From 772bb53d88022c8db881f2ef04b6bdefce53fb83 Mon Sep 17 00:00:00 2001 From: Daniel Sumorok Date: Sun, 28 Apr 2013 20:35:07 -0400 Subject: [PATCH 001/534] Added etherslave network option of OS X that uses bpf to read and write raw ethernet frames. Separated out OSX video and sound options so you build with gtk video but with OS X sound support. Changed ordering native video modes are searched to work around an issue on OS X with 16-bit color under xwindows. --- BasiliskII/src/MacOSX/etherslavetool.c | 291 +++++++++++++++++++++++++ BasiliskII/src/MacOSX/runtool.m | 78 +++++++ BasiliskII/src/Unix/.gitignore | 1 + BasiliskII/src/Unix/Makefile.in | 9 +- BasiliskII/src/Unix/configure.ac | 22 +- BasiliskII/src/Unix/ether_unix.cpp | 179 ++++++++++++++- BasiliskII/src/Unix/prefs_unix.cpp | 3 + BasiliskII/src/Unix/video_x.cpp | 2 +- 8 files changed, 581 insertions(+), 4 deletions(-) create mode 100644 BasiliskII/src/MacOSX/etherslavetool.c create mode 100644 BasiliskII/src/MacOSX/runtool.m diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c new file mode 100644 index 000000000..2f3b3a4f3 --- /dev/null +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -0,0 +1,291 @@ +#include +#include + +#include +#include +#include +#include +#include +#include + +#include + +#include +#include +#include +#include +#include + +#include + +#include + +static int openBpf(char *ifname); +static int retreiveAuthInfo(void); +static int mainLoop(int sd); + +int main(int argc, char **argv) { + char *ifName; + int ret; + int sd; + + if(argc != 2) { + return 255; + } + + ifName = argv[1]; + + ret = retreiveAuthInfo(); + if(ret != 0) { + return 254; + } + + fflush(stdout); + + sd = openBpf(ifName); + if(sd < 0) { + return 253; + } + + fflush(stdout); + + ret = mainLoop(sd); + + close(sd); + + if(ret < 0) { + return 252; + } + + return 0; +} + +static int mainLoop(int sd) { + fd_set readSet; + char *outgoing, *incoming; + unsigned short *outLen; + unsigned short *inLen; + int inIndex, outIndex; + u_int blen = 0; + int ret; + int fret = 0; + struct bpf_hdr *hdr; + int pktLen; + int frameLen; + int pad; + + if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + return -1; + } + + incoming = malloc(blen); + if(incoming == NULL) { + return -2; + } + + outgoing = malloc(blen); + if(outgoing == NULL) { + free(outgoing); + return -3; + } + + inIndex = 0; + outIndex = 0; + + outLen = (unsigned short *)outgoing; + + while(1) { + int i; + FD_ZERO(&readSet); + FD_SET(0, &readSet); + FD_SET(sd, &readSet); + + ret = select(sd + 1, &readSet, NULL, NULL, NULL); + if(ret < 0) { + fret = -4; + break; + } + + if(FD_ISSET(0, &readSet)) { + if(outIndex < 2) { + ret = read(0, outgoing + outIndex, 2-outIndex); + } else { + ret = read(0, outgoing + outIndex, *outLen - outIndex + 2); + } + + if(ret < 1) { + fret = -5; + break; + } + + outIndex += ret; + if(outIndex > 1) { + fflush(stdout); + + if((*outLen + 2) > blen) { + fret = -6; + break; + } + + if(outIndex == (*outLen + 2)) { + ret = write(sd, outLen + 1, *outLen); + if(ret != *outLen) { + fret = -7; + break; + } + outIndex = 0; + } + } + + } + + if(FD_ISSET(sd, &readSet)) { + int i; + + ret = read(sd, incoming, blen); + if(ret < 1) { + fret = -8; + break; + } + + hdr = (struct bpf_hdr *)incoming; + inLen = (unsigned short *)(incoming + 16); + + do { + pktLen = hdr->bh_caplen; + frameLen = pktLen + 18; + + if((pktLen < 0) || (frameLen > ret) || (frameLen < 0)) { + fret = -9; + break; + } + *inLen = pktLen; + + write(0, inLen, pktLen + 2); + /* printf("%02X%02X %02X%02X %02X%02X %02X%02X\n", */ + /* *((unsigned char *)inLen + 0), */ + /* *((unsigned char *)inLen + 1), */ + /* *((unsigned char *)inLen + 2), */ + /* *((unsigned char *)inLen + 3), */ + /* *((unsigned char *)inLen + 4), */ + /* *((unsigned char *)inLen + 5), */ + /* *((unsigned char *)inLen + 6), */ + /* *((unsigned char *)inLen + 7)); */ + + /* printf("Read %d, len = %d, diff = %d.\n", ret, pktLen, */ + /* ret - pktLen); */ + /* fflush(stdout); */ + + if((frameLen & 0x03) == 0) { + pad = 0; + } else { + pad = 4 - (frameLen & 0x03); + } + + ret -= (frameLen + pad); + hdr = (struct bpf_hdr *)((unsigned char *)hdr + frameLen + pad); + inLen = (unsigned short *)((unsigned char *)hdr + 16); + } while (ret > 0); + + if(fret != 0) { + break; + } + } + } + + free(incoming); + free(outgoing); + + return fret; +} + +static int retreiveAuthInfo(void) { + AuthorizationRef aRef; + OSStatus status; + AuthorizationRights myRights; + AuthorizationRights *newRights; + AuthorizationItem *myItem; + AuthorizationItem myItems[1]; + AuthorizationItemSet *mySet; + int i; + + status = AuthorizationCopyPrivilegedReference(&aRef, kAuthorizationFlagDefaults); + if(status != errAuthorizationSuccess) { + return -1; + } + + status = AuthorizationCopyInfo(aRef, NULL, &mySet); + if(status != errAuthorizationSuccess) { + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + return -1; + } + + myItems[0].name = "system.privilege.admin"; + myItems[0].valueLength = 0; + myItems[0].value = NULL; + myItems[0].flags = 0; + + myRights.count = sizeof (myItems) / sizeof (myItems[0]); + myRights.items = myItems; + + status = AuthorizationCopyRights(aRef, &myRights, NULL, + kAuthorizationFlagExtendRights, + &newRights); + if(status != errAuthorizationSuccess) { + AuthorizationFreeItemSet(mySet); + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + return -2; + } + + AuthorizationFreeItemSet(newRights); + AuthorizationFreeItemSet(mySet); + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + + return 0; +} + +static int openBpf(char *ifname) { + u_int blen = 0; + struct ifreq ifreq; + u_int arg; + + int sd = open("/dev/bpf2", O_RDWR); + + if(sd < 0) { + return -1; + } + + if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + close(sd); + return -2; + } + + bzero(&ifreq, sizeof(ifreq)); + strncpy(ifreq.ifr_name, ifname, IFNAMSIZ); + + arg = 0; + if(ioctl(sd, BIOCSETIF, &ifreq) < 0) { + close(sd); + return -3; + } + + arg = 0; + if(ioctl(sd, BIOCSSEESENT, &arg) < 0) { + close(sd); + return -4; + } + + arg = 1; + if(ioctl(sd, BIOCPROMISC, &arg) < 0) { + close(sd); + return -5; + } + + arg = 1; + if(ioctl(sd, BIOCIMMEDIATE, &arg) < 0) { + close(sd); + return -6; + } + + return sd; +} diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m new file mode 100644 index 000000000..5fc2b69ef --- /dev/null +++ b/BasiliskII/src/MacOSX/runtool.m @@ -0,0 +1,78 @@ +#include +#include + +#include +#include +#include +#include +#include + +#include + +#include +#include +#include +#include +#include + +#include + +#include + +FILE * runTool(const char *ifName); + +FILE * runTool(const char *ifName) { + OSStatus authStatus; + FILE *fp; + char *args[] = {"ethsheeptool", NULL, NULL}; + int ret; + const char *path; + + path = [[[NSBundle mainBundle] pathForResource:@"etherslavetool" ofType: nil] UTF8String]; + + if(path == NULL) { + return NULL; + } + + AuthorizationFlags authFlags; + AuthorizationRef authRef; + AuthorizationItem authItems[1]; + AuthorizationRights authRights; + + args[1] = (char *)ifName; + + authFlags = kAuthorizationFlagExtendRights | + kAuthorizationFlagInteractionAllowed | + kAuthorizationFlagPreAuthorize; + + authItems[0].name = "system.privilege.admin"; + authItems[0].valueLength = 0; + authItems[0].value = NULL; + authItems[0].flags = 0; + + authRights.count = sizeof (authItems) / sizeof (authItems[0]); + authRights.items = authItems; + + authStatus = AuthorizationCreate(&authRights, + kAuthorizationEmptyEnvironment, + authFlags, + &authRef); + + if(authStatus != errAuthorizationSuccess) { + fprintf(stderr, "%s: AuthorizationCreate() failed.\n", __func__); + return NULL; + } + + authStatus = AuthorizationExecuteWithPrivileges(authRef, + path, + kAuthorizationFlagDefaults, + args + 1, + &fp); + + if(authStatus != errAuthorizationSuccess) { + fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", __func__); + return NULL; + } + + return fp; +} diff --git a/BasiliskII/src/Unix/.gitignore b/BasiliskII/src/Unix/.gitignore index cc9e93f6c..6d0742222 100644 --- a/BasiliskII/src/Unix/.gitignore +++ b/BasiliskII/src/Unix/.gitignore @@ -1,6 +1,7 @@ # Object files obj/* BasiliskII +etherslavetool # Autotools generated files Makefile diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index e50326a82..c0d74188a 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -74,6 +74,10 @@ CXXFLAGS += $(GUI_CFLAGS) LIBS += $(GUI_LIBS) endif +ifeq (@MACOSX_ETHERSLAVE@,yes) +PROGS += etherslavetool +endif + ## Rules .PHONY: modules install installdirs uninstall mostlyclean clean distclean depend dep .SUFFIXES: @@ -138,6 +142,9 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns mkdir -p $(GUI_APP_APP)/Contents/Resources ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns +etherslavetool: ../MacOSX/etherslavetool.c + $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $< -o $@ + modules: cd Linux/NetDriver; make @@ -167,7 +174,7 @@ mostlyclean: rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak clean: mostlyclean - rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h + rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h Darwin/lowmem Darwin/pagezero distclean: clean rm -rf $(OBJ_DIR) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 62d45f57d..0816b19c5 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -21,6 +21,12 @@ AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI dnl Mac OS X GUI. AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [default=no]], [WANT_MACOSX_GUI=$enableval], [WANT_MACOSX_GUI=no]) +dnl Mac OS X Sound +AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) + +dnl Mac OS X etherslave support +AC_ARG_ENABLE(macosx-etherslave, [ --enable-macosx-etherslave enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERSLAVE=$enableval], [WANT_MACOSX_ETHERSLAVE=no]) + dnl Video options. AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) @@ -509,6 +515,7 @@ mips-sony-bsd|mips-sony-newsos4) ;; *-*-darwin*) no_dev_ptmx=1 + LIBS="$LIBS -lstdc++" ;; esac @@ -678,6 +685,8 @@ darwin*) if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then EXTFSSRC=../MacOSX/extfs_macosx.cpp fi + EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.m" + LIBS="$LIBS -framework Security" ;; cygwin*) SERIALSRC="../dummy/serial_dummy.cpp" @@ -719,11 +728,21 @@ if [[ "x$WANT_MACOSX_GUI" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/prefs_macosx.cpp" VIDEOSRCS="../MacOSX/video_macosx.mm" - AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" else EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" fi +if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then + AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" + LIBS="$LIBS -framework AudioToolbox -framework AudioUnit -framework CoreAudio" +fi + +if [[ "x$WANT_MACOSX_ETHERSLAVE" = "xyes" ]]; then + AC_DEFINE(ENABLE_MACOSX_ETHERSLAVE, 1, [Define if supporting "etherslave" network device.]) +fi + +AC_SUBST(MACOSX_ETHERSLAVE, $WANT_MACOSX_ETHERSLAVE) + dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) @@ -1748,6 +1767,7 @@ echo echo Basilisk II configuration summary: echo echo Mac OS X GUI ........................... : $WANT_MACOSX_GUI +echo Mac OS X Sound ......................... : $WANT_MACOSX_SOUND echo SDL support ............................ : $SDL_SUPPORT echo BINCUE support ......................... : $have_bincue echo LIBVHD support ......................... : $have_libvhd diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 526ee29ca..ba6ea8001 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -41,6 +41,12 @@ #endif #include #include + +#ifdef ENABLE_MACOSX_ETHERSLAVE +#include +#include +#endif + #include #include #include @@ -93,9 +99,17 @@ enum { NET_IF_SHEEPNET, NET_IF_ETHERTAP, NET_IF_TUNTAP, - NET_IF_SLIRP + NET_IF_SLIRP, + NET_IF_ETHERSLAVE }; + +#ifdef ENABLE_MACOSX_ETHERSLAVE +extern "C" { + extern FILE * runTool(const char *ifName); +} +#endif + // Constants #if ENABLE_TUNTAP static const char ETHERCONFIG_FILE_NAME[] = DATADIR "/tunconfig"; @@ -122,6 +136,11 @@ static uint8 ether_addr[6]; // Our Ethernet address const bool ether_driver_opened = true; // Flag: is the MacOS driver opened? #endif + +#ifdef ENABLE_MACOSX_ETHERSLAVE +static uint8 packet_buffer[2048]; +#endif + // Attached network protocols, maps protocol type to MacOS handler address static map net_protocols; @@ -135,6 +154,11 @@ static void ether_do_interrupt(void); static void slirp_add_redirs(); static int slirp_add_redir(const char *redir_str); +#ifdef ENABLE_MACOSX_ETHERSLAVE +static int getmacaddress(const char* dev, unsigned char *addr); +static bool openEtherSlave(const char *ifName); +static int readpacket(void); +#endif /* * Start packet reception thread @@ -235,6 +259,9 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); +#ifdef ENABLE_MACOSX_ETHERSLAVE + const char *slaveDev = PrefsFindString("etherslavedev"); +#endif if (name == NULL) return false; @@ -249,6 +276,10 @@ bool ether_init(void) #ifdef HAVE_SLIRP else if (strcmp(name, "slirp") == 0) net_if_type = NET_IF_SLIRP; +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + else if (strcmp(name, "etherslave") == 0) + net_if_type = NET_IF_ETHERSLAVE; #endif else net_if_type = NET_IF_SHEEPNET; @@ -300,6 +331,14 @@ bool ether_init(void) case NET_IF_SHEEPNET: strcpy(dev_name, "/dev/sheep_net"); break; +#ifdef ENABLE_MACOSX_ETHERSLAVE + case NET_IF_ETHERSLAVE: + if(slaveDev == NULL) { + WarningAlert("etherslavedev not defined in preferences."); + return false; + } + return openEtherSlave(slaveDev); +#endif } if (net_if_type != NET_IF_SLIRP) { fd = open(dev_name, O_RDWR); @@ -750,6 +789,21 @@ static int16 ether_do_write(uint32 arg) write(slirp_input_fd, packet, len); return noErr; } else +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + unsigned short pktlen; + + pktlen = len; + if(write(fd, &pktlen, 2) < 2) { + return excessCollsns; + } + + if(write(fd, packet, len) < len) { + return excessCollsns; + } + return noErr; + } else #endif if (write(fd, packet, len) < 0) { D(bug("WARNING: Couldn't transmit packet\n")); @@ -884,6 +938,13 @@ static void *receive_func(void *arg) if (res <= 0) break; +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + if(readpacket() < 1) { + break; + } + } +#endif if (ether_driver_opened) { // Trigger Ethernet interrupt D(bug(" packet received, triggering Ethernet interrupt\n")); @@ -923,6 +984,18 @@ void ether_do_interrupt(void) ether_udp_read(packet, length, &from); } else +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + unsigned short *pktlen; + uint32 p = packet; + + pktlen = (unsigned short *)packet_buffer; + length = *pktlen; + memcpy(Mac2HostAddr(packet), pktlen + 1, length); + ether_dispatch_packet(p, length); + break; + } else #endif { @@ -1049,3 +1122,107 @@ static int slirp_add_redir(const char *redir_str) WarningAlert(str); return -1; } + +#ifdef ENABLE_MACOSX_ETHERSLAVE +static int getmacaddress(const char* dev, unsigned char *addr) { + struct ifaddrs *ifaddrs, *next; + int ret = -1; + struct sockaddr_dl *sa; + + if(getifaddrs(&ifaddrs) != 0) { + perror("getifaddrs"); + return -1; + } + + next = ifaddrs; + while(next != NULL) { + switch(next->ifa_addr->sa_family) { + case AF_LINK: + if(!strcmp(dev, next->ifa_name)) { + sa = (struct sockaddr_dl *)next->ifa_addr; + memcpy(addr, LLADDR(sa), 6); + ret = 0; + } + break; + default: + break; + } + next = next->ifa_next; + } + + freeifaddrs(ifaddrs); + + return ret; +} + +static bool openEtherSlave(const char *ifName) { + FILE *fp; + char str[64]; + + str[sizeof(str)-1] = '\0'; + + if(getmacaddress(ifName, ether_addr) != 0) { + snprintf(str, sizeof(str)-1, "Unable to find interface %s.", + ifName); + WarningAlert(str); + return false; + } + + fp = runTool(ifName); + if(fp == NULL) { + snprintf(str, sizeof(str)-1, "Unable to run ether slave helper tool."); + WarningAlert(str); + return false; + } + + fd = dup(fileno(fp)); + fclose(fp); + + if(start_thread() == false) { + close(fd); + fd = -1; + return false; + } + + return true; +} + +static int readpacket() { + int index; + unsigned short *pktLen; + int ret = -1; + + pktLen = (unsigned short *)packet_buffer; + + index = 0; + while(1) { + if(index < 2) { + ret = read(fd, packet_buffer + index, 2 - index); + } else { + ret = read(fd, packet_buffer + index, *pktLen - index + 2); + } + + if(ret < 1) { + fprintf(stderr, "%s: read() returned %d.\n", __func__, ret); + break; + } + + index += ret; + + if(index > 1) { + if(*pktLen > (sizeof(packet_buffer) + 2)) { + fprintf(stderr, "%s: pktLen (%d) too large.\n", __func__, *pktLen); + break; + } + + if(index == (*pktLen + 2)) { + ret = *pktLen; + break; + } + } + } + + return ret; +} + +#endif diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index a92cd6401..43f70fb69 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -40,6 +40,9 @@ prefs_desc platform_prefs_items[] = { {"mixer", TYPE_STRING, false, "audio mixer device name"}, #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + {"etherslavedev", TYPE_STRING, false, "ethernet device for etherslave ethernet"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {NULL, TYPE_END, false, NULL} // End of list diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index 6f8ef67f7..aa3c678f6 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -328,7 +328,7 @@ static bool find_visual_for_depth(video_depth depth) bool visual_found = false; for (int i=0; i max_depth) continue; From a250b40c80e2ec055091291a5a753b0e28c4d893 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Tue, 30 Apr 2013 20:46:31 -0400 Subject: [PATCH 002/534] Added new etherlave network option for OS X. --- BasiliskII/src/MacOSX/etherslavetool.c | 277 +++++++++++++++++++++++++ BasiliskII/src/MacOSX/runtool.m | 79 +++++++ BasiliskII/src/Unix/.gitignore | 1 + BasiliskII/src/Unix/Makefile.in | 7 + BasiliskII/src/Unix/configure.ac | 11 + BasiliskII/src/Unix/ether_unix.cpp | 182 +++++++++++++++- BasiliskII/src/Unix/prefs_unix.cpp | 3 + 7 files changed, 559 insertions(+), 1 deletion(-) create mode 100644 BasiliskII/src/MacOSX/etherslavetool.c create mode 100644 BasiliskII/src/MacOSX/runtool.m diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c new file mode 100644 index 000000000..08a18d978 --- /dev/null +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -0,0 +1,277 @@ +#include +#include + +#include +#include +#include +#include +#include +#include + +#include + +#include +#include +#include +#include +#include + +#include + +#include + +static int openBpf(char *ifname); +static int retreiveAuthInfo(void); +static int mainLoop(int sd); + +int main(int argc, char **argv) { + char *ifName; + int ret; + int sd; + + if(argc != 2) { + return 255; + } + + ifName = argv[1]; + + ret = retreiveAuthInfo(); + if(ret != 0) { + return 254; + } + + fflush(stdout); + + sd = openBpf(ifName); + if(sd < 0) { + return 253; + } + + fflush(stdout); + + ret = mainLoop(sd); + + close(sd); + + if(ret < 0) { + return 252; + } + + return 0; +} + +static int mainLoop(int sd) { + fd_set readSet; + char *outgoing, *incoming; + unsigned short *outLen; + unsigned short *inLen; + int inIndex, outIndex; + u_int blen = 0; + int ret; + int fret = 0; + struct bpf_hdr *hdr; + int pktLen; + int frameLen; + int pad; + + if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + return -1; + } + + incoming = malloc(blen); + if(incoming == NULL) { + return -2; + } + + outgoing = malloc(blen); + if(outgoing == NULL) { + free(outgoing); + return -3; + } + + inIndex = 0; + outIndex = 0; + + outLen = (unsigned short *)outgoing; + + while(1) { + int i; + FD_ZERO(&readSet); + FD_SET(0, &readSet); + FD_SET(sd, &readSet); + + ret = select(sd + 1, &readSet, NULL, NULL, NULL); + if(ret < 0) { + fret = -4; + break; + } + + if(FD_ISSET(0, &readSet)) { + if(outIndex < 2) { + ret = read(0, outgoing + outIndex, 2-outIndex); + } else { + ret = read(0, outgoing + outIndex, *outLen - outIndex + 2); + } + + if(ret < 1) { + fret = -5; + break; + } + + outIndex += ret; + if(outIndex > 1) { + fflush(stdout); + + if((*outLen + 2) > blen) { + fret = -6; + break; + } + + if(outIndex == (*outLen + 2)) { + ret = write(sd, outLen + 1, *outLen); + if(ret != *outLen) { + fret = -7; + break; + } + outIndex = 0; + } + } + + } + + if(FD_ISSET(sd, &readSet)) { + int i; + + ret = read(sd, incoming, blen); + if(ret < 1) { + fret = -8; + break; + } + + hdr = (struct bpf_hdr *)incoming; + inLen = (unsigned short *)(incoming + 16); + + do { + pktLen = hdr->bh_caplen; + frameLen = pktLen + 18; + + if((pktLen < 0) || (frameLen > ret) || (frameLen < 0)) { + fret = -9; + break; + } + *inLen = pktLen; + + write(0, inLen, pktLen + 2); + if((frameLen & 0x03) == 0) { + pad = 0; + } else { + pad = 4 - (frameLen & 0x03); + } + + ret -= (frameLen + pad); + hdr = (struct bpf_hdr *)((unsigned char *)hdr + frameLen + pad); + inLen = (unsigned short *)((unsigned char *)hdr + 16); + } while (ret > 0); + + if(fret != 0) { + break; + } + } + } + + free(incoming); + free(outgoing); + + return fret; +} + +static int retreiveAuthInfo(void) { + AuthorizationRef aRef; + OSStatus status; + AuthorizationRights myRights; + AuthorizationRights *newRights; + AuthorizationItem *myItem; + AuthorizationItem myItems[1]; + AuthorizationItemSet *mySet; + int i; + + status = AuthorizationCopyPrivilegedReference(&aRef, kAuthorizationFlagDefaults); + if(status != errAuthorizationSuccess) { + return -1; + } + + status = AuthorizationCopyInfo(aRef, NULL, &mySet); + if(status != errAuthorizationSuccess) { + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + return -1; + } + + myItems[0].name = "system.privilege.admin"; + myItems[0].valueLength = 0; + myItems[0].value = NULL; + myItems[0].flags = 0; + + myRights.count = sizeof (myItems) / sizeof (myItems[0]); + myRights.items = myItems; + + status = AuthorizationCopyRights(aRef, &myRights, NULL, + kAuthorizationFlagExtendRights, + &newRights); + if(status != errAuthorizationSuccess) { + AuthorizationFreeItemSet(mySet); + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + return -2; + } + + AuthorizationFreeItemSet(newRights); + AuthorizationFreeItemSet(mySet); + AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); + + return 0; +} + +static int openBpf(char *ifname) { + u_int blen = 0; + struct ifreq ifreq; + u_int arg; + + int sd = open("/dev/bpf2", O_RDWR); + + if(sd < 0) { + return -1; + } + + if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + close(sd); + return -2; + } + + bzero(&ifreq, sizeof(ifreq)); + strncpy(ifreq.ifr_name, ifname, IFNAMSIZ); + + arg = 0; + if(ioctl(sd, BIOCSETIF, &ifreq) < 0) { + close(sd); + return -3; + } + + arg = 0; + if(ioctl(sd, BIOCSSEESENT, &arg) < 0) { + close(sd); + return -4; + } + + arg = 1; + if(ioctl(sd, BIOCPROMISC, &arg) < 0) { + close(sd); + return -5; + } + + arg = 1; + if(ioctl(sd, BIOCIMMEDIATE, &arg) < 0) { + close(sd); + return -6; + } + + return sd; +} diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m new file mode 100644 index 000000000..64f39f9d5 --- /dev/null +++ b/BasiliskII/src/MacOSX/runtool.m @@ -0,0 +1,79 @@ +#include +#include + +#include +#include +#include +#include +#include + +#include + +#include +#include +#include +#include +#include + +#include + +#include + +FILE * runTool(const char *ifName); + +FILE * runTool(const char *ifName) { + OSStatus authStatus; + FILE *fp; + char *args[] = {"ethsheeptool", NULL, NULL}; + int ret; + const char *path; + + path = [[[NSBundle mainBundle] + pathForResource:@"etherslavetool" ofType: nil] UTF8String]; + + if(path == NULL) { + return NULL; + } + + AuthorizationFlags authFlags; + AuthorizationRef authRef; + AuthorizationItem authItems[1]; + AuthorizationRights authRights; + + args[1] = (char *)ifName; + + authFlags = kAuthorizationFlagExtendRights | + kAuthorizationFlagInteractionAllowed | + kAuthorizationFlagPreAuthorize; + + authItems[0].name = "system.privilege.admin"; + authItems[0].valueLength = 0; + authItems[0].value = NULL; + authItems[0].flags = 0; + + authRights.count = sizeof (authItems) / sizeof (authItems[0]); + authRights.items = authItems; + + authStatus = AuthorizationCreate(&authRights, + kAuthorizationEmptyEnvironment, + authFlags, + &authRef); + + if(authStatus != errAuthorizationSuccess) { + fprintf(stderr, "%s: AuthorizationCreate() failed.\n", __func__); + return NULL; + } + + authStatus = AuthorizationExecuteWithPrivileges(authRef, + path, + kAuthorizationFlagDefaults, + args + 1, + &fp); + + if(authStatus != errAuthorizationSuccess) { + fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", __func__); + return NULL; + } + + return fp; +} diff --git a/BasiliskII/src/Unix/.gitignore b/BasiliskII/src/Unix/.gitignore index cc9e93f6c..6d0742222 100644 --- a/BasiliskII/src/Unix/.gitignore +++ b/BasiliskII/src/Unix/.gitignore @@ -1,6 +1,7 @@ # Object files obj/* BasiliskII +etherslavetool # Autotools generated files Makefile diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index e50326a82..57a1c9d9f 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -74,6 +74,10 @@ CXXFLAGS += $(GUI_CFLAGS) LIBS += $(GUI_LIBS) endif +ifeq (@MACOSX_ETHERSLAVE@,yes) +PROGS += etherslavetool +endif + ## Rules .PHONY: modules install installdirs uninstall mostlyclean clean distclean depend dep .SUFFIXES: @@ -138,6 +142,9 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns mkdir -p $(GUI_APP_APP)/Contents/Resources ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns +etherslavetool: ../MacOSX/etherslavetool.c + $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $< -o $@ + modules: cd Linux/NetDriver; make diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 62d45f57d..93ff7aac8 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -21,6 +21,9 @@ AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI dnl Mac OS X GUI. AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [default=no]], [WANT_MACOSX_GUI=$enableval], [WANT_MACOSX_GUI=no]) +dnl Mac OS X etherslave support +AC_ARG_ENABLE(macosx-etherslave, [ --enable-macosx-etherslave enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERSLAVE=$enableval], [WANT_MACOSX_ETHERSLAVE=no]) + dnl Video options. AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) @@ -724,6 +727,14 @@ else EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" fi +if [[ "x$WANT_MACOSX_ETHERSLAVE" = "xyes" ]]; then + EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.m" + LIBS="$LIBS -framework Security" + AC_DEFINE(ENABLE_MACOSX_ETHERSLAVE, 1, [Define if supporting "etherslave" network device.]) +fi + +AC_SUBST(MACOSX_ETHERSLAVE, $WANT_MACOSX_ETHERSLAVE) + dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 526ee29ca..a2c07d2a2 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -41,6 +41,12 @@ #endif #include #include + +#ifdef ENABLE_MACOSX_ETHERSLAVE +#include +#include +#endif + #include #include #include @@ -93,9 +99,17 @@ enum { NET_IF_SHEEPNET, NET_IF_ETHERTAP, NET_IF_TUNTAP, - NET_IF_SLIRP + NET_IF_SLIRP, + NET_IF_ETHERSLAVE }; + +#ifdef ENABLE_MACOSX_ETHERSLAVE +extern "C" { + extern FILE * runTool(const char *ifName); +} +#endif + // Constants #if ENABLE_TUNTAP static const char ETHERCONFIG_FILE_NAME[] = DATADIR "/tunconfig"; @@ -122,6 +136,11 @@ static uint8 ether_addr[6]; // Our Ethernet address const bool ether_driver_opened = true; // Flag: is the MacOS driver opened? #endif + +#ifdef ENABLE_MACOSX_ETHERSLAVE +static uint8 packet_buffer[2048]; +#endif + // Attached network protocols, maps protocol type to MacOS handler address static map net_protocols; @@ -135,6 +154,11 @@ static void ether_do_interrupt(void); static void slirp_add_redirs(); static int slirp_add_redir(const char *redir_str); +#ifdef ENABLE_MACOSX_ETHERSLAVE +static int getmacaddress(const char* dev, unsigned char *addr); +static bool openEtherSlave(const char *ifName); +static int readpacket(void); +#endif /* * Start packet reception thread @@ -235,6 +259,9 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); +#ifdef ENABLE_MACOSX_ETHERSLAVE + const char *slaveDev = PrefsFindString("etherslavedev"); +#endif if (name == NULL) return false; @@ -249,6 +276,10 @@ bool ether_init(void) #ifdef HAVE_SLIRP else if (strcmp(name, "slirp") == 0) net_if_type = NET_IF_SLIRP; +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + else if (strcmp(name, "etherslave") == 0) + net_if_type = NET_IF_ETHERSLAVE; #endif else net_if_type = NET_IF_SHEEPNET; @@ -300,6 +331,14 @@ bool ether_init(void) case NET_IF_SHEEPNET: strcpy(dev_name, "/dev/sheep_net"); break; +#ifdef ENABLE_MACOSX_ETHERSLAVE + case NET_IF_ETHERSLAVE: + if(slaveDev == NULL) { + WarningAlert("etherslavedev not defined in preferences."); + return false; + } + return openEtherSlave(slaveDev); +#endif } if (net_if_type != NET_IF_SLIRP) { fd = open(dev_name, O_RDWR); @@ -750,6 +789,21 @@ static int16 ether_do_write(uint32 arg) write(slirp_input_fd, packet, len); return noErr; } else +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + unsigned short pktlen; + + pktlen = len; + if(write(fd, &pktlen, 2) < 2) { + return excessCollsns; + } + + if(write(fd, packet, len) < len) { + return excessCollsns; + } + return noErr; + } else #endif if (write(fd, packet, len) < 0) { D(bug("WARNING: Couldn't transmit packet\n")); @@ -884,6 +938,13 @@ static void *receive_func(void *arg) if (res <= 0) break; +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + if(readpacket() < 1) { + break; + } + } +#endif if (ether_driver_opened) { // Trigger Ethernet interrupt D(bug(" packet received, triggering Ethernet interrupt\n")); @@ -923,6 +984,18 @@ void ether_do_interrupt(void) ether_udp_read(packet, length, &from); } else +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + if (net_if_type == NET_IF_ETHERSLAVE) { + unsigned short *pktlen; + uint32 p = packet; + + pktlen = (unsigned short *)packet_buffer; + length = *pktlen; + memcpy(Mac2HostAddr(packet), pktlen + 1, length); + ether_dispatch_packet(p, length); + break; + } else #endif { @@ -1049,3 +1122,110 @@ static int slirp_add_redir(const char *redir_str) WarningAlert(str); return -1; } + +#ifdef ENABLE_MACOSX_ETHERSLAVE +static int getmacaddress(const char* dev, unsigned char *addr) +{ + struct ifaddrs *ifaddrs, *next; + int ret = -1; + struct sockaddr_dl *sa; + + if(getifaddrs(&ifaddrs) != 0) { + perror("getifaddrs"); + return -1; + } + + next = ifaddrs; + while(next != NULL) { + switch(next->ifa_addr->sa_family) { + case AF_LINK: + if(!strcmp(dev, next->ifa_name)) { + sa = (struct sockaddr_dl *)next->ifa_addr; + memcpy(addr, LLADDR(sa), 6); + ret = 0; + } + break; + default: + break; + } + next = next->ifa_next; + } + + freeifaddrs(ifaddrs); + + return ret; +} + +static bool openEtherSlave(const char *ifName) +{ + FILE *fp; + char str[64]; + + str[sizeof(str)-1] = '\0'; + + if(getmacaddress(ifName, ether_addr) != 0) { + snprintf(str, sizeof(str)-1, "Unable to find interface %s.", + ifName); + WarningAlert(str); + return false; + } + + fp = runTool(ifName); + if(fp == NULL) { + snprintf(str, sizeof(str)-1, "Unable to run ether slave helper tool."); + WarningAlert(str); + return false; + } + + fd = dup(fileno(fp)); + fclose(fp); + + if(start_thread() == false) { + close(fd); + fd = -1; + return false; + } + + return true; +} + +static int readpacket() +{ + int index; + unsigned short *pktLen; + int ret = -1; + + pktLen = (unsigned short *)packet_buffer; + + index = 0; + while(1) { + if(index < 2) { + ret = read(fd, packet_buffer + index, 2 - index); + } else { + ret = read(fd, packet_buffer + index, *pktLen - index + 2); + } + + if(ret < 1) { + fprintf(stderr, "%s: read() returned %d.\n", __func__, ret); + break; + } + + index += ret; + + if(index > 1) { + if(*pktLen > (sizeof(packet_buffer) + 2)) { + fprintf(stderr, "%s: pktLen (%d) too large.\n", __func__, *pktLen); + break; + } + + if(index == (*pktLen + 2)) { + ret = *pktLen; + break; + } + } + } + + return ret; +} + +#endif diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index a92cd6401..43f70fb69 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -40,6 +40,9 @@ prefs_desc platform_prefs_items[] = { {"mixer", TYPE_STRING, false, "audio mixer device name"}, #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, +#endif +#ifdef ENABLE_MACOSX_ETHERSLAVE + {"etherslavedev", TYPE_STRING, false, "ethernet device for etherslave ethernet"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {NULL, TYPE_END, false, NULL} // End of list From cf3b2786aeef6dca77ba11bbbde176c893738bd0 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 1 May 2013 06:39:15 -0400 Subject: [PATCH 003/534] Revert previous changes. Changes have been moved to branches. --- BasiliskII/src/MacOSX/etherslavetool.c | 291 ------------------------- BasiliskII/src/MacOSX/runtool.m | 78 ------- BasiliskII/src/Unix/.gitignore | 1 - BasiliskII/src/Unix/Makefile.in | 9 +- BasiliskII/src/Unix/configure.ac | 22 +- BasiliskII/src/Unix/ether_unix.cpp | 179 +-------------- BasiliskII/src/Unix/prefs_unix.cpp | 3 - BasiliskII/src/Unix/video_x.cpp | 2 +- 8 files changed, 4 insertions(+), 581 deletions(-) delete mode 100644 BasiliskII/src/MacOSX/etherslavetool.c delete mode 100644 BasiliskII/src/MacOSX/runtool.m diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c deleted file mode 100644 index 2f3b3a4f3..000000000 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ /dev/null @@ -1,291 +0,0 @@ -#include -#include - -#include -#include -#include -#include -#include -#include - -#include - -#include -#include -#include -#include -#include - -#include - -#include - -static int openBpf(char *ifname); -static int retreiveAuthInfo(void); -static int mainLoop(int sd); - -int main(int argc, char **argv) { - char *ifName; - int ret; - int sd; - - if(argc != 2) { - return 255; - } - - ifName = argv[1]; - - ret = retreiveAuthInfo(); - if(ret != 0) { - return 254; - } - - fflush(stdout); - - sd = openBpf(ifName); - if(sd < 0) { - return 253; - } - - fflush(stdout); - - ret = mainLoop(sd); - - close(sd); - - if(ret < 0) { - return 252; - } - - return 0; -} - -static int mainLoop(int sd) { - fd_set readSet; - char *outgoing, *incoming; - unsigned short *outLen; - unsigned short *inLen; - int inIndex, outIndex; - u_int blen = 0; - int ret; - int fret = 0; - struct bpf_hdr *hdr; - int pktLen; - int frameLen; - int pad; - - if(ioctl(sd, BIOCGBLEN, &blen) < 0) { - return -1; - } - - incoming = malloc(blen); - if(incoming == NULL) { - return -2; - } - - outgoing = malloc(blen); - if(outgoing == NULL) { - free(outgoing); - return -3; - } - - inIndex = 0; - outIndex = 0; - - outLen = (unsigned short *)outgoing; - - while(1) { - int i; - FD_ZERO(&readSet); - FD_SET(0, &readSet); - FD_SET(sd, &readSet); - - ret = select(sd + 1, &readSet, NULL, NULL, NULL); - if(ret < 0) { - fret = -4; - break; - } - - if(FD_ISSET(0, &readSet)) { - if(outIndex < 2) { - ret = read(0, outgoing + outIndex, 2-outIndex); - } else { - ret = read(0, outgoing + outIndex, *outLen - outIndex + 2); - } - - if(ret < 1) { - fret = -5; - break; - } - - outIndex += ret; - if(outIndex > 1) { - fflush(stdout); - - if((*outLen + 2) > blen) { - fret = -6; - break; - } - - if(outIndex == (*outLen + 2)) { - ret = write(sd, outLen + 1, *outLen); - if(ret != *outLen) { - fret = -7; - break; - } - outIndex = 0; - } - } - - } - - if(FD_ISSET(sd, &readSet)) { - int i; - - ret = read(sd, incoming, blen); - if(ret < 1) { - fret = -8; - break; - } - - hdr = (struct bpf_hdr *)incoming; - inLen = (unsigned short *)(incoming + 16); - - do { - pktLen = hdr->bh_caplen; - frameLen = pktLen + 18; - - if((pktLen < 0) || (frameLen > ret) || (frameLen < 0)) { - fret = -9; - break; - } - *inLen = pktLen; - - write(0, inLen, pktLen + 2); - /* printf("%02X%02X %02X%02X %02X%02X %02X%02X\n", */ - /* *((unsigned char *)inLen + 0), */ - /* *((unsigned char *)inLen + 1), */ - /* *((unsigned char *)inLen + 2), */ - /* *((unsigned char *)inLen + 3), */ - /* *((unsigned char *)inLen + 4), */ - /* *((unsigned char *)inLen + 5), */ - /* *((unsigned char *)inLen + 6), */ - /* *((unsigned char *)inLen + 7)); */ - - /* printf("Read %d, len = %d, diff = %d.\n", ret, pktLen, */ - /* ret - pktLen); */ - /* fflush(stdout); */ - - if((frameLen & 0x03) == 0) { - pad = 0; - } else { - pad = 4 - (frameLen & 0x03); - } - - ret -= (frameLen + pad); - hdr = (struct bpf_hdr *)((unsigned char *)hdr + frameLen + pad); - inLen = (unsigned short *)((unsigned char *)hdr + 16); - } while (ret > 0); - - if(fret != 0) { - break; - } - } - } - - free(incoming); - free(outgoing); - - return fret; -} - -static int retreiveAuthInfo(void) { - AuthorizationRef aRef; - OSStatus status; - AuthorizationRights myRights; - AuthorizationRights *newRights; - AuthorizationItem *myItem; - AuthorizationItem myItems[1]; - AuthorizationItemSet *mySet; - int i; - - status = AuthorizationCopyPrivilegedReference(&aRef, kAuthorizationFlagDefaults); - if(status != errAuthorizationSuccess) { - return -1; - } - - status = AuthorizationCopyInfo(aRef, NULL, &mySet); - if(status != errAuthorizationSuccess) { - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - return -1; - } - - myItems[0].name = "system.privilege.admin"; - myItems[0].valueLength = 0; - myItems[0].value = NULL; - myItems[0].flags = 0; - - myRights.count = sizeof (myItems) / sizeof (myItems[0]); - myRights.items = myItems; - - status = AuthorizationCopyRights(aRef, &myRights, NULL, - kAuthorizationFlagExtendRights, - &newRights); - if(status != errAuthorizationSuccess) { - AuthorizationFreeItemSet(mySet); - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - return -2; - } - - AuthorizationFreeItemSet(newRights); - AuthorizationFreeItemSet(mySet); - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - - return 0; -} - -static int openBpf(char *ifname) { - u_int blen = 0; - struct ifreq ifreq; - u_int arg; - - int sd = open("/dev/bpf2", O_RDWR); - - if(sd < 0) { - return -1; - } - - if(ioctl(sd, BIOCGBLEN, &blen) < 0) { - close(sd); - return -2; - } - - bzero(&ifreq, sizeof(ifreq)); - strncpy(ifreq.ifr_name, ifname, IFNAMSIZ); - - arg = 0; - if(ioctl(sd, BIOCSETIF, &ifreq) < 0) { - close(sd); - return -3; - } - - arg = 0; - if(ioctl(sd, BIOCSSEESENT, &arg) < 0) { - close(sd); - return -4; - } - - arg = 1; - if(ioctl(sd, BIOCPROMISC, &arg) < 0) { - close(sd); - return -5; - } - - arg = 1; - if(ioctl(sd, BIOCIMMEDIATE, &arg) < 0) { - close(sd); - return -6; - } - - return sd; -} diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m deleted file mode 100644 index 5fc2b69ef..000000000 --- a/BasiliskII/src/MacOSX/runtool.m +++ /dev/null @@ -1,78 +0,0 @@ -#include -#include - -#include -#include -#include -#include -#include - -#include - -#include -#include -#include -#include -#include - -#include - -#include - -FILE * runTool(const char *ifName); - -FILE * runTool(const char *ifName) { - OSStatus authStatus; - FILE *fp; - char *args[] = {"ethsheeptool", NULL, NULL}; - int ret; - const char *path; - - path = [[[NSBundle mainBundle] pathForResource:@"etherslavetool" ofType: nil] UTF8String]; - - if(path == NULL) { - return NULL; - } - - AuthorizationFlags authFlags; - AuthorizationRef authRef; - AuthorizationItem authItems[1]; - AuthorizationRights authRights; - - args[1] = (char *)ifName; - - authFlags = kAuthorizationFlagExtendRights | - kAuthorizationFlagInteractionAllowed | - kAuthorizationFlagPreAuthorize; - - authItems[0].name = "system.privilege.admin"; - authItems[0].valueLength = 0; - authItems[0].value = NULL; - authItems[0].flags = 0; - - authRights.count = sizeof (authItems) / sizeof (authItems[0]); - authRights.items = authItems; - - authStatus = AuthorizationCreate(&authRights, - kAuthorizationEmptyEnvironment, - authFlags, - &authRef); - - if(authStatus != errAuthorizationSuccess) { - fprintf(stderr, "%s: AuthorizationCreate() failed.\n", __func__); - return NULL; - } - - authStatus = AuthorizationExecuteWithPrivileges(authRef, - path, - kAuthorizationFlagDefaults, - args + 1, - &fp); - - if(authStatus != errAuthorizationSuccess) { - fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", __func__); - return NULL; - } - - return fp; -} diff --git a/BasiliskII/src/Unix/.gitignore b/BasiliskII/src/Unix/.gitignore index 6d0742222..cc9e93f6c 100644 --- a/BasiliskII/src/Unix/.gitignore +++ b/BasiliskII/src/Unix/.gitignore @@ -1,7 +1,6 @@ # Object files obj/* BasiliskII -etherslavetool # Autotools generated files Makefile diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index c0d74188a..e50326a82 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -74,10 +74,6 @@ CXXFLAGS += $(GUI_CFLAGS) LIBS += $(GUI_LIBS) endif -ifeq (@MACOSX_ETHERSLAVE@,yes) -PROGS += etherslavetool -endif - ## Rules .PHONY: modules install installdirs uninstall mostlyclean clean distclean depend dep .SUFFIXES: @@ -142,9 +138,6 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns mkdir -p $(GUI_APP_APP)/Contents/Resources ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns -etherslavetool: ../MacOSX/etherslavetool.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $< -o $@ - modules: cd Linux/NetDriver; make @@ -174,7 +167,7 @@ mostlyclean: rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak clean: mostlyclean - rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h Darwin/lowmem Darwin/pagezero + rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h distclean: clean rm -rf $(OBJ_DIR) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 0816b19c5..62d45f57d 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -21,12 +21,6 @@ AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI dnl Mac OS X GUI. AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [default=no]], [WANT_MACOSX_GUI=$enableval], [WANT_MACOSX_GUI=no]) -dnl Mac OS X Sound -AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) - -dnl Mac OS X etherslave support -AC_ARG_ENABLE(macosx-etherslave, [ --enable-macosx-etherslave enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERSLAVE=$enableval], [WANT_MACOSX_ETHERSLAVE=no]) - dnl Video options. AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) @@ -515,7 +509,6 @@ mips-sony-bsd|mips-sony-newsos4) ;; *-*-darwin*) no_dev_ptmx=1 - LIBS="$LIBS -lstdc++" ;; esac @@ -685,8 +678,6 @@ darwin*) if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then EXTFSSRC=../MacOSX/extfs_macosx.cpp fi - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.m" - LIBS="$LIBS -framework Security" ;; cygwin*) SERIALSRC="../dummy/serial_dummy.cpp" @@ -728,21 +719,11 @@ if [[ "x$WANT_MACOSX_GUI" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/prefs_macosx.cpp" VIDEOSRCS="../MacOSX/video_macosx.mm" + AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" else EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" fi -if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then - AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" - LIBS="$LIBS -framework AudioToolbox -framework AudioUnit -framework CoreAudio" -fi - -if [[ "x$WANT_MACOSX_ETHERSLAVE" = "xyes" ]]; then - AC_DEFINE(ENABLE_MACOSX_ETHERSLAVE, 1, [Define if supporting "etherslave" network device.]) -fi - -AC_SUBST(MACOSX_ETHERSLAVE, $WANT_MACOSX_ETHERSLAVE) - dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) @@ -1767,7 +1748,6 @@ echo echo Basilisk II configuration summary: echo echo Mac OS X GUI ........................... : $WANT_MACOSX_GUI -echo Mac OS X Sound ......................... : $WANT_MACOSX_SOUND echo SDL support ............................ : $SDL_SUPPORT echo BINCUE support ......................... : $have_bincue echo LIBVHD support ......................... : $have_libvhd diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index ba6ea8001..526ee29ca 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -41,12 +41,6 @@ #endif #include #include - -#ifdef ENABLE_MACOSX_ETHERSLAVE -#include -#include -#endif - #include #include #include @@ -99,17 +93,9 @@ enum { NET_IF_SHEEPNET, NET_IF_ETHERTAP, NET_IF_TUNTAP, - NET_IF_SLIRP, - NET_IF_ETHERSLAVE + NET_IF_SLIRP }; - -#ifdef ENABLE_MACOSX_ETHERSLAVE -extern "C" { - extern FILE * runTool(const char *ifName); -} -#endif - // Constants #if ENABLE_TUNTAP static const char ETHERCONFIG_FILE_NAME[] = DATADIR "/tunconfig"; @@ -136,11 +122,6 @@ static uint8 ether_addr[6]; // Our Ethernet address const bool ether_driver_opened = true; // Flag: is the MacOS driver opened? #endif - -#ifdef ENABLE_MACOSX_ETHERSLAVE -static uint8 packet_buffer[2048]; -#endif - // Attached network protocols, maps protocol type to MacOS handler address static map net_protocols; @@ -154,11 +135,6 @@ static void ether_do_interrupt(void); static void slirp_add_redirs(); static int slirp_add_redir(const char *redir_str); -#ifdef ENABLE_MACOSX_ETHERSLAVE -static int getmacaddress(const char* dev, unsigned char *addr); -static bool openEtherSlave(const char *ifName); -static int readpacket(void); -#endif /* * Start packet reception thread @@ -259,9 +235,6 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); -#ifdef ENABLE_MACOSX_ETHERSLAVE - const char *slaveDev = PrefsFindString("etherslavedev"); -#endif if (name == NULL) return false; @@ -276,10 +249,6 @@ bool ether_init(void) #ifdef HAVE_SLIRP else if (strcmp(name, "slirp") == 0) net_if_type = NET_IF_SLIRP; -#endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - else if (strcmp(name, "etherslave") == 0) - net_if_type = NET_IF_ETHERSLAVE; #endif else net_if_type = NET_IF_SHEEPNET; @@ -331,14 +300,6 @@ bool ether_init(void) case NET_IF_SHEEPNET: strcpy(dev_name, "/dev/sheep_net"); break; -#ifdef ENABLE_MACOSX_ETHERSLAVE - case NET_IF_ETHERSLAVE: - if(slaveDev == NULL) { - WarningAlert("etherslavedev not defined in preferences."); - return false; - } - return openEtherSlave(slaveDev); -#endif } if (net_if_type != NET_IF_SLIRP) { fd = open(dev_name, O_RDWR); @@ -789,21 +750,6 @@ static int16 ether_do_write(uint32 arg) write(slirp_input_fd, packet, len); return noErr; } else -#endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { - unsigned short pktlen; - - pktlen = len; - if(write(fd, &pktlen, 2) < 2) { - return excessCollsns; - } - - if(write(fd, packet, len) < len) { - return excessCollsns; - } - return noErr; - } else #endif if (write(fd, packet, len) < 0) { D(bug("WARNING: Couldn't transmit packet\n")); @@ -938,13 +884,6 @@ static void *receive_func(void *arg) if (res <= 0) break; -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { - if(readpacket() < 1) { - break; - } - } -#endif if (ether_driver_opened) { // Trigger Ethernet interrupt D(bug(" packet received, triggering Ethernet interrupt\n")); @@ -984,18 +923,6 @@ void ether_do_interrupt(void) ether_udp_read(packet, length, &from); } else -#endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { - unsigned short *pktlen; - uint32 p = packet; - - pktlen = (unsigned short *)packet_buffer; - length = *pktlen; - memcpy(Mac2HostAddr(packet), pktlen + 1, length); - ether_dispatch_packet(p, length); - break; - } else #endif { @@ -1122,107 +1049,3 @@ static int slirp_add_redir(const char *redir_str) WarningAlert(str); return -1; } - -#ifdef ENABLE_MACOSX_ETHERSLAVE -static int getmacaddress(const char* dev, unsigned char *addr) { - struct ifaddrs *ifaddrs, *next; - int ret = -1; - struct sockaddr_dl *sa; - - if(getifaddrs(&ifaddrs) != 0) { - perror("getifaddrs"); - return -1; - } - - next = ifaddrs; - while(next != NULL) { - switch(next->ifa_addr->sa_family) { - case AF_LINK: - if(!strcmp(dev, next->ifa_name)) { - sa = (struct sockaddr_dl *)next->ifa_addr; - memcpy(addr, LLADDR(sa), 6); - ret = 0; - } - break; - default: - break; - } - next = next->ifa_next; - } - - freeifaddrs(ifaddrs); - - return ret; -} - -static bool openEtherSlave(const char *ifName) { - FILE *fp; - char str[64]; - - str[sizeof(str)-1] = '\0'; - - if(getmacaddress(ifName, ether_addr) != 0) { - snprintf(str, sizeof(str)-1, "Unable to find interface %s.", - ifName); - WarningAlert(str); - return false; - } - - fp = runTool(ifName); - if(fp == NULL) { - snprintf(str, sizeof(str)-1, "Unable to run ether slave helper tool."); - WarningAlert(str); - return false; - } - - fd = dup(fileno(fp)); - fclose(fp); - - if(start_thread() == false) { - close(fd); - fd = -1; - return false; - } - - return true; -} - -static int readpacket() { - int index; - unsigned short *pktLen; - int ret = -1; - - pktLen = (unsigned short *)packet_buffer; - - index = 0; - while(1) { - if(index < 2) { - ret = read(fd, packet_buffer + index, 2 - index); - } else { - ret = read(fd, packet_buffer + index, *pktLen - index + 2); - } - - if(ret < 1) { - fprintf(stderr, "%s: read() returned %d.\n", __func__, ret); - break; - } - - index += ret; - - if(index > 1) { - if(*pktLen > (sizeof(packet_buffer) + 2)) { - fprintf(stderr, "%s: pktLen (%d) too large.\n", __func__, *pktLen); - break; - } - - if(index == (*pktLen + 2)) { - ret = *pktLen; - break; - } - } - } - - return ret; -} - -#endif diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index 43f70fb69..a92cd6401 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -40,9 +40,6 @@ prefs_desc platform_prefs_items[] = { {"mixer", TYPE_STRING, false, "audio mixer device name"}, #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - {"etherslavedev", TYPE_STRING, false, "ethernet device for etherslave ethernet"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {NULL, TYPE_END, false, NULL} // End of list diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index aa3c678f6..6f8ef67f7 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -328,7 +328,7 @@ static bool find_visual_for_depth(video_depth depth) bool visual_found = false; for (int i=0; i max_depth) continue; From 94b790728e192f12e7b8a023dcfeff44779ce35b Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 1 May 2013 06:54:20 -0400 Subject: [PATCH 004/534] Added file-level comments. --- BasiliskII/src/MacOSX/etherslavetool.c | 23 +++++++++++++++++++++++ BasiliskII/src/MacOSX/runtool.m | 23 ++++++++++++++++++++++- 2 files changed, 45 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index 08a18d978..dfc4bec06 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -1,3 +1,26 @@ +/* + * etherslavetool.c - Reads and writes raw ethernet packets usng bpf + * interface. + * + * Copyright (C) 2010, Daniel Sumorok + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 #include diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m index 64f39f9d5..925e50fc6 100644 --- a/BasiliskII/src/MacOSX/runtool.m +++ b/BasiliskII/src/MacOSX/runtool.m @@ -1,3 +1,24 @@ +/* + * runtool.m - Run an external program as root for networking + * Copyright (C) 2010, Daniel Sumorok + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 #include @@ -24,7 +45,7 @@ FILE * runTool(const char *ifName) { OSStatus authStatus; FILE *fp; - char *args[] = {"ethsheeptool", NULL, NULL}; + char *args[] = {"etherslavetool", NULL, NULL}; int ret; const char *path; From 01ba04139fda8602e7c6daf85aa2f7624ed1e3a8 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 4 May 2013 20:36:11 -0400 Subject: [PATCH 005/534] Updated coding style. --- BasiliskII/src/MacOSX/etherslavetool.c | 126 ++++++++++++------------- BasiliskII/src/MacOSX/runtool.m | 53 +++++------ BasiliskII/src/Unix/ether_unix.cpp | 84 ++++++++--------- 3 files changed, 130 insertions(+), 133 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index dfc4bec06..766c79683 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -43,160 +43,160 @@ #include -static int openBpf(char *ifname); -static int retreiveAuthInfo(void); -static int mainLoop(int sd); +static int open_bpf(char *ifname); +static int retreive_auth_info(void); +static int main_loop(int sd); int main(int argc, char **argv) { - char *ifName; + char *if_name; int ret; int sd; - if(argc != 2) { + if (argc != 2) { return 255; } - ifName = argv[1]; + if_name = argv[1]; - ret = retreiveAuthInfo(); - if(ret != 0) { + ret = retreive_auth_info(); + if (ret != 0) { return 254; } fflush(stdout); - sd = openBpf(ifName); - if(sd < 0) { + sd = open_bpf(if_name); + if (sd < 0) { return 253; } fflush(stdout); - ret = mainLoop(sd); + ret = main_loop(sd); close(sd); - if(ret < 0) { + if (ret < 0) { return 252; } return 0; } -static int mainLoop(int sd) { +static int main_loop(int sd) { fd_set readSet; char *outgoing, *incoming; - unsigned short *outLen; - unsigned short *inLen; - int inIndex, outIndex; + unsigned short *out_len; + unsigned short *in_len; + int in_index, out_index; u_int blen = 0; int ret; int fret = 0; struct bpf_hdr *hdr; - int pktLen; - int frameLen; + int pkt_len; + int frame_len; int pad; - if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + if (ioctl(sd, BIOCGBLEN, &blen) < 0) { return -1; } incoming = malloc(blen); - if(incoming == NULL) { + if (incoming == NULL) { return -2; } outgoing = malloc(blen); - if(outgoing == NULL) { + if (outgoing == NULL) { free(outgoing); return -3; } - inIndex = 0; - outIndex = 0; + in_index = 0; + out_index = 0; - outLen = (unsigned short *)outgoing; + out_len = (unsigned short *)outgoing; - while(1) { + while (1) { int i; FD_ZERO(&readSet); FD_SET(0, &readSet); FD_SET(sd, &readSet); ret = select(sd + 1, &readSet, NULL, NULL, NULL); - if(ret < 0) { + if (ret < 0) { fret = -4; break; } - if(FD_ISSET(0, &readSet)) { - if(outIndex < 2) { - ret = read(0, outgoing + outIndex, 2-outIndex); + if (FD_ISSET(0, &readSet)) { + if (out_index < 2) { + ret = read(0, outgoing + out_index, 2-out_index); } else { - ret = read(0, outgoing + outIndex, *outLen - outIndex + 2); + ret = read(0, outgoing + out_index, *out_len - out_index + 2); } - if(ret < 1) { + if (ret < 1) { fret = -5; break; } - outIndex += ret; - if(outIndex > 1) { + out_index += ret; + if (out_index > 1) { fflush(stdout); - if((*outLen + 2) > blen) { + if ((*out_len + 2) > blen) { fret = -6; break; } - if(outIndex == (*outLen + 2)) { - ret = write(sd, outLen + 1, *outLen); - if(ret != *outLen) { + if (out_index == (*out_len + 2)) { + ret = write(sd, out_len + 1, *out_len); + if (ret != *out_len) { fret = -7; break; } - outIndex = 0; + out_index = 0; } } } - if(FD_ISSET(sd, &readSet)) { + if (FD_ISSET(sd, &readSet)) { int i; ret = read(sd, incoming, blen); - if(ret < 1) { + if (ret < 1) { fret = -8; break; } hdr = (struct bpf_hdr *)incoming; - inLen = (unsigned short *)(incoming + 16); + in_len = (unsigned short *)(incoming + 16); do { - pktLen = hdr->bh_caplen; - frameLen = pktLen + 18; + pkt_len = hdr->bh_caplen; + frame_len = pkt_len + 18; - if((pktLen < 0) || (frameLen > ret) || (frameLen < 0)) { + if ((pkt_len < 0) || (frame_len > ret) || (frame_len < 0)) { fret = -9; break; } - *inLen = pktLen; + *in_len = pkt_len; - write(0, inLen, pktLen + 2); - if((frameLen & 0x03) == 0) { + write(0, in_len, pkt_len + 2); + if ((frame_len & 0x03) == 0) { pad = 0; } else { - pad = 4 - (frameLen & 0x03); + pad = 4 - (frame_len & 0x03); } - ret -= (frameLen + pad); - hdr = (struct bpf_hdr *)((unsigned char *)hdr + frameLen + pad); - inLen = (unsigned short *)((unsigned char *)hdr + 16); + ret -= (frame_len + pad); + hdr = (struct bpf_hdr *)((unsigned char *)hdr + frame_len + pad); + in_len = (unsigned short *)((unsigned char *)hdr + 16); } while (ret > 0); - if(fret != 0) { + if (fret != 0) { break; } } @@ -208,7 +208,7 @@ static int mainLoop(int sd) { return fret; } -static int retreiveAuthInfo(void) { +static int retreive_auth_info(void) { AuthorizationRef aRef; OSStatus status; AuthorizationRights myRights; @@ -219,12 +219,12 @@ static int retreiveAuthInfo(void) { int i; status = AuthorizationCopyPrivilegedReference(&aRef, kAuthorizationFlagDefaults); - if(status != errAuthorizationSuccess) { + if (status != errAuthorizationSuccess) { return -1; } status = AuthorizationCopyInfo(aRef, NULL, &mySet); - if(status != errAuthorizationSuccess) { + if (status != errAuthorizationSuccess) { AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); return -1; } @@ -240,7 +240,7 @@ static int retreiveAuthInfo(void) { status = AuthorizationCopyRights(aRef, &myRights, NULL, kAuthorizationFlagExtendRights, &newRights); - if(status != errAuthorizationSuccess) { + if (status != errAuthorizationSuccess) { AuthorizationFreeItemSet(mySet); AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); return -2; @@ -253,18 +253,18 @@ static int retreiveAuthInfo(void) { return 0; } -static int openBpf(char *ifname) { +static int open_bpf(char *ifname) { u_int blen = 0; struct ifreq ifreq; u_int arg; int sd = open("/dev/bpf2", O_RDWR); - if(sd < 0) { + if (sd < 0) { return -1; } - if(ioctl(sd, BIOCGBLEN, &blen) < 0) { + if (ioctl(sd, BIOCGBLEN, &blen) < 0) { close(sd); return -2; } @@ -273,25 +273,25 @@ static int openBpf(char *ifname) { strncpy(ifreq.ifr_name, ifname, IFNAMSIZ); arg = 0; - if(ioctl(sd, BIOCSETIF, &ifreq) < 0) { + if (ioctl(sd, BIOCSETIF, &ifreq) < 0) { close(sd); return -3; } arg = 0; - if(ioctl(sd, BIOCSSEESENT, &arg) < 0) { + if (ioctl(sd, BIOCSSEESENT, &arg) < 0) { close(sd); return -4; } arg = 1; - if(ioctl(sd, BIOCPROMISC, &arg) < 0) { + if (ioctl(sd, BIOCPROMISC, &arg) < 0) { close(sd); return -5; } arg = 1; - if(ioctl(sd, BIOCIMMEDIATE, &arg) < 0) { + if (ioctl(sd, BIOCIMMEDIATE, &arg) < 0) { close(sd); return -6; } diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m index 925e50fc6..261f30541 100644 --- a/BasiliskII/src/MacOSX/runtool.m +++ b/BasiliskII/src/MacOSX/runtool.m @@ -40,58 +40,57 @@ #include -FILE * runTool(const char *ifName); +FILE * run_tool(const char *ifName); -FILE * runTool(const char *ifName) { - OSStatus authStatus; +FILE * run_tool(const char *ifName) { + OSStatus auth_status; FILE *fp; char *args[] = {"etherslavetool", NULL, NULL}; int ret; const char *path; + AuthorizationFlags auth_flags; + AuthorizationRef auth_ref; + AuthorizationItem auth_items[1]; + AuthorizationRights auth_rights; path = [[[NSBundle mainBundle] pathForResource:@"etherslavetool" ofType: nil] UTF8String]; - if(path == NULL) { + if (path == NULL) { return NULL; } - AuthorizationFlags authFlags; - AuthorizationRef authRef; - AuthorizationItem authItems[1]; - AuthorizationRights authRights; - args[1] = (char *)ifName; - authFlags = kAuthorizationFlagExtendRights | + auth_flags = kAuthorizationFlagExtendRights | kAuthorizationFlagInteractionAllowed | kAuthorizationFlagPreAuthorize; - authItems[0].name = "system.privilege.admin"; - authItems[0].valueLength = 0; - authItems[0].value = NULL; - authItems[0].flags = 0; + auth_items[0].name = "system.privilege.admin"; + auth_items[0].valueLength = 0; + auth_items[0].value = NULL; + auth_items[0].flags = 0; - authRights.count = sizeof (authItems) / sizeof (authItems[0]); - authRights.items = authItems; + auth_rights.count = sizeof (auth_items) / sizeof (auth_items[0]); + auth_rights.items = auth_items; - authStatus = AuthorizationCreate(&authRights, - kAuthorizationEmptyEnvironment, - authFlags, - &authRef); + auth_status = AuthorizationCreate(&auth_rights, + kAuthorizationEmptyEnvironment, + auth_flags, + &auth_ref); - if(authStatus != errAuthorizationSuccess) { + if (auth_status != errAuthorizationSuccess) { fprintf(stderr, "%s: AuthorizationCreate() failed.\n", __func__); return NULL; } - authStatus = AuthorizationExecuteWithPrivileges(authRef, - path, - kAuthorizationFlagDefaults, - args + 1, - &fp); + auth_status = AuthorizationExecuteWithPrivileges(auth_ref, + path, + kAuthorizationFlagDefaults, + args + 1, + &fp); - if(authStatus != errAuthorizationSuccess) { + if (auth_status != errAuthorizationSuccess) { fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", __func__); return NULL; } diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index a2c07d2a2..2c030c7bb 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -106,7 +106,7 @@ enum { #ifdef ENABLE_MACOSX_ETHERSLAVE extern "C" { - extern FILE * runTool(const char *ifName); + extern FILE * run_tool(const char *if_name); } #endif @@ -155,9 +155,9 @@ static void slirp_add_redirs(); static int slirp_add_redir(const char *redir_str); #ifdef ENABLE_MACOSX_ETHERSLAVE -static int getmacaddress(const char* dev, unsigned char *addr); -static bool openEtherSlave(const char *ifName); -static int readpacket(void); +static int get_mac_address(const char* dev, unsigned char *addr); +static bool open_ether_slave(const char *if_name); +static int read_packet(void); #endif /* @@ -260,7 +260,7 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); #ifdef ENABLE_MACOSX_ETHERSLAVE - const char *slaveDev = PrefsFindString("etherslavedev"); + const char *slave_dev = PrefsFindString("etherslavedev"); #endif if (name == NULL) return false; @@ -333,11 +333,11 @@ bool ether_init(void) break; #ifdef ENABLE_MACOSX_ETHERSLAVE case NET_IF_ETHERSLAVE: - if(slaveDev == NULL) { + if (slave_dev == NULL) { WarningAlert("etherslavedev not defined in preferences."); return false; } - return openEtherSlave(slaveDev); + return open_ether_slave(slave_dev); #endif } if (net_if_type != NET_IF_SLIRP) { @@ -792,14 +792,14 @@ static int16 ether_do_write(uint32 arg) #endif #ifdef ENABLE_MACOSX_ETHERSLAVE if (net_if_type == NET_IF_ETHERSLAVE) { - unsigned short pktlen; + unsigned short pkt_len; - pktlen = len; - if(write(fd, &pktlen, 2) < 2) { + pkt_len = len; + if (write(fd, &pkt_len, 2) < 2) { return excessCollsns; } - if(write(fd, packet, len) < len) { + if (write(fd, packet, len) < len) { return excessCollsns; } return noErr; @@ -940,7 +940,7 @@ static void *receive_func(void *arg) #ifdef ENABLE_MACOSX_ETHERSLAVE if (net_if_type == NET_IF_ETHERSLAVE) { - if(readpacket() < 1) { + if (read_packet() < 1) { break; } } @@ -987,12 +987,12 @@ void ether_do_interrupt(void) #endif #ifdef ENABLE_MACOSX_ETHERSLAVE if (net_if_type == NET_IF_ETHERSLAVE) { - unsigned short *pktlen; + unsigned short *pkt_len; uint32 p = packet; - pktlen = (unsigned short *)packet_buffer; - length = *pktlen; - memcpy(Mac2HostAddr(packet), pktlen + 1, length); + pkt_len = (unsigned short *)packet_buffer; + length = *pkt_len; + memcpy(Mac2HostAddr(packet), pkt_len + 1, length); ether_dispatch_packet(p, length); break; } else @@ -1124,22 +1124,22 @@ static int slirp_add_redir(const char *redir_str) } #ifdef ENABLE_MACOSX_ETHERSLAVE -static int getmacaddress(const char* dev, unsigned char *addr) +static int get_mac_address(const char* dev, unsigned char *addr) { struct ifaddrs *ifaddrs, *next; int ret = -1; struct sockaddr_dl *sa; - if(getifaddrs(&ifaddrs) != 0) { + if (getifaddrs(&ifaddrs) != 0) { perror("getifaddrs"); return -1; } next = ifaddrs; - while(next != NULL) { - switch(next->ifa_addr->sa_family) { + while (next != NULL) { + switch (next->ifa_addr->sa_family) { case AF_LINK: - if(!strcmp(dev, next->ifa_name)) { + if (!strcmp(dev, next->ifa_name)) { sa = (struct sockaddr_dl *)next->ifa_addr; memcpy(addr, LLADDR(sa), 6); ret = 0; @@ -1156,23 +1156,21 @@ static int getmacaddress(const char* dev, unsigned char *addr) return ret; } -static bool openEtherSlave(const char *ifName) +static bool open_ether_slave(const char *if_name) { FILE *fp; char str[64]; - str[sizeof(str)-1] = '\0'; - - if(getmacaddress(ifName, ether_addr) != 0) { - snprintf(str, sizeof(str)-1, "Unable to find interface %s.", - ifName); + if (get_mac_address(if_name, ether_addr) != 0) { + snprintf(str, sizeof(str), "Unable to find interface %s.", + if_name); WarningAlert(str); return false; } - fp = runTool(ifName); - if(fp == NULL) { - snprintf(str, sizeof(str)-1, "Unable to run ether slave helper tool."); + fp = run_tool(if_name); + if (fp == NULL) { + snprintf(str, sizeof(str), "Unable to run ether slave helper tool."); WarningAlert(str); return false; } @@ -1180,7 +1178,7 @@ static bool openEtherSlave(const char *ifName) fd = dup(fileno(fp)); fclose(fp); - if(start_thread() == false) { + if (start_thread() == false) { close(fd); fd = -1; return false; @@ -1189,37 +1187,37 @@ static bool openEtherSlave(const char *ifName) return true; } -static int readpacket() +static int read_packet() { int index; - unsigned short *pktLen; + unsigned short *pkt_len; int ret = -1; - pktLen = (unsigned short *)packet_buffer; + pkt_len = (unsigned short *)packet_buffer; index = 0; - while(1) { - if(index < 2) { + while (1) { + if (index < 2) { ret = read(fd, packet_buffer + index, 2 - index); } else { - ret = read(fd, packet_buffer + index, *pktLen - index + 2); + ret = read(fd, packet_buffer + index, *pkt_len - index + 2); } - if(ret < 1) { + if (ret < 1) { fprintf(stderr, "%s: read() returned %d.\n", __func__, ret); break; } index += ret; - if(index > 1) { - if(*pktLen > (sizeof(packet_buffer) + 2)) { - fprintf(stderr, "%s: pktLen (%d) too large.\n", __func__, *pktLen); + if (index > 1) { + if (*pkt_len > (sizeof(packet_buffer) + 2)) { + fprintf(stderr, "%s: pkt_len (%d) too large.\n", __func__, *pkt_len); break; } - if(index == (*pktLen + 2)) { - ret = *pktLen; + if (index == (*pkt_len + 2)) { + ret = *pkt_len; break; } } From f1c78e659c6aad962536a43f18c4260f38698f21 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 4 May 2013 20:37:29 -0400 Subject: [PATCH 006/534] More coding style updates. --- BasiliskII/src/MacOSX/etherslavetool.c | 12 ++++++++---- BasiliskII/src/MacOSX/runtool.m | 3 ++- 2 files changed, 10 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index 766c79683..576427741 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -47,7 +47,8 @@ static int open_bpf(char *ifname); static int retreive_auth_info(void); static int main_loop(int sd); -int main(int argc, char **argv) { +int main(int argc, char **argv) +{ char *if_name; int ret; int sd; @@ -83,7 +84,8 @@ int main(int argc, char **argv) { return 0; } -static int main_loop(int sd) { +static int main_loop(int sd) +{ fd_set readSet; char *outgoing, *incoming; unsigned short *out_len; @@ -208,7 +210,8 @@ static int main_loop(int sd) { return fret; } -static int retreive_auth_info(void) { +static int retreive_auth_info(void) +{ AuthorizationRef aRef; OSStatus status; AuthorizationRights myRights; @@ -253,7 +256,8 @@ static int retreive_auth_info(void) { return 0; } -static int open_bpf(char *ifname) { +static int open_bpf(char *ifname) +{ u_int blen = 0; struct ifreq ifreq; u_int arg; diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.m index 261f30541..b866599c4 100644 --- a/BasiliskII/src/MacOSX/runtool.m +++ b/BasiliskII/src/MacOSX/runtool.m @@ -42,7 +42,8 @@ FILE * run_tool(const char *ifName); -FILE * run_tool(const char *ifName) { +FILE * run_tool(const char *ifName) +{ OSStatus auth_status; FILE *fp; char *args[] = {"etherslavetool", NULL, NULL}; From 57b9ad0d95835299da6914943b3a93438b122c0a Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sun, 5 May 2013 14:11:09 -0400 Subject: [PATCH 007/534] Remove 15 bit video for OS X. This mode doesn't seem to work. This also fixes 2-bit, 4-bit, and 8-bit modes. --- BasiliskII/src/Unix/video_x.cpp | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index 6f8ef67f7..b02e28546 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -1637,6 +1637,12 @@ bool VideoInit(bool classic) return false; } std::sort(avail_depths, avail_depths + num_depths); + +#ifdef __APPLE__ + // 15-bit color does not seem to work on OS X + int *last = std::remove(avail_depths, avail_depths + num_depths, 15); + num_depths = ( (size_t)last - (size_t)avail_depths ) / sizeof(int); +#endif #ifdef ENABLE_FBDEV_DGA // Frame buffer name From e91a03f40f02474bc03d752f2ab3f24be3c0b117 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sun, 5 May 2013 14:20:33 -0400 Subject: [PATCH 008/534] Added clean rule for etherslavetool. --- BasiliskII/src/Unix/Makefile.in | 1 + 1 file changed, 1 insertion(+) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 57a1c9d9f..0094fae79 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -175,6 +175,7 @@ mostlyclean: clean: mostlyclean rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h + rm -rf etherslavetool.dSYM distclean: clean rm -rf $(OBJ_DIR) From 241162f261e1d68d698cb39e61915d59cdfc24c9 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sun, 5 May 2013 16:20:37 -0400 Subject: [PATCH 009/534] Fixed code that removed 15-bit color mode. 15-bit color mode is now removed on all platforms. The removal of 15-bit color mode now happens before the sort. Updated a variable name. Changed list length calculation to use C++'s clever pointer subtraction. --- BasiliskII/src/Unix/video_x.cpp | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index b02e28546..6f8be92aa 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -1636,13 +1636,12 @@ bool VideoInit(bool classic) ErrorAlert(STR_UNSUPP_DEPTH_ERR); return false; } - std::sort(avail_depths, avail_depths + num_depths); -#ifdef __APPLE__ // 15-bit color does not seem to work on OS X - int *last = std::remove(avail_depths, avail_depths + num_depths, 15); - num_depths = ( (size_t)last - (size_t)avail_depths ) / sizeof(int); -#endif + int *list_end = std::remove(avail_depths, avail_depths + num_depths, + 15); + num_depths = list_end - avail_depths; + std::sort(avail_depths, avail_depths + num_depths); #ifdef ENABLE_FBDEV_DGA // Frame buffer name From c939be2d2d8a8b34133d55f54d80f2e5a43a7e18 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 25 May 2013 10:48:15 -0400 Subject: [PATCH 010/534] Removed objective-c from runtool source so it can be built with newer (not from Apple) versions of gcc. --- .../src/MacOSX/{runtool.m => runtool.c} | 52 +++++++++++++++---- BasiliskII/src/Unix/configure.ac | 2 +- BasiliskII/src/Unix/ether_unix.cpp | 4 +- 3 files changed, 44 insertions(+), 14 deletions(-) rename BasiliskII/src/MacOSX/{runtool.m => runtool.c} (68%) diff --git a/BasiliskII/src/MacOSX/runtool.m b/BasiliskII/src/MacOSX/runtool.c similarity index 68% rename from BasiliskII/src/MacOSX/runtool.m rename to BasiliskII/src/MacOSX/runtool.c index b866599c4..691a27653 100644 --- a/BasiliskII/src/MacOSX/runtool.m +++ b/BasiliskII/src/MacOSX/runtool.c @@ -40,28 +40,56 @@ #include -FILE * run_tool(const char *ifName); +FILE * run_tool(const char *if_name, const char *tool_name); -FILE * run_tool(const char *ifName) +FILE * run_tool(const char *if_name, const char *tool_name) { OSStatus auth_status; - FILE *fp; + FILE *fp = NULL; char *args[] = {"etherslavetool", NULL, NULL}; int ret; - const char *path; + char path_buffer[256]; AuthorizationFlags auth_flags; AuthorizationRef auth_ref; AuthorizationItem auth_items[1]; AuthorizationRights auth_rights; + CFBundleRef bundle_ref; + CFURLRef url_ref; + CFStringRef path_str; + CFStringRef tool_name_str; - path = [[[NSBundle mainBundle] - pathForResource:@"etherslavetool" ofType: nil] UTF8String]; + bundle_ref = CFBundleGetMainBundle(); + if(bundle_ref == NULL) { + return NULL; + } + + tool_name_str = CFStringCreateWithCString(NULL, tool_name, + kCFStringEncodingUTF8); + + url_ref = CFBundleCopyResourceURL(bundle_ref, tool_name_str, + NULL, NULL); + + if(url_ref == NULL) { + return NULL; + } + + path_str = CFURLCopyFileSystemPath(url_ref, kCFURLPOSIXPathStyle); + CFRelease(url_ref); + + if(path_str == NULL) { + return NULL; + } - if (path == NULL) { + CFIndex index = CFStringGetLength(path_str); + if(!CFStringGetCString(path_str, path_buffer, sizeof(path_buffer), + kCFStringEncodingUTF8)) { + CFRelease(path_str); return NULL; } + CFRelease(path_str); - args[1] = (char *)ifName; + args[0] = (char *)tool_name; + args[1] = (char *)if_name; auth_flags = kAuthorizationFlagExtendRights | kAuthorizationFlagInteractionAllowed | @@ -81,18 +109,20 @@ &auth_ref); if (auth_status != errAuthorizationSuccess) { - fprintf(stderr, "%s: AuthorizationCreate() failed.\n", __func__); + fprintf(stderr, "%s: AuthorizationCreate() failed.\n", + __func__); return NULL; } auth_status = AuthorizationExecuteWithPrivileges(auth_ref, - path, + path_buffer, kAuthorizationFlagDefaults, args + 1, &fp); if (auth_status != errAuthorizationSuccess) { - fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", __func__); + fprintf(stderr, "%s: AuthorizationExecWithPrivileges() failed.\n", + __func__); return NULL; } diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index e06086356..e4d862d5a 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -736,7 +736,7 @@ if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then fi if [[ "x$WANT_MACOSX_ETHERSLAVE" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.m" + EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.c" LIBS="$LIBS -framework Security" AC_DEFINE(ENABLE_MACOSX_ETHERSLAVE, 1, [Define if supporting "etherslave" network device.]) fi diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 2c030c7bb..55c194262 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -106,7 +106,7 @@ enum { #ifdef ENABLE_MACOSX_ETHERSLAVE extern "C" { - extern FILE * run_tool(const char *if_name); + extern FILE * run_tool(const char *if_name, const char *tool_name); } #endif @@ -1168,7 +1168,7 @@ static bool open_ether_slave(const char *if_name) return false; } - fp = run_tool(if_name); + fp = run_tool(if_name, "etherslavetool"); if (fp == NULL) { snprintf(str, sizeof(str), "Unable to run ether slave helper tool."); WarningAlert(str); From 19b53082a3f0b30bebe9c7c55e339f516a838b1b Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 25 May 2013 22:01:21 -0400 Subject: [PATCH 011/534] Added tap support to etherslave tool. --- BasiliskII/src/MacOSX/etherslavetool.c | 231 +++++++++++++++++++++---- BasiliskII/src/MacOSX/runtool.c | 8 +- BasiliskII/src/Unix/ether_unix.cpp | 12 +- 3 files changed, 213 insertions(+), 38 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index 576427741..1788fb8b3 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -43,15 +43,27 @@ #include +#define STR_MAX 256 +#define MAX_ARGV 10 + static int open_bpf(char *ifname); +static int open_tap(char *ifname); static int retreive_auth_info(void); -static int main_loop(int sd); +static int main_loop(int sd, int use_bpf); +static int run_cmd(const char *cmd); +static void handler(int signum); +static int install_signal_handlers(); +static void do_exit(); + +static int removeBridge = 0; int main(int argc, char **argv) { char *if_name; - int ret; + int ret = 255; int sd; + int tapNum; + int use_bpf; if (argc != 2) { return 255; @@ -59,32 +71,41 @@ int main(int argc, char **argv) if_name = argv[1]; - ret = retreive_auth_info(); - if (ret != 0) { - return 254; - } - - fflush(stdout); - - sd = open_bpf(if_name); - if (sd < 0) { - return 253; - } - - fflush(stdout); - - ret = main_loop(sd); - - close(sd); - - if (ret < 0) { - return 252; - } - - return 0; + do { + ret = retreive_auth_info(); + if (ret != 0) { + ret = 254; + break; + } + + if(sscanf(if_name, "tap%d", &tapNum) == 1) { + sd = open_tap(if_name); + use_bpf = 0; + } else { + sd = open_bpf(if_name); + use_bpf = 0; + } + + if (sd < 0) { + ret = 253; + break; + } + + if(install_signal_handlers() != 0) { + ret = 252; + break; + } + + ret = main_loop(sd, use_bpf); + close(sd); + } while(0); + + do_exit(); + + return ret; } -static int main_loop(int sd) +static int main_loop(int sd, int use_bpf) { fd_set readSet; char *outgoing, *incoming; @@ -98,10 +119,15 @@ static int main_loop(int sd) int pkt_len; int frame_len; int pad; + char c = 0; - if (ioctl(sd, BIOCGBLEN, &blen) < 0) { - return -1; - } + if(use_bpf) { + if (ioctl(sd, BIOCGBLEN, &blen) < 0) { + return -1; + } + } else { + blen = 2048; + } incoming = malloc(blen); if (incoming == NULL) { @@ -119,6 +145,9 @@ static int main_loop(int sd) out_len = (unsigned short *)outgoing; + /* Let our parent know we are ready for business. */ + write(0, &c, 1); + while (1) { int i; FD_ZERO(&readSet); @@ -164,7 +193,7 @@ static int main_loop(int sd) } - if (FD_ISSET(sd, &readSet)) { + if (use_bpf && FD_ISSET(sd, &readSet)) { int i; ret = read(sd, incoming, blen); @@ -186,7 +215,11 @@ static int main_loop(int sd) } *in_len = pkt_len; - write(0, in_len, pkt_len + 2); + if(write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + fret = -10; + break; + } + if ((frame_len & 0x03) == 0) { pad = 0; } else { @@ -202,6 +235,24 @@ static int main_loop(int sd) break; } } + + if (!use_bpf && FD_ISSET(sd, &readSet)) { + in_len = (unsigned short *)incoming; + + pkt_len = read(sd, incoming+2, blen-2); + if (pkt_len < 14) { + fret = -8; + break; + } + + *in_len = ret; + if(write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + fret = -10; + break; + } + + } + } free(incoming); @@ -255,6 +306,44 @@ static int retreive_auth_info(void) return 0; } + +static int open_tap(char *ifname) +{ + char str[STR_MAX] = {0}; + int sd; + + snprintf(str, STR_MAX, "/dev/%s", ifname); + + sd = open(str, O_RDWR); + if(sd < 0) { + return -1; + } + + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", ifname); + if(run_cmd(str) != 0) { + close(sd); + return -1; + } + + snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 create"); + if(run_cmd(str) == 0) { + removeBridge = 1; + } + + snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 addm %s", ifname); + if(run_cmd(str) != 0) { + close(sd); + return -1; + } + + snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 up"); + if(run_cmd(str) != 0) { + close(sd); + return -1; + } + + return sd; +} static int open_bpf(char *ifname) { @@ -302,3 +391,83 @@ static int open_bpf(char *ifname) return sd; } + +static int run_cmd(const char *cmd) { + char cmd_buffer[STR_MAX] = {0}; + char *argv[MAX_ARGV + 1] = {0}; + int i; + pid_t pid, waitpid; + int status = 0; + + /* Collect arguments */ + strncpy(cmd_buffer, cmd, STR_MAX-1); + + argv[0] = strtok(cmd_buffer, " "); + for (i=1; i Date: Sun, 26 May 2013 20:58:03 -0400 Subject: [PATCH 012/534] More work on new tap interface. --- BasiliskII/src/MacOSX/etherslavetool.c | 193 +++++++++++++++---------- BasiliskII/src/Unix/ether_unix.cpp | 40 +++-- 2 files changed, 148 insertions(+), 85 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index 1788fb8b3..e60c6ce97 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -74,16 +74,16 @@ int main(int argc, char **argv) do { ret = retreive_auth_info(); if (ret != 0) { - ret = 254; - break; + ret = 254; + break; } - if(sscanf(if_name, "tap%d", &tapNum) == 1) { + if (strncmp(if_name, "tap", 3) == 0) { sd = open_tap(if_name); use_bpf = 0; } else { sd = open_bpf(if_name); - use_bpf = 0; + use_bpf = 1; } if (sd < 0) { @@ -91,14 +91,14 @@ int main(int argc, char **argv) break; } - if(install_signal_handlers() != 0) { + if (install_signal_handlers() != 0) { ret = 252; break; } ret = main_loop(sd, use_bpf); close(sd); - } while(0); + } while (0); do_exit(); @@ -121,7 +121,7 @@ static int main_loop(int sd, int use_bpf) int pad; char c = 0; - if(use_bpf) { + if (use_bpf) { if (ioctl(sd, BIOCGBLEN, &blen) < 0) { return -1; } @@ -215,7 +215,7 @@ static int main_loop(int sd, int use_bpf) } *in_len = pkt_len; - if(write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + if (write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { fret = -10; break; } @@ -245,8 +245,8 @@ static int main_loop(int sd, int use_bpf) break; } - *in_len = ret; - if(write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + *in_len = pkt_len; + if (write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { fret = -10; break; } @@ -310,37 +310,80 @@ static int retreive_auth_info(void) static int open_tap(char *ifname) { char str[STR_MAX] = {0}; + char ifstr[STR_MAX] = {0}; + char *interface; + char *address = NULL; + char *netmask = NULL; + char *bridge = NULL; + char *bridged_if = NULL; int sd; - snprintf(str, STR_MAX, "/dev/%s", ifname); + snprintf(ifstr, STR_MAX, "%s", ifname); + interface = strtok(ifstr, "/"); + bridge = strtok(NULL, "/"); + if (bridge != NULL) { + bridged_if = strtok(NULL, "/"); + } + interface = strtok(ifstr, ":"); + + address = strtok(NULL, ":"); + + if (address != NULL) { + netmask = strtok(NULL, ":"); + } + + snprintf(str, STR_MAX, "/dev/%s", interface); sd = open(str, O_RDWR); - if(sd < 0) { + if (sd < 0) { return -1; } - snprintf(str, STR_MAX, "/sbin/ifconfig %s up", ifname); - if(run_cmd(str) != 0) { + if (address == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", interface); + } else if (netmask == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s", + interface, address); + } else { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s netmask %s", + interface, address, netmask); + } + + if (run_cmd(str) != 0) { close(sd); return -1; } - snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 create"); - if(run_cmd(str) == 0) { - removeBridge = 1; - } + if (bridge != NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); + if (run_cmd(str) == 0) { + removeBridge = 1; + } - snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 addm %s", ifname); - if(run_cmd(str) != 0) { - close(sd); - return -1; - } + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); + if (run_cmd(str) != 0) { + close(sd); + return -1; + } - snprintf(str, STR_MAX, "/sbin/ifconfig bridge0 up"); - if(run_cmd(str) != 0) { - close(sd); - return -1; - } + if (bridged_if != NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, bridged_if); + if (run_cmd(str) != 0) { + close(sd); + return -1; + } + } + + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, interface); + if (run_cmd(str) != 0) { + close(sd); + return -1; + } + + + } return sd; } @@ -393,49 +436,49 @@ static int open_bpf(char *ifname) } static int run_cmd(const char *cmd) { - char cmd_buffer[STR_MAX] = {0}; - char *argv[MAX_ARGV + 1] = {0}; - int i; - pid_t pid, waitpid; - int status = 0; - - /* Collect arguments */ - strncpy(cmd_buffer, cmd, STR_MAX-1); - - argv[0] = strtok(cmd_buffer, " "); - for (i=1; i #include #include +#include #if defined(__FreeBSD__) || defined(sgi) || (defined(__APPLE__) && defined(__MACH__)) #include @@ -156,7 +157,7 @@ static int slirp_add_redir(const char *redir_str); #ifdef ENABLE_MACOSX_ETHERSLAVE static int get_mac_address(const char* dev, unsigned char *addr); -static bool open_ether_slave(const char *if_name); +static bool open_ether_slave(const std::string &if_name); static int read_packet(void); #endif @@ -260,7 +261,7 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); #ifdef ENABLE_MACOSX_ETHERSLAVE - const char *slave_dev = PrefsFindString("etherslavedev"); + std::string slave_dev; #endif if (name == NULL) return false; @@ -278,7 +279,7 @@ bool ether_init(void) net_if_type = NET_IF_SLIRP; #endif #ifdef ENABLE_MACOSX_ETHERSLAVE - else if (strcmp(name, "etherslave") == 0) + else if (strncmp(name, "etherslave", 10) == 0) net_if_type = NET_IF_ETHERSLAVE; #endif else @@ -332,12 +333,23 @@ bool ether_init(void) strcpy(dev_name, "/dev/sheep_net"); break; #ifdef ENABLE_MACOSX_ETHERSLAVE - case NET_IF_ETHERSLAVE: - if (slave_dev == NULL) { - WarningAlert("etherslavedev not defined in preferences."); + case NET_IF_ETHERSLAVE: { + std::string device(name); + size_t pos; + + pos = device.find('/'); + if(pos != device.npos) { + slave_dev = device.substr(pos + 1); + } + + if(slave_dev.size() == 0) { + WarningAlert("No network device specified."); return false; } + return open_ether_slave(slave_dev); + } + #endif } if (net_if_type != NET_IF_SLIRP) { @@ -1156,21 +1168,29 @@ static int get_mac_address(const char* dev, unsigned char *addr) return ret; } -static bool open_ether_slave(const char *if_name) +static bool open_ether_slave(const std::string &if_name) { FILE *fp; char str[64]; + std::string dev_name; + size_t pos; - fp = run_tool(if_name, "etherslavetool"); + fp = run_tool(if_name.c_str(), "etherslavetool"); if (fp == NULL) { snprintf(str, sizeof(str), "Unable to run ether slave helper tool."); WarningAlert(str); return false; } - if (get_mac_address(if_name, ether_addr) != 0) { + pos = if_name.find('/'); + dev_name = if_name; + if(pos != if_name.npos) { + dev_name.erase(pos); + } + + if (get_mac_address(dev_name.c_str(), ether_addr) != 0) { snprintf(str, sizeof(str), "Unable to find interface %s.", - if_name); + dev_name.c_str()); WarningAlert(str); return false; } From 5aa782acc063597252b17d70b91e7005a9cee16c Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Mon, 27 May 2013 13:55:38 -0400 Subject: [PATCH 013/534] Changed ethernet address when using tap interface. --- BasiliskII/src/MacOSX/etherslavetool.c | 4 ++-- BasiliskII/src/Unix/ether_unix.cpp | 21 ++++++++++++++++----- 2 files changed, 18 insertions(+), 7 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index e60c6ce97..baa5b46fe 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -126,7 +126,7 @@ static int main_loop(int sd, int use_bpf) return -1; } } else { - blen = 2048; + blen = 4096; } incoming = malloc(blen); @@ -239,7 +239,7 @@ static int main_loop(int sd, int use_bpf) if (!use_bpf && FD_ISSET(sd, &readSet)) { in_len = (unsigned short *)incoming; - pkt_len = read(sd, incoming+2, blen-2); + pkt_len = read(sd, in_len + 1, blen-2); if (pkt_len < 14) { fret = -8; break; diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 947ea0806..8e0053089 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -1188,11 +1188,22 @@ static bool open_ether_slave(const std::string &if_name) dev_name.erase(pos); } - if (get_mac_address(dev_name.c_str(), ether_addr) != 0) { - snprintf(str, sizeof(str), "Unable to find interface %s.", - dev_name.c_str()); - WarningAlert(str); - return false; + if(strncmp(if_name.c_str(), "tap", 3) != 0) { + if (get_mac_address(dev_name.c_str(), ether_addr) != 0) { + snprintf(str, sizeof(str), "Unable to find interface %s.", + dev_name.c_str()); + WarningAlert(str); + return false; + } + } else { + /* There is something special about this address. */ + pid_t p = getpid(); + ether_addr[0] = 0xfe; + ether_addr[1] = 0xfd; + ether_addr[2] = p >> 24; + ether_addr[3] = p >> 16; + ether_addr[4] = p >> 8; + ether_addr[5] = p; } fd = dup(fileno(fp)); From 8f863effbcf54ebfab1f8104621d1cda7fb6f110 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Tue, 28 May 2013 19:33:12 -0400 Subject: [PATCH 014/534] Added error messages. --- BasiliskII/src/MacOSX/etherslavetool.c | 52 +++++++++++++++++++++++--- 1 file changed, 46 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index baa5b46fe..b49f17fee 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -55,7 +55,8 @@ static void handler(int signum); static int install_signal_handlers(); static void do_exit(); -static int removeBridge = 0; +static int remove_bridge = 0; +static const char *exec_name = "etherslavetool"; int main(int argc, char **argv) { @@ -68,12 +69,14 @@ int main(int argc, char **argv) if (argc != 2) { return 255; } - + if_name = argv[1]; do { ret = retreive_auth_info(); if (ret != 0) { + fprintf(stderr, "%s: authorization failed.\n", + exec_name); ret = 254; break; } @@ -87,11 +90,16 @@ int main(int argc, char **argv) } if (sd < 0) { + fprintf(stderr, "%s: open device failed.\n", + exec_name); ret = 253; break; } if (install_signal_handlers() != 0) { + fprintf(stderr, + "%s: failed to install signal handers.\n", + exec_name); ret = 252; break; } @@ -123,6 +131,9 @@ static int main_loop(int sd, int use_bpf) if (use_bpf) { if (ioctl(sd, BIOCGBLEN, &blen) < 0) { + fprintf(stderr, + "%s: ioctl() failed.\n", + exec_name); return -1; } } else { @@ -131,12 +142,18 @@ static int main_loop(int sd, int use_bpf) incoming = malloc(blen); if (incoming == NULL) { + fprintf(stderr, + "%s: malloc() failed.\n", + exec_name); return -2; } outgoing = malloc(blen); if (outgoing == NULL) { free(outgoing); + fprintf(stderr, + "%s: malloc() failed.\n", + exec_name); return -3; } @@ -156,6 +173,9 @@ static int main_loop(int sd, int use_bpf) ret = select(sd + 1, &readSet, NULL, NULL, NULL); if (ret < 0) { + fprintf(stderr, + "%s: select() failed.\n", + exec_name); fret = -4; break; } @@ -168,14 +188,17 @@ static int main_loop(int sd, int use_bpf) } if (ret < 1) { + if(ret < 0) { + fprintf(stderr, + "%s: read() failed.\n", + exec_name); + } fret = -5; break; } out_index += ret; if (out_index > 1) { - fflush(stdout); - if ((*out_len + 2) > blen) { fret = -6; break; @@ -184,6 +207,9 @@ static int main_loop(int sd, int use_bpf) if (out_index == (*out_len + 2)) { ret = write(sd, out_len + 1, *out_len); if (ret != *out_len) { + fprintf(stderr, + "%s: write() failed.\n", + exec_name); fret = -7; break; } @@ -198,6 +224,11 @@ static int main_loop(int sd, int use_bpf) ret = read(sd, incoming, blen); if (ret < 1) { + if(ret < 0) { + fprintf(stderr, + "%s: read() failed %d.\n", + exec_name, errno); + } fret = -8; break; } @@ -232,6 +263,9 @@ static int main_loop(int sd, int use_bpf) } while (ret > 0); if (fret != 0) { + fprintf(stderr, + "%s: fret == %d.\n", + exec_name, fret); break; } } @@ -241,12 +275,18 @@ static int main_loop(int sd, int use_bpf) pkt_len = read(sd, in_len + 1, blen-2); if (pkt_len < 14) { + fprintf(stderr, + "%s: read() returned %d.\n", + exec_name, pkt_len); fret = -8; break; } *in_len = pkt_len; if (write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + fprintf(stderr, + "%s: write() failed\n", + exec_name); fret = -10; break; } @@ -357,7 +397,7 @@ static int open_tap(char *ifname) if (bridge != NULL) { snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); if (run_cmd(str) == 0) { - removeBridge = 1; + remove_bridge = 1; } snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); @@ -510,7 +550,7 @@ static int install_signal_handlers() { } static void do_exit() { - if (removeBridge) { + if (remove_bridge) { run_cmd("/sbin/ifconfig bridge0 destroy"); } } From fc8835aa6fad68d86fdcc4a440a3b5cffefdc69a Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 29 May 2013 07:00:44 -0400 Subject: [PATCH 015/534] Added more debug output. No longer add ethernet interface to bridge if bridge already exists. --- BasiliskII/src/MacOSX/etherslavetool.c | 58 ++++++++++++++++++-------- 1 file changed, 40 insertions(+), 18 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherslavetool.c index b49f17fee..251765c64 100644 --- a/BasiliskII/src/MacOSX/etherslavetool.c +++ b/BasiliskII/src/MacOSX/etherslavetool.c @@ -376,6 +376,8 @@ static int open_tap(char *ifname) sd = open(str, O_RDWR); if (sd < 0) { + fprintf(stderr, "%s: Failed to open %s\n", + exec_name, interface); return -1; } @@ -390,39 +392,59 @@ static int open_tap(char *ifname) } if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to configure %s\n", + exec_name, interface); close(sd); return -1; } if (bridge != NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); + /* Check to see if bridge is alread up */ + snprintf(str, STR_MAX, "/sbin/ifconfig %s", bridge); if (run_cmd(str) == 0) { + /* bridge is already up */ + if (bridged_if != NULL) { + fprintf(stderr, "%s: Warning: %s already exists, so %s was not added.\n", + exec_name, bridge, bridged_if); + } + } else { + snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to create %s\n", + exec_name, bridge); + close(sd); + return -1; + } remove_bridge = 1; - } - snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); - if (run_cmd(str) != 0) { - close(sd); - return -1; - } + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to open %s\n", + exec_name, bridge); + close(sd); + return -1; + } - if (bridged_if != NULL) { + if (bridged_if != NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, bridged_if); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to add %s to %s\n", + exec_name, bridged_if, bridge); + close(sd); + return -1; + } + } + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", - bridge, bridged_if); + bridge, interface); if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to add %s to %s\n", + exec_name, interface, bridge); close(sd); return -1; } } - - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", - bridge, interface); - if (run_cmd(str) != 0) { - close(sd); - return -1; - } - - } return sd; From 5db556214c5f2425001536cf9b9b6679472f1e01 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 29 May 2013 19:30:51 -0400 Subject: [PATCH 016/534] Renamed "etherslave" to "etherhelper". --- BasiliskII/src/MacOSX/{etherslavetool.c => etherhelpertool.c} | 0 1 file changed, 0 insertions(+), 0 deletions(-) rename BasiliskII/src/MacOSX/{etherslavetool.c => etherhelpertool.c} (100%) diff --git a/BasiliskII/src/MacOSX/etherslavetool.c b/BasiliskII/src/MacOSX/etherhelpertool.c similarity index 100% rename from BasiliskII/src/MacOSX/etherslavetool.c rename to BasiliskII/src/MacOSX/etherhelpertool.c From 8a021284733f38d1d65eba449c8756294fb0be12 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 29 May 2013 19:42:59 -0400 Subject: [PATCH 017/534] More changes of etherslave to etherhelper. --- BasiliskII/src/MacOSX/etherhelpertool.c | 4 +-- BasiliskII/src/MacOSX/runtool.c | 2 +- BasiliskII/src/Unix/.gitignore | 2 +- BasiliskII/src/Unix/Makefile.in | 8 ++--- BasiliskII/src/Unix/configure.ac | 10 +++--- BasiliskII/src/Unix/ether_unix.cpp | 46 ++++++++++++------------- BasiliskII/src/Unix/prefs_unix.cpp | 3 -- 7 files changed, 36 insertions(+), 39 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherhelpertool.c b/BasiliskII/src/MacOSX/etherhelpertool.c index 251765c64..392f871aa 100644 --- a/BasiliskII/src/MacOSX/etherhelpertool.c +++ b/BasiliskII/src/MacOSX/etherhelpertool.c @@ -1,5 +1,5 @@ /* - * etherslavetool.c - Reads and writes raw ethernet packets usng bpf + * etherhelpertool.c - Reads and writes raw ethernet packets usng bpf * interface. * * Copyright (C) 2010, Daniel Sumorok @@ -56,7 +56,7 @@ static int install_signal_handlers(); static void do_exit(); static int remove_bridge = 0; -static const char *exec_name = "etherslavetool"; +static const char *exec_name = "etherhelpertool"; int main(int argc, char **argv) { diff --git a/BasiliskII/src/MacOSX/runtool.c b/BasiliskII/src/MacOSX/runtool.c index b4bb21f4b..77c38a437 100644 --- a/BasiliskII/src/MacOSX/runtool.c +++ b/BasiliskII/src/MacOSX/runtool.c @@ -46,7 +46,7 @@ FILE * run_tool(const char *if_name, const char *tool_name) { OSStatus auth_status; FILE *fp = NULL; - char *args[] = {"etherslavetool", NULL, NULL}; + char *args[] = {NULL, NULL, NULL}; int ret; char path_buffer[256]; AuthorizationFlags auth_flags; diff --git a/BasiliskII/src/Unix/.gitignore b/BasiliskII/src/Unix/.gitignore index 6d0742222..a9dc119bd 100644 --- a/BasiliskII/src/Unix/.gitignore +++ b/BasiliskII/src/Unix/.gitignore @@ -1,7 +1,7 @@ # Object files obj/* BasiliskII -etherslavetool +etherhelpertool # Autotools generated files Makefile diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 0094fae79..21a0e6da8 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -74,8 +74,8 @@ CXXFLAGS += $(GUI_CFLAGS) LIBS += $(GUI_LIBS) endif -ifeq (@MACOSX_ETHERSLAVE@,yes) -PROGS += etherslavetool +ifeq (@MACOSX_ETHERHELPER@,yes) +PROGS += etherhelpertool endif ## Rules @@ -142,7 +142,7 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns mkdir -p $(GUI_APP_APP)/Contents/Resources ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns -etherslavetool: ../MacOSX/etherslavetool.c +etherhelpertool: ../MacOSX/etherhelpertool.c $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $< -o $@ modules: @@ -175,7 +175,7 @@ mostlyclean: clean: mostlyclean rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h - rm -rf etherslavetool.dSYM + rm -rf etherhelpertool.dSYM distclean: clean rm -rf $(OBJ_DIR) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index e4d862d5a..161a2c506 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -24,8 +24,8 @@ AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [def dnl Mac OS X Sound AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) -dnl Mac OS X etherslave support -AC_ARG_ENABLE(macosx-etherslave, [ --enable-macosx-etherslave enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERSLAVE=$enableval], [WANT_MACOSX_ETHERSLAVE=no]) +dnl Mac OS X etherhelper support +AC_ARG_ENABLE(macosx-etherhelper, [ --enable-macosx-etherhelper enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERHELPER=$enableval], [WANT_MACOSX_ETHERHELPER=no]) dnl Video options. AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) @@ -735,13 +735,13 @@ if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then LIBS="$LIBS -framework AudioToolbox -framework AudioUnit -framework CoreAudio" fi -if [[ "x$WANT_MACOSX_ETHERSLAVE" = "xyes" ]]; then +if [[ "x$WANT_MACOSX_ETHERHELPER" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.c" LIBS="$LIBS -framework Security" - AC_DEFINE(ENABLE_MACOSX_ETHERSLAVE, 1, [Define if supporting "etherslave" network device.]) + AC_DEFINE(ENABLE_MACOSX_ETHERHELPER, 1, [Define if supporting "etherhelper" network device.]) fi -AC_SUBST(MACOSX_ETHERSLAVE, $WANT_MACOSX_ETHERSLAVE) +AC_SUBST(MACOSX_ETHERHELPER, $WANT_MACOSX_ETHERHELPER) dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 8e0053089..3c588dd19 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -42,7 +42,7 @@ #include #include -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER #include #include #endif @@ -101,11 +101,11 @@ enum { NET_IF_ETHERTAP, NET_IF_TUNTAP, NET_IF_SLIRP, - NET_IF_ETHERSLAVE + NET_IF_ETHERHELPER }; -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER extern "C" { extern FILE * run_tool(const char *if_name, const char *tool_name); } @@ -138,7 +138,7 @@ const bool ether_driver_opened = true; // Flag: is the MacOS driver opened? #endif -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER static uint8 packet_buffer[2048]; #endif @@ -155,9 +155,9 @@ static void ether_do_interrupt(void); static void slirp_add_redirs(); static int slirp_add_redir(const char *redir_str); -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER static int get_mac_address(const char* dev, unsigned char *addr); -static bool open_ether_slave(const std::string &if_name); +static bool open_ether_helper(const std::string &if_name); static int read_packet(void); #endif @@ -260,7 +260,7 @@ bool ether_init(void) // Do nothing if no Ethernet device specified const char *name = PrefsFindString("ether"); -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER std::string slave_dev; #endif if (name == NULL) @@ -278,9 +278,9 @@ bool ether_init(void) else if (strcmp(name, "slirp") == 0) net_if_type = NET_IF_SLIRP; #endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - else if (strncmp(name, "etherslave", 10) == 0) - net_if_type = NET_IF_ETHERSLAVE; +#ifdef ENABLE_MACOSX_ETHERHELPER + else if (strncmp(name, "etherhelper", 10) == 0) + net_if_type = NET_IF_ETHERHELPER; #endif else net_if_type = NET_IF_SHEEPNET; @@ -332,8 +332,8 @@ bool ether_init(void) case NET_IF_SHEEPNET: strcpy(dev_name, "/dev/sheep_net"); break; -#ifdef ENABLE_MACOSX_ETHERSLAVE - case NET_IF_ETHERSLAVE: { +#ifdef ENABLE_MACOSX_ETHERHELPER + case NET_IF_ETHERHELPER: { std::string device(name); size_t pos; @@ -347,7 +347,7 @@ bool ether_init(void) return false; } - return open_ether_slave(slave_dev); + return open_ether_helper(slave_dev); } #endif @@ -802,8 +802,8 @@ static int16 ether_do_write(uint32 arg) return noErr; } else #endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { +#ifdef ENABLE_MACOSX_ETHERHELPER + if (net_if_type == NET_IF_ETHERHELPER) { unsigned short pkt_len; pkt_len = len; @@ -950,8 +950,8 @@ static void *receive_func(void *arg) if (res <= 0) break; -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { +#ifdef ENABLE_MACOSX_ETHERHELPER + if (net_if_type == NET_IF_ETHERHELPER) { if (read_packet() < 1) { break; } @@ -997,8 +997,8 @@ void ether_do_interrupt(void) } else #endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - if (net_if_type == NET_IF_ETHERSLAVE) { +#ifdef ENABLE_MACOSX_ETHERHELPER + if (net_if_type == NET_IF_ETHERHELPER) { unsigned short *pkt_len; uint32 p = packet; @@ -1135,7 +1135,7 @@ static int slirp_add_redir(const char *redir_str) return -1; } -#ifdef ENABLE_MACOSX_ETHERSLAVE +#ifdef ENABLE_MACOSX_ETHERHELPER static int get_mac_address(const char* dev, unsigned char *addr) { struct ifaddrs *ifaddrs, *next; @@ -1168,16 +1168,16 @@ static int get_mac_address(const char* dev, unsigned char *addr) return ret; } -static bool open_ether_slave(const std::string &if_name) +static bool open_ether_helper(const std::string &if_name) { FILE *fp; char str[64]; std::string dev_name; size_t pos; - fp = run_tool(if_name.c_str(), "etherslavetool"); + fp = run_tool(if_name.c_str(), "etherhelpertool"); if (fp == NULL) { - snprintf(str, sizeof(str), "Unable to run ether slave helper tool."); + snprintf(str, sizeof(str), "Unable to run ether helper helper tool."); WarningAlert(str); return false; } diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index 43f70fb69..a92cd6401 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -40,9 +40,6 @@ prefs_desc platform_prefs_items[] = { {"mixer", TYPE_STRING, false, "audio mixer device name"}, #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif -#ifdef ENABLE_MACOSX_ETHERSLAVE - {"etherslavedev", TYPE_STRING, false, "ethernet device for etherslave ethernet"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {NULL, TYPE_END, false, NULL} // End of list From eedf6880dbaaa0b08c05c77d53529fc66756f7f6 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sun, 9 Jun 2013 16:27:24 -0400 Subject: [PATCH 018/534] A bit of apple sound chip support. --- BasiliskII/src/MacOSX/AudioBackEnd.cpp | 46 +++-- BasiliskII/src/MacOSX/AudioBackEnd.h | 2 +- BasiliskII/src/MacOSX/MacOSX_sound_if.cpp | 3 +- BasiliskII/src/MacOSX/MacOSX_sound_if.h | 2 +- BasiliskII/src/Unix/configure.ac | 8 + BasiliskII/src/emul_op.cpp | 22 +++ BasiliskII/src/uae_cpu/basilisk_glue.cpp | 208 ++++++++++++++++++++++ BasiliskII/src/uae_cpu/memory.h | 39 ++++ 8 files changed, 309 insertions(+), 21 deletions(-) diff --git a/BasiliskII/src/MacOSX/AudioBackEnd.cpp b/BasiliskII/src/MacOSX/AudioBackEnd.cpp index 65a8cb5db..f8c31f29c 100644 --- a/BasiliskII/src/MacOSX/AudioBackEnd.cpp +++ b/BasiliskII/src/MacOSX/AudioBackEnd.cpp @@ -191,20 +191,22 @@ OSStatus AudioBackEnd::SetupBuffers() { asbd.mFormatID = 0x6c70636d; // 'lpcm' - asbd.mFormatFlags = (kAudioFormatFlagIsSignedInteger | - kAudioFormatFlagIsBigEndian | - kAudioFormatFlagIsPacked); - asbd.mChannelsPerFrame = mNumChannels; - asbd.mSampleRate = mSampleRate; - - if(asbd.mFormatFlags & kAudioFormatFlagIsSignedInteger) { - asbd.mBitsPerChannel = mBitsPerSample; - } else if(asbd.mFormatFlags & kAudioFormatFlagIsFloat) { - asbd.mBitsPerChannel = 32; + if(mBitsPerSample == 16) { + asbd.mFormatFlags = (kAudioFormatFlagIsSignedInteger | + kAudioFormatFlagIsBigEndian | + kAudioFormatFlagIsPacked); + } else if(mBitsPerSample == 8) { + asbd.mFormatFlags = kAudioFormatFlagIsPacked; } else { - asbd.mBitsPerChannel = 0; + asbd.mFormatFlags = kAudioFormatFlagsAreAllClear; } + asbd.mChannelsPerFrame = mNumChannels; + + asbd.mSampleRate = mSampleRate; + + asbd.mBitsPerChannel = mBitsPerSample; + asbd.mFramesPerPacket = 1; asbd.mBytesPerFrame = (asbd.mBitsPerChannel / 8) * asbd.mChannelsPerFrame; asbd.mBytesPerPacket = asbd.mBytesPerFrame * asbd.mFramesPerPacket; @@ -269,7 +271,6 @@ OSStatus AudioBackEnd::OutputProc(void *inRefCon, This->mAudioBufferReadIndex += bytesToCopy; } - while(This->mFramesProcessed >= This->mBufferSizeFrames) { This->mFramesProcessed -= This->mBufferSizeFrames; if(This->mCallback != NULL) { @@ -289,19 +290,28 @@ UInt32 AudioBackEnd::BufferSizeFrames() { return mBufferSizeFrames; } -int AudioBackEnd::sendAudioBuffer(void *buffer, int numFrames) { +int AudioBackEnd::sendAudioBuffer(const void *buffer, int numFrames) { UInt8 *dstBuffer; int totalBytes; - + int framesWritten; + + if(numFrames > mBufferSizeFrames) { + framesWritten = mBufferSizeFrames; + } else { + framesWritten = numFrames; + } + mAudioBufferWriteIndex += (mAudioBufferSize / 2); mAudioBufferWriteIndex &= (mAudioBufferSize - 1); dstBuffer = &mAudioBuffer[mAudioBufferWriteIndex]; - totalBytes = mBytesPerFrame * numFrames; + totalBytes = mBytesPerFrame * framesWritten; memcpy(dstBuffer, buffer, totalBytes); - dstBuffer += totalBytes; - bzero(dstBuffer, (mBufferSizeFrames * mBytesPerFrame) - totalBytes); + if(framesWritten < mBufferSizeFrames) { + dstBuffer += totalBytes; + bzero(dstBuffer, (mBufferSizeFrames * mBytesPerFrame) - totalBytes); + } - return numFrames; + return framesWritten; } diff --git a/BasiliskII/src/MacOSX/AudioBackEnd.h b/BasiliskII/src/MacOSX/AudioBackEnd.h index 455d42ffa..d17c746e2 100644 --- a/BasiliskII/src/MacOSX/AudioBackEnd.h +++ b/BasiliskII/src/MacOSX/AudioBackEnd.h @@ -51,7 +51,7 @@ class AudioBackEnd { Boolean IsRunning(); void setCallback(playthruCallback func, void *arg); UInt32 BufferSizeFrames(); - int sendAudioBuffer(void *buffer, int numFrames); + int sendAudioBuffer(const void *buffer, int numFrames); private: OSStatus SetupGraph(); OSStatus CallbackSetup(); diff --git a/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp b/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp index bb463c658..86064c537 100644 --- a/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp +++ b/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp @@ -18,6 +18,7 @@ * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ + #include "AudioBackEnd.h" #include "MacOSX_sound_if.h" @@ -77,7 +78,7 @@ unsigned int OSXsoundOutput::bufferSizeFrames() { return 0; } -int OSXsoundOutput::sendAudioBuffer(void *buffer, int numFrames) { +int OSXsoundOutput::sendAudioBuffer(const void *buffer, int numFrames) { if(player != NULL) { return player->sendAudioBuffer(buffer, numFrames); } diff --git a/BasiliskII/src/MacOSX/MacOSX_sound_if.h b/BasiliskII/src/MacOSX/MacOSX_sound_if.h index 5cfdd438a..1e81a38fb 100644 --- a/BasiliskII/src/MacOSX/MacOSX_sound_if.h +++ b/BasiliskII/src/MacOSX/MacOSX_sound_if.h @@ -37,5 +37,5 @@ class OSXsoundOutput { int putBuffer(void *buffer, int numSamples); void setCallback(audioCallback fn); unsigned int bufferSizeFrames(); - int sendAudioBuffer(void *buffer, int numFrames); + int sendAudioBuffer(const void *buffer, int numFrames); }; diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 161a2c506..b5be69881 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -24,6 +24,9 @@ AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [def dnl Mac OS X Sound AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) +dnl Apple Sound Chip Emulation +AC_ARG_ENABLE(asc-emu, [ --enable-asc-emu enable Apple Sound Chip emulation [default=no]], [WANT_ASC_EMU=$enableval], [WANT_ASC_EMU=no]) + dnl Mac OS X etherhelper support AC_ARG_ENABLE(macosx-etherhelper, [ --enable-macosx-etherhelper enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERHELPER=$enableval], [WANT_MACOSX_ETHERHELPER=no]) @@ -741,6 +744,11 @@ if [[ "x$WANT_MACOSX_ETHERHELPER" = "xyes" ]]; then AC_DEFINE(ENABLE_MACOSX_ETHERHELPER, 1, [Define if supporting "etherhelper" network device.]) fi +if [[ "x$WANT_ASC_EMU" = "xyes" ]]; then + AC_DEFINE(ENABLE_ASC_EMU, 1, [Define if supporting Apple Sound Chip Emulation.]) + AUDIOSRC+=" ../MacOSX/asc.cpp" +fi + AC_SUBST(MACOSX_ETHERHELPER, $WANT_MACOSX_ETHERHELPER) dnl SDL overrides diff --git a/BasiliskII/src/emul_op.cpp b/BasiliskII/src/emul_op.cpp index af5bb7dc4..1b1b29589 100644 --- a/BasiliskII/src/emul_op.cpp +++ b/BasiliskII/src/emul_op.cpp @@ -251,12 +251,34 @@ void EmulOp(uint16 opcode, M68kRegisters *r) // Setup fake ASC registers if (ROMVersion == ROM_VERSION_32) { +#ifdef ENABLE_ASC_EMU + uae_u32 paramBlk; + uae_u32 ioNamePtr; + uae_u32 namePtr; + + r.d[0] = 100; + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + + paramBlk = r.a[0]; // pointer to a ParamBlockRec + ioNamePtr = paramBlk + 18; // Pointer to ioNamePtr field + namePtr = r.a[0] + 80; // Storage for ".sound" string + + memcpy(Mac2HostAddr(namePtr), "\006.sound", 7); + *((uae_u32*)Mac2HostAddr(ioNamePtr)) = ntohl(namePtr); + + Execute68kTrap(0xa000, &r); // PBOpenSync() + + r.a[0] = paramBlk; + Execute68kTrap(0x101f, &r); // DisposePtr(); + +#else r.d[0] = 0x1000; Execute68kTrap(0xa71e, &r); // NewPtrSysClear() uint32 asc_regs = r.a[0]; D(bug("ASC registers at %08lx\n", asc_regs)); WriteMacInt8(asc_regs + 0x800, 0x0f); // Set ASC version number WriteMacInt32(0xcc0, asc_regs); // Set ASCBase +#endif } break; } diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index b29c77026..5dd8704ca 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -264,3 +264,211 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->a[i] = m68k_areg(regs, i); quit_program = false; } + +#ifdef ENABLE_ASC_EMU +#include + +static uae_u8 ASCRegs[0x2000] = {0}; +static const int fifoCapacity = 2048; +static uint32 fifoInA = 0; +static uint32 fifoInB = 0; +static uint32 fifoWriteA = 0; +static uint32 fifoWriteB = 0; +static uint32 fifoOutA = 0; +static uint32 fifoOutB = 0; +static uae_u8 fifoA[fifoCapacity]; +static uae_u8 fifoB[fifoCapacity]; +static int32 ascBufferSize = -1; +static int soundRunning = 0; +static int soundStop = 0; +static uae_u8 zeros[1024] = {0}; + +extern uae_u32 io_read(uaecptr addr, int width_bits) { + if((addr & 0x00ff000) == 0x0014000) { + // Apple Sound Chip + + uaecptr offset = addr & 0x00000fff; + uae_u32 val; + + if(offset < 0x400) { + /* Read of FIFO A. */ + } else if(offset < 0x800) { + /* Read of Fifo B */ + } else { + if(width_bits > 8) { + fprintf(stderr, + "Unexpected ASC read width %d\n", width_bits); + return 0; + } + + switch(offset) { + case 0x800: + // VERSION + return 0; + + case 0x804: + // FIFO IRQ STATUS + val = 0; + if((fifoInA - fifoWriteA) >= 0x200) { + val = 0x1; + } + if((fifoInA - fifoWriteA) >= 0x400) { + val = 0x2; + } + + val |= (val << 2); + return val; + + default: + return ASCRegs[offset]; + break; + } + } + + } + + return 0x00; +} + +extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { + static int downsample = 0; + + if((addr & 0x00ff000) == 0x0014000) { + if(soundStop) { + asc_stop(); + soundRunning = 0; + soundStop = 0; + } + + // Apple Sound Chip + if(width_bits > 8) { + fprintf(stderr, + "Unexpected ASC read width %d, addr 0x%08x\n", + width_bits, addr); + return; + } + + uaecptr offset = addr & 0x00000fff; + uae_u32 val; + + if(offset < 0x400) { + if(ASCRegs[0x801] != 2) { + static int counter = 0; + static int32 depthA = fifoInA - fifoWriteA; + + // FIFO Mode + if(depthA == fifoCapacity) { + return; + } + + if(ASCRegs[0x807] == 0) { + downsample += 22050; + if(downsample >= 22257) { + downsample -= 22257; + fifoA[(fifoInA++) % fifoCapacity] = b; + } + } else { + fifoA[(fifoInA++) % fifoCapacity] = b; + } + + if(soundRunning == 0) { + depthA = fifoInA - fifoWriteA; + + if(depthA >= 1024) { + if(ASCRegs[0x807] == 3) { + asc_init(44100); + } else { + asc_init(22050); + } + ascBufferSize = asc_get_buffer_size(); + soundRunning = 1; + + while(((fifoWriteA - fifoOutA) < (ascBufferSize*2)) && + ((fifoInA - fifoWriteA) > ascBufferSize) ){ + asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], + ascBufferSize); + fifoWriteA += ascBufferSize; + } + } + } + } else { + // Non fifo mode write + } + } else if(offset < 0x800) { + } else { + switch(offset) { + case 0x801: + // MODE + // 1 = FIFO mode, 2 = wavetable mode + ASCRegs[0x801] = b & 0x03; + asc_stop(); + soundRunning = 0; + break; + + case 0x802: + // CONTROL + // bit 0: analog or PWM output + // bit 1: stereo/mono + // bit 7: processing time exceeded + ASCRegs[0x802] = b; + break; + + case 0x803: + // FIFO Mode + if(b & 0x80) { + downsample = 0; + asc_stop(); + soundRunning = 0; + } + break; + + case 0x804: + // fifo status + break; + + case 0x805: + // wavetable control + break; + + case 0x806: + // Volume + break; + + case 0x807: + // Clock rate 0 = 22257, 2 = 22050, 3 = 44100 + downsample = 0; + ASCRegs[0x807] = b; + break; + + case 0x80f: + printf("ASC Test\n"); + break; + + default: + break; + } + } + } + +} + +void asc_callback() { + if(zeros[0] == 0) { + memset(zeros, 128, sizeof(zeros)); + } + if(soundRunning == 0) { + asc_process_samples(zeros, ascBufferSize); + return; + } + + fifoOutA += ascBufferSize; + + if((fifoInA - fifoWriteA) >= ascBufferSize) { + asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], ascBufferSize); + fifoWriteA += ascBufferSize; + } else { + static int ucount = 0; + asc_process_samples(zeros, ascBufferSize); + } +} +#endif diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 75a6303ba..a2acce2b7 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -23,6 +23,10 @@ #ifndef UAE_MEMORY_H #define UAE_MEMORY_H +#ifdef HAVE_CONFIG_H +#include +#endif + #if !DIRECT_ADDRESSING && !REAL_ADDRESSING /* Enabling this adds one additional native memory reference per 68k memory @@ -124,6 +128,9 @@ extern uintptr MEMBaseDiff; #endif #if REAL_ADDRESSING || DIRECT_ADDRESSING +extern uae_u32 io_read(uaecptr addr, int width_bits); +extern void io_write(uaecptr addr, uae_u32 b, int width_bits); + static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { return (uae_u8 *)MEMBaseDiff + addr; @@ -134,31 +141,63 @@ static __inline__ uae_u32 do_get_virtual_address(uae_u8 *addr) } static __inline__ uae_u32 get_long(uaecptr addr) { + if(addr & 0x40000000) { + return io_read(addr, 32); + } + uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); return do_get_mem_long(m); } static __inline__ uae_u32 get_word(uaecptr addr) { +#ifdef ENABLE_ASC_EMU + if(addr & 0x40000000) { + return io_read(addr, 16); + } +#endif uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); return do_get_mem_word(m); } static __inline__ uae_u32 get_byte(uaecptr addr) { +#ifdef ENABLE_ASC_EMU uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); + if(addr & 0x40000000) { + return io_read(addr, 8); + } +#endif return do_get_mem_byte(m); } static __inline__ void put_long(uaecptr addr, uae_u32 l) { +#ifdef ENABLE_ASC_EMU + if(addr & 0x40000000) { + io_write(addr, l, 32); + return; + } +#endif uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); do_put_mem_long(m, l); } static __inline__ void put_word(uaecptr addr, uae_u32 w) { +#ifdef ENABLE_ASC_EMU + if(addr & 0x40000000) { + io_write(addr, w, 16); + return; + } +#endif uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); do_put_mem_word(m, w); } static __inline__ void put_byte(uaecptr addr, uae_u32 b) { +#ifdef ENABLE_ASC_EMU + if(addr & 0x40000000) { + io_write(addr, b, 8); + return; + } +#endif uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); do_put_mem_byte(m, b); } From ce68f366cb042993e3dbe5401b2d81e06ed0e099 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sun, 9 Jun 2013 19:34:19 -0400 Subject: [PATCH 019/534] Added asc.c, and asc.h. Don't stop sound if we don't have to. --- BasiliskII/src/MacOSX/asc.cpp | 51 ++++++++++++++++++++++++ BasiliskII/src/include/asc.h | 13 ++++++ BasiliskII/src/uae_cpu/basilisk_glue.cpp | 36 ++++++++++------- 3 files changed, 85 insertions(+), 15 deletions(-) create mode 100644 BasiliskII/src/MacOSX/asc.cpp create mode 100644 BasiliskII/src/include/asc.h diff --git a/BasiliskII/src/MacOSX/asc.cpp b/BasiliskII/src/MacOSX/asc.cpp new file mode 100644 index 000000000..2780d704d --- /dev/null +++ b/BasiliskII/src/MacOSX/asc.cpp @@ -0,0 +1,51 @@ +#include +#include +#include "MacOSX_sound_if.h" + +static OSXsoundOutput *soundOutput = NULL; + +static int audioInt(void); + +bool asc_init(int32 sample_rate) { + if(soundOutput != NULL) { + delete soundOutput; + soundOutput = NULL; + } + + soundOutput = new OSXsoundOutput(); + soundOutput->start(8, 1, sample_rate); + soundOutput->setCallback(audioInt); + + return true; +} + +bool asc_process_samples(const uae_u8 *samples, int count) { + if(soundOutput == NULL) { + return false; + } + + if(soundOutput->sendAudioBuffer((const void *)samples, count) != 0) { + return false; + } + + return true; +} + +static int audioInt(void) { + asc_callback(); + + return 0; +} + +int32 asc_get_buffer_size() { + if(soundOutput == NULL) { + return -1; + } + + return (int32) soundOutput->bufferSizeFrames(); +} + +void asc_stop() { + delete soundOutput; + soundOutput = NULL; +} diff --git a/BasiliskII/src/include/asc.h b/BasiliskII/src/include/asc.h new file mode 100644 index 000000000..2b52ed432 --- /dev/null +++ b/BasiliskII/src/include/asc.h @@ -0,0 +1,13 @@ +#ifndef ASC_H +#define ASC_H + +#include "sysdeps.h" +#include "cpu_emulation.h" + +bool asc_init(int32 sample_rate); +bool asc_process_samples(const uae_u8 *samples, int count); +int32 asc_get_buffer_size(); +void asc_callback(); +void asc_stop(); + +#endif diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 5dd8704ca..eb40d0141 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -280,8 +280,8 @@ static uae_u8 fifoA[fifoCapacity]; static uae_u8 fifoB[fifoCapacity]; static int32 ascBufferSize = -1; static int soundRunning = 0; -static int soundStop = 0; static uae_u8 zeros[1024] = {0}; +static uae_u8 lastMode = 0; extern uae_u32 io_read(uaecptr addr, int width_bits) { if((addr & 0x00ff000) == 0x0014000) { @@ -334,12 +334,6 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { static int downsample = 0; if((addr & 0x00ff000) == 0x0014000) { - if(soundStop) { - asc_stop(); - soundRunning = 0; - soundStop = 0; - } - // Apple Sound Chip if(width_bits > 8) { fprintf(stderr, @@ -383,8 +377,8 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { ascBufferSize = asc_get_buffer_size(); soundRunning = 1; - while(((fifoWriteA - fifoOutA) < (ascBufferSize*2)) && - ((fifoInA - fifoWriteA) > ascBufferSize) ){ + while( //((fifoWriteA - fifoOutA) < (ascBufferSize*2)) && + ((fifoInA - fifoWriteA) > ascBufferSize) ) { asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], ascBufferSize); fifoWriteA += ascBufferSize; @@ -401,11 +395,22 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { // MODE // 1 = FIFO mode, 2 = wavetable mode ASCRegs[0x801] = b & 0x03; - asc_stop(); - soundRunning = 0; + if(b == 0) { + break; + } + + if(ASCRegs[0x801] != lastMode) { + asc_stop(); + soundRunning = 0; + fifoWriteA = fifoInA; + } + lastMode = ASCRegs[0x801]; break; case 0x802: + if(ASCRegs[0x802] == b) { + break; + } // CONTROL // bit 0: analog or PWM output // bit 1: stereo/mono @@ -416,9 +421,9 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { case 0x803: // FIFO Mode if(b & 0x80) { - downsample = 0; - asc_stop(); - soundRunning = 0; + if(fifoInA > (fifoWriteA + ascBufferSize)) { + fifoInA = fifoWriteA + ascBufferSize; + } } break; @@ -463,7 +468,8 @@ void asc_callback() { fifoOutA += ascBufferSize; - if((fifoInA - fifoWriteA) >= ascBufferSize) { + if( ((fifoInA - fifoWriteA) >= ascBufferSize) && + (ASCRegs[0x801] == 1)) { asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], ascBufferSize); fifoWriteA += ascBufferSize; } else { From b7cfe894457fabaab2bc3a5776e6c964b395de82 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 15 Jun 2013 16:21:26 -0400 Subject: [PATCH 020/534] More asc fixes. --- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 121 ++++++++++++----------- 1 file changed, 65 insertions(+), 56 deletions(-) diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index eb40d0141..84ed137ea 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -266,22 +266,20 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) } #ifdef ENABLE_ASC_EMU + #include static uae_u8 ASCRegs[0x2000] = {0}; static const int fifoCapacity = 2048; static uint32 fifoInA = 0; -static uint32 fifoInB = 0; static uint32 fifoWriteA = 0; -static uint32 fifoWriteB = 0; static uint32 fifoOutA = 0; -static uint32 fifoOutB = 0; static uae_u8 fifoA[fifoCapacity]; -static uae_u8 fifoB[fifoCapacity]; +static int underrun = 0; +static int clearFifo = 0; static int32 ascBufferSize = -1; static int soundRunning = 0; static uae_u8 zeros[1024] = {0}; -static uae_u8 lastMode = 0; extern uae_u32 io_read(uaecptr addr, int width_bits) { if((addr & 0x00ff000) == 0x0014000) { @@ -291,9 +289,9 @@ extern uae_u32 io_read(uaecptr addr, int width_bits) { uae_u32 val; if(offset < 0x400) { - /* Read of FIFO A. */ + return 0; } else if(offset < 0x800) { - /* Read of Fifo B */ + return 0; } else { if(width_bits > 8) { fprintf(stderr, @@ -317,6 +315,7 @@ extern uae_u32 io_read(uaecptr addr, int width_bits) { } val |= (val << 2); + return val; default: @@ -327,7 +326,7 @@ extern uae_u32 io_read(uaecptr addr, int width_bits) { } - return 0x00; + return 0; } extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { @@ -361,33 +360,9 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { downsample -= 22257; fifoA[(fifoInA++) % fifoCapacity] = b; } - } else { - fifoA[(fifoInA++) % fifoCapacity] = b; } - - if(soundRunning == 0) { - depthA = fifoInA - fifoWriteA; - - if(depthA >= 1024) { - if(ASCRegs[0x807] == 3) { - asc_init(44100); - } else { - asc_init(22050); - } - ascBufferSize = asc_get_buffer_size(); - soundRunning = 1; - - while( //((fifoWriteA - fifoOutA) < (ascBufferSize*2)) && - ((fifoInA - fifoWriteA) > ascBufferSize) ) { - asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], - ascBufferSize); - fifoWriteA += ascBufferSize; - } - } - } - } else { - // Non fifo mode write } + } else if(offset < 0x800) { } else { switch(offset) { @@ -395,22 +370,9 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { // MODE // 1 = FIFO mode, 2 = wavetable mode ASCRegs[0x801] = b & 0x03; - if(b == 0) { - break; - } - - if(ASCRegs[0x801] != lastMode) { - asc_stop(); - soundRunning = 0; - fifoWriteA = fifoInA; - } - lastMode = ASCRegs[0x801]; break; case 0x802: - if(ASCRegs[0x802] == b) { - break; - } // CONTROL // bit 0: analog or PWM output // bit 1: stereo/mono @@ -420,9 +382,10 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { case 0x803: // FIFO Mode - if(b & 0x80) { + if((b & 0x80) && (underrun == 0)) { if(fifoInA > (fifoWriteA + ascBufferSize)) { - fifoInA = fifoWriteA + ascBufferSize; + fifoInA = 0; + clearFifo = 1; } } break; @@ -441,7 +404,52 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { case 0x807: // Clock rate 0 = 22257, 2 = 22050, 3 = 44100 - downsample = 0; + { + int newRate, oldRate; + + if(ASCRegs[0x807] == 3) { + oldRate = 44100; + } else { + oldRate = 22050; + } + + if(b == 3) { + newRate = 44100; + } else { + newRate = 22050; + } + + if(newRate != oldRate) { + asc_stop(); + soundRunning = 0; + } + + if(soundRunning == 0) { + int32 depthA = fifoInA - fifoWriteA; + + soundRunning = 1; + downsample = 0; + if(zeros[0] == 0) { + memset(zeros, 128, sizeof(zeros)); + } + + asc_init(newRate); + + ascBufferSize = asc_get_buffer_size(); + + if(depthA >= ascBufferSize) { + asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], + ascBufferSize); + fifoWriteA += ascBufferSize; + underrun = 0; + } else { + underrun = 1; + asc_process_samples(zeros, ascBufferSize); + } + + } + } + ASCRegs[0x807] = b; break; @@ -458,22 +466,23 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { } void asc_callback() { - if(zeros[0] == 0) { - memset(zeros, 128, sizeof(zeros)); - } if(soundRunning == 0) { asc_process_samples(zeros, ascBufferSize); return; } - fifoOutA += ascBufferSize; + if(clearFifo) { + fifoWriteA = 0; + clearFifo = 0; + } - if( ((fifoInA - fifoWriteA) >= ascBufferSize) && - (ASCRegs[0x801] == 1)) { + if((fifoInA > fifoWriteA) && + ((fifoInA - fifoWriteA) >= ascBufferSize)) { asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], ascBufferSize); fifoWriteA += ascBufferSize; + underrun = 0; } else { - static int ucount = 0; + underrun = 1; asc_process_samples(zeros, ascBufferSize); } } From 9aec39d3cb8c031635f5e2225d72bb7069a02e7a Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Tue, 18 Jun 2013 07:02:42 -0400 Subject: [PATCH 021/534] Added extra ifdefs. --- BasiliskII/src/uae_cpu/memory.h | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index a2acce2b7..6bff799df 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -128,8 +128,11 @@ extern uintptr MEMBaseDiff; #endif #if REAL_ADDRESSING || DIRECT_ADDRESSING + +#ifdef ENABLE_ASC_EMU extern uae_u32 io_read(uaecptr addr, int width_bits); extern void io_write(uaecptr addr, uae_u32 b, int width_bits); +#endif static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { @@ -141,9 +144,11 @@ static __inline__ uae_u32 do_get_virtual_address(uae_u8 *addr) } static __inline__ uae_u32 get_long(uaecptr addr) { +#ifdef ENABLE_ASC_EMU if(addr & 0x40000000) { return io_read(addr, 32); } +#endif uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); return do_get_mem_long(m); From e08090095fb0e3161b5685d1f9445ccde5e49786 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 19 Jun 2013 19:09:40 -0400 Subject: [PATCH 022/534] Fixed compile error when asc emu is not enabled. --- BasiliskII/src/uae_cpu/memory.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 6bff799df..d13dd62cb 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -166,11 +166,11 @@ static __inline__ uae_u32 get_word(uaecptr addr) static __inline__ uae_u32 get_byte(uaecptr addr) { #ifdef ENABLE_ASC_EMU - uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); if(addr & 0x40000000) { return io_read(addr, 8); } #endif + uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); return do_get_mem_byte(m); } static __inline__ void put_long(uaecptr addr, uae_u32 l) From 3583b00a775282d84e9c15d8178d2fd6855caccd Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Fri, 21 Jun 2013 18:59:04 -0400 Subject: [PATCH 023/534] Copy etherhelpertool into application bundle. Ignore -psn_ command line argument so OS X application bundle can be launched. --- BasiliskII/src/Unix/Makefile.in | 3 +++ BasiliskII/src/Unix/main_unix.cpp | 2 ++ 2 files changed, 5 insertions(+) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 21a0e6da8..c52eab266 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -130,6 +130,9 @@ $(APP)_app: $(APP) $(OSX_DOCS) ../../README ../MacOSX/Info.plist ../MacOSX/$(APP ./cpr.sh ../MacOSX/English.lproj $(APP_APP)/Contents/Resources/ cp -f $(OSX_DOCS) $(APP_APP)/Contents/Resources/ cp -f ../../README $(APP_APP)/Contents/Resources/README.txt +ifeq (@MACOSX_ETHERHELPER@,yes) + cp -f etherhelpertool $(APP_APP)/Contents/Resources +endif $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns rm -rf $(GUI_APP_APP)/Contents diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 3505335e8..19e744b24 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -404,6 +404,8 @@ int main(int argc, char **argv) if (i < argc) x_display_name = strdup(argv[i]); #endif + } else if (strncmp(argv[i], "-psn_", 5) == 0) {// OS X process identifier + argv[i++] = NULL; } else if (strcmp(argv[i], "--gui-connection") == 0) { argv[i++] = NULL; if (i < argc) { From b609065bc47b6279514464c5bcb5ed4c65b6ec13 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 22 Jun 2013 12:43:41 -0400 Subject: [PATCH 024/534] Always start sound. --- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 27 ++++++++++++++++++++++++ 1 file changed, 27 insertions(+) diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 84ed137ea..7a333e61c 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -460,6 +460,33 @@ extern void io_write(uaecptr addr, uae_u32 b, int width_bits) { default: break; } + + if(soundRunning == 0) { + int32 depthA = fifoInA - fifoWriteA; + + soundRunning = 1; + downsample = 0; + + if(zeros[0] == 0) { + memset(zeros, 128, sizeof(zeros)); + } + + asc_init(22050); + + ascBufferSize = asc_get_buffer_size(); + + if(depthA >= ascBufferSize) { + asc_process_samples(&fifoA[fifoWriteA % fifoCapacity], + ascBufferSize); + fifoWriteA += ascBufferSize; + underrun = 0; + } else { + underrun = 1; + asc_process_samples(zeros, ascBufferSize); + } + + } + } } From c4276955baed99d00df2760d5a0e9cb16ab61f0e Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Fri, 28 Jun 2013 07:11:52 -0400 Subject: [PATCH 025/534] Fixed some 64-bit releated problems on os x. --- BasiliskII/src/Unix/configure.ac | 16 +- BasiliskII/src/Unix/mach_excServer.c | 749 +++++++++++++++++++++++++++ BasiliskII/src/Unix/mach_excUser.c | 738 ++++++++++++++++++++++++++ BasiliskII/src/Unix/sigsegv.cpp | 6 +- BasiliskII/src/Unix/sigsegv.h | 1 + BasiliskII/src/Unix/sysdeps.h | 6 +- BasiliskII/src/Unix/vm_alloc.cpp | 41 +- 7 files changed, 1550 insertions(+), 7 deletions(-) create mode 100644 BasiliskII/src/Unix/mach_excServer.c create mode 100644 BasiliskII/src/Unix/mach_excUser.c diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index b5be69881..095ee4c51 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -30,6 +30,9 @@ AC_ARG_ENABLE(asc-emu, [ --enable-asc-emu enable Apple Sound Chip dnl Mac OS X etherhelper support AC_ARG_ENABLE(macosx-etherhelper, [ --enable-macosx-etherhelper enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERHELPER=$enableval], [WANT_MACOSX_ETHERHELPER=no]) +dnl 32-bit build +AC_ARG_ENABLE(32-bit-build, [ --enable-32-bit-build enable a 32-bit build [default=no]], [WANT_32BIT_BUILD=$enableval], [WANT_32BIT_BUILD=no]) + dnl Video options. AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) @@ -125,7 +128,7 @@ case "$target_cpu" in esac dnl Check if we should really be assuming x86_64 even if we detected HAVE_I386 above. -if [[ "x$HAVE_I386" = "xyes" ]]; then +if [[ "x$HAVE_I386" == "xyes" ]]; then AC_TRY_RUN([ int main(void) { #if defined(__x86_64__) @@ -140,6 +143,11 @@ if [[ "x$HAVE_I386" = "xyes" ]]; then ]) fi +if [[ "x$HAVE_X86_64" == "xyes" ] && [ "x$WANT_32BIT_BUILD" == "xyes" ]]; then + HAVE_I386=yes + HAVE_X86_64=no +fi + dnl Checks for programs. AC_PROG_CC AC_PROG_CC_C_O @@ -149,6 +157,12 @@ AC_PROG_MAKE_SET AC_PROG_INSTALL AC_PROG_EGREP +if [[ "x$WANT_32BIT_BUILD" == "xyes" ]]; then +CFLAGS+=" -m32" +CXXFLAGS+=" -m32" +LDFLAGS+=" -m32" +fi + dnl We use mon if possible. MONSRCS= if [[ "x$WANT_MON" = "xyes" ]]; then diff --git a/BasiliskII/src/Unix/mach_excServer.c b/BasiliskII/src/Unix/mach_excServer.c new file mode 100644 index 000000000..c9d592400 --- /dev/null +++ b/BasiliskII/src/Unix/mach_excServer.c @@ -0,0 +1,749 @@ +/* + * IDENTIFICATION: + * stub generated Wed Jun 26 19:11:26 2013 + * with a MiG generated by bootstrap_cmds-85 + * OPTIONS: + */ + +/* Module mach_exc */ + +#define __MIG_check__Request__mach_exc_subsystem__ 1 + +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#include +#include +#include +#include + +#ifndef mig_internal +#define mig_internal static __inline__ +#endif /* mig_internal */ + +#ifndef mig_external +#define mig_external +#endif /* mig_external */ + +#if !defined(__MigTypeCheck) && defined(TypeCheck) +#define __MigTypeCheck TypeCheck /* Legacy setting */ +#endif /* !defined(__MigTypeCheck) */ + +#if !defined(__MigKernelSpecificCode) && defined(_MIG_KERNEL_SPECIFIC_CODE_) +#define __MigKernelSpecificCode _MIG_KERNEL_SPECIFIC_CODE_ /* Legacy setting */ +#endif /* !defined(__MigKernelSpecificCode) */ + +#ifndef LimitCheck +#define LimitCheck 0 +#endif /* LimitCheck */ + +#ifndef min +#define min(a,b) ( ((a) < (b))? (a): (b) ) +#endif /* min */ + +#if !defined(_WALIGN_) +#define _WALIGN_(x) (((x) + 3) & ~3) +#endif /* !defined(_WALIGN_) */ + +#if !defined(_WALIGNSZ_) +#define _WALIGNSZ_(x) _WALIGN_(sizeof(x)) +#endif /* !defined(_WALIGNSZ_) */ + +#ifndef UseStaticTemplates +#define UseStaticTemplates 0 +#endif /* UseStaticTemplates */ + +#ifndef __DeclareRcvRpc +#define __DeclareRcvRpc(_NUM_, _NAME_) +#endif /* __DeclareRcvRpc */ + +#ifndef __BeforeRcvRpc +#define __BeforeRcvRpc(_NUM_, _NAME_) +#endif /* __BeforeRcvRpc */ + +#ifndef __AfterRcvRpc +#define __AfterRcvRpc(_NUM_, _NAME_) +#endif /* __AfterRcvRpc */ + +#ifndef __DeclareRcvSimple +#define __DeclareRcvSimple(_NUM_, _NAME_) +#endif /* __DeclareRcvSimple */ + +#ifndef __BeforeRcvSimple +#define __BeforeRcvSimple(_NUM_, _NAME_) +#endif /* __BeforeRcvSimple */ + +#ifndef __AfterRcvSimple +#define __AfterRcvSimple(_NUM_, _NAME_) +#endif /* __AfterRcvSimple */ + +#define novalue void + +#define msgh_request_port msgh_local_port +#define MACH_MSGH_BITS_REQUEST(bits) MACH_MSGH_BITS_LOCAL(bits) +#define msgh_reply_port msgh_remote_port +#define MACH_MSGH_BITS_REPLY(bits) MACH_MSGH_BITS_REMOTE(bits) + +#define MIG_RETURN_ERROR(X, code) {\ + ((mig_reply_error_t *)X)->RetCode = code;\ + ((mig_reply_error_t *)X)->NDR = NDR_record;\ + return;\ + } + +/* typedefs for all requests */ + +#ifndef __Request__mach_exc_subsystem__defined +#define __Request__mach_exc_subsystem__defined + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + } __Request__mach_exception_raise_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } __Request__mach_exception_raise_state_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } __Request__mach_exception_raise_state_identity_t; +#ifdef __MigPackStructs +#pragma pack() +#endif +#endif /* !__Request__mach_exc_subsystem__defined */ + +/* typedefs for all replies */ + +#ifndef __Reply__mach_exc_subsystem__defined +#define __Reply__mach_exc_subsystem__defined + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + } __Reply__mach_exception_raise_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply__mach_exception_raise_state_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply__mach_exception_raise_state_identity_t; +#ifdef __MigPackStructs +#pragma pack() +#endif +#endif /* !__Reply__mach_exc_subsystem__defined */ + + +/* union of all replies */ + +#ifndef __ReplyUnion__catch_mach_exc_subsystem__defined +#define __ReplyUnion__catch_mach_exc_subsystem__defined +union __ReplyUnion__catch_mach_exc_subsystem { + __Reply__mach_exception_raise_t Reply_mach_exception_raise; + __Reply__mach_exception_raise_state_t Reply_mach_exception_raise_state; + __Reply__mach_exception_raise_state_identity_t Reply_mach_exception_raise_state_identity; +}; +#endif /* __RequestUnion__catch_mach_exc_subsystem__defined */ +/* Forward Declarations */ + + +mig_internal novalue _Xmach_exception_raise + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP); + +mig_internal novalue _Xmach_exception_raise_state + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP); + +mig_internal novalue _Xmach_exception_raise_state_identity + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP); + + +#if ( __MigTypeCheck ) +#if __MIG_check__Request__mach_exc_subsystem__ +#if !defined(__MIG_check__Request__mach_exception_raise_t__defined) +#define __MIG_check__Request__mach_exception_raise_t__defined + +mig_internal kern_return_t __MIG_check__Request__mach_exception_raise_t(__attribute__((__unused__)) __Request__mach_exception_raise_t *In0P) +{ + + typedef __Request__mach_exception_raise_t __Request; +#if __MigTypeCheck + unsigned int msgh_size; +#endif /* __MigTypeCheck */ + +#if __MigTypeCheck + msgh_size = In0P->Head.msgh_size; + if (!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + (In0P->msgh_body.msgh_descriptor_count != 2) || + (msgh_size < (mach_msg_size_t)(sizeof(__Request) - 16)) || (msgh_size > (mach_msg_size_t)sizeof(__Request))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + +#if __MigTypeCheck + if (In0P->thread.type != MACH_MSG_PORT_DESCRIPTOR || + In0P->thread.disposition != 17) + return MIG_TYPE_ERROR; +#endif /* __MigTypeCheck */ + +#if __MigTypeCheck + if (In0P->task.type != MACH_MSG_PORT_DESCRIPTOR || + In0P->task.disposition != 17) + return MIG_TYPE_ERROR; +#endif /* __MigTypeCheck */ + +#if defined(__NDR_convert__int_rep__Request__mach_exception_raise_t__codeCnt__defined) + if (In0P->NDR.int_rep != NDR_record.int_rep) + __NDR_convert__int_rep__Request__mach_exception_raise_t__codeCnt(&In0P->codeCnt, In0P->NDR.int_rep); +#endif /* __NDR_convert__int_rep__Request__mach_exception_raise_t__codeCnt__defined */ +#if __MigTypeCheck + if ( In0P->codeCnt > 2 ) + return MIG_BAD_ARGUMENTS; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Request) - 16)) / 8 < In0P->codeCnt) || + (msgh_size != (mach_msg_size_t)(sizeof(__Request) - 16) + (8 * In0P->codeCnt))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + + return MACH_MSG_SUCCESS; +} +#endif /* !defined(__MIG_check__Request__mach_exception_raise_t__defined) */ +#endif /* __MIG_check__Request__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t catch_mach_exception_raise +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt +); + +/* Routine mach_exception_raise */ +mig_internal novalue _Xmach_exception_raise + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + mach_msg_trailer_t trailer; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + typedef __Request__mach_exception_raise_t __Request; + typedef __Reply__mach_exception_raise_t Reply; + + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + Request *In0P = (Request *) InHeadP; + Reply *OutP = (Reply *) OutHeadP; +#ifdef __MIG_check__Request__mach_exception_raise_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Request__mach_exception_raise_t__defined */ + + __DeclareRcvRpc(2405, "mach_exception_raise") + __BeforeRcvRpc(2405, "mach_exception_raise") + +#if defined(__MIG_check__Request__mach_exception_raise_t__defined) + check_result = __MIG_check__Request__mach_exception_raise_t((__Request *)In0P); + if (check_result != MACH_MSG_SUCCESS) + { MIG_RETURN_ERROR(OutP, check_result); } +#endif /* defined(__MIG_check__Request__mach_exception_raise_t__defined) */ + + OutP->RetCode = catch_mach_exception_raise(In0P->Head.msgh_request_port, In0P->thread.name, In0P->task.name, In0P->exception, In0P->code, In0P->codeCnt); + + OutP->NDR = NDR_record; + + + __AfterRcvRpc(2405, "mach_exception_raise") +} + +#if ( __MigTypeCheck ) +#if __MIG_check__Request__mach_exc_subsystem__ +#if !defined(__MIG_check__Request__mach_exception_raise_state_t__defined) +#define __MIG_check__Request__mach_exception_raise_state_t__defined + +mig_internal kern_return_t __MIG_check__Request__mach_exception_raise_state_t(__attribute__((__unused__)) __Request__mach_exception_raise_state_t *In0P, __attribute__((__unused__)) __Request__mach_exception_raise_state_t **In1PP) +{ + + typedef __Request__mach_exception_raise_state_t __Request; + __Request *In1P; +#if __MigTypeCheck + unsigned int msgh_size; +#endif /* __MigTypeCheck */ + unsigned int msgh_size_delta; + +#if __MigTypeCheck + msgh_size = In0P->Head.msgh_size; + if ((In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + (msgh_size < (mach_msg_size_t)(sizeof(__Request) - 912)) || (msgh_size > (mach_msg_size_t)sizeof(__Request))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + +#if defined(__NDR_convert__int_rep__Request__mach_exception_raise_state_t__codeCnt__defined) + if (In0P->NDR.int_rep != NDR_record.int_rep) + __NDR_convert__int_rep__Request__mach_exception_raise_state_t__codeCnt(&In0P->codeCnt, In0P->NDR.int_rep); +#endif /* __NDR_convert__int_rep__Request__mach_exception_raise_state_t__codeCnt__defined */ + msgh_size_delta = (8 * In0P->codeCnt); +#if __MigTypeCheck + if ( In0P->codeCnt > 2 ) + return MIG_BAD_ARGUMENTS; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Request) - 912)) / 8 < In0P->codeCnt) || + (msgh_size < (mach_msg_size_t)(sizeof(__Request) - 912) + (8 * In0P->codeCnt))) + return MIG_BAD_ARGUMENTS; + msgh_size -= msgh_size_delta; +#endif /* __MigTypeCheck */ + + *In1PP = In1P = (__Request *) ((pointer_t) In0P + msgh_size_delta - 16); + +#if defined(__NDR_convert__int_rep__Request__mach_exception_raise_state_t__old_stateCnt__defined) + if (In0P->NDR.int_rep != NDR_record.int_rep) + __NDR_convert__int_rep__Request__mach_exception_raise_state_t__old_stateCnt(&In1P->old_stateCnt, In1P->NDR.int_rep); +#endif /* __NDR_convert__int_rep__Request__mach_exception_raise_state_t__old_stateCnt__defined */ +#if __MigTypeCheck + if ( In1P->old_stateCnt > 224 ) + return MIG_BAD_ARGUMENTS; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Request) - 912)) / 4 < In1P->old_stateCnt) || + (msgh_size != (mach_msg_size_t)(sizeof(__Request) - 912) + (4 * In1P->old_stateCnt))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + + return MACH_MSG_SUCCESS; +} +#endif /* !defined(__MIG_check__Request__mach_exception_raise_state_t__defined) */ +#endif /* __MIG_check__Request__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise_state */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t catch_mach_exception_raise_state +( + mach_port_t exception_port, + exception_type_t exception, + const mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + const thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +); + +/* Routine mach_exception_raise_state */ +mig_internal novalue _Xmach_exception_raise_state + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + mach_msg_trailer_t trailer; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + typedef __Request__mach_exception_raise_state_t __Request; + typedef __Reply__mach_exception_raise_state_t Reply; + + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + Request *In0P = (Request *) InHeadP; + Request *In1P; + Reply *OutP = (Reply *) OutHeadP; +#ifdef __MIG_check__Request__mach_exception_raise_state_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Request__mach_exception_raise_state_t__defined */ + + __DeclareRcvRpc(2406, "mach_exception_raise_state") + __BeforeRcvRpc(2406, "mach_exception_raise_state") + +#if defined(__MIG_check__Request__mach_exception_raise_state_t__defined) + check_result = __MIG_check__Request__mach_exception_raise_state_t((__Request *)In0P, (__Request **)&In1P); + if (check_result != MACH_MSG_SUCCESS) + { MIG_RETURN_ERROR(OutP, check_result); } +#endif /* defined(__MIG_check__Request__mach_exception_raise_state_t__defined) */ + + OutP->new_stateCnt = 224; + + OutP->RetCode = catch_mach_exception_raise_state(In0P->Head.msgh_request_port, In0P->exception, In0P->code, In0P->codeCnt, &In1P->flavor, In1P->old_state, In1P->old_stateCnt, OutP->new_state, &OutP->new_stateCnt); + if (OutP->RetCode != KERN_SUCCESS) { + MIG_RETURN_ERROR(OutP, OutP->RetCode); + } + + OutP->NDR = NDR_record; + + + OutP->flavor = In1P->flavor; + OutP->Head.msgh_size = (mach_msg_size_t)(sizeof(Reply) - 896) + (((4 * OutP->new_stateCnt))); + + __AfterRcvRpc(2406, "mach_exception_raise_state") +} + +#if ( __MigTypeCheck ) +#if __MIG_check__Request__mach_exc_subsystem__ +#if !defined(__MIG_check__Request__mach_exception_raise_state_identity_t__defined) +#define __MIG_check__Request__mach_exception_raise_state_identity_t__defined + +mig_internal kern_return_t __MIG_check__Request__mach_exception_raise_state_identity_t(__attribute__((__unused__)) __Request__mach_exception_raise_state_identity_t *In0P, __attribute__((__unused__)) __Request__mach_exception_raise_state_identity_t **In1PP) +{ + + typedef __Request__mach_exception_raise_state_identity_t __Request; + __Request *In1P; +#if __MigTypeCheck + unsigned int msgh_size; +#endif /* __MigTypeCheck */ + unsigned int msgh_size_delta; + +#if __MigTypeCheck + msgh_size = In0P->Head.msgh_size; + if (!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + (In0P->msgh_body.msgh_descriptor_count != 2) || + (msgh_size < (mach_msg_size_t)(sizeof(__Request) - 912)) || (msgh_size > (mach_msg_size_t)sizeof(__Request))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + +#if __MigTypeCheck + if (In0P->thread.type != MACH_MSG_PORT_DESCRIPTOR || + In0P->thread.disposition != 17) + return MIG_TYPE_ERROR; +#endif /* __MigTypeCheck */ + +#if __MigTypeCheck + if (In0P->task.type != MACH_MSG_PORT_DESCRIPTOR || + In0P->task.disposition != 17) + return MIG_TYPE_ERROR; +#endif /* __MigTypeCheck */ + +#if defined(__NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__codeCnt__defined) + if (In0P->NDR.int_rep != NDR_record.int_rep) + __NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__codeCnt(&In0P->codeCnt, In0P->NDR.int_rep); +#endif /* __NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__codeCnt__defined */ + msgh_size_delta = (8 * In0P->codeCnt); +#if __MigTypeCheck + if ( In0P->codeCnt > 2 ) + return MIG_BAD_ARGUMENTS; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Request) - 912)) / 8 < In0P->codeCnt) || + (msgh_size < (mach_msg_size_t)(sizeof(__Request) - 912) + (8 * In0P->codeCnt))) + return MIG_BAD_ARGUMENTS; + msgh_size -= msgh_size_delta; +#endif /* __MigTypeCheck */ + + *In1PP = In1P = (__Request *) ((pointer_t) In0P + msgh_size_delta - 16); + +#if defined(__NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__old_stateCnt__defined) + if (In0P->NDR.int_rep != NDR_record.int_rep) + __NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__old_stateCnt(&In1P->old_stateCnt, In1P->NDR.int_rep); +#endif /* __NDR_convert__int_rep__Request__mach_exception_raise_state_identity_t__old_stateCnt__defined */ +#if __MigTypeCheck + if ( In1P->old_stateCnt > 224 ) + return MIG_BAD_ARGUMENTS; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Request) - 912)) / 4 < In1P->old_stateCnt) || + (msgh_size != (mach_msg_size_t)(sizeof(__Request) - 912) + (4 * In1P->old_stateCnt))) + return MIG_BAD_ARGUMENTS; +#endif /* __MigTypeCheck */ + + return MACH_MSG_SUCCESS; +} +#endif /* !defined(__MIG_check__Request__mach_exception_raise_state_identity_t__defined) */ +#endif /* __MIG_check__Request__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise_state_identity */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t catch_mach_exception_raise_state_identity +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +); + +/* Routine mach_exception_raise_state_identity */ +mig_internal novalue _Xmach_exception_raise_state_identity + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + mach_msg_trailer_t trailer; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + typedef __Request__mach_exception_raise_state_identity_t __Request; + typedef __Reply__mach_exception_raise_state_identity_t Reply; + + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + Request *In0P = (Request *) InHeadP; + Request *In1P; + Reply *OutP = (Reply *) OutHeadP; +#ifdef __MIG_check__Request__mach_exception_raise_state_identity_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Request__mach_exception_raise_state_identity_t__defined */ + + __DeclareRcvRpc(2407, "mach_exception_raise_state_identity") + __BeforeRcvRpc(2407, "mach_exception_raise_state_identity") + +#if defined(__MIG_check__Request__mach_exception_raise_state_identity_t__defined) + check_result = __MIG_check__Request__mach_exception_raise_state_identity_t((__Request *)In0P, (__Request **)&In1P); + if (check_result != MACH_MSG_SUCCESS) + { MIG_RETURN_ERROR(OutP, check_result); } +#endif /* defined(__MIG_check__Request__mach_exception_raise_state_identity_t__defined) */ + + OutP->new_stateCnt = 224; + + OutP->RetCode = catch_mach_exception_raise_state_identity(In0P->Head.msgh_request_port, In0P->thread.name, In0P->task.name, In0P->exception, In0P->code, In0P->codeCnt, &In1P->flavor, In1P->old_state, In1P->old_stateCnt, OutP->new_state, &OutP->new_stateCnt); + if (OutP->RetCode != KERN_SUCCESS) { + MIG_RETURN_ERROR(OutP, OutP->RetCode); + } + + OutP->NDR = NDR_record; + + + OutP->flavor = In1P->flavor; + OutP->Head.msgh_size = (mach_msg_size_t)(sizeof(Reply) - 896) + (((4 * OutP->new_stateCnt))); + + __AfterRcvRpc(2407, "mach_exception_raise_state_identity") +} + + +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +boolean_t mach_exc_server( + mach_msg_header_t *InHeadP, + mach_msg_header_t *OutHeadP); + +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +mig_routine_t mach_exc_server_routine( + mach_msg_header_t *InHeadP); + + +/* Description of this subsystem, for use in direct RPC */ +const struct catch_mach_exc_subsystem { + mig_server_routine_t server; /* Server routine */ + mach_msg_id_t start; /* Min routine number */ + mach_msg_id_t end; /* Max routine number + 1 */ + unsigned int maxsize; /* Max msg size */ + vm_address_t reserved; /* Reserved */ + struct routine_descriptor /*Array of routine descriptors */ + routine[3]; +} catch_mach_exc_subsystem = { + mach_exc_server_routine, + 2405, + 2408, + (mach_msg_size_t)sizeof(union __ReplyUnion__catch_mach_exc_subsystem), + (vm_address_t)0, + { + { (mig_impl_routine_t) 0, + (mig_stub_routine_t) _Xmach_exception_raise, 6, 0, (routine_arg_descriptor_t)0, (mach_msg_size_t)sizeof(__Reply__mach_exception_raise_t)}, + { (mig_impl_routine_t) 0, + (mig_stub_routine_t) _Xmach_exception_raise_state, 9, 0, (routine_arg_descriptor_t)0, (mach_msg_size_t)sizeof(__Reply__mach_exception_raise_state_t)}, + { (mig_impl_routine_t) 0, + (mig_stub_routine_t) _Xmach_exception_raise_state_identity, 11, 0, (routine_arg_descriptor_t)0, (mach_msg_size_t)sizeof(__Reply__mach_exception_raise_state_identity_t)}, + } +}; + +mig_external boolean_t mach_exc_server + (mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP) +{ + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + register mig_routine_t routine; + + OutHeadP->msgh_bits = MACH_MSGH_BITS(MACH_MSGH_BITS_REPLY(InHeadP->msgh_bits), 0); + OutHeadP->msgh_remote_port = InHeadP->msgh_reply_port; + /* Minimal size: routine() will update it if different */ + OutHeadP->msgh_size = (mach_msg_size_t)sizeof(mig_reply_error_t); + OutHeadP->msgh_local_port = MACH_PORT_NULL; + OutHeadP->msgh_id = InHeadP->msgh_id + 100; + + if ((InHeadP->msgh_id > 2407) || (InHeadP->msgh_id < 2405) || + ((routine = catch_mach_exc_subsystem.routine[InHeadP->msgh_id - 2405].stub_routine) == 0)) { + ((mig_reply_error_t *)OutHeadP)->NDR = NDR_record; + ((mig_reply_error_t *)OutHeadP)->RetCode = MIG_BAD_ID; + return FALSE; + } + (*routine) (InHeadP, OutHeadP); + return TRUE; +} + +mig_external mig_routine_t mach_exc_server_routine + (mach_msg_header_t *InHeadP) +{ + register int msgh_id; + + msgh_id = InHeadP->msgh_id - 2405; + + if ((msgh_id > 2) || (msgh_id < 0)) + return 0; + + return catch_mach_exc_subsystem.routine[msgh_id].stub_routine; +} diff --git a/BasiliskII/src/Unix/mach_excUser.c b/BasiliskII/src/Unix/mach_excUser.c new file mode 100644 index 000000000..0070bd04f --- /dev/null +++ b/BasiliskII/src/Unix/mach_excUser.c @@ -0,0 +1,738 @@ +/* + * IDENTIFICATION: + * stub generated Wed Jun 26 19:11:26 2013 + * with a MiG generated by bootstrap_cmds-85 + * OPTIONS: + */ +#define __MIG_check__Reply__mach_exc_subsystem__ 1 + +#include "mach_exc.h" + + +#ifndef mig_internal +#define mig_internal static __inline__ +#endif /* mig_internal */ + +#ifndef mig_external +#define mig_external +#endif /* mig_external */ + +#if !defined(__MigTypeCheck) && defined(TypeCheck) +#define __MigTypeCheck TypeCheck /* Legacy setting */ +#endif /* !defined(__MigTypeCheck) */ + +#if !defined(__MigKernelSpecificCode) && defined(_MIG_KERNEL_SPECIFIC_CODE_) +#define __MigKernelSpecificCode _MIG_KERNEL_SPECIFIC_CODE_ /* Legacy setting */ +#endif /* !defined(__MigKernelSpecificCode) */ + +#ifndef LimitCheck +#define LimitCheck 0 +#endif /* LimitCheck */ + +#ifndef min +#define min(a,b) ( ((a) < (b))? (a): (b) ) +#endif /* min */ + +#if !defined(_WALIGN_) +#define _WALIGN_(x) (((x) + 3) & ~3) +#endif /* !defined(_WALIGN_) */ + +#if !defined(_WALIGNSZ_) +#define _WALIGNSZ_(x) _WALIGN_(sizeof(x)) +#endif /* !defined(_WALIGNSZ_) */ + +#ifndef UseStaticTemplates +#define UseStaticTemplates 0 +#endif /* UseStaticTemplates */ + +#ifndef __MachMsgErrorWithTimeout +#define __MachMsgErrorWithTimeout(_R_) { \ + switch (_R_) { \ + case MACH_SEND_INVALID_DATA: \ + case MACH_SEND_INVALID_DEST: \ + case MACH_SEND_INVALID_HEADER: \ + mig_put_reply_port(InP->Head.msgh_reply_port); \ + break; \ + case MACH_SEND_TIMED_OUT: \ + case MACH_RCV_TIMED_OUT: \ + default: \ + mig_dealloc_reply_port(InP->Head.msgh_reply_port); \ + } \ +} +#endif /* __MachMsgErrorWithTimeout */ + +#ifndef __MachMsgErrorWithoutTimeout +#define __MachMsgErrorWithoutTimeout(_R_) { \ + switch (_R_) { \ + case MACH_SEND_INVALID_DATA: \ + case MACH_SEND_INVALID_DEST: \ + case MACH_SEND_INVALID_HEADER: \ + mig_put_reply_port(InP->Head.msgh_reply_port); \ + break; \ + default: \ + mig_dealloc_reply_port(InP->Head.msgh_reply_port); \ + } \ +} +#endif /* __MachMsgErrorWithoutTimeout */ + +#ifndef __DeclareSendRpc +#define __DeclareSendRpc(_NUM_, _NAME_) +#endif /* __DeclareSendRpc */ + +#ifndef __BeforeSendRpc +#define __BeforeSendRpc(_NUM_, _NAME_) +#endif /* __BeforeSendRpc */ + +#ifndef __AfterSendRpc +#define __AfterSendRpc(_NUM_, _NAME_) +#endif /* __AfterSendRpc */ + +#ifndef __DeclareSendSimple +#define __DeclareSendSimple(_NUM_, _NAME_) +#endif /* __DeclareSendSimple */ + +#ifndef __BeforeSendSimple +#define __BeforeSendSimple(_NUM_, _NAME_) +#endif /* __BeforeSendSimple */ + +#ifndef __AfterSendSimple +#define __AfterSendSimple(_NUM_, _NAME_) +#endif /* __AfterSendSimple */ + +#define msgh_request_port msgh_remote_port +#define msgh_reply_port msgh_local_port + + + +#if ( __MigTypeCheck ) +#if __MIG_check__Reply__mach_exc_subsystem__ +#if !defined(__MIG_check__Reply__mach_exception_raise_t__defined) +#define __MIG_check__Reply__mach_exception_raise_t__defined + +mig_internal kern_return_t __MIG_check__Reply__mach_exception_raise_t(__Reply__mach_exception_raise_t *Out0P) +{ + + typedef __Reply__mach_exception_raise_t __Reply; + if (Out0P->Head.msgh_id != 2505) { + if (Out0P->Head.msgh_id == MACH_NOTIFY_SEND_ONCE) + { return MIG_SERVER_DIED; } + else + { return MIG_REPLY_MISMATCH; } + } + +#if __MigTypeCheck + if ((Out0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + (Out0P->Head.msgh_size != (mach_msg_size_t)sizeof(__Reply))) + { return MIG_TYPE_ERROR ; } +#endif /* __MigTypeCheck */ + + { + return Out0P->RetCode; + } +} +#endif /* !defined(__MIG_check__Reply__mach_exception_raise_t__defined) */ +#endif /* __MIG_check__Reply__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise */ +mig_external kern_return_t mach_exception_raise +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt +) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + mach_msg_trailer_t trailer; + } Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + } __Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + union { + Request In; + Reply Out; + } Mess; + + Request *InP = &Mess.In; + Reply *Out0P = &Mess.Out; + + mach_msg_return_t msg_result; + unsigned int msgh_size; + +#ifdef __MIG_check__Reply__mach_exception_raise_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Reply__mach_exception_raise_t__defined */ + + __DeclareSendRpc(2405, "mach_exception_raise") + +#if UseStaticTemplates + const static mach_msg_port_descriptor_t threadTemplate = { + /* name = */ MACH_PORT_NULL, + /* pad1 = */ 0, + /* pad2 = */ 0, + /* disp = */ 19, + /* type = */ MACH_MSG_PORT_DESCRIPTOR, + }; +#endif /* UseStaticTemplates */ + +#if UseStaticTemplates + const static mach_msg_port_descriptor_t taskTemplate = { + /* name = */ MACH_PORT_NULL, + /* pad1 = */ 0, + /* pad2 = */ 0, + /* disp = */ 19, + /* type = */ MACH_MSG_PORT_DESCRIPTOR, + }; +#endif /* UseStaticTemplates */ + + InP->msgh_body.msgh_descriptor_count = 2; +#if UseStaticTemplates + InP->thread = threadTemplate; + InP->thread.name = thread; +#else /* UseStaticTemplates */ + InP->thread.name = thread; + InP->thread.disposition = 19; + InP->thread.type = MACH_MSG_PORT_DESCRIPTOR; +#endif /* UseStaticTemplates */ + +#if UseStaticTemplates + InP->task = taskTemplate; + InP->task.name = task; +#else /* UseStaticTemplates */ + InP->task.name = task; + InP->task.disposition = 19; + InP->task.type = MACH_MSG_PORT_DESCRIPTOR; +#endif /* UseStaticTemplates */ + + InP->NDR = NDR_record; + + InP->exception = exception; + + if (codeCnt > 2) { + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) InP->code, (const char *) code, 8 * codeCnt); + + InP->codeCnt = codeCnt; + + msgh_size = (mach_msg_size_t)(sizeof(Request) - 16) + ((8 * codeCnt)); + InP->Head.msgh_bits = MACH_MSGH_BITS_COMPLEX| + MACH_MSGH_BITS(19, MACH_MSG_TYPE_MAKE_SEND_ONCE); + /* msgh_size passed as argument */ + InP->Head.msgh_request_port = exception_port; + InP->Head.msgh_reply_port = mig_get_reply_port(); + InP->Head.msgh_id = 2405; + + __BeforeSendRpc(2405, "mach_exception_raise") + msg_result = mach_msg(&InP->Head, MACH_SEND_MSG|MACH_RCV_MSG|MACH_MSG_OPTION_NONE, msgh_size, (mach_msg_size_t)sizeof(Reply), InP->Head.msgh_reply_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); + __AfterSendRpc(2405, "mach_exception_raise") + if (msg_result != MACH_MSG_SUCCESS) { + __MachMsgErrorWithoutTimeout(msg_result); + { return msg_result; } + } + + +#if defined(__MIG_check__Reply__mach_exception_raise_t__defined) + check_result = __MIG_check__Reply__mach_exception_raise_t((__Reply__mach_exception_raise_t *)Out0P); + if (check_result != MACH_MSG_SUCCESS) + { return check_result; } +#endif /* defined(__MIG_check__Reply__mach_exception_raise_t__defined) */ + + return KERN_SUCCESS; +} + +#if ( __MigTypeCheck ) +#if __MIG_check__Reply__mach_exc_subsystem__ +#if !defined(__MIG_check__Reply__mach_exception_raise_state_t__defined) +#define __MIG_check__Reply__mach_exception_raise_state_t__defined + +mig_internal kern_return_t __MIG_check__Reply__mach_exception_raise_state_t(__Reply__mach_exception_raise_state_t *Out0P) +{ + + typedef __Reply__mach_exception_raise_state_t __Reply; +#if __MigTypeCheck + unsigned int msgh_size; +#endif /* __MigTypeCheck */ + + if (Out0P->Head.msgh_id != 2506) { + if (Out0P->Head.msgh_id == MACH_NOTIFY_SEND_ONCE) + { return MIG_SERVER_DIED; } + else + { return MIG_REPLY_MISMATCH; } + } + +#if __MigTypeCheck + msgh_size = Out0P->Head.msgh_size; + + if ((Out0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + ((msgh_size > (mach_msg_size_t)sizeof(__Reply) || msgh_size < (mach_msg_size_t)(sizeof(__Reply) - 896)) && + (msgh_size != (mach_msg_size_t)sizeof(mig_reply_error_t) || + Out0P->RetCode == KERN_SUCCESS))) + { return MIG_TYPE_ERROR ; } +#endif /* __MigTypeCheck */ + + if (Out0P->RetCode != KERN_SUCCESS) { + return ((mig_reply_error_t *)Out0P)->RetCode; + } + +#if __MigTypeCheck + if ( Out0P->new_stateCnt > 224 ) + return MIG_TYPE_ERROR; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Reply) - 896)) / 4< Out0P->new_stateCnt) || + (msgh_size != (mach_msg_size_t)(sizeof(__Reply) - 896) + Out0P->new_stateCnt * 4)) + { return MIG_TYPE_ERROR ; } +#endif /* __MigTypeCheck */ + + return MACH_MSG_SUCCESS; +} +#endif /* !defined(__MIG_check__Reply__mach_exception_raise_state_t__defined) */ +#endif /* __MIG_check__Reply__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise_state */ +mig_external kern_return_t mach_exception_raise_state +( + mach_port_t exception_port, + exception_type_t exception, + const mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + const thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + mach_msg_trailer_t trailer; + } Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + union { + Request In; + Reply Out; + } Mess; + + Request *InP = &Mess.In; + Reply *Out0P = &Mess.Out; + + mach_msg_return_t msg_result; + unsigned int msgh_size; + unsigned int msgh_size_delta; + + +#ifdef __MIG_check__Reply__mach_exception_raise_state_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Reply__mach_exception_raise_state_t__defined */ + + __DeclareSendRpc(2406, "mach_exception_raise_state") + + InP->NDR = NDR_record; + + InP->exception = exception; + + if (codeCnt > 2) { + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) InP->code, (const char *) code, 8 * codeCnt); + + InP->codeCnt = codeCnt; + + msgh_size_delta = (8 * codeCnt); + msgh_size = (mach_msg_size_t)(sizeof(Request) - 912) + msgh_size_delta; + InP = (Request *) ((pointer_t) InP + msgh_size_delta - 16); + + InP->flavor = *flavor; + + if (old_stateCnt > 224) { + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) InP->old_state, (const char *) old_state, 4 * old_stateCnt); + + InP->old_stateCnt = old_stateCnt; + + msgh_size += (4 * old_stateCnt); + InP = &Mess.In; + InP->Head.msgh_bits = + MACH_MSGH_BITS(19, MACH_MSG_TYPE_MAKE_SEND_ONCE); + /* msgh_size passed as argument */ + InP->Head.msgh_request_port = exception_port; + InP->Head.msgh_reply_port = mig_get_reply_port(); + InP->Head.msgh_id = 2406; + + __BeforeSendRpc(2406, "mach_exception_raise_state") + msg_result = mach_msg(&InP->Head, MACH_SEND_MSG|MACH_RCV_MSG|MACH_MSG_OPTION_NONE, msgh_size, (mach_msg_size_t)sizeof(Reply), InP->Head.msgh_reply_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); + __AfterSendRpc(2406, "mach_exception_raise_state") + if (msg_result != MACH_MSG_SUCCESS) { + __MachMsgErrorWithoutTimeout(msg_result); + { return msg_result; } + } + + +#if defined(__MIG_check__Reply__mach_exception_raise_state_t__defined) + check_result = __MIG_check__Reply__mach_exception_raise_state_t((__Reply__mach_exception_raise_state_t *)Out0P); + if (check_result != MACH_MSG_SUCCESS) + { return check_result; } +#endif /* defined(__MIG_check__Reply__mach_exception_raise_state_t__defined) */ + + *flavor = Out0P->flavor; + + if (Out0P->new_stateCnt > 224) { + (void)memcpy((char *) new_state, (const char *) Out0P->new_state, 4 * 224); + *new_stateCnt = Out0P->new_stateCnt; + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) new_state, (const char *) Out0P->new_state, 4 * Out0P->new_stateCnt); + + *new_stateCnt = Out0P->new_stateCnt; + + return KERN_SUCCESS; +} + +#if ( __MigTypeCheck ) +#if __MIG_check__Reply__mach_exc_subsystem__ +#if !defined(__MIG_check__Reply__mach_exception_raise_state_identity_t__defined) +#define __MIG_check__Reply__mach_exception_raise_state_identity_t__defined + +mig_internal kern_return_t __MIG_check__Reply__mach_exception_raise_state_identity_t(__Reply__mach_exception_raise_state_identity_t *Out0P) +{ + + typedef __Reply__mach_exception_raise_state_identity_t __Reply; +#if __MigTypeCheck + unsigned int msgh_size; +#endif /* __MigTypeCheck */ + + if (Out0P->Head.msgh_id != 2507) { + if (Out0P->Head.msgh_id == MACH_NOTIFY_SEND_ONCE) + { return MIG_SERVER_DIED; } + else + { return MIG_REPLY_MISMATCH; } + } + +#if __MigTypeCheck + msgh_size = Out0P->Head.msgh_size; + + if ((Out0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) || + ((msgh_size > (mach_msg_size_t)sizeof(__Reply) || msgh_size < (mach_msg_size_t)(sizeof(__Reply) - 896)) && + (msgh_size != (mach_msg_size_t)sizeof(mig_reply_error_t) || + Out0P->RetCode == KERN_SUCCESS))) + { return MIG_TYPE_ERROR ; } +#endif /* __MigTypeCheck */ + + if (Out0P->RetCode != KERN_SUCCESS) { + return ((mig_reply_error_t *)Out0P)->RetCode; + } + +#if __MigTypeCheck + if ( Out0P->new_stateCnt > 224 ) + return MIG_TYPE_ERROR; + if (((msgh_size - (mach_msg_size_t)(sizeof(__Reply) - 896)) / 4< Out0P->new_stateCnt) || + (msgh_size != (mach_msg_size_t)(sizeof(__Reply) - 896) + Out0P->new_stateCnt * 4)) + { return MIG_TYPE_ERROR ; } +#endif /* __MigTypeCheck */ + + return MACH_MSG_SUCCESS; +} +#endif /* !defined(__MIG_check__Reply__mach_exception_raise_state_identity_t__defined) */ +#endif /* __MIG_check__Reply__mach_exc_subsystem__ */ +#endif /* ( __MigTypeCheck ) */ + + +/* Routine mach_exception_raise_state_identity */ +mig_external kern_return_t mach_exception_raise_state_identity +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +) +{ + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } Request; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + mach_msg_trailer_t trailer; + } Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply; +#ifdef __MigPackStructs +#pragma pack() +#endif + /* + * typedef struct { + * mach_msg_header_t Head; + * NDR_record_t NDR; + * kern_return_t RetCode; + * } mig_reply_error_t; + */ + + union { + Request In; + Reply Out; + } Mess; + + Request *InP = &Mess.In; + Reply *Out0P = &Mess.Out; + + mach_msg_return_t msg_result; + unsigned int msgh_size; + unsigned int msgh_size_delta; + + +#ifdef __MIG_check__Reply__mach_exception_raise_state_identity_t__defined + kern_return_t check_result; +#endif /* __MIG_check__Reply__mach_exception_raise_state_identity_t__defined */ + + __DeclareSendRpc(2407, "mach_exception_raise_state_identity") + +#if UseStaticTemplates + const static mach_msg_port_descriptor_t threadTemplate = { + /* name = */ MACH_PORT_NULL, + /* pad1 = */ 0, + /* pad2 = */ 0, + /* disp = */ 19, + /* type = */ MACH_MSG_PORT_DESCRIPTOR, + }; +#endif /* UseStaticTemplates */ + +#if UseStaticTemplates + const static mach_msg_port_descriptor_t taskTemplate = { + /* name = */ MACH_PORT_NULL, + /* pad1 = */ 0, + /* pad2 = */ 0, + /* disp = */ 19, + /* type = */ MACH_MSG_PORT_DESCRIPTOR, + }; +#endif /* UseStaticTemplates */ + + InP->msgh_body.msgh_descriptor_count = 2; +#if UseStaticTemplates + InP->thread = threadTemplate; + InP->thread.name = thread; +#else /* UseStaticTemplates */ + InP->thread.name = thread; + InP->thread.disposition = 19; + InP->thread.type = MACH_MSG_PORT_DESCRIPTOR; +#endif /* UseStaticTemplates */ + +#if UseStaticTemplates + InP->task = taskTemplate; + InP->task.name = task; +#else /* UseStaticTemplates */ + InP->task.name = task; + InP->task.disposition = 19; + InP->task.type = MACH_MSG_PORT_DESCRIPTOR; +#endif /* UseStaticTemplates */ + + InP->NDR = NDR_record; + + InP->exception = exception; + + if (codeCnt > 2) { + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) InP->code, (const char *) code, 8 * codeCnt); + + InP->codeCnt = codeCnt; + + msgh_size_delta = (8 * codeCnt); + msgh_size = (mach_msg_size_t)(sizeof(Request) - 912) + msgh_size_delta; + InP = (Request *) ((pointer_t) InP + msgh_size_delta - 16); + + InP->flavor = *flavor; + + if (old_stateCnt > 224) { + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) InP->old_state, (const char *) old_state, 4 * old_stateCnt); + + InP->old_stateCnt = old_stateCnt; + + msgh_size += (4 * old_stateCnt); + InP = &Mess.In; + InP->Head.msgh_bits = MACH_MSGH_BITS_COMPLEX| + MACH_MSGH_BITS(19, MACH_MSG_TYPE_MAKE_SEND_ONCE); + /* msgh_size passed as argument */ + InP->Head.msgh_request_port = exception_port; + InP->Head.msgh_reply_port = mig_get_reply_port(); + InP->Head.msgh_id = 2407; + + __BeforeSendRpc(2407, "mach_exception_raise_state_identity") + msg_result = mach_msg(&InP->Head, MACH_SEND_MSG|MACH_RCV_MSG|MACH_MSG_OPTION_NONE, msgh_size, (mach_msg_size_t)sizeof(Reply), InP->Head.msgh_reply_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); + __AfterSendRpc(2407, "mach_exception_raise_state_identity") + if (msg_result != MACH_MSG_SUCCESS) { + __MachMsgErrorWithoutTimeout(msg_result); + { return msg_result; } + } + + +#if defined(__MIG_check__Reply__mach_exception_raise_state_identity_t__defined) + check_result = __MIG_check__Reply__mach_exception_raise_state_identity_t((__Reply__mach_exception_raise_state_identity_t *)Out0P); + if (check_result != MACH_MSG_SUCCESS) + { return check_result; } +#endif /* defined(__MIG_check__Reply__mach_exception_raise_state_identity_t__defined) */ + + *flavor = Out0P->flavor; + + if (Out0P->new_stateCnt > 224) { + (void)memcpy((char *) new_state, (const char *) Out0P->new_state, 4 * 224); + *new_stateCnt = Out0P->new_stateCnt; + { return MIG_ARRAY_TOO_LARGE; } + } + (void)memcpy((char *) new_state, (const char *) Out0P->new_state, 4 * Out0P->new_stateCnt); + + *new_stateCnt = Out0P->new_stateCnt; + + return KERN_SUCCESS; +} diff --git a/BasiliskII/src/Unix/sigsegv.cpp b/BasiliskII/src/Unix/sigsegv.cpp index 951b4c669..347e0f4ff 100644 --- a/BasiliskII/src/Unix/sigsegv.cpp +++ b/BasiliskII/src/Unix/sigsegv.cpp @@ -614,8 +614,10 @@ extern "C" { #include #include -#ifndef HAVE_MACH64_VM - +#ifdef __LP64__ +#include "mach_excServer.c" +#include "mach_excUser.c" +#else // Undefine this to prevent a preprocessor warning when compiling on a // 32-bit machine with Mac OS X 10.5. #undef MACH_EXCEPTION_CODES diff --git a/BasiliskII/src/Unix/sigsegv.h b/BasiliskII/src/Unix/sigsegv.h index 4f97668d4..8fdada9ee 100644 --- a/BasiliskII/src/Unix/sigsegv.h +++ b/BasiliskII/src/Unix/sigsegv.h @@ -110,6 +110,7 @@ extern "C" { #else #define SIGSEGV_FAULT_ADDRESS_FAST code[1] #endif + #define SIGSEGV_FAULT_INSTRUCTION_FAST SIGSEGV_INVALID_ADDRESS #define SIGSEGV_FAULT_HANDLER_ARGLIST mach_port_t thread, mach_exception_data_t code #define SIGSEGV_FAULT_HANDLER_ARGS thread, code diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index f53293a7c..c1b2b9f41 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -25,7 +25,10 @@ #error "Your compiler is not ANSI. Get a real one." #endif +#ifdef HAVE_CONFIG_H #include "config.h" +#endif + #include "user_strings_unix.h" #ifndef STDC_HEADERS @@ -210,7 +213,8 @@ typedef struct timeval tm_time_t; #define uae_u32 uint32 #define uae_s64 int64 #define uae_u64 uint64 -typedef uae_u32 uaecptr; +//typedef uae_u32 uaecptr; +typedef size_t uaecptr; /* Alignment restrictions */ #if defined(__i386__) || defined(__powerpc__) || defined(__m68k__) || defined(__x86_64__) diff --git a/BasiliskII/src/Unix/vm_alloc.cpp b/BasiliskII/src/Unix/vm_alloc.cpp index 11c3fddcd..57dd8169b 100644 --- a/BasiliskII/src/Unix/vm_alloc.cpp +++ b/BasiliskII/src/Unix/vm_alloc.cpp @@ -38,6 +38,7 @@ #include #include #include "vm_alloc.h" +#include "sysdeps.h" #if defined(__APPLE__) && defined(__MACH__) #include @@ -237,8 +238,36 @@ void * vm_acquire(size_t size, int options) #endif #if defined(HAVE_MACH_VM) - // vm_allocate() returns a zero-filled memory region - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, TRUE); + static size_t addrOffset = 0x80000000; + kern_return_t ret_code; + static uint8 *base32 = NULL; + + if(options & VM_MAP_32BIT) { +#ifdef __LP64__ + if((size < 0x08000000) && (addrOffset < 0x100000000ULL) && (base32 != NULL)) { + addr = (void *)(base32 + addrOffset); + ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, + size, VM_FLAGS_FIXED); + addrOffset += 0x08000000; + } else { + ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, + size, VM_FLAGS_ANYWHERE); + if((ret_code == KERN_SUCCESS) && (base32 == NULL)) { + base32 = (uint8_t *)addr; + } + + } +#else + // vm_allocate() returns a zero-filled memory region + ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, + size, VM_FLAGS_ANYWHERE); +#endif + } else { + // vm_allocate() returns a zero-filled memory region + ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, + size, VM_FLAGS_ANYWHERE); + } + if (ret_code != KERN_SUCCESS) { errno = vm_error(ret_code); return VM_MAP_FAILED; @@ -296,7 +325,13 @@ int vm_acquire_fixed(void * addr, size_t size, int options) #if defined(HAVE_MACH_VM) // vm_allocate() returns a zero-filled memory region - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, 0); +#ifdef __LP64__ + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, + VM_FLAGS_FIXED | VM_FLAGS_OVERWRITE); +#else + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, + VM_FLAGS_FIXED); +#endif if (ret_code != KERN_SUCCESS) { errno = vm_error(ret_code); return -1; From 1c99d52b91853244f0dfbb27aff9e5282b1916ff Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Fri, 28 Jun 2013 07:12:38 -0400 Subject: [PATCH 026/534] Added missing file. --- BasiliskII/src/Unix/mach_exc.h | 258 +++++++++++++++++++++++++++++++++ 1 file changed, 258 insertions(+) create mode 100644 BasiliskII/src/Unix/mach_exc.h diff --git a/BasiliskII/src/Unix/mach_exc.h b/BasiliskII/src/Unix/mach_exc.h new file mode 100644 index 000000000..716325f77 --- /dev/null +++ b/BasiliskII/src/Unix/mach_exc.h @@ -0,0 +1,258 @@ +#ifndef _mach_exc_user_ +#define _mach_exc_user_ + +/* Module mach_exc */ + +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#ifdef AUTOTEST +#ifndef FUNCTION_PTR_T +#define FUNCTION_PTR_T +typedef void (*function_ptr_t)(mach_port_t, char *, mach_msg_type_number_t); +typedef struct { + char *name; + function_ptr_t function; +} function_table_entry; +typedef function_table_entry *function_table_t; +#endif /* FUNCTION_PTR_T */ +#endif /* AUTOTEST */ + +#ifndef mach_exc_MSG_COUNT +#define mach_exc_MSG_COUNT 3 +#endif /* mach_exc_MSG_COUNT */ + +#include +#include +#include +#include + +#ifdef __BeforeMigUserHeader +__BeforeMigUserHeader +#endif /* __BeforeMigUserHeader */ + +#include +__BEGIN_DECLS + + +/* Routine mach_exception_raise */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t mach_exception_raise +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt +); + +/* Routine mach_exception_raise_state */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t mach_exception_raise_state +( + mach_port_t exception_port, + exception_type_t exception, + const mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + const thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +); + +/* Routine mach_exception_raise_state_identity */ +#ifdef mig_external +mig_external +#else +extern +#endif /* mig_external */ +kern_return_t mach_exception_raise_state_identity +( + mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t codeCnt, + int *flavor, + thread_state_t old_state, + mach_msg_type_number_t old_stateCnt, + thread_state_t new_state, + mach_msg_type_number_t *new_stateCnt +); + +__END_DECLS + +/********************** Caution **************************/ +/* The following data types should be used to calculate */ +/* maximum message sizes only. The actual message may be */ +/* smaller, and the position of the arguments within the */ +/* message layout may vary from what is presented here. */ +/* For example, if any of the arguments are variable- */ +/* sized, and less than the maximum is sent, the data */ +/* will be packed tight in the actual message to reduce */ +/* the presence of holes. */ +/********************** Caution **************************/ + +/* typedefs for all requests */ + +#ifndef __Request__mach_exc_subsystem__defined +#define __Request__mach_exc_subsystem__defined + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + } __Request__mach_exception_raise_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } __Request__mach_exception_raise_state_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + /* start of the kernel processed data */ + mach_msg_body_t msgh_body; + mach_msg_port_descriptor_t thread; + mach_msg_port_descriptor_t task; + /* end of the kernel processed data */ + NDR_record_t NDR; + exception_type_t exception; + mach_msg_type_number_t codeCnt; + int64_t code[2]; + int flavor; + mach_msg_type_number_t old_stateCnt; + natural_t old_state[224]; + } __Request__mach_exception_raise_state_identity_t; +#ifdef __MigPackStructs +#pragma pack() +#endif +#endif /* !__Request__mach_exc_subsystem__defined */ + +/* union of all requests */ + +#ifndef __RequestUnion__mach_exc_subsystem__defined +#define __RequestUnion__mach_exc_subsystem__defined +union __RequestUnion__mach_exc_subsystem { + __Request__mach_exception_raise_t Request_mach_exception_raise; + __Request__mach_exception_raise_state_t Request_mach_exception_raise_state; + __Request__mach_exception_raise_state_identity_t Request_mach_exception_raise_state_identity; +}; +#endif /* !__RequestUnion__mach_exc_subsystem__defined */ +/* typedefs for all replies */ + +#ifndef __Reply__mach_exc_subsystem__defined +#define __Reply__mach_exc_subsystem__defined + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + } __Reply__mach_exception_raise_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply__mach_exception_raise_state_t; +#ifdef __MigPackStructs +#pragma pack() +#endif + +#ifdef __MigPackStructs +#pragma pack(4) +#endif + typedef struct { + mach_msg_header_t Head; + NDR_record_t NDR; + kern_return_t RetCode; + int flavor; + mach_msg_type_number_t new_stateCnt; + natural_t new_state[224]; + } __Reply__mach_exception_raise_state_identity_t; +#ifdef __MigPackStructs +#pragma pack() +#endif +#endif /* !__Reply__mach_exc_subsystem__defined */ + +/* union of all replies */ + +#ifndef __ReplyUnion__mach_exc_subsystem__defined +#define __ReplyUnion__mach_exc_subsystem__defined +union __ReplyUnion__mach_exc_subsystem { + __Reply__mach_exception_raise_t Reply_mach_exception_raise; + __Reply__mach_exception_raise_state_t Reply_mach_exception_raise_state; + __Reply__mach_exception_raise_state_identity_t Reply_mach_exception_raise_state_identity; +}; +#endif /* !__RequestUnion__mach_exc_subsystem__defined */ + +#ifndef subsystem_to_name_map_mach_exc +#define subsystem_to_name_map_mach_exc \ + { "mach_exception_raise", 2405 },\ + { "mach_exception_raise_state", 2406 },\ + { "mach_exception_raise_state_identity", 2407 } +#endif + +#ifdef __AfterMigUserHeader +__AfterMigUserHeader +#endif /* __AfterMigUserHeader */ + +#endif /* _mach_exc_user_ */ From c01bd008dba6dadfda37e1964a1cc3359ed4ff50 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 6 Jul 2013 17:09:37 -0400 Subject: [PATCH 027/534] Hack to load code below 4GB, and to make 32-bit vm allocates work. --- BasiliskII/src/Unix/configure.ac | 26 +++++++++++++++++++------- BasiliskII/src/Unix/sigsegv.h | 2 +- BasiliskII/src/Unix/vm_alloc.cpp | 32 ++++++++++++++++++-------------- 3 files changed, 38 insertions(+), 22 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 095ee4c51..e5c3cd273 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -772,18 +772,20 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../SDL/SDLMain.m" fi fi + +AC_MSG_CHECKING([whether __LP64__ is defined]) +AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if !defined(__LP64__) + # error __LP64__ not defined + #endif + ]])], + [AC_MSG_RESULT(yes); LP64_DEFINED=yes], + [AC_MSG_RESULT(no)]) + if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) VIDEOSRCS="../SDL/video_sdl.cpp" KEYCODES="../SDL/keycodes" if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then - AC_MSG_CHECKING([whether __LP64__ is defined]) - AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if !defined(__LP64__) - # error __LP64__ not defined - #endif - ]])], - [AC_MSG_RESULT(yes); LP64_DEFINED=yes], - [AC_MSG_RESULT(no)]) if [[ "x$LP64_DEFINED" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx64.mm ../pict.c" else @@ -1774,6 +1776,16 @@ if [[ "x$HAVE_IPA" = "xyes" ]]; then LDFLAGS="$LDFLAGS -O3 -OPT:Olimit=0 -IPA" fi +if [[ "x$LP64_DEFINED" = "xyes" ] && [ "x$have_mach_vm" = "xyes" ]]; then +LIBS+=" -Wl,-pagezero_size,0x20000000" +LIBS+=" -Wl,-segaddr,__TEXT,0x60000000" +LIBS+=" -Wl,-segaddr,__PAGEZERO,0x20000000" +fi + +if [[ ${OS_TYPE} = darwin ]]; then +LIBS+=" -Wl,-no_pie" +fi + dnl Generate Makefile. AC_SUBST(DEFINES) AC_SUBST(SYSSRCS) diff --git a/BasiliskII/src/Unix/sigsegv.h b/BasiliskII/src/Unix/sigsegv.h index 8fdada9ee..26a9e5eb1 100644 --- a/BasiliskII/src/Unix/sigsegv.h +++ b/BasiliskII/src/Unix/sigsegv.h @@ -106,7 +106,7 @@ extern "C" { #define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIP->thr_state.MACH_FIELD_NAME(rax)) /* RAX is the first GPR we consider */ #endif #ifdef __x86_64__ -#define SIGSEGV_FAULT_ADDRESS_FAST (((uint64_t)code[1])|0x100000000) +#define SIGSEGV_FAULT_ADDRESS_FAST code[1] #else #define SIGSEGV_FAULT_ADDRESS_FAST code[1] #endif diff --git a/BasiliskII/src/Unix/vm_alloc.cpp b/BasiliskII/src/Unix/vm_alloc.cpp index 57dd8169b..4d3569c08 100644 --- a/BasiliskII/src/Unix/vm_alloc.cpp +++ b/BasiliskII/src/Unix/vm_alloc.cpp @@ -221,6 +221,9 @@ void vm_exit(void) /* Allocate zero-filled memory of SIZE bytes. The mapping is private and default protection bits are read / write. The return value is the actual mapping address chosen or VM_MAP_FAILED for errors. */ +#if defined(HAVE_MACH_VM) +static void *last_alloc = NULL; +#endif void * vm_acquire(size_t size, int options) { @@ -238,24 +241,18 @@ void * vm_acquire(size_t size, int options) #endif #if defined(HAVE_MACH_VM) - static size_t addrOffset = 0x80000000; + static size_t addrOffset = 0x20000000; kern_return_t ret_code; static uint8 *base32 = NULL; if(options & VM_MAP_32BIT) { #ifdef __LP64__ - if((size < 0x08000000) && (addrOffset < 0x100000000ULL) && (base32 != NULL)) { - addr = (void *)(base32 + addrOffset); - ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, - size, VM_FLAGS_FIXED); - addrOffset += 0x08000000; - } else { - ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, - size, VM_FLAGS_ANYWHERE); - if((ret_code == KERN_SUCCESS) && (base32 == NULL)) { - base32 = (uint8_t *)addr; - } - + addr = base32 + addrOffset; + ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, + size, VM_FLAGS_FIXED | VM_FLAGS_OVERWRITE); + if(ret_code == KERN_SUCCESS) { + last_alloc = addr; + base32 = base32 + size; } #else // vm_allocate() returns a zero-filled memory region @@ -325,9 +322,16 @@ int vm_acquire_fixed(void * addr, size_t size, int options) #if defined(HAVE_MACH_VM) // vm_allocate() returns a zero-filled memory region + #ifdef __LP64__ - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, + if(addr != last_alloc) { + return -1; + } + + kern_return_t ret_code = vm_allocate(mach_task_self(), + (vm_address_t *)&addr, size, VM_FLAGS_FIXED | VM_FLAGS_OVERWRITE); + #else kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, VM_FLAGS_FIXED); From 3c6788fd268920a8a7aca79f493d099c781cb302 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Mon, 8 Jul 2013 06:51:24 -0400 Subject: [PATCH 028/534] Tweak of the linker commands. --- BasiliskII/src/Unix/configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index e5c3cd273..96f48f323 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1778,7 +1778,7 @@ fi if [[ "x$LP64_DEFINED" = "xyes" ] && [ "x$have_mach_vm" = "xyes" ]]; then LIBS+=" -Wl,-pagezero_size,0x20000000" -LIBS+=" -Wl,-segaddr,__TEXT,0x60000000" +#LIBS+=" -Wl,-segaddr,__TEXT,0x60000000" LIBS+=" -Wl,-segaddr,__PAGEZERO,0x20000000" fi From 4f162dc6e376970b557b05885f31367c4a7b4ee8 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 29 Nov 2014 19:25:31 -0500 Subject: [PATCH 029/534] Minor build fixes. --- BasiliskII/src/Unix/Makefile.in | 2 +- BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index c52eab266..d1c8bb700 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -146,7 +146,7 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns etherhelpertool: ../MacOSX/etherhelpertool.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $< -o $@ + $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $(LDFLAGS) $< -o $@ modules: cd Linux/NetDriver; make diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp index f5a1aeb49..002618b4d 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -726,7 +726,7 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe } /* Convert the FP value to integer according to the current m68k rounding mode */ -PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) +PRIVATE uae_s32 FFPU toint(fpu_register const & src) { fpu_register result; switch (get_fpcr() & 0x30) { From b1270264a1e1fa5aac4e969ec5c5f42b5b979d31 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 29 Nov 2014 19:45:47 -0500 Subject: [PATCH 030/534] Changed page zero size to 4 kB to fix problem on OS X 10.10. --- BasiliskII/src/Unix/configure.ac | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 96f48f323..7dc71bce8 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1777,9 +1777,7 @@ if [[ "x$HAVE_IPA" = "xyes" ]]; then fi if [[ "x$LP64_DEFINED" = "xyes" ] && [ "x$have_mach_vm" = "xyes" ]]; then -LIBS+=" -Wl,-pagezero_size,0x20000000" -#LIBS+=" -Wl,-segaddr,__TEXT,0x60000000" -LIBS+=" -Wl,-segaddr,__PAGEZERO,0x20000000" +LIBS+=" -Wl,-pagezero_size,0x1000" fi if [[ ${OS_TYPE} = darwin ]]; then From b8fb05fbd0361bd404df560327c29c7fabb30677 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 31 Dec 2014 09:36:17 -0500 Subject: [PATCH 031/534] Minor build fixes Removed OS X -no_pie linker flag Fixed copy/paste error in ether helper help string Added missing distclean targets. --- BasiliskII/src/Unix/Makefile.in | 2 +- BasiliskII/src/Unix/configure.ac | 6 +----- 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index cc82326d3..54ae7fbd4 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -184,7 +184,7 @@ distclean: clean rm -rf $(OBJ_DIR) rm -rf autom4te.cache rm -f Makefile - rm -f config.cache config.log config.status config.h + rm -f config.cache config.log config.status config.h config.h.in configure rm -f Darwin/lowmem Darwin/pagezero depend dep: diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 62dd5adcd..ad073b7e8 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -28,7 +28,7 @@ dnl Apple Sound Chip Emulation AC_ARG_ENABLE(asc-emu, [ --enable-asc-emu enable Apple Sound Chip emulation [default=no]], [WANT_ASC_EMU=$enableval], [WANT_ASC_EMU=no]) dnl Mac OS X etherhelper support -AC_ARG_ENABLE(macosx-etherhelper, [ --enable-macosx-etherhelper enable Mac OS X Sound [default=no]], [WANT_MACOSX_ETHERHELPER=$enableval], [WANT_MACOSX_ETHERHELPER=no]) +AC_ARG_ENABLE(macosx-etherhelper, [ --enable-macosx-etherhelper enable Mac OS X Ethernet Helper Program [default=no]], [WANT_MACOSX_ETHERHELPER=$enableval], [WANT_MACOSX_ETHERHELPER=no]) dnl 32-bit build AC_ARG_ENABLE(32-bit-build, [ --enable-32-bit-build enable a 32-bit build [default=no]], [WANT_32BIT_BUILD=$enableval], [WANT_32BIT_BUILD=no]) @@ -1783,10 +1783,6 @@ if [[ "x$LP64_DEFINED" = "xyes" ] && [ "x$have_mach_vm" = "xyes" ]]; then LIBS+=" -Wl,-pagezero_size,0x1000" fi -if [[ ${OS_TYPE} = darwin ]]; then -LIBS+=" -Wl,-no_pie" -fi - dnl Generate Makefile. AC_SUBST(DEFINES) AC_SUBST(SYSSRCS) From fcc15980869f4e00619af9f967bf4e097b10e189 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 14 Jan 2015 19:23:26 -0500 Subject: [PATCH 032/534] Add no_pie linker flag for Mac OS X 10.6 and later. --- BasiliskII/src/Unix/configure.ac | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index ad073b7e8..bd7fbd8e3 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1779,6 +1779,13 @@ if [[ "x$HAVE_IPA" = "xyes" ]]; then LDFLAGS="$LDFLAGS -O3 -OPT:Olimit=0 -IPA" fi +if [[ `uname -s` = Darwin ]]; then + MACOSVERSION=`sw_vers -productVersion | cut -d. -f2` + if [[ ${MACOSVERSION} -gt 6 ]]; then + LIBS+=" -Wl,-no_pie" + fi +fi + if [[ "x$LP64_DEFINED" = "xyes" ] && [ "x$have_mach_vm" = "xyes" ]]; then LIBS+=" -Wl,-pagezero_size,0x1000" fi From c91ef547bd7912c618da62854416348a8f0d8eb2 Mon Sep 17 00:00:00 2001 From: Dave Vasilevsky Date: Mon, 28 Dec 2015 23:26:19 -0500 Subject: [PATCH 033/534] Allow building with GCC 5 * Disable -freorder-blocks-and-partition, since it can override -fno-reorder-blocks * Disable look-header copying, since it tends to cause early returns * Disable argument pushing, we don't want to change esp --- SheepShaver/src/Unix/configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 11e4c10a5..31b6341c4 100644 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -1575,7 +1575,7 @@ if [[ "x$EMULATED_PPC" = "xyes" ]]; then fi DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -finline-functions -finline-limit=10000 -fno-exceptions -g0" if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls" + DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls -fno-reorder-blocks-and-partition -fno-tree-ch -mno-push-args" fi if [[ "x$DYNGEN_CC" != "x$CXX" ]]; then DYNGEN_CFLAGS="-O2 $CFLAGS" From f64b888f788278bd703f568fa01185cce7615818 Mon Sep 17 00:00:00 2001 From: Dave Vasilevsky Date: Mon, 28 Dec 2015 23:28:17 -0500 Subject: [PATCH 034/534] Make dyngen_barrier() stronger on x86 GCC 5 will optimize out an empty 'asm volatile' in op_sraw_T0_T1, and then give us multiple return points. Add a nop so it doesn't do this, at the cost of lower code density. --- SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h index 8c12fe6b8..bf772a58b 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h +++ b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h @@ -61,7 +61,11 @@ #endif // Force only one return point +#if defined(__i386__) || defined(__x86_64__) +#define dyngen_barrier() asm volatile ("nop") +#else #define dyngen_barrier() asm volatile ("") +#endif #ifndef OPPROTO #define OPPROTO From 7710322fd3899d7a02c112fc9a7dc7e46c73a2ba Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Tue, 15 Mar 2016 20:03:59 -0400 Subject: [PATCH 035/534] Linux etherhelper support. --- BasiliskII/src/Unix/Linux/etherhelpertool.c | 624 ++++++++++++++++++++ BasiliskII/src/Unix/Linux/runtool.c | 58 ++ BasiliskII/src/Unix/ether_unix.cpp | 28 +- 3 files changed, 709 insertions(+), 1 deletion(-) create mode 100644 BasiliskII/src/Unix/Linux/etherhelpertool.c create mode 100644 BasiliskII/src/Unix/Linux/runtool.c diff --git a/BasiliskII/src/Unix/Linux/etherhelpertool.c b/BasiliskII/src/Unix/Linux/etherhelpertool.c new file mode 100644 index 000000000..980643bc7 --- /dev/null +++ b/BasiliskII/src/Unix/Linux/etherhelpertool.c @@ -0,0 +1,624 @@ +/* + * etherhelpertool.c - Reads and writes raw ethernet packets usng bpf + * interface. + * + * Copyright (C) 2010, Daniel Sumorok + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 +#include + +#include +#include +#include +#include +#include + +#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include + +#include + +#include + +#define STR_MAX 256 +#define MAX_ARGV 10 + +static int remove_bridge = 0; +static const char *exec_name = "etherhelpertool"; + +static int main_loop(int sd, int use_bpf); +static int open_tap(char *ifname); +static int run_cmd(const char *cmd); +static void handler(int signum); +static int install_signal_handlers(void); +static void do_exit(void); +static int open_bpf(char *ifname); + +int main(int argc, char **argv) +{ + char *if_name; + int ret = 255; + int sd = -1; + int tapNum; + int use_bpf; + + if (argc != 2) { + return 255; + } + + if_name = argv[1]; + + do { + if (strncmp(if_name, "tap", 3) == 0) { + sd = open_tap(if_name); + use_bpf = 0; + } else { + sd = open_bpf(if_name); + use_bpf = 1; + } + + if (sd < 0) { + fprintf(stderr, "%s: open device failed.\n", + exec_name); + ret = 253; + break; + } + + if (install_signal_handlers() != 0) { + fprintf(stderr, + "%s: failed to install signal handers.\n", + exec_name); + ret = 252; + break; + } + + ret = main_loop(sd, use_bpf); + close(sd); + } while (0); + + do_exit(); + + return ret; +} + +static int main_loop(int sd, int use_bpf) +{ + fd_set readSet; + char *outgoing, *incoming; + unsigned short *out_len; + unsigned short *in_len; + int in_index, out_index; + u_int blen = 0; + int ret; + int fret = 0; + int pkt_len; + int frame_len; + int pad; + char c = 0; + + blen = 4096; + + incoming = malloc(blen); + if (incoming == NULL) { + fprintf(stderr, + "%s: malloc() failed.\n", + exec_name); + return -2; + } + + outgoing = malloc(blen); + if (outgoing == NULL) { + free(outgoing); + fprintf(stderr, + "%s: malloc() failed.\n", + exec_name); + return -3; + } + + in_index = 0; + out_index = 0; + + out_len = (unsigned short *)outgoing; + + /* Let our parent know we are ready for business. */ + if(write(0, &c, 1) != 1) { + fprintf(stderr, "%s: Failed to notify main application: %s\n", + __func__, strerror(errno)); + } + + while (1) { + int i; + FD_ZERO(&readSet); + FD_SET(0, &readSet); + FD_SET(sd, &readSet); + + ret = select(sd + 1, &readSet, NULL, NULL, NULL); + if (ret < 0) { + fprintf(stderr, + "%s: select() failed.\n", + exec_name); + fret = -4; + break; + } + + if (FD_ISSET(0, &readSet)) { + if (out_index < 2) { + ret = read(0, outgoing + out_index, 2-out_index); + } else { + ret = read(0, outgoing + out_index, *out_len - out_index + 2); + } + + if (ret < 1) { + if(ret < 0) { + fprintf(stderr, + "%s: read() failed.\n", + exec_name); + } + fret = -5; + break; + } + + out_index += ret; + + if (out_index > 1) { + if ((*out_len + 2) > blen) { + fret = -6; + break; + } + + if (out_index == (*out_len + 2)) { + ret = write(sd, out_len + 1, *out_len); + if (ret != *out_len) { + fprintf(stderr, + "%s: write() failed.\n", + exec_name); + fret = -7; + break; + } + + out_index = 0; + } + } + + } + + if (FD_ISSET(sd, &readSet)) { + in_len = (unsigned short *)incoming; + + pkt_len = read(sd, in_len + 1, blen-2); + if (pkt_len < 14) { + fprintf(stderr, + "%s: read() returned %d.\n", + exec_name, pkt_len); + fret = -8; + break; + } + *in_len = pkt_len; + + if (write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { + fprintf(stderr, + "%s: write() failed\n", + exec_name); + fret = -10; + break; + } + } + } + + free(incoming); + free(outgoing); + + return fret; +} + + +static int open_tap(char *ifname) +{ + char str[STR_MAX] = {0}; + char ifstr[STR_MAX] = {0}; + char *interface; + char *address = NULL; + char *netmask = NULL; + char *bridge = NULL; + char *bridged_if = NULL; + int sd; + + snprintf(ifstr, STR_MAX, "%s", ifname); + interface = strtok(ifstr, "/"); + bridge = strtok(NULL, "/"); + if (bridge != NULL) { + bridged_if = strtok(NULL, "/"); + } + interface = strtok(ifstr, ":"); + + address = strtok(NULL, ":"); + + if (address != NULL) { + netmask = strtok(NULL, ":"); + } + + snprintf(str, STR_MAX, "/dev/%s", interface); + + sd = open(str, O_RDWR); + if (sd < 0) { + fprintf(stderr, "%s: Failed to open %s\n", + exec_name, interface); + return -1; + } + + if (address == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", interface); + } else if (netmask == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s", + interface, address); + } else { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s netmask %s", + interface, address, netmask); + } + + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to configure %s\n", + exec_name, interface); + close(sd); + return -1; + } + + if (bridge != NULL) { + /* Check to see if bridge is alread up */ + snprintf(str, STR_MAX, "/sbin/ifconfig %s", bridge); + if (run_cmd(str) == 0) { + /* bridge is already up */ + if (bridged_if != NULL) { + fprintf(stderr, "%s: Warning: %s already exists, so %s was not added.\n", + exec_name, bridge, bridged_if); + } + } else { + snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to create %s\n", + exec_name, bridge); + close(sd); + return -1; + } + remove_bridge = 1; + + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to open %s\n", + exec_name, bridge); + close(sd); + return -1; + } + + if (bridged_if != NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, bridged_if); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to add %s to %s\n", + exec_name, bridged_if, bridge); + close(sd); + return -1; + } + } + + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, interface); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to add %s to %s\n", + exec_name, interface, bridge); + close(sd); + return -1; + } + } + } + + return sd; +} + +static int run_cmd(const char *cmd) { + char cmd_buffer[STR_MAX] = {0}; + char *argv[MAX_ARGV + 1] = {0}; + int i; + pid_t pid, waitpid; + int status = 0; + + /* Collect arguments */ + strncpy(cmd_buffer, cmd, STR_MAX-1); + + argv[0] = strtok(cmd_buffer, " "); + for (i=1; i +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#define STR_MAX 1024 +#define MAX_ARGV 10 + +FILE * run_tool(const char *if_name, const char *tool_name) { + char cmd_buffer[STR_MAX] = {0}; + char * const argv[3] = {NULL, NULL, NULL}; + int i; + pid_t pid, waitpid; + int status = 0; + int fds[2]; + char c; + + if(socketpair(PF_LOCAL, SOCK_STREAM, 0, fds) != 0) { + fprintf(stderr, "%s: socketpair() failed: %s\n", + __func__, strerror(errno)); + return NULL; + } + + ((const char**)argv)[0] = tool_name; + ((const char**)argv)[1] = if_name; + + /* Run sub process */ + pid = fork(); + if (pid == 0) { + /* Child process */ + fclose(stdout); + fclose(stdin); + dup2(fds[0], 0); + close(fds[1]); + close(fds[0]); + + if (execve(tool_name, argv, NULL) < 0) { + perror("execve"); + exit(1); + } + } + + + close(fds[0]); + + if(read(fds[1], &c, 1) < 1) { + close(fds[1]); + return NULL; + } + + return fdopen(fds[1], "rw"); +} diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 3c588dd19..26f90a7b4 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -43,7 +43,16 @@ #include #ifdef ENABLE_MACOSX_ETHERHELPER + +#ifdef __APPLE__ #include +#endif + +#ifdef __linux__ +#include +#endif + +#include #include #endif @@ -1140,8 +1149,13 @@ static int get_mac_address(const char* dev, unsigned char *addr) { struct ifaddrs *ifaddrs, *next; int ret = -1; +#ifdef __APPLE__ struct sockaddr_dl *sa; +#endif +#ifdef __linux__ + struct sockaddr_ll *sa; +#endif if (getifaddrs(&ifaddrs) != 0) { perror("getifaddrs"); return -1; @@ -1150,6 +1164,7 @@ static int get_mac_address(const char* dev, unsigned char *addr) next = ifaddrs; while (next != NULL) { switch (next->ifa_addr->sa_family) { +#ifdef __APPLE__ case AF_LINK: if (!strcmp(dev, next->ifa_name)) { sa = (struct sockaddr_dl *)next->ifa_addr; @@ -1157,6 +1172,17 @@ static int get_mac_address(const char* dev, unsigned char *addr) ret = 0; } break; +#endif + +#ifdef __linux__ + case AF_PACKET: + if (!strcmp(dev, next->ifa_name)) { + sa = (struct sockaddr_ll *)next->ifa_addr; + memcpy(addr, sa->sll_addr, 6); + ret = 0; + } + break; +#endif default: break; } @@ -1240,7 +1266,7 @@ static int read_packet() } index += ret; - + if (index > 1) { if (*pkt_len > (sizeof(packet_buffer) + 2)) { fprintf(stderr, "%s: pkt_len (%d) too large.\n", __func__, *pkt_len); From 1d84d4051889896e4fd1a7d147fa5ebe8b7c61dd Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Wed, 16 Mar 2016 18:40:33 -0400 Subject: [PATCH 036/534] Linux etherhelper build updates. --- BasiliskII/src/Unix/Makefile.in | 4 +++- BasiliskII/src/Unix/configure.ac | 14 ++++++++++++-- 2 files changed, 15 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 54ae7fbd4..6caa0768a 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -43,6 +43,8 @@ GUI_LIBS = @GUI_LIBS@ GUI_SRCS = ../prefs.cpp prefs_unix.cpp prefs_editor_gtk.cpp ../prefs_items.cpp \ ../user_strings.cpp user_strings_unix.cpp xpram_unix.cpp sys_unix.cpp rpc_unix.cpp +ETHERHELPERDIR = @ETHERHELPERDIR@ + ## Files SRCS = ../main.cpp ../prefs.cpp ../prefs_items.cpp \ sys_unix.cpp ../rom_patches.cpp ../slot_rom.cpp ../rsrc_patches.cpp \ @@ -145,7 +147,7 @@ $(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns mkdir -p $(GUI_APP_APP)/Contents/Resources ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns -etherhelpertool: ../MacOSX/etherhelpertool.c +etherhelpertool: $(ETHERHELPERDIR)/etherhelpertool.c $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(LIBS) $(LDFLAGS) $< -o $@ modules: diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index bd7fbd8e3..9389f5a15 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -756,8 +756,18 @@ if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then fi if [[ "x$WANT_MACOSX_ETHERHELPER" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.c" - LIBS="$LIBS -framework Security" + if [[ ${OS_TYPE} = "linux" ]]; then + EXTRASYSSRCS="$EXTRASYSSRCS ../Linux/runtool.c" + ETHERHELPERDIR=../Linux + fi + + if [[ ${OS_TYPE} = "darwin" ]]; then + EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/runtool.c" + LIBS="$LIBS -framework Security" + ETHERHELPERDIR=../MacOSX + fi + + AC_SUBST(ETHERHELPERDIR, ${ETHERHELPERDIR}) AC_DEFINE(ENABLE_MACOSX_ETHERHELPER, 1, [Define if supporting "etherhelper" network device.]) fi From dee3f7e1c50437d3da5da2f06a7649e9f51157e4 Mon Sep 17 00:00:00 2001 From: Dan Sumorok Date: Sat, 19 Mar 2016 19:17:48 -0400 Subject: [PATCH 037/534] Added tap/bridge support to ether helper. --- BasiliskII/src/Unix/Linux/etherhelpertool.c | 246 +++++--------------- 1 file changed, 64 insertions(+), 182 deletions(-) diff --git a/BasiliskII/src/Unix/Linux/etherhelpertool.c b/BasiliskII/src/Unix/Linux/etherhelpertool.c index 980643bc7..5d6117bc7 100644 --- a/BasiliskII/src/Unix/Linux/etherhelpertool.c +++ b/BasiliskII/src/Unix/Linux/etherhelpertool.c @@ -50,6 +50,7 @@ #define MAX_ARGV 10 static int remove_bridge = 0; +static char bridge_name[STR_MAX]; static const char *exec_name = "etherhelpertool"; static int main_loop(int sd, int use_bpf); @@ -193,13 +194,24 @@ static int main_loop(int sd, int use_bpf) } if (out_index == (*out_len + 2)) { - ret = write(sd, out_len + 1, *out_len); - if (ret != *out_len) { - fprintf(stderr, - "%s: write() failed.\n", - exec_name); - fret = -7; - break; + if(use_bpf) { + ret = write(sd, out_len + 1, *out_len); + if (ret != *out_len) { + fprintf(stderr, + "%s: write() failed.\n", + exec_name); + fret = -7; + break; + } + } else { + ret = write(sd, out_len + 1, *out_len); + if (ret != *out_len) { + fprintf(stderr, + "%s: write() failed.\n", + exec_name); + fret = -7; + break; + } } out_index = 0; @@ -213,7 +225,7 @@ static int main_loop(int sd, int use_bpf) pkt_len = read(sd, in_len + 1, blen-2); if (pkt_len < 14) { - fprintf(stderr, + fprintf(stderr, "%s: read() returned %d.\n", exec_name, pkt_len); fret = -8; @@ -222,7 +234,7 @@ static int main_loop(int sd, int use_bpf) *in_len = pkt_len; if (write(0, in_len, pkt_len + 2) < (pkt_len + 2)) { - fprintf(stderr, + fprintf(stderr, "%s: write() failed\n", exec_name); fret = -10; @@ -248,6 +260,7 @@ static int open_tap(char *ifname) char *bridge = NULL; char *bridged_if = NULL; int sd; + struct ifreq ifr = {0}; snprintf(ifstr, STR_MAX, "%s", ifname); interface = strtok(ifstr, "/"); @@ -263,24 +276,33 @@ static int open_tap(char *ifname) netmask = strtok(NULL, ":"); } - snprintf(str, STR_MAX, "/dev/%s", interface); - - sd = open(str, O_RDWR); + sd = open("/dev/net/tun", O_RDWR); if (sd < 0) { fprintf(stderr, "%s: Failed to open %s\n", exec_name, interface); return -1; } - if (address == NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s up", interface); - } else if (netmask == NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s %s", - interface, address); - } else { - snprintf(str, STR_MAX, "/sbin/ifconfig %s %s netmask %s", - interface, address, netmask); - } + snprintf(str, STR_MAX, "/dev/%s", interface); + ifr.ifr_flags = IFF_TAP | IFF_NO_PI; + strncpy(ifr.ifr_name, interface, IFNAMSIZ); + + if(ioctl(sd, TUNSETIFF, (void *)&ifr) != 0) { + fprintf(stderr, "%s: ioctl(TUNSETIFF): %s\n", + __func__, strerror(errno)); + close(sd); + return -1; + } + + if (address == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", interface); + } else if (netmask == NULL) { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s", + interface, address); + } else { + snprintf(str, STR_MAX, "/sbin/ifconfig %s %s netmask %s", + interface, address, netmask); + } if (run_cmd(str) != 0) { fprintf(stderr, "%s: Failed to configure %s\n", @@ -299,7 +321,7 @@ static int open_tap(char *ifname) exec_name, bridge, bridged_if); } } else { - snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); + snprintf(str, STR_MAX, "/sbin/brctl addbr %s", bridge); if (run_cmd(str) != 0) { fprintf(stderr, "%s: Failed to create %s\n", exec_name, bridge); @@ -308,6 +330,8 @@ static int open_tap(char *ifname) } remove_bridge = 1; + strncpy(bridge_name, bridge, STR_MAX); + snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); if (run_cmd(str) != 0) { fprintf(stderr, "%s: Failed to open %s\n", @@ -317,7 +341,7 @@ static int open_tap(char *ifname) } if (bridged_if != NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + snprintf(str, STR_MAX, "/sbin/brctl addif %s %s", bridge, bridged_if); if (run_cmd(str) != 0) { fprintf(stderr, "%s: Failed to add %s to %s\n", @@ -326,8 +350,8 @@ static int open_tap(char *ifname) return -1; } } - - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + + snprintf(str, STR_MAX, "/sbin/brctl addif %s %s", bridge, interface); if (run_cmd(str) != 0) { fprintf(stderr, "%s: Failed to add %s to %s\n", @@ -416,8 +440,22 @@ static int install_signal_handlers() { } static void do_exit() { + char cmd[STR_MAX]; + if (remove_bridge) { - run_cmd("/sbin/ifconfig bridge0 destroy"); + snprintf(cmd, STR_MAX, "/sbin/ifconfig %s down", + bridge_name); + + if(run_cmd(cmd) != 0) { + fprintf(stderr, "Failed to bring bridge down\n"); + } + + snprintf(cmd, STR_MAX, "/sbin/brctl delbr %s", + bridge_name); + + if(run_cmd(cmd) != 0) { + fprintf(stderr, "Failed to destroy bridge\n"); + } } } @@ -466,159 +504,3 @@ static int open_bpf(char *ifname) return sd; } - -#if 0 -static int retreive_auth_info(void); - - -static int retreive_auth_info(void) -{ - AuthorizationRef aRef; - OSStatus status; - AuthorizationRights myRights; - AuthorizationRights *newRights; - AuthorizationItem *myItem; - AuthorizationItem myItems[1]; - AuthorizationItemSet *mySet; - int i; - - status = AuthorizationCopyPrivilegedReference(&aRef, kAuthorizationFlagDefaults); - if (status != errAuthorizationSuccess) { - return -1; - } - - status = AuthorizationCopyInfo(aRef, NULL, &mySet); - if (status != errAuthorizationSuccess) { - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - return -1; - } - - myItems[0].name = "system.privilege.admin"; - myItems[0].valueLength = 0; - myItems[0].value = NULL; - myItems[0].flags = 0; - - myRights.count = sizeof (myItems) / sizeof (myItems[0]); - myRights.items = myItems; - - status = AuthorizationCopyRights(aRef, &myRights, NULL, - kAuthorizationFlagExtendRights, - &newRights); - if (status != errAuthorizationSuccess) { - AuthorizationFreeItemSet(mySet); - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - return -2; - } - - AuthorizationFreeItemSet(newRights); - AuthorizationFreeItemSet(mySet); - AuthorizationFree(aRef, kAuthorizationFlagDestroyRights); - - return 0; -} - -static int open_tap(char *ifname) -{ - char str[STR_MAX] = {0}; - char ifstr[STR_MAX] = {0}; - char *interface; - char *address = NULL; - char *netmask = NULL; - char *bridge = NULL; - char *bridged_if = NULL; - int sd; - - snprintf(ifstr, STR_MAX, "%s", ifname); - interface = strtok(ifstr, "/"); - bridge = strtok(NULL, "/"); - if (bridge != NULL) { - bridged_if = strtok(NULL, "/"); - } - interface = strtok(ifstr, ":"); - - address = strtok(NULL, ":"); - - if (address != NULL) { - netmask = strtok(NULL, ":"); - } - - snprintf(str, STR_MAX, "/dev/%s", interface); - - sd = open(str, O_RDWR); - if (sd < 0) { - fprintf(stderr, "%s: Failed to open %s\n", - exec_name, interface); - return -1; - } - - if (address == NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s up", interface); - } else if (netmask == NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s %s", - interface, address); - } else { - snprintf(str, STR_MAX, "/sbin/ifconfig %s %s netmask %s", - interface, address, netmask); - } - - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to configure %s\n", - exec_name, interface); - close(sd); - return -1; - } - - if (bridge != NULL) { - /* Check to see if bridge is alread up */ - snprintf(str, STR_MAX, "/sbin/ifconfig %s", bridge); - if (run_cmd(str) == 0) { - /* bridge is already up */ - if (bridged_if != NULL) { - fprintf(stderr, "%s: Warning: %s already exists, so %s was not added.\n", - exec_name, bridge, bridged_if); - } - } else { - snprintf(str, STR_MAX, "/sbin/ifconfig %s create", bridge); - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to create %s\n", - exec_name, bridge); - close(sd); - return -1; - } - remove_bridge = 1; - - snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to open %s\n", - exec_name, bridge); - close(sd); - return -1; - } - - if (bridged_if != NULL) { - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", - bridge, bridged_if); - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to add %s to %s\n", - exec_name, bridged_if, bridge); - close(sd); - return -1; - } - } - - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", - bridge, interface); - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to add %s to %s\n", - exec_name, interface, bridge); - close(sd); - return -1; - } - } - } - - return sd; -} - - -#endif From b74ae092c942fbe0fd55a6c082b62487f901fda9 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 04:41:40 -0800 Subject: [PATCH 038/534] builds on mingw32 without jit, still untested --- .gitignore | 134 +++++ BasiliskII/src/include/debug.h | 2 + SheepShaver/Makefile | 3 +- SheepShaver/src/BeOS/SheepDriver | 1 - SheepShaver/src/BeOS/SheepNet | 1 - SheepShaver/src/BeOS/audio_beos.cpp | 1 - SheepShaver/src/BeOS/extfs_beos.cpp | 1 - SheepShaver/src/BeOS/scsi_beos.cpp | 1 - SheepShaver/src/BeOS/serial_beos.cpp | 1 - SheepShaver/src/BeOS/sys_beos.cpp | 1 - SheepShaver/src/BeOS/timer_beos.cpp | 1 - SheepShaver/src/BeOS/xpram_beos.cpp | 1 - SheepShaver/src/CrossPlatform/sigsegv.cpp | 1 - SheepShaver/src/CrossPlatform/sigsegv.h | 1 - SheepShaver/src/CrossPlatform/video_blit.cpp | 1 - SheepShaver/src/CrossPlatform/video_blit.h | 1 - SheepShaver/src/CrossPlatform/video_vosf.h | 1 - SheepShaver/src/CrossPlatform/vm_alloc.cpp | 1 - SheepShaver/src/CrossPlatform/vm_alloc.h | 1 - SheepShaver/src/MacOSX/AudioBackEnd.cpp | 1 - SheepShaver/src/MacOSX/AudioBackEnd.h | 1 - SheepShaver/src/MacOSX/AudioDevice.cpp | 1 - SheepShaver/src/MacOSX/AudioDevice.h | 1 - SheepShaver/src/MacOSX/MacOSX_sound_if.cpp | 1 - SheepShaver/src/MacOSX/MacOSX_sound_if.h | 1 - SheepShaver/src/MacOSX/audio_macosx.cpp | 1 - SheepShaver/src/MacOSX/clip_macosx.cpp | 1 - SheepShaver/src/MacOSX/clip_macosx64.mm | 1 - SheepShaver/src/MacOSX/extfs_macosx.cpp | 1 - SheepShaver/src/MacOSX/macos_util_macosx.h | 1 - SheepShaver/src/MacOSX/sys_darwin.cpp | 1 - SheepShaver/src/MacOSX/utils_macosx.h | 1 - SheepShaver/src/MacOSX/utils_macosx.mm | 1 - SheepShaver/src/SDL | 1 - SheepShaver/src/Unix/Darwin/lowmem.c | 1 - SheepShaver/src/Unix/Darwin/mkstandalone | 1 - SheepShaver/src/Unix/Darwin/pagezero.c | 1 - SheepShaver/src/Unix/Darwin/testlmem.sh | 1 - SheepShaver/src/Unix/Irix/audio_irix.cpp | 1 - SheepShaver/src/Unix/Linux/NetDriver | 1 - SheepShaver/src/Unix/Linux/scsi_linux.cpp | 1 - SheepShaver/src/Unix/audio_oss_esd.cpp | 1 - SheepShaver/src/Unix/bincue_unix.cpp | 1 - SheepShaver/src/Unix/bincue_unix.h | 1 - SheepShaver/src/Unix/clip_unix.cpp | 1 - SheepShaver/src/Unix/config.guess | 1 - SheepShaver/src/Unix/config.sub | 1 - SheepShaver/src/Unix/cpr.sh | 1 - SheepShaver/src/Unix/disk_sparsebundle.cpp | 1 - SheepShaver/src/Unix/disk_unix.h | 1 - SheepShaver/src/Unix/ether_unix.cpp | 1 - SheepShaver/src/Unix/extfs_unix.cpp | 1 - SheepShaver/src/Unix/keycodes | 1 - SheepShaver/src/Unix/ldscripts | 1 - SheepShaver/src/Unix/m4 | 1 - SheepShaver/src/Unix/posix_sem.cpp | 1 - SheepShaver/src/Unix/rpc.h | 1 - SheepShaver/src/Unix/rpc_unix.cpp | 1 - SheepShaver/src/Unix/semaphore.h | 1 - SheepShaver/src/Unix/serial_unix.cpp | 1 - SheepShaver/src/Unix/sshpty.c | 1 - SheepShaver/src/Unix/sshpty.h | 1 - SheepShaver/src/Unix/strlcpy.c | 1 - SheepShaver/src/Unix/strlcpy.h | 1 - SheepShaver/src/Unix/sys_unix.cpp | 1 - SheepShaver/src/Unix/timer_unix.cpp | 1 - SheepShaver/src/Unix/tinyxml2.cpp | 1 - SheepShaver/src/Unix/tinyxml2.h | 1 - SheepShaver/src/Unix/tunconfig | 1 - SheepShaver/src/Unix/vhd_unix.cpp | 1 - SheepShaver/src/Unix/xpram_unix.cpp | 1 - SheepShaver/src/Windows/Makefile.in | 14 +- SheepShaver/src/Windows/b2ether | 1 - SheepShaver/src/Windows/build_on_msys.py | 550 ++++++++++++++++++ SheepShaver/src/Windows/cd_defs.h | 1 - SheepShaver/src/Windows/cdenable | 1 - SheepShaver/src/Windows/clip_windows.cpp | 1 - SheepShaver/src/Windows/configure.ac | 12 +- SheepShaver/src/Windows/ether_windows.cpp | 1 - SheepShaver/src/Windows/ether_windows.h | 1 - SheepShaver/src/Windows/extfs_windows.cpp | 1 - SheepShaver/src/Windows/kernel_windows.cpp | 1 - SheepShaver/src/Windows/kernel_windows.h | 1 - SheepShaver/src/Windows/main_windows.cpp | 10 +- SheepShaver/src/Windows/posix_emu.cpp | 1 - SheepShaver/src/Windows/posix_emu.h | 1 - SheepShaver/src/Windows/prefs_editor_gtk.cpp | 1 - SheepShaver/src/Windows/router | 1 - SheepShaver/src/Windows/sdl_fix.patch | 12 + SheepShaver/src/Windows/serial_windows.cpp | 1 - SheepShaver/src/Windows/sys_windows.cpp | 1 - SheepShaver/src/Windows/sysdeps.h | 24 +- SheepShaver/src/Windows/timer_windows.cpp | 1 - SheepShaver/src/Windows/util_windows.cpp | 1 - SheepShaver/src/Windows/util_windows.h | 1 - SheepShaver/src/Windows/xpram_windows.cpp | 1 - SheepShaver/src/adb.cpp | 1 - SheepShaver/src/audio.cpp | 1 - SheepShaver/src/cdrom.cpp | 1 - SheepShaver/src/disk.cpp | 1 - SheepShaver/src/dummy/audio_dummy.cpp | 1 - SheepShaver/src/dummy/clip_dummy.cpp | 1 - SheepShaver/src/dummy/prefs_editor_dummy.cpp | 1 - SheepShaver/src/dummy/scsi_dummy.cpp | 1 - SheepShaver/src/dummy/serial_dummy.cpp | 1 - SheepShaver/src/ether.cpp | 2 + SheepShaver/src/extfs.cpp | 1 - SheepShaver/src/gfxaccel.cpp | 2 + SheepShaver/src/include/adb.h | 1 - SheepShaver/src/include/audio.h | 1 - SheepShaver/src/include/audio_defs.h | 1 - SheepShaver/src/include/cdrom.h | 1 - SheepShaver/src/include/clip.h | 1 - SheepShaver/src/include/debug.h | 1 - SheepShaver/src/include/disk.h | 1 - SheepShaver/src/include/extfs.h | 1 - SheepShaver/src/include/extfs_defs.h | 1 - SheepShaver/src/include/main.h | 11 + SheepShaver/src/include/pict.h | 1 - SheepShaver/src/include/prefs.h | 1 - SheepShaver/src/include/scsi.h | 1 - SheepShaver/src/include/serial.h | 1 - SheepShaver/src/include/serial_defs.h | 1 - SheepShaver/src/include/sony.h | 1 - SheepShaver/src/include/sys.h | 1 - SheepShaver/src/include/timer.h | 1 - SheepShaver/src/include/xpram.h | 1 - .../src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h | 1 - SheepShaver/src/pict.c | 1 - SheepShaver/src/prefs.cpp | 1 - SheepShaver/src/scsi.cpp | 1 - SheepShaver/src/slirp | 1 - SheepShaver/src/sony.cpp | 1 - SheepShaver/src/xpram.cpp | 1 - 134 files changed, 754 insertions(+), 144 deletions(-) delete mode 120000 SheepShaver/src/BeOS/SheepDriver delete mode 120000 SheepShaver/src/BeOS/SheepNet delete mode 120000 SheepShaver/src/BeOS/audio_beos.cpp delete mode 120000 SheepShaver/src/BeOS/extfs_beos.cpp delete mode 120000 SheepShaver/src/BeOS/scsi_beos.cpp delete mode 120000 SheepShaver/src/BeOS/serial_beos.cpp delete mode 120000 SheepShaver/src/BeOS/sys_beos.cpp delete mode 120000 SheepShaver/src/BeOS/timer_beos.cpp delete mode 120000 SheepShaver/src/BeOS/xpram_beos.cpp delete mode 120000 SheepShaver/src/CrossPlatform/sigsegv.cpp delete mode 120000 SheepShaver/src/CrossPlatform/sigsegv.h delete mode 120000 SheepShaver/src/CrossPlatform/video_blit.cpp delete mode 120000 SheepShaver/src/CrossPlatform/video_blit.h delete mode 120000 SheepShaver/src/CrossPlatform/video_vosf.h delete mode 120000 SheepShaver/src/CrossPlatform/vm_alloc.cpp delete mode 120000 SheepShaver/src/CrossPlatform/vm_alloc.h delete mode 120000 SheepShaver/src/MacOSX/AudioBackEnd.cpp delete mode 120000 SheepShaver/src/MacOSX/AudioBackEnd.h delete mode 120000 SheepShaver/src/MacOSX/AudioDevice.cpp delete mode 120000 SheepShaver/src/MacOSX/AudioDevice.h delete mode 120000 SheepShaver/src/MacOSX/MacOSX_sound_if.cpp delete mode 120000 SheepShaver/src/MacOSX/MacOSX_sound_if.h delete mode 120000 SheepShaver/src/MacOSX/audio_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/clip_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/clip_macosx64.mm delete mode 120000 SheepShaver/src/MacOSX/extfs_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/macos_util_macosx.h delete mode 120000 SheepShaver/src/MacOSX/sys_darwin.cpp delete mode 120000 SheepShaver/src/MacOSX/utils_macosx.h delete mode 120000 SheepShaver/src/MacOSX/utils_macosx.mm delete mode 120000 SheepShaver/src/SDL delete mode 120000 SheepShaver/src/Unix/Darwin/lowmem.c delete mode 120000 SheepShaver/src/Unix/Darwin/mkstandalone delete mode 120000 SheepShaver/src/Unix/Darwin/pagezero.c delete mode 120000 SheepShaver/src/Unix/Darwin/testlmem.sh delete mode 120000 SheepShaver/src/Unix/Irix/audio_irix.cpp delete mode 120000 SheepShaver/src/Unix/Linux/NetDriver delete mode 120000 SheepShaver/src/Unix/Linux/scsi_linux.cpp delete mode 120000 SheepShaver/src/Unix/audio_oss_esd.cpp delete mode 120000 SheepShaver/src/Unix/bincue_unix.cpp delete mode 120000 SheepShaver/src/Unix/bincue_unix.h delete mode 120000 SheepShaver/src/Unix/clip_unix.cpp delete mode 120000 SheepShaver/src/Unix/config.guess delete mode 120000 SheepShaver/src/Unix/config.sub delete mode 120000 SheepShaver/src/Unix/cpr.sh delete mode 120000 SheepShaver/src/Unix/disk_sparsebundle.cpp delete mode 120000 SheepShaver/src/Unix/disk_unix.h delete mode 120000 SheepShaver/src/Unix/ether_unix.cpp delete mode 120000 SheepShaver/src/Unix/extfs_unix.cpp delete mode 120000 SheepShaver/src/Unix/keycodes delete mode 120000 SheepShaver/src/Unix/ldscripts delete mode 120000 SheepShaver/src/Unix/m4 delete mode 120000 SheepShaver/src/Unix/posix_sem.cpp delete mode 120000 SheepShaver/src/Unix/rpc.h delete mode 120000 SheepShaver/src/Unix/rpc_unix.cpp delete mode 120000 SheepShaver/src/Unix/semaphore.h delete mode 120000 SheepShaver/src/Unix/serial_unix.cpp delete mode 120000 SheepShaver/src/Unix/sshpty.c delete mode 120000 SheepShaver/src/Unix/sshpty.h delete mode 120000 SheepShaver/src/Unix/strlcpy.c delete mode 120000 SheepShaver/src/Unix/strlcpy.h delete mode 120000 SheepShaver/src/Unix/sys_unix.cpp delete mode 120000 SheepShaver/src/Unix/timer_unix.cpp delete mode 120000 SheepShaver/src/Unix/tinyxml2.cpp delete mode 120000 SheepShaver/src/Unix/tinyxml2.h delete mode 120000 SheepShaver/src/Unix/tunconfig delete mode 120000 SheepShaver/src/Unix/vhd_unix.cpp delete mode 120000 SheepShaver/src/Unix/xpram_unix.cpp delete mode 120000 SheepShaver/src/Windows/b2ether create mode 100644 SheepShaver/src/Windows/build_on_msys.py delete mode 120000 SheepShaver/src/Windows/cd_defs.h delete mode 120000 SheepShaver/src/Windows/cdenable delete mode 120000 SheepShaver/src/Windows/clip_windows.cpp delete mode 120000 SheepShaver/src/Windows/ether_windows.cpp delete mode 120000 SheepShaver/src/Windows/ether_windows.h delete mode 120000 SheepShaver/src/Windows/extfs_windows.cpp delete mode 120000 SheepShaver/src/Windows/kernel_windows.cpp delete mode 120000 SheepShaver/src/Windows/kernel_windows.h delete mode 120000 SheepShaver/src/Windows/posix_emu.cpp delete mode 120000 SheepShaver/src/Windows/posix_emu.h delete mode 120000 SheepShaver/src/Windows/prefs_editor_gtk.cpp delete mode 120000 SheepShaver/src/Windows/router create mode 100644 SheepShaver/src/Windows/sdl_fix.patch delete mode 120000 SheepShaver/src/Windows/serial_windows.cpp delete mode 120000 SheepShaver/src/Windows/sys_windows.cpp delete mode 120000 SheepShaver/src/Windows/timer_windows.cpp delete mode 120000 SheepShaver/src/Windows/util_windows.cpp delete mode 120000 SheepShaver/src/Windows/util_windows.h delete mode 120000 SheepShaver/src/Windows/xpram_windows.cpp delete mode 120000 SheepShaver/src/adb.cpp delete mode 120000 SheepShaver/src/audio.cpp delete mode 120000 SheepShaver/src/cdrom.cpp delete mode 120000 SheepShaver/src/disk.cpp delete mode 120000 SheepShaver/src/dummy/audio_dummy.cpp delete mode 120000 SheepShaver/src/dummy/clip_dummy.cpp delete mode 120000 SheepShaver/src/dummy/prefs_editor_dummy.cpp delete mode 120000 SheepShaver/src/dummy/scsi_dummy.cpp delete mode 120000 SheepShaver/src/dummy/serial_dummy.cpp delete mode 120000 SheepShaver/src/extfs.cpp delete mode 120000 SheepShaver/src/include/adb.h delete mode 120000 SheepShaver/src/include/audio.h delete mode 120000 SheepShaver/src/include/audio_defs.h delete mode 120000 SheepShaver/src/include/cdrom.h delete mode 120000 SheepShaver/src/include/clip.h delete mode 120000 SheepShaver/src/include/debug.h delete mode 120000 SheepShaver/src/include/disk.h delete mode 120000 SheepShaver/src/include/extfs.h delete mode 120000 SheepShaver/src/include/extfs_defs.h delete mode 120000 SheepShaver/src/include/pict.h delete mode 120000 SheepShaver/src/include/prefs.h delete mode 120000 SheepShaver/src/include/scsi.h delete mode 120000 SheepShaver/src/include/serial.h delete mode 120000 SheepShaver/src/include/serial_defs.h delete mode 120000 SheepShaver/src/include/sony.h delete mode 120000 SheepShaver/src/include/sys.h delete mode 120000 SheepShaver/src/include/timer.h delete mode 120000 SheepShaver/src/include/xpram.h delete mode 120000 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h delete mode 120000 SheepShaver/src/pict.c delete mode 120000 SheepShaver/src/prefs.cpp delete mode 120000 SheepShaver/src/scsi.cpp delete mode 120000 SheepShaver/src/slirp delete mode 120000 SheepShaver/src/sony.cpp delete mode 120000 SheepShaver/src/xpram.cpp diff --git a/.gitignore b/.gitignore index 2a6e2f0cb..3e80b8008 100644 --- a/.gitignore +++ b/.gitignore @@ -6,3 +6,137 @@ # Mac OS X metadata *.DS_Store +SheepShaver/src/Windows/downloads/ +.idea/ +SheepShaver/src/adb.cpp +SheepShaver/src/audio.cpp +SheepShaver/src/cdrom.cpp +SheepShaver/src/disk.cpp +SheepShaver/src/extfs.cpp +SheepShaver/src/pict.c +SheepShaver/src/prefs.cpp +SheepShaver/src/scsi.cpp +SheepShaver/src/sony.cpp +SheepShaver/src/xpram.cpp +SheepShaver/src/include/adb.h +SheepShaver/src/include/audio.h +SheepShaver/src/include/audio_defs.h +SheepShaver/src/include/cdrom.h +SheepShaver/src/include/clip.h +SheepShaver/src/include/debug.h +SheepShaver/src/include/disk.h +SheepShaver/src/include/extfs.h +SheepShaver/src/include/extfs_defs.h +SheepShaver/src/include/pict.h +SheepShaver/src/include/prefs.h +SheepShaver/src/include/scsi.h +SheepShaver/src/include/serial.h +SheepShaver/src/include/serial_defs.h +SheepShaver/src/include/sony.h +SheepShaver/src/include/sys.h +SheepShaver/src/include/timer.h +SheepShaver/src/include/xpram.h +SheepShaver/src/BeOS/audio_beos.cpp +SheepShaver/src/BeOS/extfs_beos.cpp +SheepShaver/src/BeOS/scsi_beos.cpp +SheepShaver/src/BeOS/serial_beos.cpp +SheepShaver/src/BeOS/sys_beos.cpp +SheepShaver/src/BeOS/timer_beos.cpp +SheepShaver/src/BeOS/xpram_beos.cpp +SheepShaver/src/BeOS/SheepDriver +SheepShaver/src/BeOS/SheepNet +SheepShaver/src/CrossPlatform/sigsegv.h +SheepShaver/src/CrossPlatform/sigsegv.cpp +SheepShaver/src/CrossPlatform/vm_alloc.h +SheepShaver/src/CrossPlatform/vm_alloc.cpp +SheepShaver/src/CrossPlatform/video_vosf.h +SheepShaver/src/CrossPlatform/video_blit.h +SheepShaver/src/CrossPlatform/video_blit.cpp +SheepShaver/src/Unix/audio_oss_esd.cpp +SheepShaver/src/Unix/bincue_unix.cpp +SheepShaver/src/Unix/bincue_unix.h +SheepShaver/src/Unix/vhd_unix.cpp +SheepShaver/src/Unix/extfs_unix.cpp +SheepShaver/src/Unix/serial_unix.cpp +SheepShaver/src/Unix/sshpty.h +SheepShaver/src/Unix/sshpty.c +SheepShaver/src/Unix/strlcpy.h +SheepShaver/src/Unix/strlcpy.c +SheepShaver/src/Unix/sys_unix.cpp +SheepShaver/src/Unix/timer_unix.cpp +SheepShaver/src/Unix/xpram_unix.cpp +SheepShaver/src/Unix/semaphore.h +SheepShaver/src/Unix/posix_sem.cpp +SheepShaver/src/Unix/config.sub +SheepShaver/src/Unix/config.guess +SheepShaver/src/Unix/m4 +SheepShaver/src/Unix/keycodes +SheepShaver/src/Unix/tunconfig +SheepShaver/src/Unix/clip_unix.cpp +SheepShaver/src/Unix/Irix/audio_irix.cpp +SheepShaver/src/Unix/Linux/scsi_linux.cpp +SheepShaver/src/Unix/Linux/NetDriver +SheepShaver/src/Unix/ether_unix.cpp +SheepShaver/src/Unix/rpc.h +SheepShaver/src/Unix/rpc_unix.cpp +SheepShaver/src/Unix/ldscripts +SheepShaver/src/Unix/tinyxml2.h +SheepShaver/src/Unix/tinyxml2.cpp +SheepShaver/src/Unix/disk_unix.h +SheepShaver/src/Unix/disk_sparsebundle.cpp +SheepShaver/src/Unix/Darwin/mkstandalone +SheepShaver/src/Unix/Darwin/lowmem.c +SheepShaver/src/Unix/Darwin/pagezero.c +SheepShaver/src/Unix/Darwin/testlmem.sh +SheepShaver/src/dummy/audio_dummy.cpp +SheepShaver/src/dummy/clip_dummy.cpp +SheepShaver/src/dummy/serial_dummy.cpp +SheepShaver/src/dummy/prefs_editor_dummy.cpp +SheepShaver/src/dummy/scsi_dummy.cpp +SheepShaver/src/SDL +SheepShaver/src/slirp +SheepShaver/src/MacOSX/sys_darwin.cpp +SheepShaver/src/MacOSX/clip_macosx.cpp +SheepShaver/src/MacOSX/clip_macosx64.mm +SheepShaver/src/MacOSX/macos_util_macosx.h +SheepShaver/src/Unix/cpr.sh +SheepShaver/src/MacOSX/extfs_macosx.cpp +SheepShaver/src/Windows/clip_windows.cpp +SheepShaver/src/MacOSX/MacOSX_sound_if.cpp +SheepShaver/src/MacOSX/MacOSX_sound_if.h +SheepShaver/src/MacOSX/AudioBackEnd.cpp +SheepShaver/src/MacOSX/AudioBackEnd.h +SheepShaver/src/MacOSX/AudioDevice.cpp +SheepShaver/src/MacOSX/AudioDevice.h +SheepShaver/src/MacOSX/audio_macosx.cpp +SheepShaver/src/MacOSX/utils_macosx.mm +SheepShaver/src/MacOSX/utils_macosx.h +SheepShaver/src/Windows/cd_defs.h +SheepShaver/src/Windows/cdenable +SheepShaver/src/Windows/extfs_windows.cpp +SheepShaver/src/Windows/posix_emu.cpp +SheepShaver/src/Windows/posix_emu.h +SheepShaver/src/Windows/sys_windows.cpp +SheepShaver/src/Windows/timer_windows.cpp +SheepShaver/src/Windows/util_windows.cpp +SheepShaver/src/Windows/util_windows.h +SheepShaver/src/Windows/xpram_windows.cpp +SheepShaver/src/Windows/kernel_windows.h +SheepShaver/src/Windows/kernel_windows.cpp +SheepShaver/src/Windows/serial_windows.cpp +SheepShaver/src/Windows/router +SheepShaver/src/Windows/b2ether +SheepShaver/src/Windows/ether_windows.h +SheepShaver/src/Windows/ether_windows.cpp +SheepShaver/src/Windows/serial_windows.cpp +SheepShaver/src/Windows/prefs_editor_gtk.cpp +SheepShaver/src/uae_cpu/compiler/codegen_x86.h +SheepShaver/src/Windows/autom4te.cache/ +SheepShaver/src/Windows/m4/ +SheepShaver/src/Windows/aclocal.m4 +SheepShaver/src/Windows/config.h.in +SheepShaver/src/Windows/configure +SheepShaver/src/Windows/config.log +SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h +BasiliskII/src/Windows/x64/ +SheepShaver/src/Windows/config.status diff --git a/BasiliskII/src/include/debug.h b/BasiliskII/src/include/debug.h index 414ad3242..5200ba011 100644 --- a/BasiliskII/src/include/debug.h +++ b/BasiliskII/src/include/debug.h @@ -30,6 +30,8 @@ #include #include +#include "main.h" + static inline void _cdecl vwinbug(const char *s, va_list vargs) { char msg[1024], date[50], hours[50]; diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index 2fec37a17..bf61fa9ac 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -87,10 +87,9 @@ links: Windows/posix_emu.cpp Windows/posix_emu.h Windows/sys_windows.cpp \ Windows/timer_windows.cpp Windows/util_windows.cpp \ Windows/util_windows.h Windows/xpram_windows.cpp \ - Windows/kernel_windows.h Windows/kernel_windows.cpp \ Windows/serial_windows.cpp Windows/router Windows/b2ether \ Windows/ether_windows.h Windows/ether_windows.cpp \ - Windows/serial_windows.cpp Windows/prefs_editor_gtk.cpp \ + Windows/prefs_editor_gtk.cpp \ uae_cpu/compiler/codegen_x86.h'; \ PREFIX="../"; case $(B2_TOPDIR) in /*) PREFIX="";; esac; \ for i in $$list; do \ diff --git a/SheepShaver/src/BeOS/SheepDriver b/SheepShaver/src/BeOS/SheepDriver deleted file mode 120000 index 9e581b7f6..000000000 --- a/SheepShaver/src/BeOS/SheepDriver +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/SheepDriver \ No newline at end of file diff --git a/SheepShaver/src/BeOS/SheepNet b/SheepShaver/src/BeOS/SheepNet deleted file mode 120000 index 7d7d72572..000000000 --- a/SheepShaver/src/BeOS/SheepNet +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/SheepNet \ No newline at end of file diff --git a/SheepShaver/src/BeOS/audio_beos.cpp b/SheepShaver/src/BeOS/audio_beos.cpp deleted file mode 120000 index ce433abbb..000000000 --- a/SheepShaver/src/BeOS/audio_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/audio_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/extfs_beos.cpp b/SheepShaver/src/BeOS/extfs_beos.cpp deleted file mode 120000 index e7cec3dcd..000000000 --- a/SheepShaver/src/BeOS/extfs_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/extfs_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/scsi_beos.cpp b/SheepShaver/src/BeOS/scsi_beos.cpp deleted file mode 120000 index c495dce0c..000000000 --- a/SheepShaver/src/BeOS/scsi_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/scsi_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/serial_beos.cpp b/SheepShaver/src/BeOS/serial_beos.cpp deleted file mode 120000 index 2231c6d0a..000000000 --- a/SheepShaver/src/BeOS/serial_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/serial_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/sys_beos.cpp b/SheepShaver/src/BeOS/sys_beos.cpp deleted file mode 120000 index 4e238dac8..000000000 --- a/SheepShaver/src/BeOS/sys_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/sys_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/timer_beos.cpp b/SheepShaver/src/BeOS/timer_beos.cpp deleted file mode 120000 index 0d9e80149..000000000 --- a/SheepShaver/src/BeOS/timer_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/timer_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/xpram_beos.cpp b/SheepShaver/src/BeOS/xpram_beos.cpp deleted file mode 120000 index e5d7f9658..000000000 --- a/SheepShaver/src/BeOS/xpram_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/xpram_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp deleted file mode 120000 index a41f4a068..000000000 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/sigsegv.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/sigsegv.h b/SheepShaver/src/CrossPlatform/sigsegv.h deleted file mode 120000 index 213fb61d8..000000000 --- a/SheepShaver/src/CrossPlatform/sigsegv.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/sigsegv.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_blit.cpp b/SheepShaver/src/CrossPlatform/video_blit.cpp deleted file mode 120000 index 15297235c..000000000 --- a/SheepShaver/src/CrossPlatform/video_blit.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_blit.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_blit.h b/SheepShaver/src/CrossPlatform/video_blit.h deleted file mode 120000 index 7fe63598f..000000000 --- a/SheepShaver/src/CrossPlatform/video_blit.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_blit.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h deleted file mode 120000 index 4c552311a..000000000 --- a/SheepShaver/src/CrossPlatform/video_vosf.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_vosf.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.cpp b/SheepShaver/src/CrossPlatform/vm_alloc.cpp deleted file mode 120000 index cc80e1bc2..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.h b/SheepShaver/src/CrossPlatform/vm_alloc.h deleted file mode 120000 index ef65a5618..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioBackEnd.cpp b/SheepShaver/src/MacOSX/AudioBackEnd.cpp deleted file mode 120000 index d0d8a5caa..000000000 --- a/SheepShaver/src/MacOSX/AudioBackEnd.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioBackEnd.h b/SheepShaver/src/MacOSX/AudioBackEnd.h deleted file mode 120000 index e4f493db5..000000000 --- a/SheepShaver/src/MacOSX/AudioBackEnd.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioBackEnd.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioDevice.cpp b/SheepShaver/src/MacOSX/AudioDevice.cpp deleted file mode 120000 index b56f3a4ca..000000000 --- a/SheepShaver/src/MacOSX/AudioDevice.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioDevice.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioDevice.h b/SheepShaver/src/MacOSX/AudioDevice.h deleted file mode 120000 index 7892391b1..000000000 --- a/SheepShaver/src/MacOSX/AudioDevice.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioDevice.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp b/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp deleted file mode 120000 index da209f873..000000000 --- a/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/MacOSX_sound_if.h b/SheepShaver/src/MacOSX/MacOSX_sound_if.h deleted file mode 120000 index 63bcdb278..000000000 --- a/SheepShaver/src/MacOSX/MacOSX_sound_if.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/audio_macosx.cpp b/SheepShaver/src/MacOSX/audio_macosx.cpp deleted file mode 120000 index 418b23c57..000000000 --- a/SheepShaver/src/MacOSX/audio_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/audio_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/clip_macosx.cpp b/SheepShaver/src/MacOSX/clip_macosx.cpp deleted file mode 120000 index 7f731e4d3..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/clip_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm deleted file mode 120000 index 18640812d..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx64.mm +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/clip_macosx64.mm \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/extfs_macosx.cpp b/SheepShaver/src/MacOSX/extfs_macosx.cpp deleted file mode 120000 index 1afcd4b17..000000000 --- a/SheepShaver/src/MacOSX/extfs_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/extfs_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/macos_util_macosx.h b/SheepShaver/src/MacOSX/macos_util_macosx.h deleted file mode 120000 index cef14874a..000000000 --- a/SheepShaver/src/MacOSX/macos_util_macosx.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/macos_util_macosx.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/sys_darwin.cpp b/SheepShaver/src/MacOSX/sys_darwin.cpp deleted file mode 120000 index 28b803182..000000000 --- a/SheepShaver/src/MacOSX/sys_darwin.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/sys_darwin.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/utils_macosx.h b/SheepShaver/src/MacOSX/utils_macosx.h deleted file mode 120000 index c8777733a..000000000 --- a/SheepShaver/src/MacOSX/utils_macosx.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/utils_macosx.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/utils_macosx.mm b/SheepShaver/src/MacOSX/utils_macosx.mm deleted file mode 120000 index 190649582..000000000 --- a/SheepShaver/src/MacOSX/utils_macosx.mm +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/utils_macosx.mm \ No newline at end of file diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL deleted file mode 120000 index 48cb61ebe..000000000 --- a/SheepShaver/src/SDL +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/SDL \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/lowmem.c b/SheepShaver/src/Unix/Darwin/lowmem.c deleted file mode 120000 index 7e0a359c7..000000000 --- a/SheepShaver/src/Unix/Darwin/lowmem.c +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/lowmem.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/mkstandalone b/SheepShaver/src/Unix/Darwin/mkstandalone deleted file mode 120000 index acfe13f68..000000000 --- a/SheepShaver/src/Unix/Darwin/mkstandalone +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/mkstandalone \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/pagezero.c b/SheepShaver/src/Unix/Darwin/pagezero.c deleted file mode 120000 index ae53c8154..000000000 --- a/SheepShaver/src/Unix/Darwin/pagezero.c +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/pagezero.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/testlmem.sh b/SheepShaver/src/Unix/Darwin/testlmem.sh deleted file mode 120000 index 1137ef898..000000000 --- a/SheepShaver/src/Unix/Darwin/testlmem.sh +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/testlmem.sh \ No newline at end of file diff --git a/SheepShaver/src/Unix/Irix/audio_irix.cpp b/SheepShaver/src/Unix/Irix/audio_irix.cpp deleted file mode 120000 index 2e7ef88f4..000000000 --- a/SheepShaver/src/Unix/Irix/audio_irix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Irix/audio_irix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/Linux/NetDriver b/SheepShaver/src/Unix/Linux/NetDriver deleted file mode 120000 index 6e756eb33..000000000 --- a/SheepShaver/src/Unix/Linux/NetDriver +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Linux/NetDriver \ No newline at end of file diff --git a/SheepShaver/src/Unix/Linux/scsi_linux.cpp b/SheepShaver/src/Unix/Linux/scsi_linux.cpp deleted file mode 120000 index 9ebba5fdf..000000000 --- a/SheepShaver/src/Unix/Linux/scsi_linux.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Linux/scsi_linux.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/audio_oss_esd.cpp b/SheepShaver/src/Unix/audio_oss_esd.cpp deleted file mode 120000 index acf070c11..000000000 --- a/SheepShaver/src/Unix/audio_oss_esd.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/audio_oss_esd.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/bincue_unix.cpp b/SheepShaver/src/Unix/bincue_unix.cpp deleted file mode 120000 index f9ed574d0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/bincue_unix.h b/SheepShaver/src/Unix/bincue_unix.h deleted file mode 120000 index 9c7e8c5c0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/clip_unix.cpp b/SheepShaver/src/Unix/clip_unix.cpp deleted file mode 120000 index bd5316ecb..000000000 --- a/SheepShaver/src/Unix/clip_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/clip_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/config.guess b/SheepShaver/src/Unix/config.guess deleted file mode 120000 index d7e5917cc..000000000 --- a/SheepShaver/src/Unix/config.guess +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/config.guess \ No newline at end of file diff --git a/SheepShaver/src/Unix/config.sub b/SheepShaver/src/Unix/config.sub deleted file mode 120000 index 5458c713b..000000000 --- a/SheepShaver/src/Unix/config.sub +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/config.sub \ No newline at end of file diff --git a/SheepShaver/src/Unix/cpr.sh b/SheepShaver/src/Unix/cpr.sh deleted file mode 120000 index 29f13000d..000000000 --- a/SheepShaver/src/Unix/cpr.sh +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/cpr.sh \ No newline at end of file diff --git a/SheepShaver/src/Unix/disk_sparsebundle.cpp b/SheepShaver/src/Unix/disk_sparsebundle.cpp deleted file mode 120000 index 7e368ca75..000000000 --- a/SheepShaver/src/Unix/disk_sparsebundle.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/disk_sparsebundle.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/disk_unix.h b/SheepShaver/src/Unix/disk_unix.h deleted file mode 120000 index 87d10dfda..000000000 --- a/SheepShaver/src/Unix/disk_unix.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/disk_unix.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/ether_unix.cpp b/SheepShaver/src/Unix/ether_unix.cpp deleted file mode 120000 index b2a75d72b..000000000 --- a/SheepShaver/src/Unix/ether_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/ether_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/extfs_unix.cpp b/SheepShaver/src/Unix/extfs_unix.cpp deleted file mode 120000 index 6a67ad612..000000000 --- a/SheepShaver/src/Unix/extfs_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/extfs_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/keycodes b/SheepShaver/src/Unix/keycodes deleted file mode 120000 index da89edcf9..000000000 --- a/SheepShaver/src/Unix/keycodes +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/keycodes \ No newline at end of file diff --git a/SheepShaver/src/Unix/ldscripts b/SheepShaver/src/Unix/ldscripts deleted file mode 120000 index 396260839..000000000 --- a/SheepShaver/src/Unix/ldscripts +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/ldscripts \ No newline at end of file diff --git a/SheepShaver/src/Unix/m4 b/SheepShaver/src/Unix/m4 deleted file mode 120000 index a20fe8400..000000000 --- a/SheepShaver/src/Unix/m4 +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/m4 \ No newline at end of file diff --git a/SheepShaver/src/Unix/posix_sem.cpp b/SheepShaver/src/Unix/posix_sem.cpp deleted file mode 120000 index f530e6dbb..000000000 --- a/SheepShaver/src/Unix/posix_sem.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/posix_sem.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/rpc.h b/SheepShaver/src/Unix/rpc.h deleted file mode 120000 index 98cf8a087..000000000 --- a/SheepShaver/src/Unix/rpc.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/rpc.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/rpc_unix.cpp b/SheepShaver/src/Unix/rpc_unix.cpp deleted file mode 120000 index a960f0b78..000000000 --- a/SheepShaver/src/Unix/rpc_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/rpc_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/semaphore.h b/SheepShaver/src/Unix/semaphore.h deleted file mode 120000 index 9e87a545e..000000000 --- a/SheepShaver/src/Unix/semaphore.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/semaphore.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/serial_unix.cpp b/SheepShaver/src/Unix/serial_unix.cpp deleted file mode 120000 index ccda34be7..000000000 --- a/SheepShaver/src/Unix/serial_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/serial_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/sshpty.c b/SheepShaver/src/Unix/sshpty.c deleted file mode 120000 index ffaa2bfcb..000000000 --- a/SheepShaver/src/Unix/sshpty.c +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sshpty.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/sshpty.h b/SheepShaver/src/Unix/sshpty.h deleted file mode 120000 index 9132736af..000000000 --- a/SheepShaver/src/Unix/sshpty.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sshpty.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/strlcpy.c b/SheepShaver/src/Unix/strlcpy.c deleted file mode 120000 index 59e61670f..000000000 --- a/SheepShaver/src/Unix/strlcpy.c +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/strlcpy.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/strlcpy.h b/SheepShaver/src/Unix/strlcpy.h deleted file mode 120000 index 1c551aacf..000000000 --- a/SheepShaver/src/Unix/strlcpy.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/strlcpy.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/sys_unix.cpp b/SheepShaver/src/Unix/sys_unix.cpp deleted file mode 120000 index e5769e8d6..000000000 --- a/SheepShaver/src/Unix/sys_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sys_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp deleted file mode 120000 index db93bbd33..000000000 --- a/SheepShaver/src/Unix/timer_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/timer_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/tinyxml2.cpp b/SheepShaver/src/Unix/tinyxml2.cpp deleted file mode 120000 index 0609bdc8f..000000000 --- a/SheepShaver/src/Unix/tinyxml2.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tinyxml2.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/tinyxml2.h b/SheepShaver/src/Unix/tinyxml2.h deleted file mode 120000 index d90c30e29..000000000 --- a/SheepShaver/src/Unix/tinyxml2.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tinyxml2.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/tunconfig b/SheepShaver/src/Unix/tunconfig deleted file mode 120000 index 615f7fe9e..000000000 --- a/SheepShaver/src/Unix/tunconfig +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tunconfig \ No newline at end of file diff --git a/SheepShaver/src/Unix/vhd_unix.cpp b/SheepShaver/src/Unix/vhd_unix.cpp deleted file mode 120000 index a0c73d90d..000000000 --- a/SheepShaver/src/Unix/vhd_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/vhd_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/xpram_unix.cpp b/SheepShaver/src/Unix/xpram_unix.cpp deleted file mode 120000 index 12e37c986..000000000 --- a/SheepShaver/src/Unix/xpram_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/xpram_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index edd28f596..1da802c7e 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -38,7 +38,7 @@ CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp DEFS = @DEFS@ LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -lwsock32 -liphlpapi +LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ PERL = @PERL@ @@ -54,7 +54,7 @@ HOST_CXXFLAGS = -O2 HOST_LDFLAGS = ## Files -UNIXSRCS = vm_alloc.cpp vm_alloc.h sigsegv.cpp sigsegv.h video_vosf.h video_blit.cpp video_blit.h +XPLATSRCS = vm_alloc.cpp vm_alloc.h sigsegv.cpp sigsegv.h video_vosf.h video_blit.cpp video_blit.h ROUTERSRCS = router/arp.cpp router/dump.cpp router/dynsockets.cpp router/ftp.cpp \ router/icmp.cpp router/mib/interfaces.cpp router/iphelp.cpp router/ipsocket.cpp \ @@ -69,7 +69,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ about_window_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ - ../dummy/prefs_editor_dummy.cpp clip_windows.cpp util_windows.cpp kernel_windows.cpp \ + ../dummy/prefs_editor_dummy.cpp clip_windows.cpp util_windows.cpp \ vm_alloc.cpp sigsegv.cpp posix_emu.cpp SheepShaver.rc \ $(CPUSRCS) $(ROUTERSRCS) $(SLIRP_OBJS) @@ -94,7 +94,7 @@ endif all: $(PROGS) -$(UNIXSRCS): %: ../Unix/% +$(XPLATSRCS): %: ../CrossPlatform/% $(LN_S) $< $@ OBJ_DIR = obj @@ -123,17 +123,17 @@ SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) VPATH := VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) -$(APP): $(UNIXSRCS) $(OBJ_DIR) $(OBJS) +$(APP): $(XPLATSRCS) $(OBJ_DIR) $(OBJS) $(CXX) -o $(APP) $(LDFLAGS) $(OBJS) $(LIBS) $(SDL_LIBS) -$(UI_APP): $(UNIXSRCS) $(OBJ_DIR) $(UI_OBJS) +$(UI_APP): $(XPLATSRCS) $(OBJ_DIR) $(UI_OBJS) $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) $(GTK_LIBS) -mwindows -mno-cygwin mostlyclean: rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak clean: mostlyclean - rm -f $(UNIXSRCS) + rm -f $(XPLATSRCS) rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc-execute-impl.cpp distclean: clean diff --git a/SheepShaver/src/Windows/b2ether b/SheepShaver/src/Windows/b2ether deleted file mode 120000 index cf8fd89bb..000000000 --- a/SheepShaver/src/Windows/b2ether +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/b2ether \ No newline at end of file diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py new file mode 100644 index 000000000..fd46ea843 --- /dev/null +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -0,0 +1,550 @@ +# +# A python 2.7 script to fetch all dependencies and build Sheepshaver using MSYS +# +import argparse +import glob +import json +import os +import subprocess +import urllib +import xml.dom.minidom +import zipfile +import sys +from contextlib import contextmanager +import datetime + +MACEMU_CFLAGS = "-mwin32" +MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11 -U__STRICT_ANSI__" + +script_path = os.path.dirname(os.path.abspath(__file__)) + + +MINGW_EXTRACT_PATH = r"c:\mingw-sheep" + + +def parse_args(): + parser = argparse.ArgumentParser() + parser.add_argument("--uninstall-packages", "-u", + help="Uninstall all the msys/mingw packages", + default=False, + action="store_true", + ) + parser.add_argument("--run-shell", "-s", + help="Run a quick bash session with the paths set", + default=False, + action="store_true", + ) + parser.add_argument("--make-threads", "-j", + default=1, + type=int, + ) + parser.add_argument("--gitignore-link-outputs", + help="Add the symlinks that 'make links' creates to .gitignore and stop tracking them", + default=False, + action="store_true", + ) + parser.add_argument("--show-build-environment", + default=False, + action="store_true", + ) + return parser.parse_args() + + +def get_download_dir(): + download_dir = os.path.join(script_path, "downloads") + if not os.path.isdir(download_dir): + os.mkdir(download_dir) + return download_dir + + +def download(url, local_filename_proper=None): + if local_filename_proper is None: + up_to_path = url.rsplit("?", 1)[0] + local_filename_proper = up_to_path.rsplit("/", 1)[-1] + local_filename = os.path.join(get_download_dir(), local_filename_proper) + if not os.path.exists(local_filename): + try: + urllib.urlretrieve(url, local_filename) + except IOError: + if os.path.exists(local_filename): + os.remove(local_filename) + raise + return local_filename + + +def extract_zip(zip_filename, target_dir): + if not os.path.isdir(target_dir): + os.mkdir(target_dir) + zf = zipfile.ZipFile(zip_filename) + try: + zf.extractall(target_dir) + finally: + zf.close() + + +def env_augmented_with_paths(*path_dirs_to_add): + env_copy = dict(os.environ) + path_dirs = env_copy["PATH"].split(os.pathsep) + for d in path_dirs_to_add: + if d not in path_dirs: + path_dirs.append(d) + env_copy["PATH"] = os.pathsep.join(path_dirs) + return env_copy + + +def display_dir(path): + windows_dir = os.path.join(script_path) + if path.startswith(windows_dir): + return "Windows" + path[len(windows_dir):] + return path + + +def cc(cmd_args, *args, **kwargs): + print "%s (cwd=%s)" % (" ".join(cmd_args), kwargs.get("cwd")) + sys.stdout.flush() + subprocess.check_call(cmd_args, *args, **kwargs) + + +def log(msg): + print msg + sys.stdout.flush() + + +def install(make_args, show_build_environment): + + root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) + dep_tracker = BuildDepTracker(root_dir) + + # just ham in the working directory for consistency + os.chdir(script_path) + + # get msys / mingw tools we need to build + + mingw_get_zip = download("https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" + "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip") + mingw_get_dir = MINGW_EXTRACT_PATH + extract_zip(mingw_get_zip, mingw_get_dir) + + mingw_get_filename = os.path.join(mingw_get_dir, "bin", "mingw-get.exe") + assert os.path.isfile(mingw_get_filename) + + msys_packages = ["bash", "autogen", "m4", "make", "patch"] + mingw_packages = ["autoconf", "autoconf2.5", "automake", "automake1.11", "binutils", "base", "autotools", "libtool", + "gcc", "gcc-g++"] + + all_packages_to_install = ["mingw32-%s" % x for x in mingw_packages] + ["msys-%s" % x for x in msys_packages] + + installed_packages = get_installed_packages(quiet=True) + + if any(package not in installed_packages for package in all_packages_to_install): + cc([mingw_get_filename, "install"] + all_packages_to_install) + else: + log("All required packages installed") + + mingw_get_bin_dir = os.path.join(mingw_get_dir, "bin") + msys_bin_dir = os.path.join(mingw_get_dir, "msys", "1.0", "bin") + mingw_bin_dir = os.path.join(mingw_get_dir, "mingw32", "bin") + + our_env = env_augmented_with_paths(mingw_get_bin_dir, msys_bin_dir, mingw_bin_dir) + + # ditch any outer make flags from cmake or similar due to compatibility problems + for var in ["MAKEFLAGS", "MAKELEVEL", "MFLAGS"]: + our_env.pop(var, None) + + if show_build_environment: + print "ENVIRONMENT FOR BUILD" + show_env_dict(our_env) + print "" + + # build SDL + + sdl_zip_filename = download("http://www.libsdl.org/release/SDL-1.2.15.zip") + sdl_dir = os.path.join(get_download_dir(), "SDL-1.2.15") + with dep_tracker.rebuilding_if_needed("sdl_extract_zip", sdl_zip_filename) as needs_rebuild: + if needs_rebuild: + extract_zip(sdl_zip_filename, get_download_dir()) + + patch_filename = os.path.join(script_path, "sdl_fix.patch") + sdl_patched_files = ["build-scripts/ltmain.sh"] + with dep_tracker.rebuilding_if_needed("sdl_patch", patch_filename) as needs_rebuild: + if needs_rebuild: + # apply patch for building in msys/mingw + patch_exe = os.path.join(msys_bin_dir, "patch.exe") + cc([patch_exe, "-p2", "-i", patch_filename], cwd=sdl_dir, env=our_env) + dep_tracker.done("sdl_patch") + + msys_bash = os.path.join(msys_bin_dir, "bash.exe") + + make_bin = os.path.join(msys_bin_dir, "make.exe") + # our_env["MAKE"] = make_bin + + with dep_tracker.rebuilding_if_needed("sdl_autogen", + ["configure.in"] + sdl_patched_files, base_dir=sdl_dir) as needs_rebuild: + if needs_rebuild: + cc([msys_bash, "./autogen.sh"], cwd=sdl_dir, env=our_env) + with dep_tracker.rebuilding_if_needed("sdl_configure", "configure", base_dir=sdl_dir) as needs_rebuild: + if needs_rebuild: + cc([msys_bash, "./configure", "--disable-shared", "--prefix=/usr"], cwd=sdl_dir, env=our_env) + cc([make_bin] + make_args + ["clean"], cwd=sdl_dir, env=our_env) + + cc([make_bin] + make_args, cwd=sdl_dir, env=our_env) + + # TODO track all the files tht this could install + sdl_headers = "SDL.h SDL_active.h SDL_audio.h SDL_byteorder.h SDL_cdrom.h SDL_cpuinfo.h SDL_endian.h " \ + "SDL_error.h SDL_events.h SDL_getenv.h SDL_joystick.h SDL_keyboard.h SDL_keysym.h SDL_loadso.h " \ + "SDL_main.h SDL_mouse.h SDL_mutex.h SDL_name.h SDL_opengl.h SDL_platform.h SDL_quit.h SDL_rwops.h " \ + "SDL_stdinc.h SDL_syswm.h SDL_thread.h SDL_timer.h SDL_types.h SDL_version.h SDL_video.h " \ + "begin_code.h close_code.h" + sdl_headers = ["include/" + x for x in sdl_headers.split(" ")] + sdl_files_being_installed = ["sdl-config", "build/libSDL.la"] + sdl_headers + + with dep_tracker.rebuilding_if_needed("sdl_install", sdl_files_being_installed, base_dir=sdl_dir) as needs_rebuild: + if needs_rebuild: + cc([make_bin, "install"], cwd=sdl_dir, env=our_env) + + # build sheepshaver + + sheepshaver_dir = os.path.abspath(os.path.join(script_path, "..", "..")) + print "SHEEPSHAVER_DIR: %s" % sheepshaver_dir + + link_inputs = get_symlink_filenames(prefix="BasiliskII/src/") + + print "Tracking %d link inputs" % len(link_inputs) + sys.stdout.flush() + + # TODO: fix make links step rather than just eating the exception + with dep_tracker.rebuilding_if_needed("sheepshaver_top_makefile", ["SheepShaver/Makefile"] + link_inputs, + base_dir=root_dir) as needs_rebuild: + if needs_rebuild: + try: + cc([make_bin, "links"], cwd=sheepshaver_dir, env=our_env) + except subprocess.CalledProcessError: + pass + + autogen_env = dict(our_env, NO_CONFIGURE="1") + + unix_dir = os.path.join(sheepshaver_dir, "src", "Unix") + + with dep_tracker.rebuilding_if_needed("sheepshaver_autogen", ["configure.ac"], + base_dir=script_path) as needs_rebuild: + if needs_rebuild: + cc([msys_bash, os.path.join(unix_dir, "autogen.sh")], cwd=script_path, env=autogen_env) + + ln_cmd = os.path.join(msys_bin_dir, "ln.exe") + + windows_m4_dir = os.path.join(script_path, "m4") + if not os.path.exists(windows_m4_dir): + cc([ln_cmd, "-sf", os.path.join(unix_dir, "m4"), windows_m4_dir], + cwd=script_path, env=autogen_env) + + configure_macemu_env = dict(our_env) + configure_macemu_env["CC"] = "gcc %s" % MACEMU_CFLAGS + configure_macemu_env["CXX"] = "g++ %s" % MACEMU_CXXFLAGS + + with dep_tracker.rebuilding_if_needed("sheepshaver_configure", ["configure", "Makefile.in"], + base_dir=script_path) as needs_rebuild: + if needs_rebuild: + # TODO FIX JIT + cc([msys_bash, "./configure", "--with-gtk=no", "--enable-jit=no"], + cwd=script_path, env=configure_macemu_env) + + cc([make_bin] + make_args, cwd=script_path, env=our_env) + + +def show_env_dict(d): + keys = d.keys() + keys.sort() + for key in keys: + value = d[key] + print "\t%20s\t%s" % (key, value) + + +def xml_element_helper(filename, tag_name): + dom = xml.dom.minidom.parse(filename) + for element in dom.getElementsByTagName(tag_name): + assert isinstance(element, xml.dom.minidom.Element) + yield element + + +def xml_read_helper(filename, tag_name, attribute): + """In the named XML file, get the values for an attribute on all the tags with the given tag name, + and return them as a list""" + values = [] + for element in xml_element_helper(filename, tag_name): + value = element.getAttribute(attribute) + values.append(value) + return values + + +def get_installed_packages(quiet=False): + data_path = os.path.join(MINGW_EXTRACT_PATH, "var", "lib", "mingw-get", "data") + + # msys tracks installed packages by installed tarnames in the sysroot file. + + # first, get the mapping from tarnames to package names for all available packages + package_list_filename = os.path.join(data_path, "package-list.xml") + catalogues = xml_read_helper(package_list_filename, "package-list", "catalogue") + + packages_by_tarname = {} + + for catalogue in catalogues: + catalog_filename = os.path.join(data_path, catalogue + ".xml") + package_catalogues = xml_read_helper(catalog_filename, "package-list", "catalogue") + + for package_catalogue in package_catalogues: + package_catalogue_filename = os.path.join(data_path, package_catalogue + ".xml") + for package_element in xml_element_helper(package_catalogue_filename, "package"): + assert isinstance(package_element, xml.dom.minidom.Element) + package_name = package_element.getAttribute("name") + releases = package_element.getElementsByTagName("release") + for release in releases: + assert isinstance(release, xml.dom.minidom.Element) + tarname = release.getAttribute("tarname") + skip_set = False + if tarname in packages_by_tarname: + old_package_name = packages_by_tarname[tarname] + if old_package_name != package_name: + if package_name.endswith("-old"): + skip_set = True + else: + assert False, "duplicate packages for %r; old: %r, " \ + "new %r" % (tarname, packages_by_tarname[tarname], package_name) + if not skip_set: + packages_by_tarname[tarname] = package_name + + # for tarname, package_name in packages_by_tarname.iteritems(): + # print "%s -> %s" % (tarname, package_name) + + # next, get the list of all the installed tarnames, and build the list of installed packages for them + installed_packages = set() + for match_proper in glob.glob1(data_path, "sysroot-*.xml"): + match_filename = os.path.join(data_path, match_proper) + + for tarname in xml_read_helper(match_filename, "installed", "tarname"): + package_catalogue = packages_by_tarname[tarname] + if not quiet: + print "%s - %s" % (tarname, package_catalogue) + sys.stdout.flush() + installed_packages.add(package_catalogue) + + return list(installed_packages) + + +def uninstall_packages(): + mingw_get_filename = os.path.join(MINGW_EXTRACT_PATH, "bin", "mingw-get.exe") + # output = subprocess.check_output([mingw_get_filename, "list"]) + + installed_packages = get_installed_packages() + + # uninstall them + for package_name in installed_packages: + cc([mingw_get_filename, "remove", package_name]) + + +def run_shell(): + mingw_get_dir = MINGW_EXTRACT_PATH + + msys_bin_dir = os.path.join(mingw_get_dir, "msys", "1.0", "bin") + mingw_bin_dir = os.path.join(mingw_get_dir, "mingw32", "bin") + mingw_get_bin_dir = os.path.join(mingw_get_dir, "bin") + + msys_bash = os.path.join(msys_bin_dir, "bash.exe") + + our_env = env_augmented_with_paths(mingw_get_bin_dir, msys_bin_dir, mingw_bin_dir) + + cc([msys_bash], env=our_env) + + +def get_symlink_filenames(prefix="SheepShaver/src/"): + """ Get a list of files that 'make links' in the top Makefile makes symlinks for """ + sheepshaver_dir = os.path.abspath(os.path.join(script_path, "..", "..")) + top_makefile = os.path.join(sheepshaver_dir, "Makefile") + + with open(top_makefile, "r") as handle: + while not handle.readline().startswith("links:"): + pass + first_line = handle.readline() + links_list_prefix = " @list='" + assert first_line.startswith(links_list_prefix) + lines = [first_line[len(links_list_prefix):]] + while True: + line = handle.readline() + end_pos = line.find("'") + if end_pos == -1: + lines.append(line) + else: + lines.append(line[:end_pos]) + break + + links_list_text = "".join(lines) + return [prefix + x for x in links_list_text.split() if x != "\\"] + + +def gitignore_patterns(patterns): + """ Add the given patterns to the .gitignore file so they don't show up in git diff output """ + + root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) + gitignore_file = os.path.join(root_dir, ".gitignore") + + with open(gitignore_file, "a") as handle: + for pattern in patterns: + print >> handle, pattern + + +def get_tracked_files(): + root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) + lines = subprocess.check_output(["git", "ls-tree", "--full-tree", "-r", + "--name-only", "HEAD"], cwd=root_dir).split("\n") + lines = [line.strip() for line in lines] + return [line for line in lines if line != ""] + + +def get_staged_deletes(): + staged_deletes = [] + root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) + lines = subprocess.check_output(["git", "diff", "--name-status", "--cached"], cwd=root_dir).split("\n") + for line in lines: + if line.strip() == "": + continue + flags, filename = line.split(None, 1) + # print repr((flags, filename)) + if flags == "D": + staged_deletes.append(filename) + return staged_deletes + + +class BuildDepTracker(object): + def __init__(self, root_path): + assert os.path.isdir(root_path) + self.root_path = root_path + self.filename = os.path.join(script_path, "build_on_msys.cache.json") + self.cache = None + self.step_input_files = {} + self.load() + self.debug_output = True + + def load(self): + if os.path.exists(self.filename): + with open(self.filename, "r") as handle: + self.cache = json.load(handle) + else: + self.cache = {"steps": {}} + + def save(self): + with open(self.filename, "w") as handle: + json.dump(self.cache, handle, sort_keys=True, indent=4, separators=(',', ': ')) + + def _rel_path_for(self, filename): + assert os.path.commonprefix(filename, self.root_path) == self.root_path + return os.path.relpath(filename, start=self.root_path) + + @contextmanager + def rebuilding_if_needed(self, step_name, input_filenames, base_dir=None): + """ + @type step_name: unicode or str + @type input_filenames: str or list of str + @param base_dir: if provided, all input_filenames are relative to this""" + needs_rebuild = self.check_needs_rebuild(step_name, input_filenames, base_dir) + yield needs_rebuild + if needs_rebuild: + self.done(step_name) + + def check_needs_rebuild(self, step_name, input_filenames, base_dir=None): + """ Check if the given step build name needs a rebuild based on our records and + the ages of the input files. + @type step_name: unicode or str + @type input_filenames: list of str + @param base_dir: if provided, all input_filenames are relative to this + """ + if type(input_filenames) in (unicode, str): + input_filenames = [input_filenames] + if base_dir is not None: + input_filenames = [os.path.join(base_dir, x) for x in input_filenames] + step_entries = self.cache["steps"] + if len(input_filenames) == 0: + assert False, "At least one input file is required in step '%s'" % step_name + + entry = step_entries.get(step_name) + + input_modified_time = self.get_inputs_modified_time(input_filenames) + + self.step_input_files[step_name] = input_filenames + + rebuild_required = entry is None or entry < input_modified_time + + if self.debug_output: + if entry is None: + desc = "not previously built; building" + else: + desc = "rebuild required: %s; last build %s;" \ + "input files changed %s; " % (rebuild_required, + datetime.datetime.fromtimestamp(entry), + datetime.datetime.fromtimestamp(input_modified_time), + ) + print "REBUILD(%s): %s" % (step_name, desc) + sys.stdout.flush() + + return rebuild_required + + @staticmethod + def get_inputs_modified_time(input_filenames): + input_file_mtimes = [] + for input_filename in input_filenames: + stat = os.stat(input_filename) + if stat is None: + assert False, "Missing input file %s" % input_filename + input_file_mtimes.append(stat.st_mtime) + input_modified_time = max(input_file_mtimes) + return input_modified_time + + def done(self, step_name): + print "DONE_REBUILD(%s)" % step_name + input_filenames = self.step_input_files.get(step_name) + if input_filenames is None: + assert False, "No needs_rebuild check was done for step '%s' so we don't know its input files" % step_name + + step_entries = self.cache["steps"] + input_modified_time = self.get_inputs_modified_time(input_filenames) + + # save a new entry for the build that happened + # build is good up for the current file modified times + step_entries[step_name] = input_modified_time + self.save() + + +def main(): + options = parse_args() + + if options.run_shell: + run_shell() + elif options.uninstall_packages: + uninstall_packages() + elif options.gitignore_link_outputs: + link_output_files = get_symlink_filenames() + # add to gitignore + gitignore_patterns(link_output_files) + + # stop tracking if tracked + tracked_files = get_tracked_files() + + staged_deletes = get_staged_deletes() + + root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) + for filename_relative in link_output_files: + # filename = os.path.join(root_dir, filename_relative.replace("/", "\\")) + file_is_tracked = filename_relative in tracked_files or \ + any(filename.startswith(filename_relative + "/") for filename in tracked_files) + if file_is_tracked and not filename_relative in staged_deletes: + subprocess.check_call(["git", "rm", "--cached", filename_relative], cwd=root_dir) + + else: + make_args = [] + num_threads = options.make_threads + if num_threads > 1: + make_args.append("-j%d" % num_threads) + + install(make_args, options.show_build_environment) + + +if __name__ == "__main__": + main() diff --git a/SheepShaver/src/Windows/cd_defs.h b/SheepShaver/src/Windows/cd_defs.h deleted file mode 120000 index fdaec5bdd..000000000 --- a/SheepShaver/src/Windows/cd_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/cd_defs.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/cdenable b/SheepShaver/src/Windows/cdenable deleted file mode 120000 index 3b36f98ca..000000000 --- a/SheepShaver/src/Windows/cdenable +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/cdenable \ No newline at end of file diff --git a/SheepShaver/src/Windows/clip_windows.cpp b/SheepShaver/src/Windows/clip_windows.cpp deleted file mode 120000 index 2669ccc95..000000000 --- a/SheepShaver/src/Windows/clip_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/clip_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index dcb4bfe03..e9b4f57c9 100755 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -84,7 +84,7 @@ AC_CACHE_CHECK([whether VirtualProtect works], #define HAVE_WIN32_VM 1 #define CONFIGURE_TEST_VM_MAP #define TEST_VM_PROT_$test_def - #include "../Unix/vm_alloc.cpp" + #include "../CrossPlatform/vm_alloc.cpp" ], ac_cv_VirtualProtect_works=no, rm -f core, dnl When cross-compiling, assume it works ac_cv_VirtualProtect_works="yes" @@ -94,7 +94,7 @@ AC_CACHE_CHECK([whether VirtualProtect works], #define HAVE_WIN32_VM 1 #define CONFIGURE_TEST_VM_MAP #define TEST_VM_PROT_RDWR_WRITE - #include "../Unix/vm_alloc.cpp" + #include "../CrossPlatform/vm_alloc.cpp" ], , ac_cv_VirtualProtect_works=no, dnl When cross-compiling, assume it works ac_cv_VirtualProtect_works="yes" @@ -116,8 +116,8 @@ AC_CACHE_CHECK([whether your system supports Windows exceptions], AC_TRY_RUN([ #define HAVE_WIN32_EXCEPTIONS 1 #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" + #include "../CrossPlatform/vm_alloc.cpp" + #include "../CrossPlatform/sigsegv.cpp" ], ac_cv_have_win32_exceptions=yes, ac_cv_have_win32_exceptions=no, @@ -141,8 +141,8 @@ AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], AC_TRY_RUN([ #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" + #include "../CrossPlatform/vm_alloc.cpp" + #include "../CrossPlatform/sigsegv.cpp" ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, dnl When cross-compiling, assume it works ac_cv_have_skip_instruction="yes" diff --git a/SheepShaver/src/Windows/ether_windows.cpp b/SheepShaver/src/Windows/ether_windows.cpp deleted file mode 120000 index 445951886..000000000 --- a/SheepShaver/src/Windows/ether_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/ether_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/ether_windows.h b/SheepShaver/src/Windows/ether_windows.h deleted file mode 120000 index 6659d3c9b..000000000 --- a/SheepShaver/src/Windows/ether_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/ether_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/extfs_windows.cpp b/SheepShaver/src/Windows/extfs_windows.cpp deleted file mode 120000 index 26d851b35..000000000 --- a/SheepShaver/src/Windows/extfs_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/extfs_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/kernel_windows.cpp b/SheepShaver/src/Windows/kernel_windows.cpp deleted file mode 120000 index d9c12cdc5..000000000 --- a/SheepShaver/src/Windows/kernel_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/kernel_windows.h b/SheepShaver/src/Windows/kernel_windows.h deleted file mode 120000 index 10e68cebd..000000000 --- a/SheepShaver/src/Windows/kernel_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 2d63d76b8..6efc01115 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -44,7 +44,7 @@ #include "vm_alloc.h" #include "sigsegv.h" #include "util_windows.h" -#include "kernel_windows.h" +//#include "kernel_windows.h" #define DEBUG 0 #include "debug.h" @@ -207,8 +207,8 @@ int main(int argc, char **argv) if (!check_drivers()) QuitEmulator(); - // Load win32 libraries - KernelInit(); +// // Load win32 libraries +// KernelInit(); // FIXME: default to DIB driver if (getenv("SDL_VIDEODRIVER") == NULL) @@ -446,8 +446,8 @@ static void Quit(void) // Exit preferences PrefsExit(); - // Release win32 libraries - KernelExit(); +// // Release win32 libraries +// KernelExit(); #ifdef ENABLE_MON // Exit mon diff --git a/SheepShaver/src/Windows/posix_emu.cpp b/SheepShaver/src/Windows/posix_emu.cpp deleted file mode 120000 index 336f134f6..000000000 --- a/SheepShaver/src/Windows/posix_emu.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/posix_emu.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/posix_emu.h b/SheepShaver/src/Windows/posix_emu.h deleted file mode 120000 index 6fd82b8ba..000000000 --- a/SheepShaver/src/Windows/posix_emu.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/posix_emu.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/prefs_editor_gtk.cpp b/SheepShaver/src/Windows/prefs_editor_gtk.cpp deleted file mode 120000 index b94e76156..000000000 --- a/SheepShaver/src/Windows/prefs_editor_gtk.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/prefs_editor_gtk.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/router b/SheepShaver/src/Windows/router deleted file mode 120000 index e8619d55c..000000000 --- a/SheepShaver/src/Windows/router +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/router \ No newline at end of file diff --git a/SheepShaver/src/Windows/sdl_fix.patch b/SheepShaver/src/Windows/sdl_fix.patch new file mode 100644 index 000000000..d4c38a196 --- /dev/null +++ b/SheepShaver/src/Windows/sdl_fix.patch @@ -0,0 +1,12 @@ +diff -ur downloads/SDL-1.2.15-orig/build-scripts/ltmain.sh downloads/SDL-1.2.15/build-scripts/ltmain.sh +--- downloads/SDL-1.2.15-orig/build-scripts/ltmain.sh 2017-01-15 20:57:25 -0800 ++++ downloads/SDL-1.2.15/build-scripts/ltmain.sh 2017-01-15 21:00:16 -0800 +@@ -2274,7 +2274,7 @@ + if test -n "$current_libdirs"; then + # Maybe just do a dry run. + $opt_dry_run && current_libdirs=" -n$current_libdirs" +- exec_cmd='$SHELL $progpath $preserve_args --finish$current_libdirs' ++ exec_cmd='$SHELL "$progpath" $preserve_args --finish$current_libdirs' + else + exit $EXIT_SUCCESS + fi diff --git a/SheepShaver/src/Windows/serial_windows.cpp b/SheepShaver/src/Windows/serial_windows.cpp deleted file mode 120000 index 88454f92b..000000000 --- a/SheepShaver/src/Windows/serial_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/serial_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/sys_windows.cpp b/SheepShaver/src/Windows/sys_windows.cpp deleted file mode 120000 index 3eacbe88b..000000000 --- a/SheepShaver/src/Windows/sys_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/sys_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index f5aaee125..0236d74e2 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -25,6 +25,8 @@ #error "Your compiler is not ANSI. Get a real one." #endif +#define min(x,y) ((x) < (y) ? (x) : (y)) + #include "config.h" #include "user_strings_windows.h" @@ -32,11 +34,17 @@ #error "You don't have ANSI C header files." #endif +#ifndef PASCAL +#define PASCAL +#endif + #include #include #include #include #include +#include +#undef _TEXT #include #ifdef __WIN32__ #include @@ -225,6 +233,7 @@ static inline uint64 tswap64(uint64 x) { return bswap_64(x); } (((x) & 0x0000ff00) << 8) | (((x) & 0x000000ff) << 24)) #if defined(__GNUC__) +#if 0 #define do_byteswap_16(x) \ (__extension__ \ ({ register uint16 __v, __x = (x); \ @@ -243,8 +252,19 @@ static inline uint64 tswap64(uint64 x) { return bswap_64(x); } __v = do_byteswap_32_g(__x); \ __v; })) #else -#define do_byteswap_16(x) do_byteswap_16_g(x) -#define do_byteswap_32(x) do_byteswap_32_g(x) + +inline uint16 funyun_bswap_16(uint16 x) +{ + return ((x & 0xff) << 8) | ((x >> 8) & 0xff); +} + +#define do_byteswap_16(x) (funyun_bswap_16(x)) +#define do_byteswap_32(x) (do_byteswap_32_g(x)) + +#endif +#else +#define do_byteswap_16(x) (do_byteswap_16_g((uint16)(x))) +#define do_byteswap_32(x) (do_byteswap_32_g(x)) #endif #if defined(__i386__) || defined(__x86_64__) diff --git a/SheepShaver/src/Windows/timer_windows.cpp b/SheepShaver/src/Windows/timer_windows.cpp deleted file mode 120000 index b43201a94..000000000 --- a/SheepShaver/src/Windows/timer_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/timer_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/util_windows.cpp b/SheepShaver/src/Windows/util_windows.cpp deleted file mode 120000 index 748109814..000000000 --- a/SheepShaver/src/Windows/util_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/util_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/util_windows.h b/SheepShaver/src/Windows/util_windows.h deleted file mode 120000 index f875032de..000000000 --- a/SheepShaver/src/Windows/util_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/util_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/xpram_windows.cpp b/SheepShaver/src/Windows/xpram_windows.cpp deleted file mode 120000 index 4c317a379..000000000 --- a/SheepShaver/src/Windows/xpram_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/xpram_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 120000 index 1cc36b981..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/adb.cpp \ No newline at end of file diff --git a/SheepShaver/src/audio.cpp b/SheepShaver/src/audio.cpp deleted file mode 120000 index 3cc4fd954..000000000 --- a/SheepShaver/src/audio.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/audio.cpp \ No newline at end of file diff --git a/SheepShaver/src/cdrom.cpp b/SheepShaver/src/cdrom.cpp deleted file mode 120000 index d97cd44d2..000000000 --- a/SheepShaver/src/cdrom.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/cdrom.cpp \ No newline at end of file diff --git a/SheepShaver/src/disk.cpp b/SheepShaver/src/disk.cpp deleted file mode 120000 index f994afaa8..000000000 --- a/SheepShaver/src/disk.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/disk.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/audio_dummy.cpp b/SheepShaver/src/dummy/audio_dummy.cpp deleted file mode 120000 index 6c3904ced..000000000 --- a/SheepShaver/src/dummy/audio_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/audio_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/clip_dummy.cpp b/SheepShaver/src/dummy/clip_dummy.cpp deleted file mode 120000 index d5f484223..000000000 --- a/SheepShaver/src/dummy/clip_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/clip_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/prefs_editor_dummy.cpp b/SheepShaver/src/dummy/prefs_editor_dummy.cpp deleted file mode 120000 index 66b5d5593..000000000 --- a/SheepShaver/src/dummy/prefs_editor_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/prefs_editor_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/scsi_dummy.cpp b/SheepShaver/src/dummy/scsi_dummy.cpp deleted file mode 120000 index ae9682105..000000000 --- a/SheepShaver/src/dummy/scsi_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/scsi_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/serial_dummy.cpp b/SheepShaver/src/dummy/serial_dummy.cpp deleted file mode 120000 index 26af78ab0..000000000 --- a/SheepShaver/src/dummy/serial_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/serial_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/ether.cpp b/SheepShaver/src/ether.cpp index 2a1e53c70..05335cf8e 100644 --- a/SheepShaver/src/ether.cpp +++ b/SheepShaver/src/ether.cpp @@ -32,6 +32,8 @@ #include "ether_defs.h" #include "macos_util.h" +#include "main.h" + #define DEBUG 0 #include "debug.h" diff --git a/SheepShaver/src/extfs.cpp b/SheepShaver/src/extfs.cpp deleted file mode 120000 index 623147243..000000000 --- a/SheepShaver/src/extfs.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/extfs.cpp \ No newline at end of file diff --git a/SheepShaver/src/gfxaccel.cpp b/SheepShaver/src/gfxaccel.cpp index ed65e5d83..6f385ba0e 100644 --- a/SheepShaver/src/gfxaccel.cpp +++ b/SheepShaver/src/gfxaccel.cpp @@ -24,6 +24,8 @@ #include "video.h" #include "video_defs.h" +#include "main.h" + #define DEBUG 0 #include "debug.h" diff --git a/SheepShaver/src/include/adb.h b/SheepShaver/src/include/adb.h deleted file mode 120000 index e65ef4a46..000000000 --- a/SheepShaver/src/include/adb.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/adb.h \ No newline at end of file diff --git a/SheepShaver/src/include/audio.h b/SheepShaver/src/include/audio.h deleted file mode 120000 index 73ebba7e2..000000000 --- a/SheepShaver/src/include/audio.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/audio.h \ No newline at end of file diff --git a/SheepShaver/src/include/audio_defs.h b/SheepShaver/src/include/audio_defs.h deleted file mode 120000 index 04523f257..000000000 --- a/SheepShaver/src/include/audio_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/audio_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/cdrom.h b/SheepShaver/src/include/cdrom.h deleted file mode 120000 index d7300f7af..000000000 --- a/SheepShaver/src/include/cdrom.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/cdrom.h \ No newline at end of file diff --git a/SheepShaver/src/include/clip.h b/SheepShaver/src/include/clip.h deleted file mode 120000 index 23f10c020..000000000 --- a/SheepShaver/src/include/clip.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/clip.h \ No newline at end of file diff --git a/SheepShaver/src/include/debug.h b/SheepShaver/src/include/debug.h deleted file mode 120000 index 6a0dd40c7..000000000 --- a/SheepShaver/src/include/debug.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/debug.h \ No newline at end of file diff --git a/SheepShaver/src/include/disk.h b/SheepShaver/src/include/disk.h deleted file mode 120000 index d785c55dc..000000000 --- a/SheepShaver/src/include/disk.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/disk.h \ No newline at end of file diff --git a/SheepShaver/src/include/extfs.h b/SheepShaver/src/include/extfs.h deleted file mode 120000 index a86e2538e..000000000 --- a/SheepShaver/src/include/extfs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/extfs.h \ No newline at end of file diff --git a/SheepShaver/src/include/extfs_defs.h b/SheepShaver/src/include/extfs_defs.h deleted file mode 120000 index 0970ce1f5..000000000 --- a/SheepShaver/src/include/extfs_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/extfs_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/main.h b/SheepShaver/src/include/main.h index e595c04a5..787832dab 100644 --- a/SheepShaver/src/include/main.h +++ b/SheepShaver/src/include/main.h @@ -77,4 +77,15 @@ extern void TriggerInterrupt(void); // Trigger SIGUSR1 interrupt in emulat extern void DisableInterrupt(void); // Disable SIGUSR1 interrupt (can be nested) extern void EnableInterrupt(void); // Enable SIGUSR1 interrupt (can be nested) +// Array length +#if __cplusplus >= 201103L || (_MSC_VER >= 1900 && defined __cplusplus) +template +constexpr size_t lengthof(T (& a)[size]) +{ + return size; +} +#else +#define lengthof(a) (sizeof(a) / sizeof(a[0])) +#endif + #endif diff --git a/SheepShaver/src/include/pict.h b/SheepShaver/src/include/pict.h deleted file mode 120000 index 6e5a0b71c..000000000 --- a/SheepShaver/src/include/pict.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/pict.h \ No newline at end of file diff --git a/SheepShaver/src/include/prefs.h b/SheepShaver/src/include/prefs.h deleted file mode 120000 index 64a7ae513..000000000 --- a/SheepShaver/src/include/prefs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/prefs.h \ No newline at end of file diff --git a/SheepShaver/src/include/scsi.h b/SheepShaver/src/include/scsi.h deleted file mode 120000 index b5aa39cc2..000000000 --- a/SheepShaver/src/include/scsi.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/scsi.h \ No newline at end of file diff --git a/SheepShaver/src/include/serial.h b/SheepShaver/src/include/serial.h deleted file mode 120000 index 42183f367..000000000 --- a/SheepShaver/src/include/serial.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/serial.h \ No newline at end of file diff --git a/SheepShaver/src/include/serial_defs.h b/SheepShaver/src/include/serial_defs.h deleted file mode 120000 index 1765fd106..000000000 --- a/SheepShaver/src/include/serial_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/serial_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/sony.h b/SheepShaver/src/include/sony.h deleted file mode 120000 index d9eb31446..000000000 --- a/SheepShaver/src/include/sony.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/sony.h \ No newline at end of file diff --git a/SheepShaver/src/include/sys.h b/SheepShaver/src/include/sys.h deleted file mode 120000 index 5581536a0..000000000 --- a/SheepShaver/src/include/sys.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/sys.h \ No newline at end of file diff --git a/SheepShaver/src/include/timer.h b/SheepShaver/src/include/timer.h deleted file mode 120000 index a7ee23e94..000000000 --- a/SheepShaver/src/include/timer.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/timer.h \ No newline at end of file diff --git a/SheepShaver/src/include/xpram.h b/SheepShaver/src/include/xpram.h deleted file mode 120000 index 382aa791e..000000000 --- a/SheepShaver/src/include/xpram.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/xpram.h \ No newline at end of file diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h deleted file mode 120000 index 110f4bd0d..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h +++ /dev/null @@ -1 +0,0 @@ -../../../../../../../BasiliskII/src/uae_cpu/compiler/codegen_x86.h \ No newline at end of file diff --git a/SheepShaver/src/pict.c b/SheepShaver/src/pict.c deleted file mode 120000 index bcbd7ff4f..000000000 --- a/SheepShaver/src/pict.c +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/pict.c \ No newline at end of file diff --git a/SheepShaver/src/prefs.cpp b/SheepShaver/src/prefs.cpp deleted file mode 120000 index 6559f3b13..000000000 --- a/SheepShaver/src/prefs.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/prefs.cpp \ No newline at end of file diff --git a/SheepShaver/src/scsi.cpp b/SheepShaver/src/scsi.cpp deleted file mode 120000 index 1e1a7e348..000000000 --- a/SheepShaver/src/scsi.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/scsi.cpp \ No newline at end of file diff --git a/SheepShaver/src/slirp b/SheepShaver/src/slirp deleted file mode 120000 index 4e6fe8f54..000000000 --- a/SheepShaver/src/slirp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/slirp \ No newline at end of file diff --git a/SheepShaver/src/sony.cpp b/SheepShaver/src/sony.cpp deleted file mode 120000 index 42aaabb75..000000000 --- a/SheepShaver/src/sony.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/sony.cpp \ No newline at end of file diff --git a/SheepShaver/src/xpram.cpp b/SheepShaver/src/xpram.cpp deleted file mode 120000 index 17fe090fd..000000000 --- a/SheepShaver/src/xpram.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/xpram.cpp \ No newline at end of file From dc54a5eceb0c570a49393c7812c6a3f384518a08 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 04:51:34 -0800 Subject: [PATCH 039/534] missed commits --- .gitignore | 2 ++ BasiliskII/src/Windows/ether_windows.cpp | 2 ++ BasiliskII/src/Windows/serial_windows.cpp | 10 ++++++---- 3 files changed, 10 insertions(+), 4 deletions(-) diff --git a/.gitignore b/.gitignore index 3e80b8008..e6b6772bf 100644 --- a/.gitignore +++ b/.gitignore @@ -140,3 +140,5 @@ SheepShaver/src/Windows/config.log SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h BasiliskII/src/Windows/x64/ SheepShaver/src/Windows/config.status +SheepShaver/src/Windows/obj/ +SheepShaver/src/Windows/build_on_msys.cache.json diff --git a/BasiliskII/src/Windows/ether_windows.cpp b/BasiliskII/src/Windows/ether_windows.cpp index 1f59d8305..4ff27f625 100755 --- a/BasiliskII/src/Windows/ether_windows.cpp +++ b/BasiliskII/src/Windows/ether_windows.cpp @@ -39,6 +39,8 @@ #include "ether_windows.h" #include "router/router.h" #include "util_windows.h" +// somehow util_windows undefines min +#define min(x,y) ((x) < (y) ? (x) : (y)) #include "libslirp.h" // Define to let the slirp library determine the right timeout for select() diff --git a/BasiliskII/src/Windows/serial_windows.cpp b/BasiliskII/src/Windows/serial_windows.cpp index 5a062b32b..194bf8381 100755 --- a/BasiliskII/src/Windows/serial_windows.cpp +++ b/BasiliskII/src/Windows/serial_windows.cpp @@ -28,6 +28,8 @@ #include "main.h" #include "util_windows.h" +// somehow util_windows undefines min +#define min(x,y) ((x) < (y) ? (x) : (y)) #include "macos_util.h" #include "prefs.h" #include "serial.h" @@ -310,12 +312,12 @@ int16 XSERDPort::open(uint16 config) if (input_thread_active) { TerminateThread(input_thread_active,0); CloseHandle(input_signal); - input_thread_active = false; + input_thread_active = 0; } if (output_thread_active) { TerminateThread(output_thread_active,0); CloseHandle(output_signal); - output_thread_active = false; + output_thread_active = 0; } if(fd != INVALID_HANDLE_VALUE) { CloseHandle(fd); @@ -674,13 +676,13 @@ int16 XSERDPort::close() if (input_thread_active) { quitting = true; ReleaseSemaphore(input_signal,1,NULL); - input_thread_active = false; + input_thread_active = 0; CloseHandle(input_signal); } if (output_thread_active) { quitting = true; ReleaseSemaphore(output_signal,1,NULL); - output_thread_active = false; + output_thread_active = 0; // bugfix: was: CloseHandle(&output_signal); CloseHandle(output_signal); } From daac4f58ecd3407f2e544e7ffc4cb22c8df79364 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 04:52:19 -0800 Subject: [PATCH 040/534] reverse serial_windows.cpp symlink removal --- SheepShaver/Makefile | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index bf61fa9ac..53ecae219 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -89,7 +89,7 @@ links: Windows/util_windows.h Windows/xpram_windows.cpp \ Windows/serial_windows.cpp Windows/router Windows/b2ether \ Windows/ether_windows.h Windows/ether_windows.cpp \ - Windows/prefs_editor_gtk.cpp \ + Windows/serial_windows.cpp Windows/prefs_editor_gtk.cpp \ uae_cpu/compiler/codegen_x86.h'; \ PREFIX="../"; case $(B2_TOPDIR) in /*) PREFIX="";; esac; \ for i in $$list; do \ From 0ffa196f29dafa43481690e695b9469c728fd953 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 14:44:33 -0800 Subject: [PATCH 041/534] remove PASCAL undef --- SheepShaver/src/Windows/sysdeps.h | 4 ---- 1 file changed, 4 deletions(-) diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index 0236d74e2..04dcff682 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -34,10 +34,6 @@ #error "You don't have ANSI C header files." #endif -#ifndef PASCAL -#define PASCAL -#endif - #include #include #include From fa8c87acffa36b950ad688138cdb1db87910da20 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 14:46:55 -0800 Subject: [PATCH 042/534] add LDFLAGS for static libgcc and stdc++ so we don't need dlls for those --- SheepShaver/src/Windows/Makefile.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 1da802c7e..7dcabb1f8 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -37,7 +37,7 @@ CFLAGS = @CFLAGS@ $(SDL_CFLAGS) CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp DEFS = @DEFS@ -LDFLAGS = @LDFLAGS@ +LDFLAGS = @LDFLAGS@ -static-libgcc -static-libstdc++ -Wl,-Bstatic -lstdc++ -lpthread -Wl,-Bdynamic LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ PERL = @PERL@ From e0783e5c2099592e6c7a5f6d2722cb0f30e9526d Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 14:47:21 -0800 Subject: [PATCH 043/534] add option to copy sheepshaver exe after build --- SheepShaver/src/Windows/build_on_msys.py | 17 +++++++++++++++-- 1 file changed, 15 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index fd46ea843..cb81756e4 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -13,6 +13,8 @@ from contextlib import contextmanager import datetime +import shutil + MACEMU_CFLAGS = "-mwin32" MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11 -U__STRICT_ANSI__" @@ -47,6 +49,9 @@ def parse_args(): default=False, action="store_true", ) + parser.add_argument("--install-to-dir", + default=None, + help="Copy the resulting exe to the given directory after building") return parser.parse_args() @@ -110,7 +115,7 @@ def log(msg): sys.stdout.flush() -def install(make_args, show_build_environment): +def install(make_args, show_build_environment, install_to_dir=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -250,6 +255,13 @@ def install(make_args, show_build_environment): cc([make_bin] + make_args, cwd=script_path, env=our_env) + if install_to_dir is not None: + assert os.path.isdir(install_to_dir) + binary_name = "SheepShaver.exe" + dest_filename = os.path.join(install_to_dir, binary_name) + log("Creating %s" % dest_filename) + shutil.copy(os.path.join(script_path, binary_name), dest_filename) + def show_env_dict(d): keys = d.keys() @@ -543,7 +555,8 @@ def main(): if num_threads > 1: make_args.append("-j%d" % num_threads) - install(make_args, options.show_build_environment) + log("Install to %s" % options.install_to_dir) + install(make_args, options.show_build_environment, install_to_dir=options.install_to_dir) if __name__ == "__main__": From 17b977b6ad82463ae7248a271cae04ec0f5d737b Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 14:48:02 -0800 Subject: [PATCH 044/534] fix silly name of inline bswap 16 --- SheepShaver/src/Windows/sysdeps.h | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index 04dcff682..942b08909 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -249,12 +249,12 @@ static inline uint64 tswap64(uint64 x) { return bswap_64(x); } __v; })) #else -inline uint16 funyun_bswap_16(uint16 x) +inline uint16 sysdeps_inline_bswap_16(uint16 x) { return ((x & 0xff) << 8) | ((x >> 8) & 0xff); } -#define do_byteswap_16(x) (funyun_bswap_16(x)) +#define do_byteswap_16(x) (sysdeps_inline_bswap_16(x)) #define do_byteswap_32(x) (do_byteswap_32_g(x)) #endif From aabd23408d08df395f03c86573b314a87211c4e2 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 15:02:20 -0800 Subject: [PATCH 045/534] option to run a shell command --- SheepShaver/src/Windows/build_on_msys.py | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index cb81756e4..437e6c73f 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -52,6 +52,8 @@ def parse_args(): parser.add_argument("--install-to-dir", default=None, help="Copy the resulting exe to the given directory after building") + parser.add_argument("--run-shell-command", "-c", + help="Run a command in the mingw shell") return parser.parse_args() @@ -353,7 +355,7 @@ def uninstall_packages(): cc([mingw_get_filename, "remove", package_name]) -def run_shell(): +def run_shell(command=None): mingw_get_dir = MINGW_EXTRACT_PATH msys_bin_dir = os.path.join(mingw_get_dir, "msys", "1.0", "bin") @@ -364,7 +366,10 @@ def run_shell(): our_env = env_augmented_with_paths(mingw_get_bin_dir, msys_bin_dir, mingw_bin_dir) - cc([msys_bash], env=our_env) + args = [msys_bash] + if command is not None: + args += ["-c", command] + cc(args, env=our_env) def get_symlink_filenames(prefix="SheepShaver/src/"): @@ -529,6 +534,8 @@ def main(): if options.run_shell: run_shell() + elif options.run_shell_command is not None: + run_shell(options.run_shell_command) elif options.uninstall_packages: uninstall_packages() elif options.gitignore_link_outputs: From 5c264434e75c3c322422d781e68f9c81237ca4f9 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 15:57:36 -0800 Subject: [PATCH 046/534] disable obsolete cd driver warning --- BasiliskII/src/Windows/util_windows.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/Windows/util_windows.cpp b/BasiliskII/src/Windows/util_windows.cpp index ef29a06bd..35ee128a5 100755 --- a/BasiliskII/src/Windows/util_windows.cpp +++ b/BasiliskII/src/Windows/util_windows.cpp @@ -271,7 +271,7 @@ bool check_drivers(void) else { TCHAR str[256]; _sntprintf(str, lengthof(str), TEXT("The CD-ROM driver file \"%s\" is missing."), path); - WarningAlert(str); + //WarningAlert(str); } return true; From b90b67971ca6c3c79c22f1048dc16ef1cd36a433 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 16:01:52 -0800 Subject: [PATCH 047/534] fpclassify return type may vary --- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp index 26e985332..ce9c580ed 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp @@ -904,11 +904,19 @@ void powerpc_cpu::execute_fp_int_convert(uint32 opcode) * Rc Predicate to record CR1 **/ +#ifndef FPCLASSIFY_RETURN_T +#ifdef __MINGW32__ +#define FPCLASSIFY_RETURN_T int +#else +#define FPCLASSIFY_RETURN_T uint8 +#endif +#endif + template< class FP > void powerpc_cpu::fp_classify(FP x) { uint32 c = fpscr() & ~FPSCR_FPRF_field::mask(); - uint8 fc = fpclassify(x); + FPCLASSIFY_RETURN_T fc = fpclassify(x); switch (fc) { case FP_NAN: c |= FPSCR_FPRF_FU_field::mask() | FPSCR_FPRF_C_field::mask(); From 7ef9f10712168394b887d0a37b5128e007536555 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:00:42 -0800 Subject: [PATCH 048/534] don't undef __STRICT_ANSI__ since it's not necessary with gnu++11 --- SheepShaver/src/Windows/build_on_msys.py | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 437e6c73f..57e89b94d 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -16,7 +16,8 @@ import shutil MACEMU_CFLAGS = "-mwin32" -MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11 -U__STRICT_ANSI__" +# TODO check if __STRICT_ANSI__ is still required since we switched to gnu++11 +MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" script_path = os.path.dirname(os.path.abspath(__file__)) From ffd629494382c365f2f252286bf463589089a827 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:01:49 -0800 Subject: [PATCH 049/534] build script comments & todos & cleanup --- SheepShaver/src/Windows/Makefile.in | 1 + SheepShaver/src/Windows/build_on_msys.py | 8 +++++--- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 7dcabb1f8..fed312d85 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -38,6 +38,7 @@ CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp DEFS = @DEFS@ LDFLAGS = @LDFLAGS@ -static-libgcc -static-libstdc++ -Wl,-Bstatic -lstdc++ -lpthread -Wl,-Bdynamic +#TODO remove pthread part of that if irrelevant LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ PERL = @PERL@ diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 57e89b94d..08933a542 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -1,5 +1,5 @@ # -# A python 2.7 script to fetch all dependencies and build Sheepshaver using MSYS +# A python 2.7 script to fetch all dependencies and build Sheepshaver using MSYS / mingw # import argparse import glob @@ -12,9 +12,11 @@ import sys from contextlib import contextmanager import datetime - import shutil +# TODO keep track of the values for these flags used for the previous compile and +# redo the macemu configures if they change + MACEMU_CFLAGS = "-mwin32" # TODO check if __STRICT_ANSI__ is still required since we switched to gnu++11 MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" @@ -563,7 +565,7 @@ def main(): if num_threads > 1: make_args.append("-j%d" % num_threads) - log("Install to %s" % options.install_to_dir) + log("Will install to %s" % options.install_to_dir) install(make_args, options.show_build_environment, install_to_dir=options.install_to_dir) From e303e314f51aeb524e4c093da0eba50e3ab8170e Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:11:19 -0800 Subject: [PATCH 050/534] use explicit __thiscall calling convention for member function casts on mingw32 --- SheepShaver/src/kpx_cpu/include/nvmemfun.hpp | 17 +++++++++++++---- 1 file changed, 13 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp b/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp index efad01ffc..830b8ecde 100644 --- a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp +++ b/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp @@ -47,8 +47,17 @@ #if HAVE_FAST_NV_MEM_FUN +#ifdef __MINGW32__ +#define PF_CONVENTION __thiscall +#else +// TODO set a calling convention on other platforms/compilers where the default cc does not pass obj as first param +#define PF_CONVENTION +#endif + template< class PMF, class PF > inline PF nv_mem_fun_of(PMF pmf) { + /** Convert member function pointer to a regular function pointer that takes the object as first parameter + */ if (pmf == 0) return 0; union { PMF pmf; uintptr p[MEM_FUN_WORDS]; } x; @@ -59,7 +68,7 @@ inline PF nv_mem_fun_of(PMF pmf) { template< class R, class T > class nv_mem_fun_t : public std::unary_function { typedef R (T::*pmf_t)(); - typedef R (*pf_t)(T *); + typedef R (* PF_CONVENTION pf_t)(T *); pf_t pf; public: nv_mem_fun_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) {} @@ -70,7 +79,7 @@ class nv_mem_fun_t : public std::unary_function { template< class R, class T > class const_nv_mem_fun_t : public std::unary_function { typedef R (T::*pmf_t)(); - typedef R (*pf_t)(T *); + typedef R (* PF_CONVENTION pf_t)(T *); pf_t const pf; public: const_nv_mem_fun_t(pmf_t const pmf) : pf(nv_mem_fun_of(pmf)) {} @@ -81,7 +90,7 @@ class const_nv_mem_fun_t : public std::unary_function { template< class R, class T, class A > class nv_mem_fun1_t : public std::binary_function { typedef R (T::*pmf_t)(A); - typedef R (*pf_t)(T *, A x); + typedef R (* PF_CONVENTION pf_t)(T *, A x); pf_t pf; public: nv_mem_fun1_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) {} @@ -92,7 +101,7 @@ class nv_mem_fun1_t : public std::binary_function { template< class R, class T, class A > class const_nv_mem_fun1_t : public std::binary_function { typedef R (T::*pmf_t)(A); - typedef R (*pf_t)(T *, A x); + typedef R (* PF_CONVENTION pf_t)(T *, A x); pf_t const pf; public: const_nv_mem_fun1_t(pmf_t const pmf) : pf(nv_mem_fun_of(pmf)) {} From bd3fecc7803215d24df1c325a30e345560d82eab Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:29:13 -0800 Subject: [PATCH 051/534] build script cleanup & renames & updating TODOs; cleanup gitignore --- .gitignore | 33 +++++++++++++++++---- SheepShaver/src/Windows/build_on_msys.py | 37 ++++++++++++------------ 2 files changed, 46 insertions(+), 24 deletions(-) diff --git a/.gitignore b/.gitignore index e6b6772bf..02e459bef 100644 --- a/.gitignore +++ b/.gitignore @@ -6,8 +6,19 @@ # Mac OS X metadata *.DS_Store -SheepShaver/src/Windows/downloads/ + +# IDE project and intermeidate files .idea/ +BasiliskII/src/Windows/x64/ +SheepShaver/src/Windows/x64/ +CMakeLists.txt +cmake-build-debug/ + +# Python build script files +SheepShaver/src/Windows/downloads/ +SheepShaver/src/Windows/build_on_msys.cache.json + +# Symlinks/copies created by make links SheepShaver/src/adb.cpp SheepShaver/src/audio.cpp SheepShaver/src/cdrom.cpp @@ -131,14 +142,26 @@ SheepShaver/src/Windows/ether_windows.cpp SheepShaver/src/Windows/serial_windows.cpp SheepShaver/src/Windows/prefs_editor_gtk.cpp SheepShaver/src/uae_cpu/compiler/codegen_x86.h -SheepShaver/src/Windows/autom4te.cache/ +SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h +SheepShaver/src/Windows/video_blit.cpp +SheepShaver/src/Windows/video_blit.h +SheepShaver/src/Windows/video_vosf.h +SheepShaver/src/Windows/sigsegv.cpp +SheepShaver/src/Windows/sigsegv.h +SheepShaver/src/Windows/vm_alloc.cpp +SheepShaver/src/Windows/vm_alloc.h SheepShaver/src/Windows/m4/ + +# Makefile intermediate and output files SheepShaver/src/Windows/aclocal.m4 +SheepShaver/src/Windows/autom4te.cache/ SheepShaver/src/Windows/config.h.in SheepShaver/src/Windows/configure SheepShaver/src/Windows/config.log -SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h -BasiliskII/src/Windows/x64/ SheepShaver/src/Windows/config.status +SheepShaver/src/Windows/config.h +SheepShaver/src/Windows/Makefile SheepShaver/src/Windows/obj/ -SheepShaver/src/Windows/build_on_msys.cache.json +SheepShaver/src/Windows/SheepShaver.exe + +# additions below \ No newline at end of file diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 08933a542..42e6bb84f 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -18,7 +18,6 @@ # redo the macemu configures if they change MACEMU_CFLAGS = "-mwin32" -# TODO check if __STRICT_ANSI__ is still required since we switched to gnu++11 MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" script_path = os.path.dirname(os.path.abspath(__file__)) @@ -109,7 +108,7 @@ def display_dir(path): return path -def cc(cmd_args, *args, **kwargs): +def run(cmd_args, *args, **kwargs): print "%s (cwd=%s)" % (" ".join(cmd_args), kwargs.get("cwd")) sys.stdout.flush() subprocess.check_call(cmd_args, *args, **kwargs) @@ -147,7 +146,7 @@ def install(make_args, show_build_environment, install_to_dir=None): installed_packages = get_installed_packages(quiet=True) if any(package not in installed_packages for package in all_packages_to_install): - cc([mingw_get_filename, "install"] + all_packages_to_install) + run([mingw_get_filename, "install"] + all_packages_to_install) else: log("All required packages installed") @@ -180,7 +179,7 @@ def install(make_args, show_build_environment, install_to_dir=None): if needs_rebuild: # apply patch for building in msys/mingw patch_exe = os.path.join(msys_bin_dir, "patch.exe") - cc([patch_exe, "-p2", "-i", patch_filename], cwd=sdl_dir, env=our_env) + run([patch_exe, "-p2", "-i", patch_filename], cwd=sdl_dir, env=our_env) dep_tracker.done("sdl_patch") msys_bash = os.path.join(msys_bin_dir, "bash.exe") @@ -191,15 +190,15 @@ def install(make_args, show_build_environment, install_to_dir=None): with dep_tracker.rebuilding_if_needed("sdl_autogen", ["configure.in"] + sdl_patched_files, base_dir=sdl_dir) as needs_rebuild: if needs_rebuild: - cc([msys_bash, "./autogen.sh"], cwd=sdl_dir, env=our_env) + run([msys_bash, "./autogen.sh"], cwd=sdl_dir, env=our_env) with dep_tracker.rebuilding_if_needed("sdl_configure", "configure", base_dir=sdl_dir) as needs_rebuild: if needs_rebuild: - cc([msys_bash, "./configure", "--disable-shared", "--prefix=/usr"], cwd=sdl_dir, env=our_env) - cc([make_bin] + make_args + ["clean"], cwd=sdl_dir, env=our_env) + run([msys_bash, "./configure", "--disable-shared", "--prefix=/usr"], cwd=sdl_dir, env=our_env) + run([make_bin] + make_args + ["clean"], cwd=sdl_dir, env=our_env) - cc([make_bin] + make_args, cwd=sdl_dir, env=our_env) + run([make_bin] + make_args, cwd=sdl_dir, env=our_env) - # TODO track all the files tht this could install + # TODO track all the files that this could install sdl_headers = "SDL.h SDL_active.h SDL_audio.h SDL_byteorder.h SDL_cdrom.h SDL_cpuinfo.h SDL_endian.h " \ "SDL_error.h SDL_events.h SDL_getenv.h SDL_joystick.h SDL_keyboard.h SDL_keysym.h SDL_loadso.h " \ "SDL_main.h SDL_mouse.h SDL_mutex.h SDL_name.h SDL_opengl.h SDL_platform.h SDL_quit.h SDL_rwops.h " \ @@ -210,7 +209,7 @@ def install(make_args, show_build_environment, install_to_dir=None): with dep_tracker.rebuilding_if_needed("sdl_install", sdl_files_being_installed, base_dir=sdl_dir) as needs_rebuild: if needs_rebuild: - cc([make_bin, "install"], cwd=sdl_dir, env=our_env) + run([make_bin, "install"], cwd=sdl_dir, env=our_env) # build sheepshaver @@ -227,7 +226,7 @@ def install(make_args, show_build_environment, install_to_dir=None): base_dir=root_dir) as needs_rebuild: if needs_rebuild: try: - cc([make_bin, "links"], cwd=sheepshaver_dir, env=our_env) + run([make_bin, "links"], cwd=sheepshaver_dir, env=our_env) except subprocess.CalledProcessError: pass @@ -238,14 +237,14 @@ def install(make_args, show_build_environment, install_to_dir=None): with dep_tracker.rebuilding_if_needed("sheepshaver_autogen", ["configure.ac"], base_dir=script_path) as needs_rebuild: if needs_rebuild: - cc([msys_bash, os.path.join(unix_dir, "autogen.sh")], cwd=script_path, env=autogen_env) + run([msys_bash, os.path.join(unix_dir, "autogen.sh")], cwd=script_path, env=autogen_env) ln_cmd = os.path.join(msys_bin_dir, "ln.exe") windows_m4_dir = os.path.join(script_path, "m4") if not os.path.exists(windows_m4_dir): - cc([ln_cmd, "-sf", os.path.join(unix_dir, "m4"), windows_m4_dir], - cwd=script_path, env=autogen_env) + run([ln_cmd, "-sf", os.path.join(unix_dir, "m4"), windows_m4_dir], + cwd=script_path, env=autogen_env) configure_macemu_env = dict(our_env) configure_macemu_env["CC"] = "gcc %s" % MACEMU_CFLAGS @@ -255,10 +254,10 @@ def install(make_args, show_build_environment, install_to_dir=None): base_dir=script_path) as needs_rebuild: if needs_rebuild: # TODO FIX JIT - cc([msys_bash, "./configure", "--with-gtk=no", "--enable-jit=no"], - cwd=script_path, env=configure_macemu_env) + run([msys_bash, "./configure", "--with-gtk=no", "--enable-jit=no"], + cwd=script_path, env=configure_macemu_env) - cc([make_bin] + make_args, cwd=script_path, env=our_env) + run([make_bin] + make_args, cwd=script_path, env=our_env) if install_to_dir is not None: assert os.path.isdir(install_to_dir) @@ -355,7 +354,7 @@ def uninstall_packages(): # uninstall them for package_name in installed_packages: - cc([mingw_get_filename, "remove", package_name]) + run([mingw_get_filename, "remove", package_name]) def run_shell(command=None): @@ -372,7 +371,7 @@ def run_shell(command=None): args = [msys_bash] if command is not None: args += ["-c", command] - cc(args, env=our_env) + run(args, env=our_env) def get_symlink_filenames(prefix="SheepShaver/src/"): From 9efd46d396460c8d88056f43e9fcbcbd2c5fad44 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:31:27 -0800 Subject: [PATCH 052/534] build script pep-8 --- SheepShaver/src/Windows/build_on_msys.py | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 42e6bb84f..6b0107c27 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -555,7 +555,7 @@ def main(): # filename = os.path.join(root_dir, filename_relative.replace("/", "\\")) file_is_tracked = filename_relative in tracked_files or \ any(filename.startswith(filename_relative + "/") for filename in tracked_files) - if file_is_tracked and not filename_relative in staged_deletes: + if file_is_tracked and filename_relative not in staged_deletes: subprocess.check_call(["git", "rm", "--cached", filename_relative], cwd=root_dir) else: From 8259c00929fa22d0e475c7364cf75741ec0c701d Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:34:33 -0800 Subject: [PATCH 053/534] gitignore cleanup --- .gitignore | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.gitignore b/.gitignore index 02e459bef..839d12401 100644 --- a/.gitignore +++ b/.gitignore @@ -7,7 +7,7 @@ # Mac OS X metadata *.DS_Store -# IDE project and intermeidate files +# IDE project and intermediate files .idea/ BasiliskII/src/Windows/x64/ SheepShaver/src/Windows/x64/ @@ -152,7 +152,7 @@ SheepShaver/src/Windows/vm_alloc.cpp SheepShaver/src/Windows/vm_alloc.h SheepShaver/src/Windows/m4/ -# Makefile intermediate and output files +# autotools & make intermediate and output files SheepShaver/src/Windows/aclocal.m4 SheepShaver/src/Windows/autom4te.cache/ SheepShaver/src/Windows/config.h.in From 1af0c4685a4b34147e457e49518110035338aa54 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 19:57:34 -0800 Subject: [PATCH 054/534] python build script: give a better error message when there is a syntax error in the JSON cache file --- SheepShaver/src/Windows/build_on_msys.py | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 6b0107c27..7e9e0cc52 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -253,8 +253,7 @@ def install(make_args, show_build_environment, install_to_dir=None): with dep_tracker.rebuilding_if_needed("sheepshaver_configure", ["configure", "Makefile.in"], base_dir=script_path) as needs_rebuild: if needs_rebuild: - # TODO FIX JIT - run([msys_bash, "./configure", "--with-gtk=no", "--enable-jit=no"], + run([msys_bash, "./configure", "--with-gtk=no"], cwd=script_path, env=configure_macemu_env) run([make_bin] + make_args, cwd=script_path, env=our_env) @@ -445,7 +444,14 @@ def __init__(self, root_path): def load(self): if os.path.exists(self.filename): with open(self.filename, "r") as handle: - self.cache = json.load(handle) + try: + self.cache = json.load(handle) + except ValueError: + msg = "ERROR: There was a problem loading the JSON cache file %s. " \ + "Maybe check the file for a syntax error?" % self.filename + print >> sys.stderr, msg + sys.stderr.flush() + raise Exception(msg) else: self.cache = {"steps": {}} From dae89116e754a5d9ae8f1aa500ec63ae1cc2d534 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 21:11:21 -0800 Subject: [PATCH 055/534] python build script: option to copy the supplied precompiled dyngen output files instead of running dyngen --- SheepShaver/src/Windows/build_on_msys.py | 24 +++++++++++++++++++++--- 1 file changed, 21 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 7e9e0cc52..75822ce86 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -56,6 +56,9 @@ def parse_args(): help="Copy the resulting exe to the given directory after building") parser.add_argument("--run-shell-command", "-c", help="Run a command in the mingw shell") + parser.add_argument("--use-precompiled-dyngen", + default=False, + action="store_true") return parser.parse_args() @@ -119,7 +122,7 @@ def log(msg): sys.stdout.flush() -def install(make_args, show_build_environment, install_to_dir=None): +def install(make_args, show_build_environment, use_precompiled_dyngen, install_to_dir=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -256,7 +259,21 @@ def install(make_args, show_build_environment, install_to_dir=None): run([msys_bash, "./configure", "--with-gtk=no"], cwd=script_path, env=configure_macemu_env) - run([make_bin] + make_args, cwd=script_path, env=our_env) + sheepshaver_make_args = list(make_args) + + if use_precompiled_dyngen: + for precompiled_dyngen_file, target_dir, target_dyngen_file in ( + ("dyngen_precompiled/ppc-execute-impl.cpp", ".", "ppc-execute-impl.cpp"), + ("dyngen_precompiled/basic-dyngen-ops-x86_32.hpp", "../Unix", "basic-dyngen-ops.hpp"), + ("dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp", "../kpx_cpu", "ppc-dyngen-ops.hpp"), + ): + log("Copying %s to %s" % (precompiled_dyngen_file, target_dyngen_file)) + shutil.copy(os.path.join(script_path, "..", "Unix", precompiled_dyngen_file), + os.path.join(script_path, target_dyngen_file) + ) + sheepshaver_make_args.append("USE_DYNGEN=no") + + run([make_bin] + sheepshaver_make_args, cwd=script_path, env=our_env) if install_to_dir is not None: assert os.path.isdir(install_to_dir) @@ -571,7 +588,8 @@ def main(): make_args.append("-j%d" % num_threads) log("Will install to %s" % options.install_to_dir) - install(make_args, options.show_build_environment, install_to_dir=options.install_to_dir) + install(make_args, options.show_build_environment, options.use_precompiled_dyngen, + install_to_dir=options.install_to_dir) if __name__ == "__main__": From 8c3f1fa0c377e7a82bf09c3f43ee64e58cb9fce9 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 18 Jan 2017 21:14:02 -0800 Subject: [PATCH 056/534] gitignore dyngen and output files --- .gitignore | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/.gitignore b/.gitignore index 839d12401..e6bcf9eef 100644 --- a/.gitignore +++ b/.gitignore @@ -161,7 +161,11 @@ SheepShaver/src/Windows/config.log SheepShaver/src/Windows/config.status SheepShaver/src/Windows/config.h SheepShaver/src/Windows/Makefile +SheepShaver/src/Windows/dyngen.exe +SheepShaver/src/Windows/basic-dyngen-ops.hpp +SheepShaver/src/Windows/ppc-dyngen-ops.hpp +SheepShaver/src/Windows/ppc-execute-impl.cpp SheepShaver/src/Windows/obj/ SheepShaver/src/Windows/SheepShaver.exe -# additions below \ No newline at end of file +# additions below From 21a6d39d4b165084c0641e5f36c0b7ecee886273 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 05:12:03 -0800 Subject: [PATCH 057/534] python build script: jit option --- SheepShaver/src/Windows/build_on_msys.py | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 75822ce86..86610642d 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -59,6 +59,9 @@ def parse_args(): parser.add_argument("--use-precompiled-dyngen", default=False, action="store_true") + parser.add_argument("--build-jit", + default=False, + action="store_true") return parser.parse_args() @@ -122,7 +125,7 @@ def log(msg): sys.stdout.flush() -def install(make_args, show_build_environment, use_precompiled_dyngen, install_to_dir=None): +def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, install_to_dir=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -256,12 +259,15 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, install_t with dep_tracker.rebuilding_if_needed("sheepshaver_configure", ["configure", "Makefile.in"], base_dir=script_path) as needs_rebuild: if needs_rebuild: - run([msys_bash, "./configure", "--with-gtk=no"], + sheepshaver_configure_options = [] + if not build_jit: + sheepshaver_configure_options.append("--enable-jit=no") + run([msys_bash, "./configure", "--with-gtk=no"] + sheepshaver_configure_options, cwd=script_path, env=configure_macemu_env) sheepshaver_make_args = list(make_args) - if use_precompiled_dyngen: + if use_precompiled_dyngen and build_jit: for precompiled_dyngen_file, target_dir, target_dyngen_file in ( ("dyngen_precompiled/ppc-execute-impl.cpp", ".", "ppc-execute-impl.cpp"), ("dyngen_precompiled/basic-dyngen-ops-x86_32.hpp", "../Unix", "basic-dyngen-ops.hpp"), @@ -588,7 +594,7 @@ def main(): make_args.append("-j%d" % num_threads) log("Will install to %s" % options.install_to_dir) - install(make_args, options.show_build_environment, options.use_precompiled_dyngen, + install(make_args, options.show_build_environment, options.use_precompiled_dyngen, options.build_jit, install_to_dir=options.install_to_dir) From d8f5d43a9c58113f128b7e6adeefbba555b8aedb Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 05:13:01 -0800 Subject: [PATCH 058/534] python build script: when getting modified time for a directory, also check contents' times --- SheepShaver/src/Windows/build_on_msys.py | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 86610642d..48308cbf1 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -534,14 +534,20 @@ def check_needs_rebuild(self, step_name, input_filenames, base_dir=None): return rebuild_required - @staticmethod - def get_inputs_modified_time(input_filenames): + @classmethod + def get_inputs_modified_time(cls, input_filenames): input_file_mtimes = [] for input_filename in input_filenames: + if os.path.isdir(input_filename): + subtime = cls.get_inputs_modified_time(os.path.join(input_filename, s) for s in os.listdir(input_filename)) + if subtime is not None: + input_file_mtimes.append(subtime) stat = os.stat(input_filename) if stat is None: assert False, "Missing input file %s" % input_filename input_file_mtimes.append(stat.st_mtime) + if not input_file_mtimes: + return None input_modified_time = max(input_file_mtimes) return input_modified_time From d3b56d8e326e7a08e4b4e72bd372cbd85b96cef3 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 05:14:20 -0800 Subject: [PATCH 059/534] Fix for intermittent cursor snapping: don't attempt to warp the cursor when it's not in the window --- BasiliskII/src/SDL/video_sdl.cpp | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 77c102bcb..9ab036cb5 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1493,6 +1493,14 @@ void video_set_cursor(void) #elif defined(__APPLE__) move = mouse_grabbed; #endif + if (move) { + // when the cursor is not in the window, the cursor position from GetMouseState is not the actual + // cursor position, so do not warp the cursor as we don't want to actually move it. + if (!(SDL_GetAppState() & SDL_APPMOUSEFOCUS)) { + move = false; + } + } + if (move) { int visible = SDL_ShowCursor(-1); if (visible) { From 2f9bc272beb019dd7574285689273eb3015215ef Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 21:12:35 -0800 Subject: [PATCH 060/534] ws2 defines and missing prototypes for building withmingw32 --- BasiliskII/src/slirp/libslirp.h | 9 +++++++++ BasiliskII/src/slirp/slirp.h | 22 ++++++++++++++++++++++ 2 files changed, 31 insertions(+) diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h index 8a1aa31e6..c955a28c6 100644 --- a/BasiliskII/src/slirp/libslirp.h +++ b/BasiliskII/src/slirp/libslirp.h @@ -2,7 +2,16 @@ #define _LIBSLIRP_H #ifdef _WIN32 +#ifdef __MINGW32__ +#if _WIN32_WINNT < 0x501 +#undef _WIN32_WINNT +#define _WIN32_WINNT 0x501 +#endif +#endif #include +#ifdef __MINGW32__ +#include +#endif int inet_aton(const char *cp, struct in_addr *ia); #else #include diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index b845caa77..81a49dd2e 100644 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -22,8 +22,30 @@ typedef char *caddr_t; typedef int socklen_t; typedef unsigned long ioctlsockopt_t; +#ifdef __MINGW32__ +#if _WIN32_WINNT < 0x501 +#undef _WIN32_WINNT +#define _WIN32_WINNT 0x501 +#endif +#endif # include # include + +#ifdef __MINGW32__ +char * WSAAPI inet_ntop( + INT Family, + PVOID pAddr, + PTSTR pStringBuf, + size_t StringBufSize +); + +INT WSAAPI inet_pton( + INT Family, + const char * pszAddrString, + PVOID pAddrBuf +); +#endif + # include # include From 1229eb0ea9a45b399609d05f1958384fd0f9a535 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 21:14:46 -0800 Subject: [PATCH 061/534] if the originals for any symlinked dirs (which are just copies under msys/mingw) have been updated, delete the copies and make links again --- SheepShaver/src/Windows/build_on_msys.py | 22 ++++++++++++++++++++-- 1 file changed, 20 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 48308cbf1..87ef7fee6 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -222,15 +222,33 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit sheepshaver_dir = os.path.abspath(os.path.join(script_path, "..", "..")) print "SHEEPSHAVER_DIR: %s" % sheepshaver_dir - link_inputs = get_symlink_filenames(prefix="BasiliskII/src/") + link_input_prefix = "BasiliskII/src/" + link_output_prefix = "SheepShaver/src/" + link_inputs = get_symlink_filenames(prefix=link_input_prefix) print "Tracking %d link inputs" % len(link_inputs) sys.stdout.flush() + stale_or_missing_dir_contents_files = False + for link_input_proper in link_inputs: + link_input = os.path.join(root_dir, link_input_proper) + if os.path.isdir(link_input): + assert link_input_proper.startswith(link_input_prefix) + link_output_proper = link_output_prefix + link_input_proper[len(link_input_prefix):] + link_input_mtime = dep_tracker.get_inputs_modified_time([link_input]) + link_output = os.path.join(root_dir, link_output_proper) + if os.path.isdir(link_output): + link_output_mtime = dep_tracker.get_inputs_modified_time([link_output]) + if link_output_mtime is None or link_output_mtime < link_input_mtime: + shutil.rmtree(link_output) + stale_or_missing_dir_contents_files = True + else: + stale_or_missing_dir_contents_files = True + # TODO: fix make links step rather than just eating the exception with dep_tracker.rebuilding_if_needed("sheepshaver_top_makefile", ["SheepShaver/Makefile"] + link_inputs, base_dir=root_dir) as needs_rebuild: - if needs_rebuild: + if needs_rebuild or stale_or_missing_dir_contents_files: try: run([make_bin, "links"], cwd=sheepshaver_dir, env=our_env) except subprocess.CalledProcessError: From 69a3c31fff16e5c08d5767a2b07b98674783fd33 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 21:38:21 -0800 Subject: [PATCH 062/534] Add configure option to disable VOSF; add it to python build script --- SheepShaver/src/Windows/build_on_msys.py | 10 ++++++++-- SheepShaver/src/Windows/configure.ac | 10 ++++++++-- 2 files changed, 16 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 87ef7fee6..1a9a8523b 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -62,6 +62,10 @@ def parse_args(): parser.add_argument("--build-jit", default=False, action="store_true") + parser.add_argument("--debug-build", + default=False, + action="store_true", + help="disable things in the build that are a problem for debugging") return parser.parse_args() @@ -125,7 +129,7 @@ def log(msg): sys.stdout.flush() -def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, install_to_dir=None): +def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, debug_build, install_to_dir=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -280,6 +284,8 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit sheepshaver_configure_options = [] if not build_jit: sheepshaver_configure_options.append("--enable-jit=no") + if debug_build: + sheepshaver_configure_options.append("--enable-vosf=no") run([msys_bash, "./configure", "--with-gtk=no"] + sheepshaver_configure_options, cwd=script_path, env=configure_macemu_env) @@ -619,7 +625,7 @@ def main(): log("Will install to %s" % options.install_to_dir) install(make_args, options.show_build_environment, options.use_precompiled_dyngen, options.build_jit, - install_to_dir=options.install_to_dir) + options.debug_build, install_to_dir=options.install_to_dir) if __name__ == "__main__": diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index e9b4f57c9..64fa9612d 100755 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -14,6 +14,7 @@ AC_CANONICAL_TARGET dnl Options. AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) +AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) dnl Checks for programs. AC_PROG_CC @@ -153,8 +154,12 @@ AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], AC_TRANSLATE_DEFINE(HAVE_SIGSEGV_SKIP_INSTRUCTION, "$ac_cv_have_skip_instruction", [Define if we can ignore the fault (instruction skipping in SIGSEGV handler).]) -dnl We really want VOSF (Video on SEGV Signals) screen updates acceleration -AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) +dnl Enable VOSF screen updates with this feature is requested +if [[ "x$WANT_VOSF" = "xyes" ]]; then + AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) +else + WANT_VOSF=no +fi dnl Check for GCC 2.7 or higher. HAVE_GCC27=no @@ -262,5 +267,6 @@ echo SheepShaver configuration summary: echo echo Enable JIT compiler .............. : $WANT_JIT echo GTK user interface ............... : $WANT_GTK +echo Enable VOSF ...................... : $WANT_VOSF echo echo "Configuration done. Now type \"make\"." From bdd2ee1190622873f2a8494ed3cb959a1122d9a8 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 19 Jan 2017 21:38:37 -0800 Subject: [PATCH 063/534] python build script: do make clean if we reconfigured --- SheepShaver/src/Windows/build_on_msys.py | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 1a9a8523b..f913b47da 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -278,6 +278,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit configure_macemu_env["CC"] = "gcc %s" % MACEMU_CFLAGS configure_macemu_env["CXX"] = "g++ %s" % MACEMU_CXXFLAGS + did_configure = False with dep_tracker.rebuilding_if_needed("sheepshaver_configure", ["configure", "Makefile.in"], base_dir=script_path) as needs_rebuild: if needs_rebuild: @@ -288,6 +289,10 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit sheepshaver_configure_options.append("--enable-vosf=no") run([msys_bash, "./configure", "--with-gtk=no"] + sheepshaver_configure_options, cwd=script_path, env=configure_macemu_env) + did_configure = True + + if did_configure: + run([make_bin, "clean"], cwd=script_path, env=our_env) sheepshaver_make_args = list(make_args) From 52a36f24bbf1c4ea66cfeb98d730c671be674755 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Fri, 20 Jan 2017 01:33:20 -0800 Subject: [PATCH 064/534] guard against the slirp queues null deref on dequeues I've seen in the debugger --- BasiliskII/src/slirp/misc.c | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c index b80caf662..308c507bd 100644 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -112,7 +112,10 @@ inline void remque_32(void *a) { register struct quehead_32 *element = (struct quehead_32 *) a; ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; + struct quehead_32 * prev = element->qh_rlink; + if (prev != 0) { + prev->qh_link = element->qh_link; + } element->qh_rlink = 0; } @@ -138,7 +141,10 @@ void remque(void *a) { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead *)(element->qh_rlink))->qh_link = element->qh_link; + struct quehead * prev = element->qh_rlink; + if (prev != NULL) { + prev->qh_link = element->qh_link; + } element->qh_rlink = NULL; /* element->qh_link = NULL; TCP FIN1 crashes if you do this. Why ? */ } From 68353ca6b195e353870ce490d969da3b29771344 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Fri, 20 Jan 2017 02:05:55 -0800 Subject: [PATCH 065/534] fix for null deref in slirp soread when the so doesn't have a tcpcb yet --- BasiliskII/src/slirp/socket.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 42ba31b24..5572a1960 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -108,6 +108,10 @@ soread(so) struct sbuf *sb = &so->so_snd; u_int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; + + if (!so->so_tcpcb) { + so->so_tcpcb = tcp_newtcpcb(so); // but how did we get in this state? should we just default mss for it? + } u_int mss = so->so_tcpcb->t_maxseg; DEBUG_CALL("soread"); From bab9820231fcc398904d5292c924183f778fe70b Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Fri, 20 Jan 2017 13:27:00 -0800 Subject: [PATCH 066/534] slirp: more changes to prevent a crash in the soread without so_tcpcb case --- BasiliskII/src/slirp/slirp.c | 2 +- BasiliskII/src/slirp/socket.c | 5 ++++- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index dc2fdc658..5f7617baa 100644 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -219,7 +219,7 @@ int slirp_select_fill(int *pnfds, /* * See if we need a tcp_fasttimo */ - if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) + if (time_fasttimo == 0 && so->so_tcpcb && so->so_tcpcb->t_flags & TF_DELACK) time_fasttimo = curtime; /* Flag when we want a fasttimo */ /* diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 5572a1960..bc14852ac 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -110,7 +110,10 @@ soread(so) struct iovec iov[2]; if (!so->so_tcpcb) { - so->so_tcpcb = tcp_newtcpcb(so); // but how did we get in this state? should we just default mss for it? + // how did we get in this state? + tcp_newtcpcb(so); + // from what I've seen while debugging, the socket struct is about to get freed, so consider it closed. + return -1; } u_int mss = so->so_tcpcb->t_maxseg; From fa9b42554125ca3282e90751aba07484237dc820 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Fri, 20 Jan 2017 13:27:25 -0800 Subject: [PATCH 067/534] python build script: remove old config.status before rebuilding --- SheepShaver/src/Windows/build_on_msys.py | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index f913b47da..fa0973f5f 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -282,6 +282,10 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit with dep_tracker.rebuilding_if_needed("sheepshaver_configure", ["configure", "Makefile.in"], base_dir=script_path) as needs_rebuild: if needs_rebuild: + config_status_filename = os.path.join(script_path, "config.status") + if os.path.exists(config_status_filename): + log("removing existing config.status") + os.remove(config_status_filename) sheepshaver_configure_options = [] if not build_jit: sheepshaver_configure_options.append("--enable-jit=no") From 4715db8f28943ad8ec352cc791c407a46e495110 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 00:58:09 -0800 Subject: [PATCH 068/534] top level script should make sure directories it wants to put symlinks in exist --- SheepShaver/Makefile | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index 53ecae219..f6f9dc083 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -49,6 +49,8 @@ $(SRCARCHIVE): $(SRCS) $(DOCS) # Links to Basilisk II sources # links: + mkdir -p src/CrossPlatform + mkdir -p src/Unix/Irix @list='adb.cpp audio.cpp cdrom.cpp disk.cpp extfs.cpp pict.c \ prefs.cpp scsi.cpp sony.cpp xpram.cpp \ include/adb.h include/audio.h include/audio_defs.h \ From cc0c1686854fe45963899113eee5f10a1c851ac6 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 15:07:47 -0800 Subject: [PATCH 069/534] when making links, if the link already exists as a directory, remove the directory first --- SheepShaver/Makefile | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index f6f9dc083..c9914745f 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -99,7 +99,8 @@ links: echo $$i; o=$$i; \ case $$i in *codegen_x86.h) o=kpx_cpu/src/cpu/jit/x86/codegen_x86.h;; esac; \ SUB=`echo $$o | sed 's;[^/]*/;../;g' | sed 's;[^/]*$$;;'` ;\ - ln -sf "$$PREFIX$$SUB$(B2_TOPDIR)/src/$$i" src/$$o; \ + cur_link=src/$$o ;\ + if [ -d "$$cur_link" ]; then rm -rf "$$cur_link"; fi ;\ + ln -sf "$$PREFIX$$SUB$(B2_TOPDIR)/src/$$i" $$cur_link; \ fi; \ - done; \ - ln -sf ../../../../../SheepShaver/src/Unix/config.h $(B2_TOPDIR)/src/Unix/Linux/NetDriver/config.h + done; From 4326182b027e815bd184d40b9583f71c4eff0aa5 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 15:08:33 -0800 Subject: [PATCH 070/534] python build script: fix for fresh install --- SheepShaver/src/Windows/build_on_msys.py | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index fa0973f5f..55f620542 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -354,6 +354,8 @@ def get_installed_packages(quiet=False): # first, get the mapping from tarnames to package names for all available packages package_list_filename = os.path.join(data_path, "package-list.xml") + if not os.path.exists(package_list_filename): + return [] catalogues = xml_read_helper(package_list_filename, "package-list", "catalogue") packages_by_tarname = {} From bab9a35ff2ebc8fe522f3324fdf62711891ec8ab Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 15:25:02 -0800 Subject: [PATCH 071/534] python build script: fix for top Makefile changes --- SheepShaver/src/Windows/build_on_msys.py | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 55f620542..e6e3e5467 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -439,8 +439,11 @@ def get_symlink_filenames(prefix="SheepShaver/src/"): with open(top_makefile, "r") as handle: while not handle.readline().startswith("links:"): pass - first_line = handle.readline() links_list_prefix = " @list='" + while True: + first_line = handle.readline() + if first_line.startswith(links_list_prefix): + break assert first_line.startswith(links_list_prefix) lines = [first_line[len(links_list_prefix):]] while True: From 7c01c27e029cc41fdcd8ea61412077d6e0f898bf Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 16:08:03 -0800 Subject: [PATCH 072/534] python build script: option to add an additional PATH entry with highest priority for building --- SheepShaver/src/Windows/build_on_msys.py | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index e6e3e5467..d168babae 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -66,6 +66,9 @@ def parse_args(): default=False, action="store_true", help="disable things in the build that are a problem for debugging") + parser.add_argument("--add-path", + default=None, + help="Add something to the PATH used for builds, with highest priority") return parser.parse_args() @@ -129,7 +132,8 @@ def log(msg): sys.stdout.flush() -def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, debug_build, install_to_dir=None): +def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, debug_build, + install_to_dir=None, add_path=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -163,8 +167,11 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit mingw_get_bin_dir = os.path.join(mingw_get_dir, "bin") msys_bin_dir = os.path.join(mingw_get_dir, "msys", "1.0", "bin") mingw_bin_dir = os.path.join(mingw_get_dir, "mingw32", "bin") - - our_env = env_augmented_with_paths(mingw_get_bin_dir, msys_bin_dir, mingw_bin_dir) + + paths_to_add = [mingw_get_bin_dir, msys_bin_dir, mingw_bin_dir] + if add_path is not None: + paths_to_add.insert(0, add_path) + our_env = env_augmented_with_paths(*paths_to_add) # ditch any outer make flags from cmake or similar due to compatibility problems for var in ["MAKEFLAGS", "MAKELEVEL", "MFLAGS"]: @@ -639,7 +646,7 @@ def main(): log("Will install to %s" % options.install_to_dir) install(make_args, options.show_build_environment, options.use_precompiled_dyngen, options.build_jit, - options.debug_build, install_to_dir=options.install_to_dir) + options.debug_build, install_to_dir=options.install_to_dir, add_path=options.add_path) if __name__ == "__main__": From c4903326ab0d8672aa57837bef007b4017a525a9 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 16:27:03 -0800 Subject: [PATCH 073/534] appveyor CI build script first cut --- appveyor.yml | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 appveyor.yml diff --git a/appveyor.yml b/appveyor.yml new file mode 100644 index 000000000..6e61d3f5f --- /dev/null +++ b/appveyor.yml @@ -0,0 +1,21 @@ +version: 1.0.{build} +platform: x64 +clone_folder: c:\project\src\github.com\rakslice\macemu +clone_depth: 5 + +environment: + matrix: + - PYTHON: "C:\\Python27" + PYTHON_VERSION: "2.7.x" # currently 2.7.9? + PYTHON_ARCH: "32" + +build_script: +- cmd: >- + %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py + +after_build: + - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe + +artifacts: + - path: sheepshaver.zip + name: sheepshaver non-jit build From 8548644595bb6d43fd0069556263bb29a610f3cc Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 16:28:32 -0800 Subject: [PATCH 074/534] don't show "Will install to" output if that is disabled --- SheepShaver/src/Windows/build_on_msys.py | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index d168babae..a5a48920c 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -644,7 +644,8 @@ def main(): if num_threads > 1: make_args.append("-j%d" % num_threads) - log("Will install to %s" % options.install_to_dir) + if options.install_to_dir is not None: + log("Will install to %s" % options.install_to_dir) install(make_args, options.show_build_environment, options.use_precompiled_dyngen, options.build_jit, options.debug_build, install_to_dir=options.install_to_dir, add_path=options.add_path) From e3fe441709fea56190c8d4a9fa66fb0041af53f2 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 16:49:23 -0800 Subject: [PATCH 075/534] python build script: build arg for passing --build to configure scripts --- SheepShaver/src/Windows/build_on_msys.py | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index a5a48920c..592f523be 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -69,6 +69,9 @@ def parse_args(): parser.add_argument("--add-path", default=None, help="Add something to the PATH used for builds, with highest priority") + parser.add_argument("--build", + default=None, + help="Build platform to pass to configure scripts") return parser.parse_args() @@ -133,7 +136,7 @@ def log(msg): def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit, debug_build, - install_to_dir=None, add_path=None): + install_to_dir=None, add_path=None, build=None): root_dir = os.path.abspath(os.path.join(script_path, "..", "..", "..")) dep_tracker = BuildDepTracker(root_dir) @@ -210,7 +213,10 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit run([msys_bash, "./autogen.sh"], cwd=sdl_dir, env=our_env) with dep_tracker.rebuilding_if_needed("sdl_configure", "configure", base_dir=sdl_dir) as needs_rebuild: if needs_rebuild: - run([msys_bash, "./configure", "--disable-shared", "--prefix=/usr"], cwd=sdl_dir, env=our_env) + sdl_configure_args = [msys_bash, "./configure", "--disable-shared", "--prefix=/usr"] + if build is not None: + sdl_configure_args += ["--build", build] + run(sdl_configure_args, cwd=sdl_dir, env=our_env) run([make_bin] + make_args + ["clean"], cwd=sdl_dir, env=our_env) run([make_bin] + make_args, cwd=sdl_dir, env=our_env) @@ -647,7 +653,8 @@ def main(): if options.install_to_dir is not None: log("Will install to %s" % options.install_to_dir) install(make_args, options.show_build_environment, options.use_precompiled_dyngen, options.build_jit, - options.debug_build, install_to_dir=options.install_to_dir, add_path=options.add_path) + options.debug_build, install_to_dir=options.install_to_dir, add_path=options.add_path, + build=options.build) if __name__ == "__main__": From 65da666052c2769dace50d415d6dcc8326cb46a7 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 16:50:34 -0800 Subject: [PATCH 076/534] add explicit --build option for appveyor CI because config.guess is failing there --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index 6e61d3f5f..c9ef43e43 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -11,7 +11,7 @@ environment: build_script: - cmd: >- - %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py + %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe From f2238fe3e7acfdf4f2f8d26d2fd4c25038a1f622 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 17:48:56 -0800 Subject: [PATCH 077/534] python build script: option to use a specific mingw path --- SheepShaver/src/Windows/build_on_msys.py | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 592f523be..72bef3c3a 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -72,6 +72,10 @@ def parse_args(): parser.add_argument("--build", default=None, help="Build platform to pass to configure scripts") + parser.add_argument("--alt-mingw-path", + dest="alt_mingw_path", + default=None, + help="Path to use for mingw install") return parser.parse_args() @@ -618,8 +622,12 @@ def done(self, step_name): def main(): + global MINGW_EXTRACT_PATH options = parse_args() + if options.alt_mingw_path: + MINGW_EXTRACT_PATH = options.alt_mingw_path + if options.run_shell: run_shell() elif options.run_shell_command is not None: From 9a5b6ae3b3eaf520090ea98280daabf158903ac0 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 18:00:02 -0800 Subject: [PATCH 078/534] appveyor CI: use default mingw path to hopefully save us some downloads every run --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index c9ef43e43..851e4f344 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -11,7 +11,7 @@ environment: build_script: - cmd: >- - %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 + %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 --alt-mingw-path c:\mingw after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe From eab21be5e31288481afc28c8e783b92d100ee7d0 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 18:02:45 -0800 Subject: [PATCH 079/534] Revert "appveyor CI: use default mingw path to hopefully save us some downloads every run" This reverts commit 9a5b6ae3b3eaf520090ea98280daabf158903ac0. --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index 851e4f344..c9ef43e43 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -11,7 +11,7 @@ environment: build_script: - cmd: >- - %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 --alt-mingw-path c:\mingw + %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe From 58114327c9c8101c9337c999544fc9fae5a590f4 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 18:24:39 -0800 Subject: [PATCH 080/534] appveyor CI: save mingw-get cache between builds --- appveyor.yml | 3 +++ 1 file changed, 3 insertions(+) diff --git a/appveyor.yml b/appveyor.yml index c9ef43e43..ca7e600be 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -16,6 +16,9 @@ build_script: after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe +cache: + - C:\mingw-sheep\var -> appveyor.yml + artifacts: - path: sheepshaver.zip name: sheepshaver non-jit build From c4c61cec6447e66f12d02f43e43f6c99e0109204 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 18:48:39 -0800 Subject: [PATCH 081/534] python build script: adding sed and grep I'm using from msys to packages list --- SheepShaver/src/Windows/build_on_msys.py | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 72bef3c3a..de3437771 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -158,7 +158,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit mingw_get_filename = os.path.join(mingw_get_dir, "bin", "mingw-get.exe") assert os.path.isfile(mingw_get_filename) - msys_packages = ["bash", "autogen", "m4", "make", "patch"] + msys_packages = ["bash", "autogen", "m4", "make", "patch", "grep", "sed"] mingw_packages = ["autoconf", "autoconf2.5", "automake", "automake1.11", "binutils", "base", "autotools", "libtool", "gcc", "gcc-g++"] From 0df6ef8d28633605ecc10c5fe2a9434629e56fe2 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 19:16:08 -0800 Subject: [PATCH 082/534] appveyor CI: show build environment in this build --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index ca7e600be..6991a6cfc 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -11,7 +11,7 @@ environment: build_script: - cmd: >- - %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 + %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 --show-build-environment after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe From d2e8b4283f2e9d927aebb6c8fdb3e2de3ee5b191 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 19:39:16 -0800 Subject: [PATCH 083/534] put build tools first in the path rather than last --- SheepShaver/src/Windows/build_on_msys.py | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index de3437771..19ca81c0a 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -114,9 +114,14 @@ def extract_zip(zip_filename, target_dir): def env_augmented_with_paths(*path_dirs_to_add): env_copy = dict(os.environ) path_dirs = env_copy["PATH"].split(os.pathsep) + + paths_adding = [] for d in path_dirs_to_add: if d not in path_dirs: - path_dirs.append(d) + paths_adding.append(d) + + path_dirs = paths_adding + path_dirs + env_copy["PATH"] = os.pathsep.join(path_dirs) return env_copy From cc7a0df0c5976b2353affea3da90b1f81d1830a8 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 21:08:55 -0800 Subject: [PATCH 084/534] python build scripts: URLs cleanup --- SheepShaver/src/Windows/build_on_msys.py | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 19ca81c0a..ad65a3a5e 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -20,6 +20,10 @@ MACEMU_CFLAGS = "-mwin32" MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" +MINGW_GET_URL = "https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" \ + "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip" +SDL_ZIP_URL = "http://www.libsdl.org/release/SDL-1.2.15.zip" + script_path = os.path.dirname(os.path.abspath(__file__)) @@ -155,8 +159,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit # get msys / mingw tools we need to build - mingw_get_zip = download("https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" - "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip") + mingw_get_zip = download(MINGW_GET_URL) mingw_get_dir = MINGW_EXTRACT_PATH extract_zip(mingw_get_zip, mingw_get_dir) @@ -196,7 +199,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit # build SDL - sdl_zip_filename = download("http://www.libsdl.org/release/SDL-1.2.15.zip") + sdl_zip_filename = download(SDL_ZIP_URL) sdl_dir = os.path.join(get_download_dir(), "SDL-1.2.15") with dep_tracker.rebuilding_if_needed("sdl_extract_zip", sdl_zip_filename) as needs_rebuild: if needs_rebuild: From b8b7b96a1c933fc5232178e924ef387aee855db2 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 19:39:16 -0800 Subject: [PATCH 085/534] put build tools first in the path rather than last --- SheepShaver/src/Windows/build_on_msys.py | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index de3437771..19ca81c0a 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -114,9 +114,14 @@ def extract_zip(zip_filename, target_dir): def env_augmented_with_paths(*path_dirs_to_add): env_copy = dict(os.environ) path_dirs = env_copy["PATH"].split(os.pathsep) + + paths_adding = [] for d in path_dirs_to_add: if d not in path_dirs: - path_dirs.append(d) + paths_adding.append(d) + + path_dirs = paths_adding + path_dirs + env_copy["PATH"] = os.pathsep.join(path_dirs) return env_copy From fcfa19ca27f0599f66d48a7553ec0efb00135919 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 21:08:55 -0800 Subject: [PATCH 086/534] python build scripts: URLs cleanup --- SheepShaver/src/Windows/build_on_msys.py | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 19ca81c0a..ad65a3a5e 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -20,6 +20,10 @@ MACEMU_CFLAGS = "-mwin32" MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" +MINGW_GET_URL = "https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" \ + "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip" +SDL_ZIP_URL = "http://www.libsdl.org/release/SDL-1.2.15.zip" + script_path = os.path.dirname(os.path.abspath(__file__)) @@ -155,8 +159,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit # get msys / mingw tools we need to build - mingw_get_zip = download("https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" - "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip") + mingw_get_zip = download(MINGW_GET_URL) mingw_get_dir = MINGW_EXTRACT_PATH extract_zip(mingw_get_zip, mingw_get_dir) @@ -196,7 +199,7 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit # build SDL - sdl_zip_filename = download("http://www.libsdl.org/release/SDL-1.2.15.zip") + sdl_zip_filename = download(SDL_ZIP_URL) sdl_dir = os.path.join(get_download_dir(), "SDL-1.2.15") with dep_tracker.rebuilding_if_needed("sdl_extract_zip", sdl_zip_filename) as needs_rebuild: if needs_rebuild: From 519276d788de225d2636e3b3ce29be998f1a6eb8 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 21:11:01 -0800 Subject: [PATCH 087/534] python build script: added gtk donwload/install --- SheepShaver/src/Windows/build_on_msys.py | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index ad65a3a5e..48eafff86 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -20,6 +20,8 @@ MACEMU_CFLAGS = "-mwin32" MACEMU_CXXFLAGS = "-mwin32 -std=gnu++11" +GTK_INSTALL_URL = "https://downloads.sourceforge.net/project/gladewin32/gtk%2B-win32-devel/2.12.9/" \ + "gtk-dev-2.12.9-win32-2.exe" MINGW_GET_URL = "https://downloads.sourceforge.net/project/mingw/Installer/mingw-get/" \ "mingw-get-0.6.2-beta-20131004-1/mingw-get-0.6.2-mingw32-beta-20131004-1-bin.zip" SDL_ZIP_URL = "http://www.libsdl.org/release/SDL-1.2.15.zip" @@ -28,6 +30,7 @@ MINGW_EXTRACT_PATH = r"c:\mingw-sheep" +GTK_INSTALL_DIR = r"C:\GTK_DIR" def parse_args(): @@ -197,6 +200,16 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit show_env_dict(our_env) print "" + # download & install GTK + + gtk_install_filename = download(GTK_INSTALL_URL) + with dep_tracker.rebuilding_if_needed("gtk_install", gtk_install_filename) as needs_rebuild: + if needs_rebuild: + run([gtk_install_filename, "/S", "/D=" + GTK_INSTALL_DIR], shell=True) + + gtk_pkg_config_path = os.path.join(GTK_INSTALL_DIR, "lib", "pkgconfig") + our_env["PKG_CONFIG_PATH"] = gtk_pkg_config_path + # build SDL sdl_zip_filename = download(SDL_ZIP_URL) From 2f8c7f441cce3ea51a5cc5b85c0b428028a80adc Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 22:15:29 -0800 Subject: [PATCH 088/534] python build script: set ACLOCAL_PATH for gtk --- SheepShaver/src/Windows/build_on_msys.py | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 48eafff86..95bdc06c5 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -208,7 +208,9 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit run([gtk_install_filename, "/S", "/D=" + GTK_INSTALL_DIR], shell=True) gtk_pkg_config_path = os.path.join(GTK_INSTALL_DIR, "lib", "pkgconfig") + gtk_aclocal_path = os.path.join(GTK_INSTALL_DIR, "share", "aclocal") our_env["PKG_CONFIG_PATH"] = gtk_pkg_config_path + our_env["ACLOCAL_PATH"] = gtk_aclocal_path # build SDL From 2e7771a4aea2b5f6a484384efc257e912afd4015 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 23:01:08 -0800 Subject: [PATCH 089/534] python build script: put showing environment after the GTK install so we can double check the paths --- SheepShaver/src/Windows/build_on_msys.py | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 95bdc06c5..70e559696 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -195,11 +195,6 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit for var in ["MAKEFLAGS", "MAKELEVEL", "MFLAGS"]: our_env.pop(var, None) - if show_build_environment: - print "ENVIRONMENT FOR BUILD" - show_env_dict(our_env) - print "" - # download & install GTK gtk_install_filename = download(GTK_INSTALL_URL) @@ -212,6 +207,13 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit our_env["PKG_CONFIG_PATH"] = gtk_pkg_config_path our_env["ACLOCAL_PATH"] = gtk_aclocal_path + # show build environment + + if show_build_environment: + print "ENVIRONMENT FOR BUILD" + show_env_dict(our_env) + print "" + # build SDL sdl_zip_filename = download(SDL_ZIP_URL) From 3a742ae3f2ff50ff92e3a16beb899846eb11790c Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Sun, 22 Jan 2017 23:26:36 -0800 Subject: [PATCH 090/534] python build script: symlink m4 dir before autogen that requires it --- SheepShaver/src/Windows/build_on_msys.py | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/Windows/build_on_msys.py b/SheepShaver/src/Windows/build_on_msys.py index 70e559696..dda9e1e5d 100644 --- a/SheepShaver/src/Windows/build_on_msys.py +++ b/SheepShaver/src/Windows/build_on_msys.py @@ -304,11 +304,6 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit unix_dir = os.path.join(sheepshaver_dir, "src", "Unix") - with dep_tracker.rebuilding_if_needed("sheepshaver_autogen", ["configure.ac"], - base_dir=script_path) as needs_rebuild: - if needs_rebuild: - run([msys_bash, os.path.join(unix_dir, "autogen.sh")], cwd=script_path, env=autogen_env) - ln_cmd = os.path.join(msys_bin_dir, "ln.exe") windows_m4_dir = os.path.join(script_path, "m4") @@ -316,6 +311,11 @@ def install(make_args, show_build_environment, use_precompiled_dyngen, build_jit run([ln_cmd, "-sf", os.path.join(unix_dir, "m4"), windows_m4_dir], cwd=script_path, env=autogen_env) + with dep_tracker.rebuilding_if_needed("sheepshaver_autogen", ["configure.ac"], + base_dir=script_path) as needs_rebuild: + if needs_rebuild: + run([msys_bash, os.path.join(unix_dir, "autogen.sh")], cwd=script_path, env=autogen_env) + configure_macemu_env = dict(our_env) configure_macemu_env["CC"] = "gcc %s" % MACEMU_CFLAGS configure_macemu_env["CXX"] = "g++ %s" % MACEMU_CXXFLAGS From 8bfa98f97278e74ba70ba1a82dcec81f3d813bd3 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Mon, 23 Jan 2017 00:02:30 -0800 Subject: [PATCH 091/534] appveyor CI: fix build output path for archiving --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index 6991a6cfc..93250ab7c 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -14,7 +14,7 @@ build_script: %PYTHON%\python.exe c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\build_on_msys.py --build i686-pc-mingw32 --show-build-environment after_build: - - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\SheepShaver.exe + - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\SheepShaver.exe cache: - C:\mingw-sheep\var -> appveyor.yml From 9a76eace57b6bf679ecbfc25ed2195f677b14b38 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Mon, 23 Jan 2017 00:40:54 -0800 Subject: [PATCH 092/534] appveyor CI: don't cache mingw metadata as this includes package installation status; only cache package files proper --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index 93250ab7c..7e0d22a1a 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -17,7 +17,7 @@ after_build: - 7z a sheepshaver.zip c:\project\src\github.com\rakslice\macemu\SheepShaver\src\Windows\SheepShaver.exe cache: - - C:\mingw-sheep\var -> appveyor.yml + - C:\mingw-sheep\var\cache -> appveyor.yml artifacts: - path: sheepshaver.zip From 6c8c55c5e2f2b298f0b16f61cc4309e2c9c69f00 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Mon, 23 Jan 2017 00:43:14 -0800 Subject: [PATCH 093/534] bump build version names --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index 7e0d22a1a..c3b9d8947 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -1,4 +1,4 @@ -version: 1.0.{build} +version: 1.0.{build}a platform: x64 clone_folder: c:\project\src\github.com\rakslice\macemu clone_depth: 5 From da46a07b7c25996aeda2cf8b49d3b9bf2e08c46f Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Mon, 23 Jan 2017 00:46:19 -0800 Subject: [PATCH 094/534] appveyor CI: Try build number with git commit --- appveyor.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/appveyor.yml b/appveyor.yml index c3b9d8947..fd4cfb379 100644 --- a/appveyor.yml +++ b/appveyor.yml @@ -1,4 +1,4 @@ -version: 1.0.{build}a +version: 1.0.{build}-{commit} platform: x64 clone_folder: c:\project\src\github.com\rakslice\macemu clone_depth: 5 From 9128314cb83aa1f97a1372d599e34770085bfa2e Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 17:43:42 -0400 Subject: [PATCH 095/534] Basilisk II compiles on Xcode 8, as a 64-bit Mac app SDL 1.x is used for display, rather than Mac OS X specific backend. If time permits, I'll port it to SDL 2, if only to reduce Basilisk's overall code foot-print. Lots of features are apt to be disabled, as many 'dummy' backends were used. Video-depths other than 1-bit or 32-bit are untested, and in some cases (4-bit, at least) are currently non-functional. This is due to a partial re-write of the SDL backend's blitting code, which was non-functional when low-bit-depths were used. The SDL backend was also rewired, on OSX, to not attempt to align the display buffer on page-boundaries. So far, this doesn't seem to cause any notice-able problems, however, that's only using limited knowledge and testing (System 7.5.x does boot and display at 640x480, though!). The original display-buffer allocation code was failing to run, in some cases. Preferences are, on Mac, currently hardcoded to be accessed at /tmp/BasiliskII/BasiliskII_Prefs. The folder, "/tmp/BasiliskII/", may be a symbolic link to elsewhere, though. --- .gitignore | 24 + BasiliskII/src/CrossPlatform/sigsegv.cpp | 2 - BasiliskII/src/CrossPlatform/vm_alloc.cpp | 2 - .../AppIcon.appiconset/Contents.json | 58 + .../BasiliskII.xcodeproj/project.pbxproj | 936 + .../contents.xcworkspacedata | 7 + BasiliskII/src/MacOSX/config.h | 813 + BasiliskII/src/SDL/video_sdl.cpp | 52 +- BasiliskII/src/Unix/bincue_unix.cpp | 2 + BasiliskII/src/Unix/main_unix.cpp | 4 + BasiliskII/src/Unix/timer_unix.cpp | 2 +- BasiliskII/src/dummy/prefs_dummy.cpp | 9 +- BasiliskII/src/dummy/user_strings_dummy.cpp | 4 +- BasiliskII/src/include/video.h | 3 + BasiliskII/src/uae_cpu/cpuemu.cpp | 45296 ++++++++++++++++ BasiliskII/src/uae_cpu/cpuemu_nf.cpp | 2 + BasiliskII/src/uae_cpu/cpustbl.cpp | 8720 +++ BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 + BasiliskII/src/uae_cpu/cputbl.h | 4322 ++ BasiliskII/src/uae_cpu/defs68k.c | 185 + BasiliskII/src/uae_cpu/gencpu.c | 4 +- BasiliskII/src/uae_cpu/osx_generate_files.sh | 22 + BasiliskII/src/video.cpp | 17 + 23 files changed, 60476 insertions(+), 12 deletions(-) create mode 100644 BasiliskII/src/MacOSX/Assets.xcassets/AppIcon.appiconset/Contents.json create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/contents.xcworkspacedata create mode 100644 BasiliskII/src/MacOSX/config.h create mode 100644 BasiliskII/src/uae_cpu/cpuemu.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpustbl.cpp create mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cputbl.h create mode 100644 BasiliskII/src/uae_cpu/defs68k.c create mode 100755 BasiliskII/src/uae_cpu/osx_generate_files.sh diff --git a/.gitignore b/.gitignore index 2a6e2f0cb..8a9e32bb3 100644 --- a/.gitignore +++ b/.gitignore @@ -6,3 +6,27 @@ # Mac OS X metadata *.DS_Store + +# +# Xcode gitignore settings are from https://github.com/github/gitignore/blob/master/Global/Xcode.gitignore +# + +## Xcode, Build generated +build/ +DerivedData/ + +## Xcode, Various settings +*.pbxuser +!default.pbxuser +*.mode1v3 +!default.mode1v3 +*.mode2v3 +!default.mode2v3 +*.perspectivev3 +!default.perspectivev3 +xcuserdata/ + +## Xcode, Other +*.moved-aside +*.xccheckout +*.xcscmblueprint diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index 570058c23..72658a9f4 100644 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -31,9 +31,7 @@ #include #endif -#ifdef HAVE_CONFIG_H #include "config.h" -#endif #include #include diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 005cb727c..a797579c2 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -19,9 +19,7 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ -#ifdef HAVE_CONFIG_H #include "config.h" -#endif #ifdef HAVE_FCNTL_H #include diff --git a/BasiliskII/src/MacOSX/Assets.xcassets/AppIcon.appiconset/Contents.json b/BasiliskII/src/MacOSX/Assets.xcassets/AppIcon.appiconset/Contents.json new file mode 100644 index 000000000..2db2b1c7c --- /dev/null +++ b/BasiliskII/src/MacOSX/Assets.xcassets/AppIcon.appiconset/Contents.json @@ -0,0 +1,58 @@ +{ + "images" : [ + { + "idiom" : "mac", + "size" : "16x16", + "scale" : "1x" + }, + { + "idiom" : "mac", + "size" : "16x16", + "scale" : "2x" + }, + { + "idiom" : "mac", + "size" : "32x32", + "scale" : "1x" + }, + { + "idiom" : "mac", + "size" : "32x32", + "scale" : "2x" + }, + { + "idiom" : "mac", + "size" : "128x128", + "scale" : "1x" + }, + { + "idiom" : "mac", + "size" : "128x128", + "scale" : "2x" + }, + { + "idiom" : "mac", + "size" : "256x256", + "scale" : "1x" + }, + { + "idiom" : "mac", + "size" : "256x256", + "scale" : "2x" + }, + { + "idiom" : "mac", + "size" : "512x512", + "scale" : "1x" + }, + { + "idiom" : "mac", + "size" : "512x512", + "scale" : "2x" + } + ], + "info" : { + "version" : 1, + "author" : "xcode" + } +} \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj new file mode 100644 index 000000000..02e9485d5 --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -0,0 +1,936 @@ +// !$*UTF8*$! +{ + archiveVersion = 1; + classes = { + }; + objectVersion = 46; + objects = { + +/* Begin PBXBuildFile section */ + 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; + 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; + 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; + 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */; }; + 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */; }; + 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */; }; + 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */; }; + 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD41F23B25A006B2DF2 /* disk.cpp */; }; + 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */; }; + 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD61F23B25A006B2DF2 /* ether.cpp */; }; + 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD71F23B25A006B2DF2 /* extfs.cpp */; }; + 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */; }; + 7539E1301F23B25A006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */; }; + 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */; }; + 7539E1381F23B25A006B2DF2 /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; + 7539E13B1F23B25A006B2DF2 /* InfoPlist.strings in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */; }; + 7539E13E1F23B25A006B2DF2 /* HowTo.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0141F23B25A006B2DF2 /* HowTo.html */; }; + 7539E14B1F23B25A006B2DF2 /* ToDo.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E02B1F23B25A006B2DF2 /* ToDo.html */; }; + 7539E14D1F23B25A006B2DF2 /* Versions.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E02E1F23B25A006B2DF2 /* Versions.html */; }; + 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0651F23B25A006B2DF2 /* main.cpp */; }; + 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0681F23B25A006B2DF2 /* pict.c */; }; + 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */; }; + 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06D1F23B25A006B2DF2 /* prefs.cpp */; }; + 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */; }; + 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */; }; + 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; + 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; + 7539E1751F23B25A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0731F23B25A006B2DF2 /* keycodes */; }; + 7539E1761F23B25A006B2DF2 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0751F23B25A006B2DF2 /* SDLMain.m */; }; + 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */; }; + 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; + 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; + 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; + 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A41F23B25A006B2DF2 /* timer.cpp */; }; + 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */; }; + 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */; }; + 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B71F23B25A006B2DF2 /* flags.cpp */; }; + 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; + 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; + 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; + 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; + 7539E1A31F23B25A006B2DF2 /* table68k in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0D11F23B25A006B2DF2 /* table68k */; }; + 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; + 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; + 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; + 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */; }; + 7539E2451F23B32A006B2DF2 /* gtk-osx.patch in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */; }; + 7539E2471F23B32A006B2DF2 /* mkstandalone in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FA1F23B32A006B2DF2 /* mkstandalone */; }; + 7539E2491F23B32A006B2DF2 /* testlmem.sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */; }; + 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; + 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */; }; + 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2011F23B32A006B2DF2 /* fbdevices */; }; + 7539E2501F23B32A006B2DF2 /* install-sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2051F23B32A006B2DF2 /* install-sh */; }; + 7539E2541F23B32A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20A1F23B32A006B2DF2 /* keycodes */; }; + 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */; }; + 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */; }; + 7539E2571F23B32A006B2DF2 /* linux-ppc.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */; }; + 7539E2581F23B32A006B2DF2 /* linux-x86_64.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */; }; + 7539E25D1F23B32A006B2DF2 /* egrep.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2181F23B32A006B2DF2 /* egrep.m4 */; }; + 7539E25E1F23B32A006B2DF2 /* esd.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2191F23B32A006B2DF2 /* esd.m4 */; }; + 7539E25F1F23B32A006B2DF2 /* gettext.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21A1F23B32A006B2DF2 /* gettext.m4 */; }; + 7539E2601F23B32A006B2DF2 /* gtk-2.0.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */; }; + 7539E2611F23B32A006B2DF2 /* gtk.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21C1F23B32A006B2DF2 /* gtk.m4 */; }; + 7539E2631F23B32A006B2DF2 /* Makefile.in in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21E1F23B32A006B2DF2 /* Makefile.in */; }; + 7539E2641F23B32A006B2DF2 /* mkinstalldirs in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */; }; + 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */; }; + 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22A1F23B32A006B2DF2 /* sshpty.c */; }; + 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22C1F23B32A006B2DF2 /* strlcpy.c */; }; + 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */; }; + 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */; }; + 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; + 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2331F23B32A006B2DF2 /* tunconfig */; }; + 7539E27B1F23B488006B2DF2 /* SDL.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E2771F23B469006B2DF2 /* SDL.framework */; }; + 7539E27C1F23B488006B2DF2 /* SDL.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E2771F23B469006B2DF2 /* SDL.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; + 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */; }; + 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */; }; + 7539E2901F23C56F006B2DF2 /* prefs_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */; }; + 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; + 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; + 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; + 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */; }; + 7539E2951F23C56F006B2DF2 /* xpram_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */; }; + 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; + 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; + 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */; }; + 7539E2A51F23CB9B006B2DF2 /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */; }; + 7539E2A61F23CB9B006B2DF2 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */; }; + 7539E2A71F23CB9B006B2DF2 /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */; }; + 7539E2A81F23CB9B006B2DF2 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */; }; + 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A41F23CB9B006B2DF2 /* defs68k.c */; }; + 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; +/* End PBXBuildFile section */ + +/* Begin PBXCopyFilesBuildPhase section */ + 7539E27D1F23B489006B2DF2 /* Embed Frameworks */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = ""; + dstSubfolderSpec = 10; + files = ( + 7539E27C1F23B488006B2DF2 /* SDL.framework in Embed Frameworks */, + ); + name = "Embed Frameworks"; + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXCopyFilesBuildPhase section */ + +/* Begin PBXFileReference section */ + 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; + 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; + 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; + 7539DFCA1F23B25A006B2DF2 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = ""; }; + 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../cdrom.cpp; sourceTree = ""; }; + 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sigsegv.cpp; sourceTree = ""; }; + 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sigsegv.h; sourceTree = ""; }; + 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_blit.cpp; sourceTree = ""; }; + 7539DFD01F23B25A006B2DF2 /* video_blit.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_blit.h; sourceTree = ""; }; + 7539DFD11F23B25A006B2DF2 /* video_vosf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_vosf.h; sourceTree = ""; }; + 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = vm_alloc.cpp; sourceTree = ""; }; + 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = vm_alloc.h; sourceTree = ""; }; + 7539DFD41F23B25A006B2DF2 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = ""; }; + 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = ""; }; + 7539DFD61F23B25A006B2DF2 /* ether.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether.cpp; path = ../ether.cpp; sourceTree = ""; }; + 7539DFD71F23B25A006B2DF2 /* extfs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = extfs.cpp; path = ../extfs.cpp; sourceTree = ""; }; + 7539DFD91F23B25A006B2DF2 /* adb.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = adb.h; sourceTree = ""; }; + 7539DFDA1F23B25A006B2DF2 /* audio.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio.h; sourceTree = ""; }; + 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs.h; sourceTree = ""; }; + 7539DFDC1F23B25A006B2DF2 /* cdrom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cdrom.h; sourceTree = ""; }; + 7539DFDD1F23B25A006B2DF2 /* clip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = clip.h; sourceTree = ""; }; + 7539DFDE1F23B25A006B2DF2 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; + 7539DFDF1F23B25A006B2DF2 /* disk.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk.h; sourceTree = ""; }; + 7539DFE01F23B25A006B2DF2 /* emul_op.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = emul_op.h; sourceTree = ""; }; + 7539DFE11F23B25A006B2DF2 /* ether.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether.h; sourceTree = ""; }; + 7539DFE21F23B25A006B2DF2 /* ether_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether_defs.h; sourceTree = ""; }; + 7539DFE31F23B25A006B2DF2 /* extfs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs.h; sourceTree = ""; }; + 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs_defs.h; sourceTree = ""; }; + 7539DFE51F23B25A006B2DF2 /* macos_util.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util.h; sourceTree = ""; }; + 7539DFE61F23B25A006B2DF2 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; + 7539DFE71F23B25A006B2DF2 /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; + 7539DFE81F23B25A006B2DF2 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs.h; sourceTree = ""; }; + 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs_editor.h; sourceTree = ""; }; + 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rom_patches.h; sourceTree = ""; }; + 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rsrc_patches.h; sourceTree = ""; }; + 7539DFEC1F23B25A006B2DF2 /* scsi.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = scsi.h; sourceTree = ""; }; + 7539DFED1F23B25A006B2DF2 /* serial.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial.h; sourceTree = ""; }; + 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial_defs.h; sourceTree = ""; }; + 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slot_rom.h; sourceTree = ""; }; + 7539DFF01F23B25A006B2DF2 /* sony.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sony.h; sourceTree = ""; }; + 7539DFF11F23B25A006B2DF2 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sys.h; sourceTree = ""; }; + 7539DFF21F23B25A006B2DF2 /* timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = timer.h; sourceTree = ""; }; + 7539DFF31F23B25A006B2DF2 /* user_strings.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings.h; sourceTree = ""; }; + 7539DFF41F23B25A006B2DF2 /* version.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = version.h; sourceTree = ""; }; + 7539DFF51F23B25A006B2DF2 /* video.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video.h; sourceTree = ""; }; + 7539DFF61F23B25A006B2DF2 /* video_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_defs.h; sourceTree = ""; }; + 7539DFF71F23B25A006B2DF2 /* xpram.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xpram.h; sourceTree = ""; }; + 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = ""; }; + 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; + 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs_macosx.h; sourceTree = ""; }; + 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = BasiliskII.icns; sourceTree = ""; }; + 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; path = BasiliskII.xcodeproj; sourceTree = ""; }; + 7539E00A1F23B25A006B2DF2 /* Credits.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Credits.html; sourceTree = ""; }; + 7539E0101F23B25A006B2DF2 /* English */ = {isa = PBXFileReference; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; + 7539E0141F23B25A006B2DF2 /* HowTo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = HowTo.html; sourceTree = ""; }; + 7539E02B1F23B25A006B2DF2 /* ToDo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = ToDo.html; sourceTree = ""; }; + 7539E02E1F23B25A006B2DF2 /* Versions.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Versions.html; sourceTree = ""; }; + 7539E0651F23B25A006B2DF2 /* main.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = main.cpp; path = ../main.cpp; sourceTree = ""; }; + 7539E0681F23B25A006B2DF2 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../prefs_items.cpp; sourceTree = ""; }; + 7539E06D1F23B25A006B2DF2 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../prefs.cpp; sourceTree = ""; }; + 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rom_patches.cpp; path = ../rom_patches.cpp; sourceTree = ""; }; + 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rsrc_patches.cpp; path = ../rsrc_patches.cpp; sourceTree = ""; }; + 7539E0701F23B25A006B2DF2 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = ""; }; + 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; + 7539E0731F23B25A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; + 7539E0741F23B25A006B2DF2 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; + 7539E0751F23B25A006B2DF2 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; + 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; + 7539E0771F23B25A006B2DF2 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = ""; }; + 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; + 7539E0A31F23B25A006B2DF2 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = ""; }; + 7539E0A41F23B25A006B2DF2 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = ""; }; + 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = basilisk_glue.cpp; sourceTree = ""; }; + 7539E0AB1F23B25A006B2DF2 /* compemu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = compemu.h; sourceTree = ""; }; + 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags_x86.h; sourceTree = ""; }; + 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; + 7539E0B41F23B25A006B2DF2 /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = core.h; sourceTree = ""; }; + 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = exceptions.cpp; sourceTree = ""; }; + 7539E0B61F23B25A006B2DF2 /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = exceptions.h; sourceTree = ""; }; + 7539E0B71F23B25A006B2DF2 /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = flags.cpp; sourceTree = ""; }; + 7539E0B81F23B25A006B2DF2 /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags.h; sourceTree = ""; }; + 7539E0B91F23B25A006B2DF2 /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu.h; sourceTree = ""; }; + 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_ieee.h; sourceTree = ""; }; + 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_uae.h; sourceTree = ""; }; + 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86.h; sourceTree = ""; }; + 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86_asm.h; sourceTree = ""; }; + 7539E0C11F23B25A006B2DF2 /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = impl.h; sourceTree = ""; }; + 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; + 7539E0C31F23B25A006B2DF2 /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mathlib.h; sourceTree = ""; }; + 7539E0C41F23B25A006B2DF2 /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rounding.cpp; sourceTree = ""; }; + 7539E0C51F23B25A006B2DF2 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rounding.h; sourceTree = ""; }; + 7539E0C61F23B25A006B2DF2 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = types.h; sourceTree = ""; }; + 7539E0C81F23B25A006B2DF2 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = m68k.h; sourceTree = ""; }; + 7539E0C91F23B25A006B2DF2 /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = memory.cpp; sourceTree = ""; }; + 7539E0CA1F23B25A006B2DF2 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; + 7539E0CC1F23B25A006B2DF2 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = newcpu.h; sourceTree = ""; }; + 7539E0CD1F23B25A006B2DF2 /* noflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = noflags.h; sourceTree = ""; }; + 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = readcpu.cpp; sourceTree = ""; }; + 7539E0CF1F23B25A006B2DF2 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = readcpu.h; sourceTree = ""; }; + 7539E0D01F23B25A006B2DF2 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = spcflags.h; sourceTree = ""; }; + 7539E0D11F23B25A006B2DF2 /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = table68k; sourceTree = ""; }; + 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; + 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; + 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; + 7539E1E51F23B288006B2DF2 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; + 7539E1F11F23B329006B2DF2 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; + 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-osx.patch"; sourceTree = ""; }; + 7539E1FA1F23B32A006B2DF2 /* mkstandalone */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkstandalone; sourceTree = ""; }; + 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = testlmem.sh; sourceTree = ""; }; + 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = disk_sparsebundle.cpp; sourceTree = ""; }; + 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk_unix.h; sourceTree = ""; }; + 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_unix.cpp; sourceTree = ""; }; + 7539E2011F23B32A006B2DF2 /* fbdevices */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = fbdevices; sourceTree = ""; }; + 7539E2051F23B32A006B2DF2 /* install-sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = "install-sh"; sourceTree = ""; }; + 7539E20A1F23B32A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; + 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "freebsd-i386.ld"; sourceTree = ""; }; + 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-i386.ld"; sourceTree = ""; }; + 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-ppc.ld"; sourceTree = ""; }; + 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-x86_64.ld"; sourceTree = ""; }; + 7539E2181F23B32A006B2DF2 /* egrep.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = egrep.m4; sourceTree = ""; }; + 7539E2191F23B32A006B2DF2 /* esd.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = esd.m4; sourceTree = ""; }; + 7539E21A1F23B32A006B2DF2 /* gettext.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gettext.m4; sourceTree = ""; }; + 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-2.0.m4"; sourceTree = ""; }; + 7539E21C1F23B32A006B2DF2 /* gtk.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gtk.m4; sourceTree = ""; }; + 7539E21E1F23B32A006B2DF2 /* Makefile.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = Makefile.in; sourceTree = ""; }; + 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkinstalldirs; sourceTree = ""; }; + 7539E2231F23B32A006B2DF2 /* rpc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rpc.h; sourceTree = ""; }; + 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rpc_unix.cpp; sourceTree = ""; }; + 7539E2251F23B32A006B2DF2 /* semaphore.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = semaphore.h; sourceTree = ""; }; + 7539E22A1F23B32A006B2DF2 /* sshpty.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sshpty.c; sourceTree = ""; }; + 7539E22B1F23B32A006B2DF2 /* sshpty.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sshpty.h; sourceTree = ""; }; + 7539E22C1F23B32A006B2DF2 /* strlcpy.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = strlcpy.c; sourceTree = ""; }; + 7539E22D1F23B32A006B2DF2 /* strlcpy.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = strlcpy.h; sourceTree = ""; }; + 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_unix.cpp; sourceTree = ""; }; + 7539E22F1F23B32A006B2DF2 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sysdeps.h; sourceTree = ""; }; + 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = timer_unix.cpp; sourceTree = ""; }; + 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = tinyxml2.cpp; sourceTree = ""; }; + 7539E2321F23B32A006B2DF2 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tinyxml2.h; sourceTree = ""; }; + 7539E2331F23B32A006B2DF2 /* tunconfig */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = tunconfig; sourceTree = ""; }; + 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; + 7539E2771F23B469006B2DF2 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = /Library/Frameworks/SDL.framework; sourceTree = ""; }; + 7539E27E1F23BEB4006B2DF2 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; + 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; + 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = clip_dummy.cpp; sourceTree = ""; }; + 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_dummy.cpp; sourceTree = ""; }; + 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_dummy.cpp; sourceTree = ""; }; + 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; + 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; + 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; + 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_dummy.cpp; sourceTree = ""; }; + 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_dummy.cpp; sourceTree = ""; }; + 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; + 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; + 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_uae.cpp; sourceTree = ""; }; + 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpuemu_nf.cpp; sourceTree = ""; }; + 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpuemu.cpp; sourceTree = ""; }; + 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpustbl_nf.cpp; sourceTree = ""; }; + 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpustbl.cpp; sourceTree = ""; }; + 7539E2A41F23CB9B006B2DF2 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = defs68k.c; sourceTree = ""; }; + 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; +/* End PBXFileReference section */ + +/* Begin PBXFrameworksBuildPhase section */ + 7539DFAF1F23B17E006B2DF2 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + 7539E27B1F23B488006B2DF2 /* SDL.framework in Frameworks */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXFrameworksBuildPhase section */ + +/* Begin PBXGroup section */ + 7539DFA91F23B17E006B2DF2 = { + isa = PBXGroup; + children = ( + 7539E1E41F23B25E006B2DF2 /* src */, + 7539DFB41F23B17E006B2DF2 /* Assets */, + 7539DFB31F23B17E006B2DF2 /* Products */, + 7539E2771F23B469006B2DF2 /* SDL.framework */, + 7539E1E51F23B288006B2DF2 /* SDL2.framework */, + ); + sourceTree = ""; + }; + 7539DFB31F23B17E006B2DF2 /* Products */ = { + isa = PBXGroup; + children = ( + 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, + ); + name = Products; + sourceTree = ""; + }; + 7539DFB41F23B17E006B2DF2 /* Assets */ = { + isa = PBXGroup; + children = ( + 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */, + ); + name = Assets; + path = BasiliskII; + sourceTree = ""; + }; + 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { + isa = PBXGroup; + children = ( + 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */, + 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */, + 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */, + 7539DFD01F23B25A006B2DF2 /* video_blit.h */, + 7539DFD11F23B25A006B2DF2 /* video_vosf.h */, + 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */, + 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */, + ); + name = CrossPlatform; + path = ../CrossPlatform; + sourceTree = ""; + }; + 7539DFD81F23B25A006B2DF2 /* include */ = { + isa = PBXGroup; + children = ( + 7539DFD91F23B25A006B2DF2 /* adb.h */, + 7539DFDA1F23B25A006B2DF2 /* audio.h */, + 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */, + 7539DFDC1F23B25A006B2DF2 /* cdrom.h */, + 7539DFDD1F23B25A006B2DF2 /* clip.h */, + 7539DFDE1F23B25A006B2DF2 /* debug.h */, + 7539DFDF1F23B25A006B2DF2 /* disk.h */, + 7539DFE01F23B25A006B2DF2 /* emul_op.h */, + 7539DFE11F23B25A006B2DF2 /* ether.h */, + 7539DFE21F23B25A006B2DF2 /* ether_defs.h */, + 7539DFE31F23B25A006B2DF2 /* extfs.h */, + 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */, + 7539DFE51F23B25A006B2DF2 /* macos_util.h */, + 7539DFE61F23B25A006B2DF2 /* main.h */, + 7539DFE71F23B25A006B2DF2 /* pict.h */, + 7539DFE81F23B25A006B2DF2 /* prefs.h */, + 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */, + 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */, + 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */, + 7539DFEC1F23B25A006B2DF2 /* scsi.h */, + 7539DFED1F23B25A006B2DF2 /* serial.h */, + 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */, + 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */, + 7539DFF01F23B25A006B2DF2 /* sony.h */, + 7539DFF11F23B25A006B2DF2 /* sys.h */, + 7539DFF21F23B25A006B2DF2 /* timer.h */, + 7539DFF31F23B25A006B2DF2 /* user_strings.h */, + 7539DFF41F23B25A006B2DF2 /* version.h */, + 7539DFF51F23B25A006B2DF2 /* video.h */, + 7539DFF61F23B25A006B2DF2 /* video_defs.h */, + 7539DFF71F23B25A006B2DF2 /* xpram.h */, + ); + name = include; + path = ../include; + sourceTree = ""; + }; + 7539DFF91F23B25A006B2DF2 /* MacOSX */ = { + isa = PBXGroup; + children = ( + 7539E2AA1F23CDB7006B2DF2 /* Info.plist */, + 7539E27E1F23BEB4006B2DF2 /* config.h */, + 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, + 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, + 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, + 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */, + 7539E00A1F23B25A006B2DF2 /* Credits.html */, + 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, + 7539E0141F23B25A006B2DF2 /* HowTo.html */, + 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */, + 7539E02B1F23B25A006B2DF2 /* ToDo.html */, + 7539E02E1F23B25A006B2DF2 /* Versions.html */, + ); + name = MacOSX; + sourceTree = ""; + }; + 7539E0041F23B25A006B2DF2 /* Products */ = { + isa = PBXGroup; + name = Products; + sourceTree = ""; + }; + 7539E0711F23B25A006B2DF2 /* SDL */ = { + isa = PBXGroup; + children = ( + 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, + 7539E0731F23B25A006B2DF2 /* keycodes */, + 7539E0741F23B25A006B2DF2 /* SDLMain.h */, + 7539E0751F23B25A006B2DF2 /* SDLMain.m */, + 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */, + ); + name = SDL; + path = ../SDL; + sourceTree = ""; + }; + 7539E0A51F23B25A006B2DF2 /* uae_cpu */ = { + isa = PBXGroup; + children = ( + 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, + 7539E0A81F23B25A006B2DF2 /* compiler */, + 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, + 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */, + 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */, + 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */, + 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */, + 7539E2A41F23CB9B006B2DF2 /* defs68k.c */, + 7539E0B31F23B25A006B2DF2 /* fpu */, + 7539E0C81F23B25A006B2DF2 /* m68k.h */, + 7539E0C91F23B25A006B2DF2 /* memory.cpp */, + 7539E0CA1F23B25A006B2DF2 /* memory.h */, + 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */, + 7539E0CC1F23B25A006B2DF2 /* newcpu.h */, + 7539E0CD1F23B25A006B2DF2 /* noflags.h */, + 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */, + 7539E0CF1F23B25A006B2DF2 /* readcpu.h */, + 7539E0D01F23B25A006B2DF2 /* spcflags.h */, + 7539E0D11F23B25A006B2DF2 /* table68k */, + ); + name = uae_cpu; + path = ../uae_cpu; + sourceTree = ""; + }; + 7539E0A81F23B25A006B2DF2 /* compiler */ = { + isa = PBXGroup; + children = ( + 7539E0AB1F23B25A006B2DF2 /* compemu.h */, + 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, + ); + path = compiler; + sourceTree = ""; + }; + 7539E0B31F23B25A006B2DF2 /* fpu */ = { + isa = PBXGroup; + children = ( + 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */, + 7539E0B41F23B25A006B2DF2 /* core.h */, + 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, + 7539E0B61F23B25A006B2DF2 /* exceptions.h */, + 7539E0B71F23B25A006B2DF2 /* flags.cpp */, + 7539E0B81F23B25A006B2DF2 /* flags.h */, + 7539E0B91F23B25A006B2DF2 /* fpu.h */, + 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */, + 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */, + 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */, + 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */, + 7539E0C11F23B25A006B2DF2 /* impl.h */, + 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */, + 7539E0C31F23B25A006B2DF2 /* mathlib.h */, + 7539E0C41F23B25A006B2DF2 /* rounding.cpp */, + 7539E0C51F23B25A006B2DF2 /* rounding.h */, + 7539E0C61F23B25A006B2DF2 /* types.h */, + ); + path = fpu; + sourceTree = ""; + }; + 7539E1E41F23B25E006B2DF2 /* src */ = { + isa = PBXGroup; + children = ( + 7539DFC91F23B25A006B2DF2 /* adb.cpp */, + 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, + 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, + 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */, + 7539DFD41F23B25A006B2DF2 /* disk.cpp */, + 7539E2811F23C52C006B2DF2 /* dummy */, + 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */, + 7539DFD61F23B25A006B2DF2 /* ether.cpp */, + 7539DFD71F23B25A006B2DF2 /* extfs.cpp */, + 7539DFD81F23B25A006B2DF2 /* include */, + 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */, + 7539DFF91F23B25A006B2DF2 /* MacOSX */, + 7539E0651F23B25A006B2DF2 /* main.cpp */, + 7539E0681F23B25A006B2DF2 /* pict.c */, + 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */, + 7539E06D1F23B25A006B2DF2 /* prefs.cpp */, + 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */, + 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */, + 7539E0701F23B25A006B2DF2 /* scsi.cpp */, + 7539E0711F23B25A006B2DF2 /* SDL */, + 7539E0771F23B25A006B2DF2 /* serial.cpp */, + 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, + 7539E0A31F23B25A006B2DF2 /* sony.cpp */, + 7539E0A41F23B25A006B2DF2 /* timer.cpp */, + 7539E0A51F23B25A006B2DF2 /* uae_cpu */, + 7539E1E91F23B329006B2DF2 /* Unix */, + 7539E1221F23B25A006B2DF2 /* user_strings.cpp */, + 7539E1231F23B25A006B2DF2 /* video.cpp */, + 7539E1241F23B25A006B2DF2 /* xpram.cpp */, + ); + name = src; + sourceTree = ""; + }; + 7539E1E91F23B329006B2DF2 /* Unix */ = { + isa = PBXGroup; + children = ( + 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */, + 7539E1F11F23B329006B2DF2 /* bincue_unix.h */, + 7539E1F71F23B329006B2DF2 /* Darwin */, + 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */, + 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */, + 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */, + 7539E2011F23B32A006B2DF2 /* fbdevices */, + 7539E2051F23B32A006B2DF2 /* install-sh */, + 7539E20A1F23B32A006B2DF2 /* keycodes */, + 7539E20B1F23B32A006B2DF2 /* ldscripts */, + 7539E2171F23B32A006B2DF2 /* m4 */, + 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */, + 7539E21E1F23B32A006B2DF2 /* Makefile.in */, + 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */, + 7539E2231F23B32A006B2DF2 /* rpc.h */, + 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */, + 7539E2251F23B32A006B2DF2 /* semaphore.h */, + 7539E22A1F23B32A006B2DF2 /* sshpty.c */, + 7539E22B1F23B32A006B2DF2 /* sshpty.h */, + 7539E22C1F23B32A006B2DF2 /* strlcpy.c */, + 7539E22D1F23B32A006B2DF2 /* strlcpy.h */, + 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */, + 7539E22F1F23B32A006B2DF2 /* sysdeps.h */, + 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */, + 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */, + 7539E2321F23B32A006B2DF2 /* tinyxml2.h */, + 7539E2331F23B32A006B2DF2 /* tunconfig */, + 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */, + ); + name = Unix; + path = ../Unix; + sourceTree = ""; + }; + 7539E1F71F23B329006B2DF2 /* Darwin */ = { + isa = PBXGroup; + children = ( + 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */, + 7539E1FA1F23B32A006B2DF2 /* mkstandalone */, + 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */, + ); + path = Darwin; + sourceTree = ""; + }; + 7539E20B1F23B32A006B2DF2 /* ldscripts */ = { + isa = PBXGroup; + children = ( + 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */, + 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */, + 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */, + 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */, + ); + path = ldscripts; + sourceTree = ""; + }; + 7539E2171F23B32A006B2DF2 /* m4 */ = { + isa = PBXGroup; + children = ( + 7539E2181F23B32A006B2DF2 /* egrep.m4 */, + 7539E2191F23B32A006B2DF2 /* esd.m4 */, + 7539E21A1F23B32A006B2DF2 /* gettext.m4 */, + 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */, + 7539E21C1F23B32A006B2DF2 /* gtk.m4 */, + ); + path = m4; + sourceTree = ""; + }; + 7539E2811F23C52C006B2DF2 /* dummy */ = { + isa = PBXGroup; + children = ( + 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */, + 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */, + 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */, + 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, + 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, + 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, + 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */, + 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */, + ); + name = dummy; + path = ../dummy; + sourceTree = ""; + }; +/* End PBXGroup section */ + +/* Begin PBXNativeTarget section */ + 7539DFB11F23B17E006B2DF2 /* BasiliskII */ = { + isa = PBXNativeTarget; + buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; + buildPhases = ( + 7539DFAE1F23B17E006B2DF2 /* Sources */, + 7539DFAF1F23B17E006B2DF2 /* Frameworks */, + 7539DFB01F23B17E006B2DF2 /* Resources */, + 7539E27D1F23B489006B2DF2 /* Embed Frameworks */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = BasiliskII; + productName = BasiliskII; + productReference = 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */; + productType = "com.apple.product-type.application"; + }; +/* End PBXNativeTarget section */ + +/* Begin PBXProject section */ + 7539DFAA1F23B17E006B2DF2 /* Project object */ = { + isa = PBXProject; + attributes = { + LastUpgradeCheck = 0830; + TargetAttributes = { + 7539DFB11F23B17E006B2DF2 = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; + }; + }; + buildConfigurationList = 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */; + compatibilityVersion = "Xcode 3.2"; + developmentRegion = English; + hasScannedForEncodings = 0; + knownRegions = ( + en, + Base, + English, + ); + mainGroup = 7539DFA91F23B17E006B2DF2; + productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; + projectDirPath = ""; + projectReferences = ( + { + ProductGroup = 7539E0041F23B25A006B2DF2 /* Products */; + ProjectRef = 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */; + }, + ); + projectRoot = ""; + targets = ( + 7539DFB11F23B17E006B2DF2 /* BasiliskII */, + ); + }; +/* End PBXProject section */ + +/* Begin PBXResourcesBuildPhase section */ + 7539DFB01F23B17E006B2DF2 /* Resources */ = { + isa = PBXResourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 7539E25D1F23B32A006B2DF2 /* egrep.m4 in Resources */, + 7539E1A31F23B25A006B2DF2 /* table68k in Resources */, + 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, + 7539E2601F23B32A006B2DF2 /* gtk-2.0.m4 in Resources */, + 7539E2541F23B32A006B2DF2 /* keycodes in Resources */, + 7539E1381F23B25A006B2DF2 /* Credits.html in Resources */, + 7539E25E1F23B32A006B2DF2 /* esd.m4 in Resources */, + 7539E2631F23B32A006B2DF2 /* Makefile.in in Resources */, + 7539E2571F23B32A006B2DF2 /* linux-ppc.ld in Resources */, + 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */, + 7539E2501F23B32A006B2DF2 /* install-sh in Resources */, + 7539E1301F23B25A006B2DF2 /* Assets.xcassets in Resources */, + 7539E2641F23B32A006B2DF2 /* mkinstalldirs in Resources */, + 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */, + 7539E2581F23B32A006B2DF2 /* linux-x86_64.ld in Resources */, + 7539E2451F23B32A006B2DF2 /* gtk-osx.patch in Resources */, + 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */, + 7539E2471F23B32A006B2DF2 /* mkstandalone in Resources */, + 7539E14B1F23B25A006B2DF2 /* ToDo.html in Resources */, + 7539E13E1F23B25A006B2DF2 /* HowTo.html in Resources */, + 7539E1751F23B25A006B2DF2 /* keycodes in Resources */, + 7539E14D1F23B25A006B2DF2 /* Versions.html in Resources */, + 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */, + 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */, + 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */, + 7539E13B1F23B25A006B2DF2 /* InfoPlist.strings in Resources */, + 7539E25F1F23B32A006B2DF2 /* gettext.m4 in Resources */, + 7539E2491F23B32A006B2DF2 /* testlmem.sh in Resources */, + 7539E2611F23B32A006B2DF2 /* gtk.m4 in Resources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXResourcesBuildPhase section */ + +/* Begin PBXSourcesBuildPhase section */ + 7539DFAE1F23B17E006B2DF2 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, + 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, + 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, + 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, + 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, + 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, + 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */, + 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, + 7539E2A81F23CB9B006B2DF2 /* cpustbl.cpp in Sources */, + 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, + 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, + 7539E2A71F23CB9B006B2DF2 /* cpustbl_nf.cpp in Sources */, + 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, + 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, + 7539E1761F23B25A006B2DF2 /* SDLMain.m in Sources */, + 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */, + 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, + 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, + 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, + 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, + 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, + 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, + 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, + 7539E2A61F23CB9B006B2DF2 /* cpuemu.cpp in Sources */, + 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, + 7539E2A51F23CB9B006B2DF2 /* cpuemu_nf.cpp in Sources */, + 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, + 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, + 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, + 7539E2901F23C56F006B2DF2 /* prefs_dummy.cpp in Sources */, + 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, + 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, + 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, + 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, + 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, + 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, + 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, + 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, + 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, + 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, + 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, + 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, + 7539E2951F23C56F006B2DF2 /* xpram_dummy.cpp in Sources */, + 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */, + 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, + 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */, + 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, + 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, + 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, + 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, + 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, + 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, + 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, + 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, + 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, + 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, + 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, + 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */, + 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, + 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXSourcesBuildPhase section */ + +/* Begin PBXVariantGroup section */ + 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { + isa = PBXVariantGroup; + children = ( + 7539E0101F23B25A006B2DF2 /* English */, + ); + name = InfoPlist.strings; + sourceTree = ""; + }; +/* End PBXVariantGroup section */ + +/* Begin XCBuildConfiguration section */ + 7539DFC41F23B17E006B2DF2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = NO; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_DYNAMIC_NO_PIC = NO; + GCC_NO_COMMON_BLOCKS = YES; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "DEBUG=1", + "$(inherited)", + ); + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL.framework/Headers, + ../UNIX, + ../include, + ., + ../uae_cpu, + ); + MACOSX_DEPLOYMENT_TARGET = 10.12; + MTL_ENABLE_DEBUG_INFO = YES; + ONLY_ACTIVE_ARCH = YES; + SDKROOT = macosx; + }; + name = Debug; + }; + 7539DFC51F23B17E006B2DF2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = NO; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + ENABLE_NS_ASSERTIONS = NO; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL.framework/Headers, + ../UNIX, + ../include, + ., + ../uae_cpu, + ); + MACOSX_DEPLOYMENT_TARGET = 10.12; + MTL_ENABLE_DEBUG_INFO = NO; + SDKROOT = macosx; + }; + name = Release; + }; + 7539DFC71F23B17E006B2DF2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; + COMBINE_HIDPI_IMAGES = YES; + FRAMEWORK_SEARCH_PATHS = ( + "$(inherited)", + "$(LOCAL_LIBRARY_DIR)/Frameworks", + ); + INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + 7539DFC81F23B17E006B2DF2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; + COMBINE_HIDPI_IMAGES = YES; + FRAMEWORK_SEARCH_PATHS = ( + "$(inherited)", + "$(LOCAL_LIBRARY_DIR)/Frameworks", + ); + INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; +/* End XCBuildConfiguration section */ + +/* Begin XCConfigurationList section */ + 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 7539DFC41F23B17E006B2DF2 /* Debug */, + 7539DFC51F23B17E006B2DF2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 7539DFC71F23B17E006B2DF2 /* Debug */, + 7539DFC81F23B17E006B2DF2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; +/* End XCConfigurationList section */ + }; + rootObject = 7539DFAA1F23B17E006B2DF2 /* Project object */; +} diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..8c36dd884 --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h new file mode 100644 index 000000000..e88fee354 --- /dev/null +++ b/BasiliskII/src/MacOSX/config.h @@ -0,0 +1,813 @@ +/* config.h. Generated from config.h.in by configure. */ +/* config.h.in. Generated from configure.ac by autoheader. */ + +/* Define if building universal (internal helper macro) */ +/* #undef AC_APPLE_UNIVERSAL_BUILD */ + +/* Define to one of `_getb67', `GETB67', `getb67' for Cray-2 and Cray-YMP + systems. This function is required for `alloca.c' support on those systems. + */ +/* #undef CRAY_STACKSEG_END */ + +/* Define to 1 if using `alloca.c'. */ +/* #undef C_ALLOCA */ + +/* Define is using ESD. */ +/* #undef ENABLE_ESD */ + +/* Define if using DGA with framebuffer device. */ +/* #define ENABLE_FBDEV_DGA 1 */ + +/* Define if using GTK. */ +/* #undef ENABLE_GTK */ + +/* Define if using "mon". */ +/* #undef ENABLE_MON */ + +/* Define if using native 68k mode. */ +/* #undef ENABLE_NATIVE_M68K */ + +/* Define to 1 if translation of program messages to the user's native + language is requested. */ +/* #undef ENABLE_NLS */ + +/* Define if your system supports TUN/TAP devices. */ +/* #undef ENABLE_TUNTAP */ + +/* Define if using video enabled on SEGV signals. */ +/* #undef ENABLE_VOSF */ + +/* Define if using XFree86 DGA extension. */ +/* #undef ENABLE_XF86_DGA */ + +/* Define if using XFree86 DGA extension. */ +/* #define ENABLE_XF86_VIDMODE 1 */ + +/* Define to 1 if you have the `acoshl' function. */ +#define HAVE_ACOSHL 1 + +/* Define to 1 if you have the `acosl' function. */ +#define HAVE_ACOSL 1 + +/* Define to 1 if you have `alloca', as a function or macro. */ +#define HAVE_ALLOCA 1 + +/* Define to 1 if you have and it should be used (not on Ultrix). + */ +#define HAVE_ALLOCA_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_ARGZ_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_ARPA_INET_H 1 + +/* Define to 1 if you have the `asinhl' function. */ +#define HAVE_ASINHL 1 + +/* Define to 1 if you have the `asinl' function. */ +#define HAVE_ASINL 1 + +/* Define if your system has header. */ +/* #undef HAVE_ASM_UCONTEXT */ + +/* Define to 1 if you have the `asprintf' function. */ +#define HAVE_ASPRINTF 1 + +/* Define to 1 if you have the `atanh' function. */ +#define HAVE_ATANH 1 + +/* Define to 1 if you have the `atanhl' function. */ +#define HAVE_ATANHL 1 + +/* Define to 1 if you have the `atanl' function. */ +#define HAVE_ATANL 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_AVAILABILITYMACROS_H 1 + +/* Define to 1 if the system has the type `caddr_t'. */ +#define HAVE_CADDR_T 1 + +/* Define to 1 if you have the `ceill' function. */ +#define HAVE_CEILL 1 + +/* Define to 1 if you have the `cfmakeraw' function. */ +#define HAVE_CFMAKERAW 1 + +/* Define to 1 if you have the `clock_gettime' function. */ +#define HAVE_CLOCK_GETTIME 1 + +/* Define to 1 if you have the `coshl' function. */ +#define HAVE_COSHL 1 + +/* Define to 1 if you have the `cosl' function. */ +#define HAVE_COSL 1 + +/* Define if the GNU dcgettext() function is already present or preinstalled. + */ +/* #undef HAVE_DCGETTEXT */ + +/* Define to 1 if you have the declaration of `feof_unlocked', and to 0 if you + don't. */ +#define HAVE_DECL_FEOF_UNLOCKED 1 + +/* Define to 1 if you have the declaration of `fgets_unlocked', and to 0 if + you don't. */ +#define HAVE_DECL_FGETS_UNLOCKED 0 + +/* Define to 1 if you have the declaration of `getc_unlocked', and to 0 if you + don't. */ +#define HAVE_DECL_GETC_UNLOCKED 1 + +/* Define to 1 if you have the declaration of `_snprintf', and to 0 if you + don't. */ +#define HAVE_DECL__SNPRINTF 0 + +/* Define to 1 if you have the declaration of `_snwprintf', and to 0 if you + don't. */ +#define HAVE_DECL__SNWPRINTF 0 + +/* Define if you have /dev/ptmx */ +/* #undef HAVE_DEV_PTMX */ + +/* Define if you have /dev/ptc */ +/* #undef HAVE_DEV_PTS_AND_PTC */ + +/* Define to 1 if you have the `expl' function. */ +#define HAVE_EXPL 1 + +/* Define to 1 if you have the `fabsl' function. */ +#define HAVE_FABSL 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FCNTL_H 1 + +/* Define to 1 if you have the `finite' function. */ +#define HAVE_FINITE 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_FLOATINGPOINT_H */ + +/* Define to 1 if you have the `floorl' function. */ +#define HAVE_FLOORL 1 + +/* Define if framework AppKit is available. */ +#define HAVE_FRAMEWORK_APPKIT 1 + +/* Define if framework Carbon is available. */ +#define HAVE_FRAMEWORK_CARBON 1 + +/* Define if framework CoreFoundation is available. */ +#define HAVE_FRAMEWORK_COREFOUNDATION 1 + +/* Define if framework IOKit is available. */ +#define HAVE_FRAMEWORK_IOKIT 1 + +/* Define if framework SDL is available. */ +/* #undef HAVE_FRAMEWORK_SDL */ + +/* Define to 1 if you have the `fwprintf' function. */ +#define HAVE_FWPRINTF 1 + +/* Define to 1 if you have the `getcwd' function. */ +#define HAVE_GETCWD 1 + +/* Define to 1 if you have the `getegid' function. */ +#define HAVE_GETEGID 1 + +/* Define to 1 if you have the `geteuid' function. */ +#define HAVE_GETEUID 1 + +/* Define to 1 if you have the `getgid' function. */ +#define HAVE_GETGID 1 + +/* Define to 1 if you have the `getpagesize' function. */ +#define HAVE_GETPAGESIZE 1 + +/* Define if the GNU gettext() function is already present or preinstalled. */ +/* #undef HAVE_GETTEXT */ + +/* Define to 1 if you have the `getuid' function. */ +#define HAVE_GETUID 1 + +/* Define if libgnomeui is available. */ +/* #undef HAVE_GNOMEUI */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_HISTORY_H */ + +/* Define if you have the iconv() function. */ +#define HAVE_ICONV 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_IEEE754_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_IEEEFP_H */ + +/* Define to 1 if you have the `inet_aton' function. */ +#define HAVE_INET_ATON 1 + +/* Define if you have the 'intmax_t' type in or . */ +#define HAVE_INTMAX_T 1 + +/* Define if exists and doesn't clash with . */ +#define HAVE_INTTYPES_H 1 + +/* Define if exists, doesn't clash with , and + declares uintmax_t. */ +#define HAVE_INTTYPES_H_WITH_UINTMAX 1 + +/* Define to 1 if you have the header + file. */ +#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 + +/* Define to 1 if you have the `isinf' function. */ +#define HAVE_ISINF 1 + +/* Define to 1 if you have the `isinfl' function. */ +/* #undef HAVE_ISINFL */ + +/* Define to 1 if you have the `isnan' function. */ +#define HAVE_ISNAN 1 + +/* Define to 1 if you have the `isnanl' function. */ +/* #undef HAVE_ISNANL */ + +/* Define to 1 if you have the `isnormal' function. */ +/* #undef HAVE_ISNORMAL */ + +/* Define if you have and nl_langinfo(CODESET). */ +#define HAVE_LANGINFO_CODESET 1 + +/* Define if your file defines LC_MESSAGES. */ +#define HAVE_LC_MESSAGES 1 + +/* Define to 1 if you have the `curses' library (-lcurses). */ +/* #undef HAVE_LIBCURSES */ + +/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ +/* #undef HAVE_LIBHCURSES */ + +/* Define to 1 if you have the `m' library (-lm). */ +#define HAVE_LIBM 1 + +/* Define to 1 if you have the `ncurses' library (-lncurses). */ +/* #undef HAVE_LIBNCURSES */ + +/* Define to 1 if you have the `posix4' library (-lposix4). */ +/* #undef HAVE_LIBPOSIX4 */ + +/* Define to 1 if you have the `readline' library (-lreadline). */ +/* #undef HAVE_LIBREADLINE */ + +/* Define to 1 if you have the `rt' library (-lrt). */ +/* #undef HAVE_LIBRT */ + +/* Define to 1 if you have the `termcap' library (-ltermcap). */ +/* #undef HAVE_LIBTERMCAP */ + +/* Define to 1 if you have the `terminfo' library (-lterminfo). */ +/* #undef HAVE_LIBTERMINFO */ + +/* Define to 1 if you have the `termlib' library (-ltermlib). */ +/* #undef HAVE_LIBTERMLIB */ + +/* Define to 1 if you have the `vhd' library (-lvhd). */ +/* #undef HAVE_LIBVHD */ + +/* Define to 1 if you have the header file. */ +#define HAVE_LIMITS_H 1 + +/* Define if there is a linker script to relocate the executable above + 0x70000000. */ +/* #undef HAVE_LINKER_SCRIPT */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_TUN_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_LOCALE_H 1 + +/* Define to 1 if the system has the type `loff_t'. */ +/* #undef HAVE_LOFF_T */ + +/* Define to 1 if you have the `log10l' function. */ +#define HAVE_LOG10L 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LOGIN_H */ + +/* Define to 1 if you have the `logl' function. */ +#define HAVE_LOGL 1 + +/* Define if you have the 'long double' type. */ +#define HAVE_LONG_DOUBLE 1 + +/* Define if you have the 'long long' type. */ +#define HAVE_LONG_LONG 1 + +/* Define if your system supports Mach exceptions. */ +#define HAVE_MACH_EXCEPTIONS 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_MACH_H 1 + +/* Define to 1 if you have the `mach_task_self' function. */ +#define HAVE_MACH_TASK_SELF 1 + +/* Define if your system has a working vm_allocate()-based memory allocator. + */ +#define HAVE_MACH_VM 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_MALLOC_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_MEMORY_H 1 + +/* Define to 1 if you have the `mempcpy' function. */ +/* #undef HAVE_MEMPCPY */ + +/* Define to 1 if you have the `mmap' function. */ +#define HAVE_MMAP 1 + +/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. + */ +/* #undef HAVE_MMAP_ANON */ + +/* Define if defines MAP_ANONYMOUS and mmap()'ing with + MAP_ANONYMOUS works. */ +/* #undef HAVE_MMAP_ANONYMOUS */ + +/* Define if your system has a working mmap()-based memory allocator. */ +/* #undef HAVE_MMAP_VM */ + +/* Define to 1 if you have the `mprotect' function. */ +#define HAVE_MPROTECT 1 + +/* Define to 1 if you have the `munmap' function. */ +#define HAVE_MUNMAP 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_NAN_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_NET_IF_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_NET_IF_TUN_H */ + +/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for + sshpty.c). */ +/* #undef HAVE_NEWS4 */ + +/* Define to 1 if you have the header file. */ +#define HAVE_NL_TYPES_H 1 + +/* Define to 1 if you have the `poll' function. */ +#define HAVE_POLL 1 + +/* Define if your printf() function supports format strings with positions. */ +#define HAVE_POSIX_PRINTF 1 + +/* Define to 1 if you have the `powl' function. */ +#define HAVE_POWL 1 + +/* Define if pthreads are available. */ +#define HAVE_PTHREADS 1 + +/* Define to 1 if you have the `pthread_cancel' function. */ +#define HAVE_PTHREAD_CANCEL 1 + +/* Define to 1 if you have the `pthread_cond_init' function. */ +#define HAVE_PTHREAD_COND_INIT 1 + +/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 + +/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 + +/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 + +/* Define to 1 if you have the `pthread_testcancel' function. */ +#define HAVE_PTHREAD_TESTCANCEL 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_PTY_H */ + +/* Define to 1 if you have the `putenv' function. */ +#define HAVE_PUTENV 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_READLINE_HISTORY_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_READLINE_READLINE_H 1 + +/* Define to 1 if you have the `sem_init' function. */ +#define HAVE_SEM_INIT 1 + +/* Define to 1 if you have the `setenv' function. */ +#define HAVE_SETENV 1 + +/* Define to 1 if you have the `setlocale' function. */ +#define HAVE_SETLOCALE 1 + +/* Define to 1 if you have the `sigaction' function. */ +#define HAVE_SIGACTION 1 + +/* Define if we know a hack to replace siginfo_t->si_addr member. */ +/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ + +/* Define if your system supports extended signals. */ +/* #undef HAVE_SIGINFO_T */ +//#define HAVE_SIGINFO_T 1 + +/* Define to 1 if you have the `signal' function. */ +#define HAVE_SIGNAL 1 + +/* Define to 1 if you have the `signbit' function. */ +/* #undef HAVE_SIGNBIT */ + +/* Define if we can ignore the fault (instruction skipping in SIGSEGV + handler). */ +#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 + +/* Define to 1 if you have the `sinhl' function. */ +#define HAVE_SINHL 1 + +/* Define to 1 if you have the `sinl' function. */ +#define HAVE_SINL 1 + +/* Define if slirp library is supported */ +/* #define HAVE_SLIRP 1 */ + +/* Define to 1 if you have the `snprintf' function. */ +#define HAVE_SNPRINTF 1 + +/* Define to 1 if you have the `sqrtl' function. */ +#define HAVE_SQRTL 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDDEF_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDINT_H 1 + +/* Define if exists, doesn't clash with , and declares + uintmax_t. */ +#define HAVE_STDINT_H_WITH_UINTMAX 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDLIB_H 1 + +/* Define to 1 if you have the `stpcpy' function. */ +#define HAVE_STPCPY 1 + +/* Define to 1 if you have the `strcasecmp' function. */ +#define HAVE_STRCASECMP 1 + +/* Define to 1 if you have the `strdup' function. */ +#define HAVE_STRDUP 1 + +/* Define to 1 if you have the `strerror' function. */ +#define HAVE_STRERROR 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRINGS_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRING_H 1 + +/* Define to 1 if you have the `strlcpy' function. */ +#define HAVE_STRLCPY 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STROPTS_H */ + +/* Define to 1 if you have the `strtoul' function. */ +#define HAVE_STRTOUL 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BITYPES_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BSDTTY_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_FILIO_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_IOCTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_MMAN_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_PARAM_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_POLL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SELECT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SOCKET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_STAT_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_STROPTS_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TIME_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TYPES_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_WAIT_H 1 + +/* Define to 1 if you have the `tanhl' function. */ +#define HAVE_TANHL 1 + +/* Define to 1 if you have the `tanl' function. */ +#define HAVE_TANL 1 + +/* Define to 1 if you have the `task_self' function. */ +/* #undef HAVE_TASK_SELF */ + +/* Define to 1 if you have the `timer_create' function. */ +/* #undef HAVE_TIMER_CREATE */ + +/* Define to 1 if you have the `tsearch' function. */ +#define HAVE_TSEARCH 1 + +/* Define if you have the 'uintmax_t' type in or . */ +#define HAVE_UINTMAX_T 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UNISTD_H 1 + +/* Define if you have the 'unsigned long long' type. */ +#define HAVE_UNSIGNED_LONG_LONG 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UTIL_H 1 + +/* Define to 1 if you have the `vhangup' function. */ +/* #undef HAVE_VHANGUP */ + +/* Define to 1 if you have the `vm_allocate' function. */ +#define HAVE_VM_ALLOCATE 1 + +/* Define to 1 if you have the `vm_deallocate' function. */ +#define HAVE_VM_DEALLOCATE 1 + +/* Define to 1 if you have the `vm_protect' function. */ +#define HAVE_VM_PROTECT 1 + +/* Define if you have the 'wchar_t' type. */ +#define HAVE_WCHAR_T 1 + +/* Define to 1 if you have the `wcslen' function. */ +#define HAVE_WCSLEN 1 + +/* Define if your system supports Windows exceptions. */ +/* #undef HAVE_WIN32_EXCEPTIONS */ + +/* Define if you have the 'wint_t' type. */ +#define HAVE_WINT_T 1 + +/* Define to 1 if you have the `_getpty' function. */ +/* #undef HAVE__GETPTY */ + +/* Define to 1 if you have the `__argz_count' function. */ +/* #undef HAVE___ARGZ_COUNT */ + +/* Define to 1 if you have the `__argz_next' function. */ +/* #undef HAVE___ARGZ_NEXT */ + +/* Define to 1 if you have the `__argz_stringify' function. */ +/* #undef HAVE___ARGZ_STRINGIFY */ + +/* Define to 1 if you have the `__fsetlocking' function. */ +/* #undef HAVE___FSETLOCKING */ + +/* Define to the floating point format of the host machine. */ +#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT + +/* Define to 1 if the host machine stores floating point numbers in memory + with the word containing the sign bit at the lowest address, or to 0 if it + does it the other way around. This macro should not be defined if the + ordering is the same as for multi-word integers. */ +/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ + +/* Define as const if the declaration of iconv() needs const. */ +#define ICONV_CONST + +/* Define if integer division by zero raises signal SIGFPE. */ +#define INTDIV0_RAISES_SIGFPE 0 + +/* Define to 1 if your C compiler doesn't accept -c and -o together. */ +/* #undef NO_MINUS_C_MINUS_O */ + +/* Define this program name. */ +#define PACKAGE "Basilisk II" + +/* Define to the address where bug reports for this package should be sent. */ +#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" + +/* Define to the full name of this package. */ +#define PACKAGE_NAME "Basilisk II" + +/* Define to the full name and version of this package. */ +#define PACKAGE_STRING "Basilisk II 1.0" + +/* Define to the one symbol short name of this package. */ +#define PACKAGE_TARNAME "BasiliskII" + +/* Define to the home page for this package. */ +#define PACKAGE_URL "" + +/* Define to the version of this package. */ +#define PACKAGE_VERSION "1.0" + +/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this + system. */ +/* #undef PAGEZERO_HACK */ + +/* Define if exists and defines unusable PRI* macros. */ +/* #undef PRI_MACROS_BROKEN */ + +/* Define as the return type of signal handlers (`int' or `void'). */ +#define RETSIGTYPE void + +/* Define if your system requires sigactions to be reinstalled. */ +/* #undef SIGACTION_NEED_REINSTALL */ + +/* Define if your system requires signals to be reinstalled. */ +/* #undef SIGNAL_NEED_REINSTALL */ + +/* The size of `double', as computed by sizeof. */ +#define SIZEOF_DOUBLE 8 + +/* The size of `float', as computed by sizeof. */ +#define SIZEOF_FLOAT 4 + +/* The size of `int', as computed by sizeof. */ +#define SIZEOF_INT 4 + +/* The size of `long', as computed by sizeof. */ +#define SIZEOF_LONG 8 + +/* The size of `long double', as computed by sizeof. */ +#define SIZEOF_LONG_DOUBLE 16 + +/* The size of `long long', as computed by sizeof. */ +#define SIZEOF_LONG_LONG 8 + +/* The size of `short', as computed by sizeof. */ +#define SIZEOF_SHORT 2 + +/* The size of `void *', as computed by sizeof. */ +#define SIZEOF_VOID_P 8 + +/* Define as the maximum value of type 'size_t', if the system doesn't define + it. */ +/* #undef SIZE_MAX */ + +/* If using the C implementation of alloca, define if you know the + direction of stack growth for your system; otherwise it will be + automatically deduced at runtime. + STACK_DIRECTION > 0 => grows toward higher addresses + STACK_DIRECTION < 0 => grows toward lower addresses + STACK_DIRECTION = 0 => direction of growth unknown */ +/* #undef STACK_DIRECTION */ + +/* Define to 1 if you have the ANSI C header files. */ +#define STDC_HEADERS 1 + +/* Define to 1 if you can safely include both and . */ +#define TIME_WITH_SYS_TIME 1 + +/* Define to 1 if your declares `struct tm'. */ +/* #undef TM_IN_SYS_TIME */ + +/* Define if BSD-style non-blocking I/O is to be used */ +/* #undef USE_FIONBIO */ + +/* Define to enble SDL support */ +#define USE_SDL 1 + +/* Define to enable SDL audio support */ +#define USE_SDL_AUDIO 1 + +/* Define to enable SDL video graphics support */ +#define USE_SDL_VIDEO 1 + +/* Enable extensions on AIX 3, Interix. */ +#ifndef _ALL_SOURCE +# define _ALL_SOURCE 1 +#endif +/* Enable GNU extensions on systems that have them. */ +#ifndef _GNU_SOURCE +# define _GNU_SOURCE 1 +#endif +/* Enable threading extensions on Solaris. */ +#ifndef _POSIX_PTHREAD_SEMANTICS +# define _POSIX_PTHREAD_SEMANTICS 1 +#endif +/* Enable extensions on HP NonStop. */ +#ifndef _TANDEM_SOURCE +# define _TANDEM_SOURCE 1 +#endif +/* Enable general extensions on Solaris. */ +#ifndef __EXTENSIONS__ +# define __EXTENSIONS__ 1 +#endif + + +/* Define this program version. */ +#define VERSION "1.0" + +/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most + significant byte first (like Motorola and SPARC, unlike Intel). */ +#if defined AC_APPLE_UNIVERSAL_BUILD +# if defined __BIG_ENDIAN__ +# define WORDS_BIGENDIAN 1 +# endif +#else +# ifndef WORDS_BIGENDIAN +/* # undef WORDS_BIGENDIAN */ +# endif +#endif + +/* Define to 1 if the X Window System is missing or not being used. */ +/* #undef X_DISPLAY_MISSING */ + +/* Enable large inode numbers on Mac OS X 10.5. */ +#ifndef _DARWIN_USE_64_BIT_INODE +# define _DARWIN_USE_64_BIT_INODE 1 +#endif + +/* Number of bits in a file offset, on hosts where this is settable. */ +/* #undef _FILE_OFFSET_BITS */ + +/* Define for large files, on AIX-style hosts. */ +/* #undef _LARGE_FILES */ + +/* Define to 1 if on MINIX. */ +/* #undef _MINIX */ + +/* Define to 2 if the system does not provide POSIX.1 features except with + this defined. */ +/* #undef _POSIX_1_SOURCE */ + +/* Define to 1 if you need to in order for `stat' and other things to work. */ +/* #undef _POSIX_SOURCE */ + +/* Define to empty if `const' does not conform to ANSI C. */ +/* #undef const */ + +/* Define to `__inline__' or `__inline' if that's what the C compiler + calls it, or to nothing if 'inline' is not supported under any name. */ +#ifndef __cplusplus +/* #undef inline */ +#endif + +/* Define to `long int' if does not define. */ +/* #undef off_t */ + +/* Define as the type of the result of subtracting two pointers, if the system + doesn't define it. */ +/* #undef ptrdiff_t */ + +/* Define to empty if the C compiler doesn't support this keyword. */ +/* #undef signed */ + +/* Define to `unsigned int' if does not define. */ +/* #undef size_t */ + +/* Define to 'int' if doesn't define. */ +/* #undef socklen_t */ + +/* Define to unsigned long or unsigned long long if and + don't define. */ +/* #undef uintmax_t */ + +#define FPU_UAE 1 +//#define FPU_IMPLEMENTATION 1 + diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 798ed8e8d..99f3bfa67 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -51,7 +51,7 @@ #include /* alloca() */ #endif -#include "cpu_emulation.h" +#include #include "main.h" #include "adb.h" #include "macos_util.h" @@ -87,6 +87,8 @@ static int display_type = DISPLAY_WINDOW; // See enum above // Constants #ifdef WIN32 const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#elif __MACOSX__ +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; #endif @@ -195,6 +197,9 @@ extern void SysMountFirstFloppy(void); static void *vm_acquire_framebuffer(uint32 size) { +#if __MACOSX__ + return calloc(1, size); +#else // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { @@ -208,11 +213,16 @@ static void *vm_acquire_framebuffer(uint32 size) if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); return fb; +#endif } static inline void vm_release_framebuffer(void *fb, uint32 size) { +#if __MACOSX__ + free(fb); +#else vm_release(fb, size); +#endif } static inline int get_customized_color_depth(int default_depth) @@ -1841,6 +1851,43 @@ static void handle_events(void) // Static display update (fixed frame rate, but incremental) static void update_display_static(driver_base *drv) { + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + const VIDEO_MODE &mode = drv->mode; + + memcpy(the_buffer_copy, the_buffer, the_buffer_size); + + // HACK: Create a temporary surface, with which to use in color conversion + SDL_Surface * mid_surface = NULL; + switch (mode.depth) { + case VDEPTH_1BIT: { + const int pixels_per_byte = VIDEO_MODE_X / VIDEO_MODE_ROW_BYTES; + mid_surface = SDL_CreateRGBSurfaceFrom(the_buffer_copy, VIDEO_MODE_X, VIDEO_MODE_Y, 1, (VIDEO_MODE_X / pixels_per_byte), 1, 1, 1, 0); + } break; + + // Consider using Screen_blit, for other depths + + default: { + printf("WARNING: Unhandled depth mode in SDL backend: %s\n", NameOfDepth(mode.depth)); + } break; + } + + // Blit to screen surface + if (mid_surface) { + SDL_BlitSurface(mid_surface, NULL, drv->s, NULL); + SDL_FreeSurface(mid_surface); + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + SDL_UpdateRect(drv->s, 0, 0, 0, 0); + +/* // Incremental update code int wide = 0, high = 0; uint32 x1, x2, y1, y2; @@ -1984,6 +2031,7 @@ static void update_display_static(driver_base *drv) } } } + */ } // Static display update (fixed frame rate, bounding boxes based) @@ -2044,7 +2092,7 @@ static void update_display_static_bbox(driver_base *drv) // Refresh display if (nr_boxes) SDL_UpdateRects(drv->s, nr_boxes, boxes); -} + } // We suggest the compiler to inline the next two functions so that it diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index b20b8543f..612cf790b 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -526,6 +526,7 @@ loff_t size_bincue(void *fh) if (fh) { return ((CueSheet *)fh)->length * COOKED_SECTOR_SIZE; } + return 0; } bool readtoc_bincue(void *fh, unsigned char *toc) @@ -564,6 +565,7 @@ bool readtoc_bincue(void *fh, unsigned char *toc) *toc++ = toc_size & 0xff; return true; } + return false; } bool GetPosition_bincue(void *fh, uint8 *pos) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 3505335e8..1f03b9a0c 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -426,6 +426,10 @@ int main(int argc, char **argv) } else if (strcmp(argv[i], "--rominfo") == 0) { argv[i] = NULL; PrintROMInfo = true; + } else if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { + // HACK: prevent Basilisk from exiting, when run via Xcode 8, which + // passes in a '-NSDocumentRevisionsDebugMode' option. + argv[i] = NULL; } } diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index 9e227d02e..ea197e51b 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -45,7 +45,7 @@ static inline void mach_current_time(tm_time_t &t) { host_clock_inited = true; } - clock_get_time(host_clock, &t); + clock_get_time(host_clock, (mach_timespec_t *)&t); } #endif diff --git a/BasiliskII/src/dummy/prefs_dummy.cpp b/BasiliskII/src/dummy/prefs_dummy.cpp index 84dd31ec9..1b33489cd 100644 --- a/BasiliskII/src/dummy/prefs_dummy.cpp +++ b/BasiliskII/src/dummy/prefs_dummy.cpp @@ -22,6 +22,7 @@ #include #include +#include #include "prefs.h" @@ -33,14 +34,20 @@ prefs_desc platform_prefs_items[] = { // Prefs file name and path +#if defined(__APPLE__) && defined(__MACH__) +const char PREFS_FILE_NAME[] = "/tmp/BasiliskII/BasiliskII_Prefs"; // HACK: for now, just load stuff from a fixed dir, inside /tmp +#else const char PREFS_FILE_NAME[] = "BasiliskII_Prefs"; +#endif + +std::string UserPrefsPath; /* * Load preferences from settings file */ -void LoadPrefs(void) +void LoadPrefs(const char * vmdir) // TODO: load prefs from 'vmdir' { // Read preferences from settings file FILE *f = fopen(PREFS_FILE_NAME, "r"); diff --git a/BasiliskII/src/dummy/user_strings_dummy.cpp b/BasiliskII/src/dummy/user_strings_dummy.cpp index 5f97823da..2ff2ead7b 100644 --- a/BasiliskII/src/dummy/user_strings_dummy.cpp +++ b/BasiliskII/src/dummy/user_strings_dummy.cpp @@ -23,7 +23,7 @@ // Platform-specific string definitions -const user_string_def platform_strings[] = { +user_string_def platform_strings[] = { {-1, NULL} // End marker }; @@ -32,7 +32,7 @@ const user_string_def platform_strings[] = { * Fetch pointer to string, given the string number */ -char *GetString(int num) +const char *GetString(int num) { // First search for platform-specific string int i = 0; diff --git a/BasiliskII/src/include/video.h b/BasiliskII/src/include/video.h index 78526e67d..208881baf 100644 --- a/BasiliskII/src/include/video.h +++ b/BasiliskII/src/include/video.h @@ -76,6 +76,9 @@ inline video_depth DepthModeForPixelDepth(int depth) } } +// Returns the name of a video_depth, or an empty string if the depth is unknown +const char * NameOfDepth(video_depth depth); + // Return a bytes-per-row value (assuming no padding) for the specified depth and pixel width inline uint32 TrivialBytesPerRow(uint32 width, video_depth depth) { diff --git a/BasiliskII/src/uae_cpu/cpuemu.cpp b/BasiliskII/src/uae_cpu/cpuemu.cpp new file mode 100644 index 000000000..52a0dc9c4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu.cpp @@ -0,0 +1,45296 @@ +#include "sysdeps.h" +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "cputbl.h" +#define SET_CFLG_ALWAYS(x) SET_CFLG(x) +#define SET_NFLG_ALWAYS(x) SET_NFLG(x) +#define CPUFUNC_FF(x) x##_ff +#define CPUFUNC_NF(x) x##_nf +#define CPUFUNC(x) CPUFUNC_FF(x) +#ifdef NOFLAGS +# include "noflags.h" +#endif + +#ifdef _MSC_VER +#pragma warning(disable:4102) /* unreferenced label */ +#endif + +#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) +#define PART_1 1 +#define PART_2 1 +#define PART_3 1 +#define PART_4 1 +#define PART_5 1 +#define PART_6 1 +#define PART_7 1 +#define PART_8 1 +#endif + +#ifdef PART_1 +void REGPARAM2 CPUFUNC(op_0_0)(uae_u32 opcode) /* OR.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10_0)(uae_u32 opcode) /* OR.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_18_0)(uae_u32 opcode) /* OR.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20_0)(uae_u32 opcode) /* OR.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_28_0)(uae_u32 opcode) /* OR.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30_0)(uae_u32 opcode) /* OR.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_38_0)(uae_u32 opcode) /* OR.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_39_0)(uae_u32 opcode) /* OR.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3c_0)(uae_u32 opcode) /* ORSR.B #.W */ +{ + cpuop_begin(); +{ MakeSR(); +{ uae_s16 src = get_iword(2); + src &= 0xFF; + regs.sr |= src; + MakeFromSR(); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40_0)(uae_u32 opcode) /* OR.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50_0)(uae_u32 opcode) /* OR.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_58_0)(uae_u32 opcode) /* OR.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_60_0)(uae_u32 opcode) /* OR.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_68_0)(uae_u32 opcode) /* OR.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_70_0)(uae_u32 opcode) /* OR.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_78_0)(uae_u32 opcode) /* OR.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_79_0)(uae_u32 opcode) /* OR.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_7c_0)(uae_u32 opcode) /* ORSR.W #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel18; } +{ MakeSR(); +{ uae_s16 src = get_iword(2); + regs.sr |= src; + MakeFromSR(); +}}}m68k_incpc(4); +endlabel18: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80_0)(uae_u32 opcode) /* OR.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90_0)(uae_u32 opcode) /* OR.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_98_0)(uae_u32 opcode) /* OR.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a0_0)(uae_u32 opcode) /* OR.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a8_0)(uae_u32 opcode) /* OR.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0_0)(uae_u32 opcode) /* OR.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b8_0)(uae_u32 opcode) /* OR.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b9_0)(uae_u32 opcode) /* OR.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0_0)(uae_u32 opcode) /* CHK2.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel27; } +} +}}}m68k_incpc(4); +endlabel27: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8_0)(uae_u32 opcode) /* CHK2.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel28; } +} +}}}m68k_incpc(6); +endlabel28: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_f0_0)(uae_u32 opcode) /* CHK2.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel29; } +} +}}}}endlabel29: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_f8_0)(uae_u32 opcode) /* CHK2.B #.W,(xxx).W */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel30; } +} +}}}m68k_incpc(6); +endlabel30: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_f9_0)(uae_u32 opcode) /* CHK2.B #.W,(xxx).L */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel31; } +} +}}}m68k_incpc(8); +endlabel31: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_fa_0)(uae_u32 opcode) /* CHK2.B #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel32; } +} +}}}m68k_incpc(6); +endlabel32: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_fb_0)(uae_u32 opcode) /* CHK2.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel33; } +} +}}}}endlabel33: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_100_0)(uae_u32 opcode) /* BTST.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_108_0)(uae_u32 opcode) /* MVPMR.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_110_0)(uae_u32 opcode) /* BTST.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_118_0)(uae_u32 opcode) /* BTST.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_120_0)(uae_u32 opcode) /* BTST.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_128_0)(uae_u32 opcode) /* BTST.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_130_0)(uae_u32 opcode) /* BTST.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_138_0)(uae_u32 opcode) /* BTST.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_139_0)(uae_u32 opcode) /* BTST.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13a_0)(uae_u32 opcode) /* BTST.B Dn,(d16,PC) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 2; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_getpc () + 2; + dsta += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13b_0)(uae_u32 opcode) /* BTST.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13c_0)(uae_u32 opcode) /* BTST.B Dn,#.B */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = get_ibyte(2); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_140_0)(uae_u32 opcode) /* BCHG.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_148_0)(uae_u32 opcode) /* MVPMR.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16) + + (get_byte(memp + 4) << 8) + get_byte(memp + 6); + m68k_dreg(regs, dstreg) = (val); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_150_0)(uae_u32 opcode) /* BCHG.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_158_0)(uae_u32 opcode) /* BCHG.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_160_0)(uae_u32 opcode) /* BCHG.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_168_0)(uae_u32 opcode) /* BCHG.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_170_0)(uae_u32 opcode) /* BCHG.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_178_0)(uae_u32 opcode) /* BCHG.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_179_0)(uae_u32 opcode) /* BCHG.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_17a_0)(uae_u32 opcode) /* BCHG.B Dn,(d16,PC) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 2; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_getpc () + 2; + dsta += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_17b_0)(uae_u32 opcode) /* BCHG.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_180_0)(uae_u32 opcode) /* BCLR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_188_0)(uae_u32 opcode) /* MVPRM.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); + uaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + put_byte(memp, src >> 8); put_byte(memp + 2, src); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_190_0)(uae_u32 opcode) /* BCLR.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_198_0)(uae_u32 opcode) /* BCLR.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1a0_0)(uae_u32 opcode) /* BCLR.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1a8_0)(uae_u32 opcode) /* BCLR.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1b0_0)(uae_u32 opcode) /* BCLR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1b8_0)(uae_u32 opcode) /* BCLR.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1b9_0)(uae_u32 opcode) /* BCLR.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1ba_0)(uae_u32 opcode) /* BCLR.B Dn,(d16,PC) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 2; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_getpc () + 2; + dsta += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1bb_0)(uae_u32 opcode) /* BCLR.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1c0_0)(uae_u32 opcode) /* BSET.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_1c8_0)(uae_u32 opcode) /* MVPRM.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); + uaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + put_byte(memp, src >> 24); put_byte(memp + 2, src >> 16); + put_byte(memp + 4, src >> 8); put_byte(memp + 6, src); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_1d0_0)(uae_u32 opcode) /* BSET.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1d8_0)(uae_u32 opcode) /* BSET.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1e0_0)(uae_u32 opcode) /* BSET.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1e8_0)(uae_u32 opcode) /* BSET.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1f0_0)(uae_u32 opcode) /* BSET.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1f8_0)(uae_u32 opcode) /* BSET.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1f9_0)(uae_u32 opcode) /* BSET.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1fa_0)(uae_u32 opcode) /* BSET.B Dn,(d16,PC) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 2; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_getpc () + 2; + dsta += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1fb_0)(uae_u32 opcode) /* BSET.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_200_0)(uae_u32 opcode) /* AND.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_210_0)(uae_u32 opcode) /* AND.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_218_0)(uae_u32 opcode) /* AND.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_220_0)(uae_u32 opcode) /* AND.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_228_0)(uae_u32 opcode) /* AND.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_230_0)(uae_u32 opcode) /* AND.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_238_0)(uae_u32 opcode) /* AND.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_239_0)(uae_u32 opcode) /* AND.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23c_0)(uae_u32 opcode) /* ANDSR.B #.W */ +{ + cpuop_begin(); +{ MakeSR(); +{ uae_s16 src = get_iword(2); + src |= 0xFF00; + regs.sr &= src; + MakeFromSR(); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_240_0)(uae_u32 opcode) /* AND.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_250_0)(uae_u32 opcode) /* AND.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_258_0)(uae_u32 opcode) /* AND.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_260_0)(uae_u32 opcode) /* AND.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_268_0)(uae_u32 opcode) /* AND.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_270_0)(uae_u32 opcode) /* AND.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_278_0)(uae_u32 opcode) /* AND.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_279_0)(uae_u32 opcode) /* AND.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_27c_0)(uae_u32 opcode) /* ANDSR.W #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel96; } +{ MakeSR(); +{ uae_s16 src = get_iword(2); + regs.sr &= src; + MakeFromSR(); +}}}m68k_incpc(4); +endlabel96: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_280_0)(uae_u32 opcode) /* AND.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_290_0)(uae_u32 opcode) /* AND.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_298_0)(uae_u32 opcode) /* AND.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2a0_0)(uae_u32 opcode) /* AND.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2a8_0)(uae_u32 opcode) /* AND.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2b0_0)(uae_u32 opcode) /* AND.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2b8_0)(uae_u32 opcode) /* AND.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2b9_0)(uae_u32 opcode) /* AND.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2d0_0)(uae_u32 opcode) /* CHK2.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel105; } +} +}}}m68k_incpc(4); +endlabel105: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2e8_0)(uae_u32 opcode) /* CHK2.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel106; } +} +}}}m68k_incpc(6); +endlabel106: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2f0_0)(uae_u32 opcode) /* CHK2.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel107; } +} +}}}}endlabel107: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2f8_0)(uae_u32 opcode) /* CHK2.W #.W,(xxx).W */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel108; } +} +}}}m68k_incpc(6); +endlabel108: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2f9_0)(uae_u32 opcode) /* CHK2.W #.W,(xxx).L */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel109; } +} +}}}m68k_incpc(8); +endlabel109: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2fa_0)(uae_u32 opcode) /* CHK2.W #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel110; } +} +}}}m68k_incpc(6); +endlabel110: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2fb_0)(uae_u32 opcode) /* CHK2.W #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); + if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel111; } +} +}}}}endlabel111: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_400_0)(uae_u32 opcode) /* SUB.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_410_0)(uae_u32 opcode) /* SUB.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_418_0)(uae_u32 opcode) /* SUB.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_420_0)(uae_u32 opcode) /* SUB.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_428_0)(uae_u32 opcode) /* SUB.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_430_0)(uae_u32 opcode) /* SUB.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_438_0)(uae_u32 opcode) /* SUB.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_439_0)(uae_u32 opcode) /* SUB.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_440_0)(uae_u32 opcode) /* SUB.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_450_0)(uae_u32 opcode) /* SUB.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_458_0)(uae_u32 opcode) /* SUB.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_460_0)(uae_u32 opcode) /* SUB.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_468_0)(uae_u32 opcode) /* SUB.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_470_0)(uae_u32 opcode) /* SUB.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_478_0)(uae_u32 opcode) /* SUB.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_479_0)(uae_u32 opcode) /* SUB.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_480_0)(uae_u32 opcode) /* SUB.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_490_0)(uae_u32 opcode) /* SUB.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_498_0)(uae_u32 opcode) /* SUB.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a0_0)(uae_u32 opcode) /* SUB.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a8_0)(uae_u32 opcode) /* SUB.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4b0_0)(uae_u32 opcode) /* SUB.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4b8_0)(uae_u32 opcode) /* SUB.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4b9_0)(uae_u32 opcode) /* SUB.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4d0_0)(uae_u32 opcode) /* CHK2.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel136; } +} +}}}m68k_incpc(4); +endlabel136: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4e8_0)(uae_u32 opcode) /* CHK2.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel137; } +} +}}}m68k_incpc(6); +endlabel137: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4f0_0)(uae_u32 opcode) /* CHK2.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel138; } +} +}}}}endlabel138: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4f8_0)(uae_u32 opcode) /* CHK2.L #.W,(xxx).W */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel139; } +} +}}}m68k_incpc(6); +endlabel139: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4f9_0)(uae_u32 opcode) /* CHK2.L #.W,(xxx).L */ +{ + cpuop_begin(); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel140; } +} +}}}m68k_incpc(8); +endlabel140: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4fa_0)(uae_u32 opcode) /* CHK2.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel141; } +} +}}}m68k_incpc(6); +endlabel141: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4fb_0)(uae_u32 opcode) /* CHK2.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); + {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; + lower=get_long(dsta); upper = get_long(dsta+4); + SET_ZFLG (upper == reg || lower == reg); + SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); + if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel142; } +} +}}}}endlabel142: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_600_0)(uae_u32 opcode) /* ADD.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_610_0)(uae_u32 opcode) /* ADD.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_618_0)(uae_u32 opcode) /* ADD.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_620_0)(uae_u32 opcode) /* ADD.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_628_0)(uae_u32 opcode) /* ADD.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_630_0)(uae_u32 opcode) /* ADD.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_638_0)(uae_u32 opcode) /* ADD.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_639_0)(uae_u32 opcode) /* ADD.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_640_0)(uae_u32 opcode) /* ADD.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_650_0)(uae_u32 opcode) /* ADD.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_658_0)(uae_u32 opcode) /* ADD.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_660_0)(uae_u32 opcode) /* ADD.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_668_0)(uae_u32 opcode) /* ADD.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_670_0)(uae_u32 opcode) /* ADD.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_678_0)(uae_u32 opcode) /* ADD.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_679_0)(uae_u32 opcode) /* ADD.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_680_0)(uae_u32 opcode) /* ADD.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_690_0)(uae_u32 opcode) /* ADD.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_698_0)(uae_u32 opcode) /* ADD.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6a0_0)(uae_u32 opcode) /* ADD.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6a8_0)(uae_u32 opcode) /* ADD.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6b0_0)(uae_u32 opcode) /* ADD.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6b8_0)(uae_u32 opcode) /* ADD.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6b9_0)(uae_u32 opcode) /* ADD.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6c0_0)(uae_u32 opcode) /* RTM.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6c8_0)(uae_u32 opcode) /* RTM.L An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6d0_0)(uae_u32 opcode) /* CALLM.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6e8_0)(uae_u32 opcode) /* CALLM.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6f0_0)(uae_u32 opcode) /* CALLM.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6f8_0)(uae_u32 opcode) /* CALLM.L (xxx).W */ +{ + cpuop_begin(); +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6f9_0)(uae_u32 opcode) /* CALLM.L (xxx).L */ +{ + cpuop_begin(); +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6fa_0)(uae_u32 opcode) /* CALLM.L (d16,PC) */ +{ + cpuop_begin(); +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6fb_0)(uae_u32 opcode) /* CALLM.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_800_0)(uae_u32 opcode) /* BTST.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_810_0)(uae_u32 opcode) /* BTST.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_818_0)(uae_u32 opcode) /* BTST.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_820_0)(uae_u32 opcode) /* BTST.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_828_0)(uae_u32 opcode) /* BTST.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_830_0)(uae_u32 opcode) /* BTST.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_838_0)(uae_u32 opcode) /* BTST.B #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_839_0)(uae_u32 opcode) /* BTST.B #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_83a_0)(uae_u32 opcode) /* BTST.B #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_83b_0)(uae_u32 opcode) /* BTST.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_83c_0)(uae_u32 opcode) /* BTST.B #.W,#.B */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uae_s8 dst = get_ibyte(4); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_840_0)(uae_u32 opcode) /* BCHG.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_850_0)(uae_u32 opcode) /* BCHG.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_858_0)(uae_u32 opcode) /* BCHG.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_860_0)(uae_u32 opcode) /* BCHG.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_868_0)(uae_u32 opcode) /* BCHG.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_870_0)(uae_u32 opcode) /* BCHG.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_878_0)(uae_u32 opcode) /* BCHG.B #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_879_0)(uae_u32 opcode) /* BCHG.B #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_87a_0)(uae_u32 opcode) /* BCHG.B #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_87b_0)(uae_u32 opcode) /* BCHG.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_880_0)(uae_u32 opcode) /* BCLR.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_890_0)(uae_u32 opcode) /* BCLR.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_898_0)(uae_u32 opcode) /* BCLR.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8a0_0)(uae_u32 opcode) /* BCLR.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8a8_0)(uae_u32 opcode) /* BCLR.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8b0_0)(uae_u32 opcode) /* BCLR.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8b8_0)(uae_u32 opcode) /* BCLR.B #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8b9_0)(uae_u32 opcode) /* BCLR.B #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8ba_0)(uae_u32 opcode) /* BCLR.B #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8bb_0)(uae_u32 opcode) /* BCLR.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8c0_0)(uae_u32 opcode) /* BSET.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= 31; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + m68k_dreg(regs, dstreg) = (dst); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8d0_0)(uae_u32 opcode) /* BSET.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8d8_0)(uae_u32 opcode) /* BSET.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8e0_0)(uae_u32 opcode) /* BSET.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8e8_0)(uae_u32 opcode) /* BSET.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8f0_0)(uae_u32 opcode) /* BSET.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8f8_0)(uae_u32 opcode) /* BSET.B #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8f9_0)(uae_u32 opcode) /* BSET.B #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8fa_0)(uae_u32 opcode) /* BSET.B #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8fb_0)(uae_u32 opcode) /* BSET.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a00_0)(uae_u32 opcode) /* EOR.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a10_0)(uae_u32 opcode) /* EOR.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a18_0)(uae_u32 opcode) /* EOR.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a20_0)(uae_u32 opcode) /* EOR.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a28_0)(uae_u32 opcode) /* EOR.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a30_0)(uae_u32 opcode) /* EOR.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a38_0)(uae_u32 opcode) /* EOR.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a39_0)(uae_u32 opcode) /* EOR.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a3c_0)(uae_u32 opcode) /* EORSR.B #.W */ +{ + cpuop_begin(); +{ MakeSR(); +{ uae_s16 src = get_iword(2); + src &= 0xFF; + regs.sr ^= src; + MakeFromSR(); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a40_0)(uae_u32 opcode) /* EOR.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a50_0)(uae_u32 opcode) /* EOR.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a58_0)(uae_u32 opcode) /* EOR.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a60_0)(uae_u32 opcode) /* EOR.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a68_0)(uae_u32 opcode) /* EOR.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a70_0)(uae_u32 opcode) /* EOR.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a78_0)(uae_u32 opcode) /* EOR.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a79_0)(uae_u32 opcode) /* EOR.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +#endif + +#ifdef PART_2 +void REGPARAM2 CPUFUNC(op_a7c_0)(uae_u32 opcode) /* EORSR.W #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel234; } +{ MakeSR(); +{ uae_s16 src = get_iword(2); + regs.sr ^= src; + MakeFromSR(); +}}}m68k_incpc(4); +endlabel234: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a80_0)(uae_u32 opcode) /* EOR.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a90_0)(uae_u32 opcode) /* EOR.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a98_0)(uae_u32 opcode) /* EOR.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_aa0_0)(uae_u32 opcode) /* EOR.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_aa8_0)(uae_u32 opcode) /* EOR.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ab0_0)(uae_u32 opcode) /* EOR.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ab8_0)(uae_u32 opcode) /* EOR.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ab9_0)(uae_u32 opcode) /* EOR.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ad0_0)(uae_u32 opcode) /* CAS.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ad8_0)(uae_u32 opcode) /* CAS.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ae0_0)(uae_u32 opcode) /* CAS.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ae8_0)(uae_u32 opcode) /* CAS.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_af0_0)(uae_u32 opcode) /* CAS.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_af8_0)(uae_u32 opcode) /* CAS.B #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_af9_0)(uae_u32 opcode) /* CAS.B #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c00_0)(uae_u32 opcode) /* CMP.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c10_0)(uae_u32 opcode) /* CMP.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c18_0)(uae_u32 opcode) /* CMP.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c20_0)(uae_u32 opcode) /* CMP.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c28_0)(uae_u32 opcode) /* CMP.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c30_0)(uae_u32 opcode) /* CMP.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c38_0)(uae_u32 opcode) /* CMP.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c39_0)(uae_u32 opcode) /* CMP.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c3a_0)(uae_u32 opcode) /* CMP.B #.B,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c3b_0)(uae_u32 opcode) /* CMP.B #.B,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c40_0)(uae_u32 opcode) /* CMP.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c50_0)(uae_u32 opcode) /* CMP.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c58_0)(uae_u32 opcode) /* CMP.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c60_0)(uae_u32 opcode) /* CMP.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c68_0)(uae_u32 opcode) /* CMP.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c70_0)(uae_u32 opcode) /* CMP.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c78_0)(uae_u32 opcode) /* CMP.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c79_0)(uae_u32 opcode) /* CMP.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c7a_0)(uae_u32 opcode) /* CMP.W #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c7b_0)(uae_u32 opcode) /* CMP.W #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c80_0)(uae_u32 opcode) /* CMP.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c90_0)(uae_u32 opcode) /* CMP.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c98_0)(uae_u32 opcode) /* CMP.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ca0_0)(uae_u32 opcode) /* CMP.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ca8_0)(uae_u32 opcode) /* CMP.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cb0_0)(uae_u32 opcode) /* CMP.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cb8_0)(uae_u32 opcode) /* CMP.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cb9_0)(uae_u32 opcode) /* CMP.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cba_0)(uae_u32 opcode) /* CMP.L #.L,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_getpc () + 6; + dsta += (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cbb_0)(uae_u32 opcode) /* CMP.L #.L,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cd0_0)(uae_u32 opcode) /* CAS.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cd8_0)(uae_u32 opcode) /* CAS.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ce0_0)(uae_u32 opcode) /* CAS.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ce8_0)(uae_u32 opcode) /* CAS.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cf0_0)(uae_u32 opcode) /* CAS.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cf8_0)(uae_u32 opcode) /* CAS.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s16 dst = get_word(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cf9_0)(uae_u32 opcode) /* CAS.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s16 dst = get_word(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cfc_0)(uae_u32 opcode) /* CAS2.W #.L */ +{ + cpuop_begin(); +{{ uae_s32 extra = get_ilong(2); + uae_u32 rn1 = regs.regs[(extra >> 28) & 15]; + uae_u32 rn2 = regs.regs[(extra >> 12) & 15]; + uae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2); +{uae_u32 newv = ((uae_s16)(dst1)) - ((uae_s16)(m68k_dreg(regs, (extra >> 16) & 7))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, (extra >> 16) & 7))) < 0; + int flgo = ((uae_s16)(dst1)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, (extra >> 16) & 7))) > ((uae_u16)(dst1))); + SET_NFLG (flgn != 0); + if (GET_ZFLG) { +{uae_u32 newv = ((uae_s16)(dst2)) - ((uae_s16)(m68k_dreg(regs, extra & 7))); +{ int flgs = ((uae_s16)(m68k_dreg(regs, extra & 7))) < 0; + int flgo = ((uae_s16)(dst2)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(m68k_dreg(regs, extra & 7))) > ((uae_u16)(dst2))); + SET_NFLG (flgn != 0); + if (GET_ZFLG) { + put_word(rn1, m68k_dreg(regs, (extra >> 22) & 7)); + put_word(rn1, m68k_dreg(regs, (extra >> 6) & 7)); + }} +}}}} if (! GET_ZFLG) { + m68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff); + m68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff); + } +}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e10_0)(uae_u32 opcode) /* MOVES.B #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel288; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + put_byte(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s8 src = get_byte(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(4); +endlabel288: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e18_0)(uae_u32 opcode) /* MOVES.B #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel289; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + put_byte(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(4); +endlabel289: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e20_0)(uae_u32 opcode) /* MOVES.B #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel290; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + put_byte(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, dstreg) = srca; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(4); +endlabel290: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e28_0)(uae_u32 opcode) /* MOVES.B #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel291; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + put_byte(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s8 src = get_byte(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(8); +endlabel291: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e30_0)(uae_u32 opcode) /* MOVES.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel292; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + put_byte(dsta,src); +}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 src = get_byte(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}}endlabel292: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e38_0)(uae_u32 opcode) /* MOVES.B #.W,(xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel293; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + put_byte(dsta,src); +}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); +{ uae_s8 src = get_byte(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(8); +endlabel293: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e39_0)(uae_u32 opcode) /* MOVES.B #.W,(xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel294; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = get_ilong(4); + put_byte(dsta,src); +}}else{{ uaecptr srca = get_ilong(8); +{ uae_s8 src = get_byte(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); + } +}}}}}}m68k_incpc(12); +endlabel294: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e50_0)(uae_u32 opcode) /* MOVES.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel295; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + put_word(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s16 src = get_word(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(4); +endlabel295: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e58_0)(uae_u32 opcode) /* MOVES.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel296; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + put_word(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, dstreg) += 2; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(4); +endlabel296: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e60_0)(uae_u32 opcode) /* MOVES.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel297; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + put_word(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, dstreg) = srca; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(4); +endlabel297: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e68_0)(uae_u32 opcode) /* MOVES.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel298; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + put_word(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s16 src = get_word(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(8); +endlabel298: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e70_0)(uae_u32 opcode) /* MOVES.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel299; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + put_word(dsta,src); +}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 src = get_word(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}}endlabel299: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e78_0)(uae_u32 opcode) /* MOVES.W #.W,(xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel300; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + put_word(dsta,src); +}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); +{ uae_s16 src = get_word(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(8); +endlabel300: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e79_0)(uae_u32 opcode) /* MOVES.W #.W,(xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel301; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = get_ilong(4); + put_word(dsta,src); +}}else{{ uaecptr srca = get_ilong(8); +{ uae_s16 src = get_word(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); + } +}}}}}}m68k_incpc(12); +endlabel301: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e90_0)(uae_u32 opcode) /* MOVES.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel302; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + put_long(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s32 src = get_long(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(4); +endlabel302: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_e98_0)(uae_u32 opcode) /* MOVES.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel303; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + put_long(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, dstreg) += 4; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(4); +endlabel303: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_ea0_0)(uae_u32 opcode) /* MOVES.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel304; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + put_long(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, dstreg) = srca; + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(4); +endlabel304: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_ea8_0)(uae_u32 opcode) /* MOVES.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel305; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + put_long(dsta,src); +}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 src = get_long(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(8); +endlabel305: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_eb0_0)(uae_u32 opcode) /* MOVES.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel306; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + put_long(dsta,src); +}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 src = get_long(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}}endlabel306: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_eb8_0)(uae_u32 opcode) /* MOVES.L #.W,(xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel307; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + put_long(dsta,src); +}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); +{ uae_s32 src = get_long(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(8); +endlabel307: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_eb9_0)(uae_u32 opcode) /* MOVES.L #.W,(xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel308; } +{{ uae_s16 extra = get_iword(2); + if (extra & 0x800) +{ uae_u32 src = regs.regs[(extra >> 12) & 15]; +{ uaecptr dsta = get_ilong(4); + put_long(dsta,src); +}}else{{ uaecptr srca = get_ilong(8); +{ uae_s32 src = get_long(srca); + if (extra & 0x8000) { + m68k_areg(regs, (extra >> 12) & 7) = src; + } else { + m68k_dreg(regs, (extra >> 12) & 7) = (src); + } +}}}}}}m68k_incpc(12); +endlabel308: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_ed0_0)(uae_u32 opcode) /* CAS.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ed8_0)(uae_u32 opcode) /* CAS.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ee0_0)(uae_u32 opcode) /* CAS.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ee8_0)(uae_u32 opcode) /* CAS.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 dst = get_long(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ef0_0)(uae_u32 opcode) /* CAS.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ef8_0)(uae_u32 opcode) /* CAS.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 dst = get_long(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ef9_0)(uae_u32 opcode) /* CAS.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 dst = get_long(dsta); +{ int ru = (src >> 6) & 7; + int rc = src & 7; +{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); + if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); +}else{m68k_dreg(regs, rc) = dst; +}}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_efc_0)(uae_u32 opcode) /* CAS2.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 extra = get_ilong(2); + uae_u32 rn1 = regs.regs[(extra >> 28) & 15]; + uae_u32 rn2 = regs.regs[(extra >> 12) & 15]; + uae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2); +{uae_u32 newv = ((uae_s32)(dst1)) - ((uae_s32)(m68k_dreg(regs, (extra >> 16) & 7))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, (extra >> 16) & 7))) < 0; + int flgo = ((uae_s32)(dst1)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, (extra >> 16) & 7))) > ((uae_u32)(dst1))); + SET_NFLG (flgn != 0); + if (GET_ZFLG) { +{uae_u32 newv = ((uae_s32)(dst2)) - ((uae_s32)(m68k_dreg(regs, extra & 7))); +{ int flgs = ((uae_s32)(m68k_dreg(regs, extra & 7))) < 0; + int flgo = ((uae_s32)(dst2)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(m68k_dreg(regs, extra & 7))) > ((uae_u32)(dst2))); + SET_NFLG (flgn != 0); + if (GET_ZFLG) { + put_long(rn1, m68k_dreg(regs, (extra >> 22) & 7)); + put_long(rn1, m68k_dreg(regs, (extra >> 6) & 7)); + }} +}}}} if (! GET_ZFLG) { + m68k_dreg(regs, (extra >> 22) & 7) = dst1; + m68k_dreg(regs, (extra >> 6) & 7) = dst2; + } +}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1000_0)(uae_u32 opcode) /* MOVE.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1010_0)(uae_u32 opcode) /* MOVE.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1018_0)(uae_u32 opcode) /* MOVE.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1020_0)(uae_u32 opcode) /* MOVE.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1028_0)(uae_u32 opcode) /* MOVE.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1030_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1038_0)(uae_u32 opcode) /* MOVE.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1039_0)(uae_u32 opcode) /* MOVE.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_103a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_103b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_103c_0)(uae_u32 opcode) /* MOVE.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1080_0)(uae_u32 opcode) /* MOVE.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1090_0)(uae_u32 opcode) /* MOVE.B (An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1098_0)(uae_u32 opcode) /* MOVE.B (An)+,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10a0_0)(uae_u32 opcode) /* MOVE.B -(An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10a8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10b0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10b8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10b9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10ba_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10bb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10bc_0)(uae_u32 opcode) /* MOVE.B #.B,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10c0_0)(uae_u32 opcode) /* MOVE.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10d0_0)(uae_u32 opcode) /* MOVE.B (An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10e0_0)(uae_u32 opcode) /* MOVE.B -(An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10fc_0)(uae_u32 opcode) /* MOVE.B #.B,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1100_0)(uae_u32 opcode) /* MOVE.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1110_0)(uae_u32 opcode) /* MOVE.B (An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1118_0)(uae_u32 opcode) /* MOVE.B (An)+,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1120_0)(uae_u32 opcode) /* MOVE.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1128_0)(uae_u32 opcode) /* MOVE.B (d16,An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1130_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1138_0)(uae_u32 opcode) /* MOVE.B (xxx).W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1139_0)(uae_u32 opcode) /* MOVE.B (xxx).L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_113a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_113b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_113c_0)(uae_u32 opcode) /* MOVE.B #.B,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1140_0)(uae_u32 opcode) /* MOVE.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1150_0)(uae_u32 opcode) /* MOVE.B (An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1158_0)(uae_u32 opcode) /* MOVE.B (An)+,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1160_0)(uae_u32 opcode) /* MOVE.B -(An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1168_0)(uae_u32 opcode) /* MOVE.B (d16,An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1170_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1178_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1179_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_117a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_117b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_117c_0)(uae_u32 opcode) /* MOVE.B #.B,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1180_0)(uae_u32 opcode) /* MOVE.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1190_0)(uae_u32 opcode) /* MOVE.B (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1198_0)(uae_u32 opcode) /* MOVE.B (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11a0_0)(uae_u32 opcode) /* MOVE.B -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11a8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11ba_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11bb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11bc_0)(uae_u32 opcode) /* MOVE.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11c0_0)(uae_u32 opcode) /* MOVE.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11d0_0)(uae_u32 opcode) /* MOVE.B (An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11e0_0)(uae_u32 opcode) /* MOVE.B -(An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11fc_0)(uae_u32 opcode) /* MOVE.B #.B,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13c0_0)(uae_u32 opcode) /* MOVE.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13d0_0)(uae_u32 opcode) /* MOVE.B (An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13e0_0)(uae_u32 opcode) /* MOVE.B -(An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13fc_0)(uae_u32 opcode) /* MOVE.B #.B,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2000_0)(uae_u32 opcode) /* MOVE.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2008_0)(uae_u32 opcode) /* MOVE.L An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2010_0)(uae_u32 opcode) /* MOVE.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2018_0)(uae_u32 opcode) /* MOVE.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2020_0)(uae_u32 opcode) /* MOVE.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2028_0)(uae_u32 opcode) /* MOVE.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2030_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2038_0)(uae_u32 opcode) /* MOVE.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2039_0)(uae_u32 opcode) /* MOVE.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_203a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_203b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_203c_0)(uae_u32 opcode) /* MOVE.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2040_0)(uae_u32 opcode) /* MOVEA.L Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2048_0)(uae_u32 opcode) /* MOVEA.L An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2050_0)(uae_u32 opcode) /* MOVEA.L (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2058_0)(uae_u32 opcode) /* MOVEA.L (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2060_0)(uae_u32 opcode) /* MOVEA.L -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2068_0)(uae_u32 opcode) /* MOVEA.L (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2070_0)(uae_u32 opcode) /* MOVEA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2078_0)(uae_u32 opcode) /* MOVEA.L (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2079_0)(uae_u32 opcode) /* MOVEA.L (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_207a_0)(uae_u32 opcode) /* MOVEA.L (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_207b_0)(uae_u32 opcode) /* MOVEA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_207c_0)(uae_u32 opcode) /* MOVEA.L #.L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_2080_0)(uae_u32 opcode) /* MOVE.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2088_0)(uae_u32 opcode) /* MOVE.L An,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2090_0)(uae_u32 opcode) /* MOVE.L (An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2098_0)(uae_u32 opcode) /* MOVE.L (An)+,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20a0_0)(uae_u32 opcode) /* MOVE.L -(An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20a8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20b0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20b8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20b9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20ba_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20bb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20bc_0)(uae_u32 opcode) /* MOVE.L #.L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20c0_0)(uae_u32 opcode) /* MOVE.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20c8_0)(uae_u32 opcode) /* MOVE.L An,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20d0_0)(uae_u32 opcode) /* MOVE.L (An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20e0_0)(uae_u32 opcode) /* MOVE.L -(An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20fc_0)(uae_u32 opcode) /* MOVE.L #.L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2100_0)(uae_u32 opcode) /* MOVE.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2108_0)(uae_u32 opcode) /* MOVE.L An,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2110_0)(uae_u32 opcode) /* MOVE.L (An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2118_0)(uae_u32 opcode) /* MOVE.L (An)+,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2120_0)(uae_u32 opcode) /* MOVE.L -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2128_0)(uae_u32 opcode) /* MOVE.L (d16,An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2130_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2138_0)(uae_u32 opcode) /* MOVE.L (xxx).W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2139_0)(uae_u32 opcode) /* MOVE.L (xxx).L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_213a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_213b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_213c_0)(uae_u32 opcode) /* MOVE.L #.L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2140_0)(uae_u32 opcode) /* MOVE.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2148_0)(uae_u32 opcode) /* MOVE.L An,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2150_0)(uae_u32 opcode) /* MOVE.L (An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_3 +void REGPARAM2 CPUFUNC(op_2158_0)(uae_u32 opcode) /* MOVE.L (An)+,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2160_0)(uae_u32 opcode) /* MOVE.L -(An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2168_0)(uae_u32 opcode) /* MOVE.L (d16,An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2170_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2178_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2179_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_217a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_217b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_217c_0)(uae_u32 opcode) /* MOVE.L #.L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2180_0)(uae_u32 opcode) /* MOVE.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2188_0)(uae_u32 opcode) /* MOVE.L An,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2190_0)(uae_u32 opcode) /* MOVE.L (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2198_0)(uae_u32 opcode) /* MOVE.L (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21a0_0)(uae_u32 opcode) /* MOVE.L -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21a8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21ba_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21bb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21bc_0)(uae_u32 opcode) /* MOVE.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21c0_0)(uae_u32 opcode) /* MOVE.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21c8_0)(uae_u32 opcode) /* MOVE.L An,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21d0_0)(uae_u32 opcode) /* MOVE.L (An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21e0_0)(uae_u32 opcode) /* MOVE.L -(An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21fc_0)(uae_u32 opcode) /* MOVE.L #.L,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23c0_0)(uae_u32 opcode) /* MOVE.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23c8_0)(uae_u32 opcode) /* MOVE.L An,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23d0_0)(uae_u32 opcode) /* MOVE.L (An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23e0_0)(uae_u32 opcode) /* MOVE.L -(An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23fc_0)(uae_u32 opcode) /* MOVE.L #.L,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_ilong(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3000_0)(uae_u32 opcode) /* MOVE.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3008_0)(uae_u32 opcode) /* MOVE.W An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3010_0)(uae_u32 opcode) /* MOVE.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3018_0)(uae_u32 opcode) /* MOVE.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3020_0)(uae_u32 opcode) /* MOVE.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3028_0)(uae_u32 opcode) /* MOVE.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3030_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3038_0)(uae_u32 opcode) /* MOVE.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3039_0)(uae_u32 opcode) /* MOVE.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_303a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_303b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_303c_0)(uae_u32 opcode) /* MOVE.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3040_0)(uae_u32 opcode) /* MOVEA.W Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3048_0)(uae_u32 opcode) /* MOVEA.W An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3050_0)(uae_u32 opcode) /* MOVEA.W (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3058_0)(uae_u32 opcode) /* MOVEA.W (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3060_0)(uae_u32 opcode) /* MOVEA.W -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3068_0)(uae_u32 opcode) /* MOVEA.W (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3070_0)(uae_u32 opcode) /* MOVEA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3078_0)(uae_u32 opcode) /* MOVEA.W (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3079_0)(uae_u32 opcode) /* MOVEA.W (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_307a_0)(uae_u32 opcode) /* MOVEA.W (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_307b_0)(uae_u32 opcode) /* MOVEA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_307c_0)(uae_u32 opcode) /* MOVEA.W #.W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_3080_0)(uae_u32 opcode) /* MOVE.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3088_0)(uae_u32 opcode) /* MOVE.W An,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3090_0)(uae_u32 opcode) /* MOVE.W (An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3098_0)(uae_u32 opcode) /* MOVE.W (An)+,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30a0_0)(uae_u32 opcode) /* MOVE.W -(An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30a8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30b0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30b8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30b9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30ba_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30bb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30bc_0)(uae_u32 opcode) /* MOVE.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30c0_0)(uae_u32 opcode) /* MOVE.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30c8_0)(uae_u32 opcode) /* MOVE.W An,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30d0_0)(uae_u32 opcode) /* MOVE.W (An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30e0_0)(uae_u32 opcode) /* MOVE.W -(An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30fc_0)(uae_u32 opcode) /* MOVE.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3100_0)(uae_u32 opcode) /* MOVE.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3108_0)(uae_u32 opcode) /* MOVE.W An,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3110_0)(uae_u32 opcode) /* MOVE.W (An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3118_0)(uae_u32 opcode) /* MOVE.W (An)+,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3120_0)(uae_u32 opcode) /* MOVE.W -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3128_0)(uae_u32 opcode) /* MOVE.W (d16,An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3130_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3138_0)(uae_u32 opcode) /* MOVE.W (xxx).W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3139_0)(uae_u32 opcode) /* MOVE.W (xxx).L,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_313a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_313b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_313c_0)(uae_u32 opcode) /* MOVE.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3140_0)(uae_u32 opcode) /* MOVE.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3148_0)(uae_u32 opcode) /* MOVE.W An,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3150_0)(uae_u32 opcode) /* MOVE.W (An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3158_0)(uae_u32 opcode) /* MOVE.W (An)+,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3160_0)(uae_u32 opcode) /* MOVE.W -(An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3168_0)(uae_u32 opcode) /* MOVE.W (d16,An),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3170_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3178_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3179_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_317a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_317b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_317c_0)(uae_u32 opcode) /* MOVE.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3180_0)(uae_u32 opcode) /* MOVE.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3188_0)(uae_u32 opcode) /* MOVE.W An,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3190_0)(uae_u32 opcode) /* MOVE.W (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3198_0)(uae_u32 opcode) /* MOVE.W (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31a0_0)(uae_u32 opcode) /* MOVE.W -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31a8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{m68k_incpc(6); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31ba_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31bb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31bc_0)(uae_u32 opcode) /* MOVE.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31c0_0)(uae_u32 opcode) /* MOVE.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31c8_0)(uae_u32 opcode) /* MOVE.W An,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31d0_0)(uae_u32 opcode) /* MOVE.W (An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31e0_0)(uae_u32 opcode) /* MOVE.W -(An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31fc_0)(uae_u32 opcode) /* MOVE.W #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33c0_0)(uae_u32 opcode) /* MOVE.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33c8_0)(uae_u32 opcode) /* MOVE.W An,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33d0_0)(uae_u32 opcode) /* MOVE.W (An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33e0_0)(uae_u32 opcode) /* MOVE.W -(An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(6); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(10); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(0); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33fc_0)(uae_u32 opcode) /* MOVE.W #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4000_0)(uae_u32 opcode) /* NEGX.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4010_0)(uae_u32 opcode) /* NEGX.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4018_0)(uae_u32 opcode) /* NEGX.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4020_0)(uae_u32 opcode) /* NEGX.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4028_0)(uae_u32 opcode) /* NEGX.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4030_0)(uae_u32 opcode) /* NEGX.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4038_0)(uae_u32 opcode) /* NEGX.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4039_0)(uae_u32 opcode) /* NEGX.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4040_0)(uae_u32 opcode) /* NEGX.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((newv) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4050_0)(uae_u32 opcode) /* NEGX.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4058_0)(uae_u32 opcode) /* NEGX.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4060_0)(uae_u32 opcode) /* NEGX.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4068_0)(uae_u32 opcode) /* NEGX.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4070_0)(uae_u32 opcode) /* NEGX.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4078_0)(uae_u32 opcode) /* NEGX.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4079_0)(uae_u32 opcode) /* NEGX.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4080_0)(uae_u32 opcode) /* NEGX.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, srcreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4090_0)(uae_u32 opcode) /* NEGX.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4098_0)(uae_u32 opcode) /* NEGX.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40a0_0)(uae_u32 opcode) /* NEGX.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40a8_0)(uae_u32 opcode) /* NEGX.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40b0_0)(uae_u32 opcode) /* NEGX.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40b8_0)(uae_u32 opcode) /* NEGX.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40b9_0)(uae_u32 opcode) /* NEGX.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40c0_0)(uae_u32 opcode) /* MVSR2.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel645; } +{{ MakeSR(); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr) & 0xffff); +}}}m68k_incpc(2); +endlabel645: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40d0_0)(uae_u32 opcode) /* MVSR2.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel646; } +{{ uaecptr srca = m68k_areg(regs, srcreg); + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(2); +endlabel646: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40d8_0)(uae_u32 opcode) /* MVSR2.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel647; } +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += 2; + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(2); +endlabel647: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40e0_0)(uae_u32 opcode) /* MVSR2.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel648; } +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; + m68k_areg (regs, srcreg) = srca; + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(2); +endlabel648: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40e8_0)(uae_u32 opcode) /* MVSR2.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel649; } +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(4); +endlabel649: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f0_0)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel650; } +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + MakeSR(); + put_word(srca,regs.sr); +}}}}endlabel650: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f8_0)(uae_u32 opcode) /* MVSR2.W (xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel651; } +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(4); +endlabel651: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f9_0)(uae_u32 opcode) /* MVSR2.W (xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel652; } +{{ uaecptr srca = get_ilong(2); + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(6); +endlabel652: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4100_0)(uae_u32 opcode) /* CHK.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel653; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel653; } +}}}m68k_incpc(2); +endlabel653: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4110_0)(uae_u32 opcode) /* CHK.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel654; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel654; } +}}}}m68k_incpc(2); +endlabel654: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4118_0)(uae_u32 opcode) /* CHK.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel655; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel655; } +}}}}m68k_incpc(2); +endlabel655: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4120_0)(uae_u32 opcode) /* CHK.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel656; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel656; } +}}}}m68k_incpc(2); +endlabel656: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4128_0)(uae_u32 opcode) /* CHK.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel657; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel657; } +}}}}m68k_incpc(4); +endlabel657: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4130_0)(uae_u32 opcode) /* CHK.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel658; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel658; } +}}}}}endlabel658: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4138_0)(uae_u32 opcode) /* CHK.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel659; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel659; } +}}}}m68k_incpc(4); +endlabel659: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4139_0)(uae_u32 opcode) /* CHK.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel660; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel660; } +}}}}m68k_incpc(6); +endlabel660: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_413a_0)(uae_u32 opcode) /* CHK.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel661; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel661; } +}}}}m68k_incpc(4); +endlabel661: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_413b_0)(uae_u32 opcode) /* CHK.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel662; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel662; } +}}}}}endlabel662: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_413c_0)(uae_u32 opcode) /* CHK.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel663; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel663; } +}}}m68k_incpc(6); +endlabel663: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4180_0)(uae_u32 opcode) /* CHK.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel664; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel664; } +}}}m68k_incpc(2); +endlabel664: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4190_0)(uae_u32 opcode) /* CHK.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel665; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel665; } +}}}}m68k_incpc(2); +endlabel665: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4198_0)(uae_u32 opcode) /* CHK.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel666; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel666; } +}}}}m68k_incpc(2); +endlabel666: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41a0_0)(uae_u32 opcode) /* CHK.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel667; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel667; } +}}}}m68k_incpc(2); +endlabel667: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41a8_0)(uae_u32 opcode) /* CHK.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel668; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel668; } +}}}}m68k_incpc(4); +endlabel668: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41b0_0)(uae_u32 opcode) /* CHK.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel669; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel669; } +}}}}}endlabel669: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41b8_0)(uae_u32 opcode) /* CHK.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel670; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel670; } +}}}}m68k_incpc(4); +endlabel670: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41b9_0)(uae_u32 opcode) /* CHK.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel671; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel671; } +}}}}m68k_incpc(6); +endlabel671: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41ba_0)(uae_u32 opcode) /* CHK.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel672; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel672; } +}}}}m68k_incpc(4); +endlabel672: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41bb_0)(uae_u32 opcode) /* CHK.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel673; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel673; } +}}}}}endlabel673: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41bc_0)(uae_u32 opcode) /* CHK.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel674; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel674; } +}}}m68k_incpc(4); +endlabel674: ; + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41d0_0)(uae_u32 opcode) /* LEA.L (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41e8_0)(uae_u32 opcode) /* LEA.L (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41f0_0)(uae_u32 opcode) /* LEA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ m68k_areg(regs, dstreg) = (srca); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41f8_0)(uae_u32 opcode) /* LEA.L (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41f9_0)(uae_u32 opcode) /* LEA.L (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41fa_0)(uae_u32 opcode) /* LEA.L (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41fb_0)(uae_u32 opcode) /* LEA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ m68k_areg(regs, dstreg) = (srca); +}}}} cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4200_0)(uae_u32 opcode) /* CLR.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((0) & 0xff); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4210_0)(uae_u32 opcode) /* CLR.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4218_0)(uae_u32 opcode) /* CLR.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4220_0)(uae_u32 opcode) /* CLR.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4228_0)(uae_u32 opcode) /* CLR.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4230_0)(uae_u32 opcode) /* CLR.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4238_0)(uae_u32 opcode) /* CLR.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4239_0)(uae_u32 opcode) /* CLR.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4240_0)(uae_u32 opcode) /* CLR.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((0) & 0xffff); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4250_0)(uae_u32 opcode) /* CLR.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4258_0)(uae_u32 opcode) /* CLR.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4260_0)(uae_u32 opcode) /* CLR.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4268_0)(uae_u32 opcode) /* CLR.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4270_0)(uae_u32 opcode) /* CLR.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4278_0)(uae_u32 opcode) /* CLR.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4279_0)(uae_u32 opcode) /* CLR.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4280_0)(uae_u32 opcode) /* CLR.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + m68k_dreg(regs, srcreg) = (0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4290_0)(uae_u32 opcode) /* CLR.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4298_0)(uae_u32 opcode) /* CLR.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +#endif + +#ifdef PART_4 +void REGPARAM2 CPUFUNC(op_42a0_0)(uae_u32 opcode) /* CLR.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_42a8_0)(uae_u32 opcode) /* CLR.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_42b0_0)(uae_u32 opcode) /* CLR.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_42b8_0)(uae_u32 opcode) /* CLR.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_42b9_0)(uae_u32 opcode) /* CLR.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42c0_0)(uae_u32 opcode) /* MVSR2.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ MakeSR(); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr & 0xff) & 0xffff); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42d0_0)(uae_u32 opcode) /* MVSR2.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42d8_0)(uae_u32 opcode) /* MVSR2.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += 2; + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42e0_0)(uae_u32 opcode) /* MVSR2.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; + m68k_areg (regs, srcreg) = srca; + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42e8_0)(uae_u32 opcode) /* MVSR2.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42f0_0)(uae_u32 opcode) /* MVSR2.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42f8_0)(uae_u32 opcode) /* MVSR2.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42f9_0)(uae_u32 opcode) /* MVSR2.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4400_0)(uae_u32 opcode) /* NEG.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((dst) & 0xff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4410_0)(uae_u32 opcode) /* NEG.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4418_0)(uae_u32 opcode) /* NEG.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4420_0)(uae_u32 opcode) /* NEG.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4428_0)(uae_u32 opcode) /* NEG.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4430_0)(uae_u32 opcode) /* NEG.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4438_0)(uae_u32 opcode) /* NEG.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4439_0)(uae_u32 opcode) /* NEG.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4440_0)(uae_u32 opcode) /* NEG.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4450_0)(uae_u32 opcode) /* NEG.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4458_0)(uae_u32 opcode) /* NEG.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4460_0)(uae_u32 opcode) /* NEG.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4468_0)(uae_u32 opcode) /* NEG.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4470_0)(uae_u32 opcode) /* NEG.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4478_0)(uae_u32 opcode) /* NEG.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4479_0)(uae_u32 opcode) /* NEG.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4480_0)(uae_u32 opcode) /* NEG.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, srcreg) = (dst); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4490_0)(uae_u32 opcode) /* NEG.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4498_0)(uae_u32 opcode) /* NEG.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44a0_0)(uae_u32 opcode) /* NEG.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44a8_0)(uae_u32 opcode) /* NEG.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44b0_0)(uae_u32 opcode) /* NEG.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44b8_0)(uae_u32 opcode) /* NEG.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44b9_0)(uae_u32 opcode) /* NEG.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44c0_0)(uae_u32 opcode) /* MV2SR.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44d0_0)(uae_u32 opcode) /* MV2SR.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44d8_0)(uae_u32 opcode) /* MV2SR.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44e0_0)(uae_u32 opcode) /* MV2SR.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44e8_0)(uae_u32 opcode) /* MV2SR.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44f0_0)(uae_u32 opcode) /* MV2SR.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44f8_0)(uae_u32 opcode) /* MV2SR.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44f9_0)(uae_u32 opcode) /* MV2SR.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44fa_0)(uae_u32 opcode) /* MV2SR.B (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44fb_0)(uae_u32 opcode) /* MV2SR.B (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44fc_0)(uae_u32 opcode) /* MV2SR.B #.B */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4600_0)(uae_u32 opcode) /* NOT.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((dst) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4610_0)(uae_u32 opcode) /* NOT.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4618_0)(uae_u32 opcode) /* NOT.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4620_0)(uae_u32 opcode) /* NOT.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4628_0)(uae_u32 opcode) /* NOT.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4630_0)(uae_u32 opcode) /* NOT.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4638_0)(uae_u32 opcode) /* NOT.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4639_0)(uae_u32 opcode) /* NOT.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4640_0)(uae_u32 opcode) /* NOT.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4650_0)(uae_u32 opcode) /* NOT.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4658_0)(uae_u32 opcode) /* NOT.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4660_0)(uae_u32 opcode) /* NOT.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4668_0)(uae_u32 opcode) /* NOT.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4670_0)(uae_u32 opcode) /* NOT.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4678_0)(uae_u32 opcode) /* NOT.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4679_0)(uae_u32 opcode) /* NOT.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4680_0)(uae_u32 opcode) /* NOT.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + m68k_dreg(regs, srcreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4690_0)(uae_u32 opcode) /* NOT.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4698_0)(uae_u32 opcode) /* NOT.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46a0_0)(uae_u32 opcode) /* NOT.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46a8_0)(uae_u32 opcode) /* NOT.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46b0_0)(uae_u32 opcode) /* NOT.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46b8_0)(uae_u32 opcode) /* NOT.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46b9_0)(uae_u32 opcode) /* NOT.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46c0_0)(uae_u32 opcode) /* MV2SR.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel773; } +{{ uae_s16 src = m68k_dreg(regs, srcreg); + regs.sr = src; + MakeFromSR(); +}}}m68k_incpc(2); +endlabel773: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46d0_0)(uae_u32 opcode) /* MV2SR.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel774; } +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(2); +endlabel774: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46d8_0)(uae_u32 opcode) /* MV2SR.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel775; } +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(2); +endlabel775: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46e0_0)(uae_u32 opcode) /* MV2SR.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel776; } +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(2); +endlabel776: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46e8_0)(uae_u32 opcode) /* MV2SR.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel777; } +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(4); +endlabel777: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46f0_0)(uae_u32 opcode) /* MV2SR.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel778; } +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}}endlabel778: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46f8_0)(uae_u32 opcode) /* MV2SR.W (xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel779; } +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(4); +endlabel779: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46f9_0)(uae_u32 opcode) /* MV2SR.W (xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel780; } +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(6); +endlabel780: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46fa_0)(uae_u32 opcode) /* MV2SR.W (d16,PC) */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel781; } +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(4); +endlabel781: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46fb_0)(uae_u32 opcode) /* MV2SR.W (d8,PC,Xn) */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel782; } +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}}endlabel782: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46fc_0)(uae_u32 opcode) /* MV2SR.W #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel783; } +{{ uae_s16 src = get_iword(2); + regs.sr = src; + MakeFromSR(); +}}}m68k_incpc(4); +endlabel783: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4800_0)(uae_u32 opcode) /* NBCD.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4808_0)(uae_u32 opcode) /* LINK.L An,#.L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr olda = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = olda; +{ uae_s32 src = m68k_areg(regs, srcreg); + put_long(olda,src); + m68k_areg(regs, srcreg) = (m68k_areg(regs, 7)); +{ uae_s32 offs = get_ilong(2); + m68k_areg(regs, 7) += offs; +}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4810_0)(uae_u32 opcode) /* NBCD.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4818_0)(uae_u32 opcode) /* NBCD.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4820_0)(uae_u32 opcode) /* NBCD.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4828_0)(uae_u32 opcode) /* NBCD.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4830_0)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4838_0)(uae_u32 opcode) /* NBCD.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4839_0)(uae_u32 opcode) /* NBCD.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(srca,newv); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4840_0)(uae_u32 opcode) /* SWAP.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + m68k_dreg(regs, srcreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4848_0)(uae_u32 opcode) /* BKPT.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{m68k_incpc(2); + op_illg(opcode); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4850_0)(uae_u32 opcode) /* PEA.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4868_0)(uae_u32 opcode) /* PEA.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4870_0)(uae_u32 opcode) /* PEA.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4878_0)(uae_u32 opcode) /* PEA.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4879_0)(uae_u32 opcode) /* PEA.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_487a_0)(uae_u32 opcode) /* PEA.L (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_487b_0)(uae_u32 opcode) /* PEA.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}} cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4880_0)(uae_u32 opcode) /* EXT.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u16 dst = (uae_s16)(uae_s8)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4890_0)(uae_u32 opcode) /* MVMLE.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48a0_0)(uae_u32 opcode) /* MVMLE.W #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg) - 0; +{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff; + while (amask) { srca -= 2; put_word(srca, m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; } + while (dmask) { srca -= 2; put_word(srca, m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; } + m68k_areg(regs, dstreg) = srca; +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48a8_0)(uae_u32 opcode) /* MVMLE.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48b0_0)(uae_u32 opcode) /* MVMLE.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{m68k_incpc(4); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48b8_0)(uae_u32 opcode) /* MVMLE.W #.W,(xxx).W */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48b9_0)(uae_u32 opcode) /* MVMLE.W #.W,(xxx).L */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = get_ilong(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(8); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_48c0_0)(uae_u32 opcode) /* EXT.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + m68k_dreg(regs, srcreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48d0_0)(uae_u32 opcode) /* MVMLE.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48e0_0)(uae_u32 opcode) /* MVMLE.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg) - 0; +{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff; + while (amask) { srca -= 4; put_long(srca, m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; } + while (dmask) { srca -= 4; put_long(srca, m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; } + m68k_areg(regs, dstreg) = srca; +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48e8_0)(uae_u32 opcode) /* MVMLE.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48f0_0)(uae_u32 opcode) /* MVMLE.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{m68k_incpc(4); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48f8_0)(uae_u32 opcode) /* MVMLE.L #.W,(xxx).W */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48f9_0)(uae_u32 opcode) /* MVMLE.L #.W,(xxx).L */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = get_ilong(4); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(8); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_49c0_0)(uae_u32 opcode) /* EXT.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_u32 dst = (uae_s32)(uae_s8)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + m68k_dreg(regs, srcreg) = (dst); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a00_0)(uae_u32 opcode) /* TST.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a10_0)(uae_u32 opcode) /* TST.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a18_0)(uae_u32 opcode) /* TST.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a20_0)(uae_u32 opcode) /* TST.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a28_0)(uae_u32 opcode) /* TST.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a30_0)(uae_u32 opcode) /* TST.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a38_0)(uae_u32 opcode) /* TST.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a39_0)(uae_u32 opcode) /* TST.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a3a_0)(uae_u32 opcode) /* TST.B (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a3b_0)(uae_u32 opcode) /* TST.B (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a3c_0)(uae_u32 opcode) /* TST.B #.B */ +{ + cpuop_begin(); +{{ uae_s8 src = get_ibyte(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a40_0)(uae_u32 opcode) /* TST.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a48_0)(uae_u32 opcode) /* TST.W An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a50_0)(uae_u32 opcode) /* TST.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a58_0)(uae_u32 opcode) /* TST.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a60_0)(uae_u32 opcode) /* TST.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a68_0)(uae_u32 opcode) /* TST.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a70_0)(uae_u32 opcode) /* TST.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a78_0)(uae_u32 opcode) /* TST.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a79_0)(uae_u32 opcode) /* TST.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a7a_0)(uae_u32 opcode) /* TST.W (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a7b_0)(uae_u32 opcode) /* TST.W (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a7c_0)(uae_u32 opcode) /* TST.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a80_0)(uae_u32 opcode) /* TST.L Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a88_0)(uae_u32 opcode) /* TST.L An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a90_0)(uae_u32 opcode) /* TST.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a98_0)(uae_u32 opcode) /* TST.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4aa0_0)(uae_u32 opcode) /* TST.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4aa8_0)(uae_u32 opcode) /* TST.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ab0_0)(uae_u32 opcode) /* TST.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ab8_0)(uae_u32 opcode) /* TST.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ab9_0)(uae_u32 opcode) /* TST.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4aba_0)(uae_u32 opcode) /* TST.L (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4abb_0)(uae_u32 opcode) /* TST.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4abc_0)(uae_u32 opcode) /* TST.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ac0_0)(uae_u32 opcode) /* TAS.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((src) & 0xff); +}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ad0_0)(uae_u32 opcode) /* TAS.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ad8_0)(uae_u32 opcode) /* TAS.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ae0_0)(uae_u32 opcode) /* TAS.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ae8_0)(uae_u32 opcode) /* TAS.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4af0_0)(uae_u32 opcode) /* TAS.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4af8_0)(uae_u32 opcode) /* TAS.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4af9_0)(uae_u32 opcode) /* TAS.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c00_0)(uae_u32 opcode) /* MULL.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + m68k_mull(opcode, dst, extra); +}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c10_0)(uae_u32 opcode) /* MULL.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(4); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c18_0)(uae_u32 opcode) /* MULL.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +m68k_incpc(4); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c20_0)(uae_u32 opcode) /* MULL.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +m68k_incpc(4); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c28_0)(uae_u32 opcode) /* MULL.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(6); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c30_0)(uae_u32 opcode) /* MULL.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + m68k_mull(opcode, dst, extra); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c38_0)(uae_u32 opcode) /* MULL.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(6); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c39_0)(uae_u32 opcode) /* MULL.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(8); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c3a_0)(uae_u32 opcode) /* MULL.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(6); + m68k_mull(opcode, dst, extra); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c3b_0)(uae_u32 opcode) /* MULL.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 dst = get_long(dsta); + m68k_mull(opcode, dst, extra); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c3c_0)(uae_u32 opcode) /* MULL.L #.W,#.L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uae_s32 dst = get_ilong(4); +m68k_incpc(8); + m68k_mull(opcode, dst, extra); +}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c40_0)(uae_u32 opcode) /* DIVL.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + m68k_divl(opcode, dst, extra, oldpc); +}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c50_0)(uae_u32 opcode) /* DIVL.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(2); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c58_0)(uae_u32 opcode) /* DIVL.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +m68k_incpc(2); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c60_0)(uae_u32 opcode) /* DIVL.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +m68k_incpc(2); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c68_0)(uae_u32 opcode) /* DIVL.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(4); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c70_0)(uae_u32 opcode) /* DIVL.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + m68k_divl(opcode, dst, extra, oldpc); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c78_0)(uae_u32 opcode) /* DIVL.L #.W,(xxx).W */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(4); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c79_0)(uae_u32 opcode) /* DIVL.L #.W,(xxx).L */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(6); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c7a_0)(uae_u32 opcode) /* DIVL.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uaecptr dsta = m68k_getpc () + 2; + dsta += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +m68k_incpc(4); + m68k_divl(opcode, dst, extra, oldpc); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c7b_0)(uae_u32 opcode) /* DIVL.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 dst = get_long(dsta); + m68k_divl(opcode, dst, extra, oldpc); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4c7c_0)(uae_u32 opcode) /* DIVL.L #.W,#.L */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +{ uae_s32 dst = get_ilong(2); +m68k_incpc(6); + m68k_divl(opcode, dst, extra, oldpc); +}}}} cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4c90_0)(uae_u32 opcode) /* MVMEL.W #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4c98_0)(uae_u32 opcode) /* MVMEL.W #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } + m68k_areg(regs, dstreg) = srca; +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ca8_0)(uae_u32 opcode) /* MVMEL.W #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cb0_0)(uae_u32 opcode) /* MVMEL.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{m68k_incpc(4); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cb8_0)(uae_u32 opcode) /* MVMEL.W #.W,(xxx).W */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cb9_0)(uae_u32 opcode) /* MVMEL.W #.W,(xxx).L */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = get_ilong(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(8); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cba_0)(uae_u32 opcode) /* MVMEL.W #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_getpc () + 4; + srca += (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cbb_0)(uae_u32 opcode) /* MVMEL.W #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cd0_0)(uae_u32 opcode) /* MVMEL.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cd8_0)(uae_u32 opcode) /* MVMEL.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } + m68k_areg(regs, dstreg) = srca; +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ce8_0)(uae_u32 opcode) /* MVMEL.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cf0_0)(uae_u32 opcode) /* MVMEL.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{m68k_incpc(4); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cf8_0)(uae_u32 opcode) /* MVMEL.L #.W,(xxx).W */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cf9_0)(uae_u32 opcode) /* MVMEL.L #.W,(xxx).L */ +{ + cpuop_begin(); +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = get_ilong(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(8); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cfa_0)(uae_u32 opcode) /* MVMEL.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = m68k_getpc () + 4; + srca += (uae_s32)(uae_s16)get_iword(4); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cfb_0)(uae_u32 opcode) /* MVMEL.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e40_0)(uae_u32 opcode) /* TRAP.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 15); +#else + uae_u32 srcreg = (opcode & 15); +#endif +{{ uae_u32 src = srcreg; +m68k_incpc(2); + Exception(src+32,0); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e50_0)(uae_u32 opcode) /* LINK.W An,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr olda = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = olda; +{ uae_s32 src = m68k_areg(regs, srcreg); + put_long(olda,src); + m68k_areg(regs, srcreg) = (m68k_areg(regs, 7)); +{ uae_s16 offs = get_iword(2); + m68k_areg(regs, 7) += offs; +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e58_0)(uae_u32 opcode) /* UNLK.L An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); + m68k_areg(regs, 7) = src; +{ uaecptr olda = m68k_areg(regs, 7); +{ uae_s32 old = get_long(olda); + m68k_areg(regs, 7) += 4; + m68k_areg(regs, srcreg) = (old); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e60_0)(uae_u32 opcode) /* MVR2USP.L An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel901; } +{{ uae_s32 src = m68k_areg(regs, srcreg); + regs.usp = src; +}}}m68k_incpc(2); +endlabel901: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e68_0)(uae_u32 opcode) /* MVUSP2R.L An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel902; } +{{ m68k_areg(regs, srcreg) = (regs.usp); +}}}m68k_incpc(2); +endlabel902: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e70_0)(uae_u32 opcode) /* RESET.L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel903; } +{}}m68k_incpc(2); +endlabel903: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e71_0)(uae_u32 opcode) /* NOP.L */ +{ + cpuop_begin(); +{}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4e72_0)(uae_u32 opcode) /* STOP.L #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel905; } +{{ uae_s16 src = get_iword(2); + regs.sr = src; + MakeFromSR(); + m68k_setstopped(1); +}}}m68k_incpc(4); +endlabel905: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4e73_0)(uae_u32 opcode) /* RTE.L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel906; } +{ uae_u16 newsr; uae_u32 newpc; for (;;) { +{ uaecptr sra = m68k_areg(regs, 7); +{ uae_s16 sr = get_word(sra); + m68k_areg(regs, 7) += 2; +{ uaecptr pca = m68k_areg(regs, 7); +{ uae_s32 pc = get_long(pca); + m68k_areg(regs, 7) += 4; +{ uaecptr formata = m68k_areg(regs, 7); +{ uae_s16 format = get_word(formata); + m68k_areg(regs, 7) += 2; + newsr = sr; newpc = pc; + if ((format & 0xF000) == 0x0000) { break; } + else if ((format & 0xF000) == 0x1000) { ; } + else if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; } + else if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; } + else if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; } + else if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; } + else if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; } + else if ((format & 0xF000) == 0xa000) { m68k_areg(regs, 7) += 24; break; } + else if ((format & 0xF000) == 0xb000) { m68k_areg(regs, 7) += 84; break; } + else { Exception(14,0); goto endlabel906; } + regs.sr = newsr; MakeFromSR(); +} +}}}}}} regs.sr = newsr; MakeFromSR(); + m68k_setpc_rte(newpc); +}}endlabel906: ; + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e74_0)(uae_u32 opcode) /* RTD.L #.W */ +{ + cpuop_begin(); +{{ uaecptr pca = m68k_areg(regs, 7); +{ uae_s32 pc = get_long(pca); + m68k_areg(regs, 7) += 4; +{ uae_s16 offs = get_iword(2); + m68k_areg(regs, 7) += offs; + m68k_setpc_rte(pc); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e75_0)(uae_u32 opcode) /* RTS.L */ +{ + cpuop_begin(); +{ m68k_do_rts(); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e76_0)(uae_u32 opcode) /* TRAPV.L */ +{ + cpuop_begin(); +{m68k_incpc(2); + if (GET_VFLG) { Exception(7,m68k_getpc()); goto endlabel909; } +}endlabel909: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4e77_0)(uae_u32 opcode) /* RTR.L */ +{ + cpuop_begin(); +{ MakeSR(); +{ uaecptr sra = m68k_areg(regs, 7); +{ uae_s16 sr = get_word(sra); + m68k_areg(regs, 7) += 2; +{ uaecptr pca = m68k_areg(regs, 7); +{ uae_s32 pc = get_long(pca); + m68k_areg(regs, 7) += 4; + regs.sr &= 0xFF00; sr &= 0xFF; + regs.sr |= sr; m68k_setpc(pc); + MakeFromSR(); +}}}}} cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e7a_0)(uae_u32 opcode) /* MOVEC2.L #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel911; } +{{ uae_s16 src = get_iword(2); +{ int regno = (src >> 12) & 15; + uae_u32 *regp = regs.regs + regno; + if (! m68k_movec2(src & 0xFFF, regp)) goto endlabel911; +}}}}m68k_incpc(4); +endlabel911: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e7b_0)(uae_u32 opcode) /* MOVE2C.L #.W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel912; } +{{ uae_s16 src = get_iword(2); +{ int regno = (src >> 12) & 15; + uae_u32 *regp = regs.regs + regno; + if (! m68k_move2c(src & 0xFFF, regp)) goto endlabel912; +}}}}m68k_incpc(4); +endlabel912: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4e90_0)(uae_u32 opcode) /* JSR.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_do_jsr(m68k_getpc() + 2, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ea8_0)(uae_u32 opcode) /* JSR.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + m68k_do_jsr(m68k_getpc() + 4, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4eb0_0)(uae_u32 opcode) /* JSR.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + m68k_do_jsr(m68k_getpc() + 0, srca); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4eb8_0)(uae_u32 opcode) /* JSR.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + m68k_do_jsr(m68k_getpc() + 4, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4eb9_0)(uae_u32 opcode) /* JSR.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + m68k_do_jsr(m68k_getpc() + 6, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4eba_0)(uae_u32 opcode) /* JSR.L (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); + m68k_do_jsr(m68k_getpc() + 4, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ebb_0)(uae_u32 opcode) /* JSR.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); + m68k_do_jsr(m68k_getpc() + 0, srca); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ed0_0)(uae_u32 opcode) /* JMP.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ee8_0)(uae_u32 opcode) /* JMP.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ef0_0)(uae_u32 opcode) /* JMP.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); + m68k_setpc(srca); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ef8_0)(uae_u32 opcode) /* JMP.L (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ef9_0)(uae_u32 opcode) /* JMP.L (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4efa_0)(uae_u32 opcode) /* JMP.L (d16,PC) */ +{ + cpuop_begin(); +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4efb_0)(uae_u32 opcode) /* JMP.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); + m68k_setpc(srca); +}}} cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5000_0)(uae_u32 opcode) /* ADD.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5010_0)(uae_u32 opcode) /* ADD.B #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5018_0)(uae_u32 opcode) /* ADD.B #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5020_0)(uae_u32 opcode) /* ADD.B #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5028_0)(uae_u32 opcode) /* ADD.B #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5030_0)(uae_u32 opcode) /* ADD.B #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5038_0)(uae_u32 opcode) /* ADD.B #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5039_0)(uae_u32 opcode) /* ADD.B #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +#endif + +#ifdef PART_5 +void REGPARAM2 CPUFUNC(op_5040_0)(uae_u32 opcode) /* ADD.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5048_0)(uae_u32 opcode) /* ADDA.W #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5050_0)(uae_u32 opcode) /* ADD.W #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5058_0)(uae_u32 opcode) /* ADD.W #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5060_0)(uae_u32 opcode) /* ADD.W #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5068_0)(uae_u32 opcode) /* ADD.W #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5070_0)(uae_u32 opcode) /* ADD.W #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5078_0)(uae_u32 opcode) /* ADD.W #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5079_0)(uae_u32 opcode) /* ADD.W #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5080_0)(uae_u32 opcode) /* ADD.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5088_0)(uae_u32 opcode) /* ADDA.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5090_0)(uae_u32 opcode) /* ADD.L #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5098_0)(uae_u32 opcode) /* ADD.L #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50a0_0)(uae_u32 opcode) /* ADD.L #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50a8_0)(uae_u32 opcode) /* ADD.L #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50b0_0)(uae_u32 opcode) /* ADD.L #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50b8_0)(uae_u32 opcode) /* ADD.L #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50b9_0)(uae_u32 opcode) /* ADD.L #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(0) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(0)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel954: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel962; } +}}m68k_incpc(4); +endlabel962: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel963; } +}}m68k_incpc(6); +endlabel963: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel964; } +}m68k_incpc(2); +endlabel964: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5100_0)(uae_u32 opcode) /* SUB.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5110_0)(uae_u32 opcode) /* SUB.B #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5118_0)(uae_u32 opcode) /* SUB.B #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5120_0)(uae_u32 opcode) /* SUB.B #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5128_0)(uae_u32 opcode) /* SUB.B #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5130_0)(uae_u32 opcode) /* SUB.B #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5138_0)(uae_u32 opcode) /* SUB.B #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5139_0)(uae_u32 opcode) /* SUB.B #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5140_0)(uae_u32 opcode) /* SUB.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5148_0)(uae_u32 opcode) /* SUBA.W #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5150_0)(uae_u32 opcode) /* SUB.W #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5158_0)(uae_u32 opcode) /* SUB.W #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5160_0)(uae_u32 opcode) /* SUB.W #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5168_0)(uae_u32 opcode) /* SUB.W #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5170_0)(uae_u32 opcode) /* SUB.W #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5178_0)(uae_u32 opcode) /* SUB.W #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5179_0)(uae_u32 opcode) /* SUB.W #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5180_0)(uae_u32 opcode) /* SUB.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5188_0)(uae_u32 opcode) /* SUBA.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5190_0)(uae_u32 opcode) /* SUB.L #,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5198_0)(uae_u32 opcode) /* SUB.L #,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51a0_0)(uae_u32 opcode) /* SUB.L #,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51a8_0)(uae_u32 opcode) /* SUB.L #,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51b0_0)(uae_u32 opcode) /* SUB.L #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51b8_0)(uae_u32 opcode) /* SUB.L #,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51b9_0)(uae_u32 opcode) /* SUB.L #,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(1) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(1)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel992: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1000; } +}}m68k_incpc(4); +endlabel1000: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1001; } +}}m68k_incpc(6); +endlabel1001: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1002; } +}m68k_incpc(2); +endlabel1002: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(2) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(2)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1004: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1012; } +}}m68k_incpc(4); +endlabel1012: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1013; } +}}m68k_incpc(6); +endlabel1013: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1014; } +}m68k_incpc(2); +endlabel1014: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(3) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(3)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1016: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1024; } +}}m68k_incpc(4); +endlabel1024: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1025; } +}}m68k_incpc(6); +endlabel1025: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1026; } +}m68k_incpc(2); +endlabel1026: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(4) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(4)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1028: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1036; } +}}m68k_incpc(4); +endlabel1036: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1037; } +}}m68k_incpc(6); +endlabel1037: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1038; } +}m68k_incpc(2); +endlabel1038: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(5) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(5)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1040: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1048; } +}}m68k_incpc(4); +endlabel1048: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1049; } +}}m68k_incpc(6); +endlabel1049: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1050; } +}m68k_incpc(2); +endlabel1050: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(6) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(6)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1052: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1060; } +}}m68k_incpc(4); +endlabel1060: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1061; } +}}m68k_incpc(6); +endlabel1061: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1062; } +}m68k_incpc(2); +endlabel1062: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(7) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(7)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1064: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1072; } +}}m68k_incpc(4); +endlabel1072: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1073; } +}}m68k_incpc(6); +endlabel1073: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1074; } +}m68k_incpc(2); +endlabel1074: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(8) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(8)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1076: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1084; } +}}m68k_incpc(4); +endlabel1084: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1085; } +}}m68k_incpc(6); +endlabel1085: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1086; } +}m68k_incpc(2); +endlabel1086: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59c0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(9) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(9)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1088: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59d0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59e0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1096; } +}}m68k_incpc(4); +endlabel1096: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1097; } +}}m68k_incpc(6); +endlabel1097: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59fc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1098; } +}m68k_incpc(2); +endlabel1098: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ac0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(10) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ac8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(10)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1100: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ad0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ad8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ae0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ae8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5af0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5af8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5af9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5afa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1108; } +}}m68k_incpc(4); +endlabel1108: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5afb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1109; } +}}m68k_incpc(6); +endlabel1109: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5afc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1110; } +}m68k_incpc(2); +endlabel1110: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bc0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(11) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(11)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1112: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bd0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5be0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5be8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bf0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bf8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bf9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1120; } +}}m68k_incpc(4); +endlabel1120: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1121; } +}}m68k_incpc(6); +endlabel1121: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bfc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1122; } +}m68k_incpc(2); +endlabel1122: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cc0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(12) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(12)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1124: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cd0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ce0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ce8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cf0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cf8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cf9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1132; } +}}m68k_incpc(4); +endlabel1132: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1133; } +}}m68k_incpc(6); +endlabel1133: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cfc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1134; } +}m68k_incpc(2); +endlabel1134: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dc0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(13) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(13)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1136: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dd0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5de0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5de8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5df0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5df8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5df9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1144; } +}}m68k_incpc(4); +endlabel1144: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1145; } +}}m68k_incpc(6); +endlabel1145: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5dfc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1146; } +}m68k_incpc(2); +endlabel1146: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ec0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(14) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ec8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(14)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1148: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ed0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ed8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ee0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ee8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ef0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ef8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ef9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5efa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1156; } +}}m68k_incpc(4); +endlabel1156: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5efb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1157; } +}}m68k_incpc(6); +endlabel1157: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5efc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1158; } +}m68k_incpc(2); +endlabel1158: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fc0_0)(uae_u32 opcode) /* Scc.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{{ int val = cctrue(15) ? 0xff : 0; + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 offs = get_iword(2); + if (!cctrue(15)) { + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); + if (src) { + m68k_incpc((uae_s32)offs + 2); +return; + } + } +}}}m68k_incpc(4); +endlabel1160: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fd0_0)(uae_u32 opcode) /* Scc.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fe0_0)(uae_u32 opcode) /* Scc.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; + m68k_areg (regs, srcreg) = srca; +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5fe8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ff0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ff8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ff9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#endif + +#ifdef PART_6 +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ffa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ +{ + cpuop_begin(); +{{ uae_s16 dummy = get_iword(2); + if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1168; } +}}m68k_incpc(4); +endlabel1168: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ffb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 dummy = get_ilong(2); + if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1169; } +}}m68k_incpc(6); +endlabel1169: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ffc_0)(uae_u32 opcode) /* TRAPcc.L */ +{ + cpuop_begin(); +{ if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1170; } +}m68k_incpc(2); +endlabel1170: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6000_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(0)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1171: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6001_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(0)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1172: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_60ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(0)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1173: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6100_0)(uae_u32 opcode) /* BSR.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + uae_s32 s = (uae_s32)src + 2; + m68k_do_bsr(m68k_getpc() + 4, s); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6101_0)(uae_u32 opcode) /* BSR.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + uae_s32 s = (uae_s32)src + 2; + m68k_do_bsr(m68k_getpc() + 2, s); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_61ff_0)(uae_u32 opcode) /* BSR.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + uae_s32 s = (uae_s32)src + 2; + m68k_do_bsr(m68k_getpc() + 6, s); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6200_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(2)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1177: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6201_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(2)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1178: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_62ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(2)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1179: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6300_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(3)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1180: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6301_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(3)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1181: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_63ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(3)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1182: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6400_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(4)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1183: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6401_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(4)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1184: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_64ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(4)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1185: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6500_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(5)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1186: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6501_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(5)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1187: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_65ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(5)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1188: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6600_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(6)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1189: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6601_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(6)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1190: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_66ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(6)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1191: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6700_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(7)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1192: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6701_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(7)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1193: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_67ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(7)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1194: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6800_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(8)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1195: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6801_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(8)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1196: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_68ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(8)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1197: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6900_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(9)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1198: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6901_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(9)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1199: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_69ff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(9)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1200: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6a00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(10)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1201: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6a01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(10)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1202: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6aff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(10)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1203: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6b00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(11)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1204: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6b01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(11)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1205: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6bff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(11)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1206: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6c00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(12)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1207: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6c01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(12)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1208: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6cff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(12)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1209: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6d00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(13)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1210: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6d01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(13)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1211: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6dff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(13)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1212: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6e00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(14)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1213: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6e01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(14)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1214: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6eff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(14)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1215: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6f00_0)(uae_u32 opcode) /* Bcc.W #.W */ +{ + cpuop_begin(); +{{ uae_s16 src = get_iword(2); + if (!cctrue(15)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(4); +endlabel1216: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6f01_0)(uae_u32 opcode) /* Bcc.B # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +{{ uae_u32 src = srcreg; + if (!cctrue(15)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(2); +endlabel1217: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6fff_0)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{{ uae_s32 src = get_ilong(2); + if (!cctrue(15)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel1218: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_7000_0)(uae_u32 opcode) /* MOVE.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_u32 src = srcreg; +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_7100_0)(uae_u32 opcode) /* EMULOP_RETURN.L */ +{ + cpuop_begin(); +{ m68k_emulop_return(); +} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_7101_0)(uae_u32 opcode) /* EMULOP.L # */ +{ + cpuop_begin(); +{ +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + m68k_emulop(opcode); +}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_8000_0)(uae_u32 opcode) /* OR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8010_0)(uae_u32 opcode) /* OR.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8018_0)(uae_u32 opcode) /* OR.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8020_0)(uae_u32 opcode) /* OR.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8028_0)(uae_u32 opcode) /* OR.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8030_0)(uae_u32 opcode) /* OR.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8038_0)(uae_u32 opcode) /* OR.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8039_0)(uae_u32 opcode) /* OR.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_803a_0)(uae_u32 opcode) /* OR.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_803b_0)(uae_u32 opcode) /* OR.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_803c_0)(uae_u32 opcode) /* OR.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8040_0)(uae_u32 opcode) /* OR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8050_0)(uae_u32 opcode) /* OR.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8058_0)(uae_u32 opcode) /* OR.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8060_0)(uae_u32 opcode) /* OR.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8068_0)(uae_u32 opcode) /* OR.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8070_0)(uae_u32 opcode) /* OR.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8078_0)(uae_u32 opcode) /* OR.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8079_0)(uae_u32 opcode) /* OR.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_807a_0)(uae_u32 opcode) /* OR.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_807b_0)(uae_u32 opcode) /* OR.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_807c_0)(uae_u32 opcode) /* OR.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8080_0)(uae_u32 opcode) /* OR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8090_0)(uae_u32 opcode) /* OR.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8098_0)(uae_u32 opcode) /* OR.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80a0_0)(uae_u32 opcode) /* OR.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80a8_0)(uae_u32 opcode) /* OR.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80b0_0)(uae_u32 opcode) /* OR.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80b8_0)(uae_u32 opcode) /* OR.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80b9_0)(uae_u32 opcode) /* OR.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80ba_0)(uae_u32 opcode) /* OR.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80bb_0)(uae_u32 opcode) /* OR.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80bc_0)(uae_u32 opcode) /* OR.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80c0_0)(uae_u32 opcode) /* DIVU.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1255; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}endlabel1255: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80d0_0)(uae_u32 opcode) /* DIVU.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1256; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1256: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80d8_0)(uae_u32 opcode) /* DIVU.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1257; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1257: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80e0_0)(uae_u32 opcode) /* DIVU.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1258; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1258: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80e8_0)(uae_u32 opcode) /* DIVU.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1259; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1259: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80f0_0)(uae_u32 opcode) /* DIVU.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1260; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}}endlabel1260: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80f8_0)(uae_u32 opcode) /* DIVU.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1261; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1261: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80f9_0)(uae_u32 opcode) /* DIVU.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(6); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1262; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1262: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80fa_0)(uae_u32 opcode) /* DIVU.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1263; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1263: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80fb_0)(uae_u32 opcode) /* DIVU.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1264; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}}endlabel1264: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80fc_0)(uae_u32 opcode) /* DIVU.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1265; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}endlabel1265: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8100_0)(uae_u32 opcode) /* SBCD.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); + uae_u16 newv, tmp_newv; + int bcd = 0; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; + if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } + SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8108_0)(uae_u32 opcode) /* SBCD.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); + uae_u16 newv, tmp_newv; + int bcd = 0; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; + if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } + SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(dsta,newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8110_0)(uae_u32 opcode) /* OR.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8118_0)(uae_u32 opcode) /* OR.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8120_0)(uae_u32 opcode) /* OR.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8128_0)(uae_u32 opcode) /* OR.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8130_0)(uae_u32 opcode) /* OR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8138_0)(uae_u32 opcode) /* OR.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8139_0)(uae_u32 opcode) /* OR.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_8140_0)(uae_u32 opcode) /* PACK.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uae_u16 val = m68k_dreg(regs, srcreg) + get_iword(2); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf); +}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_8148_0)(uae_u32 opcode) /* PACK.L -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uae_u16 val; + m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; + val = (uae_u16)get_byte(m68k_areg(regs, srcreg)); + m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; + val = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + get_iword(2); + m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; + put_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf)); +}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_8150_0)(uae_u32 opcode) /* OR.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8158_0)(uae_u32 opcode) /* OR.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8160_0)(uae_u32 opcode) /* OR.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8168_0)(uae_u32 opcode) /* OR.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8170_0)(uae_u32 opcode) /* OR.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8178_0)(uae_u32 opcode) /* OR.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8179_0)(uae_u32 opcode) /* OR.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_8180_0)(uae_u32 opcode) /* UNPK.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uae_u16 val = m68k_dreg(regs, srcreg); + val = (((val << 4) & 0xf00) | (val & 0xf)) + get_iword(2); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff); +}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_8188_0)(uae_u32 opcode) /* UNPK.L -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uae_u16 val; + m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; + val = (uae_u16)get_byte(m68k_areg(regs, srcreg)); + val = (((val << 4) & 0xf00) | (val & 0xf)) + get_iword(2); + m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; + put_byte(m68k_areg(regs, dstreg),val); + m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; + put_byte(m68k_areg(regs, dstreg),val >> 8); +}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_8190_0)(uae_u32 opcode) /* OR.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8198_0)(uae_u32 opcode) /* OR.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81a0_0)(uae_u32 opcode) /* OR.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81a8_0)(uae_u32 opcode) /* OR.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81b0_0)(uae_u32 opcode) /* OR.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81b8_0)(uae_u32 opcode) /* OR.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81b9_0)(uae_u32 opcode) /* OR.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81c0_0)(uae_u32 opcode) /* DIVS.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1293; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}endlabel1293: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81d0_0)(uae_u32 opcode) /* DIVS.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1294; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1294: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81d8_0)(uae_u32 opcode) /* DIVS.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1295; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1295: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81e0_0)(uae_u32 opcode) /* DIVS.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(2); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1296; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1296: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81e8_0)(uae_u32 opcode) /* DIVS.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1297; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1297: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81f0_0)(uae_u32 opcode) /* DIVS.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1298; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}}endlabel1298: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81f8_0)(uae_u32 opcode) /* DIVS.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1299; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1299: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81f9_0)(uae_u32 opcode) /* DIVS.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(6); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1300; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1300: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81fa_0)(uae_u32 opcode) /* DIVS.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1301; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel1301: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81fb_0)(uae_u32 opcode) /* DIVS.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1302; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}}endlabel1302: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81fc_0)(uae_u32 opcode) /* DIVS.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1303; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}endlabel1303: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9000_0)(uae_u32 opcode) /* SUB.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9010_0)(uae_u32 opcode) /* SUB.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9018_0)(uae_u32 opcode) /* SUB.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9020_0)(uae_u32 opcode) /* SUB.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9028_0)(uae_u32 opcode) /* SUB.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9030_0)(uae_u32 opcode) /* SUB.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9038_0)(uae_u32 opcode) /* SUB.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9039_0)(uae_u32 opcode) /* SUB.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_903a_0)(uae_u32 opcode) /* SUB.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_903b_0)(uae_u32 opcode) /* SUB.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_903c_0)(uae_u32 opcode) /* SUB.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9040_0)(uae_u32 opcode) /* SUB.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9048_0)(uae_u32 opcode) /* SUB.W An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9050_0)(uae_u32 opcode) /* SUB.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9058_0)(uae_u32 opcode) /* SUB.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9060_0)(uae_u32 opcode) /* SUB.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9068_0)(uae_u32 opcode) /* SUB.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9070_0)(uae_u32 opcode) /* SUB.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9078_0)(uae_u32 opcode) /* SUB.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9079_0)(uae_u32 opcode) /* SUB.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_907a_0)(uae_u32 opcode) /* SUB.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_907b_0)(uae_u32 opcode) /* SUB.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_907c_0)(uae_u32 opcode) /* SUB.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9080_0)(uae_u32 opcode) /* SUB.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9088_0)(uae_u32 opcode) /* SUB.L An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9090_0)(uae_u32 opcode) /* SUB.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9098_0)(uae_u32 opcode) /* SUB.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90a0_0)(uae_u32 opcode) /* SUB.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90a8_0)(uae_u32 opcode) /* SUB.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90b0_0)(uae_u32 opcode) /* SUB.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90b8_0)(uae_u32 opcode) /* SUB.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90b9_0)(uae_u32 opcode) /* SUB.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90ba_0)(uae_u32 opcode) /* SUB.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90bb_0)(uae_u32 opcode) /* SUB.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90bc_0)(uae_u32 opcode) /* SUB.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90c0_0)(uae_u32 opcode) /* SUBA.W Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90c8_0)(uae_u32 opcode) /* SUBA.W An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90d0_0)(uae_u32 opcode) /* SUBA.W (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90d8_0)(uae_u32 opcode) /* SUBA.W (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90e0_0)(uae_u32 opcode) /* SUBA.W -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90e8_0)(uae_u32 opcode) /* SUBA.W (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90f0_0)(uae_u32 opcode) /* SUBA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90f8_0)(uae_u32 opcode) /* SUBA.W (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90f9_0)(uae_u32 opcode) /* SUBA.W (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90fa_0)(uae_u32 opcode) /* SUBA.W (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90fb_0)(uae_u32 opcode) /* SUBA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90fc_0)(uae_u32 opcode) /* SUBA.W #.W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_9100_0)(uae_u32 opcode) /* SUBX.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9108_0)(uae_u32 opcode) /* SUBX.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9110_0)(uae_u32 opcode) /* SUB.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9118_0)(uae_u32 opcode) /* SUB.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9120_0)(uae_u32 opcode) /* SUB.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9128_0)(uae_u32 opcode) /* SUB.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9130_0)(uae_u32 opcode) /* SUB.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9138_0)(uae_u32 opcode) /* SUB.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9139_0)(uae_u32 opcode) /* SUB.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9140_0)(uae_u32 opcode) /* SUBX.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9148_0)(uae_u32 opcode) /* SUBX.W -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9150_0)(uae_u32 opcode) /* SUB.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9158_0)(uae_u32 opcode) /* SUB.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9160_0)(uae_u32 opcode) /* SUB.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9168_0)(uae_u32 opcode) /* SUB.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9170_0)(uae_u32 opcode) /* SUB.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9178_0)(uae_u32 opcode) /* SUB.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9179_0)(uae_u32 opcode) /* SUB.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9180_0)(uae_u32 opcode) /* SUBX.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9188_0)(uae_u32 opcode) /* SUBX.L -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9190_0)(uae_u32 opcode) /* SUB.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9198_0)(uae_u32 opcode) /* SUB.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91a0_0)(uae_u32 opcode) /* SUB.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91a8_0)(uae_u32 opcode) /* SUB.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91b0_0)(uae_u32 opcode) /* SUB.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91b8_0)(uae_u32 opcode) /* SUB.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91b9_0)(uae_u32 opcode) /* SUB.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91c0_0)(uae_u32 opcode) /* SUBA.L Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91c8_0)(uae_u32 opcode) /* SUBA.L An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91d0_0)(uae_u32 opcode) /* SUBA.L (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91d8_0)(uae_u32 opcode) /* SUBA.L (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91e0_0)(uae_u32 opcode) /* SUBA.L -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91e8_0)(uae_u32 opcode) /* SUBA.L (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91f0_0)(uae_u32 opcode) /* SUBA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91f8_0)(uae_u32 opcode) /* SUBA.L (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91f9_0)(uae_u32 opcode) /* SUBA.L (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91fa_0)(uae_u32 opcode) /* SUBA.L (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91fb_0)(uae_u32 opcode) /* SUBA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91fc_0)(uae_u32 opcode) /* SUBA.L #.L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_b000_0)(uae_u32 opcode) /* CMP.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b010_0)(uae_u32 opcode) /* CMP.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b018_0)(uae_u32 opcode) /* CMP.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b020_0)(uae_u32 opcode) /* CMP.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b028_0)(uae_u32 opcode) /* CMP.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b030_0)(uae_u32 opcode) /* CMP.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b038_0)(uae_u32 opcode) /* CMP.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b039_0)(uae_u32 opcode) /* CMP.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b03a_0)(uae_u32 opcode) /* CMP.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b03b_0)(uae_u32 opcode) /* CMP.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b03c_0)(uae_u32 opcode) /* CMP.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b040_0)(uae_u32 opcode) /* CMP.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#endif + +#ifdef PART_7 +void REGPARAM2 CPUFUNC(op_b048_0)(uae_u32 opcode) /* CMP.W An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b050_0)(uae_u32 opcode) /* CMP.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b058_0)(uae_u32 opcode) /* CMP.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b060_0)(uae_u32 opcode) /* CMP.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b068_0)(uae_u32 opcode) /* CMP.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b070_0)(uae_u32 opcode) /* CMP.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b078_0)(uae_u32 opcode) /* CMP.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b079_0)(uae_u32 opcode) /* CMP.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b07a_0)(uae_u32 opcode) /* CMP.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b07b_0)(uae_u32 opcode) /* CMP.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b07c_0)(uae_u32 opcode) /* CMP.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b080_0)(uae_u32 opcode) /* CMP.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b088_0)(uae_u32 opcode) /* CMP.L An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b090_0)(uae_u32 opcode) /* CMP.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b098_0)(uae_u32 opcode) /* CMP.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0a0_0)(uae_u32 opcode) /* CMP.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0a8_0)(uae_u32 opcode) /* CMP.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0b0_0)(uae_u32 opcode) /* CMP.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0b8_0)(uae_u32 opcode) /* CMP.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0b9_0)(uae_u32 opcode) /* CMP.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0ba_0)(uae_u32 opcode) /* CMP.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0bb_0)(uae_u32 opcode) /* CMP.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0bc_0)(uae_u32 opcode) /* CMP.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0c0_0)(uae_u32 opcode) /* CMPA.W Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0c8_0)(uae_u32 opcode) /* CMPA.W An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0d0_0)(uae_u32 opcode) /* CMPA.W (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0d8_0)(uae_u32 opcode) /* CMPA.W (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0e0_0)(uae_u32 opcode) /* CMPA.W -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0e8_0)(uae_u32 opcode) /* CMPA.W (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0f0_0)(uae_u32 opcode) /* CMPA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0f8_0)(uae_u32 opcode) /* CMPA.W (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0f9_0)(uae_u32 opcode) /* CMPA.W (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0fa_0)(uae_u32 opcode) /* CMPA.W (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0fb_0)(uae_u32 opcode) /* CMPA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0fc_0)(uae_u32 opcode) /* CMPA.W #.W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b100_0)(uae_u32 opcode) /* EOR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b108_0)(uae_u32 opcode) /* CMPM.B (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b110_0)(uae_u32 opcode) /* EOR.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b118_0)(uae_u32 opcode) /* EOR.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b120_0)(uae_u32 opcode) /* EOR.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b128_0)(uae_u32 opcode) /* EOR.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b130_0)(uae_u32 opcode) /* EOR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b138_0)(uae_u32 opcode) /* EOR.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b139_0)(uae_u32 opcode) /* EOR.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b140_0)(uae_u32 opcode) /* EOR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b148_0)(uae_u32 opcode) /* CMPM.W (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b150_0)(uae_u32 opcode) /* EOR.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b158_0)(uae_u32 opcode) /* EOR.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b160_0)(uae_u32 opcode) /* EOR.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b168_0)(uae_u32 opcode) /* EOR.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b170_0)(uae_u32 opcode) /* EOR.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b178_0)(uae_u32 opcode) /* EOR.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b179_0)(uae_u32 opcode) /* EOR.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b180_0)(uae_u32 opcode) /* EOR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b188_0)(uae_u32 opcode) /* CMPM.L (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b190_0)(uae_u32 opcode) /* EOR.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b198_0)(uae_u32 opcode) /* EOR.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1a0_0)(uae_u32 opcode) /* EOR.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1a8_0)(uae_u32 opcode) /* EOR.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1b0_0)(uae_u32 opcode) /* EOR.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1b8_0)(uae_u32 opcode) /* EOR.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1b9_0)(uae_u32 opcode) /* EOR.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1c0_0)(uae_u32 opcode) /* CMPA.L Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1c8_0)(uae_u32 opcode) /* CMPA.L An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1d0_0)(uae_u32 opcode) /* CMPA.L (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1d8_0)(uae_u32 opcode) /* CMPA.L (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1e0_0)(uae_u32 opcode) /* CMPA.L -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1e8_0)(uae_u32 opcode) /* CMPA.L (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1f0_0)(uae_u32 opcode) /* CMPA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1f8_0)(uae_u32 opcode) /* CMPA.L (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1f9_0)(uae_u32 opcode) /* CMPA.L (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1fa_0)(uae_u32 opcode) /* CMPA.L (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1fb_0)(uae_u32 opcode) /* CMPA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1fc_0)(uae_u32 opcode) /* CMPA.L #.L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c000_0)(uae_u32 opcode) /* AND.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c010_0)(uae_u32 opcode) /* AND.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c018_0)(uae_u32 opcode) /* AND.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c020_0)(uae_u32 opcode) /* AND.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c028_0)(uae_u32 opcode) /* AND.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c030_0)(uae_u32 opcode) /* AND.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c038_0)(uae_u32 opcode) /* AND.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c039_0)(uae_u32 opcode) /* AND.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c03a_0)(uae_u32 opcode) /* AND.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c03b_0)(uae_u32 opcode) /* AND.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c03c_0)(uae_u32 opcode) /* AND.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c040_0)(uae_u32 opcode) /* AND.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c050_0)(uae_u32 opcode) /* AND.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c058_0)(uae_u32 opcode) /* AND.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c060_0)(uae_u32 opcode) /* AND.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c068_0)(uae_u32 opcode) /* AND.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c070_0)(uae_u32 opcode) /* AND.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c078_0)(uae_u32 opcode) /* AND.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c079_0)(uae_u32 opcode) /* AND.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c07a_0)(uae_u32 opcode) /* AND.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c07b_0)(uae_u32 opcode) /* AND.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c07c_0)(uae_u32 opcode) /* AND.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c080_0)(uae_u32 opcode) /* AND.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c090_0)(uae_u32 opcode) /* AND.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c098_0)(uae_u32 opcode) /* AND.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0a0_0)(uae_u32 opcode) /* AND.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0a8_0)(uae_u32 opcode) /* AND.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0b0_0)(uae_u32 opcode) /* AND.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0b8_0)(uae_u32 opcode) /* AND.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0b9_0)(uae_u32 opcode) /* AND.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0ba_0)(uae_u32 opcode) /* AND.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0bb_0)(uae_u32 opcode) /* AND.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0bc_0)(uae_u32 opcode) /* AND.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0c0_0)(uae_u32 opcode) /* MULU.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0d0_0)(uae_u32 opcode) /* MULU.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0d8_0)(uae_u32 opcode) /* MULU.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0e0_0)(uae_u32 opcode) /* MULU.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0e8_0)(uae_u32 opcode) /* MULU.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0f0_0)(uae_u32 opcode) /* MULU.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0f8_0)(uae_u32 opcode) /* MULU.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0f9_0)(uae_u32 opcode) /* MULU.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0fa_0)(uae_u32 opcode) /* MULU.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0fb_0)(uae_u32 opcode) /* MULU.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0fc_0)(uae_u32 opcode) /* MULU.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c100_0)(uae_u32 opcode) /* ABCD.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); + uae_u16 newv, tmp_newv; + int cflg; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo > 9) { newv += 6; } + cflg = (newv & 0x3F0) > 0x90; + if (cflg) newv += 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c108_0)(uae_u32 opcode) /* ABCD.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); + uae_u16 newv, tmp_newv; + int cflg; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo > 9) { newv += 6; } + cflg = (newv & 0x3F0) > 0x90; + if (cflg) newv += 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + put_byte(dsta,newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c110_0)(uae_u32 opcode) /* AND.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c118_0)(uae_u32 opcode) /* AND.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c120_0)(uae_u32 opcode) /* AND.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c128_0)(uae_u32 opcode) /* AND.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c130_0)(uae_u32 opcode) /* AND.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c138_0)(uae_u32 opcode) /* AND.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c139_0)(uae_u32 opcode) /* AND.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_c140_0)(uae_u32 opcode) /* EXG.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + m68k_dreg(regs, srcreg) = (dst); + m68k_dreg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_c148_0)(uae_u32 opcode) /* EXG.L An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); + m68k_areg(regs, srcreg) = (dst); + m68k_areg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_c150_0)(uae_u32 opcode) /* AND.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c158_0)(uae_u32 opcode) /* AND.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c160_0)(uae_u32 opcode) /* AND.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c168_0)(uae_u32 opcode) /* AND.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c170_0)(uae_u32 opcode) /* AND.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c178_0)(uae_u32 opcode) /* AND.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c179_0)(uae_u32 opcode) /* AND.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_c188_0)(uae_u32 opcode) /* EXG.L Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); + m68k_dreg(regs, srcreg) = (dst); + m68k_areg(regs, dstreg) = (src); +}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_c190_0)(uae_u32 opcode) /* AND.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c198_0)(uae_u32 opcode) /* AND.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1a0_0)(uae_u32 opcode) /* AND.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1a8_0)(uae_u32 opcode) /* AND.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1b0_0)(uae_u32 opcode) /* AND.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1b8_0)(uae_u32 opcode) /* AND.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1b9_0)(uae_u32 opcode) /* AND.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1c0_0)(uae_u32 opcode) /* MULS.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1d0_0)(uae_u32 opcode) /* MULS.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1d8_0)(uae_u32 opcode) /* MULS.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1e0_0)(uae_u32 opcode) /* MULS.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1e8_0)(uae_u32 opcode) /* MULS.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1f0_0)(uae_u32 opcode) /* MULS.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1f8_0)(uae_u32 opcode) /* MULS.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1f9_0)(uae_u32 opcode) /* MULS.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1fa_0)(uae_u32 opcode) /* MULS.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1fb_0)(uae_u32 opcode) /* MULS.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1fc_0)(uae_u32 opcode) /* MULS.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d000_0)(uae_u32 opcode) /* ADD.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d010_0)(uae_u32 opcode) /* ADD.B (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d018_0)(uae_u32 opcode) /* ADD.B (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d020_0)(uae_u32 opcode) /* ADD.B -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d028_0)(uae_u32 opcode) /* ADD.B (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d030_0)(uae_u32 opcode) /* ADD.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d038_0)(uae_u32 opcode) /* ADD.B (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d039_0)(uae_u32 opcode) /* ADD.B (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d03a_0)(uae_u32 opcode) /* ADD.B (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d03b_0)(uae_u32 opcode) /* ADD.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d03c_0)(uae_u32 opcode) /* ADD.B #.B,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d040_0)(uae_u32 opcode) /* ADD.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d048_0)(uae_u32 opcode) /* ADD.W An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d050_0)(uae_u32 opcode) /* ADD.W (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d058_0)(uae_u32 opcode) /* ADD.W (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d060_0)(uae_u32 opcode) /* ADD.W -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d068_0)(uae_u32 opcode) /* ADD.W (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d070_0)(uae_u32 opcode) /* ADD.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d078_0)(uae_u32 opcode) /* ADD.W (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d079_0)(uae_u32 opcode) /* ADD.W (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d07a_0)(uae_u32 opcode) /* ADD.W (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d07b_0)(uae_u32 opcode) /* ADD.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d07c_0)(uae_u32 opcode) /* ADD.W #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d080_0)(uae_u32 opcode) /* ADD.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d088_0)(uae_u32 opcode) /* ADD.L An,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d090_0)(uae_u32 opcode) /* ADD.L (An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d098_0)(uae_u32 opcode) /* ADD.L (An)+,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0a0_0)(uae_u32 opcode) /* ADD.L -(An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0a8_0)(uae_u32 opcode) /* ADD.L (d16,An),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0b0_0)(uae_u32 opcode) /* ADD.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0b8_0)(uae_u32 opcode) /* ADD.L (xxx).W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0b9_0)(uae_u32 opcode) /* ADD.L (xxx).L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0ba_0)(uae_u32 opcode) /* ADD.L (d16,PC),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0bb_0)(uae_u32 opcode) /* ADD.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0bc_0)(uae_u32 opcode) /* ADD.L #.L,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0c0_0)(uae_u32 opcode) /* ADDA.W Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0c8_0)(uae_u32 opcode) /* ADDA.W An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0d0_0)(uae_u32 opcode) /* ADDA.W (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0d8_0)(uae_u32 opcode) /* ADDA.W (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0e0_0)(uae_u32 opcode) /* ADDA.W -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0e8_0)(uae_u32 opcode) /* ADDA.W (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0f0_0)(uae_u32 opcode) /* ADDA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0f8_0)(uae_u32 opcode) /* ADDA.W (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0f9_0)(uae_u32 opcode) /* ADDA.W (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0fa_0)(uae_u32 opcode) /* ADDA.W (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0fb_0)(uae_u32 opcode) /* ADDA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0fc_0)(uae_u32 opcode) /* ADDA.W #.W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_d100_0)(uae_u32 opcode) /* ADDX.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d108_0)(uae_u32 opcode) /* ADDX.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d110_0)(uae_u32 opcode) /* ADD.B Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d118_0)(uae_u32 opcode) /* ADD.B Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s8 dst = get_byte(dsta); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d120_0)(uae_u32 opcode) /* ADD.B Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d128_0)(uae_u32 opcode) /* ADD.B Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d130_0)(uae_u32 opcode) /* ADD.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d138_0)(uae_u32 opcode) /* ADD.B Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d139_0)(uae_u32 opcode) /* ADD.B Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d140_0)(uae_u32 opcode) /* ADDX.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d148_0)(uae_u32 opcode) /* ADDX.W -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d150_0)(uae_u32 opcode) /* ADD.W Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d158_0)(uae_u32 opcode) /* ADD.W Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s16 dst = get_word(dsta); + m68k_areg(regs, dstreg) += 2; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d160_0)(uae_u32 opcode) /* ADD.W Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; +{ uae_s16 dst = get_word(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d168_0)(uae_u32 opcode) /* ADD.W Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d170_0)(uae_u32 opcode) /* ADD.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d178_0)(uae_u32 opcode) /* ADD.W Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d179_0)(uae_u32 opcode) /* ADD.W Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d180_0)(uae_u32 opcode) /* ADDX.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d188_0)(uae_u32 opcode) /* ADDX.L -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d190_0)(uae_u32 opcode) /* ADD.L Dn,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d198_0)(uae_u32 opcode) /* ADD.L Dn,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 dst = get_long(dsta); + m68k_areg(regs, dstreg) += 4; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1a0_0)(uae_u32 opcode) /* ADD.L Dn,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; +{ uae_s32 dst = get_long(dsta); + m68k_areg (regs, dstreg) = dsta; +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1a8_0)(uae_u32 opcode) /* ADD.L Dn,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1b0_0)(uae_u32 opcode) /* ADD.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{m68k_incpc(2); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1b8_0)(uae_u32 opcode) /* ADD.L Dn,(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1b9_0)(uae_u32 opcode) /* ADD.L Dn,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_ilong(2); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1c0_0)(uae_u32 opcode) /* ADDA.L Dn,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1c8_0)(uae_u32 opcode) /* ADDA.L An,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1d0_0)(uae_u32 opcode) /* ADDA.L (An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1d8_0)(uae_u32 opcode) /* ADDA.L (An)+,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#endif + +#ifdef PART_8 +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1e0_0)(uae_u32 opcode) /* ADDA.L -(An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1e8_0)(uae_u32 opcode) /* ADDA.L (d16,An),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1f0_0)(uae_u32 opcode) /* ADDA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1f8_0)(uae_u32 opcode) /* ADDA.L (xxx).W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1f9_0)(uae_u32 opcode) /* ADDA.L (xxx).L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1fa_0)(uae_u32 opcode) /* ADDA.L (d16,PC),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1fb_0)(uae_u32 opcode) /* ADDA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{m68k_incpc(2); +{ uaecptr tmppc = m68k_getpc(); + uaecptr srca = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1fc_0)(uae_u32 opcode) /* ADDA.L #.L,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_e000_0)(uae_u32 opcode) /* ASR.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + uae_u32 sign = (0x80 & val) >> 7; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + val = 0xff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xff << (8 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e008_0)(uae_u32 opcode) /* LSR.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_CFLG ((cnt == 8) & (val >> 7)); + COPY_CARRY; + val = 0; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e010_0)(uae_u32 opcode) /* ROXR.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (7 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e018_0)(uae_u32 opcode) /* ROR.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 hival; + cnt &= 7; + hival = val << (8 - cnt); + val >>= cnt; + val |= hival; + val &= 0xff; + SET_CFLG ((val & 0x80) >> 7); + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e020_0)(uae_u32 opcode) /* ASR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + uae_u32 sign = (0x80 & val) >> 7; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + val = 0xff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xff << (8 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e028_0)(uae_u32 opcode) /* LSR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_CFLG ((cnt == 8) & (val >> 7)); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e030_0)(uae_u32 opcode) /* ROXR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 36) cnt -= 36; + if (cnt >= 18) cnt -= 18; + if (cnt >= 9) cnt -= 9; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (7 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e038_0)(uae_u32 opcode) /* ROR.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { uae_u32 hival; + cnt &= 7; + hival = val << (8 - cnt); + val >>= cnt; + val |= hival; + val &= 0xff; + SET_CFLG ((val & 0x80) >> 7); + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e040_0)(uae_u32 opcode) /* ASR.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = (0x8000 & val) >> 15; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + val = 0xffff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xffff << (16 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e048_0)(uae_u32 opcode) /* LSR.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_CFLG ((cnt == 16) & (val >> 15)); + COPY_CARRY; + val = 0; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e050_0)(uae_u32 opcode) /* ROXR.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (15 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e058_0)(uae_u32 opcode) /* ROR.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 hival; + cnt &= 15; + hival = val << (16 - cnt); + val >>= cnt; + val |= hival; + val &= 0xffff; + SET_CFLG ((val & 0x8000) >> 15); + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e060_0)(uae_u32 opcode) /* ASR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = (0x8000 & val) >> 15; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + val = 0xffff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xffff << (16 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e068_0)(uae_u32 opcode) /* LSR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_CFLG ((cnt == 16) & (val >> 15)); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e070_0)(uae_u32 opcode) /* ROXR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 34) cnt -= 34; + if (cnt >= 17) cnt -= 17; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (15 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e078_0)(uae_u32 opcode) /* ROR.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { uae_u32 hival; + cnt &= 15; + hival = val << (16 - cnt); + val >>= cnt; + val |= hival; + val &= 0xffff; + SET_CFLG ((val & 0x8000) >> 15); + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e080_0)(uae_u32 opcode) /* ASR.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + uae_u32 sign = (0x80000000 & val) >> 31; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + val = 0xffffffff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xffffffff << (32 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e088_0)(uae_u32 opcode) /* LSR.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_CFLG ((cnt == 32) & (val >> 31)); + COPY_CARRY; + val = 0; + } else { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e090_0)(uae_u32 opcode) /* ROXR.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (31 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xffffffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e098_0)(uae_u32 opcode) /* ROR.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 hival; + cnt &= 31; + hival = val << (32 - cnt); + val >>= cnt; + val |= hival; + val &= 0xffffffff; + SET_CFLG ((val & 0x80000000) >> 31); + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0a0_0)(uae_u32 opcode) /* ASR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + uae_u32 sign = (0x80000000 & val) >> 31; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + val = 0xffffffff & (uae_u32)-(uae_s32)sign; + SET_CFLG (sign); + COPY_CARRY; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + val |= (0xffffffff << (32 - cnt)) & (uae_u32)-(uae_s32)sign; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0a8_0)(uae_u32 opcode) /* LSR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_CFLG ((cnt == 32) & (val >> 31)); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val >>= cnt - 1; + SET_CFLG (val & 1); + COPY_CARRY; + val >>= 1; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0b0_0)(uae_u32 opcode) /* ROXR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 33) cnt -= 33; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 hival = (val << 1) | GET_XFLG; + hival <<= (31 - cnt); + val >>= cnt; + carry = val & 1; + val >>= 1; + val |= hival; + SET_XFLG (carry); + val &= 0xffffffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0b8_0)(uae_u32 opcode) /* ROR.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { uae_u32 hival; + cnt &= 31; + hival = val << (32 - cnt); + val >>= cnt; + val |= hival; + val &= 0xffffffff; + SET_CFLG ((val & 0x80000000) >> 31); + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0d0_0)(uae_u32 opcode) /* ASRW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0d8_0)(uae_u32 opcode) /* ASRW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0e0_0)(uae_u32 opcode) /* ASRW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0e8_0)(uae_u32 opcode) /* ASRW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0f0_0)(uae_u32 opcode) /* ASRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0f8_0)(uae_u32 opcode) /* ASRW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e0f9_0)(uae_u32 opcode) /* ASRW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e100_0)(uae_u32 opcode) /* ASL.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 8 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + uae_u32 mask = (0xff << (7 - cnt)) & 0xff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x80) >> 7); + COPY_CARRY; + val <<= 1; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e108_0)(uae_u32 opcode) /* LSL.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_CFLG (cnt == 8 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + val <<= (cnt - 1); + SET_CFLG ((val & 0x80) >> 7); + COPY_CARRY; + val <<= 1; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e110_0)(uae_u32 opcode) /* ROXL.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (7 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e118_0)(uae_u32 opcode) /* ROL.B #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 loval; + cnt &= 7; + loval = val >> (8 - cnt); + val <<= cnt; + val |= loval; + val &= 0xff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e120_0)(uae_u32 opcode) /* ASL.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 8 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + uae_u32 mask = (0xff << (7 - cnt)) & 0xff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x80) >> 7); + COPY_CARRY; + val <<= 1; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e128_0)(uae_u32 opcode) /* LSL.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 8) { + SET_CFLG (cnt == 8 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val <<= (cnt - 1); + SET_CFLG ((val & 0x80) >> 7); + COPY_CARRY; + val <<= 1; + val &= 0xff; + } + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e130_0)(uae_u32 opcode) /* ROXL.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 36) cnt -= 36; + if (cnt >= 18) cnt -= 18; + if (cnt >= 9) cnt -= 9; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (7 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e138_0)(uae_u32 opcode) /* ROL.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 cnt = m68k_dreg(regs, srcreg); +{ uae_s8 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u8)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { + uae_u32 loval; + cnt &= 7; + loval = val >> (8 - cnt); + val <<= cnt; + val |= loval; + val &= 0xff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s8)(val)) == 0); + SET_NFLG (((uae_s8)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e140_0)(uae_u32 opcode) /* ASL.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 16 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x8000) >> 15); + COPY_CARRY; + val <<= 1; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e148_0)(uae_u32 opcode) /* LSL.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_CFLG (cnt == 16 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + val <<= (cnt - 1); + SET_CFLG ((val & 0x8000) >> 15); + COPY_CARRY; + val <<= 1; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e150_0)(uae_u32 opcode) /* ROXL.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (15 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e158_0)(uae_u32 opcode) /* ROL.W #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 loval; + cnt &= 15; + loval = val >> (16 - cnt); + val <<= cnt; + val |= loval; + val &= 0xffff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e160_0)(uae_u32 opcode) /* ASL.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 16 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x8000) >> 15); + COPY_CARRY; + val <<= 1; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e168_0)(uae_u32 opcode) /* LSL.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 16) { + SET_CFLG (cnt == 16 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val <<= (cnt - 1); + SET_CFLG ((val & 0x8000) >> 15); + COPY_CARRY; + val <<= 1; + val &= 0xffff; + } + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e170_0)(uae_u32 opcode) /* ROXL.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 34) cnt -= 34; + if (cnt >= 17) cnt -= 17; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (15 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e178_0)(uae_u32 opcode) /* ROL.W Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 cnt = m68k_dreg(regs, srcreg); +{ uae_s16 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = (uae_u16)data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { + uae_u32 loval; + cnt &= 15; + loval = val >> (16 - cnt); + val <<= cnt; + val |= loval; + val &= 0xffff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e180_0)(uae_u32 opcode) /* ASL.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 32 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x80000000) >> 31); + COPY_CARRY; + val <<= 1; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e188_0)(uae_u32 opcode) /* LSL.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_CFLG (cnt == 32 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else { + val <<= (cnt - 1); + SET_CFLG ((val & 0x80000000) >> 31); + COPY_CARRY; + val <<= 1; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e190_0)(uae_u32 opcode) /* ROXL.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; +{ cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (31 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xffffffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e198_0)(uae_u32 opcode) /* ROL.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 cnt = srcreg; +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; +{ uae_u32 loval; + cnt &= 31; + loval = val >> (32 - cnt); + val <<= cnt; + val |= loval; + val &= 0xffffffff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1a0_0)(uae_u32 opcode) /* ASL.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_VFLG (val != 0); + SET_CFLG (cnt == 32 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff; + SET_VFLG ((val & mask) != mask && (val & mask) != 0); + val <<= cnt - 1; + SET_CFLG ((val & 0x80000000) >> 31); + COPY_CARRY; + val <<= 1; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1a8_0)(uae_u32 opcode) /* LSL.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 32) { + SET_CFLG (cnt == 32 ? val & 1 : 0); + COPY_CARRY; + val = 0; + } else if (cnt > 0) { + val <<= (cnt - 1); + SET_CFLG ((val & 0x80000000) >> 31); + COPY_CARRY; + val <<= 1; + val &= 0xffffffff; + } + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1b0_0)(uae_u32 opcode) /* ROXL.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt >= 33) cnt -= 33; + if (cnt > 0) { + cnt--; + { + uae_u32 carry; + uae_u32 loval = val >> (31 - cnt); + carry = loval & 1; + val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); + SET_XFLG (carry); + val &= 0xffffffff; + } } + SET_CFLG (GET_XFLG); + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1b8_0)(uae_u32 opcode) /* ROL.L Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 cnt = m68k_dreg(regs, srcreg); +{ uae_s32 data = m68k_dreg(regs, dstreg); +{ uae_u32 val = data; + cnt &= 63; + CLEAR_CZNV; + if (cnt > 0) { + uae_u32 loval; + cnt &= 31; + loval = val >> (32 - cnt); + val <<= cnt; + val |= loval; + val &= 0xffffffff; + SET_CFLG (val & 1); +} + SET_ZFLG (((uae_s32)(val)) == 0); + SET_NFLG (((uae_s32)(val)) < 0); + m68k_dreg(regs, dstreg) = (val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1d0_0)(uae_u32 opcode) /* ASLW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1d8_0)(uae_u32 opcode) /* ASLW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1e0_0)(uae_u32 opcode) /* ASLW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1e8_0)(uae_u32 opcode) /* ASLW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1f0_0)(uae_u32 opcode) /* ASLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1f8_0)(uae_u32 opcode) /* ASLW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1f9_0)(uae_u32 opcode) /* ASLW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2d0_0)(uae_u32 opcode) /* LSRW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2d8_0)(uae_u32 opcode) /* LSRW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2e0_0)(uae_u32 opcode) /* LSRW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2e8_0)(uae_u32 opcode) /* LSRW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2f0_0)(uae_u32 opcode) /* LSRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2f8_0)(uae_u32 opcode) /* LSRW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2f9_0)(uae_u32 opcode) /* LSRW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3d0_0)(uae_u32 opcode) /* LSLW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3d8_0)(uae_u32 opcode) /* LSLW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3e0_0)(uae_u32 opcode) /* LSLW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3e8_0)(uae_u32 opcode) /* LSLW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3f0_0)(uae_u32 opcode) /* LSLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3f8_0)(uae_u32 opcode) /* LSLW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3f9_0)(uae_u32 opcode) /* LSLW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4d0_0)(uae_u32 opcode) /* ROXRW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4d8_0)(uae_u32 opcode) /* ROXRW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4e0_0)(uae_u32 opcode) /* ROXRW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4e8_0)(uae_u32 opcode) /* ROXRW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4f0_0)(uae_u32 opcode) /* ROXRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4f8_0)(uae_u32 opcode) /* ROXRW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4f9_0)(uae_u32 opcode) /* ROXRW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5d0_0)(uae_u32 opcode) /* ROXLW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5d8_0)(uae_u32 opcode) /* ROXLW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5e0_0)(uae_u32 opcode) /* ROXLW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5e8_0)(uae_u32 opcode) /* ROXLW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5f0_0)(uae_u32 opcode) /* ROXLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5f8_0)(uae_u32 opcode) /* ROXLW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5f9_0)(uae_u32 opcode) /* ROXLW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6d0_0)(uae_u32 opcode) /* RORW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6d8_0)(uae_u32 opcode) /* RORW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6e0_0)(uae_u32 opcode) /* RORW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6e8_0)(uae_u32 opcode) /* RORW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6f0_0)(uae_u32 opcode) /* RORW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6f8_0)(uae_u32 opcode) /* RORW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6f9_0)(uae_u32 opcode) /* RORW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7d0_0)(uae_u32 opcode) /* ROLW.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7d8_0)(uae_u32 opcode) /* ROLW.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg); +{ uae_s16 data = get_word(dataa); + m68k_areg(regs, srcreg) += 2; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7e0_0)(uae_u32 opcode) /* ROLW.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; +{ uae_s16 data = get_word(dataa); + m68k_areg (regs, srcreg) = dataa; +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7e8_0)(uae_u32 opcode) /* ROLW.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7f0_0)(uae_u32 opcode) /* ROLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7f8_0)(uae_u32 opcode) /* ROLW.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7f9_0)(uae_u32 opcode) /* ROLW.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr dataa = get_ilong(2); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8c0_0)(uae_u32 opcode) /* BFTST.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8d0_0)(uae_u32 opcode) /* BFTST.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8e8_0)(uae_u32 opcode) /* BFTST.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8f0_0)(uae_u32 opcode) /* BFTST.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8f8_0)(uae_u32 opcode) /* BFTST.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8f9_0)(uae_u32 opcode) /* BFTST.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8fa_0)(uae_u32 opcode) /* BFTST.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e8fb_0)(uae_u32 opcode) /* BFTST.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9c0_0)(uae_u32 opcode) /* BFEXTU.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9d0_0)(uae_u32 opcode) /* BFEXTU.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9e8_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9f0_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9f8_0)(uae_u32 opcode) /* BFEXTU.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9f9_0)(uae_u32 opcode) /* BFEXTU.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9fa_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e9fb_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eac0_0)(uae_u32 opcode) /* BFCHG.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : + (0xffffffff << (32 - (offset & 0x1f))))) | + (tmp >> (offset & 0x1f)) | + (((offset & 0x1f) + width) >= 32 ? 0 : + (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ead0_0)(uae_u32 opcode) /* BFCHG.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eae8_0)(uae_u32 opcode) /* BFCHG.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eaf0_0)(uae_u32 opcode) /* BFCHG.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eaf8_0)(uae_u32 opcode) /* BFCHG.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eaf9_0)(uae_u32 opcode) /* BFCHG.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = ~tmp; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebc0_0)(uae_u32 opcode) /* BFEXTS.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebd0_0)(uae_u32 opcode) /* BFEXTS.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebe8_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebf0_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebf8_0)(uae_u32 opcode) /* BFEXTS.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebf9_0)(uae_u32 opcode) /* BFEXTS.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebfa_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ebfb_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); + m68k_dreg(regs, (extra >> 12) & 7) = tmp; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ecc0_0)(uae_u32 opcode) /* BFCLR.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : + (0xffffffff << (32 - (offset & 0x1f))))) | + (tmp >> (offset & 0x1f)) | + (((offset & 0x1f) + width) >= 32 ? 0 : + (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ecd0_0)(uae_u32 opcode) /* BFCLR.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ece8_0)(uae_u32 opcode) /* BFCLR.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ecf0_0)(uae_u32 opcode) /* BFCLR.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ecf8_0)(uae_u32 opcode) /* BFCLR.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ecf9_0)(uae_u32 opcode) /* BFCLR.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edc0_0)(uae_u32 opcode) /* BFFFO.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edd0_0)(uae_u32 opcode) /* BFFFO.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_ede8_0)(uae_u32 opcode) /* BFFFO.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edf0_0)(uae_u32 opcode) /* BFFFO.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edf8_0)(uae_u32 opcode) /* BFFFO.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edf9_0)(uae_u32 opcode) /* BFFFO.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edfa_0)(uae_u32 opcode) /* BFFFO.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_getpc () + 4; + dsta += (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_edfb_0)(uae_u32 opcode) /* BFFFO.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr tmppc = m68k_getpc(); + uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + { uae_u32 mask = 1 << (width-1); + while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} + m68k_dreg(regs, (extra >> 12) & 7) = offset; +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eec0_0)(uae_u32 opcode) /* BFSET.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : + (0xffffffff << (32 - (offset & 0x1f))))) | + (tmp >> (offset & 0x1f)) | + (((offset & 0x1f) + width) >= 32 ? 0 : + (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eed0_0)(uae_u32 opcode) /* BFSET.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eee8_0)(uae_u32 opcode) /* BFSET.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eef0_0)(uae_u32 opcode) /* BFSET.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eef8_0)(uae_u32 opcode) /* BFSET.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eef9_0)(uae_u32 opcode) /* BFSET.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = 0xffffffff; + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_efc0_0)(uae_u32 opcode) /* BFINS.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : + (0xffffffff << (32 - (offset & 0x1f))))) | + (tmp >> (offset & 0x1f)) | + (((offset & 0x1f) + width) >= 32 ? 0 : + (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_efd0_0)(uae_u32 opcode) /* BFINS.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_efe8_0)(uae_u32 opcode) /* BFINS.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eff0_0)(uae_u32 opcode) /* BFINS.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +{m68k_incpc(4); +{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eff8_0)(uae_u32 opcode) /* BFINS.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_eff9_0)(uae_u32 opcode) /* BFINS.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +{ uaecptr dsta = get_ilong(4); +{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; + int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; + uae_u32 tmp,bf0,bf1; + dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); + bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; + tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); + tmp >>= (32 - width); + SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); + SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); + tmp = m68k_dreg(regs, (extra >> 12) & 7); + SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); + SET_ZFLG (tmp == 0); + tmp <<= (32 - width); + bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | + (tmp >> (offset & 7)) | + (((offset & 7) + width) >= 32 ? 0 : + (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); + put_long(dsta,bf0 ); + if (((offset & 7) + width) > 32) { + bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | + (tmp << (8 - (offset & 7))); + put_byte(dsta+4,bf1); + } +}}}}m68k_incpc(8); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f200_0)(uae_u32 opcode) /* FPP.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f208_0)(uae_u32 opcode) /* FPP.L #.W,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f210_0)(uae_u32 opcode) /* FPP.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f218_0)(uae_u32 opcode) /* FPP.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f220_0)(uae_u32 opcode) /* FPP.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f228_0)(uae_u32 opcode) /* FPP.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f230_0)(uae_u32 opcode) /* FPP.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f238_0)(uae_u32 opcode) /* FPP.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f239_0)(uae_u32 opcode) /* FPP.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f23a_0)(uae_u32 opcode) /* FPP.L #.W,(d16,PC) */ +{ + cpuop_begin(); + uae_u32 dstreg = 2; +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f23b_0)(uae_u32 opcode) /* FPP.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f23c_0)(uae_u32 opcode) /* FPP.L #.W,#.L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_arithmetic(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f240_0)(uae_u32 opcode) /* FScc.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f248_0)(uae_u32 opcode) /* FDBcc.L #.W,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_dbcc(opcode, extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f250_0)(uae_u32 opcode) /* FScc.L #.W,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f258_0)(uae_u32 opcode) /* FScc.L #.W,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f260_0)(uae_u32 opcode) /* FScc.L #.W,-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f268_0)(uae_u32 opcode) /* FScc.L #.W,(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f270_0)(uae_u32 opcode) /* FScc.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f278_0)(uae_u32 opcode) /* FScc.L #.W,(xxx).W */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f279_0)(uae_u32 opcode) /* FScc.L #.W,(xxx).L */ +{ + cpuop_begin(); +{{ uae_s16 extra = get_iword(2); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_scc(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f27a_0)(uae_u32 opcode) /* FTRAPcc.L #.W */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s16 dummy = get_iword(0); +m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_trapcc(opcode,oldpc); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f27b_0)(uae_u32 opcode) /* FTRAPcc.L #.L */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +{ uae_s32 dummy = get_ilong(0); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_trapcc(opcode,oldpc); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f27c_0)(uae_u32 opcode) /* FTRAPcc.L */ +{ + cpuop_begin(); +{m68k_incpc(2); +{ uaecptr oldpc = m68k_getpc(); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_trapcc(opcode,oldpc); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f280_0)(uae_u32 opcode) /* FBcc.L #,#.W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 63); +#else + uae_u32 srcreg = (opcode & 63); +#endif +{m68k_incpc(2); +{ uaecptr pc = m68k_getpc(); +{ uae_s16 extra = get_iword(0); +m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_bcc(opcode,pc,extra); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f2c0_0)(uae_u32 opcode) /* FBcc.L #,#.L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 63); +#else + uae_u32 srcreg = (opcode & 63); +#endif +{m68k_incpc(2); +{ uaecptr pc = m68k_getpc(); +{ uae_s32 extra = get_ilong(0); +m68k_incpc(4); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_bcc(opcode,pc,extra); +}}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f310_0)(uae_u32 opcode) /* FSAVE.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1829; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1829: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f320_0)(uae_u32 opcode) /* FSAVE.L -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1830; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1830: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f328_0)(uae_u32 opcode) /* FSAVE.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1831; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1831: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f330_0)(uae_u32 opcode) /* FSAVE.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1832; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1832: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f338_0)(uae_u32 opcode) /* FSAVE.L (xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1833; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1833: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f339_0)(uae_u32 opcode) /* FSAVE.L (xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1834; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_save(opcode); +}}endlabel1834: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f350_0)(uae_u32 opcode) /* FRESTORE.L (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1835; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1835: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f358_0)(uae_u32 opcode) /* FRESTORE.L (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1836; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1836: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f368_0)(uae_u32 opcode) /* FRESTORE.L (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1837; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1837: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f370_0)(uae_u32 opcode) /* FRESTORE.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1838; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1838: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f378_0)(uae_u32 opcode) /* FRESTORE.L (xxx).W */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1839; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1839: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f379_0)(uae_u32 opcode) /* FRESTORE.L (xxx).L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1840; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1840: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f37a_0)(uae_u32 opcode) /* FRESTORE.L (d16,PC) */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1841; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1841: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f37b_0)(uae_u32 opcode) /* FRESTORE.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel1842; } +{m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + fpuop_restore(opcode); +}}endlabel1842: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f408_0)(uae_u32 opcode) /* CINVL.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1843; } +{ if (srcreg&0x2) + flush_icache(31); +}}m68k_incpc(2); +endlabel1843: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f410_0)(uae_u32 opcode) /* CINVP.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1844; } +{ if (srcreg&0x2) + flush_icache(32); +}}m68k_incpc(2); +endlabel1844: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f418_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1845; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1845: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f419_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1846; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1846: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41a_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1847; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1847: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41b_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1848; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1848: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41c_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1849; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1849: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41d_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1850; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1850: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41e_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1851; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1851: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f41f_0)(uae_u32 opcode) /* CINVA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1852; } +{ if (srcreg&0x2) + flush_icache(33); +}}m68k_incpc(2); +endlabel1852: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f428_0)(uae_u32 opcode) /* CPUSHL.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1853; } +{ if (srcreg&0x2) + flush_icache(41); +}}m68k_incpc(2); +endlabel1853: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f430_0)(uae_u32 opcode) /* CPUSHP.L #,An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1854; } +{ if (srcreg&0x2) + flush_icache(42); +}}m68k_incpc(2); +endlabel1854: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f438_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1855; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1855: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f439_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1856; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1856: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43a_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1857; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1857: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43b_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1858; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1858: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43c_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1859; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1859: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43d_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1860; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1860: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43e_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1861; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1861: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f43f_0)(uae_u32 opcode) /* CPUSHA.L # */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 14) & 3); +#else + uae_u32 srcreg = ((opcode >> 6) & 3); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel1862; } +{ if (srcreg&0x2) + flush_icache(43); +}}m68k_incpc(2); +endlabel1862: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f500_0)(uae_u32 opcode) /* MMUOP.L #,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = (uae_s32)(uae_s8)(((opcode >> 11) | (opcode << 5)) & 7); +#else + uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 3) & 255); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 extra = srcreg; +m68k_incpc(2); +#ifdef HAVE_GET_WORD_UNSWAPPED + opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); +#endif + mmu_op(opcode,extra); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f600_0)(uae_u32 opcode) /* MOVE16.L (An)+,(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr memsa = m68k_areg(regs, srcreg); +{ uaecptr memda = get_ilong(2); + memsa &= ~15; + memda &= ~15; + put_long(memda, get_long(memsa)); + put_long(memda+4, get_long(memsa+4)); + put_long(memda+8, get_long(memsa+8)); + put_long(memda+12, get_long(memsa+12)); + m68k_areg(regs, srcreg) += 16; +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f608_0)(uae_u32 opcode) /* MOVE16.L (xxx).L,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uaecptr memsa = get_ilong(2); +{ uaecptr memda = m68k_areg(regs, dstreg); + memsa &= ~15; + memda &= ~15; + put_long(memda, get_long(memsa)); + put_long(memda+4, get_long(memsa+4)); + put_long(memda+8, get_long(memsa+8)); + put_long(memda+12, get_long(memsa+12)); + m68k_areg(regs, dstreg) += 16; +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f610_0)(uae_u32 opcode) /* MOVE16.L (An),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr memsa = m68k_areg(regs, srcreg); +{ uaecptr memda = get_ilong(2); + memsa &= ~15; + memda &= ~15; + put_long(memda, get_long(memsa)); + put_long(memda+4, get_long(memsa+4)); + put_long(memda+8, get_long(memsa+8)); + put_long(memda+12, get_long(memsa+12)); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f618_0)(uae_u32 opcode) /* MOVE16.L (xxx).L,(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uaecptr memsa = get_ilong(2); +{ uaecptr memda = m68k_areg(regs, dstreg); + memsa &= ~15; + memda &= ~15; + put_long(memda, get_long(memsa)); + put_long(memda+4, get_long(memsa+4)); + put_long(memda+8, get_long(memsa+8)); + put_long(memda+12, get_long(memsa+12)); +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_f620_0)(uae_u32 opcode) /* MOVE16.L (An)+,(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif + uae_u32 dstreg = 0; +{ uaecptr mems = m68k_areg(regs, srcreg) & ~15, memd; + dstreg = (get_iword(2) >> 12) & 7; + memd = m68k_areg(regs, dstreg) & ~15; + put_long(memd, get_long(mems)); + put_long(memd+4, get_long(mems+4)); + put_long(memd+8, get_long(mems+8)); + put_long(memd+12, get_long(mems+12)); + if (srcreg != dstreg) + m68k_areg(regs, srcreg) += 16; + m68k_areg(regs, dstreg) += 16; +}m68k_incpc(4); + cpuop_end(); +} + +#endif +#endif + + +#ifdef _MSC_VER +#pragma warning(disable:4102) /* unreferenced label */ +#endif + +#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) +#define PART_1 1 +#define PART_2 1 +#define PART_3 1 +#define PART_4 1 +#define PART_5 1 +#define PART_6 1 +#define PART_7 1 +#define PART_8 1 +#endif + +#ifdef PART_1 +#endif + +#ifdef PART_2 +#endif + +#ifdef PART_3 +#endif + +#ifdef PART_4 +void REGPARAM2 CPUFUNC(op_4800_1)(uae_u32 opcode) /* NBCD.B Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); +}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4810_1)(uae_u32 opcode) /* NBCD.B (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4818_1)(uae_u32 opcode) /* NBCD.B (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4820_1)(uae_u32 opcode) /* NBCD.B -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4828_1)(uae_u32 opcode) /* NBCD.B (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4830_1)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{m68k_incpc(2); +{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}} cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4838_1)(uae_u32 opcode) /* NBCD.B (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4839_1)(uae_u32 opcode) /* NBCD.B (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(6); + cpuop_end(); +} +#endif + +#ifdef PART_5 +#endif + +#ifdef PART_6 +void REGPARAM2 CPUFUNC(op_8100_1)(uae_u32 opcode) /* SBCD.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); + uae_u16 newv, tmp_newv; + int bcd = 0; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; + if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } + SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8108_1)(uae_u32 opcode) /* SBCD.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); + uae_u16 newv, tmp_newv; + int bcd = 0; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; + if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } + SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0); + put_byte(dsta,newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#endif + +#ifdef PART_7 +void REGPARAM2 CPUFUNC(op_c100_1)(uae_u32 opcode) /* ABCD.B Dn,Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); + uae_u16 newv, tmp_newv; + int cflg; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo > 9) { newv += 6; } + cflg = (newv & 0x3F0) > 0x90; + if (cflg) newv += 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}m68k_incpc(2); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c108_1)(uae_u32 opcode) /* ABCD.B -(An),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; +{ uae_s8 dst = get_byte(dsta); + m68k_areg (regs, dstreg) = dsta; +{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); + uae_u16 newv, tmp_newv; + int cflg; + newv = tmp_newv = newv_hi + newv_lo; + if (newv_lo > 9) { newv += 6; } + cflg = (newv & 0x3F0) > 0x90; + if (cflg) newv += 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0); + put_byte(dsta,newv); +}}}}}}m68k_incpc(2); + cpuop_end(); +} +#endif + +#ifdef PART_8 +#endif + + +#ifdef _MSC_VER +#pragma warning(disable:4102) /* unreferenced label */ +#endif + +#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) +#define PART_1 1 +#define PART_2 1 +#define PART_3 1 +#define PART_4 1 +#define PART_5 1 +#define PART_6 1 +#define PART_7 1 +#define PART_8 1 +#endif + +#ifdef PART_1 +#endif + +#ifdef PART_2 +#endif + +#ifdef PART_3 +#endif + +#ifdef PART_4 +#endif + +#ifdef PART_5 +#endif + +#ifdef PART_6 +#endif + +#ifdef PART_7 +#endif + +#ifdef PART_8 +#endif + + +#ifdef _MSC_VER +#pragma warning(disable:4102) /* unreferenced label */ +#endif + +#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) +#define PART_1 1 +#define PART_2 1 +#define PART_3 1 +#define PART_4 1 +#define PART_5 1 +#define PART_6 1 +#define PART_7 1 +#define PART_8 1 +#endif + +#ifdef PART_1 +void REGPARAM2 CPUFUNC(op_30_3)(uae_u32 opcode) /* OR.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_70_3)(uae_u32 opcode) /* OR.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0_3)(uae_u32 opcode) /* OR.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_130_3)(uae_u32 opcode) /* BTST.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13b_3)(uae_u32 opcode) /* BTST.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_170_3)(uae_u32 opcode) /* BCHG.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_17b_3)(uae_u32 opcode) /* BCHG.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1b0_3)(uae_u32 opcode) /* BCLR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1bb_3)(uae_u32 opcode) /* BCLR.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1f0_3)(uae_u32 opcode) /* BSET.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1fb_3)(uae_u32 opcode) /* BSET.B Dn,(d8,PC,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif + uae_u32 dstreg = 3; +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_230_3)(uae_u32 opcode) /* AND.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_270_3)(uae_u32 opcode) /* AND.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2b0_3)(uae_u32 opcode) /* AND.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_430_3)(uae_u32 opcode) /* SUB.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_470_3)(uae_u32 opcode) /* SUB.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4b0_3)(uae_u32 opcode) /* SUB.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_630_3)(uae_u32 opcode) /* ADD.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_670_3)(uae_u32 opcode) /* ADD.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_6b0_3)(uae_u32 opcode) /* ADD.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_830_3)(uae_u32 opcode) /* BTST.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_83b_3)(uae_u32 opcode) /* BTST.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_870_3)(uae_u32 opcode) /* BCHG.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_87b_3)(uae_u32 opcode) /* BCHG.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + dst ^= (1 << src); + SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8b0_3)(uae_u32 opcode) /* BCLR.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8bb_3)(uae_u32 opcode) /* BCLR.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst &= ~(1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8f0_3)(uae_u32 opcode) /* BSET.B #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8fb_3)(uae_u32 opcode) /* BSET.B #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src &= 7; + SET_ZFLG (1 ^ ((dst >> src) & 1)); + dst |= (1 << src); + put_byte(dsta,dst); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a30_3)(uae_u32 opcode) /* EOR.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_a70_3)(uae_u32 opcode) /* EOR.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +#endif + +#ifdef PART_2 +void REGPARAM2 CPUFUNC(op_ab0_3)(uae_u32 opcode) /* EOR.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c30_3)(uae_u32 opcode) /* CMP.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c3b_3)(uae_u32 opcode) /* CMP.B #.B,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s8 src = get_ibyte(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c70_3)(uae_u32 opcode) /* CMP.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c7b_3)(uae_u32 opcode) /* CMP.W #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s16 src = get_iword(2); +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cb0_3)(uae_u32 opcode) /* CMP.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_cbb_3)(uae_u32 opcode) /* CMP.L #.L,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{{ uae_s32 src = get_ilong(2); +{ uaecptr tmppc = m68k_getpc() + 6; + uaecptr dsta = get_disp_ea_000(tmppc, get_iword(6)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1030_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_103b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10b0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10bb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_10fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1130_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_113b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1170_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_117b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1180_3)(uae_u32 opcode) /* MOVE.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1190_3)(uae_u32 opcode) /* MOVE.B (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_1198_3)(uae_u32 opcode) /* MOVE.B (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s8 src = get_byte(srca); + m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11a0_3)(uae_u32 opcode) /* MOVE.B -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; +{ uae_s8 src = get_byte(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11a8_3)(uae_u32 opcode) /* MOVE.B (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b8_3)(uae_u32 opcode) /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11b9_3)(uae_u32 opcode) /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11ba_3)(uae_u32 opcode) /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11bb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11bc_3)(uae_u32 opcode) /* MOVE.B #.B,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s8 src = get_ibyte(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_11fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_13fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2030_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_203b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_2070_3)(uae_u32 opcode) /* MOVEA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_207b_3)(uae_u32 opcode) /* MOVEA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_u32 val = src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_20b0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20bb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_20fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 4; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2130_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_213b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_3 +void REGPARAM2 CPUFUNC(op_2170_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_217b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2180_3)(uae_u32 opcode) /* MOVE.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2188_3)(uae_u32 opcode) /* MOVE.L An,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2190_3)(uae_u32 opcode) /* MOVE.L (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_2198_3)(uae_u32 opcode) /* MOVE.L (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s32 src = get_long(srca); + m68k_areg(regs, srcreg) += 4; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21a0_3)(uae_u32 opcode) /* MOVE.L -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; +{ uae_s32 src = get_long(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21a8_3)(uae_u32 opcode) /* MOVE.L (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b8_3)(uae_u32 opcode) /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21b9_3)(uae_u32 opcode) /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21ba_3)(uae_u32 opcode) /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21bb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21bc_3)(uae_u32 opcode) /* MOVE.L #.L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s32 src = get_ilong(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_21fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_23fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3030_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_303b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_3070_3)(uae_u32 opcode) /* MOVEA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_307b_3)(uae_u32 opcode) /* MOVEA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_u32 val = (uae_s32)(uae_s16)src; + m68k_areg(regs, dstreg) = (val); +}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_30b0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30bb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_30fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg); + m68k_areg(regs, dstreg) += 2; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3130_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_313b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),-(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; + m68k_areg (regs, dstreg) = dsta; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3170_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_317b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3180_3)(uae_u32 opcode) /* MOVE.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3188_3)(uae_u32 opcode) /* MOVE.W An,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = m68k_areg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3190_3)(uae_u32 opcode) /* MOVE.W (An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_3198_3)(uae_u32 opcode) /* MOVE.W (An)+,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); +{ uae_s16 src = get_word(srca); + m68k_areg(regs, srcreg) += 2; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31a0_3)(uae_u32 opcode) /* MOVE.W -(An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; +{ uae_s16 src = get_word(srca); + m68k_areg (regs, srcreg) = srca; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31a8_3)(uae_u32 opcode) /* MOVE.W (d16,An),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b8_3)(uae_u32 opcode) /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31b9_3)(uae_u32 opcode) /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_ilong(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31ba_3)(uae_u32 opcode) /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = m68k_getpc () + 2; + srca += (uae_s32)(uae_s16)get_iword(2); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31bb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31bc_3)(uae_u32 opcode) /* MOVE.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uae_s16 src = get_iword(2); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).W */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_31fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(6); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).L */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_33fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uaecptr dsta = get_ilong(4); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(8); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4030_3)(uae_u32 opcode) /* NEGX.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4070_3)(uae_u32 opcode) /* NEGX.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); + SET_NFLG (((uae_s16)(newv)) < 0); + put_word(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_40b0_3)(uae_u32 opcode) /* NEGX.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); + SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); + SET_NFLG (((uae_s32)(newv)) < 0); + put_long(srca,newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f0_3)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel2002; } +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + MakeSR(); + put_word(srca,regs.sr); +}}}m68k_incpc(4); +endlabel2002: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4130_3)(uae_u32 opcode) /* CHK.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2003; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2003; } +}}}}m68k_incpc(4); +endlabel2003: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_413b_3)(uae_u32 opcode) /* CHK.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2004; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2004; } +}}}}m68k_incpc(4); +endlabel2004: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41b0_3)(uae_u32 opcode) /* CHK.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2005; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2005; } +}}}}m68k_incpc(4); +endlabel2005: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_41bb_3)(uae_u32 opcode) /* CHK.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2006; } + else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2006; } +}}}}m68k_incpc(4); +endlabel2006: ; + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41f0_3)(uae_u32 opcode) /* LEA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_41fb_3)(uae_u32 opcode) /* LEA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ m68k_areg(regs, dstreg) = (srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4230_3)(uae_u32 opcode) /* CLR.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(0)) == 0); + SET_NFLG (((uae_s8)(0)) < 0); + put_byte(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4270_3)(uae_u32 opcode) /* CLR.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(0)) == 0); + SET_NFLG (((uae_s16)(0)) < 0); + put_word(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_4 +void REGPARAM2 CPUFUNC(op_42b0_3)(uae_u32 opcode) /* CLR.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(0)) == 0); + SET_NFLG (((uae_s32)(0)) < 0); + put_long(srca,0); +}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_42f0_3)(uae_u32 opcode) /* MVSR2.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + MakeSR(); + put_word(srca,regs.sr & 0xff); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4430_3)(uae_u32 opcode) /* NEG.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(0)) < 0; + int flgn = ((uae_s8)(dst)) < 0; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4470_3)(uae_u32 opcode) /* NEG.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(0)) < 0; + int flgn = ((uae_s16)(dst)) < 0; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44b0_3)(uae_u32 opcode) /* NEG.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(0)) < 0; + int flgn = ((uae_s32)(dst)) < 0; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(srca,dst); +}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44f0_3)(uae_u32 opcode) /* MV2SR.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_44fb_3)(uae_u32 opcode) /* MV2SR.B (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); + MakeSR(); + regs.sr &= 0xFF00; + regs.sr |= src & 0xFF; + MakeFromSR(); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4630_3)(uae_u32 opcode) /* NOT.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(dst)) == 0); + SET_NFLG (((uae_s8)(dst)) < 0); + put_byte(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4670_3)(uae_u32 opcode) /* NOT.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(dst)) == 0); + SET_NFLG (((uae_s16)(dst)) < 0); + put_word(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46b0_3)(uae_u32 opcode) /* NOT.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_u32 dst = ~src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(dst)) == 0); + SET_NFLG (((uae_s32)(dst)) < 0); + put_long(srca,dst); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46f0_3)(uae_u32 opcode) /* MV2SR.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{if (!regs.s) { Exception(8,0); goto endlabel2021; } +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(4); +endlabel2021: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_46fb_3)(uae_u32 opcode) /* MV2SR.W (d8,PC,Xn) */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel2022; } +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); + regs.sr = src; + MakeFromSR(); +}}}}m68k_incpc(4); +endlabel2022: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4830_3)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); + uae_u16 newv_hi = - (src & 0xF0); + uae_u16 newv; + int cflg; + if (newv_lo > 9) { newv_lo -= 6; } + newv = newv_hi + newv_lo; + cflg = (newv & 0x1F0) > 0x90; + if (cflg) newv -= 0x60; + SET_CFLG (cflg); + COPY_CARRY; + SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); + SET_NFLG (((uae_s8)(newv)) < 0); + put_byte(srca,newv); +}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4870_3)(uae_u32 opcode) /* PEA.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_487b_3)(uae_u32 opcode) /* PEA.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uaecptr dsta = m68k_areg(regs, 7) - 4; + m68k_areg (regs, 7) = dsta; + put_long(dsta,srca); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48b0_3)(uae_u32 opcode) /* MVMLE.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } + while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_48f0_3)(uae_u32 opcode) /* MVMLE.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; + while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } + while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_4a30_3)(uae_u32 opcode) /* TST.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a3b_3)(uae_u32 opcode) /* TST.B (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a70_3)(uae_u32 opcode) /* TST.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4a7b_3)(uae_u32 opcode) /* TST.W (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4ab0_3)(uae_u32 opcode) /* TST.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4abb_3)(uae_u32 opcode) /* TST.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); +}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_4af0_3)(uae_u32 opcode) /* TAS.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + src |= 0x80; + put_byte(srca,src); +}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cb0_3)(uae_u32 opcode) /* MVMEL.W #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cbb_3)(uae_u32 opcode) /* MVMEL.W #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(4)); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cf0_3)(uae_u32 opcode) /* MVMEL.L #.W,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4cfb_3)(uae_u32 opcode) /* MVMEL.L #.W,(d8,PC,Xn) */ +{ + cpuop_begin(); + uae_u32 dstreg = 3; +{ uae_u16 mask = get_iword(2); + unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; +{ uaecptr tmppc = m68k_getpc() + 4; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(4)); +{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } + while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } +}}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4eb0_3)(uae_u32 opcode) /* JSR.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + m68k_do_jsr(m68k_getpc() + 4, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ebb_3)(uae_u32 opcode) /* JSR.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); + m68k_do_jsr(m68k_getpc() + 4, srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4ef0_3)(uae_u32 opcode) /* JMP.L (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_4efb_3)(uae_u32 opcode) /* JMP.L (d8,PC,Xn) */ +{ + cpuop_begin(); +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); + m68k_setpc(srca); +}} cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5030_3)(uae_u32 opcode) /* ADD.B #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_5 +void REGPARAM2 CPUFUNC(op_5070_3)(uae_u32 opcode) /* ADD.W #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_50b0_3)(uae_u32 opcode) /* ADD.L #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_50f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(0) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_5130_3)(uae_u32 opcode) /* SUB.B #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_5170_3)(uae_u32 opcode) /* SUB.W #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_51b0_3)(uae_u32 opcode) /* SUB.L #,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; +#else + uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_u32 src = srcreg; +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_51f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(1) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_52f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(2) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_53f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(3) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_54f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(4) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_55f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(5) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_56f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(6) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_57f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(7) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_58f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(8) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_59f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(9) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5af0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(10) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5bf0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(11) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5cf0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(12) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5df0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(13) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ef0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(14) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_5ff0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ int val = cctrue(15) ? 0xff : 0; + put_byte(srca,val); +}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#endif + +#ifdef PART_6 +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_60ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(0)) goto endlabel2065; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2065; +{ uae_s32 src = get_ilong(2); + if (!cctrue(0)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2065: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_62ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(2)) goto endlabel2066; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2066; +{ uae_s32 src = get_ilong(2); + if (!cctrue(2)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2066: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_63ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(3)) goto endlabel2067; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2067; +{ uae_s32 src = get_ilong(2); + if (!cctrue(3)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2067: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_64ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(4)) goto endlabel2068; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2068; +{ uae_s32 src = get_ilong(2); + if (!cctrue(4)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2068: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_65ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(5)) goto endlabel2069; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2069; +{ uae_s32 src = get_ilong(2); + if (!cctrue(5)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2069: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_66ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(6)) goto endlabel2070; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2070; +{ uae_s32 src = get_ilong(2); + if (!cctrue(6)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2070: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_67ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(7)) goto endlabel2071; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2071; +{ uae_s32 src = get_ilong(2); + if (!cctrue(7)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2071: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_68ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(8)) goto endlabel2072; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2072; +{ uae_s32 src = get_ilong(2); + if (!cctrue(8)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2072: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_69ff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(9)) goto endlabel2073; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2073; +{ uae_s32 src = get_ilong(2); + if (!cctrue(9)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2073: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6aff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(10)) goto endlabel2074; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2074; +{ uae_s32 src = get_ilong(2); + if (!cctrue(10)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2074: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6bff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(11)) goto endlabel2075; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2075; +{ uae_s32 src = get_ilong(2); + if (!cctrue(11)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2075: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6cff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(12)) goto endlabel2076; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2076; +{ uae_s32 src = get_ilong(2); + if (!cctrue(12)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2076: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6dff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(13)) goto endlabel2077; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2077; +{ uae_s32 src = get_ilong(2); + if (!cctrue(13)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2077: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6eff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(14)) goto endlabel2078; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2078; +{ uae_s32 src = get_ilong(2); + if (!cctrue(14)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2078: ; + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_6fff_3)(uae_u32 opcode) /* Bcc.L #.L */ +{ + cpuop_begin(); +{ m68k_incpc(2); + if (!cctrue(15)) goto endlabel2079; + last_addr_for_exception_3 = m68k_getpc() + 2; + last_fault_for_exception_3 = m68k_getpc() + 1; + last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2079; +{ uae_s32 src = get_ilong(2); + if (!cctrue(15)) goto didnt_jump; + m68k_incpc ((uae_s32)src + 2); +return; +didnt_jump:; +}}m68k_incpc(6); +endlabel2079: ; + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_8030_3)(uae_u32 opcode) /* OR.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_803b_3)(uae_u32 opcode) /* OR.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8070_3)(uae_u32 opcode) /* OR.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_807b_3)(uae_u32 opcode) /* OR.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80b0_3)(uae_u32 opcode) /* OR.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80bb_3)(uae_u32 opcode) /* OR.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80f0_3)(uae_u32 opcode) /* DIVU.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel2086; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel2086: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_80fb_3)(uae_u32 opcode) /* DIVU.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel2087; } else { + uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; + uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; + if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel2087: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8130_3)(uae_u32 opcode) /* OR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_8170_3)(uae_u32 opcode) /* OR.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81b0_3)(uae_u32 opcode) /* OR.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); + src |= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81f0_3)(uae_u32 opcode) /* DIVS.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel2091; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel2091: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_81fb_3)(uae_u32 opcode) /* DIVS.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{ uaecptr oldpc = m68k_getpc(); +{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +m68k_incpc(4); + if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel2092; } else { + uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; + uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; + if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else + { + if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_NFLG (((uae_s16)(newv)) < 0); + newv = (newv & 0xffff) | ((uae_u32)rem << 16); + m68k_dreg(regs, dstreg) = (newv); + } + } +}}}}endlabel2092: ; + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9030_3)(uae_u32 opcode) /* SUB.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_903b_3)(uae_u32 opcode) /* SUB.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9070_3)(uae_u32 opcode) /* SUB.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_907b_3)(uae_u32 opcode) /* SUB.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90b0_3)(uae_u32 opcode) /* SUB.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_90bb_3)(uae_u32 opcode) /* SUB.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90f0_3)(uae_u32 opcode) /* SUBA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_90fb_3)(uae_u32 opcode) /* SUBA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_9130_3)(uae_u32 opcode) /* SUB.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_9170_3)(uae_u32 opcode) /* SUB.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_91b0_3)(uae_u32 opcode) /* SUB.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91f0_3)(uae_u32 opcode) /* SUBA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_91fb_3)(uae_u32 opcode) /* SUBA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst - src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_b030_3)(uae_u32 opcode) /* CMP.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b03b_3)(uae_u32 opcode) /* CMP.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_7 +void REGPARAM2 CPUFUNC(op_b070_3)(uae_u32 opcode) /* CMP.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b07b_3)(uae_u32 opcode) /* CMP.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0b0_3)(uae_u32 opcode) /* CMP.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0bb_3)(uae_u32 opcode) /* CMP.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0f0_3)(uae_u32 opcode) /* CMPA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b0fb_3)(uae_u32 opcode) /* CMPA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b130_3)(uae_u32 opcode) /* EOR.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b170_3)(uae_u32 opcode) /* EOR.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1b0_3)(uae_u32 opcode) /* EOR.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); + src ^= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1f0_3)(uae_u32 opcode) /* CMPA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_b1fb_3)(uae_u32 opcode) /* CMPA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs != flgo) && (flgn != flgo)); + SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); + SET_NFLG (flgn != 0); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c030_3)(uae_u32 opcode) /* AND.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c03b_3)(uae_u32 opcode) /* AND.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c070_3)(uae_u32 opcode) /* AND.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c07b_3)(uae_u32 opcode) /* AND.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0b0_3)(uae_u32 opcode) /* AND.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0bb_3)(uae_u32 opcode) /* AND.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + m68k_dreg(regs, dstreg) = (src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0f0_3)(uae_u32 opcode) /* MULU.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c0fb_3)(uae_u32 opcode) /* MULU.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c130_3)(uae_u32 opcode) /* AND.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s8)(src)) == 0); + SET_NFLG (((uae_s8)(src)) < 0); + put_byte(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c170_3)(uae_u32 opcode) /* AND.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(src)) == 0); + SET_NFLG (((uae_s16)(src)) < 0); + put_word(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1b0_3)(uae_u32 opcode) /* AND.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); + src &= dst; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(src)) == 0); + SET_NFLG (((uae_s32)(src)) < 0); + put_long(dsta,src); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1f0_3)(uae_u32 opcode) /* MULS.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_c1fb_3)(uae_u32 opcode) /* MULS.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; + CLEAR_CZNV; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_NFLG (((uae_s32)(newv)) < 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d030_3)(uae_u32 opcode) /* ADD.B (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d03b_3)(uae_u32 opcode) /* ADD.B (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s8 src = get_byte(srca); +{ uae_s8 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d070_3)(uae_u32 opcode) /* ADD.W (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d07b_3)(uae_u32 opcode) /* ADD.W (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s16 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0b0_3)(uae_u32 opcode) /* ADD.L (d8,An,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d0bb_3)(uae_u32 opcode) /* ADD.L (d8,PC,Xn),Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_dreg(regs, dstreg); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + m68k_dreg(regs, dstreg) = (newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0f0_3)(uae_u32 opcode) /* ADDA.W (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d0fb_3)(uae_u32 opcode) /* ADDA.W (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s16 src = get_word(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_d130_3)(uae_u32 opcode) /* ADD.B Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s8 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s8 dst = get_byte(dsta); +{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); +{ int flgs = ((uae_s8)(src)) < 0; + int flgo = ((uae_s8)(dst)) < 0; + int flgn = ((uae_s8)(newv)) < 0; + SET_ZFLG (((uae_s8)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_byte(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d170_3)(uae_u32 opcode) /* ADD.W Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s16 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s16 dst = get_word(dsta); +{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); +{ int flgs = ((uae_s16)(src)) < 0; + int flgo = ((uae_s16)(dst)) < 0; + int flgn = ((uae_s16)(newv)) < 0; + SET_ZFLG (((uae_s16)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_word(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_d1b0_3)(uae_u32 opcode) /* ADD.L Dn,(d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 1) & 7); +#else + uae_u32 srcreg = ((opcode >> 9) & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 8) & 7; +#else + uae_u32 dstreg = opcode & 7; +#endif +{{ uae_s32 src = m68k_dreg(regs, srcreg); +{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); +{ uae_s32 dst = get_long(dsta); +{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); +{ int flgs = ((uae_s32)(src)) < 0; + int flgo = ((uae_s32)(dst)) < 0; + int flgn = ((uae_s32)(newv)) < 0; + SET_ZFLG (((uae_s32)(newv)) == 0); + SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); + SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); + COPY_CARRY; + SET_NFLG (flgn != 0); + put_long(dsta,newv); +}}}}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + +#ifdef PART_8 +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1f0_3)(uae_u32 opcode) /* ADDA.L (d8,An,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_d1fb_3)(uae_u32 opcode) /* ADDA.L (d8,PC,Xn),An */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 dstreg = (opcode >> 1) & 7; +#else + uae_u32 dstreg = (opcode >> 9) & 7; +#endif +{{ uaecptr tmppc = m68k_getpc() + 2; + uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); +{ uae_s32 src = get_long(srca); +{ uae_s32 dst = m68k_areg(regs, dstreg); +{ uae_u32 newv = dst + src; + m68k_areg(regs, dstreg) = (newv); +}}}}}m68k_incpc(4); + cpuop_end(); +} + +#endif +void REGPARAM2 CPUFUNC(op_e0f0_3)(uae_u32 opcode) /* ASRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 cflg = val & 1; + val = (val >> 1) | sign; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + SET_CFLG (cflg); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e1f0_3)(uae_u32 opcode) /* ASLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 sign = 0x8000 & val; + uae_u32 sign2; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); + sign2 = 0x8000 & val; + SET_CFLG (sign != 0); + COPY_CARRY; + SET_VFLG (GET_VFLG | (sign2 != sign)); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e2f0_3)(uae_u32 opcode) /* LSRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u32 val = (uae_u16)data; + uae_u32 carry = val & 1; + val >>= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e3f0_3)(uae_u32 opcode) /* LSLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e4f0_3)(uae_u32 opcode) /* ROXRW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (GET_XFLG) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e5f0_3)(uae_u32 opcode) /* ROXLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (GET_XFLG) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + COPY_CARRY; + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e6f0_3)(uae_u32 opcode) /* RORW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 1; + val >>= 1; + if (carry) val |= 0x8000; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +void REGPARAM2 CPUFUNC(op_e7f0_3)(uae_u32 opcode) /* ROLW.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); +{ uae_s16 data = get_word(dataa); +{ uae_u16 val = data; + uae_u32 carry = val & 0x8000; + val <<= 1; + if (carry) val |= 1; + CLEAR_CZNV; + SET_ZFLG (((uae_s16)(val)) == 0); + SET_NFLG (((uae_s16)(val)) < 0); +SET_CFLG (carry >> 15); + put_word(dataa,val); +}}}}m68k_incpc(4); + cpuop_end(); +} +#endif + + +#ifdef _MSC_VER +#pragma warning(disable:4102) /* unreferenced label */ +#endif + +#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) +#define PART_1 1 +#define PART_2 1 +#define PART_3 1 +#define PART_4 1 +#define PART_5 1 +#define PART_6 1 +#define PART_7 1 +#define PART_8 1 +#endif + +#ifdef PART_1 +#endif + +#ifdef PART_2 +#endif + +#ifdef PART_3 +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40c0_4)(uae_u32 opcode) /* MVSR2.W Dn */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ MakeSR(); + m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr) & 0xffff); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40d0_4)(uae_u32 opcode) /* MVSR2.W (An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40d8_4)(uae_u32 opcode) /* MVSR2.W (An)+ */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg); + m68k_areg(regs, srcreg) += 2; + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40e0_4)(uae_u32 opcode) /* MVSR2.W -(An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; + m68k_areg (regs, srcreg) = srca; + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(2); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40e8_4)(uae_u32 opcode) /* MVSR2.W (d16,An) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f0_4)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ +{ + cpuop_begin(); +#ifdef HAVE_GET_WORD_UNSWAPPED + uae_u32 srcreg = ((opcode >> 8) & 7); +#else + uae_u32 srcreg = (opcode & 7); +#endif +{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f8_4)(uae_u32 opcode) /* MVSR2.W (xxx).W */ +{ + cpuop_begin(); +{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(4); + cpuop_end(); +} + +#endif +#ifndef NOFLAGS +void REGPARAM2 CPUFUNC(op_40f9_4)(uae_u32 opcode) /* MVSR2.W (xxx).L */ +{ + cpuop_begin(); +{{ uaecptr srca = get_ilong(2); + MakeSR(); + put_word(srca,regs.sr); +}}m68k_incpc(6); + cpuop_end(); +} + +#endif +#endif + +#ifdef PART_4 +void REGPARAM2 CPUFUNC(op_4e73_4)(uae_u32 opcode) /* RTE.L */ +{ + cpuop_begin(); +{if (!regs.s) { Exception(8,0); goto endlabel2161; } +{{ uaecptr sra = m68k_areg(regs, 7); +{ uae_s16 sr = get_word(sra); + m68k_areg(regs, 7) += 2; +{ uaecptr pca = m68k_areg(regs, 7); +{ uae_s32 pc = get_long(pca); + m68k_areg(regs, 7) += 4; + regs.sr = sr; m68k_setpc_rte(pc); + MakeFromSR(); +}}}}}}endlabel2161: ; + cpuop_end(); +} +#endif + +#ifdef PART_5 +#endif + +#ifdef PART_6 +#endif + +#ifdef PART_7 +#endif + +#ifdef PART_8 +#endif + diff --git a/BasiliskII/src/uae_cpu/cpuemu_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu_nf.cpp new file mode 100644 index 000000000..72e965cf6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu_nf.cpp @@ -0,0 +1,2 @@ +#define NOFLAGS +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbl.cpp b/BasiliskII/src/uae_cpu/cpustbl.cpp new file mode 100644 index 000000000..87fc85bf9 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbl.cpp @@ -0,0 +1,8720 @@ +#include "sysdeps.h" +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "cputbl.h" +#define SET_CFLG_ALWAYS(x) SET_CFLG(x) +#define SET_NFLG_ALWAYS(x) SET_NFLG(x) +#define CPUFUNC_FF(x) x##_ff +#define CPUFUNC_NF(x) x##_nf +#define CPUFUNC(x) CPUFUNC_FF(x) +#ifdef NOFLAGS +# include "noflags.h" +#endif +struct cputbl CPUFUNC(op_smalltbl_0)[] = { +{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ +{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ +{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ +{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ +{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ +{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ +{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ +{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ +{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ +{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ +{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ +{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ +{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ +{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ +{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ +{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ +{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ +{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ +{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ +{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ +{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ +{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ +{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ +{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ +{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ +{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ +{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ +{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ +{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ +{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ +{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ +{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ +{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ +{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ +{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ +{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ +{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ +{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ +{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ +{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ +{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ +{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ +{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ +{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ +{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ +{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ +{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ +{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ +{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ +{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ +{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ +{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ +{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ +{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ +{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ +{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ +{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ +{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ +{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ +{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ +{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ +{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ +{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ +{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ +{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ +{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ +{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ +{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ +{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ +{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ +{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ +{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ +{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ +{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ +{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ +{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ +{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ +{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ +{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ +{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ +{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ +{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ +{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ +{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ +{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ +{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ +{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ +{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ +{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ +{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ +{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ +{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ +{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ +{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ +{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ +{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ +{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ +{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ +{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ +{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ +{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ +{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ +{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ +{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ +{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ +{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ +{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ +{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ +{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ +{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ +{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ +{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ +{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ +{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ +{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ +{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ +{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ +{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ +{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ +{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ +{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ +{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ +{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ +{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ +{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ +{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ +{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ +{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ +{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ +{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ +{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ +{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ +{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ +{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ +{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ +{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ +{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ +{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ +{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ +{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ +{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ +{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ +{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ +{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ +{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ +{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ +{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ +{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ +{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ +{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ +{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ +{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ +{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ +{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ +{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ +{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ +{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ +{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ +{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ +{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ +{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ +{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ +{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ +{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ +{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ +{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ +{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ +{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ +{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ +{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ +{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ +{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ +{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ +{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ +{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ +{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ +{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ +{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ +{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ +{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ +{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ +{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ +{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ +{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ +{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ +{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ +{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ +{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ +{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ +{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ +{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ +{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ +{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ +{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ +{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ +{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ +{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ +{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ +{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ +{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ +{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ +{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ +{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ +{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ +{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ +{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ +{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ +{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ +{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ +{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ +{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ +{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ +{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ +{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ +{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ +{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ +{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ +{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ +{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ +{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ +{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ +{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ +{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ +{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ +{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ +{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ +{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ +{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ +{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ +{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ +{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ +{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ +{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ +{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ +{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ +{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ +{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ +{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ +{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ +{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ +{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ +{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ +{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ +{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ +{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ +{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ +{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ +{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ +{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ +{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ +{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ +{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ +{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ +{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ +{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ +{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ +{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ +{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ +{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ +{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ +{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ +{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ +{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ +{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ +{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ +{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ +{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ +{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ +{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ +{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ +{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ +{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ +{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ +{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ +{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ +{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ +{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ +{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ +{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ +{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ +{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ +{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ +{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ +{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ +{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ +{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ +{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ +{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ +{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ +{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ +{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ +{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ +{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ +{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ +{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ +{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ +{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ +{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ +{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ +{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ +{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ +{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ +{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ +{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ +{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ +{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ +{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ +{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ +{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ +{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ +{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ +{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ +{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ +{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ +{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ +{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ +{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ +{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ +{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ +{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ +{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ +{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ +{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ +{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ +{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ +{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ +{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ +{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ +{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ +{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ +{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ +{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ +{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ +{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ +{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ +{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ +{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ +{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ +{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ +{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ +{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ +{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ +{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ +{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ +{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ +{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ +{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ +{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ +{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ +{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ +{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ +{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ +{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ +{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ +{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ +{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ +{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ +{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ +{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ +{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ +{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ +{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ +{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ +{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ +{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ +{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ +{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ +{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ +{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ +{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ +{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ +{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ +{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ +{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ +{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ +{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ +{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ +{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ +{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ +{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ +{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ +{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ +{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ +{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ +{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ +{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ +{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ +{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ +{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ +{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ +{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ +{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ +{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ +{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ +{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ +{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ +{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ +{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ +{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ +{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ +{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ +{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ +{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ +{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ +{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ +{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ +{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ +{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ +{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ +{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ +{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ +{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ +{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ +{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ +{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ +{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ +{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ +{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ +{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ +{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ +{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ +{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ +{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ +{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ +{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ +{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ +{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ +{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ +{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ +{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ +{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ +{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ +{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ +{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ +{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ +{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ +{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ +{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ +{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ +{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ +{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ +{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ +{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ +{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ +{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ +{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ +{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ +{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ +{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ +{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ +{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ +{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ +{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ +{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ +{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ +{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ +{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ +{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ +{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ +{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ +{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ +{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ +{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ +{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ +{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ +{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ +{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ +{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ +{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ +{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ +{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ +{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ +{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ +{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ +{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ +{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ +{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ +{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ +{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ +{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ +{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ +{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ +{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ +{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ +{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ +{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ +{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ +{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ +{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ +{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ +{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ +{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ +{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ +{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ +{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ +{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ +{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ +{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ +{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ +{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ +{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ +{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ +{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ +{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ +{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ +{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ +{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ +{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ +{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ +{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ +{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ +{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ +{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ +{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ +{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ +{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ +{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ +{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ +{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ +{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ +{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ +{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ +{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ +{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ +{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ +{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ +{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ +{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ +{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ +{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ +{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ +{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ +{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ +{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ +{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ +{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ +{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ +{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ +{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ +{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ +{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ +{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ +{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ +{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ +{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ +{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ +{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ +{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ +{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ +{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ +{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ +{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ +{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ +{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ +{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ +{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ +{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ +{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ +{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ +{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ +{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ +{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ +{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ +{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ +{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ +{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ +{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ +{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ +{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ +{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ +{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ +{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ +{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ +{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ +{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ +{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ +{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ +{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ +{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ +{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ +{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ +{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ +{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ +{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ +{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ +{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ +{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ +{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ +{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ +{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ +{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ +{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ +{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ +{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ +{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ +{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ +{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ +{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ +{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ +{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ +{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ +{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ +{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ +{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ +{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ +{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ +{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ +{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ +{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ +{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ +{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ +{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ +{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ +{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ +{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ +{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ +{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ +{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ +{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ +{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ +{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ +{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ +{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ +{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ +{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ +{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ +{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ +{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ +{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ +{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ +{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ +{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ +{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ +{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ +{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ +{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ +{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ +{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ +{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ +{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ +{ CPUFUNC(op_4800_0), 0, 18432 }, /* NBCD.B Dn */ +{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ +{ CPUFUNC(op_4810_0), 0, 18448 }, /* NBCD.B (An) */ +{ CPUFUNC(op_4818_0), 0, 18456 }, /* NBCD.B (An)+ */ +{ CPUFUNC(op_4820_0), 0, 18464 }, /* NBCD.B -(An) */ +{ CPUFUNC(op_4828_0), 0, 18472 }, /* NBCD.B (d16,An) */ +{ CPUFUNC(op_4830_0), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ +{ CPUFUNC(op_4838_0), 0, 18488 }, /* NBCD.B (xxx).W */ +{ CPUFUNC(op_4839_0), 0, 18489 }, /* NBCD.B (xxx).L */ +{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ +{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ +{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ +{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ +{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ +{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ +{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ +{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ +{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ +{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ +{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ +{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ +{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ +{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ +{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ +{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ +{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ +{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ +{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ +{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ +{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ +{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ +{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ +{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ +{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ +{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ +{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ +{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ +{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ +{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ +{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ +{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ +{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ +{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ +{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ +{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ +{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ +{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ +{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ +{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ +{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ +{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ +{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ +{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ +{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ +{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ +{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ +{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ +{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ +{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ +{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ +{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ +{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ +{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ +{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ +{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ +{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ +{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ +{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ +{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ +{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ +{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ +{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ +{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ +{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ +{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ +{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ +{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ +{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ +{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ +{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ +{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ +{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ +{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ +{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ +{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ +{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ +{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ +{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ +{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ +{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ +{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ +{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ +{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ +{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ +{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ +{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ +{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ +{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ +{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ +{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ +{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ +{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ +{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ +{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ +{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ +{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ +{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ +{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ +{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ +{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ +{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ +{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ +{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ +{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ +{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ +{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ +{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ +{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ +{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ +{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ +{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ +{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ +{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ +{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ +{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ +{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ +{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ +{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ +{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ +{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ +{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ +{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ +{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ +{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ +{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ +{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ +{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ +{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ +{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ +{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ +{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ +{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ +{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ +{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ +{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ +{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ +{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ +{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ +{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ +{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ +{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ +{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ +{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ +{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ +{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ +{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ +{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ +{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ +{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ +{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ +{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ +{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ +{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ +{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ +{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ +{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ +{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ +{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ +{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ +{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ +{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ +{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ +{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ +{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ +{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ +{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ +{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ +{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ +{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ +{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ +{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ +{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ +{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ +{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ +{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ +{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ +{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ +{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ +{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ +{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ +{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ +{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ +{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ +{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ +{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ +{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ +{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ +{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ +{ CPUFUNC(op_8100_0), 0, 33024 }, /* SBCD.B Dn,Dn */ +{ CPUFUNC(op_8108_0), 0, 33032 }, /* SBCD.B -(An),-(An) */ +{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ +{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ +{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ +{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ +{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ +{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ +{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ +{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ +{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ +{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ +{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ +{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ +{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ +{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ +{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ +{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ +{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ +{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ +{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ +{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ +{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ +{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ +{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ +{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ +{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ +{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ +{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ +{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ +{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ +{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ +{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ +{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ +{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ +{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ +{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ +{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ +{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ +{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ +{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ +{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ +{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ +{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ +{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ +{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ +{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ +{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ +{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ +{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ +{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ +{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ +{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ +{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ +{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ +{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ +{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ +{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ +{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ +{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ +{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ +{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ +{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ +{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ +{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ +{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ +{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ +{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ +{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ +{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ +{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ +{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ +{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ +{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ +{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ +{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ +{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ +{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ +{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ +{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ +{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ +{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ +{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ +{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ +{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ +{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ +{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ +{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ +{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ +{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ +{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ +{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ +{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ +{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ +{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ +{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ +{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ +{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ +{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ +{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ +{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ +{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ +{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ +{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ +{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ +{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ +{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ +{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ +{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ +{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ +{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ +{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ +{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ +{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ +{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ +{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ +{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ +{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ +{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ +{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ +{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ +{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ +{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ +{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ +{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ +{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ +{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ +{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ +{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ +{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ +{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ +{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ +{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ +{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ +{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ +{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ +{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ +{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ +{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ +{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ +{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ +{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ +{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ +{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ +{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ +{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ +{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ +{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ +{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ +{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ +{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ +{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ +{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ +{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ +{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ +{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ +{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ +{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ +{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ +{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ +{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ +{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ +{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ +{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ +{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ +{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ +{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ +{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ +{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ +{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ +{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ +{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ +{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ +{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ +{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ +{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ +{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ +{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ +{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ +{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ +{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ +{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ +{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ +{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ +{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ +{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ +{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ +{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ +{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ +{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ +{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ +{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ +{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ +{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ +{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ +{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ +{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ +{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ +{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ +{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ +{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ +{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ +{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ +{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ +{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ +{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ +{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ +{ CPUFUNC(op_c100_0), 0, 49408 }, /* ABCD.B Dn,Dn */ +{ CPUFUNC(op_c108_0), 0, 49416 }, /* ABCD.B -(An),-(An) */ +{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ +{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ +{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ +{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ +{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ +{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ +{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ +{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ +{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ +{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ +{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ +{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ +{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ +{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ +{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ +{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ +{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ +{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ +{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ +{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ +{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ +{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ +{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ +{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ +{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ +{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ +{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ +{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ +{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ +{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ +{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ +{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ +{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ +{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ +{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ +{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ +{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ +{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ +{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ +{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ +{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ +{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ +{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ +{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ +{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ +{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ +{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ +{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ +{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ +{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ +{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ +{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ +{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ +{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ +{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ +{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ +{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ +{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ +{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ +{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ +{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ +{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ +{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ +{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ +{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ +{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ +{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ +{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ +{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ +{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ +{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ +{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ +{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ +{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ +{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ +{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ +{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ +{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ +{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ +{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ +{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ +{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ +{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ +{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ +{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ +{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ +{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ +{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ +{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ +{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ +{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ +{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ +{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ +{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ +{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ +{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ +{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ +{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ +{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ +{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ +{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ +{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ +{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ +{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ +{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ +{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ +{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ +{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ +{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ +{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ +{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ +{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ +{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ +{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ +{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ +{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ +{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ +{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ +{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ +{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ +{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ +{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ +{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ +{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ +{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ +{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ +{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ +{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ +{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ +{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ +{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ +{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ +{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ +{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ +{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ +{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ +{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ +{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ +{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ +{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ +{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ +{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ +{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ +{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ +{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ +{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ +{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ +{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ +{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ +{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ +{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ +{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ +{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ +{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ +{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ +{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ +{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ +{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ +{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ +{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ +{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ +{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ +{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ +{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ +{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ +{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ +{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ +{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ +{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ +{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ +{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ +{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ +{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ +{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ +{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ +{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ +{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ +{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ +{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ +{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ +{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ +{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ +{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ +{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ +{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ +{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ +{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ +{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ +{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ +{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ +{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ +{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ +{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ +{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ +{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ +{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ +{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ +{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ +{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ +{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ +{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ +{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ +{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ +{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ +{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ +{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ +{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ +{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ +{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ +{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ +{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ +{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ +{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ +{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ +{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ +{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ +{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ +{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ +{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ +{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ +{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ +{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ +{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ +{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ +{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ +{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ +{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ +{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ +{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ +{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ +{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ +{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ +{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ +{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ +{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ +{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ +{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ +{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ +{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f200_0), 0, 61952 }, /* FPP.L #.W,Dn */ +{ CPUFUNC_FF(op_f208_0), 0, 61960 }, /* FPP.L #.W,An */ +{ CPUFUNC_FF(op_f210_0), 0, 61968 }, /* FPP.L #.W,(An) */ +{ CPUFUNC_FF(op_f218_0), 0, 61976 }, /* FPP.L #.W,(An)+ */ +{ CPUFUNC_FF(op_f220_0), 0, 61984 }, /* FPP.L #.W,-(An) */ +{ CPUFUNC_FF(op_f228_0), 0, 61992 }, /* FPP.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_f230_0), 0, 62000 }, /* FPP.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_f238_0), 0, 62008 }, /* FPP.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_f239_0), 0, 62009 }, /* FPP.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f23a_0), 0, 62010 }, /* FPP.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_f23b_0), 0, 62011 }, /* FPP.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_f23c_0), 0, 62012 }, /* FPP.L #.W,#.L */ +{ CPUFUNC_FF(op_f240_0), 0, 62016 }, /* FScc.L #.W,Dn */ +{ CPUFUNC_FF(op_f248_0), 0, 62024 }, /* FDBcc.L #.W,Dn */ +{ CPUFUNC_FF(op_f250_0), 0, 62032 }, /* FScc.L #.W,(An) */ +{ CPUFUNC_FF(op_f258_0), 0, 62040 }, /* FScc.L #.W,(An)+ */ +{ CPUFUNC_FF(op_f260_0), 0, 62048 }, /* FScc.L #.W,-(An) */ +{ CPUFUNC_FF(op_f268_0), 0, 62056 }, /* FScc.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_f270_0), 0, 62064 }, /* FScc.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_f278_0), 0, 62072 }, /* FScc.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_f279_0), 0, 62073 }, /* FScc.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f27a_0), 0, 62074 }, /* FTRAPcc.L #.W */ +{ CPUFUNC_FF(op_f27b_0), 0, 62075 }, /* FTRAPcc.L #.L */ +{ CPUFUNC_FF(op_f27c_0), 0, 62076 }, /* FTRAPcc.L */ +{ CPUFUNC_FF(op_f280_0), 0, 62080 }, /* FBcc.L #,#.W */ +{ CPUFUNC_FF(op_f2c0_0), 0, 62144 }, /* FBcc.L #,#.L */ +{ CPUFUNC_FF(op_f310_0), 0, 62224 }, /* FSAVE.L (An) */ +{ CPUFUNC_FF(op_f320_0), 0, 62240 }, /* FSAVE.L -(An) */ +{ CPUFUNC_FF(op_f328_0), 0, 62248 }, /* FSAVE.L (d16,An) */ +{ CPUFUNC_FF(op_f330_0), 0, 62256 }, /* FSAVE.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_f338_0), 0, 62264 }, /* FSAVE.L (xxx).W */ +{ CPUFUNC_FF(op_f339_0), 0, 62265 }, /* FSAVE.L (xxx).L */ +{ CPUFUNC_FF(op_f350_0), 0, 62288 }, /* FRESTORE.L (An) */ +{ CPUFUNC_FF(op_f358_0), 0, 62296 }, /* FRESTORE.L (An)+ */ +{ CPUFUNC_FF(op_f368_0), 0, 62312 }, /* FRESTORE.L (d16,An) */ +{ CPUFUNC_FF(op_f370_0), 0, 62320 }, /* FRESTORE.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_f378_0), 0, 62328 }, /* FRESTORE.L (xxx).W */ +{ CPUFUNC_FF(op_f379_0), 0, 62329 }, /* FRESTORE.L (xxx).L */ +{ CPUFUNC_FF(op_f37a_0), 0, 62330 }, /* FRESTORE.L (d16,PC) */ +{ CPUFUNC_FF(op_f37b_0), 0, 62331 }, /* FRESTORE.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_f408_0), 0, 62472 }, /* CINVL.L #,An */ +{ CPUFUNC_FF(op_f410_0), 0, 62480 }, /* CINVP.L #,An */ +{ CPUFUNC_FF(op_f418_0), 0, 62488 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f419_0), 0, 62489 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41a_0), 0, 62490 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41b_0), 0, 62491 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41c_0), 0, 62492 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41d_0), 0, 62493 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41e_0), 0, 62494 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f41f_0), 0, 62495 }, /* CINVA.L # */ +{ CPUFUNC_FF(op_f428_0), 0, 62504 }, /* CPUSHL.L #,An */ +{ CPUFUNC_FF(op_f430_0), 0, 62512 }, /* CPUSHP.L #,An */ +{ CPUFUNC_FF(op_f438_0), 0, 62520 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f439_0), 0, 62521 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43a_0), 0, 62522 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43b_0), 0, 62523 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43c_0), 0, 62524 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43d_0), 0, 62525 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43e_0), 0, 62526 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f43f_0), 0, 62527 }, /* CPUSHA.L # */ +{ CPUFUNC_FF(op_f500_0), 0, 62720 }, /* MMUOP.L #,Dn */ +{ CPUFUNC_FF(op_f600_0), 0, 62976 }, /* MOVE16.L (An)+,(xxx).L */ +{ CPUFUNC_FF(op_f608_0), 0, 62984 }, /* MOVE16.L (xxx).L,(An)+ */ +{ CPUFUNC_FF(op_f610_0), 0, 62992 }, /* MOVE16.L (An),(xxx).L */ +{ CPUFUNC_FF(op_f618_0), 0, 63000 }, /* MOVE16.L (xxx).L,(An) */ +{ CPUFUNC_FF(op_f620_0), 0, 63008 }, /* MOVE16.L (An)+,(An)+ */ +{ 0, 0, 0 }}; +struct cputbl CPUFUNC(op_smalltbl_1)[] = { +{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ +{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ +{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ +{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ +{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ +{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ +{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ +{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ +{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ +{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ +{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ +{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ +{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ +{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ +{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ +{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ +{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ +{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ +{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ +{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ +{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ +{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ +{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ +{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ +{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ +{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ +{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ +{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ +{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ +{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ +{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ +{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ +{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ +{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ +{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ +{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ +{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ +{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ +{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ +{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ +{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ +{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ +{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ +{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ +{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ +{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ +{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ +{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ +{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ +{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ +{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ +{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ +{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ +{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ +{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ +{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ +{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ +{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ +{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ +{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ +{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ +{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ +{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ +{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ +{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ +{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ +{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ +{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ +{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ +{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ +{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ +{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ +{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ +{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ +{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ +{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ +{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ +{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ +{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ +{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ +{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ +{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ +{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ +{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ +{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ +{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ +{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ +{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ +{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ +{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ +{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ +{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ +{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ +{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ +{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ +{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ +{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ +{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ +{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ +{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ +{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ +{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ +{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ +{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ +{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ +{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ +{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ +{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ +{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ +{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ +{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ +{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ +{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ +{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ +{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ +{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ +{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ +{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ +{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ +{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ +{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ +{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ +{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ +{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ +{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ +{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ +{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ +{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ +{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ +{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ +{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ +{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ +{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ +{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ +{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ +{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ +{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ +{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ +{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ +{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ +{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ +{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ +{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ +{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ +{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ +{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ +{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ +{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ +{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ +{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ +{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ +{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ +{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ +{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ +{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ +{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ +{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ +{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ +{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ +{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ +{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ +{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ +{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ +{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ +{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ +{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ +{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ +{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ +{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ +{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ +{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ +{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ +{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ +{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ +{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ +{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ +{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ +{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ +{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ +{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ +{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ +{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ +{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ +{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ +{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ +{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ +{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ +{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ +{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ +{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ +{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ +{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ +{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ +{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ +{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ +{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ +{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ +{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ +{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ +{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ +{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ +{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ +{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ +{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ +{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ +{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ +{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ +{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ +{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ +{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ +{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ +{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ +{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ +{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ +{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ +{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ +{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ +{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ +{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ +{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ +{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ +{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ +{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ +{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ +{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ +{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ +{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ +{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ +{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ +{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ +{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ +{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ +{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ +{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ +{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ +{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ +{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ +{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ +{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ +{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ +{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ +{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ +{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ +{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ +{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ +{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ +{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ +{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ +{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ +{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ +{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ +{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ +{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ +{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ +{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ +{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ +{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ +{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ +{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ +{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ +{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ +{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ +{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ +{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ +{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ +{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ +{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ +{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ +{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ +{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ +{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ +{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ +{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ +{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ +{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ +{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ +{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ +{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ +{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ +{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ +{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ +{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ +{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ +{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ +{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ +{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ +{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ +{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ +{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ +{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ +{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ +{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ +{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ +{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ +{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ +{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ +{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ +{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ +{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ +{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ +{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ +{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ +{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ +{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ +{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ +{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ +{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ +{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ +{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ +{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ +{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ +{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ +{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ +{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ +{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ +{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ +{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ +{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ +{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ +{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ +{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ +{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ +{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ +{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ +{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ +{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ +{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ +{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ +{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ +{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ +{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ +{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ +{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ +{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ +{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ +{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ +{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ +{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ +{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ +{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ +{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ +{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ +{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ +{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ +{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ +{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ +{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ +{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ +{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ +{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ +{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ +{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ +{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ +{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ +{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ +{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ +{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ +{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ +{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ +{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ +{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ +{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ +{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ +{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ +{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ +{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ +{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ +{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ +{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ +{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ +{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ +{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ +{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ +{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ +{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ +{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ +{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ +{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ +{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ +{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ +{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ +{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ +{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ +{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ +{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ +{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ +{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ +{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ +{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ +{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ +{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ +{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ +{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ +{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ +{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ +{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ +{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ +{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ +{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ +{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ +{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ +{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ +{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ +{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ +{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ +{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ +{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ +{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ +{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ +{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ +{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ +{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ +{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ +{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ +{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ +{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ +{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ +{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ +{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ +{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ +{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ +{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ +{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ +{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ +{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ +{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ +{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ +{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ +{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ +{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ +{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ +{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ +{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ +{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ +{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ +{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ +{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ +{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ +{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ +{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ +{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ +{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ +{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ +{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ +{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ +{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ +{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ +{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ +{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ +{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ +{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ +{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ +{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ +{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ +{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ +{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ +{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ +{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ +{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ +{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ +{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ +{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ +{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ +{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ +{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ +{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ +{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ +{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ +{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ +{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ +{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ +{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ +{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ +{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ +{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ +{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ +{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ +{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ +{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ +{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ +{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ +{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ +{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ +{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ +{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ +{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ +{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ +{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ +{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ +{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ +{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ +{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ +{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ +{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ +{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ +{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ +{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ +{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ +{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ +{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ +{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ +{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ +{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ +{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ +{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ +{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ +{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ +{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ +{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ +{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ +{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ +{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ +{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ +{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ +{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ +{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ +{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ +{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ +{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ +{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ +{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ +{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ +{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ +{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ +{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ +{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ +{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ +{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ +{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ +{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ +{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ +{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ +{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ +{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ +{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ +{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ +{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ +{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ +{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ +{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ +{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ +{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ +{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ +{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ +{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ +{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ +{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ +{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ +{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ +{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ +{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ +{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ +{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ +{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ +{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ +{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ +{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ +{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ +{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ +{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ +{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ +{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ +{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ +{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ +{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ +{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ +{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ +{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ +{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ +{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ +{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ +{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ +{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ +{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ +{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ +{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ +{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ +{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ +{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ +{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ +{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ +{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ +{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ +{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ +{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ +{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ +{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ +{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ +{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ +{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ +{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ +{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ +{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ +{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ +{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ +{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ +{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ +{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ +{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ +{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ +{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ +{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ +{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ +{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ +{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ +{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ +{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ +{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ +{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ +{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ +{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ +{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ +{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ +{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ +{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ +{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ +{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ +{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ +{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ +{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ +{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ +{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ +{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ +{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ +{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ +{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ +{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ +{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ +{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ +{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ +{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ +{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ +{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ +{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ +{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ +{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ +{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ +{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ +{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ +{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ +{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ +{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ +{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ +{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ +{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ +{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ +{ CPUFUNC(op_4830_1), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ +{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ +{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ +{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ +{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ +{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ +{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ +{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ +{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ +{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ +{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ +{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ +{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ +{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ +{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ +{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ +{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ +{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ +{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ +{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ +{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ +{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ +{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ +{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ +{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ +{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ +{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ +{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ +{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ +{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ +{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ +{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ +{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ +{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ +{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ +{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ +{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ +{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ +{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ +{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ +{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ +{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ +{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ +{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ +{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ +{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ +{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ +{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ +{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ +{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ +{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ +{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ +{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ +{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ +{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ +{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ +{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ +{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ +{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ +{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ +{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ +{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ +{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ +{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ +{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ +{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ +{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ +{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ +{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ +{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ +{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ +{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ +{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ +{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ +{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ +{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ +{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ +{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ +{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ +{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ +{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ +{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ +{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ +{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ +{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ +{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ +{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ +{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ +{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ +{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ +{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ +{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ +{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ +{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ +{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ +{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ +{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ +{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ +{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ +{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ +{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ +{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ +{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ +{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ +{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ +{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ +{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ +{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ +{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ +{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ +{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ +{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ +{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ +{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ +{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ +{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ +{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ +{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ +{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ +{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ +{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ +{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ +{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ +{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ +{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ +{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ +{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ +{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ +{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ +{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ +{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ +{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ +{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ +{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ +{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ +{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ +{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ +{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ +{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ +{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ +{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ +{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ +{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ +{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ +{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ +{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ +{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ +{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ +{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ +{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ +{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ +{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ +{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ +{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ +{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ +{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ +{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ +{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ +{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ +{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ +{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ +{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ +{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ +{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ +{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ +{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ +{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ +{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ +{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ +{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ +{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ +{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ +{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ +{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ +{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ +{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ +{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ +{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ +{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ +{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ +{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ +{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ +{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ +{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ +{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ +{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ +{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ +{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ +{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ +{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ +{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ +{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ +{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ +{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ +{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ +{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ +{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ +{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ +{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ +{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ +{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ +{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ +{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ +{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ +{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ +{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ +{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ +{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ +{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ +{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ +{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ +{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ +{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ +{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ +{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ +{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ +{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ +{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ +{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ +{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ +{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ +{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ +{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ +{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ +{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ +{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ +{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ +{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ +{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ +{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ +{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ +{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ +{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ +{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ +{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ +{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ +{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ +{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ +{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ +{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ +{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ +{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ +{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ +{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ +{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ +{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ +{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ +{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ +{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ +{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ +{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ +{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ +{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ +{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ +{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ +{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ +{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ +{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ +{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ +{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ +{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ +{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ +{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ +{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ +{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ +{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ +{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ +{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ +{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ +{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ +{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ +{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ +{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ +{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ +{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ +{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ +{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ +{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ +{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ +{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ +{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ +{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ +{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ +{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ +{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ +{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ +{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ +{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ +{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ +{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ +{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ +{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ +{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ +{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ +{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ +{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ +{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ +{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ +{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ +{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ +{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ +{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ +{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ +{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ +{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ +{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ +{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ +{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ +{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ +{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ +{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ +{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ +{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ +{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ +{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ +{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ +{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ +{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ +{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ +{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ +{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ +{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ +{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ +{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ +{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ +{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ +{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ +{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ +{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ +{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ +{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ +{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ +{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ +{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ +{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ +{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ +{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ +{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ +{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ +{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ +{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ +{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ +{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ +{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ +{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ +{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ +{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ +{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ +{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ +{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ +{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ +{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ +{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ +{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ +{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ +{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ +{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ +{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ +{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ +{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ +{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ +{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ +{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ +{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ +{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ +{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ +{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ +{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ +{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ +{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ +{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ +{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ +{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ +{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ +{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ +{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ +{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ +{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ +{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ +{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ +{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ +{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ +{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ +{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ +{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ +{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ +{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ +{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ +{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ +{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ +{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ +{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ +{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ +{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ +{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ +{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ +{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ +{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ +{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ +{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ +{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ +{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ +{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ +{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ +{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ +{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ +{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ +{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ +{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ +{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ +{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ +{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ +{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ +{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ +{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ +{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ +{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ +{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ +{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ +{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ +{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ +{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ +{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ +{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ +{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ +{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ +{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ +{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ +{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ +{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ +{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ +{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ +{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ +{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ +{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ +{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ +{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ +{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ +{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ +{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ +{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ +{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ +{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ +{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ +{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ +{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ +{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ +{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ +{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ +{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ +{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ +{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ +{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ +{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ +{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ +{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ +{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ +{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ +{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ +{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ +{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ +{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ +{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ +{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ +{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ +{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ +{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ +{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ +{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ +{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ +{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ +{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ +{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ +{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ +{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ +{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ +{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ +{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ +{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ +{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ +{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ +{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ +{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ +{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ +{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ +{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ +{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ +{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ +{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ +{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ +{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ +{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ +{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ +{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ +{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ +{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ +{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ +{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ +{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ +{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ +{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ +{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ +{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ +{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ +{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ +{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ +{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ +{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ +{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ +{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ +{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ +{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ +{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ +{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ +{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ +{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ +{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ +{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ +{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ +{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ +{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ +{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ +{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ +{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ +{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ +{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ +{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ +{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ +{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ +{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ +{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ +{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ +{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ +{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ +{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ +{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ +{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ +{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ +{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ +{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ +{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ +{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ +{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ +{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ +{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ +{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ +{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ +{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ +{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ +{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ +{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ +{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ +{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ +{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ +{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ +{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ +{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ +{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ +{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ +{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ +{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ +{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ +{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ +{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ +{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ +{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ +{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ +{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ +{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ +{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ +{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ +{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ +{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ +{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ +{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ +{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ +{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ +{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ +{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ +{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ +{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ +{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ +{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ +{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ +{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ +{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ +{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ +{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ +{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ +{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ +{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ +{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ +{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ +{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ +{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ +{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ +{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ +{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ +{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ +{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ +{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ +{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ +{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ +{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ +{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ +{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ +{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ +{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ +{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ +{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ +{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ +{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ +{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ +{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ +{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ +{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ +{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ +{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ +{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ +{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ +{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ +{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ +{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ +{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ +{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ +{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ +{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ +{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ +{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ +{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ +{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ +{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ +{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ +{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ +{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ +{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ +{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ +{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ +{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ +{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f200_0), 0, 61952 }, /* FPP.L #.W,Dn */ +{ CPUFUNC_FF(op_f208_0), 0, 61960 }, /* FPP.L #.W,An */ +{ CPUFUNC_FF(op_f210_0), 0, 61968 }, /* FPP.L #.W,(An) */ +{ CPUFUNC_FF(op_f218_0), 0, 61976 }, /* FPP.L #.W,(An)+ */ +{ CPUFUNC_FF(op_f220_0), 0, 61984 }, /* FPP.L #.W,-(An) */ +{ CPUFUNC_FF(op_f228_0), 0, 61992 }, /* FPP.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_f230_0), 0, 62000 }, /* FPP.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_f238_0), 0, 62008 }, /* FPP.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_f239_0), 0, 62009 }, /* FPP.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f23a_0), 0, 62010 }, /* FPP.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_f23b_0), 0, 62011 }, /* FPP.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_f23c_0), 0, 62012 }, /* FPP.L #.W,#.L */ +{ CPUFUNC_FF(op_f240_0), 0, 62016 }, /* FScc.L #.W,Dn */ +{ CPUFUNC_FF(op_f248_0), 0, 62024 }, /* FDBcc.L #.W,Dn */ +{ CPUFUNC_FF(op_f250_0), 0, 62032 }, /* FScc.L #.W,(An) */ +{ CPUFUNC_FF(op_f258_0), 0, 62040 }, /* FScc.L #.W,(An)+ */ +{ CPUFUNC_FF(op_f260_0), 0, 62048 }, /* FScc.L #.W,-(An) */ +{ CPUFUNC_FF(op_f268_0), 0, 62056 }, /* FScc.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_f270_0), 0, 62064 }, /* FScc.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_f278_0), 0, 62072 }, /* FScc.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_f279_0), 0, 62073 }, /* FScc.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_f27a_0), 0, 62074 }, /* FTRAPcc.L #.W */ +{ CPUFUNC_FF(op_f27b_0), 0, 62075 }, /* FTRAPcc.L #.L */ +{ CPUFUNC_FF(op_f27c_0), 0, 62076 }, /* FTRAPcc.L */ +{ CPUFUNC_FF(op_f280_0), 0, 62080 }, /* FBcc.L #,#.W */ +{ CPUFUNC_FF(op_f2c0_0), 0, 62144 }, /* FBcc.L #,#.L */ +{ CPUFUNC_FF(op_f310_0), 0, 62224 }, /* FSAVE.L (An) */ +{ CPUFUNC_FF(op_f320_0), 0, 62240 }, /* FSAVE.L -(An) */ +{ CPUFUNC_FF(op_f328_0), 0, 62248 }, /* FSAVE.L (d16,An) */ +{ CPUFUNC_FF(op_f330_0), 0, 62256 }, /* FSAVE.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_f338_0), 0, 62264 }, /* FSAVE.L (xxx).W */ +{ CPUFUNC_FF(op_f339_0), 0, 62265 }, /* FSAVE.L (xxx).L */ +{ CPUFUNC_FF(op_f350_0), 0, 62288 }, /* FRESTORE.L (An) */ +{ CPUFUNC_FF(op_f358_0), 0, 62296 }, /* FRESTORE.L (An)+ */ +{ CPUFUNC_FF(op_f368_0), 0, 62312 }, /* FRESTORE.L (d16,An) */ +{ CPUFUNC_FF(op_f370_0), 0, 62320 }, /* FRESTORE.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_f378_0), 0, 62328 }, /* FRESTORE.L (xxx).W */ +{ CPUFUNC_FF(op_f379_0), 0, 62329 }, /* FRESTORE.L (xxx).L */ +{ CPUFUNC_FF(op_f37a_0), 0, 62330 }, /* FRESTORE.L (d16,PC) */ +{ CPUFUNC_FF(op_f37b_0), 0, 62331 }, /* FRESTORE.L (d8,PC,Xn) */ +{ 0, 0, 0 }}; +struct cputbl CPUFUNC(op_smalltbl_2)[] = { +{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ +{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ +{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ +{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ +{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ +{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ +{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ +{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ +{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ +{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ +{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ +{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ +{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ +{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ +{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ +{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ +{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ +{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ +{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ +{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ +{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ +{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ +{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ +{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ +{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ +{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ +{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ +{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ +{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ +{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ +{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ +{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ +{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ +{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ +{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ +{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ +{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ +{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ +{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ +{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ +{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ +{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ +{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ +{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ +{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ +{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ +{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ +{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ +{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ +{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ +{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ +{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ +{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ +{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ +{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ +{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ +{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ +{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ +{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ +{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ +{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ +{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ +{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ +{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ +{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ +{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ +{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ +{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ +{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ +{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ +{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ +{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ +{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ +{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ +{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ +{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ +{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ +{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ +{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ +{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ +{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ +{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ +{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ +{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ +{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ +{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ +{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ +{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ +{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ +{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ +{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ +{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ +{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ +{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ +{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ +{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ +{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ +{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ +{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ +{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ +{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ +{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ +{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ +{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ +{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ +{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ +{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ +{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ +{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ +{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ +{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ +{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ +{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ +{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ +{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ +{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ +{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ +{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ +{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ +{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ +{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ +{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ +{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ +{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ +{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ +{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ +{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ +{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ +{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ +{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ +{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ +{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ +{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ +{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ +{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ +{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ +{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ +{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ +{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ +{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ +{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ +{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ +{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ +{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ +{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ +{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ +{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ +{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ +{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ +{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ +{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ +{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ +{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ +{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ +{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ +{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ +{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ +{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ +{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ +{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ +{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ +{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ +{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ +{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ +{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ +{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ +{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ +{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ +{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ +{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ +{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ +{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ +{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ +{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ +{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ +{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ +{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ +{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ +{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ +{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ +{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ +{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ +{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ +{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ +{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ +{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ +{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ +{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ +{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ +{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ +{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ +{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ +{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ +{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ +{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ +{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ +{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ +{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ +{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ +{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ +{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ +{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ +{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ +{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ +{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ +{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ +{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ +{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ +{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ +{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ +{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ +{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ +{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ +{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ +{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ +{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ +{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ +{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ +{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ +{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ +{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ +{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ +{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ +{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ +{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ +{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ +{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ +{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ +{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ +{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ +{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ +{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ +{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ +{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ +{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ +{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ +{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ +{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ +{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ +{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ +{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ +{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ +{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ +{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ +{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ +{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ +{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ +{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ +{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ +{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ +{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ +{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ +{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ +{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ +{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ +{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ +{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ +{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ +{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ +{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ +{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ +{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ +{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ +{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ +{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ +{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ +{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ +{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ +{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ +{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ +{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ +{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ +{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ +{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ +{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ +{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ +{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ +{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ +{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ +{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ +{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ +{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ +{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ +{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ +{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ +{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ +{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ +{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ +{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ +{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ +{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ +{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ +{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ +{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ +{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ +{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ +{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ +{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ +{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ +{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ +{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ +{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ +{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ +{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ +{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ +{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ +{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ +{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ +{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ +{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ +{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ +{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ +{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ +{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ +{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ +{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ +{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ +{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ +{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ +{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ +{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ +{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ +{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ +{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ +{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ +{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ +{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ +{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ +{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ +{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ +{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ +{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ +{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ +{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ +{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ +{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ +{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ +{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ +{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ +{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ +{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ +{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ +{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ +{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ +{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ +{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ +{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ +{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ +{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ +{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ +{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ +{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ +{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ +{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ +{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ +{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ +{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ +{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ +{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ +{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ +{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ +{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ +{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ +{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ +{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ +{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ +{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ +{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ +{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ +{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ +{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ +{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ +{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ +{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ +{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ +{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ +{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ +{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ +{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ +{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ +{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ +{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ +{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ +{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ +{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ +{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ +{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ +{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ +{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ +{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ +{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ +{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ +{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ +{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ +{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ +{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ +{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ +{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ +{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ +{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ +{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ +{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ +{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ +{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ +{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ +{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ +{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ +{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ +{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ +{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ +{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ +{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ +{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ +{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ +{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ +{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ +{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ +{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ +{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ +{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ +{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ +{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ +{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ +{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ +{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ +{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ +{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ +{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ +{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ +{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ +{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ +{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ +{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ +{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ +{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ +{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ +{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ +{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ +{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ +{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ +{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ +{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ +{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ +{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ +{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ +{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ +{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ +{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ +{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ +{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ +{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ +{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ +{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ +{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ +{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ +{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ +{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ +{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ +{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ +{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ +{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ +{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ +{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ +{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ +{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ +{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ +{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ +{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ +{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ +{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ +{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ +{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ +{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ +{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ +{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ +{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ +{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ +{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ +{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ +{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ +{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ +{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ +{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ +{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ +{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ +{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ +{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ +{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ +{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ +{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ +{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ +{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ +{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ +{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ +{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ +{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ +{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ +{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ +{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ +{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ +{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ +{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ +{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ +{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ +{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ +{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ +{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ +{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ +{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ +{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ +{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ +{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ +{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ +{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ +{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ +{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ +{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ +{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ +{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ +{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ +{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ +{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ +{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ +{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ +{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ +{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ +{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ +{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ +{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ +{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ +{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ +{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ +{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ +{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ +{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ +{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ +{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ +{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ +{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ +{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ +{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ +{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ +{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ +{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ +{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ +{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ +{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ +{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ +{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ +{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ +{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ +{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ +{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ +{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ +{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ +{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ +{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ +{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ +{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ +{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ +{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ +{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ +{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ +{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ +{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ +{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ +{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ +{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ +{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ +{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ +{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ +{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ +{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ +{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ +{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ +{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ +{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ +{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ +{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ +{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ +{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ +{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ +{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ +{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ +{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ +{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ +{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ +{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ +{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ +{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ +{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ +{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ +{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ +{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ +{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ +{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ +{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ +{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ +{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ +{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ +{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ +{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ +{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ +{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ +{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ +{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ +{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ +{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ +{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ +{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ +{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ +{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ +{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ +{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ +{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ +{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ +{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ +{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ +{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ +{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ +{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ +{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ +{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ +{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ +{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ +{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ +{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ +{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ +{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ +{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ +{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ +{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ +{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ +{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ +{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ +{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ +{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ +{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ +{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ +{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ +{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ +{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ +{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ +{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ +{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ +{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ +{ CPUFUNC(op_4830_1), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ +{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ +{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ +{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ +{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ +{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ +{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ +{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ +{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ +{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ +{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ +{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ +{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ +{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ +{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ +{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ +{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ +{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ +{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ +{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ +{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ +{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ +{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ +{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ +{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ +{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ +{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ +{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ +{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ +{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ +{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ +{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ +{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ +{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ +{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ +{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ +{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ +{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ +{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ +{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ +{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ +{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ +{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ +{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ +{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ +{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ +{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ +{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ +{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ +{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ +{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ +{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ +{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ +{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ +{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ +{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ +{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ +{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ +{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ +{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ +{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ +{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ +{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ +{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ +{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ +{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ +{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ +{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ +{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ +{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ +{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ +{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ +{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ +{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ +{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ +{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ +{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ +{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ +{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ +{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ +{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ +{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ +{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ +{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ +{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ +{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ +{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ +{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ +{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ +{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ +{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ +{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ +{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ +{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ +{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ +{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ +{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ +{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ +{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ +{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ +{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ +{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ +{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ +{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ +{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ +{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ +{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ +{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ +{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ +{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ +{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ +{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ +{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ +{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ +{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ +{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ +{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ +{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ +{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ +{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ +{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ +{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ +{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ +{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ +{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ +{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ +{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ +{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ +{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ +{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ +{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ +{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ +{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ +{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ +{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ +{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ +{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ +{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ +{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ +{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ +{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ +{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ +{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ +{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ +{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ +{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ +{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ +{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ +{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ +{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ +{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ +{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ +{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ +{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ +{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ +{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ +{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ +{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ +{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ +{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ +{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ +{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ +{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ +{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ +{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ +{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ +{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ +{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ +{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ +{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ +{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ +{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ +{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ +{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ +{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ +{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ +{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ +{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ +{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ +{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ +{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ +{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ +{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ +{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ +{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ +{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ +{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ +{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ +{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ +{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ +{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ +{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ +{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ +{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ +{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ +{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ +{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ +{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ +{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ +{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ +{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ +{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ +{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ +{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ +{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ +{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ +{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ +{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ +{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ +{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ +{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ +{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ +{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ +{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ +{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ +{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ +{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ +{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ +{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ +{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ +{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ +{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ +{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ +{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ +{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ +{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ +{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ +{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ +{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ +{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ +{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ +{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ +{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ +{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ +{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ +{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ +{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ +{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ +{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ +{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ +{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ +{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ +{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ +{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ +{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ +{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ +{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ +{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ +{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ +{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ +{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ +{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ +{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ +{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ +{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ +{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ +{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ +{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ +{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ +{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ +{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ +{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ +{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ +{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ +{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ +{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ +{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ +{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ +{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ +{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ +{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ +{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ +{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ +{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ +{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ +{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ +{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ +{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ +{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ +{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ +{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ +{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ +{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ +{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ +{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ +{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ +{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ +{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ +{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ +{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ +{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ +{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ +{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ +{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ +{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ +{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ +{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ +{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ +{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ +{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ +{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ +{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ +{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ +{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ +{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ +{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ +{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ +{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ +{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ +{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ +{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ +{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ +{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ +{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ +{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ +{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ +{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ +{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ +{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ +{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ +{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ +{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ +{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ +{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ +{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ +{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ +{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ +{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ +{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ +{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ +{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ +{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ +{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ +{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ +{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ +{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ +{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ +{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ +{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ +{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ +{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ +{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ +{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ +{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ +{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ +{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ +{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ +{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ +{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ +{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ +{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ +{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ +{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ +{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ +{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ +{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ +{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ +{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ +{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ +{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ +{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ +{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ +{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ +{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ +{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ +{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ +{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ +{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ +{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ +{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ +{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ +{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ +{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ +{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ +{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ +{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ +{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ +{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ +{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ +{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ +{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ +{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ +{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ +{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ +{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ +{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ +{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ +{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ +{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ +{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ +{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ +{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ +{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ +{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ +{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ +{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ +{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ +{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ +{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ +{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ +{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ +{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ +{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ +{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ +{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ +{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ +{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ +{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ +{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ +{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ +{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ +{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ +{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ +{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ +{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ +{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ +{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ +{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ +{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ +{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ +{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ +{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ +{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ +{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ +{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ +{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ +{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ +{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ +{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ +{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ +{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ +{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ +{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ +{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ +{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ +{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ +{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ +{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ +{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ +{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ +{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ +{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ +{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ +{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ +{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ +{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ +{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ +{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ +{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ +{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ +{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ +{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ +{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ +{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ +{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ +{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ +{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ +{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ +{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ +{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ +{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ +{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ +{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ +{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ +{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ +{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ +{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ +{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ +{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ +{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ +{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ +{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ +{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ +{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ +{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ +{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ +{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ +{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ +{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ +{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ +{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ +{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ +{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ +{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ +{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ +{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ +{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ +{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ +{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ +{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ +{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ +{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ +{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ +{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ +{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ +{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ +{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ +{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ +{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ +{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ +{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ +{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ +{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ +{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ +{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ +{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ +{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ +{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ +{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ +{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ +{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ +{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ +{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ +{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ +{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ +{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ +{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ +{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ +{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ +{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ +{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ +{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ +{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ +{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ +{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ +{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ +{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ +{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ +{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ +{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ +{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ +{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ +{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ +{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ +{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ +{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ +{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ +{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ +{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ +{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ +{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ +{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ +{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ +{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ +{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ +{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ +{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ +{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ +{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ +{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ +{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ +{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ +{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ +{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ +{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ +{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ +{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ +{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ +{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ +{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ +{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ +{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ +{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ +{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ +{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ +{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ +{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ +{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ +{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ +{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ +{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ +{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ +{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ +{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ +{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ +{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ +{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ +{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ +{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ +{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ +{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ +{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ +{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ +{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ +{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ +{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ +{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ +{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ +{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ +{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ +{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ +{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ +{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ +{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ +{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ +{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ +{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ +{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ +{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ +{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ +{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ +{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ +{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ +{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ +{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ +{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ +{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ +{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ +{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ +{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ +{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ +{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ +{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ +{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ +{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ +{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ +{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ +{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ +{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ +{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ +{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ +{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ +{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ +{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ +{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ +{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ +{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ +{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ +{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ +{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ +{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ +{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ +{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ +{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ +{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ +{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ +{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ +{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ +{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ +{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ +{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ +{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ +{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ +{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ +{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ +{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ +{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ +{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ +{ 0, 0, 0 }}; +struct cputbl CPUFUNC(op_smalltbl_3)[] = { +{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ +{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ +{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ +{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ +{ CPUFUNC(op_30_3), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ +{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ +{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ +{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ +{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ +{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ +{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ +{ CPUFUNC(op_70_3), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ +{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ +{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ +{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ +{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ +{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ +{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ +{ CPUFUNC(op_b0_3), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ +{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ +{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ +{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ +{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ +{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ +{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ +{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ +{ CPUFUNC(op_130_3), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ +{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ +{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ +{ CPUFUNC(op_13b_3), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ +{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ +{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ +{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ +{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ +{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ +{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ +{ CPUFUNC(op_170_3), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ +{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ +{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ +{ CPUFUNC(op_17b_3), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ +{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ +{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ +{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ +{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ +{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ +{ CPUFUNC(op_1b0_3), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ +{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ +{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ +{ CPUFUNC(op_1bb_3), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ +{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ +{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ +{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ +{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ +{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ +{ CPUFUNC(op_1f0_3), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ +{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ +{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ +{ CPUFUNC(op_1fb_3), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ +{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ +{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ +{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ +{ CPUFUNC(op_230_3), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ +{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ +{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ +{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ +{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ +{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ +{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ +{ CPUFUNC(op_270_3), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ +{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ +{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ +{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ +{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ +{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ +{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ +{ CPUFUNC(op_2b0_3), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ +{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ +{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ +{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ +{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ +{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ +{ CPUFUNC(op_430_3), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ +{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ +{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ +{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ +{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ +{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ +{ CPUFUNC(op_470_3), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ +{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ +{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ +{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ +{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ +{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ +{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ +{ CPUFUNC(op_4b0_3), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ +{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ +{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ +{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ +{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ +{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ +{ CPUFUNC(op_630_3), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ +{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ +{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ +{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ +{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ +{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ +{ CPUFUNC(op_670_3), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ +{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ +{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ +{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ +{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ +{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ +{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ +{ CPUFUNC(op_6b0_3), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ +{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ +{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ +{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ +{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ +{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ +{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ +{ CPUFUNC(op_830_3), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ +{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ +{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ +{ CPUFUNC(op_83b_3), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ +{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ +{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ +{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ +{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ +{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ +{ CPUFUNC(op_870_3), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ +{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ +{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ +{ CPUFUNC(op_87b_3), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ +{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ +{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ +{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ +{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ +{ CPUFUNC(op_8b0_3), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ +{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ +{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ +{ CPUFUNC(op_8bb_3), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ +{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ +{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ +{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ +{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ +{ CPUFUNC(op_8f0_3), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ +{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ +{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ +{ CPUFUNC(op_8fb_3), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ +{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ +{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ +{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ +{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ +{ CPUFUNC(op_a30_3), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ +{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ +{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ +{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ +{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ +{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ +{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ +{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ +{ CPUFUNC(op_a70_3), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ +{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ +{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ +{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ +{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ +{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ +{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ +{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ +{ CPUFUNC(op_ab0_3), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ +{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ +{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ +{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ +{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ +{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ +{ CPUFUNC(op_c30_3), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ +{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ +{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ +{ CPUFUNC(op_c3b_3), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ +{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ +{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ +{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ +{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ +{ CPUFUNC(op_c70_3), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ +{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ +{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ +{ CPUFUNC(op_c7b_3), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ +{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ +{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ +{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ +{ CPUFUNC(op_cb0_3), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ +{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ +{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ +{ CPUFUNC(op_cbb_3), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ +{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ +{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ +{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ +{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ +{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ +{ CPUFUNC(op_1030_3), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ +{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ +{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ +{ CPUFUNC(op_103b_3), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ +{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ +{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ +{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ +{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ +{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ +{ CPUFUNC(op_10b0_3), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ +{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ +{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ +{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ +{ CPUFUNC(op_10bb_3), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ +{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ +{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ +{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ +{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ +{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ +{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ +{ CPUFUNC(op_10f0_3), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ +{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ +{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ +{ CPUFUNC(op_10fb_3), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ +{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ +{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ +{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ +{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ +{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ +{ CPUFUNC(op_1130_3), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ +{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ +{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ +{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ +{ CPUFUNC(op_113b_3), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ +{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ +{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ +{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ +{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ +{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ +{ CPUFUNC(op_1170_3), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ +{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ +{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ +{ CPUFUNC(op_117b_3), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ +{ CPUFUNC(op_1180_3), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1190_3), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ +{ CPUFUNC(op_1198_3), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_11a0_3), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ +{ CPUFUNC(op_11a8_3), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_11b0_3), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11b8_3), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_11b9_3), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_11ba_3), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_11bb_3), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11bc_3), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ +{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ +{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ +{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ +{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ +{ CPUFUNC(op_11f0_3), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ +{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ +{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ +{ CPUFUNC(op_11fb_3), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ +{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ +{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ +{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ +{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ +{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ +{ CPUFUNC(op_13f0_3), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ +{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ +{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ +{ CPUFUNC(op_13fb_3), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ +{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ +{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ +{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ +{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ +{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ +{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ +{ CPUFUNC(op_2030_3), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ +{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ +{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ +{ CPUFUNC(op_203b_3), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ +{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ +{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ +{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ +{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ +{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ +{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ +{ CPUFUNC_FF(op_2070_3), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_207b_3), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ +{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ +{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ +{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ +{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ +{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ +{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ +{ CPUFUNC(op_20b0_3), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ +{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ +{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ +{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ +{ CPUFUNC(op_20bb_3), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ +{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ +{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ +{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ +{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ +{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ +{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ +{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ +{ CPUFUNC(op_20f0_3), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ +{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ +{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ +{ CPUFUNC(op_20fb_3), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ +{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ +{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ +{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ +{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ +{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ +{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ +{ CPUFUNC(op_2130_3), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ +{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ +{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ +{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ +{ CPUFUNC(op_213b_3), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ +{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ +{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ +{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ +{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ +{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ +{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ +{ CPUFUNC(op_2170_3), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ +{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ +{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ +{ CPUFUNC(op_217b_3), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ +{ CPUFUNC(op_2180_3), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_2188_3), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ +{ CPUFUNC(op_2190_3), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ +{ CPUFUNC(op_2198_3), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_21a0_3), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ +{ CPUFUNC(op_21a8_3), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_21b0_3), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21b8_3), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_21b9_3), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_21ba_3), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_21bb_3), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21bc_3), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ +{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ +{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ +{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ +{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ +{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ +{ CPUFUNC(op_21f0_3), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ +{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ +{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ +{ CPUFUNC(op_21fb_3), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ +{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ +{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ +{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ +{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ +{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ +{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ +{ CPUFUNC(op_23f0_3), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ +{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ +{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ +{ CPUFUNC(op_23fb_3), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ +{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ +{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ +{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ +{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ +{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ +{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ +{ CPUFUNC(op_3030_3), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ +{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ +{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ +{ CPUFUNC(op_303b_3), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ +{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ +{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ +{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ +{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ +{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ +{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ +{ CPUFUNC_FF(op_3070_3), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ +{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ +{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ +{ CPUFUNC_FF(op_307b_3), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ +{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ +{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ +{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ +{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ +{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ +{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ +{ CPUFUNC(op_30b0_3), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ +{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ +{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ +{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ +{ CPUFUNC(op_30bb_3), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ +{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ +{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ +{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ +{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ +{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ +{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ +{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ +{ CPUFUNC(op_30f0_3), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ +{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ +{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ +{ CPUFUNC(op_30fb_3), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ +{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ +{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ +{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ +{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ +{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ +{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ +{ CPUFUNC(op_3130_3), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ +{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ +{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ +{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ +{ CPUFUNC(op_313b_3), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ +{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ +{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ +{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ +{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ +{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ +{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ +{ CPUFUNC(op_3170_3), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ +{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ +{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ +{ CPUFUNC(op_317b_3), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ +{ CPUFUNC(op_3180_3), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_3188_3), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ +{ CPUFUNC(op_3190_3), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ +{ CPUFUNC(op_3198_3), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_31a0_3), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ +{ CPUFUNC(op_31a8_3), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_31b0_3), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31b8_3), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_31b9_3), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_31ba_3), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_31bb_3), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31bc_3), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ +{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ +{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ +{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ +{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ +{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ +{ CPUFUNC(op_31f0_3), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ +{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ +{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ +{ CPUFUNC(op_31fb_3), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ +{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ +{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ +{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ +{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ +{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ +{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ +{ CPUFUNC(op_33f0_3), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ +{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ +{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ +{ CPUFUNC(op_33fb_3), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ +{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ +{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ +{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ +{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ +{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ +{ CPUFUNC(op_4030_3), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ +{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ +{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ +{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ +{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ +{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ +{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ +{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ +{ CPUFUNC(op_4070_3), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ +{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ +{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ +{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ +{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ +{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ +{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ +{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ +{ CPUFUNC(op_40b0_3), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ +{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ +{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ +{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ +{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ +{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ +{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ +{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ +{ CPUFUNC_FF(op_40f0_3), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ +{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ +{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ +{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ +{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ +{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ +{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ +{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ +{ CPUFUNC(op_4130_3), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ +{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ +{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ +{ CPUFUNC(op_413b_3), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ +{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ +{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ +{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ +{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ +{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ +{ CPUFUNC(op_41b0_3), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ +{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ +{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ +{ CPUFUNC(op_41bb_3), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ +{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ +{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ +{ CPUFUNC_FF(op_41f0_3), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_41fb_3), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ +{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ +{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ +{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ +{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ +{ CPUFUNC(op_4230_3), 0, 16944 }, /* CLR.B (d8,An,Xn) */ +{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ +{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ +{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ +{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ +{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ +{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ +{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ +{ CPUFUNC(op_4270_3), 0, 17008 }, /* CLR.W (d8,An,Xn) */ +{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ +{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ +{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ +{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ +{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ +{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ +{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ +{ CPUFUNC(op_42b0_3), 0, 17072 }, /* CLR.L (d8,An,Xn) */ +{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ +{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ +{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ +{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ +{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ +{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ +{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ +{ CPUFUNC_FF(op_42f0_3), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ +{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ +{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ +{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ +{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ +{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ +{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ +{ CPUFUNC(op_4430_3), 0, 17456 }, /* NEG.B (d8,An,Xn) */ +{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ +{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ +{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ +{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ +{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ +{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ +{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ +{ CPUFUNC(op_4470_3), 0, 17520 }, /* NEG.W (d8,An,Xn) */ +{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ +{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ +{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ +{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ +{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ +{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ +{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ +{ CPUFUNC(op_44b0_3), 0, 17584 }, /* NEG.L (d8,An,Xn) */ +{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ +{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ +{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ +{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ +{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ +{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ +{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ +{ CPUFUNC(op_44f0_3), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ +{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ +{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ +{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ +{ CPUFUNC(op_44fb_3), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ +{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ +{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ +{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ +{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ +{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ +{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ +{ CPUFUNC(op_4630_3), 0, 17968 }, /* NOT.B (d8,An,Xn) */ +{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ +{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ +{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ +{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ +{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ +{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ +{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ +{ CPUFUNC(op_4670_3), 0, 18032 }, /* NOT.W (d8,An,Xn) */ +{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ +{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ +{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ +{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ +{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ +{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ +{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ +{ CPUFUNC(op_46b0_3), 0, 18096 }, /* NOT.L (d8,An,Xn) */ +{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ +{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ +{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ +{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ +{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ +{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ +{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ +{ CPUFUNC(op_46f0_3), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ +{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ +{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ +{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ +{ CPUFUNC(op_46fb_3), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ +{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ +{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ +{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ +{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ +{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ +{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ +{ CPUFUNC(op_4830_3), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ +{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ +{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ +{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ +{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ +{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ +{ CPUFUNC_FF(op_4870_3), 0, 18544 }, /* PEA.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ +{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ +{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ +{ CPUFUNC_FF(op_487b_3), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ +{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ +{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ +{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ +{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_48b0_3), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ +{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ +{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ +{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ +{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_48f0_3), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ +{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ +{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ +{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ +{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ +{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ +{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ +{ CPUFUNC(op_4a30_3), 0, 18992 }, /* TST.B (d8,An,Xn) */ +{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ +{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ +{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ +{ CPUFUNC(op_4a3b_3), 0, 19003 }, /* TST.B (d8,PC,Xn) */ +{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ +{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ +{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ +{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ +{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ +{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ +{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ +{ CPUFUNC(op_4a70_3), 0, 19056 }, /* TST.W (d8,An,Xn) */ +{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ +{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ +{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ +{ CPUFUNC(op_4a7b_3), 0, 19067 }, /* TST.W (d8,PC,Xn) */ +{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ +{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ +{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ +{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ +{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ +{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ +{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ +{ CPUFUNC(op_4ab0_3), 0, 19120 }, /* TST.L (d8,An,Xn) */ +{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ +{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ +{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ +{ CPUFUNC(op_4abb_3), 0, 19131 }, /* TST.L (d8,PC,Xn) */ +{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ +{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ +{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ +{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ +{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ +{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ +{ CPUFUNC(op_4af0_3), 0, 19184 }, /* TAS.B (d8,An,Xn) */ +{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ +{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ +{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ +{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ +{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cb0_3), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cbb_3), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ +{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ +{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cf0_3), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cfb_3), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ +{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ +{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ +{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ +{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ +{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ +{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ +{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ +{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ +{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ +{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ +{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ +{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ +{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ +{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ +{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ +{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ +{ CPUFUNC_FF(op_4eb0_3), 0, 20144 }, /* JSR.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ +{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ +{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ +{ CPUFUNC_FF(op_4ebb_3), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ +{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ +{ CPUFUNC_FF(op_4ef0_3), 0, 20208 }, /* JMP.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ +{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ +{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ +{ CPUFUNC_FF(op_4efb_3), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ +{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ +{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ +{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ +{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ +{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ +{ CPUFUNC(op_5030_3), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ +{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ +{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ +{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ +{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ +{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ +{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ +{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ +{ CPUFUNC(op_5070_3), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ +{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ +{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ +{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ +{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ +{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ +{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ +{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ +{ CPUFUNC(op_50b0_3), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ +{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ +{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ +{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_50f0_3), 0, 20720 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ +{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ +{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ +{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ +{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ +{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ +{ CPUFUNC(op_5130_3), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ +{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ +{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ +{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ +{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ +{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ +{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ +{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ +{ CPUFUNC(op_5170_3), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ +{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ +{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ +{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ +{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ +{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ +{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ +{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ +{ CPUFUNC(op_51b0_3), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ +{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ +{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ +{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_51f0_3), 0, 20976 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_52f0_3), 0, 21232 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_53f0_3), 0, 21488 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_54f0_3), 0, 21744 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_55f0_3), 0, 22000 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_56f0_3), 0, 22256 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_57f0_3), 0, 22512 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_58f0_3), 0, 22768 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_59f0_3), 0, 23024 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5af0_3), 0, 23280 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5bf0_3), 0, 23536 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5cf0_3), 0, 23792 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5df0_3), 0, 24048 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ef0_3), 0, 24304 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ff0_3), 0, 24560 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_60ff_3), 0, 24831 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ +{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ +{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ +{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_62ff_3), 0, 25343 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_63ff_3), 0, 25599 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_64ff_3), 0, 25855 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_65ff_3), 0, 26111 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_66ff_3), 0, 26367 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_67ff_3), 0, 26623 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_68ff_3), 0, 26879 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_69ff_3), 0, 27135 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6aff_3), 0, 27391 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6bff_3), 0, 27647 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6cff_3), 0, 27903 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6dff_3), 0, 28159 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6eff_3), 0, 28415 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6fff_3), 0, 28671 }, /* Bcc.L #.L */ +{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ +{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ +{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ +{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ +{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ +{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ +{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ +{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ +{ CPUFUNC(op_8030_3), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ +{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ +{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ +{ CPUFUNC(op_803b_3), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ +{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ +{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ +{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ +{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ +{ CPUFUNC(op_8070_3), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ +{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ +{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ +{ CPUFUNC(op_807b_3), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ +{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ +{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ +{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ +{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ +{ CPUFUNC(op_80b0_3), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ +{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ +{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ +{ CPUFUNC(op_80bb_3), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ +{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ +{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ +{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ +{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ +{ CPUFUNC(op_80f0_3), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ +{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ +{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ +{ CPUFUNC(op_80fb_3), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ +{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ +{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ +{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ +{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ +{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ +{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ +{ CPUFUNC(op_8130_3), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ +{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ +{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ +{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ +{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ +{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ +{ CPUFUNC(op_8170_3), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ +{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ +{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ +{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ +{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ +{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ +{ CPUFUNC(op_81b0_3), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ +{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ +{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ +{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ +{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ +{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ +{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ +{ CPUFUNC(op_81f0_3), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ +{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ +{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ +{ CPUFUNC(op_81fb_3), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ +{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ +{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ +{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ +{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ +{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ +{ CPUFUNC(op_9030_3), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ +{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ +{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ +{ CPUFUNC(op_903b_3), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ +{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ +{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ +{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ +{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ +{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ +{ CPUFUNC(op_9070_3), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ +{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ +{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ +{ CPUFUNC(op_907b_3), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ +{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ +{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ +{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ +{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ +{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ +{ CPUFUNC(op_90b0_3), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ +{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ +{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ +{ CPUFUNC(op_90bb_3), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ +{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ +{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ +{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ +{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ +{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ +{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ +{ CPUFUNC_FF(op_90f0_3), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ +{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ +{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ +{ CPUFUNC_FF(op_90fb_3), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ +{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ +{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ +{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ +{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ +{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ +{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ +{ CPUFUNC(op_9130_3), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ +{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ +{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ +{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ +{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ +{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ +{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ +{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ +{ CPUFUNC(op_9170_3), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ +{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ +{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ +{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ +{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ +{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ +{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ +{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ +{ CPUFUNC(op_91b0_3), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ +{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ +{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ +{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ +{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ +{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ +{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ +{ CPUFUNC_FF(op_91f0_3), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ +{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ +{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ +{ CPUFUNC_FF(op_91fb_3), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ +{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ +{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ +{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ +{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ +{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ +{ CPUFUNC(op_b030_3), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ +{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ +{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ +{ CPUFUNC(op_b03b_3), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ +{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ +{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ +{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ +{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ +{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ +{ CPUFUNC(op_b070_3), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ +{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ +{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ +{ CPUFUNC(op_b07b_3), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ +{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ +{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ +{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ +{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ +{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ +{ CPUFUNC(op_b0b0_3), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ +{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ +{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ +{ CPUFUNC(op_b0bb_3), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ +{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ +{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ +{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ +{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ +{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ +{ CPUFUNC(op_b0f0_3), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ +{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ +{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ +{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ +{ CPUFUNC(op_b0fb_3), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ +{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ +{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ +{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ +{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ +{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ +{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ +{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ +{ CPUFUNC(op_b130_3), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ +{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ +{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ +{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ +{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ +{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ +{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ +{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ +{ CPUFUNC(op_b170_3), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ +{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ +{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ +{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ +{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ +{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ +{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ +{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ +{ CPUFUNC(op_b1b0_3), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ +{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ +{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ +{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ +{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ +{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ +{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ +{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ +{ CPUFUNC(op_b1f0_3), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ +{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ +{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ +{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ +{ CPUFUNC(op_b1fb_3), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ +{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ +{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ +{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ +{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ +{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ +{ CPUFUNC(op_c030_3), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ +{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ +{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ +{ CPUFUNC(op_c03b_3), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ +{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ +{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ +{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ +{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ +{ CPUFUNC(op_c070_3), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ +{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ +{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ +{ CPUFUNC(op_c07b_3), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ +{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ +{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ +{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ +{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ +{ CPUFUNC(op_c0b0_3), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ +{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ +{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ +{ CPUFUNC(op_c0bb_3), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ +{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ +{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ +{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ +{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ +{ CPUFUNC(op_c0f0_3), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ +{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ +{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ +{ CPUFUNC(op_c0fb_3), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ +{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ +{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ +{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ +{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ +{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ +{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ +{ CPUFUNC(op_c130_3), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ +{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ +{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ +{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ +{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ +{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ +{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ +{ CPUFUNC(op_c170_3), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ +{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ +{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ +{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ +{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ +{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ +{ CPUFUNC(op_c1b0_3), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ +{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ +{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ +{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ +{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ +{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ +{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ +{ CPUFUNC(op_c1f0_3), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ +{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ +{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ +{ CPUFUNC(op_c1fb_3), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ +{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ +{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ +{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ +{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ +{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ +{ CPUFUNC(op_d030_3), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ +{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ +{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ +{ CPUFUNC(op_d03b_3), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ +{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ +{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ +{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ +{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ +{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ +{ CPUFUNC(op_d070_3), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ +{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ +{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ +{ CPUFUNC(op_d07b_3), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ +{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ +{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ +{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ +{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ +{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ +{ CPUFUNC(op_d0b0_3), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ +{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ +{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ +{ CPUFUNC(op_d0bb_3), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ +{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ +{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ +{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ +{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ +{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ +{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ +{ CPUFUNC_FF(op_d0f0_3), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ +{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ +{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ +{ CPUFUNC_FF(op_d0fb_3), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ +{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ +{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ +{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ +{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ +{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ +{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ +{ CPUFUNC(op_d130_3), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ +{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ +{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ +{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ +{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ +{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ +{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ +{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ +{ CPUFUNC(op_d170_3), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ +{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ +{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ +{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ +{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ +{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ +{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ +{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ +{ CPUFUNC(op_d1b0_3), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ +{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ +{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ +{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ +{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ +{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ +{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ +{ CPUFUNC_FF(op_d1f0_3), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ +{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ +{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ +{ CPUFUNC_FF(op_d1fb_3), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ +{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ +{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ +{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ +{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ +{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ +{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ +{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ +{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ +{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ +{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ +{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ +{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ +{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ +{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ +{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ +{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ +{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ +{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ +{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ +{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ +{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ +{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ +{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ +{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ +{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ +{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ +{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ +{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ +{ CPUFUNC(op_e0f0_3), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ +{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ +{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ +{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ +{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ +{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ +{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ +{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ +{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ +{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ +{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ +{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ +{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ +{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ +{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ +{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ +{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ +{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ +{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ +{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ +{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ +{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ +{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ +{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ +{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ +{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ +{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ +{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ +{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ +{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ +{ CPUFUNC(op_e1f0_3), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ +{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ +{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ +{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ +{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ +{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ +{ CPUFUNC(op_e2f0_3), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ +{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ +{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ +{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ +{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ +{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ +{ CPUFUNC(op_e3f0_3), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ +{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ +{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ +{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ +{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ +{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ +{ CPUFUNC(op_e4f0_3), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ +{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ +{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ +{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ +{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ +{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ +{ CPUFUNC(op_e5f0_3), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ +{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ +{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ +{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ +{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ +{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ +{ CPUFUNC(op_e6f0_3), 0, 59120 }, /* RORW.W (d8,An,Xn) */ +{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ +{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ +{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ +{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ +{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ +{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ +{ CPUFUNC(op_e7f0_3), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ +{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ +{ 0, 0, 0 }}; +struct cputbl CPUFUNC(op_smalltbl_4)[] = { +{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ +{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ +{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ +{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ +{ CPUFUNC(op_30_3), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ +{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ +{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ +{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ +{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ +{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ +{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ +{ CPUFUNC(op_70_3), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ +{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ +{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ +{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ +{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ +{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ +{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ +{ CPUFUNC(op_b0_3), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ +{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ +{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ +{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ +{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ +{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ +{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ +{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ +{ CPUFUNC(op_130_3), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ +{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ +{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ +{ CPUFUNC(op_13b_3), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ +{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ +{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ +{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ +{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ +{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ +{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ +{ CPUFUNC(op_170_3), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ +{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ +{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ +{ CPUFUNC(op_17b_3), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ +{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ +{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ +{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ +{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ +{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ +{ CPUFUNC(op_1b0_3), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ +{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ +{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ +{ CPUFUNC(op_1bb_3), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ +{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ +{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ +{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ +{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ +{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ +{ CPUFUNC(op_1f0_3), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ +{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ +{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ +{ CPUFUNC(op_1fb_3), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ +{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ +{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ +{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ +{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ +{ CPUFUNC(op_230_3), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ +{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ +{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ +{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ +{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ +{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ +{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ +{ CPUFUNC(op_270_3), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ +{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ +{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ +{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ +{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ +{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ +{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ +{ CPUFUNC(op_2b0_3), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ +{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ +{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ +{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ +{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ +{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ +{ CPUFUNC(op_430_3), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ +{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ +{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ +{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ +{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ +{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ +{ CPUFUNC(op_470_3), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ +{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ +{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ +{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ +{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ +{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ +{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ +{ CPUFUNC(op_4b0_3), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ +{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ +{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ +{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ +{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ +{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ +{ CPUFUNC(op_630_3), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ +{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ +{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ +{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ +{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ +{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ +{ CPUFUNC(op_670_3), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ +{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ +{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ +{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ +{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ +{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ +{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ +{ CPUFUNC(op_6b0_3), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ +{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ +{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ +{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ +{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ +{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ +{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ +{ CPUFUNC(op_830_3), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ +{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ +{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ +{ CPUFUNC(op_83b_3), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ +{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ +{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ +{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ +{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ +{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ +{ CPUFUNC(op_870_3), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ +{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ +{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ +{ CPUFUNC(op_87b_3), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ +{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ +{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ +{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ +{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ +{ CPUFUNC(op_8b0_3), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ +{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ +{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ +{ CPUFUNC(op_8bb_3), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ +{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ +{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ +{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ +{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ +{ CPUFUNC(op_8f0_3), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ +{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ +{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ +{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ +{ CPUFUNC(op_8fb_3), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ +{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ +{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ +{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ +{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ +{ CPUFUNC(op_a30_3), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ +{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ +{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ +{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ +{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ +{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ +{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ +{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ +{ CPUFUNC(op_a70_3), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ +{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ +{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ +{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ +{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ +{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ +{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ +{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ +{ CPUFUNC(op_ab0_3), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ +{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ +{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ +{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ +{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ +{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ +{ CPUFUNC(op_c30_3), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ +{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ +{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ +{ CPUFUNC(op_c3b_3), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ +{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ +{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ +{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ +{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ +{ CPUFUNC(op_c70_3), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ +{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ +{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ +{ CPUFUNC(op_c7b_3), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ +{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ +{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ +{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ +{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ +{ CPUFUNC(op_cb0_3), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ +{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ +{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ +{ CPUFUNC(op_cbb_3), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ +{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ +{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ +{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ +{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ +{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ +{ CPUFUNC(op_1030_3), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ +{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ +{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ +{ CPUFUNC(op_103b_3), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ +{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ +{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ +{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ +{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ +{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ +{ CPUFUNC(op_10b0_3), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ +{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ +{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ +{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ +{ CPUFUNC(op_10bb_3), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ +{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ +{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ +{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ +{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ +{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ +{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ +{ CPUFUNC(op_10f0_3), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ +{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ +{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ +{ CPUFUNC(op_10fb_3), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ +{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ +{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ +{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ +{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ +{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ +{ CPUFUNC(op_1130_3), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ +{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ +{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ +{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ +{ CPUFUNC(op_113b_3), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ +{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ +{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ +{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ +{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ +{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ +{ CPUFUNC(op_1170_3), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ +{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ +{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ +{ CPUFUNC(op_117b_3), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ +{ CPUFUNC(op_1180_3), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_1190_3), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ +{ CPUFUNC(op_1198_3), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_11a0_3), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ +{ CPUFUNC(op_11a8_3), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_11b0_3), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11b8_3), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_11b9_3), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_11ba_3), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_11bb_3), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_11bc_3), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ +{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ +{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ +{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ +{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ +{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ +{ CPUFUNC(op_11f0_3), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ +{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ +{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ +{ CPUFUNC(op_11fb_3), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ +{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ +{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ +{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ +{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ +{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ +{ CPUFUNC(op_13f0_3), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ +{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ +{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ +{ CPUFUNC(op_13fb_3), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ +{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ +{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ +{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ +{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ +{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ +{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ +{ CPUFUNC(op_2030_3), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ +{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ +{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ +{ CPUFUNC(op_203b_3), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ +{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ +{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ +{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ +{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ +{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ +{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ +{ CPUFUNC_FF(op_2070_3), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_207b_3), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ +{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ +{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ +{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ +{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ +{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ +{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ +{ CPUFUNC(op_20b0_3), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ +{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ +{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ +{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ +{ CPUFUNC(op_20bb_3), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ +{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ +{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ +{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ +{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ +{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ +{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ +{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ +{ CPUFUNC(op_20f0_3), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ +{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ +{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ +{ CPUFUNC(op_20fb_3), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ +{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ +{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ +{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ +{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ +{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ +{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ +{ CPUFUNC(op_2130_3), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ +{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ +{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ +{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ +{ CPUFUNC(op_213b_3), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ +{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ +{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ +{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ +{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ +{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ +{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ +{ CPUFUNC(op_2170_3), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ +{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ +{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ +{ CPUFUNC(op_217b_3), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ +{ CPUFUNC(op_2180_3), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_2188_3), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ +{ CPUFUNC(op_2190_3), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ +{ CPUFUNC(op_2198_3), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_21a0_3), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ +{ CPUFUNC(op_21a8_3), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_21b0_3), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21b8_3), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_21b9_3), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_21ba_3), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_21bb_3), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_21bc_3), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ +{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ +{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ +{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ +{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ +{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ +{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ +{ CPUFUNC(op_21f0_3), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ +{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ +{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ +{ CPUFUNC(op_21fb_3), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ +{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ +{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ +{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ +{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ +{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ +{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ +{ CPUFUNC(op_23f0_3), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ +{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ +{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ +{ CPUFUNC(op_23fb_3), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ +{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ +{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ +{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ +{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ +{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ +{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ +{ CPUFUNC(op_3030_3), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ +{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ +{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ +{ CPUFUNC(op_303b_3), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ +{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ +{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ +{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ +{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ +{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ +{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ +{ CPUFUNC_FF(op_3070_3), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ +{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ +{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ +{ CPUFUNC_FF(op_307b_3), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ +{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ +{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ +{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ +{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ +{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ +{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ +{ CPUFUNC(op_30b0_3), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ +{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ +{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ +{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ +{ CPUFUNC(op_30bb_3), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ +{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ +{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ +{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ +{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ +{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ +{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ +{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ +{ CPUFUNC(op_30f0_3), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ +{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ +{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ +{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ +{ CPUFUNC(op_30fb_3), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ +{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ +{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ +{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ +{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ +{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ +{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ +{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ +{ CPUFUNC(op_3130_3), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ +{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ +{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ +{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ +{ CPUFUNC(op_313b_3), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ +{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ +{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ +{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ +{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ +{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ +{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ +{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ +{ CPUFUNC(op_3170_3), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ +{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ +{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ +{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ +{ CPUFUNC(op_317b_3), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ +{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ +{ CPUFUNC(op_3180_3), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_3188_3), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ +{ CPUFUNC(op_3190_3), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ +{ CPUFUNC(op_3198_3), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ +{ CPUFUNC(op_31a0_3), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ +{ CPUFUNC(op_31a8_3), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ +{ CPUFUNC(op_31b0_3), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31b8_3), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ +{ CPUFUNC(op_31b9_3), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ +{ CPUFUNC(op_31ba_3), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ +{ CPUFUNC(op_31bb_3), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ +{ CPUFUNC(op_31bc_3), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ +{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ +{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ +{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ +{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ +{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ +{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ +{ CPUFUNC(op_31f0_3), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ +{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ +{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ +{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ +{ CPUFUNC(op_31fb_3), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ +{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ +{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ +{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ +{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ +{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ +{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ +{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ +{ CPUFUNC(op_33f0_3), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ +{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ +{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ +{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ +{ CPUFUNC(op_33fb_3), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ +{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ +{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ +{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ +{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ +{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ +{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ +{ CPUFUNC(op_4030_3), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ +{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ +{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ +{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ +{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ +{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ +{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ +{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ +{ CPUFUNC(op_4070_3), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ +{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ +{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ +{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ +{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ +{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ +{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ +{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ +{ CPUFUNC(op_40b0_3), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ +{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ +{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ +{ CPUFUNC_FF(op_40c0_4), 0, 16576 }, /* MVSR2.W Dn */ +{ CPUFUNC_FF(op_40d0_4), 0, 16592 }, /* MVSR2.W (An) */ +{ CPUFUNC_FF(op_40d8_4), 0, 16600 }, /* MVSR2.W (An)+ */ +{ CPUFUNC_FF(op_40e0_4), 0, 16608 }, /* MVSR2.W -(An) */ +{ CPUFUNC_FF(op_40e8_4), 0, 16616 }, /* MVSR2.W (d16,An) */ +{ CPUFUNC_FF(op_40f0_4), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ +{ CPUFUNC_FF(op_40f8_4), 0, 16632 }, /* MVSR2.W (xxx).W */ +{ CPUFUNC_FF(op_40f9_4), 0, 16633 }, /* MVSR2.W (xxx).L */ +{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ +{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ +{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ +{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ +{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ +{ CPUFUNC(op_4130_3), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ +{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ +{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ +{ CPUFUNC(op_413b_3), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ +{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ +{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ +{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ +{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ +{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ +{ CPUFUNC(op_41b0_3), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ +{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ +{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ +{ CPUFUNC(op_41bb_3), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ +{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ +{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ +{ CPUFUNC_FF(op_41f0_3), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ +{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ +{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ +{ CPUFUNC_FF(op_41fb_3), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ +{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ +{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ +{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ +{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ +{ CPUFUNC(op_4230_3), 0, 16944 }, /* CLR.B (d8,An,Xn) */ +{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ +{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ +{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ +{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ +{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ +{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ +{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ +{ CPUFUNC(op_4270_3), 0, 17008 }, /* CLR.W (d8,An,Xn) */ +{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ +{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ +{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ +{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ +{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ +{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ +{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ +{ CPUFUNC(op_42b0_3), 0, 17072 }, /* CLR.L (d8,An,Xn) */ +{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ +{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ +{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ +{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ +{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ +{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ +{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ +{ CPUFUNC(op_4430_3), 0, 17456 }, /* NEG.B (d8,An,Xn) */ +{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ +{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ +{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ +{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ +{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ +{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ +{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ +{ CPUFUNC(op_4470_3), 0, 17520 }, /* NEG.W (d8,An,Xn) */ +{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ +{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ +{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ +{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ +{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ +{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ +{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ +{ CPUFUNC(op_44b0_3), 0, 17584 }, /* NEG.L (d8,An,Xn) */ +{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ +{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ +{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ +{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ +{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ +{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ +{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ +{ CPUFUNC(op_44f0_3), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ +{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ +{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ +{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ +{ CPUFUNC(op_44fb_3), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ +{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ +{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ +{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ +{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ +{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ +{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ +{ CPUFUNC(op_4630_3), 0, 17968 }, /* NOT.B (d8,An,Xn) */ +{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ +{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ +{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ +{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ +{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ +{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ +{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ +{ CPUFUNC(op_4670_3), 0, 18032 }, /* NOT.W (d8,An,Xn) */ +{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ +{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ +{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ +{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ +{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ +{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ +{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ +{ CPUFUNC(op_46b0_3), 0, 18096 }, /* NOT.L (d8,An,Xn) */ +{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ +{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ +{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ +{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ +{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ +{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ +{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ +{ CPUFUNC(op_46f0_3), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ +{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ +{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ +{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ +{ CPUFUNC(op_46fb_3), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ +{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ +{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ +{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ +{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ +{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ +{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ +{ CPUFUNC(op_4830_3), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ +{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ +{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ +{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ +{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ +{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ +{ CPUFUNC_FF(op_4870_3), 0, 18544 }, /* PEA.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ +{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ +{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ +{ CPUFUNC_FF(op_487b_3), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ +{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ +{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ +{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ +{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_48b0_3), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ +{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ +{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ +{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ +{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_48f0_3), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ +{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ +{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ +{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ +{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ +{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ +{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ +{ CPUFUNC(op_4a30_3), 0, 18992 }, /* TST.B (d8,An,Xn) */ +{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ +{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ +{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ +{ CPUFUNC(op_4a3b_3), 0, 19003 }, /* TST.B (d8,PC,Xn) */ +{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ +{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ +{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ +{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ +{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ +{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ +{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ +{ CPUFUNC(op_4a70_3), 0, 19056 }, /* TST.W (d8,An,Xn) */ +{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ +{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ +{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ +{ CPUFUNC(op_4a7b_3), 0, 19067 }, /* TST.W (d8,PC,Xn) */ +{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ +{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ +{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ +{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ +{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ +{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ +{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ +{ CPUFUNC(op_4ab0_3), 0, 19120 }, /* TST.L (d8,An,Xn) */ +{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ +{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ +{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ +{ CPUFUNC(op_4abb_3), 0, 19131 }, /* TST.L (d8,PC,Xn) */ +{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ +{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ +{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ +{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ +{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ +{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ +{ CPUFUNC(op_4af0_3), 0, 19184 }, /* TAS.B (d8,An,Xn) */ +{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ +{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ +{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ +{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ +{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cb0_3), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cbb_3), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ +{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ +{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ +{ CPUFUNC_FF(op_4cf0_3), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ +{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ +{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ +{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ +{ CPUFUNC_FF(op_4cfb_3), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ +{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ +{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ +{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ +{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ +{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ +{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ +{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ +{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ +{ CPUFUNC(op_4e73_4), 0, 20083 }, /* RTE.L */ +{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ +{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ +{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ +{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ +{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ +{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ +{ CPUFUNC_FF(op_4eb0_3), 0, 20144 }, /* JSR.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ +{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ +{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ +{ CPUFUNC_FF(op_4ebb_3), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ +{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ +{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ +{ CPUFUNC_FF(op_4ef0_3), 0, 20208 }, /* JMP.L (d8,An,Xn) */ +{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ +{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ +{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ +{ CPUFUNC_FF(op_4efb_3), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ +{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ +{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ +{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ +{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ +{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ +{ CPUFUNC(op_5030_3), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ +{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ +{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ +{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ +{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ +{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ +{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ +{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ +{ CPUFUNC(op_5070_3), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ +{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ +{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ +{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ +{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ +{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ +{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ +{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ +{ CPUFUNC(op_50b0_3), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ +{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ +{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ +{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_50f0_3), 0, 20720 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ +{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ +{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ +{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ +{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ +{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ +{ CPUFUNC(op_5130_3), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ +{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ +{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ +{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ +{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ +{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ +{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ +{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ +{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ +{ CPUFUNC(op_5170_3), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ +{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ +{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ +{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ +{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ +{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ +{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ +{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ +{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ +{ CPUFUNC(op_51b0_3), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ +{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ +{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ +{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_51f0_3), 0, 20976 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_52f0_3), 0, 21232 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_53f0_3), 0, 21488 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_54f0_3), 0, 21744 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_55f0_3), 0, 22000 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_56f0_3), 0, 22256 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_57f0_3), 0, 22512 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_58f0_3), 0, 22768 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_59f0_3), 0, 23024 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5af0_3), 0, 23280 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5bf0_3), 0, 23536 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5cf0_3), 0, 23792 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5df0_3), 0, 24048 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ef0_3), 0, 24304 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ +{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ +{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ +{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ +{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ +{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ +{ CPUFUNC_FF(op_5ff0_3), 0, 24560 }, /* Scc.B (d8,An,Xn) */ +{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ +{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ +{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_60ff_3), 0, 24831 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ +{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ +{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ +{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_62ff_3), 0, 25343 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_63ff_3), 0, 25599 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_64ff_3), 0, 25855 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_65ff_3), 0, 26111 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_66ff_3), 0, 26367 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_67ff_3), 0, 26623 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_68ff_3), 0, 26879 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_69ff_3), 0, 27135 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6aff_3), 0, 27391 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6bff_3), 0, 27647 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6cff_3), 0, 27903 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6dff_3), 0, 28159 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6eff_3), 0, 28415 }, /* Bcc.L #.L */ +{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ +{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ +{ CPUFUNC_FF(op_6fff_3), 0, 28671 }, /* Bcc.L #.L */ +{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ +{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ +{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ +{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ +{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ +{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ +{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ +{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ +{ CPUFUNC(op_8030_3), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ +{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ +{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ +{ CPUFUNC(op_803b_3), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ +{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ +{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ +{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ +{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ +{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ +{ CPUFUNC(op_8070_3), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ +{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ +{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ +{ CPUFUNC(op_807b_3), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ +{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ +{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ +{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ +{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ +{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ +{ CPUFUNC(op_80b0_3), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ +{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ +{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ +{ CPUFUNC(op_80bb_3), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ +{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ +{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ +{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ +{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ +{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ +{ CPUFUNC(op_80f0_3), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ +{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ +{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ +{ CPUFUNC(op_80fb_3), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ +{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ +{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ +{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ +{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ +{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ +{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ +{ CPUFUNC(op_8130_3), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ +{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ +{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ +{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ +{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ +{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ +{ CPUFUNC(op_8170_3), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ +{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ +{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ +{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ +{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ +{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ +{ CPUFUNC(op_81b0_3), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ +{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ +{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ +{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ +{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ +{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ +{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ +{ CPUFUNC(op_81f0_3), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ +{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ +{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ +{ CPUFUNC(op_81fb_3), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ +{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ +{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ +{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ +{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ +{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ +{ CPUFUNC(op_9030_3), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ +{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ +{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ +{ CPUFUNC(op_903b_3), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ +{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ +{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ +{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ +{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ +{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ +{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ +{ CPUFUNC(op_9070_3), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ +{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ +{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ +{ CPUFUNC(op_907b_3), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ +{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ +{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ +{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ +{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ +{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ +{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ +{ CPUFUNC(op_90b0_3), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ +{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ +{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ +{ CPUFUNC(op_90bb_3), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ +{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ +{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ +{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ +{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ +{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ +{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ +{ CPUFUNC_FF(op_90f0_3), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ +{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ +{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ +{ CPUFUNC_FF(op_90fb_3), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ +{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ +{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ +{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ +{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ +{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ +{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ +{ CPUFUNC(op_9130_3), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ +{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ +{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ +{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ +{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ +{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ +{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ +{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ +{ CPUFUNC(op_9170_3), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ +{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ +{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ +{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ +{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ +{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ +{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ +{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ +{ CPUFUNC(op_91b0_3), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ +{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ +{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ +{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ +{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ +{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ +{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ +{ CPUFUNC_FF(op_91f0_3), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ +{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ +{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ +{ CPUFUNC_FF(op_91fb_3), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ +{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ +{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ +{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ +{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ +{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ +{ CPUFUNC(op_b030_3), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ +{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ +{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ +{ CPUFUNC(op_b03b_3), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ +{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ +{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ +{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ +{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ +{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ +{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ +{ CPUFUNC(op_b070_3), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ +{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ +{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ +{ CPUFUNC(op_b07b_3), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ +{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ +{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ +{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ +{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ +{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ +{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ +{ CPUFUNC(op_b0b0_3), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ +{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ +{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ +{ CPUFUNC(op_b0bb_3), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ +{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ +{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ +{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ +{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ +{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ +{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ +{ CPUFUNC(op_b0f0_3), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ +{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ +{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ +{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ +{ CPUFUNC(op_b0fb_3), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ +{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ +{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ +{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ +{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ +{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ +{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ +{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ +{ CPUFUNC(op_b130_3), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ +{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ +{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ +{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ +{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ +{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ +{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ +{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ +{ CPUFUNC(op_b170_3), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ +{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ +{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ +{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ +{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ +{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ +{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ +{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ +{ CPUFUNC(op_b1b0_3), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ +{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ +{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ +{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ +{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ +{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ +{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ +{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ +{ CPUFUNC(op_b1f0_3), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ +{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ +{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ +{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ +{ CPUFUNC(op_b1fb_3), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ +{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ +{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ +{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ +{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ +{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ +{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ +{ CPUFUNC(op_c030_3), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ +{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ +{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ +{ CPUFUNC(op_c03b_3), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ +{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ +{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ +{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ +{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ +{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ +{ CPUFUNC(op_c070_3), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ +{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ +{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ +{ CPUFUNC(op_c07b_3), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ +{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ +{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ +{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ +{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ +{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ +{ CPUFUNC(op_c0b0_3), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ +{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ +{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ +{ CPUFUNC(op_c0bb_3), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ +{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ +{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ +{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ +{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ +{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ +{ CPUFUNC(op_c0f0_3), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ +{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ +{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ +{ CPUFUNC(op_c0fb_3), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ +{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ +{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ +{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ +{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ +{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ +{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ +{ CPUFUNC(op_c130_3), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ +{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ +{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ +{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ +{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ +{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ +{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ +{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ +{ CPUFUNC(op_c170_3), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ +{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ +{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ +{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ +{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ +{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ +{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ +{ CPUFUNC(op_c1b0_3), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ +{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ +{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ +{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ +{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ +{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ +{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ +{ CPUFUNC(op_c1f0_3), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ +{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ +{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ +{ CPUFUNC(op_c1fb_3), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ +{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ +{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ +{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ +{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ +{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ +{ CPUFUNC(op_d030_3), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ +{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ +{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ +{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ +{ CPUFUNC(op_d03b_3), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ +{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ +{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ +{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ +{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ +{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ +{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ +{ CPUFUNC(op_d070_3), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ +{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ +{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ +{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ +{ CPUFUNC(op_d07b_3), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ +{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ +{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ +{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ +{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ +{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ +{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ +{ CPUFUNC(op_d0b0_3), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ +{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ +{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ +{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ +{ CPUFUNC(op_d0bb_3), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ +{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ +{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ +{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ +{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ +{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ +{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ +{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ +{ CPUFUNC_FF(op_d0f0_3), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ +{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ +{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ +{ CPUFUNC_FF(op_d0fb_3), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ +{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ +{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ +{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ +{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ +{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ +{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ +{ CPUFUNC(op_d130_3), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ +{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ +{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ +{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ +{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ +{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ +{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ +{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ +{ CPUFUNC(op_d170_3), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ +{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ +{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ +{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ +{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ +{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ +{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ +{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ +{ CPUFUNC(op_d1b0_3), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ +{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ +{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ +{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ +{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ +{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ +{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ +{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ +{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ +{ CPUFUNC_FF(op_d1f0_3), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ +{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ +{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ +{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ +{ CPUFUNC_FF(op_d1fb_3), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ +{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ +{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ +{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ +{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ +{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ +{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ +{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ +{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ +{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ +{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ +{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ +{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ +{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ +{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ +{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ +{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ +{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ +{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ +{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ +{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ +{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ +{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ +{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ +{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ +{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ +{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ +{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ +{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ +{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ +{ CPUFUNC(op_e0f0_3), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ +{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ +{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ +{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ +{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ +{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ +{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ +{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ +{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ +{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ +{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ +{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ +{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ +{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ +{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ +{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ +{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ +{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ +{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ +{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ +{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ +{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ +{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ +{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ +{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ +{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ +{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ +{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ +{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ +{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ +{ CPUFUNC(op_e1f0_3), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ +{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ +{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ +{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ +{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ +{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ +{ CPUFUNC(op_e2f0_3), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ +{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ +{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ +{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ +{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ +{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ +{ CPUFUNC(op_e3f0_3), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ +{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ +{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ +{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ +{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ +{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ +{ CPUFUNC(op_e4f0_3), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ +{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ +{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ +{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ +{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ +{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ +{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ +{ CPUFUNC(op_e5f0_3), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ +{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ +{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ +{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ +{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ +{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ +{ CPUFUNC(op_e6f0_3), 0, 59120 }, /* RORW.W (d8,An,Xn) */ +{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ +{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ +{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ +{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ +{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ +{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ +{ CPUFUNC(op_e7f0_3), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ +{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ +{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ +{ 0, 0, 0 }}; diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp new file mode 100644 index 000000000..e59ae0f0f --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp @@ -0,0 +1,2 @@ +#define NOFLAGS +#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cputbl.h b/BasiliskII/src/uae_cpu/cputbl.h new file mode 100644 index 000000000..421a51d37 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cputbl.h @@ -0,0 +1,4322 @@ +extern cpuop_func op_0_0_nf; +extern cpuop_func op_0_0_ff; +extern cpuop_func op_10_0_nf; +extern cpuop_func op_10_0_ff; +extern cpuop_func op_18_0_nf; +extern cpuop_func op_18_0_ff; +extern cpuop_func op_20_0_nf; +extern cpuop_func op_20_0_ff; +extern cpuop_func op_28_0_nf; +extern cpuop_func op_28_0_ff; +extern cpuop_func op_30_0_nf; +extern cpuop_func op_30_0_ff; +extern cpuop_func op_38_0_nf; +extern cpuop_func op_38_0_ff; +extern cpuop_func op_39_0_nf; +extern cpuop_func op_39_0_ff; +extern cpuop_func op_3c_0_nf; +extern cpuop_func op_3c_0_ff; +extern cpuop_func op_40_0_nf; +extern cpuop_func op_40_0_ff; +extern cpuop_func op_50_0_nf; +extern cpuop_func op_50_0_ff; +extern cpuop_func op_58_0_nf; +extern cpuop_func op_58_0_ff; +extern cpuop_func op_60_0_nf; +extern cpuop_func op_60_0_ff; +extern cpuop_func op_68_0_nf; +extern cpuop_func op_68_0_ff; +extern cpuop_func op_70_0_nf; +extern cpuop_func op_70_0_ff; +extern cpuop_func op_78_0_nf; +extern cpuop_func op_78_0_ff; +extern cpuop_func op_79_0_nf; +extern cpuop_func op_79_0_ff; +extern cpuop_func op_7c_0_nf; +extern cpuop_func op_7c_0_ff; +extern cpuop_func op_80_0_nf; +extern cpuop_func op_80_0_ff; +extern cpuop_func op_90_0_nf; +extern cpuop_func op_90_0_ff; +extern cpuop_func op_98_0_nf; +extern cpuop_func op_98_0_ff; +extern cpuop_func op_a0_0_nf; +extern cpuop_func op_a0_0_ff; +extern cpuop_func op_a8_0_nf; +extern cpuop_func op_a8_0_ff; +extern cpuop_func op_b0_0_nf; +extern cpuop_func op_b0_0_ff; +extern cpuop_func op_b8_0_nf; +extern cpuop_func op_b8_0_ff; +extern cpuop_func op_b9_0_nf; +extern cpuop_func op_b9_0_ff; +extern cpuop_func op_d0_0_nf; +extern cpuop_func op_d0_0_ff; +extern cpuop_func op_e8_0_nf; +extern cpuop_func op_e8_0_ff; +extern cpuop_func op_f0_0_nf; +extern cpuop_func op_f0_0_ff; +extern cpuop_func op_f8_0_nf; +extern cpuop_func op_f8_0_ff; +extern cpuop_func op_f9_0_nf; +extern cpuop_func op_f9_0_ff; +extern cpuop_func op_fa_0_nf; +extern cpuop_func op_fa_0_ff; +extern cpuop_func op_fb_0_nf; +extern cpuop_func op_fb_0_ff; +extern cpuop_func op_100_0_nf; +extern cpuop_func op_100_0_ff; +extern cpuop_func op_108_0_nf; +extern cpuop_func op_108_0_ff; +extern cpuop_func op_110_0_nf; +extern cpuop_func op_110_0_ff; +extern cpuop_func op_118_0_nf; +extern cpuop_func op_118_0_ff; +extern cpuop_func op_120_0_nf; +extern cpuop_func op_120_0_ff; +extern cpuop_func op_128_0_nf; +extern cpuop_func op_128_0_ff; +extern cpuop_func op_130_0_nf; +extern cpuop_func op_130_0_ff; +extern cpuop_func op_138_0_nf; +extern cpuop_func op_138_0_ff; +extern cpuop_func op_139_0_nf; +extern cpuop_func op_139_0_ff; +extern cpuop_func op_13a_0_nf; +extern cpuop_func op_13a_0_ff; +extern cpuop_func op_13b_0_nf; +extern cpuop_func op_13b_0_ff; +extern cpuop_func op_13c_0_nf; +extern cpuop_func op_13c_0_ff; +extern cpuop_func op_140_0_nf; +extern cpuop_func op_140_0_ff; +extern cpuop_func op_148_0_nf; +extern cpuop_func op_148_0_ff; +extern cpuop_func op_150_0_nf; +extern cpuop_func op_150_0_ff; +extern cpuop_func op_158_0_nf; +extern cpuop_func op_158_0_ff; +extern cpuop_func op_160_0_nf; +extern cpuop_func op_160_0_ff; +extern cpuop_func op_168_0_nf; +extern cpuop_func op_168_0_ff; +extern cpuop_func op_170_0_nf; +extern cpuop_func op_170_0_ff; +extern cpuop_func op_178_0_nf; +extern cpuop_func op_178_0_ff; +extern cpuop_func op_179_0_nf; +extern cpuop_func op_179_0_ff; +extern cpuop_func op_17a_0_nf; +extern cpuop_func op_17a_0_ff; +extern cpuop_func op_17b_0_nf; +extern cpuop_func op_17b_0_ff; +extern cpuop_func op_180_0_nf; +extern cpuop_func op_180_0_ff; +extern cpuop_func op_188_0_nf; +extern cpuop_func op_188_0_ff; +extern cpuop_func op_190_0_nf; +extern cpuop_func op_190_0_ff; +extern cpuop_func op_198_0_nf; +extern cpuop_func op_198_0_ff; +extern cpuop_func op_1a0_0_nf; +extern cpuop_func op_1a0_0_ff; +extern cpuop_func op_1a8_0_nf; +extern cpuop_func op_1a8_0_ff; +extern cpuop_func op_1b0_0_nf; +extern cpuop_func op_1b0_0_ff; +extern cpuop_func op_1b8_0_nf; +extern cpuop_func op_1b8_0_ff; +extern cpuop_func op_1b9_0_nf; +extern cpuop_func op_1b9_0_ff; +extern cpuop_func op_1ba_0_nf; +extern cpuop_func op_1ba_0_ff; +extern cpuop_func op_1bb_0_nf; +extern cpuop_func op_1bb_0_ff; +extern cpuop_func op_1c0_0_nf; +extern cpuop_func op_1c0_0_ff; +extern cpuop_func op_1c8_0_nf; +extern cpuop_func op_1c8_0_ff; +extern cpuop_func op_1d0_0_nf; +extern cpuop_func op_1d0_0_ff; +extern cpuop_func op_1d8_0_nf; +extern cpuop_func op_1d8_0_ff; +extern cpuop_func op_1e0_0_nf; +extern cpuop_func op_1e0_0_ff; +extern cpuop_func op_1e8_0_nf; +extern cpuop_func op_1e8_0_ff; +extern cpuop_func op_1f0_0_nf; +extern cpuop_func op_1f0_0_ff; +extern cpuop_func op_1f8_0_nf; +extern cpuop_func op_1f8_0_ff; +extern cpuop_func op_1f9_0_nf; +extern cpuop_func op_1f9_0_ff; +extern cpuop_func op_1fa_0_nf; +extern cpuop_func op_1fa_0_ff; +extern cpuop_func op_1fb_0_nf; +extern cpuop_func op_1fb_0_ff; +extern cpuop_func op_200_0_nf; +extern cpuop_func op_200_0_ff; +extern cpuop_func op_210_0_nf; +extern cpuop_func op_210_0_ff; +extern cpuop_func op_218_0_nf; +extern cpuop_func op_218_0_ff; +extern cpuop_func op_220_0_nf; +extern cpuop_func op_220_0_ff; +extern cpuop_func op_228_0_nf; +extern cpuop_func op_228_0_ff; +extern cpuop_func op_230_0_nf; +extern cpuop_func op_230_0_ff; +extern cpuop_func op_238_0_nf; +extern cpuop_func op_238_0_ff; +extern cpuop_func op_239_0_nf; +extern cpuop_func op_239_0_ff; +extern cpuop_func op_23c_0_nf; +extern cpuop_func op_23c_0_ff; +extern cpuop_func op_240_0_nf; +extern cpuop_func op_240_0_ff; +extern cpuop_func op_250_0_nf; +extern cpuop_func op_250_0_ff; +extern cpuop_func op_258_0_nf; +extern cpuop_func op_258_0_ff; +extern cpuop_func op_260_0_nf; +extern cpuop_func op_260_0_ff; +extern cpuop_func op_268_0_nf; +extern cpuop_func op_268_0_ff; +extern cpuop_func op_270_0_nf; +extern cpuop_func op_270_0_ff; +extern cpuop_func op_278_0_nf; +extern cpuop_func op_278_0_ff; +extern cpuop_func op_279_0_nf; +extern cpuop_func op_279_0_ff; +extern cpuop_func op_27c_0_nf; +extern cpuop_func op_27c_0_ff; +extern cpuop_func op_280_0_nf; +extern cpuop_func op_280_0_ff; +extern cpuop_func op_290_0_nf; +extern cpuop_func op_290_0_ff; +extern cpuop_func op_298_0_nf; +extern cpuop_func op_298_0_ff; +extern cpuop_func op_2a0_0_nf; +extern cpuop_func op_2a0_0_ff; +extern cpuop_func op_2a8_0_nf; +extern cpuop_func op_2a8_0_ff; +extern cpuop_func op_2b0_0_nf; +extern cpuop_func op_2b0_0_ff; +extern cpuop_func op_2b8_0_nf; +extern cpuop_func op_2b8_0_ff; +extern cpuop_func op_2b9_0_nf; +extern cpuop_func op_2b9_0_ff; +extern cpuop_func op_2d0_0_nf; +extern cpuop_func op_2d0_0_ff; +extern cpuop_func op_2e8_0_nf; +extern cpuop_func op_2e8_0_ff; +extern cpuop_func op_2f0_0_nf; +extern cpuop_func op_2f0_0_ff; +extern cpuop_func op_2f8_0_nf; +extern cpuop_func op_2f8_0_ff; +extern cpuop_func op_2f9_0_nf; +extern cpuop_func op_2f9_0_ff; +extern cpuop_func op_2fa_0_nf; +extern cpuop_func op_2fa_0_ff; +extern cpuop_func op_2fb_0_nf; +extern cpuop_func op_2fb_0_ff; +extern cpuop_func op_400_0_nf; +extern cpuop_func op_400_0_ff; +extern cpuop_func op_410_0_nf; +extern cpuop_func op_410_0_ff; +extern cpuop_func op_418_0_nf; +extern cpuop_func op_418_0_ff; +extern cpuop_func op_420_0_nf; +extern cpuop_func op_420_0_ff; +extern cpuop_func op_428_0_nf; +extern cpuop_func op_428_0_ff; +extern cpuop_func op_430_0_nf; +extern cpuop_func op_430_0_ff; +extern cpuop_func op_438_0_nf; +extern cpuop_func op_438_0_ff; +extern cpuop_func op_439_0_nf; +extern cpuop_func op_439_0_ff; +extern cpuop_func op_440_0_nf; +extern cpuop_func op_440_0_ff; +extern cpuop_func op_450_0_nf; +extern cpuop_func op_450_0_ff; +extern cpuop_func op_458_0_nf; +extern cpuop_func op_458_0_ff; +extern cpuop_func op_460_0_nf; +extern cpuop_func op_460_0_ff; +extern cpuop_func op_468_0_nf; +extern cpuop_func op_468_0_ff; +extern cpuop_func op_470_0_nf; +extern cpuop_func op_470_0_ff; +extern cpuop_func op_478_0_nf; +extern cpuop_func op_478_0_ff; +extern cpuop_func op_479_0_nf; +extern cpuop_func op_479_0_ff; +extern cpuop_func op_480_0_nf; +extern cpuop_func op_480_0_ff; +extern cpuop_func op_490_0_nf; +extern cpuop_func op_490_0_ff; +extern cpuop_func op_498_0_nf; +extern cpuop_func op_498_0_ff; +extern cpuop_func op_4a0_0_nf; +extern cpuop_func op_4a0_0_ff; +extern cpuop_func op_4a8_0_nf; +extern cpuop_func op_4a8_0_ff; +extern cpuop_func op_4b0_0_nf; +extern cpuop_func op_4b0_0_ff; +extern cpuop_func op_4b8_0_nf; +extern cpuop_func op_4b8_0_ff; +extern cpuop_func op_4b9_0_nf; +extern cpuop_func op_4b9_0_ff; +extern cpuop_func op_4d0_0_nf; +extern cpuop_func op_4d0_0_ff; +extern cpuop_func op_4e8_0_nf; +extern cpuop_func op_4e8_0_ff; +extern cpuop_func op_4f0_0_nf; +extern cpuop_func op_4f0_0_ff; +extern cpuop_func op_4f8_0_nf; +extern cpuop_func op_4f8_0_ff; +extern cpuop_func op_4f9_0_nf; +extern cpuop_func op_4f9_0_ff; +extern cpuop_func op_4fa_0_nf; +extern cpuop_func op_4fa_0_ff; +extern cpuop_func op_4fb_0_nf; +extern cpuop_func op_4fb_0_ff; +extern cpuop_func op_600_0_nf; +extern cpuop_func op_600_0_ff; +extern cpuop_func op_610_0_nf; +extern cpuop_func op_610_0_ff; +extern cpuop_func op_618_0_nf; +extern cpuop_func op_618_0_ff; +extern cpuop_func op_620_0_nf; +extern cpuop_func op_620_0_ff; +extern cpuop_func op_628_0_nf; +extern cpuop_func op_628_0_ff; +extern cpuop_func op_630_0_nf; +extern cpuop_func op_630_0_ff; +extern cpuop_func op_638_0_nf; +extern cpuop_func op_638_0_ff; +extern cpuop_func op_639_0_nf; +extern cpuop_func op_639_0_ff; +extern cpuop_func op_640_0_nf; +extern cpuop_func op_640_0_ff; +extern cpuop_func op_650_0_nf; +extern cpuop_func op_650_0_ff; +extern cpuop_func op_658_0_nf; +extern cpuop_func op_658_0_ff; +extern cpuop_func op_660_0_nf; +extern cpuop_func op_660_0_ff; +extern cpuop_func op_668_0_nf; +extern cpuop_func op_668_0_ff; +extern cpuop_func op_670_0_nf; +extern cpuop_func op_670_0_ff; +extern cpuop_func op_678_0_nf; +extern cpuop_func op_678_0_ff; +extern cpuop_func op_679_0_nf; +extern cpuop_func op_679_0_ff; +extern cpuop_func op_680_0_nf; +extern cpuop_func op_680_0_ff; +extern cpuop_func op_690_0_nf; +extern cpuop_func op_690_0_ff; +extern cpuop_func op_698_0_nf; +extern cpuop_func op_698_0_ff; +extern cpuop_func op_6a0_0_nf; +extern cpuop_func op_6a0_0_ff; +extern cpuop_func op_6a8_0_nf; +extern cpuop_func op_6a8_0_ff; +extern cpuop_func op_6b0_0_nf; +extern cpuop_func op_6b0_0_ff; +extern cpuop_func op_6b8_0_nf; +extern cpuop_func op_6b8_0_ff; +extern cpuop_func op_6b9_0_nf; +extern cpuop_func op_6b9_0_ff; +extern cpuop_func op_6c0_0_nf; +extern cpuop_func op_6c0_0_ff; +extern cpuop_func op_6c8_0_nf; +extern cpuop_func op_6c8_0_ff; +extern cpuop_func op_6d0_0_nf; +extern cpuop_func op_6d0_0_ff; +extern cpuop_func op_6e8_0_nf; +extern cpuop_func op_6e8_0_ff; +extern cpuop_func op_6f0_0_nf; +extern cpuop_func op_6f0_0_ff; +extern cpuop_func op_6f8_0_nf; +extern cpuop_func op_6f8_0_ff; +extern cpuop_func op_6f9_0_nf; +extern cpuop_func op_6f9_0_ff; +extern cpuop_func op_6fa_0_nf; +extern cpuop_func op_6fa_0_ff; +extern cpuop_func op_6fb_0_nf; +extern cpuop_func op_6fb_0_ff; +extern cpuop_func op_800_0_nf; +extern cpuop_func op_800_0_ff; +extern cpuop_func op_810_0_nf; +extern cpuop_func op_810_0_ff; +extern cpuop_func op_818_0_nf; +extern cpuop_func op_818_0_ff; +extern cpuop_func op_820_0_nf; +extern cpuop_func op_820_0_ff; +extern cpuop_func op_828_0_nf; +extern cpuop_func op_828_0_ff; +extern cpuop_func op_830_0_nf; +extern cpuop_func op_830_0_ff; +extern cpuop_func op_838_0_nf; +extern cpuop_func op_838_0_ff; +extern cpuop_func op_839_0_nf; +extern cpuop_func op_839_0_ff; +extern cpuop_func op_83a_0_nf; +extern cpuop_func op_83a_0_ff; +extern cpuop_func op_83b_0_nf; +extern cpuop_func op_83b_0_ff; +extern cpuop_func op_83c_0_nf; +extern cpuop_func op_83c_0_ff; +extern cpuop_func op_840_0_nf; +extern cpuop_func op_840_0_ff; +extern cpuop_func op_850_0_nf; +extern cpuop_func op_850_0_ff; +extern cpuop_func op_858_0_nf; +extern cpuop_func op_858_0_ff; +extern cpuop_func op_860_0_nf; +extern cpuop_func op_860_0_ff; +extern cpuop_func op_868_0_nf; +extern cpuop_func op_868_0_ff; +extern cpuop_func op_870_0_nf; +extern cpuop_func op_870_0_ff; +extern cpuop_func op_878_0_nf; +extern cpuop_func op_878_0_ff; +extern cpuop_func op_879_0_nf; +extern cpuop_func op_879_0_ff; +extern cpuop_func op_87a_0_nf; +extern cpuop_func op_87a_0_ff; +extern cpuop_func op_87b_0_nf; +extern cpuop_func op_87b_0_ff; +extern cpuop_func op_880_0_nf; +extern cpuop_func op_880_0_ff; +extern cpuop_func op_890_0_nf; +extern cpuop_func op_890_0_ff; +extern cpuop_func op_898_0_nf; +extern cpuop_func op_898_0_ff; +extern cpuop_func op_8a0_0_nf; +extern cpuop_func op_8a0_0_ff; +extern cpuop_func op_8a8_0_nf; +extern cpuop_func op_8a8_0_ff; +extern cpuop_func op_8b0_0_nf; +extern cpuop_func op_8b0_0_ff; +extern cpuop_func op_8b8_0_nf; +extern cpuop_func op_8b8_0_ff; +extern cpuop_func op_8b9_0_nf; +extern cpuop_func op_8b9_0_ff; +extern cpuop_func op_8ba_0_nf; +extern cpuop_func op_8ba_0_ff; +extern cpuop_func op_8bb_0_nf; +extern cpuop_func op_8bb_0_ff; +extern cpuop_func op_8c0_0_nf; +extern cpuop_func op_8c0_0_ff; +extern cpuop_func op_8d0_0_nf; +extern cpuop_func op_8d0_0_ff; +extern cpuop_func op_8d8_0_nf; +extern cpuop_func op_8d8_0_ff; +extern cpuop_func op_8e0_0_nf; +extern cpuop_func op_8e0_0_ff; +extern cpuop_func op_8e8_0_nf; +extern cpuop_func op_8e8_0_ff; +extern cpuop_func op_8f0_0_nf; +extern cpuop_func op_8f0_0_ff; +extern cpuop_func op_8f8_0_nf; +extern cpuop_func op_8f8_0_ff; +extern cpuop_func op_8f9_0_nf; +extern cpuop_func op_8f9_0_ff; +extern cpuop_func op_8fa_0_nf; +extern cpuop_func op_8fa_0_ff; +extern cpuop_func op_8fb_0_nf; +extern cpuop_func op_8fb_0_ff; +extern cpuop_func op_a00_0_nf; +extern cpuop_func op_a00_0_ff; +extern cpuop_func op_a10_0_nf; +extern cpuop_func op_a10_0_ff; +extern cpuop_func op_a18_0_nf; +extern cpuop_func op_a18_0_ff; +extern cpuop_func op_a20_0_nf; +extern cpuop_func op_a20_0_ff; +extern cpuop_func op_a28_0_nf; +extern cpuop_func op_a28_0_ff; +extern cpuop_func op_a30_0_nf; +extern cpuop_func op_a30_0_ff; +extern cpuop_func op_a38_0_nf; +extern cpuop_func op_a38_0_ff; +extern cpuop_func op_a39_0_nf; +extern cpuop_func op_a39_0_ff; +extern cpuop_func op_a3c_0_nf; +extern cpuop_func op_a3c_0_ff; +extern cpuop_func op_a40_0_nf; +extern cpuop_func op_a40_0_ff; +extern cpuop_func op_a50_0_nf; +extern cpuop_func op_a50_0_ff; +extern cpuop_func op_a58_0_nf; +extern cpuop_func op_a58_0_ff; +extern cpuop_func op_a60_0_nf; +extern cpuop_func op_a60_0_ff; +extern cpuop_func op_a68_0_nf; +extern cpuop_func op_a68_0_ff; +extern cpuop_func op_a70_0_nf; +extern cpuop_func op_a70_0_ff; +extern cpuop_func op_a78_0_nf; +extern cpuop_func op_a78_0_ff; +extern cpuop_func op_a79_0_nf; +extern cpuop_func op_a79_0_ff; +extern cpuop_func op_a7c_0_nf; +extern cpuop_func op_a7c_0_ff; +extern cpuop_func op_a80_0_nf; +extern cpuop_func op_a80_0_ff; +extern cpuop_func op_a90_0_nf; +extern cpuop_func op_a90_0_ff; +extern cpuop_func op_a98_0_nf; +extern cpuop_func op_a98_0_ff; +extern cpuop_func op_aa0_0_nf; +extern cpuop_func op_aa0_0_ff; +extern cpuop_func op_aa8_0_nf; +extern cpuop_func op_aa8_0_ff; +extern cpuop_func op_ab0_0_nf; +extern cpuop_func op_ab0_0_ff; +extern cpuop_func op_ab8_0_nf; +extern cpuop_func op_ab8_0_ff; +extern cpuop_func op_ab9_0_nf; +extern cpuop_func op_ab9_0_ff; +extern cpuop_func op_ad0_0_nf; +extern cpuop_func op_ad0_0_ff; +extern cpuop_func op_ad8_0_nf; +extern cpuop_func op_ad8_0_ff; +extern cpuop_func op_ae0_0_nf; +extern cpuop_func op_ae0_0_ff; +extern cpuop_func op_ae8_0_nf; +extern cpuop_func op_ae8_0_ff; +extern cpuop_func op_af0_0_nf; +extern cpuop_func op_af0_0_ff; +extern cpuop_func op_af8_0_nf; +extern cpuop_func op_af8_0_ff; +extern cpuop_func op_af9_0_nf; +extern cpuop_func op_af9_0_ff; +extern cpuop_func op_c00_0_nf; +extern cpuop_func op_c00_0_ff; +extern cpuop_func op_c10_0_nf; +extern cpuop_func op_c10_0_ff; +extern cpuop_func op_c18_0_nf; +extern cpuop_func op_c18_0_ff; +extern cpuop_func op_c20_0_nf; +extern cpuop_func op_c20_0_ff; +extern cpuop_func op_c28_0_nf; +extern cpuop_func op_c28_0_ff; +extern cpuop_func op_c30_0_nf; +extern cpuop_func op_c30_0_ff; +extern cpuop_func op_c38_0_nf; +extern cpuop_func op_c38_0_ff; +extern cpuop_func op_c39_0_nf; +extern cpuop_func op_c39_0_ff; +extern cpuop_func op_c3a_0_nf; +extern cpuop_func op_c3a_0_ff; +extern cpuop_func op_c3b_0_nf; +extern cpuop_func op_c3b_0_ff; +extern cpuop_func op_c40_0_nf; +extern cpuop_func op_c40_0_ff; +extern cpuop_func op_c50_0_nf; +extern cpuop_func op_c50_0_ff; +extern cpuop_func op_c58_0_nf; +extern cpuop_func op_c58_0_ff; +extern cpuop_func op_c60_0_nf; +extern cpuop_func op_c60_0_ff; +extern cpuop_func op_c68_0_nf; +extern cpuop_func op_c68_0_ff; +extern cpuop_func op_c70_0_nf; +extern cpuop_func op_c70_0_ff; +extern cpuop_func op_c78_0_nf; +extern cpuop_func op_c78_0_ff; +extern cpuop_func op_c79_0_nf; +extern cpuop_func op_c79_0_ff; +extern cpuop_func op_c7a_0_nf; +extern cpuop_func op_c7a_0_ff; +extern cpuop_func op_c7b_0_nf; +extern cpuop_func op_c7b_0_ff; +extern cpuop_func op_c80_0_nf; +extern cpuop_func op_c80_0_ff; +extern cpuop_func op_c90_0_nf; +extern cpuop_func op_c90_0_ff; +extern cpuop_func op_c98_0_nf; +extern cpuop_func op_c98_0_ff; +extern cpuop_func op_ca0_0_nf; +extern cpuop_func op_ca0_0_ff; +extern cpuop_func op_ca8_0_nf; +extern cpuop_func op_ca8_0_ff; +extern cpuop_func op_cb0_0_nf; +extern cpuop_func op_cb0_0_ff; +extern cpuop_func op_cb8_0_nf; +extern cpuop_func op_cb8_0_ff; +extern cpuop_func op_cb9_0_nf; +extern cpuop_func op_cb9_0_ff; +extern cpuop_func op_cba_0_nf; +extern cpuop_func op_cba_0_ff; +extern cpuop_func op_cbb_0_nf; +extern cpuop_func op_cbb_0_ff; +extern cpuop_func op_cd0_0_nf; +extern cpuop_func op_cd0_0_ff; +extern cpuop_func op_cd8_0_nf; +extern cpuop_func op_cd8_0_ff; +extern cpuop_func op_ce0_0_nf; +extern cpuop_func op_ce0_0_ff; +extern cpuop_func op_ce8_0_nf; +extern cpuop_func op_ce8_0_ff; +extern cpuop_func op_cf0_0_nf; +extern cpuop_func op_cf0_0_ff; +extern cpuop_func op_cf8_0_nf; +extern cpuop_func op_cf8_0_ff; +extern cpuop_func op_cf9_0_nf; +extern cpuop_func op_cf9_0_ff; +extern cpuop_func op_cfc_0_nf; +extern cpuop_func op_cfc_0_ff; +extern cpuop_func op_e10_0_nf; +extern cpuop_func op_e10_0_ff; +extern cpuop_func op_e18_0_nf; +extern cpuop_func op_e18_0_ff; +extern cpuop_func op_e20_0_nf; +extern cpuop_func op_e20_0_ff; +extern cpuop_func op_e28_0_nf; +extern cpuop_func op_e28_0_ff; +extern cpuop_func op_e30_0_nf; +extern cpuop_func op_e30_0_ff; +extern cpuop_func op_e38_0_nf; +extern cpuop_func op_e38_0_ff; +extern cpuop_func op_e39_0_nf; +extern cpuop_func op_e39_0_ff; +extern cpuop_func op_e50_0_nf; +extern cpuop_func op_e50_0_ff; +extern cpuop_func op_e58_0_nf; +extern cpuop_func op_e58_0_ff; +extern cpuop_func op_e60_0_nf; +extern cpuop_func op_e60_0_ff; +extern cpuop_func op_e68_0_nf; +extern cpuop_func op_e68_0_ff; +extern cpuop_func op_e70_0_nf; +extern cpuop_func op_e70_0_ff; +extern cpuop_func op_e78_0_nf; +extern cpuop_func op_e78_0_ff; +extern cpuop_func op_e79_0_nf; +extern cpuop_func op_e79_0_ff; +extern cpuop_func op_e90_0_nf; +extern cpuop_func op_e90_0_ff; +extern cpuop_func op_e98_0_nf; +extern cpuop_func op_e98_0_ff; +extern cpuop_func op_ea0_0_nf; +extern cpuop_func op_ea0_0_ff; +extern cpuop_func op_ea8_0_nf; +extern cpuop_func op_ea8_0_ff; +extern cpuop_func op_eb0_0_nf; +extern cpuop_func op_eb0_0_ff; +extern cpuop_func op_eb8_0_nf; +extern cpuop_func op_eb8_0_ff; +extern cpuop_func op_eb9_0_nf; +extern cpuop_func op_eb9_0_ff; +extern cpuop_func op_ed0_0_nf; +extern cpuop_func op_ed0_0_ff; +extern cpuop_func op_ed8_0_nf; +extern cpuop_func op_ed8_0_ff; +extern cpuop_func op_ee0_0_nf; +extern cpuop_func op_ee0_0_ff; +extern cpuop_func op_ee8_0_nf; +extern cpuop_func op_ee8_0_ff; +extern cpuop_func op_ef0_0_nf; +extern cpuop_func op_ef0_0_ff; +extern cpuop_func op_ef8_0_nf; +extern cpuop_func op_ef8_0_ff; +extern cpuop_func op_ef9_0_nf; +extern cpuop_func op_ef9_0_ff; +extern cpuop_func op_efc_0_nf; +extern cpuop_func op_efc_0_ff; +extern cpuop_func op_1000_0_nf; +extern cpuop_func op_1000_0_ff; +extern cpuop_func op_1010_0_nf; +extern cpuop_func op_1010_0_ff; +extern cpuop_func op_1018_0_nf; +extern cpuop_func op_1018_0_ff; +extern cpuop_func op_1020_0_nf; +extern cpuop_func op_1020_0_ff; +extern cpuop_func op_1028_0_nf; +extern cpuop_func op_1028_0_ff; +extern cpuop_func op_1030_0_nf; +extern cpuop_func op_1030_0_ff; +extern cpuop_func op_1038_0_nf; +extern cpuop_func op_1038_0_ff; +extern cpuop_func op_1039_0_nf; +extern cpuop_func op_1039_0_ff; +extern cpuop_func op_103a_0_nf; +extern cpuop_func op_103a_0_ff; +extern cpuop_func op_103b_0_nf; +extern cpuop_func op_103b_0_ff; +extern cpuop_func op_103c_0_nf; +extern cpuop_func op_103c_0_ff; +extern cpuop_func op_1080_0_nf; +extern cpuop_func op_1080_0_ff; +extern cpuop_func op_1090_0_nf; +extern cpuop_func op_1090_0_ff; +extern cpuop_func op_1098_0_nf; +extern cpuop_func op_1098_0_ff; +extern cpuop_func op_10a0_0_nf; +extern cpuop_func op_10a0_0_ff; +extern cpuop_func op_10a8_0_nf; +extern cpuop_func op_10a8_0_ff; +extern cpuop_func op_10b0_0_nf; +extern cpuop_func op_10b0_0_ff; +extern cpuop_func op_10b8_0_nf; +extern cpuop_func op_10b8_0_ff; +extern cpuop_func op_10b9_0_nf; +extern cpuop_func op_10b9_0_ff; +extern cpuop_func op_10ba_0_nf; +extern cpuop_func op_10ba_0_ff; +extern cpuop_func op_10bb_0_nf; +extern cpuop_func op_10bb_0_ff; +extern cpuop_func op_10bc_0_nf; +extern cpuop_func op_10bc_0_ff; +extern cpuop_func op_10c0_0_nf; +extern cpuop_func op_10c0_0_ff; +extern cpuop_func op_10d0_0_nf; +extern cpuop_func op_10d0_0_ff; +extern cpuop_func op_10d8_0_nf; +extern cpuop_func op_10d8_0_ff; +extern cpuop_func op_10e0_0_nf; +extern cpuop_func op_10e0_0_ff; +extern cpuop_func op_10e8_0_nf; +extern cpuop_func op_10e8_0_ff; +extern cpuop_func op_10f0_0_nf; +extern cpuop_func op_10f0_0_ff; +extern cpuop_func op_10f8_0_nf; +extern cpuop_func op_10f8_0_ff; +extern cpuop_func op_10f9_0_nf; +extern cpuop_func op_10f9_0_ff; +extern cpuop_func op_10fa_0_nf; +extern cpuop_func op_10fa_0_ff; +extern cpuop_func op_10fb_0_nf; +extern cpuop_func op_10fb_0_ff; +extern cpuop_func op_10fc_0_nf; +extern cpuop_func op_10fc_0_ff; +extern cpuop_func op_1100_0_nf; +extern cpuop_func op_1100_0_ff; +extern cpuop_func op_1110_0_nf; +extern cpuop_func op_1110_0_ff; +extern cpuop_func op_1118_0_nf; +extern cpuop_func op_1118_0_ff; +extern cpuop_func op_1120_0_nf; +extern cpuop_func op_1120_0_ff; +extern cpuop_func op_1128_0_nf; +extern cpuop_func op_1128_0_ff; +extern cpuop_func op_1130_0_nf; +extern cpuop_func op_1130_0_ff; +extern cpuop_func op_1138_0_nf; +extern cpuop_func op_1138_0_ff; +extern cpuop_func op_1139_0_nf; +extern cpuop_func op_1139_0_ff; +extern cpuop_func op_113a_0_nf; +extern cpuop_func op_113a_0_ff; +extern cpuop_func op_113b_0_nf; +extern cpuop_func op_113b_0_ff; +extern cpuop_func op_113c_0_nf; +extern cpuop_func op_113c_0_ff; +extern cpuop_func op_1140_0_nf; +extern cpuop_func op_1140_0_ff; +extern cpuop_func op_1150_0_nf; +extern cpuop_func op_1150_0_ff; +extern cpuop_func op_1158_0_nf; +extern cpuop_func op_1158_0_ff; +extern cpuop_func op_1160_0_nf; +extern cpuop_func op_1160_0_ff; +extern cpuop_func op_1168_0_nf; +extern cpuop_func op_1168_0_ff; +extern cpuop_func op_1170_0_nf; +extern cpuop_func op_1170_0_ff; +extern cpuop_func op_1178_0_nf; +extern cpuop_func op_1178_0_ff; +extern cpuop_func op_1179_0_nf; +extern cpuop_func op_1179_0_ff; +extern cpuop_func op_117a_0_nf; +extern cpuop_func op_117a_0_ff; +extern cpuop_func op_117b_0_nf; +extern cpuop_func op_117b_0_ff; +extern cpuop_func op_117c_0_nf; +extern cpuop_func op_117c_0_ff; +extern cpuop_func op_1180_0_nf; +extern cpuop_func op_1180_0_ff; +extern cpuop_func op_1190_0_nf; +extern cpuop_func op_1190_0_ff; +extern cpuop_func op_1198_0_nf; +extern cpuop_func op_1198_0_ff; +extern cpuop_func op_11a0_0_nf; +extern cpuop_func op_11a0_0_ff; +extern cpuop_func op_11a8_0_nf; +extern cpuop_func op_11a8_0_ff; +extern cpuop_func op_11b0_0_nf; +extern cpuop_func op_11b0_0_ff; +extern cpuop_func op_11b8_0_nf; +extern cpuop_func op_11b8_0_ff; +extern cpuop_func op_11b9_0_nf; +extern cpuop_func op_11b9_0_ff; +extern cpuop_func op_11ba_0_nf; +extern cpuop_func op_11ba_0_ff; +extern cpuop_func op_11bb_0_nf; +extern cpuop_func op_11bb_0_ff; +extern cpuop_func op_11bc_0_nf; +extern cpuop_func op_11bc_0_ff; +extern cpuop_func op_11c0_0_nf; +extern cpuop_func op_11c0_0_ff; +extern cpuop_func op_11d0_0_nf; +extern cpuop_func op_11d0_0_ff; +extern cpuop_func op_11d8_0_nf; +extern cpuop_func op_11d8_0_ff; +extern cpuop_func op_11e0_0_nf; +extern cpuop_func op_11e0_0_ff; +extern cpuop_func op_11e8_0_nf; +extern cpuop_func op_11e8_0_ff; +extern cpuop_func op_11f0_0_nf; +extern cpuop_func op_11f0_0_ff; +extern cpuop_func op_11f8_0_nf; +extern cpuop_func op_11f8_0_ff; +extern cpuop_func op_11f9_0_nf; +extern cpuop_func op_11f9_0_ff; +extern cpuop_func op_11fa_0_nf; +extern cpuop_func op_11fa_0_ff; +extern cpuop_func op_11fb_0_nf; +extern cpuop_func op_11fb_0_ff; +extern cpuop_func op_11fc_0_nf; +extern cpuop_func op_11fc_0_ff; +extern cpuop_func op_13c0_0_nf; +extern cpuop_func op_13c0_0_ff; +extern cpuop_func op_13d0_0_nf; +extern cpuop_func op_13d0_0_ff; +extern cpuop_func op_13d8_0_nf; +extern cpuop_func op_13d8_0_ff; +extern cpuop_func op_13e0_0_nf; +extern cpuop_func op_13e0_0_ff; +extern cpuop_func op_13e8_0_nf; +extern cpuop_func op_13e8_0_ff; +extern cpuop_func op_13f0_0_nf; +extern cpuop_func op_13f0_0_ff; +extern cpuop_func op_13f8_0_nf; +extern cpuop_func op_13f8_0_ff; +extern cpuop_func op_13f9_0_nf; +extern cpuop_func op_13f9_0_ff; +extern cpuop_func op_13fa_0_nf; +extern cpuop_func op_13fa_0_ff; +extern cpuop_func op_13fb_0_nf; +extern cpuop_func op_13fb_0_ff; +extern cpuop_func op_13fc_0_nf; +extern cpuop_func op_13fc_0_ff; +extern cpuop_func op_2000_0_nf; +extern cpuop_func op_2000_0_ff; +extern cpuop_func op_2008_0_nf; +extern cpuop_func op_2008_0_ff; +extern cpuop_func op_2010_0_nf; +extern cpuop_func op_2010_0_ff; +extern cpuop_func op_2018_0_nf; +extern cpuop_func op_2018_0_ff; +extern cpuop_func op_2020_0_nf; +extern cpuop_func op_2020_0_ff; +extern cpuop_func op_2028_0_nf; +extern cpuop_func op_2028_0_ff; +extern cpuop_func op_2030_0_nf; +extern cpuop_func op_2030_0_ff; +extern cpuop_func op_2038_0_nf; +extern cpuop_func op_2038_0_ff; +extern cpuop_func op_2039_0_nf; +extern cpuop_func op_2039_0_ff; +extern cpuop_func op_203a_0_nf; +extern cpuop_func op_203a_0_ff; +extern cpuop_func op_203b_0_nf; +extern cpuop_func op_203b_0_ff; +extern cpuop_func op_203c_0_nf; +extern cpuop_func op_203c_0_ff; +extern cpuop_func op_2040_0_nf; +extern cpuop_func op_2040_0_ff; +extern cpuop_func op_2048_0_nf; +extern cpuop_func op_2048_0_ff; +extern cpuop_func op_2050_0_nf; +extern cpuop_func op_2050_0_ff; +extern cpuop_func op_2058_0_nf; +extern cpuop_func op_2058_0_ff; +extern cpuop_func op_2060_0_nf; +extern cpuop_func op_2060_0_ff; +extern cpuop_func op_2068_0_nf; +extern cpuop_func op_2068_0_ff; +extern cpuop_func op_2070_0_nf; +extern cpuop_func op_2070_0_ff; +extern cpuop_func op_2078_0_nf; +extern cpuop_func op_2078_0_ff; +extern cpuop_func op_2079_0_nf; +extern cpuop_func op_2079_0_ff; +extern cpuop_func op_207a_0_nf; +extern cpuop_func op_207a_0_ff; +extern cpuop_func op_207b_0_nf; +extern cpuop_func op_207b_0_ff; +extern cpuop_func op_207c_0_nf; +extern cpuop_func op_207c_0_ff; +extern cpuop_func op_2080_0_nf; +extern cpuop_func op_2080_0_ff; +extern cpuop_func op_2088_0_nf; +extern cpuop_func op_2088_0_ff; +extern cpuop_func op_2090_0_nf; +extern cpuop_func op_2090_0_ff; +extern cpuop_func op_2098_0_nf; +extern cpuop_func op_2098_0_ff; +extern cpuop_func op_20a0_0_nf; +extern cpuop_func op_20a0_0_ff; +extern cpuop_func op_20a8_0_nf; +extern cpuop_func op_20a8_0_ff; +extern cpuop_func op_20b0_0_nf; +extern cpuop_func op_20b0_0_ff; +extern cpuop_func op_20b8_0_nf; +extern cpuop_func op_20b8_0_ff; +extern cpuop_func op_20b9_0_nf; +extern cpuop_func op_20b9_0_ff; +extern cpuop_func op_20ba_0_nf; +extern cpuop_func op_20ba_0_ff; +extern cpuop_func op_20bb_0_nf; +extern cpuop_func op_20bb_0_ff; +extern cpuop_func op_20bc_0_nf; +extern cpuop_func op_20bc_0_ff; +extern cpuop_func op_20c0_0_nf; +extern cpuop_func op_20c0_0_ff; +extern cpuop_func op_20c8_0_nf; +extern cpuop_func op_20c8_0_ff; +extern cpuop_func op_20d0_0_nf; +extern cpuop_func op_20d0_0_ff; +extern cpuop_func op_20d8_0_nf; +extern cpuop_func op_20d8_0_ff; +extern cpuop_func op_20e0_0_nf; +extern cpuop_func op_20e0_0_ff; +extern cpuop_func op_20e8_0_nf; +extern cpuop_func op_20e8_0_ff; +extern cpuop_func op_20f0_0_nf; +extern cpuop_func op_20f0_0_ff; +extern cpuop_func op_20f8_0_nf; +extern cpuop_func op_20f8_0_ff; +extern cpuop_func op_20f9_0_nf; +extern cpuop_func op_20f9_0_ff; +extern cpuop_func op_20fa_0_nf; +extern cpuop_func op_20fa_0_ff; +extern cpuop_func op_20fb_0_nf; +extern cpuop_func op_20fb_0_ff; +extern cpuop_func op_20fc_0_nf; +extern cpuop_func op_20fc_0_ff; +extern cpuop_func op_2100_0_nf; +extern cpuop_func op_2100_0_ff; +extern cpuop_func op_2108_0_nf; +extern cpuop_func op_2108_0_ff; +extern cpuop_func op_2110_0_nf; +extern cpuop_func op_2110_0_ff; +extern cpuop_func op_2118_0_nf; +extern cpuop_func op_2118_0_ff; +extern cpuop_func op_2120_0_nf; +extern cpuop_func op_2120_0_ff; +extern cpuop_func op_2128_0_nf; +extern cpuop_func op_2128_0_ff; +extern cpuop_func op_2130_0_nf; +extern cpuop_func op_2130_0_ff; +extern cpuop_func op_2138_0_nf; +extern cpuop_func op_2138_0_ff; +extern cpuop_func op_2139_0_nf; +extern cpuop_func op_2139_0_ff; +extern cpuop_func op_213a_0_nf; +extern cpuop_func op_213a_0_ff; +extern cpuop_func op_213b_0_nf; +extern cpuop_func op_213b_0_ff; +extern cpuop_func op_213c_0_nf; +extern cpuop_func op_213c_0_ff; +extern cpuop_func op_2140_0_nf; +extern cpuop_func op_2140_0_ff; +extern cpuop_func op_2148_0_nf; +extern cpuop_func op_2148_0_ff; +extern cpuop_func op_2150_0_nf; +extern cpuop_func op_2150_0_ff; +extern cpuop_func op_2158_0_nf; +extern cpuop_func op_2158_0_ff; +extern cpuop_func op_2160_0_nf; +extern cpuop_func op_2160_0_ff; +extern cpuop_func op_2168_0_nf; +extern cpuop_func op_2168_0_ff; +extern cpuop_func op_2170_0_nf; +extern cpuop_func op_2170_0_ff; +extern cpuop_func op_2178_0_nf; +extern cpuop_func op_2178_0_ff; +extern cpuop_func op_2179_0_nf; +extern cpuop_func op_2179_0_ff; +extern cpuop_func op_217a_0_nf; +extern cpuop_func op_217a_0_ff; +extern cpuop_func op_217b_0_nf; +extern cpuop_func op_217b_0_ff; +extern cpuop_func op_217c_0_nf; +extern cpuop_func op_217c_0_ff; +extern cpuop_func op_2180_0_nf; +extern cpuop_func op_2180_0_ff; +extern cpuop_func op_2188_0_nf; +extern cpuop_func op_2188_0_ff; +extern cpuop_func op_2190_0_nf; +extern cpuop_func op_2190_0_ff; +extern cpuop_func op_2198_0_nf; +extern cpuop_func op_2198_0_ff; +extern cpuop_func op_21a0_0_nf; +extern cpuop_func op_21a0_0_ff; +extern cpuop_func op_21a8_0_nf; +extern cpuop_func op_21a8_0_ff; +extern cpuop_func op_21b0_0_nf; +extern cpuop_func op_21b0_0_ff; +extern cpuop_func op_21b8_0_nf; +extern cpuop_func op_21b8_0_ff; +extern cpuop_func op_21b9_0_nf; +extern cpuop_func op_21b9_0_ff; +extern cpuop_func op_21ba_0_nf; +extern cpuop_func op_21ba_0_ff; +extern cpuop_func op_21bb_0_nf; +extern cpuop_func op_21bb_0_ff; +extern cpuop_func op_21bc_0_nf; +extern cpuop_func op_21bc_0_ff; +extern cpuop_func op_21c0_0_nf; +extern cpuop_func op_21c0_0_ff; +extern cpuop_func op_21c8_0_nf; +extern cpuop_func op_21c8_0_ff; +extern cpuop_func op_21d0_0_nf; +extern cpuop_func op_21d0_0_ff; +extern cpuop_func op_21d8_0_nf; +extern cpuop_func op_21d8_0_ff; +extern cpuop_func op_21e0_0_nf; +extern cpuop_func op_21e0_0_ff; +extern cpuop_func op_21e8_0_nf; +extern cpuop_func op_21e8_0_ff; +extern cpuop_func op_21f0_0_nf; +extern cpuop_func op_21f0_0_ff; +extern cpuop_func op_21f8_0_nf; +extern cpuop_func op_21f8_0_ff; +extern cpuop_func op_21f9_0_nf; +extern cpuop_func op_21f9_0_ff; +extern cpuop_func op_21fa_0_nf; +extern cpuop_func op_21fa_0_ff; +extern cpuop_func op_21fb_0_nf; +extern cpuop_func op_21fb_0_ff; +extern cpuop_func op_21fc_0_nf; +extern cpuop_func op_21fc_0_ff; +extern cpuop_func op_23c0_0_nf; +extern cpuop_func op_23c0_0_ff; +extern cpuop_func op_23c8_0_nf; +extern cpuop_func op_23c8_0_ff; +extern cpuop_func op_23d0_0_nf; +extern cpuop_func op_23d0_0_ff; +extern cpuop_func op_23d8_0_nf; +extern cpuop_func op_23d8_0_ff; +extern cpuop_func op_23e0_0_nf; +extern cpuop_func op_23e0_0_ff; +extern cpuop_func op_23e8_0_nf; +extern cpuop_func op_23e8_0_ff; +extern cpuop_func op_23f0_0_nf; +extern cpuop_func op_23f0_0_ff; +extern cpuop_func op_23f8_0_nf; +extern cpuop_func op_23f8_0_ff; +extern cpuop_func op_23f9_0_nf; +extern cpuop_func op_23f9_0_ff; +extern cpuop_func op_23fa_0_nf; +extern cpuop_func op_23fa_0_ff; +extern cpuop_func op_23fb_0_nf; +extern cpuop_func op_23fb_0_ff; +extern cpuop_func op_23fc_0_nf; +extern cpuop_func op_23fc_0_ff; +extern cpuop_func op_3000_0_nf; +extern cpuop_func op_3000_0_ff; +extern cpuop_func op_3008_0_nf; +extern cpuop_func op_3008_0_ff; +extern cpuop_func op_3010_0_nf; +extern cpuop_func op_3010_0_ff; +extern cpuop_func op_3018_0_nf; +extern cpuop_func op_3018_0_ff; +extern cpuop_func op_3020_0_nf; +extern cpuop_func op_3020_0_ff; +extern cpuop_func op_3028_0_nf; +extern cpuop_func op_3028_0_ff; +extern cpuop_func op_3030_0_nf; +extern cpuop_func op_3030_0_ff; +extern cpuop_func op_3038_0_nf; +extern cpuop_func op_3038_0_ff; +extern cpuop_func op_3039_0_nf; +extern cpuop_func op_3039_0_ff; +extern cpuop_func op_303a_0_nf; +extern cpuop_func op_303a_0_ff; +extern cpuop_func op_303b_0_nf; +extern cpuop_func op_303b_0_ff; +extern cpuop_func op_303c_0_nf; +extern cpuop_func op_303c_0_ff; +extern cpuop_func op_3040_0_nf; +extern cpuop_func op_3040_0_ff; +extern cpuop_func op_3048_0_nf; +extern cpuop_func op_3048_0_ff; +extern cpuop_func op_3050_0_nf; +extern cpuop_func op_3050_0_ff; +extern cpuop_func op_3058_0_nf; +extern cpuop_func op_3058_0_ff; +extern cpuop_func op_3060_0_nf; +extern cpuop_func op_3060_0_ff; +extern cpuop_func op_3068_0_nf; +extern cpuop_func op_3068_0_ff; +extern cpuop_func op_3070_0_nf; +extern cpuop_func op_3070_0_ff; +extern cpuop_func op_3078_0_nf; +extern cpuop_func op_3078_0_ff; +extern cpuop_func op_3079_0_nf; +extern cpuop_func op_3079_0_ff; +extern cpuop_func op_307a_0_nf; +extern cpuop_func op_307a_0_ff; +extern cpuop_func op_307b_0_nf; +extern cpuop_func op_307b_0_ff; +extern cpuop_func op_307c_0_nf; +extern cpuop_func op_307c_0_ff; +extern cpuop_func op_3080_0_nf; +extern cpuop_func op_3080_0_ff; +extern cpuop_func op_3088_0_nf; +extern cpuop_func op_3088_0_ff; +extern cpuop_func op_3090_0_nf; +extern cpuop_func op_3090_0_ff; +extern cpuop_func op_3098_0_nf; +extern cpuop_func op_3098_0_ff; +extern cpuop_func op_30a0_0_nf; +extern cpuop_func op_30a0_0_ff; +extern cpuop_func op_30a8_0_nf; +extern cpuop_func op_30a8_0_ff; +extern cpuop_func op_30b0_0_nf; +extern cpuop_func op_30b0_0_ff; +extern cpuop_func op_30b8_0_nf; +extern cpuop_func op_30b8_0_ff; +extern cpuop_func op_30b9_0_nf; +extern cpuop_func op_30b9_0_ff; +extern cpuop_func op_30ba_0_nf; +extern cpuop_func op_30ba_0_ff; +extern cpuop_func op_30bb_0_nf; +extern cpuop_func op_30bb_0_ff; +extern cpuop_func op_30bc_0_nf; +extern cpuop_func op_30bc_0_ff; +extern cpuop_func op_30c0_0_nf; +extern cpuop_func op_30c0_0_ff; +extern cpuop_func op_30c8_0_nf; +extern cpuop_func op_30c8_0_ff; +extern cpuop_func op_30d0_0_nf; +extern cpuop_func op_30d0_0_ff; +extern cpuop_func op_30d8_0_nf; +extern cpuop_func op_30d8_0_ff; +extern cpuop_func op_30e0_0_nf; +extern cpuop_func op_30e0_0_ff; +extern cpuop_func op_30e8_0_nf; +extern cpuop_func op_30e8_0_ff; +extern cpuop_func op_30f0_0_nf; +extern cpuop_func op_30f0_0_ff; +extern cpuop_func op_30f8_0_nf; +extern cpuop_func op_30f8_0_ff; +extern cpuop_func op_30f9_0_nf; +extern cpuop_func op_30f9_0_ff; +extern cpuop_func op_30fa_0_nf; +extern cpuop_func op_30fa_0_ff; +extern cpuop_func op_30fb_0_nf; +extern cpuop_func op_30fb_0_ff; +extern cpuop_func op_30fc_0_nf; +extern cpuop_func op_30fc_0_ff; +extern cpuop_func op_3100_0_nf; +extern cpuop_func op_3100_0_ff; +extern cpuop_func op_3108_0_nf; +extern cpuop_func op_3108_0_ff; +extern cpuop_func op_3110_0_nf; +extern cpuop_func op_3110_0_ff; +extern cpuop_func op_3118_0_nf; +extern cpuop_func op_3118_0_ff; +extern cpuop_func op_3120_0_nf; +extern cpuop_func op_3120_0_ff; +extern cpuop_func op_3128_0_nf; +extern cpuop_func op_3128_0_ff; +extern cpuop_func op_3130_0_nf; +extern cpuop_func op_3130_0_ff; +extern cpuop_func op_3138_0_nf; +extern cpuop_func op_3138_0_ff; +extern cpuop_func op_3139_0_nf; +extern cpuop_func op_3139_0_ff; +extern cpuop_func op_313a_0_nf; +extern cpuop_func op_313a_0_ff; +extern cpuop_func op_313b_0_nf; +extern cpuop_func op_313b_0_ff; +extern cpuop_func op_313c_0_nf; +extern cpuop_func op_313c_0_ff; +extern cpuop_func op_3140_0_nf; +extern cpuop_func op_3140_0_ff; +extern cpuop_func op_3148_0_nf; +extern cpuop_func op_3148_0_ff; +extern cpuop_func op_3150_0_nf; +extern cpuop_func op_3150_0_ff; +extern cpuop_func op_3158_0_nf; +extern cpuop_func op_3158_0_ff; +extern cpuop_func op_3160_0_nf; +extern cpuop_func op_3160_0_ff; +extern cpuop_func op_3168_0_nf; +extern cpuop_func op_3168_0_ff; +extern cpuop_func op_3170_0_nf; +extern cpuop_func op_3170_0_ff; +extern cpuop_func op_3178_0_nf; +extern cpuop_func op_3178_0_ff; +extern cpuop_func op_3179_0_nf; +extern cpuop_func op_3179_0_ff; +extern cpuop_func op_317a_0_nf; +extern cpuop_func op_317a_0_ff; +extern cpuop_func op_317b_0_nf; +extern cpuop_func op_317b_0_ff; +extern cpuop_func op_317c_0_nf; +extern cpuop_func op_317c_0_ff; +extern cpuop_func op_3180_0_nf; +extern cpuop_func op_3180_0_ff; +extern cpuop_func op_3188_0_nf; +extern cpuop_func op_3188_0_ff; +extern cpuop_func op_3190_0_nf; +extern cpuop_func op_3190_0_ff; +extern cpuop_func op_3198_0_nf; +extern cpuop_func op_3198_0_ff; +extern cpuop_func op_31a0_0_nf; +extern cpuop_func op_31a0_0_ff; +extern cpuop_func op_31a8_0_nf; +extern cpuop_func op_31a8_0_ff; +extern cpuop_func op_31b0_0_nf; +extern cpuop_func op_31b0_0_ff; +extern cpuop_func op_31b8_0_nf; +extern cpuop_func op_31b8_0_ff; +extern cpuop_func op_31b9_0_nf; +extern cpuop_func op_31b9_0_ff; +extern cpuop_func op_31ba_0_nf; +extern cpuop_func op_31ba_0_ff; +extern cpuop_func op_31bb_0_nf; +extern cpuop_func op_31bb_0_ff; +extern cpuop_func op_31bc_0_nf; +extern cpuop_func op_31bc_0_ff; +extern cpuop_func op_31c0_0_nf; +extern cpuop_func op_31c0_0_ff; +extern cpuop_func op_31c8_0_nf; +extern cpuop_func op_31c8_0_ff; +extern cpuop_func op_31d0_0_nf; +extern cpuop_func op_31d0_0_ff; +extern cpuop_func op_31d8_0_nf; +extern cpuop_func op_31d8_0_ff; +extern cpuop_func op_31e0_0_nf; +extern cpuop_func op_31e0_0_ff; +extern cpuop_func op_31e8_0_nf; +extern cpuop_func op_31e8_0_ff; +extern cpuop_func op_31f0_0_nf; +extern cpuop_func op_31f0_0_ff; +extern cpuop_func op_31f8_0_nf; +extern cpuop_func op_31f8_0_ff; +extern cpuop_func op_31f9_0_nf; +extern cpuop_func op_31f9_0_ff; +extern cpuop_func op_31fa_0_nf; +extern cpuop_func op_31fa_0_ff; +extern cpuop_func op_31fb_0_nf; +extern cpuop_func op_31fb_0_ff; +extern cpuop_func op_31fc_0_nf; +extern cpuop_func op_31fc_0_ff; +extern cpuop_func op_33c0_0_nf; +extern cpuop_func op_33c0_0_ff; +extern cpuop_func op_33c8_0_nf; +extern cpuop_func op_33c8_0_ff; +extern cpuop_func op_33d0_0_nf; +extern cpuop_func op_33d0_0_ff; +extern cpuop_func op_33d8_0_nf; +extern cpuop_func op_33d8_0_ff; +extern cpuop_func op_33e0_0_nf; +extern cpuop_func op_33e0_0_ff; +extern cpuop_func op_33e8_0_nf; +extern cpuop_func op_33e8_0_ff; +extern cpuop_func op_33f0_0_nf; +extern cpuop_func op_33f0_0_ff; +extern cpuop_func op_33f8_0_nf; +extern cpuop_func op_33f8_0_ff; +extern cpuop_func op_33f9_0_nf; +extern cpuop_func op_33f9_0_ff; +extern cpuop_func op_33fa_0_nf; +extern cpuop_func op_33fa_0_ff; +extern cpuop_func op_33fb_0_nf; +extern cpuop_func op_33fb_0_ff; +extern cpuop_func op_33fc_0_nf; +extern cpuop_func op_33fc_0_ff; +extern cpuop_func op_4000_0_nf; +extern cpuop_func op_4000_0_ff; +extern cpuop_func op_4010_0_nf; +extern cpuop_func op_4010_0_ff; +extern cpuop_func op_4018_0_nf; +extern cpuop_func op_4018_0_ff; +extern cpuop_func op_4020_0_nf; +extern cpuop_func op_4020_0_ff; +extern cpuop_func op_4028_0_nf; +extern cpuop_func op_4028_0_ff; +extern cpuop_func op_4030_0_nf; +extern cpuop_func op_4030_0_ff; +extern cpuop_func op_4038_0_nf; +extern cpuop_func op_4038_0_ff; +extern cpuop_func op_4039_0_nf; +extern cpuop_func op_4039_0_ff; +extern cpuop_func op_4040_0_nf; +extern cpuop_func op_4040_0_ff; +extern cpuop_func op_4050_0_nf; +extern cpuop_func op_4050_0_ff; +extern cpuop_func op_4058_0_nf; +extern cpuop_func op_4058_0_ff; +extern cpuop_func op_4060_0_nf; +extern cpuop_func op_4060_0_ff; +extern cpuop_func op_4068_0_nf; +extern cpuop_func op_4068_0_ff; +extern cpuop_func op_4070_0_nf; +extern cpuop_func op_4070_0_ff; +extern cpuop_func op_4078_0_nf; +extern cpuop_func op_4078_0_ff; +extern cpuop_func op_4079_0_nf; +extern cpuop_func op_4079_0_ff; +extern cpuop_func op_4080_0_nf; +extern cpuop_func op_4080_0_ff; +extern cpuop_func op_4090_0_nf; +extern cpuop_func op_4090_0_ff; +extern cpuop_func op_4098_0_nf; +extern cpuop_func op_4098_0_ff; +extern cpuop_func op_40a0_0_nf; +extern cpuop_func op_40a0_0_ff; +extern cpuop_func op_40a8_0_nf; +extern cpuop_func op_40a8_0_ff; +extern cpuop_func op_40b0_0_nf; +extern cpuop_func op_40b0_0_ff; +extern cpuop_func op_40b8_0_nf; +extern cpuop_func op_40b8_0_ff; +extern cpuop_func op_40b9_0_nf; +extern cpuop_func op_40b9_0_ff; +extern cpuop_func op_40c0_0_nf; +extern cpuop_func op_40c0_0_ff; +extern cpuop_func op_40d0_0_nf; +extern cpuop_func op_40d0_0_ff; +extern cpuop_func op_40d8_0_nf; +extern cpuop_func op_40d8_0_ff; +extern cpuop_func op_40e0_0_nf; +extern cpuop_func op_40e0_0_ff; +extern cpuop_func op_40e8_0_nf; +extern cpuop_func op_40e8_0_ff; +extern cpuop_func op_40f0_0_nf; +extern cpuop_func op_40f0_0_ff; +extern cpuop_func op_40f8_0_nf; +extern cpuop_func op_40f8_0_ff; +extern cpuop_func op_40f9_0_nf; +extern cpuop_func op_40f9_0_ff; +extern cpuop_func op_4100_0_nf; +extern cpuop_func op_4100_0_ff; +extern cpuop_func op_4110_0_nf; +extern cpuop_func op_4110_0_ff; +extern cpuop_func op_4118_0_nf; +extern cpuop_func op_4118_0_ff; +extern cpuop_func op_4120_0_nf; +extern cpuop_func op_4120_0_ff; +extern cpuop_func op_4128_0_nf; +extern cpuop_func op_4128_0_ff; +extern cpuop_func op_4130_0_nf; +extern cpuop_func op_4130_0_ff; +extern cpuop_func op_4138_0_nf; +extern cpuop_func op_4138_0_ff; +extern cpuop_func op_4139_0_nf; +extern cpuop_func op_4139_0_ff; +extern cpuop_func op_413a_0_nf; +extern cpuop_func op_413a_0_ff; +extern cpuop_func op_413b_0_nf; +extern cpuop_func op_413b_0_ff; +extern cpuop_func op_413c_0_nf; +extern cpuop_func op_413c_0_ff; +extern cpuop_func op_4180_0_nf; +extern cpuop_func op_4180_0_ff; +extern cpuop_func op_4190_0_nf; +extern cpuop_func op_4190_0_ff; +extern cpuop_func op_4198_0_nf; +extern cpuop_func op_4198_0_ff; +extern cpuop_func op_41a0_0_nf; +extern cpuop_func op_41a0_0_ff; +extern cpuop_func op_41a8_0_nf; +extern cpuop_func op_41a8_0_ff; +extern cpuop_func op_41b0_0_nf; +extern cpuop_func op_41b0_0_ff; +extern cpuop_func op_41b8_0_nf; +extern cpuop_func op_41b8_0_ff; +extern cpuop_func op_41b9_0_nf; +extern cpuop_func op_41b9_0_ff; +extern cpuop_func op_41ba_0_nf; +extern cpuop_func op_41ba_0_ff; +extern cpuop_func op_41bb_0_nf; +extern cpuop_func op_41bb_0_ff; +extern cpuop_func op_41bc_0_nf; +extern cpuop_func op_41bc_0_ff; +extern cpuop_func op_41d0_0_nf; +extern cpuop_func op_41d0_0_ff; +extern cpuop_func op_41e8_0_nf; +extern cpuop_func op_41e8_0_ff; +extern cpuop_func op_41f0_0_nf; +extern cpuop_func op_41f0_0_ff; +extern cpuop_func op_41f8_0_nf; +extern cpuop_func op_41f8_0_ff; +extern cpuop_func op_41f9_0_nf; +extern cpuop_func op_41f9_0_ff; +extern cpuop_func op_41fa_0_nf; +extern cpuop_func op_41fa_0_ff; +extern cpuop_func op_41fb_0_nf; +extern cpuop_func op_41fb_0_ff; +extern cpuop_func op_4200_0_nf; +extern cpuop_func op_4200_0_ff; +extern cpuop_func op_4210_0_nf; +extern cpuop_func op_4210_0_ff; +extern cpuop_func op_4218_0_nf; +extern cpuop_func op_4218_0_ff; +extern cpuop_func op_4220_0_nf; +extern cpuop_func op_4220_0_ff; +extern cpuop_func op_4228_0_nf; +extern cpuop_func op_4228_0_ff; +extern cpuop_func op_4230_0_nf; +extern cpuop_func op_4230_0_ff; +extern cpuop_func op_4238_0_nf; +extern cpuop_func op_4238_0_ff; +extern cpuop_func op_4239_0_nf; +extern cpuop_func op_4239_0_ff; +extern cpuop_func op_4240_0_nf; +extern cpuop_func op_4240_0_ff; +extern cpuop_func op_4250_0_nf; +extern cpuop_func op_4250_0_ff; +extern cpuop_func op_4258_0_nf; +extern cpuop_func op_4258_0_ff; +extern cpuop_func op_4260_0_nf; +extern cpuop_func op_4260_0_ff; +extern cpuop_func op_4268_0_nf; +extern cpuop_func op_4268_0_ff; +extern cpuop_func op_4270_0_nf; +extern cpuop_func op_4270_0_ff; +extern cpuop_func op_4278_0_nf; +extern cpuop_func op_4278_0_ff; +extern cpuop_func op_4279_0_nf; +extern cpuop_func op_4279_0_ff; +extern cpuop_func op_4280_0_nf; +extern cpuop_func op_4280_0_ff; +extern cpuop_func op_4290_0_nf; +extern cpuop_func op_4290_0_ff; +extern cpuop_func op_4298_0_nf; +extern cpuop_func op_4298_0_ff; +extern cpuop_func op_42a0_0_nf; +extern cpuop_func op_42a0_0_ff; +extern cpuop_func op_42a8_0_nf; +extern cpuop_func op_42a8_0_ff; +extern cpuop_func op_42b0_0_nf; +extern cpuop_func op_42b0_0_ff; +extern cpuop_func op_42b8_0_nf; +extern cpuop_func op_42b8_0_ff; +extern cpuop_func op_42b9_0_nf; +extern cpuop_func op_42b9_0_ff; +extern cpuop_func op_42c0_0_nf; +extern cpuop_func op_42c0_0_ff; +extern cpuop_func op_42d0_0_nf; +extern cpuop_func op_42d0_0_ff; +extern cpuop_func op_42d8_0_nf; +extern cpuop_func op_42d8_0_ff; +extern cpuop_func op_42e0_0_nf; +extern cpuop_func op_42e0_0_ff; +extern cpuop_func op_42e8_0_nf; +extern cpuop_func op_42e8_0_ff; +extern cpuop_func op_42f0_0_nf; +extern cpuop_func op_42f0_0_ff; +extern cpuop_func op_42f8_0_nf; +extern cpuop_func op_42f8_0_ff; +extern cpuop_func op_42f9_0_nf; +extern cpuop_func op_42f9_0_ff; +extern cpuop_func op_4400_0_nf; +extern cpuop_func op_4400_0_ff; +extern cpuop_func op_4410_0_nf; +extern cpuop_func op_4410_0_ff; +extern cpuop_func op_4418_0_nf; +extern cpuop_func op_4418_0_ff; +extern cpuop_func op_4420_0_nf; +extern cpuop_func op_4420_0_ff; +extern cpuop_func op_4428_0_nf; +extern cpuop_func op_4428_0_ff; +extern cpuop_func op_4430_0_nf; +extern cpuop_func op_4430_0_ff; +extern cpuop_func op_4438_0_nf; +extern cpuop_func op_4438_0_ff; +extern cpuop_func op_4439_0_nf; +extern cpuop_func op_4439_0_ff; +extern cpuop_func op_4440_0_nf; +extern cpuop_func op_4440_0_ff; +extern cpuop_func op_4450_0_nf; +extern cpuop_func op_4450_0_ff; +extern cpuop_func op_4458_0_nf; +extern cpuop_func op_4458_0_ff; +extern cpuop_func op_4460_0_nf; +extern cpuop_func op_4460_0_ff; +extern cpuop_func op_4468_0_nf; +extern cpuop_func op_4468_0_ff; +extern cpuop_func op_4470_0_nf; +extern cpuop_func op_4470_0_ff; +extern cpuop_func op_4478_0_nf; +extern cpuop_func op_4478_0_ff; +extern cpuop_func op_4479_0_nf; +extern cpuop_func op_4479_0_ff; +extern cpuop_func op_4480_0_nf; +extern cpuop_func op_4480_0_ff; +extern cpuop_func op_4490_0_nf; +extern cpuop_func op_4490_0_ff; +extern cpuop_func op_4498_0_nf; +extern cpuop_func op_4498_0_ff; +extern cpuop_func op_44a0_0_nf; +extern cpuop_func op_44a0_0_ff; +extern cpuop_func op_44a8_0_nf; +extern cpuop_func op_44a8_0_ff; +extern cpuop_func op_44b0_0_nf; +extern cpuop_func op_44b0_0_ff; +extern cpuop_func op_44b8_0_nf; +extern cpuop_func op_44b8_0_ff; +extern cpuop_func op_44b9_0_nf; +extern cpuop_func op_44b9_0_ff; +extern cpuop_func op_44c0_0_nf; +extern cpuop_func op_44c0_0_ff; +extern cpuop_func op_44d0_0_nf; +extern cpuop_func op_44d0_0_ff; +extern cpuop_func op_44d8_0_nf; +extern cpuop_func op_44d8_0_ff; +extern cpuop_func op_44e0_0_nf; +extern cpuop_func op_44e0_0_ff; +extern cpuop_func op_44e8_0_nf; +extern cpuop_func op_44e8_0_ff; +extern cpuop_func op_44f0_0_nf; +extern cpuop_func op_44f0_0_ff; +extern cpuop_func op_44f8_0_nf; +extern cpuop_func op_44f8_0_ff; +extern cpuop_func op_44f9_0_nf; +extern cpuop_func op_44f9_0_ff; +extern cpuop_func op_44fa_0_nf; +extern cpuop_func op_44fa_0_ff; +extern cpuop_func op_44fb_0_nf; +extern cpuop_func op_44fb_0_ff; +extern cpuop_func op_44fc_0_nf; +extern cpuop_func op_44fc_0_ff; +extern cpuop_func op_4600_0_nf; +extern cpuop_func op_4600_0_ff; +extern cpuop_func op_4610_0_nf; +extern cpuop_func op_4610_0_ff; +extern cpuop_func op_4618_0_nf; +extern cpuop_func op_4618_0_ff; +extern cpuop_func op_4620_0_nf; +extern cpuop_func op_4620_0_ff; +extern cpuop_func op_4628_0_nf; +extern cpuop_func op_4628_0_ff; +extern cpuop_func op_4630_0_nf; +extern cpuop_func op_4630_0_ff; +extern cpuop_func op_4638_0_nf; +extern cpuop_func op_4638_0_ff; +extern cpuop_func op_4639_0_nf; +extern cpuop_func op_4639_0_ff; +extern cpuop_func op_4640_0_nf; +extern cpuop_func op_4640_0_ff; +extern cpuop_func op_4650_0_nf; +extern cpuop_func op_4650_0_ff; +extern cpuop_func op_4658_0_nf; +extern cpuop_func op_4658_0_ff; +extern cpuop_func op_4660_0_nf; +extern cpuop_func op_4660_0_ff; +extern cpuop_func op_4668_0_nf; +extern cpuop_func op_4668_0_ff; +extern cpuop_func op_4670_0_nf; +extern cpuop_func op_4670_0_ff; +extern cpuop_func op_4678_0_nf; +extern cpuop_func op_4678_0_ff; +extern cpuop_func op_4679_0_nf; +extern cpuop_func op_4679_0_ff; +extern cpuop_func op_4680_0_nf; +extern cpuop_func op_4680_0_ff; +extern cpuop_func op_4690_0_nf; +extern cpuop_func op_4690_0_ff; +extern cpuop_func op_4698_0_nf; +extern cpuop_func op_4698_0_ff; +extern cpuop_func op_46a0_0_nf; +extern cpuop_func op_46a0_0_ff; +extern cpuop_func op_46a8_0_nf; +extern cpuop_func op_46a8_0_ff; +extern cpuop_func op_46b0_0_nf; +extern cpuop_func op_46b0_0_ff; +extern cpuop_func op_46b8_0_nf; +extern cpuop_func op_46b8_0_ff; +extern cpuop_func op_46b9_0_nf; +extern cpuop_func op_46b9_0_ff; +extern cpuop_func op_46c0_0_nf; +extern cpuop_func op_46c0_0_ff; +extern cpuop_func op_46d0_0_nf; +extern cpuop_func op_46d0_0_ff; +extern cpuop_func op_46d8_0_nf; +extern cpuop_func op_46d8_0_ff; +extern cpuop_func op_46e0_0_nf; +extern cpuop_func op_46e0_0_ff; +extern cpuop_func op_46e8_0_nf; +extern cpuop_func op_46e8_0_ff; +extern cpuop_func op_46f0_0_nf; +extern cpuop_func op_46f0_0_ff; +extern cpuop_func op_46f8_0_nf; +extern cpuop_func op_46f8_0_ff; +extern cpuop_func op_46f9_0_nf; +extern cpuop_func op_46f9_0_ff; +extern cpuop_func op_46fa_0_nf; +extern cpuop_func op_46fa_0_ff; +extern cpuop_func op_46fb_0_nf; +extern cpuop_func op_46fb_0_ff; +extern cpuop_func op_46fc_0_nf; +extern cpuop_func op_46fc_0_ff; +extern cpuop_func op_4800_0_nf; +extern cpuop_func op_4800_0_ff; +extern cpuop_func op_4808_0_nf; +extern cpuop_func op_4808_0_ff; +extern cpuop_func op_4810_0_nf; +extern cpuop_func op_4810_0_ff; +extern cpuop_func op_4818_0_nf; +extern cpuop_func op_4818_0_ff; +extern cpuop_func op_4820_0_nf; +extern cpuop_func op_4820_0_ff; +extern cpuop_func op_4828_0_nf; +extern cpuop_func op_4828_0_ff; +extern cpuop_func op_4830_0_nf; +extern cpuop_func op_4830_0_ff; +extern cpuop_func op_4838_0_nf; +extern cpuop_func op_4838_0_ff; +extern cpuop_func op_4839_0_nf; +extern cpuop_func op_4839_0_ff; +extern cpuop_func op_4840_0_nf; +extern cpuop_func op_4840_0_ff; +extern cpuop_func op_4848_0_nf; +extern cpuop_func op_4848_0_ff; +extern cpuop_func op_4850_0_nf; +extern cpuop_func op_4850_0_ff; +extern cpuop_func op_4868_0_nf; +extern cpuop_func op_4868_0_ff; +extern cpuop_func op_4870_0_nf; +extern cpuop_func op_4870_0_ff; +extern cpuop_func op_4878_0_nf; +extern cpuop_func op_4878_0_ff; +extern cpuop_func op_4879_0_nf; +extern cpuop_func op_4879_0_ff; +extern cpuop_func op_487a_0_nf; +extern cpuop_func op_487a_0_ff; +extern cpuop_func op_487b_0_nf; +extern cpuop_func op_487b_0_ff; +extern cpuop_func op_4880_0_nf; +extern cpuop_func op_4880_0_ff; +extern cpuop_func op_4890_0_nf; +extern cpuop_func op_4890_0_ff; +extern cpuop_func op_48a0_0_nf; +extern cpuop_func op_48a0_0_ff; +extern cpuop_func op_48a8_0_nf; +extern cpuop_func op_48a8_0_ff; +extern cpuop_func op_48b0_0_nf; +extern cpuop_func op_48b0_0_ff; +extern cpuop_func op_48b8_0_nf; +extern cpuop_func op_48b8_0_ff; +extern cpuop_func op_48b9_0_nf; +extern cpuop_func op_48b9_0_ff; +extern cpuop_func op_48c0_0_nf; +extern cpuop_func op_48c0_0_ff; +extern cpuop_func op_48d0_0_nf; +extern cpuop_func op_48d0_0_ff; +extern cpuop_func op_48e0_0_nf; +extern cpuop_func op_48e0_0_ff; +extern cpuop_func op_48e8_0_nf; +extern cpuop_func op_48e8_0_ff; +extern cpuop_func op_48f0_0_nf; +extern cpuop_func op_48f0_0_ff; +extern cpuop_func op_48f8_0_nf; +extern cpuop_func op_48f8_0_ff; +extern cpuop_func op_48f9_0_nf; +extern cpuop_func op_48f9_0_ff; +extern cpuop_func op_49c0_0_nf; +extern cpuop_func op_49c0_0_ff; +extern cpuop_func op_4a00_0_nf; +extern cpuop_func op_4a00_0_ff; +extern cpuop_func op_4a10_0_nf; +extern cpuop_func op_4a10_0_ff; +extern cpuop_func op_4a18_0_nf; +extern cpuop_func op_4a18_0_ff; +extern cpuop_func op_4a20_0_nf; +extern cpuop_func op_4a20_0_ff; +extern cpuop_func op_4a28_0_nf; +extern cpuop_func op_4a28_0_ff; +extern cpuop_func op_4a30_0_nf; +extern cpuop_func op_4a30_0_ff; +extern cpuop_func op_4a38_0_nf; +extern cpuop_func op_4a38_0_ff; +extern cpuop_func op_4a39_0_nf; +extern cpuop_func op_4a39_0_ff; +extern cpuop_func op_4a3a_0_nf; +extern cpuop_func op_4a3a_0_ff; +extern cpuop_func op_4a3b_0_nf; +extern cpuop_func op_4a3b_0_ff; +extern cpuop_func op_4a3c_0_nf; +extern cpuop_func op_4a3c_0_ff; +extern cpuop_func op_4a40_0_nf; +extern cpuop_func op_4a40_0_ff; +extern cpuop_func op_4a48_0_nf; +extern cpuop_func op_4a48_0_ff; +extern cpuop_func op_4a50_0_nf; +extern cpuop_func op_4a50_0_ff; +extern cpuop_func op_4a58_0_nf; +extern cpuop_func op_4a58_0_ff; +extern cpuop_func op_4a60_0_nf; +extern cpuop_func op_4a60_0_ff; +extern cpuop_func op_4a68_0_nf; +extern cpuop_func op_4a68_0_ff; +extern cpuop_func op_4a70_0_nf; +extern cpuop_func op_4a70_0_ff; +extern cpuop_func op_4a78_0_nf; +extern cpuop_func op_4a78_0_ff; +extern cpuop_func op_4a79_0_nf; +extern cpuop_func op_4a79_0_ff; +extern cpuop_func op_4a7a_0_nf; +extern cpuop_func op_4a7a_0_ff; +extern cpuop_func op_4a7b_0_nf; +extern cpuop_func op_4a7b_0_ff; +extern cpuop_func op_4a7c_0_nf; +extern cpuop_func op_4a7c_0_ff; +extern cpuop_func op_4a80_0_nf; +extern cpuop_func op_4a80_0_ff; +extern cpuop_func op_4a88_0_nf; +extern cpuop_func op_4a88_0_ff; +extern cpuop_func op_4a90_0_nf; +extern cpuop_func op_4a90_0_ff; +extern cpuop_func op_4a98_0_nf; +extern cpuop_func op_4a98_0_ff; +extern cpuop_func op_4aa0_0_nf; +extern cpuop_func op_4aa0_0_ff; +extern cpuop_func op_4aa8_0_nf; +extern cpuop_func op_4aa8_0_ff; +extern cpuop_func op_4ab0_0_nf; +extern cpuop_func op_4ab0_0_ff; +extern cpuop_func op_4ab8_0_nf; +extern cpuop_func op_4ab8_0_ff; +extern cpuop_func op_4ab9_0_nf; +extern cpuop_func op_4ab9_0_ff; +extern cpuop_func op_4aba_0_nf; +extern cpuop_func op_4aba_0_ff; +extern cpuop_func op_4abb_0_nf; +extern cpuop_func op_4abb_0_ff; +extern cpuop_func op_4abc_0_nf; +extern cpuop_func op_4abc_0_ff; +extern cpuop_func op_4ac0_0_nf; +extern cpuop_func op_4ac0_0_ff; +extern cpuop_func op_4ad0_0_nf; +extern cpuop_func op_4ad0_0_ff; +extern cpuop_func op_4ad8_0_nf; +extern cpuop_func op_4ad8_0_ff; +extern cpuop_func op_4ae0_0_nf; +extern cpuop_func op_4ae0_0_ff; +extern cpuop_func op_4ae8_0_nf; +extern cpuop_func op_4ae8_0_ff; +extern cpuop_func op_4af0_0_nf; +extern cpuop_func op_4af0_0_ff; +extern cpuop_func op_4af8_0_nf; +extern cpuop_func op_4af8_0_ff; +extern cpuop_func op_4af9_0_nf; +extern cpuop_func op_4af9_0_ff; +extern cpuop_func op_4c00_0_nf; +extern cpuop_func op_4c00_0_ff; +extern cpuop_func op_4c10_0_nf; +extern cpuop_func op_4c10_0_ff; +extern cpuop_func op_4c18_0_nf; +extern cpuop_func op_4c18_0_ff; +extern cpuop_func op_4c20_0_nf; +extern cpuop_func op_4c20_0_ff; +extern cpuop_func op_4c28_0_nf; +extern cpuop_func op_4c28_0_ff; +extern cpuop_func op_4c30_0_nf; +extern cpuop_func op_4c30_0_ff; +extern cpuop_func op_4c38_0_nf; +extern cpuop_func op_4c38_0_ff; +extern cpuop_func op_4c39_0_nf; +extern cpuop_func op_4c39_0_ff; +extern cpuop_func op_4c3a_0_nf; +extern cpuop_func op_4c3a_0_ff; +extern cpuop_func op_4c3b_0_nf; +extern cpuop_func op_4c3b_0_ff; +extern cpuop_func op_4c3c_0_nf; +extern cpuop_func op_4c3c_0_ff; +extern cpuop_func op_4c40_0_nf; +extern cpuop_func op_4c40_0_ff; +extern cpuop_func op_4c50_0_nf; +extern cpuop_func op_4c50_0_ff; +extern cpuop_func op_4c58_0_nf; +extern cpuop_func op_4c58_0_ff; +extern cpuop_func op_4c60_0_nf; +extern cpuop_func op_4c60_0_ff; +extern cpuop_func op_4c68_0_nf; +extern cpuop_func op_4c68_0_ff; +extern cpuop_func op_4c70_0_nf; +extern cpuop_func op_4c70_0_ff; +extern cpuop_func op_4c78_0_nf; +extern cpuop_func op_4c78_0_ff; +extern cpuop_func op_4c79_0_nf; +extern cpuop_func op_4c79_0_ff; +extern cpuop_func op_4c7a_0_nf; +extern cpuop_func op_4c7a_0_ff; +extern cpuop_func op_4c7b_0_nf; +extern cpuop_func op_4c7b_0_ff; +extern cpuop_func op_4c7c_0_nf; +extern cpuop_func op_4c7c_0_ff; +extern cpuop_func op_4c90_0_nf; +extern cpuop_func op_4c90_0_ff; +extern cpuop_func op_4c98_0_nf; +extern cpuop_func op_4c98_0_ff; +extern cpuop_func op_4ca8_0_nf; +extern cpuop_func op_4ca8_0_ff; +extern cpuop_func op_4cb0_0_nf; +extern cpuop_func op_4cb0_0_ff; +extern cpuop_func op_4cb8_0_nf; +extern cpuop_func op_4cb8_0_ff; +extern cpuop_func op_4cb9_0_nf; +extern cpuop_func op_4cb9_0_ff; +extern cpuop_func op_4cba_0_nf; +extern cpuop_func op_4cba_0_ff; +extern cpuop_func op_4cbb_0_nf; +extern cpuop_func op_4cbb_0_ff; +extern cpuop_func op_4cd0_0_nf; +extern cpuop_func op_4cd0_0_ff; +extern cpuop_func op_4cd8_0_nf; +extern cpuop_func op_4cd8_0_ff; +extern cpuop_func op_4ce8_0_nf; +extern cpuop_func op_4ce8_0_ff; +extern cpuop_func op_4cf0_0_nf; +extern cpuop_func op_4cf0_0_ff; +extern cpuop_func op_4cf8_0_nf; +extern cpuop_func op_4cf8_0_ff; +extern cpuop_func op_4cf9_0_nf; +extern cpuop_func op_4cf9_0_ff; +extern cpuop_func op_4cfa_0_nf; +extern cpuop_func op_4cfa_0_ff; +extern cpuop_func op_4cfb_0_nf; +extern cpuop_func op_4cfb_0_ff; +extern cpuop_func op_4e40_0_nf; +extern cpuop_func op_4e40_0_ff; +extern cpuop_func op_4e50_0_nf; +extern cpuop_func op_4e50_0_ff; +extern cpuop_func op_4e58_0_nf; +extern cpuop_func op_4e58_0_ff; +extern cpuop_func op_4e60_0_nf; +extern cpuop_func op_4e60_0_ff; +extern cpuop_func op_4e68_0_nf; +extern cpuop_func op_4e68_0_ff; +extern cpuop_func op_4e70_0_nf; +extern cpuop_func op_4e70_0_ff; +extern cpuop_func op_4e71_0_nf; +extern cpuop_func op_4e71_0_ff; +extern cpuop_func op_4e72_0_nf; +extern cpuop_func op_4e72_0_ff; +extern cpuop_func op_4e73_0_nf; +extern cpuop_func op_4e73_0_ff; +extern cpuop_func op_4e74_0_nf; +extern cpuop_func op_4e74_0_ff; +extern cpuop_func op_4e75_0_nf; +extern cpuop_func op_4e75_0_ff; +extern cpuop_func op_4e76_0_nf; +extern cpuop_func op_4e76_0_ff; +extern cpuop_func op_4e77_0_nf; +extern cpuop_func op_4e77_0_ff; +extern cpuop_func op_4e7a_0_nf; +extern cpuop_func op_4e7a_0_ff; +extern cpuop_func op_4e7b_0_nf; +extern cpuop_func op_4e7b_0_ff; +extern cpuop_func op_4e90_0_nf; +extern cpuop_func op_4e90_0_ff; +extern cpuop_func op_4ea8_0_nf; +extern cpuop_func op_4ea8_0_ff; +extern cpuop_func op_4eb0_0_nf; +extern cpuop_func op_4eb0_0_ff; +extern cpuop_func op_4eb8_0_nf; +extern cpuop_func op_4eb8_0_ff; +extern cpuop_func op_4eb9_0_nf; +extern cpuop_func op_4eb9_0_ff; +extern cpuop_func op_4eba_0_nf; +extern cpuop_func op_4eba_0_ff; +extern cpuop_func op_4ebb_0_nf; +extern cpuop_func op_4ebb_0_ff; +extern cpuop_func op_4ed0_0_nf; +extern cpuop_func op_4ed0_0_ff; +extern cpuop_func op_4ee8_0_nf; +extern cpuop_func op_4ee8_0_ff; +extern cpuop_func op_4ef0_0_nf; +extern cpuop_func op_4ef0_0_ff; +extern cpuop_func op_4ef8_0_nf; +extern cpuop_func op_4ef8_0_ff; +extern cpuop_func op_4ef9_0_nf; +extern cpuop_func op_4ef9_0_ff; +extern cpuop_func op_4efa_0_nf; +extern cpuop_func op_4efa_0_ff; +extern cpuop_func op_4efb_0_nf; +extern cpuop_func op_4efb_0_ff; +extern cpuop_func op_5000_0_nf; +extern cpuop_func op_5000_0_ff; +extern cpuop_func op_5010_0_nf; +extern cpuop_func op_5010_0_ff; +extern cpuop_func op_5018_0_nf; +extern cpuop_func op_5018_0_ff; +extern cpuop_func op_5020_0_nf; +extern cpuop_func op_5020_0_ff; +extern cpuop_func op_5028_0_nf; +extern cpuop_func op_5028_0_ff; +extern cpuop_func op_5030_0_nf; +extern cpuop_func op_5030_0_ff; +extern cpuop_func op_5038_0_nf; +extern cpuop_func op_5038_0_ff; +extern cpuop_func op_5039_0_nf; +extern cpuop_func op_5039_0_ff; +extern cpuop_func op_5040_0_nf; +extern cpuop_func op_5040_0_ff; +extern cpuop_func op_5048_0_nf; +extern cpuop_func op_5048_0_ff; +extern cpuop_func op_5050_0_nf; +extern cpuop_func op_5050_0_ff; +extern cpuop_func op_5058_0_nf; +extern cpuop_func op_5058_0_ff; +extern cpuop_func op_5060_0_nf; +extern cpuop_func op_5060_0_ff; +extern cpuop_func op_5068_0_nf; +extern cpuop_func op_5068_0_ff; +extern cpuop_func op_5070_0_nf; +extern cpuop_func op_5070_0_ff; +extern cpuop_func op_5078_0_nf; +extern cpuop_func op_5078_0_ff; +extern cpuop_func op_5079_0_nf; +extern cpuop_func op_5079_0_ff; +extern cpuop_func op_5080_0_nf; +extern cpuop_func op_5080_0_ff; +extern cpuop_func op_5088_0_nf; +extern cpuop_func op_5088_0_ff; +extern cpuop_func op_5090_0_nf; +extern cpuop_func op_5090_0_ff; +extern cpuop_func op_5098_0_nf; +extern cpuop_func op_5098_0_ff; +extern cpuop_func op_50a0_0_nf; +extern cpuop_func op_50a0_0_ff; +extern cpuop_func op_50a8_0_nf; +extern cpuop_func op_50a8_0_ff; +extern cpuop_func op_50b0_0_nf; +extern cpuop_func op_50b0_0_ff; +extern cpuop_func op_50b8_0_nf; +extern cpuop_func op_50b8_0_ff; +extern cpuop_func op_50b9_0_nf; +extern cpuop_func op_50b9_0_ff; +extern cpuop_func op_50c0_0_nf; +extern cpuop_func op_50c0_0_ff; +extern cpuop_func op_50c8_0_nf; +extern cpuop_func op_50c8_0_ff; +extern cpuop_func op_50d0_0_nf; +extern cpuop_func op_50d0_0_ff; +extern cpuop_func op_50d8_0_nf; +extern cpuop_func op_50d8_0_ff; +extern cpuop_func op_50e0_0_nf; +extern cpuop_func op_50e0_0_ff; +extern cpuop_func op_50e8_0_nf; +extern cpuop_func op_50e8_0_ff; +extern cpuop_func op_50f0_0_nf; +extern cpuop_func op_50f0_0_ff; +extern cpuop_func op_50f8_0_nf; +extern cpuop_func op_50f8_0_ff; +extern cpuop_func op_50f9_0_nf; +extern cpuop_func op_50f9_0_ff; +extern cpuop_func op_50fa_0_nf; +extern cpuop_func op_50fa_0_ff; +extern cpuop_func op_50fb_0_nf; +extern cpuop_func op_50fb_0_ff; +extern cpuop_func op_50fc_0_nf; +extern cpuop_func op_50fc_0_ff; +extern cpuop_func op_5100_0_nf; +extern cpuop_func op_5100_0_ff; +extern cpuop_func op_5110_0_nf; +extern cpuop_func op_5110_0_ff; +extern cpuop_func op_5118_0_nf; +extern cpuop_func op_5118_0_ff; +extern cpuop_func op_5120_0_nf; +extern cpuop_func op_5120_0_ff; +extern cpuop_func op_5128_0_nf; +extern cpuop_func op_5128_0_ff; +extern cpuop_func op_5130_0_nf; +extern cpuop_func op_5130_0_ff; +extern cpuop_func op_5138_0_nf; +extern cpuop_func op_5138_0_ff; +extern cpuop_func op_5139_0_nf; +extern cpuop_func op_5139_0_ff; +extern cpuop_func op_5140_0_nf; +extern cpuop_func op_5140_0_ff; +extern cpuop_func op_5148_0_nf; +extern cpuop_func op_5148_0_ff; +extern cpuop_func op_5150_0_nf; +extern cpuop_func op_5150_0_ff; +extern cpuop_func op_5158_0_nf; +extern cpuop_func op_5158_0_ff; +extern cpuop_func op_5160_0_nf; +extern cpuop_func op_5160_0_ff; +extern cpuop_func op_5168_0_nf; +extern cpuop_func op_5168_0_ff; +extern cpuop_func op_5170_0_nf; +extern cpuop_func op_5170_0_ff; +extern cpuop_func op_5178_0_nf; +extern cpuop_func op_5178_0_ff; +extern cpuop_func op_5179_0_nf; +extern cpuop_func op_5179_0_ff; +extern cpuop_func op_5180_0_nf; +extern cpuop_func op_5180_0_ff; +extern cpuop_func op_5188_0_nf; +extern cpuop_func op_5188_0_ff; +extern cpuop_func op_5190_0_nf; +extern cpuop_func op_5190_0_ff; +extern cpuop_func op_5198_0_nf; +extern cpuop_func op_5198_0_ff; +extern cpuop_func op_51a0_0_nf; +extern cpuop_func op_51a0_0_ff; +extern cpuop_func op_51a8_0_nf; +extern cpuop_func op_51a8_0_ff; +extern cpuop_func op_51b0_0_nf; +extern cpuop_func op_51b0_0_ff; +extern cpuop_func op_51b8_0_nf; +extern cpuop_func op_51b8_0_ff; +extern cpuop_func op_51b9_0_nf; +extern cpuop_func op_51b9_0_ff; +extern cpuop_func op_51c0_0_nf; +extern cpuop_func op_51c0_0_ff; +extern cpuop_func op_51c8_0_nf; +extern cpuop_func op_51c8_0_ff; +extern cpuop_func op_51d0_0_nf; +extern cpuop_func op_51d0_0_ff; +extern cpuop_func op_51d8_0_nf; +extern cpuop_func op_51d8_0_ff; +extern cpuop_func op_51e0_0_nf; +extern cpuop_func op_51e0_0_ff; +extern cpuop_func op_51e8_0_nf; +extern cpuop_func op_51e8_0_ff; +extern cpuop_func op_51f0_0_nf; +extern cpuop_func op_51f0_0_ff; +extern cpuop_func op_51f8_0_nf; +extern cpuop_func op_51f8_0_ff; +extern cpuop_func op_51f9_0_nf; +extern cpuop_func op_51f9_0_ff; +extern cpuop_func op_51fa_0_nf; +extern cpuop_func op_51fa_0_ff; +extern cpuop_func op_51fb_0_nf; +extern cpuop_func op_51fb_0_ff; +extern cpuop_func op_51fc_0_nf; +extern cpuop_func op_51fc_0_ff; +extern cpuop_func op_52c0_0_nf; +extern cpuop_func op_52c0_0_ff; +extern cpuop_func op_52c8_0_nf; +extern cpuop_func op_52c8_0_ff; +extern cpuop_func op_52d0_0_nf; +extern cpuop_func op_52d0_0_ff; +extern cpuop_func op_52d8_0_nf; +extern cpuop_func op_52d8_0_ff; +extern cpuop_func op_52e0_0_nf; +extern cpuop_func op_52e0_0_ff; +extern cpuop_func op_52e8_0_nf; +extern cpuop_func op_52e8_0_ff; +extern cpuop_func op_52f0_0_nf; +extern cpuop_func op_52f0_0_ff; +extern cpuop_func op_52f8_0_nf; +extern cpuop_func op_52f8_0_ff; +extern cpuop_func op_52f9_0_nf; +extern cpuop_func op_52f9_0_ff; +extern cpuop_func op_52fa_0_nf; +extern cpuop_func op_52fa_0_ff; +extern cpuop_func op_52fb_0_nf; +extern cpuop_func op_52fb_0_ff; +extern cpuop_func op_52fc_0_nf; +extern cpuop_func op_52fc_0_ff; +extern cpuop_func op_53c0_0_nf; +extern cpuop_func op_53c0_0_ff; +extern cpuop_func op_53c8_0_nf; +extern cpuop_func op_53c8_0_ff; +extern cpuop_func op_53d0_0_nf; +extern cpuop_func op_53d0_0_ff; +extern cpuop_func op_53d8_0_nf; +extern cpuop_func op_53d8_0_ff; +extern cpuop_func op_53e0_0_nf; +extern cpuop_func op_53e0_0_ff; +extern cpuop_func op_53e8_0_nf; +extern cpuop_func op_53e8_0_ff; +extern cpuop_func op_53f0_0_nf; +extern cpuop_func op_53f0_0_ff; +extern cpuop_func op_53f8_0_nf; +extern cpuop_func op_53f8_0_ff; +extern cpuop_func op_53f9_0_nf; +extern cpuop_func op_53f9_0_ff; +extern cpuop_func op_53fa_0_nf; +extern cpuop_func op_53fa_0_ff; +extern cpuop_func op_53fb_0_nf; +extern cpuop_func op_53fb_0_ff; +extern cpuop_func op_53fc_0_nf; +extern cpuop_func op_53fc_0_ff; +extern cpuop_func op_54c0_0_nf; +extern cpuop_func op_54c0_0_ff; +extern cpuop_func op_54c8_0_nf; +extern cpuop_func op_54c8_0_ff; +extern cpuop_func op_54d0_0_nf; +extern cpuop_func op_54d0_0_ff; +extern cpuop_func op_54d8_0_nf; +extern cpuop_func op_54d8_0_ff; +extern cpuop_func op_54e0_0_nf; +extern cpuop_func op_54e0_0_ff; +extern cpuop_func op_54e8_0_nf; +extern cpuop_func op_54e8_0_ff; +extern cpuop_func op_54f0_0_nf; +extern cpuop_func op_54f0_0_ff; +extern cpuop_func op_54f8_0_nf; +extern cpuop_func op_54f8_0_ff; +extern cpuop_func op_54f9_0_nf; +extern cpuop_func op_54f9_0_ff; +extern cpuop_func op_54fa_0_nf; +extern cpuop_func op_54fa_0_ff; +extern cpuop_func op_54fb_0_nf; +extern cpuop_func op_54fb_0_ff; +extern cpuop_func op_54fc_0_nf; +extern cpuop_func op_54fc_0_ff; +extern cpuop_func op_55c0_0_nf; +extern cpuop_func op_55c0_0_ff; +extern cpuop_func op_55c8_0_nf; +extern cpuop_func op_55c8_0_ff; +extern cpuop_func op_55d0_0_nf; +extern cpuop_func op_55d0_0_ff; +extern cpuop_func op_55d8_0_nf; +extern cpuop_func op_55d8_0_ff; +extern cpuop_func op_55e0_0_nf; +extern cpuop_func op_55e0_0_ff; +extern cpuop_func op_55e8_0_nf; +extern cpuop_func op_55e8_0_ff; +extern cpuop_func op_55f0_0_nf; +extern cpuop_func op_55f0_0_ff; +extern cpuop_func op_55f8_0_nf; +extern cpuop_func op_55f8_0_ff; +extern cpuop_func op_55f9_0_nf; +extern cpuop_func op_55f9_0_ff; +extern cpuop_func op_55fa_0_nf; +extern cpuop_func op_55fa_0_ff; +extern cpuop_func op_55fb_0_nf; +extern cpuop_func op_55fb_0_ff; +extern cpuop_func op_55fc_0_nf; +extern cpuop_func op_55fc_0_ff; +extern cpuop_func op_56c0_0_nf; +extern cpuop_func op_56c0_0_ff; +extern cpuop_func op_56c8_0_nf; +extern cpuop_func op_56c8_0_ff; +extern cpuop_func op_56d0_0_nf; +extern cpuop_func op_56d0_0_ff; +extern cpuop_func op_56d8_0_nf; +extern cpuop_func op_56d8_0_ff; +extern cpuop_func op_56e0_0_nf; +extern cpuop_func op_56e0_0_ff; +extern cpuop_func op_56e8_0_nf; +extern cpuop_func op_56e8_0_ff; +extern cpuop_func op_56f0_0_nf; +extern cpuop_func op_56f0_0_ff; +extern cpuop_func op_56f8_0_nf; +extern cpuop_func op_56f8_0_ff; +extern cpuop_func op_56f9_0_nf; +extern cpuop_func op_56f9_0_ff; +extern cpuop_func op_56fa_0_nf; +extern cpuop_func op_56fa_0_ff; +extern cpuop_func op_56fb_0_nf; +extern cpuop_func op_56fb_0_ff; +extern cpuop_func op_56fc_0_nf; +extern cpuop_func op_56fc_0_ff; +extern cpuop_func op_57c0_0_nf; +extern cpuop_func op_57c0_0_ff; +extern cpuop_func op_57c8_0_nf; +extern cpuop_func op_57c8_0_ff; +extern cpuop_func op_57d0_0_nf; +extern cpuop_func op_57d0_0_ff; +extern cpuop_func op_57d8_0_nf; +extern cpuop_func op_57d8_0_ff; +extern cpuop_func op_57e0_0_nf; +extern cpuop_func op_57e0_0_ff; +extern cpuop_func op_57e8_0_nf; +extern cpuop_func op_57e8_0_ff; +extern cpuop_func op_57f0_0_nf; +extern cpuop_func op_57f0_0_ff; +extern cpuop_func op_57f8_0_nf; +extern cpuop_func op_57f8_0_ff; +extern cpuop_func op_57f9_0_nf; +extern cpuop_func op_57f9_0_ff; +extern cpuop_func op_57fa_0_nf; +extern cpuop_func op_57fa_0_ff; +extern cpuop_func op_57fb_0_nf; +extern cpuop_func op_57fb_0_ff; +extern cpuop_func op_57fc_0_nf; +extern cpuop_func op_57fc_0_ff; +extern cpuop_func op_58c0_0_nf; +extern cpuop_func op_58c0_0_ff; +extern cpuop_func op_58c8_0_nf; +extern cpuop_func op_58c8_0_ff; +extern cpuop_func op_58d0_0_nf; +extern cpuop_func op_58d0_0_ff; +extern cpuop_func op_58d8_0_nf; +extern cpuop_func op_58d8_0_ff; +extern cpuop_func op_58e0_0_nf; +extern cpuop_func op_58e0_0_ff; +extern cpuop_func op_58e8_0_nf; +extern cpuop_func op_58e8_0_ff; +extern cpuop_func op_58f0_0_nf; +extern cpuop_func op_58f0_0_ff; +extern cpuop_func op_58f8_0_nf; +extern cpuop_func op_58f8_0_ff; +extern cpuop_func op_58f9_0_nf; +extern cpuop_func op_58f9_0_ff; +extern cpuop_func op_58fa_0_nf; +extern cpuop_func op_58fa_0_ff; +extern cpuop_func op_58fb_0_nf; +extern cpuop_func op_58fb_0_ff; +extern cpuop_func op_58fc_0_nf; +extern cpuop_func op_58fc_0_ff; +extern cpuop_func op_59c0_0_nf; +extern cpuop_func op_59c0_0_ff; +extern cpuop_func op_59c8_0_nf; +extern cpuop_func op_59c8_0_ff; +extern cpuop_func op_59d0_0_nf; +extern cpuop_func op_59d0_0_ff; +extern cpuop_func op_59d8_0_nf; +extern cpuop_func op_59d8_0_ff; +extern cpuop_func op_59e0_0_nf; +extern cpuop_func op_59e0_0_ff; +extern cpuop_func op_59e8_0_nf; +extern cpuop_func op_59e8_0_ff; +extern cpuop_func op_59f0_0_nf; +extern cpuop_func op_59f0_0_ff; +extern cpuop_func op_59f8_0_nf; +extern cpuop_func op_59f8_0_ff; +extern cpuop_func op_59f9_0_nf; +extern cpuop_func op_59f9_0_ff; +extern cpuop_func op_59fa_0_nf; +extern cpuop_func op_59fa_0_ff; +extern cpuop_func op_59fb_0_nf; +extern cpuop_func op_59fb_0_ff; +extern cpuop_func op_59fc_0_nf; +extern cpuop_func op_59fc_0_ff; +extern cpuop_func op_5ac0_0_nf; +extern cpuop_func op_5ac0_0_ff; +extern cpuop_func op_5ac8_0_nf; +extern cpuop_func op_5ac8_0_ff; +extern cpuop_func op_5ad0_0_nf; +extern cpuop_func op_5ad0_0_ff; +extern cpuop_func op_5ad8_0_nf; +extern cpuop_func op_5ad8_0_ff; +extern cpuop_func op_5ae0_0_nf; +extern cpuop_func op_5ae0_0_ff; +extern cpuop_func op_5ae8_0_nf; +extern cpuop_func op_5ae8_0_ff; +extern cpuop_func op_5af0_0_nf; +extern cpuop_func op_5af0_0_ff; +extern cpuop_func op_5af8_0_nf; +extern cpuop_func op_5af8_0_ff; +extern cpuop_func op_5af9_0_nf; +extern cpuop_func op_5af9_0_ff; +extern cpuop_func op_5afa_0_nf; +extern cpuop_func op_5afa_0_ff; +extern cpuop_func op_5afb_0_nf; +extern cpuop_func op_5afb_0_ff; +extern cpuop_func op_5afc_0_nf; +extern cpuop_func op_5afc_0_ff; +extern cpuop_func op_5bc0_0_nf; +extern cpuop_func op_5bc0_0_ff; +extern cpuop_func op_5bc8_0_nf; +extern cpuop_func op_5bc8_0_ff; +extern cpuop_func op_5bd0_0_nf; +extern cpuop_func op_5bd0_0_ff; +extern cpuop_func op_5bd8_0_nf; +extern cpuop_func op_5bd8_0_ff; +extern cpuop_func op_5be0_0_nf; +extern cpuop_func op_5be0_0_ff; +extern cpuop_func op_5be8_0_nf; +extern cpuop_func op_5be8_0_ff; +extern cpuop_func op_5bf0_0_nf; +extern cpuop_func op_5bf0_0_ff; +extern cpuop_func op_5bf8_0_nf; +extern cpuop_func op_5bf8_0_ff; +extern cpuop_func op_5bf9_0_nf; +extern cpuop_func op_5bf9_0_ff; +extern cpuop_func op_5bfa_0_nf; +extern cpuop_func op_5bfa_0_ff; +extern cpuop_func op_5bfb_0_nf; +extern cpuop_func op_5bfb_0_ff; +extern cpuop_func op_5bfc_0_nf; +extern cpuop_func op_5bfc_0_ff; +extern cpuop_func op_5cc0_0_nf; +extern cpuop_func op_5cc0_0_ff; +extern cpuop_func op_5cc8_0_nf; +extern cpuop_func op_5cc8_0_ff; +extern cpuop_func op_5cd0_0_nf; +extern cpuop_func op_5cd0_0_ff; +extern cpuop_func op_5cd8_0_nf; +extern cpuop_func op_5cd8_0_ff; +extern cpuop_func op_5ce0_0_nf; +extern cpuop_func op_5ce0_0_ff; +extern cpuop_func op_5ce8_0_nf; +extern cpuop_func op_5ce8_0_ff; +extern cpuop_func op_5cf0_0_nf; +extern cpuop_func op_5cf0_0_ff; +extern cpuop_func op_5cf8_0_nf; +extern cpuop_func op_5cf8_0_ff; +extern cpuop_func op_5cf9_0_nf; +extern cpuop_func op_5cf9_0_ff; +extern cpuop_func op_5cfa_0_nf; +extern cpuop_func op_5cfa_0_ff; +extern cpuop_func op_5cfb_0_nf; +extern cpuop_func op_5cfb_0_ff; +extern cpuop_func op_5cfc_0_nf; +extern cpuop_func op_5cfc_0_ff; +extern cpuop_func op_5dc0_0_nf; +extern cpuop_func op_5dc0_0_ff; +extern cpuop_func op_5dc8_0_nf; +extern cpuop_func op_5dc8_0_ff; +extern cpuop_func op_5dd0_0_nf; +extern cpuop_func op_5dd0_0_ff; +extern cpuop_func op_5dd8_0_nf; +extern cpuop_func op_5dd8_0_ff; +extern cpuop_func op_5de0_0_nf; +extern cpuop_func op_5de0_0_ff; +extern cpuop_func op_5de8_0_nf; +extern cpuop_func op_5de8_0_ff; +extern cpuop_func op_5df0_0_nf; +extern cpuop_func op_5df0_0_ff; +extern cpuop_func op_5df8_0_nf; +extern cpuop_func op_5df8_0_ff; +extern cpuop_func op_5df9_0_nf; +extern cpuop_func op_5df9_0_ff; +extern cpuop_func op_5dfa_0_nf; +extern cpuop_func op_5dfa_0_ff; +extern cpuop_func op_5dfb_0_nf; +extern cpuop_func op_5dfb_0_ff; +extern cpuop_func op_5dfc_0_nf; +extern cpuop_func op_5dfc_0_ff; +extern cpuop_func op_5ec0_0_nf; +extern cpuop_func op_5ec0_0_ff; +extern cpuop_func op_5ec8_0_nf; +extern cpuop_func op_5ec8_0_ff; +extern cpuop_func op_5ed0_0_nf; +extern cpuop_func op_5ed0_0_ff; +extern cpuop_func op_5ed8_0_nf; +extern cpuop_func op_5ed8_0_ff; +extern cpuop_func op_5ee0_0_nf; +extern cpuop_func op_5ee0_0_ff; +extern cpuop_func op_5ee8_0_nf; +extern cpuop_func op_5ee8_0_ff; +extern cpuop_func op_5ef0_0_nf; +extern cpuop_func op_5ef0_0_ff; +extern cpuop_func op_5ef8_0_nf; +extern cpuop_func op_5ef8_0_ff; +extern cpuop_func op_5ef9_0_nf; +extern cpuop_func op_5ef9_0_ff; +extern cpuop_func op_5efa_0_nf; +extern cpuop_func op_5efa_0_ff; +extern cpuop_func op_5efb_0_nf; +extern cpuop_func op_5efb_0_ff; +extern cpuop_func op_5efc_0_nf; +extern cpuop_func op_5efc_0_ff; +extern cpuop_func op_5fc0_0_nf; +extern cpuop_func op_5fc0_0_ff; +extern cpuop_func op_5fc8_0_nf; +extern cpuop_func op_5fc8_0_ff; +extern cpuop_func op_5fd0_0_nf; +extern cpuop_func op_5fd0_0_ff; +extern cpuop_func op_5fd8_0_nf; +extern cpuop_func op_5fd8_0_ff; +extern cpuop_func op_5fe0_0_nf; +extern cpuop_func op_5fe0_0_ff; +extern cpuop_func op_5fe8_0_nf; +extern cpuop_func op_5fe8_0_ff; +extern cpuop_func op_5ff0_0_nf; +extern cpuop_func op_5ff0_0_ff; +extern cpuop_func op_5ff8_0_nf; +extern cpuop_func op_5ff8_0_ff; +extern cpuop_func op_5ff9_0_nf; +extern cpuop_func op_5ff9_0_ff; +extern cpuop_func op_5ffa_0_nf; +extern cpuop_func op_5ffa_0_ff; +extern cpuop_func op_5ffb_0_nf; +extern cpuop_func op_5ffb_0_ff; +extern cpuop_func op_5ffc_0_nf; +extern cpuop_func op_5ffc_0_ff; +extern cpuop_func op_6000_0_nf; +extern cpuop_func op_6000_0_ff; +extern cpuop_func op_6001_0_nf; +extern cpuop_func op_6001_0_ff; +extern cpuop_func op_60ff_0_nf; +extern cpuop_func op_60ff_0_ff; +extern cpuop_func op_6100_0_nf; +extern cpuop_func op_6100_0_ff; +extern cpuop_func op_6101_0_nf; +extern cpuop_func op_6101_0_ff; +extern cpuop_func op_61ff_0_nf; +extern cpuop_func op_61ff_0_ff; +extern cpuop_func op_6200_0_nf; +extern cpuop_func op_6200_0_ff; +extern cpuop_func op_6201_0_nf; +extern cpuop_func op_6201_0_ff; +extern cpuop_func op_62ff_0_nf; +extern cpuop_func op_62ff_0_ff; +extern cpuop_func op_6300_0_nf; +extern cpuop_func op_6300_0_ff; +extern cpuop_func op_6301_0_nf; +extern cpuop_func op_6301_0_ff; +extern cpuop_func op_63ff_0_nf; +extern cpuop_func op_63ff_0_ff; +extern cpuop_func op_6400_0_nf; +extern cpuop_func op_6400_0_ff; +extern cpuop_func op_6401_0_nf; +extern cpuop_func op_6401_0_ff; +extern cpuop_func op_64ff_0_nf; +extern cpuop_func op_64ff_0_ff; +extern cpuop_func op_6500_0_nf; +extern cpuop_func op_6500_0_ff; +extern cpuop_func op_6501_0_nf; +extern cpuop_func op_6501_0_ff; +extern cpuop_func op_65ff_0_nf; +extern cpuop_func op_65ff_0_ff; +extern cpuop_func op_6600_0_nf; +extern cpuop_func op_6600_0_ff; +extern cpuop_func op_6601_0_nf; +extern cpuop_func op_6601_0_ff; +extern cpuop_func op_66ff_0_nf; +extern cpuop_func op_66ff_0_ff; +extern cpuop_func op_6700_0_nf; +extern cpuop_func op_6700_0_ff; +extern cpuop_func op_6701_0_nf; +extern cpuop_func op_6701_0_ff; +extern cpuop_func op_67ff_0_nf; +extern cpuop_func op_67ff_0_ff; +extern cpuop_func op_6800_0_nf; +extern cpuop_func op_6800_0_ff; +extern cpuop_func op_6801_0_nf; +extern cpuop_func op_6801_0_ff; +extern cpuop_func op_68ff_0_nf; +extern cpuop_func op_68ff_0_ff; +extern cpuop_func op_6900_0_nf; +extern cpuop_func op_6900_0_ff; +extern cpuop_func op_6901_0_nf; +extern cpuop_func op_6901_0_ff; +extern cpuop_func op_69ff_0_nf; +extern cpuop_func op_69ff_0_ff; +extern cpuop_func op_6a00_0_nf; +extern cpuop_func op_6a00_0_ff; +extern cpuop_func op_6a01_0_nf; +extern cpuop_func op_6a01_0_ff; +extern cpuop_func op_6aff_0_nf; +extern cpuop_func op_6aff_0_ff; +extern cpuop_func op_6b00_0_nf; +extern cpuop_func op_6b00_0_ff; +extern cpuop_func op_6b01_0_nf; +extern cpuop_func op_6b01_0_ff; +extern cpuop_func op_6bff_0_nf; +extern cpuop_func op_6bff_0_ff; +extern cpuop_func op_6c00_0_nf; +extern cpuop_func op_6c00_0_ff; +extern cpuop_func op_6c01_0_nf; +extern cpuop_func op_6c01_0_ff; +extern cpuop_func op_6cff_0_nf; +extern cpuop_func op_6cff_0_ff; +extern cpuop_func op_6d00_0_nf; +extern cpuop_func op_6d00_0_ff; +extern cpuop_func op_6d01_0_nf; +extern cpuop_func op_6d01_0_ff; +extern cpuop_func op_6dff_0_nf; +extern cpuop_func op_6dff_0_ff; +extern cpuop_func op_6e00_0_nf; +extern cpuop_func op_6e00_0_ff; +extern cpuop_func op_6e01_0_nf; +extern cpuop_func op_6e01_0_ff; +extern cpuop_func op_6eff_0_nf; +extern cpuop_func op_6eff_0_ff; +extern cpuop_func op_6f00_0_nf; +extern cpuop_func op_6f00_0_ff; +extern cpuop_func op_6f01_0_nf; +extern cpuop_func op_6f01_0_ff; +extern cpuop_func op_6fff_0_nf; +extern cpuop_func op_6fff_0_ff; +extern cpuop_func op_7000_0_nf; +extern cpuop_func op_7000_0_ff; +extern cpuop_func op_7100_0_nf; +extern cpuop_func op_7100_0_ff; +extern cpuop_func op_7101_0_nf; +extern cpuop_func op_7101_0_ff; +extern cpuop_func op_8000_0_nf; +extern cpuop_func op_8000_0_ff; +extern cpuop_func op_8010_0_nf; +extern cpuop_func op_8010_0_ff; +extern cpuop_func op_8018_0_nf; +extern cpuop_func op_8018_0_ff; +extern cpuop_func op_8020_0_nf; +extern cpuop_func op_8020_0_ff; +extern cpuop_func op_8028_0_nf; +extern cpuop_func op_8028_0_ff; +extern cpuop_func op_8030_0_nf; +extern cpuop_func op_8030_0_ff; +extern cpuop_func op_8038_0_nf; +extern cpuop_func op_8038_0_ff; +extern cpuop_func op_8039_0_nf; +extern cpuop_func op_8039_0_ff; +extern cpuop_func op_803a_0_nf; +extern cpuop_func op_803a_0_ff; +extern cpuop_func op_803b_0_nf; +extern cpuop_func op_803b_0_ff; +extern cpuop_func op_803c_0_nf; +extern cpuop_func op_803c_0_ff; +extern cpuop_func op_8040_0_nf; +extern cpuop_func op_8040_0_ff; +extern cpuop_func op_8050_0_nf; +extern cpuop_func op_8050_0_ff; +extern cpuop_func op_8058_0_nf; +extern cpuop_func op_8058_0_ff; +extern cpuop_func op_8060_0_nf; +extern cpuop_func op_8060_0_ff; +extern cpuop_func op_8068_0_nf; +extern cpuop_func op_8068_0_ff; +extern cpuop_func op_8070_0_nf; +extern cpuop_func op_8070_0_ff; +extern cpuop_func op_8078_0_nf; +extern cpuop_func op_8078_0_ff; +extern cpuop_func op_8079_0_nf; +extern cpuop_func op_8079_0_ff; +extern cpuop_func op_807a_0_nf; +extern cpuop_func op_807a_0_ff; +extern cpuop_func op_807b_0_nf; +extern cpuop_func op_807b_0_ff; +extern cpuop_func op_807c_0_nf; +extern cpuop_func op_807c_0_ff; +extern cpuop_func op_8080_0_nf; +extern cpuop_func op_8080_0_ff; +extern cpuop_func op_8090_0_nf; +extern cpuop_func op_8090_0_ff; +extern cpuop_func op_8098_0_nf; +extern cpuop_func op_8098_0_ff; +extern cpuop_func op_80a0_0_nf; +extern cpuop_func op_80a0_0_ff; +extern cpuop_func op_80a8_0_nf; +extern cpuop_func op_80a8_0_ff; +extern cpuop_func op_80b0_0_nf; +extern cpuop_func op_80b0_0_ff; +extern cpuop_func op_80b8_0_nf; +extern cpuop_func op_80b8_0_ff; +extern cpuop_func op_80b9_0_nf; +extern cpuop_func op_80b9_0_ff; +extern cpuop_func op_80ba_0_nf; +extern cpuop_func op_80ba_0_ff; +extern cpuop_func op_80bb_0_nf; +extern cpuop_func op_80bb_0_ff; +extern cpuop_func op_80bc_0_nf; +extern cpuop_func op_80bc_0_ff; +extern cpuop_func op_80c0_0_nf; +extern cpuop_func op_80c0_0_ff; +extern cpuop_func op_80d0_0_nf; +extern cpuop_func op_80d0_0_ff; +extern cpuop_func op_80d8_0_nf; +extern cpuop_func op_80d8_0_ff; +extern cpuop_func op_80e0_0_nf; +extern cpuop_func op_80e0_0_ff; +extern cpuop_func op_80e8_0_nf; +extern cpuop_func op_80e8_0_ff; +extern cpuop_func op_80f0_0_nf; +extern cpuop_func op_80f0_0_ff; +extern cpuop_func op_80f8_0_nf; +extern cpuop_func op_80f8_0_ff; +extern cpuop_func op_80f9_0_nf; +extern cpuop_func op_80f9_0_ff; +extern cpuop_func op_80fa_0_nf; +extern cpuop_func op_80fa_0_ff; +extern cpuop_func op_80fb_0_nf; +extern cpuop_func op_80fb_0_ff; +extern cpuop_func op_80fc_0_nf; +extern cpuop_func op_80fc_0_ff; +extern cpuop_func op_8100_0_nf; +extern cpuop_func op_8100_0_ff; +extern cpuop_func op_8108_0_nf; +extern cpuop_func op_8108_0_ff; +extern cpuop_func op_8110_0_nf; +extern cpuop_func op_8110_0_ff; +extern cpuop_func op_8118_0_nf; +extern cpuop_func op_8118_0_ff; +extern cpuop_func op_8120_0_nf; +extern cpuop_func op_8120_0_ff; +extern cpuop_func op_8128_0_nf; +extern cpuop_func op_8128_0_ff; +extern cpuop_func op_8130_0_nf; +extern cpuop_func op_8130_0_ff; +extern cpuop_func op_8138_0_nf; +extern cpuop_func op_8138_0_ff; +extern cpuop_func op_8139_0_nf; +extern cpuop_func op_8139_0_ff; +extern cpuop_func op_8140_0_nf; +extern cpuop_func op_8140_0_ff; +extern cpuop_func op_8148_0_nf; +extern cpuop_func op_8148_0_ff; +extern cpuop_func op_8150_0_nf; +extern cpuop_func op_8150_0_ff; +extern cpuop_func op_8158_0_nf; +extern cpuop_func op_8158_0_ff; +extern cpuop_func op_8160_0_nf; +extern cpuop_func op_8160_0_ff; +extern cpuop_func op_8168_0_nf; +extern cpuop_func op_8168_0_ff; +extern cpuop_func op_8170_0_nf; +extern cpuop_func op_8170_0_ff; +extern cpuop_func op_8178_0_nf; +extern cpuop_func op_8178_0_ff; +extern cpuop_func op_8179_0_nf; +extern cpuop_func op_8179_0_ff; +extern cpuop_func op_8180_0_nf; +extern cpuop_func op_8180_0_ff; +extern cpuop_func op_8188_0_nf; +extern cpuop_func op_8188_0_ff; +extern cpuop_func op_8190_0_nf; +extern cpuop_func op_8190_0_ff; +extern cpuop_func op_8198_0_nf; +extern cpuop_func op_8198_0_ff; +extern cpuop_func op_81a0_0_nf; +extern cpuop_func op_81a0_0_ff; +extern cpuop_func op_81a8_0_nf; +extern cpuop_func op_81a8_0_ff; +extern cpuop_func op_81b0_0_nf; +extern cpuop_func op_81b0_0_ff; +extern cpuop_func op_81b8_0_nf; +extern cpuop_func op_81b8_0_ff; +extern cpuop_func op_81b9_0_nf; +extern cpuop_func op_81b9_0_ff; +extern cpuop_func op_81c0_0_nf; +extern cpuop_func op_81c0_0_ff; +extern cpuop_func op_81d0_0_nf; +extern cpuop_func op_81d0_0_ff; +extern cpuop_func op_81d8_0_nf; +extern cpuop_func op_81d8_0_ff; +extern cpuop_func op_81e0_0_nf; +extern cpuop_func op_81e0_0_ff; +extern cpuop_func op_81e8_0_nf; +extern cpuop_func op_81e8_0_ff; +extern cpuop_func op_81f0_0_nf; +extern cpuop_func op_81f0_0_ff; +extern cpuop_func op_81f8_0_nf; +extern cpuop_func op_81f8_0_ff; +extern cpuop_func op_81f9_0_nf; +extern cpuop_func op_81f9_0_ff; +extern cpuop_func op_81fa_0_nf; +extern cpuop_func op_81fa_0_ff; +extern cpuop_func op_81fb_0_nf; +extern cpuop_func op_81fb_0_ff; +extern cpuop_func op_81fc_0_nf; +extern cpuop_func op_81fc_0_ff; +extern cpuop_func op_9000_0_nf; +extern cpuop_func op_9000_0_ff; +extern cpuop_func op_9010_0_nf; +extern cpuop_func op_9010_0_ff; +extern cpuop_func op_9018_0_nf; +extern cpuop_func op_9018_0_ff; +extern cpuop_func op_9020_0_nf; +extern cpuop_func op_9020_0_ff; +extern cpuop_func op_9028_0_nf; +extern cpuop_func op_9028_0_ff; +extern cpuop_func op_9030_0_nf; +extern cpuop_func op_9030_0_ff; +extern cpuop_func op_9038_0_nf; +extern cpuop_func op_9038_0_ff; +extern cpuop_func op_9039_0_nf; +extern cpuop_func op_9039_0_ff; +extern cpuop_func op_903a_0_nf; +extern cpuop_func op_903a_0_ff; +extern cpuop_func op_903b_0_nf; +extern cpuop_func op_903b_0_ff; +extern cpuop_func op_903c_0_nf; +extern cpuop_func op_903c_0_ff; +extern cpuop_func op_9040_0_nf; +extern cpuop_func op_9040_0_ff; +extern cpuop_func op_9048_0_nf; +extern cpuop_func op_9048_0_ff; +extern cpuop_func op_9050_0_nf; +extern cpuop_func op_9050_0_ff; +extern cpuop_func op_9058_0_nf; +extern cpuop_func op_9058_0_ff; +extern cpuop_func op_9060_0_nf; +extern cpuop_func op_9060_0_ff; +extern cpuop_func op_9068_0_nf; +extern cpuop_func op_9068_0_ff; +extern cpuop_func op_9070_0_nf; +extern cpuop_func op_9070_0_ff; +extern cpuop_func op_9078_0_nf; +extern cpuop_func op_9078_0_ff; +extern cpuop_func op_9079_0_nf; +extern cpuop_func op_9079_0_ff; +extern cpuop_func op_907a_0_nf; +extern cpuop_func op_907a_0_ff; +extern cpuop_func op_907b_0_nf; +extern cpuop_func op_907b_0_ff; +extern cpuop_func op_907c_0_nf; +extern cpuop_func op_907c_0_ff; +extern cpuop_func op_9080_0_nf; +extern cpuop_func op_9080_0_ff; +extern cpuop_func op_9088_0_nf; +extern cpuop_func op_9088_0_ff; +extern cpuop_func op_9090_0_nf; +extern cpuop_func op_9090_0_ff; +extern cpuop_func op_9098_0_nf; +extern cpuop_func op_9098_0_ff; +extern cpuop_func op_90a0_0_nf; +extern cpuop_func op_90a0_0_ff; +extern cpuop_func op_90a8_0_nf; +extern cpuop_func op_90a8_0_ff; +extern cpuop_func op_90b0_0_nf; +extern cpuop_func op_90b0_0_ff; +extern cpuop_func op_90b8_0_nf; +extern cpuop_func op_90b8_0_ff; +extern cpuop_func op_90b9_0_nf; +extern cpuop_func op_90b9_0_ff; +extern cpuop_func op_90ba_0_nf; +extern cpuop_func op_90ba_0_ff; +extern cpuop_func op_90bb_0_nf; +extern cpuop_func op_90bb_0_ff; +extern cpuop_func op_90bc_0_nf; +extern cpuop_func op_90bc_0_ff; +extern cpuop_func op_90c0_0_nf; +extern cpuop_func op_90c0_0_ff; +extern cpuop_func op_90c8_0_nf; +extern cpuop_func op_90c8_0_ff; +extern cpuop_func op_90d0_0_nf; +extern cpuop_func op_90d0_0_ff; +extern cpuop_func op_90d8_0_nf; +extern cpuop_func op_90d8_0_ff; +extern cpuop_func op_90e0_0_nf; +extern cpuop_func op_90e0_0_ff; +extern cpuop_func op_90e8_0_nf; +extern cpuop_func op_90e8_0_ff; +extern cpuop_func op_90f0_0_nf; +extern cpuop_func op_90f0_0_ff; +extern cpuop_func op_90f8_0_nf; +extern cpuop_func op_90f8_0_ff; +extern cpuop_func op_90f9_0_nf; +extern cpuop_func op_90f9_0_ff; +extern cpuop_func op_90fa_0_nf; +extern cpuop_func op_90fa_0_ff; +extern cpuop_func op_90fb_0_nf; +extern cpuop_func op_90fb_0_ff; +extern cpuop_func op_90fc_0_nf; +extern cpuop_func op_90fc_0_ff; +extern cpuop_func op_9100_0_nf; +extern cpuop_func op_9100_0_ff; +extern cpuop_func op_9108_0_nf; +extern cpuop_func op_9108_0_ff; +extern cpuop_func op_9110_0_nf; +extern cpuop_func op_9110_0_ff; +extern cpuop_func op_9118_0_nf; +extern cpuop_func op_9118_0_ff; +extern cpuop_func op_9120_0_nf; +extern cpuop_func op_9120_0_ff; +extern cpuop_func op_9128_0_nf; +extern cpuop_func op_9128_0_ff; +extern cpuop_func op_9130_0_nf; +extern cpuop_func op_9130_0_ff; +extern cpuop_func op_9138_0_nf; +extern cpuop_func op_9138_0_ff; +extern cpuop_func op_9139_0_nf; +extern cpuop_func op_9139_0_ff; +extern cpuop_func op_9140_0_nf; +extern cpuop_func op_9140_0_ff; +extern cpuop_func op_9148_0_nf; +extern cpuop_func op_9148_0_ff; +extern cpuop_func op_9150_0_nf; +extern cpuop_func op_9150_0_ff; +extern cpuop_func op_9158_0_nf; +extern cpuop_func op_9158_0_ff; +extern cpuop_func op_9160_0_nf; +extern cpuop_func op_9160_0_ff; +extern cpuop_func op_9168_0_nf; +extern cpuop_func op_9168_0_ff; +extern cpuop_func op_9170_0_nf; +extern cpuop_func op_9170_0_ff; +extern cpuop_func op_9178_0_nf; +extern cpuop_func op_9178_0_ff; +extern cpuop_func op_9179_0_nf; +extern cpuop_func op_9179_0_ff; +extern cpuop_func op_9180_0_nf; +extern cpuop_func op_9180_0_ff; +extern cpuop_func op_9188_0_nf; +extern cpuop_func op_9188_0_ff; +extern cpuop_func op_9190_0_nf; +extern cpuop_func op_9190_0_ff; +extern cpuop_func op_9198_0_nf; +extern cpuop_func op_9198_0_ff; +extern cpuop_func op_91a0_0_nf; +extern cpuop_func op_91a0_0_ff; +extern cpuop_func op_91a8_0_nf; +extern cpuop_func op_91a8_0_ff; +extern cpuop_func op_91b0_0_nf; +extern cpuop_func op_91b0_0_ff; +extern cpuop_func op_91b8_0_nf; +extern cpuop_func op_91b8_0_ff; +extern cpuop_func op_91b9_0_nf; +extern cpuop_func op_91b9_0_ff; +extern cpuop_func op_91c0_0_nf; +extern cpuop_func op_91c0_0_ff; +extern cpuop_func op_91c8_0_nf; +extern cpuop_func op_91c8_0_ff; +extern cpuop_func op_91d0_0_nf; +extern cpuop_func op_91d0_0_ff; +extern cpuop_func op_91d8_0_nf; +extern cpuop_func op_91d8_0_ff; +extern cpuop_func op_91e0_0_nf; +extern cpuop_func op_91e0_0_ff; +extern cpuop_func op_91e8_0_nf; +extern cpuop_func op_91e8_0_ff; +extern cpuop_func op_91f0_0_nf; +extern cpuop_func op_91f0_0_ff; +extern cpuop_func op_91f8_0_nf; +extern cpuop_func op_91f8_0_ff; +extern cpuop_func op_91f9_0_nf; +extern cpuop_func op_91f9_0_ff; +extern cpuop_func op_91fa_0_nf; +extern cpuop_func op_91fa_0_ff; +extern cpuop_func op_91fb_0_nf; +extern cpuop_func op_91fb_0_ff; +extern cpuop_func op_91fc_0_nf; +extern cpuop_func op_91fc_0_ff; +extern cpuop_func op_b000_0_nf; +extern cpuop_func op_b000_0_ff; +extern cpuop_func op_b010_0_nf; +extern cpuop_func op_b010_0_ff; +extern cpuop_func op_b018_0_nf; +extern cpuop_func op_b018_0_ff; +extern cpuop_func op_b020_0_nf; +extern cpuop_func op_b020_0_ff; +extern cpuop_func op_b028_0_nf; +extern cpuop_func op_b028_0_ff; +extern cpuop_func op_b030_0_nf; +extern cpuop_func op_b030_0_ff; +extern cpuop_func op_b038_0_nf; +extern cpuop_func op_b038_0_ff; +extern cpuop_func op_b039_0_nf; +extern cpuop_func op_b039_0_ff; +extern cpuop_func op_b03a_0_nf; +extern cpuop_func op_b03a_0_ff; +extern cpuop_func op_b03b_0_nf; +extern cpuop_func op_b03b_0_ff; +extern cpuop_func op_b03c_0_nf; +extern cpuop_func op_b03c_0_ff; +extern cpuop_func op_b040_0_nf; +extern cpuop_func op_b040_0_ff; +extern cpuop_func op_b048_0_nf; +extern cpuop_func op_b048_0_ff; +extern cpuop_func op_b050_0_nf; +extern cpuop_func op_b050_0_ff; +extern cpuop_func op_b058_0_nf; +extern cpuop_func op_b058_0_ff; +extern cpuop_func op_b060_0_nf; +extern cpuop_func op_b060_0_ff; +extern cpuop_func op_b068_0_nf; +extern cpuop_func op_b068_0_ff; +extern cpuop_func op_b070_0_nf; +extern cpuop_func op_b070_0_ff; +extern cpuop_func op_b078_0_nf; +extern cpuop_func op_b078_0_ff; +extern cpuop_func op_b079_0_nf; +extern cpuop_func op_b079_0_ff; +extern cpuop_func op_b07a_0_nf; +extern cpuop_func op_b07a_0_ff; +extern cpuop_func op_b07b_0_nf; +extern cpuop_func op_b07b_0_ff; +extern cpuop_func op_b07c_0_nf; +extern cpuop_func op_b07c_0_ff; +extern cpuop_func op_b080_0_nf; +extern cpuop_func op_b080_0_ff; +extern cpuop_func op_b088_0_nf; +extern cpuop_func op_b088_0_ff; +extern cpuop_func op_b090_0_nf; +extern cpuop_func op_b090_0_ff; +extern cpuop_func op_b098_0_nf; +extern cpuop_func op_b098_0_ff; +extern cpuop_func op_b0a0_0_nf; +extern cpuop_func op_b0a0_0_ff; +extern cpuop_func op_b0a8_0_nf; +extern cpuop_func op_b0a8_0_ff; +extern cpuop_func op_b0b0_0_nf; +extern cpuop_func op_b0b0_0_ff; +extern cpuop_func op_b0b8_0_nf; +extern cpuop_func op_b0b8_0_ff; +extern cpuop_func op_b0b9_0_nf; +extern cpuop_func op_b0b9_0_ff; +extern cpuop_func op_b0ba_0_nf; +extern cpuop_func op_b0ba_0_ff; +extern cpuop_func op_b0bb_0_nf; +extern cpuop_func op_b0bb_0_ff; +extern cpuop_func op_b0bc_0_nf; +extern cpuop_func op_b0bc_0_ff; +extern cpuop_func op_b0c0_0_nf; +extern cpuop_func op_b0c0_0_ff; +extern cpuop_func op_b0c8_0_nf; +extern cpuop_func op_b0c8_0_ff; +extern cpuop_func op_b0d0_0_nf; +extern cpuop_func op_b0d0_0_ff; +extern cpuop_func op_b0d8_0_nf; +extern cpuop_func op_b0d8_0_ff; +extern cpuop_func op_b0e0_0_nf; +extern cpuop_func op_b0e0_0_ff; +extern cpuop_func op_b0e8_0_nf; +extern cpuop_func op_b0e8_0_ff; +extern cpuop_func op_b0f0_0_nf; +extern cpuop_func op_b0f0_0_ff; +extern cpuop_func op_b0f8_0_nf; +extern cpuop_func op_b0f8_0_ff; +extern cpuop_func op_b0f9_0_nf; +extern cpuop_func op_b0f9_0_ff; +extern cpuop_func op_b0fa_0_nf; +extern cpuop_func op_b0fa_0_ff; +extern cpuop_func op_b0fb_0_nf; +extern cpuop_func op_b0fb_0_ff; +extern cpuop_func op_b0fc_0_nf; +extern cpuop_func op_b0fc_0_ff; +extern cpuop_func op_b100_0_nf; +extern cpuop_func op_b100_0_ff; +extern cpuop_func op_b108_0_nf; +extern cpuop_func op_b108_0_ff; +extern cpuop_func op_b110_0_nf; +extern cpuop_func op_b110_0_ff; +extern cpuop_func op_b118_0_nf; +extern cpuop_func op_b118_0_ff; +extern cpuop_func op_b120_0_nf; +extern cpuop_func op_b120_0_ff; +extern cpuop_func op_b128_0_nf; +extern cpuop_func op_b128_0_ff; +extern cpuop_func op_b130_0_nf; +extern cpuop_func op_b130_0_ff; +extern cpuop_func op_b138_0_nf; +extern cpuop_func op_b138_0_ff; +extern cpuop_func op_b139_0_nf; +extern cpuop_func op_b139_0_ff; +extern cpuop_func op_b140_0_nf; +extern cpuop_func op_b140_0_ff; +extern cpuop_func op_b148_0_nf; +extern cpuop_func op_b148_0_ff; +extern cpuop_func op_b150_0_nf; +extern cpuop_func op_b150_0_ff; +extern cpuop_func op_b158_0_nf; +extern cpuop_func op_b158_0_ff; +extern cpuop_func op_b160_0_nf; +extern cpuop_func op_b160_0_ff; +extern cpuop_func op_b168_0_nf; +extern cpuop_func op_b168_0_ff; +extern cpuop_func op_b170_0_nf; +extern cpuop_func op_b170_0_ff; +extern cpuop_func op_b178_0_nf; +extern cpuop_func op_b178_0_ff; +extern cpuop_func op_b179_0_nf; +extern cpuop_func op_b179_0_ff; +extern cpuop_func op_b180_0_nf; +extern cpuop_func op_b180_0_ff; +extern cpuop_func op_b188_0_nf; +extern cpuop_func op_b188_0_ff; +extern cpuop_func op_b190_0_nf; +extern cpuop_func op_b190_0_ff; +extern cpuop_func op_b198_0_nf; +extern cpuop_func op_b198_0_ff; +extern cpuop_func op_b1a0_0_nf; +extern cpuop_func op_b1a0_0_ff; +extern cpuop_func op_b1a8_0_nf; +extern cpuop_func op_b1a8_0_ff; +extern cpuop_func op_b1b0_0_nf; +extern cpuop_func op_b1b0_0_ff; +extern cpuop_func op_b1b8_0_nf; +extern cpuop_func op_b1b8_0_ff; +extern cpuop_func op_b1b9_0_nf; +extern cpuop_func op_b1b9_0_ff; +extern cpuop_func op_b1c0_0_nf; +extern cpuop_func op_b1c0_0_ff; +extern cpuop_func op_b1c8_0_nf; +extern cpuop_func op_b1c8_0_ff; +extern cpuop_func op_b1d0_0_nf; +extern cpuop_func op_b1d0_0_ff; +extern cpuop_func op_b1d8_0_nf; +extern cpuop_func op_b1d8_0_ff; +extern cpuop_func op_b1e0_0_nf; +extern cpuop_func op_b1e0_0_ff; +extern cpuop_func op_b1e8_0_nf; +extern cpuop_func op_b1e8_0_ff; +extern cpuop_func op_b1f0_0_nf; +extern cpuop_func op_b1f0_0_ff; +extern cpuop_func op_b1f8_0_nf; +extern cpuop_func op_b1f8_0_ff; +extern cpuop_func op_b1f9_0_nf; +extern cpuop_func op_b1f9_0_ff; +extern cpuop_func op_b1fa_0_nf; +extern cpuop_func op_b1fa_0_ff; +extern cpuop_func op_b1fb_0_nf; +extern cpuop_func op_b1fb_0_ff; +extern cpuop_func op_b1fc_0_nf; +extern cpuop_func op_b1fc_0_ff; +extern cpuop_func op_c000_0_nf; +extern cpuop_func op_c000_0_ff; +extern cpuop_func op_c010_0_nf; +extern cpuop_func op_c010_0_ff; +extern cpuop_func op_c018_0_nf; +extern cpuop_func op_c018_0_ff; +extern cpuop_func op_c020_0_nf; +extern cpuop_func op_c020_0_ff; +extern cpuop_func op_c028_0_nf; +extern cpuop_func op_c028_0_ff; +extern cpuop_func op_c030_0_nf; +extern cpuop_func op_c030_0_ff; +extern cpuop_func op_c038_0_nf; +extern cpuop_func op_c038_0_ff; +extern cpuop_func op_c039_0_nf; +extern cpuop_func op_c039_0_ff; +extern cpuop_func op_c03a_0_nf; +extern cpuop_func op_c03a_0_ff; +extern cpuop_func op_c03b_0_nf; +extern cpuop_func op_c03b_0_ff; +extern cpuop_func op_c03c_0_nf; +extern cpuop_func op_c03c_0_ff; +extern cpuop_func op_c040_0_nf; +extern cpuop_func op_c040_0_ff; +extern cpuop_func op_c050_0_nf; +extern cpuop_func op_c050_0_ff; +extern cpuop_func op_c058_0_nf; +extern cpuop_func op_c058_0_ff; +extern cpuop_func op_c060_0_nf; +extern cpuop_func op_c060_0_ff; +extern cpuop_func op_c068_0_nf; +extern cpuop_func op_c068_0_ff; +extern cpuop_func op_c070_0_nf; +extern cpuop_func op_c070_0_ff; +extern cpuop_func op_c078_0_nf; +extern cpuop_func op_c078_0_ff; +extern cpuop_func op_c079_0_nf; +extern cpuop_func op_c079_0_ff; +extern cpuop_func op_c07a_0_nf; +extern cpuop_func op_c07a_0_ff; +extern cpuop_func op_c07b_0_nf; +extern cpuop_func op_c07b_0_ff; +extern cpuop_func op_c07c_0_nf; +extern cpuop_func op_c07c_0_ff; +extern cpuop_func op_c080_0_nf; +extern cpuop_func op_c080_0_ff; +extern cpuop_func op_c090_0_nf; +extern cpuop_func op_c090_0_ff; +extern cpuop_func op_c098_0_nf; +extern cpuop_func op_c098_0_ff; +extern cpuop_func op_c0a0_0_nf; +extern cpuop_func op_c0a0_0_ff; +extern cpuop_func op_c0a8_0_nf; +extern cpuop_func op_c0a8_0_ff; +extern cpuop_func op_c0b0_0_nf; +extern cpuop_func op_c0b0_0_ff; +extern cpuop_func op_c0b8_0_nf; +extern cpuop_func op_c0b8_0_ff; +extern cpuop_func op_c0b9_0_nf; +extern cpuop_func op_c0b9_0_ff; +extern cpuop_func op_c0ba_0_nf; +extern cpuop_func op_c0ba_0_ff; +extern cpuop_func op_c0bb_0_nf; +extern cpuop_func op_c0bb_0_ff; +extern cpuop_func op_c0bc_0_nf; +extern cpuop_func op_c0bc_0_ff; +extern cpuop_func op_c0c0_0_nf; +extern cpuop_func op_c0c0_0_ff; +extern cpuop_func op_c0d0_0_nf; +extern cpuop_func op_c0d0_0_ff; +extern cpuop_func op_c0d8_0_nf; +extern cpuop_func op_c0d8_0_ff; +extern cpuop_func op_c0e0_0_nf; +extern cpuop_func op_c0e0_0_ff; +extern cpuop_func op_c0e8_0_nf; +extern cpuop_func op_c0e8_0_ff; +extern cpuop_func op_c0f0_0_nf; +extern cpuop_func op_c0f0_0_ff; +extern cpuop_func op_c0f8_0_nf; +extern cpuop_func op_c0f8_0_ff; +extern cpuop_func op_c0f9_0_nf; +extern cpuop_func op_c0f9_0_ff; +extern cpuop_func op_c0fa_0_nf; +extern cpuop_func op_c0fa_0_ff; +extern cpuop_func op_c0fb_0_nf; +extern cpuop_func op_c0fb_0_ff; +extern cpuop_func op_c0fc_0_nf; +extern cpuop_func op_c0fc_0_ff; +extern cpuop_func op_c100_0_nf; +extern cpuop_func op_c100_0_ff; +extern cpuop_func op_c108_0_nf; +extern cpuop_func op_c108_0_ff; +extern cpuop_func op_c110_0_nf; +extern cpuop_func op_c110_0_ff; +extern cpuop_func op_c118_0_nf; +extern cpuop_func op_c118_0_ff; +extern cpuop_func op_c120_0_nf; +extern cpuop_func op_c120_0_ff; +extern cpuop_func op_c128_0_nf; +extern cpuop_func op_c128_0_ff; +extern cpuop_func op_c130_0_nf; +extern cpuop_func op_c130_0_ff; +extern cpuop_func op_c138_0_nf; +extern cpuop_func op_c138_0_ff; +extern cpuop_func op_c139_0_nf; +extern cpuop_func op_c139_0_ff; +extern cpuop_func op_c140_0_nf; +extern cpuop_func op_c140_0_ff; +extern cpuop_func op_c148_0_nf; +extern cpuop_func op_c148_0_ff; +extern cpuop_func op_c150_0_nf; +extern cpuop_func op_c150_0_ff; +extern cpuop_func op_c158_0_nf; +extern cpuop_func op_c158_0_ff; +extern cpuop_func op_c160_0_nf; +extern cpuop_func op_c160_0_ff; +extern cpuop_func op_c168_0_nf; +extern cpuop_func op_c168_0_ff; +extern cpuop_func op_c170_0_nf; +extern cpuop_func op_c170_0_ff; +extern cpuop_func op_c178_0_nf; +extern cpuop_func op_c178_0_ff; +extern cpuop_func op_c179_0_nf; +extern cpuop_func op_c179_0_ff; +extern cpuop_func op_c188_0_nf; +extern cpuop_func op_c188_0_ff; +extern cpuop_func op_c190_0_nf; +extern cpuop_func op_c190_0_ff; +extern cpuop_func op_c198_0_nf; +extern cpuop_func op_c198_0_ff; +extern cpuop_func op_c1a0_0_nf; +extern cpuop_func op_c1a0_0_ff; +extern cpuop_func op_c1a8_0_nf; +extern cpuop_func op_c1a8_0_ff; +extern cpuop_func op_c1b0_0_nf; +extern cpuop_func op_c1b0_0_ff; +extern cpuop_func op_c1b8_0_nf; +extern cpuop_func op_c1b8_0_ff; +extern cpuop_func op_c1b9_0_nf; +extern cpuop_func op_c1b9_0_ff; +extern cpuop_func op_c1c0_0_nf; +extern cpuop_func op_c1c0_0_ff; +extern cpuop_func op_c1d0_0_nf; +extern cpuop_func op_c1d0_0_ff; +extern cpuop_func op_c1d8_0_nf; +extern cpuop_func op_c1d8_0_ff; +extern cpuop_func op_c1e0_0_nf; +extern cpuop_func op_c1e0_0_ff; +extern cpuop_func op_c1e8_0_nf; +extern cpuop_func op_c1e8_0_ff; +extern cpuop_func op_c1f0_0_nf; +extern cpuop_func op_c1f0_0_ff; +extern cpuop_func op_c1f8_0_nf; +extern cpuop_func op_c1f8_0_ff; +extern cpuop_func op_c1f9_0_nf; +extern cpuop_func op_c1f9_0_ff; +extern cpuop_func op_c1fa_0_nf; +extern cpuop_func op_c1fa_0_ff; +extern cpuop_func op_c1fb_0_nf; +extern cpuop_func op_c1fb_0_ff; +extern cpuop_func op_c1fc_0_nf; +extern cpuop_func op_c1fc_0_ff; +extern cpuop_func op_d000_0_nf; +extern cpuop_func op_d000_0_ff; +extern cpuop_func op_d010_0_nf; +extern cpuop_func op_d010_0_ff; +extern cpuop_func op_d018_0_nf; +extern cpuop_func op_d018_0_ff; +extern cpuop_func op_d020_0_nf; +extern cpuop_func op_d020_0_ff; +extern cpuop_func op_d028_0_nf; +extern cpuop_func op_d028_0_ff; +extern cpuop_func op_d030_0_nf; +extern cpuop_func op_d030_0_ff; +extern cpuop_func op_d038_0_nf; +extern cpuop_func op_d038_0_ff; +extern cpuop_func op_d039_0_nf; +extern cpuop_func op_d039_0_ff; +extern cpuop_func op_d03a_0_nf; +extern cpuop_func op_d03a_0_ff; +extern cpuop_func op_d03b_0_nf; +extern cpuop_func op_d03b_0_ff; +extern cpuop_func op_d03c_0_nf; +extern cpuop_func op_d03c_0_ff; +extern cpuop_func op_d040_0_nf; +extern cpuop_func op_d040_0_ff; +extern cpuop_func op_d048_0_nf; +extern cpuop_func op_d048_0_ff; +extern cpuop_func op_d050_0_nf; +extern cpuop_func op_d050_0_ff; +extern cpuop_func op_d058_0_nf; +extern cpuop_func op_d058_0_ff; +extern cpuop_func op_d060_0_nf; +extern cpuop_func op_d060_0_ff; +extern cpuop_func op_d068_0_nf; +extern cpuop_func op_d068_0_ff; +extern cpuop_func op_d070_0_nf; +extern cpuop_func op_d070_0_ff; +extern cpuop_func op_d078_0_nf; +extern cpuop_func op_d078_0_ff; +extern cpuop_func op_d079_0_nf; +extern cpuop_func op_d079_0_ff; +extern cpuop_func op_d07a_0_nf; +extern cpuop_func op_d07a_0_ff; +extern cpuop_func op_d07b_0_nf; +extern cpuop_func op_d07b_0_ff; +extern cpuop_func op_d07c_0_nf; +extern cpuop_func op_d07c_0_ff; +extern cpuop_func op_d080_0_nf; +extern cpuop_func op_d080_0_ff; +extern cpuop_func op_d088_0_nf; +extern cpuop_func op_d088_0_ff; +extern cpuop_func op_d090_0_nf; +extern cpuop_func op_d090_0_ff; +extern cpuop_func op_d098_0_nf; +extern cpuop_func op_d098_0_ff; +extern cpuop_func op_d0a0_0_nf; +extern cpuop_func op_d0a0_0_ff; +extern cpuop_func op_d0a8_0_nf; +extern cpuop_func op_d0a8_0_ff; +extern cpuop_func op_d0b0_0_nf; +extern cpuop_func op_d0b0_0_ff; +extern cpuop_func op_d0b8_0_nf; +extern cpuop_func op_d0b8_0_ff; +extern cpuop_func op_d0b9_0_nf; +extern cpuop_func op_d0b9_0_ff; +extern cpuop_func op_d0ba_0_nf; +extern cpuop_func op_d0ba_0_ff; +extern cpuop_func op_d0bb_0_nf; +extern cpuop_func op_d0bb_0_ff; +extern cpuop_func op_d0bc_0_nf; +extern cpuop_func op_d0bc_0_ff; +extern cpuop_func op_d0c0_0_nf; +extern cpuop_func op_d0c0_0_ff; +extern cpuop_func op_d0c8_0_nf; +extern cpuop_func op_d0c8_0_ff; +extern cpuop_func op_d0d0_0_nf; +extern cpuop_func op_d0d0_0_ff; +extern cpuop_func op_d0d8_0_nf; +extern cpuop_func op_d0d8_0_ff; +extern cpuop_func op_d0e0_0_nf; +extern cpuop_func op_d0e0_0_ff; +extern cpuop_func op_d0e8_0_nf; +extern cpuop_func op_d0e8_0_ff; +extern cpuop_func op_d0f0_0_nf; +extern cpuop_func op_d0f0_0_ff; +extern cpuop_func op_d0f8_0_nf; +extern cpuop_func op_d0f8_0_ff; +extern cpuop_func op_d0f9_0_nf; +extern cpuop_func op_d0f9_0_ff; +extern cpuop_func op_d0fa_0_nf; +extern cpuop_func op_d0fa_0_ff; +extern cpuop_func op_d0fb_0_nf; +extern cpuop_func op_d0fb_0_ff; +extern cpuop_func op_d0fc_0_nf; +extern cpuop_func op_d0fc_0_ff; +extern cpuop_func op_d100_0_nf; +extern cpuop_func op_d100_0_ff; +extern cpuop_func op_d108_0_nf; +extern cpuop_func op_d108_0_ff; +extern cpuop_func op_d110_0_nf; +extern cpuop_func op_d110_0_ff; +extern cpuop_func op_d118_0_nf; +extern cpuop_func op_d118_0_ff; +extern cpuop_func op_d120_0_nf; +extern cpuop_func op_d120_0_ff; +extern cpuop_func op_d128_0_nf; +extern cpuop_func op_d128_0_ff; +extern cpuop_func op_d130_0_nf; +extern cpuop_func op_d130_0_ff; +extern cpuop_func op_d138_0_nf; +extern cpuop_func op_d138_0_ff; +extern cpuop_func op_d139_0_nf; +extern cpuop_func op_d139_0_ff; +extern cpuop_func op_d140_0_nf; +extern cpuop_func op_d140_0_ff; +extern cpuop_func op_d148_0_nf; +extern cpuop_func op_d148_0_ff; +extern cpuop_func op_d150_0_nf; +extern cpuop_func op_d150_0_ff; +extern cpuop_func op_d158_0_nf; +extern cpuop_func op_d158_0_ff; +extern cpuop_func op_d160_0_nf; +extern cpuop_func op_d160_0_ff; +extern cpuop_func op_d168_0_nf; +extern cpuop_func op_d168_0_ff; +extern cpuop_func op_d170_0_nf; +extern cpuop_func op_d170_0_ff; +extern cpuop_func op_d178_0_nf; +extern cpuop_func op_d178_0_ff; +extern cpuop_func op_d179_0_nf; +extern cpuop_func op_d179_0_ff; +extern cpuop_func op_d180_0_nf; +extern cpuop_func op_d180_0_ff; +extern cpuop_func op_d188_0_nf; +extern cpuop_func op_d188_0_ff; +extern cpuop_func op_d190_0_nf; +extern cpuop_func op_d190_0_ff; +extern cpuop_func op_d198_0_nf; +extern cpuop_func op_d198_0_ff; +extern cpuop_func op_d1a0_0_nf; +extern cpuop_func op_d1a0_0_ff; +extern cpuop_func op_d1a8_0_nf; +extern cpuop_func op_d1a8_0_ff; +extern cpuop_func op_d1b0_0_nf; +extern cpuop_func op_d1b0_0_ff; +extern cpuop_func op_d1b8_0_nf; +extern cpuop_func op_d1b8_0_ff; +extern cpuop_func op_d1b9_0_nf; +extern cpuop_func op_d1b9_0_ff; +extern cpuop_func op_d1c0_0_nf; +extern cpuop_func op_d1c0_0_ff; +extern cpuop_func op_d1c8_0_nf; +extern cpuop_func op_d1c8_0_ff; +extern cpuop_func op_d1d0_0_nf; +extern cpuop_func op_d1d0_0_ff; +extern cpuop_func op_d1d8_0_nf; +extern cpuop_func op_d1d8_0_ff; +extern cpuop_func op_d1e0_0_nf; +extern cpuop_func op_d1e0_0_ff; +extern cpuop_func op_d1e8_0_nf; +extern cpuop_func op_d1e8_0_ff; +extern cpuop_func op_d1f0_0_nf; +extern cpuop_func op_d1f0_0_ff; +extern cpuop_func op_d1f8_0_nf; +extern cpuop_func op_d1f8_0_ff; +extern cpuop_func op_d1f9_0_nf; +extern cpuop_func op_d1f9_0_ff; +extern cpuop_func op_d1fa_0_nf; +extern cpuop_func op_d1fa_0_ff; +extern cpuop_func op_d1fb_0_nf; +extern cpuop_func op_d1fb_0_ff; +extern cpuop_func op_d1fc_0_nf; +extern cpuop_func op_d1fc_0_ff; +extern cpuop_func op_e000_0_nf; +extern cpuop_func op_e000_0_ff; +extern cpuop_func op_e008_0_nf; +extern cpuop_func op_e008_0_ff; +extern cpuop_func op_e010_0_nf; +extern cpuop_func op_e010_0_ff; +extern cpuop_func op_e018_0_nf; +extern cpuop_func op_e018_0_ff; +extern cpuop_func op_e020_0_nf; +extern cpuop_func op_e020_0_ff; +extern cpuop_func op_e028_0_nf; +extern cpuop_func op_e028_0_ff; +extern cpuop_func op_e030_0_nf; +extern cpuop_func op_e030_0_ff; +extern cpuop_func op_e038_0_nf; +extern cpuop_func op_e038_0_ff; +extern cpuop_func op_e040_0_nf; +extern cpuop_func op_e040_0_ff; +extern cpuop_func op_e048_0_nf; +extern cpuop_func op_e048_0_ff; +extern cpuop_func op_e050_0_nf; +extern cpuop_func op_e050_0_ff; +extern cpuop_func op_e058_0_nf; +extern cpuop_func op_e058_0_ff; +extern cpuop_func op_e060_0_nf; +extern cpuop_func op_e060_0_ff; +extern cpuop_func op_e068_0_nf; +extern cpuop_func op_e068_0_ff; +extern cpuop_func op_e070_0_nf; +extern cpuop_func op_e070_0_ff; +extern cpuop_func op_e078_0_nf; +extern cpuop_func op_e078_0_ff; +extern cpuop_func op_e080_0_nf; +extern cpuop_func op_e080_0_ff; +extern cpuop_func op_e088_0_nf; +extern cpuop_func op_e088_0_ff; +extern cpuop_func op_e090_0_nf; +extern cpuop_func op_e090_0_ff; +extern cpuop_func op_e098_0_nf; +extern cpuop_func op_e098_0_ff; +extern cpuop_func op_e0a0_0_nf; +extern cpuop_func op_e0a0_0_ff; +extern cpuop_func op_e0a8_0_nf; +extern cpuop_func op_e0a8_0_ff; +extern cpuop_func op_e0b0_0_nf; +extern cpuop_func op_e0b0_0_ff; +extern cpuop_func op_e0b8_0_nf; +extern cpuop_func op_e0b8_0_ff; +extern cpuop_func op_e0d0_0_nf; +extern cpuop_func op_e0d0_0_ff; +extern cpuop_func op_e0d8_0_nf; +extern cpuop_func op_e0d8_0_ff; +extern cpuop_func op_e0e0_0_nf; +extern cpuop_func op_e0e0_0_ff; +extern cpuop_func op_e0e8_0_nf; +extern cpuop_func op_e0e8_0_ff; +extern cpuop_func op_e0f0_0_nf; +extern cpuop_func op_e0f0_0_ff; +extern cpuop_func op_e0f8_0_nf; +extern cpuop_func op_e0f8_0_ff; +extern cpuop_func op_e0f9_0_nf; +extern cpuop_func op_e0f9_0_ff; +extern cpuop_func op_e100_0_nf; +extern cpuop_func op_e100_0_ff; +extern cpuop_func op_e108_0_nf; +extern cpuop_func op_e108_0_ff; +extern cpuop_func op_e110_0_nf; +extern cpuop_func op_e110_0_ff; +extern cpuop_func op_e118_0_nf; +extern cpuop_func op_e118_0_ff; +extern cpuop_func op_e120_0_nf; +extern cpuop_func op_e120_0_ff; +extern cpuop_func op_e128_0_nf; +extern cpuop_func op_e128_0_ff; +extern cpuop_func op_e130_0_nf; +extern cpuop_func op_e130_0_ff; +extern cpuop_func op_e138_0_nf; +extern cpuop_func op_e138_0_ff; +extern cpuop_func op_e140_0_nf; +extern cpuop_func op_e140_0_ff; +extern cpuop_func op_e148_0_nf; +extern cpuop_func op_e148_0_ff; +extern cpuop_func op_e150_0_nf; +extern cpuop_func op_e150_0_ff; +extern cpuop_func op_e158_0_nf; +extern cpuop_func op_e158_0_ff; +extern cpuop_func op_e160_0_nf; +extern cpuop_func op_e160_0_ff; +extern cpuop_func op_e168_0_nf; +extern cpuop_func op_e168_0_ff; +extern cpuop_func op_e170_0_nf; +extern cpuop_func op_e170_0_ff; +extern cpuop_func op_e178_0_nf; +extern cpuop_func op_e178_0_ff; +extern cpuop_func op_e180_0_nf; +extern cpuop_func op_e180_0_ff; +extern cpuop_func op_e188_0_nf; +extern cpuop_func op_e188_0_ff; +extern cpuop_func op_e190_0_nf; +extern cpuop_func op_e190_0_ff; +extern cpuop_func op_e198_0_nf; +extern cpuop_func op_e198_0_ff; +extern cpuop_func op_e1a0_0_nf; +extern cpuop_func op_e1a0_0_ff; +extern cpuop_func op_e1a8_0_nf; +extern cpuop_func op_e1a8_0_ff; +extern cpuop_func op_e1b0_0_nf; +extern cpuop_func op_e1b0_0_ff; +extern cpuop_func op_e1b8_0_nf; +extern cpuop_func op_e1b8_0_ff; +extern cpuop_func op_e1d0_0_nf; +extern cpuop_func op_e1d0_0_ff; +extern cpuop_func op_e1d8_0_nf; +extern cpuop_func op_e1d8_0_ff; +extern cpuop_func op_e1e0_0_nf; +extern cpuop_func op_e1e0_0_ff; +extern cpuop_func op_e1e8_0_nf; +extern cpuop_func op_e1e8_0_ff; +extern cpuop_func op_e1f0_0_nf; +extern cpuop_func op_e1f0_0_ff; +extern cpuop_func op_e1f8_0_nf; +extern cpuop_func op_e1f8_0_ff; +extern cpuop_func op_e1f9_0_nf; +extern cpuop_func op_e1f9_0_ff; +extern cpuop_func op_e2d0_0_nf; +extern cpuop_func op_e2d0_0_ff; +extern cpuop_func op_e2d8_0_nf; +extern cpuop_func op_e2d8_0_ff; +extern cpuop_func op_e2e0_0_nf; +extern cpuop_func op_e2e0_0_ff; +extern cpuop_func op_e2e8_0_nf; +extern cpuop_func op_e2e8_0_ff; +extern cpuop_func op_e2f0_0_nf; +extern cpuop_func op_e2f0_0_ff; +extern cpuop_func op_e2f8_0_nf; +extern cpuop_func op_e2f8_0_ff; +extern cpuop_func op_e2f9_0_nf; +extern cpuop_func op_e2f9_0_ff; +extern cpuop_func op_e3d0_0_nf; +extern cpuop_func op_e3d0_0_ff; +extern cpuop_func op_e3d8_0_nf; +extern cpuop_func op_e3d8_0_ff; +extern cpuop_func op_e3e0_0_nf; +extern cpuop_func op_e3e0_0_ff; +extern cpuop_func op_e3e8_0_nf; +extern cpuop_func op_e3e8_0_ff; +extern cpuop_func op_e3f0_0_nf; +extern cpuop_func op_e3f0_0_ff; +extern cpuop_func op_e3f8_0_nf; +extern cpuop_func op_e3f8_0_ff; +extern cpuop_func op_e3f9_0_nf; +extern cpuop_func op_e3f9_0_ff; +extern cpuop_func op_e4d0_0_nf; +extern cpuop_func op_e4d0_0_ff; +extern cpuop_func op_e4d8_0_nf; +extern cpuop_func op_e4d8_0_ff; +extern cpuop_func op_e4e0_0_nf; +extern cpuop_func op_e4e0_0_ff; +extern cpuop_func op_e4e8_0_nf; +extern cpuop_func op_e4e8_0_ff; +extern cpuop_func op_e4f0_0_nf; +extern cpuop_func op_e4f0_0_ff; +extern cpuop_func op_e4f8_0_nf; +extern cpuop_func op_e4f8_0_ff; +extern cpuop_func op_e4f9_0_nf; +extern cpuop_func op_e4f9_0_ff; +extern cpuop_func op_e5d0_0_nf; +extern cpuop_func op_e5d0_0_ff; +extern cpuop_func op_e5d8_0_nf; +extern cpuop_func op_e5d8_0_ff; +extern cpuop_func op_e5e0_0_nf; +extern cpuop_func op_e5e0_0_ff; +extern cpuop_func op_e5e8_0_nf; +extern cpuop_func op_e5e8_0_ff; +extern cpuop_func op_e5f0_0_nf; +extern cpuop_func op_e5f0_0_ff; +extern cpuop_func op_e5f8_0_nf; +extern cpuop_func op_e5f8_0_ff; +extern cpuop_func op_e5f9_0_nf; +extern cpuop_func op_e5f9_0_ff; +extern cpuop_func op_e6d0_0_nf; +extern cpuop_func op_e6d0_0_ff; +extern cpuop_func op_e6d8_0_nf; +extern cpuop_func op_e6d8_0_ff; +extern cpuop_func op_e6e0_0_nf; +extern cpuop_func op_e6e0_0_ff; +extern cpuop_func op_e6e8_0_nf; +extern cpuop_func op_e6e8_0_ff; +extern cpuop_func op_e6f0_0_nf; +extern cpuop_func op_e6f0_0_ff; +extern cpuop_func op_e6f8_0_nf; +extern cpuop_func op_e6f8_0_ff; +extern cpuop_func op_e6f9_0_nf; +extern cpuop_func op_e6f9_0_ff; +extern cpuop_func op_e7d0_0_nf; +extern cpuop_func op_e7d0_0_ff; +extern cpuop_func op_e7d8_0_nf; +extern cpuop_func op_e7d8_0_ff; +extern cpuop_func op_e7e0_0_nf; +extern cpuop_func op_e7e0_0_ff; +extern cpuop_func op_e7e8_0_nf; +extern cpuop_func op_e7e8_0_ff; +extern cpuop_func op_e7f0_0_nf; +extern cpuop_func op_e7f0_0_ff; +extern cpuop_func op_e7f8_0_nf; +extern cpuop_func op_e7f8_0_ff; +extern cpuop_func op_e7f9_0_nf; +extern cpuop_func op_e7f9_0_ff; +extern cpuop_func op_e8c0_0_nf; +extern cpuop_func op_e8c0_0_ff; +extern cpuop_func op_e8d0_0_nf; +extern cpuop_func op_e8d0_0_ff; +extern cpuop_func op_e8e8_0_nf; +extern cpuop_func op_e8e8_0_ff; +extern cpuop_func op_e8f0_0_nf; +extern cpuop_func op_e8f0_0_ff; +extern cpuop_func op_e8f8_0_nf; +extern cpuop_func op_e8f8_0_ff; +extern cpuop_func op_e8f9_0_nf; +extern cpuop_func op_e8f9_0_ff; +extern cpuop_func op_e8fa_0_nf; +extern cpuop_func op_e8fa_0_ff; +extern cpuop_func op_e8fb_0_nf; +extern cpuop_func op_e8fb_0_ff; +extern cpuop_func op_e9c0_0_nf; +extern cpuop_func op_e9c0_0_ff; +extern cpuop_func op_e9d0_0_nf; +extern cpuop_func op_e9d0_0_ff; +extern cpuop_func op_e9e8_0_nf; +extern cpuop_func op_e9e8_0_ff; +extern cpuop_func op_e9f0_0_nf; +extern cpuop_func op_e9f0_0_ff; +extern cpuop_func op_e9f8_0_nf; +extern cpuop_func op_e9f8_0_ff; +extern cpuop_func op_e9f9_0_nf; +extern cpuop_func op_e9f9_0_ff; +extern cpuop_func op_e9fa_0_nf; +extern cpuop_func op_e9fa_0_ff; +extern cpuop_func op_e9fb_0_nf; +extern cpuop_func op_e9fb_0_ff; +extern cpuop_func op_eac0_0_nf; +extern cpuop_func op_eac0_0_ff; +extern cpuop_func op_ead0_0_nf; +extern cpuop_func op_ead0_0_ff; +extern cpuop_func op_eae8_0_nf; +extern cpuop_func op_eae8_0_ff; +extern cpuop_func op_eaf0_0_nf; +extern cpuop_func op_eaf0_0_ff; +extern cpuop_func op_eaf8_0_nf; +extern cpuop_func op_eaf8_0_ff; +extern cpuop_func op_eaf9_0_nf; +extern cpuop_func op_eaf9_0_ff; +extern cpuop_func op_ebc0_0_nf; +extern cpuop_func op_ebc0_0_ff; +extern cpuop_func op_ebd0_0_nf; +extern cpuop_func op_ebd0_0_ff; +extern cpuop_func op_ebe8_0_nf; +extern cpuop_func op_ebe8_0_ff; +extern cpuop_func op_ebf0_0_nf; +extern cpuop_func op_ebf0_0_ff; +extern cpuop_func op_ebf8_0_nf; +extern cpuop_func op_ebf8_0_ff; +extern cpuop_func op_ebf9_0_nf; +extern cpuop_func op_ebf9_0_ff; +extern cpuop_func op_ebfa_0_nf; +extern cpuop_func op_ebfa_0_ff; +extern cpuop_func op_ebfb_0_nf; +extern cpuop_func op_ebfb_0_ff; +extern cpuop_func op_ecc0_0_nf; +extern cpuop_func op_ecc0_0_ff; +extern cpuop_func op_ecd0_0_nf; +extern cpuop_func op_ecd0_0_ff; +extern cpuop_func op_ece8_0_nf; +extern cpuop_func op_ece8_0_ff; +extern cpuop_func op_ecf0_0_nf; +extern cpuop_func op_ecf0_0_ff; +extern cpuop_func op_ecf8_0_nf; +extern cpuop_func op_ecf8_0_ff; +extern cpuop_func op_ecf9_0_nf; +extern cpuop_func op_ecf9_0_ff; +extern cpuop_func op_edc0_0_nf; +extern cpuop_func op_edc0_0_ff; +extern cpuop_func op_edd0_0_nf; +extern cpuop_func op_edd0_0_ff; +extern cpuop_func op_ede8_0_nf; +extern cpuop_func op_ede8_0_ff; +extern cpuop_func op_edf0_0_nf; +extern cpuop_func op_edf0_0_ff; +extern cpuop_func op_edf8_0_nf; +extern cpuop_func op_edf8_0_ff; +extern cpuop_func op_edf9_0_nf; +extern cpuop_func op_edf9_0_ff; +extern cpuop_func op_edfa_0_nf; +extern cpuop_func op_edfa_0_ff; +extern cpuop_func op_edfb_0_nf; +extern cpuop_func op_edfb_0_ff; +extern cpuop_func op_eec0_0_nf; +extern cpuop_func op_eec0_0_ff; +extern cpuop_func op_eed0_0_nf; +extern cpuop_func op_eed0_0_ff; +extern cpuop_func op_eee8_0_nf; +extern cpuop_func op_eee8_0_ff; +extern cpuop_func op_eef0_0_nf; +extern cpuop_func op_eef0_0_ff; +extern cpuop_func op_eef8_0_nf; +extern cpuop_func op_eef8_0_ff; +extern cpuop_func op_eef9_0_nf; +extern cpuop_func op_eef9_0_ff; +extern cpuop_func op_efc0_0_nf; +extern cpuop_func op_efc0_0_ff; +extern cpuop_func op_efd0_0_nf; +extern cpuop_func op_efd0_0_ff; +extern cpuop_func op_efe8_0_nf; +extern cpuop_func op_efe8_0_ff; +extern cpuop_func op_eff0_0_nf; +extern cpuop_func op_eff0_0_ff; +extern cpuop_func op_eff8_0_nf; +extern cpuop_func op_eff8_0_ff; +extern cpuop_func op_eff9_0_nf; +extern cpuop_func op_eff9_0_ff; +extern cpuop_func op_f200_0_nf; +extern cpuop_func op_f200_0_ff; +extern cpuop_func op_f208_0_nf; +extern cpuop_func op_f208_0_ff; +extern cpuop_func op_f210_0_nf; +extern cpuop_func op_f210_0_ff; +extern cpuop_func op_f218_0_nf; +extern cpuop_func op_f218_0_ff; +extern cpuop_func op_f220_0_nf; +extern cpuop_func op_f220_0_ff; +extern cpuop_func op_f228_0_nf; +extern cpuop_func op_f228_0_ff; +extern cpuop_func op_f230_0_nf; +extern cpuop_func op_f230_0_ff; +extern cpuop_func op_f238_0_nf; +extern cpuop_func op_f238_0_ff; +extern cpuop_func op_f239_0_nf; +extern cpuop_func op_f239_0_ff; +extern cpuop_func op_f23a_0_nf; +extern cpuop_func op_f23a_0_ff; +extern cpuop_func op_f23b_0_nf; +extern cpuop_func op_f23b_0_ff; +extern cpuop_func op_f23c_0_nf; +extern cpuop_func op_f23c_0_ff; +extern cpuop_func op_f240_0_nf; +extern cpuop_func op_f240_0_ff; +extern cpuop_func op_f248_0_nf; +extern cpuop_func op_f248_0_ff; +extern cpuop_func op_f250_0_nf; +extern cpuop_func op_f250_0_ff; +extern cpuop_func op_f258_0_nf; +extern cpuop_func op_f258_0_ff; +extern cpuop_func op_f260_0_nf; +extern cpuop_func op_f260_0_ff; +extern cpuop_func op_f268_0_nf; +extern cpuop_func op_f268_0_ff; +extern cpuop_func op_f270_0_nf; +extern cpuop_func op_f270_0_ff; +extern cpuop_func op_f278_0_nf; +extern cpuop_func op_f278_0_ff; +extern cpuop_func op_f279_0_nf; +extern cpuop_func op_f279_0_ff; +extern cpuop_func op_f27a_0_nf; +extern cpuop_func op_f27a_0_ff; +extern cpuop_func op_f27b_0_nf; +extern cpuop_func op_f27b_0_ff; +extern cpuop_func op_f27c_0_nf; +extern cpuop_func op_f27c_0_ff; +extern cpuop_func op_f280_0_nf; +extern cpuop_func op_f280_0_ff; +extern cpuop_func op_f2c0_0_nf; +extern cpuop_func op_f2c0_0_ff; +extern cpuop_func op_f310_0_nf; +extern cpuop_func op_f310_0_ff; +extern cpuop_func op_f320_0_nf; +extern cpuop_func op_f320_0_ff; +extern cpuop_func op_f328_0_nf; +extern cpuop_func op_f328_0_ff; +extern cpuop_func op_f330_0_nf; +extern cpuop_func op_f330_0_ff; +extern cpuop_func op_f338_0_nf; +extern cpuop_func op_f338_0_ff; +extern cpuop_func op_f339_0_nf; +extern cpuop_func op_f339_0_ff; +extern cpuop_func op_f350_0_nf; +extern cpuop_func op_f350_0_ff; +extern cpuop_func op_f358_0_nf; +extern cpuop_func op_f358_0_ff; +extern cpuop_func op_f368_0_nf; +extern cpuop_func op_f368_0_ff; +extern cpuop_func op_f370_0_nf; +extern cpuop_func op_f370_0_ff; +extern cpuop_func op_f378_0_nf; +extern cpuop_func op_f378_0_ff; +extern cpuop_func op_f379_0_nf; +extern cpuop_func op_f379_0_ff; +extern cpuop_func op_f37a_0_nf; +extern cpuop_func op_f37a_0_ff; +extern cpuop_func op_f37b_0_nf; +extern cpuop_func op_f37b_0_ff; +extern cpuop_func op_f408_0_nf; +extern cpuop_func op_f408_0_ff; +extern cpuop_func op_f410_0_nf; +extern cpuop_func op_f410_0_ff; +extern cpuop_func op_f418_0_nf; +extern cpuop_func op_f418_0_ff; +extern cpuop_func op_f419_0_nf; +extern cpuop_func op_f419_0_ff; +extern cpuop_func op_f41a_0_nf; +extern cpuop_func op_f41a_0_ff; +extern cpuop_func op_f41b_0_nf; +extern cpuop_func op_f41b_0_ff; +extern cpuop_func op_f41c_0_nf; +extern cpuop_func op_f41c_0_ff; +extern cpuop_func op_f41d_0_nf; +extern cpuop_func op_f41d_0_ff; +extern cpuop_func op_f41e_0_nf; +extern cpuop_func op_f41e_0_ff; +extern cpuop_func op_f41f_0_nf; +extern cpuop_func op_f41f_0_ff; +extern cpuop_func op_f428_0_nf; +extern cpuop_func op_f428_0_ff; +extern cpuop_func op_f430_0_nf; +extern cpuop_func op_f430_0_ff; +extern cpuop_func op_f438_0_nf; +extern cpuop_func op_f438_0_ff; +extern cpuop_func op_f439_0_nf; +extern cpuop_func op_f439_0_ff; +extern cpuop_func op_f43a_0_nf; +extern cpuop_func op_f43a_0_ff; +extern cpuop_func op_f43b_0_nf; +extern cpuop_func op_f43b_0_ff; +extern cpuop_func op_f43c_0_nf; +extern cpuop_func op_f43c_0_ff; +extern cpuop_func op_f43d_0_nf; +extern cpuop_func op_f43d_0_ff; +extern cpuop_func op_f43e_0_nf; +extern cpuop_func op_f43e_0_ff; +extern cpuop_func op_f43f_0_nf; +extern cpuop_func op_f43f_0_ff; +extern cpuop_func op_f500_0_nf; +extern cpuop_func op_f500_0_ff; +extern cpuop_func op_f600_0_nf; +extern cpuop_func op_f600_0_ff; +extern cpuop_func op_f608_0_nf; +extern cpuop_func op_f608_0_ff; +extern cpuop_func op_f610_0_nf; +extern cpuop_func op_f610_0_ff; +extern cpuop_func op_f618_0_nf; +extern cpuop_func op_f618_0_ff; +extern cpuop_func op_f620_0_nf; +extern cpuop_func op_f620_0_ff; +extern cpuop_func op_4800_1_nf; +extern cpuop_func op_4800_1_ff; +extern cpuop_func op_4810_1_nf; +extern cpuop_func op_4810_1_ff; +extern cpuop_func op_4818_1_nf; +extern cpuop_func op_4818_1_ff; +extern cpuop_func op_4820_1_nf; +extern cpuop_func op_4820_1_ff; +extern cpuop_func op_4828_1_nf; +extern cpuop_func op_4828_1_ff; +extern cpuop_func op_4830_1_nf; +extern cpuop_func op_4830_1_ff; +extern cpuop_func op_4838_1_nf; +extern cpuop_func op_4838_1_ff; +extern cpuop_func op_4839_1_nf; +extern cpuop_func op_4839_1_ff; +extern cpuop_func op_8100_1_nf; +extern cpuop_func op_8100_1_ff; +extern cpuop_func op_8108_1_nf; +extern cpuop_func op_8108_1_ff; +extern cpuop_func op_c100_1_nf; +extern cpuop_func op_c100_1_ff; +extern cpuop_func op_c108_1_nf; +extern cpuop_func op_c108_1_ff; +extern cpuop_func op_30_3_nf; +extern cpuop_func op_30_3_ff; +extern cpuop_func op_70_3_nf; +extern cpuop_func op_70_3_ff; +extern cpuop_func op_b0_3_nf; +extern cpuop_func op_b0_3_ff; +extern cpuop_func op_130_3_nf; +extern cpuop_func op_130_3_ff; +extern cpuop_func op_13b_3_nf; +extern cpuop_func op_13b_3_ff; +extern cpuop_func op_170_3_nf; +extern cpuop_func op_170_3_ff; +extern cpuop_func op_17b_3_nf; +extern cpuop_func op_17b_3_ff; +extern cpuop_func op_1b0_3_nf; +extern cpuop_func op_1b0_3_ff; +extern cpuop_func op_1bb_3_nf; +extern cpuop_func op_1bb_3_ff; +extern cpuop_func op_1f0_3_nf; +extern cpuop_func op_1f0_3_ff; +extern cpuop_func op_1fb_3_nf; +extern cpuop_func op_1fb_3_ff; +extern cpuop_func op_230_3_nf; +extern cpuop_func op_230_3_ff; +extern cpuop_func op_270_3_nf; +extern cpuop_func op_270_3_ff; +extern cpuop_func op_2b0_3_nf; +extern cpuop_func op_2b0_3_ff; +extern cpuop_func op_430_3_nf; +extern cpuop_func op_430_3_ff; +extern cpuop_func op_470_3_nf; +extern cpuop_func op_470_3_ff; +extern cpuop_func op_4b0_3_nf; +extern cpuop_func op_4b0_3_ff; +extern cpuop_func op_630_3_nf; +extern cpuop_func op_630_3_ff; +extern cpuop_func op_670_3_nf; +extern cpuop_func op_670_3_ff; +extern cpuop_func op_6b0_3_nf; +extern cpuop_func op_6b0_3_ff; +extern cpuop_func op_830_3_nf; +extern cpuop_func op_830_3_ff; +extern cpuop_func op_83b_3_nf; +extern cpuop_func op_83b_3_ff; +extern cpuop_func op_870_3_nf; +extern cpuop_func op_870_3_ff; +extern cpuop_func op_87b_3_nf; +extern cpuop_func op_87b_3_ff; +extern cpuop_func op_8b0_3_nf; +extern cpuop_func op_8b0_3_ff; +extern cpuop_func op_8bb_3_nf; +extern cpuop_func op_8bb_3_ff; +extern cpuop_func op_8f0_3_nf; +extern cpuop_func op_8f0_3_ff; +extern cpuop_func op_8fb_3_nf; +extern cpuop_func op_8fb_3_ff; +extern cpuop_func op_a30_3_nf; +extern cpuop_func op_a30_3_ff; +extern cpuop_func op_a70_3_nf; +extern cpuop_func op_a70_3_ff; +extern cpuop_func op_ab0_3_nf; +extern cpuop_func op_ab0_3_ff; +extern cpuop_func op_c30_3_nf; +extern cpuop_func op_c30_3_ff; +extern cpuop_func op_c3b_3_nf; +extern cpuop_func op_c3b_3_ff; +extern cpuop_func op_c70_3_nf; +extern cpuop_func op_c70_3_ff; +extern cpuop_func op_c7b_3_nf; +extern cpuop_func op_c7b_3_ff; +extern cpuop_func op_cb0_3_nf; +extern cpuop_func op_cb0_3_ff; +extern cpuop_func op_cbb_3_nf; +extern cpuop_func op_cbb_3_ff; +extern cpuop_func op_1030_3_nf; +extern cpuop_func op_1030_3_ff; +extern cpuop_func op_103b_3_nf; +extern cpuop_func op_103b_3_ff; +extern cpuop_func op_10b0_3_nf; +extern cpuop_func op_10b0_3_ff; +extern cpuop_func op_10bb_3_nf; +extern cpuop_func op_10bb_3_ff; +extern cpuop_func op_10f0_3_nf; +extern cpuop_func op_10f0_3_ff; +extern cpuop_func op_10fb_3_nf; +extern cpuop_func op_10fb_3_ff; +extern cpuop_func op_1130_3_nf; +extern cpuop_func op_1130_3_ff; +extern cpuop_func op_113b_3_nf; +extern cpuop_func op_113b_3_ff; +extern cpuop_func op_1170_3_nf; +extern cpuop_func op_1170_3_ff; +extern cpuop_func op_117b_3_nf; +extern cpuop_func op_117b_3_ff; +extern cpuop_func op_1180_3_nf; +extern cpuop_func op_1180_3_ff; +extern cpuop_func op_1190_3_nf; +extern cpuop_func op_1190_3_ff; +extern cpuop_func op_1198_3_nf; +extern cpuop_func op_1198_3_ff; +extern cpuop_func op_11a0_3_nf; +extern cpuop_func op_11a0_3_ff; +extern cpuop_func op_11a8_3_nf; +extern cpuop_func op_11a8_3_ff; +extern cpuop_func op_11b0_3_nf; +extern cpuop_func op_11b0_3_ff; +extern cpuop_func op_11b8_3_nf; +extern cpuop_func op_11b8_3_ff; +extern cpuop_func op_11b9_3_nf; +extern cpuop_func op_11b9_3_ff; +extern cpuop_func op_11ba_3_nf; +extern cpuop_func op_11ba_3_ff; +extern cpuop_func op_11bb_3_nf; +extern cpuop_func op_11bb_3_ff; +extern cpuop_func op_11bc_3_nf; +extern cpuop_func op_11bc_3_ff; +extern cpuop_func op_11f0_3_nf; +extern cpuop_func op_11f0_3_ff; +extern cpuop_func op_11fb_3_nf; +extern cpuop_func op_11fb_3_ff; +extern cpuop_func op_13f0_3_nf; +extern cpuop_func op_13f0_3_ff; +extern cpuop_func op_13fb_3_nf; +extern cpuop_func op_13fb_3_ff; +extern cpuop_func op_2030_3_nf; +extern cpuop_func op_2030_3_ff; +extern cpuop_func op_203b_3_nf; +extern cpuop_func op_203b_3_ff; +extern cpuop_func op_2070_3_nf; +extern cpuop_func op_2070_3_ff; +extern cpuop_func op_207b_3_nf; +extern cpuop_func op_207b_3_ff; +extern cpuop_func op_20b0_3_nf; +extern cpuop_func op_20b0_3_ff; +extern cpuop_func op_20bb_3_nf; +extern cpuop_func op_20bb_3_ff; +extern cpuop_func op_20f0_3_nf; +extern cpuop_func op_20f0_3_ff; +extern cpuop_func op_20fb_3_nf; +extern cpuop_func op_20fb_3_ff; +extern cpuop_func op_2130_3_nf; +extern cpuop_func op_2130_3_ff; +extern cpuop_func op_213b_3_nf; +extern cpuop_func op_213b_3_ff; +extern cpuop_func op_2170_3_nf; +extern cpuop_func op_2170_3_ff; +extern cpuop_func op_217b_3_nf; +extern cpuop_func op_217b_3_ff; +extern cpuop_func op_2180_3_nf; +extern cpuop_func op_2180_3_ff; +extern cpuop_func op_2188_3_nf; +extern cpuop_func op_2188_3_ff; +extern cpuop_func op_2190_3_nf; +extern cpuop_func op_2190_3_ff; +extern cpuop_func op_2198_3_nf; +extern cpuop_func op_2198_3_ff; +extern cpuop_func op_21a0_3_nf; +extern cpuop_func op_21a0_3_ff; +extern cpuop_func op_21a8_3_nf; +extern cpuop_func op_21a8_3_ff; +extern cpuop_func op_21b0_3_nf; +extern cpuop_func op_21b0_3_ff; +extern cpuop_func op_21b8_3_nf; +extern cpuop_func op_21b8_3_ff; +extern cpuop_func op_21b9_3_nf; +extern cpuop_func op_21b9_3_ff; +extern cpuop_func op_21ba_3_nf; +extern cpuop_func op_21ba_3_ff; +extern cpuop_func op_21bb_3_nf; +extern cpuop_func op_21bb_3_ff; +extern cpuop_func op_21bc_3_nf; +extern cpuop_func op_21bc_3_ff; +extern cpuop_func op_21f0_3_nf; +extern cpuop_func op_21f0_3_ff; +extern cpuop_func op_21fb_3_nf; +extern cpuop_func op_21fb_3_ff; +extern cpuop_func op_23f0_3_nf; +extern cpuop_func op_23f0_3_ff; +extern cpuop_func op_23fb_3_nf; +extern cpuop_func op_23fb_3_ff; +extern cpuop_func op_3030_3_nf; +extern cpuop_func op_3030_3_ff; +extern cpuop_func op_303b_3_nf; +extern cpuop_func op_303b_3_ff; +extern cpuop_func op_3070_3_nf; +extern cpuop_func op_3070_3_ff; +extern cpuop_func op_307b_3_nf; +extern cpuop_func op_307b_3_ff; +extern cpuop_func op_30b0_3_nf; +extern cpuop_func op_30b0_3_ff; +extern cpuop_func op_30bb_3_nf; +extern cpuop_func op_30bb_3_ff; +extern cpuop_func op_30f0_3_nf; +extern cpuop_func op_30f0_3_ff; +extern cpuop_func op_30fb_3_nf; +extern cpuop_func op_30fb_3_ff; +extern cpuop_func op_3130_3_nf; +extern cpuop_func op_3130_3_ff; +extern cpuop_func op_313b_3_nf; +extern cpuop_func op_313b_3_ff; +extern cpuop_func op_3170_3_nf; +extern cpuop_func op_3170_3_ff; +extern cpuop_func op_317b_3_nf; +extern cpuop_func op_317b_3_ff; +extern cpuop_func op_3180_3_nf; +extern cpuop_func op_3180_3_ff; +extern cpuop_func op_3188_3_nf; +extern cpuop_func op_3188_3_ff; +extern cpuop_func op_3190_3_nf; +extern cpuop_func op_3190_3_ff; +extern cpuop_func op_3198_3_nf; +extern cpuop_func op_3198_3_ff; +extern cpuop_func op_31a0_3_nf; +extern cpuop_func op_31a0_3_ff; +extern cpuop_func op_31a8_3_nf; +extern cpuop_func op_31a8_3_ff; +extern cpuop_func op_31b0_3_nf; +extern cpuop_func op_31b0_3_ff; +extern cpuop_func op_31b8_3_nf; +extern cpuop_func op_31b8_3_ff; +extern cpuop_func op_31b9_3_nf; +extern cpuop_func op_31b9_3_ff; +extern cpuop_func op_31ba_3_nf; +extern cpuop_func op_31ba_3_ff; +extern cpuop_func op_31bb_3_nf; +extern cpuop_func op_31bb_3_ff; +extern cpuop_func op_31bc_3_nf; +extern cpuop_func op_31bc_3_ff; +extern cpuop_func op_31f0_3_nf; +extern cpuop_func op_31f0_3_ff; +extern cpuop_func op_31fb_3_nf; +extern cpuop_func op_31fb_3_ff; +extern cpuop_func op_33f0_3_nf; +extern cpuop_func op_33f0_3_ff; +extern cpuop_func op_33fb_3_nf; +extern cpuop_func op_33fb_3_ff; +extern cpuop_func op_4030_3_nf; +extern cpuop_func op_4030_3_ff; +extern cpuop_func op_4070_3_nf; +extern cpuop_func op_4070_3_ff; +extern cpuop_func op_40b0_3_nf; +extern cpuop_func op_40b0_3_ff; +extern cpuop_func op_40f0_3_nf; +extern cpuop_func op_40f0_3_ff; +extern cpuop_func op_4130_3_nf; +extern cpuop_func op_4130_3_ff; +extern cpuop_func op_413b_3_nf; +extern cpuop_func op_413b_3_ff; +extern cpuop_func op_41b0_3_nf; +extern cpuop_func op_41b0_3_ff; +extern cpuop_func op_41bb_3_nf; +extern cpuop_func op_41bb_3_ff; +extern cpuop_func op_41f0_3_nf; +extern cpuop_func op_41f0_3_ff; +extern cpuop_func op_41fb_3_nf; +extern cpuop_func op_41fb_3_ff; +extern cpuop_func op_4230_3_nf; +extern cpuop_func op_4230_3_ff; +extern cpuop_func op_4270_3_nf; +extern cpuop_func op_4270_3_ff; +extern cpuop_func op_42b0_3_nf; +extern cpuop_func op_42b0_3_ff; +extern cpuop_func op_42f0_3_nf; +extern cpuop_func op_42f0_3_ff; +extern cpuop_func op_4430_3_nf; +extern cpuop_func op_4430_3_ff; +extern cpuop_func op_4470_3_nf; +extern cpuop_func op_4470_3_ff; +extern cpuop_func op_44b0_3_nf; +extern cpuop_func op_44b0_3_ff; +extern cpuop_func op_44f0_3_nf; +extern cpuop_func op_44f0_3_ff; +extern cpuop_func op_44fb_3_nf; +extern cpuop_func op_44fb_3_ff; +extern cpuop_func op_4630_3_nf; +extern cpuop_func op_4630_3_ff; +extern cpuop_func op_4670_3_nf; +extern cpuop_func op_4670_3_ff; +extern cpuop_func op_46b0_3_nf; +extern cpuop_func op_46b0_3_ff; +extern cpuop_func op_46f0_3_nf; +extern cpuop_func op_46f0_3_ff; +extern cpuop_func op_46fb_3_nf; +extern cpuop_func op_46fb_3_ff; +extern cpuop_func op_4830_3_nf; +extern cpuop_func op_4830_3_ff; +extern cpuop_func op_4870_3_nf; +extern cpuop_func op_4870_3_ff; +extern cpuop_func op_487b_3_nf; +extern cpuop_func op_487b_3_ff; +extern cpuop_func op_48b0_3_nf; +extern cpuop_func op_48b0_3_ff; +extern cpuop_func op_48f0_3_nf; +extern cpuop_func op_48f0_3_ff; +extern cpuop_func op_4a30_3_nf; +extern cpuop_func op_4a30_3_ff; +extern cpuop_func op_4a3b_3_nf; +extern cpuop_func op_4a3b_3_ff; +extern cpuop_func op_4a70_3_nf; +extern cpuop_func op_4a70_3_ff; +extern cpuop_func op_4a7b_3_nf; +extern cpuop_func op_4a7b_3_ff; +extern cpuop_func op_4ab0_3_nf; +extern cpuop_func op_4ab0_3_ff; +extern cpuop_func op_4abb_3_nf; +extern cpuop_func op_4abb_3_ff; +extern cpuop_func op_4af0_3_nf; +extern cpuop_func op_4af0_3_ff; +extern cpuop_func op_4cb0_3_nf; +extern cpuop_func op_4cb0_3_ff; +extern cpuop_func op_4cbb_3_nf; +extern cpuop_func op_4cbb_3_ff; +extern cpuop_func op_4cf0_3_nf; +extern cpuop_func op_4cf0_3_ff; +extern cpuop_func op_4cfb_3_nf; +extern cpuop_func op_4cfb_3_ff; +extern cpuop_func op_4eb0_3_nf; +extern cpuop_func op_4eb0_3_ff; +extern cpuop_func op_4ebb_3_nf; +extern cpuop_func op_4ebb_3_ff; +extern cpuop_func op_4ef0_3_nf; +extern cpuop_func op_4ef0_3_ff; +extern cpuop_func op_4efb_3_nf; +extern cpuop_func op_4efb_3_ff; +extern cpuop_func op_5030_3_nf; +extern cpuop_func op_5030_3_ff; +extern cpuop_func op_5070_3_nf; +extern cpuop_func op_5070_3_ff; +extern cpuop_func op_50b0_3_nf; +extern cpuop_func op_50b0_3_ff; +extern cpuop_func op_50f0_3_nf; +extern cpuop_func op_50f0_3_ff; +extern cpuop_func op_5130_3_nf; +extern cpuop_func op_5130_3_ff; +extern cpuop_func op_5170_3_nf; +extern cpuop_func op_5170_3_ff; +extern cpuop_func op_51b0_3_nf; +extern cpuop_func op_51b0_3_ff; +extern cpuop_func op_51f0_3_nf; +extern cpuop_func op_51f0_3_ff; +extern cpuop_func op_52f0_3_nf; +extern cpuop_func op_52f0_3_ff; +extern cpuop_func op_53f0_3_nf; +extern cpuop_func op_53f0_3_ff; +extern cpuop_func op_54f0_3_nf; +extern cpuop_func op_54f0_3_ff; +extern cpuop_func op_55f0_3_nf; +extern cpuop_func op_55f0_3_ff; +extern cpuop_func op_56f0_3_nf; +extern cpuop_func op_56f0_3_ff; +extern cpuop_func op_57f0_3_nf; +extern cpuop_func op_57f0_3_ff; +extern cpuop_func op_58f0_3_nf; +extern cpuop_func op_58f0_3_ff; +extern cpuop_func op_59f0_3_nf; +extern cpuop_func op_59f0_3_ff; +extern cpuop_func op_5af0_3_nf; +extern cpuop_func op_5af0_3_ff; +extern cpuop_func op_5bf0_3_nf; +extern cpuop_func op_5bf0_3_ff; +extern cpuop_func op_5cf0_3_nf; +extern cpuop_func op_5cf0_3_ff; +extern cpuop_func op_5df0_3_nf; +extern cpuop_func op_5df0_3_ff; +extern cpuop_func op_5ef0_3_nf; +extern cpuop_func op_5ef0_3_ff; +extern cpuop_func op_5ff0_3_nf; +extern cpuop_func op_5ff0_3_ff; +extern cpuop_func op_60ff_3_nf; +extern cpuop_func op_60ff_3_ff; +extern cpuop_func op_62ff_3_nf; +extern cpuop_func op_62ff_3_ff; +extern cpuop_func op_63ff_3_nf; +extern cpuop_func op_63ff_3_ff; +extern cpuop_func op_64ff_3_nf; +extern cpuop_func op_64ff_3_ff; +extern cpuop_func op_65ff_3_nf; +extern cpuop_func op_65ff_3_ff; +extern cpuop_func op_66ff_3_nf; +extern cpuop_func op_66ff_3_ff; +extern cpuop_func op_67ff_3_nf; +extern cpuop_func op_67ff_3_ff; +extern cpuop_func op_68ff_3_nf; +extern cpuop_func op_68ff_3_ff; +extern cpuop_func op_69ff_3_nf; +extern cpuop_func op_69ff_3_ff; +extern cpuop_func op_6aff_3_nf; +extern cpuop_func op_6aff_3_ff; +extern cpuop_func op_6bff_3_nf; +extern cpuop_func op_6bff_3_ff; +extern cpuop_func op_6cff_3_nf; +extern cpuop_func op_6cff_3_ff; +extern cpuop_func op_6dff_3_nf; +extern cpuop_func op_6dff_3_ff; +extern cpuop_func op_6eff_3_nf; +extern cpuop_func op_6eff_3_ff; +extern cpuop_func op_6fff_3_nf; +extern cpuop_func op_6fff_3_ff; +extern cpuop_func op_8030_3_nf; +extern cpuop_func op_8030_3_ff; +extern cpuop_func op_803b_3_nf; +extern cpuop_func op_803b_3_ff; +extern cpuop_func op_8070_3_nf; +extern cpuop_func op_8070_3_ff; +extern cpuop_func op_807b_3_nf; +extern cpuop_func op_807b_3_ff; +extern cpuop_func op_80b0_3_nf; +extern cpuop_func op_80b0_3_ff; +extern cpuop_func op_80bb_3_nf; +extern cpuop_func op_80bb_3_ff; +extern cpuop_func op_80f0_3_nf; +extern cpuop_func op_80f0_3_ff; +extern cpuop_func op_80fb_3_nf; +extern cpuop_func op_80fb_3_ff; +extern cpuop_func op_8130_3_nf; +extern cpuop_func op_8130_3_ff; +extern cpuop_func op_8170_3_nf; +extern cpuop_func op_8170_3_ff; +extern cpuop_func op_81b0_3_nf; +extern cpuop_func op_81b0_3_ff; +extern cpuop_func op_81f0_3_nf; +extern cpuop_func op_81f0_3_ff; +extern cpuop_func op_81fb_3_nf; +extern cpuop_func op_81fb_3_ff; +extern cpuop_func op_9030_3_nf; +extern cpuop_func op_9030_3_ff; +extern cpuop_func op_903b_3_nf; +extern cpuop_func op_903b_3_ff; +extern cpuop_func op_9070_3_nf; +extern cpuop_func op_9070_3_ff; +extern cpuop_func op_907b_3_nf; +extern cpuop_func op_907b_3_ff; +extern cpuop_func op_90b0_3_nf; +extern cpuop_func op_90b0_3_ff; +extern cpuop_func op_90bb_3_nf; +extern cpuop_func op_90bb_3_ff; +extern cpuop_func op_90f0_3_nf; +extern cpuop_func op_90f0_3_ff; +extern cpuop_func op_90fb_3_nf; +extern cpuop_func op_90fb_3_ff; +extern cpuop_func op_9130_3_nf; +extern cpuop_func op_9130_3_ff; +extern cpuop_func op_9170_3_nf; +extern cpuop_func op_9170_3_ff; +extern cpuop_func op_91b0_3_nf; +extern cpuop_func op_91b0_3_ff; +extern cpuop_func op_91f0_3_nf; +extern cpuop_func op_91f0_3_ff; +extern cpuop_func op_91fb_3_nf; +extern cpuop_func op_91fb_3_ff; +extern cpuop_func op_b030_3_nf; +extern cpuop_func op_b030_3_ff; +extern cpuop_func op_b03b_3_nf; +extern cpuop_func op_b03b_3_ff; +extern cpuop_func op_b070_3_nf; +extern cpuop_func op_b070_3_ff; +extern cpuop_func op_b07b_3_nf; +extern cpuop_func op_b07b_3_ff; +extern cpuop_func op_b0b0_3_nf; +extern cpuop_func op_b0b0_3_ff; +extern cpuop_func op_b0bb_3_nf; +extern cpuop_func op_b0bb_3_ff; +extern cpuop_func op_b0f0_3_nf; +extern cpuop_func op_b0f0_3_ff; +extern cpuop_func op_b0fb_3_nf; +extern cpuop_func op_b0fb_3_ff; +extern cpuop_func op_b130_3_nf; +extern cpuop_func op_b130_3_ff; +extern cpuop_func op_b170_3_nf; +extern cpuop_func op_b170_3_ff; +extern cpuop_func op_b1b0_3_nf; +extern cpuop_func op_b1b0_3_ff; +extern cpuop_func op_b1f0_3_nf; +extern cpuop_func op_b1f0_3_ff; +extern cpuop_func op_b1fb_3_nf; +extern cpuop_func op_b1fb_3_ff; +extern cpuop_func op_c030_3_nf; +extern cpuop_func op_c030_3_ff; +extern cpuop_func op_c03b_3_nf; +extern cpuop_func op_c03b_3_ff; +extern cpuop_func op_c070_3_nf; +extern cpuop_func op_c070_3_ff; +extern cpuop_func op_c07b_3_nf; +extern cpuop_func op_c07b_3_ff; +extern cpuop_func op_c0b0_3_nf; +extern cpuop_func op_c0b0_3_ff; +extern cpuop_func op_c0bb_3_nf; +extern cpuop_func op_c0bb_3_ff; +extern cpuop_func op_c0f0_3_nf; +extern cpuop_func op_c0f0_3_ff; +extern cpuop_func op_c0fb_3_nf; +extern cpuop_func op_c0fb_3_ff; +extern cpuop_func op_c130_3_nf; +extern cpuop_func op_c130_3_ff; +extern cpuop_func op_c170_3_nf; +extern cpuop_func op_c170_3_ff; +extern cpuop_func op_c1b0_3_nf; +extern cpuop_func op_c1b0_3_ff; +extern cpuop_func op_c1f0_3_nf; +extern cpuop_func op_c1f0_3_ff; +extern cpuop_func op_c1fb_3_nf; +extern cpuop_func op_c1fb_3_ff; +extern cpuop_func op_d030_3_nf; +extern cpuop_func op_d030_3_ff; +extern cpuop_func op_d03b_3_nf; +extern cpuop_func op_d03b_3_ff; +extern cpuop_func op_d070_3_nf; +extern cpuop_func op_d070_3_ff; +extern cpuop_func op_d07b_3_nf; +extern cpuop_func op_d07b_3_ff; +extern cpuop_func op_d0b0_3_nf; +extern cpuop_func op_d0b0_3_ff; +extern cpuop_func op_d0bb_3_nf; +extern cpuop_func op_d0bb_3_ff; +extern cpuop_func op_d0f0_3_nf; +extern cpuop_func op_d0f0_3_ff; +extern cpuop_func op_d0fb_3_nf; +extern cpuop_func op_d0fb_3_ff; +extern cpuop_func op_d130_3_nf; +extern cpuop_func op_d130_3_ff; +extern cpuop_func op_d170_3_nf; +extern cpuop_func op_d170_3_ff; +extern cpuop_func op_d1b0_3_nf; +extern cpuop_func op_d1b0_3_ff; +extern cpuop_func op_d1f0_3_nf; +extern cpuop_func op_d1f0_3_ff; +extern cpuop_func op_d1fb_3_nf; +extern cpuop_func op_d1fb_3_ff; +extern cpuop_func op_e0f0_3_nf; +extern cpuop_func op_e0f0_3_ff; +extern cpuop_func op_e1f0_3_nf; +extern cpuop_func op_e1f0_3_ff; +extern cpuop_func op_e2f0_3_nf; +extern cpuop_func op_e2f0_3_ff; +extern cpuop_func op_e3f0_3_nf; +extern cpuop_func op_e3f0_3_ff; +extern cpuop_func op_e4f0_3_nf; +extern cpuop_func op_e4f0_3_ff; +extern cpuop_func op_e5f0_3_nf; +extern cpuop_func op_e5f0_3_ff; +extern cpuop_func op_e6f0_3_nf; +extern cpuop_func op_e6f0_3_ff; +extern cpuop_func op_e7f0_3_nf; +extern cpuop_func op_e7f0_3_ff; +extern cpuop_func op_40c0_4_nf; +extern cpuop_func op_40c0_4_ff; +extern cpuop_func op_40d0_4_nf; +extern cpuop_func op_40d0_4_ff; +extern cpuop_func op_40d8_4_nf; +extern cpuop_func op_40d8_4_ff; +extern cpuop_func op_40e0_4_nf; +extern cpuop_func op_40e0_4_ff; +extern cpuop_func op_40e8_4_nf; +extern cpuop_func op_40e8_4_ff; +extern cpuop_func op_40f0_4_nf; +extern cpuop_func op_40f0_4_ff; +extern cpuop_func op_40f8_4_nf; +extern cpuop_func op_40f8_4_ff; +extern cpuop_func op_40f9_4_nf; +extern cpuop_func op_40f9_4_ff; +extern cpuop_func op_4e73_4_nf; +extern cpuop_func op_4e73_4_ff; diff --git a/BasiliskII/src/uae_cpu/defs68k.c b/BasiliskII/src/uae_cpu/defs68k.c new file mode 100644 index 000000000..e3cfa9825 --- /dev/null +++ b/BasiliskII/src/uae_cpu/defs68k.c @@ -0,0 +1,185 @@ +#include "sysdeps.h" +#include "readcpu.h" +struct instr_def defs68k[] = { +{ 60, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "ORSR.B #1"}, +{ 124, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "ORSR.W #1"}, +{ 192, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 63936, 2, 0, { { 1, 1 }, { 1, 5 }, { 1, 0 }, { 1, 5 }, { 1, 0 } }, 4, 17, "CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd]"}, +{ 0, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z #z,d[!Areg]"}, +{ 572, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "ANDSR.B #1"}, +{ 636, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "ANDSR.W #1"}, +{ 512, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z #z,d[!Areg]"}, +{ 1024, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z #z,d[!Areg]"}, +{ 1536, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z #z,d[!Areg]"}, +{ 1728, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "CALLM s[!Dreg,Areg,Aipi,Apdi,Immd]"}, +{ 1728, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 3, 16, "RTM s[Dreg,Areg]"}, +{ 2048, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 17, "BTST #1,s[!Areg]"}, +{ 2112, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCHG #1,s[!Areg,Immd]"}, +{ 2176, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCLR #1,s[!Areg,Immd]"}, +{ 2240, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BSET #1,s[!Areg,Immd]"}, +{ 2620, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "EORSR.B #1"}, +{ 2684, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "EORSR.W #1"}, +{ 2560, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "EOR.z #z,d[!Areg]"}, +{ 3072, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMP.z #z,s[!Areg,Immd]"}, +{ 2752, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, +{ 3264, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, +{ 3324, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "CAS2.W #2"}, +{ 3584, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 2, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 19, "MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, +{ 3776, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, +{ 3836, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "CAS2.L #2"}, +{ 256, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPMR.W d[Areg-Ad16],Dr"}, +{ 320, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPMR.L d[Areg-Ad16],Dr"}, +{ 384, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPRM.W Dr,d[Areg-Ad16]"}, +{ 448, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPRM.L Dr,d[Areg-Ad16]"}, +{ 256, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 17, "BTST Dr,s[!Areg]"}, +{ 320, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCHG Dr,s[!Areg,Immd]"}, +{ 384, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCLR Dr,s[!Areg,Immd]"}, +{ 448, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BSET Dr,s[!Areg,Immd]"}, +{ 4096, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.B s,d[!Areg]"}, +{ 8192, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVEA.L s,d[Areg]"}, +{ 8192, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.L s,d[!Areg]"}, +{ 12288, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVEA.W s,d[Areg]"}, +{ 12288, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.W s,d[!Areg]"}, +{ 16384, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 48, "NEGX.z d[!Areg]"}, +{ 16576, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 1, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 4, 16, "MVSR2.W d[!Areg]"}, +{ 16896, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 2 }, { 1, 3 }, { 1, 2 }, { 1, 2 } }, 0, 32, "CLR.z d[!Areg]"}, +{ 17088, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 1, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "MVSR2.B d[!Areg]"}, +{ 17408, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 48, "NEG.z d[!Areg]"}, +{ 17600, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "MV2SR.B s[!Areg]"}, +{ 17920, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "NOT.z d[!Areg]"}, +{ 18112, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "MV2SR.W s[!Areg]"}, +{ 18440, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 49, "LINK.L Ar,#2"}, +{ 18432, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 0, 0 }, { 1, 5 }, { 0, 0 }, { 1, 5 }, { 1, 0 } }, 0, 48, "NBCD.B d[!Areg]"}, +{ 18504, 3, {9,9,9,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "BKPT #k"}, +{ 18496, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "SWAP.W s[Dreg]"}, +{ 18496, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 0, "PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, +{ 18560, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.W d[Dreg]"}, +{ 18560, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "MVMLE.W #1,d[!Dreg,Areg,Aipi]"}, +{ 18624, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.L d[Dreg]"}, +{ 18624, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "MVMLE.L #1,d[!Dreg,Areg,Aipi]"}, +{ 18880, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.B d[Dreg]"}, +{ 18944, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 16, "TST.z s"}, +{ 19136, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "TAS.B d[!Areg]"}, +{ 19196, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "ILLEGAL"}, +{ 19456, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "MULL.L #1,s[!Areg]"}, +{ 19520, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVL.L #1,s[!Areg]"}, +{ 19584, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 1, "MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd]"}, +{ 19648, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 1, "MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd]"}, +{ 20032, 4, {8,8,8,8,0,0,0,0,0,0,0,0,0,0,0,0}, 65520, 0, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "TRAP #J"}, +{ 20048, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 49, "LINK.W Ar,#1"}, +{ 20056, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 48, "UNLK.L Ar"}, +{ 20064, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MVR2USP.L Ar"}, +{ 20072, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 32, "MVUSP2R.L Ar"}, +{ 20080, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "RESET"}, +{ 20081, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 0, "NOP"}, +{ 20082, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 4, 16, "STOP #1"}, +{ 20083, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 7, 0, "RTE"}, +{ 20084, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 16, "RTD #1"}, +{ 20085, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 0, "RTS"}, +{ 20086, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 4, 0, "TRAPV"}, +{ 20087, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 3, 0, "RTR"}, +{ 20090, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 1, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MOVEC2 #1"}, +{ 20091, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 1, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MOVE2C #1"}, +{ 20096, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 128, "JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, +{ 16640, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 5 }, { 1, 5 }, { 1, 5 } }, 4, 17, "CHK.L s[!Areg],Dr"}, +{ 16768, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 5 }, { 1, 5 }, { 1, 5 } }, 4, 17, "CHK.W s[!Areg],Dr"}, +{ 20160, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 128, "JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, +{ 16832, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar"}, +{ 20544, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.W #j,d[Areg]"}, +{ 20608, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.L #j,d[Areg]"}, +{ 20480, 11, {7,7,7,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z #j,d[!Areg]"}, +{ 20800, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.W #j,d[Areg]"}, +{ 20864, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.L #j,d[Areg]"}, +{ 20736, 11, {7,7,7,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z #j,d[!Areg]"}, +{ 20680, 7, {2,2,2,2,15,15,15,0,0,0,0,0,0,0,0,0}, 61688, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 49, "DBcc.W Dr,#1"}, +{ 20672, 10, {2,2,2,2,13,13,13,14,14,14,0,0,0,0,0,0}, 61632, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 0, 32, "Scc.B d[!Areg]"}, +{ 20730, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 16, "TRAPcc #1"}, +{ 20731, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 16, "TRAPcc #2"}, +{ 20732, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 0, "TRAPcc"}, +{ 24832, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.W #1"}, +{ 24832, 8, {6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.B #i"}, +{ 25087, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.L #2"}, +{ 24576, 4, {3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.W #1"}, +{ 24576, 12, {3,3,3,3,6,6,6,6,6,6,6,6,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.B #i"}, +{ 24831, 4, {3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.L #2"}, +{ 28672, 11, {15,15,15,5,5,5,5,5,5,5,5,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.L #i,Dr"}, +{ 32768, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z s[!Areg],Dr"}, +{ 32960, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVU.W s[!Areg],Dr"}, +{ 33024, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "SBCD.B d[Dreg],Dr"}, +{ 33024, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "SBCD.B d[Areg-Apdi],Arp"}, +{ 33024, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z Dr,d[!Areg,Dreg]"}, +{ 33088, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "PACK d[Dreg],Dr"}, +{ 33088, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "PACK d[Areg-Apdi],Arp"}, +{ 33152, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "UNPK d[Dreg],Dr"}, +{ 33152, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "UNPK d[Areg-Apdi],Arp"}, +{ 33216, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVS.W s[!Areg],Dr"}, +{ 36864, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z s,Dr"}, +{ 37056, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.W s,Ar"}, +{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUBX.z d[Dreg],Dr"}, +{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUBX.z d[Areg-Apdi],Arp"}, +{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z Dr,d[!Areg,Dreg]"}, +{ 37312, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.L s,Ar"}, +{ 45056, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMP.z s,Dr"}, +{ 45248, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPA.W s,Ar"}, +{ 45504, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPA.L s,Ar"}, +{ 45312, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPM.z d[Areg-Aipi],ArP"}, +{ 45312, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "EOR.z Dr,d[!Areg]"}, +{ 49152, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z s[!Areg],Dr"}, +{ 49344, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "MULU.W s[!Areg],Dr"}, +{ 49408, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "ABCD.B d[Dreg],Dr"}, +{ 49408, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "ABCD.B d[Areg-Apdi],Arp"}, +{ 49408, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z Dr,d[!Areg,Dreg]"}, +{ 49472, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Dr,d[Dreg]"}, +{ 49472, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Ar,d[Areg]"}, +{ 49536, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Dr,d[Areg]"}, +{ 49600, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "MULS.W s[!Areg],Dr"}, +{ 53248, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z s,Dr"}, +{ 53440, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.W s,Ar"}, +{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADDX.z d[Dreg],Dr"}, +{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADDX.z d[Areg-Apdi],Arp"}, +{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z Dr,d[!Areg,Dreg]"}, +{ 53696, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.L s,Ar"}, +{ 57344, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASf.z #j,DR"}, +{ 57352, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSf.z #j,DR"}, +{ 57360, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXf.z #j,DR"}, +{ 57368, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROf.z #j,DR"}, +{ 57376, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASf.z Dr,DR"}, +{ 57384, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSf.z Dr,DR"}, +{ 57392, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXf.z Dr,DR"}, +{ 57400, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROf.z Dr,DR"}, +{ 57536, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASfW.W d[!Dreg,Areg]"}, +{ 58048, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSfW.W d[!Dreg,Areg]"}, +{ 58560, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXfW.W d[!Dreg,Areg]"}, +{ 59072, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROfW.W d[!Dreg,Areg]"}, +{ 59584, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFTST #1,s[!Areg,Apdi,Aipi,Immd]"}, +{ 59840, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFEXTU #1,s[!Areg,Apdi,Aipi,Immd]"}, +{ 60096, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, +{ 60352, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFEXTS #1,s[!Areg,Apdi,Aipi,Immd]"}, +{ 60608, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, +{ 60864, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFFFO #1,s[!Areg,Apdi,Aipi,Immd]"}, +{ 61120, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, +{ 61376, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, +{ 61952, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 17, "FPP #1,s"}, +{ 62016, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FDBcc #1,s[Areg-Dreg]"}, +{ 62016, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 17, "FScc #1,s[!Areg,Immd,PC8r,PC16]"}, +{ 62074, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "FTRAPcc #1"}, +{ 62075, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "FTRAPcc #2"}, +{ 62076, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "FTRAPcc"}, +{ 62080, 6, {10,10,10,10,10,10,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FBcc #K,#1"}, +{ 62144, 6, {10,10,10,10,10,10,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FBcc #K,#2"}, +{ 62208, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 32, "FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16]"}, +{ 62272, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 16, "FRESTORE s[!Dreg,Areg,Apdi,Immd]"}, +{ 62720, 8, {5,5,5,5,5,12,12,12,0,0,0,0,0,0,0,0}, 65280, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 17, "MMUOP #i,s"}, +{ 62472, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CINVL #p,Ar"}, +{ 62480, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CINVP #p,Ar"}, +{ 62488, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "CINVA #p"}, +{ 62504, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CPUSHL #p,Ar"}, +{ 62512, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CPUSHP #p,Ar"}, +{ 62520, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "CPUSHA #p"}, +{ 63008, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 ArP,AxP"}, +{ 62976, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 s[Dreg-Aipi],L"}, +{ 62976, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 L,d[Areg-Aipi]"}, +{ 62976, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 s[Aind],L"}, +{ 62976, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 L,d[Aipi-Aind]"}, +{ 28928, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 0, "EMULOP_RETURN"}, +{ 28928, 8, {18,18,18,18,18,18,18,18,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 16, "EMULOP #E"}}; +int n_defs68k = 181; diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 1653adab9..5045dffd4 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -2189,14 +2189,14 @@ static void gen_opcode (unsigned long int opcode) case i_CINVA: /* gb-- srcreg now contains the cache field */ printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 30 + ((opcode >> 3) & 3)); + printf ("\t\tflush_icache(%d);\n", (int)(30 + ((opcode >> 3) & 3))); break; case i_CPUSHL: case i_CPUSHP: case i_CPUSHA: /* gb-- srcreg now contains the cache field */ printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 40 + ((opcode >> 3) & 3)); + printf ("\t\tflush_icache(%d);\n", (int)(40 + ((opcode >> 3) & 3))); break; case i_MOVE16: if ((opcode & 0xfff8) == 0xf620) { diff --git a/BasiliskII/src/uae_cpu/osx_generate_files.sh b/BasiliskII/src/uae_cpu/osx_generate_files.sh new file mode 100755 index 000000000..3f6da3cec --- /dev/null +++ b/BasiliskII/src/uae_cpu/osx_generate_files.sh @@ -0,0 +1,22 @@ +#!/bin/bash -e + +# +# osx_generate_files.sh +# +# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts +# + +SCRIPT_DIRNAME="$(cd $(dirname $0) && pwd)" +cd "$SCRIPT_DIRNAME" + +echo "build68k: compiling" +clang build68k.c -o build68k -I ../MacOSX/ -I ../Unix/ + +echo "build68k: running" +cat table68k | ./build68k > ./defs68k.c + +echo "gencpu: compiling" +clang gencpu.c ./defs68k.c readcpu.cpp -o gencpu -I . -I ../MacOSX/ -I ../Unix/ + +echo "gencpu: running" +./gencpu diff --git a/BasiliskII/src/video.cpp b/BasiliskII/src/video.cpp index 8f84f48de..3b46864ef 100644 --- a/BasiliskII/src/video.cpp +++ b/BasiliskII/src/video.cpp @@ -48,6 +48,23 @@ uint8 monitor_desc::next_slot_id = 0x80; vector VideoMonitors; +/* + * Converts a video_depth to a C-String name ("VDEPTH_1BIT", "VDEPTH_2BIT", etc.) + */ +const char * NameOfDepth(video_depth depth) +{ + switch (depth) { + case VDEPTH_1BIT: return "VDEPTH_1BIT"; + case VDEPTH_2BIT: return "VDEPTH_2BIT"; + case VDEPTH_4BIT: return "VDEPTH_4BIT"; + case VDEPTH_8BIT: return "VDEPTH_8BIT"; + case VDEPTH_16BIT: return "VDEPTH_16BIT"; + case VDEPTH_32BIT: return "VDEPTH_32BIT"; + } + return ""; +} + + /* * Find palette size for given color depth */ From cb982ee2edacbb1714a218515558f7b3e43e946d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 20:29:30 -0400 Subject: [PATCH 096/534] use SDL 2.0.5+, rather than SDL 1.x This change may end up being a bit slower on some systems, as the SDL backend will now render its content to two, new, SDL_Surfaces: one of which is in the guest OS' resolution, the other of which is application defined. SDL2's SDL_Render API is used, which exposes some rudimentary elements of GPU + texture-based programming. Basilisk II now maintains a single 'SDL_Texture' object, which is an SDL representation of a GPU texture. The 'outer' surface will be used to update this texture, as requests to redraw are made. TODO: look into removing the 'outer' SDL surface, and see if we can just copy the 'inner' surface to the SDL_Texture. TODO: the entire SDL_Texture is updated, any time a request is made to draw. Look into minimizing this a bit. --- .../BasiliskII.xcodeproj/project.pbxproj | 40 +- BasiliskII/src/SDL/SDLMain.h | 16 - BasiliskII/src/SDL/SDLMain.m | 381 ----------------- BasiliskII/src/SDL/audio_sdl.cpp | 4 +- BasiliskII/src/SDL/video_sdl.cpp | 382 +++++++++++++----- BasiliskII/src/Unix/main_unix.cpp | 1 + 6 files changed, 305 insertions(+), 519 deletions(-) delete mode 100644 BasiliskII/src/SDL/SDLMain.h delete mode 100644 BasiliskII/src/SDL/SDLMain.m diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 02e9485d5..3069555ab 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,6 +7,10 @@ objects = { /* Begin PBXBuildFile section */ + 752F26F11F240140001032B4 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E1E51F23B288006B2DF2 /* SDL2.framework */; }; + 752F26F21F240140001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E1E51F23B288006B2DF2 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; + 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -35,7 +39,6 @@ 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; 7539E1751F23B25A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0731F23B25A006B2DF2 /* keycodes */; }; - 7539E1761F23B25A006B2DF2 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0751F23B25A006B2DF2 /* SDLMain.m */; }; 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */; }; 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; @@ -79,8 +82,6 @@ 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */; }; 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2331F23B32A006B2DF2 /* tunconfig */; }; - 7539E27B1F23B488006B2DF2 /* SDL.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E2771F23B469006B2DF2 /* SDL.framework */; }; - 7539E27C1F23B488006B2DF2 /* SDL.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E2771F23B469006B2DF2 /* SDL.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */; }; 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */; }; @@ -102,13 +103,13 @@ /* End PBXBuildFile section */ /* Begin PBXCopyFilesBuildPhase section */ - 7539E27D1F23B489006B2DF2 /* Embed Frameworks */ = { + 752F26F31F240140001032B4 /* Embed Frameworks */ = { isa = PBXCopyFilesBuildPhase; buildActionMask = 2147483647; dstPath = ""; dstSubfolderSpec = 10; files = ( - 7539E27C1F23B488006B2DF2 /* SDL.framework in Embed Frameworks */, + 752F26F21F240140001032B4 /* SDL2.framework in Embed Frameworks */, ); name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -116,6 +117,8 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ + 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; + 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; @@ -182,8 +185,6 @@ 7539E0701F23B25A006B2DF2 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = ""; }; 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; 7539E0731F23B25A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 7539E0741F23B25A006B2DF2 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; - 7539E0751F23B25A006B2DF2 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; 7539E0771F23B25A006B2DF2 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = ""; }; 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; @@ -258,7 +259,6 @@ 7539E2321F23B32A006B2DF2 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tinyxml2.h; sourceTree = ""; }; 7539E2331F23B32A006B2DF2 /* tunconfig */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = tunconfig; sourceTree = ""; }; 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; - 7539E2771F23B469006B2DF2 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = /Library/Frameworks/SDL.framework; sourceTree = ""; }; 7539E27E1F23BEB4006B2DF2 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = clip_dummy.cpp; sourceTree = ""; }; @@ -285,21 +285,32 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( - 7539E27B1F23B488006B2DF2 /* SDL.framework in Frameworks */, + 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, + 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, + 752F26F11F240140001032B4 /* SDL2.framework in Frameworks */, ); runOnlyForDeploymentPostprocessing = 0; }; /* End PBXFrameworksBuildPhase section */ /* Begin PBXGroup section */ + 752F26F71F240E51001032B4 /* Frameworks */ = { + isa = PBXGroup; + children = ( + 752F26FA1F240E69001032B4 /* IOKit.framework */, + 752F26F81F240E51001032B4 /* Foundation.framework */, + ); + name = Frameworks; + sourceTree = ""; + }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; children = ( 7539E1E41F23B25E006B2DF2 /* src */, 7539DFB41F23B17E006B2DF2 /* Assets */, 7539DFB31F23B17E006B2DF2 /* Products */, - 7539E2771F23B469006B2DF2 /* SDL.framework */, 7539E1E51F23B288006B2DF2 /* SDL2.framework */, + 752F26F71F240E51001032B4 /* Frameworks */, ); sourceTree = ""; }; @@ -403,8 +414,6 @@ children = ( 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, - 7539E0741F23B25A006B2DF2 /* SDLMain.h */, - 7539E0751F23B25A006B2DF2 /* SDLMain.m */, 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */, ); name = SDL; @@ -602,7 +611,7 @@ 7539DFAE1F23B17E006B2DF2 /* Sources */, 7539DFAF1F23B17E006B2DF2 /* Frameworks */, 7539DFB01F23B17E006B2DF2 /* Resources */, - 7539E27D1F23B489006B2DF2 /* Embed Frameworks */, + 752F26F31F240140001032B4 /* Embed Frameworks */, ); buildRules = ( ); @@ -710,7 +719,6 @@ 7539E2A71F23CB9B006B2DF2 /* cpustbl_nf.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 7539E1761F23B25A006B2DF2 /* SDLMain.m in Sources */, 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, @@ -816,7 +824,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Headers, + /Library/Frameworks/SDL2.framework/Headers, ../UNIX, ../include, ., @@ -865,7 +873,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Headers, + /Library/Frameworks/SDL2.framework/Headers, ../UNIX, ../include, ., diff --git a/BasiliskII/src/SDL/SDLMain.h b/BasiliskII/src/SDL/SDLMain.h deleted file mode 100644 index c56d90cbe..000000000 --- a/BasiliskII/src/SDL/SDLMain.h +++ /dev/null @@ -1,16 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#ifndef _SDLMain_h_ -#define _SDLMain_h_ - -#import - -@interface SDLMain : NSObject -@end - -#endif /* _SDLMain_h_ */ diff --git a/BasiliskII/src/SDL/SDLMain.m b/BasiliskII/src/SDL/SDLMain.m deleted file mode 100644 index 0f23664dd..000000000 --- a/BasiliskII/src/SDL/SDLMain.m +++ /dev/null @@ -1,381 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#include "SDL.h" -#include "SDLMain.h" -#include /* for MAXPATHLEN */ -#include - -/* For some reaon, Apple removed setAppleMenu from the headers in 10.4, - but the method still is there and works. To avoid warnings, we declare - it ourselves here. */ -@interface NSApplication(SDL_Missing_Methods) -- (void)setAppleMenu:(NSMenu *)menu; -@end - -/* Use this flag to determine whether we use SDLMain.nib or not */ -#define SDL_USE_NIB_FILE 0 - -/* Use this flag to determine whether we use CPS (docking) or not */ -#define SDL_USE_CPS 1 -#ifdef SDL_USE_CPS -/* Portions of CPS.h */ -typedef struct CPSProcessSerNum -{ - UInt32 lo; - UInt32 hi; -} CPSProcessSerNum; - -extern OSErr CPSGetCurrentProcess( CPSProcessSerNum *psn); -extern OSErr CPSEnableForegroundOperation( CPSProcessSerNum *psn, UInt32 _arg2, UInt32 _arg3, UInt32 _arg4, UInt32 _arg5); -extern OSErr CPSSetFrontProcess( CPSProcessSerNum *psn); - -#endif /* SDL_USE_CPS */ - -static int gArgc; -static char **gArgv; -static BOOL gFinderLaunch; -static BOOL gCalledAppMainline = FALSE; - -static NSString *getApplicationName(void) -{ - const NSDictionary *dict; - NSString *appName = 0; - - /* Determine the application name */ - dict = (const NSDictionary *)CFBundleGetInfoDictionary(CFBundleGetMainBundle()); - if (dict) - appName = [dict objectForKey: @"CFBundleName"]; - - if (![appName length]) - appName = [[NSProcessInfo processInfo] processName]; - - return appName; -} - -#if SDL_USE_NIB_FILE -/* A helper category for NSString */ -@interface NSString (ReplaceSubString) -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString; -@end -#endif - -@interface NSApplication (SDLApplication) -@end - -@implementation NSApplication (SDLApplication) -/* Invoked from the Quit menu item */ -- (void)terminate:(id)sender -{ - /* Post a SDL_QUIT event */ - SDL_Event event; - event.type = SDL_QUIT; - SDL_PushEvent(&event); -} -@end - -/* The main class of the application, the application's delegate */ -@implementation SDLMain - -/* Set the working directory to the .app's parent directory */ -- (void) setupWorkingDirectory:(BOOL)shouldChdir -{ - if (shouldChdir) - { - char parentdir[MAXPATHLEN]; - CFURLRef url = CFBundleCopyBundleURL(CFBundleGetMainBundle()); - CFURLRef url2 = CFURLCreateCopyDeletingLastPathComponent(0, url); - if (CFURLGetFileSystemRepresentation(url2, 1, (UInt8 *)parentdir, MAXPATHLEN)) { - chdir(parentdir); /* chdir to the binary app's parent */ - } - CFRelease(url); - CFRelease(url2); - } -} - -#if SDL_USE_NIB_FILE - -/* Fix menu to contain the real app name instead of "SDL App" */ -- (void)fixMenu:(NSMenu *)aMenu withAppName:(NSString *)appName -{ - NSRange aRange; - NSEnumerator *enumerator; - NSMenuItem *menuItem; - - aRange = [[aMenu title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [aMenu setTitle: [[aMenu title] stringByReplacingRange:aRange with:appName]]; - - enumerator = [[aMenu itemArray] objectEnumerator]; - while ((menuItem = [enumerator nextObject])) - { - aRange = [[menuItem title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [menuItem setTitle: [[menuItem title] stringByReplacingRange:aRange with:appName]]; - if ([menuItem hasSubmenu]) - [self fixMenu:[menuItem submenu] withAppName:appName]; - } -} - -#else - -static void setApplicationMenu(void) -{ - /* warning: this code is very odd */ - NSMenu *appleMenu; - NSMenuItem *menuItem; - NSString *title; - NSString *appName; - - appName = getApplicationName(); - appleMenu = [[NSMenu alloc] initWithTitle:@""]; - - /* Add menu items */ - title = [@"About " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(orderFrontStandardAboutPanel:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Hide " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(hide:) keyEquivalent:@"h"]; - - menuItem = (NSMenuItem *)[appleMenu addItemWithTitle:@"Hide Others" action:@selector(hideOtherApplications:) keyEquivalent:@"h"]; - [menuItem setKeyEquivalentModifierMask:(NSAlternateKeyMask|NSCommandKeyMask)]; - - [appleMenu addItemWithTitle:@"Show All" action:@selector(unhideAllApplications:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Quit " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(terminate:) keyEquivalent:@"q"]; - - - /* Put menu into the menubar */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"" action:nil keyEquivalent:@""]; - [menuItem setSubmenu:appleMenu]; - [[NSApp mainMenu] addItem:menuItem]; - - /* Tell the application object that this is now the application menu */ - [NSApp setAppleMenu:appleMenu]; - - /* Finally give up our references to the objects */ - [appleMenu release]; - [menuItem release]; -} - -/* Create a window menu */ -static void setupWindowMenu(void) -{ - NSMenu *windowMenu; - NSMenuItem *windowMenuItem; - NSMenuItem *menuItem; - - windowMenu = [[NSMenu alloc] initWithTitle:@"Window"]; - - /* "Minimize" item */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"Minimize" action:@selector(performMiniaturize:) keyEquivalent:@"m"]; - [windowMenu addItem:menuItem]; - [menuItem release]; - - /* Put menu into the menubar */ - windowMenuItem = [[NSMenuItem alloc] initWithTitle:@"Window" action:nil keyEquivalent:@""]; - [windowMenuItem setSubmenu:windowMenu]; - [[NSApp mainMenu] addItem:windowMenuItem]; - - /* Tell the application object that this is now the window menu */ - [NSApp setWindowsMenu:windowMenu]; - - /* Finally give up our references to the objects */ - [windowMenu release]; - [windowMenuItem release]; -} - -/* Replacement for NSApplicationMain */ -static void CustomApplicationMain (int argc, char **argv) -{ - NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; - SDLMain *sdlMain; - - /* Ensure the application object is initialised */ - [NSApplication sharedApplication]; - -#ifdef SDL_USE_CPS - { - CPSProcessSerNum PSN; - /* Tell the dock about us */ - if (!CPSGetCurrentProcess(&PSN)) - if (!CPSEnableForegroundOperation(&PSN,0x03,0x3C,0x2C,0x1103)) - if (!CPSSetFrontProcess(&PSN)) - [NSApplication sharedApplication]; - } -#endif /* SDL_USE_CPS */ - - /* Set up the menubar */ - [NSApp setMainMenu:[[[NSMenu alloc] init] autorelease]]; - setApplicationMenu(); - setupWindowMenu(); - - /* Create SDLMain and make it the app delegate */ - sdlMain = [[SDLMain alloc] init]; - [NSApp setDelegate:sdlMain]; - - /* Start the main event loop */ - [NSApp run]; - - [sdlMain release]; - [pool release]; -} - -#endif - - -/* - * Catch document open requests...this lets us notice files when the app - * was launched by double-clicking a document, or when a document was - * dragged/dropped on the app's icon. You need to have a - * CFBundleDocumentsType section in your Info.plist to get this message, - * apparently. - * - * Files are added to gArgv, so to the app, they'll look like command line - * arguments. Previously, apps launched from the finder had nothing but - * an argv[0]. - * - * This message may be received multiple times to open several docs on launch. - * - * This message is ignored once the app's mainline has been called. - */ -- (BOOL)application:(NSApplication *)theApplication openFile:(NSString *)filename -{ - const char *temparg; - size_t arglen; - char *arg; - char **newargv; - - if (!gFinderLaunch) /* MacOS is passing command line args. */ - return FALSE; - - if (gCalledAppMainline) /* app has started, ignore this document. */ - return FALSE; - - temparg = [filename UTF8String]; - arglen = SDL_strlen(temparg) + 1; - arg = (char *) SDL_malloc(arglen); - if (arg == NULL) - return FALSE; - - newargv = (char **) realloc(gArgv, sizeof (char *) * (gArgc + 2)); - if (newargv == NULL) - { - SDL_free(arg); - return FALSE; - } - gArgv = newargv; - - SDL_strlcpy(arg, temparg, arglen); - gArgv[gArgc++] = arg; - gArgv[gArgc] = NULL; - return TRUE; -} - - -/* Called when the internal event loop has just started running */ -- (void) applicationDidFinishLaunching: (NSNotification *) note -{ - int status; - - /* Set the working directory to the .app's parent directory */ - [self setupWorkingDirectory:gFinderLaunch]; - -#if SDL_USE_NIB_FILE - /* Set the main menu to contain the real app name instead of "SDL App" */ - [self fixMenu:[NSApp mainMenu] withAppName:getApplicationName()]; -#endif - - /* Hand off to main application code */ - gCalledAppMainline = TRUE; - status = SDL_main (gArgc, gArgv); - - /* We're done, thank you for playing */ - exit(status); -} -@end - - -@implementation NSString (ReplaceSubString) - -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString -{ - unsigned int bufferSize; - unsigned int selfLen = [self length]; - unsigned int aStringLen = [aString length]; - unichar *buffer; - NSRange localRange; - NSString *result; - - bufferSize = selfLen + aStringLen - aRange.length; - buffer = (unichar *)NSAllocateMemoryPages(bufferSize*sizeof(unichar)); - - /* Get first part into buffer */ - localRange.location = 0; - localRange.length = aRange.location; - [self getCharacters:buffer range:localRange]; - - /* Get middle part into buffer */ - localRange.location = 0; - localRange.length = aStringLen; - [aString getCharacters:(buffer+aRange.location) range:localRange]; - - /* Get last part into buffer */ - localRange.location = aRange.location + aRange.length; - localRange.length = selfLen - localRange.location; - [self getCharacters:(buffer+aRange.location+aStringLen) range:localRange]; - - /* Build output string */ - result = [NSString stringWithCharacters:buffer length:bufferSize]; - - NSDeallocateMemoryPages(buffer, bufferSize); - - return result; -} - -@end - - - -#ifdef main -# undef main -#endif - - -/* Main entry point to executable - should *not* be SDL_main! */ -int main (int argc, char **argv) -{ - /* Copy the arguments into a global variable */ - /* This is passed if we are launched by double-clicking */ - if ( argc >= 2 && strncmp (argv[1], "-psn", 4) == 0 ) { - gArgv = (char **) SDL_malloc(sizeof (char *) * 2); - gArgv[0] = argv[0]; - gArgv[1] = NULL; - gArgc = 1; - gFinderLaunch = YES; - } else { - int i; - gArgc = argc; - gArgv = (char **) SDL_malloc(sizeof (char *) * (argc+1)); - for (i = 0; i <= argc; i++) - gArgv[i] = argv[i]; - gFinderLaunch = NO; - } - -#if SDL_USE_NIB_FILE - NSApplicationMain (argc, argv); -#else - CustomApplicationMain (argc, argv); -#endif - return 0; -} - diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 921beb4c1..bca3ff092 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -105,8 +105,8 @@ static bool open_sdl_audio(void) audio_spec.silence); #endif - char driver_name[32]; - printf("Using SDL/%s audio output\n", SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1)); + const char * driver_name = SDL_GetCurrentAudioDriver(); + printf("Using SDL/%s audio output\n", driver_name ? driver_name : ""); silence_byte = audio_spec.silence; SDL_PauseAudio(0); diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 99f3bfa67..b43ad49d0 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -129,12 +129,16 @@ static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms static int keycode_table[256]; // X keycode -> Mac keycode translation table // SDL variables +static SDL_Window * sdl_window = NULL; // Wraps an OS-native window +static SDL_Surface * inner_sdl_surface = NULL; // Surface in guest-OS display format +static SDL_Surface * outer_sdl_surface = NULL; // Surface in host-OS display format +static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer +static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw outer_sdl_surface to static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor; // Copy of Mac cursor -static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table +//static SDL_Cursor *sdl_cursor; // Copy of Mac cursor +static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors static bool toggle_fullscreen = false; -static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; static bool mouse_grabbed = false; @@ -171,7 +175,7 @@ extern void SysMountFirstFloppy(void); #ifdef ENABLE_VOSF #define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ + if ((SURFACE)->flags & (SDL_FULLSCREEN)) \ the_host_buffer = (uint8 *)(SURFACE)->pixels; \ } while (0) #else @@ -428,25 +432,15 @@ static int sdl_depth_of_video_depth(int video_depth) // Get screen dimensions static void sdl_display_dimensions(int &width, int &height) { - static int max_width, max_height; - if (max_width == 0 && max_height == 0) { - max_width = 640 ; max_height = 480; - SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); - if (modes && modes != (SDL_Rect **)-1) { - // It turns out that on some implementations, and contrary to the documentation, - // the returned list is not sorted from largest to smallest (e.g. Windows) - for (int i = 0; modes[i] != NULL; i++) { - const int w = modes[i]->w; - const int h = modes[i]->h; - if (w > max_width && h > max_height) { - max_width = w; - max_height = h; - } - } - } + SDL_DisplayMode desktop_mode; + const int display_index = 0; // TODO: try supporting multiple displays + if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { + // TODO: report a warning, here? + width = height = 0; + return; } - width = max_width; - height = max_height; + width = desktop_mode.w; + height = desktop_mode.h; } static inline int sdl_display_width(void) @@ -476,10 +470,8 @@ static bool has_mode(int type, int width, int height, int depth) if (width > sdl_display_width() || height > sdl_display_height()) return false; - // Rely on SDL capabilities - return SDL_VideoModeOK(width, height, - sdl_depth_of_video_depth(depth), - SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; + // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. + return true; } // Add mode to list of supported modes @@ -532,18 +524,20 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati // Set window name and class static void set_window_name(int name) { - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - if (vi && vi->wm_available) { - const char *str = GetString(name); - SDL_WM_SetCaption(str, str); + if (!sdl_window) { + return; } + const char *str = GetString(name); + SDL_SetWindowTitle(sdl_window, str); } // Set mouse grab mode -static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) +static void set_grab_mode(bool grab) { - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); + if (!sdl_window) { + return; + } + SDL_SetWindowGrab(sdl_window, grab ? SDL_TRUE : SDL_FALSE); } // Migrate preferences items (XXX to be handled in MigratePrefs()) @@ -647,11 +641,149 @@ driver_base::driver_base(SDL_monitor_desc &m) the_buffer_copy = NULL; } +static void shutdown_sdl_video() +{ + if (sdl_texture) { + SDL_DestroyTexture(sdl_texture); + sdl_texture = NULL; + } + + if (sdl_renderer) { + SDL_DestroyRenderer(sdl_renderer); + sdl_renderer = NULL; + } + + if (inner_sdl_surface) { + if (inner_sdl_surface == outer_sdl_surface) { + outer_sdl_surface = NULL; + } + + SDL_FreeSurface(inner_sdl_surface); + inner_sdl_surface = NULL; + } + + if (outer_sdl_surface) { + SDL_FreeSurface(outer_sdl_surface); + outer_sdl_surface = NULL; + } + + if (sdl_window) { + SDL_DestroyWindow(sdl_window); + sdl_window = NULL; + } +} + +static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) +{ + if (outer_sdl_surface) { + shutdown_sdl_video(); + } + + int window_width = width; + int window_height = height; + Uint32 window_flags = 0; + + if (flags & SDL_WINDOW_FULLSCREEN) { + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { + shutdown_sdl_video(); + return NULL; + } + window_flags |= SDL_WINDOW_FULLSCREEN; + window_width = desktop_mode.w; + window_height = desktop_mode.h; + } + + sdl_window = SDL_CreateWindow( + "Basilisk II", + SDL_WINDOWPOS_UNDEFINED, + SDL_WINDOWPOS_UNDEFINED, + window_width, + window_height, + window_flags); + if (!sdl_window) { + shutdown_sdl_video(); + return NULL; + } + + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); + if (!sdl_renderer) { + shutdown_sdl_video(); + return NULL; + } + + sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, width, height); + if (!sdl_texture) { + shutdown_sdl_video(); + return NULL; + } + + switch (bpp) { + case 8: + outer_sdl_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); + break; + case 16: + outer_sdl_surface = SDL_CreateRGBSurfaceWithFormat(0, width, height, 16, SDL_PIXELFORMAT_RGB565); + break; + case 32: + outer_sdl_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + inner_sdl_surface = outer_sdl_surface; + break; + default: + printf("WARNING: An unsupported bpp of %d was used\n", bpp); + break; + } + if (!outer_sdl_surface) { + shutdown_sdl_video(); + return NULL; + } + + if (!inner_sdl_surface) { + inner_sdl_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + if (!inner_sdl_surface) { + shutdown_sdl_video(); + return NULL; + } + } + + return outer_sdl_surface; +} + +static int update_sdl_video() +{ + if (!sdl_renderer || !sdl_texture || !outer_sdl_surface) { + printf("WARNING: A video mode does not appear to have been set.\n"); + return -1; + } + + if (inner_sdl_surface != outer_sdl_surface && + inner_sdl_surface != NULL && + outer_sdl_surface != NULL) + { + SDL_Rect destRect = {0, 0, inner_sdl_surface->w, inner_sdl_surface->h}; + if (SDL_BlitSurface(outer_sdl_surface, NULL, inner_sdl_surface, &destRect) != 0) { + return -1; + } + } + + if (SDL_UpdateTexture(sdl_texture, NULL, inner_sdl_surface->pixels, inner_sdl_surface->pitch) != 0) { + return -1; + } + + SDL_Rect src_rect = {0, 0, inner_sdl_surface->w, inner_sdl_surface->h}; + if (SDL_RenderCopy(sdl_renderer, sdl_texture, &src_rect, NULL) != 0) { + return -1; + } + + SDL_RenderPresent(sdl_renderer); + + return 0; +} + void driver_base::set_video_mode(int flags) { int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, - SDL_HWSURFACE | flags)) == NULL) + if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) return; #ifdef ENABLE_VOSF the_host_buffer = (uint8 *)s->pixels; @@ -660,7 +792,7 @@ void driver_base::set_video_mode(int flags) void driver_base::init() { - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); int aligned_height = (VIDEO_MODE_Y + 15) & ~15; #ifdef ENABLE_VOSF @@ -785,8 +917,9 @@ void driver_base::update_palette(void) { const VIDEO_MODE &mode = monitor.get_current_mode(); - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) - SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { + SDL_SetSurfacePalette(s, sdl_palette); + } } // Disable mouse acceleration @@ -812,12 +945,10 @@ void driver_base::toggle_mouse_grab(void) void driver_base::grab_mouse(void) { if (!mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); - if (new_mode == SDL_GRAB_ON) { - set_window_name(STR_WINDOW_TITLE_GRABBED); - disable_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = true); - } + set_grab_mode(true); + set_window_name(STR_WINDOW_TITLE_GRABBED); + disable_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = true); } } @@ -825,12 +956,10 @@ void driver_base::grab_mouse(void) void driver_base::ungrab_mouse(void) { if (mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); - if (new_mode == SDL_GRAB_OFF) { - set_window_name(STR_WINDOW_TITLE); - restore_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = false); - } + set_grab_mode(false); + set_window_name(STR_WINDOW_TITLE); + restore_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = false); } } @@ -861,8 +990,7 @@ static void keycode_init(void) keycode_table[i] = -1; // Search for server vendor string, then read keycodes - char video_driver[256]; - SDL_VideoDriverName(video_driver, sizeof(video_driver)); + const char * video_driver = SDL_GetCurrentVideoDriver(); bool video_driver_found = false; char line[256]; int n_keys = 0; @@ -895,7 +1023,7 @@ static void keycode_init(void) static const char sdl_str[] = "sdl"; if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { char *p = line + sizeof(sdl_str); - if (strstr(video_driver, p) == video_driver) + if (video_driver && strstr(video_driver, p) == video_driver) video_driver_found = true; } } @@ -908,12 +1036,12 @@ static void keycode_init(void) // Vendor not found? Then display warning if (!video_driver_found) { char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); WarningAlert(str); return; } - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); } } @@ -954,7 +1082,7 @@ bool SDL_monitor_desc::video_open(void) // Start redraw/input thread #ifndef USE_CPU_EMUL_SERVICES redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); if (!redraw_thread_active) { printf("FATAL: cannot create redraw thread\n"); return false; @@ -1032,7 +1160,11 @@ bool VideoInit(bool classic) default_height = sdl_display_height(); // Mac screen depth follows X depth - screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; + screen_depth = 32; + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { + screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); + } int default_depth; switch (screen_depth) { case 8: @@ -1241,7 +1373,7 @@ static void do_toggle_fullscreen(void) // switch modes display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); drv->adapt_to_video_mode(); // reset the palette @@ -1253,7 +1385,7 @@ static void do_toggle_fullscreen(void) // restore the screen contents SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); SDL_FreeSurface(tmp_surface); - SDL_UpdateRect(drv->s, 0, 0, 0, 0); + update_sdl_video(); // reset the video refresh handler VideoRefreshInit(); @@ -1262,7 +1394,7 @@ static void do_toggle_fullscreen(void) ADBKeyUp(0x36); // restore the mouse position - SDL_WarpMouse(x, y); + SDL_WarpMouseGlobal(x, y); // resume redraw thread toggle_fullscreen = false; @@ -1351,7 +1483,12 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) // Convert colors to XColor array int num_out = 256; bool stretch = false; - SDL_Color *p = sdl_palette; + + if (!sdl_palette) { + sdl_palette = SDL_AllocPalette(num_out); + } + + SDL_Color *p = sdl_palette->colors; for (int i=0; ir = pal[c*3 + 0] * 0x0101; @@ -1523,27 +1660,25 @@ void video_set_cursor(void) static bool is_modifier_key(SDL_KeyboardEvent const & e) { switch (e.keysym.sym) { - case SDLK_NUMLOCK: + case SDLK_NUMLOCKCLEAR: case SDLK_CAPSLOCK: - case SDLK_SCROLLOCK: + case SDLK_SCROLLLOCK: case SDLK_RSHIFT: case SDLK_LSHIFT: case SDLK_RCTRL: case SDLK_LCTRL: case SDLK_RALT: case SDLK_LALT: - case SDLK_RMETA: - case SDLK_LMETA: - case SDLK_LSUPER: - case SDLK_RSUPER: + case SDLK_RGUI: + case SDLK_LGUI: case SDLK_MODE: - case SDLK_COMPOSE: + case SDLK_APPLICATION: return true; } return false; } -static bool is_ctrl_down(SDL_keysym const & ks) +static bool is_ctrl_down(SDL_Keysym const & ks) { return ctrl_down || (ks.mod & KMOD_CTRL); } @@ -1554,7 +1689,7 @@ static bool is_ctrl_down(SDL_keysym const & ks) * and -2 if the key was recognized as a hotkey */ -static int kc_decode(SDL_keysym const & ks, bool key_down) +static int kc_decode(SDL_Keysym const & ks, bool key_down) { switch (ks.sym) { case SDLK_a: return 0x00; @@ -1626,19 +1761,17 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) #if (defined(__APPLE__) && defined(__MACH__)) case SDLK_LALT: return 0x3a; case SDLK_RALT: return 0x3a; - case SDLK_LMETA: return 0x37; - case SDLK_RMETA: return 0x37; + case SDLK_LGUI: return 0x37; + case SDLK_RGUI: return 0x37; #else case SDLK_LALT: return 0x37; case SDLK_RALT: return 0x37; - case SDLK_LMETA: return 0x3a; - case SDLK_RMETA: return 0x3a; + case SDLK_LGUI: return 0x3a; + case SDLK_RGUI: return 0x3a; #endif - case SDLK_LSUPER: return 0x3a; // "Windows" key - case SDLK_RSUPER: return 0x3a; case SDLK_MENU: return 0x32; case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCK: return 0x47; + case SDLK_NUMLOCKCLEAR: return 0x47; case SDLK_UP: return 0x3e; case SDLK_DOWN: return 0x3d; @@ -1660,20 +1793,20 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) case SDLK_F11: return 0x67; case SDLK_F12: return 0x6f; - case SDLK_PRINT: return 0x69; - case SDLK_SCROLLOCK: return 0x6b; + case SDLK_PRINTSCREEN: return 0x69; + case SDLK_SCROLLLOCK: return 0x6b; case SDLK_PAUSE: return 0x71; - case SDLK_KP0: return 0x52; - case SDLK_KP1: return 0x53; - case SDLK_KP2: return 0x54; - case SDLK_KP3: return 0x55; - case SDLK_KP4: return 0x56; - case SDLK_KP5: return 0x57; - case SDLK_KP6: return 0x58; - case SDLK_KP7: return 0x59; - case SDLK_KP8: return 0x5b; - case SDLK_KP9: return 0x5c; + case SDLK_KP_0: return 0x52; + case SDLK_KP_1: return 0x53; + case SDLK_KP_2: return 0x54; + case SDLK_KP_3: return 0x55; + case SDLK_KP_4: return 0x56; + case SDLK_KP_5: return 0x57; + case SDLK_KP_6: return 0x58; + case SDLK_KP_7: return 0x59; + case SDLK_KP_8: return 0x5b; + case SDLK_KP_9: return 0x5c; case SDLK_KP_PERIOD: return 0x41; case SDLK_KP_PLUS: return 0x45; case SDLK_KP_MINUS: return 0x4e; @@ -1713,15 +1846,52 @@ static void force_complete_window_refresh() * SDL event handling */ +static void scale_mouse_event_coordinates(void *userdata, SDL_Event * event) +{ + if (!inner_sdl_surface || !sdl_window) { + return; + } + + int window_width = 0; + int window_height = 0; + SDL_GetWindowSize(sdl_window, &window_width, &window_height); + if (window_width == 0 || window_height == 0) { + return; + } + + float scale_x = (float)inner_sdl_surface->w / (float)window_width; + float scale_y = (float)inner_sdl_surface->h / (float)window_height; + + switch (event->type) { + case SDL_MOUSEBUTTONDOWN: + case SDL_MOUSEBUTTONUP: + event->button.x = (int)(event->button.x * scale_x); + event->button.y = (int)(event->button.y * scale_y); + break; + + case SDL_MOUSEMOTION: + event->motion.x = (int)(event->motion.x * scale_x); + event->motion.y = (int)(event->motion.y * scale_y); + event->motion.xrel = (int)(event->motion.xrel * scale_x); + event->motion.yrel = (int)(event->motion.yrel * scale_y); + break; + } +} + static void handle_events(void) { SDL_Event events[10]; const int n_max_events = sizeof(events) / sizeof(events[0]); int n_events; - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { for (int i = 0; i < n_events; i++) { - SDL_Event const & event = events[i]; + SDL_Event & event = events[i]; + + // Make sure events with mouse coordinates get scaled, in case the Mac's + // display size is different than the host OS' window. + scale_mouse_event_coordinates(NULL, &events[i]); + switch (event.type) { // Mouse button @@ -1820,24 +1990,28 @@ static void handle_events(void) } break; } - - // Hidden parts exposed, force complete refresh of window - case SDL_VIDEOEXPOSE: - force_complete_window_refresh(); + + case SDL_WINDOWEVENT: { + switch (event.window.event) { + // Hidden parts exposed, force complete refresh of window + case SDL_WINDOWEVENT_EXPOSED: + force_complete_window_refresh(); + break; + + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + case SDL_WINDOWEVENT_RESTORED: + force_complete_window_refresh(); + break; + + } break; + } // Window "close" widget clicked case SDL_QUIT: ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); break; - - // Application activate/deactivate - case SDL_ACTIVEEVENT: - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain && (event.active.state & SDL_APPACTIVE)) - force_complete_window_refresh(); - break; } } } @@ -1885,7 +2059,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - SDL_UpdateRect(drv->s, 0, 0, 0, 0); + update_sdl_video(); /* // Incremental update code @@ -2091,7 +2265,7 @@ static void update_display_static_bbox(driver_base *drv) // Refresh display if (nr_boxes) - SDL_UpdateRects(drv->s, nr_boxes, boxes); + update_sdl_video(); } diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 1f03b9a0c..d996c6a5b 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -27,6 +27,7 @@ #ifdef USE_SDL # include +# include #endif #ifndef USE_SDL_VIDEO From 1d5b8e95af7f3fda71b4c5ffdcf56ac4a1847732 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 20:40:31 -0400 Subject: [PATCH 097/534] use the host-OS' desktop resolution, when entering full-screen. This enables use of Mac OS X's "Spaces" feature, when going to fullscreen. --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index b43ad49d0..e9454b0af 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -689,7 +689,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } - window_flags |= SDL_WINDOW_FULLSCREEN; + window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; window_width = desktop_mode.w; window_height = desktop_mode.h; } From b62b8fe5ad957bdf86f4a6bc25b2a6a0be104ac9 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 21:09:53 -0400 Subject: [PATCH 098/534] read/write preferences from HOME/.basilisk_ii_prefs --- .../BasiliskII.xcodeproj/project.pbxproj | 8 +- BasiliskII/src/SDL/prefs_sdl.cpp | 104 ++++++++++++++++++ 2 files changed, 108 insertions(+), 4 deletions(-) create mode 100644 BasiliskII/src/SDL/prefs_sdl.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 3069555ab..149dd2f40 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -11,6 +11,7 @@ 752F26F21F240140001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E1E51F23B288006B2DF2 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; + 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -85,7 +86,6 @@ 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */; }; 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */; }; - 7539E2901F23C56F006B2DF2 /* prefs_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */; }; 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; @@ -119,6 +119,7 @@ /* Begin PBXFileReference section */ 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; + 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; @@ -263,7 +264,6 @@ 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = clip_dummy.cpp; sourceTree = ""; }; 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_dummy.cpp; sourceTree = ""; }; - 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_dummy.cpp; sourceTree = ""; }; 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; @@ -412,6 +412,7 @@ 7539E0711F23B25A006B2DF2 /* SDL */ = { isa = PBXGroup; children = ( + 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */, @@ -590,7 +591,6 @@ children = ( 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */, 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */, - 7539E2871F23C56F006B2DF2 /* prefs_dummy.cpp */, 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, @@ -729,11 +729,11 @@ 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E2A61F23CB9B006B2DF2 /* cpuemu.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, + 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2A51F23CB9B006B2DF2 /* cpuemu_nf.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, - 7539E2901F23C56F006B2DF2 /* prefs_dummy.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, diff --git a/BasiliskII/src/SDL/prefs_sdl.cpp b/BasiliskII/src/SDL/prefs_sdl.cpp new file mode 100644 index 000000000..577d1084b --- /dev/null +++ b/BasiliskII/src/SDL/prefs_sdl.cpp @@ -0,0 +1,104 @@ +/* + * prefs_sdl.cpp - Preferences handling, SDL2 implementation + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" + +#include +#include +#include +#include + +#include "prefs.h" + + +// Platform-specific preferences items +prefs_desc platform_prefs_items[] = { + {NULL, TYPE_END, false} // End of list +}; + + +// Prefs file name and path +const char PREFS_FILE_NAME[] = ".basilisk_ii_prefs"; + +std::string UserPrefsPath; + + +/* + * Load preferences from settings file + */ + +void LoadPrefs(const char * vmdir) // TODO: load prefs from 'vmdir' +{ + // Build a full-path to the settings file + char prefs_path[4096]; + if (!vmdir) { + vmdir = SDL_getenv("HOME"); + } + if (!vmdir) { + vmdir = "./"; + } + SDL_snprintf(prefs_path, sizeof(prefs_path), "%s/%s", vmdir, PREFS_FILE_NAME); + + // Read preferences from settings file + FILE *f = fopen(prefs_path, "r"); + if (f != NULL) { + + // Prefs file found, load settings + LoadPrefsFromStream(f); + fclose(f); + + } else { + + // No prefs file, save defaults + SavePrefs(); + } +} + + +/* + * Save preferences to settings file + */ + +void SavePrefs(void) +{ + // Build a full-path to the settings file + char prefs_path[4096]; + const char * dir = SDL_getenv("HOME"); + if (!dir) { + dir = "./"; + } + SDL_snprintf(prefs_path, sizeof(prefs_path), "%s/%s", dir, PREFS_FILE_NAME); + + FILE *f; + if ((f = fopen(prefs_path, "w")) != NULL) { + SavePrefsToStream(f); + fclose(f); + } +} + + +/* + * Add defaults of platform-specific prefs items + * You may also override the defaults set in PrefsInit() + */ + +void AddPlatformPrefsDefaults(void) +{ +} From ad747d2049240974d9984f757c856a43b4e786ee Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 21:16:32 -0400 Subject: [PATCH 099/534] use HOME/.basilisk_ii_xpram for saving + restoring XPRAM --- .../BasiliskII.xcodeproj/project.pbxproj | 8 +- BasiliskII/src/SDL/xpram_sdl.cpp | 98 +++++++++++++++++++ 2 files changed, 102 insertions(+), 4 deletions(-) create mode 100644 BasiliskII/src/SDL/xpram_sdl.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 149dd2f40..8633e240f 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -12,6 +12,7 @@ 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; + 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -90,7 +91,6 @@ 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */; }; - 7539E2951F23C56F006B2DF2 /* xpram_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */; }; 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */; }; @@ -120,6 +120,7 @@ 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; + 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; @@ -268,7 +269,6 @@ 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_dummy.cpp; sourceTree = ""; }; - 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_dummy.cpp; sourceTree = ""; }; 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_uae.cpp; sourceTree = ""; }; @@ -412,6 +412,7 @@ 7539E0711F23B25A006B2DF2 /* SDL */ = { isa = PBXGroup; children = ( + 752F27021F242F51001032B4 /* xpram_sdl.cpp */, 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, @@ -595,7 +596,6 @@ 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */, - 7539E28C1F23C56F006B2DF2 /* xpram_dummy.cpp */, ); name = dummy; path = ../dummy; @@ -746,7 +746,6 @@ 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, - 7539E2951F23C56F006B2DF2 /* xpram_dummy.cpp in Sources */, 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */, @@ -754,6 +753,7 @@ 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, diff --git a/BasiliskII/src/SDL/xpram_sdl.cpp b/BasiliskII/src/SDL/xpram_sdl.cpp new file mode 100644 index 000000000..4526bae64 --- /dev/null +++ b/BasiliskII/src/SDL/xpram_sdl.cpp @@ -0,0 +1,98 @@ +/* + * xpram_sdl.cpp - XPRAM handling, SDL implementation + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" + +#include +#include +#include + +#include "xpram.h" + + +// XPRAM file name and path +const char XPRAM_FILE_NAME[] = ".basilisk_ii_xpram"; + + +/* + * Load XPRAM from settings file + */ + +void LoadXPRAM(const char *dir) +{ + // Build a full-path to the file + char full_path[4096]; + if (!dir) { + dir = SDL_getenv("HOME"); + } + if (!dir) { + dir = "./"; + } + SDL_snprintf(full_path, sizeof(full_path), "%s/%s", dir, XPRAM_FILE_NAME); + + // Open the XPRAM file + FILE *f = fopen(full_path, "rb"); + if (f != NULL) { + fread(XPRAM, 256, 1, f); + fclose(f); + } +} + + +/* + * Save XPRAM to settings file + */ + +void SaveXPRAM(void) +{ + // Build a full-path to the file + char full_path[4096]; + const char *dir = SDL_getenv("HOME"); + if (!dir) { + dir = "./"; + } + SDL_snprintf(full_path, sizeof(full_path), "%s/%s", dir, XPRAM_FILE_NAME); + + // Save the XPRAM file + FILE *f = fopen(XPRAM_FILE_NAME, "wb"); + if (f != NULL) { + fwrite(XPRAM, 256, 1, f); + fclose(f); + } +} + + +/* + * Delete PRAM file + */ + +void ZapPRAM(void) +{ + // Build a full-path to the file + char full_path[4096]; + const char *dir = SDL_getenv("HOME"); + if (!dir) { + dir = "./"; + } + SDL_snprintf(full_path, sizeof(full_path), "%s/%s", dir, XPRAM_FILE_NAME); + + // Delete the XPRAM file + remove(full_path); +} From e3a687ff1e6465ded66ff99bc15a5146aa772835 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 21:20:46 -0400 Subject: [PATCH 100/534] updated copyright to 2017 (from 2006); added SDL2 port credit --- BasiliskII/src/MacOSX/Credits.html | 6 ++++++ BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings | 2 +- BasiliskII/src/MacOSX/Info.plist | 6 +++--- 3 files changed, 10 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/Credits.html b/BasiliskII/src/MacOSX/Credits.html index 29ee57a93..aa43da651 100644 --- a/BasiliskII/src/MacOSX/Credits.html +++ b/BasiliskII/src/MacOSX/Credits.html @@ -4,8 +4,14 @@
The Official Basilisk II Home Page
+
MacOS X (native windowing) port
by Nigel Pearson <nigel@ind.tansu.com.au> +
+
+SDL2 port +
+by David Ludwig <dludwig@pobox.com> diff --git a/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings b/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings index fbcc2d402..5b8ae8d04 100755 --- a/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings +++ b/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings @@ -1,3 +1,3 @@ /* Localized versions of Info.plist keys */ -NSHumanReadableCopyright = "Copyright © 1997-2006 Christian Bauer et al. Freely distributable under the terms of the GNU GPL."; +NSHumanReadableCopyright = "Copyright © 1997-2017 Christian Bauer et al. Freely distributable under the terms of the GNU GPL."; diff --git a/BasiliskII/src/MacOSX/Info.plist b/BasiliskII/src/MacOSX/Info.plist index 31a02329c..391fb133f 100644 --- a/BasiliskII/src/MacOSX/Info.plist +++ b/BasiliskII/src/MacOSX/Info.plist @@ -1,5 +1,5 @@ - + CFBundleDevelopmentRegion @@ -7,7 +7,7 @@ CFBundleExecutable BasiliskII CFBundleGetInfoString - Basilisk II version 1.0, Copyright © 1997-2006 Christian Bauer et al. Mac OS X port 19 + Basilisk II version 1.0, Copyright © 1997-2017 Christian Bauer et al. SDL2 port CFBundleIconFile BasiliskII.icns CFBundleIdentifier @@ -19,7 +19,7 @@ CFBundlePackageType APPL CFBundleShortVersionString - Basilisk II 1.0, Mac OS X port 19 + Basilisk II 1.0, SDL2 port CFBundleSignature ???? NSHelpFile From a1a85a9315985d150c4af258906652e152d2dc05 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 21:31:06 -0400 Subject: [PATCH 101/534] bug-fix: don't double-free the inner SDL_Surface, when the guest OS switches video modes --- BasiliskII/src/SDL/video_sdl.cpp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index e9454b0af..c788548be 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -879,8 +879,7 @@ driver_base::~driver_base() ungrab_mouse(); restore_mouse_accel(); - if (s) - SDL_FreeSurface(s); + shutdown_sdl_video(); // the_buffer shall always be mapped through vm_acquire_framebuffer() if (the_buffer != VM_MAP_FAILED) { From 3d0ea018ed007a1c8921845a2bdb694334899210 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 21:49:54 -0400 Subject: [PATCH 102/534] bug-fix: OS X app would not launch, when run from the Finder --- BasiliskII/src/Unix/main_unix.cpp | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index d996c6a5b..f8dc7431f 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -427,11 +427,18 @@ int main(int argc, char **argv) } else if (strcmp(argv[i], "--rominfo") == 0) { argv[i] = NULL; PrintROMInfo = true; - } else if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { - // HACK: prevent Basilisk from exiting, when run via Xcode 8, which - // passes in a '-NSDocumentRevisionsDebugMode' option. + } + +#if defined(__APPLE__) && defined(__MACH__) + // Mac OS X likes to pass in various options of its own, when launching an app. + // Attempt to ignore these. + const char * mac_psn_prefix = "-psn_"; + if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { + argv[i] = NULL; + } else if (strncmp(mac_psn_prefix, argv[i], strlen(mac_psn_prefix)) == 0) { argv[i] = NULL; } +#endif } // Remove processed arguments From a3f3d4f5d236698fd1df0a3ad8899f7d414f5d4d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 22 Jul 2017 22:01:13 -0400 Subject: [PATCH 103/534] dropped Mac OS X deployment target down to 10.7 (from 10.12) --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8633e240f..8e2b1d792 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -830,7 +830,7 @@ ., ../uae_cpu, ); - MACOSX_DEPLOYMENT_TARGET = 10.12; + MACOSX_DEPLOYMENT_TARGET = 10.7; MTL_ENABLE_DEBUG_INFO = YES; ONLY_ACTIVE_ARCH = YES; SDKROOT = macosx; @@ -879,7 +879,7 @@ ., ../uae_cpu, ); - MACOSX_DEPLOYMENT_TARGET = 10.12; + MACOSX_DEPLOYMENT_TARGET = 10.7; MTL_ENABLE_DEBUG_INFO = NO; SDKROOT = macosx; }; From 6e36c8dd30ac178eb517f1569881a6427d93dcb3 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 14:09:19 -0400 Subject: [PATCH 104/534] include SDL2 as a git submodule, currently using v2.0.5; make Mac builds (of Basilisk II) build SDL This should help with debugging windowing system issues, which may reside in SDL, which SDL may not provide adequate diagnostic info, or which Basilisk may not report --- .gitmodules | 4 + .../BasiliskII.xcodeproj/project.pbxproj | 135 ++++++++++++++++-- external/SDL | 1 + 3 files changed, 132 insertions(+), 8 deletions(-) create mode 100644 .gitmodules create mode 160000 external/SDL diff --git a/.gitmodules b/.gitmodules new file mode 100644 index 000000000..1873d9c74 --- /dev/null +++ b/.gitmodules @@ -0,0 +1,4 @@ +[submodule "external/SDL"] + path = external/SDL + url = https://github.com/spurious/SDL-mirror + branch = release-2.0.5 diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8e2b1d792..f51fe0027 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,12 +7,12 @@ objects = { /* Begin PBXBuildFile section */ - 752F26F11F240140001032B4 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E1E51F23B288006B2DF2 /* SDL2.framework */; }; - 752F26F21F240140001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 7539E1E51F23B288006B2DF2 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; + 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; }; + 752F27151F251B5C001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -102,6 +102,44 @@ 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; /* End PBXBuildFile section */ +/* Begin PBXContainerItemProxy section */ + 752F270C1F251B4A001032B4 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF66C0761BA81005FE872; + remoteInfo = Framework; + }; + 752F270E1F251B4A001032B4 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF6B30761BA81005FE872; + remoteInfo = "Static Library"; + }; + 752F27101F251B4A001032B4 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = DB31407717554B71006C0E22; + remoteInfo = "Shared Library"; + }; + 752F27121F251B4A001032B4 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF6BE0761BA81005FE872; + remoteInfo = "Standard DMG"; + }; + 752F27161F251B5C001032B4 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + proxyType = 1; + remoteGlobalIDString = BECDF5FE0761BA81005FE872; + remoteInfo = Framework; + }; +/* End PBXContainerItemProxy section */ + /* Begin PBXCopyFilesBuildPhase section */ 752F26F31F240140001032B4 /* Embed Frameworks */ = { isa = PBXCopyFilesBuildPhase; @@ -109,7 +147,7 @@ dstPath = ""; dstSubfolderSpec = 10; files = ( - 752F26F21F240140001032B4 /* SDL2.framework in Embed Frameworks */, + 752F27151F251B5C001032B4 /* SDL2.framework in Embed Frameworks */, ); name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -121,6 +159,7 @@ 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; + 752F27051F251B4A001032B4 /* SDL.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; name = SDL.xcodeproj; path = ../../../external/SDL/Xcode/SDL/SDL.xcodeproj; sourceTree = ""; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; @@ -224,7 +263,6 @@ 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; - 7539E1E51F23B288006B2DF2 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; 7539E1F11F23B329006B2DF2 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-osx.patch"; sourceTree = ""; }; @@ -285,9 +323,9 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( + 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, - 752F26F11F240140001032B4 /* SDL2.framework in Frameworks */, ); runOnlyForDeploymentPostprocessing = 0; }; @@ -303,13 +341,32 @@ name = Frameworks; sourceTree = ""; }; + 752F27041F251B27001032B4 /* external */ = { + isa = PBXGroup; + children = ( + 752F27051F251B4A001032B4 /* SDL.xcodeproj */, + ); + name = external; + sourceTree = ""; + }; + 752F27061F251B4A001032B4 /* Products */ = { + isa = PBXGroup; + children = ( + 752F270D1F251B4A001032B4 /* SDL2.framework */, + 752F270F1F251B4A001032B4 /* libSDL2.a */, + 752F27111F251B4A001032B4 /* libSDL2.dylib */, + 752F27131F251B4A001032B4 /* Standard DMG */, + ); + name = Products; + sourceTree = ""; + }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; children = ( 7539E1E41F23B25E006B2DF2 /* src */, + 752F27041F251B27001032B4 /* external */, 7539DFB41F23B17E006B2DF2 /* Assets */, 7539DFB31F23B17E006B2DF2 /* Products */, - 7539E1E51F23B288006B2DF2 /* SDL2.framework */, 752F26F71F240E51001032B4 /* Frameworks */, ); sourceTree = ""; @@ -608,6 +665,7 @@ isa = PBXNativeTarget; buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; buildPhases = ( + 752F27181F251CB1001032B4 /* Run Script */, 7539DFAE1F23B17E006B2DF2 /* Sources */, 7539DFAF1F23B17E006B2DF2 /* Frameworks */, 7539DFB01F23B17E006B2DF2 /* Resources */, @@ -616,6 +674,7 @@ buildRules = ( ); dependencies = ( + 752F27171F251B5C001032B4 /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; @@ -653,6 +712,10 @@ ProductGroup = 7539E0041F23B25A006B2DF2 /* Products */; ProjectRef = 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */; }, + { + ProductGroup = 752F27061F251B4A001032B4 /* Products */; + ProjectRef = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; + }, ); projectRoot = ""; targets = ( @@ -661,6 +724,37 @@ }; /* End PBXProject section */ +/* Begin PBXReferenceProxy section */ + 752F270D1F251B4A001032B4 /* SDL2.framework */ = { + isa = PBXReferenceProxy; + fileType = wrapper.framework; + path = SDL2.framework; + remoteRef = 752F270C1F251B4A001032B4 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 752F270F1F251B4A001032B4 /* libSDL2.a */ = { + isa = PBXReferenceProxy; + fileType = archive.ar; + path = libSDL2.a; + remoteRef = 752F270E1F251B4A001032B4 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 752F27111F251B4A001032B4 /* libSDL2.dylib */ = { + isa = PBXReferenceProxy; + fileType = "compiled.mach-o.dylib"; + path = libSDL2.dylib; + remoteRef = 752F27101F251B4A001032B4 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 752F27131F251B4A001032B4 /* Standard DMG */ = { + isa = PBXReferenceProxy; + fileType = "compiled.mach-o.executable"; + path = "Standard DMG"; + remoteRef = 752F27121F251B4A001032B4 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; +/* End PBXReferenceProxy section */ + /* Begin PBXResourcesBuildPhase section */ 7539DFB01F23B17E006B2DF2 /* Resources */ = { isa = PBXResourcesBuildPhase; @@ -700,6 +794,23 @@ }; /* End PBXResourcesBuildPhase section */ +/* Begin PBXShellScriptBuildPhase section */ + 752F27181F251CB1001032B4 /* Run Script */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputPaths = ( + ); + name = "Run Script"; + outputPaths = ( + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "echo Hello World"; + }; +/* End PBXShellScriptBuildPhase section */ + /* Begin PBXSourcesBuildPhase section */ 7539DFAE1F23B17E006B2DF2 /* Sources */ = { isa = PBXSourcesBuildPhase; @@ -770,6 +881,14 @@ }; /* End PBXSourcesBuildPhase section */ +/* Begin PBXTargetDependency section */ + 752F27171F251B5C001032B4 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + name = Framework; + targetProxy = 752F27161F251B5C001032B4 /* PBXContainerItemProxy */; + }; +/* End PBXTargetDependency section */ + /* Begin PBXVariantGroup section */ 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { isa = PBXVariantGroup; @@ -824,7 +943,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ../UNIX, ../include, ., @@ -873,7 +992,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ../UNIX, ../include, ., diff --git a/external/SDL b/external/SDL new file mode 160000 index 000000000..5d7cfcca3 --- /dev/null +++ b/external/SDL @@ -0,0 +1 @@ +Subproject commit 5d7cfcca344034aff9327f77fc181ae3754e7a90 From 84282f45256c3e1577fb4b89f74f3a670adf8be5 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 15:13:50 -0400 Subject: [PATCH 105/534] bug-fix: buffer-overflow in SDL2 audio code --- BasiliskII/src/SDL/audio_sdl.cpp | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index bca3ff092..bc5f30a93 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -87,6 +87,7 @@ static bool open_sdl_audio(void) } SDL_AudioSpec audio_spec; + SDL_zero(audio_spec); audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; audio_spec.channels = audio_channel_counts[audio_channel_count_index]; @@ -99,6 +100,12 @@ static bool open_sdl_audio(void) fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); return false; } + + // HACK: workaround a possible bug in SDL 2.0.5 (reported via https://bugzilla.libsdl.org/show_bug.cgi?id=3710 ) + // whereby SDL does not update audio_spec.size + if (audio_spec.size == 0) { + audio_spec.size = (SDL_AUDIO_BITSIZE(audio_spec.format) / 8) * audio_spec.channels * audio_spec.samples; + } #if defined(BINCUE) OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, From 1190a2b127cd1755113c1dfd6a17e19a0f22f1fc Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 15:22:00 -0400 Subject: [PATCH 106/534] bug-fix, Issue #4: prevent guest OS from causing desktop/Spaces switches on OS X host --- BasiliskII/src/SDL/video_sdl.cpp | 84 +++++++++++++++++++++++--------- 1 file changed, 60 insertions(+), 24 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index c788548be..dfcf9eced 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -641,18 +641,13 @@ driver_base::driver_base(SDL_monitor_desc &m) the_buffer_copy = NULL; } -static void shutdown_sdl_video() +static void delete_sdl_video_surfaces() { if (sdl_texture) { SDL_DestroyTexture(sdl_texture); sdl_texture = NULL; } - if (sdl_renderer) { - SDL_DestroyRenderer(sdl_renderer); - sdl_renderer = NULL; - } - if (inner_sdl_surface) { if (inner_sdl_surface == outer_sdl_surface) { outer_sdl_surface = NULL; @@ -666,6 +661,14 @@ static void shutdown_sdl_video() SDL_FreeSurface(outer_sdl_surface); outer_sdl_surface = NULL; } +} + +static void delete_sdl_video_window() +{ + if (sdl_renderer) { + SDL_DestroyRenderer(sdl_renderer); + sdl_renderer = NULL; + } if (sdl_window) { SDL_DestroyWindow(sdl_window); @@ -673,15 +676,22 @@ static void shutdown_sdl_video() } } +static void shutdown_sdl_video() +{ + delete_sdl_video_surfaces(); + delete_sdl_video_window(); +} + static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) { if (outer_sdl_surface) { - shutdown_sdl_video(); + delete_sdl_video_surfaces(); } int window_width = width; int window_height = height; Uint32 window_flags = 0; + const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; if (flags & SDL_WINDOW_FULLSCREEN) { SDL_DisplayMode desktop_mode; @@ -693,31 +703,50 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags window_width = desktop_mode.w; window_height = desktop_mode.h; } + + if (sdl_window) { + int old_window_width, old_window_height, old_window_flags; + SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); + old_window_flags = SDL_GetWindowFlags(sdl_window); + if (old_window_width != window_width || + old_window_height != window_height || + (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) + { + delete_sdl_video_window(); + } + } - sdl_window = SDL_CreateWindow( - "Basilisk II", - SDL_WINDOWPOS_UNDEFINED, - SDL_WINDOWPOS_UNDEFINED, - window_width, - window_height, - window_flags); - if (!sdl_window) { - shutdown_sdl_video(); - return NULL; - } + if (!sdl_window) { + sdl_window = SDL_CreateWindow( + "Basilisk II", + SDL_WINDOWPOS_UNDEFINED, + SDL_WINDOWPOS_UNDEFINED, + window_width, + window_height, + window_flags); + if (!sdl_window) { + shutdown_sdl_video(); + return NULL; + } + } - sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); - if (!sdl_renderer) { - shutdown_sdl_video(); - return NULL; - } + if (!sdl_renderer) { + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); + if (!sdl_renderer) { + shutdown_sdl_video(); + return NULL; + } + } + SDL_assert(sdl_texture == NULL); sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, width, height); if (!sdl_texture) { shutdown_sdl_video(); return NULL; } + SDL_assert(outer_sdl_surface == NULL); + SDL_assert(inner_sdl_surface == NULL); switch (bpp) { case 8: outer_sdl_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); @@ -879,7 +908,14 @@ driver_base::~driver_base() ungrab_mouse(); restore_mouse_accel(); - shutdown_sdl_video(); + // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather + // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby + // OSX hosts, when in fullscreen, will, on a guest OS resolution change, + // do a series of switches (using OSX's "Spaces" feature) to and from + // the Basilisk II desktop, + delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture + //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to + // instances of SDL_Surface and SDL_Texture. // the_buffer shall always be mapped through vm_acquire_framebuffer() if (the_buffer != VM_MAP_FAILED) { From 54e03d96478e1476c509164876c32aba39371180 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 16:23:51 -0400 Subject: [PATCH 107/534] bug-fix, Issue #2: prevent SDL2 from installing keyboard shortcuts (Command+Q, etc.) on OSX hosts, as they interfere with guest OS use --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 10 ++++++++++ BasiliskII/src/MacOSX/utils_macosx.mm | 12 ++++++++++++ BasiliskII/src/Unix/main_unix.cpp | 12 ++++++++++++ 3 files changed, 34 insertions(+) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index f51fe0027..52bebbe5f 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -100,6 +100,8 @@ 7539E2A81F23CB9B006B2DF2 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */; }; 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A41F23CB9B006B2DF2 /* defs68k.c */; }; 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; + 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; + 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -316,6 +318,9 @@ 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpustbl.cpp; sourceTree = ""; }; 7539E2A41F23CB9B006B2DF2 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = defs68k.c; sourceTree = ""; }; 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; + 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; + 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; + 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -323,6 +328,7 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( + 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, @@ -335,6 +341,7 @@ 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( + 756C1B381F25306A00620917 /* AppKit.framework */, 752F26FA1F240E69001032B4 /* IOKit.framework */, 752F26F81F240E51001032B4 /* Foundation.framework */, ); @@ -456,6 +463,8 @@ 7539E0141F23B25A006B2DF2 /* HowTo.html */, 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */, 7539E02B1F23B25A006B2DF2 /* ToDo.html */, + 756C1B321F252FC100620917 /* utils_macosx.h */, + 756C1B331F252FC100620917 /* utils_macosx.mm */, 7539E02E1F23B25A006B2DF2 /* Versions.html */, ); name = MacOSX; @@ -831,6 +840,7 @@ 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */, + 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index b653638d2..4dd359b2b 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -28,3 +28,15 @@ void NSAutoReleasePool_wrap(void (*fn)(void)) fn(); [pool release]; } + +void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { + for (NSMenuItem * menu_item in [NSApp mainMenu].itemArray) { + if (menu_item.hasSubmenu) { + for (NSMenuItem * sub_item in menu_item.submenu.itemArray) { + sub_item.keyEquivalent = @""; + sub_item.keyEquivalentModifierMask = 0; + } + } + } +} + diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index f8dc7431f..c80f95f4b 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -522,6 +522,18 @@ int main(int argc, char **argv) QuitEmulator(); } atexit(SDL_Quit); + +#if __MACOSX__ + // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, + // except that it will also install keyboard shortcuts, such as Command + Q, + // which can interfere with keyboard shortcuts in the guest OS. + // + // HACK: disable these shortcuts, while leaving all other pieces of SDL2's + // menu bar in-place. + extern void disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); + disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); +#endif + #endif // Init system routines From 87052762063f10c63d3b1c62c6e92b29762e9bcd Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 20:49:29 -0400 Subject: [PATCH 108/534] updated Windows + MSVC support with SDL2 support --- BasiliskII/src/CrossPlatform/video_vosf.h | 9 +- BasiliskII/src/SDL/video_sdl.cpp | 5 +- BasiliskII/src/Windows/BasiliskII.sln | 280 ++-- BasiliskII/src/Windows/BasiliskII.vcxproj | 1332 ++++++++++--------- BasiliskII/src/Windows/b2ether/packet32.cpp | 1 - BasiliskII/src/Windows/main_windows.cpp | 20 +- 6 files changed, 834 insertions(+), 813 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index 4a5677e16..fc89e125b 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -514,7 +514,8 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) VIDEO_DRV_UNLOCK_PIXELS; #ifdef USE_SDL_VIDEO - SDL_UpdateRect(drv->s, 0, y1, VIDEO_MODE_X, height); + //SDL_UpdateRect(drv->s, 0, y1, VIDEO_MODE_X, height); + update_sdl_video(); #else if (VIDEO_DRV_HAVE_SHM) XShmPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height, 0); @@ -558,7 +559,8 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) i2 += scr_bytes_per_row; } #ifdef USE_SDL_VIDEO - SDL_UpdateRect(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); + //SDL_UpdateRect(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); + update_sdl_video(); #endif VIDEO_DRV_UNLOCK_PIXELS; return; @@ -664,7 +666,8 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) #endif } #ifdef USE_SDL_VIDEO - SDL_UpdateRects(drv->s, bbi, bb); + //SDL_UpdateRects(drv->s, bbi, bb); + update_sdl_video(); #endif VIDEO_DRV_UNLOCK_PIXELS; } diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index dfcf9eced..23f6efc87 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -129,7 +129,7 @@ static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms static int keycode_table[256]; // X keycode -> Mac keycode translation table // SDL variables -static SDL_Window * sdl_window = NULL; // Wraps an OS-native window +SDL_Window * sdl_window = NULL; // Wraps an OS-native window static SDL_Surface * inner_sdl_surface = NULL; // Surface in guest-OS display format static SDL_Surface * outer_sdl_surface = NULL; // Surface in host-OS display format static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer @@ -164,6 +164,7 @@ static void (*video_refresh)(void); // Prototypes static int redraw_func(void *arg); +static int update_sdl_video(); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -175,7 +176,7 @@ extern void SysMountFirstFloppy(void); #ifdef ENABLE_VOSF #define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_FULLSCREEN)) \ + if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ the_host_buffer = (uint8 *)(SURFACE)->pixels; \ } while (0) #else diff --git a/BasiliskII/src/Windows/BasiliskII.sln b/BasiliskII/src/Windows/BasiliskII.sln index 1c4b7a1f9..65b6b30fc 100644 --- a/BasiliskII/src/Windows/BasiliskII.sln +++ b/BasiliskII/src/Windows/BasiliskII.sln @@ -1,140 +1,140 @@ - -Microsoft Visual Studio Solution File, Format Version 12.00 -# Visual Studio 14 -VisualStudioVersion = 14.0.23107.0 -MinimumVisualStudioVersion = 10.0.40219.1 -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BasiliskII", "BasiliskII.vcxproj", "{1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}" - ProjectSection(ProjectDependencies) = postProject - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} = {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} = {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "build68k", "build68k.vcxproj", "{7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}" -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencpu", "gencpu.vcxproj", "{1A9EA738-8DA7-422F-9E0D-BE92893C0E48}" - ProjectSection(ProjectDependencies) = postProject - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencomp", "gencomp.vcxproj", "{95933FE9-C27C-41F0-B4AF-EAAADE94FD04}" - ProjectSection(ProjectDependencies) = postProject - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDLmain", "..\..\..\..\SDL-1.2.15\VisualC\SDLmain\SDLmain.vcxproj", "{DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}" -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDL", "..\..\..\..\SDL-1.2.15\VisualC\SDL\SDL.vcxproj", "{81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}" -EndProject -Global - GlobalSection(SolutionConfigurationPlatforms) = preSolution - Debug JIT|x64 = Debug JIT|x64 - Debug JIT|x86 = Debug JIT|x86 - Debug|x64 = Debug|x64 - Debug|x86 = Debug|x86 - Release JIT|x64 = Release JIT|x64 - Release JIT|x86 = Release JIT|x86 - Release|x64 = Release|x64 - Release|x86 = Release|x86 - EndGlobalSection - GlobalSection(ProjectConfigurationPlatforms) = postSolution - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.ActiveCfg = Debug JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.Build.0 = Debug JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.ActiveCfg = Debug JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.Build.0 = Debug JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.ActiveCfg = Debug|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.Build.0 = Debug|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.ActiveCfg = Debug|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.Build.0 = Debug|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.ActiveCfg = Release JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.Build.0 = Release JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.ActiveCfg = Release JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.Build.0 = Release JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.ActiveCfg = Release|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.Build.0 = Release|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.ActiveCfg = Release|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.Build.0 = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.ActiveCfg = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.Build.0 = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.Build.0 = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.ActiveCfg = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.Build.0 = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.ActiveCfg = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.Build.0 = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.ActiveCfg = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.Build.0 = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.ActiveCfg = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.Build.0 = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.ActiveCfg = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.Build.0 = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.ActiveCfg = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.Build.0 = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.ActiveCfg = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.Build.0 = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.Build.0 = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.ActiveCfg = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.Build.0 = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.ActiveCfg = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.Build.0 = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.ActiveCfg = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.Build.0 = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.ActiveCfg = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.Build.0 = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.ActiveCfg = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.Build.0 = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.ActiveCfg = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.Build.0 = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.ActiveCfg = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.Build.0 = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.Build.0 = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.ActiveCfg = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.Build.0 = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.ActiveCfg = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.Build.0 = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.ActiveCfg = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.Build.0 = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.ActiveCfg = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.Build.0 = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.ActiveCfg = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.Build.0 = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.ActiveCfg = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.Build.0 = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.ActiveCfg = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.Build.0 = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.Build.0 = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.ActiveCfg = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.Build.0 = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.ActiveCfg = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.Build.0 = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.ActiveCfg = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.Build.0 = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.ActiveCfg = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.Build.0 = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.ActiveCfg = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.Build.0 = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.ActiveCfg = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.Build.0 = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.ActiveCfg = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.Build.0 = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.Build.0 = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.ActiveCfg = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.Build.0 = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.ActiveCfg = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.Build.0 = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.ActiveCfg = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.Build.0 = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.ActiveCfg = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.Build.0 = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.ActiveCfg = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.Build.0 = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.ActiveCfg = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.Build.0 = Release|Win32 - EndGlobalSection - GlobalSection(SolutionProperties) = preSolution - HideSolutionNode = FALSE - EndGlobalSection -EndGlobal + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio 15 +VisualStudioVersion = 15.0.26430.12 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BasiliskII", "BasiliskII.vcxproj", "{1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}" + ProjectSection(ProjectDependencies) = postProject + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} = {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} = {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} + EndProjectSection +EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "build68k", "build68k.vcxproj", "{7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}" +EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencpu", "gencpu.vcxproj", "{1A9EA738-8DA7-422F-9E0D-BE92893C0E48}" + ProjectSection(ProjectDependencies) = postProject + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} + EndProjectSection +EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencomp", "gencomp.vcxproj", "{95933FE9-C27C-41F0-B4AF-EAAADE94FD04}" + ProjectSection(ProjectDependencies) = postProject + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} + EndProjectSection +EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDL2", "..\..\..\external\SDL\VisualC\SDL\SDL.vcxproj", "{81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}" +EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDL2main", "..\..\..\external\SDL\VisualC\SDLmain\SDLmain.vcxproj", "{DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug JIT|x64 = Debug JIT|x64 + Debug JIT|x86 = Debug JIT|x86 + Debug|x64 = Debug|x64 + Debug|x86 = Debug|x86 + Release JIT|x64 = Release JIT|x64 + Release JIT|x86 = Release JIT|x86 + Release|x64 = Release|x64 + Release|x86 = Release|x86 + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.ActiveCfg = Debug JIT|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.Build.0 = Debug JIT|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.ActiveCfg = Debug JIT|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.Build.0 = Debug JIT|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.ActiveCfg = Debug|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.Build.0 = Debug|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.ActiveCfg = Debug|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.Build.0 = Debug|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.ActiveCfg = Release JIT|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.Build.0 = Release JIT|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.ActiveCfg = Release JIT|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.Build.0 = Release JIT|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.ActiveCfg = Release|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.Build.0 = Release|x64 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.ActiveCfg = Release|Win32 + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.Build.0 = Release|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.ActiveCfg = Debug|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.Build.0 = Debug|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.ActiveCfg = Debug|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.Build.0 = Debug|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.ActiveCfg = Debug|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.Build.0 = Debug|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.ActiveCfg = Debug|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.Build.0 = Debug|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.ActiveCfg = Release|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.Build.0 = Release|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.ActiveCfg = Release|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.Build.0 = Release|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.ActiveCfg = Release|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.Build.0 = Release|x64 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.ActiveCfg = Release|Win32 + {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.Build.0 = Release|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.ActiveCfg = Debug|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.Build.0 = Debug|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.ActiveCfg = Debug|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.Build.0 = Debug|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.ActiveCfg = Debug|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.Build.0 = Debug|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.ActiveCfg = Debug|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.Build.0 = Debug|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.ActiveCfg = Release|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.Build.0 = Release|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.ActiveCfg = Release|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.Build.0 = Release|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.ActiveCfg = Release|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.Build.0 = Release|x64 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.ActiveCfg = Release|Win32 + {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.Build.0 = Release|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.ActiveCfg = Debug|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.Build.0 = Debug|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.ActiveCfg = Debug|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.Build.0 = Debug|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.ActiveCfg = Debug|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.Build.0 = Debug|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.ActiveCfg = Debug|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.Build.0 = Debug|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.ActiveCfg = Release|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.Build.0 = Release|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.ActiveCfg = Release|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.Build.0 = Release|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.ActiveCfg = Release|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.Build.0 = Release|x64 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.ActiveCfg = Release|Win32 + {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.Build.0 = Release|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.ActiveCfg = Debug|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.Build.0 = Debug|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.ActiveCfg = Debug|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.Build.0 = Debug|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.ActiveCfg = Debug|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.Build.0 = Debug|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.ActiveCfg = Debug|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.Build.0 = Debug|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.ActiveCfg = Release|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.Build.0 = Release|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.ActiveCfg = Release|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.Build.0 = Release|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.ActiveCfg = Release|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.Build.0 = Release|x64 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.ActiveCfg = Release|Win32 + {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.Build.0 = Release|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.ActiveCfg = Debug|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.Build.0 = Debug|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.ActiveCfg = Debug|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.Build.0 = Debug|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.ActiveCfg = Debug|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.Build.0 = Debug|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.ActiveCfg = Debug|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.Build.0 = Debug|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.ActiveCfg = Release|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.Build.0 = Release|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.ActiveCfg = Release|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.Build.0 = Release|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.ActiveCfg = Release|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.Build.0 = Release|x64 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.ActiveCfg = Release|Win32 + {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.Build.0 = Release|Win32 + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj b/BasiliskII/src/Windows/BasiliskII.vcxproj index cd05c309f..ef01b7ed2 100644 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj +++ b/BasiliskII/src/Windows/BasiliskII.vcxproj @@ -1,685 +1,697 @@ - - - - - Debug JIT - Win32 - - - Debug JIT - x64 - - - Debug - Win32 - - - Debug - x64 - - - Release JIT - Win32 - - - Release JIT - x64 - - - Release - Win32 - - - Release - x64 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - true - true - true - true - - - true - true - true - true - true - true - true - true - - - true - true - true - true - - - true - true - true - true - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - {81ce8daf-ebb2-4761-8e45-b71abcca8c68} - - - {da956fd3-e142-46f2-9dd5-c78bebb56b7a} - - - - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0} - Win32Proj - BasiliskII - 8.1 - - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - true - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - true - - - true - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - true - - - false - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - false - - - false - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - false - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + + Debug JIT + Win32 + + + Debug JIT + x64 + + + Debug + Win32 + + + Debug + x64 + + + Release JIT + Win32 + + + Release JIT + x64 + + + Release + Win32 + + + Release + x64 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + true + true + true + true + + + true + true + true + true + true + true + true + true + + + true + true + true + true + + + true + true + true + true + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + {da956fd3-e142-46f2-9dd5-c78bebb56b7a} + + + {81ce8daf-ebb2-4761-8e45-b71abcca8c68} + + + + {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0} + Win32Proj + BasiliskII + 8.1 + + + + Application + true + v140_xp + Unicode + + + Application + true + v140_xp + Unicode + + + Application + true + v140_xp + Unicode + + + Application + true + v140_xp + Unicode + + + Application + false + v140_xp + true + Unicode + + + Application + false + v140_xp + true + Unicode + + + Application + false + v140_xp + true + Unicode + + + Application + false + v140_xp + true + Unicode + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + true + $(Configuration)\$(ProjectName)\ + ClCompile + + + ClCompile + true + + + true + $(Configuration)\$(ProjectName)\ + ClCompile + + + ClCompile + true + + + false + $(Configuration)\$(ProjectName)\ + ClCompile + + + ClCompile + false + + + false + $(Configuration)\$(ProjectName)\ + ClCompile + + + ClCompile + false + + + + + + Level3 + Disabled + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + BasiliskII_MSVC_PostBuild.bat "$(SolutionDir)" "$(Platform)" "$(Configuration)" "$(OutDir)" + + + + + + + Level3 + Disabled + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + + + + + Level3 + Disabled + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + BasiliskII_MSVC_PostBuild.bat "$(SolutionDir)" "$(Platform)" "$(Configuration)" "$(OutDir)" + + + + + + + Level3 + Disabled + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + + + Level3 + + + MaxSpeed + true + true + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + true + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + BasiliskII_MSVC_PostBuild.bat "$(SolutionDir)" "$(Platform)" "$(Configuration)" "$(OutDir)" + + + + + Level3 + + + MaxSpeed + true + true + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + true + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + + + Level3 + + + MaxSpeed + true + true + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + true + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + BasiliskII_MSVC_PostBuild.bat "$(SolutionDir)" "$(Platform)" "$(Configuration)" "$(OutDir)" + + + + + Level3 + + + MaxSpeed + true + true + HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) + ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\external\SDL\include + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + $(IntDir)%(RelativeDir) + + + Windows + true + true + true + WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) + + cd ..\uae_cpu "$(ToolsDir)gencpu" "$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - + + + + Generating CPU emulation sources... + + + ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) + + + $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe + + + + + \ No newline at end of file diff --git a/BasiliskII/src/Windows/b2ether/packet32.cpp b/BasiliskII/src/Windows/b2ether/packet32.cpp index 72efb1fe9..93dd647f8 100755 --- a/BasiliskII/src/Windows/b2ether/packet32.cpp +++ b/BasiliskII/src/Windows/b2ether/packet32.cpp @@ -26,7 +26,6 @@ #include #include #include "cpu_emulation.h" -typedef unsigned long ULONG_PTR, *PULONG_PTR; // VC6 does not have this, Platform SDK has. // In case of errors, try to comment out, the needed diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 7d555c98c..45d50a7e5 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -283,10 +283,6 @@ int main(int argc, char **argv) QuitEmulator(); #endif - // FIXME: default to DIB driver - if (getenv("SDL_VIDEODRIVER") == NULL) - putenv("SDL_VIDEODRIVER=windib"); - // Initialize SDL system int sdl_flags = 0; #ifdef USE_SDL_VIDEO @@ -400,7 +396,7 @@ int main(int argc, char **argv) emul_thread = GetCurrentThread(); // SDL threads available, start 60Hz thread - tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL)) != NULL); + tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, "Redraw Thread", NULL)) != NULL); if (!tick_thread_active) { sprintf(str, GetString(STR_TICK_THREAD_ERR), strerror(errno)); ErrorAlert(str); @@ -410,7 +406,7 @@ int main(int argc, char **argv) // Start XPRAM watchdog thread memcpy(last_xpram, XPRAM, XPRAM_SIZE); - xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL)) != NULL); + xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, "XPRAM Thread", NULL)) != NULL); D(bug("XPRAM thread started\n")); // Start 68k and jump to ROM boot routine @@ -625,11 +621,21 @@ static int tick_func(void *arg) #ifdef USE_SDL_VIDEO #include +extern SDL_Window *sdl_window; HWND GetMainWindowHandle(void) { SDL_SysWMinfo wmInfo; SDL_VERSION(&wmInfo.version); - return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; + if (!sdl_window) { + return NULL; + } + if (!SDL_GetWindowWMInfo(sdl_window, &wmInfo)) { + return NULL; + } + if (wmInfo.subsystem != SDL_SYSWM_WINDOWS) { + return NULL; + } + return wmInfo.info.win.window; } #endif From 8874ba549fc234197cfc8772465aa9666cfd06b7 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 23 Jul 2017 21:05:08 -0400 Subject: [PATCH 109/534] added missing MSVC post-build script --- BasiliskII/src/Windows/BasiliskII_MSVC_PostBuild.bat | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 BasiliskII/src/Windows/BasiliskII_MSVC_PostBuild.bat diff --git a/BasiliskII/src/Windows/BasiliskII_MSVC_PostBuild.bat b/BasiliskII/src/Windows/BasiliskII_MSVC_PostBuild.bat new file mode 100644 index 000000000..54d63182a --- /dev/null +++ b/BasiliskII/src/Windows/BasiliskII_MSVC_PostBuild.bat @@ -0,0 +1,7 @@ +@echo off +set SOLUTION_DIR=%~1 +set PLATFORM=%~2 +set CONFIGURATION=%~3 +set CONFIGURATION=%CONFIGURATION: JIT=% +set OUT_DIR=%~4 +xcopy /y "%SOLUTION_DIR%%PLATFORM%\%CONFIGURATION%\SDL2.dll" "%OUT_DIR%" From eadd2951b739963c12cafa07721f743c727d7f08 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Wed, 26 Jul 2017 22:03:56 -0400 Subject: [PATCH 110/534] added gitignore settings for Jetbrains' IDEs --- .gitignore | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/.gitignore b/.gitignore index 8a9e32bb3..4c2030539 100644 --- a/.gitignore +++ b/.gitignore @@ -30,3 +30,8 @@ xcuserdata/ *.moved-aside *.xccheckout *.xcscmblueprint + +# +# JetBrains IDE settings +# +*.idea From e0cdbe2a305c39b9bb6ebce69cf446cce73203fc Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 1 Aug 2017 18:02:29 -0400 Subject: [PATCH 111/534] added "idlewait" support to SDL2 backend --- BasiliskII/src/SDL/prefs_sdl.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/BasiliskII/src/SDL/prefs_sdl.cpp b/BasiliskII/src/SDL/prefs_sdl.cpp index 577d1084b..c9d998167 100644 --- a/BasiliskII/src/SDL/prefs_sdl.cpp +++ b/BasiliskII/src/SDL/prefs_sdl.cpp @@ -30,6 +30,7 @@ // Platform-specific preferences items prefs_desc platform_prefs_items[] = { + {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {NULL, TYPE_END, false} // End of list }; From 251c185dcd892d7fd3dccc41fbdc87143f778db8 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Thu, 10 Aug 2017 10:57:58 -0400 Subject: [PATCH 112/534] renamed variables in SDL2 backend, for improved readability --- BasiliskII/src/SDL/video_sdl.cpp | 68 ++++++++++++++++---------------- 1 file changed, 34 insertions(+), 34 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 23f6efc87..7d0191143 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -130,10 +130,10 @@ static int keycode_table[256]; // X keycode -> Mac keycode translation tabl // SDL variables SDL_Window * sdl_window = NULL; // Wraps an OS-native window -static SDL_Surface * inner_sdl_surface = NULL; // Surface in guest-OS display format -static SDL_Surface * outer_sdl_surface = NULL; // Surface in host-OS display format +static SDL_Surface * host_surface = NULL; // Surface in host-OS display format +static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer -static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw outer_sdl_surface to +static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to static int screen_depth; // Depth of current screen //static SDL_Cursor *sdl_cursor; // Copy of Mac cursor static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table @@ -649,18 +649,18 @@ static void delete_sdl_video_surfaces() sdl_texture = NULL; } - if (inner_sdl_surface) { - if (inner_sdl_surface == outer_sdl_surface) { - outer_sdl_surface = NULL; + if (host_surface) { + if (host_surface == guest_surface) { + guest_surface = NULL; } - SDL_FreeSurface(inner_sdl_surface); - inner_sdl_surface = NULL; + SDL_FreeSurface(host_surface); + host_surface = NULL; } - if (outer_sdl_surface) { - SDL_FreeSurface(outer_sdl_surface); - outer_sdl_surface = NULL; + if (guest_surface) { + SDL_FreeSurface(guest_surface); + guest_surface = NULL; } } @@ -685,7 +685,7 @@ static void shutdown_sdl_video() static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) { - if (outer_sdl_surface) { + if (guest_surface) { delete_sdl_video_surfaces(); } @@ -746,61 +746,61 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } - SDL_assert(outer_sdl_surface == NULL); - SDL_assert(inner_sdl_surface == NULL); + SDL_assert(guest_surface == NULL); + SDL_assert(host_surface == NULL); switch (bpp) { case 8: - outer_sdl_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); + guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); break; case 16: - outer_sdl_surface = SDL_CreateRGBSurfaceWithFormat(0, width, height, 16, SDL_PIXELFORMAT_RGB565); + guest_surface = SDL_CreateRGBSurfaceWithFormat(0, width, height, 16, SDL_PIXELFORMAT_RGB565); break; case 32: - outer_sdl_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); - inner_sdl_surface = outer_sdl_surface; + guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + host_surface = guest_surface; break; default: printf("WARNING: An unsupported bpp of %d was used\n", bpp); break; } - if (!outer_sdl_surface) { + if (!guest_surface) { shutdown_sdl_video(); return NULL; } - if (!inner_sdl_surface) { - inner_sdl_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); - if (!inner_sdl_surface) { + if (!host_surface) { + host_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + if (!host_surface) { shutdown_sdl_video(); return NULL; } } - return outer_sdl_surface; + return guest_surface; } static int update_sdl_video() { - if (!sdl_renderer || !sdl_texture || !outer_sdl_surface) { + if (!sdl_renderer || !sdl_texture || !guest_surface) { printf("WARNING: A video mode does not appear to have been set.\n"); return -1; } - if (inner_sdl_surface != outer_sdl_surface && - inner_sdl_surface != NULL && - outer_sdl_surface != NULL) + if (host_surface != guest_surface && + host_surface != NULL && + guest_surface != NULL) { - SDL_Rect destRect = {0, 0, inner_sdl_surface->w, inner_sdl_surface->h}; - if (SDL_BlitSurface(outer_sdl_surface, NULL, inner_sdl_surface, &destRect) != 0) { + SDL_Rect destRect = {0, 0, host_surface->w, host_surface->h}; + if (SDL_BlitSurface(guest_surface, NULL, host_surface, &destRect) != 0) { return -1; } } - if (SDL_UpdateTexture(sdl_texture, NULL, inner_sdl_surface->pixels, inner_sdl_surface->pitch) != 0) { + if (SDL_UpdateTexture(sdl_texture, NULL, host_surface->pixels, host_surface->pitch) != 0) { return -1; } - SDL_Rect src_rect = {0, 0, inner_sdl_surface->w, inner_sdl_surface->h}; + SDL_Rect src_rect = {0, 0, host_surface->w, host_surface->h}; if (SDL_RenderCopy(sdl_renderer, sdl_texture, &src_rect, NULL) != 0) { return -1; } @@ -1884,7 +1884,7 @@ static void force_complete_window_refresh() static void scale_mouse_event_coordinates(void *userdata, SDL_Event * event) { - if (!inner_sdl_surface || !sdl_window) { + if (!host_surface || !sdl_window) { return; } @@ -1895,8 +1895,8 @@ static void scale_mouse_event_coordinates(void *userdata, SDL_Event * event) return; } - float scale_x = (float)inner_sdl_surface->w / (float)window_width; - float scale_y = (float)inner_sdl_surface->h / (float)window_height; + float scale_x = (float)host_surface->w / (float)window_width; + float scale_y = (float)host_surface->h / (float)window_height; switch (event->type) { case SDL_MOUSEBUTTONDOWN: From c6fefd0750f7c5df34013464e6c87cf98d93b77f Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Thu, 10 Aug 2017 12:31:41 -0400 Subject: [PATCH 113/534] fixed issue #1: SDL2 backend did not support 2 or 4 bit color, in guest OS --- BasiliskII/src/CrossPlatform/video_blit.cpp | 6 ++- BasiliskII/src/SDL/video_sdl.cpp | 48 ++++----------------- 2 files changed, 13 insertions(+), 41 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index 19e400fdd..c9c8e504b 100644 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -498,12 +498,16 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or #else const bool use_sdl_video = false; #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if REAL_ADDRESSING || DIRECT_ADDRESSING || USE_SDL_VIDEO if (mac_depth == 1 && !use_sdl_video && !visual_format.fullscreen) { // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; + } else if (mac_depth == 16) { + + Screen_blit = Blit_Copy_Raw; + } else { // Compute RGB shift values diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 7d0191143..660e26a4d 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -810,6 +810,12 @@ static int update_sdl_video() return 0; } +static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) +{ + // HACK, dludwig@pobox.com: for now, just update the whole screen + return update_sdl_video(); +} + void driver_base::set_video_mode(int flags) { int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); @@ -2061,43 +2067,6 @@ static void handle_events(void) // Static display update (fixed frame rate, but incremental) static void update_display_static(driver_base *drv) { - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - const VIDEO_MODE &mode = drv->mode; - - memcpy(the_buffer_copy, the_buffer, the_buffer_size); - - // HACK: Create a temporary surface, with which to use in color conversion - SDL_Surface * mid_surface = NULL; - switch (mode.depth) { - case VDEPTH_1BIT: { - const int pixels_per_byte = VIDEO_MODE_X / VIDEO_MODE_ROW_BYTES; - mid_surface = SDL_CreateRGBSurfaceFrom(the_buffer_copy, VIDEO_MODE_X, VIDEO_MODE_Y, 1, (VIDEO_MODE_X / pixels_per_byte), 1, 1, 1, 0); - } break; - - // Consider using Screen_blit, for other depths - - default: { - printf("WARNING: Unhandled depth mode in SDL backend: %s\n", NameOfDepth(mode.depth)); - } break; - } - - // Blit to screen surface - if (mid_surface) { - SDL_BlitSurface(mid_surface, NULL, drv->s, NULL); - SDL_FreeSurface(mid_surface); - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - update_sdl_video(); - -/* // Incremental update code int wide = 0, high = 0; uint32 x1, x2, y1, y2; @@ -2181,7 +2150,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); + update_sdl_video(drv->s, x1, y1, wide, high); } } else { @@ -2237,11 +2206,10 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); + update_sdl_video(drv->s, x1, y1, wide, high); } } } - */ } // Static display update (fixed frame rate, bounding boxes based) From 99f50637e1fbdcd6e2e8e3d3a910ff096e16920d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 12:01:34 -0400 Subject: [PATCH 114/534] possible fix for Issue #13: replace SDL_CreateRGBSurfaceWithFormat calls with older + backwards-compatible SDL_CreateRGBSurface calls --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 660e26a4d..e4bf0d888 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -753,7 +753,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); break; case 16: - guest_surface = SDL_CreateRGBSurfaceWithFormat(0, width, height, 16, SDL_PIXELFORMAT_RGB565); + guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); break; case 32: guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); From d871b70240ff19b9ddd33ae56926a335fb188965 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 12:28:10 -0400 Subject: [PATCH 115/534] fixed issue #12: make autotools test for SDL2 --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 2 ++ BasiliskII/src/CrossPlatform/vm_alloc.cpp | 2 ++ BasiliskII/src/Unix/configure.ac | 12 ++++++------ 3 files changed, 10 insertions(+), 6 deletions(-) mode change 100644 => 100755 BasiliskII/src/CrossPlatform/sigsegv.cpp mode change 100644 => 100755 BasiliskII/src/CrossPlatform/vm_alloc.cpp mode change 100644 => 100755 BasiliskII/src/Unix/configure.ac diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp old mode 100644 new mode 100755 index 6a7c6aaa5..f1322d1e7 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -31,7 +31,9 @@ #include #endif +#ifdef HAVE_CONFIG_H #include "config.h" +#endif #include #include diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp old mode 100644 new mode 100755 index a797579c2..005cb727c --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -19,7 +19,9 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +#ifdef HAVE_CONFIG_H #include "config.h" +#endif #ifdef HAVE_FCNTL_H #include diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac old mode 100644 new mode 100755 index c634da926..8e7b59f98 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -266,7 +266,7 @@ AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ fi fi saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL.framework/Headers" + CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL2.framework/Headers" AC_TRY_LINK( [$2 #undef main], [], @@ -295,15 +295,15 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ]) + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - PKG_CHECK_MODULES([sdl], [sdl >= 1.2], [ - CFLAGS="$CFLAGS $sdl_CFLAGS" - CXXFLAGS="$CXXFLAGS $sdl_CFLAGS" - LIBS="$LIBS $sdl_LIBS" + PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ + CFLAGS="$CFLAGS $sdl2_CFLAGS" + CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" + LIBS="$LIBS $sdl2_LIBS" ], [ WANT_SDL=no ]) From 09c100ff425435709addae2dda1b14a88f2e92e1 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 12:48:36 -0400 Subject: [PATCH 116/534] partial fix for issue #16: color is incorrect on Linux Thousands of Colors mode is still broken, however, Millions of Colors does work, which did not before this commit. --- BasiliskII/src/SDL/video_sdl.cpp | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) mode change 100644 => 100755 BasiliskII/src/SDL/video_sdl.cpp diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp old mode 100644 new mode 100755 index e4bf0d888..7655420d9 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -769,8 +769,24 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } if (!host_surface) { - host_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + Uint32 texture_format; + if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { + printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + int bpp; + Uint32 Rmask, Gmask, Bmask, Amask; + if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { + printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); if (!host_surface) { + printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); shutdown_sdl_video(); return NULL; } From 0a7640070ab0ac24ec913952902a5f82bb214697 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 13:45:15 -0400 Subject: [PATCH 117/534] finished fixing issue #16: fixed Thousands of Colors on Linux --- BasiliskII/src/CrossPlatform/video_blit.cpp | 2 ++ 1 file changed, 2 insertions(+) mode change 100644 => 100755 BasiliskII/src/CrossPlatform/video_blit.cpp diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp old mode 100644 new mode 100755 index c9c8e504b..5059e1e32 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -504,9 +504,11 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; +/* // dludwig@pobox.com, TODO: This works on OSX (64-bit, at least), but not Linux (32-bit?). Why? } else if (mac_depth == 16) { Screen_blit = Blit_Copy_Raw; +*/ } else { From 6600081b29e0d47c34777f96502e5b8b179cb510 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 13:56:36 -0400 Subject: [PATCH 118/534] build fix for OSX + Xcode --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 52bebbe5f..a7db92dbf 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -943,8 +943,9 @@ GCC_NO_COMMON_BLOCKS = YES; GCC_OPTIMIZATION_LEVEL = 0; GCC_PREPROCESSOR_DEFINITIONS = ( - "DEBUG=1", "$(inherited)", + HAVE_CONFIG_H, + DEBUG, ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; @@ -995,6 +996,10 @@ ENABLE_STRICT_OBJC_MSGSEND = YES; GCC_C_LANGUAGE_STANDARD = gnu99; GCC_NO_COMMON_BLOCKS = YES; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; From 53cadd7fd01f8b7e6bb45ae11f006bbb58dba4b7 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 13:57:11 -0400 Subject: [PATCH 119/534] restored OSX 'DEBUG' macro to DEBUG=1 --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index a7db92dbf..faec22df8 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -945,7 +945,7 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", HAVE_CONFIG_H, - DEBUG, + "DEBUG=1", ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; From 80a30aeca172ec0a9ee908be6cba20a02402d818 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:08:30 -0400 Subject: [PATCH 120/534] HACK fix for Issue #17: Thousands of Colors not working on OSX --- BasiliskII/src/CrossPlatform/video_blit.cpp | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index 5059e1e32..c6b3c12bc 100755 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -22,6 +22,10 @@ #include "video.h" #include "video_blit.h" +#if USE_SDL_VIDEO +#include +#endif + #include #include @@ -504,11 +508,14 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; -/* // dludwig@pobox.com, TODO: This works on OSX (64-bit, at least), but not Linux (32-bit?). Why? +#if __MACOSX__ + // dludwig@pobox.com, HACK: This works on OSX (64-bit, at least), but not Linux (32-bit?). Why? + // To note, __MACOSX__ is an SDL-declared macro (for platform identification at compile time). } else if (mac_depth == 16) { Screen_blit = Blit_Copy_Raw; -*/ + +#endif } else { From 0e5ce49f46a70f87e1c9db1d36c20d5ba73bdb62 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:26:54 -0400 Subject: [PATCH 121/534] fixed issue #9: maintain guest OS' aspect ratio, when in fullscreen --- BasiliskII/src/SDL/video_sdl.cpp | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 7655420d9..d016245fb 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -791,6 +791,13 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } } + + if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { + printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", + width, height, SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } return guest_surface; } @@ -801,6 +808,13 @@ static int update_sdl_video() printf("WARNING: A video mode does not appear to have been set.\n"); return -1; } + + // Make sure the display's internal (to SDL, possibly the OS) buffer gets + // cleared. Not doing so can, if and when letterboxing is applied (whereby + // colored bars are drawn on the screen's sides to help with aspect-ratio + // correction), the colored bars can be an unknown color. + SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black + SDL_RenderClear(sdl_renderer); // Clear the display if (host_surface != guest_surface && host_surface != NULL && From 9116cae2836aaefef0aed9fbdfe4ac28758e31c8 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:41:04 -0400 Subject: [PATCH 122/534] apply anti-aliasing where available and appropriate --- BasiliskII/src/SDL/video_sdl.cpp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index d016245fb..7effccb17 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -791,7 +791,8 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } } - + + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", width, height, SDL_GetError()); From f7fceaf096171b920b902cb0b46bc420ea3afbdd Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:44:09 -0400 Subject: [PATCH 123/534] fix Issue #18: 512x384 guest display leads to app exit-on-startup --- BasiliskII/src/SDL/video_sdl.cpp | 2 -- 1 file changed, 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 7effccb17..ebef5367a 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1294,8 +1294,6 @@ bool VideoInit(bool classic) const int h = video_modes[i].h; if (i > 0 && (w >= default_width || h >= default_height)) continue; - if (w == 512 && h == 384) - continue; for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); } From 2d035eb3e9286ef7b4aec17eb198df829af3c75d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:49:29 -0400 Subject: [PATCH 124/534] bug-fix: mouse cursor could get locked to top-left corner, when in fullscreen --- BasiliskII/src/SDL/video_sdl.cpp | 36 -------------------------------- 1 file changed, 36 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index ebef5367a..27a1d7221 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1917,38 +1917,6 @@ static void force_complete_window_refresh() * SDL event handling */ -static void scale_mouse_event_coordinates(void *userdata, SDL_Event * event) -{ - if (!host_surface || !sdl_window) { - return; - } - - int window_width = 0; - int window_height = 0; - SDL_GetWindowSize(sdl_window, &window_width, &window_height); - if (window_width == 0 || window_height == 0) { - return; - } - - float scale_x = (float)host_surface->w / (float)window_width; - float scale_y = (float)host_surface->h / (float)window_height; - - switch (event->type) { - case SDL_MOUSEBUTTONDOWN: - case SDL_MOUSEBUTTONUP: - event->button.x = (int)(event->button.x * scale_x); - event->button.y = (int)(event->button.y * scale_y); - break; - - case SDL_MOUSEMOTION: - event->motion.x = (int)(event->motion.x * scale_x); - event->motion.y = (int)(event->motion.y * scale_y); - event->motion.xrel = (int)(event->motion.xrel * scale_x); - event->motion.yrel = (int)(event->motion.yrel * scale_y); - break; - } -} - static void handle_events(void) { SDL_Event events[10]; @@ -1959,10 +1927,6 @@ static void handle_events(void) for (int i = 0; i < n_events; i++) { SDL_Event & event = events[i]; - // Make sure events with mouse coordinates get scaled, in case the Mac's - // display size is different than the host OS' window. - scale_mouse_event_coordinates(NULL, &events[i]); - switch (event.type) { // Mouse button From b9c968715359edafc8e3157f8dc5f8858acb7f0f Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 14:50:05 -0400 Subject: [PATCH 125/534] bug-fix: anti-aliasing not always working --- BasiliskII/src/SDL/video_sdl.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 27a1d7221..45e06da70 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -716,6 +716,9 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags delete_sdl_video_window(); } } + + // Apply anti-aliasing, if and when appropriate (usually in fullscreen) + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); if (!sdl_window) { sdl_window = SDL_CreateWindow( @@ -792,7 +795,6 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } } - SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", width, height, SDL_GetError()); From 6abc599ddfe0a7a33bd420094277bd78142f4e2b Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 14 Aug 2017 21:14:34 -0400 Subject: [PATCH 126/534] added code to help debug issue #6: made Win32 app show stdout and stderr, if and when it is run from a command prompt window --- BasiliskII/src/Windows/main_windows.cpp | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 45d50a7e5..9fa4e1c08 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -212,6 +212,13 @@ int main(int argc, char **argv) char str[256]; bool cd_boot = false; + // Make sure stdout and stderr gets displayed, if and when the app is run + // via a command prompt window. + if (AttachConsole(ATTACH_PARENT_PROCESS)) { + freopen("CONOUT$", "w", stdout); + freopen("CONOUT$", "w", stderr); + } + // Initialize variables RAMBaseHost = NULL; ROMBaseHost = NULL; From 109bc3979b989969fdfba947286c771623d6b69a Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 15 Aug 2017 21:41:59 -0400 Subject: [PATCH 127/534] implemented issue #7: output stdout and stderr to a log file; removed output redirection to win32 console, which was buggy --- BasiliskII/src/Windows/main_windows.cpp | 25 +++++++++++++++++++------ 1 file changed, 19 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 9fa4e1c08..f54e595af 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -212,12 +212,25 @@ int main(int argc, char **argv) char str[256]; bool cd_boot = false; - // Make sure stdout and stderr gets displayed, if and when the app is run - // via a command prompt window. - if (AttachConsole(ATTACH_PARENT_PROCESS)) { - freopen("CONOUT$", "w", stdout); - freopen("CONOUT$", "w", stderr); - } + // Redirect stdout and stderr to a log file, for diagnostic purposes. + // Unbuffered file IO will be used (setup via setvbuf() calls), so as + // to write log file data ASAP, lest it get lost in case of program + // termination. + wchar_t logFileName[4096]; + logFileName[0] = L'\0'; + _wgetcwd(logFileName, SDL_arraysize(logFileName)); + if (logFileName[0] != L'\0') { + SDL_wcslcat(logFileName, L"\\BasiliskII_log.txt", SDL_arraysize(logFileName)); + FILE * fp; + fp = _wfreopen(logFileName, L"w", stdout); + if (fp) { + setvbuf(stdout, NULL, _IONBF, 0); + } + fp = _wfreopen(logFileName, L"w", stderr); + if (fp) { + setvbuf(stderr, NULL, _IONBF, 0); + } + } // Initialize variables RAMBaseHost = NULL; From e49cd855c2e860cdada49e648c596fca903e5268 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 15 Aug 2017 21:47:45 -0400 Subject: [PATCH 128/534] made windowed-mode windows be resize-able/scale-able - guest OS display size is retained, though --- BasiliskII/src/SDL/video_sdl.cpp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 45e06da70..c2356ce38 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -703,6 +703,8 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; window_width = desktop_mode.w; window_height = desktop_mode.h; + } else { + window_flags |= SDL_WINDOW_RESIZABLE; } if (sdl_window) { From 5d4560c1a7a9cb05cda2d2a6e846ee44a2d94a23 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 19 Aug 2017 17:45:26 -0400 Subject: [PATCH 129/534] fixed issue #21, "BasiliskII, Win32: resizing a window does not stretch screen" --- BasiliskII/src/SDL/video_sdl.cpp | 37 +++++++++++++++++++++++++++++--- 1 file changed, 34 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index c2356ce38..7073908ff 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -133,6 +133,7 @@ SDL_Window * sdl_window = NULL; // Wraps an OS-native window static SDL_Surface * host_surface = NULL; // Surface in host-OS display format static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer +static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to static int screen_depth; // Depth of current screen //static SDL_Cursor *sdl_cursor; // Copy of Mac cursor @@ -165,6 +166,7 @@ static void (*video_refresh)(void); // Prototypes static int redraw_func(void *arg); static int update_sdl_video(); +static int present_sdl_video(); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -742,6 +744,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } + sdl_renderer_thread_id = SDL_ThreadID(); } SDL_assert(sdl_texture == NULL); @@ -807,13 +810,21 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return guest_surface; } -static int update_sdl_video() +static int present_sdl_video() { if (!sdl_renderer || !sdl_texture || !guest_surface) { printf("WARNING: A video mode does not appear to have been set.\n"); return -1; } + // Some systems, such as D3D9, can fail if and when they are used across + // certain operations. To address this, only utilize SDL_Renderer in a + // single thread, preferably the main thread. + // + // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 + // "BasiliskII, Win32: resizing a window does not stretch " + SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); + // Make sure the display's internal (to SDL, possibly the OS) buffer gets // cleared. Not doing so can, if and when letterboxing is applied (whereby // colored bars are drawn on the screen's sides to help with aspect-ratio @@ -845,10 +856,28 @@ static int update_sdl_video() return 0; } +static int update_sdl_video() +{ + // HACK, dludwig@pobox.com: for now, just update the whole screen, via + // VideoInterrupt(), which gets called on the main thread. + // + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + // + // TODO: cache rects to update, then use rects in present_sdl_video() + return 0; +} + static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) { - // HACK, dludwig@pobox.com: for now, just update the whole screen - return update_sdl_video(); + // HACK, dludwig@pobox.com: for now, just update the whole screen, via + // VideoInterrupt(), which gets called on the main thread. + // + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + // + // TODO: cache rects to update, then use rects in present_sdl_video() + return 0; } void driver_base::set_video_mode(int flags) @@ -1518,6 +1547,8 @@ void VideoInterrupt(void) if (toggle_fullscreen) do_toggle_fullscreen(); + present_sdl_video(); + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; From 7767f128e56e4dc73ffa6bee8d0f38bf40bc3ef7 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Wed, 23 Aug 2017 20:52:30 -0400 Subject: [PATCH 130/534] fixed issue #19: on OS X, display can slide around if initial clicks are near top of screen --- BasiliskII/src/MacOSX/utils_macosx.mm | 16 ++++ BasiliskII/src/SDL/video_sdl.cpp | 107 ++++++++++++++++++++------ 2 files changed, 101 insertions(+), 22 deletions(-) diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index 4dd359b2b..c047e2752 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -20,6 +20,7 @@ #include #include "utils_macosx.h" +#include // This is used from video_sdl.cpp. void NSAutoReleasePool_wrap(void (*fn)(void)) @@ -40,3 +41,18 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { } } +bool is_fullscreen_osx(SDL_Window * window) +{ + if (!window) { + return false; + } + + SDL_SysWMinfo wmInfo; + SDL_VERSION(&wmInfo.version); + if (!SDL_GetWindowWMInfo(window, &wmInfo)) { + return false; + } + + const NSWindowStyleMask styleMask = [wmInfo.info.cocoa.window styleMask]; + return (styleMask & NSWindowStyleMaskFullScreen) != 0; +} diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 7073908ff..eb55d559b 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -140,6 +140,7 @@ static int screen_depth; // Depth of current screen static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors static bool toggle_fullscreen = false; +static bool did_add_event_watch = false; static bool mouse_grabbed = false; @@ -167,6 +168,7 @@ static void (*video_refresh)(void); static int redraw_func(void *arg); static int update_sdl_video(); static int present_sdl_video(); +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -695,7 +697,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags int window_height = height; Uint32 window_flags = 0; const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; - + if (flags & SDL_WINDOW_FULLSCREEN) { SDL_DisplayMode desktop_mode; if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { @@ -705,8 +707,6 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; window_width = desktop_mode.w; window_height = desktop_mode.h; - } else { - window_flags |= SDL_WINDOW_RESIZABLE; } if (sdl_window) { @@ -724,6 +724,10 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags // Apply anti-aliasing, if and when appropriate (usually in fullscreen) SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); + // Always use a resize-able window. This helps allow SDL to manage + // transitions involving fullscreen to or from windowed-mode. + window_flags |= SDL_WINDOW_RESIZABLE; + if (!sdl_window) { sdl_window = SDL_CreateWindow( "Basilisk II", @@ -737,6 +741,14 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } } + + // Some SDL events (regarding some native-window events), need processing + // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which + // allows events to be processed as they are generated. + if (!did_add_event_watch) { + SDL_AddEventWatch(&on_sdl_event_generated, NULL); + did_add_event_watch = true; + } if (!sdl_renderer) { sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); @@ -1041,11 +1053,11 @@ void driver_base::restore_mouse_accel(void) // Toggle mouse grab void driver_base::toggle_mouse_grab(void) { - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); + } // Grab mouse, switch to relative mouse mode void driver_base::grab_mouse(void) @@ -1470,14 +1482,18 @@ static void do_toggle_fullscreen(void) int x, y; SDL_GetMouseState(&x, &y); - // save the screen contents - SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, - drv->s->flags); + // Apply fullscreen + if (sdl_window) { + if (display_type == DISPLAY_SCREEN) { + display_type = DISPLAY_WINDOW; + SDL_SetWindowFullscreen(sdl_window, 0); + } else { + display_type = DISPLAY_SCREEN; + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); + } + } // switch modes - display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW - : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); drv->adapt_to_video_mode(); // reset the palette @@ -1486,11 +1502,6 @@ static void do_toggle_fullscreen(void) #endif drv->update_palette(); - // restore the screen contents - SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); - SDL_FreeSurface(tmp_surface); - update_sdl_video(); - // reset the video refresh handler VideoRefreshInit(); @@ -1499,7 +1510,7 @@ static void do_toggle_fullscreen(void) // restore the mouse position SDL_WarpMouseGlobal(x, y); - + // resume redraw thread toggle_fullscreen = false; #ifndef USE_CPU_EMUL_SERVICES @@ -1514,6 +1525,26 @@ static void do_toggle_fullscreen(void) /* * Execute video VBL routine */ + +static bool is_fullscreen(SDL_Window * window) +{ +#ifdef __MACOSX__ + // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always + // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. + // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which + // involves fullscreen/windowed toggles via window-manager UI controls). + // Until it does, or adds a facility to do so, we'll use a platform-specific + // code path to detect fullscreen changes. + extern bool is_fullscreen_osx(SDL_Window * window); + return is_fullscreen_osx(sdl_window); +#else + if (!window) { + return false; + } + const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); + return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; +#endif +} #ifdef SHEEPSHAVER void VideoVBL(void) @@ -1952,6 +1983,38 @@ static void force_complete_window_refresh() * SDL event handling */ +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) +{ + switch (event->type) { + case SDL_WINDOWEVENT: { + switch (event->window.event) { + case SDL_WINDOWEVENT_RESIZED: { + // Handle changes of fullscreen. This is done here, in + // on_sdl_event_generated() and not the main SDL_Event-processing + // loop, in order to perform this change on the main thread. + // (Some os'es UI APIs, such as OSX's NSWindow, are not + // thread-safe.) + const bool is_full = is_fullscreen(sdl_window); + const bool adjust_fullscreen = \ + (display_type == DISPLAY_WINDOW && is_full) || + (display_type == DISPLAY_SCREEN && !is_full); + if (adjust_fullscreen) { + do_toggle_fullscreen(); + if (is_fullscreen(sdl_window)) { + SDL_SetRelativeMouseMode(SDL_TRUE); + } else { + SDL_SetRelativeMouseMode(SDL_FALSE); + } + } + } break; + } + } break; + } + + return 1; // return 1 to add event to queue, 0 to drop it +} + + static void handle_events(void) { SDL_Event events[10]; @@ -1961,7 +2024,7 @@ static void handle_events(void) while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { for (int i = 0; i < n_events; i++) { SDL_Event & event = events[i]; - + switch (event.type) { // Mouse button @@ -2072,7 +2135,7 @@ static void handle_events(void) case SDL_WINDOWEVENT_RESTORED: force_complete_window_refresh(); break; - + } break; } From 3bae0bbda9aee6516a994ea13d6408eaacecb602 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Wed, 23 Aug 2017 20:56:54 -0400 Subject: [PATCH 131/534] commented on use of SDL_SetRelativeMouseMode --- BasiliskII/src/SDL/video_sdl.cpp | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index eb55d559b..31da853aa 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -2000,6 +2000,11 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) (display_type == DISPLAY_SCREEN && !is_full); if (adjust_fullscreen) { do_toggle_fullscreen(); + + // Utilizing SDL2's 'relative mouse mode', when in fullscreen, + // fixes an issue on OSX hosts whereby a fullscreen window + // can, in some cases, be dragged around. + // ( https://github.com/DavidLudwig/macemu/issues/19 ) if (is_fullscreen(sdl_window)) { SDL_SetRelativeMouseMode(SDL_TRUE); } else { From e55df3de9641b4686c4e5e05fb3917bf432d22a8 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Fri, 25 Aug 2017 17:01:31 -0400 Subject: [PATCH 132/534] build SheepShaver against SDL2, when using its Xcode 8 project file --- BasiliskII/src/SDL/video_sdl.cpp | 22 +--- .../project.pbxproj | 121 ++++++++++++++++-- SheepShaver/src/Unix/main_unix.cpp | 11 ++ 3 files changed, 120 insertions(+), 34 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 31da853aa..babc17504 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -136,7 +136,7 @@ static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to static int screen_depth; // Depth of current screen -//static SDL_Cursor *sdl_cursor; // Copy of Mac cursor +static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors static bool toggle_fullscreen = false; @@ -1728,25 +1728,7 @@ bool video_can_change_cursor(void) if (display_type != DISPLAY_WINDOW) return false; -#if defined(__APPLE__) - static char driver[] = "Quartz?"; - static int quartzok = -1; - - if (quartzok < 0) { - if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) - quartzok = true; - else { - // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. - const SDL_version *vp = SDL_Linked_Version(); - int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); - quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); - } - } - - return quartzok; -#else return true; -#endif } #endif @@ -1781,7 +1763,7 @@ void video_set_cursor(void) if (visible) { int x, y; SDL_GetMouseState(&x, &y); - SDL_WarpMouse(x, y); + SDL_WarpMouseGlobal(x, y); } } } diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index bdde7b99b..61a7539c3 100644 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -31,7 +31,6 @@ 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */; }; 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; - 0846E65414B513CE00574779 /* SDL.framework in Copy Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D17414A9A1A2000B1711 /* SDL.framework */; }; 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4B14A99EEF000B1711 /* adb.cpp */; }; 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4C14A99EEF000B1711 /* audio.cpp */; }; 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7814A99EEF000B1711 /* cdrom.cpp */; }; @@ -54,7 +53,6 @@ 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */; }; 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8E14A99EF0000B1711 /* scsi.cpp */; }; 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */; }; - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9314A99EF0000B1711 /* SDLMain.m */; }; 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9414A99EF0000B1711 /* video_sdl.cpp */; }; 0856D06614A99EF1000B1711 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9514A99EF0000B1711 /* serial.cpp */; }; 0856D06714A99EF1000B1711 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9714A99EF0000B1711 /* bootp.c */; }; @@ -94,7 +92,6 @@ 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7714A99EF0000B1711 /* user_strings.cpp */; }; 0856D11814A99EF1000B1711 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7814A99EF0000B1711 /* video.cpp */; }; 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CFC014A99EF0000B1711 /* xpram.cpp */; }; - 0856D17514A9A1A2000B1711 /* SDL.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D17414A9A1A2000B1711 /* SDL.framework */; }; 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D21414A9A6C6000B1711 /* IOKit.framework */; }; 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */; }; 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856D31214A9A704000B1711 /* VMSettingsController.mm */; }; @@ -105,6 +102,8 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */; }; + 7539EDF51F50C40100454E81 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539EDE91F50C3D600454E81 /* SDL2.framework */; }; + 7539EDF61F50C40100454E81 /* SDL2.framework in Copy Frameworks */ = {isa = PBXBuildFile; fileRef = 7539EDE91F50C3D600454E81 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; /* End PBXBuildFile section */ @@ -123,6 +122,41 @@ remoteGlobalIDString = 0846E49914B124DE00574779; remoteInfo = kpx_cpu; }; + 7539EDE81F50C3D600454E81 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF66C0761BA81005FE872; + remoteInfo = Framework; + }; + 7539EDEA1F50C3D600454E81 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF6B30761BA81005FE872; + remoteInfo = "Static Library"; + }; + 7539EDEC1F50C3D600454E81 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = DB31407717554B71006C0E22; + remoteInfo = "Shared Library"; + }; + 7539EDEE1F50C3D600454E81 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = BECDF6BE0761BA81005FE872; + remoteInfo = "Standard DMG"; + }; + 7539EDF71F50C40100454E81 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + proxyType = 1; + remoteGlobalIDString = BECDF5FE0761BA81005FE872; + remoteInfo = Framework; + }; /* End PBXContainerItemProxy section */ /* Begin PBXCopyFilesBuildPhase section */ @@ -132,7 +166,7 @@ dstPath = ""; dstSubfolderSpec = 10; files = ( - 0846E65414B513CE00574779 /* SDL.framework in Copy Frameworks */, + 7539EDF61F50C40100454E81 /* SDL2.framework in Copy Frameworks */, ); name = "Copy Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -276,8 +310,6 @@ 0856CE8E14A99EF0000B1711 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = SOURCE_ROOT; }; 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; 0856CE9114A99EF0000B1711 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 0856CE9214A99EF0000B1711 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; - 0856CE9314A99EF0000B1711 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; 0856CE9414A99EF0000B1711 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; 0856CE9514A99EF0000B1711 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = SOURCE_ROOT; }; 0856CE9714A99EF0000B1711 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = bootp.c; sourceTree = ""; }; @@ -348,7 +380,6 @@ 0856CF7714A99EF0000B1711 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = SOURCE_ROOT; }; 0856CF7814A99EF0000B1711 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = SOURCE_ROOT; }; 0856CFC014A99EF0000B1711 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = SOURCE_ROOT; }; - 0856D17414A9A1A2000B1711 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = /Library/Frameworks/SDL.framework; sourceTree = ""; }; 0856D21414A9A6C6000B1711 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = /System/Library/Frameworks/IOKit.framework; sourceTree = ""; }; 0856D30814A9A704000B1711 /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMSettingsWindow.nib; sourceTree = ""; }; 0856D31114A9A704000B1711 /* VMSettingsController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = VMSettingsController.h; sourceTree = ""; }; @@ -377,6 +408,7 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 08D93A15159FE174003B04EC /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; name = SDL.xcodeproj; path = ../../../external/SDL/Xcode/SDL/SDL.xcodeproj; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; /* End PBXFileReference section */ @@ -400,10 +432,10 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( - 0856D17514A9A1A2000B1711 /* SDL.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, + 7539EDF51F50C40100454E81 /* SDL2.framework in Frameworks */, ); runOnlyForDeploymentPostprocessing = 0; }; @@ -435,6 +467,7 @@ 0856CCAC14A99DE0000B1711 = { isa = PBXGroup; children = ( + 7539EDE01F50C3BE00454E81 /* external */, 0856CCC814A99E30000B1711 /* Sources */, 08CD42DF14B7B865009CA2A2 /* Frameworks */, 0856CCC214A99E1C000B1711 /* Products */, @@ -735,8 +768,6 @@ children = ( 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */, 0856CE9114A99EF0000B1711 /* keycodes */, - 0856CE9214A99EF0000B1711 /* SDLMain.h */, - 0856CE9314A99EF0000B1711 /* SDLMain.m */, 0856CE9414A99EF0000B1711 /* video_sdl.cpp */, ); name = SDL; @@ -872,11 +903,29 @@ 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, 0856D21414A9A6C6000B1711 /* IOKit.framework */, - 0856D17414A9A1A2000B1711 /* SDL.framework */, ); name = Frameworks; sourceTree = ""; }; + 7539EDE01F50C3BE00454E81 /* external */ = { + isa = PBXGroup; + children = ( + 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */, + ); + name = external; + sourceTree = ""; + }; + 7539EDE21F50C3D600454E81 /* Products */ = { + isa = PBXGroup; + children = ( + 7539EDE91F50C3D600454E81 /* SDL2.framework */, + 7539EDEB1F50C3D600454E81 /* libSDL2.a */, + 7539EDED1F50C3D600454E81 /* libSDL2.dylib */, + 7539EDEF1F50C3D600454E81 /* Standard DMG */, + ); + name = Products; + sourceTree = ""; + }; /* End PBXGroup section */ /* Begin PBXHeadersBuildPhase section */ @@ -947,6 +996,7 @@ dependencies = ( 0846E4A714B1253500574779 /* PBXTargetDependency */, 082AC26814AA5A4800071F5E /* PBXTargetDependency */, + 7539EDF81F50C40100454E81 /* PBXTargetDependency */, ); name = SheepShaver; productName = SheepShaver; @@ -974,6 +1024,12 @@ mainGroup = 0856CCAC14A99DE0000B1711; productRefGroup = 0856CCC214A99E1C000B1711 /* Products */; projectDirPath = ""; + projectReferences = ( + { + ProductGroup = 7539EDE21F50C3D600454E81 /* Products */; + ProjectRef = 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */; + }, + ); projectRoot = ""; targets = ( 0856CCC014A99E1C000B1711 /* SheepShaver */, @@ -983,6 +1039,37 @@ }; /* End PBXProject section */ +/* Begin PBXReferenceProxy section */ + 7539EDE91F50C3D600454E81 /* SDL2.framework */ = { + isa = PBXReferenceProxy; + fileType = wrapper.framework; + path = SDL2.framework; + remoteRef = 7539EDE81F50C3D600454E81 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 7539EDEB1F50C3D600454E81 /* libSDL2.a */ = { + isa = PBXReferenceProxy; + fileType = archive.ar; + path = libSDL2.a; + remoteRef = 7539EDEA1F50C3D600454E81 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 7539EDED1F50C3D600454E81 /* libSDL2.dylib */ = { + isa = PBXReferenceProxy; + fileType = "compiled.mach-o.dylib"; + path = libSDL2.dylib; + remoteRef = 7539EDEC1F50C3D600454E81 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 7539EDEF1F50C3D600454E81 /* Standard DMG */ = { + isa = PBXReferenceProxy; + fileType = "compiled.mach-o.executable"; + path = "Standard DMG"; + remoteRef = 7539EDEE1F50C3D600454E81 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; +/* End PBXReferenceProxy section */ + /* Begin PBXResourcesBuildPhase section */ 0856CCBD14A99E1C000B1711 /* Resources */ = { isa = PBXResourcesBuildPhase; @@ -1096,7 +1183,6 @@ 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */, 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */, 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, 0856D06714A99EF1000B1711 /* bootp.c in Sources */, @@ -1161,6 +1247,11 @@ target = 0846E49914B124DE00574779 /* kpx_cpu */; targetProxy = 0846E4A614B1253500574779 /* PBXContainerItemProxy */; }; + 7539EDF81F50C40100454E81 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + name = Framework; + targetProxy = 7539EDF71F50C40100454E81 /* PBXContainerItemProxy */; + }; /* End PBXTargetDependency section */ /* Begin PBXVariantGroup section */ @@ -1337,7 +1428,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, ../Unix, ../MacOSX/Launcher, @@ -1350,6 +1441,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.6; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; @@ -1394,7 +1486,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, ../Unix, ../MacOSX/Launcher, @@ -1408,6 +1500,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.6; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 3d0ee43ec..a99e5b53a 100644 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -754,6 +754,17 @@ int main(int argc, char **argv) } break; } + +#if defined(__APPLE__) && defined(__MACH__) + // Mac OS X likes to pass in various options of its own, when launching an app. + // Attempt to ignore these. + const char * mac_psn_prefix = "-psn_"; + if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { + argv[i] = NULL; + } else if (strncmp(mac_psn_prefix, argv[i], strlen(mac_psn_prefix)) == 0) { + argv[i] = NULL; + } +#endif } // Remove processed arguments From eb36b341065aa15279d7935c1c0e4507117ea485 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Fri, 25 Aug 2017 17:19:36 -0400 Subject: [PATCH 133/534] Sheepshaver: misc, runtime fixes on OSX hosts --- BasiliskII/src/SDL/video_sdl.cpp | 2 ++ SheepShaver/src/Unix/main_unix.cpp | 29 ++++++++++++++++++----------- 2 files changed, 20 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index babc17504..e3797e98b 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1555,6 +1555,8 @@ void VideoVBL(void) if (toggle_fullscreen) do_toggle_fullscreen(); + + present_sdl_video(); // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index a99e5b53a..e9da908f9 100644 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -729,7 +729,25 @@ int main(int argc, char **argv) #endif // Parse command line arguments + +#if defined(__APPLE__) && defined(__MACH__) + // Mac OS X likes to pass in various options of its own, when launching an app. + // Attempt to ignore these. + for (int i=1; i Date: Sun, 27 Aug 2017 17:05:02 -0400 Subject: [PATCH 134/534] fixed issue #14: Basilisk II: make Xcode generate UAE's CPU-emulation sources at build-time --- .../BasiliskII.xcodeproj/project.pbxproj | 366 +- .../src/MacOSX/run_build68k_for_xcode.sh | 33 + BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh | 33 + BasiliskII/src/uae_cpu/cpuemu.cpp | 45296 ---------------- BasiliskII/src/uae_cpu/cpuemu_nf.cpp | 2 - BasiliskII/src/uae_cpu/cpustbl.cpp | 8720 --- BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 - BasiliskII/src/uae_cpu/cputbl.h | 4322 -- BasiliskII/src/uae_cpu/defs68k.c | 185 - BasiliskII/src/uae_cpu/osx_generate_files.sh | 22 - 10 files changed, 408 insertions(+), 58573 deletions(-) create mode 100755 BasiliskII/src/MacOSX/run_build68k_for_xcode.sh create mode 100755 BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh delete mode 100644 BasiliskII/src/uae_cpu/cpuemu.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpustbl.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cputbl.h delete mode 100644 BasiliskII/src/uae_cpu/defs68k.c delete mode 100755 BasiliskII/src/uae_cpu/osx_generate_files.sh diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index faec22df8..a881f4558 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -13,6 +13,16 @@ 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; }; 752F27151F251B5C001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + 753252E91F535A0C0024025B /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252E51F5359040024025B /* build68k.c */; }; + 753252EE1F535DD10024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; + 753253021F535F210024025B /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = 753253011F535F210024025B /* gencpu.c */; }; + 753253151F5363400024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; + 753253201F53650F0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; + 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; + 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; + 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -52,7 +62,6 @@ 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; - 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539E1A31F23B25A006B2DF2 /* table68k in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0D11F23B25A006B2DF2 /* table68k */; }; 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; @@ -94,11 +103,6 @@ 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */; }; - 7539E2A51F23CB9B006B2DF2 /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */; }; - 7539E2A61F23CB9B006B2DF2 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */; }; - 7539E2A71F23CB9B006B2DF2 /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */; }; - 7539E2A81F23CB9B006B2DF2 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */; }; - 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2A41F23CB9B006B2DF2 /* defs68k.c */; }; 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; @@ -140,6 +144,34 @@ remoteGlobalIDString = BECDF5FE0761BA81005FE872; remoteInfo = Framework; }; + 7532530B1F53611F0024025B /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 753252D91F5358D30024025B; + remoteInfo = build68k; + }; + 7532531A1F5364030024025B /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 753252F21F535E1E0024025B; + remoteInfo = gencpu; + }; + 7532531C1F53640B0024025B /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 753253071F5360E30024025B; + remoteInfo = RunBuild68k; + }; + 7532531E1F5364170024025B /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 753253161F5363D20024025B; + remoteInfo = RunGencpu; + }; /* End PBXContainerItemProxy section */ /* Begin PBXCopyFilesBuildPhase section */ @@ -154,6 +186,24 @@ name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; }; + 753252D81F5358D30024025B /* CopyFiles */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = /usr/share/man/man1/; + dstSubfolderSpec = 0; + files = ( + ); + runOnlyForDeploymentPostprocessing = 1; + }; + 753252F11F535E1E0024025B /* CopyFiles */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = /usr/share/man/man1/; + dstSubfolderSpec = 0; + files = ( + ); + runOnlyForDeploymentPostprocessing = 1; + }; /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ @@ -162,6 +212,16 @@ 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; 752F27051F251B4A001032B4 /* SDL.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; name = SDL.xcodeproj; path = ../../../external/SDL/Xcode/SDL/SDL.xcodeproj; sourceTree = ""; }; + 753252DA1F5358D30024025B /* build68k */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = build68k; sourceTree = BUILT_PRODUCTS_DIR; }; + 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; + 753252ED1F535DD10024025B /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = build68k_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; + 753252F31F535E1E0024025B /* gencpu */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = gencpu; sourceTree = BUILT_PRODUCTS_DIR; }; + 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; + 7532532C1F5368370024025B /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532E1F5368370024025B /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl_nf.cpp; path = gencpu_output/cpustbl_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; @@ -312,11 +372,6 @@ 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_uae.cpp; sourceTree = ""; }; - 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpuemu_nf.cpp; sourceTree = ""; }; - 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpuemu.cpp; sourceTree = ""; }; - 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpustbl_nf.cpp; sourceTree = ""; }; - 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cpustbl.cpp; sourceTree = ""; }; - 7539E2A41F23CB9B006B2DF2 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = defs68k.c; sourceTree = ""; }; 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; @@ -324,6 +379,20 @@ /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ + 753252D71F5358D30024025B /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; + 753252F01F535E1E0024025B /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; 7539DFAF1F23B17E006B2DF2 /* Frameworks */ = { isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; @@ -367,10 +436,40 @@ name = Products; sourceTree = ""; }; + 753252FF1F535E5D0024025B /* generated src */ = { + isa = PBXGroup; + children = ( + 753253001F535E840024025B /* build68k output */, + 7532532B1F53675E0024025B /* gencpu output */, + ); + name = "generated src"; + sourceTree = ""; + }; + 753253001F535E840024025B /* build68k output */ = { + isa = PBXGroup; + children = ( + 753252ED1F535DD10024025B /* defs68k.c */, + ); + name = "build68k output"; + sourceTree = ""; + }; + 7532532B1F53675E0024025B /* gencpu output */ = { + isa = PBXGroup; + children = ( + 7532532C1F5368370024025B /* cpuemu_nf.cpp */, + 7532532D1F5368370024025B /* cpuemu.cpp */, + 7532532E1F5368370024025B /* cpustbl_nf.cpp */, + 7532532F1F5368370024025B /* cpustbl.cpp */, + 753253301F5368370024025B /* cputbl.h */, + ); + name = "gencpu output"; + sourceTree = ""; + }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; children = ( 7539E1E41F23B25E006B2DF2 /* src */, + 753252FF1F535E5D0024025B /* generated src */, 752F27041F251B27001032B4 /* external */, 7539DFB41F23B17E006B2DF2 /* Assets */, 7539DFB31F23B17E006B2DF2 /* Products */, @@ -382,9 +481,12 @@ isa = PBXGroup; children = ( 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, + 753252DA1F5358D30024025B /* build68k */, + 753252F31F535E1E0024025B /* gencpu */, ); name = Products; - sourceTree = ""; + path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; + sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFB41F23B17E006B2DF2 /* Assets */ = { isa = PBXGroup; @@ -492,14 +594,11 @@ isa = PBXGroup; children = ( 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, + 753252E51F5359040024025B /* build68k.c */, 7539E0A81F23B25A006B2DF2 /* compiler */, 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, - 7539E2A01F23CB9B006B2DF2 /* cpuemu_nf.cpp */, - 7539E2A11F23CB9B006B2DF2 /* cpuemu.cpp */, - 7539E2A21F23CB9B006B2DF2 /* cpustbl_nf.cpp */, - 7539E2A31F23CB9B006B2DF2 /* cpustbl.cpp */, - 7539E2A41F23CB9B006B2DF2 /* defs68k.c */, 7539E0B31F23B25A006B2DF2 /* fpu */, + 753253011F535F210024025B /* gencpu.c */, 7539E0C81F23B25A006B2DF2 /* m68k.h */, 7539E0C91F23B25A006B2DF2 /* memory.cpp */, 7539E0CA1F23B25A006B2DF2 /* memory.h */, @@ -669,7 +768,75 @@ }; /* End PBXGroup section */ +/* Begin PBXLegacyTarget section */ + 753253071F5360E30024025B /* run_build68k */ = { + isa = PBXLegacyTarget; + buildArgumentsString = "$(ACTION)"; + buildConfigurationList = 753253081F5360E30024025B /* Build configuration list for PBXLegacyTarget "run_build68k" */; + buildPhases = ( + ); + buildToolPath = "$(PROJECT_DIR)/run_build68k_for_xcode.sh"; + buildWorkingDirectory = ""; + dependencies = ( + 7532530C1F53611F0024025B /* PBXTargetDependency */, + ); + name = run_build68k; + passBuildSettingsInEnvironment = 1; + productName = RunBuild68k; + }; + 753253161F5363D20024025B /* run_gencpu */ = { + isa = PBXLegacyTarget; + buildArgumentsString = "$(ACTION)"; + buildConfigurationList = 753253171F5363D20024025B /* Build configuration list for PBXLegacyTarget "run_gencpu" */; + buildPhases = ( + ); + buildToolPath = "$(PROJECT_DIR)/run_gencpu_for_xcode.sh"; + buildWorkingDirectory = ""; + dependencies = ( + 7532531B1F5364030024025B /* PBXTargetDependency */, + ); + name = run_gencpu; + passBuildSettingsInEnvironment = 1; + productName = RunGencpu; + }; +/* End PBXLegacyTarget section */ + /* Begin PBXNativeTarget section */ + 753252D91F5358D30024025B /* build68k */ = { + isa = PBXNativeTarget; + buildConfigurationList = 753252E31F5358D30024025B /* Build configuration list for PBXNativeTarget "build68k" */; + buildPhases = ( + 753252D61F5358D30024025B /* Sources */, + 753252D71F5358D30024025B /* Frameworks */, + 753252D81F5358D30024025B /* CopyFiles */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = build68k; + productName = build68k; + productReference = 753252DA1F5358D30024025B /* build68k */; + productType = "com.apple.product-type.tool"; + }; + 753252F21F535E1E0024025B /* gencpu */ = { + isa = PBXNativeTarget; + buildConfigurationList = 753252F71F535E1E0024025B /* Build configuration list for PBXNativeTarget "gencpu" */; + buildPhases = ( + 753252EF1F535E1E0024025B /* Sources */, + 753252F01F535E1E0024025B /* Frameworks */, + 753252F11F535E1E0024025B /* CopyFiles */, + ); + buildRules = ( + ); + dependencies = ( + 7532531D1F53640B0024025B /* PBXTargetDependency */, + ); + name = gencpu; + productName = gencpu; + productReference = 753252F31F535E1E0024025B /* gencpu */; + productType = "com.apple.product-type.tool"; + }; 7539DFB11F23B17E006B2DF2 /* BasiliskII */ = { isa = PBXNativeTarget; buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; @@ -683,6 +850,7 @@ buildRules = ( ); dependencies = ( + 7532531F1F5364170024025B /* PBXTargetDependency */, 752F27171F251B5C001032B4 /* PBXTargetDependency */, ); name = BasiliskII; @@ -698,6 +866,22 @@ attributes = { LastUpgradeCheck = 0830; TargetAttributes = { + 753252D91F5358D30024025B = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; + 753252F21F535E1E0024025B = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; + 753253071F5360E30024025B = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; + 753253161F5363D20024025B = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; 7539DFB11F23B17E006B2DF2 = { CreatedOnToolsVersion = 8.3.3; ProvisioningStyle = Automatic; @@ -729,6 +913,10 @@ projectRoot = ""; targets = ( 7539DFB11F23B17E006B2DF2 /* BasiliskII */, + 753252D91F5358D30024025B /* build68k */, + 753252F21F535E1E0024025B /* gencpu */, + 753253071F5360E30024025B /* run_build68k */, + 753253161F5363D20024025B /* run_gencpu */, ); }; /* End PBXProject section */ @@ -816,11 +1004,29 @@ ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "echo Hello World"; + shellScript = "# ${PROJECT_DIR}/generate_cpu_srcs_for_xcode.sh"; }; /* End PBXShellScriptBuildPhase section */ /* Begin PBXSourcesBuildPhase section */ + 753252D61F5358D30024025B /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 753252E91F535A0C0024025B /* build68k.c in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; + 753252EF1F535E1E0024025B /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 753253021F535F210024025B /* gencpu.c in Sources */, + 753253201F53650F0024025B /* readcpu.cpp in Sources */, + 753253151F5363400024025B /* defs68k.c in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; 7539DFAE1F23B17E006B2DF2 /* Sources */ = { isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; @@ -830,17 +1036,18 @@ 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, + 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */, + 753252EE1F535DD10024025B /* defs68k.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, - 7539E2A81F23CB9B006B2DF2 /* cpustbl.cpp in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, - 7539E2A71F23CB9B006B2DF2 /* cpustbl_nf.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 7539E1A21F23B25A006B2DF2 /* readcpu.cpp in Sources */, + 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, + 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, @@ -848,16 +1055,16 @@ 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, - 7539E2A61F23CB9B006B2DF2 /* cpuemu.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, - 7539E2A51F23CB9B006B2DF2 /* cpuemu_nf.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, @@ -869,7 +1076,6 @@ 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, - 7539E2A91F23CB9B006B2DF2 /* defs68k.c in Sources */, 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, @@ -897,6 +1103,26 @@ name = Framework; targetProxy = 752F27161F251B5C001032B4 /* PBXContainerItemProxy */; }; + 7532530C1F53611F0024025B /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 753252D91F5358D30024025B /* build68k */; + targetProxy = 7532530B1F53611F0024025B /* PBXContainerItemProxy */; + }; + 7532531B1F5364030024025B /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 753252F21F535E1E0024025B /* gencpu */; + targetProxy = 7532531A1F5364030024025B /* PBXContainerItemProxy */; + }; + 7532531D1F53640B0024025B /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 753253071F5360E30024025B /* run_build68k */; + targetProxy = 7532531C1F53640B0024025B /* PBXContainerItemProxy */; + }; + 7532531F1F5364170024025B /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 753253161F5363D20024025B /* run_gencpu */; + targetProxy = 7532531E1F5364170024025B /* PBXContainerItemProxy */; + }; /* End PBXTargetDependency section */ /* Begin PBXVariantGroup section */ @@ -911,6 +1137,62 @@ /* End PBXVariantGroup section */ /* Begin XCBuildConfiguration section */ + 753252DE1F5358D30024025B /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + 753252DF1F5358D30024025B /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; + 753252F81F535E1E0024025B /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + 753252F91F535E1E0024025B /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; + 753253091F5360E30024025B /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + 7532530A1F5360E30024025B /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; + 753253181F5363D20024025B /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + 753253191F5363D20024025B /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; 7539DFC41F23B17E006B2DF2 /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { @@ -1054,6 +1336,42 @@ /* End XCBuildConfiguration section */ /* Begin XCConfigurationList section */ + 753252E31F5358D30024025B /* Build configuration list for PBXNativeTarget "build68k" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 753252DE1F5358D30024025B /* Debug */, + 753252DF1F5358D30024025B /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 753252F71F535E1E0024025B /* Build configuration list for PBXNativeTarget "gencpu" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 753252F81F535E1E0024025B /* Debug */, + 753252F91F535E1E0024025B /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 753253081F5360E30024025B /* Build configuration list for PBXLegacyTarget "run_build68k" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 753253091F5360E30024025B /* Debug */, + 7532530A1F5360E30024025B /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 753253171F5363D20024025B /* Build configuration list for PBXLegacyTarget "run_gencpu" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 753253181F5363D20024025B /* Debug */, + 753253191F5363D20024025B /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */ = { isa = XCConfigurationList; buildConfigurations = ( diff --git a/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh b/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh new file mode 100755 index 000000000..30047f7f6 --- /dev/null +++ b/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh @@ -0,0 +1,33 @@ +#!/bin/bash -e + +# +# run_build68k_for_xcode.sh +# +# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts +# + +if [ ! -d "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then + echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" + exit 1 +fi + +# Log some debugging information +echo "1=$1" +echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" +echo "PROJECT_DIR=$PROJECT_DIR" + +# Perform actions, given the passed-in build step +case "$1" in + "clean") + echo "Cleaning build68k output(s)" + rm -rf "$BUILT_PRODUCTS_DIR/build68k_output" + ;; + "") + echo "Running build68k" + cd "$BUILT_PRODUCTS_DIR" + mkdir -p build68k_output + cd build68k_output + cat "$PROJECT_DIR/../uae_cpu/table68k" | "$BUILT_PRODUCTS_DIR/build68k" > "./defs68k.c" + ls -al + ;; +esac diff --git a/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh b/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh new file mode 100755 index 000000000..16c014dfa --- /dev/null +++ b/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh @@ -0,0 +1,33 @@ +#!/bin/bash -e + +# +# run_gemcpu_for_xcode.sh +# +# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts +# + +if [ ! -d "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then + echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" + exit 1 +fi + +# Log some debugging information +echo "1=$1" +echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" +echo "PROJECT_DIR=$PROJECT_DIR" + +# Perform actions, given the passed-in build step +case "$1" in + "clean") + echo "Cleaning gencpu output(s)" + rm -rf "$BUILT_PRODUCTS_DIR/gencpu_output" + ;; + "") + echo "Running gencpu" + cd "$BUILT_PRODUCTS_DIR" + mkdir -p gencpu_output + cd gencpu_output + "$BUILT_PRODUCTS_DIR/gencpu" + ls -al + ;; +esac diff --git a/BasiliskII/src/uae_cpu/cpuemu.cpp b/BasiliskII/src/uae_cpu/cpuemu.cpp deleted file mode 100644 index 52a0dc9c4..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu.cpp +++ /dev/null @@ -1,45296 +0,0 @@ -#include "sysdeps.h" -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "compiler/compemu.h" -#include "fpu/fpu.h" -#include "cputbl.h" -#define SET_CFLG_ALWAYS(x) SET_CFLG(x) -#define SET_NFLG_ALWAYS(x) SET_NFLG(x) -#define CPUFUNC_FF(x) x##_ff -#define CPUFUNC_NF(x) x##_nf -#define CPUFUNC(x) CPUFUNC_FF(x) -#ifdef NOFLAGS -# include "noflags.h" -#endif - -#ifdef _MSC_VER -#pragma warning(disable:4102) /* unreferenced label */ -#endif - -#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) -#define PART_1 1 -#define PART_2 1 -#define PART_3 1 -#define PART_4 1 -#define PART_5 1 -#define PART_6 1 -#define PART_7 1 -#define PART_8 1 -#endif - -#ifdef PART_1 -void REGPARAM2 CPUFUNC(op_0_0)(uae_u32 opcode) /* OR.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10_0)(uae_u32 opcode) /* OR.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_18_0)(uae_u32 opcode) /* OR.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20_0)(uae_u32 opcode) /* OR.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_28_0)(uae_u32 opcode) /* OR.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30_0)(uae_u32 opcode) /* OR.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_38_0)(uae_u32 opcode) /* OR.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_39_0)(uae_u32 opcode) /* OR.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3c_0)(uae_u32 opcode) /* ORSR.B #.W */ -{ - cpuop_begin(); -{ MakeSR(); -{ uae_s16 src = get_iword(2); - src &= 0xFF; - regs.sr |= src; - MakeFromSR(); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40_0)(uae_u32 opcode) /* OR.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50_0)(uae_u32 opcode) /* OR.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_58_0)(uae_u32 opcode) /* OR.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_60_0)(uae_u32 opcode) /* OR.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_68_0)(uae_u32 opcode) /* OR.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_70_0)(uae_u32 opcode) /* OR.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_78_0)(uae_u32 opcode) /* OR.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_79_0)(uae_u32 opcode) /* OR.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_7c_0)(uae_u32 opcode) /* ORSR.W #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel18; } -{ MakeSR(); -{ uae_s16 src = get_iword(2); - regs.sr |= src; - MakeFromSR(); -}}}m68k_incpc(4); -endlabel18: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80_0)(uae_u32 opcode) /* OR.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90_0)(uae_u32 opcode) /* OR.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_98_0)(uae_u32 opcode) /* OR.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a0_0)(uae_u32 opcode) /* OR.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a8_0)(uae_u32 opcode) /* OR.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0_0)(uae_u32 opcode) /* OR.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b8_0)(uae_u32 opcode) /* OR.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b9_0)(uae_u32 opcode) /* OR.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0_0)(uae_u32 opcode) /* CHK2.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel27; } -} -}}}m68k_incpc(4); -endlabel27: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8_0)(uae_u32 opcode) /* CHK2.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel28; } -} -}}}m68k_incpc(6); -endlabel28: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_f0_0)(uae_u32 opcode) /* CHK2.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel29; } -} -}}}}endlabel29: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_f8_0)(uae_u32 opcode) /* CHK2.B #.W,(xxx).W */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel30; } -} -}}}m68k_incpc(6); -endlabel30: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_f9_0)(uae_u32 opcode) /* CHK2.B #.W,(xxx).L */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel31; } -} -}}}m68k_incpc(8); -endlabel31: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_fa_0)(uae_u32 opcode) /* CHK2.B #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel32; } -} -}}}m68k_incpc(6); -endlabel32: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_fb_0)(uae_u32 opcode) /* CHK2.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel33; } -} -}}}}endlabel33: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_100_0)(uae_u32 opcode) /* BTST.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_108_0)(uae_u32 opcode) /* MVPMR.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_110_0)(uae_u32 opcode) /* BTST.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_118_0)(uae_u32 opcode) /* BTST.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_120_0)(uae_u32 opcode) /* BTST.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_128_0)(uae_u32 opcode) /* BTST.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_130_0)(uae_u32 opcode) /* BTST.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_138_0)(uae_u32 opcode) /* BTST.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_139_0)(uae_u32 opcode) /* BTST.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13a_0)(uae_u32 opcode) /* BTST.B Dn,(d16,PC) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 2; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_getpc () + 2; - dsta += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13b_0)(uae_u32 opcode) /* BTST.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13c_0)(uae_u32 opcode) /* BTST.B Dn,#.B */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = get_ibyte(2); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_140_0)(uae_u32 opcode) /* BCHG.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_148_0)(uae_u32 opcode) /* MVPMR.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16) - + (get_byte(memp + 4) << 8) + get_byte(memp + 6); - m68k_dreg(regs, dstreg) = (val); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_150_0)(uae_u32 opcode) /* BCHG.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_158_0)(uae_u32 opcode) /* BCHG.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_160_0)(uae_u32 opcode) /* BCHG.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_168_0)(uae_u32 opcode) /* BCHG.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_170_0)(uae_u32 opcode) /* BCHG.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_178_0)(uae_u32 opcode) /* BCHG.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_179_0)(uae_u32 opcode) /* BCHG.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_17a_0)(uae_u32 opcode) /* BCHG.B Dn,(d16,PC) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 2; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_getpc () + 2; - dsta += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_17b_0)(uae_u32 opcode) /* BCHG.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_180_0)(uae_u32 opcode) /* BCLR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_188_0)(uae_u32 opcode) /* MVPRM.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); - uaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - put_byte(memp, src >> 8); put_byte(memp + 2, src); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_190_0)(uae_u32 opcode) /* BCLR.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_198_0)(uae_u32 opcode) /* BCLR.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1a0_0)(uae_u32 opcode) /* BCLR.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1a8_0)(uae_u32 opcode) /* BCLR.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1b0_0)(uae_u32 opcode) /* BCLR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1b8_0)(uae_u32 opcode) /* BCLR.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1b9_0)(uae_u32 opcode) /* BCLR.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1ba_0)(uae_u32 opcode) /* BCLR.B Dn,(d16,PC) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 2; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_getpc () + 2; - dsta += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1bb_0)(uae_u32 opcode) /* BCLR.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1c0_0)(uae_u32 opcode) /* BSET.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_1c8_0)(uae_u32 opcode) /* MVPRM.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); - uaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - put_byte(memp, src >> 24); put_byte(memp + 2, src >> 16); - put_byte(memp + 4, src >> 8); put_byte(memp + 6, src); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_1d0_0)(uae_u32 opcode) /* BSET.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1d8_0)(uae_u32 opcode) /* BSET.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1e0_0)(uae_u32 opcode) /* BSET.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1e8_0)(uae_u32 opcode) /* BSET.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1f0_0)(uae_u32 opcode) /* BSET.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1f8_0)(uae_u32 opcode) /* BSET.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1f9_0)(uae_u32 opcode) /* BSET.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1fa_0)(uae_u32 opcode) /* BSET.B Dn,(d16,PC) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 2; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_getpc () + 2; - dsta += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1fb_0)(uae_u32 opcode) /* BSET.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_200_0)(uae_u32 opcode) /* AND.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_210_0)(uae_u32 opcode) /* AND.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_218_0)(uae_u32 opcode) /* AND.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_220_0)(uae_u32 opcode) /* AND.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_228_0)(uae_u32 opcode) /* AND.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_230_0)(uae_u32 opcode) /* AND.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_238_0)(uae_u32 opcode) /* AND.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_239_0)(uae_u32 opcode) /* AND.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23c_0)(uae_u32 opcode) /* ANDSR.B #.W */ -{ - cpuop_begin(); -{ MakeSR(); -{ uae_s16 src = get_iword(2); - src |= 0xFF00; - regs.sr &= src; - MakeFromSR(); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_240_0)(uae_u32 opcode) /* AND.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_250_0)(uae_u32 opcode) /* AND.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_258_0)(uae_u32 opcode) /* AND.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_260_0)(uae_u32 opcode) /* AND.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_268_0)(uae_u32 opcode) /* AND.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_270_0)(uae_u32 opcode) /* AND.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_278_0)(uae_u32 opcode) /* AND.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_279_0)(uae_u32 opcode) /* AND.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_27c_0)(uae_u32 opcode) /* ANDSR.W #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel96; } -{ MakeSR(); -{ uae_s16 src = get_iword(2); - regs.sr &= src; - MakeFromSR(); -}}}m68k_incpc(4); -endlabel96: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_280_0)(uae_u32 opcode) /* AND.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_290_0)(uae_u32 opcode) /* AND.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_298_0)(uae_u32 opcode) /* AND.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2a0_0)(uae_u32 opcode) /* AND.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2a8_0)(uae_u32 opcode) /* AND.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2b0_0)(uae_u32 opcode) /* AND.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2b8_0)(uae_u32 opcode) /* AND.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2b9_0)(uae_u32 opcode) /* AND.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2d0_0)(uae_u32 opcode) /* CHK2.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel105; } -} -}}}m68k_incpc(4); -endlabel105: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2e8_0)(uae_u32 opcode) /* CHK2.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel106; } -} -}}}m68k_incpc(6); -endlabel106: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2f0_0)(uae_u32 opcode) /* CHK2.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel107; } -} -}}}}endlabel107: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2f8_0)(uae_u32 opcode) /* CHK2.W #.W,(xxx).W */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel108; } -} -}}}m68k_incpc(6); -endlabel108: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2f9_0)(uae_u32 opcode) /* CHK2.W #.W,(xxx).L */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel109; } -} -}}}m68k_incpc(8); -endlabel109: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2fa_0)(uae_u32 opcode) /* CHK2.W #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel110; } -} -}}}m68k_incpc(6); -endlabel110: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2fb_0)(uae_u32 opcode) /* CHK2.W #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2); - if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg; - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel111; } -} -}}}}endlabel111: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_400_0)(uae_u32 opcode) /* SUB.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_410_0)(uae_u32 opcode) /* SUB.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_418_0)(uae_u32 opcode) /* SUB.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_420_0)(uae_u32 opcode) /* SUB.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_428_0)(uae_u32 opcode) /* SUB.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_430_0)(uae_u32 opcode) /* SUB.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_438_0)(uae_u32 opcode) /* SUB.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_439_0)(uae_u32 opcode) /* SUB.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_440_0)(uae_u32 opcode) /* SUB.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_450_0)(uae_u32 opcode) /* SUB.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_458_0)(uae_u32 opcode) /* SUB.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_460_0)(uae_u32 opcode) /* SUB.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_468_0)(uae_u32 opcode) /* SUB.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_470_0)(uae_u32 opcode) /* SUB.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_478_0)(uae_u32 opcode) /* SUB.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_479_0)(uae_u32 opcode) /* SUB.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_480_0)(uae_u32 opcode) /* SUB.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_490_0)(uae_u32 opcode) /* SUB.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_498_0)(uae_u32 opcode) /* SUB.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a0_0)(uae_u32 opcode) /* SUB.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a8_0)(uae_u32 opcode) /* SUB.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4b0_0)(uae_u32 opcode) /* SUB.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4b8_0)(uae_u32 opcode) /* SUB.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4b9_0)(uae_u32 opcode) /* SUB.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4d0_0)(uae_u32 opcode) /* CHK2.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel136; } -} -}}}m68k_incpc(4); -endlabel136: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4e8_0)(uae_u32 opcode) /* CHK2.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel137; } -} -}}}m68k_incpc(6); -endlabel137: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4f0_0)(uae_u32 opcode) /* CHK2.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel138; } -} -}}}}endlabel138: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4f8_0)(uae_u32 opcode) /* CHK2.L #.W,(xxx).W */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel139; } -} -}}}m68k_incpc(6); -endlabel139: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4f9_0)(uae_u32 opcode) /* CHK2.L #.W,(xxx).L */ -{ - cpuop_begin(); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel140; } -} -}}}m68k_incpc(8); -endlabel140: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4fa_0)(uae_u32 opcode) /* CHK2.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel141; } -} -}}}m68k_incpc(6); -endlabel141: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4fb_0)(uae_u32 opcode) /* CHK2.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); - {uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15]; - lower=get_long(dsta); upper = get_long(dsta+4); - SET_ZFLG (upper == reg || lower == reg); - SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower); - if ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto endlabel142; } -} -}}}}endlabel142: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_600_0)(uae_u32 opcode) /* ADD.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_610_0)(uae_u32 opcode) /* ADD.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_618_0)(uae_u32 opcode) /* ADD.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_620_0)(uae_u32 opcode) /* ADD.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_628_0)(uae_u32 opcode) /* ADD.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_630_0)(uae_u32 opcode) /* ADD.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_638_0)(uae_u32 opcode) /* ADD.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_639_0)(uae_u32 opcode) /* ADD.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_640_0)(uae_u32 opcode) /* ADD.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_650_0)(uae_u32 opcode) /* ADD.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_658_0)(uae_u32 opcode) /* ADD.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_660_0)(uae_u32 opcode) /* ADD.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_668_0)(uae_u32 opcode) /* ADD.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_670_0)(uae_u32 opcode) /* ADD.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_678_0)(uae_u32 opcode) /* ADD.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_679_0)(uae_u32 opcode) /* ADD.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_680_0)(uae_u32 opcode) /* ADD.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_690_0)(uae_u32 opcode) /* ADD.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_698_0)(uae_u32 opcode) /* ADD.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6a0_0)(uae_u32 opcode) /* ADD.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6a8_0)(uae_u32 opcode) /* ADD.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6b0_0)(uae_u32 opcode) /* ADD.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6b8_0)(uae_u32 opcode) /* ADD.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6b9_0)(uae_u32 opcode) /* ADD.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6c0_0)(uae_u32 opcode) /* RTM.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6c8_0)(uae_u32 opcode) /* RTM.L An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6d0_0)(uae_u32 opcode) /* CALLM.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6e8_0)(uae_u32 opcode) /* CALLM.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6f0_0)(uae_u32 opcode) /* CALLM.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6f8_0)(uae_u32 opcode) /* CALLM.L (xxx).W */ -{ - cpuop_begin(); -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6f9_0)(uae_u32 opcode) /* CALLM.L (xxx).L */ -{ - cpuop_begin(); -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6fa_0)(uae_u32 opcode) /* CALLM.L (d16,PC) */ -{ - cpuop_begin(); -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6fb_0)(uae_u32 opcode) /* CALLM.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_800_0)(uae_u32 opcode) /* BTST.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_810_0)(uae_u32 opcode) /* BTST.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_818_0)(uae_u32 opcode) /* BTST.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_820_0)(uae_u32 opcode) /* BTST.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_828_0)(uae_u32 opcode) /* BTST.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_830_0)(uae_u32 opcode) /* BTST.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_838_0)(uae_u32 opcode) /* BTST.B #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_839_0)(uae_u32 opcode) /* BTST.B #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_83a_0)(uae_u32 opcode) /* BTST.B #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_83b_0)(uae_u32 opcode) /* BTST.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_83c_0)(uae_u32 opcode) /* BTST.B #.W,#.B */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uae_s8 dst = get_ibyte(4); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_840_0)(uae_u32 opcode) /* BCHG.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_850_0)(uae_u32 opcode) /* BCHG.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_858_0)(uae_u32 opcode) /* BCHG.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_860_0)(uae_u32 opcode) /* BCHG.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_868_0)(uae_u32 opcode) /* BCHG.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_870_0)(uae_u32 opcode) /* BCHG.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_878_0)(uae_u32 opcode) /* BCHG.B #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_879_0)(uae_u32 opcode) /* BCHG.B #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_87a_0)(uae_u32 opcode) /* BCHG.B #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_87b_0)(uae_u32 opcode) /* BCHG.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_880_0)(uae_u32 opcode) /* BCLR.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_890_0)(uae_u32 opcode) /* BCLR.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_898_0)(uae_u32 opcode) /* BCLR.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8a0_0)(uae_u32 opcode) /* BCLR.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8a8_0)(uae_u32 opcode) /* BCLR.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8b0_0)(uae_u32 opcode) /* BCLR.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8b8_0)(uae_u32 opcode) /* BCLR.B #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8b9_0)(uae_u32 opcode) /* BCLR.B #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8ba_0)(uae_u32 opcode) /* BCLR.B #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8bb_0)(uae_u32 opcode) /* BCLR.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8c0_0)(uae_u32 opcode) /* BSET.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= 31; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - m68k_dreg(regs, dstreg) = (dst); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8d0_0)(uae_u32 opcode) /* BSET.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8d8_0)(uae_u32 opcode) /* BSET.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8e0_0)(uae_u32 opcode) /* BSET.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8e8_0)(uae_u32 opcode) /* BSET.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8f0_0)(uae_u32 opcode) /* BSET.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8f8_0)(uae_u32 opcode) /* BSET.B #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8f9_0)(uae_u32 opcode) /* BSET.B #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8fa_0)(uae_u32 opcode) /* BSET.B #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8fb_0)(uae_u32 opcode) /* BSET.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a00_0)(uae_u32 opcode) /* EOR.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a10_0)(uae_u32 opcode) /* EOR.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a18_0)(uae_u32 opcode) /* EOR.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a20_0)(uae_u32 opcode) /* EOR.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a28_0)(uae_u32 opcode) /* EOR.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a30_0)(uae_u32 opcode) /* EOR.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a38_0)(uae_u32 opcode) /* EOR.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a39_0)(uae_u32 opcode) /* EOR.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a3c_0)(uae_u32 opcode) /* EORSR.B #.W */ -{ - cpuop_begin(); -{ MakeSR(); -{ uae_s16 src = get_iword(2); - src &= 0xFF; - regs.sr ^= src; - MakeFromSR(); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a40_0)(uae_u32 opcode) /* EOR.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a50_0)(uae_u32 opcode) /* EOR.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a58_0)(uae_u32 opcode) /* EOR.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a60_0)(uae_u32 opcode) /* EOR.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a68_0)(uae_u32 opcode) /* EOR.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a70_0)(uae_u32 opcode) /* EOR.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a78_0)(uae_u32 opcode) /* EOR.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a79_0)(uae_u32 opcode) /* EOR.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -#endif - -#ifdef PART_2 -void REGPARAM2 CPUFUNC(op_a7c_0)(uae_u32 opcode) /* EORSR.W #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel234; } -{ MakeSR(); -{ uae_s16 src = get_iword(2); - regs.sr ^= src; - MakeFromSR(); -}}}m68k_incpc(4); -endlabel234: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a80_0)(uae_u32 opcode) /* EOR.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a90_0)(uae_u32 opcode) /* EOR.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a98_0)(uae_u32 opcode) /* EOR.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_aa0_0)(uae_u32 opcode) /* EOR.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_aa8_0)(uae_u32 opcode) /* EOR.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ab0_0)(uae_u32 opcode) /* EOR.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ab8_0)(uae_u32 opcode) /* EOR.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ab9_0)(uae_u32 opcode) /* EOR.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ad0_0)(uae_u32 opcode) /* CAS.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ad8_0)(uae_u32 opcode) /* CAS.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ae0_0)(uae_u32 opcode) /* CAS.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ae8_0)(uae_u32 opcode) /* CAS.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_af0_0)(uae_u32 opcode) /* CAS.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_af8_0)(uae_u32 opcode) /* CAS.B #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_af9_0)(uae_u32 opcode) /* CAS.B #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s8)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(m68k_dreg(regs, rc))) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_byte(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c00_0)(uae_u32 opcode) /* CMP.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c10_0)(uae_u32 opcode) /* CMP.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c18_0)(uae_u32 opcode) /* CMP.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c20_0)(uae_u32 opcode) /* CMP.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c28_0)(uae_u32 opcode) /* CMP.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c30_0)(uae_u32 opcode) /* CMP.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c38_0)(uae_u32 opcode) /* CMP.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c39_0)(uae_u32 opcode) /* CMP.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c3a_0)(uae_u32 opcode) /* CMP.B #.B,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c3b_0)(uae_u32 opcode) /* CMP.B #.B,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c40_0)(uae_u32 opcode) /* CMP.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c50_0)(uae_u32 opcode) /* CMP.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c58_0)(uae_u32 opcode) /* CMP.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c60_0)(uae_u32 opcode) /* CMP.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c68_0)(uae_u32 opcode) /* CMP.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c70_0)(uae_u32 opcode) /* CMP.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c78_0)(uae_u32 opcode) /* CMP.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c79_0)(uae_u32 opcode) /* CMP.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c7a_0)(uae_u32 opcode) /* CMP.W #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c7b_0)(uae_u32 opcode) /* CMP.W #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c80_0)(uae_u32 opcode) /* CMP.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c90_0)(uae_u32 opcode) /* CMP.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c98_0)(uae_u32 opcode) /* CMP.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ca0_0)(uae_u32 opcode) /* CMP.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ca8_0)(uae_u32 opcode) /* CMP.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cb0_0)(uae_u32 opcode) /* CMP.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cb8_0)(uae_u32 opcode) /* CMP.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cb9_0)(uae_u32 opcode) /* CMP.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cba_0)(uae_u32 opcode) /* CMP.L #.L,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_getpc () + 6; - dsta += (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cbb_0)(uae_u32 opcode) /* CMP.L #.L,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cd0_0)(uae_u32 opcode) /* CAS.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cd8_0)(uae_u32 opcode) /* CAS.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ce0_0)(uae_u32 opcode) /* CAS.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ce8_0)(uae_u32 opcode) /* CAS.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cf0_0)(uae_u32 opcode) /* CAS.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cf8_0)(uae_u32 opcode) /* CAS.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s16 dst = get_word(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cf9_0)(uae_u32 opcode) /* CAS.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s16 dst = get_word(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, rc))) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_word(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cfc_0)(uae_u32 opcode) /* CAS2.W #.L */ -{ - cpuop_begin(); -{{ uae_s32 extra = get_ilong(2); - uae_u32 rn1 = regs.regs[(extra >> 28) & 15]; - uae_u32 rn2 = regs.regs[(extra >> 12) & 15]; - uae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2); -{uae_u32 newv = ((uae_s16)(dst1)) - ((uae_s16)(m68k_dreg(regs, (extra >> 16) & 7))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, (extra >> 16) & 7))) < 0; - int flgo = ((uae_s16)(dst1)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, (extra >> 16) & 7))) > ((uae_u16)(dst1))); - SET_NFLG (flgn != 0); - if (GET_ZFLG) { -{uae_u32 newv = ((uae_s16)(dst2)) - ((uae_s16)(m68k_dreg(regs, extra & 7))); -{ int flgs = ((uae_s16)(m68k_dreg(regs, extra & 7))) < 0; - int flgo = ((uae_s16)(dst2)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(m68k_dreg(regs, extra & 7))) > ((uae_u16)(dst2))); - SET_NFLG (flgn != 0); - if (GET_ZFLG) { - put_word(rn1, m68k_dreg(regs, (extra >> 22) & 7)); - put_word(rn1, m68k_dreg(regs, (extra >> 6) & 7)); - }} -}}}} if (! GET_ZFLG) { - m68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff); - m68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff); - } -}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e10_0)(uae_u32 opcode) /* MOVES.B #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel288; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - put_byte(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s8 src = get_byte(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(4); -endlabel288: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e18_0)(uae_u32 opcode) /* MOVES.B #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel289; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - put_byte(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(4); -endlabel289: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e20_0)(uae_u32 opcode) /* MOVES.B #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel290; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - put_byte(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, dstreg) = srca; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(4); -endlabel290: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e28_0)(uae_u32 opcode) /* MOVES.B #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel291; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - put_byte(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s8 src = get_byte(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(8); -endlabel291: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e30_0)(uae_u32 opcode) /* MOVES.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel292; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - put_byte(dsta,src); -}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 src = get_byte(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}}endlabel292: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e38_0)(uae_u32 opcode) /* MOVES.B #.W,(xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel293; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - put_byte(dsta,src); -}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); -{ uae_s8 src = get_byte(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(8); -endlabel293: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e39_0)(uae_u32 opcode) /* MOVES.B #.W,(xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel294; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = get_ilong(4); - put_byte(dsta,src); -}}else{{ uaecptr srca = get_ilong(8); -{ uae_s8 src = get_byte(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff); - } -}}}}}}m68k_incpc(12); -endlabel294: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e50_0)(uae_u32 opcode) /* MOVES.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel295; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - put_word(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s16 src = get_word(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(4); -endlabel295: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e58_0)(uae_u32 opcode) /* MOVES.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel296; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - put_word(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, dstreg) += 2; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(4); -endlabel296: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e60_0)(uae_u32 opcode) /* MOVES.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel297; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - put_word(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, dstreg) = srca; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(4); -endlabel297: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e68_0)(uae_u32 opcode) /* MOVES.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel298; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - put_word(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s16 src = get_word(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(8); -endlabel298: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e70_0)(uae_u32 opcode) /* MOVES.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel299; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - put_word(dsta,src); -}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 src = get_word(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}}endlabel299: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e78_0)(uae_u32 opcode) /* MOVES.W #.W,(xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel300; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - put_word(dsta,src); -}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); -{ uae_s16 src = get_word(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(8); -endlabel300: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e79_0)(uae_u32 opcode) /* MOVES.W #.W,(xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel301; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = get_ilong(4); - put_word(dsta,src); -}}else{{ uaecptr srca = get_ilong(8); -{ uae_s16 src = get_word(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (m68k_dreg(regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff); - } -}}}}}}m68k_incpc(12); -endlabel301: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e90_0)(uae_u32 opcode) /* MOVES.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel302; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - put_long(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s32 src = get_long(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(4); -endlabel302: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_e98_0)(uae_u32 opcode) /* MOVES.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel303; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - put_long(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, dstreg) += 4; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(4); -endlabel303: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_ea0_0)(uae_u32 opcode) /* MOVES.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel304; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - put_long(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, dstreg) = srca; - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(4); -endlabel304: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_ea8_0)(uae_u32 opcode) /* MOVES.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel305; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - put_long(dsta,src); -}}else{{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 src = get_long(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(8); -endlabel305: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_eb0_0)(uae_u32 opcode) /* MOVES.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel306; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - put_long(dsta,src); -}}}else{{{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 src = get_long(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}}endlabel306: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_eb8_0)(uae_u32 opcode) /* MOVES.L #.W,(xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel307; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - put_long(dsta,src); -}}else{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(6); -{ uae_s32 src = get_long(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(8); -endlabel307: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_eb9_0)(uae_u32 opcode) /* MOVES.L #.W,(xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel308; } -{{ uae_s16 extra = get_iword(2); - if (extra & 0x800) -{ uae_u32 src = regs.regs[(extra >> 12) & 15]; -{ uaecptr dsta = get_ilong(4); - put_long(dsta,src); -}}else{{ uaecptr srca = get_ilong(8); -{ uae_s32 src = get_long(srca); - if (extra & 0x8000) { - m68k_areg(regs, (extra >> 12) & 7) = src; - } else { - m68k_dreg(regs, (extra >> 12) & 7) = (src); - } -}}}}}}m68k_incpc(12); -endlabel308: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_ed0_0)(uae_u32 opcode) /* CAS.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ed8_0)(uae_u32 opcode) /* CAS.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ee0_0)(uae_u32 opcode) /* CAS.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ee8_0)(uae_u32 opcode) /* CAS.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 dst = get_long(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ef0_0)(uae_u32 opcode) /* CAS.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ef8_0)(uae_u32 opcode) /* CAS.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 dst = get_long(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ef9_0)(uae_u32 opcode) /* CAS.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 dst = get_long(dsta); -{ int ru = (src >> 6) & 7; - int rc = src & 7; -{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(m68k_dreg(regs, rc))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, rc))) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, rc))) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); - if (GET_ZFLG){ put_long(dsta,(m68k_dreg(regs, ru))); -}else{m68k_dreg(regs, rc) = dst; -}}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_efc_0)(uae_u32 opcode) /* CAS2.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 extra = get_ilong(2); - uae_u32 rn1 = regs.regs[(extra >> 28) & 15]; - uae_u32 rn2 = regs.regs[(extra >> 12) & 15]; - uae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2); -{uae_u32 newv = ((uae_s32)(dst1)) - ((uae_s32)(m68k_dreg(regs, (extra >> 16) & 7))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, (extra >> 16) & 7))) < 0; - int flgo = ((uae_s32)(dst1)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, (extra >> 16) & 7))) > ((uae_u32)(dst1))); - SET_NFLG (flgn != 0); - if (GET_ZFLG) { -{uae_u32 newv = ((uae_s32)(dst2)) - ((uae_s32)(m68k_dreg(regs, extra & 7))); -{ int flgs = ((uae_s32)(m68k_dreg(regs, extra & 7))) < 0; - int flgo = ((uae_s32)(dst2)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(m68k_dreg(regs, extra & 7))) > ((uae_u32)(dst2))); - SET_NFLG (flgn != 0); - if (GET_ZFLG) { - put_long(rn1, m68k_dreg(regs, (extra >> 22) & 7)); - put_long(rn1, m68k_dreg(regs, (extra >> 6) & 7)); - }} -}}}} if (! GET_ZFLG) { - m68k_dreg(regs, (extra >> 22) & 7) = dst1; - m68k_dreg(regs, (extra >> 6) & 7) = dst2; - } -}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1000_0)(uae_u32 opcode) /* MOVE.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1010_0)(uae_u32 opcode) /* MOVE.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1018_0)(uae_u32 opcode) /* MOVE.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1020_0)(uae_u32 opcode) /* MOVE.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1028_0)(uae_u32 opcode) /* MOVE.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1030_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1038_0)(uae_u32 opcode) /* MOVE.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1039_0)(uae_u32 opcode) /* MOVE.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_103a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_103b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_103c_0)(uae_u32 opcode) /* MOVE.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1080_0)(uae_u32 opcode) /* MOVE.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1090_0)(uae_u32 opcode) /* MOVE.B (An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1098_0)(uae_u32 opcode) /* MOVE.B (An)+,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10a0_0)(uae_u32 opcode) /* MOVE.B -(An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10a8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10b0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10b8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10b9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10ba_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10bb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10bc_0)(uae_u32 opcode) /* MOVE.B #.B,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10c0_0)(uae_u32 opcode) /* MOVE.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10d0_0)(uae_u32 opcode) /* MOVE.B (An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10e0_0)(uae_u32 opcode) /* MOVE.B -(An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10fc_0)(uae_u32 opcode) /* MOVE.B #.B,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1100_0)(uae_u32 opcode) /* MOVE.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1110_0)(uae_u32 opcode) /* MOVE.B (An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1118_0)(uae_u32 opcode) /* MOVE.B (An)+,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1120_0)(uae_u32 opcode) /* MOVE.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1128_0)(uae_u32 opcode) /* MOVE.B (d16,An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1130_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1138_0)(uae_u32 opcode) /* MOVE.B (xxx).W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1139_0)(uae_u32 opcode) /* MOVE.B (xxx).L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_113a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_113b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_113c_0)(uae_u32 opcode) /* MOVE.B #.B,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1140_0)(uae_u32 opcode) /* MOVE.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1150_0)(uae_u32 opcode) /* MOVE.B (An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1158_0)(uae_u32 opcode) /* MOVE.B (An)+,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1160_0)(uae_u32 opcode) /* MOVE.B -(An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1168_0)(uae_u32 opcode) /* MOVE.B (d16,An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1170_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1178_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1179_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_117a_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_117b_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_117c_0)(uae_u32 opcode) /* MOVE.B #.B,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1180_0)(uae_u32 opcode) /* MOVE.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1190_0)(uae_u32 opcode) /* MOVE.B (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1198_0)(uae_u32 opcode) /* MOVE.B (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11a0_0)(uae_u32 opcode) /* MOVE.B -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11a8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11ba_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11bb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11bc_0)(uae_u32 opcode) /* MOVE.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11c0_0)(uae_u32 opcode) /* MOVE.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11d0_0)(uae_u32 opcode) /* MOVE.B (An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11e0_0)(uae_u32 opcode) /* MOVE.B -(An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11fc_0)(uae_u32 opcode) /* MOVE.B #.B,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13c0_0)(uae_u32 opcode) /* MOVE.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13d0_0)(uae_u32 opcode) /* MOVE.B (An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13d8_0)(uae_u32 opcode) /* MOVE.B (An)+,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13e0_0)(uae_u32 opcode) /* MOVE.B -(An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13e8_0)(uae_u32 opcode) /* MOVE.B (d16,An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13f0_0)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13f8_0)(uae_u32 opcode) /* MOVE.B (xxx).W,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13f9_0)(uae_u32 opcode) /* MOVE.B (xxx).L,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13fa_0)(uae_u32 opcode) /* MOVE.B (d16,PC),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13fb_0)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13fc_0)(uae_u32 opcode) /* MOVE.B #.B,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2000_0)(uae_u32 opcode) /* MOVE.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2008_0)(uae_u32 opcode) /* MOVE.L An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2010_0)(uae_u32 opcode) /* MOVE.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2018_0)(uae_u32 opcode) /* MOVE.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2020_0)(uae_u32 opcode) /* MOVE.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2028_0)(uae_u32 opcode) /* MOVE.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2030_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2038_0)(uae_u32 opcode) /* MOVE.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2039_0)(uae_u32 opcode) /* MOVE.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_203a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_203b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_203c_0)(uae_u32 opcode) /* MOVE.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2040_0)(uae_u32 opcode) /* MOVEA.L Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2048_0)(uae_u32 opcode) /* MOVEA.L An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2050_0)(uae_u32 opcode) /* MOVEA.L (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2058_0)(uae_u32 opcode) /* MOVEA.L (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2060_0)(uae_u32 opcode) /* MOVEA.L -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2068_0)(uae_u32 opcode) /* MOVEA.L (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2070_0)(uae_u32 opcode) /* MOVEA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2078_0)(uae_u32 opcode) /* MOVEA.L (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2079_0)(uae_u32 opcode) /* MOVEA.L (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_207a_0)(uae_u32 opcode) /* MOVEA.L (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_207b_0)(uae_u32 opcode) /* MOVEA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_207c_0)(uae_u32 opcode) /* MOVEA.L #.L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_2080_0)(uae_u32 opcode) /* MOVE.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2088_0)(uae_u32 opcode) /* MOVE.L An,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2090_0)(uae_u32 opcode) /* MOVE.L (An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2098_0)(uae_u32 opcode) /* MOVE.L (An)+,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20a0_0)(uae_u32 opcode) /* MOVE.L -(An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20a8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20b0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20b8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20b9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20ba_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20bb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20bc_0)(uae_u32 opcode) /* MOVE.L #.L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20c0_0)(uae_u32 opcode) /* MOVE.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20c8_0)(uae_u32 opcode) /* MOVE.L An,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20d0_0)(uae_u32 opcode) /* MOVE.L (An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20e0_0)(uae_u32 opcode) /* MOVE.L -(An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20fc_0)(uae_u32 opcode) /* MOVE.L #.L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2100_0)(uae_u32 opcode) /* MOVE.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2108_0)(uae_u32 opcode) /* MOVE.L An,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2110_0)(uae_u32 opcode) /* MOVE.L (An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2118_0)(uae_u32 opcode) /* MOVE.L (An)+,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2120_0)(uae_u32 opcode) /* MOVE.L -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2128_0)(uae_u32 opcode) /* MOVE.L (d16,An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2130_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2138_0)(uae_u32 opcode) /* MOVE.L (xxx).W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2139_0)(uae_u32 opcode) /* MOVE.L (xxx).L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_213a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_213b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_213c_0)(uae_u32 opcode) /* MOVE.L #.L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2140_0)(uae_u32 opcode) /* MOVE.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2148_0)(uae_u32 opcode) /* MOVE.L An,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2150_0)(uae_u32 opcode) /* MOVE.L (An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_3 -void REGPARAM2 CPUFUNC(op_2158_0)(uae_u32 opcode) /* MOVE.L (An)+,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2160_0)(uae_u32 opcode) /* MOVE.L -(An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2168_0)(uae_u32 opcode) /* MOVE.L (d16,An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2170_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2178_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2179_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_217a_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_217b_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_217c_0)(uae_u32 opcode) /* MOVE.L #.L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2180_0)(uae_u32 opcode) /* MOVE.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2188_0)(uae_u32 opcode) /* MOVE.L An,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2190_0)(uae_u32 opcode) /* MOVE.L (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2198_0)(uae_u32 opcode) /* MOVE.L (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21a0_0)(uae_u32 opcode) /* MOVE.L -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21a8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21ba_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21bb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21bc_0)(uae_u32 opcode) /* MOVE.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21c0_0)(uae_u32 opcode) /* MOVE.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21c8_0)(uae_u32 opcode) /* MOVE.L An,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21d0_0)(uae_u32 opcode) /* MOVE.L (An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21e0_0)(uae_u32 opcode) /* MOVE.L -(An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21fc_0)(uae_u32 opcode) /* MOVE.L #.L,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23c0_0)(uae_u32 opcode) /* MOVE.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23c8_0)(uae_u32 opcode) /* MOVE.L An,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23d0_0)(uae_u32 opcode) /* MOVE.L (An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23d8_0)(uae_u32 opcode) /* MOVE.L (An)+,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23e0_0)(uae_u32 opcode) /* MOVE.L -(An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23e8_0)(uae_u32 opcode) /* MOVE.L (d16,An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23f0_0)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23f8_0)(uae_u32 opcode) /* MOVE.L (xxx).W,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23f9_0)(uae_u32 opcode) /* MOVE.L (xxx).L,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23fa_0)(uae_u32 opcode) /* MOVE.L (d16,PC),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23fb_0)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23fc_0)(uae_u32 opcode) /* MOVE.L #.L,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_ilong(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3000_0)(uae_u32 opcode) /* MOVE.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3008_0)(uae_u32 opcode) /* MOVE.W An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3010_0)(uae_u32 opcode) /* MOVE.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3018_0)(uae_u32 opcode) /* MOVE.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3020_0)(uae_u32 opcode) /* MOVE.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3028_0)(uae_u32 opcode) /* MOVE.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3030_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3038_0)(uae_u32 opcode) /* MOVE.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3039_0)(uae_u32 opcode) /* MOVE.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_303a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_303b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_303c_0)(uae_u32 opcode) /* MOVE.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3040_0)(uae_u32 opcode) /* MOVEA.W Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3048_0)(uae_u32 opcode) /* MOVEA.W An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3050_0)(uae_u32 opcode) /* MOVEA.W (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3058_0)(uae_u32 opcode) /* MOVEA.W (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3060_0)(uae_u32 opcode) /* MOVEA.W -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3068_0)(uae_u32 opcode) /* MOVEA.W (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3070_0)(uae_u32 opcode) /* MOVEA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3078_0)(uae_u32 opcode) /* MOVEA.W (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3079_0)(uae_u32 opcode) /* MOVEA.W (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_307a_0)(uae_u32 opcode) /* MOVEA.W (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_307b_0)(uae_u32 opcode) /* MOVEA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_307c_0)(uae_u32 opcode) /* MOVEA.W #.W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_3080_0)(uae_u32 opcode) /* MOVE.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3088_0)(uae_u32 opcode) /* MOVE.W An,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3090_0)(uae_u32 opcode) /* MOVE.W (An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3098_0)(uae_u32 opcode) /* MOVE.W (An)+,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30a0_0)(uae_u32 opcode) /* MOVE.W -(An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30a8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30b0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30b8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30b9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30ba_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30bb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30bc_0)(uae_u32 opcode) /* MOVE.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30c0_0)(uae_u32 opcode) /* MOVE.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30c8_0)(uae_u32 opcode) /* MOVE.W An,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30d0_0)(uae_u32 opcode) /* MOVE.W (An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30e0_0)(uae_u32 opcode) /* MOVE.W -(An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30fc_0)(uae_u32 opcode) /* MOVE.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3100_0)(uae_u32 opcode) /* MOVE.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3108_0)(uae_u32 opcode) /* MOVE.W An,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3110_0)(uae_u32 opcode) /* MOVE.W (An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3118_0)(uae_u32 opcode) /* MOVE.W (An)+,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3120_0)(uae_u32 opcode) /* MOVE.W -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3128_0)(uae_u32 opcode) /* MOVE.W (d16,An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3130_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3138_0)(uae_u32 opcode) /* MOVE.W (xxx).W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3139_0)(uae_u32 opcode) /* MOVE.W (xxx).L,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_313a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_313b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_313c_0)(uae_u32 opcode) /* MOVE.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3140_0)(uae_u32 opcode) /* MOVE.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3148_0)(uae_u32 opcode) /* MOVE.W An,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3150_0)(uae_u32 opcode) /* MOVE.W (An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3158_0)(uae_u32 opcode) /* MOVE.W (An)+,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3160_0)(uae_u32 opcode) /* MOVE.W -(An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3168_0)(uae_u32 opcode) /* MOVE.W (d16,An),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3170_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3178_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3179_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_317a_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_317b_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_317c_0)(uae_u32 opcode) /* MOVE.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3180_0)(uae_u32 opcode) /* MOVE.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3188_0)(uae_u32 opcode) /* MOVE.W An,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3190_0)(uae_u32 opcode) /* MOVE.W (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3198_0)(uae_u32 opcode) /* MOVE.W (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31a0_0)(uae_u32 opcode) /* MOVE.W -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31a8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{m68k_incpc(6); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31ba_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31bb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31bc_0)(uae_u32 opcode) /* MOVE.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31c0_0)(uae_u32 opcode) /* MOVE.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31c8_0)(uae_u32 opcode) /* MOVE.W An,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31d0_0)(uae_u32 opcode) /* MOVE.W (An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31e0_0)(uae_u32 opcode) /* MOVE.W -(An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31fc_0)(uae_u32 opcode) /* MOVE.W #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33c0_0)(uae_u32 opcode) /* MOVE.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33c8_0)(uae_u32 opcode) /* MOVE.W An,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33d0_0)(uae_u32 opcode) /* MOVE.W (An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33d8_0)(uae_u32 opcode) /* MOVE.W (An)+,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33e0_0)(uae_u32 opcode) /* MOVE.W -(An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33e8_0)(uae_u32 opcode) /* MOVE.W (d16,An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33f0_0)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33f8_0)(uae_u32 opcode) /* MOVE.W (xxx).W,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33f9_0)(uae_u32 opcode) /* MOVE.W (xxx).L,(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(6); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(10); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33fa_0)(uae_u32 opcode) /* MOVE.W (d16,PC),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33fb_0)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(0); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33fc_0)(uae_u32 opcode) /* MOVE.W #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4000_0)(uae_u32 opcode) /* NEGX.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4010_0)(uae_u32 opcode) /* NEGX.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4018_0)(uae_u32 opcode) /* NEGX.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4020_0)(uae_u32 opcode) /* NEGX.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4028_0)(uae_u32 opcode) /* NEGX.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4030_0)(uae_u32 opcode) /* NEGX.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4038_0)(uae_u32 opcode) /* NEGX.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4039_0)(uae_u32 opcode) /* NEGX.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4040_0)(uae_u32 opcode) /* NEGX.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((newv) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4050_0)(uae_u32 opcode) /* NEGX.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4058_0)(uae_u32 opcode) /* NEGX.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4060_0)(uae_u32 opcode) /* NEGX.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4068_0)(uae_u32 opcode) /* NEGX.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4070_0)(uae_u32 opcode) /* NEGX.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4078_0)(uae_u32 opcode) /* NEGX.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4079_0)(uae_u32 opcode) /* NEGX.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4080_0)(uae_u32 opcode) /* NEGX.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, srcreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4090_0)(uae_u32 opcode) /* NEGX.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4098_0)(uae_u32 opcode) /* NEGX.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40a0_0)(uae_u32 opcode) /* NEGX.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40a8_0)(uae_u32 opcode) /* NEGX.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40b0_0)(uae_u32 opcode) /* NEGX.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40b8_0)(uae_u32 opcode) /* NEGX.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40b9_0)(uae_u32 opcode) /* NEGX.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40c0_0)(uae_u32 opcode) /* MVSR2.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel645; } -{{ MakeSR(); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr) & 0xffff); -}}}m68k_incpc(2); -endlabel645: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40d0_0)(uae_u32 opcode) /* MVSR2.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel646; } -{{ uaecptr srca = m68k_areg(regs, srcreg); - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(2); -endlabel646: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40d8_0)(uae_u32 opcode) /* MVSR2.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel647; } -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += 2; - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(2); -endlabel647: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40e0_0)(uae_u32 opcode) /* MVSR2.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel648; } -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; - m68k_areg (regs, srcreg) = srca; - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(2); -endlabel648: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40e8_0)(uae_u32 opcode) /* MVSR2.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel649; } -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(4); -endlabel649: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f0_0)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel650; } -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - MakeSR(); - put_word(srca,regs.sr); -}}}}endlabel650: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f8_0)(uae_u32 opcode) /* MVSR2.W (xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel651; } -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(4); -endlabel651: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f9_0)(uae_u32 opcode) /* MVSR2.W (xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel652; } -{{ uaecptr srca = get_ilong(2); - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(6); -endlabel652: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4100_0)(uae_u32 opcode) /* CHK.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel653; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel653; } -}}}m68k_incpc(2); -endlabel653: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4110_0)(uae_u32 opcode) /* CHK.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel654; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel654; } -}}}}m68k_incpc(2); -endlabel654: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4118_0)(uae_u32 opcode) /* CHK.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel655; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel655; } -}}}}m68k_incpc(2); -endlabel655: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4120_0)(uae_u32 opcode) /* CHK.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel656; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel656; } -}}}}m68k_incpc(2); -endlabel656: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4128_0)(uae_u32 opcode) /* CHK.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel657; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel657; } -}}}}m68k_incpc(4); -endlabel657: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4130_0)(uae_u32 opcode) /* CHK.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel658; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel658; } -}}}}}endlabel658: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4138_0)(uae_u32 opcode) /* CHK.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel659; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel659; } -}}}}m68k_incpc(4); -endlabel659: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4139_0)(uae_u32 opcode) /* CHK.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel660; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel660; } -}}}}m68k_incpc(6); -endlabel660: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_413a_0)(uae_u32 opcode) /* CHK.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel661; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel661; } -}}}}m68k_incpc(4); -endlabel661: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_413b_0)(uae_u32 opcode) /* CHK.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel662; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel662; } -}}}}}endlabel662: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_413c_0)(uae_u32 opcode) /* CHK.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel663; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel663; } -}}}m68k_incpc(6); -endlabel663: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4180_0)(uae_u32 opcode) /* CHK.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel664; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel664; } -}}}m68k_incpc(2); -endlabel664: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4190_0)(uae_u32 opcode) /* CHK.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel665; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel665; } -}}}}m68k_incpc(2); -endlabel665: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4198_0)(uae_u32 opcode) /* CHK.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel666; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel666; } -}}}}m68k_incpc(2); -endlabel666: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41a0_0)(uae_u32 opcode) /* CHK.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel667; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel667; } -}}}}m68k_incpc(2); -endlabel667: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41a8_0)(uae_u32 opcode) /* CHK.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel668; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel668; } -}}}}m68k_incpc(4); -endlabel668: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41b0_0)(uae_u32 opcode) /* CHK.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel669; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel669; } -}}}}}endlabel669: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41b8_0)(uae_u32 opcode) /* CHK.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel670; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel670; } -}}}}m68k_incpc(4); -endlabel670: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41b9_0)(uae_u32 opcode) /* CHK.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel671; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel671; } -}}}}m68k_incpc(6); -endlabel671: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41ba_0)(uae_u32 opcode) /* CHK.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel672; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel672; } -}}}}m68k_incpc(4); -endlabel672: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41bb_0)(uae_u32 opcode) /* CHK.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel673; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel673; } -}}}}}endlabel673: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41bc_0)(uae_u32 opcode) /* CHK.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel674; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel674; } -}}}m68k_incpc(4); -endlabel674: ; - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41d0_0)(uae_u32 opcode) /* LEA.L (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41e8_0)(uae_u32 opcode) /* LEA.L (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41f0_0)(uae_u32 opcode) /* LEA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ m68k_areg(regs, dstreg) = (srca); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41f8_0)(uae_u32 opcode) /* LEA.L (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41f9_0)(uae_u32 opcode) /* LEA.L (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41fa_0)(uae_u32 opcode) /* LEA.L (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41fb_0)(uae_u32 opcode) /* LEA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ m68k_areg(regs, dstreg) = (srca); -}}}} cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4200_0)(uae_u32 opcode) /* CLR.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((0) & 0xff); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4210_0)(uae_u32 opcode) /* CLR.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4218_0)(uae_u32 opcode) /* CLR.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4220_0)(uae_u32 opcode) /* CLR.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4228_0)(uae_u32 opcode) /* CLR.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4230_0)(uae_u32 opcode) /* CLR.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4238_0)(uae_u32 opcode) /* CLR.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4239_0)(uae_u32 opcode) /* CLR.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4240_0)(uae_u32 opcode) /* CLR.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((0) & 0xffff); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4250_0)(uae_u32 opcode) /* CLR.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4258_0)(uae_u32 opcode) /* CLR.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4260_0)(uae_u32 opcode) /* CLR.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4268_0)(uae_u32 opcode) /* CLR.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4270_0)(uae_u32 opcode) /* CLR.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4278_0)(uae_u32 opcode) /* CLR.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4279_0)(uae_u32 opcode) /* CLR.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4280_0)(uae_u32 opcode) /* CLR.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - m68k_dreg(regs, srcreg) = (0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4290_0)(uae_u32 opcode) /* CLR.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4298_0)(uae_u32 opcode) /* CLR.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -#endif - -#ifdef PART_4 -void REGPARAM2 CPUFUNC(op_42a0_0)(uae_u32 opcode) /* CLR.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_42a8_0)(uae_u32 opcode) /* CLR.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_42b0_0)(uae_u32 opcode) /* CLR.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_42b8_0)(uae_u32 opcode) /* CLR.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_42b9_0)(uae_u32 opcode) /* CLR.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42c0_0)(uae_u32 opcode) /* MVSR2.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ MakeSR(); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr & 0xff) & 0xffff); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42d0_0)(uae_u32 opcode) /* MVSR2.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42d8_0)(uae_u32 opcode) /* MVSR2.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += 2; - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42e0_0)(uae_u32 opcode) /* MVSR2.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; - m68k_areg (regs, srcreg) = srca; - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42e8_0)(uae_u32 opcode) /* MVSR2.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42f0_0)(uae_u32 opcode) /* MVSR2.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42f8_0)(uae_u32 opcode) /* MVSR2.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42f9_0)(uae_u32 opcode) /* MVSR2.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4400_0)(uae_u32 opcode) /* NEG.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((dst) & 0xff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4410_0)(uae_u32 opcode) /* NEG.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4418_0)(uae_u32 opcode) /* NEG.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4420_0)(uae_u32 opcode) /* NEG.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4428_0)(uae_u32 opcode) /* NEG.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4430_0)(uae_u32 opcode) /* NEG.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4438_0)(uae_u32 opcode) /* NEG.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4439_0)(uae_u32 opcode) /* NEG.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4440_0)(uae_u32 opcode) /* NEG.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4450_0)(uae_u32 opcode) /* NEG.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4458_0)(uae_u32 opcode) /* NEG.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4460_0)(uae_u32 opcode) /* NEG.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4468_0)(uae_u32 opcode) /* NEG.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4470_0)(uae_u32 opcode) /* NEG.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4478_0)(uae_u32 opcode) /* NEG.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4479_0)(uae_u32 opcode) /* NEG.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4480_0)(uae_u32 opcode) /* NEG.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, srcreg) = (dst); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4490_0)(uae_u32 opcode) /* NEG.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4498_0)(uae_u32 opcode) /* NEG.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44a0_0)(uae_u32 opcode) /* NEG.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44a8_0)(uae_u32 opcode) /* NEG.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44b0_0)(uae_u32 opcode) /* NEG.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44b8_0)(uae_u32 opcode) /* NEG.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44b9_0)(uae_u32 opcode) /* NEG.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44c0_0)(uae_u32 opcode) /* MV2SR.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44d0_0)(uae_u32 opcode) /* MV2SR.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44d8_0)(uae_u32 opcode) /* MV2SR.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44e0_0)(uae_u32 opcode) /* MV2SR.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44e8_0)(uae_u32 opcode) /* MV2SR.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44f0_0)(uae_u32 opcode) /* MV2SR.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44f8_0)(uae_u32 opcode) /* MV2SR.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44f9_0)(uae_u32 opcode) /* MV2SR.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44fa_0)(uae_u32 opcode) /* MV2SR.B (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44fb_0)(uae_u32 opcode) /* MV2SR.B (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44fc_0)(uae_u32 opcode) /* MV2SR.B #.B */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4600_0)(uae_u32 opcode) /* NOT.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((dst) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4610_0)(uae_u32 opcode) /* NOT.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4618_0)(uae_u32 opcode) /* NOT.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4620_0)(uae_u32 opcode) /* NOT.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4628_0)(uae_u32 opcode) /* NOT.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4630_0)(uae_u32 opcode) /* NOT.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4638_0)(uae_u32 opcode) /* NOT.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4639_0)(uae_u32 opcode) /* NOT.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4640_0)(uae_u32 opcode) /* NOT.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4650_0)(uae_u32 opcode) /* NOT.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4658_0)(uae_u32 opcode) /* NOT.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4660_0)(uae_u32 opcode) /* NOT.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4668_0)(uae_u32 opcode) /* NOT.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4670_0)(uae_u32 opcode) /* NOT.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4678_0)(uae_u32 opcode) /* NOT.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4679_0)(uae_u32 opcode) /* NOT.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4680_0)(uae_u32 opcode) /* NOT.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - m68k_dreg(regs, srcreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4690_0)(uae_u32 opcode) /* NOT.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4698_0)(uae_u32 opcode) /* NOT.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46a0_0)(uae_u32 opcode) /* NOT.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46a8_0)(uae_u32 opcode) /* NOT.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46b0_0)(uae_u32 opcode) /* NOT.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46b8_0)(uae_u32 opcode) /* NOT.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46b9_0)(uae_u32 opcode) /* NOT.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46c0_0)(uae_u32 opcode) /* MV2SR.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel773; } -{{ uae_s16 src = m68k_dreg(regs, srcreg); - regs.sr = src; - MakeFromSR(); -}}}m68k_incpc(2); -endlabel773: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46d0_0)(uae_u32 opcode) /* MV2SR.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel774; } -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(2); -endlabel774: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46d8_0)(uae_u32 opcode) /* MV2SR.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel775; } -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(2); -endlabel775: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46e0_0)(uae_u32 opcode) /* MV2SR.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel776; } -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(2); -endlabel776: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46e8_0)(uae_u32 opcode) /* MV2SR.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel777; } -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(4); -endlabel777: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46f0_0)(uae_u32 opcode) /* MV2SR.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel778; } -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}}endlabel778: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46f8_0)(uae_u32 opcode) /* MV2SR.W (xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel779; } -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(4); -endlabel779: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46f9_0)(uae_u32 opcode) /* MV2SR.W (xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel780; } -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(6); -endlabel780: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46fa_0)(uae_u32 opcode) /* MV2SR.W (d16,PC) */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel781; } -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(4); -endlabel781: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46fb_0)(uae_u32 opcode) /* MV2SR.W (d8,PC,Xn) */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel782; } -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}}endlabel782: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46fc_0)(uae_u32 opcode) /* MV2SR.W #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel783; } -{{ uae_s16 src = get_iword(2); - regs.sr = src; - MakeFromSR(); -}}}m68k_incpc(4); -endlabel783: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4800_0)(uae_u32 opcode) /* NBCD.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4808_0)(uae_u32 opcode) /* LINK.L An,#.L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr olda = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = olda; -{ uae_s32 src = m68k_areg(regs, srcreg); - put_long(olda,src); - m68k_areg(regs, srcreg) = (m68k_areg(regs, 7)); -{ uae_s32 offs = get_ilong(2); - m68k_areg(regs, 7) += offs; -}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4810_0)(uae_u32 opcode) /* NBCD.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4818_0)(uae_u32 opcode) /* NBCD.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4820_0)(uae_u32 opcode) /* NBCD.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4828_0)(uae_u32 opcode) /* NBCD.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4830_0)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4838_0)(uae_u32 opcode) /* NBCD.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4839_0)(uae_u32 opcode) /* NBCD.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(srca,newv); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4840_0)(uae_u32 opcode) /* SWAP.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - m68k_dreg(regs, srcreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4848_0)(uae_u32 opcode) /* BKPT.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{m68k_incpc(2); - op_illg(opcode); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4850_0)(uae_u32 opcode) /* PEA.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4868_0)(uae_u32 opcode) /* PEA.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4870_0)(uae_u32 opcode) /* PEA.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4878_0)(uae_u32 opcode) /* PEA.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4879_0)(uae_u32 opcode) /* PEA.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_487a_0)(uae_u32 opcode) /* PEA.L (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_487b_0)(uae_u32 opcode) /* PEA.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}} cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4880_0)(uae_u32 opcode) /* EXT.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u16 dst = (uae_s16)(uae_s8)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((dst) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4890_0)(uae_u32 opcode) /* MVMLE.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48a0_0)(uae_u32 opcode) /* MVMLE.W #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg) - 0; -{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff; - while (amask) { srca -= 2; put_word(srca, m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; } - while (dmask) { srca -= 2; put_word(srca, m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; } - m68k_areg(regs, dstreg) = srca; -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48a8_0)(uae_u32 opcode) /* MVMLE.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48b0_0)(uae_u32 opcode) /* MVMLE.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{m68k_incpc(4); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48b8_0)(uae_u32 opcode) /* MVMLE.W #.W,(xxx).W */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48b9_0)(uae_u32 opcode) /* MVMLE.W #.W,(xxx).L */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = get_ilong(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(8); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_48c0_0)(uae_u32 opcode) /* EXT.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - m68k_dreg(regs, srcreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48d0_0)(uae_u32 opcode) /* MVMLE.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48e0_0)(uae_u32 opcode) /* MVMLE.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg) - 0; -{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff; - while (amask) { srca -= 4; put_long(srca, m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; } - while (dmask) { srca -= 4; put_long(srca, m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; } - m68k_areg(regs, dstreg) = srca; -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48e8_0)(uae_u32 opcode) /* MVMLE.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48f0_0)(uae_u32 opcode) /* MVMLE.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{m68k_incpc(4); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48f8_0)(uae_u32 opcode) /* MVMLE.L #.W,(xxx).W */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48f9_0)(uae_u32 opcode) /* MVMLE.L #.W,(xxx).L */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = get_ilong(4); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(8); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_49c0_0)(uae_u32 opcode) /* EXT.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_u32 dst = (uae_s32)(uae_s8)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - m68k_dreg(regs, srcreg) = (dst); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a00_0)(uae_u32 opcode) /* TST.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a10_0)(uae_u32 opcode) /* TST.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a18_0)(uae_u32 opcode) /* TST.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a20_0)(uae_u32 opcode) /* TST.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a28_0)(uae_u32 opcode) /* TST.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a30_0)(uae_u32 opcode) /* TST.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a38_0)(uae_u32 opcode) /* TST.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a39_0)(uae_u32 opcode) /* TST.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a3a_0)(uae_u32 opcode) /* TST.B (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a3b_0)(uae_u32 opcode) /* TST.B (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a3c_0)(uae_u32 opcode) /* TST.B #.B */ -{ - cpuop_begin(); -{{ uae_s8 src = get_ibyte(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a40_0)(uae_u32 opcode) /* TST.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a48_0)(uae_u32 opcode) /* TST.W An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a50_0)(uae_u32 opcode) /* TST.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a58_0)(uae_u32 opcode) /* TST.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a60_0)(uae_u32 opcode) /* TST.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a68_0)(uae_u32 opcode) /* TST.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a70_0)(uae_u32 opcode) /* TST.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a78_0)(uae_u32 opcode) /* TST.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a79_0)(uae_u32 opcode) /* TST.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a7a_0)(uae_u32 opcode) /* TST.W (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a7b_0)(uae_u32 opcode) /* TST.W (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a7c_0)(uae_u32 opcode) /* TST.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a80_0)(uae_u32 opcode) /* TST.L Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a88_0)(uae_u32 opcode) /* TST.L An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a90_0)(uae_u32 opcode) /* TST.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a98_0)(uae_u32 opcode) /* TST.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4aa0_0)(uae_u32 opcode) /* TST.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4aa8_0)(uae_u32 opcode) /* TST.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ab0_0)(uae_u32 opcode) /* TST.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ab8_0)(uae_u32 opcode) /* TST.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ab9_0)(uae_u32 opcode) /* TST.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4aba_0)(uae_u32 opcode) /* TST.L (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4abb_0)(uae_u32 opcode) /* TST.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4abc_0)(uae_u32 opcode) /* TST.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ac0_0)(uae_u32 opcode) /* TAS.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((src) & 0xff); -}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ad0_0)(uae_u32 opcode) /* TAS.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ad8_0)(uae_u32 opcode) /* TAS.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ae0_0)(uae_u32 opcode) /* TAS.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ae8_0)(uae_u32 opcode) /* TAS.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4af0_0)(uae_u32 opcode) /* TAS.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4af8_0)(uae_u32 opcode) /* TAS.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4af9_0)(uae_u32 opcode) /* TAS.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c00_0)(uae_u32 opcode) /* MULL.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - m68k_mull(opcode, dst, extra); -}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c10_0)(uae_u32 opcode) /* MULL.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(4); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c18_0)(uae_u32 opcode) /* MULL.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -m68k_incpc(4); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c20_0)(uae_u32 opcode) /* MULL.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -m68k_incpc(4); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c28_0)(uae_u32 opcode) /* MULL.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(6); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c30_0)(uae_u32 opcode) /* MULL.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - m68k_mull(opcode, dst, extra); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c38_0)(uae_u32 opcode) /* MULL.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(6); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c39_0)(uae_u32 opcode) /* MULL.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(8); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c3a_0)(uae_u32 opcode) /* MULL.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(6); - m68k_mull(opcode, dst, extra); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c3b_0)(uae_u32 opcode) /* MULL.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 dst = get_long(dsta); - m68k_mull(opcode, dst, extra); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c3c_0)(uae_u32 opcode) /* MULL.L #.W,#.L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uae_s32 dst = get_ilong(4); -m68k_incpc(8); - m68k_mull(opcode, dst, extra); -}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c40_0)(uae_u32 opcode) /* DIVL.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - m68k_divl(opcode, dst, extra, oldpc); -}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c50_0)(uae_u32 opcode) /* DIVL.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(2); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c58_0)(uae_u32 opcode) /* DIVL.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -m68k_incpc(2); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c60_0)(uae_u32 opcode) /* DIVL.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -m68k_incpc(2); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c68_0)(uae_u32 opcode) /* DIVL.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(4); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c70_0)(uae_u32 opcode) /* DIVL.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - m68k_divl(opcode, dst, extra, oldpc); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c78_0)(uae_u32 opcode) /* DIVL.L #.W,(xxx).W */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(4); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c79_0)(uae_u32 opcode) /* DIVL.L #.W,(xxx).L */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(6); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c7a_0)(uae_u32 opcode) /* DIVL.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uaecptr dsta = m68k_getpc () + 2; - dsta += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -m68k_incpc(4); - m68k_divl(opcode, dst, extra, oldpc); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c7b_0)(uae_u32 opcode) /* DIVL.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 dst = get_long(dsta); - m68k_divl(opcode, dst, extra, oldpc); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4c7c_0)(uae_u32 opcode) /* DIVL.L #.W,#.L */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -{ uae_s32 dst = get_ilong(2); -m68k_incpc(6); - m68k_divl(opcode, dst, extra, oldpc); -}}}} cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4c90_0)(uae_u32 opcode) /* MVMEL.W #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4c98_0)(uae_u32 opcode) /* MVMEL.W #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } - m68k_areg(regs, dstreg) = srca; -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ca8_0)(uae_u32 opcode) /* MVMEL.W #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cb0_0)(uae_u32 opcode) /* MVMEL.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{m68k_incpc(4); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cb8_0)(uae_u32 opcode) /* MVMEL.W #.W,(xxx).W */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cb9_0)(uae_u32 opcode) /* MVMEL.W #.W,(xxx).L */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = get_ilong(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(8); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cba_0)(uae_u32 opcode) /* MVMEL.W #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_getpc () + 4; - srca += (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cbb_0)(uae_u32 opcode) /* MVMEL.W #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cd0_0)(uae_u32 opcode) /* MVMEL.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cd8_0)(uae_u32 opcode) /* MVMEL.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } - m68k_areg(regs, dstreg) = srca; -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ce8_0)(uae_u32 opcode) /* MVMEL.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cf0_0)(uae_u32 opcode) /* MVMEL.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{m68k_incpc(4); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cf8_0)(uae_u32 opcode) /* MVMEL.L #.W,(xxx).W */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cf9_0)(uae_u32 opcode) /* MVMEL.L #.W,(xxx).L */ -{ - cpuop_begin(); -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = get_ilong(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(8); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cfa_0)(uae_u32 opcode) /* MVMEL.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = m68k_getpc () + 4; - srca += (uae_s32)(uae_s16)get_iword(4); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cfb_0)(uae_u32 opcode) /* MVMEL.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e40_0)(uae_u32 opcode) /* TRAP.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 15); -#else - uae_u32 srcreg = (opcode & 15); -#endif -{{ uae_u32 src = srcreg; -m68k_incpc(2); - Exception(src+32,0); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e50_0)(uae_u32 opcode) /* LINK.W An,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr olda = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = olda; -{ uae_s32 src = m68k_areg(regs, srcreg); - put_long(olda,src); - m68k_areg(regs, srcreg) = (m68k_areg(regs, 7)); -{ uae_s16 offs = get_iword(2); - m68k_areg(regs, 7) += offs; -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e58_0)(uae_u32 opcode) /* UNLK.L An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); - m68k_areg(regs, 7) = src; -{ uaecptr olda = m68k_areg(regs, 7); -{ uae_s32 old = get_long(olda); - m68k_areg(regs, 7) += 4; - m68k_areg(regs, srcreg) = (old); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e60_0)(uae_u32 opcode) /* MVR2USP.L An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel901; } -{{ uae_s32 src = m68k_areg(regs, srcreg); - regs.usp = src; -}}}m68k_incpc(2); -endlabel901: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e68_0)(uae_u32 opcode) /* MVUSP2R.L An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel902; } -{{ m68k_areg(regs, srcreg) = (regs.usp); -}}}m68k_incpc(2); -endlabel902: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e70_0)(uae_u32 opcode) /* RESET.L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel903; } -{}}m68k_incpc(2); -endlabel903: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e71_0)(uae_u32 opcode) /* NOP.L */ -{ - cpuop_begin(); -{}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4e72_0)(uae_u32 opcode) /* STOP.L #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel905; } -{{ uae_s16 src = get_iword(2); - regs.sr = src; - MakeFromSR(); - m68k_setstopped(1); -}}}m68k_incpc(4); -endlabel905: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4e73_0)(uae_u32 opcode) /* RTE.L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel906; } -{ uae_u16 newsr; uae_u32 newpc; for (;;) { -{ uaecptr sra = m68k_areg(regs, 7); -{ uae_s16 sr = get_word(sra); - m68k_areg(regs, 7) += 2; -{ uaecptr pca = m68k_areg(regs, 7); -{ uae_s32 pc = get_long(pca); - m68k_areg(regs, 7) += 4; -{ uaecptr formata = m68k_areg(regs, 7); -{ uae_s16 format = get_word(formata); - m68k_areg(regs, 7) += 2; - newsr = sr; newpc = pc; - if ((format & 0xF000) == 0x0000) { break; } - else if ((format & 0xF000) == 0x1000) { ; } - else if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; } - else if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; } - else if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; } - else if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; } - else if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; } - else if ((format & 0xF000) == 0xa000) { m68k_areg(regs, 7) += 24; break; } - else if ((format & 0xF000) == 0xb000) { m68k_areg(regs, 7) += 84; break; } - else { Exception(14,0); goto endlabel906; } - regs.sr = newsr; MakeFromSR(); -} -}}}}}} regs.sr = newsr; MakeFromSR(); - m68k_setpc_rte(newpc); -}}endlabel906: ; - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e74_0)(uae_u32 opcode) /* RTD.L #.W */ -{ - cpuop_begin(); -{{ uaecptr pca = m68k_areg(regs, 7); -{ uae_s32 pc = get_long(pca); - m68k_areg(regs, 7) += 4; -{ uae_s16 offs = get_iword(2); - m68k_areg(regs, 7) += offs; - m68k_setpc_rte(pc); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e75_0)(uae_u32 opcode) /* RTS.L */ -{ - cpuop_begin(); -{ m68k_do_rts(); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e76_0)(uae_u32 opcode) /* TRAPV.L */ -{ - cpuop_begin(); -{m68k_incpc(2); - if (GET_VFLG) { Exception(7,m68k_getpc()); goto endlabel909; } -}endlabel909: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4e77_0)(uae_u32 opcode) /* RTR.L */ -{ - cpuop_begin(); -{ MakeSR(); -{ uaecptr sra = m68k_areg(regs, 7); -{ uae_s16 sr = get_word(sra); - m68k_areg(regs, 7) += 2; -{ uaecptr pca = m68k_areg(regs, 7); -{ uae_s32 pc = get_long(pca); - m68k_areg(regs, 7) += 4; - regs.sr &= 0xFF00; sr &= 0xFF; - regs.sr |= sr; m68k_setpc(pc); - MakeFromSR(); -}}}}} cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e7a_0)(uae_u32 opcode) /* MOVEC2.L #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel911; } -{{ uae_s16 src = get_iword(2); -{ int regno = (src >> 12) & 15; - uae_u32 *regp = regs.regs + regno; - if (! m68k_movec2(src & 0xFFF, regp)) goto endlabel911; -}}}}m68k_incpc(4); -endlabel911: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e7b_0)(uae_u32 opcode) /* MOVE2C.L #.W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel912; } -{{ uae_s16 src = get_iword(2); -{ int regno = (src >> 12) & 15; - uae_u32 *regp = regs.regs + regno; - if (! m68k_move2c(src & 0xFFF, regp)) goto endlabel912; -}}}}m68k_incpc(4); -endlabel912: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4e90_0)(uae_u32 opcode) /* JSR.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_do_jsr(m68k_getpc() + 2, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ea8_0)(uae_u32 opcode) /* JSR.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - m68k_do_jsr(m68k_getpc() + 4, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4eb0_0)(uae_u32 opcode) /* JSR.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - m68k_do_jsr(m68k_getpc() + 0, srca); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4eb8_0)(uae_u32 opcode) /* JSR.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - m68k_do_jsr(m68k_getpc() + 4, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4eb9_0)(uae_u32 opcode) /* JSR.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - m68k_do_jsr(m68k_getpc() + 6, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4eba_0)(uae_u32 opcode) /* JSR.L (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); - m68k_do_jsr(m68k_getpc() + 4, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ebb_0)(uae_u32 opcode) /* JSR.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); - m68k_do_jsr(m68k_getpc() + 0, srca); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ed0_0)(uae_u32 opcode) /* JMP.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ee8_0)(uae_u32 opcode) /* JMP.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ef0_0)(uae_u32 opcode) /* JMP.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); - m68k_setpc(srca); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ef8_0)(uae_u32 opcode) /* JMP.L (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ef9_0)(uae_u32 opcode) /* JMP.L (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4efa_0)(uae_u32 opcode) /* JMP.L (d16,PC) */ -{ - cpuop_begin(); -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4efb_0)(uae_u32 opcode) /* JMP.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); - m68k_setpc(srca); -}}} cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5000_0)(uae_u32 opcode) /* ADD.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5010_0)(uae_u32 opcode) /* ADD.B #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5018_0)(uae_u32 opcode) /* ADD.B #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5020_0)(uae_u32 opcode) /* ADD.B #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5028_0)(uae_u32 opcode) /* ADD.B #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5030_0)(uae_u32 opcode) /* ADD.B #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5038_0)(uae_u32 opcode) /* ADD.B #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5039_0)(uae_u32 opcode) /* ADD.B #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -#endif - -#ifdef PART_5 -void REGPARAM2 CPUFUNC(op_5040_0)(uae_u32 opcode) /* ADD.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5048_0)(uae_u32 opcode) /* ADDA.W #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5050_0)(uae_u32 opcode) /* ADD.W #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5058_0)(uae_u32 opcode) /* ADD.W #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5060_0)(uae_u32 opcode) /* ADD.W #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5068_0)(uae_u32 opcode) /* ADD.W #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5070_0)(uae_u32 opcode) /* ADD.W #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5078_0)(uae_u32 opcode) /* ADD.W #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5079_0)(uae_u32 opcode) /* ADD.W #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5080_0)(uae_u32 opcode) /* ADD.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5088_0)(uae_u32 opcode) /* ADDA.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5090_0)(uae_u32 opcode) /* ADD.L #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5098_0)(uae_u32 opcode) /* ADD.L #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50a0_0)(uae_u32 opcode) /* ADD.L #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50a8_0)(uae_u32 opcode) /* ADD.L #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50b0_0)(uae_u32 opcode) /* ADD.L #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50b8_0)(uae_u32 opcode) /* ADD.L #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50b9_0)(uae_u32 opcode) /* ADD.L #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(0) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(0)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel954: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel962; } -}}m68k_incpc(4); -endlabel962: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel963; } -}}m68k_incpc(6); -endlabel963: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(0)) { Exception(7,m68k_getpc()); goto endlabel964; } -}m68k_incpc(2); -endlabel964: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5100_0)(uae_u32 opcode) /* SUB.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5110_0)(uae_u32 opcode) /* SUB.B #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5118_0)(uae_u32 opcode) /* SUB.B #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5120_0)(uae_u32 opcode) /* SUB.B #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5128_0)(uae_u32 opcode) /* SUB.B #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5130_0)(uae_u32 opcode) /* SUB.B #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5138_0)(uae_u32 opcode) /* SUB.B #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5139_0)(uae_u32 opcode) /* SUB.B #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5140_0)(uae_u32 opcode) /* SUB.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5148_0)(uae_u32 opcode) /* SUBA.W #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5150_0)(uae_u32 opcode) /* SUB.W #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5158_0)(uae_u32 opcode) /* SUB.W #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5160_0)(uae_u32 opcode) /* SUB.W #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5168_0)(uae_u32 opcode) /* SUB.W #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5170_0)(uae_u32 opcode) /* SUB.W #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5178_0)(uae_u32 opcode) /* SUB.W #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5179_0)(uae_u32 opcode) /* SUB.W #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5180_0)(uae_u32 opcode) /* SUB.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5188_0)(uae_u32 opcode) /* SUBA.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5190_0)(uae_u32 opcode) /* SUB.L #,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5198_0)(uae_u32 opcode) /* SUB.L #,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51a0_0)(uae_u32 opcode) /* SUB.L #,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51a8_0)(uae_u32 opcode) /* SUB.L #,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51b0_0)(uae_u32 opcode) /* SUB.L #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51b8_0)(uae_u32 opcode) /* SUB.L #,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51b9_0)(uae_u32 opcode) /* SUB.L #,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(1) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(1)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel992: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1000; } -}}m68k_incpc(4); -endlabel1000: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1001; } -}}m68k_incpc(6); -endlabel1001: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(1)) { Exception(7,m68k_getpc()); goto endlabel1002; } -}m68k_incpc(2); -endlabel1002: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(2) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(2)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1004: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1012; } -}}m68k_incpc(4); -endlabel1012: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1013; } -}}m68k_incpc(6); -endlabel1013: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(2)) { Exception(7,m68k_getpc()); goto endlabel1014; } -}m68k_incpc(2); -endlabel1014: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(3) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(3)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1016: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1024; } -}}m68k_incpc(4); -endlabel1024: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1025; } -}}m68k_incpc(6); -endlabel1025: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(3)) { Exception(7,m68k_getpc()); goto endlabel1026; } -}m68k_incpc(2); -endlabel1026: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(4) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(4)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1028: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1036; } -}}m68k_incpc(4); -endlabel1036: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1037; } -}}m68k_incpc(6); -endlabel1037: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(4)) { Exception(7,m68k_getpc()); goto endlabel1038; } -}m68k_incpc(2); -endlabel1038: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(5) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(5)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1040: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1048; } -}}m68k_incpc(4); -endlabel1048: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1049; } -}}m68k_incpc(6); -endlabel1049: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(5)) { Exception(7,m68k_getpc()); goto endlabel1050; } -}m68k_incpc(2); -endlabel1050: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(6) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(6)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1052: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1060; } -}}m68k_incpc(4); -endlabel1060: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1061; } -}}m68k_incpc(6); -endlabel1061: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(6)) { Exception(7,m68k_getpc()); goto endlabel1062; } -}m68k_incpc(2); -endlabel1062: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(7) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(7)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1064: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1072; } -}}m68k_incpc(4); -endlabel1072: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1073; } -}}m68k_incpc(6); -endlabel1073: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(7)) { Exception(7,m68k_getpc()); goto endlabel1074; } -}m68k_incpc(2); -endlabel1074: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(8) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(8)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1076: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1084; } -}}m68k_incpc(4); -endlabel1084: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1085; } -}}m68k_incpc(6); -endlabel1085: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(8)) { Exception(7,m68k_getpc()); goto endlabel1086; } -}m68k_incpc(2); -endlabel1086: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59c0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(9) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59c8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(9)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1088: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59d0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59d8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59e0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59e8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59f0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59f8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59f9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59fa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1096; } -}}m68k_incpc(4); -endlabel1096: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59fb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1097; } -}}m68k_incpc(6); -endlabel1097: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59fc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(9)) { Exception(7,m68k_getpc()); goto endlabel1098; } -}m68k_incpc(2); -endlabel1098: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ac0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(10) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ac8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(10)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1100: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ad0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ad8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ae0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ae8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5af0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5af8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5af9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5afa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1108; } -}}m68k_incpc(4); -endlabel1108: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5afb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1109; } -}}m68k_incpc(6); -endlabel1109: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5afc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(10)) { Exception(7,m68k_getpc()); goto endlabel1110; } -}m68k_incpc(2); -endlabel1110: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bc0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(11) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(11)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1112: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bd0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5be0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5be8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bf0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bf8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bf9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1120; } -}}m68k_incpc(4); -endlabel1120: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1121; } -}}m68k_incpc(6); -endlabel1121: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bfc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(11)) { Exception(7,m68k_getpc()); goto endlabel1122; } -}m68k_incpc(2); -endlabel1122: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cc0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(12) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(12)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1124: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cd0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ce0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ce8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cf0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cf8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cf9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1132; } -}}m68k_incpc(4); -endlabel1132: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1133; } -}}m68k_incpc(6); -endlabel1133: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cfc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(12)) { Exception(7,m68k_getpc()); goto endlabel1134; } -}m68k_incpc(2); -endlabel1134: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dc0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(13) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(13)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1136: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dd0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5de0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5de8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5df0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5df8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5df9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dfa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1144; } -}}m68k_incpc(4); -endlabel1144: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dfb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1145; } -}}m68k_incpc(6); -endlabel1145: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5dfc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(13)) { Exception(7,m68k_getpc()); goto endlabel1146; } -}m68k_incpc(2); -endlabel1146: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ec0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(14) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ec8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(14)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1148: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ed0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ed8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ee0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ee8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ef0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ef8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ef9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5efa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1156; } -}}m68k_incpc(4); -endlabel1156: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5efb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1157; } -}}m68k_incpc(6); -endlabel1157: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5efc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(14)) { Exception(7,m68k_getpc()); goto endlabel1158; } -}m68k_incpc(2); -endlabel1158: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fc0_0)(uae_u32 opcode) /* Scc.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{{ int val = cctrue(15) ? 0xff : 0; - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((val) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fc8_0)(uae_u32 opcode) /* DBcc.W Dn,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 offs = get_iword(2); - if (!cctrue(15)) { - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | (((src-1)) & 0xffff); - if (src) { - m68k_incpc((uae_s32)offs + 2); -return; - } - } -}}}m68k_incpc(4); -endlabel1160: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fd0_0)(uae_u32 opcode) /* Scc.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fd8_0)(uae_u32 opcode) /* Scc.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fe0_0)(uae_u32 opcode) /* Scc.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; - m68k_areg (regs, srcreg) = srca; -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5fe8_0)(uae_u32 opcode) /* Scc.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ff0_0)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ff8_0)(uae_u32 opcode) /* Scc.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ff9_0)(uae_u32 opcode) /* Scc.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#endif - -#ifdef PART_6 -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ffa_0)(uae_u32 opcode) /* TRAPcc.L #.W */ -{ - cpuop_begin(); -{{ uae_s16 dummy = get_iword(2); - if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1168; } -}}m68k_incpc(4); -endlabel1168: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ffb_0)(uae_u32 opcode) /* TRAPcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 dummy = get_ilong(2); - if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1169; } -}}m68k_incpc(6); -endlabel1169: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ffc_0)(uae_u32 opcode) /* TRAPcc.L */ -{ - cpuop_begin(); -{ if (cctrue(15)) { Exception(7,m68k_getpc()); goto endlabel1170; } -}m68k_incpc(2); -endlabel1170: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6000_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(0)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1171: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6001_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(0)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1172: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_60ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(0)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1173: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6100_0)(uae_u32 opcode) /* BSR.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - uae_s32 s = (uae_s32)src + 2; - m68k_do_bsr(m68k_getpc() + 4, s); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6101_0)(uae_u32 opcode) /* BSR.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - uae_s32 s = (uae_s32)src + 2; - m68k_do_bsr(m68k_getpc() + 2, s); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_61ff_0)(uae_u32 opcode) /* BSR.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - uae_s32 s = (uae_s32)src + 2; - m68k_do_bsr(m68k_getpc() + 6, s); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6200_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(2)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1177: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6201_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(2)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1178: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_62ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(2)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1179: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6300_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(3)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1180: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6301_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(3)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1181: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_63ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(3)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1182: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6400_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(4)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1183: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6401_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(4)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1184: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_64ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(4)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1185: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6500_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(5)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1186: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6501_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(5)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1187: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_65ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(5)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1188: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6600_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(6)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1189: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6601_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(6)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1190: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_66ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(6)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1191: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6700_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(7)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1192: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6701_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(7)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1193: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_67ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(7)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1194: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6800_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(8)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1195: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6801_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(8)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1196: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_68ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(8)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1197: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6900_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(9)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1198: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6901_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(9)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1199: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_69ff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(9)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1200: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6a00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(10)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1201: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6a01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(10)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1202: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6aff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(10)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1203: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6b00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(11)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1204: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6b01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(11)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1205: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6bff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(11)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1206: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6c00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(12)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1207: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6c01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(12)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1208: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6cff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(12)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1209: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6d00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(13)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1210: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6d01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(13)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1211: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6dff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(13)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1212: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6e00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(14)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1213: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6e01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(14)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1214: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6eff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(14)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1215: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6f00_0)(uae_u32 opcode) /* Bcc.W #.W */ -{ - cpuop_begin(); -{{ uae_s16 src = get_iword(2); - if (!cctrue(15)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(4); -endlabel1216: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6f01_0)(uae_u32 opcode) /* Bcc.B # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -{{ uae_u32 src = srcreg; - if (!cctrue(15)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(2); -endlabel1217: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6fff_0)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{{ uae_s32 src = get_ilong(2); - if (!cctrue(15)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel1218: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_7000_0)(uae_u32 opcode) /* MOVE.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 8) & 255); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_u32 src = srcreg; -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_7100_0)(uae_u32 opcode) /* EMULOP_RETURN.L */ -{ - cpuop_begin(); -{ m68k_emulop_return(); -} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_7101_0)(uae_u32 opcode) /* EMULOP.L # */ -{ - cpuop_begin(); -{ -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - m68k_emulop(opcode); -}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_8000_0)(uae_u32 opcode) /* OR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8010_0)(uae_u32 opcode) /* OR.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8018_0)(uae_u32 opcode) /* OR.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8020_0)(uae_u32 opcode) /* OR.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8028_0)(uae_u32 opcode) /* OR.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8030_0)(uae_u32 opcode) /* OR.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8038_0)(uae_u32 opcode) /* OR.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8039_0)(uae_u32 opcode) /* OR.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_803a_0)(uae_u32 opcode) /* OR.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_803b_0)(uae_u32 opcode) /* OR.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_803c_0)(uae_u32 opcode) /* OR.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8040_0)(uae_u32 opcode) /* OR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8050_0)(uae_u32 opcode) /* OR.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8058_0)(uae_u32 opcode) /* OR.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8060_0)(uae_u32 opcode) /* OR.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8068_0)(uae_u32 opcode) /* OR.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8070_0)(uae_u32 opcode) /* OR.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8078_0)(uae_u32 opcode) /* OR.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8079_0)(uae_u32 opcode) /* OR.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_807a_0)(uae_u32 opcode) /* OR.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_807b_0)(uae_u32 opcode) /* OR.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_807c_0)(uae_u32 opcode) /* OR.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8080_0)(uae_u32 opcode) /* OR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8090_0)(uae_u32 opcode) /* OR.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8098_0)(uae_u32 opcode) /* OR.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80a0_0)(uae_u32 opcode) /* OR.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80a8_0)(uae_u32 opcode) /* OR.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80b0_0)(uae_u32 opcode) /* OR.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80b8_0)(uae_u32 opcode) /* OR.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80b9_0)(uae_u32 opcode) /* OR.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80ba_0)(uae_u32 opcode) /* OR.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80bb_0)(uae_u32 opcode) /* OR.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80bc_0)(uae_u32 opcode) /* OR.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80c0_0)(uae_u32 opcode) /* DIVU.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1255; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}endlabel1255: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80d0_0)(uae_u32 opcode) /* DIVU.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1256; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1256: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80d8_0)(uae_u32 opcode) /* DIVU.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1257; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1257: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80e0_0)(uae_u32 opcode) /* DIVU.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1258; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1258: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80e8_0)(uae_u32 opcode) /* DIVU.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1259; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1259: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80f0_0)(uae_u32 opcode) /* DIVU.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1260; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}}endlabel1260: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80f8_0)(uae_u32 opcode) /* DIVU.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1261; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1261: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80f9_0)(uae_u32 opcode) /* DIVU.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(6); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1262; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1262: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80fa_0)(uae_u32 opcode) /* DIVU.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1263; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1263: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80fb_0)(uae_u32 opcode) /* DIVU.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1264; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}}endlabel1264: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80fc_0)(uae_u32 opcode) /* DIVU.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel1265; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}endlabel1265: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8100_0)(uae_u32 opcode) /* SBCD.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); - uae_u16 newv, tmp_newv; - int bcd = 0; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; - if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } - SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8108_0)(uae_u32 opcode) /* SBCD.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); - uae_u16 newv, tmp_newv; - int bcd = 0; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; - if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } - SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(dsta,newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8110_0)(uae_u32 opcode) /* OR.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8118_0)(uae_u32 opcode) /* OR.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8120_0)(uae_u32 opcode) /* OR.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8128_0)(uae_u32 opcode) /* OR.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8130_0)(uae_u32 opcode) /* OR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8138_0)(uae_u32 opcode) /* OR.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8139_0)(uae_u32 opcode) /* OR.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_8140_0)(uae_u32 opcode) /* PACK.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uae_u16 val = m68k_dreg(regs, srcreg) + get_iword(2); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf); -}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_8148_0)(uae_u32 opcode) /* PACK.L -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uae_u16 val; - m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; - val = (uae_u16)get_byte(m68k_areg(regs, srcreg)); - m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; - val = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + get_iword(2); - m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; - put_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf)); -}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_8150_0)(uae_u32 opcode) /* OR.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8158_0)(uae_u32 opcode) /* OR.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8160_0)(uae_u32 opcode) /* OR.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8168_0)(uae_u32 opcode) /* OR.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8170_0)(uae_u32 opcode) /* OR.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8178_0)(uae_u32 opcode) /* OR.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8179_0)(uae_u32 opcode) /* OR.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_8180_0)(uae_u32 opcode) /* UNPK.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uae_u16 val = m68k_dreg(regs, srcreg); - val = (((val << 4) & 0xf00) | (val & 0xf)) + get_iword(2); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff); -}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_8188_0)(uae_u32 opcode) /* UNPK.L -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uae_u16 val; - m68k_areg(regs, srcreg) -= areg_byteinc[srcreg]; - val = (uae_u16)get_byte(m68k_areg(regs, srcreg)); - val = (((val << 4) & 0xf00) | (val & 0xf)) + get_iword(2); - m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; - put_byte(m68k_areg(regs, dstreg),val); - m68k_areg(regs, dstreg) -= areg_byteinc[dstreg]; - put_byte(m68k_areg(regs, dstreg),val >> 8); -}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_8190_0)(uae_u32 opcode) /* OR.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8198_0)(uae_u32 opcode) /* OR.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81a0_0)(uae_u32 opcode) /* OR.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81a8_0)(uae_u32 opcode) /* OR.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81b0_0)(uae_u32 opcode) /* OR.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81b8_0)(uae_u32 opcode) /* OR.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81b9_0)(uae_u32 opcode) /* OR.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81c0_0)(uae_u32 opcode) /* DIVS.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1293; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}endlabel1293: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81d0_0)(uae_u32 opcode) /* DIVS.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1294; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1294: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81d8_0)(uae_u32 opcode) /* DIVS.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1295; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1295: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81e0_0)(uae_u32 opcode) /* DIVS.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(2); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1296; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1296: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81e8_0)(uae_u32 opcode) /* DIVS.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1297; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1297: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81f0_0)(uae_u32 opcode) /* DIVS.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1298; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}}endlabel1298: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81f8_0)(uae_u32 opcode) /* DIVS.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1299; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1299: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81f9_0)(uae_u32 opcode) /* DIVS.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(6); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1300; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1300: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81fa_0)(uae_u32 opcode) /* DIVS.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1301; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel1301: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81fb_0)(uae_u32 opcode) /* DIVS.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1302; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}}endlabel1302: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81fc_0)(uae_u32 opcode) /* DIVS.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel1303; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}endlabel1303: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9000_0)(uae_u32 opcode) /* SUB.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9010_0)(uae_u32 opcode) /* SUB.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9018_0)(uae_u32 opcode) /* SUB.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9020_0)(uae_u32 opcode) /* SUB.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9028_0)(uae_u32 opcode) /* SUB.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9030_0)(uae_u32 opcode) /* SUB.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9038_0)(uae_u32 opcode) /* SUB.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9039_0)(uae_u32 opcode) /* SUB.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_903a_0)(uae_u32 opcode) /* SUB.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_903b_0)(uae_u32 opcode) /* SUB.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_903c_0)(uae_u32 opcode) /* SUB.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9040_0)(uae_u32 opcode) /* SUB.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9048_0)(uae_u32 opcode) /* SUB.W An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9050_0)(uae_u32 opcode) /* SUB.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9058_0)(uae_u32 opcode) /* SUB.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9060_0)(uae_u32 opcode) /* SUB.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9068_0)(uae_u32 opcode) /* SUB.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9070_0)(uae_u32 opcode) /* SUB.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9078_0)(uae_u32 opcode) /* SUB.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9079_0)(uae_u32 opcode) /* SUB.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_907a_0)(uae_u32 opcode) /* SUB.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_907b_0)(uae_u32 opcode) /* SUB.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_907c_0)(uae_u32 opcode) /* SUB.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9080_0)(uae_u32 opcode) /* SUB.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9088_0)(uae_u32 opcode) /* SUB.L An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9090_0)(uae_u32 opcode) /* SUB.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9098_0)(uae_u32 opcode) /* SUB.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90a0_0)(uae_u32 opcode) /* SUB.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90a8_0)(uae_u32 opcode) /* SUB.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90b0_0)(uae_u32 opcode) /* SUB.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90b8_0)(uae_u32 opcode) /* SUB.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90b9_0)(uae_u32 opcode) /* SUB.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90ba_0)(uae_u32 opcode) /* SUB.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90bb_0)(uae_u32 opcode) /* SUB.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90bc_0)(uae_u32 opcode) /* SUB.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90c0_0)(uae_u32 opcode) /* SUBA.W Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90c8_0)(uae_u32 opcode) /* SUBA.W An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90d0_0)(uae_u32 opcode) /* SUBA.W (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90d8_0)(uae_u32 opcode) /* SUBA.W (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90e0_0)(uae_u32 opcode) /* SUBA.W -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90e8_0)(uae_u32 opcode) /* SUBA.W (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90f0_0)(uae_u32 opcode) /* SUBA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90f8_0)(uae_u32 opcode) /* SUBA.W (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90f9_0)(uae_u32 opcode) /* SUBA.W (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90fa_0)(uae_u32 opcode) /* SUBA.W (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90fb_0)(uae_u32 opcode) /* SUBA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90fc_0)(uae_u32 opcode) /* SUBA.W #.W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_9100_0)(uae_u32 opcode) /* SUBX.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9108_0)(uae_u32 opcode) /* SUBX.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9110_0)(uae_u32 opcode) /* SUB.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9118_0)(uae_u32 opcode) /* SUB.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9120_0)(uae_u32 opcode) /* SUB.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9128_0)(uae_u32 opcode) /* SUB.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9130_0)(uae_u32 opcode) /* SUB.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9138_0)(uae_u32 opcode) /* SUB.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9139_0)(uae_u32 opcode) /* SUB.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9140_0)(uae_u32 opcode) /* SUBX.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9148_0)(uae_u32 opcode) /* SUBX.W -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9150_0)(uae_u32 opcode) /* SUB.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9158_0)(uae_u32 opcode) /* SUB.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9160_0)(uae_u32 opcode) /* SUB.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9168_0)(uae_u32 opcode) /* SUB.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9170_0)(uae_u32 opcode) /* SUB.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9178_0)(uae_u32 opcode) /* SUB.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9179_0)(uae_u32 opcode) /* SUB.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9180_0)(uae_u32 opcode) /* SUBX.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9188_0)(uae_u32 opcode) /* SUBX.L -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9190_0)(uae_u32 opcode) /* SUB.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9198_0)(uae_u32 opcode) /* SUB.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91a0_0)(uae_u32 opcode) /* SUB.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91a8_0)(uae_u32 opcode) /* SUB.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91b0_0)(uae_u32 opcode) /* SUB.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91b8_0)(uae_u32 opcode) /* SUB.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91b9_0)(uae_u32 opcode) /* SUB.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91c0_0)(uae_u32 opcode) /* SUBA.L Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91c8_0)(uae_u32 opcode) /* SUBA.L An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91d0_0)(uae_u32 opcode) /* SUBA.L (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91d8_0)(uae_u32 opcode) /* SUBA.L (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91e0_0)(uae_u32 opcode) /* SUBA.L -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91e8_0)(uae_u32 opcode) /* SUBA.L (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91f0_0)(uae_u32 opcode) /* SUBA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91f8_0)(uae_u32 opcode) /* SUBA.L (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91f9_0)(uae_u32 opcode) /* SUBA.L (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91fa_0)(uae_u32 opcode) /* SUBA.L (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91fb_0)(uae_u32 opcode) /* SUBA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91fc_0)(uae_u32 opcode) /* SUBA.L #.L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_b000_0)(uae_u32 opcode) /* CMP.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b010_0)(uae_u32 opcode) /* CMP.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b018_0)(uae_u32 opcode) /* CMP.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b020_0)(uae_u32 opcode) /* CMP.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b028_0)(uae_u32 opcode) /* CMP.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b030_0)(uae_u32 opcode) /* CMP.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b038_0)(uae_u32 opcode) /* CMP.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b039_0)(uae_u32 opcode) /* CMP.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b03a_0)(uae_u32 opcode) /* CMP.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b03b_0)(uae_u32 opcode) /* CMP.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b03c_0)(uae_u32 opcode) /* CMP.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b040_0)(uae_u32 opcode) /* CMP.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#endif - -#ifdef PART_7 -void REGPARAM2 CPUFUNC(op_b048_0)(uae_u32 opcode) /* CMP.W An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b050_0)(uae_u32 opcode) /* CMP.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b058_0)(uae_u32 opcode) /* CMP.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b060_0)(uae_u32 opcode) /* CMP.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b068_0)(uae_u32 opcode) /* CMP.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b070_0)(uae_u32 opcode) /* CMP.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b078_0)(uae_u32 opcode) /* CMP.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b079_0)(uae_u32 opcode) /* CMP.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b07a_0)(uae_u32 opcode) /* CMP.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b07b_0)(uae_u32 opcode) /* CMP.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b07c_0)(uae_u32 opcode) /* CMP.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b080_0)(uae_u32 opcode) /* CMP.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b088_0)(uae_u32 opcode) /* CMP.L An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b090_0)(uae_u32 opcode) /* CMP.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b098_0)(uae_u32 opcode) /* CMP.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0a0_0)(uae_u32 opcode) /* CMP.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0a8_0)(uae_u32 opcode) /* CMP.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0b0_0)(uae_u32 opcode) /* CMP.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0b8_0)(uae_u32 opcode) /* CMP.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0b9_0)(uae_u32 opcode) /* CMP.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0ba_0)(uae_u32 opcode) /* CMP.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0bb_0)(uae_u32 opcode) /* CMP.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0bc_0)(uae_u32 opcode) /* CMP.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0c0_0)(uae_u32 opcode) /* CMPA.W Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0c8_0)(uae_u32 opcode) /* CMPA.W An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0d0_0)(uae_u32 opcode) /* CMPA.W (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0d8_0)(uae_u32 opcode) /* CMPA.W (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0e0_0)(uae_u32 opcode) /* CMPA.W -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0e8_0)(uae_u32 opcode) /* CMPA.W (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0f0_0)(uae_u32 opcode) /* CMPA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0f8_0)(uae_u32 opcode) /* CMPA.W (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0f9_0)(uae_u32 opcode) /* CMPA.W (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0fa_0)(uae_u32 opcode) /* CMPA.W (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0fb_0)(uae_u32 opcode) /* CMPA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0fc_0)(uae_u32 opcode) /* CMPA.W #.W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b100_0)(uae_u32 opcode) /* EOR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b108_0)(uae_u32 opcode) /* CMPM.B (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b110_0)(uae_u32 opcode) /* EOR.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b118_0)(uae_u32 opcode) /* EOR.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b120_0)(uae_u32 opcode) /* EOR.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b128_0)(uae_u32 opcode) /* EOR.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b130_0)(uae_u32 opcode) /* EOR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b138_0)(uae_u32 opcode) /* EOR.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b139_0)(uae_u32 opcode) /* EOR.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b140_0)(uae_u32 opcode) /* EOR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b148_0)(uae_u32 opcode) /* CMPM.W (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b150_0)(uae_u32 opcode) /* EOR.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b158_0)(uae_u32 opcode) /* EOR.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b160_0)(uae_u32 opcode) /* EOR.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b168_0)(uae_u32 opcode) /* EOR.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b170_0)(uae_u32 opcode) /* EOR.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b178_0)(uae_u32 opcode) /* EOR.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b179_0)(uae_u32 opcode) /* EOR.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b180_0)(uae_u32 opcode) /* EOR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b188_0)(uae_u32 opcode) /* CMPM.L (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b190_0)(uae_u32 opcode) /* EOR.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b198_0)(uae_u32 opcode) /* EOR.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1a0_0)(uae_u32 opcode) /* EOR.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1a8_0)(uae_u32 opcode) /* EOR.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1b0_0)(uae_u32 opcode) /* EOR.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1b8_0)(uae_u32 opcode) /* EOR.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1b9_0)(uae_u32 opcode) /* EOR.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1c0_0)(uae_u32 opcode) /* CMPA.L Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1c8_0)(uae_u32 opcode) /* CMPA.L An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1d0_0)(uae_u32 opcode) /* CMPA.L (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1d8_0)(uae_u32 opcode) /* CMPA.L (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1e0_0)(uae_u32 opcode) /* CMPA.L -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1e8_0)(uae_u32 opcode) /* CMPA.L (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1f0_0)(uae_u32 opcode) /* CMPA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1f8_0)(uae_u32 opcode) /* CMPA.L (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1f9_0)(uae_u32 opcode) /* CMPA.L (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1fa_0)(uae_u32 opcode) /* CMPA.L (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1fb_0)(uae_u32 opcode) /* CMPA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1fc_0)(uae_u32 opcode) /* CMPA.L #.L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c000_0)(uae_u32 opcode) /* AND.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c010_0)(uae_u32 opcode) /* AND.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c018_0)(uae_u32 opcode) /* AND.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c020_0)(uae_u32 opcode) /* AND.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c028_0)(uae_u32 opcode) /* AND.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c030_0)(uae_u32 opcode) /* AND.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c038_0)(uae_u32 opcode) /* AND.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c039_0)(uae_u32 opcode) /* AND.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c03a_0)(uae_u32 opcode) /* AND.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c03b_0)(uae_u32 opcode) /* AND.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c03c_0)(uae_u32 opcode) /* AND.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c040_0)(uae_u32 opcode) /* AND.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c050_0)(uae_u32 opcode) /* AND.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c058_0)(uae_u32 opcode) /* AND.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c060_0)(uae_u32 opcode) /* AND.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c068_0)(uae_u32 opcode) /* AND.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c070_0)(uae_u32 opcode) /* AND.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c078_0)(uae_u32 opcode) /* AND.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c079_0)(uae_u32 opcode) /* AND.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c07a_0)(uae_u32 opcode) /* AND.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c07b_0)(uae_u32 opcode) /* AND.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c07c_0)(uae_u32 opcode) /* AND.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c080_0)(uae_u32 opcode) /* AND.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c090_0)(uae_u32 opcode) /* AND.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c098_0)(uae_u32 opcode) /* AND.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0a0_0)(uae_u32 opcode) /* AND.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0a8_0)(uae_u32 opcode) /* AND.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0b0_0)(uae_u32 opcode) /* AND.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0b8_0)(uae_u32 opcode) /* AND.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0b9_0)(uae_u32 opcode) /* AND.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0ba_0)(uae_u32 opcode) /* AND.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0bb_0)(uae_u32 opcode) /* AND.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0bc_0)(uae_u32 opcode) /* AND.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0c0_0)(uae_u32 opcode) /* MULU.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0d0_0)(uae_u32 opcode) /* MULU.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0d8_0)(uae_u32 opcode) /* MULU.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0e0_0)(uae_u32 opcode) /* MULU.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0e8_0)(uae_u32 opcode) /* MULU.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0f0_0)(uae_u32 opcode) /* MULU.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0f8_0)(uae_u32 opcode) /* MULU.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0f9_0)(uae_u32 opcode) /* MULU.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0fa_0)(uae_u32 opcode) /* MULU.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0fb_0)(uae_u32 opcode) /* MULU.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0fc_0)(uae_u32 opcode) /* MULU.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c100_0)(uae_u32 opcode) /* ABCD.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); - uae_u16 newv, tmp_newv; - int cflg; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo > 9) { newv += 6; } - cflg = (newv & 0x3F0) > 0x90; - if (cflg) newv += 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c108_0)(uae_u32 opcode) /* ABCD.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); - uae_u16 newv, tmp_newv; - int cflg; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo > 9) { newv += 6; } - cflg = (newv & 0x3F0) > 0x90; - if (cflg) newv += 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - put_byte(dsta,newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c110_0)(uae_u32 opcode) /* AND.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c118_0)(uae_u32 opcode) /* AND.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c120_0)(uae_u32 opcode) /* AND.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c128_0)(uae_u32 opcode) /* AND.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c130_0)(uae_u32 opcode) /* AND.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c138_0)(uae_u32 opcode) /* AND.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c139_0)(uae_u32 opcode) /* AND.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_c140_0)(uae_u32 opcode) /* EXG.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - m68k_dreg(regs, srcreg) = (dst); - m68k_dreg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_c148_0)(uae_u32 opcode) /* EXG.L An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); - m68k_areg(regs, srcreg) = (dst); - m68k_areg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_c150_0)(uae_u32 opcode) /* AND.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c158_0)(uae_u32 opcode) /* AND.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c160_0)(uae_u32 opcode) /* AND.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c168_0)(uae_u32 opcode) /* AND.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c170_0)(uae_u32 opcode) /* AND.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c178_0)(uae_u32 opcode) /* AND.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c179_0)(uae_u32 opcode) /* AND.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_c188_0)(uae_u32 opcode) /* EXG.L Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); - m68k_dreg(regs, srcreg) = (dst); - m68k_areg(regs, dstreg) = (src); -}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_c190_0)(uae_u32 opcode) /* AND.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c198_0)(uae_u32 opcode) /* AND.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1a0_0)(uae_u32 opcode) /* AND.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1a8_0)(uae_u32 opcode) /* AND.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1b0_0)(uae_u32 opcode) /* AND.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1b8_0)(uae_u32 opcode) /* AND.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1b9_0)(uae_u32 opcode) /* AND.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1c0_0)(uae_u32 opcode) /* MULS.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1d0_0)(uae_u32 opcode) /* MULS.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1d8_0)(uae_u32 opcode) /* MULS.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1e0_0)(uae_u32 opcode) /* MULS.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1e8_0)(uae_u32 opcode) /* MULS.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1f0_0)(uae_u32 opcode) /* MULS.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1f8_0)(uae_u32 opcode) /* MULS.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1f9_0)(uae_u32 opcode) /* MULS.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1fa_0)(uae_u32 opcode) /* MULS.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1fb_0)(uae_u32 opcode) /* MULS.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1fc_0)(uae_u32 opcode) /* MULS.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d000_0)(uae_u32 opcode) /* ADD.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d010_0)(uae_u32 opcode) /* ADD.B (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d018_0)(uae_u32 opcode) /* ADD.B (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d020_0)(uae_u32 opcode) /* ADD.B -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d028_0)(uae_u32 opcode) /* ADD.B (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d030_0)(uae_u32 opcode) /* ADD.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d038_0)(uae_u32 opcode) /* ADD.B (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d039_0)(uae_u32 opcode) /* ADD.B (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d03a_0)(uae_u32 opcode) /* ADD.B (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d03b_0)(uae_u32 opcode) /* ADD.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d03c_0)(uae_u32 opcode) /* ADD.B #.B,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d040_0)(uae_u32 opcode) /* ADD.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d048_0)(uae_u32 opcode) /* ADD.W An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d050_0)(uae_u32 opcode) /* ADD.W (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d058_0)(uae_u32 opcode) /* ADD.W (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d060_0)(uae_u32 opcode) /* ADD.W -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d068_0)(uae_u32 opcode) /* ADD.W (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d070_0)(uae_u32 opcode) /* ADD.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d078_0)(uae_u32 opcode) /* ADD.W (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d079_0)(uae_u32 opcode) /* ADD.W (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d07a_0)(uae_u32 opcode) /* ADD.W (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d07b_0)(uae_u32 opcode) /* ADD.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d07c_0)(uae_u32 opcode) /* ADD.W #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d080_0)(uae_u32 opcode) /* ADD.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d088_0)(uae_u32 opcode) /* ADD.L An,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d090_0)(uae_u32 opcode) /* ADD.L (An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d098_0)(uae_u32 opcode) /* ADD.L (An)+,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0a0_0)(uae_u32 opcode) /* ADD.L -(An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0a8_0)(uae_u32 opcode) /* ADD.L (d16,An),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0b0_0)(uae_u32 opcode) /* ADD.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0b8_0)(uae_u32 opcode) /* ADD.L (xxx).W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0b9_0)(uae_u32 opcode) /* ADD.L (xxx).L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0ba_0)(uae_u32 opcode) /* ADD.L (d16,PC),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0bb_0)(uae_u32 opcode) /* ADD.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0bc_0)(uae_u32 opcode) /* ADD.L #.L,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0c0_0)(uae_u32 opcode) /* ADDA.W Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0c8_0)(uae_u32 opcode) /* ADDA.W An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0d0_0)(uae_u32 opcode) /* ADDA.W (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0d8_0)(uae_u32 opcode) /* ADDA.W (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0e0_0)(uae_u32 opcode) /* ADDA.W -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0e8_0)(uae_u32 opcode) /* ADDA.W (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0f0_0)(uae_u32 opcode) /* ADDA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0f8_0)(uae_u32 opcode) /* ADDA.W (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0f9_0)(uae_u32 opcode) /* ADDA.W (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0fa_0)(uae_u32 opcode) /* ADDA.W (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0fb_0)(uae_u32 opcode) /* ADDA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0fc_0)(uae_u32 opcode) /* ADDA.W #.W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_d100_0)(uae_u32 opcode) /* ADDX.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d108_0)(uae_u32 opcode) /* ADDX.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d110_0)(uae_u32 opcode) /* ADD.B Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d118_0)(uae_u32 opcode) /* ADD.B Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s8 dst = get_byte(dsta); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d120_0)(uae_u32 opcode) /* ADD.B Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d128_0)(uae_u32 opcode) /* ADD.B Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d130_0)(uae_u32 opcode) /* ADD.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d138_0)(uae_u32 opcode) /* ADD.B Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d139_0)(uae_u32 opcode) /* ADD.B Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d140_0)(uae_u32 opcode) /* ADDX.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d148_0)(uae_u32 opcode) /* ADDX.W -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d150_0)(uae_u32 opcode) /* ADD.W Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d158_0)(uae_u32 opcode) /* ADD.W Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s16 dst = get_word(dsta); - m68k_areg(regs, dstreg) += 2; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d160_0)(uae_u32 opcode) /* ADD.W Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; -{ uae_s16 dst = get_word(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d168_0)(uae_u32 opcode) /* ADD.W Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d170_0)(uae_u32 opcode) /* ADD.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d178_0)(uae_u32 opcode) /* ADD.W Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d179_0)(uae_u32 opcode) /* ADD.W Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d180_0)(uae_u32 opcode) /* ADDX.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d188_0)(uae_u32 opcode) /* ADDX.L -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u32 newv = dst + src + (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d190_0)(uae_u32 opcode) /* ADD.L Dn,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d198_0)(uae_u32 opcode) /* ADD.L Dn,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 dst = get_long(dsta); - m68k_areg(regs, dstreg) += 4; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1a0_0)(uae_u32 opcode) /* ADD.L Dn,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; -{ uae_s32 dst = get_long(dsta); - m68k_areg (regs, dstreg) = dsta; -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1a8_0)(uae_u32 opcode) /* ADD.L Dn,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1b0_0)(uae_u32 opcode) /* ADD.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{m68k_incpc(2); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1b8_0)(uae_u32 opcode) /* ADD.L Dn,(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1b9_0)(uae_u32 opcode) /* ADD.L Dn,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_ilong(2); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1c0_0)(uae_u32 opcode) /* ADDA.L Dn,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1c8_0)(uae_u32 opcode) /* ADDA.L An,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1d0_0)(uae_u32 opcode) /* ADDA.L (An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1d8_0)(uae_u32 opcode) /* ADDA.L (An)+,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#endif - -#ifdef PART_8 -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1e0_0)(uae_u32 opcode) /* ADDA.L -(An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1e8_0)(uae_u32 opcode) /* ADDA.L (d16,An),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1f0_0)(uae_u32 opcode) /* ADDA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1f8_0)(uae_u32 opcode) /* ADDA.L (xxx).W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1f9_0)(uae_u32 opcode) /* ADDA.L (xxx).L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1fa_0)(uae_u32 opcode) /* ADDA.L (d16,PC),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1fb_0)(uae_u32 opcode) /* ADDA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{m68k_incpc(2); -{ uaecptr tmppc = m68k_getpc(); - uaecptr srca = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1fc_0)(uae_u32 opcode) /* ADDA.L #.L,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_e000_0)(uae_u32 opcode) /* ASR.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - uae_u32 sign = (0x80 & val) >> 7; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - val = 0xff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xff << (8 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e008_0)(uae_u32 opcode) /* LSR.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_CFLG ((cnt == 8) & (val >> 7)); - COPY_CARRY; - val = 0; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e010_0)(uae_u32 opcode) /* ROXR.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (7 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e018_0)(uae_u32 opcode) /* ROR.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 hival; - cnt &= 7; - hival = val << (8 - cnt); - val >>= cnt; - val |= hival; - val &= 0xff; - SET_CFLG ((val & 0x80) >> 7); - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e020_0)(uae_u32 opcode) /* ASR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - uae_u32 sign = (0x80 & val) >> 7; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - val = 0xff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xff << (8 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e028_0)(uae_u32 opcode) /* LSR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_CFLG ((cnt == 8) & (val >> 7)); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e030_0)(uae_u32 opcode) /* ROXR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 36) cnt -= 36; - if (cnt >= 18) cnt -= 18; - if (cnt >= 9) cnt -= 9; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (7 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e038_0)(uae_u32 opcode) /* ROR.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { uae_u32 hival; - cnt &= 7; - hival = val << (8 - cnt); - val >>= cnt; - val |= hival; - val &= 0xff; - SET_CFLG ((val & 0x80) >> 7); - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e040_0)(uae_u32 opcode) /* ASR.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = (0x8000 & val) >> 15; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - val = 0xffff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xffff << (16 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e048_0)(uae_u32 opcode) /* LSR.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_CFLG ((cnt == 16) & (val >> 15)); - COPY_CARRY; - val = 0; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e050_0)(uae_u32 opcode) /* ROXR.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (15 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e058_0)(uae_u32 opcode) /* ROR.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 hival; - cnt &= 15; - hival = val << (16 - cnt); - val >>= cnt; - val |= hival; - val &= 0xffff; - SET_CFLG ((val & 0x8000) >> 15); - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e060_0)(uae_u32 opcode) /* ASR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = (0x8000 & val) >> 15; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - val = 0xffff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xffff << (16 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e068_0)(uae_u32 opcode) /* LSR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_CFLG ((cnt == 16) & (val >> 15)); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e070_0)(uae_u32 opcode) /* ROXR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 34) cnt -= 34; - if (cnt >= 17) cnt -= 17; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (15 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e078_0)(uae_u32 opcode) /* ROR.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { uae_u32 hival; - cnt &= 15; - hival = val << (16 - cnt); - val >>= cnt; - val |= hival; - val &= 0xffff; - SET_CFLG ((val & 0x8000) >> 15); - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e080_0)(uae_u32 opcode) /* ASR.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - uae_u32 sign = (0x80000000 & val) >> 31; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - val = 0xffffffff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xffffffff << (32 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e088_0)(uae_u32 opcode) /* LSR.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_CFLG ((cnt == 32) & (val >> 31)); - COPY_CARRY; - val = 0; - } else { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e090_0)(uae_u32 opcode) /* ROXR.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (31 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xffffffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e098_0)(uae_u32 opcode) /* ROR.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 hival; - cnt &= 31; - hival = val << (32 - cnt); - val >>= cnt; - val |= hival; - val &= 0xffffffff; - SET_CFLG ((val & 0x80000000) >> 31); - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0a0_0)(uae_u32 opcode) /* ASR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - uae_u32 sign = (0x80000000 & val) >> 31; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - val = 0xffffffff & (uae_u32)-(uae_s32)sign; - SET_CFLG (sign); - COPY_CARRY; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - val |= (0xffffffff << (32 - cnt)) & (uae_u32)-(uae_s32)sign; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0a8_0)(uae_u32 opcode) /* LSR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_CFLG ((cnt == 32) & (val >> 31)); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val >>= cnt - 1; - SET_CFLG (val & 1); - COPY_CARRY; - val >>= 1; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0b0_0)(uae_u32 opcode) /* ROXR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 33) cnt -= 33; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 hival = (val << 1) | GET_XFLG; - hival <<= (31 - cnt); - val >>= cnt; - carry = val & 1; - val >>= 1; - val |= hival; - SET_XFLG (carry); - val &= 0xffffffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0b8_0)(uae_u32 opcode) /* ROR.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { uae_u32 hival; - cnt &= 31; - hival = val << (32 - cnt); - val >>= cnt; - val |= hival; - val &= 0xffffffff; - SET_CFLG ((val & 0x80000000) >> 31); - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0d0_0)(uae_u32 opcode) /* ASRW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0d8_0)(uae_u32 opcode) /* ASRW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0e0_0)(uae_u32 opcode) /* ASRW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0e8_0)(uae_u32 opcode) /* ASRW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0f0_0)(uae_u32 opcode) /* ASRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0f8_0)(uae_u32 opcode) /* ASRW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e0f9_0)(uae_u32 opcode) /* ASRW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e100_0)(uae_u32 opcode) /* ASL.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 8 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - uae_u32 mask = (0xff << (7 - cnt)) & 0xff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x80) >> 7); - COPY_CARRY; - val <<= 1; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e108_0)(uae_u32 opcode) /* LSL.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_CFLG (cnt == 8 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - val <<= (cnt - 1); - SET_CFLG ((val & 0x80) >> 7); - COPY_CARRY; - val <<= 1; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e110_0)(uae_u32 opcode) /* ROXL.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (7 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e118_0)(uae_u32 opcode) /* ROL.B #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 loval; - cnt &= 7; - loval = val >> (8 - cnt); - val <<= cnt; - val |= loval; - val &= 0xff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e120_0)(uae_u32 opcode) /* ASL.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 8 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - uae_u32 mask = (0xff << (7 - cnt)) & 0xff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x80) >> 7); - COPY_CARRY; - val <<= 1; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e128_0)(uae_u32 opcode) /* LSL.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 8) { - SET_CFLG (cnt == 8 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val <<= (cnt - 1); - SET_CFLG ((val & 0x80) >> 7); - COPY_CARRY; - val <<= 1; - val &= 0xff; - } - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e130_0)(uae_u32 opcode) /* ROXL.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 36) cnt -= 36; - if (cnt >= 18) cnt -= 18; - if (cnt >= 9) cnt -= 9; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (7 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e138_0)(uae_u32 opcode) /* ROL.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 cnt = m68k_dreg(regs, srcreg); -{ uae_s8 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u8)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { - uae_u32 loval; - cnt &= 7; - loval = val >> (8 - cnt); - val <<= cnt; - val |= loval; - val &= 0xff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s8)(val)) == 0); - SET_NFLG (((uae_s8)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((val) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e140_0)(uae_u32 opcode) /* ASL.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 16 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x8000) >> 15); - COPY_CARRY; - val <<= 1; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e148_0)(uae_u32 opcode) /* LSL.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_CFLG (cnt == 16 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - val <<= (cnt - 1); - SET_CFLG ((val & 0x8000) >> 15); - COPY_CARRY; - val <<= 1; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e150_0)(uae_u32 opcode) /* ROXL.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (15 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e158_0)(uae_u32 opcode) /* ROL.W #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 loval; - cnt &= 15; - loval = val >> (16 - cnt); - val <<= cnt; - val |= loval; - val &= 0xffff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e160_0)(uae_u32 opcode) /* ASL.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 16 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x8000) >> 15); - COPY_CARRY; - val <<= 1; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e168_0)(uae_u32 opcode) /* LSL.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 16) { - SET_CFLG (cnt == 16 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val <<= (cnt - 1); - SET_CFLG ((val & 0x8000) >> 15); - COPY_CARRY; - val <<= 1; - val &= 0xffff; - } - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e170_0)(uae_u32 opcode) /* ROXL.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 34) cnt -= 34; - if (cnt >= 17) cnt -= 17; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (15 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e178_0)(uae_u32 opcode) /* ROL.W Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 cnt = m68k_dreg(regs, srcreg); -{ uae_s16 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = (uae_u16)data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { - uae_u32 loval; - cnt &= 15; - loval = val >> (16 - cnt); - val <<= cnt; - val |= loval; - val &= 0xffff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((val) & 0xffff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e180_0)(uae_u32 opcode) /* ASL.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 32 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x80000000) >> 31); - COPY_CARRY; - val <<= 1; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e188_0)(uae_u32 opcode) /* LSL.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_CFLG (cnt == 32 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else { - val <<= (cnt - 1); - SET_CFLG ((val & 0x80000000) >> 31); - COPY_CARRY; - val <<= 1; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e190_0)(uae_u32 opcode) /* ROXL.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; -{ cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (31 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xffffffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e198_0)(uae_u32 opcode) /* ROL.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 cnt = srcreg; -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; -{ uae_u32 loval; - cnt &= 31; - loval = val >> (32 - cnt); - val <<= cnt; - val |= loval; - val &= 0xffffffff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1a0_0)(uae_u32 opcode) /* ASL.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_VFLG (val != 0); - SET_CFLG (cnt == 32 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff; - SET_VFLG ((val & mask) != mask && (val & mask) != 0); - val <<= cnt - 1; - SET_CFLG ((val & 0x80000000) >> 31); - COPY_CARRY; - val <<= 1; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1a8_0)(uae_u32 opcode) /* LSL.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 32) { - SET_CFLG (cnt == 32 ? val & 1 : 0); - COPY_CARRY; - val = 0; - } else if (cnt > 0) { - val <<= (cnt - 1); - SET_CFLG ((val & 0x80000000) >> 31); - COPY_CARRY; - val <<= 1; - val &= 0xffffffff; - } - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1b0_0)(uae_u32 opcode) /* ROXL.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt >= 33) cnt -= 33; - if (cnt > 0) { - cnt--; - { - uae_u32 carry; - uae_u32 loval = val >> (31 - cnt); - carry = loval & 1; - val = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1); - SET_XFLG (carry); - val &= 0xffffffff; - } } - SET_CFLG (GET_XFLG); - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1b8_0)(uae_u32 opcode) /* ROL.L Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 cnt = m68k_dreg(regs, srcreg); -{ uae_s32 data = m68k_dreg(regs, dstreg); -{ uae_u32 val = data; - cnt &= 63; - CLEAR_CZNV; - if (cnt > 0) { - uae_u32 loval; - cnt &= 31; - loval = val >> (32 - cnt); - val <<= cnt; - val |= loval; - val &= 0xffffffff; - SET_CFLG (val & 1); -} - SET_ZFLG (((uae_s32)(val)) == 0); - SET_NFLG (((uae_s32)(val)) < 0); - m68k_dreg(regs, dstreg) = (val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1d0_0)(uae_u32 opcode) /* ASLW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1d8_0)(uae_u32 opcode) /* ASLW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1e0_0)(uae_u32 opcode) /* ASLW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1e8_0)(uae_u32 opcode) /* ASLW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1f0_0)(uae_u32 opcode) /* ASLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1f8_0)(uae_u32 opcode) /* ASLW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1f9_0)(uae_u32 opcode) /* ASLW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2d0_0)(uae_u32 opcode) /* LSRW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2d8_0)(uae_u32 opcode) /* LSRW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2e0_0)(uae_u32 opcode) /* LSRW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2e8_0)(uae_u32 opcode) /* LSRW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2f0_0)(uae_u32 opcode) /* LSRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2f8_0)(uae_u32 opcode) /* LSRW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2f9_0)(uae_u32 opcode) /* LSRW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3d0_0)(uae_u32 opcode) /* LSLW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3d8_0)(uae_u32 opcode) /* LSLW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3e0_0)(uae_u32 opcode) /* LSLW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3e8_0)(uae_u32 opcode) /* LSLW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3f0_0)(uae_u32 opcode) /* LSLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3f8_0)(uae_u32 opcode) /* LSLW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3f9_0)(uae_u32 opcode) /* LSLW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4d0_0)(uae_u32 opcode) /* ROXRW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4d8_0)(uae_u32 opcode) /* ROXRW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4e0_0)(uae_u32 opcode) /* ROXRW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4e8_0)(uae_u32 opcode) /* ROXRW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4f0_0)(uae_u32 opcode) /* ROXRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4f8_0)(uae_u32 opcode) /* ROXRW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4f9_0)(uae_u32 opcode) /* ROXRW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5d0_0)(uae_u32 opcode) /* ROXLW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5d8_0)(uae_u32 opcode) /* ROXLW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5e0_0)(uae_u32 opcode) /* ROXLW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5e8_0)(uae_u32 opcode) /* ROXLW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5f0_0)(uae_u32 opcode) /* ROXLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5f8_0)(uae_u32 opcode) /* ROXLW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5f9_0)(uae_u32 opcode) /* ROXLW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6d0_0)(uae_u32 opcode) /* RORW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6d8_0)(uae_u32 opcode) /* RORW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6e0_0)(uae_u32 opcode) /* RORW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6e8_0)(uae_u32 opcode) /* RORW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6f0_0)(uae_u32 opcode) /* RORW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6f8_0)(uae_u32 opcode) /* RORW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6f9_0)(uae_u32 opcode) /* RORW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7d0_0)(uae_u32 opcode) /* ROLW.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7d8_0)(uae_u32 opcode) /* ROLW.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg); -{ uae_s16 data = get_word(dataa); - m68k_areg(regs, srcreg) += 2; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7e0_0)(uae_u32 opcode) /* ROLW.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) - 2; -{ uae_s16 data = get_word(dataa); - m68k_areg (regs, srcreg) = dataa; -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7e8_0)(uae_u32 opcode) /* ROLW.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7f0_0)(uae_u32 opcode) /* ROLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr dataa = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7f8_0)(uae_u32 opcode) /* ROLW.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr dataa = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7f9_0)(uae_u32 opcode) /* ROLW.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr dataa = get_ilong(2); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8c0_0)(uae_u32 opcode) /* BFTST.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8d0_0)(uae_u32 opcode) /* BFTST.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8e8_0)(uae_u32 opcode) /* BFTST.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8f0_0)(uae_u32 opcode) /* BFTST.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8f8_0)(uae_u32 opcode) /* BFTST.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8f9_0)(uae_u32 opcode) /* BFTST.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8fa_0)(uae_u32 opcode) /* BFTST.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e8fb_0)(uae_u32 opcode) /* BFTST.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9c0_0)(uae_u32 opcode) /* BFEXTU.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9d0_0)(uae_u32 opcode) /* BFEXTU.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9e8_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9f0_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9f8_0)(uae_u32 opcode) /* BFEXTU.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9f9_0)(uae_u32 opcode) /* BFEXTU.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9fa_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e9fb_0)(uae_u32 opcode) /* BFEXTU.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eac0_0)(uae_u32 opcode) /* BFCHG.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : - (0xffffffff << (32 - (offset & 0x1f))))) | - (tmp >> (offset & 0x1f)) | - (((offset & 0x1f) + width) >= 32 ? 0 : - (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ead0_0)(uae_u32 opcode) /* BFCHG.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eae8_0)(uae_u32 opcode) /* BFCHG.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eaf0_0)(uae_u32 opcode) /* BFCHG.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eaf8_0)(uae_u32 opcode) /* BFCHG.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eaf9_0)(uae_u32 opcode) /* BFCHG.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = ~tmp; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebc0_0)(uae_u32 opcode) /* BFEXTS.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebd0_0)(uae_u32 opcode) /* BFEXTS.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebe8_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebf0_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebf8_0)(uae_u32 opcode) /* BFEXTS.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebf9_0)(uae_u32 opcode) /* BFEXTS.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebfa_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ebfb_0)(uae_u32 opcode) /* BFEXTS.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - if (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width); - m68k_dreg(regs, (extra >> 12) & 7) = tmp; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ecc0_0)(uae_u32 opcode) /* BFCLR.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : - (0xffffffff << (32 - (offset & 0x1f))))) | - (tmp >> (offset & 0x1f)) | - (((offset & 0x1f) + width) >= 32 ? 0 : - (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ecd0_0)(uae_u32 opcode) /* BFCLR.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ece8_0)(uae_u32 opcode) /* BFCLR.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ecf0_0)(uae_u32 opcode) /* BFCLR.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ecf8_0)(uae_u32 opcode) /* BFCLR.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ecf9_0)(uae_u32 opcode) /* BFCLR.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edc0_0)(uae_u32 opcode) /* BFFFO.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edd0_0)(uae_u32 opcode) /* BFFFO.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_ede8_0)(uae_u32 opcode) /* BFFFO.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edf0_0)(uae_u32 opcode) /* BFFFO.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edf8_0)(uae_u32 opcode) /* BFFFO.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edf9_0)(uae_u32 opcode) /* BFFFO.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edfa_0)(uae_u32 opcode) /* BFFFO.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_getpc () + 4; - dsta += (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_edfb_0)(uae_u32 opcode) /* BFFFO.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr tmppc = m68k_getpc(); - uaecptr dsta = get_disp_ea_020(tmppc, next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - { uae_u32 mask = 1 << (width-1); - while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }} - m68k_dreg(regs, (extra >> 12) & 7) = offset; -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eec0_0)(uae_u32 opcode) /* BFSET.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : - (0xffffffff << (32 - (offset & 0x1f))))) | - (tmp >> (offset & 0x1f)) | - (((offset & 0x1f) + width) >= 32 ? 0 : - (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eed0_0)(uae_u32 opcode) /* BFSET.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eee8_0)(uae_u32 opcode) /* BFSET.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eef0_0)(uae_u32 opcode) /* BFSET.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eef8_0)(uae_u32 opcode) /* BFSET.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eef9_0)(uae_u32 opcode) /* BFSET.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = 0xffffffff; - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_efc0_0)(uae_u32 opcode) /* BFINS.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 : - (0xffffffff << (32 - (offset & 0x1f))))) | - (tmp >> (offset & 0x1f)) | - (((offset & 0x1f) + width) >= 32 ? 0 : - (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width)))); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_efd0_0)(uae_u32 opcode) /* BFINS.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_efe8_0)(uae_u32 opcode) /* BFINS.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eff0_0)(uae_u32 opcode) /* BFINS.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -{m68k_incpc(4); -{ uaecptr dsta = get_disp_ea_020(m68k_areg(regs, dstreg), next_iword()); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eff8_0)(uae_u32 opcode) /* BFINS.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_eff9_0)(uae_u32 opcode) /* BFINS.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -{ uaecptr dsta = get_ilong(4); -{ uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f; - int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1; - uae_u32 tmp,bf0,bf1; - dsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0); - bf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff; - tmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7))); - tmp >>= (32 - width); - SET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0); - SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0); - tmp = m68k_dreg(regs, (extra >> 12) & 7); - SET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0); - SET_ZFLG (tmp == 0); - tmp <<= (32 - width); - bf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) | - (tmp >> (offset & 7)) | - (((offset & 7) + width) >= 32 ? 0 : - (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width)))); - put_long(dsta,bf0 ); - if (((offset & 7) + width) > 32) { - bf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) | - (tmp << (8 - (offset & 7))); - put_byte(dsta+4,bf1); - } -}}}}m68k_incpc(8); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f200_0)(uae_u32 opcode) /* FPP.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f208_0)(uae_u32 opcode) /* FPP.L #.W,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f210_0)(uae_u32 opcode) /* FPP.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f218_0)(uae_u32 opcode) /* FPP.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f220_0)(uae_u32 opcode) /* FPP.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f228_0)(uae_u32 opcode) /* FPP.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f230_0)(uae_u32 opcode) /* FPP.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f238_0)(uae_u32 opcode) /* FPP.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f239_0)(uae_u32 opcode) /* FPP.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f23a_0)(uae_u32 opcode) /* FPP.L #.W,(d16,PC) */ -{ - cpuop_begin(); - uae_u32 dstreg = 2; -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f23b_0)(uae_u32 opcode) /* FPP.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f23c_0)(uae_u32 opcode) /* FPP.L #.W,#.L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_arithmetic(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f240_0)(uae_u32 opcode) /* FScc.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f248_0)(uae_u32 opcode) /* FDBcc.L #.W,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_dbcc(opcode, extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f250_0)(uae_u32 opcode) /* FScc.L #.W,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f258_0)(uae_u32 opcode) /* FScc.L #.W,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f260_0)(uae_u32 opcode) /* FScc.L #.W,-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f268_0)(uae_u32 opcode) /* FScc.L #.W,(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f270_0)(uae_u32 opcode) /* FScc.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f278_0)(uae_u32 opcode) /* FScc.L #.W,(xxx).W */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f279_0)(uae_u32 opcode) /* FScc.L #.W,(xxx).L */ -{ - cpuop_begin(); -{{ uae_s16 extra = get_iword(2); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_scc(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f27a_0)(uae_u32 opcode) /* FTRAPcc.L #.W */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s16 dummy = get_iword(0); -m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_trapcc(opcode,oldpc); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f27b_0)(uae_u32 opcode) /* FTRAPcc.L #.L */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -{ uae_s32 dummy = get_ilong(0); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_trapcc(opcode,oldpc); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f27c_0)(uae_u32 opcode) /* FTRAPcc.L */ -{ - cpuop_begin(); -{m68k_incpc(2); -{ uaecptr oldpc = m68k_getpc(); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_trapcc(opcode,oldpc); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f280_0)(uae_u32 opcode) /* FBcc.L #,#.W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 63); -#else - uae_u32 srcreg = (opcode & 63); -#endif -{m68k_incpc(2); -{ uaecptr pc = m68k_getpc(); -{ uae_s16 extra = get_iword(0); -m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_bcc(opcode,pc,extra); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f2c0_0)(uae_u32 opcode) /* FBcc.L #,#.L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 63); -#else - uae_u32 srcreg = (opcode & 63); -#endif -{m68k_incpc(2); -{ uaecptr pc = m68k_getpc(); -{ uae_s32 extra = get_ilong(0); -m68k_incpc(4); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_bcc(opcode,pc,extra); -}}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f310_0)(uae_u32 opcode) /* FSAVE.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1829; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1829: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f320_0)(uae_u32 opcode) /* FSAVE.L -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1830; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1830: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f328_0)(uae_u32 opcode) /* FSAVE.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1831; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1831: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f330_0)(uae_u32 opcode) /* FSAVE.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1832; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1832: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f338_0)(uae_u32 opcode) /* FSAVE.L (xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1833; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1833: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f339_0)(uae_u32 opcode) /* FSAVE.L (xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1834; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_save(opcode); -}}endlabel1834: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f350_0)(uae_u32 opcode) /* FRESTORE.L (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1835; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1835: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f358_0)(uae_u32 opcode) /* FRESTORE.L (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1836; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1836: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f368_0)(uae_u32 opcode) /* FRESTORE.L (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1837; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1837: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f370_0)(uae_u32 opcode) /* FRESTORE.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1838; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1838: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f378_0)(uae_u32 opcode) /* FRESTORE.L (xxx).W */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1839; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1839: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f379_0)(uae_u32 opcode) /* FRESTORE.L (xxx).L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1840; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1840: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f37a_0)(uae_u32 opcode) /* FRESTORE.L (d16,PC) */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1841; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1841: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f37b_0)(uae_u32 opcode) /* FRESTORE.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel1842; } -{m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - fpuop_restore(opcode); -}}endlabel1842: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f408_0)(uae_u32 opcode) /* CINVL.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1843; } -{ if (srcreg&0x2) - flush_icache(31); -}}m68k_incpc(2); -endlabel1843: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f410_0)(uae_u32 opcode) /* CINVP.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1844; } -{ if (srcreg&0x2) - flush_icache(32); -}}m68k_incpc(2); -endlabel1844: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f418_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1845; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1845: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f419_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1846; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1846: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41a_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1847; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1847: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41b_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1848; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1848: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41c_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1849; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1849: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41d_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1850; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1850: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41e_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1851; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1851: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f41f_0)(uae_u32 opcode) /* CINVA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1852; } -{ if (srcreg&0x2) - flush_icache(33); -}}m68k_incpc(2); -endlabel1852: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f428_0)(uae_u32 opcode) /* CPUSHL.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1853; } -{ if (srcreg&0x2) - flush_icache(41); -}}m68k_incpc(2); -endlabel1853: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f430_0)(uae_u32 opcode) /* CPUSHP.L #,An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1854; } -{ if (srcreg&0x2) - flush_icache(42); -}}m68k_incpc(2); -endlabel1854: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f438_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1855; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1855: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f439_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1856; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1856: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43a_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1857; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1857: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43b_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1858; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1858: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43c_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1859; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1859: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43d_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1860; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1860: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43e_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1861; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1861: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f43f_0)(uae_u32 opcode) /* CPUSHA.L # */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 14) & 3); -#else - uae_u32 srcreg = ((opcode >> 6) & 3); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel1862; } -{ if (srcreg&0x2) - flush_icache(43); -}}m68k_incpc(2); -endlabel1862: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f500_0)(uae_u32 opcode) /* MMUOP.L #,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = (uae_s32)(uae_s8)(((opcode >> 11) | (opcode << 5)) & 7); -#else - uae_u32 srcreg = (uae_s32)(uae_s8)((opcode >> 3) & 255); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 extra = srcreg; -m68k_incpc(2); -#ifdef HAVE_GET_WORD_UNSWAPPED - opcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF); -#endif - mmu_op(opcode,extra); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f600_0)(uae_u32 opcode) /* MOVE16.L (An)+,(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr memsa = m68k_areg(regs, srcreg); -{ uaecptr memda = get_ilong(2); - memsa &= ~15; - memda &= ~15; - put_long(memda, get_long(memsa)); - put_long(memda+4, get_long(memsa+4)); - put_long(memda+8, get_long(memsa+8)); - put_long(memda+12, get_long(memsa+12)); - m68k_areg(regs, srcreg) += 16; -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f608_0)(uae_u32 opcode) /* MOVE16.L (xxx).L,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uaecptr memsa = get_ilong(2); -{ uaecptr memda = m68k_areg(regs, dstreg); - memsa &= ~15; - memda &= ~15; - put_long(memda, get_long(memsa)); - put_long(memda+4, get_long(memsa+4)); - put_long(memda+8, get_long(memsa+8)); - put_long(memda+12, get_long(memsa+12)); - m68k_areg(regs, dstreg) += 16; -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f610_0)(uae_u32 opcode) /* MOVE16.L (An),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr memsa = m68k_areg(regs, srcreg); -{ uaecptr memda = get_ilong(2); - memsa &= ~15; - memda &= ~15; - put_long(memda, get_long(memsa)); - put_long(memda+4, get_long(memsa+4)); - put_long(memda+8, get_long(memsa+8)); - put_long(memda+12, get_long(memsa+12)); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f618_0)(uae_u32 opcode) /* MOVE16.L (xxx).L,(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uaecptr memsa = get_ilong(2); -{ uaecptr memda = m68k_areg(regs, dstreg); - memsa &= ~15; - memda &= ~15; - put_long(memda, get_long(memsa)); - put_long(memda+4, get_long(memsa+4)); - put_long(memda+8, get_long(memsa+8)); - put_long(memda+12, get_long(memsa+12)); -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_f620_0)(uae_u32 opcode) /* MOVE16.L (An)+,(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif - uae_u32 dstreg = 0; -{ uaecptr mems = m68k_areg(regs, srcreg) & ~15, memd; - dstreg = (get_iword(2) >> 12) & 7; - memd = m68k_areg(regs, dstreg) & ~15; - put_long(memd, get_long(mems)); - put_long(memd+4, get_long(mems+4)); - put_long(memd+8, get_long(mems+8)); - put_long(memd+12, get_long(mems+12)); - if (srcreg != dstreg) - m68k_areg(regs, srcreg) += 16; - m68k_areg(regs, dstreg) += 16; -}m68k_incpc(4); - cpuop_end(); -} - -#endif -#endif - - -#ifdef _MSC_VER -#pragma warning(disable:4102) /* unreferenced label */ -#endif - -#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) -#define PART_1 1 -#define PART_2 1 -#define PART_3 1 -#define PART_4 1 -#define PART_5 1 -#define PART_6 1 -#define PART_7 1 -#define PART_8 1 -#endif - -#ifdef PART_1 -#endif - -#ifdef PART_2 -#endif - -#ifdef PART_3 -#endif - -#ifdef PART_4 -void REGPARAM2 CPUFUNC(op_4800_1)(uae_u32 opcode) /* NBCD.B Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xff) | ((newv) & 0xff); -}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4810_1)(uae_u32 opcode) /* NBCD.B (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4818_1)(uae_u32 opcode) /* NBCD.B (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4820_1)(uae_u32 opcode) /* NBCD.B -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4828_1)(uae_u32 opcode) /* NBCD.B (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4830_1)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{m68k_incpc(2); -{ uaecptr srca = get_disp_ea_020(m68k_areg(regs, srcreg), next_iword()); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}} cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4838_1)(uae_u32 opcode) /* NBCD.B (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4839_1)(uae_u32 opcode) /* NBCD.B (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(6); - cpuop_end(); -} -#endif - -#ifdef PART_5 -#endif - -#ifdef PART_6 -void REGPARAM2 CPUFUNC(op_8100_1)(uae_u32 opcode) /* SBCD.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); - uae_u16 newv, tmp_newv; - int bcd = 0; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; - if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } - SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8108_1)(uae_u32 opcode) /* SBCD.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0); - uae_u16 newv, tmp_newv; - int bcd = 0; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo & 0xF0) { newv -= 6; bcd = 6; }; - if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; } - SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0); - put_byte(dsta,newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#endif - -#ifdef PART_7 -void REGPARAM2 CPUFUNC(op_c100_1)(uae_u32 opcode) /* ABCD.B Dn,Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); - uae_u16 newv, tmp_newv; - int cflg; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo > 9) { newv += 6; } - cflg = (newv & 0x3F0) > 0x90; - if (cflg) newv += 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}m68k_incpc(2); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c108_1)(uae_u32 opcode) /* ABCD.B -(An),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; -{ uae_s8 dst = get_byte(dsta); - m68k_areg (regs, dstreg) = dsta; -{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0); - uae_u16 newv, tmp_newv; - int cflg; - newv = tmp_newv = newv_hi + newv_lo; - if (newv_lo > 9) { newv += 6; } - cflg = (newv & 0x3F0) > 0x90; - if (cflg) newv += 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0); - put_byte(dsta,newv); -}}}}}}m68k_incpc(2); - cpuop_end(); -} -#endif - -#ifdef PART_8 -#endif - - -#ifdef _MSC_VER -#pragma warning(disable:4102) /* unreferenced label */ -#endif - -#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) -#define PART_1 1 -#define PART_2 1 -#define PART_3 1 -#define PART_4 1 -#define PART_5 1 -#define PART_6 1 -#define PART_7 1 -#define PART_8 1 -#endif - -#ifdef PART_1 -#endif - -#ifdef PART_2 -#endif - -#ifdef PART_3 -#endif - -#ifdef PART_4 -#endif - -#ifdef PART_5 -#endif - -#ifdef PART_6 -#endif - -#ifdef PART_7 -#endif - -#ifdef PART_8 -#endif - - -#ifdef _MSC_VER -#pragma warning(disable:4102) /* unreferenced label */ -#endif - -#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) -#define PART_1 1 -#define PART_2 1 -#define PART_3 1 -#define PART_4 1 -#define PART_5 1 -#define PART_6 1 -#define PART_7 1 -#define PART_8 1 -#endif - -#ifdef PART_1 -void REGPARAM2 CPUFUNC(op_30_3)(uae_u32 opcode) /* OR.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_70_3)(uae_u32 opcode) /* OR.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0_3)(uae_u32 opcode) /* OR.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_130_3)(uae_u32 opcode) /* BTST.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13b_3)(uae_u32 opcode) /* BTST.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_170_3)(uae_u32 opcode) /* BCHG.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_17b_3)(uae_u32 opcode) /* BCHG.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1b0_3)(uae_u32 opcode) /* BCLR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1bb_3)(uae_u32 opcode) /* BCLR.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1f0_3)(uae_u32 opcode) /* BSET.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1fb_3)(uae_u32 opcode) /* BSET.B Dn,(d8,PC,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif - uae_u32 dstreg = 3; -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_230_3)(uae_u32 opcode) /* AND.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_270_3)(uae_u32 opcode) /* AND.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2b0_3)(uae_u32 opcode) /* AND.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_430_3)(uae_u32 opcode) /* SUB.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_470_3)(uae_u32 opcode) /* SUB.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4b0_3)(uae_u32 opcode) /* SUB.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_630_3)(uae_u32 opcode) /* ADD.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_670_3)(uae_u32 opcode) /* ADD.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_6b0_3)(uae_u32 opcode) /* ADD.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_830_3)(uae_u32 opcode) /* BTST.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_83b_3)(uae_u32 opcode) /* BTST.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_870_3)(uae_u32 opcode) /* BCHG.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_87b_3)(uae_u32 opcode) /* BCHG.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - dst ^= (1 << src); - SET_ZFLG (((uae_u32)dst & (1 << src)) >> src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8b0_3)(uae_u32 opcode) /* BCLR.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8bb_3)(uae_u32 opcode) /* BCLR.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst &= ~(1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8f0_3)(uae_u32 opcode) /* BSET.B #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8fb_3)(uae_u32 opcode) /* BSET.B #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src &= 7; - SET_ZFLG (1 ^ ((dst >> src) & 1)); - dst |= (1 << src); - put_byte(dsta,dst); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a30_3)(uae_u32 opcode) /* EOR.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_a70_3)(uae_u32 opcode) /* EOR.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -#endif - -#ifdef PART_2 -void REGPARAM2 CPUFUNC(op_ab0_3)(uae_u32 opcode) /* EOR.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c30_3)(uae_u32 opcode) /* CMP.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c3b_3)(uae_u32 opcode) /* CMP.B #.B,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s8 src = get_ibyte(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c70_3)(uae_u32 opcode) /* CMP.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c7b_3)(uae_u32 opcode) /* CMP.W #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s16 src = get_iword(2); -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(4)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cb0_3)(uae_u32 opcode) /* CMP.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_cbb_3)(uae_u32 opcode) /* CMP.L #.L,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{{ uae_s32 src = get_ilong(2); -{ uaecptr tmppc = m68k_getpc() + 6; - uaecptr dsta = get_disp_ea_000(tmppc, get_iword(6)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1030_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_103b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10b0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10bb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_10fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += areg_byteinc[dstreg]; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1130_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_113b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - areg_byteinc[dstreg]; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1170_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_117b_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1180_3)(uae_u32 opcode) /* MOVE.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1190_3)(uae_u32 opcode) /* MOVE.B (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_1198_3)(uae_u32 opcode) /* MOVE.B (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s8 src = get_byte(srca); - m68k_areg(regs, srcreg) += areg_byteinc[srcreg]; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11a0_3)(uae_u32 opcode) /* MOVE.B -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - areg_byteinc[srcreg]; -{ uae_s8 src = get_byte(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11a8_3)(uae_u32 opcode) /* MOVE.B (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b8_3)(uae_u32 opcode) /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11b9_3)(uae_u32 opcode) /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11ba_3)(uae_u32 opcode) /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11bb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11bc_3)(uae_u32 opcode) /* MOVE.B #.B,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s8 src = get_ibyte(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_11fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13f0_3)(uae_u32 opcode) /* MOVE.B (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_13fb_3)(uae_u32 opcode) /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2030_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_203b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_2070_3)(uae_u32 opcode) /* MOVEA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_207b_3)(uae_u32 opcode) /* MOVEA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_u32 val = src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_20b0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20bb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_20fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 4; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2130_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_213b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 4; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_3 -void REGPARAM2 CPUFUNC(op_2170_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_217b_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2180_3)(uae_u32 opcode) /* MOVE.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2188_3)(uae_u32 opcode) /* MOVE.L An,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2190_3)(uae_u32 opcode) /* MOVE.L (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_2198_3)(uae_u32 opcode) /* MOVE.L (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s32 src = get_long(srca); - m68k_areg(regs, srcreg) += 4; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21a0_3)(uae_u32 opcode) /* MOVE.L -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 4; -{ uae_s32 src = get_long(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21a8_3)(uae_u32 opcode) /* MOVE.L (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b8_3)(uae_u32 opcode) /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21b9_3)(uae_u32 opcode) /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21ba_3)(uae_u32 opcode) /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21bb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21bc_3)(uae_u32 opcode) /* MOVE.L #.L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s32 src = get_ilong(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_21fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23f0_3)(uae_u32 opcode) /* MOVE.L (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_23fb_3)(uae_u32 opcode) /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3030_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_303b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_3070_3)(uae_u32 opcode) /* MOVEA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_307b_3)(uae_u32 opcode) /* MOVEA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_u32 val = (uae_s32)(uae_s16)src; - m68k_areg(regs, dstreg) = (val); -}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_30b0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30bb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_30fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg); - m68k_areg(regs, dstreg) += 2; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3130_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_313b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),-(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) - 2; - m68k_areg (regs, dstreg) = dsta; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3170_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_317b_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3180_3)(uae_u32 opcode) /* MOVE.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3188_3)(uae_u32 opcode) /* MOVE.W An,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = m68k_areg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3190_3)(uae_u32 opcode) /* MOVE.W (An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_3198_3)(uae_u32 opcode) /* MOVE.W (An)+,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); -{ uae_s16 src = get_word(srca); - m68k_areg(regs, srcreg) += 2; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31a0_3)(uae_u32 opcode) /* MOVE.W -(An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; -{ uae_s16 src = get_word(srca); - m68k_areg (regs, srcreg) = srca; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31a8_3)(uae_u32 opcode) /* MOVE.W (d16,An),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b8_3)(uae_u32 opcode) /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31b9_3)(uae_u32 opcode) /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_ilong(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(6)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31ba_3)(uae_u32 opcode) /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = m68k_getpc () + 2; - srca += (uae_s32)(uae_s16)get_iword(2); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31bb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31bc_3)(uae_u32 opcode) /* MOVE.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uae_s16 src = get_iword(2); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).W */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_31fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = (uae_s32)(uae_s16)get_iword(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(6); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33f0_3)(uae_u32 opcode) /* MOVE.W (d8,An,Xn),(xxx).L */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_33fb_3)(uae_u32 opcode) /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uaecptr dsta = get_ilong(4); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(8); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4030_3)(uae_u32 opcode) /* NEGX.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4070_3)(uae_u32 opcode) /* NEGX.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s16)(newv)) == 0)); - SET_NFLG (((uae_s16)(newv)) < 0); - put_word(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_40b0_3)(uae_u32 opcode) /* NEGX.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn)); - SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn))); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s32)(newv)) == 0)); - SET_NFLG (((uae_s32)(newv)) < 0); - put_long(srca,newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f0_3)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel2002; } -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - MakeSR(); - put_word(srca,regs.sr); -}}}m68k_incpc(4); -endlabel2002: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4130_3)(uae_u32 opcode) /* CHK.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2003; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2003; } -}}}}m68k_incpc(4); -endlabel2003: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_413b_3)(uae_u32 opcode) /* CHK.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2004; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2004; } -}}}}m68k_incpc(4); -endlabel2004: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41b0_3)(uae_u32 opcode) /* CHK.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2005; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2005; } -}}}}m68k_incpc(4); -endlabel2005: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_41bb_3)(uae_u32 opcode) /* CHK.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - if ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto endlabel2006; } - else if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto endlabel2006; } -}}}}m68k_incpc(4); -endlabel2006: ; - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41f0_3)(uae_u32 opcode) /* LEA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_41fb_3)(uae_u32 opcode) /* LEA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ m68k_areg(regs, dstreg) = (srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4230_3)(uae_u32 opcode) /* CLR.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(0)) == 0); - SET_NFLG (((uae_s8)(0)) < 0); - put_byte(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4270_3)(uae_u32 opcode) /* CLR.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(0)) == 0); - SET_NFLG (((uae_s16)(0)) < 0); - put_word(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_4 -void REGPARAM2 CPUFUNC(op_42b0_3)(uae_u32 opcode) /* CLR.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(0)) == 0); - SET_NFLG (((uae_s32)(0)) < 0); - put_long(srca,0); -}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_42f0_3)(uae_u32 opcode) /* MVSR2.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - MakeSR(); - put_word(srca,regs.sr & 0xff); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4430_3)(uae_u32 opcode) /* NEG.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{{uae_u32 dst = ((uae_s8)(0)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(0)) < 0; - int flgn = ((uae_s8)(dst)) < 0; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4470_3)(uae_u32 opcode) /* NEG.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{{uae_u32 dst = ((uae_s16)(0)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(0)) < 0; - int flgn = ((uae_s16)(dst)) < 0; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44b0_3)(uae_u32 opcode) /* NEG.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{{uae_u32 dst = ((uae_s32)(0)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(0)) < 0; - int flgn = ((uae_s32)(dst)) < 0; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(srca,dst); -}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44f0_3)(uae_u32 opcode) /* MV2SR.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_44fb_3)(uae_u32 opcode) /* MV2SR.B (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); - MakeSR(); - regs.sr &= 0xFF00; - regs.sr |= src & 0xFF; - MakeFromSR(); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4630_3)(uae_u32 opcode) /* NOT.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(dst)) == 0); - SET_NFLG (((uae_s8)(dst)) < 0); - put_byte(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4670_3)(uae_u32 opcode) /* NOT.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(dst)) == 0); - SET_NFLG (((uae_s16)(dst)) < 0); - put_word(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46b0_3)(uae_u32 opcode) /* NOT.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_u32 dst = ~src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(dst)) == 0); - SET_NFLG (((uae_s32)(dst)) < 0); - put_long(srca,dst); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46f0_3)(uae_u32 opcode) /* MV2SR.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{if (!regs.s) { Exception(8,0); goto endlabel2021; } -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(4); -endlabel2021: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_46fb_3)(uae_u32 opcode) /* MV2SR.W (d8,PC,Xn) */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel2022; } -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); - regs.sr = src; - MakeFromSR(); -}}}}m68k_incpc(4); -endlabel2022: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4830_3)(uae_u32 opcode) /* NBCD.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0); - uae_u16 newv_hi = - (src & 0xF0); - uae_u16 newv; - int cflg; - if (newv_lo > 9) { newv_lo -= 6; } - newv = newv_hi + newv_lo; - cflg = (newv & 0x1F0) > 0x90; - if (cflg) newv -= 0x60; - SET_CFLG (cflg); - COPY_CARRY; - SET_ZFLG (GET_ZFLG & (((uae_s8)(newv)) == 0)); - SET_NFLG (((uae_s8)(newv)) < 0); - put_byte(srca,newv); -}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4870_3)(uae_u32 opcode) /* PEA.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_487b_3)(uae_u32 opcode) /* PEA.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uaecptr dsta = m68k_areg(regs, 7) - 4; - m68k_areg (regs, 7) = dsta; - put_long(dsta,srca); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48b0_3)(uae_u32 opcode) /* MVMLE.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_word(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; } - while (amask) { put_word(srca, m68k_areg(regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_48f0_3)(uae_u32 opcode) /* MVMLE.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff; - while (dmask) { put_long(srca, m68k_dreg(regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; } - while (amask) { put_long(srca, m68k_areg(regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_4a30_3)(uae_u32 opcode) /* TST.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a3b_3)(uae_u32 opcode) /* TST.B (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a70_3)(uae_u32 opcode) /* TST.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4a7b_3)(uae_u32 opcode) /* TST.W (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4ab0_3)(uae_u32 opcode) /* TST.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4abb_3)(uae_u32 opcode) /* TST.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); -}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_4af0_3)(uae_u32 opcode) /* TAS.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - src |= 0x80; - put_byte(srca,src); -}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cb0_3)(uae_u32 opcode) /* MVMEL.W #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cbb_3)(uae_u32 opcode) /* MVMEL.W #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(4)); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = (uae_s32)(uae_s16)get_word(srca); srca += 2; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cf0_3)(uae_u32 opcode) /* MVMEL.L #.W,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(4)); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4cfb_3)(uae_u32 opcode) /* MVMEL.L #.W,(d8,PC,Xn) */ -{ - cpuop_begin(); - uae_u32 dstreg = 3; -{ uae_u16 mask = get_iword(2); - unsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff; -{ uaecptr tmppc = m68k_getpc() + 4; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(4)); -{ while (dmask) { m68k_dreg(regs, movem_index1[dmask]) = get_long(srca); srca += 4; dmask = movem_next[dmask]; } - while (amask) { m68k_areg(regs, movem_index1[amask]) = get_long(srca); srca += 4; amask = movem_next[amask]; } -}}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4eb0_3)(uae_u32 opcode) /* JSR.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - m68k_do_jsr(m68k_getpc() + 4, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ebb_3)(uae_u32 opcode) /* JSR.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); - m68k_do_jsr(m68k_getpc() + 4, srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4ef0_3)(uae_u32 opcode) /* JMP.L (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_4efb_3)(uae_u32 opcode) /* JMP.L (d8,PC,Xn) */ -{ - cpuop_begin(); -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); - m68k_setpc(srca); -}} cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5030_3)(uae_u32 opcode) /* ADD.B #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_5 -void REGPARAM2 CPUFUNC(op_5070_3)(uae_u32 opcode) /* ADD.W #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_50b0_3)(uae_u32 opcode) /* ADD.L #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_50f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(0) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_5130_3)(uae_u32 opcode) /* SUB.B #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_5170_3)(uae_u32 opcode) /* SUB.W #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_51b0_3)(uae_u32 opcode) /* SUB.L #,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = imm8_table[((opcode >> 1) & 7)]; -#else - uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)]; -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_u32 src = srcreg; -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_51f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(1) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_52f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(2) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_53f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(3) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_54f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(4) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_55f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(5) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_56f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(6) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_57f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(7) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_58f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(8) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_59f0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(9) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5af0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(10) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5bf0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(11) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5cf0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(12) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5df0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(13) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ef0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(14) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_5ff0_3)(uae_u32 opcode) /* Scc.B (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ int val = cctrue(15) ? 0xff : 0; - put_byte(srca,val); -}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#endif - -#ifdef PART_6 -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_60ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(0)) goto endlabel2065; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2065; -{ uae_s32 src = get_ilong(2); - if (!cctrue(0)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2065: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_62ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(2)) goto endlabel2066; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2066; -{ uae_s32 src = get_ilong(2); - if (!cctrue(2)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2066: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_63ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(3)) goto endlabel2067; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2067; -{ uae_s32 src = get_ilong(2); - if (!cctrue(3)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2067: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_64ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(4)) goto endlabel2068; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2068; -{ uae_s32 src = get_ilong(2); - if (!cctrue(4)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2068: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_65ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(5)) goto endlabel2069; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2069; -{ uae_s32 src = get_ilong(2); - if (!cctrue(5)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2069: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_66ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(6)) goto endlabel2070; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2070; -{ uae_s32 src = get_ilong(2); - if (!cctrue(6)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2070: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_67ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(7)) goto endlabel2071; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2071; -{ uae_s32 src = get_ilong(2); - if (!cctrue(7)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2071: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_68ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(8)) goto endlabel2072; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2072; -{ uae_s32 src = get_ilong(2); - if (!cctrue(8)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2072: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_69ff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(9)) goto endlabel2073; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2073; -{ uae_s32 src = get_ilong(2); - if (!cctrue(9)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2073: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6aff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(10)) goto endlabel2074; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2074; -{ uae_s32 src = get_ilong(2); - if (!cctrue(10)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2074: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6bff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(11)) goto endlabel2075; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2075; -{ uae_s32 src = get_ilong(2); - if (!cctrue(11)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2075: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6cff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(12)) goto endlabel2076; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2076; -{ uae_s32 src = get_ilong(2); - if (!cctrue(12)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2076: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6dff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(13)) goto endlabel2077; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2077; -{ uae_s32 src = get_ilong(2); - if (!cctrue(13)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2077: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6eff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(14)) goto endlabel2078; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2078; -{ uae_s32 src = get_ilong(2); - if (!cctrue(14)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2078: ; - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_6fff_3)(uae_u32 opcode) /* Bcc.L #.L */ -{ - cpuop_begin(); -{ m68k_incpc(2); - if (!cctrue(15)) goto endlabel2079; - last_addr_for_exception_3 = m68k_getpc() + 2; - last_fault_for_exception_3 = m68k_getpc() + 1; - last_op_for_exception_3 = opcode; Exception(3,0); goto endlabel2079; -{ uae_s32 src = get_ilong(2); - if (!cctrue(15)) goto didnt_jump; - m68k_incpc ((uae_s32)src + 2); -return; -didnt_jump:; -}}m68k_incpc(6); -endlabel2079: ; - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_8030_3)(uae_u32 opcode) /* OR.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_803b_3)(uae_u32 opcode) /* OR.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8070_3)(uae_u32 opcode) /* OR.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_807b_3)(uae_u32 opcode) /* OR.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80b0_3)(uae_u32 opcode) /* OR.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80bb_3)(uae_u32 opcode) /* OR.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80f0_3)(uae_u32 opcode) /* DIVU.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel2086; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel2086: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_80fb_3)(uae_u32 opcode) /* DIVU.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto endlabel2087; } else { - uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src; - uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src; - if (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel2087: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8130_3)(uae_u32 opcode) /* OR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_8170_3)(uae_u32 opcode) /* OR.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81b0_3)(uae_u32 opcode) /* OR.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); - src |= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81f0_3)(uae_u32 opcode) /* DIVS.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel2091; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel2091: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_81fb_3)(uae_u32 opcode) /* DIVS.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{ uaecptr oldpc = m68k_getpc(); -{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -m68k_incpc(4); - if (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto endlabel2092; } else { - uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src; - uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src; - if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else - { - if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_NFLG (((uae_s16)(newv)) < 0); - newv = (newv & 0xffff) | ((uae_u32)rem << 16); - m68k_dreg(regs, dstreg) = (newv); - } - } -}}}}endlabel2092: ; - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9030_3)(uae_u32 opcode) /* SUB.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_903b_3)(uae_u32 opcode) /* SUB.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9070_3)(uae_u32 opcode) /* SUB.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_907b_3)(uae_u32 opcode) /* SUB.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90b0_3)(uae_u32 opcode) /* SUB.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_90bb_3)(uae_u32 opcode) /* SUB.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90f0_3)(uae_u32 opcode) /* SUBA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_90fb_3)(uae_u32 opcode) /* SUBA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_9130_3)(uae_u32 opcode) /* SUB.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_9170_3)(uae_u32 opcode) /* SUB.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_91b0_3)(uae_u32 opcode) /* SUB.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91f0_3)(uae_u32 opcode) /* SUBA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_91fb_3)(uae_u32 opcode) /* SUBA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst - src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_b030_3)(uae_u32 opcode) /* CMP.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b03b_3)(uae_u32 opcode) /* CMP.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) - ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_7 -void REGPARAM2 CPUFUNC(op_b070_3)(uae_u32 opcode) /* CMP.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b07b_3)(uae_u32 opcode) /* CMP.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) - ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0b0_3)(uae_u32 opcode) /* CMP.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0bb_3)(uae_u32 opcode) /* CMP.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0f0_3)(uae_u32 opcode) /* CMPA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b0fb_3)(uae_u32 opcode) /* CMPA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b130_3)(uae_u32 opcode) /* EOR.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b170_3)(uae_u32 opcode) /* EOR.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1b0_3)(uae_u32 opcode) /* EOR.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); - src ^= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1f0_3)(uae_u32 opcode) /* CMPA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_b1fb_3)(uae_u32 opcode) /* CMPA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) - ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs != flgo) && (flgn != flgo)); - SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst))); - SET_NFLG (flgn != 0); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c030_3)(uae_u32 opcode) /* AND.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c03b_3)(uae_u32 opcode) /* AND.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((src) & 0xff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c070_3)(uae_u32 opcode) /* AND.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c07b_3)(uae_u32 opcode) /* AND.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((src) & 0xffff); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0b0_3)(uae_u32 opcode) /* AND.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0bb_3)(uae_u32 opcode) /* AND.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - m68k_dreg(regs, dstreg) = (src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0f0_3)(uae_u32 opcode) /* MULU.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c0fb_3)(uae_u32 opcode) /* MULU.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c130_3)(uae_u32 opcode) /* AND.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s8)(src)) == 0); - SET_NFLG (((uae_s8)(src)) < 0); - put_byte(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c170_3)(uae_u32 opcode) /* AND.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(src)) == 0); - SET_NFLG (((uae_s16)(src)) < 0); - put_word(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1b0_3)(uae_u32 opcode) /* AND.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); - src &= dst; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(src)) == 0); - SET_NFLG (((uae_s32)(src)) < 0); - put_long(dsta,src); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1f0_3)(uae_u32 opcode) /* MULS.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_c1fb_3)(uae_u32 opcode) /* MULS.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src; - CLEAR_CZNV; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_NFLG (((uae_s32)(newv)) < 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d030_3)(uae_u32 opcode) /* ADD.B (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d03b_3)(uae_u32 opcode) /* ADD.B (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s8 src = get_byte(srca); -{ uae_s8 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xff) | ((newv) & 0xff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d070_3)(uae_u32 opcode) /* ADD.W (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d07b_3)(uae_u32 opcode) /* ADD.W (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s16 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ~0xffff) | ((newv) & 0xffff); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0b0_3)(uae_u32 opcode) /* ADD.L (d8,An,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d0bb_3)(uae_u32 opcode) /* ADD.L (d8,PC,Xn),Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_dreg(regs, dstreg); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - m68k_dreg(regs, dstreg) = (newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0f0_3)(uae_u32 opcode) /* ADDA.W (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d0fb_3)(uae_u32 opcode) /* ADDA.W (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s16 src = get_word(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_d130_3)(uae_u32 opcode) /* ADD.B Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s8 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s8 dst = get_byte(dsta); -{{uae_u32 newv = ((uae_s8)(dst)) + ((uae_s8)(src)); -{ int flgs = ((uae_s8)(src)) < 0; - int flgo = ((uae_s8)(dst)) < 0; - int flgn = ((uae_s8)(newv)) < 0; - SET_ZFLG (((uae_s8)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_byte(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d170_3)(uae_u32 opcode) /* ADD.W Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s16 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s16 dst = get_word(dsta); -{{uae_u32 newv = ((uae_s16)(dst)) + ((uae_s16)(src)); -{ int flgs = ((uae_s16)(src)) < 0; - int flgo = ((uae_s16)(dst)) < 0; - int flgn = ((uae_s16)(newv)) < 0; - SET_ZFLG (((uae_s16)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_word(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_d1b0_3)(uae_u32 opcode) /* ADD.L Dn,(d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 1) & 7); -#else - uae_u32 srcreg = ((opcode >> 9) & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 8) & 7; -#else - uae_u32 dstreg = opcode & 7; -#endif -{{ uae_s32 src = m68k_dreg(regs, srcreg); -{ uaecptr dsta = get_disp_ea_000(m68k_areg(regs, dstreg), get_iword(2)); -{ uae_s32 dst = get_long(dsta); -{{uae_u32 newv = ((uae_s32)(dst)) + ((uae_s32)(src)); -{ int flgs = ((uae_s32)(src)) < 0; - int flgo = ((uae_s32)(dst)) < 0; - int flgn = ((uae_s32)(newv)) < 0; - SET_ZFLG (((uae_s32)(newv)) == 0); - SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn)); - SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src))); - COPY_CARRY; - SET_NFLG (flgn != 0); - put_long(dsta,newv); -}}}}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - -#ifdef PART_8 -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1f0_3)(uae_u32 opcode) /* ADDA.L (d8,An,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_d1fb_3)(uae_u32 opcode) /* ADDA.L (d8,PC,Xn),An */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 dstreg = (opcode >> 1) & 7; -#else - uae_u32 dstreg = (opcode >> 9) & 7; -#endif -{{ uaecptr tmppc = m68k_getpc() + 2; - uaecptr srca = get_disp_ea_000(tmppc, get_iword(2)); -{ uae_s32 src = get_long(srca); -{ uae_s32 dst = m68k_areg(regs, dstreg); -{ uae_u32 newv = dst + src; - m68k_areg(regs, dstreg) = (newv); -}}}}}m68k_incpc(4); - cpuop_end(); -} - -#endif -void REGPARAM2 CPUFUNC(op_e0f0_3)(uae_u32 opcode) /* ASRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 cflg = val & 1; - val = (val >> 1) | sign; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - SET_CFLG (cflg); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e1f0_3)(uae_u32 opcode) /* ASLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 sign = 0x8000 & val; - uae_u32 sign2; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); - sign2 = 0x8000 & val; - SET_CFLG (sign != 0); - COPY_CARRY; - SET_VFLG (GET_VFLG | (sign2 != sign)); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e2f0_3)(uae_u32 opcode) /* LSRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u32 val = (uae_u16)data; - uae_u32 carry = val & 1; - val >>= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e3f0_3)(uae_u32 opcode) /* LSLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e4f0_3)(uae_u32 opcode) /* ROXRW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (GET_XFLG) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e5f0_3)(uae_u32 opcode) /* ROXLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (GET_XFLG) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - COPY_CARRY; - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e6f0_3)(uae_u32 opcode) /* RORW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 1; - val >>= 1; - if (carry) val |= 0x8000; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -void REGPARAM2 CPUFUNC(op_e7f0_3)(uae_u32 opcode) /* ROLW.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr dataa = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); -{ uae_s16 data = get_word(dataa); -{ uae_u16 val = data; - uae_u32 carry = val & 0x8000; - val <<= 1; - if (carry) val |= 1; - CLEAR_CZNV; - SET_ZFLG (((uae_s16)(val)) == 0); - SET_NFLG (((uae_s16)(val)) < 0); -SET_CFLG (carry >> 15); - put_word(dataa,val); -}}}}m68k_incpc(4); - cpuop_end(); -} -#endif - - -#ifdef _MSC_VER -#pragma warning(disable:4102) /* unreferenced label */ -#endif - -#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8) -#define PART_1 1 -#define PART_2 1 -#define PART_3 1 -#define PART_4 1 -#define PART_5 1 -#define PART_6 1 -#define PART_7 1 -#define PART_8 1 -#endif - -#ifdef PART_1 -#endif - -#ifdef PART_2 -#endif - -#ifdef PART_3 -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40c0_4)(uae_u32 opcode) /* MVSR2.W Dn */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ MakeSR(); - m68k_dreg(regs, srcreg) = (m68k_dreg(regs, srcreg) & ~0xffff) | ((regs.sr) & 0xffff); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40d0_4)(uae_u32 opcode) /* MVSR2.W (An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40d8_4)(uae_u32 opcode) /* MVSR2.W (An)+ */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg); - m68k_areg(regs, srcreg) += 2; - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40e0_4)(uae_u32 opcode) /* MVSR2.W -(An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) - 2; - m68k_areg (regs, srcreg) = srca; - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(2); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40e8_4)(uae_u32 opcode) /* MVSR2.W (d16,An) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f0_4)(uae_u32 opcode) /* MVSR2.W (d8,An,Xn) */ -{ - cpuop_begin(); -#ifdef HAVE_GET_WORD_UNSWAPPED - uae_u32 srcreg = ((opcode >> 8) & 7); -#else - uae_u32 srcreg = (opcode & 7); -#endif -{{ uaecptr srca = get_disp_ea_000(m68k_areg(regs, srcreg), get_iword(2)); - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f8_4)(uae_u32 opcode) /* MVSR2.W (xxx).W */ -{ - cpuop_begin(); -{{ uaecptr srca = (uae_s32)(uae_s16)get_iword(2); - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(4); - cpuop_end(); -} - -#endif -#ifndef NOFLAGS -void REGPARAM2 CPUFUNC(op_40f9_4)(uae_u32 opcode) /* MVSR2.W (xxx).L */ -{ - cpuop_begin(); -{{ uaecptr srca = get_ilong(2); - MakeSR(); - put_word(srca,regs.sr); -}}m68k_incpc(6); - cpuop_end(); -} - -#endif -#endif - -#ifdef PART_4 -void REGPARAM2 CPUFUNC(op_4e73_4)(uae_u32 opcode) /* RTE.L */ -{ - cpuop_begin(); -{if (!regs.s) { Exception(8,0); goto endlabel2161; } -{{ uaecptr sra = m68k_areg(regs, 7); -{ uae_s16 sr = get_word(sra); - m68k_areg(regs, 7) += 2; -{ uaecptr pca = m68k_areg(regs, 7); -{ uae_s32 pc = get_long(pca); - m68k_areg(regs, 7) += 4; - regs.sr = sr; m68k_setpc_rte(pc); - MakeFromSR(); -}}}}}}endlabel2161: ; - cpuop_end(); -} -#endif - -#ifdef PART_5 -#endif - -#ifdef PART_6 -#endif - -#ifdef PART_7 -#endif - -#ifdef PART_8 -#endif - diff --git a/BasiliskII/src/uae_cpu/cpuemu_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu_nf.cpp deleted file mode 100644 index 72e965cf6..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu_nf.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define NOFLAGS -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbl.cpp b/BasiliskII/src/uae_cpu/cpustbl.cpp deleted file mode 100644 index 87fc85bf9..000000000 --- a/BasiliskII/src/uae_cpu/cpustbl.cpp +++ /dev/null @@ -1,8720 +0,0 @@ -#include "sysdeps.h" -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "compiler/compemu.h" -#include "fpu/fpu.h" -#include "cputbl.h" -#define SET_CFLG_ALWAYS(x) SET_CFLG(x) -#define SET_NFLG_ALWAYS(x) SET_NFLG(x) -#define CPUFUNC_FF(x) x##_ff -#define CPUFUNC_NF(x) x##_nf -#define CPUFUNC(x) CPUFUNC_FF(x) -#ifdef NOFLAGS -# include "noflags.h" -#endif -struct cputbl CPUFUNC(op_smalltbl_0)[] = { -{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ -{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ -{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ -{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ -{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ -{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ -{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ -{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ -{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ -{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ -{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ -{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ -{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ -{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ -{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ -{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ -{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ -{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ -{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ -{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ -{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ -{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ -{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ -{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ -{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ -{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ -{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ -{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ -{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ -{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ -{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ -{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ -{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ -{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ -{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ -{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ -{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ -{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ -{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ -{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ -{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ -{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ -{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ -{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ -{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ -{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ -{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ -{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ -{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ -{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ -{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ -{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ -{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ -{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ -{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ -{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ -{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ -{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ -{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ -{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ -{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ -{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ -{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ -{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ -{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ -{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ -{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ -{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ -{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ -{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ -{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ -{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ -{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ -{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ -{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ -{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ -{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ -{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ -{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ -{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ -{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ -{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ -{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ -{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ -{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ -{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ -{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ -{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ -{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ -{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ -{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ -{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ -{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ -{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ -{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ -{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ -{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ -{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ -{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ -{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ -{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ -{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ -{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ -{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ -{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ -{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ -{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ -{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ -{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ -{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ -{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ -{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ -{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ -{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ -{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ -{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ -{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ -{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ -{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ -{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ -{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ -{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ -{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ -{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ -{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ -{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ -{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ -{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ -{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ -{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ -{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ -{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ -{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ -{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ -{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ -{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ -{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ -{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ -{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ -{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ -{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ -{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ -{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ -{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ -{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ -{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ -{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ -{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ -{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ -{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ -{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ -{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ -{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ -{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ -{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ -{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ -{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ -{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ -{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ -{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ -{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ -{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ -{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ -{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ -{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ -{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ -{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ -{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ -{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ -{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ -{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ -{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ -{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ -{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ -{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ -{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ -{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ -{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ -{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ -{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ -{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ -{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ -{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ -{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ -{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ -{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ -{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ -{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ -{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ -{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ -{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ -{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ -{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ -{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ -{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ -{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ -{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ -{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ -{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ -{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ -{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ -{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ -{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ -{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ -{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ -{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ -{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ -{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ -{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ -{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ -{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ -{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ -{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ -{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ -{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ -{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ -{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ -{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ -{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ -{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ -{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ -{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ -{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ -{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ -{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ -{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ -{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ -{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ -{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ -{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ -{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ -{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ -{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ -{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ -{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ -{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ -{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ -{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ -{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ -{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ -{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ -{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ -{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ -{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ -{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ -{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ -{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ -{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ -{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ -{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ -{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ -{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ -{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ -{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ -{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ -{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ -{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ -{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ -{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ -{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ -{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ -{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ -{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ -{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ -{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ -{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ -{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ -{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ -{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ -{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ -{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ -{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ -{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ -{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ -{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ -{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ -{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ -{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ -{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ -{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ -{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ -{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ -{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ -{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ -{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ -{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ -{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ -{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ -{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ -{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ -{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ -{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ -{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ -{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ -{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ -{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ -{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ -{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ -{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ -{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ -{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ -{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ -{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ -{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ -{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ -{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ -{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ -{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ -{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ -{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ -{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ -{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ -{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ -{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ -{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ -{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ -{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ -{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ -{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ -{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ -{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ -{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ -{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ -{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ -{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ -{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ -{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ -{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ -{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ -{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ -{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ -{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ -{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ -{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ -{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ -{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ -{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ -{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ -{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ -{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ -{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ -{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ -{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ -{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ -{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ -{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ -{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ -{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ -{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ -{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ -{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ -{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ -{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ -{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ -{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ -{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ -{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ -{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ -{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ -{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ -{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ -{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ -{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ -{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ -{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ -{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ -{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ -{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ -{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ -{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ -{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ -{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ -{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ -{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ -{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ -{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ -{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ -{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ -{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ -{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ -{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ -{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ -{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ -{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ -{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ -{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ -{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ -{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ -{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ -{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ -{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ -{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ -{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ -{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ -{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ -{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ -{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ -{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ -{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ -{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ -{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ -{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ -{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ -{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ -{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ -{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ -{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ -{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ -{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ -{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ -{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ -{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ -{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ -{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ -{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ -{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ -{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ -{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ -{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ -{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ -{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ -{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ -{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ -{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ -{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ -{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ -{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ -{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ -{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ -{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ -{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ -{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ -{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ -{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ -{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ -{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ -{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ -{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ -{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ -{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ -{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ -{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ -{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ -{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ -{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ -{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ -{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ -{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ -{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ -{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ -{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ -{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ -{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ -{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ -{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ -{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ -{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ -{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ -{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ -{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ -{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ -{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ -{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ -{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ -{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ -{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ -{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ -{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ -{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ -{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ -{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ -{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ -{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ -{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ -{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ -{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ -{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ -{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ -{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ -{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ -{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ -{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ -{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ -{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ -{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ -{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ -{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ -{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ -{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ -{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ -{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ -{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ -{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ -{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ -{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ -{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ -{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ -{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ -{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ -{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ -{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ -{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ -{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ -{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ -{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ -{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ -{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ -{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ -{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ -{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ -{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ -{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ -{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ -{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ -{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ -{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ -{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ -{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ -{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ -{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ -{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ -{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ -{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ -{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ -{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ -{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ -{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ -{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ -{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ -{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ -{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ -{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ -{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ -{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ -{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ -{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ -{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ -{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ -{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ -{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ -{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ -{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ -{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ -{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ -{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ -{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ -{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ -{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ -{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ -{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ -{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ -{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ -{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ -{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ -{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ -{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ -{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ -{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ -{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ -{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ -{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ -{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ -{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ -{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ -{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ -{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ -{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ -{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ -{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ -{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ -{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ -{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ -{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ -{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ -{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ -{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ -{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ -{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ -{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ -{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ -{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ -{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ -{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ -{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ -{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ -{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ -{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ -{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ -{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ -{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ -{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ -{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ -{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ -{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ -{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ -{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ -{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ -{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ -{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ -{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ -{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ -{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ -{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ -{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ -{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ -{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ -{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ -{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ -{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ -{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ -{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ -{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ -{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ -{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ -{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ -{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ -{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ -{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ -{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ -{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ -{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ -{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ -{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ -{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ -{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ -{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ -{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ -{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ -{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ -{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ -{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ -{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ -{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ -{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ -{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ -{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ -{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ -{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ -{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ -{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ -{ CPUFUNC(op_4800_0), 0, 18432 }, /* NBCD.B Dn */ -{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ -{ CPUFUNC(op_4810_0), 0, 18448 }, /* NBCD.B (An) */ -{ CPUFUNC(op_4818_0), 0, 18456 }, /* NBCD.B (An)+ */ -{ CPUFUNC(op_4820_0), 0, 18464 }, /* NBCD.B -(An) */ -{ CPUFUNC(op_4828_0), 0, 18472 }, /* NBCD.B (d16,An) */ -{ CPUFUNC(op_4830_0), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ -{ CPUFUNC(op_4838_0), 0, 18488 }, /* NBCD.B (xxx).W */ -{ CPUFUNC(op_4839_0), 0, 18489 }, /* NBCD.B (xxx).L */ -{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ -{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ -{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ -{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ -{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ -{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ -{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ -{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ -{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ -{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ -{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ -{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ -{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ -{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ -{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ -{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ -{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ -{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ -{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ -{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ -{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ -{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ -{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ -{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ -{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ -{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ -{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ -{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ -{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ -{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ -{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ -{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ -{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ -{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ -{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ -{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ -{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ -{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ -{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ -{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ -{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ -{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ -{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ -{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ -{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ -{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ -{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ -{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ -{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ -{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ -{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ -{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ -{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ -{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ -{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ -{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ -{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ -{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ -{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ -{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ -{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ -{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ -{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ -{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ -{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ -{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ -{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ -{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ -{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ -{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ -{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ -{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ -{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ -{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ -{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ -{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ -{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ -{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ -{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ -{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ -{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ -{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ -{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ -{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ -{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ -{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ -{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ -{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ -{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ -{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ -{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ -{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ -{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ -{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ -{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ -{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ -{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ -{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ -{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ -{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ -{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ -{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ -{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ -{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ -{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ -{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ -{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ -{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ -{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ -{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ -{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ -{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ -{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ -{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ -{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ -{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ -{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ -{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ -{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ -{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ -{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ -{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ -{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ -{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ -{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ -{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ -{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ -{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ -{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ -{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ -{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ -{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ -{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ -{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ -{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ -{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ -{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ -{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ -{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ -{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ -{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ -{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ -{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ -{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ -{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ -{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ -{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ -{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ -{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ -{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ -{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ -{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ -{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ -{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ -{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ -{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ -{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ -{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ -{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ -{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ -{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ -{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ -{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ -{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ -{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ -{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ -{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ -{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ -{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ -{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ -{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ -{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ -{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ -{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ -{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ -{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ -{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ -{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ -{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ -{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ -{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ -{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ -{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ -{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ -{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ -{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ -{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ -{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ -{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ -{ CPUFUNC(op_8100_0), 0, 33024 }, /* SBCD.B Dn,Dn */ -{ CPUFUNC(op_8108_0), 0, 33032 }, /* SBCD.B -(An),-(An) */ -{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ -{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ -{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ -{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ -{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ -{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ -{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ -{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ -{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ -{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ -{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ -{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ -{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ -{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ -{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ -{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ -{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ -{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ -{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ -{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ -{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ -{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ -{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ -{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ -{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ -{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ -{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ -{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ -{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ -{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ -{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ -{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ -{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ -{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ -{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ -{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ -{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ -{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ -{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ -{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ -{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ -{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ -{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ -{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ -{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ -{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ -{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ -{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ -{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ -{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ -{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ -{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ -{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ -{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ -{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ -{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ -{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ -{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ -{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ -{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ -{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ -{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ -{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ -{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ -{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ -{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ -{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ -{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ -{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ -{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ -{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ -{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ -{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ -{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ -{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ -{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ -{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ -{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ -{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ -{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ -{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ -{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ -{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ -{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ -{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ -{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ -{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ -{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ -{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ -{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ -{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ -{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ -{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ -{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ -{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ -{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ -{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ -{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ -{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ -{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ -{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ -{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ -{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ -{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ -{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ -{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ -{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ -{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ -{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ -{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ -{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ -{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ -{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ -{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ -{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ -{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ -{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ -{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ -{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ -{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ -{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ -{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ -{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ -{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ -{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ -{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ -{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ -{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ -{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ -{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ -{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ -{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ -{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ -{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ -{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ -{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ -{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ -{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ -{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ -{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ -{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ -{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ -{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ -{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ -{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ -{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ -{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ -{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ -{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ -{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ -{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ -{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ -{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ -{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ -{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ -{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ -{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ -{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ -{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ -{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ -{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ -{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ -{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ -{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ -{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ -{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ -{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ -{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ -{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ -{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ -{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ -{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ -{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ -{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ -{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ -{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ -{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ -{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ -{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ -{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ -{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ -{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ -{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ -{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ -{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ -{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ -{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ -{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ -{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ -{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ -{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ -{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ -{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ -{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ -{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ -{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ -{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ -{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ -{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ -{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ -{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ -{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ -{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ -{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ -{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ -{ CPUFUNC(op_c100_0), 0, 49408 }, /* ABCD.B Dn,Dn */ -{ CPUFUNC(op_c108_0), 0, 49416 }, /* ABCD.B -(An),-(An) */ -{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ -{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ -{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ -{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ -{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ -{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ -{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ -{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ -{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ -{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ -{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ -{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ -{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ -{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ -{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ -{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ -{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ -{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ -{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ -{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ -{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ -{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ -{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ -{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ -{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ -{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ -{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ -{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ -{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ -{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ -{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ -{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ -{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ -{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ -{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ -{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ -{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ -{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ -{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ -{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ -{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ -{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ -{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ -{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ -{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ -{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ -{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ -{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ -{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ -{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ -{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ -{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ -{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ -{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ -{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ -{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ -{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ -{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ -{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ -{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ -{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ -{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ -{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ -{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ -{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ -{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ -{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ -{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ -{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ -{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ -{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ -{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ -{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ -{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ -{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ -{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ -{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ -{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ -{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ -{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ -{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ -{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ -{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ -{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ -{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ -{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ -{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ -{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ -{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ -{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ -{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ -{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ -{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ -{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ -{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ -{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ -{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ -{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ -{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ -{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ -{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ -{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ -{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ -{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ -{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ -{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ -{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ -{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ -{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ -{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ -{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ -{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ -{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ -{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ -{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ -{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ -{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ -{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ -{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ -{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ -{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ -{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ -{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ -{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ -{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ -{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ -{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ -{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ -{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ -{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ -{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ -{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ -{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ -{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ -{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ -{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ -{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ -{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ -{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ -{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ -{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ -{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ -{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ -{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ -{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ -{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ -{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ -{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ -{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ -{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ -{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ -{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ -{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ -{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ -{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ -{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ -{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ -{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ -{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ -{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ -{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ -{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ -{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ -{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ -{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ -{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ -{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ -{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ -{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ -{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ -{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ -{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ -{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ -{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ -{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ -{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ -{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ -{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ -{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ -{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ -{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ -{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ -{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ -{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ -{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ -{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ -{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ -{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ -{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ -{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ -{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ -{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ -{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ -{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ -{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ -{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ -{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ -{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ -{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ -{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ -{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ -{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ -{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ -{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ -{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ -{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ -{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ -{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ -{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ -{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ -{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ -{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ -{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ -{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ -{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ -{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ -{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ -{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ -{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ -{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ -{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ -{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ -{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ -{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ -{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ -{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ -{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ -{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ -{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ -{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ -{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ -{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ -{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ -{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ -{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ -{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ -{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ -{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ -{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f200_0), 0, 61952 }, /* FPP.L #.W,Dn */ -{ CPUFUNC_FF(op_f208_0), 0, 61960 }, /* FPP.L #.W,An */ -{ CPUFUNC_FF(op_f210_0), 0, 61968 }, /* FPP.L #.W,(An) */ -{ CPUFUNC_FF(op_f218_0), 0, 61976 }, /* FPP.L #.W,(An)+ */ -{ CPUFUNC_FF(op_f220_0), 0, 61984 }, /* FPP.L #.W,-(An) */ -{ CPUFUNC_FF(op_f228_0), 0, 61992 }, /* FPP.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_f230_0), 0, 62000 }, /* FPP.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_f238_0), 0, 62008 }, /* FPP.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_f239_0), 0, 62009 }, /* FPP.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f23a_0), 0, 62010 }, /* FPP.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_f23b_0), 0, 62011 }, /* FPP.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_f23c_0), 0, 62012 }, /* FPP.L #.W,#.L */ -{ CPUFUNC_FF(op_f240_0), 0, 62016 }, /* FScc.L #.W,Dn */ -{ CPUFUNC_FF(op_f248_0), 0, 62024 }, /* FDBcc.L #.W,Dn */ -{ CPUFUNC_FF(op_f250_0), 0, 62032 }, /* FScc.L #.W,(An) */ -{ CPUFUNC_FF(op_f258_0), 0, 62040 }, /* FScc.L #.W,(An)+ */ -{ CPUFUNC_FF(op_f260_0), 0, 62048 }, /* FScc.L #.W,-(An) */ -{ CPUFUNC_FF(op_f268_0), 0, 62056 }, /* FScc.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_f270_0), 0, 62064 }, /* FScc.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_f278_0), 0, 62072 }, /* FScc.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_f279_0), 0, 62073 }, /* FScc.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f27a_0), 0, 62074 }, /* FTRAPcc.L #.W */ -{ CPUFUNC_FF(op_f27b_0), 0, 62075 }, /* FTRAPcc.L #.L */ -{ CPUFUNC_FF(op_f27c_0), 0, 62076 }, /* FTRAPcc.L */ -{ CPUFUNC_FF(op_f280_0), 0, 62080 }, /* FBcc.L #,#.W */ -{ CPUFUNC_FF(op_f2c0_0), 0, 62144 }, /* FBcc.L #,#.L */ -{ CPUFUNC_FF(op_f310_0), 0, 62224 }, /* FSAVE.L (An) */ -{ CPUFUNC_FF(op_f320_0), 0, 62240 }, /* FSAVE.L -(An) */ -{ CPUFUNC_FF(op_f328_0), 0, 62248 }, /* FSAVE.L (d16,An) */ -{ CPUFUNC_FF(op_f330_0), 0, 62256 }, /* FSAVE.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_f338_0), 0, 62264 }, /* FSAVE.L (xxx).W */ -{ CPUFUNC_FF(op_f339_0), 0, 62265 }, /* FSAVE.L (xxx).L */ -{ CPUFUNC_FF(op_f350_0), 0, 62288 }, /* FRESTORE.L (An) */ -{ CPUFUNC_FF(op_f358_0), 0, 62296 }, /* FRESTORE.L (An)+ */ -{ CPUFUNC_FF(op_f368_0), 0, 62312 }, /* FRESTORE.L (d16,An) */ -{ CPUFUNC_FF(op_f370_0), 0, 62320 }, /* FRESTORE.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_f378_0), 0, 62328 }, /* FRESTORE.L (xxx).W */ -{ CPUFUNC_FF(op_f379_0), 0, 62329 }, /* FRESTORE.L (xxx).L */ -{ CPUFUNC_FF(op_f37a_0), 0, 62330 }, /* FRESTORE.L (d16,PC) */ -{ CPUFUNC_FF(op_f37b_0), 0, 62331 }, /* FRESTORE.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_f408_0), 0, 62472 }, /* CINVL.L #,An */ -{ CPUFUNC_FF(op_f410_0), 0, 62480 }, /* CINVP.L #,An */ -{ CPUFUNC_FF(op_f418_0), 0, 62488 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f419_0), 0, 62489 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41a_0), 0, 62490 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41b_0), 0, 62491 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41c_0), 0, 62492 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41d_0), 0, 62493 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41e_0), 0, 62494 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f41f_0), 0, 62495 }, /* CINVA.L # */ -{ CPUFUNC_FF(op_f428_0), 0, 62504 }, /* CPUSHL.L #,An */ -{ CPUFUNC_FF(op_f430_0), 0, 62512 }, /* CPUSHP.L #,An */ -{ CPUFUNC_FF(op_f438_0), 0, 62520 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f439_0), 0, 62521 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43a_0), 0, 62522 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43b_0), 0, 62523 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43c_0), 0, 62524 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43d_0), 0, 62525 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43e_0), 0, 62526 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f43f_0), 0, 62527 }, /* CPUSHA.L # */ -{ CPUFUNC_FF(op_f500_0), 0, 62720 }, /* MMUOP.L #,Dn */ -{ CPUFUNC_FF(op_f600_0), 0, 62976 }, /* MOVE16.L (An)+,(xxx).L */ -{ CPUFUNC_FF(op_f608_0), 0, 62984 }, /* MOVE16.L (xxx).L,(An)+ */ -{ CPUFUNC_FF(op_f610_0), 0, 62992 }, /* MOVE16.L (An),(xxx).L */ -{ CPUFUNC_FF(op_f618_0), 0, 63000 }, /* MOVE16.L (xxx).L,(An) */ -{ CPUFUNC_FF(op_f620_0), 0, 63008 }, /* MOVE16.L (An)+,(An)+ */ -{ 0, 0, 0 }}; -struct cputbl CPUFUNC(op_smalltbl_1)[] = { -{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ -{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ -{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ -{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ -{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ -{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ -{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ -{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ -{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ -{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ -{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ -{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ -{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ -{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ -{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ -{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ -{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ -{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ -{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ -{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ -{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ -{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ -{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ -{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ -{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ -{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ -{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ -{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ -{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ -{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ -{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ -{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ -{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ -{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ -{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ -{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ -{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ -{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ -{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ -{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ -{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ -{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ -{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ -{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ -{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ -{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ -{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ -{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ -{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ -{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ -{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ -{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ -{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ -{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ -{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ -{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ -{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ -{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ -{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ -{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ -{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ -{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ -{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ -{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ -{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ -{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ -{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ -{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ -{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ -{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ -{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ -{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ -{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ -{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ -{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ -{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ -{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ -{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ -{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ -{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ -{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ -{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ -{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ -{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ -{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ -{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ -{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ -{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ -{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ -{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ -{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ -{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ -{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ -{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ -{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ -{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ -{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ -{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ -{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ -{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ -{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ -{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ -{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ -{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ -{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ -{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ -{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ -{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ -{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ -{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ -{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ -{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ -{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ -{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ -{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ -{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ -{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ -{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ -{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ -{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ -{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ -{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ -{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ -{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ -{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ -{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ -{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ -{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ -{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ -{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ -{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ -{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ -{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ -{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ -{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ -{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ -{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ -{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ -{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ -{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ -{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ -{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ -{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ -{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ -{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ -{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ -{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ -{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ -{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ -{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ -{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ -{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ -{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ -{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ -{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ -{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ -{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ -{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ -{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ -{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ -{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ -{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ -{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ -{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ -{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ -{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ -{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ -{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ -{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ -{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ -{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ -{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ -{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ -{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ -{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ -{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ -{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ -{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ -{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ -{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ -{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ -{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ -{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ -{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ -{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ -{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ -{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ -{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ -{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ -{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ -{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ -{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ -{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ -{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ -{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ -{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ -{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ -{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ -{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ -{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ -{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ -{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ -{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ -{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ -{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ -{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ -{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ -{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ -{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ -{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ -{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ -{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ -{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ -{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ -{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ -{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ -{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ -{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ -{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ -{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ -{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ -{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ -{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ -{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ -{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ -{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ -{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ -{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ -{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ -{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ -{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ -{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ -{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ -{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ -{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ -{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ -{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ -{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ -{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ -{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ -{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ -{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ -{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ -{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ -{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ -{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ -{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ -{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ -{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ -{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ -{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ -{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ -{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ -{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ -{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ -{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ -{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ -{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ -{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ -{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ -{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ -{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ -{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ -{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ -{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ -{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ -{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ -{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ -{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ -{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ -{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ -{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ -{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ -{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ -{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ -{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ -{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ -{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ -{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ -{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ -{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ -{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ -{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ -{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ -{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ -{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ -{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ -{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ -{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ -{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ -{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ -{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ -{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ -{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ -{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ -{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ -{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ -{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ -{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ -{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ -{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ -{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ -{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ -{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ -{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ -{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ -{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ -{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ -{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ -{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ -{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ -{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ -{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ -{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ -{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ -{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ -{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ -{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ -{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ -{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ -{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ -{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ -{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ -{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ -{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ -{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ -{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ -{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ -{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ -{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ -{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ -{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ -{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ -{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ -{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ -{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ -{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ -{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ -{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ -{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ -{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ -{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ -{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ -{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ -{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ -{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ -{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ -{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ -{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ -{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ -{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ -{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ -{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ -{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ -{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ -{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ -{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ -{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ -{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ -{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ -{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ -{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ -{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ -{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ -{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ -{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ -{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ -{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ -{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ -{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ -{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ -{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ -{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ -{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ -{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ -{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ -{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ -{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ -{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ -{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ -{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ -{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ -{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ -{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ -{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ -{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ -{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ -{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ -{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ -{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ -{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ -{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ -{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ -{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ -{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ -{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ -{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ -{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ -{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ -{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ -{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ -{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ -{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ -{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ -{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ -{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ -{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ -{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ -{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ -{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ -{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ -{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ -{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ -{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ -{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ -{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ -{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ -{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ -{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ -{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ -{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ -{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ -{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ -{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ -{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ -{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ -{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ -{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ -{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ -{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ -{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ -{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ -{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ -{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ -{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ -{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ -{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ -{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ -{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ -{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ -{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ -{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ -{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ -{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ -{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ -{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ -{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ -{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ -{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ -{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ -{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ -{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ -{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ -{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ -{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ -{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ -{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ -{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ -{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ -{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ -{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ -{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ -{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ -{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ -{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ -{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ -{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ -{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ -{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ -{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ -{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ -{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ -{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ -{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ -{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ -{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ -{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ -{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ -{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ -{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ -{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ -{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ -{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ -{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ -{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ -{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ -{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ -{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ -{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ -{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ -{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ -{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ -{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ -{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ -{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ -{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ -{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ -{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ -{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ -{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ -{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ -{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ -{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ -{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ -{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ -{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ -{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ -{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ -{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ -{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ -{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ -{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ -{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ -{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ -{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ -{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ -{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ -{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ -{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ -{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ -{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ -{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ -{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ -{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ -{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ -{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ -{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ -{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ -{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ -{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ -{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ -{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ -{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ -{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ -{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ -{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ -{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ -{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ -{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ -{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ -{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ -{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ -{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ -{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ -{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ -{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ -{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ -{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ -{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ -{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ -{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ -{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ -{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ -{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ -{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ -{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ -{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ -{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ -{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ -{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ -{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ -{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ -{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ -{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ -{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ -{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ -{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ -{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ -{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ -{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ -{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ -{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ -{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ -{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ -{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ -{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ -{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ -{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ -{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ -{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ -{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ -{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ -{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ -{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ -{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ -{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ -{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ -{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ -{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ -{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ -{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ -{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ -{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ -{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ -{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ -{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ -{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ -{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ -{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ -{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ -{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ -{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ -{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ -{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ -{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ -{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ -{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ -{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ -{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ -{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ -{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ -{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ -{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ -{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ -{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ -{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ -{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ -{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ -{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ -{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ -{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ -{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ -{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ -{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ -{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ -{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ -{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ -{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ -{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ -{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ -{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ -{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ -{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ -{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ -{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ -{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ -{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ -{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ -{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ -{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ -{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ -{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ -{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ -{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ -{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ -{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ -{ CPUFUNC(op_4830_1), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ -{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ -{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ -{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ -{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ -{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ -{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ -{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ -{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ -{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ -{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ -{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ -{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ -{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ -{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ -{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ -{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ -{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ -{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ -{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ -{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ -{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ -{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ -{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ -{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ -{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ -{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ -{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ -{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ -{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ -{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ -{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ -{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ -{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ -{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ -{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ -{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ -{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ -{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ -{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ -{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ -{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ -{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ -{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ -{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ -{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ -{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ -{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ -{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ -{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ -{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ -{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ -{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ -{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ -{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ -{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ -{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ -{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ -{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ -{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ -{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ -{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ -{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ -{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ -{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ -{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ -{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ -{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ -{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ -{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ -{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ -{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ -{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ -{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ -{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ -{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ -{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ -{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ -{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ -{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ -{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ -{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ -{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ -{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ -{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ -{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ -{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ -{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ -{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ -{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ -{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ -{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ -{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ -{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ -{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ -{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ -{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ -{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ -{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ -{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ -{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ -{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ -{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ -{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ -{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ -{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ -{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ -{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ -{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ -{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ -{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ -{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ -{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ -{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ -{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ -{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ -{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ -{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ -{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ -{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ -{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ -{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ -{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ -{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ -{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ -{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ -{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ -{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ -{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ -{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ -{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ -{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ -{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ -{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ -{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ -{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ -{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ -{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ -{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ -{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ -{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ -{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ -{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ -{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ -{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ -{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ -{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ -{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ -{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ -{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ -{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ -{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ -{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ -{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ -{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ -{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ -{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ -{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ -{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ -{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ -{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ -{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ -{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ -{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ -{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ -{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ -{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ -{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ -{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ -{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ -{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ -{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ -{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ -{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ -{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ -{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ -{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ -{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ -{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ -{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ -{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ -{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ -{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ -{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ -{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ -{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ -{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ -{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ -{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ -{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ -{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ -{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ -{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ -{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ -{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ -{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ -{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ -{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ -{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ -{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ -{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ -{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ -{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ -{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ -{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ -{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ -{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ -{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ -{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ -{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ -{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ -{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ -{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ -{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ -{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ -{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ -{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ -{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ -{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ -{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ -{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ -{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ -{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ -{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ -{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ -{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ -{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ -{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ -{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ -{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ -{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ -{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ -{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ -{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ -{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ -{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ -{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ -{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ -{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ -{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ -{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ -{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ -{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ -{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ -{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ -{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ -{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ -{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ -{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ -{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ -{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ -{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ -{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ -{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ -{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ -{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ -{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ -{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ -{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ -{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ -{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ -{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ -{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ -{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ -{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ -{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ -{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ -{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ -{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ -{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ -{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ -{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ -{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ -{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ -{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ -{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ -{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ -{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ -{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ -{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ -{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ -{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ -{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ -{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ -{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ -{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ -{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ -{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ -{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ -{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ -{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ -{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ -{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ -{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ -{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ -{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ -{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ -{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ -{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ -{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ -{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ -{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ -{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ -{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ -{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ -{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ -{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ -{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ -{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ -{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ -{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ -{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ -{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ -{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ -{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ -{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ -{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ -{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ -{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ -{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ -{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ -{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ -{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ -{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ -{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ -{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ -{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ -{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ -{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ -{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ -{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ -{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ -{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ -{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ -{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ -{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ -{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ -{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ -{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ -{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ -{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ -{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ -{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ -{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ -{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ -{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ -{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ -{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ -{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ -{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ -{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ -{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ -{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ -{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ -{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ -{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ -{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ -{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ -{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ -{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ -{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ -{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ -{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ -{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ -{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ -{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ -{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ -{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ -{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ -{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ -{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ -{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ -{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ -{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ -{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ -{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ -{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ -{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ -{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ -{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ -{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ -{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ -{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ -{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ -{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ -{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ -{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ -{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ -{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ -{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ -{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ -{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ -{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ -{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ -{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ -{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ -{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ -{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ -{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ -{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ -{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ -{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ -{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ -{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ -{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ -{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ -{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ -{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ -{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ -{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ -{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ -{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ -{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ -{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ -{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ -{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ -{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ -{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ -{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ -{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ -{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ -{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ -{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ -{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ -{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ -{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ -{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ -{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ -{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ -{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ -{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ -{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ -{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ -{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ -{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ -{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ -{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ -{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ -{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ -{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ -{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ -{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ -{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ -{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ -{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ -{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ -{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ -{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ -{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ -{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ -{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ -{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ -{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ -{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ -{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ -{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ -{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ -{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ -{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ -{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ -{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ -{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ -{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ -{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ -{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ -{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ -{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ -{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ -{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ -{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ -{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ -{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ -{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ -{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ -{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ -{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ -{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ -{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ -{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ -{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ -{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ -{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ -{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ -{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ -{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ -{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ -{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ -{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ -{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ -{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ -{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ -{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ -{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ -{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ -{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ -{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ -{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ -{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ -{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ -{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ -{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ -{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ -{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ -{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ -{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ -{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ -{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ -{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ -{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ -{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ -{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ -{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ -{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ -{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ -{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ -{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ -{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ -{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ -{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ -{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ -{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ -{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ -{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ -{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ -{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ -{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ -{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ -{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ -{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ -{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ -{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ -{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ -{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ -{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ -{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ -{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ -{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ -{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ -{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ -{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ -{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ -{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ -{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ -{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ -{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ -{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ -{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ -{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ -{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ -{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ -{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ -{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ -{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ -{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ -{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ -{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ -{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ -{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ -{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ -{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ -{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ -{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ -{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ -{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ -{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ -{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ -{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ -{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ -{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ -{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ -{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ -{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ -{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ -{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ -{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ -{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ -{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ -{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ -{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ -{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ -{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ -{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ -{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ -{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ -{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ -{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ -{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ -{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ -{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ -{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ -{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ -{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ -{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ -{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ -{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ -{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ -{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ -{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ -{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ -{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ -{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ -{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ -{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ -{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ -{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ -{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ -{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ -{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ -{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ -{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ -{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ -{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ -{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ -{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ -{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ -{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ -{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ -{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ -{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ -{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ -{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ -{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ -{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ -{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ -{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ -{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ -{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ -{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ -{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ -{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ -{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ -{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ -{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ -{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ -{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ -{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ -{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ -{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ -{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ -{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f200_0), 0, 61952 }, /* FPP.L #.W,Dn */ -{ CPUFUNC_FF(op_f208_0), 0, 61960 }, /* FPP.L #.W,An */ -{ CPUFUNC_FF(op_f210_0), 0, 61968 }, /* FPP.L #.W,(An) */ -{ CPUFUNC_FF(op_f218_0), 0, 61976 }, /* FPP.L #.W,(An)+ */ -{ CPUFUNC_FF(op_f220_0), 0, 61984 }, /* FPP.L #.W,-(An) */ -{ CPUFUNC_FF(op_f228_0), 0, 61992 }, /* FPP.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_f230_0), 0, 62000 }, /* FPP.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_f238_0), 0, 62008 }, /* FPP.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_f239_0), 0, 62009 }, /* FPP.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f23a_0), 0, 62010 }, /* FPP.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_f23b_0), 0, 62011 }, /* FPP.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_f23c_0), 0, 62012 }, /* FPP.L #.W,#.L */ -{ CPUFUNC_FF(op_f240_0), 0, 62016 }, /* FScc.L #.W,Dn */ -{ CPUFUNC_FF(op_f248_0), 0, 62024 }, /* FDBcc.L #.W,Dn */ -{ CPUFUNC_FF(op_f250_0), 0, 62032 }, /* FScc.L #.W,(An) */ -{ CPUFUNC_FF(op_f258_0), 0, 62040 }, /* FScc.L #.W,(An)+ */ -{ CPUFUNC_FF(op_f260_0), 0, 62048 }, /* FScc.L #.W,-(An) */ -{ CPUFUNC_FF(op_f268_0), 0, 62056 }, /* FScc.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_f270_0), 0, 62064 }, /* FScc.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_f278_0), 0, 62072 }, /* FScc.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_f279_0), 0, 62073 }, /* FScc.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_f27a_0), 0, 62074 }, /* FTRAPcc.L #.W */ -{ CPUFUNC_FF(op_f27b_0), 0, 62075 }, /* FTRAPcc.L #.L */ -{ CPUFUNC_FF(op_f27c_0), 0, 62076 }, /* FTRAPcc.L */ -{ CPUFUNC_FF(op_f280_0), 0, 62080 }, /* FBcc.L #,#.W */ -{ CPUFUNC_FF(op_f2c0_0), 0, 62144 }, /* FBcc.L #,#.L */ -{ CPUFUNC_FF(op_f310_0), 0, 62224 }, /* FSAVE.L (An) */ -{ CPUFUNC_FF(op_f320_0), 0, 62240 }, /* FSAVE.L -(An) */ -{ CPUFUNC_FF(op_f328_0), 0, 62248 }, /* FSAVE.L (d16,An) */ -{ CPUFUNC_FF(op_f330_0), 0, 62256 }, /* FSAVE.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_f338_0), 0, 62264 }, /* FSAVE.L (xxx).W */ -{ CPUFUNC_FF(op_f339_0), 0, 62265 }, /* FSAVE.L (xxx).L */ -{ CPUFUNC_FF(op_f350_0), 0, 62288 }, /* FRESTORE.L (An) */ -{ CPUFUNC_FF(op_f358_0), 0, 62296 }, /* FRESTORE.L (An)+ */ -{ CPUFUNC_FF(op_f368_0), 0, 62312 }, /* FRESTORE.L (d16,An) */ -{ CPUFUNC_FF(op_f370_0), 0, 62320 }, /* FRESTORE.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_f378_0), 0, 62328 }, /* FRESTORE.L (xxx).W */ -{ CPUFUNC_FF(op_f379_0), 0, 62329 }, /* FRESTORE.L (xxx).L */ -{ CPUFUNC_FF(op_f37a_0), 0, 62330 }, /* FRESTORE.L (d16,PC) */ -{ CPUFUNC_FF(op_f37b_0), 0, 62331 }, /* FRESTORE.L (d8,PC,Xn) */ -{ 0, 0, 0 }}; -struct cputbl CPUFUNC(op_smalltbl_2)[] = { -{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ -{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ -{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ -{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ -{ CPUFUNC(op_30_0), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ -{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ -{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ -{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ -{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ -{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ -{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ -{ CPUFUNC(op_70_0), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ -{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ -{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ -{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ -{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ -{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ -{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ -{ CPUFUNC(op_b0_0), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ -{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ -{ CPUFUNC(op_d0_0), 0, 208 }, /* CHK2.B #.W,(An) */ -{ CPUFUNC(op_e8_0), 0, 232 }, /* CHK2.B #.W,(d16,An) */ -{ CPUFUNC(op_f0_0), 0, 240 }, /* CHK2.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_f8_0), 0, 248 }, /* CHK2.B #.W,(xxx).W */ -{ CPUFUNC(op_f9_0), 0, 249 }, /* CHK2.B #.W,(xxx).L */ -{ CPUFUNC(op_fa_0), 0, 250 }, /* CHK2.B #.W,(d16,PC) */ -{ CPUFUNC(op_fb_0), 0, 251 }, /* CHK2.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ -{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ -{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ -{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ -{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ -{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ -{ CPUFUNC(op_130_0), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ -{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ -{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ -{ CPUFUNC(op_13b_0), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ -{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ -{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ -{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ -{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ -{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ -{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ -{ CPUFUNC(op_170_0), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ -{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ -{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ -{ CPUFUNC(op_17b_0), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ -{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ -{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ -{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ -{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ -{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ -{ CPUFUNC(op_1b0_0), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ -{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ -{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ -{ CPUFUNC(op_1bb_0), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ -{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ -{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ -{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ -{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ -{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ -{ CPUFUNC(op_1f0_0), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ -{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ -{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ -{ CPUFUNC(op_1fb_0), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ -{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ -{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ -{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ -{ CPUFUNC(op_230_0), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ -{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ -{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ -{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ -{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ -{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ -{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ -{ CPUFUNC(op_270_0), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ -{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ -{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ -{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ -{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ -{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ -{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ -{ CPUFUNC(op_2b0_0), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ -{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ -{ CPUFUNC(op_2d0_0), 0, 720 }, /* CHK2.W #.W,(An) */ -{ CPUFUNC(op_2e8_0), 0, 744 }, /* CHK2.W #.W,(d16,An) */ -{ CPUFUNC(op_2f0_0), 0, 752 }, /* CHK2.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_2f8_0), 0, 760 }, /* CHK2.W #.W,(xxx).W */ -{ CPUFUNC(op_2f9_0), 0, 761 }, /* CHK2.W #.W,(xxx).L */ -{ CPUFUNC(op_2fa_0), 0, 762 }, /* CHK2.W #.W,(d16,PC) */ -{ CPUFUNC(op_2fb_0), 0, 763 }, /* CHK2.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ -{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ -{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ -{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ -{ CPUFUNC(op_430_0), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ -{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ -{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ -{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ -{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ -{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ -{ CPUFUNC(op_470_0), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ -{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ -{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ -{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ -{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ -{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ -{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ -{ CPUFUNC(op_4b0_0), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ -{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ -{ CPUFUNC(op_4d0_0), 0, 1232 }, /* CHK2.L #.W,(An) */ -{ CPUFUNC(op_4e8_0), 0, 1256 }, /* CHK2.L #.W,(d16,An) */ -{ CPUFUNC(op_4f0_0), 0, 1264 }, /* CHK2.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4f8_0), 0, 1272 }, /* CHK2.L #.W,(xxx).W */ -{ CPUFUNC(op_4f9_0), 0, 1273 }, /* CHK2.L #.W,(xxx).L */ -{ CPUFUNC(op_4fa_0), 0, 1274 }, /* CHK2.L #.W,(d16,PC) */ -{ CPUFUNC(op_4fb_0), 0, 1275 }, /* CHK2.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ -{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ -{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ -{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ -{ CPUFUNC(op_630_0), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ -{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ -{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ -{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ -{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ -{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ -{ CPUFUNC(op_670_0), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ -{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ -{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ -{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ -{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ -{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ -{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ -{ CPUFUNC(op_6b0_0), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ -{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ -{ CPUFUNC(op_6c0_0), 0, 1728 }, /* RTM.L Dn */ -{ CPUFUNC(op_6c8_0), 0, 1736 }, /* RTM.L An */ -{ CPUFUNC_FF(op_6d0_0), 0, 1744 }, /* CALLM.L (An) */ -{ CPUFUNC_FF(op_6e8_0), 0, 1768 }, /* CALLM.L (d16,An) */ -{ CPUFUNC_FF(op_6f0_0), 0, 1776 }, /* CALLM.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_6f8_0), 0, 1784 }, /* CALLM.L (xxx).W */ -{ CPUFUNC_FF(op_6f9_0), 0, 1785 }, /* CALLM.L (xxx).L */ -{ CPUFUNC_FF(op_6fa_0), 0, 1786 }, /* CALLM.L (d16,PC) */ -{ CPUFUNC_FF(op_6fb_0), 0, 1787 }, /* CALLM.L (d8,PC,Xn) */ -{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ -{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ -{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ -{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ -{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ -{ CPUFUNC(op_830_0), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ -{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ -{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ -{ CPUFUNC(op_83b_0), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ -{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ -{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ -{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ -{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ -{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ -{ CPUFUNC(op_870_0), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ -{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ -{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ -{ CPUFUNC(op_87b_0), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ -{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ -{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ -{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ -{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ -{ CPUFUNC(op_8b0_0), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ -{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ -{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ -{ CPUFUNC(op_8bb_0), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ -{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ -{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ -{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ -{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ -{ CPUFUNC(op_8f0_0), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ -{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ -{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ -{ CPUFUNC(op_8fb_0), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ -{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ -{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ -{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ -{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ -{ CPUFUNC(op_a30_0), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ -{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ -{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ -{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ -{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ -{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ -{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ -{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ -{ CPUFUNC(op_a70_0), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ -{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ -{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ -{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ -{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ -{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ -{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ -{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ -{ CPUFUNC(op_ab0_0), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ -{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ -{ CPUFUNC(op_ad0_0), 0, 2768 }, /* CAS.B #.W,(An) */ -{ CPUFUNC(op_ad8_0), 0, 2776 }, /* CAS.B #.W,(An)+ */ -{ CPUFUNC(op_ae0_0), 0, 2784 }, /* CAS.B #.W,-(An) */ -{ CPUFUNC(op_ae8_0), 0, 2792 }, /* CAS.B #.W,(d16,An) */ -{ CPUFUNC(op_af0_0), 0, 2800 }, /* CAS.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_af8_0), 0, 2808 }, /* CAS.B #.W,(xxx).W */ -{ CPUFUNC(op_af9_0), 0, 2809 }, /* CAS.B #.W,(xxx).L */ -{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ -{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ -{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ -{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ -{ CPUFUNC(op_c30_0), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ -{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ -{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ -{ CPUFUNC(op_c3b_0), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ -{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ -{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ -{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ -{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ -{ CPUFUNC(op_c70_0), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ -{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ -{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ -{ CPUFUNC(op_c7b_0), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ -{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ -{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ -{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ -{ CPUFUNC(op_cb0_0), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ -{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ -{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ -{ CPUFUNC(op_cbb_0), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ -{ CPUFUNC(op_cd0_0), 0, 3280 }, /* CAS.W #.W,(An) */ -{ CPUFUNC(op_cd8_0), 0, 3288 }, /* CAS.W #.W,(An)+ */ -{ CPUFUNC(op_ce0_0), 0, 3296 }, /* CAS.W #.W,-(An) */ -{ CPUFUNC(op_ce8_0), 0, 3304 }, /* CAS.W #.W,(d16,An) */ -{ CPUFUNC(op_cf0_0), 0, 3312 }, /* CAS.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_cf8_0), 0, 3320 }, /* CAS.W #.W,(xxx).W */ -{ CPUFUNC(op_cf9_0), 0, 3321 }, /* CAS.W #.W,(xxx).L */ -{ CPUFUNC(op_cfc_0), 0, 3324 }, /* CAS2.W #.L */ -{ CPUFUNC_FF(op_e10_0), 0, 3600 }, /* MOVES.B #.W,(An) */ -{ CPUFUNC_FF(op_e18_0), 0, 3608 }, /* MOVES.B #.W,(An)+ */ -{ CPUFUNC_FF(op_e20_0), 0, 3616 }, /* MOVES.B #.W,-(An) */ -{ CPUFUNC_FF(op_e28_0), 0, 3624 }, /* MOVES.B #.W,(d16,An) */ -{ CPUFUNC_FF(op_e30_0), 0, 3632 }, /* MOVES.B #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e38_0), 0, 3640 }, /* MOVES.B #.W,(xxx).W */ -{ CPUFUNC_FF(op_e39_0), 0, 3641 }, /* MOVES.B #.W,(xxx).L */ -{ CPUFUNC_FF(op_e50_0), 0, 3664 }, /* MOVES.W #.W,(An) */ -{ CPUFUNC_FF(op_e58_0), 0, 3672 }, /* MOVES.W #.W,(An)+ */ -{ CPUFUNC_FF(op_e60_0), 0, 3680 }, /* MOVES.W #.W,-(An) */ -{ CPUFUNC_FF(op_e68_0), 0, 3688 }, /* MOVES.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_e70_0), 0, 3696 }, /* MOVES.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_e78_0), 0, 3704 }, /* MOVES.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_e79_0), 0, 3705 }, /* MOVES.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_e90_0), 0, 3728 }, /* MOVES.L #.W,(An) */ -{ CPUFUNC_FF(op_e98_0), 0, 3736 }, /* MOVES.L #.W,(An)+ */ -{ CPUFUNC_FF(op_ea0_0), 0, 3744 }, /* MOVES.L #.W,-(An) */ -{ CPUFUNC_FF(op_ea8_0), 0, 3752 }, /* MOVES.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_eb0_0), 0, 3760 }, /* MOVES.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_eb8_0), 0, 3768 }, /* MOVES.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_eb9_0), 0, 3769 }, /* MOVES.L #.W,(xxx).L */ -{ CPUFUNC(op_ed0_0), 0, 3792 }, /* CAS.L #.W,(An) */ -{ CPUFUNC(op_ed8_0), 0, 3800 }, /* CAS.L #.W,(An)+ */ -{ CPUFUNC(op_ee0_0), 0, 3808 }, /* CAS.L #.W,-(An) */ -{ CPUFUNC(op_ee8_0), 0, 3816 }, /* CAS.L #.W,(d16,An) */ -{ CPUFUNC(op_ef0_0), 0, 3824 }, /* CAS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ef8_0), 0, 3832 }, /* CAS.L #.W,(xxx).W */ -{ CPUFUNC(op_ef9_0), 0, 3833 }, /* CAS.L #.W,(xxx).L */ -{ CPUFUNC(op_efc_0), 0, 3836 }, /* CAS2.L #.L */ -{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ -{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ -{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ -{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ -{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ -{ CPUFUNC(op_1030_0), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ -{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ -{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ -{ CPUFUNC(op_103b_0), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ -{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ -{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ -{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ -{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ -{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ -{ CPUFUNC(op_10b0_0), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ -{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ -{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ -{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ -{ CPUFUNC(op_10bb_0), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ -{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ -{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ -{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ -{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ -{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ -{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ -{ CPUFUNC(op_10f0_0), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ -{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ -{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ -{ CPUFUNC(op_10fb_0), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ -{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ -{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ -{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ -{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ -{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ -{ CPUFUNC(op_1130_0), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ -{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ -{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ -{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ -{ CPUFUNC(op_113b_0), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ -{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ -{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ -{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ -{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ -{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ -{ CPUFUNC(op_1170_0), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ -{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ -{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ -{ CPUFUNC(op_117b_0), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ -{ CPUFUNC(op_1180_0), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1190_0), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ -{ CPUFUNC(op_1198_0), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_11a0_0), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ -{ CPUFUNC(op_11a8_0), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_11b0_0), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11b8_0), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_11b9_0), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_11ba_0), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_11bb_0), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11bc_0), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ -{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ -{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ -{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ -{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ -{ CPUFUNC(op_11f0_0), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ -{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ -{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ -{ CPUFUNC(op_11fb_0), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ -{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ -{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ -{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ -{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ -{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ -{ CPUFUNC(op_13f0_0), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ -{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ -{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ -{ CPUFUNC(op_13fb_0), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ -{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ -{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ -{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ -{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ -{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ -{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ -{ CPUFUNC(op_2030_0), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ -{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ -{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ -{ CPUFUNC(op_203b_0), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ -{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ -{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ -{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ -{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ -{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ -{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ -{ CPUFUNC_FF(op_2070_0), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_207b_0), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ -{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ -{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ -{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ -{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ -{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ -{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ -{ CPUFUNC(op_20b0_0), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ -{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ -{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ -{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ -{ CPUFUNC(op_20bb_0), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ -{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ -{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ -{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ -{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ -{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ -{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ -{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ -{ CPUFUNC(op_20f0_0), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ -{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ -{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ -{ CPUFUNC(op_20fb_0), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ -{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ -{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ -{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ -{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ -{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ -{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ -{ CPUFUNC(op_2130_0), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ -{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ -{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ -{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ -{ CPUFUNC(op_213b_0), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ -{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ -{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ -{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ -{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ -{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ -{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ -{ CPUFUNC(op_2170_0), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ -{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ -{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ -{ CPUFUNC(op_217b_0), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ -{ CPUFUNC(op_2180_0), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_2188_0), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ -{ CPUFUNC(op_2190_0), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ -{ CPUFUNC(op_2198_0), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_21a0_0), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ -{ CPUFUNC(op_21a8_0), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_21b0_0), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21b8_0), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_21b9_0), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_21ba_0), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_21bb_0), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21bc_0), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ -{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ -{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ -{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ -{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ -{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ -{ CPUFUNC(op_21f0_0), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ -{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ -{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ -{ CPUFUNC(op_21fb_0), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ -{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ -{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ -{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ -{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ -{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ -{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ -{ CPUFUNC(op_23f0_0), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ -{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ -{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ -{ CPUFUNC(op_23fb_0), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ -{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ -{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ -{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ -{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ -{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ -{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ -{ CPUFUNC(op_3030_0), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ -{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ -{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ -{ CPUFUNC(op_303b_0), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ -{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ -{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ -{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ -{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ -{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ -{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ -{ CPUFUNC_FF(op_3070_0), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ -{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ -{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ -{ CPUFUNC_FF(op_307b_0), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ -{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ -{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ -{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ -{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ -{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ -{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ -{ CPUFUNC(op_30b0_0), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ -{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ -{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ -{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ -{ CPUFUNC(op_30bb_0), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ -{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ -{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ -{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ -{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ -{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ -{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ -{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ -{ CPUFUNC(op_30f0_0), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ -{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ -{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ -{ CPUFUNC(op_30fb_0), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ -{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ -{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ -{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ -{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ -{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ -{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ -{ CPUFUNC(op_3130_0), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ -{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ -{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ -{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ -{ CPUFUNC(op_313b_0), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ -{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ -{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ -{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ -{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ -{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ -{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ -{ CPUFUNC(op_3170_0), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ -{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ -{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ -{ CPUFUNC(op_317b_0), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ -{ CPUFUNC(op_3180_0), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_3188_0), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ -{ CPUFUNC(op_3190_0), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ -{ CPUFUNC(op_3198_0), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_31a0_0), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ -{ CPUFUNC(op_31a8_0), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_31b0_0), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31b8_0), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_31b9_0), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_31ba_0), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_31bb_0), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31bc_0), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ -{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ -{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ -{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ -{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ -{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ -{ CPUFUNC(op_31f0_0), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ -{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ -{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ -{ CPUFUNC(op_31fb_0), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ -{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ -{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ -{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ -{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ -{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ -{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ -{ CPUFUNC(op_33f0_0), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ -{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ -{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ -{ CPUFUNC(op_33fb_0), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ -{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ -{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ -{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ -{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ -{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ -{ CPUFUNC(op_4030_0), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ -{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ -{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ -{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ -{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ -{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ -{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ -{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ -{ CPUFUNC(op_4070_0), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ -{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ -{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ -{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ -{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ -{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ -{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ -{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ -{ CPUFUNC(op_40b0_0), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ -{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ -{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ -{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ -{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ -{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ -{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ -{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ -{ CPUFUNC_FF(op_40f0_0), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ -{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ -{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ -{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ -{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ -{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ -{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ -{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ -{ CPUFUNC(op_4130_0), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ -{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ -{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ -{ CPUFUNC(op_413b_0), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ -{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ -{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ -{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ -{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ -{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ -{ CPUFUNC(op_41b0_0), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ -{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ -{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ -{ CPUFUNC(op_41bb_0), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ -{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ -{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ -{ CPUFUNC_FF(op_41f0_0), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_41fb_0), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ -{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ -{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ -{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ -{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ -{ CPUFUNC(op_4230_0), 0, 16944 }, /* CLR.B (d8,An,Xn) */ -{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ -{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ -{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ -{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ -{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ -{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ -{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ -{ CPUFUNC(op_4270_0), 0, 17008 }, /* CLR.W (d8,An,Xn) */ -{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ -{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ -{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ -{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ -{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ -{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ -{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ -{ CPUFUNC(op_42b0_0), 0, 17072 }, /* CLR.L (d8,An,Xn) */ -{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ -{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ -{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ -{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ -{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ -{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ -{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ -{ CPUFUNC_FF(op_42f0_0), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ -{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ -{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ -{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ -{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ -{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ -{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ -{ CPUFUNC(op_4430_0), 0, 17456 }, /* NEG.B (d8,An,Xn) */ -{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ -{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ -{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ -{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ -{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ -{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ -{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ -{ CPUFUNC(op_4470_0), 0, 17520 }, /* NEG.W (d8,An,Xn) */ -{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ -{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ -{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ -{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ -{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ -{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ -{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ -{ CPUFUNC(op_44b0_0), 0, 17584 }, /* NEG.L (d8,An,Xn) */ -{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ -{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ -{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ -{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ -{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ -{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ -{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ -{ CPUFUNC(op_44f0_0), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ -{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ -{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ -{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ -{ CPUFUNC(op_44fb_0), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ -{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ -{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ -{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ -{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ -{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ -{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ -{ CPUFUNC(op_4630_0), 0, 17968 }, /* NOT.B (d8,An,Xn) */ -{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ -{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ -{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ -{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ -{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ -{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ -{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ -{ CPUFUNC(op_4670_0), 0, 18032 }, /* NOT.W (d8,An,Xn) */ -{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ -{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ -{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ -{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ -{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ -{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ -{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ -{ CPUFUNC(op_46b0_0), 0, 18096 }, /* NOT.L (d8,An,Xn) */ -{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ -{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ -{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ -{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ -{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ -{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ -{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ -{ CPUFUNC(op_46f0_0), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ -{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ -{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ -{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ -{ CPUFUNC(op_46fb_0), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ -{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ -{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ -{ CPUFUNC_FF(op_4808_0), 0, 18440 }, /* LINK.L An,#.L */ -{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ -{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ -{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ -{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ -{ CPUFUNC(op_4830_1), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ -{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ -{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ -{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ -{ CPUFUNC_FF(op_4848_0), 0, 18504 }, /* BKPT.L # */ -{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ -{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ -{ CPUFUNC_FF(op_4870_0), 0, 18544 }, /* PEA.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ -{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ -{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ -{ CPUFUNC_FF(op_487b_0), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ -{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ -{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ -{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ -{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_48b0_0), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ -{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ -{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ -{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ -{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_48f0_0), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ -{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ -{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ -{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ -{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ -{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ -{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ -{ CPUFUNC(op_4a30_0), 0, 18992 }, /* TST.B (d8,An,Xn) */ -{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ -{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ -{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ -{ CPUFUNC(op_4a3b_0), 0, 19003 }, /* TST.B (d8,PC,Xn) */ -{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ -{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ -{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ -{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ -{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ -{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ -{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ -{ CPUFUNC(op_4a70_0), 0, 19056 }, /* TST.W (d8,An,Xn) */ -{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ -{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ -{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ -{ CPUFUNC(op_4a7b_0), 0, 19067 }, /* TST.W (d8,PC,Xn) */ -{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ -{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ -{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ -{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ -{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ -{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ -{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ -{ CPUFUNC(op_4ab0_0), 0, 19120 }, /* TST.L (d8,An,Xn) */ -{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ -{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ -{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ -{ CPUFUNC(op_4abb_0), 0, 19131 }, /* TST.L (d8,PC,Xn) */ -{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ -{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ -{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ -{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ -{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ -{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ -{ CPUFUNC(op_4af0_0), 0, 19184 }, /* TAS.B (d8,An,Xn) */ -{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ -{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ -{ CPUFUNC(op_4c00_0), 0, 19456 }, /* MULL.L #.W,Dn */ -{ CPUFUNC(op_4c10_0), 0, 19472 }, /* MULL.L #.W,(An) */ -{ CPUFUNC(op_4c18_0), 0, 19480 }, /* MULL.L #.W,(An)+ */ -{ CPUFUNC(op_4c20_0), 0, 19488 }, /* MULL.L #.W,-(An) */ -{ CPUFUNC(op_4c28_0), 0, 19496 }, /* MULL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c30_0), 0, 19504 }, /* MULL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c38_0), 0, 19512 }, /* MULL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c39_0), 0, 19513 }, /* MULL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c3a_0), 0, 19514 }, /* MULL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c3b_0), 0, 19515 }, /* MULL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c3c_0), 0, 19516 }, /* MULL.L #.W,#.L */ -{ CPUFUNC(op_4c40_0), 0, 19520 }, /* DIVL.L #.W,Dn */ -{ CPUFUNC(op_4c50_0), 0, 19536 }, /* DIVL.L #.W,(An) */ -{ CPUFUNC(op_4c58_0), 0, 19544 }, /* DIVL.L #.W,(An)+ */ -{ CPUFUNC(op_4c60_0), 0, 19552 }, /* DIVL.L #.W,-(An) */ -{ CPUFUNC(op_4c68_0), 0, 19560 }, /* DIVL.L #.W,(d16,An) */ -{ CPUFUNC(op_4c70_0), 0, 19568 }, /* DIVL.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_4c78_0), 0, 19576 }, /* DIVL.L #.W,(xxx).W */ -{ CPUFUNC(op_4c79_0), 0, 19577 }, /* DIVL.L #.W,(xxx).L */ -{ CPUFUNC(op_4c7a_0), 0, 19578 }, /* DIVL.L #.W,(d16,PC) */ -{ CPUFUNC(op_4c7b_0), 0, 19579 }, /* DIVL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_4c7c_0), 0, 19580 }, /* DIVL.L #.W,#.L */ -{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ -{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ -{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cb0_0), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cbb_0), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ -{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ -{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cf0_0), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cfb_0), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ -{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ -{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ -{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ -{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ -{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ -{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ -{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ -{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ -{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ -{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ -{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ -{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ -{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ -{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ -{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ -{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ -{ CPUFUNC_FF(op_4eb0_0), 0, 20144 }, /* JSR.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ -{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ -{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ -{ CPUFUNC_FF(op_4ebb_0), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ -{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ -{ CPUFUNC_FF(op_4ef0_0), 0, 20208 }, /* JMP.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ -{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ -{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ -{ CPUFUNC_FF(op_4efb_0), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ -{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ -{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ -{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ -{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ -{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ -{ CPUFUNC(op_5030_0), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ -{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ -{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ -{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ -{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ -{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ -{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ -{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ -{ CPUFUNC(op_5070_0), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ -{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ -{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ -{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ -{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ -{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ -{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ -{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ -{ CPUFUNC(op_50b0_0), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ -{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ -{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ -{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_50f0_0), 0, 20720 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_50fa_0), 0, 20730 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_50fb_0), 0, 20731 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_50fc_0), 0, 20732 }, /* TRAPcc.L */ -{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ -{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ -{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ -{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ -{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ -{ CPUFUNC(op_5130_0), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ -{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ -{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ -{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ -{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ -{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ -{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ -{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ -{ CPUFUNC(op_5170_0), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ -{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ -{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ -{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ -{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ -{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ -{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ -{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ -{ CPUFUNC(op_51b0_0), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ -{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ -{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ -{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_51f0_0), 0, 20976 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_51fa_0), 0, 20986 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_51fb_0), 0, 20987 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_51fc_0), 0, 20988 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_52f0_0), 0, 21232 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_52fa_0), 0, 21242 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_52fb_0), 0, 21243 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_52fc_0), 0, 21244 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_53f0_0), 0, 21488 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_53fa_0), 0, 21498 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_53fb_0), 0, 21499 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_53fc_0), 0, 21500 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_54f0_0), 0, 21744 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_54fa_0), 0, 21754 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_54fb_0), 0, 21755 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_54fc_0), 0, 21756 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_55f0_0), 0, 22000 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_55fa_0), 0, 22010 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_55fb_0), 0, 22011 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_55fc_0), 0, 22012 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_56f0_0), 0, 22256 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_56fa_0), 0, 22266 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_56fb_0), 0, 22267 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_56fc_0), 0, 22268 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_57f0_0), 0, 22512 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_57fa_0), 0, 22522 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_57fb_0), 0, 22523 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_57fc_0), 0, 22524 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_58f0_0), 0, 22768 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_58fa_0), 0, 22778 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_58fb_0), 0, 22779 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_58fc_0), 0, 22780 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_59f0_0), 0, 23024 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_59fa_0), 0, 23034 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_59fb_0), 0, 23035 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_59fc_0), 0, 23036 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5af0_0), 0, 23280 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5afa_0), 0, 23290 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5afb_0), 0, 23291 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5afc_0), 0, 23292 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5bf0_0), 0, 23536 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5bfa_0), 0, 23546 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5bfb_0), 0, 23547 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5bfc_0), 0, 23548 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5cf0_0), 0, 23792 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5cfa_0), 0, 23802 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5cfb_0), 0, 23803 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5cfc_0), 0, 23804 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5df0_0), 0, 24048 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5dfa_0), 0, 24058 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5dfb_0), 0, 24059 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5dfc_0), 0, 24060 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ef0_0), 0, 24304 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5efa_0), 0, 24314 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5efb_0), 0, 24315 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5efc_0), 0, 24316 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ff0_0), 0, 24560 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ffa_0), 0, 24570 }, /* TRAPcc.L #.W */ -{ CPUFUNC_FF(op_5ffb_0), 0, 24571 }, /* TRAPcc.L #.L */ -{ CPUFUNC_FF(op_5ffc_0), 0, 24572 }, /* TRAPcc.L */ -{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_60ff_0), 0, 24831 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ -{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ -{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ -{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_62ff_0), 0, 25343 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_63ff_0), 0, 25599 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_64ff_0), 0, 25855 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_65ff_0), 0, 26111 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_66ff_0), 0, 26367 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_67ff_0), 0, 26623 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_68ff_0), 0, 26879 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_69ff_0), 0, 27135 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6aff_0), 0, 27391 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6bff_0), 0, 27647 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6cff_0), 0, 27903 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6dff_0), 0, 28159 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6eff_0), 0, 28415 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6fff_0), 0, 28671 }, /* Bcc.L #.L */ -{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ -{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ -{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ -{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ -{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ -{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ -{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ -{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ -{ CPUFUNC(op_8030_0), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ -{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ -{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ -{ CPUFUNC(op_803b_0), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ -{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ -{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ -{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ -{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ -{ CPUFUNC(op_8070_0), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ -{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ -{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ -{ CPUFUNC(op_807b_0), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ -{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ -{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ -{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ -{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ -{ CPUFUNC(op_80b0_0), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ -{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ -{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ -{ CPUFUNC(op_80bb_0), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ -{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ -{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ -{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ -{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ -{ CPUFUNC(op_80f0_0), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ -{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ -{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ -{ CPUFUNC(op_80fb_0), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ -{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ -{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ -{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ -{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ -{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ -{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ -{ CPUFUNC(op_8130_0), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ -{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_8140_0), 0, 33088 }, /* PACK.L Dn,Dn */ -{ CPUFUNC_FF(op_8148_0), 0, 33096 }, /* PACK.L -(An),-(An) */ -{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ -{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ -{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ -{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ -{ CPUFUNC(op_8170_0), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ -{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_8180_0), 0, 33152 }, /* UNPK.L Dn,Dn */ -{ CPUFUNC_FF(op_8188_0), 0, 33160 }, /* UNPK.L -(An),-(An) */ -{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ -{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ -{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ -{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ -{ CPUFUNC(op_81b0_0), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ -{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ -{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ -{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ -{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ -{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ -{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ -{ CPUFUNC(op_81f0_0), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ -{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ -{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ -{ CPUFUNC(op_81fb_0), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ -{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ -{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ -{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ -{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ -{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ -{ CPUFUNC(op_9030_0), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ -{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ -{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ -{ CPUFUNC(op_903b_0), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ -{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ -{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ -{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ -{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ -{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ -{ CPUFUNC(op_9070_0), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ -{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ -{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ -{ CPUFUNC(op_907b_0), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ -{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ -{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ -{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ -{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ -{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ -{ CPUFUNC(op_90b0_0), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ -{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ -{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ -{ CPUFUNC(op_90bb_0), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ -{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ -{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ -{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ -{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ -{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ -{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ -{ CPUFUNC_FF(op_90f0_0), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ -{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ -{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ -{ CPUFUNC_FF(op_90fb_0), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ -{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ -{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ -{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ -{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ -{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ -{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ -{ CPUFUNC(op_9130_0), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ -{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ -{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ -{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ -{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ -{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ -{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ -{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ -{ CPUFUNC(op_9170_0), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ -{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ -{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ -{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ -{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ -{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ -{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ -{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ -{ CPUFUNC(op_91b0_0), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ -{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ -{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ -{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ -{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ -{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ -{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ -{ CPUFUNC_FF(op_91f0_0), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ -{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ -{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ -{ CPUFUNC_FF(op_91fb_0), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ -{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ -{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ -{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ -{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ -{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ -{ CPUFUNC(op_b030_0), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ -{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ -{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ -{ CPUFUNC(op_b03b_0), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ -{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ -{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ -{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ -{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ -{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ -{ CPUFUNC(op_b070_0), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ -{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ -{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ -{ CPUFUNC(op_b07b_0), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ -{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ -{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ -{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ -{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ -{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ -{ CPUFUNC(op_b0b0_0), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ -{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ -{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ -{ CPUFUNC(op_b0bb_0), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ -{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ -{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ -{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ -{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ -{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ -{ CPUFUNC(op_b0f0_0), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ -{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ -{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ -{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ -{ CPUFUNC(op_b0fb_0), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ -{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ -{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ -{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ -{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ -{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ -{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ -{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ -{ CPUFUNC(op_b130_0), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ -{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ -{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ -{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ -{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ -{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ -{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ -{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ -{ CPUFUNC(op_b170_0), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ -{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ -{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ -{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ -{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ -{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ -{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ -{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ -{ CPUFUNC(op_b1b0_0), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ -{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ -{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ -{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ -{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ -{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ -{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ -{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ -{ CPUFUNC(op_b1f0_0), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ -{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ -{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ -{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ -{ CPUFUNC(op_b1fb_0), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ -{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ -{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ -{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ -{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ -{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ -{ CPUFUNC(op_c030_0), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ -{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ -{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ -{ CPUFUNC(op_c03b_0), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ -{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ -{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ -{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ -{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ -{ CPUFUNC(op_c070_0), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ -{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ -{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ -{ CPUFUNC(op_c07b_0), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ -{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ -{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ -{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ -{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ -{ CPUFUNC(op_c0b0_0), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ -{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ -{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ -{ CPUFUNC(op_c0bb_0), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ -{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ -{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ -{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ -{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ -{ CPUFUNC(op_c0f0_0), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ -{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ -{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ -{ CPUFUNC(op_c0fb_0), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ -{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ -{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ -{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ -{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ -{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ -{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ -{ CPUFUNC(op_c130_0), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ -{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ -{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ -{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ -{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ -{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ -{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ -{ CPUFUNC(op_c170_0), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ -{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ -{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ -{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ -{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ -{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ -{ CPUFUNC(op_c1b0_0), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ -{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ -{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ -{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ -{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ -{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ -{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ -{ CPUFUNC(op_c1f0_0), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ -{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ -{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ -{ CPUFUNC(op_c1fb_0), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ -{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ -{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ -{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ -{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ -{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ -{ CPUFUNC(op_d030_0), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ -{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ -{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ -{ CPUFUNC(op_d03b_0), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ -{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ -{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ -{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ -{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ -{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ -{ CPUFUNC(op_d070_0), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ -{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ -{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ -{ CPUFUNC(op_d07b_0), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ -{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ -{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ -{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ -{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ -{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ -{ CPUFUNC(op_d0b0_0), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ -{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ -{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ -{ CPUFUNC(op_d0bb_0), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ -{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ -{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ -{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ -{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ -{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ -{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ -{ CPUFUNC_FF(op_d0f0_0), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ -{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ -{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ -{ CPUFUNC_FF(op_d0fb_0), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ -{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ -{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ -{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ -{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ -{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ -{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ -{ CPUFUNC(op_d130_0), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ -{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ -{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ -{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ -{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ -{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ -{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ -{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ -{ CPUFUNC(op_d170_0), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ -{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ -{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ -{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ -{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ -{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ -{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ -{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ -{ CPUFUNC(op_d1b0_0), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ -{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ -{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ -{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ -{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ -{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ -{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ -{ CPUFUNC_FF(op_d1f0_0), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ -{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ -{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ -{ CPUFUNC_FF(op_d1fb_0), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ -{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ -{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ -{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ -{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ -{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ -{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ -{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ -{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ -{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ -{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ -{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ -{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ -{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ -{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ -{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ -{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ -{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ -{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ -{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ -{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ -{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ -{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ -{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ -{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ -{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ -{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ -{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ -{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ -{ CPUFUNC(op_e0f0_0), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ -{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ -{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ -{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ -{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ -{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ -{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ -{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ -{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ -{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ -{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ -{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ -{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ -{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ -{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ -{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ -{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ -{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ -{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ -{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ -{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ -{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ -{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ -{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ -{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ -{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ -{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ -{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ -{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ -{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ -{ CPUFUNC(op_e1f0_0), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ -{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ -{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ -{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ -{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ -{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ -{ CPUFUNC(op_e2f0_0), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ -{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ -{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ -{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ -{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ -{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ -{ CPUFUNC(op_e3f0_0), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ -{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ -{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ -{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ -{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ -{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ -{ CPUFUNC(op_e4f0_0), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ -{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ -{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ -{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ -{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ -{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ -{ CPUFUNC(op_e5f0_0), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ -{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ -{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ -{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ -{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ -{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ -{ CPUFUNC(op_e6f0_0), 0, 59120 }, /* RORW.W (d8,An,Xn) */ -{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ -{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ -{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ -{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ -{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ -{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ -{ CPUFUNC(op_e7f0_0), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ -{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ -{ CPUFUNC(op_e8c0_0), 0, 59584 }, /* BFTST.L #.W,Dn */ -{ CPUFUNC(op_e8d0_0), 0, 59600 }, /* BFTST.L #.W,(An) */ -{ CPUFUNC(op_e8e8_0), 0, 59624 }, /* BFTST.L #.W,(d16,An) */ -{ CPUFUNC(op_e8f0_0), 0, 59632 }, /* BFTST.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e8f8_0), 0, 59640 }, /* BFTST.L #.W,(xxx).W */ -{ CPUFUNC(op_e8f9_0), 0, 59641 }, /* BFTST.L #.W,(xxx).L */ -{ CPUFUNC(op_e8fa_0), 0, 59642 }, /* BFTST.L #.W,(d16,PC) */ -{ CPUFUNC(op_e8fb_0), 0, 59643 }, /* BFTST.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_e9c0_0), 0, 59840 }, /* BFEXTU.L #.W,Dn */ -{ CPUFUNC(op_e9d0_0), 0, 59856 }, /* BFEXTU.L #.W,(An) */ -{ CPUFUNC(op_e9e8_0), 0, 59880 }, /* BFEXTU.L #.W,(d16,An) */ -{ CPUFUNC(op_e9f0_0), 0, 59888 }, /* BFEXTU.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_e9f8_0), 0, 59896 }, /* BFEXTU.L #.W,(xxx).W */ -{ CPUFUNC(op_e9f9_0), 0, 59897 }, /* BFEXTU.L #.W,(xxx).L */ -{ CPUFUNC(op_e9fa_0), 0, 59898 }, /* BFEXTU.L #.W,(d16,PC) */ -{ CPUFUNC(op_e9fb_0), 0, 59899 }, /* BFEXTU.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eac0_0), 0, 60096 }, /* BFCHG.L #.W,Dn */ -{ CPUFUNC(op_ead0_0), 0, 60112 }, /* BFCHG.L #.W,(An) */ -{ CPUFUNC(op_eae8_0), 0, 60136 }, /* BFCHG.L #.W,(d16,An) */ -{ CPUFUNC(op_eaf0_0), 0, 60144 }, /* BFCHG.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eaf8_0), 0, 60152 }, /* BFCHG.L #.W,(xxx).W */ -{ CPUFUNC(op_eaf9_0), 0, 60153 }, /* BFCHG.L #.W,(xxx).L */ -{ CPUFUNC(op_ebc0_0), 0, 60352 }, /* BFEXTS.L #.W,Dn */ -{ CPUFUNC(op_ebd0_0), 0, 60368 }, /* BFEXTS.L #.W,(An) */ -{ CPUFUNC(op_ebe8_0), 0, 60392 }, /* BFEXTS.L #.W,(d16,An) */ -{ CPUFUNC(op_ebf0_0), 0, 60400 }, /* BFEXTS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ebf8_0), 0, 60408 }, /* BFEXTS.L #.W,(xxx).W */ -{ CPUFUNC(op_ebf9_0), 0, 60409 }, /* BFEXTS.L #.W,(xxx).L */ -{ CPUFUNC(op_ebfa_0), 0, 60410 }, /* BFEXTS.L #.W,(d16,PC) */ -{ CPUFUNC(op_ebfb_0), 0, 60411 }, /* BFEXTS.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_ecc0_0), 0, 60608 }, /* BFCLR.L #.W,Dn */ -{ CPUFUNC(op_ecd0_0), 0, 60624 }, /* BFCLR.L #.W,(An) */ -{ CPUFUNC(op_ece8_0), 0, 60648 }, /* BFCLR.L #.W,(d16,An) */ -{ CPUFUNC(op_ecf0_0), 0, 60656 }, /* BFCLR.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_ecf8_0), 0, 60664 }, /* BFCLR.L #.W,(xxx).W */ -{ CPUFUNC(op_ecf9_0), 0, 60665 }, /* BFCLR.L #.W,(xxx).L */ -{ CPUFUNC(op_edc0_0), 0, 60864 }, /* BFFFO.L #.W,Dn */ -{ CPUFUNC(op_edd0_0), 0, 60880 }, /* BFFFO.L #.W,(An) */ -{ CPUFUNC(op_ede8_0), 0, 60904 }, /* BFFFO.L #.W,(d16,An) */ -{ CPUFUNC(op_edf0_0), 0, 60912 }, /* BFFFO.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_edf8_0), 0, 60920 }, /* BFFFO.L #.W,(xxx).W */ -{ CPUFUNC(op_edf9_0), 0, 60921 }, /* BFFFO.L #.W,(xxx).L */ -{ CPUFUNC(op_edfa_0), 0, 60922 }, /* BFFFO.L #.W,(d16,PC) */ -{ CPUFUNC(op_edfb_0), 0, 60923 }, /* BFFFO.L #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_eec0_0), 0, 61120 }, /* BFSET.L #.W,Dn */ -{ CPUFUNC(op_eed0_0), 0, 61136 }, /* BFSET.L #.W,(An) */ -{ CPUFUNC(op_eee8_0), 0, 61160 }, /* BFSET.L #.W,(d16,An) */ -{ CPUFUNC(op_eef0_0), 0, 61168 }, /* BFSET.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eef8_0), 0, 61176 }, /* BFSET.L #.W,(xxx).W */ -{ CPUFUNC(op_eef9_0), 0, 61177 }, /* BFSET.L #.W,(xxx).L */ -{ CPUFUNC(op_efc0_0), 0, 61376 }, /* BFINS.L #.W,Dn */ -{ CPUFUNC(op_efd0_0), 0, 61392 }, /* BFINS.L #.W,(An) */ -{ CPUFUNC(op_efe8_0), 0, 61416 }, /* BFINS.L #.W,(d16,An) */ -{ CPUFUNC(op_eff0_0), 0, 61424 }, /* BFINS.L #.W,(d8,An,Xn) */ -{ CPUFUNC(op_eff8_0), 0, 61432 }, /* BFINS.L #.W,(xxx).W */ -{ CPUFUNC(op_eff9_0), 0, 61433 }, /* BFINS.L #.W,(xxx).L */ -{ 0, 0, 0 }}; -struct cputbl CPUFUNC(op_smalltbl_3)[] = { -{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ -{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ -{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ -{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ -{ CPUFUNC(op_30_3), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ -{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ -{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ -{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ -{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ -{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ -{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ -{ CPUFUNC(op_70_3), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ -{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ -{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ -{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ -{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ -{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ -{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ -{ CPUFUNC(op_b0_3), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ -{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ -{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ -{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ -{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ -{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ -{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ -{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ -{ CPUFUNC(op_130_3), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ -{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ -{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ -{ CPUFUNC(op_13b_3), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ -{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ -{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ -{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ -{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ -{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ -{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ -{ CPUFUNC(op_170_3), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ -{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ -{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ -{ CPUFUNC(op_17b_3), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ -{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ -{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ -{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ -{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ -{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ -{ CPUFUNC(op_1b0_3), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ -{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ -{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ -{ CPUFUNC(op_1bb_3), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ -{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ -{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ -{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ -{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ -{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ -{ CPUFUNC(op_1f0_3), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ -{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ -{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ -{ CPUFUNC(op_1fb_3), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ -{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ -{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ -{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ -{ CPUFUNC(op_230_3), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ -{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ -{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ -{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ -{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ -{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ -{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ -{ CPUFUNC(op_270_3), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ -{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ -{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ -{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ -{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ -{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ -{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ -{ CPUFUNC(op_2b0_3), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ -{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ -{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ -{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ -{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ -{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ -{ CPUFUNC(op_430_3), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ -{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ -{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ -{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ -{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ -{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ -{ CPUFUNC(op_470_3), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ -{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ -{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ -{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ -{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ -{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ -{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ -{ CPUFUNC(op_4b0_3), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ -{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ -{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ -{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ -{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ -{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ -{ CPUFUNC(op_630_3), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ -{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ -{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ -{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ -{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ -{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ -{ CPUFUNC(op_670_3), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ -{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ -{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ -{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ -{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ -{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ -{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ -{ CPUFUNC(op_6b0_3), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ -{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ -{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ -{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ -{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ -{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ -{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ -{ CPUFUNC(op_830_3), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ -{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ -{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ -{ CPUFUNC(op_83b_3), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ -{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ -{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ -{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ -{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ -{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ -{ CPUFUNC(op_870_3), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ -{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ -{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ -{ CPUFUNC(op_87b_3), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ -{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ -{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ -{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ -{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ -{ CPUFUNC(op_8b0_3), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ -{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ -{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ -{ CPUFUNC(op_8bb_3), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ -{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ -{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ -{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ -{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ -{ CPUFUNC(op_8f0_3), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ -{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ -{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ -{ CPUFUNC(op_8fb_3), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ -{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ -{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ -{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ -{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ -{ CPUFUNC(op_a30_3), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ -{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ -{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ -{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ -{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ -{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ -{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ -{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ -{ CPUFUNC(op_a70_3), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ -{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ -{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ -{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ -{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ -{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ -{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ -{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ -{ CPUFUNC(op_ab0_3), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ -{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ -{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ -{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ -{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ -{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ -{ CPUFUNC(op_c30_3), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ -{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ -{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ -{ CPUFUNC(op_c3b_3), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ -{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ -{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ -{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ -{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ -{ CPUFUNC(op_c70_3), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ -{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ -{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ -{ CPUFUNC(op_c7b_3), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ -{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ -{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ -{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ -{ CPUFUNC(op_cb0_3), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ -{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ -{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ -{ CPUFUNC(op_cbb_3), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ -{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ -{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ -{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ -{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ -{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ -{ CPUFUNC(op_1030_3), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ -{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ -{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ -{ CPUFUNC(op_103b_3), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ -{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ -{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ -{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ -{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ -{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ -{ CPUFUNC(op_10b0_3), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ -{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ -{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ -{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ -{ CPUFUNC(op_10bb_3), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ -{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ -{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ -{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ -{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ -{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ -{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ -{ CPUFUNC(op_10f0_3), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ -{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ -{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ -{ CPUFUNC(op_10fb_3), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ -{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ -{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ -{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ -{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ -{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ -{ CPUFUNC(op_1130_3), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ -{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ -{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ -{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ -{ CPUFUNC(op_113b_3), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ -{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ -{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ -{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ -{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ -{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ -{ CPUFUNC(op_1170_3), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ -{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ -{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ -{ CPUFUNC(op_117b_3), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ -{ CPUFUNC(op_1180_3), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1190_3), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ -{ CPUFUNC(op_1198_3), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_11a0_3), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ -{ CPUFUNC(op_11a8_3), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_11b0_3), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11b8_3), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_11b9_3), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_11ba_3), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_11bb_3), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11bc_3), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ -{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ -{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ -{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ -{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ -{ CPUFUNC(op_11f0_3), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ -{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ -{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ -{ CPUFUNC(op_11fb_3), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ -{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ -{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ -{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ -{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ -{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ -{ CPUFUNC(op_13f0_3), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ -{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ -{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ -{ CPUFUNC(op_13fb_3), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ -{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ -{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ -{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ -{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ -{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ -{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ -{ CPUFUNC(op_2030_3), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ -{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ -{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ -{ CPUFUNC(op_203b_3), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ -{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ -{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ -{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ -{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ -{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ -{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ -{ CPUFUNC_FF(op_2070_3), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_207b_3), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ -{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ -{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ -{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ -{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ -{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ -{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ -{ CPUFUNC(op_20b0_3), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ -{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ -{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ -{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ -{ CPUFUNC(op_20bb_3), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ -{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ -{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ -{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ -{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ -{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ -{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ -{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ -{ CPUFUNC(op_20f0_3), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ -{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ -{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ -{ CPUFUNC(op_20fb_3), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ -{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ -{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ -{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ -{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ -{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ -{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ -{ CPUFUNC(op_2130_3), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ -{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ -{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ -{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ -{ CPUFUNC(op_213b_3), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ -{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ -{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ -{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ -{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ -{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ -{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ -{ CPUFUNC(op_2170_3), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ -{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ -{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ -{ CPUFUNC(op_217b_3), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ -{ CPUFUNC(op_2180_3), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_2188_3), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ -{ CPUFUNC(op_2190_3), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ -{ CPUFUNC(op_2198_3), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_21a0_3), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ -{ CPUFUNC(op_21a8_3), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_21b0_3), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21b8_3), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_21b9_3), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_21ba_3), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_21bb_3), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21bc_3), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ -{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ -{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ -{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ -{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ -{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ -{ CPUFUNC(op_21f0_3), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ -{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ -{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ -{ CPUFUNC(op_21fb_3), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ -{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ -{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ -{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ -{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ -{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ -{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ -{ CPUFUNC(op_23f0_3), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ -{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ -{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ -{ CPUFUNC(op_23fb_3), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ -{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ -{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ -{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ -{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ -{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ -{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ -{ CPUFUNC(op_3030_3), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ -{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ -{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ -{ CPUFUNC(op_303b_3), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ -{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ -{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ -{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ -{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ -{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ -{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ -{ CPUFUNC_FF(op_3070_3), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ -{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ -{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ -{ CPUFUNC_FF(op_307b_3), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ -{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ -{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ -{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ -{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ -{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ -{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ -{ CPUFUNC(op_30b0_3), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ -{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ -{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ -{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ -{ CPUFUNC(op_30bb_3), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ -{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ -{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ -{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ -{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ -{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ -{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ -{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ -{ CPUFUNC(op_30f0_3), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ -{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ -{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ -{ CPUFUNC(op_30fb_3), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ -{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ -{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ -{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ -{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ -{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ -{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ -{ CPUFUNC(op_3130_3), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ -{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ -{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ -{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ -{ CPUFUNC(op_313b_3), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ -{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ -{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ -{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ -{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ -{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ -{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ -{ CPUFUNC(op_3170_3), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ -{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ -{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ -{ CPUFUNC(op_317b_3), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ -{ CPUFUNC(op_3180_3), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_3188_3), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ -{ CPUFUNC(op_3190_3), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ -{ CPUFUNC(op_3198_3), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_31a0_3), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ -{ CPUFUNC(op_31a8_3), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_31b0_3), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31b8_3), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_31b9_3), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_31ba_3), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_31bb_3), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31bc_3), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ -{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ -{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ -{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ -{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ -{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ -{ CPUFUNC(op_31f0_3), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ -{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ -{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ -{ CPUFUNC(op_31fb_3), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ -{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ -{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ -{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ -{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ -{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ -{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ -{ CPUFUNC(op_33f0_3), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ -{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ -{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ -{ CPUFUNC(op_33fb_3), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ -{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ -{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ -{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ -{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ -{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ -{ CPUFUNC(op_4030_3), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ -{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ -{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ -{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ -{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ -{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ -{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ -{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ -{ CPUFUNC(op_4070_3), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ -{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ -{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ -{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ -{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ -{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ -{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ -{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ -{ CPUFUNC(op_40b0_3), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ -{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ -{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ -{ CPUFUNC_FF(op_40c0_0), 0, 16576 }, /* MVSR2.W Dn */ -{ CPUFUNC_FF(op_40d0_0), 0, 16592 }, /* MVSR2.W (An) */ -{ CPUFUNC_FF(op_40d8_0), 0, 16600 }, /* MVSR2.W (An)+ */ -{ CPUFUNC_FF(op_40e0_0), 0, 16608 }, /* MVSR2.W -(An) */ -{ CPUFUNC_FF(op_40e8_0), 0, 16616 }, /* MVSR2.W (d16,An) */ -{ CPUFUNC_FF(op_40f0_3), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ -{ CPUFUNC_FF(op_40f8_0), 0, 16632 }, /* MVSR2.W (xxx).W */ -{ CPUFUNC_FF(op_40f9_0), 0, 16633 }, /* MVSR2.W (xxx).L */ -{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ -{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ -{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ -{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ -{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ -{ CPUFUNC(op_4130_3), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ -{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ -{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ -{ CPUFUNC(op_413b_3), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ -{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ -{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ -{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ -{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ -{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ -{ CPUFUNC(op_41b0_3), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ -{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ -{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ -{ CPUFUNC(op_41bb_3), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ -{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ -{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ -{ CPUFUNC_FF(op_41f0_3), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_41fb_3), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ -{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ -{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ -{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ -{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ -{ CPUFUNC(op_4230_3), 0, 16944 }, /* CLR.B (d8,An,Xn) */ -{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ -{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ -{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ -{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ -{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ -{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ -{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ -{ CPUFUNC(op_4270_3), 0, 17008 }, /* CLR.W (d8,An,Xn) */ -{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ -{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ -{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ -{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ -{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ -{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ -{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ -{ CPUFUNC(op_42b0_3), 0, 17072 }, /* CLR.L (d8,An,Xn) */ -{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ -{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ -{ CPUFUNC_FF(op_42c0_0), 0, 17088 }, /* MVSR2.B Dn */ -{ CPUFUNC_FF(op_42d0_0), 0, 17104 }, /* MVSR2.B (An) */ -{ CPUFUNC_FF(op_42d8_0), 0, 17112 }, /* MVSR2.B (An)+ */ -{ CPUFUNC_FF(op_42e0_0), 0, 17120 }, /* MVSR2.B -(An) */ -{ CPUFUNC_FF(op_42e8_0), 0, 17128 }, /* MVSR2.B (d16,An) */ -{ CPUFUNC_FF(op_42f0_3), 0, 17136 }, /* MVSR2.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_42f8_0), 0, 17144 }, /* MVSR2.B (xxx).W */ -{ CPUFUNC_FF(op_42f9_0), 0, 17145 }, /* MVSR2.B (xxx).L */ -{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ -{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ -{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ -{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ -{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ -{ CPUFUNC(op_4430_3), 0, 17456 }, /* NEG.B (d8,An,Xn) */ -{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ -{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ -{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ -{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ -{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ -{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ -{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ -{ CPUFUNC(op_4470_3), 0, 17520 }, /* NEG.W (d8,An,Xn) */ -{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ -{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ -{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ -{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ -{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ -{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ -{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ -{ CPUFUNC(op_44b0_3), 0, 17584 }, /* NEG.L (d8,An,Xn) */ -{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ -{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ -{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ -{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ -{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ -{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ -{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ -{ CPUFUNC(op_44f0_3), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ -{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ -{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ -{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ -{ CPUFUNC(op_44fb_3), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ -{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ -{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ -{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ -{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ -{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ -{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ -{ CPUFUNC(op_4630_3), 0, 17968 }, /* NOT.B (d8,An,Xn) */ -{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ -{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ -{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ -{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ -{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ -{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ -{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ -{ CPUFUNC(op_4670_3), 0, 18032 }, /* NOT.W (d8,An,Xn) */ -{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ -{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ -{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ -{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ -{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ -{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ -{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ -{ CPUFUNC(op_46b0_3), 0, 18096 }, /* NOT.L (d8,An,Xn) */ -{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ -{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ -{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ -{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ -{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ -{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ -{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ -{ CPUFUNC(op_46f0_3), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ -{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ -{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ -{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ -{ CPUFUNC(op_46fb_3), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ -{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ -{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ -{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ -{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ -{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ -{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ -{ CPUFUNC(op_4830_3), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ -{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ -{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ -{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ -{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ -{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ -{ CPUFUNC_FF(op_4870_3), 0, 18544 }, /* PEA.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ -{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ -{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ -{ CPUFUNC_FF(op_487b_3), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ -{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ -{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ -{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ -{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_48b0_3), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ -{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ -{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ -{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ -{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_48f0_3), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ -{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ -{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ -{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ -{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ -{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ -{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ -{ CPUFUNC(op_4a30_3), 0, 18992 }, /* TST.B (d8,An,Xn) */ -{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ -{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ -{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ -{ CPUFUNC(op_4a3b_3), 0, 19003 }, /* TST.B (d8,PC,Xn) */ -{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ -{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ -{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ -{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ -{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ -{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ -{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ -{ CPUFUNC(op_4a70_3), 0, 19056 }, /* TST.W (d8,An,Xn) */ -{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ -{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ -{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ -{ CPUFUNC(op_4a7b_3), 0, 19067 }, /* TST.W (d8,PC,Xn) */ -{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ -{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ -{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ -{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ -{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ -{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ -{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ -{ CPUFUNC(op_4ab0_3), 0, 19120 }, /* TST.L (d8,An,Xn) */ -{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ -{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ -{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ -{ CPUFUNC(op_4abb_3), 0, 19131 }, /* TST.L (d8,PC,Xn) */ -{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ -{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ -{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ -{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ -{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ -{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ -{ CPUFUNC(op_4af0_3), 0, 19184 }, /* TAS.B (d8,An,Xn) */ -{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ -{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ -{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ -{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ -{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cb0_3), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cbb_3), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ -{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ -{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cf0_3), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cfb_3), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ -{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ -{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ -{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ -{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ -{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ -{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ -{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ -{ CPUFUNC(op_4e73_0), 0, 20083 }, /* RTE.L */ -{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ -{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ -{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ -{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ -{ CPUFUNC_FF(op_4e7a_0), 0, 20090 }, /* MOVEC2.L #.W */ -{ CPUFUNC_FF(op_4e7b_0), 0, 20091 }, /* MOVE2C.L #.W */ -{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ -{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ -{ CPUFUNC_FF(op_4eb0_3), 0, 20144 }, /* JSR.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ -{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ -{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ -{ CPUFUNC_FF(op_4ebb_3), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ -{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ -{ CPUFUNC_FF(op_4ef0_3), 0, 20208 }, /* JMP.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ -{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ -{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ -{ CPUFUNC_FF(op_4efb_3), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ -{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ -{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ -{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ -{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ -{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ -{ CPUFUNC(op_5030_3), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ -{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ -{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ -{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ -{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ -{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ -{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ -{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ -{ CPUFUNC(op_5070_3), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ -{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ -{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ -{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ -{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ -{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ -{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ -{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ -{ CPUFUNC(op_50b0_3), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ -{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ -{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ -{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_50f0_3), 0, 20720 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ -{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ -{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ -{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ -{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ -{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ -{ CPUFUNC(op_5130_3), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ -{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ -{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ -{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ -{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ -{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ -{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ -{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ -{ CPUFUNC(op_5170_3), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ -{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ -{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ -{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ -{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ -{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ -{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ -{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ -{ CPUFUNC(op_51b0_3), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ -{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ -{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ -{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_51f0_3), 0, 20976 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_52f0_3), 0, 21232 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_53f0_3), 0, 21488 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_54f0_3), 0, 21744 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_55f0_3), 0, 22000 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_56f0_3), 0, 22256 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_57f0_3), 0, 22512 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_58f0_3), 0, 22768 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_59f0_3), 0, 23024 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5af0_3), 0, 23280 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5bf0_3), 0, 23536 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5cf0_3), 0, 23792 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5df0_3), 0, 24048 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ef0_3), 0, 24304 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ff0_3), 0, 24560 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_60ff_3), 0, 24831 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ -{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ -{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ -{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_62ff_3), 0, 25343 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_63ff_3), 0, 25599 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_64ff_3), 0, 25855 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_65ff_3), 0, 26111 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_66ff_3), 0, 26367 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_67ff_3), 0, 26623 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_68ff_3), 0, 26879 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_69ff_3), 0, 27135 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6aff_3), 0, 27391 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6bff_3), 0, 27647 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6cff_3), 0, 27903 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6dff_3), 0, 28159 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6eff_3), 0, 28415 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6fff_3), 0, 28671 }, /* Bcc.L #.L */ -{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ -{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ -{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ -{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ -{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ -{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ -{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ -{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ -{ CPUFUNC(op_8030_3), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ -{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ -{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ -{ CPUFUNC(op_803b_3), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ -{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ -{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ -{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ -{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ -{ CPUFUNC(op_8070_3), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ -{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ -{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ -{ CPUFUNC(op_807b_3), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ -{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ -{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ -{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ -{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ -{ CPUFUNC(op_80b0_3), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ -{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ -{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ -{ CPUFUNC(op_80bb_3), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ -{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ -{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ -{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ -{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ -{ CPUFUNC(op_80f0_3), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ -{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ -{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ -{ CPUFUNC(op_80fb_3), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ -{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ -{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ -{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ -{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ -{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ -{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ -{ CPUFUNC(op_8130_3), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ -{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ -{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ -{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ -{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ -{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ -{ CPUFUNC(op_8170_3), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ -{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ -{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ -{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ -{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ -{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ -{ CPUFUNC(op_81b0_3), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ -{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ -{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ -{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ -{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ -{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ -{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ -{ CPUFUNC(op_81f0_3), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ -{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ -{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ -{ CPUFUNC(op_81fb_3), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ -{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ -{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ -{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ -{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ -{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ -{ CPUFUNC(op_9030_3), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ -{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ -{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ -{ CPUFUNC(op_903b_3), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ -{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ -{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ -{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ -{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ -{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ -{ CPUFUNC(op_9070_3), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ -{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ -{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ -{ CPUFUNC(op_907b_3), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ -{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ -{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ -{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ -{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ -{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ -{ CPUFUNC(op_90b0_3), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ -{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ -{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ -{ CPUFUNC(op_90bb_3), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ -{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ -{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ -{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ -{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ -{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ -{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ -{ CPUFUNC_FF(op_90f0_3), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ -{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ -{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ -{ CPUFUNC_FF(op_90fb_3), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ -{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ -{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ -{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ -{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ -{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ -{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ -{ CPUFUNC(op_9130_3), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ -{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ -{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ -{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ -{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ -{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ -{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ -{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ -{ CPUFUNC(op_9170_3), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ -{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ -{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ -{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ -{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ -{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ -{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ -{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ -{ CPUFUNC(op_91b0_3), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ -{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ -{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ -{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ -{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ -{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ -{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ -{ CPUFUNC_FF(op_91f0_3), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ -{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ -{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ -{ CPUFUNC_FF(op_91fb_3), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ -{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ -{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ -{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ -{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ -{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ -{ CPUFUNC(op_b030_3), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ -{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ -{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ -{ CPUFUNC(op_b03b_3), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ -{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ -{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ -{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ -{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ -{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ -{ CPUFUNC(op_b070_3), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ -{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ -{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ -{ CPUFUNC(op_b07b_3), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ -{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ -{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ -{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ -{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ -{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ -{ CPUFUNC(op_b0b0_3), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ -{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ -{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ -{ CPUFUNC(op_b0bb_3), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ -{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ -{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ -{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ -{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ -{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ -{ CPUFUNC(op_b0f0_3), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ -{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ -{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ -{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ -{ CPUFUNC(op_b0fb_3), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ -{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ -{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ -{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ -{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ -{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ -{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ -{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ -{ CPUFUNC(op_b130_3), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ -{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ -{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ -{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ -{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ -{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ -{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ -{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ -{ CPUFUNC(op_b170_3), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ -{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ -{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ -{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ -{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ -{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ -{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ -{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ -{ CPUFUNC(op_b1b0_3), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ -{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ -{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ -{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ -{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ -{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ -{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ -{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ -{ CPUFUNC(op_b1f0_3), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ -{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ -{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ -{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ -{ CPUFUNC(op_b1fb_3), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ -{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ -{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ -{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ -{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ -{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ -{ CPUFUNC(op_c030_3), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ -{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ -{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ -{ CPUFUNC(op_c03b_3), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ -{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ -{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ -{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ -{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ -{ CPUFUNC(op_c070_3), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ -{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ -{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ -{ CPUFUNC(op_c07b_3), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ -{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ -{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ -{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ -{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ -{ CPUFUNC(op_c0b0_3), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ -{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ -{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ -{ CPUFUNC(op_c0bb_3), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ -{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ -{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ -{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ -{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ -{ CPUFUNC(op_c0f0_3), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ -{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ -{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ -{ CPUFUNC(op_c0fb_3), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ -{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ -{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ -{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ -{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ -{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ -{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ -{ CPUFUNC(op_c130_3), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ -{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ -{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ -{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ -{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ -{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ -{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ -{ CPUFUNC(op_c170_3), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ -{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ -{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ -{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ -{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ -{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ -{ CPUFUNC(op_c1b0_3), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ -{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ -{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ -{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ -{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ -{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ -{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ -{ CPUFUNC(op_c1f0_3), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ -{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ -{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ -{ CPUFUNC(op_c1fb_3), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ -{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ -{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ -{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ -{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ -{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ -{ CPUFUNC(op_d030_3), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ -{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ -{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ -{ CPUFUNC(op_d03b_3), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ -{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ -{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ -{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ -{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ -{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ -{ CPUFUNC(op_d070_3), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ -{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ -{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ -{ CPUFUNC(op_d07b_3), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ -{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ -{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ -{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ -{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ -{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ -{ CPUFUNC(op_d0b0_3), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ -{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ -{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ -{ CPUFUNC(op_d0bb_3), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ -{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ -{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ -{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ -{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ -{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ -{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ -{ CPUFUNC_FF(op_d0f0_3), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ -{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ -{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ -{ CPUFUNC_FF(op_d0fb_3), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ -{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ -{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ -{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ -{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ -{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ -{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ -{ CPUFUNC(op_d130_3), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ -{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ -{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ -{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ -{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ -{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ -{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ -{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ -{ CPUFUNC(op_d170_3), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ -{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ -{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ -{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ -{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ -{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ -{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ -{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ -{ CPUFUNC(op_d1b0_3), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ -{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ -{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ -{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ -{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ -{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ -{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ -{ CPUFUNC_FF(op_d1f0_3), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ -{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ -{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ -{ CPUFUNC_FF(op_d1fb_3), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ -{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ -{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ -{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ -{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ -{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ -{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ -{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ -{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ -{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ -{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ -{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ -{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ -{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ -{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ -{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ -{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ -{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ -{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ -{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ -{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ -{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ -{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ -{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ -{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ -{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ -{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ -{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ -{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ -{ CPUFUNC(op_e0f0_3), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ -{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ -{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ -{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ -{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ -{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ -{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ -{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ -{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ -{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ -{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ -{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ -{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ -{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ -{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ -{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ -{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ -{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ -{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ -{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ -{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ -{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ -{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ -{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ -{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ -{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ -{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ -{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ -{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ -{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ -{ CPUFUNC(op_e1f0_3), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ -{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ -{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ -{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ -{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ -{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ -{ CPUFUNC(op_e2f0_3), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ -{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ -{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ -{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ -{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ -{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ -{ CPUFUNC(op_e3f0_3), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ -{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ -{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ -{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ -{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ -{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ -{ CPUFUNC(op_e4f0_3), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ -{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ -{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ -{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ -{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ -{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ -{ CPUFUNC(op_e5f0_3), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ -{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ -{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ -{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ -{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ -{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ -{ CPUFUNC(op_e6f0_3), 0, 59120 }, /* RORW.W (d8,An,Xn) */ -{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ -{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ -{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ -{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ -{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ -{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ -{ CPUFUNC(op_e7f0_3), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ -{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ -{ 0, 0, 0 }}; -struct cputbl CPUFUNC(op_smalltbl_4)[] = { -{ CPUFUNC(op_0_0), 0, 0 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_10_0), 0, 16 }, /* OR.B #.B,(An) */ -{ CPUFUNC(op_18_0), 0, 24 }, /* OR.B #.B,(An)+ */ -{ CPUFUNC(op_20_0), 0, 32 }, /* OR.B #.B,-(An) */ -{ CPUFUNC(op_28_0), 0, 40 }, /* OR.B #.B,(d16,An) */ -{ CPUFUNC(op_30_3), 0, 48 }, /* OR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_38_0), 0, 56 }, /* OR.B #.B,(xxx).W */ -{ CPUFUNC(op_39_0), 0, 57 }, /* OR.B #.B,(xxx).L */ -{ CPUFUNC(op_3c_0), 0, 60 }, /* ORSR.B #.W */ -{ CPUFUNC(op_40_0), 0, 64 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_50_0), 0, 80 }, /* OR.W #.W,(An) */ -{ CPUFUNC(op_58_0), 0, 88 }, /* OR.W #.W,(An)+ */ -{ CPUFUNC(op_60_0), 0, 96 }, /* OR.W #.W,-(An) */ -{ CPUFUNC(op_68_0), 0, 104 }, /* OR.W #.W,(d16,An) */ -{ CPUFUNC(op_70_3), 0, 112 }, /* OR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_78_0), 0, 120 }, /* OR.W #.W,(xxx).W */ -{ CPUFUNC(op_79_0), 0, 121 }, /* OR.W #.W,(xxx).L */ -{ CPUFUNC(op_7c_0), 0, 124 }, /* ORSR.W #.W */ -{ CPUFUNC(op_80_0), 0, 128 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_90_0), 0, 144 }, /* OR.L #.L,(An) */ -{ CPUFUNC(op_98_0), 0, 152 }, /* OR.L #.L,(An)+ */ -{ CPUFUNC(op_a0_0), 0, 160 }, /* OR.L #.L,-(An) */ -{ CPUFUNC(op_a8_0), 0, 168 }, /* OR.L #.L,(d16,An) */ -{ CPUFUNC(op_b0_3), 0, 176 }, /* OR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_b8_0), 0, 184 }, /* OR.L #.L,(xxx).W */ -{ CPUFUNC(op_b9_0), 0, 185 }, /* OR.L #.L,(xxx).L */ -{ CPUFUNC(op_100_0), 0, 256 }, /* BTST.L Dn,Dn */ -{ CPUFUNC_FF(op_108_0), 0, 264 }, /* MVPMR.W (d16,An),Dn */ -{ CPUFUNC(op_110_0), 0, 272 }, /* BTST.B Dn,(An) */ -{ CPUFUNC(op_118_0), 0, 280 }, /* BTST.B Dn,(An)+ */ -{ CPUFUNC(op_120_0), 0, 288 }, /* BTST.B Dn,-(An) */ -{ CPUFUNC(op_128_0), 0, 296 }, /* BTST.B Dn,(d16,An) */ -{ CPUFUNC(op_130_3), 0, 304 }, /* BTST.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_138_0), 0, 312 }, /* BTST.B Dn,(xxx).W */ -{ CPUFUNC(op_139_0), 0, 313 }, /* BTST.B Dn,(xxx).L */ -{ CPUFUNC(op_13a_0), 0, 314 }, /* BTST.B Dn,(d16,PC) */ -{ CPUFUNC(op_13b_3), 0, 315 }, /* BTST.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_13c_0), 0, 316 }, /* BTST.B Dn,#.B */ -{ CPUFUNC(op_140_0), 0, 320 }, /* BCHG.L Dn,Dn */ -{ CPUFUNC_FF(op_148_0), 0, 328 }, /* MVPMR.L (d16,An),Dn */ -{ CPUFUNC(op_150_0), 0, 336 }, /* BCHG.B Dn,(An) */ -{ CPUFUNC(op_158_0), 0, 344 }, /* BCHG.B Dn,(An)+ */ -{ CPUFUNC(op_160_0), 0, 352 }, /* BCHG.B Dn,-(An) */ -{ CPUFUNC(op_168_0), 0, 360 }, /* BCHG.B Dn,(d16,An) */ -{ CPUFUNC(op_170_3), 0, 368 }, /* BCHG.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_178_0), 0, 376 }, /* BCHG.B Dn,(xxx).W */ -{ CPUFUNC(op_179_0), 0, 377 }, /* BCHG.B Dn,(xxx).L */ -{ CPUFUNC(op_17a_0), 0, 378 }, /* BCHG.B Dn,(d16,PC) */ -{ CPUFUNC(op_17b_3), 0, 379 }, /* BCHG.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_180_0), 0, 384 }, /* BCLR.L Dn,Dn */ -{ CPUFUNC_FF(op_188_0), 0, 392 }, /* MVPRM.W Dn,(d16,An) */ -{ CPUFUNC(op_190_0), 0, 400 }, /* BCLR.B Dn,(An) */ -{ CPUFUNC(op_198_0), 0, 408 }, /* BCLR.B Dn,(An)+ */ -{ CPUFUNC(op_1a0_0), 0, 416 }, /* BCLR.B Dn,-(An) */ -{ CPUFUNC(op_1a8_0), 0, 424 }, /* BCLR.B Dn,(d16,An) */ -{ CPUFUNC(op_1b0_3), 0, 432 }, /* BCLR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1b8_0), 0, 440 }, /* BCLR.B Dn,(xxx).W */ -{ CPUFUNC(op_1b9_0), 0, 441 }, /* BCLR.B Dn,(xxx).L */ -{ CPUFUNC(op_1ba_0), 0, 442 }, /* BCLR.B Dn,(d16,PC) */ -{ CPUFUNC(op_1bb_3), 0, 443 }, /* BCLR.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_1c0_0), 0, 448 }, /* BSET.L Dn,Dn */ -{ CPUFUNC_FF(op_1c8_0), 0, 456 }, /* MVPRM.L Dn,(d16,An) */ -{ CPUFUNC(op_1d0_0), 0, 464 }, /* BSET.B Dn,(An) */ -{ CPUFUNC(op_1d8_0), 0, 472 }, /* BSET.B Dn,(An)+ */ -{ CPUFUNC(op_1e0_0), 0, 480 }, /* BSET.B Dn,-(An) */ -{ CPUFUNC(op_1e8_0), 0, 488 }, /* BSET.B Dn,(d16,An) */ -{ CPUFUNC(op_1f0_3), 0, 496 }, /* BSET.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1f8_0), 0, 504 }, /* BSET.B Dn,(xxx).W */ -{ CPUFUNC(op_1f9_0), 0, 505 }, /* BSET.B Dn,(xxx).L */ -{ CPUFUNC(op_1fa_0), 0, 506 }, /* BSET.B Dn,(d16,PC) */ -{ CPUFUNC(op_1fb_3), 0, 507 }, /* BSET.B Dn,(d8,PC,Xn) */ -{ CPUFUNC(op_200_0), 0, 512 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_210_0), 0, 528 }, /* AND.B #.B,(An) */ -{ CPUFUNC(op_218_0), 0, 536 }, /* AND.B #.B,(An)+ */ -{ CPUFUNC(op_220_0), 0, 544 }, /* AND.B #.B,-(An) */ -{ CPUFUNC(op_228_0), 0, 552 }, /* AND.B #.B,(d16,An) */ -{ CPUFUNC(op_230_3), 0, 560 }, /* AND.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_238_0), 0, 568 }, /* AND.B #.B,(xxx).W */ -{ CPUFUNC(op_239_0), 0, 569 }, /* AND.B #.B,(xxx).L */ -{ CPUFUNC(op_23c_0), 0, 572 }, /* ANDSR.B #.W */ -{ CPUFUNC(op_240_0), 0, 576 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_250_0), 0, 592 }, /* AND.W #.W,(An) */ -{ CPUFUNC(op_258_0), 0, 600 }, /* AND.W #.W,(An)+ */ -{ CPUFUNC(op_260_0), 0, 608 }, /* AND.W #.W,-(An) */ -{ CPUFUNC(op_268_0), 0, 616 }, /* AND.W #.W,(d16,An) */ -{ CPUFUNC(op_270_3), 0, 624 }, /* AND.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_278_0), 0, 632 }, /* AND.W #.W,(xxx).W */ -{ CPUFUNC(op_279_0), 0, 633 }, /* AND.W #.W,(xxx).L */ -{ CPUFUNC(op_27c_0), 0, 636 }, /* ANDSR.W #.W */ -{ CPUFUNC(op_280_0), 0, 640 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_290_0), 0, 656 }, /* AND.L #.L,(An) */ -{ CPUFUNC(op_298_0), 0, 664 }, /* AND.L #.L,(An)+ */ -{ CPUFUNC(op_2a0_0), 0, 672 }, /* AND.L #.L,-(An) */ -{ CPUFUNC(op_2a8_0), 0, 680 }, /* AND.L #.L,(d16,An) */ -{ CPUFUNC(op_2b0_3), 0, 688 }, /* AND.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_2b8_0), 0, 696 }, /* AND.L #.L,(xxx).W */ -{ CPUFUNC(op_2b9_0), 0, 697 }, /* AND.L #.L,(xxx).L */ -{ CPUFUNC(op_400_0), 0, 1024 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_410_0), 0, 1040 }, /* SUB.B #.B,(An) */ -{ CPUFUNC(op_418_0), 0, 1048 }, /* SUB.B #.B,(An)+ */ -{ CPUFUNC(op_420_0), 0, 1056 }, /* SUB.B #.B,-(An) */ -{ CPUFUNC(op_428_0), 0, 1064 }, /* SUB.B #.B,(d16,An) */ -{ CPUFUNC(op_430_3), 0, 1072 }, /* SUB.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_438_0), 0, 1080 }, /* SUB.B #.B,(xxx).W */ -{ CPUFUNC(op_439_0), 0, 1081 }, /* SUB.B #.B,(xxx).L */ -{ CPUFUNC(op_440_0), 0, 1088 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_450_0), 0, 1104 }, /* SUB.W #.W,(An) */ -{ CPUFUNC(op_458_0), 0, 1112 }, /* SUB.W #.W,(An)+ */ -{ CPUFUNC(op_460_0), 0, 1120 }, /* SUB.W #.W,-(An) */ -{ CPUFUNC(op_468_0), 0, 1128 }, /* SUB.W #.W,(d16,An) */ -{ CPUFUNC(op_470_3), 0, 1136 }, /* SUB.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_478_0), 0, 1144 }, /* SUB.W #.W,(xxx).W */ -{ CPUFUNC(op_479_0), 0, 1145 }, /* SUB.W #.W,(xxx).L */ -{ CPUFUNC(op_480_0), 0, 1152 }, /* SUB.L #.L,Dn */ -{ CPUFUNC(op_490_0), 0, 1168 }, /* SUB.L #.L,(An) */ -{ CPUFUNC(op_498_0), 0, 1176 }, /* SUB.L #.L,(An)+ */ -{ CPUFUNC(op_4a0_0), 0, 1184 }, /* SUB.L #.L,-(An) */ -{ CPUFUNC(op_4a8_0), 0, 1192 }, /* SUB.L #.L,(d16,An) */ -{ CPUFUNC(op_4b0_3), 0, 1200 }, /* SUB.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_4b8_0), 0, 1208 }, /* SUB.L #.L,(xxx).W */ -{ CPUFUNC(op_4b9_0), 0, 1209 }, /* SUB.L #.L,(xxx).L */ -{ CPUFUNC(op_600_0), 0, 1536 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_610_0), 0, 1552 }, /* ADD.B #.B,(An) */ -{ CPUFUNC(op_618_0), 0, 1560 }, /* ADD.B #.B,(An)+ */ -{ CPUFUNC(op_620_0), 0, 1568 }, /* ADD.B #.B,-(An) */ -{ CPUFUNC(op_628_0), 0, 1576 }, /* ADD.B #.B,(d16,An) */ -{ CPUFUNC(op_630_3), 0, 1584 }, /* ADD.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_638_0), 0, 1592 }, /* ADD.B #.B,(xxx).W */ -{ CPUFUNC(op_639_0), 0, 1593 }, /* ADD.B #.B,(xxx).L */ -{ CPUFUNC(op_640_0), 0, 1600 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_650_0), 0, 1616 }, /* ADD.W #.W,(An) */ -{ CPUFUNC(op_658_0), 0, 1624 }, /* ADD.W #.W,(An)+ */ -{ CPUFUNC(op_660_0), 0, 1632 }, /* ADD.W #.W,-(An) */ -{ CPUFUNC(op_668_0), 0, 1640 }, /* ADD.W #.W,(d16,An) */ -{ CPUFUNC(op_670_3), 0, 1648 }, /* ADD.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_678_0), 0, 1656 }, /* ADD.W #.W,(xxx).W */ -{ CPUFUNC(op_679_0), 0, 1657 }, /* ADD.W #.W,(xxx).L */ -{ CPUFUNC(op_680_0), 0, 1664 }, /* ADD.L #.L,Dn */ -{ CPUFUNC(op_690_0), 0, 1680 }, /* ADD.L #.L,(An) */ -{ CPUFUNC(op_698_0), 0, 1688 }, /* ADD.L #.L,(An)+ */ -{ CPUFUNC(op_6a0_0), 0, 1696 }, /* ADD.L #.L,-(An) */ -{ CPUFUNC(op_6a8_0), 0, 1704 }, /* ADD.L #.L,(d16,An) */ -{ CPUFUNC(op_6b0_3), 0, 1712 }, /* ADD.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_6b8_0), 0, 1720 }, /* ADD.L #.L,(xxx).W */ -{ CPUFUNC(op_6b9_0), 0, 1721 }, /* ADD.L #.L,(xxx).L */ -{ CPUFUNC(op_800_0), 0, 2048 }, /* BTST.L #.W,Dn */ -{ CPUFUNC(op_810_0), 0, 2064 }, /* BTST.B #.W,(An) */ -{ CPUFUNC(op_818_0), 0, 2072 }, /* BTST.B #.W,(An)+ */ -{ CPUFUNC(op_820_0), 0, 2080 }, /* BTST.B #.W,-(An) */ -{ CPUFUNC(op_828_0), 0, 2088 }, /* BTST.B #.W,(d16,An) */ -{ CPUFUNC(op_830_3), 0, 2096 }, /* BTST.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_838_0), 0, 2104 }, /* BTST.B #.W,(xxx).W */ -{ CPUFUNC(op_839_0), 0, 2105 }, /* BTST.B #.W,(xxx).L */ -{ CPUFUNC(op_83a_0), 0, 2106 }, /* BTST.B #.W,(d16,PC) */ -{ CPUFUNC(op_83b_3), 0, 2107 }, /* BTST.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_83c_0), 0, 2108 }, /* BTST.B #.W,#.B */ -{ CPUFUNC(op_840_0), 0, 2112 }, /* BCHG.L #.W,Dn */ -{ CPUFUNC(op_850_0), 0, 2128 }, /* BCHG.B #.W,(An) */ -{ CPUFUNC(op_858_0), 0, 2136 }, /* BCHG.B #.W,(An)+ */ -{ CPUFUNC(op_860_0), 0, 2144 }, /* BCHG.B #.W,-(An) */ -{ CPUFUNC(op_868_0), 0, 2152 }, /* BCHG.B #.W,(d16,An) */ -{ CPUFUNC(op_870_3), 0, 2160 }, /* BCHG.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_878_0), 0, 2168 }, /* BCHG.B #.W,(xxx).W */ -{ CPUFUNC(op_879_0), 0, 2169 }, /* BCHG.B #.W,(xxx).L */ -{ CPUFUNC(op_87a_0), 0, 2170 }, /* BCHG.B #.W,(d16,PC) */ -{ CPUFUNC(op_87b_3), 0, 2171 }, /* BCHG.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_880_0), 0, 2176 }, /* BCLR.L #.W,Dn */ -{ CPUFUNC(op_890_0), 0, 2192 }, /* BCLR.B #.W,(An) */ -{ CPUFUNC(op_898_0), 0, 2200 }, /* BCLR.B #.W,(An)+ */ -{ CPUFUNC(op_8a0_0), 0, 2208 }, /* BCLR.B #.W,-(An) */ -{ CPUFUNC(op_8a8_0), 0, 2216 }, /* BCLR.B #.W,(d16,An) */ -{ CPUFUNC(op_8b0_3), 0, 2224 }, /* BCLR.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8b8_0), 0, 2232 }, /* BCLR.B #.W,(xxx).W */ -{ CPUFUNC(op_8b9_0), 0, 2233 }, /* BCLR.B #.W,(xxx).L */ -{ CPUFUNC(op_8ba_0), 0, 2234 }, /* BCLR.B #.W,(d16,PC) */ -{ CPUFUNC(op_8bb_3), 0, 2235 }, /* BCLR.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_8c0_0), 0, 2240 }, /* BSET.L #.W,Dn */ -{ CPUFUNC(op_8d0_0), 0, 2256 }, /* BSET.B #.W,(An) */ -{ CPUFUNC(op_8d8_0), 0, 2264 }, /* BSET.B #.W,(An)+ */ -{ CPUFUNC(op_8e0_0), 0, 2272 }, /* BSET.B #.W,-(An) */ -{ CPUFUNC(op_8e8_0), 0, 2280 }, /* BSET.B #.W,(d16,An) */ -{ CPUFUNC(op_8f0_3), 0, 2288 }, /* BSET.B #.W,(d8,An,Xn) */ -{ CPUFUNC(op_8f8_0), 0, 2296 }, /* BSET.B #.W,(xxx).W */ -{ CPUFUNC(op_8f9_0), 0, 2297 }, /* BSET.B #.W,(xxx).L */ -{ CPUFUNC(op_8fa_0), 0, 2298 }, /* BSET.B #.W,(d16,PC) */ -{ CPUFUNC(op_8fb_3), 0, 2299 }, /* BSET.B #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_a00_0), 0, 2560 }, /* EOR.B #.B,Dn */ -{ CPUFUNC(op_a10_0), 0, 2576 }, /* EOR.B #.B,(An) */ -{ CPUFUNC(op_a18_0), 0, 2584 }, /* EOR.B #.B,(An)+ */ -{ CPUFUNC(op_a20_0), 0, 2592 }, /* EOR.B #.B,-(An) */ -{ CPUFUNC(op_a28_0), 0, 2600 }, /* EOR.B #.B,(d16,An) */ -{ CPUFUNC(op_a30_3), 0, 2608 }, /* EOR.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_a38_0), 0, 2616 }, /* EOR.B #.B,(xxx).W */ -{ CPUFUNC(op_a39_0), 0, 2617 }, /* EOR.B #.B,(xxx).L */ -{ CPUFUNC(op_a3c_0), 0, 2620 }, /* EORSR.B #.W */ -{ CPUFUNC(op_a40_0), 0, 2624 }, /* EOR.W #.W,Dn */ -{ CPUFUNC(op_a50_0), 0, 2640 }, /* EOR.W #.W,(An) */ -{ CPUFUNC(op_a58_0), 0, 2648 }, /* EOR.W #.W,(An)+ */ -{ CPUFUNC(op_a60_0), 0, 2656 }, /* EOR.W #.W,-(An) */ -{ CPUFUNC(op_a68_0), 0, 2664 }, /* EOR.W #.W,(d16,An) */ -{ CPUFUNC(op_a70_3), 0, 2672 }, /* EOR.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_a78_0), 0, 2680 }, /* EOR.W #.W,(xxx).W */ -{ CPUFUNC(op_a79_0), 0, 2681 }, /* EOR.W #.W,(xxx).L */ -{ CPUFUNC(op_a7c_0), 0, 2684 }, /* EORSR.W #.W */ -{ CPUFUNC(op_a80_0), 0, 2688 }, /* EOR.L #.L,Dn */ -{ CPUFUNC(op_a90_0), 0, 2704 }, /* EOR.L #.L,(An) */ -{ CPUFUNC(op_a98_0), 0, 2712 }, /* EOR.L #.L,(An)+ */ -{ CPUFUNC(op_aa0_0), 0, 2720 }, /* EOR.L #.L,-(An) */ -{ CPUFUNC(op_aa8_0), 0, 2728 }, /* EOR.L #.L,(d16,An) */ -{ CPUFUNC(op_ab0_3), 0, 2736 }, /* EOR.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_ab8_0), 0, 2744 }, /* EOR.L #.L,(xxx).W */ -{ CPUFUNC(op_ab9_0), 0, 2745 }, /* EOR.L #.L,(xxx).L */ -{ CPUFUNC(op_c00_0), 0, 3072 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_c10_0), 0, 3088 }, /* CMP.B #.B,(An) */ -{ CPUFUNC(op_c18_0), 0, 3096 }, /* CMP.B #.B,(An)+ */ -{ CPUFUNC(op_c20_0), 0, 3104 }, /* CMP.B #.B,-(An) */ -{ CPUFUNC(op_c28_0), 0, 3112 }, /* CMP.B #.B,(d16,An) */ -{ CPUFUNC(op_c30_3), 0, 3120 }, /* CMP.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_c38_0), 0, 3128 }, /* CMP.B #.B,(xxx).W */ -{ CPUFUNC(op_c39_0), 0, 3129 }, /* CMP.B #.B,(xxx).L */ -{ CPUFUNC(op_c3a_0), 0, 3130 }, /* CMP.B #.B,(d16,PC) */ -{ CPUFUNC(op_c3b_3), 0, 3131 }, /* CMP.B #.B,(d8,PC,Xn) */ -{ CPUFUNC(op_c40_0), 0, 3136 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_c50_0), 0, 3152 }, /* CMP.W #.W,(An) */ -{ CPUFUNC(op_c58_0), 0, 3160 }, /* CMP.W #.W,(An)+ */ -{ CPUFUNC(op_c60_0), 0, 3168 }, /* CMP.W #.W,-(An) */ -{ CPUFUNC(op_c68_0), 0, 3176 }, /* CMP.W #.W,(d16,An) */ -{ CPUFUNC(op_c70_3), 0, 3184 }, /* CMP.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_c78_0), 0, 3192 }, /* CMP.W #.W,(xxx).W */ -{ CPUFUNC(op_c79_0), 0, 3193 }, /* CMP.W #.W,(xxx).L */ -{ CPUFUNC(op_c7a_0), 0, 3194 }, /* CMP.W #.W,(d16,PC) */ -{ CPUFUNC(op_c7b_3), 0, 3195 }, /* CMP.W #.W,(d8,PC,Xn) */ -{ CPUFUNC(op_c80_0), 0, 3200 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_c90_0), 0, 3216 }, /* CMP.L #.L,(An) */ -{ CPUFUNC(op_c98_0), 0, 3224 }, /* CMP.L #.L,(An)+ */ -{ CPUFUNC(op_ca0_0), 0, 3232 }, /* CMP.L #.L,-(An) */ -{ CPUFUNC(op_ca8_0), 0, 3240 }, /* CMP.L #.L,(d16,An) */ -{ CPUFUNC(op_cb0_3), 0, 3248 }, /* CMP.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_cb8_0), 0, 3256 }, /* CMP.L #.L,(xxx).W */ -{ CPUFUNC(op_cb9_0), 0, 3257 }, /* CMP.L #.L,(xxx).L */ -{ CPUFUNC(op_cba_0), 0, 3258 }, /* CMP.L #.L,(d16,PC) */ -{ CPUFUNC(op_cbb_3), 0, 3259 }, /* CMP.L #.L,(d8,PC,Xn) */ -{ CPUFUNC(op_1000_0), 0, 4096 }, /* MOVE.B Dn,Dn */ -{ CPUFUNC(op_1010_0), 0, 4112 }, /* MOVE.B (An),Dn */ -{ CPUFUNC(op_1018_0), 0, 4120 }, /* MOVE.B (An)+,Dn */ -{ CPUFUNC(op_1020_0), 0, 4128 }, /* MOVE.B -(An),Dn */ -{ CPUFUNC(op_1028_0), 0, 4136 }, /* MOVE.B (d16,An),Dn */ -{ CPUFUNC(op_1030_3), 0, 4144 }, /* MOVE.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_1038_0), 0, 4152 }, /* MOVE.B (xxx).W,Dn */ -{ CPUFUNC(op_1039_0), 0, 4153 }, /* MOVE.B (xxx).L,Dn */ -{ CPUFUNC(op_103a_0), 0, 4154 }, /* MOVE.B (d16,PC),Dn */ -{ CPUFUNC(op_103b_3), 0, 4155 }, /* MOVE.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_103c_0), 0, 4156 }, /* MOVE.B #.B,Dn */ -{ CPUFUNC(op_1080_0), 0, 4224 }, /* MOVE.B Dn,(An) */ -{ CPUFUNC(op_1090_0), 0, 4240 }, /* MOVE.B (An),(An) */ -{ CPUFUNC(op_1098_0), 0, 4248 }, /* MOVE.B (An)+,(An) */ -{ CPUFUNC(op_10a0_0), 0, 4256 }, /* MOVE.B -(An),(An) */ -{ CPUFUNC(op_10a8_0), 0, 4264 }, /* MOVE.B (d16,An),(An) */ -{ CPUFUNC(op_10b0_3), 0, 4272 }, /* MOVE.B (d8,An,Xn),(An) */ -{ CPUFUNC(op_10b8_0), 0, 4280 }, /* MOVE.B (xxx).W,(An) */ -{ CPUFUNC(op_10b9_0), 0, 4281 }, /* MOVE.B (xxx).L,(An) */ -{ CPUFUNC(op_10ba_0), 0, 4282 }, /* MOVE.B (d16,PC),(An) */ -{ CPUFUNC(op_10bb_3), 0, 4283 }, /* MOVE.B (d8,PC,Xn),(An) */ -{ CPUFUNC(op_10bc_0), 0, 4284 }, /* MOVE.B #.B,(An) */ -{ CPUFUNC(op_10c0_0), 0, 4288 }, /* MOVE.B Dn,(An)+ */ -{ CPUFUNC(op_10d0_0), 0, 4304 }, /* MOVE.B (An),(An)+ */ -{ CPUFUNC(op_10d8_0), 0, 4312 }, /* MOVE.B (An)+,(An)+ */ -{ CPUFUNC(op_10e0_0), 0, 4320 }, /* MOVE.B -(An),(An)+ */ -{ CPUFUNC(op_10e8_0), 0, 4328 }, /* MOVE.B (d16,An),(An)+ */ -{ CPUFUNC(op_10f0_3), 0, 4336 }, /* MOVE.B (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_10f8_0), 0, 4344 }, /* MOVE.B (xxx).W,(An)+ */ -{ CPUFUNC(op_10f9_0), 0, 4345 }, /* MOVE.B (xxx).L,(An)+ */ -{ CPUFUNC(op_10fa_0), 0, 4346 }, /* MOVE.B (d16,PC),(An)+ */ -{ CPUFUNC(op_10fb_3), 0, 4347 }, /* MOVE.B (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_10fc_0), 0, 4348 }, /* MOVE.B #.B,(An)+ */ -{ CPUFUNC(op_1100_0), 0, 4352 }, /* MOVE.B Dn,-(An) */ -{ CPUFUNC(op_1110_0), 0, 4368 }, /* MOVE.B (An),-(An) */ -{ CPUFUNC(op_1118_0), 0, 4376 }, /* MOVE.B (An)+,-(An) */ -{ CPUFUNC(op_1120_0), 0, 4384 }, /* MOVE.B -(An),-(An) */ -{ CPUFUNC(op_1128_0), 0, 4392 }, /* MOVE.B (d16,An),-(An) */ -{ CPUFUNC(op_1130_3), 0, 4400 }, /* MOVE.B (d8,An,Xn),-(An) */ -{ CPUFUNC(op_1138_0), 0, 4408 }, /* MOVE.B (xxx).W,-(An) */ -{ CPUFUNC(op_1139_0), 0, 4409 }, /* MOVE.B (xxx).L,-(An) */ -{ CPUFUNC(op_113a_0), 0, 4410 }, /* MOVE.B (d16,PC),-(An) */ -{ CPUFUNC(op_113b_3), 0, 4411 }, /* MOVE.B (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_113c_0), 0, 4412 }, /* MOVE.B #.B,-(An) */ -{ CPUFUNC(op_1140_0), 0, 4416 }, /* MOVE.B Dn,(d16,An) */ -{ CPUFUNC(op_1150_0), 0, 4432 }, /* MOVE.B (An),(d16,An) */ -{ CPUFUNC(op_1158_0), 0, 4440 }, /* MOVE.B (An)+,(d16,An) */ -{ CPUFUNC(op_1160_0), 0, 4448 }, /* MOVE.B -(An),(d16,An) */ -{ CPUFUNC(op_1168_0), 0, 4456 }, /* MOVE.B (d16,An),(d16,An) */ -{ CPUFUNC(op_1170_3), 0, 4464 }, /* MOVE.B (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_1178_0), 0, 4472 }, /* MOVE.B (xxx).W,(d16,An) */ -{ CPUFUNC(op_1179_0), 0, 4473 }, /* MOVE.B (xxx).L,(d16,An) */ -{ CPUFUNC(op_117a_0), 0, 4474 }, /* MOVE.B (d16,PC),(d16,An) */ -{ CPUFUNC(op_117b_3), 0, 4475 }, /* MOVE.B (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_117c_0), 0, 4476 }, /* MOVE.B #.B,(d16,An) */ -{ CPUFUNC(op_1180_3), 0, 4480 }, /* MOVE.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_1190_3), 0, 4496 }, /* MOVE.B (An),(d8,An,Xn) */ -{ CPUFUNC(op_1198_3), 0, 4504 }, /* MOVE.B (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_11a0_3), 0, 4512 }, /* MOVE.B -(An),(d8,An,Xn) */ -{ CPUFUNC(op_11a8_3), 0, 4520 }, /* MOVE.B (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_11b0_3), 0, 4528 }, /* MOVE.B (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11b8_3), 0, 4536 }, /* MOVE.B (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_11b9_3), 0, 4537 }, /* MOVE.B (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_11ba_3), 0, 4538 }, /* MOVE.B (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_11bb_3), 0, 4539 }, /* MOVE.B (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_11bc_3), 0, 4540 }, /* MOVE.B #.B,(d8,An,Xn) */ -{ CPUFUNC(op_11c0_0), 0, 4544 }, /* MOVE.B Dn,(xxx).W */ -{ CPUFUNC(op_11d0_0), 0, 4560 }, /* MOVE.B (An),(xxx).W */ -{ CPUFUNC(op_11d8_0), 0, 4568 }, /* MOVE.B (An)+,(xxx).W */ -{ CPUFUNC(op_11e0_0), 0, 4576 }, /* MOVE.B -(An),(xxx).W */ -{ CPUFUNC(op_11e8_0), 0, 4584 }, /* MOVE.B (d16,An),(xxx).W */ -{ CPUFUNC(op_11f0_3), 0, 4592 }, /* MOVE.B (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_11f8_0), 0, 4600 }, /* MOVE.B (xxx).W,(xxx).W */ -{ CPUFUNC(op_11f9_0), 0, 4601 }, /* MOVE.B (xxx).L,(xxx).W */ -{ CPUFUNC(op_11fa_0), 0, 4602 }, /* MOVE.B (d16,PC),(xxx).W */ -{ CPUFUNC(op_11fb_3), 0, 4603 }, /* MOVE.B (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_11fc_0), 0, 4604 }, /* MOVE.B #.B,(xxx).W */ -{ CPUFUNC(op_13c0_0), 0, 5056 }, /* MOVE.B Dn,(xxx).L */ -{ CPUFUNC(op_13d0_0), 0, 5072 }, /* MOVE.B (An),(xxx).L */ -{ CPUFUNC(op_13d8_0), 0, 5080 }, /* MOVE.B (An)+,(xxx).L */ -{ CPUFUNC(op_13e0_0), 0, 5088 }, /* MOVE.B -(An),(xxx).L */ -{ CPUFUNC(op_13e8_0), 0, 5096 }, /* MOVE.B (d16,An),(xxx).L */ -{ CPUFUNC(op_13f0_3), 0, 5104 }, /* MOVE.B (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_13f8_0), 0, 5112 }, /* MOVE.B (xxx).W,(xxx).L */ -{ CPUFUNC(op_13f9_0), 0, 5113 }, /* MOVE.B (xxx).L,(xxx).L */ -{ CPUFUNC(op_13fa_0), 0, 5114 }, /* MOVE.B (d16,PC),(xxx).L */ -{ CPUFUNC(op_13fb_3), 0, 5115 }, /* MOVE.B (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_13fc_0), 0, 5116 }, /* MOVE.B #.B,(xxx).L */ -{ CPUFUNC(op_2000_0), 0, 8192 }, /* MOVE.L Dn,Dn */ -{ CPUFUNC(op_2008_0), 0, 8200 }, /* MOVE.L An,Dn */ -{ CPUFUNC(op_2010_0), 0, 8208 }, /* MOVE.L (An),Dn */ -{ CPUFUNC(op_2018_0), 0, 8216 }, /* MOVE.L (An)+,Dn */ -{ CPUFUNC(op_2020_0), 0, 8224 }, /* MOVE.L -(An),Dn */ -{ CPUFUNC(op_2028_0), 0, 8232 }, /* MOVE.L (d16,An),Dn */ -{ CPUFUNC(op_2030_3), 0, 8240 }, /* MOVE.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_2038_0), 0, 8248 }, /* MOVE.L (xxx).W,Dn */ -{ CPUFUNC(op_2039_0), 0, 8249 }, /* MOVE.L (xxx).L,Dn */ -{ CPUFUNC(op_203a_0), 0, 8250 }, /* MOVE.L (d16,PC),Dn */ -{ CPUFUNC(op_203b_3), 0, 8251 }, /* MOVE.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_203c_0), 0, 8252 }, /* MOVE.L #.L,Dn */ -{ CPUFUNC_FF(op_2040_0), 0, 8256 }, /* MOVEA.L Dn,An */ -{ CPUFUNC_FF(op_2048_0), 0, 8264 }, /* MOVEA.L An,An */ -{ CPUFUNC_FF(op_2050_0), 0, 8272 }, /* MOVEA.L (An),An */ -{ CPUFUNC_FF(op_2058_0), 0, 8280 }, /* MOVEA.L (An)+,An */ -{ CPUFUNC_FF(op_2060_0), 0, 8288 }, /* MOVEA.L -(An),An */ -{ CPUFUNC_FF(op_2068_0), 0, 8296 }, /* MOVEA.L (d16,An),An */ -{ CPUFUNC_FF(op_2070_3), 0, 8304 }, /* MOVEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_2078_0), 0, 8312 }, /* MOVEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_2079_0), 0, 8313 }, /* MOVEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_207a_0), 0, 8314 }, /* MOVEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_207b_3), 0, 8315 }, /* MOVEA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_207c_0), 0, 8316 }, /* MOVEA.L #.L,An */ -{ CPUFUNC(op_2080_0), 0, 8320 }, /* MOVE.L Dn,(An) */ -{ CPUFUNC(op_2088_0), 0, 8328 }, /* MOVE.L An,(An) */ -{ CPUFUNC(op_2090_0), 0, 8336 }, /* MOVE.L (An),(An) */ -{ CPUFUNC(op_2098_0), 0, 8344 }, /* MOVE.L (An)+,(An) */ -{ CPUFUNC(op_20a0_0), 0, 8352 }, /* MOVE.L -(An),(An) */ -{ CPUFUNC(op_20a8_0), 0, 8360 }, /* MOVE.L (d16,An),(An) */ -{ CPUFUNC(op_20b0_3), 0, 8368 }, /* MOVE.L (d8,An,Xn),(An) */ -{ CPUFUNC(op_20b8_0), 0, 8376 }, /* MOVE.L (xxx).W,(An) */ -{ CPUFUNC(op_20b9_0), 0, 8377 }, /* MOVE.L (xxx).L,(An) */ -{ CPUFUNC(op_20ba_0), 0, 8378 }, /* MOVE.L (d16,PC),(An) */ -{ CPUFUNC(op_20bb_3), 0, 8379 }, /* MOVE.L (d8,PC,Xn),(An) */ -{ CPUFUNC(op_20bc_0), 0, 8380 }, /* MOVE.L #.L,(An) */ -{ CPUFUNC(op_20c0_0), 0, 8384 }, /* MOVE.L Dn,(An)+ */ -{ CPUFUNC(op_20c8_0), 0, 8392 }, /* MOVE.L An,(An)+ */ -{ CPUFUNC(op_20d0_0), 0, 8400 }, /* MOVE.L (An),(An)+ */ -{ CPUFUNC(op_20d8_0), 0, 8408 }, /* MOVE.L (An)+,(An)+ */ -{ CPUFUNC(op_20e0_0), 0, 8416 }, /* MOVE.L -(An),(An)+ */ -{ CPUFUNC(op_20e8_0), 0, 8424 }, /* MOVE.L (d16,An),(An)+ */ -{ CPUFUNC(op_20f0_3), 0, 8432 }, /* MOVE.L (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_20f8_0), 0, 8440 }, /* MOVE.L (xxx).W,(An)+ */ -{ CPUFUNC(op_20f9_0), 0, 8441 }, /* MOVE.L (xxx).L,(An)+ */ -{ CPUFUNC(op_20fa_0), 0, 8442 }, /* MOVE.L (d16,PC),(An)+ */ -{ CPUFUNC(op_20fb_3), 0, 8443 }, /* MOVE.L (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_20fc_0), 0, 8444 }, /* MOVE.L #.L,(An)+ */ -{ CPUFUNC(op_2100_0), 0, 8448 }, /* MOVE.L Dn,-(An) */ -{ CPUFUNC(op_2108_0), 0, 8456 }, /* MOVE.L An,-(An) */ -{ CPUFUNC(op_2110_0), 0, 8464 }, /* MOVE.L (An),-(An) */ -{ CPUFUNC(op_2118_0), 0, 8472 }, /* MOVE.L (An)+,-(An) */ -{ CPUFUNC(op_2120_0), 0, 8480 }, /* MOVE.L -(An),-(An) */ -{ CPUFUNC(op_2128_0), 0, 8488 }, /* MOVE.L (d16,An),-(An) */ -{ CPUFUNC(op_2130_3), 0, 8496 }, /* MOVE.L (d8,An,Xn),-(An) */ -{ CPUFUNC(op_2138_0), 0, 8504 }, /* MOVE.L (xxx).W,-(An) */ -{ CPUFUNC(op_2139_0), 0, 8505 }, /* MOVE.L (xxx).L,-(An) */ -{ CPUFUNC(op_213a_0), 0, 8506 }, /* MOVE.L (d16,PC),-(An) */ -{ CPUFUNC(op_213b_3), 0, 8507 }, /* MOVE.L (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_213c_0), 0, 8508 }, /* MOVE.L #.L,-(An) */ -{ CPUFUNC(op_2140_0), 0, 8512 }, /* MOVE.L Dn,(d16,An) */ -{ CPUFUNC(op_2148_0), 0, 8520 }, /* MOVE.L An,(d16,An) */ -{ CPUFUNC(op_2150_0), 0, 8528 }, /* MOVE.L (An),(d16,An) */ -{ CPUFUNC(op_2158_0), 0, 8536 }, /* MOVE.L (An)+,(d16,An) */ -{ CPUFUNC(op_2160_0), 0, 8544 }, /* MOVE.L -(An),(d16,An) */ -{ CPUFUNC(op_2168_0), 0, 8552 }, /* MOVE.L (d16,An),(d16,An) */ -{ CPUFUNC(op_2170_3), 0, 8560 }, /* MOVE.L (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_2178_0), 0, 8568 }, /* MOVE.L (xxx).W,(d16,An) */ -{ CPUFUNC(op_2179_0), 0, 8569 }, /* MOVE.L (xxx).L,(d16,An) */ -{ CPUFUNC(op_217a_0), 0, 8570 }, /* MOVE.L (d16,PC),(d16,An) */ -{ CPUFUNC(op_217b_3), 0, 8571 }, /* MOVE.L (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_217c_0), 0, 8572 }, /* MOVE.L #.L,(d16,An) */ -{ CPUFUNC(op_2180_3), 0, 8576 }, /* MOVE.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_2188_3), 0, 8584 }, /* MOVE.L An,(d8,An,Xn) */ -{ CPUFUNC(op_2190_3), 0, 8592 }, /* MOVE.L (An),(d8,An,Xn) */ -{ CPUFUNC(op_2198_3), 0, 8600 }, /* MOVE.L (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_21a0_3), 0, 8608 }, /* MOVE.L -(An),(d8,An,Xn) */ -{ CPUFUNC(op_21a8_3), 0, 8616 }, /* MOVE.L (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_21b0_3), 0, 8624 }, /* MOVE.L (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21b8_3), 0, 8632 }, /* MOVE.L (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_21b9_3), 0, 8633 }, /* MOVE.L (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_21ba_3), 0, 8634 }, /* MOVE.L (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_21bb_3), 0, 8635 }, /* MOVE.L (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_21bc_3), 0, 8636 }, /* MOVE.L #.L,(d8,An,Xn) */ -{ CPUFUNC(op_21c0_0), 0, 8640 }, /* MOVE.L Dn,(xxx).W */ -{ CPUFUNC(op_21c8_0), 0, 8648 }, /* MOVE.L An,(xxx).W */ -{ CPUFUNC(op_21d0_0), 0, 8656 }, /* MOVE.L (An),(xxx).W */ -{ CPUFUNC(op_21d8_0), 0, 8664 }, /* MOVE.L (An)+,(xxx).W */ -{ CPUFUNC(op_21e0_0), 0, 8672 }, /* MOVE.L -(An),(xxx).W */ -{ CPUFUNC(op_21e8_0), 0, 8680 }, /* MOVE.L (d16,An),(xxx).W */ -{ CPUFUNC(op_21f0_3), 0, 8688 }, /* MOVE.L (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_21f8_0), 0, 8696 }, /* MOVE.L (xxx).W,(xxx).W */ -{ CPUFUNC(op_21f9_0), 0, 8697 }, /* MOVE.L (xxx).L,(xxx).W */ -{ CPUFUNC(op_21fa_0), 0, 8698 }, /* MOVE.L (d16,PC),(xxx).W */ -{ CPUFUNC(op_21fb_3), 0, 8699 }, /* MOVE.L (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_21fc_0), 0, 8700 }, /* MOVE.L #.L,(xxx).W */ -{ CPUFUNC(op_23c0_0), 0, 9152 }, /* MOVE.L Dn,(xxx).L */ -{ CPUFUNC(op_23c8_0), 0, 9160 }, /* MOVE.L An,(xxx).L */ -{ CPUFUNC(op_23d0_0), 0, 9168 }, /* MOVE.L (An),(xxx).L */ -{ CPUFUNC(op_23d8_0), 0, 9176 }, /* MOVE.L (An)+,(xxx).L */ -{ CPUFUNC(op_23e0_0), 0, 9184 }, /* MOVE.L -(An),(xxx).L */ -{ CPUFUNC(op_23e8_0), 0, 9192 }, /* MOVE.L (d16,An),(xxx).L */ -{ CPUFUNC(op_23f0_3), 0, 9200 }, /* MOVE.L (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_23f8_0), 0, 9208 }, /* MOVE.L (xxx).W,(xxx).L */ -{ CPUFUNC(op_23f9_0), 0, 9209 }, /* MOVE.L (xxx).L,(xxx).L */ -{ CPUFUNC(op_23fa_0), 0, 9210 }, /* MOVE.L (d16,PC),(xxx).L */ -{ CPUFUNC(op_23fb_3), 0, 9211 }, /* MOVE.L (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_23fc_0), 0, 9212 }, /* MOVE.L #.L,(xxx).L */ -{ CPUFUNC(op_3000_0), 0, 12288 }, /* MOVE.W Dn,Dn */ -{ CPUFUNC(op_3008_0), 0, 12296 }, /* MOVE.W An,Dn */ -{ CPUFUNC(op_3010_0), 0, 12304 }, /* MOVE.W (An),Dn */ -{ CPUFUNC(op_3018_0), 0, 12312 }, /* MOVE.W (An)+,Dn */ -{ CPUFUNC(op_3020_0), 0, 12320 }, /* MOVE.W -(An),Dn */ -{ CPUFUNC(op_3028_0), 0, 12328 }, /* MOVE.W (d16,An),Dn */ -{ CPUFUNC(op_3030_3), 0, 12336 }, /* MOVE.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_3038_0), 0, 12344 }, /* MOVE.W (xxx).W,Dn */ -{ CPUFUNC(op_3039_0), 0, 12345 }, /* MOVE.W (xxx).L,Dn */ -{ CPUFUNC(op_303a_0), 0, 12346 }, /* MOVE.W (d16,PC),Dn */ -{ CPUFUNC(op_303b_3), 0, 12347 }, /* MOVE.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_303c_0), 0, 12348 }, /* MOVE.W #.W,Dn */ -{ CPUFUNC_FF(op_3040_0), 0, 12352 }, /* MOVEA.W Dn,An */ -{ CPUFUNC_FF(op_3048_0), 0, 12360 }, /* MOVEA.W An,An */ -{ CPUFUNC_FF(op_3050_0), 0, 12368 }, /* MOVEA.W (An),An */ -{ CPUFUNC_FF(op_3058_0), 0, 12376 }, /* MOVEA.W (An)+,An */ -{ CPUFUNC_FF(op_3060_0), 0, 12384 }, /* MOVEA.W -(An),An */ -{ CPUFUNC_FF(op_3068_0), 0, 12392 }, /* MOVEA.W (d16,An),An */ -{ CPUFUNC_FF(op_3070_3), 0, 12400 }, /* MOVEA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_3078_0), 0, 12408 }, /* MOVEA.W (xxx).W,An */ -{ CPUFUNC_FF(op_3079_0), 0, 12409 }, /* MOVEA.W (xxx).L,An */ -{ CPUFUNC_FF(op_307a_0), 0, 12410 }, /* MOVEA.W (d16,PC),An */ -{ CPUFUNC_FF(op_307b_3), 0, 12411 }, /* MOVEA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_307c_0), 0, 12412 }, /* MOVEA.W #.W,An */ -{ CPUFUNC(op_3080_0), 0, 12416 }, /* MOVE.W Dn,(An) */ -{ CPUFUNC(op_3088_0), 0, 12424 }, /* MOVE.W An,(An) */ -{ CPUFUNC(op_3090_0), 0, 12432 }, /* MOVE.W (An),(An) */ -{ CPUFUNC(op_3098_0), 0, 12440 }, /* MOVE.W (An)+,(An) */ -{ CPUFUNC(op_30a0_0), 0, 12448 }, /* MOVE.W -(An),(An) */ -{ CPUFUNC(op_30a8_0), 0, 12456 }, /* MOVE.W (d16,An),(An) */ -{ CPUFUNC(op_30b0_3), 0, 12464 }, /* MOVE.W (d8,An,Xn),(An) */ -{ CPUFUNC(op_30b8_0), 0, 12472 }, /* MOVE.W (xxx).W,(An) */ -{ CPUFUNC(op_30b9_0), 0, 12473 }, /* MOVE.W (xxx).L,(An) */ -{ CPUFUNC(op_30ba_0), 0, 12474 }, /* MOVE.W (d16,PC),(An) */ -{ CPUFUNC(op_30bb_3), 0, 12475 }, /* MOVE.W (d8,PC,Xn),(An) */ -{ CPUFUNC(op_30bc_0), 0, 12476 }, /* MOVE.W #.W,(An) */ -{ CPUFUNC(op_30c0_0), 0, 12480 }, /* MOVE.W Dn,(An)+ */ -{ CPUFUNC(op_30c8_0), 0, 12488 }, /* MOVE.W An,(An)+ */ -{ CPUFUNC(op_30d0_0), 0, 12496 }, /* MOVE.W (An),(An)+ */ -{ CPUFUNC(op_30d8_0), 0, 12504 }, /* MOVE.W (An)+,(An)+ */ -{ CPUFUNC(op_30e0_0), 0, 12512 }, /* MOVE.W -(An),(An)+ */ -{ CPUFUNC(op_30e8_0), 0, 12520 }, /* MOVE.W (d16,An),(An)+ */ -{ CPUFUNC(op_30f0_3), 0, 12528 }, /* MOVE.W (d8,An,Xn),(An)+ */ -{ CPUFUNC(op_30f8_0), 0, 12536 }, /* MOVE.W (xxx).W,(An)+ */ -{ CPUFUNC(op_30f9_0), 0, 12537 }, /* MOVE.W (xxx).L,(An)+ */ -{ CPUFUNC(op_30fa_0), 0, 12538 }, /* MOVE.W (d16,PC),(An)+ */ -{ CPUFUNC(op_30fb_3), 0, 12539 }, /* MOVE.W (d8,PC,Xn),(An)+ */ -{ CPUFUNC(op_30fc_0), 0, 12540 }, /* MOVE.W #.W,(An)+ */ -{ CPUFUNC(op_3100_0), 0, 12544 }, /* MOVE.W Dn,-(An) */ -{ CPUFUNC(op_3108_0), 0, 12552 }, /* MOVE.W An,-(An) */ -{ CPUFUNC(op_3110_0), 0, 12560 }, /* MOVE.W (An),-(An) */ -{ CPUFUNC(op_3118_0), 0, 12568 }, /* MOVE.W (An)+,-(An) */ -{ CPUFUNC(op_3120_0), 0, 12576 }, /* MOVE.W -(An),-(An) */ -{ CPUFUNC(op_3128_0), 0, 12584 }, /* MOVE.W (d16,An),-(An) */ -{ CPUFUNC(op_3130_3), 0, 12592 }, /* MOVE.W (d8,An,Xn),-(An) */ -{ CPUFUNC(op_3138_0), 0, 12600 }, /* MOVE.W (xxx).W,-(An) */ -{ CPUFUNC(op_3139_0), 0, 12601 }, /* MOVE.W (xxx).L,-(An) */ -{ CPUFUNC(op_313a_0), 0, 12602 }, /* MOVE.W (d16,PC),-(An) */ -{ CPUFUNC(op_313b_3), 0, 12603 }, /* MOVE.W (d8,PC,Xn),-(An) */ -{ CPUFUNC(op_313c_0), 0, 12604 }, /* MOVE.W #.W,-(An) */ -{ CPUFUNC(op_3140_0), 0, 12608 }, /* MOVE.W Dn,(d16,An) */ -{ CPUFUNC(op_3148_0), 0, 12616 }, /* MOVE.W An,(d16,An) */ -{ CPUFUNC(op_3150_0), 0, 12624 }, /* MOVE.W (An),(d16,An) */ -{ CPUFUNC(op_3158_0), 0, 12632 }, /* MOVE.W (An)+,(d16,An) */ -{ CPUFUNC(op_3160_0), 0, 12640 }, /* MOVE.W -(An),(d16,An) */ -{ CPUFUNC(op_3168_0), 0, 12648 }, /* MOVE.W (d16,An),(d16,An) */ -{ CPUFUNC(op_3170_3), 0, 12656 }, /* MOVE.W (d8,An,Xn),(d16,An) */ -{ CPUFUNC(op_3178_0), 0, 12664 }, /* MOVE.W (xxx).W,(d16,An) */ -{ CPUFUNC(op_3179_0), 0, 12665 }, /* MOVE.W (xxx).L,(d16,An) */ -{ CPUFUNC(op_317a_0), 0, 12666 }, /* MOVE.W (d16,PC),(d16,An) */ -{ CPUFUNC(op_317b_3), 0, 12667 }, /* MOVE.W (d8,PC,Xn),(d16,An) */ -{ CPUFUNC(op_317c_0), 0, 12668 }, /* MOVE.W #.W,(d16,An) */ -{ CPUFUNC(op_3180_3), 0, 12672 }, /* MOVE.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_3188_3), 0, 12680 }, /* MOVE.W An,(d8,An,Xn) */ -{ CPUFUNC(op_3190_3), 0, 12688 }, /* MOVE.W (An),(d8,An,Xn) */ -{ CPUFUNC(op_3198_3), 0, 12696 }, /* MOVE.W (An)+,(d8,An,Xn) */ -{ CPUFUNC(op_31a0_3), 0, 12704 }, /* MOVE.W -(An),(d8,An,Xn) */ -{ CPUFUNC(op_31a8_3), 0, 12712 }, /* MOVE.W (d16,An),(d8,An,Xn) */ -{ CPUFUNC(op_31b0_3), 0, 12720 }, /* MOVE.W (d8,An,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31b8_3), 0, 12728 }, /* MOVE.W (xxx).W,(d8,An,Xn) */ -{ CPUFUNC(op_31b9_3), 0, 12729 }, /* MOVE.W (xxx).L,(d8,An,Xn) */ -{ CPUFUNC(op_31ba_3), 0, 12730 }, /* MOVE.W (d16,PC),(d8,An,Xn) */ -{ CPUFUNC(op_31bb_3), 0, 12731 }, /* MOVE.W (d8,PC,Xn),(d8,An,Xn) */ -{ CPUFUNC(op_31bc_3), 0, 12732 }, /* MOVE.W #.W,(d8,An,Xn) */ -{ CPUFUNC(op_31c0_0), 0, 12736 }, /* MOVE.W Dn,(xxx).W */ -{ CPUFUNC(op_31c8_0), 0, 12744 }, /* MOVE.W An,(xxx).W */ -{ CPUFUNC(op_31d0_0), 0, 12752 }, /* MOVE.W (An),(xxx).W */ -{ CPUFUNC(op_31d8_0), 0, 12760 }, /* MOVE.W (An)+,(xxx).W */ -{ CPUFUNC(op_31e0_0), 0, 12768 }, /* MOVE.W -(An),(xxx).W */ -{ CPUFUNC(op_31e8_0), 0, 12776 }, /* MOVE.W (d16,An),(xxx).W */ -{ CPUFUNC(op_31f0_3), 0, 12784 }, /* MOVE.W (d8,An,Xn),(xxx).W */ -{ CPUFUNC(op_31f8_0), 0, 12792 }, /* MOVE.W (xxx).W,(xxx).W */ -{ CPUFUNC(op_31f9_0), 0, 12793 }, /* MOVE.W (xxx).L,(xxx).W */ -{ CPUFUNC(op_31fa_0), 0, 12794 }, /* MOVE.W (d16,PC),(xxx).W */ -{ CPUFUNC(op_31fb_3), 0, 12795 }, /* MOVE.W (d8,PC,Xn),(xxx).W */ -{ CPUFUNC(op_31fc_0), 0, 12796 }, /* MOVE.W #.W,(xxx).W */ -{ CPUFUNC(op_33c0_0), 0, 13248 }, /* MOVE.W Dn,(xxx).L */ -{ CPUFUNC(op_33c8_0), 0, 13256 }, /* MOVE.W An,(xxx).L */ -{ CPUFUNC(op_33d0_0), 0, 13264 }, /* MOVE.W (An),(xxx).L */ -{ CPUFUNC(op_33d8_0), 0, 13272 }, /* MOVE.W (An)+,(xxx).L */ -{ CPUFUNC(op_33e0_0), 0, 13280 }, /* MOVE.W -(An),(xxx).L */ -{ CPUFUNC(op_33e8_0), 0, 13288 }, /* MOVE.W (d16,An),(xxx).L */ -{ CPUFUNC(op_33f0_3), 0, 13296 }, /* MOVE.W (d8,An,Xn),(xxx).L */ -{ CPUFUNC(op_33f8_0), 0, 13304 }, /* MOVE.W (xxx).W,(xxx).L */ -{ CPUFUNC(op_33f9_0), 0, 13305 }, /* MOVE.W (xxx).L,(xxx).L */ -{ CPUFUNC(op_33fa_0), 0, 13306 }, /* MOVE.W (d16,PC),(xxx).L */ -{ CPUFUNC(op_33fb_3), 0, 13307 }, /* MOVE.W (d8,PC,Xn),(xxx).L */ -{ CPUFUNC(op_33fc_0), 0, 13308 }, /* MOVE.W #.W,(xxx).L */ -{ CPUFUNC(op_4000_0), 0, 16384 }, /* NEGX.B Dn */ -{ CPUFUNC(op_4010_0), 0, 16400 }, /* NEGX.B (An) */ -{ CPUFUNC(op_4018_0), 0, 16408 }, /* NEGX.B (An)+ */ -{ CPUFUNC(op_4020_0), 0, 16416 }, /* NEGX.B -(An) */ -{ CPUFUNC(op_4028_0), 0, 16424 }, /* NEGX.B (d16,An) */ -{ CPUFUNC(op_4030_3), 0, 16432 }, /* NEGX.B (d8,An,Xn) */ -{ CPUFUNC(op_4038_0), 0, 16440 }, /* NEGX.B (xxx).W */ -{ CPUFUNC(op_4039_0), 0, 16441 }, /* NEGX.B (xxx).L */ -{ CPUFUNC(op_4040_0), 0, 16448 }, /* NEGX.W Dn */ -{ CPUFUNC(op_4050_0), 0, 16464 }, /* NEGX.W (An) */ -{ CPUFUNC(op_4058_0), 0, 16472 }, /* NEGX.W (An)+ */ -{ CPUFUNC(op_4060_0), 0, 16480 }, /* NEGX.W -(An) */ -{ CPUFUNC(op_4068_0), 0, 16488 }, /* NEGX.W (d16,An) */ -{ CPUFUNC(op_4070_3), 0, 16496 }, /* NEGX.W (d8,An,Xn) */ -{ CPUFUNC(op_4078_0), 0, 16504 }, /* NEGX.W (xxx).W */ -{ CPUFUNC(op_4079_0), 0, 16505 }, /* NEGX.W (xxx).L */ -{ CPUFUNC(op_4080_0), 0, 16512 }, /* NEGX.L Dn */ -{ CPUFUNC(op_4090_0), 0, 16528 }, /* NEGX.L (An) */ -{ CPUFUNC(op_4098_0), 0, 16536 }, /* NEGX.L (An)+ */ -{ CPUFUNC(op_40a0_0), 0, 16544 }, /* NEGX.L -(An) */ -{ CPUFUNC(op_40a8_0), 0, 16552 }, /* NEGX.L (d16,An) */ -{ CPUFUNC(op_40b0_3), 0, 16560 }, /* NEGX.L (d8,An,Xn) */ -{ CPUFUNC(op_40b8_0), 0, 16568 }, /* NEGX.L (xxx).W */ -{ CPUFUNC(op_40b9_0), 0, 16569 }, /* NEGX.L (xxx).L */ -{ CPUFUNC_FF(op_40c0_4), 0, 16576 }, /* MVSR2.W Dn */ -{ CPUFUNC_FF(op_40d0_4), 0, 16592 }, /* MVSR2.W (An) */ -{ CPUFUNC_FF(op_40d8_4), 0, 16600 }, /* MVSR2.W (An)+ */ -{ CPUFUNC_FF(op_40e0_4), 0, 16608 }, /* MVSR2.W -(An) */ -{ CPUFUNC_FF(op_40e8_4), 0, 16616 }, /* MVSR2.W (d16,An) */ -{ CPUFUNC_FF(op_40f0_4), 0, 16624 }, /* MVSR2.W (d8,An,Xn) */ -{ CPUFUNC_FF(op_40f8_4), 0, 16632 }, /* MVSR2.W (xxx).W */ -{ CPUFUNC_FF(op_40f9_4), 0, 16633 }, /* MVSR2.W (xxx).L */ -{ CPUFUNC(op_4100_0), 0, 16640 }, /* CHK.L Dn,Dn */ -{ CPUFUNC(op_4110_0), 0, 16656 }, /* CHK.L (An),Dn */ -{ CPUFUNC(op_4118_0), 0, 16664 }, /* CHK.L (An)+,Dn */ -{ CPUFUNC(op_4120_0), 0, 16672 }, /* CHK.L -(An),Dn */ -{ CPUFUNC(op_4128_0), 0, 16680 }, /* CHK.L (d16,An),Dn */ -{ CPUFUNC(op_4130_3), 0, 16688 }, /* CHK.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_4138_0), 0, 16696 }, /* CHK.L (xxx).W,Dn */ -{ CPUFUNC(op_4139_0), 0, 16697 }, /* CHK.L (xxx).L,Dn */ -{ CPUFUNC(op_413a_0), 0, 16698 }, /* CHK.L (d16,PC),Dn */ -{ CPUFUNC(op_413b_3), 0, 16699 }, /* CHK.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_413c_0), 0, 16700 }, /* CHK.L #.L,Dn */ -{ CPUFUNC(op_4180_0), 0, 16768 }, /* CHK.W Dn,Dn */ -{ CPUFUNC(op_4190_0), 0, 16784 }, /* CHK.W (An),Dn */ -{ CPUFUNC(op_4198_0), 0, 16792 }, /* CHK.W (An)+,Dn */ -{ CPUFUNC(op_41a0_0), 0, 16800 }, /* CHK.W -(An),Dn */ -{ CPUFUNC(op_41a8_0), 0, 16808 }, /* CHK.W (d16,An),Dn */ -{ CPUFUNC(op_41b0_3), 0, 16816 }, /* CHK.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_41b8_0), 0, 16824 }, /* CHK.W (xxx).W,Dn */ -{ CPUFUNC(op_41b9_0), 0, 16825 }, /* CHK.W (xxx).L,Dn */ -{ CPUFUNC(op_41ba_0), 0, 16826 }, /* CHK.W (d16,PC),Dn */ -{ CPUFUNC(op_41bb_3), 0, 16827 }, /* CHK.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_41bc_0), 0, 16828 }, /* CHK.W #.W,Dn */ -{ CPUFUNC_FF(op_41d0_0), 0, 16848 }, /* LEA.L (An),An */ -{ CPUFUNC_FF(op_41e8_0), 0, 16872 }, /* LEA.L (d16,An),An */ -{ CPUFUNC_FF(op_41f0_3), 0, 16880 }, /* LEA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_41f8_0), 0, 16888 }, /* LEA.L (xxx).W,An */ -{ CPUFUNC_FF(op_41f9_0), 0, 16889 }, /* LEA.L (xxx).L,An */ -{ CPUFUNC_FF(op_41fa_0), 0, 16890 }, /* LEA.L (d16,PC),An */ -{ CPUFUNC_FF(op_41fb_3), 0, 16891 }, /* LEA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_4200_0), 0, 16896 }, /* CLR.B Dn */ -{ CPUFUNC(op_4210_0), 0, 16912 }, /* CLR.B (An) */ -{ CPUFUNC(op_4218_0), 0, 16920 }, /* CLR.B (An)+ */ -{ CPUFUNC(op_4220_0), 0, 16928 }, /* CLR.B -(An) */ -{ CPUFUNC(op_4228_0), 0, 16936 }, /* CLR.B (d16,An) */ -{ CPUFUNC(op_4230_3), 0, 16944 }, /* CLR.B (d8,An,Xn) */ -{ CPUFUNC(op_4238_0), 0, 16952 }, /* CLR.B (xxx).W */ -{ CPUFUNC(op_4239_0), 0, 16953 }, /* CLR.B (xxx).L */ -{ CPUFUNC(op_4240_0), 0, 16960 }, /* CLR.W Dn */ -{ CPUFUNC(op_4250_0), 0, 16976 }, /* CLR.W (An) */ -{ CPUFUNC(op_4258_0), 0, 16984 }, /* CLR.W (An)+ */ -{ CPUFUNC(op_4260_0), 0, 16992 }, /* CLR.W -(An) */ -{ CPUFUNC(op_4268_0), 0, 17000 }, /* CLR.W (d16,An) */ -{ CPUFUNC(op_4270_3), 0, 17008 }, /* CLR.W (d8,An,Xn) */ -{ CPUFUNC(op_4278_0), 0, 17016 }, /* CLR.W (xxx).W */ -{ CPUFUNC(op_4279_0), 0, 17017 }, /* CLR.W (xxx).L */ -{ CPUFUNC(op_4280_0), 0, 17024 }, /* CLR.L Dn */ -{ CPUFUNC(op_4290_0), 0, 17040 }, /* CLR.L (An) */ -{ CPUFUNC(op_4298_0), 0, 17048 }, /* CLR.L (An)+ */ -{ CPUFUNC(op_42a0_0), 0, 17056 }, /* CLR.L -(An) */ -{ CPUFUNC(op_42a8_0), 0, 17064 }, /* CLR.L (d16,An) */ -{ CPUFUNC(op_42b0_3), 0, 17072 }, /* CLR.L (d8,An,Xn) */ -{ CPUFUNC(op_42b8_0), 0, 17080 }, /* CLR.L (xxx).W */ -{ CPUFUNC(op_42b9_0), 0, 17081 }, /* CLR.L (xxx).L */ -{ CPUFUNC(op_4400_0), 0, 17408 }, /* NEG.B Dn */ -{ CPUFUNC(op_4410_0), 0, 17424 }, /* NEG.B (An) */ -{ CPUFUNC(op_4418_0), 0, 17432 }, /* NEG.B (An)+ */ -{ CPUFUNC(op_4420_0), 0, 17440 }, /* NEG.B -(An) */ -{ CPUFUNC(op_4428_0), 0, 17448 }, /* NEG.B (d16,An) */ -{ CPUFUNC(op_4430_3), 0, 17456 }, /* NEG.B (d8,An,Xn) */ -{ CPUFUNC(op_4438_0), 0, 17464 }, /* NEG.B (xxx).W */ -{ CPUFUNC(op_4439_0), 0, 17465 }, /* NEG.B (xxx).L */ -{ CPUFUNC(op_4440_0), 0, 17472 }, /* NEG.W Dn */ -{ CPUFUNC(op_4450_0), 0, 17488 }, /* NEG.W (An) */ -{ CPUFUNC(op_4458_0), 0, 17496 }, /* NEG.W (An)+ */ -{ CPUFUNC(op_4460_0), 0, 17504 }, /* NEG.W -(An) */ -{ CPUFUNC(op_4468_0), 0, 17512 }, /* NEG.W (d16,An) */ -{ CPUFUNC(op_4470_3), 0, 17520 }, /* NEG.W (d8,An,Xn) */ -{ CPUFUNC(op_4478_0), 0, 17528 }, /* NEG.W (xxx).W */ -{ CPUFUNC(op_4479_0), 0, 17529 }, /* NEG.W (xxx).L */ -{ CPUFUNC(op_4480_0), 0, 17536 }, /* NEG.L Dn */ -{ CPUFUNC(op_4490_0), 0, 17552 }, /* NEG.L (An) */ -{ CPUFUNC(op_4498_0), 0, 17560 }, /* NEG.L (An)+ */ -{ CPUFUNC(op_44a0_0), 0, 17568 }, /* NEG.L -(An) */ -{ CPUFUNC(op_44a8_0), 0, 17576 }, /* NEG.L (d16,An) */ -{ CPUFUNC(op_44b0_3), 0, 17584 }, /* NEG.L (d8,An,Xn) */ -{ CPUFUNC(op_44b8_0), 0, 17592 }, /* NEG.L (xxx).W */ -{ CPUFUNC(op_44b9_0), 0, 17593 }, /* NEG.L (xxx).L */ -{ CPUFUNC(op_44c0_0), 0, 17600 }, /* MV2SR.B Dn */ -{ CPUFUNC(op_44d0_0), 0, 17616 }, /* MV2SR.B (An) */ -{ CPUFUNC(op_44d8_0), 0, 17624 }, /* MV2SR.B (An)+ */ -{ CPUFUNC(op_44e0_0), 0, 17632 }, /* MV2SR.B -(An) */ -{ CPUFUNC(op_44e8_0), 0, 17640 }, /* MV2SR.B (d16,An) */ -{ CPUFUNC(op_44f0_3), 0, 17648 }, /* MV2SR.B (d8,An,Xn) */ -{ CPUFUNC(op_44f8_0), 0, 17656 }, /* MV2SR.B (xxx).W */ -{ CPUFUNC(op_44f9_0), 0, 17657 }, /* MV2SR.B (xxx).L */ -{ CPUFUNC(op_44fa_0), 0, 17658 }, /* MV2SR.B (d16,PC) */ -{ CPUFUNC(op_44fb_3), 0, 17659 }, /* MV2SR.B (d8,PC,Xn) */ -{ CPUFUNC(op_44fc_0), 0, 17660 }, /* MV2SR.B #.B */ -{ CPUFUNC(op_4600_0), 0, 17920 }, /* NOT.B Dn */ -{ CPUFUNC(op_4610_0), 0, 17936 }, /* NOT.B (An) */ -{ CPUFUNC(op_4618_0), 0, 17944 }, /* NOT.B (An)+ */ -{ CPUFUNC(op_4620_0), 0, 17952 }, /* NOT.B -(An) */ -{ CPUFUNC(op_4628_0), 0, 17960 }, /* NOT.B (d16,An) */ -{ CPUFUNC(op_4630_3), 0, 17968 }, /* NOT.B (d8,An,Xn) */ -{ CPUFUNC(op_4638_0), 0, 17976 }, /* NOT.B (xxx).W */ -{ CPUFUNC(op_4639_0), 0, 17977 }, /* NOT.B (xxx).L */ -{ CPUFUNC(op_4640_0), 0, 17984 }, /* NOT.W Dn */ -{ CPUFUNC(op_4650_0), 0, 18000 }, /* NOT.W (An) */ -{ CPUFUNC(op_4658_0), 0, 18008 }, /* NOT.W (An)+ */ -{ CPUFUNC(op_4660_0), 0, 18016 }, /* NOT.W -(An) */ -{ CPUFUNC(op_4668_0), 0, 18024 }, /* NOT.W (d16,An) */ -{ CPUFUNC(op_4670_3), 0, 18032 }, /* NOT.W (d8,An,Xn) */ -{ CPUFUNC(op_4678_0), 0, 18040 }, /* NOT.W (xxx).W */ -{ CPUFUNC(op_4679_0), 0, 18041 }, /* NOT.W (xxx).L */ -{ CPUFUNC(op_4680_0), 0, 18048 }, /* NOT.L Dn */ -{ CPUFUNC(op_4690_0), 0, 18064 }, /* NOT.L (An) */ -{ CPUFUNC(op_4698_0), 0, 18072 }, /* NOT.L (An)+ */ -{ CPUFUNC(op_46a0_0), 0, 18080 }, /* NOT.L -(An) */ -{ CPUFUNC(op_46a8_0), 0, 18088 }, /* NOT.L (d16,An) */ -{ CPUFUNC(op_46b0_3), 0, 18096 }, /* NOT.L (d8,An,Xn) */ -{ CPUFUNC(op_46b8_0), 0, 18104 }, /* NOT.L (xxx).W */ -{ CPUFUNC(op_46b9_0), 0, 18105 }, /* NOT.L (xxx).L */ -{ CPUFUNC(op_46c0_0), 0, 18112 }, /* MV2SR.W Dn */ -{ CPUFUNC(op_46d0_0), 0, 18128 }, /* MV2SR.W (An) */ -{ CPUFUNC(op_46d8_0), 0, 18136 }, /* MV2SR.W (An)+ */ -{ CPUFUNC(op_46e0_0), 0, 18144 }, /* MV2SR.W -(An) */ -{ CPUFUNC(op_46e8_0), 0, 18152 }, /* MV2SR.W (d16,An) */ -{ CPUFUNC(op_46f0_3), 0, 18160 }, /* MV2SR.W (d8,An,Xn) */ -{ CPUFUNC(op_46f8_0), 0, 18168 }, /* MV2SR.W (xxx).W */ -{ CPUFUNC(op_46f9_0), 0, 18169 }, /* MV2SR.W (xxx).L */ -{ CPUFUNC(op_46fa_0), 0, 18170 }, /* MV2SR.W (d16,PC) */ -{ CPUFUNC(op_46fb_3), 0, 18171 }, /* MV2SR.W (d8,PC,Xn) */ -{ CPUFUNC(op_46fc_0), 0, 18172 }, /* MV2SR.W #.W */ -{ CPUFUNC(op_4800_1), 0, 18432 }, /* NBCD.B Dn */ -{ CPUFUNC(op_4810_1), 0, 18448 }, /* NBCD.B (An) */ -{ CPUFUNC(op_4818_1), 0, 18456 }, /* NBCD.B (An)+ */ -{ CPUFUNC(op_4820_1), 0, 18464 }, /* NBCD.B -(An) */ -{ CPUFUNC(op_4828_1), 0, 18472 }, /* NBCD.B (d16,An) */ -{ CPUFUNC(op_4830_3), 0, 18480 }, /* NBCD.B (d8,An,Xn) */ -{ CPUFUNC(op_4838_1), 0, 18488 }, /* NBCD.B (xxx).W */ -{ CPUFUNC(op_4839_1), 0, 18489 }, /* NBCD.B (xxx).L */ -{ CPUFUNC(op_4840_0), 0, 18496 }, /* SWAP.W Dn */ -{ CPUFUNC_FF(op_4850_0), 0, 18512 }, /* PEA.L (An) */ -{ CPUFUNC_FF(op_4868_0), 0, 18536 }, /* PEA.L (d16,An) */ -{ CPUFUNC_FF(op_4870_3), 0, 18544 }, /* PEA.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4878_0), 0, 18552 }, /* PEA.L (xxx).W */ -{ CPUFUNC_FF(op_4879_0), 0, 18553 }, /* PEA.L (xxx).L */ -{ CPUFUNC_FF(op_487a_0), 0, 18554 }, /* PEA.L (d16,PC) */ -{ CPUFUNC_FF(op_487b_3), 0, 18555 }, /* PEA.L (d8,PC,Xn) */ -{ CPUFUNC(op_4880_0), 0, 18560 }, /* EXT.W Dn */ -{ CPUFUNC_FF(op_4890_0), 0, 18576 }, /* MVMLE.W #.W,(An) */ -{ CPUFUNC_FF(op_48a0_0), 0, 18592 }, /* MVMLE.W #.W,-(An) */ -{ CPUFUNC_FF(op_48a8_0), 0, 18600 }, /* MVMLE.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_48b0_3), 0, 18608 }, /* MVMLE.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48b8_0), 0, 18616 }, /* MVMLE.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_48b9_0), 0, 18617 }, /* MVMLE.W #.W,(xxx).L */ -{ CPUFUNC(op_48c0_0), 0, 18624 }, /* EXT.L Dn */ -{ CPUFUNC_FF(op_48d0_0), 0, 18640 }, /* MVMLE.L #.W,(An) */ -{ CPUFUNC_FF(op_48e0_0), 0, 18656 }, /* MVMLE.L #.W,-(An) */ -{ CPUFUNC_FF(op_48e8_0), 0, 18664 }, /* MVMLE.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_48f0_3), 0, 18672 }, /* MVMLE.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_48f8_0), 0, 18680 }, /* MVMLE.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_48f9_0), 0, 18681 }, /* MVMLE.L #.W,(xxx).L */ -{ CPUFUNC(op_49c0_0), 0, 18880 }, /* EXT.B Dn */ -{ CPUFUNC(op_4a00_0), 0, 18944 }, /* TST.B Dn */ -{ CPUFUNC(op_4a10_0), 0, 18960 }, /* TST.B (An) */ -{ CPUFUNC(op_4a18_0), 0, 18968 }, /* TST.B (An)+ */ -{ CPUFUNC(op_4a20_0), 0, 18976 }, /* TST.B -(An) */ -{ CPUFUNC(op_4a28_0), 0, 18984 }, /* TST.B (d16,An) */ -{ CPUFUNC(op_4a30_3), 0, 18992 }, /* TST.B (d8,An,Xn) */ -{ CPUFUNC(op_4a38_0), 0, 19000 }, /* TST.B (xxx).W */ -{ CPUFUNC(op_4a39_0), 0, 19001 }, /* TST.B (xxx).L */ -{ CPUFUNC(op_4a3a_0), 0, 19002 }, /* TST.B (d16,PC) */ -{ CPUFUNC(op_4a3b_3), 0, 19003 }, /* TST.B (d8,PC,Xn) */ -{ CPUFUNC(op_4a3c_0), 0, 19004 }, /* TST.B #.B */ -{ CPUFUNC(op_4a40_0), 0, 19008 }, /* TST.W Dn */ -{ CPUFUNC(op_4a48_0), 0, 19016 }, /* TST.W An */ -{ CPUFUNC(op_4a50_0), 0, 19024 }, /* TST.W (An) */ -{ CPUFUNC(op_4a58_0), 0, 19032 }, /* TST.W (An)+ */ -{ CPUFUNC(op_4a60_0), 0, 19040 }, /* TST.W -(An) */ -{ CPUFUNC(op_4a68_0), 0, 19048 }, /* TST.W (d16,An) */ -{ CPUFUNC(op_4a70_3), 0, 19056 }, /* TST.W (d8,An,Xn) */ -{ CPUFUNC(op_4a78_0), 0, 19064 }, /* TST.W (xxx).W */ -{ CPUFUNC(op_4a79_0), 0, 19065 }, /* TST.W (xxx).L */ -{ CPUFUNC(op_4a7a_0), 0, 19066 }, /* TST.W (d16,PC) */ -{ CPUFUNC(op_4a7b_3), 0, 19067 }, /* TST.W (d8,PC,Xn) */ -{ CPUFUNC(op_4a7c_0), 0, 19068 }, /* TST.W #.W */ -{ CPUFUNC(op_4a80_0), 0, 19072 }, /* TST.L Dn */ -{ CPUFUNC(op_4a88_0), 0, 19080 }, /* TST.L An */ -{ CPUFUNC(op_4a90_0), 0, 19088 }, /* TST.L (An) */ -{ CPUFUNC(op_4a98_0), 0, 19096 }, /* TST.L (An)+ */ -{ CPUFUNC(op_4aa0_0), 0, 19104 }, /* TST.L -(An) */ -{ CPUFUNC(op_4aa8_0), 0, 19112 }, /* TST.L (d16,An) */ -{ CPUFUNC(op_4ab0_3), 0, 19120 }, /* TST.L (d8,An,Xn) */ -{ CPUFUNC(op_4ab8_0), 0, 19128 }, /* TST.L (xxx).W */ -{ CPUFUNC(op_4ab9_0), 0, 19129 }, /* TST.L (xxx).L */ -{ CPUFUNC(op_4aba_0), 0, 19130 }, /* TST.L (d16,PC) */ -{ CPUFUNC(op_4abb_3), 0, 19131 }, /* TST.L (d8,PC,Xn) */ -{ CPUFUNC(op_4abc_0), 0, 19132 }, /* TST.L #.L */ -{ CPUFUNC(op_4ac0_0), 0, 19136 }, /* TAS.B Dn */ -{ CPUFUNC(op_4ad0_0), 0, 19152 }, /* TAS.B (An) */ -{ CPUFUNC(op_4ad8_0), 0, 19160 }, /* TAS.B (An)+ */ -{ CPUFUNC(op_4ae0_0), 0, 19168 }, /* TAS.B -(An) */ -{ CPUFUNC(op_4ae8_0), 0, 19176 }, /* TAS.B (d16,An) */ -{ CPUFUNC(op_4af0_3), 0, 19184 }, /* TAS.B (d8,An,Xn) */ -{ CPUFUNC(op_4af8_0), 0, 19192 }, /* TAS.B (xxx).W */ -{ CPUFUNC(op_4af9_0), 0, 19193 }, /* TAS.B (xxx).L */ -{ CPUFUNC_FF(op_4c90_0), 0, 19600 }, /* MVMEL.W #.W,(An) */ -{ CPUFUNC_FF(op_4c98_0), 0, 19608 }, /* MVMEL.W #.W,(An)+ */ -{ CPUFUNC_FF(op_4ca8_0), 0, 19624 }, /* MVMEL.W #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cb0_3), 0, 19632 }, /* MVMEL.W #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cb8_0), 0, 19640 }, /* MVMEL.W #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cb9_0), 0, 19641 }, /* MVMEL.W #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cba_0), 0, 19642 }, /* MVMEL.W #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cbb_3), 0, 19643 }, /* MVMEL.W #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4cd0_0), 0, 19664 }, /* MVMEL.L #.W,(An) */ -{ CPUFUNC_FF(op_4cd8_0), 0, 19672 }, /* MVMEL.L #.W,(An)+ */ -{ CPUFUNC_FF(op_4ce8_0), 0, 19688 }, /* MVMEL.L #.W,(d16,An) */ -{ CPUFUNC_FF(op_4cf0_3), 0, 19696 }, /* MVMEL.L #.W,(d8,An,Xn) */ -{ CPUFUNC_FF(op_4cf8_0), 0, 19704 }, /* MVMEL.L #.W,(xxx).W */ -{ CPUFUNC_FF(op_4cf9_0), 0, 19705 }, /* MVMEL.L #.W,(xxx).L */ -{ CPUFUNC_FF(op_4cfa_0), 0, 19706 }, /* MVMEL.L #.W,(d16,PC) */ -{ CPUFUNC_FF(op_4cfb_3), 0, 19707 }, /* MVMEL.L #.W,(d8,PC,Xn) */ -{ CPUFUNC_FF(op_4e40_0), 0, 20032 }, /* TRAP.L # */ -{ CPUFUNC_FF(op_4e50_0), 0, 20048 }, /* LINK.W An,#.W */ -{ CPUFUNC_FF(op_4e58_0), 0, 20056 }, /* UNLK.L An */ -{ CPUFUNC_FF(op_4e60_0), 0, 20064 }, /* MVR2USP.L An */ -{ CPUFUNC_FF(op_4e68_0), 0, 20072 }, /* MVUSP2R.L An */ -{ CPUFUNC_FF(op_4e70_0), 0, 20080 }, /* RESET.L */ -{ CPUFUNC_FF(op_4e71_0), 0, 20081 }, /* NOP.L */ -{ CPUFUNC(op_4e72_0), 0, 20082 }, /* STOP.L #.W */ -{ CPUFUNC(op_4e73_4), 0, 20083 }, /* RTE.L */ -{ CPUFUNC_FF(op_4e74_0), 0, 20084 }, /* RTD.L #.W */ -{ CPUFUNC_FF(op_4e75_0), 0, 20085 }, /* RTS.L */ -{ CPUFUNC_FF(op_4e76_0), 0, 20086 }, /* TRAPV.L */ -{ CPUFUNC(op_4e77_0), 0, 20087 }, /* RTR.L */ -{ CPUFUNC_FF(op_4e90_0), 0, 20112 }, /* JSR.L (An) */ -{ CPUFUNC_FF(op_4ea8_0), 0, 20136 }, /* JSR.L (d16,An) */ -{ CPUFUNC_FF(op_4eb0_3), 0, 20144 }, /* JSR.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4eb8_0), 0, 20152 }, /* JSR.L (xxx).W */ -{ CPUFUNC_FF(op_4eb9_0), 0, 20153 }, /* JSR.L (xxx).L */ -{ CPUFUNC_FF(op_4eba_0), 0, 20154 }, /* JSR.L (d16,PC) */ -{ CPUFUNC_FF(op_4ebb_3), 0, 20155 }, /* JSR.L (d8,PC,Xn) */ -{ CPUFUNC_FF(op_4ed0_0), 0, 20176 }, /* JMP.L (An) */ -{ CPUFUNC_FF(op_4ee8_0), 0, 20200 }, /* JMP.L (d16,An) */ -{ CPUFUNC_FF(op_4ef0_3), 0, 20208 }, /* JMP.L (d8,An,Xn) */ -{ CPUFUNC_FF(op_4ef8_0), 0, 20216 }, /* JMP.L (xxx).W */ -{ CPUFUNC_FF(op_4ef9_0), 0, 20217 }, /* JMP.L (xxx).L */ -{ CPUFUNC_FF(op_4efa_0), 0, 20218 }, /* JMP.L (d16,PC) */ -{ CPUFUNC_FF(op_4efb_3), 0, 20219 }, /* JMP.L (d8,PC,Xn) */ -{ CPUFUNC(op_5000_0), 0, 20480 }, /* ADD.B #,Dn */ -{ CPUFUNC(op_5010_0), 0, 20496 }, /* ADD.B #,(An) */ -{ CPUFUNC(op_5018_0), 0, 20504 }, /* ADD.B #,(An)+ */ -{ CPUFUNC(op_5020_0), 0, 20512 }, /* ADD.B #,-(An) */ -{ CPUFUNC(op_5028_0), 0, 20520 }, /* ADD.B #,(d16,An) */ -{ CPUFUNC(op_5030_3), 0, 20528 }, /* ADD.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5038_0), 0, 20536 }, /* ADD.B #,(xxx).W */ -{ CPUFUNC(op_5039_0), 0, 20537 }, /* ADD.B #,(xxx).L */ -{ CPUFUNC(op_5040_0), 0, 20544 }, /* ADD.W #,Dn */ -{ CPUFUNC_FF(op_5048_0), 0, 20552 }, /* ADDA.W #,An */ -{ CPUFUNC(op_5050_0), 0, 20560 }, /* ADD.W #,(An) */ -{ CPUFUNC(op_5058_0), 0, 20568 }, /* ADD.W #,(An)+ */ -{ CPUFUNC(op_5060_0), 0, 20576 }, /* ADD.W #,-(An) */ -{ CPUFUNC(op_5068_0), 0, 20584 }, /* ADD.W #,(d16,An) */ -{ CPUFUNC(op_5070_3), 0, 20592 }, /* ADD.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5078_0), 0, 20600 }, /* ADD.W #,(xxx).W */ -{ CPUFUNC(op_5079_0), 0, 20601 }, /* ADD.W #,(xxx).L */ -{ CPUFUNC(op_5080_0), 0, 20608 }, /* ADD.L #,Dn */ -{ CPUFUNC_FF(op_5088_0), 0, 20616 }, /* ADDA.L #,An */ -{ CPUFUNC(op_5090_0), 0, 20624 }, /* ADD.L #,(An) */ -{ CPUFUNC(op_5098_0), 0, 20632 }, /* ADD.L #,(An)+ */ -{ CPUFUNC(op_50a0_0), 0, 20640 }, /* ADD.L #,-(An) */ -{ CPUFUNC(op_50a8_0), 0, 20648 }, /* ADD.L #,(d16,An) */ -{ CPUFUNC(op_50b0_3), 0, 20656 }, /* ADD.L #,(d8,An,Xn) */ -{ CPUFUNC(op_50b8_0), 0, 20664 }, /* ADD.L #,(xxx).W */ -{ CPUFUNC(op_50b9_0), 0, 20665 }, /* ADD.L #,(xxx).L */ -{ CPUFUNC_FF(op_50c0_0), 0, 20672 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_50c8_0), 0, 20680 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_50d0_0), 0, 20688 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_50d8_0), 0, 20696 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_50e0_0), 0, 20704 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_50e8_0), 0, 20712 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_50f0_3), 0, 20720 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_50f8_0), 0, 20728 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_50f9_0), 0, 20729 }, /* Scc.B (xxx).L */ -{ CPUFUNC(op_5100_0), 0, 20736 }, /* SUB.B #,Dn */ -{ CPUFUNC(op_5110_0), 0, 20752 }, /* SUB.B #,(An) */ -{ CPUFUNC(op_5118_0), 0, 20760 }, /* SUB.B #,(An)+ */ -{ CPUFUNC(op_5120_0), 0, 20768 }, /* SUB.B #,-(An) */ -{ CPUFUNC(op_5128_0), 0, 20776 }, /* SUB.B #,(d16,An) */ -{ CPUFUNC(op_5130_3), 0, 20784 }, /* SUB.B #,(d8,An,Xn) */ -{ CPUFUNC(op_5138_0), 0, 20792 }, /* SUB.B #,(xxx).W */ -{ CPUFUNC(op_5139_0), 0, 20793 }, /* SUB.B #,(xxx).L */ -{ CPUFUNC(op_5140_0), 0, 20800 }, /* SUB.W #,Dn */ -{ CPUFUNC_FF(op_5148_0), 0, 20808 }, /* SUBA.W #,An */ -{ CPUFUNC(op_5150_0), 0, 20816 }, /* SUB.W #,(An) */ -{ CPUFUNC(op_5158_0), 0, 20824 }, /* SUB.W #,(An)+ */ -{ CPUFUNC(op_5160_0), 0, 20832 }, /* SUB.W #,-(An) */ -{ CPUFUNC(op_5168_0), 0, 20840 }, /* SUB.W #,(d16,An) */ -{ CPUFUNC(op_5170_3), 0, 20848 }, /* SUB.W #,(d8,An,Xn) */ -{ CPUFUNC(op_5178_0), 0, 20856 }, /* SUB.W #,(xxx).W */ -{ CPUFUNC(op_5179_0), 0, 20857 }, /* SUB.W #,(xxx).L */ -{ CPUFUNC(op_5180_0), 0, 20864 }, /* SUB.L #,Dn */ -{ CPUFUNC_FF(op_5188_0), 0, 20872 }, /* SUBA.L #,An */ -{ CPUFUNC(op_5190_0), 0, 20880 }, /* SUB.L #,(An) */ -{ CPUFUNC(op_5198_0), 0, 20888 }, /* SUB.L #,(An)+ */ -{ CPUFUNC(op_51a0_0), 0, 20896 }, /* SUB.L #,-(An) */ -{ CPUFUNC(op_51a8_0), 0, 20904 }, /* SUB.L #,(d16,An) */ -{ CPUFUNC(op_51b0_3), 0, 20912 }, /* SUB.L #,(d8,An,Xn) */ -{ CPUFUNC(op_51b8_0), 0, 20920 }, /* SUB.L #,(xxx).W */ -{ CPUFUNC(op_51b9_0), 0, 20921 }, /* SUB.L #,(xxx).L */ -{ CPUFUNC_FF(op_51c0_0), 0, 20928 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_51c8_0), 0, 20936 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_51d0_0), 0, 20944 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_51d8_0), 0, 20952 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_51e0_0), 0, 20960 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_51e8_0), 0, 20968 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_51f0_3), 0, 20976 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_51f8_0), 0, 20984 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_51f9_0), 0, 20985 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_52c0_0), 0, 21184 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_52c8_0), 0, 21192 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_52d0_0), 0, 21200 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_52d8_0), 0, 21208 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_52e0_0), 0, 21216 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_52e8_0), 0, 21224 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_52f0_3), 0, 21232 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_52f8_0), 0, 21240 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_52f9_0), 0, 21241 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_53c0_0), 0, 21440 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_53c8_0), 0, 21448 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_53d0_0), 0, 21456 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_53d8_0), 0, 21464 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_53e0_0), 0, 21472 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_53e8_0), 0, 21480 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_53f0_3), 0, 21488 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_53f8_0), 0, 21496 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_53f9_0), 0, 21497 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_54c0_0), 0, 21696 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_54c8_0), 0, 21704 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_54d0_0), 0, 21712 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_54d8_0), 0, 21720 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_54e0_0), 0, 21728 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_54e8_0), 0, 21736 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_54f0_3), 0, 21744 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_54f8_0), 0, 21752 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_54f9_0), 0, 21753 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_55c0_0), 0, 21952 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_55c8_0), 0, 21960 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_55d0_0), 0, 21968 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_55d8_0), 0, 21976 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_55e0_0), 0, 21984 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_55e8_0), 0, 21992 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_55f0_3), 0, 22000 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_55f8_0), 0, 22008 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_55f9_0), 0, 22009 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_56c0_0), 0, 22208 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_56c8_0), 0, 22216 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_56d0_0), 0, 22224 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_56d8_0), 0, 22232 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_56e0_0), 0, 22240 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_56e8_0), 0, 22248 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_56f0_3), 0, 22256 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_56f8_0), 0, 22264 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_56f9_0), 0, 22265 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_57c0_0), 0, 22464 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_57c8_0), 0, 22472 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_57d0_0), 0, 22480 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_57d8_0), 0, 22488 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_57e0_0), 0, 22496 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_57e8_0), 0, 22504 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_57f0_3), 0, 22512 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_57f8_0), 0, 22520 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_57f9_0), 0, 22521 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_58c0_0), 0, 22720 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_58c8_0), 0, 22728 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_58d0_0), 0, 22736 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_58d8_0), 0, 22744 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_58e0_0), 0, 22752 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_58e8_0), 0, 22760 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_58f0_3), 0, 22768 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_58f8_0), 0, 22776 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_58f9_0), 0, 22777 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_59c0_0), 0, 22976 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_59c8_0), 0, 22984 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_59d0_0), 0, 22992 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_59d8_0), 0, 23000 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_59e0_0), 0, 23008 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_59e8_0), 0, 23016 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_59f0_3), 0, 23024 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_59f8_0), 0, 23032 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_59f9_0), 0, 23033 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ac0_0), 0, 23232 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ac8_0), 0, 23240 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ad0_0), 0, 23248 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ad8_0), 0, 23256 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ae0_0), 0, 23264 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ae8_0), 0, 23272 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5af0_3), 0, 23280 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5af8_0), 0, 23288 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5af9_0), 0, 23289 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5bc0_0), 0, 23488 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5bc8_0), 0, 23496 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5bd0_0), 0, 23504 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5bd8_0), 0, 23512 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5be0_0), 0, 23520 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5be8_0), 0, 23528 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5bf0_3), 0, 23536 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5bf8_0), 0, 23544 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5bf9_0), 0, 23545 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5cc0_0), 0, 23744 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5cc8_0), 0, 23752 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5cd0_0), 0, 23760 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5cd8_0), 0, 23768 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ce0_0), 0, 23776 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ce8_0), 0, 23784 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5cf0_3), 0, 23792 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5cf8_0), 0, 23800 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5cf9_0), 0, 23801 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5dc0_0), 0, 24000 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5dc8_0), 0, 24008 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5dd0_0), 0, 24016 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5dd8_0), 0, 24024 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5de0_0), 0, 24032 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5de8_0), 0, 24040 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5df0_3), 0, 24048 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5df8_0), 0, 24056 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5df9_0), 0, 24057 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5ec0_0), 0, 24256 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5ec8_0), 0, 24264 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5ed0_0), 0, 24272 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5ed8_0), 0, 24280 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5ee0_0), 0, 24288 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5ee8_0), 0, 24296 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ef0_3), 0, 24304 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ef8_0), 0, 24312 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ef9_0), 0, 24313 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_5fc0_0), 0, 24512 }, /* Scc.B Dn */ -{ CPUFUNC_FF(op_5fc8_0), 0, 24520 }, /* DBcc.W Dn,#.W */ -{ CPUFUNC_FF(op_5fd0_0), 0, 24528 }, /* Scc.B (An) */ -{ CPUFUNC_FF(op_5fd8_0), 0, 24536 }, /* Scc.B (An)+ */ -{ CPUFUNC_FF(op_5fe0_0), 0, 24544 }, /* Scc.B -(An) */ -{ CPUFUNC_FF(op_5fe8_0), 0, 24552 }, /* Scc.B (d16,An) */ -{ CPUFUNC_FF(op_5ff0_3), 0, 24560 }, /* Scc.B (d8,An,Xn) */ -{ CPUFUNC_FF(op_5ff8_0), 0, 24568 }, /* Scc.B (xxx).W */ -{ CPUFUNC_FF(op_5ff9_0), 0, 24569 }, /* Scc.B (xxx).L */ -{ CPUFUNC_FF(op_6000_0), 0, 24576 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6001_0), 0, 24577 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_60ff_3), 0, 24831 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6100_0), 0, 24832 }, /* BSR.W #.W */ -{ CPUFUNC_FF(op_6101_0), 0, 24833 }, /* BSR.B # */ -{ CPUFUNC_FF(op_61ff_0), 0, 25087 }, /* BSR.L #.L */ -{ CPUFUNC_FF(op_6200_0), 0, 25088 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6201_0), 0, 25089 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_62ff_3), 0, 25343 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6300_0), 0, 25344 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6301_0), 0, 25345 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_63ff_3), 0, 25599 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6400_0), 0, 25600 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6401_0), 0, 25601 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_64ff_3), 0, 25855 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6500_0), 0, 25856 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6501_0), 0, 25857 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_65ff_3), 0, 26111 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6600_0), 0, 26112 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6601_0), 0, 26113 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_66ff_3), 0, 26367 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6700_0), 0, 26368 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6701_0), 0, 26369 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_67ff_3), 0, 26623 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6800_0), 0, 26624 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6801_0), 0, 26625 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_68ff_3), 0, 26879 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6900_0), 0, 26880 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6901_0), 0, 26881 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_69ff_3), 0, 27135 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6a00_0), 0, 27136 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6a01_0), 0, 27137 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6aff_3), 0, 27391 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6b00_0), 0, 27392 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6b01_0), 0, 27393 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6bff_3), 0, 27647 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6c00_0), 0, 27648 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6c01_0), 0, 27649 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6cff_3), 0, 27903 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6d00_0), 0, 27904 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6d01_0), 0, 27905 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6dff_3), 0, 28159 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6e00_0), 0, 28160 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6e01_0), 0, 28161 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6eff_3), 0, 28415 }, /* Bcc.L #.L */ -{ CPUFUNC_FF(op_6f00_0), 0, 28416 }, /* Bcc.W #.W */ -{ CPUFUNC_FF(op_6f01_0), 0, 28417 }, /* Bcc.B # */ -{ CPUFUNC_FF(op_6fff_3), 0, 28671 }, /* Bcc.L #.L */ -{ CPUFUNC(op_7000_0), 0, 28672 }, /* MOVE.L #,Dn */ -{ CPUFUNC_FF(op_7100_0), 0, 28928 }, /* EMULOP_RETURN.L */ -{ CPUFUNC_FF(op_7101_0), 0, 28929 }, /* EMULOP.L # */ -{ CPUFUNC(op_8000_0), 0, 32768 }, /* OR.B Dn,Dn */ -{ CPUFUNC(op_8010_0), 0, 32784 }, /* OR.B (An),Dn */ -{ CPUFUNC(op_8018_0), 0, 32792 }, /* OR.B (An)+,Dn */ -{ CPUFUNC(op_8020_0), 0, 32800 }, /* OR.B -(An),Dn */ -{ CPUFUNC(op_8028_0), 0, 32808 }, /* OR.B (d16,An),Dn */ -{ CPUFUNC(op_8030_3), 0, 32816 }, /* OR.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_8038_0), 0, 32824 }, /* OR.B (xxx).W,Dn */ -{ CPUFUNC(op_8039_0), 0, 32825 }, /* OR.B (xxx).L,Dn */ -{ CPUFUNC(op_803a_0), 0, 32826 }, /* OR.B (d16,PC),Dn */ -{ CPUFUNC(op_803b_3), 0, 32827 }, /* OR.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_803c_0), 0, 32828 }, /* OR.B #.B,Dn */ -{ CPUFUNC(op_8040_0), 0, 32832 }, /* OR.W Dn,Dn */ -{ CPUFUNC(op_8050_0), 0, 32848 }, /* OR.W (An),Dn */ -{ CPUFUNC(op_8058_0), 0, 32856 }, /* OR.W (An)+,Dn */ -{ CPUFUNC(op_8060_0), 0, 32864 }, /* OR.W -(An),Dn */ -{ CPUFUNC(op_8068_0), 0, 32872 }, /* OR.W (d16,An),Dn */ -{ CPUFUNC(op_8070_3), 0, 32880 }, /* OR.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_8078_0), 0, 32888 }, /* OR.W (xxx).W,Dn */ -{ CPUFUNC(op_8079_0), 0, 32889 }, /* OR.W (xxx).L,Dn */ -{ CPUFUNC(op_807a_0), 0, 32890 }, /* OR.W (d16,PC),Dn */ -{ CPUFUNC(op_807b_3), 0, 32891 }, /* OR.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_807c_0), 0, 32892 }, /* OR.W #.W,Dn */ -{ CPUFUNC(op_8080_0), 0, 32896 }, /* OR.L Dn,Dn */ -{ CPUFUNC(op_8090_0), 0, 32912 }, /* OR.L (An),Dn */ -{ CPUFUNC(op_8098_0), 0, 32920 }, /* OR.L (An)+,Dn */ -{ CPUFUNC(op_80a0_0), 0, 32928 }, /* OR.L -(An),Dn */ -{ CPUFUNC(op_80a8_0), 0, 32936 }, /* OR.L (d16,An),Dn */ -{ CPUFUNC(op_80b0_3), 0, 32944 }, /* OR.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_80b8_0), 0, 32952 }, /* OR.L (xxx).W,Dn */ -{ CPUFUNC(op_80b9_0), 0, 32953 }, /* OR.L (xxx).L,Dn */ -{ CPUFUNC(op_80ba_0), 0, 32954 }, /* OR.L (d16,PC),Dn */ -{ CPUFUNC(op_80bb_3), 0, 32955 }, /* OR.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80bc_0), 0, 32956 }, /* OR.L #.L,Dn */ -{ CPUFUNC(op_80c0_0), 0, 32960 }, /* DIVU.W Dn,Dn */ -{ CPUFUNC(op_80d0_0), 0, 32976 }, /* DIVU.W (An),Dn */ -{ CPUFUNC(op_80d8_0), 0, 32984 }, /* DIVU.W (An)+,Dn */ -{ CPUFUNC(op_80e0_0), 0, 32992 }, /* DIVU.W -(An),Dn */ -{ CPUFUNC(op_80e8_0), 0, 33000 }, /* DIVU.W (d16,An),Dn */ -{ CPUFUNC(op_80f0_3), 0, 33008 }, /* DIVU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_80f8_0), 0, 33016 }, /* DIVU.W (xxx).W,Dn */ -{ CPUFUNC(op_80f9_0), 0, 33017 }, /* DIVU.W (xxx).L,Dn */ -{ CPUFUNC(op_80fa_0), 0, 33018 }, /* DIVU.W (d16,PC),Dn */ -{ CPUFUNC(op_80fb_3), 0, 33019 }, /* DIVU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_80fc_0), 0, 33020 }, /* DIVU.W #.W,Dn */ -{ CPUFUNC(op_8100_1), 0, 33024 }, /* SBCD.B Dn,Dn */ -{ CPUFUNC(op_8108_1), 0, 33032 }, /* SBCD.B -(An),-(An) */ -{ CPUFUNC(op_8110_0), 0, 33040 }, /* OR.B Dn,(An) */ -{ CPUFUNC(op_8118_0), 0, 33048 }, /* OR.B Dn,(An)+ */ -{ CPUFUNC(op_8120_0), 0, 33056 }, /* OR.B Dn,-(An) */ -{ CPUFUNC(op_8128_0), 0, 33064 }, /* OR.B Dn,(d16,An) */ -{ CPUFUNC(op_8130_3), 0, 33072 }, /* OR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8138_0), 0, 33080 }, /* OR.B Dn,(xxx).W */ -{ CPUFUNC(op_8139_0), 0, 33081 }, /* OR.B Dn,(xxx).L */ -{ CPUFUNC(op_8150_0), 0, 33104 }, /* OR.W Dn,(An) */ -{ CPUFUNC(op_8158_0), 0, 33112 }, /* OR.W Dn,(An)+ */ -{ CPUFUNC(op_8160_0), 0, 33120 }, /* OR.W Dn,-(An) */ -{ CPUFUNC(op_8168_0), 0, 33128 }, /* OR.W Dn,(d16,An) */ -{ CPUFUNC(op_8170_3), 0, 33136 }, /* OR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_8178_0), 0, 33144 }, /* OR.W Dn,(xxx).W */ -{ CPUFUNC(op_8179_0), 0, 33145 }, /* OR.W Dn,(xxx).L */ -{ CPUFUNC(op_8190_0), 0, 33168 }, /* OR.L Dn,(An) */ -{ CPUFUNC(op_8198_0), 0, 33176 }, /* OR.L Dn,(An)+ */ -{ CPUFUNC(op_81a0_0), 0, 33184 }, /* OR.L Dn,-(An) */ -{ CPUFUNC(op_81a8_0), 0, 33192 }, /* OR.L Dn,(d16,An) */ -{ CPUFUNC(op_81b0_3), 0, 33200 }, /* OR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_81b8_0), 0, 33208 }, /* OR.L Dn,(xxx).W */ -{ CPUFUNC(op_81b9_0), 0, 33209 }, /* OR.L Dn,(xxx).L */ -{ CPUFUNC(op_81c0_0), 0, 33216 }, /* DIVS.W Dn,Dn */ -{ CPUFUNC(op_81d0_0), 0, 33232 }, /* DIVS.W (An),Dn */ -{ CPUFUNC(op_81d8_0), 0, 33240 }, /* DIVS.W (An)+,Dn */ -{ CPUFUNC(op_81e0_0), 0, 33248 }, /* DIVS.W -(An),Dn */ -{ CPUFUNC(op_81e8_0), 0, 33256 }, /* DIVS.W (d16,An),Dn */ -{ CPUFUNC(op_81f0_3), 0, 33264 }, /* DIVS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_81f8_0), 0, 33272 }, /* DIVS.W (xxx).W,Dn */ -{ CPUFUNC(op_81f9_0), 0, 33273 }, /* DIVS.W (xxx).L,Dn */ -{ CPUFUNC(op_81fa_0), 0, 33274 }, /* DIVS.W (d16,PC),Dn */ -{ CPUFUNC(op_81fb_3), 0, 33275 }, /* DIVS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_81fc_0), 0, 33276 }, /* DIVS.W #.W,Dn */ -{ CPUFUNC(op_9000_0), 0, 36864 }, /* SUB.B Dn,Dn */ -{ CPUFUNC(op_9010_0), 0, 36880 }, /* SUB.B (An),Dn */ -{ CPUFUNC(op_9018_0), 0, 36888 }, /* SUB.B (An)+,Dn */ -{ CPUFUNC(op_9020_0), 0, 36896 }, /* SUB.B -(An),Dn */ -{ CPUFUNC(op_9028_0), 0, 36904 }, /* SUB.B (d16,An),Dn */ -{ CPUFUNC(op_9030_3), 0, 36912 }, /* SUB.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_9038_0), 0, 36920 }, /* SUB.B (xxx).W,Dn */ -{ CPUFUNC(op_9039_0), 0, 36921 }, /* SUB.B (xxx).L,Dn */ -{ CPUFUNC(op_903a_0), 0, 36922 }, /* SUB.B (d16,PC),Dn */ -{ CPUFUNC(op_903b_3), 0, 36923 }, /* SUB.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_903c_0), 0, 36924 }, /* SUB.B #.B,Dn */ -{ CPUFUNC(op_9040_0), 0, 36928 }, /* SUB.W Dn,Dn */ -{ CPUFUNC(op_9048_0), 0, 36936 }, /* SUB.W An,Dn */ -{ CPUFUNC(op_9050_0), 0, 36944 }, /* SUB.W (An),Dn */ -{ CPUFUNC(op_9058_0), 0, 36952 }, /* SUB.W (An)+,Dn */ -{ CPUFUNC(op_9060_0), 0, 36960 }, /* SUB.W -(An),Dn */ -{ CPUFUNC(op_9068_0), 0, 36968 }, /* SUB.W (d16,An),Dn */ -{ CPUFUNC(op_9070_3), 0, 36976 }, /* SUB.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_9078_0), 0, 36984 }, /* SUB.W (xxx).W,Dn */ -{ CPUFUNC(op_9079_0), 0, 36985 }, /* SUB.W (xxx).L,Dn */ -{ CPUFUNC(op_907a_0), 0, 36986 }, /* SUB.W (d16,PC),Dn */ -{ CPUFUNC(op_907b_3), 0, 36987 }, /* SUB.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_907c_0), 0, 36988 }, /* SUB.W #.W,Dn */ -{ CPUFUNC(op_9080_0), 0, 36992 }, /* SUB.L Dn,Dn */ -{ CPUFUNC(op_9088_0), 0, 37000 }, /* SUB.L An,Dn */ -{ CPUFUNC(op_9090_0), 0, 37008 }, /* SUB.L (An),Dn */ -{ CPUFUNC(op_9098_0), 0, 37016 }, /* SUB.L (An)+,Dn */ -{ CPUFUNC(op_90a0_0), 0, 37024 }, /* SUB.L -(An),Dn */ -{ CPUFUNC(op_90a8_0), 0, 37032 }, /* SUB.L (d16,An),Dn */ -{ CPUFUNC(op_90b0_3), 0, 37040 }, /* SUB.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_90b8_0), 0, 37048 }, /* SUB.L (xxx).W,Dn */ -{ CPUFUNC(op_90b9_0), 0, 37049 }, /* SUB.L (xxx).L,Dn */ -{ CPUFUNC(op_90ba_0), 0, 37050 }, /* SUB.L (d16,PC),Dn */ -{ CPUFUNC(op_90bb_3), 0, 37051 }, /* SUB.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_90bc_0), 0, 37052 }, /* SUB.L #.L,Dn */ -{ CPUFUNC_FF(op_90c0_0), 0, 37056 }, /* SUBA.W Dn,An */ -{ CPUFUNC_FF(op_90c8_0), 0, 37064 }, /* SUBA.W An,An */ -{ CPUFUNC_FF(op_90d0_0), 0, 37072 }, /* SUBA.W (An),An */ -{ CPUFUNC_FF(op_90d8_0), 0, 37080 }, /* SUBA.W (An)+,An */ -{ CPUFUNC_FF(op_90e0_0), 0, 37088 }, /* SUBA.W -(An),An */ -{ CPUFUNC_FF(op_90e8_0), 0, 37096 }, /* SUBA.W (d16,An),An */ -{ CPUFUNC_FF(op_90f0_3), 0, 37104 }, /* SUBA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_90f8_0), 0, 37112 }, /* SUBA.W (xxx).W,An */ -{ CPUFUNC_FF(op_90f9_0), 0, 37113 }, /* SUBA.W (xxx).L,An */ -{ CPUFUNC_FF(op_90fa_0), 0, 37114 }, /* SUBA.W (d16,PC),An */ -{ CPUFUNC_FF(op_90fb_3), 0, 37115 }, /* SUBA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_90fc_0), 0, 37116 }, /* SUBA.W #.W,An */ -{ CPUFUNC(op_9100_0), 0, 37120 }, /* SUBX.B Dn,Dn */ -{ CPUFUNC(op_9108_0), 0, 37128 }, /* SUBX.B -(An),-(An) */ -{ CPUFUNC(op_9110_0), 0, 37136 }, /* SUB.B Dn,(An) */ -{ CPUFUNC(op_9118_0), 0, 37144 }, /* SUB.B Dn,(An)+ */ -{ CPUFUNC(op_9120_0), 0, 37152 }, /* SUB.B Dn,-(An) */ -{ CPUFUNC(op_9128_0), 0, 37160 }, /* SUB.B Dn,(d16,An) */ -{ CPUFUNC(op_9130_3), 0, 37168 }, /* SUB.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9138_0), 0, 37176 }, /* SUB.B Dn,(xxx).W */ -{ CPUFUNC(op_9139_0), 0, 37177 }, /* SUB.B Dn,(xxx).L */ -{ CPUFUNC(op_9140_0), 0, 37184 }, /* SUBX.W Dn,Dn */ -{ CPUFUNC(op_9148_0), 0, 37192 }, /* SUBX.W -(An),-(An) */ -{ CPUFUNC(op_9150_0), 0, 37200 }, /* SUB.W Dn,(An) */ -{ CPUFUNC(op_9158_0), 0, 37208 }, /* SUB.W Dn,(An)+ */ -{ CPUFUNC(op_9160_0), 0, 37216 }, /* SUB.W Dn,-(An) */ -{ CPUFUNC(op_9168_0), 0, 37224 }, /* SUB.W Dn,(d16,An) */ -{ CPUFUNC(op_9170_3), 0, 37232 }, /* SUB.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_9178_0), 0, 37240 }, /* SUB.W Dn,(xxx).W */ -{ CPUFUNC(op_9179_0), 0, 37241 }, /* SUB.W Dn,(xxx).L */ -{ CPUFUNC(op_9180_0), 0, 37248 }, /* SUBX.L Dn,Dn */ -{ CPUFUNC(op_9188_0), 0, 37256 }, /* SUBX.L -(An),-(An) */ -{ CPUFUNC(op_9190_0), 0, 37264 }, /* SUB.L Dn,(An) */ -{ CPUFUNC(op_9198_0), 0, 37272 }, /* SUB.L Dn,(An)+ */ -{ CPUFUNC(op_91a0_0), 0, 37280 }, /* SUB.L Dn,-(An) */ -{ CPUFUNC(op_91a8_0), 0, 37288 }, /* SUB.L Dn,(d16,An) */ -{ CPUFUNC(op_91b0_3), 0, 37296 }, /* SUB.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_91b8_0), 0, 37304 }, /* SUB.L Dn,(xxx).W */ -{ CPUFUNC(op_91b9_0), 0, 37305 }, /* SUB.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_91c0_0), 0, 37312 }, /* SUBA.L Dn,An */ -{ CPUFUNC_FF(op_91c8_0), 0, 37320 }, /* SUBA.L An,An */ -{ CPUFUNC_FF(op_91d0_0), 0, 37328 }, /* SUBA.L (An),An */ -{ CPUFUNC_FF(op_91d8_0), 0, 37336 }, /* SUBA.L (An)+,An */ -{ CPUFUNC_FF(op_91e0_0), 0, 37344 }, /* SUBA.L -(An),An */ -{ CPUFUNC_FF(op_91e8_0), 0, 37352 }, /* SUBA.L (d16,An),An */ -{ CPUFUNC_FF(op_91f0_3), 0, 37360 }, /* SUBA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_91f8_0), 0, 37368 }, /* SUBA.L (xxx).W,An */ -{ CPUFUNC_FF(op_91f9_0), 0, 37369 }, /* SUBA.L (xxx).L,An */ -{ CPUFUNC_FF(op_91fa_0), 0, 37370 }, /* SUBA.L (d16,PC),An */ -{ CPUFUNC_FF(op_91fb_3), 0, 37371 }, /* SUBA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_91fc_0), 0, 37372 }, /* SUBA.L #.L,An */ -{ CPUFUNC(op_b000_0), 0, 45056 }, /* CMP.B Dn,Dn */ -{ CPUFUNC(op_b010_0), 0, 45072 }, /* CMP.B (An),Dn */ -{ CPUFUNC(op_b018_0), 0, 45080 }, /* CMP.B (An)+,Dn */ -{ CPUFUNC(op_b020_0), 0, 45088 }, /* CMP.B -(An),Dn */ -{ CPUFUNC(op_b028_0), 0, 45096 }, /* CMP.B (d16,An),Dn */ -{ CPUFUNC(op_b030_3), 0, 45104 }, /* CMP.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_b038_0), 0, 45112 }, /* CMP.B (xxx).W,Dn */ -{ CPUFUNC(op_b039_0), 0, 45113 }, /* CMP.B (xxx).L,Dn */ -{ CPUFUNC(op_b03a_0), 0, 45114 }, /* CMP.B (d16,PC),Dn */ -{ CPUFUNC(op_b03b_3), 0, 45115 }, /* CMP.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b03c_0), 0, 45116 }, /* CMP.B #.B,Dn */ -{ CPUFUNC(op_b040_0), 0, 45120 }, /* CMP.W Dn,Dn */ -{ CPUFUNC(op_b048_0), 0, 45128 }, /* CMP.W An,Dn */ -{ CPUFUNC(op_b050_0), 0, 45136 }, /* CMP.W (An),Dn */ -{ CPUFUNC(op_b058_0), 0, 45144 }, /* CMP.W (An)+,Dn */ -{ CPUFUNC(op_b060_0), 0, 45152 }, /* CMP.W -(An),Dn */ -{ CPUFUNC(op_b068_0), 0, 45160 }, /* CMP.W (d16,An),Dn */ -{ CPUFUNC(op_b070_3), 0, 45168 }, /* CMP.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_b078_0), 0, 45176 }, /* CMP.W (xxx).W,Dn */ -{ CPUFUNC(op_b079_0), 0, 45177 }, /* CMP.W (xxx).L,Dn */ -{ CPUFUNC(op_b07a_0), 0, 45178 }, /* CMP.W (d16,PC),Dn */ -{ CPUFUNC(op_b07b_3), 0, 45179 }, /* CMP.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b07c_0), 0, 45180 }, /* CMP.W #.W,Dn */ -{ CPUFUNC(op_b080_0), 0, 45184 }, /* CMP.L Dn,Dn */ -{ CPUFUNC(op_b088_0), 0, 45192 }, /* CMP.L An,Dn */ -{ CPUFUNC(op_b090_0), 0, 45200 }, /* CMP.L (An),Dn */ -{ CPUFUNC(op_b098_0), 0, 45208 }, /* CMP.L (An)+,Dn */ -{ CPUFUNC(op_b0a0_0), 0, 45216 }, /* CMP.L -(An),Dn */ -{ CPUFUNC(op_b0a8_0), 0, 45224 }, /* CMP.L (d16,An),Dn */ -{ CPUFUNC(op_b0b0_3), 0, 45232 }, /* CMP.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_b0b8_0), 0, 45240 }, /* CMP.L (xxx).W,Dn */ -{ CPUFUNC(op_b0b9_0), 0, 45241 }, /* CMP.L (xxx).L,Dn */ -{ CPUFUNC(op_b0ba_0), 0, 45242 }, /* CMP.L (d16,PC),Dn */ -{ CPUFUNC(op_b0bb_3), 0, 45243 }, /* CMP.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_b0bc_0), 0, 45244 }, /* CMP.L #.L,Dn */ -{ CPUFUNC(op_b0c0_0), 0, 45248 }, /* CMPA.W Dn,An */ -{ CPUFUNC(op_b0c8_0), 0, 45256 }, /* CMPA.W An,An */ -{ CPUFUNC(op_b0d0_0), 0, 45264 }, /* CMPA.W (An),An */ -{ CPUFUNC(op_b0d8_0), 0, 45272 }, /* CMPA.W (An)+,An */ -{ CPUFUNC(op_b0e0_0), 0, 45280 }, /* CMPA.W -(An),An */ -{ CPUFUNC(op_b0e8_0), 0, 45288 }, /* CMPA.W (d16,An),An */ -{ CPUFUNC(op_b0f0_3), 0, 45296 }, /* CMPA.W (d8,An,Xn),An */ -{ CPUFUNC(op_b0f8_0), 0, 45304 }, /* CMPA.W (xxx).W,An */ -{ CPUFUNC(op_b0f9_0), 0, 45305 }, /* CMPA.W (xxx).L,An */ -{ CPUFUNC(op_b0fa_0), 0, 45306 }, /* CMPA.W (d16,PC),An */ -{ CPUFUNC(op_b0fb_3), 0, 45307 }, /* CMPA.W (d8,PC,Xn),An */ -{ CPUFUNC(op_b0fc_0), 0, 45308 }, /* CMPA.W #.W,An */ -{ CPUFUNC(op_b100_0), 0, 45312 }, /* EOR.B Dn,Dn */ -{ CPUFUNC(op_b108_0), 0, 45320 }, /* CMPM.B (An)+,(An)+ */ -{ CPUFUNC(op_b110_0), 0, 45328 }, /* EOR.B Dn,(An) */ -{ CPUFUNC(op_b118_0), 0, 45336 }, /* EOR.B Dn,(An)+ */ -{ CPUFUNC(op_b120_0), 0, 45344 }, /* EOR.B Dn,-(An) */ -{ CPUFUNC(op_b128_0), 0, 45352 }, /* EOR.B Dn,(d16,An) */ -{ CPUFUNC(op_b130_3), 0, 45360 }, /* EOR.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b138_0), 0, 45368 }, /* EOR.B Dn,(xxx).W */ -{ CPUFUNC(op_b139_0), 0, 45369 }, /* EOR.B Dn,(xxx).L */ -{ CPUFUNC(op_b140_0), 0, 45376 }, /* EOR.W Dn,Dn */ -{ CPUFUNC(op_b148_0), 0, 45384 }, /* CMPM.W (An)+,(An)+ */ -{ CPUFUNC(op_b150_0), 0, 45392 }, /* EOR.W Dn,(An) */ -{ CPUFUNC(op_b158_0), 0, 45400 }, /* EOR.W Dn,(An)+ */ -{ CPUFUNC(op_b160_0), 0, 45408 }, /* EOR.W Dn,-(An) */ -{ CPUFUNC(op_b168_0), 0, 45416 }, /* EOR.W Dn,(d16,An) */ -{ CPUFUNC(op_b170_3), 0, 45424 }, /* EOR.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b178_0), 0, 45432 }, /* EOR.W Dn,(xxx).W */ -{ CPUFUNC(op_b179_0), 0, 45433 }, /* EOR.W Dn,(xxx).L */ -{ CPUFUNC(op_b180_0), 0, 45440 }, /* EOR.L Dn,Dn */ -{ CPUFUNC(op_b188_0), 0, 45448 }, /* CMPM.L (An)+,(An)+ */ -{ CPUFUNC(op_b190_0), 0, 45456 }, /* EOR.L Dn,(An) */ -{ CPUFUNC(op_b198_0), 0, 45464 }, /* EOR.L Dn,(An)+ */ -{ CPUFUNC(op_b1a0_0), 0, 45472 }, /* EOR.L Dn,-(An) */ -{ CPUFUNC(op_b1a8_0), 0, 45480 }, /* EOR.L Dn,(d16,An) */ -{ CPUFUNC(op_b1b0_3), 0, 45488 }, /* EOR.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_b1b8_0), 0, 45496 }, /* EOR.L Dn,(xxx).W */ -{ CPUFUNC(op_b1b9_0), 0, 45497 }, /* EOR.L Dn,(xxx).L */ -{ CPUFUNC(op_b1c0_0), 0, 45504 }, /* CMPA.L Dn,An */ -{ CPUFUNC(op_b1c8_0), 0, 45512 }, /* CMPA.L An,An */ -{ CPUFUNC(op_b1d0_0), 0, 45520 }, /* CMPA.L (An),An */ -{ CPUFUNC(op_b1d8_0), 0, 45528 }, /* CMPA.L (An)+,An */ -{ CPUFUNC(op_b1e0_0), 0, 45536 }, /* CMPA.L -(An),An */ -{ CPUFUNC(op_b1e8_0), 0, 45544 }, /* CMPA.L (d16,An),An */ -{ CPUFUNC(op_b1f0_3), 0, 45552 }, /* CMPA.L (d8,An,Xn),An */ -{ CPUFUNC(op_b1f8_0), 0, 45560 }, /* CMPA.L (xxx).W,An */ -{ CPUFUNC(op_b1f9_0), 0, 45561 }, /* CMPA.L (xxx).L,An */ -{ CPUFUNC(op_b1fa_0), 0, 45562 }, /* CMPA.L (d16,PC),An */ -{ CPUFUNC(op_b1fb_3), 0, 45563 }, /* CMPA.L (d8,PC,Xn),An */ -{ CPUFUNC(op_b1fc_0), 0, 45564 }, /* CMPA.L #.L,An */ -{ CPUFUNC(op_c000_0), 0, 49152 }, /* AND.B Dn,Dn */ -{ CPUFUNC(op_c010_0), 0, 49168 }, /* AND.B (An),Dn */ -{ CPUFUNC(op_c018_0), 0, 49176 }, /* AND.B (An)+,Dn */ -{ CPUFUNC(op_c020_0), 0, 49184 }, /* AND.B -(An),Dn */ -{ CPUFUNC(op_c028_0), 0, 49192 }, /* AND.B (d16,An),Dn */ -{ CPUFUNC(op_c030_3), 0, 49200 }, /* AND.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_c038_0), 0, 49208 }, /* AND.B (xxx).W,Dn */ -{ CPUFUNC(op_c039_0), 0, 49209 }, /* AND.B (xxx).L,Dn */ -{ CPUFUNC(op_c03a_0), 0, 49210 }, /* AND.B (d16,PC),Dn */ -{ CPUFUNC(op_c03b_3), 0, 49211 }, /* AND.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c03c_0), 0, 49212 }, /* AND.B #.B,Dn */ -{ CPUFUNC(op_c040_0), 0, 49216 }, /* AND.W Dn,Dn */ -{ CPUFUNC(op_c050_0), 0, 49232 }, /* AND.W (An),Dn */ -{ CPUFUNC(op_c058_0), 0, 49240 }, /* AND.W (An)+,Dn */ -{ CPUFUNC(op_c060_0), 0, 49248 }, /* AND.W -(An),Dn */ -{ CPUFUNC(op_c068_0), 0, 49256 }, /* AND.W (d16,An),Dn */ -{ CPUFUNC(op_c070_3), 0, 49264 }, /* AND.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c078_0), 0, 49272 }, /* AND.W (xxx).W,Dn */ -{ CPUFUNC(op_c079_0), 0, 49273 }, /* AND.W (xxx).L,Dn */ -{ CPUFUNC(op_c07a_0), 0, 49274 }, /* AND.W (d16,PC),Dn */ -{ CPUFUNC(op_c07b_3), 0, 49275 }, /* AND.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c07c_0), 0, 49276 }, /* AND.W #.W,Dn */ -{ CPUFUNC(op_c080_0), 0, 49280 }, /* AND.L Dn,Dn */ -{ CPUFUNC(op_c090_0), 0, 49296 }, /* AND.L (An),Dn */ -{ CPUFUNC(op_c098_0), 0, 49304 }, /* AND.L (An)+,Dn */ -{ CPUFUNC(op_c0a0_0), 0, 49312 }, /* AND.L -(An),Dn */ -{ CPUFUNC(op_c0a8_0), 0, 49320 }, /* AND.L (d16,An),Dn */ -{ CPUFUNC(op_c0b0_3), 0, 49328 }, /* AND.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0b8_0), 0, 49336 }, /* AND.L (xxx).W,Dn */ -{ CPUFUNC(op_c0b9_0), 0, 49337 }, /* AND.L (xxx).L,Dn */ -{ CPUFUNC(op_c0ba_0), 0, 49338 }, /* AND.L (d16,PC),Dn */ -{ CPUFUNC(op_c0bb_3), 0, 49339 }, /* AND.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0bc_0), 0, 49340 }, /* AND.L #.L,Dn */ -{ CPUFUNC(op_c0c0_0), 0, 49344 }, /* MULU.W Dn,Dn */ -{ CPUFUNC(op_c0d0_0), 0, 49360 }, /* MULU.W (An),Dn */ -{ CPUFUNC(op_c0d8_0), 0, 49368 }, /* MULU.W (An)+,Dn */ -{ CPUFUNC(op_c0e0_0), 0, 49376 }, /* MULU.W -(An),Dn */ -{ CPUFUNC(op_c0e8_0), 0, 49384 }, /* MULU.W (d16,An),Dn */ -{ CPUFUNC(op_c0f0_3), 0, 49392 }, /* MULU.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c0f8_0), 0, 49400 }, /* MULU.W (xxx).W,Dn */ -{ CPUFUNC(op_c0f9_0), 0, 49401 }, /* MULU.W (xxx).L,Dn */ -{ CPUFUNC(op_c0fa_0), 0, 49402 }, /* MULU.W (d16,PC),Dn */ -{ CPUFUNC(op_c0fb_3), 0, 49403 }, /* MULU.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c0fc_0), 0, 49404 }, /* MULU.W #.W,Dn */ -{ CPUFUNC(op_c100_1), 0, 49408 }, /* ABCD.B Dn,Dn */ -{ CPUFUNC(op_c108_1), 0, 49416 }, /* ABCD.B -(An),-(An) */ -{ CPUFUNC(op_c110_0), 0, 49424 }, /* AND.B Dn,(An) */ -{ CPUFUNC(op_c118_0), 0, 49432 }, /* AND.B Dn,(An)+ */ -{ CPUFUNC(op_c120_0), 0, 49440 }, /* AND.B Dn,-(An) */ -{ CPUFUNC(op_c128_0), 0, 49448 }, /* AND.B Dn,(d16,An) */ -{ CPUFUNC(op_c130_3), 0, 49456 }, /* AND.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c138_0), 0, 49464 }, /* AND.B Dn,(xxx).W */ -{ CPUFUNC(op_c139_0), 0, 49465 }, /* AND.B Dn,(xxx).L */ -{ CPUFUNC_FF(op_c140_0), 0, 49472 }, /* EXG.L Dn,Dn */ -{ CPUFUNC_FF(op_c148_0), 0, 49480 }, /* EXG.L An,An */ -{ CPUFUNC(op_c150_0), 0, 49488 }, /* AND.W Dn,(An) */ -{ CPUFUNC(op_c158_0), 0, 49496 }, /* AND.W Dn,(An)+ */ -{ CPUFUNC(op_c160_0), 0, 49504 }, /* AND.W Dn,-(An) */ -{ CPUFUNC(op_c168_0), 0, 49512 }, /* AND.W Dn,(d16,An) */ -{ CPUFUNC(op_c170_3), 0, 49520 }, /* AND.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c178_0), 0, 49528 }, /* AND.W Dn,(xxx).W */ -{ CPUFUNC(op_c179_0), 0, 49529 }, /* AND.W Dn,(xxx).L */ -{ CPUFUNC_FF(op_c188_0), 0, 49544 }, /* EXG.L Dn,An */ -{ CPUFUNC(op_c190_0), 0, 49552 }, /* AND.L Dn,(An) */ -{ CPUFUNC(op_c198_0), 0, 49560 }, /* AND.L Dn,(An)+ */ -{ CPUFUNC(op_c1a0_0), 0, 49568 }, /* AND.L Dn,-(An) */ -{ CPUFUNC(op_c1a8_0), 0, 49576 }, /* AND.L Dn,(d16,An) */ -{ CPUFUNC(op_c1b0_3), 0, 49584 }, /* AND.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_c1b8_0), 0, 49592 }, /* AND.L Dn,(xxx).W */ -{ CPUFUNC(op_c1b9_0), 0, 49593 }, /* AND.L Dn,(xxx).L */ -{ CPUFUNC(op_c1c0_0), 0, 49600 }, /* MULS.W Dn,Dn */ -{ CPUFUNC(op_c1d0_0), 0, 49616 }, /* MULS.W (An),Dn */ -{ CPUFUNC(op_c1d8_0), 0, 49624 }, /* MULS.W (An)+,Dn */ -{ CPUFUNC(op_c1e0_0), 0, 49632 }, /* MULS.W -(An),Dn */ -{ CPUFUNC(op_c1e8_0), 0, 49640 }, /* MULS.W (d16,An),Dn */ -{ CPUFUNC(op_c1f0_3), 0, 49648 }, /* MULS.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_c1f8_0), 0, 49656 }, /* MULS.W (xxx).W,Dn */ -{ CPUFUNC(op_c1f9_0), 0, 49657 }, /* MULS.W (xxx).L,Dn */ -{ CPUFUNC(op_c1fa_0), 0, 49658 }, /* MULS.W (d16,PC),Dn */ -{ CPUFUNC(op_c1fb_3), 0, 49659 }, /* MULS.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_c1fc_0), 0, 49660 }, /* MULS.W #.W,Dn */ -{ CPUFUNC(op_d000_0), 0, 53248 }, /* ADD.B Dn,Dn */ -{ CPUFUNC(op_d010_0), 0, 53264 }, /* ADD.B (An),Dn */ -{ CPUFUNC(op_d018_0), 0, 53272 }, /* ADD.B (An)+,Dn */ -{ CPUFUNC(op_d020_0), 0, 53280 }, /* ADD.B -(An),Dn */ -{ CPUFUNC(op_d028_0), 0, 53288 }, /* ADD.B (d16,An),Dn */ -{ CPUFUNC(op_d030_3), 0, 53296 }, /* ADD.B (d8,An,Xn),Dn */ -{ CPUFUNC(op_d038_0), 0, 53304 }, /* ADD.B (xxx).W,Dn */ -{ CPUFUNC(op_d039_0), 0, 53305 }, /* ADD.B (xxx).L,Dn */ -{ CPUFUNC(op_d03a_0), 0, 53306 }, /* ADD.B (d16,PC),Dn */ -{ CPUFUNC(op_d03b_3), 0, 53307 }, /* ADD.B (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d03c_0), 0, 53308 }, /* ADD.B #.B,Dn */ -{ CPUFUNC(op_d040_0), 0, 53312 }, /* ADD.W Dn,Dn */ -{ CPUFUNC(op_d048_0), 0, 53320 }, /* ADD.W An,Dn */ -{ CPUFUNC(op_d050_0), 0, 53328 }, /* ADD.W (An),Dn */ -{ CPUFUNC(op_d058_0), 0, 53336 }, /* ADD.W (An)+,Dn */ -{ CPUFUNC(op_d060_0), 0, 53344 }, /* ADD.W -(An),Dn */ -{ CPUFUNC(op_d068_0), 0, 53352 }, /* ADD.W (d16,An),Dn */ -{ CPUFUNC(op_d070_3), 0, 53360 }, /* ADD.W (d8,An,Xn),Dn */ -{ CPUFUNC(op_d078_0), 0, 53368 }, /* ADD.W (xxx).W,Dn */ -{ CPUFUNC(op_d079_0), 0, 53369 }, /* ADD.W (xxx).L,Dn */ -{ CPUFUNC(op_d07a_0), 0, 53370 }, /* ADD.W (d16,PC),Dn */ -{ CPUFUNC(op_d07b_3), 0, 53371 }, /* ADD.W (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d07c_0), 0, 53372 }, /* ADD.W #.W,Dn */ -{ CPUFUNC(op_d080_0), 0, 53376 }, /* ADD.L Dn,Dn */ -{ CPUFUNC(op_d088_0), 0, 53384 }, /* ADD.L An,Dn */ -{ CPUFUNC(op_d090_0), 0, 53392 }, /* ADD.L (An),Dn */ -{ CPUFUNC(op_d098_0), 0, 53400 }, /* ADD.L (An)+,Dn */ -{ CPUFUNC(op_d0a0_0), 0, 53408 }, /* ADD.L -(An),Dn */ -{ CPUFUNC(op_d0a8_0), 0, 53416 }, /* ADD.L (d16,An),Dn */ -{ CPUFUNC(op_d0b0_3), 0, 53424 }, /* ADD.L (d8,An,Xn),Dn */ -{ CPUFUNC(op_d0b8_0), 0, 53432 }, /* ADD.L (xxx).W,Dn */ -{ CPUFUNC(op_d0b9_0), 0, 53433 }, /* ADD.L (xxx).L,Dn */ -{ CPUFUNC(op_d0ba_0), 0, 53434 }, /* ADD.L (d16,PC),Dn */ -{ CPUFUNC(op_d0bb_3), 0, 53435 }, /* ADD.L (d8,PC,Xn),Dn */ -{ CPUFUNC(op_d0bc_0), 0, 53436 }, /* ADD.L #.L,Dn */ -{ CPUFUNC_FF(op_d0c0_0), 0, 53440 }, /* ADDA.W Dn,An */ -{ CPUFUNC_FF(op_d0c8_0), 0, 53448 }, /* ADDA.W An,An */ -{ CPUFUNC_FF(op_d0d0_0), 0, 53456 }, /* ADDA.W (An),An */ -{ CPUFUNC_FF(op_d0d8_0), 0, 53464 }, /* ADDA.W (An)+,An */ -{ CPUFUNC_FF(op_d0e0_0), 0, 53472 }, /* ADDA.W -(An),An */ -{ CPUFUNC_FF(op_d0e8_0), 0, 53480 }, /* ADDA.W (d16,An),An */ -{ CPUFUNC_FF(op_d0f0_3), 0, 53488 }, /* ADDA.W (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d0f8_0), 0, 53496 }, /* ADDA.W (xxx).W,An */ -{ CPUFUNC_FF(op_d0f9_0), 0, 53497 }, /* ADDA.W (xxx).L,An */ -{ CPUFUNC_FF(op_d0fa_0), 0, 53498 }, /* ADDA.W (d16,PC),An */ -{ CPUFUNC_FF(op_d0fb_3), 0, 53499 }, /* ADDA.W (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d0fc_0), 0, 53500 }, /* ADDA.W #.W,An */ -{ CPUFUNC(op_d100_0), 0, 53504 }, /* ADDX.B Dn,Dn */ -{ CPUFUNC(op_d108_0), 0, 53512 }, /* ADDX.B -(An),-(An) */ -{ CPUFUNC(op_d110_0), 0, 53520 }, /* ADD.B Dn,(An) */ -{ CPUFUNC(op_d118_0), 0, 53528 }, /* ADD.B Dn,(An)+ */ -{ CPUFUNC(op_d120_0), 0, 53536 }, /* ADD.B Dn,-(An) */ -{ CPUFUNC(op_d128_0), 0, 53544 }, /* ADD.B Dn,(d16,An) */ -{ CPUFUNC(op_d130_3), 0, 53552 }, /* ADD.B Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d138_0), 0, 53560 }, /* ADD.B Dn,(xxx).W */ -{ CPUFUNC(op_d139_0), 0, 53561 }, /* ADD.B Dn,(xxx).L */ -{ CPUFUNC(op_d140_0), 0, 53568 }, /* ADDX.W Dn,Dn */ -{ CPUFUNC(op_d148_0), 0, 53576 }, /* ADDX.W -(An),-(An) */ -{ CPUFUNC(op_d150_0), 0, 53584 }, /* ADD.W Dn,(An) */ -{ CPUFUNC(op_d158_0), 0, 53592 }, /* ADD.W Dn,(An)+ */ -{ CPUFUNC(op_d160_0), 0, 53600 }, /* ADD.W Dn,-(An) */ -{ CPUFUNC(op_d168_0), 0, 53608 }, /* ADD.W Dn,(d16,An) */ -{ CPUFUNC(op_d170_3), 0, 53616 }, /* ADD.W Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d178_0), 0, 53624 }, /* ADD.W Dn,(xxx).W */ -{ CPUFUNC(op_d179_0), 0, 53625 }, /* ADD.W Dn,(xxx).L */ -{ CPUFUNC(op_d180_0), 0, 53632 }, /* ADDX.L Dn,Dn */ -{ CPUFUNC(op_d188_0), 0, 53640 }, /* ADDX.L -(An),-(An) */ -{ CPUFUNC(op_d190_0), 0, 53648 }, /* ADD.L Dn,(An) */ -{ CPUFUNC(op_d198_0), 0, 53656 }, /* ADD.L Dn,(An)+ */ -{ CPUFUNC(op_d1a0_0), 0, 53664 }, /* ADD.L Dn,-(An) */ -{ CPUFUNC(op_d1a8_0), 0, 53672 }, /* ADD.L Dn,(d16,An) */ -{ CPUFUNC(op_d1b0_3), 0, 53680 }, /* ADD.L Dn,(d8,An,Xn) */ -{ CPUFUNC(op_d1b8_0), 0, 53688 }, /* ADD.L Dn,(xxx).W */ -{ CPUFUNC(op_d1b9_0), 0, 53689 }, /* ADD.L Dn,(xxx).L */ -{ CPUFUNC_FF(op_d1c0_0), 0, 53696 }, /* ADDA.L Dn,An */ -{ CPUFUNC_FF(op_d1c8_0), 0, 53704 }, /* ADDA.L An,An */ -{ CPUFUNC_FF(op_d1d0_0), 0, 53712 }, /* ADDA.L (An),An */ -{ CPUFUNC_FF(op_d1d8_0), 0, 53720 }, /* ADDA.L (An)+,An */ -{ CPUFUNC_FF(op_d1e0_0), 0, 53728 }, /* ADDA.L -(An),An */ -{ CPUFUNC_FF(op_d1e8_0), 0, 53736 }, /* ADDA.L (d16,An),An */ -{ CPUFUNC_FF(op_d1f0_3), 0, 53744 }, /* ADDA.L (d8,An,Xn),An */ -{ CPUFUNC_FF(op_d1f8_0), 0, 53752 }, /* ADDA.L (xxx).W,An */ -{ CPUFUNC_FF(op_d1f9_0), 0, 53753 }, /* ADDA.L (xxx).L,An */ -{ CPUFUNC_FF(op_d1fa_0), 0, 53754 }, /* ADDA.L (d16,PC),An */ -{ CPUFUNC_FF(op_d1fb_3), 0, 53755 }, /* ADDA.L (d8,PC,Xn),An */ -{ CPUFUNC_FF(op_d1fc_0), 0, 53756 }, /* ADDA.L #.L,An */ -{ CPUFUNC(op_e000_0), 0, 57344 }, /* ASR.B #,Dn */ -{ CPUFUNC(op_e008_0), 0, 57352 }, /* LSR.B #,Dn */ -{ CPUFUNC(op_e010_0), 0, 57360 }, /* ROXR.B #,Dn */ -{ CPUFUNC(op_e018_0), 0, 57368 }, /* ROR.B #,Dn */ -{ CPUFUNC(op_e020_0), 0, 57376 }, /* ASR.B Dn,Dn */ -{ CPUFUNC(op_e028_0), 0, 57384 }, /* LSR.B Dn,Dn */ -{ CPUFUNC(op_e030_0), 0, 57392 }, /* ROXR.B Dn,Dn */ -{ CPUFUNC(op_e038_0), 0, 57400 }, /* ROR.B Dn,Dn */ -{ CPUFUNC(op_e040_0), 0, 57408 }, /* ASR.W #,Dn */ -{ CPUFUNC(op_e048_0), 0, 57416 }, /* LSR.W #,Dn */ -{ CPUFUNC(op_e050_0), 0, 57424 }, /* ROXR.W #,Dn */ -{ CPUFUNC(op_e058_0), 0, 57432 }, /* ROR.W #,Dn */ -{ CPUFUNC(op_e060_0), 0, 57440 }, /* ASR.W Dn,Dn */ -{ CPUFUNC(op_e068_0), 0, 57448 }, /* LSR.W Dn,Dn */ -{ CPUFUNC(op_e070_0), 0, 57456 }, /* ROXR.W Dn,Dn */ -{ CPUFUNC(op_e078_0), 0, 57464 }, /* ROR.W Dn,Dn */ -{ CPUFUNC(op_e080_0), 0, 57472 }, /* ASR.L #,Dn */ -{ CPUFUNC(op_e088_0), 0, 57480 }, /* LSR.L #,Dn */ -{ CPUFUNC(op_e090_0), 0, 57488 }, /* ROXR.L #,Dn */ -{ CPUFUNC(op_e098_0), 0, 57496 }, /* ROR.L #,Dn */ -{ CPUFUNC(op_e0a0_0), 0, 57504 }, /* ASR.L Dn,Dn */ -{ CPUFUNC(op_e0a8_0), 0, 57512 }, /* LSR.L Dn,Dn */ -{ CPUFUNC(op_e0b0_0), 0, 57520 }, /* ROXR.L Dn,Dn */ -{ CPUFUNC(op_e0b8_0), 0, 57528 }, /* ROR.L Dn,Dn */ -{ CPUFUNC(op_e0d0_0), 0, 57552 }, /* ASRW.W (An) */ -{ CPUFUNC(op_e0d8_0), 0, 57560 }, /* ASRW.W (An)+ */ -{ CPUFUNC(op_e0e0_0), 0, 57568 }, /* ASRW.W -(An) */ -{ CPUFUNC(op_e0e8_0), 0, 57576 }, /* ASRW.W (d16,An) */ -{ CPUFUNC(op_e0f0_3), 0, 57584 }, /* ASRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e0f8_0), 0, 57592 }, /* ASRW.W (xxx).W */ -{ CPUFUNC(op_e0f9_0), 0, 57593 }, /* ASRW.W (xxx).L */ -{ CPUFUNC(op_e100_0), 0, 57600 }, /* ASL.B #,Dn */ -{ CPUFUNC(op_e108_0), 0, 57608 }, /* LSL.B #,Dn */ -{ CPUFUNC(op_e110_0), 0, 57616 }, /* ROXL.B #,Dn */ -{ CPUFUNC(op_e118_0), 0, 57624 }, /* ROL.B #,Dn */ -{ CPUFUNC(op_e120_0), 0, 57632 }, /* ASL.B Dn,Dn */ -{ CPUFUNC(op_e128_0), 0, 57640 }, /* LSL.B Dn,Dn */ -{ CPUFUNC(op_e130_0), 0, 57648 }, /* ROXL.B Dn,Dn */ -{ CPUFUNC(op_e138_0), 0, 57656 }, /* ROL.B Dn,Dn */ -{ CPUFUNC(op_e140_0), 0, 57664 }, /* ASL.W #,Dn */ -{ CPUFUNC(op_e148_0), 0, 57672 }, /* LSL.W #,Dn */ -{ CPUFUNC(op_e150_0), 0, 57680 }, /* ROXL.W #,Dn */ -{ CPUFUNC(op_e158_0), 0, 57688 }, /* ROL.W #,Dn */ -{ CPUFUNC(op_e160_0), 0, 57696 }, /* ASL.W Dn,Dn */ -{ CPUFUNC(op_e168_0), 0, 57704 }, /* LSL.W Dn,Dn */ -{ CPUFUNC(op_e170_0), 0, 57712 }, /* ROXL.W Dn,Dn */ -{ CPUFUNC(op_e178_0), 0, 57720 }, /* ROL.W Dn,Dn */ -{ CPUFUNC(op_e180_0), 0, 57728 }, /* ASL.L #,Dn */ -{ CPUFUNC(op_e188_0), 0, 57736 }, /* LSL.L #,Dn */ -{ CPUFUNC(op_e190_0), 0, 57744 }, /* ROXL.L #,Dn */ -{ CPUFUNC(op_e198_0), 0, 57752 }, /* ROL.L #,Dn */ -{ CPUFUNC(op_e1a0_0), 0, 57760 }, /* ASL.L Dn,Dn */ -{ CPUFUNC(op_e1a8_0), 0, 57768 }, /* LSL.L Dn,Dn */ -{ CPUFUNC(op_e1b0_0), 0, 57776 }, /* ROXL.L Dn,Dn */ -{ CPUFUNC(op_e1b8_0), 0, 57784 }, /* ROL.L Dn,Dn */ -{ CPUFUNC(op_e1d0_0), 0, 57808 }, /* ASLW.W (An) */ -{ CPUFUNC(op_e1d8_0), 0, 57816 }, /* ASLW.W (An)+ */ -{ CPUFUNC(op_e1e0_0), 0, 57824 }, /* ASLW.W -(An) */ -{ CPUFUNC(op_e1e8_0), 0, 57832 }, /* ASLW.W (d16,An) */ -{ CPUFUNC(op_e1f0_3), 0, 57840 }, /* ASLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e1f8_0), 0, 57848 }, /* ASLW.W (xxx).W */ -{ CPUFUNC(op_e1f9_0), 0, 57849 }, /* ASLW.W (xxx).L */ -{ CPUFUNC(op_e2d0_0), 0, 58064 }, /* LSRW.W (An) */ -{ CPUFUNC(op_e2d8_0), 0, 58072 }, /* LSRW.W (An)+ */ -{ CPUFUNC(op_e2e0_0), 0, 58080 }, /* LSRW.W -(An) */ -{ CPUFUNC(op_e2e8_0), 0, 58088 }, /* LSRW.W (d16,An) */ -{ CPUFUNC(op_e2f0_3), 0, 58096 }, /* LSRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e2f8_0), 0, 58104 }, /* LSRW.W (xxx).W */ -{ CPUFUNC(op_e2f9_0), 0, 58105 }, /* LSRW.W (xxx).L */ -{ CPUFUNC(op_e3d0_0), 0, 58320 }, /* LSLW.W (An) */ -{ CPUFUNC(op_e3d8_0), 0, 58328 }, /* LSLW.W (An)+ */ -{ CPUFUNC(op_e3e0_0), 0, 58336 }, /* LSLW.W -(An) */ -{ CPUFUNC(op_e3e8_0), 0, 58344 }, /* LSLW.W (d16,An) */ -{ CPUFUNC(op_e3f0_3), 0, 58352 }, /* LSLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e3f8_0), 0, 58360 }, /* LSLW.W (xxx).W */ -{ CPUFUNC(op_e3f9_0), 0, 58361 }, /* LSLW.W (xxx).L */ -{ CPUFUNC(op_e4d0_0), 0, 58576 }, /* ROXRW.W (An) */ -{ CPUFUNC(op_e4d8_0), 0, 58584 }, /* ROXRW.W (An)+ */ -{ CPUFUNC(op_e4e0_0), 0, 58592 }, /* ROXRW.W -(An) */ -{ CPUFUNC(op_e4e8_0), 0, 58600 }, /* ROXRW.W (d16,An) */ -{ CPUFUNC(op_e4f0_3), 0, 58608 }, /* ROXRW.W (d8,An,Xn) */ -{ CPUFUNC(op_e4f8_0), 0, 58616 }, /* ROXRW.W (xxx).W */ -{ CPUFUNC(op_e4f9_0), 0, 58617 }, /* ROXRW.W (xxx).L */ -{ CPUFUNC(op_e5d0_0), 0, 58832 }, /* ROXLW.W (An) */ -{ CPUFUNC(op_e5d8_0), 0, 58840 }, /* ROXLW.W (An)+ */ -{ CPUFUNC(op_e5e0_0), 0, 58848 }, /* ROXLW.W -(An) */ -{ CPUFUNC(op_e5e8_0), 0, 58856 }, /* ROXLW.W (d16,An) */ -{ CPUFUNC(op_e5f0_3), 0, 58864 }, /* ROXLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e5f8_0), 0, 58872 }, /* ROXLW.W (xxx).W */ -{ CPUFUNC(op_e5f9_0), 0, 58873 }, /* ROXLW.W (xxx).L */ -{ CPUFUNC(op_e6d0_0), 0, 59088 }, /* RORW.W (An) */ -{ CPUFUNC(op_e6d8_0), 0, 59096 }, /* RORW.W (An)+ */ -{ CPUFUNC(op_e6e0_0), 0, 59104 }, /* RORW.W -(An) */ -{ CPUFUNC(op_e6e8_0), 0, 59112 }, /* RORW.W (d16,An) */ -{ CPUFUNC(op_e6f0_3), 0, 59120 }, /* RORW.W (d8,An,Xn) */ -{ CPUFUNC(op_e6f8_0), 0, 59128 }, /* RORW.W (xxx).W */ -{ CPUFUNC(op_e6f9_0), 0, 59129 }, /* RORW.W (xxx).L */ -{ CPUFUNC(op_e7d0_0), 0, 59344 }, /* ROLW.W (An) */ -{ CPUFUNC(op_e7d8_0), 0, 59352 }, /* ROLW.W (An)+ */ -{ CPUFUNC(op_e7e0_0), 0, 59360 }, /* ROLW.W -(An) */ -{ CPUFUNC(op_e7e8_0), 0, 59368 }, /* ROLW.W (d16,An) */ -{ CPUFUNC(op_e7f0_3), 0, 59376 }, /* ROLW.W (d8,An,Xn) */ -{ CPUFUNC(op_e7f8_0), 0, 59384 }, /* ROLW.W (xxx).W */ -{ CPUFUNC(op_e7f9_0), 0, 59385 }, /* ROLW.W (xxx).L */ -{ 0, 0, 0 }}; diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp deleted file mode 100644 index e59ae0f0f..000000000 --- a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define NOFLAGS -#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cputbl.h b/BasiliskII/src/uae_cpu/cputbl.h deleted file mode 100644 index 421a51d37..000000000 --- a/BasiliskII/src/uae_cpu/cputbl.h +++ /dev/null @@ -1,4322 +0,0 @@ -extern cpuop_func op_0_0_nf; -extern cpuop_func op_0_0_ff; -extern cpuop_func op_10_0_nf; -extern cpuop_func op_10_0_ff; -extern cpuop_func op_18_0_nf; -extern cpuop_func op_18_0_ff; -extern cpuop_func op_20_0_nf; -extern cpuop_func op_20_0_ff; -extern cpuop_func op_28_0_nf; -extern cpuop_func op_28_0_ff; -extern cpuop_func op_30_0_nf; -extern cpuop_func op_30_0_ff; -extern cpuop_func op_38_0_nf; -extern cpuop_func op_38_0_ff; -extern cpuop_func op_39_0_nf; -extern cpuop_func op_39_0_ff; -extern cpuop_func op_3c_0_nf; -extern cpuop_func op_3c_0_ff; -extern cpuop_func op_40_0_nf; -extern cpuop_func op_40_0_ff; -extern cpuop_func op_50_0_nf; -extern cpuop_func op_50_0_ff; -extern cpuop_func op_58_0_nf; -extern cpuop_func op_58_0_ff; -extern cpuop_func op_60_0_nf; -extern cpuop_func op_60_0_ff; -extern cpuop_func op_68_0_nf; -extern cpuop_func op_68_0_ff; -extern cpuop_func op_70_0_nf; -extern cpuop_func op_70_0_ff; -extern cpuop_func op_78_0_nf; -extern cpuop_func op_78_0_ff; -extern cpuop_func op_79_0_nf; -extern cpuop_func op_79_0_ff; -extern cpuop_func op_7c_0_nf; -extern cpuop_func op_7c_0_ff; -extern cpuop_func op_80_0_nf; -extern cpuop_func op_80_0_ff; -extern cpuop_func op_90_0_nf; -extern cpuop_func op_90_0_ff; -extern cpuop_func op_98_0_nf; -extern cpuop_func op_98_0_ff; -extern cpuop_func op_a0_0_nf; -extern cpuop_func op_a0_0_ff; -extern cpuop_func op_a8_0_nf; -extern cpuop_func op_a8_0_ff; -extern cpuop_func op_b0_0_nf; -extern cpuop_func op_b0_0_ff; -extern cpuop_func op_b8_0_nf; -extern cpuop_func op_b8_0_ff; -extern cpuop_func op_b9_0_nf; -extern cpuop_func op_b9_0_ff; -extern cpuop_func op_d0_0_nf; -extern cpuop_func op_d0_0_ff; -extern cpuop_func op_e8_0_nf; -extern cpuop_func op_e8_0_ff; -extern cpuop_func op_f0_0_nf; -extern cpuop_func op_f0_0_ff; -extern cpuop_func op_f8_0_nf; -extern cpuop_func op_f8_0_ff; -extern cpuop_func op_f9_0_nf; -extern cpuop_func op_f9_0_ff; -extern cpuop_func op_fa_0_nf; -extern cpuop_func op_fa_0_ff; -extern cpuop_func op_fb_0_nf; -extern cpuop_func op_fb_0_ff; -extern cpuop_func op_100_0_nf; -extern cpuop_func op_100_0_ff; -extern cpuop_func op_108_0_nf; -extern cpuop_func op_108_0_ff; -extern cpuop_func op_110_0_nf; -extern cpuop_func op_110_0_ff; -extern cpuop_func op_118_0_nf; -extern cpuop_func op_118_0_ff; -extern cpuop_func op_120_0_nf; -extern cpuop_func op_120_0_ff; -extern cpuop_func op_128_0_nf; -extern cpuop_func op_128_0_ff; -extern cpuop_func op_130_0_nf; -extern cpuop_func op_130_0_ff; -extern cpuop_func op_138_0_nf; -extern cpuop_func op_138_0_ff; -extern cpuop_func op_139_0_nf; -extern cpuop_func op_139_0_ff; -extern cpuop_func op_13a_0_nf; -extern cpuop_func op_13a_0_ff; -extern cpuop_func op_13b_0_nf; -extern cpuop_func op_13b_0_ff; -extern cpuop_func op_13c_0_nf; -extern cpuop_func op_13c_0_ff; -extern cpuop_func op_140_0_nf; -extern cpuop_func op_140_0_ff; -extern cpuop_func op_148_0_nf; -extern cpuop_func op_148_0_ff; -extern cpuop_func op_150_0_nf; -extern cpuop_func op_150_0_ff; -extern cpuop_func op_158_0_nf; -extern cpuop_func op_158_0_ff; -extern cpuop_func op_160_0_nf; -extern cpuop_func op_160_0_ff; -extern cpuop_func op_168_0_nf; -extern cpuop_func op_168_0_ff; -extern cpuop_func op_170_0_nf; -extern cpuop_func op_170_0_ff; -extern cpuop_func op_178_0_nf; -extern cpuop_func op_178_0_ff; -extern cpuop_func op_179_0_nf; -extern cpuop_func op_179_0_ff; -extern cpuop_func op_17a_0_nf; -extern cpuop_func op_17a_0_ff; -extern cpuop_func op_17b_0_nf; -extern cpuop_func op_17b_0_ff; -extern cpuop_func op_180_0_nf; -extern cpuop_func op_180_0_ff; -extern cpuop_func op_188_0_nf; -extern cpuop_func op_188_0_ff; -extern cpuop_func op_190_0_nf; -extern cpuop_func op_190_0_ff; -extern cpuop_func op_198_0_nf; -extern cpuop_func op_198_0_ff; -extern cpuop_func op_1a0_0_nf; -extern cpuop_func op_1a0_0_ff; -extern cpuop_func op_1a8_0_nf; -extern cpuop_func op_1a8_0_ff; -extern cpuop_func op_1b0_0_nf; -extern cpuop_func op_1b0_0_ff; -extern cpuop_func op_1b8_0_nf; -extern cpuop_func op_1b8_0_ff; -extern cpuop_func op_1b9_0_nf; -extern cpuop_func op_1b9_0_ff; -extern cpuop_func op_1ba_0_nf; -extern cpuop_func op_1ba_0_ff; -extern cpuop_func op_1bb_0_nf; -extern cpuop_func op_1bb_0_ff; -extern cpuop_func op_1c0_0_nf; -extern cpuop_func op_1c0_0_ff; -extern cpuop_func op_1c8_0_nf; -extern cpuop_func op_1c8_0_ff; -extern cpuop_func op_1d0_0_nf; -extern cpuop_func op_1d0_0_ff; -extern cpuop_func op_1d8_0_nf; -extern cpuop_func op_1d8_0_ff; -extern cpuop_func op_1e0_0_nf; -extern cpuop_func op_1e0_0_ff; -extern cpuop_func op_1e8_0_nf; -extern cpuop_func op_1e8_0_ff; -extern cpuop_func op_1f0_0_nf; -extern cpuop_func op_1f0_0_ff; -extern cpuop_func op_1f8_0_nf; -extern cpuop_func op_1f8_0_ff; -extern cpuop_func op_1f9_0_nf; -extern cpuop_func op_1f9_0_ff; -extern cpuop_func op_1fa_0_nf; -extern cpuop_func op_1fa_0_ff; -extern cpuop_func op_1fb_0_nf; -extern cpuop_func op_1fb_0_ff; -extern cpuop_func op_200_0_nf; -extern cpuop_func op_200_0_ff; -extern cpuop_func op_210_0_nf; -extern cpuop_func op_210_0_ff; -extern cpuop_func op_218_0_nf; -extern cpuop_func op_218_0_ff; -extern cpuop_func op_220_0_nf; -extern cpuop_func op_220_0_ff; -extern cpuop_func op_228_0_nf; -extern cpuop_func op_228_0_ff; -extern cpuop_func op_230_0_nf; -extern cpuop_func op_230_0_ff; -extern cpuop_func op_238_0_nf; -extern cpuop_func op_238_0_ff; -extern cpuop_func op_239_0_nf; -extern cpuop_func op_239_0_ff; -extern cpuop_func op_23c_0_nf; -extern cpuop_func op_23c_0_ff; -extern cpuop_func op_240_0_nf; -extern cpuop_func op_240_0_ff; -extern cpuop_func op_250_0_nf; -extern cpuop_func op_250_0_ff; -extern cpuop_func op_258_0_nf; -extern cpuop_func op_258_0_ff; -extern cpuop_func op_260_0_nf; -extern cpuop_func op_260_0_ff; -extern cpuop_func op_268_0_nf; -extern cpuop_func op_268_0_ff; -extern cpuop_func op_270_0_nf; -extern cpuop_func op_270_0_ff; -extern cpuop_func op_278_0_nf; -extern cpuop_func op_278_0_ff; -extern cpuop_func op_279_0_nf; -extern cpuop_func op_279_0_ff; -extern cpuop_func op_27c_0_nf; -extern cpuop_func op_27c_0_ff; -extern cpuop_func op_280_0_nf; -extern cpuop_func op_280_0_ff; -extern cpuop_func op_290_0_nf; -extern cpuop_func op_290_0_ff; -extern cpuop_func op_298_0_nf; -extern cpuop_func op_298_0_ff; -extern cpuop_func op_2a0_0_nf; -extern cpuop_func op_2a0_0_ff; -extern cpuop_func op_2a8_0_nf; -extern cpuop_func op_2a8_0_ff; -extern cpuop_func op_2b0_0_nf; -extern cpuop_func op_2b0_0_ff; -extern cpuop_func op_2b8_0_nf; -extern cpuop_func op_2b8_0_ff; -extern cpuop_func op_2b9_0_nf; -extern cpuop_func op_2b9_0_ff; -extern cpuop_func op_2d0_0_nf; -extern cpuop_func op_2d0_0_ff; -extern cpuop_func op_2e8_0_nf; -extern cpuop_func op_2e8_0_ff; -extern cpuop_func op_2f0_0_nf; -extern cpuop_func op_2f0_0_ff; -extern cpuop_func op_2f8_0_nf; -extern cpuop_func op_2f8_0_ff; -extern cpuop_func op_2f9_0_nf; -extern cpuop_func op_2f9_0_ff; -extern cpuop_func op_2fa_0_nf; -extern cpuop_func op_2fa_0_ff; -extern cpuop_func op_2fb_0_nf; -extern cpuop_func op_2fb_0_ff; -extern cpuop_func op_400_0_nf; -extern cpuop_func op_400_0_ff; -extern cpuop_func op_410_0_nf; -extern cpuop_func op_410_0_ff; -extern cpuop_func op_418_0_nf; -extern cpuop_func op_418_0_ff; -extern cpuop_func op_420_0_nf; -extern cpuop_func op_420_0_ff; -extern cpuop_func op_428_0_nf; -extern cpuop_func op_428_0_ff; -extern cpuop_func op_430_0_nf; -extern cpuop_func op_430_0_ff; -extern cpuop_func op_438_0_nf; -extern cpuop_func op_438_0_ff; -extern cpuop_func op_439_0_nf; -extern cpuop_func op_439_0_ff; -extern cpuop_func op_440_0_nf; -extern cpuop_func op_440_0_ff; -extern cpuop_func op_450_0_nf; -extern cpuop_func op_450_0_ff; -extern cpuop_func op_458_0_nf; -extern cpuop_func op_458_0_ff; -extern cpuop_func op_460_0_nf; -extern cpuop_func op_460_0_ff; -extern cpuop_func op_468_0_nf; -extern cpuop_func op_468_0_ff; -extern cpuop_func op_470_0_nf; -extern cpuop_func op_470_0_ff; -extern cpuop_func op_478_0_nf; -extern cpuop_func op_478_0_ff; -extern cpuop_func op_479_0_nf; -extern cpuop_func op_479_0_ff; -extern cpuop_func op_480_0_nf; -extern cpuop_func op_480_0_ff; -extern cpuop_func op_490_0_nf; -extern cpuop_func op_490_0_ff; -extern cpuop_func op_498_0_nf; -extern cpuop_func op_498_0_ff; -extern cpuop_func op_4a0_0_nf; -extern cpuop_func op_4a0_0_ff; -extern cpuop_func op_4a8_0_nf; -extern cpuop_func op_4a8_0_ff; -extern cpuop_func op_4b0_0_nf; -extern cpuop_func op_4b0_0_ff; -extern cpuop_func op_4b8_0_nf; -extern cpuop_func op_4b8_0_ff; -extern cpuop_func op_4b9_0_nf; -extern cpuop_func op_4b9_0_ff; -extern cpuop_func op_4d0_0_nf; -extern cpuop_func op_4d0_0_ff; -extern cpuop_func op_4e8_0_nf; -extern cpuop_func op_4e8_0_ff; -extern cpuop_func op_4f0_0_nf; -extern cpuop_func op_4f0_0_ff; -extern cpuop_func op_4f8_0_nf; -extern cpuop_func op_4f8_0_ff; -extern cpuop_func op_4f9_0_nf; -extern cpuop_func op_4f9_0_ff; -extern cpuop_func op_4fa_0_nf; -extern cpuop_func op_4fa_0_ff; -extern cpuop_func op_4fb_0_nf; -extern cpuop_func op_4fb_0_ff; -extern cpuop_func op_600_0_nf; -extern cpuop_func op_600_0_ff; -extern cpuop_func op_610_0_nf; -extern cpuop_func op_610_0_ff; -extern cpuop_func op_618_0_nf; -extern cpuop_func op_618_0_ff; -extern cpuop_func op_620_0_nf; -extern cpuop_func op_620_0_ff; -extern cpuop_func op_628_0_nf; -extern cpuop_func op_628_0_ff; -extern cpuop_func op_630_0_nf; -extern cpuop_func op_630_0_ff; -extern cpuop_func op_638_0_nf; -extern cpuop_func op_638_0_ff; -extern cpuop_func op_639_0_nf; -extern cpuop_func op_639_0_ff; -extern cpuop_func op_640_0_nf; -extern cpuop_func op_640_0_ff; -extern cpuop_func op_650_0_nf; -extern cpuop_func op_650_0_ff; -extern cpuop_func op_658_0_nf; -extern cpuop_func op_658_0_ff; -extern cpuop_func op_660_0_nf; -extern cpuop_func op_660_0_ff; -extern cpuop_func op_668_0_nf; -extern cpuop_func op_668_0_ff; -extern cpuop_func op_670_0_nf; -extern cpuop_func op_670_0_ff; -extern cpuop_func op_678_0_nf; -extern cpuop_func op_678_0_ff; -extern cpuop_func op_679_0_nf; -extern cpuop_func op_679_0_ff; -extern cpuop_func op_680_0_nf; -extern cpuop_func op_680_0_ff; -extern cpuop_func op_690_0_nf; -extern cpuop_func op_690_0_ff; -extern cpuop_func op_698_0_nf; -extern cpuop_func op_698_0_ff; -extern cpuop_func op_6a0_0_nf; -extern cpuop_func op_6a0_0_ff; -extern cpuop_func op_6a8_0_nf; -extern cpuop_func op_6a8_0_ff; -extern cpuop_func op_6b0_0_nf; -extern cpuop_func op_6b0_0_ff; -extern cpuop_func op_6b8_0_nf; -extern cpuop_func op_6b8_0_ff; -extern cpuop_func op_6b9_0_nf; -extern cpuop_func op_6b9_0_ff; -extern cpuop_func op_6c0_0_nf; -extern cpuop_func op_6c0_0_ff; -extern cpuop_func op_6c8_0_nf; -extern cpuop_func op_6c8_0_ff; -extern cpuop_func op_6d0_0_nf; -extern cpuop_func op_6d0_0_ff; -extern cpuop_func op_6e8_0_nf; -extern cpuop_func op_6e8_0_ff; -extern cpuop_func op_6f0_0_nf; -extern cpuop_func op_6f0_0_ff; -extern cpuop_func op_6f8_0_nf; -extern cpuop_func op_6f8_0_ff; -extern cpuop_func op_6f9_0_nf; -extern cpuop_func op_6f9_0_ff; -extern cpuop_func op_6fa_0_nf; -extern cpuop_func op_6fa_0_ff; -extern cpuop_func op_6fb_0_nf; -extern cpuop_func op_6fb_0_ff; -extern cpuop_func op_800_0_nf; -extern cpuop_func op_800_0_ff; -extern cpuop_func op_810_0_nf; -extern cpuop_func op_810_0_ff; -extern cpuop_func op_818_0_nf; -extern cpuop_func op_818_0_ff; -extern cpuop_func op_820_0_nf; -extern cpuop_func op_820_0_ff; -extern cpuop_func op_828_0_nf; -extern cpuop_func op_828_0_ff; -extern cpuop_func op_830_0_nf; -extern cpuop_func op_830_0_ff; -extern cpuop_func op_838_0_nf; -extern cpuop_func op_838_0_ff; -extern cpuop_func op_839_0_nf; -extern cpuop_func op_839_0_ff; -extern cpuop_func op_83a_0_nf; -extern cpuop_func op_83a_0_ff; -extern cpuop_func op_83b_0_nf; -extern cpuop_func op_83b_0_ff; -extern cpuop_func op_83c_0_nf; -extern cpuop_func op_83c_0_ff; -extern cpuop_func op_840_0_nf; -extern cpuop_func op_840_0_ff; -extern cpuop_func op_850_0_nf; -extern cpuop_func op_850_0_ff; -extern cpuop_func op_858_0_nf; -extern cpuop_func op_858_0_ff; -extern cpuop_func op_860_0_nf; -extern cpuop_func op_860_0_ff; -extern cpuop_func op_868_0_nf; -extern cpuop_func op_868_0_ff; -extern cpuop_func op_870_0_nf; -extern cpuop_func op_870_0_ff; -extern cpuop_func op_878_0_nf; -extern cpuop_func op_878_0_ff; -extern cpuop_func op_879_0_nf; -extern cpuop_func op_879_0_ff; -extern cpuop_func op_87a_0_nf; -extern cpuop_func op_87a_0_ff; -extern cpuop_func op_87b_0_nf; -extern cpuop_func op_87b_0_ff; -extern cpuop_func op_880_0_nf; -extern cpuop_func op_880_0_ff; -extern cpuop_func op_890_0_nf; -extern cpuop_func op_890_0_ff; -extern cpuop_func op_898_0_nf; -extern cpuop_func op_898_0_ff; -extern cpuop_func op_8a0_0_nf; -extern cpuop_func op_8a0_0_ff; -extern cpuop_func op_8a8_0_nf; -extern cpuop_func op_8a8_0_ff; -extern cpuop_func op_8b0_0_nf; -extern cpuop_func op_8b0_0_ff; -extern cpuop_func op_8b8_0_nf; -extern cpuop_func op_8b8_0_ff; -extern cpuop_func op_8b9_0_nf; -extern cpuop_func op_8b9_0_ff; -extern cpuop_func op_8ba_0_nf; -extern cpuop_func op_8ba_0_ff; -extern cpuop_func op_8bb_0_nf; -extern cpuop_func op_8bb_0_ff; -extern cpuop_func op_8c0_0_nf; -extern cpuop_func op_8c0_0_ff; -extern cpuop_func op_8d0_0_nf; -extern cpuop_func op_8d0_0_ff; -extern cpuop_func op_8d8_0_nf; -extern cpuop_func op_8d8_0_ff; -extern cpuop_func op_8e0_0_nf; -extern cpuop_func op_8e0_0_ff; -extern cpuop_func op_8e8_0_nf; -extern cpuop_func op_8e8_0_ff; -extern cpuop_func op_8f0_0_nf; -extern cpuop_func op_8f0_0_ff; -extern cpuop_func op_8f8_0_nf; -extern cpuop_func op_8f8_0_ff; -extern cpuop_func op_8f9_0_nf; -extern cpuop_func op_8f9_0_ff; -extern cpuop_func op_8fa_0_nf; -extern cpuop_func op_8fa_0_ff; -extern cpuop_func op_8fb_0_nf; -extern cpuop_func op_8fb_0_ff; -extern cpuop_func op_a00_0_nf; -extern cpuop_func op_a00_0_ff; -extern cpuop_func op_a10_0_nf; -extern cpuop_func op_a10_0_ff; -extern cpuop_func op_a18_0_nf; -extern cpuop_func op_a18_0_ff; -extern cpuop_func op_a20_0_nf; -extern cpuop_func op_a20_0_ff; -extern cpuop_func op_a28_0_nf; -extern cpuop_func op_a28_0_ff; -extern cpuop_func op_a30_0_nf; -extern cpuop_func op_a30_0_ff; -extern cpuop_func op_a38_0_nf; -extern cpuop_func op_a38_0_ff; -extern cpuop_func op_a39_0_nf; -extern cpuop_func op_a39_0_ff; -extern cpuop_func op_a3c_0_nf; -extern cpuop_func op_a3c_0_ff; -extern cpuop_func op_a40_0_nf; -extern cpuop_func op_a40_0_ff; -extern cpuop_func op_a50_0_nf; -extern cpuop_func op_a50_0_ff; -extern cpuop_func op_a58_0_nf; -extern cpuop_func op_a58_0_ff; -extern cpuop_func op_a60_0_nf; -extern cpuop_func op_a60_0_ff; -extern cpuop_func op_a68_0_nf; -extern cpuop_func op_a68_0_ff; -extern cpuop_func op_a70_0_nf; -extern cpuop_func op_a70_0_ff; -extern cpuop_func op_a78_0_nf; -extern cpuop_func op_a78_0_ff; -extern cpuop_func op_a79_0_nf; -extern cpuop_func op_a79_0_ff; -extern cpuop_func op_a7c_0_nf; -extern cpuop_func op_a7c_0_ff; -extern cpuop_func op_a80_0_nf; -extern cpuop_func op_a80_0_ff; -extern cpuop_func op_a90_0_nf; -extern cpuop_func op_a90_0_ff; -extern cpuop_func op_a98_0_nf; -extern cpuop_func op_a98_0_ff; -extern cpuop_func op_aa0_0_nf; -extern cpuop_func op_aa0_0_ff; -extern cpuop_func op_aa8_0_nf; -extern cpuop_func op_aa8_0_ff; -extern cpuop_func op_ab0_0_nf; -extern cpuop_func op_ab0_0_ff; -extern cpuop_func op_ab8_0_nf; -extern cpuop_func op_ab8_0_ff; -extern cpuop_func op_ab9_0_nf; -extern cpuop_func op_ab9_0_ff; -extern cpuop_func op_ad0_0_nf; -extern cpuop_func op_ad0_0_ff; -extern cpuop_func op_ad8_0_nf; -extern cpuop_func op_ad8_0_ff; -extern cpuop_func op_ae0_0_nf; -extern cpuop_func op_ae0_0_ff; -extern cpuop_func op_ae8_0_nf; -extern cpuop_func op_ae8_0_ff; -extern cpuop_func op_af0_0_nf; -extern cpuop_func op_af0_0_ff; -extern cpuop_func op_af8_0_nf; -extern cpuop_func op_af8_0_ff; -extern cpuop_func op_af9_0_nf; -extern cpuop_func op_af9_0_ff; -extern cpuop_func op_c00_0_nf; -extern cpuop_func op_c00_0_ff; -extern cpuop_func op_c10_0_nf; -extern cpuop_func op_c10_0_ff; -extern cpuop_func op_c18_0_nf; -extern cpuop_func op_c18_0_ff; -extern cpuop_func op_c20_0_nf; -extern cpuop_func op_c20_0_ff; -extern cpuop_func op_c28_0_nf; -extern cpuop_func op_c28_0_ff; -extern cpuop_func op_c30_0_nf; -extern cpuop_func op_c30_0_ff; -extern cpuop_func op_c38_0_nf; -extern cpuop_func op_c38_0_ff; -extern cpuop_func op_c39_0_nf; -extern cpuop_func op_c39_0_ff; -extern cpuop_func op_c3a_0_nf; -extern cpuop_func op_c3a_0_ff; -extern cpuop_func op_c3b_0_nf; -extern cpuop_func op_c3b_0_ff; -extern cpuop_func op_c40_0_nf; -extern cpuop_func op_c40_0_ff; -extern cpuop_func op_c50_0_nf; -extern cpuop_func op_c50_0_ff; -extern cpuop_func op_c58_0_nf; -extern cpuop_func op_c58_0_ff; -extern cpuop_func op_c60_0_nf; -extern cpuop_func op_c60_0_ff; -extern cpuop_func op_c68_0_nf; -extern cpuop_func op_c68_0_ff; -extern cpuop_func op_c70_0_nf; -extern cpuop_func op_c70_0_ff; -extern cpuop_func op_c78_0_nf; -extern cpuop_func op_c78_0_ff; -extern cpuop_func op_c79_0_nf; -extern cpuop_func op_c79_0_ff; -extern cpuop_func op_c7a_0_nf; -extern cpuop_func op_c7a_0_ff; -extern cpuop_func op_c7b_0_nf; -extern cpuop_func op_c7b_0_ff; -extern cpuop_func op_c80_0_nf; -extern cpuop_func op_c80_0_ff; -extern cpuop_func op_c90_0_nf; -extern cpuop_func op_c90_0_ff; -extern cpuop_func op_c98_0_nf; -extern cpuop_func op_c98_0_ff; -extern cpuop_func op_ca0_0_nf; -extern cpuop_func op_ca0_0_ff; -extern cpuop_func op_ca8_0_nf; -extern cpuop_func op_ca8_0_ff; -extern cpuop_func op_cb0_0_nf; -extern cpuop_func op_cb0_0_ff; -extern cpuop_func op_cb8_0_nf; -extern cpuop_func op_cb8_0_ff; -extern cpuop_func op_cb9_0_nf; -extern cpuop_func op_cb9_0_ff; -extern cpuop_func op_cba_0_nf; -extern cpuop_func op_cba_0_ff; -extern cpuop_func op_cbb_0_nf; -extern cpuop_func op_cbb_0_ff; -extern cpuop_func op_cd0_0_nf; -extern cpuop_func op_cd0_0_ff; -extern cpuop_func op_cd8_0_nf; -extern cpuop_func op_cd8_0_ff; -extern cpuop_func op_ce0_0_nf; -extern cpuop_func op_ce0_0_ff; -extern cpuop_func op_ce8_0_nf; -extern cpuop_func op_ce8_0_ff; -extern cpuop_func op_cf0_0_nf; -extern cpuop_func op_cf0_0_ff; -extern cpuop_func op_cf8_0_nf; -extern cpuop_func op_cf8_0_ff; -extern cpuop_func op_cf9_0_nf; -extern cpuop_func op_cf9_0_ff; -extern cpuop_func op_cfc_0_nf; -extern cpuop_func op_cfc_0_ff; -extern cpuop_func op_e10_0_nf; -extern cpuop_func op_e10_0_ff; -extern cpuop_func op_e18_0_nf; -extern cpuop_func op_e18_0_ff; -extern cpuop_func op_e20_0_nf; -extern cpuop_func op_e20_0_ff; -extern cpuop_func op_e28_0_nf; -extern cpuop_func op_e28_0_ff; -extern cpuop_func op_e30_0_nf; -extern cpuop_func op_e30_0_ff; -extern cpuop_func op_e38_0_nf; -extern cpuop_func op_e38_0_ff; -extern cpuop_func op_e39_0_nf; -extern cpuop_func op_e39_0_ff; -extern cpuop_func op_e50_0_nf; -extern cpuop_func op_e50_0_ff; -extern cpuop_func op_e58_0_nf; -extern cpuop_func op_e58_0_ff; -extern cpuop_func op_e60_0_nf; -extern cpuop_func op_e60_0_ff; -extern cpuop_func op_e68_0_nf; -extern cpuop_func op_e68_0_ff; -extern cpuop_func op_e70_0_nf; -extern cpuop_func op_e70_0_ff; -extern cpuop_func op_e78_0_nf; -extern cpuop_func op_e78_0_ff; -extern cpuop_func op_e79_0_nf; -extern cpuop_func op_e79_0_ff; -extern cpuop_func op_e90_0_nf; -extern cpuop_func op_e90_0_ff; -extern cpuop_func op_e98_0_nf; -extern cpuop_func op_e98_0_ff; -extern cpuop_func op_ea0_0_nf; -extern cpuop_func op_ea0_0_ff; -extern cpuop_func op_ea8_0_nf; -extern cpuop_func op_ea8_0_ff; -extern cpuop_func op_eb0_0_nf; -extern cpuop_func op_eb0_0_ff; -extern cpuop_func op_eb8_0_nf; -extern cpuop_func op_eb8_0_ff; -extern cpuop_func op_eb9_0_nf; -extern cpuop_func op_eb9_0_ff; -extern cpuop_func op_ed0_0_nf; -extern cpuop_func op_ed0_0_ff; -extern cpuop_func op_ed8_0_nf; -extern cpuop_func op_ed8_0_ff; -extern cpuop_func op_ee0_0_nf; -extern cpuop_func op_ee0_0_ff; -extern cpuop_func op_ee8_0_nf; -extern cpuop_func op_ee8_0_ff; -extern cpuop_func op_ef0_0_nf; -extern cpuop_func op_ef0_0_ff; -extern cpuop_func op_ef8_0_nf; -extern cpuop_func op_ef8_0_ff; -extern cpuop_func op_ef9_0_nf; -extern cpuop_func op_ef9_0_ff; -extern cpuop_func op_efc_0_nf; -extern cpuop_func op_efc_0_ff; -extern cpuop_func op_1000_0_nf; -extern cpuop_func op_1000_0_ff; -extern cpuop_func op_1010_0_nf; -extern cpuop_func op_1010_0_ff; -extern cpuop_func op_1018_0_nf; -extern cpuop_func op_1018_0_ff; -extern cpuop_func op_1020_0_nf; -extern cpuop_func op_1020_0_ff; -extern cpuop_func op_1028_0_nf; -extern cpuop_func op_1028_0_ff; -extern cpuop_func op_1030_0_nf; -extern cpuop_func op_1030_0_ff; -extern cpuop_func op_1038_0_nf; -extern cpuop_func op_1038_0_ff; -extern cpuop_func op_1039_0_nf; -extern cpuop_func op_1039_0_ff; -extern cpuop_func op_103a_0_nf; -extern cpuop_func op_103a_0_ff; -extern cpuop_func op_103b_0_nf; -extern cpuop_func op_103b_0_ff; -extern cpuop_func op_103c_0_nf; -extern cpuop_func op_103c_0_ff; -extern cpuop_func op_1080_0_nf; -extern cpuop_func op_1080_0_ff; -extern cpuop_func op_1090_0_nf; -extern cpuop_func op_1090_0_ff; -extern cpuop_func op_1098_0_nf; -extern cpuop_func op_1098_0_ff; -extern cpuop_func op_10a0_0_nf; -extern cpuop_func op_10a0_0_ff; -extern cpuop_func op_10a8_0_nf; -extern cpuop_func op_10a8_0_ff; -extern cpuop_func op_10b0_0_nf; -extern cpuop_func op_10b0_0_ff; -extern cpuop_func op_10b8_0_nf; -extern cpuop_func op_10b8_0_ff; -extern cpuop_func op_10b9_0_nf; -extern cpuop_func op_10b9_0_ff; -extern cpuop_func op_10ba_0_nf; -extern cpuop_func op_10ba_0_ff; -extern cpuop_func op_10bb_0_nf; -extern cpuop_func op_10bb_0_ff; -extern cpuop_func op_10bc_0_nf; -extern cpuop_func op_10bc_0_ff; -extern cpuop_func op_10c0_0_nf; -extern cpuop_func op_10c0_0_ff; -extern cpuop_func op_10d0_0_nf; -extern cpuop_func op_10d0_0_ff; -extern cpuop_func op_10d8_0_nf; -extern cpuop_func op_10d8_0_ff; -extern cpuop_func op_10e0_0_nf; -extern cpuop_func op_10e0_0_ff; -extern cpuop_func op_10e8_0_nf; -extern cpuop_func op_10e8_0_ff; -extern cpuop_func op_10f0_0_nf; -extern cpuop_func op_10f0_0_ff; -extern cpuop_func op_10f8_0_nf; -extern cpuop_func op_10f8_0_ff; -extern cpuop_func op_10f9_0_nf; -extern cpuop_func op_10f9_0_ff; -extern cpuop_func op_10fa_0_nf; -extern cpuop_func op_10fa_0_ff; -extern cpuop_func op_10fb_0_nf; -extern cpuop_func op_10fb_0_ff; -extern cpuop_func op_10fc_0_nf; -extern cpuop_func op_10fc_0_ff; -extern cpuop_func op_1100_0_nf; -extern cpuop_func op_1100_0_ff; -extern cpuop_func op_1110_0_nf; -extern cpuop_func op_1110_0_ff; -extern cpuop_func op_1118_0_nf; -extern cpuop_func op_1118_0_ff; -extern cpuop_func op_1120_0_nf; -extern cpuop_func op_1120_0_ff; -extern cpuop_func op_1128_0_nf; -extern cpuop_func op_1128_0_ff; -extern cpuop_func op_1130_0_nf; -extern cpuop_func op_1130_0_ff; -extern cpuop_func op_1138_0_nf; -extern cpuop_func op_1138_0_ff; -extern cpuop_func op_1139_0_nf; -extern cpuop_func op_1139_0_ff; -extern cpuop_func op_113a_0_nf; -extern cpuop_func op_113a_0_ff; -extern cpuop_func op_113b_0_nf; -extern cpuop_func op_113b_0_ff; -extern cpuop_func op_113c_0_nf; -extern cpuop_func op_113c_0_ff; -extern cpuop_func op_1140_0_nf; -extern cpuop_func op_1140_0_ff; -extern cpuop_func op_1150_0_nf; -extern cpuop_func op_1150_0_ff; -extern cpuop_func op_1158_0_nf; -extern cpuop_func op_1158_0_ff; -extern cpuop_func op_1160_0_nf; -extern cpuop_func op_1160_0_ff; -extern cpuop_func op_1168_0_nf; -extern cpuop_func op_1168_0_ff; -extern cpuop_func op_1170_0_nf; -extern cpuop_func op_1170_0_ff; -extern cpuop_func op_1178_0_nf; -extern cpuop_func op_1178_0_ff; -extern cpuop_func op_1179_0_nf; -extern cpuop_func op_1179_0_ff; -extern cpuop_func op_117a_0_nf; -extern cpuop_func op_117a_0_ff; -extern cpuop_func op_117b_0_nf; -extern cpuop_func op_117b_0_ff; -extern cpuop_func op_117c_0_nf; -extern cpuop_func op_117c_0_ff; -extern cpuop_func op_1180_0_nf; -extern cpuop_func op_1180_0_ff; -extern cpuop_func op_1190_0_nf; -extern cpuop_func op_1190_0_ff; -extern cpuop_func op_1198_0_nf; -extern cpuop_func op_1198_0_ff; -extern cpuop_func op_11a0_0_nf; -extern cpuop_func op_11a0_0_ff; -extern cpuop_func op_11a8_0_nf; -extern cpuop_func op_11a8_0_ff; -extern cpuop_func op_11b0_0_nf; -extern cpuop_func op_11b0_0_ff; -extern cpuop_func op_11b8_0_nf; -extern cpuop_func op_11b8_0_ff; -extern cpuop_func op_11b9_0_nf; -extern cpuop_func op_11b9_0_ff; -extern cpuop_func op_11ba_0_nf; -extern cpuop_func op_11ba_0_ff; -extern cpuop_func op_11bb_0_nf; -extern cpuop_func op_11bb_0_ff; -extern cpuop_func op_11bc_0_nf; -extern cpuop_func op_11bc_0_ff; -extern cpuop_func op_11c0_0_nf; -extern cpuop_func op_11c0_0_ff; -extern cpuop_func op_11d0_0_nf; -extern cpuop_func op_11d0_0_ff; -extern cpuop_func op_11d8_0_nf; -extern cpuop_func op_11d8_0_ff; -extern cpuop_func op_11e0_0_nf; -extern cpuop_func op_11e0_0_ff; -extern cpuop_func op_11e8_0_nf; -extern cpuop_func op_11e8_0_ff; -extern cpuop_func op_11f0_0_nf; -extern cpuop_func op_11f0_0_ff; -extern cpuop_func op_11f8_0_nf; -extern cpuop_func op_11f8_0_ff; -extern cpuop_func op_11f9_0_nf; -extern cpuop_func op_11f9_0_ff; -extern cpuop_func op_11fa_0_nf; -extern cpuop_func op_11fa_0_ff; -extern cpuop_func op_11fb_0_nf; -extern cpuop_func op_11fb_0_ff; -extern cpuop_func op_11fc_0_nf; -extern cpuop_func op_11fc_0_ff; -extern cpuop_func op_13c0_0_nf; -extern cpuop_func op_13c0_0_ff; -extern cpuop_func op_13d0_0_nf; -extern cpuop_func op_13d0_0_ff; -extern cpuop_func op_13d8_0_nf; -extern cpuop_func op_13d8_0_ff; -extern cpuop_func op_13e0_0_nf; -extern cpuop_func op_13e0_0_ff; -extern cpuop_func op_13e8_0_nf; -extern cpuop_func op_13e8_0_ff; -extern cpuop_func op_13f0_0_nf; -extern cpuop_func op_13f0_0_ff; -extern cpuop_func op_13f8_0_nf; -extern cpuop_func op_13f8_0_ff; -extern cpuop_func op_13f9_0_nf; -extern cpuop_func op_13f9_0_ff; -extern cpuop_func op_13fa_0_nf; -extern cpuop_func op_13fa_0_ff; -extern cpuop_func op_13fb_0_nf; -extern cpuop_func op_13fb_0_ff; -extern cpuop_func op_13fc_0_nf; -extern cpuop_func op_13fc_0_ff; -extern cpuop_func op_2000_0_nf; -extern cpuop_func op_2000_0_ff; -extern cpuop_func op_2008_0_nf; -extern cpuop_func op_2008_0_ff; -extern cpuop_func op_2010_0_nf; -extern cpuop_func op_2010_0_ff; -extern cpuop_func op_2018_0_nf; -extern cpuop_func op_2018_0_ff; -extern cpuop_func op_2020_0_nf; -extern cpuop_func op_2020_0_ff; -extern cpuop_func op_2028_0_nf; -extern cpuop_func op_2028_0_ff; -extern cpuop_func op_2030_0_nf; -extern cpuop_func op_2030_0_ff; -extern cpuop_func op_2038_0_nf; -extern cpuop_func op_2038_0_ff; -extern cpuop_func op_2039_0_nf; -extern cpuop_func op_2039_0_ff; -extern cpuop_func op_203a_0_nf; -extern cpuop_func op_203a_0_ff; -extern cpuop_func op_203b_0_nf; -extern cpuop_func op_203b_0_ff; -extern cpuop_func op_203c_0_nf; -extern cpuop_func op_203c_0_ff; -extern cpuop_func op_2040_0_nf; -extern cpuop_func op_2040_0_ff; -extern cpuop_func op_2048_0_nf; -extern cpuop_func op_2048_0_ff; -extern cpuop_func op_2050_0_nf; -extern cpuop_func op_2050_0_ff; -extern cpuop_func op_2058_0_nf; -extern cpuop_func op_2058_0_ff; -extern cpuop_func op_2060_0_nf; -extern cpuop_func op_2060_0_ff; -extern cpuop_func op_2068_0_nf; -extern cpuop_func op_2068_0_ff; -extern cpuop_func op_2070_0_nf; -extern cpuop_func op_2070_0_ff; -extern cpuop_func op_2078_0_nf; -extern cpuop_func op_2078_0_ff; -extern cpuop_func op_2079_0_nf; -extern cpuop_func op_2079_0_ff; -extern cpuop_func op_207a_0_nf; -extern cpuop_func op_207a_0_ff; -extern cpuop_func op_207b_0_nf; -extern cpuop_func op_207b_0_ff; -extern cpuop_func op_207c_0_nf; -extern cpuop_func op_207c_0_ff; -extern cpuop_func op_2080_0_nf; -extern cpuop_func op_2080_0_ff; -extern cpuop_func op_2088_0_nf; -extern cpuop_func op_2088_0_ff; -extern cpuop_func op_2090_0_nf; -extern cpuop_func op_2090_0_ff; -extern cpuop_func op_2098_0_nf; -extern cpuop_func op_2098_0_ff; -extern cpuop_func op_20a0_0_nf; -extern cpuop_func op_20a0_0_ff; -extern cpuop_func op_20a8_0_nf; -extern cpuop_func op_20a8_0_ff; -extern cpuop_func op_20b0_0_nf; -extern cpuop_func op_20b0_0_ff; -extern cpuop_func op_20b8_0_nf; -extern cpuop_func op_20b8_0_ff; -extern cpuop_func op_20b9_0_nf; -extern cpuop_func op_20b9_0_ff; -extern cpuop_func op_20ba_0_nf; -extern cpuop_func op_20ba_0_ff; -extern cpuop_func op_20bb_0_nf; -extern cpuop_func op_20bb_0_ff; -extern cpuop_func op_20bc_0_nf; -extern cpuop_func op_20bc_0_ff; -extern cpuop_func op_20c0_0_nf; -extern cpuop_func op_20c0_0_ff; -extern cpuop_func op_20c8_0_nf; -extern cpuop_func op_20c8_0_ff; -extern cpuop_func op_20d0_0_nf; -extern cpuop_func op_20d0_0_ff; -extern cpuop_func op_20d8_0_nf; -extern cpuop_func op_20d8_0_ff; -extern cpuop_func op_20e0_0_nf; -extern cpuop_func op_20e0_0_ff; -extern cpuop_func op_20e8_0_nf; -extern cpuop_func op_20e8_0_ff; -extern cpuop_func op_20f0_0_nf; -extern cpuop_func op_20f0_0_ff; -extern cpuop_func op_20f8_0_nf; -extern cpuop_func op_20f8_0_ff; -extern cpuop_func op_20f9_0_nf; -extern cpuop_func op_20f9_0_ff; -extern cpuop_func op_20fa_0_nf; -extern cpuop_func op_20fa_0_ff; -extern cpuop_func op_20fb_0_nf; -extern cpuop_func op_20fb_0_ff; -extern cpuop_func op_20fc_0_nf; -extern cpuop_func op_20fc_0_ff; -extern cpuop_func op_2100_0_nf; -extern cpuop_func op_2100_0_ff; -extern cpuop_func op_2108_0_nf; -extern cpuop_func op_2108_0_ff; -extern cpuop_func op_2110_0_nf; -extern cpuop_func op_2110_0_ff; -extern cpuop_func op_2118_0_nf; -extern cpuop_func op_2118_0_ff; -extern cpuop_func op_2120_0_nf; -extern cpuop_func op_2120_0_ff; -extern cpuop_func op_2128_0_nf; -extern cpuop_func op_2128_0_ff; -extern cpuop_func op_2130_0_nf; -extern cpuop_func op_2130_0_ff; -extern cpuop_func op_2138_0_nf; -extern cpuop_func op_2138_0_ff; -extern cpuop_func op_2139_0_nf; -extern cpuop_func op_2139_0_ff; -extern cpuop_func op_213a_0_nf; -extern cpuop_func op_213a_0_ff; -extern cpuop_func op_213b_0_nf; -extern cpuop_func op_213b_0_ff; -extern cpuop_func op_213c_0_nf; -extern cpuop_func op_213c_0_ff; -extern cpuop_func op_2140_0_nf; -extern cpuop_func op_2140_0_ff; -extern cpuop_func op_2148_0_nf; -extern cpuop_func op_2148_0_ff; -extern cpuop_func op_2150_0_nf; -extern cpuop_func op_2150_0_ff; -extern cpuop_func op_2158_0_nf; -extern cpuop_func op_2158_0_ff; -extern cpuop_func op_2160_0_nf; -extern cpuop_func op_2160_0_ff; -extern cpuop_func op_2168_0_nf; -extern cpuop_func op_2168_0_ff; -extern cpuop_func op_2170_0_nf; -extern cpuop_func op_2170_0_ff; -extern cpuop_func op_2178_0_nf; -extern cpuop_func op_2178_0_ff; -extern cpuop_func op_2179_0_nf; -extern cpuop_func op_2179_0_ff; -extern cpuop_func op_217a_0_nf; -extern cpuop_func op_217a_0_ff; -extern cpuop_func op_217b_0_nf; -extern cpuop_func op_217b_0_ff; -extern cpuop_func op_217c_0_nf; -extern cpuop_func op_217c_0_ff; -extern cpuop_func op_2180_0_nf; -extern cpuop_func op_2180_0_ff; -extern cpuop_func op_2188_0_nf; -extern cpuop_func op_2188_0_ff; -extern cpuop_func op_2190_0_nf; -extern cpuop_func op_2190_0_ff; -extern cpuop_func op_2198_0_nf; -extern cpuop_func op_2198_0_ff; -extern cpuop_func op_21a0_0_nf; -extern cpuop_func op_21a0_0_ff; -extern cpuop_func op_21a8_0_nf; -extern cpuop_func op_21a8_0_ff; -extern cpuop_func op_21b0_0_nf; -extern cpuop_func op_21b0_0_ff; -extern cpuop_func op_21b8_0_nf; -extern cpuop_func op_21b8_0_ff; -extern cpuop_func op_21b9_0_nf; -extern cpuop_func op_21b9_0_ff; -extern cpuop_func op_21ba_0_nf; -extern cpuop_func op_21ba_0_ff; -extern cpuop_func op_21bb_0_nf; -extern cpuop_func op_21bb_0_ff; -extern cpuop_func op_21bc_0_nf; -extern cpuop_func op_21bc_0_ff; -extern cpuop_func op_21c0_0_nf; -extern cpuop_func op_21c0_0_ff; -extern cpuop_func op_21c8_0_nf; -extern cpuop_func op_21c8_0_ff; -extern cpuop_func op_21d0_0_nf; -extern cpuop_func op_21d0_0_ff; -extern cpuop_func op_21d8_0_nf; -extern cpuop_func op_21d8_0_ff; -extern cpuop_func op_21e0_0_nf; -extern cpuop_func op_21e0_0_ff; -extern cpuop_func op_21e8_0_nf; -extern cpuop_func op_21e8_0_ff; -extern cpuop_func op_21f0_0_nf; -extern cpuop_func op_21f0_0_ff; -extern cpuop_func op_21f8_0_nf; -extern cpuop_func op_21f8_0_ff; -extern cpuop_func op_21f9_0_nf; -extern cpuop_func op_21f9_0_ff; -extern cpuop_func op_21fa_0_nf; -extern cpuop_func op_21fa_0_ff; -extern cpuop_func op_21fb_0_nf; -extern cpuop_func op_21fb_0_ff; -extern cpuop_func op_21fc_0_nf; -extern cpuop_func op_21fc_0_ff; -extern cpuop_func op_23c0_0_nf; -extern cpuop_func op_23c0_0_ff; -extern cpuop_func op_23c8_0_nf; -extern cpuop_func op_23c8_0_ff; -extern cpuop_func op_23d0_0_nf; -extern cpuop_func op_23d0_0_ff; -extern cpuop_func op_23d8_0_nf; -extern cpuop_func op_23d8_0_ff; -extern cpuop_func op_23e0_0_nf; -extern cpuop_func op_23e0_0_ff; -extern cpuop_func op_23e8_0_nf; -extern cpuop_func op_23e8_0_ff; -extern cpuop_func op_23f0_0_nf; -extern cpuop_func op_23f0_0_ff; -extern cpuop_func op_23f8_0_nf; -extern cpuop_func op_23f8_0_ff; -extern cpuop_func op_23f9_0_nf; -extern cpuop_func op_23f9_0_ff; -extern cpuop_func op_23fa_0_nf; -extern cpuop_func op_23fa_0_ff; -extern cpuop_func op_23fb_0_nf; -extern cpuop_func op_23fb_0_ff; -extern cpuop_func op_23fc_0_nf; -extern cpuop_func op_23fc_0_ff; -extern cpuop_func op_3000_0_nf; -extern cpuop_func op_3000_0_ff; -extern cpuop_func op_3008_0_nf; -extern cpuop_func op_3008_0_ff; -extern cpuop_func op_3010_0_nf; -extern cpuop_func op_3010_0_ff; -extern cpuop_func op_3018_0_nf; -extern cpuop_func op_3018_0_ff; -extern cpuop_func op_3020_0_nf; -extern cpuop_func op_3020_0_ff; -extern cpuop_func op_3028_0_nf; -extern cpuop_func op_3028_0_ff; -extern cpuop_func op_3030_0_nf; -extern cpuop_func op_3030_0_ff; -extern cpuop_func op_3038_0_nf; -extern cpuop_func op_3038_0_ff; -extern cpuop_func op_3039_0_nf; -extern cpuop_func op_3039_0_ff; -extern cpuop_func op_303a_0_nf; -extern cpuop_func op_303a_0_ff; -extern cpuop_func op_303b_0_nf; -extern cpuop_func op_303b_0_ff; -extern cpuop_func op_303c_0_nf; -extern cpuop_func op_303c_0_ff; -extern cpuop_func op_3040_0_nf; -extern cpuop_func op_3040_0_ff; -extern cpuop_func op_3048_0_nf; -extern cpuop_func op_3048_0_ff; -extern cpuop_func op_3050_0_nf; -extern cpuop_func op_3050_0_ff; -extern cpuop_func op_3058_0_nf; -extern cpuop_func op_3058_0_ff; -extern cpuop_func op_3060_0_nf; -extern cpuop_func op_3060_0_ff; -extern cpuop_func op_3068_0_nf; -extern cpuop_func op_3068_0_ff; -extern cpuop_func op_3070_0_nf; -extern cpuop_func op_3070_0_ff; -extern cpuop_func op_3078_0_nf; -extern cpuop_func op_3078_0_ff; -extern cpuop_func op_3079_0_nf; -extern cpuop_func op_3079_0_ff; -extern cpuop_func op_307a_0_nf; -extern cpuop_func op_307a_0_ff; -extern cpuop_func op_307b_0_nf; -extern cpuop_func op_307b_0_ff; -extern cpuop_func op_307c_0_nf; -extern cpuop_func op_307c_0_ff; -extern cpuop_func op_3080_0_nf; -extern cpuop_func op_3080_0_ff; -extern cpuop_func op_3088_0_nf; -extern cpuop_func op_3088_0_ff; -extern cpuop_func op_3090_0_nf; -extern cpuop_func op_3090_0_ff; -extern cpuop_func op_3098_0_nf; -extern cpuop_func op_3098_0_ff; -extern cpuop_func op_30a0_0_nf; -extern cpuop_func op_30a0_0_ff; -extern cpuop_func op_30a8_0_nf; -extern cpuop_func op_30a8_0_ff; -extern cpuop_func op_30b0_0_nf; -extern cpuop_func op_30b0_0_ff; -extern cpuop_func op_30b8_0_nf; -extern cpuop_func op_30b8_0_ff; -extern cpuop_func op_30b9_0_nf; -extern cpuop_func op_30b9_0_ff; -extern cpuop_func op_30ba_0_nf; -extern cpuop_func op_30ba_0_ff; -extern cpuop_func op_30bb_0_nf; -extern cpuop_func op_30bb_0_ff; -extern cpuop_func op_30bc_0_nf; -extern cpuop_func op_30bc_0_ff; -extern cpuop_func op_30c0_0_nf; -extern cpuop_func op_30c0_0_ff; -extern cpuop_func op_30c8_0_nf; -extern cpuop_func op_30c8_0_ff; -extern cpuop_func op_30d0_0_nf; -extern cpuop_func op_30d0_0_ff; -extern cpuop_func op_30d8_0_nf; -extern cpuop_func op_30d8_0_ff; -extern cpuop_func op_30e0_0_nf; -extern cpuop_func op_30e0_0_ff; -extern cpuop_func op_30e8_0_nf; -extern cpuop_func op_30e8_0_ff; -extern cpuop_func op_30f0_0_nf; -extern cpuop_func op_30f0_0_ff; -extern cpuop_func op_30f8_0_nf; -extern cpuop_func op_30f8_0_ff; -extern cpuop_func op_30f9_0_nf; -extern cpuop_func op_30f9_0_ff; -extern cpuop_func op_30fa_0_nf; -extern cpuop_func op_30fa_0_ff; -extern cpuop_func op_30fb_0_nf; -extern cpuop_func op_30fb_0_ff; -extern cpuop_func op_30fc_0_nf; -extern cpuop_func op_30fc_0_ff; -extern cpuop_func op_3100_0_nf; -extern cpuop_func op_3100_0_ff; -extern cpuop_func op_3108_0_nf; -extern cpuop_func op_3108_0_ff; -extern cpuop_func op_3110_0_nf; -extern cpuop_func op_3110_0_ff; -extern cpuop_func op_3118_0_nf; -extern cpuop_func op_3118_0_ff; -extern cpuop_func op_3120_0_nf; -extern cpuop_func op_3120_0_ff; -extern cpuop_func op_3128_0_nf; -extern cpuop_func op_3128_0_ff; -extern cpuop_func op_3130_0_nf; -extern cpuop_func op_3130_0_ff; -extern cpuop_func op_3138_0_nf; -extern cpuop_func op_3138_0_ff; -extern cpuop_func op_3139_0_nf; -extern cpuop_func op_3139_0_ff; -extern cpuop_func op_313a_0_nf; -extern cpuop_func op_313a_0_ff; -extern cpuop_func op_313b_0_nf; -extern cpuop_func op_313b_0_ff; -extern cpuop_func op_313c_0_nf; -extern cpuop_func op_313c_0_ff; -extern cpuop_func op_3140_0_nf; -extern cpuop_func op_3140_0_ff; -extern cpuop_func op_3148_0_nf; -extern cpuop_func op_3148_0_ff; -extern cpuop_func op_3150_0_nf; -extern cpuop_func op_3150_0_ff; -extern cpuop_func op_3158_0_nf; -extern cpuop_func op_3158_0_ff; -extern cpuop_func op_3160_0_nf; -extern cpuop_func op_3160_0_ff; -extern cpuop_func op_3168_0_nf; -extern cpuop_func op_3168_0_ff; -extern cpuop_func op_3170_0_nf; -extern cpuop_func op_3170_0_ff; -extern cpuop_func op_3178_0_nf; -extern cpuop_func op_3178_0_ff; -extern cpuop_func op_3179_0_nf; -extern cpuop_func op_3179_0_ff; -extern cpuop_func op_317a_0_nf; -extern cpuop_func op_317a_0_ff; -extern cpuop_func op_317b_0_nf; -extern cpuop_func op_317b_0_ff; -extern cpuop_func op_317c_0_nf; -extern cpuop_func op_317c_0_ff; -extern cpuop_func op_3180_0_nf; -extern cpuop_func op_3180_0_ff; -extern cpuop_func op_3188_0_nf; -extern cpuop_func op_3188_0_ff; -extern cpuop_func op_3190_0_nf; -extern cpuop_func op_3190_0_ff; -extern cpuop_func op_3198_0_nf; -extern cpuop_func op_3198_0_ff; -extern cpuop_func op_31a0_0_nf; -extern cpuop_func op_31a0_0_ff; -extern cpuop_func op_31a8_0_nf; -extern cpuop_func op_31a8_0_ff; -extern cpuop_func op_31b0_0_nf; -extern cpuop_func op_31b0_0_ff; -extern cpuop_func op_31b8_0_nf; -extern cpuop_func op_31b8_0_ff; -extern cpuop_func op_31b9_0_nf; -extern cpuop_func op_31b9_0_ff; -extern cpuop_func op_31ba_0_nf; -extern cpuop_func op_31ba_0_ff; -extern cpuop_func op_31bb_0_nf; -extern cpuop_func op_31bb_0_ff; -extern cpuop_func op_31bc_0_nf; -extern cpuop_func op_31bc_0_ff; -extern cpuop_func op_31c0_0_nf; -extern cpuop_func op_31c0_0_ff; -extern cpuop_func op_31c8_0_nf; -extern cpuop_func op_31c8_0_ff; -extern cpuop_func op_31d0_0_nf; -extern cpuop_func op_31d0_0_ff; -extern cpuop_func op_31d8_0_nf; -extern cpuop_func op_31d8_0_ff; -extern cpuop_func op_31e0_0_nf; -extern cpuop_func op_31e0_0_ff; -extern cpuop_func op_31e8_0_nf; -extern cpuop_func op_31e8_0_ff; -extern cpuop_func op_31f0_0_nf; -extern cpuop_func op_31f0_0_ff; -extern cpuop_func op_31f8_0_nf; -extern cpuop_func op_31f8_0_ff; -extern cpuop_func op_31f9_0_nf; -extern cpuop_func op_31f9_0_ff; -extern cpuop_func op_31fa_0_nf; -extern cpuop_func op_31fa_0_ff; -extern cpuop_func op_31fb_0_nf; -extern cpuop_func op_31fb_0_ff; -extern cpuop_func op_31fc_0_nf; -extern cpuop_func op_31fc_0_ff; -extern cpuop_func op_33c0_0_nf; -extern cpuop_func op_33c0_0_ff; -extern cpuop_func op_33c8_0_nf; -extern cpuop_func op_33c8_0_ff; -extern cpuop_func op_33d0_0_nf; -extern cpuop_func op_33d0_0_ff; -extern cpuop_func op_33d8_0_nf; -extern cpuop_func op_33d8_0_ff; -extern cpuop_func op_33e0_0_nf; -extern cpuop_func op_33e0_0_ff; -extern cpuop_func op_33e8_0_nf; -extern cpuop_func op_33e8_0_ff; -extern cpuop_func op_33f0_0_nf; -extern cpuop_func op_33f0_0_ff; -extern cpuop_func op_33f8_0_nf; -extern cpuop_func op_33f8_0_ff; -extern cpuop_func op_33f9_0_nf; -extern cpuop_func op_33f9_0_ff; -extern cpuop_func op_33fa_0_nf; -extern cpuop_func op_33fa_0_ff; -extern cpuop_func op_33fb_0_nf; -extern cpuop_func op_33fb_0_ff; -extern cpuop_func op_33fc_0_nf; -extern cpuop_func op_33fc_0_ff; -extern cpuop_func op_4000_0_nf; -extern cpuop_func op_4000_0_ff; -extern cpuop_func op_4010_0_nf; -extern cpuop_func op_4010_0_ff; -extern cpuop_func op_4018_0_nf; -extern cpuop_func op_4018_0_ff; -extern cpuop_func op_4020_0_nf; -extern cpuop_func op_4020_0_ff; -extern cpuop_func op_4028_0_nf; -extern cpuop_func op_4028_0_ff; -extern cpuop_func op_4030_0_nf; -extern cpuop_func op_4030_0_ff; -extern cpuop_func op_4038_0_nf; -extern cpuop_func op_4038_0_ff; -extern cpuop_func op_4039_0_nf; -extern cpuop_func op_4039_0_ff; -extern cpuop_func op_4040_0_nf; -extern cpuop_func op_4040_0_ff; -extern cpuop_func op_4050_0_nf; -extern cpuop_func op_4050_0_ff; -extern cpuop_func op_4058_0_nf; -extern cpuop_func op_4058_0_ff; -extern cpuop_func op_4060_0_nf; -extern cpuop_func op_4060_0_ff; -extern cpuop_func op_4068_0_nf; -extern cpuop_func op_4068_0_ff; -extern cpuop_func op_4070_0_nf; -extern cpuop_func op_4070_0_ff; -extern cpuop_func op_4078_0_nf; -extern cpuop_func op_4078_0_ff; -extern cpuop_func op_4079_0_nf; -extern cpuop_func op_4079_0_ff; -extern cpuop_func op_4080_0_nf; -extern cpuop_func op_4080_0_ff; -extern cpuop_func op_4090_0_nf; -extern cpuop_func op_4090_0_ff; -extern cpuop_func op_4098_0_nf; -extern cpuop_func op_4098_0_ff; -extern cpuop_func op_40a0_0_nf; -extern cpuop_func op_40a0_0_ff; -extern cpuop_func op_40a8_0_nf; -extern cpuop_func op_40a8_0_ff; -extern cpuop_func op_40b0_0_nf; -extern cpuop_func op_40b0_0_ff; -extern cpuop_func op_40b8_0_nf; -extern cpuop_func op_40b8_0_ff; -extern cpuop_func op_40b9_0_nf; -extern cpuop_func op_40b9_0_ff; -extern cpuop_func op_40c0_0_nf; -extern cpuop_func op_40c0_0_ff; -extern cpuop_func op_40d0_0_nf; -extern cpuop_func op_40d0_0_ff; -extern cpuop_func op_40d8_0_nf; -extern cpuop_func op_40d8_0_ff; -extern cpuop_func op_40e0_0_nf; -extern cpuop_func op_40e0_0_ff; -extern cpuop_func op_40e8_0_nf; -extern cpuop_func op_40e8_0_ff; -extern cpuop_func op_40f0_0_nf; -extern cpuop_func op_40f0_0_ff; -extern cpuop_func op_40f8_0_nf; -extern cpuop_func op_40f8_0_ff; -extern cpuop_func op_40f9_0_nf; -extern cpuop_func op_40f9_0_ff; -extern cpuop_func op_4100_0_nf; -extern cpuop_func op_4100_0_ff; -extern cpuop_func op_4110_0_nf; -extern cpuop_func op_4110_0_ff; -extern cpuop_func op_4118_0_nf; -extern cpuop_func op_4118_0_ff; -extern cpuop_func op_4120_0_nf; -extern cpuop_func op_4120_0_ff; -extern cpuop_func op_4128_0_nf; -extern cpuop_func op_4128_0_ff; -extern cpuop_func op_4130_0_nf; -extern cpuop_func op_4130_0_ff; -extern cpuop_func op_4138_0_nf; -extern cpuop_func op_4138_0_ff; -extern cpuop_func op_4139_0_nf; -extern cpuop_func op_4139_0_ff; -extern cpuop_func op_413a_0_nf; -extern cpuop_func op_413a_0_ff; -extern cpuop_func op_413b_0_nf; -extern cpuop_func op_413b_0_ff; -extern cpuop_func op_413c_0_nf; -extern cpuop_func op_413c_0_ff; -extern cpuop_func op_4180_0_nf; -extern cpuop_func op_4180_0_ff; -extern cpuop_func op_4190_0_nf; -extern cpuop_func op_4190_0_ff; -extern cpuop_func op_4198_0_nf; -extern cpuop_func op_4198_0_ff; -extern cpuop_func op_41a0_0_nf; -extern cpuop_func op_41a0_0_ff; -extern cpuop_func op_41a8_0_nf; -extern cpuop_func op_41a8_0_ff; -extern cpuop_func op_41b0_0_nf; -extern cpuop_func op_41b0_0_ff; -extern cpuop_func op_41b8_0_nf; -extern cpuop_func op_41b8_0_ff; -extern cpuop_func op_41b9_0_nf; -extern cpuop_func op_41b9_0_ff; -extern cpuop_func op_41ba_0_nf; -extern cpuop_func op_41ba_0_ff; -extern cpuop_func op_41bb_0_nf; -extern cpuop_func op_41bb_0_ff; -extern cpuop_func op_41bc_0_nf; -extern cpuop_func op_41bc_0_ff; -extern cpuop_func op_41d0_0_nf; -extern cpuop_func op_41d0_0_ff; -extern cpuop_func op_41e8_0_nf; -extern cpuop_func op_41e8_0_ff; -extern cpuop_func op_41f0_0_nf; -extern cpuop_func op_41f0_0_ff; -extern cpuop_func op_41f8_0_nf; -extern cpuop_func op_41f8_0_ff; -extern cpuop_func op_41f9_0_nf; -extern cpuop_func op_41f9_0_ff; -extern cpuop_func op_41fa_0_nf; -extern cpuop_func op_41fa_0_ff; -extern cpuop_func op_41fb_0_nf; -extern cpuop_func op_41fb_0_ff; -extern cpuop_func op_4200_0_nf; -extern cpuop_func op_4200_0_ff; -extern cpuop_func op_4210_0_nf; -extern cpuop_func op_4210_0_ff; -extern cpuop_func op_4218_0_nf; -extern cpuop_func op_4218_0_ff; -extern cpuop_func op_4220_0_nf; -extern cpuop_func op_4220_0_ff; -extern cpuop_func op_4228_0_nf; -extern cpuop_func op_4228_0_ff; -extern cpuop_func op_4230_0_nf; -extern cpuop_func op_4230_0_ff; -extern cpuop_func op_4238_0_nf; -extern cpuop_func op_4238_0_ff; -extern cpuop_func op_4239_0_nf; -extern cpuop_func op_4239_0_ff; -extern cpuop_func op_4240_0_nf; -extern cpuop_func op_4240_0_ff; -extern cpuop_func op_4250_0_nf; -extern cpuop_func op_4250_0_ff; -extern cpuop_func op_4258_0_nf; -extern cpuop_func op_4258_0_ff; -extern cpuop_func op_4260_0_nf; -extern cpuop_func op_4260_0_ff; -extern cpuop_func op_4268_0_nf; -extern cpuop_func op_4268_0_ff; -extern cpuop_func op_4270_0_nf; -extern cpuop_func op_4270_0_ff; -extern cpuop_func op_4278_0_nf; -extern cpuop_func op_4278_0_ff; -extern cpuop_func op_4279_0_nf; -extern cpuop_func op_4279_0_ff; -extern cpuop_func op_4280_0_nf; -extern cpuop_func op_4280_0_ff; -extern cpuop_func op_4290_0_nf; -extern cpuop_func op_4290_0_ff; -extern cpuop_func op_4298_0_nf; -extern cpuop_func op_4298_0_ff; -extern cpuop_func op_42a0_0_nf; -extern cpuop_func op_42a0_0_ff; -extern cpuop_func op_42a8_0_nf; -extern cpuop_func op_42a8_0_ff; -extern cpuop_func op_42b0_0_nf; -extern cpuop_func op_42b0_0_ff; -extern cpuop_func op_42b8_0_nf; -extern cpuop_func op_42b8_0_ff; -extern cpuop_func op_42b9_0_nf; -extern cpuop_func op_42b9_0_ff; -extern cpuop_func op_42c0_0_nf; -extern cpuop_func op_42c0_0_ff; -extern cpuop_func op_42d0_0_nf; -extern cpuop_func op_42d0_0_ff; -extern cpuop_func op_42d8_0_nf; -extern cpuop_func op_42d8_0_ff; -extern cpuop_func op_42e0_0_nf; -extern cpuop_func op_42e0_0_ff; -extern cpuop_func op_42e8_0_nf; -extern cpuop_func op_42e8_0_ff; -extern cpuop_func op_42f0_0_nf; -extern cpuop_func op_42f0_0_ff; -extern cpuop_func op_42f8_0_nf; -extern cpuop_func op_42f8_0_ff; -extern cpuop_func op_42f9_0_nf; -extern cpuop_func op_42f9_0_ff; -extern cpuop_func op_4400_0_nf; -extern cpuop_func op_4400_0_ff; -extern cpuop_func op_4410_0_nf; -extern cpuop_func op_4410_0_ff; -extern cpuop_func op_4418_0_nf; -extern cpuop_func op_4418_0_ff; -extern cpuop_func op_4420_0_nf; -extern cpuop_func op_4420_0_ff; -extern cpuop_func op_4428_0_nf; -extern cpuop_func op_4428_0_ff; -extern cpuop_func op_4430_0_nf; -extern cpuop_func op_4430_0_ff; -extern cpuop_func op_4438_0_nf; -extern cpuop_func op_4438_0_ff; -extern cpuop_func op_4439_0_nf; -extern cpuop_func op_4439_0_ff; -extern cpuop_func op_4440_0_nf; -extern cpuop_func op_4440_0_ff; -extern cpuop_func op_4450_0_nf; -extern cpuop_func op_4450_0_ff; -extern cpuop_func op_4458_0_nf; -extern cpuop_func op_4458_0_ff; -extern cpuop_func op_4460_0_nf; -extern cpuop_func op_4460_0_ff; -extern cpuop_func op_4468_0_nf; -extern cpuop_func op_4468_0_ff; -extern cpuop_func op_4470_0_nf; -extern cpuop_func op_4470_0_ff; -extern cpuop_func op_4478_0_nf; -extern cpuop_func op_4478_0_ff; -extern cpuop_func op_4479_0_nf; -extern cpuop_func op_4479_0_ff; -extern cpuop_func op_4480_0_nf; -extern cpuop_func op_4480_0_ff; -extern cpuop_func op_4490_0_nf; -extern cpuop_func op_4490_0_ff; -extern cpuop_func op_4498_0_nf; -extern cpuop_func op_4498_0_ff; -extern cpuop_func op_44a0_0_nf; -extern cpuop_func op_44a0_0_ff; -extern cpuop_func op_44a8_0_nf; -extern cpuop_func op_44a8_0_ff; -extern cpuop_func op_44b0_0_nf; -extern cpuop_func op_44b0_0_ff; -extern cpuop_func op_44b8_0_nf; -extern cpuop_func op_44b8_0_ff; -extern cpuop_func op_44b9_0_nf; -extern cpuop_func op_44b9_0_ff; -extern cpuop_func op_44c0_0_nf; -extern cpuop_func op_44c0_0_ff; -extern cpuop_func op_44d0_0_nf; -extern cpuop_func op_44d0_0_ff; -extern cpuop_func op_44d8_0_nf; -extern cpuop_func op_44d8_0_ff; -extern cpuop_func op_44e0_0_nf; -extern cpuop_func op_44e0_0_ff; -extern cpuop_func op_44e8_0_nf; -extern cpuop_func op_44e8_0_ff; -extern cpuop_func op_44f0_0_nf; -extern cpuop_func op_44f0_0_ff; -extern cpuop_func op_44f8_0_nf; -extern cpuop_func op_44f8_0_ff; -extern cpuop_func op_44f9_0_nf; -extern cpuop_func op_44f9_0_ff; -extern cpuop_func op_44fa_0_nf; -extern cpuop_func op_44fa_0_ff; -extern cpuop_func op_44fb_0_nf; -extern cpuop_func op_44fb_0_ff; -extern cpuop_func op_44fc_0_nf; -extern cpuop_func op_44fc_0_ff; -extern cpuop_func op_4600_0_nf; -extern cpuop_func op_4600_0_ff; -extern cpuop_func op_4610_0_nf; -extern cpuop_func op_4610_0_ff; -extern cpuop_func op_4618_0_nf; -extern cpuop_func op_4618_0_ff; -extern cpuop_func op_4620_0_nf; -extern cpuop_func op_4620_0_ff; -extern cpuop_func op_4628_0_nf; -extern cpuop_func op_4628_0_ff; -extern cpuop_func op_4630_0_nf; -extern cpuop_func op_4630_0_ff; -extern cpuop_func op_4638_0_nf; -extern cpuop_func op_4638_0_ff; -extern cpuop_func op_4639_0_nf; -extern cpuop_func op_4639_0_ff; -extern cpuop_func op_4640_0_nf; -extern cpuop_func op_4640_0_ff; -extern cpuop_func op_4650_0_nf; -extern cpuop_func op_4650_0_ff; -extern cpuop_func op_4658_0_nf; -extern cpuop_func op_4658_0_ff; -extern cpuop_func op_4660_0_nf; -extern cpuop_func op_4660_0_ff; -extern cpuop_func op_4668_0_nf; -extern cpuop_func op_4668_0_ff; -extern cpuop_func op_4670_0_nf; -extern cpuop_func op_4670_0_ff; -extern cpuop_func op_4678_0_nf; -extern cpuop_func op_4678_0_ff; -extern cpuop_func op_4679_0_nf; -extern cpuop_func op_4679_0_ff; -extern cpuop_func op_4680_0_nf; -extern cpuop_func op_4680_0_ff; -extern cpuop_func op_4690_0_nf; -extern cpuop_func op_4690_0_ff; -extern cpuop_func op_4698_0_nf; -extern cpuop_func op_4698_0_ff; -extern cpuop_func op_46a0_0_nf; -extern cpuop_func op_46a0_0_ff; -extern cpuop_func op_46a8_0_nf; -extern cpuop_func op_46a8_0_ff; -extern cpuop_func op_46b0_0_nf; -extern cpuop_func op_46b0_0_ff; -extern cpuop_func op_46b8_0_nf; -extern cpuop_func op_46b8_0_ff; -extern cpuop_func op_46b9_0_nf; -extern cpuop_func op_46b9_0_ff; -extern cpuop_func op_46c0_0_nf; -extern cpuop_func op_46c0_0_ff; -extern cpuop_func op_46d0_0_nf; -extern cpuop_func op_46d0_0_ff; -extern cpuop_func op_46d8_0_nf; -extern cpuop_func op_46d8_0_ff; -extern cpuop_func op_46e0_0_nf; -extern cpuop_func op_46e0_0_ff; -extern cpuop_func op_46e8_0_nf; -extern cpuop_func op_46e8_0_ff; -extern cpuop_func op_46f0_0_nf; -extern cpuop_func op_46f0_0_ff; -extern cpuop_func op_46f8_0_nf; -extern cpuop_func op_46f8_0_ff; -extern cpuop_func op_46f9_0_nf; -extern cpuop_func op_46f9_0_ff; -extern cpuop_func op_46fa_0_nf; -extern cpuop_func op_46fa_0_ff; -extern cpuop_func op_46fb_0_nf; -extern cpuop_func op_46fb_0_ff; -extern cpuop_func op_46fc_0_nf; -extern cpuop_func op_46fc_0_ff; -extern cpuop_func op_4800_0_nf; -extern cpuop_func op_4800_0_ff; -extern cpuop_func op_4808_0_nf; -extern cpuop_func op_4808_0_ff; -extern cpuop_func op_4810_0_nf; -extern cpuop_func op_4810_0_ff; -extern cpuop_func op_4818_0_nf; -extern cpuop_func op_4818_0_ff; -extern cpuop_func op_4820_0_nf; -extern cpuop_func op_4820_0_ff; -extern cpuop_func op_4828_0_nf; -extern cpuop_func op_4828_0_ff; -extern cpuop_func op_4830_0_nf; -extern cpuop_func op_4830_0_ff; -extern cpuop_func op_4838_0_nf; -extern cpuop_func op_4838_0_ff; -extern cpuop_func op_4839_0_nf; -extern cpuop_func op_4839_0_ff; -extern cpuop_func op_4840_0_nf; -extern cpuop_func op_4840_0_ff; -extern cpuop_func op_4848_0_nf; -extern cpuop_func op_4848_0_ff; -extern cpuop_func op_4850_0_nf; -extern cpuop_func op_4850_0_ff; -extern cpuop_func op_4868_0_nf; -extern cpuop_func op_4868_0_ff; -extern cpuop_func op_4870_0_nf; -extern cpuop_func op_4870_0_ff; -extern cpuop_func op_4878_0_nf; -extern cpuop_func op_4878_0_ff; -extern cpuop_func op_4879_0_nf; -extern cpuop_func op_4879_0_ff; -extern cpuop_func op_487a_0_nf; -extern cpuop_func op_487a_0_ff; -extern cpuop_func op_487b_0_nf; -extern cpuop_func op_487b_0_ff; -extern cpuop_func op_4880_0_nf; -extern cpuop_func op_4880_0_ff; -extern cpuop_func op_4890_0_nf; -extern cpuop_func op_4890_0_ff; -extern cpuop_func op_48a0_0_nf; -extern cpuop_func op_48a0_0_ff; -extern cpuop_func op_48a8_0_nf; -extern cpuop_func op_48a8_0_ff; -extern cpuop_func op_48b0_0_nf; -extern cpuop_func op_48b0_0_ff; -extern cpuop_func op_48b8_0_nf; -extern cpuop_func op_48b8_0_ff; -extern cpuop_func op_48b9_0_nf; -extern cpuop_func op_48b9_0_ff; -extern cpuop_func op_48c0_0_nf; -extern cpuop_func op_48c0_0_ff; -extern cpuop_func op_48d0_0_nf; -extern cpuop_func op_48d0_0_ff; -extern cpuop_func op_48e0_0_nf; -extern cpuop_func op_48e0_0_ff; -extern cpuop_func op_48e8_0_nf; -extern cpuop_func op_48e8_0_ff; -extern cpuop_func op_48f0_0_nf; -extern cpuop_func op_48f0_0_ff; -extern cpuop_func op_48f8_0_nf; -extern cpuop_func op_48f8_0_ff; -extern cpuop_func op_48f9_0_nf; -extern cpuop_func op_48f9_0_ff; -extern cpuop_func op_49c0_0_nf; -extern cpuop_func op_49c0_0_ff; -extern cpuop_func op_4a00_0_nf; -extern cpuop_func op_4a00_0_ff; -extern cpuop_func op_4a10_0_nf; -extern cpuop_func op_4a10_0_ff; -extern cpuop_func op_4a18_0_nf; -extern cpuop_func op_4a18_0_ff; -extern cpuop_func op_4a20_0_nf; -extern cpuop_func op_4a20_0_ff; -extern cpuop_func op_4a28_0_nf; -extern cpuop_func op_4a28_0_ff; -extern cpuop_func op_4a30_0_nf; -extern cpuop_func op_4a30_0_ff; -extern cpuop_func op_4a38_0_nf; -extern cpuop_func op_4a38_0_ff; -extern cpuop_func op_4a39_0_nf; -extern cpuop_func op_4a39_0_ff; -extern cpuop_func op_4a3a_0_nf; -extern cpuop_func op_4a3a_0_ff; -extern cpuop_func op_4a3b_0_nf; -extern cpuop_func op_4a3b_0_ff; -extern cpuop_func op_4a3c_0_nf; -extern cpuop_func op_4a3c_0_ff; -extern cpuop_func op_4a40_0_nf; -extern cpuop_func op_4a40_0_ff; -extern cpuop_func op_4a48_0_nf; -extern cpuop_func op_4a48_0_ff; -extern cpuop_func op_4a50_0_nf; -extern cpuop_func op_4a50_0_ff; -extern cpuop_func op_4a58_0_nf; -extern cpuop_func op_4a58_0_ff; -extern cpuop_func op_4a60_0_nf; -extern cpuop_func op_4a60_0_ff; -extern cpuop_func op_4a68_0_nf; -extern cpuop_func op_4a68_0_ff; -extern cpuop_func op_4a70_0_nf; -extern cpuop_func op_4a70_0_ff; -extern cpuop_func op_4a78_0_nf; -extern cpuop_func op_4a78_0_ff; -extern cpuop_func op_4a79_0_nf; -extern cpuop_func op_4a79_0_ff; -extern cpuop_func op_4a7a_0_nf; -extern cpuop_func op_4a7a_0_ff; -extern cpuop_func op_4a7b_0_nf; -extern cpuop_func op_4a7b_0_ff; -extern cpuop_func op_4a7c_0_nf; -extern cpuop_func op_4a7c_0_ff; -extern cpuop_func op_4a80_0_nf; -extern cpuop_func op_4a80_0_ff; -extern cpuop_func op_4a88_0_nf; -extern cpuop_func op_4a88_0_ff; -extern cpuop_func op_4a90_0_nf; -extern cpuop_func op_4a90_0_ff; -extern cpuop_func op_4a98_0_nf; -extern cpuop_func op_4a98_0_ff; -extern cpuop_func op_4aa0_0_nf; -extern cpuop_func op_4aa0_0_ff; -extern cpuop_func op_4aa8_0_nf; -extern cpuop_func op_4aa8_0_ff; -extern cpuop_func op_4ab0_0_nf; -extern cpuop_func op_4ab0_0_ff; -extern cpuop_func op_4ab8_0_nf; -extern cpuop_func op_4ab8_0_ff; -extern cpuop_func op_4ab9_0_nf; -extern cpuop_func op_4ab9_0_ff; -extern cpuop_func op_4aba_0_nf; -extern cpuop_func op_4aba_0_ff; -extern cpuop_func op_4abb_0_nf; -extern cpuop_func op_4abb_0_ff; -extern cpuop_func op_4abc_0_nf; -extern cpuop_func op_4abc_0_ff; -extern cpuop_func op_4ac0_0_nf; -extern cpuop_func op_4ac0_0_ff; -extern cpuop_func op_4ad0_0_nf; -extern cpuop_func op_4ad0_0_ff; -extern cpuop_func op_4ad8_0_nf; -extern cpuop_func op_4ad8_0_ff; -extern cpuop_func op_4ae0_0_nf; -extern cpuop_func op_4ae0_0_ff; -extern cpuop_func op_4ae8_0_nf; -extern cpuop_func op_4ae8_0_ff; -extern cpuop_func op_4af0_0_nf; -extern cpuop_func op_4af0_0_ff; -extern cpuop_func op_4af8_0_nf; -extern cpuop_func op_4af8_0_ff; -extern cpuop_func op_4af9_0_nf; -extern cpuop_func op_4af9_0_ff; -extern cpuop_func op_4c00_0_nf; -extern cpuop_func op_4c00_0_ff; -extern cpuop_func op_4c10_0_nf; -extern cpuop_func op_4c10_0_ff; -extern cpuop_func op_4c18_0_nf; -extern cpuop_func op_4c18_0_ff; -extern cpuop_func op_4c20_0_nf; -extern cpuop_func op_4c20_0_ff; -extern cpuop_func op_4c28_0_nf; -extern cpuop_func op_4c28_0_ff; -extern cpuop_func op_4c30_0_nf; -extern cpuop_func op_4c30_0_ff; -extern cpuop_func op_4c38_0_nf; -extern cpuop_func op_4c38_0_ff; -extern cpuop_func op_4c39_0_nf; -extern cpuop_func op_4c39_0_ff; -extern cpuop_func op_4c3a_0_nf; -extern cpuop_func op_4c3a_0_ff; -extern cpuop_func op_4c3b_0_nf; -extern cpuop_func op_4c3b_0_ff; -extern cpuop_func op_4c3c_0_nf; -extern cpuop_func op_4c3c_0_ff; -extern cpuop_func op_4c40_0_nf; -extern cpuop_func op_4c40_0_ff; -extern cpuop_func op_4c50_0_nf; -extern cpuop_func op_4c50_0_ff; -extern cpuop_func op_4c58_0_nf; -extern cpuop_func op_4c58_0_ff; -extern cpuop_func op_4c60_0_nf; -extern cpuop_func op_4c60_0_ff; -extern cpuop_func op_4c68_0_nf; -extern cpuop_func op_4c68_0_ff; -extern cpuop_func op_4c70_0_nf; -extern cpuop_func op_4c70_0_ff; -extern cpuop_func op_4c78_0_nf; -extern cpuop_func op_4c78_0_ff; -extern cpuop_func op_4c79_0_nf; -extern cpuop_func op_4c79_0_ff; -extern cpuop_func op_4c7a_0_nf; -extern cpuop_func op_4c7a_0_ff; -extern cpuop_func op_4c7b_0_nf; -extern cpuop_func op_4c7b_0_ff; -extern cpuop_func op_4c7c_0_nf; -extern cpuop_func op_4c7c_0_ff; -extern cpuop_func op_4c90_0_nf; -extern cpuop_func op_4c90_0_ff; -extern cpuop_func op_4c98_0_nf; -extern cpuop_func op_4c98_0_ff; -extern cpuop_func op_4ca8_0_nf; -extern cpuop_func op_4ca8_0_ff; -extern cpuop_func op_4cb0_0_nf; -extern cpuop_func op_4cb0_0_ff; -extern cpuop_func op_4cb8_0_nf; -extern cpuop_func op_4cb8_0_ff; -extern cpuop_func op_4cb9_0_nf; -extern cpuop_func op_4cb9_0_ff; -extern cpuop_func op_4cba_0_nf; -extern cpuop_func op_4cba_0_ff; -extern cpuop_func op_4cbb_0_nf; -extern cpuop_func op_4cbb_0_ff; -extern cpuop_func op_4cd0_0_nf; -extern cpuop_func op_4cd0_0_ff; -extern cpuop_func op_4cd8_0_nf; -extern cpuop_func op_4cd8_0_ff; -extern cpuop_func op_4ce8_0_nf; -extern cpuop_func op_4ce8_0_ff; -extern cpuop_func op_4cf0_0_nf; -extern cpuop_func op_4cf0_0_ff; -extern cpuop_func op_4cf8_0_nf; -extern cpuop_func op_4cf8_0_ff; -extern cpuop_func op_4cf9_0_nf; -extern cpuop_func op_4cf9_0_ff; -extern cpuop_func op_4cfa_0_nf; -extern cpuop_func op_4cfa_0_ff; -extern cpuop_func op_4cfb_0_nf; -extern cpuop_func op_4cfb_0_ff; -extern cpuop_func op_4e40_0_nf; -extern cpuop_func op_4e40_0_ff; -extern cpuop_func op_4e50_0_nf; -extern cpuop_func op_4e50_0_ff; -extern cpuop_func op_4e58_0_nf; -extern cpuop_func op_4e58_0_ff; -extern cpuop_func op_4e60_0_nf; -extern cpuop_func op_4e60_0_ff; -extern cpuop_func op_4e68_0_nf; -extern cpuop_func op_4e68_0_ff; -extern cpuop_func op_4e70_0_nf; -extern cpuop_func op_4e70_0_ff; -extern cpuop_func op_4e71_0_nf; -extern cpuop_func op_4e71_0_ff; -extern cpuop_func op_4e72_0_nf; -extern cpuop_func op_4e72_0_ff; -extern cpuop_func op_4e73_0_nf; -extern cpuop_func op_4e73_0_ff; -extern cpuop_func op_4e74_0_nf; -extern cpuop_func op_4e74_0_ff; -extern cpuop_func op_4e75_0_nf; -extern cpuop_func op_4e75_0_ff; -extern cpuop_func op_4e76_0_nf; -extern cpuop_func op_4e76_0_ff; -extern cpuop_func op_4e77_0_nf; -extern cpuop_func op_4e77_0_ff; -extern cpuop_func op_4e7a_0_nf; -extern cpuop_func op_4e7a_0_ff; -extern cpuop_func op_4e7b_0_nf; -extern cpuop_func op_4e7b_0_ff; -extern cpuop_func op_4e90_0_nf; -extern cpuop_func op_4e90_0_ff; -extern cpuop_func op_4ea8_0_nf; -extern cpuop_func op_4ea8_0_ff; -extern cpuop_func op_4eb0_0_nf; -extern cpuop_func op_4eb0_0_ff; -extern cpuop_func op_4eb8_0_nf; -extern cpuop_func op_4eb8_0_ff; -extern cpuop_func op_4eb9_0_nf; -extern cpuop_func op_4eb9_0_ff; -extern cpuop_func op_4eba_0_nf; -extern cpuop_func op_4eba_0_ff; -extern cpuop_func op_4ebb_0_nf; -extern cpuop_func op_4ebb_0_ff; -extern cpuop_func op_4ed0_0_nf; -extern cpuop_func op_4ed0_0_ff; -extern cpuop_func op_4ee8_0_nf; -extern cpuop_func op_4ee8_0_ff; -extern cpuop_func op_4ef0_0_nf; -extern cpuop_func op_4ef0_0_ff; -extern cpuop_func op_4ef8_0_nf; -extern cpuop_func op_4ef8_0_ff; -extern cpuop_func op_4ef9_0_nf; -extern cpuop_func op_4ef9_0_ff; -extern cpuop_func op_4efa_0_nf; -extern cpuop_func op_4efa_0_ff; -extern cpuop_func op_4efb_0_nf; -extern cpuop_func op_4efb_0_ff; -extern cpuop_func op_5000_0_nf; -extern cpuop_func op_5000_0_ff; -extern cpuop_func op_5010_0_nf; -extern cpuop_func op_5010_0_ff; -extern cpuop_func op_5018_0_nf; -extern cpuop_func op_5018_0_ff; -extern cpuop_func op_5020_0_nf; -extern cpuop_func op_5020_0_ff; -extern cpuop_func op_5028_0_nf; -extern cpuop_func op_5028_0_ff; -extern cpuop_func op_5030_0_nf; -extern cpuop_func op_5030_0_ff; -extern cpuop_func op_5038_0_nf; -extern cpuop_func op_5038_0_ff; -extern cpuop_func op_5039_0_nf; -extern cpuop_func op_5039_0_ff; -extern cpuop_func op_5040_0_nf; -extern cpuop_func op_5040_0_ff; -extern cpuop_func op_5048_0_nf; -extern cpuop_func op_5048_0_ff; -extern cpuop_func op_5050_0_nf; -extern cpuop_func op_5050_0_ff; -extern cpuop_func op_5058_0_nf; -extern cpuop_func op_5058_0_ff; -extern cpuop_func op_5060_0_nf; -extern cpuop_func op_5060_0_ff; -extern cpuop_func op_5068_0_nf; -extern cpuop_func op_5068_0_ff; -extern cpuop_func op_5070_0_nf; -extern cpuop_func op_5070_0_ff; -extern cpuop_func op_5078_0_nf; -extern cpuop_func op_5078_0_ff; -extern cpuop_func op_5079_0_nf; -extern cpuop_func op_5079_0_ff; -extern cpuop_func op_5080_0_nf; -extern cpuop_func op_5080_0_ff; -extern cpuop_func op_5088_0_nf; -extern cpuop_func op_5088_0_ff; -extern cpuop_func op_5090_0_nf; -extern cpuop_func op_5090_0_ff; -extern cpuop_func op_5098_0_nf; -extern cpuop_func op_5098_0_ff; -extern cpuop_func op_50a0_0_nf; -extern cpuop_func op_50a0_0_ff; -extern cpuop_func op_50a8_0_nf; -extern cpuop_func op_50a8_0_ff; -extern cpuop_func op_50b0_0_nf; -extern cpuop_func op_50b0_0_ff; -extern cpuop_func op_50b8_0_nf; -extern cpuop_func op_50b8_0_ff; -extern cpuop_func op_50b9_0_nf; -extern cpuop_func op_50b9_0_ff; -extern cpuop_func op_50c0_0_nf; -extern cpuop_func op_50c0_0_ff; -extern cpuop_func op_50c8_0_nf; -extern cpuop_func op_50c8_0_ff; -extern cpuop_func op_50d0_0_nf; -extern cpuop_func op_50d0_0_ff; -extern cpuop_func op_50d8_0_nf; -extern cpuop_func op_50d8_0_ff; -extern cpuop_func op_50e0_0_nf; -extern cpuop_func op_50e0_0_ff; -extern cpuop_func op_50e8_0_nf; -extern cpuop_func op_50e8_0_ff; -extern cpuop_func op_50f0_0_nf; -extern cpuop_func op_50f0_0_ff; -extern cpuop_func op_50f8_0_nf; -extern cpuop_func op_50f8_0_ff; -extern cpuop_func op_50f9_0_nf; -extern cpuop_func op_50f9_0_ff; -extern cpuop_func op_50fa_0_nf; -extern cpuop_func op_50fa_0_ff; -extern cpuop_func op_50fb_0_nf; -extern cpuop_func op_50fb_0_ff; -extern cpuop_func op_50fc_0_nf; -extern cpuop_func op_50fc_0_ff; -extern cpuop_func op_5100_0_nf; -extern cpuop_func op_5100_0_ff; -extern cpuop_func op_5110_0_nf; -extern cpuop_func op_5110_0_ff; -extern cpuop_func op_5118_0_nf; -extern cpuop_func op_5118_0_ff; -extern cpuop_func op_5120_0_nf; -extern cpuop_func op_5120_0_ff; -extern cpuop_func op_5128_0_nf; -extern cpuop_func op_5128_0_ff; -extern cpuop_func op_5130_0_nf; -extern cpuop_func op_5130_0_ff; -extern cpuop_func op_5138_0_nf; -extern cpuop_func op_5138_0_ff; -extern cpuop_func op_5139_0_nf; -extern cpuop_func op_5139_0_ff; -extern cpuop_func op_5140_0_nf; -extern cpuop_func op_5140_0_ff; -extern cpuop_func op_5148_0_nf; -extern cpuop_func op_5148_0_ff; -extern cpuop_func op_5150_0_nf; -extern cpuop_func op_5150_0_ff; -extern cpuop_func op_5158_0_nf; -extern cpuop_func op_5158_0_ff; -extern cpuop_func op_5160_0_nf; -extern cpuop_func op_5160_0_ff; -extern cpuop_func op_5168_0_nf; -extern cpuop_func op_5168_0_ff; -extern cpuop_func op_5170_0_nf; -extern cpuop_func op_5170_0_ff; -extern cpuop_func op_5178_0_nf; -extern cpuop_func op_5178_0_ff; -extern cpuop_func op_5179_0_nf; -extern cpuop_func op_5179_0_ff; -extern cpuop_func op_5180_0_nf; -extern cpuop_func op_5180_0_ff; -extern cpuop_func op_5188_0_nf; -extern cpuop_func op_5188_0_ff; -extern cpuop_func op_5190_0_nf; -extern cpuop_func op_5190_0_ff; -extern cpuop_func op_5198_0_nf; -extern cpuop_func op_5198_0_ff; -extern cpuop_func op_51a0_0_nf; -extern cpuop_func op_51a0_0_ff; -extern cpuop_func op_51a8_0_nf; -extern cpuop_func op_51a8_0_ff; -extern cpuop_func op_51b0_0_nf; -extern cpuop_func op_51b0_0_ff; -extern cpuop_func op_51b8_0_nf; -extern cpuop_func op_51b8_0_ff; -extern cpuop_func op_51b9_0_nf; -extern cpuop_func op_51b9_0_ff; -extern cpuop_func op_51c0_0_nf; -extern cpuop_func op_51c0_0_ff; -extern cpuop_func op_51c8_0_nf; -extern cpuop_func op_51c8_0_ff; -extern cpuop_func op_51d0_0_nf; -extern cpuop_func op_51d0_0_ff; -extern cpuop_func op_51d8_0_nf; -extern cpuop_func op_51d8_0_ff; -extern cpuop_func op_51e0_0_nf; -extern cpuop_func op_51e0_0_ff; -extern cpuop_func op_51e8_0_nf; -extern cpuop_func op_51e8_0_ff; -extern cpuop_func op_51f0_0_nf; -extern cpuop_func op_51f0_0_ff; -extern cpuop_func op_51f8_0_nf; -extern cpuop_func op_51f8_0_ff; -extern cpuop_func op_51f9_0_nf; -extern cpuop_func op_51f9_0_ff; -extern cpuop_func op_51fa_0_nf; -extern cpuop_func op_51fa_0_ff; -extern cpuop_func op_51fb_0_nf; -extern cpuop_func op_51fb_0_ff; -extern cpuop_func op_51fc_0_nf; -extern cpuop_func op_51fc_0_ff; -extern cpuop_func op_52c0_0_nf; -extern cpuop_func op_52c0_0_ff; -extern cpuop_func op_52c8_0_nf; -extern cpuop_func op_52c8_0_ff; -extern cpuop_func op_52d0_0_nf; -extern cpuop_func op_52d0_0_ff; -extern cpuop_func op_52d8_0_nf; -extern cpuop_func op_52d8_0_ff; -extern cpuop_func op_52e0_0_nf; -extern cpuop_func op_52e0_0_ff; -extern cpuop_func op_52e8_0_nf; -extern cpuop_func op_52e8_0_ff; -extern cpuop_func op_52f0_0_nf; -extern cpuop_func op_52f0_0_ff; -extern cpuop_func op_52f8_0_nf; -extern cpuop_func op_52f8_0_ff; -extern cpuop_func op_52f9_0_nf; -extern cpuop_func op_52f9_0_ff; -extern cpuop_func op_52fa_0_nf; -extern cpuop_func op_52fa_0_ff; -extern cpuop_func op_52fb_0_nf; -extern cpuop_func op_52fb_0_ff; -extern cpuop_func op_52fc_0_nf; -extern cpuop_func op_52fc_0_ff; -extern cpuop_func op_53c0_0_nf; -extern cpuop_func op_53c0_0_ff; -extern cpuop_func op_53c8_0_nf; -extern cpuop_func op_53c8_0_ff; -extern cpuop_func op_53d0_0_nf; -extern cpuop_func op_53d0_0_ff; -extern cpuop_func op_53d8_0_nf; -extern cpuop_func op_53d8_0_ff; -extern cpuop_func op_53e0_0_nf; -extern cpuop_func op_53e0_0_ff; -extern cpuop_func op_53e8_0_nf; -extern cpuop_func op_53e8_0_ff; -extern cpuop_func op_53f0_0_nf; -extern cpuop_func op_53f0_0_ff; -extern cpuop_func op_53f8_0_nf; -extern cpuop_func op_53f8_0_ff; -extern cpuop_func op_53f9_0_nf; -extern cpuop_func op_53f9_0_ff; -extern cpuop_func op_53fa_0_nf; -extern cpuop_func op_53fa_0_ff; -extern cpuop_func op_53fb_0_nf; -extern cpuop_func op_53fb_0_ff; -extern cpuop_func op_53fc_0_nf; -extern cpuop_func op_53fc_0_ff; -extern cpuop_func op_54c0_0_nf; -extern cpuop_func op_54c0_0_ff; -extern cpuop_func op_54c8_0_nf; -extern cpuop_func op_54c8_0_ff; -extern cpuop_func op_54d0_0_nf; -extern cpuop_func op_54d0_0_ff; -extern cpuop_func op_54d8_0_nf; -extern cpuop_func op_54d8_0_ff; -extern cpuop_func op_54e0_0_nf; -extern cpuop_func op_54e0_0_ff; -extern cpuop_func op_54e8_0_nf; -extern cpuop_func op_54e8_0_ff; -extern cpuop_func op_54f0_0_nf; -extern cpuop_func op_54f0_0_ff; -extern cpuop_func op_54f8_0_nf; -extern cpuop_func op_54f8_0_ff; -extern cpuop_func op_54f9_0_nf; -extern cpuop_func op_54f9_0_ff; -extern cpuop_func op_54fa_0_nf; -extern cpuop_func op_54fa_0_ff; -extern cpuop_func op_54fb_0_nf; -extern cpuop_func op_54fb_0_ff; -extern cpuop_func op_54fc_0_nf; -extern cpuop_func op_54fc_0_ff; -extern cpuop_func op_55c0_0_nf; -extern cpuop_func op_55c0_0_ff; -extern cpuop_func op_55c8_0_nf; -extern cpuop_func op_55c8_0_ff; -extern cpuop_func op_55d0_0_nf; -extern cpuop_func op_55d0_0_ff; -extern cpuop_func op_55d8_0_nf; -extern cpuop_func op_55d8_0_ff; -extern cpuop_func op_55e0_0_nf; -extern cpuop_func op_55e0_0_ff; -extern cpuop_func op_55e8_0_nf; -extern cpuop_func op_55e8_0_ff; -extern cpuop_func op_55f0_0_nf; -extern cpuop_func op_55f0_0_ff; -extern cpuop_func op_55f8_0_nf; -extern cpuop_func op_55f8_0_ff; -extern cpuop_func op_55f9_0_nf; -extern cpuop_func op_55f9_0_ff; -extern cpuop_func op_55fa_0_nf; -extern cpuop_func op_55fa_0_ff; -extern cpuop_func op_55fb_0_nf; -extern cpuop_func op_55fb_0_ff; -extern cpuop_func op_55fc_0_nf; -extern cpuop_func op_55fc_0_ff; -extern cpuop_func op_56c0_0_nf; -extern cpuop_func op_56c0_0_ff; -extern cpuop_func op_56c8_0_nf; -extern cpuop_func op_56c8_0_ff; -extern cpuop_func op_56d0_0_nf; -extern cpuop_func op_56d0_0_ff; -extern cpuop_func op_56d8_0_nf; -extern cpuop_func op_56d8_0_ff; -extern cpuop_func op_56e0_0_nf; -extern cpuop_func op_56e0_0_ff; -extern cpuop_func op_56e8_0_nf; -extern cpuop_func op_56e8_0_ff; -extern cpuop_func op_56f0_0_nf; -extern cpuop_func op_56f0_0_ff; -extern cpuop_func op_56f8_0_nf; -extern cpuop_func op_56f8_0_ff; -extern cpuop_func op_56f9_0_nf; -extern cpuop_func op_56f9_0_ff; -extern cpuop_func op_56fa_0_nf; -extern cpuop_func op_56fa_0_ff; -extern cpuop_func op_56fb_0_nf; -extern cpuop_func op_56fb_0_ff; -extern cpuop_func op_56fc_0_nf; -extern cpuop_func op_56fc_0_ff; -extern cpuop_func op_57c0_0_nf; -extern cpuop_func op_57c0_0_ff; -extern cpuop_func op_57c8_0_nf; -extern cpuop_func op_57c8_0_ff; -extern cpuop_func op_57d0_0_nf; -extern cpuop_func op_57d0_0_ff; -extern cpuop_func op_57d8_0_nf; -extern cpuop_func op_57d8_0_ff; -extern cpuop_func op_57e0_0_nf; -extern cpuop_func op_57e0_0_ff; -extern cpuop_func op_57e8_0_nf; -extern cpuop_func op_57e8_0_ff; -extern cpuop_func op_57f0_0_nf; -extern cpuop_func op_57f0_0_ff; -extern cpuop_func op_57f8_0_nf; -extern cpuop_func op_57f8_0_ff; -extern cpuop_func op_57f9_0_nf; -extern cpuop_func op_57f9_0_ff; -extern cpuop_func op_57fa_0_nf; -extern cpuop_func op_57fa_0_ff; -extern cpuop_func op_57fb_0_nf; -extern cpuop_func op_57fb_0_ff; -extern cpuop_func op_57fc_0_nf; -extern cpuop_func op_57fc_0_ff; -extern cpuop_func op_58c0_0_nf; -extern cpuop_func op_58c0_0_ff; -extern cpuop_func op_58c8_0_nf; -extern cpuop_func op_58c8_0_ff; -extern cpuop_func op_58d0_0_nf; -extern cpuop_func op_58d0_0_ff; -extern cpuop_func op_58d8_0_nf; -extern cpuop_func op_58d8_0_ff; -extern cpuop_func op_58e0_0_nf; -extern cpuop_func op_58e0_0_ff; -extern cpuop_func op_58e8_0_nf; -extern cpuop_func op_58e8_0_ff; -extern cpuop_func op_58f0_0_nf; -extern cpuop_func op_58f0_0_ff; -extern cpuop_func op_58f8_0_nf; -extern cpuop_func op_58f8_0_ff; -extern cpuop_func op_58f9_0_nf; -extern cpuop_func op_58f9_0_ff; -extern cpuop_func op_58fa_0_nf; -extern cpuop_func op_58fa_0_ff; -extern cpuop_func op_58fb_0_nf; -extern cpuop_func op_58fb_0_ff; -extern cpuop_func op_58fc_0_nf; -extern cpuop_func op_58fc_0_ff; -extern cpuop_func op_59c0_0_nf; -extern cpuop_func op_59c0_0_ff; -extern cpuop_func op_59c8_0_nf; -extern cpuop_func op_59c8_0_ff; -extern cpuop_func op_59d0_0_nf; -extern cpuop_func op_59d0_0_ff; -extern cpuop_func op_59d8_0_nf; -extern cpuop_func op_59d8_0_ff; -extern cpuop_func op_59e0_0_nf; -extern cpuop_func op_59e0_0_ff; -extern cpuop_func op_59e8_0_nf; -extern cpuop_func op_59e8_0_ff; -extern cpuop_func op_59f0_0_nf; -extern cpuop_func op_59f0_0_ff; -extern cpuop_func op_59f8_0_nf; -extern cpuop_func op_59f8_0_ff; -extern cpuop_func op_59f9_0_nf; -extern cpuop_func op_59f9_0_ff; -extern cpuop_func op_59fa_0_nf; -extern cpuop_func op_59fa_0_ff; -extern cpuop_func op_59fb_0_nf; -extern cpuop_func op_59fb_0_ff; -extern cpuop_func op_59fc_0_nf; -extern cpuop_func op_59fc_0_ff; -extern cpuop_func op_5ac0_0_nf; -extern cpuop_func op_5ac0_0_ff; -extern cpuop_func op_5ac8_0_nf; -extern cpuop_func op_5ac8_0_ff; -extern cpuop_func op_5ad0_0_nf; -extern cpuop_func op_5ad0_0_ff; -extern cpuop_func op_5ad8_0_nf; -extern cpuop_func op_5ad8_0_ff; -extern cpuop_func op_5ae0_0_nf; -extern cpuop_func op_5ae0_0_ff; -extern cpuop_func op_5ae8_0_nf; -extern cpuop_func op_5ae8_0_ff; -extern cpuop_func op_5af0_0_nf; -extern cpuop_func op_5af0_0_ff; -extern cpuop_func op_5af8_0_nf; -extern cpuop_func op_5af8_0_ff; -extern cpuop_func op_5af9_0_nf; -extern cpuop_func op_5af9_0_ff; -extern cpuop_func op_5afa_0_nf; -extern cpuop_func op_5afa_0_ff; -extern cpuop_func op_5afb_0_nf; -extern cpuop_func op_5afb_0_ff; -extern cpuop_func op_5afc_0_nf; -extern cpuop_func op_5afc_0_ff; -extern cpuop_func op_5bc0_0_nf; -extern cpuop_func op_5bc0_0_ff; -extern cpuop_func op_5bc8_0_nf; -extern cpuop_func op_5bc8_0_ff; -extern cpuop_func op_5bd0_0_nf; -extern cpuop_func op_5bd0_0_ff; -extern cpuop_func op_5bd8_0_nf; -extern cpuop_func op_5bd8_0_ff; -extern cpuop_func op_5be0_0_nf; -extern cpuop_func op_5be0_0_ff; -extern cpuop_func op_5be8_0_nf; -extern cpuop_func op_5be8_0_ff; -extern cpuop_func op_5bf0_0_nf; -extern cpuop_func op_5bf0_0_ff; -extern cpuop_func op_5bf8_0_nf; -extern cpuop_func op_5bf8_0_ff; -extern cpuop_func op_5bf9_0_nf; -extern cpuop_func op_5bf9_0_ff; -extern cpuop_func op_5bfa_0_nf; -extern cpuop_func op_5bfa_0_ff; -extern cpuop_func op_5bfb_0_nf; -extern cpuop_func op_5bfb_0_ff; -extern cpuop_func op_5bfc_0_nf; -extern cpuop_func op_5bfc_0_ff; -extern cpuop_func op_5cc0_0_nf; -extern cpuop_func op_5cc0_0_ff; -extern cpuop_func op_5cc8_0_nf; -extern cpuop_func op_5cc8_0_ff; -extern cpuop_func op_5cd0_0_nf; -extern cpuop_func op_5cd0_0_ff; -extern cpuop_func op_5cd8_0_nf; -extern cpuop_func op_5cd8_0_ff; -extern cpuop_func op_5ce0_0_nf; -extern cpuop_func op_5ce0_0_ff; -extern cpuop_func op_5ce8_0_nf; -extern cpuop_func op_5ce8_0_ff; -extern cpuop_func op_5cf0_0_nf; -extern cpuop_func op_5cf0_0_ff; -extern cpuop_func op_5cf8_0_nf; -extern cpuop_func op_5cf8_0_ff; -extern cpuop_func op_5cf9_0_nf; -extern cpuop_func op_5cf9_0_ff; -extern cpuop_func op_5cfa_0_nf; -extern cpuop_func op_5cfa_0_ff; -extern cpuop_func op_5cfb_0_nf; -extern cpuop_func op_5cfb_0_ff; -extern cpuop_func op_5cfc_0_nf; -extern cpuop_func op_5cfc_0_ff; -extern cpuop_func op_5dc0_0_nf; -extern cpuop_func op_5dc0_0_ff; -extern cpuop_func op_5dc8_0_nf; -extern cpuop_func op_5dc8_0_ff; -extern cpuop_func op_5dd0_0_nf; -extern cpuop_func op_5dd0_0_ff; -extern cpuop_func op_5dd8_0_nf; -extern cpuop_func op_5dd8_0_ff; -extern cpuop_func op_5de0_0_nf; -extern cpuop_func op_5de0_0_ff; -extern cpuop_func op_5de8_0_nf; -extern cpuop_func op_5de8_0_ff; -extern cpuop_func op_5df0_0_nf; -extern cpuop_func op_5df0_0_ff; -extern cpuop_func op_5df8_0_nf; -extern cpuop_func op_5df8_0_ff; -extern cpuop_func op_5df9_0_nf; -extern cpuop_func op_5df9_0_ff; -extern cpuop_func op_5dfa_0_nf; -extern cpuop_func op_5dfa_0_ff; -extern cpuop_func op_5dfb_0_nf; -extern cpuop_func op_5dfb_0_ff; -extern cpuop_func op_5dfc_0_nf; -extern cpuop_func op_5dfc_0_ff; -extern cpuop_func op_5ec0_0_nf; -extern cpuop_func op_5ec0_0_ff; -extern cpuop_func op_5ec8_0_nf; -extern cpuop_func op_5ec8_0_ff; -extern cpuop_func op_5ed0_0_nf; -extern cpuop_func op_5ed0_0_ff; -extern cpuop_func op_5ed8_0_nf; -extern cpuop_func op_5ed8_0_ff; -extern cpuop_func op_5ee0_0_nf; -extern cpuop_func op_5ee0_0_ff; -extern cpuop_func op_5ee8_0_nf; -extern cpuop_func op_5ee8_0_ff; -extern cpuop_func op_5ef0_0_nf; -extern cpuop_func op_5ef0_0_ff; -extern cpuop_func op_5ef8_0_nf; -extern cpuop_func op_5ef8_0_ff; -extern cpuop_func op_5ef9_0_nf; -extern cpuop_func op_5ef9_0_ff; -extern cpuop_func op_5efa_0_nf; -extern cpuop_func op_5efa_0_ff; -extern cpuop_func op_5efb_0_nf; -extern cpuop_func op_5efb_0_ff; -extern cpuop_func op_5efc_0_nf; -extern cpuop_func op_5efc_0_ff; -extern cpuop_func op_5fc0_0_nf; -extern cpuop_func op_5fc0_0_ff; -extern cpuop_func op_5fc8_0_nf; -extern cpuop_func op_5fc8_0_ff; -extern cpuop_func op_5fd0_0_nf; -extern cpuop_func op_5fd0_0_ff; -extern cpuop_func op_5fd8_0_nf; -extern cpuop_func op_5fd8_0_ff; -extern cpuop_func op_5fe0_0_nf; -extern cpuop_func op_5fe0_0_ff; -extern cpuop_func op_5fe8_0_nf; -extern cpuop_func op_5fe8_0_ff; -extern cpuop_func op_5ff0_0_nf; -extern cpuop_func op_5ff0_0_ff; -extern cpuop_func op_5ff8_0_nf; -extern cpuop_func op_5ff8_0_ff; -extern cpuop_func op_5ff9_0_nf; -extern cpuop_func op_5ff9_0_ff; -extern cpuop_func op_5ffa_0_nf; -extern cpuop_func op_5ffa_0_ff; -extern cpuop_func op_5ffb_0_nf; -extern cpuop_func op_5ffb_0_ff; -extern cpuop_func op_5ffc_0_nf; -extern cpuop_func op_5ffc_0_ff; -extern cpuop_func op_6000_0_nf; -extern cpuop_func op_6000_0_ff; -extern cpuop_func op_6001_0_nf; -extern cpuop_func op_6001_0_ff; -extern cpuop_func op_60ff_0_nf; -extern cpuop_func op_60ff_0_ff; -extern cpuop_func op_6100_0_nf; -extern cpuop_func op_6100_0_ff; -extern cpuop_func op_6101_0_nf; -extern cpuop_func op_6101_0_ff; -extern cpuop_func op_61ff_0_nf; -extern cpuop_func op_61ff_0_ff; -extern cpuop_func op_6200_0_nf; -extern cpuop_func op_6200_0_ff; -extern cpuop_func op_6201_0_nf; -extern cpuop_func op_6201_0_ff; -extern cpuop_func op_62ff_0_nf; -extern cpuop_func op_62ff_0_ff; -extern cpuop_func op_6300_0_nf; -extern cpuop_func op_6300_0_ff; -extern cpuop_func op_6301_0_nf; -extern cpuop_func op_6301_0_ff; -extern cpuop_func op_63ff_0_nf; -extern cpuop_func op_63ff_0_ff; -extern cpuop_func op_6400_0_nf; -extern cpuop_func op_6400_0_ff; -extern cpuop_func op_6401_0_nf; -extern cpuop_func op_6401_0_ff; -extern cpuop_func op_64ff_0_nf; -extern cpuop_func op_64ff_0_ff; -extern cpuop_func op_6500_0_nf; -extern cpuop_func op_6500_0_ff; -extern cpuop_func op_6501_0_nf; -extern cpuop_func op_6501_0_ff; -extern cpuop_func op_65ff_0_nf; -extern cpuop_func op_65ff_0_ff; -extern cpuop_func op_6600_0_nf; -extern cpuop_func op_6600_0_ff; -extern cpuop_func op_6601_0_nf; -extern cpuop_func op_6601_0_ff; -extern cpuop_func op_66ff_0_nf; -extern cpuop_func op_66ff_0_ff; -extern cpuop_func op_6700_0_nf; -extern cpuop_func op_6700_0_ff; -extern cpuop_func op_6701_0_nf; -extern cpuop_func op_6701_0_ff; -extern cpuop_func op_67ff_0_nf; -extern cpuop_func op_67ff_0_ff; -extern cpuop_func op_6800_0_nf; -extern cpuop_func op_6800_0_ff; -extern cpuop_func op_6801_0_nf; -extern cpuop_func op_6801_0_ff; -extern cpuop_func op_68ff_0_nf; -extern cpuop_func op_68ff_0_ff; -extern cpuop_func op_6900_0_nf; -extern cpuop_func op_6900_0_ff; -extern cpuop_func op_6901_0_nf; -extern cpuop_func op_6901_0_ff; -extern cpuop_func op_69ff_0_nf; -extern cpuop_func op_69ff_0_ff; -extern cpuop_func op_6a00_0_nf; -extern cpuop_func op_6a00_0_ff; -extern cpuop_func op_6a01_0_nf; -extern cpuop_func op_6a01_0_ff; -extern cpuop_func op_6aff_0_nf; -extern cpuop_func op_6aff_0_ff; -extern cpuop_func op_6b00_0_nf; -extern cpuop_func op_6b00_0_ff; -extern cpuop_func op_6b01_0_nf; -extern cpuop_func op_6b01_0_ff; -extern cpuop_func op_6bff_0_nf; -extern cpuop_func op_6bff_0_ff; -extern cpuop_func op_6c00_0_nf; -extern cpuop_func op_6c00_0_ff; -extern cpuop_func op_6c01_0_nf; -extern cpuop_func op_6c01_0_ff; -extern cpuop_func op_6cff_0_nf; -extern cpuop_func op_6cff_0_ff; -extern cpuop_func op_6d00_0_nf; -extern cpuop_func op_6d00_0_ff; -extern cpuop_func op_6d01_0_nf; -extern cpuop_func op_6d01_0_ff; -extern cpuop_func op_6dff_0_nf; -extern cpuop_func op_6dff_0_ff; -extern cpuop_func op_6e00_0_nf; -extern cpuop_func op_6e00_0_ff; -extern cpuop_func op_6e01_0_nf; -extern cpuop_func op_6e01_0_ff; -extern cpuop_func op_6eff_0_nf; -extern cpuop_func op_6eff_0_ff; -extern cpuop_func op_6f00_0_nf; -extern cpuop_func op_6f00_0_ff; -extern cpuop_func op_6f01_0_nf; -extern cpuop_func op_6f01_0_ff; -extern cpuop_func op_6fff_0_nf; -extern cpuop_func op_6fff_0_ff; -extern cpuop_func op_7000_0_nf; -extern cpuop_func op_7000_0_ff; -extern cpuop_func op_7100_0_nf; -extern cpuop_func op_7100_0_ff; -extern cpuop_func op_7101_0_nf; -extern cpuop_func op_7101_0_ff; -extern cpuop_func op_8000_0_nf; -extern cpuop_func op_8000_0_ff; -extern cpuop_func op_8010_0_nf; -extern cpuop_func op_8010_0_ff; -extern cpuop_func op_8018_0_nf; -extern cpuop_func op_8018_0_ff; -extern cpuop_func op_8020_0_nf; -extern cpuop_func op_8020_0_ff; -extern cpuop_func op_8028_0_nf; -extern cpuop_func op_8028_0_ff; -extern cpuop_func op_8030_0_nf; -extern cpuop_func op_8030_0_ff; -extern cpuop_func op_8038_0_nf; -extern cpuop_func op_8038_0_ff; -extern cpuop_func op_8039_0_nf; -extern cpuop_func op_8039_0_ff; -extern cpuop_func op_803a_0_nf; -extern cpuop_func op_803a_0_ff; -extern cpuop_func op_803b_0_nf; -extern cpuop_func op_803b_0_ff; -extern cpuop_func op_803c_0_nf; -extern cpuop_func op_803c_0_ff; -extern cpuop_func op_8040_0_nf; -extern cpuop_func op_8040_0_ff; -extern cpuop_func op_8050_0_nf; -extern cpuop_func op_8050_0_ff; -extern cpuop_func op_8058_0_nf; -extern cpuop_func op_8058_0_ff; -extern cpuop_func op_8060_0_nf; -extern cpuop_func op_8060_0_ff; -extern cpuop_func op_8068_0_nf; -extern cpuop_func op_8068_0_ff; -extern cpuop_func op_8070_0_nf; -extern cpuop_func op_8070_0_ff; -extern cpuop_func op_8078_0_nf; -extern cpuop_func op_8078_0_ff; -extern cpuop_func op_8079_0_nf; -extern cpuop_func op_8079_0_ff; -extern cpuop_func op_807a_0_nf; -extern cpuop_func op_807a_0_ff; -extern cpuop_func op_807b_0_nf; -extern cpuop_func op_807b_0_ff; -extern cpuop_func op_807c_0_nf; -extern cpuop_func op_807c_0_ff; -extern cpuop_func op_8080_0_nf; -extern cpuop_func op_8080_0_ff; -extern cpuop_func op_8090_0_nf; -extern cpuop_func op_8090_0_ff; -extern cpuop_func op_8098_0_nf; -extern cpuop_func op_8098_0_ff; -extern cpuop_func op_80a0_0_nf; -extern cpuop_func op_80a0_0_ff; -extern cpuop_func op_80a8_0_nf; -extern cpuop_func op_80a8_0_ff; -extern cpuop_func op_80b0_0_nf; -extern cpuop_func op_80b0_0_ff; -extern cpuop_func op_80b8_0_nf; -extern cpuop_func op_80b8_0_ff; -extern cpuop_func op_80b9_0_nf; -extern cpuop_func op_80b9_0_ff; -extern cpuop_func op_80ba_0_nf; -extern cpuop_func op_80ba_0_ff; -extern cpuop_func op_80bb_0_nf; -extern cpuop_func op_80bb_0_ff; -extern cpuop_func op_80bc_0_nf; -extern cpuop_func op_80bc_0_ff; -extern cpuop_func op_80c0_0_nf; -extern cpuop_func op_80c0_0_ff; -extern cpuop_func op_80d0_0_nf; -extern cpuop_func op_80d0_0_ff; -extern cpuop_func op_80d8_0_nf; -extern cpuop_func op_80d8_0_ff; -extern cpuop_func op_80e0_0_nf; -extern cpuop_func op_80e0_0_ff; -extern cpuop_func op_80e8_0_nf; -extern cpuop_func op_80e8_0_ff; -extern cpuop_func op_80f0_0_nf; -extern cpuop_func op_80f0_0_ff; -extern cpuop_func op_80f8_0_nf; -extern cpuop_func op_80f8_0_ff; -extern cpuop_func op_80f9_0_nf; -extern cpuop_func op_80f9_0_ff; -extern cpuop_func op_80fa_0_nf; -extern cpuop_func op_80fa_0_ff; -extern cpuop_func op_80fb_0_nf; -extern cpuop_func op_80fb_0_ff; -extern cpuop_func op_80fc_0_nf; -extern cpuop_func op_80fc_0_ff; -extern cpuop_func op_8100_0_nf; -extern cpuop_func op_8100_0_ff; -extern cpuop_func op_8108_0_nf; -extern cpuop_func op_8108_0_ff; -extern cpuop_func op_8110_0_nf; -extern cpuop_func op_8110_0_ff; -extern cpuop_func op_8118_0_nf; -extern cpuop_func op_8118_0_ff; -extern cpuop_func op_8120_0_nf; -extern cpuop_func op_8120_0_ff; -extern cpuop_func op_8128_0_nf; -extern cpuop_func op_8128_0_ff; -extern cpuop_func op_8130_0_nf; -extern cpuop_func op_8130_0_ff; -extern cpuop_func op_8138_0_nf; -extern cpuop_func op_8138_0_ff; -extern cpuop_func op_8139_0_nf; -extern cpuop_func op_8139_0_ff; -extern cpuop_func op_8140_0_nf; -extern cpuop_func op_8140_0_ff; -extern cpuop_func op_8148_0_nf; -extern cpuop_func op_8148_0_ff; -extern cpuop_func op_8150_0_nf; -extern cpuop_func op_8150_0_ff; -extern cpuop_func op_8158_0_nf; -extern cpuop_func op_8158_0_ff; -extern cpuop_func op_8160_0_nf; -extern cpuop_func op_8160_0_ff; -extern cpuop_func op_8168_0_nf; -extern cpuop_func op_8168_0_ff; -extern cpuop_func op_8170_0_nf; -extern cpuop_func op_8170_0_ff; -extern cpuop_func op_8178_0_nf; -extern cpuop_func op_8178_0_ff; -extern cpuop_func op_8179_0_nf; -extern cpuop_func op_8179_0_ff; -extern cpuop_func op_8180_0_nf; -extern cpuop_func op_8180_0_ff; -extern cpuop_func op_8188_0_nf; -extern cpuop_func op_8188_0_ff; -extern cpuop_func op_8190_0_nf; -extern cpuop_func op_8190_0_ff; -extern cpuop_func op_8198_0_nf; -extern cpuop_func op_8198_0_ff; -extern cpuop_func op_81a0_0_nf; -extern cpuop_func op_81a0_0_ff; -extern cpuop_func op_81a8_0_nf; -extern cpuop_func op_81a8_0_ff; -extern cpuop_func op_81b0_0_nf; -extern cpuop_func op_81b0_0_ff; -extern cpuop_func op_81b8_0_nf; -extern cpuop_func op_81b8_0_ff; -extern cpuop_func op_81b9_0_nf; -extern cpuop_func op_81b9_0_ff; -extern cpuop_func op_81c0_0_nf; -extern cpuop_func op_81c0_0_ff; -extern cpuop_func op_81d0_0_nf; -extern cpuop_func op_81d0_0_ff; -extern cpuop_func op_81d8_0_nf; -extern cpuop_func op_81d8_0_ff; -extern cpuop_func op_81e0_0_nf; -extern cpuop_func op_81e0_0_ff; -extern cpuop_func op_81e8_0_nf; -extern cpuop_func op_81e8_0_ff; -extern cpuop_func op_81f0_0_nf; -extern cpuop_func op_81f0_0_ff; -extern cpuop_func op_81f8_0_nf; -extern cpuop_func op_81f8_0_ff; -extern cpuop_func op_81f9_0_nf; -extern cpuop_func op_81f9_0_ff; -extern cpuop_func op_81fa_0_nf; -extern cpuop_func op_81fa_0_ff; -extern cpuop_func op_81fb_0_nf; -extern cpuop_func op_81fb_0_ff; -extern cpuop_func op_81fc_0_nf; -extern cpuop_func op_81fc_0_ff; -extern cpuop_func op_9000_0_nf; -extern cpuop_func op_9000_0_ff; -extern cpuop_func op_9010_0_nf; -extern cpuop_func op_9010_0_ff; -extern cpuop_func op_9018_0_nf; -extern cpuop_func op_9018_0_ff; -extern cpuop_func op_9020_0_nf; -extern cpuop_func op_9020_0_ff; -extern cpuop_func op_9028_0_nf; -extern cpuop_func op_9028_0_ff; -extern cpuop_func op_9030_0_nf; -extern cpuop_func op_9030_0_ff; -extern cpuop_func op_9038_0_nf; -extern cpuop_func op_9038_0_ff; -extern cpuop_func op_9039_0_nf; -extern cpuop_func op_9039_0_ff; -extern cpuop_func op_903a_0_nf; -extern cpuop_func op_903a_0_ff; -extern cpuop_func op_903b_0_nf; -extern cpuop_func op_903b_0_ff; -extern cpuop_func op_903c_0_nf; -extern cpuop_func op_903c_0_ff; -extern cpuop_func op_9040_0_nf; -extern cpuop_func op_9040_0_ff; -extern cpuop_func op_9048_0_nf; -extern cpuop_func op_9048_0_ff; -extern cpuop_func op_9050_0_nf; -extern cpuop_func op_9050_0_ff; -extern cpuop_func op_9058_0_nf; -extern cpuop_func op_9058_0_ff; -extern cpuop_func op_9060_0_nf; -extern cpuop_func op_9060_0_ff; -extern cpuop_func op_9068_0_nf; -extern cpuop_func op_9068_0_ff; -extern cpuop_func op_9070_0_nf; -extern cpuop_func op_9070_0_ff; -extern cpuop_func op_9078_0_nf; -extern cpuop_func op_9078_0_ff; -extern cpuop_func op_9079_0_nf; -extern cpuop_func op_9079_0_ff; -extern cpuop_func op_907a_0_nf; -extern cpuop_func op_907a_0_ff; -extern cpuop_func op_907b_0_nf; -extern cpuop_func op_907b_0_ff; -extern cpuop_func op_907c_0_nf; -extern cpuop_func op_907c_0_ff; -extern cpuop_func op_9080_0_nf; -extern cpuop_func op_9080_0_ff; -extern cpuop_func op_9088_0_nf; -extern cpuop_func op_9088_0_ff; -extern cpuop_func op_9090_0_nf; -extern cpuop_func op_9090_0_ff; -extern cpuop_func op_9098_0_nf; -extern cpuop_func op_9098_0_ff; -extern cpuop_func op_90a0_0_nf; -extern cpuop_func op_90a0_0_ff; -extern cpuop_func op_90a8_0_nf; -extern cpuop_func op_90a8_0_ff; -extern cpuop_func op_90b0_0_nf; -extern cpuop_func op_90b0_0_ff; -extern cpuop_func op_90b8_0_nf; -extern cpuop_func op_90b8_0_ff; -extern cpuop_func op_90b9_0_nf; -extern cpuop_func op_90b9_0_ff; -extern cpuop_func op_90ba_0_nf; -extern cpuop_func op_90ba_0_ff; -extern cpuop_func op_90bb_0_nf; -extern cpuop_func op_90bb_0_ff; -extern cpuop_func op_90bc_0_nf; -extern cpuop_func op_90bc_0_ff; -extern cpuop_func op_90c0_0_nf; -extern cpuop_func op_90c0_0_ff; -extern cpuop_func op_90c8_0_nf; -extern cpuop_func op_90c8_0_ff; -extern cpuop_func op_90d0_0_nf; -extern cpuop_func op_90d0_0_ff; -extern cpuop_func op_90d8_0_nf; -extern cpuop_func op_90d8_0_ff; -extern cpuop_func op_90e0_0_nf; -extern cpuop_func op_90e0_0_ff; -extern cpuop_func op_90e8_0_nf; -extern cpuop_func op_90e8_0_ff; -extern cpuop_func op_90f0_0_nf; -extern cpuop_func op_90f0_0_ff; -extern cpuop_func op_90f8_0_nf; -extern cpuop_func op_90f8_0_ff; -extern cpuop_func op_90f9_0_nf; -extern cpuop_func op_90f9_0_ff; -extern cpuop_func op_90fa_0_nf; -extern cpuop_func op_90fa_0_ff; -extern cpuop_func op_90fb_0_nf; -extern cpuop_func op_90fb_0_ff; -extern cpuop_func op_90fc_0_nf; -extern cpuop_func op_90fc_0_ff; -extern cpuop_func op_9100_0_nf; -extern cpuop_func op_9100_0_ff; -extern cpuop_func op_9108_0_nf; -extern cpuop_func op_9108_0_ff; -extern cpuop_func op_9110_0_nf; -extern cpuop_func op_9110_0_ff; -extern cpuop_func op_9118_0_nf; -extern cpuop_func op_9118_0_ff; -extern cpuop_func op_9120_0_nf; -extern cpuop_func op_9120_0_ff; -extern cpuop_func op_9128_0_nf; -extern cpuop_func op_9128_0_ff; -extern cpuop_func op_9130_0_nf; -extern cpuop_func op_9130_0_ff; -extern cpuop_func op_9138_0_nf; -extern cpuop_func op_9138_0_ff; -extern cpuop_func op_9139_0_nf; -extern cpuop_func op_9139_0_ff; -extern cpuop_func op_9140_0_nf; -extern cpuop_func op_9140_0_ff; -extern cpuop_func op_9148_0_nf; -extern cpuop_func op_9148_0_ff; -extern cpuop_func op_9150_0_nf; -extern cpuop_func op_9150_0_ff; -extern cpuop_func op_9158_0_nf; -extern cpuop_func op_9158_0_ff; -extern cpuop_func op_9160_0_nf; -extern cpuop_func op_9160_0_ff; -extern cpuop_func op_9168_0_nf; -extern cpuop_func op_9168_0_ff; -extern cpuop_func op_9170_0_nf; -extern cpuop_func op_9170_0_ff; -extern cpuop_func op_9178_0_nf; -extern cpuop_func op_9178_0_ff; -extern cpuop_func op_9179_0_nf; -extern cpuop_func op_9179_0_ff; -extern cpuop_func op_9180_0_nf; -extern cpuop_func op_9180_0_ff; -extern cpuop_func op_9188_0_nf; -extern cpuop_func op_9188_0_ff; -extern cpuop_func op_9190_0_nf; -extern cpuop_func op_9190_0_ff; -extern cpuop_func op_9198_0_nf; -extern cpuop_func op_9198_0_ff; -extern cpuop_func op_91a0_0_nf; -extern cpuop_func op_91a0_0_ff; -extern cpuop_func op_91a8_0_nf; -extern cpuop_func op_91a8_0_ff; -extern cpuop_func op_91b0_0_nf; -extern cpuop_func op_91b0_0_ff; -extern cpuop_func op_91b8_0_nf; -extern cpuop_func op_91b8_0_ff; -extern cpuop_func op_91b9_0_nf; -extern cpuop_func op_91b9_0_ff; -extern cpuop_func op_91c0_0_nf; -extern cpuop_func op_91c0_0_ff; -extern cpuop_func op_91c8_0_nf; -extern cpuop_func op_91c8_0_ff; -extern cpuop_func op_91d0_0_nf; -extern cpuop_func op_91d0_0_ff; -extern cpuop_func op_91d8_0_nf; -extern cpuop_func op_91d8_0_ff; -extern cpuop_func op_91e0_0_nf; -extern cpuop_func op_91e0_0_ff; -extern cpuop_func op_91e8_0_nf; -extern cpuop_func op_91e8_0_ff; -extern cpuop_func op_91f0_0_nf; -extern cpuop_func op_91f0_0_ff; -extern cpuop_func op_91f8_0_nf; -extern cpuop_func op_91f8_0_ff; -extern cpuop_func op_91f9_0_nf; -extern cpuop_func op_91f9_0_ff; -extern cpuop_func op_91fa_0_nf; -extern cpuop_func op_91fa_0_ff; -extern cpuop_func op_91fb_0_nf; -extern cpuop_func op_91fb_0_ff; -extern cpuop_func op_91fc_0_nf; -extern cpuop_func op_91fc_0_ff; -extern cpuop_func op_b000_0_nf; -extern cpuop_func op_b000_0_ff; -extern cpuop_func op_b010_0_nf; -extern cpuop_func op_b010_0_ff; -extern cpuop_func op_b018_0_nf; -extern cpuop_func op_b018_0_ff; -extern cpuop_func op_b020_0_nf; -extern cpuop_func op_b020_0_ff; -extern cpuop_func op_b028_0_nf; -extern cpuop_func op_b028_0_ff; -extern cpuop_func op_b030_0_nf; -extern cpuop_func op_b030_0_ff; -extern cpuop_func op_b038_0_nf; -extern cpuop_func op_b038_0_ff; -extern cpuop_func op_b039_0_nf; -extern cpuop_func op_b039_0_ff; -extern cpuop_func op_b03a_0_nf; -extern cpuop_func op_b03a_0_ff; -extern cpuop_func op_b03b_0_nf; -extern cpuop_func op_b03b_0_ff; -extern cpuop_func op_b03c_0_nf; -extern cpuop_func op_b03c_0_ff; -extern cpuop_func op_b040_0_nf; -extern cpuop_func op_b040_0_ff; -extern cpuop_func op_b048_0_nf; -extern cpuop_func op_b048_0_ff; -extern cpuop_func op_b050_0_nf; -extern cpuop_func op_b050_0_ff; -extern cpuop_func op_b058_0_nf; -extern cpuop_func op_b058_0_ff; -extern cpuop_func op_b060_0_nf; -extern cpuop_func op_b060_0_ff; -extern cpuop_func op_b068_0_nf; -extern cpuop_func op_b068_0_ff; -extern cpuop_func op_b070_0_nf; -extern cpuop_func op_b070_0_ff; -extern cpuop_func op_b078_0_nf; -extern cpuop_func op_b078_0_ff; -extern cpuop_func op_b079_0_nf; -extern cpuop_func op_b079_0_ff; -extern cpuop_func op_b07a_0_nf; -extern cpuop_func op_b07a_0_ff; -extern cpuop_func op_b07b_0_nf; -extern cpuop_func op_b07b_0_ff; -extern cpuop_func op_b07c_0_nf; -extern cpuop_func op_b07c_0_ff; -extern cpuop_func op_b080_0_nf; -extern cpuop_func op_b080_0_ff; -extern cpuop_func op_b088_0_nf; -extern cpuop_func op_b088_0_ff; -extern cpuop_func op_b090_0_nf; -extern cpuop_func op_b090_0_ff; -extern cpuop_func op_b098_0_nf; -extern cpuop_func op_b098_0_ff; -extern cpuop_func op_b0a0_0_nf; -extern cpuop_func op_b0a0_0_ff; -extern cpuop_func op_b0a8_0_nf; -extern cpuop_func op_b0a8_0_ff; -extern cpuop_func op_b0b0_0_nf; -extern cpuop_func op_b0b0_0_ff; -extern cpuop_func op_b0b8_0_nf; -extern cpuop_func op_b0b8_0_ff; -extern cpuop_func op_b0b9_0_nf; -extern cpuop_func op_b0b9_0_ff; -extern cpuop_func op_b0ba_0_nf; -extern cpuop_func op_b0ba_0_ff; -extern cpuop_func op_b0bb_0_nf; -extern cpuop_func op_b0bb_0_ff; -extern cpuop_func op_b0bc_0_nf; -extern cpuop_func op_b0bc_0_ff; -extern cpuop_func op_b0c0_0_nf; -extern cpuop_func op_b0c0_0_ff; -extern cpuop_func op_b0c8_0_nf; -extern cpuop_func op_b0c8_0_ff; -extern cpuop_func op_b0d0_0_nf; -extern cpuop_func op_b0d0_0_ff; -extern cpuop_func op_b0d8_0_nf; -extern cpuop_func op_b0d8_0_ff; -extern cpuop_func op_b0e0_0_nf; -extern cpuop_func op_b0e0_0_ff; -extern cpuop_func op_b0e8_0_nf; -extern cpuop_func op_b0e8_0_ff; -extern cpuop_func op_b0f0_0_nf; -extern cpuop_func op_b0f0_0_ff; -extern cpuop_func op_b0f8_0_nf; -extern cpuop_func op_b0f8_0_ff; -extern cpuop_func op_b0f9_0_nf; -extern cpuop_func op_b0f9_0_ff; -extern cpuop_func op_b0fa_0_nf; -extern cpuop_func op_b0fa_0_ff; -extern cpuop_func op_b0fb_0_nf; -extern cpuop_func op_b0fb_0_ff; -extern cpuop_func op_b0fc_0_nf; -extern cpuop_func op_b0fc_0_ff; -extern cpuop_func op_b100_0_nf; -extern cpuop_func op_b100_0_ff; -extern cpuop_func op_b108_0_nf; -extern cpuop_func op_b108_0_ff; -extern cpuop_func op_b110_0_nf; -extern cpuop_func op_b110_0_ff; -extern cpuop_func op_b118_0_nf; -extern cpuop_func op_b118_0_ff; -extern cpuop_func op_b120_0_nf; -extern cpuop_func op_b120_0_ff; -extern cpuop_func op_b128_0_nf; -extern cpuop_func op_b128_0_ff; -extern cpuop_func op_b130_0_nf; -extern cpuop_func op_b130_0_ff; -extern cpuop_func op_b138_0_nf; -extern cpuop_func op_b138_0_ff; -extern cpuop_func op_b139_0_nf; -extern cpuop_func op_b139_0_ff; -extern cpuop_func op_b140_0_nf; -extern cpuop_func op_b140_0_ff; -extern cpuop_func op_b148_0_nf; -extern cpuop_func op_b148_0_ff; -extern cpuop_func op_b150_0_nf; -extern cpuop_func op_b150_0_ff; -extern cpuop_func op_b158_0_nf; -extern cpuop_func op_b158_0_ff; -extern cpuop_func op_b160_0_nf; -extern cpuop_func op_b160_0_ff; -extern cpuop_func op_b168_0_nf; -extern cpuop_func op_b168_0_ff; -extern cpuop_func op_b170_0_nf; -extern cpuop_func op_b170_0_ff; -extern cpuop_func op_b178_0_nf; -extern cpuop_func op_b178_0_ff; -extern cpuop_func op_b179_0_nf; -extern cpuop_func op_b179_0_ff; -extern cpuop_func op_b180_0_nf; -extern cpuop_func op_b180_0_ff; -extern cpuop_func op_b188_0_nf; -extern cpuop_func op_b188_0_ff; -extern cpuop_func op_b190_0_nf; -extern cpuop_func op_b190_0_ff; -extern cpuop_func op_b198_0_nf; -extern cpuop_func op_b198_0_ff; -extern cpuop_func op_b1a0_0_nf; -extern cpuop_func op_b1a0_0_ff; -extern cpuop_func op_b1a8_0_nf; -extern cpuop_func op_b1a8_0_ff; -extern cpuop_func op_b1b0_0_nf; -extern cpuop_func op_b1b0_0_ff; -extern cpuop_func op_b1b8_0_nf; -extern cpuop_func op_b1b8_0_ff; -extern cpuop_func op_b1b9_0_nf; -extern cpuop_func op_b1b9_0_ff; -extern cpuop_func op_b1c0_0_nf; -extern cpuop_func op_b1c0_0_ff; -extern cpuop_func op_b1c8_0_nf; -extern cpuop_func op_b1c8_0_ff; -extern cpuop_func op_b1d0_0_nf; -extern cpuop_func op_b1d0_0_ff; -extern cpuop_func op_b1d8_0_nf; -extern cpuop_func op_b1d8_0_ff; -extern cpuop_func op_b1e0_0_nf; -extern cpuop_func op_b1e0_0_ff; -extern cpuop_func op_b1e8_0_nf; -extern cpuop_func op_b1e8_0_ff; -extern cpuop_func op_b1f0_0_nf; -extern cpuop_func op_b1f0_0_ff; -extern cpuop_func op_b1f8_0_nf; -extern cpuop_func op_b1f8_0_ff; -extern cpuop_func op_b1f9_0_nf; -extern cpuop_func op_b1f9_0_ff; -extern cpuop_func op_b1fa_0_nf; -extern cpuop_func op_b1fa_0_ff; -extern cpuop_func op_b1fb_0_nf; -extern cpuop_func op_b1fb_0_ff; -extern cpuop_func op_b1fc_0_nf; -extern cpuop_func op_b1fc_0_ff; -extern cpuop_func op_c000_0_nf; -extern cpuop_func op_c000_0_ff; -extern cpuop_func op_c010_0_nf; -extern cpuop_func op_c010_0_ff; -extern cpuop_func op_c018_0_nf; -extern cpuop_func op_c018_0_ff; -extern cpuop_func op_c020_0_nf; -extern cpuop_func op_c020_0_ff; -extern cpuop_func op_c028_0_nf; -extern cpuop_func op_c028_0_ff; -extern cpuop_func op_c030_0_nf; -extern cpuop_func op_c030_0_ff; -extern cpuop_func op_c038_0_nf; -extern cpuop_func op_c038_0_ff; -extern cpuop_func op_c039_0_nf; -extern cpuop_func op_c039_0_ff; -extern cpuop_func op_c03a_0_nf; -extern cpuop_func op_c03a_0_ff; -extern cpuop_func op_c03b_0_nf; -extern cpuop_func op_c03b_0_ff; -extern cpuop_func op_c03c_0_nf; -extern cpuop_func op_c03c_0_ff; -extern cpuop_func op_c040_0_nf; -extern cpuop_func op_c040_0_ff; -extern cpuop_func op_c050_0_nf; -extern cpuop_func op_c050_0_ff; -extern cpuop_func op_c058_0_nf; -extern cpuop_func op_c058_0_ff; -extern cpuop_func op_c060_0_nf; -extern cpuop_func op_c060_0_ff; -extern cpuop_func op_c068_0_nf; -extern cpuop_func op_c068_0_ff; -extern cpuop_func op_c070_0_nf; -extern cpuop_func op_c070_0_ff; -extern cpuop_func op_c078_0_nf; -extern cpuop_func op_c078_0_ff; -extern cpuop_func op_c079_0_nf; -extern cpuop_func op_c079_0_ff; -extern cpuop_func op_c07a_0_nf; -extern cpuop_func op_c07a_0_ff; -extern cpuop_func op_c07b_0_nf; -extern cpuop_func op_c07b_0_ff; -extern cpuop_func op_c07c_0_nf; -extern cpuop_func op_c07c_0_ff; -extern cpuop_func op_c080_0_nf; -extern cpuop_func op_c080_0_ff; -extern cpuop_func op_c090_0_nf; -extern cpuop_func op_c090_0_ff; -extern cpuop_func op_c098_0_nf; -extern cpuop_func op_c098_0_ff; -extern cpuop_func op_c0a0_0_nf; -extern cpuop_func op_c0a0_0_ff; -extern cpuop_func op_c0a8_0_nf; -extern cpuop_func op_c0a8_0_ff; -extern cpuop_func op_c0b0_0_nf; -extern cpuop_func op_c0b0_0_ff; -extern cpuop_func op_c0b8_0_nf; -extern cpuop_func op_c0b8_0_ff; -extern cpuop_func op_c0b9_0_nf; -extern cpuop_func op_c0b9_0_ff; -extern cpuop_func op_c0ba_0_nf; -extern cpuop_func op_c0ba_0_ff; -extern cpuop_func op_c0bb_0_nf; -extern cpuop_func op_c0bb_0_ff; -extern cpuop_func op_c0bc_0_nf; -extern cpuop_func op_c0bc_0_ff; -extern cpuop_func op_c0c0_0_nf; -extern cpuop_func op_c0c0_0_ff; -extern cpuop_func op_c0d0_0_nf; -extern cpuop_func op_c0d0_0_ff; -extern cpuop_func op_c0d8_0_nf; -extern cpuop_func op_c0d8_0_ff; -extern cpuop_func op_c0e0_0_nf; -extern cpuop_func op_c0e0_0_ff; -extern cpuop_func op_c0e8_0_nf; -extern cpuop_func op_c0e8_0_ff; -extern cpuop_func op_c0f0_0_nf; -extern cpuop_func op_c0f0_0_ff; -extern cpuop_func op_c0f8_0_nf; -extern cpuop_func op_c0f8_0_ff; -extern cpuop_func op_c0f9_0_nf; -extern cpuop_func op_c0f9_0_ff; -extern cpuop_func op_c0fa_0_nf; -extern cpuop_func op_c0fa_0_ff; -extern cpuop_func op_c0fb_0_nf; -extern cpuop_func op_c0fb_0_ff; -extern cpuop_func op_c0fc_0_nf; -extern cpuop_func op_c0fc_0_ff; -extern cpuop_func op_c100_0_nf; -extern cpuop_func op_c100_0_ff; -extern cpuop_func op_c108_0_nf; -extern cpuop_func op_c108_0_ff; -extern cpuop_func op_c110_0_nf; -extern cpuop_func op_c110_0_ff; -extern cpuop_func op_c118_0_nf; -extern cpuop_func op_c118_0_ff; -extern cpuop_func op_c120_0_nf; -extern cpuop_func op_c120_0_ff; -extern cpuop_func op_c128_0_nf; -extern cpuop_func op_c128_0_ff; -extern cpuop_func op_c130_0_nf; -extern cpuop_func op_c130_0_ff; -extern cpuop_func op_c138_0_nf; -extern cpuop_func op_c138_0_ff; -extern cpuop_func op_c139_0_nf; -extern cpuop_func op_c139_0_ff; -extern cpuop_func op_c140_0_nf; -extern cpuop_func op_c140_0_ff; -extern cpuop_func op_c148_0_nf; -extern cpuop_func op_c148_0_ff; -extern cpuop_func op_c150_0_nf; -extern cpuop_func op_c150_0_ff; -extern cpuop_func op_c158_0_nf; -extern cpuop_func op_c158_0_ff; -extern cpuop_func op_c160_0_nf; -extern cpuop_func op_c160_0_ff; -extern cpuop_func op_c168_0_nf; -extern cpuop_func op_c168_0_ff; -extern cpuop_func op_c170_0_nf; -extern cpuop_func op_c170_0_ff; -extern cpuop_func op_c178_0_nf; -extern cpuop_func op_c178_0_ff; -extern cpuop_func op_c179_0_nf; -extern cpuop_func op_c179_0_ff; -extern cpuop_func op_c188_0_nf; -extern cpuop_func op_c188_0_ff; -extern cpuop_func op_c190_0_nf; -extern cpuop_func op_c190_0_ff; -extern cpuop_func op_c198_0_nf; -extern cpuop_func op_c198_0_ff; -extern cpuop_func op_c1a0_0_nf; -extern cpuop_func op_c1a0_0_ff; -extern cpuop_func op_c1a8_0_nf; -extern cpuop_func op_c1a8_0_ff; -extern cpuop_func op_c1b0_0_nf; -extern cpuop_func op_c1b0_0_ff; -extern cpuop_func op_c1b8_0_nf; -extern cpuop_func op_c1b8_0_ff; -extern cpuop_func op_c1b9_0_nf; -extern cpuop_func op_c1b9_0_ff; -extern cpuop_func op_c1c0_0_nf; -extern cpuop_func op_c1c0_0_ff; -extern cpuop_func op_c1d0_0_nf; -extern cpuop_func op_c1d0_0_ff; -extern cpuop_func op_c1d8_0_nf; -extern cpuop_func op_c1d8_0_ff; -extern cpuop_func op_c1e0_0_nf; -extern cpuop_func op_c1e0_0_ff; -extern cpuop_func op_c1e8_0_nf; -extern cpuop_func op_c1e8_0_ff; -extern cpuop_func op_c1f0_0_nf; -extern cpuop_func op_c1f0_0_ff; -extern cpuop_func op_c1f8_0_nf; -extern cpuop_func op_c1f8_0_ff; -extern cpuop_func op_c1f9_0_nf; -extern cpuop_func op_c1f9_0_ff; -extern cpuop_func op_c1fa_0_nf; -extern cpuop_func op_c1fa_0_ff; -extern cpuop_func op_c1fb_0_nf; -extern cpuop_func op_c1fb_0_ff; -extern cpuop_func op_c1fc_0_nf; -extern cpuop_func op_c1fc_0_ff; -extern cpuop_func op_d000_0_nf; -extern cpuop_func op_d000_0_ff; -extern cpuop_func op_d010_0_nf; -extern cpuop_func op_d010_0_ff; -extern cpuop_func op_d018_0_nf; -extern cpuop_func op_d018_0_ff; -extern cpuop_func op_d020_0_nf; -extern cpuop_func op_d020_0_ff; -extern cpuop_func op_d028_0_nf; -extern cpuop_func op_d028_0_ff; -extern cpuop_func op_d030_0_nf; -extern cpuop_func op_d030_0_ff; -extern cpuop_func op_d038_0_nf; -extern cpuop_func op_d038_0_ff; -extern cpuop_func op_d039_0_nf; -extern cpuop_func op_d039_0_ff; -extern cpuop_func op_d03a_0_nf; -extern cpuop_func op_d03a_0_ff; -extern cpuop_func op_d03b_0_nf; -extern cpuop_func op_d03b_0_ff; -extern cpuop_func op_d03c_0_nf; -extern cpuop_func op_d03c_0_ff; -extern cpuop_func op_d040_0_nf; -extern cpuop_func op_d040_0_ff; -extern cpuop_func op_d048_0_nf; -extern cpuop_func op_d048_0_ff; -extern cpuop_func op_d050_0_nf; -extern cpuop_func op_d050_0_ff; -extern cpuop_func op_d058_0_nf; -extern cpuop_func op_d058_0_ff; -extern cpuop_func op_d060_0_nf; -extern cpuop_func op_d060_0_ff; -extern cpuop_func op_d068_0_nf; -extern cpuop_func op_d068_0_ff; -extern cpuop_func op_d070_0_nf; -extern cpuop_func op_d070_0_ff; -extern cpuop_func op_d078_0_nf; -extern cpuop_func op_d078_0_ff; -extern cpuop_func op_d079_0_nf; -extern cpuop_func op_d079_0_ff; -extern cpuop_func op_d07a_0_nf; -extern cpuop_func op_d07a_0_ff; -extern cpuop_func op_d07b_0_nf; -extern cpuop_func op_d07b_0_ff; -extern cpuop_func op_d07c_0_nf; -extern cpuop_func op_d07c_0_ff; -extern cpuop_func op_d080_0_nf; -extern cpuop_func op_d080_0_ff; -extern cpuop_func op_d088_0_nf; -extern cpuop_func op_d088_0_ff; -extern cpuop_func op_d090_0_nf; -extern cpuop_func op_d090_0_ff; -extern cpuop_func op_d098_0_nf; -extern cpuop_func op_d098_0_ff; -extern cpuop_func op_d0a0_0_nf; -extern cpuop_func op_d0a0_0_ff; -extern cpuop_func op_d0a8_0_nf; -extern cpuop_func op_d0a8_0_ff; -extern cpuop_func op_d0b0_0_nf; -extern cpuop_func op_d0b0_0_ff; -extern cpuop_func op_d0b8_0_nf; -extern cpuop_func op_d0b8_0_ff; -extern cpuop_func op_d0b9_0_nf; -extern cpuop_func op_d0b9_0_ff; -extern cpuop_func op_d0ba_0_nf; -extern cpuop_func op_d0ba_0_ff; -extern cpuop_func op_d0bb_0_nf; -extern cpuop_func op_d0bb_0_ff; -extern cpuop_func op_d0bc_0_nf; -extern cpuop_func op_d0bc_0_ff; -extern cpuop_func op_d0c0_0_nf; -extern cpuop_func op_d0c0_0_ff; -extern cpuop_func op_d0c8_0_nf; -extern cpuop_func op_d0c8_0_ff; -extern cpuop_func op_d0d0_0_nf; -extern cpuop_func op_d0d0_0_ff; -extern cpuop_func op_d0d8_0_nf; -extern cpuop_func op_d0d8_0_ff; -extern cpuop_func op_d0e0_0_nf; -extern cpuop_func op_d0e0_0_ff; -extern cpuop_func op_d0e8_0_nf; -extern cpuop_func op_d0e8_0_ff; -extern cpuop_func op_d0f0_0_nf; -extern cpuop_func op_d0f0_0_ff; -extern cpuop_func op_d0f8_0_nf; -extern cpuop_func op_d0f8_0_ff; -extern cpuop_func op_d0f9_0_nf; -extern cpuop_func op_d0f9_0_ff; -extern cpuop_func op_d0fa_0_nf; -extern cpuop_func op_d0fa_0_ff; -extern cpuop_func op_d0fb_0_nf; -extern cpuop_func op_d0fb_0_ff; -extern cpuop_func op_d0fc_0_nf; -extern cpuop_func op_d0fc_0_ff; -extern cpuop_func op_d100_0_nf; -extern cpuop_func op_d100_0_ff; -extern cpuop_func op_d108_0_nf; -extern cpuop_func op_d108_0_ff; -extern cpuop_func op_d110_0_nf; -extern cpuop_func op_d110_0_ff; -extern cpuop_func op_d118_0_nf; -extern cpuop_func op_d118_0_ff; -extern cpuop_func op_d120_0_nf; -extern cpuop_func op_d120_0_ff; -extern cpuop_func op_d128_0_nf; -extern cpuop_func op_d128_0_ff; -extern cpuop_func op_d130_0_nf; -extern cpuop_func op_d130_0_ff; -extern cpuop_func op_d138_0_nf; -extern cpuop_func op_d138_0_ff; -extern cpuop_func op_d139_0_nf; -extern cpuop_func op_d139_0_ff; -extern cpuop_func op_d140_0_nf; -extern cpuop_func op_d140_0_ff; -extern cpuop_func op_d148_0_nf; -extern cpuop_func op_d148_0_ff; -extern cpuop_func op_d150_0_nf; -extern cpuop_func op_d150_0_ff; -extern cpuop_func op_d158_0_nf; -extern cpuop_func op_d158_0_ff; -extern cpuop_func op_d160_0_nf; -extern cpuop_func op_d160_0_ff; -extern cpuop_func op_d168_0_nf; -extern cpuop_func op_d168_0_ff; -extern cpuop_func op_d170_0_nf; -extern cpuop_func op_d170_0_ff; -extern cpuop_func op_d178_0_nf; -extern cpuop_func op_d178_0_ff; -extern cpuop_func op_d179_0_nf; -extern cpuop_func op_d179_0_ff; -extern cpuop_func op_d180_0_nf; -extern cpuop_func op_d180_0_ff; -extern cpuop_func op_d188_0_nf; -extern cpuop_func op_d188_0_ff; -extern cpuop_func op_d190_0_nf; -extern cpuop_func op_d190_0_ff; -extern cpuop_func op_d198_0_nf; -extern cpuop_func op_d198_0_ff; -extern cpuop_func op_d1a0_0_nf; -extern cpuop_func op_d1a0_0_ff; -extern cpuop_func op_d1a8_0_nf; -extern cpuop_func op_d1a8_0_ff; -extern cpuop_func op_d1b0_0_nf; -extern cpuop_func op_d1b0_0_ff; -extern cpuop_func op_d1b8_0_nf; -extern cpuop_func op_d1b8_0_ff; -extern cpuop_func op_d1b9_0_nf; -extern cpuop_func op_d1b9_0_ff; -extern cpuop_func op_d1c0_0_nf; -extern cpuop_func op_d1c0_0_ff; -extern cpuop_func op_d1c8_0_nf; -extern cpuop_func op_d1c8_0_ff; -extern cpuop_func op_d1d0_0_nf; -extern cpuop_func op_d1d0_0_ff; -extern cpuop_func op_d1d8_0_nf; -extern cpuop_func op_d1d8_0_ff; -extern cpuop_func op_d1e0_0_nf; -extern cpuop_func op_d1e0_0_ff; -extern cpuop_func op_d1e8_0_nf; -extern cpuop_func op_d1e8_0_ff; -extern cpuop_func op_d1f0_0_nf; -extern cpuop_func op_d1f0_0_ff; -extern cpuop_func op_d1f8_0_nf; -extern cpuop_func op_d1f8_0_ff; -extern cpuop_func op_d1f9_0_nf; -extern cpuop_func op_d1f9_0_ff; -extern cpuop_func op_d1fa_0_nf; -extern cpuop_func op_d1fa_0_ff; -extern cpuop_func op_d1fb_0_nf; -extern cpuop_func op_d1fb_0_ff; -extern cpuop_func op_d1fc_0_nf; -extern cpuop_func op_d1fc_0_ff; -extern cpuop_func op_e000_0_nf; -extern cpuop_func op_e000_0_ff; -extern cpuop_func op_e008_0_nf; -extern cpuop_func op_e008_0_ff; -extern cpuop_func op_e010_0_nf; -extern cpuop_func op_e010_0_ff; -extern cpuop_func op_e018_0_nf; -extern cpuop_func op_e018_0_ff; -extern cpuop_func op_e020_0_nf; -extern cpuop_func op_e020_0_ff; -extern cpuop_func op_e028_0_nf; -extern cpuop_func op_e028_0_ff; -extern cpuop_func op_e030_0_nf; -extern cpuop_func op_e030_0_ff; -extern cpuop_func op_e038_0_nf; -extern cpuop_func op_e038_0_ff; -extern cpuop_func op_e040_0_nf; -extern cpuop_func op_e040_0_ff; -extern cpuop_func op_e048_0_nf; -extern cpuop_func op_e048_0_ff; -extern cpuop_func op_e050_0_nf; -extern cpuop_func op_e050_0_ff; -extern cpuop_func op_e058_0_nf; -extern cpuop_func op_e058_0_ff; -extern cpuop_func op_e060_0_nf; -extern cpuop_func op_e060_0_ff; -extern cpuop_func op_e068_0_nf; -extern cpuop_func op_e068_0_ff; -extern cpuop_func op_e070_0_nf; -extern cpuop_func op_e070_0_ff; -extern cpuop_func op_e078_0_nf; -extern cpuop_func op_e078_0_ff; -extern cpuop_func op_e080_0_nf; -extern cpuop_func op_e080_0_ff; -extern cpuop_func op_e088_0_nf; -extern cpuop_func op_e088_0_ff; -extern cpuop_func op_e090_0_nf; -extern cpuop_func op_e090_0_ff; -extern cpuop_func op_e098_0_nf; -extern cpuop_func op_e098_0_ff; -extern cpuop_func op_e0a0_0_nf; -extern cpuop_func op_e0a0_0_ff; -extern cpuop_func op_e0a8_0_nf; -extern cpuop_func op_e0a8_0_ff; -extern cpuop_func op_e0b0_0_nf; -extern cpuop_func op_e0b0_0_ff; -extern cpuop_func op_e0b8_0_nf; -extern cpuop_func op_e0b8_0_ff; -extern cpuop_func op_e0d0_0_nf; -extern cpuop_func op_e0d0_0_ff; -extern cpuop_func op_e0d8_0_nf; -extern cpuop_func op_e0d8_0_ff; -extern cpuop_func op_e0e0_0_nf; -extern cpuop_func op_e0e0_0_ff; -extern cpuop_func op_e0e8_0_nf; -extern cpuop_func op_e0e8_0_ff; -extern cpuop_func op_e0f0_0_nf; -extern cpuop_func op_e0f0_0_ff; -extern cpuop_func op_e0f8_0_nf; -extern cpuop_func op_e0f8_0_ff; -extern cpuop_func op_e0f9_0_nf; -extern cpuop_func op_e0f9_0_ff; -extern cpuop_func op_e100_0_nf; -extern cpuop_func op_e100_0_ff; -extern cpuop_func op_e108_0_nf; -extern cpuop_func op_e108_0_ff; -extern cpuop_func op_e110_0_nf; -extern cpuop_func op_e110_0_ff; -extern cpuop_func op_e118_0_nf; -extern cpuop_func op_e118_0_ff; -extern cpuop_func op_e120_0_nf; -extern cpuop_func op_e120_0_ff; -extern cpuop_func op_e128_0_nf; -extern cpuop_func op_e128_0_ff; -extern cpuop_func op_e130_0_nf; -extern cpuop_func op_e130_0_ff; -extern cpuop_func op_e138_0_nf; -extern cpuop_func op_e138_0_ff; -extern cpuop_func op_e140_0_nf; -extern cpuop_func op_e140_0_ff; -extern cpuop_func op_e148_0_nf; -extern cpuop_func op_e148_0_ff; -extern cpuop_func op_e150_0_nf; -extern cpuop_func op_e150_0_ff; -extern cpuop_func op_e158_0_nf; -extern cpuop_func op_e158_0_ff; -extern cpuop_func op_e160_0_nf; -extern cpuop_func op_e160_0_ff; -extern cpuop_func op_e168_0_nf; -extern cpuop_func op_e168_0_ff; -extern cpuop_func op_e170_0_nf; -extern cpuop_func op_e170_0_ff; -extern cpuop_func op_e178_0_nf; -extern cpuop_func op_e178_0_ff; -extern cpuop_func op_e180_0_nf; -extern cpuop_func op_e180_0_ff; -extern cpuop_func op_e188_0_nf; -extern cpuop_func op_e188_0_ff; -extern cpuop_func op_e190_0_nf; -extern cpuop_func op_e190_0_ff; -extern cpuop_func op_e198_0_nf; -extern cpuop_func op_e198_0_ff; -extern cpuop_func op_e1a0_0_nf; -extern cpuop_func op_e1a0_0_ff; -extern cpuop_func op_e1a8_0_nf; -extern cpuop_func op_e1a8_0_ff; -extern cpuop_func op_e1b0_0_nf; -extern cpuop_func op_e1b0_0_ff; -extern cpuop_func op_e1b8_0_nf; -extern cpuop_func op_e1b8_0_ff; -extern cpuop_func op_e1d0_0_nf; -extern cpuop_func op_e1d0_0_ff; -extern cpuop_func op_e1d8_0_nf; -extern cpuop_func op_e1d8_0_ff; -extern cpuop_func op_e1e0_0_nf; -extern cpuop_func op_e1e0_0_ff; -extern cpuop_func op_e1e8_0_nf; -extern cpuop_func op_e1e8_0_ff; -extern cpuop_func op_e1f0_0_nf; -extern cpuop_func op_e1f0_0_ff; -extern cpuop_func op_e1f8_0_nf; -extern cpuop_func op_e1f8_0_ff; -extern cpuop_func op_e1f9_0_nf; -extern cpuop_func op_e1f9_0_ff; -extern cpuop_func op_e2d0_0_nf; -extern cpuop_func op_e2d0_0_ff; -extern cpuop_func op_e2d8_0_nf; -extern cpuop_func op_e2d8_0_ff; -extern cpuop_func op_e2e0_0_nf; -extern cpuop_func op_e2e0_0_ff; -extern cpuop_func op_e2e8_0_nf; -extern cpuop_func op_e2e8_0_ff; -extern cpuop_func op_e2f0_0_nf; -extern cpuop_func op_e2f0_0_ff; -extern cpuop_func op_e2f8_0_nf; -extern cpuop_func op_e2f8_0_ff; -extern cpuop_func op_e2f9_0_nf; -extern cpuop_func op_e2f9_0_ff; -extern cpuop_func op_e3d0_0_nf; -extern cpuop_func op_e3d0_0_ff; -extern cpuop_func op_e3d8_0_nf; -extern cpuop_func op_e3d8_0_ff; -extern cpuop_func op_e3e0_0_nf; -extern cpuop_func op_e3e0_0_ff; -extern cpuop_func op_e3e8_0_nf; -extern cpuop_func op_e3e8_0_ff; -extern cpuop_func op_e3f0_0_nf; -extern cpuop_func op_e3f0_0_ff; -extern cpuop_func op_e3f8_0_nf; -extern cpuop_func op_e3f8_0_ff; -extern cpuop_func op_e3f9_0_nf; -extern cpuop_func op_e3f9_0_ff; -extern cpuop_func op_e4d0_0_nf; -extern cpuop_func op_e4d0_0_ff; -extern cpuop_func op_e4d8_0_nf; -extern cpuop_func op_e4d8_0_ff; -extern cpuop_func op_e4e0_0_nf; -extern cpuop_func op_e4e0_0_ff; -extern cpuop_func op_e4e8_0_nf; -extern cpuop_func op_e4e8_0_ff; -extern cpuop_func op_e4f0_0_nf; -extern cpuop_func op_e4f0_0_ff; -extern cpuop_func op_e4f8_0_nf; -extern cpuop_func op_e4f8_0_ff; -extern cpuop_func op_e4f9_0_nf; -extern cpuop_func op_e4f9_0_ff; -extern cpuop_func op_e5d0_0_nf; -extern cpuop_func op_e5d0_0_ff; -extern cpuop_func op_e5d8_0_nf; -extern cpuop_func op_e5d8_0_ff; -extern cpuop_func op_e5e0_0_nf; -extern cpuop_func op_e5e0_0_ff; -extern cpuop_func op_e5e8_0_nf; -extern cpuop_func op_e5e8_0_ff; -extern cpuop_func op_e5f0_0_nf; -extern cpuop_func op_e5f0_0_ff; -extern cpuop_func op_e5f8_0_nf; -extern cpuop_func op_e5f8_0_ff; -extern cpuop_func op_e5f9_0_nf; -extern cpuop_func op_e5f9_0_ff; -extern cpuop_func op_e6d0_0_nf; -extern cpuop_func op_e6d0_0_ff; -extern cpuop_func op_e6d8_0_nf; -extern cpuop_func op_e6d8_0_ff; -extern cpuop_func op_e6e0_0_nf; -extern cpuop_func op_e6e0_0_ff; -extern cpuop_func op_e6e8_0_nf; -extern cpuop_func op_e6e8_0_ff; -extern cpuop_func op_e6f0_0_nf; -extern cpuop_func op_e6f0_0_ff; -extern cpuop_func op_e6f8_0_nf; -extern cpuop_func op_e6f8_0_ff; -extern cpuop_func op_e6f9_0_nf; -extern cpuop_func op_e6f9_0_ff; -extern cpuop_func op_e7d0_0_nf; -extern cpuop_func op_e7d0_0_ff; -extern cpuop_func op_e7d8_0_nf; -extern cpuop_func op_e7d8_0_ff; -extern cpuop_func op_e7e0_0_nf; -extern cpuop_func op_e7e0_0_ff; -extern cpuop_func op_e7e8_0_nf; -extern cpuop_func op_e7e8_0_ff; -extern cpuop_func op_e7f0_0_nf; -extern cpuop_func op_e7f0_0_ff; -extern cpuop_func op_e7f8_0_nf; -extern cpuop_func op_e7f8_0_ff; -extern cpuop_func op_e7f9_0_nf; -extern cpuop_func op_e7f9_0_ff; -extern cpuop_func op_e8c0_0_nf; -extern cpuop_func op_e8c0_0_ff; -extern cpuop_func op_e8d0_0_nf; -extern cpuop_func op_e8d0_0_ff; -extern cpuop_func op_e8e8_0_nf; -extern cpuop_func op_e8e8_0_ff; -extern cpuop_func op_e8f0_0_nf; -extern cpuop_func op_e8f0_0_ff; -extern cpuop_func op_e8f8_0_nf; -extern cpuop_func op_e8f8_0_ff; -extern cpuop_func op_e8f9_0_nf; -extern cpuop_func op_e8f9_0_ff; -extern cpuop_func op_e8fa_0_nf; -extern cpuop_func op_e8fa_0_ff; -extern cpuop_func op_e8fb_0_nf; -extern cpuop_func op_e8fb_0_ff; -extern cpuop_func op_e9c0_0_nf; -extern cpuop_func op_e9c0_0_ff; -extern cpuop_func op_e9d0_0_nf; -extern cpuop_func op_e9d0_0_ff; -extern cpuop_func op_e9e8_0_nf; -extern cpuop_func op_e9e8_0_ff; -extern cpuop_func op_e9f0_0_nf; -extern cpuop_func op_e9f0_0_ff; -extern cpuop_func op_e9f8_0_nf; -extern cpuop_func op_e9f8_0_ff; -extern cpuop_func op_e9f9_0_nf; -extern cpuop_func op_e9f9_0_ff; -extern cpuop_func op_e9fa_0_nf; -extern cpuop_func op_e9fa_0_ff; -extern cpuop_func op_e9fb_0_nf; -extern cpuop_func op_e9fb_0_ff; -extern cpuop_func op_eac0_0_nf; -extern cpuop_func op_eac0_0_ff; -extern cpuop_func op_ead0_0_nf; -extern cpuop_func op_ead0_0_ff; -extern cpuop_func op_eae8_0_nf; -extern cpuop_func op_eae8_0_ff; -extern cpuop_func op_eaf0_0_nf; -extern cpuop_func op_eaf0_0_ff; -extern cpuop_func op_eaf8_0_nf; -extern cpuop_func op_eaf8_0_ff; -extern cpuop_func op_eaf9_0_nf; -extern cpuop_func op_eaf9_0_ff; -extern cpuop_func op_ebc0_0_nf; -extern cpuop_func op_ebc0_0_ff; -extern cpuop_func op_ebd0_0_nf; -extern cpuop_func op_ebd0_0_ff; -extern cpuop_func op_ebe8_0_nf; -extern cpuop_func op_ebe8_0_ff; -extern cpuop_func op_ebf0_0_nf; -extern cpuop_func op_ebf0_0_ff; -extern cpuop_func op_ebf8_0_nf; -extern cpuop_func op_ebf8_0_ff; -extern cpuop_func op_ebf9_0_nf; -extern cpuop_func op_ebf9_0_ff; -extern cpuop_func op_ebfa_0_nf; -extern cpuop_func op_ebfa_0_ff; -extern cpuop_func op_ebfb_0_nf; -extern cpuop_func op_ebfb_0_ff; -extern cpuop_func op_ecc0_0_nf; -extern cpuop_func op_ecc0_0_ff; -extern cpuop_func op_ecd0_0_nf; -extern cpuop_func op_ecd0_0_ff; -extern cpuop_func op_ece8_0_nf; -extern cpuop_func op_ece8_0_ff; -extern cpuop_func op_ecf0_0_nf; -extern cpuop_func op_ecf0_0_ff; -extern cpuop_func op_ecf8_0_nf; -extern cpuop_func op_ecf8_0_ff; -extern cpuop_func op_ecf9_0_nf; -extern cpuop_func op_ecf9_0_ff; -extern cpuop_func op_edc0_0_nf; -extern cpuop_func op_edc0_0_ff; -extern cpuop_func op_edd0_0_nf; -extern cpuop_func op_edd0_0_ff; -extern cpuop_func op_ede8_0_nf; -extern cpuop_func op_ede8_0_ff; -extern cpuop_func op_edf0_0_nf; -extern cpuop_func op_edf0_0_ff; -extern cpuop_func op_edf8_0_nf; -extern cpuop_func op_edf8_0_ff; -extern cpuop_func op_edf9_0_nf; -extern cpuop_func op_edf9_0_ff; -extern cpuop_func op_edfa_0_nf; -extern cpuop_func op_edfa_0_ff; -extern cpuop_func op_edfb_0_nf; -extern cpuop_func op_edfb_0_ff; -extern cpuop_func op_eec0_0_nf; -extern cpuop_func op_eec0_0_ff; -extern cpuop_func op_eed0_0_nf; -extern cpuop_func op_eed0_0_ff; -extern cpuop_func op_eee8_0_nf; -extern cpuop_func op_eee8_0_ff; -extern cpuop_func op_eef0_0_nf; -extern cpuop_func op_eef0_0_ff; -extern cpuop_func op_eef8_0_nf; -extern cpuop_func op_eef8_0_ff; -extern cpuop_func op_eef9_0_nf; -extern cpuop_func op_eef9_0_ff; -extern cpuop_func op_efc0_0_nf; -extern cpuop_func op_efc0_0_ff; -extern cpuop_func op_efd0_0_nf; -extern cpuop_func op_efd0_0_ff; -extern cpuop_func op_efe8_0_nf; -extern cpuop_func op_efe8_0_ff; -extern cpuop_func op_eff0_0_nf; -extern cpuop_func op_eff0_0_ff; -extern cpuop_func op_eff8_0_nf; -extern cpuop_func op_eff8_0_ff; -extern cpuop_func op_eff9_0_nf; -extern cpuop_func op_eff9_0_ff; -extern cpuop_func op_f200_0_nf; -extern cpuop_func op_f200_0_ff; -extern cpuop_func op_f208_0_nf; -extern cpuop_func op_f208_0_ff; -extern cpuop_func op_f210_0_nf; -extern cpuop_func op_f210_0_ff; -extern cpuop_func op_f218_0_nf; -extern cpuop_func op_f218_0_ff; -extern cpuop_func op_f220_0_nf; -extern cpuop_func op_f220_0_ff; -extern cpuop_func op_f228_0_nf; -extern cpuop_func op_f228_0_ff; -extern cpuop_func op_f230_0_nf; -extern cpuop_func op_f230_0_ff; -extern cpuop_func op_f238_0_nf; -extern cpuop_func op_f238_0_ff; -extern cpuop_func op_f239_0_nf; -extern cpuop_func op_f239_0_ff; -extern cpuop_func op_f23a_0_nf; -extern cpuop_func op_f23a_0_ff; -extern cpuop_func op_f23b_0_nf; -extern cpuop_func op_f23b_0_ff; -extern cpuop_func op_f23c_0_nf; -extern cpuop_func op_f23c_0_ff; -extern cpuop_func op_f240_0_nf; -extern cpuop_func op_f240_0_ff; -extern cpuop_func op_f248_0_nf; -extern cpuop_func op_f248_0_ff; -extern cpuop_func op_f250_0_nf; -extern cpuop_func op_f250_0_ff; -extern cpuop_func op_f258_0_nf; -extern cpuop_func op_f258_0_ff; -extern cpuop_func op_f260_0_nf; -extern cpuop_func op_f260_0_ff; -extern cpuop_func op_f268_0_nf; -extern cpuop_func op_f268_0_ff; -extern cpuop_func op_f270_0_nf; -extern cpuop_func op_f270_0_ff; -extern cpuop_func op_f278_0_nf; -extern cpuop_func op_f278_0_ff; -extern cpuop_func op_f279_0_nf; -extern cpuop_func op_f279_0_ff; -extern cpuop_func op_f27a_0_nf; -extern cpuop_func op_f27a_0_ff; -extern cpuop_func op_f27b_0_nf; -extern cpuop_func op_f27b_0_ff; -extern cpuop_func op_f27c_0_nf; -extern cpuop_func op_f27c_0_ff; -extern cpuop_func op_f280_0_nf; -extern cpuop_func op_f280_0_ff; -extern cpuop_func op_f2c0_0_nf; -extern cpuop_func op_f2c0_0_ff; -extern cpuop_func op_f310_0_nf; -extern cpuop_func op_f310_0_ff; -extern cpuop_func op_f320_0_nf; -extern cpuop_func op_f320_0_ff; -extern cpuop_func op_f328_0_nf; -extern cpuop_func op_f328_0_ff; -extern cpuop_func op_f330_0_nf; -extern cpuop_func op_f330_0_ff; -extern cpuop_func op_f338_0_nf; -extern cpuop_func op_f338_0_ff; -extern cpuop_func op_f339_0_nf; -extern cpuop_func op_f339_0_ff; -extern cpuop_func op_f350_0_nf; -extern cpuop_func op_f350_0_ff; -extern cpuop_func op_f358_0_nf; -extern cpuop_func op_f358_0_ff; -extern cpuop_func op_f368_0_nf; -extern cpuop_func op_f368_0_ff; -extern cpuop_func op_f370_0_nf; -extern cpuop_func op_f370_0_ff; -extern cpuop_func op_f378_0_nf; -extern cpuop_func op_f378_0_ff; -extern cpuop_func op_f379_0_nf; -extern cpuop_func op_f379_0_ff; -extern cpuop_func op_f37a_0_nf; -extern cpuop_func op_f37a_0_ff; -extern cpuop_func op_f37b_0_nf; -extern cpuop_func op_f37b_0_ff; -extern cpuop_func op_f408_0_nf; -extern cpuop_func op_f408_0_ff; -extern cpuop_func op_f410_0_nf; -extern cpuop_func op_f410_0_ff; -extern cpuop_func op_f418_0_nf; -extern cpuop_func op_f418_0_ff; -extern cpuop_func op_f419_0_nf; -extern cpuop_func op_f419_0_ff; -extern cpuop_func op_f41a_0_nf; -extern cpuop_func op_f41a_0_ff; -extern cpuop_func op_f41b_0_nf; -extern cpuop_func op_f41b_0_ff; -extern cpuop_func op_f41c_0_nf; -extern cpuop_func op_f41c_0_ff; -extern cpuop_func op_f41d_0_nf; -extern cpuop_func op_f41d_0_ff; -extern cpuop_func op_f41e_0_nf; -extern cpuop_func op_f41e_0_ff; -extern cpuop_func op_f41f_0_nf; -extern cpuop_func op_f41f_0_ff; -extern cpuop_func op_f428_0_nf; -extern cpuop_func op_f428_0_ff; -extern cpuop_func op_f430_0_nf; -extern cpuop_func op_f430_0_ff; -extern cpuop_func op_f438_0_nf; -extern cpuop_func op_f438_0_ff; -extern cpuop_func op_f439_0_nf; -extern cpuop_func op_f439_0_ff; -extern cpuop_func op_f43a_0_nf; -extern cpuop_func op_f43a_0_ff; -extern cpuop_func op_f43b_0_nf; -extern cpuop_func op_f43b_0_ff; -extern cpuop_func op_f43c_0_nf; -extern cpuop_func op_f43c_0_ff; -extern cpuop_func op_f43d_0_nf; -extern cpuop_func op_f43d_0_ff; -extern cpuop_func op_f43e_0_nf; -extern cpuop_func op_f43e_0_ff; -extern cpuop_func op_f43f_0_nf; -extern cpuop_func op_f43f_0_ff; -extern cpuop_func op_f500_0_nf; -extern cpuop_func op_f500_0_ff; -extern cpuop_func op_f600_0_nf; -extern cpuop_func op_f600_0_ff; -extern cpuop_func op_f608_0_nf; -extern cpuop_func op_f608_0_ff; -extern cpuop_func op_f610_0_nf; -extern cpuop_func op_f610_0_ff; -extern cpuop_func op_f618_0_nf; -extern cpuop_func op_f618_0_ff; -extern cpuop_func op_f620_0_nf; -extern cpuop_func op_f620_0_ff; -extern cpuop_func op_4800_1_nf; -extern cpuop_func op_4800_1_ff; -extern cpuop_func op_4810_1_nf; -extern cpuop_func op_4810_1_ff; -extern cpuop_func op_4818_1_nf; -extern cpuop_func op_4818_1_ff; -extern cpuop_func op_4820_1_nf; -extern cpuop_func op_4820_1_ff; -extern cpuop_func op_4828_1_nf; -extern cpuop_func op_4828_1_ff; -extern cpuop_func op_4830_1_nf; -extern cpuop_func op_4830_1_ff; -extern cpuop_func op_4838_1_nf; -extern cpuop_func op_4838_1_ff; -extern cpuop_func op_4839_1_nf; -extern cpuop_func op_4839_1_ff; -extern cpuop_func op_8100_1_nf; -extern cpuop_func op_8100_1_ff; -extern cpuop_func op_8108_1_nf; -extern cpuop_func op_8108_1_ff; -extern cpuop_func op_c100_1_nf; -extern cpuop_func op_c100_1_ff; -extern cpuop_func op_c108_1_nf; -extern cpuop_func op_c108_1_ff; -extern cpuop_func op_30_3_nf; -extern cpuop_func op_30_3_ff; -extern cpuop_func op_70_3_nf; -extern cpuop_func op_70_3_ff; -extern cpuop_func op_b0_3_nf; -extern cpuop_func op_b0_3_ff; -extern cpuop_func op_130_3_nf; -extern cpuop_func op_130_3_ff; -extern cpuop_func op_13b_3_nf; -extern cpuop_func op_13b_3_ff; -extern cpuop_func op_170_3_nf; -extern cpuop_func op_170_3_ff; -extern cpuop_func op_17b_3_nf; -extern cpuop_func op_17b_3_ff; -extern cpuop_func op_1b0_3_nf; -extern cpuop_func op_1b0_3_ff; -extern cpuop_func op_1bb_3_nf; -extern cpuop_func op_1bb_3_ff; -extern cpuop_func op_1f0_3_nf; -extern cpuop_func op_1f0_3_ff; -extern cpuop_func op_1fb_3_nf; -extern cpuop_func op_1fb_3_ff; -extern cpuop_func op_230_3_nf; -extern cpuop_func op_230_3_ff; -extern cpuop_func op_270_3_nf; -extern cpuop_func op_270_3_ff; -extern cpuop_func op_2b0_3_nf; -extern cpuop_func op_2b0_3_ff; -extern cpuop_func op_430_3_nf; -extern cpuop_func op_430_3_ff; -extern cpuop_func op_470_3_nf; -extern cpuop_func op_470_3_ff; -extern cpuop_func op_4b0_3_nf; -extern cpuop_func op_4b0_3_ff; -extern cpuop_func op_630_3_nf; -extern cpuop_func op_630_3_ff; -extern cpuop_func op_670_3_nf; -extern cpuop_func op_670_3_ff; -extern cpuop_func op_6b0_3_nf; -extern cpuop_func op_6b0_3_ff; -extern cpuop_func op_830_3_nf; -extern cpuop_func op_830_3_ff; -extern cpuop_func op_83b_3_nf; -extern cpuop_func op_83b_3_ff; -extern cpuop_func op_870_3_nf; -extern cpuop_func op_870_3_ff; -extern cpuop_func op_87b_3_nf; -extern cpuop_func op_87b_3_ff; -extern cpuop_func op_8b0_3_nf; -extern cpuop_func op_8b0_3_ff; -extern cpuop_func op_8bb_3_nf; -extern cpuop_func op_8bb_3_ff; -extern cpuop_func op_8f0_3_nf; -extern cpuop_func op_8f0_3_ff; -extern cpuop_func op_8fb_3_nf; -extern cpuop_func op_8fb_3_ff; -extern cpuop_func op_a30_3_nf; -extern cpuop_func op_a30_3_ff; -extern cpuop_func op_a70_3_nf; -extern cpuop_func op_a70_3_ff; -extern cpuop_func op_ab0_3_nf; -extern cpuop_func op_ab0_3_ff; -extern cpuop_func op_c30_3_nf; -extern cpuop_func op_c30_3_ff; -extern cpuop_func op_c3b_3_nf; -extern cpuop_func op_c3b_3_ff; -extern cpuop_func op_c70_3_nf; -extern cpuop_func op_c70_3_ff; -extern cpuop_func op_c7b_3_nf; -extern cpuop_func op_c7b_3_ff; -extern cpuop_func op_cb0_3_nf; -extern cpuop_func op_cb0_3_ff; -extern cpuop_func op_cbb_3_nf; -extern cpuop_func op_cbb_3_ff; -extern cpuop_func op_1030_3_nf; -extern cpuop_func op_1030_3_ff; -extern cpuop_func op_103b_3_nf; -extern cpuop_func op_103b_3_ff; -extern cpuop_func op_10b0_3_nf; -extern cpuop_func op_10b0_3_ff; -extern cpuop_func op_10bb_3_nf; -extern cpuop_func op_10bb_3_ff; -extern cpuop_func op_10f0_3_nf; -extern cpuop_func op_10f0_3_ff; -extern cpuop_func op_10fb_3_nf; -extern cpuop_func op_10fb_3_ff; -extern cpuop_func op_1130_3_nf; -extern cpuop_func op_1130_3_ff; -extern cpuop_func op_113b_3_nf; -extern cpuop_func op_113b_3_ff; -extern cpuop_func op_1170_3_nf; -extern cpuop_func op_1170_3_ff; -extern cpuop_func op_117b_3_nf; -extern cpuop_func op_117b_3_ff; -extern cpuop_func op_1180_3_nf; -extern cpuop_func op_1180_3_ff; -extern cpuop_func op_1190_3_nf; -extern cpuop_func op_1190_3_ff; -extern cpuop_func op_1198_3_nf; -extern cpuop_func op_1198_3_ff; -extern cpuop_func op_11a0_3_nf; -extern cpuop_func op_11a0_3_ff; -extern cpuop_func op_11a8_3_nf; -extern cpuop_func op_11a8_3_ff; -extern cpuop_func op_11b0_3_nf; -extern cpuop_func op_11b0_3_ff; -extern cpuop_func op_11b8_3_nf; -extern cpuop_func op_11b8_3_ff; -extern cpuop_func op_11b9_3_nf; -extern cpuop_func op_11b9_3_ff; -extern cpuop_func op_11ba_3_nf; -extern cpuop_func op_11ba_3_ff; -extern cpuop_func op_11bb_3_nf; -extern cpuop_func op_11bb_3_ff; -extern cpuop_func op_11bc_3_nf; -extern cpuop_func op_11bc_3_ff; -extern cpuop_func op_11f0_3_nf; -extern cpuop_func op_11f0_3_ff; -extern cpuop_func op_11fb_3_nf; -extern cpuop_func op_11fb_3_ff; -extern cpuop_func op_13f0_3_nf; -extern cpuop_func op_13f0_3_ff; -extern cpuop_func op_13fb_3_nf; -extern cpuop_func op_13fb_3_ff; -extern cpuop_func op_2030_3_nf; -extern cpuop_func op_2030_3_ff; -extern cpuop_func op_203b_3_nf; -extern cpuop_func op_203b_3_ff; -extern cpuop_func op_2070_3_nf; -extern cpuop_func op_2070_3_ff; -extern cpuop_func op_207b_3_nf; -extern cpuop_func op_207b_3_ff; -extern cpuop_func op_20b0_3_nf; -extern cpuop_func op_20b0_3_ff; -extern cpuop_func op_20bb_3_nf; -extern cpuop_func op_20bb_3_ff; -extern cpuop_func op_20f0_3_nf; -extern cpuop_func op_20f0_3_ff; -extern cpuop_func op_20fb_3_nf; -extern cpuop_func op_20fb_3_ff; -extern cpuop_func op_2130_3_nf; -extern cpuop_func op_2130_3_ff; -extern cpuop_func op_213b_3_nf; -extern cpuop_func op_213b_3_ff; -extern cpuop_func op_2170_3_nf; -extern cpuop_func op_2170_3_ff; -extern cpuop_func op_217b_3_nf; -extern cpuop_func op_217b_3_ff; -extern cpuop_func op_2180_3_nf; -extern cpuop_func op_2180_3_ff; -extern cpuop_func op_2188_3_nf; -extern cpuop_func op_2188_3_ff; -extern cpuop_func op_2190_3_nf; -extern cpuop_func op_2190_3_ff; -extern cpuop_func op_2198_3_nf; -extern cpuop_func op_2198_3_ff; -extern cpuop_func op_21a0_3_nf; -extern cpuop_func op_21a0_3_ff; -extern cpuop_func op_21a8_3_nf; -extern cpuop_func op_21a8_3_ff; -extern cpuop_func op_21b0_3_nf; -extern cpuop_func op_21b0_3_ff; -extern cpuop_func op_21b8_3_nf; -extern cpuop_func op_21b8_3_ff; -extern cpuop_func op_21b9_3_nf; -extern cpuop_func op_21b9_3_ff; -extern cpuop_func op_21ba_3_nf; -extern cpuop_func op_21ba_3_ff; -extern cpuop_func op_21bb_3_nf; -extern cpuop_func op_21bb_3_ff; -extern cpuop_func op_21bc_3_nf; -extern cpuop_func op_21bc_3_ff; -extern cpuop_func op_21f0_3_nf; -extern cpuop_func op_21f0_3_ff; -extern cpuop_func op_21fb_3_nf; -extern cpuop_func op_21fb_3_ff; -extern cpuop_func op_23f0_3_nf; -extern cpuop_func op_23f0_3_ff; -extern cpuop_func op_23fb_3_nf; -extern cpuop_func op_23fb_3_ff; -extern cpuop_func op_3030_3_nf; -extern cpuop_func op_3030_3_ff; -extern cpuop_func op_303b_3_nf; -extern cpuop_func op_303b_3_ff; -extern cpuop_func op_3070_3_nf; -extern cpuop_func op_3070_3_ff; -extern cpuop_func op_307b_3_nf; -extern cpuop_func op_307b_3_ff; -extern cpuop_func op_30b0_3_nf; -extern cpuop_func op_30b0_3_ff; -extern cpuop_func op_30bb_3_nf; -extern cpuop_func op_30bb_3_ff; -extern cpuop_func op_30f0_3_nf; -extern cpuop_func op_30f0_3_ff; -extern cpuop_func op_30fb_3_nf; -extern cpuop_func op_30fb_3_ff; -extern cpuop_func op_3130_3_nf; -extern cpuop_func op_3130_3_ff; -extern cpuop_func op_313b_3_nf; -extern cpuop_func op_313b_3_ff; -extern cpuop_func op_3170_3_nf; -extern cpuop_func op_3170_3_ff; -extern cpuop_func op_317b_3_nf; -extern cpuop_func op_317b_3_ff; -extern cpuop_func op_3180_3_nf; -extern cpuop_func op_3180_3_ff; -extern cpuop_func op_3188_3_nf; -extern cpuop_func op_3188_3_ff; -extern cpuop_func op_3190_3_nf; -extern cpuop_func op_3190_3_ff; -extern cpuop_func op_3198_3_nf; -extern cpuop_func op_3198_3_ff; -extern cpuop_func op_31a0_3_nf; -extern cpuop_func op_31a0_3_ff; -extern cpuop_func op_31a8_3_nf; -extern cpuop_func op_31a8_3_ff; -extern cpuop_func op_31b0_3_nf; -extern cpuop_func op_31b0_3_ff; -extern cpuop_func op_31b8_3_nf; -extern cpuop_func op_31b8_3_ff; -extern cpuop_func op_31b9_3_nf; -extern cpuop_func op_31b9_3_ff; -extern cpuop_func op_31ba_3_nf; -extern cpuop_func op_31ba_3_ff; -extern cpuop_func op_31bb_3_nf; -extern cpuop_func op_31bb_3_ff; -extern cpuop_func op_31bc_3_nf; -extern cpuop_func op_31bc_3_ff; -extern cpuop_func op_31f0_3_nf; -extern cpuop_func op_31f0_3_ff; -extern cpuop_func op_31fb_3_nf; -extern cpuop_func op_31fb_3_ff; -extern cpuop_func op_33f0_3_nf; -extern cpuop_func op_33f0_3_ff; -extern cpuop_func op_33fb_3_nf; -extern cpuop_func op_33fb_3_ff; -extern cpuop_func op_4030_3_nf; -extern cpuop_func op_4030_3_ff; -extern cpuop_func op_4070_3_nf; -extern cpuop_func op_4070_3_ff; -extern cpuop_func op_40b0_3_nf; -extern cpuop_func op_40b0_3_ff; -extern cpuop_func op_40f0_3_nf; -extern cpuop_func op_40f0_3_ff; -extern cpuop_func op_4130_3_nf; -extern cpuop_func op_4130_3_ff; -extern cpuop_func op_413b_3_nf; -extern cpuop_func op_413b_3_ff; -extern cpuop_func op_41b0_3_nf; -extern cpuop_func op_41b0_3_ff; -extern cpuop_func op_41bb_3_nf; -extern cpuop_func op_41bb_3_ff; -extern cpuop_func op_41f0_3_nf; -extern cpuop_func op_41f0_3_ff; -extern cpuop_func op_41fb_3_nf; -extern cpuop_func op_41fb_3_ff; -extern cpuop_func op_4230_3_nf; -extern cpuop_func op_4230_3_ff; -extern cpuop_func op_4270_3_nf; -extern cpuop_func op_4270_3_ff; -extern cpuop_func op_42b0_3_nf; -extern cpuop_func op_42b0_3_ff; -extern cpuop_func op_42f0_3_nf; -extern cpuop_func op_42f0_3_ff; -extern cpuop_func op_4430_3_nf; -extern cpuop_func op_4430_3_ff; -extern cpuop_func op_4470_3_nf; -extern cpuop_func op_4470_3_ff; -extern cpuop_func op_44b0_3_nf; -extern cpuop_func op_44b0_3_ff; -extern cpuop_func op_44f0_3_nf; -extern cpuop_func op_44f0_3_ff; -extern cpuop_func op_44fb_3_nf; -extern cpuop_func op_44fb_3_ff; -extern cpuop_func op_4630_3_nf; -extern cpuop_func op_4630_3_ff; -extern cpuop_func op_4670_3_nf; -extern cpuop_func op_4670_3_ff; -extern cpuop_func op_46b0_3_nf; -extern cpuop_func op_46b0_3_ff; -extern cpuop_func op_46f0_3_nf; -extern cpuop_func op_46f0_3_ff; -extern cpuop_func op_46fb_3_nf; -extern cpuop_func op_46fb_3_ff; -extern cpuop_func op_4830_3_nf; -extern cpuop_func op_4830_3_ff; -extern cpuop_func op_4870_3_nf; -extern cpuop_func op_4870_3_ff; -extern cpuop_func op_487b_3_nf; -extern cpuop_func op_487b_3_ff; -extern cpuop_func op_48b0_3_nf; -extern cpuop_func op_48b0_3_ff; -extern cpuop_func op_48f0_3_nf; -extern cpuop_func op_48f0_3_ff; -extern cpuop_func op_4a30_3_nf; -extern cpuop_func op_4a30_3_ff; -extern cpuop_func op_4a3b_3_nf; -extern cpuop_func op_4a3b_3_ff; -extern cpuop_func op_4a70_3_nf; -extern cpuop_func op_4a70_3_ff; -extern cpuop_func op_4a7b_3_nf; -extern cpuop_func op_4a7b_3_ff; -extern cpuop_func op_4ab0_3_nf; -extern cpuop_func op_4ab0_3_ff; -extern cpuop_func op_4abb_3_nf; -extern cpuop_func op_4abb_3_ff; -extern cpuop_func op_4af0_3_nf; -extern cpuop_func op_4af0_3_ff; -extern cpuop_func op_4cb0_3_nf; -extern cpuop_func op_4cb0_3_ff; -extern cpuop_func op_4cbb_3_nf; -extern cpuop_func op_4cbb_3_ff; -extern cpuop_func op_4cf0_3_nf; -extern cpuop_func op_4cf0_3_ff; -extern cpuop_func op_4cfb_3_nf; -extern cpuop_func op_4cfb_3_ff; -extern cpuop_func op_4eb0_3_nf; -extern cpuop_func op_4eb0_3_ff; -extern cpuop_func op_4ebb_3_nf; -extern cpuop_func op_4ebb_3_ff; -extern cpuop_func op_4ef0_3_nf; -extern cpuop_func op_4ef0_3_ff; -extern cpuop_func op_4efb_3_nf; -extern cpuop_func op_4efb_3_ff; -extern cpuop_func op_5030_3_nf; -extern cpuop_func op_5030_3_ff; -extern cpuop_func op_5070_3_nf; -extern cpuop_func op_5070_3_ff; -extern cpuop_func op_50b0_3_nf; -extern cpuop_func op_50b0_3_ff; -extern cpuop_func op_50f0_3_nf; -extern cpuop_func op_50f0_3_ff; -extern cpuop_func op_5130_3_nf; -extern cpuop_func op_5130_3_ff; -extern cpuop_func op_5170_3_nf; -extern cpuop_func op_5170_3_ff; -extern cpuop_func op_51b0_3_nf; -extern cpuop_func op_51b0_3_ff; -extern cpuop_func op_51f0_3_nf; -extern cpuop_func op_51f0_3_ff; -extern cpuop_func op_52f0_3_nf; -extern cpuop_func op_52f0_3_ff; -extern cpuop_func op_53f0_3_nf; -extern cpuop_func op_53f0_3_ff; -extern cpuop_func op_54f0_3_nf; -extern cpuop_func op_54f0_3_ff; -extern cpuop_func op_55f0_3_nf; -extern cpuop_func op_55f0_3_ff; -extern cpuop_func op_56f0_3_nf; -extern cpuop_func op_56f0_3_ff; -extern cpuop_func op_57f0_3_nf; -extern cpuop_func op_57f0_3_ff; -extern cpuop_func op_58f0_3_nf; -extern cpuop_func op_58f0_3_ff; -extern cpuop_func op_59f0_3_nf; -extern cpuop_func op_59f0_3_ff; -extern cpuop_func op_5af0_3_nf; -extern cpuop_func op_5af0_3_ff; -extern cpuop_func op_5bf0_3_nf; -extern cpuop_func op_5bf0_3_ff; -extern cpuop_func op_5cf0_3_nf; -extern cpuop_func op_5cf0_3_ff; -extern cpuop_func op_5df0_3_nf; -extern cpuop_func op_5df0_3_ff; -extern cpuop_func op_5ef0_3_nf; -extern cpuop_func op_5ef0_3_ff; -extern cpuop_func op_5ff0_3_nf; -extern cpuop_func op_5ff0_3_ff; -extern cpuop_func op_60ff_3_nf; -extern cpuop_func op_60ff_3_ff; -extern cpuop_func op_62ff_3_nf; -extern cpuop_func op_62ff_3_ff; -extern cpuop_func op_63ff_3_nf; -extern cpuop_func op_63ff_3_ff; -extern cpuop_func op_64ff_3_nf; -extern cpuop_func op_64ff_3_ff; -extern cpuop_func op_65ff_3_nf; -extern cpuop_func op_65ff_3_ff; -extern cpuop_func op_66ff_3_nf; -extern cpuop_func op_66ff_3_ff; -extern cpuop_func op_67ff_3_nf; -extern cpuop_func op_67ff_3_ff; -extern cpuop_func op_68ff_3_nf; -extern cpuop_func op_68ff_3_ff; -extern cpuop_func op_69ff_3_nf; -extern cpuop_func op_69ff_3_ff; -extern cpuop_func op_6aff_3_nf; -extern cpuop_func op_6aff_3_ff; -extern cpuop_func op_6bff_3_nf; -extern cpuop_func op_6bff_3_ff; -extern cpuop_func op_6cff_3_nf; -extern cpuop_func op_6cff_3_ff; -extern cpuop_func op_6dff_3_nf; -extern cpuop_func op_6dff_3_ff; -extern cpuop_func op_6eff_3_nf; -extern cpuop_func op_6eff_3_ff; -extern cpuop_func op_6fff_3_nf; -extern cpuop_func op_6fff_3_ff; -extern cpuop_func op_8030_3_nf; -extern cpuop_func op_8030_3_ff; -extern cpuop_func op_803b_3_nf; -extern cpuop_func op_803b_3_ff; -extern cpuop_func op_8070_3_nf; -extern cpuop_func op_8070_3_ff; -extern cpuop_func op_807b_3_nf; -extern cpuop_func op_807b_3_ff; -extern cpuop_func op_80b0_3_nf; -extern cpuop_func op_80b0_3_ff; -extern cpuop_func op_80bb_3_nf; -extern cpuop_func op_80bb_3_ff; -extern cpuop_func op_80f0_3_nf; -extern cpuop_func op_80f0_3_ff; -extern cpuop_func op_80fb_3_nf; -extern cpuop_func op_80fb_3_ff; -extern cpuop_func op_8130_3_nf; -extern cpuop_func op_8130_3_ff; -extern cpuop_func op_8170_3_nf; -extern cpuop_func op_8170_3_ff; -extern cpuop_func op_81b0_3_nf; -extern cpuop_func op_81b0_3_ff; -extern cpuop_func op_81f0_3_nf; -extern cpuop_func op_81f0_3_ff; -extern cpuop_func op_81fb_3_nf; -extern cpuop_func op_81fb_3_ff; -extern cpuop_func op_9030_3_nf; -extern cpuop_func op_9030_3_ff; -extern cpuop_func op_903b_3_nf; -extern cpuop_func op_903b_3_ff; -extern cpuop_func op_9070_3_nf; -extern cpuop_func op_9070_3_ff; -extern cpuop_func op_907b_3_nf; -extern cpuop_func op_907b_3_ff; -extern cpuop_func op_90b0_3_nf; -extern cpuop_func op_90b0_3_ff; -extern cpuop_func op_90bb_3_nf; -extern cpuop_func op_90bb_3_ff; -extern cpuop_func op_90f0_3_nf; -extern cpuop_func op_90f0_3_ff; -extern cpuop_func op_90fb_3_nf; -extern cpuop_func op_90fb_3_ff; -extern cpuop_func op_9130_3_nf; -extern cpuop_func op_9130_3_ff; -extern cpuop_func op_9170_3_nf; -extern cpuop_func op_9170_3_ff; -extern cpuop_func op_91b0_3_nf; -extern cpuop_func op_91b0_3_ff; -extern cpuop_func op_91f0_3_nf; -extern cpuop_func op_91f0_3_ff; -extern cpuop_func op_91fb_3_nf; -extern cpuop_func op_91fb_3_ff; -extern cpuop_func op_b030_3_nf; -extern cpuop_func op_b030_3_ff; -extern cpuop_func op_b03b_3_nf; -extern cpuop_func op_b03b_3_ff; -extern cpuop_func op_b070_3_nf; -extern cpuop_func op_b070_3_ff; -extern cpuop_func op_b07b_3_nf; -extern cpuop_func op_b07b_3_ff; -extern cpuop_func op_b0b0_3_nf; -extern cpuop_func op_b0b0_3_ff; -extern cpuop_func op_b0bb_3_nf; -extern cpuop_func op_b0bb_3_ff; -extern cpuop_func op_b0f0_3_nf; -extern cpuop_func op_b0f0_3_ff; -extern cpuop_func op_b0fb_3_nf; -extern cpuop_func op_b0fb_3_ff; -extern cpuop_func op_b130_3_nf; -extern cpuop_func op_b130_3_ff; -extern cpuop_func op_b170_3_nf; -extern cpuop_func op_b170_3_ff; -extern cpuop_func op_b1b0_3_nf; -extern cpuop_func op_b1b0_3_ff; -extern cpuop_func op_b1f0_3_nf; -extern cpuop_func op_b1f0_3_ff; -extern cpuop_func op_b1fb_3_nf; -extern cpuop_func op_b1fb_3_ff; -extern cpuop_func op_c030_3_nf; -extern cpuop_func op_c030_3_ff; -extern cpuop_func op_c03b_3_nf; -extern cpuop_func op_c03b_3_ff; -extern cpuop_func op_c070_3_nf; -extern cpuop_func op_c070_3_ff; -extern cpuop_func op_c07b_3_nf; -extern cpuop_func op_c07b_3_ff; -extern cpuop_func op_c0b0_3_nf; -extern cpuop_func op_c0b0_3_ff; -extern cpuop_func op_c0bb_3_nf; -extern cpuop_func op_c0bb_3_ff; -extern cpuop_func op_c0f0_3_nf; -extern cpuop_func op_c0f0_3_ff; -extern cpuop_func op_c0fb_3_nf; -extern cpuop_func op_c0fb_3_ff; -extern cpuop_func op_c130_3_nf; -extern cpuop_func op_c130_3_ff; -extern cpuop_func op_c170_3_nf; -extern cpuop_func op_c170_3_ff; -extern cpuop_func op_c1b0_3_nf; -extern cpuop_func op_c1b0_3_ff; -extern cpuop_func op_c1f0_3_nf; -extern cpuop_func op_c1f0_3_ff; -extern cpuop_func op_c1fb_3_nf; -extern cpuop_func op_c1fb_3_ff; -extern cpuop_func op_d030_3_nf; -extern cpuop_func op_d030_3_ff; -extern cpuop_func op_d03b_3_nf; -extern cpuop_func op_d03b_3_ff; -extern cpuop_func op_d070_3_nf; -extern cpuop_func op_d070_3_ff; -extern cpuop_func op_d07b_3_nf; -extern cpuop_func op_d07b_3_ff; -extern cpuop_func op_d0b0_3_nf; -extern cpuop_func op_d0b0_3_ff; -extern cpuop_func op_d0bb_3_nf; -extern cpuop_func op_d0bb_3_ff; -extern cpuop_func op_d0f0_3_nf; -extern cpuop_func op_d0f0_3_ff; -extern cpuop_func op_d0fb_3_nf; -extern cpuop_func op_d0fb_3_ff; -extern cpuop_func op_d130_3_nf; -extern cpuop_func op_d130_3_ff; -extern cpuop_func op_d170_3_nf; -extern cpuop_func op_d170_3_ff; -extern cpuop_func op_d1b0_3_nf; -extern cpuop_func op_d1b0_3_ff; -extern cpuop_func op_d1f0_3_nf; -extern cpuop_func op_d1f0_3_ff; -extern cpuop_func op_d1fb_3_nf; -extern cpuop_func op_d1fb_3_ff; -extern cpuop_func op_e0f0_3_nf; -extern cpuop_func op_e0f0_3_ff; -extern cpuop_func op_e1f0_3_nf; -extern cpuop_func op_e1f0_3_ff; -extern cpuop_func op_e2f0_3_nf; -extern cpuop_func op_e2f0_3_ff; -extern cpuop_func op_e3f0_3_nf; -extern cpuop_func op_e3f0_3_ff; -extern cpuop_func op_e4f0_3_nf; -extern cpuop_func op_e4f0_3_ff; -extern cpuop_func op_e5f0_3_nf; -extern cpuop_func op_e5f0_3_ff; -extern cpuop_func op_e6f0_3_nf; -extern cpuop_func op_e6f0_3_ff; -extern cpuop_func op_e7f0_3_nf; -extern cpuop_func op_e7f0_3_ff; -extern cpuop_func op_40c0_4_nf; -extern cpuop_func op_40c0_4_ff; -extern cpuop_func op_40d0_4_nf; -extern cpuop_func op_40d0_4_ff; -extern cpuop_func op_40d8_4_nf; -extern cpuop_func op_40d8_4_ff; -extern cpuop_func op_40e0_4_nf; -extern cpuop_func op_40e0_4_ff; -extern cpuop_func op_40e8_4_nf; -extern cpuop_func op_40e8_4_ff; -extern cpuop_func op_40f0_4_nf; -extern cpuop_func op_40f0_4_ff; -extern cpuop_func op_40f8_4_nf; -extern cpuop_func op_40f8_4_ff; -extern cpuop_func op_40f9_4_nf; -extern cpuop_func op_40f9_4_ff; -extern cpuop_func op_4e73_4_nf; -extern cpuop_func op_4e73_4_ff; diff --git a/BasiliskII/src/uae_cpu/defs68k.c b/BasiliskII/src/uae_cpu/defs68k.c deleted file mode 100644 index e3cfa9825..000000000 --- a/BasiliskII/src/uae_cpu/defs68k.c +++ /dev/null @@ -1,185 +0,0 @@ -#include "sysdeps.h" -#include "readcpu.h" -struct instr_def defs68k[] = { -{ 60, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "ORSR.B #1"}, -{ 124, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "ORSR.W #1"}, -{ 192, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 63936, 2, 0, { { 1, 1 }, { 1, 5 }, { 1, 0 }, { 1, 5 }, { 1, 0 } }, 4, 17, "CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd]"}, -{ 0, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z #z,d[!Areg]"}, -{ 572, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "ANDSR.B #1"}, -{ 636, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "ANDSR.W #1"}, -{ 512, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z #z,d[!Areg]"}, -{ 1024, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z #z,d[!Areg]"}, -{ 1536, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z #z,d[!Areg]"}, -{ 1728, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "CALLM s[!Dreg,Areg,Aipi,Apdi,Immd]"}, -{ 1728, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 3, 16, "RTM s[Dreg,Areg]"}, -{ 2048, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 17, "BTST #1,s[!Areg]"}, -{ 2112, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCHG #1,s[!Areg,Immd]"}, -{ 2176, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCLR #1,s[!Areg,Immd]"}, -{ 2240, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BSET #1,s[!Areg,Immd]"}, -{ 2620, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 0, 16, "EORSR.B #1"}, -{ 2684, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "EORSR.W #1"}, -{ 2560, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "EOR.z #z,d[!Areg]"}, -{ 3072, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMP.z #z,s[!Areg,Immd]"}, -{ 2752, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, -{ 3264, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, -{ 3324, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "CAS2.W #2"}, -{ 3584, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 2, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 19, "MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, -{ 3776, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16]"}, -{ 3836, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "CAS2.L #2"}, -{ 256, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPMR.W d[Areg-Ad16],Dr"}, -{ 320, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPMR.L d[Areg-Ad16],Dr"}, -{ 384, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPRM.W Dr,d[Areg-Ad16]"}, -{ 448, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MVPRM.L Dr,d[Areg-Ad16]"}, -{ 256, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 17, "BTST Dr,s[!Areg]"}, -{ 320, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCHG Dr,s[!Areg,Immd]"}, -{ 384, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BCLR Dr,s[!Areg,Immd]"}, -{ 448, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 0 }, { 1, 1 }, { 1, 1 } }, 0, 19, "BSET Dr,s[!Areg,Immd]"}, -{ 4096, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.B s,d[!Areg]"}, -{ 8192, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVEA.L s,d[Areg]"}, -{ 8192, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.L s,d[!Areg]"}, -{ 12288, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVEA.W s,d[Areg]"}, -{ 12288, 12, {14,14,14,13,13,13,11,11,11,12,12,12,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.W s,d[!Areg]"}, -{ 16384, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 48, "NEGX.z d[!Areg]"}, -{ 16576, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 1, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 4, 16, "MVSR2.W d[!Areg]"}, -{ 16896, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 2 }, { 1, 3 }, { 1, 2 }, { 1, 2 } }, 0, 32, "CLR.z d[!Areg]"}, -{ 17088, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 1, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "MVSR2.B d[!Areg]"}, -{ 17408, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 48, "NEG.z d[!Areg]"}, -{ 17600, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 16, "MV2SR.B s[!Areg]"}, -{ 17920, 8, {17,17,13,13,13,14,14,14,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "NOT.z d[!Areg]"}, -{ 18112, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 2, { { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 }, { 0, 0 } }, 4, 16, "MV2SR.W s[!Areg]"}, -{ 18440, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 49, "LINK.L Ar,#2"}, -{ 18432, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 0, 0 }, { 1, 5 }, { 0, 0 }, { 1, 5 }, { 1, 0 } }, 0, 48, "NBCD.B d[!Areg]"}, -{ 18504, 3, {9,9,9,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "BKPT #k"}, -{ 18496, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "SWAP.W s[Dreg]"}, -{ 18496, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 0, "PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, -{ 18560, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.W d[Dreg]"}, -{ 18560, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "MVMLE.W #1,d[!Dreg,Areg,Aipi]"}, -{ 18624, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.L d[Dreg]"}, -{ 18624, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "MVMLE.L #1,d[!Dreg,Areg,Aipi]"}, -{ 18880, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "EXT.B d[Dreg]"}, -{ 18944, 8, {17,17,11,11,11,12,12,12,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 16, "TST.z s"}, -{ 19136, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 48, "TAS.B d[!Areg]"}, -{ 19196, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "ILLEGAL"}, -{ 19456, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "MULL.L #1,s[!Areg]"}, -{ 19520, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVL.L #1,s[!Areg]"}, -{ 19584, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 1, "MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd]"}, -{ 19648, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 1, "MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd]"}, -{ 20032, 4, {8,8,8,8,0,0,0,0,0,0,0,0,0,0,0,0}, 65520, 0, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 0, 16, "TRAP #J"}, -{ 20048, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 49, "LINK.W Ar,#1"}, -{ 20056, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 48, "UNLK.L Ar"}, -{ 20064, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MVR2USP.L Ar"}, -{ 20072, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 32, "MVUSP2R.L Ar"}, -{ 20080, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "RESET"}, -{ 20081, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 0, "NOP"}, -{ 20082, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 4, 16, "STOP #1"}, -{ 20083, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 2, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 7, 0, "RTE"}, -{ 20084, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 16, "RTD #1"}, -{ 20085, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 0, "RTS"}, -{ 20086, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 }, { 0, 1 } }, 4, 0, "TRAPV"}, -{ 20087, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 3, 0, "RTR"}, -{ 20090, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 1, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MOVEC2 #1"}, -{ 20091, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 1, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "MOVE2C #1"}, -{ 20096, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 128, "JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, -{ 16640, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 5 }, { 1, 5 }, { 1, 5 } }, 4, 17, "CHK.L s[!Areg],Dr"}, -{ 16768, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 5 }, { 1, 5 }, { 1, 5 } }, 4, 17, "CHK.W s[!Areg],Dr"}, -{ 20160, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 128, "JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd]"}, -{ 16832, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 2, "LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar"}, -{ 20544, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.W #j,d[Areg]"}, -{ 20608, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.L #j,d[Areg]"}, -{ 20480, 11, {7,7,7,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z #j,d[!Areg]"}, -{ 20800, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.W #j,d[Areg]"}, -{ 20864, 9, {7,7,7,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.L #j,d[Areg]"}, -{ 20736, 11, {7,7,7,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z #j,d[!Areg]"}, -{ 20680, 7, {2,2,2,2,15,15,15,0,0,0,0,0,0,0,0,0}, 61688, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 49, "DBcc.W Dr,#1"}, -{ 20672, 10, {2,2,2,2,13,13,13,14,14,14,0,0,0,0,0,0}, 61632, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 0, 32, "Scc.B d[!Areg]"}, -{ 20730, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 16, "TRAPcc #1"}, -{ 20731, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 16, "TRAPcc #2"}, -{ 20732, 4, {2,2,2,2,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 2, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 4, 0, "TRAPcc"}, -{ 24832, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.W #1"}, -{ 24832, 8, {6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.B #i"}, -{ 25087, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 64, "BSR.L #2"}, -{ 24576, 4, {3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.W #1"}, -{ 24576, 12, {3,3,3,3,6,6,6,6,6,6,6,6,0,0,0,0}, 61440, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.B #i"}, -{ 24831, 4, {3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,0}, 61695, 0, 0, { { 1, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 }, { 3, 1 } }, 1, 64, "Bcc.L #2"}, -{ 28672, 11, {15,15,15,5,5,5,5,5,5,5,5,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 18, "MOVE.L #i,Dr"}, -{ 32768, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z s[!Areg],Dr"}, -{ 32960, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVU.W s[!Areg],Dr"}, -{ 33024, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "SBCD.B d[Dreg],Dr"}, -{ 33024, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "SBCD.B d[Areg-Apdi],Arp"}, -{ 33024, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "OR.z Dr,d[!Areg,Dreg]"}, -{ 33088, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "PACK d[Dreg],Dr"}, -{ 33088, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "PACK d[Areg-Apdi],Arp"}, -{ 33152, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "UNPK d[Dreg],Dr"}, -{ 33152, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 2, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "UNPK d[Areg-Apdi],Arp"}, -{ 33216, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 } }, 4, 19, "DIVS.W s[!Areg],Dr"}, -{ 36864, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z s,Dr"}, -{ 37056, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.W s,Ar"}, -{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUBX.z d[Dreg],Dr"}, -{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUBX.z d[Areg-Apdi],Arp"}, -{ 37120, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "SUB.z Dr,d[!Areg,Dreg]"}, -{ 37312, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "SUBA.L s,Ar"}, -{ 45056, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMP.z s,Dr"}, -{ 45248, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPA.W s,Ar"}, -{ 45504, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPA.L s,Ar"}, -{ 45312, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 17, "CMPM.z d[Areg-Aipi],ArP"}, -{ 45312, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "EOR.z Dr,d[!Areg]"}, -{ 49152, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z s[!Areg],Dr"}, -{ 49344, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "MULU.W s[!Areg],Dr"}, -{ 49408, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "ABCD.B d[Dreg],Dr"}, -{ 49408, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 0, 0 }, { 1, 4 }, { 0, 0 }, { 1, 4 }, { 1, 0 } }, 0, 19, "ABCD.B d[Areg-Apdi],Arp"}, -{ 49408, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "AND.z Dr,d[!Areg,Dreg]"}, -{ 49472, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Dr,d[Dreg]"}, -{ 49472, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Ar,d[Areg]"}, -{ 49536, 9, {15,15,15,13,13,13,14,14,14,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 51, "EXG.L Dr,d[Areg]"}, -{ 49600, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "MULS.W s[!Areg],Dr"}, -{ 53248, 11, {15,15,15,17,17,11,11,11,12,12,12,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z s,Dr"}, -{ 53440, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.W s,Ar"}, -{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADDX.z d[Dreg],Dr"}, -{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 0, 0 }, { 1, 0 }, { 0, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADDX.z d[Areg-Apdi],Arp"}, -{ 53504, 11, {15,15,15,17,17,13,13,13,14,14,14,0,0,0,0,0}, 61696, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ADD.z Dr,d[!Areg,Dreg]"}, -{ 53696, 9, {15,15,15,11,11,11,12,12,12,0,0,0,0,0,0,0}, 61888, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 19, "ADDA.L s,Ar"}, -{ 57344, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASf.z #j,DR"}, -{ 57352, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSf.z #j,DR"}, -{ 57360, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXf.z #j,DR"}, -{ 57368, 9, {7,7,7,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROf.z #j,DR"}, -{ 57376, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASf.z Dr,DR"}, -{ 57384, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSf.z Dr,DR"}, -{ 57392, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXf.z Dr,DR"}, -{ 57400, 9, {15,15,15,4,17,17,16,16,16,0,0,0,0,0,0,0}, 61496, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROf.z Dr,DR"}, -{ 57536, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 0 } }, 0, 19, "ASfW.W d[!Dreg,Areg]"}, -{ 58048, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "LSfW.W d[!Dreg,Areg]"}, -{ 58560, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 0, 0 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROXfW.W d[!Dreg,Areg]"}, -{ 59072, 7, {4,13,13,13,14,14,14,0,0,0,0,0,0,0,0,0}, 65216, 0, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 0 } }, 0, 19, "ROfW.W d[!Dreg,Areg]"}, -{ 59584, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFTST #1,s[!Areg,Apdi,Aipi,Immd]"}, -{ 59840, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFEXTU #1,s[!Areg,Apdi,Aipi,Immd]"}, -{ 60096, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, -{ 60352, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFEXTS #1,s[!Areg,Apdi,Aipi,Immd]"}, -{ 60608, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, -{ 60864, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 17, "BFFFO #1,s[!Areg,Apdi,Aipi,Immd]"}, -{ 61120, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, -{ 61376, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 2, 0, { { 1, 1 }, { 1, 0 }, { 1, 0 }, { 1, 2 }, { 1, 2 } }, 0, 19, "BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16]"}, -{ 61952, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 17, "FPP #1,s"}, -{ 62016, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FDBcc #1,s[Areg-Dreg]"}, -{ 62016, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 17, "FScc #1,s[!Areg,Immd,PC8r,PC16]"}, -{ 62074, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "FTRAPcc #1"}, -{ 62075, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 16, "FTRAPcc #2"}, -{ 62076, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "FTRAPcc"}, -{ 62080, 6, {10,10,10,10,10,10,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FBcc #K,#1"}, -{ 62144, 6, {10,10,10,10,10,10,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 1, 17, "FBcc #K,#2"}, -{ 62208, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 32, "FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16]"}, -{ 62272, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 3, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 16, "FRESTORE s[!Dreg,Areg,Apdi,Immd]"}, -{ 62720, 8, {5,5,5,5,5,12,12,12,0,0,0,0,0,0,0,0}, 65280, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 17, "MMUOP #i,s"}, -{ 62472, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CINVL #p,Ar"}, -{ 62480, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CINVP #p,Ar"}, -{ 62488, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "CINVA #p"}, -{ 62504, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CPUSHL #p,Ar"}, -{ 62512, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 2, "CPUSHP #p,Ar"}, -{ 62520, 5, {19,19,15,15,15,0,0,0,0,0,0,0,0,0,0,0}, 65336, 4, 2, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 4, 0, "CPUSHA #p"}, -{ 63008, 3, {15,15,15,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65528, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 ArP,AxP"}, -{ 62976, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 s[Dreg-Aipi],L"}, -{ 62976, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 L,d[Areg-Aipi]"}, -{ 62976, 6, {11,11,11,12,12,12,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 s[Aind],L"}, -{ 62976, 6, {13,13,13,14,14,14,0,0,0,0,0,0,0,0,0,0}, 65472, 4, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 0, 18, "MOVE16 L,d[Aipi-Aind]"}, -{ 28928, 0, {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 65535, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 3, 0, "EMULOP_RETURN"}, -{ 28928, 8, {18,18,18,18,18,18,18,18,0,0,0,0,0,0,0,0}, 65280, 0, 0, { { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 }, { 1, 1 } }, 2, 16, "EMULOP #E"}}; -int n_defs68k = 181; diff --git a/BasiliskII/src/uae_cpu/osx_generate_files.sh b/BasiliskII/src/uae_cpu/osx_generate_files.sh deleted file mode 100755 index 3f6da3cec..000000000 --- a/BasiliskII/src/uae_cpu/osx_generate_files.sh +++ /dev/null @@ -1,22 +0,0 @@ -#!/bin/bash -e - -# -# osx_generate_files.sh -# -# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts -# - -SCRIPT_DIRNAME="$(cd $(dirname $0) && pwd)" -cd "$SCRIPT_DIRNAME" - -echo "build68k: compiling" -clang build68k.c -o build68k -I ../MacOSX/ -I ../Unix/ - -echo "build68k: running" -cat table68k | ./build68k > ./defs68k.c - -echo "gencpu: compiling" -clang gencpu.c ./defs68k.c readcpu.cpp -o gencpu -I . -I ../MacOSX/ -I ../Unix/ - -echo "gencpu: running" -./gencpu From 145ca0c210559dc67ce266f7e6df8b6391327887 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 27 Aug 2017 17:37:20 -0400 Subject: [PATCH 135/534] fixed issue #15: BasiliskII: running an autotools build breaks ability to build with Xcode --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 8 ++++---- BasiliskII/src/Unix/sysdeps.h | 2 +- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index a881f4558..68194be60 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1237,10 +1237,10 @@ GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", - ../UNIX, + ../MacOSX, ../include, - ., ../uae_cpu, + ../UNIX, ); MACOSX_DEPLOYMENT_TARGET = 10.7; MTL_ENABLE_DEBUG_INFO = YES; @@ -1290,10 +1290,10 @@ GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", - ../UNIX, + ../MacOSX, ../include, - ., ../uae_cpu, + ../UNIX, ); MACOSX_DEPLOYMENT_TARGET = 10.7; MTL_ENABLE_DEBUG_INFO = NO; diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index d74a2eda3..7f8abb05c 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -25,7 +25,7 @@ #error "Your compiler is not ANSI. Get a real one." #endif -#include "config.h" +#include #include "user_strings_unix.h" #ifndef STDC_HEADERS From d5e68ceebfa899b5a78b784c543cd99acab0346d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 27 Aug 2017 18:05:13 -0400 Subject: [PATCH 136/534] use SDL2's preferred/non-legacy means of opening, and working with, an audio device --- BasiliskII/src/SDL/audio_sdl.cpp | 47 ++++++++++++++++---------------- 1 file changed, 24 insertions(+), 23 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index bc5f30a93..7b7cb1072 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -45,6 +45,8 @@ static int audio_sample_size_index = 0; static int audio_channel_count_index = 0; // Global variables +static SDL_AudioDeviceID audio_device = 0; +static SDL_AudioSpec audio_spec_obtained; static SDL_sem *audio_irq_done_sem = NULL; // Signal from interrupt to streaming thread: data block read static uint8 silence_byte; // Byte value to use to fill sound buffers with silence static uint8 *audio_mix_buf = NULL; @@ -86,40 +88,36 @@ static bool open_sdl_audio(void) audio_channel_count_index = audio_channel_counts.size() - 1; } - SDL_AudioSpec audio_spec; - SDL_zero(audio_spec); - audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; - audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; - audio_spec.channels = audio_channel_counts[audio_channel_count_index]; - audio_spec.samples = 4096; - audio_spec.callback = stream_func; - audio_spec.userdata = NULL; + SDL_AudioSpec audio_spec_desired; + SDL_zero(audio_spec_desired); + audio_spec_desired.freq = audio_sample_rates[audio_sample_rate_index] >> 16; + audio_spec_desired.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; + audio_spec_desired.channels = audio_channel_counts[audio_channel_count_index]; + audio_spec_desired.samples = 4096; + audio_spec_desired.callback = stream_func; + audio_spec_desired.userdata = NULL; // Open the audio device, forcing the desired format - if (SDL_OpenAudio(&audio_spec, NULL) < 0) { + SDL_zero(audio_spec_obtained); + audio_device = SDL_OpenAudioDevice(NULL, 0, &audio_spec_desired, &audio_spec_obtained, 0); + if (!audio_device) { fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); return false; } - - // HACK: workaround a possible bug in SDL 2.0.5 (reported via https://bugzilla.libsdl.org/show_bug.cgi?id=3710 ) - // whereby SDL does not update audio_spec.size - if (audio_spec.size == 0) { - audio_spec.size = (SDL_AUDIO_BITSIZE(audio_spec.format) / 8) * audio_spec.channels * audio_spec.samples; - } #if defined(BINCUE) - OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, - audio_spec.silence); + OpenAudio_bincue(audio_spec_obtained.freq, audio_spec_obtained.format, audio_spec_obtained.channels, + audio_spec_obtained.silence); #endif const char * driver_name = SDL_GetCurrentAudioDriver(); printf("Using SDL/%s audio output\n", driver_name ? driver_name : ""); - silence_byte = audio_spec.silence; - SDL_PauseAudio(0); + silence_byte = audio_spec_obtained.silence; + SDL_PauseAudioDevice(audio_device, 0); // Sound buffer size = 4096 frames - audio_frames_per_block = audio_spec.samples; - audio_mix_buf = (uint8*)malloc(audio_spec.size); + audio_frames_per_block = audio_spec_obtained.samples; + audio_mix_buf = (uint8*)malloc(audio_spec_obtained.size); return true; } @@ -168,7 +166,10 @@ void AudioInit(void) static void close_audio(void) { // Close audio device - SDL_CloseAudio(); + if (audio_device) { + SDL_CloseAudioDevice(audio_device); + audio_device = 0; + } free(audio_mix_buf); audio_mix_buf = NULL; audio_open = false; @@ -231,7 +232,7 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) // Send data to audio device Mac2Host_memcpy(audio_mix_buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); memset((uint8 *)stream, silence_byte, stream_len); - SDL_MixAudio(stream, audio_mix_buf, work_size, audio_volume); + SDL_MixAudioFormat(stream, audio_mix_buf, audio_spec_obtained.format, work_size, audio_volume); D(bug("stream: data written\n")); From 1983aa1652f5eba155c2889ef32c9b71de39d352 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 27 Aug 2017 18:11:48 -0400 Subject: [PATCH 137/534] try making sure that the bincue sources use the correct, SDL2 audio device ID. Untested! --- BasiliskII/src/SDL/audio_sdl.cpp | 4 ++-- BasiliskII/src/Unix/bincue_unix.cpp | 8 +++++--- 2 files changed, 7 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 7b7cb1072..767e0f38c 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -45,8 +45,8 @@ static int audio_sample_size_index = 0; static int audio_channel_count_index = 0; // Global variables -static SDL_AudioDeviceID audio_device = 0; -static SDL_AudioSpec audio_spec_obtained; +SDL_AudioDeviceID audio_device = 0; +SDL_AudioSpec audio_spec_obtained; static SDL_sem *audio_irq_done_sem = NULL; // Signal from interrupt to streaming thread: data block read static uint8 silence_byte; // Byte value to use to fill sound buffers with silence static uint8 *audio_mix_buf = NULL; diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 612cf790b..156c3c8f8 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -49,6 +49,8 @@ static int bincue_core_audio_callback(void); #ifdef USE_SDL_AUDIO #include #include +extern SDL_AudioDeviceID audio_device; +extern SDL_AudioSpec audio_spec_obtained; #endif #include "bincue_unix.h" @@ -664,7 +666,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, MSF msf; #ifdef USE_SDL_AUDIO - SDL_LockAudio(); + SDL_LockAudioDevice(audio_device); #endif player.audiostatus = CDROM_AUDIO_NO_STATUS; @@ -709,7 +711,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, D(bug("CDPlay_bincue: play beyond last track !\n")); #ifdef USE_SDL_AUDIO - SDL_UnlockAudio(); + SDL_UnlockAudioDevice(audio_device); #endif if (audio_enabled) { @@ -804,7 +806,7 @@ void MixAudio_bincue(uint8 *stream, int stream_len) if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { uint8 *buf = fill_buffer(stream_len); if (buf) - SDL_MixAudio(stream, buf, stream_len, SDL_MIX_MAXVOLUME); + SDL_MixAudioFormat(stream, buf, audio_spec_obtained.format, stream_len, SDL_MIX_MAXVOLUME); } } From dbd997fa47f3507946d88a341e041b0bb1a1d81c Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Wed, 30 Aug 2017 12:17:37 -0400 Subject: [PATCH 138/534] fixed issue #20: GTK preference UI was broken in both Linux and Mac OS X --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 ++ BasiliskII/src/MacOSX/config.h | 8 ++++++++ 2 files changed, 10 insertions(+) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 68194be60..bf11722de 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1227,6 +1227,7 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", HAVE_CONFIG_H, + "USE_XCODE=1", "DEBUG=1", ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; @@ -1281,6 +1282,7 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", HAVE_CONFIG_H, + "USE_XCODE=1", ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index e88fee354..76393d478 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -1,6 +1,13 @@ /* config.h. Generated from config.h.in by configure. */ /* config.h.in. Generated from configure.ac by autoheader. */ +#if ! USE_XCODE +// HACK, dludwig@pobox.com: Unless we are building with Xcode, use the +// config.h file that Autotools generates. This is located in +// BasiliskII/src/Unix/ +#include "../Unix/config.h" +#else + /* Define if building universal (internal helper macro) */ /* #undef AC_APPLE_UNIVERSAL_BUILD */ @@ -811,3 +818,4 @@ #define FPU_UAE 1 //#define FPU_IMPLEMENTATION 1 +#endif From bcd784d7c4dbade5c6b218e70e6508cbd6c06d84 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Fri, 1 Sep 2017 18:48:40 -0400 Subject: [PATCH 139/534] SheepShaver: make Autotools use SDL2 --- SheepShaver/src/Unix/configure.ac | 23 ++++++++++------------- 1 file changed, 10 insertions(+), 13 deletions(-) mode change 100644 => 100755 SheepShaver/src/Unix/configure.ac diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac old mode 100644 new mode 100755 index 11e4c10a5..1ece65880 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -160,7 +160,7 @@ AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ fi fi saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL.framework/Headers" + CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL2.framework/Headers" AC_TRY_LINK( [$2 #undef main], [], @@ -189,22 +189,22 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ]) + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - AC_PATH_PROG(sdl_config, "sdl-config") - if [[ -n "$sdl_config" ]]; then - sdl_cflags=`$sdl_config --cflags` + AC_PATH_PROG(sdl2_config, "sdl2-config") + if [[ -n "$sdl2_config" ]]; then + sdl2_cflags=`$sdl2_config --cflags` if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl_libs=`$sdl_config --static-libs` + sdl2_libs=`$sdl2_config --static-libs` else - sdl_libs=`$sdl_config --libs` + sdl2_libs=`$sdl2_config --libs` fi - CFLAGS="$CFLAGS $sdl_cflags" - CXXFLAGS="$CXXFLAGS $sdl_cflags" - LIBS="$LIBS $sdl_libs" + CFLAGS="$CFLAGS $sdl2_cflags" + CXXFLAGS="$CXXFLAGS $sdl2_cflags" + LIBS="$LIBS $sdl2_libs" else WANT_SDL=no WANT_SDL_VIDEO=no @@ -702,9 +702,6 @@ AC_SUBST(SLIRP_SRCS) dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then AC_DEFINE(USE_SDL, 1, [Define to enble SDL support.]) - if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../SDL/SDLMain.m" - fi fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support.]) From cd57af779595e0e87b9a08b50a52fb2146292219 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 2 Sep 2017 10:58:53 -0400 Subject: [PATCH 140/534] Basilisk II, bug-fix: on Mac, mouse-grabbing via Ctrl+F5 wasn't changing the title of the window --- .../BasiliskII.xcodeproj/project.pbxproj | 8 ++-- BasiliskII/src/SDL/video_sdl.cpp | 38 +++++++++++++++---- 2 files changed, 35 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index bf11722de..cd96c0e5e 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -99,13 +99,13 @@ 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; - 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */; }; 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */; }; 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; + 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -368,7 +368,6 @@ 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; - 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_dummy.cpp; sourceTree = ""; }; 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_uae.cpp; sourceTree = ""; }; @@ -376,6 +375,7 @@ 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; + 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -713,6 +713,7 @@ 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */, 7539E2321F23B32A006B2DF2 /* tinyxml2.h */, 7539E2331F23B32A006B2DF2 /* tunconfig */, + 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */, 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */, ); name = Unix; @@ -760,7 +761,6 @@ 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, - 7539E28B1F23C56F006B2DF2 /* user_strings_dummy.cpp */, ); name = dummy; path = ../dummy; @@ -1070,11 +1070,11 @@ 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, + 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, - 7539E2941F23C56F006B2DF2 /* user_strings_dummy.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index e3797e98b..96c43b7bd 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1053,11 +1053,11 @@ void driver_base::restore_mouse_accel(void) // Toggle mouse grab void driver_base::toggle_mouse_grab(void) { - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); - } + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); +} // Grab mouse, switch to relative mouse mode void driver_base::grab_mouse(void) @@ -1905,7 +1905,7 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_F2: return 0x78; case SDLK_F3: return 0x63; case SDLK_F4: return 0x76; - case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; + case SDLK_F5: return 0x60; case SDLK_F6: return 0x61; case SDLK_F7: return 0x62; case SDLK_F8: return 0x64; @@ -1967,9 +1967,33 @@ static void force_complete_window_refresh() * SDL event handling */ +// possible return codes for SDL-registered event watches +enum : int { + EVENT_DROP_FROM_QUEUE = 0, + EVENT_ADD_TO_QUEUE = 1 +}; + +// Some events need to be processed in the host-app's main thread, due to +// host-OS requirements. +// +// This function is called by SDL, whenever it generates an SDL_Event. It has +// the ability to process events, and optionally, to prevent them from being +// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) { switch (event->type) { + case SDL_KEYUP: { + SDL_Keysym const & ks = event->key.keysym; + switch (ks.sym) { + case SDLK_F5: { + if (is_ctrl_down(ks)) { + drv->toggle_mouse_grab(); + return EVENT_DROP_FROM_QUEUE; + } + } break; + } + } break; + case SDL_WINDOWEVENT: { switch (event->window.event) { case SDL_WINDOWEVENT_RESIZED: { @@ -2000,7 +2024,7 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) } break; } - return 1; // return 1 to add event to queue, 0 to drop it + return EVENT_ADD_TO_QUEUE; } From 0f8f30f6390740563accd319f95cf424cb1483b6 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 2 Sep 2017 15:36:56 -0400 Subject: [PATCH 141/534] Basilisk II, bug-fix: switching to fullscreen, via Ctrl+Enter, on a non-primary host display, could cause mouse cursor to jump to a different display This bug was observed occurring on an OSX 10.12 host. --- BasiliskII/src/SDL/video_sdl.cpp | 7 ------- 1 file changed, 7 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 96c43b7bd..dd74d2d48 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1478,10 +1478,6 @@ static void do_toggle_fullscreen(void) while (!thread_stop_ack) ; #endif - // save the mouse position - int x, y; - SDL_GetMouseState(&x, &y); - // Apply fullscreen if (sdl_window) { if (display_type == DISPLAY_SCREEN) { @@ -1507,9 +1503,6 @@ static void do_toggle_fullscreen(void) // while SetVideoMode is happening, control key up may be missed ADBKeyUp(0x36); - - // restore the mouse position - SDL_WarpMouseGlobal(x, y); // resume redraw thread toggle_fullscreen = false; From 7a36983f11088ec5b24933c582e1d63d5341e29c Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 2 Sep 2017 15:54:33 -0400 Subject: [PATCH 142/534] fixed issue #27: on OS X host, mouse can get locked to portion of fullscreen display --- BasiliskII/src/SDL/video_sdl.cpp | 32 ++++++++++++++++++++++---------- 1 file changed, 22 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index dd74d2d48..679c829cb 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -169,6 +169,7 @@ static int redraw_func(void *arg); static int update_sdl_video(); static int present_sdl_video(); static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); +static bool is_fullscreen(SDL_Window *); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -1059,14 +1060,24 @@ void driver_base::toggle_mouse_grab(void) grab_mouse(); } +static void update_mouse_grab() +{ + if (mouse_grabbed || is_fullscreen(sdl_window)) { + SDL_SetRelativeMouseMode(SDL_TRUE); + } else { + SDL_SetRelativeMouseMode(SDL_FALSE); + } +} + // Grab mouse, switch to relative mouse mode void driver_base::grab_mouse(void) { if (!mouse_grabbed) { - set_grab_mode(true); + mouse_grabbed = true; + update_mouse_grab(); set_window_name(STR_WINDOW_TITLE_GRABBED); disable_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = true); + ADBSetRelMouseMode(true); } } @@ -1074,10 +1085,11 @@ void driver_base::grab_mouse(void) void driver_base::ungrab_mouse(void) { if (mouse_grabbed) { - set_grab_mode(false); + mouse_grabbed = false; + update_mouse_grab(); set_window_name(STR_WINDOW_TITLE); restore_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = false); + ADBSetRelMouseMode(false); } } @@ -1518,7 +1530,7 @@ static void do_toggle_fullscreen(void) /* * Execute video VBL routine */ - + static bool is_fullscreen(SDL_Window * window) { #ifdef __MACOSX__ @@ -1758,6 +1770,7 @@ void video_set_cursor(void) if (visible) { int x, y; SDL_GetMouseState(&x, &y); + printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); SDL_WarpMouseGlobal(x, y); } } @@ -2006,11 +2019,10 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) // fixes an issue on OSX hosts whereby a fullscreen window // can, in some cases, be dragged around. // ( https://github.com/DavidLudwig/macemu/issues/19 ) - if (is_fullscreen(sdl_window)) { - SDL_SetRelativeMouseMode(SDL_TRUE); - } else { - SDL_SetRelativeMouseMode(SDL_FALSE); - } + // + // Calling update_mouse_grab() will lead to SDL_SetRelativeMouseMode() + // being called, as appropriate. + update_mouse_grab(); } } break; } From 573ffee8b1698426f3817ddd3f32a6999b345d0f Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 11:41:26 -0400 Subject: [PATCH 143/534] fixed issue #31, "on multi-monitor OS X host: cursor can get locked to fullscreen display for guest OS" --- BasiliskII/src/MacOSX/utils_macosx.mm | 5 +++++ BasiliskII/src/SDL/video_sdl.cpp | 24 +++++++++++++----------- 2 files changed, 18 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index c047e2752..b10040386 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -56,3 +56,8 @@ bool is_fullscreen_osx(SDL_Window * window) const NSWindowStyleMask styleMask = [wmInfo.info.cocoa.window styleMask]; return (styleMask & NSWindowStyleMaskFullScreen) != 0; } + +void set_menu_bar_visible_osx(bool visible) +{ + [NSMenu setMenuBarVisible:(visible ? YES : NO)]; +} diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 679c829cb..26a148299 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1062,7 +1062,7 @@ void driver_base::toggle_mouse_grab(void) static void update_mouse_grab() { - if (mouse_grabbed || is_fullscreen(sdl_window)) { + if (mouse_grabbed) { SDL_SetRelativeMouseMode(SDL_TRUE); } else { SDL_SetRelativeMouseMode(SDL_FALSE); @@ -1978,7 +1978,7 @@ enum : int { EVENT_DROP_FROM_QUEUE = 0, EVENT_ADD_TO_QUEUE = 1 }; - + // Some events need to be processed in the host-app's main thread, due to // host-OS requirements. // @@ -2014,15 +2014,17 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) (display_type == DISPLAY_SCREEN && !is_full); if (adjust_fullscreen) { do_toggle_fullscreen(); - - // Utilizing SDL2's 'relative mouse mode', when in fullscreen, - // fixes an issue on OSX hosts whereby a fullscreen window - // can, in some cases, be dragged around. - // ( https://github.com/DavidLudwig/macemu/issues/19 ) - // - // Calling update_mouse_grab() will lead to SDL_SetRelativeMouseMode() - // being called, as appropriate. - update_mouse_grab(); + +#if __MACOSX__ + // HACK-FIX: on OSX hosts, make sure that the OSX menu + // bar does not show up in fullscreen mode, when the + // cursor is near the top of the screen, lest the + // guest OS' menu bar be obscured. + if (is_full) { + extern void set_menu_bar_visible_osx(bool); + set_menu_bar_visible_osx(false); + } +#endif } } break; } From 22eaa317a860e354980a5b8534db513b2723d980 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 12:13:50 -0400 Subject: [PATCH 144/534] reverted to SDL 1.x compatible audio APIs (which still work in SDL2) --- BasiliskII/src/SDL/audio_sdl.cpp | 47 ++++++++++++++--------------- BasiliskII/src/Unix/bincue_unix.cpp | 8 ++--- 2 files changed, 26 insertions(+), 29 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 767e0f38c..130afe6b2 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -45,8 +45,6 @@ static int audio_sample_size_index = 0; static int audio_channel_count_index = 0; // Global variables -SDL_AudioDeviceID audio_device = 0; -SDL_AudioSpec audio_spec_obtained; static SDL_sem *audio_irq_done_sem = NULL; // Signal from interrupt to streaming thread: data block read static uint8 silence_byte; // Byte value to use to fill sound buffers with silence static uint8 *audio_mix_buf = NULL; @@ -88,36 +86,40 @@ static bool open_sdl_audio(void) audio_channel_count_index = audio_channel_counts.size() - 1; } - SDL_AudioSpec audio_spec_desired; - SDL_zero(audio_spec_desired); - audio_spec_desired.freq = audio_sample_rates[audio_sample_rate_index] >> 16; - audio_spec_desired.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; - audio_spec_desired.channels = audio_channel_counts[audio_channel_count_index]; - audio_spec_desired.samples = 4096; - audio_spec_desired.callback = stream_func; - audio_spec_desired.userdata = NULL; + SDL_AudioSpec audio_spec; + SDL_zero(audio_spec); + audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; + audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; + audio_spec.channels = audio_channel_counts[audio_channel_count_index]; + audio_spec.samples = 4096; + audio_spec.callback = stream_func; + audio_spec.userdata = NULL; // Open the audio device, forcing the desired format - SDL_zero(audio_spec_obtained); - audio_device = SDL_OpenAudioDevice(NULL, 0, &audio_spec_desired, &audio_spec_obtained, 0); - if (!audio_device) { + if (SDL_OpenAudio(&audio_spec, NULL) < 0) { fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); return false; } + + // HACK: workaround a bug in SDL pre-2.0.6 (reported via https://bugzilla.libsdl.org/show_bug.cgi?id=3710 ) + // whereby SDL does not update audio_spec.size + if (audio_spec.size == 0) { + audio_spec.size = (SDL_AUDIO_BITSIZE(audio_spec.format) / 8) * audio_spec.channels * audio_spec.samples; + } #if defined(BINCUE) - OpenAudio_bincue(audio_spec_obtained.freq, audio_spec_obtained.format, audio_spec_obtained.channels, - audio_spec_obtained.silence); + OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, + audio_spec.silence); #endif const char * driver_name = SDL_GetCurrentAudioDriver(); printf("Using SDL/%s audio output\n", driver_name ? driver_name : ""); - silence_byte = audio_spec_obtained.silence; - SDL_PauseAudioDevice(audio_device, 0); + silence_byte = audio_spec.silence; + SDL_PauseAudio(0); // Sound buffer size = 4096 frames - audio_frames_per_block = audio_spec_obtained.samples; - audio_mix_buf = (uint8*)malloc(audio_spec_obtained.size); + audio_frames_per_block = audio_spec.samples; + audio_mix_buf = (uint8*)malloc(audio_spec.size); return true; } @@ -166,10 +168,7 @@ void AudioInit(void) static void close_audio(void) { // Close audio device - if (audio_device) { - SDL_CloseAudioDevice(audio_device); - audio_device = 0; - } + SDL_CloseAudio(); free(audio_mix_buf); audio_mix_buf = NULL; audio_open = false; @@ -232,7 +231,7 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) // Send data to audio device Mac2Host_memcpy(audio_mix_buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); memset((uint8 *)stream, silence_byte, stream_len); - SDL_MixAudioFormat(stream, audio_mix_buf, audio_spec_obtained.format, work_size, audio_volume); + SDL_MixAudio(stream, audio_mix_buf, work_size, audio_volume); D(bug("stream: data written\n")); diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 156c3c8f8..612cf790b 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -49,8 +49,6 @@ static int bincue_core_audio_callback(void); #ifdef USE_SDL_AUDIO #include #include -extern SDL_AudioDeviceID audio_device; -extern SDL_AudioSpec audio_spec_obtained; #endif #include "bincue_unix.h" @@ -666,7 +664,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, MSF msf; #ifdef USE_SDL_AUDIO - SDL_LockAudioDevice(audio_device); + SDL_LockAudio(); #endif player.audiostatus = CDROM_AUDIO_NO_STATUS; @@ -711,7 +709,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, D(bug("CDPlay_bincue: play beyond last track !\n")); #ifdef USE_SDL_AUDIO - SDL_UnlockAudioDevice(audio_device); + SDL_UnlockAudio(); #endif if (audio_enabled) { @@ -806,7 +804,7 @@ void MixAudio_bincue(uint8 *stream, int stream_len) if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { uint8 *buf = fill_buffer(stream_len); if (buf) - SDL_MixAudioFormat(stream, buf, audio_spec_obtained.format, stream_len, SDL_MIX_MAXVOLUME); + SDL_MixAudio(stream, buf, stream_len, SDL_MIX_MAXVOLUME); } } From f8682679c23d90d55797f5a9702e09c619b1994f Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 12:18:52 -0400 Subject: [PATCH 145/534] moved SDL2 video code to video_sdl2.cpp; restored SDL1 implementation of video_sdl.cpp --- .../BasiliskII.xcodeproj/project.pbxproj | 8 +- BasiliskII/src/SDL/video_sdl.cpp | 631 +--- BasiliskII/src/SDL/video_sdl2.cpp | 2601 +++++++++++++++++ 3 files changed, 2752 insertions(+), 488 deletions(-) mode change 100755 => 100644 BasiliskII/src/SDL/video_sdl.cpp create mode 100755 BasiliskII/src/SDL/video_sdl2.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index cd96c0e5e..232f5f5e3 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -51,7 +51,6 @@ 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; 7539E1751F23B25A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0731F23B25A006B2DF2 /* keycodes */; }; - 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */; }; 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; @@ -106,6 +105,7 @@ 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; + 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -288,7 +288,6 @@ 7539E0701F23B25A006B2DF2 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = ""; }; 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; 7539E0731F23B25A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; 7539E0771F23B25A006B2DF2 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = ""; }; 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; 7539E0A31F23B25A006B2DF2 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = ""; }; @@ -376,6 +375,7 @@ 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; + 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -584,7 +584,7 @@ 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, - 7539E0761F23B25A006B2DF2 /* video_sdl.cpp */, + 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, ); name = SDL; path = ../SDL; @@ -1038,7 +1038,6 @@ 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, - 7539E1771F23B25A006B2DF2 /* video_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, @@ -1056,6 +1055,7 @@ 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, + 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp old mode 100755 new mode 100644 index 26a148299..798ed8e8d --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -51,7 +51,7 @@ #include /* alloca() */ #endif -#include +#include "cpu_emulation.h" #include "main.h" #include "adb.h" #include "macos_util.h" @@ -87,8 +87,6 @@ static int display_type = DISPLAY_WINDOW; // See enum above // Constants #ifdef WIN32 const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; -#elif __MACOSX__ -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; #endif @@ -129,18 +127,12 @@ static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms static int keycode_table[256]; // X keycode -> Mac keycode translation table // SDL variables -SDL_Window * sdl_window = NULL; // Wraps an OS-native window -static SDL_Surface * host_surface = NULL; // Surface in host-OS display format -static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format -static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer -static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) -static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor -static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table +static SDL_Cursor *sdl_cursor; // Copy of Mac cursor +static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors static bool toggle_fullscreen = false; -static bool did_add_event_watch = false; +static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; static bool mouse_grabbed = false; @@ -166,10 +158,6 @@ static void (*video_refresh)(void); // Prototypes static int redraw_func(void *arg); -static int update_sdl_video(); -static int present_sdl_video(); -static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); -static bool is_fullscreen(SDL_Window *); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -181,7 +169,7 @@ extern void SysMountFirstFloppy(void); #ifdef ENABLE_VOSF #define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ + if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ the_host_buffer = (uint8 *)(SURFACE)->pixels; \ } while (0) #else @@ -207,9 +195,6 @@ extern void SysMountFirstFloppy(void); static void *vm_acquire_framebuffer(uint32 size) { -#if __MACOSX__ - return calloc(1, size); -#else // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { @@ -223,16 +208,11 @@ static void *vm_acquire_framebuffer(uint32 size) if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); return fb; -#endif } static inline void vm_release_framebuffer(void *fb, uint32 size) { -#if __MACOSX__ - free(fb); -#else vm_release(fb, size); -#endif } static inline int get_customized_color_depth(int default_depth) @@ -438,15 +418,25 @@ static int sdl_depth_of_video_depth(int video_depth) // Get screen dimensions static void sdl_display_dimensions(int &width, int &height) { - SDL_DisplayMode desktop_mode; - const int display_index = 0; // TODO: try supporting multiple displays - if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { - // TODO: report a warning, here? - width = height = 0; - return; + static int max_width, max_height; + if (max_width == 0 && max_height == 0) { + max_width = 640 ; max_height = 480; + SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); + if (modes && modes != (SDL_Rect **)-1) { + // It turns out that on some implementations, and contrary to the documentation, + // the returned list is not sorted from largest to smallest (e.g. Windows) + for (int i = 0; modes[i] != NULL; i++) { + const int w = modes[i]->w; + const int h = modes[i]->h; + if (w > max_width && h > max_height) { + max_width = w; + max_height = h; + } + } + } } - width = desktop_mode.w; - height = desktop_mode.h; + width = max_width; + height = max_height; } static inline int sdl_display_width(void) @@ -476,8 +466,10 @@ static bool has_mode(int type, int width, int height, int depth) if (width > sdl_display_width() || height > sdl_display_height()) return false; - // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. - return true; + // Rely on SDL capabilities + return SDL_VideoModeOK(width, height, + sdl_depth_of_video_depth(depth), + SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; } // Add mode to list of supported modes @@ -530,20 +522,18 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati // Set window name and class static void set_window_name(int name) { - if (!sdl_window) { - return; + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + if (vi && vi->wm_available) { + const char *str = GetString(name); + SDL_WM_SetCaption(str, str); } - const char *str = GetString(name); - SDL_SetWindowTitle(sdl_window, str); } // Set mouse grab mode -static void set_grab_mode(bool grab) +static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) { - if (!sdl_window) { - return; - } - SDL_SetWindowGrab(sdl_window, grab ? SDL_TRUE : SDL_FALSE); + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); } // Migrate preferences items (XXX to be handled in MigratePrefs()) @@ -647,256 +637,11 @@ driver_base::driver_base(SDL_monitor_desc &m) the_buffer_copy = NULL; } -static void delete_sdl_video_surfaces() -{ - if (sdl_texture) { - SDL_DestroyTexture(sdl_texture); - sdl_texture = NULL; - } - - if (host_surface) { - if (host_surface == guest_surface) { - guest_surface = NULL; - } - - SDL_FreeSurface(host_surface); - host_surface = NULL; - } - - if (guest_surface) { - SDL_FreeSurface(guest_surface); - guest_surface = NULL; - } -} - -static void delete_sdl_video_window() -{ - if (sdl_renderer) { - SDL_DestroyRenderer(sdl_renderer); - sdl_renderer = NULL; - } - - if (sdl_window) { - SDL_DestroyWindow(sdl_window); - sdl_window = NULL; - } -} - -static void shutdown_sdl_video() -{ - delete_sdl_video_surfaces(); - delete_sdl_video_window(); -} - -static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) -{ - if (guest_surface) { - delete_sdl_video_surfaces(); - } - - int window_width = width; - int window_height = height; - Uint32 window_flags = 0; - const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; - - if (flags & SDL_WINDOW_FULLSCREEN) { - SDL_DisplayMode desktop_mode; - if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { - shutdown_sdl_video(); - return NULL; - } - window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; - window_width = desktop_mode.w; - window_height = desktop_mode.h; - } - - if (sdl_window) { - int old_window_width, old_window_height, old_window_flags; - SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); - old_window_flags = SDL_GetWindowFlags(sdl_window); - if (old_window_width != window_width || - old_window_height != window_height || - (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) - { - delete_sdl_video_window(); - } - } - - // Apply anti-aliasing, if and when appropriate (usually in fullscreen) - SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); - - // Always use a resize-able window. This helps allow SDL to manage - // transitions involving fullscreen to or from windowed-mode. - window_flags |= SDL_WINDOW_RESIZABLE; - - if (!sdl_window) { - sdl_window = SDL_CreateWindow( - "Basilisk II", - SDL_WINDOWPOS_UNDEFINED, - SDL_WINDOWPOS_UNDEFINED, - window_width, - window_height, - window_flags); - if (!sdl_window) { - shutdown_sdl_video(); - return NULL; - } - } - - // Some SDL events (regarding some native-window events), need processing - // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which - // allows events to be processed as they are generated. - if (!did_add_event_watch) { - SDL_AddEventWatch(&on_sdl_event_generated, NULL); - did_add_event_watch = true; - } - - if (!sdl_renderer) { - sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); - if (!sdl_renderer) { - shutdown_sdl_video(); - return NULL; - } - sdl_renderer_thread_id = SDL_ThreadID(); - } - - SDL_assert(sdl_texture == NULL); - sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, width, height); - if (!sdl_texture) { - shutdown_sdl_video(); - return NULL; - } - - SDL_assert(guest_surface == NULL); - SDL_assert(host_surface == NULL); - switch (bpp) { - case 8: - guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); - break; - case 16: - guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); - break; - case 32: - guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); - host_surface = guest_surface; - break; - default: - printf("WARNING: An unsupported bpp of %d was used\n", bpp); - break; - } - if (!guest_surface) { - shutdown_sdl_video(); - return NULL; - } - - if (!host_surface) { - Uint32 texture_format; - if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { - printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - int bpp; - Uint32 Rmask, Gmask, Bmask, Amask; - if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { - printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); - if (!host_surface) { - printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - } - - if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { - printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", - width, height, SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - return guest_surface; -} - -static int present_sdl_video() -{ - if (!sdl_renderer || !sdl_texture || !guest_surface) { - printf("WARNING: A video mode does not appear to have been set.\n"); - return -1; - } - - // Some systems, such as D3D9, can fail if and when they are used across - // certain operations. To address this, only utilize SDL_Renderer in a - // single thread, preferably the main thread. - // - // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 - // "BasiliskII, Win32: resizing a window does not stretch " - SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); - - // Make sure the display's internal (to SDL, possibly the OS) buffer gets - // cleared. Not doing so can, if and when letterboxing is applied (whereby - // colored bars are drawn on the screen's sides to help with aspect-ratio - // correction), the colored bars can be an unknown color. - SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black - SDL_RenderClear(sdl_renderer); // Clear the display - - if (host_surface != guest_surface && - host_surface != NULL && - guest_surface != NULL) - { - SDL_Rect destRect = {0, 0, host_surface->w, host_surface->h}; - if (SDL_BlitSurface(guest_surface, NULL, host_surface, &destRect) != 0) { - return -1; - } - } - - if (SDL_UpdateTexture(sdl_texture, NULL, host_surface->pixels, host_surface->pitch) != 0) { - return -1; - } - - SDL_Rect src_rect = {0, 0, host_surface->w, host_surface->h}; - if (SDL_RenderCopy(sdl_renderer, sdl_texture, &src_rect, NULL) != 0) { - return -1; - } - - SDL_RenderPresent(sdl_renderer); - - return 0; -} - -static int update_sdl_video() -{ - // HACK, dludwig@pobox.com: for now, just update the whole screen, via - // VideoInterrupt(), which gets called on the main thread. - // - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - // - // TODO: cache rects to update, then use rects in present_sdl_video() - return 0; -} - -static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) -{ - // HACK, dludwig@pobox.com: for now, just update the whole screen, via - // VideoInterrupt(), which gets called on the main thread. - // - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - // - // TODO: cache rects to update, then use rects in present_sdl_video() - return 0; -} - void driver_base::set_video_mode(int flags) { int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) + if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, + SDL_HWSURFACE | flags)) == NULL) return; #ifdef ENABLE_VOSF the_host_buffer = (uint8 *)s->pixels; @@ -905,7 +650,7 @@ void driver_base::set_video_mode(int flags) void driver_base::init() { - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); int aligned_height = (VIDEO_MODE_Y + 15) & ~15; #ifdef ENABLE_VOSF @@ -992,14 +737,8 @@ driver_base::~driver_base() ungrab_mouse(); restore_mouse_accel(); - // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather - // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby - // OSX hosts, when in fullscreen, will, on a guest OS resolution change, - // do a series of switches (using OSX's "Spaces" feature) to and from - // the Basilisk II desktop, - delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture - //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to - // instances of SDL_Surface and SDL_Texture. + if (s) + SDL_FreeSurface(s); // the_buffer shall always be mapped through vm_acquire_framebuffer() if (the_buffer != VM_MAP_FAILED) { @@ -1036,9 +775,8 @@ void driver_base::update_palette(void) { const VIDEO_MODE &mode = monitor.get_current_mode(); - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { - SDL_SetSurfacePalette(s, sdl_palette); - } + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) + SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); } // Disable mouse acceleration @@ -1060,24 +798,16 @@ void driver_base::toggle_mouse_grab(void) grab_mouse(); } -static void update_mouse_grab() -{ - if (mouse_grabbed) { - SDL_SetRelativeMouseMode(SDL_TRUE); - } else { - SDL_SetRelativeMouseMode(SDL_FALSE); - } -} - // Grab mouse, switch to relative mouse mode void driver_base::grab_mouse(void) { if (!mouse_grabbed) { - mouse_grabbed = true; - update_mouse_grab(); - set_window_name(STR_WINDOW_TITLE_GRABBED); - disable_mouse_accel(); - ADBSetRelMouseMode(true); + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); + if (new_mode == SDL_GRAB_ON) { + set_window_name(STR_WINDOW_TITLE_GRABBED); + disable_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = true); + } } } @@ -1085,11 +815,12 @@ void driver_base::grab_mouse(void) void driver_base::ungrab_mouse(void) { if (mouse_grabbed) { - mouse_grabbed = false; - update_mouse_grab(); - set_window_name(STR_WINDOW_TITLE); - restore_mouse_accel(); - ADBSetRelMouseMode(false); + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); + if (new_mode == SDL_GRAB_OFF) { + set_window_name(STR_WINDOW_TITLE); + restore_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = false); + } } } @@ -1120,7 +851,8 @@ static void keycode_init(void) keycode_table[i] = -1; // Search for server vendor string, then read keycodes - const char * video_driver = SDL_GetCurrentVideoDriver(); + char video_driver[256]; + SDL_VideoDriverName(video_driver, sizeof(video_driver)); bool video_driver_found = false; char line[256]; int n_keys = 0; @@ -1153,7 +885,7 @@ static void keycode_init(void) static const char sdl_str[] = "sdl"; if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { char *p = line + sizeof(sdl_str); - if (video_driver && strstr(video_driver, p) == video_driver) + if (strstr(video_driver, p) == video_driver) video_driver_found = true; } } @@ -1166,12 +898,12 @@ static void keycode_init(void) // Vendor not found? Then display warning if (!video_driver_found) { char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); WarningAlert(str); return; } - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); } } @@ -1212,7 +944,7 @@ bool SDL_monitor_desc::video_open(void) // Start redraw/input thread #ifndef USE_CPU_EMUL_SERVICES redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); if (!redraw_thread_active) { printf("FATAL: cannot create redraw thread\n"); return false; @@ -1290,11 +1022,7 @@ bool VideoInit(bool classic) default_height = sdl_display_height(); // Mac screen depth follows X depth - screen_depth = 32; - SDL_DisplayMode desktop_mode; - if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { - screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); - } + screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; int default_depth; switch (screen_depth) { case 8: @@ -1351,6 +1079,8 @@ bool VideoInit(bool classic) const int h = video_modes[i].h; if (i > 0 && (w >= default_width || h >= default_height)) continue; + if (w == 512 && h == 384) + continue; for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); } @@ -1490,18 +1220,18 @@ static void do_toggle_fullscreen(void) while (!thread_stop_ack) ; #endif - // Apply fullscreen - if (sdl_window) { - if (display_type == DISPLAY_SCREEN) { - display_type = DISPLAY_WINDOW; - SDL_SetWindowFullscreen(sdl_window, 0); - } else { - display_type = DISPLAY_SCREEN; - SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); - } - } + // save the mouse position + int x, y; + SDL_GetMouseState(&x, &y); + + // save the screen contents + SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, + drv->s->flags); // switch modes + display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW + : DISPLAY_SCREEN; + drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); drv->adapt_to_video_mode(); // reset the palette @@ -1510,12 +1240,20 @@ static void do_toggle_fullscreen(void) #endif drv->update_palette(); + // restore the screen contents + SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); + SDL_FreeSurface(tmp_surface); + SDL_UpdateRect(drv->s, 0, 0, 0, 0); + // reset the video refresh handler VideoRefreshInit(); // while SetVideoMode is happening, control key up may be missed ADBKeyUp(0x36); - + + // restore the mouse position + SDL_WarpMouse(x, y); + // resume redraw thread toggle_fullscreen = false; #ifndef USE_CPU_EMUL_SERVICES @@ -1531,26 +1269,6 @@ static void do_toggle_fullscreen(void) * Execute video VBL routine */ -static bool is_fullscreen(SDL_Window * window) -{ -#ifdef __MACOSX__ - // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always - // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. - // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which - // involves fullscreen/windowed toggles via window-manager UI controls). - // Until it does, or adds a facility to do so, we'll use a platform-specific - // code path to detect fullscreen changes. - extern bool is_fullscreen_osx(SDL_Window * window); - return is_fullscreen_osx(sdl_window); -#else - if (!window) { - return false; - } - const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); - return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; -#endif -} - #ifdef SHEEPSHAVER void VideoVBL(void) { @@ -1560,8 +1278,6 @@ void VideoVBL(void) if (toggle_fullscreen) do_toggle_fullscreen(); - - present_sdl_video(); // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) @@ -1585,8 +1301,6 @@ void VideoInterrupt(void) if (toggle_fullscreen) do_toggle_fullscreen(); - present_sdl_video(); - // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; @@ -1627,12 +1341,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) // Convert colors to XColor array int num_out = 256; bool stretch = false; - - if (!sdl_palette) { - sdl_palette = SDL_AllocPalette(num_out); - } - - SDL_Color *p = sdl_palette->colors; + SDL_Color *p = sdl_palette; for (int i=0; ir = pal[c*3 + 0] * 0x0101; @@ -1735,7 +1444,25 @@ bool video_can_change_cursor(void) if (display_type != DISPLAY_WINDOW) return false; +#if defined(__APPLE__) + static char driver[] = "Quartz?"; + static int quartzok = -1; + + if (quartzok < 0) { + if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) + quartzok = true; + else { + // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. + const SDL_version *vp = SDL_Linked_Version(); + int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); + quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); + } + } + + return quartzok; +#else return true; +#endif } #endif @@ -1770,8 +1497,7 @@ void video_set_cursor(void) if (visible) { int x, y; SDL_GetMouseState(&x, &y); - printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); - SDL_WarpMouseGlobal(x, y); + SDL_WarpMouse(x, y); } } } @@ -1787,25 +1513,27 @@ void video_set_cursor(void) static bool is_modifier_key(SDL_KeyboardEvent const & e) { switch (e.keysym.sym) { - case SDLK_NUMLOCKCLEAR: + case SDLK_NUMLOCK: case SDLK_CAPSLOCK: - case SDLK_SCROLLLOCK: + case SDLK_SCROLLOCK: case SDLK_RSHIFT: case SDLK_LSHIFT: case SDLK_RCTRL: case SDLK_LCTRL: case SDLK_RALT: case SDLK_LALT: - case SDLK_RGUI: - case SDLK_LGUI: + case SDLK_RMETA: + case SDLK_LMETA: + case SDLK_LSUPER: + case SDLK_RSUPER: case SDLK_MODE: - case SDLK_APPLICATION: + case SDLK_COMPOSE: return true; } return false; } -static bool is_ctrl_down(SDL_Keysym const & ks) +static bool is_ctrl_down(SDL_keysym const & ks) { return ctrl_down || (ks.mod & KMOD_CTRL); } @@ -1816,7 +1544,7 @@ static bool is_ctrl_down(SDL_Keysym const & ks) * and -2 if the key was recognized as a hotkey */ -static int kc_decode(SDL_Keysym const & ks, bool key_down) +static int kc_decode(SDL_keysym const & ks, bool key_down) { switch (ks.sym) { case SDLK_a: return 0x00; @@ -1888,17 +1616,19 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) #if (defined(__APPLE__) && defined(__MACH__)) case SDLK_LALT: return 0x3a; case SDLK_RALT: return 0x3a; - case SDLK_LGUI: return 0x37; - case SDLK_RGUI: return 0x37; + case SDLK_LMETA: return 0x37; + case SDLK_RMETA: return 0x37; #else case SDLK_LALT: return 0x37; case SDLK_RALT: return 0x37; - case SDLK_LGUI: return 0x3a; - case SDLK_RGUI: return 0x3a; + case SDLK_LMETA: return 0x3a; + case SDLK_RMETA: return 0x3a; #endif + case SDLK_LSUPER: return 0x3a; // "Windows" key + case SDLK_RSUPER: return 0x3a; case SDLK_MENU: return 0x32; case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCKCLEAR: return 0x47; + case SDLK_NUMLOCK: return 0x47; case SDLK_UP: return 0x3e; case SDLK_DOWN: return 0x3d; @@ -1911,7 +1641,7 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_F2: return 0x78; case SDLK_F3: return 0x63; case SDLK_F4: return 0x76; - case SDLK_F5: return 0x60; + case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; case SDLK_F6: return 0x61; case SDLK_F7: return 0x62; case SDLK_F8: return 0x64; @@ -1920,20 +1650,20 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_F11: return 0x67; case SDLK_F12: return 0x6f; - case SDLK_PRINTSCREEN: return 0x69; - case SDLK_SCROLLLOCK: return 0x6b; + case SDLK_PRINT: return 0x69; + case SDLK_SCROLLOCK: return 0x6b; case SDLK_PAUSE: return 0x71; - case SDLK_KP_0: return 0x52; - case SDLK_KP_1: return 0x53; - case SDLK_KP_2: return 0x54; - case SDLK_KP_3: return 0x55; - case SDLK_KP_4: return 0x56; - case SDLK_KP_5: return 0x57; - case SDLK_KP_6: return 0x58; - case SDLK_KP_7: return 0x59; - case SDLK_KP_8: return 0x5b; - case SDLK_KP_9: return 0x5c; + case SDLK_KP0: return 0x52; + case SDLK_KP1: return 0x53; + case SDLK_KP2: return 0x54; + case SDLK_KP3: return 0x55; + case SDLK_KP4: return 0x56; + case SDLK_KP5: return 0x57; + case SDLK_KP6: return 0x58; + case SDLK_KP7: return 0x59; + case SDLK_KP8: return 0x5b; + case SDLK_KP9: return 0x5c; case SDLK_KP_PERIOD: return 0x41; case SDLK_KP_PLUS: return 0x45; case SDLK_KP_MINUS: return 0x4e; @@ -1973,78 +1703,15 @@ static void force_complete_window_refresh() * SDL event handling */ -// possible return codes for SDL-registered event watches -enum : int { - EVENT_DROP_FROM_QUEUE = 0, - EVENT_ADD_TO_QUEUE = 1 -}; - -// Some events need to be processed in the host-app's main thread, due to -// host-OS requirements. -// -// This function is called by SDL, whenever it generates an SDL_Event. It has -// the ability to process events, and optionally, to prevent them from being -// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) -static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) -{ - switch (event->type) { - case SDL_KEYUP: { - SDL_Keysym const & ks = event->key.keysym; - switch (ks.sym) { - case SDLK_F5: { - if (is_ctrl_down(ks)) { - drv->toggle_mouse_grab(); - return EVENT_DROP_FROM_QUEUE; - } - } break; - } - } break; - - case SDL_WINDOWEVENT: { - switch (event->window.event) { - case SDL_WINDOWEVENT_RESIZED: { - // Handle changes of fullscreen. This is done here, in - // on_sdl_event_generated() and not the main SDL_Event-processing - // loop, in order to perform this change on the main thread. - // (Some os'es UI APIs, such as OSX's NSWindow, are not - // thread-safe.) - const bool is_full = is_fullscreen(sdl_window); - const bool adjust_fullscreen = \ - (display_type == DISPLAY_WINDOW && is_full) || - (display_type == DISPLAY_SCREEN && !is_full); - if (adjust_fullscreen) { - do_toggle_fullscreen(); - -#if __MACOSX__ - // HACK-FIX: on OSX hosts, make sure that the OSX menu - // bar does not show up in fullscreen mode, when the - // cursor is near the top of the screen, lest the - // guest OS' menu bar be obscured. - if (is_full) { - extern void set_menu_bar_visible_osx(bool); - set_menu_bar_visible_osx(false); - } -#endif - } - } break; - } - } break; - } - - return EVENT_ADD_TO_QUEUE; -} - - static void handle_events(void) { SDL_Event events[10]; const int n_max_events = sizeof(events) / sizeof(events[0]); int n_events; - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { for (int i = 0; i < n_events; i++) { - SDL_Event & event = events[i]; - + SDL_Event const & event = events[i]; switch (event.type) { // Mouse button @@ -2143,28 +1810,24 @@ static void handle_events(void) } break; } - - case SDL_WINDOWEVENT: { - switch (event.window.event) { - // Hidden parts exposed, force complete refresh of window - case SDL_WINDOWEVENT_EXPOSED: - force_complete_window_refresh(); - break; - - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - case SDL_WINDOWEVENT_RESTORED: - force_complete_window_refresh(); - break; - - } + + // Hidden parts exposed, force complete refresh of window + case SDL_VIDEOEXPOSE: + force_complete_window_refresh(); break; - } // Window "close" widget clicked case SDL_QUIT: ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); break; + + // Application activate/deactivate + case SDL_ACTIVEEVENT: + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + if (event.active.gain && (event.active.state & SDL_APPACTIVE)) + force_complete_window_refresh(); + break; } } } @@ -2261,7 +1924,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - update_sdl_video(drv->s, x1, y1, wide, high); + SDL_UpdateRect(drv->s, x1, y1, wide, high); } } else { @@ -2317,7 +1980,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - update_sdl_video(drv->s, x1, y1, wide, high); + SDL_UpdateRect(drv->s, x1, y1, wide, high); } } } @@ -2380,8 +2043,8 @@ static void update_display_static_bbox(driver_base *drv) // Refresh display if (nr_boxes) - update_sdl_video(); - } + SDL_UpdateRects(drv->s, nr_boxes, boxes); +} // We suggest the compiler to inline the next two functions so that it diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp new file mode 100755 index 000000000..26a148299 --- /dev/null +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -0,0 +1,2601 @@ +/* + * video_sdl.cpp - Video/graphics emulation, SDL specific stuff + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +/* + * NOTES: + * The Ctrl key works like a qualifier for special actions: + * Ctrl-Tab = suspend DGA mode (TODO) + * Ctrl-Esc = emergency quit + * Ctrl-F1 = mount floppy + * Ctrl-F5 = grab mouse (in windowed mode) + * + * FIXMEs and TODOs: + * - Windows requires an extra mouse event to update the actual cursor image? + * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux + * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) + * - Mouse acceleration, there is no API in SDL yet for that + * - Gamma tables support is likely to be broken here + * - Events processing is bound to the general emulation thread as SDL requires + * to PumpEvents() within the same thread as the one that called SetVideoMode(). + * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. + * - Backport hw cursor acceleration to Basilisk II? + * - Factor out code + */ + +#include "sysdeps.h" + +#include +#include +#include +#include +#include + +#ifdef WIN32 +#include /* alloca() */ +#endif + +#include +#include "main.h" +#include "adb.h" +#include "macos_util.h" +#include "prefs.h" +#include "user_strings.h" +#include "video.h" +#include "video_defs.h" +#include "video_blit.h" +#include "vm_alloc.h" + +#define DEBUG 0 +#include "debug.h" + +// Supported video modes +using std::vector; +static vector VideoModes; + +// Display types +#ifdef SHEEPSHAVER +enum { + DISPLAY_WINDOW = DIS_WINDOW, // windowed display + DISPLAY_SCREEN = DIS_SCREEN // fullscreen display +}; +extern int display_type; // See enum above +#else +enum { + DISPLAY_WINDOW, // windowed display + DISPLAY_SCREEN // fullscreen display +}; +static int display_type = DISPLAY_WINDOW; // See enum above +#endif + +// Constants +#ifdef WIN32 +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#elif __MACOSX__ +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#else +const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +#endif + + +// Global variables +static uint32 frame_skip; // Prefs items +static int16 mouse_wheel_mode; +static int16 mouse_wheel_lines; + +static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) +static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) +static uint32 the_buffer_size; // Size of allocated the_buffer + +static bool redraw_thread_active = false; // Flag: Redraw thread installed +#ifndef USE_CPU_EMUL_SERVICES +static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread +static SDL_Thread *redraw_thread = NULL; // Redraw thread +static volatile bool thread_stop_req = false; +static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req +#endif + +#ifdef ENABLE_VOSF +static bool use_vosf = false; // Flag: VOSF enabled +#else +static const bool use_vosf = false; // VOSF not possible +#endif + +static bool ctrl_down = false; // Flag: Ctrl key pressed +static bool caps_on = false; // Flag: Caps Lock on +static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread +static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread +static bool emul_suspended = false; // Flag: Emulator suspended + +static bool classic_mode = false; // Flag: Classic Mac video mode + +static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms +static int keycode_table[256]; // X keycode -> Mac keycode translation table + +// SDL variables +SDL_Window * sdl_window = NULL; // Wraps an OS-native window +static SDL_Surface * host_surface = NULL; // Surface in host-OS display format +static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format +static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer +static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) +static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to +static int screen_depth; // Depth of current screen +static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor +static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table +static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors +static bool toggle_fullscreen = false; +static bool did_add_event_watch = false; + +static bool mouse_grabbed = false; + +// Mutex to protect SDL events +static SDL_mutex *sdl_events_lock = NULL; +#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) +#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) + +// Mutex to protect palette +static SDL_mutex *sdl_palette_lock = NULL; +#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) +#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) + +// Mutex to protect frame buffer +static SDL_mutex *frame_buffer_lock = NULL; +#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) +#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) + +// Video refresh function +static void VideoRefreshInit(void); +static void (*video_refresh)(void); + + +// Prototypes +static int redraw_func(void *arg); +static int update_sdl_video(); +static int present_sdl_video(); +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); +static bool is_fullscreen(SDL_Window *); + +// From sys_unix.cpp +extern void SysMountFirstFloppy(void); + + +/* + * SDL surface locking glue + */ + +#ifdef ENABLE_VOSF +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ + if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ + the_host_buffer = (uint8 *)(SURFACE)->pixels; \ +} while (0) +#else +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) +#endif + +#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) { \ + SDL_LockSurface(SURFACE); \ + SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ + } \ +} while (0) + +#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) \ + SDL_UnlockSurface(SURFACE); \ +} while (0) + + +/* + * Framebuffer allocation routines + */ + +static void *vm_acquire_framebuffer(uint32 size) +{ +#if __MACOSX__ + return calloc(1, size); +#else + // always try to reallocate framebuffer at the same address + static void *fb = VM_MAP_FAILED; + if (fb != VM_MAP_FAILED) { + if (vm_acquire_fixed(fb, size) < 0) { +#ifndef SHEEPSHAVER + printf("FATAL: Could not reallocate framebuffer at previous address\n"); +#endif + fb = VM_MAP_FAILED; + } + } + if (fb == VM_MAP_FAILED) + fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); + return fb; +#endif +} + +static inline void vm_release_framebuffer(void *fb, uint32 size) +{ +#if __MACOSX__ + free(fb); +#else + vm_release(fb, size); +#endif +} + +static inline int get_customized_color_depth(int default_depth) +{ + int display_color_depth = PrefsFindInt32("displaycolordepth"); + + D(bug("Get displaycolordepth %d\n", display_color_depth)); + + if(0 == display_color_depth) + return default_depth; + else{ + switch (display_color_depth) { + case 8: + return VIDEO_DEPTH_8BIT; + case 15: case 16: + return VIDEO_DEPTH_16BIT; + case 24: case 32: + return VIDEO_DEPTH_32BIT; + default: + return default_depth; + } + } +} + +/* + * Windows message handler + */ + +#ifdef WIN32 +#include +static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL + +extern void SysMediaArrived(void); +extern void SysMediaRemoved(void); +extern HWND GetMainWindowHandle(void); + +static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) +{ + switch (msg) { + case WM_DEVICECHANGE: + if (wParam == DBT_DEVICEREMOVECOMPLETE) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaRemoved(); + } + else if (wParam == DBT_DEVICEARRIVAL) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaArrived(); + } + return 0; + + default: + if (sdl_window_proc) + return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); + } + + return DefWindowProc(hwnd, msg, wParam, lParam); +} +#endif + + +/* + * SheepShaver glue + */ + +#ifdef SHEEPSHAVER +// Color depth modes type +typedef int video_depth; + +// 1, 2, 4 and 8 bit depths use a color palette +static inline bool IsDirectMode(VIDEO_MODE const & mode) +{ + return IsDirectMode(mode.viAppleMode); +} + +// Abstract base class representing one (possibly virtual) monitor +// ("monitor" = rectangular display with a contiguous frame buffer) +class monitor_desc { +public: + monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} + virtual ~monitor_desc() {} + + // Get current Mac frame buffer base address + uint32 get_mac_frame_base(void) const {return screen_base;} + + // Set Mac frame buffer base address (called from switch_to_mode()) + void set_mac_frame_base(uint32 base) {screen_base = base;} + + // Get current video mode + const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} + + // Called by the video driver to switch the video mode on this display + // (must call set_mac_frame_base()) + virtual void switch_to_current_mode(void) = 0; + + // Called by the video driver to set the color palette (in indexed modes) + // or the gamma table (in direct modes) + virtual void set_palette(uint8 *pal, int num) = 0; +}; + +// Vector of pointers to available monitor descriptions, filled by VideoInit() +static vector VideoMonitors; + +// Find Apple mode matching best specified dimensions +static int find_apple_resolution(int xsize, int ysize) +{ + if (xsize == 640 && ysize == 480) + return APPLE_640x480; + if (xsize == 800 && ysize == 600) + return APPLE_800x600; + if (xsize == 1024 && ysize == 768) + return APPLE_1024x768; + if (xsize == 1152 && ysize == 768) + return APPLE_1152x768; + if (xsize == 1152 && ysize == 900) + return APPLE_1152x900; + if (xsize == 1280 && ysize == 1024) + return APPLE_1280x1024; + if (xsize == 1600 && ysize == 1200) + return APPLE_1600x1200; + return APPLE_CUSTOM; +} + +// Display error alert +static void ErrorAlert(int error) +{ + ErrorAlert(GetString(error)); +} +#endif + + +/* + * monitor_desc subclass for SDL display + */ + +class SDL_monitor_desc : public monitor_desc { +public: + SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} + ~SDL_monitor_desc() {} + + virtual void switch_to_current_mode(void); + virtual void set_palette(uint8 *pal, int num); + + bool video_open(void); + void video_close(void); +}; + + +/* + * Utility functions + */ + +// Find palette size for given color depth +static int palette_size(int mode) +{ + switch (mode) { + case VIDEO_DEPTH_1BIT: return 2; + case VIDEO_DEPTH_2BIT: return 4; + case VIDEO_DEPTH_4BIT: return 16; + case VIDEO_DEPTH_8BIT: return 256; + case VIDEO_DEPTH_16BIT: return 32; + case VIDEO_DEPTH_32BIT: return 256; + default: return 0; + } +} + +// Map video_mode depth ID to numerical depth value +static int mac_depth_of_video_depth(int video_depth) +{ + int depth = -1; + switch (video_depth) { + case VIDEO_DEPTH_1BIT: + depth = 1; + break; + case VIDEO_DEPTH_2BIT: + depth = 2; + break; + case VIDEO_DEPTH_4BIT: + depth = 4; + break; + case VIDEO_DEPTH_8BIT: + depth = 8; + break; + case VIDEO_DEPTH_16BIT: + depth = 16; + break; + case VIDEO_DEPTH_32BIT: + depth = 32; + break; + default: + abort(); + } + return depth; +} + +// Map video_mode depth ID to SDL screen depth +static int sdl_depth_of_video_depth(int video_depth) +{ + return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); +} + +// Get screen dimensions +static void sdl_display_dimensions(int &width, int &height) +{ + SDL_DisplayMode desktop_mode; + const int display_index = 0; // TODO: try supporting multiple displays + if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { + // TODO: report a warning, here? + width = height = 0; + return; + } + width = desktop_mode.w; + height = desktop_mode.h; +} + +static inline int sdl_display_width(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return width; +} + +static inline int sdl_display_height(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return height; +} + +// Check wether specified mode is available +static bool has_mode(int type, int width, int height, int depth) +{ +#ifdef SHEEPSHAVER + // Filter out Classic resolutions + if (width == 512 && height == 384) + return false; +#endif + + // Filter out out-of-bounds resolutions + if (width > sdl_display_width() || height > sdl_display_height()) + return false; + + // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. + return true; +} + +// Add mode to list of supported modes +static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) +{ + // Filter out unsupported modes + if (!has_mode(type, width, height, depth)) + return; + + // Fill in VideoMode entry + VIDEO_MODE mode; +#ifdef SHEEPSHAVER + resolution_id = find_apple_resolution(width, height); + mode.viType = type; +#endif + VIDEO_MODE_X = width; + VIDEO_MODE_Y = height; + VIDEO_MODE_RESOLUTION = resolution_id; + VIDEO_MODE_ROW_BYTES = bytes_per_row; + VIDEO_MODE_DEPTH = (video_depth)depth; + VideoModes.push_back(mode); +} + +// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + int layout = FLAYOUT_DIRECT; + if (depth == VIDEO_DEPTH_16BIT) + layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; + else if (depth == VIDEO_DEPTH_32BIT) + layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; + if (native_byte_order) + MacFrameLayout = layout; + else + MacFrameLayout = FLAYOUT_DIRECT; + monitor.set_mac_frame_base(MacFrameBaseMac); + + // Set variables used by UAE memory banking + const VIDEO_MODE &mode = monitor.get_current_mode(); + MacFrameBaseHost = the_buffer; + MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + InitFrameBufferMapping(); +#else + monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); +#endif + D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); +} + +// Set window name and class +static void set_window_name(int name) +{ + if (!sdl_window) { + return; + } + const char *str = GetString(name); + SDL_SetWindowTitle(sdl_window, str); +} + +// Set mouse grab mode +static void set_grab_mode(bool grab) +{ + if (!sdl_window) { + return; + } + SDL_SetWindowGrab(sdl_window, grab ? SDL_TRUE : SDL_FALSE); +} + +// Migrate preferences items (XXX to be handled in MigratePrefs()) +static void migrate_screen_prefs(void) +{ +#ifdef SHEEPSHAVER + // Look-up priorities are: "screen", "screenmodes", "windowmodes". + if (PrefsFindString("screen")) + return; + + uint32 window_modes = PrefsFindInt32("windowmodes"); + uint32 screen_modes = PrefsFindInt32("screenmodes"); + int width = 0, height = 0; + if (screen_modes) { + static const struct { + int id; + int width; + int height; + } + modes[] = { + { 1, 640, 480 }, + { 2, 800, 600 }, + { 4, 1024, 768 }, + { 64, 1152, 768 }, + { 8, 1152, 900 }, + { 16, 1280, 1024 }, + { 32, 1600, 1200 }, + { 0, } + }; + for (int i = 0; modes[i].id != 0; i++) { + if (screen_modes & modes[i].id) { + if (width < modes[i].width && height < modes[i].height) { + width = modes[i].width; + height = modes[i].height; + } + } + } + } else { + if (window_modes & 1) + width = 640, height = 480; + if (window_modes & 2) + width = 800, height = 600; + } + if (width && height) { + char str[32]; + sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); + PrefsReplaceString("screen", str); + } +#endif +} + + +/* + * Display "driver" classes + */ + +class driver_base { +public: + driver_base(SDL_monitor_desc &m); + ~driver_base(); + + void init(); // One-time init + void set_video_mode(int flags); + void adapt_to_video_mode(); + + void update_palette(void); + void suspend(void) {} + void resume(void) {} + void toggle_mouse_grab(void); + void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } + + void disable_mouse_accel(void); + void restore_mouse_accel(void); + + void grab_mouse(void); + void ungrab_mouse(void); + +public: + SDL_monitor_desc &monitor; // Associated video monitor + const VIDEO_MODE &mode; // Video mode handled by the driver + + bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) + SDL_Surface *s; // The surface we draw into +}; + +#ifdef ENABLE_VOSF +static void update_display_window_vosf(driver_base *drv); +#endif +static void update_display_static(driver_base *drv); + +static driver_base *drv = NULL; // Pointer to currently used driver object + +#ifdef ENABLE_VOSF +# include "video_vosf.h" +#endif + +driver_base::driver_base(SDL_monitor_desc &m) + : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) +{ + the_buffer = NULL; + the_buffer_copy = NULL; +} + +static void delete_sdl_video_surfaces() +{ + if (sdl_texture) { + SDL_DestroyTexture(sdl_texture); + sdl_texture = NULL; + } + + if (host_surface) { + if (host_surface == guest_surface) { + guest_surface = NULL; + } + + SDL_FreeSurface(host_surface); + host_surface = NULL; + } + + if (guest_surface) { + SDL_FreeSurface(guest_surface); + guest_surface = NULL; + } +} + +static void delete_sdl_video_window() +{ + if (sdl_renderer) { + SDL_DestroyRenderer(sdl_renderer); + sdl_renderer = NULL; + } + + if (sdl_window) { + SDL_DestroyWindow(sdl_window); + sdl_window = NULL; + } +} + +static void shutdown_sdl_video() +{ + delete_sdl_video_surfaces(); + delete_sdl_video_window(); +} + +static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) +{ + if (guest_surface) { + delete_sdl_video_surfaces(); + } + + int window_width = width; + int window_height = height; + Uint32 window_flags = 0; + const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; + + if (flags & SDL_WINDOW_FULLSCREEN) { + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { + shutdown_sdl_video(); + return NULL; + } + window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; + window_width = desktop_mode.w; + window_height = desktop_mode.h; + } + + if (sdl_window) { + int old_window_width, old_window_height, old_window_flags; + SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); + old_window_flags = SDL_GetWindowFlags(sdl_window); + if (old_window_width != window_width || + old_window_height != window_height || + (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) + { + delete_sdl_video_window(); + } + } + + // Apply anti-aliasing, if and when appropriate (usually in fullscreen) + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); + + // Always use a resize-able window. This helps allow SDL to manage + // transitions involving fullscreen to or from windowed-mode. + window_flags |= SDL_WINDOW_RESIZABLE; + + if (!sdl_window) { + sdl_window = SDL_CreateWindow( + "Basilisk II", + SDL_WINDOWPOS_UNDEFINED, + SDL_WINDOWPOS_UNDEFINED, + window_width, + window_height, + window_flags); + if (!sdl_window) { + shutdown_sdl_video(); + return NULL; + } + } + + // Some SDL events (regarding some native-window events), need processing + // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which + // allows events to be processed as they are generated. + if (!did_add_event_watch) { + SDL_AddEventWatch(&on_sdl_event_generated, NULL); + did_add_event_watch = true; + } + + if (!sdl_renderer) { + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); + if (!sdl_renderer) { + shutdown_sdl_video(); + return NULL; + } + sdl_renderer_thread_id = SDL_ThreadID(); + } + + SDL_assert(sdl_texture == NULL); + sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, width, height); + if (!sdl_texture) { + shutdown_sdl_video(); + return NULL; + } + + SDL_assert(guest_surface == NULL); + SDL_assert(host_surface == NULL); + switch (bpp) { + case 8: + guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); + break; + case 16: + guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); + break; + case 32: + guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + host_surface = guest_surface; + break; + default: + printf("WARNING: An unsupported bpp of %d was used\n", bpp); + break; + } + if (!guest_surface) { + shutdown_sdl_video(); + return NULL; + } + + if (!host_surface) { + Uint32 texture_format; + if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { + printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + int bpp; + Uint32 Rmask, Gmask, Bmask, Amask; + if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { + printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); + if (!host_surface) { + printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + } + + if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { + printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", + width, height, SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + return guest_surface; +} + +static int present_sdl_video() +{ + if (!sdl_renderer || !sdl_texture || !guest_surface) { + printf("WARNING: A video mode does not appear to have been set.\n"); + return -1; + } + + // Some systems, such as D3D9, can fail if and when they are used across + // certain operations. To address this, only utilize SDL_Renderer in a + // single thread, preferably the main thread. + // + // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 + // "BasiliskII, Win32: resizing a window does not stretch " + SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); + + // Make sure the display's internal (to SDL, possibly the OS) buffer gets + // cleared. Not doing so can, if and when letterboxing is applied (whereby + // colored bars are drawn on the screen's sides to help with aspect-ratio + // correction), the colored bars can be an unknown color. + SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black + SDL_RenderClear(sdl_renderer); // Clear the display + + if (host_surface != guest_surface && + host_surface != NULL && + guest_surface != NULL) + { + SDL_Rect destRect = {0, 0, host_surface->w, host_surface->h}; + if (SDL_BlitSurface(guest_surface, NULL, host_surface, &destRect) != 0) { + return -1; + } + } + + if (SDL_UpdateTexture(sdl_texture, NULL, host_surface->pixels, host_surface->pitch) != 0) { + return -1; + } + + SDL_Rect src_rect = {0, 0, host_surface->w, host_surface->h}; + if (SDL_RenderCopy(sdl_renderer, sdl_texture, &src_rect, NULL) != 0) { + return -1; + } + + SDL_RenderPresent(sdl_renderer); + + return 0; +} + +static int update_sdl_video() +{ + // HACK, dludwig@pobox.com: for now, just update the whole screen, via + // VideoInterrupt(), which gets called on the main thread. + // + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + // + // TODO: cache rects to update, then use rects in present_sdl_video() + return 0; +} + +static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) +{ + // HACK, dludwig@pobox.com: for now, just update the whole screen, via + // VideoInterrupt(), which gets called on the main thread. + // + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + // + // TODO: cache rects to update, then use rects in present_sdl_video() + return 0; +} + +void driver_base::set_video_mode(int flags) +{ + int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) + return; +#ifdef ENABLE_VOSF + the_host_buffer = (uint8 *)s->pixels; +#endif +} + +void driver_base::init() +{ + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); + int aligned_height = (VIDEO_MODE_Y + 15) & ~15; + +#ifdef ENABLE_VOSF + use_vosf = true; + // Allocate memory for frame buffer (SIZE is extended to page-boundary) + the_buffer_size = page_extend((aligned_height + 2) * s->pitch); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + the_buffer_copy = (uint8 *)malloc(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + + // Check whether we can initialize the VOSF subsystem and it's profitable + if (!video_vosf_init(monitor)) { + WarningAlert(GetString(STR_VOSF_INIT_ERR)); + use_vosf = false; + } + else if (!video_vosf_profitable()) { + video_vosf_exit(); + printf("VOSF acceleration is not profitable on this platform, disabling it\n"); + use_vosf = false; + } + if (!use_vosf) { + free(the_buffer_copy); + vm_release(the_buffer, the_buffer_size); + the_host_buffer = NULL; + } +#endif + if (!use_vosf) { + // Allocate memory for frame buffer + the_buffer_size = (aligned_height + 2) * s->pitch; + the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); + } + + // Set frame buffer base + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); + + adapt_to_video_mode(); +} + +void driver_base::adapt_to_video_mode() { + ADBSetRelMouseMode(mouse_grabbed); + + // Init blitting routines + SDL_PixelFormat *f = s->format; + VisualFormat visualFormat; + visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + visualFormat.Rmask = f->Rmask; + visualFormat.Gmask = f->Gmask; + visualFormat.Bmask = f->Bmask; + Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); + + // Load gray ramp to 8->16/32 expand map + if (!IsDirectMode(mode)) + for (int i=0; i<256; i++) + ExpandMap[i] = SDL_MapRGB(f, i, i, i); + + + bool hardware_cursor = false; +#ifdef SHEEPSHAVER + hardware_cursor = video_can_change_cursor(); + if (hardware_cursor) { + // Create cursor + if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { + SDL_SetCursor(sdl_cursor); + } + } + // Tell the video driver there's a change in cursor type + if (private_data) + private_data->cursorHardware = hardware_cursor; +#endif + // Hide cursor + SDL_ShowCursor(hardware_cursor); + + // Set window name/class + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + + // Everything went well + init_ok = true; +} + +driver_base::~driver_base() +{ + ungrab_mouse(); + restore_mouse_accel(); + + // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather + // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby + // OSX hosts, when in fullscreen, will, on a guest OS resolution change, + // do a series of switches (using OSX's "Spaces" feature) to and from + // the Basilisk II desktop, + delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture + //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to + // instances of SDL_Surface and SDL_Texture. + + // the_buffer shall always be mapped through vm_acquire_framebuffer() + if (the_buffer != VM_MAP_FAILED) { + D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); + vm_release_framebuffer(the_buffer, the_buffer_size); + the_buffer = NULL; + } + + // Free frame buffer(s) + if (!use_vosf) { + if (the_buffer_copy) { + free(the_buffer_copy); + the_buffer_copy = NULL; + } + } +#ifdef ENABLE_VOSF + else { + if (the_buffer_copy) { + D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); + free(the_buffer_copy); + the_buffer_copy = NULL; + } + + // Deinitialize VOSF + video_vosf_exit(); + } +#endif + + SDL_ShowCursor(1); +} + +// Palette has changed +void driver_base::update_palette(void) +{ + const VIDEO_MODE &mode = monitor.get_current_mode(); + + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { + SDL_SetSurfacePalette(s, sdl_palette); + } +} + +// Disable mouse acceleration +void driver_base::disable_mouse_accel(void) +{ +} + +// Restore mouse acceleration to original value +void driver_base::restore_mouse_accel(void) +{ +} + +// Toggle mouse grab +void driver_base::toggle_mouse_grab(void) +{ + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); +} + +static void update_mouse_grab() +{ + if (mouse_grabbed) { + SDL_SetRelativeMouseMode(SDL_TRUE); + } else { + SDL_SetRelativeMouseMode(SDL_FALSE); + } +} + +// Grab mouse, switch to relative mouse mode +void driver_base::grab_mouse(void) +{ + if (!mouse_grabbed) { + mouse_grabbed = true; + update_mouse_grab(); + set_window_name(STR_WINDOW_TITLE_GRABBED); + disable_mouse_accel(); + ADBSetRelMouseMode(true); + } +} + +// Ungrab mouse, switch to absolute mouse mode +void driver_base::ungrab_mouse(void) +{ + if (mouse_grabbed) { + mouse_grabbed = false; + update_mouse_grab(); + set_window_name(STR_WINDOW_TITLE); + restore_mouse_accel(); + ADBSetRelMouseMode(false); + } +} + +/* + * Initialization + */ + +// Init keycode translation table +static void keycode_init(void) +{ + bool use_kc = PrefsFindBool("keycodes"); + if (use_kc) { + + // Get keycode file path from preferences + const char *kc_path = PrefsFindString("keycodefile"); + + // Open keycode table + FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + if (f == NULL) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); + WarningAlert(str); + return; + } + + // Default translation table + for (int i=0; i<256; i++) + keycode_table[i] = -1; + + // Search for server vendor string, then read keycodes + const char * video_driver = SDL_GetCurrentVideoDriver(); + bool video_driver_found = false; + char line[256]; + int n_keys = 0; + while (fgets(line, sizeof(line) - 1, f)) { + // Read line + int len = strlen(line); + if (len == 0) + continue; + line[len-1] = 0; + + // Comments begin with "#" or ";" + if (line[0] == '#' || line[0] == ';' || line[0] == 0) + continue; + + if (video_driver_found) { + // Skip aliases as long as we have read keycodes yet + // Otherwise, it's another mapping and we have to stop + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) + continue; + + // Read keycode + int x_code, mac_code; + if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) + keycode_table[x_code & 0xff] = mac_code, n_keys++; + else + break; + } else { + // Search for SDL video driver string + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { + char *p = line + sizeof(sdl_str); + if (video_driver && strstr(video_driver, p) == video_driver) + video_driver_found = true; + } + } + } + + // Keycode file completely read + fclose(f); + use_keycodes = video_driver_found; + + // Vendor not found? Then display warning + if (!video_driver_found) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); + WarningAlert(str); + return; + } + + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); + } +} + +// Open display for current mode +bool SDL_monitor_desc::video_open(void) +{ + D(bug("video_open()\n")); +#if DEBUG + const VIDEO_MODE &mode = get_current_mode(); + D(bug("Current video mode:\n")); + D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); +#endif + + // Create display driver object of requested type + drv = new(std::nothrow) driver_base(*this); + if (drv == NULL) + return false; + drv->init(); + if (!drv->init_ok) { + delete drv; + drv = NULL; + return false; + } + +#ifdef WIN32 + // Chain in a new message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); +#endif + + // Initialize VideoRefresh function + VideoRefreshInit(); + + // Lock down frame buffer + LOCK_FRAME_BUFFER; + + // Start redraw/input thread +#ifndef USE_CPU_EMUL_SERVICES + redraw_thread_cancel = false; + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); + if (!redraw_thread_active) { + printf("FATAL: cannot create redraw thread\n"); + return false; + } +#else + redraw_thread_active = true; +#endif + return true; +} + +#ifdef SHEEPSHAVER +bool VideoInit(void) +{ + const bool classic = false; +#else +bool VideoInit(bool classic) +{ +#endif + classic_mode = classic; + +#ifdef ENABLE_VOSF + // Zero the mainBuffer structure + mainBuffer.dirtyPages = NULL; + mainBuffer.pageInfo = NULL; +#endif + + // Create Mutexes + if ((sdl_events_lock = SDL_CreateMutex()) == NULL) + return false; + if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) + return false; + if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) + return false; + + // Init keycode translation + keycode_init(); + + // Read prefs + frame_skip = PrefsFindInt32("frameskip"); + mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); + mouse_wheel_lines = PrefsFindInt32("mousewheellines"); + + // Get screen mode from preferences + migrate_screen_prefs(); + const char *mode_str = NULL; + if (classic_mode) + mode_str = "win/512/342"; + else + mode_str = PrefsFindString("screen"); + + // Determine display type and default dimensions + int default_width, default_height; + if (classic) { + default_width = 512; + default_height = 384; + } + else { + default_width = 640; + default_height = 480; + } + display_type = DISPLAY_WINDOW; + if (mode_str) { + if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_WINDOW; + else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_SCREEN; + } + if (default_width <= 0) + default_width = sdl_display_width(); + else if (default_width > sdl_display_width()) + default_width = sdl_display_width(); + if (default_height <= 0) + default_height = sdl_display_height(); + else if (default_height > sdl_display_height()) + default_height = sdl_display_height(); + + // Mac screen depth follows X depth + screen_depth = 32; + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { + screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); + } + int default_depth; + switch (screen_depth) { + case 8: + default_depth = VIDEO_DEPTH_8BIT; + break; + case 15: case 16: + default_depth = VIDEO_DEPTH_16BIT; + break; + case 24: case 32: + default_depth = VIDEO_DEPTH_32BIT; + break; + default: + default_depth = VIDEO_DEPTH_1BIT; + break; + } + + // Initialize list of video modes to try + struct { + int w; + int h; + int resolution_id; + } + video_modes[] = { + { -1, -1, 0x80 }, + { 512, 384, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; + video_modes[0].w = default_width; + video_modes[0].h = default_height; + + // Construct list of supported modes + if (display_type == DISPLAY_WINDOW) { + if (classic) + add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); + else { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + } else if (display_type == DISPLAY_SCREEN) { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + + if (VideoModes.empty()) { + ErrorAlert(STR_NO_XVISUAL_ERR); + return false; + } + + // Find requested default mode with specified dimensions + uint32 default_id; + std::vector::const_iterator i, end = VideoModes.end(); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + std::vector::const_iterator begin = VideoModes.begin(); + cur_mode = distance(begin, i); +#endif + break; + } + } + if (i == end) { // not found, use first available mode + const VIDEO_MODE & mode = VideoModes[0]; + default_depth = VIDEO_MODE_DEPTH; + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + cur_mode = 0; +#endif + } + +#ifdef SHEEPSHAVER + for (int i = 0; i < VideoModes.size(); i++) + VModes[i] = VideoModes[i]; + VideoInfo *p = &VModes[VideoModes.size()]; + p->viType = DIS_INVALID; // End marker + p->viRowBytes = 0; + p->viXsize = p->viYsize = 0; + p->viAppleMode = 0; + p->viAppleID = 0; +#endif + +#if DEBUG + D(bug("Available video modes:\n")); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + int bits = 1 << VIDEO_MODE_DEPTH; + if (bits == 16) + bits = 15; + else if (bits == 32) + bits = 24; + D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); + } +#endif + + int color_depth = get_customized_color_depth(default_depth); + + D(bug("Return get_customized_color_depth %d\n", color_depth)); + + // Create SDL_monitor_desc for this (the only) display + SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); + VideoMonitors.push_back(monitor); + + // Open display + return monitor->video_open(); +} + + +/* + * Deinitialization + */ + +// Close display +void SDL_monitor_desc::video_close(void) +{ + D(bug("video_close()\n")); + +#ifdef WIN32 + // Remove message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); +#endif + + // Stop redraw thread +#ifndef USE_CPU_EMUL_SERVICES + if (redraw_thread_active) { + redraw_thread_cancel = true; + SDL_WaitThread(redraw_thread, NULL); + } +#endif + redraw_thread_active = false; + + // Unlock frame buffer + UNLOCK_FRAME_BUFFER; + D(bug(" frame buffer unlocked\n")); + + // Close display + delete drv; + drv = NULL; +} + +void VideoExit(void) +{ + // Close displays + vector::iterator i, end = VideoMonitors.end(); + for (i = VideoMonitors.begin(); i != end; ++i) + dynamic_cast(*i)->video_close(); + + // Destroy locks + if (frame_buffer_lock) + SDL_DestroyMutex(frame_buffer_lock); + if (sdl_palette_lock) + SDL_DestroyMutex(sdl_palette_lock); + if (sdl_events_lock) + SDL_DestroyMutex(sdl_events_lock); +} + + +/* + * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) + */ + +void VideoQuitFullScreen(void) +{ + D(bug("VideoQuitFullScreen()\n")); + quit_full_screen = true; +} + +static void do_toggle_fullscreen(void) +{ +#ifndef USE_CPU_EMUL_SERVICES + // pause redraw thread + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; +#endif + + // Apply fullscreen + if (sdl_window) { + if (display_type == DISPLAY_SCREEN) { + display_type = DISPLAY_WINDOW; + SDL_SetWindowFullscreen(sdl_window, 0); + } else { + display_type = DISPLAY_SCREEN; + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); + } + } + + // switch modes + drv->adapt_to_video_mode(); + + // reset the palette +#ifdef SHEEPSHAVER + video_set_palette(); +#endif + drv->update_palette(); + + // reset the video refresh handler + VideoRefreshInit(); + + // while SetVideoMode is happening, control key up may be missed + ADBKeyUp(0x36); + + // resume redraw thread + toggle_fullscreen = false; +#ifndef USE_CPU_EMUL_SERVICES + thread_stop_req = false; +#endif +} + +/* + * Mac VBL interrupt + */ + +/* + * Execute video VBL routine + */ + +static bool is_fullscreen(SDL_Window * window) +{ +#ifdef __MACOSX__ + // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always + // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. + // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which + // involves fullscreen/windowed toggles via window-manager UI controls). + // Until it does, or adds a facility to do so, we'll use a platform-specific + // code path to detect fullscreen changes. + extern bool is_fullscreen_osx(SDL_Window * window); + return is_fullscreen_osx(sdl_window); +#else + if (!window) { + return false; + } + const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); + return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; +#endif +} + +#ifdef SHEEPSHAVER +void VideoVBL(void) +{ + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + present_sdl_video(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; + + // Execute video VBL + if (private_data != NULL && private_data->interruptsEnabled) + VSLDoInterruptService(private_data->vslServiceID); +} +#else +void VideoInterrupt(void) +{ + // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() + SDL_PumpEvents(); + + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + present_sdl_video(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; +} +#endif + + +/* + * Set palette + */ + +#ifdef SHEEPSHAVER +void video_set_palette(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 pal[256 * 3]; + for (int c = 0; c < n_colors; c++) { + pal[c*3 + 0] = mac_pal[c].red; + pal[c*3 + 1] = mac_pal[c].green; + pal[c*3 + 2] = mac_pal[c].blue; + } + monitor->set_palette(pal, n_colors); +} +#endif + +void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) +{ + const VIDEO_MODE &mode = get_current_mode(); + + // FIXME: how can we handle the gamma ramp? + if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) + return; + + LOCK_PALETTE; + + // Convert colors to XColor array + int num_out = 256; + bool stretch = false; + + if (!sdl_palette) { + sdl_palette = SDL_AllocPalette(num_out); + } + + SDL_Color *p = sdl_palette->colors; + for (int i=0; ir = pal[c*3 + 0] * 0x0101; + p->g = pal[c*3 + 1] * 0x0101; + p->b = pal[c*3 + 2] * 0x0101; + p++; + } + + // Recalculate pixel color expansion map + if (!IsDirectMode(mode)) { + for (int i=0; i<256; i++) { + int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) + ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); + } + +#ifdef ENABLE_VOSF + if (use_vosf) { + // We have to redraw everything because the interpretation of pixel values changed + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + } +#endif + } + + // Tell redraw thread to change palette + sdl_palette_changed = true; + + UNLOCK_PALETTE; +} + + +/* + * Switch video mode + */ + +#ifdef SHEEPSHAVER +int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) +{ + /* return if no mode change */ + if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && + (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; + + /* first find video mode in table */ + for (int i=0; VModes[i].viType != DIS_INVALID; i++) { + if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && + (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { + csSave->saveMode = ReadMacInt16(ParamPtr + csMode); + csSave->saveData = ReadMacInt32(ParamPtr + csData); + csSave->savePage = ReadMacInt16(ParamPtr + csPage); + + // Disable interrupts and pause redraw thread + DisableInterrupt(); + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; + + cur_mode = i; + monitor_desc *monitor = VideoMonitors[0]; + monitor->switch_to_current_mode(); + + WriteMacInt32(ParamPtr + csBaseAddr, screen_base); + csSave->saveBaseAddr=screen_base; + csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ + csSave->saveMode=VModes[cur_mode].viAppleMode; + + // Enable interrupts and resume redraw thread + thread_stop_req = false; + EnableInterrupt(); + return noErr; + } + } + return paramErr; +} +#endif + +void SDL_monitor_desc::switch_to_current_mode(void) +{ + // Close and reopen display + LOCK_EVENTS; + video_close(); + video_open(); + UNLOCK_EVENTS; + + if (drv == NULL) { + ErrorAlert(STR_OPEN_WINDOW_ERR); + QuitEmulator(); + } +} + + +/* + * Can we set the MacOS cursor image into the window? + */ + +#ifdef SHEEPSHAVER +bool video_can_change_cursor(void) +{ + if (display_type != DISPLAY_WINDOW) + return false; + + return true; +} +#endif + + +/* + * Set cursor image for window + */ + +#ifdef SHEEPSHAVER +void video_set_cursor(void) +{ + // Set new cursor image if it was changed + if (sdl_cursor) { + SDL_FreeCursor(sdl_cursor); + sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); + if (sdl_cursor) { + SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); + SDL_SetCursor(sdl_cursor); + + // XXX Windows apparently needs an extra mouse event to + // make the new cursor image visible. + // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the + // mouse, we have to put it back. + bool move = false; +#ifdef WIN32 + move = true; +#elif defined(__APPLE__) + move = mouse_grabbed; +#endif + if (move) { + int visible = SDL_ShowCursor(-1); + if (visible) { + int x, y; + SDL_GetMouseState(&x, &y); + printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); + SDL_WarpMouseGlobal(x, y); + } + } + } + } +} +#endif + + +/* + * Keyboard-related utilify functions + */ + +static bool is_modifier_key(SDL_KeyboardEvent const & e) +{ + switch (e.keysym.sym) { + case SDLK_NUMLOCKCLEAR: + case SDLK_CAPSLOCK: + case SDLK_SCROLLLOCK: + case SDLK_RSHIFT: + case SDLK_LSHIFT: + case SDLK_RCTRL: + case SDLK_LCTRL: + case SDLK_RALT: + case SDLK_LALT: + case SDLK_RGUI: + case SDLK_LGUI: + case SDLK_MODE: + case SDLK_APPLICATION: + return true; + } + return false; +} + +static bool is_ctrl_down(SDL_Keysym const & ks) +{ + return ctrl_down || (ks.mod & KMOD_CTRL); +} + + +/* + * Translate key event to Mac keycode, returns -1 if no keycode was found + * and -2 if the key was recognized as a hotkey + */ + +static int kc_decode(SDL_Keysym const & ks, bool key_down) +{ + switch (ks.sym) { + case SDLK_a: return 0x00; + case SDLK_b: return 0x0b; + case SDLK_c: return 0x08; + case SDLK_d: return 0x02; + case SDLK_e: return 0x0e; + case SDLK_f: return 0x03; + case SDLK_g: return 0x05; + case SDLK_h: return 0x04; + case SDLK_i: return 0x22; + case SDLK_j: return 0x26; + case SDLK_k: return 0x28; + case SDLK_l: return 0x25; + case SDLK_m: return 0x2e; + case SDLK_n: return 0x2d; + case SDLK_o: return 0x1f; + case SDLK_p: return 0x23; + case SDLK_q: return 0x0c; + case SDLK_r: return 0x0f; + case SDLK_s: return 0x01; + case SDLK_t: return 0x11; + case SDLK_u: return 0x20; + case SDLK_v: return 0x09; + case SDLK_w: return 0x0d; + case SDLK_x: return 0x07; + case SDLK_y: return 0x10; + case SDLK_z: return 0x06; + + case SDLK_1: case SDLK_EXCLAIM: return 0x12; + case SDLK_2: case SDLK_AT: return 0x13; + case SDLK_3: case SDLK_HASH: return 0x14; + case SDLK_4: case SDLK_DOLLAR: return 0x15; + case SDLK_5: return 0x17; + case SDLK_6: return 0x16; + case SDLK_7: return 0x1a; + case SDLK_8: return 0x1c; + case SDLK_9: return 0x19; + case SDLK_0: return 0x1d; + + case SDLK_BACKQUOTE: return 0x0a; + case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; + case SDLK_EQUALS: case SDLK_PLUS: return 0x18; + case SDLK_LEFTBRACKET: return 0x21; + case SDLK_RIGHTBRACKET: return 0x1e; + case SDLK_BACKSLASH: return 0x2a; + case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; + case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; + case SDLK_COMMA: case SDLK_LESS: return 0x2b; + case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; + case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; + + case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; + case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_SPACE: return 0x31; + case SDLK_BACKSPACE: return 0x33; + + case SDLK_DELETE: return 0x75; + case SDLK_INSERT: return 0x72; + case SDLK_HOME: case SDLK_HELP: return 0x73; + case SDLK_END: return 0x77; + case SDLK_PAGEUP: return 0x74; + case SDLK_PAGEDOWN: return 0x79; + + case SDLK_LCTRL: return 0x36; + case SDLK_RCTRL: return 0x36; + case SDLK_LSHIFT: return 0x38; + case SDLK_RSHIFT: return 0x38; +#if (defined(__APPLE__) && defined(__MACH__)) + case SDLK_LALT: return 0x3a; + case SDLK_RALT: return 0x3a; + case SDLK_LGUI: return 0x37; + case SDLK_RGUI: return 0x37; +#else + case SDLK_LALT: return 0x37; + case SDLK_RALT: return 0x37; + case SDLK_LGUI: return 0x3a; + case SDLK_RGUI: return 0x3a; +#endif + case SDLK_MENU: return 0x32; + case SDLK_CAPSLOCK: return 0x39; + case SDLK_NUMLOCKCLEAR: return 0x47; + + case SDLK_UP: return 0x3e; + case SDLK_DOWN: return 0x3d; + case SDLK_LEFT: return 0x3b; + case SDLK_RIGHT: return 0x3c; + + case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + + case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F2: return 0x78; + case SDLK_F3: return 0x63; + case SDLK_F4: return 0x76; + case SDLK_F5: return 0x60; + case SDLK_F6: return 0x61; + case SDLK_F7: return 0x62; + case SDLK_F8: return 0x64; + case SDLK_F9: return 0x65; + case SDLK_F10: return 0x6d; + case SDLK_F11: return 0x67; + case SDLK_F12: return 0x6f; + + case SDLK_PRINTSCREEN: return 0x69; + case SDLK_SCROLLLOCK: return 0x6b; + case SDLK_PAUSE: return 0x71; + + case SDLK_KP_0: return 0x52; + case SDLK_KP_1: return 0x53; + case SDLK_KP_2: return 0x54; + case SDLK_KP_3: return 0x55; + case SDLK_KP_4: return 0x56; + case SDLK_KP_5: return 0x57; + case SDLK_KP_6: return 0x58; + case SDLK_KP_7: return 0x59; + case SDLK_KP_8: return 0x5b; + case SDLK_KP_9: return 0x5c; + case SDLK_KP_PERIOD: return 0x41; + case SDLK_KP_PLUS: return 0x45; + case SDLK_KP_MINUS: return 0x4e; + case SDLK_KP_MULTIPLY: return 0x43; + case SDLK_KP_DIVIDE: return 0x4b; + case SDLK_KP_ENTER: return 0x4c; + case SDLK_KP_EQUALS: return 0x51; + } + D(bug("Unhandled SDL keysym: %d\n", ks.sym)); + return -1; +} + +static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) +{ + return kc_decode(ev.keysym, key_down); +} + +static void force_complete_window_refresh() +{ + if (display_type == DISPLAY_WINDOW) { +#ifdef ENABLE_VOSF + if (use_vosf) { // VOSF refresh + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + } +#endif + // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. + const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); + const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + for (int i = 0; i < len; i++) + the_buffer_copy[i] = !the_buffer[i]; + } +} + +/* + * SDL event handling + */ + +// possible return codes for SDL-registered event watches +enum : int { + EVENT_DROP_FROM_QUEUE = 0, + EVENT_ADD_TO_QUEUE = 1 +}; + +// Some events need to be processed in the host-app's main thread, due to +// host-OS requirements. +// +// This function is called by SDL, whenever it generates an SDL_Event. It has +// the ability to process events, and optionally, to prevent them from being +// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) +{ + switch (event->type) { + case SDL_KEYUP: { + SDL_Keysym const & ks = event->key.keysym; + switch (ks.sym) { + case SDLK_F5: { + if (is_ctrl_down(ks)) { + drv->toggle_mouse_grab(); + return EVENT_DROP_FROM_QUEUE; + } + } break; + } + } break; + + case SDL_WINDOWEVENT: { + switch (event->window.event) { + case SDL_WINDOWEVENT_RESIZED: { + // Handle changes of fullscreen. This is done here, in + // on_sdl_event_generated() and not the main SDL_Event-processing + // loop, in order to perform this change on the main thread. + // (Some os'es UI APIs, such as OSX's NSWindow, are not + // thread-safe.) + const bool is_full = is_fullscreen(sdl_window); + const bool adjust_fullscreen = \ + (display_type == DISPLAY_WINDOW && is_full) || + (display_type == DISPLAY_SCREEN && !is_full); + if (adjust_fullscreen) { + do_toggle_fullscreen(); + +#if __MACOSX__ + // HACK-FIX: on OSX hosts, make sure that the OSX menu + // bar does not show up in fullscreen mode, when the + // cursor is near the top of the screen, lest the + // guest OS' menu bar be obscured. + if (is_full) { + extern void set_menu_bar_visible_osx(bool); + set_menu_bar_visible_osx(false); + } +#endif + } + } break; + } + } break; + } + + return EVENT_ADD_TO_QUEUE; +} + + +static void handle_events(void) +{ + SDL_Event events[10]; + const int n_max_events = sizeof(events) / sizeof(events[0]); + int n_events; + + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { + for (int i = 0; i < n_events; i++) { + SDL_Event & event = events[i]; + + switch (event.type) { + + // Mouse button + case SDL_MOUSEBUTTONDOWN: { + unsigned int button = event.button.button; + if (button == SDL_BUTTON_LEFT) + ADBMouseDown(0); + else if (button == SDL_BUTTON_RIGHT) + ADBMouseDown(1); + else if (button == SDL_BUTTON_MIDDLE) + ADBMouseDown(2); + else if (button < 6) { // Wheel mouse + if (mouse_wheel_mode == 0) { + int key = (button == 5) ? 0x79 : 0x74; // Page up/down + ADBKeyDown(key); + ADBKeyUp(key); + } else { + int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down + for(int i=0; imouse_moved(event.motion.xrel, event.motion.yrel); + } else { + drv->mouse_moved(event.motion.x, event.motion.y); + } + break; + + // Keyboard + case SDL_KEYDOWN: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, true); + if (code >= 0) { + if (!emul_suspended) { + if (code == 0x39) { // Caps Lock pressed + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyDown(code); + if (code == 0x36) + ctrl_down = true; + } else { + if (code == 0x31) + drv->resume(); // Space wakes us up + } + } + break; + } + case SDL_KEYUP: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, false); + if (code >= 0) { + if (code == 0x39) { // Caps Lock released + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyUp(code); + if (code == 0x36) + ctrl_down = false; + } + break; + } + + case SDL_WINDOWEVENT: { + switch (event.window.event) { + // Hidden parts exposed, force complete refresh of window + case SDL_WINDOWEVENT_EXPOSED: + force_complete_window_refresh(); + break; + + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + case SDL_WINDOWEVENT_RESTORED: + force_complete_window_refresh(); + break; + + } + break; + } + + // Window "close" widget clicked + case SDL_QUIT: + ADBKeyDown(0x7f); // Power key + ADBKeyUp(0x7f); + break; + } + } + } +} + + +/* + * Window display update + */ + +// Static display update (fixed frame rate, but incremental) +static void update_display_static(driver_base *drv) +{ + // Incremental update code + int wide = 0, high = 0; + uint32 x1, x2, y1, y2; + const VIDEO_MODE &mode = drv->mode; + int bytes_per_row = VIDEO_MODE_ROW_BYTES; + uint8 *p, *p2; + + // Check for first line from top and first line from bottom that have changed + y1 = 0; + for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y1 = j; + break; + } + } + y2 = y1 - 1; + for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y2 = j; + break; + } + } + high = y2 - y1 + 1; + + // Check for first column from left and first column from right that have changed + if (high) { + if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { + const int src_bytes_per_row = bytes_per_row; + const int dst_bytes_per_row = drv->s->pitch; + const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; + + x1 = VIDEO_MODE_X / pixels_per_byte; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1; i++) { + if (*p != *p2) { + x1 = i; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { + p--; p2--; + if (*p != *p2) { + x2 = i; + break; + } + } + } + x1 *= pixels_per_byte; + x2 *= pixels_per_byte; + wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); + int di = y1 * dst_bytes_per_row + x1; + for (uint32 j = y1; j <= y2; j++) { + memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); + Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); + si += src_bytes_per_row; + di += dst_bytes_per_row; + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + update_sdl_video(drv->s, x1, y1, wide, high); + } + + } else { + const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; + const int dst_bytes_per_row = drv->s->pitch; + + x1 = VIDEO_MODE_X; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { + if (*p != *p2) { + x1 = i / bytes_per_pixel; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { + p--; + p2--; + if (*p != *p2) { + x2 = i / bytes_per_pixel; + break; + } + } + } + wide = x2 - x1; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + for (uint32 j = y1; j <= y2; j++) { + uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; + int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; + memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); + Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + update_sdl_video(drv->s, x1, y1, wide, high); + } + } + } +} + +// Static display update (fixed frame rate, bounding boxes based) +// XXX use NQD bounding boxes to help detect dirty areas? +static void update_display_static_bbox(driver_base *drv) +{ + const VIDEO_MODE &mode = drv->mode; + + // Allocate bounding boxes for SDL_UpdateRects() + const uint32 N_PIXELS = 64; + const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; + const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; + SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); + uint32 nr_boxes = 0; + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Update the surface from Mac screen + const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; + const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; + const uint32 dst_bytes_per_row = drv->s->pitch; + for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { + uint32 h = N_PIXELS; + if (h > VIDEO_MODE_Y - y) + h = VIDEO_MODE_Y - y; + for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { + uint32 w = N_PIXELS; + if (w > VIDEO_MODE_X - x) + w = VIDEO_MODE_X - x; + const int xs = w * bytes_per_pixel; + const int xb = x * bytes_per_pixel; + bool dirty = false; + for (uint32 j = y; j < (y + h); j++) { + const uint32 yb = j * bytes_per_row; + const uint32 dst_yb = j * dst_bytes_per_row; + if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { + memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); + Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); + dirty = true; + } + } + if (dirty) { + boxes[nr_boxes].x = x; + boxes[nr_boxes].y = y; + boxes[nr_boxes].w = w; + boxes[nr_boxes].h = h; + nr_boxes++; + } + } + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + if (nr_boxes) + update_sdl_video(); + } + + +// We suggest the compiler to inline the next two functions so that it +// may specialise the code according to the current screen depth and +// display type. A clever compiler would do that job by itself though... + +// NOTE: update_display_vosf is inlined too + +static inline void possibly_quit_dga_mode() +{ + // Quit DGA mode if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + delete drv; + drv = NULL; + } +} + +static inline void possibly_ungrab_mouse() +{ + // Ungrab mouse if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + if (drv) + drv->ungrab_mouse(); + } +} + +static inline void handle_palette_changes(void) +{ + LOCK_PALETTE; + + if (sdl_palette_changed) { + sdl_palette_changed = false; + drv->update_palette(); + } + + UNLOCK_PALETTE; +} + +static void video_refresh_window_static(void); + +static void video_refresh_dga(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + video_refresh_window_static(); +} + +#ifdef ENABLE_VOSF +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static void video_refresh_dga_vosf(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_dga_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif + +static void video_refresh_window_vosf(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_window_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif // def ENABLE_VOSF + +static void video_refresh_window_static(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (static variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + const VIDEO_MODE &mode = drv->mode; + if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) + update_display_static_bbox(drv); + else + update_display_static(drv); + } +} + + +/* + * Thread for screen refresh, input handling etc. + */ + +static void VideoRefreshInit(void) +{ + // TODO: set up specialised 8bpp VideoRefresh handlers ? + if (display_type == DISPLAY_SCREEN) { +#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) + if (use_vosf) + video_refresh = video_refresh_dga_vosf; + else +#endif + video_refresh = video_refresh_dga; + } + else { +#ifdef ENABLE_VOSF + if (use_vosf) + video_refresh = video_refresh_window_vosf; + else +#endif + video_refresh = video_refresh_window_static; + } +} + +static inline void do_video_refresh(void) +{ + // Handle SDL events + handle_events(); + + // Update display + video_refresh(); + + + // Set new palette if it was changed + handle_palette_changes(); +} + +// This function is called on non-threaded platforms from a timer interrupt +void VideoRefresh(void) +{ + // We need to check redraw_thread_active to inhibit refreshed during + // mode changes on non-threaded platforms + if (!redraw_thread_active) + return; + + // Process pending events and update display + do_video_refresh(); +} + +const int VIDEO_REFRESH_HZ = 60; +const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; + +#ifndef USE_CPU_EMUL_SERVICES +static int redraw_func(void *arg) +{ + uint64 start = GetTicks_usec(); + int64 ticks = 0; + uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; + + while (!redraw_thread_cancel) { + + // Wait + next += VIDEO_REFRESH_DELAY; + int32 delay = int32(next - GetTicks_usec()); + if (delay > 0) + Delay_usec(delay); + else if (delay < -VIDEO_REFRESH_DELAY) + next = GetTicks_usec(); + ticks++; + + // Pause if requested (during video mode switches) + if (thread_stop_req) { + thread_stop_ack = true; + continue; + } + + // Process pending events and update display + do_video_refresh(); + } + + uint64 end = GetTicks_usec(); + D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); + return 0; +} +#endif + + +/* + * Record dirty area from NQD + */ + +#ifdef SHEEPSHAVER +void video_set_dirty_area(int x, int y, int w, int h) +{ +#ifdef ENABLE_VOSF + const VIDEO_MODE &mode = drv->mode; + const unsigned screen_width = VIDEO_MODE_X; + const unsigned screen_height = VIDEO_MODE_Y; + const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; + + if (use_vosf) { + vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); + return; + } +#endif + + // XXX handle dirty bounding boxes for non-VOSF modes +} +#endif From a646f6dc3f70fbc6d172de0d012f090412acf1a2 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 12:28:25 -0400 Subject: [PATCH 146/534] added compile-time checks for SDL version, when compiling video_sdl*.cpp --- BasiliskII/src/SDL/video_sdl.cpp | 4 ++++ BasiliskII/src/SDL/video_sdl2.cpp | 4 ++++ 2 files changed, 8 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 798ed8e8d..9b6f787f7 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -42,6 +42,8 @@ #include "sysdeps.h" #include +#if (SDL_COMPILEDVERSION < SDL_VERSIONNUM(2, 0, 0)) + #include #include #include @@ -2262,3 +2264,5 @@ void video_set_dirty_area(int x, int y, int w, int h) // XXX handle dirty bounding boxes for non-VOSF modes } #endif + +#endif // ends: SDL version check diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 26a148299..b01013890 100755 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -42,6 +42,8 @@ #include "sysdeps.h" #include +#if SDL_VERSION_ATLEAST(2,0,0) + #include #include #include @@ -2599,3 +2601,5 @@ void video_set_dirty_area(int x, int y, int w, int h) // XXX handle dirty bounding boxes for non-VOSF modes } #endif + +#endif // ends: SDL version check From 8940880794d87e3f545a49ad13de928c9850f3dd Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 12:44:34 -0400 Subject: [PATCH 147/534] make build scripts reference both video_sdl.cpp and video_sdl2.cpp --- .../BasiliskII.xcodeproj/project.pbxproj | 4 ++ BasiliskII/src/Unix/configure.ac | 2 +- BasiliskII/src/Windows/BasiliskII.vcxproj | 49 ++++++++++--------- .../src/Windows/BasiliskII.vcxproj.filters | 3 ++ BasiliskII/src/Windows/Makefile.in | 2 +- .../SheepShaver.xcodeproj/project.pbxproj | 4 ++ .../project.pbxproj | 4 ++ SheepShaver/src/Unix/configure.ac | 2 +- SheepShaver/src/Windows/Makefile.in | 2 +- 9 files changed, 44 insertions(+), 28 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 232f5f5e3..916f1ad82 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -106,6 +106,7 @@ 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; + 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -376,6 +377,7 @@ 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; + 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -584,6 +586,7 @@ 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, + 75CBCF761F5DB65E00830063 /* video_sdl.cpp */, 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, ); name = SDL; @@ -1052,6 +1055,7 @@ 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, + 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 8e7b59f98..d9f54b135 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -813,7 +813,7 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) - VIDEOSRCS="../SDL/video_sdl.cpp" + VIDEOSRCS="../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp" KEYCODES="../SDL/keycodes" if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then AC_MSG_CHECKING([whether __LP64__ is defined]) diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj b/BasiliskII/src/Windows/BasiliskII.vcxproj index ef01b7ed2..b3a3a3ff2 100644 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj +++ b/BasiliskII/src/Windows/BasiliskII.vcxproj @@ -56,6 +56,7 @@ + @@ -417,9 +418,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -453,9 +454,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -486,9 +487,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -522,9 +523,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -559,9 +560,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -599,9 +600,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -636,9 +637,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" @@ -676,9 +677,9 @@ WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" + cd ..\uae_cpu +"$(ToolsDir)gencpu" +"$(ToolsDir)gencomp" diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj.filters b/BasiliskII/src/Windows/BasiliskII.vcxproj.filters index 50eae3d1a..2d460b26f 100644 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj.filters +++ b/BasiliskII/src/Windows/BasiliskII.vcxproj.filters @@ -270,6 +270,9 @@ Source Files + + Source Files + Source Files diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index dfa59a60e..d5a5dd5fc 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -63,7 +63,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../emul_op.cpp ../macos_util.cpp ../xpram.cpp xpram_windows.cpp ../timer.cpp \ timer_windows.cpp ../adb.cpp ../serial.cpp serial_windows.cpp \ ../ether.cpp ether_windows.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp \ - ../scsi.cpp ../dummy/scsi_dummy.cpp ../video.cpp ../SDL/video_sdl.cpp \ + ../scsi.cpp ../dummy/scsi_dummy.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp \ video_blit.cpp ../audio.cpp ../SDL/audio_sdl.cpp clip_windows.cpp \ ../extfs.cpp extfs_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ vm_alloc.cpp sigsegv.cpp posix_emu.cpp util_windows.cpp \ diff --git a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj index b27d0f7df..bfba46ee9 100644 --- a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj @@ -129,6 +129,7 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 08D93A16159FE174003B04EC /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = 08D93A15159FE174003B04EC /* clip_macosx64.mm */; }; + 75CBCF7B1F5DB82B00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF7A1F5DB82B00830063 /* video_sdl2.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; /* End PBXBuildFile section */ @@ -450,6 +451,7 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 08D93A15159FE174003B04EC /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + 75CBCF7A1F5DB82B00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; /* End PBXFileReference section */ @@ -845,6 +847,7 @@ 0856CE9214A99EF0000B1711 /* SDLMain.h */, 0856CE9314A99EF0000B1711 /* SDLMain.m */, 0856CE9414A99EF0000B1711 /* video_sdl.cpp */, + 75CBCF7A1F5DB82B00830063 /* video_sdl2.cpp */, ); name = SDL; path = ../SDL; @@ -1411,6 +1414,7 @@ 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, + 75CBCF7B1F5DB82B00830063 /* video_sdl2.cpp in Sources */, 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 61a7539c3..811ef728e 100644 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -104,6 +104,7 @@ 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */; }; 7539EDF51F50C40100454E81 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 7539EDE91F50C3D600454E81 /* SDL2.framework */; }; 7539EDF61F50C40100454E81 /* SDL2.framework in Copy Frameworks */ = {isa = PBXBuildFile; fileRef = 7539EDE91F50C3D600454E81 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + 75CBCF7E1F5DB94C00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF7D1F5DB94C00830063 /* video_sdl2.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; /* End PBXBuildFile section */ @@ -409,6 +410,7 @@ 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 08D93A15159FE174003B04EC /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; 7539EDE11F50C3D600454E81 /* SDL.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; name = SDL.xcodeproj; path = ../../../external/SDL/Xcode/SDL/SDL.xcodeproj; sourceTree = ""; }; + 75CBCF7D1F5DB94C00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; /* End PBXFileReference section */ @@ -769,6 +771,7 @@ 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */, 0856CE9114A99EF0000B1711 /* keycodes */, 0856CE9414A99EF0000B1711 /* video_sdl.cpp */, + 75CBCF7D1F5DB94C00830063 /* video_sdl2.cpp */, ); name = SDL; path = ../SDL; @@ -1174,6 +1177,7 @@ 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, + 75CBCF7E1F5DB94C00830063 /* video_sdl2.cpp in Sources */, 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 1ece65880..341575c49 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -705,7 +705,7 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support.]) - VIDEOSRCS="../SDL/video_sdl.cpp" + VIDEOSRCS="../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp" KEYCODES="../SDL/keycodes" if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then AC_MSG_CHECKING([whether __LP64__ is defined]) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index edd28f596..76617aedf 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -65,7 +65,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ ../macos_util.cpp ../timer.cpp timer_windows.cpp ../xpram.cpp xpram_windows.cpp \ ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ - ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp video_blit.cpp \ + ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp video_blit.cpp \ ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ about_window_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ From 68ee5f23f9c989cedb0d65dc84f9118ccb284f8b Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Mon, 4 Sep 2017 12:49:54 -0400 Subject: [PATCH 148/534] make video_sdl*.cpp's header-comments refer to the versions of SDL that they target --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 9b6f787f7..c0090d237 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1,5 +1,5 @@ /* - * video_sdl.cpp - Video/graphics emulation, SDL specific stuff + * video_sdl.cpp - Video/graphics emulation, SDL 1.x specific stuff * * Basilisk II (C) 1997-2008 Christian Bauer * diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index b01013890..aa57ff6a8 100755 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1,5 +1,5 @@ /* - * video_sdl.cpp - Video/graphics emulation, SDL specific stuff + * video_sdl2.cpp - Video/graphics emulation, SDL 2.x specific stuff * * Basilisk II (C) 1997-2008 Christian Bauer * From 1c0e8655dcefad632a8c0d93a94ca271070f38de Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Fri, 8 Sep 2017 23:43:01 +0000 Subject: [PATCH 149/534] for non-OSX hosts, make GNU Autotools revert to using SDL 1.x, if SDL 2.x can't be found --- BasiliskII/src/CrossPlatform/video_vosf.h | 15 ++++++++----- BasiliskII/src/SDL/audio_sdl.cpp | 10 ++++++++- BasiliskII/src/SDL/video_sdl.cpp | 10 +++++++++ BasiliskII/src/SDL/video_sdl2.cpp | 14 ++++++++++-- BasiliskII/src/Unix/configure.ac | 27 +++++++++++++++++------ 5 files changed, 60 insertions(+), 16 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index fc89e125b..f99b44bf5 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -30,6 +30,12 @@ #include "util_windows.h" #endif +// Import SDL-backend-specific functions +#ifdef USE_SDL_VIDEO +extern void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h); +extern void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects); +#endif + // Glue for SDL and X11 support #ifdef TEST_VOSF_PERFORMANCE #define MONITOR_INIT /* nothing */ @@ -514,8 +520,7 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) VIDEO_DRV_UNLOCK_PIXELS; #ifdef USE_SDL_VIDEO - //SDL_UpdateRect(drv->s, 0, y1, VIDEO_MODE_X, height); - update_sdl_video(); + update_sdl_video(drv->s, 0, y1, VIDEO_MODE_X, height); #else if (VIDEO_DRV_HAVE_SHM) XShmPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height, 0); @@ -559,8 +564,7 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) i2 += scr_bytes_per_row; } #ifdef USE_SDL_VIDEO - //SDL_UpdateRect(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); - update_sdl_video(); + update_sdl_video(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); #endif VIDEO_DRV_UNLOCK_PIXELS; return; @@ -666,8 +670,7 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) #endif } #ifdef USE_SDL_VIDEO - //SDL_UpdateRects(drv->s, bbi, bb); - update_sdl_video(); + update_sdl_video(drv->s, bbi, bb); #endif VIDEO_DRV_UNLOCK_PIXELS; } diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 130afe6b2..6bff36c35 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -28,6 +28,7 @@ #include #include +#include #define DEBUG 0 #include "debug.h" @@ -87,7 +88,7 @@ static bool open_sdl_audio(void) } SDL_AudioSpec audio_spec; - SDL_zero(audio_spec); + memset(&audio_spec, 0, sizeof(audio_spec)); audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; audio_spec.channels = audio_channel_counts[audio_channel_count_index]; @@ -101,18 +102,25 @@ static bool open_sdl_audio(void) return false; } +#if SDL_VERSION_ATLEAST(2,0,0) // HACK: workaround a bug in SDL pre-2.0.6 (reported via https://bugzilla.libsdl.org/show_bug.cgi?id=3710 ) // whereby SDL does not update audio_spec.size if (audio_spec.size == 0) { audio_spec.size = (SDL_AUDIO_BITSIZE(audio_spec.format) / 8) * audio_spec.channels * audio_spec.samples; } +#endif #if defined(BINCUE) OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, audio_spec.silence); #endif +#if SDL_VERSION_ATLEAST(2,0,0) const char * driver_name = SDL_GetCurrentAudioDriver(); +#else + char driver_name[32]; + SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1); +#endif printf("Using SDL/%s audio output\n", driver_name ? driver_name : ""); silence_byte = audio_spec.silence; SDL_PauseAudio(0); diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index c0090d237..03e4c5b77 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -587,6 +587,16 @@ static void migrate_screen_prefs(void) #endif } +void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h) +{ + SDL_UpdateRect(screen, x, y, w, h); +} + +void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects) +{ + SDL_UpdateRects(screen, numrects, rects); +} + /* * Display "driver" classes diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index aa57ff6a8..d597101c6 100755 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -883,7 +883,18 @@ static int update_sdl_video() return 0; } -static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) +void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) +{ + // HACK, dludwig@pobox.com: for now, just update the whole screen, via + // VideoInterrupt(), which gets called on the main thread. + // + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + // + // TODO: cache rects to update, then use rects in present_sdl_video() +} + +void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) { // HACK, dludwig@pobox.com: for now, just update the whole screen, via // VideoInterrupt(), which gets called on the main thread. @@ -892,7 +903,6 @@ static int update_sdl_video(SDL_Surface *s, int x, int y, int w, int h) // MacsBug is running (and VideoInterrupt() might not get called) // // TODO: cache rects to update, then use rects in present_sdl_video() - return 0; } void driver_base::set_video_mode(int flags) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index d9f54b135..d1f90841c 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -300,13 +300,26 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ - CFLAGS="$CFLAGS $sdl2_CFLAGS" - CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" - LIBS="$LIBS $sdl2_LIBS" - ], [ - WANT_SDL=no - ]) + WANT_SDL_VERSION_MAJOR=2 + if [[ "x$WANT_SDL_VERSION_MAJOR" = "x2" ]]; then + PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ + CFLAGS="$CFLAGS $sdl2_CFLAGS" + CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" + LIBS="$LIBS $sdl2_LIBS" + ], [ + WANT_SDL_VERSION_MAJOR=1 + ]) + fi + if [[ "x$WANT_SDL_VERSION_MAJOR" = "x1" ]]; then + PKG_CHECK_MODULES([sdl], [sdl >= 1.2], [ + CFLAGS="$CFLAGS $sdl_CFLAGS" + CXXFLAGS="$CXXFLAGS $sdl_CFLAGS" + LIBS="$LIBS $sdl_LIBS" + ], [ + WANT_SDL=no + WANT_SDL_VERSION_MAJOR= + ]) + fi fi SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` else From 20ad70cb3553ee2ecf08add31ee8619053ef55f5 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 9 Sep 2017 01:09:13 +0000 Subject: [PATCH 150/534] unset the executable bit from video_sdl2.cpp --- BasiliskII/src/SDL/video_sdl2.cpp | 0 1 file changed, 0 insertions(+), 0 deletions(-) mode change 100755 => 100644 BasiliskII/src/SDL/video_sdl2.cpp diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp old mode 100755 new mode 100644 From cbda5759bbc4da638beea3183736a6aaad4514a4 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 9 Sep 2017 15:15:28 +0000 Subject: [PATCH 151/534] added --with-sdl1 option to configure scripts, to force the use of SDL 1.x, over SDL 2.x --- BasiliskII/src/Unix/configure.ac | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index d1f90841c..8b360a383 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -36,6 +36,7 @@ AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphi AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) +AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl JIT compiler options. AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=no]) @@ -300,7 +301,16 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - WANT_SDL_VERSION_MAJOR=2 + dnl use PKG_PROG_PKG_CONFIG to declare PKG_CONFIG variables. Otherwise, + dnl PKG_* macros may fail, without much explanation. The lack of this + dnl was causing --with-sdl1 to fail, as SDL 1.x could not be detected, + dnl as the 2nd call to PKG_CHECK_MODULES would fail, as $PKG_CONFIG + dnl never got defined (bizarrely-enough). -- dludwig@pobox.com + PKG_PROG_PKG_CONFIG + + if [[ "x$WANT_SDL_VERSION_MAJOR" = "x" ]]; then + WANT_SDL_VERSION_MAJOR=2 + fi if [[ "x$WANT_SDL_VERSION_MAJOR" = "x2" ]]; then PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ CFLAGS="$CFLAGS $sdl2_CFLAGS" @@ -1849,6 +1859,7 @@ echo echo Mac OS X GUI ........................... : $WANT_MACOSX_GUI echo Mac OS X Sound ......................... : $WANT_MACOSX_SOUND echo SDL support ............................ : $SDL_SUPPORT +echo SDL major-version ...................... : $WANT_SDL_VERSION_MAJOR echo BINCUE support ......................... : $have_bincue echo LIBVHD support ......................... : $have_libvhd echo XFree86 DGA support .................... : $WANT_XF86_DGA From 1eb824a04eec1bd947454eeea528edf07f08b955 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 9 Sep 2017 16:48:30 +0000 Subject: [PATCH 152/534] added pref, "sdlrender", which can force a specific, SDL2 renderer (software can be faster in some cases, such as on VirtualBox hosts) --- BasiliskII/src/SDL/prefs_sdl.cpp | 1 + BasiliskII/src/SDL/video_sdl2.cpp | 16 +++++++++++++++- BasiliskII/src/Unix/prefs_unix.cpp | 3 +++ 3 files changed, 19 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/prefs_sdl.cpp b/BasiliskII/src/SDL/prefs_sdl.cpp index c9d998167..8150d7094 100644 --- a/BasiliskII/src/SDL/prefs_sdl.cpp +++ b/BasiliskII/src/SDL/prefs_sdl.cpp @@ -31,6 +31,7 @@ // Platform-specific preferences items prefs_desc platform_prefs_items[] = { {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, + {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, {NULL, TYPE_END, false} // End of list }; diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index d597101c6..cbdce0613 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -754,12 +754,26 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } if (!sdl_renderer) { - sdl_renderer = SDL_CreateRenderer(sdl_window, -1, SDL_RENDERER_ACCELERATED); + const char *render_driver = PrefsFindString("sdlrender"); + if (render_driver) { + if (SDL_strcmp(render_driver, "auto") == 0) { + SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); + } else { + SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); + } + } + + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); if (!sdl_renderer) { shutdown_sdl_video(); return NULL; } sdl_renderer_thread_id = SDL_ThreadID(); + + SDL_RendererInfo info; + memset(&info, 0, sizeof(info)); + SDL_GetRendererInfo(sdl_renderer, &info); + printf("Using SDL_Renderer driver: %s\n", (info.name ? info.name : "(null)")); } SDL_assert(sdl_texture == NULL); diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index a92cd6401..4ab21b6a2 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -42,6 +42,9 @@ prefs_desc platform_prefs_items[] = { {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, +#ifdef USE_SDL_VIDEO + {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, +#endif {NULL, TYPE_END, false, NULL} // End of list }; From 78e3cbc8cbb37144bbfebc0403c6cd762ae7cbfc Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sat, 9 Sep 2017 16:49:09 +0000 Subject: [PATCH 153/534] fixed compile-time warnings in video_sdl2.cpp --- BasiliskII/src/SDL/video_sdl2.cpp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index cbdce0613..8db972b1c 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1007,7 +1007,7 @@ void driver_base::adapt_to_video_mode() { SDL_ShowCursor(hardware_cursor); // Set window name/class - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + set_window_name(mouse_grabbed ? (int)STR_WINDOW_TITLE_GRABBED : (int)STR_WINDOW_TITLE); // Everything went well init_ok = true; @@ -2000,7 +2000,7 @@ static void force_complete_window_refresh() */ // possible return codes for SDL-registered event watches -enum : int { +enum { EVENT_DROP_FROM_QUEUE = 0, EVENT_ADD_TO_QUEUE = 1 }; @@ -2230,7 +2230,7 @@ static void update_display_static(driver_base *drv) // Check for first column from left and first column from right that have changed if (high) { - if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { + if ((int)VIDEO_MODE_DEPTH < (int)VIDEO_DEPTH_8BIT) { const int src_bytes_per_row = bytes_per_row; const int dst_bytes_per_row = drv->s->pitch; const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; From 252890ebd070e6056227dd0323e4295edecb6391 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 10 Sep 2017 10:19:17 -0400 Subject: [PATCH 154/534] BasiliskII: misc fixes when building on OSX, via Autotools --- BasiliskII/src/MacOSX/utils_macosx.mm | 6 + BasiliskII/src/SDL/SDLMain.h | 16 ++ BasiliskII/src/SDL/SDLMain.m | 384 ++++++++++++++++++++++++++ BasiliskII/src/Unix/configure.ac | 48 +++- 4 files changed, 439 insertions(+), 15 deletions(-) create mode 100644 BasiliskII/src/SDL/SDLMain.h create mode 100644 BasiliskII/src/SDL/SDLMain.m diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index b10040386..e5683341e 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -20,7 +20,11 @@ #include #include "utils_macosx.h" +#include + +#if SDL_VERSION_ATLEAST(2,0,0) #include +#endif // This is used from video_sdl.cpp. void NSAutoReleasePool_wrap(void (*fn)(void)) @@ -41,6 +45,7 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { } } +#if SDL_VERSION_ATLEAST(2,0,0) bool is_fullscreen_osx(SDL_Window * window) { if (!window) { @@ -56,6 +61,7 @@ bool is_fullscreen_osx(SDL_Window * window) const NSWindowStyleMask styleMask = [wmInfo.info.cocoa.window styleMask]; return (styleMask & NSWindowStyleMaskFullScreen) != 0; } +#endif void set_menu_bar_visible_osx(bool visible) { diff --git a/BasiliskII/src/SDL/SDLMain.h b/BasiliskII/src/SDL/SDLMain.h new file mode 100644 index 000000000..c56d90cbe --- /dev/null +++ b/BasiliskII/src/SDL/SDLMain.h @@ -0,0 +1,16 @@ +/* SDLMain.m - main entry point for our Cocoa-ized SDL app + Initial Version: Darrell Walisser + Non-NIB-Code & other changes: Max Horn + + Feel free to customize this file to suit your needs +*/ + +#ifndef _SDLMain_h_ +#define _SDLMain_h_ + +#import + +@interface SDLMain : NSObject +@end + +#endif /* _SDLMain_h_ */ diff --git a/BasiliskII/src/SDL/SDLMain.m b/BasiliskII/src/SDL/SDLMain.m new file mode 100644 index 000000000..811e05e16 --- /dev/null +++ b/BasiliskII/src/SDL/SDLMain.m @@ -0,0 +1,384 @@ +/* SDLMain.m - main entry point for our Cocoa-ized SDL app + Initial Version: Darrell Walisser + Non-NIB-Code & other changes: Max Horn + + Feel free to customize this file to suit your needs +*/ + +#include "SDL.h" +#if (SDL_COMPILEDVERSION < SDL_VERSIONNUM(2, 0, 0)) // SDLMain.m is not needed in SDL 2.x + +#include "SDLMain.h" +#include /* for MAXPATHLEN */ +#include + +/* For some reaon, Apple removed setAppleMenu from the headers in 10.4, + but the method still is there and works. To avoid warnings, we declare + it ourselves here. */ +@interface NSApplication(SDL_Missing_Methods) +- (void)setAppleMenu:(NSMenu *)menu; +@end + +/* Use this flag to determine whether we use SDLMain.nib or not */ +#define SDL_USE_NIB_FILE 0 + +/* Use this flag to determine whether we use CPS (docking) or not */ +#define SDL_USE_CPS 1 +#ifdef SDL_USE_CPS +/* Portions of CPS.h */ +typedef struct CPSProcessSerNum +{ + UInt32 lo; + UInt32 hi; +} CPSProcessSerNum; + +extern OSErr CPSGetCurrentProcess( CPSProcessSerNum *psn); +extern OSErr CPSEnableForegroundOperation( CPSProcessSerNum *psn, UInt32 _arg2, UInt32 _arg3, UInt32 _arg4, UInt32 _arg5); +extern OSErr CPSSetFrontProcess( CPSProcessSerNum *psn); + +#endif /* SDL_USE_CPS */ + +static int gArgc; +static char **gArgv; +static BOOL gFinderLaunch; +static BOOL gCalledAppMainline = FALSE; + +static NSString *getApplicationName(void) +{ + const NSDictionary *dict; + NSString *appName = 0; + + /* Determine the application name */ + dict = (const NSDictionary *)CFBundleGetInfoDictionary(CFBundleGetMainBundle()); + if (dict) + appName = [dict objectForKey: @"CFBundleName"]; + + if (![appName length]) + appName = [[NSProcessInfo processInfo] processName]; + + return appName; +} + +#if SDL_USE_NIB_FILE +/* A helper category for NSString */ +@interface NSString (ReplaceSubString) +- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString; +@end +#endif + +@interface NSApplication (SDLApplication) +@end + +@implementation NSApplication (SDLApplication) +/* Invoked from the Quit menu item */ +- (void)terminate:(id)sender +{ + /* Post a SDL_QUIT event */ + SDL_Event event; + event.type = SDL_QUIT; + SDL_PushEvent(&event); +} +@end + +/* The main class of the application, the application's delegate */ +@implementation SDLMain + +/* Set the working directory to the .app's parent directory */ +- (void) setupWorkingDirectory:(BOOL)shouldChdir +{ + if (shouldChdir) + { + char parentdir[MAXPATHLEN]; + CFURLRef url = CFBundleCopyBundleURL(CFBundleGetMainBundle()); + CFURLRef url2 = CFURLCreateCopyDeletingLastPathComponent(0, url); + if (CFURLGetFileSystemRepresentation(url2, 1, (UInt8 *)parentdir, MAXPATHLEN)) { + chdir(parentdir); /* chdir to the binary app's parent */ + } + CFRelease(url); + CFRelease(url2); + } +} + +#if SDL_USE_NIB_FILE + +/* Fix menu to contain the real app name instead of "SDL App" */ +- (void)fixMenu:(NSMenu *)aMenu withAppName:(NSString *)appName +{ + NSRange aRange; + NSEnumerator *enumerator; + NSMenuItem *menuItem; + + aRange = [[aMenu title] rangeOfString:@"SDL App"]; + if (aRange.length != 0) + [aMenu setTitle: [[aMenu title] stringByReplacingRange:aRange with:appName]]; + + enumerator = [[aMenu itemArray] objectEnumerator]; + while ((menuItem = [enumerator nextObject])) + { + aRange = [[menuItem title] rangeOfString:@"SDL App"]; + if (aRange.length != 0) + [menuItem setTitle: [[menuItem title] stringByReplacingRange:aRange with:appName]]; + if ([menuItem hasSubmenu]) + [self fixMenu:[menuItem submenu] withAppName:appName]; + } +} + +#else + +static void setApplicationMenu(void) +{ + /* warning: this code is very odd */ + NSMenu *appleMenu; + NSMenuItem *menuItem; + NSString *title; + NSString *appName; + + appName = getApplicationName(); + appleMenu = [[NSMenu alloc] initWithTitle:@""]; + + /* Add menu items */ + title = [@"About " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(orderFrontStandardAboutPanel:) keyEquivalent:@""]; + + [appleMenu addItem:[NSMenuItem separatorItem]]; + + title = [@"Hide " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(hide:) keyEquivalent:@"h"]; + + menuItem = (NSMenuItem *)[appleMenu addItemWithTitle:@"Hide Others" action:@selector(hideOtherApplications:) keyEquivalent:@"h"]; + [menuItem setKeyEquivalentModifierMask:(NSAlternateKeyMask|NSCommandKeyMask)]; + + [appleMenu addItemWithTitle:@"Show All" action:@selector(unhideAllApplications:) keyEquivalent:@""]; + + [appleMenu addItem:[NSMenuItem separatorItem]]; + + title = [@"Quit " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(terminate:) keyEquivalent:@"q"]; + + + /* Put menu into the menubar */ + menuItem = [[NSMenuItem alloc] initWithTitle:@"" action:nil keyEquivalent:@""]; + [menuItem setSubmenu:appleMenu]; + [[NSApp mainMenu] addItem:menuItem]; + + /* Tell the application object that this is now the application menu */ + [NSApp setAppleMenu:appleMenu]; + + /* Finally give up our references to the objects */ + [appleMenu release]; + [menuItem release]; +} + +/* Create a window menu */ +static void setupWindowMenu(void) +{ + NSMenu *windowMenu; + NSMenuItem *windowMenuItem; + NSMenuItem *menuItem; + + windowMenu = [[NSMenu alloc] initWithTitle:@"Window"]; + + /* "Minimize" item */ + menuItem = [[NSMenuItem alloc] initWithTitle:@"Minimize" action:@selector(performMiniaturize:) keyEquivalent:@"m"]; + [windowMenu addItem:menuItem]; + [menuItem release]; + + /* Put menu into the menubar */ + windowMenuItem = [[NSMenuItem alloc] initWithTitle:@"Window" action:nil keyEquivalent:@""]; + [windowMenuItem setSubmenu:windowMenu]; + [[NSApp mainMenu] addItem:windowMenuItem]; + + /* Tell the application object that this is now the window menu */ + [NSApp setWindowsMenu:windowMenu]; + + /* Finally give up our references to the objects */ + [windowMenu release]; + [windowMenuItem release]; +} + +/* Replacement for NSApplicationMain */ +static void CustomApplicationMain (int argc, char **argv) +{ + NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; + SDLMain *sdlMain; + + /* Ensure the application object is initialised */ + [NSApplication sharedApplication]; + +#ifdef SDL_USE_CPS + { + CPSProcessSerNum PSN; + /* Tell the dock about us */ + if (!CPSGetCurrentProcess(&PSN)) + if (!CPSEnableForegroundOperation(&PSN,0x03,0x3C,0x2C,0x1103)) + if (!CPSSetFrontProcess(&PSN)) + [NSApplication sharedApplication]; + } +#endif /* SDL_USE_CPS */ + + /* Set up the menubar */ + [NSApp setMainMenu:[[[NSMenu alloc] init] autorelease]]; + setApplicationMenu(); + setupWindowMenu(); + + /* Create SDLMain and make it the app delegate */ + sdlMain = [[SDLMain alloc] init]; + [NSApp setDelegate:sdlMain]; + + /* Start the main event loop */ + [NSApp run]; + + [sdlMain release]; + [pool release]; +} + +#endif + + +/* + * Catch document open requests...this lets us notice files when the app + * was launched by double-clicking a document, or when a document was + * dragged/dropped on the app's icon. You need to have a + * CFBundleDocumentsType section in your Info.plist to get this message, + * apparently. + * + * Files are added to gArgv, so to the app, they'll look like command line + * arguments. Previously, apps launched from the finder had nothing but + * an argv[0]. + * + * This message may be received multiple times to open several docs on launch. + * + * This message is ignored once the app's mainline has been called. + */ +- (BOOL)application:(NSApplication *)theApplication openFile:(NSString *)filename +{ + const char *temparg; + size_t arglen; + char *arg; + char **newargv; + + if (!gFinderLaunch) /* MacOS is passing command line args. */ + return FALSE; + + if (gCalledAppMainline) /* app has started, ignore this document. */ + return FALSE; + + temparg = [filename UTF8String]; + arglen = SDL_strlen(temparg) + 1; + arg = (char *) SDL_malloc(arglen); + if (arg == NULL) + return FALSE; + + newargv = (char **) realloc(gArgv, sizeof (char *) * (gArgc + 2)); + if (newargv == NULL) + { + SDL_free(arg); + return FALSE; + } + gArgv = newargv; + + SDL_strlcpy(arg, temparg, arglen); + gArgv[gArgc++] = arg; + gArgv[gArgc] = NULL; + return TRUE; +} + + +/* Called when the internal event loop has just started running */ +- (void) applicationDidFinishLaunching: (NSNotification *) note +{ + int status; + + /* Set the working directory to the .app's parent directory */ + [self setupWorkingDirectory:gFinderLaunch]; + +#if SDL_USE_NIB_FILE + /* Set the main menu to contain the real app name instead of "SDL App" */ + [self fixMenu:[NSApp mainMenu] withAppName:getApplicationName()]; +#endif + + /* Hand off to main application code */ + gCalledAppMainline = TRUE; + status = SDL_main (gArgc, gArgv); + + /* We're done, thank you for playing */ + exit(status); +} +@end + + +@implementation NSString (ReplaceSubString) + +- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString +{ + unsigned int bufferSize; + unsigned int selfLen = [self length]; + unsigned int aStringLen = [aString length]; + unichar *buffer; + NSRange localRange; + NSString *result; + + bufferSize = selfLen + aStringLen - aRange.length; + buffer = (unichar *)NSAllocateMemoryPages(bufferSize*sizeof(unichar)); + + /* Get first part into buffer */ + localRange.location = 0; + localRange.length = aRange.location; + [self getCharacters:buffer range:localRange]; + + /* Get middle part into buffer */ + localRange.location = 0; + localRange.length = aStringLen; + [aString getCharacters:(buffer+aRange.location) range:localRange]; + + /* Get last part into buffer */ + localRange.location = aRange.location + aRange.length; + localRange.length = selfLen - localRange.location; + [self getCharacters:(buffer+aRange.location+aStringLen) range:localRange]; + + /* Build output string */ + result = [NSString stringWithCharacters:buffer length:bufferSize]; + + NSDeallocateMemoryPages(buffer, bufferSize); + + return result; +} + +@end + + + +#ifdef main +# undef main +#endif + + +/* Main entry point to executable - should *not* be SDL_main! */ +int main (int argc, char **argv) +{ + /* Copy the arguments into a global variable */ + /* This is passed if we are launched by double-clicking */ + if ( argc >= 2 && strncmp (argv[1], "-psn", 4) == 0 ) { + gArgv = (char **) SDL_malloc(sizeof (char *) * 2); + gArgv[0] = argv[0]; + gArgv[1] = NULL; + gArgc = 1; + gFinderLaunch = YES; + } else { + int i; + gArgc = argc; + gArgv = (char **) SDL_malloc(sizeof (char *) * (argc+1)); + for (i = 0; i <= argc; i++) + gArgv[i] = argv[i]; + gFinderLaunch = NO; + } + +#if SDL_USE_NIB_FILE + NSApplicationMain (argc, argv); +#else + CustomApplicationMain (argc, argv); +#endif + return 0; +} + +#endif // ends: SDL version check diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 8b360a383..edabef2fc 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -251,7 +251,7 @@ AC_CHECK_LIB(rt, timer_create) AC_CHECK_LIB(rt, shm_open) AC_CHECK_LIB(m, cos) -dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES) +dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES, $3=ACTION_IF_SUCCESSFUL, $4=ACTION_IF_UNSUCCESSFUL) dnl AC_TRY_LINK uses main() but SDL needs main to take args, dnl therefore main is undefined with #undef. dnl Framework can be in an custom location. @@ -261,18 +261,16 @@ AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ ac_Framework, [ saved_LIBS="$LIBS" LIBS="$LIBS -framework $1" - if [[ "x$SDL_FRAMEWORK" != "x/Library/Frameworks" ]]; then - if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then - LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" - fi + if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then + LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" fi saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL2.framework/Headers" + CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/$1.framework/Headers" AC_TRY_LINK( [$2 #undef main], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); -LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"] + [AS_VAR_SET(ac_Framework, yes); $3], [AS_VAR_SET(ac_Framework, no); +LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"; $4] ) ]) AS_IF([test AS_VAR_GET(ac_Framework) = yes], @@ -296,11 +294,32 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) + TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then + TEMP_WANT_SDL_VERSION_MAJOR=2 + fi + + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ], [ + WANT_SDL_VERSION_MAJOR=2 + ], [ + TEMP_WANT_SDL_VERSION_MAJOR=1 + ]) + fi + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then + AC_CHECK_SDLFRAMEWORK(SDL, [#include ], [ + WANT_SDL_VERSION_MAJOR=1 + ]) + fi else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then + TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then + TEMP_WANT_SDL_VERSION_MAJOR=2 + fi + dnl use PKG_PROG_PKG_CONFIG to declare PKG_CONFIG variables. Otherwise, dnl PKG_* macros may fail, without much explanation. The lack of this dnl was causing --with-sdl1 to fail, as SDL 1.x could not be detected, @@ -308,23 +327,22 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then dnl never got defined (bizarrely-enough). -- dludwig@pobox.com PKG_PROG_PKG_CONFIG - if [[ "x$WANT_SDL_VERSION_MAJOR" = "x" ]]; then - WANT_SDL_VERSION_MAJOR=2 - fi - if [[ "x$WANT_SDL_VERSION_MAJOR" = "x2" ]]; then + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ CFLAGS="$CFLAGS $sdl2_CFLAGS" CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" LIBS="$LIBS $sdl2_LIBS" + WANT_SDL_VERSION_MAJOR=2 ], [ - WANT_SDL_VERSION_MAJOR=1 + TEMP_WANT_SDL_VERSION_MAJOR=1 ]) fi - if [[ "x$WANT_SDL_VERSION_MAJOR" = "x1" ]]; then + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then PKG_CHECK_MODULES([sdl], [sdl >= 1.2], [ CFLAGS="$CFLAGS $sdl_CFLAGS" CXXFLAGS="$CXXFLAGS $sdl_CFLAGS" LIBS="$LIBS $sdl_LIBS" + WANT_SDL_VERSION_MAJOR=1 ], [ WANT_SDL=no WANT_SDL_VERSION_MAJOR= From 83096e1ca70608edadcca5e0f81a203d97b78504 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 10 Sep 2017 10:48:56 -0400 Subject: [PATCH 155/534] SheepShaver: added --with-sdl1 to configure script --- SheepShaver/src/Unix/configure.ac | 83 +++++++++++++++++++++++-------- 1 file changed, 61 insertions(+), 22 deletions(-) diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 341575c49..4663f90d1 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -72,6 +72,7 @@ AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphic AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) +AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl Checks for programs. AC_PROG_CC @@ -144,7 +145,7 @@ dnl Checks for libraries. AC_CHECK_LIB(posix4, sem_init) AC_CHECK_LIB(m, cos) -dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES) +dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES, $3=ACTION_IF_SUCCESSFUL, $4=ACTION_IF_UNSUCCESSFUL) dnl AC_TRY_LINK uses main() but SDL needs main to take args, dnl therefore main is undefined with #undef. dnl Framework can be in an custom location. @@ -154,18 +155,16 @@ AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ ac_Framework, [ saved_LIBS="$LIBS" LIBS="$LIBS -framework $1" - if [[ "x$SDL_FRAMEWORK" != "x/Library/Frameworks" ]]; then - if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then - LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" - fi + if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then + LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" fi saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL2.framework/Headers" + CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/$1.framework/Headers" AC_TRY_LINK( [$2 #undef main], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); -LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"] + [AS_VAR_SET(ac_Framework, yes); $3], [AS_VAR_SET(ac_Framework, no); +LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"; $4] ) ]) AS_IF([test AS_VAR_GET(ac_Framework) = yes], @@ -189,26 +188,65 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) + TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then + TEMP_WANT_SDL_VERSION_MAJOR=2 + fi + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ], [ + WANT_SDL_VERSION_MAJOR=2 + ], [ + TEMP_WANT_SDL_VERSION_MAJOR=1 + ]) + fi + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then + AC_CHECK_SDLFRAMEWORK(SDL, [#include ], [ + WANT_SDL_VERSION_MAJOR=1 + ]) + fi else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - AC_PATH_PROG(sdl2_config, "sdl2-config") - if [[ -n "$sdl2_config" ]]; then - sdl2_cflags=`$sdl2_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl2_libs=`$sdl2_config --static-libs` + TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then + TEMP_WANT_SDL_VERSION_MAJOR=2 + fi + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then + AC_PATH_PROG(sdl2_config, "sdl2-config") + if [[ -n "$sdl2_config" ]]; then + sdl2_cflags=`$sdl2_config --cflags` + if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then + sdl2_libs=`$sdl2_config --static-libs` + else + sdl2_libs=`$sdl2_config --libs` + fi + CFLAGS="$CFLAGS $sdl2_cflags" + CXXFLAGS="$CXXFLAGS $sdl2_cflags" + LIBS="$LIBS $sdl2_libs" + WANT_SDL_VERSION_MAJOR=2 else - sdl2_libs=`$sdl2_config --libs` + TEMP_WANT_SDL_VERSION_MAJOR=1 + fi + fi + if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then + AC_PATH_PROG(sdl_config, "sdl-config") + if [[ -n "$sdl_config" ]]; then + sdl_cflags=`$sdl_config --cflags` + if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then + sdl_libs=`$sdl_config --static-libs` + else + sdl_libs=`$sdl_config --libs` + fi + CFLAGS="$CFLAGS $sdl_cflags" + CXXFLAGS="$CXXFLAGS $sdl_cflags" + LIBS="$LIBS $sdl_libs" + WANT_SDL_VERSION_MAJOR=1 + else + WANT_SDL=no + WANT_SDL_VIDEO=no + WANT_SDL_AUDIO=no fi - CFLAGS="$CFLAGS $sdl2_cflags" - CXXFLAGS="$CXXFLAGS $sdl2_cflags" - LIBS="$LIBS $sdl2_libs" - else - WANT_SDL=no - WANT_SDL_VIDEO=no - WANT_SDL_AUDIO=no fi fi SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` @@ -1667,6 +1705,7 @@ echo echo SheepShaver configuration summary: echo echo SDL support ...................... : $SDL_SUPPORT +echo SDL major-version ................ : $WANT_SDL_VERSION_MAJOR echo BINCUE support ................... : $have_bincue echo LIBVHD support ................... : $have_libvhd echo FBDev DGA support ................ : $WANT_FBDEV_DGA From 1b08f2e9d36cd92abaac732f96da275ac8b97e7d Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 10 Sep 2017 10:49:26 -0400 Subject: [PATCH 156/534] BasiliskII: minor formatting tweak to configure.ac --- BasiliskII/src/Unix/configure.ac | 1 - 1 file changed, 1 deletion(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index edabef2fc..ff200e128 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -298,7 +298,6 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then TEMP_WANT_SDL_VERSION_MAJOR=2 fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then AC_CHECK_SDLFRAMEWORK(SDL2, [#include ], [ WANT_SDL_VERSION_MAJOR=2 From 449936e461ac15325453cf09c892d41c8e0fec24 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 10 Sep 2017 15:19:50 +0000 Subject: [PATCH 157/534] SheepShaver: added --sdlrender option, when on Unix --- SheepShaver/src/Unix/prefs_unix.cpp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/SheepShaver/src/Unix/prefs_unix.cpp b/SheepShaver/src/Unix/prefs_unix.cpp index 7f89a107b..2a81e7bd9 100644 --- a/SheepShaver/src/Unix/prefs_unix.cpp +++ b/SheepShaver/src/Unix/prefs_unix.cpp @@ -41,6 +41,9 @@ prefs_desc platform_prefs_items[] = { {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, #endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, +#ifdef USE_SDL_VIDEO + {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, +#endif {NULL, TYPE_END, false, NULL} // End of list }; From 50986dcf467f793aec7e3ec2005d1f0c7b64758e Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Sun, 10 Sep 2017 14:34:13 -0400 Subject: [PATCH 158/534] Perf: make SDL2 use an ARGB8888 texture, which is natively supported via some GPUs + drivers, such as on OSX. This can remove an extraneous pixel-format conversion. --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 8db972b1c..e1e7ea52a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -777,7 +777,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } SDL_assert(sdl_texture == NULL); - sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_RGB888, SDL_TEXTUREACCESS_STREAMING, width, height); + sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STREAMING, width, height); if (!sdl_texture) { shutdown_sdl_video(); return NULL; From ef26204e6d6b19378d27ef0baf91adeac729d671 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 12 Sep 2017 17:31:05 -0400 Subject: [PATCH 159/534] Perf: make SDL2 backend update less pixels, when updating internal textures and surface(s) --- BasiliskII/src/SDL/video_sdl2.cpp | 89 +++++++++++++++++-------------- 1 file changed, 49 insertions(+), 40 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index e1e7ea52a..5c7d5cf89 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -137,6 +137,8 @@ static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display form static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to +static SDL_Rect sdl_update_video_rect = {0,0,0,0}; // Union of all rects to update, when updating sdl_texture +static SDL_mutex * sdl_update_video_mutex = NULL; // Mutex to protect sdl_update_video_rect static int screen_depth; // Depth of current screen static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table @@ -168,7 +170,6 @@ static void (*video_refresh)(void); // Prototypes static int redraw_func(void *arg); -static int update_sdl_video(); static int present_sdl_video(); static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); static bool is_fullscreen(SDL_Window *); @@ -775,6 +776,10 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags SDL_GetRendererInfo(sdl_renderer, &info); printf("Using SDL_Renderer driver: %s\n", (info.name ? info.name : "(null)")); } + + if (!sdl_update_video_mutex) { + sdl_update_video_mutex = SDL_CreateMutex(); + } SDL_assert(sdl_texture == NULL); sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STREAMING, width, height); @@ -782,6 +787,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } + sdl_update_video_rect = {0,0,0,0}; SDL_assert(guest_surface == NULL); SDL_assert(host_surface == NULL); @@ -861,62 +867,65 @@ static int present_sdl_video() SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black SDL_RenderClear(sdl_renderer); // Clear the display - if (host_surface != guest_surface && + // We're about to work with sdl_update_video_rect, so stop other threads from + // modifying it! + SDL_LockMutex(sdl_update_video_mutex); + + // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. + if (host_surface != guest_surface && host_surface != NULL && guest_surface != NULL) { - SDL_Rect destRect = {0, 0, host_surface->w, host_surface->h}; - if (SDL_BlitSurface(guest_surface, NULL, host_surface, &destRect) != 0) { + SDL_Rect destRect = sdl_update_video_rect; + if (SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect) != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); return -1; } } - - if (SDL_UpdateTexture(sdl_texture, NULL, host_surface->pixels, host_surface->pitch) != 0) { + + // Update the host OS' texture + void * srcPixels = (void *)((uint8_t *)host_surface->pixels + + sdl_update_video_rect.y * host_surface->pitch + + sdl_update_video_rect.x * host_surface->format->BytesPerPixel); + + if (SDL_UpdateTexture(sdl_texture, &sdl_update_video_rect, srcPixels, host_surface->pitch) != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); return -1; } - - SDL_Rect src_rect = {0, 0, host_surface->w, host_surface->h}; - if (SDL_RenderCopy(sdl_renderer, sdl_texture, &src_rect, NULL) != 0) { + + // We are done working with pixels in host_surface. Reset sdl_update_video_rect, then let + // other threads modify it, as-needed. + sdl_update_video_rect = {0,0,0,0}; + SDL_UnlockMutex(sdl_update_video_mutex); + + // Copy the texture to the display + if (SDL_RenderCopy(sdl_renderer, sdl_texture, NULL, NULL) != 0) { return -1; } + // Update the display SDL_RenderPresent(sdl_renderer); - - return 0; + + // Indicate success to the caller! + return 0; } -static int update_sdl_video() +void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) { - // HACK, dludwig@pobox.com: for now, just update the whole screen, via - // VideoInterrupt(), which gets called on the main thread. - // - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - // - // TODO: cache rects to update, then use rects in present_sdl_video() - return 0; + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + + SDL_LockMutex(sdl_update_video_mutex); + for (int i = 0; i < numrects; ++i) { + SDL_UnionRect(&sdl_update_video_rect, &rects[i], &sdl_update_video_rect); + } + SDL_UnlockMutex(sdl_update_video_mutex); } void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) { - // HACK, dludwig@pobox.com: for now, just update the whole screen, via - // VideoInterrupt(), which gets called on the main thread. - // - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - // - // TODO: cache rects to update, then use rects in present_sdl_video() -} - -void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) -{ - // HACK, dludwig@pobox.com: for now, just update the whole screen, via - // VideoInterrupt(), which gets called on the main thread. - // - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - // - // TODO: cache rects to update, then use rects in present_sdl_video() + SDL_Rect temp = {x, y, w, h}; + update_sdl_video(s, 1, &temp); } void driver_base::set_video_mode(int flags) @@ -2406,8 +2415,8 @@ static void update_display_static_bbox(driver_base *drv) // Refresh display if (nr_boxes) - update_sdl_video(); - } + update_sdl_video(drv->s, nr_boxes, boxes); +} // We suggest the compiler to inline the next two functions so that it From 4e5e3377f1cfead70e31170a644f1158fe7d35ce Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 12 Sep 2017 18:35:24 -0400 Subject: [PATCH 160/534] Perf: re-enable VOSF on Xcode-made, OSX-host builds --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 ++ BasiliskII/src/MacOSX/config.h | 1 + BasiliskII/src/SDL/video_sdl2.cpp | 12 ++---------- 3 files changed, 5 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 916f1ad82..8ff0df482 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1316,6 +1316,7 @@ "$(inherited)", "$(LOCAL_LIBRARY_DIR)/Frameworks", ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; @@ -1332,6 +1333,7 @@ "$(inherited)", "$(LOCAL_LIBRARY_DIR)/Frameworks", ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index 76393d478..5dbc78abb 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -43,6 +43,7 @@ /* Define if using video enabled on SEGV signals. */ /* #undef ENABLE_VOSF */ +#define ENABLE_VOSF 1 /* Define if using XFree86 DGA extension. */ /* #undef ENABLE_XF86_DGA */ diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 5c7d5cf89..43b6263ef 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -210,9 +210,6 @@ extern void SysMountFirstFloppy(void); static void *vm_acquire_framebuffer(uint32 size) { -#if __MACOSX__ - return calloc(1, size); -#else // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { @@ -226,16 +223,11 @@ static void *vm_acquire_framebuffer(uint32 size) if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); return fb; -#endif } static inline void vm_release_framebuffer(void *fb, uint32 size) { -#if __MACOSX__ - free(fb); -#else vm_release(fb, size); -#endif } static inline int get_customized_color_depth(int default_depth) @@ -696,7 +688,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags if (guest_surface) { delete_sdl_video_surfaces(); } - + int window_width = width; int window_height = height; Uint32 window_flags = 0; @@ -961,7 +953,7 @@ void driver_base::init() printf("VOSF acceleration is not profitable on this platform, disabling it\n"); use_vosf = false; } - if (!use_vosf) { + if (!use_vosf) { free(the_buffer_copy); vm_release(the_buffer, the_buffer_size); the_host_buffer = NULL; From 7a52abd378f88ed50b40b65e5ecda4eaf15a13f5 Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 12 Sep 2017 22:15:46 -0400 Subject: [PATCH 161/534] bug-fix: video_sdl2.cpp would not compile in pre-C++11 --- BasiliskII/src/SDL/video_sdl2.cpp | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 43b6263ef..3c7177e60 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -779,7 +779,10 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } - sdl_update_video_rect = {0,0,0,0}; + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; SDL_assert(guest_surface == NULL); SDL_assert(host_surface == NULL); @@ -887,7 +890,10 @@ static int present_sdl_video() // We are done working with pixels in host_surface. Reset sdl_update_video_rect, then let // other threads modify it, as-needed. - sdl_update_video_rect = {0,0,0,0}; + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; SDL_UnlockMutex(sdl_update_video_mutex); // Copy the texture to the display From 54ea054993a555af1b9dbc4b86d38d60d2540e3e Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 21:32:48 +0200 Subject: [PATCH 162/534] XCode 9 Project --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8ff0df482..aaa57a80a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1201,6 +1201,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_ANALYZER_NONNULL = YES; CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; @@ -1258,6 +1259,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_ANALYZER_NONNULL = YES; CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; @@ -1310,6 +1312,7 @@ 7539DFC71F23B17E006B2DF2 /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; COMBINE_HIDPI_IMAGES = YES; FRAMEWORK_SEARCH_PATHS = ( @@ -1319,6 +1322,7 @@ GCC_SYMBOLS_PRIVATE_EXTERN = NO; INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; }; @@ -1327,6 +1331,7 @@ 7539DFC81F23B17E006B2DF2 /* Release */ = { isa = XCBuildConfiguration; buildSettings = { + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; COMBINE_HIDPI_IMAGES = YES; FRAMEWORK_SEARCH_PATHS = ( @@ -1336,6 +1341,7 @@ GCC_SYMBOLS_PRIVATE_EXTERN = NO; INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; }; From 1316b64bb7f9d954f2384e96cb54efbf3cef6abf Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 21:37:24 +0200 Subject: [PATCH 163/534] Some Warning removed and 64bits --- BasiliskII/src/MacOSX/sys_darwin.cpp | 6 +++--- BasiliskII/src/Unix/sysdeps.h | 2 +- BasiliskII/src/Unix/timer_unix.cpp | 2 +- BasiliskII/src/include/version.h | 4 ++-- BasiliskII/src/timer.cpp | 2 +- 5 files changed, 8 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/MacOSX/sys_darwin.cpp b/BasiliskII/src/MacOSX/sys_darwin.cpp index 5a798e709..46e6cb5c7 100644 --- a/BasiliskII/src/MacOSX/sys_darwin.cpp +++ b/BasiliskII/src/MacOSX/sys_darwin.cpp @@ -256,10 +256,10 @@ void DarwinAddFloppyPrefs(void) } // Iterate through each floppy - while ( nextFloppy = IOIteratorNext(allFloppies)) + while ( (nextFloppy = IOIteratorNext(allFloppies))) { char bsdPath[MAXPATHLEN]; - long size; + long size = 0; Boolean gotSize = FALSE; CFTypeRef sizeAsCFNumber = IORegistryEntryCreateCFProperty(nextFloppy, @@ -333,7 +333,7 @@ void DarwinAddSerialPrefs(void) } // Iterate through each modem - while ( nextModem = IOIteratorNext(allModems)) + while ( (nextModem = IOIteratorNext(allModems))) { char bsdPath[MAXPATHLEN]; CFTypeRef bsdPathAsCFString = diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 7f8abb05c..b6cfea452 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -219,7 +219,7 @@ typedef uae_u32 uaecptr; /* Timing functions */ extern uint64 GetTicks_usec(void); -extern void Delay_usec(uint32 usec); +extern void Delay_usec(uint64 usec); /* Spinlocks */ #ifdef __GNUC__ diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index 6a5dd4496..f00420e21 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -264,7 +264,7 @@ uint64 GetTicks_usec(void) #define USE_COND_TIMEDWAIT #endif -void Delay_usec(uint32 usec) +void Delay_usec(uint64 usec) { int was_error; diff --git a/BasiliskII/src/include/version.h b/BasiliskII/src/include/version.h index 44819c702..79ba3196d 100644 --- a/BasiliskII/src/include/version.h +++ b/BasiliskII/src/include/version.h @@ -22,8 +22,8 @@ #define VERSION_H const int VERSION_MAJOR = 1; -const int VERSION_MINOR = 0; +const int VERSION_MINOR = 1; -#define VERSION_STRING "Basilisk II V1.0" +#define VERSION_STRING "Basilisk II V1.0 SDL2" #endif diff --git a/BasiliskII/src/timer.cpp b/BasiliskII/src/timer.cpp index 1383d8eeb..316d8d38a 100644 --- a/BasiliskII/src/timer.cpp +++ b/BasiliskII/src/timer.cpp @@ -173,7 +173,7 @@ void TimerReset(void) int16 InsTime(uint32 tm, uint16 trap) { D(bug("InsTime %08lx, trap %04x\n", tm, trap)); - WriteMacInt16(tm + qType, ReadMacInt16(tm + qType) & 0x1fff | (trap << 4) & 0x6000); + WriteMacInt16(tm + qType, (ReadMacInt16(tm + qType) & 0x1fff) | ((trap << 4) & 0x6000)); if (find_desc(tm) >= 0) printf("WARNING: InsTime(): Task re-inserted\n"); else { From 34765ae7407aeece5d8746015f66c0b844c0cd0a Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 21:39:30 +0200 Subject: [PATCH 164/534] Added pref items {"keycodes", {"keycodefile", {"mousewheelmode", {"mousewheellines" to have again international keyboard --- BasiliskII/src/prefs_items.cpp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 834dfc7d6..6da364b0f 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -68,6 +68,10 @@ prefs_desc common_prefs_items[] = { {"jitinline", TYPE_BOOLEAN, false, "enable translation through constant jumps"}, {"jitblacklist", TYPE_STRING, false, "blacklist opcodes from translation"}, {"keyboardtype", TYPE_INT32, false, "hardware keyboard type"}, + {"keycodes",TYPE_BOOLEAN,false,"use raw keycode"}, + {"keycodefile",TYPE_STRING,"Keycode file"}, + {"mousewheelmode",TYPE_BOOLEAN,"Use WheelMode"}, + {"mousewheellines",TYPE_INT32,"wheel line nb"}, {NULL, TYPE_END, false, NULL} // End of list }; From 7b8beab25a738ced449f7568ea571e3516f870d1 Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 21:41:12 +0200 Subject: [PATCH 165/534] Basilisk Macbook Keycode French Macbook Keycode file --- BasiliskII/src/MacOSX/BasiliskII_keycodes | 576 ++++++++++++++++++++++ 1 file changed, 576 insertions(+) create mode 100644 BasiliskII/src/MacOSX/BasiliskII_keycodes diff --git a/BasiliskII/src/MacOSX/BasiliskII_keycodes b/BasiliskII/src/MacOSX/BasiliskII_keycodes new file mode 100644 index 000000000..cfdc7f5f7 --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII_keycodes @@ -0,0 +1,576 @@ +# /usr/share/BasiliskII/keycodes +# +# Basilisk II (C) 1997-2005 Christian Bauer +# +# This file is used to translate the (server-specific) scancodes to +# Mac keycodes depending on the window server being used. +# +# The format of this file is as follows: +# +# sdl +# +# +# +# ... +# sdl +# +# +# ... +# +# The "driver string" must match the first part of the SDL driver vendor +# description as reported by SDL_VideoDriverName(). If a match is found, +# the keycode translation table is constructed from the following +# lines. Each line contains an SDL scancode followed by its associated +# Mac keycode. Both keycodes have to be given in decimal. Lines +# beginning with "#" or ";" are treated as comments and ignored. +# + +# +# Cocoa French Keyboard +# + +sdl cocoa +41 53 # Esc +58 122 # F1 +59 120 # F2 +60 99 # F3 +61 118 # F4 +62 96 # F5 +63 97 # F6 +64 98 # F7 +65 100 # F8 +66 101 # F9 +67 109 # F10 +68 103 # F11 +69 111 # F12 +70 105 # F13/PrintScrn +71 107 # F14/Scroll Lock +72 113 # F15/Pause +53 10 # ` +30 18 # 1 +31 19 # 2 +32 20 # 3 +33 21 # 4 +34 23 # 5 +35 22 # 6 +36 26 # 7 +37 28 # 8 +38 25 # 9 +39 29 # 0 +45 27 # - +46 24 # = +42 51 # Backspace +73 114 # Help/Insert +74 115 # Home +75 116 # Page Up +83 71 # Num Lock +81 81 # KP = +84 75 # KP / +85 67 # KP * +43 48 # Tab +20 12 # Q +26 13 # W +8 14 # E +21 15 # R +23 17 # T +28 16 # Y +24 32 # U +12 34 # I +18 31 # O +19 35 # P +47 33 # [ +48 30 # ] +40 36 # Return +76 117 # Delete +77 119 # End +78 121 # Page Down +95 89 # KP 7 +96 91 # KP 8 +97 92 # KP 9 +86 78 # KP - +130 57 # Caps Lock +4 0 # A +22 1 # S +7 2 # D +9 3 # F +10 5 # G +11 4 # H +13 38 # J +14 40 # K +15 37 # L +51 41 # ; +52 39 # ' +49 42 # \ +92 86 # KP 4 +93 87 # KP 5 +94 88 # KP 6 +87 69 # KP + +56 56 # Shift +100 50 # International SDL_NONUSBACKSLASH +29 6 # Z +27 7 # X +6 8 # C +25 9 # V +5 11 # B +17 45 # N +16 46 # M +54 43 # , +55 47 # . +56 44 # / +82 62 # Cursor Up +80 59 # Cursor Left +81 61 # Cursor Down +79 60 # Cursor Right +83 83 # KP 1 +84 84 # KP 2 +85 85 # KP 3 +76 76 # KP Enter +228 54 # Ctrl +226 58 # Option +227 55 # Command +224 54 # Ctrl Left +230 58 # Right Alt->option +231 55 # Right cmd +44 49 # Space +82 82 # KP 0 +65 65 # KP . + +# +# X11 server +# +sdl x11 +sdl dga +9 53 # Esc +67 122 # F1 +68 120 # F2 +69 99 # F3 +70 118 # F4 +71 96 # F5 +72 97 # F6 +73 98 # F7 +74 100 # F8 +75 101 # F9 +76 109 # F10 +95 103 # F11 +96 111 # F12 +111 105 # PrintScrn +78 107 # Scroll Lock +110 113 # Pause +49 10 # ` +10 18 # 1 +11 19 # 2 +12 20 # 3 +13 21 # 4 +14 23 # 5 +15 22 # 6 +16 26 # 7 +17 28 # 8 +18 25 # 9 +19 29 # 0 +20 27 # - +21 24 # = +22 51 # Backspace +106 114 # Insert +97 115 # Home +99 116 # Page Up +77 71 # Num Lock +112 75 # KP / +63 67 # KP * +82 78 # KP - +23 48 # Tab +24 12 # Q +25 13 # W +26 14 # E +27 15 # R +28 17 # T +29 16 # Y +30 32 # U +31 34 # I +32 31 # O +33 35 # P +34 33 # [ +35 30 # ] +36 36 # Return +107 117 # Delete +103 119 # End +105 121 # Page Down +79 89 # KP 7 +80 91 # KP 8 +81 92 # KP 9 +86 69 # KP + +66 57 # Caps Lock +38 0 # A +39 1 # S +40 2 # D +41 3 # F +42 5 # G +43 4 # H +44 38 # J +45 40 # K +46 37 # L +47 41 # ; +48 39 # ' +83 86 # KP 4 +84 87 # KP 5 +85 88 # KP 6 +50 56 # Shift Left +94 50 # International +52 6 # Z +53 7 # X +54 8 # C +55 9 # V +56 11 # B +57 45 # N +58 46 # M +59 43 # , +60 47 # . +61 44 # / +62 56 # Shift Right +51 42 # \ +98 62 # Cursor Up +87 83 # KP 1 +88 84 # KP 2 +89 85 # KP 3 +108 76 # KP Enter +37 54 # Ctrl Left +115 58 # Logo Left (-> Option) +64 55 # Alt Left (-> Command) +65 49 # Space +113 55 # Alt Right (-> Command) +116 58 # Logo Right (-> Option) +117 50 # Menu (-> International) +109 54 # Ctrl Right +100 59 # Cursor Left +104 61 # Cursor Down +102 60 # Cursor Right +90 82 # KP 0 +91 65 # KP . + +# +# Linux Framebuffer Console +# +sdl fbcon +1 53 # Esc +59 122 # F1 +60 120 # F2 +61 99 # F3 +62 118 # F4 +63 96 # F5 +64 97 # F6 +65 98 # F7 +66 100 # F8 +67 101 # F9 +68 109 # F10 +87 103 # F11 +88 111 # F12 +99 105 # PrintScrn +70 107 # Scroll Lock +119 113 # Pause +41 10 # ` +2 18 # 1 +3 19 # 2 +4 20 # 3 +5 21 # 4 +6 23 # 5 +7 22 # 6 +8 26 # 7 +9 28 # 8 +10 25 # 9 +11 29 # 0 +12 27 # - +13 24 # = +14 51 # Backspace +110 114 # Insert +102 115 # Home +104 116 # Page Up +69 71 # Num Lock +98 75 # KP / +55 67 # KP * +74 78 # KP - +15 48 # Tab +16 12 # Q +17 13 # W +18 14 # E +19 15 # R +20 17 # T +21 16 # Y +22 32 # U +23 34 # I +24 31 # O +25 35 # P +26 33 # [ +27 30 # ] +28 36 # Return +111 117 # Delete +107 119 # End +109 121 # Page Down +71 89 # KP 7 +72 91 # KP 8 +73 92 # KP 9 +78 69 # KP + +58 57 # Caps Lock +30 0 # A +31 1 # S +32 2 # D +33 3 # F +34 5 # G +35 4 # H +36 38 # J +37 40 # K +38 37 # L +39 41 # ; +40 39 # ' +75 86 # KP 4 +76 87 # KP 5 +77 88 # KP 6 +42 56 # Shift Left +86 50 # International +44 6 # Z +45 7 # X +46 8 # C +47 9 # V +48 11 # B +49 45 # N +50 46 # M +51 43 # , +52 47 # . +53 44 # / +54 56 # Shift Right +43 42 # \ +103 62 # Cursor Up +79 83 # KP 1 +80 84 # KP 2 +81 85 # KP 3 +96 76 # KP Enter +29 54 # Ctrl Left +125 58 # Logo Left (-> Option) +56 55 # Alt Left (-> Command) +57 49 # Space +100 55 # Alt Right (-> Command) +126 58 # Logo Right (-> Option) +97 54 # Ctrl Right +105 59 # Cursor Left +108 61 # Cursor Down +106 60 # Cursor Right +82 82 # KP 0 +83 65 # KP . + +# +# Quartz (1:1 translation actually) +# +sdl Quartz +41 53 # Esc +58 122 # F1 +59 120 # F2 +60 99 # F3 +61 118 # F4 +62 96 # F5 +63 97 # F6 +64 98 # F7 +65 100 # F8 +66 101 # F9 +67 109 # F10 +68 103 # F11 +69 111 # F12 +70 105 # F13/PrintScrn +71 107 # F14/Scroll Lock +72 113 # F15/Pause +52 10 # ` +30 18 # 1 +31 19 # 2 +32 20 # 3 +33 21 # 4 +34 23 # 5 +35 22 # 6 +36 26 # 7 +37 28 # 8 +38 25 # 9 +39 29 # 0 +45 27 # - +24 24 # = +42 51 # Backspace +114 114 # Help/Insert +74 115 # Home +75 116 # Page Up +83 71 # Num Lock +81 81 # KP = +84 75 # KP / +85 67 # KP * +48 48 # Tab +20 12 # Q +26 13 # W +8 14 # E +21 15 # R +23 17 # T +28 16 # Y +24 32 # U +12 34 # I +18 31 # O +19 35 # P +47 33 # [ +48 30 # ] +40 36 # Return +117 117 # Delete +119 119 # End +121 121 # Page Down +95 89 # KP 7 +96 91 # KP 8 +97 92 # KP 9 +86 78 # KP - +57 57 # Caps Lock +4 0 # A +22 1 # S +7 2 # D +9 3 # F +10 5 # G +11 4 # H +13 38 # J +14 40 # K +15 37 # L +51 41 # ; +52 39 # ' +49 42 # \ +92 86 # KP 4 +93 87 # KP 5 +94 88 # KP 6 +87 69 # KP + +56 56 # Shift +100 50 # International SDL_NONUSBACKSLASH +29 6 # Z +27 7 # X +6 8 # C +25 9 # V +5 11 # B +17 45 # N +16 46 # M +54 43 # , +55 47 # . +56 44 # / +126 62 # Cursor Up +123 59 # Cursor Left +125 61 # Cursor Down +124 60 # Cursor Right +83 83 # KP 1 +84 84 # KP 2 +85 85 # KP 3 +76 76 # KP Enter +228 54 # Ctrl +226 58 # Option +227 55 # Command +224 54 # Ctrl Left +230 58 # Right Alt->option +231 55 # Right cmd +44 49 # Space +82 82 # KP 0 +65 65 # KP . + +# +# Windows +# +sdl windib +sdl directx +1 53 # Esc +59 122 # F1 +60 120 # F2 +61 99 # F3 +62 118 # F4 +63 96 # F5 +64 97 # F6 +65 98 # F7 +66 100 # F8 +67 101 # F9 +68 109 # F10 +87 103 # F11 +88 111 # F12 +183 105 # PrintScrn +70 107 # Scroll Lock +197 113 # Pause +41 10 # ` +2 18 # 1 +3 19 # 2 +4 20 # 3 +5 21 # 4 +6 23 # 5 +7 22 # 6 +8 26 # 7 +9 28 # 8 +10 25 # 9 +11 29 # 0 +12 27 # - +13 24 # = +14 51 # Backspace +210 114 # Insert +199 115 # Home +75 116 # Page Up +69 71 # Num Lock +181 75 # KP / +55 67 # KP * +74 78 # KP - +15 48 # Tab +16 12 # Q +17 13 # W +18 14 # E +19 15 # R +20 17 # T +21 16 # Y +22 32 # U +23 34 # I +24 31 # O +25 35 # P +26 33 # [ +27 30 # ] +28 36 # Return +211 117 # Delete +207 119 # End +209 121 # Page Down +71 89 # KP 7 +72 91 # KP 8 +73 92 # KP 9 +78 69 # KP + +58 57 # Caps Lock +30 0 # A +31 1 # S +32 2 # D +33 3 # F +34 5 # G +35 4 # H +36 38 # J +37 40 # K +38 37 # L +39 41 # ; +40 39 # ' +75 86 # KP 4 +76 87 # KP 5 +77 88 # KP 6 +225 56 # Shift Left +100 50 # International +44 6 # Z +45 7 # X +46 8 # C +47 9 # V +48 11 # B +49 45 # N +50 46 # M +51 43 # , +52 47 # . +53 44 # / +229 56 # Shift Right +43 42 # \ +200 62 # Cursor Up +79 83 # KP 1 +80 84 # KP 2 +81 85 # KP 3 +156 76 # KP Enter +224 54 # Ctrl Left +227 58 # Logo Left (-> Option) +226 55 # Alt Left (-> Command) +57 49 # Space +230 55 # Alt Right (-> Command) +231 58 # Logo Right (-> Option) +221 50 # Menu (-> International) +157 54 # Ctrl Right +80 59 # Cursor Left +81 61 # Cursor Down +79 60 # Cursor Right +98 82 # KP 0 +99 65 # KP . From 000ec0f135c7509a13b3c2bacd26f9ce27503c80 Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 22:33:01 +0200 Subject: [PATCH 166/534] 64 bits slirp ? --- BasiliskII/src/slirp/tcp_input.c | 6 +++++- BasiliskII/src/slirp/udp.c | 5 ++++- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index 032e5378e..5c06f16f5 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -292,7 +292,11 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; + //ti->ti_next = ti->ti_prev = 0; + + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); len = sizeof(struct ip) + tlen; diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index deedb1e75..9d805ff37 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -272,7 +272,10 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; + //ui->ui_next = ui->ui_prev = 0; + + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ From 4682bb80a1afd69e365a0e448fcba7dd68f8c242 Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 22:34:56 +0200 Subject: [PATCH 167/534] SLIRP 0.9.1 --- BasiliskII/src/slirp/COPYRIGHT | 5 +- BasiliskII/src/slirp/bootp.c | 48 +- BasiliskII/src/slirp/bootp.h | 10 +- BasiliskII/src/slirp/cksum.c | 20 +- BasiliskII/src/slirp/debug.c | 142 ++-- BasiliskII/src/slirp/debug.h | 16 +- BasiliskII/src/slirp/icmp_var.h | 8 +- BasiliskII/src/slirp/if.c | 97 +-- BasiliskII/src/slirp/if.h | 37 +- BasiliskII/src/slirp/ip.h | 52 +- BasiliskII/src/slirp/ip_icmp.c | 84 ++- BasiliskII/src/slirp/ip_icmp.h | 22 +- BasiliskII/src/slirp/ip_input.c | 101 +-- BasiliskII/src/slirp/ip_output.c | 51 +- BasiliskII/src/slirp/libslirp.h | 24 +- BasiliskII/src/slirp/main.h | 5 +- BasiliskII/src/slirp/mbuf.c | 95 +-- BasiliskII/src/slirp/mbuf.h | 33 +- BasiliskII/src/slirp/misc.c | 377 ++++++---- BasiliskII/src/slirp/misc.h | 48 +- BasiliskII/src/slirp/sbuf.c | 64 +- BasiliskII/src/slirp/sbuf.h | 17 +- BasiliskII/src/slirp/slirp.c | 314 ++++---- BasiliskII/src/slirp/slirp.h | 178 +++-- BasiliskII/src/slirp/slirp_config.h | 85 ++- BasiliskII/src/slirp/socket.c | 224 +++--- BasiliskII/src/slirp/socket.h | 47 +- BasiliskII/src/slirp/tcp.h | 24 +- BasiliskII/src/slirp/tcp_input.c | 1048 +++++++++++++-------------- BasiliskII/src/slirp/tcp_output.c | 116 +-- BasiliskII/src/slirp/tcp_subr.c | 418 ++++++----- BasiliskII/src/slirp/tcp_timer.c | 73 +- BasiliskII/src/slirp/tcp_timer.h | 19 +- BasiliskII/src/slirp/tcp_var.h | 9 +- BasiliskII/src/slirp/tcpip.h | 6 +- BasiliskII/src/slirp/tftp.c | 149 +++- BasiliskII/src/slirp/tftp.h | 15 +- BasiliskII/src/slirp/udp.c | 209 +++--- BasiliskII/src/slirp/udp.h | 37 +- 39 files changed, 2310 insertions(+), 2017 deletions(-) diff --git a/BasiliskII/src/slirp/COPYRIGHT b/BasiliskII/src/slirp/COPYRIGHT index b7d6568ea..3f331ee07 100644 --- a/BasiliskII/src/slirp/COPYRIGHT +++ b/BasiliskII/src/slirp/COPYRIGHT @@ -16,7 +16,7 @@ The copyright terms and conditions: ---BEGIN--- Copyright (c) 1995,1996 Danny Gasparovski. All rights reserved. - + Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: @@ -25,6 +25,9 @@ The copyright terms and conditions: 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. + 3. All advertising materials mentioning features or use of this software + must display the following acknowledgment: + This product includes software developed by Danny Gasparovski. THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c index a51b80c95..3ae3db209 100644 --- a/BasiliskII/src/slirp/bootp.c +++ b/BasiliskII/src/slirp/bootp.c @@ -1,8 +1,8 @@ /* * QEMU BOOTP/DHCP server - * + * * Copyright (c) 2004 Fabrice Bellard - * + * * 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 @@ -38,8 +38,17 @@ typedef struct { BOOTPClient bootp_clients[NB_ADDR]; +const char *bootp_filename; + static const uint8_t rfc1533_cookie[] = { RFC1533_COOKIE }; +#ifdef DEBUG +#define dprintf(fmt, args...) \ +if (slirp_debug & DBG_CALL) { fprintf(dfd, fmt, ## args); fflush(dfd); } +#else +#define dprintf(fmt, args...) +#endif + static BOOTPClient *get_new_addr(struct in_addr *paddr) { BOOTPClient *bc; @@ -80,7 +89,7 @@ static void dhcp_decode(const uint8_t *buf, int size, const uint8_t *p, *p_end; int len, tag; - *pmsg_type = 0; + *pmsg_type = 0; p = buf; p_end = buf + size; @@ -92,7 +101,7 @@ static void dhcp_decode(const uint8_t *buf, int size, while (p < p_end) { tag = p[0]; if (tag == RFC1533_PAD) { - p++; + p++; } else if (tag == RFC1533_END) { break; } else { @@ -100,6 +109,7 @@ static void dhcp_decode(const uint8_t *buf, int size, if (p >= p_end) break; len = *p++; + dprintf("dhcp: tag=0x%02x len=%d\n", tag, len); switch(tag) { case RFC2132_MSG_TYPE: @@ -126,19 +136,20 @@ static void bootp_reply(struct bootp_t *bp) /* extract exact DHCP msg type */ dhcp_decode(bp->bp_vend, DHCP_OPT_LEN, &dhcp_msg_type); - + dprintf("bootp packet op=%d msgtype=%d\n", bp->bp_op, dhcp_msg_type); + if (dhcp_msg_type == 0) dhcp_msg_type = DHCPREQUEST; /* Force reply for old BOOTP clients */ - - if (dhcp_msg_type != DHCPDISCOVER && + + if (dhcp_msg_type != DHCPDISCOVER && dhcp_msg_type != DHCPREQUEST) return; /* XXX: this is a hack to get the client mac address */ memcpy(client_ethaddr, bp->bp_hwaddr, 6); - + if ((m = m_get()) == NULL) return; - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; rbp = (struct bootp_t *)m->m_data; m->m_data += sizeof(struct udpiphdr); memset(rbp, 0, sizeof(struct bootp_t)); @@ -146,8 +157,10 @@ static void bootp_reply(struct bootp_t *bp) if (dhcp_msg_type == DHCPDISCOVER) { new_addr: bc = get_new_addr(&daddr.sin_addr); - if (!bc) + if (!bc) { + dprintf("no address left\n"); return; + } memcpy(bc->macaddr, client_ethaddr, 6); } else { bc = find_addr(&daddr.sin_addr, bp->bp_hwaddr); @@ -158,6 +171,11 @@ static void bootp_reply(struct bootp_t *bp) } } + if (bootp_filename) + snprintf(rbp->bp_file, sizeof(rbp->bp_file), "%s", bootp_filename); + + dprintf("offered addr=%08x\n", ntohl(daddr.sin_addr.s_addr)); + saddr.sin_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_ALIAS); saddr.sin_port = htons(BOOTP_SERVER); @@ -185,7 +203,7 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 1; *q++ = DHCPACK; } - + if (dhcp_msg_type == DHCPDISCOVER || dhcp_msg_type == DHCPREQUEST) { *q++ = RFC2132_SRV_ID; @@ -199,12 +217,12 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 0xff; *q++ = 0xff; *q++ = 0x00; - + *q++ = RFC1533_GATEWAY; *q++ = 4; memcpy(q, &saddr.sin_addr, 4); q += 4; - + *q++ = RFC1533_DNS; *q++ = 4; dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); @@ -226,8 +244,8 @@ static void bootp_reply(struct bootp_t *bp) } } *q++ = RFC1533_END; - - m->m_len = sizeof(struct bootp_t) - + + m->m_len = sizeof(struct bootp_t) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); } diff --git a/BasiliskII/src/slirp/bootp.h b/BasiliskII/src/slirp/bootp.h index 54a86ca22..e48f53f37 100644 --- a/BasiliskII/src/slirp/bootp.h +++ b/BasiliskII/src/slirp/bootp.h @@ -90,10 +90,6 @@ #define BOOTP_VENDOR_LEN 64 #define DHCP_OPT_LEN 312 -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct bootp_t { struct ip ip; struct udphdr udp; @@ -112,10 +108,6 @@ struct bootp_t { uint8_t bp_sname[64]; uint8_t bp_file[128]; uint8_t bp_vend[DHCP_OPT_LEN]; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; void bootp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c index 66d3f230a..b98373b51 100644 --- a/BasiliskII/src/slirp/cksum.c +++ b/BasiliskII/src/slirp/cksum.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,7 +41,7 @@ * * This routine is very heavily used in the network * code and should be modified for each CPU to be as fast as possible. - * + * * XXX Since we will never span more than 1 mbuf, we can optimise this */ @@ -59,13 +63,13 @@ int cksum(struct mbuf *m, int len) u_int16_t s[2]; u_int32_t l; } l_util; - + if (m->m_len == 0) goto cont; w = mtod(m, u_int16_t *); - + mlen = m->m_len; - + if (len < mlen) mlen = len; len -= mlen; @@ -103,7 +107,7 @@ int cksum(struct mbuf *m, int len) while ((mlen -= 2) >= 0) { sum += *w++; } - + if (byte_swapped) { REDUCE; sum <<= 8; @@ -113,11 +117,11 @@ int cksum(struct mbuf *m, int len) sum += s_util.s; mlen = 0; } else - + mlen = -1; } else if (mlen == -1) s_util.c[0] = *(u_int8_t *)w; - + cont: #ifdef DEBUG if (len) { diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c index 916b9a8e0..7c8581d63 100644 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -1,8 +1,8 @@ /* * Copyright (c) 1995 Danny Gasparovski. * Portions copyright (c) 2000 Kelly Price. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -16,8 +16,11 @@ int dostats = 0; #endif int slirp_debug = 0; -/* Carry over one item from main.c so that the tty's restored. +extern char *strerror _P((int)); + +/* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ +#ifndef CONFIG_QEMU extern struct termios slirp_tty_settings; extern int slirp_tty_restore; @@ -30,7 +33,7 @@ debug_init(file, dbg) /* Close the old debugging file */ if (dfd) fclose(dfd); - + dfd = fopen(file,"w"); if (dfd != NULL) { #if 0 @@ -56,7 +59,7 @@ dump_packet(dat, n) { u_char *pptr = (u_char *)dat; int j,k; - + n /= 16; n++; DEBUG_MISC((dfd, "PACKET DUMPED: \n")); @@ -68,28 +71,30 @@ dump_packet(dat, n) } } #endif +#endif +#ifdef LOG_ENABLED #if 0 /* * Statistic routines - * + * * These will print statistics to the screen, the debug file (dfd), or * a buffer, depending on "type", so that the stats can be sent over * the link as well. */ -void +static void ttystats(ttyp) struct ttys *ttyp; { struct slirp_ifstats *is = &ttyp->ifstats; char buff[512]; - + lprint(" \r\n"); - - if (if_comp & IF_COMPRESS) + + if (IF_COMP & IF_COMPRESS) strcpy(buff, "on"); - else if (if_comp & IF_NOCOMPRESS) + else if (IF_COMP & IF_NOCOMPRESS) strcpy(buff, "off"); else strcpy(buff, "off (for now)"); @@ -117,20 +122,20 @@ ttystats(ttyp) lprint(" %6d bad input packets\r\n", is->in_mbad); } -void -allttystats() +static void +allttystats(void) { struct ttys *ttyp; - + for (ttyp = ttys; ttyp; ttyp = ttyp->next) ttystats(ttyp); } #endif -void -ipstats() +static void +ipstats(void) { - lprint(" \r\n"); + lprint(" \r\n"); lprint("IP stats:\r\n"); lprint(" %6d total packets received (%d were unaligned)\r\n", @@ -151,14 +156,14 @@ ipstats() lprint(" %6d total packets delivered\r\n", ipstat.ips_delivered); } -#if 0 -void -vjstats() +#ifndef CONFIG_QEMU +static void +vjstats(void) { lprint(" \r\n"); - + lprint("VJ compression stats:\r\n"); - + lprint(" %6d outbound packets (%d compressed)\r\n", comp_s.sls_packets, comp_s.sls_compressed); lprint(" %6d searches for connection stats (%d misses)\r\n", @@ -170,13 +175,13 @@ vjstats() } #endif -void -tcpstats() +static void +tcpstats(void) { lprint(" \r\n"); lprint("TCP stats:\r\n"); - + lprint(" %6d packets sent\r\n", tcpstat.tcps_sndtotal); lprint(" %6d data packets (%d bytes)\r\n", tcpstat.tcps_sndpack, tcpstat.tcps_sndbyte); @@ -189,8 +194,8 @@ tcpstats() lprint(" %6d window update packets\r\n", tcpstat.tcps_sndwinup); lprint(" %6d control (SYN/FIN/RST) packets\r\n", tcpstat.tcps_sndctrl); lprint(" %6d times tcp_output did nothing\r\n", tcpstat.tcps_didnuttin); - - lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); + + lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); lprint(" %6d acks (for %d bytes)\r\n", tcpstat.tcps_rcvackpack, tcpstat.tcps_rcvackbyte); lprint(" %6d duplicate acks\r\n", tcpstat.tcps_rcvdupack); @@ -199,7 +204,7 @@ tcpstats() tcpstat.tcps_rcvpack, tcpstat.tcps_rcvbyte); lprint(" %6d completely duplicate packets (%d bytes)\r\n", tcpstat.tcps_rcvduppack, tcpstat.tcps_rcvdupbyte); - + lprint(" %6d packets with some duplicate data (%d bytes duped)\r\n", tcpstat.tcps_rcvpartduppack, tcpstat.tcps_rcvpartdupbyte); lprint(" %6d out-of-order packets (%d bytes)\r\n", @@ -212,7 +217,7 @@ tcpstats() lprint(" %6d discarded for bad checksums\r\n", tcpstat.tcps_rcvbadsum); lprint(" %6d discarded for bad header offset fields\r\n", tcpstat.tcps_rcvbadoff); - + lprint(" %6d connection requests\r\n", tcpstat.tcps_connattempt); lprint(" %6d connection accepts\r\n", tcpstat.tcps_accepts); lprint(" %6d connections established (including accepts)\r\n", tcpstat.tcps_connects); @@ -231,15 +236,15 @@ tcpstats() lprint(" %6d correct ACK header predictions\r\n", tcpstat.tcps_predack); lprint(" %6d correct data packet header predictions\n", tcpstat.tcps_preddat); lprint(" %6d TCP cache misses\r\n", tcpstat.tcps_socachemiss); - - + + /* lprint(" Packets received too short: %d\r\n", tcpstat.tcps_rcvshort); */ /* lprint(" Segments dropped due to PAWS: %d\r\n", tcpstat.tcps_pawsdrop); */ } -void -udpstats() +static void +udpstats(void) { lprint(" \r\n"); @@ -252,8 +257,8 @@ udpstats() lprint(" %6d datagrams sent\r\n", udpstat.udps_opackets); } -void -icmpstats() +static void +icmpstats(void) { lprint(" \r\n"); lprint("ICMP stats:\r\n"); @@ -265,23 +270,23 @@ icmpstats() lprint(" %6d ICMP packets sent in reply\r\n", icmpstat.icps_reflect); } -void -mbufstats() +static void +mbufstats(void) { struct mbuf *m; int i; - + lprint(" \r\n"); - + lprint("Mbuf stats:\r\n"); lprint(" %6d mbufs allocated (%d max)\r\n", mbuf_alloced, mbuf_max); - + i = 0; for (m = m_freelist.m_next; m != &m_freelist; m = m->m_next) i++; lprint(" %6d mbufs on free list\r\n", i); - + i = 0; for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) i++; @@ -289,59 +294,55 @@ mbufstats() lprint(" %6d mbufs queued as packets\r\n\r\n", if_queued); } -void -sockstats() +static void +sockstats(void) { - char addr[INET_ADDRSTRLEN]; char buff[256]; int n; struct socket *so; lprint(" \r\n"); - + lprint( "Proto[state] Sock Local Address, Port Remote Address, Port RecvQ SendQ\r\n"); - + for (so = tcb.so_next; so != &tcb; so = so->so_next) { - + n = sprintf(buff, "tcp[%s]", so->so_tcpcb?tcpstates[so->so_tcpcb->t_state]:"NONE"); while (n < 17) buff[n++] = ' '; buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } - + for (so = udb.so_next; so != &udb; so = so->so_next) { - + n = sprintf(buff, "udp[%d sec]", (so->so_expire - curtime) / 1000); while (n < 17) buff[n++] = ' '; buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } } +#endif -#if 0 +#ifndef CONFIG_QEMU void slirp_exit(exit_status) int exit_status; { struct ttys *ttyp; - + DEBUG_CALL("slirp_exit"); DEBUG_ARG("exit_status = %d", exit_status); @@ -350,7 +351,7 @@ slirp_exit(exit_status) if (!dfd) debug_init("slirp_stats", 0xf); lprint_arg = (char **)&dfd; - + ipstats(); tcpstats(); udpstats(); @@ -360,20 +361,35 @@ slirp_exit(exit_status) allttystats(); vjstats(); } - + for (ttyp = ttys; ttyp; ttyp = ttyp->next) tty_detached(ttyp, 1); - + if (slirp_forked) { /* Menendez time */ if (kill(getppid(), SIGQUIT) < 0) lprint("Couldn't kill parent process %ld!\n", (long) getppid()); } - + /* Restore the terminal if we gotta */ if(slirp_tty_restore) tcsetattr(0,TCSANOW, &slirp_tty_settings); /* NOW DAMMIT! */ exit(exit_status); } #endif + +void +slirp_stats(void) +{ +#ifdef LOG_ENABLED + ipstats(); + tcpstats(); + udpstats(); + icmpstats(); + mbufstats(); + sockstats(); +#else + lprint("SLIRP statistics code not compiled.\n"); +#endif +} diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h index c5d42195e..8a523b2ed 100644 --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -36,15 +36,5 @@ extern int slirp_debug; #endif -void debug_init(char *, int); -//void ttystats(struct ttys *); -void allttystats(void); -void ipstats(void); -void vjstats(void); -void tcpstats(void); -void udpstats(void); -void icmpstats(void); -void mbufstats(void); -void sockstats(void); -void slirp_exit(int); +void debug_init _P((char *, int)); diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h index 9af222fb7..cd865b797 100644 --- a/BasiliskII/src/slirp/icmp_var.h +++ b/BasiliskII/src/slirp/icmp_var.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -60,6 +64,8 @@ struct icmpstat { { "stats", CTLTYPE_STRUCT }, \ } +#ifdef LOG_ENABLED extern struct icmpstat icmpstat; +#endif #endif diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c index 9185dcf65..67a7b6ff8 100644 --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -7,12 +7,7 @@ #include -size_t if_mtu, if_mru; -int if_comp; -int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ +int if_queued = 0; /* Number of packets queued so far */ struct mbuf if_fastq; /* fast queue (for interactive data) */ struct mbuf if_batchq; /* queue for non-interactive data */ @@ -41,23 +36,6 @@ ifs_remque(ifm) void if_init() { -#if 0 - /* - * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, - * and 8 bytes for PPP, but need to have it on an 8byte boundary - */ -#ifdef USE_PPP - if_maxlinkhdr = 48; -#else - if_maxlinkhdr = 40; -#endif -#else - /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ - if_maxlinkhdr = 2 + 14 + 40; -#endif - if_mtu = 1500; - if_mru = 1500; - if_comp = IF_AUTOCOMP; if_fastq.ifq_next = if_fastq.ifq_prev = &if_fastq; if_batchq.ifq_next = if_batchq.ifq_prev = &if_batchq; // sl_compress_init(&comp_s); @@ -77,12 +55,12 @@ writen(fd, bptr, n) { int ret; int total; - + /* This should succeed most of the time */ ret = send(fd, bptr, n,0); if (ret == n || ret <= 0) return ret; - + /* Didn't write everything, go into the loop */ total = ret; while (n > total) { @@ -97,7 +75,7 @@ writen(fd, bptr, n) /* * if_input - read() the tty, do "top level" processing (ie: check for any escapes), * and pass onto (*ttyp->if_input) - * + * * XXXXX Any zeros arriving by themselves are NOT placed into the arriving packet. */ #define INBUFF_SIZE 2048 /* XXX */ @@ -107,17 +85,16 @@ if_input(ttyp) { u_char if_inbuff[INBUFF_SIZE]; int if_n; - + DEBUG_CALL("if_input"); DEBUG_ARG("ttyp = %lx", (long)ttyp); - + if_n = recv(ttyp->fd, (char *)if_inbuff, INBUFF_SIZE,0); - + DEBUG_MISC((dfd, " read %d bytes\n", if_n)); - + if (if_n <= 0) { - int error = WSAGetLastError(); - if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { + if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { if (ttyp->up) link_up--; tty_detached(ttyp, 0); @@ -139,19 +116,19 @@ if_input(ttyp) } } ttyp->ones = ttyp->zeros = 0; - + (*ttyp->if_input)(ttyp, if_inbuff, if_n); } -#endif - +#endif + /* * if_output: Queue packet into an output queue. - * There are 2 output queue's, if_fastq and if_batchq. + * There are 2 output queue's, if_fastq and if_batchq. * Each output queue is a doubly linked list of double linked lists * of mbufs, each list belonging to one "session" (socket). This * way, we can output packets fairly by sending one packet from each * session, instead of all the packets from one session, then all packets - * from the next session, etc. Packets on the if_fastq get absolute + * from the next session, etc. Packets on the if_fastq get absolute * priority, but if one session hogs the link, it gets "downgraded" * to the batchq until it runs out of packets, then it'll return * to the fastq (eg. if the user does an ls -alR in a telnet session, @@ -164,11 +141,11 @@ if_output(so, ifm) { struct mbuf *ifq; int on_fastq = 1; - + DEBUG_CALL("if_output"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("ifm = %lx", (long)ifm); - + /* * First remove the mbuf from m_usedlist, * since we're gonna use m_next and m_prev ourselves @@ -178,9 +155,9 @@ if_output(so, ifm) remque(ifm); ifm->m_flags &= ~M_USEDLIST; } - + /* - * See if there's already a batchq list for this session. + * See if there's already a batchq list for this session. * This can include an interactive session, which should go on fastq, * but gets too greedy... hence it'll be downgraded from fastq to batchq. * We mustn't put this packet back on the fastq (or we'll send it out of order) @@ -194,7 +171,7 @@ if_output(so, ifm) goto diddit; } } - + /* No match, check which queue to put it on */ if (so && (so->so_iptos & IPTOS_LOWDELAY)) { ifq = if_fastq.ifq_prev; @@ -210,15 +187,15 @@ if_output(so, ifm) } } else ifq = if_batchq.ifq_prev; - + /* Create a new doubly linked list for this session */ ifm->ifq_so = so; ifs_init(ifm); insque(ifm, ifq); - + diddit: ++if_queued; - + if (so) { /* Update *_queued */ so->so_queued++; @@ -230,12 +207,12 @@ if_output(so, ifm) * have been sent over the link * (XXX These are arbitrary numbers, probably not optimal..) */ - if (on_fastq && ((so->so_nqueued >= 6) && + if (on_fastq && ((so->so_nqueued >= 6) && (so->so_nqueued - so->so_queued) >= 3)) { - + /* Remove from current queue... */ remque(ifm->ifs_next); - + /* ...And insert in the new. That'll teach ya! */ insque(ifm->ifs_next, &if_batchq); } @@ -268,16 +245,16 @@ void if_start(void) { struct mbuf *ifm, *ifqt; - + DEBUG_CALL("if_start"); - + if (if_queued == 0) return; /* Nothing to do */ - + again: - /* check if we can really output */ - if (!slirp_can_output()) - return; + /* check if we can really output */ + if (!slirp_can_output()) + return; /* * See which queue to get next packet from @@ -291,7 +268,7 @@ if_start(void) ifm = next_m; else ifm = if_batchq.ifq_next; - + /* Set which packet to send on next iteration */ next_m = ifm->ifq_next; } @@ -299,24 +276,24 @@ if_start(void) ifqt = ifm->ifq_prev; remque(ifm); --if_queued; - + /* If there are more packets for this session, re-queue them */ if (ifm->ifs_next != /* ifm->ifs_prev != */ ifm) { insque(ifm->ifs_next, ifqt); ifs_remque(ifm); } - + /* Update so_queued */ if (ifm->ifq_so) { if (--ifm->ifq_so->so_queued == 0) /* If there's no more queued, reset nqueued */ ifm->ifq_so->so_nqueued = 0; } - + /* Encapsulate the packet for sending */ - if_encap((uint8_t*)ifm->m_data, ifm->m_len); + if_encap(ifm->m_data, ifm->m_len); - m_free(ifm); + m_free(ifm); if (if_queued) goto again; diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h index a2564ab1d..bed7152fe 100644 --- a/BasiliskII/src/slirp/if.h +++ b/BasiliskII/src/slirp/if.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -13,15 +13,26 @@ #define IF_AUTOCOMP 0x04 /* Autodetect (default) */ #define IF_NOCIDCOMP 0x08 /* CID compression */ -/* Needed for FreeBSD */ -#undef if_mtu -extern size_t if_mtu; -extern size_t if_mru; /* MTU and MRU */ -extern int if_comp; /* Flags for compression */ -extern int if_maxlinkhdr; +#define IF_MTU 1500 +#define IF_MRU 1500 +#define IF_COMP IF_AUTOCOMP /* Flags for compression */ + +#if 0 +/* + * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, + * and 8 bytes for PPP, but need to have it on an 8byte boundary + */ +#ifdef USE_PPP +#define IF_MAXLINKHDR 48 +#else +#define IF_MAXLINKHDR 40 +#endif +#else + /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ +#define IF_MAXLINKHDR (2 + 14 + 40) +#endif + extern int if_queued; /* Number of packets queued so far */ -extern int if_thresh; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ extern struct mbuf if_fastq; /* fast queue (for interactive data) */ extern struct mbuf if_batchq; /* queue for non-interactive data */ @@ -29,6 +40,7 @@ extern struct mbuf *next_m; #define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) +#ifdef LOG_ENABLED /* Interface statistics */ struct slirp_ifstats { u_int out_pkts; /* Output packets */ @@ -39,12 +51,13 @@ struct slirp_ifstats { u_int in_bytes; /* Input bytes */ u_int in_errpkts; /* Input Error Packets */ u_int in_errbytes; /* Input Error Bytes */ - + u_int bytes_saved; /* Number of bytes that compression "saved" */ /* ie: number of bytes that didn't need to be sent over the link * because of compression */ - + u_int in_mbad; /* Bad incoming packets */ }; +#endif #endif diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h index e0c7de967..a8cdb0d3f 100644 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -72,16 +76,12 @@ typedef u_int32_t n_long; /* long as received from the net */ /* * Structure of an internet header, naked of options. */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct ip { #ifdef WORDS_BIGENDIAN - u_char ip_v:4, /* version */ + u_int ip_v:4, /* version */ ip_hl:4; /* header length */ #else - u_char ip_hl:4, /* header length */ + u_int ip_hl:4, /* header length */ ip_v:4; /* version */ #endif u_int8_t ip_tos; /* type of service */ @@ -95,11 +95,7 @@ struct ip { u_int8_t ip_p; /* protocol */ u_int16_t ip_sum; /* checksum */ struct in_addr ip_src,ip_dst; /* source and dest address */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; #define IP_MAXPACKET 65535 /* maximum packet size */ @@ -143,19 +139,15 @@ struct ip { /* * Time stamp option structure. */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct ip_timestamp { u_int8_t ipt_code; /* IPOPT_TS */ u_int8_t ipt_len; /* size of structure (variable) */ u_int8_t ipt_ptr; /* index of current entry */ #ifdef WORDS_BIGENDIAN - u_char ipt_oflw:4, /* overflow counter */ + u_int ipt_oflw:4, /* overflow counter */ ipt_flg:4; /* flags, see below */ #else - u_char ipt_flg:4, /* flags, see below */ + u_int ipt_flg:4, /* flags, see below */ ipt_oflw:4; /* overflow counter */ #endif union ipt_timestamp { @@ -165,11 +157,7 @@ struct ip_timestamp { n_long ipt_time; } ipt_ta[1]; } ipt_timestamp; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; /* flag bits for ipt_flg */ #define IPOPT_TS_TSONLY 0 /* timestamps only */ @@ -216,10 +204,6 @@ typedef caddr32_t ipasfragp_32; /* * Overlay for ip header used by other protocols (tcp, udp). */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct ipovly { caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ u_int8_t ih_x1; /* (unused) */ @@ -227,11 +211,7 @@ struct ipovly { u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; /* * Ip reassembly queue structure. Each fragment @@ -257,10 +237,10 @@ struct ipq { */ struct ipasfrag { #ifdef WORDS_BIGENDIAN - u_char ip_v:4, + u_int ip_v:4, ip_hl:4; #else - u_char ip_hl:4, + u_int ip_hl:4, ip_v:4; #endif /* BUG : u_int changed to u_int8_t. @@ -292,6 +272,7 @@ struct ipoption { int8_t ipopt_list[MAX_IPOPTLEN]; /* options proper */ }; +#ifdef LOG_ENABLED /* * Structure attached to inpcb.ip_moptions and * passed to ip_output when IP multicast options are in use. @@ -326,8 +307,9 @@ struct ipstat { }; extern struct ipstat ipstat; +#endif + extern struct ipq ipq; /* ip reass. queue */ extern u_int16_t ip_id; /* ip packet ctr, for ids */ -extern int ip_defttl; /* default IP ttl */ #endif diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c index 55376a8b1..d1da0a2fc 100644 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,14 +37,16 @@ #include "slirp.h" #include "ip_icmp.h" +#ifdef LOG_ENABLED struct icmpstat icmpstat; +#endif /* The message sent when emulating PING */ -/* Be nice and tell them it's just a psuedo-ping packet */ -char icmp_ping_msg[] = "This is a psuedo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; +/* Be nice and tell them it's just a pseudo-ping packet */ +const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; /* list of actions for icmp_error() on RX of an icmp message */ -static int icmp_flush[19] = { +static const int icmp_flush[19] = { /* ECHO REPLY (0) */ 0, 1, 1, @@ -59,7 +65,7 @@ static int icmp_flush[19] = { /* INFO (15) */ 0, /* INFO REPLY (16) */ 0, /* ADDR MASK (17) */ 0, -/* ADDR MASK REPLY (18) */ 0 +/* ADDR MASK REPLY (18) */ 0 }; /* @@ -74,19 +80,19 @@ icmp_input(m, hlen) register struct ip *ip=mtod(m, struct ip *); int icmplen=ip->ip_len; /* int code; */ - + DEBUG_CALL("icmp_input"); DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); + + STAT(icmpstat.icps_received++); - icmpstat.icps_received++; - /* * Locate icmp structure in mbuf, and check * that its not corrupted and of at least minimum length. */ if (icmplen < ICMP_MINLEN) { /* min 8 bytes payload */ - icmpstat.icps_tooshort++; + STAT(icmpstat.icps_tooshort++); freeit: m_freem(m); goto end_error; @@ -96,12 +102,12 @@ icmp_input(m, hlen) m->m_data += hlen; icp = mtod(m, struct icmp *); if (cksum(m, icmplen)) { - icmpstat.icps_checksum++; + STAT(icmpstat.icps_checksum++); goto freeit; } m->m_len += hlen; m->m_data -= hlen; - + /* icmpstat.icps_inhist[icp->icmp_type]++; */ /* code = icp->icmp_code; */ @@ -117,7 +123,7 @@ icmp_input(m, hlen) struct sockaddr_in addr; if ((so = socreate()) == NULL) goto freeit; if(udp_attach(so) == -1) { - DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", + DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", errno,strerror(errno))); sofree(so); m_free(m); @@ -131,7 +137,7 @@ icmp_input(m, hlen) so->so_iptos = ip->ip_tos; so->so_type = IPPROTO_ICMP; so->so_state = SS_ISFCONNECTED; - + /* Send the packet */ addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { @@ -153,7 +159,7 @@ icmp_input(m, hlen) (struct sockaddr *)&addr, sizeof(addr)) == -1) { DEBUG_MISC((dfd,"icmp_input udp sendto tx errno = %d-%s\n", errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); udp_detach(so); } } /* if ip->ip_dst.s_addr == alias_addr.s_addr */ @@ -166,12 +172,12 @@ icmp_input(m, hlen) case ICMP_TSTAMP: case ICMP_MASKREQ: case ICMP_REDIRECT: - icmpstat.icps_notsupp++; + STAT(icmpstat.icps_notsupp++); m_freem(m); break; - + default: - icmpstat.icps_badtype++; + STAT(icmpstat.icps_badtype++); m_freem(m); } /* swith */ @@ -195,18 +201,18 @@ icmp_input(m, hlen) * mbuf *msrc is used as a template, but is NOT m_free()'d. * It is reported as the bad ip packet. The header should * be fully correct and in host byte order. - * ICMP fragmentation is illegal. All machines must accept 576 bytes in one + * ICMP fragmentation is illegal. All machines must accept 576 bytes in one * packet. The maximum payload is 576-20(ip hdr)-8(icmp hdr)=548 */ #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error( - struct mbuf *msrc, - u_char type, - u_char code, - int minsize, - char *message) +icmp_error(msrc, type, code, minsize, message) + struct mbuf *msrc; + u_char type; + u_char code; + int minsize; + char *message; { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -215,17 +221,17 @@ icmp_error( DEBUG_CALL("icmp_error"); DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %zu", msrc->m_len); + DEBUG_ARG("msrc_len = %d", msrc->m_len); if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; /* check msrc */ if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); -#if DEBUG - { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; - inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); - inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); +#if DEBUG + { char bufa[20], bufb[20]; + strcpy(bufa, inet_ntoa(ip->ip_src)); + strcpy(bufb, inet_ntoa(ip->ip_dst)); DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); } #endif @@ -244,7 +250,7 @@ icmp_error( /* make a copy */ if(!(m=m_get())) goto end_error; /* get mbuf */ - { u_int new_m_size; + { int new_m_size; new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; if(new_m_size>m->m_size) m_inc(m, new_m_size); } @@ -254,9 +260,9 @@ icmp_error( /* make the header of the reply packet */ ip = mtod(m, struct ip *); hlen= sizeof(struct ip ); /* no options in reply */ - + /* fill in icmp */ - m->m_data += hlen; + m->m_data += hlen; m->m_len -= hlen; icp = mtod(m, struct icmp *); @@ -265,7 +271,7 @@ icmp_error( else if(s_ip_len>ICMP_MAXDATALEN) /* maximum size */ s_ip_len=ICMP_MAXDATALEN; - m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ + m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ /* min. size = 8+sizeof(struct ip)+8 */ @@ -299,8 +305,8 @@ icmp_error( /* fill in ip */ ip->ip_hl = hlen >> 2; - ip->ip_len = (u_int16_t)m->m_len; - + ip->ip_len = m->m_len; + ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ ip->ip_ttl = MAXTTL; @@ -309,8 +315,8 @@ icmp_error( ip->ip_src = alias_addr; (void ) ip_output((struct socket *)NULL, m); - - icmpstat.icps_reflect++; + + STAT(icmpstat.icps_reflect++); end_error: return; @@ -367,5 +373,5 @@ icmp_reflect(m) (void ) ip_output((struct socket *)NULL, m); - icmpstat.icps_reflect++; + STAT(icmpstat.icps_reflect++); } diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h index 683dc87f1..8c9b5a1ba 100644 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -43,10 +47,6 @@ typedef u_int32_t n_time; /* * Structure of an icmp header. */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct icmp { u_char icmp_type; /* type of message, see below */ u_char icmp_code; /* type sub code */ @@ -92,11 +92,7 @@ struct icmp { #define icmp_ip icmp_dun.id_ip.idi_ip #define icmp_mask icmp_dun.id_mask #define icmp_data icmp_dun.id_data -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; /* * Lower bounds on packet lengths for various types. @@ -161,8 +157,8 @@ struct icmp { (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) -void icmp_input(struct mbuf *, int); -void icmp_error(struct mbuf *, u_char, u_char, int, char *); -void icmp_reflect(struct mbuf *); +void icmp_input _P((struct mbuf *, int)); +void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); +void icmp_reflect _P((struct mbuf *)); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c index cac8493ba..b04684027 100644 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,7 +37,7 @@ /* * Changes and additions relating to SLiRP are * Copyright (c) 1995 Danny Gasparovski. - * + * * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -41,10 +45,19 @@ #include #include "ip_icmp.h" -int ip_defttl; +#ifdef LOG_ENABLED struct ipstat ipstat; +#endif + struct ipq ipq; +static struct ip *ip_reass(register struct ipasfrag *ip, + register struct ipq *fp); +static void ip_freef(struct ipq *fp); +static void ip_enq(register struct ipasfrag *p, + register struct ipasfrag *prev); +static void ip_deq(register struct ipasfrag *p); + /* * IP initialization: fill in IP protocol switch table. * All protocols not implemented in kernel go to raw IP protocol handler. @@ -56,7 +69,6 @@ ip_init() ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); - ip_defttl = IPDEFTTL; } /* @@ -68,38 +80,38 @@ ip_input(m) struct mbuf *m; { register struct ip *ip; - u_int hlen; - + int hlen; + DEBUG_CALL("ip_input"); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); + + STAT(ipstat.ips_total++); - ipstat.ips_total++; - if (m->m_len < sizeof (struct ip)) { - ipstat.ips_toosmall++; + STAT(ipstat.ips_toosmall++); return; } - + ip = mtod(m, struct ip *); - + if (ip->ip_v != IPVERSION) { - ipstat.ips_badvers++; + STAT(ipstat.ips_badvers++); goto bad; } hlen = ip->ip_hl << 2; if (hlenm->m_len) {/* min header length */ - ipstat.ips_badhlen++; /* or packet too short */ + STAT(ipstat.ips_badhlen++); /* or packet too short */ goto bad; } /* keep ip header intact for ICMP reply - * ip->ip_sum = cksum(m, hlen); - * if (ip->ip_sum) { + * ip->ip_sum = cksum(m, hlen); + * if (ip->ip_sum) { */ if(cksum(m,hlen)) { - ipstat.ips_badsum++; + STAT(ipstat.ips_badsum++); goto bad; } @@ -108,7 +120,7 @@ ip_input(m) */ NTOHS(ip->ip_len); if (ip->ip_len < hlen) { - ipstat.ips_badlen++; + STAT(ipstat.ips_badlen++); goto bad; } NTOHS(ip->ip_id); @@ -121,7 +133,7 @@ ip_input(m) * Drop packet if shorter than we expect. */ if (m->m_len < ip->ip_len) { - ipstat.ips_tooshort++; + STAT(ipstat.ips_tooshort++); goto bad; } /* Should drop packet if mbuf too long? hmmm... */ @@ -150,7 +162,7 @@ ip_input(m) * (We could look in the reassembly queue to see * if the packet was previously fragmented, * but it's not worth the time; just let them time out.) - * + * * XXX This should fail, don't fragment yet */ if (ip->ip_off &~ IP_DF) { @@ -177,7 +189,7 @@ ip_input(m) ip->ip_len -= hlen; if (ip->ip_off & IP_MF) ((struct ipasfrag *)ip)->ipf_mff |= 1; - else + else ((struct ipasfrag *)ip)->ipf_mff &= ~1; ip->ip_off <<= 3; @@ -188,11 +200,11 @@ ip_input(m) * attempt reassembly; if it succeeds, proceed. */ if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { - ipstat.ips_fragments++; + STAT(ipstat.ips_fragments++); ip = ip_reass((struct ipasfrag *)ip, fp); if (ip == 0) return; - ipstat.ips_reassembled++; + STAT(ipstat.ips_reassembled++); m = dtom(ip); } else if (fp) @@ -204,7 +216,7 @@ ip_input(m) /* * Switch out to protocol's input routine. */ - ipstat.ips_delivered++; + STAT(ipstat.ips_delivered++); switch (ip->ip_p) { case IPPROTO_TCP: tcp_input(m, hlen, (struct socket *)NULL); @@ -216,7 +228,7 @@ ip_input(m) icmp_input(m, hlen); break; default: - ipstat.ips_noproto++; + STAT(ipstat.ips_noproto++); m_free(m); } return; @@ -231,16 +243,14 @@ ip_input(m) * reassembly of this datagram already exists, then it * is given as fp; otherwise have to make a chain. */ -struct ip * -ip_reass(ip, fp) - register struct ipasfrag *ip; - register struct ipq *fp; +static struct ip * +ip_reass(register struct ipasfrag *ip, register struct ipq *fp) { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; int hlen = ip->ip_hl << 2; int i, next; - + DEBUG_CALL("ip_reass"); DEBUG_ARG("ip = %lx", (long)ip); DEBUG_ARG("fp = %lx", (long)fp); @@ -271,7 +281,7 @@ ip_reass(ip, fp) q = (struct ipasfrag *)fp; goto insert; } - + /* * Find a segment which begins after this one does. */ @@ -365,7 +375,7 @@ ip_reass(ip, fp) ip = (struct ipasfrag *)(m->m_ext + delta); } - /* DEBUG_ARG("ip = %lx", (long)ip); + /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ ip->ip_len = next; @@ -381,7 +391,7 @@ ip_reass(ip, fp) return ((struct ip *)ip); dropfrag: - ipstat.ips_fragdropped++; + STAT(ipstat.ips_fragdropped++); m_freem(m); return (0); } @@ -390,9 +400,8 @@ ip_reass(ip, fp) * Free a fragment reassembly header and all * associated datagrams. */ -void -ip_freef(fp) - struct ipq *fp; +static void +ip_freef(struct ipq *fp) { register struct ipasfrag *q, *p; @@ -410,9 +419,8 @@ ip_freef(fp) * Put an ip fragment on a reassembly chain. * Like insque, but pointers in middle of structure. */ -void -ip_enq(p, prev) - register struct ipasfrag *p, *prev; +static void +ip_enq(register struct ipasfrag *p, register struct ipasfrag *prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); @@ -425,9 +433,8 @@ ip_enq(p, prev) /* * To ip_enq as remque is to insque. */ -void -ip_deq(p) - register struct ipasfrag *p; +static void +ip_deq(register struct ipasfrag *p) { ((struct ipasfrag *)(p->ipf_prev))->ipf_next = p->ipf_next; ((struct ipasfrag *)(p->ipf_next))->ipf_prev = p->ipf_prev; @@ -442,9 +449,9 @@ void ip_slowtimo() { register struct ipq *fp; - + DEBUG_CALL("ip_slowtimo"); - + fp = (struct ipq *) ipq.next; if (fp == 0) return; @@ -453,7 +460,7 @@ ip_slowtimo() --fp->ipq_ttl; fp = (struct ipq *) fp->next; if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { - ipstat.ips_fragtimeout++; + STAT(ipstat.ips_fragtimeout++); ip_freef((struct ipq *) fp->prev); } } @@ -660,7 +667,7 @@ typedef u_int32_t n_time; /* Not yet */ icmp_error(m, type, code, 0, 0); - ipstat.ips_badoptions++; + STAT(ipstat.ips_badoptions++); return (1); } @@ -688,6 +695,6 @@ ip_stripoptions(m, mopt) i = m->m_len - (sizeof (struct ip) + olen); memcpy(opts, opts + olen, (unsigned)i); m->m_len -= olen; - + ip->ip_hl = sizeof(struct ip) >> 2; } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c index fb9a94204..a8a6067bd 100644 --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -42,6 +46,10 @@ u_int16_t ip_id; +/* Number of packets queued before we start sending + * (to prevent allocing too many mbufs) */ +#define IF_THRESH 10 + /* * IP output. The packet in mbuf chain m contains a skeletal IP * header (with len, off, ttl, proto, tos, src, dst). @@ -55,14 +63,13 @@ ip_output(so, m0) { register struct ip *ip; register struct mbuf *m = m0; - register u_int hlen = sizeof(struct ip); - u_int len, off; - int error = 0; + register int hlen = sizeof(struct ip ); + int len, off, error = 0; DEBUG_CALL("ip_output"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m0 = %lx", (long)m0); - + /* We do no options */ /* if (opt) { * m = ip_insertoptions(m, opt, &len); @@ -77,23 +84,23 @@ ip_output(so, m0) ip->ip_off &= IP_DF; ip->ip_id = htons(ip_id++); ip->ip_hl = hlen >> 2; - ipstat.ips_localout++; + STAT(ipstat.ips_localout++); /* * Verify that we have any chance at all of being able to queue * the packet or packet fragments */ /* XXX Hmmm... */ -/* if (if_queued > if_thresh && towrite <= 0) { +/* if (if_queued > IF_THRESH && towrite <= 0) { * error = ENOBUFS; * goto bad; * } */ - + /* * If small enough for interface, can just send directly. */ - if ((u_int16_t)ip->ip_len <= if_mtu) { + if ((u_int16_t)ip->ip_len <= IF_MTU) { ip->ip_len = htons((u_int16_t)ip->ip_len); ip->ip_off = htons((u_int16_t)ip->ip_off); ip->ip_sum = 0; @@ -109,11 +116,11 @@ ip_output(so, m0) */ if (ip->ip_off & IP_DF) { error = -1; - ipstat.ips_cantfrag++; + STAT(ipstat.ips_cantfrag++); goto bad; } - - len = (if_mtu - hlen) &~ 7; /* ip databytes per packet */ + + len = (IF_MTU - hlen) &~ 7; /* ip databytes per packet */ if (len < 8) { error = -1; goto bad; @@ -129,18 +136,18 @@ ip_output(so, m0) */ m0 = m; mhlen = sizeof (struct ip); - for (off = hlen + len; off < ip->ip_len; off += len) { + for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { register struct ip *mhip; m = m_get(); if (m == 0) { error = -1; - ipstat.ips_odropped++; + STAT(ipstat.ips_odropped++); goto sendorfree; } - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; mhip = mtod(m, struct ip *); *mhip = *ip; - + /* No options */ /* if (hlen > sizeof (struct ip)) { * mhlen = ip_optcopy(ip, mhip) + sizeof (struct ip); @@ -153,28 +160,28 @@ ip_output(so, m0) mhip->ip_off |= IP_MF; if (off + len >= (u_int16_t)ip->ip_len) len = (u_int16_t)ip->ip_len - off; - else + else mhip->ip_off |= IP_MF; mhip->ip_len = htons((u_int16_t)(len + mhlen)); - + if (m_copy(m, m0, off, len) < 0) { error = -1; goto sendorfree; } - + mhip->ip_off = htons((u_int16_t)mhip->ip_off); mhip->ip_sum = 0; mhip->ip_sum = cksum(m, mhlen); *mnext = m; mnext = &m->m_nextpkt; - ipstat.ips_ofragments++; + STAT(ipstat.ips_ofragments++); } /* * Update first fragment by trimming what's been copied out * and updating header, then send each fragment (in order). */ m = m0; - m_adj(m, hlen + firstlen - ip->ip_len); + m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); ip->ip_len = htons((u_int16_t)m->m_len); ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); ip->ip_sum = 0; @@ -190,7 +197,7 @@ ip_output(so, m0) } if (error == 0) - ipstat.ips_fragmented++; + STAT(ipstat.ips_fragmented++); } done: diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h index 8a1aa31e6..7e4cfa98a 100644 --- a/BasiliskII/src/slirp/libslirp.h +++ b/BasiliskII/src/slirp/libslirp.h @@ -1,39 +1,33 @@ #ifndef _LIBSLIRP_H #define _LIBSLIRP_H -#ifdef _WIN32 -#include -int inet_aton(const char *cp, struct in_addr *ia); -#else -#include -#include -#endif - #ifdef __cplusplus extern "C" { #endif -int slirp_init(void); +void slirp_init(void); -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds); +void slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds); void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds); -void slirp_input(const uint8 *pkt, int pkt_len); +void slirp_input(const uint8_t *pkt, int pkt_len); /* you must provide the following functions: */ int slirp_can_output(void); -void slirp_output(const uint8 *pkt, int pkt_len); +void slirp_output(const uint8_t *pkt, int pkt_len); -int slirp_redir(int is_udp, int host_port, +int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port); extern const char *tftp_prefix; extern char slirp_hostname[33]; +void slirp_stats(void); + #ifdef __cplusplus } #endif diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h index 181b6ae88..c01addac4 100644 --- a/BasiliskII/src/slirp/main.h +++ b/BasiliskII/src/slirp/main.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -42,7 +42,6 @@ extern char *username; extern char *socket_path; extern int towrite_max; extern int ppp_exit; -extern int so_options; extern int tcp_keepintvl; extern uint8_t client_ethaddr[6]; diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c index 5a16fab8b..5d1255428 100644 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -15,54 +15,49 @@ * the flags */ -#include #include struct mbuf *mbutl; char *mclrefcnt; int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; -int mbuf_thresh = 30; +#define MBUF_THRESH 30 int mbuf_max = 0; -size_t msize; -void m_init() +/* + * Find a nice value for msize + * XXX if_maxlinkhdr already in mtu + */ +#define MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) + +void +m_init() { m_freelist.m_next = m_freelist.m_prev = &m_freelist; m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; - msize_init(); -} - -void msize_init() -{ - /* - * Find a nice value for msize - * XXX if_maxlinkhdr already in mtu - */ - msize = (if_mtu>if_mru?if_mtu:if_mru) + - if_maxlinkhdr + sizeof(struct m_hdr ) + 6; } /* * Get an mbuf from the free list, if there are none * malloc one - * + * * Because fragmentation can occur if we alloc new mbufs and * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, * which tells m_free to actually free() it */ -struct mbuf *m_get() +struct mbuf * +m_get() { register struct mbuf *m; int flags = 0; - + DEBUG_CALL("m_get"); - + if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(msize); + m = (struct mbuf *)malloc(MSIZE); if (m == NULL) goto end_error; mbuf_alloced++; - if (mbuf_alloced > mbuf_thresh) + if (mbuf_alloced > MBUF_THRESH) flags = M_DOFREE; if (mbuf_alloced > mbuf_max) mbuf_max = mbuf_alloced; @@ -70,13 +65,13 @@ struct mbuf *m_get() m = m_freelist.m_next; remque(m); } - + /* Insert it in the used list */ insque(m,&m_usedlist); m->m_flags = (flags | M_USEDLIST); - + /* Initialise it */ - m->m_size = msize - sizeof(struct m_hdr); + m->m_size = MSIZE - sizeof(struct m_hdr); m->m_data = m->m_dat; m->m_len = 0; m->m_nextpkt = 0; @@ -86,17 +81,19 @@ struct mbuf *m_get() return m; } -void m_free(struct mbuf *m) +void +m_free(m) + struct mbuf *m; { - + DEBUG_CALL("m_free"); DEBUG_ARG("m = %lx", (long )m); - + if(m) { /* Remove from m_usedlist */ if (m->m_flags & M_USEDLIST) remque(m); - + /* If it's M_EXT, free() it */ if (m->m_flags & M_EXT) free(m->m_ext); @@ -119,14 +116,16 @@ void m_free(struct mbuf *m) * the other.. if result is too big for one mbuf, malloc() * an M_EXT data segment */ -void m_cat(register struct mbuf *m, register struct mbuf *n) +void +m_cat(m, n) + register struct mbuf *m, *n; { /* * If there's no room, realloc */ if (M_FREEROOM(m) < n->m_len) m_inc(m,m->m_size+MINCSIZE); - + memcpy(m->m_data+m->m_len, n->m_data, n->m_len); m->m_len += n->m_len; @@ -135,20 +134,23 @@ void m_cat(register struct mbuf *m, register struct mbuf *n) /* make m size bytes large */ -void m_inc(struct mbuf *m, u_int size) +void +m_inc(m, size) + struct mbuf *m; + int size; { - int datasize; + int datasize; /* some compiles throw up on gotos. This one we can fake. */ if(m->m_size>size) return; if (m->m_flags & M_EXT) { - datasize = m->m_data - m->m_ext; + datasize = m->m_data - m->m_ext; m->m_ext = (char *)realloc(m->m_ext,size); /* if (m->m_ext == NULL) * return (struct mbuf *)NULL; - */ - m->m_data = m->m_ext + datasize; + */ + m->m_data = m->m_ext + datasize; } else { char *dat; datasize = m->m_data - m->m_dat; @@ -157,19 +159,22 @@ void m_inc(struct mbuf *m, u_int size) * return (struct mbuf *)NULL; */ memcpy(dat, m->m_dat, m->m_size); - + m->m_ext = dat; m->m_data = m->m_ext + datasize; m->m_flags |= M_EXT; } - + m->m_size = size; } -void m_adj(struct mbuf *m, int len) +void +m_adj(m, len) + struct mbuf *m; + int len; { if (m == NULL) return; @@ -189,7 +194,9 @@ void m_adj(struct mbuf *m, int len) * Copy len bytes from m, starting off bytes into n */ int -m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) +m_copy(n, m, off, len) + struct mbuf *n, *m; + int off, len; { if (len > M_FREEROOM(n)) return -1; @@ -205,10 +212,12 @@ m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) * XXX This is a kludge, I should eliminate the need for it * Fortunately, it's not used often */ -struct mbuf *dtom(void *dat) +struct mbuf * +dtom(dat) + void *dat; { struct mbuf *m; - + DEBUG_CALL("dtom"); DEBUG_ARG("dat = %lx", (long )dat); @@ -222,9 +231,9 @@ struct mbuf *dtom(void *dat) return m; } } - + DEBUG_ERROR((dfd, "dtom failed")); - + return (struct mbuf *)0; } diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h index 11b252bb6..f9f213255 100644 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -63,14 +67,14 @@ struct m_hdr { struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ int mh_flags; /* Misc flags */ - size_t mh_size; /* Size of data */ + int mh_size; /* Size of data */ struct socket *mh_so; - + caddr_t mh_data; /* Location of data */ - size_t mh_len; /* Amount of data in this mbuf */ + int mh_len; /* Amount of data in this mbuf */ }; -/* +/* * How much room is in the mbuf, from m_data to the end of the mbuf */ #define M_ROOM(m) ((m->m_flags & M_EXT)? \ @@ -122,7 +126,7 @@ struct mbuf { struct mbstat { int mbs_alloced; /* Number of mbufs allocated */ - + }; extern struct mbstat mbstat; @@ -130,14 +134,13 @@ extern int mbuf_alloced; extern struct mbuf m_freelist, m_usedlist; extern int mbuf_max; -void m_init(void); -void msize_init(void); -struct mbuf * m_get(void); -void m_free(struct mbuf *); -void m_cat(register struct mbuf *, register struct mbuf *); -void m_inc(struct mbuf *, u_int); -void m_adj(struct mbuf *, int); -int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); -struct mbuf * dtom(void *); +void m_init _P((void)); +struct mbuf * m_get _P((void)); +void m_free _P((struct mbuf *)); +void m_cat _P((register struct mbuf *, register struct mbuf *)); +void m_inc _P((struct mbuf *, int)); +void m_adj _P((struct mbuf *, int)); +int m_copy _P((struct mbuf *, struct mbuf *, int, int)); +struct mbuf * dtom _P((void *)); #endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c index b80caf662..14808fe21 100644 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -1,23 +1,24 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * + * * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H -#include #include -u_int curtime, time_fasttimo, last_slowtimo, detach_time; -u_int detach_wait = 600000; /* 10 minutes */ +u_int curtime, time_fasttimo, last_slowtimo; #if 0 int x_port = -1; int x_display = 0; int x_screen = 0; -int show_x(char *buff, struct socket *inso) +int +show_x(buff, inso) + char *buff; + struct socket *inso; { if (x_port < 0) { lprint("X Redir: X not being redirected.\r\n"); @@ -29,7 +30,7 @@ int show_x(char *buff, struct socket *inso) if (x_display) lprint("X Redir: Redirecting to display %d\r\n", x_display); } - + return CFG_OK; } @@ -37,10 +38,15 @@ int show_x(char *buff, struct socket *inso) /* * XXX Allow more than one X redirection? */ -void redir_x(u_int32_t inaddr, int start_port, int display, int screen) +void +redir_x(inaddr, start_port, display, screen) + u_int32_t inaddr; + int start_port; + int display; + int screen; { int i; - + if (x_port >= 0) { lprint("X Redir: X already being redirected.\r\n"); show_x(0, 0); @@ -61,33 +67,34 @@ void redir_x(u_int32_t inaddr, int start_port, int display, int screen) #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia) +int +inet_aton(cp, ia) + const char *cp; + struct in_addr *ia; { - return inet_pton(AF_INET, cp, &ia->s_addr); + u_int32_t addr = inet_addr(cp); + if (addr == 0xffffffff) + return 0; + ia->s_addr = addr; + return 1; } #endif /* * Get our IP address and put it in our_addr */ -void getouraddr() +void +getouraddr() { char buff[256]; - - if (gethostname(buff, sizeof(buff)) == 0) - { - struct addrinfo hints = { 0 }; - hints.ai_flags = AI_NUMERICHOST; - hints.ai_family = AF_INET; - struct addrinfo* ai; - if (getaddrinfo(buff, NULL, &hints, &ai) == 0) - { - our_addr = *(struct in_addr *)ai->ai_addr->sa_data; - freeaddrinfo(ai); - } - } - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; + struct hostent *he = NULL; + + if (gethostname(buff,256) == 0) + he = gethostbyname(buff); + if (he) + our_addr = *(struct in_addr *)he->h_addr; + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; } #if SIZEOF_CHAR_P == 8 @@ -97,7 +104,10 @@ struct quehead_32 { u_int32_t qh_rlink; }; -inline void insque_32(void *a, void *b) +inline void +insque_32(a, b) + void *a; + void *b; { register struct quehead_32 *element = (struct quehead_32 *) a; register struct quehead_32 *head = (struct quehead_32 *) b; @@ -108,7 +118,9 @@ inline void insque_32(void *a, void *b) = (u_int32_t)element; } -inline void remque_32(void *a) +inline void +remque_32(a) + void *a; { register struct quehead_32 *element = (struct quehead_32 *) a; ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -123,7 +135,9 @@ struct quehead { struct quehead *qh_rlink; }; -void insque(void *a, void *b) +inline void +insque(a, b) + void *a, *b; { register struct quehead *element = (struct quehead *) a; register struct quehead *head = (struct quehead *) b; @@ -134,7 +148,9 @@ void insque(void *a, void *b) = (struct quehead *)element; } -void remque(void *a) +inline void +remque(a) + void *a; { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -146,16 +162,22 @@ void remque(void *a) /* #endif */ -int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) +int +add_exec(ex_ptr, do_pty, exec, addr, port) + struct ex_list **ex_ptr; + int do_pty; + char *exec; + int addr; + int port; { struct ex_list *tmp_ptr; - + /* First, check if the port is "bound" */ for (tmp_ptr = *ex_ptr; tmp_ptr; tmp_ptr = tmp_ptr->ex_next) { if (port == tmp_ptr->ex_fport && addr == tmp_ptr->ex_addr) return -1; } - + tmp_ptr = *ex_ptr; *ex_ptr = (struct ex_list *)malloc(sizeof(struct ex_list)); (*ex_ptr)->ex_fport = port; @@ -175,7 +197,9 @@ int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port extern int sys_nerr; extern char *sys_errlist[]; -char *strerror(int error) +char * +strerror(error) + int error; { if (error < sys_nerr) return sys_errlist[error]; @@ -188,7 +212,8 @@ char *strerror(int error) #ifdef _WIN32 -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(struct socket *so, const char *ex, int do_pty) { /* not implemented */ return 0; @@ -196,13 +221,16 @@ int fork_exec(struct socket *so, char *ex, int do_pty) #else -int slirp_openpty(int *amaster, int *aslave) +#ifndef CONFIG_QEMU +int +slirp_openpty(amaster, aslave) + int *amaster, *aslave; { register int master, slave; #ifdef HAVE_GRANTPT char *ptr; - + if ((master = open("/dev/ptmx", O_RDWR)) < 0 || grantpt(master) < 0 || unlockpt(master) < 0 || @@ -210,7 +238,7 @@ int slirp_openpty(int *amaster, int *aslave) close(master); return -1; } - + if ((slave = open(ptr, O_RDWR)) < 0 || ioctl(slave, I_PUSH, "ptem") < 0 || ioctl(slave, I_PUSH, "ldterm") < 0 || @@ -219,16 +247,16 @@ int slirp_openpty(int *amaster, int *aslave) close(slave); return -1; } - + *amaster = master; *aslave = slave; return 0; - + #else - + static char line[] = "/dev/ptyXX"; register const char *cp1, *cp2; - + for (cp1 = "pqrsPQRS"; *cp1; cp1++) { line[8] = *cp1; for (cp2 = "0123456789abcdefghijklmnopqrstuv"; *cp2; cp2++) { @@ -258,6 +286,7 @@ int slirp_openpty(int *amaster, int *aslave) return (-1); #endif } +#endif /* * XXX This is ugly @@ -265,53 +294,57 @@ int slirp_openpty(int *amaster, int *aslave) * process, which connects to this socket, after which we * exec the wanted program. If something (strange) happens, * the accept() call could block us forever. - * + * * do_pty = 0 Fork/exec inetd style * do_pty = 1 Fork/exec using slirp.telnetd * do_ptr = 2 Fork/exec using pty */ -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(struct socket *so, const char *ex, int do_pty) { int s; struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); + int addrlen = sizeof(addr); int opt; - int master; + int master = -1; char *argv[256]; #if 0 char buff[256]; #endif /* don't want to clobber the original */ char *bptr; - char *curarg; + const char *curarg; int c, i, ret; - + DEBUG_CALL("fork_exec"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("ex = %lx", (long)ex); DEBUG_ARG("do_pty = %lx", (long)do_pty); - + if (do_pty == 2) { +#if 0 if (slirp_openpty(&master, &s) == -1) { lprint("Error: openpty failed: %s\n", strerror(errno)); return 0; } +#else + return 0; +#endif } else { - memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; - + if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0 || bind(s, (struct sockaddr *)&addr, addrlen) < 0 || listen(s, 1) < 0) { lprint("Error: inet socket: %s\n", strerror(errno)); closesocket(s); - + return 0; } } - + switch(fork()) { case -1: lprint("Error: fork failed: %s\n", strerror(errno)); @@ -319,7 +352,7 @@ int fork_exec(struct socket *so, char *ex, int do_pty) if (do_pty == 2) close(master); return 0; - + case 0: /* Set the DISPLAY */ if (do_pty == 2) { @@ -341,7 +374,7 @@ int fork_exec(struct socket *so, char *ex, int do_pty) ret = connect(s, (struct sockaddr *)&addr, addrlen); } while (ret < 0 && errno == EINTR); } - + #if 0 if (x_port >= 0) { #ifdef HAVE_SETENV @@ -352,13 +385,13 @@ int fork_exec(struct socket *so, char *ex, int do_pty) putenv(buff); #endif } -#endif +#endif dup2(s, 0); dup2(s, 1); dup2(s, 2); - for (s = 3; s <= 255; s++) + for (s = getdtablesize() - 1; s >= 3; s--) close(s); - + i = 0; bptr = strdup(ex); /* No need to free() this */ if (do_pty == 1) { @@ -376,21 +409,21 @@ int fork_exec(struct socket *so, char *ex, int do_pty) *bptr++ = (char)0; argv[i++] = strdup(curarg); } while (c); - + argv[i] = 0; execvp(argv[0], argv); - + /* Ooops, failed, let's tell the user why */ { char buff[256]; - - sprintf(buff, "Error: execvp of %s failed: %s\n", + + sprintf(buff, "Error: execvp of %s failed: %s\n", argv[0], strerror(errno)); write(2, buff, strlen(buff)+1); } close(0); close(1); close(2); /* XXX */ exit(1); - + default: if (do_pty == 2) { close(s); @@ -413,32 +446,36 @@ int fork_exec(struct socket *so, char *ex, int do_pty) setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); } fd_nonblock(so->s); - + /* Append the telnet options now */ if (so->so_m != 0 && do_pty == 1) { sbappend(so, so->so_m); so->so_m = 0; } - + return 1; } } #endif #ifndef HAVE_STRDUP -char *strdup(const char *str) +char * +strdup(str) + const char *str; { char *bptr; - + bptr = (char *)malloc(strlen(str)+1); strcpy(bptr, str); - + return bptr; } #endif #if 0 -void snooze_hup(int num) +void +snooze_hup(num) + int num; { int s, ret; #ifndef NO_UNIX_SOCKETS @@ -446,7 +483,7 @@ void snooze_hup(int num) #endif struct sockaddr_in sock_in; char buff[256]; - + ret = -1; if (slirp_socket_passwd) { s = socket(AF_INET, SOCK_STREAM, 0); @@ -476,48 +513,51 @@ void snooze_hup(int num) #endif slirp_exit(0); } - - -void snooze() + + +void +snooze() { sigset_t s; int i; - + /* Don't need our data anymore */ /* XXX This makes SunOS barf */ /* brk(0); */ - + /* Close all fd's */ for (i = 255; i >= 0; i--) close(i); - + signal(SIGQUIT, slirp_exit); signal(SIGHUP, snooze_hup); sigemptyset(&s); - + /* Wait for any signal */ sigsuspend(&s); - + /* Just in case ... */ exit(255); } -void relay(int s) +void +relay(s) + int s; { char buf[8192]; int n; fd_set readfds; struct ttys *ttyp; - + /* Don't need our data anymore */ /* XXX This makes SunOS barf */ /* brk(0); */ - + signal(SIGQUIT, slirp_exit); signal(SIGHUP, slirp_exit); signal(SIGINT, slirp_exit); signal(SIGTERM, slirp_exit); - + /* Fudge to get term_raw and term_restore to work */ if (NULL == (ttyp = tty_attach (0, slirp_tty))) { lprint ("Error: tty_attach failed in misc.c:relay()\r\n"); @@ -526,18 +566,18 @@ void relay(int s) ttyp->fd = 0; ttyp->flags |= TTY_CTTY; term_raw(ttyp); - + while (1) { FD_ZERO(&readfds); - + FD_SET(0, &readfds); FD_SET(s, &readfds); - + n = select(s+1, &readfds, (fd_set *)0, (fd_set *)0, (struct timeval *)0); - + if (n <= 0) slirp_exit(0); - + if (FD_ISSET(0, &readfds)) { n = read(0, buf, 8192); if (n <= 0) @@ -546,7 +586,7 @@ void relay(int s) if (n <= 0) slirp_exit(0); } - + if (FD_ISSET(s, &readfds)) { n = read(s, buf, 8192); if (n <= 0) @@ -556,20 +596,43 @@ void relay(int s) slirp_exit(0); } } - + /* Just in case.... */ exit(1); } #endif -int (*lprint_print)(void *, const char *, va_list); -char *lprint_ptr, *lprint_ptr2, **lprint_arg; +#ifdef CONFIG_QEMU +extern void term_vprintf(const char *fmt, va_list ap); void lprint(const char *format, ...) { - va_list args; - + va_list args; + va_start(args, format); + term_vprintf(format, args); + va_end(args); +} +#else +int (*lprint_print) _P((void *, const char *, va_list)); +char *lprint_ptr, *lprint_ptr2, **lprint_arg; + +void +#ifdef __STDC__ +lprint(const char *format, ...) +#else +lprint(va_alist) va_dcl +#endif +{ + va_list args; + +#ifdef __STDC__ + va_start(args, format); +#else + char *format; + va_start(args); + format = va_arg(args, char *); +#endif #if 0 /* If we're printing to an sbuf, make sure there's enough room */ /* XXX +100? */ @@ -579,33 +642,33 @@ void lprint(const char *format, ...) int deltaw = lprint_sb->sb_wptr - lprint_sb->sb_data; int deltar = lprint_sb->sb_rptr - lprint_sb->sb_data; int deltap = lprint_ptr - lprint_sb->sb_data; - + lprint_sb->sb_data = (char *)realloc(lprint_sb->sb_data, lprint_sb->sb_datalen + TCP_SNDSPACE); - + /* Adjust all values */ lprint_sb->sb_wptr = lprint_sb->sb_data + deltaw; lprint_sb->sb_rptr = lprint_sb->sb_data + deltar; lprint_ptr = lprint_sb->sb_data + deltap; - + lprint_sb->sb_datalen += TCP_SNDSPACE; } } -#endif +#endif if (lprint_print) lprint_ptr += (*lprint_print)(*lprint_arg, format, args); - + /* Check if they want output to be logged to file as well */ if (lfd) { - /* + /* * Remove \r's * otherwise you'll get ^M all over the file */ int len = strlen(format); char *bptr1, *bptr2; - + bptr1 = bptr2 = strdup(format); - + while (len--) { if (*bptr1 == '\r') memcpy(bptr1, bptr1+1, len+1); @@ -618,7 +681,9 @@ void lprint(const char *format, ...) va_end(args); } -void add_emu(char *buff) +void +add_emu(buff) + char *buff; { u_int lport, fport; u_int8_t tos = 0, emu = 0; @@ -626,12 +691,12 @@ void add_emu(char *buff) char *buff3 = buff4; struct emu_t *emup; struct socket *so; - + if (sscanf(buff, "%256s %256s", buff2, buff1) != 2) { lprint("Error: Bad arguments\r\n"); return; } - + if (sscanf(buff1, "%d:%d", &lport, &fport) != 2) { lport = 0; if (sscanf(buff1, "%d", &fport) != 1) { @@ -639,7 +704,7 @@ void add_emu(char *buff) return; } } - + if (sscanf(buff2, "%128[^:]:%128s", buff1, buff3) != 2) { buff3 = 0; if (sscanf(buff2, "%256s", buff1) != 1) { @@ -647,7 +712,7 @@ void add_emu(char *buff) return; } } - + if (buff3) { if (strcmp(buff3, "lowdelay") == 0) tos = IPTOS_LOWDELAY; @@ -658,7 +723,7 @@ void add_emu(char *buff) return; } } - + if (strcmp(buff1, "ftp") == 0) emu = EMU_FTP; else if (strcmp(buff1, "irc") == 0) @@ -669,7 +734,7 @@ void add_emu(char *buff) lprint("Error: Unknown service\r\n"); return; } - + /* First, check that it isn't already emulated */ for (emup = tcpemu; emup; emup = emup->next) { if (emup->lport == lport && emup->fport == fport) { @@ -677,7 +742,7 @@ void add_emu(char *buff) return; } } - + /* link it */ emup = (struct emu_t *)malloc(sizeof (struct emu_t)); emup->lport = (u_int16_t)lport; @@ -686,7 +751,7 @@ void add_emu(char *buff) emup->emu = emu; emup->next = tcpemu; tcpemu = emup; - + /* And finally, mark all current sessions, if any, as being emulated */ for (so = tcb.so_next; so != &tcb; so = so->so_next) { if ((lport && lport == ntohs(so->so_lport)) || @@ -697,9 +762,10 @@ void add_emu(char *buff) so->so_iptos = tos; } } - + lprint("Adding emulation for %s to port %d/%d\r\n", buff1, emup->lport, emup->fport); } +#endif #ifdef BAD_SPRINTF @@ -710,33 +776,51 @@ void add_emu(char *buff) * Some BSD-derived systems have a sprintf which returns char * */ -int vsprintf_len(char *string, const char *format, va_list args) +int +vsprintf_len(string, format, args) + char *string; + const char *format; + va_list args; { vsprintf(string, format, args); return strlen(string); } -int sprintf_len(char *string, const char *format, ...) +int +#ifdef __STDC__ +sprintf_len(char *string, const char *format, ...) +#else +sprintf_len(va_alist) va_dcl +#endif { va_list args; +#ifdef __STDC__ va_start(args, format); +#else + char *string; + char *format; + va_start(args); + string = va_arg(args, char *); + format = va_arg(args, char *); +#endif vsprintf(string, format, args); - va_end(args); return strlen(string); } #endif -void u_sleep(int usec) +void +u_sleep(usec) + int usec; { struct timeval t; fd_set fdset; - + FD_ZERO(&fdset); - + t.tv_sec = 0; t.tv_usec = usec * 1000; - + select(0, &fdset, &fdset, &fdset, &t); } @@ -744,30 +828,34 @@ void u_sleep(int usec) * Set fd blocking and non-blocking */ -void fd_nonblock(int fd) +void +fd_nonblock(fd) + int fd; { -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 1; - +#ifdef FIONBIO + int opt = 1; + ioctlsocket(fd, FIONBIO, &opt); #else int opt; - + opt = fcntl(fd, F_GETFL, 0); opt |= O_NONBLOCK; fcntl(fd, F_SETFL, opt); #endif } -void fd_block(int fd) +void +fd_block(fd) + int fd; { -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 0; - +#ifdef FIONBIO + int opt = 0; + ioctlsocket(fd, FIONBIO, &opt); #else int opt; - + opt = fcntl(fd, F_GETFL, 0); opt &= ~O_NONBLOCK; fcntl(fd, F_SETFL, opt); @@ -779,17 +867,22 @@ void fd_block(int fd) /* * invoke RSH */ -int rsh_exec(struct socket *so, struct socket *ns, - char *user, char *host, char *args) +int +rsh_exec(so,ns, user, host, args) + struct socket *so; + struct socket *ns; + char *user; + char *host; + char *args; { int fd[2]; int fd0[2]; int s; char buff[256]; - + DEBUG_CALL("rsh_exec"); DEBUG_ARG("so = %lx", (long)so); - + if (pipe(fd)<0) { lprint("Error: pipe failed: %s\n", strerror(errno)); return 0; @@ -810,7 +903,7 @@ int rsh_exec(struct socket *so, struct socket *ns, return 0; } #endif - + switch(fork()) { case -1: lprint("Error: fork failed: %s\n", strerror(errno)); @@ -819,11 +912,11 @@ int rsh_exec(struct socket *so, struct socket *ns, close(fd0[0]); close(fd0[1]); return 0; - + case 0: close(fd[0]); close(fd0[0]); - + /* Set the DISPLAY */ if (x_port >= 0) { #ifdef HAVE_SETENV @@ -834,29 +927,29 @@ int rsh_exec(struct socket *so, struct socket *ns, putenv(buff); #endif } - + dup2(fd0[1], 0); dup2(fd0[1], 1); dup2(fd[1], 2); for (s = 3; s <= 255; s++) close(s); - + execlp("rsh","rsh","-l", user, host, args, NULL); - + /* Ooops, failed, let's tell the user why */ - - sprintf(buff, "Error: execlp of %s failed: %s\n", + + sprintf(buff, "Error: execlp of %s failed: %s\n", "rsh", strerror(errno)); write(2, buff, strlen(buff)+1); close(0); close(1); close(2); /* XXX */ exit(1); - + default: close(fd[1]); close(fd0[1]); ns->s=fd[0]; so->s=fd0[0]; - + return 1; } } diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h index 381f5f3e7..e405e38dc 100644 --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -12,22 +12,22 @@ struct ex_list { int ex_pty; /* Do we want a pty? */ int ex_addr; /* The last byte of the address */ int ex_fport; /* Port to telnet to */ - char *ex_exec; /* Command line of what to exec */ + const char *ex_exec; /* Command line of what to exec */ struct ex_list *ex_next; }; extern struct ex_list *exec_list; -extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; +extern u_int curtime, time_fasttimo, last_slowtimo; -extern int (*lprint_print)(void *, const char *, va_list); +extern int (*lprint_print) _P((void *, const char *, va_list)); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; extern struct sbuf *lprint_sb; #ifndef HAVE_STRDUP -char *strdup(const char *); +char *strdup _P((const char *)); #endif -void do_wait(int); +void do_wait _P((int)); #define EMU_NONE 0x0 @@ -63,25 +63,27 @@ struct emu_t { struct emu_t *next; }; +#ifndef CONFIG_QEMU extern struct emu_t *tcpemu; +#endif extern int x_port, x_server, x_display; -int show_x(char *, struct socket *); -void redir_x(u_int32_t, int, int, int); -void getouraddr(void); -void slirp_insque(void *, void *); -void slirp_remque(void *); -int add_exec(struct ex_list **, int, char *, int, int); -int slirp_openpty(int *, int *); -int fork_exec(struct socket *, char *, int); -void snooze_hup(int); -void snooze(void); -void relay(int); -void add_emu(char *); -void u_sleep(int); -void fd_nonblock(int); -void fd_block(int); -int rsh_exec(struct socket *, struct socket *, char *, char *, char *); +int show_x _P((char *, struct socket *)); +void redir_x _P((u_int32_t, int, int, int)); +void getouraddr _P((void)); +inline void slirp_insque _P((void *, void *)); +inline void slirp_remque _P((void *)); +int add_exec _P((struct ex_list **, int, char *, int, int)); +int slirp_openpty _P((int *, int *)); +int fork_exec(struct socket *so, const char *ex, int do_pty); +void snooze_hup _P((int)); +void snooze _P((void)); +void relay _P((int)); +void add_emu _P((char *)); +void u_sleep _P((int)); +void fd_nonblock _P((int)); +void fd_block _P((int)); +int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); #endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 278e36870..02c5fce0a 100644 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -1,31 +1,37 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ -#include #include +static void sbappendsb(struct sbuf *sb, struct mbuf *m); + /* Done as a macro in socket.h */ /* int - * sbspace(struct sockbuff *sb) + * sbspace(struct sockbuff *sb) * { * return SB_DATALEN - sb->sb_cc; * } */ -void sbfree(struct sbuf *sb) +void +sbfree(sb) + struct sbuf *sb; { free(sb->sb_data); } -void sbdrop(struct sbuf *sb, u_int num) +void +sbdrop(sb, num) + struct sbuf *sb; + int num; { - /* + /* * We can only drop how much we have - * This should never succeed + * This should never succeed */ if(num > sb->sb_cc) num = sb->sb_cc; @@ -33,10 +39,13 @@ void sbdrop(struct sbuf *sb, u_int num) sb->sb_rptr += num; if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen) sb->sb_rptr -= sb->sb_datalen; - + } -void sbreserve(struct sbuf *sb, size_t size) +void +sbreserve(sb, size) + struct sbuf *sb; + int size; { if (sb->sb_data) { /* Already alloced, realloc if necessary */ @@ -64,21 +73,24 @@ void sbreserve(struct sbuf *sb, size_t size) * this prevents an unnecessary copy of the data * (the socket is non-blocking, so we won't hang) */ -void sbappend(struct socket *so, struct mbuf *m) +void +sbappend(so, m) + struct socket *so; + struct mbuf *m; { int ret = 0; - + DEBUG_CALL("sbappend"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %zu", m->m_len); - + DEBUG_ARG("m->m_len = %d", m->m_len); + /* Shouldn't happen, but... e.g. foreign host closes connection */ if (m->m_len <= 0) { m_free(m); return; } - + /* * If there is urgent data, call sosendoob * if not all was sent, sowrite will take care of the rest @@ -90,16 +102,16 @@ void sbappend(struct socket *so, struct mbuf *m) sosendoob(so); return; } - + /* * We only write if there's nothing in the buffer, * ottherwise it'll arrive out of order, and hence corrupt */ if (!so->so_rcv.sb_cc) ret = send(so->s, m->m_data, m->m_len, 0); - + if (ret <= 0) { - /* + /* * Nothing was written * It's possible that the socket has closed, but * we don't need to check because if it has closed, @@ -123,10 +135,11 @@ void sbappend(struct socket *so, struct mbuf *m) * Copy the data from m into sb * The caller is responsible to make sure there's enough room */ -void sbappendsb(struct sbuf *sb, struct mbuf *m) +static void +sbappendsb(struct sbuf *sb, struct mbuf *m) { int len, n, nn; - + len = m->m_len; if (sb->sb_wptr < sb->sb_rptr) { @@ -159,10 +172,15 @@ void sbappendsb(struct sbuf *sb, struct mbuf *m) * Don't update the sbuf rptr, this will be * done in sbdrop when the data is acked */ -void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) +void +sbcopy(sb, off, len, to) + struct sbuf *sb; + int off; + int len; + char *to; { char *from; - + from = sb->sb_rptr + off; if (from >= sb->sb_data + sb->sb_datalen) from -= sb->sb_datalen; @@ -180,4 +198,4 @@ void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) memcpy(to+off,sb->sb_data,len); } } - + diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h index 04f7981c7..a4f103623 100644 --- a/BasiliskII/src/slirp/sbuf.h +++ b/BasiliskII/src/slirp/sbuf.h @@ -1,15 +1,13 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #ifndef _SBUF_H_ #define _SBUF_H_ -#include - #define sbflush(sb) sbdrop((sb),(sb)->sb_cc) #define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) @@ -23,11 +21,10 @@ struct sbuf { char *sb_data; /* Actual data */ }; -void sbfree(struct sbuf *); -void sbdrop(struct sbuf *, u_int); -void sbreserve(struct sbuf *, size_t); -void sbappend(struct socket *, struct mbuf *); -void sbappendsb(struct sbuf *, struct mbuf *); -void sbcopy(struct sbuf *, u_int, u_int, char *); +void sbfree _P((struct sbuf *)); +void sbdrop _P((struct sbuf *, int)); +void sbreserve _P((struct sbuf *, int)); +void sbappend _P((struct socket *, struct mbuf *)); +void sbcopy _P((struct sbuf *, int, int, char *)); #endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index dc2fdc658..303f4825c 100644 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -12,7 +12,7 @@ struct in_addr special_addr; /* virtual address alias for host */ struct in_addr alias_addr; -const uint8_t special_ethaddr[6] = { +static const uint8_t special_ethaddr[6] = { 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 }; @@ -38,10 +38,10 @@ static int get_dns_addr(struct in_addr *pdns_addr) DWORD ret; IP_ADDR_STRING *pIPAddr; struct in_addr tmp_addr; - + FixedInfo = (FIXED_INFO *)GlobalAlloc(GPTR, sizeof(FIXED_INFO)); BufLen = sizeof(FIXED_INFO); - + if (ERROR_BUFFER_OVERFLOW == GetNetworkParams(FixedInfo, &BufLen)) { if (FixedInfo) { GlobalFree(FixedInfo); @@ -49,7 +49,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) } FixedInfo = GlobalAlloc(GPTR, BufLen); } - + if ((ret = GetNetworkParams(FixedInfo, &BufLen)) != ERROR_SUCCESS) { printf("GetNetworkParams failed. ret = %08x\n", (u_int)ret ); if (FixedInfo) { @@ -58,14 +58,14 @@ static int get_dns_addr(struct in_addr *pdns_addr) } return -1; } - + pIPAddr = &(FixedInfo->DnsServerList); inet_aton(pIPAddr->IpAddress.String, &tmp_addr); *pdns_addr = tmp_addr; #if 0 printf( "DNS Servers:\n" ); printf( "DNS Addr:%s\n", pIPAddr->IpAddress.String ); - + pIPAddr = FixedInfo -> DnsServerList.Next; while ( pIPAddr ) { printf( "DNS Addr:%s\n", pIPAddr ->IpAddress.String ); @@ -84,16 +84,18 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256+1]; + char buff2[256]; FILE *f; int found = 0; struct in_addr tmp_addr; - + f = fopen("/etc/resolv.conf", "r"); if (!f) return -1; +#ifdef DEBUG lprint("IP address of your DNS(s): "); +#endif while (fgets(buff, 512, f) != NULL) { if (sscanf(buff, "nameserver%*[ \t]%256s", buff2) == 1) { if (!inet_aton(buff2, &tmp_addr)) @@ -103,13 +105,20 @@ static int get_dns_addr(struct in_addr *pdns_addr) /* If it's the first one, set it to dns_addr */ if (!found) *pdns_addr = tmp_addr; +#ifdef DEBUG else lprint(", "); +#endif if (++found > 3) { +#ifdef DEBUG lprint("(more)"); +#endif break; - } else + } +#ifdef DEBUG + else lprint("%s", inet_ntoa(tmp_addr)); +#endif } } fclose(f); @@ -121,16 +130,16 @@ static int get_dns_addr(struct in_addr *pdns_addr) #endif #ifdef _WIN32 -void slirp_cleanup(void) +static void slirp_cleanup(void) { WSACleanup(); } #endif -int slirp_init(void) +void slirp_init(void) { // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); - + #ifdef _WIN32 { WSADATA Data; @@ -150,13 +159,14 @@ int slirp_init(void) /* set default addresses */ inet_aton("127.0.0.1", &loopback_addr); - if (get_dns_addr(&dns_addr) < 0) - return -1; + if (get_dns_addr(&dns_addr) < 0) { + dns_addr = loopback_addr; + fprintf (stderr, "Warning: No DNS servers found\n"); + } inet_aton(CTL_SPECIAL, &special_addr); - alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); - getouraddr(); - return 0; + alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); + getouraddr(); } #define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) @@ -179,56 +189,57 @@ static void updtime(void) static void updtime(void) { gettimeofday(&tt, 0); - + curtime = (u_int)tt.tv_sec * (u_int)1000; curtime += (u_int)tt.tv_usec / (u_int)1000; - + if ((tt.tv_usec % 1000) >= 500) curtime++; } #endif -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds) +void slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds) { struct socket *so, *so_next; + struct timeval timeout; int nfds; - int timeout, tmp_time; + int tmp_time; /* fail safe */ global_readfds = NULL; global_writefds = NULL; global_xfds = NULL; - + nfds = *pnfds; /* * First, TCP sockets */ do_slowtimo = 0; if (link_up) { - /* + /* * *_slowtimo needs calling if there are IP fragments * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); - + for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; - + /* * See if we need a tcp_fasttimo */ if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ - + time_fasttimo = curtime; /* Flag when we want a fasttimo */ + /* * NOFDREF can include still connecting to local-host, * newly socreated() sockets etc. Don't want to select these. */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - + continue; + /* * Set for reading sockets which are accepting */ @@ -237,7 +248,7 @@ int slirp_select_fill(int *pnfds, UPD_NFDS(so->s); continue; } - + /* * Set for writing sockets which are connecting */ @@ -246,7 +257,7 @@ int slirp_select_fill(int *pnfds, UPD_NFDS(so->s); continue; } - + /* * Set for writing if we are connected, can send more, and * we have something to send @@ -255,7 +266,7 @@ int slirp_select_fill(int *pnfds, FD_SET(so->s, writefds); UPD_NFDS(so->s); } - + /* * Set for reading (and urgent data) if we are connected, can * receive more, and we have room for it XXX /2 ? @@ -266,13 +277,13 @@ int slirp_select_fill(int *pnfds, UPD_NFDS(so->s); } } - + /* * UDP sockets */ for (so = udb.so_next; so != &udb; so = so_next) { so_next = so->so_next; - + /* * See if it's timed out */ @@ -283,7 +294,7 @@ int slirp_select_fill(int *pnfds, } else do_slowtimo = 1; /* Let socket expire */ } - + /* * When UDP packets are received from over the * link, they're sendto()'d straight away, so @@ -300,58 +311,51 @@ int slirp_select_fill(int *pnfds, } } } - + /* * Setup timeout to use minimum CPU usage, especially when idle */ - timeout = -1; - /* - * If a slowtimo is needed, set timeout to 5ms from the last + * First, see the timeout needed by *timo + */ + timeout.tv_sec = 0; + timeout.tv_usec = -1; + /* + * If a slowtimo is needed, set timeout to 500ms from the last * slow timeout. If a fast timeout is needed, set timeout within - * 2ms of when it was requested. + * 200ms of when it was requested. */ -# define SLOW_TIMO 5 -# define FAST_TIMO 2 if (do_slowtimo) { - timeout = (SLOW_TIMO - (curtime - last_slowtimo)) * 1000; - if (timeout < 0) - timeout = 0; - else if (timeout > (SLOW_TIMO * 1000)) - timeout = SLOW_TIMO * 1000; - + /* XXX + 10000 because some select()'s aren't that accurate */ + timeout.tv_usec = ((500 - (curtime - last_slowtimo)) * 1000) + 10000; + if (timeout.tv_usec < 0) + timeout.tv_usec = 0; + else if (timeout.tv_usec > 510000) + timeout.tv_usec = 510000; + /* Can only fasttimo if we also slowtimo */ if (time_fasttimo) { - tmp_time = (FAST_TIMO - (curtime - time_fasttimo)) * 1000; + tmp_time = (200 - (curtime - time_fasttimo)) * 1000; if (tmp_time < 0) - tmp_time = 0; - + tmp_time = 0; + /* Choose the smallest of the 2 */ - if (tmp_time < timeout) - timeout = tmp_time; + if (tmp_time < timeout.tv_usec) + timeout.tv_usec = (u_int)tmp_time; } } - *pnfds = nfds; - - /* - * Adjust the timeout to make the minimum timeout - * 2ms (XXX?) to lessen the CPU load - */ - if (timeout < (FAST_TIMO * 1000)) - timeout = FAST_TIMO * 1000; - - return timeout; -} + *pnfds = nfds; +} void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) { - struct socket *so, *so_next; - int ret; + struct socket *so, *so_next; + int ret; - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; /* Update time */ updtime(); @@ -360,11 +364,11 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * See if anything has timed out */ if (link_up) { - if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { + if (time_fasttimo && ((curtime - time_fasttimo) >= 2)) { tcp_fasttimo(); time_fasttimo = 0; } - if (do_slowtimo && ((curtime - last_slowtimo) >= SLOW_TIMO)) { + if (do_slowtimo && ((curtime - last_slowtimo) >= 499)) { ip_slowtimo(); tcp_slowtimo(); last_slowtimo = curtime; @@ -386,7 +390,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * (and they can crash the program) */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; + continue; /* * Check for URG data @@ -394,7 +398,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * test for readfds below if this succeeds */ if (FD_ISSET(so->s, xfds)) - sorecvoob(so); + sorecvoob(so); /* * Check sockets for reading */ @@ -410,88 +414,82 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) /* Output it if we read something */ if (ret > 0) - tcp_output(sototcpcb(so)); + tcp_output(sototcpcb(so)); } /* * Check sockets for writing */ if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, (char*)&ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } - else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ } /* * Probe a still-connecting, non-blocking socket * to check if it's still alive - */ + */ #ifdef PROBE_CONN if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0, 0); - - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } - else { - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } - else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - } /* SS_ISFCONNECTING */ + ret = recv(so->s, (char *)&ret, 0,0); + + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } else { + ret = send(so->s, &ret, 0,0); + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); + } /* SS_ISFCONNECTING */ #endif - } + } /* * Now UDP sockets. @@ -502,25 +500,25 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) so_next = so->so_next; if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } + sorecvfrom(so); + } } -} + } /* * See if we can start outputting */ if (if_queued && link_up) - if_start(); + if_start(); /* clear global file descriptor sets. * these reside on the stack in vl.c * so they're unusable if we're not in * slirp_select_fill or slirp_select_poll. */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; } #define ETH_ALEN 6 @@ -532,7 +530,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) #define ARPOP_REQUEST 1 /* ARP request */ #define ARPOP_REPLY 2 /* ARP reply */ -struct ethhdr +struct ethhdr { unsigned char h_dest[ETH_ALEN]; /* destination eth addr */ unsigned char h_source[ETH_ALEN]; /* source ether addr */ @@ -570,7 +568,7 @@ void arp_input(const uint8_t *pkt, int pkt_len) switch(ar_op) { case ARPOP_REQUEST: if (!memcmp(ah->ar_tip, &special_addr, 3)) { - if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) + if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) goto arp_ok; for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if (ex_ptr->ex_addr == ah->ar_tip[3]) @@ -611,8 +609,8 @@ void slirp_input(const uint8_t *pkt, int pkt_len) if (pkt_len < ETH_HLEN) return; - - proto = (pkt[12] << 8) | pkt[13]; + + proto = ntohs(*(uint16_t *)(pkt + 12)); switch(proto) { case ETH_P_ARP: arp_input(pkt, pkt_len); @@ -653,24 +651,24 @@ void if_encap(const uint8_t *ip_data, int ip_data_len) slirp_output(buf, ip_data_len + ETH_HLEN); } -int slirp_redir(int is_udp, int host_port, +int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port) { if (is_udp) { - if (!udp_listen(htons(host_port), guest_addr.s_addr, + if (!udp_listen(htons(host_port), guest_addr.s_addr, htons(guest_port), 0)) return -1; } else { - if (!solisten(htons(host_port), guest_addr.s_addr, + if (!solisten(htons(host_port), guest_addr.s_addr, htons(guest_port), 0)) return -1; } return 0; } -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port) { - return add_exec(&exec_list, do_pty, (char *)args, + return add_exec(&exec_list, do_pty, (char *)args, addr_low_byte, htons(guest_port)); } diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index b845caa77..b8d756e55 100644 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -3,12 +3,21 @@ #define CONFIG_QEMU -#define DEBUG 1 +//#define DEBUG 1 + +// Uncomment the following line to enable SLIRP statistics printing in Qemu +//#define LOG_ENABLED + +#ifdef LOG_ENABLED +#define STAT(expr) expr +#else +#define STAT(expr) do { } while(0) +#endif #ifndef CONFIG_QEMU #include "version.h" #endif -#include "config.h" +#include "config-host.h" #include "slirp_config.h" #ifdef _WIN32 @@ -19,31 +28,20 @@ typedef uint16_t u_int16_t; typedef uint32_t u_int32_t; typedef uint64_t u_int64_t; typedef char *caddr_t; -typedef int socklen_t; -typedef unsigned long ioctlsockopt_t; +#define WIN32_LEAN_AND_MEAN +# include # include -# include # include # include -# define USE_FIONBIO 1 - -/* Basilisk II Router defines those */ -# define udp_read_completion slirp_udp_read_completion -# define write_udp slirp_write_udp -# define init_udp slirp_init_udp -# define final_udp slirp_final_udp +# define EWOULDBLOCK WSAEWOULDBLOCK +# define EINPROGRESS WSAEINPROGRESS +# define ENOTCONN WSAENOTCONN +# define EHOSTUNREACH WSAEHOSTUNREACH +# define ENETUNREACH WSAENETUNREACH +# define ECONNREFUSED WSAECONNREFUSED #else -# define WSAGetLastError() (int)(errno) -# define WSASetLastError(e) (void)(errno = (e)) -# define WSAEWOULDBLOCK EWOULDBLOCK -# define WSAEINPROGRESS EINPROGRESS -# define WSAENOTCONN ENOTCONN -# define WSAEHOSTUNREACH EHOSTUNREACH -# define WSAENETUNREACH ENETUNREACH -# define WSAECONNREFUSED ECONNREFUSED -typedef int ioctlsockopt_t; # define ioctlsocket ioctl # define closesocket(s) close(s) # define O_BINARY 0 @@ -53,13 +51,8 @@ typedef int ioctlsockopt_t; #ifdef HAVE_SYS_BITYPES_H # include #endif -#ifdef HAVE_STDINT_H -# include -#endif -#ifndef _WIN32 #include -#endif #ifdef NEED_TYPEDEFS typedef char int8_t; @@ -90,11 +83,6 @@ typedef unsigned char u_int8_t; # endif #endif /* NEED_TYPEDEFS */ -/* Basilisk II types glue */ -typedef u_int8_t uint8; -typedef u_int16_t uint16; -typedef u_int32_t uint32; - #ifdef HAVE_UNISTD_H # include #endif @@ -129,6 +117,17 @@ typedef u_int32_t uint32; #ifndef _WIN32 #include +#endif + +#ifndef _P +#ifndef NO_PROTOTYPES +# define _P(x) x +#else +# define _P(x) () +#endif +#endif + +#ifndef _WIN32 #include #include #endif @@ -139,23 +138,20 @@ typedef u_int32_t uint32; /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup(const char *); +char *strdup _P((const char *)); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc(size_t arg); -void free(void *ptr); +void *malloc _P((size_t arg)); +void free _P((void *ptr)); #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia); +int inet_aton _P((const char *cp, struct in_addr *ia)); #endif #include -#ifdef _WIN32 -#include -#endif #ifndef NO_UNIX_SOCKETS #include #endif @@ -187,7 +183,11 @@ int inet_aton(const char *cp, struct in_addr *ia); #include #endif +#ifdef __STDC__ #include +#else +#include +#endif #include @@ -202,20 +202,6 @@ int inet_aton(const char *cp, struct in_addr *ia); #include "debug.h" -#if defined __GNUC__ -#define PACKED__ __attribute__ ((packed)) -#elif defined _MSC_VER -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET -#define PACKED__ -#elif defined __sgi -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET 0 -#define PACKED__ -#else -#error "Packed attribute or pragma shall be supported" -#endif - #include "ip.h" #include "tcp.h" #include "tcp_timer.h" @@ -246,47 +232,45 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start(void); +void if_start _P((void)); #else -void if_start(struct ttys *); +void if_start _P((struct ttys *)); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len(char *, const char *, va_list); - extern int sprintf_len(char *, const char *, ...); + extern int vsprintf_len _P((char *, const char *, va_list)); + extern int sprintf_len _P((char *, const char *, ...)); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf(char *, const char *, va_list); + extern int vsprintf _P((char *, const char *, va_list)); # endif - extern int vfprintf(FILE *, const char *, va_list); + extern int vfprintf _P((FILE *, const char *, va_list)); #endif #ifndef HAVE_STRERROR - extern char *strerror(int error); + extern char *strerror _P((int error)); #endif #ifndef HAVE_INDEX - char *index(const char *, int); + char *index _P((const char *, int)); #endif #ifndef HAVE_GETHOSTID - long gethostid(void); + long gethostid _P((void)); #endif -void lprint(const char *, ...); - -extern int do_echo; +void lprint _P((const char *, ...)); #if SIZEOF_CHAR_P == 4 # define insque_32 insque # define remque_32 remque #else - extern inline void insque_32(void *, void *); - extern inline void remque_32(void *); + inline void insque_32 _P((void *, void *)); + inline void remque_32 _P((void *)); #endif #ifndef _WIN32 @@ -295,51 +279,46 @@ extern int do_echo; #define DEFAULT_BAUD 115200 +#define SO_OPTIONS DO_KEEPALIVE +#define TCP_MAXIDLE (TCPTV_KEEPCNT * TCPTV_KEEPINTVL) + /* cksum.c */ int cksum(struct mbuf *m, int len); /* if.c */ -void if_init(void); -void if_output(struct socket *, struct mbuf *); +void if_init _P((void)); +void if_output _P((struct socket *, struct mbuf *)); /* ip_input.c */ -void ip_init(void); -void ip_input(struct mbuf *); -struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); -void ip_freef(struct ipq *); -void ip_enq(register struct ipasfrag *, register struct ipasfrag *); -void ip_deq(register struct ipasfrag *); -void ip_slowtimo(void); -void ip_stripoptions(register struct mbuf *, struct mbuf *); +void ip_init _P((void)); +void ip_input _P((struct mbuf *)); +void ip_slowtimo _P((void)); +void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); /* ip_output.c */ -int ip_output(struct socket *, struct mbuf *); +int ip_output _P((struct socket *, struct mbuf *)); /* tcp_input.c */ -int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); -void tcp_input(register struct mbuf *, int, struct socket *); -void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); -void tcp_xmit_timer(register struct tcpcb *, int); -u_int tcp_mss(register struct tcpcb *, u_int); +void tcp_input _P((register struct mbuf *, int, struct socket *)); +int tcp_mss _P((register struct tcpcb *, u_int)); /* tcp_output.c */ -int tcp_output(register struct tcpcb *); -void tcp_setpersist(register struct tcpcb *); +int tcp_output _P((register struct tcpcb *)); +void tcp_setpersist _P((register struct tcpcb *)); /* tcp_subr.c */ -void tcp_init(void); -void tcp_template(struct tcpcb *); -void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); -struct tcpcb * tcp_newtcpcb(struct socket *); -struct tcpcb * tcp_close(register struct tcpcb *); -void tcp_drain(void); -void tcp_sockclosed(struct tcpcb *); -int tcp_fconnect(struct socket *); -void tcp_connect(struct socket *); -int tcp_attach(struct socket *); -u_int8_t tcp_tos(struct socket *); -int tcp_emu(struct socket *, struct mbuf *); -int tcp_ctl(struct socket *); +void tcp_init _P((void)); +void tcp_template _P((struct tcpcb *)); +void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); +struct tcpcb * tcp_newtcpcb _P((struct socket *)); +struct tcpcb * tcp_close _P((register struct tcpcb *)); +void tcp_sockclosed _P((struct tcpcb *)); +int tcp_fconnect _P((struct socket *)); +void tcp_connect _P((struct socket *)); +int tcp_attach _P((struct socket *)); +u_int8_t tcp_tos _P((struct socket *)); +int tcp_emu _P((struct socket *, struct mbuf *)); +int tcp_ctl _P((struct socket *)); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -355,4 +334,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif +#ifdef _WIN32 +#undef errno +#define errno (WSAGetLastError()) +#endif + #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h index 237268fa8..e7e95dd5a 100644 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -40,6 +40,11 @@ */ #undef USE_LOWCPU +/* Define this if your compiler doesn't like prototypes */ +#ifndef __STDC__ +#define NO_PROTOTYPES +#endif + /*********************************************************/ /* * Autoconf defined configuration options @@ -49,11 +54,40 @@ /* Ignore this */ #undef DUMMY_PPP -/* XXX: Define according to how time.h should be included */ -#undef TIME_WITH_SYS_TIME +/* Define if you have unistd.h */ +#define HAVE_UNISTD_H + +/* Define if you have stdlib.h */ +#define HAVE_STDLIB_H + +/* Define if you have sys/ioctl.h */ +#undef HAVE_SYS_IOCTL_H +#ifndef _WIN32 +#define HAVE_SYS_IOCTL_H +#endif + +/* Define if you have sys/filio.h */ +#undef HAVE_SYS_FILIO_H +#ifdef __APPLE__ +#define HAVE_SYS_FILIO_H +#endif + +/* Define if you have strerror */ +#define HAVE_STRERROR + +/* Define if you have strdup() */ +#define HAVE_STRDUP + +/* Define according to how time.h should be included */ #define TIME_WITH_SYS_TIME 0 #undef HAVE_SYS_TIME_H +/* Define if you have sys/bitypes.h */ +#undef HAVE_SYS_BITYPES_H + +/* Define if the machine is big endian */ +//#undef WORDS_BIGENDIAN + /* Define if your sprintf returns char * instead of int */ #undef BAD_SPRINTF @@ -69,17 +103,56 @@ /* Define if a declaration of sprintf/fprintf is needed */ #undef DECLARE_SPRINTF +/* Define if you have a POSIX.1 sys/wait.h */ +#undef HAVE_SYS_WAIT_H + +/* Define if you have sys/select.h */ +#undef HAVE_SYS_SELECT_H +#ifndef _WIN32 +#define HAVE_SYS_SELECT_H +#endif + +/* Define if you have strings.h */ +#define HAVE_STRING_H + +/* Define if you have arpa/inet.h */ +#undef HAVE_ARPA_INET_H +#ifndef _WIN32 +#define HAVE_ARPA_INET_H +#endif + +/* Define if you have sys/signal.h */ +#undef HAVE_SYS_SIGNAL_H + /* Define if you have sys/stropts.h */ #undef HAVE_SYS_STROPTS_H +/* Define to whatever your compiler thinks inline should be */ +#define inline inline + +/* Define to whatever your compiler thinks const should be */ +#define const const + +/* Define if your compiler doesn't like prototypes */ +#undef NO_PROTOTYPES + /* Define if you don't have u_int32_t etc. typedef'd */ #undef NEED_TYPEDEFS #ifdef __sun__ #define NEED_TYPEDEFS #endif +/* Define to sizeof(char) */ +#define SIZEOF_CHAR 1 + +/* Define to sizeof(short) */ +#define SIZEOF_SHORT 2 + +/* Define to sizeof(int) */ +#define SIZEOF_INT 4 + /* Define to sizeof(char *) */ -#define SIZEOF_CHAR_P SIZEOF_VOID_P +#define SIZEOF_CHAR_P (HOST_LONG_BITS / 8) /* Define if you have random() */ #undef HAVE_RANDOM @@ -87,6 +160,12 @@ /* Define if you have srandom() */ #undef HAVE_SRANDOM +/* Define if you have inet_aton */ +#undef HAVE_INET_ATON +#ifndef _WIN32 +#define HAVE_INET_ATON +#endif + /* Define if you have setenv */ #undef HAVE_SETENV diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 42ba31b24..0c15132ea 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -1,12 +1,11 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H -#include #include #include "ip_icmp.h" #include "main.h" @@ -14,18 +13,16 @@ #include #endif -#ifdef _WIN32 -#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) -#else -#define IS_EAGAIN(e) ((e) == EAGAIN) -#endif +static void sofcantrcvmore(struct socket *so); +static void sofcantsendmore(struct socket *so); -void +#if 0 +static void so_init() { /* Nothing yet */ } - +#endif struct socket * solookup(head, laddr, lport, faddr, fport) @@ -36,19 +33,19 @@ solookup(head, laddr, lport, faddr, fport) u_int fport; { struct socket *so; - + for (so = head->so_next; so != head; so = so->so_next) { - if (so->so_lport == lport && + if (so->so_lport == lport && so->so_laddr.s_addr == laddr.s_addr && so->so_faddr.s_addr == faddr.s_addr && so->so_fport == fport) break; } - + if (so == head) return (struct socket *)NULL; return so; - + } /* @@ -60,7 +57,7 @@ struct socket * socreate() { struct socket *so; - + so = (struct socket *)malloc(sizeof(struct socket)); if(so) { memset(so, 0, sizeof(struct socket)); @@ -85,10 +82,10 @@ sofree(so) tcp_last_so = &tcb; else if (so == udp_last_so) udp_last_so = &udb; - + m_free(so->so_m); - - if(so->so_next && so->so_prev) + + if(so->so_next && so->so_prev) remque(so); /* crashes if so is not in a queue */ free(so); @@ -103,23 +100,22 @@ int soread(so) struct socket *so; { - int n, nn; - u_int lss, total; + int n, nn, lss, total; struct sbuf *sb = &so->so_snd; - u_int len = sb->sb_datalen - sb->sb_cc; + int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; - u_int mss = so->so_tcpcb->t_maxseg; - + int mss = so->so_tcpcb->t_maxseg; + DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); - - /* + + /* * No need to check if there's enough room to read. * soread wouldn't have been called if there weren't */ - + len = sb->sb_datalen - sb->sb_cc; - + iov[0].iov_base = sb->sb_wptr; if (sb->sb_wptr < sb->sb_rptr) { iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; @@ -158,16 +154,15 @@ soread(so) n = 1; } } - + #ifdef HAVE_READV nn = readv(so->s, (struct iovec *)iov, n); DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); #else nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif +#endif if (nn <= 0) { - int error = WSAGetLastError(); - if (nn < 0 && IS_EAGAIN(error)) + if (nn < 0 && (errno == EINTR || errno == EAGAIN)) return 0; else { DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); @@ -176,7 +171,7 @@ soread(so) return -1; } } - + #ifndef HAVE_READV /* * If there was no error, try and read the second time round @@ -193,10 +188,10 @@ soread(so) if (ret > 0) nn += ret; } - + DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); #endif - + /* Update fields */ sb->sb_cc += nn; sb->sb_wptr += nn; @@ -204,10 +199,10 @@ soread(so) sb->sb_wptr -= sb->sb_datalen; return nn; } - + /* * Get urgent data - * + * * When the socket is created, we set it SO_OOBINLINE, * so when OOB data arrives, we soread() it and everything * in the send buffer is sent as urgent data @@ -220,13 +215,13 @@ sorecvoob(so) DEBUG_CALL("sorecvoob"); DEBUG_ARG("so = %lx", (long)so); - + /* * We take a guess at how much urgent data has arrived. * In most situations, when urgent data arrives, the next * read() should get all the urgent data. This guess will * be wrong however if more data arrives just after the - * urgent data, or the read() doesn't return all the + * urgent data, or the read() doesn't return all the * urgent data. */ soread(so); @@ -246,24 +241,24 @@ sosendoob(so) { struct sbuf *sb = &so->so_rcv; char buff[2048]; /* XXX Shouldn't be sending more oob data than this */ - + int n, len; - + DEBUG_CALL("sosendoob"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("sb->sb_cc = %d", sb->sb_cc); - + if (so->so_urgc > 2048) so->so_urgc = 2048; /* XXXX */ - + if (sb->sb_rptr < sb->sb_wptr) { /* We can send it directly */ n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ so->so_urgc -= n; - + DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); } else { - /* + /* * Since there's no sendv or sendtov like writev, * we must copy all data to a linear buffer then * send it all @@ -283,20 +278,20 @@ sosendoob(so) #ifdef DEBUG if (n != len) DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); -#endif +#endif DEBUG_MISC((dfd, " ---2 sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); } - + sb->sb_cc -= n; sb->sb_rptr += n; if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) sb->sb_rptr -= sb->sb_datalen; - + return n; } /* - * Write data from so_rcv to so's socket, + * Write data from so_rcv to so's socket, * updating all sbuf field as necessary */ int @@ -305,12 +300,12 @@ sowrite(so) { int n,nn; struct sbuf *sb = &so->so_rcv; - u_int len = sb->sb_cc; + int len = sb->sb_cc; struct iovec iov[2]; - + DEBUG_CALL("sowrite"); DEBUG_ARG("so = %lx", (long)so); - + if (so->so_urgc) { sosendoob(so); if (sb->sb_cc == 0) @@ -321,9 +316,9 @@ sowrite(so) * No need to check if there's something to write, * sowrite wouldn't have been called otherwise */ - + len = sb->sb_cc; - + iov[0].iov_base = sb->sb_rptr; if (sb->sb_rptr < sb->sb_wptr) { iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; @@ -346,17 +341,14 @@ sowrite(so) #ifdef HAVE_READV nn = writev(so->s, (const struct iovec *)iov, n); - + DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #else nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0) { - int error = WSAGetLastError(); - if (IS_EAGAIN(error)) - return 0; - } + if (nn < 0 && (errno == EAGAIN || errno == EINTR)) + return 0; if (nn <= 0) { DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", @@ -365,7 +357,7 @@ sowrite(so) tcp_sockclosed(sototcpcb(so)); return -1; } - + #ifndef HAVE_READV if (n == 2 && nn == iov[0].iov_len) { int ret; @@ -375,20 +367,20 @@ sowrite(so) } DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #endif - + /* Update sbuf */ sb->sb_cc -= nn; sb->sb_rptr += nn; if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) sb->sb_rptr -= sb->sb_datalen; - + /* * If in DRAIN mode, and there's no more data, set * it CANTSENDMORE */ if ((so->so_state & SS_FWDRAIN) && sb->sb_cc == 0) sofcantsendmore(so); - + return nn; } @@ -400,26 +392,25 @@ sorecvfrom(so) struct socket *so; { struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - + int addrlen = sizeof(struct sockaddr_in); + DEBUG_CALL("sorecvfrom"); DEBUG_ARG("so = %lx", (long)so); - + if (so->so_type == IPPROTO_ICMP) { /* This is a "ping" reply */ char buff[256]; int len; - - len = recvfrom(so->s, buff, 256, 0, + + len = recvfrom(so->s, buff, 256, 0, (struct sockaddr *)&addr, &addrlen); /* XXX Check if reply is "correct"? */ - + if(len == -1 || len == 0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; - + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", errno,strerror(errno))); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); @@ -431,38 +422,36 @@ sorecvfrom(so) udp_detach(so); } else { /* A "normal" UDP packet */ struct mbuf *m; - u_int len; - ioctlsockopt_t n; + int len, n; if (!(m = m_get())) return; - m->m_data += if_maxlinkhdr; - - /* + m->m_data += IF_MAXLINKHDR; + + /* * XXX Shouldn't FIONREAD packets destined for port 53, * but I don't know the max packet size for DNS lookups */ len = M_FREEROOM(m); /* if (so->so_fport != htons(53)) { */ ioctlsocket(so->s, FIONREAD, &n); - + if (n > len) { n = (m->m_data - m->m_dat) + m->m_len + n + 1; m_inc(m, n); len = M_FREEROOM(m); } /* } */ - + m->m_len = recvfrom(so->s, m->m_data, len, 0, (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %zu, errno = %d-%s\n", + DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", m->m_len, errno,strerror(errno))); if(m->m_len<0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; - + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); m_free(m); @@ -485,8 +474,8 @@ sorecvfrom(so) * m->m_len = 0; * } */ - - /* + + /* * If this packet was destined for CTL_ADDR, * make it look like that's where it came from, done by udp_output */ @@ -509,7 +498,7 @@ sosendto(so, m) DEBUG_CALL("sosendto"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - + addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { /* It's an alias */ @@ -526,16 +515,14 @@ sosendto(so, m) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - char addrstr[INET_ADDRSTRLEN]; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); - + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + /* Don't care what port we get */ ret = sendto(so->s, m->m_data, m->m_len, 0, (struct sockaddr *)&addr, sizeof (struct sockaddr)); if (ret < 0) return -1; - + /* * Kill the socket if there's no reply in 4 minutes, * but only if it's an expirable socket @@ -558,57 +545,58 @@ solisten(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int s; - socklen_t addrlen = sizeof(addr); - int opt = 1; + int s, addrlen = sizeof(addr), opt = 1; DEBUG_CALL("solisten"); DEBUG_ARG("port = %d", port); DEBUG_ARG("laddr = %x", laddr); DEBUG_ARG("lport = %d", lport); DEBUG_ARG("flags = %x", flags); - + if ((so = socreate()) == NULL) { /* free(so); Not sofree() ??? free(NULL) == NOP */ return NULL; } - + /* Don't tcp_attach... we don't need so_snd nor so_rcv */ if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) { free(so); return NULL; } insque(so,&tcb); - - /* + + /* * SS_FACCEPTONCE sockets must time out. */ if (flags & SS_FACCEPTONCE) so->so_tcpcb->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT*2; - + so->so_state = (SS_FACCEPTCONN|flags); so->so_lport = lport; /* Kept in network format */ so->so_laddr.s_addr = laddr; /* Ditto */ - - memset(&addr, 0, sizeof(struct sockaddr_in)); + addr.sin_family = AF_INET; addr.sin_addr.s_addr = INADDR_ANY; addr.sin_port = port; - + if (((s = socket(AF_INET,SOCK_STREAM,0)) < 0) || (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || (listen(s,1) < 0)) { - int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ - + int tmperrno = errno; /* Don't clobber the real reason we failed */ + close(s); sofree(so); /* Restore the real errno */ - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(tmperrno); +#else + errno = tmperrno; +#endif return NULL; } setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - + getsockname(s,(struct sockaddr *)&addr,&addrlen); so->so_fport = addr.sin_port; if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) @@ -620,30 +608,32 @@ solisten(port, laddr, lport, flags) return so; } -/* +#if 0 +/* * Data is available in so_rcv * Just write() the data to the socket * XXX not yet... */ -void +static void sorwakeup(so) struct socket *so; { /* sowrite(so); */ /* FD_CLR(so->s,&writefds); */ } - + /* * Data has been freed in so_snd * We have room for a read() if we want to * For now, don't read, it'll be done in the main loop */ -void +static void sowwakeup(so) struct socket *so; { /* Nothing, yet */ } +#endif /* * Various session state calls @@ -668,9 +658,8 @@ soisfconnected(so) so->so_state |= SS_ISFCONNECTED; /* Clobber other states */ } -void -sofcantrcvmore(so) - struct socket *so; +static void +sofcantrcvmore(struct socket *so) { if ((so->so_state & SS_NOFDREF) == 0) { shutdown(so->s,0); @@ -685,9 +674,8 @@ sofcantrcvmore(so) so->so_state |= SS_FCANTRCVMORE; } -void -sofcantsendmore(so) - struct socket *so; +static void +sofcantsendmore(struct socket *so) { if ((so->so_state & SS_NOFDREF) == 0) { shutdown(so->s,1); /* send FIN to fhost */ diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h index 3b0fee169..94fb8d8cf 100644 --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -33,21 +33,21 @@ struct socket { struct in_addr so_laddr; /* local host table entry */ u_int16_t so_fport; /* foreign port */ u_int16_t so_lport; /* local port */ - + u_int8_t so_iptos; /* Type of service */ u_int8_t so_emu; /* Is the socket emulated? */ - + u_char so_type; /* Type of socket, UDP or TCP */ int so_state; /* internal state flags SS_*, below */ - + struct tcpcb *so_tcpcb; /* pointer to TCP protocol control block */ u_int so_expire; /* When the socket will expire */ - + int so_queued; /* Number of packets queued from this socket */ int so_nqueued; /* Number of packets queued in a row * Used to determine when to "downgrade" a session * from fastq to batchq */ - + struct sbuf so_rcv; /* Receive buffer */ struct sbuf so_snd; /* Send buffer */ void * extra; /* Extra pointer */ @@ -81,24 +81,19 @@ struct iovec { }; #endif -void so_init(void); -struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); -struct socket * socreate(void); -void sofree(struct socket *); -int soread(struct socket *); -void sorecvoob(struct socket *); -int sosendoob(struct socket *); -int sowrite(struct socket *); -void sorecvfrom(struct socket *); -int sosendto(struct socket *, struct mbuf *); -struct socket * solisten(u_int, u_int32_t, u_int, int); -void sorwakeup(struct socket *); -void sowwakeup(struct socket *); -void soisfconnecting(register struct socket *); -void soisfconnected(register struct socket *); -void sofcantrcvmore(struct socket *); -void sofcantsendmore(struct socket *); -void soisfdisconnected(struct socket *); -void sofwdrain(struct socket *); +struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); +struct socket * socreate _P((void)); +void sofree _P((struct socket *)); +int soread _P((struct socket *)); +void sorecvoob _P((struct socket *)); +int sosendoob _P((struct socket *)); +int sowrite _P((struct socket *)); +void sorecvfrom _P((struct socket *)); +int sosendto _P((struct socket *, struct mbuf *)); +struct socket * solisten _P((u_int, u_int32_t, u_int, int)); +void soisfconnecting _P((register struct socket *)); +void soisfconnected _P((register struct socket *)); +void soisfdisconnected _P((struct socket *)); +void sofwdrain _P((struct socket *)); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h index 24e7914ab..11150766d 100644 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -38,8 +42,6 @@ typedef u_int32_t tcp_seq; #define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ #define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ -extern size_t tcp_rcvspace; -extern size_t tcp_sndspace; extern struct socket *tcp_last_so; #define TCP_SNDSPACE 8192 @@ -49,20 +51,16 @@ extern struct socket *tcp_last_so; * TCP header. * Per RFC 793, September, 1981. */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct tcphdr { u_int16_t th_sport; /* source port */ u_int16_t th_dport; /* destination port */ tcp_seq th_seq; /* sequence number */ tcp_seq th_ack; /* acknowledgement number */ #ifdef WORDS_BIGENDIAN - u_char th_off:4, /* data offset */ + u_int th_off:4, /* data offset */ th_x2:4; /* (unused) */ #else - u_char th_x2:4, /* (unused) */ + u_int th_x2:4, /* (unused) */ th_off:4; /* data offset */ #endif u_int8_t th_flags; @@ -75,11 +73,7 @@ struct tcphdr { u_int16_t th_win; /* window */ u_int16_t th_sum; /* checksum */ u_int16_t th_urp; /* urgent pointer */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; #include "tcp_var.h" @@ -176,6 +170,6 @@ struct tcphdr { extern tcp_seq tcp_iss; /* tcp initial send seq # */ -extern char *tcpstates[]; +extern const char * const tcpstates[]; #endif diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index 5c06f16f5..17a9387f0 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,18 +37,17 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ -#include #include #include "ip_icmp.h" struct socket tcb; -int tcprexmtthresh = 3; +#define TCPREXMTTHRESH 3 struct socket *tcp_last_so = &tcb; tcp_seq tcp_iss; /* tcp initial send seq # */ @@ -76,8 +79,8 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ + STAT(tcpstat.tcps_rcvpack++); \ + STAT(tcpstat.tcps_rcvbyte += (ti)->ti_len); \ if (so->so_emu) { \ if (tcp_emu((so),(m))) sbappend((so), (m)); \ } else \ @@ -96,8 +99,8 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ + STAT(tcpstat.tcps_rcvpack++); \ + STAT(tcpstat.tcps_rcvbyte += (ti)->ti_len); \ if (so->so_emu) { \ if (tcp_emu((so),(m))) sbappend(so, (m)); \ } else \ @@ -109,14 +112,18 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ } \ } #endif +static void tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, + struct tcpiphdr *ti); +static void tcp_xmit_timer(register struct tcpcb *tp, int rtt); -int -tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) +static int +tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, + struct mbuf *m) { register struct tcpiphdr *q; struct socket *so = tp->t_socket; int flags; - + /* * Call with ti==0 after become established to * force pre-ESTABLISHED data up to user socket. @@ -144,8 +151,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { if (i >= ti->ti_len) { - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += ti->ti_len; + STAT(tcpstat.tcps_rcvduppack++); + STAT(tcpstat.tcps_rcvdupbyte += ti->ti_len); m_freem(m); /* * Try to present any queued data @@ -161,8 +168,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * } q = (struct tcpiphdr *)(q->ti_next); } - tcpstat.tcps_rcvoopack++; - tcpstat.tcps_rcvoobyte += ti->ti_len; + STAT(tcpstat.tcps_rcvoopack++); + STAT(tcpstat.tcps_rcvoobyte += ti->ti_len); REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ /* @@ -226,9 +233,13 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * * TCP input routine, follows pages 65-76 of the * protocol specification dated September, 1981 very closely. */ -void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) +void +tcp_input(m, iphlen, inso) + register struct mbuf *m; + int iphlen; + struct socket *inso; { - struct ip save_ip, *ip; + struct ip save_ip, *ip; register struct tcpiphdr *ti; caddr_t optp = NULL; int optlen = 0; @@ -236,18 +247,16 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) register struct tcpcb *tp = 0; register int tiflags; struct socket *so = 0; - int todrop; - u_int acked; - int ourfinisacked, needoutput = 0; - /* int dropsocket = 0; */ + int todrop, acked, ourfinisacked, needoutput = 0; +/* int dropsocket = 0; */ int iss = 0; u_long tiwin; int ret; - /* int ts_present = 0; */ +/* int ts_present = 0; */ DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", - (long)m, iphlen, (long)inso)); + DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", + (long )m, iphlen, (long )inso )); /* * If called with m == 0, then we're continuing the connect @@ -267,15 +276,15 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) } - tcpstat.tcps_rcvtotal++; + STAT(tcpstat.tcps_rcvtotal++); /* * Get IP and TCP header together in first mbuf. * Note: IP leaves IP header in first mbuf. */ ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); + if (iphlen > sizeof(struct ip )) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen=sizeof(struct ip ); } /* XXX Check if too short */ @@ -284,28 +293,24 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - ip = mtod(m, struct ip *); + ip=mtod(m, struct ip *); save_ip = *ip; - save_ip.ip_len += iphlen; + save_ip.ip_len+= iphlen; /* * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - //ti->ti_next = ti->ti_prev = 0; - - tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; - memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip) + tlen; + len = sizeof(struct ip ) + tlen; /* keep checksum for ICMP reply * ti->ti_sum = cksum(m, len); * if (ti->ti_sum) { */ - if (cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; + if(cksum(m, len)) { + STAT(tcpstat.tcps_rcvbadsum++); + goto drop; } /* @@ -313,15 +318,15 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * pull out TCP options and adjust length. XXX */ off = ti->ti_off << 2; - if (off < sizeof(struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; + if (off < sizeof (struct tcphdr) || off > tlen) { + STAT(tcpstat.tcps_rcvbadoff++); + goto drop; } tlen -= off; ti->ti_len = tlen; - if (off > sizeof(struct tcphdr)) { - optlen = off - sizeof(struct tcphdr); - optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); + if (off > sizeof (struct tcphdr)) { + optlen = off - sizeof (struct tcphdr); + optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); /* * Do quick retrieval of timestamp options ("options @@ -330,17 +335,17 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * quickly get the values now and not bother calling * tcp_dooptions(), etc. */ - /* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ +/* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ } tiflags = ti->ti_flags; @@ -355,8 +360,8 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) /* * Drop TCP, IP headers and TCP options. */ - m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); /* * Locate pcb for segment. @@ -364,14 +369,14 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) findso: so = tcp_last_so; if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); + ti->ti_dst, ti->ti_dport); if (so) tcp_last_so = so; - ++tcpstat.tcps_socachemiss; + STAT(tcpstat.tcps_socachemiss++); } /* @@ -388,41 +393,41 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * as if it was LISTENING, and continue... */ if (so == 0) { - if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) - goto dropwithreset; + if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) + goto dropwithreset; - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); + sbreserve(&so->so_snd, TCP_SNDSPACE); + sbreserve(&so->so_rcv, TCP_RCVSPACE); - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; } - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; tp = sototcpcb(so); @@ -437,17 +442,17 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * tiwin = ti->ti_win << tp->snd_scale; * else */ - tiwin = ti->ti_win; + tiwin = ti->ti_win; /* * Segment received on connection. * Reset idle time and keep-alive timer. */ tp->t_idle = 0; - if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + if (SO_OPTIONS) + tp->t_timer[TCPT_KEEP] = TCPTV_KEEPINTVL; else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_IDLE; /* * Process options if not in LISTEN state, @@ -455,60 +460,60 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) */ if (optp && tp->t_state != TCPS_LISTEN) tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ +/* , */ +/* &ts_present, &ts_val, &ts_ecr); */ - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && - /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { + (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && +/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { /* * If last ACK falls within this segment's sequence numbers, * record the timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ if (ti->ti_len == 0) { if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { /* * this is a pure ack for outstanding data. */ - ++tcpstat.tcps_predack; - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && -SEQ_GT(ti->ti_ack, tp->t_rtseq)) + STAT(tcpstat.tcps_predack++); +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && + SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_xmit_timer(tp, tp->t_rtt); acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; + STAT(tcpstat.tcps_rcvackpack++); + STAT(tcpstat.tcps_rcvackbyte += acked); sbdrop(&so->so_snd, acked); tp->snd_una = ti->ti_ack; m_freem(m); @@ -531,39 +536,37 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * There's room in so_snd, sowwakup will read() * from the socket if we can */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ if (so->so_snd.sb_cc) (void) tcp_output(tp); return; } - } - else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && - ti->ti_len <= sbspace(&so->so_rcv)) { + } else if (ti->ti_ack == tp->snd_una && + tp->seg_next == (tcpiphdrp_32)tp && + ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet * with nothing on the reassembly queue and * we have enough buffer space to take it. */ - ++tcpstat.tcps_preddat; + STAT(tcpstat.tcps_preddat++); tp->rcv_nxt += ti->ti_len; - tcpstat.tcps_rcvpack++; - tcpstat.tcps_rcvbyte += ti->ti_len; + STAT(tcpstat.tcps_rcvpack++); + STAT(tcpstat.tcps_rcvbyte += ti->ti_len); /* * Add data to socket buffer. */ if (so->so_emu) { - if (tcp_emu(so, m)) sbappend(so, m); - } - else + if (tcp_emu(so,m)) sbappend(so, m); + } else sbappend(so, m); /* @@ -571,16 +574,16 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * if we can actually write() to the socket * XXX Need to check? It's be NON_BLOCKING */ - /* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ +/* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ tp->t_flags |= TF_ACKNOW; tcp_output(tp); return; @@ -593,145 +596,139 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * but not less than advertised window. */ { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); } switch (tp->t_state) { - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ case TCPS_LISTEN: { - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { #if 0 - if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } - else + if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } else #endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } - } - } - if (so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if(ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if (tcp_fconnect(so) == -1) { - int error = WSAGetLastError(); - if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { - u_char code = ICMP_UNREACH_NET; - DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", - errno, strerror(errno))); - if (error == WSAECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, - TH_RST | TH_ACK); - } - else { - if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - *ip = save_ip; - icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - return; - } - } - - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - return; + } + if(so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ + } + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { + u_char code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", + errno,strerror(errno))); + if(errno == ECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, + TH_RST|TH_ACK); + } else { + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + *ip=save_ip; + icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + } else { + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + } + return; cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; - } + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR / 2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + STAT(tcpstat.tcps_accepts++); + goto trimthenstep6; } /* case TCPS_LISTEN */ /* @@ -748,13 +745,13 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ case TCPS_SYN_SENT: if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) goto dropwithreset; if (tiflags & TH_RST) { if (tiflags & TH_ACK) - tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ + tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ goto drop; } @@ -771,7 +768,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_rcvseqinit(tp); tp->t_flags |= TF_ACKNOW; if (tiflags & TH_ACK && SEQ_GT(tp->snd_una, tp->iss)) { - tcpstat.tcps_connects++; + STAT(tcpstat.tcps_connects++); soisfconnected(so); tp->t_state = TCPS_ESTABLISHED; @@ -782,7 +779,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); /* * if we didn't have to retransmit the SYN, @@ -790,11 +787,10 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ if (tp->t_rtt) tcp_xmit_timer(tp, tp->t_rtt); - } - else + } else tp->t_state = TCPS_SYN_RECEIVED; - trimthenstep6: +trimthenstep6: /* * Advance ti->ti_seq to correspond to first data byte. * If data, trim to stay within window, @@ -806,8 +802,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) m_adj(m, -todrop); ti->ti_len = tp->rcv_wnd; tiflags &= ~TH_FIN; - tcpstat.tcps_rcvpackafterwin++; - tcpstat.tcps_rcvbyteafterwin += todrop; + STAT(tcpstat.tcps_rcvpackafterwin++); + STAT(tcpstat.tcps_rcvbyteafterwin += todrop); } tp->snd_wl1 = ti->ti_seq - 1; tp->rcv_up = ti->ti_seq; @@ -823,31 +819,31 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * RFC 1323 PAWS: If we have a timestamp reply on this segment * and it's less than ts_recent, drop it. */ - /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ - /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ - /* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ +/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ +/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ +/* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ todrop = tp->rcv_nxt - ti->ti_seq; if (todrop > 0) { @@ -864,7 +860,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Following if statement from Stevens, vol. 2, p. 960. */ if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { /* * Any valid FIN must be to the left of the window. * At this point the FIN must be a duplicate or out @@ -878,12 +874,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ tp->t_flags |= TF_ACKNOW; todrop = ti->ti_len; - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += todrop; - } - else { - tcpstat.tcps_rcvpartduppack++; - tcpstat.tcps_rcvpartdupbyte += todrop; + STAT(tcpstat.tcps_rcvduppack++); + STAT(tcpstat.tcps_rcvdupbyte += todrop); + } else { + STAT(tcpstat.tcps_rcvpartduppack++); + STAT(tcpstat.tcps_rcvpartdupbyte += todrop); } m_adj(m, todrop); ti->ti_seq += todrop; @@ -900,9 +895,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * user processes are gone, then RST the other end. */ if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { tp = tcp_close(tp); - tcpstat.tcps_rcvafterclose++; + STAT(tcpstat.tcps_rcvafterclose++); goto dropwithreset; } @@ -910,11 +905,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If segment ends after window, drop trailing data * (and PUSH and FIN); if nothing left, just ACK. */ - todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); + todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); if (todrop > 0) { - tcpstat.tcps_rcvpackafterwin++; + STAT(tcpstat.tcps_rcvpackafterwin++); if (todrop >= ti->ti_len) { - tcpstat.tcps_rcvbyteafterwin += ti->ti_len; + STAT(tcpstat.tcps_rcvbyteafterwin += ti->ti_len); /* * If a new connection request is received * while in TIME_WAIT, drop the old connection @@ -922,8 +917,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * are above the previous ones. */ if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { iss = tp->rcv_nxt + TCP_ISSINCR; tp = tcp_close(tp); goto findso; @@ -937,56 +932,54 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_rcvwinprobe++; - } - else + STAT(tcpstat.tcps_rcvwinprobe++); + } else goto dropafterack; - } - else - tcpstat.tcps_rcvbyteafterwin += todrop; + } else + STAT(tcpstat.tcps_rcvbyteafterwin += todrop); m_adj(m, -todrop); ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH | TH_FIN); + tiflags &= ~(TH_PUSH|TH_FIN); } /* * If last ACK falls within this segment's sequence numbers, * record its timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ if (tiflags&TH_RST) switch (tp->t_state) { case TCPS_SYN_RECEIVED: - /* so->so_error = ECONNREFUSED; */ +/* so->so_error = ECONNREFUSED; */ goto close; case TCPS_ESTABLISHED: case TCPS_FIN_WAIT_1: case TCPS_FIN_WAIT_2: case TCPS_CLOSE_WAIT: - /* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; +/* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + STAT(tcpstat.tcps_drops++); + tp = tcp_close(tp); + goto drop; case TCPS_CLOSING: case TCPS_LAST_ACK: @@ -1000,7 +993,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * error and we send an RST and drop the connection. */ if (tiflags & TH_SYN) { - tp = tcp_drop(tp, 0); + tp = tcp_drop(tp,0); goto dropwithreset; } @@ -1013,17 +1006,17 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Ack processing. */ switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ case TCPS_SYN_RECEIVED: if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) + SEQ_GT(ti->ti_ack, tp->snd_max)) goto dropwithreset; - tcpstat.tcps_connects++; + STAT(tcpstat.tcps_connects++); tp->t_state = TCPS_ESTABLISHED; /* * The sent SYN is ack'ed with our sequence number +1 @@ -1032,24 +1025,21 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * SS_CTL since the buffer is empty otherwise. * tp->snd_una++; or: */ - tp->snd_una = ti->ti_ack; + tp->snd_una=ti->ti_ack; if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } - else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } - else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } - else { - soisfconnected(so); + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } else { + soisfconnected(so); } /* Do window scaling? */ @@ -1059,7 +1049,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); tp->snd_wl1 = ti->ti_seq - 1; /* Avoid ack processing; snd_una==ti_ack => dup ack */ goto synrx_to_est; @@ -1083,9 +1073,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", - (long)m, (long)so)); + STAT(tcpstat.tcps_rcvdupack++); + DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", + (long )m, (long )so)); /* * If we have outstanding data (other than * a window probe), this is a completely @@ -1111,12 +1101,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * network. */ if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) + ti->ti_ack != tp->snd_una) tp->t_dupacks = 0; - else if (++tp->t_dupacks == tcprexmtthresh) { + else if (++tp->t_dupacks == TCPREXMTTHRESH) { tcp_seq onxt = tp->snd_nxt; u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / + min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; if (win < 2) @@ -1126,20 +1116,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tp->t_rtt = 0; tp->snd_nxt = ti->ti_ack; tp->snd_cwnd = tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; + tp->t_maxseg * tp->t_dupacks; if (SEQ_GT(onxt, tp->snd_nxt)) tp->snd_nxt = onxt; goto drop; - } - else if (tp->t_dupacks > tcprexmtthresh) { + } else if (tp->t_dupacks > TCPREXMTTHRESH) { tp->snd_cwnd += tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); goto drop; } - } - else + } else tp->t_dupacks = 0; break; } @@ -1148,17 +1136,17 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If the congestion window was inflated to account * for the other side's cached packets, retract it. */ - if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) + if (tp->t_dupacks > TCPREXMTTHRESH && + tp->snd_cwnd > tp->snd_ssthresh) tp->snd_cwnd = tp->snd_ssthresh; tp->t_dupacks = 0; if (SEQ_GT(ti->ti_ack, tp->snd_max)) { - tcpstat.tcps_rcvacktoomuch++; + STAT(tcpstat.tcps_rcvacktoomuch++); goto dropafterack; } acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; + STAT(tcpstat.tcps_rcvackpack++); + STAT(tcpstat.tcps_rcvackbyte += acked); /* * If we have a timestamp reply, update smoothed @@ -1169,12 +1157,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * timer backoff (cf., Phil Karn's retransmit alg.). * Recompute the initial retransmit timer. */ - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp,tp->t_rtt); /* * If all outstanding data is acked, stop retransmit @@ -1185,8 +1173,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (ti->ti_ack == tp->snd_max) { tp->t_timer[TCPT_REXMT] = 0; needoutput = 1; - } - else if (tp->t_timer[TCPT_PERSIST] == 0) + } else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; /* * When new data is acked, open the congestion window. @@ -1196,19 +1183,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * (maxseg^2 / cwnd per packet). */ { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); } if (acked > so->so_snd.sb_cc) { tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, so->so_snd.sb_cc); + sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); ourfinisacked = 1; - } - else { + } else { sbdrop(&so->so_snd, acked); tp->snd_wnd -= acked; ourfinisacked = 0; @@ -1217,20 +1203,20 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * XXX sowwakup is called when data is acked and there's room for * for more data... it should read() the socket */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ tp->snd_una = ti->ti_ack; if (SEQ_LT(tp->snd_nxt, tp->snd_una)) tp->snd_nxt = tp->snd_una; switch (tp->t_state) { - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ case TCPS_FIN_WAIT_1: if (ourfinisacked) { /* @@ -1242,18 +1228,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ if (so->so_state & SS_FCANTRCVMORE) { soisfdisconnected(so); - tp->t_timer[TCPT_2MSL] = tcp_maxidle; + tp->t_timer[TCPT_2MSL] = TCP_MAXIDLE; } tp->t_state = TCPS_FIN_WAIT_2; } break; - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ case TCPS_CLOSING: if (ourfinisacked) { tp->t_state = TCPS_TIME_WAIT; @@ -1263,12 +1249,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ case TCPS_LAST_ACK: if (ourfinisacked) { tp = tcp_close(tp); @@ -1276,11 +1262,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; goto dropafterack; @@ -1293,13 +1279,13 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Don't look at window if no ACK: TAC's send garbage on first SYN. */ if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { /* keep track of pure window updates */ if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) - tcpstat.tcps_rcvwinupd++; + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + STAT(tcpstat.tcps_rcvwinupd++); tp->snd_wnd = tiwin; tp->snd_wl1 = ti->ti_seq; tp->snd_wl2 = ti->ti_ack; @@ -1312,7 +1298,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Process segments with URG. */ if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { /* * This is a kludge, but if we receive and accept * random urgent pointers, we'll crash in @@ -1338,22 +1324,21 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * of data past the urgent section as the original * spec states (in one of two places). */ - if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { + if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + + so->so_urgc = so->so_rcv.sb_cc + (tp->rcv_up - tp->rcv_nxt); /* -1; */ tp->rcv_up = ti->ti_seq + ti->ti_urp; } - } - else + } else /* * If no out of band data is expected, * pull receive urgent pointer along * with the receive window. */ if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; + tp->rcv_up = tp->rcv_nxt; dodata: /* @@ -1365,7 +1350,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * connection then we just ignore the text. */ if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { TCP_REASS(tp, ti, m, so, tiflags); /* * Note the amount of data that peer has sent into @@ -1373,8 +1358,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * buffer size. */ len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } - else { + } else { m_free(m); tiflags &= ~TH_FIN; } @@ -1388,13 +1372,13 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* * If we receive a FIN we can't send more data, * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the + * Shutdown the socket if there is no rx data in the * buffer. * soread() is called on completion of shutdown() and * will got to TCPS_LAST_ACK, and use tcp_output() * to send the FIN. */ - /* sofcantrcvmore(so); */ +/* sofcantrcvmore(so); */ sofwdrain(so); tp->t_flags |= TF_ACKNOW; @@ -1402,31 +1386,31 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } switch (tp->t_state) { - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ case TCPS_SYN_RECEIVED: case TCPS_ESTABLISHED: - if (so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ + if(so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ case TCPS_FIN_WAIT_1: tp->t_state = TCPS_CLOSING; break; - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ case TCPS_FIN_WAIT_2: tp->t_state = TCPS_TIME_WAIT; tcp_canceltimers(tp); @@ -1434,9 +1418,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) soisfdisconnected(so); break; - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; break; @@ -1450,15 +1434,15 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * * See above. */ - /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ - /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ +/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ +/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { tp->t_flags |= TF_ACKNOW; } @@ -1466,7 +1450,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Return any desired output. */ if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void)tcp_output(tp); + (void) tcp_output(tp); } return; @@ -1479,7 +1463,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) goto drop; m_freem(m); tp->t_flags |= TF_ACKNOW; - (void)tcp_output(tp); + (void) tcp_output(tp); return; dropwithreset: @@ -1488,8 +1472,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); else { if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, - TH_RST | TH_ACK); + tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, + TH_RST|TH_ACK); } return; @@ -1507,7 +1491,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* int *ts_present; * u_int32_t *ts_val, *ts_ecr; */ -void +static void tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) { u_int16_t mss; @@ -1539,7 +1523,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) continue; memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); NTOHS(mss); - tcp_mss(tp, mss); /* sets t_maxseg */ + (void) tcp_mss(tp, mss); /* sets t_maxseg */ break; /* case TCPOPT_WINDOW: @@ -1560,7 +1544,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) * memcpy((char *) ts_ecr, (char *)cp + 6, sizeof(*ts_ecr)); * NTOHL(*ts_ecr); * - */ /* + */ /* * * A timestamp received in a SYN makes * * it ok to send timestamp requests and replies. * */ @@ -1584,10 +1568,14 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) #ifdef notdef -void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) +void +tcp_pulloutofband(so, ti, m) + struct socket *so; + struct tcpiphdr *ti; + register struct mbuf *m; { int cnt = ti->ti_urp - 1; - + while (cnt >= 0) { if (m->m_len > cnt) { char *cp = mtod(m, caddr_t) + cnt; @@ -1614,15 +1602,16 @@ void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct m * and update averages and current timeout. */ -void tcp_xmit_timer(register struct tcpcb *tp, int rtt) +static void +tcp_xmit_timer(register struct tcpcb *tp, int rtt) { register short delta; DEBUG_CALL("tcp_xmit_timer"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("rtt = %d", rtt); - - tcpstat.tcps_rttupdated++; + + STAT(tcpstat.tcps_rttupdated++); if (tp->t_srtt != 0) { /* * srtt is stored as fixed point with 3 bits after the @@ -1650,7 +1639,7 @@ void tcp_xmit_timer(register struct tcpcb *tp, int rtt) if ((tp->t_rttvar += delta) <= 0) tp->t_rttvar = 1; } else { - /* + /* * No rtt measurement yet - use the unsmoothed rtt. * Set the variance to half the rtt (so our first * retransmit happens at 3*rtt). @@ -1674,7 +1663,7 @@ void tcp_xmit_timer(register struct tcpcb *tp, int rtt) */ TCPT_RANGESET(tp->t_rxtcur, TCP_REXMTVAL(tp), (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - + /* * We received an ack for a packet that wasn't retransmitted; * it is probably safe to discard any error indications we've @@ -1701,28 +1690,35 @@ void tcp_xmit_timer(register struct tcpcb *tp, int rtt) * parameters from pre-set or cached values in the routing entry. */ -u_int tcp_mss(register struct tcpcb *tp, u_int offer) +int +tcp_mss(tp, offer) + register struct tcpcb *tp; + u_int offer; { struct socket *so = tp->t_socket; - u_int mss; - + int mss; + DEBUG_CALL("tcp_mss"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("offer = %d", offer); - - mss = min(if_mtu, if_mru) - sizeof(struct tcpiphdr); + + mss = min(IF_MTU, IF_MRU) - sizeof(struct tcpiphdr); if (offer) mss = min(mss, offer); mss = max(mss, 32); if (mss < tp->t_maxseg || offer != 0) tp->t_maxseg = mss; - + tp->snd_cwnd = mss; - - sbreserve(&so->so_snd, tcp_sndspace+((tcp_sndspace%mss)?(mss-(tcp_sndspace%mss)):0)); - sbreserve(&so->so_rcv, tcp_rcvspace+((tcp_rcvspace%mss)?(mss-(tcp_rcvspace%mss)):0)); - + + sbreserve(&so->so_snd, TCP_SNDSPACE + ((TCP_SNDSPACE % mss) ? + (mss - (TCP_SNDSPACE % mss)) : + 0)); + sbreserve(&so->so_rcv, TCP_RCVSPACE + ((TCP_RCVSPACE % mss) ? + (mss - (TCP_RCVSPACE % mss)) : + 0)); + DEBUG_MISC((dfd, " returning mss = %d\n", mss)); - + return mss; } diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c index 01df0118f..dba4ed7a5 100644 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,8 +37,8 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -44,16 +48,16 @@ * Since this is only used in "stats socket", we give meaning * names instead of the REAL names */ -char *tcpstates[] = { +const char * const tcpstates[] = { /* "CLOSED", "LISTEN", "SYN_SENT", "SYN_RCVD", */ "REDIRECT", "LISTEN", "SYN_SENT", "SYN_RCVD", "ESTABLISHED", "CLOSE_WAIT", "FIN_WAIT_1", "CLOSING", "LAST_ACK", "FIN_WAIT_2", "TIME_WAIT", }; -u_char tcp_outflags[TCP_NSTATES] = { +static const u_char tcp_outflags[TCP_NSTATES] = { TH_RST|TH_ACK, 0, TH_SYN, TH_SYN|TH_ACK, - TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, + TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, TH_ACK, TH_ACK, }; @@ -63,7 +67,9 @@ u_char tcp_outflags[TCP_NSTATES] = { /* * Tcp output routine: figure out what should be sent and send it. */ -int tcp_output(register struct tcpcb *tp) +int +tcp_output(tp) + register struct tcpcb *tp; { register struct socket *so = tp->t_socket; register long len, win; @@ -73,10 +79,10 @@ int tcp_output(register struct tcpcb *tp) u_char opt[MAX_TCPOPTLEN]; unsigned optlen, hdrlen; int idle, sendalot; - + DEBUG_CALL("tcp_output"); DEBUG_ARG("tp = %lx", (long )tp); - + /* * Determine length of data that should be transmitted, * and flags that will be used. @@ -97,9 +103,9 @@ int tcp_output(register struct tcpcb *tp) win = min(tp->snd_wnd, tp->snd_cwnd); flags = tcp_outflags[tp->t_state]; - + DEBUG_MISC((dfd, " --- tcp_output flags = 0x%x\n",flags)); - + /* * If in persist timeout with window of 0, send 1 byte. * Otherwise, if window is small but nonzero @@ -124,7 +130,7 @@ int tcp_output(register struct tcpcb *tp) * to send then the probe will be the FIN * itself. */ - if (off < (int)so->so_snd.sb_cc) + if (off < so->so_snd.sb_cc) flags &= ~TH_FIN; win = 1; } else { @@ -152,7 +158,7 @@ int tcp_output(register struct tcpcb *tp) tp->snd_nxt = tp->snd_una; } } - + if (len > tp->t_maxseg) { len = tp->t_maxseg; sendalot = 1; @@ -194,17 +200,17 @@ int tcp_output(register struct tcpcb *tp) * window, then want to send a window update to peer. */ if (win > 0) { - /* + /* * "adv" is the amount we can increase the window, * taking into account that we are limited by * TCP_MAXWIN << tp->rcv_scale. */ - long adv = min(win, TCP_MAXWIN << tp->rcv_scale) - + long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - (tp->rcv_adv - tp->rcv_nxt); - if (adv >= (long)(2 * tp->t_maxseg)) + if (adv >= (long) (2 * tp->t_maxseg)) goto send; - if (2 * adv >= (long)so->so_rcv.sb_datalen) + if (2 * adv >= (long) so->so_rcv.sb_datalen) goto send; } @@ -257,8 +263,8 @@ int tcp_output(register struct tcpcb *tp) /* * No reason to send a segment, just return. */ - tcpstat.tcps_didnuttin++; - + STAT(tcpstat.tcps_didnuttin++); + return (0); send: @@ -296,9 +302,9 @@ int tcp_output(register struct tcpcb *tp) */ } } - + /* - * Send a timestamp and echo-reply if this is a SYN and our side + * Send a timestamp and echo-reply if this is a SYN and our side * wants to use timestamps (TF_REQ_TSTMP is set) or both our side * and our peer have sent timestamps in our SYN's. */ @@ -316,7 +322,7 @@ int tcp_output(register struct tcpcb *tp) * } */ hdrlen += optlen; - + /* * Adjust data length if insertion of options will * bump the packet length beyond the t_maxseg length. @@ -333,13 +339,13 @@ int tcp_output(register struct tcpcb *tp) */ if (len) { if (tp->t_force && len == 1) - tcpstat.tcps_sndprobe++; + STAT(tcpstat.tcps_sndprobe++); else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) { - tcpstat.tcps_sndrexmitpack++; - tcpstat.tcps_sndrexmitbyte += len; + STAT(tcpstat.tcps_sndrexmitpack++); + STAT(tcpstat.tcps_sndrexmitbyte += len); } else { - tcpstat.tcps_sndpack++; - tcpstat.tcps_sndbyte += len; + STAT(tcpstat.tcps_sndpack++); + STAT(tcpstat.tcps_sndbyte += len); } m = m_get(); @@ -348,16 +354,16 @@ int tcp_output(register struct tcpcb *tp) error = 1; goto out; } - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; m->m_len = hdrlen; - - /* + + /* * This will always succeed, since we make sure our mbufs * are big enough to hold one MSS packet + header + ... etc. */ /* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); + sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); m->m_len += len; /* } else { @@ -376,13 +382,13 @@ int tcp_output(register struct tcpcb *tp) flags |= TH_PUSH; } else { if (tp->t_flags & TF_ACKNOW) - tcpstat.tcps_sndacks++; + STAT(tcpstat.tcps_sndacks++); else if (flags & (TH_SYN|TH_FIN|TH_RST)) - tcpstat.tcps_sndctrl++; + STAT(tcpstat.tcps_sndctrl++); else if (SEQ_GT(tp->snd_up, tp->snd_una)) - tcpstat.tcps_sndurg++; + STAT(tcpstat.tcps_sndurg++); else - tcpstat.tcps_sndwinup++; + STAT(tcpstat.tcps_sndwinup++); m = m_get(); if (m == NULL) { @@ -390,12 +396,12 @@ int tcp_output(register struct tcpcb *tp) error = 1; goto out; } - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; m->m_len = hdrlen; } ti = mtod(m, struct tcpiphdr *); - + memcpy((caddr_t)ti, &tp->t_template, sizeof (struct tcpiphdr)); /* @@ -403,7 +409,7 @@ int tcp_output(register struct tcpcb *tp) * window for use in delaying messages about window sizes. * If resending a FIN, be sure not to use a new sequence number. */ - if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && + if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && tp->snd_nxt == tp->snd_max) tp->snd_nxt--; /* @@ -433,17 +439,17 @@ int tcp_output(register struct tcpcb *tp) * Calculate receive window. Don't shrink window, * but avoid silly window syndrome. */ - if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) + if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) win = 0; - if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) - win = (u_long) (TCP_MAXWIN << tp->rcv_scale); - if (win < (tp->rcv_adv - tp->rcv_nxt)) - win = (tp->rcv_adv - tp->rcv_nxt); + if (win > (long)TCP_MAXWIN << tp->rcv_scale) + win = (long)TCP_MAXWIN << tp->rcv_scale; + if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) + win = (long)(tp->rcv_adv - tp->rcv_nxt); ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); - + if (SEQ_GT(tp->snd_up, tp->snd_una)) { ti->ti_urp = htons((u_int16_t)(tp->snd_up - ntohl(ti->ti_seq))); -#ifdef notdef +#ifdef notdef if (SEQ_GT(tp->snd_up, tp->snd_nxt)) { ti->ti_urp = htons((u_int16_t)(tp->snd_up - tp->snd_nxt)); #endif @@ -494,7 +500,7 @@ int tcp_output(register struct tcpcb *tp) if (tp->t_rtt == 0) { tp->t_rtt = 1; tp->t_rtseq = startseq; - tcpstat.tcps_segstimed++; + STAT(tcpstat.tcps_segstimed++); } } @@ -525,14 +531,14 @@ int tcp_output(register struct tcpcb *tp) * the template, but need a way to checksum without them. */ m->m_len = hdrlen + len; /* XXX Needed? m_len should be correct */ - + { - - ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; - ((struct ip *)ti)->ip_ttl = ip_defttl; + ((struct ip *)ti)->ip_len = m->m_len; + + ((struct ip *)ti)->ip_ttl = IPDEFTTL; ((struct ip *)ti)->ip_tos = so->so_iptos; - + /* #if BSD >= 43 */ /* Don't do IP options... */ /* error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route, @@ -541,7 +547,7 @@ int tcp_output(register struct tcpcb *tp) error = ip_output(so, m); /* #else - * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, + * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, * so->so_options & SO_DONTROUTE); * #endif */ @@ -561,7 +567,7 @@ int tcp_output(register struct tcpcb *tp) */ return (error); } - tcpstat.tcps_sndtotal++; + STAT(tcpstat.tcps_sndtotal++); /* * Data sent (as far as we can tell). @@ -579,7 +585,9 @@ int tcp_output(register struct tcpcb *tp) return (0); } -void tcp_setpersist(register struct tcpcb *tp) +void +tcp_setpersist(tp) + register struct tcpcb *tp; { int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c index 70e04b5ee..ba1296d4b 100644 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,37 +37,26 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H -#include #include /* patchable/settable parameters for tcp */ -int tcp_mssdflt = TCP_MSS; -int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; -int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -size_t tcp_rcvspace; /* You may want to change this */ -size_t tcp_sndspace; /* Keep small if you have an error prone link */ +/* Don't do rfc1323 performance enhancements */ +#define TCP_DO_RFC1323 0 /* * Tcp initialization */ -void tcp_init() +void +tcp_init() { tcp_iss = 1; /* wrong */ tcb.so_next = tcb.so_prev = &tcb; - - /* tcp_rcvspace = our Window we advertise to the remote */ - tcp_rcvspace = TCP_RCVSPACE; - tcp_sndspace = TCP_SNDSPACE; - - /* Make sure tcp_sndspace is at least 2*MSS */ - if (tcp_sndspace < 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr))) - tcp_sndspace = 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr)); } /* @@ -73,7 +66,9 @@ void tcp_init() * necessary when the connection is used. */ /* struct tcpiphdr * */ -void tcp_template(struct tcpcb *tp) +void +tcp_template(tp) + struct tcpcb *tp; { struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; @@ -86,7 +81,7 @@ void tcp_template(struct tcpcb *tp) n->ti_dst = so->so_laddr; n->ti_sport = so->so_fport; n->ti_dport = so->so_lport; - + n->ti_seq = 0; n->ti_ack = 0; n->ti_x2 = 0; @@ -110,8 +105,13 @@ void tcp_template(struct tcpcb *tp) * In any case the ack and sequence number of the transmitted * segment are as specified by the parameters. */ -void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, - register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) +void +tcp_respond(tp, ti, m, ack, seq, flags) + struct tcpcb *tp; + register struct tcpiphdr *ti; + register struct mbuf *m; + tcp_seq ack, seq; + int flags; { register int tlen; int win = 0; @@ -123,7 +123,7 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, DEBUG_ARG("ack = %u", ack); DEBUG_ARG("seq = %u", seq); DEBUG_ARG("flags = %x", flags); - + if (tp) win = sbspace(&tp->t_socket->so_rcv); if (m == 0) { @@ -134,17 +134,17 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, #else tlen = 0; #endif - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; *mtod(m, struct tcpiphdr *) = *ti; ti = mtod(m, struct tcpiphdr *); flags = TH_ACK; } else { - /* + /* * ti points into m so the next line is just making * the mbuf point to ti */ m->m_data = (caddr_t)ti; - + m->m_len = sizeof (struct tcpiphdr); tlen = 0; #define xchg(a,b,type) { type t; t=a; a=b; b=t; } @@ -172,11 +172,11 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, ti->ti_sum = cksum(m, tlen); ((struct ip *)ti)->ip_len = tlen; - if(flags & TH_RST) + if(flags & TH_RST) ((struct ip *)ti)->ip_ttl = MAXTTL; - else - ((struct ip *)ti)->ip_ttl = ip_defttl; - + else + ((struct ip *)ti)->ip_ttl = IPDEFTTL; + (void) ip_output((struct socket *)0, m); } @@ -185,38 +185,40 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, * empty reassembly queue and hooking it to the argument * protocol control block. */ -struct tcpcb *tcp_newtcpcb(struct socket *so) +struct tcpcb * +tcp_newtcpcb(so) + struct socket *so; { register struct tcpcb *tp; - + tp = (struct tcpcb *)malloc(sizeof(*tp)); if (tp == NULL) return ((struct tcpcb *)0); - + memset((char *) tp, 0, sizeof(struct tcpcb)); tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; - tp->t_maxseg = tcp_mssdflt; - - tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; + tp->t_maxseg = TCP_MSS; + + tp->t_flags = TCP_DO_RFC1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; tp->t_socket = so; - + /* * Init srtt to TCPTV_SRTTBASE (0), so we can tell that we have no * rtt estimate. Set rttvar so that srtt + 2 * rttvar gives * reasonable initial retransmit time. */ tp->t_srtt = TCPTV_SRTTBASE; - tp->t_rttvar = tcp_rttdflt * PR_SLOWHZ << 2; + tp->t_rttvar = TCPTV_SRTTDFLT << 2; tp->t_rttmin = TCPTV_MIN; - TCPT_RANGESET(tp->t_rxtcur, + TCPT_RANGESET(tp->t_rxtcur, ((TCPTV_SRTTBASE >> 2) + (TCPTV_SRTTDFLT << 2)) >> 1, TCPTV_MIN, TCPTV_REXMTMAX); tp->snd_cwnd = TCP_MAXWIN << TCP_MAX_WINSHIFT; tp->snd_ssthresh = TCP_MAXWIN << TCP_MAX_WINSHIFT; tp->t_state = TCPS_CLOSED; - + so->so_tcpcb = tp; return (tp); @@ -227,7 +229,7 @@ struct tcpcb *tcp_newtcpcb(struct socket *so) * the specified error. If connection is synchronized, * then send a RST to peer. */ -struct tcpcb *tcp_drop(struct tcpcb *tp, int err) +struct tcpcb *tcp_drop(struct tcpcb *tp, int err) { /* tcp_drop(tp, errno) register struct tcpcb *tp; @@ -238,13 +240,13 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) DEBUG_CALL("tcp_drop"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("errno = %d", errno); - + if (TCPS_HAVERCVDSYN(tp->t_state)) { tp->t_state = TCPS_CLOSED; (void) tcp_output(tp); - tcpstat.tcps_drops++; + STAT(tcpstat.tcps_drops++); } else - tcpstat.tcps_conndrops++; + STAT(tcpstat.tcps_conndrops++); /* if (errno == ETIMEDOUT && tp->t_softerror) * errno = tp->t_softerror; */ @@ -258,7 +260,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) * discard internet protocol block * wake up any sleepers */ -struct tcpcb *tcp_close(register struct tcpcb *tp) +struct tcpcb * +tcp_close(tp) + register struct tcpcb *tp; { register struct tcpiphdr *t; struct socket *so = tp->t_socket; @@ -266,7 +270,7 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) DEBUG_CALL("tcp_close"); DEBUG_ARG("tp = %lx", (long )tp); - + /* free the reassembly queue, if any */ t = (struct tcpiphdr *) tp->seg_next; while (t != (struct tcpiphdr *)tp) { @@ -290,11 +294,13 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) sbfree(&so->so_rcv); sbfree(&so->so_snd); sofree(so); - tcpstat.tcps_closed++; + STAT(tcpstat.tcps_closed++); return ((struct tcpcb *)0); } -void tcp_drain() +#ifdef notdef +void +tcp_drain() { /* XXX */ } @@ -303,10 +309,10 @@ void tcp_drain() * When a source quench is received, close congestion window * to one segment. We will gradually open it again as we proceed. */ +void +tcp_quench(i, errno) -#ifdef notdef - -void tcp_quench(int i, int errno) + int errno; { struct tcpcb *tp = intotcpcb(inp); @@ -330,12 +336,14 @@ void tcp_quench(int i, int errno) * for peer to send FIN or not respond to keep-alives, etc. * We can let the user exit from the close as soon as the FIN is acked. */ -void tcp_sockclosed(struct tcpcb *tp) +void +tcp_sockclosed(tp) + struct tcpcb *tp; { DEBUG_CALL("tcp_sockclosed"); DEBUG_ARG("tp = %lx", (long)tp); - + switch (tp->t_state) { case TCPS_CLOSED: @@ -361,34 +369,34 @@ void tcp_sockclosed(struct tcpcb *tp) tcp_output(tp); } -/* +/* * Connect to a host on the Internet * Called by tcp_input * Only do a connect, the tcp fields will be set in tcp_input * return 0 if there's a result of the connect, * else return -1 means we're still connecting * The return value is almost always -1 since the socket is - * nonblocking. Connect returns after the SYN is sent, and does + * nonblocking. Connect returns after the SYN is sent, and does * not wait for ACK+SYN. */ -int tcp_fconnect(struct socket *so) +int tcp_fconnect(so) + struct socket *so; { int ret=0; - + DEBUG_CALL("tcp_fconnect"); DEBUG_ARG("so = %lx", (long )so); if( (ret=so->s=socket(AF_INET,SOCK_STREAM,0)) >= 0) { int opt, s=so->s; struct sockaddr_in addr; - memset(&addr, 0, sizeof(struct sockaddr_in)); fd_nonblock(s); opt = 1; setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(opt )); opt = 1; setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(opt )); - + addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { /* It's an alias */ @@ -405,14 +413,12 @@ int tcp_fconnect(struct socket *so) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - char addrstr[INET_ADDRSTRLEN]; DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " - "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, - addrstr, sizeof(addrstr)))); + "addr.sin_addr.s_addr=%.16s\n", + ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); /* We don't care what port we get */ ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); - + /* * If it's not in progress, it failed, so we just return 0, * without clearing SS_NOFDREF @@ -425,27 +431,29 @@ int tcp_fconnect(struct socket *so) /* * Accept the socket and connect to the local-host - * + * * We have a problem. The correct thing to do would be * to first connect to the local-host, and only if the * connection is accepted, then do an accept() here. - * But, a) we need to know who's trying to connect + * But, a) we need to know who's trying to connect * to the socket to be able to SYN the local-host, and * b) we are already connected to the foreign host by * the time it gets to accept(), so... We simply accept * here and SYN the local-host. - */ -void tcp_connect(struct socket *inso) + */ +void +tcp_connect(inso) + struct socket *inso; { struct socket *so; struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); + int addrlen = sizeof(struct sockaddr_in); struct tcpcb *tp; int s, opt; DEBUG_CALL("tcp_connect"); DEBUG_ARG("inso = %lx", (long)inso); - + /* * If it's an SS_ACCEPTONCE socket, no need to socreate() * another socket, just use the accept() socket. @@ -466,8 +474,8 @@ void tcp_connect(struct socket *inso) so->so_laddr = inso->so_laddr; so->so_lport = inso->so_lport; } - - tcp_mss(sototcpcb(so), 0); + + (void) tcp_mss(sototcpcb(so), 0); if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { tcp_close(sototcpcb(so)); /* This will sofree() as well */ @@ -480,13 +488,13 @@ void tcp_connect(struct socket *inso) setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); opt = 1; setsockopt(s,IPPROTO_TCP,TCP_NODELAY,(char *)&opt,sizeof(int)); - + so->so_fport = addr.sin_port; so->so_faddr = addr.sin_addr; /* Translate connections from localhost to the real hostname */ if (so->so_faddr.s_addr == 0 || so->so_faddr.s_addr == loopback_addr.s_addr) so->so_faddr = alias_addr; - + /* Close the accept() socket, set right state */ if (inso->so_state & SS_FACCEPTONCE) { closesocket(so->s); /* If we only accept once, close the accept() socket */ @@ -494,12 +502,12 @@ void tcp_connect(struct socket *inso) /* if it's not FACCEPTONCE, it's already NOFDREF */ } so->s = s; - + so->so_iptos = tcp_tos(so); tp = sototcpcb(so); tcp_template(tp); - + /* Compute window scaling to request. */ /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) @@ -507,11 +515,11 @@ void tcp_connect(struct socket *inso) */ /* soisconnecting(so); */ /* NOFDREF used instead */ - tcpstat.tcps_connattempt++; - + STAT(tcpstat.tcps_connattempt++); + tp->t_state = TCPS_SYN_SENT; tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; + tp->iss = tcp_iss; tcp_iss += TCP_ISSINCR/2; tcp_sendseqinit(tp); tcp_output(tp); @@ -520,11 +528,13 @@ void tcp_connect(struct socket *inso) /* * Attach a TCPCB to a socket. */ -int tcp_attach(struct socket *so) +int +tcp_attach(so) + struct socket *so; { if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) return -1; - + insque(so, &tcb); return 0; @@ -533,7 +543,7 @@ int tcp_attach(struct socket *so) /* * Set the socket's type of service field */ -struct tos_t tcptos[] = { +static const struct tos_t tcptos[] = { {0, 20, IPTOS_THROUGHPUT, 0}, /* ftp data */ {21, 21, IPTOS_LOWDELAY, EMU_FTP}, /* ftp control */ {0, 23, IPTOS_LOWDELAY, 0}, /* telnet */ @@ -549,16 +559,21 @@ struct tos_t tcptos[] = { {0, 0, 0, 0} }; +#ifdef CONFIG_QEMU +static +#endif struct emu_t *tcpemu = 0; - + /* * Return TOS according to the above table */ -u_int8_t tcp_tos(struct socket *so) +u_int8_t +tcp_tos(so) + struct socket *so; { int i = 0; struct emu_t *emup; - + while(tcptos[i].tos) { if ((tcptos[i].fport && (ntohs(so->so_fport) == tcptos[i].fport)) || (tcptos[i].lport && (ntohs(so->so_lport) == tcptos[i].lport))) { @@ -567,7 +582,7 @@ u_int8_t tcp_tos(struct socket *so) } i++; } - + /* Nope, lets see if there's a user-added one */ for (emup = tcpemu; emup; emup = emup->next) { if ((emup->fport && (ntohs(so->so_fport) == emup->fport)) || @@ -576,68 +591,73 @@ u_int8_t tcp_tos(struct socket *so) return emup->tos; } } - + return 0; } +#if 0 int do_echo = -1; +#endif /* * Emulate programs that try and connect to us * This includes ftp (the data connection is * initiated by the server) and IRC (DCC CHAT and * DCC SEND) for now - * + * * NOTE: It's possible to crash SLiRP by sending it * unstandard strings to emulate... if this is a problem, * more checks are needed here * * XXX Assumes the whole command came in one packet - * + * * XXX Some ftp clients will have their TOS set to * LOWDELAY and so Nagel will kick in. Because of this, * we'll get the first letter, followed by the rest, so * we simply scan for ORT instead of PORT... * DCC doesn't have this problem because there's other stuff * in the packet before the DCC command. - * - * Return 1 if the mbuf m is still valid and should be + * + * Return 1 if the mbuf m is still valid and should be * sbappend()ed - * + * * NOTE: if you return 0 you MUST m_free() the mbuf! */ -int tcp_emu(struct socket *so, struct mbuf *m) +int +tcp_emu(so, m) + struct socket *so; + struct mbuf *m; { u_int n1, n2, n3, n4, n5, n6; char buff[256]; u_int32_t laddr; u_int lport; char *bptr; - + DEBUG_CALL("tcp_emu"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - + switch(so->so_emu) { int x, i; - + case EMU_IDENT: /* * Identification protocol as per rfc-1413 */ - + { struct socket *tmpso; struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); + int addrlen = sizeof(struct sockaddr_in); struct sbuf *so_rcv = &so->so_rcv; - + memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m->m_data[m->m_len] = 0; /* NULL terminate */ if (strchr(m->m_data, '\r') || strchr(m->m_data, '\n')) { - if (sscanf(so_rcv->sb_data, "%d%*[ ,]%d", &n1, &n2) == 2) { + if (sscanf(so_rcv->sb_data, "%u%*[ ,]%u", &n1, &n2) == 2) { HTONS(n1); HTONS(n2); /* n2 is the one on our host */ @@ -660,7 +680,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) m_free(m); return 0; } - + #if 0 case EMU_RLOGIN: /* @@ -675,7 +695,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) char term[100]; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* First check if they have a priveladged port, or too much data has arrived */ if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { @@ -686,13 +706,13 @@ int tcp_emu(struct socket *so, struct mbuf *m) m_free(m); return 0; } - + /* Append the current data */ memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m_free(m); - + /* * Check if we have all the initial options, * and build argument list to rlogin while we're here @@ -724,10 +744,10 @@ int tcp_emu(struct socket *so, struct mbuf *m) } } } - + if (n != 4) return 0; - + /* We have it, set our term variable and fork_exec() */ #ifdef HAVE_SETENV setenv("TERM", term, 1); @@ -737,15 +757,15 @@ int tcp_emu(struct socket *so, struct mbuf *m) fork_exec(so, args, 2); term[0] = 0; so->so_emu = 0; - + /* And finally, send the client a 0 character */ so_snd->sb_wptr[0] = 0; so_snd->sb_wptr++; so_snd->sb_cc++; - + return 0; } - + case EMU_RSH: /* * rsh emulation @@ -759,7 +779,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) char *args; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* First check if they have a priveladged port, or too much data has arrived */ if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { @@ -770,13 +790,13 @@ int tcp_emu(struct socket *so, struct mbuf *m) m_free(m); return 0; } - + /* Append the current data */ memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m_free(m); - + /* * Check if we have all the initial options, * and build argument list to rlogin while we're here @@ -807,20 +827,20 @@ int tcp_emu(struct socket *so, struct mbuf *m) ns->so_laddr=so->so_laddr; ns->so_lport=htons(port); - tcp_mss(sototcpcb(ns), 0); + (void) tcp_mss(sototcpcb(ns), 0); ns->so_faddr=so->so_faddr; ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ - if (ns->so_faddr.s_addr == 0 || + if (ns->so_faddr.s_addr == 0 || ns->so_faddr.s_addr == loopback_addr.s_addr) ns->so_faddr = alias_addr; ns->so_iptos = tcp_tos(ns); tp = sototcpcb(ns); - + tcp_template(tp); - + /* Compute window scaling to request. */ /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) @@ -829,11 +849,11 @@ int tcp_emu(struct socket *so, struct mbuf *m) /*soisfconnecting(ns);*/ - tcpstat.tcps_connattempt++; - + STAT(tcpstat.tcps_connattempt++); + tp->t_state = TCPS_SYN_SENT; tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; + tp->iss = tcp_iss; tcp_iss += TCP_ISSINCR/2; tcp_sendseqinit(tp); tcp_output(tp); @@ -849,19 +869,19 @@ int tcp_emu(struct socket *so, struct mbuf *m) } } } - + if (n != 4) return 0; - + rsh_exec(so,so->extra, user, inet_ntoa(so->so_faddr), args); so->so_emu = 0; so->extra=NULL; - + /* And finally, send the client a 0 character */ so_snd->sb_wptr[0] = 0; so_snd->sb_wptr++; so_snd->sb_cc++; - + return 0; } @@ -870,7 +890,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) int num; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* * If there is binary data here, we save it in so->so_m */ @@ -885,16 +905,16 @@ int tcp_emu(struct socket *so, struct mbuf *m) } } } /* if(so->so_m==NULL) */ - + /* * Append the line */ sbappendsb(so_rcv, m); - + /* To avoid going over the edge of the buffer, we reset it */ if (so_snd->sb_cc == 0) so_snd->sb_wptr = so_snd->sb_rptr = so_snd->sb_data; - + /* * A bit of a hack: * If the first packet we get here is 1 byte long, then it @@ -913,13 +933,13 @@ int tcp_emu(struct socket *so, struct mbuf *m) tcp_output(sototcpcb(so)); /* XXX */ } else m_free(m); - + num = 0; while (num < so->so_rcv.sb_cc) { if (*(so->so_rcv.sb_rptr + num) == '\n' || *(so->so_rcv.sb_rptr + num) == '\r') { int n; - + *(so_rcv->sb_rptr + num) = 0; if (ctl_password && !ctl_password_ok) { /* Need a password */ @@ -956,76 +976,76 @@ int tcp_emu(struct socket *so, struct mbuf *m) } return 0; } -#endif +#endif case EMU_FTP: /* ftp */ *(m->m_data+m->m_len) = 0; /* NULL terminate for strstr */ if ((bptr = (char *)strstr(m->m_data, "ORT")) != NULL) { /* * Need to emulate the PORT command - */ - x = sscanf(bptr, "ORT %d,%d,%d,%d,%d,%d\r\n%256[^\177]", + */ + x = sscanf(bptr, "ORT %u,%u,%u,%u,%u,%u\r\n%256[^\177]", &n1, &n2, &n3, &n4, &n5, &n6, buff); if (x < 6) return 1; - + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); lport = htons((n5 << 8) | (n6)); - + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) return 1; - + n6 = ntohs(so->so_fport); - + n5 = (n6 >> 8) & 0xff; n6 &= 0xff; - + laddr = ntohl(so->so_faddr.s_addr); - + n1 = ((laddr >> 24) & 0xff); n2 = ((laddr >> 16) & 0xff); n3 = ((laddr >> 8) & 0xff); n4 = (laddr & 0xff); - + m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", + m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { /* * Need to emulate the PASV response */ - x = sscanf(bptr, "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%256[^\177]", + x = sscanf(bptr, "27 Entering Passive Mode (%u,%u,%u,%u,%u,%u)\r\n%256[^\177]", &n1, &n2, &n3, &n4, &n5, &n6, buff); if (x < 6) return 1; - + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); lport = htons((n5 << 8) | (n6)); - + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) return 1; - + n6 = ntohs(so->so_fport); - + n5 = (n6 >> 8) & 0xff; n6 &= 0xff; - + laddr = ntohl(so->so_faddr.s_addr); - + n1 = ((laddr >> 24) & 0xff); n2 = ((laddr >> 16) & 0xff); n3 = ((laddr >> 8) & 0xff); n4 = (laddr & 0xff); - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", n1, n2, n3, n4, n5, n6, x==7?buff:""); - + return 1; } - + return 1; - + case EMU_KSH: /* * The kshell (Kerberos rsh) and shell services both pass @@ -1034,7 +1054,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) * of the connection as a NUL-terminated decimal ASCII string. */ so->so_emu = 0; - for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { + for (lport = 0, i = 0; i < m->m_len-1; ++i) { if (m->m_data[i] < '0' || m->m_data[i] > '9') return 1; /* invalid number */ lport *= 10; @@ -1044,7 +1064,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; return 1; - + case EMU_IRC: /* * Need to emulate DCC CHAT, DCC SEND and DCC MOVE @@ -1052,12 +1072,12 @@ int tcp_emu(struct socket *so, struct mbuf *m) *(m->m_data+m->m_len) = 0; /* NULL terminate the string for strstr */ if ((bptr = (char *)strstr(m->m_data, "DCC")) == NULL) return 1; - + /* The %256s is for the broken mIRC */ if (sscanf(bptr, "DCC CHAT %256s %u %u", buff, &laddr, &lport) == 3) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", (unsigned long)ntohl(so->so_faddr.s_addr), @@ -1065,15 +1085,15 @@ int tcp_emu(struct socket *so, struct mbuf *m) } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", + m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", buff, (unsigned long)ntohl(so->so_faddr.s_addr), ntohs(so->so_fport), n1, 1); } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", buff, (unsigned long)ntohl(so->so_faddr.s_addr), @@ -1082,7 +1102,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) return 1; case EMU_REALAUDIO: - /* + /* * RealAudio emulation - JP. We must try to parse the incoming * data and try to find the two characters that contain the * port number. Then we redirect an udp port and replace the @@ -1090,45 +1110,45 @@ int tcp_emu(struct socket *so, struct mbuf *m) * * The 1.0 beta versions of the player are not supported * any more. - * + * * A typical packet for player version 1.0 (release version): - * - * 0000:50 4E 41 00 05 + * + * 0000:50 4E 41 00 05 * 0000:00 01 00 02 1B D7 00 00 67 E6 6C DC 63 00 12 50 .....×..gælÜc..P * 0010:4E 43 4C 49 45 4E 54 20 31 30 31 20 41 4C 50 48 NCLIENT 101 ALPH * 0020:41 6C 00 00 52 00 17 72 61 66 69 6C 65 73 2F 76 Al..R..rafiles/v * 0030:6F 61 2F 65 6E 67 6C 69 73 68 5F 2E 72 61 79 42 oa/english_.rayB - * + * * Now the port number 0x1BD7 is found at offset 0x04 of the * Now the port number 0x1BD7 is found at offset 0x04 of the * second packet. This time we received five bytes first and * then the rest. You never know how many bytes you get. * * A typical packet for player version 2.0 (beta): - * + * * 0000:50 4E 41 00 06 00 02 00 00 00 01 00 02 1B C1 00 PNA...........Á. * 0010:00 67 75 78 F5 63 00 0A 57 69 6E 32 2E 30 2E 30 .guxõc..Win2.0.0 * 0020:2E 35 6C 00 00 52 00 1C 72 61 66 69 6C 65 73 2F .5l..R..rafiles/ * 0030:77 65 62 73 69 74 65 2F 32 30 72 65 6C 65 61 73 website/20releas * 0040:65 2E 72 61 79 53 00 00 06 36 42 e.rayS...6B - * + * * Port number 0x1BC1 is found at offset 0x0d. - * + * * This is just a horrible switch statement. Variable ra tells * us where we're going. */ - + bptr = m->m_data; while (bptr < m->m_data + m->m_len) { u_short p; static int ra = 0; - char ra_tbl[4]; - + char ra_tbl[4]; + ra_tbl[0] = 0x50; ra_tbl[1] = 0x4e; ra_tbl[2] = 0x41; ra_tbl[3] = 0; - + switch (ra) { case 0: case 2: @@ -1138,7 +1158,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) continue; } break; - + case 1: /* * We may get 0x50 several times, ignore them @@ -1152,15 +1172,15 @@ int tcp_emu(struct socket *so, struct mbuf *m) continue; } break; - - case 4: - /* + + case 4: + /* * skip version number */ bptr++; break; - - case 5: + + case 5: /* * The difference between versions 1.0 and * 2.0 is here. For future versions of @@ -1170,19 +1190,19 @@ int tcp_emu(struct socket *so, struct mbuf *m) bptr += 8; else bptr += 4; - break; - + break; + case 6: /* This is the field containing the port * number that RA-player is listening to. */ - lport = (((u_char*)bptr)[0] << 8) + lport = (((u_char*)bptr)[0] << 8) + ((u_char *)bptr)[1]; - if (lport < 6970) + if (lport < 6970) lport += 256; /* don't know why */ if (lport < 6970 || lport > 7170) return 1; /* failed */ - + /* try to get udp port between 6970 - 7170 */ for (p = 6970; p < 7071; p++) { if (udp_listen( htons(p), @@ -1196,17 +1216,17 @@ int tcp_emu(struct socket *so, struct mbuf *m) p = 0; *(u_char *)bptr++ = (p >> 8) & 0xff; *(u_char *)bptr++ = p & 0xff; - ra = 0; + ra = 0; return 1; /* port redirected, we're done */ - break; - + break; + default: - ra = 0; + ra = 0; } ra++; } - return 1; - + return 1; + default: /* Ooops, not emulated, won't call tcp_emu again */ so->so_emu = 0; @@ -1219,17 +1239,19 @@ int tcp_emu(struct socket *so, struct mbuf *m) * Return 0 if this connections is to be closed, 1 otherwise, * return 2 if this is a command-line connection */ -int tcp_ctl(struct socket *so) +int +tcp_ctl(so) + struct socket *so; { struct sbuf *sb = &so->so_snd; int command; struct ex_list *ex_ptr; int do_pty; // struct socket *tmpso; - + DEBUG_CALL("tcp_ctl"); DEBUG_ARG("so = %lx", (long )so); - + #if 0 /* * Check if they're authorised @@ -1239,12 +1261,12 @@ int tcp_ctl(struct socket *so) sb->sb_wptr += sb->sb_cc; return 0; } -#endif +#endif command = (ntohl(so->so_faddr.s_addr) & 0xff); - + switch(command) { default: /* Check for exec's */ - + /* * Check if it's pty_exec */ @@ -1255,12 +1277,12 @@ int tcp_ctl(struct socket *so) goto do_exec; } } - + /* * Nothing bound.. */ /* tcp_fconnect(so); */ - + /* FALLTHROUGH */ case CTL_ALIAS: sb->sb_cc = sprintf(sb->sb_wptr, @@ -1271,12 +1293,12 @@ int tcp_ctl(struct socket *so) do_exec: DEBUG_MISC((dfd, " executing %s \n",ex_ptr->ex_exec)); return(fork_exec(so, ex_ptr->ex_exec, do_pty)); - + #if 0 case CTL_CMD: for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_emu == EMU_CTL && - !(tmpso->so_tcpcb? + if (tmpso->so_emu == EMU_CTL && + !(tmpso->so_tcpcb? (tmpso->so_tcpcb->t_state & (TCPS_TIME_WAIT|TCPS_LAST_ACK)) :0)) { /* Ooops, control connection already active */ diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c index ab9aa580d..244bad6a8 100644 --- a/BasiliskII/src/slirp/tcp_timer.c +++ b/BasiliskII/src/slirp/tcp_timer.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -32,14 +36,14 @@ #include -int tcp_keepidle = TCPTV_KEEP_IDLE; -int tcp_keepintvl = TCPTV_KEEPINTVL; -int tcp_maxidle; -int so_options = DO_KEEPALIVE; - +#ifdef LOG_ENABLED struct tcpstat tcpstat; /* tcp statistics */ +#endif + u_int32_t tcp_now; /* for RFC 1323 timestamps */ +static struct tcpcb *tcp_timers(register struct tcpcb *tp, int timer); + /* * Fast timeout routine for processing delayed acks */ @@ -50,7 +54,7 @@ tcp_fasttimo() register struct tcpcb *tp; DEBUG_CALL("tcp_fasttimo"); - + so = tcb.so_next; if (so) for (; so != &tcb; so = so->so_next) @@ -58,7 +62,7 @@ tcp_fasttimo() (tp->t_flags & TF_DELACK)) { tp->t_flags &= ~TF_DELACK; tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_delack++; + STAT(tcpstat.tcps_delack++); (void) tcp_output(tp); } } @@ -76,8 +80,7 @@ tcp_slowtimo() register int i; DEBUG_CALL("tcp_slowtimo"); - - tcp_maxidle = TCPTV_KEEPCNT * tcp_keepintvl; + /* * Search through tcb's and update active timers. */ @@ -123,21 +126,19 @@ tcp_canceltimers(tp) tp->t_timer[i] = 0; } -int tcp_backoff[TCP_MAXRXTSHIFT + 1] = +const int tcp_backoff[TCP_MAXRXTSHIFT + 1] = { 1, 2, 4, 8, 16, 32, 64, 64, 64, 64, 64, 64, 64 }; /* * TCP timer processing. */ -struct tcpcb * -tcp_timers(tp, timer) - register struct tcpcb *tp; - int timer; +static struct tcpcb * +tcp_timers(register struct tcpcb *tp, int timer) { register int rexmt; - + DEBUG_CALL("tcp_timers"); - + switch (timer) { /* @@ -148,8 +149,8 @@ tcp_timers(tp, timer) */ case TCPT_2MSL: if (tp->t_state != TCPS_TIME_WAIT && - tp->t_idle <= tcp_maxidle) - tp->t_timer[TCPT_2MSL] = tcp_keepintvl; + tp->t_idle <= TCP_MAXIDLE) + tp->t_timer[TCPT_2MSL] = TCPTV_KEEPINTVL; else tp = tcp_close(tp); break; @@ -160,12 +161,12 @@ tcp_timers(tp, timer) * to a longer retransmit interval and retransmit one segment. */ case TCPT_REXMT: - + /* * XXXXX If a packet has timed out, then remove all the queued * packets for that session. */ - + if (++tp->t_rxtshift > TCP_MAXRXTSHIFT) { /* * This is a hack to suit our terminal server here at the uni of canberra @@ -174,33 +175,33 @@ tcp_timers(tp, timer) * keep retransmitting it, it'll keep eating the zeroes, so we keep * retransmitting, and eventually the connection dies... * (this only happens on incoming data) - * + * * So, if we were gonna drop the connection from too many retransmits, * don't... instead halve the t_maxseg, which might break up the NULLs and * let them through - * + * * *sigh* */ - + tp->t_maxseg >>= 1; if (tp->t_maxseg < 32) { /* * We tried our best, now the connection must die! */ tp->t_rxtshift = TCP_MAXRXTSHIFT; - tcpstat.tcps_timeoutdrop++; + STAT(tcpstat.tcps_timeoutdrop++); tp = tcp_drop(tp, tp->t_softerror); /* tp->t_softerror : ETIMEDOUT); */ /* XXX */ return (tp); /* XXX */ } - + /* * Set rxtshift to 6, which is still at the maximum * backoff time */ tp->t_rxtshift = 6; } - tcpstat.tcps_rexmttimeo++; + STAT(tcpstat.tcps_rexmttimeo++); rexmt = TCP_REXMTVAL(tp) * tcp_backoff[tp->t_rxtshift]; TCPT_RANGESET(tp->t_rxtcur, rexmt, (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ @@ -236,7 +237,7 @@ tcp_timers(tp, timer) * size increase exponentially with time. If the * window is larger than the path can handle, this * exponential growth results in dropped packet(s) - * almost immediately. To get more time between + * almost immediately. To get more time between * drops but still "push" the network to take advantage * of improving conditions, we switch from exponential * to linear window opening at some threshold size. @@ -263,7 +264,7 @@ tcp_timers(tp, timer) * Force a byte to be output, if possible. */ case TCPT_PERSIST: - tcpstat.tcps_persisttimeo++; + STAT(tcpstat.tcps_persisttimeo++); tcp_setpersist(tp); tp->t_force = 1; (void) tcp_output(tp); @@ -275,13 +276,13 @@ tcp_timers(tp, timer) * or drop connection if idle for too long. */ case TCPT_KEEP: - tcpstat.tcps_keeptimeo++; + STAT(tcpstat.tcps_keeptimeo++); if (tp->t_state < TCPS_ESTABLISHED) goto dropit; /* if (tp->t_socket->so_options & SO_KEEPALIVE && */ - if ((so_options) && tp->t_state <= TCPS_CLOSE_WAIT) { - if (tp->t_idle >= tcp_keepidle + tcp_maxidle) + if ((SO_OPTIONS) && tp->t_state <= TCPS_CLOSE_WAIT) { + if (tp->t_idle >= TCPTV_KEEP_IDLE + TCP_MAXIDLE) goto dropit; /* * Send a packet designed to force a response @@ -295,7 +296,7 @@ tcp_timers(tp, timer) * by the protocol spec, this requires the * correspondent TCP to respond. */ - tcpstat.tcps_keepprobe++; + STAT(tcpstat.tcps_keepprobe++); #ifdef TCP_COMPAT_42 /* * The keepalive packet must have nonzero length @@ -307,13 +308,13 @@ tcp_timers(tp, timer) tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, tp->rcv_nxt, tp->snd_una - 1, 0); #endif - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEPINTVL; } else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_IDLE; break; dropit: - tcpstat.tcps_keepdrops++; + STAT(tcpstat.tcps_keepdrops++); tp = tcp_drop(tp, 0); /* ETIMEDOUT); */ break; } diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h index 73fe20894..f251846b4 100644 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -122,17 +126,12 @@ char *tcptimers[] = (tv) = (tvmax); \ } -extern int tcp_keepidle; /* time before keepalive probes begin */ -extern int tcp_keepintvl; /* time between keepalive probes */ -extern int tcp_maxidle; /* time to drop after starting probes */ -extern int tcp_ttl; /* time to live for TCP segs */ -extern int tcp_backoff[]; +extern const int tcp_backoff[]; struct tcpcb; -void tcp_fasttimo(void); -void tcp_slowtimo(void); -void tcp_canceltimers(struct tcpcb *); -struct tcpcb * tcp_timers(register struct tcpcb *, int); +void tcp_fasttimo _P((void)); +void tcp_slowtimo _P((void)); +void tcp_canceltimers _P((struct tcpcb *)); #endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h index c8e99ae03..82380f936 100644 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -181,6 +185,7 @@ typedef u_int32_t mbufp_32; #endif #define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) +#ifdef LOG_ENABLED /* * TCP statistics. * Many of these should be kept per connection, @@ -243,6 +248,8 @@ struct tcpstat { }; extern struct tcpstat tcpstat; /* tcp statistics */ +#endif + extern u_int32_t tcp_now; /* for RFC 1323 timestamps */ #endif diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h index dff5a3c96..82708b09c 100644 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c index 3ba2971c3..562ae8953 100644 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -1,8 +1,8 @@ /* * tftp.c - a simple, read-only tftp server for qemu - * + * * Copyright (c) 2004 Magnus Damm - * + * * 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 @@ -26,15 +26,15 @@ struct tftp_session { int in_use; - char filename[TFTP_FILENAME_MAX]; - + unsigned char filename[TFTP_FILENAME_MAX]; + struct in_addr client_ip; u_int16_t client_port; - + int timestamp; }; -struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; +static struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; const char *tftp_prefix; @@ -102,8 +102,15 @@ static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, { int fd; int bytes_read = 0; + char buffer[1024]; + int n; + + n = snprintf(buffer, sizeof(buffer), "%s/%s", + tftp_prefix, spt->filename); + if (n >= sizeof(buffer)) + return -1; - fd = open(spt->filename, O_RDONLY | O_BINARY); + fd = open(buffer, O_RDONLY | O_BINARY); if (fd < 0) { return -1; @@ -120,13 +127,53 @@ static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, return bytes_read; } -static int tftp_send_error(struct tftp_session *spt, +static int tftp_send_oack(struct tftp_session *spt, + const char *key, uint32_t value, + struct tftp_t *recv_tp) +{ + struct sockaddr_in saddr, daddr; + struct mbuf *m; + struct tftp_t *tp; + int n = 0; + + m = m_get(); + + if (!m) + return -1; + + memset(m->m_data, 0, m->m_size); + + m->m_data += IF_MAXLINKHDR; + tp = (void *)m->m_data; + m->m_data += sizeof(struct udpiphdr); + + tp->tp_op = htons(TFTP_OACK); + n += sprintf(tp->x.tp_buf + n, "%s", key) + 1; + n += sprintf(tp->x.tp_buf + n, "%u", value) + 1; + + saddr.sin_addr = recv_tp->ip.ip_dst; + saddr.sin_port = recv_tp->udp.uh_dport; + + daddr.sin_addr = spt->client_ip; + daddr.sin_port = spt->client_port; + + m->m_len = sizeof(struct tftp_t) - 514 + n - + sizeof(struct ip) - sizeof(struct udphdr); + udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); + + return 0; +} + + + +static int tftp_send_error(struct tftp_session *spt, u_int16_t errorcode, const char *msg, struct tftp_t *recv_tp) { struct sockaddr_in saddr, daddr; struct mbuf *m; struct tftp_t *tp; + int nobytes; m = m_get(); @@ -136,14 +183,13 @@ static int tftp_send_error(struct tftp_session *spt, memset(m->m_data, 0, m->m_size); - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; tp = (void *)m->m_data; m->m_data += sizeof(struct udpiphdr); - + tp->tp_op = htons(TFTP_ERROR); tp->x.tp_error.tp_error_code = htons(errorcode); - strncpy((char *)tp->x.tp_error.tp_msg, msg, sizeof(tp->x.tp_error.tp_msg)); - tp->x.tp_error.tp_msg[sizeof(tp->x.tp_error.tp_msg)-1] = 0; + strcpy(tp->x.tp_error.tp_msg, msg); saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -151,7 +197,9 @@ static int tftp_send_error(struct tftp_session *spt, daddr.sin_addr = spt->client_ip; daddr.sin_port = spt->client_port; - m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - + nobytes = 2; + + m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); @@ -161,7 +209,7 @@ static int tftp_send_error(struct tftp_session *spt, return 0; } -static int tftp_send_data(struct tftp_session *spt, +static int tftp_send_data(struct tftp_session *spt, u_int16_t block_nr, struct tftp_t *recv_tp) { @@ -182,10 +230,10 @@ static int tftp_send_data(struct tftp_session *spt, memset(m->m_data, 0, m->m_size); - m->m_data += if_maxlinkhdr; + m->m_data += IF_MAXLINKHDR; tp = (void *)m->m_data; m->m_data += sizeof(struct udpiphdr); - + tp->tp_op = htons(TFTP_DATA); tp->x.tp_data.tp_block_nr = htons(block_nr); @@ -207,7 +255,7 @@ static int tftp_send_data(struct tftp_session *spt, return -1; } - m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - + m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); @@ -237,7 +285,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) spt = &tftp_sessions[s]; src = tp->x.tp_buf; - dst = (u_int8_t *)spt->filename; + dst = spt->filename; n = pktlen - ((uint8_t *)&tp->x.tp_buf[0] - (uint8_t *)tp); /* get name */ @@ -249,28 +297,30 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) else { return; } - + if (src[k] == '\0') { break; } } - + if (k >= n) { return; } - + k++; - + /* check mode */ if ((n - k) < 6) { return; } - + if (memcmp(&src[k], "octet\0", 6) != 0) { tftp_send_error(spt, 4, "Unsupported transfer mode", tp); return; } + k += 6; /* skipping octet */ + /* do sanity checks on the filename */ if ((spt->filename[0] != '/') @@ -282,19 +332,60 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) /* only allow exported prefixes */ - if (!tftp_prefix - || (strncmp(spt->filename, tftp_prefix, strlen(tftp_prefix)) != 0)) { + if (!tftp_prefix) { tftp_send_error(spt, 2, "Access violation", tp); return; } /* check if the file exists */ - - if (tftp_read_data(spt, 0, (u_int8_t *)spt->filename, 0) < 0) { + + if (tftp_read_data(spt, 0, spt->filename, 0) < 0) { tftp_send_error(spt, 1, "File not found", tp); return; } + if (src[n - 1] != 0) { + tftp_send_error(spt, 2, "Access violation", tp); + return; + } + + while (k < n) { + const char *key, *value; + + key = src + k; + k += strlen(key) + 1; + + if (k >= n) { + tftp_send_error(spt, 2, "Access violation", tp); + return; + } + + value = src + k; + k += strlen(value) + 1; + + if (strcmp(key, "tsize") == 0) { + int tsize = atoi(value); + struct stat stat_p; + + if (tsize == 0 && tftp_prefix) { + char buffer[1024]; + int len; + + len = snprintf(buffer, sizeof(buffer), "%s/%s", + tftp_prefix, spt->filename); + + if (stat(buffer, &stat_p) == 0) + tsize = stat_p.st_size; + else { + tftp_send_error(spt, 1, "File not found", tp); + return; + } + } + + tftp_send_oack(spt, "tsize", tsize, tp); + } + } + tftp_send_data(spt, 1, tp); } @@ -308,8 +399,8 @@ static void tftp_handle_ack(struct tftp_t *tp, int pktlen) return; } - if (tftp_send_data(&tftp_sessions[s], - ntohs(tp->x.tp_data.tp_block_nr) + 1, + if (tftp_send_data(&tftp_sessions[s], + ntohs(tp->x.tp_data.tp_block_nr) + 1, tp) < 0) { return; } diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h index b150a0490..8f2675e07 100644 --- a/BasiliskII/src/slirp/tftp.h +++ b/BasiliskII/src/slirp/tftp.h @@ -9,32 +9,25 @@ #define TFTP_DATA 3 #define TFTP_ACK 4 #define TFTP_ERROR 5 +#define TFTP_OACK 6 #define TFTP_FILENAME_MAX 512 -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct tftp_t { struct ip ip; struct udphdr udp; u_int16_t tp_op; union { - struct { + struct { u_int16_t tp_block_nr; u_int8_t tp_buf[512]; } tp_data; - struct { + struct { u_int16_t tp_error_code; u_int8_t tp_msg[512]; } tp_error; u_int8_t tp_buf[512 + 2]; } x; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index 9d805ff37..c48923b0c 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -33,27 +37,31 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ -#include #include #include "ip_icmp.h" +#ifdef LOG_ENABLED struct udpstat udpstat; +#endif struct socket udb; +static u_int8_t udp_tos(struct socket *so); +static void udp_emu(struct socket *so, struct mbuf *m); + /* * UDP protocol implementation. * Per RFC 768, August, 1980. */ #ifndef COMPAT_42 -int udpcksum = 1; +#define UDPCKSUM 1 #else -int udpcksum = 0; /* XXX */ +#define UDPCKSUM 0 /* XXX */ #endif struct socket *udp_last_so = &udb; @@ -63,8 +71,8 @@ udp_init() { udb.so_next = udb.so_prev = &udb; } -/* m->m_data points at ip packet header - * m->m_len length ip packet +/* m->m_data points at ip packet header + * m->m_len length ip packet * ip->ip_len length data (IPDU) */ void @@ -76,14 +84,14 @@ udp_input(m, iphlen) register struct udphdr *uh; /* struct mbuf *opts = 0;*/ int len; - struct ip save_ip; + struct ip save_ip; struct socket *so; - + DEBUG_CALL("udp_input"); DEBUG_ARG("m = %lx", (long)m); DEBUG_ARG("iphlen = %d", iphlen); - - udpstat.udps_ipackets++; + + STAT(udpstat.udps_ipackets++); /* * Strip IP options, if any; should skip this, @@ -110,34 +118,34 @@ udp_input(m, iphlen) if (ip->ip_len != len) { if (len > ip->ip_len) { - udpstat.udps_badlen++; + STAT(udpstat.udps_badlen++); goto bad; } m_adj(m, len - ip->ip_len); ip->ip_len = len; } - + /* * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - save_ip = *ip; + save_ip = *ip; save_ip.ip_len+= iphlen; /* tcp_input subtracts this */ /* * Checksum extended UDP header and data. */ - if (udpcksum && uh->uh_sum) { + if (UDPCKSUM && uh->uh_sum) { ((struct ipovly *)ip)->ih_next = 0; ((struct ipovly *)ip)->ih_prev = 0; ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply - * uh->uh_sum = cksum(m, len + sizeof (struct ip)); - * if (uh->uh_sum) { + * uh->uh_sum = cksum(m, len + sizeof (struct ip)); + * if (uh->uh_sum) { */ if(cksum(m, len + sizeof(struct ip))) { - udpstat.udps_badsum++; + STAT(udpstat.udps_badsum++); goto bad; } } @@ -165,7 +173,7 @@ udp_input(m, iphlen) if (so->so_lport != uh->uh_sport || so->so_laddr.s_addr != ip->ip_src.s_addr) { struct socket *tmp; - + for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next) { if (tmp->so_lport == uh->uh_sport && tmp->so_laddr.s_addr == ip->ip_src.s_addr) { @@ -178,11 +186,11 @@ udp_input(m, iphlen) if (tmp == &udb) { so = NULL; } else { - udpstat.udpps_pcbcachemiss++; + STAT(udpstat.udpps_pcbcachemiss++); udp_last_so = so; } } - + if (so == NULL) { /* * If there's no socket for this packet, @@ -190,22 +198,22 @@ udp_input(m, iphlen) */ if ((so = socreate()) == NULL) goto bad; if(udp_attach(so) == -1) { - DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", + DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", errno,strerror(errno))); sofree(so); goto bad; } - + /* * Setup fields */ /* udp_last_so = so; */ so->so_laddr = ip->ip_src; so->so_lport = uh->uh_sport; - + if ((so->so_iptos = udp_tos(so)) == 0) so->so_iptos = ip->ip_tos; - + /* * XXXXX Here, check if it's in udpexec_list, * and if it is, do the fork_exec() etc. @@ -230,7 +238,7 @@ udp_input(m, iphlen) m->m_data -= iphlen; *ip=save_ip; DEBUG_MISC((dfd,"udp tx errno = %d-%s\n",errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); } m_free(so->so_m); /* used for ICMP if error on sorecvfrom */ @@ -248,7 +256,7 @@ udp_input(m, iphlen) return; } -int udp_output2(struct socket *so, struct mbuf *m, +int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos) { @@ -266,19 +274,16 @@ int udp_output2(struct socket *so, struct mbuf *m, */ m->m_data -= sizeof(struct udpiphdr); m->m_len += sizeof(struct udpiphdr); - + /* * Fill in mbuf with extended UDP header * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - //ui->ui_next = ui->ui_prev = 0; - - memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - + ui->ui_next = ui->ui_prev = 0; ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ + ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ ui->ui_src = saddr->sin_addr; ui->ui_dst = daddr->sin_addr; @@ -290,23 +295,23 @@ int udp_output2(struct socket *so, struct mbuf *m, * Stuff checksum and output datagram. */ ui->ui_sum = 0; - if (udpcksum) { + if (UDPCKSUM) { if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) ui->ui_sum = 0xffff; } - ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; + ((struct ip *)ui)->ip_len = m->m_len; - ((struct ip *)ui)->ip_ttl = ip_defttl; + ((struct ip *)ui)->ip_ttl = IPDEFTTL; ((struct ip *)ui)->ip_tos = iptos; - - udpstat.udps_opackets++; - + + STAT(udpstat.udps_opackets++); + error = ip_output(so, m); - + return (error); } -int udp_output(struct socket *so, struct mbuf *m, +int udp_output(struct socket *so, struct mbuf *m, struct sockaddr_in *addr) { @@ -320,7 +325,7 @@ int udp_output(struct socket *so, struct mbuf *m, } daddr.sin_addr = so->so_laddr; daddr.sin_port = so->so_lport; - + return udp_output2(so, m, &saddr, &daddr, so->so_iptos); } @@ -329,22 +334,25 @@ udp_attach(so) struct socket *so; { struct sockaddr_in addr; - + if((so->s = socket(AF_INET,SOCK_DGRAM,0)) != -1) { /* * Here, we bind() the socket. Although not really needed * (sendto() on an unbound socket will bind it), it's done * here so that emulation of ytalk etc. don't have to do it */ - memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int error = WSAGetLastError(); + int lasterrno=errno; closesocket(so->s); so->s=-1; - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(lasterrno); +#else + errno=lasterrno; +#endif } else { /* success, insert in queue */ so->so_expire = curtime + SO_EXPIRE; @@ -364,7 +372,7 @@ udp_detach(so) sofree(so); } -struct tos_t udptos[] = { +static const struct tos_t udptos[] = { {0, 53, IPTOS_LOWDELAY, 0}, /* DNS */ {517, 517, IPTOS_LOWDELAY, EMU_TALK}, /* talk */ {518, 518, IPTOS_LOWDELAY, EMU_NTALK}, /* ntalk */ @@ -372,12 +380,11 @@ struct tos_t udptos[] = { {0, 0, 0, 0} }; -u_int8_t -udp_tos(so) - struct socket *so; +static u_int8_t +udp_tos(struct socket *so) { int i = 0; - + while(udptos[i].tos) { if ((udptos[i].fport && ntohs(so->so_fport) == udptos[i].fport) || (udptos[i].lport && ntohs(so->so_lport) == udptos[i].lport)) { @@ -386,7 +393,7 @@ udp_tos(so) } i++; } - + return 0; } @@ -397,29 +404,27 @@ udp_tos(so) /* * Here, talk/ytalk/ntalk requests must be emulated */ -void -udp_emu(so, m) - struct socket *so; - struct mbuf *m; +static void +udp_emu(struct socket *so, struct mbuf *m) { struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); + int addrlen = sizeof(addr); #ifdef EMULATE_TALK CTL_MSG_OLD *omsg; CTL_MSG *nmsg; char buff[sizeof(CTL_MSG)]; u_char type; - + struct talk_request { struct talk_request *next; struct socket *udp_so; struct socket *tcp_so; } *req; - - static struct talk_request *req_tbl = 0; - + + static struct talk_request *req_tbl = 0; + #endif - + struct cu_header { uint16_t d_family; // destination family uint16_t d_port; // destination port @@ -446,7 +451,7 @@ struct cu_header { */ if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) return; - + #define IS_OLD (so->so_emu == EMU_TALK) #define COPY_MSG(dest, src) { dest->type = src->type; \ @@ -469,7 +474,7 @@ struct cu_header { OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); - } else { /* new talk */ + } else { /* new talk */ omsg = (CTL_MSG_OLD *) buff; nmsg = mtod(m, CTL_MSG *); type = nmsg->type; @@ -477,10 +482,10 @@ struct cu_header { OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); } - - if (type == LOOK_UP) + + if (type == LOOK_UP) return; /* for LOOK_UP this is enough */ - + if (IS_OLD) { /* make a copy of the message */ COPY_MSG(nmsg, omsg); nmsg->vers = 1; @@ -499,75 +504,75 @@ struct cu_header { * ports, 517 and 518. This is why we have two copies * of the message, one in old talk and one in new talk * format. - */ + */ if (type == ANNOUNCE) { int s; u_short temp_port; - + for(req = req_tbl; req; req = req->next) if (so == req->udp_so) break; /* found it */ - + if (!req) { /* no entry for so, create new */ req = (struct talk_request *) malloc(sizeof(struct talk_request)); req->udp_so = so; - req->tcp_so = solisten(0, - OTOSIN(omsg, addr)->sin_addr.s_addr, + req->tcp_so = solisten(0, + OTOSIN(omsg, addr)->sin_addr.s_addr, OTOSIN(omsg, addr)->sin_port, SS_FACCEPTONCE); req->next = req_tbl; req_tbl = req; - } - + } + /* replace port number in addr field */ addrlen = sizeof(addr); - getsockname(req->tcp_so->s, + getsockname(req->tcp_so->s, (struct sockaddr *) &addr, - &addrlen); + &addrlen); OTOSIN(omsg, addr)->sin_port = addr.sin_port; OTOSIN(omsg, addr)->sin_addr = our_addr; OTOSIN(nmsg, addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, addr)->sin_addr = our_addr; - + OTOSIN(nmsg, addr)->sin_addr = our_addr; + /* send LEAVE_INVITEs */ temp_port = OTOSIN(omsg, ctl_addr)->sin_port; OTOSIN(omsg, ctl_addr)->sin_port = 0; OTOSIN(nmsg, ctl_addr)->sin_port = 0; - omsg->type = nmsg->type = LEAVE_INVITE; - + omsg->type = nmsg->type = LEAVE_INVITE; + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); addr.sin_addr = our_addr; addr.sin_family = AF_INET; addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, + sendto(s, (char *)omsg, sizeof(*omsg), 0, (struct sockaddr *)&addr, sizeof(addr)); addr.sin_port = htons(518); sendto(s, (char *)nmsg, sizeof(*nmsg), 0, (struct sockaddr *) &addr, sizeof(addr)); closesocket(s) ; - omsg->type = nmsg->type = ANNOUNCE; + omsg->type = nmsg->type = ANNOUNCE; OTOSIN(omsg, ctl_addr)->sin_port = temp_port; OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; } - - /* + + /* * If it is a DELETE message, we send a copy to the * local daemons. Then we delete the entry corresponding * to our socket from the request table. */ - + if (type == DELETE) { struct talk_request *temp_req, *req_next; int s; u_short temp_port; - + temp_port = OTOSIN(omsg, ctl_addr)->sin_port; OTOSIN(omsg, ctl_addr)->sin_port = 0; OTOSIN(nmsg, ctl_addr)->sin_port = 0; - + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); addr.sin_addr = our_addr; addr.sin_family = AF_INET; @@ -578,7 +583,7 @@ struct cu_header { sendto(s, (char *)nmsg, sizeof(*nmsg), 0, (struct sockaddr *)&addr, sizeof(addr)); closesocket(s); - + OTOSIN(omsg, ctl_addr)->sin_port = temp_port; OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; @@ -601,18 +606,18 @@ struct cu_header { } } } - - return; + + return; #endif - + case EMU_CUSEEME: - + /* * Cu-SeeMe emulation. * Hopefully the packet is more that 16 bytes long. We don't * do any other tests, just replace the address and port * fields. - */ + */ if (m->m_len >= sizeof (*cu_head)) { if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) return; @@ -620,7 +625,7 @@ struct cu_header { cu_head->s_port = addr.sin_port; cu_head->so_addr = our_addr.s_addr; } - + return; } } @@ -634,9 +639,8 @@ udp_listen(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - socklen_t addrlen = sizeof(struct sockaddr_in); - int opt = 1; - + int addrlen = sizeof(struct sockaddr_in), opt = 1; + if ((so = socreate()) == NULL) { free(so); return NULL; @@ -645,7 +649,6 @@ udp_listen(port, laddr, lport, flags) so->so_expire = curtime + SO_EXPIRE; insque(so,&udb); - memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_addr.s_addr = INADDR_ANY; addr.sin_port = port; @@ -656,20 +659,20 @@ udp_listen(port, laddr, lport, flags) } setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); /* setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); */ - + getsockname(so->s,(struct sockaddr *)&addr,&addrlen); so->so_fport = addr.sin_port; if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) so->so_faddr = alias_addr; else so->so_faddr = addr.sin_addr; - + so->so_lport = lport; so->so_laddr.s_addr = laddr; if (flags != SS_FACCEPTONCE) so->so_expire = 0; - + so->so_state = SS_ISFCONNECTED; - + return so; } diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h index 7d844efe2..4f69b098c 100644 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -42,20 +46,12 @@ extern struct socket *udp_last_so; * Udp protocol header. * Per RFC 768, September, 1981. */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - struct udphdr { u_int16_t uh_sport; /* source port */ u_int16_t uh_dport; /* destination port */ int16_t uh_ulen; /* udp length */ u_int16_t uh_sum; /* udp checksum */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif +}; /* * UDP kernel structures and variables. @@ -76,6 +72,7 @@ struct udpiphdr { #define ui_ulen ui_u.uh_ulen #define ui_sum ui_u.uh_sum +#ifdef LOG_ENABLED struct udpstat { /* input statistics: */ u_long udps_ipackets; /* total input packets */ @@ -89,6 +86,7 @@ struct udpstat { /* output statistics: */ u_long udps_opackets; /* total output packets */ }; +#endif /* * Names for UDP sysctl objects @@ -96,19 +94,20 @@ struct udpstat { #define UDPCTL_CHECKSUM 1 /* checksum UDP packets */ #define UDPCTL_MAXID 2 +#ifdef LOG_ENABLED extern struct udpstat udpstat; +#endif + extern struct socket udb; struct mbuf; -void udp_init(void); -void udp_input(register struct mbuf *, int); -int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); -int udp_attach(struct socket *); -void udp_detach(struct socket *); -u_int8_t udp_tos(struct socket *); -void udp_emu(struct socket *, struct mbuf *); -struct socket * udp_listen(u_int, u_int32_t, u_int, int); -int udp_output2(struct socket *so, struct mbuf *m, +void udp_init _P((void)); +void udp_input _P((register struct mbuf *, int)); +int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); +int udp_attach _P((struct socket *)); +void udp_detach _P((struct socket *)); +struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); +int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos); #endif From ef4725552ef0a953fceaf3e7fd5166462b70f861 Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 3 Oct 2017 22:37:31 +0200 Subject: [PATCH 168/534] SLIRP 0.10.1 64 Bits clean ? --- BasiliskII/src/slirp/COPYRIGHT | 3 - BasiliskII/src/slirp/bootp.c | 29 +- BasiliskII/src/slirp/cksum.c | 6 +- BasiliskII/src/slirp/debug.c | 2 - BasiliskII/src/slirp/debug.h | 1 - BasiliskII/src/slirp/icmp_var.h | 6 +- BasiliskII/src/slirp/if.c | 12 +- BasiliskII/src/slirp/ip.h | 70 ++--- BasiliskII/src/slirp/ip_icmp.c | 20 +- BasiliskII/src/slirp/ip_icmp.h | 9 +- BasiliskII/src/slirp/ip_input.c | 165 +++++++----- BasiliskII/src/slirp/ip_output.c | 6 +- BasiliskII/src/slirp/libslirp.h | 7 +- BasiliskII/src/slirp/main.h | 3 + BasiliskII/src/slirp/mbuf.c | 9 +- BasiliskII/src/slirp/mbuf.h | 6 +- BasiliskII/src/slirp/misc.c | 60 +---- BasiliskII/src/slirp/misc.h | 6 +- BasiliskII/src/slirp/sbuf.c | 3 +- BasiliskII/src/slirp/slirp.c | 393 +++++++++++++++++++++++++++- BasiliskII/src/slirp/slirp.h | 14 +- BasiliskII/src/slirp/slirp_config.h | 8 +- BasiliskII/src/slirp/socket.c | 111 ++++++-- BasiliskII/src/slirp/socket.h | 10 +- BasiliskII/src/slirp/tcp.h | 6 +- BasiliskII/src/slirp/tcp_input.c | 60 +++-- BasiliskII/src/slirp/tcp_output.c | 6 +- BasiliskII/src/slirp/tcp_subr.c | 75 +++--- BasiliskII/src/slirp/tcp_timer.c | 6 +- BasiliskII/src/slirp/tcp_timer.h | 6 +- BasiliskII/src/slirp/tcp_var.h | 31 +-- BasiliskII/src/slirp/tcpip.h | 17 +- BasiliskII/src/slirp/tftp.c | 17 +- BasiliskII/src/slirp/udp.c | 26 +- BasiliskII/src/slirp/udp.h | 9 +- 35 files changed, 766 insertions(+), 452 deletions(-) diff --git a/BasiliskII/src/slirp/COPYRIGHT b/BasiliskII/src/slirp/COPYRIGHT index 3f331ee07..1bc83d497 100644 --- a/BasiliskII/src/slirp/COPYRIGHT +++ b/BasiliskII/src/slirp/COPYRIGHT @@ -25,9 +25,6 @@ The copyright terms and conditions: 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. - 3. All advertising materials mentioning features or use of this software - must display the following acknowledgment: - This product includes software developed by Danny Gasparovski. THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c index 3ae3db209..ca177f40c 100644 --- a/BasiliskII/src/slirp/bootp.c +++ b/BasiliskII/src/slirp/bootp.c @@ -36,7 +36,7 @@ typedef struct { uint8_t macaddr[6]; } BOOTPClient; -BOOTPClient bootp_clients[NB_ADDR]; +static BOOTPClient bootp_clients[NB_ADDR]; const char *bootp_filename; @@ -172,7 +172,8 @@ static void bootp_reply(struct bootp_t *bp) } if (bootp_filename) - snprintf(rbp->bp_file, sizeof(rbp->bp_file), "%s", bootp_filename); + snprintf((char *)rbp->bp_file, sizeof(rbp->bp_file), "%s", + bootp_filename); dprintf("offered addr=%08x\n", ntohl(daddr.sin_addr.s_addr)); @@ -190,6 +191,8 @@ static void bootp_reply(struct bootp_t *bp) rbp->bp_yiaddr = daddr.sin_addr; /* Client IP address */ rbp->bp_siaddr = saddr.sin_addr; /* Server IP address */ + daddr.sin_addr.s_addr = 0xffffffffu; + q = rbp->bp_vend; memcpy(q, rfc1533_cookie, 4); q += 4; @@ -218,16 +221,18 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 0xff; *q++ = 0x00; - *q++ = RFC1533_GATEWAY; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_DNS; - *q++ = 4; - dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); - memcpy(q, &dns_addr, 4); - q += 4; + if (!slirp_restrict) { + *q++ = RFC1533_GATEWAY; + *q++ = 4; + memcpy(q, &saddr.sin_addr, 4); + q += 4; + + *q++ = RFC1533_DNS; + *q++ = 4; + dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); + memcpy(q, &dns_addr, 4); + q += 4; + } *q++ = RFC2132_LEASE_TIME; *q++ = 4; diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c index b98373b51..34977ffc0 100644 --- a/BasiliskII/src/slirp/cksum.c +++ b/BasiliskII/src/slirp/cksum.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c index 7c8581d63..bfef58069 100644 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -16,8 +16,6 @@ int dostats = 0; #endif int slirp_debug = 0; -extern char *strerror _P((int)); - /* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ #ifndef CONFIG_QEMU diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h index 8a523b2ed..c43eff73d 100644 --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -37,4 +37,3 @@ extern int slirp_debug; #endif void debug_init _P((char *, int)); - diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h index cd865b797..99d4c9e6b 100644 --- a/BasiliskII/src/slirp/icmp_var.h +++ b/BasiliskII/src/slirp/icmp_var.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c index 67a7b6ff8..0e10f3e6d 100644 --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -15,9 +15,8 @@ struct mbuf *next_m; /* Pointer to next mbuf to output */ #define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) -void -ifs_insque(ifm, ifmhead) - struct mbuf *ifm, *ifmhead; +static void +ifs_insque(struct mbuf *ifm, struct mbuf *ifmhead) { ifm->ifs_next = ifmhead->ifs_next; ifmhead->ifs_next = ifm; @@ -25,9 +24,8 @@ ifs_insque(ifm, ifmhead) ifm->ifs_next->ifs_prev = ifm; } -void -ifs_remque(ifm) - struct mbuf *ifm; +static void +ifs_remque(struct mbuf *ifm) { ifm->ifs_prev->ifs_next = ifm->ifs_next; ifm->ifs_next->ifs_prev = ifm->ifs_prev; @@ -291,7 +289,7 @@ if_start(void) } /* Encapsulate the packet for sending */ - if_encap(ifm->m_data, ifm->m_len); + if_encap((uint8_t *)ifm->m_data, ifm->m_len); m_free(ifm); diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h index a8cdb0d3f..7a7a9b943 100644 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -183,35 +179,31 @@ struct ip_timestamp { #define IP_MSS 576 /* default maximum segment size */ -#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ -#include -#else #if SIZEOF_CHAR_P == 4 -typedef caddr_t caddr32_t; -#else -typedef u_int32_t caddr32_t; -#endif -#endif - -#if SIZEOF_CHAR_P == 4 -typedef struct ipq *ipqp_32; -typedef struct ipasfrag *ipasfragp_32; +struct mbuf_ptr { + struct mbuf *mptr; + uint32_t dummy; +}; #else -typedef caddr32_t ipqp_32; -typedef caddr32_t ipasfragp_32; +struct mbuf_ptr { + struct mbuf *mptr; +}; #endif +struct qlink { + void *next, *prev; +}; /* * Overlay for ip header used by other protocols (tcp, udp). */ struct ipovly { - caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ + struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ u_int8_t ih_x1; /* (unused) */ u_int8_t ih_pr; /* protocol */ u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -}; +} __attribute__((packed)); /* * Ip reassembly queue structure. Each fragment @@ -221,44 +213,30 @@ struct ipovly { * size 28 bytes */ struct ipq { - ipqp_32 next,prev; /* to other reass headers */ + struct qlink frag_link; /* to ip headers of fragments */ + struct qlink ip_link; /* to other reass headers */ u_int8_t ipq_ttl; /* time for reass q to live */ u_int8_t ipq_p; /* protocol of this fragment */ u_int16_t ipq_id; /* sequence id for reassembly */ - ipasfragp_32 ipq_next,ipq_prev; - /* to ip headers of fragments */ struct in_addr ipq_src,ipq_dst; }; /* * Ip header, when holding a fragment. * - * Note: ipf_next must be at same offset as ipq_next above + * Note: ipf_link must be at same offset as frag_link above */ struct ipasfrag { -#ifdef WORDS_BIGENDIAN - u_int ip_v:4, - ip_hl:4; -#else - u_int ip_hl:4, - ip_v:4; -#endif - /* BUG : u_int changed to u_int8_t. - * sizeof(u_int)==4 on linux 2.0 - */ - u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit - * to avoid destroying tos (PPPDTRuu); - * copied from (ip_off&IP_MF) */ - u_int16_t ip_len; - u_int16_t ip_id; - u_int16_t ip_off; - u_int8_t ip_ttl; - u_int8_t ip_p; - u_int16_t ip_sum; - ipasfragp_32 ipf_next; /* next fragment */ - ipasfragp_32 ipf_prev; /* previous fragment */ + struct qlink ipf_link; + struct ip ipf_ip; }; +#define ipf_off ipf_ip.ip_off +#define ipf_tos ipf_ip.ip_tos +#define ipf_len ipf_ip.ip_len +#define ipf_next ipf_link.next +#define ipf_prev ipf_link.prev + /* * Structure stored in mbuf in inpcb.ip_options * and passed to ip_output when ip options are in use. diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c index d1da0a2fc..4b27facf1 100644 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -43,7 +39,7 @@ struct icmpstat icmpstat; /* The message sent when emulating PING */ /* Be nice and tell them it's just a pseudo-ping packet */ -const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; +static const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; /* list of actions for icmp_error() on RX of an icmp message */ static const int icmp_flush[19] = { @@ -207,12 +203,8 @@ icmp_input(m, hlen) #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error(msrc, type, code, minsize, message) - struct mbuf *msrc; - u_char type; - u_char code; - int minsize; - char *message; +icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, + const char *message) { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -228,7 +220,7 @@ icmp_error(msrc, type, code, minsize, message) /* check msrc */ if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); -#if DEBUG +#ifdef DEBUG { char bufa[20], bufb[20]; strcpy(bufa, inet_ntoa(ip->ip_src)); strcpy(bufb, inet_ntoa(ip->ip_dst)); @@ -285,7 +277,7 @@ icmp_error(msrc, type, code, minsize, message) HTONS(icp->icmp_ip.ip_id); HTONS(icp->icmp_ip.ip_off); -#if DEBUG +#ifdef DEBUG if(message) { /* DEBUG : append message to ICMP packet */ int message_len; char *cpnt; diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h index 8c9b5a1ba..03301313e 100644 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -158,7 +154,8 @@ struct icmp { (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) void icmp_input _P((struct mbuf *, int)); -void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); +void icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, + const char *message); void icmp_reflect _P((struct mbuf *)); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c index b04684027..505149a33 100644 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -43,6 +39,7 @@ */ #include +#include #include "ip_icmp.h" #ifdef LOG_ENABLED @@ -51,7 +48,7 @@ struct ipstat ipstat; struct ipq ipq; -static struct ip *ip_reass(register struct ipasfrag *ip, +static struct ip *ip_reass(register struct ip *ip, register struct ipq *fp); static void ip_freef(struct ipq *fp); static void ip_enq(register struct ipasfrag *p, @@ -65,7 +62,7 @@ static void ip_deq(register struct ipasfrag *p); void ip_init() { - ipq.next = ipq.prev = (ipqp_32)&ipq; + ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); @@ -136,6 +133,27 @@ ip_input(m) STAT(ipstat.ips_tooshort++); goto bad; } + + if (slirp_restrict) { + if (memcmp(&ip->ip_dst.s_addr, &special_addr, 3)) { + if (ip->ip_dst.s_addr == 0xffffffff && ip->ip_p != IPPROTO_UDP) + goto bad; + } else { + int host = ntohl(ip->ip_dst.s_addr) & 0xff; + struct ex_list *ex_ptr; + + if (host == 0xff) + goto bad; + + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) + if (ex_ptr->ex_addr == host) + break; + + if (!ex_ptr) + goto bad; + } + } + /* Should drop packet if mbuf too long? hmmm... */ if (m->m_len > ip->ip_len) m_adj(m, ip->ip_len - m->m_len); @@ -167,18 +185,20 @@ ip_input(m) */ if (ip->ip_off &~ IP_DF) { register struct ipq *fp; + struct qlink *l; /* * Look for queue of fragments * of this datagram. */ - for (fp = (struct ipq *) ipq.next; fp != &ipq; - fp = (struct ipq *) fp->next) - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) + for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { + fp = container_of(l, struct ipq, ip_link); + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) goto found; - fp = 0; + } + fp = NULL; found: /* @@ -188,9 +208,9 @@ ip_input(m) */ ip->ip_len -= hlen; if (ip->ip_off & IP_MF) - ((struct ipasfrag *)ip)->ipf_mff |= 1; + ip->ip_tos |= 1; else - ((struct ipasfrag *)ip)->ipf_mff &= ~1; + ip->ip_tos &= ~1; ip->ip_off <<= 3; @@ -199,9 +219,9 @@ ip_input(m) * or if this is not the first fragment, * attempt reassembly; if it succeeds, proceed. */ - if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { + if (ip->ip_tos & 1 || ip->ip_off) { STAT(ipstat.ips_fragments++); - ip = ip_reass((struct ipasfrag *)ip, fp); + ip = ip_reass(ip, fp); if (ip == 0) return; STAT(ipstat.ips_reassembled++); @@ -237,6 +257,8 @@ ip_input(m) return; } +#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) +#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) /* * Take incoming datagram fragment and try to * reassemble it into whole datagram. If a chain for @@ -244,7 +266,7 @@ ip_input(m) * is given as fp; otherwise have to make a chain. */ static struct ip * -ip_reass(register struct ipasfrag *ip, register struct ipq *fp) +ip_reass(register struct ip *ip, register struct ipq *fp) { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; @@ -271,13 +293,13 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) struct mbuf *t; if ((t = m_get()) == NULL) goto dropfrag; fp = mtod(t, struct ipq *); - insque_32(fp, &ipq); + insque(&fp->ip_link, &ipq.ip_link); fp->ipq_ttl = IPFRAGTTL; fp->ipq_p = ip->ip_p; fp->ipq_id = ip->ip_id; - fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; - fp->ipq_src = ((struct ip *)ip)->ip_src; - fp->ipq_dst = ((struct ip *)ip)->ip_dst; + fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; + fp->ipq_src = ip->ip_src; + fp->ipq_dst = ip->ip_dst; q = (struct ipasfrag *)fp; goto insert; } @@ -285,9 +307,9 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) /* * Find a segment which begins after this one does. */ - for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *)q->ipf_next) - if (q->ip_off > ip->ip_off) + for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; + q = q->ipf_next) + if (q->ipf_off > ip->ip_off) break; /* @@ -295,9 +317,9 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (q->ipf_prev != (ipasfragp_32)fp) { - i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + - ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; + if (q->ipf_prev != &fp->frag_link) { + struct ipasfrag *pq = q->ipf_prev; + i = pq->ipf_off + pq->ipf_len - ip->ip_off; if (i > 0) { if (i >= ip->ip_len) goto dropfrag; @@ -311,17 +333,18 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { - i = (ip->ip_off + ip->ip_len) - q->ip_off; - if (i < q->ip_len) { - q->ip_len -= i; - q->ip_off += i; + while (q != (struct ipasfrag*)&fp->frag_link && + ip->ip_off + ip->ip_len > q->ipf_off) { + i = (ip->ip_off + ip->ip_len) - q->ipf_off; + if (i < q->ipf_len) { + q->ipf_len -= i; + q->ipf_off += i; m_adj(dtom(q), i); break; } - q = (struct ipasfrag *) q->ipf_next; - m_freem(dtom((struct ipasfrag *) q->ipf_prev)); - ip_deq((struct ipasfrag *) q->ipf_prev); + q = q->ipf_next; + m_freem(dtom(q->ipf_prev)); + ip_deq(q->ipf_prev); } insert: @@ -329,27 +352,26 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * Stick new segment in its place; * check for complete reassembly. */ - ip_enq(ip, (struct ipasfrag *) q->ipf_prev); + ip_enq(iptofrag(ip), q->ipf_prev); next = 0; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *) q->ipf_next) { - if (q->ip_off != next) + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; + q = q->ipf_next) { + if (q->ipf_off != next) return (0); - next += q->ip_len; + next += q->ipf_len; } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) + if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) return (0); /* * Reassembly is complete; concatenate fragments. */ - q = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; m = dtom(q); q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag *)fp) { - struct mbuf *t; - t = dtom(q); + while (q != (struct ipasfrag*)&fp->frag_link) { + struct mbuf *t = dtom(q); q = (struct ipasfrag *) q->ipf_next; m_cat(m, t); } @@ -360,7 +382,7 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * dequeue and discard fragment reassembly header. * Make header visible. */ - ip = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; /* * If the fragments concatenated to an mbuf that's @@ -370,25 +392,24 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * into the new buffer. */ if (m->m_flags & M_EXT) { - int delta; - delta = (char *)ip - m->m_dat; - ip = (struct ipasfrag *)(m->m_ext + delta); + int delta = (char *)q - m->m_dat; + q = (struct ipasfrag *)(m->m_ext + delta); } /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ + ip = fragtoip(q); ip->ip_len = next; - ip->ipf_mff &= ~1; - ((struct ip *)ip)->ip_src = fp->ipq_src; - ((struct ip *)ip)->ip_dst = fp->ipq_dst; - remque_32(fp); + ip->ip_tos &= ~1; + ip->ip_src = fp->ipq_src; + ip->ip_dst = fp->ipq_dst; + remque(&fp->ip_link); (void) m_free(dtom(fp)); - m = dtom(ip); m->m_len += (ip->ip_hl << 2); m->m_data -= (ip->ip_hl << 2); - return ((struct ip *)ip); + return ip; dropfrag: STAT(ipstat.ips_fragdropped++); @@ -405,13 +426,12 @@ ip_freef(struct ipq *fp) { register struct ipasfrag *q, *p; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = p) { - p = (struct ipasfrag *) q->ipf_next; + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { + p = q->ipf_next; ip_deq(q); m_freem(dtom(q)); } - remque_32(fp); + remque(&fp->ip_link); (void) m_free(dtom(fp)); } @@ -424,10 +444,10 @@ ip_enq(register struct ipasfrag *p, register struct ipasfrag *prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = (ipasfragp_32) prev; + p->ipf_prev = prev; p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; - prev->ipf_next = (ipasfragp_32) p; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; + prev->ipf_next = p; } /* @@ -448,20 +468,21 @@ ip_deq(register struct ipasfrag *p) void ip_slowtimo() { - register struct ipq *fp; + struct qlink *l; DEBUG_CALL("ip_slowtimo"); - fp = (struct ipq *) ipq.next; - if (fp == 0) + l = ipq.ip_link.next; + + if (l == 0) return; - while (fp != &ipq) { - --fp->ipq_ttl; - fp = (struct ipq *) fp->next; - if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { + while (l != &ipq.ip_link) { + struct ipq *fp = container_of(l, struct ipq, ip_link); + l = l->next; + if (--fp->ipq_ttl == 0) { STAT(ipstat.ips_fragtimeout++); - ip_freef((struct ipq *) fp->prev); + ip_freef(fp); } } } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c index a8a6067bd..9538db989 100644 --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h index 7e4cfa98a..6c5db54c9 100644 --- a/BasiliskII/src/slirp/libslirp.h +++ b/BasiliskII/src/slirp/libslirp.h @@ -5,7 +5,7 @@ extern "C" { #endif -void slirp_init(void); +void slirp_init(int restrict, char *special_ip); void slirp_select_fill(int *pnfds, fd_set *readfds, fd_set *writefds, fd_set *xfds); @@ -20,13 +20,16 @@ void slirp_output(const uint8_t *pkt, int pkt_len); int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const void *args, int addr_low_byte, int guest_port); extern const char *tftp_prefix; extern char slirp_hostname[33]; void slirp_stats(void); +void slirp_socket_recv(int addr_low_byte, int guest_port, const uint8_t *buf, + int size); +size_t slirp_socket_can_recv(int addr_low_byte, int guest_port); #ifdef __cplusplus } diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h index c01addac4..ed5138559 100644 --- a/BasiliskII/src/slirp/main.h +++ b/BasiliskII/src/slirp/main.h @@ -44,6 +44,8 @@ extern int towrite_max; extern int ppp_exit; extern int tcp_keepintvl; extern uint8_t client_ethaddr[6]; +extern const char *slirp_special_ip; +extern int slirp_restrict; #define PROTO_SLIP 0x1 #ifdef USE_PPP @@ -51,3 +53,4 @@ extern uint8_t client_ethaddr[6]; #endif void if_encap(const uint8_t *ip_data, int ip_data_len); +ssize_t slirp_send(struct socket *so, const void *buf, size_t len, int flags); diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c index 5d1255428..655de4180 100644 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -17,8 +17,6 @@ #include -struct mbuf *mbutl; -char *mclrefcnt; int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; #define MBUF_THRESH 30 @@ -28,7 +26,7 @@ int mbuf_max = 0; * Find a nice value for msize * XXX if_maxlinkhdr already in mtu */ -#define MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) +#define SLIRP_MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) void m_init() @@ -54,7 +52,7 @@ m_get() DEBUG_CALL("m_get"); if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(MSIZE); + m = (struct mbuf *)malloc(SLIRP_MSIZE); if (m == NULL) goto end_error; mbuf_alloced++; if (mbuf_alloced > MBUF_THRESH) @@ -71,7 +69,7 @@ m_get() m->m_flags = (flags | M_USEDLIST); /* Initialise it */ - m->m_size = MSIZE - sizeof(struct m_hdr); + m->m_size = SLIRP_MSIZE - sizeof(struct m_hdr); m->m_data = m->m_dat; m->m_len = 0; m->m_nextpkt = 0; @@ -236,4 +234,3 @@ dtom(dat) return (struct mbuf *)0; } - diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h index f9f213255..552737347 100644 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c index 14808fe21..f558b3c0f 100644 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -66,20 +66,6 @@ redir_x(inaddr, start_port, display, screen) } #endif -#ifndef HAVE_INET_ATON -int -inet_aton(cp, ia) - const char *cp; - struct in_addr *ia; -{ - u_int32_t addr = inet_addr(cp); - if (addr == 0xffffffff) - return 0; - ia->s_addr = addr; - return 1; -} -#endif - /* * Get our IP address and put it in our_addr */ @@ -97,39 +83,6 @@ getouraddr() our_addr.s_addr = loopback_addr.s_addr; } -#if SIZEOF_CHAR_P == 8 - -struct quehead_32 { - u_int32_t qh_link; - u_int32_t qh_rlink; -}; - -inline void -insque_32(a, b) - void *a; - void *b; -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - register struct quehead_32 *head = (struct quehead_32 *) b; - element->qh_link = head->qh_link; - head->qh_link = (u_int32_t)element; - element->qh_rlink = (u_int32_t)head; - ((struct quehead_32 *)(element->qh_link))->qh_rlink - = (u_int32_t)element; -} - -inline void -remque_32(a) - void *a; -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = 0; -} - -#endif /* SIZEOF_CHAR_P == 8 */ - struct quehead { struct quehead *qh_link; struct quehead *qh_rlink; @@ -183,7 +136,7 @@ add_exec(ex_ptr, do_pty, exec, addr, port) (*ex_ptr)->ex_fport = port; (*ex_ptr)->ex_addr = addr; (*ex_ptr)->ex_pty = do_pty; - (*ex_ptr)->ex_exec = strdup(exec); + (*ex_ptr)->ex_exec = (do_pty == 3) ? exec : strdup(exec); (*ex_ptr)->ex_next = tmp_ptr; return 0; } @@ -304,10 +257,10 @@ fork_exec(struct socket *so, const char *ex, int do_pty) { int s; struct sockaddr_in addr; - int addrlen = sizeof(addr); + socklen_t addrlen = sizeof(addr); int opt; int master = -1; - char *argv[256]; + const char *argv[256]; #if 0 char buff[256]; #endif @@ -411,14 +364,15 @@ fork_exec(struct socket *so, const char *ex, int do_pty) } while (c); argv[i] = 0; - execvp(argv[0], argv); + execvp(argv[0], (char **)argv); /* Ooops, failed, let's tell the user why */ { char buff[256]; - sprintf(buff, "Error: execvp of %s failed: %s\n", - argv[0], strerror(errno)); + snprintf(buff, sizeof(buff), + "Error: execvp of %s failed: %s\n", + argv[0], strerror(errno)); write(2, buff, strlen(buff)+1); } close(0); close(1); close(2); /* XXX */ diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h index e405e38dc..ab8e3a726 100644 --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -17,7 +17,7 @@ struct ex_list { }; extern struct ex_list *exec_list; -extern u_int curtime, time_fasttimo, last_slowtimo; +extern u_int time_fasttimo, last_slowtimo; extern int (*lprint_print) _P((void *, const char *, va_list)); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; @@ -72,8 +72,8 @@ extern int x_port, x_server, x_display; int show_x _P((char *, struct socket *)); void redir_x _P((u_int32_t, int, int, int)); void getouraddr _P((void)); -inline void slirp_insque _P((void *, void *)); -inline void slirp_remque _P((void *)); +void slirp_insque _P((void *, void *)); +void slirp_remque _P((void *)); int add_exec _P((struct ex_list **, int, char *, int, int)); int slirp_openpty _P((int *, int *)); int fork_exec(struct socket *so, const char *ex, int do_pty); diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 02c5fce0a..2e6e2b214 100644 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -108,7 +108,7 @@ sbappend(so, m) * ottherwise it'll arrive out of order, and hence corrupt */ if (!so->so_rcv.sb_cc) - ret = send(so->s, m->m_data, m->m_len, 0); + ret = slirp_send(so, m->m_data, m->m_len, 0); if (ret <= 0) { /* @@ -198,4 +198,3 @@ sbcopy(sb, off, len, to) memcpy(to+off,sb->sb_data,len); } } - diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 303f4825c..0394496ab 100644 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -1,4 +1,30 @@ +/* + * libslirp glue + * + * Copyright (c) 2004-2008 Fabrice Bellard + * + * 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 + * THE AUTHORS OR COPYRIGHT HOLDERS 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. + */ +#include "qemu-common.h" +#include "qemu-char.h" #include "slirp.h" +#include "hw/hw.h" /* host address */ struct in_addr our_addr; @@ -16,8 +42,14 @@ static const uint8_t special_ethaddr[6] = { 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 }; +/* ARP cache for the guest IP addresses (XXX: allow many entries) */ uint8_t client_ethaddr[6]; +static struct in_addr client_ipaddr; + +static const uint8_t zero_ethaddr[6] = { 0, 0, 0, 0, 0, 0 }; +const char *slirp_special_ip = CTL_SPECIAL; +int slirp_restrict; int do_slowtimo; int link_up; struct timeval tt; @@ -84,7 +116,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256]; + char buff2[257]; FILE *f; int found = 0; struct in_addr tmp_addr; @@ -136,7 +168,10 @@ static void slirp_cleanup(void) } #endif -void slirp_init(void) +static void slirp_state_save(QEMUFile *f, void *opaque); +static int slirp_state_load(QEMUFile *f, void *opaque, int version_id); + +void slirp_init(int restrict, char *special_ip) { // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); @@ -149,6 +184,7 @@ void slirp_init(void) #endif link_up = 1; + slirp_restrict = restrict; if_init(); ip_init(); @@ -164,9 +200,13 @@ void slirp_init(void) fprintf (stderr, "Warning: No DNS servers found\n"); } - inet_aton(CTL_SPECIAL, &special_addr); + if (special_ip) + slirp_special_ip = special_ip; + + inet_aton(slirp_special_ip, &special_addr); alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); getouraddr(); + register_savevm("slirp", 0, 1, slirp_state_save, slirp_state_load, NULL); } #define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) @@ -222,7 +262,7 @@ void slirp_select_fill(int *pnfds, * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || - ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); + (&ipq.ip_link != ipq.ip_link.next)); for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; @@ -554,7 +594,7 @@ struct arphdr unsigned char ar_tip[4]; /* target IP address */ }; -void arp_input(const uint8_t *pkt, int pkt_len) +static void arp_input(const uint8_t *pkt, int pkt_len) { struct ethhdr *eh = (struct ethhdr *)pkt; struct arphdr *ah = (struct arphdr *)(pkt + ETH_HLEN); @@ -597,6 +637,13 @@ void arp_input(const uint8_t *pkt, int pkt_len) slirp_output(arp_reply, sizeof(arp_reply)); } break; + case ARPOP_REPLY: + /* reply to request of client mac address ? */ + if (!memcmp(client_ethaddr, zero_ethaddr, ETH_ALEN) && + !memcmp(ah->ar_sip, &client_ipaddr.s_addr, 4)) { + memcpy(client_ethaddr, ah->ar_sha, ETH_ALEN); + } + break; default: break; } @@ -620,6 +667,9 @@ void slirp_input(const uint8_t *pkt, int pkt_len) if (!m) return; /* Note: we add to align the IP header */ + if (M_FREEROOM(m) < pkt_len + 2) { + m_inc(m, pkt_len + 2); + } m->m_len = pkt_len + 2; memcpy(m->m_data + 2, pkt, pkt_len); @@ -641,14 +691,47 @@ void if_encap(const uint8_t *ip_data, int ip_data_len) if (ip_data_len + ETH_HLEN > sizeof(buf)) return; - - memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); - memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); - /* XXX: not correct */ - eh->h_source[5] = CTL_ALIAS; - eh->h_proto = htons(ETH_P_IP); - memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); - slirp_output(buf, ip_data_len + ETH_HLEN); + + if (!memcmp(client_ethaddr, zero_ethaddr, ETH_ALEN)) { + uint8_t arp_req[ETH_HLEN + sizeof(struct arphdr)]; + struct ethhdr *reh = (struct ethhdr *)arp_req; + struct arphdr *rah = (struct arphdr *)(arp_req + ETH_HLEN); + const struct ip *iph = (const struct ip *)ip_data; + + /* If the client addr is not known, there is no point in + sending the packet to it. Normally the sender should have + done an ARP request to get its MAC address. Here we do it + in place of sending the packet and we hope that the sender + will retry sending its packet. */ + memset(reh->h_dest, 0xff, ETH_ALEN); + memcpy(reh->h_source, special_ethaddr, ETH_ALEN - 1); + reh->h_source[5] = CTL_ALIAS; + reh->h_proto = htons(ETH_P_ARP); + rah->ar_hrd = htons(1); + rah->ar_pro = htons(ETH_P_IP); + rah->ar_hln = ETH_ALEN; + rah->ar_pln = 4; + rah->ar_op = htons(ARPOP_REQUEST); + /* source hw addr */ + memcpy(rah->ar_sha, special_ethaddr, ETH_ALEN - 1); + rah->ar_sha[5] = CTL_ALIAS; + /* source IP */ + memcpy(rah->ar_sip, &alias_addr, 4); + /* target hw addr (none) */ + memset(rah->ar_tha, 0, ETH_ALEN); + /* target IP */ + memcpy(rah->ar_tip, &iph->ip_dst, 4); + client_ipaddr = iph->ip_dst; + slirp_output(arp_req, sizeof(arp_req)); + } else { + memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); + memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); + /* XXX: not correct */ + eh->h_source[5] = CTL_ALIAS; + eh->h_proto = htons(ETH_P_IP); + memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); + slirp_output(buf, ip_data_len + ETH_HLEN); + } } int slirp_redir(int is_udp, int host_port, @@ -666,9 +749,291 @@ int slirp_redir(int is_udp, int host_port, return 0; } -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const void *args, int addr_low_byte, int guest_port) { return add_exec(&exec_list, do_pty, (char *)args, addr_low_byte, htons(guest_port)); } + +ssize_t slirp_send(struct socket *so, const void *buf, size_t len, int flags) +{ + if (so->s == -1 && so->extra) { + qemu_chr_write(so->extra, buf, len); + return len; + } + + return send(so->s, buf, len, flags); +} + +static struct socket *slirp_find_ctl_socket(int addr_low_byte, int guest_port) +{ + struct socket *so; + + for (so = tcb.so_next; so != &tcb; so = so->so_next) { + if ((so->so_faddr.s_addr & htonl(0xffffff00)) == + special_addr.s_addr + && (ntohl(so->so_faddr.s_addr) & 0xff) == + addr_low_byte + && htons(so->so_fport) == guest_port) + return so; + } + + return NULL; +} + +size_t slirp_socket_can_recv(int addr_low_byte, int guest_port) +{ + struct iovec iov[2]; + struct socket *so; + + if (!link_up) + return 0; + + so = slirp_find_ctl_socket(addr_low_byte, guest_port); + + if (!so || so->so_state & SS_NOFDREF) + return 0; + + if (!CONN_CANFRCV(so) || so->so_snd.sb_cc >= (so->so_snd.sb_datalen/2)) + return 0; + + return sopreprbuf(so, iov, NULL); +} + +void slirp_socket_recv(int addr_low_byte, int guest_port, const uint8_t *buf, + int size) +{ + int ret; + struct socket *so = slirp_find_ctl_socket(addr_low_byte, guest_port); + + if (!so) + return; + + ret = soreadbuf(so, (const char *)buf, size); + + if (ret > 0) + tcp_output(sototcpcb(so)); +} + +static void slirp_tcp_save(QEMUFile *f, struct tcpcb *tp) +{ + int i; + + qemu_put_sbe16(f, tp->t_state); + for (i = 0; i < TCPT_NTIMERS; i++) + qemu_put_sbe16(f, tp->t_timer[i]); + qemu_put_sbe16(f, tp->t_rxtshift); + qemu_put_sbe16(f, tp->t_rxtcur); + qemu_put_sbe16(f, tp->t_dupacks); + qemu_put_be16(f, tp->t_maxseg); + qemu_put_sbyte(f, tp->t_force); + qemu_put_be16(f, tp->t_flags); + qemu_put_be32(f, tp->snd_una); + qemu_put_be32(f, tp->snd_nxt); + qemu_put_be32(f, tp->snd_up); + qemu_put_be32(f, tp->snd_wl1); + qemu_put_be32(f, tp->snd_wl2); + qemu_put_be32(f, tp->iss); + qemu_put_be32(f, tp->snd_wnd); + qemu_put_be32(f, tp->rcv_wnd); + qemu_put_be32(f, tp->rcv_nxt); + qemu_put_be32(f, tp->rcv_up); + qemu_put_be32(f, tp->irs); + qemu_put_be32(f, tp->rcv_adv); + qemu_put_be32(f, tp->snd_max); + qemu_put_be32(f, tp->snd_cwnd); + qemu_put_be32(f, tp->snd_ssthresh); + qemu_put_sbe16(f, tp->t_idle); + qemu_put_sbe16(f, tp->t_rtt); + qemu_put_be32(f, tp->t_rtseq); + qemu_put_sbe16(f, tp->t_srtt); + qemu_put_sbe16(f, tp->t_rttvar); + qemu_put_be16(f, tp->t_rttmin); + qemu_put_be32(f, tp->max_sndwnd); + qemu_put_byte(f, tp->t_oobflags); + qemu_put_byte(f, tp->t_iobc); + qemu_put_sbe16(f, tp->t_softerror); + qemu_put_byte(f, tp->snd_scale); + qemu_put_byte(f, tp->rcv_scale); + qemu_put_byte(f, tp->request_r_scale); + qemu_put_byte(f, tp->requested_s_scale); + qemu_put_be32(f, tp->ts_recent); + qemu_put_be32(f, tp->ts_recent_age); + qemu_put_be32(f, tp->last_ack_sent); +} + +static void slirp_sbuf_save(QEMUFile *f, struct sbuf *sbuf) +{ + uint32_t off; + + qemu_put_be32(f, sbuf->sb_cc); + qemu_put_be32(f, sbuf->sb_datalen); + off = (uint32_t)(sbuf->sb_wptr - sbuf->sb_data); + qemu_put_sbe32(f, off); + off = (uint32_t)(sbuf->sb_rptr - sbuf->sb_data); + qemu_put_sbe32(f, off); + qemu_put_buffer(f, (unsigned char*)sbuf->sb_data, sbuf->sb_datalen); +} + +static void slirp_socket_save(QEMUFile *f, struct socket *so) +{ + qemu_put_be32(f, so->so_urgc); + qemu_put_be32(f, so->so_faddr.s_addr); + qemu_put_be32(f, so->so_laddr.s_addr); + qemu_put_be16(f, so->so_fport); + qemu_put_be16(f, so->so_lport); + qemu_put_byte(f, so->so_iptos); + qemu_put_byte(f, so->so_emu); + qemu_put_byte(f, so->so_type); + qemu_put_be32(f, so->so_state); + slirp_sbuf_save(f, &so->so_rcv); + slirp_sbuf_save(f, &so->so_snd); + slirp_tcp_save(f, so->so_tcpcb); +} + +static void slirp_state_save(QEMUFile *f, void *opaque) +{ + struct ex_list *ex_ptr; + + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) + if (ex_ptr->ex_pty == 3) { + struct socket *so; + so = slirp_find_ctl_socket(ex_ptr->ex_addr, ntohs(ex_ptr->ex_fport)); + if (!so) + continue; + + qemu_put_byte(f, 42); + slirp_socket_save(f, so); + } + qemu_put_byte(f, 0); +} + +static void slirp_tcp_load(QEMUFile *f, struct tcpcb *tp) +{ + int i; + + tp->t_state = qemu_get_sbe16(f); + for (i = 0; i < TCPT_NTIMERS; i++) + tp->t_timer[i] = qemu_get_sbe16(f); + tp->t_rxtshift = qemu_get_sbe16(f); + tp->t_rxtcur = qemu_get_sbe16(f); + tp->t_dupacks = qemu_get_sbe16(f); + tp->t_maxseg = qemu_get_be16(f); + tp->t_force = qemu_get_sbyte(f); + tp->t_flags = qemu_get_be16(f); + tp->snd_una = qemu_get_be32(f); + tp->snd_nxt = qemu_get_be32(f); + tp->snd_up = qemu_get_be32(f); + tp->snd_wl1 = qemu_get_be32(f); + tp->snd_wl2 = qemu_get_be32(f); + tp->iss = qemu_get_be32(f); + tp->snd_wnd = qemu_get_be32(f); + tp->rcv_wnd = qemu_get_be32(f); + tp->rcv_nxt = qemu_get_be32(f); + tp->rcv_up = qemu_get_be32(f); + tp->irs = qemu_get_be32(f); + tp->rcv_adv = qemu_get_be32(f); + tp->snd_max = qemu_get_be32(f); + tp->snd_cwnd = qemu_get_be32(f); + tp->snd_ssthresh = qemu_get_be32(f); + tp->t_idle = qemu_get_sbe16(f); + tp->t_rtt = qemu_get_sbe16(f); + tp->t_rtseq = qemu_get_be32(f); + tp->t_srtt = qemu_get_sbe16(f); + tp->t_rttvar = qemu_get_sbe16(f); + tp->t_rttmin = qemu_get_be16(f); + tp->max_sndwnd = qemu_get_be32(f); + tp->t_oobflags = qemu_get_byte(f); + tp->t_iobc = qemu_get_byte(f); + tp->t_softerror = qemu_get_sbe16(f); + tp->snd_scale = qemu_get_byte(f); + tp->rcv_scale = qemu_get_byte(f); + tp->request_r_scale = qemu_get_byte(f); + tp->requested_s_scale = qemu_get_byte(f); + tp->ts_recent = qemu_get_be32(f); + tp->ts_recent_age = qemu_get_be32(f); + tp->last_ack_sent = qemu_get_be32(f); + tcp_template(tp); +} + +static int slirp_sbuf_load(QEMUFile *f, struct sbuf *sbuf) +{ + uint32_t off, sb_cc, sb_datalen; + + sb_cc = qemu_get_be32(f); + sb_datalen = qemu_get_be32(f); + + sbreserve(sbuf, sb_datalen); + + if (sbuf->sb_datalen != sb_datalen) + return -ENOMEM; + + sbuf->sb_cc = sb_cc; + + off = qemu_get_sbe32(f); + sbuf->sb_wptr = sbuf->sb_data + off; + off = qemu_get_sbe32(f); + sbuf->sb_rptr = sbuf->sb_data + off; + qemu_get_buffer(f, (unsigned char*)sbuf->sb_data, sbuf->sb_datalen); + + return 0; +} + +static int slirp_socket_load(QEMUFile *f, struct socket *so) +{ + if (tcp_attach(so) < 0) + return -ENOMEM; + + so->so_urgc = qemu_get_be32(f); + so->so_faddr.s_addr = qemu_get_be32(f); + so->so_laddr.s_addr = qemu_get_be32(f); + so->so_fport = qemu_get_be16(f); + so->so_lport = qemu_get_be16(f); + so->so_iptos = qemu_get_byte(f); + so->so_emu = qemu_get_byte(f); + so->so_type = qemu_get_byte(f); + so->so_state = qemu_get_be32(f); + if (slirp_sbuf_load(f, &so->so_rcv) < 0) + return -ENOMEM; + if (slirp_sbuf_load(f, &so->so_snd) < 0) + return -ENOMEM; + slirp_tcp_load(f, so->so_tcpcb); + + return 0; +} + +static int slirp_state_load(QEMUFile *f, void *opaque, int version_id) +{ + struct ex_list *ex_ptr; + int r; + + while ((r = qemu_get_byte(f))) { + int ret; + struct socket *so = socreate(); + + if (!so) + return -ENOMEM; + + ret = slirp_socket_load(f, so); + + if (ret < 0) + return ret; + + if ((so->so_faddr.s_addr & htonl(0xffffff00)) != special_addr.s_addr) + return -EINVAL; + + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) + if (ex_ptr->ex_pty == 3 && + (ntohl(so->so_faddr.s_addr) & 0xff) == ex_ptr->ex_addr && + so->so_fport == ex_ptr->ex_fport) + break; + + if (!ex_ptr) + return -EINVAL; + + so->extra = (void *)ex_ptr->ex_exec; + } + + return 0; +} diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index b8d756e55..6f8a7f602 100644 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -32,6 +32,7 @@ typedef char *caddr_t; #define WIN32_LEAN_AND_MEAN # include # include +# include # include # include @@ -102,7 +103,7 @@ typedef unsigned char u_int8_t; # include # include #else -# if HAVE_SYS_TIME_H +# ifdef HAVE_SYS_TIME_H # include # else # include @@ -119,13 +120,12 @@ typedef unsigned char u_int8_t; #include #endif -#ifndef _P +#undef _P #ifndef NO_PROTOTYPES # define _P(x) x #else # define _P(x) () #endif -#endif #ifndef _WIN32 #include @@ -265,14 +265,6 @@ void if_start _P((struct ttys *)); void lprint _P((const char *, ...)); -#if SIZEOF_CHAR_P == 4 -# define insque_32 insque -# define remque_32 remque -#else - inline void insque_32 _P((void *, void *)); - inline void remque_32 _P((void *)); -#endif - #ifndef _WIN32 #include #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h index e7e95dd5a..dbc8dfd42 100644 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -128,10 +128,10 @@ #undef HAVE_SYS_STROPTS_H /* Define to whatever your compiler thinks inline should be */ -#define inline inline +//#define inline inline /* Define to whatever your compiler thinks const should be */ -#define const const +//#define const const /* Define if your compiler doesn't like prototypes */ #undef NO_PROTOTYPES @@ -170,7 +170,7 @@ #undef HAVE_SETENV /* Define if you have index() */ -#undef HAVE_INDEX +#define HAVE_INDEX /* Define if you have bcmp() */ #undef HAVE_BCMP @@ -182,7 +182,7 @@ #define HAVE_MEMMOVE /* Define if you have gethostid */ -#undef HAVE_GETHOSTID +#define HAVE_GETHOSTID /* Define if you DON'T have unix-domain sockets */ #undef NO_UNIX_SOCKETS diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 0c15132ea..9def541da 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -5,10 +5,10 @@ * terms and conditions of the copyright. */ +#include "qemu-common.h" #define WANT_SYS_IOCTL_H #include #include "ip_icmp.h" -#include "main.h" #ifdef __sun__ #include #endif @@ -91,32 +91,24 @@ sofree(so) free(so); } -/* - * Read from so's socket into sb_snd, updating all relevant sbuf fields - * NOTE: This will only be called if it is select()ed for reading, so - * a read() of 0 (or less) means it's disconnected - */ -int -soread(so) - struct socket *so; +size_t sopreprbuf(struct socket *so, struct iovec *iov, int *np) { - int n, nn, lss, total; + int n, lss, total; struct sbuf *sb = &so->so_snd; int len = sb->sb_datalen - sb->sb_cc; - struct iovec iov[2]; int mss = so->so_tcpcb->t_maxseg; - DEBUG_CALL("soread"); + DEBUG_CALL("sopreprbuf"); DEBUG_ARG("so = %lx", (long )so); - /* - * No need to check if there's enough room to read. - * soread wouldn't have been called if there weren't - */ - len = sb->sb_datalen - sb->sb_cc; + if (len <= 0) + return 0; + iov[0].iov_base = sb->sb_wptr; + iov[1].iov_base = NULL; + iov[1].iov_len = 0; if (sb->sb_wptr < sb->sb_rptr) { iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; /* Should never succeed, but... */ @@ -154,6 +146,33 @@ soread(so) n = 1; } } + if (np) + *np = n; + + return iov[0].iov_len + (n - 1) * iov[1].iov_len; +} + +/* + * Read from so's socket into sb_snd, updating all relevant sbuf fields + * NOTE: This will only be called if it is select()ed for reading, so + * a read() of 0 (or less) means it's disconnected + */ +int +soread(so) + struct socket *so; +{ + int n, nn; + struct sbuf *sb = &so->so_snd; + struct iovec iov[2]; + + DEBUG_CALL("soread"); + DEBUG_ARG("so = %lx", (long )so); + + /* + * No need to check if there's enough room to read. + * soread wouldn't have been called if there weren't + */ + sopreprbuf(so, iov, &n); #ifdef HAVE_READV nn = readv(so->s, (struct iovec *)iov, n); @@ -200,6 +219,48 @@ soread(so) return nn; } +int soreadbuf(struct socket *so, const char *buf, int size) +{ + int n, nn, copy = size; + struct sbuf *sb = &so->so_snd; + struct iovec iov[2]; + + DEBUG_CALL("soreadbuf"); + DEBUG_ARG("so = %lx", (long )so); + + /* + * No need to check if there's enough room to read. + * soread wouldn't have been called if there weren't + */ + if (sopreprbuf(so, iov, &n) < size) + goto err; + + nn = MIN(iov[0].iov_len, copy); + memcpy(iov[0].iov_base, buf, nn); + + copy -= nn; + buf += nn; + + if (copy == 0) + goto done; + + memcpy(iov[1].iov_base, buf, copy); + +done: + /* Update fields */ + sb->sb_cc += size; + sb->sb_wptr += size; + if (sb->sb_wptr >= (sb->sb_data + sb->sb_datalen)) + sb->sb_wptr -= sb->sb_datalen; + return size; +err: + + sofcantrcvmore(so); + tcp_sockclosed(sototcpcb(so)); + fprintf(stderr, "soreadbuf buffer to small"); + return -1; +} + /* * Get urgent data * @@ -253,7 +314,7 @@ sosendoob(so) if (sb->sb_rptr < sb->sb_wptr) { /* We can send it directly */ - n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ + n = slirp_send(so, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ so->so_urgc -= n; DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); @@ -274,7 +335,7 @@ sosendoob(so) so->so_urgc -= n; len += n; } - n = send(so->s, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ + n = slirp_send(so, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ #ifdef DEBUG if (n != len) DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); @@ -320,6 +381,8 @@ sowrite(so) len = sb->sb_cc; iov[0].iov_base = sb->sb_rptr; + iov[1].iov_base = NULL; + iov[1].iov_len = 0; if (sb->sb_rptr < sb->sb_wptr) { iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; /* Should never succeed, but... */ @@ -344,7 +407,7 @@ sowrite(so) DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #else - nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); + nn = slirp_send(so, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ if (nn < 0 && (errno == EAGAIN || errno == EINTR)) @@ -361,7 +424,7 @@ sowrite(so) #ifndef HAVE_READV if (n == 2 && nn == iov[0].iov_len) { int ret; - ret = send(so->s, iov[1].iov_base, iov[1].iov_len,0); + ret = slirp_send(so, iov[1].iov_base, iov[1].iov_len,0); if (ret > 0) nn += ret; } @@ -392,7 +455,7 @@ sorecvfrom(so) struct socket *so; { struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); + socklen_t addrlen = sizeof(struct sockaddr_in); DEBUG_CALL("sorecvfrom"); DEBUG_ARG("so = %lx", (long)so); @@ -545,7 +608,8 @@ solisten(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int s, addrlen = sizeof(addr), opt = 1; + int s, opt = 1; + socklen_t addrlen = sizeof(addr); DEBUG_CALL("solisten"); DEBUG_ARG("port = %d", port); @@ -718,4 +782,3 @@ sofwdrain(so) else sofcantsendmore(so); } - diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h index 94fb8d8cf..72b473d63 100644 --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -73,14 +73,6 @@ struct socket { extern struct socket tcb; - -#if defined(DECLARE_IOVEC) && !defined(HAVE_READV) -struct iovec { - char *iov_base; - size_t iov_len; -}; -#endif - struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); struct socket * socreate _P((void)); void sofree _P((struct socket *)); @@ -95,5 +87,7 @@ void soisfconnecting _P((register struct socket *)); void soisfconnected _P((register struct socket *)); void soisfdisconnected _P((struct socket *)); void sofwdrain _P((struct socket *)); +size_t sopreprbuf(struct socket *so, struct iovec *iov, int *np); +int soreadbuf(struct socket *so, const char *buf, int size); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h index 11150766d..40570326c 100644 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index 17a9387f0..d7805b530 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -71,7 +67,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #ifdef TCP_ACK_HACK #define TCP_REASS(tp, ti, m, so, flags) {\ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) {\ if (ti->ti_flags & TH_PUSH) \ tp->t_flags |= TF_ACKNOW; \ @@ -94,7 +90,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #else #define TCP_REASS(tp, ti, m, so, flags) { \ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) { \ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ @@ -134,8 +130,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, /* * Find a segment which begins after this one does. */ - for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; - q = (struct tcpiphdr *)q->ti_next) + for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); + q = tcpiphdr_next(q)) if (SEQ_GT(q->ti_seq, ti->ti_seq)) break; @@ -144,9 +140,9 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { + if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { register int i; - q = (struct tcpiphdr *)q->ti_prev; + q = tcpiphdr_prev(q); /* conversion to int (in i) handles seq wraparound */ i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { @@ -166,36 +162,36 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, ti->ti_len -= i; ti->ti_seq += i; } - q = (struct tcpiphdr *)(q->ti_next); + q = tcpiphdr_next(q); } STAT(tcpstat.tcps_rcvoopack++); STAT(tcpstat.tcps_rcvoobyte += ti->ti_len); - REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ + ti->ti_mbuf = m; /* * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct tcpiphdr *)tp) { + while (!tcpfrag_list_end(q, tp)) { register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; if (i <= 0) break; if (i < q->ti_len) { q->ti_seq += i; q->ti_len -= i; - m_adj((struct mbuf *) REASS_MBUF(q), i); + m_adj(q->ti_mbuf, i); break; } - q = (struct tcpiphdr *)q->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); - remque_32((void *)(q->ti_prev)); + q = tcpiphdr_next(q); + m = tcpiphdr_prev(q)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(q))); m_freem(m); } /* * Stick new segment in its place. */ - insque_32(ti, (void *)(q->ti_prev)); + insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); present: /* @@ -204,17 +200,17 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, */ if (!TCPS_HAVEESTABLISHED(tp->t_state)) return (0); - ti = (struct tcpiphdr *) tp->seg_next; - if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) + ti = tcpfrag_list_first(tp); + if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) return (0); if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) return (0); do { tp->rcv_nxt += ti->ti_len; flags = ti->ti_flags & TH_FIN; - remque_32(ti); - m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ - ti = (struct tcpiphdr *)ti->ti_next; + remque(tcpiphdr2qlink(ti)); + m = ti->ti_mbuf; + ti = tcpiphdr_next(ti); /* if (so->so_state & SS_FCANTRCVMORE) */ if (so->so_state & SS_FCANTSENDMORE) m_freem(m); @@ -253,6 +249,7 @@ tcp_input(m, iphlen, inso) u_long tiwin; int ret; /* int ts_present = 0; */ + struct ex_list *ex_ptr; DEBUG_CALL("tcp_input"); DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", @@ -301,7 +298,8 @@ tcp_input(m, iphlen, inso) * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); len = sizeof(struct ip ) + tlen; @@ -363,6 +361,15 @@ tcp_input(m, iphlen, inso) m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + if (slirp_restrict) { + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) + if (ex_ptr->ex_fport == ti->ti_dport && + (ntohl(ti->ti_dst.s_addr) & 0xff) == ex_ptr->ex_addr) + break; + + if (!ex_ptr) + goto drop; + } /* * Locate pcb for segment. */ @@ -550,7 +557,7 @@ tcp_input(m, iphlen, inso) return; } } else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && + tcpfrag_list_empty(tp) && ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet @@ -646,7 +653,6 @@ tcp_input(m, iphlen, inso) #endif { /* May be an add exec */ - struct ex_list *ex_ptr; for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if(ex_ptr->ex_fport == so->so_fport && lastbyte == ex_ptr->ex_addr) { diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c index dba4ed7a5..4a7bdbcee 100644 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c index ba1296d4b..b30dffdc6 100644 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -73,7 +69,7 @@ tcp_template(tp) struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; - n->ti_next = n->ti_prev = 0; + n->ti_mbuf = NULL; n->ti_x1 = 0; n->ti_pr = IPPROTO_TCP; n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); @@ -156,7 +152,7 @@ tcp_respond(tp, ti, m, ack, seq, flags) tlen += sizeof (struct tcpiphdr); m->m_len = tlen; - ti->ti_next = ti->ti_prev = 0; + ti->ti_mbuf = 0; ti->ti_x1 = 0; ti->ti_seq = htonl(seq); ti->ti_ack = htonl(ack); @@ -196,7 +192,7 @@ tcp_newtcpcb(so) return ((struct tcpcb *)0); memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; + tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; tp->t_maxseg = TCP_MSS; tp->t_flags = TCP_DO_RFC1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; @@ -272,11 +268,11 @@ tcp_close(tp) DEBUG_ARG("tp = %lx", (long )tp); /* free the reassembly queue, if any */ - t = (struct tcpiphdr *) tp->seg_next; - while (t != (struct tcpiphdr *)tp) { - t = (struct tcpiphdr *)t->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); - remque_32((struct tcpiphdr *) t->ti_prev); + t = tcpfrag_list_first(tp); + while (!tcpfrag_list_end(t, tp)) { + t = tcpiphdr_next(t); + m = tcpiphdr_prev(t)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(t))); m_freem(m); } /* It's static */ @@ -447,7 +443,7 @@ tcp_connect(inso) { struct socket *so; struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); + socklen_t addrlen = sizeof(struct sockaddr_in); struct tcpcb *tp; int s, opt; @@ -629,7 +625,7 @@ tcp_emu(so, m) struct mbuf *m; { u_int n1, n2, n3, n4, n5, n6; - char buff[256]; + char buff[257]; u_int32_t laddr; u_int lport; char *bptr; @@ -649,7 +645,7 @@ tcp_emu(so, m) { struct socket *tmpso; struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); + socklen_t addrlen = sizeof(struct sockaddr_in); struct sbuf *so_rcv = &so->so_rcv; memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); @@ -673,7 +669,9 @@ tcp_emu(so, m) } } } - so_rcv->sb_cc = sprintf(so_rcv->sb_data, "%d,%d\r\n", n1, n2); + so_rcv->sb_cc = snprintf(so_rcv->sb_data, + so_rcv->sb_datalen, + "%d,%d\r\n", n1, n2); so_rcv->sb_rptr = so_rcv->sb_data; so_rcv->sb_wptr = so_rcv->sb_data + so_rcv->sb_cc; } @@ -1007,8 +1005,9 @@ tcp_emu(so, m) n4 = (laddr & 0xff); m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); + m->m_len += snprintf(bptr, m->m_hdr.mh_size - m->m_len, + "ORT %d,%d,%d,%d,%d,%d\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { /* @@ -1038,8 +1037,9 @@ tcp_emu(so, m) n4 = (laddr & 0xff); m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); + m->m_len += snprintf(bptr, m->m_hdr.mh_size - m->m_len, + "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } @@ -1062,7 +1062,8 @@ tcp_emu(so, m) } if (m->m_data[m->m_len-1] == '\0' && lport != 0 && (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) - m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; + m->m_len = snprintf(m->m_data, m->m_hdr.mh_size, "%d", + ntohs(so->so_fport)) + 1; return 1; case EMU_IRC: @@ -1079,25 +1080,28 @@ tcp_emu(so, m) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), 1); + m->m_len += snprintf(bptr, m->m_hdr.mh_size, + "DCC CHAT chat %lu %u%c\n", + (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), 1); } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); + m->m_len += snprintf(bptr, m->m_hdr.mh_size, + "DCC SEND %s %lu %u %u%c\n", buff, + (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); + m->m_len += snprintf(bptr, m->m_hdr.mh_size, + "DCC MOVE %s %lu %u %u%c\n", buff, + (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); } return 1; @@ -1273,6 +1277,11 @@ tcp_ctl(so) for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if (ex_ptr->ex_fport == so->so_fport && command == ex_ptr->ex_addr) { + if (ex_ptr->ex_pty == 3) { + so->s = -1; + so->extra = (void *)ex_ptr->ex_exec; + return 1; + } do_pty = ex_ptr->ex_pty; goto do_exec; } @@ -1285,8 +1294,8 @@ tcp_ctl(so) /* FALLTHROUGH */ case CTL_ALIAS: - sb->sb_cc = sprintf(sb->sb_wptr, - "Error: No application configured.\r\n"); + sb->sb_cc = snprintf(sb->sb_wptr, sb->sb_datalen - (sb->sb_wptr - sb->sb_data), + "Error: No application configured.\r\n"); sb->sb_wptr += sb->sb_cc; return(0); diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c index 244bad6a8..47f01bb96 100644 --- a/BasiliskII/src/slirp/tcp_timer.c +++ b/BasiliskII/src/slirp/tcp_timer.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h index f251846b4..791ee49df 100644 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h index 82380f936..d4af1c8d0 100644 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -40,18 +36,12 @@ #include "tcpip.h" #include "tcp_timer.h" -#if SIZEOF_CHAR_P == 4 - typedef struct tcpiphdr *tcpiphdrp_32; -#else - typedef u_int32_t tcpiphdrp_32; -#endif - /* * Tcp control block, one per tcp; fields: */ struct tcpcb { - tcpiphdrp_32 seg_next; /* sequencing queue */ - tcpiphdrp_32 seg_prev; + struct tcpiphdr *seg_next; /* sequencing queue */ + struct tcpiphdr *seg_prev; short t_state; /* state of this connection */ short t_timer[TCPT_NTIMERS]; /* tcp timers */ short t_rxtshift; /* log(2) of rexmt exp. backoff */ @@ -170,21 +160,6 @@ struct tcpcb { #define TCP_REXMTVAL(tp) \ (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) -/* XXX - * We want to avoid doing m_pullup on incoming packets but that - * means avoiding dtom on the tcp reassembly code. That in turn means - * keeping an mbuf pointer in the reassembly queue (since we might - * have a cluster). As a quick hack, the source & destination - * port numbers (which are no longer needed once we've located the - * tcpcb) are overlayed with an mbuf pointer. - */ -#if SIZEOF_CHAR_P == 4 -typedef struct mbuf *mbufp_32; -#else -typedef u_int32_t mbufp_32; -#endif -#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) - #ifdef LOG_ENABLED /* * TCP statistics. diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h index 82708b09c..7974ce3d5 100644 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -44,8 +40,7 @@ struct tcpiphdr { struct ipovly ti_i; /* overlaid ip structure */ struct tcphdr ti_t; /* tcp header */ }; -#define ti_next ti_i.ih_next -#define ti_prev ti_i.ih_prev +#define ti_mbuf ti_i.ih_mbuf.mptr #define ti_x1 ti_i.ih_x1 #define ti_pr ti_i.ih_pr #define ti_len ti_i.ih_len @@ -62,6 +57,14 @@ struct tcpiphdr { #define ti_sum ti_t.th_sum #define ti_urp ti_t.th_urp +#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) +#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) +#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) +#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) +#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) +#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) +#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) + /* * Just a clean way to get to the first byte * of the packet diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c index 562ae8953..4ad55048b 100644 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -23,6 +23,7 @@ */ #include +#include "qemu-common.h" // for pstrcpy struct tftp_session { int in_use; @@ -148,8 +149,10 @@ static int tftp_send_oack(struct tftp_session *spt, m->m_data += sizeof(struct udpiphdr); tp->tp_op = htons(TFTP_OACK); - n += sprintf(tp->x.tp_buf + n, "%s", key) + 1; - n += sprintf(tp->x.tp_buf + n, "%u", value) + 1; + n += snprintf((char *)tp->x.tp_buf + n, sizeof(tp->x.tp_buf) - n, "%s", + key) + 1; + n += snprintf((char *)tp->x.tp_buf + n, sizeof(tp->x.tp_buf) - n, "%u", + value) + 1; saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -189,7 +192,7 @@ static int tftp_send_error(struct tftp_session *spt, tp->tp_op = htons(TFTP_ERROR); tp->x.tp_error.tp_error_code = htons(errorcode); - strcpy(tp->x.tp_error.tp_msg, msg); + pstrcpy((char *)tp->x.tp_error.tp_msg, sizeof(tp->x.tp_error.tp_msg), msg); saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -324,8 +327,8 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) /* do sanity checks on the filename */ if ((spt->filename[0] != '/') - || (spt->filename[strlen(spt->filename) - 1] == '/') - || strstr(spt->filename, "/../")) { + || (spt->filename[strlen((char *)spt->filename) - 1] == '/') + || strstr((char *)spt->filename, "/../")) { tftp_send_error(spt, 2, "Access violation", tp); return; } @@ -352,7 +355,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) while (k < n) { const char *key, *value; - key = src + k; + key = (char *)src + k; k += strlen(key) + 1; if (k >= n) { @@ -360,7 +363,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) return; } - value = src + k; + value = (char *)src + k; k += strlen(value) + 1; if (strcmp(key, "tsize") == 0) { diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index c48923b0c..8d3bdd2ce 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -136,8 +132,7 @@ udp_input(m, iphlen) * Checksum extended UDP header and data. */ if (UDPCKSUM && uh->uh_sum) { - ((struct ipovly *)ip)->ih_next = 0; - ((struct ipovly *)ip)->ih_prev = 0; + memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply @@ -158,6 +153,9 @@ udp_input(m, iphlen) goto bad; } + if (slirp_restrict) + goto bad; + /* * handle TFTP */ @@ -280,7 +278,7 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ @@ -319,9 +317,11 @@ int udp_output(struct socket *so, struct mbuf *m, saddr = *addr; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - saddr.sin_addr.s_addr = so->so_faddr.s_addr; if ((so->so_faddr.s_addr & htonl(0x000000ff)) == htonl(0xff)) saddr.sin_addr.s_addr = alias_addr.s_addr; + else if (addr->sin_addr.s_addr == loopback_addr.s_addr || + (ntohl(so->so_faddr.s_addr) & 0xff) != CTL_ALIAS) + saddr.sin_addr.s_addr = so->so_faddr.s_addr; } daddr.sin_addr = so->so_laddr; daddr.sin_port = so->so_lport; @@ -408,7 +408,7 @@ static void udp_emu(struct socket *so, struct mbuf *m) { struct sockaddr_in addr; - int addrlen = sizeof(addr); + socklen_t addrlen = sizeof(addr); #ifdef EMULATE_TALK CTL_MSG_OLD *omsg; CTL_MSG *nmsg; @@ -473,14 +473,14 @@ struct cu_header { type = omsg->type; OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; - strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); + pstrcpy(omsg->l_name, NAME_SIZE_OLD, getlogin()); } else { /* new talk */ omsg = (CTL_MSG_OLD *) buff; nmsg = mtod(m, CTL_MSG *); type = nmsg->type; OTOSIN(nmsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; - strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); + pstrcpy(nmsg->l_name, NAME_SIZE_OLD, getlogin()); } if (type == LOOK_UP) @@ -639,7 +639,7 @@ udp_listen(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int addrlen = sizeof(struct sockaddr_in), opt = 1; + socklen_t addrlen = sizeof(struct sockaddr_in), opt = 1; if ((so = socreate()) == NULL) { free(so); diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h index 4f69b098c..51a07a2fc 100644 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -60,8 +56,7 @@ struct udpiphdr { struct ipovly ui_i; /* overlaid ip structure */ struct udphdr ui_u; /* udp header */ }; -#define ui_next ui_i.ih_next -#define ui_prev ui_i.ih_prev +#define ui_mbuf ui_i.ih_mbuf.mptr #define ui_x1 ui_i.ih_x1 #define ui_pr ui_i.ih_pr #define ui_len ui_i.ih_len From c20d9d3c52d47995f9cd78cd23c2b5ddfdd6e684 Mon Sep 17 00:00:00 2001 From: jvernet Date: Wed, 4 Oct 2017 18:22:40 +0200 Subject: [PATCH 169/534] Revert "SLIRP 0.10.1" This reverts commit ef4725552ef0a953fceaf3e7fd5166462b70f861. --- BasiliskII/src/slirp/COPYRIGHT | 3 + BasiliskII/src/slirp/bootp.c | 29 +- BasiliskII/src/slirp/cksum.c | 6 +- BasiliskII/src/slirp/debug.c | 2 + BasiliskII/src/slirp/debug.h | 1 + BasiliskII/src/slirp/icmp_var.h | 6 +- BasiliskII/src/slirp/if.c | 12 +- BasiliskII/src/slirp/ip.h | 70 +++-- BasiliskII/src/slirp/ip_icmp.c | 20 +- BasiliskII/src/slirp/ip_icmp.h | 9 +- BasiliskII/src/slirp/ip_input.c | 165 +++++------- BasiliskII/src/slirp/ip_output.c | 6 +- BasiliskII/src/slirp/libslirp.h | 7 +- BasiliskII/src/slirp/main.h | 3 - BasiliskII/src/slirp/mbuf.c | 9 +- BasiliskII/src/slirp/mbuf.h | 6 +- BasiliskII/src/slirp/misc.c | 60 ++++- BasiliskII/src/slirp/misc.h | 6 +- BasiliskII/src/slirp/sbuf.c | 3 +- BasiliskII/src/slirp/slirp.c | 393 +--------------------------- BasiliskII/src/slirp/slirp.h | 14 +- BasiliskII/src/slirp/slirp_config.h | 8 +- BasiliskII/src/slirp/socket.c | 111 ++------ BasiliskII/src/slirp/socket.h | 10 +- BasiliskII/src/slirp/tcp.h | 6 +- BasiliskII/src/slirp/tcp_input.c | 60 ++--- BasiliskII/src/slirp/tcp_output.c | 6 +- BasiliskII/src/slirp/tcp_subr.c | 75 +++--- BasiliskII/src/slirp/tcp_timer.c | 6 +- BasiliskII/src/slirp/tcp_timer.h | 6 +- BasiliskII/src/slirp/tcp_var.h | 31 ++- BasiliskII/src/slirp/tcpip.h | 17 +- BasiliskII/src/slirp/tftp.c | 17 +- BasiliskII/src/slirp/udp.c | 26 +- BasiliskII/src/slirp/udp.h | 9 +- 35 files changed, 452 insertions(+), 766 deletions(-) diff --git a/BasiliskII/src/slirp/COPYRIGHT b/BasiliskII/src/slirp/COPYRIGHT index 1bc83d497..3f331ee07 100644 --- a/BasiliskII/src/slirp/COPYRIGHT +++ b/BasiliskII/src/slirp/COPYRIGHT @@ -25,6 +25,9 @@ The copyright terms and conditions: 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. + 3. All advertising materials mentioning features or use of this software + must display the following acknowledgment: + This product includes software developed by Danny Gasparovski. THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c index ca177f40c..3ae3db209 100644 --- a/BasiliskII/src/slirp/bootp.c +++ b/BasiliskII/src/slirp/bootp.c @@ -36,7 +36,7 @@ typedef struct { uint8_t macaddr[6]; } BOOTPClient; -static BOOTPClient bootp_clients[NB_ADDR]; +BOOTPClient bootp_clients[NB_ADDR]; const char *bootp_filename; @@ -172,8 +172,7 @@ static void bootp_reply(struct bootp_t *bp) } if (bootp_filename) - snprintf((char *)rbp->bp_file, sizeof(rbp->bp_file), "%s", - bootp_filename); + snprintf(rbp->bp_file, sizeof(rbp->bp_file), "%s", bootp_filename); dprintf("offered addr=%08x\n", ntohl(daddr.sin_addr.s_addr)); @@ -191,8 +190,6 @@ static void bootp_reply(struct bootp_t *bp) rbp->bp_yiaddr = daddr.sin_addr; /* Client IP address */ rbp->bp_siaddr = saddr.sin_addr; /* Server IP address */ - daddr.sin_addr.s_addr = 0xffffffffu; - q = rbp->bp_vend; memcpy(q, rfc1533_cookie, 4); q += 4; @@ -221,18 +218,16 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 0xff; *q++ = 0x00; - if (!slirp_restrict) { - *q++ = RFC1533_GATEWAY; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_DNS; - *q++ = 4; - dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); - memcpy(q, &dns_addr, 4); - q += 4; - } + *q++ = RFC1533_GATEWAY; + *q++ = 4; + memcpy(q, &saddr.sin_addr, 4); + q += 4; + + *q++ = RFC1533_DNS; + *q++ = 4; + dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); + memcpy(q, &dns_addr, 4); + q += 4; *q++ = RFC2132_LEASE_TIME; *q++ = 4; diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c index 34977ffc0..b98373b51 100644 --- a/BasiliskII/src/slirp/cksum.c +++ b/BasiliskII/src/slirp/cksum.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c index bfef58069..7c8581d63 100644 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -16,6 +16,8 @@ int dostats = 0; #endif int slirp_debug = 0; +extern char *strerror _P((int)); + /* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ #ifndef CONFIG_QEMU diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h index c43eff73d..8a523b2ed 100644 --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -37,3 +37,4 @@ extern int slirp_debug; #endif void debug_init _P((char *, int)); + diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h index 99d4c9e6b..cd865b797 100644 --- a/BasiliskII/src/slirp/icmp_var.h +++ b/BasiliskII/src/slirp/icmp_var.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c index 0e10f3e6d..67a7b6ff8 100644 --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -15,8 +15,9 @@ struct mbuf *next_m; /* Pointer to next mbuf to output */ #define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) -static void -ifs_insque(struct mbuf *ifm, struct mbuf *ifmhead) +void +ifs_insque(ifm, ifmhead) + struct mbuf *ifm, *ifmhead; { ifm->ifs_next = ifmhead->ifs_next; ifmhead->ifs_next = ifm; @@ -24,8 +25,9 @@ ifs_insque(struct mbuf *ifm, struct mbuf *ifmhead) ifm->ifs_next->ifs_prev = ifm; } -static void -ifs_remque(struct mbuf *ifm) +void +ifs_remque(ifm) + struct mbuf *ifm; { ifm->ifs_prev->ifs_next = ifm->ifs_next; ifm->ifs_next->ifs_prev = ifm->ifs_prev; @@ -289,7 +291,7 @@ if_start(void) } /* Encapsulate the packet for sending */ - if_encap((uint8_t *)ifm->m_data, ifm->m_len); + if_encap(ifm->m_data, ifm->m_len); m_free(ifm); diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h index 7a7a9b943..a8cdb0d3f 100644 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -179,31 +183,35 @@ struct ip_timestamp { #define IP_MSS 576 /* default maximum segment size */ +#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ +#include +#else #if SIZEOF_CHAR_P == 4 -struct mbuf_ptr { - struct mbuf *mptr; - uint32_t dummy; -}; +typedef caddr_t caddr32_t; #else -struct mbuf_ptr { - struct mbuf *mptr; -}; +typedef u_int32_t caddr32_t; +#endif +#endif + +#if SIZEOF_CHAR_P == 4 +typedef struct ipq *ipqp_32; +typedef struct ipasfrag *ipasfragp_32; +#else +typedef caddr32_t ipqp_32; +typedef caddr32_t ipasfragp_32; #endif -struct qlink { - void *next, *prev; -}; /* * Overlay for ip header used by other protocols (tcp, udp). */ struct ipovly { - struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ + caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ u_int8_t ih_x1; /* (unused) */ u_int8_t ih_pr; /* protocol */ u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -} __attribute__((packed)); +}; /* * Ip reassembly queue structure. Each fragment @@ -213,30 +221,44 @@ struct ipovly { * size 28 bytes */ struct ipq { - struct qlink frag_link; /* to ip headers of fragments */ - struct qlink ip_link; /* to other reass headers */ + ipqp_32 next,prev; /* to other reass headers */ u_int8_t ipq_ttl; /* time for reass q to live */ u_int8_t ipq_p; /* protocol of this fragment */ u_int16_t ipq_id; /* sequence id for reassembly */ + ipasfragp_32 ipq_next,ipq_prev; + /* to ip headers of fragments */ struct in_addr ipq_src,ipq_dst; }; /* * Ip header, when holding a fragment. * - * Note: ipf_link must be at same offset as frag_link above + * Note: ipf_next must be at same offset as ipq_next above */ struct ipasfrag { - struct qlink ipf_link; - struct ip ipf_ip; +#ifdef WORDS_BIGENDIAN + u_int ip_v:4, + ip_hl:4; +#else + u_int ip_hl:4, + ip_v:4; +#endif + /* BUG : u_int changed to u_int8_t. + * sizeof(u_int)==4 on linux 2.0 + */ + u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit + * to avoid destroying tos (PPPDTRuu); + * copied from (ip_off&IP_MF) */ + u_int16_t ip_len; + u_int16_t ip_id; + u_int16_t ip_off; + u_int8_t ip_ttl; + u_int8_t ip_p; + u_int16_t ip_sum; + ipasfragp_32 ipf_next; /* next fragment */ + ipasfragp_32 ipf_prev; /* previous fragment */ }; -#define ipf_off ipf_ip.ip_off -#define ipf_tos ipf_ip.ip_tos -#define ipf_len ipf_ip.ip_len -#define ipf_next ipf_link.next -#define ipf_prev ipf_link.prev - /* * Structure stored in mbuf in inpcb.ip_options * and passed to ip_output when ip options are in use. diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c index 4b27facf1..d1da0a2fc 100644 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -39,7 +43,7 @@ struct icmpstat icmpstat; /* The message sent when emulating PING */ /* Be nice and tell them it's just a pseudo-ping packet */ -static const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; +const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; /* list of actions for icmp_error() on RX of an icmp message */ static const int icmp_flush[19] = { @@ -203,8 +207,12 @@ icmp_input(m, hlen) #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, - const char *message) +icmp_error(msrc, type, code, minsize, message) + struct mbuf *msrc; + u_char type; + u_char code; + int minsize; + char *message; { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -220,7 +228,7 @@ icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, /* check msrc */ if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); -#ifdef DEBUG +#if DEBUG { char bufa[20], bufb[20]; strcpy(bufa, inet_ntoa(ip->ip_src)); strcpy(bufb, inet_ntoa(ip->ip_dst)); @@ -277,7 +285,7 @@ icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, HTONS(icp->icmp_ip.ip_id); HTONS(icp->icmp_ip.ip_off); -#ifdef DEBUG +#if DEBUG if(message) { /* DEBUG : append message to ICMP packet */ int message_len; char *cpnt; diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h index 03301313e..8c9b5a1ba 100644 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -154,8 +158,7 @@ struct icmp { (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) void icmp_input _P((struct mbuf *, int)); -void icmp_error(struct mbuf *msrc, u_char type, u_char code, int minsize, - const char *message); +void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); void icmp_reflect _P((struct mbuf *)); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c index 505149a33..b04684027 100644 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -39,7 +43,6 @@ */ #include -#include #include "ip_icmp.h" #ifdef LOG_ENABLED @@ -48,7 +51,7 @@ struct ipstat ipstat; struct ipq ipq; -static struct ip *ip_reass(register struct ip *ip, +static struct ip *ip_reass(register struct ipasfrag *ip, register struct ipq *fp); static void ip_freef(struct ipq *fp); static void ip_enq(register struct ipasfrag *p, @@ -62,7 +65,7 @@ static void ip_deq(register struct ipasfrag *p); void ip_init() { - ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; + ipq.next = ipq.prev = (ipqp_32)&ipq; ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); @@ -133,27 +136,6 @@ ip_input(m) STAT(ipstat.ips_tooshort++); goto bad; } - - if (slirp_restrict) { - if (memcmp(&ip->ip_dst.s_addr, &special_addr, 3)) { - if (ip->ip_dst.s_addr == 0xffffffff && ip->ip_p != IPPROTO_UDP) - goto bad; - } else { - int host = ntohl(ip->ip_dst.s_addr) & 0xff; - struct ex_list *ex_ptr; - - if (host == 0xff) - goto bad; - - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) - if (ex_ptr->ex_addr == host) - break; - - if (!ex_ptr) - goto bad; - } - } - /* Should drop packet if mbuf too long? hmmm... */ if (m->m_len > ip->ip_len) m_adj(m, ip->ip_len - m->m_len); @@ -185,20 +167,18 @@ ip_input(m) */ if (ip->ip_off &~ IP_DF) { register struct ipq *fp; - struct qlink *l; /* * Look for queue of fragments * of this datagram. */ - for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { - fp = container_of(l, struct ipq, ip_link); - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) + for (fp = (struct ipq *) ipq.next; fp != &ipq; + fp = (struct ipq *) fp->next) + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) goto found; - } - fp = NULL; + fp = 0; found: /* @@ -208,9 +188,9 @@ ip_input(m) */ ip->ip_len -= hlen; if (ip->ip_off & IP_MF) - ip->ip_tos |= 1; + ((struct ipasfrag *)ip)->ipf_mff |= 1; else - ip->ip_tos &= ~1; + ((struct ipasfrag *)ip)->ipf_mff &= ~1; ip->ip_off <<= 3; @@ -219,9 +199,9 @@ ip_input(m) * or if this is not the first fragment, * attempt reassembly; if it succeeds, proceed. */ - if (ip->ip_tos & 1 || ip->ip_off) { + if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { STAT(ipstat.ips_fragments++); - ip = ip_reass(ip, fp); + ip = ip_reass((struct ipasfrag *)ip, fp); if (ip == 0) return; STAT(ipstat.ips_reassembled++); @@ -257,8 +237,6 @@ ip_input(m) return; } -#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) -#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) /* * Take incoming datagram fragment and try to * reassemble it into whole datagram. If a chain for @@ -266,7 +244,7 @@ ip_input(m) * is given as fp; otherwise have to make a chain. */ static struct ip * -ip_reass(register struct ip *ip, register struct ipq *fp) +ip_reass(register struct ipasfrag *ip, register struct ipq *fp) { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; @@ -293,13 +271,13 @@ ip_reass(register struct ip *ip, register struct ipq *fp) struct mbuf *t; if ((t = m_get()) == NULL) goto dropfrag; fp = mtod(t, struct ipq *); - insque(&fp->ip_link, &ipq.ip_link); + insque_32(fp, &ipq); fp->ipq_ttl = IPFRAGTTL; fp->ipq_p = ip->ip_p; fp->ipq_id = ip->ip_id; - fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; - fp->ipq_src = ip->ip_src; - fp->ipq_dst = ip->ip_dst; + fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; + fp->ipq_src = ((struct ip *)ip)->ip_src; + fp->ipq_dst = ((struct ip *)ip)->ip_dst; q = (struct ipasfrag *)fp; goto insert; } @@ -307,9 +285,9 @@ ip_reass(register struct ip *ip, register struct ipq *fp) /* * Find a segment which begins after this one does. */ - for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; - q = q->ipf_next) - if (q->ipf_off > ip->ip_off) + for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; + q = (struct ipasfrag *)q->ipf_next) + if (q->ip_off > ip->ip_off) break; /* @@ -317,9 +295,9 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (q->ipf_prev != &fp->frag_link) { - struct ipasfrag *pq = q->ipf_prev; - i = pq->ipf_off + pq->ipf_len - ip->ip_off; + if (q->ipf_prev != (ipasfragp_32)fp) { + i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + + ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; if (i > 0) { if (i >= ip->ip_len) goto dropfrag; @@ -333,18 +311,17 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct ipasfrag*)&fp->frag_link && - ip->ip_off + ip->ip_len > q->ipf_off) { - i = (ip->ip_off + ip->ip_len) - q->ipf_off; - if (i < q->ipf_len) { - q->ipf_len -= i; - q->ipf_off += i; + while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { + i = (ip->ip_off + ip->ip_len) - q->ip_off; + if (i < q->ip_len) { + q->ip_len -= i; + q->ip_off += i; m_adj(dtom(q), i); break; } - q = q->ipf_next; - m_freem(dtom(q->ipf_prev)); - ip_deq(q->ipf_prev); + q = (struct ipasfrag *) q->ipf_next; + m_freem(dtom((struct ipasfrag *) q->ipf_prev)); + ip_deq((struct ipasfrag *) q->ipf_prev); } insert: @@ -352,26 +329,27 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * Stick new segment in its place; * check for complete reassembly. */ - ip_enq(iptofrag(ip), q->ipf_prev); + ip_enq(ip, (struct ipasfrag *) q->ipf_prev); next = 0; - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; - q = q->ipf_next) { - if (q->ipf_off != next) + for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; + q = (struct ipasfrag *) q->ipf_next) { + if (q->ip_off != next) return (0); - next += q->ipf_len; + next += q->ip_len; } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) + if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) return (0); /* * Reassembly is complete; concatenate fragments. */ - q = fp->frag_link.next; + q = (struct ipasfrag *) fp->ipq_next; m = dtom(q); q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag*)&fp->frag_link) { - struct mbuf *t = dtom(q); + while (q != (struct ipasfrag *)fp) { + struct mbuf *t; + t = dtom(q); q = (struct ipasfrag *) q->ipf_next; m_cat(m, t); } @@ -382,7 +360,7 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * dequeue and discard fragment reassembly header. * Make header visible. */ - q = fp->frag_link.next; + ip = (struct ipasfrag *) fp->ipq_next; /* * If the fragments concatenated to an mbuf that's @@ -392,24 +370,25 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * into the new buffer. */ if (m->m_flags & M_EXT) { - int delta = (char *)q - m->m_dat; - q = (struct ipasfrag *)(m->m_ext + delta); + int delta; + delta = (char *)ip - m->m_dat; + ip = (struct ipasfrag *)(m->m_ext + delta); } /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ - ip = fragtoip(q); ip->ip_len = next; - ip->ip_tos &= ~1; - ip->ip_src = fp->ipq_src; - ip->ip_dst = fp->ipq_dst; - remque(&fp->ip_link); + ip->ipf_mff &= ~1; + ((struct ip *)ip)->ip_src = fp->ipq_src; + ((struct ip *)ip)->ip_dst = fp->ipq_dst; + remque_32(fp); (void) m_free(dtom(fp)); + m = dtom(ip); m->m_len += (ip->ip_hl << 2); m->m_data -= (ip->ip_hl << 2); - return ip; + return ((struct ip *)ip); dropfrag: STAT(ipstat.ips_fragdropped++); @@ -426,12 +405,13 @@ ip_freef(struct ipq *fp) { register struct ipasfrag *q, *p; - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { - p = q->ipf_next; + for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; + q = p) { + p = (struct ipasfrag *) q->ipf_next; ip_deq(q); m_freem(dtom(q)); } - remque(&fp->ip_link); + remque_32(fp); (void) m_free(dtom(fp)); } @@ -444,10 +424,10 @@ ip_enq(register struct ipasfrag *p, register struct ipasfrag *prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = prev; + p->ipf_prev = (ipasfragp_32) prev; p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; - prev->ipf_next = p; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; + prev->ipf_next = (ipasfragp_32) p; } /* @@ -468,21 +448,20 @@ ip_deq(register struct ipasfrag *p) void ip_slowtimo() { - struct qlink *l; + register struct ipq *fp; DEBUG_CALL("ip_slowtimo"); - l = ipq.ip_link.next; - - if (l == 0) + fp = (struct ipq *) ipq.next; + if (fp == 0) return; - while (l != &ipq.ip_link) { - struct ipq *fp = container_of(l, struct ipq, ip_link); - l = l->next; - if (--fp->ipq_ttl == 0) { + while (fp != &ipq) { + --fp->ipq_ttl; + fp = (struct ipq *) fp->next; + if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { STAT(ipstat.ips_fragtimeout++); - ip_freef(fp); + ip_freef((struct ipq *) fp->prev); } } } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c index 9538db989..a8a6067bd 100644 --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h index 6c5db54c9..7e4cfa98a 100644 --- a/BasiliskII/src/slirp/libslirp.h +++ b/BasiliskII/src/slirp/libslirp.h @@ -5,7 +5,7 @@ extern "C" { #endif -void slirp_init(int restrict, char *special_ip); +void slirp_init(void); void slirp_select_fill(int *pnfds, fd_set *readfds, fd_set *writefds, fd_set *xfds); @@ -20,16 +20,13 @@ void slirp_output(const uint8_t *pkt, int pkt_len); int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const void *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port); extern const char *tftp_prefix; extern char slirp_hostname[33]; void slirp_stats(void); -void slirp_socket_recv(int addr_low_byte, int guest_port, const uint8_t *buf, - int size); -size_t slirp_socket_can_recv(int addr_low_byte, int guest_port); #ifdef __cplusplus } diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h index ed5138559..c01addac4 100644 --- a/BasiliskII/src/slirp/main.h +++ b/BasiliskII/src/slirp/main.h @@ -44,8 +44,6 @@ extern int towrite_max; extern int ppp_exit; extern int tcp_keepintvl; extern uint8_t client_ethaddr[6]; -extern const char *slirp_special_ip; -extern int slirp_restrict; #define PROTO_SLIP 0x1 #ifdef USE_PPP @@ -53,4 +51,3 @@ extern int slirp_restrict; #endif void if_encap(const uint8_t *ip_data, int ip_data_len); -ssize_t slirp_send(struct socket *so, const void *buf, size_t len, int flags); diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c index 655de4180..5d1255428 100644 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -17,6 +17,8 @@ #include +struct mbuf *mbutl; +char *mclrefcnt; int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; #define MBUF_THRESH 30 @@ -26,7 +28,7 @@ int mbuf_max = 0; * Find a nice value for msize * XXX if_maxlinkhdr already in mtu */ -#define SLIRP_MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) +#define MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) void m_init() @@ -52,7 +54,7 @@ m_get() DEBUG_CALL("m_get"); if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(SLIRP_MSIZE); + m = (struct mbuf *)malloc(MSIZE); if (m == NULL) goto end_error; mbuf_alloced++; if (mbuf_alloced > MBUF_THRESH) @@ -69,7 +71,7 @@ m_get() m->m_flags = (flags | M_USEDLIST); /* Initialise it */ - m->m_size = SLIRP_MSIZE - sizeof(struct m_hdr); + m->m_size = MSIZE - sizeof(struct m_hdr); m->m_data = m->m_dat; m->m_len = 0; m->m_nextpkt = 0; @@ -234,3 +236,4 @@ dtom(dat) return (struct mbuf *)0; } + diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h index 552737347..f9f213255 100644 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c index f558b3c0f..14808fe21 100644 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -66,6 +66,20 @@ redir_x(inaddr, start_port, display, screen) } #endif +#ifndef HAVE_INET_ATON +int +inet_aton(cp, ia) + const char *cp; + struct in_addr *ia; +{ + u_int32_t addr = inet_addr(cp); + if (addr == 0xffffffff) + return 0; + ia->s_addr = addr; + return 1; +} +#endif + /* * Get our IP address and put it in our_addr */ @@ -83,6 +97,39 @@ getouraddr() our_addr.s_addr = loopback_addr.s_addr; } +#if SIZEOF_CHAR_P == 8 + +struct quehead_32 { + u_int32_t qh_link; + u_int32_t qh_rlink; +}; + +inline void +insque_32(a, b) + void *a; + void *b; +{ + register struct quehead_32 *element = (struct quehead_32 *) a; + register struct quehead_32 *head = (struct quehead_32 *) b; + element->qh_link = head->qh_link; + head->qh_link = (u_int32_t)element; + element->qh_rlink = (u_int32_t)head; + ((struct quehead_32 *)(element->qh_link))->qh_rlink + = (u_int32_t)element; +} + +inline void +remque_32(a) + void *a; +{ + register struct quehead_32 *element = (struct quehead_32 *) a; + ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; + ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; + element->qh_rlink = 0; +} + +#endif /* SIZEOF_CHAR_P == 8 */ + struct quehead { struct quehead *qh_link; struct quehead *qh_rlink; @@ -136,7 +183,7 @@ add_exec(ex_ptr, do_pty, exec, addr, port) (*ex_ptr)->ex_fport = port; (*ex_ptr)->ex_addr = addr; (*ex_ptr)->ex_pty = do_pty; - (*ex_ptr)->ex_exec = (do_pty == 3) ? exec : strdup(exec); + (*ex_ptr)->ex_exec = strdup(exec); (*ex_ptr)->ex_next = tmp_ptr; return 0; } @@ -257,10 +304,10 @@ fork_exec(struct socket *so, const char *ex, int do_pty) { int s; struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); + int addrlen = sizeof(addr); int opt; int master = -1; - const char *argv[256]; + char *argv[256]; #if 0 char buff[256]; #endif @@ -364,15 +411,14 @@ fork_exec(struct socket *so, const char *ex, int do_pty) } while (c); argv[i] = 0; - execvp(argv[0], (char **)argv); + execvp(argv[0], argv); /* Ooops, failed, let's tell the user why */ { char buff[256]; - snprintf(buff, sizeof(buff), - "Error: execvp of %s failed: %s\n", - argv[0], strerror(errno)); + sprintf(buff, "Error: execvp of %s failed: %s\n", + argv[0], strerror(errno)); write(2, buff, strlen(buff)+1); } close(0); close(1); close(2); /* XXX */ diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h index ab8e3a726..e405e38dc 100644 --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -17,7 +17,7 @@ struct ex_list { }; extern struct ex_list *exec_list; -extern u_int time_fasttimo, last_slowtimo; +extern u_int curtime, time_fasttimo, last_slowtimo; extern int (*lprint_print) _P((void *, const char *, va_list)); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; @@ -72,8 +72,8 @@ extern int x_port, x_server, x_display; int show_x _P((char *, struct socket *)); void redir_x _P((u_int32_t, int, int, int)); void getouraddr _P((void)); -void slirp_insque _P((void *, void *)); -void slirp_remque _P((void *)); +inline void slirp_insque _P((void *, void *)); +inline void slirp_remque _P((void *)); int add_exec _P((struct ex_list **, int, char *, int, int)); int slirp_openpty _P((int *, int *)); int fork_exec(struct socket *so, const char *ex, int do_pty); diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 2e6e2b214..02c5fce0a 100644 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -108,7 +108,7 @@ sbappend(so, m) * ottherwise it'll arrive out of order, and hence corrupt */ if (!so->so_rcv.sb_cc) - ret = slirp_send(so, m->m_data, m->m_len, 0); + ret = send(so->s, m->m_data, m->m_len, 0); if (ret <= 0) { /* @@ -198,3 +198,4 @@ sbcopy(sb, off, len, to) memcpy(to+off,sb->sb_data,len); } } + diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 0394496ab..303f4825c 100644 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -1,30 +1,4 @@ -/* - * libslirp glue - * - * Copyright (c) 2004-2008 Fabrice Bellard - * - * 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 - * THE AUTHORS OR COPYRIGHT HOLDERS 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. - */ -#include "qemu-common.h" -#include "qemu-char.h" #include "slirp.h" -#include "hw/hw.h" /* host address */ struct in_addr our_addr; @@ -42,14 +16,8 @@ static const uint8_t special_ethaddr[6] = { 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 }; -/* ARP cache for the guest IP addresses (XXX: allow many entries) */ uint8_t client_ethaddr[6]; -static struct in_addr client_ipaddr; - -static const uint8_t zero_ethaddr[6] = { 0, 0, 0, 0, 0, 0 }; -const char *slirp_special_ip = CTL_SPECIAL; -int slirp_restrict; int do_slowtimo; int link_up; struct timeval tt; @@ -116,7 +84,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[257]; + char buff2[256]; FILE *f; int found = 0; struct in_addr tmp_addr; @@ -168,10 +136,7 @@ static void slirp_cleanup(void) } #endif -static void slirp_state_save(QEMUFile *f, void *opaque); -static int slirp_state_load(QEMUFile *f, void *opaque, int version_id); - -void slirp_init(int restrict, char *special_ip) +void slirp_init(void) { // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); @@ -184,7 +149,6 @@ void slirp_init(int restrict, char *special_ip) #endif link_up = 1; - slirp_restrict = restrict; if_init(); ip_init(); @@ -200,13 +164,9 @@ void slirp_init(int restrict, char *special_ip) fprintf (stderr, "Warning: No DNS servers found\n"); } - if (special_ip) - slirp_special_ip = special_ip; - - inet_aton(slirp_special_ip, &special_addr); + inet_aton(CTL_SPECIAL, &special_addr); alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); getouraddr(); - register_savevm("slirp", 0, 1, slirp_state_save, slirp_state_load, NULL); } #define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) @@ -262,7 +222,7 @@ void slirp_select_fill(int *pnfds, * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || - (&ipq.ip_link != ipq.ip_link.next)); + ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; @@ -594,7 +554,7 @@ struct arphdr unsigned char ar_tip[4]; /* target IP address */ }; -static void arp_input(const uint8_t *pkt, int pkt_len) +void arp_input(const uint8_t *pkt, int pkt_len) { struct ethhdr *eh = (struct ethhdr *)pkt; struct arphdr *ah = (struct arphdr *)(pkt + ETH_HLEN); @@ -637,13 +597,6 @@ static void arp_input(const uint8_t *pkt, int pkt_len) slirp_output(arp_reply, sizeof(arp_reply)); } break; - case ARPOP_REPLY: - /* reply to request of client mac address ? */ - if (!memcmp(client_ethaddr, zero_ethaddr, ETH_ALEN) && - !memcmp(ah->ar_sip, &client_ipaddr.s_addr, 4)) { - memcpy(client_ethaddr, ah->ar_sha, ETH_ALEN); - } - break; default: break; } @@ -667,9 +620,6 @@ void slirp_input(const uint8_t *pkt, int pkt_len) if (!m) return; /* Note: we add to align the IP header */ - if (M_FREEROOM(m) < pkt_len + 2) { - m_inc(m, pkt_len + 2); - } m->m_len = pkt_len + 2; memcpy(m->m_data + 2, pkt, pkt_len); @@ -691,47 +641,14 @@ void if_encap(const uint8_t *ip_data, int ip_data_len) if (ip_data_len + ETH_HLEN > sizeof(buf)) return; - - if (!memcmp(client_ethaddr, zero_ethaddr, ETH_ALEN)) { - uint8_t arp_req[ETH_HLEN + sizeof(struct arphdr)]; - struct ethhdr *reh = (struct ethhdr *)arp_req; - struct arphdr *rah = (struct arphdr *)(arp_req + ETH_HLEN); - const struct ip *iph = (const struct ip *)ip_data; - - /* If the client addr is not known, there is no point in - sending the packet to it. Normally the sender should have - done an ARP request to get its MAC address. Here we do it - in place of sending the packet and we hope that the sender - will retry sending its packet. */ - memset(reh->h_dest, 0xff, ETH_ALEN); - memcpy(reh->h_source, special_ethaddr, ETH_ALEN - 1); - reh->h_source[5] = CTL_ALIAS; - reh->h_proto = htons(ETH_P_ARP); - rah->ar_hrd = htons(1); - rah->ar_pro = htons(ETH_P_IP); - rah->ar_hln = ETH_ALEN; - rah->ar_pln = 4; - rah->ar_op = htons(ARPOP_REQUEST); - /* source hw addr */ - memcpy(rah->ar_sha, special_ethaddr, ETH_ALEN - 1); - rah->ar_sha[5] = CTL_ALIAS; - /* source IP */ - memcpy(rah->ar_sip, &alias_addr, 4); - /* target hw addr (none) */ - memset(rah->ar_tha, 0, ETH_ALEN); - /* target IP */ - memcpy(rah->ar_tip, &iph->ip_dst, 4); - client_ipaddr = iph->ip_dst; - slirp_output(arp_req, sizeof(arp_req)); - } else { - memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); - memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); - /* XXX: not correct */ - eh->h_source[5] = CTL_ALIAS; - eh->h_proto = htons(ETH_P_IP); - memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); - slirp_output(buf, ip_data_len + ETH_HLEN); - } + + memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); + memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); + /* XXX: not correct */ + eh->h_source[5] = CTL_ALIAS; + eh->h_proto = htons(ETH_P_IP); + memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); + slirp_output(buf, ip_data_len + ETH_HLEN); } int slirp_redir(int is_udp, int host_port, @@ -749,291 +666,9 @@ int slirp_redir(int is_udp, int host_port, return 0; } -int slirp_add_exec(int do_pty, const void *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port) { return add_exec(&exec_list, do_pty, (char *)args, addr_low_byte, htons(guest_port)); } - -ssize_t slirp_send(struct socket *so, const void *buf, size_t len, int flags) -{ - if (so->s == -1 && so->extra) { - qemu_chr_write(so->extra, buf, len); - return len; - } - - return send(so->s, buf, len, flags); -} - -static struct socket *slirp_find_ctl_socket(int addr_low_byte, int guest_port) -{ - struct socket *so; - - for (so = tcb.so_next; so != &tcb; so = so->so_next) { - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == - special_addr.s_addr - && (ntohl(so->so_faddr.s_addr) & 0xff) == - addr_low_byte - && htons(so->so_fport) == guest_port) - return so; - } - - return NULL; -} - -size_t slirp_socket_can_recv(int addr_low_byte, int guest_port) -{ - struct iovec iov[2]; - struct socket *so; - - if (!link_up) - return 0; - - so = slirp_find_ctl_socket(addr_low_byte, guest_port); - - if (!so || so->so_state & SS_NOFDREF) - return 0; - - if (!CONN_CANFRCV(so) || so->so_snd.sb_cc >= (so->so_snd.sb_datalen/2)) - return 0; - - return sopreprbuf(so, iov, NULL); -} - -void slirp_socket_recv(int addr_low_byte, int guest_port, const uint8_t *buf, - int size) -{ - int ret; - struct socket *so = slirp_find_ctl_socket(addr_low_byte, guest_port); - - if (!so) - return; - - ret = soreadbuf(so, (const char *)buf, size); - - if (ret > 0) - tcp_output(sototcpcb(so)); -} - -static void slirp_tcp_save(QEMUFile *f, struct tcpcb *tp) -{ - int i; - - qemu_put_sbe16(f, tp->t_state); - for (i = 0; i < TCPT_NTIMERS; i++) - qemu_put_sbe16(f, tp->t_timer[i]); - qemu_put_sbe16(f, tp->t_rxtshift); - qemu_put_sbe16(f, tp->t_rxtcur); - qemu_put_sbe16(f, tp->t_dupacks); - qemu_put_be16(f, tp->t_maxseg); - qemu_put_sbyte(f, tp->t_force); - qemu_put_be16(f, tp->t_flags); - qemu_put_be32(f, tp->snd_una); - qemu_put_be32(f, tp->snd_nxt); - qemu_put_be32(f, tp->snd_up); - qemu_put_be32(f, tp->snd_wl1); - qemu_put_be32(f, tp->snd_wl2); - qemu_put_be32(f, tp->iss); - qemu_put_be32(f, tp->snd_wnd); - qemu_put_be32(f, tp->rcv_wnd); - qemu_put_be32(f, tp->rcv_nxt); - qemu_put_be32(f, tp->rcv_up); - qemu_put_be32(f, tp->irs); - qemu_put_be32(f, tp->rcv_adv); - qemu_put_be32(f, tp->snd_max); - qemu_put_be32(f, tp->snd_cwnd); - qemu_put_be32(f, tp->snd_ssthresh); - qemu_put_sbe16(f, tp->t_idle); - qemu_put_sbe16(f, tp->t_rtt); - qemu_put_be32(f, tp->t_rtseq); - qemu_put_sbe16(f, tp->t_srtt); - qemu_put_sbe16(f, tp->t_rttvar); - qemu_put_be16(f, tp->t_rttmin); - qemu_put_be32(f, tp->max_sndwnd); - qemu_put_byte(f, tp->t_oobflags); - qemu_put_byte(f, tp->t_iobc); - qemu_put_sbe16(f, tp->t_softerror); - qemu_put_byte(f, tp->snd_scale); - qemu_put_byte(f, tp->rcv_scale); - qemu_put_byte(f, tp->request_r_scale); - qemu_put_byte(f, tp->requested_s_scale); - qemu_put_be32(f, tp->ts_recent); - qemu_put_be32(f, tp->ts_recent_age); - qemu_put_be32(f, tp->last_ack_sent); -} - -static void slirp_sbuf_save(QEMUFile *f, struct sbuf *sbuf) -{ - uint32_t off; - - qemu_put_be32(f, sbuf->sb_cc); - qemu_put_be32(f, sbuf->sb_datalen); - off = (uint32_t)(sbuf->sb_wptr - sbuf->sb_data); - qemu_put_sbe32(f, off); - off = (uint32_t)(sbuf->sb_rptr - sbuf->sb_data); - qemu_put_sbe32(f, off); - qemu_put_buffer(f, (unsigned char*)sbuf->sb_data, sbuf->sb_datalen); -} - -static void slirp_socket_save(QEMUFile *f, struct socket *so) -{ - qemu_put_be32(f, so->so_urgc); - qemu_put_be32(f, so->so_faddr.s_addr); - qemu_put_be32(f, so->so_laddr.s_addr); - qemu_put_be16(f, so->so_fport); - qemu_put_be16(f, so->so_lport); - qemu_put_byte(f, so->so_iptos); - qemu_put_byte(f, so->so_emu); - qemu_put_byte(f, so->so_type); - qemu_put_be32(f, so->so_state); - slirp_sbuf_save(f, &so->so_rcv); - slirp_sbuf_save(f, &so->so_snd); - slirp_tcp_save(f, so->so_tcpcb); -} - -static void slirp_state_save(QEMUFile *f, void *opaque) -{ - struct ex_list *ex_ptr; - - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) - if (ex_ptr->ex_pty == 3) { - struct socket *so; - so = slirp_find_ctl_socket(ex_ptr->ex_addr, ntohs(ex_ptr->ex_fport)); - if (!so) - continue; - - qemu_put_byte(f, 42); - slirp_socket_save(f, so); - } - qemu_put_byte(f, 0); -} - -static void slirp_tcp_load(QEMUFile *f, struct tcpcb *tp) -{ - int i; - - tp->t_state = qemu_get_sbe16(f); - for (i = 0; i < TCPT_NTIMERS; i++) - tp->t_timer[i] = qemu_get_sbe16(f); - tp->t_rxtshift = qemu_get_sbe16(f); - tp->t_rxtcur = qemu_get_sbe16(f); - tp->t_dupacks = qemu_get_sbe16(f); - tp->t_maxseg = qemu_get_be16(f); - tp->t_force = qemu_get_sbyte(f); - tp->t_flags = qemu_get_be16(f); - tp->snd_una = qemu_get_be32(f); - tp->snd_nxt = qemu_get_be32(f); - tp->snd_up = qemu_get_be32(f); - tp->snd_wl1 = qemu_get_be32(f); - tp->snd_wl2 = qemu_get_be32(f); - tp->iss = qemu_get_be32(f); - tp->snd_wnd = qemu_get_be32(f); - tp->rcv_wnd = qemu_get_be32(f); - tp->rcv_nxt = qemu_get_be32(f); - tp->rcv_up = qemu_get_be32(f); - tp->irs = qemu_get_be32(f); - tp->rcv_adv = qemu_get_be32(f); - tp->snd_max = qemu_get_be32(f); - tp->snd_cwnd = qemu_get_be32(f); - tp->snd_ssthresh = qemu_get_be32(f); - tp->t_idle = qemu_get_sbe16(f); - tp->t_rtt = qemu_get_sbe16(f); - tp->t_rtseq = qemu_get_be32(f); - tp->t_srtt = qemu_get_sbe16(f); - tp->t_rttvar = qemu_get_sbe16(f); - tp->t_rttmin = qemu_get_be16(f); - tp->max_sndwnd = qemu_get_be32(f); - tp->t_oobflags = qemu_get_byte(f); - tp->t_iobc = qemu_get_byte(f); - tp->t_softerror = qemu_get_sbe16(f); - tp->snd_scale = qemu_get_byte(f); - tp->rcv_scale = qemu_get_byte(f); - tp->request_r_scale = qemu_get_byte(f); - tp->requested_s_scale = qemu_get_byte(f); - tp->ts_recent = qemu_get_be32(f); - tp->ts_recent_age = qemu_get_be32(f); - tp->last_ack_sent = qemu_get_be32(f); - tcp_template(tp); -} - -static int slirp_sbuf_load(QEMUFile *f, struct sbuf *sbuf) -{ - uint32_t off, sb_cc, sb_datalen; - - sb_cc = qemu_get_be32(f); - sb_datalen = qemu_get_be32(f); - - sbreserve(sbuf, sb_datalen); - - if (sbuf->sb_datalen != sb_datalen) - return -ENOMEM; - - sbuf->sb_cc = sb_cc; - - off = qemu_get_sbe32(f); - sbuf->sb_wptr = sbuf->sb_data + off; - off = qemu_get_sbe32(f); - sbuf->sb_rptr = sbuf->sb_data + off; - qemu_get_buffer(f, (unsigned char*)sbuf->sb_data, sbuf->sb_datalen); - - return 0; -} - -static int slirp_socket_load(QEMUFile *f, struct socket *so) -{ - if (tcp_attach(so) < 0) - return -ENOMEM; - - so->so_urgc = qemu_get_be32(f); - so->so_faddr.s_addr = qemu_get_be32(f); - so->so_laddr.s_addr = qemu_get_be32(f); - so->so_fport = qemu_get_be16(f); - so->so_lport = qemu_get_be16(f); - so->so_iptos = qemu_get_byte(f); - so->so_emu = qemu_get_byte(f); - so->so_type = qemu_get_byte(f); - so->so_state = qemu_get_be32(f); - if (slirp_sbuf_load(f, &so->so_rcv) < 0) - return -ENOMEM; - if (slirp_sbuf_load(f, &so->so_snd) < 0) - return -ENOMEM; - slirp_tcp_load(f, so->so_tcpcb); - - return 0; -} - -static int slirp_state_load(QEMUFile *f, void *opaque, int version_id) -{ - struct ex_list *ex_ptr; - int r; - - while ((r = qemu_get_byte(f))) { - int ret; - struct socket *so = socreate(); - - if (!so) - return -ENOMEM; - - ret = slirp_socket_load(f, so); - - if (ret < 0) - return ret; - - if ((so->so_faddr.s_addr & htonl(0xffffff00)) != special_addr.s_addr) - return -EINVAL; - - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) - if (ex_ptr->ex_pty == 3 && - (ntohl(so->so_faddr.s_addr) & 0xff) == ex_ptr->ex_addr && - so->so_fport == ex_ptr->ex_fport) - break; - - if (!ex_ptr) - return -EINVAL; - - so->extra = (void *)ex_ptr->ex_exec; - } - - return 0; -} diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index 6f8a7f602..b8d756e55 100644 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -32,7 +32,6 @@ typedef char *caddr_t; #define WIN32_LEAN_AND_MEAN # include # include -# include # include # include @@ -103,7 +102,7 @@ typedef unsigned char u_int8_t; # include # include #else -# ifdef HAVE_SYS_TIME_H +# if HAVE_SYS_TIME_H # include # else # include @@ -120,12 +119,13 @@ typedef unsigned char u_int8_t; #include #endif -#undef _P +#ifndef _P #ifndef NO_PROTOTYPES # define _P(x) x #else # define _P(x) () #endif +#endif #ifndef _WIN32 #include @@ -265,6 +265,14 @@ void if_start _P((struct ttys *)); void lprint _P((const char *, ...)); +#if SIZEOF_CHAR_P == 4 +# define insque_32 insque +# define remque_32 remque +#else + inline void insque_32 _P((void *, void *)); + inline void remque_32 _P((void *)); +#endif + #ifndef _WIN32 #include #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h index dbc8dfd42..e7e95dd5a 100644 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -128,10 +128,10 @@ #undef HAVE_SYS_STROPTS_H /* Define to whatever your compiler thinks inline should be */ -//#define inline inline +#define inline inline /* Define to whatever your compiler thinks const should be */ -//#define const const +#define const const /* Define if your compiler doesn't like prototypes */ #undef NO_PROTOTYPES @@ -170,7 +170,7 @@ #undef HAVE_SETENV /* Define if you have index() */ -#define HAVE_INDEX +#undef HAVE_INDEX /* Define if you have bcmp() */ #undef HAVE_BCMP @@ -182,7 +182,7 @@ #define HAVE_MEMMOVE /* Define if you have gethostid */ -#define HAVE_GETHOSTID +#undef HAVE_GETHOSTID /* Define if you DON'T have unix-domain sockets */ #undef NO_UNIX_SOCKETS diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 9def541da..0c15132ea 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -5,10 +5,10 @@ * terms and conditions of the copyright. */ -#include "qemu-common.h" #define WANT_SYS_IOCTL_H #include #include "ip_icmp.h" +#include "main.h" #ifdef __sun__ #include #endif @@ -91,24 +91,32 @@ sofree(so) free(so); } -size_t sopreprbuf(struct socket *so, struct iovec *iov, int *np) +/* + * Read from so's socket into sb_snd, updating all relevant sbuf fields + * NOTE: This will only be called if it is select()ed for reading, so + * a read() of 0 (or less) means it's disconnected + */ +int +soread(so) + struct socket *so; { - int n, lss, total; + int n, nn, lss, total; struct sbuf *sb = &so->so_snd; int len = sb->sb_datalen - sb->sb_cc; + struct iovec iov[2]; int mss = so->so_tcpcb->t_maxseg; - DEBUG_CALL("sopreprbuf"); + DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); - len = sb->sb_datalen - sb->sb_cc; + /* + * No need to check if there's enough room to read. + * soread wouldn't have been called if there weren't + */ - if (len <= 0) - return 0; + len = sb->sb_datalen - sb->sb_cc; iov[0].iov_base = sb->sb_wptr; - iov[1].iov_base = NULL; - iov[1].iov_len = 0; if (sb->sb_wptr < sb->sb_rptr) { iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; /* Should never succeed, but... */ @@ -146,33 +154,6 @@ size_t sopreprbuf(struct socket *so, struct iovec *iov, int *np) n = 1; } } - if (np) - *np = n; - - return iov[0].iov_len + (n - 1) * iov[1].iov_len; -} - -/* - * Read from so's socket into sb_snd, updating all relevant sbuf fields - * NOTE: This will only be called if it is select()ed for reading, so - * a read() of 0 (or less) means it's disconnected - */ -int -soread(so) - struct socket *so; -{ - int n, nn; - struct sbuf *sb = &so->so_snd; - struct iovec iov[2]; - - DEBUG_CALL("soread"); - DEBUG_ARG("so = %lx", (long )so); - - /* - * No need to check if there's enough room to read. - * soread wouldn't have been called if there weren't - */ - sopreprbuf(so, iov, &n); #ifdef HAVE_READV nn = readv(so->s, (struct iovec *)iov, n); @@ -219,48 +200,6 @@ soread(so) return nn; } -int soreadbuf(struct socket *so, const char *buf, int size) -{ - int n, nn, copy = size; - struct sbuf *sb = &so->so_snd; - struct iovec iov[2]; - - DEBUG_CALL("soreadbuf"); - DEBUG_ARG("so = %lx", (long )so); - - /* - * No need to check if there's enough room to read. - * soread wouldn't have been called if there weren't - */ - if (sopreprbuf(so, iov, &n) < size) - goto err; - - nn = MIN(iov[0].iov_len, copy); - memcpy(iov[0].iov_base, buf, nn); - - copy -= nn; - buf += nn; - - if (copy == 0) - goto done; - - memcpy(iov[1].iov_base, buf, copy); - -done: - /* Update fields */ - sb->sb_cc += size; - sb->sb_wptr += size; - if (sb->sb_wptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_wptr -= sb->sb_datalen; - return size; -err: - - sofcantrcvmore(so); - tcp_sockclosed(sototcpcb(so)); - fprintf(stderr, "soreadbuf buffer to small"); - return -1; -} - /* * Get urgent data * @@ -314,7 +253,7 @@ sosendoob(so) if (sb->sb_rptr < sb->sb_wptr) { /* We can send it directly */ - n = slirp_send(so, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ + n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ so->so_urgc -= n; DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); @@ -335,7 +274,7 @@ sosendoob(so) so->so_urgc -= n; len += n; } - n = slirp_send(so, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ + n = send(so->s, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ #ifdef DEBUG if (n != len) DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); @@ -381,8 +320,6 @@ sowrite(so) len = sb->sb_cc; iov[0].iov_base = sb->sb_rptr; - iov[1].iov_base = NULL; - iov[1].iov_len = 0; if (sb->sb_rptr < sb->sb_wptr) { iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; /* Should never succeed, but... */ @@ -407,7 +344,7 @@ sowrite(so) DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #else - nn = slirp_send(so, iov[0].iov_base, iov[0].iov_len,0); + nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ if (nn < 0 && (errno == EAGAIN || errno == EINTR)) @@ -424,7 +361,7 @@ sowrite(so) #ifndef HAVE_READV if (n == 2 && nn == iov[0].iov_len) { int ret; - ret = slirp_send(so, iov[1].iov_base, iov[1].iov_len,0); + ret = send(so->s, iov[1].iov_base, iov[1].iov_len,0); if (ret > 0) nn += ret; } @@ -455,7 +392,7 @@ sorecvfrom(so) struct socket *so; { struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); + int addrlen = sizeof(struct sockaddr_in); DEBUG_CALL("sorecvfrom"); DEBUG_ARG("so = %lx", (long)so); @@ -608,8 +545,7 @@ solisten(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int s, opt = 1; - socklen_t addrlen = sizeof(addr); + int s, addrlen = sizeof(addr), opt = 1; DEBUG_CALL("solisten"); DEBUG_ARG("port = %d", port); @@ -782,3 +718,4 @@ sofwdrain(so) else sofcantsendmore(so); } + diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h index 72b473d63..94fb8d8cf 100644 --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -73,6 +73,14 @@ struct socket { extern struct socket tcb; + +#if defined(DECLARE_IOVEC) && !defined(HAVE_READV) +struct iovec { + char *iov_base; + size_t iov_len; +}; +#endif + struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); struct socket * socreate _P((void)); void sofree _P((struct socket *)); @@ -87,7 +95,5 @@ void soisfconnecting _P((register struct socket *)); void soisfconnected _P((register struct socket *)); void soisfdisconnected _P((struct socket *)); void sofwdrain _P((struct socket *)); -size_t sopreprbuf(struct socket *so, struct iovec *iov, int *np); -int soreadbuf(struct socket *so, const char *buf, int size); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h index 40570326c..11150766d 100644 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index d7805b530..17a9387f0 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -67,7 +71,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #ifdef TCP_ACK_HACK #define TCP_REASS(tp, ti, m, so, flags) {\ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ + (tp)->seg_next == (tcpiphdrp_32)(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) {\ if (ti->ti_flags & TH_PUSH) \ tp->t_flags |= TF_ACKNOW; \ @@ -90,7 +94,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #else #define TCP_REASS(tp, ti, m, so, flags) { \ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ + (tp)->seg_next == (tcpiphdrp_32)(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) { \ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ @@ -130,8 +134,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, /* * Find a segment which begins after this one does. */ - for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); - q = tcpiphdr_next(q)) + for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; + q = (struct tcpiphdr *)q->ti_next) if (SEQ_GT(q->ti_seq, ti->ti_seq)) break; @@ -140,9 +144,9 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { + if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { register int i; - q = tcpiphdr_prev(q); + q = (struct tcpiphdr *)q->ti_prev; /* conversion to int (in i) handles seq wraparound */ i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { @@ -162,36 +166,36 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, ti->ti_len -= i; ti->ti_seq += i; } - q = tcpiphdr_next(q); + q = (struct tcpiphdr *)(q->ti_next); } STAT(tcpstat.tcps_rcvoopack++); STAT(tcpstat.tcps_rcvoobyte += ti->ti_len); - ti->ti_mbuf = m; + REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ /* * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (!tcpfrag_list_end(q, tp)) { + while (q != (struct tcpiphdr *)tp) { register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; if (i <= 0) break; if (i < q->ti_len) { q->ti_seq += i; q->ti_len -= i; - m_adj(q->ti_mbuf, i); + m_adj((struct mbuf *) REASS_MBUF(q), i); break; } - q = tcpiphdr_next(q); - m = tcpiphdr_prev(q)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(q))); + q = (struct tcpiphdr *)q->ti_next; + m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); + remque_32((void *)(q->ti_prev)); m_freem(m); } /* * Stick new segment in its place. */ - insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); + insque_32(ti, (void *)(q->ti_prev)); present: /* @@ -200,17 +204,17 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, */ if (!TCPS_HAVEESTABLISHED(tp->t_state)) return (0); - ti = tcpfrag_list_first(tp); - if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) + ti = (struct tcpiphdr *) tp->seg_next; + if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) return (0); if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) return (0); do { tp->rcv_nxt += ti->ti_len; flags = ti->ti_flags & TH_FIN; - remque(tcpiphdr2qlink(ti)); - m = ti->ti_mbuf; - ti = tcpiphdr_next(ti); + remque_32(ti); + m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ + ti = (struct tcpiphdr *)ti->ti_next; /* if (so->so_state & SS_FCANTRCVMORE) */ if (so->so_state & SS_FCANTSENDMORE) m_freem(m); @@ -249,7 +253,6 @@ tcp_input(m, iphlen, inso) u_long tiwin; int ret; /* int ts_present = 0; */ - struct ex_list *ex_ptr; DEBUG_CALL("tcp_input"); DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", @@ -298,8 +301,7 @@ tcp_input(m, iphlen, inso) * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; - memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); len = sizeof(struct ip ) + tlen; @@ -361,15 +363,6 @@ tcp_input(m, iphlen, inso) m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - if (slirp_restrict) { - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) - if (ex_ptr->ex_fport == ti->ti_dport && - (ntohl(ti->ti_dst.s_addr) & 0xff) == ex_ptr->ex_addr) - break; - - if (!ex_ptr) - goto drop; - } /* * Locate pcb for segment. */ @@ -557,7 +550,7 @@ tcp_input(m, iphlen, inso) return; } } else if (ti->ti_ack == tp->snd_una && - tcpfrag_list_empty(tp) && + tp->seg_next == (tcpiphdrp_32)tp && ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet @@ -653,6 +646,7 @@ tcp_input(m, iphlen, inso) #endif { /* May be an add exec */ + struct ex_list *ex_ptr; for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if(ex_ptr->ex_fport == so->so_fport && lastbyte == ex_ptr->ex_addr) { diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c index 4a7bdbcee..dba4ed7a5 100644 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c index b30dffdc6..ba1296d4b 100644 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -69,7 +73,7 @@ tcp_template(tp) struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; - n->ti_mbuf = NULL; + n->ti_next = n->ti_prev = 0; n->ti_x1 = 0; n->ti_pr = IPPROTO_TCP; n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); @@ -152,7 +156,7 @@ tcp_respond(tp, ti, m, ack, seq, flags) tlen += sizeof (struct tcpiphdr); m->m_len = tlen; - ti->ti_mbuf = 0; + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_seq = htonl(seq); ti->ti_ack = htonl(ack); @@ -192,7 +196,7 @@ tcp_newtcpcb(so) return ((struct tcpcb *)0); memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; + tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; tp->t_maxseg = TCP_MSS; tp->t_flags = TCP_DO_RFC1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; @@ -268,11 +272,11 @@ tcp_close(tp) DEBUG_ARG("tp = %lx", (long )tp); /* free the reassembly queue, if any */ - t = tcpfrag_list_first(tp); - while (!tcpfrag_list_end(t, tp)) { - t = tcpiphdr_next(t); - m = tcpiphdr_prev(t)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(t))); + t = (struct tcpiphdr *) tp->seg_next; + while (t != (struct tcpiphdr *)tp) { + t = (struct tcpiphdr *)t->ti_next; + m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); + remque_32((struct tcpiphdr *) t->ti_prev); m_freem(m); } /* It's static */ @@ -443,7 +447,7 @@ tcp_connect(inso) { struct socket *so; struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); + int addrlen = sizeof(struct sockaddr_in); struct tcpcb *tp; int s, opt; @@ -625,7 +629,7 @@ tcp_emu(so, m) struct mbuf *m; { u_int n1, n2, n3, n4, n5, n6; - char buff[257]; + char buff[256]; u_int32_t laddr; u_int lport; char *bptr; @@ -645,7 +649,7 @@ tcp_emu(so, m) { struct socket *tmpso; struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); + int addrlen = sizeof(struct sockaddr_in); struct sbuf *so_rcv = &so->so_rcv; memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); @@ -669,9 +673,7 @@ tcp_emu(so, m) } } } - so_rcv->sb_cc = snprintf(so_rcv->sb_data, - so_rcv->sb_datalen, - "%d,%d\r\n", n1, n2); + so_rcv->sb_cc = sprintf(so_rcv->sb_data, "%d,%d\r\n", n1, n2); so_rcv->sb_rptr = so_rcv->sb_data; so_rcv->sb_wptr = so_rcv->sb_data + so_rcv->sb_cc; } @@ -1005,9 +1007,8 @@ tcp_emu(so, m) n4 = (laddr & 0xff); m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += snprintf(bptr, m->m_hdr.mh_size - m->m_len, - "ORT %d,%d,%d,%d,%d,%d\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); + m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { /* @@ -1037,9 +1038,8 @@ tcp_emu(so, m) n4 = (laddr & 0xff); m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += snprintf(bptr, m->m_hdr.mh_size - m->m_len, - "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); + m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } @@ -1062,8 +1062,7 @@ tcp_emu(so, m) } if (m->m_data[m->m_len-1] == '\0' && lport != 0 && (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) - m->m_len = snprintf(m->m_data, m->m_hdr.mh_size, "%d", - ntohs(so->so_fport)) + 1; + m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; return 1; case EMU_IRC: @@ -1080,28 +1079,25 @@ tcp_emu(so, m) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += snprintf(bptr, m->m_hdr.mh_size, - "DCC CHAT chat %lu %u%c\n", - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), 1); + m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", + (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), 1); } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += snprintf(bptr, m->m_hdr.mh_size, - "DCC SEND %s %lu %u %u%c\n", buff, - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); + m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", + buff, (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += snprintf(bptr, m->m_hdr.mh_size, - "DCC MOVE %s %lu %u %u%c\n", buff, - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); + m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", + buff, (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); } return 1; @@ -1277,11 +1273,6 @@ tcp_ctl(so) for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if (ex_ptr->ex_fport == so->so_fport && command == ex_ptr->ex_addr) { - if (ex_ptr->ex_pty == 3) { - so->s = -1; - so->extra = (void *)ex_ptr->ex_exec; - return 1; - } do_pty = ex_ptr->ex_pty; goto do_exec; } @@ -1294,8 +1285,8 @@ tcp_ctl(so) /* FALLTHROUGH */ case CTL_ALIAS: - sb->sb_cc = snprintf(sb->sb_wptr, sb->sb_datalen - (sb->sb_wptr - sb->sb_data), - "Error: No application configured.\r\n"); + sb->sb_cc = sprintf(sb->sb_wptr, + "Error: No application configured.\r\n"); sb->sb_wptr += sb->sb_cc; return(0); diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c index 47f01bb96..244bad6a8 100644 --- a/BasiliskII/src/slirp/tcp_timer.c +++ b/BasiliskII/src/slirp/tcp_timer.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h index 791ee49df..f251846b4 100644 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h index d4af1c8d0..82380f936 100644 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -36,12 +40,18 @@ #include "tcpip.h" #include "tcp_timer.h" +#if SIZEOF_CHAR_P == 4 + typedef struct tcpiphdr *tcpiphdrp_32; +#else + typedef u_int32_t tcpiphdrp_32; +#endif + /* * Tcp control block, one per tcp; fields: */ struct tcpcb { - struct tcpiphdr *seg_next; /* sequencing queue */ - struct tcpiphdr *seg_prev; + tcpiphdrp_32 seg_next; /* sequencing queue */ + tcpiphdrp_32 seg_prev; short t_state; /* state of this connection */ short t_timer[TCPT_NTIMERS]; /* tcp timers */ short t_rxtshift; /* log(2) of rexmt exp. backoff */ @@ -160,6 +170,21 @@ struct tcpcb { #define TCP_REXMTVAL(tp) \ (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) +/* XXX + * We want to avoid doing m_pullup on incoming packets but that + * means avoiding dtom on the tcp reassembly code. That in turn means + * keeping an mbuf pointer in the reassembly queue (since we might + * have a cluster). As a quick hack, the source & destination + * port numbers (which are no longer needed once we've located the + * tcpcb) are overlayed with an mbuf pointer. + */ +#if SIZEOF_CHAR_P == 4 +typedef struct mbuf *mbufp_32; +#else +typedef u_int32_t mbufp_32; +#endif +#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) + #ifdef LOG_ENABLED /* * TCP statistics. diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h index 7974ce3d5..82708b09c 100644 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -40,7 +44,8 @@ struct tcpiphdr { struct ipovly ti_i; /* overlaid ip structure */ struct tcphdr ti_t; /* tcp header */ }; -#define ti_mbuf ti_i.ih_mbuf.mptr +#define ti_next ti_i.ih_next +#define ti_prev ti_i.ih_prev #define ti_x1 ti_i.ih_x1 #define ti_pr ti_i.ih_pr #define ti_len ti_i.ih_len @@ -57,14 +62,6 @@ struct tcpiphdr { #define ti_sum ti_t.th_sum #define ti_urp ti_t.th_urp -#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) -#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) -#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) -#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) -#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) -#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) -#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) - /* * Just a clean way to get to the first byte * of the packet diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c index 4ad55048b..562ae8953 100644 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -23,7 +23,6 @@ */ #include -#include "qemu-common.h" // for pstrcpy struct tftp_session { int in_use; @@ -149,10 +148,8 @@ static int tftp_send_oack(struct tftp_session *spt, m->m_data += sizeof(struct udpiphdr); tp->tp_op = htons(TFTP_OACK); - n += snprintf((char *)tp->x.tp_buf + n, sizeof(tp->x.tp_buf) - n, "%s", - key) + 1; - n += snprintf((char *)tp->x.tp_buf + n, sizeof(tp->x.tp_buf) - n, "%u", - value) + 1; + n += sprintf(tp->x.tp_buf + n, "%s", key) + 1; + n += sprintf(tp->x.tp_buf + n, "%u", value) + 1; saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -192,7 +189,7 @@ static int tftp_send_error(struct tftp_session *spt, tp->tp_op = htons(TFTP_ERROR); tp->x.tp_error.tp_error_code = htons(errorcode); - pstrcpy((char *)tp->x.tp_error.tp_msg, sizeof(tp->x.tp_error.tp_msg), msg); + strcpy(tp->x.tp_error.tp_msg, msg); saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -327,8 +324,8 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) /* do sanity checks on the filename */ if ((spt->filename[0] != '/') - || (spt->filename[strlen((char *)spt->filename) - 1] == '/') - || strstr((char *)spt->filename, "/../")) { + || (spt->filename[strlen(spt->filename) - 1] == '/') + || strstr(spt->filename, "/../")) { tftp_send_error(spt, 2, "Access violation", tp); return; } @@ -355,7 +352,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) while (k < n) { const char *key, *value; - key = (char *)src + k; + key = src + k; k += strlen(key) + 1; if (k >= n) { @@ -363,7 +360,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) return; } - value = (char *)src + k; + value = src + k; k += strlen(value) + 1; if (strcmp(key, "tsize") == 0) { diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index 8d3bdd2ce..c48923b0c 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -132,7 +136,8 @@ udp_input(m, iphlen) * Checksum extended UDP header and data. */ if (UDPCKSUM && uh->uh_sum) { - memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); + ((struct ipovly *)ip)->ih_next = 0; + ((struct ipovly *)ip)->ih_prev = 0; ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply @@ -153,9 +158,6 @@ udp_input(m, iphlen) goto bad; } - if (slirp_restrict) - goto bad; - /* * handle TFTP */ @@ -278,7 +280,7 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ui->ui_next = ui->ui_prev = 0; ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ @@ -317,11 +319,9 @@ int udp_output(struct socket *so, struct mbuf *m, saddr = *addr; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { + saddr.sin_addr.s_addr = so->so_faddr.s_addr; if ((so->so_faddr.s_addr & htonl(0x000000ff)) == htonl(0xff)) saddr.sin_addr.s_addr = alias_addr.s_addr; - else if (addr->sin_addr.s_addr == loopback_addr.s_addr || - (ntohl(so->so_faddr.s_addr) & 0xff) != CTL_ALIAS) - saddr.sin_addr.s_addr = so->so_faddr.s_addr; } daddr.sin_addr = so->so_laddr; daddr.sin_port = so->so_lport; @@ -408,7 +408,7 @@ static void udp_emu(struct socket *so, struct mbuf *m) { struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); + int addrlen = sizeof(addr); #ifdef EMULATE_TALK CTL_MSG_OLD *omsg; CTL_MSG *nmsg; @@ -473,14 +473,14 @@ struct cu_header { type = omsg->type; OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; - pstrcpy(omsg->l_name, NAME_SIZE_OLD, getlogin()); + strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); } else { /* new talk */ omsg = (CTL_MSG_OLD *) buff; nmsg = mtod(m, CTL_MSG *); type = nmsg->type; OTOSIN(nmsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; - pstrcpy(nmsg->l_name, NAME_SIZE_OLD, getlogin()); + strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); } if (type == LOOK_UP) @@ -639,7 +639,7 @@ udp_listen(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - socklen_t addrlen = sizeof(struct sockaddr_in), opt = 1; + int addrlen = sizeof(struct sockaddr_in), opt = 1; if ((so = socreate()) == NULL) { free(so); diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h index 51a07a2fc..4f69b098c 100644 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -10,7 +10,11 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -56,7 +60,8 @@ struct udpiphdr { struct ipovly ui_i; /* overlaid ip structure */ struct udphdr ui_u; /* udp header */ }; -#define ui_mbuf ui_i.ih_mbuf.mptr +#define ui_next ui_i.ih_next +#define ui_prev ui_i.ih_prev #define ui_x1 ui_i.ih_x1 #define ui_pr ui_i.ih_pr #define ui_len ui_i.ih_len From 605c811a4ad9bdb8a742f8c80dfdc21c00a0a3ab Mon Sep 17 00:00:00 2001 From: jvernet Date: Wed, 4 Oct 2017 18:22:48 +0200 Subject: [PATCH 170/534] Revert "SLIRP 0.9.1" This reverts commit 4682bb80a1afd69e365a0e448fcba7dd68f8c242. --- BasiliskII/src/slirp/COPYRIGHT | 5 +- BasiliskII/src/slirp/bootp.c | 48 +- BasiliskII/src/slirp/bootp.h | 10 +- BasiliskII/src/slirp/cksum.c | 20 +- BasiliskII/src/slirp/debug.c | 142 ++-- BasiliskII/src/slirp/debug.h | 16 +- BasiliskII/src/slirp/icmp_var.h | 8 +- BasiliskII/src/slirp/if.c | 97 ++- BasiliskII/src/slirp/if.h | 37 +- BasiliskII/src/slirp/ip.h | 52 +- BasiliskII/src/slirp/ip_icmp.c | 84 +-- BasiliskII/src/slirp/ip_icmp.h | 22 +- BasiliskII/src/slirp/ip_input.c | 101 ++- BasiliskII/src/slirp/ip_output.c | 51 +- BasiliskII/src/slirp/libslirp.h | 24 +- BasiliskII/src/slirp/main.h | 5 +- BasiliskII/src/slirp/mbuf.c | 95 ++- BasiliskII/src/slirp/mbuf.h | 33 +- BasiliskII/src/slirp/misc.c | 377 ++++------ BasiliskII/src/slirp/misc.h | 48 +- BasiliskII/src/slirp/sbuf.c | 64 +- BasiliskII/src/slirp/sbuf.h | 17 +- BasiliskII/src/slirp/slirp.c | 314 ++++---- BasiliskII/src/slirp/slirp.h | 178 ++--- BasiliskII/src/slirp/slirp_config.h | 85 +-- BasiliskII/src/slirp/socket.c | 224 +++--- BasiliskII/src/slirp/socket.h | 47 +- BasiliskII/src/slirp/tcp.h | 24 +- BasiliskII/src/slirp/tcp_input.c | 1048 ++++++++++++++------------- BasiliskII/src/slirp/tcp_output.c | 116 ++- BasiliskII/src/slirp/tcp_subr.c | 418 +++++------ BasiliskII/src/slirp/tcp_timer.c | 73 +- BasiliskII/src/slirp/tcp_timer.h | 19 +- BasiliskII/src/slirp/tcp_var.h | 9 +- BasiliskII/src/slirp/tcpip.h | 6 +- BasiliskII/src/slirp/tftp.c | 149 +--- BasiliskII/src/slirp/tftp.h | 15 +- BasiliskII/src/slirp/udp.c | 209 +++--- BasiliskII/src/slirp/udp.h | 37 +- 39 files changed, 2017 insertions(+), 2310 deletions(-) diff --git a/BasiliskII/src/slirp/COPYRIGHT b/BasiliskII/src/slirp/COPYRIGHT index 3f331ee07..b7d6568ea 100644 --- a/BasiliskII/src/slirp/COPYRIGHT +++ b/BasiliskII/src/slirp/COPYRIGHT @@ -16,7 +16,7 @@ The copyright terms and conditions: ---BEGIN--- Copyright (c) 1995,1996 Danny Gasparovski. All rights reserved. - + Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: @@ -25,9 +25,6 @@ The copyright terms and conditions: 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. - 3. All advertising materials mentioning features or use of this software - must display the following acknowledgment: - This product includes software developed by Danny Gasparovski. THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c index 3ae3db209..a51b80c95 100644 --- a/BasiliskII/src/slirp/bootp.c +++ b/BasiliskII/src/slirp/bootp.c @@ -1,8 +1,8 @@ /* * QEMU BOOTP/DHCP server - * + * * Copyright (c) 2004 Fabrice Bellard - * + * * 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 @@ -38,17 +38,8 @@ typedef struct { BOOTPClient bootp_clients[NB_ADDR]; -const char *bootp_filename; - static const uint8_t rfc1533_cookie[] = { RFC1533_COOKIE }; -#ifdef DEBUG -#define dprintf(fmt, args...) \ -if (slirp_debug & DBG_CALL) { fprintf(dfd, fmt, ## args); fflush(dfd); } -#else -#define dprintf(fmt, args...) -#endif - static BOOTPClient *get_new_addr(struct in_addr *paddr) { BOOTPClient *bc; @@ -89,7 +80,7 @@ static void dhcp_decode(const uint8_t *buf, int size, const uint8_t *p, *p_end; int len, tag; - *pmsg_type = 0; + *pmsg_type = 0; p = buf; p_end = buf + size; @@ -101,7 +92,7 @@ static void dhcp_decode(const uint8_t *buf, int size, while (p < p_end) { tag = p[0]; if (tag == RFC1533_PAD) { - p++; + p++; } else if (tag == RFC1533_END) { break; } else { @@ -109,7 +100,6 @@ static void dhcp_decode(const uint8_t *buf, int size, if (p >= p_end) break; len = *p++; - dprintf("dhcp: tag=0x%02x len=%d\n", tag, len); switch(tag) { case RFC2132_MSG_TYPE: @@ -136,20 +126,19 @@ static void bootp_reply(struct bootp_t *bp) /* extract exact DHCP msg type */ dhcp_decode(bp->bp_vend, DHCP_OPT_LEN, &dhcp_msg_type); - dprintf("bootp packet op=%d msgtype=%d\n", bp->bp_op, dhcp_msg_type); - + if (dhcp_msg_type == 0) dhcp_msg_type = DHCPREQUEST; /* Force reply for old BOOTP clients */ - - if (dhcp_msg_type != DHCPDISCOVER && + + if (dhcp_msg_type != DHCPDISCOVER && dhcp_msg_type != DHCPREQUEST) return; /* XXX: this is a hack to get the client mac address */ memcpy(client_ethaddr, bp->bp_hwaddr, 6); - + if ((m = m_get()) == NULL) return; - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; rbp = (struct bootp_t *)m->m_data; m->m_data += sizeof(struct udpiphdr); memset(rbp, 0, sizeof(struct bootp_t)); @@ -157,10 +146,8 @@ static void bootp_reply(struct bootp_t *bp) if (dhcp_msg_type == DHCPDISCOVER) { new_addr: bc = get_new_addr(&daddr.sin_addr); - if (!bc) { - dprintf("no address left\n"); + if (!bc) return; - } memcpy(bc->macaddr, client_ethaddr, 6); } else { bc = find_addr(&daddr.sin_addr, bp->bp_hwaddr); @@ -171,11 +158,6 @@ static void bootp_reply(struct bootp_t *bp) } } - if (bootp_filename) - snprintf(rbp->bp_file, sizeof(rbp->bp_file), "%s", bootp_filename); - - dprintf("offered addr=%08x\n", ntohl(daddr.sin_addr.s_addr)); - saddr.sin_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_ALIAS); saddr.sin_port = htons(BOOTP_SERVER); @@ -203,7 +185,7 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 1; *q++ = DHCPACK; } - + if (dhcp_msg_type == DHCPDISCOVER || dhcp_msg_type == DHCPREQUEST) { *q++ = RFC2132_SRV_ID; @@ -217,12 +199,12 @@ static void bootp_reply(struct bootp_t *bp) *q++ = 0xff; *q++ = 0xff; *q++ = 0x00; - + *q++ = RFC1533_GATEWAY; *q++ = 4; memcpy(q, &saddr.sin_addr, 4); q += 4; - + *q++ = RFC1533_DNS; *q++ = 4; dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); @@ -244,8 +226,8 @@ static void bootp_reply(struct bootp_t *bp) } } *q++ = RFC1533_END; - - m->m_len = sizeof(struct bootp_t) - + + m->m_len = sizeof(struct bootp_t) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); } diff --git a/BasiliskII/src/slirp/bootp.h b/BasiliskII/src/slirp/bootp.h index e48f53f37..54a86ca22 100644 --- a/BasiliskII/src/slirp/bootp.h +++ b/BasiliskII/src/slirp/bootp.h @@ -90,6 +90,10 @@ #define BOOTP_VENDOR_LEN 64 #define DHCP_OPT_LEN 312 +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct bootp_t { struct ip ip; struct udphdr udp; @@ -108,6 +112,10 @@ struct bootp_t { uint8_t bp_sname[64]; uint8_t bp_file[128]; uint8_t bp_vend[DHCP_OPT_LEN]; -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif void bootp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c index b98373b51..66d3f230a 100644 --- a/BasiliskII/src/slirp/cksum.c +++ b/BasiliskII/src/slirp/cksum.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -41,7 +37,7 @@ * * This routine is very heavily used in the network * code and should be modified for each CPU to be as fast as possible. - * + * * XXX Since we will never span more than 1 mbuf, we can optimise this */ @@ -63,13 +59,13 @@ int cksum(struct mbuf *m, int len) u_int16_t s[2]; u_int32_t l; } l_util; - + if (m->m_len == 0) goto cont; w = mtod(m, u_int16_t *); - + mlen = m->m_len; - + if (len < mlen) mlen = len; len -= mlen; @@ -107,7 +103,7 @@ int cksum(struct mbuf *m, int len) while ((mlen -= 2) >= 0) { sum += *w++; } - + if (byte_swapped) { REDUCE; sum <<= 8; @@ -117,11 +113,11 @@ int cksum(struct mbuf *m, int len) sum += s_util.s; mlen = 0; } else - + mlen = -1; } else if (mlen == -1) s_util.c[0] = *(u_int8_t *)w; - + cont: #ifdef DEBUG if (len) { diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c index 7c8581d63..916b9a8e0 100644 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -1,8 +1,8 @@ /* * Copyright (c) 1995 Danny Gasparovski. * Portions copyright (c) 2000 Kelly Price. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -16,11 +16,8 @@ int dostats = 0; #endif int slirp_debug = 0; -extern char *strerror _P((int)); - -/* Carry over one item from main.c so that the tty's restored. +/* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ -#ifndef CONFIG_QEMU extern struct termios slirp_tty_settings; extern int slirp_tty_restore; @@ -33,7 +30,7 @@ debug_init(file, dbg) /* Close the old debugging file */ if (dfd) fclose(dfd); - + dfd = fopen(file,"w"); if (dfd != NULL) { #if 0 @@ -59,7 +56,7 @@ dump_packet(dat, n) { u_char *pptr = (u_char *)dat; int j,k; - + n /= 16; n++; DEBUG_MISC((dfd, "PACKET DUMPED: \n")); @@ -71,30 +68,28 @@ dump_packet(dat, n) } } #endif -#endif -#ifdef LOG_ENABLED #if 0 /* * Statistic routines - * + * * These will print statistics to the screen, the debug file (dfd), or * a buffer, depending on "type", so that the stats can be sent over * the link as well. */ -static void +void ttystats(ttyp) struct ttys *ttyp; { struct slirp_ifstats *is = &ttyp->ifstats; char buff[512]; - + lprint(" \r\n"); - - if (IF_COMP & IF_COMPRESS) + + if (if_comp & IF_COMPRESS) strcpy(buff, "on"); - else if (IF_COMP & IF_NOCOMPRESS) + else if (if_comp & IF_NOCOMPRESS) strcpy(buff, "off"); else strcpy(buff, "off (for now)"); @@ -122,20 +117,20 @@ ttystats(ttyp) lprint(" %6d bad input packets\r\n", is->in_mbad); } -static void -allttystats(void) +void +allttystats() { struct ttys *ttyp; - + for (ttyp = ttys; ttyp; ttyp = ttyp->next) ttystats(ttyp); } #endif -static void -ipstats(void) +void +ipstats() { - lprint(" \r\n"); + lprint(" \r\n"); lprint("IP stats:\r\n"); lprint(" %6d total packets received (%d were unaligned)\r\n", @@ -156,14 +151,14 @@ ipstats(void) lprint(" %6d total packets delivered\r\n", ipstat.ips_delivered); } -#ifndef CONFIG_QEMU -static void -vjstats(void) +#if 0 +void +vjstats() { lprint(" \r\n"); - + lprint("VJ compression stats:\r\n"); - + lprint(" %6d outbound packets (%d compressed)\r\n", comp_s.sls_packets, comp_s.sls_compressed); lprint(" %6d searches for connection stats (%d misses)\r\n", @@ -175,13 +170,13 @@ vjstats(void) } #endif -static void -tcpstats(void) +void +tcpstats() { lprint(" \r\n"); lprint("TCP stats:\r\n"); - + lprint(" %6d packets sent\r\n", tcpstat.tcps_sndtotal); lprint(" %6d data packets (%d bytes)\r\n", tcpstat.tcps_sndpack, tcpstat.tcps_sndbyte); @@ -194,8 +189,8 @@ tcpstats(void) lprint(" %6d window update packets\r\n", tcpstat.tcps_sndwinup); lprint(" %6d control (SYN/FIN/RST) packets\r\n", tcpstat.tcps_sndctrl); lprint(" %6d times tcp_output did nothing\r\n", tcpstat.tcps_didnuttin); - - lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); + + lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); lprint(" %6d acks (for %d bytes)\r\n", tcpstat.tcps_rcvackpack, tcpstat.tcps_rcvackbyte); lprint(" %6d duplicate acks\r\n", tcpstat.tcps_rcvdupack); @@ -204,7 +199,7 @@ tcpstats(void) tcpstat.tcps_rcvpack, tcpstat.tcps_rcvbyte); lprint(" %6d completely duplicate packets (%d bytes)\r\n", tcpstat.tcps_rcvduppack, tcpstat.tcps_rcvdupbyte); - + lprint(" %6d packets with some duplicate data (%d bytes duped)\r\n", tcpstat.tcps_rcvpartduppack, tcpstat.tcps_rcvpartdupbyte); lprint(" %6d out-of-order packets (%d bytes)\r\n", @@ -217,7 +212,7 @@ tcpstats(void) lprint(" %6d discarded for bad checksums\r\n", tcpstat.tcps_rcvbadsum); lprint(" %6d discarded for bad header offset fields\r\n", tcpstat.tcps_rcvbadoff); - + lprint(" %6d connection requests\r\n", tcpstat.tcps_connattempt); lprint(" %6d connection accepts\r\n", tcpstat.tcps_accepts); lprint(" %6d connections established (including accepts)\r\n", tcpstat.tcps_connects); @@ -236,15 +231,15 @@ tcpstats(void) lprint(" %6d correct ACK header predictions\r\n", tcpstat.tcps_predack); lprint(" %6d correct data packet header predictions\n", tcpstat.tcps_preddat); lprint(" %6d TCP cache misses\r\n", tcpstat.tcps_socachemiss); - - + + /* lprint(" Packets received too short: %d\r\n", tcpstat.tcps_rcvshort); */ /* lprint(" Segments dropped due to PAWS: %d\r\n", tcpstat.tcps_pawsdrop); */ } -static void -udpstats(void) +void +udpstats() { lprint(" \r\n"); @@ -257,8 +252,8 @@ udpstats(void) lprint(" %6d datagrams sent\r\n", udpstat.udps_opackets); } -static void -icmpstats(void) +void +icmpstats() { lprint(" \r\n"); lprint("ICMP stats:\r\n"); @@ -270,23 +265,23 @@ icmpstats(void) lprint(" %6d ICMP packets sent in reply\r\n", icmpstat.icps_reflect); } -static void -mbufstats(void) +void +mbufstats() { struct mbuf *m; int i; - + lprint(" \r\n"); - + lprint("Mbuf stats:\r\n"); lprint(" %6d mbufs allocated (%d max)\r\n", mbuf_alloced, mbuf_max); - + i = 0; for (m = m_freelist.m_next; m != &m_freelist; m = m->m_next) i++; lprint(" %6d mbufs on free list\r\n", i); - + i = 0; for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) i++; @@ -294,55 +289,59 @@ mbufstats(void) lprint(" %6d mbufs queued as packets\r\n\r\n", if_queued); } -static void -sockstats(void) +void +sockstats() { + char addr[INET_ADDRSTRLEN]; char buff[256]; int n; struct socket *so; lprint(" \r\n"); - + lprint( "Proto[state] Sock Local Address, Port Remote Address, Port RecvQ SendQ\r\n"); - + for (so = tcb.so_next; so != &tcb; so = so->so_next) { - + n = sprintf(buff, "tcp[%s]", so->so_tcpcb?tcpstates[so->so_tcpcb->t_state]:"NONE"); while (n < 17) buff[n++] = ' '; buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), + ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), + inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), + ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } - + for (so = udb.so_next; so != &udb; so = so->so_next) { - + n = sprintf(buff, "udp[%d sec]", (so->so_expire - curtime) / 1000); while (n < 17) buff[n++] = ' '; buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), + ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), + inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), + ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } } -#endif -#ifndef CONFIG_QEMU +#if 0 void slirp_exit(exit_status) int exit_status; { struct ttys *ttyp; - + DEBUG_CALL("slirp_exit"); DEBUG_ARG("exit_status = %d", exit_status); @@ -351,7 +350,7 @@ slirp_exit(exit_status) if (!dfd) debug_init("slirp_stats", 0xf); lprint_arg = (char **)&dfd; - + ipstats(); tcpstats(); udpstats(); @@ -361,35 +360,20 @@ slirp_exit(exit_status) allttystats(); vjstats(); } - + for (ttyp = ttys; ttyp; ttyp = ttyp->next) tty_detached(ttyp, 1); - + if (slirp_forked) { /* Menendez time */ if (kill(getppid(), SIGQUIT) < 0) lprint("Couldn't kill parent process %ld!\n", (long) getppid()); } - + /* Restore the terminal if we gotta */ if(slirp_tty_restore) tcsetattr(0,TCSANOW, &slirp_tty_settings); /* NOW DAMMIT! */ exit(exit_status); } #endif - -void -slirp_stats(void) -{ -#ifdef LOG_ENABLED - ipstats(); - tcpstats(); - udpstats(); - icmpstats(); - mbufstats(); - sockstats(); -#else - lprint("SLIRP statistics code not compiled.\n"); -#endif -} diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h index 8a523b2ed..c5d42195e 100644 --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -36,5 +36,15 @@ extern int slirp_debug; #endif -void debug_init _P((char *, int)); +void debug_init(char *, int); +//void ttystats(struct ttys *); +void allttystats(void); +void ipstats(void); +void vjstats(void); +void tcpstats(void); +void udpstats(void); +void icmpstats(void); +void mbufstats(void); +void sockstats(void); +void slirp_exit(int); diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h index cd865b797..9af222fb7 100644 --- a/BasiliskII/src/slirp/icmp_var.h +++ b/BasiliskII/src/slirp/icmp_var.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -64,8 +60,6 @@ struct icmpstat { { "stats", CTLTYPE_STRUCT }, \ } -#ifdef LOG_ENABLED extern struct icmpstat icmpstat; -#endif #endif diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c index 67a7b6ff8..9185dcf65 100644 --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -7,7 +7,12 @@ #include -int if_queued = 0; /* Number of packets queued so far */ +size_t if_mtu, if_mru; +int if_comp; +int if_maxlinkhdr; +int if_queued = 0; /* Number of packets queued so far */ +int if_thresh = 10; /* Number of packets queued before we start sending + * (to prevent allocing too many mbufs) */ struct mbuf if_fastq; /* fast queue (for interactive data) */ struct mbuf if_batchq; /* queue for non-interactive data */ @@ -36,6 +41,23 @@ ifs_remque(ifm) void if_init() { +#if 0 + /* + * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, + * and 8 bytes for PPP, but need to have it on an 8byte boundary + */ +#ifdef USE_PPP + if_maxlinkhdr = 48; +#else + if_maxlinkhdr = 40; +#endif +#else + /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ + if_maxlinkhdr = 2 + 14 + 40; +#endif + if_mtu = 1500; + if_mru = 1500; + if_comp = IF_AUTOCOMP; if_fastq.ifq_next = if_fastq.ifq_prev = &if_fastq; if_batchq.ifq_next = if_batchq.ifq_prev = &if_batchq; // sl_compress_init(&comp_s); @@ -55,12 +77,12 @@ writen(fd, bptr, n) { int ret; int total; - + /* This should succeed most of the time */ ret = send(fd, bptr, n,0); if (ret == n || ret <= 0) return ret; - + /* Didn't write everything, go into the loop */ total = ret; while (n > total) { @@ -75,7 +97,7 @@ writen(fd, bptr, n) /* * if_input - read() the tty, do "top level" processing (ie: check for any escapes), * and pass onto (*ttyp->if_input) - * + * * XXXXX Any zeros arriving by themselves are NOT placed into the arriving packet. */ #define INBUFF_SIZE 2048 /* XXX */ @@ -85,16 +107,17 @@ if_input(ttyp) { u_char if_inbuff[INBUFF_SIZE]; int if_n; - + DEBUG_CALL("if_input"); DEBUG_ARG("ttyp = %lx", (long)ttyp); - + if_n = recv(ttyp->fd, (char *)if_inbuff, INBUFF_SIZE,0); - + DEBUG_MISC((dfd, " read %d bytes\n", if_n)); - + if (if_n <= 0) { - if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { + int error = WSAGetLastError(); + if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { if (ttyp->up) link_up--; tty_detached(ttyp, 0); @@ -116,19 +139,19 @@ if_input(ttyp) } } ttyp->ones = ttyp->zeros = 0; - + (*ttyp->if_input)(ttyp, if_inbuff, if_n); } -#endif - +#endif + /* * if_output: Queue packet into an output queue. - * There are 2 output queue's, if_fastq and if_batchq. + * There are 2 output queue's, if_fastq and if_batchq. * Each output queue is a doubly linked list of double linked lists * of mbufs, each list belonging to one "session" (socket). This * way, we can output packets fairly by sending one packet from each * session, instead of all the packets from one session, then all packets - * from the next session, etc. Packets on the if_fastq get absolute + * from the next session, etc. Packets on the if_fastq get absolute * priority, but if one session hogs the link, it gets "downgraded" * to the batchq until it runs out of packets, then it'll return * to the fastq (eg. if the user does an ls -alR in a telnet session, @@ -141,11 +164,11 @@ if_output(so, ifm) { struct mbuf *ifq; int on_fastq = 1; - + DEBUG_CALL("if_output"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("ifm = %lx", (long)ifm); - + /* * First remove the mbuf from m_usedlist, * since we're gonna use m_next and m_prev ourselves @@ -155,9 +178,9 @@ if_output(so, ifm) remque(ifm); ifm->m_flags &= ~M_USEDLIST; } - + /* - * See if there's already a batchq list for this session. + * See if there's already a batchq list for this session. * This can include an interactive session, which should go on fastq, * but gets too greedy... hence it'll be downgraded from fastq to batchq. * We mustn't put this packet back on the fastq (or we'll send it out of order) @@ -171,7 +194,7 @@ if_output(so, ifm) goto diddit; } } - + /* No match, check which queue to put it on */ if (so && (so->so_iptos & IPTOS_LOWDELAY)) { ifq = if_fastq.ifq_prev; @@ -187,15 +210,15 @@ if_output(so, ifm) } } else ifq = if_batchq.ifq_prev; - + /* Create a new doubly linked list for this session */ ifm->ifq_so = so; ifs_init(ifm); insque(ifm, ifq); - + diddit: ++if_queued; - + if (so) { /* Update *_queued */ so->so_queued++; @@ -207,12 +230,12 @@ if_output(so, ifm) * have been sent over the link * (XXX These are arbitrary numbers, probably not optimal..) */ - if (on_fastq && ((so->so_nqueued >= 6) && + if (on_fastq && ((so->so_nqueued >= 6) && (so->so_nqueued - so->so_queued) >= 3)) { - + /* Remove from current queue... */ remque(ifm->ifs_next); - + /* ...And insert in the new. That'll teach ya! */ insque(ifm->ifs_next, &if_batchq); } @@ -245,16 +268,16 @@ void if_start(void) { struct mbuf *ifm, *ifqt; - + DEBUG_CALL("if_start"); - + if (if_queued == 0) return; /* Nothing to do */ - + again: - /* check if we can really output */ - if (!slirp_can_output()) - return; + /* check if we can really output */ + if (!slirp_can_output()) + return; /* * See which queue to get next packet from @@ -268,7 +291,7 @@ if_start(void) ifm = next_m; else ifm = if_batchq.ifq_next; - + /* Set which packet to send on next iteration */ next_m = ifm->ifq_next; } @@ -276,24 +299,24 @@ if_start(void) ifqt = ifm->ifq_prev; remque(ifm); --if_queued; - + /* If there are more packets for this session, re-queue them */ if (ifm->ifs_next != /* ifm->ifs_prev != */ ifm) { insque(ifm->ifs_next, ifqt); ifs_remque(ifm); } - + /* Update so_queued */ if (ifm->ifq_so) { if (--ifm->ifq_so->so_queued == 0) /* If there's no more queued, reset nqueued */ ifm->ifq_so->so_nqueued = 0; } - + /* Encapsulate the packet for sending */ - if_encap(ifm->m_data, ifm->m_len); + if_encap((uint8_t*)ifm->m_data, ifm->m_len); - m_free(ifm); + m_free(ifm); if (if_queued) goto again; diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h index bed7152fe..a2564ab1d 100644 --- a/BasiliskII/src/slirp/if.h +++ b/BasiliskII/src/slirp/if.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -13,26 +13,15 @@ #define IF_AUTOCOMP 0x04 /* Autodetect (default) */ #define IF_NOCIDCOMP 0x08 /* CID compression */ -#define IF_MTU 1500 -#define IF_MRU 1500 -#define IF_COMP IF_AUTOCOMP /* Flags for compression */ - -#if 0 -/* - * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, - * and 8 bytes for PPP, but need to have it on an 8byte boundary - */ -#ifdef USE_PPP -#define IF_MAXLINKHDR 48 -#else -#define IF_MAXLINKHDR 40 -#endif -#else - /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ -#define IF_MAXLINKHDR (2 + 14 + 40) -#endif - +/* Needed for FreeBSD */ +#undef if_mtu +extern size_t if_mtu; +extern size_t if_mru; /* MTU and MRU */ +extern int if_comp; /* Flags for compression */ +extern int if_maxlinkhdr; extern int if_queued; /* Number of packets queued so far */ +extern int if_thresh; /* Number of packets queued before we start sending + * (to prevent allocing too many mbufs) */ extern struct mbuf if_fastq; /* fast queue (for interactive data) */ extern struct mbuf if_batchq; /* queue for non-interactive data */ @@ -40,7 +29,6 @@ extern struct mbuf *next_m; #define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) -#ifdef LOG_ENABLED /* Interface statistics */ struct slirp_ifstats { u_int out_pkts; /* Output packets */ @@ -51,13 +39,12 @@ struct slirp_ifstats { u_int in_bytes; /* Input bytes */ u_int in_errpkts; /* Input Error Packets */ u_int in_errbytes; /* Input Error Bytes */ - + u_int bytes_saved; /* Number of bytes that compression "saved" */ /* ie: number of bytes that didn't need to be sent over the link * because of compression */ - + u_int in_mbad; /* Bad incoming packets */ }; -#endif #endif diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h index a8cdb0d3f..e0c7de967 100644 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -76,12 +72,16 @@ typedef u_int32_t n_long; /* long as received from the net */ /* * Structure of an internet header, naked of options. */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct ip { #ifdef WORDS_BIGENDIAN - u_int ip_v:4, /* version */ + u_char ip_v:4, /* version */ ip_hl:4; /* header length */ #else - u_int ip_hl:4, /* header length */ + u_char ip_hl:4, /* header length */ ip_v:4; /* version */ #endif u_int8_t ip_tos; /* type of service */ @@ -95,7 +95,11 @@ struct ip { u_int8_t ip_p; /* protocol */ u_int16_t ip_sum; /* checksum */ struct in_addr ip_src,ip_dst; /* source and dest address */ -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif #define IP_MAXPACKET 65535 /* maximum packet size */ @@ -139,15 +143,19 @@ struct ip { /* * Time stamp option structure. */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct ip_timestamp { u_int8_t ipt_code; /* IPOPT_TS */ u_int8_t ipt_len; /* size of structure (variable) */ u_int8_t ipt_ptr; /* index of current entry */ #ifdef WORDS_BIGENDIAN - u_int ipt_oflw:4, /* overflow counter */ + u_char ipt_oflw:4, /* overflow counter */ ipt_flg:4; /* flags, see below */ #else - u_int ipt_flg:4, /* flags, see below */ + u_char ipt_flg:4, /* flags, see below */ ipt_oflw:4; /* overflow counter */ #endif union ipt_timestamp { @@ -157,7 +165,11 @@ struct ip_timestamp { n_long ipt_time; } ipt_ta[1]; } ipt_timestamp; -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif /* flag bits for ipt_flg */ #define IPOPT_TS_TSONLY 0 /* timestamps only */ @@ -204,6 +216,10 @@ typedef caddr32_t ipasfragp_32; /* * Overlay for ip header used by other protocols (tcp, udp). */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct ipovly { caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ u_int8_t ih_x1; /* (unused) */ @@ -211,7 +227,11 @@ struct ipovly { u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif /* * Ip reassembly queue structure. Each fragment @@ -237,10 +257,10 @@ struct ipq { */ struct ipasfrag { #ifdef WORDS_BIGENDIAN - u_int ip_v:4, + u_char ip_v:4, ip_hl:4; #else - u_int ip_hl:4, + u_char ip_hl:4, ip_v:4; #endif /* BUG : u_int changed to u_int8_t. @@ -272,7 +292,6 @@ struct ipoption { int8_t ipopt_list[MAX_IPOPTLEN]; /* options proper */ }; -#ifdef LOG_ENABLED /* * Structure attached to inpcb.ip_moptions and * passed to ip_output when IP multicast options are in use. @@ -307,9 +326,8 @@ struct ipstat { }; extern struct ipstat ipstat; -#endif - extern struct ipq ipq; /* ip reass. queue */ extern u_int16_t ip_id; /* ip packet ctr, for ids */ +extern int ip_defttl; /* default IP ttl */ #endif diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c index d1da0a2fc..55376a8b1 100644 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,16 +33,14 @@ #include "slirp.h" #include "ip_icmp.h" -#ifdef LOG_ENABLED struct icmpstat icmpstat; -#endif /* The message sent when emulating PING */ -/* Be nice and tell them it's just a pseudo-ping packet */ -const char icmp_ping_msg[] = "This is a pseudo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; +/* Be nice and tell them it's just a psuedo-ping packet */ +char icmp_ping_msg[] = "This is a psuedo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; /* list of actions for icmp_error() on RX of an icmp message */ -static const int icmp_flush[19] = { +static int icmp_flush[19] = { /* ECHO REPLY (0) */ 0, 1, 1, @@ -65,7 +59,7 @@ static const int icmp_flush[19] = { /* INFO (15) */ 0, /* INFO REPLY (16) */ 0, /* ADDR MASK (17) */ 0, -/* ADDR MASK REPLY (18) */ 0 +/* ADDR MASK REPLY (18) */ 0 }; /* @@ -80,19 +74,19 @@ icmp_input(m, hlen) register struct ip *ip=mtod(m, struct ip *); int icmplen=ip->ip_len; /* int code; */ - + DEBUG_CALL("icmp_input"); DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %d", m->m_len); - - STAT(icmpstat.icps_received++); + DEBUG_ARG("m_len = %zu", m->m_len); + icmpstat.icps_received++; + /* * Locate icmp structure in mbuf, and check * that its not corrupted and of at least minimum length. */ if (icmplen < ICMP_MINLEN) { /* min 8 bytes payload */ - STAT(icmpstat.icps_tooshort++); + icmpstat.icps_tooshort++; freeit: m_freem(m); goto end_error; @@ -102,12 +96,12 @@ icmp_input(m, hlen) m->m_data += hlen; icp = mtod(m, struct icmp *); if (cksum(m, icmplen)) { - STAT(icmpstat.icps_checksum++); + icmpstat.icps_checksum++; goto freeit; } m->m_len += hlen; m->m_data -= hlen; - + /* icmpstat.icps_inhist[icp->icmp_type]++; */ /* code = icp->icmp_code; */ @@ -123,7 +117,7 @@ icmp_input(m, hlen) struct sockaddr_in addr; if ((so = socreate()) == NULL) goto freeit; if(udp_attach(so) == -1) { - DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", + DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", errno,strerror(errno))); sofree(so); m_free(m); @@ -137,7 +131,7 @@ icmp_input(m, hlen) so->so_iptos = ip->ip_tos; so->so_type = IPPROTO_ICMP; so->so_state = SS_ISFCONNECTED; - + /* Send the packet */ addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { @@ -159,7 +153,7 @@ icmp_input(m, hlen) (struct sockaddr *)&addr, sizeof(addr)) == -1) { DEBUG_MISC((dfd,"icmp_input udp sendto tx errno = %d-%s\n", errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); udp_detach(so); } } /* if ip->ip_dst.s_addr == alias_addr.s_addr */ @@ -172,12 +166,12 @@ icmp_input(m, hlen) case ICMP_TSTAMP: case ICMP_MASKREQ: case ICMP_REDIRECT: - STAT(icmpstat.icps_notsupp++); + icmpstat.icps_notsupp++; m_freem(m); break; - + default: - STAT(icmpstat.icps_badtype++); + icmpstat.icps_badtype++; m_freem(m); } /* swith */ @@ -201,18 +195,18 @@ icmp_input(m, hlen) * mbuf *msrc is used as a template, but is NOT m_free()'d. * It is reported as the bad ip packet. The header should * be fully correct and in host byte order. - * ICMP fragmentation is illegal. All machines must accept 576 bytes in one + * ICMP fragmentation is illegal. All machines must accept 576 bytes in one * packet. The maximum payload is 576-20(ip hdr)-8(icmp hdr)=548 */ #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error(msrc, type, code, minsize, message) - struct mbuf *msrc; - u_char type; - u_char code; - int minsize; - char *message; +icmp_error( + struct mbuf *msrc, + u_char type, + u_char code, + int minsize, + char *message) { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -221,17 +215,17 @@ icmp_error(msrc, type, code, minsize, message) DEBUG_CALL("icmp_error"); DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %d", msrc->m_len); + DEBUG_ARG("msrc_len = %zu", msrc->m_len); if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; /* check msrc */ if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); -#if DEBUG - { char bufa[20], bufb[20]; - strcpy(bufa, inet_ntoa(ip->ip_src)); - strcpy(bufb, inet_ntoa(ip->ip_dst)); +#if DEBUG + { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; + inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); + inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); } #endif @@ -250,7 +244,7 @@ icmp_error(msrc, type, code, minsize, message) /* make a copy */ if(!(m=m_get())) goto end_error; /* get mbuf */ - { int new_m_size; + { u_int new_m_size; new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; if(new_m_size>m->m_size) m_inc(m, new_m_size); } @@ -260,9 +254,9 @@ icmp_error(msrc, type, code, minsize, message) /* make the header of the reply packet */ ip = mtod(m, struct ip *); hlen= sizeof(struct ip ); /* no options in reply */ - + /* fill in icmp */ - m->m_data += hlen; + m->m_data += hlen; m->m_len -= hlen; icp = mtod(m, struct icmp *); @@ -271,7 +265,7 @@ icmp_error(msrc, type, code, minsize, message) else if(s_ip_len>ICMP_MAXDATALEN) /* maximum size */ s_ip_len=ICMP_MAXDATALEN; - m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ + m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ /* min. size = 8+sizeof(struct ip)+8 */ @@ -305,8 +299,8 @@ icmp_error(msrc, type, code, minsize, message) /* fill in ip */ ip->ip_hl = hlen >> 2; - ip->ip_len = m->m_len; - + ip->ip_len = (u_int16_t)m->m_len; + ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ ip->ip_ttl = MAXTTL; @@ -315,8 +309,8 @@ icmp_error(msrc, type, code, minsize, message) ip->ip_src = alias_addr; (void ) ip_output((struct socket *)NULL, m); - - STAT(icmpstat.icps_reflect++); + + icmpstat.icps_reflect++; end_error: return; @@ -373,5 +367,5 @@ icmp_reflect(m) (void ) ip_output((struct socket *)NULL, m); - STAT(icmpstat.icps_reflect++); + icmpstat.icps_reflect++; } diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h index 8c9b5a1ba..683dc87f1 100644 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -47,6 +43,10 @@ typedef u_int32_t n_time; /* * Structure of an icmp header. */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct icmp { u_char icmp_type; /* type of message, see below */ u_char icmp_code; /* type sub code */ @@ -92,7 +92,11 @@ struct icmp { #define icmp_ip icmp_dun.id_ip.idi_ip #define icmp_mask icmp_dun.id_mask #define icmp_data icmp_dun.id_data -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif /* * Lower bounds on packet lengths for various types. @@ -157,8 +161,8 @@ struct icmp { (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) -void icmp_input _P((struct mbuf *, int)); -void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); -void icmp_reflect _P((struct mbuf *)); +void icmp_input(struct mbuf *, int); +void icmp_error(struct mbuf *, u_char, u_char, int, char *); +void icmp_reflect(struct mbuf *); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c index b04684027..cac8493ba 100644 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,7 +33,7 @@ /* * Changes and additions relating to SLiRP are * Copyright (c) 1995 Danny Gasparovski. - * + * * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -45,19 +41,10 @@ #include #include "ip_icmp.h" -#ifdef LOG_ENABLED +int ip_defttl; struct ipstat ipstat; -#endif - struct ipq ipq; -static struct ip *ip_reass(register struct ipasfrag *ip, - register struct ipq *fp); -static void ip_freef(struct ipq *fp); -static void ip_enq(register struct ipasfrag *p, - register struct ipasfrag *prev); -static void ip_deq(register struct ipasfrag *p); - /* * IP initialization: fill in IP protocol switch table. * All protocols not implemented in kernel go to raw IP protocol handler. @@ -69,6 +56,7 @@ ip_init() ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); + ip_defttl = IPDEFTTL; } /* @@ -80,38 +68,38 @@ ip_input(m) struct mbuf *m; { register struct ip *ip; - int hlen; - + u_int hlen; + DEBUG_CALL("ip_input"); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %d", m->m_len); - - STAT(ipstat.ips_total++); + DEBUG_ARG("m_len = %zu", m->m_len); + ipstat.ips_total++; + if (m->m_len < sizeof (struct ip)) { - STAT(ipstat.ips_toosmall++); + ipstat.ips_toosmall++; return; } - + ip = mtod(m, struct ip *); - + if (ip->ip_v != IPVERSION) { - STAT(ipstat.ips_badvers++); + ipstat.ips_badvers++; goto bad; } hlen = ip->ip_hl << 2; if (hlenm->m_len) {/* min header length */ - STAT(ipstat.ips_badhlen++); /* or packet too short */ + ipstat.ips_badhlen++; /* or packet too short */ goto bad; } /* keep ip header intact for ICMP reply - * ip->ip_sum = cksum(m, hlen); - * if (ip->ip_sum) { + * ip->ip_sum = cksum(m, hlen); + * if (ip->ip_sum) { */ if(cksum(m,hlen)) { - STAT(ipstat.ips_badsum++); + ipstat.ips_badsum++; goto bad; } @@ -120,7 +108,7 @@ ip_input(m) */ NTOHS(ip->ip_len); if (ip->ip_len < hlen) { - STAT(ipstat.ips_badlen++); + ipstat.ips_badlen++; goto bad; } NTOHS(ip->ip_id); @@ -133,7 +121,7 @@ ip_input(m) * Drop packet if shorter than we expect. */ if (m->m_len < ip->ip_len) { - STAT(ipstat.ips_tooshort++); + ipstat.ips_tooshort++; goto bad; } /* Should drop packet if mbuf too long? hmmm... */ @@ -162,7 +150,7 @@ ip_input(m) * (We could look in the reassembly queue to see * if the packet was previously fragmented, * but it's not worth the time; just let them time out.) - * + * * XXX This should fail, don't fragment yet */ if (ip->ip_off &~ IP_DF) { @@ -189,7 +177,7 @@ ip_input(m) ip->ip_len -= hlen; if (ip->ip_off & IP_MF) ((struct ipasfrag *)ip)->ipf_mff |= 1; - else + else ((struct ipasfrag *)ip)->ipf_mff &= ~1; ip->ip_off <<= 3; @@ -200,11 +188,11 @@ ip_input(m) * attempt reassembly; if it succeeds, proceed. */ if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { - STAT(ipstat.ips_fragments++); + ipstat.ips_fragments++; ip = ip_reass((struct ipasfrag *)ip, fp); if (ip == 0) return; - STAT(ipstat.ips_reassembled++); + ipstat.ips_reassembled++; m = dtom(ip); } else if (fp) @@ -216,7 +204,7 @@ ip_input(m) /* * Switch out to protocol's input routine. */ - STAT(ipstat.ips_delivered++); + ipstat.ips_delivered++; switch (ip->ip_p) { case IPPROTO_TCP: tcp_input(m, hlen, (struct socket *)NULL); @@ -228,7 +216,7 @@ ip_input(m) icmp_input(m, hlen); break; default: - STAT(ipstat.ips_noproto++); + ipstat.ips_noproto++; m_free(m); } return; @@ -243,14 +231,16 @@ ip_input(m) * reassembly of this datagram already exists, then it * is given as fp; otherwise have to make a chain. */ -static struct ip * -ip_reass(register struct ipasfrag *ip, register struct ipq *fp) +struct ip * +ip_reass(ip, fp) + register struct ipasfrag *ip; + register struct ipq *fp; { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; int hlen = ip->ip_hl << 2; int i, next; - + DEBUG_CALL("ip_reass"); DEBUG_ARG("ip = %lx", (long)ip); DEBUG_ARG("fp = %lx", (long)fp); @@ -281,7 +271,7 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) q = (struct ipasfrag *)fp; goto insert; } - + /* * Find a segment which begins after this one does. */ @@ -375,7 +365,7 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) ip = (struct ipasfrag *)(m->m_ext + delta); } - /* DEBUG_ARG("ip = %lx", (long)ip); + /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ ip->ip_len = next; @@ -391,7 +381,7 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) return ((struct ip *)ip); dropfrag: - STAT(ipstat.ips_fragdropped++); + ipstat.ips_fragdropped++; m_freem(m); return (0); } @@ -400,8 +390,9 @@ ip_reass(register struct ipasfrag *ip, register struct ipq *fp) * Free a fragment reassembly header and all * associated datagrams. */ -static void -ip_freef(struct ipq *fp) +void +ip_freef(fp) + struct ipq *fp; { register struct ipasfrag *q, *p; @@ -419,8 +410,9 @@ ip_freef(struct ipq *fp) * Put an ip fragment on a reassembly chain. * Like insque, but pointers in middle of structure. */ -static void -ip_enq(register struct ipasfrag *p, register struct ipasfrag *prev) +void +ip_enq(p, prev) + register struct ipasfrag *p, *prev; { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); @@ -433,8 +425,9 @@ ip_enq(register struct ipasfrag *p, register struct ipasfrag *prev) /* * To ip_enq as remque is to insque. */ -static void -ip_deq(register struct ipasfrag *p) +void +ip_deq(p) + register struct ipasfrag *p; { ((struct ipasfrag *)(p->ipf_prev))->ipf_next = p->ipf_next; ((struct ipasfrag *)(p->ipf_next))->ipf_prev = p->ipf_prev; @@ -449,9 +442,9 @@ void ip_slowtimo() { register struct ipq *fp; - + DEBUG_CALL("ip_slowtimo"); - + fp = (struct ipq *) ipq.next; if (fp == 0) return; @@ -460,7 +453,7 @@ ip_slowtimo() --fp->ipq_ttl; fp = (struct ipq *) fp->next; if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { - STAT(ipstat.ips_fragtimeout++); + ipstat.ips_fragtimeout++; ip_freef((struct ipq *) fp->prev); } } @@ -667,7 +660,7 @@ typedef u_int32_t n_time; /* Not yet */ icmp_error(m, type, code, 0, 0); - STAT(ipstat.ips_badoptions++); + ipstat.ips_badoptions++; return (1); } @@ -695,6 +688,6 @@ ip_stripoptions(m, mopt) i = m->m_len - (sizeof (struct ip) + olen); memcpy(opts, opts + olen, (unsigned)i); m->m_len -= olen; - + ip->ip_hl = sizeof(struct ip) >> 2; } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c index a8a6067bd..fb9a94204 100644 --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -46,10 +42,6 @@ u_int16_t ip_id; -/* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ -#define IF_THRESH 10 - /* * IP output. The packet in mbuf chain m contains a skeletal IP * header (with len, off, ttl, proto, tos, src, dst). @@ -63,13 +55,14 @@ ip_output(so, m0) { register struct ip *ip; register struct mbuf *m = m0; - register int hlen = sizeof(struct ip ); - int len, off, error = 0; + register u_int hlen = sizeof(struct ip); + u_int len, off; + int error = 0; DEBUG_CALL("ip_output"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m0 = %lx", (long)m0); - + /* We do no options */ /* if (opt) { * m = ip_insertoptions(m, opt, &len); @@ -84,23 +77,23 @@ ip_output(so, m0) ip->ip_off &= IP_DF; ip->ip_id = htons(ip_id++); ip->ip_hl = hlen >> 2; - STAT(ipstat.ips_localout++); + ipstat.ips_localout++; /* * Verify that we have any chance at all of being able to queue * the packet or packet fragments */ /* XXX Hmmm... */ -/* if (if_queued > IF_THRESH && towrite <= 0) { +/* if (if_queued > if_thresh && towrite <= 0) { * error = ENOBUFS; * goto bad; * } */ - + /* * If small enough for interface, can just send directly. */ - if ((u_int16_t)ip->ip_len <= IF_MTU) { + if ((u_int16_t)ip->ip_len <= if_mtu) { ip->ip_len = htons((u_int16_t)ip->ip_len); ip->ip_off = htons((u_int16_t)ip->ip_off); ip->ip_sum = 0; @@ -116,11 +109,11 @@ ip_output(so, m0) */ if (ip->ip_off & IP_DF) { error = -1; - STAT(ipstat.ips_cantfrag++); + ipstat.ips_cantfrag++; goto bad; } - - len = (IF_MTU - hlen) &~ 7; /* ip databytes per packet */ + + len = (if_mtu - hlen) &~ 7; /* ip databytes per packet */ if (len < 8) { error = -1; goto bad; @@ -136,18 +129,18 @@ ip_output(so, m0) */ m0 = m; mhlen = sizeof (struct ip); - for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { + for (off = hlen + len; off < ip->ip_len; off += len) { register struct ip *mhip; m = m_get(); if (m == 0) { error = -1; - STAT(ipstat.ips_odropped++); + ipstat.ips_odropped++; goto sendorfree; } - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; mhip = mtod(m, struct ip *); *mhip = *ip; - + /* No options */ /* if (hlen > sizeof (struct ip)) { * mhlen = ip_optcopy(ip, mhip) + sizeof (struct ip); @@ -160,28 +153,28 @@ ip_output(so, m0) mhip->ip_off |= IP_MF; if (off + len >= (u_int16_t)ip->ip_len) len = (u_int16_t)ip->ip_len - off; - else + else mhip->ip_off |= IP_MF; mhip->ip_len = htons((u_int16_t)(len + mhlen)); - + if (m_copy(m, m0, off, len) < 0) { error = -1; goto sendorfree; } - + mhip->ip_off = htons((u_int16_t)mhip->ip_off); mhip->ip_sum = 0; mhip->ip_sum = cksum(m, mhlen); *mnext = m; mnext = &m->m_nextpkt; - STAT(ipstat.ips_ofragments++); + ipstat.ips_ofragments++; } /* * Update first fragment by trimming what's been copied out * and updating header, then send each fragment (in order). */ m = m0; - m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); + m_adj(m, hlen + firstlen - ip->ip_len); ip->ip_len = htons((u_int16_t)m->m_len); ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); ip->ip_sum = 0; @@ -197,7 +190,7 @@ ip_output(so, m0) } if (error == 0) - STAT(ipstat.ips_fragmented++); + ipstat.ips_fragmented++; } done: diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h index 7e4cfa98a..8a1aa31e6 100644 --- a/BasiliskII/src/slirp/libslirp.h +++ b/BasiliskII/src/slirp/libslirp.h @@ -1,33 +1,39 @@ #ifndef _LIBSLIRP_H #define _LIBSLIRP_H +#ifdef _WIN32 +#include +int inet_aton(const char *cp, struct in_addr *ia); +#else +#include +#include +#endif + #ifdef __cplusplus extern "C" { #endif -void slirp_init(void); +int slirp_init(void); -void slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds); +int slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds); void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds); -void slirp_input(const uint8_t *pkt, int pkt_len); +void slirp_input(const uint8 *pkt, int pkt_len); /* you must provide the following functions: */ int slirp_can_output(void); -void slirp_output(const uint8_t *pkt, int pkt_len); +void slirp_output(const uint8 *pkt, int pkt_len); -int slirp_redir(int is_udp, int host_port, +int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port); extern const char *tftp_prefix; extern char slirp_hostname[33]; -void slirp_stats(void); - #ifdef __cplusplus } #endif diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h index c01addac4..181b6ae88 100644 --- a/BasiliskII/src/slirp/main.h +++ b/BasiliskII/src/slirp/main.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -42,6 +42,7 @@ extern char *username; extern char *socket_path; extern int towrite_max; extern int ppp_exit; +extern int so_options; extern int tcp_keepintvl; extern uint8_t client_ethaddr[6]; diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c index 5d1255428..5a16fab8b 100644 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -15,49 +15,54 @@ * the flags */ +#include #include struct mbuf *mbutl; char *mclrefcnt; int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; -#define MBUF_THRESH 30 +int mbuf_thresh = 30; int mbuf_max = 0; +size_t msize; -/* - * Find a nice value for msize - * XXX if_maxlinkhdr already in mtu - */ -#define MSIZE (IF_MTU + IF_MAXLINKHDR + sizeof(struct m_hdr ) + 6) - -void -m_init() +void m_init() { m_freelist.m_next = m_freelist.m_prev = &m_freelist; m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; + msize_init(); +} + +void msize_init() +{ + /* + * Find a nice value for msize + * XXX if_maxlinkhdr already in mtu + */ + msize = (if_mtu>if_mru?if_mtu:if_mru) + + if_maxlinkhdr + sizeof(struct m_hdr ) + 6; } /* * Get an mbuf from the free list, if there are none * malloc one - * + * * Because fragmentation can occur if we alloc new mbufs and * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, * which tells m_free to actually free() it */ -struct mbuf * -m_get() +struct mbuf *m_get() { register struct mbuf *m; int flags = 0; - + DEBUG_CALL("m_get"); - + if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(MSIZE); + m = (struct mbuf *)malloc(msize); if (m == NULL) goto end_error; mbuf_alloced++; - if (mbuf_alloced > MBUF_THRESH) + if (mbuf_alloced > mbuf_thresh) flags = M_DOFREE; if (mbuf_alloced > mbuf_max) mbuf_max = mbuf_alloced; @@ -65,13 +70,13 @@ m_get() m = m_freelist.m_next; remque(m); } - + /* Insert it in the used list */ insque(m,&m_usedlist); m->m_flags = (flags | M_USEDLIST); - + /* Initialise it */ - m->m_size = MSIZE - sizeof(struct m_hdr); + m->m_size = msize - sizeof(struct m_hdr); m->m_data = m->m_dat; m->m_len = 0; m->m_nextpkt = 0; @@ -81,19 +86,17 @@ m_get() return m; } -void -m_free(m) - struct mbuf *m; +void m_free(struct mbuf *m) { - + DEBUG_CALL("m_free"); DEBUG_ARG("m = %lx", (long )m); - + if(m) { /* Remove from m_usedlist */ if (m->m_flags & M_USEDLIST) remque(m); - + /* If it's M_EXT, free() it */ if (m->m_flags & M_EXT) free(m->m_ext); @@ -116,16 +119,14 @@ m_free(m) * the other.. if result is too big for one mbuf, malloc() * an M_EXT data segment */ -void -m_cat(m, n) - register struct mbuf *m, *n; +void m_cat(register struct mbuf *m, register struct mbuf *n) { /* * If there's no room, realloc */ if (M_FREEROOM(m) < n->m_len) m_inc(m,m->m_size+MINCSIZE); - + memcpy(m->m_data+m->m_len, n->m_data, n->m_len); m->m_len += n->m_len; @@ -134,23 +135,20 @@ m_cat(m, n) /* make m size bytes large */ -void -m_inc(m, size) - struct mbuf *m; - int size; +void m_inc(struct mbuf *m, u_int size) { - int datasize; + int datasize; /* some compiles throw up on gotos. This one we can fake. */ if(m->m_size>size) return; if (m->m_flags & M_EXT) { - datasize = m->m_data - m->m_ext; + datasize = m->m_data - m->m_ext; m->m_ext = (char *)realloc(m->m_ext,size); /* if (m->m_ext == NULL) * return (struct mbuf *)NULL; - */ - m->m_data = m->m_ext + datasize; + */ + m->m_data = m->m_ext + datasize; } else { char *dat; datasize = m->m_data - m->m_dat; @@ -159,22 +157,19 @@ m_inc(m, size) * return (struct mbuf *)NULL; */ memcpy(dat, m->m_dat, m->m_size); - + m->m_ext = dat; m->m_data = m->m_ext + datasize; m->m_flags |= M_EXT; } - + m->m_size = size; } -void -m_adj(m, len) - struct mbuf *m; - int len; +void m_adj(struct mbuf *m, int len) { if (m == NULL) return; @@ -194,9 +189,7 @@ m_adj(m, len) * Copy len bytes from m, starting off bytes into n */ int -m_copy(n, m, off, len) - struct mbuf *n, *m; - int off, len; +m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) { if (len > M_FREEROOM(n)) return -1; @@ -212,12 +205,10 @@ m_copy(n, m, off, len) * XXX This is a kludge, I should eliminate the need for it * Fortunately, it's not used often */ -struct mbuf * -dtom(dat) - void *dat; +struct mbuf *dtom(void *dat) { struct mbuf *m; - + DEBUG_CALL("dtom"); DEBUG_ARG("dat = %lx", (long )dat); @@ -231,9 +222,9 @@ dtom(dat) return m; } } - + DEBUG_ERROR((dfd, "dtom failed")); - + return (struct mbuf *)0; } diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h index f9f213255..11b252bb6 100644 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -67,14 +63,14 @@ struct m_hdr { struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ int mh_flags; /* Misc flags */ - int mh_size; /* Size of data */ + size_t mh_size; /* Size of data */ struct socket *mh_so; - + caddr_t mh_data; /* Location of data */ - int mh_len; /* Amount of data in this mbuf */ + size_t mh_len; /* Amount of data in this mbuf */ }; -/* +/* * How much room is in the mbuf, from m_data to the end of the mbuf */ #define M_ROOM(m) ((m->m_flags & M_EXT)? \ @@ -126,7 +122,7 @@ struct mbuf { struct mbstat { int mbs_alloced; /* Number of mbufs allocated */ - + }; extern struct mbstat mbstat; @@ -134,13 +130,14 @@ extern int mbuf_alloced; extern struct mbuf m_freelist, m_usedlist; extern int mbuf_max; -void m_init _P((void)); -struct mbuf * m_get _P((void)); -void m_free _P((struct mbuf *)); -void m_cat _P((register struct mbuf *, register struct mbuf *)); -void m_inc _P((struct mbuf *, int)); -void m_adj _P((struct mbuf *, int)); -int m_copy _P((struct mbuf *, struct mbuf *, int, int)); -struct mbuf * dtom _P((void *)); +void m_init(void); +void msize_init(void); +struct mbuf * m_get(void); +void m_free(struct mbuf *); +void m_cat(register struct mbuf *, register struct mbuf *); +void m_inc(struct mbuf *, u_int); +void m_adj(struct mbuf *, int); +int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); +struct mbuf * dtom(void *); #endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c index 14808fe21..b80caf662 100644 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -1,24 +1,23 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * + * * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H +#include #include -u_int curtime, time_fasttimo, last_slowtimo; +u_int curtime, time_fasttimo, last_slowtimo, detach_time; +u_int detach_wait = 600000; /* 10 minutes */ #if 0 int x_port = -1; int x_display = 0; int x_screen = 0; -int -show_x(buff, inso) - char *buff; - struct socket *inso; +int show_x(char *buff, struct socket *inso) { if (x_port < 0) { lprint("X Redir: X not being redirected.\r\n"); @@ -30,7 +29,7 @@ show_x(buff, inso) if (x_display) lprint("X Redir: Redirecting to display %d\r\n", x_display); } - + return CFG_OK; } @@ -38,15 +37,10 @@ show_x(buff, inso) /* * XXX Allow more than one X redirection? */ -void -redir_x(inaddr, start_port, display, screen) - u_int32_t inaddr; - int start_port; - int display; - int screen; +void redir_x(u_int32_t inaddr, int start_port, int display, int screen) { int i; - + if (x_port >= 0) { lprint("X Redir: X already being redirected.\r\n"); show_x(0, 0); @@ -67,34 +61,33 @@ redir_x(inaddr, start_port, display, screen) #endif #ifndef HAVE_INET_ATON -int -inet_aton(cp, ia) - const char *cp; - struct in_addr *ia; +int inet_aton(const char *cp, struct in_addr *ia) { - u_int32_t addr = inet_addr(cp); - if (addr == 0xffffffff) - return 0; - ia->s_addr = addr; - return 1; + return inet_pton(AF_INET, cp, &ia->s_addr); } #endif /* * Get our IP address and put it in our_addr */ -void -getouraddr() +void getouraddr() { char buff[256]; - struct hostent *he = NULL; - - if (gethostname(buff,256) == 0) - he = gethostbyname(buff); - if (he) - our_addr = *(struct in_addr *)he->h_addr; - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; + + if (gethostname(buff, sizeof(buff)) == 0) + { + struct addrinfo hints = { 0 }; + hints.ai_flags = AI_NUMERICHOST; + hints.ai_family = AF_INET; + struct addrinfo* ai; + if (getaddrinfo(buff, NULL, &hints, &ai) == 0) + { + our_addr = *(struct in_addr *)ai->ai_addr->sa_data; + freeaddrinfo(ai); + } + } + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; } #if SIZEOF_CHAR_P == 8 @@ -104,10 +97,7 @@ struct quehead_32 { u_int32_t qh_rlink; }; -inline void -insque_32(a, b) - void *a; - void *b; +inline void insque_32(void *a, void *b) { register struct quehead_32 *element = (struct quehead_32 *) a; register struct quehead_32 *head = (struct quehead_32 *) b; @@ -118,9 +108,7 @@ insque_32(a, b) = (u_int32_t)element; } -inline void -remque_32(a) - void *a; +inline void remque_32(void *a) { register struct quehead_32 *element = (struct quehead_32 *) a; ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -135,9 +123,7 @@ struct quehead { struct quehead *qh_rlink; }; -inline void -insque(a, b) - void *a, *b; +void insque(void *a, void *b) { register struct quehead *element = (struct quehead *) a; register struct quehead *head = (struct quehead *) b; @@ -148,9 +134,7 @@ insque(a, b) = (struct quehead *)element; } -inline void -remque(a) - void *a; +void remque(void *a) { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -162,22 +146,16 @@ remque(a) /* #endif */ -int -add_exec(ex_ptr, do_pty, exec, addr, port) - struct ex_list **ex_ptr; - int do_pty; - char *exec; - int addr; - int port; +int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) { struct ex_list *tmp_ptr; - + /* First, check if the port is "bound" */ for (tmp_ptr = *ex_ptr; tmp_ptr; tmp_ptr = tmp_ptr->ex_next) { if (port == tmp_ptr->ex_fport && addr == tmp_ptr->ex_addr) return -1; } - + tmp_ptr = *ex_ptr; *ex_ptr = (struct ex_list *)malloc(sizeof(struct ex_list)); (*ex_ptr)->ex_fport = port; @@ -197,9 +175,7 @@ add_exec(ex_ptr, do_pty, exec, addr, port) extern int sys_nerr; extern char *sys_errlist[]; -char * -strerror(error) - int error; +char *strerror(int error) { if (error < sys_nerr) return sys_errlist[error]; @@ -212,8 +188,7 @@ strerror(error) #ifdef _WIN32 -int -fork_exec(struct socket *so, const char *ex, int do_pty) +int fork_exec(struct socket *so, char *ex, int do_pty) { /* not implemented */ return 0; @@ -221,16 +196,13 @@ fork_exec(struct socket *so, const char *ex, int do_pty) #else -#ifndef CONFIG_QEMU -int -slirp_openpty(amaster, aslave) - int *amaster, *aslave; +int slirp_openpty(int *amaster, int *aslave) { register int master, slave; #ifdef HAVE_GRANTPT char *ptr; - + if ((master = open("/dev/ptmx", O_RDWR)) < 0 || grantpt(master) < 0 || unlockpt(master) < 0 || @@ -238,7 +210,7 @@ slirp_openpty(amaster, aslave) close(master); return -1; } - + if ((slave = open(ptr, O_RDWR)) < 0 || ioctl(slave, I_PUSH, "ptem") < 0 || ioctl(slave, I_PUSH, "ldterm") < 0 || @@ -247,16 +219,16 @@ slirp_openpty(amaster, aslave) close(slave); return -1; } - + *amaster = master; *aslave = slave; return 0; - + #else - + static char line[] = "/dev/ptyXX"; register const char *cp1, *cp2; - + for (cp1 = "pqrsPQRS"; *cp1; cp1++) { line[8] = *cp1; for (cp2 = "0123456789abcdefghijklmnopqrstuv"; *cp2; cp2++) { @@ -286,7 +258,6 @@ slirp_openpty(amaster, aslave) return (-1); #endif } -#endif /* * XXX This is ugly @@ -294,57 +265,53 @@ slirp_openpty(amaster, aslave) * process, which connects to this socket, after which we * exec the wanted program. If something (strange) happens, * the accept() call could block us forever. - * + * * do_pty = 0 Fork/exec inetd style * do_pty = 1 Fork/exec using slirp.telnetd * do_ptr = 2 Fork/exec using pty */ -int -fork_exec(struct socket *so, const char *ex, int do_pty) +int fork_exec(struct socket *so, char *ex, int do_pty) { int s; struct sockaddr_in addr; - int addrlen = sizeof(addr); + socklen_t addrlen = sizeof(addr); int opt; - int master = -1; + int master; char *argv[256]; #if 0 char buff[256]; #endif /* don't want to clobber the original */ char *bptr; - const char *curarg; + char *curarg; int c, i, ret; - + DEBUG_CALL("fork_exec"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("ex = %lx", (long)ex); DEBUG_ARG("do_pty = %lx", (long)do_pty); - + if (do_pty == 2) { -#if 0 if (slirp_openpty(&master, &s) == -1) { lprint("Error: openpty failed: %s\n", strerror(errno)); return 0; } -#else - return 0; -#endif } else { + memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; - + if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0 || bind(s, (struct sockaddr *)&addr, addrlen) < 0 || listen(s, 1) < 0) { lprint("Error: inet socket: %s\n", strerror(errno)); closesocket(s); - + return 0; } } - + switch(fork()) { case -1: lprint("Error: fork failed: %s\n", strerror(errno)); @@ -352,7 +319,7 @@ fork_exec(struct socket *so, const char *ex, int do_pty) if (do_pty == 2) close(master); return 0; - + case 0: /* Set the DISPLAY */ if (do_pty == 2) { @@ -374,7 +341,7 @@ fork_exec(struct socket *so, const char *ex, int do_pty) ret = connect(s, (struct sockaddr *)&addr, addrlen); } while (ret < 0 && errno == EINTR); } - + #if 0 if (x_port >= 0) { #ifdef HAVE_SETENV @@ -385,13 +352,13 @@ fork_exec(struct socket *so, const char *ex, int do_pty) putenv(buff); #endif } -#endif +#endif dup2(s, 0); dup2(s, 1); dup2(s, 2); - for (s = getdtablesize() - 1; s >= 3; s--) + for (s = 3; s <= 255; s++) close(s); - + i = 0; bptr = strdup(ex); /* No need to free() this */ if (do_pty == 1) { @@ -409,21 +376,21 @@ fork_exec(struct socket *so, const char *ex, int do_pty) *bptr++ = (char)0; argv[i++] = strdup(curarg); } while (c); - + argv[i] = 0; execvp(argv[0], argv); - + /* Ooops, failed, let's tell the user why */ { char buff[256]; - - sprintf(buff, "Error: execvp of %s failed: %s\n", + + sprintf(buff, "Error: execvp of %s failed: %s\n", argv[0], strerror(errno)); write(2, buff, strlen(buff)+1); } close(0); close(1); close(2); /* XXX */ exit(1); - + default: if (do_pty == 2) { close(s); @@ -446,36 +413,32 @@ fork_exec(struct socket *so, const char *ex, int do_pty) setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); } fd_nonblock(so->s); - + /* Append the telnet options now */ if (so->so_m != 0 && do_pty == 1) { sbappend(so, so->so_m); so->so_m = 0; } - + return 1; } } #endif #ifndef HAVE_STRDUP -char * -strdup(str) - const char *str; +char *strdup(const char *str) { char *bptr; - + bptr = (char *)malloc(strlen(str)+1); strcpy(bptr, str); - + return bptr; } #endif #if 0 -void -snooze_hup(num) - int num; +void snooze_hup(int num) { int s, ret; #ifndef NO_UNIX_SOCKETS @@ -483,7 +446,7 @@ snooze_hup(num) #endif struct sockaddr_in sock_in; char buff[256]; - + ret = -1; if (slirp_socket_passwd) { s = socket(AF_INET, SOCK_STREAM, 0); @@ -513,51 +476,48 @@ snooze_hup(num) #endif slirp_exit(0); } - - -void -snooze() + + +void snooze() { sigset_t s; int i; - + /* Don't need our data anymore */ /* XXX This makes SunOS barf */ /* brk(0); */ - + /* Close all fd's */ for (i = 255; i >= 0; i--) close(i); - + signal(SIGQUIT, slirp_exit); signal(SIGHUP, snooze_hup); sigemptyset(&s); - + /* Wait for any signal */ sigsuspend(&s); - + /* Just in case ... */ exit(255); } -void -relay(s) - int s; +void relay(int s) { char buf[8192]; int n; fd_set readfds; struct ttys *ttyp; - + /* Don't need our data anymore */ /* XXX This makes SunOS barf */ /* brk(0); */ - + signal(SIGQUIT, slirp_exit); signal(SIGHUP, slirp_exit); signal(SIGINT, slirp_exit); signal(SIGTERM, slirp_exit); - + /* Fudge to get term_raw and term_restore to work */ if (NULL == (ttyp = tty_attach (0, slirp_tty))) { lprint ("Error: tty_attach failed in misc.c:relay()\r\n"); @@ -566,18 +526,18 @@ relay(s) ttyp->fd = 0; ttyp->flags |= TTY_CTTY; term_raw(ttyp); - + while (1) { FD_ZERO(&readfds); - + FD_SET(0, &readfds); FD_SET(s, &readfds); - + n = select(s+1, &readfds, (fd_set *)0, (fd_set *)0, (struct timeval *)0); - + if (n <= 0) slirp_exit(0); - + if (FD_ISSET(0, &readfds)) { n = read(0, buf, 8192); if (n <= 0) @@ -586,7 +546,7 @@ relay(s) if (n <= 0) slirp_exit(0); } - + if (FD_ISSET(s, &readfds)) { n = read(s, buf, 8192); if (n <= 0) @@ -596,43 +556,20 @@ relay(s) slirp_exit(0); } } - + /* Just in case.... */ exit(1); } #endif -#ifdef CONFIG_QEMU -extern void term_vprintf(const char *fmt, va_list ap); - -void lprint(const char *format, ...) -{ - va_list args; - - va_start(args, format); - term_vprintf(format, args); - va_end(args); -} -#else -int (*lprint_print) _P((void *, const char *, va_list)); +int (*lprint_print)(void *, const char *, va_list); char *lprint_ptr, *lprint_ptr2, **lprint_arg; -void -#ifdef __STDC__ -lprint(const char *format, ...) -#else -lprint(va_alist) va_dcl -#endif +void lprint(const char *format, ...) { va_list args; - -#ifdef __STDC__ - va_start(args, format); -#else - char *format; - va_start(args); - format = va_arg(args, char *); -#endif + + va_start(args, format); #if 0 /* If we're printing to an sbuf, make sure there's enough room */ /* XXX +100? */ @@ -642,33 +579,33 @@ lprint(va_alist) va_dcl int deltaw = lprint_sb->sb_wptr - lprint_sb->sb_data; int deltar = lprint_sb->sb_rptr - lprint_sb->sb_data; int deltap = lprint_ptr - lprint_sb->sb_data; - + lprint_sb->sb_data = (char *)realloc(lprint_sb->sb_data, lprint_sb->sb_datalen + TCP_SNDSPACE); - + /* Adjust all values */ lprint_sb->sb_wptr = lprint_sb->sb_data + deltaw; lprint_sb->sb_rptr = lprint_sb->sb_data + deltar; lprint_ptr = lprint_sb->sb_data + deltap; - + lprint_sb->sb_datalen += TCP_SNDSPACE; } } -#endif +#endif if (lprint_print) lprint_ptr += (*lprint_print)(*lprint_arg, format, args); - + /* Check if they want output to be logged to file as well */ if (lfd) { - /* + /* * Remove \r's * otherwise you'll get ^M all over the file */ int len = strlen(format); char *bptr1, *bptr2; - + bptr1 = bptr2 = strdup(format); - + while (len--) { if (*bptr1 == '\r') memcpy(bptr1, bptr1+1, len+1); @@ -681,9 +618,7 @@ lprint(va_alist) va_dcl va_end(args); } -void -add_emu(buff) - char *buff; +void add_emu(char *buff) { u_int lport, fport; u_int8_t tos = 0, emu = 0; @@ -691,12 +626,12 @@ add_emu(buff) char *buff3 = buff4; struct emu_t *emup; struct socket *so; - + if (sscanf(buff, "%256s %256s", buff2, buff1) != 2) { lprint("Error: Bad arguments\r\n"); return; } - + if (sscanf(buff1, "%d:%d", &lport, &fport) != 2) { lport = 0; if (sscanf(buff1, "%d", &fport) != 1) { @@ -704,7 +639,7 @@ add_emu(buff) return; } } - + if (sscanf(buff2, "%128[^:]:%128s", buff1, buff3) != 2) { buff3 = 0; if (sscanf(buff2, "%256s", buff1) != 1) { @@ -712,7 +647,7 @@ add_emu(buff) return; } } - + if (buff3) { if (strcmp(buff3, "lowdelay") == 0) tos = IPTOS_LOWDELAY; @@ -723,7 +658,7 @@ add_emu(buff) return; } } - + if (strcmp(buff1, "ftp") == 0) emu = EMU_FTP; else if (strcmp(buff1, "irc") == 0) @@ -734,7 +669,7 @@ add_emu(buff) lprint("Error: Unknown service\r\n"); return; } - + /* First, check that it isn't already emulated */ for (emup = tcpemu; emup; emup = emup->next) { if (emup->lport == lport && emup->fport == fport) { @@ -742,7 +677,7 @@ add_emu(buff) return; } } - + /* link it */ emup = (struct emu_t *)malloc(sizeof (struct emu_t)); emup->lport = (u_int16_t)lport; @@ -751,7 +686,7 @@ add_emu(buff) emup->emu = emu; emup->next = tcpemu; tcpemu = emup; - + /* And finally, mark all current sessions, if any, as being emulated */ for (so = tcb.so_next; so != &tcb; so = so->so_next) { if ((lport && lport == ntohs(so->so_lport)) || @@ -762,10 +697,9 @@ add_emu(buff) so->so_iptos = tos; } } - + lprint("Adding emulation for %s to port %d/%d\r\n", buff1, emup->lport, emup->fport); } -#endif #ifdef BAD_SPRINTF @@ -776,51 +710,33 @@ add_emu(buff) * Some BSD-derived systems have a sprintf which returns char * */ -int -vsprintf_len(string, format, args) - char *string; - const char *format; - va_list args; +int vsprintf_len(char *string, const char *format, va_list args) { vsprintf(string, format, args); return strlen(string); } -int -#ifdef __STDC__ -sprintf_len(char *string, const char *format, ...) -#else -sprintf_len(va_alist) va_dcl -#endif +int sprintf_len(char *string, const char *format, ...) { va_list args; -#ifdef __STDC__ va_start(args, format); -#else - char *string; - char *format; - va_start(args); - string = va_arg(args, char *); - format = va_arg(args, char *); -#endif vsprintf(string, format, args); + va_end(args); return strlen(string); } #endif -void -u_sleep(usec) - int usec; +void u_sleep(int usec) { struct timeval t; fd_set fdset; - + FD_ZERO(&fdset); - + t.tv_sec = 0; t.tv_usec = usec * 1000; - + select(0, &fdset, &fdset, &fdset, &t); } @@ -828,34 +744,30 @@ u_sleep(usec) * Set fd blocking and non-blocking */ -void -fd_nonblock(fd) - int fd; +void fd_nonblock(int fd) { -#ifdef FIONBIO - int opt = 1; - +#if defined USE_FIONBIO && defined FIONBIO + ioctlsockopt_t opt = 1; + ioctlsocket(fd, FIONBIO, &opt); #else int opt; - + opt = fcntl(fd, F_GETFL, 0); opt |= O_NONBLOCK; fcntl(fd, F_SETFL, opt); #endif } -void -fd_block(fd) - int fd; +void fd_block(int fd) { -#ifdef FIONBIO - int opt = 0; - +#if defined USE_FIONBIO && defined FIONBIO + ioctlsockopt_t opt = 0; + ioctlsocket(fd, FIONBIO, &opt); #else int opt; - + opt = fcntl(fd, F_GETFL, 0); opt &= ~O_NONBLOCK; fcntl(fd, F_SETFL, opt); @@ -867,22 +779,17 @@ fd_block(fd) /* * invoke RSH */ -int -rsh_exec(so,ns, user, host, args) - struct socket *so; - struct socket *ns; - char *user; - char *host; - char *args; +int rsh_exec(struct socket *so, struct socket *ns, + char *user, char *host, char *args) { int fd[2]; int fd0[2]; int s; char buff[256]; - + DEBUG_CALL("rsh_exec"); DEBUG_ARG("so = %lx", (long)so); - + if (pipe(fd)<0) { lprint("Error: pipe failed: %s\n", strerror(errno)); return 0; @@ -903,7 +810,7 @@ rsh_exec(so,ns, user, host, args) return 0; } #endif - + switch(fork()) { case -1: lprint("Error: fork failed: %s\n", strerror(errno)); @@ -912,11 +819,11 @@ rsh_exec(so,ns, user, host, args) close(fd0[0]); close(fd0[1]); return 0; - + case 0: close(fd[0]); close(fd0[0]); - + /* Set the DISPLAY */ if (x_port >= 0) { #ifdef HAVE_SETENV @@ -927,29 +834,29 @@ rsh_exec(so,ns, user, host, args) putenv(buff); #endif } - + dup2(fd0[1], 0); dup2(fd0[1], 1); dup2(fd[1], 2); for (s = 3; s <= 255; s++) close(s); - + execlp("rsh","rsh","-l", user, host, args, NULL); - + /* Ooops, failed, let's tell the user why */ - - sprintf(buff, "Error: execlp of %s failed: %s\n", + + sprintf(buff, "Error: execlp of %s failed: %s\n", "rsh", strerror(errno)); write(2, buff, strlen(buff)+1); close(0); close(1); close(2); /* XXX */ exit(1); - + default: close(fd[1]); close(fd0[1]); ns->s=fd[0]; so->s=fd0[0]; - + return 1; } } diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h index e405e38dc..381f5f3e7 100644 --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -12,22 +12,22 @@ struct ex_list { int ex_pty; /* Do we want a pty? */ int ex_addr; /* The last byte of the address */ int ex_fport; /* Port to telnet to */ - const char *ex_exec; /* Command line of what to exec */ + char *ex_exec; /* Command line of what to exec */ struct ex_list *ex_next; }; extern struct ex_list *exec_list; -extern u_int curtime, time_fasttimo, last_slowtimo; +extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; -extern int (*lprint_print) _P((void *, const char *, va_list)); +extern int (*lprint_print)(void *, const char *, va_list); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; extern struct sbuf *lprint_sb; #ifndef HAVE_STRDUP -char *strdup _P((const char *)); +char *strdup(const char *); #endif -void do_wait _P((int)); +void do_wait(int); #define EMU_NONE 0x0 @@ -63,27 +63,25 @@ struct emu_t { struct emu_t *next; }; -#ifndef CONFIG_QEMU extern struct emu_t *tcpemu; -#endif extern int x_port, x_server, x_display; -int show_x _P((char *, struct socket *)); -void redir_x _P((u_int32_t, int, int, int)); -void getouraddr _P((void)); -inline void slirp_insque _P((void *, void *)); -inline void slirp_remque _P((void *)); -int add_exec _P((struct ex_list **, int, char *, int, int)); -int slirp_openpty _P((int *, int *)); -int fork_exec(struct socket *so, const char *ex, int do_pty); -void snooze_hup _P((int)); -void snooze _P((void)); -void relay _P((int)); -void add_emu _P((char *)); -void u_sleep _P((int)); -void fd_nonblock _P((int)); -void fd_block _P((int)); -int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); +int show_x(char *, struct socket *); +void redir_x(u_int32_t, int, int, int); +void getouraddr(void); +void slirp_insque(void *, void *); +void slirp_remque(void *); +int add_exec(struct ex_list **, int, char *, int, int); +int slirp_openpty(int *, int *); +int fork_exec(struct socket *, char *, int); +void snooze_hup(int); +void snooze(void); +void relay(int); +void add_emu(char *); +void u_sleep(int); +void fd_nonblock(int); +void fd_block(int); +int rsh_exec(struct socket *, struct socket *, char *, char *, char *); #endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 02c5fce0a..278e36870 100644 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -1,37 +1,31 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ +#include #include -static void sbappendsb(struct sbuf *sb, struct mbuf *m); - /* Done as a macro in socket.h */ /* int - * sbspace(struct sockbuff *sb) + * sbspace(struct sockbuff *sb) * { * return SB_DATALEN - sb->sb_cc; * } */ -void -sbfree(sb) - struct sbuf *sb; +void sbfree(struct sbuf *sb) { free(sb->sb_data); } -void -sbdrop(sb, num) - struct sbuf *sb; - int num; +void sbdrop(struct sbuf *sb, u_int num) { - /* + /* * We can only drop how much we have - * This should never succeed + * This should never succeed */ if(num > sb->sb_cc) num = sb->sb_cc; @@ -39,13 +33,10 @@ sbdrop(sb, num) sb->sb_rptr += num; if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen) sb->sb_rptr -= sb->sb_datalen; - + } -void -sbreserve(sb, size) - struct sbuf *sb; - int size; +void sbreserve(struct sbuf *sb, size_t size) { if (sb->sb_data) { /* Already alloced, realloc if necessary */ @@ -73,24 +64,21 @@ sbreserve(sb, size) * this prevents an unnecessary copy of the data * (the socket is non-blocking, so we won't hang) */ -void -sbappend(so, m) - struct socket *so; - struct mbuf *m; +void sbappend(struct socket *so, struct mbuf *m) { int ret = 0; - + DEBUG_CALL("sbappend"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %d", m->m_len); - + DEBUG_ARG("m->m_len = %zu", m->m_len); + /* Shouldn't happen, but... e.g. foreign host closes connection */ if (m->m_len <= 0) { m_free(m); return; } - + /* * If there is urgent data, call sosendoob * if not all was sent, sowrite will take care of the rest @@ -102,16 +90,16 @@ sbappend(so, m) sosendoob(so); return; } - + /* * We only write if there's nothing in the buffer, * ottherwise it'll arrive out of order, and hence corrupt */ if (!so->so_rcv.sb_cc) ret = send(so->s, m->m_data, m->m_len, 0); - + if (ret <= 0) { - /* + /* * Nothing was written * It's possible that the socket has closed, but * we don't need to check because if it has closed, @@ -135,11 +123,10 @@ sbappend(so, m) * Copy the data from m into sb * The caller is responsible to make sure there's enough room */ -static void -sbappendsb(struct sbuf *sb, struct mbuf *m) +void sbappendsb(struct sbuf *sb, struct mbuf *m) { int len, n, nn; - + len = m->m_len; if (sb->sb_wptr < sb->sb_rptr) { @@ -172,15 +159,10 @@ sbappendsb(struct sbuf *sb, struct mbuf *m) * Don't update the sbuf rptr, this will be * done in sbdrop when the data is acked */ -void -sbcopy(sb, off, len, to) - struct sbuf *sb; - int off; - int len; - char *to; +void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) { char *from; - + from = sb->sb_rptr + off; if (from >= sb->sb_data + sb->sb_datalen) from -= sb->sb_datalen; @@ -198,4 +180,4 @@ sbcopy(sb, off, len, to) memcpy(to+off,sb->sb_data,len); } } - + diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h index a4f103623..04f7981c7 100644 --- a/BasiliskII/src/slirp/sbuf.h +++ b/BasiliskII/src/slirp/sbuf.h @@ -1,13 +1,15 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #ifndef _SBUF_H_ #define _SBUF_H_ +#include + #define sbflush(sb) sbdrop((sb),(sb)->sb_cc) #define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) @@ -21,10 +23,11 @@ struct sbuf { char *sb_data; /* Actual data */ }; -void sbfree _P((struct sbuf *)); -void sbdrop _P((struct sbuf *, int)); -void sbreserve _P((struct sbuf *, int)); -void sbappend _P((struct socket *, struct mbuf *)); -void sbcopy _P((struct sbuf *, int, int, char *)); +void sbfree(struct sbuf *); +void sbdrop(struct sbuf *, u_int); +void sbreserve(struct sbuf *, size_t); +void sbappend(struct socket *, struct mbuf *); +void sbappendsb(struct sbuf *, struct mbuf *); +void sbcopy(struct sbuf *, u_int, u_int, char *); #endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 303f4825c..dc2fdc658 100644 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -12,7 +12,7 @@ struct in_addr special_addr; /* virtual address alias for host */ struct in_addr alias_addr; -static const uint8_t special_ethaddr[6] = { +const uint8_t special_ethaddr[6] = { 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 }; @@ -38,10 +38,10 @@ static int get_dns_addr(struct in_addr *pdns_addr) DWORD ret; IP_ADDR_STRING *pIPAddr; struct in_addr tmp_addr; - + FixedInfo = (FIXED_INFO *)GlobalAlloc(GPTR, sizeof(FIXED_INFO)); BufLen = sizeof(FIXED_INFO); - + if (ERROR_BUFFER_OVERFLOW == GetNetworkParams(FixedInfo, &BufLen)) { if (FixedInfo) { GlobalFree(FixedInfo); @@ -49,7 +49,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) } FixedInfo = GlobalAlloc(GPTR, BufLen); } - + if ((ret = GetNetworkParams(FixedInfo, &BufLen)) != ERROR_SUCCESS) { printf("GetNetworkParams failed. ret = %08x\n", (u_int)ret ); if (FixedInfo) { @@ -58,14 +58,14 @@ static int get_dns_addr(struct in_addr *pdns_addr) } return -1; } - + pIPAddr = &(FixedInfo->DnsServerList); inet_aton(pIPAddr->IpAddress.String, &tmp_addr); *pdns_addr = tmp_addr; #if 0 printf( "DNS Servers:\n" ); printf( "DNS Addr:%s\n", pIPAddr->IpAddress.String ); - + pIPAddr = FixedInfo -> DnsServerList.Next; while ( pIPAddr ) { printf( "DNS Addr:%s\n", pIPAddr ->IpAddress.String ); @@ -84,18 +84,16 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256]; + char buff2[256+1]; FILE *f; int found = 0; struct in_addr tmp_addr; - + f = fopen("/etc/resolv.conf", "r"); if (!f) return -1; -#ifdef DEBUG lprint("IP address of your DNS(s): "); -#endif while (fgets(buff, 512, f) != NULL) { if (sscanf(buff, "nameserver%*[ \t]%256s", buff2) == 1) { if (!inet_aton(buff2, &tmp_addr)) @@ -105,20 +103,13 @@ static int get_dns_addr(struct in_addr *pdns_addr) /* If it's the first one, set it to dns_addr */ if (!found) *pdns_addr = tmp_addr; -#ifdef DEBUG else lprint(", "); -#endif if (++found > 3) { -#ifdef DEBUG lprint("(more)"); -#endif break; - } -#ifdef DEBUG - else + } else lprint("%s", inet_ntoa(tmp_addr)); -#endif } } fclose(f); @@ -130,16 +121,16 @@ static int get_dns_addr(struct in_addr *pdns_addr) #endif #ifdef _WIN32 -static void slirp_cleanup(void) +void slirp_cleanup(void) { WSACleanup(); } #endif -void slirp_init(void) +int slirp_init(void) { // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); - + #ifdef _WIN32 { WSADATA Data; @@ -159,14 +150,13 @@ void slirp_init(void) /* set default addresses */ inet_aton("127.0.0.1", &loopback_addr); - if (get_dns_addr(&dns_addr) < 0) { - dns_addr = loopback_addr; - fprintf (stderr, "Warning: No DNS servers found\n"); - } + if (get_dns_addr(&dns_addr) < 0) + return -1; inet_aton(CTL_SPECIAL, &special_addr); - alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); - getouraddr(); + alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); + getouraddr(); + return 0; } #define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) @@ -189,57 +179,56 @@ static void updtime(void) static void updtime(void) { gettimeofday(&tt, 0); - + curtime = (u_int)tt.tv_sec * (u_int)1000; curtime += (u_int)tt.tv_usec / (u_int)1000; - + if ((tt.tv_usec % 1000) >= 500) curtime++; } #endif -void slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds) +int slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds) { struct socket *so, *so_next; - struct timeval timeout; int nfds; - int tmp_time; + int timeout, tmp_time; /* fail safe */ global_readfds = NULL; global_writefds = NULL; global_xfds = NULL; - + nfds = *pnfds; /* * First, TCP sockets */ do_slowtimo = 0; if (link_up) { - /* + /* * *_slowtimo needs calling if there are IP fragments * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); - + for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; - + /* * See if we need a tcp_fasttimo */ if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ - + time_fasttimo = curtime; /* Flag when we want a fasttimo */ + /* * NOFDREF can include still connecting to local-host, * newly socreated() sockets etc. Don't want to select these. */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - + continue; + /* * Set for reading sockets which are accepting */ @@ -248,7 +237,7 @@ void slirp_select_fill(int *pnfds, UPD_NFDS(so->s); continue; } - + /* * Set for writing sockets which are connecting */ @@ -257,7 +246,7 @@ void slirp_select_fill(int *pnfds, UPD_NFDS(so->s); continue; } - + /* * Set for writing if we are connected, can send more, and * we have something to send @@ -266,7 +255,7 @@ void slirp_select_fill(int *pnfds, FD_SET(so->s, writefds); UPD_NFDS(so->s); } - + /* * Set for reading (and urgent data) if we are connected, can * receive more, and we have room for it XXX /2 ? @@ -277,13 +266,13 @@ void slirp_select_fill(int *pnfds, UPD_NFDS(so->s); } } - + /* * UDP sockets */ for (so = udb.so_next; so != &udb; so = so_next) { so_next = so->so_next; - + /* * See if it's timed out */ @@ -294,7 +283,7 @@ void slirp_select_fill(int *pnfds, } else do_slowtimo = 1; /* Let socket expire */ } - + /* * When UDP packets are received from over the * link, they're sendto()'d straight away, so @@ -311,51 +300,58 @@ void slirp_select_fill(int *pnfds, } } } - + /* * Setup timeout to use minimum CPU usage, especially when idle */ + timeout = -1; + /* - * First, see the timeout needed by *timo - */ - timeout.tv_sec = 0; - timeout.tv_usec = -1; - /* - * If a slowtimo is needed, set timeout to 500ms from the last + * If a slowtimo is needed, set timeout to 5ms from the last * slow timeout. If a fast timeout is needed, set timeout within - * 200ms of when it was requested. + * 2ms of when it was requested. */ +# define SLOW_TIMO 5 +# define FAST_TIMO 2 if (do_slowtimo) { - /* XXX + 10000 because some select()'s aren't that accurate */ - timeout.tv_usec = ((500 - (curtime - last_slowtimo)) * 1000) + 10000; - if (timeout.tv_usec < 0) - timeout.tv_usec = 0; - else if (timeout.tv_usec > 510000) - timeout.tv_usec = 510000; - + timeout = (SLOW_TIMO - (curtime - last_slowtimo)) * 1000; + if (timeout < 0) + timeout = 0; + else if (timeout > (SLOW_TIMO * 1000)) + timeout = SLOW_TIMO * 1000; + /* Can only fasttimo if we also slowtimo */ if (time_fasttimo) { - tmp_time = (200 - (curtime - time_fasttimo)) * 1000; + tmp_time = (FAST_TIMO - (curtime - time_fasttimo)) * 1000; if (tmp_time < 0) - tmp_time = 0; - + tmp_time = 0; + /* Choose the smallest of the 2 */ - if (tmp_time < timeout.tv_usec) - timeout.tv_usec = (u_int)tmp_time; + if (tmp_time < timeout) + timeout = tmp_time; } } - *pnfds = nfds; -} + *pnfds = nfds; + + /* + * Adjust the timeout to make the minimum timeout + * 2ms (XXX?) to lessen the CPU load + */ + if (timeout < (FAST_TIMO * 1000)) + timeout = FAST_TIMO * 1000; + + return timeout; +} void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) { - struct socket *so, *so_next; - int ret; + struct socket *so, *so_next; + int ret; - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; /* Update time */ updtime(); @@ -364,11 +360,11 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * See if anything has timed out */ if (link_up) { - if (time_fasttimo && ((curtime - time_fasttimo) >= 2)) { + if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { tcp_fasttimo(); time_fasttimo = 0; } - if (do_slowtimo && ((curtime - last_slowtimo) >= 499)) { + if (do_slowtimo && ((curtime - last_slowtimo) >= SLOW_TIMO)) { ip_slowtimo(); tcp_slowtimo(); last_slowtimo = curtime; @@ -390,7 +386,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * (and they can crash the program) */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; + continue; /* * Check for URG data @@ -398,7 +394,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) * test for readfds below if this succeeds */ if (FD_ISSET(so->s, xfds)) - sorecvoob(so); + sorecvoob(so); /* * Check sockets for reading */ @@ -414,82 +410,88 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) /* Output it if we read something */ if (ret > 0) - tcp_output(sototcpcb(so)); + tcp_output(sototcpcb(so)); } /* * Check sockets for writing */ if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, (char*)&ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } + else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ } /* * Probe a still-connecting, non-blocking socket * to check if it's still alive - */ + */ #ifdef PROBE_CONN if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0,0); - - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } else { - ret = send(so->s, &ret, 0,0); - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); - } /* SS_ISFCONNECTING */ + ret = recv(so->s, (char *)&ret, 0, 0); + + if (ret < 0) { + /* XXX */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } + else { + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXX */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } + else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + } /* SS_ISFCONNECTING */ #endif - } + } /* * Now UDP sockets. @@ -500,25 +502,25 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) so_next = so->so_next; if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } + sorecvfrom(so); + } } - } +} /* * See if we can start outputting */ if (if_queued && link_up) - if_start(); + if_start(); /* clear global file descriptor sets. * these reside on the stack in vl.c * so they're unusable if we're not in * slirp_select_fill or slirp_select_poll. */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; } #define ETH_ALEN 6 @@ -530,7 +532,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) #define ARPOP_REQUEST 1 /* ARP request */ #define ARPOP_REPLY 2 /* ARP reply */ -struct ethhdr +struct ethhdr { unsigned char h_dest[ETH_ALEN]; /* destination eth addr */ unsigned char h_source[ETH_ALEN]; /* source ether addr */ @@ -568,7 +570,7 @@ void arp_input(const uint8_t *pkt, int pkt_len) switch(ar_op) { case ARPOP_REQUEST: if (!memcmp(ah->ar_tip, &special_addr, 3)) { - if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) + if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) goto arp_ok; for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { if (ex_ptr->ex_addr == ah->ar_tip[3]) @@ -609,8 +611,8 @@ void slirp_input(const uint8_t *pkt, int pkt_len) if (pkt_len < ETH_HLEN) return; - - proto = ntohs(*(uint16_t *)(pkt + 12)); + + proto = (pkt[12] << 8) | pkt[13]; switch(proto) { case ETH_P_ARP: arp_input(pkt, pkt_len); @@ -651,24 +653,24 @@ void if_encap(const uint8_t *ip_data, int ip_data_len) slirp_output(buf, ip_data_len + ETH_HLEN); } -int slirp_redir(int is_udp, int host_port, +int slirp_redir(int is_udp, int host_port, struct in_addr guest_addr, int guest_port) { if (is_udp) { - if (!udp_listen(htons(host_port), guest_addr.s_addr, + if (!udp_listen(htons(host_port), guest_addr.s_addr, htons(guest_port), 0)) return -1; } else { - if (!solisten(htons(host_port), guest_addr.s_addr, + if (!solisten(htons(host_port), guest_addr.s_addr, htons(guest_port), 0)) return -1; } return 0; } -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, int guest_port) { - return add_exec(&exec_list, do_pty, (char *)args, + return add_exec(&exec_list, do_pty, (char *)args, addr_low_byte, htons(guest_port)); } diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index b8d756e55..b845caa77 100644 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -3,21 +3,12 @@ #define CONFIG_QEMU -//#define DEBUG 1 - -// Uncomment the following line to enable SLIRP statistics printing in Qemu -//#define LOG_ENABLED - -#ifdef LOG_ENABLED -#define STAT(expr) expr -#else -#define STAT(expr) do { } while(0) -#endif +#define DEBUG 1 #ifndef CONFIG_QEMU #include "version.h" #endif -#include "config-host.h" +#include "config.h" #include "slirp_config.h" #ifdef _WIN32 @@ -28,20 +19,31 @@ typedef uint16_t u_int16_t; typedef uint32_t u_int32_t; typedef uint64_t u_int64_t; typedef char *caddr_t; +typedef int socklen_t; +typedef unsigned long ioctlsockopt_t; -#define WIN32_LEAN_AND_MEAN -# include # include +# include # include # include -# define EWOULDBLOCK WSAEWOULDBLOCK -# define EINPROGRESS WSAEINPROGRESS -# define ENOTCONN WSAENOTCONN -# define EHOSTUNREACH WSAEHOSTUNREACH -# define ENETUNREACH WSAENETUNREACH -# define ECONNREFUSED WSAECONNREFUSED +# define USE_FIONBIO 1 + +/* Basilisk II Router defines those */ +# define udp_read_completion slirp_udp_read_completion +# define write_udp slirp_write_udp +# define init_udp slirp_init_udp +# define final_udp slirp_final_udp #else +# define WSAGetLastError() (int)(errno) +# define WSASetLastError(e) (void)(errno = (e)) +# define WSAEWOULDBLOCK EWOULDBLOCK +# define WSAEINPROGRESS EINPROGRESS +# define WSAENOTCONN ENOTCONN +# define WSAEHOSTUNREACH EHOSTUNREACH +# define WSAENETUNREACH ENETUNREACH +# define WSAECONNREFUSED ECONNREFUSED +typedef int ioctlsockopt_t; # define ioctlsocket ioctl # define closesocket(s) close(s) # define O_BINARY 0 @@ -51,8 +53,13 @@ typedef char *caddr_t; #ifdef HAVE_SYS_BITYPES_H # include #endif +#ifdef HAVE_STDINT_H +# include +#endif +#ifndef _WIN32 #include +#endif #ifdef NEED_TYPEDEFS typedef char int8_t; @@ -83,6 +90,11 @@ typedef unsigned char u_int8_t; # endif #endif /* NEED_TYPEDEFS */ +/* Basilisk II types glue */ +typedef u_int8_t uint8; +typedef u_int16_t uint16; +typedef u_int32_t uint32; + #ifdef HAVE_UNISTD_H # include #endif @@ -117,17 +129,6 @@ typedef unsigned char u_int8_t; #ifndef _WIN32 #include -#endif - -#ifndef _P -#ifndef NO_PROTOTYPES -# define _P(x) x -#else -# define _P(x) () -#endif -#endif - -#ifndef _WIN32 #include #include #endif @@ -138,20 +139,23 @@ typedef unsigned char u_int8_t; /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup _P((const char *)); +char *strdup(const char *); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc _P((size_t arg)); -void free _P((void *ptr)); +void *malloc(size_t arg); +void free(void *ptr); #endif #ifndef HAVE_INET_ATON -int inet_aton _P((const char *cp, struct in_addr *ia)); +int inet_aton(const char *cp, struct in_addr *ia); #endif #include +#ifdef _WIN32 +#include +#endif #ifndef NO_UNIX_SOCKETS #include #endif @@ -183,11 +187,7 @@ int inet_aton _P((const char *cp, struct in_addr *ia)); #include #endif -#ifdef __STDC__ #include -#else -#include -#endif #include @@ -202,6 +202,20 @@ int inet_aton _P((const char *cp, struct in_addr *ia)); #include "debug.h" +#if defined __GNUC__ +#define PACKED__ __attribute__ ((packed)) +#elif defined _MSC_VER +#define PRAGMA_PACK_SUPPORTED 1 +#define PACK_RESET +#define PACKED__ +#elif defined __sgi +#define PRAGMA_PACK_SUPPORTED 1 +#define PACK_RESET 0 +#define PACKED__ +#else +#error "Packed attribute or pragma shall be supported" +#endif + #include "ip.h" #include "tcp.h" #include "tcp_timer.h" @@ -232,45 +246,47 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start _P((void)); +void if_start(void); #else -void if_start _P((struct ttys *)); +void if_start(struct ttys *); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len _P((char *, const char *, va_list)); - extern int sprintf_len _P((char *, const char *, ...)); + extern int vsprintf_len(char *, const char *, va_list); + extern int sprintf_len(char *, const char *, ...); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf _P((char *, const char *, va_list)); + extern int vsprintf(char *, const char *, va_list); # endif - extern int vfprintf _P((FILE *, const char *, va_list)); + extern int vfprintf(FILE *, const char *, va_list); #endif #ifndef HAVE_STRERROR - extern char *strerror _P((int error)); + extern char *strerror(int error); #endif #ifndef HAVE_INDEX - char *index _P((const char *, int)); + char *index(const char *, int); #endif #ifndef HAVE_GETHOSTID - long gethostid _P((void)); + long gethostid(void); #endif -void lprint _P((const char *, ...)); +void lprint(const char *, ...); + +extern int do_echo; #if SIZEOF_CHAR_P == 4 # define insque_32 insque # define remque_32 remque #else - inline void insque_32 _P((void *, void *)); - inline void remque_32 _P((void *)); + extern inline void insque_32(void *, void *); + extern inline void remque_32(void *); #endif #ifndef _WIN32 @@ -279,46 +295,51 @@ void lprint _P((const char *, ...)); #define DEFAULT_BAUD 115200 -#define SO_OPTIONS DO_KEEPALIVE -#define TCP_MAXIDLE (TCPTV_KEEPCNT * TCPTV_KEEPINTVL) - /* cksum.c */ int cksum(struct mbuf *m, int len); /* if.c */ -void if_init _P((void)); -void if_output _P((struct socket *, struct mbuf *)); +void if_init(void); +void if_output(struct socket *, struct mbuf *); /* ip_input.c */ -void ip_init _P((void)); -void ip_input _P((struct mbuf *)); -void ip_slowtimo _P((void)); -void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); +void ip_init(void); +void ip_input(struct mbuf *); +struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); +void ip_freef(struct ipq *); +void ip_enq(register struct ipasfrag *, register struct ipasfrag *); +void ip_deq(register struct ipasfrag *); +void ip_slowtimo(void); +void ip_stripoptions(register struct mbuf *, struct mbuf *); /* ip_output.c */ -int ip_output _P((struct socket *, struct mbuf *)); +int ip_output(struct socket *, struct mbuf *); /* tcp_input.c */ -void tcp_input _P((register struct mbuf *, int, struct socket *)); -int tcp_mss _P((register struct tcpcb *, u_int)); +int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); +void tcp_input(register struct mbuf *, int, struct socket *); +void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); +void tcp_xmit_timer(register struct tcpcb *, int); +u_int tcp_mss(register struct tcpcb *, u_int); /* tcp_output.c */ -int tcp_output _P((register struct tcpcb *)); -void tcp_setpersist _P((register struct tcpcb *)); +int tcp_output(register struct tcpcb *); +void tcp_setpersist(register struct tcpcb *); /* tcp_subr.c */ -void tcp_init _P((void)); -void tcp_template _P((struct tcpcb *)); -void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); -struct tcpcb * tcp_newtcpcb _P((struct socket *)); -struct tcpcb * tcp_close _P((register struct tcpcb *)); -void tcp_sockclosed _P((struct tcpcb *)); -int tcp_fconnect _P((struct socket *)); -void tcp_connect _P((struct socket *)); -int tcp_attach _P((struct socket *)); -u_int8_t tcp_tos _P((struct socket *)); -int tcp_emu _P((struct socket *, struct mbuf *)); -int tcp_ctl _P((struct socket *)); +void tcp_init(void); +void tcp_template(struct tcpcb *); +void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); +struct tcpcb * tcp_newtcpcb(struct socket *); +struct tcpcb * tcp_close(register struct tcpcb *); +void tcp_drain(void); +void tcp_sockclosed(struct tcpcb *); +int tcp_fconnect(struct socket *); +void tcp_connect(struct socket *); +int tcp_attach(struct socket *); +u_int8_t tcp_tos(struct socket *); +int tcp_emu(struct socket *, struct mbuf *); +int tcp_ctl(struct socket *); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -334,9 +355,4 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif -#ifdef _WIN32 -#undef errno -#define errno (WSAGetLastError()) -#endif - #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h index e7e95dd5a..237268fa8 100644 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -40,11 +40,6 @@ */ #undef USE_LOWCPU -/* Define this if your compiler doesn't like prototypes */ -#ifndef __STDC__ -#define NO_PROTOTYPES -#endif - /*********************************************************/ /* * Autoconf defined configuration options @@ -54,40 +49,11 @@ /* Ignore this */ #undef DUMMY_PPP -/* Define if you have unistd.h */ -#define HAVE_UNISTD_H - -/* Define if you have stdlib.h */ -#define HAVE_STDLIB_H - -/* Define if you have sys/ioctl.h */ -#undef HAVE_SYS_IOCTL_H -#ifndef _WIN32 -#define HAVE_SYS_IOCTL_H -#endif - -/* Define if you have sys/filio.h */ -#undef HAVE_SYS_FILIO_H -#ifdef __APPLE__ -#define HAVE_SYS_FILIO_H -#endif - -/* Define if you have strerror */ -#define HAVE_STRERROR - -/* Define if you have strdup() */ -#define HAVE_STRDUP - -/* Define according to how time.h should be included */ +/* XXX: Define according to how time.h should be included */ +#undef TIME_WITH_SYS_TIME #define TIME_WITH_SYS_TIME 0 #undef HAVE_SYS_TIME_H -/* Define if you have sys/bitypes.h */ -#undef HAVE_SYS_BITYPES_H - -/* Define if the machine is big endian */ -//#undef WORDS_BIGENDIAN - /* Define if your sprintf returns char * instead of int */ #undef BAD_SPRINTF @@ -103,56 +69,17 @@ /* Define if a declaration of sprintf/fprintf is needed */ #undef DECLARE_SPRINTF -/* Define if you have a POSIX.1 sys/wait.h */ -#undef HAVE_SYS_WAIT_H - -/* Define if you have sys/select.h */ -#undef HAVE_SYS_SELECT_H -#ifndef _WIN32 -#define HAVE_SYS_SELECT_H -#endif - -/* Define if you have strings.h */ -#define HAVE_STRING_H - -/* Define if you have arpa/inet.h */ -#undef HAVE_ARPA_INET_H -#ifndef _WIN32 -#define HAVE_ARPA_INET_H -#endif - -/* Define if you have sys/signal.h */ -#undef HAVE_SYS_SIGNAL_H - /* Define if you have sys/stropts.h */ #undef HAVE_SYS_STROPTS_H -/* Define to whatever your compiler thinks inline should be */ -#define inline inline - -/* Define to whatever your compiler thinks const should be */ -#define const const - -/* Define if your compiler doesn't like prototypes */ -#undef NO_PROTOTYPES - /* Define if you don't have u_int32_t etc. typedef'd */ #undef NEED_TYPEDEFS #ifdef __sun__ #define NEED_TYPEDEFS #endif -/* Define to sizeof(char) */ -#define SIZEOF_CHAR 1 - -/* Define to sizeof(short) */ -#define SIZEOF_SHORT 2 - -/* Define to sizeof(int) */ -#define SIZEOF_INT 4 - /* Define to sizeof(char *) */ -#define SIZEOF_CHAR_P (HOST_LONG_BITS / 8) +#define SIZEOF_CHAR_P SIZEOF_VOID_P /* Define if you have random() */ #undef HAVE_RANDOM @@ -160,12 +87,6 @@ /* Define if you have srandom() */ #undef HAVE_SRANDOM -/* Define if you have inet_aton */ -#undef HAVE_INET_ATON -#ifndef _WIN32 -#define HAVE_INET_ATON -#endif - /* Define if you have setenv */ #undef HAVE_SETENV diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 0c15132ea..42ba31b24 100644 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -1,11 +1,12 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H +#include #include #include "ip_icmp.h" #include "main.h" @@ -13,16 +14,18 @@ #include #endif -static void sofcantrcvmore(struct socket *so); -static void sofcantsendmore(struct socket *so); +#ifdef _WIN32 +#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) +#else +#define IS_EAGAIN(e) ((e) == EAGAIN) +#endif -#if 0 -static void +void so_init() { /* Nothing yet */ } -#endif + struct socket * solookup(head, laddr, lport, faddr, fport) @@ -33,19 +36,19 @@ solookup(head, laddr, lport, faddr, fport) u_int fport; { struct socket *so; - + for (so = head->so_next; so != head; so = so->so_next) { - if (so->so_lport == lport && + if (so->so_lport == lport && so->so_laddr.s_addr == laddr.s_addr && so->so_faddr.s_addr == faddr.s_addr && so->so_fport == fport) break; } - + if (so == head) return (struct socket *)NULL; return so; - + } /* @@ -57,7 +60,7 @@ struct socket * socreate() { struct socket *so; - + so = (struct socket *)malloc(sizeof(struct socket)); if(so) { memset(so, 0, sizeof(struct socket)); @@ -82,10 +85,10 @@ sofree(so) tcp_last_so = &tcb; else if (so == udp_last_so) udp_last_so = &udb; - + m_free(so->so_m); - - if(so->so_next && so->so_prev) + + if(so->so_next && so->so_prev) remque(so); /* crashes if so is not in a queue */ free(so); @@ -100,22 +103,23 @@ int soread(so) struct socket *so; { - int n, nn, lss, total; + int n, nn; + u_int lss, total; struct sbuf *sb = &so->so_snd; - int len = sb->sb_datalen - sb->sb_cc; + u_int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; - int mss = so->so_tcpcb->t_maxseg; - + u_int mss = so->so_tcpcb->t_maxseg; + DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); - - /* + + /* * No need to check if there's enough room to read. * soread wouldn't have been called if there weren't */ - + len = sb->sb_datalen - sb->sb_cc; - + iov[0].iov_base = sb->sb_wptr; if (sb->sb_wptr < sb->sb_rptr) { iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; @@ -154,15 +158,16 @@ soread(so) n = 1; } } - + #ifdef HAVE_READV nn = readv(so->s, (struct iovec *)iov, n); DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); #else nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif +#endif if (nn <= 0) { - if (nn < 0 && (errno == EINTR || errno == EAGAIN)) + int error = WSAGetLastError(); + if (nn < 0 && IS_EAGAIN(error)) return 0; else { DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); @@ -171,7 +176,7 @@ soread(so) return -1; } } - + #ifndef HAVE_READV /* * If there was no error, try and read the second time round @@ -188,10 +193,10 @@ soread(so) if (ret > 0) nn += ret; } - + DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); #endif - + /* Update fields */ sb->sb_cc += nn; sb->sb_wptr += nn; @@ -199,10 +204,10 @@ soread(so) sb->sb_wptr -= sb->sb_datalen; return nn; } - + /* * Get urgent data - * + * * When the socket is created, we set it SO_OOBINLINE, * so when OOB data arrives, we soread() it and everything * in the send buffer is sent as urgent data @@ -215,13 +220,13 @@ sorecvoob(so) DEBUG_CALL("sorecvoob"); DEBUG_ARG("so = %lx", (long)so); - + /* * We take a guess at how much urgent data has arrived. * In most situations, when urgent data arrives, the next * read() should get all the urgent data. This guess will * be wrong however if more data arrives just after the - * urgent data, or the read() doesn't return all the + * urgent data, or the read() doesn't return all the * urgent data. */ soread(so); @@ -241,24 +246,24 @@ sosendoob(so) { struct sbuf *sb = &so->so_rcv; char buff[2048]; /* XXX Shouldn't be sending more oob data than this */ - + int n, len; - + DEBUG_CALL("sosendoob"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("sb->sb_cc = %d", sb->sb_cc); - + if (so->so_urgc > 2048) so->so_urgc = 2048; /* XXXX */ - + if (sb->sb_rptr < sb->sb_wptr) { /* We can send it directly */ n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ so->so_urgc -= n; - + DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); } else { - /* + /* * Since there's no sendv or sendtov like writev, * we must copy all data to a linear buffer then * send it all @@ -278,20 +283,20 @@ sosendoob(so) #ifdef DEBUG if (n != len) DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); -#endif +#endif DEBUG_MISC((dfd, " ---2 sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); } - + sb->sb_cc -= n; sb->sb_rptr += n; if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) sb->sb_rptr -= sb->sb_datalen; - + return n; } /* - * Write data from so_rcv to so's socket, + * Write data from so_rcv to so's socket, * updating all sbuf field as necessary */ int @@ -300,12 +305,12 @@ sowrite(so) { int n,nn; struct sbuf *sb = &so->so_rcv; - int len = sb->sb_cc; + u_int len = sb->sb_cc; struct iovec iov[2]; - + DEBUG_CALL("sowrite"); DEBUG_ARG("so = %lx", (long)so); - + if (so->so_urgc) { sosendoob(so); if (sb->sb_cc == 0) @@ -316,9 +321,9 @@ sowrite(so) * No need to check if there's something to write, * sowrite wouldn't have been called otherwise */ - + len = sb->sb_cc; - + iov[0].iov_base = sb->sb_rptr; if (sb->sb_rptr < sb->sb_wptr) { iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; @@ -341,14 +346,17 @@ sowrite(so) #ifdef HAVE_READV nn = writev(so->s, (const struct iovec *)iov, n); - + DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #else nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0 && (errno == EAGAIN || errno == EINTR)) - return 0; + if (nn < 0) { + int error = WSAGetLastError(); + if (IS_EAGAIN(error)) + return 0; + } if (nn <= 0) { DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", @@ -357,7 +365,7 @@ sowrite(so) tcp_sockclosed(sototcpcb(so)); return -1; } - + #ifndef HAVE_READV if (n == 2 && nn == iov[0].iov_len) { int ret; @@ -367,20 +375,20 @@ sowrite(so) } DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); #endif - + /* Update sbuf */ sb->sb_cc -= nn; sb->sb_rptr += nn; if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) sb->sb_rptr -= sb->sb_datalen; - + /* * If in DRAIN mode, and there's no more data, set * it CANTSENDMORE */ if ((so->so_state & SS_FWDRAIN) && sb->sb_cc == 0) sofcantsendmore(so); - + return nn; } @@ -392,25 +400,26 @@ sorecvfrom(so) struct socket *so; { struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); - + socklen_t addrlen = sizeof(struct sockaddr_in); + DEBUG_CALL("sorecvfrom"); DEBUG_ARG("so = %lx", (long)so); - + if (so->so_type == IPPROTO_ICMP) { /* This is a "ping" reply */ char buff[256]; int len; - - len = recvfrom(so->s, buff, 256, 0, + + len = recvfrom(so->s, buff, 256, 0, (struct sockaddr *)&addr, &addrlen); /* XXX Check if reply is "correct"? */ - + if(len == -1 || len == 0) { u_char code=ICMP_UNREACH_PORT; - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; - + int error = WSAGetLastError(); + if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", errno,strerror(errno))); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); @@ -422,36 +431,38 @@ sorecvfrom(so) udp_detach(so); } else { /* A "normal" UDP packet */ struct mbuf *m; - int len, n; + u_int len; + ioctlsockopt_t n; if (!(m = m_get())) return; - m->m_data += IF_MAXLINKHDR; - - /* + m->m_data += if_maxlinkhdr; + + /* * XXX Shouldn't FIONREAD packets destined for port 53, * but I don't know the max packet size for DNS lookups */ len = M_FREEROOM(m); /* if (so->so_fport != htons(53)) { */ ioctlsocket(so->s, FIONREAD, &n); - + if (n > len) { n = (m->m_data - m->m_dat) + m->m_len + n + 1; m_inc(m, n); len = M_FREEROOM(m); } /* } */ - + m->m_len = recvfrom(so->s, m->m_data, len, 0, (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", + DEBUG_MISC((dfd, " did recvfrom %zu, errno = %d-%s\n", m->m_len, errno,strerror(errno))); if(m->m_len<0) { u_char code=ICMP_UNREACH_PORT; - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; - + int error = WSAGetLastError(); + if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); m_free(m); @@ -474,8 +485,8 @@ sorecvfrom(so) * m->m_len = 0; * } */ - - /* + + /* * If this packet was destined for CTL_ADDR, * make it look like that's where it came from, done by udp_output */ @@ -498,7 +509,7 @@ sosendto(so, m) DEBUG_CALL("sosendto"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - + addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { /* It's an alias */ @@ -515,14 +526,16 @@ sosendto(so, m) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); - + char addrstr[INET_ADDRSTRLEN]; + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", + ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); + /* Don't care what port we get */ ret = sendto(so->s, m->m_data, m->m_len, 0, (struct sockaddr *)&addr, sizeof (struct sockaddr)); if (ret < 0) return -1; - + /* * Kill the socket if there's no reply in 4 minutes, * but only if it's an expirable socket @@ -545,58 +558,57 @@ solisten(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int s, addrlen = sizeof(addr), opt = 1; + int s; + socklen_t addrlen = sizeof(addr); + int opt = 1; DEBUG_CALL("solisten"); DEBUG_ARG("port = %d", port); DEBUG_ARG("laddr = %x", laddr); DEBUG_ARG("lport = %d", lport); DEBUG_ARG("flags = %x", flags); - + if ((so = socreate()) == NULL) { /* free(so); Not sofree() ??? free(NULL) == NOP */ return NULL; } - + /* Don't tcp_attach... we don't need so_snd nor so_rcv */ if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) { free(so); return NULL; } insque(so,&tcb); - - /* + + /* * SS_FACCEPTONCE sockets must time out. */ if (flags & SS_FACCEPTONCE) so->so_tcpcb->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT*2; - + so->so_state = (SS_FACCEPTCONN|flags); so->so_lport = lport; /* Kept in network format */ so->so_laddr.s_addr = laddr; /* Ditto */ - + + memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_addr.s_addr = INADDR_ANY; addr.sin_port = port; - + if (((s = socket(AF_INET,SOCK_STREAM,0)) < 0) || (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || (listen(s,1) < 0)) { - int tmperrno = errno; /* Don't clobber the real reason we failed */ - + int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ + close(s); sofree(so); /* Restore the real errno */ -#ifdef _WIN32 - WSASetLastError(tmperrno); -#else - errno = tmperrno; -#endif + WSASetLastError(error); return NULL; } setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - + getsockname(s,(struct sockaddr *)&addr,&addrlen); so->so_fport = addr.sin_port; if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) @@ -608,32 +620,30 @@ solisten(port, laddr, lport, flags) return so; } -#if 0 -/* +/* * Data is available in so_rcv * Just write() the data to the socket * XXX not yet... */ -static void +void sorwakeup(so) struct socket *so; { /* sowrite(so); */ /* FD_CLR(so->s,&writefds); */ } - + /* * Data has been freed in so_snd * We have room for a read() if we want to * For now, don't read, it'll be done in the main loop */ -static void +void sowwakeup(so) struct socket *so; { /* Nothing, yet */ } -#endif /* * Various session state calls @@ -658,8 +668,9 @@ soisfconnected(so) so->so_state |= SS_ISFCONNECTED; /* Clobber other states */ } -static void -sofcantrcvmore(struct socket *so) +void +sofcantrcvmore(so) + struct socket *so; { if ((so->so_state & SS_NOFDREF) == 0) { shutdown(so->s,0); @@ -674,8 +685,9 @@ sofcantrcvmore(struct socket *so) so->so_state |= SS_FCANTRCVMORE; } -static void -sofcantsendmore(struct socket *so) +void +sofcantsendmore(so) + struct socket *so; { if ((so->so_state & SS_NOFDREF) == 0) { shutdown(so->s,1); /* send FIN to fhost */ diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h index 94fb8d8cf..3b0fee169 100644 --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -1,7 +1,7 @@ /* * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -33,21 +33,21 @@ struct socket { struct in_addr so_laddr; /* local host table entry */ u_int16_t so_fport; /* foreign port */ u_int16_t so_lport; /* local port */ - + u_int8_t so_iptos; /* Type of service */ u_int8_t so_emu; /* Is the socket emulated? */ - + u_char so_type; /* Type of socket, UDP or TCP */ int so_state; /* internal state flags SS_*, below */ - + struct tcpcb *so_tcpcb; /* pointer to TCP protocol control block */ u_int so_expire; /* When the socket will expire */ - + int so_queued; /* Number of packets queued from this socket */ int so_nqueued; /* Number of packets queued in a row * Used to determine when to "downgrade" a session * from fastq to batchq */ - + struct sbuf so_rcv; /* Receive buffer */ struct sbuf so_snd; /* Send buffer */ void * extra; /* Extra pointer */ @@ -81,19 +81,24 @@ struct iovec { }; #endif -struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); -struct socket * socreate _P((void)); -void sofree _P((struct socket *)); -int soread _P((struct socket *)); -void sorecvoob _P((struct socket *)); -int sosendoob _P((struct socket *)); -int sowrite _P((struct socket *)); -void sorecvfrom _P((struct socket *)); -int sosendto _P((struct socket *, struct mbuf *)); -struct socket * solisten _P((u_int, u_int32_t, u_int, int)); -void soisfconnecting _P((register struct socket *)); -void soisfconnected _P((register struct socket *)); -void soisfdisconnected _P((struct socket *)); -void sofwdrain _P((struct socket *)); +void so_init(void); +struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); +struct socket * socreate(void); +void sofree(struct socket *); +int soread(struct socket *); +void sorecvoob(struct socket *); +int sosendoob(struct socket *); +int sowrite(struct socket *); +void sorecvfrom(struct socket *); +int sosendto(struct socket *, struct mbuf *); +struct socket * solisten(u_int, u_int32_t, u_int, int); +void sorwakeup(struct socket *); +void sowwakeup(struct socket *); +void soisfconnecting(register struct socket *); +void soisfconnected(register struct socket *); +void sofcantrcvmore(struct socket *); +void sofcantsendmore(struct socket *); +void soisfdisconnected(struct socket *); +void sofwdrain(struct socket *); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h index 11150766d..24e7914ab 100644 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -42,6 +38,8 @@ typedef u_int32_t tcp_seq; #define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ #define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ +extern size_t tcp_rcvspace; +extern size_t tcp_sndspace; extern struct socket *tcp_last_so; #define TCP_SNDSPACE 8192 @@ -51,16 +49,20 @@ extern struct socket *tcp_last_so; * TCP header. * Per RFC 793, September, 1981. */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct tcphdr { u_int16_t th_sport; /* source port */ u_int16_t th_dport; /* destination port */ tcp_seq th_seq; /* sequence number */ tcp_seq th_ack; /* acknowledgement number */ #ifdef WORDS_BIGENDIAN - u_int th_off:4, /* data offset */ + u_char th_off:4, /* data offset */ th_x2:4; /* (unused) */ #else - u_int th_x2:4, /* (unused) */ + u_char th_x2:4, /* (unused) */ th_off:4; /* data offset */ #endif u_int8_t th_flags; @@ -73,7 +75,11 @@ struct tcphdr { u_int16_t th_win; /* window */ u_int16_t th_sum; /* checksum */ u_int16_t th_urp; /* urgent pointer */ -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif #include "tcp_var.h" @@ -170,6 +176,6 @@ struct tcphdr { extern tcp_seq tcp_iss; /* tcp initial send seq # */ -extern const char * const tcpstates[]; +extern char *tcpstates[]; #endif diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index 17a9387f0..5c06f16f5 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,17 +33,18 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ +#include #include #include "ip_icmp.h" struct socket tcb; -#define TCPREXMTTHRESH 3 +int tcprexmtthresh = 3; struct socket *tcp_last_so = &tcb; tcp_seq tcp_iss; /* tcp initial send seq # */ @@ -79,8 +76,8 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ flags = (ti)->ti_flags & TH_FIN; \ - STAT(tcpstat.tcps_rcvpack++); \ - STAT(tcpstat.tcps_rcvbyte += (ti)->ti_len); \ + tcpstat.tcps_rcvpack++;\ + tcpstat.tcps_rcvbyte += (ti)->ti_len;\ if (so->so_emu) { \ if (tcp_emu((so),(m))) sbappend((so), (m)); \ } else \ @@ -99,8 +96,8 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ flags = (ti)->ti_flags & TH_FIN; \ - STAT(tcpstat.tcps_rcvpack++); \ - STAT(tcpstat.tcps_rcvbyte += (ti)->ti_len); \ + tcpstat.tcps_rcvpack++;\ + tcpstat.tcps_rcvbyte += (ti)->ti_len;\ if (so->so_emu) { \ if (tcp_emu((so),(m))) sbappend(so, (m)); \ } else \ @@ -112,18 +109,14 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ } \ } #endif -static void tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, - struct tcpiphdr *ti); -static void tcp_xmit_timer(register struct tcpcb *tp, int rtt); -static int -tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, - struct mbuf *m) +int +tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) { register struct tcpiphdr *q; struct socket *so = tp->t_socket; int flags; - + /* * Call with ti==0 after become established to * force pre-ESTABLISHED data up to user socket. @@ -151,8 +144,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { if (i >= ti->ti_len) { - STAT(tcpstat.tcps_rcvduppack++); - STAT(tcpstat.tcps_rcvdupbyte += ti->ti_len); + tcpstat.tcps_rcvduppack++; + tcpstat.tcps_rcvdupbyte += ti->ti_len; m_freem(m); /* * Try to present any queued data @@ -168,8 +161,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, } q = (struct tcpiphdr *)(q->ti_next); } - STAT(tcpstat.tcps_rcvoopack++); - STAT(tcpstat.tcps_rcvoobyte += ti->ti_len); + tcpstat.tcps_rcvoopack++; + tcpstat.tcps_rcvoobyte += ti->ti_len; REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ /* @@ -233,13 +226,9 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, * TCP input routine, follows pages 65-76 of the * protocol specification dated September, 1981 very closely. */ -void -tcp_input(m, iphlen, inso) - register struct mbuf *m; - int iphlen; - struct socket *inso; +void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) { - struct ip save_ip, *ip; + struct ip save_ip, *ip; register struct tcpiphdr *ti; caddr_t optp = NULL; int optlen = 0; @@ -247,16 +236,18 @@ tcp_input(m, iphlen, inso) register struct tcpcb *tp = 0; register int tiflags; struct socket *so = 0; - int todrop, acked, ourfinisacked, needoutput = 0; -/* int dropsocket = 0; */ + int todrop; + u_int acked; + int ourfinisacked, needoutput = 0; + /* int dropsocket = 0; */ int iss = 0; u_long tiwin; int ret; -/* int ts_present = 0; */ + /* int ts_present = 0; */ DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", - (long )m, iphlen, (long )inso )); + DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", + (long)m, iphlen, (long)inso)); /* * If called with m == 0, then we're continuing the connect @@ -276,15 +267,15 @@ tcp_input(m, iphlen, inso) } - STAT(tcpstat.tcps_rcvtotal++); + tcpstat.tcps_rcvtotal++; /* * Get IP and TCP header together in first mbuf. * Note: IP leaves IP header in first mbuf. */ ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip )) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen=sizeof(struct ip ); + if (iphlen > sizeof(struct ip)) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen = sizeof(struct ip); } /* XXX Check if too short */ @@ -293,24 +284,28 @@ tcp_input(m, iphlen, inso) * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - ip=mtod(m, struct ip *); + ip = mtod(m, struct ip *); save_ip = *ip; - save_ip.ip_len+= iphlen; + save_ip.ip_len += iphlen; /* * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; + //ti->ti_next = ti->ti_prev = 0; + + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip ) + tlen; + len = sizeof(struct ip) + tlen; /* keep checksum for ICMP reply * ti->ti_sum = cksum(m, len); * if (ti->ti_sum) { */ - if(cksum(m, len)) { - STAT(tcpstat.tcps_rcvbadsum++); - goto drop; + if (cksum(m, len)) { + tcpstat.tcps_rcvbadsum++; + goto drop; } /* @@ -318,15 +313,15 @@ tcp_input(m, iphlen, inso) * pull out TCP options and adjust length. XXX */ off = ti->ti_off << 2; - if (off < sizeof (struct tcphdr) || off > tlen) { - STAT(tcpstat.tcps_rcvbadoff++); - goto drop; + if (off < sizeof(struct tcphdr) || off > tlen) { + tcpstat.tcps_rcvbadoff++; + goto drop; } tlen -= off; ti->ti_len = tlen; - if (off > sizeof (struct tcphdr)) { - optlen = off - sizeof (struct tcphdr); - optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); + if (off > sizeof(struct tcphdr)) { + optlen = off - sizeof(struct tcphdr); + optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); /* * Do quick retrieval of timestamp options ("options @@ -335,17 +330,17 @@ tcp_input(m, iphlen, inso) * quickly get the values now and not bother calling * tcp_dooptions(), etc. */ -/* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ + /* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ } tiflags = ti->ti_flags; @@ -360,8 +355,8 @@ tcp_input(m, iphlen, inso) /* * Drop TCP, IP headers and TCP options. */ - m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); /* * Locate pcb for segment. @@ -369,14 +364,14 @@ tcp_input(m, iphlen, inso) findso: so = tcp_last_so; if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); + ti->ti_dst, ti->ti_dport); if (so) tcp_last_so = so; - STAT(tcpstat.tcps_socachemiss++); + ++tcpstat.tcps_socachemiss; } /* @@ -393,41 +388,41 @@ tcp_input(m, iphlen, inso) * as if it was LISTENING, and continue... */ if (so == 0) { - if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) - goto dropwithreset; + if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) + goto dropwithreset; - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } - sbreserve(&so->so_snd, TCP_SNDSPACE); - sbreserve(&so->so_rcv, TCP_RCVSPACE); + sbreserve(&so->so_snd, tcp_sndspace); + sbreserve(&so->so_rcv, tcp_rcvspace); - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; } - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; tp = sototcpcb(so); @@ -442,17 +437,17 @@ tcp_input(m, iphlen, inso) * tiwin = ti->ti_win << tp->snd_scale; * else */ - tiwin = ti->ti_win; + tiwin = ti->ti_win; /* * Segment received on connection. * Reset idle time and keep-alive timer. */ tp->t_idle = 0; - if (SO_OPTIONS) - tp->t_timer[TCPT_KEEP] = TCPTV_KEEPINTVL; + if (so_options) + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; else - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_IDLE; + tp->t_timer[TCPT_KEEP] = tcp_keepidle; /* * Process options if not in LISTEN state, @@ -460,60 +455,60 @@ tcp_input(m, iphlen, inso) */ if (optp && tp->t_state != TCPS_LISTEN) tcp_dooptions(tp, (u_char *)optp, optlen, ti); -/* , */ -/* &ts_present, &ts_val, &ts_ecr); */ + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && -/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { + (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && + /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { /* * If last ACK falls within this segment's sequence numbers, * record the timestamp. */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ + /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ if (ti->ti_len == 0) { if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { /* * this is a pure ack for outstanding data. */ - STAT(tcpstat.tcps_predack++); -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && - SEQ_GT(ti->ti_ack, tp->t_rtseq)) + ++tcpstat.tcps_predack; + /* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && +SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_xmit_timer(tp, tp->t_rtt); acked = ti->ti_ack - tp->snd_una; - STAT(tcpstat.tcps_rcvackpack++); - STAT(tcpstat.tcps_rcvackbyte += acked); + tcpstat.tcps_rcvackpack++; + tcpstat.tcps_rcvackbyte += acked; sbdrop(&so->so_snd, acked); tp->snd_una = ti->ti_ack; m_freem(m); @@ -536,37 +531,39 @@ tcp_input(m, iphlen, inso) * There's room in so_snd, sowwakup will read() * from the socket if we can */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ + /* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ if (so->so_snd.sb_cc) (void) tcp_output(tp); return; } - } else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && - ti->ti_len <= sbspace(&so->so_rcv)) { + } + else if (ti->ti_ack == tp->snd_una && + tp->seg_next == (tcpiphdrp_32)tp && + ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet * with nothing on the reassembly queue and * we have enough buffer space to take it. */ - STAT(tcpstat.tcps_preddat++); + ++tcpstat.tcps_preddat; tp->rcv_nxt += ti->ti_len; - STAT(tcpstat.tcps_rcvpack++); - STAT(tcpstat.tcps_rcvbyte += ti->ti_len); + tcpstat.tcps_rcvpack++; + tcpstat.tcps_rcvbyte += ti->ti_len; /* * Add data to socket buffer. */ if (so->so_emu) { - if (tcp_emu(so,m)) sbappend(so, m); - } else + if (tcp_emu(so, m)) sbappend(so, m); + } + else sbappend(so, m); /* @@ -574,16 +571,16 @@ tcp_input(m, iphlen, inso) * if we can actually write() to the socket * XXX Need to check? It's be NON_BLOCKING */ -/* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ + /* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ tp->t_flags |= TF_ACKNOW; tcp_output(tp); return; @@ -596,139 +593,145 @@ tcp_input(m, iphlen, inso) * but not less than advertised window. */ { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); } switch (tp->t_state) { - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ case TCPS_LISTEN: { - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { #if 0 - if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } else + if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } + else #endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if(ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if (ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } + } + } + if (so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ } - } - if(so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { - u_char code=ICMP_UNREACH_NET; - DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", - errno,strerror(errno))); - if(errno == ECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, - TH_RST|TH_ACK); - } else { - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - *ip=save_ip; - icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - } else { - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - } - return; + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if (tcp_fconnect(so) == -1) { + int error = WSAGetLastError(); + if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { + u_char code = ICMP_UNREACH_NET; + DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", + errno, strerror(errno))); + if (error == WSAECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, + TH_RST | TH_ACK); + } + else { + if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + *ip = save_ip; + icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + return; + } + } + + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + return; cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; - } + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - STAT(tcpstat.tcps_accepts++); - goto trimthenstep6; + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR / 2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tcpstat.tcps_accepts++; + goto trimthenstep6; } /* case TCPS_LISTEN */ /* @@ -745,13 +748,13 @@ tcp_input(m, iphlen, inso) */ case TCPS_SYN_SENT: if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) goto dropwithreset; if (tiflags & TH_RST) { if (tiflags & TH_ACK) - tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ + tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ goto drop; } @@ -768,7 +771,7 @@ tcp_input(m, iphlen, inso) tcp_rcvseqinit(tp); tp->t_flags |= TF_ACKNOW; if (tiflags & TH_ACK && SEQ_GT(tp->snd_una, tp->iss)) { - STAT(tcpstat.tcps_connects++); + tcpstat.tcps_connects++; soisfconnected(so); tp->t_state = TCPS_ESTABLISHED; @@ -779,7 +782,7 @@ tcp_input(m, iphlen, inso) * tp->rcv_scale = tp->request_r_scale; * } */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, + (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); /* * if we didn't have to retransmit the SYN, @@ -787,10 +790,11 @@ tcp_input(m, iphlen, inso) */ if (tp->t_rtt) tcp_xmit_timer(tp, tp->t_rtt); - } else + } + else tp->t_state = TCPS_SYN_RECEIVED; -trimthenstep6: + trimthenstep6: /* * Advance ti->ti_seq to correspond to first data byte. * If data, trim to stay within window, @@ -802,8 +806,8 @@ tcp_input(m, iphlen, inso) m_adj(m, -todrop); ti->ti_len = tp->rcv_wnd; tiflags &= ~TH_FIN; - STAT(tcpstat.tcps_rcvpackafterwin++); - STAT(tcpstat.tcps_rcvbyteafterwin += todrop); + tcpstat.tcps_rcvpackafterwin++; + tcpstat.tcps_rcvbyteafterwin += todrop; } tp->snd_wl1 = ti->ti_seq - 1; tp->rcv_up = ti->ti_seq; @@ -819,31 +823,31 @@ tcp_input(m, iphlen, inso) * RFC 1323 PAWS: If we have a timestamp reply on this segment * and it's less than ts_recent, drop it. */ -/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ -/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ -/* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ + /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ + /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ + /* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ todrop = tp->rcv_nxt - ti->ti_seq; if (todrop > 0) { @@ -860,7 +864,7 @@ tcp_input(m, iphlen, inso) * Following if statement from Stevens, vol. 2, p. 960. */ if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { /* * Any valid FIN must be to the left of the window. * At this point the FIN must be a duplicate or out @@ -874,11 +878,12 @@ tcp_input(m, iphlen, inso) */ tp->t_flags |= TF_ACKNOW; todrop = ti->ti_len; - STAT(tcpstat.tcps_rcvduppack++); - STAT(tcpstat.tcps_rcvdupbyte += todrop); - } else { - STAT(tcpstat.tcps_rcvpartduppack++); - STAT(tcpstat.tcps_rcvpartdupbyte += todrop); + tcpstat.tcps_rcvduppack++; + tcpstat.tcps_rcvdupbyte += todrop; + } + else { + tcpstat.tcps_rcvpartduppack++; + tcpstat.tcps_rcvpartdupbyte += todrop; } m_adj(m, todrop); ti->ti_seq += todrop; @@ -895,9 +900,9 @@ tcp_input(m, iphlen, inso) * user processes are gone, then RST the other end. */ if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { tp = tcp_close(tp); - STAT(tcpstat.tcps_rcvafterclose++); + tcpstat.tcps_rcvafterclose++; goto dropwithreset; } @@ -905,11 +910,11 @@ tcp_input(m, iphlen, inso) * If segment ends after window, drop trailing data * (and PUSH and FIN); if nothing left, just ACK. */ - todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); + todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); if (todrop > 0) { - STAT(tcpstat.tcps_rcvpackafterwin++); + tcpstat.tcps_rcvpackafterwin++; if (todrop >= ti->ti_len) { - STAT(tcpstat.tcps_rcvbyteafterwin += ti->ti_len); + tcpstat.tcps_rcvbyteafterwin += ti->ti_len; /* * If a new connection request is received * while in TIME_WAIT, drop the old connection @@ -917,8 +922,8 @@ tcp_input(m, iphlen, inso) * are above the previous ones. */ if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { iss = tp->rcv_nxt + TCP_ISSINCR; tp = tcp_close(tp); goto findso; @@ -932,54 +937,56 @@ tcp_input(m, iphlen, inso) */ if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { tp->t_flags |= TF_ACKNOW; - STAT(tcpstat.tcps_rcvwinprobe++); - } else + tcpstat.tcps_rcvwinprobe++; + } + else goto dropafterack; - } else - STAT(tcpstat.tcps_rcvbyteafterwin += todrop); + } + else + tcpstat.tcps_rcvbyteafterwin += todrop; m_adj(m, -todrop); ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH|TH_FIN); + tiflags &= ~(TH_PUSH | TH_FIN); } /* * If last ACK falls within this segment's sequence numbers, * record its timestamp. */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ + /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ if (tiflags&TH_RST) switch (tp->t_state) { case TCPS_SYN_RECEIVED: -/* so->so_error = ECONNREFUSED; */ + /* so->so_error = ECONNREFUSED; */ goto close; case TCPS_ESTABLISHED: case TCPS_FIN_WAIT_1: case TCPS_FIN_WAIT_2: case TCPS_CLOSE_WAIT: -/* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - STAT(tcpstat.tcps_drops++); - tp = tcp_close(tp); - goto drop; + /* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + tcpstat.tcps_drops++; + tp = tcp_close(tp); + goto drop; case TCPS_CLOSING: case TCPS_LAST_ACK: @@ -993,7 +1000,7 @@ tcp_input(m, iphlen, inso) * error and we send an RST and drop the connection. */ if (tiflags & TH_SYN) { - tp = tcp_drop(tp,0); + tp = tcp_drop(tp, 0); goto dropwithreset; } @@ -1006,17 +1013,17 @@ tcp_input(m, iphlen, inso) * Ack processing. */ switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ case TCPS_SYN_RECEIVED: if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) + SEQ_GT(ti->ti_ack, tp->snd_max)) goto dropwithreset; - STAT(tcpstat.tcps_connects++); + tcpstat.tcps_connects++; tp->t_state = TCPS_ESTABLISHED; /* * The sent SYN is ack'ed with our sequence number +1 @@ -1025,21 +1032,24 @@ tcp_input(m, iphlen, inso) * SS_CTL since the buffer is empty otherwise. * tp->snd_una++; or: */ - tp->snd_una=ti->ti_ack; + tp->snd_una = ti->ti_ack; if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } else { - soisfconnected(so); + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } + else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } + else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } + else { + soisfconnected(so); } /* Do window scaling? */ @@ -1049,7 +1059,7 @@ tcp_input(m, iphlen, inso) * tp->rcv_scale = tp->request_r_scale; * } */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); tp->snd_wl1 = ti->ti_seq - 1; /* Avoid ack processing; snd_una==ti_ack => dup ack */ goto synrx_to_est; @@ -1073,9 +1083,9 @@ tcp_input(m, iphlen, inso) if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - STAT(tcpstat.tcps_rcvdupack++); - DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", - (long )m, (long )so)); + tcpstat.tcps_rcvdupack++; + DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", + (long)m, (long)so)); /* * If we have outstanding data (other than * a window probe), this is a completely @@ -1101,12 +1111,12 @@ tcp_input(m, iphlen, inso) * network. */ if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) + ti->ti_ack != tp->snd_una) tp->t_dupacks = 0; - else if (++tp->t_dupacks == TCPREXMTTHRESH) { + else if (++tp->t_dupacks == tcprexmtthresh) { tcp_seq onxt = tp->snd_nxt; u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / + min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; if (win < 2) @@ -1116,18 +1126,20 @@ tcp_input(m, iphlen, inso) tp->t_rtt = 0; tp->snd_nxt = ti->ti_ack; tp->snd_cwnd = tp->t_maxseg; - (void) tcp_output(tp); + (void)tcp_output(tp); tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; + tp->t_maxseg * tp->t_dupacks; if (SEQ_GT(onxt, tp->snd_nxt)) tp->snd_nxt = onxt; goto drop; - } else if (tp->t_dupacks > TCPREXMTTHRESH) { + } + else if (tp->t_dupacks > tcprexmtthresh) { tp->snd_cwnd += tp->t_maxseg; - (void) tcp_output(tp); + (void)tcp_output(tp); goto drop; } - } else + } + else tp->t_dupacks = 0; break; } @@ -1136,17 +1148,17 @@ tcp_input(m, iphlen, inso) * If the congestion window was inflated to account * for the other side's cached packets, retract it. */ - if (tp->t_dupacks > TCPREXMTTHRESH && - tp->snd_cwnd > tp->snd_ssthresh) + if (tp->t_dupacks > tcprexmtthresh && + tp->snd_cwnd > tp->snd_ssthresh) tp->snd_cwnd = tp->snd_ssthresh; tp->t_dupacks = 0; if (SEQ_GT(ti->ti_ack, tp->snd_max)) { - STAT(tcpstat.tcps_rcvacktoomuch++); + tcpstat.tcps_rcvacktoomuch++; goto dropafterack; } acked = ti->ti_ack - tp->snd_una; - STAT(tcpstat.tcps_rcvackpack++); - STAT(tcpstat.tcps_rcvackbyte += acked); + tcpstat.tcps_rcvackpack++; + tcpstat.tcps_rcvackbyte += acked; /* * If we have a timestamp reply, update smoothed @@ -1157,12 +1169,12 @@ tcp_input(m, iphlen, inso) * timer backoff (cf., Phil Karn's retransmit alg.). * Recompute the initial retransmit timer. */ -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp,tp->t_rtt); + /* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp, tp->t_rtt); /* * If all outstanding data is acked, stop retransmit @@ -1173,7 +1185,8 @@ tcp_input(m, iphlen, inso) if (ti->ti_ack == tp->snd_max) { tp->t_timer[TCPT_REXMT] = 0; needoutput = 1; - } else if (tp->t_timer[TCPT_PERSIST] == 0) + } + else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; /* * When new data is acked, open the congestion window. @@ -1183,18 +1196,19 @@ tcp_input(m, iphlen, inso) * (maxseg^2 / cwnd per packet). */ { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); } if (acked > so->so_snd.sb_cc) { tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); + sbdrop(&so->so_snd, so->so_snd.sb_cc); ourfinisacked = 1; - } else { + } + else { sbdrop(&so->so_snd, acked); tp->snd_wnd -= acked; ourfinisacked = 0; @@ -1203,20 +1217,20 @@ tcp_input(m, iphlen, inso) * XXX sowwakup is called when data is acked and there's room for * for more data... it should read() the socket */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ + /* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ tp->snd_una = ti->ti_ack; if (SEQ_LT(tp->snd_nxt, tp->snd_una)) tp->snd_nxt = tp->snd_una; switch (tp->t_state) { - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ case TCPS_FIN_WAIT_1: if (ourfinisacked) { /* @@ -1228,18 +1242,18 @@ tcp_input(m, iphlen, inso) */ if (so->so_state & SS_FCANTRCVMORE) { soisfdisconnected(so); - tp->t_timer[TCPT_2MSL] = TCP_MAXIDLE; + tp->t_timer[TCPT_2MSL] = tcp_maxidle; } tp->t_state = TCPS_FIN_WAIT_2; } break; - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ case TCPS_CLOSING: if (ourfinisacked) { tp->t_state = TCPS_TIME_WAIT; @@ -1249,12 +1263,12 @@ tcp_input(m, iphlen, inso) } break; - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ case TCPS_LAST_ACK: if (ourfinisacked) { tp = tcp_close(tp); @@ -1262,11 +1276,11 @@ tcp_input(m, iphlen, inso) } break; - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; goto dropafterack; @@ -1279,13 +1293,13 @@ tcp_input(m, iphlen, inso) * Don't look at window if no ACK: TAC's send garbage on first SYN. */ if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { /* keep track of pure window updates */ if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) - STAT(tcpstat.tcps_rcvwinupd++); + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + tcpstat.tcps_rcvwinupd++; tp->snd_wnd = tiwin; tp->snd_wl1 = ti->ti_seq; tp->snd_wl2 = ti->ti_ack; @@ -1298,7 +1312,7 @@ tcp_input(m, iphlen, inso) * Process segments with URG. */ if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { /* * This is a kludge, but if we receive and accept * random urgent pointers, we'll crash in @@ -1324,21 +1338,22 @@ tcp_input(m, iphlen, inso) * of data past the urgent section as the original * spec states (in one of two places). */ - if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { + if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + + so->so_urgc = so->so_rcv.sb_cc + (tp->rcv_up - tp->rcv_nxt); /* -1; */ tp->rcv_up = ti->ti_seq + ti->ti_urp; } - } else + } + else /* * If no out of band data is expected, * pull receive urgent pointer along * with the receive window. */ if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; + tp->rcv_up = tp->rcv_nxt; dodata: /* @@ -1350,7 +1365,7 @@ tcp_input(m, iphlen, inso) * connection then we just ignore the text. */ if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { TCP_REASS(tp, ti, m, so, tiflags); /* * Note the amount of data that peer has sent into @@ -1358,7 +1373,8 @@ tcp_input(m, iphlen, inso) * buffer size. */ len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } else { + } + else { m_free(m); tiflags &= ~TH_FIN; } @@ -1372,13 +1388,13 @@ tcp_input(m, iphlen, inso) /* * If we receive a FIN we can't send more data, * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the + * Shutdown the socket if there is no rx data in the * buffer. * soread() is called on completion of shutdown() and * will got to TCPS_LAST_ACK, and use tcp_output() * to send the FIN. */ -/* sofcantrcvmore(so); */ + /* sofcantrcvmore(so); */ sofwdrain(so); tp->t_flags |= TF_ACKNOW; @@ -1386,31 +1402,31 @@ tcp_input(m, iphlen, inso) } switch (tp->t_state) { - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ case TCPS_SYN_RECEIVED: case TCPS_ESTABLISHED: - if(so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ + if (so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ case TCPS_FIN_WAIT_1: tp->t_state = TCPS_CLOSING; break; - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ case TCPS_FIN_WAIT_2: tp->t_state = TCPS_TIME_WAIT; tcp_canceltimers(tp); @@ -1418,9 +1434,9 @@ tcp_input(m, iphlen, inso) soisfdisconnected(so); break; - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; break; @@ -1434,15 +1450,15 @@ tcp_input(m, iphlen, inso) * * See above. */ -/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ -/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ + /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ + /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { tp->t_flags |= TF_ACKNOW; } @@ -1450,7 +1466,7 @@ tcp_input(m, iphlen, inso) * Return any desired output. */ if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void) tcp_output(tp); + (void)tcp_output(tp); } return; @@ -1463,7 +1479,7 @@ tcp_input(m, iphlen, inso) goto drop; m_freem(m); tp->t_flags |= TF_ACKNOW; - (void) tcp_output(tp); + (void)tcp_output(tp); return; dropwithreset: @@ -1472,8 +1488,8 @@ tcp_input(m, iphlen, inso) tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); else { if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, - TH_RST|TH_ACK); + tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, + TH_RST | TH_ACK); } return; @@ -1491,7 +1507,7 @@ tcp_input(m, iphlen, inso) /* int *ts_present; * u_int32_t *ts_val, *ts_ecr; */ -static void +void tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) { u_int16_t mss; @@ -1523,7 +1539,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) continue; memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); NTOHS(mss); - (void) tcp_mss(tp, mss); /* sets t_maxseg */ + tcp_mss(tp, mss); /* sets t_maxseg */ break; /* case TCPOPT_WINDOW: @@ -1544,7 +1560,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) * memcpy((char *) ts_ecr, (char *)cp + 6, sizeof(*ts_ecr)); * NTOHL(*ts_ecr); * - */ /* + */ /* * * A timestamp received in a SYN makes * * it ok to send timestamp requests and replies. * */ @@ -1568,14 +1584,10 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) #ifdef notdef -void -tcp_pulloutofband(so, ti, m) - struct socket *so; - struct tcpiphdr *ti; - register struct mbuf *m; +void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) { int cnt = ti->ti_urp - 1; - + while (cnt >= 0) { if (m->m_len > cnt) { char *cp = mtod(m, caddr_t) + cnt; @@ -1602,16 +1614,15 @@ tcp_pulloutofband(so, ti, m) * and update averages and current timeout. */ -static void -tcp_xmit_timer(register struct tcpcb *tp, int rtt) +void tcp_xmit_timer(register struct tcpcb *tp, int rtt) { register short delta; DEBUG_CALL("tcp_xmit_timer"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("rtt = %d", rtt); - - STAT(tcpstat.tcps_rttupdated++); + + tcpstat.tcps_rttupdated++; if (tp->t_srtt != 0) { /* * srtt is stored as fixed point with 3 bits after the @@ -1639,7 +1650,7 @@ tcp_xmit_timer(register struct tcpcb *tp, int rtt) if ((tp->t_rttvar += delta) <= 0) tp->t_rttvar = 1; } else { - /* + /* * No rtt measurement yet - use the unsmoothed rtt. * Set the variance to half the rtt (so our first * retransmit happens at 3*rtt). @@ -1663,7 +1674,7 @@ tcp_xmit_timer(register struct tcpcb *tp, int rtt) */ TCPT_RANGESET(tp->t_rxtcur, TCP_REXMTVAL(tp), (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - + /* * We received an ack for a packet that wasn't retransmitted; * it is probably safe to discard any error indications we've @@ -1690,35 +1701,28 @@ tcp_xmit_timer(register struct tcpcb *tp, int rtt) * parameters from pre-set or cached values in the routing entry. */ -int -tcp_mss(tp, offer) - register struct tcpcb *tp; - u_int offer; +u_int tcp_mss(register struct tcpcb *tp, u_int offer) { struct socket *so = tp->t_socket; - int mss; - + u_int mss; + DEBUG_CALL("tcp_mss"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("offer = %d", offer); - - mss = min(IF_MTU, IF_MRU) - sizeof(struct tcpiphdr); + + mss = min(if_mtu, if_mru) - sizeof(struct tcpiphdr); if (offer) mss = min(mss, offer); mss = max(mss, 32); if (mss < tp->t_maxseg || offer != 0) tp->t_maxseg = mss; - + tp->snd_cwnd = mss; - - sbreserve(&so->so_snd, TCP_SNDSPACE + ((TCP_SNDSPACE % mss) ? - (mss - (TCP_SNDSPACE % mss)) : - 0)); - sbreserve(&so->so_rcv, TCP_RCVSPACE + ((TCP_RCVSPACE % mss) ? - (mss - (TCP_RCVSPACE % mss)) : - 0)); - + + sbreserve(&so->so_snd, tcp_sndspace+((tcp_sndspace%mss)?(mss-(tcp_sndspace%mss)):0)); + sbreserve(&so->so_rcv, tcp_rcvspace+((tcp_rcvspace%mss)?(mss-(tcp_rcvspace%mss)):0)); + DEBUG_MISC((dfd, " returning mss = %d\n", mss)); - + return mss; } diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c index dba4ed7a5..01df0118f 100644 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,8 +33,8 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ @@ -48,16 +44,16 @@ * Since this is only used in "stats socket", we give meaning * names instead of the REAL names */ -const char * const tcpstates[] = { +char *tcpstates[] = { /* "CLOSED", "LISTEN", "SYN_SENT", "SYN_RCVD", */ "REDIRECT", "LISTEN", "SYN_SENT", "SYN_RCVD", "ESTABLISHED", "CLOSE_WAIT", "FIN_WAIT_1", "CLOSING", "LAST_ACK", "FIN_WAIT_2", "TIME_WAIT", }; -static const u_char tcp_outflags[TCP_NSTATES] = { +u_char tcp_outflags[TCP_NSTATES] = { TH_RST|TH_ACK, 0, TH_SYN, TH_SYN|TH_ACK, - TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, + TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, TH_ACK, TH_ACK, }; @@ -67,9 +63,7 @@ static const u_char tcp_outflags[TCP_NSTATES] = { /* * Tcp output routine: figure out what should be sent and send it. */ -int -tcp_output(tp) - register struct tcpcb *tp; +int tcp_output(register struct tcpcb *tp) { register struct socket *so = tp->t_socket; register long len, win; @@ -79,10 +73,10 @@ tcp_output(tp) u_char opt[MAX_TCPOPTLEN]; unsigned optlen, hdrlen; int idle, sendalot; - + DEBUG_CALL("tcp_output"); DEBUG_ARG("tp = %lx", (long )tp); - + /* * Determine length of data that should be transmitted, * and flags that will be used. @@ -103,9 +97,9 @@ tcp_output(tp) win = min(tp->snd_wnd, tp->snd_cwnd); flags = tcp_outflags[tp->t_state]; - + DEBUG_MISC((dfd, " --- tcp_output flags = 0x%x\n",flags)); - + /* * If in persist timeout with window of 0, send 1 byte. * Otherwise, if window is small but nonzero @@ -130,7 +124,7 @@ tcp_output(tp) * to send then the probe will be the FIN * itself. */ - if (off < so->so_snd.sb_cc) + if (off < (int)so->so_snd.sb_cc) flags &= ~TH_FIN; win = 1; } else { @@ -158,7 +152,7 @@ tcp_output(tp) tp->snd_nxt = tp->snd_una; } } - + if (len > tp->t_maxseg) { len = tp->t_maxseg; sendalot = 1; @@ -200,17 +194,17 @@ tcp_output(tp) * window, then want to send a window update to peer. */ if (win > 0) { - /* + /* * "adv" is the amount we can increase the window, * taking into account that we are limited by * TCP_MAXWIN << tp->rcv_scale. */ - long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - + long adv = min(win, TCP_MAXWIN << tp->rcv_scale) - (tp->rcv_adv - tp->rcv_nxt); - if (adv >= (long) (2 * tp->t_maxseg)) + if (adv >= (long)(2 * tp->t_maxseg)) goto send; - if (2 * adv >= (long) so->so_rcv.sb_datalen) + if (2 * adv >= (long)so->so_rcv.sb_datalen) goto send; } @@ -263,8 +257,8 @@ tcp_output(tp) /* * No reason to send a segment, just return. */ - STAT(tcpstat.tcps_didnuttin++); - + tcpstat.tcps_didnuttin++; + return (0); send: @@ -302,9 +296,9 @@ tcp_output(tp) */ } } - + /* - * Send a timestamp and echo-reply if this is a SYN and our side + * Send a timestamp and echo-reply if this is a SYN and our side * wants to use timestamps (TF_REQ_TSTMP is set) or both our side * and our peer have sent timestamps in our SYN's. */ @@ -322,7 +316,7 @@ tcp_output(tp) * } */ hdrlen += optlen; - + /* * Adjust data length if insertion of options will * bump the packet length beyond the t_maxseg length. @@ -339,13 +333,13 @@ tcp_output(tp) */ if (len) { if (tp->t_force && len == 1) - STAT(tcpstat.tcps_sndprobe++); + tcpstat.tcps_sndprobe++; else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) { - STAT(tcpstat.tcps_sndrexmitpack++); - STAT(tcpstat.tcps_sndrexmitbyte += len); + tcpstat.tcps_sndrexmitpack++; + tcpstat.tcps_sndrexmitbyte += len; } else { - STAT(tcpstat.tcps_sndpack++); - STAT(tcpstat.tcps_sndbyte += len); + tcpstat.tcps_sndpack++; + tcpstat.tcps_sndbyte += len; } m = m_get(); @@ -354,16 +348,16 @@ tcp_output(tp) error = 1; goto out; } - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; m->m_len = hdrlen; - - /* + + /* * This will always succeed, since we make sure our mbufs * are big enough to hold one MSS packet + header + ... etc. */ /* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); + sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); m->m_len += len; /* } else { @@ -382,13 +376,13 @@ tcp_output(tp) flags |= TH_PUSH; } else { if (tp->t_flags & TF_ACKNOW) - STAT(tcpstat.tcps_sndacks++); + tcpstat.tcps_sndacks++; else if (flags & (TH_SYN|TH_FIN|TH_RST)) - STAT(tcpstat.tcps_sndctrl++); + tcpstat.tcps_sndctrl++; else if (SEQ_GT(tp->snd_up, tp->snd_una)) - STAT(tcpstat.tcps_sndurg++); + tcpstat.tcps_sndurg++; else - STAT(tcpstat.tcps_sndwinup++); + tcpstat.tcps_sndwinup++; m = m_get(); if (m == NULL) { @@ -396,12 +390,12 @@ tcp_output(tp) error = 1; goto out; } - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; m->m_len = hdrlen; } ti = mtod(m, struct tcpiphdr *); - + memcpy((caddr_t)ti, &tp->t_template, sizeof (struct tcpiphdr)); /* @@ -409,7 +403,7 @@ tcp_output(tp) * window for use in delaying messages about window sizes. * If resending a FIN, be sure not to use a new sequence number. */ - if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && + if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && tp->snd_nxt == tp->snd_max) tp->snd_nxt--; /* @@ -439,17 +433,17 @@ tcp_output(tp) * Calculate receive window. Don't shrink window, * but avoid silly window syndrome. */ - if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) + if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) win = 0; - if (win > (long)TCP_MAXWIN << tp->rcv_scale) - win = (long)TCP_MAXWIN << tp->rcv_scale; - if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) - win = (long)(tp->rcv_adv - tp->rcv_nxt); + if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) + win = (u_long) (TCP_MAXWIN << tp->rcv_scale); + if (win < (tp->rcv_adv - tp->rcv_nxt)) + win = (tp->rcv_adv - tp->rcv_nxt); ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); - + if (SEQ_GT(tp->snd_up, tp->snd_una)) { ti->ti_urp = htons((u_int16_t)(tp->snd_up - ntohl(ti->ti_seq))); -#ifdef notdef +#ifdef notdef if (SEQ_GT(tp->snd_up, tp->snd_nxt)) { ti->ti_urp = htons((u_int16_t)(tp->snd_up - tp->snd_nxt)); #endif @@ -500,7 +494,7 @@ tcp_output(tp) if (tp->t_rtt == 0) { tp->t_rtt = 1; tp->t_rtseq = startseq; - STAT(tcpstat.tcps_segstimed++); + tcpstat.tcps_segstimed++; } } @@ -531,14 +525,14 @@ tcp_output(tp) * the template, but need a way to checksum without them. */ m->m_len = hdrlen + len; /* XXX Needed? m_len should be correct */ - + { + + ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; - ((struct ip *)ti)->ip_len = m->m_len; - - ((struct ip *)ti)->ip_ttl = IPDEFTTL; + ((struct ip *)ti)->ip_ttl = ip_defttl; ((struct ip *)ti)->ip_tos = so->so_iptos; - + /* #if BSD >= 43 */ /* Don't do IP options... */ /* error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route, @@ -547,7 +541,7 @@ tcp_output(tp) error = ip_output(so, m); /* #else - * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, + * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, * so->so_options & SO_DONTROUTE); * #endif */ @@ -567,7 +561,7 @@ tcp_output(tp) */ return (error); } - STAT(tcpstat.tcps_sndtotal++); + tcpstat.tcps_sndtotal++; /* * Data sent (as far as we can tell). @@ -585,9 +579,7 @@ tcp_output(tp) return (0); } -void -tcp_setpersist(tp) - register struct tcpcb *tp; +void tcp_setpersist(register struct tcpcb *tp) { int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c index ba1296d4b..70e04b5ee 100644 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,26 +33,37 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ #define WANT_SYS_IOCTL_H +#include #include /* patchable/settable parameters for tcp */ -/* Don't do rfc1323 performance enhancements */ -#define TCP_DO_RFC1323 0 +int tcp_mssdflt = TCP_MSS; +int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; +int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ +size_t tcp_rcvspace; /* You may want to change this */ +size_t tcp_sndspace; /* Keep small if you have an error prone link */ /* * Tcp initialization */ -void -tcp_init() +void tcp_init() { tcp_iss = 1; /* wrong */ tcb.so_next = tcb.so_prev = &tcb; + + /* tcp_rcvspace = our Window we advertise to the remote */ + tcp_rcvspace = TCP_RCVSPACE; + tcp_sndspace = TCP_SNDSPACE; + + /* Make sure tcp_sndspace is at least 2*MSS */ + if (tcp_sndspace < 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr))) + tcp_sndspace = 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr)); } /* @@ -66,9 +73,7 @@ tcp_init() * necessary when the connection is used. */ /* struct tcpiphdr * */ -void -tcp_template(tp) - struct tcpcb *tp; +void tcp_template(struct tcpcb *tp) { struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; @@ -81,7 +86,7 @@ tcp_template(tp) n->ti_dst = so->so_laddr; n->ti_sport = so->so_fport; n->ti_dport = so->so_lport; - + n->ti_seq = 0; n->ti_ack = 0; n->ti_x2 = 0; @@ -105,13 +110,8 @@ tcp_template(tp) * In any case the ack and sequence number of the transmitted * segment are as specified by the parameters. */ -void -tcp_respond(tp, ti, m, ack, seq, flags) - struct tcpcb *tp; - register struct tcpiphdr *ti; - register struct mbuf *m; - tcp_seq ack, seq; - int flags; +void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, + register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) { register int tlen; int win = 0; @@ -123,7 +123,7 @@ tcp_respond(tp, ti, m, ack, seq, flags) DEBUG_ARG("ack = %u", ack); DEBUG_ARG("seq = %u", seq); DEBUG_ARG("flags = %x", flags); - + if (tp) win = sbspace(&tp->t_socket->so_rcv); if (m == 0) { @@ -134,17 +134,17 @@ tcp_respond(tp, ti, m, ack, seq, flags) #else tlen = 0; #endif - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; *mtod(m, struct tcpiphdr *) = *ti; ti = mtod(m, struct tcpiphdr *); flags = TH_ACK; } else { - /* + /* * ti points into m so the next line is just making * the mbuf point to ti */ m->m_data = (caddr_t)ti; - + m->m_len = sizeof (struct tcpiphdr); tlen = 0; #define xchg(a,b,type) { type t; t=a; a=b; b=t; } @@ -172,11 +172,11 @@ tcp_respond(tp, ti, m, ack, seq, flags) ti->ti_sum = cksum(m, tlen); ((struct ip *)ti)->ip_len = tlen; - if(flags & TH_RST) + if(flags & TH_RST) ((struct ip *)ti)->ip_ttl = MAXTTL; - else - ((struct ip *)ti)->ip_ttl = IPDEFTTL; - + else + ((struct ip *)ti)->ip_ttl = ip_defttl; + (void) ip_output((struct socket *)0, m); } @@ -185,40 +185,38 @@ tcp_respond(tp, ti, m, ack, seq, flags) * empty reassembly queue and hooking it to the argument * protocol control block. */ -struct tcpcb * -tcp_newtcpcb(so) - struct socket *so; +struct tcpcb *tcp_newtcpcb(struct socket *so) { register struct tcpcb *tp; - + tp = (struct tcpcb *)malloc(sizeof(*tp)); if (tp == NULL) return ((struct tcpcb *)0); - + memset((char *) tp, 0, sizeof(struct tcpcb)); tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; - tp->t_maxseg = TCP_MSS; - - tp->t_flags = TCP_DO_RFC1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; + tp->t_maxseg = tcp_mssdflt; + + tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; tp->t_socket = so; - + /* * Init srtt to TCPTV_SRTTBASE (0), so we can tell that we have no * rtt estimate. Set rttvar so that srtt + 2 * rttvar gives * reasonable initial retransmit time. */ tp->t_srtt = TCPTV_SRTTBASE; - tp->t_rttvar = TCPTV_SRTTDFLT << 2; + tp->t_rttvar = tcp_rttdflt * PR_SLOWHZ << 2; tp->t_rttmin = TCPTV_MIN; - TCPT_RANGESET(tp->t_rxtcur, + TCPT_RANGESET(tp->t_rxtcur, ((TCPTV_SRTTBASE >> 2) + (TCPTV_SRTTDFLT << 2)) >> 1, TCPTV_MIN, TCPTV_REXMTMAX); tp->snd_cwnd = TCP_MAXWIN << TCP_MAX_WINSHIFT; tp->snd_ssthresh = TCP_MAXWIN << TCP_MAX_WINSHIFT; tp->t_state = TCPS_CLOSED; - + so->so_tcpcb = tp; return (tp); @@ -229,7 +227,7 @@ tcp_newtcpcb(so) * the specified error. If connection is synchronized, * then send a RST to peer. */ -struct tcpcb *tcp_drop(struct tcpcb *tp, int err) +struct tcpcb *tcp_drop(struct tcpcb *tp, int err) { /* tcp_drop(tp, errno) register struct tcpcb *tp; @@ -240,13 +238,13 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) DEBUG_CALL("tcp_drop"); DEBUG_ARG("tp = %lx", (long)tp); DEBUG_ARG("errno = %d", errno); - + if (TCPS_HAVERCVDSYN(tp->t_state)) { tp->t_state = TCPS_CLOSED; (void) tcp_output(tp); - STAT(tcpstat.tcps_drops++); + tcpstat.tcps_drops++; } else - STAT(tcpstat.tcps_conndrops++); + tcpstat.tcps_conndrops++; /* if (errno == ETIMEDOUT && tp->t_softerror) * errno = tp->t_softerror; */ @@ -260,9 +258,7 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) * discard internet protocol block * wake up any sleepers */ -struct tcpcb * -tcp_close(tp) - register struct tcpcb *tp; +struct tcpcb *tcp_close(register struct tcpcb *tp) { register struct tcpiphdr *t; struct socket *so = tp->t_socket; @@ -270,7 +266,7 @@ tcp_close(tp) DEBUG_CALL("tcp_close"); DEBUG_ARG("tp = %lx", (long )tp); - + /* free the reassembly queue, if any */ t = (struct tcpiphdr *) tp->seg_next; while (t != (struct tcpiphdr *)tp) { @@ -294,13 +290,11 @@ tcp_close(tp) sbfree(&so->so_rcv); sbfree(&so->so_snd); sofree(so); - STAT(tcpstat.tcps_closed++); + tcpstat.tcps_closed++; return ((struct tcpcb *)0); } -#ifdef notdef -void -tcp_drain() +void tcp_drain() { /* XXX */ } @@ -309,10 +303,10 @@ tcp_drain() * When a source quench is received, close congestion window * to one segment. We will gradually open it again as we proceed. */ -void -tcp_quench(i, errno) - int errno; +#ifdef notdef + +void tcp_quench(int i, int errno) { struct tcpcb *tp = intotcpcb(inp); @@ -336,14 +330,12 @@ tcp_quench(i, errno) * for peer to send FIN or not respond to keep-alives, etc. * We can let the user exit from the close as soon as the FIN is acked. */ -void -tcp_sockclosed(tp) - struct tcpcb *tp; +void tcp_sockclosed(struct tcpcb *tp) { DEBUG_CALL("tcp_sockclosed"); DEBUG_ARG("tp = %lx", (long)tp); - + switch (tp->t_state) { case TCPS_CLOSED: @@ -369,34 +361,34 @@ tcp_sockclosed(tp) tcp_output(tp); } -/* +/* * Connect to a host on the Internet * Called by tcp_input * Only do a connect, the tcp fields will be set in tcp_input * return 0 if there's a result of the connect, * else return -1 means we're still connecting * The return value is almost always -1 since the socket is - * nonblocking. Connect returns after the SYN is sent, and does + * nonblocking. Connect returns after the SYN is sent, and does * not wait for ACK+SYN. */ -int tcp_fconnect(so) - struct socket *so; +int tcp_fconnect(struct socket *so) { int ret=0; - + DEBUG_CALL("tcp_fconnect"); DEBUG_ARG("so = %lx", (long )so); if( (ret=so->s=socket(AF_INET,SOCK_STREAM,0)) >= 0) { int opt, s=so->s; struct sockaddr_in addr; + memset(&addr, 0, sizeof(struct sockaddr_in)); fd_nonblock(s); opt = 1; setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(opt )); opt = 1; setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(opt )); - + addr.sin_family = AF_INET; if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { /* It's an alias */ @@ -413,12 +405,14 @@ int tcp_fconnect(so) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; + char addrstr[INET_ADDRSTRLEN]; DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " - "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + "addr.sin_addr.s_addr=%.16s\n", + ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, + addrstr, sizeof(addrstr)))); /* We don't care what port we get */ ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); - + /* * If it's not in progress, it failed, so we just return 0, * without clearing SS_NOFDREF @@ -431,29 +425,27 @@ int tcp_fconnect(so) /* * Accept the socket and connect to the local-host - * + * * We have a problem. The correct thing to do would be * to first connect to the local-host, and only if the * connection is accepted, then do an accept() here. - * But, a) we need to know who's trying to connect + * But, a) we need to know who's trying to connect * to the socket to be able to SYN the local-host, and * b) we are already connected to the foreign host by * the time it gets to accept(), so... We simply accept * here and SYN the local-host. - */ -void -tcp_connect(inso) - struct socket *inso; + */ +void tcp_connect(struct socket *inso) { struct socket *so; struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); + socklen_t addrlen = sizeof(struct sockaddr_in); struct tcpcb *tp; int s, opt; DEBUG_CALL("tcp_connect"); DEBUG_ARG("inso = %lx", (long)inso); - + /* * If it's an SS_ACCEPTONCE socket, no need to socreate() * another socket, just use the accept() socket. @@ -474,8 +466,8 @@ tcp_connect(inso) so->so_laddr = inso->so_laddr; so->so_lport = inso->so_lport; } - - (void) tcp_mss(sototcpcb(so), 0); + + tcp_mss(sototcpcb(so), 0); if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { tcp_close(sototcpcb(so)); /* This will sofree() as well */ @@ -488,13 +480,13 @@ tcp_connect(inso) setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); opt = 1; setsockopt(s,IPPROTO_TCP,TCP_NODELAY,(char *)&opt,sizeof(int)); - + so->so_fport = addr.sin_port; so->so_faddr = addr.sin_addr; /* Translate connections from localhost to the real hostname */ if (so->so_faddr.s_addr == 0 || so->so_faddr.s_addr == loopback_addr.s_addr) so->so_faddr = alias_addr; - + /* Close the accept() socket, set right state */ if (inso->so_state & SS_FACCEPTONCE) { closesocket(so->s); /* If we only accept once, close the accept() socket */ @@ -502,12 +494,12 @@ tcp_connect(inso) /* if it's not FACCEPTONCE, it's already NOFDREF */ } so->s = s; - + so->so_iptos = tcp_tos(so); tp = sototcpcb(so); tcp_template(tp); - + /* Compute window scaling to request. */ /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) @@ -515,11 +507,11 @@ tcp_connect(inso) */ /* soisconnecting(so); */ /* NOFDREF used instead */ - STAT(tcpstat.tcps_connattempt++); - + tcpstat.tcps_connattempt++; + tp->t_state = TCPS_SYN_SENT; tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; + tp->iss = tcp_iss; tcp_iss += TCP_ISSINCR/2; tcp_sendseqinit(tp); tcp_output(tp); @@ -528,13 +520,11 @@ tcp_connect(inso) /* * Attach a TCPCB to a socket. */ -int -tcp_attach(so) - struct socket *so; +int tcp_attach(struct socket *so) { if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) return -1; - + insque(so, &tcb); return 0; @@ -543,7 +533,7 @@ tcp_attach(so) /* * Set the socket's type of service field */ -static const struct tos_t tcptos[] = { +struct tos_t tcptos[] = { {0, 20, IPTOS_THROUGHPUT, 0}, /* ftp data */ {21, 21, IPTOS_LOWDELAY, EMU_FTP}, /* ftp control */ {0, 23, IPTOS_LOWDELAY, 0}, /* telnet */ @@ -559,21 +549,16 @@ static const struct tos_t tcptos[] = { {0, 0, 0, 0} }; -#ifdef CONFIG_QEMU -static -#endif struct emu_t *tcpemu = 0; - + /* * Return TOS according to the above table */ -u_int8_t -tcp_tos(so) - struct socket *so; +u_int8_t tcp_tos(struct socket *so) { int i = 0; struct emu_t *emup; - + while(tcptos[i].tos) { if ((tcptos[i].fport && (ntohs(so->so_fport) == tcptos[i].fport)) || (tcptos[i].lport && (ntohs(so->so_lport) == tcptos[i].lport))) { @@ -582,7 +567,7 @@ tcp_tos(so) } i++; } - + /* Nope, lets see if there's a user-added one */ for (emup = tcpemu; emup; emup = emup->next) { if ((emup->fport && (ntohs(so->so_fport) == emup->fport)) || @@ -591,73 +576,68 @@ tcp_tos(so) return emup->tos; } } - + return 0; } -#if 0 int do_echo = -1; -#endif /* * Emulate programs that try and connect to us * This includes ftp (the data connection is * initiated by the server) and IRC (DCC CHAT and * DCC SEND) for now - * + * * NOTE: It's possible to crash SLiRP by sending it * unstandard strings to emulate... if this is a problem, * more checks are needed here * * XXX Assumes the whole command came in one packet - * + * * XXX Some ftp clients will have their TOS set to * LOWDELAY and so Nagel will kick in. Because of this, * we'll get the first letter, followed by the rest, so * we simply scan for ORT instead of PORT... * DCC doesn't have this problem because there's other stuff * in the packet before the DCC command. - * - * Return 1 if the mbuf m is still valid and should be + * + * Return 1 if the mbuf m is still valid and should be * sbappend()ed - * + * * NOTE: if you return 0 you MUST m_free() the mbuf! */ -int -tcp_emu(so, m) - struct socket *so; - struct mbuf *m; +int tcp_emu(struct socket *so, struct mbuf *m) { u_int n1, n2, n3, n4, n5, n6; char buff[256]; u_int32_t laddr; u_int lport; char *bptr; - + DEBUG_CALL("tcp_emu"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - + switch(so->so_emu) { int x, i; - + case EMU_IDENT: /* * Identification protocol as per rfc-1413 */ - + { struct socket *tmpso; struct sockaddr_in addr; - int addrlen = sizeof(struct sockaddr_in); + socklen_t addrlen = sizeof(struct sockaddr_in); struct sbuf *so_rcv = &so->so_rcv; - + memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m->m_data[m->m_len] = 0; /* NULL terminate */ if (strchr(m->m_data, '\r') || strchr(m->m_data, '\n')) { - if (sscanf(so_rcv->sb_data, "%u%*[ ,]%u", &n1, &n2) == 2) { + if (sscanf(so_rcv->sb_data, "%d%*[ ,]%d", &n1, &n2) == 2) { HTONS(n1); HTONS(n2); /* n2 is the one on our host */ @@ -680,7 +660,7 @@ tcp_emu(so, m) m_free(m); return 0; } - + #if 0 case EMU_RLOGIN: /* @@ -695,7 +675,7 @@ tcp_emu(so, m) char term[100]; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* First check if they have a priveladged port, or too much data has arrived */ if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { @@ -706,13 +686,13 @@ tcp_emu(so, m) m_free(m); return 0; } - + /* Append the current data */ memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m_free(m); - + /* * Check if we have all the initial options, * and build argument list to rlogin while we're here @@ -744,10 +724,10 @@ tcp_emu(so, m) } } } - + if (n != 4) return 0; - + /* We have it, set our term variable and fork_exec() */ #ifdef HAVE_SETENV setenv("TERM", term, 1); @@ -757,15 +737,15 @@ tcp_emu(so, m) fork_exec(so, args, 2); term[0] = 0; so->so_emu = 0; - + /* And finally, send the client a 0 character */ so_snd->sb_wptr[0] = 0; so_snd->sb_wptr++; so_snd->sb_cc++; - + return 0; } - + case EMU_RSH: /* * rsh emulation @@ -779,7 +759,7 @@ tcp_emu(so, m) char *args; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* First check if they have a priveladged port, or too much data has arrived */ if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { @@ -790,13 +770,13 @@ tcp_emu(so, m) m_free(m); return 0; } - + /* Append the current data */ memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); so_rcv->sb_wptr += m->m_len; so_rcv->sb_rptr += m->m_len; m_free(m); - + /* * Check if we have all the initial options, * and build argument list to rlogin while we're here @@ -827,20 +807,20 @@ tcp_emu(so, m) ns->so_laddr=so->so_laddr; ns->so_lport=htons(port); - (void) tcp_mss(sototcpcb(ns), 0); + tcp_mss(sototcpcb(ns), 0); ns->so_faddr=so->so_faddr; ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ - if (ns->so_faddr.s_addr == 0 || + if (ns->so_faddr.s_addr == 0 || ns->so_faddr.s_addr == loopback_addr.s_addr) ns->so_faddr = alias_addr; ns->so_iptos = tcp_tos(ns); tp = sototcpcb(ns); - + tcp_template(tp); - + /* Compute window scaling to request. */ /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) @@ -849,11 +829,11 @@ tcp_emu(so, m) /*soisfconnecting(ns);*/ - STAT(tcpstat.tcps_connattempt++); - + tcpstat.tcps_connattempt++; + tp->t_state = TCPS_SYN_SENT; tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; + tp->iss = tcp_iss; tcp_iss += TCP_ISSINCR/2; tcp_sendseqinit(tp); tcp_output(tp); @@ -869,19 +849,19 @@ tcp_emu(so, m) } } } - + if (n != 4) return 0; - + rsh_exec(so,so->extra, user, inet_ntoa(so->so_faddr), args); so->so_emu = 0; so->extra=NULL; - + /* And finally, send the client a 0 character */ so_snd->sb_wptr[0] = 0; so_snd->sb_wptr++; so_snd->sb_cc++; - + return 0; } @@ -890,7 +870,7 @@ tcp_emu(so, m) int num; struct sbuf *so_snd = &so->so_snd; struct sbuf *so_rcv = &so->so_rcv; - + /* * If there is binary data here, we save it in so->so_m */ @@ -905,16 +885,16 @@ tcp_emu(so, m) } } } /* if(so->so_m==NULL) */ - + /* * Append the line */ sbappendsb(so_rcv, m); - + /* To avoid going over the edge of the buffer, we reset it */ if (so_snd->sb_cc == 0) so_snd->sb_wptr = so_snd->sb_rptr = so_snd->sb_data; - + /* * A bit of a hack: * If the first packet we get here is 1 byte long, then it @@ -933,13 +913,13 @@ tcp_emu(so, m) tcp_output(sototcpcb(so)); /* XXX */ } else m_free(m); - + num = 0; while (num < so->so_rcv.sb_cc) { if (*(so->so_rcv.sb_rptr + num) == '\n' || *(so->so_rcv.sb_rptr + num) == '\r') { int n; - + *(so_rcv->sb_rptr + num) = 0; if (ctl_password && !ctl_password_ok) { /* Need a password */ @@ -976,76 +956,76 @@ tcp_emu(so, m) } return 0; } -#endif +#endif case EMU_FTP: /* ftp */ *(m->m_data+m->m_len) = 0; /* NULL terminate for strstr */ if ((bptr = (char *)strstr(m->m_data, "ORT")) != NULL) { /* * Need to emulate the PORT command - */ - x = sscanf(bptr, "ORT %u,%u,%u,%u,%u,%u\r\n%256[^\177]", + */ + x = sscanf(bptr, "ORT %d,%d,%d,%d,%d,%d\r\n%256[^\177]", &n1, &n2, &n3, &n4, &n5, &n6, buff); if (x < 6) return 1; - + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); lport = htons((n5 << 8) | (n6)); - + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) return 1; - + n6 = ntohs(so->so_fport); - + n5 = (n6 >> 8) & 0xff; n6 &= 0xff; - + laddr = ntohl(so->so_faddr.s_addr); - + n1 = ((laddr >> 24) & 0xff); n2 = ((laddr >> 16) & 0xff); n3 = ((laddr >> 8) & 0xff); n4 = (laddr & 0xff); - + m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", + m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", n1, n2, n3, n4, n5, n6, x==7?buff:""); return 1; } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { /* * Need to emulate the PASV response */ - x = sscanf(bptr, "27 Entering Passive Mode (%u,%u,%u,%u,%u,%u)\r\n%256[^\177]", + x = sscanf(bptr, "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%256[^\177]", &n1, &n2, &n3, &n4, &n5, &n6, buff); if (x < 6) return 1; - + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); lport = htons((n5 << 8) | (n6)); - + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) return 1; - + n6 = ntohs(so->so_fport); - + n5 = (n6 >> 8) & 0xff; n6 &= 0xff; - + laddr = ntohl(so->so_faddr.s_addr); - + n1 = ((laddr >> 24) & 0xff); n2 = ((laddr >> 16) & 0xff); n3 = ((laddr >> 8) & 0xff); n4 = (laddr & 0xff); - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", n1, n2, n3, n4, n5, n6, x==7?buff:""); - + return 1; } - + return 1; - + case EMU_KSH: /* * The kshell (Kerberos rsh) and shell services both pass @@ -1054,7 +1034,7 @@ tcp_emu(so, m) * of the connection as a NUL-terminated decimal ASCII string. */ so->so_emu = 0; - for (lport = 0, i = 0; i < m->m_len-1; ++i) { + for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { if (m->m_data[i] < '0' || m->m_data[i] > '9') return 1; /* invalid number */ lport *= 10; @@ -1064,7 +1044,7 @@ tcp_emu(so, m) (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; return 1; - + case EMU_IRC: /* * Need to emulate DCC CHAT, DCC SEND and DCC MOVE @@ -1072,12 +1052,12 @@ tcp_emu(so, m) *(m->m_data+m->m_len) = 0; /* NULL terminate the string for strstr */ if ((bptr = (char *)strstr(m->m_data, "DCC")) == NULL) return 1; - + /* The %256s is for the broken mIRC */ if (sscanf(bptr, "DCC CHAT %256s %u %u", buff, &laddr, &lport) == 3) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", (unsigned long)ntohl(so->so_faddr.s_addr), @@ -1085,15 +1065,15 @@ tcp_emu(so, m) } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", + m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", buff, (unsigned long)ntohl(so->so_faddr.s_addr), ntohs(so->so_fport), n1, 1); } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) return 1; - + m->m_len = bptr - m->m_data; /* Adjust length */ m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", buff, (unsigned long)ntohl(so->so_faddr.s_addr), @@ -1102,7 +1082,7 @@ tcp_emu(so, m) return 1; case EMU_REALAUDIO: - /* + /* * RealAudio emulation - JP. We must try to parse the incoming * data and try to find the two characters that contain the * port number. Then we redirect an udp port and replace the @@ -1110,45 +1090,45 @@ tcp_emu(so, m) * * The 1.0 beta versions of the player are not supported * any more. - * + * * A typical packet for player version 1.0 (release version): - * - * 0000:50 4E 41 00 05 + * + * 0000:50 4E 41 00 05 * 0000:00 01 00 02 1B D7 00 00 67 E6 6C DC 63 00 12 50 .....×..gælÜc..P * 0010:4E 43 4C 49 45 4E 54 20 31 30 31 20 41 4C 50 48 NCLIENT 101 ALPH * 0020:41 6C 00 00 52 00 17 72 61 66 69 6C 65 73 2F 76 Al..R..rafiles/v * 0030:6F 61 2F 65 6E 67 6C 69 73 68 5F 2E 72 61 79 42 oa/english_.rayB - * + * * Now the port number 0x1BD7 is found at offset 0x04 of the * Now the port number 0x1BD7 is found at offset 0x04 of the * second packet. This time we received five bytes first and * then the rest. You never know how many bytes you get. * * A typical packet for player version 2.0 (beta): - * + * * 0000:50 4E 41 00 06 00 02 00 00 00 01 00 02 1B C1 00 PNA...........Á. * 0010:00 67 75 78 F5 63 00 0A 57 69 6E 32 2E 30 2E 30 .guxõc..Win2.0.0 * 0020:2E 35 6C 00 00 52 00 1C 72 61 66 69 6C 65 73 2F .5l..R..rafiles/ * 0030:77 65 62 73 69 74 65 2F 32 30 72 65 6C 65 61 73 website/20releas * 0040:65 2E 72 61 79 53 00 00 06 36 42 e.rayS...6B - * + * * Port number 0x1BC1 is found at offset 0x0d. - * + * * This is just a horrible switch statement. Variable ra tells * us where we're going. */ - + bptr = m->m_data; while (bptr < m->m_data + m->m_len) { u_short p; static int ra = 0; - char ra_tbl[4]; - + char ra_tbl[4]; + ra_tbl[0] = 0x50; ra_tbl[1] = 0x4e; ra_tbl[2] = 0x41; ra_tbl[3] = 0; - + switch (ra) { case 0: case 2: @@ -1158,7 +1138,7 @@ tcp_emu(so, m) continue; } break; - + case 1: /* * We may get 0x50 several times, ignore them @@ -1172,15 +1152,15 @@ tcp_emu(so, m) continue; } break; - - case 4: - /* + + case 4: + /* * skip version number */ bptr++; break; - - case 5: + + case 5: /* * The difference between versions 1.0 and * 2.0 is here. For future versions of @@ -1190,19 +1170,19 @@ tcp_emu(so, m) bptr += 8; else bptr += 4; - break; - + break; + case 6: /* This is the field containing the port * number that RA-player is listening to. */ - lport = (((u_char*)bptr)[0] << 8) + lport = (((u_char*)bptr)[0] << 8) + ((u_char *)bptr)[1]; - if (lport < 6970) + if (lport < 6970) lport += 256; /* don't know why */ if (lport < 6970 || lport > 7170) return 1; /* failed */ - + /* try to get udp port between 6970 - 7170 */ for (p = 6970; p < 7071; p++) { if (udp_listen( htons(p), @@ -1216,17 +1196,17 @@ tcp_emu(so, m) p = 0; *(u_char *)bptr++ = (p >> 8) & 0xff; *(u_char *)bptr++ = p & 0xff; - ra = 0; + ra = 0; return 1; /* port redirected, we're done */ - break; - + break; + default: - ra = 0; + ra = 0; } ra++; } - return 1; - + return 1; + default: /* Ooops, not emulated, won't call tcp_emu again */ so->so_emu = 0; @@ -1239,19 +1219,17 @@ tcp_emu(so, m) * Return 0 if this connections is to be closed, 1 otherwise, * return 2 if this is a command-line connection */ -int -tcp_ctl(so) - struct socket *so; +int tcp_ctl(struct socket *so) { struct sbuf *sb = &so->so_snd; int command; struct ex_list *ex_ptr; int do_pty; // struct socket *tmpso; - + DEBUG_CALL("tcp_ctl"); DEBUG_ARG("so = %lx", (long )so); - + #if 0 /* * Check if they're authorised @@ -1261,12 +1239,12 @@ tcp_ctl(so) sb->sb_wptr += sb->sb_cc; return 0; } -#endif +#endif command = (ntohl(so->so_faddr.s_addr) & 0xff); - + switch(command) { default: /* Check for exec's */ - + /* * Check if it's pty_exec */ @@ -1277,12 +1255,12 @@ tcp_ctl(so) goto do_exec; } } - + /* * Nothing bound.. */ /* tcp_fconnect(so); */ - + /* FALLTHROUGH */ case CTL_ALIAS: sb->sb_cc = sprintf(sb->sb_wptr, @@ -1293,12 +1271,12 @@ tcp_ctl(so) do_exec: DEBUG_MISC((dfd, " executing %s \n",ex_ptr->ex_exec)); return(fork_exec(so, ex_ptr->ex_exec, do_pty)); - + #if 0 case CTL_CMD: for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_emu == EMU_CTL && - !(tmpso->so_tcpcb? + if (tmpso->so_emu == EMU_CTL && + !(tmpso->so_tcpcb? (tmpso->so_tcpcb->t_state & (TCPS_TIME_WAIT|TCPS_LAST_ACK)) :0)) { /* Ooops, control connection already active */ diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c index 244bad6a8..ab9aa580d 100644 --- a/BasiliskII/src/slirp/tcp_timer.c +++ b/BasiliskII/src/slirp/tcp_timer.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -36,14 +32,14 @@ #include -#ifdef LOG_ENABLED -struct tcpstat tcpstat; /* tcp statistics */ -#endif +int tcp_keepidle = TCPTV_KEEP_IDLE; +int tcp_keepintvl = TCPTV_KEEPINTVL; +int tcp_maxidle; +int so_options = DO_KEEPALIVE; +struct tcpstat tcpstat; /* tcp statistics */ u_int32_t tcp_now; /* for RFC 1323 timestamps */ -static struct tcpcb *tcp_timers(register struct tcpcb *tp, int timer); - /* * Fast timeout routine for processing delayed acks */ @@ -54,7 +50,7 @@ tcp_fasttimo() register struct tcpcb *tp; DEBUG_CALL("tcp_fasttimo"); - + so = tcb.so_next; if (so) for (; so != &tcb; so = so->so_next) @@ -62,7 +58,7 @@ tcp_fasttimo() (tp->t_flags & TF_DELACK)) { tp->t_flags &= ~TF_DELACK; tp->t_flags |= TF_ACKNOW; - STAT(tcpstat.tcps_delack++); + tcpstat.tcps_delack++; (void) tcp_output(tp); } } @@ -80,7 +76,8 @@ tcp_slowtimo() register int i; DEBUG_CALL("tcp_slowtimo"); - + + tcp_maxidle = TCPTV_KEEPCNT * tcp_keepintvl; /* * Search through tcb's and update active timers. */ @@ -126,19 +123,21 @@ tcp_canceltimers(tp) tp->t_timer[i] = 0; } -const int tcp_backoff[TCP_MAXRXTSHIFT + 1] = +int tcp_backoff[TCP_MAXRXTSHIFT + 1] = { 1, 2, 4, 8, 16, 32, 64, 64, 64, 64, 64, 64, 64 }; /* * TCP timer processing. */ -static struct tcpcb * -tcp_timers(register struct tcpcb *tp, int timer) +struct tcpcb * +tcp_timers(tp, timer) + register struct tcpcb *tp; + int timer; { register int rexmt; - + DEBUG_CALL("tcp_timers"); - + switch (timer) { /* @@ -149,8 +148,8 @@ tcp_timers(register struct tcpcb *tp, int timer) */ case TCPT_2MSL: if (tp->t_state != TCPS_TIME_WAIT && - tp->t_idle <= TCP_MAXIDLE) - tp->t_timer[TCPT_2MSL] = TCPTV_KEEPINTVL; + tp->t_idle <= tcp_maxidle) + tp->t_timer[TCPT_2MSL] = tcp_keepintvl; else tp = tcp_close(tp); break; @@ -161,12 +160,12 @@ tcp_timers(register struct tcpcb *tp, int timer) * to a longer retransmit interval and retransmit one segment. */ case TCPT_REXMT: - + /* * XXXXX If a packet has timed out, then remove all the queued * packets for that session. */ - + if (++tp->t_rxtshift > TCP_MAXRXTSHIFT) { /* * This is a hack to suit our terminal server here at the uni of canberra @@ -175,33 +174,33 @@ tcp_timers(register struct tcpcb *tp, int timer) * keep retransmitting it, it'll keep eating the zeroes, so we keep * retransmitting, and eventually the connection dies... * (this only happens on incoming data) - * + * * So, if we were gonna drop the connection from too many retransmits, * don't... instead halve the t_maxseg, which might break up the NULLs and * let them through - * + * * *sigh* */ - + tp->t_maxseg >>= 1; if (tp->t_maxseg < 32) { /* * We tried our best, now the connection must die! */ tp->t_rxtshift = TCP_MAXRXTSHIFT; - STAT(tcpstat.tcps_timeoutdrop++); + tcpstat.tcps_timeoutdrop++; tp = tcp_drop(tp, tp->t_softerror); /* tp->t_softerror : ETIMEDOUT); */ /* XXX */ return (tp); /* XXX */ } - + /* * Set rxtshift to 6, which is still at the maximum * backoff time */ tp->t_rxtshift = 6; } - STAT(tcpstat.tcps_rexmttimeo++); + tcpstat.tcps_rexmttimeo++; rexmt = TCP_REXMTVAL(tp) * tcp_backoff[tp->t_rxtshift]; TCPT_RANGESET(tp->t_rxtcur, rexmt, (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ @@ -237,7 +236,7 @@ tcp_timers(register struct tcpcb *tp, int timer) * size increase exponentially with time. If the * window is larger than the path can handle, this * exponential growth results in dropped packet(s) - * almost immediately. To get more time between + * almost immediately. To get more time between * drops but still "push" the network to take advantage * of improving conditions, we switch from exponential * to linear window opening at some threshold size. @@ -264,7 +263,7 @@ tcp_timers(register struct tcpcb *tp, int timer) * Force a byte to be output, if possible. */ case TCPT_PERSIST: - STAT(tcpstat.tcps_persisttimeo++); + tcpstat.tcps_persisttimeo++; tcp_setpersist(tp); tp->t_force = 1; (void) tcp_output(tp); @@ -276,13 +275,13 @@ tcp_timers(register struct tcpcb *tp, int timer) * or drop connection if idle for too long. */ case TCPT_KEEP: - STAT(tcpstat.tcps_keeptimeo++); + tcpstat.tcps_keeptimeo++; if (tp->t_state < TCPS_ESTABLISHED) goto dropit; /* if (tp->t_socket->so_options & SO_KEEPALIVE && */ - if ((SO_OPTIONS) && tp->t_state <= TCPS_CLOSE_WAIT) { - if (tp->t_idle >= TCPTV_KEEP_IDLE + TCP_MAXIDLE) + if ((so_options) && tp->t_state <= TCPS_CLOSE_WAIT) { + if (tp->t_idle >= tcp_keepidle + tcp_maxidle) goto dropit; /* * Send a packet designed to force a response @@ -296,7 +295,7 @@ tcp_timers(register struct tcpcb *tp, int timer) * by the protocol spec, this requires the * correspondent TCP to respond. */ - STAT(tcpstat.tcps_keepprobe++); + tcpstat.tcps_keepprobe++; #ifdef TCP_COMPAT_42 /* * The keepalive packet must have nonzero length @@ -308,13 +307,13 @@ tcp_timers(register struct tcpcb *tp, int timer) tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, tp->rcv_nxt, tp->snd_una - 1, 0); #endif - tp->t_timer[TCPT_KEEP] = TCPTV_KEEPINTVL; + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; } else - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_IDLE; + tp->t_timer[TCPT_KEEP] = tcp_keepidle; break; dropit: - STAT(tcpstat.tcps_keepdrops++); + tcpstat.tcps_keepdrops++; tp = tcp_drop(tp, 0); /* ETIMEDOUT); */ break; } diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h index f251846b4..73fe20894 100644 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -126,12 +122,17 @@ char *tcptimers[] = (tv) = (tvmax); \ } -extern const int tcp_backoff[]; +extern int tcp_keepidle; /* time before keepalive probes begin */ +extern int tcp_keepintvl; /* time between keepalive probes */ +extern int tcp_maxidle; /* time to drop after starting probes */ +extern int tcp_ttl; /* time to live for TCP segs */ +extern int tcp_backoff[]; struct tcpcb; -void tcp_fasttimo _P((void)); -void tcp_slowtimo _P((void)); -void tcp_canceltimers _P((struct tcpcb *)); +void tcp_fasttimo(void); +void tcp_slowtimo(void); +void tcp_canceltimers(struct tcpcb *); +struct tcpcb * tcp_timers(register struct tcpcb *, int); #endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h index 82380f936..c8e99ae03 100644 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -185,7 +181,6 @@ typedef u_int32_t mbufp_32; #endif #define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) -#ifdef LOG_ENABLED /* * TCP statistics. * Many of these should be kept per connection, @@ -248,8 +243,6 @@ struct tcpstat { }; extern struct tcpstat tcpstat; /* tcp statistics */ -#endif - extern u_int32_t tcp_now; /* for RFC 1323 timestamps */ #endif diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h index 82708b09c..dff5a3c96 100644 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c index 562ae8953..3ba2971c3 100644 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -1,8 +1,8 @@ /* * tftp.c - a simple, read-only tftp server for qemu - * + * * Copyright (c) 2004 Magnus Damm - * + * * 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 @@ -26,15 +26,15 @@ struct tftp_session { int in_use; - unsigned char filename[TFTP_FILENAME_MAX]; - + char filename[TFTP_FILENAME_MAX]; + struct in_addr client_ip; u_int16_t client_port; - + int timestamp; }; -static struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; +struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; const char *tftp_prefix; @@ -102,15 +102,8 @@ static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, { int fd; int bytes_read = 0; - char buffer[1024]; - int n; - - n = snprintf(buffer, sizeof(buffer), "%s/%s", - tftp_prefix, spt->filename); - if (n >= sizeof(buffer)) - return -1; - fd = open(buffer, O_RDONLY | O_BINARY); + fd = open(spt->filename, O_RDONLY | O_BINARY); if (fd < 0) { return -1; @@ -127,53 +120,13 @@ static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, return bytes_read; } -static int tftp_send_oack(struct tftp_session *spt, - const char *key, uint32_t value, - struct tftp_t *recv_tp) -{ - struct sockaddr_in saddr, daddr; - struct mbuf *m; - struct tftp_t *tp; - int n = 0; - - m = m_get(); - - if (!m) - return -1; - - memset(m->m_data, 0, m->m_size); - - m->m_data += IF_MAXLINKHDR; - tp = (void *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - - tp->tp_op = htons(TFTP_OACK); - n += sprintf(tp->x.tp_buf + n, "%s", key) + 1; - n += sprintf(tp->x.tp_buf + n, "%u", value) + 1; - - saddr.sin_addr = recv_tp->ip.ip_dst; - saddr.sin_port = recv_tp->udp.uh_dport; - - daddr.sin_addr = spt->client_ip; - daddr.sin_port = spt->client_port; - - m->m_len = sizeof(struct tftp_t) - 514 + n - - sizeof(struct ip) - sizeof(struct udphdr); - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); - - return 0; -} - - - -static int tftp_send_error(struct tftp_session *spt, +static int tftp_send_error(struct tftp_session *spt, u_int16_t errorcode, const char *msg, struct tftp_t *recv_tp) { struct sockaddr_in saddr, daddr; struct mbuf *m; struct tftp_t *tp; - int nobytes; m = m_get(); @@ -183,13 +136,14 @@ static int tftp_send_error(struct tftp_session *spt, memset(m->m_data, 0, m->m_size); - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; tp = (void *)m->m_data; m->m_data += sizeof(struct udpiphdr); - + tp->tp_op = htons(TFTP_ERROR); tp->x.tp_error.tp_error_code = htons(errorcode); - strcpy(tp->x.tp_error.tp_msg, msg); + strncpy((char *)tp->x.tp_error.tp_msg, msg, sizeof(tp->x.tp_error.tp_msg)); + tp->x.tp_error.tp_msg[sizeof(tp->x.tp_error.tp_msg)-1] = 0; saddr.sin_addr = recv_tp->ip.ip_dst; saddr.sin_port = recv_tp->udp.uh_dport; @@ -197,9 +151,7 @@ static int tftp_send_error(struct tftp_session *spt, daddr.sin_addr = spt->client_ip; daddr.sin_port = spt->client_port; - nobytes = 2; - - m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - + m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); @@ -209,7 +161,7 @@ static int tftp_send_error(struct tftp_session *spt, return 0; } -static int tftp_send_data(struct tftp_session *spt, +static int tftp_send_data(struct tftp_session *spt, u_int16_t block_nr, struct tftp_t *recv_tp) { @@ -230,10 +182,10 @@ static int tftp_send_data(struct tftp_session *spt, memset(m->m_data, 0, m->m_size); - m->m_data += IF_MAXLINKHDR; + m->m_data += if_maxlinkhdr; tp = (void *)m->m_data; m->m_data += sizeof(struct udpiphdr); - + tp->tp_op = htons(TFTP_DATA); tp->x.tp_data.tp_block_nr = htons(block_nr); @@ -255,7 +207,7 @@ static int tftp_send_data(struct tftp_session *spt, return -1; } - m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - + m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - sizeof(struct ip) - sizeof(struct udphdr); udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); @@ -285,7 +237,7 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) spt = &tftp_sessions[s]; src = tp->x.tp_buf; - dst = spt->filename; + dst = (u_int8_t *)spt->filename; n = pktlen - ((uint8_t *)&tp->x.tp_buf[0] - (uint8_t *)tp); /* get name */ @@ -297,30 +249,28 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) else { return; } - + if (src[k] == '\0') { break; } } - + if (k >= n) { return; } - + k++; - + /* check mode */ if ((n - k) < 6) { return; } - + if (memcmp(&src[k], "octet\0", 6) != 0) { tftp_send_error(spt, 4, "Unsupported transfer mode", tp); return; } - k += 6; /* skipping octet */ - /* do sanity checks on the filename */ if ((spt->filename[0] != '/') @@ -332,60 +282,19 @@ static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) /* only allow exported prefixes */ - if (!tftp_prefix) { + if (!tftp_prefix + || (strncmp(spt->filename, tftp_prefix, strlen(tftp_prefix)) != 0)) { tftp_send_error(spt, 2, "Access violation", tp); return; } /* check if the file exists */ - - if (tftp_read_data(spt, 0, spt->filename, 0) < 0) { + + if (tftp_read_data(spt, 0, (u_int8_t *)spt->filename, 0) < 0) { tftp_send_error(spt, 1, "File not found", tp); return; } - if (src[n - 1] != 0) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - while (k < n) { - const char *key, *value; - - key = src + k; - k += strlen(key) + 1; - - if (k >= n) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - value = src + k; - k += strlen(value) + 1; - - if (strcmp(key, "tsize") == 0) { - int tsize = atoi(value); - struct stat stat_p; - - if (tsize == 0 && tftp_prefix) { - char buffer[1024]; - int len; - - len = snprintf(buffer, sizeof(buffer), "%s/%s", - tftp_prefix, spt->filename); - - if (stat(buffer, &stat_p) == 0) - tsize = stat_p.st_size; - else { - tftp_send_error(spt, 1, "File not found", tp); - return; - } - } - - tftp_send_oack(spt, "tsize", tsize, tp); - } - } - tftp_send_data(spt, 1, tp); } @@ -399,8 +308,8 @@ static void tftp_handle_ack(struct tftp_t *tp, int pktlen) return; } - if (tftp_send_data(&tftp_sessions[s], - ntohs(tp->x.tp_data.tp_block_nr) + 1, + if (tftp_send_data(&tftp_sessions[s], + ntohs(tp->x.tp_data.tp_block_nr) + 1, tp) < 0) { return; } diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h index 8f2675e07..b150a0490 100644 --- a/BasiliskII/src/slirp/tftp.h +++ b/BasiliskII/src/slirp/tftp.h @@ -9,25 +9,32 @@ #define TFTP_DATA 3 #define TFTP_ACK 4 #define TFTP_ERROR 5 -#define TFTP_OACK 6 #define TFTP_FILENAME_MAX 512 +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct tftp_t { struct ip ip; struct udphdr udp; u_int16_t tp_op; union { - struct { + struct { u_int16_t tp_block_nr; u_int8_t tp_buf[512]; } tp_data; - struct { + struct { u_int16_t tp_error_code; u_int8_t tp_msg[512]; } tp_error; u_int8_t tp_buf[512 + 2]; } x; -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index c48923b0c..9d805ff37 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -37,31 +33,27 @@ /* * Changes and additions relating to SLiRP * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the + * + * Please read the file COPYRIGHT for the * terms and conditions of the copyright. */ +#include #include #include "ip_icmp.h" -#ifdef LOG_ENABLED struct udpstat udpstat; -#endif struct socket udb; -static u_int8_t udp_tos(struct socket *so); -static void udp_emu(struct socket *so, struct mbuf *m); - /* * UDP protocol implementation. * Per RFC 768, August, 1980. */ #ifndef COMPAT_42 -#define UDPCKSUM 1 +int udpcksum = 1; #else -#define UDPCKSUM 0 /* XXX */ +int udpcksum = 0; /* XXX */ #endif struct socket *udp_last_so = &udb; @@ -71,8 +63,8 @@ udp_init() { udb.so_next = udb.so_prev = &udb; } -/* m->m_data points at ip packet header - * m->m_len length ip packet +/* m->m_data points at ip packet header + * m->m_len length ip packet * ip->ip_len length data (IPDU) */ void @@ -84,14 +76,14 @@ udp_input(m, iphlen) register struct udphdr *uh; /* struct mbuf *opts = 0;*/ int len; - struct ip save_ip; + struct ip save_ip; struct socket *so; - + DEBUG_CALL("udp_input"); DEBUG_ARG("m = %lx", (long)m); DEBUG_ARG("iphlen = %d", iphlen); - - STAT(udpstat.udps_ipackets++); + + udpstat.udps_ipackets++; /* * Strip IP options, if any; should skip this, @@ -118,34 +110,34 @@ udp_input(m, iphlen) if (ip->ip_len != len) { if (len > ip->ip_len) { - STAT(udpstat.udps_badlen++); + udpstat.udps_badlen++; goto bad; } m_adj(m, len - ip->ip_len); ip->ip_len = len; } - + /* * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - save_ip = *ip; + save_ip = *ip; save_ip.ip_len+= iphlen; /* tcp_input subtracts this */ /* * Checksum extended UDP header and data. */ - if (UDPCKSUM && uh->uh_sum) { + if (udpcksum && uh->uh_sum) { ((struct ipovly *)ip)->ih_next = 0; ((struct ipovly *)ip)->ih_prev = 0; ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply - * uh->uh_sum = cksum(m, len + sizeof (struct ip)); - * if (uh->uh_sum) { + * uh->uh_sum = cksum(m, len + sizeof (struct ip)); + * if (uh->uh_sum) { */ if(cksum(m, len + sizeof(struct ip))) { - STAT(udpstat.udps_badsum++); + udpstat.udps_badsum++; goto bad; } } @@ -173,7 +165,7 @@ udp_input(m, iphlen) if (so->so_lport != uh->uh_sport || so->so_laddr.s_addr != ip->ip_src.s_addr) { struct socket *tmp; - + for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next) { if (tmp->so_lport == uh->uh_sport && tmp->so_laddr.s_addr == ip->ip_src.s_addr) { @@ -186,11 +178,11 @@ udp_input(m, iphlen) if (tmp == &udb) { so = NULL; } else { - STAT(udpstat.udpps_pcbcachemiss++); + udpstat.udpps_pcbcachemiss++; udp_last_so = so; } } - + if (so == NULL) { /* * If there's no socket for this packet, @@ -198,22 +190,22 @@ udp_input(m, iphlen) */ if ((so = socreate()) == NULL) goto bad; if(udp_attach(so) == -1) { - DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", + DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", errno,strerror(errno))); sofree(so); goto bad; } - + /* * Setup fields */ /* udp_last_so = so; */ so->so_laddr = ip->ip_src; so->so_lport = uh->uh_sport; - + if ((so->so_iptos = udp_tos(so)) == 0) so->so_iptos = ip->ip_tos; - + /* * XXXXX Here, check if it's in udpexec_list, * and if it is, do the fork_exec() etc. @@ -238,7 +230,7 @@ udp_input(m, iphlen) m->m_data -= iphlen; *ip=save_ip; DEBUG_MISC((dfd,"udp tx errno = %d-%s\n",errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); } m_free(so->so_m); /* used for ICMP if error on sorecvfrom */ @@ -256,7 +248,7 @@ udp_input(m, iphlen) return; } -int udp_output2(struct socket *so, struct mbuf *m, +int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos) { @@ -274,16 +266,19 @@ int udp_output2(struct socket *so, struct mbuf *m, */ m->m_data -= sizeof(struct udpiphdr); m->m_len += sizeof(struct udpiphdr); - + /* * Fill in mbuf with extended UDP header * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; + //ui->ui_next = ui->ui_prev = 0; + + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ + ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ ui->ui_src = saddr->sin_addr; ui->ui_dst = daddr->sin_addr; @@ -295,23 +290,23 @@ int udp_output2(struct socket *so, struct mbuf *m, * Stuff checksum and output datagram. */ ui->ui_sum = 0; - if (UDPCKSUM) { + if (udpcksum) { if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) ui->ui_sum = 0xffff; } - ((struct ip *)ui)->ip_len = m->m_len; + ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; - ((struct ip *)ui)->ip_ttl = IPDEFTTL; + ((struct ip *)ui)->ip_ttl = ip_defttl; ((struct ip *)ui)->ip_tos = iptos; - - STAT(udpstat.udps_opackets++); - + + udpstat.udps_opackets++; + error = ip_output(so, m); - + return (error); } -int udp_output(struct socket *so, struct mbuf *m, +int udp_output(struct socket *so, struct mbuf *m, struct sockaddr_in *addr) { @@ -325,7 +320,7 @@ int udp_output(struct socket *so, struct mbuf *m, } daddr.sin_addr = so->so_laddr; daddr.sin_port = so->so_lport; - + return udp_output2(so, m, &saddr, &daddr, so->so_iptos); } @@ -334,25 +329,22 @@ udp_attach(so) struct socket *so; { struct sockaddr_in addr; - + if((so->s = socket(AF_INET,SOCK_DGRAM,0)) != -1) { /* * Here, we bind() the socket. Although not really needed * (sendto() on an unbound socket will bind it), it's done * here so that emulation of ytalk etc. don't have to do it */ + memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int lasterrno=errno; + int error = WSAGetLastError(); closesocket(so->s); so->s=-1; -#ifdef _WIN32 - WSASetLastError(lasterrno); -#else - errno=lasterrno; -#endif + WSASetLastError(error); } else { /* success, insert in queue */ so->so_expire = curtime + SO_EXPIRE; @@ -372,7 +364,7 @@ udp_detach(so) sofree(so); } -static const struct tos_t udptos[] = { +struct tos_t udptos[] = { {0, 53, IPTOS_LOWDELAY, 0}, /* DNS */ {517, 517, IPTOS_LOWDELAY, EMU_TALK}, /* talk */ {518, 518, IPTOS_LOWDELAY, EMU_NTALK}, /* ntalk */ @@ -380,11 +372,12 @@ static const struct tos_t udptos[] = { {0, 0, 0, 0} }; -static u_int8_t -udp_tos(struct socket *so) +u_int8_t +udp_tos(so) + struct socket *so; { int i = 0; - + while(udptos[i].tos) { if ((udptos[i].fport && ntohs(so->so_fport) == udptos[i].fport) || (udptos[i].lport && ntohs(so->so_lport) == udptos[i].lport)) { @@ -393,7 +386,7 @@ udp_tos(struct socket *so) } i++; } - + return 0; } @@ -404,27 +397,29 @@ udp_tos(struct socket *so) /* * Here, talk/ytalk/ntalk requests must be emulated */ -static void -udp_emu(struct socket *so, struct mbuf *m) +void +udp_emu(so, m) + struct socket *so; + struct mbuf *m; { struct sockaddr_in addr; - int addrlen = sizeof(addr); + socklen_t addrlen = sizeof(addr); #ifdef EMULATE_TALK CTL_MSG_OLD *omsg; CTL_MSG *nmsg; char buff[sizeof(CTL_MSG)]; u_char type; - + struct talk_request { struct talk_request *next; struct socket *udp_so; struct socket *tcp_so; } *req; - - static struct talk_request *req_tbl = 0; - + + static struct talk_request *req_tbl = 0; + #endif - + struct cu_header { uint16_t d_family; // destination family uint16_t d_port; // destination port @@ -451,7 +446,7 @@ struct cu_header { */ if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) return; - + #define IS_OLD (so->so_emu == EMU_TALK) #define COPY_MSG(dest, src) { dest->type = src->type; \ @@ -474,7 +469,7 @@ struct cu_header { OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); - } else { /* new talk */ + } else { /* new talk */ omsg = (CTL_MSG_OLD *) buff; nmsg = mtod(m, CTL_MSG *); type = nmsg->type; @@ -482,10 +477,10 @@ struct cu_header { OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); } - - if (type == LOOK_UP) + + if (type == LOOK_UP) return; /* for LOOK_UP this is enough */ - + if (IS_OLD) { /* make a copy of the message */ COPY_MSG(nmsg, omsg); nmsg->vers = 1; @@ -504,75 +499,75 @@ struct cu_header { * ports, 517 and 518. This is why we have two copies * of the message, one in old talk and one in new talk * format. - */ + */ if (type == ANNOUNCE) { int s; u_short temp_port; - + for(req = req_tbl; req; req = req->next) if (so == req->udp_so) break; /* found it */ - + if (!req) { /* no entry for so, create new */ req = (struct talk_request *) malloc(sizeof(struct talk_request)); req->udp_so = so; - req->tcp_so = solisten(0, - OTOSIN(omsg, addr)->sin_addr.s_addr, + req->tcp_so = solisten(0, + OTOSIN(omsg, addr)->sin_addr.s_addr, OTOSIN(omsg, addr)->sin_port, SS_FACCEPTONCE); req->next = req_tbl; req_tbl = req; - } - + } + /* replace port number in addr field */ addrlen = sizeof(addr); - getsockname(req->tcp_so->s, + getsockname(req->tcp_so->s, (struct sockaddr *) &addr, - &addrlen); + &addrlen); OTOSIN(omsg, addr)->sin_port = addr.sin_port; OTOSIN(omsg, addr)->sin_addr = our_addr; OTOSIN(nmsg, addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, addr)->sin_addr = our_addr; - + OTOSIN(nmsg, addr)->sin_addr = our_addr; + /* send LEAVE_INVITEs */ temp_port = OTOSIN(omsg, ctl_addr)->sin_port; OTOSIN(omsg, ctl_addr)->sin_port = 0; OTOSIN(nmsg, ctl_addr)->sin_port = 0; - omsg->type = nmsg->type = LEAVE_INVITE; - + omsg->type = nmsg->type = LEAVE_INVITE; + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); addr.sin_addr = our_addr; addr.sin_family = AF_INET; addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, + sendto(s, (char *)omsg, sizeof(*omsg), 0, (struct sockaddr *)&addr, sizeof(addr)); addr.sin_port = htons(518); sendto(s, (char *)nmsg, sizeof(*nmsg), 0, (struct sockaddr *) &addr, sizeof(addr)); closesocket(s) ; - omsg->type = nmsg->type = ANNOUNCE; + omsg->type = nmsg->type = ANNOUNCE; OTOSIN(omsg, ctl_addr)->sin_port = temp_port; OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; } - - /* + + /* * If it is a DELETE message, we send a copy to the * local daemons. Then we delete the entry corresponding * to our socket from the request table. */ - + if (type == DELETE) { struct talk_request *temp_req, *req_next; int s; u_short temp_port; - + temp_port = OTOSIN(omsg, ctl_addr)->sin_port; OTOSIN(omsg, ctl_addr)->sin_port = 0; OTOSIN(nmsg, ctl_addr)->sin_port = 0; - + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); addr.sin_addr = our_addr; addr.sin_family = AF_INET; @@ -583,7 +578,7 @@ struct cu_header { sendto(s, (char *)nmsg, sizeof(*nmsg), 0, (struct sockaddr *)&addr, sizeof(addr)); closesocket(s); - + OTOSIN(omsg, ctl_addr)->sin_port = temp_port; OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; @@ -606,18 +601,18 @@ struct cu_header { } } } - - return; + + return; #endif - + case EMU_CUSEEME: - + /* * Cu-SeeMe emulation. * Hopefully the packet is more that 16 bytes long. We don't * do any other tests, just replace the address and port * fields. - */ + */ if (m->m_len >= sizeof (*cu_head)) { if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) return; @@ -625,7 +620,7 @@ struct cu_header { cu_head->s_port = addr.sin_port; cu_head->so_addr = our_addr.s_addr; } - + return; } } @@ -639,8 +634,9 @@ udp_listen(port, laddr, lport, flags) { struct sockaddr_in addr; struct socket *so; - int addrlen = sizeof(struct sockaddr_in), opt = 1; - + socklen_t addrlen = sizeof(struct sockaddr_in); + int opt = 1; + if ((so = socreate()) == NULL) { free(so); return NULL; @@ -649,6 +645,7 @@ udp_listen(port, laddr, lport, flags) so->so_expire = curtime + SO_EXPIRE; insque(so,&udb); + memset(&addr, 0, sizeof(struct sockaddr_in)); addr.sin_family = AF_INET; addr.sin_addr.s_addr = INADDR_ANY; addr.sin_port = port; @@ -659,20 +656,20 @@ udp_listen(port, laddr, lport, flags) } setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); /* setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); */ - + getsockname(so->s,(struct sockaddr *)&addr,&addrlen); so->so_fport = addr.sin_port; if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) so->so_faddr = alias_addr; else so->so_faddr = addr.sin_addr; - + so->so_lport = lport; so->so_laddr.s_addr = laddr; if (flags != SS_FACCEPTONCE) so->so_expire = 0; - + so->so_state = SS_ISFCONNECTED; - + return so; } diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h index 4f69b098c..7d844efe2 100644 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -10,11 +10,7 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors + * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * @@ -46,12 +42,20 @@ extern struct socket *udp_last_so; * Udp protocol header. * Per RFC 768, September, 1981. */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + struct udphdr { u_int16_t uh_sport; /* source port */ u_int16_t uh_dport; /* destination port */ int16_t uh_ulen; /* udp length */ u_int16_t uh_sum; /* udp checksum */ -}; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(PACK_RESET) +#endif /* * UDP kernel structures and variables. @@ -72,7 +76,6 @@ struct udpiphdr { #define ui_ulen ui_u.uh_ulen #define ui_sum ui_u.uh_sum -#ifdef LOG_ENABLED struct udpstat { /* input statistics: */ u_long udps_ipackets; /* total input packets */ @@ -86,7 +89,6 @@ struct udpstat { /* output statistics: */ u_long udps_opackets; /* total output packets */ }; -#endif /* * Names for UDP sysctl objects @@ -94,20 +96,19 @@ struct udpstat { #define UDPCTL_CHECKSUM 1 /* checksum UDP packets */ #define UDPCTL_MAXID 2 -#ifdef LOG_ENABLED extern struct udpstat udpstat; -#endif - extern struct socket udb; struct mbuf; -void udp_init _P((void)); -void udp_input _P((register struct mbuf *, int)); -int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); -int udp_attach _P((struct socket *)); -void udp_detach _P((struct socket *)); -struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); -int udp_output2(struct socket *so, struct mbuf *m, +void udp_init(void); +void udp_input(register struct mbuf *, int); +int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); +int udp_attach(struct socket *); +void udp_detach(struct socket *); +u_int8_t udp_tos(struct socket *); +void udp_emu(struct socket *, struct mbuf *); +struct socket * udp_listen(u_int, u_int32_t, u_int, int); +int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos); #endif From dc0663b72d78655210ee7685bb8193ceec699969 Mon Sep 17 00:00:00 2001 From: jvernet Date: Wed, 4 Oct 2017 18:22:53 +0200 Subject: [PATCH 171/534] Revert "64 bits slirp ?" This reverts commit 000ec0f135c7509a13b3c2bacd26f9ce27503c80. --- BasiliskII/src/slirp/tcp_input.c | 6 +----- BasiliskII/src/slirp/udp.c | 5 +---- 2 files changed, 2 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c index 5c06f16f5..032e5378e 100644 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -292,11 +292,7 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - //ti->ti_next = ti->ti_prev = 0; - - tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; - memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); len = sizeof(struct ip) + tlen; diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c index 9d805ff37..deedb1e75 100644 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -272,10 +272,7 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - //ui->ui_next = ui->ui_prev = 0; - - memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - + ui->ui_next = ui->ui_prev = 0; ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ From 38c6541edc781f90d3bcac324f9972170b8a4882 Mon Sep 17 00:00:00 2001 From: jvernet Date: Thu, 5 Oct 2017 19:15:27 +0200 Subject: [PATCH 172/534] 64 Bits Slirp At least it will not crash anymore --- .../BasiliskII.xcodeproj/project.pbxproj | 104 ++ BasiliskII/src/MacOSX/config.h | 2 +- BasiliskII/src/Unix/Darwin/lowmem | Bin 0 -> 13284 bytes BasiliskII/src/Unix/Darwin/pagezero | Bin 0 -> 4248 bytes BasiliskII/src/slirp/VERSION | 1 + BasiliskII/src/slirp/bootp.c | 0 BasiliskII/src/slirp/bootp.h | 2 +- BasiliskII/src/slirp/cksum.c | 0 BasiliskII/src/slirp/ctl.h | 0 BasiliskII/src/slirp/debug.c | 15 +- BasiliskII/src/slirp/debug.h | 22 +- BasiliskII/src/slirp/icmp_var.h | 0 BasiliskII/src/slirp/if.c | 9 +- BasiliskII/src/slirp/if.h | 4 +- BasiliskII/src/slirp/ip.h | 70 +- BasiliskII/src/slirp/ip_icmp.c | 26 +- BasiliskII/src/slirp/ip_icmp.h | 8 +- BasiliskII/src/slirp/ip_input.c | 156 +-- BasiliskII/src/slirp/ip_output.c | 9 +- BasiliskII/src/slirp/libslirp.h | 0 BasiliskII/src/slirp/main.h | 0 BasiliskII/src/slirp/mbuf.c | 37 +- BasiliskII/src/slirp/mbuf.h | 22 +- BasiliskII/src/slirp/misc.c | 192 +-- BasiliskII/src/slirp/misc.h | 38 +- BasiliskII/src/slirp/sbuf.c | 33 +- BasiliskII/src/slirp/sbuf.h | 14 +- BasiliskII/src/slirp/slirp.c | 190 ++- BasiliskII/src/slirp/slirp.h | 145 +-- BasiliskII/src/slirp/slirp_config.h | 8 + BasiliskII/src/slirp/socket.c | 53 +- BasiliskII/src/slirp/socket.h | 38 +- BasiliskII/src/slirp/tcp.h | 6 +- BasiliskII/src/slirp/tcp_input.c | 1066 ++++++++--------- BasiliskII/src/slirp/tcp_output.c | 30 +- BasiliskII/src/slirp/tcp_subr.c | 92 +- BasiliskII/src/slirp/tcp_timer.c | 0 BasiliskII/src/slirp/tcp_timer.h | 8 +- BasiliskII/src/slirp/tcp_var.h | 25 +- BasiliskII/src/slirp/tcpip.h | 11 +- BasiliskII/src/slirp/tftp.c | 3 + BasiliskII/src/slirp/tftp.h | 2 +- BasiliskII/src/slirp/udp.c | 17 +- BasiliskII/src/slirp/udp.h | 21 +- 44 files changed, 1336 insertions(+), 1143 deletions(-) create mode 100755 BasiliskII/src/Unix/Darwin/lowmem create mode 100755 BasiliskII/src/Unix/Darwin/pagezero mode change 100644 => 100755 BasiliskII/src/slirp/bootp.c mode change 100644 => 100755 BasiliskII/src/slirp/bootp.h mode change 100644 => 100755 BasiliskII/src/slirp/cksum.c mode change 100644 => 100755 BasiliskII/src/slirp/ctl.h mode change 100644 => 100755 BasiliskII/src/slirp/debug.c mode change 100644 => 100755 BasiliskII/src/slirp/debug.h mode change 100644 => 100755 BasiliskII/src/slirp/icmp_var.h mode change 100644 => 100755 BasiliskII/src/slirp/if.c mode change 100644 => 100755 BasiliskII/src/slirp/if.h mode change 100644 => 100755 BasiliskII/src/slirp/ip.h mode change 100644 => 100755 BasiliskII/src/slirp/ip_icmp.c mode change 100644 => 100755 BasiliskII/src/slirp/ip_icmp.h mode change 100644 => 100755 BasiliskII/src/slirp/ip_input.c mode change 100644 => 100755 BasiliskII/src/slirp/ip_output.c mode change 100644 => 100755 BasiliskII/src/slirp/libslirp.h mode change 100644 => 100755 BasiliskII/src/slirp/main.h mode change 100644 => 100755 BasiliskII/src/slirp/mbuf.c mode change 100644 => 100755 BasiliskII/src/slirp/mbuf.h mode change 100644 => 100755 BasiliskII/src/slirp/misc.c mode change 100644 => 100755 BasiliskII/src/slirp/misc.h mode change 100644 => 100755 BasiliskII/src/slirp/sbuf.c mode change 100644 => 100755 BasiliskII/src/slirp/sbuf.h mode change 100644 => 100755 BasiliskII/src/slirp/slirp.c mode change 100644 => 100755 BasiliskII/src/slirp/slirp.h mode change 100644 => 100755 BasiliskII/src/slirp/slirp_config.h mode change 100644 => 100755 BasiliskII/src/slirp/socket.c mode change 100644 => 100755 BasiliskII/src/slirp/socket.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp_input.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_output.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_subr.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_timer.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_timer.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp_var.h mode change 100644 => 100755 BasiliskII/src/slirp/tcpip.h mode change 100644 => 100755 BasiliskII/src/slirp/tftp.c mode change 100644 => 100755 BasiliskII/src/slirp/tftp.h mode change 100644 => 100755 BasiliskII/src/slirp/udp.c mode change 100644 => 100755 BasiliskII/src/slirp/udp.h diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index aaa57a80a..ff97d3a77 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,6 +7,25 @@ objects = { /* Begin PBXBuildFile section */ + 4E4213FE1F85430F00377045 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4E4213FA1F85430E00377045 /* ether_unix.cpp */; }; + 4E42142F1F854B1700377045 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42142E1F854B1700377045 /* bootp.c */; }; + 4E4214311F854B2C00377045 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214301F854B2C00377045 /* ip_output.c */; }; + 4E4214421F854BB300377045 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214321F854BB100377045 /* tcp_timer.c */; }; + 4E4214431F854BB300377045 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214331F854BB100377045 /* tcp_input.c */; }; + 4E4214441F854BB300377045 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214341F854BB200377045 /* debug.c */; }; + 4E4214451F854BB300377045 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214351F854BB200377045 /* tcp_subr.c */; }; + 4E4214461F854BB300377045 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214361F854BB200377045 /* cksum.c */; }; + 4E4214471F854BB300377045 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214371F854BB200377045 /* ip_input.c */; }; + 4E4214481F854BB300377045 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214381F854BB200377045 /* socket.c */; }; + 4E4214491F854BB300377045 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214391F854BB200377045 /* udp.c */; }; + 4E42144A1F854BB300377045 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143A1F854BB200377045 /* sbuf.c */; }; + 4E42144B1F854BB300377045 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143B1F854BB200377045 /* mbuf.c */; }; + 4E42144C1F854BB300377045 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143C1F854BB200377045 /* tcp_output.c */; }; + 4E42144D1F854BB300377045 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143D1F854BB200377045 /* misc.c */; }; + 4E42144E1F854BB300377045 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143E1F854BB300377045 /* if.c */; }; + 4E42144F1F854BB300377045 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143F1F854BB300377045 /* tftp.c */; }; + 4E4214501F854BB300377045 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214401F854BB300377045 /* slirp.c */; }; + 4E4214511F854BB300377045 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214411F854BB300377045 /* ip_icmp.c */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; @@ -208,6 +227,25 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ + 4E4213FA1F85430E00377045 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether_unix.cpp; path = ../Unix/ether_unix.cpp; sourceTree = ""; }; + 4E42142E1F854B1700377045 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../slirp/bootp.c; sourceTree = ""; }; + 4E4214301F854B2C00377045 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../slirp/ip_output.c; sourceTree = ""; }; + 4E4214321F854BB100377045 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../slirp/tcp_timer.c; sourceTree = ""; }; + 4E4214331F854BB100377045 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../slirp/tcp_input.c; sourceTree = ""; }; + 4E4214341F854BB200377045 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../slirp/debug.c; sourceTree = ""; }; + 4E4214351F854BB200377045 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../slirp/tcp_subr.c; sourceTree = ""; }; + 4E4214361F854BB200377045 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../slirp/cksum.c; sourceTree = ""; }; + 4E4214371F854BB200377045 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../slirp/ip_input.c; sourceTree = ""; }; + 4E4214381F854BB200377045 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../slirp/socket.c; sourceTree = ""; }; + 4E4214391F854BB200377045 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../slirp/udp.c; sourceTree = ""; }; + 4E42143A1F854BB200377045 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../slirp/sbuf.c; sourceTree = ""; }; + 4E42143B1F854BB200377045 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../slirp/mbuf.c; sourceTree = ""; }; + 4E42143C1F854BB200377045 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../slirp/tcp_output.c; sourceTree = ""; }; + 4E42143D1F854BB200377045 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../slirp/misc.c; sourceTree = ""; }; + 4E42143E1F854BB300377045 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../slirp/if.c; sourceTree = ""; }; + 4E42143F1F854BB300377045 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../slirp/tftp.c; sourceTree = ""; }; + 4E4214401F854BB300377045 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../slirp/slirp.c; sourceTree = ""; }; + 4E4214411F854BB300377045 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../slirp/ip_icmp.c; sourceTree = ""; }; 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; @@ -409,6 +447,31 @@ /* End PBXFrameworksBuildPhase section */ /* Begin PBXGroup section */ + 4E4214031F85448200377045 /* slirp */ = { + isa = PBXGroup; + children = ( + 4E4214301F854B2C00377045 /* ip_output.c */, + 4E4214361F854BB200377045 /* cksum.c */, + 4E4214341F854BB200377045 /* debug.c */, + 4E42143E1F854BB300377045 /* if.c */, + 4E4214411F854BB300377045 /* ip_icmp.c */, + 4E4214371F854BB200377045 /* ip_input.c */, + 4E42143B1F854BB200377045 /* mbuf.c */, + 4E42143D1F854BB200377045 /* misc.c */, + 4E42143A1F854BB200377045 /* sbuf.c */, + 4E4214401F854BB300377045 /* slirp.c */, + 4E4214381F854BB200377045 /* socket.c */, + 4E4214331F854BB100377045 /* tcp_input.c */, + 4E42143C1F854BB200377045 /* tcp_output.c */, + 4E4214351F854BB200377045 /* tcp_subr.c */, + 4E4214321F854BB100377045 /* tcp_timer.c */, + 4E42143F1F854BB300377045 /* tftp.c */, + 4E4214391F854BB200377045 /* udp.c */, + 4E42142E1F854B1700377045 /* bootp.c */, + ); + path = slirp; + sourceTree = ""; + }; 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( @@ -653,6 +716,7 @@ 7539E1E41F23B25E006B2DF2 /* src */ = { isa = PBXGroup; children = ( + 4E4214031F85448200377045 /* slirp */, 7539DFC91F23B25A006B2DF2 /* adb.cpp */, 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, @@ -661,6 +725,7 @@ 7539E2811F23C52C006B2DF2 /* dummy */, 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */, 7539DFD61F23B25A006B2DF2 /* ether.cpp */, + 4E4213FA1F85430E00377045 /* ether_unix.cpp */, 7539DFD71F23B25A006B2DF2 /* extfs.cpp */, 7539DFD81F23B25A006B2DF2 /* include */, 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */, @@ -1035,7 +1100,9 @@ buildActionMask = 2147483647; files = ( 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, + 4E42144F1F854BB300377045 /* tftp.c in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, + 4E4214481F854BB300377045 /* socket.c in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, @@ -1043,22 +1110,32 @@ 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, + 4E42144E1F854BB300377045 /* if.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, + 4E4214441F854BB300377045 /* debug.c in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, + 4E42144B1F854BB300377045 /* mbuf.c in Sources */, + 4E4214501F854BB300377045 /* slirp.c in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, + 4E4214431F854BB300377045 /* tcp_input.c in Sources */, 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, + 4E4214311F854B2C00377045 /* ip_output.c in Sources */, + 4E4214421F854BB300377045 /* tcp_timer.c in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, + 4E4214491F854BB300377045 /* udp.c in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, + 4E4214451F854BB300377045 /* tcp_subr.c in Sources */, + 4E4214471F854BB300377045 /* ip_input.c in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, @@ -1066,8 +1143,11 @@ 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, + 4E4214511F854BB300377045 /* ip_icmp.c in Sources */, + 4E4214461F854BB300377045 /* cksum.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, + 4E42144C1F854BB300377045 /* tcp_output.c in Sources */, 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, @@ -1084,6 +1164,7 @@ 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + 4E4213FE1F85430F00377045 /* ether_unix.cpp in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, @@ -1092,8 +1173,11 @@ 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, + 4E42144D1F854BB300377045 /* misc.c in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, + 4E42142F1F854B1700377045 /* bootp.c in Sources */, 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */, + 4E42144A1F854BB300377045 /* sbuf.c in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, ); @@ -1320,11 +1404,21 @@ "$(LOCAL_LIBRARY_DIR)/Frameworks", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + HEADER_SEARCH_PATHS = ( + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + ../MacOSX, + ../include, + ../uae_cpu, + ../UNIX, + ../slirp, + ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; + WARNING_CFLAGS = "-Wconversion"; }; name = Debug; }; @@ -1339,11 +1433,21 @@ "$(LOCAL_LIBRARY_DIR)/Frameworks", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + HEADER_SEARCH_PATHS = ( + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + ../MacOSX, + ../include, + ../uae_cpu, + ../UNIX, + ../slirp, + ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; + WARNING_CFLAGS = "-Wconversion"; }; name = Release; }; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index 5dbc78abb..f75200ebb 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -458,7 +458,7 @@ #define HAVE_SINL 1 /* Define if slirp library is supported */ -/* #define HAVE_SLIRP 1 */ +#define HAVE_SLIRP 1 /* Define to 1 if you have the `snprintf' function. */ #define HAVE_SNPRINTF 1 diff --git a/BasiliskII/src/Unix/Darwin/lowmem b/BasiliskII/src/Unix/Darwin/lowmem new file mode 100755 index 0000000000000000000000000000000000000000..2117ff9acd26263273cb6ddbdd5e5fd7a3521f3a GIT binary patch literal 13284 zcmeHOZEO_B8QufjI4N)@!L3Q4tPpOUh7Ut9H53v%^)>4T2NOU=t;lk=&mYnG?s|6? zb}CcT!wJiBsns?WrAS38s@gM`cmV*XNm; z`|v@c{%Zg1NIUQQ&b;q4?>sYe7PHIM+qY)#(KOF|P3xJbX_^<$=>kpb)pTf@whWJf z$29A!pY(mp_smYV&Mls~=3On~lwknV+~eD~XReEg*XOpW;Wgx@Asy{As@pW{b|KCJ3N7mdYM==-Etf}5poztVsytE?K z23r(mGhgiC%vzgfC}_sI+8e?_GZK$}B3>F!(`CHCM8);|Y}$Y{&6aSMwL9}G(q(>y zDuy=mNf+WRN*j=-8T5ZzekHoZ+oxh^=i+g`i&Y=TOb9se1r<_1M=aOH@osNfmtnY|L*9Y4g);Dzp zn_#m%gok-Nw&IQP$&rfhTsX6DYu)8%OIM?<2#>b#KJk1xZL3gzcWBlD+v3Q_;-4pAOM_U7&P`-$VLre%#_R;47CN1{5J*hV^B#E=SsBTS zSMZN^BU!u#|E4$Wf@4Bd8up?wXlFI&&$uV}E$evd0-VeOIL?a-z(@=(H!R;2z^3d#Fm0^d_dY404@BeoP{t${_y}8fJS7HzsPfW6p;( zc!lEBpb{FPt?DvIOkL<}&@^p#l{h+lN>iziQr578Yff-cH*Hmy7>P^z{&&4Ad(fn* z^(eBsXA;|Az>r7`Q_}428K)j2S-u(DH-nHOhE%2f=d9m_R4SFbem4<^^$T)hcEJ@P z$dxW<^bjYJUcW;6=C2>834li=fRzFG2pTB)5SL{Nz;T9Q5CH3kq%!NbTI94W!}6OF z^14{Qi>%v?2hX-wr>O)(o$r{>W3&rts49hoWB)Z3NT9%Ng z;XzC(Wo+?{WzxMS24}iuGTrMk-BFHM01TwNiBQRkenDXIS7o}w&rZ@$rh5}k|RnELXIBZGJEUx`$v0!2Y2t0N06cLA3VI}%Iw8~bo&F$-1dze zu7vkh?~jL$CK+%{gst{?&yQG(#96TSj@nzDKm0qD+WtP?2YGvWJBnZLQD^P#RBECa zt4JJ7=r#IW&Gi{^-b35OBsMU72H|7TXW-)O6>sm)R4WcIHezoXIJ6geK!cU!0Uqwv zQDZF478<5DXm>5JdM}ZNYT(%YRJRO!6HiH~F~d#@m@Wcdpx-k1Sy)}eewnu6xnfv* zC2jW0!uNUjCePCM7UolR-lN>vB;CobVzuh%Td$+td*m+kvEx`TYeioLS60&ZLqO-# z_m62%W2$8UH6i-s(RYj#Z>CSO;&rS%ei-lPwy_H$LU4y&hK5r!1P;_j`4w_-UWGj& z=_8$1!7t$_sZ0!dEXAqd3xA!Kf&|hr@dL!BN8Bz)JWXL2%nHE~_s9`|>)9({@F?0J4819lH5V)dT@0&?gh&^RJN$ODMMyl--cC5s;v5z@~V ze)5342WK_!;|%^y?yv(ea);fT8Mcp_)!!qB?PO%T9QG6ek`*t>VSgd^xAe1<^pnFr z11~jfoWa`|+&$^6gWQm^dLwN75{%~Nb>5Xnpvd2I{H?{GSMOD8djGqr(l>#gDm^Fa z^P;{W>WiX&Th#oWOqC9b`W;bU67^-&nzkdkVn3AX-Ko+#$i7xKPJE1|Y~}0Pi5t|G zQ@cj3jM@mbuTUGH_BCqfsMS+@h1#>!PE&i1+E1t*qIR6xOVqv(tu(e(FOBI<;Xq6e zh2y$E5()UDdOWN*1ayB$4|E0^JL3L^U_ftf3kL4f@&oX~G45{*!M95fhW$-?W4OKD zA8Lw8SJ4y;w6q68aWO!1TQn9=JLw24g=fzDXW~B}h=%ouza@|pk;YIFdt>Mpsb@2k zBQ}ORf=wbY7Wc;iPp|y0a3sKy@79IvBXhbwnI65)-`Ki#ryg#2F3=dyAt)z@u2AC~ zv}{*LD0ie__+Wd08yIIs<8rg)N^Tau@7@H-$B%c*EYxun@UF{)cSwvDC8MMpa^*So zo_avZ5hbrFc|*yMm7G%Ywvr3*9-0FzR?Wx!>?Wx!>?Wx!>?Wx!>? zWx!>?Wx!?Nf5X6%RVCl%NK2|rehS|dh(;sYu4qwT6+ea*AIF;w_`Vw-v-dc-4HCuE zr$tLd1l+?>4Wyo}TsCxMRMU>I9zWL=-^G5mZjO8^v zi*dm*RxIy1-d1+Ky8pOB8<)fB@996FjrU^_UHbn;*`3N}4qgxMQ)NHDef9#M-x2d3 zh4(zP)BnHWVPzM=k^Q_thNLRW7LuJP6$m{=Zo^9pX zKgzRD<=OYbCfEFKdJ!JJk>F(~8R8q6`|ERQj1~Z5tE>81e9ylX8?~w+h}S8S zb%@Au;0v4;@!^S_20}oo(v8XBK`?WNS<8IOw_MZ|!Wir90ZPpV_h(HOtFQe&D@Rwy ztZ@Y3Y&4~kXer74JU&=2E9QIG^pUI}($zlBAhScI()!c5UQu!V@d7sfo^M;%BL}o? z)HAc>nS;M=zHUw3o(^tKnQtA@=gfENbwj85ot{-{2=8I8Sn0zq>hK(AIt7d&##>5N z=X>Cn0NZ$$u>0Bj|ML0&@PS^Sm^K!R^KrRYS)Q*Trkw#e$BQQ)cVBN_|N7?L#Qw7@ zTcvZzVI*8U*1}~IGY7kf@8vzdmu>7b25_%6_xNW#r`PU{{&$xfNmLu27{(lNIlp}Y z3;T`WryJ`f9g`ntjseGjW56-s7;p?Y1{?#90mp!2;D0c1FKm9h`hF+)#pccDKf-3Z zAMON{$`Zax_g=1@g-oNjx;A=3cC|2UF)>8DT345WN`r4{5 zmw%puzV1-9s*0APM`;qNYBX1g7Gs, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } @@ -326,11 +325,9 @@ sockstats() buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } } diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h old mode 100644 new mode 100755 index c5d42195e..6e8444dab --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -36,15 +36,15 @@ extern int slirp_debug; #endif -void debug_init(char *, int); -//void ttystats(struct ttys *); -void allttystats(void); -void ipstats(void); -void vjstats(void); -void tcpstats(void); -void udpstats(void); -void icmpstats(void); -void mbufstats(void); -void sockstats(void); -void slirp_exit(int); +void debug_init _P((char *, int)); +//void ttystats _P((struct ttys *)); +void allttystats _P((void)); +void ipstats _P((void)); +void vjstats _P((void)); +void tcpstats _P((void)); +void udpstats _P((void)); +void icmpstats _P((void)); +void mbufstats _P((void)); +void sockstats _P((void)); +void slirp_exit _P((int)); diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c old mode 100644 new mode 100755 index 9185dcf65..eab8a46ea --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -7,11 +7,11 @@ #include -size_t if_mtu, if_mru; +int if_mtu, if_mru; int if_comp; int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending +int if_queued = 0; /* Number of packets queued so far */ +int if_thresh = 10; /* Number of packets queued before we start sending * (to prevent allocing too many mbufs) */ struct mbuf if_fastq; /* fast queue (for interactive data) */ @@ -116,8 +116,7 @@ if_input(ttyp) DEBUG_MISC((dfd, " read %d bytes\n", if_n)); if (if_n <= 0) { - int error = WSAGetLastError(); - if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { + if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { if (ttyp->up) link_up--; tty_detached(ttyp, 0); diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h old mode 100644 new mode 100755 index a2564ab1d..5d96a9034 --- a/BasiliskII/src/slirp/if.h +++ b/BasiliskII/src/slirp/if.h @@ -15,8 +15,8 @@ /* Needed for FreeBSD */ #undef if_mtu -extern size_t if_mtu; -extern size_t if_mru; /* MTU and MRU */ +extern int if_mtu; +extern int if_mru; /* MTU and MRU */ extern int if_comp; /* Flags for compression */ extern int if_maxlinkhdr; extern int if_queued; /* Number of packets queued so far */ diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h old mode 100644 new mode 100755 index e0c7de967..94dcc6063 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -98,7 +98,7 @@ struct ip { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif #define IP_MAXPACKET 65535 /* maximum packet size */ @@ -168,7 +168,7 @@ struct ip_timestamp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* flag bits for ipt_flg */ @@ -195,23 +195,19 @@ struct ip_timestamp { #define IP_MSS 576 /* default maximum segment size */ -#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ -#include -#else #if SIZEOF_CHAR_P == 4 -typedef caddr_t caddr32_t; + struct mbuf_ptr { + struct mbuf *mptr; + uint32_t dummy; + }; #else -typedef u_int32_t caddr32_t; -#endif -#endif - -#if SIZEOF_CHAR_P == 4 -typedef struct ipq *ipqp_32; -typedef struct ipasfrag *ipasfragp_32; -#else -typedef caddr32_t ipqp_32; -typedef caddr32_t ipasfragp_32; + struct mbuf_ptr { + struct mbuf *mptr; + }; #endif +struct qlink { + void *next, *prev; +}; /* * Overlay for ip header used by other protocols (tcp, udp). @@ -221,16 +217,16 @@ typedef caddr32_t ipasfragp_32; #endif struct ipovly { - caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ + struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ u_int8_t ih_x1; /* (unused) */ u_int8_t ih_pr; /* protocol */ u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -} PACKED__; +} __attribute__((packed)); #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -241,12 +237,13 @@ struct ipovly { * size 28 bytes */ struct ipq { - ipqp_32 next,prev; /* to other reass headers */ + struct qlink frag_link; /* to ip headers of fragments */ + struct qlink ip_link; /* to other reass headers */ + u_int8_t ipq_ttl; /* time for reass q to live */ u_int8_t ipq_p; /* protocol of this fragment */ u_int16_t ipq_id; /* sequence id for reassembly */ - ipasfragp_32 ipq_next,ipq_prev; - /* to ip headers of fragments */ + struct in_addr ipq_src,ipq_dst; }; @@ -256,29 +253,16 @@ struct ipq { * Note: ipf_next must be at same offset as ipq_next above */ struct ipasfrag { -#ifdef WORDS_BIGENDIAN - u_char ip_v:4, - ip_hl:4; -#else - u_char ip_hl:4, - ip_v:4; -#endif - /* BUG : u_int changed to u_int8_t. - * sizeof(u_int)==4 on linux 2.0 - */ - u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit - * to avoid destroying tos (PPPDTRuu); - * copied from (ip_off&IP_MF) */ - u_int16_t ip_len; - u_int16_t ip_id; - u_int16_t ip_off; - u_int8_t ip_ttl; - u_int8_t ip_p; - u_int16_t ip_sum; - ipasfragp_32 ipf_next; /* next fragment */ - ipasfragp_32 ipf_prev; /* previous fragment */ + struct qlink ipf_link; + struct ip ipf_ip; }; +#define ipf_off ipf_ip.ip_off +#define ipf_tos ipf_ip.ip_tos +#define ipf_len ipf_ip.ip_len +#define ipf_next ipf_link.next +#define ipf_prev ipf_link.prev + /* * Structure stored in mbuf in inpcb.ip_options * and passed to ip_output when ip options are in use. diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c old mode 100644 new mode 100755 index 55376a8b1..7cbda7906 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -77,7 +77,7 @@ icmp_input(m, hlen) DEBUG_CALL("icmp_input"); DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); icmpstat.icps_received++; @@ -201,12 +201,12 @@ icmp_input(m, hlen) #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error( - struct mbuf *msrc, - u_char type, - u_char code, - int minsize, - char *message) +icmp_error(msrc, type, code, minsize, message) + struct mbuf *msrc; + u_char type; + u_char code; + int minsize; + char *message; { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -215,7 +215,7 @@ icmp_error( DEBUG_CALL("icmp_error"); DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %zu", msrc->m_len); + DEBUG_ARG("msrc_len = %d", msrc->m_len); if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; @@ -223,9 +223,9 @@ icmp_error( if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); #if DEBUG - { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; - inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); - inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); + { char bufa[20], bufb[20]; + strcpy(bufa, inet_ntoa(ip->ip_src)); + strcpy(bufb, inet_ntoa(ip->ip_dst)); DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); } #endif @@ -244,7 +244,7 @@ icmp_error( /* make a copy */ if(!(m=m_get())) goto end_error; /* get mbuf */ - { u_int new_m_size; + { int new_m_size; new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; if(new_m_size>m->m_size) m_inc(m, new_m_size); } @@ -299,7 +299,7 @@ icmp_error( /* fill in ip */ ip->ip_hl = hlen >> 2; - ip->ip_len = (u_int16_t)m->m_len; + ip->ip_len = m->m_len; ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h old mode 100644 new mode 100755 index 683dc87f1..6968daa71 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -95,7 +95,7 @@ struct icmp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -161,8 +161,8 @@ struct icmp { (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) -void icmp_input(struct mbuf *, int); -void icmp_error(struct mbuf *, u_char, u_char, int, char *); -void icmp_reflect(struct mbuf *); +void icmp_input _P((struct mbuf *, int)); +void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); +void icmp_reflect _P((struct mbuf *)); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c old mode 100644 new mode 100755 index cac8493ba..c93c83fe3 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -38,6 +38,16 @@ * terms and conditions of the copyright. */ +#include +#include +#include +#include + +#define container_of(ptr, type, member) ({ \ + const typeof(((type *) 0)->member) *__mptr = (ptr); \ + (type *) ((char *) __mptr - offsetof(type, member));}) + + #include #include "ip_icmp.h" @@ -52,7 +62,7 @@ struct ipq ipq; void ip_init() { - ipq.next = ipq.prev = (ipqp_32)&ipq; + ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); @@ -68,11 +78,11 @@ ip_input(m) struct mbuf *m; { register struct ip *ip; - u_int hlen; + int hlen; DEBUG_CALL("ip_input"); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); ipstat.ips_total++; @@ -155,18 +165,20 @@ ip_input(m) */ if (ip->ip_off &~ IP_DF) { register struct ipq *fp; + struct qlink *l; /* * Look for queue of fragments * of this datagram. */ - for (fp = (struct ipq *) ipq.next; fp != &ipq; - fp = (struct ipq *) fp->next) - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) + for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { + fp = container_of(l, struct ipq, ip_link); + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) goto found; - fp = 0; + } + fp = NULL; found: /* @@ -176,9 +188,9 @@ ip_input(m) */ ip->ip_len -= hlen; if (ip->ip_off & IP_MF) - ((struct ipasfrag *)ip)->ipf_mff |= 1; + ip->ip_tos |= 1; else - ((struct ipasfrag *)ip)->ipf_mff &= ~1; + ip->ip_tos &= ~1; ip->ip_off <<= 3; @@ -187,9 +199,9 @@ ip_input(m) * or if this is not the first fragment, * attempt reassembly; if it succeeds, proceed. */ - if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { + if (ip->ip_tos & 1 || ip->ip_off) { ipstat.ips_fragments++; - ip = ip_reass((struct ipasfrag *)ip, fp); + ip = ip_reass(ip, fp); if (ip == 0) return; ipstat.ips_reassembled++; @@ -225,21 +237,21 @@ ip_input(m) return; } +#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) +#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) /* * Take incoming datagram fragment and try to * reassemble it into whole datagram. If a chain for * reassembly of this datagram already exists, then it * is given as fp; otherwise have to make a chain. */ -struct ip * -ip_reass(ip, fp) - register struct ipasfrag *ip; - register struct ipq *fp; +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *fp) { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; int hlen = ip->ip_hl << 2; - int i, next; + u_int16_t i, next; DEBUG_CALL("ip_reass"); DEBUG_ARG("ip = %lx", (long)ip); @@ -261,13 +273,13 @@ ip_reass(ip, fp) struct mbuf *t; if ((t = m_get()) == NULL) goto dropfrag; fp = mtod(t, struct ipq *); - insque_32(fp, &ipq); + insque(&fp->ip_link, &ipq.ip_link); fp->ipq_ttl = IPFRAGTTL; fp->ipq_p = ip->ip_p; fp->ipq_id = ip->ip_id; - fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; - fp->ipq_src = ((struct ip *)ip)->ip_src; - fp->ipq_dst = ((struct ip *)ip)->ip_dst; + fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; + fp->ipq_src = ip->ip_src; + fp->ipq_dst = ip->ip_dst; q = (struct ipasfrag *)fp; goto insert; } @@ -275,9 +287,9 @@ ip_reass(ip, fp) /* * Find a segment which begins after this one does. */ - for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *)q->ipf_next) - if (q->ip_off > ip->ip_off) + for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; + q = q->ipf_next) + if (q->ipf_off > ip->ip_off) break; /* @@ -285,9 +297,9 @@ ip_reass(ip, fp) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (q->ipf_prev != (ipasfragp_32)fp) { - i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + - ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; + if (q->ipf_prev != &fp->frag_link) { + struct ipasfrag *pq = q->ipf_prev; + i = pq->ipf_off + pq->ipf_len - ip->ip_off; if (i > 0) { if (i >= ip->ip_len) goto dropfrag; @@ -301,17 +313,18 @@ ip_reass(ip, fp) * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { - i = (ip->ip_off + ip->ip_len) - q->ip_off; - if (i < q->ip_len) { - q->ip_len -= i; - q->ip_off += i; + while (q != (struct ipasfrag*)&fp->frag_link && + ip->ip_off + ip->ip_len > q->ipf_off) { + i = (ip->ip_off + ip->ip_len) - q->ipf_off; + if (i < q->ipf_len) { + q->ipf_len -= i; + q->ipf_off += i; m_adj(dtom(q), i); break; } - q = (struct ipasfrag *) q->ipf_next; - m_freem(dtom((struct ipasfrag *) q->ipf_prev)); - ip_deq((struct ipasfrag *) q->ipf_prev); + q = q->ipf_next; + m_freem(dtom(q->ipf_prev)); + ip_deq(q->ipf_prev); } insert: @@ -319,27 +332,26 @@ ip_reass(ip, fp) * Stick new segment in its place; * check for complete reassembly. */ - ip_enq(ip, (struct ipasfrag *) q->ipf_prev); + ip_enq(iptofrag(ip), q->ipf_prev); next = 0; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *) q->ipf_next) { - if (q->ip_off != next) + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; + q = q->ipf_next) { + if (q->ipf_off != next) return (0); - next += q->ip_len; + next += q->ipf_len; } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) + if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) return (0); /* * Reassembly is complete; concatenate fragments. */ - q = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; m = dtom(q); q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag *)fp) { - struct mbuf *t; - t = dtom(q); + while (q != (struct ipasfrag*)&fp->frag_link) { + struct mbuf *t = dtom(q); q = (struct ipasfrag *) q->ipf_next; m_cat(m, t); } @@ -350,7 +362,7 @@ ip_reass(ip, fp) * dequeue and discard fragment reassembly header. * Make header visible. */ - ip = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; /* * If the fragments concatenated to an mbuf that's @@ -361,24 +373,24 @@ ip_reass(ip, fp) */ if (m->m_flags & M_EXT) { int delta; - delta = (char *)ip - m->m_dat; - ip = (struct ipasfrag *)(m->m_ext + delta); + delta = (char *)q - m->m_dat; + q = (struct ipasfrag *)(m->m_ext + delta); } /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ + ip = fragtoip(q); ip->ip_len = next; - ip->ipf_mff &= ~1; - ((struct ip *)ip)->ip_src = fp->ipq_src; - ((struct ip *)ip)->ip_dst = fp->ipq_dst; - remque_32(fp); + ip->ip_tos &= ~1; + ip->ip_src = fp->ipq_src; + ip->ip_dst = fp->ipq_dst; + remque(&fp->ip_link); (void) m_free(dtom(fp)); - m = dtom(ip); m->m_len += (ip->ip_hl << 2); m->m_data -= (ip->ip_hl << 2); - return ((struct ip *)ip); + return ip; dropfrag: ipstat.ips_fragdropped++; @@ -396,13 +408,12 @@ ip_freef(fp) { register struct ipasfrag *q, *p; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = p) { - p = (struct ipasfrag *) q->ipf_next; + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { + p = q->ipf_next; ip_deq(q); m_freem(dtom(q)); } - remque_32(fp); + remque(&fp->ip_link); (void) m_free(dtom(fp)); } @@ -416,10 +427,10 @@ ip_enq(p, prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = (ipasfragp_32) prev; + p->ipf_prev = prev; p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; - prev->ipf_next = (ipasfragp_32) p; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; + prev->ipf_next = p; } /* @@ -441,20 +452,21 @@ ip_deq(p) void ip_slowtimo() { - register struct ipq *fp; + struct qlink *l; DEBUG_CALL("ip_slowtimo"); - fp = (struct ipq *) ipq.next; - if (fp == 0) - return; + l = ipq.ip_link.next; - while (fp != &ipq) { - --fp->ipq_ttl; - fp = (struct ipq *) fp->next; - if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { + if (l == 0) + return; + printf("Line 453\n"); + while (l != &ipq.ip_link) { + struct ipq *fp = container_of(l, struct ipq, ip_link); + l = l->next; + if (--fp->ipq_ttl == 0) { ipstat.ips_fragtimeout++; - ip_freef((struct ipq *) fp->prev); + ip_freef(fp); } } } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c old mode 100644 new mode 100755 index fb9a94204..0d1ae1b2c --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -55,9 +55,8 @@ ip_output(so, m0) { register struct ip *ip; register struct mbuf *m = m0; - register u_int hlen = sizeof(struct ip); - u_int len, off; - int error = 0; + register int hlen = sizeof(struct ip ); + int len, off, error = 0; DEBUG_CALL("ip_output"); DEBUG_ARG("so = %lx", (long)so); @@ -129,7 +128,7 @@ ip_output(so, m0) */ m0 = m; mhlen = sizeof (struct ip); - for (off = hlen + len; off < ip->ip_len; off += len) { + for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { register struct ip *mhip; m = m_get(); if (m == 0) { @@ -174,7 +173,7 @@ ip_output(so, m0) * and updating header, then send each fragment (in order). */ m = m0; - m_adj(m, hlen + firstlen - ip->ip_len); + m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); ip->ip_len = htons((u_int16_t)m->m_len); ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); ip->ip_sum = 0; diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c old mode 100644 new mode 100755 index 5a16fab8b..2b53bc3e9 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -24,16 +24,18 @@ int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; int mbuf_thresh = 30; int mbuf_max = 0; -size_t msize; +int msize; -void m_init() +void +m_init() { m_freelist.m_next = m_freelist.m_prev = &m_freelist; m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; msize_init(); } -void msize_init() +void +msize_init() { /* * Find a nice value for msize @@ -51,7 +53,8 @@ void msize_init() * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, * which tells m_free to actually free() it */ -struct mbuf *m_get() +struct mbuf * +m_get() { register struct mbuf *m; int flags = 0; @@ -86,7 +89,9 @@ struct mbuf *m_get() return m; } -void m_free(struct mbuf *m) +void +m_free(m) + struct mbuf *m; { DEBUG_CALL("m_free"); @@ -119,7 +124,9 @@ void m_free(struct mbuf *m) * the other.. if result is too big for one mbuf, malloc() * an M_EXT data segment */ -void m_cat(register struct mbuf *m, register struct mbuf *n) +void +m_cat(m, n) + register struct mbuf *m, *n; { /* * If there's no room, realloc @@ -135,7 +142,10 @@ void m_cat(register struct mbuf *m, register struct mbuf *n) /* make m size bytes large */ -void m_inc(struct mbuf *m, u_int size) +void +m_inc(m, size) + struct mbuf *m; + int size; { int datasize; @@ -169,7 +179,10 @@ void m_inc(struct mbuf *m, u_int size) -void m_adj(struct mbuf *m, int len) +void +m_adj(m, len) + struct mbuf *m; + int len; { if (m == NULL) return; @@ -189,7 +202,9 @@ void m_adj(struct mbuf *m, int len) * Copy len bytes from m, starting off bytes into n */ int -m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) +m_copy(n, m, off, len) + struct mbuf *n, *m; + int off, len; { if (len > M_FREEROOM(n)) return -1; @@ -205,7 +220,9 @@ m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) * XXX This is a kludge, I should eliminate the need for it * Fortunately, it's not used often */ -struct mbuf *dtom(void *dat) +struct mbuf * +dtom(dat) + void *dat; { struct mbuf *m; diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h old mode 100644 new mode 100755 index 11b252bb6..183254a08 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -63,11 +63,11 @@ struct m_hdr { struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ int mh_flags; /* Misc flags */ - size_t mh_size; /* Size of data */ + int mh_size; /* Size of data */ struct socket *mh_so; caddr_t mh_data; /* Location of data */ - size_t mh_len; /* Amount of data in this mbuf */ + int mh_len; /* Amount of data in this mbuf */ }; /* @@ -130,14 +130,14 @@ extern int mbuf_alloced; extern struct mbuf m_freelist, m_usedlist; extern int mbuf_max; -void m_init(void); -void msize_init(void); -struct mbuf * m_get(void); -void m_free(struct mbuf *); -void m_cat(register struct mbuf *, register struct mbuf *); -void m_inc(struct mbuf *, u_int); -void m_adj(struct mbuf *, int); -int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); -struct mbuf * dtom(void *); +void m_init _P((void)); +void msize_init _P((void)); +struct mbuf * m_get _P((void)); +void m_free _P((struct mbuf *)); +void m_cat _P((register struct mbuf *, register struct mbuf *)); +void m_inc _P((struct mbuf *, int)); +void m_adj _P((struct mbuf *, int)); +int m_copy _P((struct mbuf *, struct mbuf *, int, int)); +struct mbuf * dtom _P((void *)); #endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c old mode 100644 new mode 100755 index b80caf662..9438af382 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -17,7 +17,10 @@ int x_port = -1; int x_display = 0; int x_screen = 0; -int show_x(char *buff, struct socket *inso) +int +show_x(buff, inso) + char *buff; + struct socket *inso; { if (x_port < 0) { lprint("X Redir: X not being redirected.\r\n"); @@ -37,7 +40,12 @@ int show_x(char *buff, struct socket *inso) /* * XXX Allow more than one X redirection? */ -void redir_x(u_int32_t inaddr, int start_port, int display, int screen) +void +redir_x(inaddr, start_port, display, screen) + u_int32_t inaddr; + int start_port; + int display; + int screen; { int i; @@ -61,69 +69,44 @@ void redir_x(u_int32_t inaddr, int start_port, int display, int screen) #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia) +int +inet_aton(cp, ia) + const char *cp; + struct in_addr *ia; { - return inet_pton(AF_INET, cp, &ia->s_addr); + u_int32_t addr = inet_addr(cp); + if (addr == 0xffffffff) + return 0; + ia->s_addr = addr; + return 1; } #endif /* * Get our IP address and put it in our_addr */ -void getouraddr() +void +getouraddr() { char buff[256]; - - if (gethostname(buff, sizeof(buff)) == 0) - { - struct addrinfo hints = { 0 }; - hints.ai_flags = AI_NUMERICHOST; - hints.ai_family = AF_INET; - struct addrinfo* ai; - if (getaddrinfo(buff, NULL, &hints, &ai) == 0) - { - our_addr = *(struct in_addr *)ai->ai_addr->sa_data; - freeaddrinfo(ai); - } - } - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; + struct hostent *he = NULL; + + if (gethostname(buff,256) == 0) + he = gethostbyname(buff); + if (he) + our_addr = *(struct in_addr *)he->h_addr; + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; } -#if SIZEOF_CHAR_P == 8 - -struct quehead_32 { - u_int32_t qh_link; - u_int32_t qh_rlink; -}; - -inline void insque_32(void *a, void *b) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - register struct quehead_32 *head = (struct quehead_32 *) b; - element->qh_link = head->qh_link; - head->qh_link = (u_int32_t)element; - element->qh_rlink = (u_int32_t)head; - ((struct quehead_32 *)(element->qh_link))->qh_rlink - = (u_int32_t)element; -} - -inline void remque_32(void *a) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = 0; -} - -#endif /* SIZEOF_CHAR_P == 8 */ - struct quehead { struct quehead *qh_link; struct quehead *qh_rlink; }; -void insque(void *a, void *b) +void +insque(a, b) + void *a, *b; { register struct quehead *element = (struct quehead *) a; register struct quehead *head = (struct quehead *) b; @@ -134,7 +117,9 @@ void insque(void *a, void *b) = (struct quehead *)element; } -void remque(void *a) +void +remque(a) + void *a; { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -146,7 +131,13 @@ void remque(void *a) /* #endif */ -int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) +int +add_exec(ex_ptr, do_pty, exec, addr, port) + struct ex_list **ex_ptr; + int do_pty; + char *exec; + int addr; + int port; { struct ex_list *tmp_ptr; @@ -175,7 +166,9 @@ int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port extern int sys_nerr; extern char *sys_errlist[]; -char *strerror(int error) +char * +strerror(error) + int error; { if (error < sys_nerr) return sys_errlist[error]; @@ -188,7 +181,11 @@ char *strerror(int error) #ifdef _WIN32 -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; { /* not implemented */ return 0; @@ -196,7 +193,9 @@ int fork_exec(struct socket *so, char *ex, int do_pty) #else -int slirp_openpty(int *amaster, int *aslave) +int +slirp_openpty(amaster, aslave) + int *amaster, *aslave; { register int master, slave; @@ -270,7 +269,11 @@ int slirp_openpty(int *amaster, int *aslave) * do_pty = 1 Fork/exec using slirp.telnetd * do_ptr = 2 Fork/exec using pty */ -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; { int s; struct sockaddr_in addr; @@ -426,7 +429,9 @@ int fork_exec(struct socket *so, char *ex, int do_pty) #endif #ifndef HAVE_STRDUP -char *strdup(const char *str) +char * +strdup(str) + const char *str; { char *bptr; @@ -438,7 +443,9 @@ char *strdup(const char *str) #endif #if 0 -void snooze_hup(int num) +void +snooze_hup(num) + int num; { int s, ret; #ifndef NO_UNIX_SOCKETS @@ -478,7 +485,8 @@ void snooze_hup(int num) } -void snooze() +void +snooze() { sigset_t s; int i; @@ -502,7 +510,9 @@ void snooze() exit(255); } -void relay(int s) +void +relay(s) + int s; { char buf[8192]; int n; @@ -562,14 +572,25 @@ void relay(int s) } #endif -int (*lprint_print)(void *, const char *, va_list); +int (*lprint_print) _P((void *, const char *, va_list)); char *lprint_ptr, *lprint_ptr2, **lprint_arg; -void lprint(const char *format, ...) +void +#ifdef __STDC__ +lprint(const char *format, ...) +#else +lprint(va_alist) va_dcl +#endif { va_list args; - va_start(args, format); +#ifdef __STDC__ + va_start(args, format); +#else + char *format; + va_start(args); + format = va_arg(args, char *); +#endif #if 0 /* If we're printing to an sbuf, make sure there's enough room */ /* XXX +100? */ @@ -618,7 +639,9 @@ void lprint(const char *format, ...) va_end(args); } -void add_emu(char *buff) +void +add_emu(buff) + char *buff; { u_int lport, fport; u_int8_t tos = 0, emu = 0; @@ -710,24 +733,42 @@ void add_emu(char *buff) * Some BSD-derived systems have a sprintf which returns char * */ -int vsprintf_len(char *string, const char *format, va_list args) +int +vsprintf_len(string, format, args) + char *string; + const char *format; + va_list args; { vsprintf(string, format, args); return strlen(string); } -int sprintf_len(char *string, const char *format, ...) +int +#ifdef __STDC__ +sprintf_len(char *string, const char *format, ...) +#else +sprintf_len(va_alist) va_dcl +#endif { va_list args; +#ifdef __STDC__ va_start(args, format); +#else + char *string; + char *format; + va_start(args); + string = va_arg(args, char *); + format = va_arg(args, char *); +#endif vsprintf(string, format, args); - va_end(args); return strlen(string); } #endif -void u_sleep(int usec) +void +u_sleep(usec) + int usec; { struct timeval t; fd_set fdset; @@ -744,7 +785,9 @@ void u_sleep(int usec) * Set fd blocking and non-blocking */ -void fd_nonblock(int fd) +void +fd_nonblock(fd) + int fd; { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 1; @@ -759,7 +802,9 @@ void fd_nonblock(int fd) #endif } -void fd_block(int fd) +void +fd_block(fd) + int fd; { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 0; @@ -779,8 +824,13 @@ void fd_block(int fd) /* * invoke RSH */ -int rsh_exec(struct socket *so, struct socket *ns, - char *user, char *host, char *args) +int +rsh_exec(so,ns, user, host, args) + struct socket *so; + struct socket *ns; + char *user; + char *host; + char *args; { int fd[2]; int fd0[2]; diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h old mode 100644 new mode 100755 index 381f5f3e7..efea9ff8b --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -19,15 +19,15 @@ struct ex_list { extern struct ex_list *exec_list; extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; -extern int (*lprint_print)(void *, const char *, va_list); +extern int (*lprint_print) _P((void *, const char *, va_list)); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; extern struct sbuf *lprint_sb; #ifndef HAVE_STRDUP -char *strdup(const char *); +char *strdup _P((const char *)); #endif -void do_wait(int); +void do_wait _P((int)); #define EMU_NONE 0x0 @@ -67,21 +67,21 @@ extern struct emu_t *tcpemu; extern int x_port, x_server, x_display; -int show_x(char *, struct socket *); -void redir_x(u_int32_t, int, int, int); -void getouraddr(void); -void slirp_insque(void *, void *); -void slirp_remque(void *); -int add_exec(struct ex_list **, int, char *, int, int); -int slirp_openpty(int *, int *); -int fork_exec(struct socket *, char *, int); -void snooze_hup(int); -void snooze(void); -void relay(int); -void add_emu(char *); -void u_sleep(int); -void fd_nonblock(int); -void fd_block(int); -int rsh_exec(struct socket *, struct socket *, char *, char *, char *); +int show_x _P((char *, struct socket *)); +void redir_x _P((u_int32_t, int, int, int)); +void getouraddr _P((void)); +void slirp_insque _P((void *, void *)); +void slirp_remque _P((void *)); +int add_exec _P((struct ex_list **, int, char *, int, int)); +int slirp_openpty _P((int *, int *)); +int fork_exec _P((struct socket *, char *, int)); +void snooze_hup _P((int)); +void snooze _P((void)); +void relay _P((int)); +void add_emu _P((char *)); +void u_sleep _P((int)); +void fd_nonblock _P((int)); +void fd_block _P((int)); +int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); #endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c old mode 100644 new mode 100755 index 278e36870..2d078f381 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -16,12 +16,17 @@ * } */ -void sbfree(struct sbuf *sb) +void +sbfree(sb) + struct sbuf *sb; { free(sb->sb_data); } -void sbdrop(struct sbuf *sb, u_int num) +void +sbdrop(sb, num) + struct sbuf *sb; + int num; { /* * We can only drop how much we have @@ -36,7 +41,10 @@ void sbdrop(struct sbuf *sb, u_int num) } -void sbreserve(struct sbuf *sb, size_t size) +void +sbreserve(sb, size) + struct sbuf *sb; + int size; { if (sb->sb_data) { /* Already alloced, realloc if necessary */ @@ -64,14 +72,17 @@ void sbreserve(struct sbuf *sb, size_t size) * this prevents an unnecessary copy of the data * (the socket is non-blocking, so we won't hang) */ -void sbappend(struct socket *so, struct mbuf *m) +void +sbappend(so, m) + struct socket *so; + struct mbuf *m; { int ret = 0; DEBUG_CALL("sbappend"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %zu", m->m_len); + DEBUG_ARG("m->m_len = %d", m->m_len); /* Shouldn't happen, but... e.g. foreign host closes connection */ if (m->m_len <= 0) { @@ -123,7 +134,10 @@ void sbappend(struct socket *so, struct mbuf *m) * Copy the data from m into sb * The caller is responsible to make sure there's enough room */ -void sbappendsb(struct sbuf *sb, struct mbuf *m) +void +sbappendsb(sb, m) + struct sbuf *sb; + struct mbuf *m; { int len, n, nn; @@ -159,7 +173,12 @@ void sbappendsb(struct sbuf *sb, struct mbuf *m) * Don't update the sbuf rptr, this will be * done in sbdrop when the data is acked */ -void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) +void +sbcopy(sb, off, len, to) + struct sbuf *sb; + int off; + int len; + char *to; { char *from; diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h old mode 100644 new mode 100755 index 04f7981c7..161e0bb76 --- a/BasiliskII/src/slirp/sbuf.h +++ b/BasiliskII/src/slirp/sbuf.h @@ -8,8 +8,6 @@ #ifndef _SBUF_H_ #define _SBUF_H_ -#include - #define sbflush(sb) sbdrop((sb),(sb)->sb_cc) #define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) @@ -23,11 +21,11 @@ struct sbuf { char *sb_data; /* Actual data */ }; -void sbfree(struct sbuf *); -void sbdrop(struct sbuf *, u_int); -void sbreserve(struct sbuf *, size_t); -void sbappend(struct socket *, struct mbuf *); -void sbappendsb(struct sbuf *, struct mbuf *); -void sbcopy(struct sbuf *, u_int, u_int, char *); +void sbfree _P((struct sbuf *)); +void sbdrop _P((struct sbuf *, int)); +void sbreserve _P((struct sbuf *, int)); +void sbappend _P((struct socket *, struct mbuf *)); +void sbappendsb _P((struct sbuf *, struct mbuf *)); +void sbcopy _P((struct sbuf *, int, int, char *)); #endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c old mode 100644 new mode 100755 index dc2fdc658..44f777d08 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -84,7 +84,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256+1]; + char buff2[256]; FILE *f; int found = 0; struct in_addr tmp_addr; @@ -211,8 +211,8 @@ int slirp_select_fill(int *pnfds, * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || - ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); - + (&ipq.ip_link != ipq.ip_link.next)); + for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; @@ -220,14 +220,14 @@ int slirp_select_fill(int *pnfds, * See if we need a tcp_fasttimo */ if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ + time_fasttimo = curtime; /* Flag when we want a fasttimo */ /* * NOFDREF can include still connecting to local-host, * newly socreated() sockets etc. Don't want to select these. */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; + continue; /* * Set for reading sockets which are accepting @@ -346,18 +346,18 @@ int slirp_select_fill(int *pnfds, void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) { - struct socket *so, *so_next; - int ret; + struct socket *so, *so_next; + int ret; - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; /* Update time */ updtime(); - + /* - * See if anything has timed out + * See if anything has timed out */ if (link_up) { if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { @@ -370,7 +370,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) last_slowtimo = curtime; } } - + /* * Check sockets */ @@ -380,21 +380,21 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; - + /* * FD_ISSET is meaningless on these sockets * (and they can crash the program) */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - + continue; + /* * Check for URG data * This will soread as well, so no need to * test for readfds below if this succeeds */ if (FD_ISSET(so->s, xfds)) - sorecvoob(so); + sorecvoob(so); /* * Check sockets for reading */ @@ -407,92 +407,86 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) continue; } /* else */ ret = soread(so); - + /* Output it if we read something */ if (ret > 0) - tcp_output(sototcpcb(so)); + tcp_output(sototcpcb(so)); } - + /* * Check sockets for writing */ if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, (char*)&ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } - else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ } - + /* * Probe a still-connecting, non-blocking socket * to check if it's still alive - */ + */ #ifdef PROBE_CONN if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0, 0); - - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } - else { - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } - else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - } /* SS_ISFCONNECTING */ + ret = recv(so->s, (char *)&ret, 0,0); + + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } else { + ret = send(so->s, &ret, 0,0); + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); + } /* SS_ISFCONNECTING */ #endif - } - + } + /* * Now UDP sockets. * Incoming packets are sent straight away, they're not buffered. @@ -500,27 +494,27 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = udb.so_next; so != &udb; so = so_next) { so_next = so->so_next; - + if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } + sorecvfrom(so); + } } -} - + } + /* * See if we can start outputting */ if (if_queued && link_up) - if_start(); + if_start(); /* clear global file descriptor sets. * these reside on the stack in vl.c * so they're unusable if we're not in * slirp_select_fill or slirp_select_poll. */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; } #define ETH_ALEN 6 diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h old mode 100644 new mode 100755 index b845caa77..c30c8d701 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -22,12 +22,18 @@ typedef char *caddr_t; typedef int socklen_t; typedef unsigned long ioctlsockopt_t; +# include # include -# include # include # include # define USE_FIONBIO 1 +# define EWOULDBLOCK WSAEWOULDBLOCK +# define EINPROGRESS WSAEINPROGRESS +# define ENOTCONN WSAENOTCONN +# define EHOSTUNREACH WSAEHOSTUNREACH +# define ENETUNREACH WSAENETUNREACH +# define ECONNREFUSED WSAECONNREFUSED /* Basilisk II Router defines those */ # define udp_read_completion slirp_udp_read_completion @@ -35,14 +41,6 @@ typedef unsigned long ioctlsockopt_t; # define init_udp slirp_init_udp # define final_udp slirp_final_udp #else -# define WSAGetLastError() (int)(errno) -# define WSASetLastError(e) (void)(errno = (e)) -# define WSAEWOULDBLOCK EWOULDBLOCK -# define WSAEINPROGRESS EINPROGRESS -# define WSAENOTCONN ENOTCONN -# define WSAEHOSTUNREACH EHOSTUNREACH -# define WSAENETUNREACH ENETUNREACH -# define WSAECONNREFUSED ECONNREFUSED typedef int ioctlsockopt_t; # define ioctlsocket ioctl # define closesocket(s) close(s) @@ -57,9 +55,7 @@ typedef int ioctlsockopt_t; # include #endif -#ifndef _WIN32 #include -#endif #ifdef NEED_TYPEDEFS typedef char int8_t; @@ -129,6 +125,17 @@ typedef u_int32_t uint32; #ifndef _WIN32 #include +#endif + +#ifndef _P +#ifndef NO_PROTOTYPES +# define _P(x) x +#else +# define _P(x) () +#endif +#endif + +#ifndef _WIN32 #include #include #endif @@ -139,23 +146,20 @@ typedef u_int32_t uint32; /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup(const char *); +char *strdup _P((const char *)); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc(size_t arg); -void free(void *ptr); +void *malloc _P((size_t arg)); +void free _P((void *ptr)); #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia); +int inet_aton _P((const char *cp, struct in_addr *ia)); #endif #include -#ifdef _WIN32 -#include -#endif #ifndef NO_UNIX_SOCKETS #include #endif @@ -187,7 +191,11 @@ int inet_aton(const char *cp, struct in_addr *ia); #include #endif +#ifdef __STDC__ #include +#else +#include +#endif #include @@ -204,13 +212,8 @@ int inet_aton(const char *cp, struct in_addr *ia); #if defined __GNUC__ #define PACKED__ __attribute__ ((packed)) -#elif defined _MSC_VER -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET -#define PACKED__ #elif defined __sgi #define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET 0 #define PACKED__ #else #error "Packed attribute or pragma shall be supported" @@ -246,49 +249,41 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start(void); +void if_start _P((void)); #else -void if_start(struct ttys *); +void if_start _P((struct ttys *)); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len(char *, const char *, va_list); - extern int sprintf_len(char *, const char *, ...); + extern int vsprintf_len _P((char *, const char *, va_list)); + extern int sprintf_len _P((char *, const char *, ...)); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf(char *, const char *, va_list); + extern int vsprintf _P((char *, const char *, va_list)); # endif - extern int vfprintf(FILE *, const char *, va_list); + extern int vfprintf _P((FILE *, const char *, va_list)); #endif #ifndef HAVE_STRERROR - extern char *strerror(int error); + extern char *strerror _P((int error)); #endif #ifndef HAVE_INDEX - char *index(const char *, int); + char *index _P((const char *, int)); #endif #ifndef HAVE_GETHOSTID - long gethostid(void); + long gethostid _P((void)); #endif -void lprint(const char *, ...); +void lprint _P((const char *, ...)); extern int do_echo; -#if SIZEOF_CHAR_P == 4 -# define insque_32 insque -# define remque_32 remque -#else - extern inline void insque_32(void *, void *); - extern inline void remque_32(void *); -#endif - #ifndef _WIN32 #include #endif @@ -299,47 +294,48 @@ extern int do_echo; int cksum(struct mbuf *m, int len); /* if.c */ -void if_init(void); -void if_output(struct socket *, struct mbuf *); +void if_init _P((void)); +void if_output _P((struct socket *, struct mbuf *)); /* ip_input.c */ -void ip_init(void); -void ip_input(struct mbuf *); -struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); -void ip_freef(struct ipq *); -void ip_enq(register struct ipasfrag *, register struct ipasfrag *); -void ip_deq(register struct ipasfrag *); -void ip_slowtimo(void); -void ip_stripoptions(register struct mbuf *, struct mbuf *); +void ip_init _P((void)); +void ip_input _P((struct mbuf *)); +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *); +void ip_freef _P((struct ipq *)); +void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); +void ip_deq _P((register struct ipasfrag *)); +void ip_slowtimo _P((void)); +void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); /* ip_output.c */ -int ip_output(struct socket *, struct mbuf *); +int ip_output _P((struct socket *, struct mbuf *)); /* tcp_input.c */ -int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); -void tcp_input(register struct mbuf *, int, struct socket *); -void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); -void tcp_xmit_timer(register struct tcpcb *, int); -u_int tcp_mss(register struct tcpcb *, u_int); +int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); +void tcp_input _P((register struct mbuf *, int, struct socket *)); +void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); +void tcp_xmit_timer _P((register struct tcpcb *, int)); +int tcp_mss _P((register struct tcpcb *, u_int)); /* tcp_output.c */ -int tcp_output(register struct tcpcb *); -void tcp_setpersist(register struct tcpcb *); +int tcp_output _P((register struct tcpcb *)); +void tcp_setpersist _P((register struct tcpcb *)); /* tcp_subr.c */ -void tcp_init(void); -void tcp_template(struct tcpcb *); -void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); -struct tcpcb * tcp_newtcpcb(struct socket *); -struct tcpcb * tcp_close(register struct tcpcb *); -void tcp_drain(void); -void tcp_sockclosed(struct tcpcb *); -int tcp_fconnect(struct socket *); -void tcp_connect(struct socket *); -int tcp_attach(struct socket *); -u_int8_t tcp_tos(struct socket *); -int tcp_emu(struct socket *, struct mbuf *); -int tcp_ctl(struct socket *); +void tcp_init _P((void)); +void tcp_template _P((struct tcpcb *)); +void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); +struct tcpcb * tcp_newtcpcb _P((struct socket *)); +struct tcpcb * tcp_close _P((register struct tcpcb *)); +void tcp_drain _P((void)); +void tcp_sockclosed _P((struct tcpcb *)); +int tcp_fconnect _P((struct socket *)); +void tcp_connect _P((struct socket *)); +int tcp_attach _P((struct socket *)); +u_int8_t tcp_tos _P((struct socket *)); +int tcp_emu _P((struct socket *, struct mbuf *)); +int tcp_ctl _P((struct socket *)); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -355,4 +351,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif +#ifdef _WIN32 +#undef errno +#define errno (WSAGetLastError()) +#endif + #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h old mode 100644 new mode 100755 index 237268fa8..e583dcc80 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -40,6 +40,11 @@ */ #undef USE_LOWCPU +/* Define this if your compiler doesn't like prototypes */ +#ifndef __STDC__ +#define NO_PROTOTYPES +#endif + /*********************************************************/ /* * Autoconf defined configuration options @@ -72,6 +77,9 @@ /* Define if you have sys/stropts.h */ #undef HAVE_SYS_STROPTS_H +/* Define if your compiler doesn't like prototypes */ +#undef NO_PROTOTYPES + /* Define if you don't have u_int32_t etc. typedef'd */ #undef NEED_TYPEDEFS #ifdef __sun__ diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c old mode 100644 new mode 100755 index 42ba31b24..f3d10e538 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -14,12 +14,6 @@ #include #endif -#ifdef _WIN32 -#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) -#else -#define IS_EAGAIN(e) ((e) == EAGAIN) -#endif - void so_init() { @@ -103,12 +97,11 @@ int soread(so) struct socket *so; { - int n, nn; - u_int lss, total; + int n, nn, lss, total; struct sbuf *sb = &so->so_snd; - u_int len = sb->sb_datalen - sb->sb_cc; + int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; - u_int mss = so->so_tcpcb->t_maxseg; + int mss = so->so_tcpcb->t_maxseg; DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); @@ -166,8 +159,7 @@ soread(so) nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif if (nn <= 0) { - int error = WSAGetLastError(); - if (nn < 0 && IS_EAGAIN(error)) + if (nn < 0 && (errno == EINTR || errno == EAGAIN)) return 0; else { DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); @@ -305,7 +297,7 @@ sowrite(so) { int n,nn; struct sbuf *sb = &so->so_rcv; - u_int len = sb->sb_cc; + int len = sb->sb_cc; struct iovec iov[2]; DEBUG_CALL("sowrite"); @@ -352,12 +344,9 @@ sowrite(so) nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0) { - int error = WSAGetLastError(); - if (IS_EAGAIN(error)) - return 0; - } - + if (nn < 0 && (errno == EAGAIN || errno == EINTR)) + return 0; + if (nn <= 0) { DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", so->so_state, errno)); @@ -416,9 +405,8 @@ sorecvfrom(so) if(len == -1 || len == 0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", errno,strerror(errno))); @@ -431,7 +419,7 @@ sorecvfrom(so) udp_detach(so); } else { /* A "normal" UDP packet */ struct mbuf *m; - u_int len; + int len; ioctlsockopt_t n; if (!(m = m_get())) return; @@ -454,14 +442,13 @@ sorecvfrom(so) m->m_len = recvfrom(so->s, m->m_data, len, 0, (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %zu, errno = %d-%s\n", + DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", m->m_len, errno,strerror(errno))); if(m->m_len<0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); @@ -526,9 +513,7 @@ sosendto(so, m) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - char addrstr[INET_ADDRSTRLEN]; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); /* Don't care what port we get */ ret = sendto(so->s, m->m_data, m->m_len, 0, @@ -599,12 +584,16 @@ solisten(port, laddr, lport, flags) (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || (listen(s,1) < 0)) { - int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ + int tmperrno = errno; /* Don't clobber the real reason we failed */ close(s); sofree(so); /* Restore the real errno */ - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(tmperrno); +#else + errno = tmperrno; +#endif return NULL; } setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h old mode 100644 new mode 100755 index 3b0fee169..d05354c8c --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -81,24 +81,24 @@ struct iovec { }; #endif -void so_init(void); -struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); -struct socket * socreate(void); -void sofree(struct socket *); -int soread(struct socket *); -void sorecvoob(struct socket *); -int sosendoob(struct socket *); -int sowrite(struct socket *); -void sorecvfrom(struct socket *); -int sosendto(struct socket *, struct mbuf *); -struct socket * solisten(u_int, u_int32_t, u_int, int); -void sorwakeup(struct socket *); -void sowwakeup(struct socket *); -void soisfconnecting(register struct socket *); -void soisfconnected(register struct socket *); -void sofcantrcvmore(struct socket *); -void sofcantsendmore(struct socket *); -void soisfdisconnected(struct socket *); -void sofwdrain(struct socket *); +void so_init _P((void)); +struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); +struct socket * socreate _P((void)); +void sofree _P((struct socket *)); +int soread _P((struct socket *)); +void sorecvoob _P((struct socket *)); +int sosendoob _P((struct socket *)); +int sowrite _P((struct socket *)); +void sorecvfrom _P((struct socket *)); +int sosendto _P((struct socket *, struct mbuf *)); +struct socket * solisten _P((u_int, u_int32_t, u_int, int)); +void sorwakeup _P((struct socket *)); +void sowwakeup _P((struct socket *)); +void soisfconnecting _P((register struct socket *)); +void soisfconnected _P((register struct socket *)); +void sofcantrcvmore _P((struct socket *)); +void sofcantsendmore _P((struct socket *)); +void soisfdisconnected _P((struct socket *)); +void sofwdrain _P((struct socket *)); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h old mode 100644 new mode 100755 index 24e7914ab..5f03f9e17 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -38,8 +38,8 @@ typedef u_int32_t tcp_seq; #define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ #define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ -extern size_t tcp_rcvspace; -extern size_t tcp_sndspace; +extern int tcp_rcvspace; +extern int tcp_sndspace; extern struct socket *tcp_last_so; #define TCP_SNDSPACE 8192 @@ -78,7 +78,7 @@ struct tcphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif #include "tcp_var.h" diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c old mode 100644 new mode 100755 index 032e5378e..fc7c0bc01 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -68,7 +68,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #ifdef TCP_ACK_HACK #define TCP_REASS(tp, ti, m, so, flags) {\ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) {\ if (ti->ti_flags & TH_PUSH) \ tp->t_flags |= TF_ACKNOW; \ @@ -91,7 +91,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #else #define TCP_REASS(tp, ti, m, so, flags) { \ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) { \ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ @@ -111,7 +111,10 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #endif int -tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) +tcp_reass(tp, ti, m) + register struct tcpcb *tp; + register struct tcpiphdr *ti; + struct mbuf *m; { register struct tcpiphdr *q; struct socket *so = tp->t_socket; @@ -127,8 +130,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * /* * Find a segment which begins after this one does. */ - for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; - q = (struct tcpiphdr *)q->ti_next) + for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); + q = tcpiphdr_next(q)) if (SEQ_GT(q->ti_seq, ti->ti_seq)) break; @@ -137,9 +140,9 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { + if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { register int i; - q = (struct tcpiphdr *)q->ti_prev; + q = tcpiphdr_prev(q); /* conversion to int (in i) handles seq wraparound */ i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { @@ -159,37 +162,36 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * ti->ti_len -= i; ti->ti_seq += i; } - q = (struct tcpiphdr *)(q->ti_next); + q = tcpiphdr_next(q); } tcpstat.tcps_rcvoopack++; tcpstat.tcps_rcvoobyte += ti->ti_len; - REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ + ti->ti_mbuf = m; /* * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct tcpiphdr *)tp) { + while (!tcpfrag_list_end(q, tp)) { register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; if (i <= 0) break; if (i < q->ti_len) { q->ti_seq += i; q->ti_len -= i; - m_adj((struct mbuf *) REASS_MBUF(q), i); + m_adj(q->ti_mbuf, i); break; } - q = (struct tcpiphdr *)q->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); - remque_32((void *)(q->ti_prev)); + q = tcpiphdr_next(q); + m = tcpiphdr_prev(q)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(q))); m_freem(m); } /* * Stick new segment in its place. */ - insque_32(ti, (void *)(q->ti_prev)); - + insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); present: /* * Present data to user, advancing rcv_nxt through @@ -197,17 +199,17 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * */ if (!TCPS_HAVEESTABLISHED(tp->t_state)) return (0); - ti = (struct tcpiphdr *) tp->seg_next; - if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) + ti = tcpfrag_list_first(tp); + if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) return (0); if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) return (0); do { tp->rcv_nxt += ti->ti_len; flags = ti->ti_flags & TH_FIN; - remque_32(ti); - m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ - ti = (struct tcpiphdr *)ti->ti_next; + remque(tcpiphdr2qlink(ti)); + m = ti->ti_mbuf; + ti = tcpiphdr_next(ti); /* if (so->so_state & SS_FCANTRCVMORE) */ if (so->so_state & SS_FCANTSENDMORE) m_freem(m); @@ -226,9 +228,13 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * * TCP input routine, follows pages 65-76 of the * protocol specification dated September, 1981 very closely. */ -void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) +void +tcp_input(m, iphlen, inso) + register struct mbuf *m; + int iphlen; + struct socket *inso; { - struct ip save_ip, *ip; + struct ip save_ip, *ip; register struct tcpiphdr *ti; caddr_t optp = NULL; int optlen = 0; @@ -236,25 +242,23 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) register struct tcpcb *tp = 0; register int tiflags; struct socket *so = 0; - int todrop; - u_int acked; - int ourfinisacked, needoutput = 0; - /* int dropsocket = 0; */ + int todrop, acked, ourfinisacked, needoutput = 0; +/* int dropsocket = 0; */ int iss = 0; u_long tiwin; int ret; - /* int ts_present = 0; */ +/* int ts_present = 0; */ DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", - (long)m, iphlen, (long)inso)); - + DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", + (long )m, iphlen, (long )inso )); + /* * If called with m == 0, then we're continuing the connect */ if (m == NULL) { so = inso; - + /* Re-set a few variables */ tp = sototcpcb(so); m = so->so_m; @@ -262,46 +266,47 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) ti = so->so_ti; tiwin = ti->ti_win; tiflags = ti->ti_flags; - + goto cont_conn; } - - + + tcpstat.tcps_rcvtotal++; /* * Get IP and TCP header together in first mbuf. * Note: IP leaves IP header in first mbuf. */ ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); + if (iphlen > sizeof(struct ip )) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen=sizeof(struct ip ); } /* XXX Check if too short */ - + /* * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - ip = mtod(m, struct ip *); - save_ip = *ip; - save_ip.ip_len += iphlen; + ip=mtod(m, struct ip *); + save_ip = *ip; + save_ip.ip_len+= iphlen; /* * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip) + tlen; + len = sizeof(struct ip ) + tlen; /* keep checksum for ICMP reply - * ti->ti_sum = cksum(m, len); + * ti->ti_sum = cksum(m, len); * if (ti->ti_sum) { */ - if (cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; + if(cksum(m, len)) { + tcpstat.tcps_rcvbadsum++; + goto drop; } /* @@ -309,37 +314,37 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * pull out TCP options and adjust length. XXX */ off = ti->ti_off << 2; - if (off < sizeof(struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; + if (off < sizeof (struct tcphdr) || off > tlen) { + tcpstat.tcps_rcvbadoff++; + goto drop; } tlen -= off; ti->ti_len = tlen; - if (off > sizeof(struct tcphdr)) { - optlen = off - sizeof(struct tcphdr); - optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); + if (off > sizeof (struct tcphdr)) { + optlen = off - sizeof (struct tcphdr); + optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); - /* + /* * Do quick retrieval of timestamp options ("options * prediction?"). If timestamp is the only option and it's * formatted as recommended in RFC 1323 appendix A, we * quickly get the values now and not bother calling * tcp_dooptions(), etc. */ - /* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ +/* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ } tiflags = ti->ti_flags; - + /* * Convert TCP protocol specific fields to host format. */ @@ -351,20 +356,20 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) /* * Drop TCP, IP headers and TCP options. */ - m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - + m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + /* * Locate pcb for segment. */ findso: so = tcp_last_so; if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); + ti->ti_dst, ti->ti_dport); if (so) tcp_last_so = so; ++tcpstat.tcps_socachemiss; @@ -377,63 +382,63 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * but should either do a listen or a connect soon. * * state == CLOSED means we've done socreate() but haven't - * attached it to a protocol yet... - * + * attached it to a protocol yet... + * * XXX If a TCB does not exist, and the TH_SYN flag is * the only flag set, then create a session, mark it * as if it was LISTENING, and continue... */ if (so == 0) { - if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) - goto dropwithreset; - - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } - - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); - - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ - - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; - - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; - - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; + if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) + goto dropwithreset; + + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } + + sbreserve(&so->so_snd, tcp_sndspace); + sbreserve(&so->so_rcv, tcp_rcvspace); + + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ + + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; + + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; + + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; } - - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; + + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; tp = sototcpcb(so); - + /* XXX Should never fail */ if (tp == 0) goto dropwithreset; if (tp->t_state == TCPS_CLOSED) goto drop; - + /* Unscale the window into a 32-bit value. */ /* if ((tiflags & TH_SYN) == 0) * tiwin = ti->ti_win << tp->snd_scale; * else */ - tiwin = ti->ti_win; + tiwin = ti->ti_win; /* * Segment received on connection. @@ -441,66 +446,66 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) */ tp->t_idle = 0; if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; + tp->t_timer[TCPT_KEEP] = tcp_keepidle; /* * Process options if not in LISTEN state, * else do it below (after getting remote address). */ if (optp && tp->t_state != TCPS_LISTEN) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ + tcp_dooptions(tp, (u_char *)optp, optlen, ti); +/* , */ +/* &ts_present, &ts_val, &ts_ecr); */ + + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && - /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { - /* + (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && +/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { + /* * If last ACK falls within this segment's sequence numbers, * record the timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ if (ti->ti_len == 0) { if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { /* * this is a pure ack for outstanding data. */ ++tcpstat.tcps_predack; - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && -SEQ_GT(ti->ti_ack, tp->t_rtseq)) +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && + SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_xmit_timer(tp, tp->t_rtt); acked = ti->ti_ack - tp->snd_una; tcpstat.tcps_rcvackpack++; @@ -523,27 +528,26 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* + /* * There's room in so_snd, sowwakup will read() * from the socket if we can */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ if (so->so_snd.sb_cc) (void) tcp_output(tp); return; } - } - else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && - ti->ti_len <= sbspace(&so->so_rcv)) { + } else if (ti->ti_ack == tp->snd_una && + tcpfrag_list_empty(tp) && + ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet * with nothing on the reassembly queue and @@ -557,26 +561,25 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Add data to socket buffer. */ if (so->so_emu) { - if (tcp_emu(so, m)) sbappend(so, m); - } - else + if (tcp_emu(so,m)) sbappend(so, m); + } else sbappend(so, m); - - /* + + /* * XXX This is called when data arrives. Later, check * if we can actually write() to the socket * XXX Need to check? It's be NON_BLOCKING */ - /* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ +/* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ tp->t_flags |= TF_ACKNOW; tcp_output(tp); return; @@ -589,147 +592,141 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * but not less than advertised window. */ { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); } switch (tp->t_state) { - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ case TCPS_LISTEN: { - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; - - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ - - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; + + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ + + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { #if 0 - if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } - else + if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } else #endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } - } - } - if (so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if (tcp_fconnect(so) == -1) { - int error = WSAGetLastError(); - if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { - u_char code = ICMP_UNREACH_NET; - DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", - errno, strerror(errno))); - if (error == WSAECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, - TH_RST | TH_ACK); - } - else { - if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - *ip = save_ip; - icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - return; - } - } - - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - return; - - cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if(ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } } - cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR / 2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; + } + if(so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ + } + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { + u_char code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", + errno,strerror(errno))); + if(errno == ECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, + TH_RST|TH_ACK); + } else { + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + *ip=save_ip; + icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + } else { + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + } + return; + + cont_conn: + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } + cont_input: + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tcpstat.tcps_accepts++; + goto trimthenstep6; } /* case TCPS_LISTEN */ - + /* * If the state is SYN_SENT: * if seg contains an ACK, but not for our SYN, drop the input. @@ -744,13 +741,13 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ case TCPS_SYN_SENT: if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) goto dropwithreset; if (tiflags & TH_RST) { if (tiflags & TH_ACK) - tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ + tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ goto drop; } @@ -770,7 +767,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcpstat.tcps_connects++; soisfconnected(so); tp->t_state = TCPS_ESTABLISHED; - + /* Do window scaling on this connection? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -778,7 +775,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); /* * if we didn't have to retransmit the SYN, @@ -786,11 +783,10 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ if (tp->t_rtt) tcp_xmit_timer(tp, tp->t_rtt); - } - else + } else tp->t_state = TCPS_SYN_RECEIVED; - trimthenstep6: +trimthenstep6: /* * Advance ti->ti_seq to correspond to first data byte. * If data, trim to stay within window, @@ -812,45 +808,45 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* * States other than LISTEN or SYN_SENT. * First check timestamp, if present. - * Then check that at least some bytes of segment are within + * Then check that at least some bytes of segment are within * receive window. If segment begins before rcv_nxt, * drop leading data (and SYN); if nothing left, just ack. - * + * * RFC 1323 PAWS: If we have a timestamp reply on this segment * and it's less than ts_recent, drop it. */ - /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ - /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ - /* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ +/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ +/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ +/* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ todrop = tp->rcv_nxt - ti->ti_seq; if (todrop > 0) { if (tiflags & TH_SYN) { tiflags &= ~TH_SYN; ti->ti_seq++; - if (ti->ti_urp > 1) + if (ti->ti_urp > 1) ti->ti_urp--; else tiflags &= ~TH_URG; @@ -860,14 +856,14 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Following if statement from Stevens, vol. 2, p. 960. */ if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { /* * Any valid FIN must be to the left of the window. * At this point the FIN must be a duplicate or out * of sequence; drop it. */ tiflags &= ~TH_FIN; - + /* * Send an ACK to resynchronize and drop any data. * But keep on processing for RST or ACK. @@ -876,8 +872,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) todrop = ti->ti_len; tcpstat.tcps_rcvduppack++; tcpstat.tcps_rcvdupbyte += todrop; - } - else { + } else { tcpstat.tcps_rcvpartduppack++; tcpstat.tcps_rcvpartdupbyte += todrop; } @@ -896,7 +891,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * user processes are gone, then RST the other end. */ if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { tp = tcp_close(tp); tcpstat.tcps_rcvafterclose++; goto dropwithreset; @@ -906,7 +901,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If segment ends after window, drop trailing data * (and PUSH and FIN); if nothing left, just ACK. */ - todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); + todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); if (todrop > 0) { tcpstat.tcps_rcvpackafterwin++; if (todrop >= ti->ti_len) { @@ -918,8 +913,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * are above the previous ones. */ if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { iss = tp->rcv_nxt + TCP_ISSINCR; tp = tcp_close(tp); goto findso; @@ -934,55 +929,53 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { tp->t_flags |= TF_ACKNOW; tcpstat.tcps_rcvwinprobe++; - } - else + } else goto dropafterack; - } - else + } else tcpstat.tcps_rcvbyteafterwin += todrop; m_adj(m, -todrop); ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH | TH_FIN); + tiflags &= ~(TH_PUSH|TH_FIN); } /* * If last ACK falls within this segment's sequence numbers, * record its timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ if (tiflags&TH_RST) switch (tp->t_state) { case TCPS_SYN_RECEIVED: - /* so->so_error = ECONNREFUSED; */ +/* so->so_error = ECONNREFUSED; */ goto close; case TCPS_ESTABLISHED: case TCPS_FIN_WAIT_1: case TCPS_FIN_WAIT_2: case TCPS_CLOSE_WAIT: - /* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; +/* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + tcpstat.tcps_drops++; + tp = tcp_close(tp); + goto drop; case TCPS_CLOSING: case TCPS_LAST_ACK: @@ -996,7 +989,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * error and we send an RST and drop the connection. */ if (tiflags & TH_SYN) { - tp = tcp_drop(tp, 0); + tp = tcp_drop(tp,0); goto dropwithreset; } @@ -1009,45 +1002,42 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Ack processing. */ switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ case TCPS_SYN_RECEIVED: if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) + SEQ_GT(ti->ti_ack, tp->snd_max)) goto dropwithreset; tcpstat.tcps_connects++; tp->t_state = TCPS_ESTABLISHED; - /* - * The sent SYN is ack'ed with our sequence number +1 - * The first data byte already in the buffer will get + /* + * The sent SYN is ack'ed with our sequence number +1 + * The first data byte already in the buffer will get * lost if no correction is made. This is only needed for * SS_CTL since the buffer is empty otherwise. - * tp->snd_una++; or: + * tp->snd_una++; or: */ - tp->snd_una = ti->ti_ack; + tp->snd_una=ti->ti_ack; if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } - else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } - else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } - else { - soisfconnected(so); + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } else { + soisfconnected(so); } - + /* Do window scaling? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -1055,7 +1045,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); tp->snd_wl1 = ti->ti_seq - 1; /* Avoid ack processing; snd_una==ti_ack => dup ack */ goto synrx_to_est; @@ -1079,9 +1069,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", - (long)m, (long)so)); + tcpstat.tcps_rcvdupack++; + DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", + (long )m, (long )so)); /* * If we have outstanding data (other than * a window probe), this is a completely @@ -1101,18 +1091,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * the new ssthresh). * * Dup acks mean that packets have left the - * network (they're now cached at the receiver) + * network (they're now cached at the receiver) * so bump cwnd by the amount in the receiver * to keep a constant cwnd packets in the * network. */ if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) + ti->ti_ack != tp->snd_una) tp->t_dupacks = 0; else if (++tp->t_dupacks == tcprexmtthresh) { tcp_seq onxt = tp->snd_nxt; u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / + min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; if (win < 2) @@ -1122,20 +1112,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tp->t_rtt = 0; tp->snd_nxt = ti->ti_ack; tp->snd_cwnd = tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; + tp->t_maxseg * tp->t_dupacks; if (SEQ_GT(onxt, tp->snd_nxt)) tp->snd_nxt = onxt; goto drop; - } - else if (tp->t_dupacks > tcprexmtthresh) { + } else if (tp->t_dupacks > tcprexmtthresh) { tp->snd_cwnd += tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); goto drop; } - } - else + } else tp->t_dupacks = 0; break; } @@ -1145,7 +1133,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * for the other side's cached packets, retract it. */ if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) + tp->snd_cwnd > tp->snd_ssthresh) tp->snd_cwnd = tp->snd_ssthresh; tp->t_dupacks = 0; if (SEQ_GT(ti->ti_ack, tp->snd_max)) { @@ -1165,12 +1153,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * timer backoff (cf., Phil Karn's retransmit alg.). * Recompute the initial retransmit timer. */ - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp,tp->t_rtt); /* * If all outstanding data is acked, stop retransmit @@ -1181,8 +1169,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (ti->ti_ack == tp->snd_max) { tp->t_timer[TCPT_REXMT] = 0; needoutput = 1; - } - else if (tp->t_timer[TCPT_PERSIST] == 0) + } else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; /* * When new data is acked, open the congestion window. @@ -1192,41 +1179,40 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * (maxseg^2 / cwnd per packet). */ { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); } if (acked > so->so_snd.sb_cc) { tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, so->so_snd.sb_cc); + sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); ourfinisacked = 1; - } - else { + } else { sbdrop(&so->so_snd, acked); tp->snd_wnd -= acked; ourfinisacked = 0; } /* * XXX sowwakup is called when data is acked and there's room for - * for more data... it should read() the socket + * for more data... it should read() the socket */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ tp->snd_una = ti->ti_ack; if (SEQ_LT(tp->snd_nxt, tp->snd_una)) tp->snd_nxt = tp->snd_una; switch (tp->t_state) { - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ case TCPS_FIN_WAIT_1: if (ourfinisacked) { /* @@ -1244,12 +1230,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ case TCPS_CLOSING: if (ourfinisacked) { tp->t_state = TCPS_TIME_WAIT; @@ -1259,12 +1245,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ case TCPS_LAST_ACK: if (ourfinisacked) { tp = tcp_close(tp); @@ -1272,11 +1258,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; goto dropafterack; @@ -1289,12 +1275,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Don't look at window if no ACK: TAC's send garbage on first SYN. */ if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { /* keep track of pure window updates */ if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) tcpstat.tcps_rcvwinupd++; tp->snd_wnd = tiwin; tp->snd_wl1 = ti->ti_seq; @@ -1308,7 +1294,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Process segments with URG. */ if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { /* * This is a kludge, but if we receive and accept * random urgent pointers, we'll crash in @@ -1324,32 +1310,31 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If this segment advances the known urgent pointer, * then mark the data stream. This should not happen * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since - * a FIN has been received from the remote side. + * a FIN has been received from the remote side. * In these states we ignore the URG. * * According to RFC961 (Assigned Protocols), * the urgent pointer points to the last octet * of urgent data. We continue, however, * to consider it to indicate the first octet - * of data past the urgent section as the original + * of data past the urgent section as the original * spec states (in one of two places). */ - if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { + if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + + so->so_urgc = so->so_rcv.sb_cc + (tp->rcv_up - tp->rcv_nxt); /* -1; */ tp->rcv_up = ti->ti_seq + ti->ti_urp; - + } - } - else + } else /* * If no out of band data is expected, * pull receive urgent pointer along * with the receive window. */ if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; + tp->rcv_up = tp->rcv_nxt; dodata: /* @@ -1361,7 +1346,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * connection then we just ignore the text. */ if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { TCP_REASS(tp, ti, m, so, tiflags); /* * Note the amount of data that peer has sent into @@ -1369,8 +1354,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * buffer size. */ len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } - else { + } else { m_free(m); tiflags &= ~TH_FIN; } @@ -1384,45 +1368,45 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* * If we receive a FIN we can't send more data, * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the + * Shutdown the socket if there is no rx data in the * buffer. * soread() is called on completion of shutdown() and * will got to TCPS_LAST_ACK, and use tcp_output() * to send the FIN. */ - /* sofcantrcvmore(so); */ +/* sofcantrcvmore(so); */ sofwdrain(so); - + tp->t_flags |= TF_ACKNOW; tp->rcv_nxt++; } switch (tp->t_state) { - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ case TCPS_SYN_RECEIVED: case TCPS_ESTABLISHED: - if (so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ + if(so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ case TCPS_FIN_WAIT_1: tp->t_state = TCPS_CLOSING; break; - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ case TCPS_FIN_WAIT_2: tp->t_state = TCPS_TIME_WAIT; tcp_canceltimers(tp); @@ -1430,9 +1414,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) soisfdisconnected(so); break; - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; break; @@ -1443,18 +1427,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If this is a small packet, then ACK now - with Nagel * congestion avoidance sender won't send more until * he gets an ACK. - * + * * See above. */ - /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ - /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ +/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ +/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { tp->t_flags |= TF_ACKNOW; } @@ -1462,7 +1446,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Return any desired output. */ if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void)tcp_output(tp); + (void) tcp_output(tp); } return; @@ -1475,7 +1459,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) goto drop; m_freem(m); tp->t_flags |= TF_ACKNOW; - (void)tcp_output(tp); + (void) tcp_output(tp); return; dropwithreset: @@ -1484,8 +1468,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); else { if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, - TH_RST | TH_ACK); + tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, + TH_RST|TH_ACK); } return; @@ -1504,7 +1488,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * u_int32_t *ts_val, *ts_ecr; */ void -tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) +tcp_dooptions(tp, cp, cnt, ti) + struct tcpcb *tp; + u_char *cp; + int cnt; + struct tcpiphdr *ti; { u_int16_t mss; int opt, optlen; @@ -1535,7 +1523,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) continue; memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); NTOHS(mss); - tcp_mss(tp, mss); /* sets t_maxseg */ + (void) tcp_mss(tp, mss); /* sets t_maxseg */ break; /* case TCPOPT_WINDOW: @@ -1580,7 +1568,11 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) #ifdef notdef -void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) +void +tcp_pulloutofband(so, ti, m) + struct socket *so; + struct tcpiphdr *ti; + register struct mbuf *m; { int cnt = ti->ti_urp - 1; @@ -1610,7 +1602,10 @@ void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct m * and update averages and current timeout. */ -void tcp_xmit_timer(register struct tcpcb *tp, int rtt) +void +tcp_xmit_timer(tp, rtt) + register struct tcpcb *tp; + int rtt; { register short delta; @@ -1697,10 +1692,13 @@ void tcp_xmit_timer(register struct tcpcb *tp, int rtt) * parameters from pre-set or cached values in the routing entry. */ -u_int tcp_mss(register struct tcpcb *tp, u_int offer) +int +tcp_mss(tp, offer) + register struct tcpcb *tp; + u_int offer; { struct socket *so = tp->t_socket; - u_int mss; + int mss; DEBUG_CALL("tcp_mss"); DEBUG_ARG("tp = %lx", (long)tp); diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c old mode 100644 new mode 100755 index 01df0118f..5cb1a61e3 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -63,7 +63,9 @@ u_char tcp_outflags[TCP_NSTATES] = { /* * Tcp output routine: figure out what should be sent and send it. */ -int tcp_output(register struct tcpcb *tp) +int +tcp_output(tp) + register struct tcpcb *tp; { register struct socket *so = tp->t_socket; register long len, win; @@ -124,7 +126,7 @@ int tcp_output(register struct tcpcb *tp) * to send then the probe will be the FIN * itself. */ - if (off < (int)so->so_snd.sb_cc) + if (off < so->so_snd.sb_cc) flags &= ~TH_FIN; win = 1; } else { @@ -199,12 +201,12 @@ int tcp_output(register struct tcpcb *tp) * taking into account that we are limited by * TCP_MAXWIN << tp->rcv_scale. */ - long adv = min(win, TCP_MAXWIN << tp->rcv_scale) - + long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - (tp->rcv_adv - tp->rcv_nxt); - if (adv >= (long)(2 * tp->t_maxseg)) + if (adv >= (long) (2 * tp->t_maxseg)) goto send; - if (2 * adv >= (long)so->so_rcv.sb_datalen) + if (2 * adv >= (long) so->so_rcv.sb_datalen) goto send; } @@ -357,7 +359,7 @@ int tcp_output(register struct tcpcb *tp) */ /* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); + sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); m->m_len += len; /* } else { @@ -433,12 +435,12 @@ int tcp_output(register struct tcpcb *tp) * Calculate receive window. Don't shrink window, * but avoid silly window syndrome. */ - if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) + if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) win = 0; - if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) - win = (u_long) (TCP_MAXWIN << tp->rcv_scale); - if (win < (tp->rcv_adv - tp->rcv_nxt)) - win = (tp->rcv_adv - tp->rcv_nxt); + if (win > (long)TCP_MAXWIN << tp->rcv_scale) + win = (long)TCP_MAXWIN << tp->rcv_scale; + if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) + win = (long)(tp->rcv_adv - tp->rcv_nxt); ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); if (SEQ_GT(tp->snd_up, tp->snd_una)) { @@ -528,7 +530,7 @@ int tcp_output(register struct tcpcb *tp) { - ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; + ((struct ip *)ti)->ip_len = m->m_len; ((struct ip *)ti)->ip_ttl = ip_defttl; ((struct ip *)ti)->ip_tos = so->so_iptos; @@ -579,7 +581,9 @@ int tcp_output(register struct tcpcb *tp) return (0); } -void tcp_setpersist(register struct tcpcb *tp) +void +tcp_setpersist(tp) + register struct tcpcb *tp; { int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c old mode 100644 new mode 100755 index 70e04b5ee..391350802 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -46,13 +46,14 @@ int tcp_mssdflt = TCP_MSS; int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -size_t tcp_rcvspace; /* You may want to change this */ -size_t tcp_sndspace; /* Keep small if you have an error prone link */ +int tcp_rcvspace; /* You may want to change this */ +int tcp_sndspace; /* Keep small if you have an error prone link */ /* * Tcp initialization */ -void tcp_init() +void +tcp_init() { tcp_iss = 1; /* wrong */ tcb.so_next = tcb.so_prev = &tcb; @@ -73,12 +74,14 @@ void tcp_init() * necessary when the connection is used. */ /* struct tcpiphdr * */ -void tcp_template(struct tcpcb *tp) +void +tcp_template(tp) + struct tcpcb *tp; { struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; - n->ti_next = n->ti_prev = 0; + n->ti_mbuf = NULL; n->ti_x1 = 0; n->ti_pr = IPPROTO_TCP; n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); @@ -110,8 +113,13 @@ void tcp_template(struct tcpcb *tp) * In any case the ack and sequence number of the transmitted * segment are as specified by the parameters. */ -void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, - register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) +void +tcp_respond(tp, ti, m, ack, seq, flags) + struct tcpcb *tp; + register struct tcpiphdr *ti; + register struct mbuf *m; + tcp_seq ack, seq; + int flags; { register int tlen; int win = 0; @@ -156,7 +164,7 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, tlen += sizeof (struct tcpiphdr); m->m_len = tlen; - ti->ti_next = ti->ti_prev = 0; + ti->ti_mbuf = 0; ti->ti_x1 = 0; ti->ti_seq = htonl(seq); ti->ti_ack = htonl(ack); @@ -185,7 +193,9 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, * empty reassembly queue and hooking it to the argument * protocol control block. */ -struct tcpcb *tcp_newtcpcb(struct socket *so) +struct tcpcb * +tcp_newtcpcb(so) + struct socket *so; { register struct tcpcb *tp; @@ -194,7 +204,7 @@ struct tcpcb *tcp_newtcpcb(struct socket *so) return ((struct tcpcb *)0); memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; + tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; tp->t_maxseg = tcp_mssdflt; tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; @@ -258,7 +268,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) * discard internet protocol block * wake up any sleepers */ -struct tcpcb *tcp_close(register struct tcpcb *tp) +struct tcpcb * +tcp_close(tp) + register struct tcpcb *tp; { register struct tcpiphdr *t; struct socket *so = tp->t_socket; @@ -268,11 +280,11 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) DEBUG_ARG("tp = %lx", (long )tp); /* free the reassembly queue, if any */ - t = (struct tcpiphdr *) tp->seg_next; - while (t != (struct tcpiphdr *)tp) { - t = (struct tcpiphdr *)t->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); - remque_32((struct tcpiphdr *) t->ti_prev); + t = tcpfrag_list_first(tp); + while (!tcpfrag_list_end(t, tp)) { + t = tcpiphdr_next(t); + m = tcpiphdr_prev(t)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(t))); m_freem(m); } /* It's static */ @@ -294,7 +306,8 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) return ((struct tcpcb *)0); } -void tcp_drain() +void +tcp_drain() { /* XXX */ } @@ -306,7 +319,10 @@ void tcp_drain() #ifdef notdef -void tcp_quench(int i, int errno) +void +tcp_quench(i, errno) + + int errno; { struct tcpcb *tp = intotcpcb(inp); @@ -330,7 +346,9 @@ void tcp_quench(int i, int errno) * for peer to send FIN or not respond to keep-alives, etc. * We can let the user exit from the close as soon as the FIN is acked. */ -void tcp_sockclosed(struct tcpcb *tp) +void +tcp_sockclosed(tp) + struct tcpcb *tp; { DEBUG_CALL("tcp_sockclosed"); @@ -371,7 +389,8 @@ void tcp_sockclosed(struct tcpcb *tp) * nonblocking. Connect returns after the SYN is sent, and does * not wait for ACK+SYN. */ -int tcp_fconnect(struct socket *so) +int tcp_fconnect(so) + struct socket *so; { int ret=0; @@ -404,12 +423,10 @@ int tcp_fconnect(struct socket *so) } else addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - - char addrstr[INET_ADDRSTRLEN]; + DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, - addrstr, sizeof(addrstr)))); + ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); /* We don't care what port we get */ ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); @@ -435,7 +452,9 @@ int tcp_fconnect(struct socket *so) * the time it gets to accept(), so... We simply accept * here and SYN the local-host. */ -void tcp_connect(struct socket *inso) +void +tcp_connect(inso) + struct socket *inso; { struct socket *so; struct sockaddr_in addr; @@ -467,7 +486,7 @@ void tcp_connect(struct socket *inso) so->so_lport = inso->so_lport; } - tcp_mss(sototcpcb(so), 0); + (void) tcp_mss(sototcpcb(so), 0); if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { tcp_close(sototcpcb(so)); /* This will sofree() as well */ @@ -520,7 +539,9 @@ void tcp_connect(struct socket *inso) /* * Attach a TCPCB to a socket. */ -int tcp_attach(struct socket *so) +int +tcp_attach(so) + struct socket *so; { if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) return -1; @@ -554,7 +575,9 @@ struct emu_t *tcpemu = 0; /* * Return TOS according to the above table */ -u_int8_t tcp_tos(struct socket *so) +u_int8_t +tcp_tos(so) + struct socket *so; { int i = 0; struct emu_t *emup; @@ -606,7 +629,10 @@ int do_echo = -1; * * NOTE: if you return 0 you MUST m_free() the mbuf! */ -int tcp_emu(struct socket *so, struct mbuf *m) +int +tcp_emu(so, m) + struct socket *so; + struct mbuf *m; { u_int n1, n2, n3, n4, n5, n6; char buff[256]; @@ -807,7 +833,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) ns->so_laddr=so->so_laddr; ns->so_lport=htons(port); - tcp_mss(sototcpcb(ns), 0); + (void) tcp_mss(sototcpcb(ns), 0); ns->so_faddr=so->so_faddr; ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ @@ -1034,7 +1060,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) * of the connection as a NUL-terminated decimal ASCII string. */ so->so_emu = 0; - for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { + for (lport = 0, i = 0; i < m->m_len-1; ++i) { if (m->m_data[i] < '0' || m->m_data[i] > '9') return 1; /* invalid number */ lport *= 10; @@ -1219,7 +1245,9 @@ int tcp_emu(struct socket *so, struct mbuf *m) * Return 0 if this connections is to be closed, 1 otherwise, * return 2 if this is a command-line connection */ -int tcp_ctl(struct socket *so) +int +tcp_ctl(so) + struct socket *so; { struct sbuf *sb = &so->so_snd; int command; diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h old mode 100644 new mode 100755 index 73fe20894..0bc438c76 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -130,9 +130,9 @@ extern int tcp_backoff[]; struct tcpcb; -void tcp_fasttimo(void); -void tcp_slowtimo(void); -void tcp_canceltimers(struct tcpcb *); -struct tcpcb * tcp_timers(register struct tcpcb *, int); +void tcp_fasttimo _P((void)); +void tcp_slowtimo _P((void)); +void tcp_canceltimers _P((struct tcpcb *)); +struct tcpcb * tcp_timers _P((register struct tcpcb *, int)); #endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h old mode 100644 new mode 100755 index c8e99ae03..064ac69a1 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -36,18 +36,12 @@ #include "tcpip.h" #include "tcp_timer.h" -#if SIZEOF_CHAR_P == 4 - typedef struct tcpiphdr *tcpiphdrp_32; -#else - typedef u_int32_t tcpiphdrp_32; -#endif - /* * Tcp control block, one per tcp; fields: */ struct tcpcb { - tcpiphdrp_32 seg_next; /* sequencing queue */ - tcpiphdrp_32 seg_prev; + struct tcpiphdr *seg_next; /* sequencing queue */ + struct tcpiphdr *seg_prev; short t_state; /* state of this connection */ short t_timer[TCPT_NTIMERS]; /* tcp timers */ short t_rxtshift; /* log(2) of rexmt exp. backoff */ @@ -166,21 +160,6 @@ struct tcpcb { #define TCP_REXMTVAL(tp) \ (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) -/* XXX - * We want to avoid doing m_pullup on incoming packets but that - * means avoiding dtom on the tcp reassembly code. That in turn means - * keeping an mbuf pointer in the reassembly queue (since we might - * have a cluster). As a quick hack, the source & destination - * port numbers (which are no longer needed once we've located the - * tcpcb) are overlayed with an mbuf pointer. - */ -#if SIZEOF_CHAR_P == 4 -typedef struct mbuf *mbufp_32; -#else -typedef u_int32_t mbufp_32; -#endif -#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) - /* * TCP statistics. * Many of these should be kept per connection, diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h old mode 100644 new mode 100755 index dff5a3c96..7974ce3d5 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -40,8 +40,7 @@ struct tcpiphdr { struct ipovly ti_i; /* overlaid ip structure */ struct tcphdr ti_t; /* tcp header */ }; -#define ti_next ti_i.ih_next -#define ti_prev ti_i.ih_prev +#define ti_mbuf ti_i.ih_mbuf.mptr #define ti_x1 ti_i.ih_x1 #define ti_pr ti_i.ih_pr #define ti_len ti_i.ih_len @@ -58,6 +57,14 @@ struct tcpiphdr { #define ti_sum ti_t.th_sum #define ti_urp ti_t.th_urp +#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) +#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) +#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) +#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) +#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) +#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) +#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) + /* * Just a clean way to get to the first byte * of the packet diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c old mode 100644 new mode 100755 index 3ba2971c3..e656c4f06 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -127,6 +127,7 @@ static int tftp_send_error(struct tftp_session *spt, struct sockaddr_in saddr, daddr; struct mbuf *m; struct tftp_t *tp; + int nobytes; m = m_get(); @@ -151,6 +152,8 @@ static int tftp_send_error(struct tftp_session *spt, daddr.sin_addr = spt->client_ip; daddr.sin_port = spt->client_port; + nobytes = 2; + m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - sizeof(struct ip) - sizeof(struct udphdr); diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h old mode 100644 new mode 100755 index b150a0490..f89e03932 --- a/BasiliskII/src/slirp/tftp.h +++ b/BasiliskII/src/slirp/tftp.h @@ -34,7 +34,7 @@ struct tftp_t { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c old mode 100644 new mode 100755 index deedb1e75..7917aaa47 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -128,8 +128,7 @@ udp_input(m, iphlen) * Checksum extended UDP header and data. */ if (udpcksum && uh->uh_sum) { - ((struct ipovly *)ip)->ih_next = 0; - ((struct ipovly *)ip)->ih_prev = 0; + memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply @@ -272,10 +271,10 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ + ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ ui->ui_src = saddr->sin_addr; ui->ui_dst = daddr->sin_addr; @@ -291,7 +290,7 @@ int udp_output2(struct socket *so, struct mbuf *m, if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) ui->ui_sum = 0xffff; } - ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; + ((struct ip *)ui)->ip_len = m->m_len; ((struct ip *)ui)->ip_ttl = ip_defttl; ((struct ip *)ui)->ip_tos = iptos; @@ -338,10 +337,14 @@ udp_attach(so) addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int error = WSAGetLastError(); + int lasterrno=errno; closesocket(so->s); so->s=-1; - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(lasterrno); +#else + errno=lasterrno; +#endif } else { /* success, insert in queue */ so->so_expire = curtime + SO_EXPIRE; diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h old mode 100644 new mode 100755 index 7d844efe2..639a2f2c7 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -54,7 +54,7 @@ struct udphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -64,8 +64,7 @@ struct udpiphdr { struct ipovly ui_i; /* overlaid ip structure */ struct udphdr ui_u; /* udp header */ }; -#define ui_next ui_i.ih_next -#define ui_prev ui_i.ih_prev +#define ui_mbuf ui_i.ih_mbuf.mptr #define ui_x1 ui_i.ih_x1 #define ui_pr ui_i.ih_pr #define ui_len ui_i.ih_len @@ -100,14 +99,14 @@ extern struct udpstat udpstat; extern struct socket udb; struct mbuf; -void udp_init(void); -void udp_input(register struct mbuf *, int); -int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); -int udp_attach(struct socket *); -void udp_detach(struct socket *); -u_int8_t udp_tos(struct socket *); -void udp_emu(struct socket *, struct mbuf *); -struct socket * udp_listen(u_int, u_int32_t, u_int, int); +void udp_init _P((void)); +void udp_input _P((register struct mbuf *, int)); +int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); +int udp_attach _P((struct socket *)); +void udp_detach _P((struct socket *)); +u_int8_t udp_tos _P((struct socket *)); +void udp_emu _P((struct socket *, struct mbuf *)); +struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos); From f8e69c4fb893d7dd7a91a0f4ba1b6eeefa93b450 Mon Sep 17 00:00:00 2001 From: jvernet Date: Thu, 5 Oct 2017 19:31:26 +0200 Subject: [PATCH 173/534] Remove slirp debug message --- .../BasiliskII.xcodeproj/project.pbxproj | 38 ------------------- BasiliskII/src/slirp/ip_input.c | 2 +- 2 files changed, 1 insertion(+), 39 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index ff97d3a77..00ee66ca8 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,25 +7,6 @@ objects = { /* Begin PBXBuildFile section */ - 4E4213FE1F85430F00377045 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4E4213FA1F85430E00377045 /* ether_unix.cpp */; }; - 4E42142F1F854B1700377045 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42142E1F854B1700377045 /* bootp.c */; }; - 4E4214311F854B2C00377045 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214301F854B2C00377045 /* ip_output.c */; }; - 4E4214421F854BB300377045 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214321F854BB100377045 /* tcp_timer.c */; }; - 4E4214431F854BB300377045 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214331F854BB100377045 /* tcp_input.c */; }; - 4E4214441F854BB300377045 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214341F854BB200377045 /* debug.c */; }; - 4E4214451F854BB300377045 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214351F854BB200377045 /* tcp_subr.c */; }; - 4E4214461F854BB300377045 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214361F854BB200377045 /* cksum.c */; }; - 4E4214471F854BB300377045 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214371F854BB200377045 /* ip_input.c */; }; - 4E4214481F854BB300377045 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214381F854BB200377045 /* socket.c */; }; - 4E4214491F854BB300377045 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214391F854BB200377045 /* udp.c */; }; - 4E42144A1F854BB300377045 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143A1F854BB200377045 /* sbuf.c */; }; - 4E42144B1F854BB300377045 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143B1F854BB200377045 /* mbuf.c */; }; - 4E42144C1F854BB300377045 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143C1F854BB200377045 /* tcp_output.c */; }; - 4E42144D1F854BB300377045 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143D1F854BB200377045 /* misc.c */; }; - 4E42144E1F854BB300377045 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143E1F854BB300377045 /* if.c */; }; - 4E42144F1F854BB300377045 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E42143F1F854BB300377045 /* tftp.c */; }; - 4E4214501F854BB300377045 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214401F854BB300377045 /* slirp.c */; }; - 4E4214511F854BB300377045 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4E4214411F854BB300377045 /* ip_icmp.c */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; @@ -1100,9 +1081,7 @@ buildActionMask = 2147483647; files = ( 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, - 4E42144F1F854BB300377045 /* tftp.c in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, - 4E4214481F854BB300377045 /* socket.c in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, @@ -1110,32 +1089,22 @@ 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, - 4E42144E1F854BB300377045 /* if.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, - 4E4214441F854BB300377045 /* debug.c in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 4E42144B1F854BB300377045 /* mbuf.c in Sources */, - 4E4214501F854BB300377045 /* slirp.c in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, - 4E4214431F854BB300377045 /* tcp_input.c in Sources */, 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, - 4E4214311F854B2C00377045 /* ip_output.c in Sources */, - 4E4214421F854BB300377045 /* tcp_timer.c in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, - 4E4214491F854BB300377045 /* udp.c in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, - 4E4214451F854BB300377045 /* tcp_subr.c in Sources */, - 4E4214471F854BB300377045 /* ip_input.c in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, @@ -1143,11 +1112,8 @@ 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, - 4E4214511F854BB300377045 /* ip_icmp.c in Sources */, - 4E4214461F854BB300377045 /* cksum.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, - 4E42144C1F854BB300377045 /* tcp_output.c in Sources */, 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, @@ -1164,7 +1130,6 @@ 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, - 4E4213FE1F85430F00377045 /* ether_unix.cpp in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, @@ -1173,11 +1138,8 @@ 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, - 4E42144D1F854BB300377045 /* misc.c in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, - 4E42142F1F854B1700377045 /* bootp.c in Sources */, 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */, - 4E42144A1F854BB300377045 /* sbuf.c in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, ); diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c index c93c83fe3..7c995c98d 100755 --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -460,7 +460,7 @@ ip_slowtimo() if (l == 0) return; - printf("Line 453\n"); + while (l != &ipq.ip_link) { struct ipq *fp = container_of(l, struct ipq, ip_link); l = l->next; From b2f4de5a8962660cb22c9928d33287604259aae8 Mon Sep 17 00:00:00 2001 From: jvernet Date: Thu, 5 Oct 2017 22:20:15 +0200 Subject: [PATCH 174/534] SheepShaver Pref Editor Udate --- BasiliskII/src/MacOSX/clip_macosx.cpp | 6 +- SheepShaver/src/MacOSX/Launcher/Info.plist | 2 +- .../project.pbxproj | 68 +++++++++++++++--- .../contents.xcworkspacedata | 7 ++ SheepShaver/src/MacOSX/PrefsEditor/Info.plist | 4 +- .../src/MacOSX/PrefsEditor/PrefsEditor.mm | 4 +- .../project.pbxproj | 69 +++++++++++++++++-- .../contents.xcworkspacedata | 7 ++ SheepShaver/src/Unix/sysdeps.h | 2 +- 9 files changed, 145 insertions(+), 24 deletions(-) create mode 100644 SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.xcworkspace/contents.xcworkspacedata create mode 100644 SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.xcworkspace/contents.xcworkspacedata diff --git a/BasiliskII/src/MacOSX/clip_macosx.cpp b/BasiliskII/src/MacOSX/clip_macosx.cpp index 1d37edfcf..a1a3e5dad 100644 --- a/BasiliskII/src/MacOSX/clip_macosx.cpp +++ b/BasiliskII/src/MacOSX/clip_macosx.cpp @@ -100,7 +100,8 @@ void GetScrap(void **handle, uint32 type, int32 offset) { #if defined(__LP64__) D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); - #warning Carbon scrapbook function are not implemented in 64-bit mode + #error Carbon scrapbook function are not implemented in 64-bit mode + #error Use clip_macosx64.mm instead. #else D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); ScrapRef theScrap; @@ -177,7 +178,8 @@ void ZeroScrap() void PutScrap(uint32 type, void *scrap, int32 length) { #if defined(__LP64__) - #warning Carbon scrapbook function are not implemented in 64-bit mode + #error Carbon scrapbook function are not implemented in 64-bit mode + #error Use clip_macosx64.mm instead. D(bug("PutScrap type %4.4s, data %08lx, length %ld\n", &type, scrap, length)); #else static bool clear = true; diff --git a/SheepShaver/src/MacOSX/Launcher/Info.plist b/SheepShaver/src/MacOSX/Launcher/Info.plist index 54bcb8dda..7c2c94bf0 100644 --- a/SheepShaver/src/MacOSX/Launcher/Info.plist +++ b/SheepShaver/src/MacOSX/Launcher/Info.plist @@ -9,7 +9,7 @@ CFBundleIconFile SheepShaver.icns CFBundleIdentifier - net.sourceforge.SheepShaverLauncher + $(PRODUCT_BUNDLE_IDENTIFIER) CFBundleInfoDictionaryVersion 6.0 CFBundleName diff --git a/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj index fe382f61e..abfe0315f 100644 --- a/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj @@ -10,7 +10,7 @@ 084186B10B3A0515004B1F63 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 084186B00B3A0515004B1F63 /* VMSettingsController.mm */; }; 088EBBB61B41AEBB0066D352 /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = 088EBBB51B41AEBB0066D352 /* DiskType.m */; }; 08AAB16D102614D5007E1230 /* SheepShaver.icns in Resources */ = {isa = PBXBuildFile; fileRef = 08AAB16C102614D5007E1230 /* SheepShaver.icns */; }; - 08AAB1B310261691007E1230 /* SheepShaver in Copy SheepShaver */ = {isa = PBXBuildFile; fileRef = 08AAB1B11026168B007E1230 /* SheepShaver */; }; + 08AAB1B310261691007E1230 /* SheepShaver in Copy SheepShaver */ = {isa = PBXBuildFile; fileRef = 08AAB1B11026168B007E1230 /* SheepShaver */; settings = {ATTRIBUTES = (CodeSignOnCopy, ); }; }; 08B5FAFD102497FA0047FD1B /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 08B5FAFB102497FA0047FD1B /* VMSettingsWindow.nib */; }; 08B5FB01102498B00047FD1B /* VMListWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 08B5FAFF102498B00047FD1B /* VMListWindow.nib */; }; 08B5FB221024FE320047FD1B /* AppController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 08B5FB211024FE320047FD1B /* AppController.mm */; }; @@ -209,6 +209,9 @@ /* Begin PBXProject section */ 29B97313FDCFA39411CA2CEA /* Project object */ = { isa = PBXProject; + attributes = { + LastUpgradeCheck = 0900; + }; buildConfigurationList = C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverLauncher" */; compatibilityVersion = "Xcode 3.2"; developmentRegion = English; @@ -310,11 +313,13 @@ PREFS_EDITOR, STANDALONE_PREFS, ); - GCC_VERSION = 4.0; + GCC_VERSION = com.apple.compilers.llvm.clang.1_0; INFOPLIST_FILE = Info.plist; INSTALL_PATH = "$(HOME)/Applications"; OTHER_CFLAGS = "$(inherited)"; + PRODUCT_BUNDLE_IDENTIFIER = net.sourceforge.SheepShaverLauncher; PRODUCT_NAME = SheepShaverLauncher; + SDKROOT = macosx; WRAPPER_EXTENSION = app; ZERO_LINK = YES; }; @@ -324,11 +329,6 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); COPY_PHASE_STRIP = NO; GCC_GENERATE_DEBUGGING_SYMBOLS = YES; GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; @@ -337,15 +337,17 @@ PREFS_EDITOR, STANDALONE_PREFS, ); - GCC_VERSION = 4.0; + GCC_VERSION = com.apple.compilers.llvm.clang.1_0; "GCC_VERSION[arch=x86_64]" = 4.2; INFOPLIST_FILE = Info.plist; INSTALL_PATH = "$(HOME)/Applications"; "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; OTHER_CFLAGS = "$(inherited)"; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.sourceforge.SheepShaverLauncher; PRODUCT_NAME = SheepShaverLauncher; - "SDKROOT[arch=x86_64]" = macosx10.6; + SDKROOT = macosx; + "SDKROOT[arch=x86_64]" = macosx10.13; WRAPPER_EXTENSION = app; }; name = Release; @@ -353,8 +355,33 @@ C01FCF4F08A954540054247B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_ANALYZER_LOCALIZABILITY_NONLOCALIZED = YES; + CLANG_WARN_BLOCK_CAPTURE_AUTORELEASING = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_COMMA = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_NON_LITERAL_NULL_CONVERSION = YES; + CLANG_WARN_OBJC_LITERAL_CONVERSION = YES; + CLANG_WARN_RANGE_LOOP_ANALYSIS = YES; + CLANG_WARN_STRICT_PROTOTYPES = YES; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.7; + ONLY_ACTIVE_ARCH = YES; PREBINDING = NO; SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; }; @@ -363,10 +390,33 @@ C01FCF5008A954540054247B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_ANALYZER_LOCALIZABILITY_NONLOCALIZED = YES; + CLANG_WARN_BLOCK_CAPTURE_AUTORELEASING = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_COMMA = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_NON_LITERAL_NULL_CONVERSION = YES; + CLANG_WARN_OBJC_LITERAL_CONVERSION = YES; + CLANG_WARN_RANGE_LOOP_ANALYSIS = YES; + CLANG_WARN_STRICT_PROTOTYPES = YES; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_NO_COMMON_BLOCKS = YES; GCC_PREFIX_HEADER = LauncherPrefix.h; GCC_VERSION = 4.0; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.7; PREBINDING = NO; SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; }; diff --git a/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..919434a62 --- /dev/null +++ b/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/SheepShaver/src/MacOSX/PrefsEditor/Info.plist b/SheepShaver/src/MacOSX/PrefsEditor/Info.plist index 682154862..dfaec90d9 100644 --- a/SheepShaver/src/MacOSX/PrefsEditor/Info.plist +++ b/SheepShaver/src/MacOSX/PrefsEditor/Info.plist @@ -1,5 +1,5 @@ - + CFBundleDevelopmentRegion @@ -9,7 +9,7 @@ CFBundleIconFile CFBundleIdentifier - net.sourceforge.SheepShaverPrefs + $(PRODUCT_BUNDLE_IDENTIFIER) CFBundleInfoDictionaryVersion 6.0 CFBundleName diff --git a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm b/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm index 29b48305f..ca833b45f 100644 --- a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm +++ b/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm @@ -54,12 +54,12 @@ - (id) init return self; } -- (int)numberOfRowsInTableView:(NSTableView *)aTable +- (NSInteger)numberOfRowsInTableView:(NSTableView *)aTable { return [diskArray count]; } -- (id)tableView:(NSTableView *)aTable objectValueForTableColumn:(NSTableColumn *)aCol row:(int)aRow +- (id)tableView:(NSTableView *)aTable objectValueForTableColumn:(NSTableColumn *)aCol row:(NSInteger)aRow { return [diskArray objectAtIndex: aRow]; } diff --git a/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj index 92ed7a0ef..38729eced 100644 --- a/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj @@ -3,7 +3,7 @@ archiveVersion = 1; classes = { }; - objectVersion = 42; + objectVersion = 45; objects = { /* Begin PBXBuildFile section */ @@ -161,10 +161,19 @@ /* Begin PBXProject section */ 29B97313FDCFA39411CA2CEA /* Project object */ = { isa = PBXProject; + attributes = { + LastUpgradeCheck = 0900; + }; buildConfigurationList = C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverPrefs" */; + compatibilityVersion = "Xcode 3.1"; + developmentRegion = en; hasScannedForEncodings = 1; + knownRegions = ( + en, + ); mainGroup = 29B97314FDCFA39411CA2CEA /* SheepShaverPrefs */; projectDirPath = ""; + projectRoot = ""; targets = ( 8D1107260486CEB800E47090 /* SheepShaverPrefs */, ); @@ -234,7 +243,9 @@ INFOPLIST_FILE = Info.plist; INSTALL_PATH = "$(HOME)/Applications"; OTHER_CFLAGS = "$(inherited)"; + PRODUCT_BUNDLE_IDENTIFIER = net.sourceforge.SheepShaverPrefs; PRODUCT_NAME = SheepShaverPrefs; + SDKROOT = macosx; WRAPPER_EXTENSION = app; ZERO_LINK = YES; }; @@ -243,10 +254,6 @@ C01FCF4C08A954540054247B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { - ARCHS = ( - ppc, - i386, - ); GCC_GENERATE_DEBUGGING_SYMBOLS = NO; GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; GCC_MODEL_TUNING = G5; @@ -257,7 +264,9 @@ INFOPLIST_FILE = Info.plist; INSTALL_PATH = "$(HOME)/Applications"; OTHER_CFLAGS = "$(inherited)"; + PRODUCT_BUNDLE_IDENTIFIER = net.sourceforge.SheepShaverPrefs; PRODUCT_NAME = SheepShaverPrefs; + SDKROOT = macosx; WRAPPER_EXTENSION = app; }; name = Release; @@ -265,20 +274,66 @@ C01FCF4F08A954540054247B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_WARN_BLOCK_CAPTURE_AUTORELEASING = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_COMMA = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_NON_LITERAL_NULL_CONVERSION = YES; + CLANG_WARN_OBJC_LITERAL_CONVERSION = YES; + CLANG_WARN_RANGE_LOOP_ANALYSIS = YES; + CLANG_WARN_STRICT_PROTOTYPES = YES; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.7; + ONLY_ACTIVE_ARCH = YES; PREBINDING = NO; - SDKROOT = /Developer/SDKs/MacOSX10.4u.sdk; + SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; }; name = Debug; }; C01FCF5008A954540054247B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_WARN_BLOCK_CAPTURE_AUTORELEASING = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_COMMA = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_NON_LITERAL_NULL_CONVERSION = YES; + CLANG_WARN_OBJC_LITERAL_CONVERSION = YES; + CLANG_WARN_RANGE_LOOP_ANALYSIS = YES; + CLANG_WARN_STRICT_PROTOTYPES = YES; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.7; PREBINDING = NO; - SDKROOT = /Developer/SDKs/MacOSX10.4u.sdk; + SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; }; name = Release; }; diff --git a/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..919434a62 --- /dev/null +++ b/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/SheepShaver/src/Unix/sysdeps.h b/SheepShaver/src/Unix/sysdeps.h index 0099527b3..f439050d4 100644 --- a/SheepShaver/src/Unix/sysdeps.h +++ b/SheepShaver/src/Unix/sysdeps.h @@ -149,7 +149,7 @@ typedef long int32; #error "No 4 byte type, you lose." #endif #if SIZEOF_LONG == 8 -typedef unsigned long uint64; +typedef uint64_t uint64; typedef long int64; #define VAL64(a) (a ## l) #define UVAL64(a) (a ## ul) From d3fc193d661e61fb9aabf0817bddc5fa189ccd67 Mon Sep 17 00:00:00 2001 From: jvernet Date: Mon, 9 Oct 2017 21:45:44 +0200 Subject: [PATCH 175/534] Slirp 64 bits - Slirp 64 Bits - added to the basilisk XCode Project --- .../BasiliskII.xcodeproj/project.pbxproj | 236 ++++++-- BasiliskII/src/slirp/sbuf.c | 2 +- BasiliskII/src/slirp/slirp.h | 16 +- .../contents.xcworkspacedata | 7 + .../project.pbxproj | 14 +- .../contents.xcworkspacedata | 7 + SheepShaver/src/Unix/config.h.old | 544 ++++++++++++++++++ 7 files changed, 756 insertions(+), 70 deletions(-) create mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata create mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata create mode 100644 SheepShaver/src/Unix/config.h.old diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 00ee66ca8..170a03d88 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,6 +7,25 @@ objects = { /* Begin PBXBuildFile section */ + 4ECAC2671F8A8A5D0013B963 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */; }; + 4ECAC2681F8A8AE90013B963 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2601F8A8A020013B963 /* bootp.c */; }; + 4ECAC2691F8A8AF10013B963 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2541F8A8A000013B963 /* cksum.c */; }; + 4ECAC26A1F8A8AF80013B963 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC23F1F8A89FE0013B963 /* debug.c */; }; + 4ECAC26B1F8A8B010013B963 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2501F8A8A000013B963 /* if.c */; }; + 4ECAC26C1F8A8B120013B963 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */; }; + 4ECAC26D1F8A8B120013B963 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2481F8A89FF0013B963 /* ip_input.c */; }; + 4ECAC26E1F8A8B120013B963 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2471F8A89FF0013B963 /* ip_output.c */; }; + 4ECAC26F1F8A8B230013B963 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24F1F8A89FF0013B963 /* mbuf.c */; }; + 4ECAC2701F8A8B230013B963 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2401F8A89FE0013B963 /* misc.c */; }; + 4ECAC2711F8A8B350013B963 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24A1F8A89FF0013B963 /* sbuf.c */; }; + 4ECAC2721F8A8B390013B963 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC23D1F8A89FE0013B963 /* slirp.c */; }; + 4ECAC2731F8A8B390013B963 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2431F8A89FE0013B963 /* socket.c */; }; + 4ECAC2741F8A8B480013B963 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC25E1F8A8A020013B963 /* tcp_input.c */; }; + 4ECAC2751F8A8B480013B963 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */; }; + 4ECAC2761F8A8B480013B963 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2571F8A8A000013B963 /* tcp_subr.c */; }; + 4ECAC2771F8A8B480013B963 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */; }; + 4ECAC2781F8A8B4B0013B963 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2521F8A8A000013B963 /* tftp.c */; }; + 4ECAC2791F8A8B530013B963 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24E1F8A89FF0013B963 /* udp.c */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; @@ -94,7 +113,6 @@ 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2331F23B32A006B2DF2 /* tunconfig */; }; 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */; }; - 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */; }; 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; @@ -208,25 +226,48 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ - 4E4213FA1F85430E00377045 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether_unix.cpp; path = ../Unix/ether_unix.cpp; sourceTree = ""; }; - 4E42142E1F854B1700377045 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../slirp/bootp.c; sourceTree = ""; }; - 4E4214301F854B2C00377045 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../slirp/ip_output.c; sourceTree = ""; }; - 4E4214321F854BB100377045 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../slirp/tcp_timer.c; sourceTree = ""; }; - 4E4214331F854BB100377045 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../slirp/tcp_input.c; sourceTree = ""; }; - 4E4214341F854BB200377045 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../slirp/debug.c; sourceTree = ""; }; - 4E4214351F854BB200377045 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../slirp/tcp_subr.c; sourceTree = ""; }; - 4E4214361F854BB200377045 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../slirp/cksum.c; sourceTree = ""; }; - 4E4214371F854BB200377045 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../slirp/ip_input.c; sourceTree = ""; }; - 4E4214381F854BB200377045 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../slirp/socket.c; sourceTree = ""; }; - 4E4214391F854BB200377045 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../slirp/udp.c; sourceTree = ""; }; - 4E42143A1F854BB200377045 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../slirp/sbuf.c; sourceTree = ""; }; - 4E42143B1F854BB200377045 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../slirp/mbuf.c; sourceTree = ""; }; - 4E42143C1F854BB200377045 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../slirp/tcp_output.c; sourceTree = ""; }; - 4E42143D1F854BB200377045 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../slirp/misc.c; sourceTree = ""; }; - 4E42143E1F854BB300377045 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../slirp/if.c; sourceTree = ""; }; - 4E42143F1F854BB300377045 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../slirp/tftp.c; sourceTree = ""; }; - 4E4214401F854BB300377045 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../slirp/slirp.c; sourceTree = ""; }; - 4E4214411F854BB300377045 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../slirp/ip_icmp.c; sourceTree = ""; }; + 4ECAC23D1F8A89FE0013B963 /* slirp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../slirp/slirp.c; sourceTree = ""; }; + 4ECAC23E1F8A89FE0013B963 /* tcp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp.h; path = ../../slirp/tcp.h; sourceTree = ""; }; + 4ECAC23F1F8A89FE0013B963 /* debug.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../slirp/debug.c; sourceTree = ""; }; + 4ECAC2401F8A89FE0013B963 /* misc.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../slirp/misc.c; sourceTree = ""; }; + 4ECAC2411F8A89FE0013B963 /* if.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = if.h; path = ../../slirp/if.h; sourceTree = ""; }; + 4ECAC2421F8A89FE0013B963 /* sbuf.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = sbuf.h; path = ../../slirp/sbuf.h; sourceTree = ""; }; + 4ECAC2431F8A89FE0013B963 /* socket.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../slirp/socket.c; sourceTree = ""; }; + 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../slirp/ip_icmp.c; sourceTree = ""; }; + 4ECAC2451F8A89FE0013B963 /* socket.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = socket.h; path = ../../slirp/socket.h; sourceTree = ""; }; + 4ECAC2461F8A89FE0013B963 /* udp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = udp.h; path = ../../slirp/udp.h; sourceTree = ""; }; + 4ECAC2471F8A89FF0013B963 /* ip_output.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../slirp/ip_output.c; sourceTree = ""; }; + 4ECAC2481F8A89FF0013B963 /* ip_input.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../slirp/ip_input.c; sourceTree = ""; }; + 4ECAC2491F8A89FF0013B963 /* icmp_var.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = icmp_var.h; path = ../../slirp/icmp_var.h; sourceTree = ""; }; + 4ECAC24A1F8A89FF0013B963 /* sbuf.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../slirp/sbuf.c; sourceTree = ""; }; + 4ECAC24B1F8A89FF0013B963 /* slirp_config.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../slirp/slirp_config.h; sourceTree = ""; }; + 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../slirp/tcp_output.c; sourceTree = ""; }; + 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../slirp/tcp_timer.c; sourceTree = ""; }; + 4ECAC24E1F8A89FF0013B963 /* udp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../slirp/udp.c; sourceTree = ""; }; + 4ECAC24F1F8A89FF0013B963 /* mbuf.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../slirp/mbuf.c; sourceTree = ""; }; + 4ECAC2501F8A8A000013B963 /* if.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../slirp/if.c; sourceTree = ""; }; + 4ECAC2511F8A8A000013B963 /* ip_icmp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../slirp/ip_icmp.h; sourceTree = ""; }; + 4ECAC2521F8A8A000013B963 /* tftp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../slirp/tftp.c; sourceTree = ""; }; + 4ECAC2531F8A8A000013B963 /* debug.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = debug.h; path = ../../slirp/debug.h; sourceTree = ""; }; + 4ECAC2541F8A8A000013B963 /* cksum.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../slirp/cksum.c; sourceTree = ""; }; + 4ECAC2551F8A8A000013B963 /* tcp_var.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp_var.h; path = ../../slirp/tcp_var.h; sourceTree = ""; }; + 4ECAC2561F8A8A000013B963 /* slirp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = slirp.h; path = ../../slirp/slirp.h; sourceTree = ""; }; + 4ECAC2571F8A8A000013B963 /* tcp_subr.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../slirp/tcp_subr.c; sourceTree = ""; }; + 4ECAC2581F8A8A010013B963 /* ip.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ip.h; path = ../../slirp/ip.h; sourceTree = ""; }; + 4ECAC2591F8A8A010013B963 /* bootp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../slirp/bootp.h; sourceTree = ""; }; + 4ECAC25A1F8A8A010013B963 /* ctl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ctl.h; path = ../../slirp/ctl.h; sourceTree = ""; }; + 4ECAC25B1F8A8A010013B963 /* libslirp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = libslirp.h; path = ../../slirp/libslirp.h; sourceTree = ""; }; + 4ECAC25C1F8A8A010013B963 /* VERSION */ = {isa = PBXFileReference; lastKnownFileType = text; name = VERSION; path = ../../slirp/VERSION; sourceTree = ""; }; + 4ECAC25D1F8A8A010013B963 /* tcpip.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../slirp/tcpip.h; sourceTree = ""; }; + 4ECAC25E1F8A8A020013B963 /* tcp_input.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../slirp/tcp_input.c; sourceTree = ""; }; + 4ECAC25F1F8A8A020013B963 /* misc.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = misc.h; path = ../../slirp/misc.h; sourceTree = ""; }; + 4ECAC2601F8A8A020013B963 /* bootp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../slirp/bootp.c; sourceTree = ""; }; + 4ECAC2611F8A8A020013B963 /* mbuf.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = mbuf.h; path = ../../slirp/mbuf.h; sourceTree = ""; }; + 4ECAC2621F8A8A020013B963 /* COPYRIGHT */ = {isa = PBXFileReference; lastKnownFileType = text; name = COPYRIGHT; path = ../../slirp/COPYRIGHT; sourceTree = ""; }; + 4ECAC2631F8A8A020013B963 /* main.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = main.h; path = ../../slirp/main.h; sourceTree = ""; }; + 4ECAC2641F8A8A020013B963 /* tcp_timer.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp_timer.h; path = ../../slirp/tcp_timer.h; sourceTree = ""; }; + 4ECAC2651F8A8A030013B963 /* tftp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../slirp/tftp.h; sourceTree = ""; }; + 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether_unix.cpp; path = ../../Unix/ether_unix.cpp; sourceTree = ""; }; 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; @@ -293,7 +334,6 @@ 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs_macosx.h; sourceTree = ""; }; 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = BasiliskII.icns; sourceTree = ""; }; - 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; path = BasiliskII.xcodeproj; sourceTree = ""; }; 7539E00A1F23B25A006B2DF2 /* Credits.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Credits.html; sourceTree = ""; }; 7539E0101F23B25A006B2DF2 /* English */ = {isa = PBXFileReference; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; 7539E0141F23B25A006B2DF2 /* HowTo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = HowTo.html; sourceTree = ""; }; @@ -428,27 +468,51 @@ /* End PBXFrameworksBuildPhase section */ /* Begin PBXGroup section */ - 4E4214031F85448200377045 /* slirp */ = { + 4ECAC23C1F8A89ED0013B963 /* slirp */ = { isa = PBXGroup; children = ( - 4E4214301F854B2C00377045 /* ip_output.c */, - 4E4214361F854BB200377045 /* cksum.c */, - 4E4214341F854BB200377045 /* debug.c */, - 4E42143E1F854BB300377045 /* if.c */, - 4E4214411F854BB300377045 /* ip_icmp.c */, - 4E4214371F854BB200377045 /* ip_input.c */, - 4E42143B1F854BB200377045 /* mbuf.c */, - 4E42143D1F854BB200377045 /* misc.c */, - 4E42143A1F854BB200377045 /* sbuf.c */, - 4E4214401F854BB300377045 /* slirp.c */, - 4E4214381F854BB200377045 /* socket.c */, - 4E4214331F854BB100377045 /* tcp_input.c */, - 4E42143C1F854BB200377045 /* tcp_output.c */, - 4E4214351F854BB200377045 /* tcp_subr.c */, - 4E4214321F854BB100377045 /* tcp_timer.c */, - 4E42143F1F854BB300377045 /* tftp.c */, - 4E4214391F854BB200377045 /* udp.c */, - 4E42142E1F854B1700377045 /* bootp.c */, + 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */, + 4ECAC2601F8A8A020013B963 /* bootp.c */, + 4ECAC2591F8A8A010013B963 /* bootp.h */, + 4ECAC2541F8A8A000013B963 /* cksum.c */, + 4ECAC2621F8A8A020013B963 /* COPYRIGHT */, + 4ECAC25A1F8A8A010013B963 /* ctl.h */, + 4ECAC23F1F8A89FE0013B963 /* debug.c */, + 4ECAC2531F8A8A000013B963 /* debug.h */, + 4ECAC2491F8A89FF0013B963 /* icmp_var.h */, + 4ECAC2501F8A8A000013B963 /* if.c */, + 4ECAC2411F8A89FE0013B963 /* if.h */, + 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */, + 4ECAC2511F8A8A000013B963 /* ip_icmp.h */, + 4ECAC2481F8A89FF0013B963 /* ip_input.c */, + 4ECAC2471F8A89FF0013B963 /* ip_output.c */, + 4ECAC2581F8A8A010013B963 /* ip.h */, + 4ECAC25B1F8A8A010013B963 /* libslirp.h */, + 4ECAC2631F8A8A020013B963 /* main.h */, + 4ECAC24F1F8A89FF0013B963 /* mbuf.c */, + 4ECAC2611F8A8A020013B963 /* mbuf.h */, + 4ECAC2401F8A89FE0013B963 /* misc.c */, + 4ECAC25F1F8A8A020013B963 /* misc.h */, + 4ECAC24A1F8A89FF0013B963 /* sbuf.c */, + 4ECAC2421F8A89FE0013B963 /* sbuf.h */, + 4ECAC24B1F8A89FF0013B963 /* slirp_config.h */, + 4ECAC23D1F8A89FE0013B963 /* slirp.c */, + 4ECAC2561F8A8A000013B963 /* slirp.h */, + 4ECAC2431F8A89FE0013B963 /* socket.c */, + 4ECAC2451F8A89FE0013B963 /* socket.h */, + 4ECAC25E1F8A8A020013B963 /* tcp_input.c */, + 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */, + 4ECAC2571F8A8A000013B963 /* tcp_subr.c */, + 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */, + 4ECAC2641F8A8A020013B963 /* tcp_timer.h */, + 4ECAC2551F8A8A000013B963 /* tcp_var.h */, + 4ECAC23E1F8A89FE0013B963 /* tcp.h */, + 4ECAC25D1F8A8A010013B963 /* tcpip.h */, + 4ECAC2521F8A8A000013B963 /* tftp.c */, + 4ECAC2651F8A8A030013B963 /* tftp.h */, + 4ECAC24E1F8A89FF0013B963 /* udp.c */, + 4ECAC2461F8A89FE0013B963 /* udp.h */, + 4ECAC25C1F8A8A010013B963 /* VERSION */, ); path = slirp; sourceTree = ""; @@ -605,7 +669,6 @@ 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, - 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */, 7539E00A1F23B25A006B2DF2 /* Credits.html */, 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, 7539E0141F23B25A006B2DF2 /* HowTo.html */, @@ -618,11 +681,6 @@ name = MacOSX; sourceTree = ""; }; - 7539E0041F23B25A006B2DF2 /* Products */ = { - isa = PBXGroup; - name = Products; - sourceTree = ""; - }; 7539E0711F23B25A006B2DF2 /* SDL */ = { isa = PBXGroup; children = ( @@ -697,7 +755,6 @@ 7539E1E41F23B25E006B2DF2 /* src */ = { isa = PBXGroup; children = ( - 4E4214031F85448200377045 /* slirp */, 7539DFC91F23B25A006B2DF2 /* adb.cpp */, 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, @@ -706,7 +763,6 @@ 7539E2811F23C52C006B2DF2 /* dummy */, 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */, 7539DFD61F23B25A006B2DF2 /* ether.cpp */, - 4E4213FA1F85430E00377045 /* ether_unix.cpp */, 7539DFD71F23B25A006B2DF2 /* extfs.cpp */, 7539DFD81F23B25A006B2DF2 /* include */, 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */, @@ -720,6 +776,7 @@ 7539E0701F23B25A006B2DF2 /* scsi.cpp */, 7539E0711F23B25A006B2DF2 /* SDL */, 7539E0771F23B25A006B2DF2 /* serial.cpp */, + 4ECAC23C1F8A89ED0013B963 /* slirp */, 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, 7539E0A31F23B25A006B2DF2 /* sony.cpp */, 7539E0A41F23B25A006B2DF2 /* timer.cpp */, @@ -950,10 +1007,6 @@ productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; projectDirPath = ""; projectReferences = ( - { - ProductGroup = 7539E0041F23B25A006B2DF2 /* Products */; - ProjectRef = 7539E0031F23B25A006B2DF2 /* BasiliskII.xcodeproj */; - }, { ProductGroup = 752F27061F251B4A001032B4 /* Products */; ProjectRef = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; @@ -1083,9 +1136,13 @@ 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, + 4ECAC2701F8A8B230013B963 /* misc.c in Sources */, + 4ECAC26E1F8A8B120013B963 /* ip_output.c in Sources */, + 4ECAC2781F8A8B4B0013B963 /* tftp.c in Sources */, 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, + 4ECAC26B1F8A8B010013B963 /* if.c in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, @@ -1094,34 +1151,43 @@ 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, + 4ECAC2761F8A8B480013B963 /* tcp_subr.c in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, - 7539E28F1F23C56F006B2DF2 /* ether_dummy.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, + 4ECAC2771F8A8B480013B963 /* tcp_timer.c in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, + 4ECAC26D1F8A8B120013B963 /* ip_input.c in Sources */, + 4ECAC2791F8A8B530013B963 /* udp.c in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, + 4ECAC26F1F8A8B230013B963 /* mbuf.c in Sources */, 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, + 4ECAC2721F8A8B390013B963 /* slirp.c in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, + 4ECAC2731F8A8B390013B963 /* socket.c in Sources */, 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, + 4ECAC2741F8A8B480013B963 /* tcp_input.c in Sources */, + 4ECAC26A1F8A8AF80013B963 /* debug.c in Sources */, 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, + 4ECAC2691F8A8AF10013B963 /* cksum.c in Sources */, 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, @@ -1130,15 +1196,20 @@ 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + 4ECAC2671F8A8A5D0013B963 /* ether_unix.cpp in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, + 4ECAC2751F8A8B480013B963 /* tcp_output.c in Sources */, 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, + 4ECAC26C1F8A8B120013B963 /* ip_icmp.c in Sources */, 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, + 4ECAC2681F8A8AE90013B963 /* bootp.c in Sources */, + 4ECAC2711F8A8B350013B963 /* sbuf.c in Sources */, 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, @@ -1190,6 +1261,8 @@ 753252DE1F5358D30024025B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_CXX_LIBRARY = "compiler-default"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; name = Debug; @@ -1197,6 +1270,8 @@ 753252DF1F5358D30024025B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_CXX_LIBRARY = "compiler-default"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; name = Release; @@ -1204,6 +1279,8 @@ 753252F81F535E1E0024025B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_CXX_LIBRARY = "compiler-default"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; name = Debug; @@ -1211,6 +1288,8 @@ 753252F91F535E1E0024025B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { + CLANG_CXX_LIBRARY = "compiler-default"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; name = Release; @@ -1360,27 +1439,45 @@ buildSettings = { ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; - COMBINE_HIDPI_IMAGES = YES; + CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; + CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_ENABLE_MODULES = NO; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES; + CLANG_WARN_SUSPICIOUS_MOVE = NO; + CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + COMBINE_HIDPI_IMAGES = NO; + ENABLE_NS_ASSERTIONS = YES; + ENABLE_TESTABILITY = NO; FRAMEWORK_SEARCH_PATHS = ( "$(inherited)", "$(LOCAL_LIBRARY_DIR)/Frameworks", ); + GCC_CW_ASM_SYNTAX = NO; + GCC_C_LANGUAGE_STANDARD = "compiler-default"; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ../MacOSX, ../include, ../uae_cpu, - ../UNIX, + ../Unix, ../slirp, ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CFLAGS = ""; + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; - WARNING_CFLAGS = "-Wconversion"; + USE_HEADERMAP = YES; + WARNING_CFLAGS = ""; }; name = Debug; }; @@ -1389,27 +1486,48 @@ buildSettings = { ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; - COMBINE_HIDPI_IMAGES = YES; + CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; + CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_ENABLE_MODULES = NO; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES; + CLANG_WARN_SUSPICIOUS_MOVE = NO; + CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + COMBINE_HIDPI_IMAGES = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_NS_ASSERTIONS = YES; + ENABLE_TESTABILITY = NO; FRAMEWORK_SEARCH_PATHS = ( "$(inherited)", "$(LOCAL_LIBRARY_DIR)/Frameworks", ); + GCC_CW_ASM_SYNTAX = NO; + GCC_C_LANGUAGE_STANDARD = "compiler-default"; + GCC_DYNAMIC_NO_PIC = YES; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_OPTIMIZATION_LEVEL = fast; GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ../MacOSX, ../include, ../uae_cpu, - ../UNIX, + ../Unix, ../slirp, ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CFLAGS = ""; + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; - WARNING_CFLAGS = "-Wconversion"; + USE_HEADERMAP = YES; + WARNING_CFLAGS = ""; }; name = Release; }; diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 2d078f381..0d8800920 100755 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -5,7 +5,7 @@ * terms and conditions of the copyright. */ -#include +// #include #include /* Done as a macro in socket.h */ diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index c30c8d701..16266f6c1 100755 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -41,6 +41,14 @@ typedef unsigned long ioctlsockopt_t; # define init_udp slirp_init_udp # define final_udp slirp_final_udp #else +# define WSAGetLastError() (int)(errno) +# define WSASetLastError(e) (void)(errno = (e)) +# define WSAEWOULDBLOCK EWOULDBLOCK +# define WSAEINPROGRESS EINPROGRESS +# define WSAENOTCONN ENOTCONN +# define WSAEHOSTUNREACH EHOSTUNREACH +# define WSAENETUNREACH ENETUNREACH +# define WSAECONNREFUSED ECONNREFUSED typedef int ioctlsockopt_t; # define ioctlsocket ioctl # define closesocket(s) close(s) @@ -55,7 +63,9 @@ typedef int ioctlsockopt_t; # include #endif +#ifndef _WIN32 #include +#endif #ifdef NEED_TYPEDEFS typedef char int8_t; @@ -125,6 +135,8 @@ typedef u_int32_t uint32; #ifndef _WIN32 #include +#include +#include #endif #ifndef _P @@ -135,10 +147,6 @@ typedef u_int32_t uint32; #endif #endif -#ifndef _WIN32 -#include -#include -#endif #ifdef GETTIMEOFDAY_ONE_ARG #define gettimeofday(x, y) gettimeofday(x) diff --git a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..919434a62 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 811ef728e..a3340e616 100644 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1288,6 +1288,7 @@ PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; + SDKROOT = macosx; }; name = Debug; }; @@ -1307,6 +1308,7 @@ PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; + SDKROOT = macosx; ZERO_LINK = NO; }; name = Release; @@ -1329,7 +1331,7 @@ _REENTRANT, ); HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, ../Unix, ../MacOSX/Launcher, @@ -1364,7 +1366,7 @@ _REENTRANT, ); HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, ../Unix, ../MacOSX/Launcher, @@ -1429,8 +1431,8 @@ _REENTRANT, ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; + GCC_WARN_UNUSED_FUNCTION = NO; + GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, @@ -1487,8 +1489,8 @@ _REENTRANT, ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; + GCC_WARN_UNUSED_FUNCTION = NO; + GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..919434a62 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/SheepShaver/src/Unix/config.h.old b/SheepShaver/src/Unix/config.h.old new file mode 100644 index 000000000..9fcc90d9c --- /dev/null +++ b/SheepShaver/src/Unix/config.h.old @@ -0,0 +1,544 @@ +/* config.h. Generated from config.h.in by configure. */ +/* config.h.in. Generated from configure.ac by autoheader. */ + +#ifndef CONFIG_H +#define CONFIG_H + + +/* Define if building universal (internal helper macro) */ +/* #undef AC_APPLE_UNIVERSAL_BUILD */ + +/* Define if using a PowerPC CPU emulator. */ +#define EMULATED_PPC 1 + +/* Define to enable dyngen engine */ +#define ENABLE_DYNGEN 1 + +/* Define is using ESD. */ +/* #undef ENABLE_ESD */ + +/* Define if using Linux fbdev extension. */ +/* #undef ENABLE_FBDEV_DGA */ + +/* Define if using GTK. */ +/* #undef ENABLE_GTK */ + +/* Define if using "mon". */ +/* #undef ENABLE_MON */ + +/* Define if your system supports TUN/TAP devices. */ +/* #undef ENABLE_TUNTAP */ + +/* Define if using video enabled on SEGV signals. */ +#define ENABLE_VOSF 1 + +/* Define if using XFree86 DGA extension. */ +/* #undef ENABLE_XF86_DGA */ + +/* Define if using XFree86 DGA extension. */ +/* #undef ENABLE_XF86_VIDMODE */ + +/* Define to 1 if you have the header file. */ +#define HAVE_ARPA_INET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_AVAILABILITYMACROS_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_BYTESWAP_H */ + +/* Define to 1 if you have the `ceil' function. */ +#define HAVE_CEIL 1 + +/* Define to 1 if you have the `ceilf' function. */ +#define HAVE_CEILF 1 + +/* Define to 1 if you have the `cfmakeraw' function. */ +#define HAVE_CFMAKERAW 1 + +/* Define to 1 if you have the `clock_gettime' function. */ +#define HAVE_CLOCK_GETTIME 1 + +/* Define to 1 if you have the `clock_nanosleep' function. */ +/* #undef HAVE_CLOCK_NANOSLEEP */ + +/* Define if you have /dev/ptmx. */ +/* #undef HAVE_DEV_PTMX */ + +/* Define if you have /dev/ptc. */ +/* #undef HAVE_DEV_PTS_AND_PTC */ + +/* Define to 1 if you have the header file. */ +#define HAVE_DIRENT_H 1 + +/* Define to 1 if you have the `exp2' function. */ +#define HAVE_EXP2 1 + +/* Define to 1 if you have the `exp2f' function. */ +#define HAVE_EXP2F 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FCNTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FENV_H 1 + +/* Define to 1 if you have the `floor' function. */ +#define HAVE_FLOOR 1 + +/* Define to 1 if you have the `floorf' function. */ +#define HAVE_FLOORF 1 + +/* Define if framework AppKit is available. */ +#define HAVE_FRAMEWORK_APPKIT 1 + +/* Define if framework AudioToolbox is available. */ +#define HAVE_FRAMEWORK_AUDIOTOOLBOX 1 + +/* Define if framework AudioUnit is available. */ +#define HAVE_FRAMEWORK_AUDIOUNIT 1 + +/* Define if framework Carbon is available. */ +#define HAVE_FRAMEWORK_CARBON 1 + +/* Define if framework CoreAudio is available. */ +#define HAVE_FRAMEWORK_COREAUDIO 1 + +/* Define if framework CoreFoundation is available. */ +#define HAVE_FRAMEWORK_COREFOUNDATION 1 + +/* Define if framework IOKit is available. */ +#define HAVE_FRAMEWORK_IOKIT 1 + +/* Define if framework SDL is available. */ +/* #undef HAVE_FRAMEWORK_SDL */ + +/* Define if framework SDL2 is available. */ +/* #undef HAVE_FRAMEWORK_SDL2 */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_HISTORY_H */ + +/* Define to 1 if you have the `inet_aton' function. */ +#define HAVE_INET_ATON 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_INTTYPES_H */ + +/* Define to 1 if you have the header + file. */ +#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 + +/* Define to 1 if you have the `curses' library (-lcurses). */ +/* #undef HAVE_LIBCURSES */ + +/* Define to 1 if you have the `c_r' library (-lc_r). */ +/* #undef HAVE_LIBC_R */ + +/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ +/* #undef HAVE_LIBHCURSES */ + +/* Define to 1 if you have the `m' library (-lm). */ +#define HAVE_LIBM 1 + +/* Define to 1 if you have the `ncurses' library (-lncurses). */ +/* #undef HAVE_LIBNCURSES */ + +/* Define to 1 if you have the `posix4' library (-lposix4). */ +/* #undef HAVE_LIBPOSIX4 */ + +/* Define to 1 if you have the `pthread' library (-lpthread). */ +#define HAVE_LIBPTHREAD 1 + +/* Define to 1 if you have the `PTL' library (-lPTL). */ +/* #undef HAVE_LIBPTL */ + +/* Define to 1 if you have the `readline' library (-lreadline). */ +/* #undef HAVE_LIBREADLINE */ + +/* Define to 1 if you have the `termcap' library (-ltermcap). */ +/* #undef HAVE_LIBTERMCAP */ + +/* Define to 1 if you have the `terminfo' library (-lterminfo). */ +/* #undef HAVE_LIBTERMINFO */ + +/* Define to 1 if you have the `termlib' library (-ltermlib). */ +/* #undef HAVE_LIBTERMLIB */ + +/* Define to 1 if you have the `vhd' library (-lvhd). */ +/* #undef HAVE_LIBVHD */ + +/* Define if there is a linker script to relocate the executable above + 0x70000000. */ +/* #undef HAVE_LINKER_SCRIPT */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_TUN_H */ + +/* Define to 1 if you have the `log2' function. */ +#define HAVE_LOG2 1 + +/* Define to 1 if you have the `log2f' function. */ +#define HAVE_LOG2F 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LOGIN_H */ + +/* Define if your system supports Mach exceptions. */ +#define HAVE_MACH_EXCEPTIONS 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_MACH_INIT_H 1 + +/* Define to 1 if you have the `mach_task_self' function. */ +#define HAVE_MACH_TASK_SELF 1 + +/* Define if your system has a working vm_allocate()-based memory allocator. + */ +#define HAVE_MACH_VM 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_VM_MAP_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_MALLOC_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_MEMORY_H */ + +/* Define to 1 if you have the `mmap' function. */ +#define HAVE_MMAP 1 + +/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. + */ +/* #undef HAVE_MMAP_ANON */ + +/* Define if defines MAP_ANONYMOUS and mmap()'ing with + MAP_ANONYMOUS works. */ +/* #undef HAVE_MMAP_ANONYMOUS */ + +/* Define if your system has a working mmap()-based memory allocator. */ +/* #undef HAVE_MMAP_VM */ + +/* Define to 1 if you have the `mprotect' function. */ +#define HAVE_MPROTECT 1 + +/* Define to 1 if you have the `munmap' function. */ +#define HAVE_MUNMAP 1 + +/* Define to 1 if you have the `nanosleep' function. */ +#define HAVE_NANOSLEEP 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_NETINET_IN_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_NET_IF_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_NET_IF_TUN_H */ + +/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for + sshpty.c). */ +/* #undef HAVE_NEWS4 */ + +/* Define to 1 if you have the `poll' function. */ +#define HAVE_POLL 1 + +/* Define if pthreads are available. */ +#define HAVE_PTHREADS 1 + +/* Define to 1 if you have the `pthread_cancel' function. */ +#define HAVE_PTHREAD_CANCEL 1 + +/* Define to 1 if you have the `pthread_cond_init' function. */ +#define HAVE_PTHREAD_COND_INIT 1 + +/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 + +/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 + +/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 + +/* Define to 1 if you have the `pthread_testcancel' function. */ +#define HAVE_PTHREAD_TESTCANCEL 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_PTY_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_HISTORY_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_READLINE_H */ + +/* Define to 1 if you have the `round' function. */ +#define HAVE_ROUND 1 + +/* Define to 1 if you have the `roundf' function. */ +#define HAVE_ROUNDF 1 + +/* Define to 1 if you have the `sem_init' function. */ +#define HAVE_SEM_INIT 1 + +/* Define to 1 if you have the `sigaction' function. */ +#define HAVE_SIGACTION 1 + +/* Define if we know a hack to replace siginfo_t->si_addr member. */ +/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ + +/* Define if your system support extended signals. */ +/* #undef HAVE_SIGINFO_T */ + +/* Define to 1 if you have the `signal' function. */ +#define HAVE_SIGNAL 1 + +/* Define if sa_restorer is available in struct sigaction. */ +/* #undef HAVE_SIGNAL_SA_RESTORER */ + +/* Define if we can ignore the fault (instruction skipping in SIGSEGV + handler). */ +#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 + +/* Define if slirp library is supported */ +#define HAVE_SLIRP 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDINT_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STDLIB_H */ + +/* Define to 1 if you have the `strdup' function. */ +#define HAVE_STRDUP 1 + +/* Define to 1 if you have the `strerror' function. */ +#define HAVE_STRERROR 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRINGS_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STRING_H */ + +/* Define to 1 if you have the `strlcpy' function. */ +#define HAVE_STRLCPY 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STROPTS_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BITYPES_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BSDTTY_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_FILIO_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_IOCTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_MMAN_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_POLL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SELECT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SOCKET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_STAT_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_STROPTS_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TIME_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_TYPES_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_WAIT_H 1 + +/* Define to 1 if you have the `task_self' function. */ +/* #undef HAVE_TASK_SELF */ + +/* Define to 1 if you have the `trunc' function. */ +#define HAVE_TRUNC 1 + +/* Define to 1 if you have the `truncf' function. */ +#define HAVE_TRUNCF 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UNISTD_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UTIL_H 1 + +/* Define to 1 if you have the `vhangup' function. */ +/* #undef HAVE_VHANGUP */ + +/* Define to 1 if you have the `vm_allocate' function. */ +#define HAVE_VM_ALLOCATE 1 + +/* Define to 1 if you have the `vm_deallocate' function. */ +#define HAVE_VM_DEALLOCATE 1 + +/* Define to 1 if you have the `vm_protect' function. */ +#define HAVE_VM_PROTECT 1 + +/* Define if your system supports Windows exceptions. */ +/* #undef HAVE_WIN32_EXCEPTIONS */ + +/* Define to 1 if you have the `_getpty' function. */ +/* #undef HAVE__GETPTY */ + +/* Define to the floating point format of the host machine. */ +#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT + +/* Define to 1 if the host machine stores floating point numbers in memory + with the word containing the sign bit at the lowest address, or to 0 if it + does it the other way around. This macro should not be defined if the + ordering is the same as for multi-word integers. */ +/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ + +/* Define constant offset for Mac address translation */ +/* #undef NATMEM_OFFSET */ + +/* Define to the address where bug reports for this package should be sent. */ +#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" + +/* Define to the full name of this package. */ +#define PACKAGE_NAME "SheepShaver" + +/* Define to the full name and version of this package. */ +#define PACKAGE_STRING "SheepShaver 2.4" + +/* Define to the one symbol short name of this package. */ +#define PACKAGE_TARNAME "SheepShaver" + +/* Define to the home page for this package. */ +#define PACKAGE_URL "" + +/* Define to the version of this package. */ +#define PACKAGE_VERSION "2.4" + +/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this + system. */ +/* #undef PAGEZERO_HACK */ + +/* Define as the return type of signal handlers (`int' or `void'). */ +#define RETSIGTYPE void + +/* Define if your system requires sigactions to be reinstalled. */ +/* #undef SIGACTION_NEED_REINSTALL */ + +/* Define if your system requires signals to be reinstalled. */ +/* #undef SIGNAL_NEED_REINSTALL */ + +/* The size of `double', as computed by sizeof. */ +#define SIZEOF_DOUBLE 8 + +/* The size of `float', as computed by sizeof. */ +#define SIZEOF_FLOAT 4 + +/* The size of `int', as computed by sizeof. */ +#define SIZEOF_INT 4 + +/* The size of `long', as computed by sizeof. */ +#define SIZEOF_LONG 8 + +/* The size of `long long', as computed by sizeof. */ +#define SIZEOF_LONG_LONG 8 + +/* The size of `short', as computed by sizeof. */ +#define SIZEOF_SHORT 2 + +/* The size of `void *', as computed by sizeof. */ +#define SIZEOF_VOID_P 8 + +/* Define to 1 if you have the ANSI C header files. */ +#define STDC_HEADERS 1 + +/* Define to 1 if you can safely include both and . */ +#define TIME_WITH_SYS_TIME 1 + +/* Define to 1 if your declares `struct tm'. */ +/* #undef TM_IN_SYS_TIME */ + +/* Define if BSD-style non-blocking I/O is to be used */ +/* #undef USE_FIONBIO */ + +/* Define to enble SDL support. */ +#define USE_SDL 1 + +/* Define to enable SDL audio support */ +#define USE_SDL_AUDIO 1 + +/* Define to enable SDL video graphics support. */ +#define USE_SDL_VIDEO 1 + +/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most + significant byte first (like Motorola and SPARC, unlike Intel). */ +#if defined AC_APPLE_UNIVERSAL_BUILD +# if defined __BIG_ENDIAN__ +# define WORDS_BIGENDIAN 1 +# endif +#else +# ifndef WORDS_BIGENDIAN +/* # undef WORDS_BIGENDIAN */ +# endif +#endif + +/* Define to 1 if the X Window System is missing or not being used. */ +/* #undef X_DISPLAY_MISSING */ + +/* Enable large inode numbers on Mac OS X 10.5. */ +#ifndef _DARWIN_USE_64_BIT_INODE +# define _DARWIN_USE_64_BIT_INODE 1 +#endif + +/* Number of bits in a file offset, on hosts where this is settable. */ +/* #undef _FILE_OFFSET_BITS */ + +/* Define for large files, on AIX-style hosts. */ +/* #undef _LARGE_FILES */ + +/* Define to empty if `const' does not conform to ANSI C. */ +/* #undef const */ + +/* Define to `__inline__' or `__inline' if that's what the C compiler + calls it, or to nothing if 'inline' is not supported under any name. */ +#ifndef __cplusplus +/* #undef inline */ +#endif + +/* Define to `off_t' if does not define. */ +#define loff_t off_t + +/* Define to `long int' if does not define. */ +/* #undef off_t */ + +/* Define to `unsigned int' if does not define. */ +/* #undef size_t */ + +/* Define to 'int' if doesn't define. */ +/* #undef socklen_t */ + +#endif /* CONFIG_H */ + From e6808d6556e875434bfabfbbb6212e72f9c5d58b Mon Sep 17 00:00:00 2001 From: jvernet Date: Mon, 9 Oct 2017 22:18:17 +0200 Subject: [PATCH 176/534] timer symlink ?? --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 3 ++- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- .../SheepShaver_Xcode8.xcodeproj/project.pbxproj | 14 ++++++-------- SheepShaver/src/Unix/sysdeps.h | 2 +- SheepShaver/src/Unix/timer_unix.cpp | 1 - SheepShaver/src/adb.cpp | 1 - 7 files changed, 11 insertions(+), 14 deletions(-) delete mode 120000 SheepShaver/src/Unix/timer_unix.cpp delete mode 120000 SheepShaver/src/adb.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 170a03d88..aec369157 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -514,7 +514,8 @@ 4ECAC2461F8A89FE0013B963 /* udp.h */, 4ECAC25C1F8A8A010013B963 /* VERSION */, ); - path = slirp; + name = slirp; + path = ../slirp; sourceTree = ""; }; 752F26F71F240E51001032B4 /* Frameworks */ = { diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 03e4c5b77..148c25041 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -2228,7 +2228,7 @@ static int redraw_func(void *arg) // Wait next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); + uint64 delay = int32(next - GetTicks_usec()); if (delay > 0) Delay_usec(delay); else if (delay < -VIDEO_REFRESH_DELAY) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 3c7177e60..0b4bfb86d 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2586,7 +2586,7 @@ static int redraw_func(void *arg) // Wait next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); + uint64 delay = int32(next - GetTicks_usec()); if (delay > 0) Delay_usec(delay); else if (delay < -VIDEO_REFRESH_DELAY) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index a3340e616..4618cdf5e 100644 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -3,7 +3,7 @@ archiveVersion = 1; classes = { }; - objectVersion = 44; + objectVersion = 47; objects = { /* Begin PBXBuildFile section */ @@ -1015,7 +1015,7 @@ LastUpgradeCheck = 0820; }; buildConfigurationList = 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver_Xcode8" */; - compatibilityVersion = "Xcode 3.0"; + compatibilityVersion = "Xcode 6.3"; developmentRegion = English; hasScannedForEncodings = 0; knownRegions = ( @@ -1288,7 +1288,6 @@ PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; - SDKROOT = macosx; }; name = Debug; }; @@ -1308,7 +1307,6 @@ PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; - SDKROOT = macosx; ZERO_LINK = NO; }; name = Release; @@ -1431,8 +1429,8 @@ _REENTRANT, ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = NO; - GCC_WARN_UNUSED_VARIABLE = NO; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, @@ -1489,8 +1487,8 @@ _REENTRANT, ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = NO; - GCC_WARN_UNUSED_VARIABLE = NO; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", ./config/, diff --git a/SheepShaver/src/Unix/sysdeps.h b/SheepShaver/src/Unix/sysdeps.h index f439050d4..e0de3f21c 100644 --- a/SheepShaver/src/Unix/sysdeps.h +++ b/SheepShaver/src/Unix/sysdeps.h @@ -429,7 +429,7 @@ typedef struct timeval tm_time_t; // Timing functions extern uint64 GetTicks_usec(void); -extern void Delay_usec(uint32 usec); +extern void Delay_usec(uint64 usec); #ifdef HAVE_PTHREADS // Setup pthread attributes diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp deleted file mode 120000 index db93bbd33..000000000 --- a/SheepShaver/src/Unix/timer_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/timer_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 120000 index 1cc36b981..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/adb.cpp \ No newline at end of file From b904304e89ace011e090ef0aa70a73c4ebf200f0 Mon Sep 17 00:00:00 2001 From: jvernet Date: Mon, 9 Oct 2017 22:19:16 +0200 Subject: [PATCH 177/534] Try to fix build error on SheepShaver XCode Project --- SheepShaver/src/Unix/timer_unix.cpp | 401 ++++++++++++++++++++++++ SheepShaver/src/adb.cpp | 460 ++++++++++++++++++++++++++++ 2 files changed, 861 insertions(+) create mode 100644 SheepShaver/src/Unix/timer_unix.cpp create mode 100644 SheepShaver/src/adb.cpp diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp new file mode 100644 index 000000000..97372b498 --- /dev/null +++ b/SheepShaver/src/Unix/timer_unix.cpp @@ -0,0 +1,401 @@ +/* + * timer_unix.cpp - Time Manager emulation, Unix specific stuff + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" +#include "macos_util.h" +#include "timer.h" + +#include + +#define DEBUG 0 +#include "debug.h" + +// For NetBSD with broken pthreads headers +#ifndef CLOCK_REALTIME +#define CLOCK_REALTIME 0 +#endif + +#if defined(__MACH__) +#include +#include + +static clock_serv_t host_clock; +static bool host_clock_inited = false; + +static inline void mach_current_time(tm_time_t &t) { + if(!host_clock_inited) { + host_get_clock_service(mach_host_self(), SYSTEM_CLOCK, &host_clock); + host_clock_inited = true; + } + + clock_get_time(host_clock, (mach_timespec_t *)&t); +} +#endif + + +/* + * Return microseconds since boot (64 bit) + */ + +void Microseconds(uint32 &hi, uint32 &lo) +{ + D(bug("Microseconds\n")); +#if defined(__MACH__) + tm_time_t t; + mach_current_time(t); + uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#elif defined(HAVE_CLOCK_GETTIME) + struct timespec t; + clock_gettime(CLOCK_REALTIME, &t); + uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#else + struct timeval t; + gettimeofday(&t, NULL); + uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_usec; +#endif + hi = tl >> 32; + lo = tl; +} + + +/* + * Return local date/time in Mac format (seconds since 1.1.1904) + */ + +uint32 TimerDateTime(void) +{ + return TimeToMacTime(time(NULL)); +} + + +/* + * Get current time + */ + +void timer_current_time(tm_time_t &t) +{ +#if defined(__MACH__) + mach_current_time(t); +#elif defined(HAVE_CLOCK_GETTIME) + clock_gettime(CLOCK_REALTIME, &t); +#else + gettimeofday(&t, NULL); +#endif +} + + +/* + * Add times + */ + +void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) +{ +#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) + res.tv_sec = a.tv_sec + b.tv_sec; + res.tv_nsec = a.tv_nsec + b.tv_nsec; + if (res.tv_nsec >= 1000000000) { + res.tv_sec++; + res.tv_nsec -= 1000000000; + } +#else + res.tv_sec = a.tv_sec + b.tv_sec; + res.tv_usec = a.tv_usec + b.tv_usec; + if (res.tv_usec >= 1000000) { + res.tv_sec++; + res.tv_usec -= 1000000; + } +#endif +} + + +/* + * Subtract times + */ + +void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) +{ +#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) + res.tv_sec = a.tv_sec - b.tv_sec; + res.tv_nsec = a.tv_nsec - b.tv_nsec; + if (res.tv_nsec < 0) { + res.tv_sec--; + res.tv_nsec += 1000000000; + } +#else + res.tv_sec = a.tv_sec - b.tv_sec; + res.tv_usec = a.tv_usec - b.tv_usec; + if (res.tv_usec < 0) { + res.tv_sec--; + res.tv_usec += 1000000; + } +#endif +} + + +/* + * Compare times (<0: a < b, =0: a = b, >0: a > b) + */ + +int timer_cmp_time(tm_time_t a, tm_time_t b) +{ +#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) + if (a.tv_sec == b.tv_sec) + return a.tv_nsec - b.tv_nsec; + else + return a.tv_sec - b.tv_sec; +#else + if (a.tv_sec == b.tv_sec) + return a.tv_usec - b.tv_usec; + else + return a.tv_sec - b.tv_sec; +#endif +} + + +/* + * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t + */ + +void timer_mac2host_time(tm_time_t &res, int32 mactime) +{ +#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) + if (mactime > 0) { + // Time in milliseconds + res.tv_sec = mactime / 1000; + res.tv_nsec = (mactime % 1000) * 1000000; + } else { + // Time in negative microseconds + res.tv_sec = -mactime / 1000000; + res.tv_nsec = (-mactime % 1000000) * 1000; + } +#else + if (mactime > 0) { + // Time in milliseconds + res.tv_sec = mactime / 1000; + res.tv_usec = (mactime % 1000) * 1000; + } else { + // Time in negative microseconds + res.tv_sec = -mactime / 1000000; + res.tv_usec = -mactime % 1000000; + } +#endif +} + + +/* + * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) + * A negative input value for hosttime results in a zero return value + * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! + */ + +int32 timer_host2mac_time(tm_time_t hosttime) +{ + if (hosttime.tv_sec < 0) + return 0; + else { +#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) + uint64 t = (uint64)hosttime.tv_sec * 1000000 + hosttime.tv_nsec / 1000; +#else + uint64 t = (uint64)hosttime.tv_sec * 1000000 + hosttime.tv_usec; +#endif + if (t > 0x7fffffff) + return t / 1000; // Time in milliseconds + else + return -t; // Time in negative microseconds + } +} + + +/* + * Get current value of microsecond timer + */ + +uint64 GetTicks_usec(void) +{ +#if defined(__MACH__) + tm_time_t t; + mach_current_time(t); + return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#elif defined(HAVE_CLOCK_GETTIME) + struct timespec t; + clock_gettime(CLOCK_REALTIME, &t); + return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#else + struct timeval t; + gettimeofday(&t, NULL); + return (uint64)t.tv_sec * 1000000 + t.tv_usec; +#endif +} + + +/* + * Delay by specified number of microseconds (<1 second) + * (adapted from SDL_Delay() source; this function is designed to provide + * the highest accuracy possible) + */ + +#if defined(linux) +// Linux select() changes its timeout parameter upon return to contain +// the remaining time. Most other unixen leave it unchanged or undefined. +#define SELECT_SETS_REMAINING +#elif defined(__FreeBSD__) || defined(__sun__) || (defined(__MACH__) && defined(__APPLE__)) +#define USE_NANOSLEEP +#elif defined(HAVE_PTHREADS) && defined(sgi) +// SGI pthreads has a bug when using pthreads+signals+nanosleep, +// so instead of using nanosleep, wait on a CV which is never signalled. +#include +#define USE_COND_TIMEDWAIT +#endif + +void Delay_usec(uint64 usec) +{ + int was_error; + +#if defined(USE_NANOSLEEP) + struct timespec elapsed, tv; +#elif defined(USE_COND_TIMEDWAIT) + // Use a local mutex and cv, so threads remain independent + pthread_cond_t delay_cond = PTHREAD_COND_INITIALIZER; + pthread_mutex_t delay_mutex = PTHREAD_MUTEX_INITIALIZER; + struct timespec elapsed; + uint64 future; +#else + struct timeval tv; +#ifndef SELECT_SETS_REMAINING + uint64 then, now, elapsed; +#endif +#endif + + // Set the timeout interval - Linux only needs to do this once +#if defined(SELECT_SETS_REMAINING) + tv.tv_sec = 0; + tv.tv_usec = usec; +#elif defined(USE_NANOSLEEP) + elapsed.tv_sec = 0; + elapsed.tv_nsec = usec * 1000; +#elif defined(USE_COND_TIMEDWAIT) + future = GetTicks_usec() + usec; + elapsed.tv_sec = future / 1000000; + elapsed.tv_nsec = (future % 1000000) * 1000; +#else + then = GetTicks_usec(); +#endif + + do { + errno = 0; +#if defined(USE_NANOSLEEP) + tv.tv_sec = elapsed.tv_sec; + tv.tv_nsec = elapsed.tv_nsec; + was_error = nanosleep(&tv, &elapsed); +#elif defined(USE_COND_TIMEDWAIT) + was_error = pthread_mutex_lock(&delay_mutex); + was_error = pthread_cond_timedwait(&delay_cond, &delay_mutex, &elapsed); + was_error = pthread_mutex_unlock(&delay_mutex); +#else +#ifndef SELECT_SETS_REMAINING + // Calculate the time interval left (in case of interrupt) + now = GetTicks_usec(); + elapsed = now - then; + then = now; + if (elapsed >= usec) + break; + usec -= elapsed; + tv.tv_sec = 0; + tv.tv_usec = usec; +#endif + was_error = select(0, NULL, NULL, NULL, &tv); +#endif + } while (was_error && (errno == EINTR)); +} + + +/* + * Suspend emulator thread, virtual CPU in idle mode + */ + +#ifdef HAVE_PTHREADS +#if defined(HAVE_PTHREAD_COND_INIT) +#define IDLE_USES_COND_WAIT 1 +static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; +static pthread_cond_t idle_cond = PTHREAD_COND_INITIALIZER; +#elif defined(HAVE_SEM_INIT) +#define IDLE_USES_SEMAPHORE 1 +#include +#ifdef HAVE_SPINLOCKS +static spinlock_t idle_lock = SPIN_LOCK_UNLOCKED; +#define LOCK_IDLE spin_lock(&idle_lock) +#define UNLOCK_IDLE spin_unlock(&idle_lock) +#else +static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; +#define LOCK_IDLE pthread_mutex_lock(&idle_lock) +#define UNLOCK_IDLE pthread_mutex_unlock(&idle_lock) +#endif +static sem_t idle_sem; +static int idle_sem_ok = -1; +#endif +#endif + +void idle_wait(void) +{ +#ifdef IDLE_USES_COND_WAIT + pthread_mutex_lock(&idle_lock); + pthread_cond_wait(&idle_cond, &idle_lock); + pthread_mutex_unlock(&idle_lock); +#else +#ifdef IDLE_USES_SEMAPHORE + LOCK_IDLE; + if (idle_sem_ok < 0) + idle_sem_ok = (sem_init(&idle_sem, 0, 0) == 0); + if (idle_sem_ok > 0) { + idle_sem_ok++; + UNLOCK_IDLE; + sem_wait(&idle_sem); + return; + } + UNLOCK_IDLE; +#endif + + // Fallback: sleep 10 ms + Delay_usec(10000); +#endif +} + + +/* + * Resume execution of emulator thread, events just arrived + */ + +void idle_resume(void) +{ +#ifdef IDLE_USES_COND_WAIT + pthread_cond_signal(&idle_cond); +#else +#ifdef IDLE_USES_SEMAPHORE + LOCK_IDLE; + if (idle_sem_ok > 1) { + idle_sem_ok--; + UNLOCK_IDLE; + sem_post(&idle_sem); + return; + } + UNLOCK_IDLE; +#endif +#endif +} diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp new file mode 100644 index 000000000..c05c00008 --- /dev/null +++ b/SheepShaver/src/adb.cpp @@ -0,0 +1,460 @@ +/* + * adb.cpp - ADB emulation (mouse/keyboard) + * + * Basilisk II (C) Christian Bauer + * + * 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 + */ + +/* + * SEE ALSO + * Inside Macintosh: Devices, chapter 5 "ADB Manager" + * Technote HW 01: "ADB - The Untold Story: Space Aliens Ate My Mouse" + */ + +#include + +#include "sysdeps.h" +#include "cpu_emulation.h" +#include "emul_op.h" +#include "main.h" +#include "prefs.h" +#include "video.h" +#include "adb.h" + +#ifdef POWERPC_ROM +#include "thunks.h" +#endif + +#define DEBUG 0 +#include "debug.h" + + +// Global variables +static int mouse_x = 0, mouse_y = 0; // Mouse position +static int old_mouse_x = 0, old_mouse_y = 0; +static bool mouse_button[3] = {false, false, false}; // Mouse button states +static bool old_mouse_button[3] = {false, false, false}; +static bool relative_mouse = false; + +static uint8 key_states[16]; // Key states (Mac keycodes) +#define MATRIX(code) (key_states[code >> 3] & (1 << (~code & 7))) + +// Keyboard event buffer (Mac keycodes with up/down flag) +const int KEY_BUFFER_SIZE = 16; +static uint8 key_buffer[KEY_BUFFER_SIZE]; +static unsigned int key_read_ptr = 0, key_write_ptr = 0; + +static uint8 mouse_reg_3[2] = {0x63, 0x01}; // Mouse ADB register 3 + +static uint8 key_reg_2[2] = {0xff, 0xff}; // Keyboard ADB register 2 +static uint8 key_reg_3[2] = {0x62, 0x05}; // Keyboard ADB register 3 + +static uint8 m_keyboard_type = 0x05; + +// ADB mouse motion lock (for platforms that use separate input thread) +static B2_mutex *mouse_lock; + + +/* + * Initialize ADB emulation + */ + +void ADBInit(void) +{ + mouse_lock = B2_create_mutex(); + m_keyboard_type = (uint8)PrefsFindInt32("keyboardtype"); + key_reg_3[1] = m_keyboard_type; +} + + +/* + * Exit ADB emulation + */ + +void ADBExit(void) +{ + if (mouse_lock) { + B2_delete_mutex(mouse_lock); + mouse_lock = NULL; + } +} + + +/* + * ADBOp() replacement + */ + +void ADBOp(uint8 op, uint8 *data) +{ + D(bug("ADBOp op %02x, data %02x %02x %02x\n", op, data[0], data[1], data[2])); + + // ADB reset? + if ((op & 0x0f) == 0) { + mouse_reg_3[0] = 0x63; + mouse_reg_3[1] = 0x01; + key_reg_2[0] = 0xff; + key_reg_2[1] = 0xff; + key_reg_3[0] = 0x62; + key_reg_3[1] = m_keyboard_type; + return; + } + + // Cut op into fields + uint8 adr = op >> 4; + uint8 cmd = (op >> 2) & 3; + uint8 reg = op & 3; + + // Check which device was addressed and act accordingly + if (adr == (mouse_reg_3[0] & 0x0f)) { + + // Mouse + if (cmd == 2) { + + // Listen + switch (reg) { + case 3: // Address/HandlerID + if (data[2] == 0xfe) // Change address + mouse_reg_3[0] = (mouse_reg_3[0] & 0xf0) | (data[1] & 0x0f); + else if (data[2] == 1 || data[2] == 2 || data[2] == 4) // Change device handler ID + mouse_reg_3[1] = data[2]; + else if (data[2] == 0x00) // Change address and enable bit + mouse_reg_3[0] = (mouse_reg_3[0] & 0xd0) | (data[1] & 0x2f); + break; + } + + } else if (cmd == 3) { + + // Talk + switch (reg) { + case 1: // Extended mouse protocol + data[0] = 8; + data[1] = 'a'; // Identifier + data[2] = 'p'; + data[3] = 'p'; + data[4] = 'l'; + data[5] = 300 >> 8; // Resolution (dpi) + data[6] = 300 & 0xff; + data[7] = 1; // Class (mouse) + data[8] = 3; // Number of buttons + break; + case 3: // Address/HandlerID + data[0] = 2; + data[1] = (mouse_reg_3[0] & 0xf0) | (rand() & 0x0f); + data[2] = mouse_reg_3[1]; + break; + default: + data[0] = 0; + break; + } + } + D(bug(" mouse reg 3 %02x%02x\n", mouse_reg_3[0], mouse_reg_3[1])); + + } else if (adr == (key_reg_3[0] & 0x0f)) { + + // Keyboard + if (cmd == 2) { + + // Listen + switch (reg) { + case 2: // LEDs/Modifiers + key_reg_2[0] = data[1]; + key_reg_2[1] = data[2]; + break; + case 3: // Address/HandlerID + if (data[2] == 0xfe) // Change address + key_reg_3[0] = (key_reg_3[0] & 0xf0) | (data[1] & 0x0f); + else if (data[2] == 0x00) // Change address and enable bit + key_reg_3[0] = (key_reg_3[0] & 0xd0) | (data[1] & 0x2f); + break; + } + + } else if (cmd == 3) { + + // Talk + switch (reg) { + case 2: { // LEDs/Modifiers + uint8 reg2hi = 0xff; + uint8 reg2lo = key_reg_2[1] | 0xf8; + if (MATRIX(0x6b)) // Scroll Lock + reg2lo &= ~0x40; + if (MATRIX(0x47)) // Num Lock + reg2lo &= ~0x80; + if (MATRIX(0x37)) // Command + reg2hi &= ~0x01; + if (MATRIX(0x3a)) // Option + reg2hi &= ~0x02; + if (MATRIX(0x38)) // Shift + reg2hi &= ~0x04; + if (MATRIX(0x36)) // Control + reg2hi &= ~0x08; + if (MATRIX(0x39)) // Caps Lock + reg2hi &= ~0x20; + if (MATRIX(0x75)) // Delete + reg2hi &= ~0x40; + data[0] = 2; + data[1] = reg2hi; + data[2] = reg2lo; + break; + } + case 3: // Address/HandlerID + data[0] = 2; + data[1] = (key_reg_3[0] & 0xf0) | (rand() & 0x0f); + data[2] = key_reg_3[1]; + break; + default: + data[0] = 0; + break; + } + } + D(bug(" keyboard reg 3 %02x%02x\n", key_reg_3[0], key_reg_3[1])); + + } else // Unknown address + if (cmd == 3) + data[0] = 0; // Talk: 0 bytes of data +} + + +/* + * Mouse was moved (x/y are absolute or relative, depending on ADBSetRelMouseMode()) + */ + +void ADBMouseMoved(int x, int y) +{ + B2_lock_mutex(mouse_lock); + if (relative_mouse) { + mouse_x += x; mouse_y += y; + } else { + mouse_x = x; mouse_y = y; + } + B2_unlock_mutex(mouse_lock); + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Mouse button pressed + */ + +void ADBMouseDown(int button) +{ + mouse_button[button] = true; + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Mouse button released + */ + +void ADBMouseUp(int button) +{ + mouse_button[button] = false; + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Set mouse mode (absolute or relative) + */ + +void ADBSetRelMouseMode(bool relative) +{ + if (relative_mouse != relative) { + relative_mouse = relative; + mouse_x = mouse_y = 0; + } +} + + +/* + * Key pressed ("code" is the Mac key code) + */ + +void ADBKeyDown(int code) +{ + // Add keycode to buffer + key_buffer[key_write_ptr] = code; + key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; + + // Set key in matrix + key_states[code >> 3] |= (1 << (~code & 7)); + + // Trigger interrupt + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Key released ("code" is the Mac key code) + */ + +void ADBKeyUp(int code) +{ + // Add keycode to buffer + key_buffer[key_write_ptr] = code | 0x80; // Key-up flag + key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; + + // Clear key in matrix + key_states[code >> 3] &= ~(1 << (~code & 7)); + + // Trigger interrupt + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * ADB interrupt function (executed as part of 60Hz interrupt) + */ + +void ADBInterrupt(void) +{ + M68kRegisters r; + + // Return if ADB is not initialized + uint32 adb_base = ReadMacInt32(0xcf8); + if (!adb_base || adb_base == 0xffffffff) + return; + uint32 tmp_data = adb_base + 0x163; // Temporary storage for faked ADB data + + // Get mouse state + B2_lock_mutex(mouse_lock); + int mx = mouse_x; + int my = mouse_y; + if (relative_mouse) + mouse_x = mouse_y = 0; + bool mb[3] = {mouse_button[0], mouse_button[1], mouse_button[2]}; + B2_unlock_mutex(mouse_lock); + + uint32 key_base = adb_base + 4; + uint32 mouse_base = adb_base + 16; + + if (relative_mouse) { + + // Mouse movement (relative) and buttons + if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { + + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mb[2] ? 0x08 : 0x88)); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mb[0]; + old_mouse_button[1] = mb[1]; + old_mouse_button[2] = mb[2]; + } + + } else { + + // Update mouse position (absolute) + if (mx != old_mouse_x || my != old_mouse_y) { +#ifdef POWERPC_ROM + static const uint8 proc_template[] = { + 0x2f, 0x08, // move.l a0,-(sp) + 0x2f, 0x00, // move.l d0,-(sp) + 0x2f, 0x01, // move.l d1,-(sp) + 0x70, 0x01, // moveq #1,d0 (MoveTo) + 0xaa, 0xdb, // CursorDeviceDispatch + M68K_RTS >> 8, M68K_RTS & 0xff + }; + BUILD_SHEEPSHAVER_PROCEDURE(proc); + r.a[0] = ReadMacInt32(mouse_base + 4); + r.d[0] = mx; + r.d[1] = my; + Execute68k(proc, &r); +#else + WriteMacInt16(0x82a, mx); + WriteMacInt16(0x828, my); + WriteMacInt16(0x82e, mx); + WriteMacInt16(0x82c, my); + WriteMacInt8(0x8ce, ReadMacInt8(0x8cf)); // CrsrCouple -> CrsrNew +#endif + old_mouse_x = mx; + old_mouse_y = my; + } + + // Send mouse button events + if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { + uint32 mouse_base = adb_base + 16; + + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); + WriteMacInt8(tmp_data + 3, mb[2] ? 0x08 : 0x88); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mb[0]; + old_mouse_button[1] = mb[1]; + old_mouse_button[2] = mb[2]; + } + } + + // Process accumulated keyboard events + while (key_read_ptr != key_write_ptr) { + + // Read keyboard event + uint8 mac_code = key_buffer[key_read_ptr]; + key_read_ptr = (key_read_ptr + 1) % KEY_BUFFER_SIZE; + + // Call keyboard ADB handler + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, mac_code); + WriteMacInt8(tmp_data + 2, mac_code == 0x7f ? 0x7f : 0xff); // Power key is special + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(key_base); + r.a[2] = ReadMacInt32(key_base + 4); + r.a[3] = adb_base; + r.d[0] = (key_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + } + + // Clear temporary data + WriteMacInt32(tmp_data, 0); + WriteMacInt32(tmp_data + 4, 0); +} From 28206248d44991654acfa0e9a0bb22de8e90783b Mon Sep 17 00:00:00 2001 From: David Ludwig Date: Tue, 7 Nov 2017 17:57:10 -0500 Subject: [PATCH 178/534] bug-fix: crash on startup, when passing in single-parameter, command-line args --- BasiliskII/src/Unix/main_unix.cpp | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index c80f95f4b..594445809 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -432,12 +432,14 @@ int main(int argc, char **argv) #if defined(__APPLE__) && defined(__MACH__) // Mac OS X likes to pass in various options of its own, when launching an app. // Attempt to ignore these. - const char * mac_psn_prefix = "-psn_"; - if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { - argv[i] = NULL; - } else if (strncmp(mac_psn_prefix, argv[i], strlen(mac_psn_prefix)) == 0) { - argv[i] = NULL; - } + if (argv[i]) { + const char * mac_psn_prefix = "-psn_"; + if (strcmp(argv[i], "-NSDocumentRevisionsDebugMode") == 0) { + argv[i] = NULL; + } else if (strncmp(mac_psn_prefix, argv[i], strlen(mac_psn_prefix)) == 0) { + argv[i] = NULL; + } + } #endif } From 5065fb9d9504764a39ed471890d1ecdfc367bc31 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 17 Nov 2017 21:43:36 +0900 Subject: [PATCH 179/534] 64-bit build for 10.10+ --- BasiliskII/src/SDL/video_sdl.cpp | 4 +- BasiliskII/src/Unix/Darwin/lowmem.c | 4 +- .../project.pbxproj | 8 +- SheepShaver/src/Unix/main_unix.cpp | 28 +++--- SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 26 ++--- SheepShaver/src/kpx_cpu/src/cpu/vm.hpp | 8 +- SheepShaver/src/main.cpp | 95 +++++++++---------- 7 files changed, 92 insertions(+), 81 deletions(-) mode change 100644 => 100755 BasiliskII/src/SDL/video_sdl.cpp mode change 100644 => 100755 BasiliskII/src/Unix/Darwin/lowmem.c mode change 100644 => 100755 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj mode change 100644 => 100755 SheepShaver/src/Unix/main_unix.cpp mode change 100644 => 100755 SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp mode change 100644 => 100755 SheepShaver/src/kpx_cpu/src/cpu/vm.hpp mode change 100644 => 100755 SheepShaver/src/main.cpp diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp old mode 100644 new mode 100755 index 798ed8e8d..ce2c9ae16 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -198,12 +198,12 @@ static void *vm_acquire_framebuffer(uint32 size) // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) { +// if (vm_acquire_fixed(fb, size) < 0) { #ifndef SHEEPSHAVER printf("FATAL: Could not reallocate framebuffer at previous address\n"); #endif fb = VM_MAP_FAILED; - } +// } } if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); diff --git a/BasiliskII/src/Unix/Darwin/lowmem.c b/BasiliskII/src/Unix/Darwin/lowmem.c old mode 100644 new mode 100755 index 9d676d2f4..a40a36613 --- a/BasiliskII/src/Unix/Darwin/lowmem.c +++ b/BasiliskII/src/Unix/Darwin/lowmem.c @@ -107,8 +107,8 @@ void pagezero_64(struct mach_header_64 *machhead) exit(1); } /* change the permissions */ - sc_cmd->maxprot = target_uint32(VM_PROT_ALL); - sc_cmd->initprot = target_uint32(VM_PROT_ALL); +// sc_cmd->maxprot = target_uint32(VM_PROT_ALL); +// sc_cmd->initprot = target_uint32(VM_PROT_ALL); } #endif diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj old mode 100644 new mode 100755 index bdde7b99b..5153cda47 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1220,7 +1220,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = NO; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; @@ -1254,7 +1254,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = YES; DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = YES; @@ -1313,7 +1313,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; GCC_CW_ASM_SYNTAX = NO; @@ -1369,7 +1369,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = NO; DEAD_CODE_STRIPPING = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp old mode 100644 new mode 100755 index 3d0ee43ec..8f7e96b2c --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -191,6 +191,9 @@ int64 TimebaseSpeed; // Timebase clock speed (Hz) uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) +#if defined(__APPLE__) && defined(__x86_64__) +uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif // Global variables #ifndef USE_SDL_VIDEO @@ -855,15 +858,17 @@ int main(int argc, char **argv) goto quit; } +#if !defined(__APPLE__) || !defined(__x86_64__) // Create areas for Kernel Data if (!kernel_data_init()) goto quit; +#endif kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE); emulator_data = &kernel_data->ed; KernelDataAddr = KERNEL_DATA_BASE; D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE)); D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed))); - +#if 0 // Create area for DR Cache if (vm_mac_acquire_fixed(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) { sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno)); @@ -886,7 +891,7 @@ int main(int argc, char **argv) #endif DRCacheAddr = DR_CACHE_BASE; D(bug("DR Cache at %p\n", DRCacheAddr)); - +#endif // Create area for SheepShaver data if (!SheepMem::Init()) { sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); @@ -1634,8 +1639,8 @@ void sigusr2_handler(int sig, siginfo_t *sip, void *scp) switch (ReadMacInt32(XLM_RUN_MODE)) { case MODE_68K: // 68k emulator active, trigger 68k interrupt level 1 - WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1); - r->cr() |= ntohl(kernel_data->v[0x674 >> 2]); + WriteMacInt16(ReadMacInt32(0x67c), 1); + r->cr() |= ReadMacInt32(0x674); break; #if INTERRUPTS_IN_NATIVE_MODE @@ -1647,8 +1652,8 @@ void sigusr2_handler(int sig, siginfo_t *sip, void *scp) sigaltstack(&extra_stack, NULL); // Prepare for 68k interrupt level 1 - WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1); - WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2])); + WriteMacInt16(ReadMacInt32(0x67c), 1); + WriteMacInt32(ReadMacInt32(0x658) + 0xdc, ReadMacInt32(ReadMacInt32(0x658) + 0xdc) | ReadMacInt32(0x674)); // Execute nanokernel interrupt routine (this will activate the 68k emulator) DisableInterrupt(); @@ -2155,10 +2160,10 @@ bool SheepMem::Init(void) page_size = getpagesize(); // Allocate SheepShaver globals - proc = base; - if (vm_mac_acquire_fixed(base, size) < 0) + uint8 *adr = vm_mac_acquire(size); + if (adr == VM_MAP_FAILED) return false; - + proc = base = Host2MacAddr(adr); // Allocate page with all bits set to 0, right in the middle // This is also used to catch undesired overlaps between proc and data areas zero_page = proc + (size / 2); @@ -2168,9 +2173,10 @@ bool SheepMem::Init(void) #if EMULATED_PPC // Allocate alternate stack for PowerPC interrupt routine - sig_stack = base + size; - if (vm_mac_acquire_fixed(sig_stack, SIG_STACK_SIZE) < 0) + adr = vm_mac_acquire(SIG_STACK_SIZE); + if (adr == VM_MAP_FAILED) return false; + sig_stack = Host2MacAddr(adr); #endif data = base + size; diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp old mode 100644 new mode 100755 index a553973e0..5c8ef1f66 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp @@ -182,7 +182,7 @@ sheepshaver_cpu::sheepshaver_cpu() { init_decoder(); -#if PPC_ENABLE_JIT +#if PPC_ENABLE_JIT && !(defined(__APPLE__) && defined(__x86_64__)) if (PrefsFindBool("jit")) enable_jit(); #endif @@ -478,10 +478,10 @@ void sheepshaver_cpu::interrupt(uint32 entry) SheepVar32 trampoline = POWERPC_EXEC_RETURN; // Prepare registers for nanokernel interrupt routine - kernel_data->v[0x004 >> 2] = htonl(gpr(1)); - kernel_data->v[0x018 >> 2] = htonl(gpr(6)); + WriteMacInt32(KERNEL_DATA_BASE + 0x004, gpr(1)); + WriteMacInt32(KERNEL_DATA_BASE + 0x018, gpr(6)); - gpr(6) = ntohl(kernel_data->v[0x65c >> 2]); + gpr(6) = ReadMacInt32(KERNEL_DATA_BASE + 0x65c); assert(gpr(6) != 0); WriteMacInt32(gpr(6) + 0x13c, gpr(7)); WriteMacInt32(gpr(6) + 0x144, gpr(8)); @@ -492,7 +492,7 @@ void sheepshaver_cpu::interrupt(uint32 entry) WriteMacInt32(gpr(6) + 0x16c, gpr(13)); gpr(1) = KernelDataAddr; - gpr(7) = ntohl(kernel_data->v[0x660 >> 2]); + gpr(7) = ReadMacInt32(KERNEL_DATA_BASE + 0x660); gpr(8) = 0; gpr(10) = trampoline.addr(); gpr(12) = trampoline.addr(); @@ -564,8 +564,8 @@ void sheepshaver_cpu::execute_68k(uint32 entry, M68kRegisters *r) gpr(25) = ReadMacInt32(XLM_68K_R25); // MSB of SR gpr(26) = 0; gpr(28) = 0; // VBR - gpr(29) = ntohl(kernel_data->ed.v[0x74 >> 2]); // Pointer to opcode table - gpr(30) = ntohl(kernel_data->ed.v[0x78 >> 2]); // Address of emulator + gpr(29) = ReadMacInt32(KERNEL_DATA_BASE + 0x1074); // Pointer to opcode table + gpr(30) = ReadMacInt32(KERNEL_DATA_BASE + 0x1078); // Address of emulator gpr(31) = KernelDataAddr + 0x1000; // Push return address (points to EXEC_RETURN opcode) on stack @@ -963,8 +963,8 @@ void HandleInterrupt(powerpc_registers *r) switch (ReadMacInt32(XLM_RUN_MODE)) { case MODE_68K: // 68k emulator active, trigger 68k interrupt level 1 - WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); - r->cr.set(r->cr.get() | tswap32(kernel_data->v[0x674 >> 2])); + WriteMacInt16(ReadMacInt32(KERNEL_DATA_BASE + 0x67c), 1); + r->cr.set(r->cr.get() | ReadMacInt32(KERNEL_DATA_BASE + 0x674)); break; #if INTERRUPTS_IN_NATIVE_MODE @@ -973,10 +973,10 @@ void HandleInterrupt(powerpc_registers *r) if (r->gpr[1] != KernelDataAddr) { // Prepare for 68k interrupt level 1 - WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); - WriteMacInt32(tswap32(kernel_data->v[0x658 >> 2]) + 0xdc, - ReadMacInt32(tswap32(kernel_data->v[0x658 >> 2]) + 0xdc) - | tswap32(kernel_data->v[0x674 >> 2])); + WriteMacInt16(ReadMacInt32(KERNEL_DATA_BASE + 0x67c), 1); + WriteMacInt32(ReadMacInt32(KERNEL_DATA_BASE + 0x658) + 0xdc, + ReadMacInt32(ReadMacInt32(KERNEL_DATA_BASE + 0x658) + 0xdc) + | ReadMacInt32(KERNEL_DATA_BASE + 0x674)); // Execute nanokernel interrupt routine (this will activate the 68k emulator) DisableInterrupt(); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp b/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp old mode 100644 new mode 100755 index 55f30ec36..5c0b73307 --- a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp @@ -205,7 +205,13 @@ const uintptr VMBaseDiff = NATMEM_OFFSET; #if REAL_ADDRESSING || DIRECT_ADDRESSING static inline uint8 * vm_do_get_real_address(vm_addr_t addr) { - return (uint8 *)vm_wrap_address(VMBaseDiff + addr); + uintptr a = vm_wrap_address(VMBaseDiff + addr); +#if defined(__APPLE__) && defined(__x86_64__) + extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; + if (a < 0x3000) return &gZeroPage[a]; + else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) return &gKernelData[a & 0x1fff]; +#endif + return (uint8 *)a; } static inline vm_addr_t vm_do_get_virtual_address(uint8 *addr) { diff --git a/SheepShaver/src/main.cpp b/SheepShaver/src/main.cpp old mode 100644 new mode 100755 index 1224fbe1a..e34b24be7 --- a/SheepShaver/src/main.cpp +++ b/SheepShaver/src/main.cpp @@ -164,63 +164,62 @@ bool InitAll(const char *vmdir) } // Initialize Kernel Data - KernelData *kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE); - memset(kernel_data, 0, sizeof(KernelData)); + Mac_memset(KERNEL_DATA_BASE, 0, sizeof(KernelData)); if (ROMType == ROMTYPE_NEWWORLD) { uint32 of_dev_tree = SheepMem::Reserve(4 * sizeof(uint32)); Mac_memset(of_dev_tree, 0, 4 * sizeof(uint32)); uint32 vector_lookup_tbl = SheepMem::Reserve(128); uint32 vector_mask_tbl = SheepMem::Reserve(64); - memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80); + Mac_memset(KERNEL_DATA_BASE + 0xb80, 0x3d, 0x80); Mac_memset(vector_lookup_tbl, 0, 128); Mac_memset(vector_mask_tbl, 0, 64); - kernel_data->v[0xb80 >> 2] = htonl(ROMBase); - kernel_data->v[0xb84 >> 2] = htonl(of_dev_tree); // OF device tree base - kernel_data->v[0xb90 >> 2] = htonl(vector_lookup_tbl); - kernel_data->v[0xb94 >> 2] = htonl(vector_mask_tbl); - kernel_data->v[0xb98 >> 2] = htonl(ROMBase); // OpenPIC base - kernel_data->v[0xbb0 >> 2] = htonl(0); // ADB base - kernel_data->v[0xc20 >> 2] = htonl(RAMSize); - kernel_data->v[0xc24 >> 2] = htonl(RAMSize); - kernel_data->v[0xc30 >> 2] = htonl(RAMSize); - kernel_data->v[0xc34 >> 2] = htonl(RAMSize); - kernel_data->v[0xc38 >> 2] = htonl(0x00010020); - kernel_data->v[0xc3c >> 2] = htonl(0x00200001); - kernel_data->v[0xc40 >> 2] = htonl(0x00010000); - kernel_data->v[0xc50 >> 2] = htonl(RAMBase); - kernel_data->v[0xc54 >> 2] = htonl(RAMSize); - kernel_data->v[0xf60 >> 2] = htonl(PVR); - kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf6c >> 2] = htonl(TimebaseSpeed); // timebase-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xb80, ROMBase); + WriteMacInt32(KERNEL_DATA_BASE + 0xb84, of_dev_tree); // OF device tree base + WriteMacInt32(KERNEL_DATA_BASE + 0xb90, vector_lookup_tbl); + WriteMacInt32(KERNEL_DATA_BASE + 0xb94, vector_mask_tbl); + WriteMacInt32(KERNEL_DATA_BASE + 0xb98, ROMBase); // OpenPIC base + WriteMacInt32(KERNEL_DATA_BASE + 0xbb0, 0); // ADB base + WriteMacInt32(KERNEL_DATA_BASE + 0xc20, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc24, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc30, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc34, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc38, 0x00010020); + WriteMacInt32(KERNEL_DATA_BASE + 0xc3c, 0x00200001); + WriteMacInt32(KERNEL_DATA_BASE + 0xc40, 0x00010000); + WriteMacInt32(KERNEL_DATA_BASE + 0xc50, RAMBase); + WriteMacInt32(KERNEL_DATA_BASE + 0xc54, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xf60, PVR); + WriteMacInt32(KERNEL_DATA_BASE + 0xf64, CPUClockSpeed); // clock-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf68, BusClockSpeed); // bus-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf6c, TimebaseSpeed); // timebase-frequency } else if (ROMType == ROMTYPE_GOSSAMER) { - kernel_data->v[0xc80 >> 2] = htonl(RAMSize); - kernel_data->v[0xc84 >> 2] = htonl(RAMSize); - kernel_data->v[0xc90 >> 2] = htonl(RAMSize); - kernel_data->v[0xc94 >> 2] = htonl(RAMSize); - kernel_data->v[0xc98 >> 2] = htonl(0x00010020); - kernel_data->v[0xc9c >> 2] = htonl(0x00200001); - kernel_data->v[0xca0 >> 2] = htonl(0x00010000); - kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); - kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); - kernel_data->v[0xf60 >> 2] = htonl(PVR); - kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf6c >> 2] = htonl(TimebaseSpeed); // timebase-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xc80, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc84, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc90, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc94, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc98, 0x00010020); + WriteMacInt32(KERNEL_DATA_BASE + 0xc9c, 0x00200001); + WriteMacInt32(KERNEL_DATA_BASE + 0xca0, 0x00010000); + WriteMacInt32(KERNEL_DATA_BASE + 0xcb0, RAMBase); + WriteMacInt32(KERNEL_DATA_BASE + 0xcb4, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xf60, PVR); + WriteMacInt32(KERNEL_DATA_BASE + 0xf64, CPUClockSpeed); // clock-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf68, BusClockSpeed); // bus-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf6c, TimebaseSpeed); // timebase-frequency } else { - kernel_data->v[0xc80 >> 2] = htonl(RAMSize); - kernel_data->v[0xc84 >> 2] = htonl(RAMSize); - kernel_data->v[0xc90 >> 2] = htonl(RAMSize); - kernel_data->v[0xc94 >> 2] = htonl(RAMSize); - kernel_data->v[0xc98 >> 2] = htonl(0x00010020); - kernel_data->v[0xc9c >> 2] = htonl(0x00200001); - kernel_data->v[0xca0 >> 2] = htonl(0x00010000); - kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); - kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); - kernel_data->v[0xf80 >> 2] = htonl(PVR); - kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf8c >> 2] = htonl(TimebaseSpeed); // timebase-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xc80, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc84, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc90, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc94, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xc98, 0x00010020); + WriteMacInt32(KERNEL_DATA_BASE + 0xc9c, 0x00200001); + WriteMacInt32(KERNEL_DATA_BASE + 0xca0, 0x00010000); + WriteMacInt32(KERNEL_DATA_BASE + 0xcb0, RAMBase); + WriteMacInt32(KERNEL_DATA_BASE + 0xcb4, RAMSize); + WriteMacInt32(KERNEL_DATA_BASE + 0xf80, PVR); + WriteMacInt32(KERNEL_DATA_BASE + 0xf84, CPUClockSpeed); // clock-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf88, BusClockSpeed); // bus-frequency + WriteMacInt32(KERNEL_DATA_BASE + 0xf8c, TimebaseSpeed); // timebase-frequency } // Initialize extra low memory From e7c041c0d5b1034c14c1f642806f6cef534a2f3e Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 18 Nov 2017 12:46:22 +0900 Subject: [PATCH 180/534] delete symbolic links --- SheepShaver/src/SDL | 1 - SheepShaver/src/Unix/Darwin/lowmem.c | 1 - 2 files changed, 2 deletions(-) delete mode 120000 SheepShaver/src/SDL delete mode 120000 SheepShaver/src/Unix/Darwin/lowmem.c diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL deleted file mode 120000 index 48cb61ebe..000000000 --- a/SheepShaver/src/SDL +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/SDL \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/lowmem.c b/SheepShaver/src/Unix/Darwin/lowmem.c deleted file mode 120000 index 7e0a359c7..000000000 --- a/SheepShaver/src/Unix/Darwin/lowmem.c +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/lowmem.c \ No newline at end of file From 056dc36070866fc637f94eb605e5ccec91278a82 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 18 Nov 2017 13:08:30 +0900 Subject: [PATCH 181/534] revert BasiliskII, change only SheepShaver --- BasiliskII/src/SDL/video_sdl.cpp | 4 +- BasiliskII/src/Unix/Darwin/lowmem.c | 4 +- .../project.pbxproj | 8 +- SheepShaver/src/SDL/SDLMain.h | 16 + SheepShaver/src/SDL/SDLMain.m | 381 +++ SheepShaver/src/SDL/audio_sdl.cpp | 344 +++ SheepShaver/src/SDL/keycodes | 464 ++++ SheepShaver/src/SDL/video_sdl.cpp | 2264 +++++++++++++++++ SheepShaver/src/Unix/Darwin/lowmem.c | 254 ++ 9 files changed, 3731 insertions(+), 8 deletions(-) create mode 100644 SheepShaver/src/SDL/SDLMain.h create mode 100644 SheepShaver/src/SDL/SDLMain.m create mode 100644 SheepShaver/src/SDL/audio_sdl.cpp create mode 100644 SheepShaver/src/SDL/keycodes create mode 100755 SheepShaver/src/SDL/video_sdl.cpp create mode 100755 SheepShaver/src/Unix/Darwin/lowmem.c diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index ce2c9ae16..798ed8e8d 100755 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -198,12 +198,12 @@ static void *vm_acquire_framebuffer(uint32 size) // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { -// if (vm_acquire_fixed(fb, size) < 0) { + if (vm_acquire_fixed(fb, size) < 0) { #ifndef SHEEPSHAVER printf("FATAL: Could not reallocate framebuffer at previous address\n"); #endif fb = VM_MAP_FAILED; -// } + } } if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); diff --git a/BasiliskII/src/Unix/Darwin/lowmem.c b/BasiliskII/src/Unix/Darwin/lowmem.c index a40a36613..9d676d2f4 100755 --- a/BasiliskII/src/Unix/Darwin/lowmem.c +++ b/BasiliskII/src/Unix/Darwin/lowmem.c @@ -107,8 +107,8 @@ void pagezero_64(struct mach_header_64 *machhead) exit(1); } /* change the permissions */ -// sc_cmd->maxprot = target_uint32(VM_PROT_ALL); -// sc_cmd->initprot = target_uint32(VM_PROT_ALL); + sc_cmd->maxprot = target_uint32(VM_PROT_ALL); + sc_cmd->initprot = target_uint32(VM_PROT_ALL); } #endif diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 5153cda47..c07d55ff0 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -16,7 +16,6 @@ 08163339158C121000C449F9 /* dis-asm.h in Headers */ = {isa = PBXBuildFile; fileRef = 08163337158C121000C449F9 /* dis-asm.h */; }; 08163340158C125800C449F9 /* ppc-dis.c in Sources */ = {isa = PBXBuildFile; fileRef = 08163338158C121000C449F9 /* ppc-dis.c */; }; 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */; }; - 082AC26214AA59F000071F5E /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = 082AC26114AA59F000071F5E /* lowmem.c */; }; 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */; }; 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E372016EFE87200CCCA59 /* tinyxml2.cpp */; }; 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDF714A99EEF000B1711 /* ieeefp.cpp */; }; @@ -106,6 +105,7 @@ 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; + E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -151,7 +151,6 @@ 08163338158C121000C449F9 /* ppc-dis.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = "ppc-dis.c"; sourceTree = ""; }; 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; 082AC25214AA59B600071F5E /* lowmem */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = lowmem; sourceTree = BUILT_PRODUCTS_DIR; }; - 082AC26114AA59F000071F5E /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = ../../../BasiliskII/src/Unix/Darwin/lowmem.c; sourceTree = SOURCE_ROOT; }; 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk_sparsebundle.cpp; path = ../Unix/disk_sparsebundle.cpp; sourceTree = SOURCE_ROOT; }; 083E370B16EFE85000CCCA59 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = disk_unix.h; path = ../Unix/disk_unix.h; sourceTree = SOURCE_ROOT; }; 083E372016EFE87200CCCA59 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = tinyxml2.cpp; path = ../Unix/tinyxml2.cpp; sourceTree = SOURCE_ROOT; }; @@ -379,6 +378,7 @@ 08D93A15159FE174003B04EC /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; + E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -427,7 +427,7 @@ 082AC25614AA59DA00071F5E /* Darwin */ = { isa = PBXGroup; children = ( - 082AC26114AA59F000071F5E /* lowmem.c */, + E4302EE21FBFE7FA00A5B500 /* lowmem.c */, ); name = Darwin; sourceTree = ""; @@ -1046,7 +1046,7 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( - 082AC26214AA59F000071F5E /* lowmem.c in Sources */, + E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */, ); runOnlyForDeploymentPostprocessing = 0; }; diff --git a/SheepShaver/src/SDL/SDLMain.h b/SheepShaver/src/SDL/SDLMain.h new file mode 100644 index 000000000..c56d90cbe --- /dev/null +++ b/SheepShaver/src/SDL/SDLMain.h @@ -0,0 +1,16 @@ +/* SDLMain.m - main entry point for our Cocoa-ized SDL app + Initial Version: Darrell Walisser + Non-NIB-Code & other changes: Max Horn + + Feel free to customize this file to suit your needs +*/ + +#ifndef _SDLMain_h_ +#define _SDLMain_h_ + +#import + +@interface SDLMain : NSObject +@end + +#endif /* _SDLMain_h_ */ diff --git a/SheepShaver/src/SDL/SDLMain.m b/SheepShaver/src/SDL/SDLMain.m new file mode 100644 index 000000000..0f23664dd --- /dev/null +++ b/SheepShaver/src/SDL/SDLMain.m @@ -0,0 +1,381 @@ +/* SDLMain.m - main entry point for our Cocoa-ized SDL app + Initial Version: Darrell Walisser + Non-NIB-Code & other changes: Max Horn + + Feel free to customize this file to suit your needs +*/ + +#include "SDL.h" +#include "SDLMain.h" +#include /* for MAXPATHLEN */ +#include + +/* For some reaon, Apple removed setAppleMenu from the headers in 10.4, + but the method still is there and works. To avoid warnings, we declare + it ourselves here. */ +@interface NSApplication(SDL_Missing_Methods) +- (void)setAppleMenu:(NSMenu *)menu; +@end + +/* Use this flag to determine whether we use SDLMain.nib or not */ +#define SDL_USE_NIB_FILE 0 + +/* Use this flag to determine whether we use CPS (docking) or not */ +#define SDL_USE_CPS 1 +#ifdef SDL_USE_CPS +/* Portions of CPS.h */ +typedef struct CPSProcessSerNum +{ + UInt32 lo; + UInt32 hi; +} CPSProcessSerNum; + +extern OSErr CPSGetCurrentProcess( CPSProcessSerNum *psn); +extern OSErr CPSEnableForegroundOperation( CPSProcessSerNum *psn, UInt32 _arg2, UInt32 _arg3, UInt32 _arg4, UInt32 _arg5); +extern OSErr CPSSetFrontProcess( CPSProcessSerNum *psn); + +#endif /* SDL_USE_CPS */ + +static int gArgc; +static char **gArgv; +static BOOL gFinderLaunch; +static BOOL gCalledAppMainline = FALSE; + +static NSString *getApplicationName(void) +{ + const NSDictionary *dict; + NSString *appName = 0; + + /* Determine the application name */ + dict = (const NSDictionary *)CFBundleGetInfoDictionary(CFBundleGetMainBundle()); + if (dict) + appName = [dict objectForKey: @"CFBundleName"]; + + if (![appName length]) + appName = [[NSProcessInfo processInfo] processName]; + + return appName; +} + +#if SDL_USE_NIB_FILE +/* A helper category for NSString */ +@interface NSString (ReplaceSubString) +- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString; +@end +#endif + +@interface NSApplication (SDLApplication) +@end + +@implementation NSApplication (SDLApplication) +/* Invoked from the Quit menu item */ +- (void)terminate:(id)sender +{ + /* Post a SDL_QUIT event */ + SDL_Event event; + event.type = SDL_QUIT; + SDL_PushEvent(&event); +} +@end + +/* The main class of the application, the application's delegate */ +@implementation SDLMain + +/* Set the working directory to the .app's parent directory */ +- (void) setupWorkingDirectory:(BOOL)shouldChdir +{ + if (shouldChdir) + { + char parentdir[MAXPATHLEN]; + CFURLRef url = CFBundleCopyBundleURL(CFBundleGetMainBundle()); + CFURLRef url2 = CFURLCreateCopyDeletingLastPathComponent(0, url); + if (CFURLGetFileSystemRepresentation(url2, 1, (UInt8 *)parentdir, MAXPATHLEN)) { + chdir(parentdir); /* chdir to the binary app's parent */ + } + CFRelease(url); + CFRelease(url2); + } +} + +#if SDL_USE_NIB_FILE + +/* Fix menu to contain the real app name instead of "SDL App" */ +- (void)fixMenu:(NSMenu *)aMenu withAppName:(NSString *)appName +{ + NSRange aRange; + NSEnumerator *enumerator; + NSMenuItem *menuItem; + + aRange = [[aMenu title] rangeOfString:@"SDL App"]; + if (aRange.length != 0) + [aMenu setTitle: [[aMenu title] stringByReplacingRange:aRange with:appName]]; + + enumerator = [[aMenu itemArray] objectEnumerator]; + while ((menuItem = [enumerator nextObject])) + { + aRange = [[menuItem title] rangeOfString:@"SDL App"]; + if (aRange.length != 0) + [menuItem setTitle: [[menuItem title] stringByReplacingRange:aRange with:appName]]; + if ([menuItem hasSubmenu]) + [self fixMenu:[menuItem submenu] withAppName:appName]; + } +} + +#else + +static void setApplicationMenu(void) +{ + /* warning: this code is very odd */ + NSMenu *appleMenu; + NSMenuItem *menuItem; + NSString *title; + NSString *appName; + + appName = getApplicationName(); + appleMenu = [[NSMenu alloc] initWithTitle:@""]; + + /* Add menu items */ + title = [@"About " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(orderFrontStandardAboutPanel:) keyEquivalent:@""]; + + [appleMenu addItem:[NSMenuItem separatorItem]]; + + title = [@"Hide " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(hide:) keyEquivalent:@"h"]; + + menuItem = (NSMenuItem *)[appleMenu addItemWithTitle:@"Hide Others" action:@selector(hideOtherApplications:) keyEquivalent:@"h"]; + [menuItem setKeyEquivalentModifierMask:(NSAlternateKeyMask|NSCommandKeyMask)]; + + [appleMenu addItemWithTitle:@"Show All" action:@selector(unhideAllApplications:) keyEquivalent:@""]; + + [appleMenu addItem:[NSMenuItem separatorItem]]; + + title = [@"Quit " stringByAppendingString:appName]; + [appleMenu addItemWithTitle:title action:@selector(terminate:) keyEquivalent:@"q"]; + + + /* Put menu into the menubar */ + menuItem = [[NSMenuItem alloc] initWithTitle:@"" action:nil keyEquivalent:@""]; + [menuItem setSubmenu:appleMenu]; + [[NSApp mainMenu] addItem:menuItem]; + + /* Tell the application object that this is now the application menu */ + [NSApp setAppleMenu:appleMenu]; + + /* Finally give up our references to the objects */ + [appleMenu release]; + [menuItem release]; +} + +/* Create a window menu */ +static void setupWindowMenu(void) +{ + NSMenu *windowMenu; + NSMenuItem *windowMenuItem; + NSMenuItem *menuItem; + + windowMenu = [[NSMenu alloc] initWithTitle:@"Window"]; + + /* "Minimize" item */ + menuItem = [[NSMenuItem alloc] initWithTitle:@"Minimize" action:@selector(performMiniaturize:) keyEquivalent:@"m"]; + [windowMenu addItem:menuItem]; + [menuItem release]; + + /* Put menu into the menubar */ + windowMenuItem = [[NSMenuItem alloc] initWithTitle:@"Window" action:nil keyEquivalent:@""]; + [windowMenuItem setSubmenu:windowMenu]; + [[NSApp mainMenu] addItem:windowMenuItem]; + + /* Tell the application object that this is now the window menu */ + [NSApp setWindowsMenu:windowMenu]; + + /* Finally give up our references to the objects */ + [windowMenu release]; + [windowMenuItem release]; +} + +/* Replacement for NSApplicationMain */ +static void CustomApplicationMain (int argc, char **argv) +{ + NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; + SDLMain *sdlMain; + + /* Ensure the application object is initialised */ + [NSApplication sharedApplication]; + +#ifdef SDL_USE_CPS + { + CPSProcessSerNum PSN; + /* Tell the dock about us */ + if (!CPSGetCurrentProcess(&PSN)) + if (!CPSEnableForegroundOperation(&PSN,0x03,0x3C,0x2C,0x1103)) + if (!CPSSetFrontProcess(&PSN)) + [NSApplication sharedApplication]; + } +#endif /* SDL_USE_CPS */ + + /* Set up the menubar */ + [NSApp setMainMenu:[[[NSMenu alloc] init] autorelease]]; + setApplicationMenu(); + setupWindowMenu(); + + /* Create SDLMain and make it the app delegate */ + sdlMain = [[SDLMain alloc] init]; + [NSApp setDelegate:sdlMain]; + + /* Start the main event loop */ + [NSApp run]; + + [sdlMain release]; + [pool release]; +} + +#endif + + +/* + * Catch document open requests...this lets us notice files when the app + * was launched by double-clicking a document, or when a document was + * dragged/dropped on the app's icon. You need to have a + * CFBundleDocumentsType section in your Info.plist to get this message, + * apparently. + * + * Files are added to gArgv, so to the app, they'll look like command line + * arguments. Previously, apps launched from the finder had nothing but + * an argv[0]. + * + * This message may be received multiple times to open several docs on launch. + * + * This message is ignored once the app's mainline has been called. + */ +- (BOOL)application:(NSApplication *)theApplication openFile:(NSString *)filename +{ + const char *temparg; + size_t arglen; + char *arg; + char **newargv; + + if (!gFinderLaunch) /* MacOS is passing command line args. */ + return FALSE; + + if (gCalledAppMainline) /* app has started, ignore this document. */ + return FALSE; + + temparg = [filename UTF8String]; + arglen = SDL_strlen(temparg) + 1; + arg = (char *) SDL_malloc(arglen); + if (arg == NULL) + return FALSE; + + newargv = (char **) realloc(gArgv, sizeof (char *) * (gArgc + 2)); + if (newargv == NULL) + { + SDL_free(arg); + return FALSE; + } + gArgv = newargv; + + SDL_strlcpy(arg, temparg, arglen); + gArgv[gArgc++] = arg; + gArgv[gArgc] = NULL; + return TRUE; +} + + +/* Called when the internal event loop has just started running */ +- (void) applicationDidFinishLaunching: (NSNotification *) note +{ + int status; + + /* Set the working directory to the .app's parent directory */ + [self setupWorkingDirectory:gFinderLaunch]; + +#if SDL_USE_NIB_FILE + /* Set the main menu to contain the real app name instead of "SDL App" */ + [self fixMenu:[NSApp mainMenu] withAppName:getApplicationName()]; +#endif + + /* Hand off to main application code */ + gCalledAppMainline = TRUE; + status = SDL_main (gArgc, gArgv); + + /* We're done, thank you for playing */ + exit(status); +} +@end + + +@implementation NSString (ReplaceSubString) + +- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString +{ + unsigned int bufferSize; + unsigned int selfLen = [self length]; + unsigned int aStringLen = [aString length]; + unichar *buffer; + NSRange localRange; + NSString *result; + + bufferSize = selfLen + aStringLen - aRange.length; + buffer = (unichar *)NSAllocateMemoryPages(bufferSize*sizeof(unichar)); + + /* Get first part into buffer */ + localRange.location = 0; + localRange.length = aRange.location; + [self getCharacters:buffer range:localRange]; + + /* Get middle part into buffer */ + localRange.location = 0; + localRange.length = aStringLen; + [aString getCharacters:(buffer+aRange.location) range:localRange]; + + /* Get last part into buffer */ + localRange.location = aRange.location + aRange.length; + localRange.length = selfLen - localRange.location; + [self getCharacters:(buffer+aRange.location+aStringLen) range:localRange]; + + /* Build output string */ + result = [NSString stringWithCharacters:buffer length:bufferSize]; + + NSDeallocateMemoryPages(buffer, bufferSize); + + return result; +} + +@end + + + +#ifdef main +# undef main +#endif + + +/* Main entry point to executable - should *not* be SDL_main! */ +int main (int argc, char **argv) +{ + /* Copy the arguments into a global variable */ + /* This is passed if we are launched by double-clicking */ + if ( argc >= 2 && strncmp (argv[1], "-psn", 4) == 0 ) { + gArgv = (char **) SDL_malloc(sizeof (char *) * 2); + gArgv[0] = argv[0]; + gArgv[1] = NULL; + gArgc = 1; + gFinderLaunch = YES; + } else { + int i; + gArgc = argc; + gArgv = (char **) SDL_malloc(sizeof (char *) * (argc+1)); + for (i = 0; i <= argc; i++) + gArgv[i] = argv[i]; + gFinderLaunch = NO; + } + +#if SDL_USE_NIB_FILE + NSApplicationMain (argc, argv); +#else + CustomApplicationMain (argc, argv); +#endif + return 0; +} + diff --git a/SheepShaver/src/SDL/audio_sdl.cpp b/SheepShaver/src/SDL/audio_sdl.cpp new file mode 100644 index 000000000..921beb4c1 --- /dev/null +++ b/SheepShaver/src/SDL/audio_sdl.cpp @@ -0,0 +1,344 @@ +/* + * audio_sdl.cpp - Audio support, SDL implementation + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" +#include "cpu_emulation.h" +#include "main.h" +#include "prefs.h" +#include "user_strings.h" +#include "audio.h" +#include "audio_defs.h" + +#include +#include + +#define DEBUG 0 +#include "debug.h" + +#if defined(BINCUE) +#include "bincue_unix.h" +#endif + + +#define MAC_MAX_VOLUME 0x0100 + +// The currently selected audio parameters (indices in audio_sample_rates[] etc. vectors) +static int audio_sample_rate_index = 0; +static int audio_sample_size_index = 0; +static int audio_channel_count_index = 0; + +// Global variables +static SDL_sem *audio_irq_done_sem = NULL; // Signal from interrupt to streaming thread: data block read +static uint8 silence_byte; // Byte value to use to fill sound buffers with silence +static uint8 *audio_mix_buf = NULL; +static int audio_volume = SDL_MIX_MAXVOLUME; +static bool audio_mute = false; + +// Prototypes +static void stream_func(void *arg, uint8 *stream, int stream_len); + + +/* + * Initialization + */ + +// Set AudioStatus to reflect current audio stream format +static void set_audio_status_format(void) +{ + AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; + AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; + AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; +} + +// Init SDL audio system +static bool open_sdl_audio(void) +{ + // SDL supports a variety of twisted little audio formats, all different + if (audio_sample_sizes.empty()) { + audio_sample_rates.push_back(11025 << 16); + audio_sample_rates.push_back(22050 << 16); + audio_sample_rates.push_back(44100 << 16); + audio_sample_sizes.push_back(8); + audio_sample_sizes.push_back(16); + audio_channel_counts.push_back(1); + audio_channel_counts.push_back(2); + + // Default to highest supported values + audio_sample_rate_index = audio_sample_rates.size() - 1; + audio_sample_size_index = audio_sample_sizes.size() - 1; + audio_channel_count_index = audio_channel_counts.size() - 1; + } + + SDL_AudioSpec audio_spec; + audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; + audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; + audio_spec.channels = audio_channel_counts[audio_channel_count_index]; + audio_spec.samples = 4096; + audio_spec.callback = stream_func; + audio_spec.userdata = NULL; + + // Open the audio device, forcing the desired format + if (SDL_OpenAudio(&audio_spec, NULL) < 0) { + fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); + return false; + } + +#if defined(BINCUE) + OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, + audio_spec.silence); +#endif + + char driver_name[32]; + printf("Using SDL/%s audio output\n", SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1)); + silence_byte = audio_spec.silence; + SDL_PauseAudio(0); + + // Sound buffer size = 4096 frames + audio_frames_per_block = audio_spec.samples; + audio_mix_buf = (uint8*)malloc(audio_spec.size); + return true; +} + +static bool open_audio(void) +{ + // Try to open SDL audio + if (!open_sdl_audio()) { + WarningAlert(GetString(STR_NO_AUDIO_WARN)); + return false; + } + + // Device opened, set AudioStatus + set_audio_status_format(); + + // Everything went fine + audio_open = true; + return true; +} + +void AudioInit(void) +{ + // Init audio status and feature flags + AudioStatus.sample_rate = 44100 << 16; + AudioStatus.sample_size = 16; + AudioStatus.channels = 2; + AudioStatus.mixer = 0; + AudioStatus.num_sources = 0; + audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; + + // Sound disabled in prefs? Then do nothing + if (PrefsFindBool("nosound")) + return; + + // Init semaphore + audio_irq_done_sem = SDL_CreateSemaphore(0); + + // Open and initialize audio device + open_audio(); +} + + +/* + * Deinitialization + */ + +static void close_audio(void) +{ + // Close audio device + SDL_CloseAudio(); + free(audio_mix_buf); + audio_mix_buf = NULL; + audio_open = false; +} + +void AudioExit(void) +{ + // Close audio device + close_audio(); + + // Delete semaphore + if (audio_irq_done_sem) + SDL_DestroySemaphore(audio_irq_done_sem); +} + + +/* + * First source added, start audio stream + */ + +void audio_enter_stream() +{ +} + + +/* + * Last source removed, stop audio stream + */ + +void audio_exit_stream() +{ +} + + +/* + * Streaming function + */ + +static void stream_func(void *arg, uint8 *stream, int stream_len) +{ + if (AudioStatus.num_sources) { + // Trigger audio interrupt to get new buffer + D(bug("stream: triggering irq\n")); + SetInterruptFlag(INTFLAG_AUDIO); + TriggerInterrupt(); + D(bug("stream: waiting for ack\n")); + SDL_SemWait(audio_irq_done_sem); + D(bug("stream: ack received\n")); + + // Get size of audio data + uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); + if (apple_stream_info && !audio_mute) { + int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; + D(bug("stream: work_size %d\n", work_size)); + if (work_size > stream_len) + work_size = stream_len; + if (work_size == 0) + goto silence; + + // Send data to audio device + Mac2Host_memcpy(audio_mix_buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); + memset((uint8 *)stream, silence_byte, stream_len); + SDL_MixAudio(stream, audio_mix_buf, work_size, audio_volume); + + D(bug("stream: data written\n")); + + } else + goto silence; + + } else { + + // Audio not active, play silence +silence: memset(stream, silence_byte, stream_len); + } +#if defined(BINCUE) + MixAudio_bincue(stream, stream_len); +#endif +} + + +/* + * MacOS audio interrupt, read next data block + */ + +void AudioInterrupt(void) +{ + D(bug("AudioInterrupt\n")); + + // Get data from apple mixer + if (AudioStatus.mixer) { + M68kRegisters r; + r.a[0] = audio_data + adatStreamInfo; + r.a[1] = AudioStatus.mixer; + Execute68k(audio_data + adatGetSourceData, &r); + D(bug(" GetSourceData() returns %08lx\n", r.d[0])); + } else + WriteMacInt32(audio_data + adatStreamInfo, 0); + + // Signal stream function + SDL_SemPost(audio_irq_done_sem); + D(bug("AudioInterrupt done\n")); +} + + +/* + * Set sampling parameters + * "index" is an index into the audio_sample_rates[] etc. vectors + * It is guaranteed that AudioStatus.num_sources == 0 + */ + +bool audio_set_sample_rate(int index) +{ + close_audio(); + audio_sample_rate_index = index; + return open_audio(); +} + +bool audio_set_sample_size(int index) +{ + close_audio(); + audio_sample_size_index = index; + return open_audio(); +} + +bool audio_set_channels(int index) +{ + close_audio(); + audio_channel_count_index = index; + return open_audio(); +} + + +/* + * Get/set volume controls (volume values received/returned have the left channel + * volume in the upper 16 bits and the right channel volume in the lower 16 bits; + * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) + */ + +bool audio_get_main_mute(void) +{ + return audio_mute; +} + +uint32 audio_get_main_volume(void) +{ + uint32 chan = (audio_volume * MAC_MAX_VOLUME / SDL_MIX_MAXVOLUME); + return (chan << 16) + chan; +} + +bool audio_get_speaker_mute(void) +{ + return audio_mute; +} + +uint32 audio_get_speaker_volume(void) +{ + return audio_get_main_volume(); +} + +void audio_set_main_mute(bool mute) +{ + audio_mute = mute; +} + +void audio_set_main_volume(uint32 vol) +{ + // We only have one-channel volume right now. + uint32 avg = ((vol >> 16) + (vol & 0xffff)) / 2; + if (avg > MAC_MAX_VOLUME) + avg = MAC_MAX_VOLUME; + audio_volume = avg * SDL_MIX_MAXVOLUME / MAC_MAX_VOLUME; +} + +void audio_set_speaker_mute(bool mute) +{ +} + +void audio_set_speaker_volume(uint32 vol) +{ +} diff --git a/SheepShaver/src/SDL/keycodes b/SheepShaver/src/SDL/keycodes new file mode 100644 index 000000000..da9185603 --- /dev/null +++ b/SheepShaver/src/SDL/keycodes @@ -0,0 +1,464 @@ +# /usr/share/BasiliskII/keycodes +# +# Basilisk II (C) 1997-2005 Christian Bauer +# +# This file is used to translate the (server-specific) scancodes to +# Mac keycodes depending on the window server being used. +# +# The format of this file is as follows: +# +# sdl +# +# +# +# ... +# sdl +# +# +# ... +# +# The "driver string" must match the first part of the SDL driver vendor +# description as reported by SDL_VideoDriverName(). If a match is found, +# the keycode translation table is constructed from the following +# lines. Each line contains an SDL scancode followed by its associated +# Mac keycode. Both keycodes have to be given in decimal. Lines +# beginning with "#" or ";" are treated as comments and ignored. +# + +# +# X11 server +# +sdl x11 +sdl dga +9 53 # Esc +67 122 # F1 +68 120 # F2 +69 99 # F3 +70 118 # F4 +71 96 # F5 +72 97 # F6 +73 98 # F7 +74 100 # F8 +75 101 # F9 +76 109 # F10 +95 103 # F11 +96 111 # F12 +111 105 # PrintScrn +78 107 # Scroll Lock +110 113 # Pause +49 50 # ` +10 18 # 1 +11 19 # 2 +12 20 # 3 +13 21 # 4 +14 23 # 5 +15 22 # 6 +16 26 # 7 +17 28 # 8 +18 25 # 9 +19 29 # 0 +20 27 # - +21 24 # = +22 51 # Backspace +106 114 # Insert +97 115 # Home +99 116 # Page Up +77 71 # Num Lock +112 75 # KP / +63 67 # KP * +82 78 # KP - +23 48 # Tab +24 12 # Q +25 13 # W +26 14 # E +27 15 # R +28 17 # T +29 16 # Y +30 32 # U +31 34 # I +32 31 # O +33 35 # P +34 33 # [ +35 30 # ] +36 36 # Return +107 117 # Delete +103 119 # End +105 121 # Page Down +79 89 # KP 7 +80 91 # KP 8 +81 92 # KP 9 +86 69 # KP + +66 57 # Caps Lock +38 0 # A +39 1 # S +40 2 # D +41 3 # F +42 5 # G +43 4 # H +44 38 # J +45 40 # K +46 37 # L +47 41 # ; +48 39 # ' +83 86 # KP 4 +84 87 # KP 5 +85 88 # KP 6 +50 56 # Shift Left +94 50 # International +52 6 # Z +53 7 # X +54 8 # C +55 9 # V +56 11 # B +57 45 # N +58 46 # M +59 43 # , +60 47 # . +61 44 # / +62 56 # Shift Right +51 42 # \ +98 62 # Cursor Up +87 83 # KP 1 +88 84 # KP 2 +89 85 # KP 3 +108 76 # KP Enter +37 54 # Ctrl Left +115 58 # Logo Left (-> Option) +64 55 # Alt Left (-> Command) +65 49 # Space +113 55 # Alt Right (-> Command) +116 58 # Logo Right (-> Option) +117 50 # Menu (-> International) +109 54 # Ctrl Right +100 59 # Cursor Left +104 61 # Cursor Down +102 60 # Cursor Right +90 82 # KP 0 +91 65 # KP . + +# +# Linux Framebuffer Console +# +sdl fbcon +1 53 # Esc +59 122 # F1 +60 120 # F2 +61 99 # F3 +62 118 # F4 +63 96 # F5 +64 97 # F6 +65 98 # F7 +66 100 # F8 +67 101 # F9 +68 109 # F10 +87 103 # F11 +88 111 # F12 +99 105 # PrintScrn +70 107 # Scroll Lock +119 113 # Pause +41 50 # ` +2 18 # 1 +3 19 # 2 +4 20 # 3 +5 21 # 4 +6 23 # 5 +7 22 # 6 +8 26 # 7 +9 28 # 8 +10 25 # 9 +11 29 # 0 +12 27 # - +13 24 # = +14 51 # Backspace +110 114 # Insert +102 115 # Home +104 116 # Page Up +69 71 # Num Lock +98 75 # KP / +55 67 # KP * +74 78 # KP - +15 48 # Tab +16 12 # Q +17 13 # W +18 14 # E +19 15 # R +20 17 # T +21 16 # Y +22 32 # U +23 34 # I +24 31 # O +25 35 # P +26 33 # [ +27 30 # ] +28 36 # Return +111 117 # Delete +107 119 # End +109 121 # Page Down +71 89 # KP 7 +72 91 # KP 8 +73 92 # KP 9 +78 69 # KP + +58 57 # Caps Lock +30 0 # A +31 1 # S +32 2 # D +33 3 # F +34 5 # G +35 4 # H +36 38 # J +37 40 # K +38 37 # L +39 41 # ; +40 39 # ' +75 86 # KP 4 +76 87 # KP 5 +77 88 # KP 6 +42 56 # Shift Left +86 50 # International +44 6 # Z +45 7 # X +46 8 # C +47 9 # V +48 11 # B +49 45 # N +50 46 # M +51 43 # , +52 47 # . +53 44 # / +54 56 # Shift Right +43 42 # \ +103 62 # Cursor Up +79 83 # KP 1 +80 84 # KP 2 +81 85 # KP 3 +96 76 # KP Enter +29 54 # Ctrl Left +125 58 # Logo Left (-> Option) +56 55 # Alt Left (-> Command) +57 49 # Space +100 55 # Alt Right (-> Command) +126 58 # Logo Right (-> Option) +97 54 # Ctrl Right +105 59 # Cursor Left +108 61 # Cursor Down +106 60 # Cursor Right +82 82 # KP 0 +83 65 # KP . + +# +# Quartz (1:1 translation actually) +# +sdl Quartz +53 53 # Esc +122 122 # F1 +120 120 # F2 +99 99 # F3 +118 118 # F4 +96 96 # F5 +97 97 # F6 +98 98 # F7 +100 100 # F8 +101 101 # F9 +109 109 # F10 +103 103 # F11 +111 111 # F12 +105 105 # F13/PrintScrn +107 107 # F14/Scroll Lock +113 113 # F15/Pause +10 10 # ` +18 18 # 1 +19 19 # 2 +20 20 # 3 +21 21 # 4 +23 23 # 5 +22 22 # 6 +26 26 # 7 +28 28 # 8 +25 25 # 9 +29 29 # 0 +27 27 # - +24 24 # = +51 51 # Backspace +114 114 # Help/Insert +115 115 # Home +116 116 # Page Up +71 71 # Num Lock +81 81 # KP = +75 75 # KP / +67 67 # KP * +48 48 # Tab +12 12 # Q +13 13 # W +14 14 # E +15 15 # R +17 17 # T +16 16 # Y +32 32 # U +34 34 # I +31 31 # O +35 35 # P +33 33 # [ +30 30 # ] +36 36 # Return +117 117 # Delete +119 119 # End +121 121 # Page Down +89 89 # KP 7 +91 91 # KP 8 +92 92 # KP 9 +78 78 # KP - +57 57 # Caps Lock +0 0 # A +1 1 # S +2 2 # D +3 3 # F +5 5 # G +4 4 # H +38 38 # J +40 40 # K +37 37 # L +41 41 # ; +39 39 # ' +42 42 # \ +86 86 # KP 4 +87 87 # KP 5 +88 88 # KP 6 +69 69 # KP + +56 56 # Shift +50 50 # International +6 6 # Z +7 7 # X +8 8 # C +9 9 # V +11 11 # B +45 45 # N +46 46 # M +43 43 # , +47 47 # . +44 44 # / +126 62 # Cursor Up +123 59 # Cursor Left +125 61 # Cursor Down +124 60 # Cursor Right +83 83 # KP 1 +84 84 # KP 2 +85 85 # KP 3 +76 76 # KP Enter +54 54 # Ctrl +58 58 # Option +55 55 # Command +54 54 # Ctrl Left +49 49 # Space +82 82 # KP 0 +65 65 # KP . + +# +# Windows +# +sdl windib +sdl directx +1 53 # Esc +59 122 # F1 +60 120 # F2 +61 99 # F3 +62 118 # F4 +63 96 # F5 +64 97 # F6 +65 98 # F7 +66 100 # F8 +67 101 # F9 +68 109 # F10 +87 103 # F11 +88 111 # F12 +183 105 # PrintScrn +70 107 # Scroll Lock +197 113 # Pause +41 50 # ` +2 18 # 1 +3 19 # 2 +4 20 # 3 +5 21 # 4 +6 23 # 5 +7 22 # 6 +8 26 # 7 +9 28 # 8 +10 25 # 9 +11 29 # 0 +12 27 # - +13 24 # = +14 51 # Backspace +210 114 # Insert +199 115 # Home +201 116 # Page Up +69 71 # Num Lock +181 75 # KP / +55 67 # KP * +74 78 # KP - +15 48 # Tab +16 12 # Q +17 13 # W +18 14 # E +19 15 # R +20 17 # T +21 16 # Y +22 32 # U +23 34 # I +24 31 # O +25 35 # P +26 33 # [ +27 30 # ] +28 36 # Return +211 117 # Delete +207 119 # End +209 121 # Page Down +71 89 # KP 7 +72 91 # KP 8 +73 92 # KP 9 +78 69 # KP + +58 57 # Caps Lock +30 0 # A +31 1 # S +32 2 # D +33 3 # F +34 5 # G +35 4 # H +36 38 # J +37 40 # K +38 37 # L +39 41 # ; +40 39 # ' +75 86 # KP 4 +76 87 # KP 5 +77 88 # KP 6 +42 56 # Shift Left +86 50 # International +44 6 # Z +45 7 # X +46 8 # C +47 9 # V +48 11 # B +49 45 # N +50 46 # M +51 43 # , +52 47 # . +53 44 # / +54 56 # Shift Right +43 42 # \ +200 62 # Cursor Up +79 83 # KP 1 +80 84 # KP 2 +81 85 # KP 3 +156 76 # KP Enter +29 54 # Ctrl Left +219 58 # Logo Left (-> Option) +56 55 # Alt Left (-> Command) +57 49 # Space +184 55 # Alt Right (-> Command) +220 58 # Logo Right (-> Option) +221 50 # Menu (-> International) +157 54 # Ctrl Right +203 59 # Cursor Left +208 61 # Cursor Down +205 60 # Cursor Right +82 82 # KP 0 +83 65 # KP . diff --git a/SheepShaver/src/SDL/video_sdl.cpp b/SheepShaver/src/SDL/video_sdl.cpp new file mode 100755 index 000000000..ce2c9ae16 --- /dev/null +++ b/SheepShaver/src/SDL/video_sdl.cpp @@ -0,0 +1,2264 @@ +/* + * video_sdl.cpp - Video/graphics emulation, SDL specific stuff + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +/* + * NOTES: + * The Ctrl key works like a qualifier for special actions: + * Ctrl-Tab = suspend DGA mode (TODO) + * Ctrl-Esc = emergency quit + * Ctrl-F1 = mount floppy + * Ctrl-F5 = grab mouse (in windowed mode) + * + * FIXMEs and TODOs: + * - Windows requires an extra mouse event to update the actual cursor image? + * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux + * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) + * - Mouse acceleration, there is no API in SDL yet for that + * - Gamma tables support is likely to be broken here + * - Events processing is bound to the general emulation thread as SDL requires + * to PumpEvents() within the same thread as the one that called SetVideoMode(). + * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. + * - Backport hw cursor acceleration to Basilisk II? + * - Factor out code + */ + +#include "sysdeps.h" + +#include +#include +#include +#include +#include + +#ifdef WIN32 +#include /* alloca() */ +#endif + +#include "cpu_emulation.h" +#include "main.h" +#include "adb.h" +#include "macos_util.h" +#include "prefs.h" +#include "user_strings.h" +#include "video.h" +#include "video_defs.h" +#include "video_blit.h" +#include "vm_alloc.h" + +#define DEBUG 0 +#include "debug.h" + +// Supported video modes +using std::vector; +static vector VideoModes; + +// Display types +#ifdef SHEEPSHAVER +enum { + DISPLAY_WINDOW = DIS_WINDOW, // windowed display + DISPLAY_SCREEN = DIS_SCREEN // fullscreen display +}; +extern int display_type; // See enum above +#else +enum { + DISPLAY_WINDOW, // windowed display + DISPLAY_SCREEN // fullscreen display +}; +static int display_type = DISPLAY_WINDOW; // See enum above +#endif + +// Constants +#ifdef WIN32 +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#else +const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +#endif + + +// Global variables +static uint32 frame_skip; // Prefs items +static int16 mouse_wheel_mode; +static int16 mouse_wheel_lines; + +static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) +static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) +static uint32 the_buffer_size; // Size of allocated the_buffer + +static bool redraw_thread_active = false; // Flag: Redraw thread installed +#ifndef USE_CPU_EMUL_SERVICES +static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread +static SDL_Thread *redraw_thread = NULL; // Redraw thread +static volatile bool thread_stop_req = false; +static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req +#endif + +#ifdef ENABLE_VOSF +static bool use_vosf = false; // Flag: VOSF enabled +#else +static const bool use_vosf = false; // VOSF not possible +#endif + +static bool ctrl_down = false; // Flag: Ctrl key pressed +static bool caps_on = false; // Flag: Caps Lock on +static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread +static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread +static bool emul_suspended = false; // Flag: Emulator suspended + +static bool classic_mode = false; // Flag: Classic Mac video mode + +static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms +static int keycode_table[256]; // X keycode -> Mac keycode translation table + +// SDL variables +static int screen_depth; // Depth of current screen +static SDL_Cursor *sdl_cursor; // Copy of Mac cursor +static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table +static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors +static bool toggle_fullscreen = false; +static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; + +static bool mouse_grabbed = false; + +// Mutex to protect SDL events +static SDL_mutex *sdl_events_lock = NULL; +#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) +#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) + +// Mutex to protect palette +static SDL_mutex *sdl_palette_lock = NULL; +#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) +#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) + +// Mutex to protect frame buffer +static SDL_mutex *frame_buffer_lock = NULL; +#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) +#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) + +// Video refresh function +static void VideoRefreshInit(void); +static void (*video_refresh)(void); + + +// Prototypes +static int redraw_func(void *arg); + +// From sys_unix.cpp +extern void SysMountFirstFloppy(void); + + +/* + * SDL surface locking glue + */ + +#ifdef ENABLE_VOSF +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ + if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ + the_host_buffer = (uint8 *)(SURFACE)->pixels; \ +} while (0) +#else +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) +#endif + +#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) { \ + SDL_LockSurface(SURFACE); \ + SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ + } \ +} while (0) + +#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) \ + SDL_UnlockSurface(SURFACE); \ +} while (0) + + +/* + * Framebuffer allocation routines + */ + +static void *vm_acquire_framebuffer(uint32 size) +{ + // always try to reallocate framebuffer at the same address + static void *fb = VM_MAP_FAILED; + if (fb != VM_MAP_FAILED) { +// if (vm_acquire_fixed(fb, size) < 0) { +#ifndef SHEEPSHAVER + printf("FATAL: Could not reallocate framebuffer at previous address\n"); +#endif + fb = VM_MAP_FAILED; +// } + } + if (fb == VM_MAP_FAILED) + fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); + return fb; +} + +static inline void vm_release_framebuffer(void *fb, uint32 size) +{ + vm_release(fb, size); +} + +static inline int get_customized_color_depth(int default_depth) +{ + int display_color_depth = PrefsFindInt32("displaycolordepth"); + + D(bug("Get displaycolordepth %d\n", display_color_depth)); + + if(0 == display_color_depth) + return default_depth; + else{ + switch (display_color_depth) { + case 8: + return VIDEO_DEPTH_8BIT; + case 15: case 16: + return VIDEO_DEPTH_16BIT; + case 24: case 32: + return VIDEO_DEPTH_32BIT; + default: + return default_depth; + } + } +} + +/* + * Windows message handler + */ + +#ifdef WIN32 +#include +static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL + +extern void SysMediaArrived(void); +extern void SysMediaRemoved(void); +extern HWND GetMainWindowHandle(void); + +static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) +{ + switch (msg) { + case WM_DEVICECHANGE: + if (wParam == DBT_DEVICEREMOVECOMPLETE) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaRemoved(); + } + else if (wParam == DBT_DEVICEARRIVAL) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaArrived(); + } + return 0; + + default: + if (sdl_window_proc) + return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); + } + + return DefWindowProc(hwnd, msg, wParam, lParam); +} +#endif + + +/* + * SheepShaver glue + */ + +#ifdef SHEEPSHAVER +// Color depth modes type +typedef int video_depth; + +// 1, 2, 4 and 8 bit depths use a color palette +static inline bool IsDirectMode(VIDEO_MODE const & mode) +{ + return IsDirectMode(mode.viAppleMode); +} + +// Abstract base class representing one (possibly virtual) monitor +// ("monitor" = rectangular display with a contiguous frame buffer) +class monitor_desc { +public: + monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} + virtual ~monitor_desc() {} + + // Get current Mac frame buffer base address + uint32 get_mac_frame_base(void) const {return screen_base;} + + // Set Mac frame buffer base address (called from switch_to_mode()) + void set_mac_frame_base(uint32 base) {screen_base = base;} + + // Get current video mode + const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} + + // Called by the video driver to switch the video mode on this display + // (must call set_mac_frame_base()) + virtual void switch_to_current_mode(void) = 0; + + // Called by the video driver to set the color palette (in indexed modes) + // or the gamma table (in direct modes) + virtual void set_palette(uint8 *pal, int num) = 0; +}; + +// Vector of pointers to available monitor descriptions, filled by VideoInit() +static vector VideoMonitors; + +// Find Apple mode matching best specified dimensions +static int find_apple_resolution(int xsize, int ysize) +{ + if (xsize == 640 && ysize == 480) + return APPLE_640x480; + if (xsize == 800 && ysize == 600) + return APPLE_800x600; + if (xsize == 1024 && ysize == 768) + return APPLE_1024x768; + if (xsize == 1152 && ysize == 768) + return APPLE_1152x768; + if (xsize == 1152 && ysize == 900) + return APPLE_1152x900; + if (xsize == 1280 && ysize == 1024) + return APPLE_1280x1024; + if (xsize == 1600 && ysize == 1200) + return APPLE_1600x1200; + return APPLE_CUSTOM; +} + +// Display error alert +static void ErrorAlert(int error) +{ + ErrorAlert(GetString(error)); +} +#endif + + +/* + * monitor_desc subclass for SDL display + */ + +class SDL_monitor_desc : public monitor_desc { +public: + SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} + ~SDL_monitor_desc() {} + + virtual void switch_to_current_mode(void); + virtual void set_palette(uint8 *pal, int num); + + bool video_open(void); + void video_close(void); +}; + + +/* + * Utility functions + */ + +// Find palette size for given color depth +static int palette_size(int mode) +{ + switch (mode) { + case VIDEO_DEPTH_1BIT: return 2; + case VIDEO_DEPTH_2BIT: return 4; + case VIDEO_DEPTH_4BIT: return 16; + case VIDEO_DEPTH_8BIT: return 256; + case VIDEO_DEPTH_16BIT: return 32; + case VIDEO_DEPTH_32BIT: return 256; + default: return 0; + } +} + +// Map video_mode depth ID to numerical depth value +static int mac_depth_of_video_depth(int video_depth) +{ + int depth = -1; + switch (video_depth) { + case VIDEO_DEPTH_1BIT: + depth = 1; + break; + case VIDEO_DEPTH_2BIT: + depth = 2; + break; + case VIDEO_DEPTH_4BIT: + depth = 4; + break; + case VIDEO_DEPTH_8BIT: + depth = 8; + break; + case VIDEO_DEPTH_16BIT: + depth = 16; + break; + case VIDEO_DEPTH_32BIT: + depth = 32; + break; + default: + abort(); + } + return depth; +} + +// Map video_mode depth ID to SDL screen depth +static int sdl_depth_of_video_depth(int video_depth) +{ + return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); +} + +// Get screen dimensions +static void sdl_display_dimensions(int &width, int &height) +{ + static int max_width, max_height; + if (max_width == 0 && max_height == 0) { + max_width = 640 ; max_height = 480; + SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); + if (modes && modes != (SDL_Rect **)-1) { + // It turns out that on some implementations, and contrary to the documentation, + // the returned list is not sorted from largest to smallest (e.g. Windows) + for (int i = 0; modes[i] != NULL; i++) { + const int w = modes[i]->w; + const int h = modes[i]->h; + if (w > max_width && h > max_height) { + max_width = w; + max_height = h; + } + } + } + } + width = max_width; + height = max_height; +} + +static inline int sdl_display_width(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return width; +} + +static inline int sdl_display_height(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return height; +} + +// Check wether specified mode is available +static bool has_mode(int type, int width, int height, int depth) +{ +#ifdef SHEEPSHAVER + // Filter out Classic resolutions + if (width == 512 && height == 384) + return false; +#endif + + // Filter out out-of-bounds resolutions + if (width > sdl_display_width() || height > sdl_display_height()) + return false; + + // Rely on SDL capabilities + return SDL_VideoModeOK(width, height, + sdl_depth_of_video_depth(depth), + SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; +} + +// Add mode to list of supported modes +static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) +{ + // Filter out unsupported modes + if (!has_mode(type, width, height, depth)) + return; + + // Fill in VideoMode entry + VIDEO_MODE mode; +#ifdef SHEEPSHAVER + resolution_id = find_apple_resolution(width, height); + mode.viType = type; +#endif + VIDEO_MODE_X = width; + VIDEO_MODE_Y = height; + VIDEO_MODE_RESOLUTION = resolution_id; + VIDEO_MODE_ROW_BYTES = bytes_per_row; + VIDEO_MODE_DEPTH = (video_depth)depth; + VideoModes.push_back(mode); +} + +// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + int layout = FLAYOUT_DIRECT; + if (depth == VIDEO_DEPTH_16BIT) + layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; + else if (depth == VIDEO_DEPTH_32BIT) + layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; + if (native_byte_order) + MacFrameLayout = layout; + else + MacFrameLayout = FLAYOUT_DIRECT; + monitor.set_mac_frame_base(MacFrameBaseMac); + + // Set variables used by UAE memory banking + const VIDEO_MODE &mode = monitor.get_current_mode(); + MacFrameBaseHost = the_buffer; + MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + InitFrameBufferMapping(); +#else + monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); +#endif + D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); +} + +// Set window name and class +static void set_window_name(int name) +{ + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + if (vi && vi->wm_available) { + const char *str = GetString(name); + SDL_WM_SetCaption(str, str); + } +} + +// Set mouse grab mode +static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) +{ + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); +} + +// Migrate preferences items (XXX to be handled in MigratePrefs()) +static void migrate_screen_prefs(void) +{ +#ifdef SHEEPSHAVER + // Look-up priorities are: "screen", "screenmodes", "windowmodes". + if (PrefsFindString("screen")) + return; + + uint32 window_modes = PrefsFindInt32("windowmodes"); + uint32 screen_modes = PrefsFindInt32("screenmodes"); + int width = 0, height = 0; + if (screen_modes) { + static const struct { + int id; + int width; + int height; + } + modes[] = { + { 1, 640, 480 }, + { 2, 800, 600 }, + { 4, 1024, 768 }, + { 64, 1152, 768 }, + { 8, 1152, 900 }, + { 16, 1280, 1024 }, + { 32, 1600, 1200 }, + { 0, } + }; + for (int i = 0; modes[i].id != 0; i++) { + if (screen_modes & modes[i].id) { + if (width < modes[i].width && height < modes[i].height) { + width = modes[i].width; + height = modes[i].height; + } + } + } + } else { + if (window_modes & 1) + width = 640, height = 480; + if (window_modes & 2) + width = 800, height = 600; + } + if (width && height) { + char str[32]; + sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); + PrefsReplaceString("screen", str); + } +#endif +} + + +/* + * Display "driver" classes + */ + +class driver_base { +public: + driver_base(SDL_monitor_desc &m); + ~driver_base(); + + void init(); // One-time init + void set_video_mode(int flags); + void adapt_to_video_mode(); + + void update_palette(void); + void suspend(void) {} + void resume(void) {} + void toggle_mouse_grab(void); + void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } + + void disable_mouse_accel(void); + void restore_mouse_accel(void); + + void grab_mouse(void); + void ungrab_mouse(void); + +public: + SDL_monitor_desc &monitor; // Associated video monitor + const VIDEO_MODE &mode; // Video mode handled by the driver + + bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) + SDL_Surface *s; // The surface we draw into +}; + +#ifdef ENABLE_VOSF +static void update_display_window_vosf(driver_base *drv); +#endif +static void update_display_static(driver_base *drv); + +static driver_base *drv = NULL; // Pointer to currently used driver object + +#ifdef ENABLE_VOSF +# include "video_vosf.h" +#endif + +driver_base::driver_base(SDL_monitor_desc &m) + : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) +{ + the_buffer = NULL; + the_buffer_copy = NULL; +} + +void driver_base::set_video_mode(int flags) +{ + int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, + SDL_HWSURFACE | flags)) == NULL) + return; +#ifdef ENABLE_VOSF + the_host_buffer = (uint8 *)s->pixels; +#endif +} + +void driver_base::init() +{ + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + int aligned_height = (VIDEO_MODE_Y + 15) & ~15; + +#ifdef ENABLE_VOSF + use_vosf = true; + // Allocate memory for frame buffer (SIZE is extended to page-boundary) + the_buffer_size = page_extend((aligned_height + 2) * s->pitch); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + the_buffer_copy = (uint8 *)malloc(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + + // Check whether we can initialize the VOSF subsystem and it's profitable + if (!video_vosf_init(monitor)) { + WarningAlert(GetString(STR_VOSF_INIT_ERR)); + use_vosf = false; + } + else if (!video_vosf_profitable()) { + video_vosf_exit(); + printf("VOSF acceleration is not profitable on this platform, disabling it\n"); + use_vosf = false; + } + if (!use_vosf) { + free(the_buffer_copy); + vm_release(the_buffer, the_buffer_size); + the_host_buffer = NULL; + } +#endif + if (!use_vosf) { + // Allocate memory for frame buffer + the_buffer_size = (aligned_height + 2) * s->pitch; + the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); + } + + // Set frame buffer base + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); + + adapt_to_video_mode(); +} + +void driver_base::adapt_to_video_mode() { + ADBSetRelMouseMode(mouse_grabbed); + + // Init blitting routines + SDL_PixelFormat *f = s->format; + VisualFormat visualFormat; + visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + visualFormat.Rmask = f->Rmask; + visualFormat.Gmask = f->Gmask; + visualFormat.Bmask = f->Bmask; + Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); + + // Load gray ramp to 8->16/32 expand map + if (!IsDirectMode(mode)) + for (int i=0; i<256; i++) + ExpandMap[i] = SDL_MapRGB(f, i, i, i); + + + bool hardware_cursor = false; +#ifdef SHEEPSHAVER + hardware_cursor = video_can_change_cursor(); + if (hardware_cursor) { + // Create cursor + if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { + SDL_SetCursor(sdl_cursor); + } + } + // Tell the video driver there's a change in cursor type + if (private_data) + private_data->cursorHardware = hardware_cursor; +#endif + // Hide cursor + SDL_ShowCursor(hardware_cursor); + + // Set window name/class + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + + // Everything went well + init_ok = true; +} + +driver_base::~driver_base() +{ + ungrab_mouse(); + restore_mouse_accel(); + + if (s) + SDL_FreeSurface(s); + + // the_buffer shall always be mapped through vm_acquire_framebuffer() + if (the_buffer != VM_MAP_FAILED) { + D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); + vm_release_framebuffer(the_buffer, the_buffer_size); + the_buffer = NULL; + } + + // Free frame buffer(s) + if (!use_vosf) { + if (the_buffer_copy) { + free(the_buffer_copy); + the_buffer_copy = NULL; + } + } +#ifdef ENABLE_VOSF + else { + if (the_buffer_copy) { + D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); + free(the_buffer_copy); + the_buffer_copy = NULL; + } + + // Deinitialize VOSF + video_vosf_exit(); + } +#endif + + SDL_ShowCursor(1); +} + +// Palette has changed +void driver_base::update_palette(void) +{ + const VIDEO_MODE &mode = monitor.get_current_mode(); + + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) + SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); +} + +// Disable mouse acceleration +void driver_base::disable_mouse_accel(void) +{ +} + +// Restore mouse acceleration to original value +void driver_base::restore_mouse_accel(void) +{ +} + +// Toggle mouse grab +void driver_base::toggle_mouse_grab(void) +{ + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); +} + +// Grab mouse, switch to relative mouse mode +void driver_base::grab_mouse(void) +{ + if (!mouse_grabbed) { + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); + if (new_mode == SDL_GRAB_ON) { + set_window_name(STR_WINDOW_TITLE_GRABBED); + disable_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = true); + } + } +} + +// Ungrab mouse, switch to absolute mouse mode +void driver_base::ungrab_mouse(void) +{ + if (mouse_grabbed) { + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); + if (new_mode == SDL_GRAB_OFF) { + set_window_name(STR_WINDOW_TITLE); + restore_mouse_accel(); + ADBSetRelMouseMode(mouse_grabbed = false); + } + } +} + +/* + * Initialization + */ + +// Init keycode translation table +static void keycode_init(void) +{ + bool use_kc = PrefsFindBool("keycodes"); + if (use_kc) { + + // Get keycode file path from preferences + const char *kc_path = PrefsFindString("keycodefile"); + + // Open keycode table + FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + if (f == NULL) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); + WarningAlert(str); + return; + } + + // Default translation table + for (int i=0; i<256; i++) + keycode_table[i] = -1; + + // Search for server vendor string, then read keycodes + char video_driver[256]; + SDL_VideoDriverName(video_driver, sizeof(video_driver)); + bool video_driver_found = false; + char line[256]; + int n_keys = 0; + while (fgets(line, sizeof(line) - 1, f)) { + // Read line + int len = strlen(line); + if (len == 0) + continue; + line[len-1] = 0; + + // Comments begin with "#" or ";" + if (line[0] == '#' || line[0] == ';' || line[0] == 0) + continue; + + if (video_driver_found) { + // Skip aliases as long as we have read keycodes yet + // Otherwise, it's another mapping and we have to stop + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) + continue; + + // Read keycode + int x_code, mac_code; + if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) + keycode_table[x_code & 0xff] = mac_code, n_keys++; + else + break; + } else { + // Search for SDL video driver string + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { + char *p = line + sizeof(sdl_str); + if (strstr(video_driver, p) == video_driver) + video_driver_found = true; + } + } + } + + // Keycode file completely read + fclose(f); + use_keycodes = video_driver_found; + + // Vendor not found? Then display warning + if (!video_driver_found) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); + WarningAlert(str); + return; + } + + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); + } +} + +// Open display for current mode +bool SDL_monitor_desc::video_open(void) +{ + D(bug("video_open()\n")); +#if DEBUG + const VIDEO_MODE &mode = get_current_mode(); + D(bug("Current video mode:\n")); + D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); +#endif + + // Create display driver object of requested type + drv = new(std::nothrow) driver_base(*this); + if (drv == NULL) + return false; + drv->init(); + if (!drv->init_ok) { + delete drv; + drv = NULL; + return false; + } + +#ifdef WIN32 + // Chain in a new message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); +#endif + + // Initialize VideoRefresh function + VideoRefreshInit(); + + // Lock down frame buffer + LOCK_FRAME_BUFFER; + + // Start redraw/input thread +#ifndef USE_CPU_EMUL_SERVICES + redraw_thread_cancel = false; + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); + if (!redraw_thread_active) { + printf("FATAL: cannot create redraw thread\n"); + return false; + } +#else + redraw_thread_active = true; +#endif + return true; +} + +#ifdef SHEEPSHAVER +bool VideoInit(void) +{ + const bool classic = false; +#else +bool VideoInit(bool classic) +{ +#endif + classic_mode = classic; + +#ifdef ENABLE_VOSF + // Zero the mainBuffer structure + mainBuffer.dirtyPages = NULL; + mainBuffer.pageInfo = NULL; +#endif + + // Create Mutexes + if ((sdl_events_lock = SDL_CreateMutex()) == NULL) + return false; + if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) + return false; + if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) + return false; + + // Init keycode translation + keycode_init(); + + // Read prefs + frame_skip = PrefsFindInt32("frameskip"); + mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); + mouse_wheel_lines = PrefsFindInt32("mousewheellines"); + + // Get screen mode from preferences + migrate_screen_prefs(); + const char *mode_str = NULL; + if (classic_mode) + mode_str = "win/512/342"; + else + mode_str = PrefsFindString("screen"); + + // Determine display type and default dimensions + int default_width, default_height; + if (classic) { + default_width = 512; + default_height = 384; + } + else { + default_width = 640; + default_height = 480; + } + display_type = DISPLAY_WINDOW; + if (mode_str) { + if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_WINDOW; + else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_SCREEN; + } + if (default_width <= 0) + default_width = sdl_display_width(); + else if (default_width > sdl_display_width()) + default_width = sdl_display_width(); + if (default_height <= 0) + default_height = sdl_display_height(); + else if (default_height > sdl_display_height()) + default_height = sdl_display_height(); + + // Mac screen depth follows X depth + screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; + int default_depth; + switch (screen_depth) { + case 8: + default_depth = VIDEO_DEPTH_8BIT; + break; + case 15: case 16: + default_depth = VIDEO_DEPTH_16BIT; + break; + case 24: case 32: + default_depth = VIDEO_DEPTH_32BIT; + break; + default: + default_depth = VIDEO_DEPTH_1BIT; + break; + } + + // Initialize list of video modes to try + struct { + int w; + int h; + int resolution_id; + } + video_modes[] = { + { -1, -1, 0x80 }, + { 512, 384, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; + video_modes[0].w = default_width; + video_modes[0].h = default_height; + + // Construct list of supported modes + if (display_type == DISPLAY_WINDOW) { + if (classic) + add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); + else { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + } else if (display_type == DISPLAY_SCREEN) { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + if (w == 512 && h == 384) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + + if (VideoModes.empty()) { + ErrorAlert(STR_NO_XVISUAL_ERR); + return false; + } + + // Find requested default mode with specified dimensions + uint32 default_id; + std::vector::const_iterator i, end = VideoModes.end(); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + std::vector::const_iterator begin = VideoModes.begin(); + cur_mode = distance(begin, i); +#endif + break; + } + } + if (i == end) { // not found, use first available mode + const VIDEO_MODE & mode = VideoModes[0]; + default_depth = VIDEO_MODE_DEPTH; + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + cur_mode = 0; +#endif + } + +#ifdef SHEEPSHAVER + for (int i = 0; i < VideoModes.size(); i++) + VModes[i] = VideoModes[i]; + VideoInfo *p = &VModes[VideoModes.size()]; + p->viType = DIS_INVALID; // End marker + p->viRowBytes = 0; + p->viXsize = p->viYsize = 0; + p->viAppleMode = 0; + p->viAppleID = 0; +#endif + +#if DEBUG + D(bug("Available video modes:\n")); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + int bits = 1 << VIDEO_MODE_DEPTH; + if (bits == 16) + bits = 15; + else if (bits == 32) + bits = 24; + D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); + } +#endif + + int color_depth = get_customized_color_depth(default_depth); + + D(bug("Return get_customized_color_depth %d\n", color_depth)); + + // Create SDL_monitor_desc for this (the only) display + SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); + VideoMonitors.push_back(monitor); + + // Open display + return monitor->video_open(); +} + + +/* + * Deinitialization + */ + +// Close display +void SDL_monitor_desc::video_close(void) +{ + D(bug("video_close()\n")); + +#ifdef WIN32 + // Remove message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); +#endif + + // Stop redraw thread +#ifndef USE_CPU_EMUL_SERVICES + if (redraw_thread_active) { + redraw_thread_cancel = true; + SDL_WaitThread(redraw_thread, NULL); + } +#endif + redraw_thread_active = false; + + // Unlock frame buffer + UNLOCK_FRAME_BUFFER; + D(bug(" frame buffer unlocked\n")); + + // Close display + delete drv; + drv = NULL; +} + +void VideoExit(void) +{ + // Close displays + vector::iterator i, end = VideoMonitors.end(); + for (i = VideoMonitors.begin(); i != end; ++i) + dynamic_cast(*i)->video_close(); + + // Destroy locks + if (frame_buffer_lock) + SDL_DestroyMutex(frame_buffer_lock); + if (sdl_palette_lock) + SDL_DestroyMutex(sdl_palette_lock); + if (sdl_events_lock) + SDL_DestroyMutex(sdl_events_lock); +} + + +/* + * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) + */ + +void VideoQuitFullScreen(void) +{ + D(bug("VideoQuitFullScreen()\n")); + quit_full_screen = true; +} + +static void do_toggle_fullscreen(void) +{ +#ifndef USE_CPU_EMUL_SERVICES + // pause redraw thread + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; +#endif + + // save the mouse position + int x, y; + SDL_GetMouseState(&x, &y); + + // save the screen contents + SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, + drv->s->flags); + + // switch modes + display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW + : DISPLAY_SCREEN; + drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + drv->adapt_to_video_mode(); + + // reset the palette +#ifdef SHEEPSHAVER + video_set_palette(); +#endif + drv->update_palette(); + + // restore the screen contents + SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); + SDL_FreeSurface(tmp_surface); + SDL_UpdateRect(drv->s, 0, 0, 0, 0); + + // reset the video refresh handler + VideoRefreshInit(); + + // while SetVideoMode is happening, control key up may be missed + ADBKeyUp(0x36); + + // restore the mouse position + SDL_WarpMouse(x, y); + + // resume redraw thread + toggle_fullscreen = false; +#ifndef USE_CPU_EMUL_SERVICES + thread_stop_req = false; +#endif +} + +/* + * Mac VBL interrupt + */ + +/* + * Execute video VBL routine + */ + +#ifdef SHEEPSHAVER +void VideoVBL(void) +{ + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; + + // Execute video VBL + if (private_data != NULL && private_data->interruptsEnabled) + VSLDoInterruptService(private_data->vslServiceID); +} +#else +void VideoInterrupt(void) +{ + // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() + SDL_PumpEvents(); + + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; +} +#endif + + +/* + * Set palette + */ + +#ifdef SHEEPSHAVER +void video_set_palette(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 pal[256 * 3]; + for (int c = 0; c < n_colors; c++) { + pal[c*3 + 0] = mac_pal[c].red; + pal[c*3 + 1] = mac_pal[c].green; + pal[c*3 + 2] = mac_pal[c].blue; + } + monitor->set_palette(pal, n_colors); +} +#endif + +void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) +{ + const VIDEO_MODE &mode = get_current_mode(); + + // FIXME: how can we handle the gamma ramp? + if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) + return; + + LOCK_PALETTE; + + // Convert colors to XColor array + int num_out = 256; + bool stretch = false; + SDL_Color *p = sdl_palette; + for (int i=0; ir = pal[c*3 + 0] * 0x0101; + p->g = pal[c*3 + 1] * 0x0101; + p->b = pal[c*3 + 2] * 0x0101; + p++; + } + + // Recalculate pixel color expansion map + if (!IsDirectMode(mode)) { + for (int i=0; i<256; i++) { + int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) + ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); + } + +#ifdef ENABLE_VOSF + if (use_vosf) { + // We have to redraw everything because the interpretation of pixel values changed + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + } +#endif + } + + // Tell redraw thread to change palette + sdl_palette_changed = true; + + UNLOCK_PALETTE; +} + + +/* + * Switch video mode + */ + +#ifdef SHEEPSHAVER +int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) +{ + /* return if no mode change */ + if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && + (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; + + /* first find video mode in table */ + for (int i=0; VModes[i].viType != DIS_INVALID; i++) { + if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && + (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { + csSave->saveMode = ReadMacInt16(ParamPtr + csMode); + csSave->saveData = ReadMacInt32(ParamPtr + csData); + csSave->savePage = ReadMacInt16(ParamPtr + csPage); + + // Disable interrupts and pause redraw thread + DisableInterrupt(); + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; + + cur_mode = i; + monitor_desc *monitor = VideoMonitors[0]; + monitor->switch_to_current_mode(); + + WriteMacInt32(ParamPtr + csBaseAddr, screen_base); + csSave->saveBaseAddr=screen_base; + csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ + csSave->saveMode=VModes[cur_mode].viAppleMode; + + // Enable interrupts and resume redraw thread + thread_stop_req = false; + EnableInterrupt(); + return noErr; + } + } + return paramErr; +} +#endif + +void SDL_monitor_desc::switch_to_current_mode(void) +{ + // Close and reopen display + LOCK_EVENTS; + video_close(); + video_open(); + UNLOCK_EVENTS; + + if (drv == NULL) { + ErrorAlert(STR_OPEN_WINDOW_ERR); + QuitEmulator(); + } +} + + +/* + * Can we set the MacOS cursor image into the window? + */ + +#ifdef SHEEPSHAVER +bool video_can_change_cursor(void) +{ + if (display_type != DISPLAY_WINDOW) + return false; + +#if defined(__APPLE__) + static char driver[] = "Quartz?"; + static int quartzok = -1; + + if (quartzok < 0) { + if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) + quartzok = true; + else { + // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. + const SDL_version *vp = SDL_Linked_Version(); + int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); + quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); + } + } + + return quartzok; +#else + return true; +#endif +} +#endif + + +/* + * Set cursor image for window + */ + +#ifdef SHEEPSHAVER +void video_set_cursor(void) +{ + // Set new cursor image if it was changed + if (sdl_cursor) { + SDL_FreeCursor(sdl_cursor); + sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); + if (sdl_cursor) { + SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); + SDL_SetCursor(sdl_cursor); + + // XXX Windows apparently needs an extra mouse event to + // make the new cursor image visible. + // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the + // mouse, we have to put it back. + bool move = false; +#ifdef WIN32 + move = true; +#elif defined(__APPLE__) + move = mouse_grabbed; +#endif + if (move) { + int visible = SDL_ShowCursor(-1); + if (visible) { + int x, y; + SDL_GetMouseState(&x, &y); + SDL_WarpMouse(x, y); + } + } + } + } +} +#endif + + +/* + * Keyboard-related utilify functions + */ + +static bool is_modifier_key(SDL_KeyboardEvent const & e) +{ + switch (e.keysym.sym) { + case SDLK_NUMLOCK: + case SDLK_CAPSLOCK: + case SDLK_SCROLLOCK: + case SDLK_RSHIFT: + case SDLK_LSHIFT: + case SDLK_RCTRL: + case SDLK_LCTRL: + case SDLK_RALT: + case SDLK_LALT: + case SDLK_RMETA: + case SDLK_LMETA: + case SDLK_LSUPER: + case SDLK_RSUPER: + case SDLK_MODE: + case SDLK_COMPOSE: + return true; + } + return false; +} + +static bool is_ctrl_down(SDL_keysym const & ks) +{ + return ctrl_down || (ks.mod & KMOD_CTRL); +} + + +/* + * Translate key event to Mac keycode, returns -1 if no keycode was found + * and -2 if the key was recognized as a hotkey + */ + +static int kc_decode(SDL_keysym const & ks, bool key_down) +{ + switch (ks.sym) { + case SDLK_a: return 0x00; + case SDLK_b: return 0x0b; + case SDLK_c: return 0x08; + case SDLK_d: return 0x02; + case SDLK_e: return 0x0e; + case SDLK_f: return 0x03; + case SDLK_g: return 0x05; + case SDLK_h: return 0x04; + case SDLK_i: return 0x22; + case SDLK_j: return 0x26; + case SDLK_k: return 0x28; + case SDLK_l: return 0x25; + case SDLK_m: return 0x2e; + case SDLK_n: return 0x2d; + case SDLK_o: return 0x1f; + case SDLK_p: return 0x23; + case SDLK_q: return 0x0c; + case SDLK_r: return 0x0f; + case SDLK_s: return 0x01; + case SDLK_t: return 0x11; + case SDLK_u: return 0x20; + case SDLK_v: return 0x09; + case SDLK_w: return 0x0d; + case SDLK_x: return 0x07; + case SDLK_y: return 0x10; + case SDLK_z: return 0x06; + + case SDLK_1: case SDLK_EXCLAIM: return 0x12; + case SDLK_2: case SDLK_AT: return 0x13; + case SDLK_3: case SDLK_HASH: return 0x14; + case SDLK_4: case SDLK_DOLLAR: return 0x15; + case SDLK_5: return 0x17; + case SDLK_6: return 0x16; + case SDLK_7: return 0x1a; + case SDLK_8: return 0x1c; + case SDLK_9: return 0x19; + case SDLK_0: return 0x1d; + + case SDLK_BACKQUOTE: return 0x0a; + case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; + case SDLK_EQUALS: case SDLK_PLUS: return 0x18; + case SDLK_LEFTBRACKET: return 0x21; + case SDLK_RIGHTBRACKET: return 0x1e; + case SDLK_BACKSLASH: return 0x2a; + case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; + case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; + case SDLK_COMMA: case SDLK_LESS: return 0x2b; + case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; + case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; + + case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; + case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_SPACE: return 0x31; + case SDLK_BACKSPACE: return 0x33; + + case SDLK_DELETE: return 0x75; + case SDLK_INSERT: return 0x72; + case SDLK_HOME: case SDLK_HELP: return 0x73; + case SDLK_END: return 0x77; + case SDLK_PAGEUP: return 0x74; + case SDLK_PAGEDOWN: return 0x79; + + case SDLK_LCTRL: return 0x36; + case SDLK_RCTRL: return 0x36; + case SDLK_LSHIFT: return 0x38; + case SDLK_RSHIFT: return 0x38; +#if (defined(__APPLE__) && defined(__MACH__)) + case SDLK_LALT: return 0x3a; + case SDLK_RALT: return 0x3a; + case SDLK_LMETA: return 0x37; + case SDLK_RMETA: return 0x37; +#else + case SDLK_LALT: return 0x37; + case SDLK_RALT: return 0x37; + case SDLK_LMETA: return 0x3a; + case SDLK_RMETA: return 0x3a; +#endif + case SDLK_LSUPER: return 0x3a; // "Windows" key + case SDLK_RSUPER: return 0x3a; + case SDLK_MENU: return 0x32; + case SDLK_CAPSLOCK: return 0x39; + case SDLK_NUMLOCK: return 0x47; + + case SDLK_UP: return 0x3e; + case SDLK_DOWN: return 0x3d; + case SDLK_LEFT: return 0x3b; + case SDLK_RIGHT: return 0x3c; + + case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + + case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F2: return 0x78; + case SDLK_F3: return 0x63; + case SDLK_F4: return 0x76; + case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; + case SDLK_F6: return 0x61; + case SDLK_F7: return 0x62; + case SDLK_F8: return 0x64; + case SDLK_F9: return 0x65; + case SDLK_F10: return 0x6d; + case SDLK_F11: return 0x67; + case SDLK_F12: return 0x6f; + + case SDLK_PRINT: return 0x69; + case SDLK_SCROLLOCK: return 0x6b; + case SDLK_PAUSE: return 0x71; + + case SDLK_KP0: return 0x52; + case SDLK_KP1: return 0x53; + case SDLK_KP2: return 0x54; + case SDLK_KP3: return 0x55; + case SDLK_KP4: return 0x56; + case SDLK_KP5: return 0x57; + case SDLK_KP6: return 0x58; + case SDLK_KP7: return 0x59; + case SDLK_KP8: return 0x5b; + case SDLK_KP9: return 0x5c; + case SDLK_KP_PERIOD: return 0x41; + case SDLK_KP_PLUS: return 0x45; + case SDLK_KP_MINUS: return 0x4e; + case SDLK_KP_MULTIPLY: return 0x43; + case SDLK_KP_DIVIDE: return 0x4b; + case SDLK_KP_ENTER: return 0x4c; + case SDLK_KP_EQUALS: return 0x51; + } + D(bug("Unhandled SDL keysym: %d\n", ks.sym)); + return -1; +} + +static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) +{ + return kc_decode(ev.keysym, key_down); +} + +static void force_complete_window_refresh() +{ + if (display_type == DISPLAY_WINDOW) { +#ifdef ENABLE_VOSF + if (use_vosf) { // VOSF refresh + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + } +#endif + // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. + const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); + const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + for (int i = 0; i < len; i++) + the_buffer_copy[i] = !the_buffer[i]; + } +} + +/* + * SDL event handling + */ + +static void handle_events(void) +{ + SDL_Event events[10]; + const int n_max_events = sizeof(events) / sizeof(events[0]); + int n_events; + + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { + for (int i = 0; i < n_events; i++) { + SDL_Event const & event = events[i]; + switch (event.type) { + + // Mouse button + case SDL_MOUSEBUTTONDOWN: { + unsigned int button = event.button.button; + if (button == SDL_BUTTON_LEFT) + ADBMouseDown(0); + else if (button == SDL_BUTTON_RIGHT) + ADBMouseDown(1); + else if (button == SDL_BUTTON_MIDDLE) + ADBMouseDown(2); + else if (button < 6) { // Wheel mouse + if (mouse_wheel_mode == 0) { + int key = (button == 5) ? 0x79 : 0x74; // Page up/down + ADBKeyDown(key); + ADBKeyUp(key); + } else { + int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down + for(int i=0; imouse_moved(event.motion.xrel, event.motion.yrel); + } else { + drv->mouse_moved(event.motion.x, event.motion.y); + } + break; + + // Keyboard + case SDL_KEYDOWN: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, true); + if (code >= 0) { + if (!emul_suspended) { + if (code == 0x39) { // Caps Lock pressed + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyDown(code); + if (code == 0x36) + ctrl_down = true; + } else { + if (code == 0x31) + drv->resume(); // Space wakes us up + } + } + break; + } + case SDL_KEYUP: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, false); + if (code >= 0) { + if (code == 0x39) { // Caps Lock released + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyUp(code); + if (code == 0x36) + ctrl_down = false; + } + break; + } + + // Hidden parts exposed, force complete refresh of window + case SDL_VIDEOEXPOSE: + force_complete_window_refresh(); + break; + + // Window "close" widget clicked + case SDL_QUIT: + ADBKeyDown(0x7f); // Power key + ADBKeyUp(0x7f); + break; + + // Application activate/deactivate + case SDL_ACTIVEEVENT: + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + if (event.active.gain && (event.active.state & SDL_APPACTIVE)) + force_complete_window_refresh(); + break; + } + } + } +} + + +/* + * Window display update + */ + +// Static display update (fixed frame rate, but incremental) +static void update_display_static(driver_base *drv) +{ + // Incremental update code + int wide = 0, high = 0; + uint32 x1, x2, y1, y2; + const VIDEO_MODE &mode = drv->mode; + int bytes_per_row = VIDEO_MODE_ROW_BYTES; + uint8 *p, *p2; + + // Check for first line from top and first line from bottom that have changed + y1 = 0; + for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y1 = j; + break; + } + } + y2 = y1 - 1; + for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y2 = j; + break; + } + } + high = y2 - y1 + 1; + + // Check for first column from left and first column from right that have changed + if (high) { + if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { + const int src_bytes_per_row = bytes_per_row; + const int dst_bytes_per_row = drv->s->pitch; + const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; + + x1 = VIDEO_MODE_X / pixels_per_byte; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1; i++) { + if (*p != *p2) { + x1 = i; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { + p--; p2--; + if (*p != *p2) { + x2 = i; + break; + } + } + } + x1 *= pixels_per_byte; + x2 *= pixels_per_byte; + wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); + int di = y1 * dst_bytes_per_row + x1; + for (uint32 j = y1; j <= y2; j++) { + memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); + Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); + si += src_bytes_per_row; + di += dst_bytes_per_row; + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + SDL_UpdateRect(drv->s, x1, y1, wide, high); + } + + } else { + const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; + const int dst_bytes_per_row = drv->s->pitch; + + x1 = VIDEO_MODE_X; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { + if (*p != *p2) { + x1 = i / bytes_per_pixel; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { + p--; + p2--; + if (*p != *p2) { + x2 = i / bytes_per_pixel; + break; + } + } + } + wide = x2 - x1; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + for (uint32 j = y1; j <= y2; j++) { + uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; + int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; + memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); + Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + SDL_UpdateRect(drv->s, x1, y1, wide, high); + } + } + } +} + +// Static display update (fixed frame rate, bounding boxes based) +// XXX use NQD bounding boxes to help detect dirty areas? +static void update_display_static_bbox(driver_base *drv) +{ + const VIDEO_MODE &mode = drv->mode; + + // Allocate bounding boxes for SDL_UpdateRects() + const uint32 N_PIXELS = 64; + const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; + const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; + SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); + uint32 nr_boxes = 0; + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Update the surface from Mac screen + const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; + const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; + const uint32 dst_bytes_per_row = drv->s->pitch; + for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { + uint32 h = N_PIXELS; + if (h > VIDEO_MODE_Y - y) + h = VIDEO_MODE_Y - y; + for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { + uint32 w = N_PIXELS; + if (w > VIDEO_MODE_X - x) + w = VIDEO_MODE_X - x; + const int xs = w * bytes_per_pixel; + const int xb = x * bytes_per_pixel; + bool dirty = false; + for (uint32 j = y; j < (y + h); j++) { + const uint32 yb = j * bytes_per_row; + const uint32 dst_yb = j * dst_bytes_per_row; + if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { + memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); + Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); + dirty = true; + } + } + if (dirty) { + boxes[nr_boxes].x = x; + boxes[nr_boxes].y = y; + boxes[nr_boxes].w = w; + boxes[nr_boxes].h = h; + nr_boxes++; + } + } + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + if (nr_boxes) + SDL_UpdateRects(drv->s, nr_boxes, boxes); +} + + +// We suggest the compiler to inline the next two functions so that it +// may specialise the code according to the current screen depth and +// display type. A clever compiler would do that job by itself though... + +// NOTE: update_display_vosf is inlined too + +static inline void possibly_quit_dga_mode() +{ + // Quit DGA mode if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + delete drv; + drv = NULL; + } +} + +static inline void possibly_ungrab_mouse() +{ + // Ungrab mouse if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + if (drv) + drv->ungrab_mouse(); + } +} + +static inline void handle_palette_changes(void) +{ + LOCK_PALETTE; + + if (sdl_palette_changed) { + sdl_palette_changed = false; + drv->update_palette(); + } + + UNLOCK_PALETTE; +} + +static void video_refresh_window_static(void); + +static void video_refresh_dga(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + video_refresh_window_static(); +} + +#ifdef ENABLE_VOSF +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static void video_refresh_dga_vosf(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_dga_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif + +static void video_refresh_window_vosf(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_window_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif // def ENABLE_VOSF + +static void video_refresh_window_static(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (static variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + const VIDEO_MODE &mode = drv->mode; + if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) + update_display_static_bbox(drv); + else + update_display_static(drv); + } +} + + +/* + * Thread for screen refresh, input handling etc. + */ + +static void VideoRefreshInit(void) +{ + // TODO: set up specialised 8bpp VideoRefresh handlers ? + if (display_type == DISPLAY_SCREEN) { +#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) + if (use_vosf) + video_refresh = video_refresh_dga_vosf; + else +#endif + video_refresh = video_refresh_dga; + } + else { +#ifdef ENABLE_VOSF + if (use_vosf) + video_refresh = video_refresh_window_vosf; + else +#endif + video_refresh = video_refresh_window_static; + } +} + +static inline void do_video_refresh(void) +{ + // Handle SDL events + handle_events(); + + // Update display + video_refresh(); + + + // Set new palette if it was changed + handle_palette_changes(); +} + +// This function is called on non-threaded platforms from a timer interrupt +void VideoRefresh(void) +{ + // We need to check redraw_thread_active to inhibit refreshed during + // mode changes on non-threaded platforms + if (!redraw_thread_active) + return; + + // Process pending events and update display + do_video_refresh(); +} + +const int VIDEO_REFRESH_HZ = 60; +const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; + +#ifndef USE_CPU_EMUL_SERVICES +static int redraw_func(void *arg) +{ + uint64 start = GetTicks_usec(); + int64 ticks = 0; + uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; + + while (!redraw_thread_cancel) { + + // Wait + next += VIDEO_REFRESH_DELAY; + int32 delay = int32(next - GetTicks_usec()); + if (delay > 0) + Delay_usec(delay); + else if (delay < -VIDEO_REFRESH_DELAY) + next = GetTicks_usec(); + ticks++; + + // Pause if requested (during video mode switches) + if (thread_stop_req) { + thread_stop_ack = true; + continue; + } + + // Process pending events and update display + do_video_refresh(); + } + + uint64 end = GetTicks_usec(); + D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); + return 0; +} +#endif + + +/* + * Record dirty area from NQD + */ + +#ifdef SHEEPSHAVER +void video_set_dirty_area(int x, int y, int w, int h) +{ +#ifdef ENABLE_VOSF + const VIDEO_MODE &mode = drv->mode; + const unsigned screen_width = VIDEO_MODE_X; + const unsigned screen_height = VIDEO_MODE_Y; + const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; + + if (use_vosf) { + vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); + return; + } +#endif + + // XXX handle dirty bounding boxes for non-VOSF modes +} +#endif diff --git a/SheepShaver/src/Unix/Darwin/lowmem.c b/SheepShaver/src/Unix/Darwin/lowmem.c new file mode 100755 index 000000000..a40a36613 --- /dev/null +++ b/SheepShaver/src/Unix/Darwin/lowmem.c @@ -0,0 +1,254 @@ +/* + * lowmem.c - enable access to low memory globals on Darwin + * + * Copyright (c) 2003 Michael Z. Sliczniak + * + * Basilisk II (C) 1997-2005 Christian Bauer + * + * 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 +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +static const char progname[] = "lowmem"; +static const char *filename; + +static int do_swap = 0; + +static uint32_t target_uint32(uint32_t value) +{ + if (do_swap) + value = OSSwapInt32(value); + return value; +} + +void pagezero_32(struct mach_header *machhead) +{ + struct segment_command *sc_cmd; + + if (target_uint32(machhead->filetype) != MH_EXECUTE) { + (void)fprintf(stderr, "%s: %s does not appear to be an executable file\n", + progname, filename); + exit(1); + } + if (machhead->ncmds == 0) { + (void)fprintf(stderr, "%s: %s does not contain any load commands\n", + progname, filename); + exit(1); + } + sc_cmd = (void *)&machhead[1]; + if (target_uint32(sc_cmd->cmd) != LC_SEGMENT){ + (void)fprintf(stderr, "%s: load segment not first command in %s\n", + progname, filename); + exit(1); + } + if (strncmp(sc_cmd->segname, "__PAGEZERO", sizeof (*sc_cmd->segname))) { + (void)fprintf(stderr, "%s: zero page not first segment in %s\n", + progname, filename); + exit(1); + } + /* change the permissions */ + sc_cmd->maxprot = target_uint32(VM_PROT_ALL); + sc_cmd->initprot = target_uint32(VM_PROT_ALL); + +#ifdef MH_PIE + /* disable pie in header */ + machhead->flags = target_uint32(target_uint32(machhead->flags) & ~MH_PIE); +#endif +} + +#if defined(MH_MAGIC_64) +void pagezero_64(struct mach_header_64 *machhead) +{ + struct segment_command_64 *sc_cmd; + + if (target_uint32(machhead->filetype) != MH_EXECUTE) { + (void)fprintf(stderr, "%s: %s does not appear to be an executable file\n", + progname, filename); + exit(1); + } + if (machhead->ncmds == 0) { + (void)fprintf(stderr, "%s: %s does not contain any load commands\n", + progname, filename); + exit(1); + } + sc_cmd = (void *)&machhead[1]; + if (target_uint32(sc_cmd->cmd) != LC_SEGMENT_64) { + (void)fprintf(stderr, "%s: load segment not first command in %s\n", + progname, filename); + exit(1); + } + if (strncmp(sc_cmd->segname, "__PAGEZERO", sizeof(*sc_cmd->segname))) { + (void)fprintf(stderr, "%s: zero page not first segment in %s\n", + progname, filename); + exit(1); + } + /* change the permissions */ +// sc_cmd->maxprot = target_uint32(VM_PROT_ALL); +// sc_cmd->initprot = target_uint32(VM_PROT_ALL); +} +#endif + +/* + * Under Mach there is very little assumed about the memory map of object + * files. It is the job of the loader to create the initial memory map of an + * executable. In a Mach-O executable there will be numerous loader commands + * that the loader must process. Some of these will create the initial memory + * map used by the executable. Under Darwin the static object file linker, + * ld, automatically adds the __PAGEZERO segment to all executables. The + * default size of this segment is the page size of the target system and + * the initial and maximum permissions are set to allow no access. This is so + * that all programs fault on a NULL pointer dereference. Arguably this is + * incorrect and the maximum permissions shoould be rwx so that programs can + * change this default behavior. Then programs could be written that assume + * a null string at the null address, which was the convention on some + * systems. In our case we need to have 8K mapped at zero for the low memory + * globals and this program modifies the segment load command in the + * basiliskII executable so that it can be used for data. + */ + +int +main(int argc, const char *argv[]) +{ + int fd; + char *addr; + size_t file_size; + struct mach_header *machhead; +#if defined(MH_MAGIC_64) + struct mach_header_64 *machhead64; +#endif + struct fat_header *fathead; + struct stat f; + + if (argc != 2) { + (void)fprintf(stderr, "Usage: %s executable\n", progname); + exit(1); + } + + filename = argv[1]; + + if (stat(filename, &f)) { + (void)fprintf(stderr, "%s: could not stat %s: %s\n", + progname, filename, strerror(errno)); + exit(1); + } + file_size = (size_t) f.st_size; + + fd = open(filename, O_RDWR, 0); + if (fd == -1) { + (void)fprintf(stderr, "%s: could not open %s: %s\n", + progname, filename, strerror(errno)); + exit(1); + } + + /* + * Size does not really matter, it will be rounded-up to a multiple + * of the page size automatically. + */ + addr = mmap(NULL, file_size, PROT_READ | PROT_WRITE, + MAP_FILE | MAP_SHARED, fd, 0); + if (addr == NULL || addr == MAP_FAILED) { + (void)fprintf(stderr, "%s: could not mmap %s: %s\n", + progname, filename, strerror(errno)); + exit(1); + } + + /* + * Check to see if the Mach-O magic bytes are in the header. + */ + machhead = (void *)addr; +#if defined(MH_MAGIC_64) + machhead64 = (void *)addr; +#endif + fathead = (void *)addr; + +#if defined(MH_MAGIC_64) + do_swap = machhead->magic == MH_CIGAM || fathead->magic == FAT_CIGAM || machhead64->magic == MH_CIGAM_64; +#else + do_swap = machhead->magic == MH_CIGAM || fathead->magic == FAT_CIGAM; +#endif + + if (target_uint32(machhead->magic) == MH_MAGIC) { + pagezero_32(machhead); +#if defined(MH_MAGIC_64) + } else if (target_uint32(machhead64->magic) == MH_MAGIC_64) { + pagezero_64(machhead64); +#endif + } else if (target_uint32(fathead->magic) == FAT_MAGIC) { + struct fat_arch *arch = (void *)&fathead[1]; + int saved_swap = do_swap; + int i; + for (i = 0; i < target_uint32(fathead->nfat_arch); ++i, ++arch) { + machhead = (void *)(addr + target_uint32(arch->offset)); +#if defined(MH_MAGIC_64) + machhead64 = (void *)(addr + target_uint32(arch->offset)); +#endif +#if defined(MH_MAGIC_64) + do_swap = machhead->magic == MH_CIGAM || machhead64->magic == MH_CIGAM_64; +#else + do_swap = machhead->magic == MH_CIGAM; +#endif + if (target_uint32(machhead->magic) == MH_MAGIC) { + pagezero_32(machhead); +#if defined(MH_MAGIC_64) + } else if (target_uint32(machhead64->magic) == MH_MAGIC_64) { + pagezero_64(machhead64); +#endif + } else { + (void)fprintf(stderr, "%s: %s does not appear to be a Mach-O object file\n", + progname, filename); + exit(1); + } + do_swap = saved_swap; + } + } else { + (void)fprintf(stderr, "%s: %s does not appear to be a Mach-O object file\n", + progname, filename); + exit(1); + } + + /* + * We do not make __PAGEZERO 8K in this program because then + * all of the offsets would be wrong in the object file after + * this segment. Instead we use the -pagezero_size option + * to link the executable. + */ + if (msync(addr, file_size, MS_SYNC) == -1) { + (void)fprintf(stderr, "%s: could not sync %s: %s\n", + progname, filename, strerror(errno)); + exit(1); + } + + if (munmap(addr, file_size) == -1) { + (void)fprintf(stderr, "%s: could not unmap %s: %s\n", + progname, filename, strerror(errno)); + exit(1); + } + + (void)close(fd); + + exit(0); +} From 956aebe9b3ed03147959ceea72220169ad216ede Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 22 Nov 2017 09:26:56 +0900 Subject: [PATCH 182/534] delete symlink --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 1 - 1 file changed, 1 deletion(-) delete mode 120000 SheepShaver/src/CrossPlatform/sigsegv.cpp diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp deleted file mode 120000 index a41f4a068..000000000 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/sigsegv.cpp \ No newline at end of file From 164935017b97eb2f1d39e566bd05ee428bf9099c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 22 Nov 2017 10:13:46 +0900 Subject: [PATCH 183/534] sigsegv copy from BasiliskII --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 3415 +++++++++++++++++++++ 1 file changed, 3415 insertions(+) create mode 100644 SheepShaver/src/CrossPlatform/sigsegv.cpp diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp new file mode 100644 index 000000000..f1322d1e7 --- /dev/null +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -0,0 +1,3415 @@ +/* + * sigsegv.cpp - SIGSEGV signals support + * + * Derived from Bruno Haible's work on his SIGSEGV library for clisp + * + * + * MacOS X support derived from the post by Timothy J. Wood to the + * omnigroup macosx-dev list: + * Mach Exception Handlers 101 (Was Re: ptrace, gdb) + * tjw@omnigroup.com Sun, 4 Jun 2000 + * www.omnigroup.com/mailman/archive/macosx-dev/2000-June/002030.html + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +#ifdef HAVE_UNISTD_H +#include +#endif + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include +#include +#include +#include "sigsegv.h" + +#ifndef NO_STD_NAMESPACE +using std::list; +#endif + +// Return value type of a signal handler (standard type if not defined) +#ifndef RETSIGTYPE +#define RETSIGTYPE void +#endif + +// Size of an unsigned integer large enough to hold all bits of a pointer +// NOTE: this can be different than SIGSEGV_REGISTER_TYPE. In +// particular, on ILP32 systems with a 64-bit kernel (HP-UX/ia64?) +#if defined(HAVE_WIN32_VM) +// Windows is either ILP32 or LLP64 +#include +typedef UINT_PTR sigsegv_uintptr_t; +#else +// Other systems are sane enough to follow ILP32 or LP64 models +typedef unsigned long sigsegv_uintptr_t; +#endif + +// Type of the system signal handler +typedef RETSIGTYPE (*signal_handler)(int); + +// User's SIGSEGV handler +static sigsegv_fault_handler_t sigsegv_fault_handler = 0; + +// Function called to dump state if we can't handle the fault +static sigsegv_state_dumper_t sigsegv_state_dumper = 0; + +#if defined(HAVE_SIGINFO_T) || defined(HAVE_SIGCONTEXT_SUBTERFUGE) +// Actual SIGSEGV handler installer +static bool sigsegv_do_install_handler(int sig); +#endif + +/* + * Instruction decoding aids + */ + +// Transfer type +enum transfer_type_t { + SIGSEGV_TRANSFER_UNKNOWN = 0, + SIGSEGV_TRANSFER_LOAD = 1, + SIGSEGV_TRANSFER_STORE = 2 +}; + +// Transfer size +enum transfer_size_t { + SIZE_UNKNOWN, + SIZE_BYTE, + SIZE_WORD, // 2 bytes + SIZE_LONG, // 4 bytes + SIZE_QUAD // 8 bytes +}; + +#if (defined(powerpc) || defined(__powerpc__) || defined(__ppc__) || defined(__ppc64__)) +// Addressing mode +enum addressing_mode_t { + MODE_UNKNOWN, + MODE_NORM, + MODE_U, + MODE_X, + MODE_UX +}; + +// Decoded instruction +struct instruction_t { + transfer_type_t transfer_type; + transfer_size_t transfer_size; + addressing_mode_t addr_mode; + unsigned int addr; + char ra, rd; +}; + +static void powerpc_decode_instruction(instruction_t *instruction, unsigned int nip, unsigned long * gpr) +{ + // Get opcode and divide into fields + unsigned int opcode = *((unsigned int *)(unsigned long)nip); + unsigned int primop = opcode >> 26; + unsigned int exop = (opcode >> 1) & 0x3ff; + unsigned int ra = (opcode >> 16) & 0x1f; + unsigned int rb = (opcode >> 11) & 0x1f; + unsigned int rd = (opcode >> 21) & 0x1f; + signed int imm = (signed short)(opcode & 0xffff); + + // Analyze opcode + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_UNKNOWN; + addressing_mode_t addr_mode = MODE_UNKNOWN; + switch (primop) { + case 31: + switch (exop) { + case 23: // lwzx + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_X; break; + case 55: // lwzux + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_UX; break; + case 87: // lbzx + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; + case 119: // lbzux + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; + case 151: // stwx + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_X; break; + case 183: // stwux + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_UX; break; + case 215: // stbx + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; + case 247: // stbux + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; + case 279: // lhzx + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; + case 311: // lhzux + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; + case 343: // lhax + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; + case 375: // lhaux + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; + case 407: // sthx + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; + case 439: // sthux + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; + } + break; + + case 32: // lwz + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_NORM; break; + case 33: // lwzu + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_U; break; + case 34: // lbz + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; + case 35: // lbzu + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; + case 36: // stw + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_NORM; break; + case 37: // stwu + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_U; break; + case 38: // stb + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; + case 39: // stbu + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; + case 40: // lhz + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; + case 41: // lhzu + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; + case 42: // lha + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; + case 43: // lhau + transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; + case 44: // sth + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; + case 45: // sthu + transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; + case 58: // ld, ldu, lwa + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + addr_mode = ((opcode & 3) == 1) ? MODE_U : MODE_NORM; + imm &= ~3; + break; + case 62: // std, stdu, stq + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_QUAD; + addr_mode = ((opcode & 3) == 1) ? MODE_U : MODE_NORM; + imm &= ~3; + break; + } + + // Calculate effective address + unsigned int addr = 0; + switch (addr_mode) { + case MODE_X: + case MODE_UX: + if (ra == 0) + addr = gpr[rb]; + else + addr = gpr[ra] + gpr[rb]; + break; + case MODE_NORM: + case MODE_U: + if (ra == 0) + addr = (signed int)(signed short)imm; + else + addr = gpr[ra] + (signed int)(signed short)imm; + break; + default: + break; + } + + // Commit decoded instruction + instruction->addr = addr; + instruction->addr_mode = addr_mode; + instruction->transfer_type = transfer_type; + instruction->transfer_size = transfer_size; + instruction->ra = ra; + instruction->rd = rd; +} +#endif + + +/* + * OS-dependant SIGSEGV signals support section + */ + +#if HAVE_SIGINFO_T +// Generic extended signal handler +#if defined(__hpux) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) FAULT_HANDLER(SIGBUS) +#else +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#endif +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, siginfo_t *sip, void *scp +#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 siginfo_t *sip, void *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sip, scp +#define SIGSEGV_FAULT_ADDRESS sip->si_addr +#if (defined(sgi) || defined(__sgi)) +#include +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) +#define SIGSEGV_FAULT_INSTRUCTION (unsigned long)SIGSEGV_CONTEXT_REGS[CTX_EPC] +#if (defined(mips) || defined(__mips)) +#define SIGSEGV_REGISTER_FILE &SIGSEGV_CONTEXT_REGS[CTX_EPC], &SIGSEGV_CONTEXT_REGS[CTX_R0] +#define SIGSEGV_SKIP_INSTRUCTION mips_skip_instruction +#endif +#endif +#if defined(__sun__) +#if (defined(sparc) || defined(__sparc__)) +#include +#include +#include +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[REG_PC] +#define SIGSEGV_SPARC_GWINDOWS (((ucontext_t *)scp)->uc_mcontext.gwins) +#define SIGSEGV_SPARC_RWINDOW (struct rwindow *)((char *)SIGSEGV_CONTEXT_REGS[REG_SP] + STACK_BIAS) +#define SIGSEGV_REGISTER_FILE ((unsigned long *)SIGSEGV_CONTEXT_REGS), SIGSEGV_SPARC_GWINDOWS, SIGSEGV_SPARC_RWINDOW +#define SIGSEGV_SKIP_INSTRUCTION sparc_skip_instruction +#endif +#if defined(__i386__) +#include +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[EIP] +#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#endif +#if defined(__FreeBSD__) || defined(__OpenBSD__) +#if (defined(i386) || defined(__i386__)) +#undef SIGSEGV_ALL_SIGNALS +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) +#define SIGSEGV_FAULT_INSTRUCTION (((struct sigcontext *)scp)->sc_eip) +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&(((struct sigcontext *)scp)->sc_edi)) /* EDI is the first GPR (even below EIP) in sigcontext */ +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#elif (defined(x86_64) || defined(__x86_64__)) +#define SIGSEGV_FAULT_INSTRUCTION (((struct sigcontext *)scp)->sc_rip) +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&(((struct sigcontext *)scp)->sc_rdi)) +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#endif +#if defined(__NetBSD__) +#if (defined(i386) || defined(__i386__)) +#include +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.__gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[_REG_EIP] +#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#if (defined(powerpc) || defined(__powerpc__)) +#include +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.__gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[_REG_PC] +#define SIGSEGV_REGISTER_FILE (unsigned long *)&SIGSEGV_CONTEXT_REGS[_REG_PC], (unsigned long *)&SIGSEGV_CONTEXT_REGS[_REG_R0] +#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction +#endif +#endif +#if defined(__linux__) +#if HAVE_ASM_UCONTEXT +#include /* use kernel structure, glibc may not be in sync */ +#else +#include +#endif +#if (defined(hppa) || defined(__hppa__)) +#undef SIGSEGV_FAULT_ADDRESS +#define SIGSEGV_FAULT_ADDRESS sip->si_ptr +#endif +#if (defined(i386) || defined(__i386__)) +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[14] /* should use REG_EIP instead */ +#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#elif (defined(x86_64) || defined(__x86_64__)) +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[16] /* should use REG_RIP instead */ +#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#elif (defined(ia64) || defined(__ia64__)) +#define SIGSEGV_CONTEXT_REGS ((struct sigcontext *)scp) +#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS->sc_ip & ~0x3ULL) /* slot number is in bits 0 and 1 */ +#define SIGSEGV_REGISTER_FILE SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ia64_skip_instruction +#elif (defined(powerpc) || defined(__powerpc__)) +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.regs) +#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS->nip) +#define SIGSEGV_REGISTER_FILE (unsigned long *)&SIGSEGV_CONTEXT_REGS->nip, (unsigned long *)(SIGSEGV_CONTEXT_REGS->gpr) +#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction +#elif (defined(arm) || defined(__arm__)) +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext) +#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS.arm_pc) +#define SIGSEGV_REGISTER_FILE (&SIGSEGV_CONTEXT_REGS.arm_r0) +#define SIGSEGV_SKIP_INSTRUCTION arm_skip_instruction +#elif (defined(mips) || defined(__mips__)) +#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext) +#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS.pc) +#define SIGSEGV_REGISTER_FILE &SIGSEGV_CONTEXT_REGS.pc, &SIGSEGV_CONTEXT_REGS.gregs[0] +#define SIGSEGV_SKIP_INSTRUCTION mips_skip_instruction +#endif +#endif // defined(__linux__) +#if (defined(__hpux) || defined(__hpux__)) +#if (defined(__hppa) || defined(__hppa__)) +#define SIGSEGV_CONTEXT_REGS (&((ucontext_t *)scp)->uc_mcontext) +#define SIGSEGV_FAULT_INSTRUCTION_32 (SIGSEGV_CONTEXT_REGS->ss_narrow.ss_pcoq_head & ~3ul) +#define SIGSEGV_FAULT_INSTRUCTION_64 (SIGSEGV_CONTEXT_REGS->ss_wide.ss_64.ss_pcoq_head & ~3ull) +#if defined(__LP64__) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_FAULT_INSTRUCTION_64 +#else +#define SIGSEGV_FAULT_INSTRUCTION ((SIGSEGV_CONTEXT_REGS->ss_flags & SS_WIDEREGS) ? \ + (uint32_t)SIGSEGV_FAULT_INSTRUCTION_64 : \ + SIGSEGV_FAULT_INSTRUCTION_32) +#endif +#endif +#if (defined(__ia64) || defined(__ia64__)) +#include +#define SIGSEGV_CONTEXT_REGS ((ucontext_t *)scp) +#define SIGSEGV_FAULT_INSTRUCTION get_fault_instruction(SIGSEGV_CONTEXT_REGS) +#define SIGSEGV_REGISTER_FILE SIGSEGV_CONTEXT_REGS +#define SIGSEGV_SKIP_INSTRUCTION ia64_skip_instruction + +#include +static inline sigsegv_address_t get_fault_instruction(const ucontext_t *ucp) +{ + uint64_t ip; + if (__uc_get_ip(ucp, &ip) != 0) + return SIGSEGV_INVALID_ADDRESS; + return (sigsegv_address_t)(ip & ~3ULL); +} +#endif +#endif +#endif + +#if HAVE_SIGCONTEXT_SUBTERFUGE +// Linux kernels prior to 2.4 ? +#if defined(__linux__) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#if (defined(i386) || defined(__i386__)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, struct sigcontext scs +#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS &scs +#define SIGSEGV_FAULT_ADDRESS scp->cr2 +#define SIGSEGV_FAULT_INSTRUCTION scp->eip +#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)scp +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#if (defined(sparc) || defined(__sparc__)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp, char *addr +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp, addr +#define SIGSEGV_FAULT_ADDRESS addr +#endif +#if (defined(powerpc) || defined(__powerpc__)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, scp +#define SIGSEGV_FAULT_ADDRESS scp->regs->dar +#define SIGSEGV_FAULT_INSTRUCTION scp->regs->nip +#define SIGSEGV_REGISTER_FILE (unsigned long *)&scp->regs->nip, (unsigned long *)(scp->regs->gpr) +#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction +#endif +#if (defined(alpha) || defined(__alpha__)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) +#define SIGSEGV_FAULT_INSTRUCTION scp->sc_pc +#endif +#if (defined(arm) || defined(__arm__)) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int r1, int r2, int r3, struct sigcontext sc +#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS &sc +#define SIGSEGV_FAULT_ADDRESS scp->fault_address +#define SIGSEGV_FAULT_INSTRUCTION scp->arm_pc +#define SIGSEGV_REGISTER_FILE &scp->arm_r0 +#define SIGSEGV_SKIP_INSTRUCTION arm_skip_instruction +#endif +#endif + +// Irix 5 or 6 on MIPS +#if (defined(sgi) || defined(__sgi)) && (defined(SYSTYPE_SVR4) || defined(_SYSTYPE_SVR4)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS (unsigned long)scp->sc_badvaddr +#define SIGSEGV_FAULT_INSTRUCTION (unsigned long)scp->sc_pc +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#endif + +// HP-UX +#if (defined(hpux) || defined(__hpux__)) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS scp->sc_sl.sl_ss.ss_narrow.ss_cr21 +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) FAULT_HANDLER(SIGBUS) +#endif + +// OSF/1 on Alpha +#if defined(__osf__) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS scp->sc_traparg_a0 +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#endif + +// AIX +#if defined(_AIX) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS scp->sc_jmpbuf.jmp_context.o_vaddr +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#endif + +// NetBSD +#if defined(__NetBSD__) +#if (defined(m68k) || defined(__m68k__)) +#include +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) + +// Use decoding scheme from BasiliskII/m68k native +static sigsegv_address_t get_fault_address(struct sigcontext *scp) +{ + struct sigstate { + int ss_flags; + struct frame ss_frame; + }; + struct sigstate *state = (struct sigstate *)scp->sc_ap; + char *fault_addr; + switch (state->ss_frame.f_format) { + case 7: /* 68040 access error */ + /* "code" is sometimes unreliable (i.e. contains NULL or a bogus address), reason unknown */ + fault_addr = state->ss_frame.f_fmt7.f_fa; + break; + default: + fault_addr = (char *)code; + break; + } + return (sigsegv_address_t)fault_addr; +} +#endif +#if (defined(alpha) || defined(__alpha__)) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) +#endif +#if (defined(i386) || defined(__i386__)) +#error "FIXME: need to decode instruction and compute EA" +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#endif +#endif +#if defined(__FreeBSD__) +#if (defined(i386) || defined(__i386__)) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp, char *addr +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp, addr +#define SIGSEGV_FAULT_ADDRESS addr +#define SIGSEGV_FAULT_INSTRUCTION scp->sc_eip +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&scp->sc_edi) +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#if (defined(alpha) || defined(__alpha__)) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, char *addr, struct sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, addr, scp +#define SIGSEGV_FAULT_ADDRESS addr +#define SIGSEGV_FAULT_INSTRUCTION scp->sc_pc +#endif +#endif + +// Extract fault address out of a sigcontext +#if (defined(alpha) || defined(__alpha__)) +// From Boehm's GC 6.0alpha8 +static sigsegv_address_t get_fault_address(struct sigcontext *scp) +{ + unsigned int instruction = *((unsigned int *)(scp->sc_pc)); + unsigned long fault_address = scp->sc_regs[(instruction >> 16) & 0x1f]; + fault_address += (signed long)(signed short)(instruction & 0xffff); + return (sigsegv_address_t)fault_address; +} +#endif + + +// MacOS X, not sure which version this works in. Under 10.1 +// vm_protect does not appear to work from a signal handler. Under +// 10.2 signal handlers get siginfo type arguments but the si_addr +// field is the address of the faulting instruction and not the +// address that caused the SIGBUS. Maybe this works in 10.0? In any +// case with Mach exception handlers there is a way to do what this +// was meant to do. +#ifndef HAVE_MACH_EXCEPTIONS +#if defined(__APPLE__) && defined(__MACH__) +#if (defined(ppc) || defined(__ppc__)) +#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct __darwin_sigcontext *scp +#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp +#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) +#define SIGSEGV_FAULT_INSTRUCTION scp->MACH_FIELD_NAME(sc_ir) +#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) +#define SIGSEGV_REGISTER_FILE (unsigned int *)&scp->sc_ir, &((unsigned int *) scp->sc_regs)[2] +#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction + +// Use decoding scheme from SheepShaver +static sigsegv_address_t get_fault_address(struct sigcontext *scp) +{ + unsigned int nip = (unsigned int) scp->MACH_FIELD_NAME(sc_ir); + unsigned int * gpr = &((unsigned int *) scp->MACH_FIELD_NAME(sc_regs))[2]; + instruction_t instr; + + powerpc_decode_instruction(&instr, nip, (long unsigned int*)gpr); + return (sigsegv_address_t)instr.addr; +} +#endif +#endif +#endif +#endif + +#if HAVE_WIN32_EXCEPTIONS +#define WIN32_LEAN_AND_MEAN /* avoid including junk */ +#include +#include + +#define SIGSEGV_FAULT_HANDLER_ARGLIST EXCEPTION_POINTERS *ExceptionInfo +#define SIGSEGV_FAULT_HANDLER_ARGS ExceptionInfo +#define SIGSEGV_FAULT_ADDRESS ExceptionInfo->ExceptionRecord->ExceptionInformation[1] +#define SIGSEGV_CONTEXT_REGS ExceptionInfo->ContextRecord +#if defined(_M_IX86) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->Eip +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIGSEGV_CONTEXT_REGS->Edi) +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#if defined(_M_X64) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->Rip +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIGSEGV_CONTEXT_REGS->Rax) +#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction +#endif +#if defined(_M_IA64) +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->StIIP +#endif +#endif + +#if HAVE_MACH_EXCEPTIONS + +// This can easily be extended to other Mach systems, but really who +// uses HURD (oops GNU/HURD), Darwin/x86, NextStep, Rhapsody, or CMU +// Mach 2.5/3.0? +#if defined(__APPLE__) && defined(__MACH__) + +#include +#include +#include +#include + +/* + * If you are familiar with MIG then you will understand the frustration + * that was necessary to get these embedded into C++ code by hand. + */ +extern "C" { +#include +#include + +#ifndef HAVE_MACH64_VM + +// Undefine this to prevent a preprocessor warning when compiling on a +// 32-bit machine with Mac OS X 10.5. +#undef MACH_EXCEPTION_CODES + +#define MACH_EXCEPTION_CODES 0 +#define mach_exception_data_t exception_data_t +#define mach_exception_data_type_t exception_data_type_t +#define mach_exc_server exc_server +#define catch_mach_exception_raise catch_exception_raise +#define mach_exception_raise exception_raise +#define mach_exception_raise_state exception_raise_state +#define mach_exception_raise_state_identity exception_raise_state_identity +#endif + +extern boolean_t mach_exc_server(mach_msg_header_t *, mach_msg_header_t *); +extern kern_return_t catch_mach_exception_raise(mach_port_t, mach_port_t, + mach_port_t, exception_type_t, mach_exception_data_t, mach_msg_type_number_t); +extern kern_return_t catch_mach_exception_raise_state(mach_port_t exception_port, + exception_type_t exception, mach_exception_data_t code, mach_msg_type_number_t code_count, + int *flavor, + thread_state_t old_state, mach_msg_type_number_t old_state_count, + thread_state_t new_state, mach_msg_type_number_t *new_state_count); +extern kern_return_t catch_mach_exception_raise_state_identity(mach_port_t exception_port, + mach_port_t thread_port, mach_port_t task_port, exception_type_t exception, + mach_exception_data_t code, mach_msg_type_number_t code_count, + int *flavor, + thread_state_t old_state, mach_msg_type_number_t old_state_count, + thread_state_t new_state, mach_msg_type_number_t *new_state_count); +extern kern_return_t mach_exception_raise(mach_port_t, mach_port_t, mach_port_t, + exception_type_t, mach_exception_data_t, mach_msg_type_number_t); +extern kern_return_t mach_exception_raise_state(mach_port_t, exception_type_t, + mach_exception_data_t, mach_msg_type_number_t, thread_state_flavor_t *, + thread_state_t, mach_msg_type_number_t, thread_state_t, mach_msg_type_number_t *); +extern kern_return_t mach_exception_raise_state_identity(mach_port_t, mach_port_t, mach_port_t, + exception_type_t, mach_exception_data_t, mach_msg_type_number_t, thread_state_flavor_t *, + thread_state_t, mach_msg_type_number_t, thread_state_t, mach_msg_type_number_t *); +} + +// Could make this dynamic by looking for a result of MIG_ARRAY_TOO_LARGE +#define HANDLER_COUNT 64 + +// structure to tuck away existing exception handlers +typedef struct _ExceptionPorts { + mach_msg_type_number_t maskCount; + exception_mask_t masks[HANDLER_COUNT]; + exception_handler_t handlers[HANDLER_COUNT]; + exception_behavior_t behaviors[HANDLER_COUNT]; + thread_state_flavor_t flavors[HANDLER_COUNT]; +} ExceptionPorts; + +// exception handler thread +static pthread_t exc_thread; + +// place where old exception handler info is stored +static ExceptionPorts ports; + +// our exception port +static mach_port_t _exceptionPort = MACH_PORT_NULL; + +#define MACH_CHECK_ERROR(name,ret) \ +if (ret != KERN_SUCCESS) { \ + mach_error(#name, ret); \ + exit (1); \ +} + +#ifndef MACH_FIELD_NAME +#define MACH_FIELD_NAME(X) X +#endif + +// Since there can only be one exception thread running at any time +// this is not a problem. +#define MSG_SIZE 512 +static char msgbuf[MSG_SIZE]; +static char replybuf[MSG_SIZE]; + +/* + * This is the entry point for the exception handler thread. The job + * of this thread is to wait for exception messages on the exception + * port that was setup beforehand and to pass them on to exc_server. + * exc_server is a MIG generated function that is a part of Mach. + * Its job is to decide what to do with the exception message. In our + * case exc_server calls catch_exception_raise on our behalf. After + * exc_server returns, it is our responsibility to send the reply. + */ +static void * +handleExceptions(void *priv) +{ + mach_msg_header_t *msg, *reply; + kern_return_t krc; + + msg = (mach_msg_header_t *)msgbuf; + reply = (mach_msg_header_t *)replybuf; + + for (;;) { + krc = mach_msg(msg, MACH_RCV_MSG, MSG_SIZE, MSG_SIZE, + _exceptionPort, 0, MACH_PORT_NULL); + MACH_CHECK_ERROR(mach_msg, krc); + + if (!mach_exc_server(msg, reply)) { + fprintf(stderr, "exc_server hated the message\n"); + exit(1); + } + + krc = mach_msg(reply, MACH_SEND_MSG, reply->msgh_size, 0, + msg->msgh_local_port, 0, MACH_PORT_NULL); + if (krc != KERN_SUCCESS) { + fprintf(stderr, "Error sending message to original reply port, krc = %d, %s", + krc, mach_error_string(krc)); + exit(1); + } + } +} +#endif +#endif + + +/* + * Instruction skipping + */ + +#ifndef SIGSEGV_REGISTER_TYPE +#define SIGSEGV_REGISTER_TYPE sigsegv_uintptr_t +#endif + +#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION +// Decode and skip X86 instruction +#if (defined(i386) || defined(__i386__) || defined(_M_IX86)) || (defined(__x86_64__) || defined(_M_X64)) +#if defined(__linux__) +enum { +#if (defined(i386) || defined(__i386__)) + X86_REG_EIP = 14, + X86_REG_EAX = 11, + X86_REG_ECX = 10, + X86_REG_EDX = 9, + X86_REG_EBX = 8, + X86_REG_ESP = 7, + X86_REG_EBP = 6, + X86_REG_ESI = 5, + X86_REG_EDI = 4 +#endif +#if defined(__x86_64__) + X86_REG_R8 = 0, + X86_REG_R9 = 1, + X86_REG_R10 = 2, + X86_REG_R11 = 3, + X86_REG_R12 = 4, + X86_REG_R13 = 5, + X86_REG_R14 = 6, + X86_REG_R15 = 7, + X86_REG_EDI = 8, + X86_REG_ESI = 9, + X86_REG_EBP = 10, + X86_REG_EBX = 11, + X86_REG_EDX = 12, + X86_REG_EAX = 13, + X86_REG_ECX = 14, + X86_REG_ESP = 15, + X86_REG_EIP = 16 +#endif +}; +#endif +#if defined(__NetBSD__) +enum { +#if (defined(i386) || defined(__i386__)) + X86_REG_EIP = _REG_EIP, + X86_REG_EAX = _REG_EAX, + X86_REG_ECX = _REG_ECX, + X86_REG_EDX = _REG_EDX, + X86_REG_EBX = _REG_EBX, + X86_REG_ESP = _REG_ESP, + X86_REG_EBP = _REG_EBP, + X86_REG_ESI = _REG_ESI, + X86_REG_EDI = _REG_EDI +#endif +}; +#endif +#if defined(__FreeBSD__) +enum { +#if (defined(i386) || defined(__i386__)) + X86_REG_EIP = 10, + X86_REG_EAX = 7, + X86_REG_ECX = 6, + X86_REG_EDX = 5, + X86_REG_EBX = 4, + X86_REG_ESP = 13, + X86_REG_EBP = 2, + X86_REG_ESI = 1, + X86_REG_EDI = 0 +#endif +#if (defined(x86_64) || defined(__x86_64__)) + X86_REG_EDI = 0, + X86_REG_ESI = 1, + X86_REG_EDX = 2, + X86_REG_ECX = 3, + X86_REG_R8 = 4, + X86_REG_R9 = 5, + X86_REG_EAX = 6, + X86_REG_EBX = 7, + X86_REG_EBP = 8, + X86_REG_R10 = 9, + X86_REG_R11 = 10, + X86_REG_R12 = 11, + X86_REG_R13 = 12, + X86_REG_R14 = 13, + X86_REG_R15 = 14, + X86_REG_EIP = 19, + X86_REG_ESP = 22, +#endif +}; +#endif +#if defined(__OpenBSD__) +enum { +#if defined(__i386__) + // EDI is the first register we consider +#define OREG(REG) offsetof(struct sigcontext, sc_##REG) +#define DREG(REG) ((OREG(REG) - OREG(edi)) / 4) + X86_REG_EIP = DREG(eip), // 7 + X86_REG_EAX = DREG(eax), // 6 + X86_REG_ECX = DREG(ecx), // 5 + X86_REG_EDX = DREG(edx), // 4 + X86_REG_EBX = DREG(ebx), // 3 + X86_REG_ESP = DREG(esp), // 10 + X86_REG_EBP = DREG(ebp), // 2 + X86_REG_ESI = DREG(esi), // 1 + X86_REG_EDI = DREG(edi) // 0 +#undef DREG +#undef OREG +#endif +}; +#endif +#if defined(__sun__) +// Same as for Linux, need to check for x86-64 +enum { +#if defined(__i386__) + X86_REG_EIP = EIP, + X86_REG_EAX = EAX, + X86_REG_ECX = ECX, + X86_REG_EDX = EDX, + X86_REG_EBX = EBX, + X86_REG_ESP = ESP, + X86_REG_EBP = EBP, + X86_REG_ESI = ESI, + X86_REG_EDI = EDI +#endif +}; +#endif +#if defined(__APPLE__) && defined(__MACH__) +enum { +#if (defined(i386) || defined(__i386__)) +#ifdef i386_SAVED_STATE + // same as FreeBSD (in Open Darwin 8.0.1) + X86_REG_EIP = 10, + X86_REG_EAX = 7, + X86_REG_ECX = 6, + X86_REG_EDX = 5, + X86_REG_EBX = 4, + X86_REG_ESP = 13, + X86_REG_EBP = 2, + X86_REG_ESI = 1, + X86_REG_EDI = 0 +#else + // new layout (MacOS X 10.4.4 for x86) + X86_REG_EIP = 10, + X86_REG_EAX = 0, + X86_REG_ECX = 2, + X86_REG_EDX = 3, + X86_REG_EBX = 1, + X86_REG_ESP = 7, + X86_REG_EBP = 6, + X86_REG_ESI = 5, + X86_REG_EDI = 4 +#endif +#endif +#if defined(__x86_64__) + X86_REG_R8 = 8, + X86_REG_R9 = 9, + X86_REG_R10 = 10, + X86_REG_R11 = 11, + X86_REG_R12 = 12, + X86_REG_R13 = 13, + X86_REG_R14 = 14, + X86_REG_R15 = 15, + X86_REG_EDI = 4, + X86_REG_ESI = 5, + X86_REG_EBP = 6, + X86_REG_EBX = 1, + X86_REG_EDX = 3, + X86_REG_EAX = 0, + X86_REG_ECX = 2, + X86_REG_ESP = 7, + X86_REG_EIP = 16 +#endif +}; +#endif +#if defined(_WIN32) +enum { +#if defined(_M_IX86) + X86_REG_EIP = 7, + X86_REG_EAX = 5, + X86_REG_ECX = 4, + X86_REG_EDX = 3, + X86_REG_EBX = 2, + X86_REG_ESP = 10, + X86_REG_EBP = 6, + X86_REG_ESI = 1, + X86_REG_EDI = 0 +#endif +#if defined(_M_X64) + X86_REG_EAX = 0, + X86_REG_ECX = 1, + X86_REG_EDX = 2, + X86_REG_EBX = 3, + X86_REG_ESP = 4, + X86_REG_EBP = 5, + X86_REG_ESI = 6, + X86_REG_EDI = 7, + X86_REG_R8 = 8, + X86_REG_R9 = 9, + X86_REG_R10 = 10, + X86_REG_R11 = 11, + X86_REG_R12 = 12, + X86_REG_R13 = 13, + X86_REG_R14 = 14, + X86_REG_R15 = 15, + X86_REG_EIP = 16 +#endif +}; +#endif +// FIXME: this is partly redundant with the instruction decoding phase +// to discover transfer type and register number +static inline int ix86_step_over_modrm(unsigned char * p) +{ + int mod = (p[0] >> 6) & 3; + int rm = p[0] & 7; + int offset = 0; + + // ModR/M Byte + switch (mod) { + case 0: // [reg] + if (rm == 5) return 4; // disp32 + break; + case 1: // disp8[reg] + offset = 1; + break; + case 2: // disp32[reg] + offset = 4; + break; + case 3: // register + return 0; + } + + // SIB Byte + if (rm == 4) { + if (mod == 0 && (p[1] & 7) == 5) + offset = 5; // disp32[index] + else + offset++; + } + + return offset; +} + +static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) +{ + unsigned char * eip = (unsigned char *)regs[X86_REG_EIP]; + + if (eip == 0) + return false; +#ifdef _WIN32 + if (IsBadCodePtr((FARPROC)eip)) + return false; +#endif + + enum instruction_type_t { + i_MOV, + i_ADD + }; + + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_LONG; + instruction_type_t instruction_type = i_MOV; + + int reg = -1; + int len = 0; + +#if DEBUG + printf("IP: %p [%02x %02x %02x %02x...]\n", + eip, eip[0], eip[1], eip[2], eip[3]); +#endif + + // Operand size prefix + if (*eip == 0x66) { + eip++; + len++; + transfer_size = SIZE_WORD; + } + + // REX prefix +#if defined(__x86_64__) || defined(_M_X64) + struct rex_t { + unsigned char W; + unsigned char R; + unsigned char X; + unsigned char B; + }; + rex_t rex = { 0, 0, 0, 0 }; + bool has_rex = false; + if ((*eip & 0xf0) == 0x40) { + has_rex = true; + const unsigned char b = *eip; + rex.W = b & (1 << 3); + rex.R = b & (1 << 2); + rex.X = b & (1 << 1); + rex.B = b & (1 << 0); +#if DEBUG + printf("REX: %c,%c,%c,%c\n", + rex.W ? 'W' : '_', + rex.R ? 'R' : '_', + rex.X ? 'X' : '_', + rex.B ? 'B' : '_'); +#endif + eip++; + len++; + if (rex.W) + transfer_size = SIZE_QUAD; + } +#else + const bool has_rex = false; +#endif + + // Decode instruction + int op_len = 1; + int target_size = SIZE_UNKNOWN; + switch (eip[0]) { + case 0x0f: + target_size = transfer_size; + switch (eip[1]) { + case 0xbe: // MOVSX r32, r/m8 + case 0xb6: // MOVZX r32, r/m8 + transfer_size = SIZE_BYTE; + goto do_mov_extend; + case 0xbf: // MOVSX r32, r/m16 + case 0xb7: // MOVZX r32, r/m16 + transfer_size = SIZE_WORD; + goto do_mov_extend; + do_mov_extend: + op_len = 2; + goto do_transfer_load; + } + break; +#if defined(__x86_64__) || defined(_M_X64) + case 0x63: // MOVSXD r64, r/m32 + if (has_rex && rex.W) { + transfer_size = SIZE_LONG; + target_size = SIZE_QUAD; + } + else if (transfer_size != SIZE_WORD) { + transfer_size = SIZE_LONG; + target_size = SIZE_QUAD; + } + goto do_transfer_load; +#endif + case 0x02: // ADD r8, r/m8 + transfer_size = SIZE_BYTE; + // fall through + case 0x03: // ADD r32, r/m32 + instruction_type = i_ADD; + goto do_transfer_load; + case 0x8a: // MOV r8, r/m8 + transfer_size = SIZE_BYTE; + // fall through + case 0x8b: // MOV r32, r/m32 (or 16-bit operation) + do_transfer_load: + switch (eip[op_len] & 0xc0) { + case 0x80: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_LOAD; + break; + case 0x40: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_LOAD; + break; + case 0x00: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_LOAD; + break; + } + len += 1 + op_len + ix86_step_over_modrm(eip + op_len); + break; + case 0x00: // ADD r/m8, r8 + transfer_size = SIZE_BYTE; + // fall through + case 0x01: // ADD r/m32, r32 + instruction_type = i_ADD; + goto do_transfer_store; + case 0x88: // MOV r/m8, r8 + transfer_size = SIZE_BYTE; + // fall through + case 0x89: // MOV r/m32, r32 (or 16-bit operation) + do_transfer_store: + switch (eip[op_len] & 0xc0) { + case 0x80: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_STORE; + break; + case 0x40: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_STORE; + break; + case 0x00: + reg = (eip[op_len] >> 3) & 7; + transfer_type = SIGSEGV_TRANSFER_STORE; + break; + } + len += 1 + op_len + ix86_step_over_modrm(eip + op_len); + break; + } + if (target_size == SIZE_UNKNOWN) + target_size = transfer_size; + + if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + return false; + } + +#if defined(__x86_64__) || defined(_M_X64) + if (rex.R) + reg += 8; +#endif + + if (instruction_type == i_MOV && transfer_type == SIGSEGV_TRANSFER_LOAD && reg != -1) { + static const int x86_reg_map[] = { + X86_REG_EAX, X86_REG_ECX, X86_REG_EDX, X86_REG_EBX, + X86_REG_ESP, X86_REG_EBP, X86_REG_ESI, X86_REG_EDI, +#if defined(__x86_64__) || defined(_M_X64) + X86_REG_R8, X86_REG_R9, X86_REG_R10, X86_REG_R11, + X86_REG_R12, X86_REG_R13, X86_REG_R14, X86_REG_R15, +#endif + }; + + if (reg < 0 || reg >= (sizeof(x86_reg_map)/sizeof(x86_reg_map[0]) - 1)) + return false; + + // Set 0 to the relevant register part + // NOTE: this is only valid for MOV alike instructions + int rloc = x86_reg_map[reg]; + switch (target_size) { + case SIZE_BYTE: + if (has_rex || reg < 4) + regs[rloc] = (regs[rloc] & ~0x00ffL); + else { + rloc = x86_reg_map[reg - 4]; + regs[rloc] = (regs[rloc] & ~0xff00L); + } + break; + case SIZE_WORD: + regs[rloc] = (regs[rloc] & ~0xffffL); + break; + case SIZE_LONG: + case SIZE_QUAD: // zero-extension + regs[rloc] = 0; + break; + } + } + +#if DEBUG + printf("%p: %s %s access", (void *)regs[X86_REG_EIP], + transfer_size == SIZE_BYTE ? "byte" : + transfer_size == SIZE_WORD ? "word" : + transfer_size == SIZE_LONG ? "long" : + transfer_size == SIZE_QUAD ? "quad" : "unknown", + transfer_type == SIGSEGV_TRANSFER_LOAD ? "read" : "write"); + + if (reg != -1) { + static const char * x86_byte_reg_str_map[] = { + "al", "cl", "dl", "bl", + "spl", "bpl", "sil", "dil", + "r8b", "r9b", "r10b", "r11b", + "r12b", "r13b", "r14b", "r15b", + "ah", "ch", "dh", "bh", + }; + static const char * x86_word_reg_str_map[] = { + "ax", "cx", "dx", "bx", + "sp", "bp", "si", "di", + "r8w", "r9w", "r10w", "r11w", + "r12w", "r13w", "r14w", "r15w", + }; + static const char *x86_long_reg_str_map[] = { + "eax", "ecx", "edx", "ebx", + "esp", "ebp", "esi", "edi", + "r8d", "r9d", "r10d", "r11d", + "r12d", "r13d", "r14d", "r15d", + }; + static const char *x86_quad_reg_str_map[] = { + "rax", "rcx", "rdx", "rbx", + "rsp", "rbp", "rsi", "rdi", + "r8", "r9", "r10", "r11", + "r12", "r13", "r14", "r15", + }; + const char * reg_str = NULL; + switch (target_size) { + case SIZE_BYTE: + reg_str = x86_byte_reg_str_map[(!has_rex && reg >= 4 ? 12 : 0) + reg]; + break; + case SIZE_WORD: reg_str = x86_word_reg_str_map[reg]; break; + case SIZE_LONG: reg_str = x86_long_reg_str_map[reg]; break; + case SIZE_QUAD: reg_str = x86_quad_reg_str_map[reg]; break; + } + if (reg_str) + printf(" %s register %%%s", + transfer_type == SIGSEGV_TRANSFER_LOAD ? "to" : "from", + reg_str); + } + printf(", %d bytes instruction\n", len); +#endif + + regs[X86_REG_EIP] += len; + return true; +} +#endif + +// Decode and skip IA-64 instruction +#if defined(__ia64) || defined(__ia64__) +typedef uint64_t ia64_bundle_t[2]; +#if defined(__linux__) +// We can directly patch the slot number +#define IA64_CAN_PATCH_IP_SLOT 1 +// Helper macros to access the machine context +#define IA64_CONTEXT_TYPE struct sigcontext * +#define IA64_CONTEXT scp +#define IA64_GET_IP() (IA64_CONTEXT->sc_ip) +#define IA64_SET_IP(V) (IA64_CONTEXT->sc_ip = (V)) +#define IA64_GET_PR(P) ((IA64_CONTEXT->sc_pr >> (P)) & 1) +#define IA64_GET_NAT(I) ((IA64_CONTEXT->sc_nat >> (I)) & 1) +#define IA64_GET_GR(R) (IA64_CONTEXT->sc_gr[(R)]) +#define _IA64_SET_GR(R,V) (IA64_CONTEXT->sc_gr[(R)] = (V)) +#define _IA64_SET_NAT(I,V) (IA64_CONTEXT->sc_nat = (IA64_CONTEXT->sc_nat & ~(1ull << (I))) | (((uint64_t)!!(V)) << (I))) +#define IA64_SET_GR(R,V,N) (_IA64_SET_GR(R,V), _IA64_SET_NAT(R,N)) + +// Load bundle (in little-endian) +static inline void ia64_load_bundle(ia64_bundle_t bundle, uint64_t raw_ip) +{ + uint64_t *ip = (uint64_t *)(raw_ip & ~3ull); + bundle[0] = ip[0]; + bundle[1] = ip[1]; +} +#endif +#if defined(__hpux) || defined(__hpux__) +// We can directly patch the slot number +#define IA64_CAN_PATCH_IP_SLOT 1 +// Helper macros to access the machine context +#define IA64_CONTEXT_TYPE ucontext_t * +#define IA64_CONTEXT ucp +#define IA64_GET_IP() ia64_get_ip(IA64_CONTEXT) +#define IA64_SET_IP(V) ia64_set_ip(IA64_CONTEXT, V) +#define IA64_GET_PR(P) ia64_get_pr(IA64_CONTEXT, P) +#define IA64_GET_NAT(I) ia64_get_nat(IA64_CONTEXT, I) +#define IA64_GET_GR(R) ia64_get_gr(IA64_CONTEXT, R) +#define IA64_SET_GR(R,V,N) ia64_set_gr(IA64_CONTEXT, R, V, N) +#define UC_ACCESS(FUNC,ARGS) do { if (__uc_##FUNC ARGS != 0) abort(); } while (0) + +static inline uint64_t ia64_get_ip(IA64_CONTEXT_TYPE IA64_CONTEXT) + { uint64_t v; UC_ACCESS(get_ip,(IA64_CONTEXT, &v)); return v; } +static inline void ia64_set_ip(IA64_CONTEXT_TYPE IA64_CONTEXT, uint64_t v) + { UC_ACCESS(set_ip,(IA64_CONTEXT, v)); } +static inline unsigned int ia64_get_pr(IA64_CONTEXT_TYPE IA64_CONTEXT, int pr) + { uint64_t v; UC_ACCESS(get_prs,(IA64_CONTEXT, &v)); return (v >> pr) & 1; } +static inline unsigned int ia64_get_nat(IA64_CONTEXT_TYPE IA64_CONTEXT, int r) + { uint64_t v; unsigned int nat; UC_ACCESS(get_grs,(IA64_CONTEXT, r, 1, &v, &nat)); return (nat >> r) & 1; } +static inline uint64_t ia64_get_gr(IA64_CONTEXT_TYPE IA64_CONTEXT, int r) + { uint64_t v; unsigned int nat; UC_ACCESS(get_grs,(IA64_CONTEXT, r, 1, &v, &nat)); return v; } + +static void ia64_set_gr(IA64_CONTEXT_TYPE IA64_CONTEXT, int r, uint64_t v, unsigned int nat) +{ + if (r == 0) + return; + if (r > 0 && r < 32) + UC_ACCESS(set_grs,(IA64_CONTEXT, r, 1, &v, (!!nat) << r)); + else { + uint64_t bsp, bspstore; + UC_ACCESS(get_ar_bsp,(IA64_CONTEXT, &bsp)); + UC_ACCESS(get_ar_bspstore,(IA64_CONTEXT, &bspstore)); + abort(); /* XXX: use libunwind, this is not fun... */ + } +} + +// Byte-swapping +#if defined(__GNUC__) +#define BSWAP64(V) ({ uint64_t r; __asm__ __volatile__("mux1 %0=%1,@rev;;" : "=r" (r) : "r" (V)); r; }) +#elif defined (__HP_aCC) +#define BSWAP64(V) _Asm_mux1(_MBTYPE_REV, V) +#else +#error "Define byte-swap instruction" +#endif + +// Load bundle (in little-endian) +static inline void ia64_load_bundle(ia64_bundle_t bundle, uint64_t raw_ip) +{ + uint64_t *ip = (uint64_t *)(raw_ip & ~3ull); + bundle[0] = BSWAP64(ip[0]); + bundle[1] = BSWAP64(ip[1]); +} +#endif + +// Instruction operations +enum { + IA64_INST_UNKNOWN = 0, + IA64_INST_LD1, // ld1 op0=[op1] + IA64_INST_LD1_UPDATE, // ld1 op0=[op1],op2 + IA64_INST_LD2, // ld2 op0=[op1] + IA64_INST_LD2_UPDATE, // ld2 op0=[op1],op2 + IA64_INST_LD4, // ld4 op0=[op1] + IA64_INST_LD4_UPDATE, // ld4 op0=[op1],op2 + IA64_INST_LD8, // ld8 op0=[op1] + IA64_INST_LD8_UPDATE, // ld8 op0=[op1],op2 + IA64_INST_ST1, // st1 [op0]=op1 + IA64_INST_ST1_UPDATE, // st1 [op0]=op1,op2 + IA64_INST_ST2, // st2 [op0]=op1 + IA64_INST_ST2_UPDATE, // st2 [op0]=op1,op2 + IA64_INST_ST4, // st4 [op0]=op1 + IA64_INST_ST4_UPDATE, // st4 [op0]=op1,op2 + IA64_INST_ST8, // st8 [op0]=op1 + IA64_INST_ST8_UPDATE, // st8 [op0]=op1,op2 + IA64_INST_ADD, // add op0=op1,op2,op3 + IA64_INST_SUB, // sub op0=op1,op2,op3 + IA64_INST_SHLADD, // shladd op0=op1,op3,op2 + IA64_INST_AND, // and op0=op1,op2 + IA64_INST_ANDCM, // andcm op0=op1,op2 + IA64_INST_OR, // or op0=op1,op2 + IA64_INST_XOR, // xor op0=op1,op2 + IA64_INST_SXT1, // sxt1 op0=op1 + IA64_INST_SXT2, // sxt2 op0=op1 + IA64_INST_SXT4, // sxt4 op0=op1 + IA64_INST_ZXT1, // zxt1 op0=op1 + IA64_INST_ZXT2, // zxt2 op0=op1 + IA64_INST_ZXT4, // zxt4 op0=op1 + IA64_INST_NOP // nop op0 +}; + +const int IA64_N_OPERANDS = 4; + +// Decoded operand type +struct ia64_operand_t { + uint8_t commit; // commit result of operation to register file? + uint8_t valid; // XXX: not really used, can be removed (debug) + int8_t index; // index of GPR, or -1 if immediate value + uint8_t nat; // NaT state before operation + uint64_t value; // register contents or immediate value +}; + +// Decoded instruction type +struct ia64_instruction_t { + uint8_t mnemo; // operation to perform + uint8_t pred; // predicate register to check + uint8_t no_memory; // used to emulated main fault instruction + uint64_t inst; // the raw instruction bits (41-bit wide) + ia64_operand_t operands[IA64_N_OPERANDS]; +}; + +// Get immediate sign-bit +static inline int ia64_inst_get_sbit(uint64_t inst) +{ + return (inst >> 36) & 1; +} + +// Get 8-bit immediate value (A3, A8, I27, M30) +static inline uint64_t ia64_inst_get_imm8(uint64_t inst) +{ + uint64_t value = (inst >> 13) & 0x7full; + if (ia64_inst_get_sbit(inst)) + value |= ~0x7full; + return value; +} + +// Get 9-bit immediate value (M3) +static inline uint64_t ia64_inst_get_imm9b(uint64_t inst) +{ + uint64_t value = (((inst >> 27) & 1) << 7) | ((inst >> 13) & 0x7f); + if (ia64_inst_get_sbit(inst)) + value |= ~0xffull; + return value; +} + +// Get 9-bit immediate value (M5) +static inline uint64_t ia64_inst_get_imm9a(uint64_t inst) +{ + uint64_t value = (((inst >> 27) & 1) << 7) | ((inst >> 6) & 0x7f); + if (ia64_inst_get_sbit(inst)) + value |= ~0xffull; + return value; +} + +// Get 14-bit immediate value (A4) +static inline uint64_t ia64_inst_get_imm14(uint64_t inst) +{ + uint64_t value = (((inst >> 27) & 0x3f) << 7) | (inst & 0x7f); + if (ia64_inst_get_sbit(inst)) + value |= ~0x1ffull; + return value; +} + +// Get 22-bit immediate value (A5) +static inline uint64_t ia64_inst_get_imm22(uint64_t inst) +{ + uint64_t value = ((((inst >> 22) & 0x1f) << 16) | + (((inst >> 27) & 0x1ff) << 7) | + (inst & 0x7f)); + if (ia64_inst_get_sbit(inst)) + value |= ~0x1fffffull; + return value; +} + +// Get 21-bit immediate value (I19) +static inline uint64_t ia64_inst_get_imm21(uint64_t inst) +{ + return (((inst >> 36) & 1) << 20) | ((inst >> 6) & 0xfffff); +} + +// Get 2-bit count value (A2) +static inline int ia64_inst_get_count2(uint64_t inst) +{ + return (inst >> 27) & 0x3; +} + +// Get bundle template +static inline unsigned int ia64_get_template(uint64_t ip) +{ + ia64_bundle_t bundle; + ia64_load_bundle(bundle, ip); + return bundle[0] & 0x1f; +} + +// Get specified instruction in bundle +static uint64_t ia64_get_instruction(uint64_t ip, int slot) +{ + uint64_t inst; + ia64_bundle_t bundle; + ia64_load_bundle(bundle, ip); +#if DEBUG + printf("Bundle: %016llx%016llx\n", bundle[1], bundle[0]); +#endif + + switch (slot) { + case 0: + inst = (bundle[0] >> 5) & 0x1ffffffffffull; + break; + case 1: + inst = ((bundle[1] & 0x7fffffull) << 18) | ((bundle[0] >> 46) & 0x3ffffull); + break; + case 2: + inst = (bundle[1] >> 23) & 0x1ffffffffffull; + break; + case 3: + fprintf(stderr, "ERROR: ia64_get_instruction(), invalid slot number %d\n", slot); + abort(); + break; + } + +#if DEBUG + printf(" Instruction %d: 0x%016llx\n", slot, inst); +#endif + return inst; +} + +// Decode group 0 instructions +static bool ia64_decode_instruction_0(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + const int r1 = (inst->inst >> 6) & 0x7f; + const int r3 = (inst->inst >> 20) & 0x7f; + + const int x3 = (inst->inst >> 33) & 0x07; + const int x6 = (inst->inst >> 27) & 0x3f; + const int x2 = (inst->inst >> 31) & 0x03; + const int x4 = (inst->inst >> 27) & 0x0f; + + if (x3 == 0) { + switch (x6) { + case 0x01: // nop.i (I19) + inst->mnemo = IA64_INST_NOP; + inst->operands[0].valid = true; + inst->operands[0].index = -1; + inst->operands[0].value = ia64_inst_get_imm21(inst->inst); + return true; + case 0x14: // sxt1 (I29) + case 0x15: // sxt2 (I29) + case 0x16: // sxt4 (I29) + case 0x10: // zxt1 (I29) + case 0x11: // zxt2 (I29) + case 0x12: // zxt4 (I29) + switch (x6) { + case 0x14: inst->mnemo = IA64_INST_SXT1; break; + case 0x15: inst->mnemo = IA64_INST_SXT2; break; + case 0x16: inst->mnemo = IA64_INST_SXT4; break; + case 0x10: inst->mnemo = IA64_INST_ZXT1; break; + case 0x11: inst->mnemo = IA64_INST_ZXT2; break; + case 0x12: inst->mnemo = IA64_INST_ZXT4; break; + default: abort(); + } + inst->operands[0].valid = true; + inst->operands[0].index = r1; + inst->operands[1].valid = true; + inst->operands[1].index = r3; + inst->operands[1].value = IA64_GET_GR(r3); + inst->operands[1].nat = IA64_GET_NAT(r3); + return true; + } + } + return false; +} + +// Decode group 4 instructions (load/store instructions) +static bool ia64_decode_instruction_4(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + const int r1 = (inst->inst >> 6) & 0x7f; + const int r2 = (inst->inst >> 13) & 0x7f; + const int r3 = (inst->inst >> 20) & 0x7f; + + const int m = (inst->inst >> 36) & 1; + const int x = (inst->inst >> 27) & 1; + const int x6 = (inst->inst >> 30) & 0x3f; + + switch (x6) { + case 0x00: + case 0x01: + case 0x02: + case 0x03: + if (x == 0) { + inst->operands[0].valid = true; + inst->operands[0].index = r1; + inst->operands[1].valid = true; + inst->operands[1].index = r3; + inst->operands[1].value = IA64_GET_GR(r3); + inst->operands[1].nat = IA64_GET_NAT(r3); + if (m == 0) { + switch (x6) { + case 0x00: inst->mnemo = IA64_INST_LD1; break; + case 0x01: inst->mnemo = IA64_INST_LD2; break; + case 0x02: inst->mnemo = IA64_INST_LD4; break; + case 0x03: inst->mnemo = IA64_INST_LD8; break; + } + } + else { + inst->operands[2].valid = true; + inst->operands[2].index = r2; + inst->operands[2].value = IA64_GET_GR(r2); + inst->operands[2].nat = IA64_GET_NAT(r2); + switch (x6) { + case 0x00: inst->mnemo = IA64_INST_LD1_UPDATE; break; + case 0x01: inst->mnemo = IA64_INST_LD2_UPDATE; break; + case 0x02: inst->mnemo = IA64_INST_LD4_UPDATE; break; + case 0x03: inst->mnemo = IA64_INST_LD8_UPDATE; break; + } + } + return true; + } + break; + case 0x30: + case 0x31: + case 0x32: + case 0x33: + if (m == 0 && x == 0) { + inst->operands[0].valid = true; + inst->operands[0].index = r3; + inst->operands[0].value = IA64_GET_GR(r3); + inst->operands[0].nat = IA64_GET_NAT(r3); + inst->operands[1].valid = true; + inst->operands[1].index = r2; + inst->operands[1].value = IA64_GET_GR(r2); + inst->operands[1].nat = IA64_GET_NAT(r2); + switch (x6) { + case 0x30: inst->mnemo = IA64_INST_ST1; break; + case 0x31: inst->mnemo = IA64_INST_ST2; break; + case 0x32: inst->mnemo = IA64_INST_ST4; break; + case 0x33: inst->mnemo = IA64_INST_ST8; break; + } + return true; + } + break; + } + return false; +} + +// Decode group 5 instructions (load/store instructions) +static bool ia64_decode_instruction_5(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + const int r1 = (inst->inst >> 6) & 0x7f; + const int r2 = (inst->inst >> 13) & 0x7f; + const int r3 = (inst->inst >> 20) & 0x7f; + + const int x6 = (inst->inst >> 30) & 0x3f; + + switch (x6) { + case 0x00: + case 0x01: + case 0x02: + case 0x03: + inst->operands[0].valid = true; + inst->operands[0].index = r1; + inst->operands[1].valid = true; + inst->operands[1].index = r3; + inst->operands[1].value = IA64_GET_GR(r3); + inst->operands[1].nat = IA64_GET_NAT(r3); + inst->operands[2].valid = true; + inst->operands[2].index = -1; + inst->operands[2].value = ia64_inst_get_imm9b(inst->inst); + inst->operands[2].nat = 0; + switch (x6) { + case 0x00: inst->mnemo = IA64_INST_LD1_UPDATE; break; + case 0x01: inst->mnemo = IA64_INST_LD2_UPDATE; break; + case 0x02: inst->mnemo = IA64_INST_LD4_UPDATE; break; + case 0x03: inst->mnemo = IA64_INST_LD8_UPDATE; break; + } + return true; + case 0x30: + case 0x31: + case 0x32: + case 0x33: + inst->operands[0].valid = true; + inst->operands[0].index = r3; + inst->operands[0].value = IA64_GET_GR(r3); + inst->operands[0].nat = IA64_GET_NAT(r3); + inst->operands[1].valid = true; + inst->operands[1].index = r2; + inst->operands[1].value = IA64_GET_GR(r2); + inst->operands[1].nat = IA64_GET_NAT(r2); + inst->operands[2].valid = true; + inst->operands[2].index = -1; + inst->operands[2].value = ia64_inst_get_imm9a(inst->inst); + inst->operands[2].nat = 0; + switch (x6) { + case 0x30: inst->mnemo = IA64_INST_ST1_UPDATE; break; + case 0x31: inst->mnemo = IA64_INST_ST2_UPDATE; break; + case 0x32: inst->mnemo = IA64_INST_ST4_UPDATE; break; + case 0x33: inst->mnemo = IA64_INST_ST8_UPDATE; break; + } + return true; + } + return false; +} + +// Decode group 8 instructions (ALU integer) +static bool ia64_decode_instruction_8(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + const int r1 = (inst->inst >> 6) & 0x7f; + const int r2 = (inst->inst >> 13) & 0x7f; + const int r3 = (inst->inst >> 20) & 0x7f; + + const int x2a = (inst->inst >> 34) & 0x3; + const int x2b = (inst->inst >> 27) & 0x3; + const int x4 = (inst->inst >> 29) & 0xf; + const int ve = (inst->inst >> 33) & 0x1; + + // destination register (r1) is always valid in this group + inst->operands[0].valid = true; + inst->operands[0].index = r1; + + // source register (r3) is always valid in this group + inst->operands[2].valid = true; + inst->operands[2].index = r3; + inst->operands[2].value = IA64_GET_GR(r3); + inst->operands[2].nat = IA64_GET_NAT(r3); + + if (x2a == 0 && ve == 0) { + inst->operands[1].valid = true; + inst->operands[1].index = r2; + inst->operands[1].value = IA64_GET_GR(r2); + inst->operands[1].nat = IA64_GET_NAT(r2); + switch (x4) { + case 0x0: // add (A1) + inst->mnemo = IA64_INST_ADD; + inst->operands[3].valid = true; + inst->operands[3].index = -1; + inst->operands[3].value = x2b == 1; + return true; + case 0x1: // add (A1) + inst->mnemo = IA64_INST_SUB; + inst->operands[3].valid = true; + inst->operands[3].index = -1; + inst->operands[3].value = x2b == 0; + return true; + case 0x4: // shladd (A2) + inst->mnemo = IA64_INST_SHLADD; + inst->operands[3].valid = true; + inst->operands[3].index = -1; + inst->operands[3].value = ia64_inst_get_count2(inst->inst); + return true; + case 0x9: + if (x2b == 1) { + inst->mnemo = IA64_INST_SUB; + inst->operands[1].index = -1; + inst->operands[1].value = ia64_inst_get_imm8(inst->inst); + inst->operands[1].nat = 0; + return true; + } + break; + case 0xb: + inst->operands[1].index = -1; + inst->operands[1].value = ia64_inst_get_imm8(inst->inst); + inst->operands[1].nat = 0; + // fall-through + case 0x3: + switch (x2b) { + case 0: inst->mnemo = IA64_INST_AND; break; + case 1: inst->mnemo = IA64_INST_ANDCM; break; + case 2: inst->mnemo = IA64_INST_OR; break; + case 3: inst->mnemo = IA64_INST_XOR; break; + } + return true; + } + } + return false; +} + +// Decode instruction +static bool ia64_decode_instruction(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + const int major = (inst->inst >> 37) & 0xf; + + inst->mnemo = IA64_INST_UNKNOWN; + inst->pred = inst->inst & 0x3f; + memset(&inst->operands[0], 0, sizeof(inst->operands)); + + switch (major) { + case 0x0: return ia64_decode_instruction_0(inst, IA64_CONTEXT); + case 0x4: return ia64_decode_instruction_4(inst, IA64_CONTEXT); + case 0x5: return ia64_decode_instruction_5(inst, IA64_CONTEXT); + case 0x8: return ia64_decode_instruction_8(inst, IA64_CONTEXT); + } + return false; +} + +static bool ia64_emulate_instruction(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + // XXX: handle Register NaT Consumption fault? + // XXX: this simple emulator assumes instructions in a bundle + // don't depend on effects of other instructions in the same + // bundle. It probably would be simpler to JIT-generate code to be + // executed natively but probably more costly (inject/extract CPU state) + if (inst->mnemo == IA64_INST_UNKNOWN) + return false; + if (inst->pred && !IA64_GET_PR(inst->pred)) + return true; + + uint8_t nat, nat2; + uint64_t dst, dst2, src1, src2, src3; + + switch (inst->mnemo) { + case IA64_INST_NOP: + break; + case IA64_INST_ADD: + case IA64_INST_SUB: + case IA64_INST_SHLADD: + src3 = inst->operands[3].value; + // fall-through + case IA64_INST_AND: + case IA64_INST_ANDCM: + case IA64_INST_OR: + case IA64_INST_XOR: + src1 = inst->operands[1].value; + src2 = inst->operands[2].value; + switch (inst->mnemo) { + case IA64_INST_ADD: dst = src1 + src2 + src3; break; + case IA64_INST_SUB: dst = src1 - src2 - src3; break; + case IA64_INST_SHLADD: dst = (src1 << src3) + src2; break; + case IA64_INST_AND: dst = src1 & src2; break; + case IA64_INST_ANDCM: dst = src1 &~ src2; break; + case IA64_INST_OR: dst = src1 | src2; break; + case IA64_INST_XOR: dst = src1 ^ src2; break; + } + inst->operands[0].commit = true; + inst->operands[0].value = dst; + inst->operands[0].nat = inst->operands[1].nat | inst->operands[2].nat; + break; + case IA64_INST_SXT1: + case IA64_INST_SXT2: + case IA64_INST_SXT4: + case IA64_INST_ZXT1: + case IA64_INST_ZXT2: + case IA64_INST_ZXT4: + src1 = inst->operands[1].value; + switch (inst->mnemo) { + case IA64_INST_SXT1: dst = (int64_t)(int8_t)src1; break; + case IA64_INST_SXT2: dst = (int64_t)(int16_t)src1; break; + case IA64_INST_SXT4: dst = (int64_t)(int32_t)src1; break; + case IA64_INST_ZXT1: dst = (uint8_t)src1; break; + case IA64_INST_ZXT2: dst = (uint16_t)src1; break; + case IA64_INST_ZXT4: dst = (uint32_t)src1; break; + } + inst->operands[0].commit = true; + inst->operands[0].value = dst; + inst->operands[0].nat = inst->operands[1].nat; + break; + case IA64_INST_LD1_UPDATE: + case IA64_INST_LD2_UPDATE: + case IA64_INST_LD4_UPDATE: + case IA64_INST_LD8_UPDATE: + inst->operands[1].commit = true; + dst2 = inst->operands[1].value + inst->operands[2].value; + nat2 = inst->operands[2].nat ? inst->operands[2].nat : 0; + // fall-through + case IA64_INST_LD1: + case IA64_INST_LD2: + case IA64_INST_LD4: + case IA64_INST_LD8: + src1 = inst->operands[1].value; + if (inst->no_memory) + dst = 0; + else { + switch (inst->mnemo) { + case IA64_INST_LD1: case IA64_INST_LD1_UPDATE: dst = *((uint8_t *)src1); break; + case IA64_INST_LD2: case IA64_INST_LD2_UPDATE: dst = *((uint16_t *)src1); break; + case IA64_INST_LD4: case IA64_INST_LD4_UPDATE: dst = *((uint32_t *)src1); break; + case IA64_INST_LD8: case IA64_INST_LD8_UPDATE: dst = *((uint64_t *)src1); break; + } + } + inst->operands[0].commit = true; + inst->operands[0].value = dst; + inst->operands[0].nat = 0; + inst->operands[1].value = dst2; + inst->operands[1].nat = nat2; + break; + case IA64_INST_ST1_UPDATE: + case IA64_INST_ST2_UPDATE: + case IA64_INST_ST4_UPDATE: + case IA64_INST_ST8_UPDATE: + inst->operands[0].commit = 0; + dst2 = inst->operands[0].value + inst->operands[2].value; + nat2 = inst->operands[2].nat ? inst->operands[2].nat : 0; + // fall-through + case IA64_INST_ST1: + case IA64_INST_ST2: + case IA64_INST_ST4: + case IA64_INST_ST8: + dst = inst->operands[0].value; + src1 = inst->operands[1].value; + if (!inst->no_memory) { + switch (inst->mnemo) { + case IA64_INST_ST1: case IA64_INST_ST1_UPDATE: *((uint8_t *)dst) = src1; break; + case IA64_INST_ST2: case IA64_INST_ST2_UPDATE: *((uint16_t *)dst) = src1; break; + case IA64_INST_ST4: case IA64_INST_ST4_UPDATE: *((uint32_t *)dst) = src1; break; + case IA64_INST_ST8: case IA64_INST_ST8_UPDATE: *((uint64_t *)dst) = src1; break; + } + } + inst->operands[0].value = dst2; + inst->operands[0].nat = nat2; + break; + default: + return false; + } + + for (int i = 0; i < IA64_N_OPERANDS; i++) { + ia64_operand_t const & op = inst->operands[i]; + if (!op.commit) + continue; + if (op.index == -1) + return false; // XXX: internal error + IA64_SET_GR(op.index, op.value, op.nat); + } + return true; +} + +static bool ia64_emulate_instruction(uint64_t raw_inst, IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + ia64_instruction_t inst; + memset(&inst, 0, sizeof(inst)); + inst.inst = raw_inst; + if (!ia64_decode_instruction(&inst, IA64_CONTEXT)) + return false; + return ia64_emulate_instruction(&inst, IA64_CONTEXT); +} + +static bool ia64_skip_instruction(IA64_CONTEXT_TYPE IA64_CONTEXT) +{ + uint64_t ip = IA64_GET_IP(); +#if DEBUG + printf("IP: 0x%016llx\n", ip); +#if 0 + printf(" Template 0x%02x\n", ia64_get_template(ip)); + ia64_get_instruction(ip, 0); + ia64_get_instruction(ip, 1); + ia64_get_instruction(ip, 2); +#endif +#endif + + // Select which decode switch to use + ia64_instruction_t inst; + inst.inst = ia64_get_instruction(ip, ip & 3); + if (!ia64_decode_instruction(&inst, IA64_CONTEXT)) { + fprintf(stderr, "ERROR: ia64_skip_instruction(): could not decode instruction\n"); + return false; + } + + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_UNKNOWN; + + switch (inst.mnemo) { + case IA64_INST_LD1: + case IA64_INST_LD2: + case IA64_INST_LD4: + case IA64_INST_LD8: + case IA64_INST_LD1_UPDATE: + case IA64_INST_LD2_UPDATE: + case IA64_INST_LD4_UPDATE: + case IA64_INST_LD8_UPDATE: + transfer_type = SIGSEGV_TRANSFER_LOAD; + break; + case IA64_INST_ST1: + case IA64_INST_ST2: + case IA64_INST_ST4: + case IA64_INST_ST8: + case IA64_INST_ST1_UPDATE: + case IA64_INST_ST2_UPDATE: + case IA64_INST_ST4_UPDATE: + case IA64_INST_ST8_UPDATE: + transfer_type = SIGSEGV_TRANSFER_STORE; + break; + } + + if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + fprintf(stderr, "ERROR: ia64_skip_instruction(): not a load/store instruction\n"); + return false; + } + + switch (inst.mnemo) { + case IA64_INST_LD1: + case IA64_INST_LD1_UPDATE: + case IA64_INST_ST1: + case IA64_INST_ST1_UPDATE: + transfer_size = SIZE_BYTE; + break; + case IA64_INST_LD2: + case IA64_INST_LD2_UPDATE: + case IA64_INST_ST2: + case IA64_INST_ST2_UPDATE: + transfer_size = SIZE_WORD; + break; + case IA64_INST_LD4: + case IA64_INST_LD4_UPDATE: + case IA64_INST_ST4: + case IA64_INST_ST4_UPDATE: + transfer_size = SIZE_LONG; + break; + case IA64_INST_LD8: + case IA64_INST_LD8_UPDATE: + case IA64_INST_ST8: + case IA64_INST_ST8_UPDATE: + transfer_size = SIZE_QUAD; + break; + } + + if (transfer_size == SIZE_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + fprintf(stderr, "ERROR: ia64_skip_instruction(): unknown transfer size\n"); + return false; + } + + inst.no_memory = true; + if (!ia64_emulate_instruction(&inst, IA64_CONTEXT)) { + fprintf(stderr, "ERROR: ia64_skip_instruction(): could not emulate fault instruction\n"); + return false; + } + + int slot = ip & 3; + bool emulate_next = false; + switch (slot) { + case 0: + switch (ia64_get_template(ip)) { + case 0x2: // MI;I + case 0x3: // MI;I; + emulate_next = true; + slot = 2; + break; + case 0xa: // M;MI + case 0xb: // M;MI; + emulate_next = true; + slot = 1; + break; + } + break; + } + if (emulate_next && !IA64_CAN_PATCH_IP_SLOT) { + while (slot < 3) { + if (!ia64_emulate_instruction(ia64_get_instruction(ip, slot), IA64_CONTEXT)) { + fprintf(stderr, "ERROR: ia64_skip_instruction(): could not emulate instruction\n"); + return false; + } + ++slot; + } + } + +#if IA64_CAN_PATCH_IP_SLOT + if ((slot = ip & 3) < 2) + IA64_SET_IP((ip & ~3ull) + (slot + 1)); + else +#endif + IA64_SET_IP((ip & ~3ull) + 16); +#if DEBUG + printf("IP: 0x%016llx\n", IA64_GET_IP()); +#endif + return true; +} +#endif + +// Decode and skip PPC instruction +#if (defined(powerpc) || defined(__powerpc__) || defined(__ppc__) || defined(__ppc64__)) +static bool powerpc_skip_instruction(unsigned long * nip_p, unsigned long * regs) +{ + instruction_t instr; + powerpc_decode_instruction(&instr, *nip_p, regs); + + if (instr.transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + return false; + } + +#if DEBUG + printf("%08x: %s %s access", *nip_p, + instr.transfer_size == SIZE_BYTE ? "byte" : + instr.transfer_size == SIZE_WORD ? "word" : + instr.transfer_size == SIZE_LONG ? "long" : "quad", + instr.transfer_type == SIGSEGV_TRANSFER_LOAD ? "read" : "write"); + + if (instr.addr_mode == MODE_U || instr.addr_mode == MODE_UX) + printf(" r%d (ra = %08x)\n", instr.ra, instr.addr); + if (instr.transfer_type == SIGSEGV_TRANSFER_LOAD) + printf(" r%d (rd = 0)\n", instr.rd); +#endif + + if (instr.addr_mode == MODE_U || instr.addr_mode == MODE_UX) + regs[instr.ra] = instr.addr; + if (instr.transfer_type == SIGSEGV_TRANSFER_LOAD) + regs[instr.rd] = 0; + + *nip_p += 4; + return true; +} +#endif + +// Decode and skip MIPS instruction +#if (defined(mips) || defined(__mips)) +static bool mips_skip_instruction(greg_t * pc_p, greg_t * regs) +{ + unsigned int * epc = (unsigned int *)(unsigned long)*pc_p; + + if (epc == 0) + return false; + +#if DEBUG + printf("IP: %p [%08x]\n", epc, epc[0]); +#endif + + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_LONG; + int direction = 0; + + const unsigned int opcode = epc[0]; + switch (opcode >> 26) { + case 32: // Load Byte + case 36: // Load Byte Unsigned + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_BYTE; + break; + case 33: // Load Halfword + case 37: // Load Halfword Unsigned + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_WORD; + break; + case 35: // Load Word + case 39: // Load Word Unsigned + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + break; + case 34: // Load Word Left + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + direction = -1; + break; + case 38: // Load Word Right + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + direction = 1; + break; + case 55: // Load Doubleword + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + break; + case 26: // Load Doubleword Left + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + direction = -1; + break; + case 27: // Load Doubleword Right + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + direction = 1; + break; + case 40: // Store Byte + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_BYTE; + break; + case 41: // Store Halfword + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_WORD; + break; + case 43: // Store Word + case 42: // Store Word Left + case 46: // Store Word Right + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_LONG; + break; + case 63: // Store Doubleword + case 44: // Store Doubleword Left + case 45: // Store Doubleword Right + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_QUAD; + break; + /* Misc instructions unlikely to be used within CPU emulators */ + case 48: // Load Linked Word + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + break; + case 52: // Load Linked Doubleword + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + break; + case 56: // Store Conditional Word + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_LONG; + break; + case 60: // Store Conditional Doubleword + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_QUAD; + break; + } + + if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + return false; + } + + // Zero target register in case of a load operation + const int reg = (opcode >> 16) & 0x1f; + if (transfer_type == SIGSEGV_TRANSFER_LOAD) { + if (direction == 0) + regs[reg] = 0; + else { + // FIXME: untested code + unsigned long ea = regs[(opcode >> 21) & 0x1f]; + ea += (signed long)(signed int)(signed short)(opcode & 0xffff); + const int offset = ea & (transfer_size == SIZE_LONG ? 3 : 7); + unsigned long value; + if (direction > 0) { + const unsigned long rmask = ~((1L << ((offset + 1) * 8)) - 1); + value = regs[reg] & rmask; + } + else { + const unsigned long lmask = (1L << (offset * 8)) - 1; + value = regs[reg] & lmask; + } + // restore most significant bits + if (transfer_size == SIZE_LONG) + value = (signed long)(signed int)value; + regs[reg] = value; + } + } + +#if DEBUG +#if (defined(_ABIN32) || defined(_ABI64)) + static const char * mips_gpr_names[32] = { + "zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", + "t0", "t1", "t2", "t3", "t4", "t5", "t6", "t7", + "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", + "t8", "t9", "k0", "k1", "gp", "sp", "s8", "ra" + }; +#else + static const char * mips_gpr_names[32] = { + "zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", + "a4", "a5", "a6", "a7", "t0", "t1", "t2", "t3", + "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", + "t8", "t9", "k0", "k1", "gp", "sp", "s8", "ra" + }; +#endif + printf("%s %s register %s\n", + transfer_size == SIZE_BYTE ? "byte" : + transfer_size == SIZE_WORD ? "word" : + transfer_size == SIZE_LONG ? "long" : + transfer_size == SIZE_QUAD ? "quad" : "unknown", + transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", + mips_gpr_names[reg]); +#endif + + *pc_p += 4; + return true; +} +#endif + +// Decode and skip SPARC instruction +#if (defined(sparc) || defined(__sparc__)) +enum { +#if (defined(__sun__)) + SPARC_REG_G1 = REG_G1, + SPARC_REG_O0 = REG_O0, + SPARC_REG_PC = REG_PC, + SPARC_REG_nPC = REG_nPC +#endif +}; +static bool sparc_skip_instruction(unsigned long * regs, gwindows_t * gwins, struct rwindow * rwin) +{ + unsigned int * pc = (unsigned int *)regs[SPARC_REG_PC]; + + if (pc == 0) + return false; + +#if DEBUG + printf("IP: %p [%08x]\n", pc, pc[0]); +#endif + + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_LONG; + bool register_pair = false; + + const unsigned int opcode = pc[0]; + if ((opcode >> 30) != 3) + return false; + switch ((opcode >> 19) & 0x3f) { + case 9: // Load Signed Byte + case 1: // Load Unsigned Byte + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_BYTE; + break; + case 10:// Load Signed Halfword + case 2: // Load Unsigned Word + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_WORD; + break; + case 8: // Load Word + case 0: // Load Unsigned Word + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + break; + case 11:// Load Extended Word + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_QUAD; + break; + case 3: // Load Doubleword + transfer_type = SIGSEGV_TRANSFER_LOAD; + transfer_size = SIZE_LONG; + register_pair = true; + break; + case 5: // Store Byte + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_BYTE; + break; + case 6: // Store Halfword + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_WORD; + break; + case 4: // Store Word + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_LONG; + break; + case 14:// Store Extended Word + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_QUAD; + break; + case 7: // Store Doubleword + transfer_type = SIGSEGV_TRANSFER_STORE; + transfer_size = SIZE_LONG; + register_pair = true; + break; + } + + if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { + // Unknown machine code, let it crash. Then patch the decoder + return false; + } + + const int reg = (opcode >> 25) & 0x1f; + +#if DEBUG + static const char * reg_names[] = { + "g0", "g1", "g2", "g3", "g4", "g5", "g6", "g7", + "o0", "o1", "o2", "o3", "o4", "o5", "sp", "o7", + "l0", "l1", "l2", "l3", "l4", "l5", "l6", "l7", + "i0", "i1", "i2", "i3", "i4", "i5", "fp", "i7" + }; + printf("%s %s register %s\n", + transfer_size == SIZE_BYTE ? "byte" : + transfer_size == SIZE_WORD ? "word" : + transfer_size == SIZE_LONG ? "long" : + transfer_size == SIZE_QUAD ? "quad" : "unknown", + transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", + reg_names[reg]); +#endif + + // Zero target register in case of a load operation + if (transfer_type == SIGSEGV_TRANSFER_LOAD && reg != 0) { + // FIXME: code to handle local & input registers is not tested + if (reg >= 1 && reg < 8) { + // global registers + regs[reg - 1 + SPARC_REG_G1] = 0; + } + else if (reg >= 8 && reg < 16) { + // output registers + regs[reg - 8 + SPARC_REG_O0] = 0; + } + else if (reg >= 16 && reg < 24) { + // local registers (in register windows) + if (gwins) + gwins->wbuf->rw_local[reg - 16] = 0; + else + rwin->rw_local[reg - 16] = 0; + } + else { + // input registers (in register windows) + if (gwins) + gwins->wbuf->rw_in[reg - 24] = 0; + else + rwin->rw_in[reg - 24] = 0; + } + } + + regs[SPARC_REG_PC] += 4; + regs[SPARC_REG_nPC] += 4; + return true; +} +#endif +#endif + +// Decode and skip ARM instruction +#if (defined(arm) || defined(__arm__)) +enum { +#if (defined(__linux__)) + ARM_REG_PC = 15, + ARM_REG_CPSR = 16 +#endif +}; +static bool arm_skip_instruction(unsigned long * regs) +{ + unsigned int * pc = (unsigned int *)regs[ARM_REG_PC]; + + if (pc == 0) + return false; + +#if DEBUG + printf("IP: %p [%08x]\n", pc, pc[0]); +#endif + + transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; + transfer_size_t transfer_size = SIZE_UNKNOWN; + enum { op_sdt = 1, op_sdth = 2 }; + int op = 0; + + // Handle load/store instructions only + const unsigned int opcode = pc[0]; + switch ((opcode >> 25) & 7) { + case 0: // Halfword and Signed Data Transfer (LDRH, STRH, LDRSB, LDRSH) + op = op_sdth; + // Determine transfer size (S/H bits) + switch ((opcode >> 5) & 3) { + case 0: // SWP instruction + break; + case 1: // Unsigned halfwords + case 3: // Signed halfwords + transfer_size = SIZE_WORD; + break; + case 2: // Signed byte + transfer_size = SIZE_BYTE; + break; + } + break; + case 2: + case 3: // Single Data Transfer (LDR, STR) + op = op_sdt; + // Determine transfer size (B bit) + if (((opcode >> 22) & 1) == 1) + transfer_size = SIZE_BYTE; + else + transfer_size = SIZE_LONG; + break; + default: + // FIXME: support load/store mutliple? + return false; + } + + // Check for invalid transfer size (SWP instruction?) + if (transfer_size == SIZE_UNKNOWN) + return false; + + // Determine transfer type (L bit) + if (((opcode >> 20) & 1) == 1) + transfer_type = SIGSEGV_TRANSFER_LOAD; + else + transfer_type = SIGSEGV_TRANSFER_STORE; + + // Compute offset + int offset; + if (((opcode >> 25) & 1) == 0) { + if (op == op_sdt) + offset = opcode & 0xfff; + else if (op == op_sdth) { + int rm = opcode & 0xf; + if (((opcode >> 22) & 1) == 0) { + // register offset + offset = regs[rm]; + } + else { + // immediate offset + offset = ((opcode >> 4) & 0xf0) | (opcode & 0x0f); + } + } + } + else { + const int rm = opcode & 0xf; + const int sh = (opcode >> 7) & 0x1f; + if (((opcode >> 4) & 1) == 1) { + // we expect only legal load/store instructions + printf("FATAL: invalid shift operand\n"); + return false; + } + const unsigned int v = regs[rm]; + switch ((opcode >> 5) & 3) { + case 0: // logical shift left + offset = sh ? v << sh : v; + break; + case 1: // logical shift right + offset = sh ? v >> sh : 0; + break; + case 2: // arithmetic shift right + if (sh) + offset = ((signed int)v) >> sh; + else + offset = (v & 0x80000000) ? 0xffffffff : 0; + break; + case 3: // rotate right + if (sh) + offset = (v >> sh) | (v << (32 - sh)); + else + offset = (v >> 1) | ((regs[ARM_REG_CPSR] << 2) & 0x80000000); + break; + } + } + if (((opcode >> 23) & 1) == 0) + offset = -offset; + + int rd = (opcode >> 12) & 0xf; + int rn = (opcode >> 16) & 0xf; +#if DEBUG + static const char * reg_names[] = { + "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", + "r9", "r9", "sl", "fp", "ip", "sp", "lr", "pc" + }; + printf("%s %s register %s\n", + transfer_size == SIZE_BYTE ? "byte" : + transfer_size == SIZE_WORD ? "word" : + transfer_size == SIZE_LONG ? "long" : "unknown", + transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", + reg_names[rd]); +#endif + + unsigned int base = regs[rn]; + if (((opcode >> 24) & 1) == 1) + base += offset; + + if (transfer_type == SIGSEGV_TRANSFER_LOAD) + regs[rd] = 0; + + if (((opcode >> 24) & 1) == 0) // post-index addressing + regs[rn] += offset; + else if (((opcode >> 21) & 1) == 1) // write-back address into base + regs[rn] = base; + + regs[ARM_REG_PC] += 4; + return true; +} +#endif + + +// Fallbacks +#ifndef SIGSEGV_FAULT_ADDRESS_FAST +#define SIGSEGV_FAULT_ADDRESS_FAST SIGSEGV_FAULT_ADDRESS +#endif +#ifndef SIGSEGV_FAULT_INSTRUCTION_FAST +#define SIGSEGV_FAULT_INSTRUCTION_FAST SIGSEGV_FAULT_INSTRUCTION +#endif +#ifndef SIGSEGV_FAULT_INSTRUCTION +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_INVALID_ADDRESS +#endif +#ifndef SIGSEGV_FAULT_HANDLER_ARGLIST_1 +#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 SIGSEGV_FAULT_HANDLER_ARGLIST +#endif +#ifndef SIGSEGV_FAULT_HANDLER_INVOKE +#define SIGSEGV_FAULT_HANDLER_INVOKE(P) sigsegv_fault_handler(P) +#endif + +// SIGSEGV recovery supported ? +#if defined(SIGSEGV_ALL_SIGNALS) && defined(SIGSEGV_FAULT_HANDLER_ARGLIST) && defined(SIGSEGV_FAULT_ADDRESS) +#define HAVE_SIGSEGV_RECOVERY +#endif + + +/* + * SIGSEGV global handler + */ + +#ifdef HAVE_MACH_EXCEPTIONS +#ifdef EMULATED_PPC +static void mach_get_exception_state(sigsegv_info_t *SIP) +{ + SIP->exc_state_count = SIGSEGV_EXCEPTION_STATE_COUNT; + kern_return_t krc = thread_get_state(SIP->thread, + SIGSEGV_EXCEPTION_STATE_FLAVOR, + (natural_t *)&SIP->exc_state, + &SIP->exc_state_count); + MACH_CHECK_ERROR(thread_get_state, krc); + SIP->has_exc_state = true; +} +#endif + +static void mach_get_thread_state(sigsegv_info_t *SIP) +{ + SIP->thr_state_count = SIGSEGV_THREAD_STATE_COUNT; + kern_return_t krc = thread_get_state(SIP->thread, + SIGSEGV_THREAD_STATE_FLAVOR, + (natural_t *)&SIP->thr_state, + &SIP->thr_state_count); + MACH_CHECK_ERROR(thread_get_state, krc); + SIP->has_thr_state = true; +} + +static void mach_set_thread_state(sigsegv_info_t *SIP) +{ + kern_return_t krc = thread_set_state(SIP->thread, + SIGSEGV_THREAD_STATE_FLAVOR, + (natural_t *)&SIP->thr_state, + SIP->thr_state_count); + MACH_CHECK_ERROR(thread_set_state, krc); +} +#endif + +// Return the address of the invalid memory reference +sigsegv_address_t sigsegv_get_fault_address(sigsegv_info_t *SIP) +{ +#ifdef HAVE_MACH_EXCEPTIONS +#ifdef EMULATED_PPC + static int use_fast_path = -1; + if (use_fast_path != 1 && !SIP->has_exc_state) { + mach_get_exception_state(SIP); + + sigsegv_address_t addr = (sigsegv_address_t)SIGSEGV_FAULT_ADDRESS; + if (use_fast_path < 0) { + const char *machfault = getenv("SIGSEGV_MACH_FAULT"); + if (machfault) { + if (strcmp(machfault, "fast") == 0) + use_fast_path = 1; + else if (strcmp(machfault, "slow") == 0) + use_fast_path = 0; + } + if (use_fast_path < 0) + use_fast_path = addr == SIP->addr; + } + SIP->addr = addr; + } +#endif +#endif + return SIP->addr; +} + +// Return the address of the instruction that caused the fault, or +// SIGSEGV_INVALID_ADDRESS if we could not retrieve this information +sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) +{ +#ifdef HAVE_MACH_EXCEPTIONS +#ifdef EMULATED_PPC + if (!SIP->has_thr_state) { + mach_get_thread_state(SIP); + + SIP->pc = (sigsegv_address_t)SIGSEGV_FAULT_INSTRUCTION; + } +#endif +#endif + return SIP->pc; +} + +// This function handles the badaccess to memory. +// It is called from the signal handler or the exception handler. +static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) +{ + sigsegv_info_t SI; + SI.addr = (sigsegv_address_t)SIGSEGV_FAULT_ADDRESS_FAST; + SI.pc = (sigsegv_address_t)SIGSEGV_FAULT_INSTRUCTION_FAST; +#ifdef HAVE_MACH_EXCEPTIONS + SI.thread = thread; + SI.has_exc_state = false; + SI.has_thr_state = false; +#endif + sigsegv_info_t * const SIP = &SI; + + // Call user's handler and reinstall the global handler, if required + switch (SIGSEGV_FAULT_HANDLER_INVOKE(SIP)) { + case SIGSEGV_RETURN_SUCCESS: + return true; + +#if HAVE_SIGSEGV_SKIP_INSTRUCTION + case SIGSEGV_RETURN_SKIP_INSTRUCTION: + // Call the instruction skipper with the register file + // available +#ifdef HAVE_MACH_EXCEPTIONS + if (!SIP->has_thr_state) + mach_get_thread_state(SIP); +#endif + if (SIGSEGV_SKIP_INSTRUCTION(SIGSEGV_REGISTER_FILE)) { +#ifdef HAVE_MACH_EXCEPTIONS + // Unlike UNIX signals where the thread state + // is modified off of the stack, in Mach we + // need to actually call thread_set_state to + // have the register values updated. + mach_set_thread_state(SIP); +#endif + return true; + } + break; +#endif + case SIGSEGV_RETURN_FAILURE: + // We can't do anything with the fault_address, dump state? + if (sigsegv_state_dumper != 0) + sigsegv_state_dumper(SIP); + break; + } + + return false; +} + + +/* + * There are two mechanisms for handling a bad memory access, + * Mach exceptions and UNIX signals. The implementation specific + * code appears below. Its reponsibility is to call handle_badaccess + * which is the routine that handles the fault in an implementation + * agnostic manner. The implementation specific code below is then + * reponsible for checking whether handle_badaccess was able + * to handle the memory access error and perform any implementation + * specific tasks necessary afterwards. + */ + +#ifdef HAVE_MACH_EXCEPTIONS +/* + * We need to forward all exceptions that we do not handle. + * This is important, there are many exceptions that may be + * handled by other exception handlers. For example debuggers + * use exceptions and the exception hander is in another + * process in such a case. (Timothy J. Wood states in his + * message to the list that he based this code on that from + * gdb for Darwin.) + */ +static inline kern_return_t +forward_exception(mach_port_t thread_port, + mach_port_t task_port, + exception_type_t exception_type, + mach_exception_data_t exception_data, + mach_msg_type_number_t data_count, + ExceptionPorts *oldExceptionPorts) +{ + kern_return_t kret; + unsigned int portIndex; + mach_port_t port; + exception_behavior_t behavior; + thread_state_flavor_t flavor; + thread_state_data_t thread_state; + mach_msg_type_number_t thread_state_count; + + for (portIndex = 0; portIndex < oldExceptionPorts->maskCount; portIndex++) { + if (oldExceptionPorts->masks[portIndex] & (1 << exception_type)) { + // This handler wants the exception + break; + } + } + + if (portIndex >= oldExceptionPorts->maskCount) { + fprintf(stderr, "No handler for exception_type = %d. Not fowarding\n", exception_type); + return KERN_FAILURE; + } + + port = oldExceptionPorts->handlers[portIndex]; + behavior = oldExceptionPorts->behaviors[portIndex]; + flavor = oldExceptionPorts->flavors[portIndex]; + + if (!VALID_THREAD_STATE_FLAVOR(flavor)) { + fprintf(stderr, "Invalid thread_state flavor = %d. Not forwarding\n", flavor); + return KERN_FAILURE; + } + + /* + fprintf(stderr, "forwarding exception, port = 0x%x, behaviour = %d, flavor = %d\n", port, behavior, flavor); + */ + + if (behavior != EXCEPTION_DEFAULT) { + thread_state_count = THREAD_STATE_MAX; + kret = thread_get_state (thread_port, flavor, (natural_t *)&thread_state, + &thread_state_count); + MACH_CHECK_ERROR (thread_get_state, kret); + } + + switch (behavior) { + case EXCEPTION_DEFAULT: + // fprintf(stderr, "forwarding to exception_raise\n"); + kret = mach_exception_raise(port, thread_port, task_port, exception_type, + exception_data, data_count); + MACH_CHECK_ERROR (mach_exception_raise, kret); + break; + case EXCEPTION_STATE: + // fprintf(stderr, "forwarding to exception_raise_state\n"); + kret = mach_exception_raise_state(port, exception_type, exception_data, + data_count, &flavor, + (natural_t *)&thread_state, thread_state_count, + (natural_t *)&thread_state, &thread_state_count); + MACH_CHECK_ERROR (mach_exception_raise_state, kret); + break; + case EXCEPTION_STATE_IDENTITY: + // fprintf(stderr, "forwarding to exception_raise_state_identity\n"); + kret = mach_exception_raise_state_identity(port, thread_port, task_port, + exception_type, exception_data, + data_count, &flavor, + (natural_t *)&thread_state, thread_state_count, + (natural_t *)&thread_state, &thread_state_count); + MACH_CHECK_ERROR (mach_exception_raise_state_identity, kret); + break; + default: + fprintf(stderr, "forward_exception got unknown behavior\n"); + kret = KERN_FAILURE; + break; + } + + if (behavior != EXCEPTION_DEFAULT) { + kret = thread_set_state (thread_port, flavor, (natural_t *)&thread_state, + thread_state_count); + MACH_CHECK_ERROR (thread_set_state, kret); + } + + return kret; +} + +/* + * This is the code that actually handles the exception. + * It is called by exc_server. For Darwin 5 Apple changed + * this a bit from how this family of functions worked in + * Mach. If you are familiar with that it is a little + * different. The main variation that concerns us here is + * that code is an array of exception specific codes and + * codeCount is a count of the number of codes in the code + * array. In typical Mach all exceptions have a code + * and sub-code. It happens to be the case that for a + * EXC_BAD_ACCESS exception the first entry is the type of + * bad access that occurred and the second entry is the + * faulting address so these entries correspond exactly to + * how the code and sub-code are used on Mach. + * + * This is a MIG interface. No code in Basilisk II should + * call this directley. This has to have external C + * linkage because that is what exc_server expects. + */ +kern_return_t +catch_mach_exception_raise(mach_port_t exception_port, + mach_port_t thread, + mach_port_t task, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t code_count) +{ + kern_return_t krc; + + if (exception == EXC_BAD_ACCESS) { + switch (code[0]) { + case KERN_PROTECTION_FAILURE: + case KERN_INVALID_ADDRESS: + if (handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGS)) + return KERN_SUCCESS; + break; + } + } + + // In Mach we do not need to remove the exception handler. + // If we forward the exception, eventually some exception handler + // will take care of this exception. + krc = forward_exception(thread, task, exception, code, code_count, &ports); + + return krc; +} + +/* XXX: borrowed from launchd and gdb */ +kern_return_t +catch_mach_exception_raise_state(mach_port_t exception_port, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t code_count, + int *flavor, + thread_state_t old_state, + mach_msg_type_number_t old_state_count, + thread_state_t new_state, + mach_msg_type_number_t *new_state_count) +{ + memcpy(new_state, old_state, old_state_count * sizeof(old_state[0])); + *new_state_count = old_state_count; + return KERN_SUCCESS; +} + +/* XXX: borrowed from launchd and gdb */ +kern_return_t +catch_mach_exception_raise_state_identity(mach_port_t exception_port, + mach_port_t thread_port, + mach_port_t task_port, + exception_type_t exception, + mach_exception_data_t code, + mach_msg_type_number_t code_count, + int *flavor, + thread_state_t old_state, + mach_msg_type_number_t old_state_count, + thread_state_t new_state, + mach_msg_type_number_t *new_state_count) +{ + kern_return_t kret; + + memcpy(new_state, old_state, old_state_count * sizeof(old_state[0])); + *new_state_count = old_state_count; + + kret = mach_port_deallocate(mach_task_self(), task_port); + MACH_CHECK_ERROR(mach_port_deallocate, kret); + kret = mach_port_deallocate(mach_task_self(), thread_port); + MACH_CHECK_ERROR(mach_port_deallocate, kret); + + return KERN_SUCCESS; +} +#endif + +#ifdef HAVE_SIGSEGV_RECOVERY +// Handle bad memory accesses with signal handler +static void sigsegv_handler(SIGSEGV_FAULT_HANDLER_ARGLIST) +{ + // Call handler and reinstall the global handler, if required + if (handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGS)) { +#if (defined(HAVE_SIGACTION) ? defined(SIGACTION_NEED_REINSTALL) : defined(SIGNAL_NEED_REINSTALL)) + sigsegv_do_install_handler(sig); +#endif + return; + } + + // Failure: reinstall default handler for "safe" crash +#define FAULT_HANDLER(sig) signal(sig, SIG_DFL); + SIGSEGV_ALL_SIGNALS +#undef FAULT_HANDLER +} +#endif + + +/* + * SIGSEGV handler initialization + */ + +#if defined(HAVE_SIGINFO_T) +static bool sigsegv_do_install_handler(int sig) +{ + // Setup SIGSEGV handler to process writes to frame buffer +#ifdef HAVE_SIGACTION + struct sigaction sigsegv_sa; + memset(&sigsegv_sa, 0, sizeof(struct sigaction)); + sigemptyset(&sigsegv_sa.sa_mask); + sigsegv_sa.sa_sigaction = sigsegv_handler; + sigsegv_sa.sa_flags = SA_SIGINFO; + return (sigaction(sig, &sigsegv_sa, 0) == 0); +#else + return (signal(sig, (signal_handler)sigsegv_handler) != SIG_ERR); +#endif +} +#endif + +#if defined(HAVE_SIGCONTEXT_SUBTERFUGE) +static bool sigsegv_do_install_handler(int sig) +{ + // Setup SIGSEGV handler to process writes to frame buffer +#ifdef HAVE_SIGACTION + struct sigaction sigsegv_sa; + memset(&sigsegv_sa, 0, sizeof(struct sigaction)); + sigemptyset(&sigsegv_sa.sa_mask); + sigsegv_sa.sa_handler = (signal_handler)sigsegv_handler; + sigsegv_sa.sa_flags = 0; +#if !EMULATED_68K && defined(__NetBSD__) + sigaddset(&sigsegv_sa.sa_mask, SIGALRM); + sigsegv_sa.sa_flags |= SA_ONSTACK; +#endif + return (sigaction(sig, &sigsegv_sa, 0) == 0); +#else + return (signal(sig, (signal_handler)sigsegv_handler) != SIG_ERR); +#endif +} +#endif + +#if defined(HAVE_MACH_EXCEPTIONS) +static bool sigsegv_do_install_handler(sigsegv_fault_handler_t handler) +{ + /* + * Except for the exception port functions, this should be + * pretty much stock Mach. If later you choose to support + * other Mach's besides Darwin, just check for __MACH__ + * here and __APPLE__ where the actual differences are. + */ +#if defined(__APPLE__) && defined(__MACH__) + if (sigsegv_fault_handler != NULL) { + sigsegv_fault_handler = handler; + return true; + } + + kern_return_t krc; + + // create the the exception port + krc = mach_port_allocate(mach_task_self(), + MACH_PORT_RIGHT_RECEIVE, &_exceptionPort); + if (krc != KERN_SUCCESS) { + mach_error("mach_port_allocate", krc); + return false; + } + + // add a port send right + krc = mach_port_insert_right(mach_task_self(), + _exceptionPort, _exceptionPort, + MACH_MSG_TYPE_MAKE_SEND); + if (krc != KERN_SUCCESS) { + mach_error("mach_port_insert_right", krc); + return false; + } + + // get the old exception ports + ports.maskCount = sizeof (ports.masks) / sizeof (ports.masks[0]); + krc = thread_get_exception_ports(mach_thread_self(), EXC_MASK_BAD_ACCESS, ports.masks, + &ports.maskCount, ports.handlers, ports.behaviors, ports.flavors); + if (krc != KERN_SUCCESS) { + mach_error("thread_get_exception_ports", krc); + return false; + } + + // set the new exception port + // + // We could have used EXCEPTION_STATE_IDENTITY instead of + // EXCEPTION_DEFAULT to get the thread state in the initial + // message, but it turns out that in the common case this is not + // neccessary. If we need it we can later ask for it from the + // suspended thread. + // + // Even with THREAD_STATE_NONE, Darwin provides the program + // counter in the thread state. The comments in the header file + // seem to imply that you can count on the GPR's on an exception + // as well but just to be safe I use MACHINE_THREAD_STATE because + // you have to ask for all of the GPR's anyway just to get the + // program counter. In any case because of update effective + // address from immediate and update address from effective + // addresses of ra and rb modes (as good an name as any for these + // addressing modes) used in PPC instructions, you will need the + // GPR state anyway. + krc = thread_set_exception_ports(mach_thread_self(), EXC_MASK_BAD_ACCESS, _exceptionPort, + EXCEPTION_DEFAULT | MACH_EXCEPTION_CODES, SIGSEGV_THREAD_STATE_FLAVOR); + if (krc != KERN_SUCCESS) { + mach_error("thread_set_exception_ports", krc); + return false; + } + + // create the exception handler thread + if (pthread_create(&exc_thread, NULL, &handleExceptions, NULL) != 0) { + (void)fprintf(stderr, "creation of exception thread failed\n"); + return false; + } + + // do not care about the exception thread any longer, let is run standalone + (void)pthread_detach(exc_thread); + + sigsegv_fault_handler = handler; + return true; +#else + return false; +#endif +} +#endif + +#ifdef HAVE_WIN32_EXCEPTIONS +static LONG WINAPI main_exception_filter(EXCEPTION_POINTERS *ExceptionInfo) +{ + if (sigsegv_fault_handler != NULL + && ExceptionInfo->ExceptionRecord->ExceptionCode == EXCEPTION_ACCESS_VIOLATION + && ExceptionInfo->ExceptionRecord->NumberParameters >= 2 + && handle_badaccess(ExceptionInfo)) + return EXCEPTION_CONTINUE_EXECUTION; + + return EXCEPTION_CONTINUE_SEARCH; +} + +#if defined __CYGWIN__ && defined __i386__ +/* In Cygwin programs, SetUnhandledExceptionFilter has no effect because Cygwin + installs a global exception handler. We have to dig deep in order to install + our main_exception_filter. */ + +/* Data structures for the current thread's exception handler chain. + On the x86 Windows uses register fs, offset 0 to point to the current + exception handler; Cygwin mucks with it, so we must do the same... :-/ */ + +/* Magic taken from winsup/cygwin/include/exceptions.h. */ + +struct exception_list { + struct exception_list *prev; + int (*handler) (EXCEPTION_RECORD *, void *, CONTEXT *, void *); +}; +typedef struct exception_list exception_list; + +/* Magic taken from winsup/cygwin/exceptions.cc. */ + +__asm__ (".equ __except_list,0"); + +extern exception_list *_except_list __asm__ ("%fs:__except_list"); + +/* For debugging. _except_list is not otherwise accessible from gdb. */ +static exception_list * +debug_get_except_list () +{ + return _except_list; +} + +/* Cygwin's original exception handler. */ +static int (*cygwin_exception_handler) (EXCEPTION_RECORD *, void *, CONTEXT *, void *); + +/* Our exception handler. */ +static int +libsigsegv_exception_handler (EXCEPTION_RECORD *exception, void *frame, CONTEXT *context, void *dispatch) +{ + EXCEPTION_POINTERS ExceptionInfo; + ExceptionInfo.ExceptionRecord = exception; + ExceptionInfo.ContextRecord = context; + if (main_exception_filter (&ExceptionInfo) == EXCEPTION_CONTINUE_SEARCH) + return cygwin_exception_handler (exception, frame, context, dispatch); + else + return 0; +} + +static void +do_install_main_exception_filter () +{ + /* We cannot insert any handler into the chain, because such handlers + must lie on the stack (?). Instead, we have to replace(!) Cygwin's + global exception handler. */ + cygwin_exception_handler = _except_list->handler; + _except_list->handler = libsigsegv_exception_handler; +} + +#else + +static void +do_install_main_exception_filter () +{ + SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) &main_exception_filter); +} +#endif + +static bool sigsegv_do_install_handler(sigsegv_fault_handler_t handler) +{ + static bool main_exception_filter_installed = false; + if (!main_exception_filter_installed) { + do_install_main_exception_filter(); + main_exception_filter_installed = true; + } + sigsegv_fault_handler = handler; + return true; +} +#endif + +bool sigsegv_install_handler(sigsegv_fault_handler_t handler) +{ +#if defined(HAVE_SIGSEGV_RECOVERY) + bool success = true; +#define FAULT_HANDLER(sig) success = success && sigsegv_do_install_handler(sig); + SIGSEGV_ALL_SIGNALS +#undef FAULT_HANDLER + if (success) + sigsegv_fault_handler = handler; + return success; +#elif defined(HAVE_MACH_EXCEPTIONS) || defined(HAVE_WIN32_EXCEPTIONS) + return sigsegv_do_install_handler(handler); +#else + // FAIL: no siginfo_t nor sigcontext subterfuge is available + return false; +#endif +} + + +/* + * SIGSEGV handler deinitialization + */ + +void sigsegv_deinstall_handler(void) +{ + // We do nothing for Mach exceptions, the thread would need to be + // suspended if not already so, and we might mess with other + // exception handlers that came after we registered ours. There is + // no need to remove the exception handler, in fact this function is + // not called anywhere in Basilisk II. +#ifdef HAVE_SIGSEGV_RECOVERY + sigsegv_fault_handler = 0; +#define FAULT_HANDLER(sig) signal(sig, SIG_DFL); + SIGSEGV_ALL_SIGNALS +#undef FAULT_HANDLER +#endif +#ifdef HAVE_WIN32_EXCEPTIONS + sigsegv_fault_handler = NULL; +#endif +} + + +/* + * Set callback function when we cannot handle the fault + */ + +void sigsegv_set_dump_state(sigsegv_state_dumper_t handler) +{ + sigsegv_state_dumper = handler; +} + + +/* + * Test program used for configure/test + */ + +#ifdef CONFIGURE_TEST_SIGSEGV_RECOVERY +#include +#include +#include +#ifdef HAVE_SYS_MMAN_H +#include +#endif +#include "vm_alloc.h" + +const int REF_INDEX = 123; +const int REF_VALUE = 45; + +static sigsegv_uintptr_t page_size; +static volatile char * page = 0; +static volatile int handler_called = 0; + +/* Barriers */ +#ifdef __GNUC__ +#define BARRIER() asm volatile ("" : : : "memory") +#else +#define BARRIER() /* nothing */ +#endif + +#ifdef __GNUC__ +// Code range where we expect the fault to come from +static void *b_region, *e_region; +#endif + +static sigsegv_return_t sigsegv_test_handler(sigsegv_info_t *sip) +{ + const sigsegv_address_t fault_address = sigsegv_get_fault_address(sip); + const sigsegv_address_t instruction_address = sigsegv_get_fault_instruction_address(sip); +#if DEBUG + printf("sigsegv_test_handler(%p, %p)\n", fault_address, instruction_address); + printf("expected fault at %p\n", page + REF_INDEX); +#ifdef __GNUC__ + printf("expected instruction address range: %p-%p\n", b_region, e_region); +#endif +#endif + handler_called++; + if ((fault_address - REF_INDEX) != page) + exit(10); +#ifdef __GNUC__ + // Make sure reported fault instruction address falls into + // expected code range + if (instruction_address != SIGSEGV_INVALID_ADDRESS + && ((instruction_address < (sigsegv_address_t)b_region) || + (instruction_address >= (sigsegv_address_t)e_region))) + exit(11); +#endif + if (vm_protect((char *)((sigsegv_uintptr_t)fault_address & -page_size), page_size, VM_PAGE_READ | VM_PAGE_WRITE) != 0) + exit(12); + return SIGSEGV_RETURN_SUCCESS; +} + +#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION +static sigsegv_return_t sigsegv_insn_handler(sigsegv_info_t *sip) +{ + const sigsegv_address_t fault_address = sigsegv_get_fault_address(sip); + const sigsegv_address_t instruction_address = sigsegv_get_fault_instruction_address(sip); +#if DEBUG + printf("sigsegv_insn_handler(%p, %p)\n", fault_address, instruction_address); + printf("expected instruction address range: %p-%p\n", b_region, e_region); +#endif + if (((sigsegv_uintptr_t)fault_address - (sigsegv_uintptr_t)page) < page_size) { +#ifdef __GNUC__ + // Make sure reported fault instruction address falls into + // expected code range + if (instruction_address != SIGSEGV_INVALID_ADDRESS + && ((instruction_address < (sigsegv_address_t)b_region) || + (instruction_address >= (sigsegv_address_t)e_region))) + return SIGSEGV_RETURN_FAILURE; +#endif + return SIGSEGV_RETURN_SKIP_INSTRUCTION; + } + + return SIGSEGV_RETURN_FAILURE; +} + +// More sophisticated tests for instruction skipper +static bool arch_insn_skipper_tests() +{ +#if (defined(i386) || defined(__i386__)) || (defined(__x86_64__) || defined(_M_X64)) + static const unsigned char code[] = { + 0x8a, 0x00, // mov (%eax),%al + 0x8a, 0x2c, 0x18, // mov (%eax,%ebx,1),%ch + 0x88, 0x20, // mov %ah,(%eax) + 0x88, 0x08, // mov %cl,(%eax) + 0x66, 0x8b, 0x00, // mov (%eax),%ax + 0x66, 0x8b, 0x0c, 0x18, // mov (%eax,%ebx,1),%cx + 0x66, 0x89, 0x00, // mov %ax,(%eax) + 0x66, 0x89, 0x0c, 0x18, // mov %cx,(%eax,%ebx,1) + 0x8b, 0x00, // mov (%eax),%eax + 0x8b, 0x0c, 0x18, // mov (%eax,%ebx,1),%ecx + 0x89, 0x00, // mov %eax,(%eax) + 0x89, 0x0c, 0x18, // mov %ecx,(%eax,%ebx,1) +#if defined(__x86_64__) || defined(_M_X64) + 0x44, 0x8a, 0x00, // mov (%rax),%r8b + 0x44, 0x8a, 0x20, // mov (%rax),%r12b + 0x42, 0x8a, 0x3c, 0x10, // mov (%rax,%r10,1),%dil + 0x44, 0x88, 0x00, // mov %r8b,(%rax) + 0x44, 0x88, 0x20, // mov %r12b,(%rax) + 0x42, 0x88, 0x3c, 0x10, // mov %dil,(%rax,%r10,1) + 0x66, 0x44, 0x8b, 0x00, // mov (%rax),%r8w + 0x66, 0x42, 0x8b, 0x0c, 0x10, // mov (%rax,%r10,1),%cx + 0x66, 0x44, 0x89, 0x00, // mov %r8w,(%rax) + 0x66, 0x42, 0x89, 0x0c, 0x10, // mov %cx,(%rax,%r10,1) + 0x44, 0x8b, 0x00, // mov (%rax),%r8d + 0x42, 0x8b, 0x0c, 0x10, // mov (%rax,%r10,1),%ecx + 0x44, 0x89, 0x00, // mov %r8d,(%rax) + 0x42, 0x89, 0x0c, 0x10, // mov %ecx,(%rax,%r10,1) + 0x48, 0x8b, 0x08, // mov (%rax),%rcx + 0x4c, 0x8b, 0x18, // mov (%rax),%r11 + 0x4a, 0x8b, 0x0c, 0x10, // mov (%rax,%r10,1),%rcx + 0x4e, 0x8b, 0x1c, 0x10, // mov (%rax,%r10,1),%r11 + 0x48, 0x89, 0x08, // mov %rcx,(%rax) + 0x4c, 0x89, 0x18, // mov %r11,(%rax) + 0x4a, 0x89, 0x0c, 0x10, // mov %rcx,(%rax,%r10,1) + 0x4e, 0x89, 0x1c, 0x10, // mov %r11,(%rax,%r10,1) + 0x63, 0x47, 0x04, // movslq 4(%rdi),%eax + 0x48, 0x63, 0x47, 0x04, // movslq 4(%rdi),%rax +#endif + 0 // end + }; + const int N_REGS = 20; + SIGSEGV_REGISTER_TYPE regs[N_REGS]; + for (int i = 0; i < N_REGS; i++) + regs[i] = i; + const sigsegv_uintptr_t start_code = (sigsegv_uintptr_t)&code; + regs[X86_REG_EIP] = start_code; + while ((regs[X86_REG_EIP] - start_code) < (sizeof(code) - 1) + && ix86_skip_instruction(regs)) + ; /* simply iterate */ + return (regs[X86_REG_EIP] - start_code) == (sizeof(code) - 1); +#endif + return true; +} +#endif + +int main(void) +{ + if (vm_init() < 0) + return 1; + + page_size = vm_get_page_size(); + if ((page = (char *)vm_acquire(page_size)) == VM_MAP_FAILED) + return 2; + + memset((void *)page, 0, page_size); + if (vm_protect((char *)page, page_size, VM_PAGE_READ) < 0) + return 3; + + if (!sigsegv_install_handler(sigsegv_test_handler)) + return 4; + +#ifdef __GNUC__ + b_region = &&L_b_region1; + e_region = &&L_e_region1; +#endif + /* This is a really awful hack but otherwise gcc is smart enough + * (or bug'ous enough?) to optimize the labels and place them + * e.g. at the "main" entry point, which is wrong. + */ + volatile int label_hack = 3; + switch (label_hack) { + case 3: + L_b_region1: + page[REF_INDEX] = REF_VALUE; + if (page[REF_INDEX] != REF_VALUE) + exit(20); + page[REF_INDEX] = REF_VALUE; + BARRIER(); + // fall-through + case 2: + L_e_region1: + BARRIER(); + break; + } + + if (handler_called != 1) + return 5; + +#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION + if (!sigsegv_install_handler(sigsegv_insn_handler)) + return 6; + + if (vm_protect((char *)page, page_size, VM_PAGE_READ | VM_PAGE_WRITE) < 0) + return 7; + + for (int i = 0; i < page_size; i++) + page[i] = (i + 1) % page_size; + + if (vm_protect((char *)page, page_size, VM_PAGE_NOACCESS) < 0) + return 8; + +#define TEST_SKIP_INSTRUCTION(TYPE) do { \ + const unsigned long TAG = 0x12345678 | \ + (sizeof(long) == 8 ? 0x9abcdef0UL << 31 : 0); \ + TYPE data = *((TYPE *)(page + sizeof(TYPE))); \ + volatile unsigned long effect = data + TAG; \ + if (effect != TAG) \ + return 9; \ + } while (0) + +#ifdef __GNUC__ + b_region = &&L_b_region2; + e_region = &&L_e_region2; +#ifdef DEBUG + printf("switch footage : \n"); + printf(" 4 : %p\n", &&L_b_4_region2); + printf(" 5 : %p\n", &&L_b_5_region2); + printf(" 8 : %p\n", &&L_b_8_region2); + printf(" 6 : %p\n", &&L_b_6_region2); + printf(" 7 : %p\n", &&L_b_7_region2); + printf(" 9 : %p\n", &&L_b_9_region2); + printf(" 1 : %p\n", &&L_b_1_region2); +#endif +#endif + switch (label_hack) { + case 3: + L_b_region2: + TEST_SKIP_INSTRUCTION(unsigned char); + BARRIER(); + case 4: + L_b_4_region2: + TEST_SKIP_INSTRUCTION(unsigned short); + BARRIER(); + case 5: + L_b_5_region2: + TEST_SKIP_INSTRUCTION(unsigned int); + BARRIER(); + case 8: + L_b_8_region2: + TEST_SKIP_INSTRUCTION(unsigned long); + BARRIER(); + case 6: + L_b_6_region2: + TEST_SKIP_INSTRUCTION(signed char); + BARRIER(); + case 7: + L_b_7_region2: + TEST_SKIP_INSTRUCTION(signed short); + BARRIER(); + case 9: + L_b_9_region2: + TEST_SKIP_INSTRUCTION(signed int); + BARRIER(); + case 1: + L_b_1_region2: + TEST_SKIP_INSTRUCTION(signed long); + BARRIER(); + // fall-through + case 2: + L_e_region2: + BARRIER(); + break; + } + if (!arch_insn_skipper_tests()) + return 20; +#endif + + vm_exit(); + return 0; +} +#endif From f170a527b21de23178666ffb6be693d4996e8272 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 22 Nov 2017 11:27:42 +0900 Subject: [PATCH 184/534] 64-bit JIT --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 62 ++++ .../basic-dyngen-ops-x86_64.hpp | 316 ++++++++++++------ .../ppc-dyngen-ops-x86_64.hpp | 251 +++++++++----- SheepShaver/src/Unix/main_unix.cpp | 5 +- SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 2 +- 5 files changed, 464 insertions(+), 172 deletions(-) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index f1322d1e7..87a8c6bfe 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2606,6 +2606,18 @@ sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) return SIP->pc; } +extern uint8_t gZeroPage[0x3000], gKernelData[0x2000]; +extern uint8_t *RAMBaseHost, *ROMEndHost; + +inline static uint8_t *cnvAdr(uint32_t a) { + if (a < 0x3000) return &gZeroPage[a]; + else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) return &gKernelData[a & 0x1fff]; + return (uint8_t *)(long)a; +} +inline static bool isValidAdr(uint8_t *a) { + return (a >= RAMBaseHost && a < ROMEndHost) || (a >= gZeroPage && a < &gZeroPage[0x3000]) || (a >= gKernelData && a < &gKernelData[0x2000]); +} + // This function handles the badaccess to memory. // It is called from the signal handler or the exception handler. static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) @@ -2620,6 +2632,56 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) #endif sigsegv_info_t * const SIP = &SI; + if (!SIP->has_thr_state) + mach_get_thread_state(SIP); + +#if defined(__APPLE__) && defined(__x86_64__) + x86_thread_state64_t *ts = &SIP->thr_state; + uint8_t *rip = (uint8_t *)ts->__rip; + switch (rip[0]) { + case 0x48: + if (rip[1] == 0xc7 && rip[2] == 0) { + uint8_t *p = cnvAdr(ts->__rax); + if (isValidAdr(p)) *(uint64_t *)p = rip[3] | rip[4] << 8 | rip[5] << 16 | rip[6] << 24; + ts->__rip += 7; + mach_set_thread_state(SIP); + return true; + } + else if (rip[1] == 0xc7 && rip[2] == 0x40) { + uint8_t *p = cnvAdr(ts->__rax + (signed char)rip[3]); + if (isValidAdr(p)) *(uint64_t *)p = rip[4] | rip[5] << 8 | rip[6] << 16 | rip[7] << 24; + ts->__rip += 8; + mach_set_thread_state(SIP); + return true; + } + break; + case 0x89: + if (rip[1] == 2) { + uint8_t *p = cnvAdr(ts->__rdx); + if (isValidAdr(p)) *(uint32_t *)p = ts->__rax; + ts->__rip += 2; + mach_set_thread_state(SIP); + return true; + } + else if (rip[1] == 0x10) { + uint8_t *p = cnvAdr(ts->__rax); + if (isValidAdr(p)) *(uint32_t *)p = ts->__rdx; + ts->__rip += 2; + mach_set_thread_state(SIP); + return true; + } + break; + case 0x8b: + if (rip[1] == 0) { + uint8_t *p = cnvAdr(ts->__rax); + ts->__rax = isValidAdr(p) ? *(uint32_t *)p : 0; + ts->__rip += 2; + mach_set_thread_state(SIP); + return true; + } + break; + } +#endif // Call user's handler and reinstall the global handler, if required switch (SIGSEGV_FAULT_HANDLER_INVOKE(SIP)) { case SIGSEGV_RETURN_SUCCESS: diff --git a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp index 7893a1e4b..90361874c 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp @@ -1,3 +1,30 @@ +#define ADD_RAX_RCX 0x01,0xc8 +#define ADD_RDX_RCX 0x01,0xca +#define ADD_RAX_RDX 0x01,0xd0 +#define TRANS_RAX \ + 0x48,0x3D,0x00,0x30,0x00,0x00,\ + 0x72,0x16,\ + 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x14,\ + 0x48,0x25,0xFF,0x1F,0x00,0x00,\ + 0x48,0x05,0x00,0x00,0x00,0x00,\ + 0xEB,0x06,\ + 0x48,0x05,0x00,0x00,0x00,0x00 + +#define TRANS_RDX \ + 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ + 0x72,0x19,\ + 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x17,\ + 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ + 0xEB,0x07,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 + +#ifdef DYNGEN_IMPL +extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif + #ifndef DEFINE_CST #define DEFINE_CST(NAME, VALUE) #endif @@ -1324,10 +1351,14 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u8_T0_T1_0 { static const uint8 op_load_u8_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x44, 0x0f, 0xb6, 0x20 + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, }; - copy_block(op_load_u8_T0_T1_0_code, 7); - inc_code_ptr(7); + copy_block(op_load_u8_T0_T1_0_code, 43); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(43); } #endif @@ -1336,10 +1367,14 @@ DEFINE_GEN(gen_op_store_8_T0_T1_0,void,(void)) #define HAVE_gen_op_store_8_T0_T1_0 { static const uint8 op_store_8_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x44, 0x88, 0x20 + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x44, 0x88, 0x20, }; - copy_block(op_store_8_T0_T1_0_code, 6); - inc_code_ptr(6); + copy_block(op_store_8_T0_T1_0_code, 42); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(42); } #endif @@ -1348,11 +1383,15 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_0 { static const uint8 op_load_s16_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, - 0xbf, 0xe0 + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, }; - copy_block(op_load_s16_T0_T1_0_code, 14); - inc_code_ptr(14); + copy_block(op_load_s16_T0_T1_0_code, 50); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(50); } #endif @@ -1361,10 +1400,15 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_0,void,(void)) #define HAVE_gen_op_load_s32_T0_T1_0 { static const uint8 op_load_s32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, }; - copy_block(op_load_s32_T0_T1_0_code, 11); - inc_code_ptr(11); + copy_block(op_load_s32_T0_T1_0_code, 47); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(47); } #endif @@ -1399,11 +1443,15 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_0 { static const uint8 op_load_u16_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, - 0xb7, 0xe0 + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, }; - copy_block(op_load_u16_T0_T1_0_code, 14); - inc_code_ptr(14); + copy_block(op_load_u16_T0_T1_0_code, 50); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(50); } #endif @@ -1412,10 +1460,15 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u32_T0_T1_0 { static const uint8 op_load_u32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, }; - copy_block(op_load_u32_T0_T1_0_code, 11); - inc_code_ptr(11); + copy_block(op_load_u32_T0_T1_0_code, 47); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(47); } #endif @@ -1424,10 +1477,14 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u8_T0_T1_T2 { static const uint8 op_load_u8_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x44, 0x0f, 0xb6, 0x20 + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, }; - copy_block(op_load_u8_T0_T1_T2_code, 8); - inc_code_ptr(8); + copy_block(op_load_u8_T0_T1_T2_code, 44); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(44); } #endif @@ -1436,12 +1493,16 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u8_T0_T1_im { static const uint8 op_load_u8_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x0f, - 0xb6, 0x24, 0x02 - }; - copy_block(op_load_u8_T0_T1_im_code, 15); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, + }; + copy_block(op_load_u8_T0_T1_im_code, 52); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(15); + inc_code_ptr(52); } #endif @@ -1450,11 +1511,14 @@ DEFINE_GEN(gen_op_store_16_T0_T1_0,void,(void)) #define HAVE_gen_op_store_16_T0_T1_0 { static const uint8 op_store_16_T0_T1_0_code[] = { - 0x44, 0x89, 0xea, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, 0x66, 0x89, - 0x02 + 0x44, 0x89, 0xea, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, + TRANS_RDX, + 0x66, 0x89, 0x02, }; - copy_block(op_store_16_T0_T1_0_code, 13); - inc_code_ptr(13); + copy_block(op_store_16_T0_T1_0_code, 54); + *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); } #endif @@ -1463,10 +1527,14 @@ DEFINE_GEN(gen_op_store_32_T0_T1_0,void,(void)) #define HAVE_gen_op_store_32_T0_T1_0 { static const uint8 op_store_32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe2, 0x0f, 0xca, 0x44, 0x89, 0xe8, 0x89, 0x10 + 0x44, 0x89, 0xe2, 0x0f, 0xca, 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x89, 0x10, }; - copy_block(op_store_32_T0_T1_0_code, 10); - inc_code_ptr(10); + copy_block(op_store_32_T0_T1_0_code, 46); + *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(46); } #endif @@ -1475,10 +1543,14 @@ DEFINE_GEN(gen_op_store_8_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_8_T0_T1_T2 { static const uint8 op_store_8_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x44, 0x88, 0x20 + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x44, 0x88, 0x20, }; - copy_block(op_store_8_T0_T1_T2_code, 7); - inc_code_ptr(7); + copy_block(op_store_8_T0_T1_T2_code, 43); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(43); } #endif @@ -1487,12 +1559,16 @@ DEFINE_GEN(gen_op_store_8_T0_T1_im,void,(long param1)) #define HAVE_gen_op_store_8_T0_T1_im { static const uint8 op_store_8_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x88, - 0x24, 0x02 - }; - copy_block(op_store_8_T0_T1_im_code, 14); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x44, 0x88, 0x20, + }; + copy_block(op_store_8_T0_T1_im_code, 51); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(14); + inc_code_ptr(51); } #endif @@ -1501,11 +1577,15 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_T2 { static const uint8 op_load_s16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, - 0x0f, 0xbf, 0xe0 + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, }; - copy_block(op_load_s16_T0_T1_T2_code, 15); - inc_code_ptr(15); + copy_block(op_load_s16_T0_T1_T2_code, 51); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(51); } #endif @@ -1514,12 +1594,17 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_s16_T0_T1_im { static const uint8 op_load_s16_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, - 0x04, 0x02, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 - }; - copy_block(op_load_s16_T0_T1_im_code, 22); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, + }; + copy_block(op_load_s16_T0_T1_im_code, 59); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(22); + inc_code_ptr(59); } #endif @@ -1528,10 +1613,15 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_s32_T0_T1_T2 { static const uint8 op_load_s32_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, }; - copy_block(op_load_s32_T0_T1_T2_code, 12); - inc_code_ptr(12); + copy_block(op_load_s32_T0_T1_T2_code, 48); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(48); } #endif @@ -1540,12 +1630,17 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_s32_T0_T1_im { static const uint8 op_load_s32_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, - 0x02, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc - }; - copy_block(op_load_s32_T0_T1_im_code, 19); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + }; + copy_block(op_load_s32_T0_T1_im_code, 56); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(19); + inc_code_ptr(56); } #endif @@ -1554,11 +1649,15 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_T2 { static const uint8 op_load_u16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, - 0x0f, 0xb7, 0xe0 + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, }; - copy_block(op_load_u16_T0_T1_T2_code, 15); - inc_code_ptr(15); + copy_block(op_load_u16_T0_T1_T2_code, 51); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(51); } #endif @@ -1567,12 +1666,17 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u16_T0_T1_im { static const uint8 op_load_u16_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, - 0x04, 0x02, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 - }; - copy_block(op_load_u16_T0_T1_im_code, 22); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, + }; + copy_block(op_load_u16_T0_T1_im_code, 59); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(22); + inc_code_ptr(59); } #endif @@ -1581,10 +1685,15 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u32_T0_T1_T2 { static const uint8 op_load_u32_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, }; - copy_block(op_load_u32_T0_T1_T2_code, 12); - inc_code_ptr(12); + copy_block(op_load_u32_T0_T1_T2_code, 48); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(48); } #endif @@ -1593,12 +1702,17 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u32_T0_T1_im { static const uint8 op_load_u32_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, - 0x02, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc - }; - copy_block(op_load_u32_T0_T1_im_code, 19); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + }; + copy_block(op_load_u32_T0_T1_im_code, 56); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(19); + inc_code_ptr(56); } #endif @@ -1607,11 +1721,14 @@ DEFINE_GEN(gen_op_store_16_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_16_T0_T1_T2 { static const uint8 op_store_16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x14, 0x2e, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, 0x66, - 0x89, 0x02 + 0x43, 0x8d, 0x14, 0x2e, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, + TRANS_RDX, + 0x66, 0x89, 0x02, }; - copy_block(op_store_16_T0_T1_T2_code, 14); - inc_code_ptr(14); + copy_block(op_store_16_T0_T1_T2_code, 55); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(55); } #endif @@ -1621,11 +1738,16 @@ DEFINE_GEN(gen_op_store_16_T0_T1_im,void,(long param1)) { static const uint8 op_store_16_T0_T1_im_code[] = { 0x44, 0x89, 0xe9, 0x44, 0x89, 0xe2, 0x66, 0xc1, 0xc2, 0x08, 0x48, 0x8d, - 0x05, 0x00, 0x00, 0x00, 0x00, 0x66, 0x89, 0x14, 0x01 - }; - copy_block(op_store_16_T0_T1_im_code, 21); + 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RCX, + TRANS_RAX, + 0x66, 0x89, 0x10, + }; + copy_block(op_store_16_T0_T1_im_code, 58); + *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 51) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; - inc_code_ptr(21); + inc_code_ptr(58); } #endif @@ -1634,11 +1756,14 @@ DEFINE_GEN(gen_op_store_32_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_32_T0_T1_T2 { static const uint8 op_store_32_T0_T1_T2_code[] = { - 0x44, 0x89, 0xf2, 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x01, 0xea, 0x89, - 0x0a + 0x44, 0x89, 0xf2, 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x01, 0xea, + TRANS_RDX, + 0x89, 0x0a, }; - copy_block(op_store_32_T0_T1_T2_code, 13); - inc_code_ptr(13); + copy_block(op_store_32_T0_T1_T2_code, 54); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); } #endif @@ -1648,11 +1773,16 @@ DEFINE_GEN(gen_op_store_32_T0_T1_im,void,(long param1)) { static const uint8 op_store_32_T0_T1_im_code[] = { 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, 0x8d, 0x15, 0x00, - 0x00, 0x00, 0x00, 0x89, 0x0c, 0x10 - }; - copy_block(op_store_32_T0_T1_im_code, 18); + 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x89, 0x08, + }; + copy_block(op_store_32_T0_T1_im_code, 55); + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 49) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param1 - (long)(code_ptr() + 11 + 4)) + 0; - inc_code_ptr(18); + inc_code_ptr(55); } #endif diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp index f4f08985b..0dbf6e610 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp @@ -1,3 +1,30 @@ +#define ADD_RAX_RCX 0x01,0xc8 +#define ADD_RDX_RCX 0x01,0xca +#define ADD_RAX_RDX 0x01,0xd0 +#define TRANS_RAX \ + 0x48,0x3D,0x00,0x30,0x00,0x00,\ + 0x72,0x16,\ + 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x14,\ + 0x48,0x25,0xFF,0x1F,0x00,0x00,\ + 0x48,0x05,0x00,0x00,0x00,0x00,\ + 0xEB,0x06,\ + 0x48,0x05,0x00,0x00,0x00,0x00 + +#define TRANS_RDX \ + 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ + 0x72,0x19,\ + 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x17,\ + 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ + 0xEB,0x07,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 + +#ifdef DYNGEN_IMPL +extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif + #ifndef DEFINE_CST #define DEFINE_CST(NAME, VALUE) #endif @@ -10417,14 +10444,25 @@ DEFINE_GEN(gen_op_load_vect_VD_T0,void,(void)) #define HAVE_gen_op_load_vect_VD_T0 { static const uint8 op_load_vect_VD_T0_code[] = { - 0x44, 0x89, 0xe2, 0x83, 0xe2, 0xf0, 0x89, 0xd0, 0x8b, 0x00, 0x0f, 0xc8, - 0x41, 0x89, 0x07, 0x8d, 0x42, 0x04, 0x89, 0xc0, 0x8b, 0x00, 0x0f, 0xc8, - 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, 0x8b, 0x00, 0x0f, - 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, 0x02, - 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c - }; - copy_block(op_load_vect_VD_T0_code, 54); - inc_code_ptr(54); + 0x44, 0x89, 0xe2, 0x83, 0xe2, 0xf0, 0x89, 0xd0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x07, 0x8d, 0x42, 0x04, 0x89, 0xc0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, 0x02, 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c, + }; + copy_block(op_load_vect_VD_T0_code, 162); + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 34) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 42) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(162); } #endif @@ -10433,11 +10471,15 @@ DEFINE_GEN(gen_op_load_word_VD_T0,void,(void)) #define HAVE_gen_op_load_word_VD_T0 { static const uint8 op_load_word_VD_T0_code[] = { - 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, 0x8b, 0x00, 0x0f, - 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97 - }; - copy_block(op_load_word_VD_T0_code, 23); - inc_code_ptr(23); + 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97, + }; + copy_block(op_load_word_VD_T0_code, 59); + *(uint32_t *)(code_ptr() + 33) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(59); } #endif @@ -10495,13 +10537,25 @@ DEFINE_GEN(gen_op_store_vect_VD_T0,void,(void)) { static const uint8 op_store_vect_VD_T0_code[] = { 0x44, 0x89, 0xe1, 0x83, 0xe1, 0xf0, 0x41, 0x8b, 0x07, 0x0f, 0xc8, 0x89, - 0xca, 0x89, 0x02, 0x41, 0x8b, 0x57, 0x04, 0x0f, 0xca, 0x8d, 0x41, 0x04, - 0x89, 0xc0, 0x89, 0x10, 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, - 0x08, 0x89, 0xc0, 0x89, 0x10, 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, - 0xc1, 0x0c, 0x89, 0xc9, 0x89, 0x01 - }; - copy_block(op_store_vect_VD_T0_code, 54); - inc_code_ptr(54); + 0xca, + TRANS_RDX, + 0x89, 0x02, + 0x41, 0x8b, 0x57, 0x04, 0x0f, 0xca, 0x8d, 0x41, 0x04, 0x89, 0xc0, + TRANS_RAX, + 0x89, 0x10, + 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, 0x08, 0x89, 0xc0, + TRANS_RAX, + 0x89, 0x10, + 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, 0xc1, 0x0c, 0x89, 0xc9, 0x89, 0x01, + }; + copy_block(op_store_vect_VD_T0_code, 167); + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 50) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(167); } #endif @@ -10511,10 +10565,14 @@ DEFINE_GEN(gen_op_store_word_VD_T0,void,(void)) { static const uint8 op_store_word_VD_T0_code[] = { 0x44, 0x89, 0xe0, 0x44, 0x89, 0xe2, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, - 0x41, 0x8b, 0x14, 0x97, 0x0f, 0xca, 0x83, 0xe0, 0xfc, 0x89, 0x10 + 0x41, 0x8b, 0x14, 0x97, 0x0f, 0xca, 0x83, 0xe0, 0xfc, + TRANS_RAX, + 0x89, 0x10, }; - copy_block(op_store_word_VD_T0_code, 23); - inc_code_ptr(23); + copy_block(op_store_word_VD_T0_code, 59); + *(uint32_t *)(code_ptr() + 45) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 53) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(59); } #endif @@ -10693,11 +10751,15 @@ DEFINE_GEN(gen_op_load_double_FD_T1_0,void,(void)) #define HAVE_gen_op_load_double_FD_T1_0 { static const uint8 op_load_double_FD_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x48, 0x8b, 0x00, 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, - 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_0_code, 16); - inc_code_ptr(16); + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + }; + copy_block(op_load_double_FD_T1_0_code, 52); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(52); } #endif @@ -10706,13 +10768,15 @@ DEFINE_GEN(gen_op_load_single_FD_T1_0,void,(void)) #define HAVE_gen_op_load_single_FD_T1_0 { static const uint8 op_load_single_FD_T1_0_code[] = { - 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, - 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, - 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, - 0x08, 0x10, 0x00 + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, }; - copy_block(op_load_single_FD_T1_0_code, 39); - inc_code_ptr(39); + copy_block(op_load_single_FD_T1_0_code, 75); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(75); } #endif @@ -10875,11 +10939,15 @@ DEFINE_GEN(gen_op_load_double_FD_T1_T2,void,(void)) #define HAVE_gen_op_load_double_FD_T1_T2 { static const uint8 op_load_double_FD_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x48, 0x8b, 0x00, 0x48, 0x0f, 0xc8, 0x48, 0x89, - 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_T2_code, 17); - inc_code_ptr(17); + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + }; + copy_block(op_load_double_FD_T1_T2_code, 53); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(53); } #endif @@ -10888,12 +10956,17 @@ DEFINE_GEN(gen_op_load_double_FD_T1_im,void,(long param1)) #define HAVE_gen_op_load_double_FD_T1_im { static const uint8 op_load_double_FD_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x48, 0x8b, - 0x04, 0x02, 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_im_code, 24); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + }; + copy_block(op_load_double_FD_T1_im_code, 61); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(24); + inc_code_ptr(61); } #endif @@ -10902,13 +10975,15 @@ DEFINE_GEN(gen_op_load_single_FD_T1_T2,void,(void)) #define HAVE_gen_op_load_single_FD_T1_T2 { static const uint8 op_load_single_FD_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, - 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, - 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, - 0xa8, 0x08, 0x10, 0x00 + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, }; - copy_block(op_load_single_FD_T1_T2_code, 40); - inc_code_ptr(40); + copy_block(op_load_single_FD_T1_T2_code, 76); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(76); } #endif @@ -10917,14 +10992,17 @@ DEFINE_GEN(gen_op_load_single_FD_T1_im,void,(long param1)) #define HAVE_gen_op_load_single_FD_T1_im { static const uint8 op_load_single_FD_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, - 0x02, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, - 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, - 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_single_FD_T1_im_code, 47); + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + }; + copy_block(op_load_single_FD_T1_im_code, 84); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(47); + inc_code_ptr(84); } #endif @@ -10933,11 +11011,14 @@ DEFINE_GEN(gen_op_store_double_F0_T1_0,void,(void)) #define HAVE_gen_op_store_double_F0_T1_0 { static const uint8 op_store_double_F0_T1_0_code[] = { - 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xea, 0x48, 0x0f, 0xc8, 0x48, 0x89, - 0x02 + 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xea, 0x48, 0x0f, 0xc8, + TRANS_RDX, + 0x48, 0x89, 0x02, }; - copy_block(op_store_double_F0_T1_0_code, 13); - inc_code_ptr(13); + copy_block(op_store_double_F0_T1_0_code, 54); + *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); } #endif @@ -10952,11 +11033,14 @@ DEFINE_GEN(gen_op_store_single_F0_T1_0,void,(void)) 0xff, 0x3f, 0x48, 0xc1, 0xe9, 0x03, 0x89, 0xc8, 0x25, 0x00, 0x00, 0x00, 0xc0, 0x09, 0xc2, 0xeb, 0x19, 0x48, 0x89, 0x4c, 0x24, 0xf0, 0xf2, 0x0f, 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, - 0x24, 0xfc, 0x8b, 0x54, 0x24, 0xfc, 0x0f, 0xca, 0x44, 0x89, 0xe8, 0x89, - 0x10 + 0x24, 0xfc, 0x8b, 0x54, 0x24, 0xfc, 0x0f, 0xca, 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x89, 0x10, }; - copy_block(op_store_single_F0_T1_0_code, 85); - inc_code_ptr(85); + copy_block(op_store_single_F0_T1_0_code, 121); + *(uint32_t *)(code_ptr() + 107) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 115) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(121); } #endif @@ -11025,11 +11109,14 @@ DEFINE_GEN(gen_op_store_double_F0_T1_T2,void,(void)) #define HAVE_gen_op_store_double_F0_T1_T2 { static const uint8 op_store_double_F0_T1_T2_code[] = { - 0x49, 0x8b, 0x04, 0x24, 0x43, 0x8d, 0x14, 0x2e, 0x48, 0x0f, 0xc8, 0x48, - 0x89, 0x02 + 0x49, 0x8b, 0x04, 0x24, 0x43, 0x8d, 0x14, 0x2e, 0x48, 0x0f, 0xc8, + TRANS_RDX, + 0x48, 0x89, 0x02, }; - copy_block(op_store_double_F0_T1_T2_code, 14); - inc_code_ptr(14); + copy_block(op_store_double_F0_T1_T2_code, 55); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(55); } #endif @@ -11039,11 +11126,16 @@ DEFINE_GEN(gen_op_store_double_F0_T1_im,void,(long param1)) { static const uint8 op_store_double_F0_T1_im_code[] = { 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xe9, 0x48, 0x0f, 0xc8, 0x48, 0x8d, - 0x15, 0x00, 0x00, 0x00, 0x00, 0x48, 0x89, 0x04, 0x11 - }; - copy_block(op_store_double_F0_T1_im_code, 21); + 0x15, 0x00, 0x00, 0x00, 0x00, + ADD_RDX_RCX, + TRANS_RDX, + 0x48, 0x89, 0x02, + }; + copy_block(op_store_double_F0_T1_im_code, 63); + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 56) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; - inc_code_ptr(21); + inc_code_ptr(63); } #endif @@ -11078,11 +11170,16 @@ DEFINE_GEN(gen_op_store_single_F0_T1_im,void,(long param1)) 0xc0, 0x09, 0xc1, 0xeb, 0x19, 0x48, 0x89, 0x54, 0x24, 0xf0, 0xf2, 0x0f, 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, 0x24, 0xfc, 0x8b, 0x4c, 0x24, 0xfc, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, - 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0x89, 0x0c, 0x10 - }; - copy_block(op_store_single_F0_T1_im_code, 93); + 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x89, 0x08, + }; + copy_block(op_store_single_F0_T1_im_code, 130); + *(uint32_t *)(code_ptr() + 116) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 124) = (uint32_t)(uintptr)gZeroPage; *(uint32_t *)(code_ptr() + 86) = (int32_t)((long)param1 - (long)(code_ptr() + 86 + 4)) + 0; - inc_code_ptr(93); + inc_code_ptr(130); } #endif diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 8f7e96b2c..c9a7ac583 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -190,6 +190,7 @@ int64 BusClockSpeed; // Bus clock speed (Hz) int64 TimebaseSpeed; // Timebase clock speed (Hz) uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) +uint8 *ROMEndHost; #if defined(__APPLE__) && defined(__x86_64__) uint8 gZeroPage[0x3000], gKernelData[0x2000]; @@ -937,6 +938,8 @@ int main(int argc, char **argv) RAMBase = Host2MacAddr(RAMBaseHost); ROMBase = (RAMBase + RAMSize + ROM_ALIGNMENT -1) & -ROM_ALIGNMENT; ROMBaseHost = Mac2HostAddr(ROMBase); + ROMEndHost = RAMBaseHost + RAMSize + ROM_AREA_SIZE + ROM_ALIGNMENT; + ram_rom_areas_contiguous = true; #else if (vm_mac_acquire_fixed(RAM_BASE, RAMSize) < 0) { @@ -1001,7 +1004,7 @@ int main(int argc, char **argv) #if !EMULATED_PPC flush_icache_range(ROMBase, ROMBase + ROM_AREA_SIZE); #endif - vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE); +// vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE); // Start 60Hz thread tick_thread_cancel = false; diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp index 5c8ef1f66..330846cbf 100755 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp @@ -182,7 +182,7 @@ sheepshaver_cpu::sheepshaver_cpu() { init_decoder(); -#if PPC_ENABLE_JIT && !(defined(__APPLE__) && defined(__x86_64__)) +#if PPC_ENABLE_JIT if (PrefsFindBool("jit")) enable_jit(); #endif From 0903a3adfdf6446ebfb7a5d2a6cade87f946aa6c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 24 Nov 2017 21:07:07 +0900 Subject: [PATCH 185/534] offset error fixed --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 36 ++++++++-------- .../basic-dyngen-ops-x86_64.hpp | 24 +++++------ .../ppc-dyngen-ops-x86_64.hpp | 42 +++++++++++-------- SheepShaver/src/Unix/main_unix.cpp | 6 +-- 4 files changed, 59 insertions(+), 49 deletions(-) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 87a8c6bfe..8c6546f3c 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2606,18 +2606,25 @@ sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) return SIP->pc; } +#if defined(__APPLE__) && defined(__x86_64__) + extern uint8_t gZeroPage[0x3000], gKernelData[0x2000]; -extern uint8_t *RAMBaseHost, *ROMEndHost; +extern uint32_t RAMBase, ROMBase, ROMEnd; -inline static uint8_t *cnvAdr(uint32_t a) { - if (a < 0x3000) return &gZeroPage[a]; - else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) return &gKernelData[a & 0x1fff]; - return (uint8_t *)(long)a; +template T safeLoad(uint32_t a) { + if (a < 0x3000) return *(T *)&gZeroPage[a]; + else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) return *(T *)&gKernelData[a & 0x1fff]; + else if (a >= RAMBase && a < ROMEnd) return *(T *)(uint64_t)a; + return 0; } -inline static bool isValidAdr(uint8_t *a) { - return (a >= RAMBaseHost && a < ROMEndHost) || (a >= gZeroPage && a < &gZeroPage[0x3000]) || (a >= gKernelData && a < &gKernelData[0x2000]); +template void safeStore(uint32_t a, T d) { + if (a < 0x3000) *(T *)&gZeroPage[a] = d; + else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) *(T *)&gKernelData[a & 0x1fff] = d; + else if (a >= RAMBase && a < ROMBase) *(T *)(uint64_t)a = d; } +#endif + // This function handles the badaccess to memory. // It is called from the signal handler or the exception handler. static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) @@ -2641,15 +2648,13 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) switch (rip[0]) { case 0x48: if (rip[1] == 0xc7 && rip[2] == 0) { - uint8_t *p = cnvAdr(ts->__rax); - if (isValidAdr(p)) *(uint64_t *)p = rip[3] | rip[4] << 8 | rip[5] << 16 | rip[6] << 24; + safeStore(ts->__rax, rip[3] | rip[4] << 8 | rip[5] << 16 | rip[6] << 24); ts->__rip += 7; mach_set_thread_state(SIP); return true; } else if (rip[1] == 0xc7 && rip[2] == 0x40) { - uint8_t *p = cnvAdr(ts->__rax + (signed char)rip[3]); - if (isValidAdr(p)) *(uint64_t *)p = rip[4] | rip[5] << 8 | rip[6] << 16 | rip[7] << 24; + safeStore(ts->__rax + (signed char)rip[3], rip[4] | rip[5] << 8 | rip[6] << 16 | rip[7] << 24); ts->__rip += 8; mach_set_thread_state(SIP); return true; @@ -2657,15 +2662,13 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) break; case 0x89: if (rip[1] == 2) { - uint8_t *p = cnvAdr(ts->__rdx); - if (isValidAdr(p)) *(uint32_t *)p = ts->__rax; + safeStore(ts->__rdx, ts->__rax); ts->__rip += 2; mach_set_thread_state(SIP); return true; } else if (rip[1] == 0x10) { - uint8_t *p = cnvAdr(ts->__rax); - if (isValidAdr(p)) *(uint32_t *)p = ts->__rdx; + safeStore(ts->__rax, ts->__rdx); ts->__rip += 2; mach_set_thread_state(SIP); return true; @@ -2673,8 +2676,7 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) break; case 0x8b: if (rip[1] == 0) { - uint8_t *p = cnvAdr(ts->__rax); - ts->__rax = isValidAdr(p) ? *(uint32_t *)p : 0; + ts->__rax = safeLoad(ts->__rax); ts->__rip += 2; mach_set_thread_state(SIP); return true; diff --git a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp index 90361874c..1910e577b 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp @@ -1386,7 +1386,7 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 }; copy_block(op_load_s16_T0_T1_0_code, 50); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -1403,7 +1403,7 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_s32_T0_T1_0_code, 47); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -1446,7 +1446,7 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 }; copy_block(op_load_u16_T0_T1_0_code, 50); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -1463,7 +1463,7 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_u32_T0_T1_0_code, 47); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -1580,7 +1580,7 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 }; copy_block(op_load_s16_T0_T1_T2_code, 51); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -1598,7 +1598,7 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 }; copy_block(op_load_s16_T0_T1_im_code, 59); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; @@ -1616,7 +1616,7 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_s32_T0_T1_T2_code, 48); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -1634,7 +1634,7 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_s32_T0_T1_im_code, 56); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; @@ -1652,7 +1652,7 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 }; copy_block(op_load_u16_T0_T1_T2_code, 51); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -1670,7 +1670,7 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 }; copy_block(op_load_u16_T0_T1_im_code, 59); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; @@ -1688,7 +1688,7 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_u32_T0_T1_T2_code, 48); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -1706,7 +1706,7 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; copy_block(op_load_u32_T0_T1_im_code, 56); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp index 0dbf6e610..8aaea1c03 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp @@ -10453,15 +10453,16 @@ DEFINE_GEN(gen_op_load_vect_VD_T0,void,(void)) 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, TRANS_RAX, 0x8b, 0x00, - 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, 0x02, 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, + 0x02, 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c }; copy_block(op_load_vect_VD_T0_code, 162); - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 34) = (uint32_t)(uintptr)gKernelData; *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 42) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 80) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 129) = (uint32_t)(uintptr)gKernelData; *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 88) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 137) = (uint32_t)(uintptr)gZeroPage; inc_code_ptr(162); } #endif @@ -10474,7 +10475,7 @@ DEFINE_GEN(gen_op_load_word_VD_T0,void,(void)) 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, TRANS_RAX, 0x8b, 0x00, - 0x0f, 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97, + 0x0f, 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97 }; copy_block(op_load_word_VD_T0_code, 59); *(uint32_t *)(code_ptr() + 33) = (uint32_t)(uintptr)gKernelData; @@ -10546,15 +10547,16 @@ DEFINE_GEN(gen_op_store_vect_VD_T0,void,(void)) 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, 0x08, 0x89, 0xc0, TRANS_RAX, 0x89, 0x10, - 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, 0xc1, 0x0c, 0x89, 0xc9, 0x89, 0x01, + 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, 0xc1, 0x0c, 0x89, 0xc9, 0x89, + 0x01 }; copy_block(op_store_vect_VD_T0_code, 167); - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gKernelData; *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 91) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 140) = (uint32_t)(uintptr)gKernelData; *(uint32_t *)(code_ptr() + 50) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 99) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 148) = (uint32_t)(uintptr)gZeroPage; inc_code_ptr(167); } #endif @@ -10754,7 +10756,7 @@ DEFINE_GEN(gen_op_load_double_FD_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_double_FD_T1_0_code, 52); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -10771,7 +10773,9 @@ DEFINE_GEN(gen_op_load_single_FD_T1_0,void,(void)) 0x44, 0x89, 0xe8, TRANS_RAX, 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_single_FD_T1_0_code, 75); *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; @@ -10942,7 +10946,7 @@ DEFINE_GEN(gen_op_load_double_FD_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_double_FD_T1_T2_code, 53); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -10960,7 +10964,7 @@ DEFINE_GEN(gen_op_load_double_FD_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_double_FD_T1_im_code, 61); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; @@ -10978,7 +10982,9 @@ DEFINE_GEN(gen_op_load_single_FD_T1_T2,void,(void)) 0x43, 0x8d, 0x04, 0x2e, TRANS_RAX, 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_single_FD_T1_T2_code, 76); *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; @@ -10996,7 +11002,9 @@ DEFINE_GEN(gen_op_load_single_FD_T1_im,void,(long param1)) ADD_RAX_RDX, TRANS_RAX, 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 }; copy_block(op_load_single_FD_T1_im_code, 84); *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index c9a7ac583..7d713b4ad 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -190,7 +190,7 @@ int64 BusClockSpeed; // Bus clock speed (Hz) int64 TimebaseSpeed; // Timebase clock speed (Hz) uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) -uint8 *ROMEndHost; +uint32 ROMEnd; #if defined(__APPLE__) && defined(__x86_64__) uint8 gZeroPage[0x3000], gKernelData[0x2000]; @@ -937,8 +937,8 @@ int main(int argc, char **argv) } RAMBase = Host2MacAddr(RAMBaseHost); ROMBase = (RAMBase + RAMSize + ROM_ALIGNMENT -1) & -ROM_ALIGNMENT; - ROMBaseHost = Mac2HostAddr(ROMBase); - ROMEndHost = RAMBaseHost + RAMSize + ROM_AREA_SIZE + ROM_ALIGNMENT; + ROMBaseHost = RAMBaseHost + ROMBase - RAMBase; + ROMEnd = RAMBase + RAMSize + ROM_AREA_SIZE + ROM_ALIGNMENT; ram_rom_areas_contiguous = true; #else From aaeb0dd5ebce1dcfd92c392cd96ab52c296edff0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 24 Nov 2017 21:40:06 +0900 Subject: [PATCH 186/534] revert vm_protect of ROM area --- SheepShaver/src/Unix/main_unix.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 7d713b4ad..6939239d1 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -1004,7 +1004,7 @@ int main(int argc, char **argv) #if !EMULATED_PPC flush_icache_range(ROMBase, ROMBase + ROM_AREA_SIZE); #endif -// vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE); + vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE); // Start 60Hz thread tick_thread_cancel = false; From 7e28b437c4eee28e76dcbf5e0680e01249b535c6 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 25 Nov 2017 03:17:06 +0900 Subject: [PATCH 187/534] improve launch stability --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 2 -- 1 file changed, 2 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index c07d55ff0..70d1370f7 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1356,7 +1356,6 @@ OTHER_LDFLAGS = ( "-pagezero_size", 0x3000, - "-Wl,-seg1addr,0x78048000", "-lkpx_cpu", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; @@ -1414,7 +1413,6 @@ OTHER_LDFLAGS = ( "-pagezero_size", 0x3000, - "-Wl,-seg1addr,0x78048000", "-lkpx_cpu", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; From 03d2502cc6fb4859bbb951dbec299d87d1b27311 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 26 Nov 2017 16:22:52 +0900 Subject: [PATCH 188/534] fixed: localtime() may return NULL --- SheepShaver/src/macos_util.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index bb33ace53..8dbc50136 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -324,7 +324,9 @@ uint32 TimeToMacTime(time_t t) // This code is taken from glibc 2.2 // Convert to number of seconds elapsed since 1-Jan-1904 - struct tm *local = localtime(&t); + struct tm result; + localtime_r(&t, &result); + struct tm *local = &result; const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); From 4fa329411815efbba6c12d57fa4ee0cf31a6a332 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 27 Nov 2017 22:35:17 +0900 Subject: [PATCH 189/534] boot stability after forced termination --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 8c6546f3c..04b066a48 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2646,6 +2646,14 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) x86_thread_state64_t *ts = &SIP->thr_state; uint8_t *rip = (uint8_t *)ts->__rip; switch (rip[0]) { + case 0x44: + if (rip[1] == 0xf && rip[2] == 0xb6 && rip[3] == 0x20) { + ts->__r12 = safeLoad(ts->__rax); + ts->__rip += 4; + mach_set_thread_state(SIP); + return true; + } + break; case 0x48: if (rip[1] == 0xc7 && rip[2] == 0) { safeStore(ts->__rax, rip[3] | rip[4] << 8 | rip[5] << 16 | rip[6] << 24); From 42353c9698526c231ebebf13c1e9aa8d6ff51527 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 27 Nov 2017 23:55:12 +0900 Subject: [PATCH 190/534] improve stability --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 04b066a48..47a6adcdf 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2646,6 +2646,14 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) x86_thread_state64_t *ts = &SIP->thr_state; uint8_t *rip = (uint8_t *)ts->__rip; switch (rip[0]) { + case 0xf: + if (rip[1] == 0xb7 && rip[2] == 0) { + ts->__rax = safeLoad(ts->__rax); + ts->__rip += 3; + mach_set_thread_state(SIP); + return true; + } + break; case 0x44: if (rip[1] == 0xf && rip[2] == 0xb6 && rip[3] == 0x20) { ts->__r12 = safeLoad(ts->__rax); From 6eaa8cb232e67f311db68d5893dfd5e7b8c3093d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 4 Dec 2017 20:38:21 +0900 Subject: [PATCH 191/534] separate JIT code, macOS and others --- .../project.pbxproj | 16 +- .../basic-dyngen-ops-x86_64.hpp | 316 +- .../basic-dyngen-ops-x86_64_macos.hpp | 1824 +++ .../dyngen_precompiled/basic-dyngen-ops.hpp | 4 + .../ppc-dyngen-ops-x86_64.hpp | 259 +- .../ppc-dyngen-ops-x86_64_macos.hpp | 11221 ++++++++++++++++ .../dyngen_precompiled/ppc-dyngen-ops.hpp | 4 + 7 files changed, 13231 insertions(+), 413 deletions(-) create mode 100644 SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp create mode 100644 SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 70d1370f7..da3bc3254 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -8,10 +8,8 @@ /* Begin PBXBuildFile section */ 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */; }; - 08003F8D1E0624D100A3ADAB /* basic-dyngen-ops-x86_64.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F861E0624D100A3ADAB /* basic-dyngen-ops-x86_64.hpp */; }; 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */; }; 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */; }; - 08003F901E0624D100A3ADAB /* ppc-dyngen-ops-x86_64.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F891E0624D100A3ADAB /* ppc-dyngen-ops-x86_64.hpp */; }; 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */; }; 08163339158C121000C449F9 /* dis-asm.h in Headers */ = {isa = PBXBuildFile; fileRef = 08163337158C121000C449F9 /* dis-asm.h */; }; 08163340158C125800C449F9 /* ppc-dis.c in Sources */ = {isa = PBXBuildFile; fileRef = 08163338158C121000C449F9 /* ppc-dis.c */; }; @@ -106,6 +104,8 @@ 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; + E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */; }; + E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -141,10 +141,8 @@ /* Begin PBXFileReference section */ 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; - 08003F861E0624D100A3ADAB /* basic-dyngen-ops-x86_64.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64.hpp"; sourceTree = ""; }; 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops.hpp"; path = "dyngen_precompiled/basic-dyngen-ops.hpp"; sourceTree = ""; }; 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; - 08003F891E0624D100A3ADAB /* ppc-dyngen-ops-x86_64.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp"; sourceTree = ""; }; 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops.hpp"; sourceTree = ""; }; 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = "ppc-execute-impl.cpp"; path = "dyngen_precompiled/ppc-execute-impl.cpp"; sourceTree = ""; }; 08163337158C121000C449F9 /* dis-asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dis-asm.h"; sourceTree = ""; }; @@ -379,6 +377,8 @@ A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; + E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; + E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -414,10 +414,10 @@ isa = PBXGroup; children = ( 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */, - 08003F861E0624D100A3ADAB /* basic-dyngen-ops-x86_64.hpp */, + E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */, 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */, 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */, - 08003F891E0624D100A3ADAB /* ppc-dyngen-ops-x86_64.hpp */, + E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */, 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */, 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */, ); @@ -885,9 +885,9 @@ buildActionMask = 2147483647; files = ( 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */, - 08003F901E0624D100A3ADAB /* ppc-dyngen-ops-x86_64.hpp in Headers */, - 08003F8D1E0624D100A3ADAB /* basic-dyngen-ops-x86_64.hpp in Headers */, 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, + E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, + E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, 08163339158C121000C449F9 /* dis-asm.h in Headers */, 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */, diff --git a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp index 1910e577b..7893a1e4b 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp @@ -1,30 +1,3 @@ -#define ADD_RAX_RCX 0x01,0xc8 -#define ADD_RDX_RCX 0x01,0xca -#define ADD_RAX_RDX 0x01,0xd0 -#define TRANS_RAX \ - 0x48,0x3D,0x00,0x30,0x00,0x00,\ - 0x72,0x16,\ - 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ - 0x72,0x14,\ - 0x48,0x25,0xFF,0x1F,0x00,0x00,\ - 0x48,0x05,0x00,0x00,0x00,0x00,\ - 0xEB,0x06,\ - 0x48,0x05,0x00,0x00,0x00,0x00 - -#define TRANS_RDX \ - 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ - 0x72,0x19,\ - 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ - 0x72,0x17,\ - 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ - 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ - 0xEB,0x07,\ - 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 - -#ifdef DYNGEN_IMPL -extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; -#endif - #ifndef DEFINE_CST #define DEFINE_CST(NAME, VALUE) #endif @@ -1351,14 +1324,10 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u8_T0_T1_0 { static const uint8 op_load_u8_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x44, 0x0f, 0xb6, 0x20, + 0x44, 0x89, 0xe8, 0x44, 0x0f, 0xb6, 0x20 }; - copy_block(op_load_u8_T0_T1_0_code, 43); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(43); + copy_block(op_load_u8_T0_T1_0_code, 7); + inc_code_ptr(7); } #endif @@ -1367,14 +1336,10 @@ DEFINE_GEN(gen_op_store_8_T0_T1_0,void,(void)) #define HAVE_gen_op_store_8_T0_T1_0 { static const uint8 op_store_8_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x44, 0x88, 0x20, + 0x44, 0x89, 0xe8, 0x44, 0x88, 0x20 }; - copy_block(op_store_8_T0_T1_0_code, 42); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(42); + copy_block(op_store_8_T0_T1_0_code, 6); + inc_code_ptr(6); } #endif @@ -1383,15 +1348,11 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_0 { static const uint8 op_load_s16_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + 0x44, 0x89, 0xe8, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, + 0xbf, 0xe0 }; - copy_block(op_load_s16_T0_T1_0_code, 50); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(50); + copy_block(op_load_s16_T0_T1_0_code, 14); + inc_code_ptr(14); } #endif @@ -1400,15 +1361,10 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_0,void,(void)) #define HAVE_gen_op_load_s32_T0_T1_0 { static const uint8 op_load_s32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; - copy_block(op_load_s32_T0_T1_0_code, 47); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(47); + copy_block(op_load_s32_T0_T1_0_code, 11); + inc_code_ptr(11); } #endif @@ -1443,15 +1399,11 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_0 { static const uint8 op_load_u16_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + 0x44, 0x89, 0xe8, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, + 0xb7, 0xe0 }; - copy_block(op_load_u16_T0_T1_0_code, 50); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(50); + copy_block(op_load_u16_T0_T1_0_code, 14); + inc_code_ptr(14); } #endif @@ -1460,15 +1412,10 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u32_T0_T1_0 { static const uint8 op_load_u32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; - copy_block(op_load_u32_T0_T1_0_code, 47); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(47); + copy_block(op_load_u32_T0_T1_0_code, 11); + inc_code_ptr(11); } #endif @@ -1477,14 +1424,10 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u8_T0_T1_T2 { static const uint8 op_load_u8_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x44, 0x0f, 0xb6, 0x20, + 0x43, 0x8d, 0x04, 0x2e, 0x44, 0x0f, 0xb6, 0x20 }; - copy_block(op_load_u8_T0_T1_T2_code, 44); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(44); + copy_block(op_load_u8_T0_T1_T2_code, 8); + inc_code_ptr(8); } #endif @@ -1493,16 +1436,12 @@ DEFINE_GEN(gen_op_load_u8_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u8_T0_T1_im { static const uint8 op_load_u8_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x44, 0x0f, 0xb6, 0x20, - }; - copy_block(op_load_u8_T0_T1_im_code, 52); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x0f, + 0xb6, 0x24, 0x02 + }; + copy_block(op_load_u8_T0_T1_im_code, 15); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(52); + inc_code_ptr(15); } #endif @@ -1511,14 +1450,11 @@ DEFINE_GEN(gen_op_store_16_T0_T1_0,void,(void)) #define HAVE_gen_op_store_16_T0_T1_0 { static const uint8 op_store_16_T0_T1_0_code[] = { - 0x44, 0x89, 0xea, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, - TRANS_RDX, - 0x66, 0x89, 0x02, + 0x44, 0x89, 0xea, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, 0x66, 0x89, + 0x02 }; - copy_block(op_store_16_T0_T1_0_code, 54); - *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(54); + copy_block(op_store_16_T0_T1_0_code, 13); + inc_code_ptr(13); } #endif @@ -1527,14 +1463,10 @@ DEFINE_GEN(gen_op_store_32_T0_T1_0,void,(void)) #define HAVE_gen_op_store_32_T0_T1_0 { static const uint8 op_store_32_T0_T1_0_code[] = { - 0x44, 0x89, 0xe2, 0x0f, 0xca, 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x89, 0x10, + 0x44, 0x89, 0xe2, 0x0f, 0xca, 0x44, 0x89, 0xe8, 0x89, 0x10 }; - copy_block(op_store_32_T0_T1_0_code, 46); - *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(46); + copy_block(op_store_32_T0_T1_0_code, 10); + inc_code_ptr(10); } #endif @@ -1543,14 +1475,10 @@ DEFINE_GEN(gen_op_store_8_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_8_T0_T1_T2 { static const uint8 op_store_8_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x44, 0x88, 0x20, + 0x43, 0x8d, 0x04, 0x2e, 0x44, 0x88, 0x20 }; - copy_block(op_store_8_T0_T1_T2_code, 43); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(43); + copy_block(op_store_8_T0_T1_T2_code, 7); + inc_code_ptr(7); } #endif @@ -1559,16 +1487,12 @@ DEFINE_GEN(gen_op_store_8_T0_T1_im,void,(long param1)) #define HAVE_gen_op_store_8_T0_T1_im { static const uint8 op_store_8_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x44, 0x88, 0x20, - }; - copy_block(op_store_8_T0_T1_im_code, 51); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x88, + 0x24, 0x02 + }; + copy_block(op_store_8_T0_T1_im_code, 14); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(51); + inc_code_ptr(14); } #endif @@ -1577,15 +1501,11 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_T2 { static const uint8 op_load_s16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + 0x43, 0x8d, 0x04, 0x2e, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, + 0x0f, 0xbf, 0xe0 }; - copy_block(op_load_s16_T0_T1_T2_code, 51); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(51); + copy_block(op_load_s16_T0_T1_T2_code, 15); + inc_code_ptr(15); } #endif @@ -1594,17 +1514,12 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_s16_T0_T1_im { static const uint8 op_load_s16_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 - }; - copy_block(op_load_s16_T0_T1_im_code, 59); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, + 0x04, 0x02, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + }; + copy_block(op_load_s16_T0_T1_im_code, 22); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(59); + inc_code_ptr(22); } #endif @@ -1613,15 +1528,10 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_s32_T0_T1_T2 { static const uint8 op_load_s32_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; - copy_block(op_load_s32_T0_T1_T2_code, 48); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(48); + copy_block(op_load_s32_T0_T1_T2_code, 12); + inc_code_ptr(12); } #endif @@ -1630,17 +1540,12 @@ DEFINE_GEN(gen_op_load_s32_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_s32_T0_T1_im { static const uint8 op_load_s32_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc - }; - copy_block(op_load_s32_T0_T1_im_code, 56); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, + 0x02, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_s32_T0_T1_im_code, 19); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(56); + inc_code_ptr(19); } #endif @@ -1649,15 +1554,11 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_T2 { static const uint8 op_load_u16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + 0x43, 0x8d, 0x04, 0x2e, 0x0f, 0xb7, 0x00, 0x66, 0xc1, 0xc0, 0x08, 0x44, + 0x0f, 0xb7, 0xe0 }; - copy_block(op_load_u16_T0_T1_T2_code, 51); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(51); + copy_block(op_load_u16_T0_T1_T2_code, 15); + inc_code_ptr(15); } #endif @@ -1666,17 +1567,12 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u16_T0_T1_im { static const uint8 op_load_u16_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x0f, 0xb7, 0x00, - 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 - }; - copy_block(op_load_u16_T0_T1_im_code, 59); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, + 0x04, 0x02, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + }; + copy_block(op_load_u16_T0_T1_im_code, 22); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(59); + inc_code_ptr(22); } #endif @@ -1685,15 +1581,10 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u32_T0_T1_T2 { static const uint8 op_load_u32_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc }; - copy_block(op_load_u32_T0_T1_T2_code, 48); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(48); + copy_block(op_load_u32_T0_T1_T2_code, 12); + inc_code_ptr(12); } #endif @@ -1702,17 +1593,12 @@ DEFINE_GEN(gen_op_load_u32_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u32_T0_T1_im { static const uint8 op_load_u32_T0_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x8b, 0x00, - 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc - }; - copy_block(op_load_u32_T0_T1_im_code, 56); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, + 0x02, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_u32_T0_T1_im_code, 19); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(56); + inc_code_ptr(19); } #endif @@ -1721,14 +1607,11 @@ DEFINE_GEN(gen_op_store_16_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_16_T0_T1_T2 { static const uint8 op_store_16_T0_T1_T2_code[] = { - 0x43, 0x8d, 0x14, 0x2e, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, - TRANS_RDX, - 0x66, 0x89, 0x02, + 0x43, 0x8d, 0x14, 0x2e, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, 0x66, + 0x89, 0x02 }; - copy_block(op_store_16_T0_T1_T2_code, 55); - *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(55); + copy_block(op_store_16_T0_T1_T2_code, 14); + inc_code_ptr(14); } #endif @@ -1738,16 +1621,11 @@ DEFINE_GEN(gen_op_store_16_T0_T1_im,void,(long param1)) { static const uint8 op_store_16_T0_T1_im_code[] = { 0x44, 0x89, 0xe9, 0x44, 0x89, 0xe2, 0x66, 0xc1, 0xc2, 0x08, 0x48, 0x8d, - 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RCX, - TRANS_RAX, - 0x66, 0x89, 0x10, - }; - copy_block(op_store_16_T0_T1_im_code, 58); - *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 51) = (uint32_t)(uintptr)gZeroPage; + 0x05, 0x00, 0x00, 0x00, 0x00, 0x66, 0x89, 0x14, 0x01 + }; + copy_block(op_store_16_T0_T1_im_code, 21); *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; - inc_code_ptr(58); + inc_code_ptr(21); } #endif @@ -1756,14 +1634,11 @@ DEFINE_GEN(gen_op_store_32_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_32_T0_T1_T2 { static const uint8 op_store_32_T0_T1_T2_code[] = { - 0x44, 0x89, 0xf2, 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x01, 0xea, - TRANS_RDX, - 0x89, 0x0a, + 0x44, 0x89, 0xf2, 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x01, 0xea, 0x89, + 0x0a }; - copy_block(op_store_32_T0_T1_T2_code, 54); - *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(54); + copy_block(op_store_32_T0_T1_T2_code, 13); + inc_code_ptr(13); } #endif @@ -1773,16 +1648,11 @@ DEFINE_GEN(gen_op_store_32_T0_T1_im,void,(long param1)) { static const uint8 op_store_32_T0_T1_im_code[] = { 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, 0x8d, 0x15, 0x00, - 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x89, 0x08, - }; - copy_block(op_store_32_T0_T1_im_code, 55); - *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 49) = (uint32_t)(uintptr)gZeroPage; + 0x00, 0x00, 0x00, 0x89, 0x0c, 0x10 + }; + copy_block(op_store_32_T0_T1_im_code, 18); *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param1 - (long)(code_ptr() + 11 + 4)) + 0; - inc_code_ptr(55); + inc_code_ptr(18); } #endif diff --git a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp new file mode 100644 index 000000000..1910e577b --- /dev/null +++ b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp @@ -0,0 +1,1824 @@ +#define ADD_RAX_RCX 0x01,0xc8 +#define ADD_RDX_RCX 0x01,0xca +#define ADD_RAX_RDX 0x01,0xd0 +#define TRANS_RAX \ + 0x48,0x3D,0x00,0x30,0x00,0x00,\ + 0x72,0x16,\ + 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x14,\ + 0x48,0x25,0xFF,0x1F,0x00,0x00,\ + 0x48,0x05,0x00,0x00,0x00,0x00,\ + 0xEB,0x06,\ + 0x48,0x05,0x00,0x00,0x00,0x00 + +#define TRANS_RDX \ + 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ + 0x72,0x19,\ + 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x17,\ + 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ + 0xEB,0x07,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 + +#ifdef DYNGEN_IMPL +extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif + +#ifndef DEFINE_CST +#define DEFINE_CST(NAME, VALUE) +#endif +DEFINE_GEN(gen_op_invoke,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke +{ + static const uint8 helper_op_invoke_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_code, 12); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0 +{ + static const uint8 helper_op_invoke_T0_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, + 0xe7, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_T0_code, 15); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_T1 +{ + static const uint8 helper_op_invoke_T0_T1_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, + 0xee, 0x44, 0x89, 0xe7, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_T0_T1_code, 18); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_T1_T2,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_T1_T2 +{ + static const uint8 helper_op_invoke_T0_T1_T2_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, + 0xf2, 0x44, 0x89, 0xee, 0x44, 0x89, 0xe7, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_T0_T1_T2_code, 21); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_ret_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_ret_T0 +{ + static const uint8 helper_op_invoke_T0_ret_T0_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, + 0xe7, 0xff, 0xd0, 0x41, 0x89, 0xc4 + }; + copy_block(helper_op_invoke_T0_ret_T0_code, 18); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_im +{ + static const uint8 helper_op_invoke_im_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x8d, 0x3d, + 0x00, 0x00, 0x00, 0x00, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_im_code, 18); + *(uint32_t *)(code_ptr() + 12) = (int32_t)((long)param2 - (long)(code_ptr() + 12 + 4)) + 0; + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU +{ + static const uint8 helper_op_invoke_CPU_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x48, 0x89, + 0xef, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_CPU_code, 15); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_T0 +{ + static const uint8 helper_op_invoke_CPU_T0_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, + 0xe6, 0x48, 0x89, 0xef, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_CPU_T0_code, 18); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_im +{ + static const uint8 helper_op_invoke_CPU_im_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x48, 0x89, + 0xef, 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_CPU_im_code, 21); + *(uint32_t *)(code_ptr() + 15) = (int32_t)((long)param2 - (long)(code_ptr() + 15 + 4)) + 0; + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_im_im,void,(long param1, long param2, long param3)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_im_im +{ + static const uint8 helper_op_invoke_CPU_im_im_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x48, 0x89, + 0xef, 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0x8d, 0x35, 0x00, 0x00, 0x00, + 0x00, 0xff, 0xd0 + }; + copy_block(helper_op_invoke_CPU_im_im_code, 27); + *(uint32_t *)(code_ptr() + 21) = (int32_t)((long)param2 - (long)(code_ptr() + 21 + 4)) + 0; + *(uint32_t *)(code_ptr() + 15) = (int32_t)((long)param3 - (long)(code_ptr() + 15 + 4)) + 0; + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_A0_ret_A0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_A0_ret_A0 +{ + static const uint8 helper_op_invoke_CPU_A0_ret_A0_code[] = { + 0x48, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x4c, 0x89, + 0xe6, 0x48, 0x89, 0xef, 0xff, 0xd0, 0x49, 0x89, 0xc4 + }; + copy_block(helper_op_invoke_CPU_A0_ret_A0_code, 21); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct +{ + static const uint8 helper_op_invoke_direct_code[] = { + 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_code, 5); + *(uint32_t *)(code_ptr() + 1) = (int32_t)((long)param1 - (long)(code_ptr() + 1 + 4)) + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0 +{ + static const uint8 helper_op_invoke_direct_T0_code[] = { + 0x44, 0x89, 0xe7, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_T0_code, 8); + *(uint32_t *)(code_ptr() + 4) = (int32_t)((long)param1 - (long)(code_ptr() + 4 + 4)) + 0; + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_T1 +{ + static const uint8 helper_op_invoke_direct_T0_T1_code[] = { + 0x44, 0x89, 0xee, 0x44, 0x89, 0xe7, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_T0_T1_code, 11); + *(uint32_t *)(code_ptr() + 7) = (int32_t)((long)param1 - (long)(code_ptr() + 7 + 4)) + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_T1_T2,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_T1_T2 +{ + static const uint8 helper_op_invoke_direct_T0_T1_T2_code[] = { + 0x44, 0x89, 0xf2, 0x44, 0x89, 0xee, 0x44, 0x89, 0xe7, 0xe8, 0x00, 0x00, + 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_T0_T1_T2_code, 14); + *(uint32_t *)(code_ptr() + 10) = (int32_t)((long)param1 - (long)(code_ptr() + 10 + 4)) + 0; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_ret_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_ret_T0 +{ + static const uint8 helper_op_invoke_direct_T0_ret_T0_code[] = { + 0x44, 0x89, 0xe7, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x41, 0x89, 0xc4 + }; + copy_block(helper_op_invoke_direct_T0_ret_T0_code, 11); + *(uint32_t *)(code_ptr() + 4) = (int32_t)((long)param1 - (long)(code_ptr() + 4 + 4)) + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_im +{ + static const uint8 helper_op_invoke_direct_im_code[] = { + 0x8d, 0x3d, 0x00, 0x00, 0x00, 0x00, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_im_code, 11); + *(uint32_t *)(code_ptr() + 7) = (int32_t)((long)param1 - (long)(code_ptr() + 7 + 4)) + 0; + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param2 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU +{ + static const uint8 helper_op_invoke_direct_CPU_code[] = { + 0x48, 0x89, 0xef, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_CPU_code, 8); + *(uint32_t *)(code_ptr() + 4) = (int32_t)((long)param1 - (long)(code_ptr() + 4 + 4)) + 0; + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_T0 +{ + static const uint8 helper_op_invoke_direct_CPU_T0_code[] = { + 0x44, 0x89, 0xe6, 0x48, 0x89, 0xef, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_CPU_T0_code, 11); + *(uint32_t *)(code_ptr() + 7) = (int32_t)((long)param1 - (long)(code_ptr() + 7 + 4)) + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_im +{ + static const uint8 helper_op_invoke_direct_CPU_im_code[] = { + 0x48, 0x89, 0xef, 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00, 0xe8, 0x00, 0x00, + 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_CPU_im_code, 14); + *(uint32_t *)(code_ptr() + 10) = (int32_t)((long)param1 - (long)(code_ptr() + 10 + 4)) + 0; + *(uint32_t *)(code_ptr() + 5) = (int32_t)((long)param2 - (long)(code_ptr() + 5 + 4)) + 0; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_im_im,void,(long param1, long param2, long param3)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_im_im +{ + static const uint8 helper_op_invoke_direct_CPU_im_im_code[] = { + 0x48, 0x89, 0xef, 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0x8d, 0x35, 0x00, + 0x00, 0x00, 0x00, 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_CPU_im_im_code, 20); + *(uint32_t *)(code_ptr() + 16) = (int32_t)((long)param1 - (long)(code_ptr() + 16 + 4)) + 0; + *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param2 - (long)(code_ptr() + 11 + 4)) + 0; + *(uint32_t *)(code_ptr() + 5) = (int32_t)((long)param3 - (long)(code_ptr() + 5 + 4)) + 0; + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_A0_ret_A0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_A0_ret_A0 +{ + static const uint8 helper_op_invoke_direct_CPU_A0_ret_A0_code[] = { + 0x4c, 0x89, 0xe6, 0x48, 0x89, 0xef, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x49, + 0x89, 0xc4 + }; + copy_block(helper_op_invoke_direct_CPU_A0_ret_A0_code, 14); + *(uint32_t *)(code_ptr() + 7) = (int32_t)((long)param1 - (long)(code_ptr() + 7 + 4)) + 0; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_jmp_fast,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_fast +{ + static const uint8 op_jmp_fast_code[] = { + 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_jmp_fast_code, 5); + *(uint32_t *)(code_ptr() + 1) = (int32_t)((long)param1 - (long)(code_ptr() + 1 + 4)) + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_jmp_slow,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_slow +{ + static const uint8 op_jmp_slow_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0xff, 0xe0 + }; + copy_block(op_jmp_slow_code, 9); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_neg_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_neg_32_T0 +{ + static const uint8 op_neg_32_T0_code[] = { + 0x41, 0xf7, 0xdc + }; + copy_block(op_neg_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_not_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_not_32_T0 +{ + static const uint8 op_not_32_T0_code[] = { + 0x45, 0x85, 0xe4, 0x0f, 0x94, 0xc0, 0x44, 0x0f, 0xb6, 0xe0 + }; + copy_block(op_not_32_T0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_not_32_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_not_32_T1 +{ + static const uint8 op_not_32_T1_code[] = { + 0x45, 0x85, 0xed, 0x0f, 0x94, 0xc0, 0x44, 0x0f, 0xb6, 0xe8 + }; + copy_block(op_not_32_T1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_se_8_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_8_32_T0 +{ + static const uint8 op_se_8_32_T0_code[] = { + 0x45, 0x0f, 0xbe, 0xe4 + }; + copy_block(op_se_8_32_T0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_ze_8_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ze_8_32_T0 +{ + static const uint8 op_ze_8_32_T0_code[] = { + 0x45, 0x0f, 0xb6, 0xe4 + }; + copy_block(op_ze_8_32_T0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_1 +{ + static const uint8 op_add_32_T0_1_code[] = { + 0x41, 0xff, 0xc4 + }; + copy_block(op_add_32_T0_1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_2 +{ + static const uint8 op_add_32_T0_2_code[] = { + 0x41, 0x83, 0xc4, 0x02 + }; + copy_block(op_add_32_T0_2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_4 +{ + static const uint8 op_add_32_T0_4_code[] = { + 0x41, 0x83, 0xc4, 0x04 + }; + copy_block(op_add_32_T0_4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_8 +{ + static const uint8 op_add_32_T0_8_code[] = { + 0x41, 0x83, 0xc4, 0x08 + }; + copy_block(op_add_32_T0_8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_1 +{ + static const uint8 op_add_32_T1_1_code[] = { + 0x41, 0xff, 0xc5 + }; + copy_block(op_add_32_T1_1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_2 +{ + static const uint8 op_add_32_T1_2_code[] = { + 0x41, 0x83, 0xc5, 0x02 + }; + copy_block(op_add_32_T1_2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_4 +{ + static const uint8 op_add_32_T1_4_code[] = { + 0x41, 0x83, 0xc5, 0x04 + }; + copy_block(op_add_32_T1_4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_8 +{ + static const uint8 op_add_32_T1_8_code[] = { + 0x41, 0x83, 0xc5, 0x08 + }; + copy_block(op_add_32_T1_8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_bswap_16_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_bswap_16_T0 +{ + static const uint8 op_bswap_16_T0_code[] = { + 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + }; + copy_block(op_bswap_16_T0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_bswap_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_bswap_32_T0 +{ + static const uint8 op_bswap_32_T0_code[] = { + 0x41, 0x0f, 0xcc + }; + copy_block(op_bswap_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_0 +{ + static const uint8 op_mov_32_T0_0_code[] = { + 0x45, 0x31, 0xe4 + }; + copy_block(op_mov_32_T0_0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_0 +{ + static const uint8 op_mov_32_T1_0_code[] = { + 0x45, 0x31, 0xed + }; + copy_block(op_mov_32_T1_0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_0 +{ + static const uint8 op_mov_32_T2_0_code[] = { + 0x45, 0x31, 0xf6 + }; + copy_block(op_mov_32_T2_0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_or_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_or_32_T0_T1 +{ + static const uint8 op_or_32_T0_T1_code[] = { + 0x45, 0x09, 0xec + }; + copy_block(op_or_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_or_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_or_32_T0_im +{ + static const uint8 op_or_32_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x09, 0xc4 + }; + copy_block(op_or_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_se_16_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_16_32_T0 +{ + static const uint8 op_se_16_32_T0_code[] = { + 0x45, 0x0f, 0xbf, 0xe4 + }; + copy_block(op_se_16_32_T0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_se_16_32_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_16_32_T1 +{ + static const uint8 op_se_16_32_T1_code[] = { + 0x45, 0x0f, 0xbf, 0xed + }; + copy_block(op_se_16_32_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_1 +{ + static const uint8 op_sub_32_T0_1_code[] = { + 0x41, 0xff, 0xcc + }; + copy_block(op_sub_32_T0_1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_2 +{ + static const uint8 op_sub_32_T0_2_code[] = { + 0x41, 0x83, 0xec, 0x02 + }; + copy_block(op_sub_32_T0_2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_4 +{ + static const uint8 op_sub_32_T0_4_code[] = { + 0x41, 0x83, 0xec, 0x04 + }; + copy_block(op_sub_32_T0_4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_8 +{ + static const uint8 op_sub_32_T0_8_code[] = { + 0x41, 0x83, 0xec, 0x08 + }; + copy_block(op_sub_32_T0_8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_1 +{ + static const uint8 op_sub_32_T1_1_code[] = { + 0x41, 0xff, 0xcd + }; + copy_block(op_sub_32_T1_1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_2 +{ + static const uint8 op_sub_32_T1_2_code[] = { + 0x41, 0x83, 0xed, 0x02 + }; + copy_block(op_sub_32_T1_2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_4 +{ + static const uint8 op_sub_32_T1_4_code[] = { + 0x41, 0x83, 0xed, 0x04 + }; + copy_block(op_sub_32_T1_4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_8 +{ + static const uint8 op_sub_32_T1_8_code[] = { + 0x41, 0x83, 0xed, 0x08 + }; + copy_block(op_sub_32_T1_8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_ze_16_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ze_16_32_T0 +{ + static const uint8 op_ze_16_32_T0_code[] = { + 0x45, 0x0f, 0xb7, 0xe4 + }; + copy_block(op_ze_16_32_T0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_T1 +{ + static const uint8 op_add_32_T0_T1_code[] = { + 0x47, 0x8d, 0x64, 0x25, 0x00 + }; + copy_block(op_add_32_T0_T1_code, 5); + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_T2 +{ + static const uint8 op_add_32_T0_T2_code[] = { + 0x47, 0x8d, 0x24, 0x26 + }; + copy_block(op_add_32_T0_T2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_im +{ + static const uint8 op_add_32_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x01, 0xc4 + }; + copy_block(op_add_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_T0 +{ + static const uint8 op_add_32_T1_T0_code[] = { + 0x47, 0x8d, 0x2c, 0x2c + }; + copy_block(op_add_32_T1_T0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_T2 +{ + static const uint8 op_add_32_T1_T2_code[] = { + 0x47, 0x8d, 0x2c, 0x2e + }; + copy_block(op_add_32_T1_T2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_im +{ + static const uint8 op_add_32_T1_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x01, 0xc5 + }; + copy_block(op_add_32_T1_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_and_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_and_32_T0_T1 +{ + static const uint8 op_and_32_T0_T1_code[] = { + 0x45, 0x21, 0xec + }; + copy_block(op_and_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_and_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_and_32_T0_im +{ + static const uint8 op_and_32_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x21, 0xc4 + }; + copy_block(op_and_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_asr_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_asr_32_T0_T1 +{ + static const uint8 op_asr_32_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xfc + }; + copy_block(op_asr_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_asr_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_asr_32_T0_im +{ + static const uint8 op_asr_32_T0_im_code[] = { + 0x48, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x41, 0xd3, 0xfc + }; + copy_block(op_asr_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_eqv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_eqv_32_T0_T1 +{ + static const uint8 op_eqv_32_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x31, 0xe0, 0x41, 0x89, 0xc4, 0x41, 0xf7, 0xd4 + }; + copy_block(op_eqv_32_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_lsl_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsl_32_T0_T1 +{ + static const uint8 op_lsl_32_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xe4 + }; + copy_block(op_lsl_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_lsl_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsl_32_T0_im +{ + static const uint8 op_lsl_32_T0_im_code[] = { + 0x48, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x41, 0xd3, 0xe4 + }; + copy_block(op_lsl_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_lsr_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsr_32_T0_T1 +{ + static const uint8 op_lsr_32_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xec + }; + copy_block(op_lsr_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_lsr_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsr_32_T0_im +{ + static const uint8 op_lsr_32_T0_im_code[] = { + 0x48, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x41, 0xd3, 0xec + }; + copy_block(op_lsr_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_T1 +{ + static const uint8 op_mov_32_T0_T1_code[] = { + 0x45, 0x89, 0xec + }; + copy_block(op_mov_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_T2 +{ + static const uint8 op_mov_32_T0_T2_code[] = { + 0x45, 0x89, 0xf4 + }; + copy_block(op_mov_32_T0_T2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_im +{ + static const uint8 op_mov_32_T0_im_code[] = { + 0x44, 0x8d, 0x25, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T0_im_code, 7); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_T0 +{ + static const uint8 op_mov_32_T1_T0_code[] = { + 0x45, 0x89, 0xe5 + }; + copy_block(op_mov_32_T1_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_T2 +{ + static const uint8 op_mov_32_T1_T2_code[] = { + 0x45, 0x89, 0xf5 + }; + copy_block(op_mov_32_T1_T2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_im +{ + static const uint8 op_mov_32_T1_im_code[] = { + 0x44, 0x8d, 0x2d, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T1_im_code, 7); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_T0 +{ + static const uint8 op_mov_32_T2_T0_code[] = { + 0x45, 0x89, 0xe6 + }; + copy_block(op_mov_32_T2_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_T1 +{ + static const uint8 op_mov_32_T2_T1_code[] = { + 0x45, 0x89, 0xee + }; + copy_block(op_mov_32_T2_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_im +{ + static const uint8 op_mov_32_T2_im_code[] = { + 0x44, 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T2_im_code, 7); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_mov_ad_A0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A0_im +{ + static const uint8 op_mov_ad_A0_im_code[] = { + 0x49, 0xbc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A0_im_code, 10); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_mov_ad_A1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A1_im +{ + static const uint8 op_mov_ad_A1_im_code[] = { + 0x49, 0xbd, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A1_im_code, 10); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_mov_ad_A2_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A2_im +{ + static const uint8 op_mov_ad_A2_im_code[] = { + 0x49, 0xbe, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A2_im_code, 10); + *(uint64_t *)(code_ptr() + 2) = (uint64_t)param1 + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_nor_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nor_32_T0_T1 +{ + static const uint8 op_nor_32_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x09, 0xe0, 0x41, 0x89, 0xc4, 0x41, 0xf7, 0xd4 + }; + copy_block(op_nor_32_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_orc_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_orc_32_T0_T1 +{ + static const uint8 op_orc_32_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0xf7, 0xd0, 0x41, 0x09, 0xc4 + }; + copy_block(op_orc_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_rol_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rol_32_T0_T1 +{ + static const uint8 op_rol_32_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xc4 + }; + copy_block(op_rol_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_rol_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rol_32_T0_im +{ + static const uint8 op_rol_32_T0_im_code[] = { + 0x44, 0x89, 0xe0, 0x48, 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00, 0xb9, 0x20, + 0x00, 0x00, 0x00, 0x29, 0xf1, 0x44, 0x89, 0xe2, 0xd3, 0xea, 0x89, 0xf1, + 0xd3, 0xe0, 0x41, 0x89, 0xd4, 0x41, 0x09, 0xc4 + }; + copy_block(op_rol_32_T0_im_code, 32); + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(32); +} +#endif + +DEFINE_GEN(gen_op_ror_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ror_32_T0_T1 +{ + static const uint8 op_ror_32_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xcc + }; + copy_block(op_ror_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_ror_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ror_32_T0_im +{ + static const uint8 op_ror_32_T0_im_code[] = { + 0x53, 0x44, 0x89, 0xe0, 0x48, 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0xb9, + 0x20, 0x00, 0x00, 0x00, 0x29, 0xd1, 0x44, 0x89, 0xe6, 0xd3, 0xe6, 0x89, + 0xd1, 0xd3, 0xe8, 0x41, 0x89, 0xf4, 0x41, 0x09, 0xc4, 0x5b + }; + copy_block(op_ror_32_T0_im_code, 34); + *(uint32_t *)(code_ptr() + 7) = (int32_t)((long)param1 - (long)(code_ptr() + 7 + 4)) + 0; + inc_code_ptr(34); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_T1 +{ + static const uint8 op_sub_32_T0_T1_code[] = { + 0x45, 0x29, 0xec + }; + copy_block(op_sub_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_T2 +{ + static const uint8 op_sub_32_T0_T2_code[] = { + 0x45, 0x29, 0xf4 + }; + copy_block(op_sub_32_T0_T2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_im +{ + static const uint8 op_sub_32_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x29, 0xc4 + }; + copy_block(op_sub_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_T0 +{ + static const uint8 op_sub_32_T1_T0_code[] = { + 0x45, 0x29, 0xe5 + }; + copy_block(op_sub_32_T1_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_T2 +{ + static const uint8 op_sub_32_T1_T2_code[] = { + 0x45, 0x29, 0xf5 + }; + copy_block(op_sub_32_T1_T2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_im +{ + static const uint8 op_sub_32_T1_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x29, 0xc5 + }; + copy_block(op_sub_32_T1_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_xor_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xor_32_T0_T1 +{ + static const uint8 op_xor_32_T0_T1_code[] = { + 0x45, 0x31, 0xec + }; + copy_block(op_xor_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_xor_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xor_32_T0_im +{ + static const uint8 op_xor_32_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x31, 0xc4 + }; + copy_block(op_xor_32_T0_im_code, 10); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_andc_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_andc_32_T0_T1 +{ + static const uint8 op_andc_32_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0xf7, 0xd0, 0x41, 0x21, 0xc4 + }; + copy_block(op_andc_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_nand_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nand_32_T0_T1 +{ + static const uint8 op_nand_32_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x21, 0xe0, 0x41, 0x89, 0xc4, 0x41, 0xf7, 0xd4 + }; + copy_block(op_nand_32_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_sdiv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sdiv_32_T0_T1 +{ + static const uint8 op_sdiv_32_T0_T1_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0xc1, 0xfa, 0x1f, 0x41, 0xf7, 0xfd, + 0x41, 0x89, 0xc4 + }; + copy_block(op_sdiv_32_T0_T1_code, 15); + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_smul_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_smul_32_T0_T1 +{ + static const uint8 op_smul_32_T0_T1_code[] = { + 0x45, 0x0f, 0xaf, 0xe5 + }; + copy_block(op_smul_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_udiv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_udiv_32_T0_T1 +{ + static const uint8 op_udiv_32_T0_T1_code[] = { + 0x44, 0x89, 0xe0, 0x31, 0xd2, 0x41, 0xf7, 0xf5, 0x41, 0x89, 0xc4 + }; + copy_block(op_udiv_32_T0_T1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_umul_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_umul_32_T0_T1 +{ + static const uint8 op_umul_32_T0_T1_code[] = { + 0x45, 0x0f, 0xaf, 0xe5 + }; + copy_block(op_umul_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_xchg_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xchg_32_T0_T1 +{ + static const uint8 op_xchg_32_T0_T1_code[] = { + 0x45, 0x87, 0xe5 + }; + copy_block(op_xchg_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_0 +{ + static const uint8 op_load_s8_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x0f, 0xbe, 0x20 + }; + copy_block(op_load_s8_T0_T1_0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_0 +{ + static const uint8 op_load_u8_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, + }; + copy_block(op_load_u8_T0_T1_0_code, 43); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(43); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_0 +{ + static const uint8 op_store_8_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x44, 0x88, 0x20, + }; + copy_block(op_store_8_T0_T1_0_code, 42); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(42); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_0 +{ + static const uint8 op_load_s16_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + }; + copy_block(op_load_s16_T0_T1_0_code, 50); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_0 +{ + static const uint8 op_load_s32_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_s32_T0_T1_0_code, 47); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(47); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_T2 +{ + static const uint8 op_load_s8_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, 0x44, 0x0f, 0xbe, 0x20 + }; + copy_block(op_load_s8_T0_T1_T2_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_im +{ + static const uint8 op_load_s8_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x0f, + 0xbe, 0x24, 0x02 + }; + copy_block(op_load_s8_T0_T1_im_code, 15); + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_0 +{ + static const uint8 op_load_u16_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + }; + copy_block(op_load_u16_T0_T1_0_code, 50); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_0 +{ + static const uint8 op_load_u32_T0_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_u32_T0_T1_0_code, 47); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(47); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_T2 +{ + static const uint8 op_load_u8_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, + }; + copy_block(op_load_u8_T0_T1_T2_code, 44); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(44); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_im +{ + static const uint8 op_load_u8_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x44, 0x0f, 0xb6, 0x20, + }; + copy_block(op_load_u8_T0_T1_im_code, 52); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(52); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_0 +{ + static const uint8 op_store_16_T0_T1_0_code[] = { + 0x44, 0x89, 0xea, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, + TRANS_RDX, + 0x66, 0x89, 0x02, + }; + copy_block(op_store_16_T0_T1_0_code, 54); + *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_0 +{ + static const uint8 op_store_32_T0_T1_0_code[] = { + 0x44, 0x89, 0xe2, 0x0f, 0xca, 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x89, 0x10, + }; + copy_block(op_store_32_T0_T1_0_code, 46); + *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(46); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_T2 +{ + static const uint8 op_store_8_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x44, 0x88, 0x20, + }; + copy_block(op_store_8_T0_T1_T2_code, 43); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(43); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_im +{ + static const uint8 op_store_8_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x44, 0x88, 0x20, + }; + copy_block(op_store_8_T0_T1_im_code, 51); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_T2 +{ + static const uint8 op_load_s16_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + }; + copy_block(op_load_s16_T0_T1_T2_code, 51); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_im +{ + static const uint8 op_load_s16_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xbf, 0xe0 + }; + copy_block(op_load_s16_T0_T1_im_code, 59); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(59); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_T2 +{ + static const uint8 op_load_s32_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_s32_T0_T1_T2_code, 48); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_im +{ + static const uint8 op_load_s32_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_s32_T0_T1_im_code, 56); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(56); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_T2 +{ + static const uint8 op_load_u16_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + }; + copy_block(op_load_u16_T0_T1_T2_code, 51); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_im +{ + static const uint8 op_load_u16_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x0f, 0xb7, 0x00, + 0x66, 0xc1, 0xc0, 0x08, 0x44, 0x0f, 0xb7, 0xe0 + }; + copy_block(op_load_u16_T0_T1_im_code, 59); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(59); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_T2 +{ + static const uint8 op_load_u32_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_u32_T0_T1_T2_code, 48); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_im +{ + static const uint8 op_load_u32_T0_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc + }; + copy_block(op_load_u32_T0_T1_im_code, 56); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(56); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_T2 +{ + static const uint8 op_store_16_T0_T1_T2_code[] = { + 0x43, 0x8d, 0x14, 0x2e, 0x44, 0x89, 0xe0, 0x66, 0xc1, 0xc0, 0x08, + TRANS_RDX, + 0x66, 0x89, 0x02, + }; + copy_block(op_store_16_T0_T1_T2_code, 55); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(55); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_im +{ + static const uint8 op_store_16_T0_T1_im_code[] = { + 0x44, 0x89, 0xe9, 0x44, 0x89, 0xe2, 0x66, 0xc1, 0xc2, 0x08, 0x48, 0x8d, + 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RCX, + TRANS_RAX, + 0x66, 0x89, 0x10, + }; + copy_block(op_store_16_T0_T1_im_code, 58); + *(uint32_t *)(code_ptr() + 43) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 51) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; + inc_code_ptr(58); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_T2 +{ + static const uint8 op_store_32_T0_T1_T2_code[] = { + 0x44, 0x89, 0xf2, 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x01, 0xea, + TRANS_RDX, + 0x89, 0x0a, + }; + copy_block(op_store_32_T0_T1_T2_code, 54); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_im +{ + static const uint8 op_store_32_T0_T1_im_code[] = { + 0x44, 0x89, 0xe1, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, 0x8d, 0x15, 0x00, + 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x89, 0x08, + }; + copy_block(op_store_32_T0_T1_im_code, 55); + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 49) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param1 - (long)(code_ptr() + 11 + 4)) + 0; + inc_code_ptr(55); +} +#endif + +DEFINE_GEN(gen_op_jmp_A0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_A0 +{ + static const uint8 op_jmp_A0_code[] = { + 0x41, 0xff, 0xe4 + }; + copy_block(op_jmp_A0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_CST(op_exec_return_offset,0x32L) + +DEFINE_GEN(gen_op_execute,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_execute +{ + static const uint8 op_execute_code[] = { + 0x53, 0x48, 0x81, 0xec, 0xa0, 0x00, 0x00, 0x00, 0x48, 0x89, 0xfb, 0x48, + 0x89, 0xac, 0x24, 0x98, 0x00, 0x00, 0x00, 0x4c, 0x89, 0xa4, 0x24, 0x90, + 0x00, 0x00, 0x00, 0x4c, 0x89, 0xac, 0x24, 0x88, 0x00, 0x00, 0x00, 0x4c, + 0x89, 0xb4, 0x24, 0x80, 0x00, 0x00, 0x00, 0x48, 0x89, 0xf5, 0xff, 0xe7, + 0xff, 0xd3, 0x48, 0x8b, 0x84, 0x24, 0x80, 0x00, 0x00, 0x00, 0x49, 0x89, + 0xc6, 0x48, 0x8b, 0x84, 0x24, 0x88, 0x00, 0x00, 0x00, 0x49, 0x89, 0xc5, + 0x48, 0x8b, 0x84, 0x24, 0x90, 0x00, 0x00, 0x00, 0x49, 0x89, 0xc4, 0x48, + 0x8b, 0x84, 0x24, 0x98, 0x00, 0x00, 0x00, 0x48, 0x89, 0xc5, 0x48, 0x81, + 0xc4, 0xa0, 0x00, 0x00, 0x00, 0x5b, 0xc3 + }; + copy_block(op_execute_code, 103); + inc_code_ptr(103); +} +#endif + +#undef DEFINE_CST +#undef DEFINE_GEN diff --git a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops.hpp b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops.hpp index 20fc4ff26..7738d341b 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/basic-dyngen-ops.hpp @@ -1,5 +1,9 @@ #if defined(__x86_64__) +#ifdef __APPLE__ + #include "basic-dyngen-ops-x86_64_macos.hpp" +#else #include "basic-dyngen-ops-x86_64.hpp" +#endif #elif defined(__i386__) #include "basic-dyngen-ops-x86_32.hpp" #else diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp index 8aaea1c03..f4f08985b 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp @@ -1,30 +1,3 @@ -#define ADD_RAX_RCX 0x01,0xc8 -#define ADD_RDX_RCX 0x01,0xca -#define ADD_RAX_RDX 0x01,0xd0 -#define TRANS_RAX \ - 0x48,0x3D,0x00,0x30,0x00,0x00,\ - 0x72,0x16,\ - 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ - 0x72,0x14,\ - 0x48,0x25,0xFF,0x1F,0x00,0x00,\ - 0x48,0x05,0x00,0x00,0x00,0x00,\ - 0xEB,0x06,\ - 0x48,0x05,0x00,0x00,0x00,0x00 - -#define TRANS_RDX \ - 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ - 0x72,0x19,\ - 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ - 0x72,0x17,\ - 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ - 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ - 0xEB,0x07,\ - 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 - -#ifdef DYNGEN_IMPL -extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; -#endif - #ifndef DEFINE_CST #define DEFINE_CST(NAME, VALUE) #endif @@ -10444,26 +10417,14 @@ DEFINE_GEN(gen_op_load_vect_VD_T0,void,(void)) #define HAVE_gen_op_load_vect_VD_T0 { static const uint8 op_load_vect_VD_T0_code[] = { - 0x44, 0x89, 0xe2, 0x83, 0xe2, 0xf0, 0x89, 0xd0, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x41, 0x89, 0x07, 0x8d, 0x42, 0x04, 0x89, 0xc0, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, - 0x02, 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c - }; - copy_block(op_load_vect_VD_T0_code, 162); - *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 80) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 129) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 88) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 137) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(162); + 0x44, 0x89, 0xe2, 0x83, 0xe2, 0xf0, 0x89, 0xd0, 0x8b, 0x00, 0x0f, 0xc8, + 0x41, 0x89, 0x07, 0x8d, 0x42, 0x04, 0x89, 0xc0, 0x8b, 0x00, 0x0f, 0xc8, + 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, 0x8b, 0x00, 0x0f, + 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, 0x02, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c + }; + copy_block(op_load_vect_VD_T0_code, 54); + inc_code_ptr(54); } #endif @@ -10472,15 +10433,11 @@ DEFINE_GEN(gen_op_load_word_VD_T0,void,(void)) #define HAVE_gen_op_load_word_VD_T0 { static const uint8 op_load_word_VD_T0_code[] = { - 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97 - }; - copy_block(op_load_word_VD_T0_code, 59); - *(uint32_t *)(code_ptr() + 33) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(59); + 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, 0x8b, 0x00, 0x0f, + 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97 + }; + copy_block(op_load_word_VD_T0_code, 23); + inc_code_ptr(23); } #endif @@ -10538,26 +10495,13 @@ DEFINE_GEN(gen_op_store_vect_VD_T0,void,(void)) { static const uint8 op_store_vect_VD_T0_code[] = { 0x44, 0x89, 0xe1, 0x83, 0xe1, 0xf0, 0x41, 0x8b, 0x07, 0x0f, 0xc8, 0x89, - 0xca, - TRANS_RDX, - 0x89, 0x02, - 0x41, 0x8b, 0x57, 0x04, 0x0f, 0xca, 0x8d, 0x41, 0x04, 0x89, 0xc0, - TRANS_RAX, - 0x89, 0x10, - 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, 0x08, 0x89, 0xc0, - TRANS_RAX, - 0x89, 0x10, - 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, 0xc1, 0x0c, 0x89, 0xc9, 0x89, - 0x01 - }; - copy_block(op_store_vect_VD_T0_code, 167); - *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 91) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 140) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 50) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 99) = (uint32_t)(uintptr)gZeroPage; - *(uint32_t *)(code_ptr() + 148) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(167); + 0xca, 0x89, 0x02, 0x41, 0x8b, 0x57, 0x04, 0x0f, 0xca, 0x8d, 0x41, 0x04, + 0x89, 0xc0, 0x89, 0x10, 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, + 0x08, 0x89, 0xc0, 0x89, 0x10, 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, + 0xc1, 0x0c, 0x89, 0xc9, 0x89, 0x01 + }; + copy_block(op_store_vect_VD_T0_code, 54); + inc_code_ptr(54); } #endif @@ -10567,14 +10511,10 @@ DEFINE_GEN(gen_op_store_word_VD_T0,void,(void)) { static const uint8 op_store_word_VD_T0_code[] = { 0x44, 0x89, 0xe0, 0x44, 0x89, 0xe2, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, - 0x41, 0x8b, 0x14, 0x97, 0x0f, 0xca, 0x83, 0xe0, 0xfc, - TRANS_RAX, - 0x89, 0x10, + 0x41, 0x8b, 0x14, 0x97, 0x0f, 0xca, 0x83, 0xe0, 0xfc, 0x89, 0x10 }; - copy_block(op_store_word_VD_T0_code, 59); - *(uint32_t *)(code_ptr() + 45) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 53) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(59); + copy_block(op_store_word_VD_T0_code, 23); + inc_code_ptr(23); } #endif @@ -10753,15 +10693,11 @@ DEFINE_GEN(gen_op_load_double_FD_T1_0,void,(void)) #define HAVE_gen_op_load_double_FD_T1_0 { static const uint8 op_load_double_FD_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_0_code, 52); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(52); + 0x44, 0x89, 0xe8, 0x48, 0x8b, 0x00, 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_0_code, 16); + inc_code_ptr(16); } #endif @@ -10770,17 +10706,13 @@ DEFINE_GEN(gen_op_load_single_FD_T1_0,void,(void)) #define HAVE_gen_op_load_single_FD_T1_0 { static const uint8 op_load_single_FD_T1_0_code[] = { - 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, - 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, - 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, + 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, + 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, + 0x08, 0x10, 0x00 }; - copy_block(op_load_single_FD_T1_0_code, 75); - *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(75); + copy_block(op_load_single_FD_T1_0_code, 39); + inc_code_ptr(39); } #endif @@ -10943,15 +10875,11 @@ DEFINE_GEN(gen_op_load_double_FD_T1_T2,void,(void)) #define HAVE_gen_op_load_double_FD_T1_T2 { static const uint8 op_load_double_FD_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_T2_code, 53); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(53); + 0x43, 0x8d, 0x04, 0x2e, 0x48, 0x8b, 0x00, 0x48, 0x0f, 0xc8, 0x48, 0x89, + 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_T2_code, 17); + inc_code_ptr(17); } #endif @@ -10960,17 +10888,12 @@ DEFINE_GEN(gen_op_load_double_FD_T1_im,void,(long param1)) #define HAVE_gen_op_load_double_FD_T1_im { static const uint8 op_load_double_FD_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x48, 0x8b, 0x00, - 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_double_FD_T1_im_code, 61); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x48, 0x8b, + 0x04, 0x02, 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_im_code, 24); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(61); + inc_code_ptr(24); } #endif @@ -10979,17 +10902,13 @@ DEFINE_GEN(gen_op_load_single_FD_T1_T2,void,(void)) #define HAVE_gen_op_load_single_FD_T1_T2 { static const uint8 op_load_single_FD_T1_T2_code[] = { - 0x43, 0x8d, 0x04, 0x2e, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, - 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, - 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + 0x43, 0x8d, 0x04, 0x2e, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, + 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, + 0xa8, 0x08, 0x10, 0x00 }; - copy_block(op_load_single_FD_T1_T2_code, 76); - *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(76); + copy_block(op_load_single_FD_T1_T2_code, 40); + inc_code_ptr(40); } #endif @@ -10998,19 +10917,14 @@ DEFINE_GEN(gen_op_load_single_FD_T1_im,void,(long param1)) #define HAVE_gen_op_load_single_FD_T1_im { static const uint8 op_load_single_FD_T1_im_code[] = { - 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x8b, 0x00, - 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, - 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, - 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 - }; - copy_block(op_load_single_FD_T1_im_code, 84); - *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x04, + 0x02, 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, + 0xf4, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, + 0x8b, 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_single_FD_T1_im_code, 47); *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; - inc_code_ptr(84); + inc_code_ptr(47); } #endif @@ -11019,14 +10933,11 @@ DEFINE_GEN(gen_op_store_double_F0_T1_0,void,(void)) #define HAVE_gen_op_store_double_F0_T1_0 { static const uint8 op_store_double_F0_T1_0_code[] = { - 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xea, 0x48, 0x0f, 0xc8, - TRANS_RDX, - 0x48, 0x89, 0x02, + 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xea, 0x48, 0x0f, 0xc8, 0x48, 0x89, + 0x02 }; - copy_block(op_store_double_F0_T1_0_code, 54); - *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(54); + copy_block(op_store_double_F0_T1_0_code, 13); + inc_code_ptr(13); } #endif @@ -11041,14 +10952,11 @@ DEFINE_GEN(gen_op_store_single_F0_T1_0,void,(void)) 0xff, 0x3f, 0x48, 0xc1, 0xe9, 0x03, 0x89, 0xc8, 0x25, 0x00, 0x00, 0x00, 0xc0, 0x09, 0xc2, 0xeb, 0x19, 0x48, 0x89, 0x4c, 0x24, 0xf0, 0xf2, 0x0f, 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, - 0x24, 0xfc, 0x8b, 0x54, 0x24, 0xfc, 0x0f, 0xca, 0x44, 0x89, 0xe8, - TRANS_RAX, - 0x89, 0x10, + 0x24, 0xfc, 0x8b, 0x54, 0x24, 0xfc, 0x0f, 0xca, 0x44, 0x89, 0xe8, 0x89, + 0x10 }; - copy_block(op_store_single_F0_T1_0_code, 121); - *(uint32_t *)(code_ptr() + 107) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 115) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(121); + copy_block(op_store_single_F0_T1_0_code, 85); + inc_code_ptr(85); } #endif @@ -11117,14 +11025,11 @@ DEFINE_GEN(gen_op_store_double_F0_T1_T2,void,(void)) #define HAVE_gen_op_store_double_F0_T1_T2 { static const uint8 op_store_double_F0_T1_T2_code[] = { - 0x49, 0x8b, 0x04, 0x24, 0x43, 0x8d, 0x14, 0x2e, 0x48, 0x0f, 0xc8, - TRANS_RDX, - 0x48, 0x89, 0x02, + 0x49, 0x8b, 0x04, 0x24, 0x43, 0x8d, 0x14, 0x2e, 0x48, 0x0f, 0xc8, 0x48, + 0x89, 0x02 }; - copy_block(op_store_double_F0_T1_T2_code, 55); - *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; - inc_code_ptr(55); + copy_block(op_store_double_F0_T1_T2_code, 14); + inc_code_ptr(14); } #endif @@ -11134,16 +11039,11 @@ DEFINE_GEN(gen_op_store_double_F0_T1_im,void,(long param1)) { static const uint8 op_store_double_F0_T1_im_code[] = { 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xe9, 0x48, 0x0f, 0xc8, 0x48, 0x8d, - 0x15, 0x00, 0x00, 0x00, 0x00, - ADD_RDX_RCX, - TRANS_RDX, - 0x48, 0x89, 0x02, - }; - copy_block(op_store_double_F0_T1_im_code, 63); - *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 56) = (uint32_t)(uintptr)gZeroPage; + 0x15, 0x00, 0x00, 0x00, 0x00, 0x48, 0x89, 0x04, 0x11 + }; + copy_block(op_store_double_F0_T1_im_code, 21); *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; - inc_code_ptr(63); + inc_code_ptr(21); } #endif @@ -11178,16 +11078,11 @@ DEFINE_GEN(gen_op_store_single_F0_T1_im,void,(long param1)) 0xc0, 0x09, 0xc1, 0xeb, 0x19, 0x48, 0x89, 0x54, 0x24, 0xf0, 0xf2, 0x0f, 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, 0x24, 0xfc, 0x8b, 0x4c, 0x24, 0xfc, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, - 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, - ADD_RAX_RDX, - TRANS_RAX, - 0x89, 0x08, - }; - copy_block(op_store_single_F0_T1_im_code, 130); - *(uint32_t *)(code_ptr() + 116) = (uint32_t)(uintptr)gKernelData; - *(uint32_t *)(code_ptr() + 124) = (uint32_t)(uintptr)gZeroPage; + 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0x89, 0x0c, 0x10 + }; + copy_block(op_store_single_F0_T1_im_code, 93); *(uint32_t *)(code_ptr() + 86) = (int32_t)((long)param1 - (long)(code_ptr() + 86 + 4)) + 0; - inc_code_ptr(130); + inc_code_ptr(93); } #endif diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp new file mode 100644 index 000000000..8aaea1c03 --- /dev/null +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp @@ -0,0 +1,11221 @@ +#define ADD_RAX_RCX 0x01,0xc8 +#define ADD_RDX_RCX 0x01,0xca +#define ADD_RAX_RDX 0x01,0xd0 +#define TRANS_RAX \ + 0x48,0x3D,0x00,0x30,0x00,0x00,\ + 0x72,0x16,\ + 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x14,\ + 0x48,0x25,0xFF,0x1F,0x00,0x00,\ + 0x48,0x05,0x00,0x00,0x00,0x00,\ + 0xEB,0x06,\ + 0x48,0x05,0x00,0x00,0x00,0x00 + +#define TRANS_RDX \ + 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\ + 0x72,0x19,\ + 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\ + 0x72,0x17,\ + 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\ + 0xEB,0x07,\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 + +#ifdef DYNGEN_IMPL +extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif + +#ifndef DEFINE_CST +#define DEFINE_CST(NAME, VALUE) +#endif +DEFINE_GEN(gen_op_dcbz_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_dcbz_T0 +{ + static const uint8 op_dcbz_T0_code[] = { + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0xe0, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x48, + 0xc7, 0x00, 0x00, 0x00, 0x00, 0x00, 0x48, 0xc7, 0x40, 0x08, 0x00, 0x00, + 0x00, 0x00, 0x48, 0xc7, 0x40, 0x10, 0x00, 0x00, 0x00, 0x00, 0x48, 0xc7, + 0x40, 0x18, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_dcbz_T0_code, 42); + inc_code_ptr(42); +} +#endif + +DEFINE_GEN(gen_op_mmx_vor,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vor +{ + static const uint8 op_mmx_vor_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xeb, 0x45, 0x00, 0x41, 0x0f, 0xeb, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vor_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_nego_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nego_T0 +{ + static const uint8 op_nego_T0_code[] = { + 0x31, 0xd2, 0x41, 0x81, 0xfc, 0x00, 0x00, 0x00, 0x80, 0x0f, 0x94, 0xc2, + 0x48, 0x8d, 0x45, 0x10, 0x88, 0x90, 0x85, 0x03, 0x00, 0x00, 0x08, 0x90, + 0x84, 0x03, 0x00, 0x00, 0x41, 0xf7, 0xdc + }; + copy_block(op_nego_T0_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_addme_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addme_T0 +{ + static const uint8 op_addme_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x41, + 0x83, 0xd4, 0xff, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addme_T0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_addze_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addze_T0 +{ + static const uint8 op_addze_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x41, + 0x83, 0xd4, 0x00, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addze_T0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_mmx_vand,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vand +{ + static const uint8 op_mmx_vand_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xdb, 0x45, 0x00, 0x41, 0x0f, 0xdb, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vand_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vxor,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vxor +{ + static const uint8 op_mmx_vxor_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xef, 0x45, 0x00, 0x41, 0x0f, 0xef, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vxor_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_addmeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addmeo_T0 +{ + static const uint8 op_addmeo_T0_code[] = { + 0x48, 0x89, 0xe8, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, + 0xe2, 0x00, 0x41, 0x83, 0xd4, 0xff, 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc1, + 0x88, 0x95, 0x96, 0x03, 0x00, 0x00, 0x48, 0x83, 0xc0, 0x10, 0x88, 0x88, + 0x85, 0x03, 0x00, 0x00, 0x08, 0x88, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_addmeo_T0_code, 46); + inc_code_ptr(46); +} +#endif + +DEFINE_GEN(gen_op_addzeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addzeo_T0 +{ + static const uint8 op_addzeo_T0_code[] = { + 0x48, 0x89, 0xe8, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, + 0xe2, 0x00, 0x41, 0x83, 0xd4, 0x00, 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc1, + 0x88, 0x95, 0x96, 0x03, 0x00, 0x00, 0x48, 0x83, 0xc0, 0x10, 0x88, 0x88, + 0x85, 0x03, 0x00, 0x00, 0x08, 0x88, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_addzeo_T0_code, 46); + inc_code_ptr(46); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_26 +{ + static const uint8 op_lmw_T0_26_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x45, + 0x78, 0x8d, 0x42, 0x04, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, + 0xc8, 0x89, 0x45, 0x7c, 0x8d, 0x42, 0x08, 0x41, 0x89, 0xc4, 0x89, 0xc0, + 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x80, 0x00, 0x00, 0x00, 0x8d, 0x42, + 0x0c, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, + 0x84, 0x00, 0x00, 0x00, 0x8d, 0x42, 0x10, 0x41, 0x89, 0xc4, 0x89, 0xc0, + 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc2, + 0x14, 0x41, 0x89, 0xd4, 0x89, 0xd2, 0x8b, 0x02, 0x0f, 0xc8, 0x89, 0x85, + 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_26_code, 100); + inc_code_ptr(100); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_27 +{ + static const uint8 op_lmw_T0_27_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x45, + 0x7c, 0x8d, 0x42, 0x04, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, + 0xc8, 0x89, 0x85, 0x80, 0x00, 0x00, 0x00, 0x8d, 0x42, 0x08, 0x41, 0x89, + 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x84, 0x00, 0x00, + 0x00, 0x8d, 0x42, 0x0c, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, + 0xc8, 0x89, 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc2, 0x10, 0x41, 0x89, + 0xd4, 0x89, 0xd2, 0x8b, 0x02, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, + 0x00 + }; + copy_block(op_lmw_T0_27_code, 85); + inc_code_ptr(85); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_28 +{ + static const uint8 op_lmw_T0_28_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, + 0x80, 0x00, 0x00, 0x00, 0x8d, 0x42, 0x04, 0x41, 0x89, 0xc4, 0x89, 0xc0, + 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x84, 0x00, 0x00, 0x00, 0x8d, 0x42, + 0x08, 0x41, 0x89, 0xc4, 0x89, 0xc0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, + 0x88, 0x00, 0x00, 0x00, 0x83, 0xc2, 0x0c, 0x41, 0x89, 0xd4, 0x89, 0xd2, + 0x8b, 0x02, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_28_code, 70); + inc_code_ptr(70); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_29 +{ + static const uint8 op_lmw_T0_29_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, + 0x84, 0x00, 0x00, 0x00, 0x8d, 0x42, 0x04, 0x41, 0x89, 0xc4, 0x89, 0xc0, + 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc2, + 0x08, 0x41, 0x89, 0xd4, 0x89, 0xd2, 0x8b, 0x02, 0x0f, 0xc8, 0x89, 0x85, + 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_29_code, 52); + inc_code_ptr(52); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_30 +{ + static const uint8 op_lmw_T0_30_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, + 0x88, 0x00, 0x00, 0x00, 0x83, 0xc2, 0x04, 0x41, 0x89, 0xd4, 0x89, 0xd2, + 0x8b, 0x02, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_30_code, 34); + inc_code_ptr(34); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_31 +{ + static const uint8 op_lmw_T0_31_code[] = { + 0x44, 0x89, 0xe0, 0x8b, 0x00, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, + 0x00 + }; + copy_block(op_lmw_T0_31_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_im +{ + static const uint8 op_lmw_T0_im_code[] = { + 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, 0xe1, 0x48, 0x8d, 0x7d, + 0x10, 0xeb, 0x11, 0x89, 0xc8, 0x8b, 0x00, 0x0f, 0xc8, 0x48, 0x63, 0xd6, + 0x89, 0x04, 0x97, 0xff, 0xc6, 0x83, 0xc1, 0x04, 0x83, 0xfe, 0x1f, 0x76, + 0xea + }; + copy_block(op_lmw_T0_im_code, 37); + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param1 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(37); +} +#endif + +DEFINE_GEN(gen_op_mfvscr_VD,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mfvscr_VD +{ + static const uint8 op_mfvscr_VD_code[] = { + 0x41, 0xc7, 0x07, 0x00, 0x00, 0x00, 0x00, 0x41, 0xc7, 0x47, 0x04, 0x00, + 0x00, 0x00, 0x00, 0x41, 0xc7, 0x47, 0x08, 0x00, 0x00, 0x00, 0x00, 0x8b, + 0x85, 0x98, 0x03, 0x00, 0x00, 0x41, 0x89, 0x47, 0x0c + }; + copy_block(op_mfvscr_VD_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_mmx_vandc,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vandc +{ + static const uint8 op_mmx_vandc_code[] = { + 0x41, 0x0f, 0x6f, 0x45, 0x00, 0x41, 0x0f, 0x6f, 0x4d, 0x08, 0x41, 0x0f, + 0xdf, 0x04, 0x24, 0x41, 0x0f, 0xdf, 0x4c, 0x24, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vandc_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mtvscr_V0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mtvscr_V0 +{ + static const uint8 op_mtvscr_V0_code[] = { + 0x41, 0x8b, 0x44, 0x24, 0x0c, 0x89, 0x85, 0x98, 0x03, 0x00, 0x00 + }; + copy_block(op_mtvscr_V0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_set_PC_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_set_PC_T0 +{ + static const uint8 op_set_PC_T0_code[] = { + 0x44, 0x89, 0xa5, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_set_PC_T0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_set_PC_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_set_PC_im +{ + static const uint8 op_set_PC_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xac, 0x03, 0x00, + 0x00 + }; + copy_block(op_set_PC_im_code, 13); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_slw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_slw_T0_T1 +{ + static const uint8 op_slw_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xe4, 0x31, 0xc0, 0x83, 0xe1, 0x20, 0x41, + 0x0f, 0x44, 0xc4, 0x41, 0x89, 0xc4 + }; + copy_block(op_slw_T0_T1_code, 18); + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_srw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_srw_T0_T1 +{ + static const uint8 op_srw_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x41, 0xd3, 0xec, 0x31, 0xc0, 0x83, 0xe1, 0x20, 0x41, + 0x0f, 0x44, 0xc4, 0x41, 0x89, 0xc4 + }; + copy_block(op_srw_T0_T1_code, 18); + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_subfme_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfme_T0 +{ + static const uint8 op_subfme_T0_code[] = { + 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0xb8, 0xff, 0xff, 0xff, 0xff, + 0x0f, 0xba, 0xe2, 0x00, 0xf5, 0x44, 0x19, 0xe0, 0xf5, 0x0f, 0x92, 0xc2, + 0x41, 0x89, 0xc4, 0x88, 0x95, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_subfme_T0_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_subfze_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfze_T0 +{ + static const uint8 op_subfze_T0_code[] = { + 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x31, 0xc0, 0x0f, 0xba, 0xe2, + 0x00, 0xf5, 0x44, 0x19, 0xe0, 0xf5, 0x0f, 0x92, 0xc2, 0x41, 0x89, 0xc4, + 0x88, 0x95, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_subfze_T0_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_addc_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addc_T0_T1 +{ + static const uint8 op_addc_T0_T1_code[] = { + 0x45, 0x01, 0xec, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addc_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_addc_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addc_T0_im +{ + static const uint8 op_addc_T0_im_code[] = { + 0x44, 0x89, 0xe2, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x8d, 0x04, + 0x02, 0x41, 0x39, 0xc4, 0x0f, 0x97, 0x85, 0x96, 0x03, 0x00, 0x00, 0x41, + 0x89, 0xc4 + }; + copy_block(op_addc_T0_im_code, 26); + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_adde_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_adde_T0_T1 +{ + static const uint8 op_adde_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x45, + 0x11, 0xec, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_adde_T0_T1_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_addo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addo_T0_T1 +{ + static const uint8 op_addo_T0_T1_code[] = { + 0x45, 0x01, 0xec, 0x0f, 0x90, 0xc2, 0x48, 0x8d, 0x45, 0x10, 0x88, 0x90, + 0x85, 0x03, 0x00, 0x00, 0x08, 0x90, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_addo_T0_T1_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_divw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divw_T0_T1 +{ + static const uint8 op_divw_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x89, 0xe2, 0x45, 0x85, 0xed, 0x74, 0x0f, 0x41, + 0x81, 0xfc, 0x00, 0x00, 0x00, 0x80, 0x75, 0x0d, 0x41, 0x83, 0xfd, 0xff, + 0x75, 0x07, 0x89, 0xd0, 0xc1, 0xf8, 0x1f, 0xeb, 0x09, 0x89, 0xc1, 0x89, + 0xd0, 0xc1, 0xfa, 0x1f, 0xf7, 0xf9, 0x41, 0x89, 0xc4 + }; + copy_block(op_divw_T0_T1_code, 45); + inc_code_ptr(45); +} +#endif + +DEFINE_GEN(gen_op_fabs_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fabs_FD_F0 +{ + static const uint8 op_fabs_FD_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0xba, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, + 0xff, 0x7f, 0x48, 0x21, 0xd0, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fabs_FD_F0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_fmov_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F0_F1 +{ + static const uint8 op_fmov_F0_F1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x89, 0x04, 0x24 + }; + copy_block(op_fmov_F0_F1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_fmov_F0_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F0_F2 +{ + static const uint8 op_fmov_F0_F2_code[] = { + 0x49, 0x8b, 0x06, 0x49, 0x89, 0x04, 0x24 + }; + copy_block(op_fmov_F0_F2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_fmov_F1_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F1_F0 +{ + static const uint8 op_fmov_F1_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x49, 0x89, 0x45, 0x00 + }; + copy_block(op_fmov_F1_F0_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_fmov_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F1_F2 +{ + static const uint8 op_fmov_F1_F2_code[] = { + 0x49, 0x8b, 0x06, 0x49, 0x89, 0x45, 0x00 + }; + copy_block(op_fmov_F1_F2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_fmov_F2_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F2_F0 +{ + static const uint8 op_fmov_F2_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x49, 0x89, 0x06 + }; + copy_block(op_fmov_F2_F0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_fmov_F2_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F2_F1 +{ + static const uint8 op_fmov_F2_F1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x89, 0x06 + }; + copy_block(op_fmov_F2_F1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F0 +{ + static const uint8 op_fmov_FD_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmov_FD_F0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F1 +{ + static const uint8 op_fmov_FD_F1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmov_FD_F1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F2 +{ + static const uint8 op_fmov_FD_F2_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmov_FD_F2_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fneg_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fneg_FD_F0 +{ + static const uint8 op_fneg_FD_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0xb9, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x80, 0x48, 0x31, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fneg_FD_F0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_inc_32_mem,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_inc_32_mem +{ + static const uint8 op_inc_32_mem_code[] = { + 0xff, 0x05, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_inc_32_mem_code, 6); + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param1 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CR +{ + static const uint8 op_load_T0_CR_code[] = { + 0x44, 0x8b, 0xa5, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_CR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_LR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_LR +{ + static const uint8 op_load_T0_LR_code[] = { + 0x44, 0x8b, 0xa5, 0xa4, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_LR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_PC,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_PC +{ + static const uint8 op_load_T0_PC_code[] = { + 0x44, 0x8b, 0xa5, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_PC_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_mmx_vmaxsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vmaxsh +{ + static const uint8 op_mmx_vmaxsh_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xee, 0x45, 0x00, 0x41, 0x0f, 0xee, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vmaxsh_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vmaxub,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vmaxub +{ + static const uint8 op_mmx_vmaxub_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xde, 0x45, 0x00, 0x41, 0x0f, 0xde, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vmaxub_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vminsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vminsh +{ + static const uint8 op_mmx_vminsh_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xea, 0x45, 0x00, 0x41, 0x0f, 0xea, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vminsh_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vminub,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vminub +{ + static const uint8 op_mmx_vminub_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xda, 0x45, 0x00, 0x41, 0x0f, 0xda, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vminub_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_record_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr1 +{ + static const uint8 op_record_cr1_code[] = { + 0x8b, 0x95, 0xa0, 0x03, 0x00, 0x00, 0xc1, 0xea, 0x04, 0x81, 0xe2, 0x00, + 0x00, 0x00, 0x0f, 0x8b, 0x8d, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe1, 0xff, + 0xff, 0xff, 0xf0, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_record_cr1_code, 35); + inc_code_ptr(35); +} +#endif + +DEFINE_GEN(gen_op_sraw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sraw_T0_T1 +{ + static const uint8 op_sraw_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x89, 0xe9, 0x83, 0xe1, 0x3f, 0x41, 0x89, 0xcd, + 0xa8, 0x20, 0x74, 0x14, 0x44, 0x89, 0xe0, 0xc1, 0xe8, 0x1f, 0x88, 0x85, + 0x96, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0xf7, 0xdc, 0xeb, 0x25, + 0x44, 0x89, 0xe2, 0x31, 0xc0, 0x45, 0x85, 0xe4, 0x79, 0x0f, 0xb8, 0xff, + 0xff, 0xff, 0xff, 0xd3, 0xe0, 0xf7, 0xd0, 0x41, 0x85, 0xc4, 0x0f, 0x95, + 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x41, 0x89, 0xd4, 0x41, 0xd3, + 0xfc + }; + copy_block(op_sraw_T0_T1_code, 73); + inc_code_ptr(73); +} +#endif + +DEFINE_GEN(gen_op_sraw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sraw_T0_im +{ + static const uint8 op_sraw_T0_im_code[] = { + 0x44, 0x89, 0xe2, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x31, 0xc0, 0x45, + 0x85, 0xe4, 0x79, 0x0f, 0xb8, 0xff, 0xff, 0xff, 0xff, 0xd3, 0xe0, 0xf7, + 0xd0, 0x41, 0x85, 0xc4, 0x0f, 0x95, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, + 0x00, 0x41, 0x89, 0xd4, 0x41, 0xd3, 0xfc + }; + copy_block(op_sraw_T0_im_code, 43); + *(uint32_t *)(code_ptr() + 5) = (int32_t)((long)param1 - (long)(code_ptr() + 5 + 4)) + 0; + inc_code_ptr(43); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_26 +{ + static const uint8 op_stmw_T0_26_code[] = { + 0x8b, 0x45, 0x78, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, 0x02, 0x41, 0x8d, + 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x45, 0x7c, 0x0f, 0xc8, 0x89, + 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, + 0x85, 0x80, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, + 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x84, 0x00, 0x00, + 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, + 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x88, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, + 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, + 0x85, 0x8c, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02 + }; + copy_block(op_stmw_T0_26_code, 107); + inc_code_ptr(107); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_27 +{ + static const uint8 op_stmw_T0_27_code[] = { + 0x8b, 0x45, 0x7c, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, 0x02, 0x41, 0x8d, + 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x80, 0x00, 0x00, 0x00, + 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, + 0x89, 0xd4, 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, + 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, + 0x88, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, + 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, + 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02 + }; + copy_block(op_stmw_T0_27_code, 90); + inc_code_ptr(90); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_28 +{ + static const uint8 op_stmw_T0_28_code[] = { + 0x8b, 0x85, 0x80, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, + 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x84, + 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, + 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x88, 0x00, 0x00, 0x00, 0x0f, + 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, + 0xd4, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, + 0x02 + }; + copy_block(op_stmw_T0_28_code, 73); + inc_code_ptr(73); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_29 +{ + static const uint8 op_stmw_T0_29_code[] = { + 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, + 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x88, + 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02, 0x41, 0x8d, 0x54, + 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x0f, + 0xc8, 0x89, 0xd2, 0x89, 0x02 + }; + copy_block(op_stmw_T0_29_code, 53); + inc_code_ptr(53); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_30 +{ + static const uint8 op_stmw_T0_30_code[] = { + 0x8b, 0x85, 0x88, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, + 0x02, 0x41, 0x8d, 0x54, 0x24, 0x04, 0x41, 0x89, 0xd4, 0x8b, 0x85, 0x8c, + 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0xd2, 0x89, 0x02 + }; + copy_block(op_stmw_T0_30_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_31 +{ + static const uint8 op_stmw_T0_31_code[] = { + 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x44, 0x89, 0xe2, 0x89, + 0x02 + }; + copy_block(op_stmw_T0_31_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_im +{ + static const uint8 op_stmw_T0_im_code[] = { + 0x8d, 0x35, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, 0xe1, 0xeb, 0x12, 0x48, + 0x63, 0xc6, 0x8b, 0x44, 0x85, 0x10, 0x0f, 0xc8, 0x89, 0xca, 0x89, 0x02, + 0xff, 0xc6, 0x83, 0xc1, 0x04, 0x83, 0xfe, 0x1f, 0x76, 0xe9 + }; + copy_block(op_stmw_T0_im_code, 34); + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param1 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(34); +} +#endif + +DEFINE_GEN(gen_op_subf_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subf_T0_T1 +{ + static const uint8 op_subf_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x29, 0xe0, 0x41, 0x89, 0xc4 + }; + copy_block(op_subf_T0_T1_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_subfmeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfmeo_T0 +{ + static const uint8 op_subfmeo_T0_code[] = { + 0x53, 0x48, 0x89, 0xe9, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0xb8, + 0xff, 0xff, 0xff, 0xff, 0x89, 0xc3, 0x0f, 0xba, 0xe2, 0x00, 0xf5, 0x44, + 0x19, 0xe3, 0xf5, 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc0, 0x41, 0x89, 0xdc, + 0x88, 0x95, 0x96, 0x03, 0x00, 0x00, 0x48, 0x83, 0xc1, 0x10, 0x88, 0x81, + 0x85, 0x03, 0x00, 0x00, 0x08, 0x81, 0x84, 0x03, 0x00, 0x00, 0x5b + }; + copy_block(op_subfmeo_T0_code, 59); + inc_code_ptr(59); +} +#endif + +DEFINE_GEN(gen_op_subfzeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfzeo_T0 +{ + static const uint8 op_subfzeo_T0_code[] = { + 0x53, 0x48, 0x89, 0xe9, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x31, + 0xc0, 0x89, 0xc3, 0x0f, 0xba, 0xe2, 0x00, 0xf5, 0x44, 0x19, 0xe3, 0xf5, + 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc0, 0x41, 0x89, 0xdc, 0x88, 0x95, 0x96, + 0x03, 0x00, 0x00, 0x48, 0x83, 0xc1, 0x10, 0x88, 0x81, 0x85, 0x03, 0x00, + 0x00, 0x08, 0x81, 0x84, 0x03, 0x00, 0x00, 0x5b + }; + copy_block(op_subfzeo_T0_code, 56); + inc_code_ptr(56); +} +#endif + +DEFINE_GEN(gen_op_addco_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addco_T0_T1 +{ + static const uint8 op_addco_T0_T1_code[] = { + 0x45, 0x01, 0xec, 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc1, 0x48, 0x89, 0xe8, + 0x88, 0x95, 0x96, 0x03, 0x00, 0x00, 0x48, 0x83, 0xc0, 0x10, 0x88, 0x88, + 0x85, 0x03, 0x00, 0x00, 0x08, 0x88, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_addco_T0_T1_code, 34); + inc_code_ptr(34); +} +#endif + +DEFINE_GEN(gen_op_addeo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addeo_T0_T1 +{ + static const uint8 op_addeo_T0_T1_code[] = { + 0x48, 0x89, 0xe8, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, + 0xe2, 0x00, 0x45, 0x11, 0xec, 0x0f, 0x92, 0xc2, 0x0f, 0x90, 0xc1, 0x88, + 0x95, 0x96, 0x03, 0x00, 0x00, 0x48, 0x83, 0xc0, 0x10, 0x88, 0x88, 0x85, + 0x03, 0x00, 0x00, 0x08, 0x88, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_addeo_T0_T1_code, 45); + inc_code_ptr(45); +} +#endif + +DEFINE_GEN(gen_op_branch_1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_1_T0 +{ + static const uint8 op_branch_1_T0_code[] = { + 0x44, 0x89, 0xa5, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_1_T0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_branch_1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_1_im +{ + static const uint8 op_branch_1_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xac, 0x03, 0x00, + 0x00 + }; + copy_block(op_branch_1_im_code, 13); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_divwo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwo_T0_T1 +{ + static const uint8 op_divwo_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x44, 0x89, 0xe2, 0x45, 0x85, 0xed, 0x74, 0x0f, 0x41, + 0x81, 0xfc, 0x00, 0x00, 0x00, 0x80, 0x75, 0x1f, 0x41, 0x83, 0xfd, 0xff, + 0x75, 0x19, 0x89, 0xd1, 0xc1, 0xf9, 0x1f, 0x48, 0x8d, 0x45, 0x10, 0xc6, + 0x80, 0x85, 0x03, 0x00, 0x00, 0x01, 0x80, 0x88, 0x84, 0x03, 0x00, 0x00, + 0x01, 0xeb, 0x10, 0x89, 0xd0, 0xc1, 0xfa, 0x1f, 0xf7, 0xf9, 0x89, 0xc1, + 0xc6, 0x85, 0x95, 0x03, 0x00, 0x00, 0x00, 0x41, 0x89, 0xcc + }; + copy_block(op_divwo_T0_T1_code, 70); + inc_code_ptr(70); +} +#endif + +DEFINE_GEN(gen_op_divwu_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwu_T0_T1 +{ + static const uint8 op_divwu_T0_T1_code[] = { + 0x31, 0xc9, 0x45, 0x85, 0xed, 0x74, 0x0a, 0x44, 0x89, 0xe0, 0x31, 0xd2, + 0x41, 0xf7, 0xf5, 0x89, 0xc1, 0x41, 0x89, 0xcc + }; + copy_block(op_divwu_T0_T1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fnabs_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnabs_FD_F0 +{ + static const uint8 op_fnabs_FD_F0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0xbf, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, + 0xff, 0x7f, 0x48, 0x21, 0xf8, 0x48, 0xbe, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x80, 0x48, 0x31, 0xf0, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, + 0x00 + }; + copy_block(op_fnabs_FD_F0_code, 37); + inc_code_ptr(37); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CTR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CTR +{ + static const uint8 op_load_T0_CTR_code[] = { + 0x44, 0x8b, 0xa5, 0xa8, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_CTR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_XER,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_XER +{ + static const uint8 op_load_T0_XER_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x0f, 0xb6, 0x91, 0x84, 0x03, 0x00, 0x00, 0xc1, + 0xe2, 0x1f, 0x0f, 0xb6, 0x81, 0x85, 0x03, 0x00, 0x00, 0xc1, 0xe0, 0x1e, + 0x09, 0xc2, 0x0f, 0xb6, 0x81, 0x87, 0x03, 0x00, 0x00, 0x09, 0xc2, 0x0f, + 0xb6, 0x81, 0x86, 0x03, 0x00, 0x00, 0xc1, 0xe0, 0x1d, 0x41, 0x89, 0xd4, + 0x41, 0x09, 0xc4 + }; + copy_block(op_load_T0_XER_code, 51); + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr0 +{ + static const uint8 op_load_T0_cr0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0xc1, 0xec, + 0x1c + }; + copy_block(op_load_T0_cr0_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr1 +{ + static const uint8 op_load_T0_cr1_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x83, + 0xe4, 0x0f + }; + copy_block(op_load_T0_cr1_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr2 +{ + static const uint8 op_load_T0_cr2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x0f + }; + copy_block(op_load_T0_cr2_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr3 +{ + static const uint8 op_load_T0_cr3_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x83, + 0xe4, 0x0f + }; + copy_block(op_load_T0_cr3_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr4 +{ + static const uint8 op_load_T0_cr4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x0f + }; + copy_block(op_load_T0_cr4_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr5 +{ + static const uint8 op_load_T0_cr5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x0f + }; + copy_block(op_load_T0_cr5_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr6 +{ + static const uint8 op_load_T0_cr6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x0f + }; + copy_block(op_load_T0_cr6_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr7 +{ + static const uint8 op_load_T0_cr7_code[] = { + 0x44, 0x8b, 0xa5, 0x90, 0x03, 0x00, 0x00, 0x41, 0x83, 0xe4, 0x0f + }; + copy_block(op_load_T0_cr7_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_lwarx_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lwarx_T0_T1 +{ + static const uint8 op_lwarx_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x8b, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x0f, 0xcc, 0x48, + 0x89, 0xe8, 0xc7, 0x85, 0xb8, 0x03, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, + 0x44, 0x89, 0xa8, 0xbc, 0x03, 0x00, 0x00 + }; + copy_block(op_lwarx_T0_T1_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_mmx_vaddubm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vaddubm +{ + static const uint8 op_mmx_vaddubm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xfc, 0x45, 0x00, 0x41, 0x0f, 0xfc, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vaddubm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vadduhm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vadduhm +{ + static const uint8 op_mmx_vadduhm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xfd, 0x45, 0x00, 0x41, 0x0f, 0xfd, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vadduhm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vadduwm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vadduwm +{ + static const uint8 op_mmx_vadduwm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xfe, 0x45, 0x00, 0x41, 0x0f, 0xfe, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vadduwm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsububm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsububm +{ + static const uint8 op_mmx_vsububm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xf8, 0x45, 0x00, 0x41, 0x0f, 0xf8, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vsububm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsubuhm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsubuhm +{ + static const uint8 op_mmx_vsubuhm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xf9, 0x45, 0x00, 0x41, 0x0f, 0xf9, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vsubuhm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsubuwm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsubuwm +{ + static const uint8 op_mmx_vsubuwm_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0xfa, 0x45, 0x00, 0x41, 0x0f, 0xfa, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vsubuwm_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mtcrf_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mtcrf_T0_im +{ + static const uint8 op_mtcrf_T0_im_code[] = { + 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x89, 0xc2, 0xf7, 0xd2, 0x23, 0x95, + 0x90, 0x03, 0x00, 0x00, 0x44, 0x21, 0xe0, 0x09, 0xc2, 0x89, 0x95, 0x90, + 0x03, 0x00, 0x00 + }; + copy_block(op_mtcrf_T0_im_code, 27); + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param1 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mulhw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulhw_T0_T1 +{ + static const uint8 op_mulhw_T0_T1_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe8, 0xf7, 0xea, 0x41, 0x89, 0xd4 + }; + copy_block(op_mulhw_T0_T1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_mulli_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulli_T0_im +{ + static const uint8 op_mulli_T0_im_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x44, 0x0f, 0xaf, 0xe0 + }; + copy_block(op_mulli_T0_im_code, 11); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_rlwnm_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwnm_T0_T1 +{ + static const uint8 op_rlwnm_T0_T1_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe9, 0xd3, 0xc2, 0x48, 0x8d, 0x05, 0x00, + 0x00, 0x00, 0x00, 0x41, 0x89, 0xd4, 0x41, 0x21, 0xc4 + }; + copy_block(op_rlwnm_T0_T1_code, 21); + *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param1 - (long)(code_ptr() + 11 + 4)) + 0; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_store_T0_CR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_CR +{ + static const uint8 op_store_T0_CR_code[] = { + 0x44, 0x89, 0xa5, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_CR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_LR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_LR +{ + static const uint8 op_store_T0_LR_code[] = { + 0x44, 0x89, 0xa5, 0xa4, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_LR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_PC,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_PC +{ + static const uint8 op_store_T0_PC_code[] = { + 0x44, 0x89, 0xa5, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_PC_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_im_LR,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_im_LR +{ + static const uint8 op_store_im_LR_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xa4, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_im_LR_code, 13); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_stwcx_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stwcx_T0_T1 +{ + static const uint8 op_stwcx_T0_T1_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, 0xff, 0x0f, 0x0f, + 0xb6, 0x8d, 0x94, 0x03, 0x00, 0x00, 0xc1, 0xe1, 0x1c, 0x09, 0xc1, 0x44, + 0x8b, 0x85, 0xb8, 0x03, 0x00, 0x00, 0x45, 0x85, 0xc0, 0x74, 0x24, 0xc7, + 0x85, 0xb8, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x85, 0xbc, + 0x03, 0x00, 0x00, 0x44, 0x39, 0xe8, 0x75, 0x0f, 0x44, 0x89, 0xe2, 0x0f, + 0xca, 0x89, 0xc0, 0x89, 0x10, 0x81, 0xc9, 0x00, 0x00, 0x00, 0x20, 0x89, + 0x8d, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_stwcx_T0_T1_code, 77); + inc_code_ptr(77); +} +#endif + +DEFINE_GEN(gen_op_subfc_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfc_T0_T1 +{ + static const uint8 op_subfc_T0_T1_code[] = { + 0x44, 0x89, 0xea, 0x44, 0x29, 0xe2, 0xf5, 0x0f, 0x92, 0xc0, 0x41, 0x89, + 0xd4, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_subfc_T0_T1_code, 19); + inc_code_ptr(19); +} +#endif + +DEFINE_GEN(gen_op_subfc_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfc_T0_im +{ + static const uint8 op_subfc_T0_im_code[] = { + 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x89, 0xc2, 0x44, 0x29, 0xe2, 0x39, + 0xd0, 0x0f, 0x93, 0x85, 0x96, 0x03, 0x00, 0x00, 0x41, 0x89, 0xd4 + }; + copy_block(op_subfc_T0_im_code, 23); + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param1 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_subfe_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfe_T0_T1 +{ + static const uint8 op_subfe_T0_T1_code[] = { + 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x44, 0x89, 0xe8, 0x0f, 0xba, + 0xe2, 0x00, 0xf5, 0x44, 0x19, 0xe0, 0xf5, 0x0f, 0x92, 0xc2, 0x41, 0x89, + 0xc4, 0x88, 0x95, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_subfe_T0_T1_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_subfo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfo_T0_T1 +{ + static const uint8 op_subfo_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x29, 0xe0, 0x0f, 0x90, 0xc2, 0x41, 0x89, 0xc4, + 0x48, 0x8d, 0x45, 0x10, 0x88, 0x90, 0x85, 0x03, 0x00, 0x00, 0x08, 0x90, + 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_subfo_T0_T1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_cntlzw_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_cntlzw_32_T0 +{ + static const uint8 op_cntlzw_32_T0_code[] = { + 0xb8, 0xff, 0xff, 0xff, 0xff, 0x41, 0x0f, 0xbd, 0xc4, 0xba, 0x1f, 0x00, + 0x00, 0x00, 0x41, 0x89, 0xd4, 0x41, 0x29, 0xc4 + }; + copy_block(op_cntlzw_32_T0_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_0 +{ + static const uint8 op_compare_T0_0_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x41, 0x83, 0xfc, 0x00, 0x7d, + 0x09, 0x41, 0x89, 0xd4, 0x41, 0x83, 0xcc, 0x08, 0xeb, 0x12, 0x89, 0xd0, + 0x83, 0xc8, 0x04, 0x83, 0xca, 0x02, 0x45, 0x85, 0xe4, 0x41, 0x89, 0xc4, + 0x44, 0x0f, 0x44, 0xe2 + }; + copy_block(op_compare_T0_0_code, 40); + inc_code_ptr(40); +} +#endif + +DEFINE_GEN(gen_op_divwuo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwuo_T0_T1 +{ + static const uint8 op_divwuo_T0_T1_code[] = { + 0x44, 0x89, 0xe9, 0x45, 0x85, 0xed, 0x75, 0x14, 0x48, 0x8d, 0x45, 0x10, + 0xc6, 0x80, 0x85, 0x03, 0x00, 0x00, 0x01, 0x80, 0x88, 0x84, 0x03, 0x00, + 0x00, 0x01, 0xeb, 0x11, 0x44, 0x89, 0xe0, 0x31, 0xd2, 0x41, 0xf7, 0xf5, + 0x89, 0xc1, 0xc6, 0x85, 0x95, 0x03, 0x00, 0x00, 0x00, 0x41, 0x89, 0xcc + }; + copy_block(op_divwuo_T0_T1_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_jump_next_A0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jump_next_A0 +{ + static const uint8 op_jump_next_A0_code[] = { + 0x4c, 0x89, 0xe0, 0x8b, 0x95, 0xac, 0x03, 0x00, 0x00, 0x49, 0x39, 0x14, + 0x24, 0x74, 0x1e, 0x48, 0x89, 0xd0, 0x48, 0xc1, 0xe8, 0x02, 0x25, 0xff, + 0x7f, 0x00, 0x00, 0x48, 0x8b, 0x84, 0xc5, 0x28, 0x08, 0x0c, 0x00, 0x48, + 0x85, 0xc0, 0x74, 0x08, 0x48, 0x3b, 0x10, 0x75, 0x03, 0xff, 0x60, 0x70 + }; + copy_block(op_jump_next_A0_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR0 +{ + static const uint8 op_load_F0_FPR0_code[] = { + 0x4c, 0x8d, 0xa5, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR1 +{ + static const uint8 op_load_F0_FPR1_code[] = { + 0x4c, 0x8d, 0xa5, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR2 +{ + static const uint8 op_load_F0_FPR2_code[] = { + 0x4c, 0x8d, 0xa5, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR3 +{ + static const uint8 op_load_F0_FPR3_code[] = { + 0x4c, 0x8d, 0xa5, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR4 +{ + static const uint8 op_load_F0_FPR4_code[] = { + 0x4c, 0x8d, 0xa5, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR5 +{ + static const uint8 op_load_F0_FPR5_code[] = { + 0x4c, 0x8d, 0xa5, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR6 +{ + static const uint8 op_load_F0_FPR6_code[] = { + 0x4c, 0x8d, 0xa5, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR7 +{ + static const uint8 op_load_F0_FPR7_code[] = { + 0x4c, 0x8d, 0xa5, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR8 +{ + static const uint8 op_load_F0_FPR8_code[] = { + 0x4c, 0x8d, 0xa5, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR9 +{ + static const uint8 op_load_F0_FPR9_code[] = { + 0x4c, 0x8d, 0xa5, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR0 +{ + static const uint8 op_load_F1_FPR0_code[] = { + 0x4c, 0x8d, 0xad, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR1 +{ + static const uint8 op_load_F1_FPR1_code[] = { + 0x4c, 0x8d, 0xad, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR2 +{ + static const uint8 op_load_F1_FPR2_code[] = { + 0x4c, 0x8d, 0xad, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR3 +{ + static const uint8 op_load_F1_FPR3_code[] = { + 0x4c, 0x8d, 0xad, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR4 +{ + static const uint8 op_load_F1_FPR4_code[] = { + 0x4c, 0x8d, 0xad, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR5 +{ + static const uint8 op_load_F1_FPR5_code[] = { + 0x4c, 0x8d, 0xad, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR6 +{ + static const uint8 op_load_F1_FPR6_code[] = { + 0x4c, 0x8d, 0xad, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR7 +{ + static const uint8 op_load_F1_FPR7_code[] = { + 0x4c, 0x8d, 0xad, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR8 +{ + static const uint8 op_load_F1_FPR8_code[] = { + 0x4c, 0x8d, 0xad, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR9 +{ + static const uint8 op_load_F1_FPR9_code[] = { + 0x4c, 0x8d, 0xad, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR0 +{ + static const uint8 op_load_F2_FPR0_code[] = { + 0x4c, 0x8d, 0xb5, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR1 +{ + static const uint8 op_load_F2_FPR1_code[] = { + 0x4c, 0x8d, 0xb5, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR2 +{ + static const uint8 op_load_F2_FPR2_code[] = { + 0x4c, 0x8d, 0xb5, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR3 +{ + static const uint8 op_load_F2_FPR3_code[] = { + 0x4c, 0x8d, 0xb5, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR4 +{ + static const uint8 op_load_F2_FPR4_code[] = { + 0x4c, 0x8d, 0xb5, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR5 +{ + static const uint8 op_load_F2_FPR5_code[] = { + 0x4c, 0x8d, 0xb5, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR6 +{ + static const uint8 op_load_F2_FPR6_code[] = { + 0x4c, 0x8d, 0xb5, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR7 +{ + static const uint8 op_load_F2_FPR7_code[] = { + 0x4c, 0x8d, 0xb5, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR8 +{ + static const uint8 op_load_F2_FPR8_code[] = { + 0x4c, 0x8d, 0xb5, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR9 +{ + static const uint8 op_load_F2_FPR9_code[] = { + 0x4c, 0x8d, 0xb5, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR0 +{ + static const uint8 op_load_T0_GPR0_code[] = { + 0x44, 0x8b, 0x65, 0x10 + }; + copy_block(op_load_T0_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR1 +{ + static const uint8 op_load_T0_GPR1_code[] = { + 0x44, 0x8b, 0x65, 0x14 + }; + copy_block(op_load_T0_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR2 +{ + static const uint8 op_load_T0_GPR2_code[] = { + 0x44, 0x8b, 0x65, 0x18 + }; + copy_block(op_load_T0_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR3 +{ + static const uint8 op_load_T0_GPR3_code[] = { + 0x44, 0x8b, 0x65, 0x1c + }; + copy_block(op_load_T0_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR4 +{ + static const uint8 op_load_T0_GPR4_code[] = { + 0x44, 0x8b, 0x65, 0x20 + }; + copy_block(op_load_T0_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR5 +{ + static const uint8 op_load_T0_GPR5_code[] = { + 0x44, 0x8b, 0x65, 0x24 + }; + copy_block(op_load_T0_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR6 +{ + static const uint8 op_load_T0_GPR6_code[] = { + 0x44, 0x8b, 0x65, 0x28 + }; + copy_block(op_load_T0_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR7 +{ + static const uint8 op_load_T0_GPR7_code[] = { + 0x44, 0x8b, 0x65, 0x2c + }; + copy_block(op_load_T0_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR8 +{ + static const uint8 op_load_T0_GPR8_code[] = { + 0x44, 0x8b, 0x65, 0x30 + }; + copy_block(op_load_T0_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR9 +{ + static const uint8 op_load_T0_GPR9_code[] = { + 0x44, 0x8b, 0x65, 0x34 + }; + copy_block(op_load_T0_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb0 +{ + static const uint8 op_load_T0_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0xc1, 0xec, + 0x1f + }; + copy_block(op_load_T0_crb0_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb1 +{ + static const uint8 op_load_T0_crb1_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1e, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb1_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb2 +{ + static const uint8 op_load_T0_crb2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1d, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb2_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb3 +{ + static const uint8 op_load_T0_crb3_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1c, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb3_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb4 +{ + static const uint8 op_load_T0_crb4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1b, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb4_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb5 +{ + static const uint8 op_load_T0_crb5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1a, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb5_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb6 +{ + static const uint8 op_load_T0_crb6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x19, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb6_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb7 +{ + static const uint8 op_load_T0_crb7_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x83, + 0xe4, 0x01 + }; + copy_block(op_load_T0_crb7_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb8 +{ + static const uint8 op_load_T0_crb8_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x17, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb8_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb9 +{ + static const uint8 op_load_T0_crb9_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x16, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb9_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR0 +{ + static const uint8 op_load_T1_GPR0_code[] = { + 0x44, 0x8b, 0x6d, 0x10 + }; + copy_block(op_load_T1_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR1 +{ + static const uint8 op_load_T1_GPR1_code[] = { + 0x44, 0x8b, 0x6d, 0x14 + }; + copy_block(op_load_T1_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR2 +{ + static const uint8 op_load_T1_GPR2_code[] = { + 0x44, 0x8b, 0x6d, 0x18 + }; + copy_block(op_load_T1_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR3 +{ + static const uint8 op_load_T1_GPR3_code[] = { + 0x44, 0x8b, 0x6d, 0x1c + }; + copy_block(op_load_T1_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR4 +{ + static const uint8 op_load_T1_GPR4_code[] = { + 0x44, 0x8b, 0x6d, 0x20 + }; + copy_block(op_load_T1_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR5 +{ + static const uint8 op_load_T1_GPR5_code[] = { + 0x44, 0x8b, 0x6d, 0x24 + }; + copy_block(op_load_T1_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR6 +{ + static const uint8 op_load_T1_GPR6_code[] = { + 0x44, 0x8b, 0x6d, 0x28 + }; + copy_block(op_load_T1_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR7 +{ + static const uint8 op_load_T1_GPR7_code[] = { + 0x44, 0x8b, 0x6d, 0x2c + }; + copy_block(op_load_T1_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR8 +{ + static const uint8 op_load_T1_GPR8_code[] = { + 0x44, 0x8b, 0x6d, 0x30 + }; + copy_block(op_load_T1_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR9 +{ + static const uint8 op_load_T1_GPR9_code[] = { + 0x44, 0x8b, 0x6d, 0x34 + }; + copy_block(op_load_T1_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb0 +{ + static const uint8 op_load_T1_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc5, 0x41, 0xc1, 0xed, + 0x1f + }; + copy_block(op_load_T1_crb0_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb1 +{ + static const uint8 op_load_T1_crb1_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1e, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb1_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb2 +{ + static const uint8 op_load_T1_crb2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1d, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb2_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb3 +{ + static const uint8 op_load_T1_crb3_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1c, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb3_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb4 +{ + static const uint8 op_load_T1_crb4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1b, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb4_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb5 +{ + static const uint8 op_load_T1_crb5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1a, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb5_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb6 +{ + static const uint8 op_load_T1_crb6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x19, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb6_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb7 +{ + static const uint8 op_load_T1_crb7_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc5, 0x41, 0x83, + 0xe5, 0x01 + }; + copy_block(op_load_T1_crb7_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb8 +{ + static const uint8 op_load_T1_crb8_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x17, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb8_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb9 +{ + static const uint8 op_load_T1_crb9_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x16, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb9_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR0 +{ + static const uint8 op_load_T2_GPR0_code[] = { + 0x44, 0x8b, 0x75, 0x10 + }; + copy_block(op_load_T2_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR1 +{ + static const uint8 op_load_T2_GPR1_code[] = { + 0x44, 0x8b, 0x75, 0x14 + }; + copy_block(op_load_T2_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR2 +{ + static const uint8 op_load_T2_GPR2_code[] = { + 0x44, 0x8b, 0x75, 0x18 + }; + copy_block(op_load_T2_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR3 +{ + static const uint8 op_load_T2_GPR3_code[] = { + 0x44, 0x8b, 0x75, 0x1c + }; + copy_block(op_load_T2_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR4 +{ + static const uint8 op_load_T2_GPR4_code[] = { + 0x44, 0x8b, 0x75, 0x20 + }; + copy_block(op_load_T2_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR5 +{ + static const uint8 op_load_T2_GPR5_code[] = { + 0x44, 0x8b, 0x75, 0x24 + }; + copy_block(op_load_T2_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR6 +{ + static const uint8 op_load_T2_GPR6_code[] = { + 0x44, 0x8b, 0x75, 0x28 + }; + copy_block(op_load_T2_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR7 +{ + static const uint8 op_load_T2_GPR7_code[] = { + 0x44, 0x8b, 0x75, 0x2c + }; + copy_block(op_load_T2_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR8 +{ + static const uint8 op_load_T2_GPR8_code[] = { + 0x44, 0x8b, 0x75, 0x30 + }; + copy_block(op_load_T2_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR9 +{ + static const uint8 op_load_T2_GPR9_code[] = { + 0x44, 0x8b, 0x75, 0x34 + }; + copy_block(op_load_T2_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequb,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequb +{ + static const uint8 op_mmx_vcmpequb_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x74, 0x45, 0x00, 0x41, 0x0f, 0x74, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpequb_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequh +{ + static const uint8 op_mmx_vcmpequh_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x75, 0x45, 0x00, 0x41, 0x0f, 0x75, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpequh_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequw,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequw +{ + static const uint8 op_mmx_vcmpequw_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x76, 0x45, 0x00, 0x41, 0x0f, 0x76, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpequw_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsb,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsb +{ + static const uint8 op_mmx_vcmpgtsb_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x64, 0x45, 0x00, 0x41, 0x0f, 0x64, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpgtsb_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsh +{ + static const uint8 op_mmx_vcmpgtsh_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x65, 0x45, 0x00, 0x41, 0x0f, 0x65, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpgtsh_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsw,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsw +{ + static const uint8 op_mmx_vcmpgtsw_code[] = { + 0x41, 0x0f, 0x6f, 0x04, 0x24, 0x41, 0x0f, 0x6f, 0x4c, 0x24, 0x08, 0x41, + 0x0f, 0x66, 0x45, 0x00, 0x41, 0x0f, 0x66, 0x4d, 0x08, 0x41, 0x0f, 0x7f, + 0x07, 0x41, 0x0f, 0x7f, 0x4f, 0x08 + }; + copy_block(op_mmx_vcmpgtsw_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_mulhwu_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulhwu_T0_T1 +{ + static const uint8 op_mulhwu_T0_T1_code[] = { + 0x44, 0x89, 0xe2, 0x44, 0x89, 0xe8, 0xf7, 0xe2, 0x41, 0x89, 0xd4 + }; + copy_block(op_mulhwu_T0_T1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_mullwo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mullwo_T0_T1 +{ + static const uint8 op_mullwo_T0_T1_code[] = { + 0x49, 0x63, 0xcd, 0x49, 0x63, 0xc4, 0x48, 0x0f, 0xaf, 0xc8, 0x48, 0x63, + 0xc1, 0x31, 0xd2, 0x48, 0x39, 0xc8, 0x0f, 0x95, 0xc2, 0x48, 0x8d, 0x45, + 0x10, 0x88, 0x90, 0x85, 0x03, 0x00, 0x00, 0x08, 0x90, 0x84, 0x03, 0x00, + 0x00, 0x41, 0x89, 0xcc + }; + copy_block(op_mullwo_T0_T1_code, 40); + inc_code_ptr(40); +} +#endif + +DEFINE_GEN(gen_op_rlwimi_T0_T1,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwimi_T0_T1 +{ + static const uint8 op_rlwimi_T0_T1_code[] = { + 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, 0x89, 0xd6, 0xf7, 0xd6, 0x44, 0x21, + 0xe6, 0x48, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, 0xe8, 0xd3, + 0xc0, 0x21, 0xc2, 0x41, 0x89, 0xf4, 0x41, 0x09, 0xd4 + }; + copy_block(op_rlwimi_T0_T1_code, 33); + *(uint32_t *)(code_ptr() + 16) = (int32_t)((long)param1 - (long)(code_ptr() + 16 + 4)) + 0; + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param2 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_rlwinm_T0_T1,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwinm_T0_T1 +{ + static const uint8 op_rlwinm_T0_T1_code[] = { + 0x48, 0x8d, 0x0d, 0x00, 0x00, 0x00, 0x00, 0x44, 0x89, 0xe2, 0xd3, 0xc2, + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x89, 0xd4, 0x41, 0x21, + 0xc4 + }; + copy_block(op_rlwinm_T0_T1_code, 25); + *(uint32_t *)(code_ptr() + 15) = (int32_t)((long)param2 - (long)(code_ptr() + 15 + 4)) + 0; + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_spcflags_set,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_set +{ + static const uint8 op_spcflags_set_code[] = { + 0x48, 0x8d, 0x8d, 0xb0, 0x03, 0x00, 0x00, 0x48, 0x8d, 0x95, 0xb4, 0x03, + 0x00, 0x00, 0xb8, 0x01, 0x00, 0x00, 0x00, 0x87, 0x02, 0x85, 0xc0, 0x75, + 0xf5, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0xc7, 0x41, + 0x04, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_spcflags_set_code, 41); + *(uint32_t *)(code_ptr() + 28) = (int32_t)((long)param1 - (long)(code_ptr() + 28 + 4)) + 0; + inc_code_ptr(41); +} +#endif + +DEFINE_GEN(gen_op_store_T0_CTR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_CTR +{ + static const uint8 op_store_T0_CTR_code[] = { + 0x44, 0x89, 0xa5, 0xa8, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_CTR_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_XER,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_XER +{ + static const uint8 op_store_T0_XER_code[] = { + 0x44, 0x89, 0xe2, 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe0, 0xc1, 0xe8, + 0x1f, 0x88, 0x81, 0x84, 0x03, 0x00, 0x00, 0x44, 0x89, 0xe0, 0xc1, 0xe8, + 0x1e, 0x83, 0xe0, 0x01, 0x88, 0x81, 0x85, 0x03, 0x00, 0x00, 0x44, 0x89, + 0xe0, 0xc1, 0xe8, 0x1d, 0x83, 0xe0, 0x01, 0x88, 0x81, 0x86, 0x03, 0x00, + 0x00, 0x83, 0xe2, 0x7f, 0x88, 0x91, 0x87, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_XER_code, 58); + inc_code_ptr(58); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr0 +{ + static const uint8 op_store_T0_cr0_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x1c, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, 0xff, 0x0f, 0x09, 0xd0, 0x89, + 0x81, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr0_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr1 +{ + static const uint8 op_store_T0_cr1_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x18, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, 0xff, 0xf0, 0x09, 0xd0, 0x89, + 0x81, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr1_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr2 +{ + static const uint8 op_store_T0_cr2_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x14, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, 0x0f, 0xff, 0x09, 0xd0, 0x89, + 0x81, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr2_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr3 +{ + static const uint8 op_store_T0_cr3_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x10, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, 0xf0, 0xff, 0x09, 0xd0, 0x89, + 0x81, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr3_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr4 +{ + static const uint8 op_store_T0_cr4_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x0c, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x80, 0xe4, 0x0f, 0x09, 0xd0, 0x89, 0x81, 0x80, + 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr4_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr5 +{ + static const uint8 op_store_T0_cr5_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x08, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x80, 0xe4, 0xf0, 0x09, 0xd0, 0x89, 0x81, 0x80, + 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr5_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr6 +{ + static const uint8 op_store_T0_cr6_code[] = { + 0x48, 0x8d, 0x4d, 0x10, 0x44, 0x89, 0xe2, 0xc1, 0xe2, 0x04, 0x8b, 0x81, + 0x80, 0x03, 0x00, 0x00, 0x24, 0x0f, 0x09, 0xd0, 0x89, 0x81, 0x80, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_cr6_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr7 +{ + static const uint8 op_store_T0_cr7_code[] = { + 0x48, 0x8d, 0x55, 0x10, 0x8b, 0x82, 0x80, 0x03, 0x00, 0x00, 0x83, 0xe0, + 0xf0, 0x44, 0x09, 0xe0, 0x89, 0x82, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr7_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_subfco_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfco_T0_T1 +{ + static const uint8 op_subfco_T0_T1_code[] = { + 0x44, 0x89, 0xe8, 0x44, 0x29, 0xe0, 0xf5, 0x0f, 0x92, 0xc2, 0x0f, 0x90, + 0xc1, 0x41, 0x89, 0xc4, 0x48, 0x89, 0xe8, 0x88, 0x95, 0x96, 0x03, 0x00, + 0x00, 0x48, 0x83, 0xc0, 0x10, 0x88, 0x88, 0x85, 0x03, 0x00, 0x00, 0x08, + 0x88, 0x84, 0x03, 0x00, 0x00 + }; + copy_block(op_subfco_T0_T1_code, 41); + inc_code_ptr(41); +} +#endif + +DEFINE_GEN(gen_op_subfeo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfeo_T0_T1 +{ + static const uint8 op_subfeo_T0_T1_code[] = { + 0x53, 0x48, 0x89, 0xe9, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, 0x44, + 0x89, 0xeb, 0x0f, 0xba, 0xe2, 0x00, 0xf5, 0x44, 0x19, 0xe3, 0xf5, 0x0f, + 0x92, 0xc2, 0x0f, 0x90, 0xc0, 0x41, 0x89, 0xdc, 0x88, 0x95, 0x96, 0x03, + 0x00, 0x00, 0x48, 0x83, 0xc1, 0x10, 0x88, 0x81, 0x85, 0x03, 0x00, 0x00, + 0x08, 0x81, 0x84, 0x03, 0x00, 0x00, 0x5b + }; + copy_block(op_subfeo_T0_T1_code, 55); + inc_code_ptr(55); +} +#endif + +DEFINE_GEN(gen_op_vor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vor_VD_V0_V1 +{ + static const uint8 op_vor_VD_V0_V1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x0b, 0x04, 0x24, 0x49, 0x89, 0x07, 0x49, + 0x8b, 0x45, 0x08, 0x49, 0x0b, 0x44, 0x24, 0x08, 0x49, 0x89, 0x47, 0x08 + }; + copy_block(op_vor_VD_V0_V1_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_T1 +{ + static const uint8 op_compare_T0_T1_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x45, 0x39, 0xec, 0x7d, 0x09, + 0x41, 0x89, 0xd4, 0x41, 0x83, 0xcc, 0x08, 0xeb, 0x12, 0x89, 0xd0, 0x83, + 0xc8, 0x04, 0x83, 0xca, 0x02, 0x45, 0x39, 0xec, 0x41, 0x89, 0xc4, 0x44, + 0x0f, 0x4e, 0xe2 + }; + copy_block(op_compare_T0_T1_code, 39); + inc_code_ptr(39); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_im +{ + static const uint8 op_compare_T0_im_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x8d, 0x35, 0x00, 0x00, 0x00, + 0x00, 0x41, 0x39, 0xf4, 0x7d, 0x09, 0x41, 0x89, 0xd4, 0x41, 0x83, 0xcc, + 0x08, 0xeb, 0x12, 0x89, 0xd0, 0x83, 0xc8, 0x04, 0x83, 0xca, 0x02, 0x41, + 0x39, 0xf4, 0x41, 0x89, 0xc4, 0x44, 0x0f, 0x4e, 0xe2 + }; + copy_block(op_compare_T0_im_code, 45); + *(uint32_t *)(code_ptr() + 9) = (int32_t)((long)param1 - (long)(code_ptr() + 9 + 4)) + 0; + inc_code_ptr(45); +} +#endif + +DEFINE_GEN(gen_op_fadd_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fadd_FD_F0_F1 +{ + static const uint8 op_fadd_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x58, 0x45, 0x00, + 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fadd_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fdiv_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fdiv_FD_F0_F1 +{ + static const uint8 op_fdiv_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x5e, 0x45, 0x00, + 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fdiv_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fmul_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmul_FD_F0_F1 +{ + static const uint8 op_fmul_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmul_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fsub_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fsub_FD_F0_F1 +{ + static const uint8 op_fsub_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x5c, 0x45, 0x00, + 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fsub_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR10 +{ + static const uint8 op_load_F0_FPR10_code[] = { + 0x4c, 0x8d, 0xa5, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR11 +{ + static const uint8 op_load_F0_FPR11_code[] = { + 0x4c, 0x8d, 0xa5, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR12 +{ + static const uint8 op_load_F0_FPR12_code[] = { + 0x4c, 0x8d, 0xa5, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR13 +{ + static const uint8 op_load_F0_FPR13_code[] = { + 0x4c, 0x8d, 0xa5, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR14 +{ + static const uint8 op_load_F0_FPR14_code[] = { + 0x4c, 0x8d, 0xa5, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR15 +{ + static const uint8 op_load_F0_FPR15_code[] = { + 0x4c, 0x8d, 0xa5, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR16 +{ + static const uint8 op_load_F0_FPR16_code[] = { + 0x4c, 0x8d, 0xa5, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR17 +{ + static const uint8 op_load_F0_FPR17_code[] = { + 0x4c, 0x8d, 0xa5, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR18 +{ + static const uint8 op_load_F0_FPR18_code[] = { + 0x4c, 0x8d, 0xa5, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR19 +{ + static const uint8 op_load_F0_FPR19_code[] = { + 0x4c, 0x8d, 0xa5, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR20 +{ + static const uint8 op_load_F0_FPR20_code[] = { + 0x4c, 0x8d, 0xa5, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR21 +{ + static const uint8 op_load_F0_FPR21_code[] = { + 0x4c, 0x8d, 0xa5, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR22 +{ + static const uint8 op_load_F0_FPR22_code[] = { + 0x4c, 0x8d, 0xa5, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR23 +{ + static const uint8 op_load_F0_FPR23_code[] = { + 0x4c, 0x8d, 0xa5, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR24 +{ + static const uint8 op_load_F0_FPR24_code[] = { + 0x4c, 0x8d, 0xa5, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR25 +{ + static const uint8 op_load_F0_FPR25_code[] = { + 0x4c, 0x8d, 0xa5, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR26 +{ + static const uint8 op_load_F0_FPR26_code[] = { + 0x4c, 0x8d, 0xa5, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR27 +{ + static const uint8 op_load_F0_FPR27_code[] = { + 0x4c, 0x8d, 0xa5, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR28 +{ + static const uint8 op_load_F0_FPR28_code[] = { + 0x4c, 0x8d, 0xa5, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR29 +{ + static const uint8 op_load_F0_FPR29_code[] = { + 0x4c, 0x8d, 0xa5, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR30 +{ + static const uint8 op_load_F0_FPR30_code[] = { + 0x4c, 0x8d, 0xa5, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR31 +{ + static const uint8 op_load_F0_FPR31_code[] = { + 0x4c, 0x8d, 0xa5, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR10 +{ + static const uint8 op_load_F1_FPR10_code[] = { + 0x4c, 0x8d, 0xad, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR11 +{ + static const uint8 op_load_F1_FPR11_code[] = { + 0x4c, 0x8d, 0xad, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR12 +{ + static const uint8 op_load_F1_FPR12_code[] = { + 0x4c, 0x8d, 0xad, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR13 +{ + static const uint8 op_load_F1_FPR13_code[] = { + 0x4c, 0x8d, 0xad, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR14 +{ + static const uint8 op_load_F1_FPR14_code[] = { + 0x4c, 0x8d, 0xad, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR15 +{ + static const uint8 op_load_F1_FPR15_code[] = { + 0x4c, 0x8d, 0xad, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR16 +{ + static const uint8 op_load_F1_FPR16_code[] = { + 0x4c, 0x8d, 0xad, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR17 +{ + static const uint8 op_load_F1_FPR17_code[] = { + 0x4c, 0x8d, 0xad, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR18 +{ + static const uint8 op_load_F1_FPR18_code[] = { + 0x4c, 0x8d, 0xad, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR19 +{ + static const uint8 op_load_F1_FPR19_code[] = { + 0x4c, 0x8d, 0xad, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR20 +{ + static const uint8 op_load_F1_FPR20_code[] = { + 0x4c, 0x8d, 0xad, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR21 +{ + static const uint8 op_load_F1_FPR21_code[] = { + 0x4c, 0x8d, 0xad, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR22 +{ + static const uint8 op_load_F1_FPR22_code[] = { + 0x4c, 0x8d, 0xad, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR23 +{ + static const uint8 op_load_F1_FPR23_code[] = { + 0x4c, 0x8d, 0xad, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR24 +{ + static const uint8 op_load_F1_FPR24_code[] = { + 0x4c, 0x8d, 0xad, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR25 +{ + static const uint8 op_load_F1_FPR25_code[] = { + 0x4c, 0x8d, 0xad, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR26 +{ + static const uint8 op_load_F1_FPR26_code[] = { + 0x4c, 0x8d, 0xad, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR27 +{ + static const uint8 op_load_F1_FPR27_code[] = { + 0x4c, 0x8d, 0xad, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR28 +{ + static const uint8 op_load_F1_FPR28_code[] = { + 0x4c, 0x8d, 0xad, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR29 +{ + static const uint8 op_load_F1_FPR29_code[] = { + 0x4c, 0x8d, 0xad, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR30 +{ + static const uint8 op_load_F1_FPR30_code[] = { + 0x4c, 0x8d, 0xad, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR31 +{ + static const uint8 op_load_F1_FPR31_code[] = { + 0x4c, 0x8d, 0xad, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR10 +{ + static const uint8 op_load_F2_FPR10_code[] = { + 0x4c, 0x8d, 0xb5, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR11 +{ + static const uint8 op_load_F2_FPR11_code[] = { + 0x4c, 0x8d, 0xb5, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR12 +{ + static const uint8 op_load_F2_FPR12_code[] = { + 0x4c, 0x8d, 0xb5, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR13 +{ + static const uint8 op_load_F2_FPR13_code[] = { + 0x4c, 0x8d, 0xb5, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR14 +{ + static const uint8 op_load_F2_FPR14_code[] = { + 0x4c, 0x8d, 0xb5, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR15 +{ + static const uint8 op_load_F2_FPR15_code[] = { + 0x4c, 0x8d, 0xb5, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR16 +{ + static const uint8 op_load_F2_FPR16_code[] = { + 0x4c, 0x8d, 0xb5, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR17 +{ + static const uint8 op_load_F2_FPR17_code[] = { + 0x4c, 0x8d, 0xb5, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR18 +{ + static const uint8 op_load_F2_FPR18_code[] = { + 0x4c, 0x8d, 0xb5, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR19 +{ + static const uint8 op_load_F2_FPR19_code[] = { + 0x4c, 0x8d, 0xb5, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR20 +{ + static const uint8 op_load_F2_FPR20_code[] = { + 0x4c, 0x8d, 0xb5, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR21 +{ + static const uint8 op_load_F2_FPR21_code[] = { + 0x4c, 0x8d, 0xb5, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR22 +{ + static const uint8 op_load_F2_FPR22_code[] = { + 0x4c, 0x8d, 0xb5, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR23 +{ + static const uint8 op_load_F2_FPR23_code[] = { + 0x4c, 0x8d, 0xb5, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR24 +{ + static const uint8 op_load_F2_FPR24_code[] = { + 0x4c, 0x8d, 0xb5, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR25 +{ + static const uint8 op_load_F2_FPR25_code[] = { + 0x4c, 0x8d, 0xb5, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR26 +{ + static const uint8 op_load_F2_FPR26_code[] = { + 0x4c, 0x8d, 0xb5, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR27 +{ + static const uint8 op_load_F2_FPR27_code[] = { + 0x4c, 0x8d, 0xb5, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR28 +{ + static const uint8 op_load_F2_FPR28_code[] = { + 0x4c, 0x8d, 0xb5, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR29 +{ + static const uint8 op_load_F2_FPR29_code[] = { + 0x4c, 0x8d, 0xb5, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR30 +{ + static const uint8 op_load_F2_FPR30_code[] = { + 0x4c, 0x8d, 0xb5, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR31 +{ + static const uint8 op_load_F2_FPR31_code[] = { + 0x4c, 0x8d, 0xb5, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR10 +{ + static const uint8 op_load_T0_GPR10_code[] = { + 0x44, 0x8b, 0x65, 0x38 + }; + copy_block(op_load_T0_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR11 +{ + static const uint8 op_load_T0_GPR11_code[] = { + 0x44, 0x8b, 0x65, 0x3c + }; + copy_block(op_load_T0_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR12 +{ + static const uint8 op_load_T0_GPR12_code[] = { + 0x44, 0x8b, 0x65, 0x40 + }; + copy_block(op_load_T0_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR13 +{ + static const uint8 op_load_T0_GPR13_code[] = { + 0x44, 0x8b, 0x65, 0x44 + }; + copy_block(op_load_T0_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR14 +{ + static const uint8 op_load_T0_GPR14_code[] = { + 0x44, 0x8b, 0x65, 0x48 + }; + copy_block(op_load_T0_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR15 +{ + static const uint8 op_load_T0_GPR15_code[] = { + 0x44, 0x8b, 0x65, 0x4c + }; + copy_block(op_load_T0_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR16 +{ + static const uint8 op_load_T0_GPR16_code[] = { + 0x44, 0x8b, 0x65, 0x50 + }; + copy_block(op_load_T0_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR17 +{ + static const uint8 op_load_T0_GPR17_code[] = { + 0x44, 0x8b, 0x65, 0x54 + }; + copy_block(op_load_T0_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR18 +{ + static const uint8 op_load_T0_GPR18_code[] = { + 0x44, 0x8b, 0x65, 0x58 + }; + copy_block(op_load_T0_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR19 +{ + static const uint8 op_load_T0_GPR19_code[] = { + 0x44, 0x8b, 0x65, 0x5c + }; + copy_block(op_load_T0_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR20 +{ + static const uint8 op_load_T0_GPR20_code[] = { + 0x44, 0x8b, 0x65, 0x60 + }; + copy_block(op_load_T0_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR21 +{ + static const uint8 op_load_T0_GPR21_code[] = { + 0x44, 0x8b, 0x65, 0x64 + }; + copy_block(op_load_T0_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR22 +{ + static const uint8 op_load_T0_GPR22_code[] = { + 0x44, 0x8b, 0x65, 0x68 + }; + copy_block(op_load_T0_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR23 +{ + static const uint8 op_load_T0_GPR23_code[] = { + 0x44, 0x8b, 0x65, 0x6c + }; + copy_block(op_load_T0_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR24 +{ + static const uint8 op_load_T0_GPR24_code[] = { + 0x44, 0x8b, 0x65, 0x70 + }; + copy_block(op_load_T0_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR25 +{ + static const uint8 op_load_T0_GPR25_code[] = { + 0x44, 0x8b, 0x65, 0x74 + }; + copy_block(op_load_T0_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR26 +{ + static const uint8 op_load_T0_GPR26_code[] = { + 0x44, 0x8b, 0x65, 0x78 + }; + copy_block(op_load_T0_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR27 +{ + static const uint8 op_load_T0_GPR27_code[] = { + 0x44, 0x8b, 0x65, 0x7c + }; + copy_block(op_load_T0_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR28 +{ + static const uint8 op_load_T0_GPR28_code[] = { + 0x44, 0x8b, 0xa5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR29 +{ + static const uint8 op_load_T0_GPR29_code[] = { + 0x44, 0x8b, 0xa5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR30 +{ + static const uint8 op_load_T0_GPR30_code[] = { + 0x44, 0x8b, 0xa5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR31 +{ + static const uint8 op_load_T0_GPR31_code[] = { + 0x44, 0x8b, 0xa5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb10 +{ + static const uint8 op_load_T0_crb10_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x15, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb10_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb11 +{ + static const uint8 op_load_T0_crb11_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb11_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb12 +{ + static const uint8 op_load_T0_crb12_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x13, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb12_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb13 +{ + static const uint8 op_load_T0_crb13_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x12, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb13_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb14 +{ + static const uint8 op_load_T0_crb14_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x11, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb14_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb15 +{ + static const uint8 op_load_T0_crb15_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc4, 0x41, 0x83, + 0xe4, 0x01 + }; + copy_block(op_load_T0_crb15_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb16 +{ + static const uint8 op_load_T0_crb16_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0f, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb16_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb17 +{ + static const uint8 op_load_T0_crb17_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0e, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb17_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb18 +{ + static const uint8 op_load_T0_crb18_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0d, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb18_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb19 +{ + static const uint8 op_load_T0_crb19_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb19_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb20 +{ + static const uint8 op_load_T0_crb20_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0b, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb20_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb21 +{ + static const uint8 op_load_T0_crb21_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0a, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb21_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb22 +{ + static const uint8 op_load_T0_crb22_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x09, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb22_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb23 +{ + static const uint8 op_load_T0_crb23_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb23_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb24 +{ + static const uint8 op_load_T0_crb24_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x07, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb24_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb25 +{ + static const uint8 op_load_T0_crb25_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x06, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb25_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb26 +{ + static const uint8 op_load_T0_crb26_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x05, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb26_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb27 +{ + static const uint8 op_load_T0_crb27_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb27_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb28 +{ + static const uint8 op_load_T0_crb28_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x03, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb28_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb29 +{ + static const uint8 op_load_T0_crb29_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x02, 0x41, 0x89, 0xc4, + 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb29_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb30 +{ + static const uint8 op_load_T0_crb30_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xd1, 0xe8, 0x41, 0x89, 0xc4, 0x41, + 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb30_code, 15); + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb31 +{ + static const uint8 op_load_T0_crb31_code[] = { + 0x44, 0x8b, 0xa5, 0x90, 0x03, 0x00, 0x00, 0x41, 0x83, 0xe4, 0x01 + }; + copy_block(op_load_T0_crb31_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR10 +{ + static const uint8 op_load_T1_GPR10_code[] = { + 0x44, 0x8b, 0x6d, 0x38 + }; + copy_block(op_load_T1_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR11 +{ + static const uint8 op_load_T1_GPR11_code[] = { + 0x44, 0x8b, 0x6d, 0x3c + }; + copy_block(op_load_T1_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR12 +{ + static const uint8 op_load_T1_GPR12_code[] = { + 0x44, 0x8b, 0x6d, 0x40 + }; + copy_block(op_load_T1_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR13 +{ + static const uint8 op_load_T1_GPR13_code[] = { + 0x44, 0x8b, 0x6d, 0x44 + }; + copy_block(op_load_T1_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR14 +{ + static const uint8 op_load_T1_GPR14_code[] = { + 0x44, 0x8b, 0x6d, 0x48 + }; + copy_block(op_load_T1_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR15 +{ + static const uint8 op_load_T1_GPR15_code[] = { + 0x44, 0x8b, 0x6d, 0x4c + }; + copy_block(op_load_T1_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR16 +{ + static const uint8 op_load_T1_GPR16_code[] = { + 0x44, 0x8b, 0x6d, 0x50 + }; + copy_block(op_load_T1_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR17 +{ + static const uint8 op_load_T1_GPR17_code[] = { + 0x44, 0x8b, 0x6d, 0x54 + }; + copy_block(op_load_T1_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR18 +{ + static const uint8 op_load_T1_GPR18_code[] = { + 0x44, 0x8b, 0x6d, 0x58 + }; + copy_block(op_load_T1_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR19 +{ + static const uint8 op_load_T1_GPR19_code[] = { + 0x44, 0x8b, 0x6d, 0x5c + }; + copy_block(op_load_T1_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR20 +{ + static const uint8 op_load_T1_GPR20_code[] = { + 0x44, 0x8b, 0x6d, 0x60 + }; + copy_block(op_load_T1_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR21 +{ + static const uint8 op_load_T1_GPR21_code[] = { + 0x44, 0x8b, 0x6d, 0x64 + }; + copy_block(op_load_T1_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR22 +{ + static const uint8 op_load_T1_GPR22_code[] = { + 0x44, 0x8b, 0x6d, 0x68 + }; + copy_block(op_load_T1_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR23 +{ + static const uint8 op_load_T1_GPR23_code[] = { + 0x44, 0x8b, 0x6d, 0x6c + }; + copy_block(op_load_T1_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR24 +{ + static const uint8 op_load_T1_GPR24_code[] = { + 0x44, 0x8b, 0x6d, 0x70 + }; + copy_block(op_load_T1_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR25 +{ + static const uint8 op_load_T1_GPR25_code[] = { + 0x44, 0x8b, 0x6d, 0x74 + }; + copy_block(op_load_T1_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR26 +{ + static const uint8 op_load_T1_GPR26_code[] = { + 0x44, 0x8b, 0x6d, 0x78 + }; + copy_block(op_load_T1_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR27 +{ + static const uint8 op_load_T1_GPR27_code[] = { + 0x44, 0x8b, 0x6d, 0x7c + }; + copy_block(op_load_T1_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR28 +{ + static const uint8 op_load_T1_GPR28_code[] = { + 0x44, 0x8b, 0xad, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR29 +{ + static const uint8 op_load_T1_GPR29_code[] = { + 0x44, 0x8b, 0xad, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR30 +{ + static const uint8 op_load_T1_GPR30_code[] = { + 0x44, 0x8b, 0xad, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR31 +{ + static const uint8 op_load_T1_GPR31_code[] = { + 0x44, 0x8b, 0xad, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb10 +{ + static const uint8 op_load_T1_crb10_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x15, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb10_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb11 +{ + static const uint8 op_load_T1_crb11_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb11_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb12 +{ + static const uint8 op_load_T1_crb12_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x13, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb12_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb13 +{ + static const uint8 op_load_T1_crb13_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x12, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb13_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb14 +{ + static const uint8 op_load_T1_crb14_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x11, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb14_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb15 +{ + static const uint8 op_load_T1_crb15_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x41, 0x89, 0xc5, 0x41, 0x83, + 0xe5, 0x01 + }; + copy_block(op_load_T1_crb15_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb16 +{ + static const uint8 op_load_T1_crb16_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0f, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb16_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb17 +{ + static const uint8 op_load_T1_crb17_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0e, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb17_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb18 +{ + static const uint8 op_load_T1_crb18_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0d, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb18_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb19 +{ + static const uint8 op_load_T1_crb19_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb19_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb20 +{ + static const uint8 op_load_T1_crb20_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0b, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb20_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb21 +{ + static const uint8 op_load_T1_crb21_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0a, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb21_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb22 +{ + static const uint8 op_load_T1_crb22_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x09, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb22_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb23 +{ + static const uint8 op_load_T1_crb23_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb23_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb24 +{ + static const uint8 op_load_T1_crb24_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x07, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb24_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb25 +{ + static const uint8 op_load_T1_crb25_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x06, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb25_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb26 +{ + static const uint8 op_load_T1_crb26_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x05, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb26_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb27 +{ + static const uint8 op_load_T1_crb27_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb27_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb28 +{ + static const uint8 op_load_T1_crb28_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x03, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb28_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb29 +{ + static const uint8 op_load_T1_crb29_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x02, 0x41, 0x89, 0xc5, + 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb29_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb30 +{ + static const uint8 op_load_T1_crb30_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xd1, 0xe8, 0x41, 0x89, 0xc5, 0x41, + 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb30_code, 15); + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb31 +{ + static const uint8 op_load_T1_crb31_code[] = { + 0x44, 0x8b, 0xad, 0x90, 0x03, 0x00, 0x00, 0x41, 0x83, 0xe5, 0x01 + }; + copy_block(op_load_T1_crb31_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR10 +{ + static const uint8 op_load_T2_GPR10_code[] = { + 0x44, 0x8b, 0x75, 0x38 + }; + copy_block(op_load_T2_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR11 +{ + static const uint8 op_load_T2_GPR11_code[] = { + 0x44, 0x8b, 0x75, 0x3c + }; + copy_block(op_load_T2_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR12 +{ + static const uint8 op_load_T2_GPR12_code[] = { + 0x44, 0x8b, 0x75, 0x40 + }; + copy_block(op_load_T2_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR13 +{ + static const uint8 op_load_T2_GPR13_code[] = { + 0x44, 0x8b, 0x75, 0x44 + }; + copy_block(op_load_T2_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR14 +{ + static const uint8 op_load_T2_GPR14_code[] = { + 0x44, 0x8b, 0x75, 0x48 + }; + copy_block(op_load_T2_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR15 +{ + static const uint8 op_load_T2_GPR15_code[] = { + 0x44, 0x8b, 0x75, 0x4c + }; + copy_block(op_load_T2_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR16 +{ + static const uint8 op_load_T2_GPR16_code[] = { + 0x44, 0x8b, 0x75, 0x50 + }; + copy_block(op_load_T2_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR17 +{ + static const uint8 op_load_T2_GPR17_code[] = { + 0x44, 0x8b, 0x75, 0x54 + }; + copy_block(op_load_T2_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR18 +{ + static const uint8 op_load_T2_GPR18_code[] = { + 0x44, 0x8b, 0x75, 0x58 + }; + copy_block(op_load_T2_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR19 +{ + static const uint8 op_load_T2_GPR19_code[] = { + 0x44, 0x8b, 0x75, 0x5c + }; + copy_block(op_load_T2_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR20 +{ + static const uint8 op_load_T2_GPR20_code[] = { + 0x44, 0x8b, 0x75, 0x60 + }; + copy_block(op_load_T2_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR21 +{ + static const uint8 op_load_T2_GPR21_code[] = { + 0x44, 0x8b, 0x75, 0x64 + }; + copy_block(op_load_T2_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR22 +{ + static const uint8 op_load_T2_GPR22_code[] = { + 0x44, 0x8b, 0x75, 0x68 + }; + copy_block(op_load_T2_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR23 +{ + static const uint8 op_load_T2_GPR23_code[] = { + 0x44, 0x8b, 0x75, 0x6c + }; + copy_block(op_load_T2_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR24 +{ + static const uint8 op_load_T2_GPR24_code[] = { + 0x44, 0x8b, 0x75, 0x70 + }; + copy_block(op_load_T2_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR25 +{ + static const uint8 op_load_T2_GPR25_code[] = { + 0x44, 0x8b, 0x75, 0x74 + }; + copy_block(op_load_T2_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR26 +{ + static const uint8 op_load_T2_GPR26_code[] = { + 0x44, 0x8b, 0x75, 0x78 + }; + copy_block(op_load_T2_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR27 +{ + static const uint8 op_load_T2_GPR27_code[] = { + 0x44, 0x8b, 0x75, 0x7c + }; + copy_block(op_load_T2_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR28 +{ + static const uint8 op_load_T2_GPR28_code[] = { + 0x44, 0x8b, 0xb5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR29 +{ + static const uint8 op_load_T2_GPR29_code[] = { + 0x44, 0x8b, 0xb5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR30 +{ + static const uint8 op_load_T2_GPR30_code[] = { + 0x44, 0x8b, 0xb5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR31 +{ + static const uint8 op_load_T2_GPR31_code[] = { + 0x44, 0x8b, 0xb5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_record_cr0_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr0_T0 +{ + static const uint8 op_record_cr0_T0_code[] = { + 0x48, 0x89, 0xe9, 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x25, 0xff, 0xff, + 0xff, 0x0f, 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0xc1, 0xe2, 0x1c, + 0x09, 0xc2, 0x41, 0x83, 0xfc, 0x00, 0x7d, 0x09, 0x89, 0xd0, 0x0d, 0x00, + 0x00, 0x00, 0x80, 0xeb, 0x13, 0x89, 0xd0, 0x0d, 0x00, 0x00, 0x00, 0x40, + 0x81, 0xca, 0x00, 0x00, 0x00, 0x20, 0x45, 0x85, 0xe4, 0x0f, 0x44, 0xc2, + 0x89, 0x81, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_record_cr0_T0_code, 66); + inc_code_ptr(66); +} +#endif + +DEFINE_GEN(gen_op_record_cr6_VD,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr6_VD +{ + static const uint8 op_record_cr6_VD_code[] = { + 0x49, 0x8b, 0x37, 0x49, 0x8b, 0x57, 0x08, 0x48, 0x89, 0xd0, 0x48, 0x21, + 0xf0, 0xb9, 0x08, 0x00, 0x00, 0x00, 0x48, 0xff, 0xc0, 0x74, 0x0c, 0x48, + 0x09, 0xf2, 0x48, 0x83, 0xfa, 0x01, 0x19, 0xc9, 0x83, 0xe1, 0x02, 0x48, + 0x8d, 0x55, 0x10, 0xc1, 0xe1, 0x04, 0x8b, 0x82, 0x80, 0x03, 0x00, 0x00, + 0x24, 0x0f, 0x09, 0xc1, 0x89, 0x8a, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_record_cr6_VD_code, 58); + inc_code_ptr(58); +} +#endif + +DEFINE_GEN(gen_op_spcflags_init,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_init +{ + static const uint8 op_spcflags_init_code[] = { + 0x48, 0x8d, 0x8d, 0xb0, 0x03, 0x00, 0x00, 0x48, 0x8d, 0x95, 0xb4, 0x03, + 0x00, 0x00, 0xb8, 0x01, 0x00, 0x00, 0x00, 0x87, 0x02, 0x85, 0xc0, 0x75, + 0xf5, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0xc7, 0x41, + 0x04, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_spcflags_init_code, 41); + *(uint32_t *)(code_ptr() + 28) = (int32_t)((long)param1 - (long)(code_ptr() + 28 + 4)) + 0; + inc_code_ptr(41); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR0 +{ + static const uint8 op_store_F0_FPR0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR1 +{ + static const uint8 op_store_F0_FPR1_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR2 +{ + static const uint8 op_store_F0_FPR2_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR2_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR3 +{ + static const uint8 op_store_F0_FPR3_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR3_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR4 +{ + static const uint8 op_store_F0_FPR4_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR4_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR5 +{ + static const uint8 op_store_F0_FPR5_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR5_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR6 +{ + static const uint8 op_store_F0_FPR6_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR6_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR7 +{ + static const uint8 op_store_F0_FPR7_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR7_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR8 +{ + static const uint8 op_store_F0_FPR8_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR8_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR9 +{ + static const uint8 op_store_F0_FPR9_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR9_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR0 +{ + static const uint8 op_store_F1_FPR0_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR1 +{ + static const uint8 op_store_F1_FPR1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR2 +{ + static const uint8 op_store_F1_FPR2_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR2_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR3 +{ + static const uint8 op_store_F1_FPR3_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR3_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR4 +{ + static const uint8 op_store_F1_FPR4_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR4_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR5 +{ + static const uint8 op_store_F1_FPR5_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR5_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR6 +{ + static const uint8 op_store_F1_FPR6_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR6_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR7 +{ + static const uint8 op_store_F1_FPR7_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR7_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR8 +{ + static const uint8 op_store_F1_FPR8_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR8_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR9 +{ + static const uint8 op_store_F1_FPR9_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR9_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR0 +{ + static const uint8 op_store_F2_FPR0_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR1 +{ + static const uint8 op_store_F2_FPR1_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR2 +{ + static const uint8 op_store_F2_FPR2_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR2_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR3 +{ + static const uint8 op_store_F2_FPR3_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR3_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR4 +{ + static const uint8 op_store_F2_FPR4_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR4_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR5 +{ + static const uint8 op_store_F2_FPR5_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR5_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR6 +{ + static const uint8 op_store_F2_FPR6_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR6_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR7 +{ + static const uint8 op_store_F2_FPR7_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR7_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR8 +{ + static const uint8 op_store_F2_FPR8_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR8_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR9 +{ + static const uint8 op_store_F2_FPR9_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR9_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR0 +{ + static const uint8 op_store_FD_FPR0_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x90, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR0_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR1 +{ + static const uint8 op_store_FD_FPR1_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x98, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR1_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR2 +{ + static const uint8 op_store_FD_FPR2_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xa0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR2_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR3 +{ + static const uint8 op_store_FD_FPR3_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xa8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR3_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR4 +{ + static const uint8 op_store_FD_FPR4_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xb0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR4_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR5 +{ + static const uint8 op_store_FD_FPR5_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xb8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR5_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR6 +{ + static const uint8 op_store_FD_FPR6_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xc0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR6_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR7 +{ + static const uint8 op_store_FD_FPR7_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xc8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR7_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR8 +{ + static const uint8 op_store_FD_FPR8_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xd0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR8_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR9 +{ + static const uint8 op_store_FD_FPR9_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xd8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR9_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR0 +{ + static const uint8 op_store_T0_GPR0_code[] = { + 0x44, 0x89, 0x65, 0x10 + }; + copy_block(op_store_T0_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR1 +{ + static const uint8 op_store_T0_GPR1_code[] = { + 0x44, 0x89, 0x65, 0x14 + }; + copy_block(op_store_T0_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR2 +{ + static const uint8 op_store_T0_GPR2_code[] = { + 0x44, 0x89, 0x65, 0x18 + }; + copy_block(op_store_T0_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR3 +{ + static const uint8 op_store_T0_GPR3_code[] = { + 0x44, 0x89, 0x65, 0x1c + }; + copy_block(op_store_T0_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR4 +{ + static const uint8 op_store_T0_GPR4_code[] = { + 0x44, 0x89, 0x65, 0x20 + }; + copy_block(op_store_T0_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR5 +{ + static const uint8 op_store_T0_GPR5_code[] = { + 0x44, 0x89, 0x65, 0x24 + }; + copy_block(op_store_T0_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR6 +{ + static const uint8 op_store_T0_GPR6_code[] = { + 0x44, 0x89, 0x65, 0x28 + }; + copy_block(op_store_T0_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR7 +{ + static const uint8 op_store_T0_GPR7_code[] = { + 0x44, 0x89, 0x65, 0x2c + }; + copy_block(op_store_T0_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR8 +{ + static const uint8 op_store_T0_GPR8_code[] = { + 0x44, 0x89, 0x65, 0x30 + }; + copy_block(op_store_T0_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR9 +{ + static const uint8 op_store_T0_GPR9_code[] = { + 0x44, 0x89, 0x65, 0x34 + }; + copy_block(op_store_T0_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb0 +{ + static const uint8 op_store_T0_crb0_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0x7f, + 0x44, 0x89, 0xe1, 0xc1, 0xe1, 0x1f, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb0_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb1 +{ + static const uint8 op_store_T0_crb1_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xbf, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1e, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb1_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb2 +{ + static const uint8 op_store_T0_crb2_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xdf, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1d, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb2_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb3 +{ + static const uint8 op_store_T0_crb3_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xef, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1c, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb3_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb4 +{ + static const uint8 op_store_T0_crb4_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xf7, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1b, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb4_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb5 +{ + static const uint8 op_store_T0_crb5_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfb, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1a, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb5_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb6 +{ + static const uint8 op_store_T0_crb6_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfd, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x19, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb6_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb7 +{ + static const uint8 op_store_T0_crb7_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfe, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x18, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb7_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb8 +{ + static const uint8 op_store_T0_crb8_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0x7f, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x17, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb8_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb9 +{ + static const uint8 op_store_T0_crb9_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xbf, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x16, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb9_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR0 +{ + static const uint8 op_store_T1_GPR0_code[] = { + 0x44, 0x89, 0x6d, 0x10 + }; + copy_block(op_store_T1_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR1 +{ + static const uint8 op_store_T1_GPR1_code[] = { + 0x44, 0x89, 0x6d, 0x14 + }; + copy_block(op_store_T1_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR2 +{ + static const uint8 op_store_T1_GPR2_code[] = { + 0x44, 0x89, 0x6d, 0x18 + }; + copy_block(op_store_T1_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR3 +{ + static const uint8 op_store_T1_GPR3_code[] = { + 0x44, 0x89, 0x6d, 0x1c + }; + copy_block(op_store_T1_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR4 +{ + static const uint8 op_store_T1_GPR4_code[] = { + 0x44, 0x89, 0x6d, 0x20 + }; + copy_block(op_store_T1_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR5 +{ + static const uint8 op_store_T1_GPR5_code[] = { + 0x44, 0x89, 0x6d, 0x24 + }; + copy_block(op_store_T1_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR6 +{ + static const uint8 op_store_T1_GPR6_code[] = { + 0x44, 0x89, 0x6d, 0x28 + }; + copy_block(op_store_T1_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR7 +{ + static const uint8 op_store_T1_GPR7_code[] = { + 0x44, 0x89, 0x6d, 0x2c + }; + copy_block(op_store_T1_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR8 +{ + static const uint8 op_store_T1_GPR8_code[] = { + 0x44, 0x89, 0x6d, 0x30 + }; + copy_block(op_store_T1_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR9 +{ + static const uint8 op_store_T1_GPR9_code[] = { + 0x44, 0x89, 0x6d, 0x34 + }; + copy_block(op_store_T1_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb0 +{ + static const uint8 op_store_T1_crb0_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0x7f, + 0x44, 0x89, 0xe9, 0xc1, 0xe1, 0x1f, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb0_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb1 +{ + static const uint8 op_store_T1_crb1_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xbf, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1e, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb1_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb2 +{ + static const uint8 op_store_T1_crb2_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xdf, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1d, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb2_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb3 +{ + static const uint8 op_store_T1_crb3_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xef, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1c, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb3_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb4 +{ + static const uint8 op_store_T1_crb4_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xf7, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1b, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb4_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb5 +{ + static const uint8 op_store_T1_crb5_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfb, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x1a, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb5_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb6 +{ + static const uint8 op_store_T1_crb6_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfd, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x19, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb6_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb7 +{ + static const uint8 op_store_T1_crb7_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfe, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x18, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb7_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb8 +{ + static const uint8 op_store_T1_crb8_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0x7f, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x17, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb8_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb9 +{ + static const uint8 op_store_T1_crb9_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xbf, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x16, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb9_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR0 +{ + static const uint8 op_store_T2_GPR0_code[] = { + 0x44, 0x89, 0x75, 0x10 + }; + copy_block(op_store_T2_GPR0_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR1 +{ + static const uint8 op_store_T2_GPR1_code[] = { + 0x44, 0x89, 0x75, 0x14 + }; + copy_block(op_store_T2_GPR1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR2 +{ + static const uint8 op_store_T2_GPR2_code[] = { + 0x44, 0x89, 0x75, 0x18 + }; + copy_block(op_store_T2_GPR2_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR3 +{ + static const uint8 op_store_T2_GPR3_code[] = { + 0x44, 0x89, 0x75, 0x1c + }; + copy_block(op_store_T2_GPR3_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR4 +{ + static const uint8 op_store_T2_GPR4_code[] = { + 0x44, 0x89, 0x75, 0x20 + }; + copy_block(op_store_T2_GPR4_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR5 +{ + static const uint8 op_store_T2_GPR5_code[] = { + 0x44, 0x89, 0x75, 0x24 + }; + copy_block(op_store_T2_GPR5_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR6 +{ + static const uint8 op_store_T2_GPR6_code[] = { + 0x44, 0x89, 0x75, 0x28 + }; + copy_block(op_store_T2_GPR6_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR7 +{ + static const uint8 op_store_T2_GPR7_code[] = { + 0x44, 0x89, 0x75, 0x2c + }; + copy_block(op_store_T2_GPR7_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR8 +{ + static const uint8 op_store_T2_GPR8_code[] = { + 0x44, 0x89, 0x75, 0x30 + }; + copy_block(op_store_T2_GPR8_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR9 +{ + static const uint8 op_store_T2_GPR9_code[] = { + 0x44, 0x89, 0x75, 0x34 + }; + copy_block(op_store_T2_GPR9_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_vand_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vand_VD_V0_V1 +{ + static const uint8 op_vand_VD_V0_V1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x23, 0x04, 0x24, 0x49, 0x89, 0x07, 0x49, + 0x8b, 0x45, 0x08, 0x49, 0x23, 0x44, 0x24, 0x08, 0x49, 0x89, 0x47, 0x08 + }; + copy_block(op_vand_VD_V0_V1_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_vnor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vnor_VD_V0_V1 +{ + static const uint8 op_vnor_VD_V0_V1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x0b, 0x04, 0x24, 0x48, 0xf7, 0xd0, 0x49, + 0x89, 0x07, 0x49, 0x8b, 0x45, 0x08, 0x49, 0x0b, 0x44, 0x24, 0x08, 0x48, + 0xf7, 0xd0, 0x49, 0x89, 0x47, 0x08 + }; + copy_block(op_vnor_VD_V0_V1_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_vxor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vxor_VD_V0_V1 +{ + static const uint8 op_vxor_VD_V0_V1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x49, 0x33, 0x04, 0x24, 0x49, 0x89, 0x07, 0x49, + 0x8b, 0x45, 0x08, 0x49, 0x33, 0x44, 0x24, 0x08, 0x49, 0x89, 0x47, 0x08 + }; + copy_block(op_vxor_VD_V0_V1_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_branch_2_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_2_T0_im +{ + static const uint8 op_branch_2_T0_im_code[] = { + 0x45, 0x85, 0xed, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x41, 0x0f, 0x45, + 0xc4, 0x89, 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_2_T0_im_code, 19); + *(uint32_t *)(code_ptr() + 5) = (int32_t)((long)param1 - (long)(code_ptr() + 5 + 4)) + 0; + inc_code_ptr(19); +} +#endif + +DEFINE_GEN(gen_op_branch_2_im_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_2_im_im +{ + static const uint8 op_branch_2_im_im_code[] = { + 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x45, 0x85, 0xed, 0x8d, 0x15, 0x00, + 0x00, 0x00, 0x00, 0x0f, 0x45, 0xc2, 0x89, 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_2_im_im_code, 24); + *(uint32_t *)(code_ptr() + 11) = (int32_t)((long)param1 - (long)(code_ptr() + 11 + 4)) + 0; + *(uint32_t *)(code_ptr() + 2) = (int32_t)((long)param2 - (long)(code_ptr() + 2 + 4)) + 0; + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_branch_chain_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_chain_1 +{ + static const uint8 op_branch_chain_1_code[] = { + 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_branch_chain_1_code, 5); + jmp_addr[0] = code_ptr() + 1; + *(uint32_t *)(code_ptr() + 1) = 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_branch_chain_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_chain_2 +{ + static const uint8 op_branch_chain_2_code[] = { + 0x45, 0x85, 0xed, 0x74, 0x07, 0xe9, 0x00, 0x00, 0x00, 0x00, 0xeb, 0x05, + 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_branch_chain_2_code, 17); + jmp_addr[1] = code_ptr() + 13; + *(uint32_t *)(code_ptr() + 13) = 0; + jmp_addr[0] = code_ptr() + 6; + *(uint32_t *)(code_ptr() + 6) = 0; + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_fadds_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fadds_FD_F0_F1 +{ + static const uint8 op_fadds_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x58, 0x45, 0x00, + 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fadds_FD_F0_F1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_fdivs_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fdivs_FD_F0_F1 +{ + static const uint8 op_fdivs_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x5e, 0x45, 0x00, + 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fdivs_FD_F0_F1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_fmuls_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmuls_FD_F0_F1 +{ + static const uint8 op_fmuls_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmuls_FD_F0_F1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_fsubs_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fsubs_FD_F0_F1 +{ + static const uint8 op_fsubs_FD_F0_F1_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x5c, 0x45, 0x00, + 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fsubs_FD_F0_F1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_VRSAVE,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_VRSAVE +{ + static const uint8 op_load_T0_VRSAVE_code[] = { + 0x44, 0x8b, 0xa5, 0x9c, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_VRSAVE_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR0 +{ + static const uint8 op_load_ad_V0_VR0_code[] = { + 0x4c, 0x8d, 0xa5, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR1 +{ + static const uint8 op_load_ad_V0_VR1_code[] = { + 0x4c, 0x8d, 0xa5, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR2 +{ + static const uint8 op_load_ad_V0_VR2_code[] = { + 0x4c, 0x8d, 0xa5, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR3 +{ + static const uint8 op_load_ad_V0_VR3_code[] = { + 0x4c, 0x8d, 0xa5, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR4 +{ + static const uint8 op_load_ad_V0_VR4_code[] = { + 0x4c, 0x8d, 0xa5, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR5 +{ + static const uint8 op_load_ad_V0_VR5_code[] = { + 0x4c, 0x8d, 0xa5, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR6 +{ + static const uint8 op_load_ad_V0_VR6_code[] = { + 0x4c, 0x8d, 0xa5, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR7 +{ + static const uint8 op_load_ad_V0_VR7_code[] = { + 0x4c, 0x8d, 0xa5, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR8 +{ + static const uint8 op_load_ad_V0_VR8_code[] = { + 0x4c, 0x8d, 0xa5, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR9 +{ + static const uint8 op_load_ad_V0_VR9_code[] = { + 0x4c, 0x8d, 0xa5, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR0 +{ + static const uint8 op_load_ad_V1_VR0_code[] = { + 0x4c, 0x8d, 0xad, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR1 +{ + static const uint8 op_load_ad_V1_VR1_code[] = { + 0x4c, 0x8d, 0xad, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR2 +{ + static const uint8 op_load_ad_V1_VR2_code[] = { + 0x4c, 0x8d, 0xad, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR3 +{ + static const uint8 op_load_ad_V1_VR3_code[] = { + 0x4c, 0x8d, 0xad, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR4 +{ + static const uint8 op_load_ad_V1_VR4_code[] = { + 0x4c, 0x8d, 0xad, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR5 +{ + static const uint8 op_load_ad_V1_VR5_code[] = { + 0x4c, 0x8d, 0xad, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR6 +{ + static const uint8 op_load_ad_V1_VR6_code[] = { + 0x4c, 0x8d, 0xad, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR7 +{ + static const uint8 op_load_ad_V1_VR7_code[] = { + 0x4c, 0x8d, 0xad, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR8 +{ + static const uint8 op_load_ad_V1_VR8_code[] = { + 0x4c, 0x8d, 0xad, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR9 +{ + static const uint8 op_load_ad_V1_VR9_code[] = { + 0x4c, 0x8d, 0xad, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR0 +{ + static const uint8 op_load_ad_V2_VR0_code[] = { + 0x4c, 0x8d, 0xb5, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR1 +{ + static const uint8 op_load_ad_V2_VR1_code[] = { + 0x4c, 0x8d, 0xb5, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR2 +{ + static const uint8 op_load_ad_V2_VR2_code[] = { + 0x4c, 0x8d, 0xb5, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR3 +{ + static const uint8 op_load_ad_V2_VR3_code[] = { + 0x4c, 0x8d, 0xb5, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR4 +{ + static const uint8 op_load_ad_V2_VR4_code[] = { + 0x4c, 0x8d, 0xb5, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR5 +{ + static const uint8 op_load_ad_V2_VR5_code[] = { + 0x4c, 0x8d, 0xb5, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR6 +{ + static const uint8 op_load_ad_V2_VR6_code[] = { + 0x4c, 0x8d, 0xb5, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR7 +{ + static const uint8 op_load_ad_V2_VR7_code[] = { + 0x4c, 0x8d, 0xb5, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR8 +{ + static const uint8 op_load_ad_V2_VR8_code[] = { + 0x4c, 0x8d, 0xb5, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR9 +{ + static const uint8 op_load_ad_V2_VR9_code[] = { + 0x4c, 0x8d, 0xb5, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR0 +{ + static const uint8 op_load_ad_VD_VR0_code[] = { + 0x4c, 0x8d, 0xbd, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR1 +{ + static const uint8 op_load_ad_VD_VR1_code[] = { + 0x4c, 0x8d, 0xbd, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR2 +{ + static const uint8 op_load_ad_VD_VR2_code[] = { + 0x4c, 0x8d, 0xbd, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR3 +{ + static const uint8 op_load_ad_VD_VR3_code[] = { + 0x4c, 0x8d, 0xbd, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR3_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR4 +{ + static const uint8 op_load_ad_VD_VR4_code[] = { + 0x4c, 0x8d, 0xbd, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR4_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR5 +{ + static const uint8 op_load_ad_VD_VR5_code[] = { + 0x4c, 0x8d, 0xbd, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR5_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR6 +{ + static const uint8 op_load_ad_VD_VR6_code[] = { + 0x4c, 0x8d, 0xbd, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR6_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR7 +{ + static const uint8 op_load_ad_VD_VR7_code[] = { + 0x4c, 0x8d, 0xbd, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR7_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR8 +{ + static const uint8 op_load_ad_VD_VR8_code[] = { + 0x4c, 0x8d, 0xbd, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR8_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR9 +{ + static const uint8 op_load_ad_VD_VR9_code[] = { + 0x4c, 0x8d, 0xbd, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR9_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_spcflags_check,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_check +{ + static const uint8 op_spcflags_check_code[] = { + 0x8b, 0x85, 0xb0, 0x03, 0x00, 0x00, 0x85, 0xc0, 0x0f, 0x84, 0x00, 0x00, + 0x00, 0x00 + }; + copy_block(op_spcflags_check_code, 14); + jmp_addr[0] = code_ptr() + 10; + *(uint32_t *)(code_ptr() + 10) = 0; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_spcflags_clear,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_clear +{ + static const uint8 op_spcflags_clear_code[] = { + 0x48, 0x8d, 0x8d, 0xb0, 0x03, 0x00, 0x00, 0x48, 0x8d, 0x95, 0xb4, 0x03, + 0x00, 0x00, 0xb8, 0x01, 0x00, 0x00, 0x00, 0x87, 0x02, 0x85, 0xc0, 0x75, + 0xf5, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0xf7, 0xd0, 0x21, 0x01, + 0xc7, 0x41, 0x04, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_spcflags_clear_code, 43); + *(uint32_t *)(code_ptr() + 28) = (int32_t)((long)param1 - (long)(code_ptr() + 28 + 4)) + 0; + inc_code_ptr(43); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR10 +{ + static const uint8 op_store_F0_FPR10_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR10_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR11 +{ + static const uint8 op_store_F0_FPR11_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR11_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR12 +{ + static const uint8 op_store_F0_FPR12_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR12_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR13 +{ + static const uint8 op_store_F0_FPR13_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR13_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR14 +{ + static const uint8 op_store_F0_FPR14_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR14_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR15 +{ + static const uint8 op_store_F0_FPR15_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR15_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR16 +{ + static const uint8 op_store_F0_FPR16_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR16_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR17 +{ + static const uint8 op_store_F0_FPR17_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR17_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR18 +{ + static const uint8 op_store_F0_FPR18_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR18_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR19 +{ + static const uint8 op_store_F0_FPR19_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR19_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR20 +{ + static const uint8 op_store_F0_FPR20_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR20_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR21 +{ + static const uint8 op_store_F0_FPR21_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR21_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR22 +{ + static const uint8 op_store_F0_FPR22_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR22_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR23 +{ + static const uint8 op_store_F0_FPR23_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR23_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR24 +{ + static const uint8 op_store_F0_FPR24_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR24_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR25 +{ + static const uint8 op_store_F0_FPR25_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR25_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR26 +{ + static const uint8 op_store_F0_FPR26_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR26_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR27 +{ + static const uint8 op_store_F0_FPR27_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR27_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR28 +{ + static const uint8 op_store_F0_FPR28_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR28_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR29 +{ + static const uint8 op_store_F0_FPR29_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR29_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR30 +{ + static const uint8 op_store_F0_FPR30_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR30_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR31 +{ + static const uint8 op_store_F0_FPR31_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x48, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR31_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR10 +{ + static const uint8 op_store_F1_FPR10_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR10_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR11 +{ + static const uint8 op_store_F1_FPR11_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR11_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR12 +{ + static const uint8 op_store_F1_FPR12_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR12_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR13 +{ + static const uint8 op_store_F1_FPR13_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR13_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR14 +{ + static const uint8 op_store_F1_FPR14_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR14_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR15 +{ + static const uint8 op_store_F1_FPR15_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR15_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR16 +{ + static const uint8 op_store_F1_FPR16_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR16_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR17 +{ + static const uint8 op_store_F1_FPR17_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR17_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR18 +{ + static const uint8 op_store_F1_FPR18_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR18_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR19 +{ + static const uint8 op_store_F1_FPR19_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR19_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR20 +{ + static const uint8 op_store_F1_FPR20_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR20_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR21 +{ + static const uint8 op_store_F1_FPR21_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR21_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR22 +{ + static const uint8 op_store_F1_FPR22_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR22_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR23 +{ + static const uint8 op_store_F1_FPR23_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR23_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR24 +{ + static const uint8 op_store_F1_FPR24_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR24_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR25 +{ + static const uint8 op_store_F1_FPR25_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR25_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR26 +{ + static const uint8 op_store_F1_FPR26_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR26_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR27 +{ + static const uint8 op_store_F1_FPR27_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR27_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR28 +{ + static const uint8 op_store_F1_FPR28_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR28_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR29 +{ + static const uint8 op_store_F1_FPR29_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR29_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR30 +{ + static const uint8 op_store_F1_FPR30_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR30_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR31 +{ + static const uint8 op_store_F1_FPR31_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR31_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR10 +{ + static const uint8 op_store_F2_FPR10_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR10_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR11 +{ + static const uint8 op_store_F2_FPR11_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR11_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR12 +{ + static const uint8 op_store_F2_FPR12_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR12_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR13 +{ + static const uint8 op_store_F2_FPR13_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR13_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR14 +{ + static const uint8 op_store_F2_FPR14_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR14_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR15 +{ + static const uint8 op_store_F2_FPR15_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR15_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR16 +{ + static const uint8 op_store_F2_FPR16_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR16_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR17 +{ + static const uint8 op_store_F2_FPR17_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR17_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR18 +{ + static const uint8 op_store_F2_FPR18_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR18_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR19 +{ + static const uint8 op_store_F2_FPR19_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR19_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR20 +{ + static const uint8 op_store_F2_FPR20_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR20_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR21 +{ + static const uint8 op_store_F2_FPR21_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR21_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR22 +{ + static const uint8 op_store_F2_FPR22_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR22_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR23 +{ + static const uint8 op_store_F2_FPR23_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR23_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR24 +{ + static const uint8 op_store_F2_FPR24_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR24_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR25 +{ + static const uint8 op_store_F2_FPR25_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR25_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR26 +{ + static const uint8 op_store_F2_FPR26_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR26_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR27 +{ + static const uint8 op_store_F2_FPR27_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR27_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR28 +{ + static const uint8 op_store_F2_FPR28_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR28_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR29 +{ + static const uint8 op_store_F2_FPR29_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR29_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR30 +{ + static const uint8 op_store_F2_FPR30_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR30_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR31 +{ + static const uint8 op_store_F2_FPR31_code[] = { + 0x49, 0x8b, 0x06, 0x48, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR31_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR10 +{ + static const uint8 op_store_FD_FPR10_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xe0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR10_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR11 +{ + static const uint8 op_store_FD_FPR11_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xe8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR11_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR12 +{ + static const uint8 op_store_FD_FPR12_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xf0, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR12_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR13 +{ + static const uint8 op_store_FD_FPR13_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0xf8, 0x00, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR13_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR14 +{ + static const uint8 op_store_FD_FPR14_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x00, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR14_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR15 +{ + static const uint8 op_store_FD_FPR15_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x08, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR15_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR16 +{ + static const uint8 op_store_FD_FPR16_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x10, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR16_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR17 +{ + static const uint8 op_store_FD_FPR17_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x18, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR17_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR18 +{ + static const uint8 op_store_FD_FPR18_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x20, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR18_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR19 +{ + static const uint8 op_store_FD_FPR19_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x28, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR19_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR20 +{ + static const uint8 op_store_FD_FPR20_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x30, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR20_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR21 +{ + static const uint8 op_store_FD_FPR21_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x38, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR21_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR22 +{ + static const uint8 op_store_FD_FPR22_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x40, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR22_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR23 +{ + static const uint8 op_store_FD_FPR23_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x48, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR23_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR24 +{ + static const uint8 op_store_FD_FPR24_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x50, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR24_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR25 +{ + static const uint8 op_store_FD_FPR25_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x58, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR25_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR26 +{ + static const uint8 op_store_FD_FPR26_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x60, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR26_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR27 +{ + static const uint8 op_store_FD_FPR27_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x68, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR27_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR28 +{ + static const uint8 op_store_FD_FPR28_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x70, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR28_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR29 +{ + static const uint8 op_store_FD_FPR29_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x78, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR29_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR30 +{ + static const uint8 op_store_FD_FPR30_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x80, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR30_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR31 +{ + static const uint8 op_store_FD_FPR31_code[] = { + 0x48, 0x8b, 0x85, 0xa8, 0x08, 0x10, 0x00, 0x48, 0x89, 0x85, 0x88, 0x01, + 0x00, 0x00 + }; + copy_block(op_store_FD_FPR31_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR10 +{ + static const uint8 op_store_T0_GPR10_code[] = { + 0x44, 0x89, 0x65, 0x38 + }; + copy_block(op_store_T0_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR11 +{ + static const uint8 op_store_T0_GPR11_code[] = { + 0x44, 0x89, 0x65, 0x3c + }; + copy_block(op_store_T0_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR12 +{ + static const uint8 op_store_T0_GPR12_code[] = { + 0x44, 0x89, 0x65, 0x40 + }; + copy_block(op_store_T0_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR13 +{ + static const uint8 op_store_T0_GPR13_code[] = { + 0x44, 0x89, 0x65, 0x44 + }; + copy_block(op_store_T0_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR14 +{ + static const uint8 op_store_T0_GPR14_code[] = { + 0x44, 0x89, 0x65, 0x48 + }; + copy_block(op_store_T0_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR15 +{ + static const uint8 op_store_T0_GPR15_code[] = { + 0x44, 0x89, 0x65, 0x4c + }; + copy_block(op_store_T0_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR16 +{ + static const uint8 op_store_T0_GPR16_code[] = { + 0x44, 0x89, 0x65, 0x50 + }; + copy_block(op_store_T0_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR17 +{ + static const uint8 op_store_T0_GPR17_code[] = { + 0x44, 0x89, 0x65, 0x54 + }; + copy_block(op_store_T0_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR18 +{ + static const uint8 op_store_T0_GPR18_code[] = { + 0x44, 0x89, 0x65, 0x58 + }; + copy_block(op_store_T0_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR19 +{ + static const uint8 op_store_T0_GPR19_code[] = { + 0x44, 0x89, 0x65, 0x5c + }; + copy_block(op_store_T0_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR20 +{ + static const uint8 op_store_T0_GPR20_code[] = { + 0x44, 0x89, 0x65, 0x60 + }; + copy_block(op_store_T0_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR21 +{ + static const uint8 op_store_T0_GPR21_code[] = { + 0x44, 0x89, 0x65, 0x64 + }; + copy_block(op_store_T0_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR22 +{ + static const uint8 op_store_T0_GPR22_code[] = { + 0x44, 0x89, 0x65, 0x68 + }; + copy_block(op_store_T0_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR23 +{ + static const uint8 op_store_T0_GPR23_code[] = { + 0x44, 0x89, 0x65, 0x6c + }; + copy_block(op_store_T0_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR24 +{ + static const uint8 op_store_T0_GPR24_code[] = { + 0x44, 0x89, 0x65, 0x70 + }; + copy_block(op_store_T0_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR25 +{ + static const uint8 op_store_T0_GPR25_code[] = { + 0x44, 0x89, 0x65, 0x74 + }; + copy_block(op_store_T0_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR26 +{ + static const uint8 op_store_T0_GPR26_code[] = { + 0x44, 0x89, 0x65, 0x78 + }; + copy_block(op_store_T0_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR27 +{ + static const uint8 op_store_T0_GPR27_code[] = { + 0x44, 0x89, 0x65, 0x7c + }; + copy_block(op_store_T0_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR28 +{ + static const uint8 op_store_T0_GPR28_code[] = { + 0x44, 0x89, 0xa5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR29 +{ + static const uint8 op_store_T0_GPR29_code[] = { + 0x44, 0x89, 0xa5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR30 +{ + static const uint8 op_store_T0_GPR30_code[] = { + 0x44, 0x89, 0xa5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR31 +{ + static const uint8 op_store_T0_GPR31_code[] = { + 0x44, 0x89, 0xa5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb10 +{ + static const uint8 op_store_T0_crb10_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xdf, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x15, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb10_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb11 +{ + static const uint8 op_store_T0_crb11_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xef, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x14, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb11_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb12 +{ + static const uint8 op_store_T0_crb12_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xf7, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x13, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb12_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb13 +{ + static const uint8 op_store_T0_crb13_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfb, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x12, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb13_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb14 +{ + static const uint8 op_store_T0_crb14_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfd, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x11, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb14_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb15 +{ + static const uint8 op_store_T0_crb15_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfe, 0xff, + 0x44, 0x89, 0xe0, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x10, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb15_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb16 +{ + static const uint8 op_store_T0_crb16_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0x7f, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0f, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb16_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb17 +{ + static const uint8 op_store_T0_crb17_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xbf, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0e, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb17_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb18 +{ + static const uint8 op_store_T0_crb18_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xdf, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0d, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb18_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb19 +{ + static const uint8 op_store_T0_crb19_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xef, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0c, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb19_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb20 +{ + static const uint8 op_store_T0_crb20_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xf7, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0b, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb20_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb21 +{ + static const uint8 op_store_T0_crb21_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfb, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0a, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb21_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb22 +{ + static const uint8 op_store_T0_crb22_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfd, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x09, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb22_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb23 +{ + static const uint8 op_store_T0_crb23_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfe, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x08, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb23_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb24 +{ + static const uint8 op_store_T0_crb24_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe2, 0x7f, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x07, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb24_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb25 +{ + static const uint8 op_store_T0_crb25_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xbf, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x06, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb25_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb26 +{ + static const uint8 op_store_T0_crb26_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xdf, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x05, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb26_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb27 +{ + static const uint8 op_store_T0_crb27_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xef, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x04, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb27_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb28 +{ + static const uint8 op_store_T0_crb28_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xf7, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x03, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb28_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb29 +{ + static const uint8 op_store_T0_crb29_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfb, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x02, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T0_crb29_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb30 +{ + static const uint8 op_store_T0_crb30_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfd, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0x01, 0xc0, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb30_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb31 +{ + static const uint8 op_store_T0_crb31_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfe, 0x44, 0x89, 0xe0, + 0x83, 0xe0, 0x01, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb31_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR10 +{ + static const uint8 op_store_T1_GPR10_code[] = { + 0x44, 0x89, 0x6d, 0x38 + }; + copy_block(op_store_T1_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR11 +{ + static const uint8 op_store_T1_GPR11_code[] = { + 0x44, 0x89, 0x6d, 0x3c + }; + copy_block(op_store_T1_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR12 +{ + static const uint8 op_store_T1_GPR12_code[] = { + 0x44, 0x89, 0x6d, 0x40 + }; + copy_block(op_store_T1_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR13 +{ + static const uint8 op_store_T1_GPR13_code[] = { + 0x44, 0x89, 0x6d, 0x44 + }; + copy_block(op_store_T1_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR14 +{ + static const uint8 op_store_T1_GPR14_code[] = { + 0x44, 0x89, 0x6d, 0x48 + }; + copy_block(op_store_T1_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR15 +{ + static const uint8 op_store_T1_GPR15_code[] = { + 0x44, 0x89, 0x6d, 0x4c + }; + copy_block(op_store_T1_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR16 +{ + static const uint8 op_store_T1_GPR16_code[] = { + 0x44, 0x89, 0x6d, 0x50 + }; + copy_block(op_store_T1_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR17 +{ + static const uint8 op_store_T1_GPR17_code[] = { + 0x44, 0x89, 0x6d, 0x54 + }; + copy_block(op_store_T1_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR18 +{ + static const uint8 op_store_T1_GPR18_code[] = { + 0x44, 0x89, 0x6d, 0x58 + }; + copy_block(op_store_T1_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR19 +{ + static const uint8 op_store_T1_GPR19_code[] = { + 0x44, 0x89, 0x6d, 0x5c + }; + copy_block(op_store_T1_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR20 +{ + static const uint8 op_store_T1_GPR20_code[] = { + 0x44, 0x89, 0x6d, 0x60 + }; + copy_block(op_store_T1_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR21 +{ + static const uint8 op_store_T1_GPR21_code[] = { + 0x44, 0x89, 0x6d, 0x64 + }; + copy_block(op_store_T1_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR22 +{ + static const uint8 op_store_T1_GPR22_code[] = { + 0x44, 0x89, 0x6d, 0x68 + }; + copy_block(op_store_T1_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR23 +{ + static const uint8 op_store_T1_GPR23_code[] = { + 0x44, 0x89, 0x6d, 0x6c + }; + copy_block(op_store_T1_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR24 +{ + static const uint8 op_store_T1_GPR24_code[] = { + 0x44, 0x89, 0x6d, 0x70 + }; + copy_block(op_store_T1_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR25 +{ + static const uint8 op_store_T1_GPR25_code[] = { + 0x44, 0x89, 0x6d, 0x74 + }; + copy_block(op_store_T1_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR26 +{ + static const uint8 op_store_T1_GPR26_code[] = { + 0x44, 0x89, 0x6d, 0x78 + }; + copy_block(op_store_T1_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR27 +{ + static const uint8 op_store_T1_GPR27_code[] = { + 0x44, 0x89, 0x6d, 0x7c + }; + copy_block(op_store_T1_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR28 +{ + static const uint8 op_store_T1_GPR28_code[] = { + 0x44, 0x89, 0xad, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR29 +{ + static const uint8 op_store_T1_GPR29_code[] = { + 0x44, 0x89, 0xad, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR30 +{ + static const uint8 op_store_T1_GPR30_code[] = { + 0x44, 0x89, 0xad, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR31 +{ + static const uint8 op_store_T1_GPR31_code[] = { + 0x44, 0x89, 0xad, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb10 +{ + static const uint8 op_store_T1_crb10_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xdf, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x15, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb10_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb11 +{ + static const uint8 op_store_T1_crb11_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xef, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x14, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb11_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb12 +{ + static const uint8 op_store_T1_crb12_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xf7, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x13, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb12_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb13 +{ + static const uint8 op_store_T1_crb13_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfb, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x12, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb13_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb14 +{ + static const uint8 op_store_T1_crb14_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfd, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x11, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb14_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb15 +{ + static const uint8 op_store_T1_crb15_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x81, 0xe2, 0xff, 0xff, 0xfe, 0xff, + 0x44, 0x89, 0xe8, 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x10, 0x09, 0xd0, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb15_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb16 +{ + static const uint8 op_store_T1_crb16_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0x7f, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0f, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb16_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb17 +{ + static const uint8 op_store_T1_crb17_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xbf, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0e, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb17_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb18 +{ + static const uint8 op_store_T1_crb18_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xdf, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0d, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb18_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb19 +{ + static const uint8 op_store_T1_crb19_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xef, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0c, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb19_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb20 +{ + static const uint8 op_store_T1_crb20_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xf7, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0b, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb20_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb21 +{ + static const uint8 op_store_T1_crb21_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfb, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x0a, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb21_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb22 +{ + static const uint8 op_store_T1_crb22_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfd, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x09, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb22_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb23 +{ + static const uint8 op_store_T1_crb23_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe6, 0xfe, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x08, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb23_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb24 +{ + static const uint8 op_store_T1_crb24_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x80, 0xe2, 0x7f, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x07, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb24_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb25 +{ + static const uint8 op_store_T1_crb25_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xbf, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x06, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb25_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb26 +{ + static const uint8 op_store_T1_crb26_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xdf, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x05, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb26_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb27 +{ + static const uint8 op_store_T1_crb27_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xef, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x04, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb27_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb28 +{ + static const uint8 op_store_T1_crb28_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xf7, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x03, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb28_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb29 +{ + static const uint8 op_store_T1_crb29_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfb, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0xc1, 0xe0, 0x02, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_store_T1_crb29_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb30 +{ + static const uint8 op_store_T1_crb30_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfd, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0x01, 0xc0, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb30_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb31 +{ + static const uint8 op_store_T1_crb31_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe2, 0xfe, 0x44, 0x89, 0xe8, + 0x83, 0xe0, 0x01, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb31_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR10 +{ + static const uint8 op_store_T2_GPR10_code[] = { + 0x44, 0x89, 0x75, 0x38 + }; + copy_block(op_store_T2_GPR10_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR11 +{ + static const uint8 op_store_T2_GPR11_code[] = { + 0x44, 0x89, 0x75, 0x3c + }; + copy_block(op_store_T2_GPR11_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR12 +{ + static const uint8 op_store_T2_GPR12_code[] = { + 0x44, 0x89, 0x75, 0x40 + }; + copy_block(op_store_T2_GPR12_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR13 +{ + static const uint8 op_store_T2_GPR13_code[] = { + 0x44, 0x89, 0x75, 0x44 + }; + copy_block(op_store_T2_GPR13_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR14 +{ + static const uint8 op_store_T2_GPR14_code[] = { + 0x44, 0x89, 0x75, 0x48 + }; + copy_block(op_store_T2_GPR14_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR15 +{ + static const uint8 op_store_T2_GPR15_code[] = { + 0x44, 0x89, 0x75, 0x4c + }; + copy_block(op_store_T2_GPR15_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR16 +{ + static const uint8 op_store_T2_GPR16_code[] = { + 0x44, 0x89, 0x75, 0x50 + }; + copy_block(op_store_T2_GPR16_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR17 +{ + static const uint8 op_store_T2_GPR17_code[] = { + 0x44, 0x89, 0x75, 0x54 + }; + copy_block(op_store_T2_GPR17_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR18 +{ + static const uint8 op_store_T2_GPR18_code[] = { + 0x44, 0x89, 0x75, 0x58 + }; + copy_block(op_store_T2_GPR18_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR19 +{ + static const uint8 op_store_T2_GPR19_code[] = { + 0x44, 0x89, 0x75, 0x5c + }; + copy_block(op_store_T2_GPR19_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR20 +{ + static const uint8 op_store_T2_GPR20_code[] = { + 0x44, 0x89, 0x75, 0x60 + }; + copy_block(op_store_T2_GPR20_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR21 +{ + static const uint8 op_store_T2_GPR21_code[] = { + 0x44, 0x89, 0x75, 0x64 + }; + copy_block(op_store_T2_GPR21_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR22 +{ + static const uint8 op_store_T2_GPR22_code[] = { + 0x44, 0x89, 0x75, 0x68 + }; + copy_block(op_store_T2_GPR22_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR23 +{ + static const uint8 op_store_T2_GPR23_code[] = { + 0x44, 0x89, 0x75, 0x6c + }; + copy_block(op_store_T2_GPR23_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR24 +{ + static const uint8 op_store_T2_GPR24_code[] = { + 0x44, 0x89, 0x75, 0x70 + }; + copy_block(op_store_T2_GPR24_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR25 +{ + static const uint8 op_store_T2_GPR25_code[] = { + 0x44, 0x89, 0x75, 0x74 + }; + copy_block(op_store_T2_GPR25_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR26 +{ + static const uint8 op_store_T2_GPR26_code[] = { + 0x44, 0x89, 0x75, 0x78 + }; + copy_block(op_store_T2_GPR26_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR27 +{ + static const uint8 op_store_T2_GPR27_code[] = { + 0x44, 0x89, 0x75, 0x7c + }; + copy_block(op_store_T2_GPR27_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR28 +{ + static const uint8 op_store_T2_GPR28_code[] = { + 0x44, 0x89, 0xb5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR29 +{ + static const uint8 op_store_T2_GPR29_code[] = { + 0x44, 0x89, 0xb5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR30 +{ + static const uint8 op_store_T2_GPR30_code[] = { + 0x44, 0x89, 0xb5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR31 +{ + static const uint8 op_store_T2_GPR31_code[] = { + 0x44, 0x89, 0xb5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_vandc_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vandc_VD_V0_V1 +{ + static const uint8 op_vandc_VD_V0_V1_code[] = { + 0x49, 0x8b, 0x45, 0x00, 0x48, 0xf7, 0xd0, 0x49, 0x23, 0x04, 0x24, 0x49, + 0x89, 0x07, 0x49, 0x8b, 0x45, 0x08, 0x48, 0xf7, 0xd0, 0x49, 0x23, 0x44, + 0x24, 0x08, 0x49, 0x89, 0x47, 0x08 + }; + copy_block(op_vandc_VD_V0_V1_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR10 +{ + static const uint8 op_load_ad_V0_VR10_code[] = { + 0x4c, 0x8d, 0xa5, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR11 +{ + static const uint8 op_load_ad_V0_VR11_code[] = { + 0x4c, 0x8d, 0xa5, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR12 +{ + static const uint8 op_load_ad_V0_VR12_code[] = { + 0x4c, 0x8d, 0xa5, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR13 +{ + static const uint8 op_load_ad_V0_VR13_code[] = { + 0x4c, 0x8d, 0xa5, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR14 +{ + static const uint8 op_load_ad_V0_VR14_code[] = { + 0x4c, 0x8d, 0xa5, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR15 +{ + static const uint8 op_load_ad_V0_VR15_code[] = { + 0x4c, 0x8d, 0xa5, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR16 +{ + static const uint8 op_load_ad_V0_VR16_code[] = { + 0x4c, 0x8d, 0xa5, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR17 +{ + static const uint8 op_load_ad_V0_VR17_code[] = { + 0x4c, 0x8d, 0xa5, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR18 +{ + static const uint8 op_load_ad_V0_VR18_code[] = { + 0x4c, 0x8d, 0xa5, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR19 +{ + static const uint8 op_load_ad_V0_VR19_code[] = { + 0x4c, 0x8d, 0xa5, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR20 +{ + static const uint8 op_load_ad_V0_VR20_code[] = { + 0x4c, 0x8d, 0xa5, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR21 +{ + static const uint8 op_load_ad_V0_VR21_code[] = { + 0x4c, 0x8d, 0xa5, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR22 +{ + static const uint8 op_load_ad_V0_VR22_code[] = { + 0x4c, 0x8d, 0xa5, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR23 +{ + static const uint8 op_load_ad_V0_VR23_code[] = { + 0x4c, 0x8d, 0xa5, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR24 +{ + static const uint8 op_load_ad_V0_VR24_code[] = { + 0x4c, 0x8d, 0xa5, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR25 +{ + static const uint8 op_load_ad_V0_VR25_code[] = { + 0x4c, 0x8d, 0xa5, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR26 +{ + static const uint8 op_load_ad_V0_VR26_code[] = { + 0x4c, 0x8d, 0xa5, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR27 +{ + static const uint8 op_load_ad_V0_VR27_code[] = { + 0x4c, 0x8d, 0xa5, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR28 +{ + static const uint8 op_load_ad_V0_VR28_code[] = { + 0x4c, 0x8d, 0xa5, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR29 +{ + static const uint8 op_load_ad_V0_VR29_code[] = { + 0x4c, 0x8d, 0xa5, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR30 +{ + static const uint8 op_load_ad_V0_VR30_code[] = { + 0x4c, 0x8d, 0xa5, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR31 +{ + static const uint8 op_load_ad_V0_VR31_code[] = { + 0x4c, 0x8d, 0xa5, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR10 +{ + static const uint8 op_load_ad_V1_VR10_code[] = { + 0x4c, 0x8d, 0xad, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR11 +{ + static const uint8 op_load_ad_V1_VR11_code[] = { + 0x4c, 0x8d, 0xad, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR12 +{ + static const uint8 op_load_ad_V1_VR12_code[] = { + 0x4c, 0x8d, 0xad, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR13 +{ + static const uint8 op_load_ad_V1_VR13_code[] = { + 0x4c, 0x8d, 0xad, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR14 +{ + static const uint8 op_load_ad_V1_VR14_code[] = { + 0x4c, 0x8d, 0xad, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR15 +{ + static const uint8 op_load_ad_V1_VR15_code[] = { + 0x4c, 0x8d, 0xad, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR16 +{ + static const uint8 op_load_ad_V1_VR16_code[] = { + 0x4c, 0x8d, 0xad, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR17 +{ + static const uint8 op_load_ad_V1_VR17_code[] = { + 0x4c, 0x8d, 0xad, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR18 +{ + static const uint8 op_load_ad_V1_VR18_code[] = { + 0x4c, 0x8d, 0xad, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR19 +{ + static const uint8 op_load_ad_V1_VR19_code[] = { + 0x4c, 0x8d, 0xad, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR20 +{ + static const uint8 op_load_ad_V1_VR20_code[] = { + 0x4c, 0x8d, 0xad, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR21 +{ + static const uint8 op_load_ad_V1_VR21_code[] = { + 0x4c, 0x8d, 0xad, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR22 +{ + static const uint8 op_load_ad_V1_VR22_code[] = { + 0x4c, 0x8d, 0xad, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR23 +{ + static const uint8 op_load_ad_V1_VR23_code[] = { + 0x4c, 0x8d, 0xad, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR24 +{ + static const uint8 op_load_ad_V1_VR24_code[] = { + 0x4c, 0x8d, 0xad, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR25 +{ + static const uint8 op_load_ad_V1_VR25_code[] = { + 0x4c, 0x8d, 0xad, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR26 +{ + static const uint8 op_load_ad_V1_VR26_code[] = { + 0x4c, 0x8d, 0xad, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR27 +{ + static const uint8 op_load_ad_V1_VR27_code[] = { + 0x4c, 0x8d, 0xad, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR28 +{ + static const uint8 op_load_ad_V1_VR28_code[] = { + 0x4c, 0x8d, 0xad, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR29 +{ + static const uint8 op_load_ad_V1_VR29_code[] = { + 0x4c, 0x8d, 0xad, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR30 +{ + static const uint8 op_load_ad_V1_VR30_code[] = { + 0x4c, 0x8d, 0xad, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR31 +{ + static const uint8 op_load_ad_V1_VR31_code[] = { + 0x4c, 0x8d, 0xad, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR10 +{ + static const uint8 op_load_ad_V2_VR10_code[] = { + 0x4c, 0x8d, 0xb5, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR11 +{ + static const uint8 op_load_ad_V2_VR11_code[] = { + 0x4c, 0x8d, 0xb5, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR12 +{ + static const uint8 op_load_ad_V2_VR12_code[] = { + 0x4c, 0x8d, 0xb5, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR13 +{ + static const uint8 op_load_ad_V2_VR13_code[] = { + 0x4c, 0x8d, 0xb5, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR14 +{ + static const uint8 op_load_ad_V2_VR14_code[] = { + 0x4c, 0x8d, 0xb5, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR15 +{ + static const uint8 op_load_ad_V2_VR15_code[] = { + 0x4c, 0x8d, 0xb5, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR16 +{ + static const uint8 op_load_ad_V2_VR16_code[] = { + 0x4c, 0x8d, 0xb5, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR17 +{ + static const uint8 op_load_ad_V2_VR17_code[] = { + 0x4c, 0x8d, 0xb5, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR18 +{ + static const uint8 op_load_ad_V2_VR18_code[] = { + 0x4c, 0x8d, 0xb5, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR19 +{ + static const uint8 op_load_ad_V2_VR19_code[] = { + 0x4c, 0x8d, 0xb5, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR20 +{ + static const uint8 op_load_ad_V2_VR20_code[] = { + 0x4c, 0x8d, 0xb5, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR21 +{ + static const uint8 op_load_ad_V2_VR21_code[] = { + 0x4c, 0x8d, 0xb5, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR22 +{ + static const uint8 op_load_ad_V2_VR22_code[] = { + 0x4c, 0x8d, 0xb5, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR23 +{ + static const uint8 op_load_ad_V2_VR23_code[] = { + 0x4c, 0x8d, 0xb5, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR24 +{ + static const uint8 op_load_ad_V2_VR24_code[] = { + 0x4c, 0x8d, 0xb5, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR25 +{ + static const uint8 op_load_ad_V2_VR25_code[] = { + 0x4c, 0x8d, 0xb5, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR26 +{ + static const uint8 op_load_ad_V2_VR26_code[] = { + 0x4c, 0x8d, 0xb5, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR27 +{ + static const uint8 op_load_ad_V2_VR27_code[] = { + 0x4c, 0x8d, 0xb5, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR28 +{ + static const uint8 op_load_ad_V2_VR28_code[] = { + 0x4c, 0x8d, 0xb5, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR29 +{ + static const uint8 op_load_ad_V2_VR29_code[] = { + 0x4c, 0x8d, 0xb5, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR30 +{ + static const uint8 op_load_ad_V2_VR30_code[] = { + 0x4c, 0x8d, 0xb5, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR31 +{ + static const uint8 op_load_ad_V2_VR31_code[] = { + 0x4c, 0x8d, 0xb5, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR10 +{ + static const uint8 op_load_ad_VD_VR10_code[] = { + 0x4c, 0x8d, 0xbd, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR10_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR11 +{ + static const uint8 op_load_ad_VD_VR11_code[] = { + 0x4c, 0x8d, 0xbd, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR11_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR12 +{ + static const uint8 op_load_ad_VD_VR12_code[] = { + 0x4c, 0x8d, 0xbd, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR12_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR13 +{ + static const uint8 op_load_ad_VD_VR13_code[] = { + 0x4c, 0x8d, 0xbd, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR13_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR14 +{ + static const uint8 op_load_ad_VD_VR14_code[] = { + 0x4c, 0x8d, 0xbd, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR14_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR15 +{ + static const uint8 op_load_ad_VD_VR15_code[] = { + 0x4c, 0x8d, 0xbd, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR15_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR16 +{ + static const uint8 op_load_ad_VD_VR16_code[] = { + 0x4c, 0x8d, 0xbd, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR16_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR17 +{ + static const uint8 op_load_ad_VD_VR17_code[] = { + 0x4c, 0x8d, 0xbd, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR17_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR18 +{ + static const uint8 op_load_ad_VD_VR18_code[] = { + 0x4c, 0x8d, 0xbd, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR18_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR19 +{ + static const uint8 op_load_ad_VD_VR19_code[] = { + 0x4c, 0x8d, 0xbd, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR19_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR20 +{ + static const uint8 op_load_ad_VD_VR20_code[] = { + 0x4c, 0x8d, 0xbd, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR20_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR21 +{ + static const uint8 op_load_ad_VD_VR21_code[] = { + 0x4c, 0x8d, 0xbd, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR21_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR22 +{ + static const uint8 op_load_ad_VD_VR22_code[] = { + 0x4c, 0x8d, 0xbd, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR22_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR23 +{ + static const uint8 op_load_ad_VD_VR23_code[] = { + 0x4c, 0x8d, 0xbd, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR23_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR24 +{ + static const uint8 op_load_ad_VD_VR24_code[] = { + 0x4c, 0x8d, 0xbd, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR24_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR25 +{ + static const uint8 op_load_ad_VD_VR25_code[] = { + 0x4c, 0x8d, 0xbd, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR25_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR26 +{ + static const uint8 op_load_ad_VD_VR26_code[] = { + 0x4c, 0x8d, 0xbd, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR26_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR27 +{ + static const uint8 op_load_ad_VD_VR27_code[] = { + 0x4c, 0x8d, 0xbd, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR27_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR28 +{ + static const uint8 op_load_ad_VD_VR28_code[] = { + 0x4c, 0x8d, 0xbd, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR28_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR29 +{ + static const uint8 op_load_ad_VD_VR29_code[] = { + 0x4c, 0x8d, 0xbd, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR29_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR30 +{ + static const uint8 op_load_ad_VD_VR30_code[] = { + 0x4c, 0x8d, 0xbd, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR30_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR31 +{ + static const uint8 op_load_ad_VD_VR31_code[] = { + 0x4c, 0x8d, 0xbd, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_VD_VR31_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_vect_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_vect_VD_T0 +{ + static const uint8 op_load_vect_VD_T0_code[] = { + 0x44, 0x89, 0xe2, 0x83, 0xe2, 0xf0, 0x89, 0xd0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x07, 0x8d, 0x42, 0x04, 0x89, 0xc0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x04, 0x8d, 0x42, 0x08, 0x89, 0xc0, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x08, 0x83, 0xc2, 0x0c, 0x89, 0xd2, 0x8b, + 0x02, 0x0f, 0xc8, 0x41, 0x89, 0x47, 0x0c + }; + copy_block(op_load_vect_VD_T0_code, 162); + *(uint32_t *)(code_ptr() + 32) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 80) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 129) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 40) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 88) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 137) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(162); +} +#endif + +DEFINE_GEN(gen_op_load_word_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_word_VD_T0 +{ + static const uint8 op_load_word_VD_T0_code[] = { + 0x44, 0x89, 0xe2, 0x48, 0x89, 0xd0, 0x83, 0xe0, 0xfc, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, 0x41, 0x89, 0x04, 0x97 + }; + copy_block(op_load_word_VD_T0_code, 59); + *(uint32_t *)(code_ptr() + 33) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(59); +} +#endif + +DEFINE_GEN(gen_op_store_T0_VRSAVE,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_VRSAVE +{ + static const uint8 op_store_T0_VRSAVE_code[] = { + 0x44, 0x89, 0xa5, 0x9c, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_VRSAVE_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_vaddfp_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vaddfp_VD_V0_V1 +{ + static const uint8 op_vaddfp_VD_V0_V1_code[] = { + 0xf3, 0x41, 0x0f, 0x10, 0x45, 0x00, 0xf3, 0x41, 0x0f, 0x58, 0x04, 0x24, + 0xf3, 0x41, 0x0f, 0x11, 0x07, 0xf3, 0x41, 0x0f, 0x10, 0x45, 0x04, 0xf3, + 0x41, 0x0f, 0x58, 0x44, 0x24, 0x04, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x04, + 0xf3, 0x41, 0x0f, 0x10, 0x45, 0x08, 0xf3, 0x41, 0x0f, 0x58, 0x44, 0x24, + 0x08, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x08, 0xf3, 0x41, 0x0f, 0x10, 0x45, + 0x0c, 0xf3, 0x41, 0x0f, 0x58, 0x44, 0x24, 0x0c, 0xf3, 0x41, 0x0f, 0x11, + 0x47, 0x0c + }; + copy_block(op_vaddfp_VD_V0_V1_code, 74); + inc_code_ptr(74); +} +#endif + +DEFINE_GEN(gen_op_vsubfp_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vsubfp_VD_V0_V1 +{ + static const uint8 op_vsubfp_VD_V0_V1_code[] = { + 0xf3, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf3, 0x41, 0x0f, 0x5c, 0x45, 0x00, + 0xf3, 0x41, 0x0f, 0x11, 0x07, 0xf3, 0x41, 0x0f, 0x10, 0x44, 0x24, 0x04, + 0xf3, 0x41, 0x0f, 0x5c, 0x45, 0x04, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x04, + 0xf3, 0x41, 0x0f, 0x10, 0x44, 0x24, 0x08, 0xf3, 0x41, 0x0f, 0x5c, 0x45, + 0x08, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x08, 0xf3, 0x41, 0x0f, 0x10, 0x44, + 0x24, 0x0c, 0xf3, 0x41, 0x0f, 0x5c, 0x45, 0x0c, 0xf3, 0x41, 0x0f, 0x11, + 0x47, 0x0c + }; + copy_block(op_vsubfp_VD_V0_V1_code, 74); + inc_code_ptr(74); +} +#endif + +DEFINE_GEN(gen_op_store_vect_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_vect_VD_T0 +{ + static const uint8 op_store_vect_VD_T0_code[] = { + 0x44, 0x89, 0xe1, 0x83, 0xe1, 0xf0, 0x41, 0x8b, 0x07, 0x0f, 0xc8, 0x89, + 0xca, + TRANS_RDX, + 0x89, 0x02, + 0x41, 0x8b, 0x57, 0x04, 0x0f, 0xca, 0x8d, 0x41, 0x04, 0x89, 0xc0, + TRANS_RAX, + 0x89, 0x10, + 0x41, 0x8b, 0x57, 0x08, 0x0f, 0xca, 0x8d, 0x41, 0x08, 0x89, 0xc0, + TRANS_RAX, + 0x89, 0x10, + 0x41, 0x8b, 0x47, 0x0c, 0x0f, 0xc8, 0x83, 0xc1, 0x0c, 0x89, 0xc9, 0x89, + 0x01 + }; + copy_block(op_store_vect_VD_T0_code, 167); + *(uint32_t *)(code_ptr() + 41) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 91) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 140) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 50) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 99) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 148) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(167); +} +#endif + +DEFINE_GEN(gen_op_store_word_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_word_VD_T0 +{ + static const uint8 op_store_word_VD_T0_code[] = { + 0x44, 0x89, 0xe0, 0x44, 0x89, 0xe2, 0xc1, 0xea, 0x02, 0x83, 0xe2, 0x03, + 0x41, 0x8b, 0x14, 0x97, 0x0f, 0xca, 0x83, 0xe0, 0xfc, + TRANS_RAX, + 0x89, 0x10, + }; + copy_block(op_store_word_VD_T0_code, 59); + *(uint32_t *)(code_ptr() + 45) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 53) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(59); +} +#endif + +DEFINE_GEN(gen_op_fmadd_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmadd_FD_F0_F1_F2 +{ + static const uint8 op_fmadd_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x58, 0x06, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, + 0x00 + }; + copy_block(op_fmadd_FD_F0_F1_F2_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_fmsub_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmsub_FD_F0_F1_F2 +{ + static const uint8 op_fmsub_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x5c, 0x06, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, + 0x00 + }; + copy_block(op_fmsub_FD_F0_F1_F2_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_fmadds_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmadds_FD_F0_F1_F2 +{ + static const uint8 op_fmadds_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x58, 0x06, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, + 0xc0, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmadds_FD_F0_F1_F2_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_fmsubs_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmsubs_FD_F0_F1_F2 +{ + static const uint8 op_fmsubs_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x5c, 0x06, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x5a, + 0xc0, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fmsubs_FD_F0_F1_F2_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_fnmadd_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmadd_FD_F0_F1_F2 +{ + static const uint8 op_fnmadd_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x58, 0x06, 0x66, 0x0f, 0x57, 0x05, 0x0b, 0x1b, 0x00, + 0x00, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fnmadd_FD_F0_F1_F2_code, 33); + static const uint8 literal16_1[] = { + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; + static uint8 *data_p_1 = NULL; + if (data_p_1 == NULL) + data_p_1 = copy_data(literal16_1, 16); + *(uint32_t *)(code_ptr() + 21) = (int32_t)((long)data_p_1 - (long)(code_ptr() + 21 + 4)); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_fnmsub_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmsub_FD_F0_F1_F2 +{ + static const uint8 op_fnmsub_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x5c, 0x06, 0x66, 0x0f, 0x57, 0x05, 0xe9, 0x1a, 0x00, + 0x00, 0xf2, 0x0f, 0x11, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fnmsub_FD_F0_F1_F2_code, 33); + static const uint8 literal16_1[] = { + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; + static uint8 *data_p_1 = NULL; + if (data_p_1 == NULL) + data_p_1 = copy_data(literal16_1, 16); + *(uint32_t *)(code_ptr() + 21) = (int32_t)((long)data_p_1 - (long)(code_ptr() + 21 + 4)); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_load_T0_LR_aligned,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_LR_aligned +{ + static const uint8 op_load_T0_LR_aligned_code[] = { + 0x44, 0x8b, 0xa5, 0xa4, 0x03, 0x00, 0x00, 0x41, 0x83, 0xe4, 0xfc + }; + copy_block(op_load_T0_LR_aligned_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_fnmadds_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmadds_FD_F0_F1_F2 +{ + static const uint8 op_fnmadds_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x58, 0x06, 0xf2, 0x0f, 0x5a, 0xc0, 0x0f, 0x57, 0x05, + 0xfc, 0x19, 0x00, 0x00, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fnmadds_FD_F0_F1_F2_code, 40); + static const uint8 literal16_1[] = { + 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; + static uint8 *data_p_1 = NULL; + if (data_p_1 == NULL) + data_p_1 = copy_data(literal16_1, 16); + *(uint32_t *)(code_ptr() + 24) = (int32_t)((long)data_p_1 - (long)(code_ptr() + 24 + 4)); + inc_code_ptr(40); +} +#endif + +DEFINE_GEN(gen_op_fnmsubs_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmsubs_FD_F0_F1_F2 +{ + static const uint8 op_fnmsubs_FD_F0_F1_F2_code[] = { + 0xf2, 0x41, 0x0f, 0x10, 0x04, 0x24, 0xf2, 0x41, 0x0f, 0x59, 0x45, 0x00, + 0xf2, 0x41, 0x0f, 0x5c, 0x06, 0xf2, 0x0f, 0x5a, 0xc0, 0x0f, 0x57, 0x05, + 0x8a, 0x34, 0x00, 0x00, 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x85, + 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_fnmsubs_FD_F0_F1_F2_code, 40); + static const uint8 literal16_1[] = { + 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; + static uint8 *data_p_1 = NULL; + if (data_p_1 == NULL) + data_p_1 = copy_data(literal16_1, 16); + *(uint32_t *)(code_ptr() + 24) = (int32_t)((long)data_p_1 - (long)(code_ptr() + 24 + 4)); + inc_code_ptr(40); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CTR_aligned,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CTR_aligned +{ + static const uint8 op_load_T0_CTR_aligned_code[] = { + 0x44, 0x8b, 0xa5, 0xa8, 0x03, 0x00, 0x00, 0x41, 0x83, 0xe4, 0xfc + }; + copy_block(op_load_T0_CTR_aligned_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_0 +{ + static const uint8 op_load_double_FD_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_0_code, 52); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(52); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_0 +{ + static const uint8 op_load_single_FD_T1_0_code[] = { + 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_single_FD_T1_0_code, 75); + *(uint32_t *)(code_ptr() + 27) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 35) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(75); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0000,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0000 +{ + static const uint8 op_prep_branch_bo_0000_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xc8, 0x41, 0x89, 0xc6, 0x89, + 0x85, 0xa8, 0x03, 0x00, 0x00, 0x31, 0xd2, 0x85, 0xc0, 0x74, 0x06, 0x45, + 0x85, 0xed, 0x0f, 0x94, 0xc2, 0x44, 0x0f, 0xb6, 0xea + }; + copy_block(op_prep_branch_bo_0000_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0001,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0001 +{ + static const uint8 op_prep_branch_bo_0001_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xc8, 0x41, 0x89, 0xc6, 0x89, + 0x85, 0xa8, 0x03, 0x00, 0x00, 0x31, 0xd2, 0x85, 0xc0, 0x75, 0x06, 0x45, + 0x85, 0xed, 0x0f, 0x94, 0xc2, 0x44, 0x0f, 0xb6, 0xea + }; + copy_block(op_prep_branch_bo_0001_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_001x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_001x +{ + static const uint8 op_prep_branch_bo_001x_code[] = { + 0x45, 0x85, 0xed, 0x0f, 0x94, 0xc0, 0x44, 0x0f, 0xb6, 0xe8 + }; + copy_block(op_prep_branch_bo_001x_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0100,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0100 +{ + static const uint8 op_prep_branch_bo_0100_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xc8, 0x41, 0x89, 0xc6, 0x89, + 0x85, 0xa8, 0x03, 0x00, 0x00, 0x31, 0xd2, 0x85, 0xc0, 0x74, 0x06, 0x45, + 0x85, 0xed, 0x0f, 0x95, 0xc2, 0x44, 0x0f, 0xb6, 0xea + }; + copy_block(op_prep_branch_bo_0100_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0101,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0101 +{ + static const uint8 op_prep_branch_bo_0101_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xc8, 0x41, 0x89, 0xc6, 0x89, + 0x85, 0xa8, 0x03, 0x00, 0x00, 0x31, 0xd2, 0x85, 0xc0, 0x75, 0x06, 0x45, + 0x85, 0xed, 0x0f, 0x95, 0xc2, 0x44, 0x0f, 0xb6, 0xea + }; + copy_block(op_prep_branch_bo_0101_code, 33); + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_011x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_011x +{ + static const uint8 op_prep_branch_bo_011x_code[] = { + 0x45, 0x85, 0xed, 0x0f, 0x95, 0xc0, 0x44, 0x0f, 0xb6, 0xe8 + }; + copy_block(op_prep_branch_bo_011x_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x00,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x00 +{ + static const uint8 op_prep_branch_bo_1x00_code[] = { + 0x8b, 0x95, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xca, 0x41, 0x89, 0xd6, 0x89, + 0x95, 0xa8, 0x03, 0x00, 0x00, 0x45, 0x31, 0xed, 0x85, 0xd2, 0x41, 0x0f, + 0x95, 0xc5 + }; + copy_block(op_prep_branch_bo_1x00_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x01,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x01 +{ + static const uint8 op_prep_branch_bo_1x01_code[] = { + 0x8b, 0x95, 0xa8, 0x03, 0x00, 0x00, 0xff, 0xca, 0x41, 0x89, 0xd6, 0x89, + 0x95, 0xa8, 0x03, 0x00, 0x00, 0x45, 0x31, 0xed, 0x85, 0xd2, 0x41, 0x0f, + 0x94, 0xc5 + }; + copy_block(op_prep_branch_bo_1x01_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x1x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x1x +{ + static const uint8 op_prep_branch_bo_1x1x_code[] = { + 0x41, 0xbd, 0x01, 0x00, 0x00, 0x00 + }; + copy_block(op_prep_branch_bo_1x1x_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_vmaddfp_VD_V0_V1_V2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vmaddfp_VD_V0_V1_V2 +{ + static const uint8 op_vmaddfp_VD_V0_V1_V2_code[] = { + 0xf3, 0x41, 0x0f, 0x10, 0x06, 0xf3, 0x41, 0x0f, 0x59, 0x04, 0x24, 0xf3, + 0x41, 0x0f, 0x58, 0x45, 0x00, 0xf3, 0x41, 0x0f, 0x11, 0x07, 0xf3, 0x41, + 0x0f, 0x10, 0x46, 0x04, 0xf3, 0x41, 0x0f, 0x59, 0x44, 0x24, 0x04, 0xf3, + 0x41, 0x0f, 0x58, 0x45, 0x04, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x04, 0xf3, + 0x41, 0x0f, 0x10, 0x46, 0x08, 0xf3, 0x41, 0x0f, 0x59, 0x44, 0x24, 0x08, + 0xf3, 0x41, 0x0f, 0x58, 0x45, 0x08, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x08, + 0xf3, 0x41, 0x0f, 0x10, 0x46, 0x0c, 0xf3, 0x41, 0x0f, 0x59, 0x44, 0x24, + 0x0c, 0xf3, 0x41, 0x0f, 0x58, 0x45, 0x0c, 0xf3, 0x41, 0x0f, 0x11, 0x47, + 0x0c + }; + copy_block(op_vmaddfp_VD_V0_V1_V2_code, 97); + inc_code_ptr(97); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_0 +{ + static const uint8 op_compare_logical_T0_0_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x89, 0xc2, 0x83, 0xca, 0x04, + 0x83, 0xc8, 0x02, 0x45, 0x85, 0xe4, 0x41, 0x89, 0xd4, 0x44, 0x0f, 0x44, + 0xe0 + }; + copy_block(op_compare_logical_T0_0_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_T2 +{ + static const uint8 op_load_double_FD_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_T2_code, 53); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(53); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_im +{ + static const uint8 op_load_double_FD_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x48, 0x8b, 0x00, + 0x48, 0x0f, 0xc8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_double_FD_T1_im_code, 61); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(61); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_T2 +{ + static const uint8 op_load_single_FD_T1_T2_code[] = { + 0x43, 0x8d, 0x04, 0x2e, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_single_FD_T1_T2_code, 76); + *(uint32_t *)(code_ptr() + 28) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(76); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_im +{ + static const uint8 op_load_single_FD_T1_im_code[] = { + 0x44, 0x89, 0xea, 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x8b, 0x00, + 0x0f, 0xc8, 0x89, 0x44, 0x24, 0xf4, 0xf3, 0x0f, 0x10, 0x44, 0x24, 0xf4, + 0xf3, 0x0f, 0x5a, 0xc0, 0xf2, 0x0f, 0x11, 0x44, 0x24, 0xf8, 0x48, 0x8b, + 0x44, 0x24, 0xf8, 0x48, 0x89, 0x85, 0xa8, 0x08, 0x10, 0x00 + }; + copy_block(op_load_single_FD_T1_im_code, 84); + *(uint32_t *)(code_ptr() + 36) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 44) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 6) = (int32_t)((long)param1 - (long)(code_ptr() + 6 + 4)) + 0; + inc_code_ptr(84); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_0 +{ + static const uint8 op_store_double_F0_T1_0_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xea, 0x48, 0x0f, 0xc8, + TRANS_RDX, + 0x48, 0x89, 0x02, + }; + copy_block(op_store_double_F0_T1_0_code, 54); + *(uint32_t *)(code_ptr() + 38) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(54); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_0 +{ + static const uint8 op_store_single_F0_T1_0_code[] = { + 0x49, 0x8b, 0x0c, 0x24, 0x48, 0x89, 0xc8, 0x48, 0xc1, 0xe8, 0x34, 0x25, + 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, 0x00, 0x83, 0xf8, 0x16, + 0x76, 0x1b, 0x48, 0xc1, 0xe9, 0x1d, 0x89, 0xca, 0x81, 0xe2, 0xff, 0xff, + 0xff, 0x3f, 0x48, 0xc1, 0xe9, 0x03, 0x89, 0xc8, 0x25, 0x00, 0x00, 0x00, + 0xc0, 0x09, 0xc2, 0xeb, 0x19, 0x48, 0x89, 0x4c, 0x24, 0xf0, 0xf2, 0x0f, + 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, + 0x24, 0xfc, 0x8b, 0x54, 0x24, 0xfc, 0x0f, 0xca, 0x44, 0x89, 0xe8, + TRANS_RAX, + 0x89, 0x10, + }; + copy_block(op_store_single_F0_T1_0_code, 121); + *(uint32_t *)(code_ptr() + 107) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 115) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(121); +} +#endif + +DEFINE_GEN(gen_op_vnmsubfp_VD_V0_V1_V2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vnmsubfp_VD_V0_V1_V2 +{ + static const uint8 op_vnmsubfp_VD_V0_V1_V2_code[] = { + 0xf3, 0x41, 0x0f, 0x10, 0x06, 0xf3, 0x41, 0x0f, 0x59, 0x04, 0x24, 0xf3, + 0x41, 0x0f, 0x5c, 0x45, 0x00, 0xf3, 0x0f, 0x10, 0x0d, 0xca, 0x29, 0x00, + 0x00, 0x0f, 0x57, 0xc1, 0xf3, 0x41, 0x0f, 0x11, 0x07, 0xf3, 0x41, 0x0f, + 0x10, 0x46, 0x04, 0xf3, 0x41, 0x0f, 0x59, 0x44, 0x24, 0x04, 0xf3, 0x41, + 0x0f, 0x5c, 0x45, 0x04, 0x0f, 0x57, 0xc1, 0xf3, 0x41, 0x0f, 0x11, 0x47, + 0x04, 0xf3, 0x41, 0x0f, 0x10, 0x46, 0x08, 0xf3, 0x41, 0x0f, 0x59, 0x44, + 0x24, 0x08, 0xf3, 0x41, 0x0f, 0x5c, 0x45, 0x08, 0x0f, 0x57, 0xc1, 0xf3, + 0x41, 0x0f, 0x11, 0x47, 0x08, 0xf3, 0x41, 0x0f, 0x10, 0x46, 0x0c, 0xf3, + 0x41, 0x0f, 0x59, 0x44, 0x24, 0x0c, 0xf3, 0x41, 0x0f, 0x5c, 0x45, 0x0c, + 0x0f, 0x57, 0xc1, 0xf3, 0x41, 0x0f, 0x11, 0x47, 0x0c + }; + copy_block(op_vnmsubfp_VD_V0_V1_V2_code, 117); + static const uint8 literal16_1[] = { + 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; + static uint8 *data_p_1 = NULL; + if (data_p_1 == NULL) + data_p_1 = copy_data(literal16_1, 16); + *(uint32_t *)(code_ptr() + 21) = (int32_t)((long)data_p_1 - (long)(code_ptr() + 21 + 4)); + inc_code_ptr(117); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_T1 +{ + static const uint8 op_compare_logical_T0_T1_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x45, 0x39, 0xec, 0x73, 0x09, + 0x41, 0x89, 0xd4, 0x41, 0x83, 0xcc, 0x08, 0xeb, 0x12, 0x89, 0xd0, 0x83, + 0xc8, 0x04, 0x83, 0xca, 0x02, 0x45, 0x39, 0xec, 0x41, 0x89, 0xc4, 0x44, + 0x0f, 0x46, 0xe2 + }; + copy_block(op_compare_logical_T0_T1_code, 39); + inc_code_ptr(39); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_im +{ + static const uint8 op_compare_logical_T0_im_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x8d, 0x35, 0x00, 0x00, 0x00, + 0x00, 0x41, 0x39, 0xf4, 0x73, 0x09, 0x41, 0x89, 0xd4, 0x41, 0x83, 0xcc, + 0x08, 0xeb, 0x12, 0x89, 0xd0, 0x83, 0xc8, 0x04, 0x83, 0xca, 0x02, 0x41, + 0x39, 0xf4, 0x41, 0x89, 0xc4, 0x44, 0x0f, 0x46, 0xe2 + }; + copy_block(op_compare_logical_T0_im_code, 45); + *(uint32_t *)(code_ptr() + 9) = (int32_t)((long)param1 - (long)(code_ptr() + 9 + 4)) + 0; + inc_code_ptr(45); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_T2 +{ + static const uint8 op_store_double_F0_T1_T2_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x43, 0x8d, 0x14, 0x2e, 0x48, 0x0f, 0xc8, + TRANS_RDX, + 0x48, 0x89, 0x02, + }; + copy_block(op_store_double_F0_T1_T2_code, 55); + *(uint32_t *)(code_ptr() + 39) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 48) = (uint32_t)(uintptr)gZeroPage; + inc_code_ptr(55); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_im +{ + static const uint8 op_store_double_F0_T1_im_code[] = { + 0x49, 0x8b, 0x04, 0x24, 0x44, 0x89, 0xe9, 0x48, 0x0f, 0xc8, 0x48, 0x8d, + 0x15, 0x00, 0x00, 0x00, 0x00, + ADD_RDX_RCX, + TRANS_RDX, + 0x48, 0x89, 0x02, + }; + copy_block(op_store_double_F0_T1_im_code, 63); + *(uint32_t *)(code_ptr() + 47) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 56) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 13) = (int32_t)((long)param1 - (long)(code_ptr() + 13 + 4)) + 0; + inc_code_ptr(63); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_T2 +{ + static const uint8 op_store_single_F0_T1_T2_code[] = { + 0x49, 0x8b, 0x14, 0x24, 0x48, 0x89, 0xd0, 0x48, 0xc1, 0xe8, 0x34, 0x25, + 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, 0x00, 0x83, 0xf8, 0x16, + 0x76, 0x1b, 0x48, 0xc1, 0xea, 0x1d, 0x89, 0xd1, 0x81, 0xe1, 0xff, 0xff, + 0xff, 0x3f, 0x48, 0xc1, 0xea, 0x03, 0x89, 0xd0, 0x25, 0x00, 0x00, 0x00, + 0xc0, 0x09, 0xc1, 0xeb, 0x19, 0x48, 0x89, 0x54, 0x24, 0xf0, 0xf2, 0x0f, + 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, + 0x24, 0xfc, 0x8b, 0x4c, 0x24, 0xfc, 0x44, 0x89, 0xf0, 0x0f, 0xc9, 0x44, + 0x01, 0xe8, 0x89, 0x08 + }; + copy_block(op_store_single_F0_T1_T2_code, 88); + inc_code_ptr(88); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_im +{ + static const uint8 op_store_single_F0_T1_im_code[] = { + 0x49, 0x8b, 0x14, 0x24, 0x48, 0x89, 0xd0, 0x48, 0xc1, 0xe8, 0x34, 0x25, + 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, 0x00, 0x83, 0xf8, 0x16, + 0x76, 0x1b, 0x48, 0xc1, 0xea, 0x1d, 0x89, 0xd1, 0x81, 0xe1, 0xff, 0xff, + 0xff, 0x3f, 0x48, 0xc1, 0xea, 0x03, 0x89, 0xd0, 0x25, 0x00, 0x00, 0x00, + 0xc0, 0x09, 0xc1, 0xeb, 0x19, 0x48, 0x89, 0x54, 0x24, 0xf0, 0xf2, 0x0f, + 0x10, 0x44, 0x24, 0xf0, 0xf2, 0x0f, 0x5a, 0xc0, 0xf3, 0x0f, 0x11, 0x44, + 0x24, 0xfc, 0x8b, 0x4c, 0x24, 0xfc, 0x0f, 0xc9, 0x44, 0x89, 0xe8, 0x48, + 0x8d, 0x15, 0x00, 0x00, 0x00, 0x00, + ADD_RAX_RDX, + TRANS_RAX, + 0x89, 0x08, + }; + copy_block(op_store_single_F0_T1_im_code, 130); + *(uint32_t *)(code_ptr() + 116) = (uint32_t)(uintptr)gKernelData; + *(uint32_t *)(code_ptr() + 124) = (uint32_t)(uintptr)gZeroPage; + *(uint32_t *)(code_ptr() + 86) = (int32_t)((long)param1 - (long)(code_ptr() + 86 + 4)) + 0; + inc_code_ptr(130); +} +#endif + +DEFINE_GEN(gen_op_emms,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_emms +{ + static const uint8 op_emms_code[] = { + 0x0f, 0x77 + }; + copy_block(op_emms_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_inc_PC,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_inc_PC +{ + static const uint8 op_inc_PC_code[] = { + 0x48, 0x8d, 0x05, 0x00, 0x00, 0x00, 0x00, 0x01, 0x85, 0xac, 0x03, 0x00, + 0x00 + }; + copy_block(op_inc_PC_code, 13); + *(uint32_t *)(code_ptr() + 3) = (int32_t)((long)param1 - (long)(code_ptr() + 3 + 4)) + 0; + inc_code_ptr(13); +} +#endif + +#undef DEFINE_CST +#undef DEFINE_GEN diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops.hpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops.hpp index 22791f3d8..5ea317c56 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops.hpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-dyngen-ops.hpp @@ -1,5 +1,9 @@ #if defined(__x86_64__) +#ifdef __APPLE__ + #include "ppc-dyngen-ops-x86_64_macos.hpp" +#else #include "ppc-dyngen-ops-x86_64.hpp" +#endif #elif defined(__i386__) #include "ppc-dyngen-ops-x86_32.hpp" #else From 616fb5808cd5b7433ab0e9b2870e6feb8538de48 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 4 Dec 2017 21:25:52 +0900 Subject: [PATCH 192/534] JIT code patch tool --- .../src/Unix/dyngen_precompiled/patch_jit.pl | 166 ++++++++++++++++++ 1 file changed, 166 insertions(+) create mode 100755 SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl diff --git a/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl b/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl new file mode 100755 index 000000000..97d0a8089 --- /dev/null +++ b/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl @@ -0,0 +1,166 @@ +#! /usr/bin/perl + +open(S, "basic-dyngen-ops-x86_64.hpp") || die; +open(O, "> basic-dyngen-ops-x86_64_macos.hpp") || die; +select O; +&patch; +close S; +close O; +open(S, "ppc-dyngen-ops-x86_64.hpp") || die; +open(O, "> ppc-dyngen-ops-x86_64_macos.hpp") || die; +select O; +&patch; +close S; +close O; +exit 0; + +sub patch { +print << "EOM"; +#define ADD_RAX_RCX 0x01,0xc8 +#define ADD_RDX_RCX 0x01,0xca +#define ADD_RAX_RDX 0x01,0xd0 +#define TRANS_RAX \\ + 0x48,0x3D,0x00,0x30,0x00,0x00,\\ + 0x72,0x16,\\ + 0x48,0x3D,0x00,0xE0,0xFF,0x5F,\\ + 0x72,0x14,\\ + 0x48,0x25,0xFF,0x1F,0x00,0x00,\\ + 0x48,0x05,0x00,0x00,0x00,0x00,\\ + 0xEB,0x06,\\ + 0x48,0x05,0x00,0x00,0x00,0x00 + +#define TRANS_RDX \\ + 0x48,0x81,0xFA,0x00,0x30,0x00,0x00,\\ + 0x72,0x19,\\ + 0x48,0x81,0xFA,0x00,0xE0,0xFF,0x5F,\\ + 0x72,0x17,\\ + 0x48,0x81,0xE2,0xFF,0x1F,0x00,0x00,\\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00,\\ + 0xEB,0x07,\\ + 0x48,0x81,0xC2,0x00,0x00,0x00,0x00 + +#ifdef DYNGEN_IMPL +extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; +#endif + +EOM +@keys = ("8b0402", "890c10", "891401", "890a", "8910", "882402", "8b00", + "8902", "0fb620", "8820", "0fb700", "0fb62402", "0fb70402", "890411"); +@keys_add_rax_rdx = ("8b0402", "890c10", "882402", "0fb62402", "0fb70402"); +@keys_trans_rdx = ("890a", "8902", "890411"); +$keys_add{"891401"} = "ADD_RAX_RCX"; +$keys_add{"890411"} = "ADD_RDX_RCX"; + +$keys{$_} = 1 while $_ = shift @keys; +$keys_add{$_} = "ADD_RAX_RDX" while $_ = shift @keys_add_rax_rdx; +$keys_trans_rdx{$_} = 1 while $_ = shift @keys_trans_rdx; +while () { + if (/static const uint8 (.+)\[/) { + print; + $name = $1; + $valid = $name =~ /load|store/; + } + elsif ($valid) { + if (/0x/) { + s/\s//g; + s/0x//g; + @code = (@code, split(",", $_)); + } + elsif (/};/) { + $n = 0; + $once = 0; + @ofs_k = (); + @ofs_z = (); + while (1) { + $found = -1; + $prefix = 0; + for ($i = 0; $i < @code - 1; $i++) { + $key = $code[$i] . $code[$i + 1]; + if ($keys{$key}) { + $found = $i; + $once = 1; + last; + } + $key .= $code[$i + 2]; + if ($keys{$key}) { + $found = $i; + $once = 1; + last; + } + $key .= $code[$i + 3]; + if ($keys{$key}) { + $found = $i; + $once = 1; + last; + } + } + if ($i > 0 && $code[$i - 1] =~ /44|48|66/) { + $prefix = 1; + $found--; + } + last if $found < 0; + $n += $found; + print " "; + for ($i = 0; $i < $found; $i++) { + printf "0x%s", shift @code; + print @code ? $i % 12 == 11 ? ",\n " : ", " : "\n };\n"; + } + if ($keys_add{$key}) { + $n += 2; + printf "\n %s,", $keys_add{$key}; + } + $trans_rdx = $keys_trans_rdx{$key}; + push @ofs_k, $n + ($trans_rdx ? 0x1c : 0x18); + push @ofs_z, $n + ($trans_rdx ? 0x25 : 0x20); + $n += $trans_rdx ? 0x29 : 0x24; + printf "\n TRANS_%s,\n ", $trans_rdx ? "RDX" : "RAX"; + if ($prefix) { + $n++; + printf "0x%02s, ", shift @code; + } + if ($keys_add{$key}) { + $n += 2; + if (length($key) == 8) { + $n++; + printf "0x%02s, ", shift @code if length($key) == 8; + } + printf "0x%02s, ", shift @code; + printf "0x%02x,\n", hex(shift @code) - ($keys_add{$key} =~ /RAX/ ? 4 : 2); + shift @code; + } + else { + for ($i = 0; $i < length($key); $i += 2) { + $n++; + printf "0x%s, ", shift @code; + } + print "\n"; + } + } + $valid = $once; + if (@code) { + $n += @code; + print " "; + for ($i = 0; @code; $i++) { + printf "0x%s", shift @code; + printf "%s", @code ==0 ? "\n" : $i % 12 == 11 ? ",\n " : ", "; + } + } + print " };\n"; + } + elsif (/copy_block/) { + printf " copy_block(%s, %d);\n", $name, $n; + printf " *(uint32_t *)(code_ptr() + %d) = (uint32_t)(uintptr)gKernelData;\n", shift @ofs_k while @ofs_k; + printf " *(uint32_t *)(code_ptr() + %d) = (uint32_t)(uintptr)gZeroPage;\n", shift @ofs_z while @ofs_z; + } + elsif (/inc_code_ptr/) { + printf " inc_code_ptr(%d);\n", $n; + } + else { + print; + } + } + else { + print; + } +} +} From 5c4466b841f409c9138149e82a7a21ad429cac4d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 4 Dec 2017 22:43:51 +0900 Subject: [PATCH 193/534] fix #1 --- SheepShaver/src/Unix/main_unix.cpp | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 6939239d1..76dd459d9 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -734,7 +734,10 @@ int main(int argc, char **argv) // Parse command line arguments for (int i=1; i Date: Mon, 4 Dec 2017 23:06:25 +0900 Subject: [PATCH 194/534] copied video_sdl.cpp from cebix/macemu --- SheepShaver/src/SDL/video_sdl.cpp | 43 +-- SheepShaver/src/adb.cpp | 461 +++++++++++++++++++++++++++++- 2 files changed, 485 insertions(+), 19 deletions(-) mode change 100755 => 100644 SheepShaver/src/SDL/video_sdl.cpp mode change 120000 => 100644 SheepShaver/src/adb.cpp diff --git a/SheepShaver/src/SDL/video_sdl.cpp b/SheepShaver/src/SDL/video_sdl.cpp old mode 100755 new mode 100644 index ce2c9ae16..9782c7461 --- a/SheepShaver/src/SDL/video_sdl.cpp +++ b/SheepShaver/src/SDL/video_sdl.cpp @@ -31,6 +31,7 @@ * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) * - Mouse acceleration, there is no API in SDL yet for that + * - Force relative mode in Grab mode even if SDL provides absolute coordinates? * - Gamma tables support is likely to be broken here * - Events processing is bound to the general emulation thread as SDL requires * to PumpEvents() within the same thread as the one that called SetVideoMode(). @@ -135,6 +136,7 @@ static bool toggle_fullscreen = false; static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; static bool mouse_grabbed = false; +static bool mouse_grabbed_window_name_status = false; // Mutex to protect SDL events static SDL_mutex *sdl_events_lock = NULL; @@ -494,7 +496,7 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt } // Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) { #if !REAL_ADDRESSING && !DIRECT_ADDRESSING int layout = FLAYOUT_DIRECT; @@ -502,10 +504,7 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; else if (depth == VIDEO_DEPTH_32BIT) layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; + MacFrameLayout = layout; monitor.set_mac_frame_base(MacFrameBaseMac); // Set variables used by UAE memory banking @@ -686,13 +685,13 @@ void driver_base::init() } // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); adapt_to_video_mode(); } void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(mouse_grabbed); + ADBSetRelMouseMode(false); // Init blitting routines SDL_PixelFormat *f = s->format; @@ -726,7 +725,7 @@ void driver_base::adapt_to_video_mode() { SDL_ShowCursor(hardware_cursor); // Set window name/class - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + set_window_name(STR_WINDOW_TITLE); // Everything went well init_ok = true; @@ -804,9 +803,8 @@ void driver_base::grab_mouse(void) if (!mouse_grabbed) { SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); if (new_mode == SDL_GRAB_ON) { - set_window_name(STR_WINDOW_TITLE_GRABBED); disable_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = true); + mouse_grabbed = true; } } } @@ -817,9 +815,8 @@ void driver_base::ungrab_mouse(void) if (mouse_grabbed) { SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); if (new_mode == SDL_GRAB_OFF) { - set_window_name(STR_WINDOW_TITLE); restore_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = false); + mouse_grabbed = false; } } } @@ -1279,6 +1276,13 @@ void VideoVBL(void) if (toggle_fullscreen) do_toggle_fullscreen(); + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; @@ -1301,6 +1305,13 @@ void VideoInterrupt(void) if (toggle_fullscreen) do_toggle_fullscreen(); + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; @@ -1751,11 +1762,7 @@ static void handle_events(void) // Mouse moved case SDL_MOUSEMOTION: - if (mouse_grabbed) { - drv->mouse_moved(event.motion.xrel, event.motion.yrel); - } else { - drv->mouse_moved(event.motion.x, event.motion.y); - } + drv->mouse_moved(event.motion.x, event.motion.y); break; // Keyboard @@ -1825,7 +1832,7 @@ static void handle_events(void) // Application activate/deactivate case SDL_ACTIVEEVENT: // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain && (event.active.state & SDL_APPACTIVE)) + if (event.active.gain) force_complete_window_refresh(); break; } diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 120000 index 1cc36b981..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/adb.cpp \ No newline at end of file diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp new file mode 100644 index 000000000..27d1de73b --- /dev/null +++ b/SheepShaver/src/adb.cpp @@ -0,0 +1,460 @@ +/* + * adb.cpp - ADB emulation (mouse/keyboard) + * + * Basilisk II (C) Christian Bauer + * + * 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 + */ + +/* + * SEE ALSO + * Inside Macintosh: Devices, chapter 5 "ADB Manager" + * Technote HW 01: "ADB - The Untold Story: Space Aliens Ate My Mouse" + */ + +#include + +#include "sysdeps.h" +#include "cpu_emulation.h" +#include "emul_op.h" +#include "main.h" +#include "prefs.h" +#include "video.h" +#include "adb.h" + +#ifdef POWERPC_ROM +#include "thunks.h" +#endif + +#define DEBUG 0 +#include "debug.h" + + +// Global variables +static int mouse_x = 0, mouse_y = 0; // Mouse position +static int old_mouse_x = 0, old_mouse_y = 0; +static bool mouse_button[3] = {false, false, false}; // Mouse button states +static bool old_mouse_button[3] = {false, false, false}; +static bool relative_mouse = false; + +static uint8 key_states[16]; // Key states (Mac keycodes) +#define MATRIX(code) (key_states[code >> 3] & (1 << (~code & 7))) + +// Keyboard event buffer (Mac keycodes with up/down flag) +const int KEY_BUFFER_SIZE = 16; +static uint8 key_buffer[KEY_BUFFER_SIZE]; +static unsigned int key_read_ptr = 0, key_write_ptr = 0; + +static uint8 mouse_reg_3[2] = {0x63, 0x01}; // Mouse ADB register 3 + +static uint8 key_reg_2[2] = {0xff, 0xff}; // Keyboard ADB register 2 +static uint8 key_reg_3[2] = {0x62, 0x05}; // Keyboard ADB register 3 + +static uint8 m_keyboard_type = 0x05; + +// ADB mouse motion lock (for platforms that use separate input thread) +static B2_mutex *mouse_lock; + + +/* + * Initialize ADB emulation + */ + +void ADBInit(void) +{ + mouse_lock = B2_create_mutex(); + m_keyboard_type = (uint8)PrefsFindInt32("keyboardtype"); + key_reg_3[1] = m_keyboard_type; +} + + +/* + * Exit ADB emulation + */ + +void ADBExit(void) +{ + if (mouse_lock) { + B2_delete_mutex(mouse_lock); + mouse_lock = NULL; + } +} + + +/* + * ADBOp() replacement + */ + +void ADBOp(uint8 op, uint8 *data) +{ + D(bug("ADBOp op %02x, data %02x %02x %02x\n", op, data[0], data[1], data[2])); + + // ADB reset? + if ((op & 0x0f) == 0) { + mouse_reg_3[0] = 0x63; + mouse_reg_3[1] = 0x01; + key_reg_2[0] = 0xff; + key_reg_2[1] = 0xff; + key_reg_3[0] = 0x62; + key_reg_3[1] = m_keyboard_type; + return; + } + + // Cut op into fields + uint8 adr = op >> 4; + uint8 cmd = (op >> 2) & 3; + uint8 reg = op & 3; + + // Check which device was addressed and act accordingly + if (adr == (mouse_reg_3[0] & 0x0f)) { + + // Mouse + if (cmd == 2) { + + // Listen + switch (reg) { + case 3: // Address/HandlerID + if (data[2] == 0xfe) // Change address + mouse_reg_3[0] = (mouse_reg_3[0] & 0xf0) | (data[1] & 0x0f); + else if (data[2] == 1 || data[2] == 2 || data[2] == 4) // Change device handler ID + mouse_reg_3[1] = data[2]; + else if (data[2] == 0x00) // Change address and enable bit + mouse_reg_3[0] = (mouse_reg_3[0] & 0xd0) | (data[1] & 0x2f); + break; + } + + } else if (cmd == 3) { + + // Talk + switch (reg) { + case 1: // Extended mouse protocol + data[0] = 8; + data[1] = 'a'; // Identifier + data[2] = 'p'; + data[3] = 'p'; + data[4] = 'l'; + data[5] = 300 >> 8; // Resolution (dpi) + data[6] = 300 & 0xff; + data[7] = 1; // Class (mouse) + data[8] = 3; // Number of buttons + break; + case 3: // Address/HandlerID + data[0] = 2; + data[1] = mouse_reg_3[0] & 0xf0 | (rand() & 0x0f); + data[2] = mouse_reg_3[1]; + break; + default: + data[0] = 0; + break; + } + } + D(bug(" mouse reg 3 %02x%02x\n", mouse_reg_3[0], mouse_reg_3[1])); + + } else if (adr == (key_reg_3[0] & 0x0f)) { + + // Keyboard + if (cmd == 2) { + + // Listen + switch (reg) { + case 2: // LEDs/Modifiers + key_reg_2[0] = data[1]; + key_reg_2[1] = data[2]; + break; + case 3: // Address/HandlerID + if (data[2] == 0xfe) // Change address + key_reg_3[0] = (key_reg_3[0] & 0xf0) | (data[1] & 0x0f); + else if (data[2] == 0x00) // Change address and enable bit + key_reg_3[0] = (key_reg_3[0] & 0xd0) | (data[1] & 0x2f); + break; + } + + } else if (cmd == 3) { + + // Talk + switch (reg) { + case 2: { // LEDs/Modifiers + uint8 reg2hi = 0xff; + uint8 reg2lo = key_reg_2[1] | 0xf8; + if (MATRIX(0x6b)) // Scroll Lock + reg2lo &= ~0x40; + if (MATRIX(0x47)) // Num Lock + reg2lo &= ~0x80; + if (MATRIX(0x37)) // Command + reg2hi &= ~0x01; + if (MATRIX(0x3a)) // Option + reg2hi &= ~0x02; + if (MATRIX(0x38)) // Shift + reg2hi &= ~0x04; + if (MATRIX(0x36)) // Control + reg2hi &= ~0x08; + if (MATRIX(0x39)) // Caps Lock + reg2hi &= ~0x20; + if (MATRIX(0x75)) // Delete + reg2hi &= ~0x40; + data[0] = 2; + data[1] = reg2hi; + data[2] = reg2lo; + break; + } + case 3: // Address/HandlerID + data[0] = 2; + data[1] = key_reg_3[0] & 0xf0 | (rand() & 0x0f); + data[2] = key_reg_3[1]; + break; + default: + data[0] = 0; + break; + } + } + D(bug(" keyboard reg 3 %02x%02x\n", key_reg_3[0], key_reg_3[1])); + + } else // Unknown address + if (cmd == 3) + data[0] = 0; // Talk: 0 bytes of data +} + + +/* + * Mouse was moved (x/y are absolute or relative, depending on ADBSetRelMouseMode()) + */ + +void ADBMouseMoved(int x, int y) +{ + B2_lock_mutex(mouse_lock); + if (relative_mouse) { + mouse_x += x; mouse_y += y; + } else { + mouse_x = x; mouse_y = y; + } + B2_unlock_mutex(mouse_lock); + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Mouse button pressed + */ + +void ADBMouseDown(int button) +{ + mouse_button[button] = true; + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Mouse button released + */ + +void ADBMouseUp(int button) +{ + mouse_button[button] = false; + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Set mouse mode (absolute or relative) + */ + +void ADBSetRelMouseMode(bool relative) +{ + if (relative_mouse != relative) { + relative_mouse = relative; + mouse_x = mouse_y = 0; + } +} + + +/* + * Key pressed ("code" is the Mac key code) + */ + +void ADBKeyDown(int code) +{ + // Add keycode to buffer + key_buffer[key_write_ptr] = code; + key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; + + // Set key in matrix + key_states[code >> 3] |= (1 << (~code & 7)); + + // Trigger interrupt + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * Key released ("code" is the Mac key code) + */ + +void ADBKeyUp(int code) +{ + // Add keycode to buffer + key_buffer[key_write_ptr] = code | 0x80; // Key-up flag + key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; + + // Clear key in matrix + key_states[code >> 3] &= ~(1 << (~code & 7)); + + // Trigger interrupt + SetInterruptFlag(INTFLAG_ADB); + TriggerInterrupt(); +} + + +/* + * ADB interrupt function (executed as part of 60Hz interrupt) + */ + +void ADBInterrupt(void) +{ + M68kRegisters r; + + // Return if ADB is not initialized + uint32 adb_base = ReadMacInt32(0xcf8); + if (!adb_base || adb_base == 0xffffffff) + return; + uint32 tmp_data = adb_base + 0x163; // Temporary storage for faked ADB data + + // Get mouse state + B2_lock_mutex(mouse_lock); + int mx = mouse_x; + int my = mouse_y; + if (relative_mouse) + mouse_x = mouse_y = 0; + bool mb[3] = {mouse_button[0], mouse_button[1], mouse_button[2]}; + B2_unlock_mutex(mouse_lock); + + uint32 key_base = adb_base + 4; + uint32 mouse_base = adb_base + 16; + + if (relative_mouse) { + + // Mouse movement (relative) and buttons + if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { + + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mb[2] ? 0x08 : 0x88)); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mb[0]; + old_mouse_button[1] = mb[1]; + old_mouse_button[2] = mb[2]; + } + + } else { + + // Update mouse position (absolute) + if (mx != old_mouse_x || my != old_mouse_y) { +#ifdef POWERPC_ROM + static const uint8 proc_template[] = { + 0x2f, 0x08, // move.l a0,-(sp) + 0x2f, 0x00, // move.l d0,-(sp) + 0x2f, 0x01, // move.l d1,-(sp) + 0x70, 0x01, // moveq #1,d0 (MoveTo) + 0xaa, 0xdb, // CursorDeviceDispatch + M68K_RTS >> 8, M68K_RTS & 0xff + }; + BUILD_SHEEPSHAVER_PROCEDURE(proc); + r.a[0] = ReadMacInt32(mouse_base + 4); + r.d[0] = mx; + r.d[1] = my; + Execute68k(proc, &r); +#else + WriteMacInt16(0x82a, mx); + WriteMacInt16(0x828, my); + WriteMacInt16(0x82e, mx); + WriteMacInt16(0x82c, my); + WriteMacInt8(0x8ce, ReadMacInt8(0x8cf)); // CrsrCouple -> CrsrNew +#endif + old_mouse_x = mx; + old_mouse_y = my; + } + + // Send mouse button events + if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { + uint32 mouse_base = adb_base + 16; + + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); + WriteMacInt8(tmp_data + 3, mb[2] ? 0x08 : 0x88); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mb[0]; + old_mouse_button[1] = mb[1]; + old_mouse_button[2] = mb[2]; + } + } + + // Process accumulated keyboard events + while (key_read_ptr != key_write_ptr) { + + // Read keyboard event + uint8 mac_code = key_buffer[key_read_ptr]; + key_read_ptr = (key_read_ptr + 1) % KEY_BUFFER_SIZE; + + // Call keyboard ADB handler + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, mac_code); + WriteMacInt8(tmp_data + 2, mac_code == 0x7f ? 0x7f : 0xff); // Power key is special + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(key_base); + r.a[2] = ReadMacInt32(key_base + 4); + r.a[3] = adb_base; + r.d[0] = (key_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + } + + // Clear temporary data + WriteMacInt32(tmp_data, 0); + WriteMacInt32(tmp_data + 4, 0); +} From 73a0dc21a7827da31d08a6c188f84bd45e5c3f7d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 5 Dec 2017 11:17:32 +0900 Subject: [PATCH 195/534] delete adb.cpp to revert --- SheepShaver/src/adb.cpp | 460 ---------------------------------------- 1 file changed, 460 deletions(-) delete mode 100644 SheepShaver/src/adb.cpp diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 100644 index 27d1de73b..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1,460 +0,0 @@ -/* - * adb.cpp - ADB emulation (mouse/keyboard) - * - * Basilisk II (C) Christian Bauer - * - * 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 - */ - -/* - * SEE ALSO - * Inside Macintosh: Devices, chapter 5 "ADB Manager" - * Technote HW 01: "ADB - The Untold Story: Space Aliens Ate My Mouse" - */ - -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "main.h" -#include "prefs.h" -#include "video.h" -#include "adb.h" - -#ifdef POWERPC_ROM -#include "thunks.h" -#endif - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int mouse_x = 0, mouse_y = 0; // Mouse position -static int old_mouse_x = 0, old_mouse_y = 0; -static bool mouse_button[3] = {false, false, false}; // Mouse button states -static bool old_mouse_button[3] = {false, false, false}; -static bool relative_mouse = false; - -static uint8 key_states[16]; // Key states (Mac keycodes) -#define MATRIX(code) (key_states[code >> 3] & (1 << (~code & 7))) - -// Keyboard event buffer (Mac keycodes with up/down flag) -const int KEY_BUFFER_SIZE = 16; -static uint8 key_buffer[KEY_BUFFER_SIZE]; -static unsigned int key_read_ptr = 0, key_write_ptr = 0; - -static uint8 mouse_reg_3[2] = {0x63, 0x01}; // Mouse ADB register 3 - -static uint8 key_reg_2[2] = {0xff, 0xff}; // Keyboard ADB register 2 -static uint8 key_reg_3[2] = {0x62, 0x05}; // Keyboard ADB register 3 - -static uint8 m_keyboard_type = 0x05; - -// ADB mouse motion lock (for platforms that use separate input thread) -static B2_mutex *mouse_lock; - - -/* - * Initialize ADB emulation - */ - -void ADBInit(void) -{ - mouse_lock = B2_create_mutex(); - m_keyboard_type = (uint8)PrefsFindInt32("keyboardtype"); - key_reg_3[1] = m_keyboard_type; -} - - -/* - * Exit ADB emulation - */ - -void ADBExit(void) -{ - if (mouse_lock) { - B2_delete_mutex(mouse_lock); - mouse_lock = NULL; - } -} - - -/* - * ADBOp() replacement - */ - -void ADBOp(uint8 op, uint8 *data) -{ - D(bug("ADBOp op %02x, data %02x %02x %02x\n", op, data[0], data[1], data[2])); - - // ADB reset? - if ((op & 0x0f) == 0) { - mouse_reg_3[0] = 0x63; - mouse_reg_3[1] = 0x01; - key_reg_2[0] = 0xff; - key_reg_2[1] = 0xff; - key_reg_3[0] = 0x62; - key_reg_3[1] = m_keyboard_type; - return; - } - - // Cut op into fields - uint8 adr = op >> 4; - uint8 cmd = (op >> 2) & 3; - uint8 reg = op & 3; - - // Check which device was addressed and act accordingly - if (adr == (mouse_reg_3[0] & 0x0f)) { - - // Mouse - if (cmd == 2) { - - // Listen - switch (reg) { - case 3: // Address/HandlerID - if (data[2] == 0xfe) // Change address - mouse_reg_3[0] = (mouse_reg_3[0] & 0xf0) | (data[1] & 0x0f); - else if (data[2] == 1 || data[2] == 2 || data[2] == 4) // Change device handler ID - mouse_reg_3[1] = data[2]; - else if (data[2] == 0x00) // Change address and enable bit - mouse_reg_3[0] = (mouse_reg_3[0] & 0xd0) | (data[1] & 0x2f); - break; - } - - } else if (cmd == 3) { - - // Talk - switch (reg) { - case 1: // Extended mouse protocol - data[0] = 8; - data[1] = 'a'; // Identifier - data[2] = 'p'; - data[3] = 'p'; - data[4] = 'l'; - data[5] = 300 >> 8; // Resolution (dpi) - data[6] = 300 & 0xff; - data[7] = 1; // Class (mouse) - data[8] = 3; // Number of buttons - break; - case 3: // Address/HandlerID - data[0] = 2; - data[1] = mouse_reg_3[0] & 0xf0 | (rand() & 0x0f); - data[2] = mouse_reg_3[1]; - break; - default: - data[0] = 0; - break; - } - } - D(bug(" mouse reg 3 %02x%02x\n", mouse_reg_3[0], mouse_reg_3[1])); - - } else if (adr == (key_reg_3[0] & 0x0f)) { - - // Keyboard - if (cmd == 2) { - - // Listen - switch (reg) { - case 2: // LEDs/Modifiers - key_reg_2[0] = data[1]; - key_reg_2[1] = data[2]; - break; - case 3: // Address/HandlerID - if (data[2] == 0xfe) // Change address - key_reg_3[0] = (key_reg_3[0] & 0xf0) | (data[1] & 0x0f); - else if (data[2] == 0x00) // Change address and enable bit - key_reg_3[0] = (key_reg_3[0] & 0xd0) | (data[1] & 0x2f); - break; - } - - } else if (cmd == 3) { - - // Talk - switch (reg) { - case 2: { // LEDs/Modifiers - uint8 reg2hi = 0xff; - uint8 reg2lo = key_reg_2[1] | 0xf8; - if (MATRIX(0x6b)) // Scroll Lock - reg2lo &= ~0x40; - if (MATRIX(0x47)) // Num Lock - reg2lo &= ~0x80; - if (MATRIX(0x37)) // Command - reg2hi &= ~0x01; - if (MATRIX(0x3a)) // Option - reg2hi &= ~0x02; - if (MATRIX(0x38)) // Shift - reg2hi &= ~0x04; - if (MATRIX(0x36)) // Control - reg2hi &= ~0x08; - if (MATRIX(0x39)) // Caps Lock - reg2hi &= ~0x20; - if (MATRIX(0x75)) // Delete - reg2hi &= ~0x40; - data[0] = 2; - data[1] = reg2hi; - data[2] = reg2lo; - break; - } - case 3: // Address/HandlerID - data[0] = 2; - data[1] = key_reg_3[0] & 0xf0 | (rand() & 0x0f); - data[2] = key_reg_3[1]; - break; - default: - data[0] = 0; - break; - } - } - D(bug(" keyboard reg 3 %02x%02x\n", key_reg_3[0], key_reg_3[1])); - - } else // Unknown address - if (cmd == 3) - data[0] = 0; // Talk: 0 bytes of data -} - - -/* - * Mouse was moved (x/y are absolute or relative, depending on ADBSetRelMouseMode()) - */ - -void ADBMouseMoved(int x, int y) -{ - B2_lock_mutex(mouse_lock); - if (relative_mouse) { - mouse_x += x; mouse_y += y; - } else { - mouse_x = x; mouse_y = y; - } - B2_unlock_mutex(mouse_lock); - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Mouse button pressed - */ - -void ADBMouseDown(int button) -{ - mouse_button[button] = true; - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Mouse button released - */ - -void ADBMouseUp(int button) -{ - mouse_button[button] = false; - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Set mouse mode (absolute or relative) - */ - -void ADBSetRelMouseMode(bool relative) -{ - if (relative_mouse != relative) { - relative_mouse = relative; - mouse_x = mouse_y = 0; - } -} - - -/* - * Key pressed ("code" is the Mac key code) - */ - -void ADBKeyDown(int code) -{ - // Add keycode to buffer - key_buffer[key_write_ptr] = code; - key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; - - // Set key in matrix - key_states[code >> 3] |= (1 << (~code & 7)); - - // Trigger interrupt - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Key released ("code" is the Mac key code) - */ - -void ADBKeyUp(int code) -{ - // Add keycode to buffer - key_buffer[key_write_ptr] = code | 0x80; // Key-up flag - key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; - - // Clear key in matrix - key_states[code >> 3] &= ~(1 << (~code & 7)); - - // Trigger interrupt - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * ADB interrupt function (executed as part of 60Hz interrupt) - */ - -void ADBInterrupt(void) -{ - M68kRegisters r; - - // Return if ADB is not initialized - uint32 adb_base = ReadMacInt32(0xcf8); - if (!adb_base || adb_base == 0xffffffff) - return; - uint32 tmp_data = adb_base + 0x163; // Temporary storage for faked ADB data - - // Get mouse state - B2_lock_mutex(mouse_lock); - int mx = mouse_x; - int my = mouse_y; - if (relative_mouse) - mouse_x = mouse_y = 0; - bool mb[3] = {mouse_button[0], mouse_button[1], mouse_button[2]}; - B2_unlock_mutex(mouse_lock); - - uint32 key_base = adb_base + 4; - uint32 mouse_base = adb_base + 16; - - if (relative_mouse) { - - // Mouse movement (relative) and buttons - if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mb[2] ? 0x08 : 0x88)); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } - - } else { - - // Update mouse position (absolute) - if (mx != old_mouse_x || my != old_mouse_y) { -#ifdef POWERPC_ROM - static const uint8 proc_template[] = { - 0x2f, 0x08, // move.l a0,-(sp) - 0x2f, 0x00, // move.l d0,-(sp) - 0x2f, 0x01, // move.l d1,-(sp) - 0x70, 0x01, // moveq #1,d0 (MoveTo) - 0xaa, 0xdb, // CursorDeviceDispatch - M68K_RTS >> 8, M68K_RTS & 0xff - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc); - r.a[0] = ReadMacInt32(mouse_base + 4); - r.d[0] = mx; - r.d[1] = my; - Execute68k(proc, &r); -#else - WriteMacInt16(0x82a, mx); - WriteMacInt16(0x828, my); - WriteMacInt16(0x82e, mx); - WriteMacInt16(0x82c, my); - WriteMacInt8(0x8ce, ReadMacInt8(0x8cf)); // CrsrCouple -> CrsrNew -#endif - old_mouse_x = mx; - old_mouse_y = my; - } - - // Send mouse button events - if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - uint32 mouse_base = adb_base + 16; - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - WriteMacInt8(tmp_data + 3, mb[2] ? 0x08 : 0x88); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } - } - - // Process accumulated keyboard events - while (key_read_ptr != key_write_ptr) { - - // Read keyboard event - uint8 mac_code = key_buffer[key_read_ptr]; - key_read_ptr = (key_read_ptr + 1) % KEY_BUFFER_SIZE; - - // Call keyboard ADB handler - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, mac_code); - WriteMacInt8(tmp_data + 2, mac_code == 0x7f ? 0x7f : 0xff); // Power key is special - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(key_base); - r.a[2] = ReadMacInt32(key_base + 4); - r.a[3] = adb_base; - r.d[0] = (key_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - } - - // Clear temporary data - WriteMacInt32(tmp_data, 0); - WriteMacInt32(tmp_data + 4, 0); -} From ce426edbc412b316a8f6b02a5b4ea6eee3cfba6d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 5 Dec 2017 11:18:35 +0900 Subject: [PATCH 196/534] revert adb.cpp (symlink) --- SheepShaver/src/adb.cpp | 1 + 1 file changed, 1 insertion(+) create mode 120000 SheepShaver/src/adb.cpp diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp new file mode 120000 index 000000000..1cc36b981 --- /dev/null +++ b/SheepShaver/src/adb.cpp @@ -0,0 +1 @@ +../../BasiliskII/src/adb.cpp \ No newline at end of file From ae88e28ed79b2dd4b0f45ce17f2266dcd7703b96 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 5 Dec 2017 23:46:02 +0900 Subject: [PATCH 197/534] delete SDL/* to revert --- SheepShaver/src/SDL/SDLMain.h | 16 - SheepShaver/src/SDL/SDLMain.m | 381 ----- SheepShaver/src/SDL/audio_sdl.cpp | 344 ----- SheepShaver/src/SDL/keycodes | 464 ------ SheepShaver/src/SDL/video_sdl.cpp | 2271 ----------------------------- 5 files changed, 3476 deletions(-) delete mode 100644 SheepShaver/src/SDL/SDLMain.h delete mode 100644 SheepShaver/src/SDL/SDLMain.m delete mode 100644 SheepShaver/src/SDL/audio_sdl.cpp delete mode 100644 SheepShaver/src/SDL/keycodes delete mode 100644 SheepShaver/src/SDL/video_sdl.cpp diff --git a/SheepShaver/src/SDL/SDLMain.h b/SheepShaver/src/SDL/SDLMain.h deleted file mode 100644 index c56d90cbe..000000000 --- a/SheepShaver/src/SDL/SDLMain.h +++ /dev/null @@ -1,16 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#ifndef _SDLMain_h_ -#define _SDLMain_h_ - -#import - -@interface SDLMain : NSObject -@end - -#endif /* _SDLMain_h_ */ diff --git a/SheepShaver/src/SDL/SDLMain.m b/SheepShaver/src/SDL/SDLMain.m deleted file mode 100644 index 0f23664dd..000000000 --- a/SheepShaver/src/SDL/SDLMain.m +++ /dev/null @@ -1,381 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#include "SDL.h" -#include "SDLMain.h" -#include /* for MAXPATHLEN */ -#include - -/* For some reaon, Apple removed setAppleMenu from the headers in 10.4, - but the method still is there and works. To avoid warnings, we declare - it ourselves here. */ -@interface NSApplication(SDL_Missing_Methods) -- (void)setAppleMenu:(NSMenu *)menu; -@end - -/* Use this flag to determine whether we use SDLMain.nib or not */ -#define SDL_USE_NIB_FILE 0 - -/* Use this flag to determine whether we use CPS (docking) or not */ -#define SDL_USE_CPS 1 -#ifdef SDL_USE_CPS -/* Portions of CPS.h */ -typedef struct CPSProcessSerNum -{ - UInt32 lo; - UInt32 hi; -} CPSProcessSerNum; - -extern OSErr CPSGetCurrentProcess( CPSProcessSerNum *psn); -extern OSErr CPSEnableForegroundOperation( CPSProcessSerNum *psn, UInt32 _arg2, UInt32 _arg3, UInt32 _arg4, UInt32 _arg5); -extern OSErr CPSSetFrontProcess( CPSProcessSerNum *psn); - -#endif /* SDL_USE_CPS */ - -static int gArgc; -static char **gArgv; -static BOOL gFinderLaunch; -static BOOL gCalledAppMainline = FALSE; - -static NSString *getApplicationName(void) -{ - const NSDictionary *dict; - NSString *appName = 0; - - /* Determine the application name */ - dict = (const NSDictionary *)CFBundleGetInfoDictionary(CFBundleGetMainBundle()); - if (dict) - appName = [dict objectForKey: @"CFBundleName"]; - - if (![appName length]) - appName = [[NSProcessInfo processInfo] processName]; - - return appName; -} - -#if SDL_USE_NIB_FILE -/* A helper category for NSString */ -@interface NSString (ReplaceSubString) -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString; -@end -#endif - -@interface NSApplication (SDLApplication) -@end - -@implementation NSApplication (SDLApplication) -/* Invoked from the Quit menu item */ -- (void)terminate:(id)sender -{ - /* Post a SDL_QUIT event */ - SDL_Event event; - event.type = SDL_QUIT; - SDL_PushEvent(&event); -} -@end - -/* The main class of the application, the application's delegate */ -@implementation SDLMain - -/* Set the working directory to the .app's parent directory */ -- (void) setupWorkingDirectory:(BOOL)shouldChdir -{ - if (shouldChdir) - { - char parentdir[MAXPATHLEN]; - CFURLRef url = CFBundleCopyBundleURL(CFBundleGetMainBundle()); - CFURLRef url2 = CFURLCreateCopyDeletingLastPathComponent(0, url); - if (CFURLGetFileSystemRepresentation(url2, 1, (UInt8 *)parentdir, MAXPATHLEN)) { - chdir(parentdir); /* chdir to the binary app's parent */ - } - CFRelease(url); - CFRelease(url2); - } -} - -#if SDL_USE_NIB_FILE - -/* Fix menu to contain the real app name instead of "SDL App" */ -- (void)fixMenu:(NSMenu *)aMenu withAppName:(NSString *)appName -{ - NSRange aRange; - NSEnumerator *enumerator; - NSMenuItem *menuItem; - - aRange = [[aMenu title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [aMenu setTitle: [[aMenu title] stringByReplacingRange:aRange with:appName]]; - - enumerator = [[aMenu itemArray] objectEnumerator]; - while ((menuItem = [enumerator nextObject])) - { - aRange = [[menuItem title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [menuItem setTitle: [[menuItem title] stringByReplacingRange:aRange with:appName]]; - if ([menuItem hasSubmenu]) - [self fixMenu:[menuItem submenu] withAppName:appName]; - } -} - -#else - -static void setApplicationMenu(void) -{ - /* warning: this code is very odd */ - NSMenu *appleMenu; - NSMenuItem *menuItem; - NSString *title; - NSString *appName; - - appName = getApplicationName(); - appleMenu = [[NSMenu alloc] initWithTitle:@""]; - - /* Add menu items */ - title = [@"About " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(orderFrontStandardAboutPanel:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Hide " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(hide:) keyEquivalent:@"h"]; - - menuItem = (NSMenuItem *)[appleMenu addItemWithTitle:@"Hide Others" action:@selector(hideOtherApplications:) keyEquivalent:@"h"]; - [menuItem setKeyEquivalentModifierMask:(NSAlternateKeyMask|NSCommandKeyMask)]; - - [appleMenu addItemWithTitle:@"Show All" action:@selector(unhideAllApplications:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Quit " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(terminate:) keyEquivalent:@"q"]; - - - /* Put menu into the menubar */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"" action:nil keyEquivalent:@""]; - [menuItem setSubmenu:appleMenu]; - [[NSApp mainMenu] addItem:menuItem]; - - /* Tell the application object that this is now the application menu */ - [NSApp setAppleMenu:appleMenu]; - - /* Finally give up our references to the objects */ - [appleMenu release]; - [menuItem release]; -} - -/* Create a window menu */ -static void setupWindowMenu(void) -{ - NSMenu *windowMenu; - NSMenuItem *windowMenuItem; - NSMenuItem *menuItem; - - windowMenu = [[NSMenu alloc] initWithTitle:@"Window"]; - - /* "Minimize" item */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"Minimize" action:@selector(performMiniaturize:) keyEquivalent:@"m"]; - [windowMenu addItem:menuItem]; - [menuItem release]; - - /* Put menu into the menubar */ - windowMenuItem = [[NSMenuItem alloc] initWithTitle:@"Window" action:nil keyEquivalent:@""]; - [windowMenuItem setSubmenu:windowMenu]; - [[NSApp mainMenu] addItem:windowMenuItem]; - - /* Tell the application object that this is now the window menu */ - [NSApp setWindowsMenu:windowMenu]; - - /* Finally give up our references to the objects */ - [windowMenu release]; - [windowMenuItem release]; -} - -/* Replacement for NSApplicationMain */ -static void CustomApplicationMain (int argc, char **argv) -{ - NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; - SDLMain *sdlMain; - - /* Ensure the application object is initialised */ - [NSApplication sharedApplication]; - -#ifdef SDL_USE_CPS - { - CPSProcessSerNum PSN; - /* Tell the dock about us */ - if (!CPSGetCurrentProcess(&PSN)) - if (!CPSEnableForegroundOperation(&PSN,0x03,0x3C,0x2C,0x1103)) - if (!CPSSetFrontProcess(&PSN)) - [NSApplication sharedApplication]; - } -#endif /* SDL_USE_CPS */ - - /* Set up the menubar */ - [NSApp setMainMenu:[[[NSMenu alloc] init] autorelease]]; - setApplicationMenu(); - setupWindowMenu(); - - /* Create SDLMain and make it the app delegate */ - sdlMain = [[SDLMain alloc] init]; - [NSApp setDelegate:sdlMain]; - - /* Start the main event loop */ - [NSApp run]; - - [sdlMain release]; - [pool release]; -} - -#endif - - -/* - * Catch document open requests...this lets us notice files when the app - * was launched by double-clicking a document, or when a document was - * dragged/dropped on the app's icon. You need to have a - * CFBundleDocumentsType section in your Info.plist to get this message, - * apparently. - * - * Files are added to gArgv, so to the app, they'll look like command line - * arguments. Previously, apps launched from the finder had nothing but - * an argv[0]. - * - * This message may be received multiple times to open several docs on launch. - * - * This message is ignored once the app's mainline has been called. - */ -- (BOOL)application:(NSApplication *)theApplication openFile:(NSString *)filename -{ - const char *temparg; - size_t arglen; - char *arg; - char **newargv; - - if (!gFinderLaunch) /* MacOS is passing command line args. */ - return FALSE; - - if (gCalledAppMainline) /* app has started, ignore this document. */ - return FALSE; - - temparg = [filename UTF8String]; - arglen = SDL_strlen(temparg) + 1; - arg = (char *) SDL_malloc(arglen); - if (arg == NULL) - return FALSE; - - newargv = (char **) realloc(gArgv, sizeof (char *) * (gArgc + 2)); - if (newargv == NULL) - { - SDL_free(arg); - return FALSE; - } - gArgv = newargv; - - SDL_strlcpy(arg, temparg, arglen); - gArgv[gArgc++] = arg; - gArgv[gArgc] = NULL; - return TRUE; -} - - -/* Called when the internal event loop has just started running */ -- (void) applicationDidFinishLaunching: (NSNotification *) note -{ - int status; - - /* Set the working directory to the .app's parent directory */ - [self setupWorkingDirectory:gFinderLaunch]; - -#if SDL_USE_NIB_FILE - /* Set the main menu to contain the real app name instead of "SDL App" */ - [self fixMenu:[NSApp mainMenu] withAppName:getApplicationName()]; -#endif - - /* Hand off to main application code */ - gCalledAppMainline = TRUE; - status = SDL_main (gArgc, gArgv); - - /* We're done, thank you for playing */ - exit(status); -} -@end - - -@implementation NSString (ReplaceSubString) - -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString -{ - unsigned int bufferSize; - unsigned int selfLen = [self length]; - unsigned int aStringLen = [aString length]; - unichar *buffer; - NSRange localRange; - NSString *result; - - bufferSize = selfLen + aStringLen - aRange.length; - buffer = (unichar *)NSAllocateMemoryPages(bufferSize*sizeof(unichar)); - - /* Get first part into buffer */ - localRange.location = 0; - localRange.length = aRange.location; - [self getCharacters:buffer range:localRange]; - - /* Get middle part into buffer */ - localRange.location = 0; - localRange.length = aStringLen; - [aString getCharacters:(buffer+aRange.location) range:localRange]; - - /* Get last part into buffer */ - localRange.location = aRange.location + aRange.length; - localRange.length = selfLen - localRange.location; - [self getCharacters:(buffer+aRange.location+aStringLen) range:localRange]; - - /* Build output string */ - result = [NSString stringWithCharacters:buffer length:bufferSize]; - - NSDeallocateMemoryPages(buffer, bufferSize); - - return result; -} - -@end - - - -#ifdef main -# undef main -#endif - - -/* Main entry point to executable - should *not* be SDL_main! */ -int main (int argc, char **argv) -{ - /* Copy the arguments into a global variable */ - /* This is passed if we are launched by double-clicking */ - if ( argc >= 2 && strncmp (argv[1], "-psn", 4) == 0 ) { - gArgv = (char **) SDL_malloc(sizeof (char *) * 2); - gArgv[0] = argv[0]; - gArgv[1] = NULL; - gArgc = 1; - gFinderLaunch = YES; - } else { - int i; - gArgc = argc; - gArgv = (char **) SDL_malloc(sizeof (char *) * (argc+1)); - for (i = 0; i <= argc; i++) - gArgv[i] = argv[i]; - gFinderLaunch = NO; - } - -#if SDL_USE_NIB_FILE - NSApplicationMain (argc, argv); -#else - CustomApplicationMain (argc, argv); -#endif - return 0; -} - diff --git a/SheepShaver/src/SDL/audio_sdl.cpp b/SheepShaver/src/SDL/audio_sdl.cpp deleted file mode 100644 index 921beb4c1..000000000 --- a/SheepShaver/src/SDL/audio_sdl.cpp +++ /dev/null @@ -1,344 +0,0 @@ -/* - * audio_sdl.cpp - Audio support, SDL implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#include -#include - -#define DEBUG 0 -#include "debug.h" - -#if defined(BINCUE) -#include "bincue_unix.h" -#endif - - -#define MAC_MAX_VOLUME 0x0100 - -// The currently selected audio parameters (indices in audio_sample_rates[] etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Global variables -static SDL_sem *audio_irq_done_sem = NULL; // Signal from interrupt to streaming thread: data block read -static uint8 silence_byte; // Byte value to use to fill sound buffers with silence -static uint8 *audio_mix_buf = NULL; -static int audio_volume = SDL_MIX_MAXVOLUME; -static bool audio_mute = false; - -// Prototypes -static void stream_func(void *arg, uint8 *stream, int stream_len); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; -} - -// Init SDL audio system -static bool open_sdl_audio(void) -{ - // SDL supports a variety of twisted little audio formats, all different - if (audio_sample_sizes.empty()) { - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - SDL_AudioSpec audio_spec; - audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; - audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; - audio_spec.channels = audio_channel_counts[audio_channel_count_index]; - audio_spec.samples = 4096; - audio_spec.callback = stream_func; - audio_spec.userdata = NULL; - - // Open the audio device, forcing the desired format - if (SDL_OpenAudio(&audio_spec, NULL) < 0) { - fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); - return false; - } - -#if defined(BINCUE) - OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, - audio_spec.silence); -#endif - - char driver_name[32]; - printf("Using SDL/%s audio output\n", SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1)); - silence_byte = audio_spec.silence; - SDL_PauseAudio(0); - - // Sound buffer size = 4096 frames - audio_frames_per_block = audio_spec.samples; - audio_mix_buf = (uint8*)malloc(audio_spec.size); - return true; -} - -static bool open_audio(void) -{ - // Try to open SDL audio - if (!open_sdl_audio()) { - WarningAlert(GetString(STR_NO_AUDIO_WARN)); - return false; - } - - // Device opened, set AudioStatus - set_audio_status_format(); - - // Everything went fine - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Init audio status and feature flags - AudioStatus.sample_rate = 44100 << 16; - AudioStatus.sample_size = 16; - AudioStatus.channels = 2; - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - audio_irq_done_sem = SDL_CreateSemaphore(0); - - // Open and initialize audio device - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - // Close audio device - SDL_CloseAudio(); - free(audio_mix_buf); - audio_mix_buf = NULL; - audio_open = false; -} - -void AudioExit(void) -{ - // Close audio device - close_audio(); - - // Delete semaphore - if (audio_irq_done_sem) - SDL_DestroySemaphore(audio_irq_done_sem); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ -} - - -/* - * Streaming function - */ - -static void stream_func(void *arg, uint8 *stream, int stream_len) -{ - if (AudioStatus.num_sources) { - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - SDL_SemWait(audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info && !audio_mute) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > stream_len) - work_size = stream_len; - if (work_size == 0) - goto silence; - - // Send data to audio device - Mac2Host_memcpy(audio_mix_buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - memset((uint8 *)stream, silence_byte, stream_len); - SDL_MixAudio(stream, audio_mix_buf, work_size, audio_volume); - - D(bug("stream: data written\n")); - - } else - goto silence; - - } else { - - // Audio not active, play silence -silence: memset(stream, silence_byte, stream_len); - } -#if defined(BINCUE) - MixAudio_bincue(stream, stream_len); -#endif -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - SDL_SemPost(audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. vectors - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - close_audio(); - audio_sample_rate_index = index; - return open_audio(); -} - -bool audio_set_sample_size(int index) -{ - close_audio(); - audio_sample_size_index = index; - return open_audio(); -} - -bool audio_set_channels(int index) -{ - close_audio(); - audio_channel_count_index = index; - return open_audio(); -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - return audio_mute; -} - -uint32 audio_get_main_volume(void) -{ - uint32 chan = (audio_volume * MAC_MAX_VOLUME / SDL_MIX_MAXVOLUME); - return (chan << 16) + chan; -} - -bool audio_get_speaker_mute(void) -{ - return audio_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - return audio_get_main_volume(); -} - -void audio_set_main_mute(bool mute) -{ - audio_mute = mute; -} - -void audio_set_main_volume(uint32 vol) -{ - // We only have one-channel volume right now. - uint32 avg = ((vol >> 16) + (vol & 0xffff)) / 2; - if (avg > MAC_MAX_VOLUME) - avg = MAC_MAX_VOLUME; - audio_volume = avg * SDL_MIX_MAXVOLUME / MAC_MAX_VOLUME; -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ -} diff --git a/SheepShaver/src/SDL/keycodes b/SheepShaver/src/SDL/keycodes deleted file mode 100644 index da9185603..000000000 --- a/SheepShaver/src/SDL/keycodes +++ /dev/null @@ -1,464 +0,0 @@ -# /usr/share/BasiliskII/keycodes -# -# Basilisk II (C) 1997-2005 Christian Bauer -# -# This file is used to translate the (server-specific) scancodes to -# Mac keycodes depending on the window server being used. -# -# The format of this file is as follows: -# -# sdl -# -# -# -# ... -# sdl -# -# -# ... -# -# The "driver string" must match the first part of the SDL driver vendor -# description as reported by SDL_VideoDriverName(). If a match is found, -# the keycode translation table is constructed from the following -# lines. Each line contains an SDL scancode followed by its associated -# Mac keycode. Both keycodes have to be given in decimal. Lines -# beginning with "#" or ";" are treated as comments and ignored. -# - -# -# X11 server -# -sdl x11 -sdl dga -9 53 # Esc -67 122 # F1 -68 120 # F2 -69 99 # F3 -70 118 # F4 -71 96 # F5 -72 97 # F6 -73 98 # F7 -74 100 # F8 -75 101 # F9 -76 109 # F10 -95 103 # F11 -96 111 # F12 -111 105 # PrintScrn -78 107 # Scroll Lock -110 113 # Pause -49 50 # ` -10 18 # 1 -11 19 # 2 -12 20 # 3 -13 21 # 4 -14 23 # 5 -15 22 # 6 -16 26 # 7 -17 28 # 8 -18 25 # 9 -19 29 # 0 -20 27 # - -21 24 # = -22 51 # Backspace -106 114 # Insert -97 115 # Home -99 116 # Page Up -77 71 # Num Lock -112 75 # KP / -63 67 # KP * -82 78 # KP - -23 48 # Tab -24 12 # Q -25 13 # W -26 14 # E -27 15 # R -28 17 # T -29 16 # Y -30 32 # U -31 34 # I -32 31 # O -33 35 # P -34 33 # [ -35 30 # ] -36 36 # Return -107 117 # Delete -103 119 # End -105 121 # Page Down -79 89 # KP 7 -80 91 # KP 8 -81 92 # KP 9 -86 69 # KP + -66 57 # Caps Lock -38 0 # A -39 1 # S -40 2 # D -41 3 # F -42 5 # G -43 4 # H -44 38 # J -45 40 # K -46 37 # L -47 41 # ; -48 39 # ' -83 86 # KP 4 -84 87 # KP 5 -85 88 # KP 6 -50 56 # Shift Left -94 50 # International -52 6 # Z -53 7 # X -54 8 # C -55 9 # V -56 11 # B -57 45 # N -58 46 # M -59 43 # , -60 47 # . -61 44 # / -62 56 # Shift Right -51 42 # \ -98 62 # Cursor Up -87 83 # KP 1 -88 84 # KP 2 -89 85 # KP 3 -108 76 # KP Enter -37 54 # Ctrl Left -115 58 # Logo Left (-> Option) -64 55 # Alt Left (-> Command) -65 49 # Space -113 55 # Alt Right (-> Command) -116 58 # Logo Right (-> Option) -117 50 # Menu (-> International) -109 54 # Ctrl Right -100 59 # Cursor Left -104 61 # Cursor Down -102 60 # Cursor Right -90 82 # KP 0 -91 65 # KP . - -# -# Linux Framebuffer Console -# -sdl fbcon -1 53 # Esc -59 122 # F1 -60 120 # F2 -61 99 # F3 -62 118 # F4 -63 96 # F5 -64 97 # F6 -65 98 # F7 -66 100 # F8 -67 101 # F9 -68 109 # F10 -87 103 # F11 -88 111 # F12 -99 105 # PrintScrn -70 107 # Scroll Lock -119 113 # Pause -41 50 # ` -2 18 # 1 -3 19 # 2 -4 20 # 3 -5 21 # 4 -6 23 # 5 -7 22 # 6 -8 26 # 7 -9 28 # 8 -10 25 # 9 -11 29 # 0 -12 27 # - -13 24 # = -14 51 # Backspace -110 114 # Insert -102 115 # Home -104 116 # Page Up -69 71 # Num Lock -98 75 # KP / -55 67 # KP * -74 78 # KP - -15 48 # Tab -16 12 # Q -17 13 # W -18 14 # E -19 15 # R -20 17 # T -21 16 # Y -22 32 # U -23 34 # I -24 31 # O -25 35 # P -26 33 # [ -27 30 # ] -28 36 # Return -111 117 # Delete -107 119 # End -109 121 # Page Down -71 89 # KP 7 -72 91 # KP 8 -73 92 # KP 9 -78 69 # KP + -58 57 # Caps Lock -30 0 # A -31 1 # S -32 2 # D -33 3 # F -34 5 # G -35 4 # H -36 38 # J -37 40 # K -38 37 # L -39 41 # ; -40 39 # ' -75 86 # KP 4 -76 87 # KP 5 -77 88 # KP 6 -42 56 # Shift Left -86 50 # International -44 6 # Z -45 7 # X -46 8 # C -47 9 # V -48 11 # B -49 45 # N -50 46 # M -51 43 # , -52 47 # . -53 44 # / -54 56 # Shift Right -43 42 # \ -103 62 # Cursor Up -79 83 # KP 1 -80 84 # KP 2 -81 85 # KP 3 -96 76 # KP Enter -29 54 # Ctrl Left -125 58 # Logo Left (-> Option) -56 55 # Alt Left (-> Command) -57 49 # Space -100 55 # Alt Right (-> Command) -126 58 # Logo Right (-> Option) -97 54 # Ctrl Right -105 59 # Cursor Left -108 61 # Cursor Down -106 60 # Cursor Right -82 82 # KP 0 -83 65 # KP . - -# -# Quartz (1:1 translation actually) -# -sdl Quartz -53 53 # Esc -122 122 # F1 -120 120 # F2 -99 99 # F3 -118 118 # F4 -96 96 # F5 -97 97 # F6 -98 98 # F7 -100 100 # F8 -101 101 # F9 -109 109 # F10 -103 103 # F11 -111 111 # F12 -105 105 # F13/PrintScrn -107 107 # F14/Scroll Lock -113 113 # F15/Pause -10 10 # ` -18 18 # 1 -19 19 # 2 -20 20 # 3 -21 21 # 4 -23 23 # 5 -22 22 # 6 -26 26 # 7 -28 28 # 8 -25 25 # 9 -29 29 # 0 -27 27 # - -24 24 # = -51 51 # Backspace -114 114 # Help/Insert -115 115 # Home -116 116 # Page Up -71 71 # Num Lock -81 81 # KP = -75 75 # KP / -67 67 # KP * -48 48 # Tab -12 12 # Q -13 13 # W -14 14 # E -15 15 # R -17 17 # T -16 16 # Y -32 32 # U -34 34 # I -31 31 # O -35 35 # P -33 33 # [ -30 30 # ] -36 36 # Return -117 117 # Delete -119 119 # End -121 121 # Page Down -89 89 # KP 7 -91 91 # KP 8 -92 92 # KP 9 -78 78 # KP - -57 57 # Caps Lock -0 0 # A -1 1 # S -2 2 # D -3 3 # F -5 5 # G -4 4 # H -38 38 # J -40 40 # K -37 37 # L -41 41 # ; -39 39 # ' -42 42 # \ -86 86 # KP 4 -87 87 # KP 5 -88 88 # KP 6 -69 69 # KP + -56 56 # Shift -50 50 # International -6 6 # Z -7 7 # X -8 8 # C -9 9 # V -11 11 # B -45 45 # N -46 46 # M -43 43 # , -47 47 # . -44 44 # / -126 62 # Cursor Up -123 59 # Cursor Left -125 61 # Cursor Down -124 60 # Cursor Right -83 83 # KP 1 -84 84 # KP 2 -85 85 # KP 3 -76 76 # KP Enter -54 54 # Ctrl -58 58 # Option -55 55 # Command -54 54 # Ctrl Left -49 49 # Space -82 82 # KP 0 -65 65 # KP . - -# -# Windows -# -sdl windib -sdl directx -1 53 # Esc -59 122 # F1 -60 120 # F2 -61 99 # F3 -62 118 # F4 -63 96 # F5 -64 97 # F6 -65 98 # F7 -66 100 # F8 -67 101 # F9 -68 109 # F10 -87 103 # F11 -88 111 # F12 -183 105 # PrintScrn -70 107 # Scroll Lock -197 113 # Pause -41 50 # ` -2 18 # 1 -3 19 # 2 -4 20 # 3 -5 21 # 4 -6 23 # 5 -7 22 # 6 -8 26 # 7 -9 28 # 8 -10 25 # 9 -11 29 # 0 -12 27 # - -13 24 # = -14 51 # Backspace -210 114 # Insert -199 115 # Home -201 116 # Page Up -69 71 # Num Lock -181 75 # KP / -55 67 # KP * -74 78 # KP - -15 48 # Tab -16 12 # Q -17 13 # W -18 14 # E -19 15 # R -20 17 # T -21 16 # Y -22 32 # U -23 34 # I -24 31 # O -25 35 # P -26 33 # [ -27 30 # ] -28 36 # Return -211 117 # Delete -207 119 # End -209 121 # Page Down -71 89 # KP 7 -72 91 # KP 8 -73 92 # KP 9 -78 69 # KP + -58 57 # Caps Lock -30 0 # A -31 1 # S -32 2 # D -33 3 # F -34 5 # G -35 4 # H -36 38 # J -37 40 # K -38 37 # L -39 41 # ; -40 39 # ' -75 86 # KP 4 -76 87 # KP 5 -77 88 # KP 6 -42 56 # Shift Left -86 50 # International -44 6 # Z -45 7 # X -46 8 # C -47 9 # V -48 11 # B -49 45 # N -50 46 # M -51 43 # , -52 47 # . -53 44 # / -54 56 # Shift Right -43 42 # \ -200 62 # Cursor Up -79 83 # KP 1 -80 84 # KP 2 -81 85 # KP 3 -156 76 # KP Enter -29 54 # Ctrl Left -219 58 # Logo Left (-> Option) -56 55 # Alt Left (-> Command) -57 49 # Space -184 55 # Alt Right (-> Command) -220 58 # Logo Right (-> Option) -221 50 # Menu (-> International) -157 54 # Ctrl Right -203 59 # Cursor Left -208 61 # Cursor Down -205 60 # Cursor Right -82 82 # KP 0 -83 65 # KP . diff --git a/SheepShaver/src/SDL/video_sdl.cpp b/SheepShaver/src/SDL/video_sdl.cpp deleted file mode 100644 index 9782c7461..000000000 --- a/SheepShaver/src/SDL/video_sdl.cpp +++ /dev/null @@ -1,2271 +0,0 @@ -/* - * video_sdl.cpp - Video/graphics emulation, SDL specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode (TODO) - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - * - * FIXMEs and TODOs: - * - Windows requires an extra mouse event to update the actual cursor image? - * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux - * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) - * - Mouse acceleration, there is no API in SDL yet for that - * - Force relative mode in Grab mode even if SDL provides absolute coordinates? - * - Gamma tables support is likely to be broken here - * - Events processing is bound to the general emulation thread as SDL requires - * to PumpEvents() within the same thread as the one that called SetVideoMode(). - * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. - * - Backport hw cursor acceleration to Basilisk II? - * - Factor out code - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include - -#ifdef WIN32 -#include /* alloca() */ -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" -#include "vm_alloc.h" - -#define DEBUG 0 -#include "debug.h" - -// Supported video modes -using std::vector; -static vector VideoModes; - -// Display types -#ifdef SHEEPSHAVER -enum { - DISPLAY_WINDOW = DIS_WINDOW, // windowed display - DISPLAY_SCREEN = DIS_SCREEN // fullscreen display -}; -extern int display_type; // See enum above -#else -enum { - DISPLAY_WINDOW, // windowed display - DISPLAY_SCREEN // fullscreen display -}; -static int display_type = DISPLAY_WINDOW; // See enum above -#endif - -// Constants -#ifdef WIN32 -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; -#else -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -#endif - - -// Global variables -static uint32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; - -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifndef USE_CPU_EMUL_SERVICES -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static SDL_Thread *redraw_thread = NULL; // Redraw thread -static volatile bool thread_stop_req = false; -static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req -#endif - -#ifdef ENABLE_VOSF -static bool use_vosf = false; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// SDL variables -static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor; // Copy of Mac cursor -static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table -static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors -static bool toggle_fullscreen = false; -static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; - -static bool mouse_grabbed = false; -static bool mouse_grabbed_window_name_status = false; - -// Mutex to protect SDL events -static SDL_mutex *sdl_events_lock = NULL; -#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) -#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) - -// Mutex to protect palette -static SDL_mutex *sdl_palette_lock = NULL; -#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) -#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) - -// Mutex to protect frame buffer -static SDL_mutex *frame_buffer_lock = NULL; -#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static int redraw_func(void *arg); - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - - -/* - * SDL surface locking glue - */ - -#ifdef ENABLE_VOSF -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ - the_host_buffer = (uint8 *)(SURFACE)->pixels; \ -} while (0) -#else -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) -#endif - -#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) { \ - SDL_LockSurface(SURFACE); \ - SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ - } \ -} while (0) - -#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_UnlockSurface(SURFACE); \ -} while (0) - - -/* - * Framebuffer allocation routines - */ - -static void *vm_acquire_framebuffer(uint32 size) -{ - // always try to reallocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { -// if (vm_acquire_fixed(fb, size) < 0) { -#ifndef SHEEPSHAVER - printf("FATAL: Could not reallocate framebuffer at previous address\n"); -#endif - fb = VM_MAP_FAILED; -// } - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ - vm_release(fb, size); -} - -static inline int get_customized_color_depth(int default_depth) -{ - int display_color_depth = PrefsFindInt32("displaycolordepth"); - - D(bug("Get displaycolordepth %d\n", display_color_depth)); - - if(0 == display_color_depth) - return default_depth; - else{ - switch (display_color_depth) { - case 8: - return VIDEO_DEPTH_8BIT; - case 15: case 16: - return VIDEO_DEPTH_16BIT; - case 24: case 32: - return VIDEO_DEPTH_32BIT; - default: - return default_depth; - } - } -} - -/* - * Windows message handler - */ - -#ifdef WIN32 -#include -static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL - -extern void SysMediaArrived(void); -extern void SysMediaRemoved(void); -extern HWND GetMainWindowHandle(void); - -static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) -{ - switch (msg) { - case WM_DEVICECHANGE: - if (wParam == DBT_DEVICEREMOVECOMPLETE) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaRemoved(); - } - else if (wParam == DBT_DEVICEARRIVAL) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaArrived(); - } - return 0; - - default: - if (sdl_window_proc) - return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); - } - - return DefWindowProc(hwnd, msg, wParam, lParam); -} -#endif - - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -// Color depth modes type -typedef int video_depth; - -// 1, 2, 4 and 8 bit depths use a color palette -static inline bool IsDirectMode(VIDEO_MODE const & mode) -{ - return IsDirectMode(mode.viAppleMode); -} - -// Abstract base class representing one (possibly virtual) monitor -// ("monitor" = rectangular display with a contiguous frame buffer) -class monitor_desc { -public: - monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} - virtual ~monitor_desc() {} - - // Get current Mac frame buffer base address - uint32 get_mac_frame_base(void) const {return screen_base;} - - // Set Mac frame buffer base address (called from switch_to_mode()) - void set_mac_frame_base(uint32 base) {screen_base = base;} - - // Get current video mode - const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} - - // Called by the video driver to switch the video mode on this display - // (must call set_mac_frame_base()) - virtual void switch_to_current_mode(void) = 0; - - // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) - virtual void set_palette(uint8 *pal, int num) = 0; -}; - -// Vector of pointers to available monitor descriptions, filled by VideoInit() -static vector VideoMonitors; - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - if (xsize == 640 && ysize == 480) - return APPLE_640x480; - if (xsize == 800 && ysize == 600) - return APPLE_800x600; - if (xsize == 1024 && ysize == 768) - return APPLE_1024x768; - if (xsize == 1152 && ysize == 768) - return APPLE_1152x768; - if (xsize == 1152 && ysize == 900) - return APPLE_1152x900; - if (xsize == 1280 && ysize == 1024) - return APPLE_1280x1024; - if (xsize == 1600 && ysize == 1200) - return APPLE_1600x1200; - return APPLE_CUSTOM; -} - -// Display error alert -static void ErrorAlert(int error) -{ - ErrorAlert(GetString(error)); -} -#endif - - -/* - * monitor_desc subclass for SDL display - */ - -class SDL_monitor_desc : public monitor_desc { -public: - SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~SDL_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case VIDEO_DEPTH_1BIT: return 2; - case VIDEO_DEPTH_2BIT: return 4; - case VIDEO_DEPTH_4BIT: return 16; - case VIDEO_DEPTH_8BIT: return 256; - case VIDEO_DEPTH_16BIT: return 32; - case VIDEO_DEPTH_32BIT: return 256; - default: return 0; - } -} - -// Map video_mode depth ID to numerical depth value -static int mac_depth_of_video_depth(int video_depth) -{ - int depth = -1; - switch (video_depth) { - case VIDEO_DEPTH_1BIT: - depth = 1; - break; - case VIDEO_DEPTH_2BIT: - depth = 2; - break; - case VIDEO_DEPTH_4BIT: - depth = 4; - break; - case VIDEO_DEPTH_8BIT: - depth = 8; - break; - case VIDEO_DEPTH_16BIT: - depth = 16; - break; - case VIDEO_DEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map video_mode depth ID to SDL screen depth -static int sdl_depth_of_video_depth(int video_depth) -{ - return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); -} - -// Get screen dimensions -static void sdl_display_dimensions(int &width, int &height) -{ - static int max_width, max_height; - if (max_width == 0 && max_height == 0) { - max_width = 640 ; max_height = 480; - SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); - if (modes && modes != (SDL_Rect **)-1) { - // It turns out that on some implementations, and contrary to the documentation, - // the returned list is not sorted from largest to smallest (e.g. Windows) - for (int i = 0; modes[i] != NULL; i++) { - const int w = modes[i]->w; - const int h = modes[i]->h; - if (w > max_width && h > max_height) { - max_width = w; - max_height = h; - } - } - } - } - width = max_width; - height = max_height; -} - -static inline int sdl_display_width(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return width; -} - -static inline int sdl_display_height(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return height; -} - -// Check wether specified mode is available -static bool has_mode(int type, int width, int height, int depth) -{ -#ifdef SHEEPSHAVER - // Filter out Classic resolutions - if (width == 512 && height == 384) - return false; -#endif - - // Filter out out-of-bounds resolutions - if (width > sdl_display_width() || height > sdl_display_height()) - return false; - - // Rely on SDL capabilities - return SDL_VideoModeOK(width, height, - sdl_depth_of_video_depth(depth), - SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; -} - -// Add mode to list of supported modes -static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) -{ - // Filter out unsupported modes - if (!has_mode(type, width, height, depth)) - return; - - // Fill in VideoMode entry - VIDEO_MODE mode; -#ifdef SHEEPSHAVER - resolution_id = find_apple_resolution(width, height); - mode.viType = type; -#endif - VIDEO_MODE_X = width; - VIDEO_MODE_Y = height; - VIDEO_MODE_RESOLUTION = resolution_id; - VIDEO_MODE_ROW_BYTES = bytes_per_row; - VIDEO_MODE_DEPTH = (video_depth)depth; - VideoModes.push_back(mode); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VIDEO_DEPTH_16BIT) - layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VIDEO_DEPTH_32BIT) - layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - MacFrameLayout = layout; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name(int name) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - if (vi && vi->wm_available) { - const char *str = GetString(name); - SDL_WM_SetCaption(str, str); - } -} - -// Set mouse grab mode -static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); -} - -// Migrate preferences items (XXX to be handled in MigratePrefs()) -static void migrate_screen_prefs(void) -{ -#ifdef SHEEPSHAVER - // Look-up priorities are: "screen", "screenmodes", "windowmodes". - if (PrefsFindString("screen")) - return; - - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - int width = 0, height = 0; - if (screen_modes) { - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (width < modes[i].width && height < modes[i].height) { - width = modes[i].width; - height = modes[i].height; - } - } - } - } else { - if (window_modes & 1) - width = 640, height = 480; - if (window_modes & 2) - width = 800, height = 600; - } - if (width && height) { - char str[32]; - sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); - PrefsReplaceString("screen", str); - } -#endif -} - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(SDL_monitor_desc &m); - ~driver_base(); - - void init(); // One-time init - void set_video_mode(int flags); - void adapt_to_video_mode(); - - void update_palette(void); - void suspend(void) {} - void resume(void) {} - void toggle_mouse_grab(void); - void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - void grab_mouse(void); - void ungrab_mouse(void); - -public: - SDL_monitor_desc &monitor; // Associated video monitor - const VIDEO_MODE &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - SDL_Surface *s; // The surface we draw into -}; - -#ifdef ENABLE_VOSF -static void update_display_window_vosf(driver_base *drv); -#endif -static void update_display_static(driver_base *drv); - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(SDL_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) -{ - the_buffer = NULL; - the_buffer_copy = NULL; -} - -void driver_base::set_video_mode(int flags) -{ - int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, - SDL_HWSURFACE | flags)) == NULL) - return; -#ifdef ENABLE_VOSF - the_host_buffer = (uint8 *)s->pixels; -#endif -} - -void driver_base::init() -{ - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - int aligned_height = (VIDEO_MODE_Y + 15) & ~15; - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - - // Check whether we can initialize the VOSF subsystem and it's profitable - if (!video_vosf_init(monitor)) { - WarningAlert(GetString(STR_VOSF_INIT_ERR)); - use_vosf = false; - } - else if (!video_vosf_profitable()) { - video_vosf_exit(); - printf("VOSF acceleration is not profitable on this platform, disabling it\n"); - use_vosf = false; - } - if (!use_vosf) { - free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); - the_host_buffer = NULL; - } -#endif - if (!use_vosf) { - // Allocate memory for frame buffer - the_buffer_size = (aligned_height + 2) * s->pitch; - the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); - } - - // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); - - adapt_to_video_mode(); -} - -void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(false); - - // Init blitting routines - SDL_PixelFormat *f = s->format; - VisualFormat visualFormat; - visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - visualFormat.Rmask = f->Rmask; - visualFormat.Gmask = f->Gmask; - visualFormat.Bmask = f->Bmask; - Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); - - // Load gray ramp to 8->16/32 expand map - if (!IsDirectMode(mode)) - for (int i=0; i<256; i++) - ExpandMap[i] = SDL_MapRGB(f, i, i, i); - - - bool hardware_cursor = false; -#ifdef SHEEPSHAVER - hardware_cursor = video_can_change_cursor(); - if (hardware_cursor) { - // Create cursor - if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { - SDL_SetCursor(sdl_cursor); - } - } - // Tell the video driver there's a change in cursor type - if (private_data) - private_data->cursorHardware = hardware_cursor; -#endif - // Hide cursor - SDL_ShowCursor(hardware_cursor); - - // Set window name/class - set_window_name(STR_WINDOW_TITLE); - - // Everything went well - init_ok = true; -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - if (s) - SDL_FreeSurface(s); - - // the_buffer shall always be mapped through vm_acquire_framebuffer() - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - SDL_ShowCursor(1); -} - -// Palette has changed -void driver_base::update_palette(void) -{ - const VIDEO_MODE &mode = monitor.get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) - SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ -} - -// Toggle mouse grab -void driver_base::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -// Grab mouse, switch to relative mouse mode -void driver_base::grab_mouse(void) -{ - if (!mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); - if (new_mode == SDL_GRAB_ON) { - disable_mouse_accel(); - mouse_grabbed = true; - } - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_base::ungrab_mouse(void) -{ - if (mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); - if (new_mode == SDL_GRAB_OFF) { - restore_mouse_accel(); - mouse_grabbed = false; - } - } -} - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - char video_driver[256]; - SDL_VideoDriverName(video_driver, sizeof(video_driver)); - bool video_driver_found = false; - char line[256]; - int n_keys = 0; - while (fgets(line, sizeof(line) - 1, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (video_driver_found) { - // Skip aliases as long as we have read keycodes yet - // Otherwise, it's another mapping and we have to stop - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) - continue; - - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code, n_keys++; - else - break; - } else { - // Search for SDL video driver string - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { - char *p = line + sizeof(sdl_str); - if (strstr(video_driver, p) == video_driver) - video_driver_found = true; - } - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = video_driver_found; - - // Vendor not found? Then display warning - if (!video_driver_found) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); - } -} - -// Open display for current mode -bool SDL_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); -#if DEBUG - const VIDEO_MODE &mode = get_current_mode(); - D(bug("Current video mode:\n")); - D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); -#endif - - // Create display driver object of requested type - drv = new(std::nothrow) driver_base(*this); - if (drv == NULL) - return false; - drv->init(); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef WIN32 - // Chain in a new message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifndef USE_CPU_EMUL_SERVICES - redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - return true; -} - -#ifdef SHEEPSHAVER -bool VideoInit(void) -{ - const bool classic = false; -#else -bool VideoInit(bool classic) -{ -#endif - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Create Mutexes - if ((sdl_events_lock = SDL_CreateMutex()) == NULL) - return false; - if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) - return false; - if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) - return false; - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Get screen mode from preferences - migrate_screen_prefs(); - const char *mode_str = NULL; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width, default_height; - if (classic) { - default_width = 512; - default_height = 384; - } - else { - default_width = 640; - default_height = 480; - } - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_SCREEN; - } - if (default_width <= 0) - default_width = sdl_display_width(); - else if (default_width > sdl_display_width()) - default_width = sdl_display_width(); - if (default_height <= 0) - default_height = sdl_display_height(); - else if (default_height > sdl_display_height()) - default_height = sdl_display_height(); - - // Mac screen depth follows X depth - screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; - int default_depth; - switch (screen_depth) { - case 8: - default_depth = VIDEO_DEPTH_8BIT; - break; - case 15: case 16: - default_depth = VIDEO_DEPTH_16BIT; - break; - case 24: case 32: - default_depth = VIDEO_DEPTH_32BIT; - break; - default: - default_depth = VIDEO_DEPTH_1BIT; - break; - } - - // Initialize list of video modes to try - struct { - int w; - int h; - int resolution_id; - } - video_modes[] = { - { -1, -1, 0x80 }, - { 512, 384, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; - video_modes[0].w = default_width; - video_modes[0].h = default_height; - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); - else { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - } else if (display_type == DISPLAY_SCREEN) { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - if (w == 512 && h == 384) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - std::vector::const_iterator begin = VideoModes.begin(); - cur_mode = distance(begin, i); -#endif - break; - } - } - if (i == end) { // not found, use first available mode - const VIDEO_MODE & mode = VideoModes[0]; - default_depth = VIDEO_MODE_DEPTH; - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - cur_mode = 0; -#endif - } - -#ifdef SHEEPSHAVER - for (int i = 0; i < VideoModes.size(); i++) - VModes[i] = VideoModes[i]; - VideoInfo *p = &VModes[VideoModes.size()]; - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; -#endif - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - int bits = 1 << VIDEO_MODE_DEPTH; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); - } -#endif - - int color_depth = get_customized_color_depth(default_depth); - - D(bug("Return get_customized_color_depth %d\n", color_depth)); - - // Create SDL_monitor_desc for this (the only) display - SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void SDL_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - -#ifdef WIN32 - // Remove message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); -#endif - - // Stop redraw thread -#ifndef USE_CPU_EMUL_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - SDL_WaitThread(redraw_thread, NULL); - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - D(bug(" frame buffer unlocked\n")); - - // Close display - delete drv; - drv = NULL; -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - - // Destroy locks - if (frame_buffer_lock) - SDL_DestroyMutex(frame_buffer_lock); - if (sdl_palette_lock) - SDL_DestroyMutex(sdl_palette_lock); - if (sdl_events_lock) - SDL_DestroyMutex(sdl_events_lock); -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - -static void do_toggle_fullscreen(void) -{ -#ifndef USE_CPU_EMUL_SERVICES - // pause redraw thread - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; -#endif - - // save the mouse position - int x, y; - SDL_GetMouseState(&x, &y); - - // save the screen contents - SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, - drv->s->flags); - - // switch modes - display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW - : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - drv->adapt_to_video_mode(); - - // reset the palette -#ifdef SHEEPSHAVER - video_set_palette(); -#endif - drv->update_palette(); - - // restore the screen contents - SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); - SDL_FreeSurface(tmp_surface); - SDL_UpdateRect(drv->s, 0, 0, 0, 0); - - // reset the video refresh handler - VideoRefreshInit(); - - // while SetVideoMode is happening, control key up may be missed - ADBKeyUp(0x36); - - // restore the mouse position - SDL_WarpMouse(x, y); - - // resume redraw thread - toggle_fullscreen = false; -#ifndef USE_CPU_EMUL_SERVICES - thread_stop_req = false; -#endif -} - -/* - * Mac VBL interrupt - */ - -/* - * Execute video VBL routine - */ - -#ifdef SHEEPSHAVER -void VideoVBL(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} -#else -void VideoInterrupt(void) -{ - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); - - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} -#endif - - -/* - * Set palette - */ - -#ifdef SHEEPSHAVER -void video_set_palette(void) -{ - monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); - uint8 pal[256 * 3]; - for (int c = 0; c < n_colors; c++) { - pal[c*3 + 0] = mac_pal[c].red; - pal[c*3 + 1] = mac_pal[c].green; - pal[c*3 + 2] = mac_pal[c].blue; - } - monitor->set_palette(pal, n_colors); -} -#endif - -void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - const VIDEO_MODE &mode = get_current_mode(); - - // FIXME: how can we handle the gamma ramp? - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) - return; - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - SDL_Color *p = sdl_palette; - for (int i=0; ir = pal[c*3 + 0] * 0x0101; - p->g = pal[c*3 + 1] * 0x0101; - p->b = pal[c*3 + 2] * 0x0101; - p++; - } - - // Recalculate pixel color expansion map - if (!IsDirectMode(mode)) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - } -#endif - } - - // Tell redraw thread to change palette - sdl_palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Switch video mode - */ - -#ifdef SHEEPSHAVER -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - DisableInterrupt(); - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; - - cur_mode = i; - monitor_desc *monitor = VideoMonitors[0]; - monitor->switch_to_current_mode(); - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - thread_stop_req = false; - EnableInterrupt(); - return noErr; - } - } - return paramErr; -} -#endif - -void SDL_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - LOCK_EVENTS; - video_close(); - video_open(); - UNLOCK_EVENTS; - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -#ifdef SHEEPSHAVER -bool video_can_change_cursor(void) -{ - if (display_type != DISPLAY_WINDOW) - return false; - -#if defined(__APPLE__) - static char driver[] = "Quartz?"; - static int quartzok = -1; - - if (quartzok < 0) { - if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) - quartzok = true; - else { - // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. - const SDL_version *vp = SDL_Linked_Version(); - int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); - quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); - } - } - - return quartzok; -#else - return true; -#endif -} -#endif - - -/* - * Set cursor image for window - */ - -#ifdef SHEEPSHAVER -void video_set_cursor(void) -{ - // Set new cursor image if it was changed - if (sdl_cursor) { - SDL_FreeCursor(sdl_cursor); - sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); - if (sdl_cursor) { - SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); - SDL_SetCursor(sdl_cursor); - - // XXX Windows apparently needs an extra mouse event to - // make the new cursor image visible. - // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the - // mouse, we have to put it back. - bool move = false; -#ifdef WIN32 - move = true; -#elif defined(__APPLE__) - move = mouse_grabbed; -#endif - if (move) { - int visible = SDL_ShowCursor(-1); - if (visible) { - int x, y; - SDL_GetMouseState(&x, &y); - SDL_WarpMouse(x, y); - } - } - } - } -} -#endif - - -/* - * Keyboard-related utilify functions - */ - -static bool is_modifier_key(SDL_KeyboardEvent const & e) -{ - switch (e.keysym.sym) { - case SDLK_NUMLOCK: - case SDLK_CAPSLOCK: - case SDLK_SCROLLOCK: - case SDLK_RSHIFT: - case SDLK_LSHIFT: - case SDLK_RCTRL: - case SDLK_LCTRL: - case SDLK_RALT: - case SDLK_LALT: - case SDLK_RMETA: - case SDLK_LMETA: - case SDLK_LSUPER: - case SDLK_RSUPER: - case SDLK_MODE: - case SDLK_COMPOSE: - return true; - } - return false; -} - -static bool is_ctrl_down(SDL_keysym const & ks) -{ - return ctrl_down || (ks.mod & KMOD_CTRL); -} - - -/* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey - */ - -static int kc_decode(SDL_keysym const & ks, bool key_down) -{ - switch (ks.sym) { - case SDLK_a: return 0x00; - case SDLK_b: return 0x0b; - case SDLK_c: return 0x08; - case SDLK_d: return 0x02; - case SDLK_e: return 0x0e; - case SDLK_f: return 0x03; - case SDLK_g: return 0x05; - case SDLK_h: return 0x04; - case SDLK_i: return 0x22; - case SDLK_j: return 0x26; - case SDLK_k: return 0x28; - case SDLK_l: return 0x25; - case SDLK_m: return 0x2e; - case SDLK_n: return 0x2d; - case SDLK_o: return 0x1f; - case SDLK_p: return 0x23; - case SDLK_q: return 0x0c; - case SDLK_r: return 0x0f; - case SDLK_s: return 0x01; - case SDLK_t: return 0x11; - case SDLK_u: return 0x20; - case SDLK_v: return 0x09; - case SDLK_w: return 0x0d; - case SDLK_x: return 0x07; - case SDLK_y: return 0x10; - case SDLK_z: return 0x06; - - case SDLK_1: case SDLK_EXCLAIM: return 0x12; - case SDLK_2: case SDLK_AT: return 0x13; - case SDLK_3: case SDLK_HASH: return 0x14; - case SDLK_4: case SDLK_DOLLAR: return 0x15; - case SDLK_5: return 0x17; - case SDLK_6: return 0x16; - case SDLK_7: return 0x1a; - case SDLK_8: return 0x1c; - case SDLK_9: return 0x19; - case SDLK_0: return 0x1d; - - case SDLK_BACKQUOTE: return 0x0a; - case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; - case SDLK_EQUALS: case SDLK_PLUS: return 0x18; - case SDLK_LEFTBRACKET: return 0x21; - case SDLK_RIGHTBRACKET: return 0x1e; - case SDLK_BACKSLASH: return 0x2a; - case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; - case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; - case SDLK_COMMA: case SDLK_LESS: return 0x2b; - case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; - case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - - case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; - case SDLK_SPACE: return 0x31; - case SDLK_BACKSPACE: return 0x33; - - case SDLK_DELETE: return 0x75; - case SDLK_INSERT: return 0x72; - case SDLK_HOME: case SDLK_HELP: return 0x73; - case SDLK_END: return 0x77; - case SDLK_PAGEUP: return 0x74; - case SDLK_PAGEDOWN: return 0x79; - - case SDLK_LCTRL: return 0x36; - case SDLK_RCTRL: return 0x36; - case SDLK_LSHIFT: return 0x38; - case SDLK_RSHIFT: return 0x38; -#if (defined(__APPLE__) && defined(__MACH__)) - case SDLK_LALT: return 0x3a; - case SDLK_RALT: return 0x3a; - case SDLK_LMETA: return 0x37; - case SDLK_RMETA: return 0x37; -#else - case SDLK_LALT: return 0x37; - case SDLK_RALT: return 0x37; - case SDLK_LMETA: return 0x3a; - case SDLK_RMETA: return 0x3a; -#endif - case SDLK_LSUPER: return 0x3a; // "Windows" key - case SDLK_RSUPER: return 0x3a; - case SDLK_MENU: return 0x32; - case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCK: return 0x47; - - case SDLK_UP: return 0x3e; - case SDLK_DOWN: return 0x3d; - case SDLK_LEFT: return 0x3b; - case SDLK_RIGHT: return 0x3c; - - case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - - case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; - case SDLK_F2: return 0x78; - case SDLK_F3: return 0x63; - case SDLK_F4: return 0x76; - case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; - case SDLK_F6: return 0x61; - case SDLK_F7: return 0x62; - case SDLK_F8: return 0x64; - case SDLK_F9: return 0x65; - case SDLK_F10: return 0x6d; - case SDLK_F11: return 0x67; - case SDLK_F12: return 0x6f; - - case SDLK_PRINT: return 0x69; - case SDLK_SCROLLOCK: return 0x6b; - case SDLK_PAUSE: return 0x71; - - case SDLK_KP0: return 0x52; - case SDLK_KP1: return 0x53; - case SDLK_KP2: return 0x54; - case SDLK_KP3: return 0x55; - case SDLK_KP4: return 0x56; - case SDLK_KP5: return 0x57; - case SDLK_KP6: return 0x58; - case SDLK_KP7: return 0x59; - case SDLK_KP8: return 0x5b; - case SDLK_KP9: return 0x5c; - case SDLK_KP_PERIOD: return 0x41; - case SDLK_KP_PLUS: return 0x45; - case SDLK_KP_MINUS: return 0x4e; - case SDLK_KP_MULTIPLY: return 0x43; - case SDLK_KP_DIVIDE: return 0x4b; - case SDLK_KP_ENTER: return 0x4c; - case SDLK_KP_EQUALS: return 0x51; - } - D(bug("Unhandled SDL keysym: %d\n", ks.sym)); - return -1; -} - -static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) -{ - return kc_decode(ev.keysym, key_down); -} - -static void force_complete_window_refresh() -{ - if (display_type == DISPLAY_WINDOW) { -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - } -#endif - // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. - const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); - const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - for (int i = 0; i < len; i++) - the_buffer_copy[i] = !the_buffer[i]; - } -} - -/* - * SDL event handling - */ - -static void handle_events(void) -{ - SDL_Event events[10]; - const int n_max_events = sizeof(events) / sizeof(events[0]); - int n_events; - - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { - for (int i = 0; i < n_events; i++) { - SDL_Event const & event = events[i]; - switch (event.type) { - - // Mouse button - case SDL_MOUSEBUTTONDOWN: { - unsigned int button = event.button.button; - if (button == SDL_BUTTON_LEFT) - ADBMouseDown(0); - else if (button == SDL_BUTTON_RIGHT) - ADBMouseDown(1); - else if (button == SDL_BUTTON_MIDDLE) - ADBMouseDown(2); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.motion.x, event.motion.y); - break; - - // Keyboard - case SDL_KEYDOWN: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case SDL_KEYUP: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, false); - if (code >= 0) { - if (code == 0x39) { // Caps Lock released - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh of window - case SDL_VIDEOEXPOSE: - force_complete_window_refresh(); - break; - - // Window "close" widget clicked - case SDL_QUIT: - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - break; - - // Application activate/deactivate - case SDL_ACTIVEEVENT: - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain) - force_complete_window_refresh(); - break; - } - } - } -} - - -/* - * Window display update - */ - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_base *drv) -{ - // Incremental update code - int wide = 0, high = 0; - uint32 x1, x2, y1, y2; - const VIDEO_MODE &mode = drv->mode; - int bytes_per_row = VIDEO_MODE_ROW_BYTES; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y1 = j; - break; - } - } - y2 = y1 - 1; - for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { - const int src_bytes_per_row = bytes_per_row; - const int dst_bytes_per_row = drv->s->pitch; - const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; - - x1 = VIDEO_MODE_X / pixels_per_byte; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1; i++) { - if (*p != *p2) { - x1 = i; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { - p--; p2--; - if (*p != *p2) { - x2 = i; - break; - } - } - } - x1 *= pixels_per_byte; - x2 *= pixels_per_byte; - wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); - int di = y1 * dst_bytes_per_row + x1; - for (uint32 j = y1; j <= y2; j++) { - memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); - Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); - si += src_bytes_per_row; - di += dst_bytes_per_row; - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - - } else { - const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; - const int dst_bytes_per_row = drv->s->pitch; - - x1 = VIDEO_MODE_X; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { - if (*p != *p2) { - x1 = i / bytes_per_pixel; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - for (uint32 j = y1; j <= y2; j++) { - uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; - int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - } - } -} - -// Static display update (fixed frame rate, bounding boxes based) -// XXX use NQD bounding boxes to help detect dirty areas? -static void update_display_static_bbox(driver_base *drv) -{ - const VIDEO_MODE &mode = drv->mode; - - // Allocate bounding boxes for SDL_UpdateRects() - const uint32 N_PIXELS = 64; - const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; - const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; - SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); - uint32 nr_boxes = 0; - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Update the surface from Mac screen - const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; - const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; - const uint32 dst_bytes_per_row = drv->s->pitch; - for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { - uint32 h = N_PIXELS; - if (h > VIDEO_MODE_Y - y) - h = VIDEO_MODE_Y - y; - for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { - uint32 w = N_PIXELS; - if (w > VIDEO_MODE_X - x) - w = VIDEO_MODE_X - x; - const int xs = w * bytes_per_pixel; - const int xb = x * bytes_per_pixel; - bool dirty = false; - for (uint32 j = y; j < (y + h); j++) { - const uint32 yb = j * bytes_per_row; - const uint32 dst_yb = j * dst_bytes_per_row; - if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { - memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); - Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); - dirty = true; - } - } - if (dirty) { - boxes[nr_boxes].x = x; - boxes[nr_boxes].y = y; - boxes[nr_boxes].w = w; - boxes[nr_boxes].h = h; - nr_boxes++; - } - } - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - if (nr_boxes) - SDL_UpdateRects(drv->s, nr_boxes, boxes); -} - - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (sdl_palette_changed) { - sdl_palette_changed = false; - drv->update_palette(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_window_static(void); - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - video_refresh_window_static(); -} - -#ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - const VIDEO_MODE &mode = drv->mode; - if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) - update_display_static_bbox(drv); - else - update_display_static(drv); - } -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - video_refresh = video_refresh_window_static; - } -} - -static inline void do_video_refresh(void) -{ - // Handle SDL events - handle_events(); - - // Update display - video_refresh(); - - - // Set new palette if it was changed - handle_palette_changes(); -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Process pending events and update display - do_video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifndef USE_CPU_EMUL_SERVICES -static int redraw_func(void *arg) -{ - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Wait - next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); - if (delay > 0) - Delay_usec(delay); - else if (delay < -VIDEO_REFRESH_DELAY) - next = GetTicks_usec(); - ticks++; - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - thread_stop_ack = true; - continue; - } - - // Process pending events and update display - do_video_refresh(); - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return 0; -} -#endif - - -/* - * Record dirty area from NQD - */ - -#ifdef SHEEPSHAVER -void video_set_dirty_area(int x, int y, int w, int h) -{ -#ifdef ENABLE_VOSF - const VIDEO_MODE &mode = drv->mode; - const unsigned screen_width = VIDEO_MODE_X; - const unsigned screen_height = VIDEO_MODE_Y; - const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; - - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} -#endif From e42b6a50c388a0e5316385c92b6cf972f1abdeda Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 5 Dec 2017 23:49:59 +0900 Subject: [PATCH 198/534] revert SDL --- BasiliskII/src/SDL/video_sdl.cpp | 43 +++++++++++++++++++------------- SheepShaver/src/SDL | 1 + 2 files changed, 26 insertions(+), 18 deletions(-) mode change 100755 => 100644 BasiliskII/src/SDL/video_sdl.cpp create mode 120000 SheepShaver/src/SDL diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp old mode 100755 new mode 100644 index 798ed8e8d..011941f9e --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -31,6 +31,7 @@ * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) * - Mouse acceleration, there is no API in SDL yet for that + * - Force relative mode in Grab mode even if SDL provides absolute coordinates? * - Gamma tables support is likely to be broken here * - Events processing is bound to the general emulation thread as SDL requires * to PumpEvents() within the same thread as the one that called SetVideoMode(). @@ -135,6 +136,7 @@ static bool toggle_fullscreen = false; static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; static bool mouse_grabbed = false; +static bool mouse_grabbed_window_name_status = false; // Mutex to protect SDL events static SDL_mutex *sdl_events_lock = NULL; @@ -494,7 +496,7 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt } // Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) { #if !REAL_ADDRESSING && !DIRECT_ADDRESSING int layout = FLAYOUT_DIRECT; @@ -502,10 +504,7 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; else if (depth == VIDEO_DEPTH_32BIT) layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; + MacFrameLayout = layout; monitor.set_mac_frame_base(MacFrameBaseMac); // Set variables used by UAE memory banking @@ -686,13 +685,13 @@ void driver_base::init() } // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); adapt_to_video_mode(); } void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(mouse_grabbed); + ADBSetRelMouseMode(false); // Init blitting routines SDL_PixelFormat *f = s->format; @@ -726,7 +725,7 @@ void driver_base::adapt_to_video_mode() { SDL_ShowCursor(hardware_cursor); // Set window name/class - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + set_window_name(STR_WINDOW_TITLE); // Everything went well init_ok = true; @@ -804,9 +803,8 @@ void driver_base::grab_mouse(void) if (!mouse_grabbed) { SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); if (new_mode == SDL_GRAB_ON) { - set_window_name(STR_WINDOW_TITLE_GRABBED); disable_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = true); + mouse_grabbed = true; } } } @@ -817,9 +815,8 @@ void driver_base::ungrab_mouse(void) if (mouse_grabbed) { SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); if (new_mode == SDL_GRAB_OFF) { - set_window_name(STR_WINDOW_TITLE); restore_mouse_accel(); - ADBSetRelMouseMode(mouse_grabbed = false); + mouse_grabbed = false; } } } @@ -1279,6 +1276,13 @@ void VideoVBL(void) if (toggle_fullscreen) do_toggle_fullscreen(); + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; @@ -1301,6 +1305,13 @@ void VideoInterrupt(void) if (toggle_fullscreen) do_toggle_fullscreen(); + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; @@ -1751,11 +1762,7 @@ static void handle_events(void) // Mouse moved case SDL_MOUSEMOTION: - if (mouse_grabbed) { - drv->mouse_moved(event.motion.xrel, event.motion.yrel); - } else { - drv->mouse_moved(event.motion.x, event.motion.y); - } + drv->mouse_moved(event.motion.x, event.motion.y); break; // Keyboard @@ -1825,7 +1832,7 @@ static void handle_events(void) // Application activate/deactivate case SDL_ACTIVEEVENT: // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain && (event.active.state & SDL_APPACTIVE)) + if (event.active.gain) force_complete_window_refresh(); break; } diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL new file mode 120000 index 000000000..48cb61ebe --- /dev/null +++ b/SheepShaver/src/SDL @@ -0,0 +1 @@ +../../BasiliskII/src/SDL \ No newline at end of file From a944344f84aca2938d0c517eea42dfe4ca7611bf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 6 Dec 2017 15:35:41 +0900 Subject: [PATCH 199/534] BasiliskII/src/slirp/* copied from jvernet/macemu --- BasiliskII/src/slirp/VERSION | 1 + BasiliskII/src/slirp/bootp.c | 0 BasiliskII/src/slirp/bootp.h | 2 +- BasiliskII/src/slirp/cksum.c | 0 BasiliskII/src/slirp/ctl.h | 0 BasiliskII/src/slirp/debug.c | 15 +- BasiliskII/src/slirp/debug.h | 22 +- BasiliskII/src/slirp/icmp_var.h | 0 BasiliskII/src/slirp/if.c | 9 +- BasiliskII/src/slirp/if.h | 4 +- BasiliskII/src/slirp/ip.h | 70 +- BasiliskII/src/slirp/ip_icmp.c | 26 +- BasiliskII/src/slirp/ip_icmp.h | 8 +- BasiliskII/src/slirp/ip_input.c | 154 ++-- BasiliskII/src/slirp/ip_output.c | 9 +- BasiliskII/src/slirp/libslirp.h | 0 BasiliskII/src/slirp/main.h | 0 BasiliskII/src/slirp/mbuf.c | 37 +- BasiliskII/src/slirp/mbuf.h | 22 +- BasiliskII/src/slirp/misc.c | 192 +++-- BasiliskII/src/slirp/misc.h | 38 +- BasiliskII/src/slirp/sbuf.c | 35 +- BasiliskII/src/slirp/sbuf.h | 14 +- BasiliskII/src/slirp/slirp.c | 190 +++-- BasiliskII/src/slirp/slirp.h | 133 ++-- BasiliskII/src/slirp/slirp_config.h | 8 + BasiliskII/src/slirp/socket.c | 53 +- BasiliskII/src/slirp/socket.h | 38 +- BasiliskII/src/slirp/tcp.h | 6 +- BasiliskII/src/slirp/tcp_input.c | 1066 +++++++++++++-------------- BasiliskII/src/slirp/tcp_output.c | 30 +- BasiliskII/src/slirp/tcp_subr.c | 92 ++- BasiliskII/src/slirp/tcp_timer.c | 0 BasiliskII/src/slirp/tcp_timer.h | 8 +- BasiliskII/src/slirp/tcp_var.h | 25 +- BasiliskII/src/slirp/tcpip.h | 11 +- BasiliskII/src/slirp/tftp.c | 3 + BasiliskII/src/slirp/tftp.h | 2 +- BasiliskII/src/slirp/udp.c | 17 +- BasiliskII/src/slirp/udp.h | 21 +- 40 files changed, 1229 insertions(+), 1132 deletions(-) mode change 100644 => 100755 BasiliskII/src/slirp/bootp.c mode change 100644 => 100755 BasiliskII/src/slirp/bootp.h mode change 100644 => 100755 BasiliskII/src/slirp/cksum.c mode change 100644 => 100755 BasiliskII/src/slirp/ctl.h mode change 100644 => 100755 BasiliskII/src/slirp/debug.c mode change 100644 => 100755 BasiliskII/src/slirp/debug.h mode change 100644 => 100755 BasiliskII/src/slirp/icmp_var.h mode change 100644 => 100755 BasiliskII/src/slirp/if.c mode change 100644 => 100755 BasiliskII/src/slirp/if.h mode change 100644 => 100755 BasiliskII/src/slirp/ip.h mode change 100644 => 100755 BasiliskII/src/slirp/ip_icmp.c mode change 100644 => 100755 BasiliskII/src/slirp/ip_icmp.h mode change 100644 => 100755 BasiliskII/src/slirp/ip_input.c mode change 100644 => 100755 BasiliskII/src/slirp/ip_output.c mode change 100644 => 100755 BasiliskII/src/slirp/libslirp.h mode change 100644 => 100755 BasiliskII/src/slirp/main.h mode change 100644 => 100755 BasiliskII/src/slirp/mbuf.c mode change 100644 => 100755 BasiliskII/src/slirp/mbuf.h mode change 100644 => 100755 BasiliskII/src/slirp/misc.c mode change 100644 => 100755 BasiliskII/src/slirp/misc.h mode change 100644 => 100755 BasiliskII/src/slirp/sbuf.c mode change 100644 => 100755 BasiliskII/src/slirp/sbuf.h mode change 100644 => 100755 BasiliskII/src/slirp/slirp.c mode change 100644 => 100755 BasiliskII/src/slirp/slirp.h mode change 100644 => 100755 BasiliskII/src/slirp/slirp_config.h mode change 100644 => 100755 BasiliskII/src/slirp/socket.c mode change 100644 => 100755 BasiliskII/src/slirp/socket.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp_input.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_output.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_subr.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_timer.c mode change 100644 => 100755 BasiliskII/src/slirp/tcp_timer.h mode change 100644 => 100755 BasiliskII/src/slirp/tcp_var.h mode change 100644 => 100755 BasiliskII/src/slirp/tcpip.h mode change 100644 => 100755 BasiliskII/src/slirp/tftp.c mode change 100644 => 100755 BasiliskII/src/slirp/tftp.h mode change 100644 => 100755 BasiliskII/src/slirp/udp.c mode change 100644 => 100755 BasiliskII/src/slirp/udp.h diff --git a/BasiliskII/src/slirp/VERSION b/BasiliskII/src/slirp/VERSION index 353ad940d..12adff9bb 100644 --- a/BasiliskII/src/slirp/VERSION +++ b/BasiliskII/src/slirp/VERSION @@ -1 +1,2 @@ qemu 0.9.0 (2007/02/05) +Plus 64 Bits Patchs \ No newline at end of file diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/bootp.h b/BasiliskII/src/slirp/bootp.h old mode 100644 new mode 100755 index 54a86ca22..5c2e62ab0 --- a/BasiliskII/src/slirp/bootp.h +++ b/BasiliskII/src/slirp/bootp.h @@ -115,7 +115,7 @@ struct bootp_t { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif void bootp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/ctl.h b/BasiliskII/src/slirp/ctl.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c old mode 100644 new mode 100755 index 916b9a8e0..d3d8c5796 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -16,6 +16,8 @@ int dostats = 0; #endif int slirp_debug = 0; +extern char *strerror _P((int)); + /* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ extern struct termios slirp_tty_settings; @@ -292,7 +294,6 @@ mbufstats() void sockstats() { - char addr[INET_ADDRSTRLEN]; char buff[256]; int n; struct socket *so; @@ -310,11 +311,9 @@ sockstats() buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } @@ -326,11 +325,9 @@ sockstats() buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), + inet_ntoa(so->so_faddr), ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } } diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h old mode 100644 new mode 100755 index c5d42195e..6e8444dab --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -36,15 +36,15 @@ extern int slirp_debug; #endif -void debug_init(char *, int); -//void ttystats(struct ttys *); -void allttystats(void); -void ipstats(void); -void vjstats(void); -void tcpstats(void); -void udpstats(void); -void icmpstats(void); -void mbufstats(void); -void sockstats(void); -void slirp_exit(int); +void debug_init _P((char *, int)); +//void ttystats _P((struct ttys *)); +void allttystats _P((void)); +void ipstats _P((void)); +void vjstats _P((void)); +void tcpstats _P((void)); +void udpstats _P((void)); +void icmpstats _P((void)); +void mbufstats _P((void)); +void sockstats _P((void)); +void slirp_exit _P((int)); diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c old mode 100644 new mode 100755 index 9185dcf65..eab8a46ea --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -7,11 +7,11 @@ #include -size_t if_mtu, if_mru; +int if_mtu, if_mru; int if_comp; int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending +int if_queued = 0; /* Number of packets queued so far */ +int if_thresh = 10; /* Number of packets queued before we start sending * (to prevent allocing too many mbufs) */ struct mbuf if_fastq; /* fast queue (for interactive data) */ @@ -116,8 +116,7 @@ if_input(ttyp) DEBUG_MISC((dfd, " read %d bytes\n", if_n)); if (if_n <= 0) { - int error = WSAGetLastError(); - if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { + if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { if (ttyp->up) link_up--; tty_detached(ttyp, 0); diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h old mode 100644 new mode 100755 index a2564ab1d..5d96a9034 --- a/BasiliskII/src/slirp/if.h +++ b/BasiliskII/src/slirp/if.h @@ -15,8 +15,8 @@ /* Needed for FreeBSD */ #undef if_mtu -extern size_t if_mtu; -extern size_t if_mru; /* MTU and MRU */ +extern int if_mtu; +extern int if_mru; /* MTU and MRU */ extern int if_comp; /* Flags for compression */ extern int if_maxlinkhdr; extern int if_queued; /* Number of packets queued so far */ diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h old mode 100644 new mode 100755 index e0c7de967..94dcc6063 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -98,7 +98,7 @@ struct ip { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif #define IP_MAXPACKET 65535 /* maximum packet size */ @@ -168,7 +168,7 @@ struct ip_timestamp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* flag bits for ipt_flg */ @@ -195,23 +195,19 @@ struct ip_timestamp { #define IP_MSS 576 /* default maximum segment size */ -#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ -#include -#else #if SIZEOF_CHAR_P == 4 -typedef caddr_t caddr32_t; + struct mbuf_ptr { + struct mbuf *mptr; + uint32_t dummy; + }; #else -typedef u_int32_t caddr32_t; -#endif -#endif - -#if SIZEOF_CHAR_P == 4 -typedef struct ipq *ipqp_32; -typedef struct ipasfrag *ipasfragp_32; -#else -typedef caddr32_t ipqp_32; -typedef caddr32_t ipasfragp_32; + struct mbuf_ptr { + struct mbuf *mptr; + }; #endif +struct qlink { + void *next, *prev; +}; /* * Overlay for ip header used by other protocols (tcp, udp). @@ -221,16 +217,16 @@ typedef caddr32_t ipasfragp_32; #endif struct ipovly { - caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ + struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ u_int8_t ih_x1; /* (unused) */ u_int8_t ih_pr; /* protocol */ u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -} PACKED__; +} __attribute__((packed)); #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -241,12 +237,13 @@ struct ipovly { * size 28 bytes */ struct ipq { - ipqp_32 next,prev; /* to other reass headers */ + struct qlink frag_link; /* to ip headers of fragments */ + struct qlink ip_link; /* to other reass headers */ + u_int8_t ipq_ttl; /* time for reass q to live */ u_int8_t ipq_p; /* protocol of this fragment */ u_int16_t ipq_id; /* sequence id for reassembly */ - ipasfragp_32 ipq_next,ipq_prev; - /* to ip headers of fragments */ + struct in_addr ipq_src,ipq_dst; }; @@ -256,29 +253,16 @@ struct ipq { * Note: ipf_next must be at same offset as ipq_next above */ struct ipasfrag { -#ifdef WORDS_BIGENDIAN - u_char ip_v:4, - ip_hl:4; -#else - u_char ip_hl:4, - ip_v:4; -#endif - /* BUG : u_int changed to u_int8_t. - * sizeof(u_int)==4 on linux 2.0 - */ - u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit - * to avoid destroying tos (PPPDTRuu); - * copied from (ip_off&IP_MF) */ - u_int16_t ip_len; - u_int16_t ip_id; - u_int16_t ip_off; - u_int8_t ip_ttl; - u_int8_t ip_p; - u_int16_t ip_sum; - ipasfragp_32 ipf_next; /* next fragment */ - ipasfragp_32 ipf_prev; /* previous fragment */ + struct qlink ipf_link; + struct ip ipf_ip; }; +#define ipf_off ipf_ip.ip_off +#define ipf_tos ipf_ip.ip_tos +#define ipf_len ipf_ip.ip_len +#define ipf_next ipf_link.next +#define ipf_prev ipf_link.prev + /* * Structure stored in mbuf in inpcb.ip_options * and passed to ip_output when ip options are in use. diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c old mode 100644 new mode 100755 index 55376a8b1..7cbda7906 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -77,7 +77,7 @@ icmp_input(m, hlen) DEBUG_CALL("icmp_input"); DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); icmpstat.icps_received++; @@ -201,12 +201,12 @@ icmp_input(m, hlen) #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error( - struct mbuf *msrc, - u_char type, - u_char code, - int minsize, - char *message) +icmp_error(msrc, type, code, minsize, message) + struct mbuf *msrc; + u_char type; + u_char code; + int minsize; + char *message; { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -215,7 +215,7 @@ icmp_error( DEBUG_CALL("icmp_error"); DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %zu", msrc->m_len); + DEBUG_ARG("msrc_len = %d", msrc->m_len); if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; @@ -223,9 +223,9 @@ icmp_error( if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); #if DEBUG - { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; - inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); - inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); + { char bufa[20], bufb[20]; + strcpy(bufa, inet_ntoa(ip->ip_src)); + strcpy(bufb, inet_ntoa(ip->ip_dst)); DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); } #endif @@ -244,7 +244,7 @@ icmp_error( /* make a copy */ if(!(m=m_get())) goto end_error; /* get mbuf */ - { u_int new_m_size; + { int new_m_size; new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; if(new_m_size>m->m_size) m_inc(m, new_m_size); } @@ -299,7 +299,7 @@ icmp_error( /* fill in ip */ ip->ip_hl = hlen >> 2; - ip->ip_len = (u_int16_t)m->m_len; + ip->ip_len = m->m_len; ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h old mode 100644 new mode 100755 index 683dc87f1..6968daa71 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -95,7 +95,7 @@ struct icmp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -161,8 +161,8 @@ struct icmp { (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) -void icmp_input(struct mbuf *, int); -void icmp_error(struct mbuf *, u_char, u_char, int, char *); -void icmp_reflect(struct mbuf *); +void icmp_input _P((struct mbuf *, int)); +void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); +void icmp_reflect _P((struct mbuf *)); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c old mode 100644 new mode 100755 index cac8493ba..7c995c98d --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -38,6 +38,16 @@ * terms and conditions of the copyright. */ +#include +#include +#include +#include + +#define container_of(ptr, type, member) ({ \ + const typeof(((type *) 0)->member) *__mptr = (ptr); \ + (type *) ((char *) __mptr - offsetof(type, member));}) + + #include #include "ip_icmp.h" @@ -52,7 +62,7 @@ struct ipq ipq; void ip_init() { - ipq.next = ipq.prev = (ipqp_32)&ipq; + ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); @@ -68,11 +78,11 @@ ip_input(m) struct mbuf *m; { register struct ip *ip; - u_int hlen; + int hlen; DEBUG_CALL("ip_input"); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %zu", m->m_len); + DEBUG_ARG("m_len = %d", m->m_len); ipstat.ips_total++; @@ -155,18 +165,20 @@ ip_input(m) */ if (ip->ip_off &~ IP_DF) { register struct ipq *fp; + struct qlink *l; /* * Look for queue of fragments * of this datagram. */ - for (fp = (struct ipq *) ipq.next; fp != &ipq; - fp = (struct ipq *) fp->next) - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) + for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { + fp = container_of(l, struct ipq, ip_link); + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) goto found; - fp = 0; + } + fp = NULL; found: /* @@ -176,9 +188,9 @@ ip_input(m) */ ip->ip_len -= hlen; if (ip->ip_off & IP_MF) - ((struct ipasfrag *)ip)->ipf_mff |= 1; + ip->ip_tos |= 1; else - ((struct ipasfrag *)ip)->ipf_mff &= ~1; + ip->ip_tos &= ~1; ip->ip_off <<= 3; @@ -187,9 +199,9 @@ ip_input(m) * or if this is not the first fragment, * attempt reassembly; if it succeeds, proceed. */ - if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { + if (ip->ip_tos & 1 || ip->ip_off) { ipstat.ips_fragments++; - ip = ip_reass((struct ipasfrag *)ip, fp); + ip = ip_reass(ip, fp); if (ip == 0) return; ipstat.ips_reassembled++; @@ -225,21 +237,21 @@ ip_input(m) return; } +#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) +#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) /* * Take incoming datagram fragment and try to * reassemble it into whole datagram. If a chain for * reassembly of this datagram already exists, then it * is given as fp; otherwise have to make a chain. */ -struct ip * -ip_reass(ip, fp) - register struct ipasfrag *ip; - register struct ipq *fp; +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *fp) { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; int hlen = ip->ip_hl << 2; - int i, next; + u_int16_t i, next; DEBUG_CALL("ip_reass"); DEBUG_ARG("ip = %lx", (long)ip); @@ -261,13 +273,13 @@ ip_reass(ip, fp) struct mbuf *t; if ((t = m_get()) == NULL) goto dropfrag; fp = mtod(t, struct ipq *); - insque_32(fp, &ipq); + insque(&fp->ip_link, &ipq.ip_link); fp->ipq_ttl = IPFRAGTTL; fp->ipq_p = ip->ip_p; fp->ipq_id = ip->ip_id; - fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; - fp->ipq_src = ((struct ip *)ip)->ip_src; - fp->ipq_dst = ((struct ip *)ip)->ip_dst; + fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; + fp->ipq_src = ip->ip_src; + fp->ipq_dst = ip->ip_dst; q = (struct ipasfrag *)fp; goto insert; } @@ -275,9 +287,9 @@ ip_reass(ip, fp) /* * Find a segment which begins after this one does. */ - for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *)q->ipf_next) - if (q->ip_off > ip->ip_off) + for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; + q = q->ipf_next) + if (q->ipf_off > ip->ip_off) break; /* @@ -285,9 +297,9 @@ ip_reass(ip, fp) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (q->ipf_prev != (ipasfragp_32)fp) { - i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + - ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; + if (q->ipf_prev != &fp->frag_link) { + struct ipasfrag *pq = q->ipf_prev; + i = pq->ipf_off + pq->ipf_len - ip->ip_off; if (i > 0) { if (i >= ip->ip_len) goto dropfrag; @@ -301,17 +313,18 @@ ip_reass(ip, fp) * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { - i = (ip->ip_off + ip->ip_len) - q->ip_off; - if (i < q->ip_len) { - q->ip_len -= i; - q->ip_off += i; + while (q != (struct ipasfrag*)&fp->frag_link && + ip->ip_off + ip->ip_len > q->ipf_off) { + i = (ip->ip_off + ip->ip_len) - q->ipf_off; + if (i < q->ipf_len) { + q->ipf_len -= i; + q->ipf_off += i; m_adj(dtom(q), i); break; } - q = (struct ipasfrag *) q->ipf_next; - m_freem(dtom((struct ipasfrag *) q->ipf_prev)); - ip_deq((struct ipasfrag *) q->ipf_prev); + q = q->ipf_next; + m_freem(dtom(q->ipf_prev)); + ip_deq(q->ipf_prev); } insert: @@ -319,27 +332,26 @@ ip_reass(ip, fp) * Stick new segment in its place; * check for complete reassembly. */ - ip_enq(ip, (struct ipasfrag *) q->ipf_prev); + ip_enq(iptofrag(ip), q->ipf_prev); next = 0; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *) q->ipf_next) { - if (q->ip_off != next) + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; + q = q->ipf_next) { + if (q->ipf_off != next) return (0); - next += q->ip_len; + next += q->ipf_len; } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) + if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) return (0); /* * Reassembly is complete; concatenate fragments. */ - q = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; m = dtom(q); q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag *)fp) { - struct mbuf *t; - t = dtom(q); + while (q != (struct ipasfrag*)&fp->frag_link) { + struct mbuf *t = dtom(q); q = (struct ipasfrag *) q->ipf_next; m_cat(m, t); } @@ -350,7 +362,7 @@ ip_reass(ip, fp) * dequeue and discard fragment reassembly header. * Make header visible. */ - ip = (struct ipasfrag *) fp->ipq_next; + q = fp->frag_link.next; /* * If the fragments concatenated to an mbuf that's @@ -361,24 +373,24 @@ ip_reass(ip, fp) */ if (m->m_flags & M_EXT) { int delta; - delta = (char *)ip - m->m_dat; - ip = (struct ipasfrag *)(m->m_ext + delta); + delta = (char *)q - m->m_dat; + q = (struct ipasfrag *)(m->m_ext + delta); } /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ + ip = fragtoip(q); ip->ip_len = next; - ip->ipf_mff &= ~1; - ((struct ip *)ip)->ip_src = fp->ipq_src; - ((struct ip *)ip)->ip_dst = fp->ipq_dst; - remque_32(fp); + ip->ip_tos &= ~1; + ip->ip_src = fp->ipq_src; + ip->ip_dst = fp->ipq_dst; + remque(&fp->ip_link); (void) m_free(dtom(fp)); - m = dtom(ip); m->m_len += (ip->ip_hl << 2); m->m_data -= (ip->ip_hl << 2); - return ((struct ip *)ip); + return ip; dropfrag: ipstat.ips_fragdropped++; @@ -396,13 +408,12 @@ ip_freef(fp) { register struct ipasfrag *q, *p; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = p) { - p = (struct ipasfrag *) q->ipf_next; + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { + p = q->ipf_next; ip_deq(q); m_freem(dtom(q)); } - remque_32(fp); + remque(&fp->ip_link); (void) m_free(dtom(fp)); } @@ -416,10 +427,10 @@ ip_enq(p, prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = (ipasfragp_32) prev; + p->ipf_prev = prev; p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; - prev->ipf_next = (ipasfragp_32) p; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; + prev->ipf_next = p; } /* @@ -441,20 +452,21 @@ ip_deq(p) void ip_slowtimo() { - register struct ipq *fp; + struct qlink *l; DEBUG_CALL("ip_slowtimo"); - fp = (struct ipq *) ipq.next; - if (fp == 0) + l = ipq.ip_link.next; + + if (l == 0) return; - while (fp != &ipq) { - --fp->ipq_ttl; - fp = (struct ipq *) fp->next; - if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { + while (l != &ipq.ip_link) { + struct ipq *fp = container_of(l, struct ipq, ip_link); + l = l->next; + if (--fp->ipq_ttl == 0) { ipstat.ips_fragtimeout++; - ip_freef((struct ipq *) fp->prev); + ip_freef(fp); } } } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c old mode 100644 new mode 100755 index fb9a94204..0d1ae1b2c --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -55,9 +55,8 @@ ip_output(so, m0) { register struct ip *ip; register struct mbuf *m = m0; - register u_int hlen = sizeof(struct ip); - u_int len, off; - int error = 0; + register int hlen = sizeof(struct ip ); + int len, off, error = 0; DEBUG_CALL("ip_output"); DEBUG_ARG("so = %lx", (long)so); @@ -129,7 +128,7 @@ ip_output(so, m0) */ m0 = m; mhlen = sizeof (struct ip); - for (off = hlen + len; off < ip->ip_len; off += len) { + for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { register struct ip *mhip; m = m_get(); if (m == 0) { @@ -174,7 +173,7 @@ ip_output(so, m0) * and updating header, then send each fragment (in order). */ m = m0; - m_adj(m, hlen + firstlen - ip->ip_len); + m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); ip->ip_len = htons((u_int16_t)m->m_len); ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); ip->ip_sum = 0; diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c old mode 100644 new mode 100755 index 5a16fab8b..2b53bc3e9 --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -24,16 +24,18 @@ int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; int mbuf_thresh = 30; int mbuf_max = 0; -size_t msize; +int msize; -void m_init() +void +m_init() { m_freelist.m_next = m_freelist.m_prev = &m_freelist; m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; msize_init(); } -void msize_init() +void +msize_init() { /* * Find a nice value for msize @@ -51,7 +53,8 @@ void msize_init() * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, * which tells m_free to actually free() it */ -struct mbuf *m_get() +struct mbuf * +m_get() { register struct mbuf *m; int flags = 0; @@ -86,7 +89,9 @@ struct mbuf *m_get() return m; } -void m_free(struct mbuf *m) +void +m_free(m) + struct mbuf *m; { DEBUG_CALL("m_free"); @@ -119,7 +124,9 @@ void m_free(struct mbuf *m) * the other.. if result is too big for one mbuf, malloc() * an M_EXT data segment */ -void m_cat(register struct mbuf *m, register struct mbuf *n) +void +m_cat(m, n) + register struct mbuf *m, *n; { /* * If there's no room, realloc @@ -135,7 +142,10 @@ void m_cat(register struct mbuf *m, register struct mbuf *n) /* make m size bytes large */ -void m_inc(struct mbuf *m, u_int size) +void +m_inc(m, size) + struct mbuf *m; + int size; { int datasize; @@ -169,7 +179,10 @@ void m_inc(struct mbuf *m, u_int size) -void m_adj(struct mbuf *m, int len) +void +m_adj(m, len) + struct mbuf *m; + int len; { if (m == NULL) return; @@ -189,7 +202,9 @@ void m_adj(struct mbuf *m, int len) * Copy len bytes from m, starting off bytes into n */ int -m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) +m_copy(n, m, off, len) + struct mbuf *n, *m; + int off, len; { if (len > M_FREEROOM(n)) return -1; @@ -205,7 +220,9 @@ m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) * XXX This is a kludge, I should eliminate the need for it * Fortunately, it's not used often */ -struct mbuf *dtom(void *dat) +struct mbuf * +dtom(dat) + void *dat; { struct mbuf *m; diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h old mode 100644 new mode 100755 index 11b252bb6..183254a08 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -63,11 +63,11 @@ struct m_hdr { struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ int mh_flags; /* Misc flags */ - size_t mh_size; /* Size of data */ + int mh_size; /* Size of data */ struct socket *mh_so; caddr_t mh_data; /* Location of data */ - size_t mh_len; /* Amount of data in this mbuf */ + int mh_len; /* Amount of data in this mbuf */ }; /* @@ -130,14 +130,14 @@ extern int mbuf_alloced; extern struct mbuf m_freelist, m_usedlist; extern int mbuf_max; -void m_init(void); -void msize_init(void); -struct mbuf * m_get(void); -void m_free(struct mbuf *); -void m_cat(register struct mbuf *, register struct mbuf *); -void m_inc(struct mbuf *, u_int); -void m_adj(struct mbuf *, int); -int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); -struct mbuf * dtom(void *); +void m_init _P((void)); +void msize_init _P((void)); +struct mbuf * m_get _P((void)); +void m_free _P((struct mbuf *)); +void m_cat _P((register struct mbuf *, register struct mbuf *)); +void m_inc _P((struct mbuf *, int)); +void m_adj _P((struct mbuf *, int)); +int m_copy _P((struct mbuf *, struct mbuf *, int, int)); +struct mbuf * dtom _P((void *)); #endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c old mode 100644 new mode 100755 index b80caf662..9438af382 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -17,7 +17,10 @@ int x_port = -1; int x_display = 0; int x_screen = 0; -int show_x(char *buff, struct socket *inso) +int +show_x(buff, inso) + char *buff; + struct socket *inso; { if (x_port < 0) { lprint("X Redir: X not being redirected.\r\n"); @@ -37,7 +40,12 @@ int show_x(char *buff, struct socket *inso) /* * XXX Allow more than one X redirection? */ -void redir_x(u_int32_t inaddr, int start_port, int display, int screen) +void +redir_x(inaddr, start_port, display, screen) + u_int32_t inaddr; + int start_port; + int display; + int screen; { int i; @@ -61,69 +69,44 @@ void redir_x(u_int32_t inaddr, int start_port, int display, int screen) #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia) +int +inet_aton(cp, ia) + const char *cp; + struct in_addr *ia; { - return inet_pton(AF_INET, cp, &ia->s_addr); + u_int32_t addr = inet_addr(cp); + if (addr == 0xffffffff) + return 0; + ia->s_addr = addr; + return 1; } #endif /* * Get our IP address and put it in our_addr */ -void getouraddr() +void +getouraddr() { char buff[256]; - - if (gethostname(buff, sizeof(buff)) == 0) - { - struct addrinfo hints = { 0 }; - hints.ai_flags = AI_NUMERICHOST; - hints.ai_family = AF_INET; - struct addrinfo* ai; - if (getaddrinfo(buff, NULL, &hints, &ai) == 0) - { - our_addr = *(struct in_addr *)ai->ai_addr->sa_data; - freeaddrinfo(ai); - } - } - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; + struct hostent *he = NULL; + + if (gethostname(buff,256) == 0) + he = gethostbyname(buff); + if (he) + our_addr = *(struct in_addr *)he->h_addr; + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; } -#if SIZEOF_CHAR_P == 8 - -struct quehead_32 { - u_int32_t qh_link; - u_int32_t qh_rlink; -}; - -inline void insque_32(void *a, void *b) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - register struct quehead_32 *head = (struct quehead_32 *) b; - element->qh_link = head->qh_link; - head->qh_link = (u_int32_t)element; - element->qh_rlink = (u_int32_t)head; - ((struct quehead_32 *)(element->qh_link))->qh_rlink - = (u_int32_t)element; -} - -inline void remque_32(void *a) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = 0; -} - -#endif /* SIZEOF_CHAR_P == 8 */ - struct quehead { struct quehead *qh_link; struct quehead *qh_rlink; }; -void insque(void *a, void *b) +void +insque(a, b) + void *a, *b; { register struct quehead *element = (struct quehead *) a; register struct quehead *head = (struct quehead *) b; @@ -134,7 +117,9 @@ void insque(void *a, void *b) = (struct quehead *)element; } -void remque(void *a) +void +remque(a) + void *a; { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -146,7 +131,13 @@ void remque(void *a) /* #endif */ -int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) +int +add_exec(ex_ptr, do_pty, exec, addr, port) + struct ex_list **ex_ptr; + int do_pty; + char *exec; + int addr; + int port; { struct ex_list *tmp_ptr; @@ -175,7 +166,9 @@ int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port extern int sys_nerr; extern char *sys_errlist[]; -char *strerror(int error) +char * +strerror(error) + int error; { if (error < sys_nerr) return sys_errlist[error]; @@ -188,7 +181,11 @@ char *strerror(int error) #ifdef _WIN32 -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; { /* not implemented */ return 0; @@ -196,7 +193,9 @@ int fork_exec(struct socket *so, char *ex, int do_pty) #else -int slirp_openpty(int *amaster, int *aslave) +int +slirp_openpty(amaster, aslave) + int *amaster, *aslave; { register int master, slave; @@ -270,7 +269,11 @@ int slirp_openpty(int *amaster, int *aslave) * do_pty = 1 Fork/exec using slirp.telnetd * do_ptr = 2 Fork/exec using pty */ -int fork_exec(struct socket *so, char *ex, int do_pty) +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; { int s; struct sockaddr_in addr; @@ -426,7 +429,9 @@ int fork_exec(struct socket *so, char *ex, int do_pty) #endif #ifndef HAVE_STRDUP -char *strdup(const char *str) +char * +strdup(str) + const char *str; { char *bptr; @@ -438,7 +443,9 @@ char *strdup(const char *str) #endif #if 0 -void snooze_hup(int num) +void +snooze_hup(num) + int num; { int s, ret; #ifndef NO_UNIX_SOCKETS @@ -478,7 +485,8 @@ void snooze_hup(int num) } -void snooze() +void +snooze() { sigset_t s; int i; @@ -502,7 +510,9 @@ void snooze() exit(255); } -void relay(int s) +void +relay(s) + int s; { char buf[8192]; int n; @@ -562,14 +572,25 @@ void relay(int s) } #endif -int (*lprint_print)(void *, const char *, va_list); +int (*lprint_print) _P((void *, const char *, va_list)); char *lprint_ptr, *lprint_ptr2, **lprint_arg; -void lprint(const char *format, ...) +void +#ifdef __STDC__ +lprint(const char *format, ...) +#else +lprint(va_alist) va_dcl +#endif { va_list args; - va_start(args, format); +#ifdef __STDC__ + va_start(args, format); +#else + char *format; + va_start(args); + format = va_arg(args, char *); +#endif #if 0 /* If we're printing to an sbuf, make sure there's enough room */ /* XXX +100? */ @@ -618,7 +639,9 @@ void lprint(const char *format, ...) va_end(args); } -void add_emu(char *buff) +void +add_emu(buff) + char *buff; { u_int lport, fport; u_int8_t tos = 0, emu = 0; @@ -710,24 +733,42 @@ void add_emu(char *buff) * Some BSD-derived systems have a sprintf which returns char * */ -int vsprintf_len(char *string, const char *format, va_list args) +int +vsprintf_len(string, format, args) + char *string; + const char *format; + va_list args; { vsprintf(string, format, args); return strlen(string); } -int sprintf_len(char *string, const char *format, ...) +int +#ifdef __STDC__ +sprintf_len(char *string, const char *format, ...) +#else +sprintf_len(va_alist) va_dcl +#endif { va_list args; +#ifdef __STDC__ va_start(args, format); +#else + char *string; + char *format; + va_start(args); + string = va_arg(args, char *); + format = va_arg(args, char *); +#endif vsprintf(string, format, args); - va_end(args); return strlen(string); } #endif -void u_sleep(int usec) +void +u_sleep(usec) + int usec; { struct timeval t; fd_set fdset; @@ -744,7 +785,9 @@ void u_sleep(int usec) * Set fd blocking and non-blocking */ -void fd_nonblock(int fd) +void +fd_nonblock(fd) + int fd; { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 1; @@ -759,7 +802,9 @@ void fd_nonblock(int fd) #endif } -void fd_block(int fd) +void +fd_block(fd) + int fd; { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 0; @@ -779,8 +824,13 @@ void fd_block(int fd) /* * invoke RSH */ -int rsh_exec(struct socket *so, struct socket *ns, - char *user, char *host, char *args) +int +rsh_exec(so,ns, user, host, args) + struct socket *so; + struct socket *ns; + char *user; + char *host; + char *args; { int fd[2]; int fd0[2]; diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h old mode 100644 new mode 100755 index 381f5f3e7..efea9ff8b --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -19,15 +19,15 @@ struct ex_list { extern struct ex_list *exec_list; extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; -extern int (*lprint_print)(void *, const char *, va_list); +extern int (*lprint_print) _P((void *, const char *, va_list)); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; extern struct sbuf *lprint_sb; #ifndef HAVE_STRDUP -char *strdup(const char *); +char *strdup _P((const char *)); #endif -void do_wait(int); +void do_wait _P((int)); #define EMU_NONE 0x0 @@ -67,21 +67,21 @@ extern struct emu_t *tcpemu; extern int x_port, x_server, x_display; -int show_x(char *, struct socket *); -void redir_x(u_int32_t, int, int, int); -void getouraddr(void); -void slirp_insque(void *, void *); -void slirp_remque(void *); -int add_exec(struct ex_list **, int, char *, int, int); -int slirp_openpty(int *, int *); -int fork_exec(struct socket *, char *, int); -void snooze_hup(int); -void snooze(void); -void relay(int); -void add_emu(char *); -void u_sleep(int); -void fd_nonblock(int); -void fd_block(int); -int rsh_exec(struct socket *, struct socket *, char *, char *, char *); +int show_x _P((char *, struct socket *)); +void redir_x _P((u_int32_t, int, int, int)); +void getouraddr _P((void)); +void slirp_insque _P((void *, void *)); +void slirp_remque _P((void *)); +int add_exec _P((struct ex_list **, int, char *, int, int)); +int slirp_openpty _P((int *, int *)); +int fork_exec _P((struct socket *, char *, int)); +void snooze_hup _P((int)); +void snooze _P((void)); +void relay _P((int)); +void add_emu _P((char *)); +void u_sleep _P((int)); +void fd_nonblock _P((int)); +void fd_block _P((int)); +int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); #endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c old mode 100644 new mode 100755 index 278e36870..0d8800920 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -5,7 +5,7 @@ * terms and conditions of the copyright. */ -#include +// #include #include /* Done as a macro in socket.h */ @@ -16,12 +16,17 @@ * } */ -void sbfree(struct sbuf *sb) +void +sbfree(sb) + struct sbuf *sb; { free(sb->sb_data); } -void sbdrop(struct sbuf *sb, u_int num) +void +sbdrop(sb, num) + struct sbuf *sb; + int num; { /* * We can only drop how much we have @@ -36,7 +41,10 @@ void sbdrop(struct sbuf *sb, u_int num) } -void sbreserve(struct sbuf *sb, size_t size) +void +sbreserve(sb, size) + struct sbuf *sb; + int size; { if (sb->sb_data) { /* Already alloced, realloc if necessary */ @@ -64,14 +72,17 @@ void sbreserve(struct sbuf *sb, size_t size) * this prevents an unnecessary copy of the data * (the socket is non-blocking, so we won't hang) */ -void sbappend(struct socket *so, struct mbuf *m) +void +sbappend(so, m) + struct socket *so; + struct mbuf *m; { int ret = 0; DEBUG_CALL("sbappend"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %zu", m->m_len); + DEBUG_ARG("m->m_len = %d", m->m_len); /* Shouldn't happen, but... e.g. foreign host closes connection */ if (m->m_len <= 0) { @@ -123,7 +134,10 @@ void sbappend(struct socket *so, struct mbuf *m) * Copy the data from m into sb * The caller is responsible to make sure there's enough room */ -void sbappendsb(struct sbuf *sb, struct mbuf *m) +void +sbappendsb(sb, m) + struct sbuf *sb; + struct mbuf *m; { int len, n, nn; @@ -159,7 +173,12 @@ void sbappendsb(struct sbuf *sb, struct mbuf *m) * Don't update the sbuf rptr, this will be * done in sbdrop when the data is acked */ -void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) +void +sbcopy(sb, off, len, to) + struct sbuf *sb; + int off; + int len; + char *to; { char *from; diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h old mode 100644 new mode 100755 index 04f7981c7..161e0bb76 --- a/BasiliskII/src/slirp/sbuf.h +++ b/BasiliskII/src/slirp/sbuf.h @@ -8,8 +8,6 @@ #ifndef _SBUF_H_ #define _SBUF_H_ -#include - #define sbflush(sb) sbdrop((sb),(sb)->sb_cc) #define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) @@ -23,11 +21,11 @@ struct sbuf { char *sb_data; /* Actual data */ }; -void sbfree(struct sbuf *); -void sbdrop(struct sbuf *, u_int); -void sbreserve(struct sbuf *, size_t); -void sbappend(struct socket *, struct mbuf *); -void sbappendsb(struct sbuf *, struct mbuf *); -void sbcopy(struct sbuf *, u_int, u_int, char *); +void sbfree _P((struct sbuf *)); +void sbdrop _P((struct sbuf *, int)); +void sbreserve _P((struct sbuf *, int)); +void sbappend _P((struct socket *, struct mbuf *)); +void sbappendsb _P((struct sbuf *, struct mbuf *)); +void sbcopy _P((struct sbuf *, int, int, char *)); #endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c old mode 100644 new mode 100755 index dc2fdc658..44f777d08 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -84,7 +84,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256+1]; + char buff2[256]; FILE *f; int found = 0; struct in_addr tmp_addr; @@ -211,8 +211,8 @@ int slirp_select_fill(int *pnfds, * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || - ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); - + (&ipq.ip_link != ipq.ip_link.next)); + for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; @@ -220,14 +220,14 @@ int slirp_select_fill(int *pnfds, * See if we need a tcp_fasttimo */ if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ + time_fasttimo = curtime; /* Flag when we want a fasttimo */ /* * NOFDREF can include still connecting to local-host, * newly socreated() sockets etc. Don't want to select these. */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; + continue; /* * Set for reading sockets which are accepting @@ -346,18 +346,18 @@ int slirp_select_fill(int *pnfds, void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) { - struct socket *so, *so_next; - int ret; + struct socket *so, *so_next; + int ret; - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; /* Update time */ updtime(); - + /* - * See if anything has timed out + * See if anything has timed out */ if (link_up) { if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { @@ -370,7 +370,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) last_slowtimo = curtime; } } - + /* * Check sockets */ @@ -380,21 +380,21 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; - + /* * FD_ISSET is meaningless on these sockets * (and they can crash the program) */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - + continue; + /* * Check for URG data * This will soread as well, so no need to * test for readfds below if this succeeds */ if (FD_ISSET(so->s, xfds)) - sorecvoob(so); + sorecvoob(so); /* * Check sockets for reading */ @@ -407,92 +407,86 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) continue; } /* else */ ret = soread(so); - + /* Output it if we read something */ if (ret > 0) - tcp_output(sototcpcb(so)); + tcp_output(sototcpcb(so)); } - + /* * Check sockets for writing */ if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, (char*)&ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } - else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ } - + /* * Probe a still-connecting, non-blocking socket * to check if it's still alive - */ + */ #ifdef PROBE_CONN if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0, 0); - - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } - else { - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } - else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - } /* SS_ISFCONNECTING */ + ret = recv(so->s, (char *)&ret, 0,0); + + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } else { + ret = send(so->s, &ret, 0,0); + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); + } /* SS_ISFCONNECTING */ #endif - } - + } + /* * Now UDP sockets. * Incoming packets are sent straight away, they're not buffered. @@ -500,27 +494,27 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = udb.so_next; so != &udb; so = so_next) { so_next = so->so_next; - + if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } + sorecvfrom(so); + } } -} - + } + /* * See if we can start outputting */ if (if_queued && link_up) - if_start(); + if_start(); /* clear global file descriptor sets. * these reside on the stack in vl.c * so they're unusable if we're not in * slirp_select_fill or slirp_select_poll. */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; } #define ETH_ALEN 6 diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h old mode 100644 new mode 100755 index b845caa77..16266f6c1 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -22,12 +22,18 @@ typedef char *caddr_t; typedef int socklen_t; typedef unsigned long ioctlsockopt_t; +# include # include -# include # include # include # define USE_FIONBIO 1 +# define EWOULDBLOCK WSAEWOULDBLOCK +# define EINPROGRESS WSAEINPROGRESS +# define ENOTCONN WSAENOTCONN +# define EHOSTUNREACH WSAEHOSTUNREACH +# define ENETUNREACH WSAENETUNREACH +# define ECONNREFUSED WSAECONNREFUSED /* Basilisk II Router defines those */ # define udp_read_completion slirp_udp_read_completion @@ -133,29 +139,35 @@ typedef u_int32_t uint32; #include #endif +#ifndef _P +#ifndef NO_PROTOTYPES +# define _P(x) x +#else +# define _P(x) () +#endif +#endif + + #ifdef GETTIMEOFDAY_ONE_ARG #define gettimeofday(x, y) gettimeofday(x) #endif /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup(const char *); +char *strdup _P((const char *)); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc(size_t arg); -void free(void *ptr); +void *malloc _P((size_t arg)); +void free _P((void *ptr)); #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia); +int inet_aton _P((const char *cp, struct in_addr *ia)); #endif #include -#ifdef _WIN32 -#include -#endif #ifndef NO_UNIX_SOCKETS #include #endif @@ -187,7 +199,11 @@ int inet_aton(const char *cp, struct in_addr *ia); #include #endif +#ifdef __STDC__ #include +#else +#include +#endif #include @@ -204,13 +220,8 @@ int inet_aton(const char *cp, struct in_addr *ia); #if defined __GNUC__ #define PACKED__ __attribute__ ((packed)) -#elif defined _MSC_VER -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET -#define PACKED__ #elif defined __sgi #define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET 0 #define PACKED__ #else #error "Packed attribute or pragma shall be supported" @@ -246,49 +257,41 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start(void); +void if_start _P((void)); #else -void if_start(struct ttys *); +void if_start _P((struct ttys *)); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len(char *, const char *, va_list); - extern int sprintf_len(char *, const char *, ...); + extern int vsprintf_len _P((char *, const char *, va_list)); + extern int sprintf_len _P((char *, const char *, ...)); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf(char *, const char *, va_list); + extern int vsprintf _P((char *, const char *, va_list)); # endif - extern int vfprintf(FILE *, const char *, va_list); + extern int vfprintf _P((FILE *, const char *, va_list)); #endif #ifndef HAVE_STRERROR - extern char *strerror(int error); + extern char *strerror _P((int error)); #endif #ifndef HAVE_INDEX - char *index(const char *, int); + char *index _P((const char *, int)); #endif #ifndef HAVE_GETHOSTID - long gethostid(void); + long gethostid _P((void)); #endif -void lprint(const char *, ...); +void lprint _P((const char *, ...)); extern int do_echo; -#if SIZEOF_CHAR_P == 4 -# define insque_32 insque -# define remque_32 remque -#else - extern inline void insque_32(void *, void *); - extern inline void remque_32(void *); -#endif - #ifndef _WIN32 #include #endif @@ -299,47 +302,48 @@ extern int do_echo; int cksum(struct mbuf *m, int len); /* if.c */ -void if_init(void); -void if_output(struct socket *, struct mbuf *); +void if_init _P((void)); +void if_output _P((struct socket *, struct mbuf *)); /* ip_input.c */ -void ip_init(void); -void ip_input(struct mbuf *); -struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); -void ip_freef(struct ipq *); -void ip_enq(register struct ipasfrag *, register struct ipasfrag *); -void ip_deq(register struct ipasfrag *); -void ip_slowtimo(void); -void ip_stripoptions(register struct mbuf *, struct mbuf *); +void ip_init _P((void)); +void ip_input _P((struct mbuf *)); +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *); +void ip_freef _P((struct ipq *)); +void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); +void ip_deq _P((register struct ipasfrag *)); +void ip_slowtimo _P((void)); +void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); /* ip_output.c */ -int ip_output(struct socket *, struct mbuf *); +int ip_output _P((struct socket *, struct mbuf *)); /* tcp_input.c */ -int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); -void tcp_input(register struct mbuf *, int, struct socket *); -void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); -void tcp_xmit_timer(register struct tcpcb *, int); -u_int tcp_mss(register struct tcpcb *, u_int); +int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); +void tcp_input _P((register struct mbuf *, int, struct socket *)); +void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); +void tcp_xmit_timer _P((register struct tcpcb *, int)); +int tcp_mss _P((register struct tcpcb *, u_int)); /* tcp_output.c */ -int tcp_output(register struct tcpcb *); -void tcp_setpersist(register struct tcpcb *); +int tcp_output _P((register struct tcpcb *)); +void tcp_setpersist _P((register struct tcpcb *)); /* tcp_subr.c */ -void tcp_init(void); -void tcp_template(struct tcpcb *); -void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); -struct tcpcb * tcp_newtcpcb(struct socket *); -struct tcpcb * tcp_close(register struct tcpcb *); -void tcp_drain(void); -void tcp_sockclosed(struct tcpcb *); -int tcp_fconnect(struct socket *); -void tcp_connect(struct socket *); -int tcp_attach(struct socket *); -u_int8_t tcp_tos(struct socket *); -int tcp_emu(struct socket *, struct mbuf *); -int tcp_ctl(struct socket *); +void tcp_init _P((void)); +void tcp_template _P((struct tcpcb *)); +void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); +struct tcpcb * tcp_newtcpcb _P((struct socket *)); +struct tcpcb * tcp_close _P((register struct tcpcb *)); +void tcp_drain _P((void)); +void tcp_sockclosed _P((struct tcpcb *)); +int tcp_fconnect _P((struct socket *)); +void tcp_connect _P((struct socket *)); +int tcp_attach _P((struct socket *)); +u_int8_t tcp_tos _P((struct socket *)); +int tcp_emu _P((struct socket *, struct mbuf *)); +int tcp_ctl _P((struct socket *)); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -355,4 +359,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif +#ifdef _WIN32 +#undef errno +#define errno (WSAGetLastError()) +#endif + #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h old mode 100644 new mode 100755 index 237268fa8..e583dcc80 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -40,6 +40,11 @@ */ #undef USE_LOWCPU +/* Define this if your compiler doesn't like prototypes */ +#ifndef __STDC__ +#define NO_PROTOTYPES +#endif + /*********************************************************/ /* * Autoconf defined configuration options @@ -72,6 +77,9 @@ /* Define if you have sys/stropts.h */ #undef HAVE_SYS_STROPTS_H +/* Define if your compiler doesn't like prototypes */ +#undef NO_PROTOTYPES + /* Define if you don't have u_int32_t etc. typedef'd */ #undef NEED_TYPEDEFS #ifdef __sun__ diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c old mode 100644 new mode 100755 index 42ba31b24..f3d10e538 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -14,12 +14,6 @@ #include #endif -#ifdef _WIN32 -#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) -#else -#define IS_EAGAIN(e) ((e) == EAGAIN) -#endif - void so_init() { @@ -103,12 +97,11 @@ int soread(so) struct socket *so; { - int n, nn; - u_int lss, total; + int n, nn, lss, total; struct sbuf *sb = &so->so_snd; - u_int len = sb->sb_datalen - sb->sb_cc; + int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; - u_int mss = so->so_tcpcb->t_maxseg; + int mss = so->so_tcpcb->t_maxseg; DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); @@ -166,8 +159,7 @@ soread(so) nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif if (nn <= 0) { - int error = WSAGetLastError(); - if (nn < 0 && IS_EAGAIN(error)) + if (nn < 0 && (errno == EINTR || errno == EAGAIN)) return 0; else { DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); @@ -305,7 +297,7 @@ sowrite(so) { int n,nn; struct sbuf *sb = &so->so_rcv; - u_int len = sb->sb_cc; + int len = sb->sb_cc; struct iovec iov[2]; DEBUG_CALL("sowrite"); @@ -352,12 +344,9 @@ sowrite(so) nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0) { - int error = WSAGetLastError(); - if (IS_EAGAIN(error)) - return 0; - } - + if (nn < 0 && (errno == EAGAIN || errno == EINTR)) + return 0; + if (nn <= 0) { DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", so->so_state, errno)); @@ -416,9 +405,8 @@ sorecvfrom(so) if(len == -1 || len == 0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", errno,strerror(errno))); @@ -431,7 +419,7 @@ sorecvfrom(so) udp_detach(so); } else { /* A "normal" UDP packet */ struct mbuf *m; - u_int len; + int len; ioctlsockopt_t n; if (!(m = m_get())) return; @@ -454,14 +442,13 @@ sorecvfrom(so) m->m_len = recvfrom(so->s, m->m_data, len, 0, (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %zu, errno = %d-%s\n", + DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", m->m_len, errno,strerror(errno))); if(m->m_len<0) { u_char code=ICMP_UNREACH_PORT; - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); @@ -526,9 +513,7 @@ sosendto(so, m) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - char addrstr[INET_ADDRSTRLEN]; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); /* Don't care what port we get */ ret = sendto(so->s, m->m_data, m->m_len, 0, @@ -599,12 +584,16 @@ solisten(port, laddr, lport, flags) (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || (listen(s,1) < 0)) { - int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ + int tmperrno = errno; /* Don't clobber the real reason we failed */ close(s); sofree(so); /* Restore the real errno */ - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(tmperrno); +#else + errno = tmperrno; +#endif return NULL; } setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h old mode 100644 new mode 100755 index 3b0fee169..d05354c8c --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -81,24 +81,24 @@ struct iovec { }; #endif -void so_init(void); -struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); -struct socket * socreate(void); -void sofree(struct socket *); -int soread(struct socket *); -void sorecvoob(struct socket *); -int sosendoob(struct socket *); -int sowrite(struct socket *); -void sorecvfrom(struct socket *); -int sosendto(struct socket *, struct mbuf *); -struct socket * solisten(u_int, u_int32_t, u_int, int); -void sorwakeup(struct socket *); -void sowwakeup(struct socket *); -void soisfconnecting(register struct socket *); -void soisfconnected(register struct socket *); -void sofcantrcvmore(struct socket *); -void sofcantsendmore(struct socket *); -void soisfdisconnected(struct socket *); -void sofwdrain(struct socket *); +void so_init _P((void)); +struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); +struct socket * socreate _P((void)); +void sofree _P((struct socket *)); +int soread _P((struct socket *)); +void sorecvoob _P((struct socket *)); +int sosendoob _P((struct socket *)); +int sowrite _P((struct socket *)); +void sorecvfrom _P((struct socket *)); +int sosendto _P((struct socket *, struct mbuf *)); +struct socket * solisten _P((u_int, u_int32_t, u_int, int)); +void sorwakeup _P((struct socket *)); +void sowwakeup _P((struct socket *)); +void soisfconnecting _P((register struct socket *)); +void soisfconnected _P((register struct socket *)); +void sofcantrcvmore _P((struct socket *)); +void sofcantsendmore _P((struct socket *)); +void soisfdisconnected _P((struct socket *)); +void sofwdrain _P((struct socket *)); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h old mode 100644 new mode 100755 index 24e7914ab..5f03f9e17 --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -38,8 +38,8 @@ typedef u_int32_t tcp_seq; #define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ #define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ -extern size_t tcp_rcvspace; -extern size_t tcp_sndspace; +extern int tcp_rcvspace; +extern int tcp_sndspace; extern struct socket *tcp_last_so; #define TCP_SNDSPACE 8192 @@ -78,7 +78,7 @@ struct tcphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif #include "tcp_var.h" diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c old mode 100644 new mode 100755 index 032e5378e..fc7c0bc01 --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -68,7 +68,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #ifdef TCP_ACK_HACK #define TCP_REASS(tp, ti, m, so, flags) {\ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) {\ if (ti->ti_flags & TH_PUSH) \ tp->t_flags |= TF_ACKNOW; \ @@ -91,7 +91,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #else #define TCP_REASS(tp, ti, m, so, flags) { \ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ + tcpfrag_list_empty(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) { \ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ @@ -111,7 +111,10 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #endif int -tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) +tcp_reass(tp, ti, m) + register struct tcpcb *tp; + register struct tcpiphdr *ti; + struct mbuf *m; { register struct tcpiphdr *q; struct socket *so = tp->t_socket; @@ -127,8 +130,8 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * /* * Find a segment which begins after this one does. */ - for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; - q = (struct tcpiphdr *)q->ti_next) + for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); + q = tcpiphdr_next(q)) if (SEQ_GT(q->ti_seq, ti->ti_seq)) break; @@ -137,9 +140,9 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { + if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { register int i; - q = (struct tcpiphdr *)q->ti_prev; + q = tcpiphdr_prev(q); /* conversion to int (in i) handles seq wraparound */ i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { @@ -159,37 +162,36 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * ti->ti_len -= i; ti->ti_seq += i; } - q = (struct tcpiphdr *)(q->ti_next); + q = tcpiphdr_next(q); } tcpstat.tcps_rcvoopack++; tcpstat.tcps_rcvoobyte += ti->ti_len; - REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ + ti->ti_mbuf = m; /* * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct tcpiphdr *)tp) { + while (!tcpfrag_list_end(q, tp)) { register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; if (i <= 0) break; if (i < q->ti_len) { q->ti_seq += i; q->ti_len -= i; - m_adj((struct mbuf *) REASS_MBUF(q), i); + m_adj(q->ti_mbuf, i); break; } - q = (struct tcpiphdr *)q->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); - remque_32((void *)(q->ti_prev)); + q = tcpiphdr_next(q); + m = tcpiphdr_prev(q)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(q))); m_freem(m); } /* * Stick new segment in its place. */ - insque_32(ti, (void *)(q->ti_prev)); - + insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); present: /* * Present data to user, advancing rcv_nxt through @@ -197,17 +199,17 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * */ if (!TCPS_HAVEESTABLISHED(tp->t_state)) return (0); - ti = (struct tcpiphdr *) tp->seg_next; - if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) + ti = tcpfrag_list_first(tp); + if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) return (0); if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) return (0); do { tp->rcv_nxt += ti->ti_len; flags = ti->ti_flags & TH_FIN; - remque_32(ti); - m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ - ti = (struct tcpiphdr *)ti->ti_next; + remque(tcpiphdr2qlink(ti)); + m = ti->ti_mbuf; + ti = tcpiphdr_next(ti); /* if (so->so_state & SS_FCANTRCVMORE) */ if (so->so_state & SS_FCANTSENDMORE) m_freem(m); @@ -226,9 +228,13 @@ tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf * * TCP input routine, follows pages 65-76 of the * protocol specification dated September, 1981 very closely. */ -void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) +void +tcp_input(m, iphlen, inso) + register struct mbuf *m; + int iphlen; + struct socket *inso; { - struct ip save_ip, *ip; + struct ip save_ip, *ip; register struct tcpiphdr *ti; caddr_t optp = NULL; int optlen = 0; @@ -236,25 +242,23 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) register struct tcpcb *tp = 0; register int tiflags; struct socket *so = 0; - int todrop; - u_int acked; - int ourfinisacked, needoutput = 0; - /* int dropsocket = 0; */ + int todrop, acked, ourfinisacked, needoutput = 0; +/* int dropsocket = 0; */ int iss = 0; u_long tiwin; int ret; - /* int ts_present = 0; */ +/* int ts_present = 0; */ DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", - (long)m, iphlen, (long)inso)); - + DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", + (long )m, iphlen, (long )inso )); + /* * If called with m == 0, then we're continuing the connect */ if (m == NULL) { so = inso; - + /* Re-set a few variables */ tp = sototcpcb(so); m = so->so_m; @@ -262,46 +266,47 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) ti = so->so_ti; tiwin = ti->ti_win; tiflags = ti->ti_flags; - + goto cont_conn; } - - + + tcpstat.tcps_rcvtotal++; /* * Get IP and TCP header together in first mbuf. * Note: IP leaves IP header in first mbuf. */ ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); + if (iphlen > sizeof(struct ip )) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen=sizeof(struct ip ); } /* XXX Check if too short */ - + /* * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - ip = mtod(m, struct ip *); - save_ip = *ip; - save_ip.ip_len += iphlen; + ip=mtod(m, struct ip *); + save_ip = *ip; + save_ip.ip_len+= iphlen; /* * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip) + tlen; + len = sizeof(struct ip ) + tlen; /* keep checksum for ICMP reply - * ti->ti_sum = cksum(m, len); + * ti->ti_sum = cksum(m, len); * if (ti->ti_sum) { */ - if (cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; + if(cksum(m, len)) { + tcpstat.tcps_rcvbadsum++; + goto drop; } /* @@ -309,37 +314,37 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * pull out TCP options and adjust length. XXX */ off = ti->ti_off << 2; - if (off < sizeof(struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; + if (off < sizeof (struct tcphdr) || off > tlen) { + tcpstat.tcps_rcvbadoff++; + goto drop; } tlen -= off; ti->ti_len = tlen; - if (off > sizeof(struct tcphdr)) { - optlen = off - sizeof(struct tcphdr); - optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); + if (off > sizeof (struct tcphdr)) { + optlen = off - sizeof (struct tcphdr); + optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); - /* + /* * Do quick retrieval of timestamp options ("options * prediction?"). If timestamp is the only option and it's * formatted as recommended in RFC 1323 appendix A, we * quickly get the values now and not bother calling * tcp_dooptions(), etc. */ - /* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ +/* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ } tiflags = ti->ti_flags; - + /* * Convert TCP protocol specific fields to host format. */ @@ -351,20 +356,20 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) /* * Drop TCP, IP headers and TCP options. */ - m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - + m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + /* * Locate pcb for segment. */ findso: so = tcp_last_so; if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); + ti->ti_dst, ti->ti_dport); if (so) tcp_last_so = so; ++tcpstat.tcps_socachemiss; @@ -377,63 +382,63 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) * but should either do a listen or a connect soon. * * state == CLOSED means we've done socreate() but haven't - * attached it to a protocol yet... - * + * attached it to a protocol yet... + * * XXX If a TCB does not exist, and the TH_SYN flag is * the only flag set, then create a session, mark it * as if it was LISTENING, and continue... */ if (so == 0) { - if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) - goto dropwithreset; - - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } - - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); - - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ - - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; - - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; - - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; + if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) + goto dropwithreset; + + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } + + sbreserve(&so->so_snd, tcp_sndspace); + sbreserve(&so->so_rcv, tcp_rcvspace); + + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ + + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; + + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; + + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; } - - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; + + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; tp = sototcpcb(so); - + /* XXX Should never fail */ if (tp == 0) goto dropwithreset; if (tp->t_state == TCPS_CLOSED) goto drop; - + /* Unscale the window into a 32-bit value. */ /* if ((tiflags & TH_SYN) == 0) * tiwin = ti->ti_win << tp->snd_scale; * else */ - tiwin = ti->ti_win; + tiwin = ti->ti_win; /* * Segment received on connection. @@ -441,66 +446,66 @@ void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) */ tp->t_idle = 0; if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; + tp->t_timer[TCPT_KEEP] = tcp_keepidle; /* * Process options if not in LISTEN state, * else do it below (after getting remote address). */ if (optp && tp->t_state != TCPS_LISTEN) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ + tcp_dooptions(tp, (u_char *)optp, optlen, ti); +/* , */ +/* &ts_present, &ts_val, &ts_ecr); */ + + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && - /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { - /* + (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && +/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { + /* * If last ACK falls within this segment's sequence numbers, * record the timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ if (ti->ti_len == 0) { if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { /* * this is a pure ack for outstanding data. */ ++tcpstat.tcps_predack; - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && -SEQ_GT(ti->ti_ack, tp->t_rtseq)) +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && + SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_xmit_timer(tp, tp->t_rtt); acked = ti->ti_ack - tp->snd_una; tcpstat.tcps_rcvackpack++; @@ -523,27 +528,26 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* + /* * There's room in so_snd, sowwakup will read() * from the socket if we can */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ if (so->so_snd.sb_cc) (void) tcp_output(tp); return; } - } - else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && - ti->ti_len <= sbspace(&so->so_rcv)) { + } else if (ti->ti_ack == tp->snd_una && + tcpfrag_list_empty(tp) && + ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet * with nothing on the reassembly queue and @@ -557,26 +561,25 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Add data to socket buffer. */ if (so->so_emu) { - if (tcp_emu(so, m)) sbappend(so, m); - } - else + if (tcp_emu(so,m)) sbappend(so, m); + } else sbappend(so, m); - - /* + + /* * XXX This is called when data arrives. Later, check * if we can actually write() to the socket * XXX Need to check? It's be NON_BLOCKING */ - /* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ +/* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ tp->t_flags |= TF_ACKNOW; tcp_output(tp); return; @@ -589,147 +592,141 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * but not less than advertised window. */ { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); } switch (tp->t_state) { - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ case TCPS_LISTEN: { - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; - - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ - - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; + + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ + + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { #if 0 - if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } - else + if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } else #endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } - } - } - if (so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if (tcp_fconnect(so) == -1) { - int error = WSAGetLastError(); - if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { - u_char code = ICMP_UNREACH_NET; - DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", - errno, strerror(errno))); - if (error == WSAECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, - TH_RST | TH_ACK); - } - else { - if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - *ip = save_ip; - icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - return; - } - } - - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - return; - - cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if(ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } } - cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR / 2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; + } + if(so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ + } + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { + u_char code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", + errno,strerror(errno))); + if(errno == ECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, + TH_RST|TH_ACK); + } else { + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + *ip=save_ip; + icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + } else { + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + } + return; + + cont_conn: + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } + cont_input: + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tcpstat.tcps_accepts++; + goto trimthenstep6; } /* case TCPS_LISTEN */ - + /* * If the state is SYN_SENT: * if seg contains an ACK, but not for our SYN, drop the input. @@ -744,13 +741,13 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ case TCPS_SYN_SENT: if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) goto dropwithreset; if (tiflags & TH_RST) { if (tiflags & TH_ACK) - tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ + tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ goto drop; } @@ -770,7 +767,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcpstat.tcps_connects++; soisfconnected(so); tp->t_state = TCPS_ESTABLISHED; - + /* Do window scaling on this connection? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -778,7 +775,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); /* * if we didn't have to retransmit the SYN, @@ -786,11 +783,10 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) */ if (tp->t_rtt) tcp_xmit_timer(tp, tp->t_rtt); - } - else + } else tp->t_state = TCPS_SYN_RECEIVED; - trimthenstep6: +trimthenstep6: /* * Advance ti->ti_seq to correspond to first data byte. * If data, trim to stay within window, @@ -812,45 +808,45 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* * States other than LISTEN or SYN_SENT. * First check timestamp, if present. - * Then check that at least some bytes of segment are within + * Then check that at least some bytes of segment are within * receive window. If segment begins before rcv_nxt, * drop leading data (and SYN); if nothing left, just ack. - * + * * RFC 1323 PAWS: If we have a timestamp reply on this segment * and it's less than ts_recent, drop it. */ - /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ - /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ - /* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ +/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ +/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ +/* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ todrop = tp->rcv_nxt - ti->ti_seq; if (todrop > 0) { if (tiflags & TH_SYN) { tiflags &= ~TH_SYN; ti->ti_seq++; - if (ti->ti_urp > 1) + if (ti->ti_urp > 1) ti->ti_urp--; else tiflags &= ~TH_URG; @@ -860,14 +856,14 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Following if statement from Stevens, vol. 2, p. 960. */ if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { /* * Any valid FIN must be to the left of the window. * At this point the FIN must be a duplicate or out * of sequence; drop it. */ tiflags &= ~TH_FIN; - + /* * Send an ACK to resynchronize and drop any data. * But keep on processing for RST or ACK. @@ -876,8 +872,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) todrop = ti->ti_len; tcpstat.tcps_rcvduppack++; tcpstat.tcps_rcvdupbyte += todrop; - } - else { + } else { tcpstat.tcps_rcvpartduppack++; tcpstat.tcps_rcvpartdupbyte += todrop; } @@ -896,7 +891,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * user processes are gone, then RST the other end. */ if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { tp = tcp_close(tp); tcpstat.tcps_rcvafterclose++; goto dropwithreset; @@ -906,7 +901,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If segment ends after window, drop trailing data * (and PUSH and FIN); if nothing left, just ACK. */ - todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); + todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); if (todrop > 0) { tcpstat.tcps_rcvpackafterwin++; if (todrop >= ti->ti_len) { @@ -918,8 +913,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * are above the previous ones. */ if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { iss = tp->rcv_nxt + TCP_ISSINCR; tp = tcp_close(tp); goto findso; @@ -934,55 +929,53 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { tp->t_flags |= TF_ACKNOW; tcpstat.tcps_rcvwinprobe++; - } - else + } else goto dropafterack; - } - else + } else tcpstat.tcps_rcvbyteafterwin += todrop; m_adj(m, -todrop); ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH | TH_FIN); + tiflags &= ~(TH_PUSH|TH_FIN); } /* * If last ACK falls within this segment's sequence numbers, * record its timestamp. */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ if (tiflags&TH_RST) switch (tp->t_state) { case TCPS_SYN_RECEIVED: - /* so->so_error = ECONNREFUSED; */ +/* so->so_error = ECONNREFUSED; */ goto close; case TCPS_ESTABLISHED: case TCPS_FIN_WAIT_1: case TCPS_FIN_WAIT_2: case TCPS_CLOSE_WAIT: - /* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; +/* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + tcpstat.tcps_drops++; + tp = tcp_close(tp); + goto drop; case TCPS_CLOSING: case TCPS_LAST_ACK: @@ -996,7 +989,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * error and we send an RST and drop the connection. */ if (tiflags & TH_SYN) { - tp = tcp_drop(tp, 0); + tp = tcp_drop(tp,0); goto dropwithreset; } @@ -1009,45 +1002,42 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Ack processing. */ switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ case TCPS_SYN_RECEIVED: if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) + SEQ_GT(ti->ti_ack, tp->snd_max)) goto dropwithreset; tcpstat.tcps_connects++; tp->t_state = TCPS_ESTABLISHED; - /* - * The sent SYN is ack'ed with our sequence number +1 - * The first data byte already in the buffer will get + /* + * The sent SYN is ack'ed with our sequence number +1 + * The first data byte already in the buffer will get * lost if no correction is made. This is only needed for * SS_CTL since the buffer is empty otherwise. - * tp->snd_una++; or: + * tp->snd_una++; or: */ - tp->snd_una = ti->ti_ack; + tp->snd_una=ti->ti_ack; if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } - else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } - else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } - else { - soisfconnected(so); + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } else { + soisfconnected(so); } - + /* Do window scaling? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -1055,7 +1045,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * tp->rcv_scale = tp->request_r_scale; * } */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); tp->snd_wl1 = ti->ti_seq - 1; /* Avoid ack processing; snd_una==ti_ack => dup ack */ goto synrx_to_est; @@ -1079,9 +1069,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", - (long)m, (long)so)); + tcpstat.tcps_rcvdupack++; + DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", + (long )m, (long )so)); /* * If we have outstanding data (other than * a window probe), this is a completely @@ -1101,18 +1091,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * the new ssthresh). * * Dup acks mean that packets have left the - * network (they're now cached at the receiver) + * network (they're now cached at the receiver) * so bump cwnd by the amount in the receiver * to keep a constant cwnd packets in the * network. */ if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) + ti->ti_ack != tp->snd_una) tp->t_dupacks = 0; else if (++tp->t_dupacks == tcprexmtthresh) { tcp_seq onxt = tp->snd_nxt; u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / + min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; if (win < 2) @@ -1122,20 +1112,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tp->t_rtt = 0; tp->snd_nxt = ti->ti_ack; tp->snd_cwnd = tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; + tp->t_maxseg * tp->t_dupacks; if (SEQ_GT(onxt, tp->snd_nxt)) tp->snd_nxt = onxt; goto drop; - } - else if (tp->t_dupacks > tcprexmtthresh) { + } else if (tp->t_dupacks > tcprexmtthresh) { tp->snd_cwnd += tp->t_maxseg; - (void)tcp_output(tp); + (void) tcp_output(tp); goto drop; } - } - else + } else tp->t_dupacks = 0; break; } @@ -1145,7 +1133,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * for the other side's cached packets, retract it. */ if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) + tp->snd_cwnd > tp->snd_ssthresh) tp->snd_cwnd = tp->snd_ssthresh; tp->t_dupacks = 0; if (SEQ_GT(ti->ti_ack, tp->snd_max)) { @@ -1165,12 +1153,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * timer backoff (cf., Phil Karn's retransmit alg.). * Recompute the initial retransmit timer. */ - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp,tp->t_rtt); /* * If all outstanding data is acked, stop retransmit @@ -1181,8 +1169,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) if (ti->ti_ack == tp->snd_max) { tp->t_timer[TCPT_REXMT] = 0; needoutput = 1; - } - else if (tp->t_timer[TCPT_PERSIST] == 0) + } else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; /* * When new data is acked, open the congestion window. @@ -1192,41 +1179,40 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * (maxseg^2 / cwnd per packet). */ { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); } if (acked > so->so_snd.sb_cc) { tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, so->so_snd.sb_cc); + sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); ourfinisacked = 1; - } - else { + } else { sbdrop(&so->so_snd, acked); tp->snd_wnd -= acked; ourfinisacked = 0; } /* * XXX sowwakup is called when data is acked and there's room for - * for more data... it should read() the socket + * for more data... it should read() the socket */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ tp->snd_una = ti->ti_ack; if (SEQ_LT(tp->snd_nxt, tp->snd_una)) tp->snd_nxt = tp->snd_una; switch (tp->t_state) { - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ case TCPS_FIN_WAIT_1: if (ourfinisacked) { /* @@ -1244,12 +1230,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ case TCPS_CLOSING: if (ourfinisacked) { tp->t_state = TCPS_TIME_WAIT; @@ -1259,12 +1245,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ case TCPS_LAST_ACK: if (ourfinisacked) { tp = tcp_close(tp); @@ -1272,11 +1258,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) } break; - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; goto dropafterack; @@ -1289,12 +1275,12 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Don't look at window if no ACK: TAC's send garbage on first SYN. */ if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { /* keep track of pure window updates */ if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) tcpstat.tcps_rcvwinupd++; tp->snd_wnd = tiwin; tp->snd_wl1 = ti->ti_seq; @@ -1308,7 +1294,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Process segments with URG. */ if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { /* * This is a kludge, but if we receive and accept * random urgent pointers, we'll crash in @@ -1324,32 +1310,31 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If this segment advances the known urgent pointer, * then mark the data stream. This should not happen * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since - * a FIN has been received from the remote side. + * a FIN has been received from the remote side. * In these states we ignore the URG. * * According to RFC961 (Assigned Protocols), * the urgent pointer points to the last octet * of urgent data. We continue, however, * to consider it to indicate the first octet - * of data past the urgent section as the original + * of data past the urgent section as the original * spec states (in one of two places). */ - if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { + if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + + so->so_urgc = so->so_rcv.sb_cc + (tp->rcv_up - tp->rcv_nxt); /* -1; */ tp->rcv_up = ti->ti_seq + ti->ti_urp; - + } - } - else + } else /* * If no out of band data is expected, * pull receive urgent pointer along * with the receive window. */ if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; + tp->rcv_up = tp->rcv_nxt; dodata: /* @@ -1361,7 +1346,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * connection then we just ignore the text. */ if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { TCP_REASS(tp, ti, m, so, tiflags); /* * Note the amount of data that peer has sent into @@ -1369,8 +1354,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * buffer size. */ len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } - else { + } else { m_free(m); tiflags &= ~TH_FIN; } @@ -1384,45 +1368,45 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) /* * If we receive a FIN we can't send more data, * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the + * Shutdown the socket if there is no rx data in the * buffer. * soread() is called on completion of shutdown() and * will got to TCPS_LAST_ACK, and use tcp_output() * to send the FIN. */ - /* sofcantrcvmore(so); */ +/* sofcantrcvmore(so); */ sofwdrain(so); - + tp->t_flags |= TF_ACKNOW; tp->rcv_nxt++; } switch (tp->t_state) { - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ case TCPS_SYN_RECEIVED: case TCPS_ESTABLISHED: - if (so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ + if(so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ case TCPS_FIN_WAIT_1: tp->t_state = TCPS_CLOSING; break; - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ case TCPS_FIN_WAIT_2: tp->t_state = TCPS_TIME_WAIT; tcp_canceltimers(tp); @@ -1430,9 +1414,9 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) soisfdisconnected(so); break; - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; break; @@ -1443,18 +1427,18 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * If this is a small packet, then ACK now - with Nagel * congestion avoidance sender won't send more until * he gets an ACK. - * + * * See above. */ - /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ - /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ +/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ +/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { tp->t_flags |= TF_ACKNOW; } @@ -1462,7 +1446,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * Return any desired output. */ if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void)tcp_output(tp); + (void) tcp_output(tp); } return; @@ -1475,7 +1459,7 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) goto drop; m_freem(m); tp->t_flags |= TF_ACKNOW; - (void)tcp_output(tp); + (void) tcp_output(tp); return; dropwithreset: @@ -1484,8 +1468,8 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); else { if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, - TH_RST | TH_ACK); + tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, + TH_RST|TH_ACK); } return; @@ -1504,7 +1488,11 @@ SEQ_GT(ti->ti_ack, tp->t_rtseq)) * u_int32_t *ts_val, *ts_ecr; */ void -tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) +tcp_dooptions(tp, cp, cnt, ti) + struct tcpcb *tp; + u_char *cp; + int cnt; + struct tcpiphdr *ti; { u_int16_t mss; int opt, optlen; @@ -1535,7 +1523,7 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) continue; memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); NTOHS(mss); - tcp_mss(tp, mss); /* sets t_maxseg */ + (void) tcp_mss(tp, mss); /* sets t_maxseg */ break; /* case TCPOPT_WINDOW: @@ -1580,7 +1568,11 @@ tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) #ifdef notdef -void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) +void +tcp_pulloutofband(so, ti, m) + struct socket *so; + struct tcpiphdr *ti; + register struct mbuf *m; { int cnt = ti->ti_urp - 1; @@ -1610,7 +1602,10 @@ void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct m * and update averages and current timeout. */ -void tcp_xmit_timer(register struct tcpcb *tp, int rtt) +void +tcp_xmit_timer(tp, rtt) + register struct tcpcb *tp; + int rtt; { register short delta; @@ -1697,10 +1692,13 @@ void tcp_xmit_timer(register struct tcpcb *tp, int rtt) * parameters from pre-set or cached values in the routing entry. */ -u_int tcp_mss(register struct tcpcb *tp, u_int offer) +int +tcp_mss(tp, offer) + register struct tcpcb *tp; + u_int offer; { struct socket *so = tp->t_socket; - u_int mss; + int mss; DEBUG_CALL("tcp_mss"); DEBUG_ARG("tp = %lx", (long)tp); diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c old mode 100644 new mode 100755 index 01df0118f..5cb1a61e3 --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -63,7 +63,9 @@ u_char tcp_outflags[TCP_NSTATES] = { /* * Tcp output routine: figure out what should be sent and send it. */ -int tcp_output(register struct tcpcb *tp) +int +tcp_output(tp) + register struct tcpcb *tp; { register struct socket *so = tp->t_socket; register long len, win; @@ -124,7 +126,7 @@ int tcp_output(register struct tcpcb *tp) * to send then the probe will be the FIN * itself. */ - if (off < (int)so->so_snd.sb_cc) + if (off < so->so_snd.sb_cc) flags &= ~TH_FIN; win = 1; } else { @@ -199,12 +201,12 @@ int tcp_output(register struct tcpcb *tp) * taking into account that we are limited by * TCP_MAXWIN << tp->rcv_scale. */ - long adv = min(win, TCP_MAXWIN << tp->rcv_scale) - + long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - (tp->rcv_adv - tp->rcv_nxt); - if (adv >= (long)(2 * tp->t_maxseg)) + if (adv >= (long) (2 * tp->t_maxseg)) goto send; - if (2 * adv >= (long)so->so_rcv.sb_datalen) + if (2 * adv >= (long) so->so_rcv.sb_datalen) goto send; } @@ -357,7 +359,7 @@ int tcp_output(register struct tcpcb *tp) */ /* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); + sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); m->m_len += len; /* } else { @@ -433,12 +435,12 @@ int tcp_output(register struct tcpcb *tp) * Calculate receive window. Don't shrink window, * but avoid silly window syndrome. */ - if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) + if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) win = 0; - if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) - win = (u_long) (TCP_MAXWIN << tp->rcv_scale); - if (win < (tp->rcv_adv - tp->rcv_nxt)) - win = (tp->rcv_adv - tp->rcv_nxt); + if (win > (long)TCP_MAXWIN << tp->rcv_scale) + win = (long)TCP_MAXWIN << tp->rcv_scale; + if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) + win = (long)(tp->rcv_adv - tp->rcv_nxt); ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); if (SEQ_GT(tp->snd_up, tp->snd_una)) { @@ -528,7 +530,7 @@ int tcp_output(register struct tcpcb *tp) { - ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; + ((struct ip *)ti)->ip_len = m->m_len; ((struct ip *)ti)->ip_ttl = ip_defttl; ((struct ip *)ti)->ip_tos = so->so_iptos; @@ -579,7 +581,9 @@ int tcp_output(register struct tcpcb *tp) return (0); } -void tcp_setpersist(register struct tcpcb *tp) +void +tcp_setpersist(tp) + register struct tcpcb *tp; { int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c old mode 100644 new mode 100755 index 70e04b5ee..391350802 --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -46,13 +46,14 @@ int tcp_mssdflt = TCP_MSS; int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -size_t tcp_rcvspace; /* You may want to change this */ -size_t tcp_sndspace; /* Keep small if you have an error prone link */ +int tcp_rcvspace; /* You may want to change this */ +int tcp_sndspace; /* Keep small if you have an error prone link */ /* * Tcp initialization */ -void tcp_init() +void +tcp_init() { tcp_iss = 1; /* wrong */ tcb.so_next = tcb.so_prev = &tcb; @@ -73,12 +74,14 @@ void tcp_init() * necessary when the connection is used. */ /* struct tcpiphdr * */ -void tcp_template(struct tcpcb *tp) +void +tcp_template(tp) + struct tcpcb *tp; { struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; - n->ti_next = n->ti_prev = 0; + n->ti_mbuf = NULL; n->ti_x1 = 0; n->ti_pr = IPPROTO_TCP; n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); @@ -110,8 +113,13 @@ void tcp_template(struct tcpcb *tp) * In any case the ack and sequence number of the transmitted * segment are as specified by the parameters. */ -void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, - register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) +void +tcp_respond(tp, ti, m, ack, seq, flags) + struct tcpcb *tp; + register struct tcpiphdr *ti; + register struct mbuf *m; + tcp_seq ack, seq; + int flags; { register int tlen; int win = 0; @@ -156,7 +164,7 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, tlen += sizeof (struct tcpiphdr); m->m_len = tlen; - ti->ti_next = ti->ti_prev = 0; + ti->ti_mbuf = 0; ti->ti_x1 = 0; ti->ti_seq = htonl(seq); ti->ti_ack = htonl(ack); @@ -185,7 +193,9 @@ void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, * empty reassembly queue and hooking it to the argument * protocol control block. */ -struct tcpcb *tcp_newtcpcb(struct socket *so) +struct tcpcb * +tcp_newtcpcb(so) + struct socket *so; { register struct tcpcb *tp; @@ -194,7 +204,7 @@ struct tcpcb *tcp_newtcpcb(struct socket *so) return ((struct tcpcb *)0); memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; + tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; tp->t_maxseg = tcp_mssdflt; tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; @@ -258,7 +268,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) * discard internet protocol block * wake up any sleepers */ -struct tcpcb *tcp_close(register struct tcpcb *tp) +struct tcpcb * +tcp_close(tp) + register struct tcpcb *tp; { register struct tcpiphdr *t; struct socket *so = tp->t_socket; @@ -268,11 +280,11 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) DEBUG_ARG("tp = %lx", (long )tp); /* free the reassembly queue, if any */ - t = (struct tcpiphdr *) tp->seg_next; - while (t != (struct tcpiphdr *)tp) { - t = (struct tcpiphdr *)t->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); - remque_32((struct tcpiphdr *) t->ti_prev); + t = tcpfrag_list_first(tp); + while (!tcpfrag_list_end(t, tp)) { + t = tcpiphdr_next(t); + m = tcpiphdr_prev(t)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(t))); m_freem(m); } /* It's static */ @@ -294,7 +306,8 @@ struct tcpcb *tcp_close(register struct tcpcb *tp) return ((struct tcpcb *)0); } -void tcp_drain() +void +tcp_drain() { /* XXX */ } @@ -306,7 +319,10 @@ void tcp_drain() #ifdef notdef -void tcp_quench(int i, int errno) +void +tcp_quench(i, errno) + + int errno; { struct tcpcb *tp = intotcpcb(inp); @@ -330,7 +346,9 @@ void tcp_quench(int i, int errno) * for peer to send FIN or not respond to keep-alives, etc. * We can let the user exit from the close as soon as the FIN is acked. */ -void tcp_sockclosed(struct tcpcb *tp) +void +tcp_sockclosed(tp) + struct tcpcb *tp; { DEBUG_CALL("tcp_sockclosed"); @@ -371,7 +389,8 @@ void tcp_sockclosed(struct tcpcb *tp) * nonblocking. Connect returns after the SYN is sent, and does * not wait for ACK+SYN. */ -int tcp_fconnect(struct socket *so) +int tcp_fconnect(so) + struct socket *so; { int ret=0; @@ -404,12 +423,10 @@ int tcp_fconnect(struct socket *so) } else addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - - char addrstr[INET_ADDRSTRLEN]; + DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, - addrstr, sizeof(addrstr)))); + ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); /* We don't care what port we get */ ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); @@ -435,7 +452,9 @@ int tcp_fconnect(struct socket *so) * the time it gets to accept(), so... We simply accept * here and SYN the local-host. */ -void tcp_connect(struct socket *inso) +void +tcp_connect(inso) + struct socket *inso; { struct socket *so; struct sockaddr_in addr; @@ -467,7 +486,7 @@ void tcp_connect(struct socket *inso) so->so_lport = inso->so_lport; } - tcp_mss(sototcpcb(so), 0); + (void) tcp_mss(sototcpcb(so), 0); if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { tcp_close(sototcpcb(so)); /* This will sofree() as well */ @@ -520,7 +539,9 @@ void tcp_connect(struct socket *inso) /* * Attach a TCPCB to a socket. */ -int tcp_attach(struct socket *so) +int +tcp_attach(so) + struct socket *so; { if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) return -1; @@ -554,7 +575,9 @@ struct emu_t *tcpemu = 0; /* * Return TOS according to the above table */ -u_int8_t tcp_tos(struct socket *so) +u_int8_t +tcp_tos(so) + struct socket *so; { int i = 0; struct emu_t *emup; @@ -606,7 +629,10 @@ int do_echo = -1; * * NOTE: if you return 0 you MUST m_free() the mbuf! */ -int tcp_emu(struct socket *so, struct mbuf *m) +int +tcp_emu(so, m) + struct socket *so; + struct mbuf *m; { u_int n1, n2, n3, n4, n5, n6; char buff[256]; @@ -807,7 +833,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) ns->so_laddr=so->so_laddr; ns->so_lport=htons(port); - tcp_mss(sototcpcb(ns), 0); + (void) tcp_mss(sototcpcb(ns), 0); ns->so_faddr=so->so_faddr; ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ @@ -1034,7 +1060,7 @@ int tcp_emu(struct socket *so, struct mbuf *m) * of the connection as a NUL-terminated decimal ASCII string. */ so->so_emu = 0; - for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { + for (lport = 0, i = 0; i < m->m_len-1; ++i) { if (m->m_data[i] < '0' || m->m_data[i] > '9') return 1; /* invalid number */ lport *= 10; @@ -1219,7 +1245,9 @@ int tcp_emu(struct socket *so, struct mbuf *m) * Return 0 if this connections is to be closed, 1 otherwise, * return 2 if this is a command-line connection */ -int tcp_ctl(struct socket *so) +int +tcp_ctl(so) + struct socket *so; { struct sbuf *sb = &so->so_snd; int command; diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c old mode 100644 new mode 100755 diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h old mode 100644 new mode 100755 index 73fe20894..0bc438c76 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -130,9 +130,9 @@ extern int tcp_backoff[]; struct tcpcb; -void tcp_fasttimo(void); -void tcp_slowtimo(void); -void tcp_canceltimers(struct tcpcb *); -struct tcpcb * tcp_timers(register struct tcpcb *, int); +void tcp_fasttimo _P((void)); +void tcp_slowtimo _P((void)); +void tcp_canceltimers _P((struct tcpcb *)); +struct tcpcb * tcp_timers _P((register struct tcpcb *, int)); #endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h old mode 100644 new mode 100755 index c8e99ae03..064ac69a1 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -36,18 +36,12 @@ #include "tcpip.h" #include "tcp_timer.h" -#if SIZEOF_CHAR_P == 4 - typedef struct tcpiphdr *tcpiphdrp_32; -#else - typedef u_int32_t tcpiphdrp_32; -#endif - /* * Tcp control block, one per tcp; fields: */ struct tcpcb { - tcpiphdrp_32 seg_next; /* sequencing queue */ - tcpiphdrp_32 seg_prev; + struct tcpiphdr *seg_next; /* sequencing queue */ + struct tcpiphdr *seg_prev; short t_state; /* state of this connection */ short t_timer[TCPT_NTIMERS]; /* tcp timers */ short t_rxtshift; /* log(2) of rexmt exp. backoff */ @@ -166,21 +160,6 @@ struct tcpcb { #define TCP_REXMTVAL(tp) \ (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) -/* XXX - * We want to avoid doing m_pullup on incoming packets but that - * means avoiding dtom on the tcp reassembly code. That in turn means - * keeping an mbuf pointer in the reassembly queue (since we might - * have a cluster). As a quick hack, the source & destination - * port numbers (which are no longer needed once we've located the - * tcpcb) are overlayed with an mbuf pointer. - */ -#if SIZEOF_CHAR_P == 4 -typedef struct mbuf *mbufp_32; -#else -typedef u_int32_t mbufp_32; -#endif -#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) - /* * TCP statistics. * Many of these should be kept per connection, diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h old mode 100644 new mode 100755 index dff5a3c96..7974ce3d5 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -40,8 +40,7 @@ struct tcpiphdr { struct ipovly ti_i; /* overlaid ip structure */ struct tcphdr ti_t; /* tcp header */ }; -#define ti_next ti_i.ih_next -#define ti_prev ti_i.ih_prev +#define ti_mbuf ti_i.ih_mbuf.mptr #define ti_x1 ti_i.ih_x1 #define ti_pr ti_i.ih_pr #define ti_len ti_i.ih_len @@ -58,6 +57,14 @@ struct tcpiphdr { #define ti_sum ti_t.th_sum #define ti_urp ti_t.th_urp +#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) +#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) +#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) +#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) +#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) +#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) +#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) + /* * Just a clean way to get to the first byte * of the packet diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c old mode 100644 new mode 100755 index 3ba2971c3..e656c4f06 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -127,6 +127,7 @@ static int tftp_send_error(struct tftp_session *spt, struct sockaddr_in saddr, daddr; struct mbuf *m; struct tftp_t *tp; + int nobytes; m = m_get(); @@ -151,6 +152,8 @@ static int tftp_send_error(struct tftp_session *spt, daddr.sin_addr = spt->client_ip; daddr.sin_port = spt->client_port; + nobytes = 2; + m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - sizeof(struct ip) - sizeof(struct udphdr); diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h old mode 100644 new mode 100755 index b150a0490..f89e03932 --- a/BasiliskII/src/slirp/tftp.h +++ b/BasiliskII/src/slirp/tftp.h @@ -34,7 +34,7 @@ struct tftp_t { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c old mode 100644 new mode 100755 index deedb1e75..7917aaa47 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -128,8 +128,7 @@ udp_input(m, iphlen) * Checksum extended UDP header and data. */ if (udpcksum && uh->uh_sum) { - ((struct ipovly *)ip)->ih_next = 0; - ((struct ipovly *)ip)->ih_prev = 0; + memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply @@ -272,10 +271,10 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ + ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ ui->ui_src = saddr->sin_addr; ui->ui_dst = daddr->sin_addr; @@ -291,7 +290,7 @@ int udp_output2(struct socket *so, struct mbuf *m, if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) ui->ui_sum = 0xffff; } - ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; + ((struct ip *)ui)->ip_len = m->m_len; ((struct ip *)ui)->ip_ttl = ip_defttl; ((struct ip *)ui)->ip_tos = iptos; @@ -338,10 +337,14 @@ udp_attach(so) addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int error = WSAGetLastError(); + int lasterrno=errno; closesocket(so->s); so->s=-1; - WSASetLastError(error); +#ifdef _WIN32 + WSASetLastError(lasterrno); +#else + errno=lasterrno; +#endif } else { /* success, insert in queue */ so->so_expire = curtime + SO_EXPIRE; diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h old mode 100644 new mode 100755 index 7d844efe2..639a2f2c7 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -54,7 +54,7 @@ struct udphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) +#pragma pack(0) #endif /* @@ -64,8 +64,7 @@ struct udpiphdr { struct ipovly ui_i; /* overlaid ip structure */ struct udphdr ui_u; /* udp header */ }; -#define ui_next ui_i.ih_next -#define ui_prev ui_i.ih_prev +#define ui_mbuf ui_i.ih_mbuf.mptr #define ui_x1 ui_i.ih_x1 #define ui_pr ui_i.ih_pr #define ui_len ui_i.ih_len @@ -100,14 +99,14 @@ extern struct udpstat udpstat; extern struct socket udb; struct mbuf; -void udp_init(void); -void udp_input(register struct mbuf *, int); -int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); -int udp_attach(struct socket *); -void udp_detach(struct socket *); -u_int8_t udp_tos(struct socket *); -void udp_emu(struct socket *, struct mbuf *); -struct socket * udp_listen(u_int, u_int32_t, u_int, int); +void udp_init _P((void)); +void udp_input _P((register struct mbuf *, int)); +int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); +int udp_attach _P((struct socket *)); +void udp_detach _P((struct socket *)); +u_int8_t udp_tos _P((struct socket *)); +void udp_emu _P((struct socket *, struct mbuf *)); +struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos); From aa24dbc3df404b03347e8ff76d9e1177bc038bb1 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 9 Dec 2017 21:10:30 +0900 Subject: [PATCH 200/534] revert BasiliskII/src/slirp/* --- BasiliskII/src/slirp/VERSION | 1 - BasiliskII/src/slirp/bootp.c | 0 BasiliskII/src/slirp/bootp.h | 2 +- BasiliskII/src/slirp/cksum.c | 0 BasiliskII/src/slirp/ctl.h | 0 BasiliskII/src/slirp/debug.c | 15 +- BasiliskII/src/slirp/debug.h | 22 +- BasiliskII/src/slirp/icmp_var.h | 0 BasiliskII/src/slirp/if.c | 9 +- BasiliskII/src/slirp/if.h | 4 +- BasiliskII/src/slirp/ip.h | 70 +- BasiliskII/src/slirp/ip_icmp.c | 26 +- BasiliskII/src/slirp/ip_icmp.h | 8 +- BasiliskII/src/slirp/ip_input.c | 154 ++-- BasiliskII/src/slirp/ip_output.c | 9 +- BasiliskII/src/slirp/libslirp.h | 0 BasiliskII/src/slirp/main.h | 0 BasiliskII/src/slirp/mbuf.c | 37 +- BasiliskII/src/slirp/mbuf.h | 22 +- BasiliskII/src/slirp/misc.c | 192 ++--- BasiliskII/src/slirp/misc.h | 38 +- BasiliskII/src/slirp/sbuf.c | 35 +- BasiliskII/src/slirp/sbuf.h | 14 +- BasiliskII/src/slirp/slirp.c | 190 ++--- BasiliskII/src/slirp/slirp.h | 133 ++-- BasiliskII/src/slirp/slirp_config.h | 8 - BasiliskII/src/slirp/socket.c | 53 +- BasiliskII/src/slirp/socket.h | 38 +- BasiliskII/src/slirp/tcp.h | 6 +- BasiliskII/src/slirp/tcp_input.c | 1066 ++++++++++++++------------- BasiliskII/src/slirp/tcp_output.c | 30 +- BasiliskII/src/slirp/tcp_subr.c | 92 +-- BasiliskII/src/slirp/tcp_timer.c | 0 BasiliskII/src/slirp/tcp_timer.h | 8 +- BasiliskII/src/slirp/tcp_var.h | 25 +- BasiliskII/src/slirp/tcpip.h | 11 +- BasiliskII/src/slirp/tftp.c | 3 - BasiliskII/src/slirp/tftp.h | 2 +- BasiliskII/src/slirp/udp.c | 17 +- BasiliskII/src/slirp/udp.h | 21 +- SheepShaver/src/macos_util.cpp | 4 + 41 files changed, 1136 insertions(+), 1229 deletions(-) mode change 100755 => 100644 BasiliskII/src/slirp/bootp.c mode change 100755 => 100644 BasiliskII/src/slirp/bootp.h mode change 100755 => 100644 BasiliskII/src/slirp/cksum.c mode change 100755 => 100644 BasiliskII/src/slirp/ctl.h mode change 100755 => 100644 BasiliskII/src/slirp/debug.c mode change 100755 => 100644 BasiliskII/src/slirp/debug.h mode change 100755 => 100644 BasiliskII/src/slirp/icmp_var.h mode change 100755 => 100644 BasiliskII/src/slirp/if.c mode change 100755 => 100644 BasiliskII/src/slirp/if.h mode change 100755 => 100644 BasiliskII/src/slirp/ip.h mode change 100755 => 100644 BasiliskII/src/slirp/ip_icmp.c mode change 100755 => 100644 BasiliskII/src/slirp/ip_icmp.h mode change 100755 => 100644 BasiliskII/src/slirp/ip_input.c mode change 100755 => 100644 BasiliskII/src/slirp/ip_output.c mode change 100755 => 100644 BasiliskII/src/slirp/libslirp.h mode change 100755 => 100644 BasiliskII/src/slirp/main.h mode change 100755 => 100644 BasiliskII/src/slirp/mbuf.c mode change 100755 => 100644 BasiliskII/src/slirp/mbuf.h mode change 100755 => 100644 BasiliskII/src/slirp/misc.c mode change 100755 => 100644 BasiliskII/src/slirp/misc.h mode change 100755 => 100644 BasiliskII/src/slirp/sbuf.c mode change 100755 => 100644 BasiliskII/src/slirp/sbuf.h mode change 100755 => 100644 BasiliskII/src/slirp/slirp.c mode change 100755 => 100644 BasiliskII/src/slirp/slirp.h mode change 100755 => 100644 BasiliskII/src/slirp/slirp_config.h mode change 100755 => 100644 BasiliskII/src/slirp/socket.c mode change 100755 => 100644 BasiliskII/src/slirp/socket.h mode change 100755 => 100644 BasiliskII/src/slirp/tcp.h mode change 100755 => 100644 BasiliskII/src/slirp/tcp_input.c mode change 100755 => 100644 BasiliskII/src/slirp/tcp_output.c mode change 100755 => 100644 BasiliskII/src/slirp/tcp_subr.c mode change 100755 => 100644 BasiliskII/src/slirp/tcp_timer.c mode change 100755 => 100644 BasiliskII/src/slirp/tcp_timer.h mode change 100755 => 100644 BasiliskII/src/slirp/tcp_var.h mode change 100755 => 100644 BasiliskII/src/slirp/tcpip.h mode change 100755 => 100644 BasiliskII/src/slirp/tftp.c mode change 100755 => 100644 BasiliskII/src/slirp/tftp.h mode change 100755 => 100644 BasiliskII/src/slirp/udp.c mode change 100755 => 100644 BasiliskII/src/slirp/udp.h diff --git a/BasiliskII/src/slirp/VERSION b/BasiliskII/src/slirp/VERSION index 12adff9bb..353ad940d 100644 --- a/BasiliskII/src/slirp/VERSION +++ b/BasiliskII/src/slirp/VERSION @@ -1,2 +1 @@ qemu 0.9.0 (2007/02/05) -Plus 64 Bits Patchs \ No newline at end of file diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/bootp.h b/BasiliskII/src/slirp/bootp.h old mode 100755 new mode 100644 index 5c2e62ab0..54a86ca22 --- a/BasiliskII/src/slirp/bootp.h +++ b/BasiliskII/src/slirp/bootp.h @@ -115,7 +115,7 @@ struct bootp_t { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif void bootp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/ctl.h b/BasiliskII/src/slirp/ctl.h old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c old mode 100755 new mode 100644 index d3d8c5796..916b9a8e0 --- a/BasiliskII/src/slirp/debug.c +++ b/BasiliskII/src/slirp/debug.c @@ -16,8 +16,6 @@ int dostats = 0; #endif int slirp_debug = 0; -extern char *strerror _P((int)); - /* Carry over one item from main.c so that the tty's restored. * Only done when the tty being used is /dev/tty --RedWolf */ extern struct termios slirp_tty_settings; @@ -294,6 +292,7 @@ mbufstats() void sockstats() { + char addr[INET_ADDRSTRLEN]; char buff[256]; int n; struct socket *so; @@ -311,9 +310,11 @@ sockstats() buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), + ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), + inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), + ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } @@ -325,9 +326,11 @@ sockstats() buff[17] = 0; lprint("%s %3d %15s %5d ", buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), + ntohs(so->so_lport)); lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), + inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), + ntohs(so->so_fport), so->so_rcv.sb_cc, so->so_snd.sb_cc); } } diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h old mode 100755 new mode 100644 index 6e8444dab..c5d42195e --- a/BasiliskII/src/slirp/debug.h +++ b/BasiliskII/src/slirp/debug.h @@ -36,15 +36,15 @@ extern int slirp_debug; #endif -void debug_init _P((char *, int)); -//void ttystats _P((struct ttys *)); -void allttystats _P((void)); -void ipstats _P((void)); -void vjstats _P((void)); -void tcpstats _P((void)); -void udpstats _P((void)); -void icmpstats _P((void)); -void mbufstats _P((void)); -void sockstats _P((void)); -void slirp_exit _P((int)); +void debug_init(char *, int); +//void ttystats(struct ttys *); +void allttystats(void); +void ipstats(void); +void vjstats(void); +void tcpstats(void); +void udpstats(void); +void icmpstats(void); +void mbufstats(void); +void sockstats(void); +void slirp_exit(int); diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c old mode 100755 new mode 100644 index eab8a46ea..9185dcf65 --- a/BasiliskII/src/slirp/if.c +++ b/BasiliskII/src/slirp/if.c @@ -7,11 +7,11 @@ #include -int if_mtu, if_mru; +size_t if_mtu, if_mru; int if_comp; int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending +int if_queued = 0; /* Number of packets queued so far */ +int if_thresh = 10; /* Number of packets queued before we start sending * (to prevent allocing too many mbufs) */ struct mbuf if_fastq; /* fast queue (for interactive data) */ @@ -116,7 +116,8 @@ if_input(ttyp) DEBUG_MISC((dfd, " read %d bytes\n", if_n)); if (if_n <= 0) { - if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { + int error = WSAGetLastError(); + if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { if (ttyp->up) link_up--; tty_detached(ttyp, 0); diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h old mode 100755 new mode 100644 index 5d96a9034..a2564ab1d --- a/BasiliskII/src/slirp/if.h +++ b/BasiliskII/src/slirp/if.h @@ -15,8 +15,8 @@ /* Needed for FreeBSD */ #undef if_mtu -extern int if_mtu; -extern int if_mru; /* MTU and MRU */ +extern size_t if_mtu; +extern size_t if_mru; /* MTU and MRU */ extern int if_comp; /* Flags for compression */ extern int if_maxlinkhdr; extern int if_queued; /* Number of packets queued so far */ diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h old mode 100755 new mode 100644 index 94dcc6063..e0c7de967 --- a/BasiliskII/src/slirp/ip.h +++ b/BasiliskII/src/slirp/ip.h @@ -98,7 +98,7 @@ struct ip { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif #define IP_MAXPACKET 65535 /* maximum packet size */ @@ -168,7 +168,7 @@ struct ip_timestamp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif /* flag bits for ipt_flg */ @@ -195,19 +195,23 @@ struct ip_timestamp { #define IP_MSS 576 /* default maximum segment size */ +#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ +#include +#else #if SIZEOF_CHAR_P == 4 - struct mbuf_ptr { - struct mbuf *mptr; - uint32_t dummy; - }; +typedef caddr_t caddr32_t; #else - struct mbuf_ptr { - struct mbuf *mptr; - }; +typedef u_int32_t caddr32_t; +#endif +#endif + +#if SIZEOF_CHAR_P == 4 +typedef struct ipq *ipqp_32; +typedef struct ipasfrag *ipasfragp_32; +#else +typedef caddr32_t ipqp_32; +typedef caddr32_t ipasfragp_32; #endif -struct qlink { - void *next, *prev; -}; /* * Overlay for ip header used by other protocols (tcp, udp). @@ -217,16 +221,16 @@ struct qlink { #endif struct ipovly { - struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ + caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ u_int8_t ih_x1; /* (unused) */ u_int8_t ih_pr; /* protocol */ u_int16_t ih_len; /* protocol length */ struct in_addr ih_src; /* source internet address */ struct in_addr ih_dst; /* destination internet address */ -} __attribute__((packed)); +} PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif /* @@ -237,13 +241,12 @@ struct ipovly { * size 28 bytes */ struct ipq { - struct qlink frag_link; /* to ip headers of fragments */ - struct qlink ip_link; /* to other reass headers */ - + ipqp_32 next,prev; /* to other reass headers */ u_int8_t ipq_ttl; /* time for reass q to live */ u_int8_t ipq_p; /* protocol of this fragment */ u_int16_t ipq_id; /* sequence id for reassembly */ - + ipasfragp_32 ipq_next,ipq_prev; + /* to ip headers of fragments */ struct in_addr ipq_src,ipq_dst; }; @@ -253,16 +256,29 @@ struct ipq { * Note: ipf_next must be at same offset as ipq_next above */ struct ipasfrag { - struct qlink ipf_link; - struct ip ipf_ip; +#ifdef WORDS_BIGENDIAN + u_char ip_v:4, + ip_hl:4; +#else + u_char ip_hl:4, + ip_v:4; +#endif + /* BUG : u_int changed to u_int8_t. + * sizeof(u_int)==4 on linux 2.0 + */ + u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit + * to avoid destroying tos (PPPDTRuu); + * copied from (ip_off&IP_MF) */ + u_int16_t ip_len; + u_int16_t ip_id; + u_int16_t ip_off; + u_int8_t ip_ttl; + u_int8_t ip_p; + u_int16_t ip_sum; + ipasfragp_32 ipf_next; /* next fragment */ + ipasfragp_32 ipf_prev; /* previous fragment */ }; -#define ipf_off ipf_ip.ip_off -#define ipf_tos ipf_ip.ip_tos -#define ipf_len ipf_ip.ip_len -#define ipf_next ipf_link.next -#define ipf_prev ipf_link.prev - /* * Structure stored in mbuf in inpcb.ip_options * and passed to ip_output when ip options are in use. diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c old mode 100755 new mode 100644 index 7cbda7906..55376a8b1 --- a/BasiliskII/src/slirp/ip_icmp.c +++ b/BasiliskII/src/slirp/ip_icmp.c @@ -77,7 +77,7 @@ icmp_input(m, hlen) DEBUG_CALL("icmp_input"); DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %d", m->m_len); + DEBUG_ARG("m_len = %zu", m->m_len); icmpstat.icps_received++; @@ -201,12 +201,12 @@ icmp_input(m, hlen) #define ICMP_MAXDATALEN (IP_MSS-28) void -icmp_error(msrc, type, code, minsize, message) - struct mbuf *msrc; - u_char type; - u_char code; - int minsize; - char *message; +icmp_error( + struct mbuf *msrc, + u_char type, + u_char code, + int minsize, + char *message) { unsigned hlen, shlen, s_ip_len; register struct ip *ip; @@ -215,7 +215,7 @@ icmp_error(msrc, type, code, minsize, message) DEBUG_CALL("icmp_error"); DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %d", msrc->m_len); + DEBUG_ARG("msrc_len = %zu", msrc->m_len); if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; @@ -223,9 +223,9 @@ icmp_error(msrc, type, code, minsize, message) if(!msrc) goto end_error; ip = mtod(msrc, struct ip *); #if DEBUG - { char bufa[20], bufb[20]; - strcpy(bufa, inet_ntoa(ip->ip_src)); - strcpy(bufb, inet_ntoa(ip->ip_dst)); + { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; + inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); + inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); } #endif @@ -244,7 +244,7 @@ icmp_error(msrc, type, code, minsize, message) /* make a copy */ if(!(m=m_get())) goto end_error; /* get mbuf */ - { int new_m_size; + { u_int new_m_size; new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; if(new_m_size>m->m_size) m_inc(m, new_m_size); } @@ -299,7 +299,7 @@ icmp_error(msrc, type, code, minsize, message) /* fill in ip */ ip->ip_hl = hlen >> 2; - ip->ip_len = m->m_len; + ip->ip_len = (u_int16_t)m->m_len; ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h old mode 100755 new mode 100644 index 6968daa71..683dc87f1 --- a/BasiliskII/src/slirp/ip_icmp.h +++ b/BasiliskII/src/slirp/ip_icmp.h @@ -95,7 +95,7 @@ struct icmp { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif /* @@ -161,8 +161,8 @@ struct icmp { (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) -void icmp_input _P((struct mbuf *, int)); -void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); -void icmp_reflect _P((struct mbuf *)); +void icmp_input(struct mbuf *, int); +void icmp_error(struct mbuf *, u_char, u_char, int, char *); +void icmp_reflect(struct mbuf *); #endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c old mode 100755 new mode 100644 index 7c995c98d..cac8493ba --- a/BasiliskII/src/slirp/ip_input.c +++ b/BasiliskII/src/slirp/ip_input.c @@ -38,16 +38,6 @@ * terms and conditions of the copyright. */ -#include -#include -#include -#include - -#define container_of(ptr, type, member) ({ \ - const typeof(((type *) 0)->member) *__mptr = (ptr); \ - (type *) ((char *) __mptr - offsetof(type, member));}) - - #include #include "ip_icmp.h" @@ -62,7 +52,7 @@ struct ipq ipq; void ip_init() { - ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; + ipq.next = ipq.prev = (ipqp_32)&ipq; ip_id = tt.tv_sec & 0xffff; udp_init(); tcp_init(); @@ -78,11 +68,11 @@ ip_input(m) struct mbuf *m; { register struct ip *ip; - int hlen; + u_int hlen; DEBUG_CALL("ip_input"); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %d", m->m_len); + DEBUG_ARG("m_len = %zu", m->m_len); ipstat.ips_total++; @@ -165,20 +155,18 @@ ip_input(m) */ if (ip->ip_off &~ IP_DF) { register struct ipq *fp; - struct qlink *l; /* * Look for queue of fragments * of this datagram. */ - for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { - fp = container_of(l, struct ipq, ip_link); - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) + for (fp = (struct ipq *) ipq.next; fp != &ipq; + fp = (struct ipq *) fp->next) + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) goto found; - } - fp = NULL; + fp = 0; found: /* @@ -188,9 +176,9 @@ ip_input(m) */ ip->ip_len -= hlen; if (ip->ip_off & IP_MF) - ip->ip_tos |= 1; + ((struct ipasfrag *)ip)->ipf_mff |= 1; else - ip->ip_tos &= ~1; + ((struct ipasfrag *)ip)->ipf_mff &= ~1; ip->ip_off <<= 3; @@ -199,9 +187,9 @@ ip_input(m) * or if this is not the first fragment, * attempt reassembly; if it succeeds, proceed. */ - if (ip->ip_tos & 1 || ip->ip_off) { + if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { ipstat.ips_fragments++; - ip = ip_reass(ip, fp); + ip = ip_reass((struct ipasfrag *)ip, fp); if (ip == 0) return; ipstat.ips_reassembled++; @@ -237,21 +225,21 @@ ip_input(m) return; } -#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) -#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) /* * Take incoming datagram fragment and try to * reassemble it into whole datagram. If a chain for * reassembly of this datagram already exists, then it * is given as fp; otherwise have to make a chain. */ -static struct ip * -ip_reass(register struct ip *ip, register struct ipq *fp) +struct ip * +ip_reass(ip, fp) + register struct ipasfrag *ip; + register struct ipq *fp; { register struct mbuf *m = dtom(ip); register struct ipasfrag *q; int hlen = ip->ip_hl << 2; - u_int16_t i, next; + int i, next; DEBUG_CALL("ip_reass"); DEBUG_ARG("ip = %lx", (long)ip); @@ -273,13 +261,13 @@ ip_reass(register struct ip *ip, register struct ipq *fp) struct mbuf *t; if ((t = m_get()) == NULL) goto dropfrag; fp = mtod(t, struct ipq *); - insque(&fp->ip_link, &ipq.ip_link); + insque_32(fp, &ipq); fp->ipq_ttl = IPFRAGTTL; fp->ipq_p = ip->ip_p; fp->ipq_id = ip->ip_id; - fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; - fp->ipq_src = ip->ip_src; - fp->ipq_dst = ip->ip_dst; + fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; + fp->ipq_src = ((struct ip *)ip)->ip_src; + fp->ipq_dst = ((struct ip *)ip)->ip_dst; q = (struct ipasfrag *)fp; goto insert; } @@ -287,9 +275,9 @@ ip_reass(register struct ip *ip, register struct ipq *fp) /* * Find a segment which begins after this one does. */ - for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; - q = q->ipf_next) - if (q->ipf_off > ip->ip_off) + for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; + q = (struct ipasfrag *)q->ipf_next) + if (q->ip_off > ip->ip_off) break; /* @@ -297,9 +285,9 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (q->ipf_prev != &fp->frag_link) { - struct ipasfrag *pq = q->ipf_prev; - i = pq->ipf_off + pq->ipf_len - ip->ip_off; + if (q->ipf_prev != (ipasfragp_32)fp) { + i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + + ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; if (i > 0) { if (i >= ip->ip_len) goto dropfrag; @@ -313,18 +301,17 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (q != (struct ipasfrag*)&fp->frag_link && - ip->ip_off + ip->ip_len > q->ipf_off) { - i = (ip->ip_off + ip->ip_len) - q->ipf_off; - if (i < q->ipf_len) { - q->ipf_len -= i; - q->ipf_off += i; + while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { + i = (ip->ip_off + ip->ip_len) - q->ip_off; + if (i < q->ip_len) { + q->ip_len -= i; + q->ip_off += i; m_adj(dtom(q), i); break; } - q = q->ipf_next; - m_freem(dtom(q->ipf_prev)); - ip_deq(q->ipf_prev); + q = (struct ipasfrag *) q->ipf_next; + m_freem(dtom((struct ipasfrag *) q->ipf_prev)); + ip_deq((struct ipasfrag *) q->ipf_prev); } insert: @@ -332,26 +319,27 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * Stick new segment in its place; * check for complete reassembly. */ - ip_enq(iptofrag(ip), q->ipf_prev); + ip_enq(ip, (struct ipasfrag *) q->ipf_prev); next = 0; - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; - q = q->ipf_next) { - if (q->ipf_off != next) + for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; + q = (struct ipasfrag *) q->ipf_next) { + if (q->ip_off != next) return (0); - next += q->ipf_len; + next += q->ip_len; } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) + if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) return (0); /* * Reassembly is complete; concatenate fragments. */ - q = fp->frag_link.next; + q = (struct ipasfrag *) fp->ipq_next; m = dtom(q); q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag*)&fp->frag_link) { - struct mbuf *t = dtom(q); + while (q != (struct ipasfrag *)fp) { + struct mbuf *t; + t = dtom(q); q = (struct ipasfrag *) q->ipf_next; m_cat(m, t); } @@ -362,7 +350,7 @@ ip_reass(register struct ip *ip, register struct ipq *fp) * dequeue and discard fragment reassembly header. * Make header visible. */ - q = fp->frag_link.next; + ip = (struct ipasfrag *) fp->ipq_next; /* * If the fragments concatenated to an mbuf that's @@ -373,24 +361,24 @@ ip_reass(register struct ip *ip, register struct ipq *fp) */ if (m->m_flags & M_EXT) { int delta; - delta = (char *)q - m->m_dat; - q = (struct ipasfrag *)(m->m_ext + delta); + delta = (char *)ip - m->m_dat; + ip = (struct ipasfrag *)(m->m_ext + delta); } /* DEBUG_ARG("ip = %lx", (long)ip); * ip=(struct ipasfrag *)m->m_data; */ - ip = fragtoip(q); ip->ip_len = next; - ip->ip_tos &= ~1; - ip->ip_src = fp->ipq_src; - ip->ip_dst = fp->ipq_dst; - remque(&fp->ip_link); + ip->ipf_mff &= ~1; + ((struct ip *)ip)->ip_src = fp->ipq_src; + ((struct ip *)ip)->ip_dst = fp->ipq_dst; + remque_32(fp); (void) m_free(dtom(fp)); + m = dtom(ip); m->m_len += (ip->ip_hl << 2); m->m_data -= (ip->ip_hl << 2); - return ip; + return ((struct ip *)ip); dropfrag: ipstat.ips_fragdropped++; @@ -408,12 +396,13 @@ ip_freef(fp) { register struct ipasfrag *q, *p; - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { - p = q->ipf_next; + for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; + q = p) { + p = (struct ipasfrag *) q->ipf_next; ip_deq(q); m_freem(dtom(q)); } - remque(&fp->ip_link); + remque_32(fp); (void) m_free(dtom(fp)); } @@ -427,10 +416,10 @@ ip_enq(p, prev) { DEBUG_CALL("ip_enq"); DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = prev; + p->ipf_prev = (ipasfragp_32) prev; p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; - prev->ipf_next = p; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; + prev->ipf_next = (ipasfragp_32) p; } /* @@ -452,21 +441,20 @@ ip_deq(p) void ip_slowtimo() { - struct qlink *l; + register struct ipq *fp; DEBUG_CALL("ip_slowtimo"); - l = ipq.ip_link.next; - - if (l == 0) + fp = (struct ipq *) ipq.next; + if (fp == 0) return; - while (l != &ipq.ip_link) { - struct ipq *fp = container_of(l, struct ipq, ip_link); - l = l->next; - if (--fp->ipq_ttl == 0) { + while (fp != &ipq) { + --fp->ipq_ttl; + fp = (struct ipq *) fp->next; + if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { ipstat.ips_fragtimeout++; - ip_freef(fp); + ip_freef((struct ipq *) fp->prev); } } } diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c old mode 100755 new mode 100644 index 0d1ae1b2c..fb9a94204 --- a/BasiliskII/src/slirp/ip_output.c +++ b/BasiliskII/src/slirp/ip_output.c @@ -55,8 +55,9 @@ ip_output(so, m0) { register struct ip *ip; register struct mbuf *m = m0; - register int hlen = sizeof(struct ip ); - int len, off, error = 0; + register u_int hlen = sizeof(struct ip); + u_int len, off; + int error = 0; DEBUG_CALL("ip_output"); DEBUG_ARG("so = %lx", (long)so); @@ -128,7 +129,7 @@ ip_output(so, m0) */ m0 = m; mhlen = sizeof (struct ip); - for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { + for (off = hlen + len; off < ip->ip_len; off += len) { register struct ip *mhip; m = m_get(); if (m == 0) { @@ -173,7 +174,7 @@ ip_output(so, m0) * and updating header, then send each fragment (in order). */ m = m0; - m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); + m_adj(m, hlen + firstlen - ip->ip_len); ip->ip_len = htons((u_int16_t)m->m_len); ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); ip->ip_sum = 0; diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c old mode 100755 new mode 100644 index 2b53bc3e9..5a16fab8b --- a/BasiliskII/src/slirp/mbuf.c +++ b/BasiliskII/src/slirp/mbuf.c @@ -24,18 +24,16 @@ int mbuf_alloced = 0; struct mbuf m_freelist, m_usedlist; int mbuf_thresh = 30; int mbuf_max = 0; -int msize; +size_t msize; -void -m_init() +void m_init() { m_freelist.m_next = m_freelist.m_prev = &m_freelist; m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; msize_init(); } -void -msize_init() +void msize_init() { /* * Find a nice value for msize @@ -53,8 +51,7 @@ msize_init() * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, * which tells m_free to actually free() it */ -struct mbuf * -m_get() +struct mbuf *m_get() { register struct mbuf *m; int flags = 0; @@ -89,9 +86,7 @@ m_get() return m; } -void -m_free(m) - struct mbuf *m; +void m_free(struct mbuf *m) { DEBUG_CALL("m_free"); @@ -124,9 +119,7 @@ m_free(m) * the other.. if result is too big for one mbuf, malloc() * an M_EXT data segment */ -void -m_cat(m, n) - register struct mbuf *m, *n; +void m_cat(register struct mbuf *m, register struct mbuf *n) { /* * If there's no room, realloc @@ -142,10 +135,7 @@ m_cat(m, n) /* make m size bytes large */ -void -m_inc(m, size) - struct mbuf *m; - int size; +void m_inc(struct mbuf *m, u_int size) { int datasize; @@ -179,10 +169,7 @@ m_inc(m, size) -void -m_adj(m, len) - struct mbuf *m; - int len; +void m_adj(struct mbuf *m, int len) { if (m == NULL) return; @@ -202,9 +189,7 @@ m_adj(m, len) * Copy len bytes from m, starting off bytes into n */ int -m_copy(n, m, off, len) - struct mbuf *n, *m; - int off, len; +m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) { if (len > M_FREEROOM(n)) return -1; @@ -220,9 +205,7 @@ m_copy(n, m, off, len) * XXX This is a kludge, I should eliminate the need for it * Fortunately, it's not used often */ -struct mbuf * -dtom(dat) - void *dat; +struct mbuf *dtom(void *dat) { struct mbuf *m; diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h old mode 100755 new mode 100644 index 183254a08..11b252bb6 --- a/BasiliskII/src/slirp/mbuf.h +++ b/BasiliskII/src/slirp/mbuf.h @@ -63,11 +63,11 @@ struct m_hdr { struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ int mh_flags; /* Misc flags */ - int mh_size; /* Size of data */ + size_t mh_size; /* Size of data */ struct socket *mh_so; caddr_t mh_data; /* Location of data */ - int mh_len; /* Amount of data in this mbuf */ + size_t mh_len; /* Amount of data in this mbuf */ }; /* @@ -130,14 +130,14 @@ extern int mbuf_alloced; extern struct mbuf m_freelist, m_usedlist; extern int mbuf_max; -void m_init _P((void)); -void msize_init _P((void)); -struct mbuf * m_get _P((void)); -void m_free _P((struct mbuf *)); -void m_cat _P((register struct mbuf *, register struct mbuf *)); -void m_inc _P((struct mbuf *, int)); -void m_adj _P((struct mbuf *, int)); -int m_copy _P((struct mbuf *, struct mbuf *, int, int)); -struct mbuf * dtom _P((void *)); +void m_init(void); +void msize_init(void); +struct mbuf * m_get(void); +void m_free(struct mbuf *); +void m_cat(register struct mbuf *, register struct mbuf *); +void m_inc(struct mbuf *, u_int); +void m_adj(struct mbuf *, int); +int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); +struct mbuf * dtom(void *); #endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c old mode 100755 new mode 100644 index 9438af382..b80caf662 --- a/BasiliskII/src/slirp/misc.c +++ b/BasiliskII/src/slirp/misc.c @@ -17,10 +17,7 @@ int x_port = -1; int x_display = 0; int x_screen = 0; -int -show_x(buff, inso) - char *buff; - struct socket *inso; +int show_x(char *buff, struct socket *inso) { if (x_port < 0) { lprint("X Redir: X not being redirected.\r\n"); @@ -40,12 +37,7 @@ show_x(buff, inso) /* * XXX Allow more than one X redirection? */ -void -redir_x(inaddr, start_port, display, screen) - u_int32_t inaddr; - int start_port; - int display; - int screen; +void redir_x(u_int32_t inaddr, int start_port, int display, int screen) { int i; @@ -69,44 +61,69 @@ redir_x(inaddr, start_port, display, screen) #endif #ifndef HAVE_INET_ATON -int -inet_aton(cp, ia) - const char *cp; - struct in_addr *ia; +int inet_aton(const char *cp, struct in_addr *ia) { - u_int32_t addr = inet_addr(cp); - if (addr == 0xffffffff) - return 0; - ia->s_addr = addr; - return 1; + return inet_pton(AF_INET, cp, &ia->s_addr); } #endif /* * Get our IP address and put it in our_addr */ -void -getouraddr() +void getouraddr() { char buff[256]; - struct hostent *he = NULL; - - if (gethostname(buff,256) == 0) - he = gethostbyname(buff); - if (he) - our_addr = *(struct in_addr *)he->h_addr; - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; + + if (gethostname(buff, sizeof(buff)) == 0) + { + struct addrinfo hints = { 0 }; + hints.ai_flags = AI_NUMERICHOST; + hints.ai_family = AF_INET; + struct addrinfo* ai; + if (getaddrinfo(buff, NULL, &hints, &ai) == 0) + { + our_addr = *(struct in_addr *)ai->ai_addr->sa_data; + freeaddrinfo(ai); + } + } + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; } +#if SIZEOF_CHAR_P == 8 + +struct quehead_32 { + u_int32_t qh_link; + u_int32_t qh_rlink; +}; + +inline void insque_32(void *a, void *b) +{ + register struct quehead_32 *element = (struct quehead_32 *) a; + register struct quehead_32 *head = (struct quehead_32 *) b; + element->qh_link = head->qh_link; + head->qh_link = (u_int32_t)element; + element->qh_rlink = (u_int32_t)head; + ((struct quehead_32 *)(element->qh_link))->qh_rlink + = (u_int32_t)element; +} + +inline void remque_32(void *a) +{ + register struct quehead_32 *element = (struct quehead_32 *) a; + ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; + ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; + element->qh_rlink = 0; +} + +#endif /* SIZEOF_CHAR_P == 8 */ + struct quehead { struct quehead *qh_link; struct quehead *qh_rlink; }; -void -insque(a, b) - void *a, *b; +void insque(void *a, void *b) { register struct quehead *element = (struct quehead *) a; register struct quehead *head = (struct quehead *) b; @@ -117,9 +134,7 @@ insque(a, b) = (struct quehead *)element; } -void -remque(a) - void *a; +void remque(void *a) { register struct quehead *element = (struct quehead *) a; ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; @@ -131,13 +146,7 @@ remque(a) /* #endif */ -int -add_exec(ex_ptr, do_pty, exec, addr, port) - struct ex_list **ex_ptr; - int do_pty; - char *exec; - int addr; - int port; +int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) { struct ex_list *tmp_ptr; @@ -166,9 +175,7 @@ add_exec(ex_ptr, do_pty, exec, addr, port) extern int sys_nerr; extern char *sys_errlist[]; -char * -strerror(error) - int error; +char *strerror(int error) { if (error < sys_nerr) return sys_errlist[error]; @@ -181,11 +188,7 @@ strerror(error) #ifdef _WIN32 -int -fork_exec(so, ex, do_pty) - struct socket *so; - char *ex; - int do_pty; +int fork_exec(struct socket *so, char *ex, int do_pty) { /* not implemented */ return 0; @@ -193,9 +196,7 @@ fork_exec(so, ex, do_pty) #else -int -slirp_openpty(amaster, aslave) - int *amaster, *aslave; +int slirp_openpty(int *amaster, int *aslave) { register int master, slave; @@ -269,11 +270,7 @@ slirp_openpty(amaster, aslave) * do_pty = 1 Fork/exec using slirp.telnetd * do_ptr = 2 Fork/exec using pty */ -int -fork_exec(so, ex, do_pty) - struct socket *so; - char *ex; - int do_pty; +int fork_exec(struct socket *so, char *ex, int do_pty) { int s; struct sockaddr_in addr; @@ -429,9 +426,7 @@ fork_exec(so, ex, do_pty) #endif #ifndef HAVE_STRDUP -char * -strdup(str) - const char *str; +char *strdup(const char *str) { char *bptr; @@ -443,9 +438,7 @@ strdup(str) #endif #if 0 -void -snooze_hup(num) - int num; +void snooze_hup(int num) { int s, ret; #ifndef NO_UNIX_SOCKETS @@ -485,8 +478,7 @@ snooze_hup(num) } -void -snooze() +void snooze() { sigset_t s; int i; @@ -510,9 +502,7 @@ snooze() exit(255); } -void -relay(s) - int s; +void relay(int s) { char buf[8192]; int n; @@ -572,25 +562,14 @@ relay(s) } #endif -int (*lprint_print) _P((void *, const char *, va_list)); +int (*lprint_print)(void *, const char *, va_list); char *lprint_ptr, *lprint_ptr2, **lprint_arg; -void -#ifdef __STDC__ -lprint(const char *format, ...) -#else -lprint(va_alist) va_dcl -#endif +void lprint(const char *format, ...) { va_list args; -#ifdef __STDC__ - va_start(args, format); -#else - char *format; - va_start(args); - format = va_arg(args, char *); -#endif + va_start(args, format); #if 0 /* If we're printing to an sbuf, make sure there's enough room */ /* XXX +100? */ @@ -639,9 +618,7 @@ lprint(va_alist) va_dcl va_end(args); } -void -add_emu(buff) - char *buff; +void add_emu(char *buff) { u_int lport, fport; u_int8_t tos = 0, emu = 0; @@ -733,42 +710,24 @@ add_emu(buff) * Some BSD-derived systems have a sprintf which returns char * */ -int -vsprintf_len(string, format, args) - char *string; - const char *format; - va_list args; +int vsprintf_len(char *string, const char *format, va_list args) { vsprintf(string, format, args); return strlen(string); } -int -#ifdef __STDC__ -sprintf_len(char *string, const char *format, ...) -#else -sprintf_len(va_alist) va_dcl -#endif +int sprintf_len(char *string, const char *format, ...) { va_list args; -#ifdef __STDC__ va_start(args, format); -#else - char *string; - char *format; - va_start(args); - string = va_arg(args, char *); - format = va_arg(args, char *); -#endif vsprintf(string, format, args); + va_end(args); return strlen(string); } #endif -void -u_sleep(usec) - int usec; +void u_sleep(int usec) { struct timeval t; fd_set fdset; @@ -785,9 +744,7 @@ u_sleep(usec) * Set fd blocking and non-blocking */ -void -fd_nonblock(fd) - int fd; +void fd_nonblock(int fd) { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 1; @@ -802,9 +759,7 @@ fd_nonblock(fd) #endif } -void -fd_block(fd) - int fd; +void fd_block(int fd) { #if defined USE_FIONBIO && defined FIONBIO ioctlsockopt_t opt = 0; @@ -824,13 +779,8 @@ fd_block(fd) /* * invoke RSH */ -int -rsh_exec(so,ns, user, host, args) - struct socket *so; - struct socket *ns; - char *user; - char *host; - char *args; +int rsh_exec(struct socket *so, struct socket *ns, + char *user, char *host, char *args) { int fd[2]; int fd0[2]; diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h old mode 100755 new mode 100644 index efea9ff8b..381f5f3e7 --- a/BasiliskII/src/slirp/misc.h +++ b/BasiliskII/src/slirp/misc.h @@ -19,15 +19,15 @@ struct ex_list { extern struct ex_list *exec_list; extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; -extern int (*lprint_print) _P((void *, const char *, va_list)); +extern int (*lprint_print)(void *, const char *, va_list); extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; extern struct sbuf *lprint_sb; #ifndef HAVE_STRDUP -char *strdup _P((const char *)); +char *strdup(const char *); #endif -void do_wait _P((int)); +void do_wait(int); #define EMU_NONE 0x0 @@ -67,21 +67,21 @@ extern struct emu_t *tcpemu; extern int x_port, x_server, x_display; -int show_x _P((char *, struct socket *)); -void redir_x _P((u_int32_t, int, int, int)); -void getouraddr _P((void)); -void slirp_insque _P((void *, void *)); -void slirp_remque _P((void *)); -int add_exec _P((struct ex_list **, int, char *, int, int)); -int slirp_openpty _P((int *, int *)); -int fork_exec _P((struct socket *, char *, int)); -void snooze_hup _P((int)); -void snooze _P((void)); -void relay _P((int)); -void add_emu _P((char *)); -void u_sleep _P((int)); -void fd_nonblock _P((int)); -void fd_block _P((int)); -int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); +int show_x(char *, struct socket *); +void redir_x(u_int32_t, int, int, int); +void getouraddr(void); +void slirp_insque(void *, void *); +void slirp_remque(void *); +int add_exec(struct ex_list **, int, char *, int, int); +int slirp_openpty(int *, int *); +int fork_exec(struct socket *, char *, int); +void snooze_hup(int); +void snooze(void); +void relay(int); +void add_emu(char *); +void u_sleep(int); +void fd_nonblock(int); +void fd_block(int); +int rsh_exec(struct socket *, struct socket *, char *, char *, char *); #endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c old mode 100755 new mode 100644 index 0d8800920..278e36870 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -5,7 +5,7 @@ * terms and conditions of the copyright. */ -// #include +#include #include /* Done as a macro in socket.h */ @@ -16,17 +16,12 @@ * } */ -void -sbfree(sb) - struct sbuf *sb; +void sbfree(struct sbuf *sb) { free(sb->sb_data); } -void -sbdrop(sb, num) - struct sbuf *sb; - int num; +void sbdrop(struct sbuf *sb, u_int num) { /* * We can only drop how much we have @@ -41,10 +36,7 @@ sbdrop(sb, num) } -void -sbreserve(sb, size) - struct sbuf *sb; - int size; +void sbreserve(struct sbuf *sb, size_t size) { if (sb->sb_data) { /* Already alloced, realloc if necessary */ @@ -72,17 +64,14 @@ sbreserve(sb, size) * this prevents an unnecessary copy of the data * (the socket is non-blocking, so we won't hang) */ -void -sbappend(so, m) - struct socket *so; - struct mbuf *m; +void sbappend(struct socket *so, struct mbuf *m) { int ret = 0; DEBUG_CALL("sbappend"); DEBUG_ARG("so = %lx", (long)so); DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %d", m->m_len); + DEBUG_ARG("m->m_len = %zu", m->m_len); /* Shouldn't happen, but... e.g. foreign host closes connection */ if (m->m_len <= 0) { @@ -134,10 +123,7 @@ sbappend(so, m) * Copy the data from m into sb * The caller is responsible to make sure there's enough room */ -void -sbappendsb(sb, m) - struct sbuf *sb; - struct mbuf *m; +void sbappendsb(struct sbuf *sb, struct mbuf *m) { int len, n, nn; @@ -173,12 +159,7 @@ sbappendsb(sb, m) * Don't update the sbuf rptr, this will be * done in sbdrop when the data is acked */ -void -sbcopy(sb, off, len, to) - struct sbuf *sb; - int off; - int len; - char *to; +void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) { char *from; diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h old mode 100755 new mode 100644 index 161e0bb76..04f7981c7 --- a/BasiliskII/src/slirp/sbuf.h +++ b/BasiliskII/src/slirp/sbuf.h @@ -8,6 +8,8 @@ #ifndef _SBUF_H_ #define _SBUF_H_ +#include + #define sbflush(sb) sbdrop((sb),(sb)->sb_cc) #define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) @@ -21,11 +23,11 @@ struct sbuf { char *sb_data; /* Actual data */ }; -void sbfree _P((struct sbuf *)); -void sbdrop _P((struct sbuf *, int)); -void sbreserve _P((struct sbuf *, int)); -void sbappend _P((struct socket *, struct mbuf *)); -void sbappendsb _P((struct sbuf *, struct mbuf *)); -void sbcopy _P((struct sbuf *, int, int, char *)); +void sbfree(struct sbuf *); +void sbdrop(struct sbuf *, u_int); +void sbreserve(struct sbuf *, size_t); +void sbappend(struct socket *, struct mbuf *); +void sbappendsb(struct sbuf *, struct mbuf *); +void sbcopy(struct sbuf *, u_int, u_int, char *); #endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c old mode 100755 new mode 100644 index 44f777d08..dc2fdc658 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -84,7 +84,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256]; + char buff2[256+1]; FILE *f; int found = 0; struct in_addr tmp_addr; @@ -211,8 +211,8 @@ int slirp_select_fill(int *pnfds, * in the fragment queue, or there are TCP connections active */ do_slowtimo = ((tcb.so_next != &tcb) || - (&ipq.ip_link != ipq.ip_link.next)); - + ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); + for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; @@ -220,14 +220,14 @@ int slirp_select_fill(int *pnfds, * See if we need a tcp_fasttimo */ if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ + time_fasttimo = curtime; /* Flag when we want a fasttimo */ /* * NOFDREF can include still connecting to local-host, * newly socreated() sockets etc. Don't want to select these. */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; + continue; /* * Set for reading sockets which are accepting @@ -346,18 +346,18 @@ int slirp_select_fill(int *pnfds, void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) { - struct socket *so, *so_next; - int ret; + struct socket *so, *so_next; + int ret; - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; /* Update time */ updtime(); - + /* - * See if anything has timed out + * See if anything has timed out */ if (link_up) { if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { @@ -370,7 +370,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) last_slowtimo = curtime; } } - + /* * Check sockets */ @@ -380,21 +380,21 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = tcb.so_next; so != &tcb; so = so_next) { so_next = so->so_next; - + /* * FD_ISSET is meaningless on these sockets * (and they can crash the program) */ if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - + continue; + /* * Check for URG data * This will soread as well, so no need to * test for readfds below if this succeeds */ if (FD_ISSET(so->s, xfds)) - sorecvoob(so); + sorecvoob(so); /* * Check sockets for reading */ @@ -407,86 +407,92 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) continue; } /* else */ ret = soread(so); - + /* Output it if we read something */ if (ret > 0) - tcp_output(sototcpcb(so)); + tcp_output(sototcpcb(so)); } - + /* * Check sockets for writing */ if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, (char*)&ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } + else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ } - + /* * Probe a still-connecting, non-blocking socket * to check if it's still alive - */ + */ #ifdef PROBE_CONN if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0,0); - - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } else { - ret = send(so->s, &ret, 0,0); - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); - } /* SS_ISFCONNECTING */ + ret = recv(so->s, (char *)&ret, 0, 0); + + if (ret < 0) { + /* XXX */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } + else { + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXX */ + int error = WSAGetLastError(); + if (error == EAGAIN || error == WSAEWOULDBLOCK || + error == WSAEINPROGRESS || error == WSAENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } + else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + } /* SS_ISFCONNECTING */ #endif - } - + } + /* * Now UDP sockets. * Incoming packets are sent straight away, they're not buffered. @@ -494,27 +500,27 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) */ for (so = udb.so_next; so != &udb; so = so_next) { so_next = so->so_next; - + if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } + sorecvfrom(so); + } } - } - +} + /* * See if we can start outputting */ if (if_queued && link_up) - if_start(); + if_start(); /* clear global file descriptor sets. * these reside on the stack in vl.c * so they're unusable if we're not in * slirp_select_fill or slirp_select_poll. */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; } #define ETH_ALEN 6 diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h old mode 100755 new mode 100644 index 16266f6c1..b845caa77 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -22,18 +22,12 @@ typedef char *caddr_t; typedef int socklen_t; typedef unsigned long ioctlsockopt_t; -# include # include +# include # include # include # define USE_FIONBIO 1 -# define EWOULDBLOCK WSAEWOULDBLOCK -# define EINPROGRESS WSAEINPROGRESS -# define ENOTCONN WSAENOTCONN -# define EHOSTUNREACH WSAEHOSTUNREACH -# define ENETUNREACH WSAENETUNREACH -# define ECONNREFUSED WSAECONNREFUSED /* Basilisk II Router defines those */ # define udp_read_completion slirp_udp_read_completion @@ -139,35 +133,29 @@ typedef u_int32_t uint32; #include #endif -#ifndef _P -#ifndef NO_PROTOTYPES -# define _P(x) x -#else -# define _P(x) () -#endif -#endif - - #ifdef GETTIMEOFDAY_ONE_ARG #define gettimeofday(x, y) gettimeofday(x) #endif /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup _P((const char *)); +char *strdup(const char *); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc _P((size_t arg)); -void free _P((void *ptr)); +void *malloc(size_t arg); +void free(void *ptr); #endif #ifndef HAVE_INET_ATON -int inet_aton _P((const char *cp, struct in_addr *ia)); +int inet_aton(const char *cp, struct in_addr *ia); #endif #include +#ifdef _WIN32 +#include +#endif #ifndef NO_UNIX_SOCKETS #include #endif @@ -199,11 +187,7 @@ int inet_aton _P((const char *cp, struct in_addr *ia)); #include #endif -#ifdef __STDC__ #include -#else -#include -#endif #include @@ -220,8 +204,13 @@ int inet_aton _P((const char *cp, struct in_addr *ia)); #if defined __GNUC__ #define PACKED__ __attribute__ ((packed)) +#elif defined _MSC_VER +#define PRAGMA_PACK_SUPPORTED 1 +#define PACK_RESET +#define PACKED__ #elif defined __sgi #define PRAGMA_PACK_SUPPORTED 1 +#define PACK_RESET 0 #define PACKED__ #else #error "Packed attribute or pragma shall be supported" @@ -257,41 +246,49 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start _P((void)); +void if_start(void); #else -void if_start _P((struct ttys *)); +void if_start(struct ttys *); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len _P((char *, const char *, va_list)); - extern int sprintf_len _P((char *, const char *, ...)); + extern int vsprintf_len(char *, const char *, va_list); + extern int sprintf_len(char *, const char *, ...); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf _P((char *, const char *, va_list)); + extern int vsprintf(char *, const char *, va_list); # endif - extern int vfprintf _P((FILE *, const char *, va_list)); + extern int vfprintf(FILE *, const char *, va_list); #endif #ifndef HAVE_STRERROR - extern char *strerror _P((int error)); + extern char *strerror(int error); #endif #ifndef HAVE_INDEX - char *index _P((const char *, int)); + char *index(const char *, int); #endif #ifndef HAVE_GETHOSTID - long gethostid _P((void)); + long gethostid(void); #endif -void lprint _P((const char *, ...)); +void lprint(const char *, ...); extern int do_echo; +#if SIZEOF_CHAR_P == 4 +# define insque_32 insque +# define remque_32 remque +#else + extern inline void insque_32(void *, void *); + extern inline void remque_32(void *); +#endif + #ifndef _WIN32 #include #endif @@ -302,48 +299,47 @@ extern int do_echo; int cksum(struct mbuf *m, int len); /* if.c */ -void if_init _P((void)); -void if_output _P((struct socket *, struct mbuf *)); +void if_init(void); +void if_output(struct socket *, struct mbuf *); /* ip_input.c */ -void ip_init _P((void)); -void ip_input _P((struct mbuf *)); -static struct ip * -ip_reass(register struct ip *ip, register struct ipq *); -void ip_freef _P((struct ipq *)); -void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); -void ip_deq _P((register struct ipasfrag *)); -void ip_slowtimo _P((void)); -void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); +void ip_init(void); +void ip_input(struct mbuf *); +struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); +void ip_freef(struct ipq *); +void ip_enq(register struct ipasfrag *, register struct ipasfrag *); +void ip_deq(register struct ipasfrag *); +void ip_slowtimo(void); +void ip_stripoptions(register struct mbuf *, struct mbuf *); /* ip_output.c */ -int ip_output _P((struct socket *, struct mbuf *)); +int ip_output(struct socket *, struct mbuf *); /* tcp_input.c */ -int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); -void tcp_input _P((register struct mbuf *, int, struct socket *)); -void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); -void tcp_xmit_timer _P((register struct tcpcb *, int)); -int tcp_mss _P((register struct tcpcb *, u_int)); +int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); +void tcp_input(register struct mbuf *, int, struct socket *); +void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); +void tcp_xmit_timer(register struct tcpcb *, int); +u_int tcp_mss(register struct tcpcb *, u_int); /* tcp_output.c */ -int tcp_output _P((register struct tcpcb *)); -void tcp_setpersist _P((register struct tcpcb *)); +int tcp_output(register struct tcpcb *); +void tcp_setpersist(register struct tcpcb *); /* tcp_subr.c */ -void tcp_init _P((void)); -void tcp_template _P((struct tcpcb *)); -void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); -struct tcpcb * tcp_newtcpcb _P((struct socket *)); -struct tcpcb * tcp_close _P((register struct tcpcb *)); -void tcp_drain _P((void)); -void tcp_sockclosed _P((struct tcpcb *)); -int tcp_fconnect _P((struct socket *)); -void tcp_connect _P((struct socket *)); -int tcp_attach _P((struct socket *)); -u_int8_t tcp_tos _P((struct socket *)); -int tcp_emu _P((struct socket *, struct mbuf *)); -int tcp_ctl _P((struct socket *)); +void tcp_init(void); +void tcp_template(struct tcpcb *); +void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); +struct tcpcb * tcp_newtcpcb(struct socket *); +struct tcpcb * tcp_close(register struct tcpcb *); +void tcp_drain(void); +void tcp_sockclosed(struct tcpcb *); +int tcp_fconnect(struct socket *); +void tcp_connect(struct socket *); +int tcp_attach(struct socket *); +u_int8_t tcp_tos(struct socket *); +int tcp_emu(struct socket *, struct mbuf *); +int tcp_ctl(struct socket *); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -359,9 +355,4 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif -#ifdef _WIN32 -#undef errno -#define errno (WSAGetLastError()) -#endif - #endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h old mode 100755 new mode 100644 index e583dcc80..237268fa8 --- a/BasiliskII/src/slirp/slirp_config.h +++ b/BasiliskII/src/slirp/slirp_config.h @@ -40,11 +40,6 @@ */ #undef USE_LOWCPU -/* Define this if your compiler doesn't like prototypes */ -#ifndef __STDC__ -#define NO_PROTOTYPES -#endif - /*********************************************************/ /* * Autoconf defined configuration options @@ -77,9 +72,6 @@ /* Define if you have sys/stropts.h */ #undef HAVE_SYS_STROPTS_H -/* Define if your compiler doesn't like prototypes */ -#undef NO_PROTOTYPES - /* Define if you don't have u_int32_t etc. typedef'd */ #undef NEED_TYPEDEFS #ifdef __sun__ diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c old mode 100755 new mode 100644 index f3d10e538..42ba31b24 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -14,6 +14,12 @@ #include #endif +#ifdef _WIN32 +#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) +#else +#define IS_EAGAIN(e) ((e) == EAGAIN) +#endif + void so_init() { @@ -97,11 +103,12 @@ int soread(so) struct socket *so; { - int n, nn, lss, total; + int n, nn; + u_int lss, total; struct sbuf *sb = &so->so_snd; - int len = sb->sb_datalen - sb->sb_cc; + u_int len = sb->sb_datalen - sb->sb_cc; struct iovec iov[2]; - int mss = so->so_tcpcb->t_maxseg; + u_int mss = so->so_tcpcb->t_maxseg; DEBUG_CALL("soread"); DEBUG_ARG("so = %lx", (long )so); @@ -159,7 +166,8 @@ soread(so) nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif if (nn <= 0) { - if (nn < 0 && (errno == EINTR || errno == EAGAIN)) + int error = WSAGetLastError(); + if (nn < 0 && IS_EAGAIN(error)) return 0; else { DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); @@ -297,7 +305,7 @@ sowrite(so) { int n,nn; struct sbuf *sb = &so->so_rcv; - int len = sb->sb_cc; + u_int len = sb->sb_cc; struct iovec iov[2]; DEBUG_CALL("sowrite"); @@ -344,9 +352,12 @@ sowrite(so) nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); #endif /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0 && (errno == EAGAIN || errno == EINTR)) - return 0; - + if (nn < 0) { + int error = WSAGetLastError(); + if (IS_EAGAIN(error)) + return 0; + } + if (nn <= 0) { DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", so->so_state, errno)); @@ -405,8 +416,9 @@ sorecvfrom(so) if(len == -1 || len == 0) { u_char code=ICMP_UNREACH_PORT; - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + int error = WSAGetLastError(); + if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", errno,strerror(errno))); @@ -419,7 +431,7 @@ sorecvfrom(so) udp_detach(so); } else { /* A "normal" UDP packet */ struct mbuf *m; - int len; + u_int len; ioctlsockopt_t n; if (!(m = m_get())) return; @@ -442,13 +454,14 @@ sorecvfrom(so) m->m_len = recvfrom(so->s, m->m_data, len, 0, (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", + DEBUG_MISC((dfd, " did recvfrom %zu, errno = %d-%s\n", m->m_len, errno,strerror(errno))); if(m->m_len<0) { u_char code=ICMP_UNREACH_PORT; - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + int error = WSAGetLastError(); + if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); @@ -513,7 +526,9 @@ sosendto(so, m) addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + char addrstr[INET_ADDRSTRLEN]; + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", + ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); /* Don't care what port we get */ ret = sendto(so->s, m->m_data, m->m_len, 0, @@ -584,16 +599,12 @@ solisten(port, laddr, lport, flags) (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || (listen(s,1) < 0)) { - int tmperrno = errno; /* Don't clobber the real reason we failed */ + int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ close(s); sofree(so); /* Restore the real errno */ -#ifdef _WIN32 - WSASetLastError(tmperrno); -#else - errno = tmperrno; -#endif + WSASetLastError(error); return NULL; } setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h old mode 100755 new mode 100644 index d05354c8c..3b0fee169 --- a/BasiliskII/src/slirp/socket.h +++ b/BasiliskII/src/slirp/socket.h @@ -81,24 +81,24 @@ struct iovec { }; #endif -void so_init _P((void)); -struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); -struct socket * socreate _P((void)); -void sofree _P((struct socket *)); -int soread _P((struct socket *)); -void sorecvoob _P((struct socket *)); -int sosendoob _P((struct socket *)); -int sowrite _P((struct socket *)); -void sorecvfrom _P((struct socket *)); -int sosendto _P((struct socket *, struct mbuf *)); -struct socket * solisten _P((u_int, u_int32_t, u_int, int)); -void sorwakeup _P((struct socket *)); -void sowwakeup _P((struct socket *)); -void soisfconnecting _P((register struct socket *)); -void soisfconnected _P((register struct socket *)); -void sofcantrcvmore _P((struct socket *)); -void sofcantsendmore _P((struct socket *)); -void soisfdisconnected _P((struct socket *)); -void sofwdrain _P((struct socket *)); +void so_init(void); +struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); +struct socket * socreate(void); +void sofree(struct socket *); +int soread(struct socket *); +void sorecvoob(struct socket *); +int sosendoob(struct socket *); +int sowrite(struct socket *); +void sorecvfrom(struct socket *); +int sosendto(struct socket *, struct mbuf *); +struct socket * solisten(u_int, u_int32_t, u_int, int); +void sorwakeup(struct socket *); +void sowwakeup(struct socket *); +void soisfconnecting(register struct socket *); +void soisfconnected(register struct socket *); +void sofcantrcvmore(struct socket *); +void sofcantsendmore(struct socket *); +void soisfdisconnected(struct socket *); +void sofwdrain(struct socket *); #endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h old mode 100755 new mode 100644 index 5f03f9e17..24e7914ab --- a/BasiliskII/src/slirp/tcp.h +++ b/BasiliskII/src/slirp/tcp.h @@ -38,8 +38,8 @@ typedef u_int32_t tcp_seq; #define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ #define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ -extern int tcp_rcvspace; -extern int tcp_sndspace; +extern size_t tcp_rcvspace; +extern size_t tcp_sndspace; extern struct socket *tcp_last_so; #define TCP_SNDSPACE 8192 @@ -78,7 +78,7 @@ struct tcphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif #include "tcp_var.h" diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c old mode 100755 new mode 100644 index fc7c0bc01..032e5378e --- a/BasiliskII/src/slirp/tcp_input.c +++ b/BasiliskII/src/slirp/tcp_input.c @@ -68,7 +68,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #ifdef TCP_ACK_HACK #define TCP_REASS(tp, ti, m, so, flags) {\ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ + (tp)->seg_next == (tcpiphdrp_32)(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) {\ if (ti->ti_flags & TH_PUSH) \ tp->t_flags |= TF_ACKNOW; \ @@ -91,7 +91,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #else #define TCP_REASS(tp, ti, m, so, flags) { \ if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ + (tp)->seg_next == (tcpiphdrp_32)(tp) && \ (tp)->t_state == TCPS_ESTABLISHED) { \ tp->t_flags |= TF_DELACK; \ (tp)->rcv_nxt += (ti)->ti_len; \ @@ -111,10 +111,7 @@ tcp_seq tcp_iss; /* tcp initial send seq # */ #endif int -tcp_reass(tp, ti, m) - register struct tcpcb *tp; - register struct tcpiphdr *ti; - struct mbuf *m; +tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) { register struct tcpiphdr *q; struct socket *so = tp->t_socket; @@ -130,8 +127,8 @@ tcp_reass(tp, ti, m) /* * Find a segment which begins after this one does. */ - for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); - q = tcpiphdr_next(q)) + for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; + q = (struct tcpiphdr *)q->ti_next) if (SEQ_GT(q->ti_seq, ti->ti_seq)) break; @@ -140,9 +137,9 @@ tcp_reass(tp, ti, m) * our data already. If so, drop the data from the incoming * segment. If it provides all of our data, drop us. */ - if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { + if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { register int i; - q = tcpiphdr_prev(q); + q = (struct tcpiphdr *)q->ti_prev; /* conversion to int (in i) handles seq wraparound */ i = q->ti_seq + q->ti_len - ti->ti_seq; if (i > 0) { @@ -162,36 +159,37 @@ tcp_reass(tp, ti, m) ti->ti_len -= i; ti->ti_seq += i; } - q = tcpiphdr_next(q); + q = (struct tcpiphdr *)(q->ti_next); } tcpstat.tcps_rcvoopack++; tcpstat.tcps_rcvoobyte += ti->ti_len; - ti->ti_mbuf = m; + REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ /* * While we overlap succeeding segments trim them or, * if they are completely covered, dequeue them. */ - while (!tcpfrag_list_end(q, tp)) { + while (q != (struct tcpiphdr *)tp) { register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; if (i <= 0) break; if (i < q->ti_len) { q->ti_seq += i; q->ti_len -= i; - m_adj(q->ti_mbuf, i); + m_adj((struct mbuf *) REASS_MBUF(q), i); break; } - q = tcpiphdr_next(q); - m = tcpiphdr_prev(q)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(q))); + q = (struct tcpiphdr *)q->ti_next; + m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); + remque_32((void *)(q->ti_prev)); m_freem(m); } /* * Stick new segment in its place. */ - insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); + insque_32(ti, (void *)(q->ti_prev)); + present: /* * Present data to user, advancing rcv_nxt through @@ -199,17 +197,17 @@ tcp_reass(tp, ti, m) */ if (!TCPS_HAVEESTABLISHED(tp->t_state)) return (0); - ti = tcpfrag_list_first(tp); - if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) + ti = (struct tcpiphdr *) tp->seg_next; + if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) return (0); if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) return (0); do { tp->rcv_nxt += ti->ti_len; flags = ti->ti_flags & TH_FIN; - remque(tcpiphdr2qlink(ti)); - m = ti->ti_mbuf; - ti = tcpiphdr_next(ti); + remque_32(ti); + m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ + ti = (struct tcpiphdr *)ti->ti_next; /* if (so->so_state & SS_FCANTRCVMORE) */ if (so->so_state & SS_FCANTSENDMORE) m_freem(m); @@ -228,13 +226,9 @@ tcp_reass(tp, ti, m) * TCP input routine, follows pages 65-76 of the * protocol specification dated September, 1981 very closely. */ -void -tcp_input(m, iphlen, inso) - register struct mbuf *m; - int iphlen; - struct socket *inso; +void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) { - struct ip save_ip, *ip; + struct ip save_ip, *ip; register struct tcpiphdr *ti; caddr_t optp = NULL; int optlen = 0; @@ -242,23 +236,25 @@ tcp_input(m, iphlen, inso) register struct tcpcb *tp = 0; register int tiflags; struct socket *so = 0; - int todrop, acked, ourfinisacked, needoutput = 0; -/* int dropsocket = 0; */ + int todrop; + u_int acked; + int ourfinisacked, needoutput = 0; + /* int dropsocket = 0; */ int iss = 0; u_long tiwin; int ret; -/* int ts_present = 0; */ + /* int ts_present = 0; */ DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", - (long )m, iphlen, (long )inso )); - + DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", + (long)m, iphlen, (long)inso)); + /* * If called with m == 0, then we're continuing the connect */ if (m == NULL) { so = inso; - + /* Re-set a few variables */ tp = sototcpcb(so); m = so->so_m; @@ -266,47 +262,46 @@ tcp_input(m, iphlen, inso) ti = so->so_ti; tiwin = ti->ti_win; tiflags = ti->ti_flags; - + goto cont_conn; } - - + + tcpstat.tcps_rcvtotal++; /* * Get IP and TCP header together in first mbuf. * Note: IP leaves IP header in first mbuf. */ ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip )) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen=sizeof(struct ip ); + if (iphlen > sizeof(struct ip)) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen = sizeof(struct ip); } /* XXX Check if too short */ - + /* * Save a copy of the IP header in case we want restore it * for sending an ICMP error message in response. */ - ip=mtod(m, struct ip *); - save_ip = *ip; - save_ip.ip_len+= iphlen; + ip = mtod(m, struct ip *); + save_ip = *ip; + save_ip.ip_len += iphlen; /* * Checksum extended TCP header and data. */ tlen = ((struct ip *)ti)->ip_len; - tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; - memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip ) + tlen; + len = sizeof(struct ip) + tlen; /* keep checksum for ICMP reply - * ti->ti_sum = cksum(m, len); + * ti->ti_sum = cksum(m, len); * if (ti->ti_sum) { */ - if(cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; + if (cksum(m, len)) { + tcpstat.tcps_rcvbadsum++; + goto drop; } /* @@ -314,37 +309,37 @@ tcp_input(m, iphlen, inso) * pull out TCP options and adjust length. XXX */ off = ti->ti_off << 2; - if (off < sizeof (struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; + if (off < sizeof(struct tcphdr) || off > tlen) { + tcpstat.tcps_rcvbadoff++; + goto drop; } tlen -= off; ti->ti_len = tlen; - if (off > sizeof (struct tcphdr)) { - optlen = off - sizeof (struct tcphdr); - optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); + if (off > sizeof(struct tcphdr)) { + optlen = off - sizeof(struct tcphdr); + optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); - /* + /* * Do quick retrieval of timestamp options ("options * prediction?"). If timestamp is the only option and it's * formatted as recommended in RFC 1323 appendix A, we * quickly get the values now and not bother calling * tcp_dooptions(), etc. */ -/* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ + /* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ } tiflags = ti->ti_flags; - + /* * Convert TCP protocol specific fields to host format. */ @@ -356,20 +351,20 @@ tcp_input(m, iphlen, inso) /* * Drop TCP, IP headers and TCP options. */ - m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - + m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + /* * Locate pcb for segment. */ findso: so = tcp_last_so; if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); + ti->ti_dst, ti->ti_dport); if (so) tcp_last_so = so; ++tcpstat.tcps_socachemiss; @@ -382,63 +377,63 @@ tcp_input(m, iphlen, inso) * but should either do a listen or a connect soon. * * state == CLOSED means we've done socreate() but haven't - * attached it to a protocol yet... - * + * attached it to a protocol yet... + * * XXX If a TCB does not exist, and the TH_SYN flag is * the only flag set, then create a session, mark it * as if it was LISTENING, and continue... */ if (so == 0) { - if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) - goto dropwithreset; - - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } - - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); - - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ - - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; - - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; - - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; + if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) + goto dropwithreset; + + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } + + sbreserve(&so->so_snd, tcp_sndspace); + sbreserve(&so->so_rcv, tcp_rcvspace); + + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ + + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; + + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; + + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; } - - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; + + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; tp = sototcpcb(so); - + /* XXX Should never fail */ if (tp == 0) goto dropwithreset; if (tp->t_state == TCPS_CLOSED) goto drop; - + /* Unscale the window into a 32-bit value. */ /* if ((tiflags & TH_SYN) == 0) * tiwin = ti->ti_win << tp->snd_scale; * else */ - tiwin = ti->ti_win; + tiwin = ti->ti_win; /* * Segment received on connection. @@ -446,66 +441,66 @@ tcp_input(m, iphlen, inso) */ tp->t_idle = 0; if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; + tp->t_timer[TCPT_KEEP] = tcp_keepidle; /* * Process options if not in LISTEN state, * else do it below (after getting remote address). */ if (optp && tp->t_state != TCPS_LISTEN) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); -/* , */ -/* &ts_present, &ts_val, &ts_ecr); */ - - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && -/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { - /* + (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && + /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { + /* * If last ACK falls within this segment's sequence numbers, * record the timestamp. */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ + /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ if (ti->ti_len == 0) { if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { /* * this is a pure ack for outstanding data. */ ++tcpstat.tcps_predack; -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && - SEQ_GT(ti->ti_ack, tp->t_rtseq)) + /* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && +SEQ_GT(ti->ti_ack, tp->t_rtseq)) tcp_xmit_timer(tp, tp->t_rtt); acked = ti->ti_ack - tp->snd_una; tcpstat.tcps_rcvackpack++; @@ -528,26 +523,27 @@ tcp_input(m, iphlen, inso) else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* + /* * There's room in so_snd, sowwakup will read() * from the socket if we can */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ + /* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ if (so->so_snd.sb_cc) (void) tcp_output(tp); return; } - } else if (ti->ti_ack == tp->snd_una && - tcpfrag_list_empty(tp) && - ti->ti_len <= sbspace(&so->so_rcv)) { + } + else if (ti->ti_ack == tp->snd_una && + tp->seg_next == (tcpiphdrp_32)tp && + ti->ti_len <= sbspace(&so->so_rcv)) { /* * this is a pure, in-sequence data packet * with nothing on the reassembly queue and @@ -561,25 +557,26 @@ tcp_input(m, iphlen, inso) * Add data to socket buffer. */ if (so->so_emu) { - if (tcp_emu(so,m)) sbappend(so, m); - } else + if (tcp_emu(so, m)) sbappend(so, m); + } + else sbappend(so, m); - - /* + + /* * XXX This is called when data arrives. Later, check * if we can actually write() to the socket * XXX Need to check? It's be NON_BLOCKING */ -/* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ + /* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ tp->t_flags |= TF_ACKNOW; tcp_output(tp); return; @@ -592,141 +589,147 @@ tcp_input(m, iphlen, inso) * but not less than advertised window. */ { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); } switch (tp->t_state) { - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ case TCPS_LISTEN: { - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; - - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ - - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; + + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ + + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { #if 0 - if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } else + if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } + else #endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if(ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if (ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } + } + } + if (so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ } - } - if(so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { - u_char code=ICMP_UNREACH_NET; - DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", - errno,strerror(errno))); - if(errno == ECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, - TH_RST|TH_ACK); - } else { - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - *ip=save_ip; - icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - } else { - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - } - return; - - cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; - } - cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if (tcp_fconnect(so) == -1) { + int error = WSAGetLastError(); + if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { + u_char code = ICMP_UNREACH_NET; + DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", + errno, strerror(errno))); + if (error == WSAECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, + TH_RST | TH_ACK); + } + else { + if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); + *ip = save_ip; + icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + return; + } + } + + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + return; + + cont_conn: + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } + cont_input: + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR / 2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tcpstat.tcps_accepts++; + goto trimthenstep6; } /* case TCPS_LISTEN */ - + /* * If the state is SYN_SENT: * if seg contains an ACK, but not for our SYN, drop the input. @@ -741,13 +744,13 @@ tcp_input(m, iphlen, inso) */ case TCPS_SYN_SENT: if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) goto dropwithreset; if (tiflags & TH_RST) { if (tiflags & TH_ACK) - tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ + tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ goto drop; } @@ -767,7 +770,7 @@ tcp_input(m, iphlen, inso) tcpstat.tcps_connects++; soisfconnected(so); tp->t_state = TCPS_ESTABLISHED; - + /* Do window scaling on this connection? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -775,7 +778,7 @@ tcp_input(m, iphlen, inso) * tp->rcv_scale = tp->request_r_scale; * } */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, + (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); /* * if we didn't have to retransmit the SYN, @@ -783,10 +786,11 @@ tcp_input(m, iphlen, inso) */ if (tp->t_rtt) tcp_xmit_timer(tp, tp->t_rtt); - } else + } + else tp->t_state = TCPS_SYN_RECEIVED; -trimthenstep6: + trimthenstep6: /* * Advance ti->ti_seq to correspond to first data byte. * If data, trim to stay within window, @@ -808,45 +812,45 @@ tcp_input(m, iphlen, inso) /* * States other than LISTEN or SYN_SENT. * First check timestamp, if present. - * Then check that at least some bytes of segment are within + * Then check that at least some bytes of segment are within * receive window. If segment begins before rcv_nxt, * drop leading data (and SYN); if nothing left, just ack. - * + * * RFC 1323 PAWS: If we have a timestamp reply on this segment * and it's less than ts_recent, drop it. */ -/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ -/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ -/* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ + /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ + /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ + /* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ todrop = tp->rcv_nxt - ti->ti_seq; if (todrop > 0) { if (tiflags & TH_SYN) { tiflags &= ~TH_SYN; ti->ti_seq++; - if (ti->ti_urp > 1) + if (ti->ti_urp > 1) ti->ti_urp--; else tiflags &= ~TH_URG; @@ -856,14 +860,14 @@ tcp_input(m, iphlen, inso) * Following if statement from Stevens, vol. 2, p. 960. */ if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { /* * Any valid FIN must be to the left of the window. * At this point the FIN must be a duplicate or out * of sequence; drop it. */ tiflags &= ~TH_FIN; - + /* * Send an ACK to resynchronize and drop any data. * But keep on processing for RST or ACK. @@ -872,7 +876,8 @@ tcp_input(m, iphlen, inso) todrop = ti->ti_len; tcpstat.tcps_rcvduppack++; tcpstat.tcps_rcvdupbyte += todrop; - } else { + } + else { tcpstat.tcps_rcvpartduppack++; tcpstat.tcps_rcvpartdupbyte += todrop; } @@ -891,7 +896,7 @@ tcp_input(m, iphlen, inso) * user processes are gone, then RST the other end. */ if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { tp = tcp_close(tp); tcpstat.tcps_rcvafterclose++; goto dropwithreset; @@ -901,7 +906,7 @@ tcp_input(m, iphlen, inso) * If segment ends after window, drop trailing data * (and PUSH and FIN); if nothing left, just ACK. */ - todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); + todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); if (todrop > 0) { tcpstat.tcps_rcvpackafterwin++; if (todrop >= ti->ti_len) { @@ -913,8 +918,8 @@ tcp_input(m, iphlen, inso) * are above the previous ones. */ if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { iss = tp->rcv_nxt + TCP_ISSINCR; tp = tcp_close(tp); goto findso; @@ -929,53 +934,55 @@ tcp_input(m, iphlen, inso) if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { tp->t_flags |= TF_ACKNOW; tcpstat.tcps_rcvwinprobe++; - } else + } + else goto dropafterack; - } else + } + else tcpstat.tcps_rcvbyteafterwin += todrop; m_adj(m, -todrop); ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH|TH_FIN); + tiflags &= ~(TH_PUSH | TH_FIN); } /* * If last ACK falls within this segment's sequence numbers, * record its timestamp. */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ + /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ if (tiflags&TH_RST) switch (tp->t_state) { case TCPS_SYN_RECEIVED: -/* so->so_error = ECONNREFUSED; */ + /* so->so_error = ECONNREFUSED; */ goto close; case TCPS_ESTABLISHED: case TCPS_FIN_WAIT_1: case TCPS_FIN_WAIT_2: case TCPS_CLOSE_WAIT: -/* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; + /* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + tcpstat.tcps_drops++; + tp = tcp_close(tp); + goto drop; case TCPS_CLOSING: case TCPS_LAST_ACK: @@ -989,7 +996,7 @@ tcp_input(m, iphlen, inso) * error and we send an RST and drop the connection. */ if (tiflags & TH_SYN) { - tp = tcp_drop(tp,0); + tp = tcp_drop(tp, 0); goto dropwithreset; } @@ -1002,42 +1009,45 @@ tcp_input(m, iphlen, inso) * Ack processing. */ switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ case TCPS_SYN_RECEIVED: if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) + SEQ_GT(ti->ti_ack, tp->snd_max)) goto dropwithreset; tcpstat.tcps_connects++; tp->t_state = TCPS_ESTABLISHED; - /* - * The sent SYN is ack'ed with our sequence number +1 - * The first data byte already in the buffer will get + /* + * The sent SYN is ack'ed with our sequence number +1 + * The first data byte already in the buffer will get * lost if no correction is made. This is only needed for * SS_CTL since the buffer is empty otherwise. - * tp->snd_una++; or: + * tp->snd_una++; or: */ - tp->snd_una=ti->ti_ack; + tp->snd_una = ti->ti_ack; if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } else { - soisfconnected(so); + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } + else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } + else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } + else { + soisfconnected(so); } - + /* Do window scaling? */ /* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == * (TF_RCVD_SCALE|TF_REQ_SCALE)) { @@ -1045,7 +1055,7 @@ tcp_input(m, iphlen, inso) * tp->rcv_scale = tp->request_r_scale; * } */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); tp->snd_wl1 = ti->ti_seq - 1; /* Avoid ack processing; snd_una==ti_ack => dup ack */ goto synrx_to_est; @@ -1069,9 +1079,9 @@ tcp_input(m, iphlen, inso) if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", - (long )m, (long )so)); + tcpstat.tcps_rcvdupack++; + DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", + (long)m, (long)so)); /* * If we have outstanding data (other than * a window probe), this is a completely @@ -1091,18 +1101,18 @@ tcp_input(m, iphlen, inso) * the new ssthresh). * * Dup acks mean that packets have left the - * network (they're now cached at the receiver) + * network (they're now cached at the receiver) * so bump cwnd by the amount in the receiver * to keep a constant cwnd packets in the * network. */ if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) + ti->ti_ack != tp->snd_una) tp->t_dupacks = 0; else if (++tp->t_dupacks == tcprexmtthresh) { tcp_seq onxt = tp->snd_nxt; u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / + min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; if (win < 2) @@ -1112,18 +1122,20 @@ tcp_input(m, iphlen, inso) tp->t_rtt = 0; tp->snd_nxt = ti->ti_ack; tp->snd_cwnd = tp->t_maxseg; - (void) tcp_output(tp); + (void)tcp_output(tp); tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; + tp->t_maxseg * tp->t_dupacks; if (SEQ_GT(onxt, tp->snd_nxt)) tp->snd_nxt = onxt; goto drop; - } else if (tp->t_dupacks > tcprexmtthresh) { + } + else if (tp->t_dupacks > tcprexmtthresh) { tp->snd_cwnd += tp->t_maxseg; - (void) tcp_output(tp); + (void)tcp_output(tp); goto drop; } - } else + } + else tp->t_dupacks = 0; break; } @@ -1133,7 +1145,7 @@ tcp_input(m, iphlen, inso) * for the other side's cached packets, retract it. */ if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) + tp->snd_cwnd > tp->snd_ssthresh) tp->snd_cwnd = tp->snd_ssthresh; tp->t_dupacks = 0; if (SEQ_GT(ti->ti_ack, tp->snd_max)) { @@ -1153,12 +1165,12 @@ tcp_input(m, iphlen, inso) * timer backoff (cf., Phil Karn's retransmit alg.). * Recompute the initial retransmit timer. */ -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp,tp->t_rtt); + /* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp, tp->t_rtt); /* * If all outstanding data is acked, stop retransmit @@ -1169,7 +1181,8 @@ tcp_input(m, iphlen, inso) if (ti->ti_ack == tp->snd_max) { tp->t_timer[TCPT_REXMT] = 0; needoutput = 1; - } else if (tp->t_timer[TCPT_PERSIST] == 0) + } + else if (tp->t_timer[TCPT_PERSIST] == 0) tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; /* * When new data is acked, open the congestion window. @@ -1179,40 +1192,41 @@ tcp_input(m, iphlen, inso) * (maxseg^2 / cwnd per packet). */ { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); } if (acked > so->so_snd.sb_cc) { tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); + sbdrop(&so->so_snd, so->so_snd.sb_cc); ourfinisacked = 1; - } else { + } + else { sbdrop(&so->so_snd, acked); tp->snd_wnd -= acked; ourfinisacked = 0; } /* * XXX sowwakup is called when data is acked and there's room for - * for more data... it should read() the socket + * for more data... it should read() the socket */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ + /* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ tp->snd_una = ti->ti_ack; if (SEQ_LT(tp->snd_nxt, tp->snd_una)) tp->snd_nxt = tp->snd_una; switch (tp->t_state) { - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ case TCPS_FIN_WAIT_1: if (ourfinisacked) { /* @@ -1230,12 +1244,12 @@ tcp_input(m, iphlen, inso) } break; - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ case TCPS_CLOSING: if (ourfinisacked) { tp->t_state = TCPS_TIME_WAIT; @@ -1245,12 +1259,12 @@ tcp_input(m, iphlen, inso) } break; - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ case TCPS_LAST_ACK: if (ourfinisacked) { tp = tcp_close(tp); @@ -1258,11 +1272,11 @@ tcp_input(m, iphlen, inso) } break; - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; goto dropafterack; @@ -1275,12 +1289,12 @@ tcp_input(m, iphlen, inso) * Don't look at window if no ACK: TAC's send garbage on first SYN. */ if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { /* keep track of pure window updates */ if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) tcpstat.tcps_rcvwinupd++; tp->snd_wnd = tiwin; tp->snd_wl1 = ti->ti_seq; @@ -1294,7 +1308,7 @@ tcp_input(m, iphlen, inso) * Process segments with URG. */ if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { /* * This is a kludge, but if we receive and accept * random urgent pointers, we'll crash in @@ -1310,31 +1324,32 @@ tcp_input(m, iphlen, inso) * If this segment advances the known urgent pointer, * then mark the data stream. This should not happen * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since - * a FIN has been received from the remote side. + * a FIN has been received from the remote side. * In these states we ignore the URG. * * According to RFC961 (Assigned Protocols), * the urgent pointer points to the last octet * of urgent data. We continue, however, * to consider it to indicate the first octet - * of data past the urgent section as the original + * of data past the urgent section as the original * spec states (in one of two places). */ - if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { + if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + + so->so_urgc = so->so_rcv.sb_cc + (tp->rcv_up - tp->rcv_nxt); /* -1; */ tp->rcv_up = ti->ti_seq + ti->ti_urp; - + } - } else + } + else /* * If no out of band data is expected, * pull receive urgent pointer along * with the receive window. */ if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; + tp->rcv_up = tp->rcv_nxt; dodata: /* @@ -1346,7 +1361,7 @@ tcp_input(m, iphlen, inso) * connection then we just ignore the text. */ if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCPS_HAVERCVDFIN(tp->t_state) == 0) { TCP_REASS(tp, ti, m, so, tiflags); /* * Note the amount of data that peer has sent into @@ -1354,7 +1369,8 @@ tcp_input(m, iphlen, inso) * buffer size. */ len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } else { + } + else { m_free(m); tiflags &= ~TH_FIN; } @@ -1368,45 +1384,45 @@ tcp_input(m, iphlen, inso) /* * If we receive a FIN we can't send more data, * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the + * Shutdown the socket if there is no rx data in the * buffer. * soread() is called on completion of shutdown() and * will got to TCPS_LAST_ACK, and use tcp_output() * to send the FIN. */ -/* sofcantrcvmore(so); */ + /* sofcantrcvmore(so); */ sofwdrain(so); - + tp->t_flags |= TF_ACKNOW; tp->rcv_nxt++; } switch (tp->t_state) { - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ case TCPS_SYN_RECEIVED: case TCPS_ESTABLISHED: - if(so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ + if (so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ case TCPS_FIN_WAIT_1: tp->t_state = TCPS_CLOSING; break; - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ case TCPS_FIN_WAIT_2: tp->t_state = TCPS_TIME_WAIT; tcp_canceltimers(tp); @@ -1414,9 +1430,9 @@ tcp_input(m, iphlen, inso) soisfdisconnected(so); break; - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ case TCPS_TIME_WAIT: tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; break; @@ -1427,18 +1443,18 @@ tcp_input(m, iphlen, inso) * If this is a small packet, then ACK now - with Nagel * congestion avoidance sender won't send more until * he gets an ACK. - * + * * See above. */ -/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ -/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ + /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ + /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { tp->t_flags |= TF_ACKNOW; } @@ -1446,7 +1462,7 @@ tcp_input(m, iphlen, inso) * Return any desired output. */ if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void) tcp_output(tp); + (void)tcp_output(tp); } return; @@ -1459,7 +1475,7 @@ tcp_input(m, iphlen, inso) goto drop; m_freem(m); tp->t_flags |= TF_ACKNOW; - (void) tcp_output(tp); + (void)tcp_output(tp); return; dropwithreset: @@ -1468,8 +1484,8 @@ tcp_input(m, iphlen, inso) tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); else { if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, - TH_RST|TH_ACK); + tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, + TH_RST | TH_ACK); } return; @@ -1488,11 +1504,7 @@ tcp_input(m, iphlen, inso) * u_int32_t *ts_val, *ts_ecr; */ void -tcp_dooptions(tp, cp, cnt, ti) - struct tcpcb *tp; - u_char *cp; - int cnt; - struct tcpiphdr *ti; +tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) { u_int16_t mss; int opt, optlen; @@ -1523,7 +1535,7 @@ tcp_dooptions(tp, cp, cnt, ti) continue; memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); NTOHS(mss); - (void) tcp_mss(tp, mss); /* sets t_maxseg */ + tcp_mss(tp, mss); /* sets t_maxseg */ break; /* case TCPOPT_WINDOW: @@ -1568,11 +1580,7 @@ tcp_dooptions(tp, cp, cnt, ti) #ifdef notdef -void -tcp_pulloutofband(so, ti, m) - struct socket *so; - struct tcpiphdr *ti; - register struct mbuf *m; +void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) { int cnt = ti->ti_urp - 1; @@ -1602,10 +1610,7 @@ tcp_pulloutofband(so, ti, m) * and update averages and current timeout. */ -void -tcp_xmit_timer(tp, rtt) - register struct tcpcb *tp; - int rtt; +void tcp_xmit_timer(register struct tcpcb *tp, int rtt) { register short delta; @@ -1692,13 +1697,10 @@ tcp_xmit_timer(tp, rtt) * parameters from pre-set or cached values in the routing entry. */ -int -tcp_mss(tp, offer) - register struct tcpcb *tp; - u_int offer; +u_int tcp_mss(register struct tcpcb *tp, u_int offer) { struct socket *so = tp->t_socket; - int mss; + u_int mss; DEBUG_CALL("tcp_mss"); DEBUG_ARG("tp = %lx", (long)tp); diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c old mode 100755 new mode 100644 index 5cb1a61e3..01df0118f --- a/BasiliskII/src/slirp/tcp_output.c +++ b/BasiliskII/src/slirp/tcp_output.c @@ -63,9 +63,7 @@ u_char tcp_outflags[TCP_NSTATES] = { /* * Tcp output routine: figure out what should be sent and send it. */ -int -tcp_output(tp) - register struct tcpcb *tp; +int tcp_output(register struct tcpcb *tp) { register struct socket *so = tp->t_socket; register long len, win; @@ -126,7 +124,7 @@ tcp_output(tp) * to send then the probe will be the FIN * itself. */ - if (off < so->so_snd.sb_cc) + if (off < (int)so->so_snd.sb_cc) flags &= ~TH_FIN; win = 1; } else { @@ -201,12 +199,12 @@ tcp_output(tp) * taking into account that we are limited by * TCP_MAXWIN << tp->rcv_scale. */ - long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - + long adv = min(win, TCP_MAXWIN << tp->rcv_scale) - (tp->rcv_adv - tp->rcv_nxt); - if (adv >= (long) (2 * tp->t_maxseg)) + if (adv >= (long)(2 * tp->t_maxseg)) goto send; - if (2 * adv >= (long) so->so_rcv.sb_datalen) + if (2 * adv >= (long)so->so_rcv.sb_datalen) goto send; } @@ -359,7 +357,7 @@ tcp_output(tp) */ /* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); + sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); m->m_len += len; /* } else { @@ -435,12 +433,12 @@ tcp_output(tp) * Calculate receive window. Don't shrink window, * but avoid silly window syndrome. */ - if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) + if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) win = 0; - if (win > (long)TCP_MAXWIN << tp->rcv_scale) - win = (long)TCP_MAXWIN << tp->rcv_scale; - if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) - win = (long)(tp->rcv_adv - tp->rcv_nxt); + if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) + win = (u_long) (TCP_MAXWIN << tp->rcv_scale); + if (win < (tp->rcv_adv - tp->rcv_nxt)) + win = (tp->rcv_adv - tp->rcv_nxt); ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); if (SEQ_GT(tp->snd_up, tp->snd_una)) { @@ -530,7 +528,7 @@ tcp_output(tp) { - ((struct ip *)ti)->ip_len = m->m_len; + ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; ((struct ip *)ti)->ip_ttl = ip_defttl; ((struct ip *)ti)->ip_tos = so->so_iptos; @@ -581,9 +579,7 @@ tcp_output(tp) return (0); } -void -tcp_setpersist(tp) - register struct tcpcb *tp; +void tcp_setpersist(register struct tcpcb *tp) { int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c old mode 100755 new mode 100644 index 391350802..70e04b5ee --- a/BasiliskII/src/slirp/tcp_subr.c +++ b/BasiliskII/src/slirp/tcp_subr.c @@ -46,14 +46,13 @@ int tcp_mssdflt = TCP_MSS; int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -int tcp_rcvspace; /* You may want to change this */ -int tcp_sndspace; /* Keep small if you have an error prone link */ +size_t tcp_rcvspace; /* You may want to change this */ +size_t tcp_sndspace; /* Keep small if you have an error prone link */ /* * Tcp initialization */ -void -tcp_init() +void tcp_init() { tcp_iss = 1; /* wrong */ tcb.so_next = tcb.so_prev = &tcb; @@ -74,14 +73,12 @@ tcp_init() * necessary when the connection is used. */ /* struct tcpiphdr * */ -void -tcp_template(tp) - struct tcpcb *tp; +void tcp_template(struct tcpcb *tp) { struct socket *so = tp->t_socket; register struct tcpiphdr *n = &tp->t_template; - n->ti_mbuf = NULL; + n->ti_next = n->ti_prev = 0; n->ti_x1 = 0; n->ti_pr = IPPROTO_TCP; n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); @@ -113,13 +110,8 @@ tcp_template(tp) * In any case the ack and sequence number of the transmitted * segment are as specified by the parameters. */ -void -tcp_respond(tp, ti, m, ack, seq, flags) - struct tcpcb *tp; - register struct tcpiphdr *ti; - register struct mbuf *m; - tcp_seq ack, seq; - int flags; +void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, + register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) { register int tlen; int win = 0; @@ -164,7 +156,7 @@ tcp_respond(tp, ti, m, ack, seq, flags) tlen += sizeof (struct tcpiphdr); m->m_len = tlen; - ti->ti_mbuf = 0; + ti->ti_next = ti->ti_prev = 0; ti->ti_x1 = 0; ti->ti_seq = htonl(seq); ti->ti_ack = htonl(ack); @@ -193,9 +185,7 @@ tcp_respond(tp, ti, m, ack, seq, flags) * empty reassembly queue and hooking it to the argument * protocol control block. */ -struct tcpcb * -tcp_newtcpcb(so) - struct socket *so; +struct tcpcb *tcp_newtcpcb(struct socket *so) { register struct tcpcb *tp; @@ -204,7 +194,7 @@ tcp_newtcpcb(so) return ((struct tcpcb *)0); memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; + tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; tp->t_maxseg = tcp_mssdflt; tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; @@ -268,9 +258,7 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err) * discard internet protocol block * wake up any sleepers */ -struct tcpcb * -tcp_close(tp) - register struct tcpcb *tp; +struct tcpcb *tcp_close(register struct tcpcb *tp) { register struct tcpiphdr *t; struct socket *so = tp->t_socket; @@ -280,11 +268,11 @@ tcp_close(tp) DEBUG_ARG("tp = %lx", (long )tp); /* free the reassembly queue, if any */ - t = tcpfrag_list_first(tp); - while (!tcpfrag_list_end(t, tp)) { - t = tcpiphdr_next(t); - m = tcpiphdr_prev(t)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(t))); + t = (struct tcpiphdr *) tp->seg_next; + while (t != (struct tcpiphdr *)tp) { + t = (struct tcpiphdr *)t->ti_next; + m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); + remque_32((struct tcpiphdr *) t->ti_prev); m_freem(m); } /* It's static */ @@ -306,8 +294,7 @@ tcp_close(tp) return ((struct tcpcb *)0); } -void -tcp_drain() +void tcp_drain() { /* XXX */ } @@ -319,10 +306,7 @@ tcp_drain() #ifdef notdef -void -tcp_quench(i, errno) - - int errno; +void tcp_quench(int i, int errno) { struct tcpcb *tp = intotcpcb(inp); @@ -346,9 +330,7 @@ tcp_quench(i, errno) * for peer to send FIN or not respond to keep-alives, etc. * We can let the user exit from the close as soon as the FIN is acked. */ -void -tcp_sockclosed(tp) - struct tcpcb *tp; +void tcp_sockclosed(struct tcpcb *tp) { DEBUG_CALL("tcp_sockclosed"); @@ -389,8 +371,7 @@ tcp_sockclosed(tp) * nonblocking. Connect returns after the SYN is sent, and does * not wait for ACK+SYN. */ -int tcp_fconnect(so) - struct socket *so; +int tcp_fconnect(struct socket *so) { int ret=0; @@ -423,10 +404,12 @@ int tcp_fconnect(so) } else addr.sin_addr = so->so_faddr; addr.sin_port = so->so_fport; - + + char addrstr[INET_ADDRSTRLEN]; DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, + addrstr, sizeof(addrstr)))); /* We don't care what port we get */ ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); @@ -452,9 +435,7 @@ int tcp_fconnect(so) * the time it gets to accept(), so... We simply accept * here and SYN the local-host. */ -void -tcp_connect(inso) - struct socket *inso; +void tcp_connect(struct socket *inso) { struct socket *so; struct sockaddr_in addr; @@ -486,7 +467,7 @@ tcp_connect(inso) so->so_lport = inso->so_lport; } - (void) tcp_mss(sototcpcb(so), 0); + tcp_mss(sototcpcb(so), 0); if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { tcp_close(sototcpcb(so)); /* This will sofree() as well */ @@ -539,9 +520,7 @@ tcp_connect(inso) /* * Attach a TCPCB to a socket. */ -int -tcp_attach(so) - struct socket *so; +int tcp_attach(struct socket *so) { if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) return -1; @@ -575,9 +554,7 @@ struct emu_t *tcpemu = 0; /* * Return TOS according to the above table */ -u_int8_t -tcp_tos(so) - struct socket *so; +u_int8_t tcp_tos(struct socket *so) { int i = 0; struct emu_t *emup; @@ -629,10 +606,7 @@ int do_echo = -1; * * NOTE: if you return 0 you MUST m_free() the mbuf! */ -int -tcp_emu(so, m) - struct socket *so; - struct mbuf *m; +int tcp_emu(struct socket *so, struct mbuf *m) { u_int n1, n2, n3, n4, n5, n6; char buff[256]; @@ -833,7 +807,7 @@ tcp_emu(so, m) ns->so_laddr=so->so_laddr; ns->so_lport=htons(port); - (void) tcp_mss(sototcpcb(ns), 0); + tcp_mss(sototcpcb(ns), 0); ns->so_faddr=so->so_faddr; ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ @@ -1060,7 +1034,7 @@ tcp_emu(so, m) * of the connection as a NUL-terminated decimal ASCII string. */ so->so_emu = 0; - for (lport = 0, i = 0; i < m->m_len-1; ++i) { + for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { if (m->m_data[i] < '0' || m->m_data[i] > '9') return 1; /* invalid number */ lport *= 10; @@ -1245,9 +1219,7 @@ tcp_emu(so, m) * Return 0 if this connections is to be closed, 1 otherwise, * return 2 if this is a command-line connection */ -int -tcp_ctl(so) - struct socket *so; +int tcp_ctl(struct socket *so) { struct sbuf *sb = &so->so_snd; int command; diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c old mode 100755 new mode 100644 diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h old mode 100755 new mode 100644 index 0bc438c76..73fe20894 --- a/BasiliskII/src/slirp/tcp_timer.h +++ b/BasiliskII/src/slirp/tcp_timer.h @@ -130,9 +130,9 @@ extern int tcp_backoff[]; struct tcpcb; -void tcp_fasttimo _P((void)); -void tcp_slowtimo _P((void)); -void tcp_canceltimers _P((struct tcpcb *)); -struct tcpcb * tcp_timers _P((register struct tcpcb *, int)); +void tcp_fasttimo(void); +void tcp_slowtimo(void); +void tcp_canceltimers(struct tcpcb *); +struct tcpcb * tcp_timers(register struct tcpcb *, int); #endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h old mode 100755 new mode 100644 index 064ac69a1..c8e99ae03 --- a/BasiliskII/src/slirp/tcp_var.h +++ b/BasiliskII/src/slirp/tcp_var.h @@ -36,12 +36,18 @@ #include "tcpip.h" #include "tcp_timer.h" +#if SIZEOF_CHAR_P == 4 + typedef struct tcpiphdr *tcpiphdrp_32; +#else + typedef u_int32_t tcpiphdrp_32; +#endif + /* * Tcp control block, one per tcp; fields: */ struct tcpcb { - struct tcpiphdr *seg_next; /* sequencing queue */ - struct tcpiphdr *seg_prev; + tcpiphdrp_32 seg_next; /* sequencing queue */ + tcpiphdrp_32 seg_prev; short t_state; /* state of this connection */ short t_timer[TCPT_NTIMERS]; /* tcp timers */ short t_rxtshift; /* log(2) of rexmt exp. backoff */ @@ -160,6 +166,21 @@ struct tcpcb { #define TCP_REXMTVAL(tp) \ (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) +/* XXX + * We want to avoid doing m_pullup on incoming packets but that + * means avoiding dtom on the tcp reassembly code. That in turn means + * keeping an mbuf pointer in the reassembly queue (since we might + * have a cluster). As a quick hack, the source & destination + * port numbers (which are no longer needed once we've located the + * tcpcb) are overlayed with an mbuf pointer. + */ +#if SIZEOF_CHAR_P == 4 +typedef struct mbuf *mbufp_32; +#else +typedef u_int32_t mbufp_32; +#endif +#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) + /* * TCP statistics. * Many of these should be kept per connection, diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h old mode 100755 new mode 100644 index 7974ce3d5..dff5a3c96 --- a/BasiliskII/src/slirp/tcpip.h +++ b/BasiliskII/src/slirp/tcpip.h @@ -40,7 +40,8 @@ struct tcpiphdr { struct ipovly ti_i; /* overlaid ip structure */ struct tcphdr ti_t; /* tcp header */ }; -#define ti_mbuf ti_i.ih_mbuf.mptr +#define ti_next ti_i.ih_next +#define ti_prev ti_i.ih_prev #define ti_x1 ti_i.ih_x1 #define ti_pr ti_i.ih_pr #define ti_len ti_i.ih_len @@ -57,14 +58,6 @@ struct tcpiphdr { #define ti_sum ti_t.th_sum #define ti_urp ti_t.th_urp -#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) -#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) -#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) -#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) -#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) -#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) -#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) - /* * Just a clean way to get to the first byte * of the packet diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c old mode 100755 new mode 100644 index e656c4f06..3ba2971c3 --- a/BasiliskII/src/slirp/tftp.c +++ b/BasiliskII/src/slirp/tftp.c @@ -127,7 +127,6 @@ static int tftp_send_error(struct tftp_session *spt, struct sockaddr_in saddr, daddr; struct mbuf *m; struct tftp_t *tp; - int nobytes; m = m_get(); @@ -152,8 +151,6 @@ static int tftp_send_error(struct tftp_session *spt, daddr.sin_addr = spt->client_ip; daddr.sin_port = spt->client_port; - nobytes = 2; - m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - sizeof(struct ip) - sizeof(struct udphdr); diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h old mode 100755 new mode 100644 index f89e03932..b150a0490 --- a/BasiliskII/src/slirp/tftp.h +++ b/BasiliskII/src/slirp/tftp.h @@ -34,7 +34,7 @@ struct tftp_t { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c old mode 100755 new mode 100644 index 7917aaa47..deedb1e75 --- a/BasiliskII/src/slirp/udp.c +++ b/BasiliskII/src/slirp/udp.c @@ -128,7 +128,8 @@ udp_input(m, iphlen) * Checksum extended UDP header and data. */ if (udpcksum && uh->uh_sum) { - memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); + ((struct ipovly *)ip)->ih_next = 0; + ((struct ipovly *)ip)->ih_prev = 0; ((struct ipovly *)ip)->ih_x1 = 0; ((struct ipovly *)ip)->ih_len = uh->uh_ulen; /* keep uh_sum for ICMP reply @@ -271,10 +272,10 @@ int udp_output2(struct socket *so, struct mbuf *m, * and addresses and length put into network format. */ ui = mtod(m, struct udpiphdr *); - memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ui->ui_next = ui->ui_prev = 0; ui->ui_x1 = 0; ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ + ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ ui->ui_src = saddr->sin_addr; ui->ui_dst = daddr->sin_addr; @@ -290,7 +291,7 @@ int udp_output2(struct socket *so, struct mbuf *m, if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) ui->ui_sum = 0xffff; } - ((struct ip *)ui)->ip_len = m->m_len; + ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; ((struct ip *)ui)->ip_ttl = ip_defttl; ((struct ip *)ui)->ip_tos = iptos; @@ -337,14 +338,10 @@ udp_attach(so) addr.sin_port = 0; addr.sin_addr.s_addr = INADDR_ANY; if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int lasterrno=errno; + int error = WSAGetLastError(); closesocket(so->s); so->s=-1; -#ifdef _WIN32 - WSASetLastError(lasterrno); -#else - errno=lasterrno; -#endif + WSASetLastError(error); } else { /* success, insert in queue */ so->so_expire = curtime + SO_EXPIRE; diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h old mode 100755 new mode 100644 index 639a2f2c7..7d844efe2 --- a/BasiliskII/src/slirp/udp.h +++ b/BasiliskII/src/slirp/udp.h @@ -54,7 +54,7 @@ struct udphdr { } PACKED__; #ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) +#pragma pack(PACK_RESET) #endif /* @@ -64,7 +64,8 @@ struct udpiphdr { struct ipovly ui_i; /* overlaid ip structure */ struct udphdr ui_u; /* udp header */ }; -#define ui_mbuf ui_i.ih_mbuf.mptr +#define ui_next ui_i.ih_next +#define ui_prev ui_i.ih_prev #define ui_x1 ui_i.ih_x1 #define ui_pr ui_i.ih_pr #define ui_len ui_i.ih_len @@ -99,14 +100,14 @@ extern struct udpstat udpstat; extern struct socket udb; struct mbuf; -void udp_init _P((void)); -void udp_input _P((register struct mbuf *, int)); -int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); -int udp_attach _P((struct socket *)); -void udp_detach _P((struct socket *)); -u_int8_t udp_tos _P((struct socket *)); -void udp_emu _P((struct socket *, struct mbuf *)); -struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); +void udp_init(void); +void udp_input(register struct mbuf *, int); +int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); +int udp_attach(struct socket *); +void udp_detach(struct socket *); +u_int8_t udp_tos(struct socket *); +void udp_emu(struct socket *, struct mbuf *); +struct socket * udp_listen(u_int, u_int32_t, u_int, int); int udp_output2(struct socket *so, struct mbuf *m, struct sockaddr_in *saddr, struct sockaddr_in *daddr, int iptos); diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 8dbc50136..517ab7034 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -324,9 +324,13 @@ uint32 TimeToMacTime(time_t t) // This code is taken from glibc 2.2 // Convert to number of seconds elapsed since 1-Jan-1904 +#ifdef WIN32 + struct tm *local = localtime(&t); +#else struct tm result; localtime_r(&t, &result); struct tm *local = &result; +#endif const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); From 87ddeb520b895f18f466f64b7d22f545f5308766 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 9 Dec 2017 21:11:14 +0900 Subject: [PATCH 201/534] delete symlink SheepShaver/src/slirp --- SheepShaver/src/slirp | 1 - 1 file changed, 1 deletion(-) delete mode 120000 SheepShaver/src/slirp diff --git a/SheepShaver/src/slirp b/SheepShaver/src/slirp deleted file mode 120000 index 4e6fe8f54..000000000 --- a/SheepShaver/src/slirp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/slirp \ No newline at end of file From f96c92ad5178b29d096d87bee0826196c0f7df3d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 9 Dec 2017 21:17:18 +0900 Subject: [PATCH 202/534] SheepShaver/src/slirp/* copied from jvernet/macemu --- SheepShaver/src/slirp/COPYRIGHT | 61 + SheepShaver/src/slirp/VERSION | 2 + SheepShaver/src/slirp/bootp.c | 242 ++++ SheepShaver/src/slirp/bootp.h | 121 ++ SheepShaver/src/slirp/cksum.c | 137 ++ SheepShaver/src/slirp/ctl.h | 7 + SheepShaver/src/slirp/debug.c | 376 ++++++ SheepShaver/src/slirp/debug.h | 50 + SheepShaver/src/slirp/icmp_var.h | 65 + SheepShaver/src/slirp/if.c | 322 +++++ SheepShaver/src/slirp/if.h | 50 + SheepShaver/src/slirp/ip.h | 317 +++++ SheepShaver/src/slirp/ip_icmp.c | 371 ++++++ SheepShaver/src/slirp/ip_icmp.h | 168 +++ SheepShaver/src/slirp/ip_input.c | 705 +++++++++++ SheepShaver/src/slirp/ip_output.c | 201 +++ SheepShaver/src/slirp/libslirp.h | 41 + SheepShaver/src/slirp/main.h | 54 + SheepShaver/src/slirp/mbuf.c | 247 ++++ SheepShaver/src/slirp/mbuf.h | 143 +++ SheepShaver/src/slirp/misc.c | 913 ++++++++++++++ SheepShaver/src/slirp/misc.h | 87 ++ SheepShaver/src/slirp/sbuf.c | 202 +++ SheepShaver/src/slirp/sbuf.h | 31 + SheepShaver/src/slirp/slirp.c | 670 ++++++++++ SheepShaver/src/slirp/slirp.h | 367 ++++++ SheepShaver/src/slirp/slirp_config.h | 135 ++ SheepShaver/src/slirp/socket.c | 722 +++++++++++ SheepShaver/src/slirp/socket.h | 104 ++ SheepShaver/src/slirp/tcp.h | 181 +++ SheepShaver/src/slirp/tcp_input.c | 1722 ++++++++++++++++++++++++++ SheepShaver/src/slirp/tcp_output.c | 601 +++++++++ SheepShaver/src/slirp/tcp_subr.c | 1324 ++++++++++++++++++++ SheepShaver/src/slirp/tcp_timer.c | 322 +++++ SheepShaver/src/slirp/tcp_timer.h | 138 +++ SheepShaver/src/slirp/tcp_var.h | 227 ++++ SheepShaver/src/slirp/tcpip.h | 77 ++ SheepShaver/src/slirp/tftp.c | 334 +++++ SheepShaver/src/slirp/tftp.h | 40 + SheepShaver/src/slirp/udp.c | 675 ++++++++++ SheepShaver/src/slirp/udp.h | 113 ++ 41 files changed, 12665 insertions(+) create mode 100644 SheepShaver/src/slirp/COPYRIGHT create mode 100644 SheepShaver/src/slirp/VERSION create mode 100755 SheepShaver/src/slirp/bootp.c create mode 100755 SheepShaver/src/slirp/bootp.h create mode 100755 SheepShaver/src/slirp/cksum.c create mode 100755 SheepShaver/src/slirp/ctl.h create mode 100755 SheepShaver/src/slirp/debug.c create mode 100755 SheepShaver/src/slirp/debug.h create mode 100755 SheepShaver/src/slirp/icmp_var.h create mode 100755 SheepShaver/src/slirp/if.c create mode 100755 SheepShaver/src/slirp/if.h create mode 100755 SheepShaver/src/slirp/ip.h create mode 100755 SheepShaver/src/slirp/ip_icmp.c create mode 100755 SheepShaver/src/slirp/ip_icmp.h create mode 100755 SheepShaver/src/slirp/ip_input.c create mode 100755 SheepShaver/src/slirp/ip_output.c create mode 100755 SheepShaver/src/slirp/libslirp.h create mode 100755 SheepShaver/src/slirp/main.h create mode 100755 SheepShaver/src/slirp/mbuf.c create mode 100755 SheepShaver/src/slirp/mbuf.h create mode 100755 SheepShaver/src/slirp/misc.c create mode 100755 SheepShaver/src/slirp/misc.h create mode 100755 SheepShaver/src/slirp/sbuf.c create mode 100755 SheepShaver/src/slirp/sbuf.h create mode 100755 SheepShaver/src/slirp/slirp.c create mode 100755 SheepShaver/src/slirp/slirp.h create mode 100755 SheepShaver/src/slirp/slirp_config.h create mode 100755 SheepShaver/src/slirp/socket.c create mode 100755 SheepShaver/src/slirp/socket.h create mode 100755 SheepShaver/src/slirp/tcp.h create mode 100755 SheepShaver/src/slirp/tcp_input.c create mode 100755 SheepShaver/src/slirp/tcp_output.c create mode 100755 SheepShaver/src/slirp/tcp_subr.c create mode 100755 SheepShaver/src/slirp/tcp_timer.c create mode 100755 SheepShaver/src/slirp/tcp_timer.h create mode 100755 SheepShaver/src/slirp/tcp_var.h create mode 100755 SheepShaver/src/slirp/tcpip.h create mode 100755 SheepShaver/src/slirp/tftp.c create mode 100755 SheepShaver/src/slirp/tftp.h create mode 100755 SheepShaver/src/slirp/udp.c create mode 100755 SheepShaver/src/slirp/udp.h diff --git a/SheepShaver/src/slirp/COPYRIGHT b/SheepShaver/src/slirp/COPYRIGHT new file mode 100644 index 000000000..b7d6568ea --- /dev/null +++ b/SheepShaver/src/slirp/COPYRIGHT @@ -0,0 +1,61 @@ +Slirp was written by Danny Gasparovski. +Copyright (c), 1995,1996 All Rights Reserved. + +Slirp is maintained by Kelly Price + +Slirp is free software; "free" as in you don't have to pay for it, and you +are free to do whatever you want with it. I do not accept any donations, +monetary or otherwise, for Slirp. Instead, I would ask you to pass this +potential donation to your favorite charity. In fact, I encourage +*everyone* who finds Slirp useful to make a small donation to their +favorite charity (for example, GreenPeace). This is not a requirement, but +a suggestion from someone who highly values the service they provide. + +The copyright terms and conditions: + +---BEGIN--- + + Copyright (c) 1995,1996 Danny Gasparovski. All rights reserved. + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions + are met: + 1. Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + 2. Redistributions in binary form must reproduce the above copyright + notice, this list of conditions and the following disclaimer in the + documentation and/or other materials provided with the distribution. + + THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, + INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY + AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL + DANNY GASPAROVSKI OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, + INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + +---END--- + +This basically means you can do anything you want with the software, except +1) call it your own, and 2) claim warranty on it. There is no warranty for +this software. None. Nada. If you lose a million dollars while using +Slirp, that's your loss not mine. So, ***USE AT YOUR OWN RISK!***. + +If these conditions cannot be met due to legal restrictions (E.g. where it +is against the law to give out Software without warranty), you must cease +using the software and delete all copies you have. + +Slirp uses code that is copyrighted by the following people/organizations: + +Juha Pirkola. +Gregory M. Christy. +The Regents of the University of California. +Carnegie Mellon University. +The Australian National University. +RSA Data Security, Inc. + +Please read the top of each source file for the details on the various +copyrights. diff --git a/SheepShaver/src/slirp/VERSION b/SheepShaver/src/slirp/VERSION new file mode 100644 index 000000000..12adff9bb --- /dev/null +++ b/SheepShaver/src/slirp/VERSION @@ -0,0 +1,2 @@ +qemu 0.9.0 (2007/02/05) +Plus 64 Bits Patchs \ No newline at end of file diff --git a/SheepShaver/src/slirp/bootp.c b/SheepShaver/src/slirp/bootp.c new file mode 100755 index 000000000..a51b80c95 --- /dev/null +++ b/SheepShaver/src/slirp/bootp.c @@ -0,0 +1,242 @@ +/* + * QEMU BOOTP/DHCP server + * + * Copyright (c) 2004 Fabrice Bellard + * + * 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 + * THE AUTHORS OR COPYRIGHT HOLDERS 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. + */ +#include + +/* XXX: only DHCP is supported */ + +#define NB_ADDR 16 + +#define START_ADDR 15 + +#define LEASE_TIME (24 * 3600) + +typedef struct { + uint8_t allocated; + uint8_t macaddr[6]; +} BOOTPClient; + +BOOTPClient bootp_clients[NB_ADDR]; + +static const uint8_t rfc1533_cookie[] = { RFC1533_COOKIE }; + +static BOOTPClient *get_new_addr(struct in_addr *paddr) +{ + BOOTPClient *bc; + int i; + + for(i = 0; i < NB_ADDR; i++) { + if (!bootp_clients[i].allocated) + goto found; + } + return NULL; + found: + bc = &bootp_clients[i]; + bc->allocated = 1; + paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); + return bc; +} + +static BOOTPClient *find_addr(struct in_addr *paddr, const uint8_t *macaddr) +{ + BOOTPClient *bc; + int i; + + for(i = 0; i < NB_ADDR; i++) { + if (!memcmp(macaddr, bootp_clients[i].macaddr, 6)) + goto found; + } + return NULL; + found: + bc = &bootp_clients[i]; + bc->allocated = 1; + paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); + return bc; +} + +static void dhcp_decode(const uint8_t *buf, int size, + int *pmsg_type) +{ + const uint8_t *p, *p_end; + int len, tag; + + *pmsg_type = 0; + + p = buf; + p_end = buf + size; + if (size < 5) + return; + if (memcmp(p, rfc1533_cookie, 4) != 0) + return; + p += 4; + while (p < p_end) { + tag = p[0]; + if (tag == RFC1533_PAD) { + p++; + } else if (tag == RFC1533_END) { + break; + } else { + p++; + if (p >= p_end) + break; + len = *p++; + + switch(tag) { + case RFC2132_MSG_TYPE: + if (len >= 1) + *pmsg_type = p[0]; + break; + default: + break; + } + p += len; + } + } +} + +static void bootp_reply(struct bootp_t *bp) +{ + BOOTPClient *bc; + struct mbuf *m; + struct bootp_t *rbp; + struct sockaddr_in saddr, daddr; + struct in_addr dns_addr; + int dhcp_msg_type, val; + uint8_t *q; + + /* extract exact DHCP msg type */ + dhcp_decode(bp->bp_vend, DHCP_OPT_LEN, &dhcp_msg_type); + + if (dhcp_msg_type == 0) + dhcp_msg_type = DHCPREQUEST; /* Force reply for old BOOTP clients */ + + if (dhcp_msg_type != DHCPDISCOVER && + dhcp_msg_type != DHCPREQUEST) + return; + /* XXX: this is a hack to get the client mac address */ + memcpy(client_ethaddr, bp->bp_hwaddr, 6); + + if ((m = m_get()) == NULL) + return; + m->m_data += if_maxlinkhdr; + rbp = (struct bootp_t *)m->m_data; + m->m_data += sizeof(struct udpiphdr); + memset(rbp, 0, sizeof(struct bootp_t)); + + if (dhcp_msg_type == DHCPDISCOVER) { + new_addr: + bc = get_new_addr(&daddr.sin_addr); + if (!bc) + return; + memcpy(bc->macaddr, client_ethaddr, 6); + } else { + bc = find_addr(&daddr.sin_addr, bp->bp_hwaddr); + if (!bc) { + /* if never assigned, behaves as if it was already + assigned (windows fix because it remembers its address) */ + goto new_addr; + } + } + + saddr.sin_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_ALIAS); + saddr.sin_port = htons(BOOTP_SERVER); + + daddr.sin_port = htons(BOOTP_CLIENT); + + rbp->bp_op = BOOTP_REPLY; + rbp->bp_xid = bp->bp_xid; + rbp->bp_htype = 1; + rbp->bp_hlen = 6; + memcpy(rbp->bp_hwaddr, bp->bp_hwaddr, 6); + + rbp->bp_yiaddr = daddr.sin_addr; /* Client IP address */ + rbp->bp_siaddr = saddr.sin_addr; /* Server IP address */ + + q = rbp->bp_vend; + memcpy(q, rfc1533_cookie, 4); + q += 4; + + if (dhcp_msg_type == DHCPDISCOVER) { + *q++ = RFC2132_MSG_TYPE; + *q++ = 1; + *q++ = DHCPOFFER; + } else if (dhcp_msg_type == DHCPREQUEST) { + *q++ = RFC2132_MSG_TYPE; + *q++ = 1; + *q++ = DHCPACK; + } + + if (dhcp_msg_type == DHCPDISCOVER || + dhcp_msg_type == DHCPREQUEST) { + *q++ = RFC2132_SRV_ID; + *q++ = 4; + memcpy(q, &saddr.sin_addr, 4); + q += 4; + + *q++ = RFC1533_NETMASK; + *q++ = 4; + *q++ = 0xff; + *q++ = 0xff; + *q++ = 0xff; + *q++ = 0x00; + + *q++ = RFC1533_GATEWAY; + *q++ = 4; + memcpy(q, &saddr.sin_addr, 4); + q += 4; + + *q++ = RFC1533_DNS; + *q++ = 4; + dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); + memcpy(q, &dns_addr, 4); + q += 4; + + *q++ = RFC2132_LEASE_TIME; + *q++ = 4; + val = htonl(LEASE_TIME); + memcpy(q, &val, 4); + q += 4; + + if (*slirp_hostname) { + val = strlen(slirp_hostname); + *q++ = RFC1533_HOSTNAME; + *q++ = val; + memcpy(q, slirp_hostname, val); + q += val; + } + } + *q++ = RFC1533_END; + + m->m_len = sizeof(struct bootp_t) - + sizeof(struct ip) - sizeof(struct udphdr); + udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); +} + +void bootp_input(struct mbuf *m) +{ + struct bootp_t *bp = mtod(m, struct bootp_t *); + + if (bp->bp_op == BOOTP_REQUEST) { + bootp_reply(bp); + } +} diff --git a/SheepShaver/src/slirp/bootp.h b/SheepShaver/src/slirp/bootp.h new file mode 100755 index 000000000..5c2e62ab0 --- /dev/null +++ b/SheepShaver/src/slirp/bootp.h @@ -0,0 +1,121 @@ +/* bootp/dhcp defines */ + +#define BOOTP_SERVER 67 +#define BOOTP_CLIENT 68 + +#define BOOTP_REQUEST 1 +#define BOOTP_REPLY 2 + +#define RFC1533_COOKIE 99, 130, 83, 99 +#define RFC1533_PAD 0 +#define RFC1533_NETMASK 1 +#define RFC1533_TIMEOFFSET 2 +#define RFC1533_GATEWAY 3 +#define RFC1533_TIMESERVER 4 +#define RFC1533_IEN116NS 5 +#define RFC1533_DNS 6 +#define RFC1533_LOGSERVER 7 +#define RFC1533_COOKIESERVER 8 +#define RFC1533_LPRSERVER 9 +#define RFC1533_IMPRESSSERVER 10 +#define RFC1533_RESOURCESERVER 11 +#define RFC1533_HOSTNAME 12 +#define RFC1533_BOOTFILESIZE 13 +#define RFC1533_MERITDUMPFILE 14 +#define RFC1533_DOMAINNAME 15 +#define RFC1533_SWAPSERVER 16 +#define RFC1533_ROOTPATH 17 +#define RFC1533_EXTENSIONPATH 18 +#define RFC1533_IPFORWARDING 19 +#define RFC1533_IPSOURCEROUTING 20 +#define RFC1533_IPPOLICYFILTER 21 +#define RFC1533_IPMAXREASSEMBLY 22 +#define RFC1533_IPTTL 23 +#define RFC1533_IPMTU 24 +#define RFC1533_IPMTUPLATEAU 25 +#define RFC1533_INTMTU 26 +#define RFC1533_INTLOCALSUBNETS 27 +#define RFC1533_INTBROADCAST 28 +#define RFC1533_INTICMPDISCOVER 29 +#define RFC1533_INTICMPRESPOND 30 +#define RFC1533_INTROUTEDISCOVER 31 +#define RFC1533_INTROUTESOLICIT 32 +#define RFC1533_INTSTATICROUTES 33 +#define RFC1533_LLTRAILERENCAP 34 +#define RFC1533_LLARPCACHETMO 35 +#define RFC1533_LLETHERNETENCAP 36 +#define RFC1533_TCPTTL 37 +#define RFC1533_TCPKEEPALIVETMO 38 +#define RFC1533_TCPKEEPALIVEGB 39 +#define RFC1533_NISDOMAIN 40 +#define RFC1533_NISSERVER 41 +#define RFC1533_NTPSERVER 42 +#define RFC1533_VENDOR 43 +#define RFC1533_NBNS 44 +#define RFC1533_NBDD 45 +#define RFC1533_NBNT 46 +#define RFC1533_NBSCOPE 47 +#define RFC1533_XFS 48 +#define RFC1533_XDM 49 + +#define RFC2132_REQ_ADDR 50 +#define RFC2132_LEASE_TIME 51 +#define RFC2132_MSG_TYPE 53 +#define RFC2132_SRV_ID 54 +#define RFC2132_PARAM_LIST 55 +#define RFC2132_MAX_SIZE 57 +#define RFC2132_RENEWAL_TIME 58 +#define RFC2132_REBIND_TIME 59 + +#define DHCPDISCOVER 1 +#define DHCPOFFER 2 +#define DHCPREQUEST 3 +#define DHCPACK 5 + +#define RFC1533_VENDOR_MAJOR 0 +#define RFC1533_VENDOR_MINOR 0 + +#define RFC1533_VENDOR_MAGIC 128 +#define RFC1533_VENDOR_ADDPARM 129 +#define RFC1533_VENDOR_ETHDEV 130 +#define RFC1533_VENDOR_HOWTO 132 +#define RFC1533_VENDOR_MNUOPTS 160 +#define RFC1533_VENDOR_SELECTION 176 +#define RFC1533_VENDOR_MOTD 184 +#define RFC1533_VENDOR_NUMOFMOTD 8 +#define RFC1533_VENDOR_IMG 192 +#define RFC1533_VENDOR_NUMOFIMG 16 + +#define RFC1533_END 255 +#define BOOTP_VENDOR_LEN 64 +#define DHCP_OPT_LEN 312 + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct bootp_t { + struct ip ip; + struct udphdr udp; + uint8_t bp_op; + uint8_t bp_htype; + uint8_t bp_hlen; + uint8_t bp_hops; + uint32_t bp_xid; + uint16_t bp_secs; + uint16_t unused; + struct in_addr bp_ciaddr; + struct in_addr bp_yiaddr; + struct in_addr bp_siaddr; + struct in_addr bp_giaddr; + uint8_t bp_hwaddr[16]; + uint8_t bp_sname[64]; + uint8_t bp_file[128]; + uint8_t bp_vend[DHCP_OPT_LEN]; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +void bootp_input(struct mbuf *m); diff --git a/SheepShaver/src/slirp/cksum.c b/SheepShaver/src/slirp/cksum.c new file mode 100755 index 000000000..66d3f230a --- /dev/null +++ b/SheepShaver/src/slirp/cksum.c @@ -0,0 +1,137 @@ +/* + * Copyright (c) 1988, 1992, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)in_cksum.c 8.1 (Berkeley) 6/10/93 + * in_cksum.c,v 1.2 1994/08/02 07:48:16 davidg Exp + */ + +#include + +/* + * Checksum routine for Internet Protocol family headers (Portable Version). + * + * This routine is very heavily used in the network + * code and should be modified for each CPU to be as fast as possible. + * + * XXX Since we will never span more than 1 mbuf, we can optimise this + */ + +#define ADDCARRY(x) (x > 65535 ? x -= 65535 : x) +#define REDUCE {l_util.l = sum; sum = l_util.s[0] + l_util.s[1]; ADDCARRY(sum);} + +int cksum(struct mbuf *m, int len) +{ + register u_int16_t *w; + register int sum = 0; + register int mlen = 0; + int byte_swapped = 0; + + union { + u_int8_t c[2]; + u_int16_t s; + } s_util; + union { + u_int16_t s[2]; + u_int32_t l; + } l_util; + + if (m->m_len == 0) + goto cont; + w = mtod(m, u_int16_t *); + + mlen = m->m_len; + + if (len < mlen) + mlen = len; + len -= mlen; + /* + * Force to even boundary. + */ + if ((1 & (long) w) && (mlen > 0)) { + REDUCE; + sum <<= 8; + s_util.c[0] = *(u_int8_t *)w; + w = (u_int16_t *)((int8_t *)w + 1); + mlen--; + byte_swapped = 1; + } + /* + * Unroll the loop to make overhead from + * branches &c small. + */ + while ((mlen -= 32) >= 0) { + sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; + sum += w[4]; sum += w[5]; sum += w[6]; sum += w[7]; + sum += w[8]; sum += w[9]; sum += w[10]; sum += w[11]; + sum += w[12]; sum += w[13]; sum += w[14]; sum += w[15]; + w += 16; + } + mlen += 32; + while ((mlen -= 8) >= 0) { + sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; + w += 4; + } + mlen += 8; + if (mlen == 0 && byte_swapped == 0) + goto cont; + REDUCE; + while ((mlen -= 2) >= 0) { + sum += *w++; + } + + if (byte_swapped) { + REDUCE; + sum <<= 8; + byte_swapped = 0; + if (mlen == -1) { + s_util.c[1] = *(u_int8_t *)w; + sum += s_util.s; + mlen = 0; + } else + + mlen = -1; + } else if (mlen == -1) + s_util.c[0] = *(u_int8_t *)w; + +cont: +#ifdef DEBUG + if (len) { + DEBUG_ERROR((dfd, "cksum: out of data\n")); + DEBUG_ERROR((dfd, " len = %d\n", len)); + } +#endif + if (mlen == -1) { + /* The last mbuf has odd # of bytes. Follow the + standard (the odd byte may be shifted left by 8 bits + or not as determined by endian-ness of the machine) */ + s_util.c[1] = 0; + sum += s_util.s; + } + REDUCE; + return (~sum & 0xffff); +} diff --git a/SheepShaver/src/slirp/ctl.h b/SheepShaver/src/slirp/ctl.h new file mode 100755 index 000000000..4a8576dc1 --- /dev/null +++ b/SheepShaver/src/slirp/ctl.h @@ -0,0 +1,7 @@ +#define CTL_CMD 0 +#define CTL_EXEC 1 +#define CTL_ALIAS 2 +#define CTL_DNS 3 + +#define CTL_SPECIAL "10.0.2.0" +#define CTL_LOCAL "10.0.2.15" diff --git a/SheepShaver/src/slirp/debug.c b/SheepShaver/src/slirp/debug.c new file mode 100755 index 000000000..d3d8c5796 --- /dev/null +++ b/SheepShaver/src/slirp/debug.c @@ -0,0 +1,376 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * Portions copyright (c) 2000 Kelly Price. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include + +FILE *dfd = NULL; +#ifdef DEBUG +int dostats = 1; +#else +int dostats = 0; +#endif +int slirp_debug = 0; + +extern char *strerror _P((int)); + +/* Carry over one item from main.c so that the tty's restored. + * Only done when the tty being used is /dev/tty --RedWolf */ +extern struct termios slirp_tty_settings; +extern int slirp_tty_restore; + + +void +debug_init(file, dbg) + char *file; + int dbg; +{ + /* Close the old debugging file */ + if (dfd) + fclose(dfd); + + dfd = fopen(file,"w"); + if (dfd != NULL) { +#if 0 + fprintf(dfd,"Slirp %s - Debugging Started.\n", SLIRP_VERSION); +#endif + fprintf(dfd,"Debugging Started level %i.\r\n",dbg); + fflush(dfd); + slirp_debug = dbg; + } else { + lprint("Error: Debugging file \"%s\" could not be opened: %s\r\n", + file, strerror(errno)); + } +} + +/* + * Dump a packet in the same format as tcpdump -x + */ +#ifdef DEBUG +void +dump_packet(dat, n) + void *dat; + int n; +{ + u_char *pptr = (u_char *)dat; + int j,k; + + n /= 16; + n++; + DEBUG_MISC((dfd, "PACKET DUMPED: \n")); + for(j = 0; j < n; j++) { + for(k = 0; k < 6; k++) + DEBUG_MISC((dfd, "%02x ", *pptr++)); + DEBUG_MISC((dfd, "\n")); + fflush(dfd); + } +} +#endif + +#if 0 +/* + * Statistic routines + * + * These will print statistics to the screen, the debug file (dfd), or + * a buffer, depending on "type", so that the stats can be sent over + * the link as well. + */ + +void +ttystats(ttyp) + struct ttys *ttyp; +{ + struct slirp_ifstats *is = &ttyp->ifstats; + char buff[512]; + + lprint(" \r\n"); + + if (if_comp & IF_COMPRESS) + strcpy(buff, "on"); + else if (if_comp & IF_NOCOMPRESS) + strcpy(buff, "off"); + else + strcpy(buff, "off (for now)"); + lprint("Unit %d:\r\n", ttyp->unit); + lprint(" using %s encapsulation (VJ compression is %s)\r\n", ( +#ifdef USE_PPP + ttyp->proto==PROTO_PPP?"PPP": +#endif + "SLIP"), buff); + lprint(" %d baudrate\r\n", ttyp->baud); + lprint(" interface is %s\r\n", ttyp->up?"up":"down"); + lprint(" using fd %d, guardian pid is %d\r\n", ttyp->fd, ttyp->pid); +#ifndef FULL_BOLT + lprint(" towrite is %d bytes\r\n", ttyp->towrite); +#endif + if (ttyp->zeros) + lprint(" %d zeros have been typed\r\n", ttyp->zeros); + else if (ttyp->ones) + lprint(" %d ones have been typed\r\n", ttyp->ones); + lprint("Interface stats:\r\n"); + lprint(" %6d output packets sent (%d bytes)\r\n", is->out_pkts, is->out_bytes); + lprint(" %6d output packets dropped (%d bytes)\r\n", is->out_errpkts, is->out_errbytes); + lprint(" %6d input packets received (%d bytes)\r\n", is->in_pkts, is->in_bytes); + lprint(" %6d input packets dropped (%d bytes)\r\n", is->in_errpkts, is->in_errbytes); + lprint(" %6d bad input packets\r\n", is->in_mbad); +} + +void +allttystats() +{ + struct ttys *ttyp; + + for (ttyp = ttys; ttyp; ttyp = ttyp->next) + ttystats(ttyp); +} +#endif + +void +ipstats() +{ + lprint(" \r\n"); + + lprint("IP stats:\r\n"); + lprint(" %6d total packets received (%d were unaligned)\r\n", + ipstat.ips_total, ipstat.ips_unaligned); + lprint(" %6d with incorrect version\r\n", ipstat.ips_badvers); + lprint(" %6d with bad header checksum\r\n", ipstat.ips_badsum); + lprint(" %6d with length too short (len < sizeof(iphdr))\r\n", ipstat.ips_tooshort); + lprint(" %6d with length too small (len < ip->len)\r\n", ipstat.ips_toosmall); + lprint(" %6d with bad header length\r\n", ipstat.ips_badhlen); + lprint(" %6d with bad packet length\r\n", ipstat.ips_badlen); + lprint(" %6d fragments received\r\n", ipstat.ips_fragments); + lprint(" %6d fragments dropped\r\n", ipstat.ips_fragdropped); + lprint(" %6d fragments timed out\r\n", ipstat.ips_fragtimeout); + lprint(" %6d packets reassembled ok\r\n", ipstat.ips_reassembled); + lprint(" %6d outgoing packets fragmented\r\n", ipstat.ips_fragmented); + lprint(" %6d total outgoing fragments\r\n", ipstat.ips_ofragments); + lprint(" %6d with bad protocol field\r\n", ipstat.ips_noproto); + lprint(" %6d total packets delivered\r\n", ipstat.ips_delivered); +} + +#if 0 +void +vjstats() +{ + lprint(" \r\n"); + + lprint("VJ compression stats:\r\n"); + + lprint(" %6d outbound packets (%d compressed)\r\n", + comp_s.sls_packets, comp_s.sls_compressed); + lprint(" %6d searches for connection stats (%d misses)\r\n", + comp_s.sls_searches, comp_s.sls_misses); + lprint(" %6d inbound uncompressed packets\r\n", comp_s.sls_uncompressedin); + lprint(" %6d inbound compressed packets\r\n", comp_s.sls_compressedin); + lprint(" %6d inbound unknown type packets\r\n", comp_s.sls_errorin); + lprint(" %6d inbound packets tossed due to error\r\n", comp_s.sls_tossed); +} +#endif + +void +tcpstats() +{ + lprint(" \r\n"); + + lprint("TCP stats:\r\n"); + + lprint(" %6d packets sent\r\n", tcpstat.tcps_sndtotal); + lprint(" %6d data packets (%d bytes)\r\n", + tcpstat.tcps_sndpack, tcpstat.tcps_sndbyte); + lprint(" %6d data packets retransmitted (%d bytes)\r\n", + tcpstat.tcps_sndrexmitpack, tcpstat.tcps_sndrexmitbyte); + lprint(" %6d ack-only packets (%d delayed)\r\n", + tcpstat.tcps_sndacks, tcpstat.tcps_delack); + lprint(" %6d URG only packets\r\n", tcpstat.tcps_sndurg); + lprint(" %6d window probe packets\r\n", tcpstat.tcps_sndprobe); + lprint(" %6d window update packets\r\n", tcpstat.tcps_sndwinup); + lprint(" %6d control (SYN/FIN/RST) packets\r\n", tcpstat.tcps_sndctrl); + lprint(" %6d times tcp_output did nothing\r\n", tcpstat.tcps_didnuttin); + + lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); + lprint(" %6d acks (for %d bytes)\r\n", + tcpstat.tcps_rcvackpack, tcpstat.tcps_rcvackbyte); + lprint(" %6d duplicate acks\r\n", tcpstat.tcps_rcvdupack); + lprint(" %6d acks for unsent data\r\n", tcpstat.tcps_rcvacktoomuch); + lprint(" %6d packets received in sequence (%d bytes)\r\n", + tcpstat.tcps_rcvpack, tcpstat.tcps_rcvbyte); + lprint(" %6d completely duplicate packets (%d bytes)\r\n", + tcpstat.tcps_rcvduppack, tcpstat.tcps_rcvdupbyte); + + lprint(" %6d packets with some duplicate data (%d bytes duped)\r\n", + tcpstat.tcps_rcvpartduppack, tcpstat.tcps_rcvpartdupbyte); + lprint(" %6d out-of-order packets (%d bytes)\r\n", + tcpstat.tcps_rcvoopack, tcpstat.tcps_rcvoobyte); + lprint(" %6d packets of data after window (%d bytes)\r\n", + tcpstat.tcps_rcvpackafterwin, tcpstat.tcps_rcvbyteafterwin); + lprint(" %6d window probes\r\n", tcpstat.tcps_rcvwinprobe); + lprint(" %6d window update packets\r\n", tcpstat.tcps_rcvwinupd); + lprint(" %6d packets received after close\r\n", tcpstat.tcps_rcvafterclose); + lprint(" %6d discarded for bad checksums\r\n", tcpstat.tcps_rcvbadsum); + lprint(" %6d discarded for bad header offset fields\r\n", + tcpstat.tcps_rcvbadoff); + + lprint(" %6d connection requests\r\n", tcpstat.tcps_connattempt); + lprint(" %6d connection accepts\r\n", tcpstat.tcps_accepts); + lprint(" %6d connections established (including accepts)\r\n", tcpstat.tcps_connects); + lprint(" %6d connections closed (including %d drop)\r\n", + tcpstat.tcps_closed, tcpstat.tcps_drops); + lprint(" %6d embryonic connections dropped\r\n", tcpstat.tcps_conndrops); + lprint(" %6d segments we tried to get rtt (%d succeeded)\r\n", + tcpstat.tcps_segstimed, tcpstat.tcps_rttupdated); + lprint(" %6d retransmit timeouts\r\n", tcpstat.tcps_rexmttimeo); + lprint(" %6d connections dropped by rxmt timeout\r\n", + tcpstat.tcps_timeoutdrop); + lprint(" %6d persist timeouts\r\n", tcpstat.tcps_persisttimeo); + lprint(" %6d keepalive timeouts\r\n", tcpstat.tcps_keeptimeo); + lprint(" %6d keepalive probes sent\r\n", tcpstat.tcps_keepprobe); + lprint(" %6d connections dropped by keepalive\r\n", tcpstat.tcps_keepdrops); + lprint(" %6d correct ACK header predictions\r\n", tcpstat.tcps_predack); + lprint(" %6d correct data packet header predictions\n", tcpstat.tcps_preddat); + lprint(" %6d TCP cache misses\r\n", tcpstat.tcps_socachemiss); + + +/* lprint(" Packets received too short: %d\r\n", tcpstat.tcps_rcvshort); */ +/* lprint(" Segments dropped due to PAWS: %d\r\n", tcpstat.tcps_pawsdrop); */ + +} + +void +udpstats() +{ + lprint(" \r\n"); + + lprint("UDP stats:\r\n"); + lprint(" %6d datagrams received\r\n", udpstat.udps_ipackets); + lprint(" %6d with packets shorter than header\r\n", udpstat.udps_hdrops); + lprint(" %6d with bad checksums\r\n", udpstat.udps_badsum); + lprint(" %6d with data length larger than packet\r\n", udpstat.udps_badlen); + lprint(" %6d UDP socket cache misses\r\n", udpstat.udpps_pcbcachemiss); + lprint(" %6d datagrams sent\r\n", udpstat.udps_opackets); +} + +void +icmpstats() +{ + lprint(" \r\n"); + lprint("ICMP stats:\r\n"); + lprint(" %6d ICMP packets received\r\n", icmpstat.icps_received); + lprint(" %6d were too short\r\n", icmpstat.icps_tooshort); + lprint(" %6d with bad checksums\r\n", icmpstat.icps_checksum); + lprint(" %6d with type not supported\r\n", icmpstat.icps_notsupp); + lprint(" %6d with bad type feilds\r\n", icmpstat.icps_badtype); + lprint(" %6d ICMP packets sent in reply\r\n", icmpstat.icps_reflect); +} + +void +mbufstats() +{ + struct mbuf *m; + int i; + + lprint(" \r\n"); + + lprint("Mbuf stats:\r\n"); + + lprint(" %6d mbufs allocated (%d max)\r\n", mbuf_alloced, mbuf_max); + + i = 0; + for (m = m_freelist.m_next; m != &m_freelist; m = m->m_next) + i++; + lprint(" %6d mbufs on free list\r\n", i); + + i = 0; + for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) + i++; + lprint(" %6d mbufs on used list\r\n", i); + lprint(" %6d mbufs queued as packets\r\n\r\n", if_queued); +} + +void +sockstats() +{ + char buff[256]; + int n; + struct socket *so; + + lprint(" \r\n"); + + lprint( + "Proto[state] Sock Local Address, Port Remote Address, Port RecvQ SendQ\r\n"); + + for (so = tcb.so_next; so != &tcb; so = so->so_next) { + + n = sprintf(buff, "tcp[%s]", so->so_tcpcb?tcpstates[so->so_tcpcb->t_state]:"NONE"); + while (n < 17) + buff[n++] = ' '; + buff[17] = 0; + lprint("%s %3d %15s %5d ", + buff, so->s, + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + lprint("%15s %5d %5d %5d\r\n", + inet_ntoa(so->so_faddr), ntohs(so->so_fport), + so->so_rcv.sb_cc, so->so_snd.sb_cc); + } + + for (so = udb.so_next; so != &udb; so = so->so_next) { + + n = sprintf(buff, "udp[%d sec]", (so->so_expire - curtime) / 1000); + while (n < 17) + buff[n++] = ' '; + buff[17] = 0; + lprint("%s %3d %15s %5d ", + buff, so->s, + inet_ntoa(so->so_laddr), ntohs(so->so_lport)); + lprint("%15s %5d %5d %5d\r\n", + inet_ntoa(so->so_faddr), ntohs(so->so_fport), + so->so_rcv.sb_cc, so->so_snd.sb_cc); + } +} + +#if 0 +void +slirp_exit(exit_status) + int exit_status; +{ + struct ttys *ttyp; + + DEBUG_CALL("slirp_exit"); + DEBUG_ARG("exit_status = %d", exit_status); + + if (dostats) { + lprint_print = (int (*) _P((void *, const char *, va_list)))vfprintf; + if (!dfd) + debug_init("slirp_stats", 0xf); + lprint_arg = (char **)&dfd; + + ipstats(); + tcpstats(); + udpstats(); + icmpstats(); + mbufstats(); + sockstats(); + allttystats(); + vjstats(); + } + + for (ttyp = ttys; ttyp; ttyp = ttyp->next) + tty_detached(ttyp, 1); + + if (slirp_forked) { + /* Menendez time */ + if (kill(getppid(), SIGQUIT) < 0) + lprint("Couldn't kill parent process %ld!\n", + (long) getppid()); + } + + /* Restore the terminal if we gotta */ + if(slirp_tty_restore) + tcsetattr(0,TCSANOW, &slirp_tty_settings); /* NOW DAMMIT! */ + exit(exit_status); +} +#endif diff --git a/SheepShaver/src/slirp/debug.h b/SheepShaver/src/slirp/debug.h new file mode 100755 index 000000000..6e8444dab --- /dev/null +++ b/SheepShaver/src/slirp/debug.h @@ -0,0 +1,50 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#define PRN_STDERR 1 +#define PRN_SPRINTF 2 + +extern FILE *dfd; +extern FILE *lfd; +extern int dostats; +extern int slirp_debug; + +#define DBG_CALL 0x1 +#define DBG_MISC 0x2 +#define DBG_ERROR 0x4 +#define DEBUG_DEFAULT DBG_CALL|DBG_MISC|DBG_ERROR + +#ifdef DEBUG +#define DEBUG_CALL(x) if (slirp_debug & DBG_CALL) { fprintf(dfd, "%s...\n", x); fflush(dfd); } +#define DEBUG_ARG(x, y) if (slirp_debug & DBG_CALL) { fputc(' ', dfd); fprintf(dfd, x, y); fputc('\n', dfd); fflush(dfd); } +#define DEBUG_ARGS(x) if (slirp_debug & DBG_CALL) { fprintf x ; fflush(dfd); } +#define DEBUG_MISC(x) if (slirp_debug & DBG_MISC) { fprintf x ; fflush(dfd); } +#define DEBUG_ERROR(x) if (slirp_debug & DBG_ERROR) {fprintf x ; fflush(dfd); } + + +#else + +#define DEBUG_CALL(x) +#define DEBUG_ARG(x, y) +#define DEBUG_ARGS(x) +#define DEBUG_MISC(x) +#define DEBUG_ERROR(x) + +#endif + +void debug_init _P((char *, int)); +//void ttystats _P((struct ttys *)); +void allttystats _P((void)); +void ipstats _P((void)); +void vjstats _P((void)); +void tcpstats _P((void)); +void udpstats _P((void)); +void icmpstats _P((void)); +void mbufstats _P((void)); +void sockstats _P((void)); +void slirp_exit _P((int)); + diff --git a/SheepShaver/src/slirp/icmp_var.h b/SheepShaver/src/slirp/icmp_var.h new file mode 100755 index 000000000..9af222fb7 --- /dev/null +++ b/SheepShaver/src/slirp/icmp_var.h @@ -0,0 +1,65 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)icmp_var.h 8.1 (Berkeley) 6/10/93 + * icmp_var.h,v 1.4 1995/02/16 00:27:40 wollman Exp + */ + +#ifndef _NETINET_ICMP_VAR_H_ +#define _NETINET_ICMP_VAR_H_ + +/* + * Variables related to this implementation + * of the internet control message protocol. + */ +struct icmpstat { +/* statistics related to input messages processed */ + u_long icps_received; /* #ICMP packets received */ + u_long icps_tooshort; /* packet < ICMP_MINLEN */ + u_long icps_checksum; /* bad checksum */ + u_long icps_notsupp; /* #ICMP packets not supported */ + u_long icps_badtype; /* #with bad type feild */ + u_long icps_reflect; /* number of responses */ +}; + +/* + * Names for ICMP sysctl objects + */ +#define ICMPCTL_MASKREPL 1 /* allow replies to netmask requests */ +#define ICMPCTL_STATS 2 /* statistics (read-only) */ +#define ICMPCTL_MAXID 3 + +#define ICMPCTL_NAMES { \ + { 0, 0 }, \ + { "maskrepl", CTLTYPE_INT }, \ + { "stats", CTLTYPE_STRUCT }, \ +} + +extern struct icmpstat icmpstat; + +#endif diff --git a/SheepShaver/src/slirp/if.c b/SheepShaver/src/slirp/if.c new file mode 100755 index 000000000..eab8a46ea --- /dev/null +++ b/SheepShaver/src/slirp/if.c @@ -0,0 +1,322 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include + +int if_mtu, if_mru; +int if_comp; +int if_maxlinkhdr; +int if_queued = 0; /* Number of packets queued so far */ +int if_thresh = 10; /* Number of packets queued before we start sending + * (to prevent allocing too many mbufs) */ + +struct mbuf if_fastq; /* fast queue (for interactive data) */ +struct mbuf if_batchq; /* queue for non-interactive data */ +struct mbuf *next_m; /* Pointer to next mbuf to output */ + +#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) + +void +ifs_insque(ifm, ifmhead) + struct mbuf *ifm, *ifmhead; +{ + ifm->ifs_next = ifmhead->ifs_next; + ifmhead->ifs_next = ifm; + ifm->ifs_prev = ifmhead; + ifm->ifs_next->ifs_prev = ifm; +} + +void +ifs_remque(ifm) + struct mbuf *ifm; +{ + ifm->ifs_prev->ifs_next = ifm->ifs_next; + ifm->ifs_next->ifs_prev = ifm->ifs_prev; +} + +void +if_init() +{ +#if 0 + /* + * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, + * and 8 bytes for PPP, but need to have it on an 8byte boundary + */ +#ifdef USE_PPP + if_maxlinkhdr = 48; +#else + if_maxlinkhdr = 40; +#endif +#else + /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ + if_maxlinkhdr = 2 + 14 + 40; +#endif + if_mtu = 1500; + if_mru = 1500; + if_comp = IF_AUTOCOMP; + if_fastq.ifq_next = if_fastq.ifq_prev = &if_fastq; + if_batchq.ifq_next = if_batchq.ifq_prev = &if_batchq; + // sl_compress_init(&comp_s); + next_m = &if_batchq; +} + +#if 0 +/* + * This shouldn't be needed since the modem is blocking and + * we don't expect any signals, but what the hell.. + */ +inline int +writen(fd, bptr, n) + int fd; + char *bptr; + int n; +{ + int ret; + int total; + + /* This should succeed most of the time */ + ret = send(fd, bptr, n,0); + if (ret == n || ret <= 0) + return ret; + + /* Didn't write everything, go into the loop */ + total = ret; + while (n > total) { + ret = send(fd, bptr+total, n-total,0); + if (ret <= 0) + return ret; + total += ret; + } + return total; +} + +/* + * if_input - read() the tty, do "top level" processing (ie: check for any escapes), + * and pass onto (*ttyp->if_input) + * + * XXXXX Any zeros arriving by themselves are NOT placed into the arriving packet. + */ +#define INBUFF_SIZE 2048 /* XXX */ +void +if_input(ttyp) + struct ttys *ttyp; +{ + u_char if_inbuff[INBUFF_SIZE]; + int if_n; + + DEBUG_CALL("if_input"); + DEBUG_ARG("ttyp = %lx", (long)ttyp); + + if_n = recv(ttyp->fd, (char *)if_inbuff, INBUFF_SIZE,0); + + DEBUG_MISC((dfd, " read %d bytes\n", if_n)); + + if (if_n <= 0) { + if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { + if (ttyp->up) + link_up--; + tty_detached(ttyp, 0); + } + return; + } + if (if_n == 1) { + if (*if_inbuff == '0') { + ttyp->ones = 0; + if (++ttyp->zeros >= 5) + slirp_exit(0); + return; + } + if (*if_inbuff == '1') { + ttyp->zeros = 0; + if (++ttyp->ones >= 5) + tty_detached(ttyp, 0); + return; + } + } + ttyp->ones = ttyp->zeros = 0; + + (*ttyp->if_input)(ttyp, if_inbuff, if_n); +} +#endif + +/* + * if_output: Queue packet into an output queue. + * There are 2 output queue's, if_fastq and if_batchq. + * Each output queue is a doubly linked list of double linked lists + * of mbufs, each list belonging to one "session" (socket). This + * way, we can output packets fairly by sending one packet from each + * session, instead of all the packets from one session, then all packets + * from the next session, etc. Packets on the if_fastq get absolute + * priority, but if one session hogs the link, it gets "downgraded" + * to the batchq until it runs out of packets, then it'll return + * to the fastq (eg. if the user does an ls -alR in a telnet session, + * it'll temporarily get downgraded to the batchq) + */ +void +if_output(so, ifm) + struct socket *so; + struct mbuf *ifm; +{ + struct mbuf *ifq; + int on_fastq = 1; + + DEBUG_CALL("if_output"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("ifm = %lx", (long)ifm); + + /* + * First remove the mbuf from m_usedlist, + * since we're gonna use m_next and m_prev ourselves + * XXX Shouldn't need this, gotta change dtom() etc. + */ + if (ifm->m_flags & M_USEDLIST) { + remque(ifm); + ifm->m_flags &= ~M_USEDLIST; + } + + /* + * See if there's already a batchq list for this session. + * This can include an interactive session, which should go on fastq, + * but gets too greedy... hence it'll be downgraded from fastq to batchq. + * We mustn't put this packet back on the fastq (or we'll send it out of order) + * XXX add cache here? + */ + for (ifq = if_batchq.ifq_prev; ifq != &if_batchq; ifq = ifq->ifq_prev) { + if (so == ifq->ifq_so) { + /* A match! */ + ifm->ifq_so = so; + ifs_insque(ifm, ifq->ifs_prev); + goto diddit; + } + } + + /* No match, check which queue to put it on */ + if (so && (so->so_iptos & IPTOS_LOWDELAY)) { + ifq = if_fastq.ifq_prev; + on_fastq = 1; + /* + * Check if this packet is a part of the last + * packet's session + */ + if (ifq->ifq_so == so) { + ifm->ifq_so = so; + ifs_insque(ifm, ifq->ifs_prev); + goto diddit; + } + } else + ifq = if_batchq.ifq_prev; + + /* Create a new doubly linked list for this session */ + ifm->ifq_so = so; + ifs_init(ifm); + insque(ifm, ifq); + +diddit: + ++if_queued; + + if (so) { + /* Update *_queued */ + so->so_queued++; + so->so_nqueued++; + /* + * Check if the interactive session should be downgraded to + * the batchq. A session is downgraded if it has queued 6 + * packets without pausing, and at least 3 of those packets + * have been sent over the link + * (XXX These are arbitrary numbers, probably not optimal..) + */ + if (on_fastq && ((so->so_nqueued >= 6) && + (so->so_nqueued - so->so_queued) >= 3)) { + + /* Remove from current queue... */ + remque(ifm->ifs_next); + + /* ...And insert in the new. That'll teach ya! */ + insque(ifm->ifs_next, &if_batchq); + } + } + +#ifndef FULL_BOLT + /* + * This prevents us from malloc()ing too many mbufs + */ + if (link_up) { + /* if_start will check towrite */ + if_start(); + } +#endif +} + +/* + * Send a packet + * We choose a packet based on it's position in the output queues; + * If there are packets on the fastq, they are sent FIFO, before + * everything else. Otherwise we choose the first packet from the + * batchq and send it. the next packet chosen will be from the session + * after this one, then the session after that one, and so on.. So, + * for example, if there are 3 ftp session's fighting for bandwidth, + * one packet will be sent from the first session, then one packet + * from the second session, then one packet from the third, then back + * to the first, etc. etc. + */ +void +if_start(void) +{ + struct mbuf *ifm, *ifqt; + + DEBUG_CALL("if_start"); + + if (if_queued == 0) + return; /* Nothing to do */ + + again: + /* check if we can really output */ + if (!slirp_can_output()) + return; + + /* + * See which queue to get next packet from + * If there's something in the fastq, select it immediately + */ + if (if_fastq.ifq_next != &if_fastq) { + ifm = if_fastq.ifq_next; + } else { + /* Nothing on fastq, see if next_m is valid */ + if (next_m != &if_batchq) + ifm = next_m; + else + ifm = if_batchq.ifq_next; + + /* Set which packet to send on next iteration */ + next_m = ifm->ifq_next; + } + /* Remove it from the queue */ + ifqt = ifm->ifq_prev; + remque(ifm); + --if_queued; + + /* If there are more packets for this session, re-queue them */ + if (ifm->ifs_next != /* ifm->ifs_prev != */ ifm) { + insque(ifm->ifs_next, ifqt); + ifs_remque(ifm); + } + + /* Update so_queued */ + if (ifm->ifq_so) { + if (--ifm->ifq_so->so_queued == 0) + /* If there's no more queued, reset nqueued */ + ifm->ifq_so->so_nqueued = 0; + } + + /* Encapsulate the packet for sending */ + if_encap((uint8_t*)ifm->m_data, ifm->m_len); + + m_free(ifm); + + if (if_queued) + goto again; +} diff --git a/SheepShaver/src/slirp/if.h b/SheepShaver/src/slirp/if.h new file mode 100755 index 000000000..5d96a9034 --- /dev/null +++ b/SheepShaver/src/slirp/if.h @@ -0,0 +1,50 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#ifndef _IF_H_ +#define _IF_H_ + +#define IF_COMPRESS 0x01 /* We want compression */ +#define IF_NOCOMPRESS 0x02 /* Do not do compression */ +#define IF_AUTOCOMP 0x04 /* Autodetect (default) */ +#define IF_NOCIDCOMP 0x08 /* CID compression */ + +/* Needed for FreeBSD */ +#undef if_mtu +extern int if_mtu; +extern int if_mru; /* MTU and MRU */ +extern int if_comp; /* Flags for compression */ +extern int if_maxlinkhdr; +extern int if_queued; /* Number of packets queued so far */ +extern int if_thresh; /* Number of packets queued before we start sending + * (to prevent allocing too many mbufs) */ + +extern struct mbuf if_fastq; /* fast queue (for interactive data) */ +extern struct mbuf if_batchq; /* queue for non-interactive data */ +extern struct mbuf *next_m; + +#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) + +/* Interface statistics */ +struct slirp_ifstats { + u_int out_pkts; /* Output packets */ + u_int out_bytes; /* Output bytes */ + u_int out_errpkts; /* Output Error Packets */ + u_int out_errbytes; /* Output Error Bytes */ + u_int in_pkts; /* Input packets */ + u_int in_bytes; /* Input bytes */ + u_int in_errpkts; /* Input Error Packets */ + u_int in_errbytes; /* Input Error Bytes */ + + u_int bytes_saved; /* Number of bytes that compression "saved" */ + /* ie: number of bytes that didn't need to be sent over the link + * because of compression */ + + u_int in_mbad; /* Bad incoming packets */ +}; + +#endif diff --git a/SheepShaver/src/slirp/ip.h b/SheepShaver/src/slirp/ip.h new file mode 100755 index 000000000..94dcc6063 --- /dev/null +++ b/SheepShaver/src/slirp/ip.h @@ -0,0 +1,317 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)ip.h 8.1 (Berkeley) 6/10/93 + * ip.h,v 1.3 1994/08/21 05:27:30 paul Exp + */ + +#ifndef _IP_H_ +#define _IP_H_ + +#ifdef WORDS_BIGENDIAN +# ifndef NTOHL +# define NTOHL(d) +# endif +# ifndef NTOHS +# define NTOHS(d) +# endif +# ifndef HTONL +# define HTONL(d) +# endif +# ifndef HTONS +# define HTONS(d) +# endif +#else +# ifndef NTOHL +# define NTOHL(d) ((d) = ntohl((d))) +# endif +# ifndef NTOHS +# define NTOHS(d) ((d) = ntohs((u_int16_t)(d))) +# endif +# ifndef HTONL +# define HTONL(d) ((d) = htonl((d))) +# endif +# ifndef HTONS +# define HTONS(d) ((d) = htons((u_int16_t)(d))) +# endif +#endif + +typedef u_int32_t n_long; /* long as received from the net */ + +/* + * Definitions for internet protocol version 4. + * Per RFC 791, September 1981. + */ +#define IPVERSION 4 + +/* + * Structure of an internet header, naked of options. + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct ip { +#ifdef WORDS_BIGENDIAN + u_char ip_v:4, /* version */ + ip_hl:4; /* header length */ +#else + u_char ip_hl:4, /* header length */ + ip_v:4; /* version */ +#endif + u_int8_t ip_tos; /* type of service */ + u_int16_t ip_len; /* total length */ + u_int16_t ip_id; /* identification */ + u_int16_t ip_off; /* fragment offset field */ +#define IP_DF 0x4000 /* don't fragment flag */ +#define IP_MF 0x2000 /* more fragments flag */ +#define IP_OFFMASK 0x1fff /* mask for fragmenting bits */ + u_int8_t ip_ttl; /* time to live */ + u_int8_t ip_p; /* protocol */ + u_int16_t ip_sum; /* checksum */ + struct in_addr ip_src,ip_dst; /* source and dest address */ +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +#define IP_MAXPACKET 65535 /* maximum packet size */ + +/* + * Definitions for IP type of service (ip_tos) + */ +#define IPTOS_LOWDELAY 0x10 +#define IPTOS_THROUGHPUT 0x08 +#define IPTOS_RELIABILITY 0x04 + +/* + * Definitions for options. + */ +#define IPOPT_COPIED(o) ((o)&0x80) +#define IPOPT_CLASS(o) ((o)&0x60) +#define IPOPT_NUMBER(o) ((o)&0x1f) + +#define IPOPT_CONTROL 0x00 +#define IPOPT_RESERVED1 0x20 +#define IPOPT_DEBMEAS 0x40 +#define IPOPT_RESERVED2 0x60 + +#define IPOPT_EOL 0 /* end of option list */ +#define IPOPT_NOP 1 /* no operation */ + +#define IPOPT_RR 7 /* record packet route */ +#define IPOPT_TS 68 /* timestamp */ +#define IPOPT_SECURITY 130 /* provide s,c,h,tcc */ +#define IPOPT_LSRR 131 /* loose source route */ +#define IPOPT_SATID 136 /* satnet id */ +#define IPOPT_SSRR 137 /* strict source route */ + +/* + * Offsets to fields in options other than EOL and NOP. + */ +#define IPOPT_OPTVAL 0 /* option ID */ +#define IPOPT_OLEN 1 /* option length */ +#define IPOPT_OFFSET 2 /* offset within option */ +#define IPOPT_MINOFF 4 /* min value of above */ + +/* + * Time stamp option structure. + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct ip_timestamp { + u_int8_t ipt_code; /* IPOPT_TS */ + u_int8_t ipt_len; /* size of structure (variable) */ + u_int8_t ipt_ptr; /* index of current entry */ +#ifdef WORDS_BIGENDIAN + u_char ipt_oflw:4, /* overflow counter */ + ipt_flg:4; /* flags, see below */ +#else + u_char ipt_flg:4, /* flags, see below */ + ipt_oflw:4; /* overflow counter */ +#endif + union ipt_timestamp { + n_long ipt_time[1]; + struct ipt_ta { + struct in_addr ipt_addr; + n_long ipt_time; + } ipt_ta[1]; + } ipt_timestamp; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +/* flag bits for ipt_flg */ +#define IPOPT_TS_TSONLY 0 /* timestamps only */ +#define IPOPT_TS_TSANDADDR 1 /* timestamps and addresses */ +#define IPOPT_TS_PRESPEC 3 /* specified modules only */ + +/* bits for security (not byte swapped) */ +#define IPOPT_SECUR_UNCLASS 0x0000 +#define IPOPT_SECUR_CONFID 0xf135 +#define IPOPT_SECUR_EFTO 0x789a +#define IPOPT_SECUR_MMMM 0xbc4d +#define IPOPT_SECUR_RESTR 0xaf13 +#define IPOPT_SECUR_SECRET 0xd788 +#define IPOPT_SECUR_TOPSECRET 0x6bc5 + +/* + * Internet implementation parameters. + */ +#define MAXTTL 255 /* maximum time to live (seconds) */ +#define IPDEFTTL 64 /* default ttl, from RFC 1340 */ +#define IPFRAGTTL 60 /* time to live for frags, slowhz */ +#define IPTTLDEC 1 /* subtracted when forwarding */ + +#define IP_MSS 576 /* default maximum segment size */ + +#if SIZEOF_CHAR_P == 4 + struct mbuf_ptr { + struct mbuf *mptr; + uint32_t dummy; + }; +#else + struct mbuf_ptr { + struct mbuf *mptr; + }; +#endif +struct qlink { + void *next, *prev; +}; + +/* + * Overlay for ip header used by other protocols (tcp, udp). + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct ipovly { + struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ + u_int8_t ih_x1; /* (unused) */ + u_int8_t ih_pr; /* protocol */ + u_int16_t ih_len; /* protocol length */ + struct in_addr ih_src; /* source internet address */ + struct in_addr ih_dst; /* destination internet address */ +} __attribute__((packed)); + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +/* + * Ip reassembly queue structure. Each fragment + * being reassembled is attached to one of these structures. + * They are timed out after ipq_ttl drops to 0, and may also + * be reclaimed if memory becomes tight. + * size 28 bytes + */ +struct ipq { + struct qlink frag_link; /* to ip headers of fragments */ + struct qlink ip_link; /* to other reass headers */ + + u_int8_t ipq_ttl; /* time for reass q to live */ + u_int8_t ipq_p; /* protocol of this fragment */ + u_int16_t ipq_id; /* sequence id for reassembly */ + + struct in_addr ipq_src,ipq_dst; +}; + +/* + * Ip header, when holding a fragment. + * + * Note: ipf_next must be at same offset as ipq_next above + */ +struct ipasfrag { + struct qlink ipf_link; + struct ip ipf_ip; +}; + +#define ipf_off ipf_ip.ip_off +#define ipf_tos ipf_ip.ip_tos +#define ipf_len ipf_ip.ip_len +#define ipf_next ipf_link.next +#define ipf_prev ipf_link.prev + +/* + * Structure stored in mbuf in inpcb.ip_options + * and passed to ip_output when ip options are in use. + * The actual length of the options (including ipopt_dst) + * is in m_len. + */ +#define MAX_IPOPTLEN 40 + +struct ipoption { + struct in_addr ipopt_dst; /* first-hop dst if source routed */ + int8_t ipopt_list[MAX_IPOPTLEN]; /* options proper */ +}; + +/* + * Structure attached to inpcb.ip_moptions and + * passed to ip_output when IP multicast options are in use. + */ + +struct ipstat { + u_long ips_total; /* total packets received */ + u_long ips_badsum; /* checksum bad */ + u_long ips_tooshort; /* packet too short */ + u_long ips_toosmall; /* not enough data */ + u_long ips_badhlen; /* ip header length < data size */ + u_long ips_badlen; /* ip length < ip header length */ + u_long ips_fragments; /* fragments received */ + u_long ips_fragdropped; /* frags dropped (dups, out of space) */ + u_long ips_fragtimeout; /* fragments timed out */ + u_long ips_forward; /* packets forwarded */ + u_long ips_cantforward; /* packets rcvd for unreachable dest */ + u_long ips_redirectsent; /* packets forwarded on same net */ + u_long ips_noproto; /* unknown or unsupported protocol */ + u_long ips_delivered; /* datagrams delivered to upper level*/ + u_long ips_localout; /* total ip packets generated here */ + u_long ips_odropped; /* lost packets due to nobufs, etc. */ + u_long ips_reassembled; /* total packets reassembled ok */ + u_long ips_fragmented; /* datagrams successfully fragmented */ + u_long ips_ofragments; /* output fragments created */ + u_long ips_cantfrag; /* don't fragment flag was set, etc. */ + u_long ips_badoptions; /* error in option processing */ + u_long ips_noroute; /* packets discarded due to no route */ + u_long ips_badvers; /* ip version != 4 */ + u_long ips_rawout; /* total raw ip packets generated */ + u_long ips_unaligned; /* times the ip packet was not aligned */ +}; + +extern struct ipstat ipstat; +extern struct ipq ipq; /* ip reass. queue */ +extern u_int16_t ip_id; /* ip packet ctr, for ids */ +extern int ip_defttl; /* default IP ttl */ + +#endif diff --git a/SheepShaver/src/slirp/ip_icmp.c b/SheepShaver/src/slirp/ip_icmp.c new file mode 100755 index 000000000..7cbda7906 --- /dev/null +++ b/SheepShaver/src/slirp/ip_icmp.c @@ -0,0 +1,371 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)ip_icmp.c 8.2 (Berkeley) 1/4/94 + * ip_icmp.c,v 1.7 1995/05/30 08:09:42 rgrimes Exp + */ + +#include "slirp.h" +#include "ip_icmp.h" + +struct icmpstat icmpstat; + +/* The message sent when emulating PING */ +/* Be nice and tell them it's just a psuedo-ping packet */ +char icmp_ping_msg[] = "This is a psuedo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; + +/* list of actions for icmp_error() on RX of an icmp message */ +static int icmp_flush[19] = { +/* ECHO REPLY (0) */ 0, + 1, + 1, +/* DEST UNREACH (3) */ 1, +/* SOURCE QUENCH (4)*/ 1, +/* REDIRECT (5) */ 1, + 1, + 1, +/* ECHO (8) */ 0, +/* ROUTERADVERT (9) */ 1, +/* ROUTERSOLICIT (10) */ 1, +/* TIME EXCEEDED (11) */ 1, +/* PARAMETER PROBLEM (12) */ 1, +/* TIMESTAMP (13) */ 0, +/* TIMESTAMP REPLY (14) */ 0, +/* INFO (15) */ 0, +/* INFO REPLY (16) */ 0, +/* ADDR MASK (17) */ 0, +/* ADDR MASK REPLY (18) */ 0 +}; + +/* + * Process a received ICMP message. + */ +void +icmp_input(m, hlen) + struct mbuf *m; + int hlen; +{ + register struct icmp *icp; + register struct ip *ip=mtod(m, struct ip *); + int icmplen=ip->ip_len; + /* int code; */ + + DEBUG_CALL("icmp_input"); + DEBUG_ARG("m = %lx", (long )m); + DEBUG_ARG("m_len = %d", m->m_len); + + icmpstat.icps_received++; + + /* + * Locate icmp structure in mbuf, and check + * that its not corrupted and of at least minimum length. + */ + if (icmplen < ICMP_MINLEN) { /* min 8 bytes payload */ + icmpstat.icps_tooshort++; + freeit: + m_freem(m); + goto end_error; + } + + m->m_len -= hlen; + m->m_data += hlen; + icp = mtod(m, struct icmp *); + if (cksum(m, icmplen)) { + icmpstat.icps_checksum++; + goto freeit; + } + m->m_len += hlen; + m->m_data -= hlen; + + /* icmpstat.icps_inhist[icp->icmp_type]++; */ + /* code = icp->icmp_code; */ + + DEBUG_ARG("icmp_type = %d", icp->icmp_type); + switch (icp->icmp_type) { + case ICMP_ECHO: + icp->icmp_type = ICMP_ECHOREPLY; + ip->ip_len += hlen; /* since ip_input subtracts this */ + if (ip->ip_dst.s_addr == alias_addr.s_addr) { + icmp_reflect(m); + } else { + struct socket *so; + struct sockaddr_in addr; + if ((so = socreate()) == NULL) goto freeit; + if(udp_attach(so) == -1) { + DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", + errno,strerror(errno))); + sofree(so); + m_free(m); + goto end_error; + } + so->so_m = m; + so->so_faddr = ip->ip_dst; + so->so_fport = htons(7); + so->so_laddr = ip->ip_src; + so->so_lport = htons(9); + so->so_iptos = ip->ip_tos; + so->so_type = IPPROTO_ICMP; + so->so_state = SS_ISFCONNECTED; + + /* Send the packet */ + addr.sin_family = AF_INET; + if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { + /* It's an alias */ + switch(ntohl(so->so_faddr.s_addr) & 0xff) { + case CTL_DNS: + addr.sin_addr = dns_addr; + break; + case CTL_ALIAS: + default: + addr.sin_addr = loopback_addr; + break; + } + } else { + addr.sin_addr = so->so_faddr; + } + addr.sin_port = so->so_fport; + if(sendto(so->s, icmp_ping_msg, strlen(icmp_ping_msg), 0, + (struct sockaddr *)&addr, sizeof(addr)) == -1) { + DEBUG_MISC((dfd,"icmp_input udp sendto tx errno = %d-%s\n", + errno,strerror(errno))); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + udp_detach(so); + } + } /* if ip->ip_dst.s_addr == alias_addr.s_addr */ + break; + case ICMP_UNREACH: + /* XXX? report error? close socket? */ + case ICMP_TIMXCEED: + case ICMP_PARAMPROB: + case ICMP_SOURCEQUENCH: + case ICMP_TSTAMP: + case ICMP_MASKREQ: + case ICMP_REDIRECT: + icmpstat.icps_notsupp++; + m_freem(m); + break; + + default: + icmpstat.icps_badtype++; + m_freem(m); + } /* swith */ + +end_error: + /* m is m_free()'d xor put in a socket xor or given to ip_send */ + return; +} + + +/* + * Send an ICMP message in response to a situation + * + * RFC 1122: 3.2.2 MUST send at least the IP header and 8 bytes of header. MAY send more (we do). + * MUST NOT change this header information. + * MUST NOT reply to a multicast/broadcast IP address. + * MUST NOT reply to a multicast/broadcast MAC address. + * MUST reply to only the first fragment. + */ +/* + * Send ICMP_UNREACH back to the source regarding msrc. + * mbuf *msrc is used as a template, but is NOT m_free()'d. + * It is reported as the bad ip packet. The header should + * be fully correct and in host byte order. + * ICMP fragmentation is illegal. All machines must accept 576 bytes in one + * packet. The maximum payload is 576-20(ip hdr)-8(icmp hdr)=548 + */ + +#define ICMP_MAXDATALEN (IP_MSS-28) +void +icmp_error(msrc, type, code, minsize, message) + struct mbuf *msrc; + u_char type; + u_char code; + int minsize; + char *message; +{ + unsigned hlen, shlen, s_ip_len; + register struct ip *ip; + register struct icmp *icp; + register struct mbuf *m; + + DEBUG_CALL("icmp_error"); + DEBUG_ARG("msrc = %lx", (long )msrc); + DEBUG_ARG("msrc_len = %d", msrc->m_len); + + if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; + + /* check msrc */ + if(!msrc) goto end_error; + ip = mtod(msrc, struct ip *); +#if DEBUG + { char bufa[20], bufb[20]; + strcpy(bufa, inet_ntoa(ip->ip_src)); + strcpy(bufb, inet_ntoa(ip->ip_dst)); + DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); + } +#endif + if(ip->ip_off & IP_OFFMASK) goto end_error; /* Only reply to fragment 0 */ + + shlen=ip->ip_hl << 2; + s_ip_len=ip->ip_len; + if(ip->ip_p == IPPROTO_ICMP) { + icp = (struct icmp *)((char *)ip + shlen); + /* + * Assume any unknown ICMP type is an error. This isn't + * specified by the RFC, but think about it.. + */ + if(icp->icmp_type>18 || icmp_flush[icp->icmp_type]) goto end_error; + } + + /* make a copy */ + if(!(m=m_get())) goto end_error; /* get mbuf */ + { int new_m_size; + new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; + if(new_m_size>m->m_size) m_inc(m, new_m_size); + } + memcpy(m->m_data, msrc->m_data, msrc->m_len); + m->m_len = msrc->m_len; /* copy msrc to m */ + + /* make the header of the reply packet */ + ip = mtod(m, struct ip *); + hlen= sizeof(struct ip ); /* no options in reply */ + + /* fill in icmp */ + m->m_data += hlen; + m->m_len -= hlen; + + icp = mtod(m, struct icmp *); + + if(minsize) s_ip_len=shlen+ICMP_MINLEN; /* return header+8b only */ + else if(s_ip_len>ICMP_MAXDATALEN) /* maximum size */ + s_ip_len=ICMP_MAXDATALEN; + + m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ + + /* min. size = 8+sizeof(struct ip)+8 */ + + icp->icmp_type = type; + icp->icmp_code = code; + icp->icmp_id = 0; + icp->icmp_seq = 0; + + memcpy(&icp->icmp_ip, msrc->m_data, s_ip_len); /* report the ip packet */ + HTONS(icp->icmp_ip.ip_len); + HTONS(icp->icmp_ip.ip_id); + HTONS(icp->icmp_ip.ip_off); + +#if DEBUG + if(message) { /* DEBUG : append message to ICMP packet */ + int message_len; + char *cpnt; + message_len=strlen(message); + if(message_len>ICMP_MAXDATALEN) message_len=ICMP_MAXDATALEN; + cpnt=(char *)m->m_data+m->m_len; + memcpy(cpnt, message, message_len); + m->m_len+=message_len; + } +#endif + + icp->icmp_cksum = 0; + icp->icmp_cksum = cksum(m, m->m_len); + + m->m_data -= hlen; + m->m_len += hlen; + + /* fill in ip */ + ip->ip_hl = hlen >> 2; + ip->ip_len = m->m_len; + + ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ + + ip->ip_ttl = MAXTTL; + ip->ip_p = IPPROTO_ICMP; + ip->ip_dst = ip->ip_src; /* ip adresses */ + ip->ip_src = alias_addr; + + (void ) ip_output((struct socket *)NULL, m); + + icmpstat.icps_reflect++; + +end_error: + return; +} +#undef ICMP_MAXDATALEN + +/* + * Reflect the ip packet back to the source + */ +void +icmp_reflect(m) + struct mbuf *m; +{ + register struct ip *ip = mtod(m, struct ip *); + int hlen = ip->ip_hl << 2; + int optlen = hlen - sizeof(struct ip ); + register struct icmp *icp; + + /* + * Send an icmp packet back to the ip level, + * after supplying a checksum. + */ + m->m_data += hlen; + m->m_len -= hlen; + icp = mtod(m, struct icmp *); + + icp->icmp_cksum = 0; + icp->icmp_cksum = cksum(m, ip->ip_len - hlen); + + m->m_data -= hlen; + m->m_len += hlen; + + /* fill in ip */ + if (optlen > 0) { + /* + * Strip out original options by copying rest of first + * mbuf's data back, and adjust the IP length. + */ + memmove((caddr_t)(ip + 1), (caddr_t)ip + hlen, + (unsigned )(m->m_len - hlen)); + hlen -= optlen; + ip->ip_hl = hlen >> 2; + ip->ip_len -= optlen; + m->m_len -= optlen; + } + + ip->ip_ttl = MAXTTL; + { /* swap */ + struct in_addr icmp_dst; + icmp_dst = ip->ip_dst; + ip->ip_dst = ip->ip_src; + ip->ip_src = icmp_dst; + } + + (void ) ip_output((struct socket *)NULL, m); + + icmpstat.icps_reflect++; +} diff --git a/SheepShaver/src/slirp/ip_icmp.h b/SheepShaver/src/slirp/ip_icmp.h new file mode 100755 index 000000000..6968daa71 --- /dev/null +++ b/SheepShaver/src/slirp/ip_icmp.h @@ -0,0 +1,168 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)ip_icmp.h 8.1 (Berkeley) 6/10/93 + * ip_icmp.h,v 1.4 1995/05/30 08:09:43 rgrimes Exp + */ + +#ifndef _NETINET_IP_ICMP_H_ +#define _NETINET_IP_ICMP_H_ + +/* + * Interface Control Message Protocol Definitions. + * Per RFC 792, September 1981. + */ + +typedef u_int32_t n_time; + +/* + * Structure of an icmp header. + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct icmp { + u_char icmp_type; /* type of message, see below */ + u_char icmp_code; /* type sub code */ + u_short icmp_cksum; /* ones complement cksum of struct */ + union { + u_char ih_pptr; /* ICMP_PARAMPROB */ + struct in_addr ih_gwaddr; /* ICMP_REDIRECT */ + struct ih_idseq { + u_short icd_id; + u_short icd_seq; + } ih_idseq; + int ih_void; + + /* ICMP_UNREACH_NEEDFRAG -- Path MTU Discovery (RFC1191) */ + struct ih_pmtu { + u_short ipm_void; + u_short ipm_nextmtu; + } ih_pmtu; + } icmp_hun; +#define icmp_pptr icmp_hun.ih_pptr +#define icmp_gwaddr icmp_hun.ih_gwaddr +#define icmp_id icmp_hun.ih_idseq.icd_id +#define icmp_seq icmp_hun.ih_idseq.icd_seq +#define icmp_void icmp_hun.ih_void +#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void +#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu + union { + struct id_ts { + n_time its_otime; + n_time its_rtime; + n_time its_ttime; + } id_ts; + struct id_ip { + struct ip idi_ip; + /* options and then 64 bits of data */ + } id_ip; + uint32_t id_mask; + char id_data[1]; + } icmp_dun; +#define icmp_otime icmp_dun.id_ts.its_otime +#define icmp_rtime icmp_dun.id_ts.its_rtime +#define icmp_ttime icmp_dun.id_ts.its_ttime +#define icmp_ip icmp_dun.id_ip.idi_ip +#define icmp_mask icmp_dun.id_mask +#define icmp_data icmp_dun.id_data +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +/* + * Lower bounds on packet lengths for various types. + * For the error advice packets must first insure that the + * packet is large enought to contain the returned ip header. + * Only then can we do the check to see if 64 bits of packet + * data have been returned, since we need to check the returned + * ip header length. + */ +#define ICMP_MINLEN 8 /* abs minimum */ +#define ICMP_TSLEN (8 + 3 * sizeof (n_time)) /* timestamp */ +#define ICMP_MASKLEN 12 /* address mask */ +#define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8) /* min */ +#define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8) + /* N.B.: must separately check that ip_hl >= 5 */ + +/* + * Definition of type and code field values. + */ +#define ICMP_ECHOREPLY 0 /* echo reply */ +#define ICMP_UNREACH 3 /* dest unreachable, codes: */ +#define ICMP_UNREACH_NET 0 /* bad net */ +#define ICMP_UNREACH_HOST 1 /* bad host */ +#define ICMP_UNREACH_PROTOCOL 2 /* bad protocol */ +#define ICMP_UNREACH_PORT 3 /* bad port */ +#define ICMP_UNREACH_NEEDFRAG 4 /* IP_DF caused drop */ +#define ICMP_UNREACH_SRCFAIL 5 /* src route failed */ +#define ICMP_UNREACH_NET_UNKNOWN 6 /* unknown net */ +#define ICMP_UNREACH_HOST_UNKNOWN 7 /* unknown host */ +#define ICMP_UNREACH_ISOLATED 8 /* src host isolated */ +#define ICMP_UNREACH_NET_PROHIB 9 /* prohibited access */ +#define ICMP_UNREACH_HOST_PROHIB 10 /* ditto */ +#define ICMP_UNREACH_TOSNET 11 /* bad tos for net */ +#define ICMP_UNREACH_TOSHOST 12 /* bad tos for host */ +#define ICMP_SOURCEQUENCH 4 /* packet lost, slow down */ +#define ICMP_REDIRECT 5 /* shorter route, codes: */ +#define ICMP_REDIRECT_NET 0 /* for network */ +#define ICMP_REDIRECT_HOST 1 /* for host */ +#define ICMP_REDIRECT_TOSNET 2 /* for tos and net */ +#define ICMP_REDIRECT_TOSHOST 3 /* for tos and host */ +#define ICMP_ECHO 8 /* echo service */ +#define ICMP_ROUTERADVERT 9 /* router advertisement */ +#define ICMP_ROUTERSOLICIT 10 /* router solicitation */ +#define ICMP_TIMXCEED 11 /* time exceeded, code: */ +#define ICMP_TIMXCEED_INTRANS 0 /* ttl==0 in transit */ +#define ICMP_TIMXCEED_REASS 1 /* ttl==0 in reass */ +#define ICMP_PARAMPROB 12 /* ip header bad */ +#define ICMP_PARAMPROB_OPTABSENT 1 /* req. opt. absent */ +#define ICMP_TSTAMP 13 /* timestamp request */ +#define ICMP_TSTAMPREPLY 14 /* timestamp reply */ +#define ICMP_IREQ 15 /* information request */ +#define ICMP_IREQREPLY 16 /* information reply */ +#define ICMP_MASKREQ 17 /* address mask request */ +#define ICMP_MASKREPLY 18 /* address mask reply */ + +#define ICMP_MAXTYPE 18 + +#define ICMP_INFOTYPE(type) \ + ((type) == ICMP_ECHOREPLY || (type) == ICMP_ECHO || \ + (type) == ICMP_ROUTERADVERT || (type) == ICMP_ROUTERSOLICIT || \ + (type) == ICMP_TSTAMP || (type) == ICMP_TSTAMPREPLY || \ + (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ + (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) + +void icmp_input _P((struct mbuf *, int)); +void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); +void icmp_reflect _P((struct mbuf *)); + +#endif diff --git a/SheepShaver/src/slirp/ip_input.c b/SheepShaver/src/slirp/ip_input.c new file mode 100755 index 000000000..7c995c98d --- /dev/null +++ b/SheepShaver/src/slirp/ip_input.c @@ -0,0 +1,705 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)ip_input.c 8.2 (Berkeley) 1/4/94 + * ip_input.c,v 1.11 1994/11/16 10:17:08 jkh Exp + */ + +/* + * Changes and additions relating to SLiRP are + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include +#include +#include +#include + +#define container_of(ptr, type, member) ({ \ + const typeof(((type *) 0)->member) *__mptr = (ptr); \ + (type *) ((char *) __mptr - offsetof(type, member));}) + + +#include +#include "ip_icmp.h" + +int ip_defttl; +struct ipstat ipstat; +struct ipq ipq; + +/* + * IP initialization: fill in IP protocol switch table. + * All protocols not implemented in kernel go to raw IP protocol handler. + */ +void +ip_init() +{ + ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; + ip_id = tt.tv_sec & 0xffff; + udp_init(); + tcp_init(); + ip_defttl = IPDEFTTL; +} + +/* + * Ip input routine. Checksum and byte swap header. If fragmented + * try to reassemble. Process options. Pass to next level. + */ +void +ip_input(m) + struct mbuf *m; +{ + register struct ip *ip; + int hlen; + + DEBUG_CALL("ip_input"); + DEBUG_ARG("m = %lx", (long)m); + DEBUG_ARG("m_len = %d", m->m_len); + + ipstat.ips_total++; + + if (m->m_len < sizeof (struct ip)) { + ipstat.ips_toosmall++; + return; + } + + ip = mtod(m, struct ip *); + + if (ip->ip_v != IPVERSION) { + ipstat.ips_badvers++; + goto bad; + } + + hlen = ip->ip_hl << 2; + if (hlenm->m_len) {/* min header length */ + ipstat.ips_badhlen++; /* or packet too short */ + goto bad; + } + + /* keep ip header intact for ICMP reply + * ip->ip_sum = cksum(m, hlen); + * if (ip->ip_sum) { + */ + if(cksum(m,hlen)) { + ipstat.ips_badsum++; + goto bad; + } + + /* + * Convert fields to host representation. + */ + NTOHS(ip->ip_len); + if (ip->ip_len < hlen) { + ipstat.ips_badlen++; + goto bad; + } + NTOHS(ip->ip_id); + NTOHS(ip->ip_off); + + /* + * Check that the amount of data in the buffers + * is as at least much as the IP header would have us expect. + * Trim mbufs if longer than we expect. + * Drop packet if shorter than we expect. + */ + if (m->m_len < ip->ip_len) { + ipstat.ips_tooshort++; + goto bad; + } + /* Should drop packet if mbuf too long? hmmm... */ + if (m->m_len > ip->ip_len) + m_adj(m, ip->ip_len - m->m_len); + + /* check ip_ttl for a correct ICMP reply */ + if(ip->ip_ttl==0 || ip->ip_ttl==1) { + icmp_error(m, ICMP_TIMXCEED,ICMP_TIMXCEED_INTRANS, 0,"ttl"); + goto bad; + } + + /* + * Process options and, if not destined for us, + * ship it on. ip_dooptions returns 1 when an + * error was detected (causing an icmp message + * to be sent and the original packet to be freed). + */ +/* We do no IP options */ +/* if (hlen > sizeof (struct ip) && ip_dooptions(m)) + * goto next; + */ + /* + * If offset or IP_MF are set, must reassemble. + * Otherwise, nothing need be done. + * (We could look in the reassembly queue to see + * if the packet was previously fragmented, + * but it's not worth the time; just let them time out.) + * + * XXX This should fail, don't fragment yet + */ + if (ip->ip_off &~ IP_DF) { + register struct ipq *fp; + struct qlink *l; + /* + * Look for queue of fragments + * of this datagram. + */ + for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { + fp = container_of(l, struct ipq, ip_link); + if (ip->ip_id == fp->ipq_id && + ip->ip_src.s_addr == fp->ipq_src.s_addr && + ip->ip_dst.s_addr == fp->ipq_dst.s_addr && + ip->ip_p == fp->ipq_p) + goto found; + } + fp = NULL; + found: + + /* + * Adjust ip_len to not reflect header, + * set ip_mff if more fragments are expected, + * convert offset of this to bytes. + */ + ip->ip_len -= hlen; + if (ip->ip_off & IP_MF) + ip->ip_tos |= 1; + else + ip->ip_tos &= ~1; + + ip->ip_off <<= 3; + + /* + * If datagram marked as having more fragments + * or if this is not the first fragment, + * attempt reassembly; if it succeeds, proceed. + */ + if (ip->ip_tos & 1 || ip->ip_off) { + ipstat.ips_fragments++; + ip = ip_reass(ip, fp); + if (ip == 0) + return; + ipstat.ips_reassembled++; + m = dtom(ip); + } else + if (fp) + ip_freef(fp); + + } else + ip->ip_len -= hlen; + + /* + * Switch out to protocol's input routine. + */ + ipstat.ips_delivered++; + switch (ip->ip_p) { + case IPPROTO_TCP: + tcp_input(m, hlen, (struct socket *)NULL); + break; + case IPPROTO_UDP: + udp_input(m, hlen); + break; + case IPPROTO_ICMP: + icmp_input(m, hlen); + break; + default: + ipstat.ips_noproto++; + m_free(m); + } + return; +bad: + m_freem(m); + return; +} + +#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) +#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) +/* + * Take incoming datagram fragment and try to + * reassemble it into whole datagram. If a chain for + * reassembly of this datagram already exists, then it + * is given as fp; otherwise have to make a chain. + */ +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *fp) +{ + register struct mbuf *m = dtom(ip); + register struct ipasfrag *q; + int hlen = ip->ip_hl << 2; + u_int16_t i, next; + + DEBUG_CALL("ip_reass"); + DEBUG_ARG("ip = %lx", (long)ip); + DEBUG_ARG("fp = %lx", (long)fp); + DEBUG_ARG("m = %lx", (long)m); + + /* + * Presence of header sizes in mbufs + * would confuse code below. + * Fragment m_data is concatenated. + */ + m->m_data += hlen; + m->m_len -= hlen; + + /* + * If first fragment to arrive, create a reassembly queue. + */ + if (fp == 0) { + struct mbuf *t; + if ((t = m_get()) == NULL) goto dropfrag; + fp = mtod(t, struct ipq *); + insque(&fp->ip_link, &ipq.ip_link); + fp->ipq_ttl = IPFRAGTTL; + fp->ipq_p = ip->ip_p; + fp->ipq_id = ip->ip_id; + fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; + fp->ipq_src = ip->ip_src; + fp->ipq_dst = ip->ip_dst; + q = (struct ipasfrag *)fp; + goto insert; + } + + /* + * Find a segment which begins after this one does. + */ + for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; + q = q->ipf_next) + if (q->ipf_off > ip->ip_off) + break; + + /* + * If there is a preceding segment, it may provide some of + * our data already. If so, drop the data from the incoming + * segment. If it provides all of our data, drop us. + */ + if (q->ipf_prev != &fp->frag_link) { + struct ipasfrag *pq = q->ipf_prev; + i = pq->ipf_off + pq->ipf_len - ip->ip_off; + if (i > 0) { + if (i >= ip->ip_len) + goto dropfrag; + m_adj(dtom(ip), i); + ip->ip_off += i; + ip->ip_len -= i; + } + } + + /* + * While we overlap succeeding segments trim them or, + * if they are completely covered, dequeue them. + */ + while (q != (struct ipasfrag*)&fp->frag_link && + ip->ip_off + ip->ip_len > q->ipf_off) { + i = (ip->ip_off + ip->ip_len) - q->ipf_off; + if (i < q->ipf_len) { + q->ipf_len -= i; + q->ipf_off += i; + m_adj(dtom(q), i); + break; + } + q = q->ipf_next; + m_freem(dtom(q->ipf_prev)); + ip_deq(q->ipf_prev); + } + +insert: + /* + * Stick new segment in its place; + * check for complete reassembly. + */ + ip_enq(iptofrag(ip), q->ipf_prev); + next = 0; + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; + q = q->ipf_next) { + if (q->ipf_off != next) + return (0); + next += q->ipf_len; + } + if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) + return (0); + + /* + * Reassembly is complete; concatenate fragments. + */ + q = fp->frag_link.next; + m = dtom(q); + + q = (struct ipasfrag *) q->ipf_next; + while (q != (struct ipasfrag*)&fp->frag_link) { + struct mbuf *t = dtom(q); + q = (struct ipasfrag *) q->ipf_next; + m_cat(m, t); + } + + /* + * Create header for new ip packet by + * modifying header of first packet; + * dequeue and discard fragment reassembly header. + * Make header visible. + */ + q = fp->frag_link.next; + + /* + * If the fragments concatenated to an mbuf that's + * bigger than the total size of the fragment, then and + * m_ext buffer was alloced. But fp->ipq_next points to + * the old buffer (in the mbuf), so we must point ip + * into the new buffer. + */ + if (m->m_flags & M_EXT) { + int delta; + delta = (char *)q - m->m_dat; + q = (struct ipasfrag *)(m->m_ext + delta); + } + + /* DEBUG_ARG("ip = %lx", (long)ip); + * ip=(struct ipasfrag *)m->m_data; */ + + ip = fragtoip(q); + ip->ip_len = next; + ip->ip_tos &= ~1; + ip->ip_src = fp->ipq_src; + ip->ip_dst = fp->ipq_dst; + remque(&fp->ip_link); + (void) m_free(dtom(fp)); + m->m_len += (ip->ip_hl << 2); + m->m_data -= (ip->ip_hl << 2); + + return ip; + +dropfrag: + ipstat.ips_fragdropped++; + m_freem(m); + return (0); +} + +/* + * Free a fragment reassembly header and all + * associated datagrams. + */ +void +ip_freef(fp) + struct ipq *fp; +{ + register struct ipasfrag *q, *p; + + for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { + p = q->ipf_next; + ip_deq(q); + m_freem(dtom(q)); + } + remque(&fp->ip_link); + (void) m_free(dtom(fp)); +} + +/* + * Put an ip fragment on a reassembly chain. + * Like insque, but pointers in middle of structure. + */ +void +ip_enq(p, prev) + register struct ipasfrag *p, *prev; +{ + DEBUG_CALL("ip_enq"); + DEBUG_ARG("prev = %lx", (long)prev); + p->ipf_prev = prev; + p->ipf_next = prev->ipf_next; + ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; + prev->ipf_next = p; +} + +/* + * To ip_enq as remque is to insque. + */ +void +ip_deq(p) + register struct ipasfrag *p; +{ + ((struct ipasfrag *)(p->ipf_prev))->ipf_next = p->ipf_next; + ((struct ipasfrag *)(p->ipf_next))->ipf_prev = p->ipf_prev; +} + +/* + * IP timer processing; + * if a timer expires on a reassembly + * queue, discard it. + */ +void +ip_slowtimo() +{ + struct qlink *l; + + DEBUG_CALL("ip_slowtimo"); + + l = ipq.ip_link.next; + + if (l == 0) + return; + + while (l != &ipq.ip_link) { + struct ipq *fp = container_of(l, struct ipq, ip_link); + l = l->next; + if (--fp->ipq_ttl == 0) { + ipstat.ips_fragtimeout++; + ip_freef(fp); + } + } +} + +/* + * Do option processing on a datagram, + * possibly discarding it if bad options are encountered, + * or forwarding it if source-routed. + * Returns 1 if packet has been forwarded/freed, + * 0 if the packet should be processed further. + */ + +#ifdef notdef + +int +ip_dooptions(m) + struct mbuf *m; +{ + register struct ip *ip = mtod(m, struct ip *); + register u_char *cp; + register struct ip_timestamp *ipt; + register struct in_ifaddr *ia; +/* int opt, optlen, cnt, off, code, type = ICMP_PARAMPROB, forward = 0; */ + int opt, optlen, cnt, off, code, type, forward = 0; + struct in_addr *sin, dst; +typedef u_int32_t n_time; + n_time ntime; + + dst = ip->ip_dst; + cp = (u_char *)(ip + 1); + cnt = (ip->ip_hl << 2) - sizeof (struct ip); + for (; cnt > 0; cnt -= optlen, cp += optlen) { + opt = cp[IPOPT_OPTVAL]; + if (opt == IPOPT_EOL) + break; + if (opt == IPOPT_NOP) + optlen = 1; + else { + optlen = cp[IPOPT_OLEN]; + if (optlen <= 0 || optlen > cnt) { + code = &cp[IPOPT_OLEN] - (u_char *)ip; + goto bad; + } + } + switch (opt) { + + default: + break; + + /* + * Source routing with record. + * Find interface with current destination address. + * If none on this machine then drop if strictly routed, + * or do nothing if loosely routed. + * Record interface address and bring up next address + * component. If strictly routed make sure next + * address is on directly accessible net. + */ + case IPOPT_LSRR: + case IPOPT_SSRR: + if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { + code = &cp[IPOPT_OFFSET] - (u_char *)ip; + goto bad; + } + ipaddr.sin_addr = ip->ip_dst; + ia = (struct in_ifaddr *) + ifa_ifwithaddr((struct sockaddr *)&ipaddr); + if (ia == 0) { + if (opt == IPOPT_SSRR) { + type = ICMP_UNREACH; + code = ICMP_UNREACH_SRCFAIL; + goto bad; + } + /* + * Loose routing, and not at next destination + * yet; nothing to do except forward. + */ + break; + } + off--; / * 0 origin * / + if (off > optlen - sizeof(struct in_addr)) { + /* + * End of source route. Should be for us. + */ + save_rte(cp, ip->ip_src); + break; + } + /* + * locate outgoing interface + */ + bcopy((caddr_t)(cp + off), (caddr_t)&ipaddr.sin_addr, + sizeof(ipaddr.sin_addr)); + if (opt == IPOPT_SSRR) { +#define INA struct in_ifaddr * +#define SA struct sockaddr * + if ((ia = (INA)ifa_ifwithdstaddr((SA)&ipaddr)) == 0) + ia = (INA)ifa_ifwithnet((SA)&ipaddr); + } else + ia = ip_rtaddr(ipaddr.sin_addr); + if (ia == 0) { + type = ICMP_UNREACH; + code = ICMP_UNREACH_SRCFAIL; + goto bad; + } + ip->ip_dst = ipaddr.sin_addr; + bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), + (caddr_t)(cp + off), sizeof(struct in_addr)); + cp[IPOPT_OFFSET] += sizeof(struct in_addr); + /* + * Let ip_intr's mcast routing check handle mcast pkts + */ + forward = !IN_MULTICAST(ntohl(ip->ip_dst.s_addr)); + break; + + case IPOPT_RR: + if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { + code = &cp[IPOPT_OFFSET] - (u_char *)ip; + goto bad; + } + /* + * If no space remains, ignore. + */ + off--; * 0 origin * + if (off > optlen - sizeof(struct in_addr)) + break; + bcopy((caddr_t)(&ip->ip_dst), (caddr_t)&ipaddr.sin_addr, + sizeof(ipaddr.sin_addr)); + /* + * locate outgoing interface; if we're the destination, + * use the incoming interface (should be same). + */ + if ((ia = (INA)ifa_ifwithaddr((SA)&ipaddr)) == 0 && + (ia = ip_rtaddr(ipaddr.sin_addr)) == 0) { + type = ICMP_UNREACH; + code = ICMP_UNREACH_HOST; + goto bad; + } + bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), + (caddr_t)(cp + off), sizeof(struct in_addr)); + cp[IPOPT_OFFSET] += sizeof(struct in_addr); + break; + + case IPOPT_TS: + code = cp - (u_char *)ip; + ipt = (struct ip_timestamp *)cp; + if (ipt->ipt_len < 5) + goto bad; + if (ipt->ipt_ptr > ipt->ipt_len - sizeof (int32_t)) { + if (++ipt->ipt_oflw == 0) + goto bad; + break; + } + sin = (struct in_addr *)(cp + ipt->ipt_ptr - 1); + switch (ipt->ipt_flg) { + + case IPOPT_TS_TSONLY: + break; + + case IPOPT_TS_TSANDADDR: + if (ipt->ipt_ptr + sizeof(n_time) + + sizeof(struct in_addr) > ipt->ipt_len) + goto bad; + ipaddr.sin_addr = dst; + ia = (INA)ifaof_ i f p foraddr((SA)&ipaddr, + m->m_pkthdr.rcvif); + if (ia == 0) + continue; + bcopy((caddr_t)&IA_SIN(ia)->sin_addr, + (caddr_t)sin, sizeof(struct in_addr)); + ipt->ipt_ptr += sizeof(struct in_addr); + break; + + case IPOPT_TS_PRESPEC: + if (ipt->ipt_ptr + sizeof(n_time) + + sizeof(struct in_addr) > ipt->ipt_len) + goto bad; + bcopy((caddr_t)sin, (caddr_t)&ipaddr.sin_addr, + sizeof(struct in_addr)); + if (ifa_ifwithaddr((SA)&ipaddr) == 0) + continue; + ipt->ipt_ptr += sizeof(struct in_addr); + break; + + default: + goto bad; + } + ntime = iptime(); + bcopy((caddr_t)&ntime, (caddr_t)cp + ipt->ipt_ptr - 1, + sizeof(n_time)); + ipt->ipt_ptr += sizeof(n_time); + } + } + if (forward) { + ip_forward(m, 1); + return (1); + } + } + } + return (0); +bad: + /* ip->ip_len -= ip->ip_hl << 2; XXX icmp_error adds in hdr length */ + +/* Not yet */ + icmp_error(m, type, code, 0, 0); + + ipstat.ips_badoptions++; + return (1); +} + +#endif /* notdef */ + +/* + * Strip out IP options, at higher + * level protocol in the kernel. + * Second argument is buffer to which options + * will be moved, and return value is their length. + * (XXX) should be deleted; last arg currently ignored. + */ +void +ip_stripoptions(m, mopt) + register struct mbuf *m; + struct mbuf *mopt; +{ + register int i; + struct ip *ip = mtod(m, struct ip *); + register caddr_t opts; + int olen; + + olen = (ip->ip_hl<<2) - sizeof (struct ip); + opts = (caddr_t)(ip + 1); + i = m->m_len - (sizeof (struct ip) + olen); + memcpy(opts, opts + olen, (unsigned)i); + m->m_len -= olen; + + ip->ip_hl = sizeof(struct ip) >> 2; +} diff --git a/SheepShaver/src/slirp/ip_output.c b/SheepShaver/src/slirp/ip_output.c new file mode 100755 index 000000000..0d1ae1b2c --- /dev/null +++ b/SheepShaver/src/slirp/ip_output.c @@ -0,0 +1,201 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)ip_output.c 8.3 (Berkeley) 1/21/94 + * ip_output.c,v 1.9 1994/11/16 10:17:10 jkh Exp + */ + +/* + * Changes and additions relating to SLiRP are + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include + +u_int16_t ip_id; + +/* + * IP output. The packet in mbuf chain m contains a skeletal IP + * header (with len, off, ttl, proto, tos, src, dst). + * The mbuf chain containing the packet will be freed. + * The mbuf opt, if present, will not be freed. + */ +int +ip_output(so, m0) + struct socket *so; + struct mbuf *m0; +{ + register struct ip *ip; + register struct mbuf *m = m0; + register int hlen = sizeof(struct ip ); + int len, off, error = 0; + + DEBUG_CALL("ip_output"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("m0 = %lx", (long)m0); + + /* We do no options */ +/* if (opt) { + * m = ip_insertoptions(m, opt, &len); + * hlen = len; + * } + */ + ip = mtod(m, struct ip *); + /* + * Fill in IP header. + */ + ip->ip_v = IPVERSION; + ip->ip_off &= IP_DF; + ip->ip_id = htons(ip_id++); + ip->ip_hl = hlen >> 2; + ipstat.ips_localout++; + + /* + * Verify that we have any chance at all of being able to queue + * the packet or packet fragments + */ + /* XXX Hmmm... */ +/* if (if_queued > if_thresh && towrite <= 0) { + * error = ENOBUFS; + * goto bad; + * } + */ + + /* + * If small enough for interface, can just send directly. + */ + if ((u_int16_t)ip->ip_len <= if_mtu) { + ip->ip_len = htons((u_int16_t)ip->ip_len); + ip->ip_off = htons((u_int16_t)ip->ip_off); + ip->ip_sum = 0; + ip->ip_sum = cksum(m, hlen); + + if_output(so, m); + goto done; + } + + /* + * Too large for interface; fragment if possible. + * Must be able to put at least 8 bytes per fragment. + */ + if (ip->ip_off & IP_DF) { + error = -1; + ipstat.ips_cantfrag++; + goto bad; + } + + len = (if_mtu - hlen) &~ 7; /* ip databytes per packet */ + if (len < 8) { + error = -1; + goto bad; + } + + { + int mhlen, firstlen = len; + struct mbuf **mnext = &m->m_nextpkt; + + /* + * Loop through length of segment after first fragment, + * make new header and copy data of each part and link onto chain. + */ + m0 = m; + mhlen = sizeof (struct ip); + for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { + register struct ip *mhip; + m = m_get(); + if (m == 0) { + error = -1; + ipstat.ips_odropped++; + goto sendorfree; + } + m->m_data += if_maxlinkhdr; + mhip = mtod(m, struct ip *); + *mhip = *ip; + + /* No options */ +/* if (hlen > sizeof (struct ip)) { + * mhlen = ip_optcopy(ip, mhip) + sizeof (struct ip); + * mhip->ip_hl = mhlen >> 2; + * } + */ + m->m_len = mhlen; + mhip->ip_off = ((off - hlen) >> 3) + (ip->ip_off & ~IP_MF); + if (ip->ip_off & IP_MF) + mhip->ip_off |= IP_MF; + if (off + len >= (u_int16_t)ip->ip_len) + len = (u_int16_t)ip->ip_len - off; + else + mhip->ip_off |= IP_MF; + mhip->ip_len = htons((u_int16_t)(len + mhlen)); + + if (m_copy(m, m0, off, len) < 0) { + error = -1; + goto sendorfree; + } + + mhip->ip_off = htons((u_int16_t)mhip->ip_off); + mhip->ip_sum = 0; + mhip->ip_sum = cksum(m, mhlen); + *mnext = m; + mnext = &m->m_nextpkt; + ipstat.ips_ofragments++; + } + /* + * Update first fragment by trimming what's been copied out + * and updating header, then send each fragment (in order). + */ + m = m0; + m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); + ip->ip_len = htons((u_int16_t)m->m_len); + ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); + ip->ip_sum = 0; + ip->ip_sum = cksum(m, hlen); +sendorfree: + for (m = m0; m; m = m0) { + m0 = m->m_nextpkt; + m->m_nextpkt = 0; + if (error == 0) + if_output(so, m); + else + m_freem(m); + } + + if (error == 0) + ipstat.ips_fragmented++; + } + +done: + return (error); + +bad: + m_freem(m0); + goto done; +} diff --git a/SheepShaver/src/slirp/libslirp.h b/SheepShaver/src/slirp/libslirp.h new file mode 100755 index 000000000..8a1aa31e6 --- /dev/null +++ b/SheepShaver/src/slirp/libslirp.h @@ -0,0 +1,41 @@ +#ifndef _LIBSLIRP_H +#define _LIBSLIRP_H + +#ifdef _WIN32 +#include +int inet_aton(const char *cp, struct in_addr *ia); +#else +#include +#include +#endif + +#ifdef __cplusplus +extern "C" { +#endif + +int slirp_init(void); + +int slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds); + +void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds); + +void slirp_input(const uint8 *pkt, int pkt_len); + +/* you must provide the following functions: */ +int slirp_can_output(void); +void slirp_output(const uint8 *pkt, int pkt_len); + +int slirp_redir(int is_udp, int host_port, + struct in_addr guest_addr, int guest_port); +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, + int guest_port); + +extern const char *tftp_prefix; +extern char slirp_hostname[33]; + +#ifdef __cplusplus +} +#endif + +#endif diff --git a/SheepShaver/src/slirp/main.h b/SheepShaver/src/slirp/main.h new file mode 100755 index 000000000..181b6ae88 --- /dev/null +++ b/SheepShaver/src/slirp/main.h @@ -0,0 +1,54 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#ifdef HAVE_SYS_SELECT_H +#include +#endif + +#define TOWRITEMAX 512 + +extern struct timeval tt; +extern int link_up; +extern int slirp_socket; +extern int slirp_socket_unit; +extern int slirp_socket_port; +extern u_int32_t slirp_socket_addr; +extern char *slirp_socket_passwd; +extern int ctty_closed; + +/* + * Get the difference in 2 times from updtim() + * Allow for wraparound times, "just in case" + * x is the greater of the 2 (current time) and y is + * what it's being compared against. + */ +#define TIME_DIFF(x,y) (x)-(y) < 0 ? ~0-(y)+(x) : (x)-(y) + +extern char *slirp_tty; +extern char *exec_shell; +extern u_int curtime; +extern fd_set *global_readfds, *global_writefds, *global_xfds; +extern struct in_addr ctl_addr; +extern struct in_addr special_addr; +extern struct in_addr alias_addr; +extern struct in_addr our_addr; +extern struct in_addr loopback_addr; +extern struct in_addr dns_addr; +extern char *username; +extern char *socket_path; +extern int towrite_max; +extern int ppp_exit; +extern int so_options; +extern int tcp_keepintvl; +extern uint8_t client_ethaddr[6]; + +#define PROTO_SLIP 0x1 +#ifdef USE_PPP +#define PROTO_PPP 0x2 +#endif + +void if_encap(const uint8_t *ip_data, int ip_data_len); diff --git a/SheepShaver/src/slirp/mbuf.c b/SheepShaver/src/slirp/mbuf.c new file mode 100755 index 000000000..2b53bc3e9 --- /dev/null +++ b/SheepShaver/src/slirp/mbuf.c @@ -0,0 +1,247 @@ +/* + * Copyright (c) 1995 Danny Gasparovski + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +/* + * mbuf's in SLiRP are much simpler than the real mbufs in + * FreeBSD. They are fixed size, determined by the MTU, + * so that one whole packet can fit. Mbuf's cannot be + * chained together. If there's more data than the mbuf + * could hold, an external malloced buffer is pointed to + * by m_ext (and the data pointers) and M_EXT is set in + * the flags + */ + +#include +#include + +struct mbuf *mbutl; +char *mclrefcnt; +int mbuf_alloced = 0; +struct mbuf m_freelist, m_usedlist; +int mbuf_thresh = 30; +int mbuf_max = 0; +int msize; + +void +m_init() +{ + m_freelist.m_next = m_freelist.m_prev = &m_freelist; + m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; + msize_init(); +} + +void +msize_init() +{ + /* + * Find a nice value for msize + * XXX if_maxlinkhdr already in mtu + */ + msize = (if_mtu>if_mru?if_mtu:if_mru) + + if_maxlinkhdr + sizeof(struct m_hdr ) + 6; +} + +/* + * Get an mbuf from the free list, if there are none + * malloc one + * + * Because fragmentation can occur if we alloc new mbufs and + * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, + * which tells m_free to actually free() it + */ +struct mbuf * +m_get() +{ + register struct mbuf *m; + int flags = 0; + + DEBUG_CALL("m_get"); + + if (m_freelist.m_next == &m_freelist) { + m = (struct mbuf *)malloc(msize); + if (m == NULL) goto end_error; + mbuf_alloced++; + if (mbuf_alloced > mbuf_thresh) + flags = M_DOFREE; + if (mbuf_alloced > mbuf_max) + mbuf_max = mbuf_alloced; + } else { + m = m_freelist.m_next; + remque(m); + } + + /* Insert it in the used list */ + insque(m,&m_usedlist); + m->m_flags = (flags | M_USEDLIST); + + /* Initialise it */ + m->m_size = msize - sizeof(struct m_hdr); + m->m_data = m->m_dat; + m->m_len = 0; + m->m_nextpkt = 0; + m->m_prevpkt = 0; +end_error: + DEBUG_ARG("m = %lx", (long )m); + return m; +} + +void +m_free(m) + struct mbuf *m; +{ + + DEBUG_CALL("m_free"); + DEBUG_ARG("m = %lx", (long )m); + + if(m) { + /* Remove from m_usedlist */ + if (m->m_flags & M_USEDLIST) + remque(m); + + /* If it's M_EXT, free() it */ + if (m->m_flags & M_EXT) + free(m->m_ext); + + /* + * Either free() it or put it on the free list + */ + if (m->m_flags & M_DOFREE) { + free(m); + mbuf_alloced--; + } else if ((m->m_flags & M_FREELIST) == 0) { + insque(m,&m_freelist); + m->m_flags = M_FREELIST; /* Clobber other flags */ + } + } /* if(m) */ +} + +/* + * Copy data from one mbuf to the end of + * the other.. if result is too big for one mbuf, malloc() + * an M_EXT data segment + */ +void +m_cat(m, n) + register struct mbuf *m, *n; +{ + /* + * If there's no room, realloc + */ + if (M_FREEROOM(m) < n->m_len) + m_inc(m,m->m_size+MINCSIZE); + + memcpy(m->m_data+m->m_len, n->m_data, n->m_len); + m->m_len += n->m_len; + + m_free(n); +} + + +/* make m size bytes large */ +void +m_inc(m, size) + struct mbuf *m; + int size; +{ + int datasize; + + /* some compiles throw up on gotos. This one we can fake. */ + if(m->m_size>size) return; + + if (m->m_flags & M_EXT) { + datasize = m->m_data - m->m_ext; + m->m_ext = (char *)realloc(m->m_ext,size); +/* if (m->m_ext == NULL) + * return (struct mbuf *)NULL; + */ + m->m_data = m->m_ext + datasize; + } else { + char *dat; + datasize = m->m_data - m->m_dat; + dat = (char *)malloc(size); +/* if (dat == NULL) + * return (struct mbuf *)NULL; + */ + memcpy(dat, m->m_dat, m->m_size); + + m->m_ext = dat; + m->m_data = m->m_ext + datasize; + m->m_flags |= M_EXT; + } + + m->m_size = size; + +} + + + +void +m_adj(m, len) + struct mbuf *m; + int len; +{ + if (m == NULL) + return; + if (len >= 0) { + /* Trim from head */ + m->m_data += len; + m->m_len -= len; + } else { + /* Trim from tail */ + len = -len; + m->m_len -= len; + } +} + + +/* + * Copy len bytes from m, starting off bytes into n + */ +int +m_copy(n, m, off, len) + struct mbuf *n, *m; + int off, len; +{ + if (len > M_FREEROOM(n)) + return -1; + + memcpy((n->m_data + n->m_len), (m->m_data + off), len); + n->m_len += len; + return 0; +} + + +/* + * Given a pointer into an mbuf, return the mbuf + * XXX This is a kludge, I should eliminate the need for it + * Fortunately, it's not used often + */ +struct mbuf * +dtom(dat) + void *dat; +{ + struct mbuf *m; + + DEBUG_CALL("dtom"); + DEBUG_ARG("dat = %lx", (long )dat); + + /* bug corrected for M_EXT buffers */ + for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) { + if (m->m_flags & M_EXT) { + if( (char *)dat>=m->m_ext && (char *)dat<(m->m_ext + m->m_size) ) + return m; + } else { + if( (char *)dat >= m->m_dat && (char *)dat<(m->m_dat + m->m_size) ) + return m; + } + } + + DEBUG_ERROR((dfd, "dtom failed")); + + return (struct mbuf *)0; +} + diff --git a/SheepShaver/src/slirp/mbuf.h b/SheepShaver/src/slirp/mbuf.h new file mode 100755 index 000000000..183254a08 --- /dev/null +++ b/SheepShaver/src/slirp/mbuf.h @@ -0,0 +1,143 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)mbuf.h 8.3 (Berkeley) 1/21/94 + * mbuf.h,v 1.9 1994/11/14 13:54:20 bde Exp + */ + +#ifndef _MBUF_H_ +#define _MBUF_H_ + +#define m_freem m_free + + +#define MINCSIZE 4096 /* Amount to increase mbuf if too small */ + +/* + * Macros for type conversion + * mtod(m,t) - convert mbuf pointer to data pointer of correct type + * dtom(x) - convert data pointer within mbuf to mbuf pointer (XXX) + */ +#define mtod(m,t) ((t)(m)->m_data) +/* #define dtom(x) ((struct mbuf *)((int)(x) & ~(M_SIZE-1))) */ + +/* XXX About mbufs for slirp: + * Only one mbuf is ever used in a chain, for each "cell" of data. + * m_nextpkt points to the next packet, if fragmented. + * If the data is too large, the M_EXT is used, and a larger block + * is alloced. Therefore, m_free[m] must check for M_EXT and if set + * free the m_ext. This is inefficient memory-wise, but who cares. + */ + +/* XXX should union some of these! */ +/* header at beginning of each mbuf: */ +struct m_hdr { + struct mbuf *mh_next; /* Linked list of mbufs */ + struct mbuf *mh_prev; + struct mbuf *mh_nextpkt; /* Next packet in queue/record */ + struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ + int mh_flags; /* Misc flags */ + + int mh_size; /* Size of data */ + struct socket *mh_so; + + caddr_t mh_data; /* Location of data */ + int mh_len; /* Amount of data in this mbuf */ +}; + +/* + * How much room is in the mbuf, from m_data to the end of the mbuf + */ +#define M_ROOM(m) ((m->m_flags & M_EXT)? \ + (((m)->m_ext + (m)->m_size) - (m)->m_data) \ + : \ + (((m)->m_dat + (m)->m_size) - (m)->m_data)) + +/* + * How much free room there is + */ +#define M_FREEROOM(m) (M_ROOM(m) - (m)->m_len) +#define M_TRAILINGSPACE M_FREEROOM + +struct mbuf { + struct m_hdr m_hdr; + union M_dat { + char m_dat_[1]; /* ANSI don't like 0 sized arrays */ + char *m_ext_; + } M_dat; +}; + +#define m_next m_hdr.mh_next +#define m_prev m_hdr.mh_prev +#define m_nextpkt m_hdr.mh_nextpkt +#define m_prevpkt m_hdr.mh_prevpkt +#define m_flags m_hdr.mh_flags +#define m_len m_hdr.mh_len +#define m_data m_hdr.mh_data +#define m_size m_hdr.mh_size +#define m_dat M_dat.m_dat_ +#define m_ext M_dat.m_ext_ +#define m_so m_hdr.mh_so + +#define ifq_prev m_prev +#define ifq_next m_next +#define ifs_prev m_prevpkt +#define ifs_next m_nextpkt +#define ifq_so m_so + +#define M_EXT 0x01 /* m_ext points to more (malloced) data */ +#define M_FREELIST 0x02 /* mbuf is on free list */ +#define M_USEDLIST 0x04 /* XXX mbuf is on used list (for dtom()) */ +#define M_DOFREE 0x08 /* when m_free is called on the mbuf, free() + * it rather than putting it on the free list */ + +/* + * Mbuf statistics. XXX + */ + +struct mbstat { + int mbs_alloced; /* Number of mbufs allocated */ + +}; + +extern struct mbstat mbstat; +extern int mbuf_alloced; +extern struct mbuf m_freelist, m_usedlist; +extern int mbuf_max; + +void m_init _P((void)); +void msize_init _P((void)); +struct mbuf * m_get _P((void)); +void m_free _P((struct mbuf *)); +void m_cat _P((register struct mbuf *, register struct mbuf *)); +void m_inc _P((struct mbuf *, int)); +void m_adj _P((struct mbuf *, int)); +int m_copy _P((struct mbuf *, struct mbuf *, int, int)); +struct mbuf * dtom _P((void *)); + +#endif diff --git a/SheepShaver/src/slirp/misc.c b/SheepShaver/src/slirp/misc.c new file mode 100755 index 000000000..9438af382 --- /dev/null +++ b/SheepShaver/src/slirp/misc.c @@ -0,0 +1,913 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#define WANT_SYS_IOCTL_H +#include +#include + +u_int curtime, time_fasttimo, last_slowtimo, detach_time; +u_int detach_wait = 600000; /* 10 minutes */ + +#if 0 +int x_port = -1; +int x_display = 0; +int x_screen = 0; + +int +show_x(buff, inso) + char *buff; + struct socket *inso; +{ + if (x_port < 0) { + lprint("X Redir: X not being redirected.\r\n"); + } else { + lprint("X Redir: In sh/bash/zsh/etc. type: DISPLAY=%s:%d.%d; export DISPLAY\r\n", + inet_ntoa(our_addr), x_port, x_screen); + lprint("X Redir: In csh/tcsh/etc. type: setenv DISPLAY %s:%d.%d\r\n", + inet_ntoa(our_addr), x_port, x_screen); + if (x_display) + lprint("X Redir: Redirecting to display %d\r\n", x_display); + } + + return CFG_OK; +} + + +/* + * XXX Allow more than one X redirection? + */ +void +redir_x(inaddr, start_port, display, screen) + u_int32_t inaddr; + int start_port; + int display; + int screen; +{ + int i; + + if (x_port >= 0) { + lprint("X Redir: X already being redirected.\r\n"); + show_x(0, 0); + } else { + for (i = 6001 + (start_port-1); i <= 6100; i++) { + if (solisten(htons(i), inaddr, htons(6000 + display), 0)) { + /* Success */ + x_port = i - 6000; + x_display = display; + x_screen = screen; + show_x(0, 0); + return; + } + } + lprint("X Redir: Error: Couldn't redirect a port for X. Weird.\r\n"); + } +} +#endif + +#ifndef HAVE_INET_ATON +int +inet_aton(cp, ia) + const char *cp; + struct in_addr *ia; +{ + u_int32_t addr = inet_addr(cp); + if (addr == 0xffffffff) + return 0; + ia->s_addr = addr; + return 1; +} +#endif + +/* + * Get our IP address and put it in our_addr + */ +void +getouraddr() +{ + char buff[256]; + struct hostent *he = NULL; + + if (gethostname(buff,256) == 0) + he = gethostbyname(buff); + if (he) + our_addr = *(struct in_addr *)he->h_addr; + if (our_addr.s_addr == 0) + our_addr.s_addr = loopback_addr.s_addr; +} + +struct quehead { + struct quehead *qh_link; + struct quehead *qh_rlink; +}; + +void +insque(a, b) + void *a, *b; +{ + register struct quehead *element = (struct quehead *) a; + register struct quehead *head = (struct quehead *) b; + element->qh_link = head->qh_link; + head->qh_link = (struct quehead *)element; + element->qh_rlink = (struct quehead *)head; + ((struct quehead *)(element->qh_link))->qh_rlink + = (struct quehead *)element; +} + +void +remque(a) + void *a; +{ + register struct quehead *element = (struct quehead *) a; + ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; + ((struct quehead *)(element->qh_rlink))->qh_link = element->qh_link; + element->qh_rlink = NULL; + /* element->qh_link = NULL; TCP FIN1 crashes if you do this. Why ? */ +} + +/* #endif */ + + +int +add_exec(ex_ptr, do_pty, exec, addr, port) + struct ex_list **ex_ptr; + int do_pty; + char *exec; + int addr; + int port; +{ + struct ex_list *tmp_ptr; + + /* First, check if the port is "bound" */ + for (tmp_ptr = *ex_ptr; tmp_ptr; tmp_ptr = tmp_ptr->ex_next) { + if (port == tmp_ptr->ex_fport && addr == tmp_ptr->ex_addr) + return -1; + } + + tmp_ptr = *ex_ptr; + *ex_ptr = (struct ex_list *)malloc(sizeof(struct ex_list)); + (*ex_ptr)->ex_fport = port; + (*ex_ptr)->ex_addr = addr; + (*ex_ptr)->ex_pty = do_pty; + (*ex_ptr)->ex_exec = strdup(exec); + (*ex_ptr)->ex_next = tmp_ptr; + return 0; +} + +#ifndef HAVE_STRERROR + +/* + * For systems with no strerror + */ + +extern int sys_nerr; +extern char *sys_errlist[]; + +char * +strerror(error) + int error; +{ + if (error < sys_nerr) + return sys_errlist[error]; + else + return "Unknown error."; +} + +#endif + + +#ifdef _WIN32 + +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; +{ + /* not implemented */ + return 0; +} + +#else + +int +slirp_openpty(amaster, aslave) + int *amaster, *aslave; +{ + register int master, slave; + +#ifdef HAVE_GRANTPT + char *ptr; + + if ((master = open("/dev/ptmx", O_RDWR)) < 0 || + grantpt(master) < 0 || + unlockpt(master) < 0 || + (ptr = ptsname(master)) == NULL) { + close(master); + return -1; + } + + if ((slave = open(ptr, O_RDWR)) < 0 || + ioctl(slave, I_PUSH, "ptem") < 0 || + ioctl(slave, I_PUSH, "ldterm") < 0 || + ioctl(slave, I_PUSH, "ttcompat") < 0) { + close(master); + close(slave); + return -1; + } + + *amaster = master; + *aslave = slave; + return 0; + +#else + + static char line[] = "/dev/ptyXX"; + register const char *cp1, *cp2; + + for (cp1 = "pqrsPQRS"; *cp1; cp1++) { + line[8] = *cp1; + for (cp2 = "0123456789abcdefghijklmnopqrstuv"; *cp2; cp2++) { + line[9] = *cp2; + if ((master = open(line, O_RDWR, 0)) == -1) { + if (errno == ENOENT) + return (-1); /* out of ptys */ + } else { + line[5] = 't'; + /* These will fail */ + (void) chown(line, getuid(), 0); + (void) chmod(line, S_IRUSR|S_IWUSR|S_IWGRP); +#ifdef HAVE_REVOKE + (void) revoke(line); +#endif + if ((slave = open(line, O_RDWR, 0)) != -1) { + *amaster = master; + *aslave = slave; + return 0; + } + (void) close(master); + line[5] = 'p'; + } + } + } + errno = ENOENT; /* out of ptys */ + return (-1); +#endif +} + +/* + * XXX This is ugly + * We create and bind a socket, then fork off to another + * process, which connects to this socket, after which we + * exec the wanted program. If something (strange) happens, + * the accept() call could block us forever. + * + * do_pty = 0 Fork/exec inetd style + * do_pty = 1 Fork/exec using slirp.telnetd + * do_ptr = 2 Fork/exec using pty + */ +int +fork_exec(so, ex, do_pty) + struct socket *so; + char *ex; + int do_pty; +{ + int s; + struct sockaddr_in addr; + socklen_t addrlen = sizeof(addr); + int opt; + int master; + char *argv[256]; +#if 0 + char buff[256]; +#endif + /* don't want to clobber the original */ + char *bptr; + char *curarg; + int c, i, ret; + + DEBUG_CALL("fork_exec"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("ex = %lx", (long)ex); + DEBUG_ARG("do_pty = %lx", (long)do_pty); + + if (do_pty == 2) { + if (slirp_openpty(&master, &s) == -1) { + lprint("Error: openpty failed: %s\n", strerror(errno)); + return 0; + } + } else { + memset(&addr, 0, sizeof(struct sockaddr_in)); + addr.sin_family = AF_INET; + addr.sin_port = 0; + addr.sin_addr.s_addr = INADDR_ANY; + + if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0 || + bind(s, (struct sockaddr *)&addr, addrlen) < 0 || + listen(s, 1) < 0) { + lprint("Error: inet socket: %s\n", strerror(errno)); + closesocket(s); + + return 0; + } + } + + switch(fork()) { + case -1: + lprint("Error: fork failed: %s\n", strerror(errno)); + close(s); + if (do_pty == 2) + close(master); + return 0; + + case 0: + /* Set the DISPLAY */ + if (do_pty == 2) { + (void) close(master); +#ifdef TIOCSCTTY /* XXXXX */ + (void) setsid(); + ioctl(s, TIOCSCTTY, (char *)NULL); +#endif + } else { + getsockname(s, (struct sockaddr *)&addr, &addrlen); + close(s); + /* + * Connect to the socket + * XXX If any of these fail, we're in trouble! + */ + s = socket(AF_INET, SOCK_STREAM, 0); + addr.sin_addr = loopback_addr; + do { + ret = connect(s, (struct sockaddr *)&addr, addrlen); + } while (ret < 0 && errno == EINTR); + } + +#if 0 + if (x_port >= 0) { +#ifdef HAVE_SETENV + sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); + setenv("DISPLAY", buff, 1); +#else + sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); + putenv(buff); +#endif + } +#endif + dup2(s, 0); + dup2(s, 1); + dup2(s, 2); + for (s = 3; s <= 255; s++) + close(s); + + i = 0; + bptr = strdup(ex); /* No need to free() this */ + if (do_pty == 1) { + /* Setup "slirp.telnetd -x" */ + argv[i++] = "slirp.telnetd"; + argv[i++] = "-x"; + argv[i++] = bptr; + } else + do { + /* Change the string into argv[] */ + curarg = bptr; + while (*bptr != ' ' && *bptr != (char)0) + bptr++; + c = *bptr; + *bptr++ = (char)0; + argv[i++] = strdup(curarg); + } while (c); + + argv[i] = 0; + execvp(argv[0], argv); + + /* Ooops, failed, let's tell the user why */ + { + char buff[256]; + + sprintf(buff, "Error: execvp of %s failed: %s\n", + argv[0], strerror(errno)); + write(2, buff, strlen(buff)+1); + } + close(0); close(1); close(2); /* XXX */ + exit(1); + + default: + if (do_pty == 2) { + close(s); + so->s = master; + } else { + /* + * XXX this could block us... + * XXX Should set a timer here, and if accept() doesn't + * return after X seconds, declare it a failure + * The only reason this will block forever is if socket() + * of connect() fail in the child process + */ + do { + so->s = accept(s, (struct sockaddr *)&addr, &addrlen); + } while (so->s < 0 && errno == EINTR); + closesocket(s); + opt = 1; + setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); + opt = 1; + setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); + } + fd_nonblock(so->s); + + /* Append the telnet options now */ + if (so->so_m != 0 && do_pty == 1) { + sbappend(so, so->so_m); + so->so_m = 0; + } + + return 1; + } +} +#endif + +#ifndef HAVE_STRDUP +char * +strdup(str) + const char *str; +{ + char *bptr; + + bptr = (char *)malloc(strlen(str)+1); + strcpy(bptr, str); + + return bptr; +} +#endif + +#if 0 +void +snooze_hup(num) + int num; +{ + int s, ret; +#ifndef NO_UNIX_SOCKETS + struct sockaddr_un sock_un; +#endif + struct sockaddr_in sock_in; + char buff[256]; + + ret = -1; + if (slirp_socket_passwd) { + s = socket(AF_INET, SOCK_STREAM, 0); + if (s < 0) + slirp_exit(1); + sock_in.sin_family = AF_INET; + sock_in.sin_addr.s_addr = slirp_socket_addr; + sock_in.sin_port = htons(slirp_socket_port); + if (connect(s, (struct sockaddr *)&sock_in, sizeof(sock_in)) != 0) + slirp_exit(1); /* just exit...*/ + sprintf(buff, "kill %s:%d", slirp_socket_passwd, slirp_socket_unit); + write(s, buff, strlen(buff)+1); + } +#ifndef NO_UNIX_SOCKETS + else { + s = socket(AF_UNIX, SOCK_STREAM, 0); + if (s < 0) + slirp_exit(1); + sock_un.sun_family = AF_UNIX; + strcpy(sock_un.sun_path, socket_path); + if (connect(s, (struct sockaddr *)&sock_un, + sizeof(sock_un.sun_family) + sizeof(sock_un.sun_path)) != 0) + slirp_exit(1); + sprintf(buff, "kill none:%d", slirp_socket_unit); + write(s, buff, strlen(buff)+1); + } +#endif + slirp_exit(0); +} + + +void +snooze() +{ + sigset_t s; + int i; + + /* Don't need our data anymore */ + /* XXX This makes SunOS barf */ +/* brk(0); */ + + /* Close all fd's */ + for (i = 255; i >= 0; i--) + close(i); + + signal(SIGQUIT, slirp_exit); + signal(SIGHUP, snooze_hup); + sigemptyset(&s); + + /* Wait for any signal */ + sigsuspend(&s); + + /* Just in case ... */ + exit(255); +} + +void +relay(s) + int s; +{ + char buf[8192]; + int n; + fd_set readfds; + struct ttys *ttyp; + + /* Don't need our data anymore */ + /* XXX This makes SunOS barf */ +/* brk(0); */ + + signal(SIGQUIT, slirp_exit); + signal(SIGHUP, slirp_exit); + signal(SIGINT, slirp_exit); + signal(SIGTERM, slirp_exit); + + /* Fudge to get term_raw and term_restore to work */ + if (NULL == (ttyp = tty_attach (0, slirp_tty))) { + lprint ("Error: tty_attach failed in misc.c:relay()\r\n"); + slirp_exit (1); + } + ttyp->fd = 0; + ttyp->flags |= TTY_CTTY; + term_raw(ttyp); + + while (1) { + FD_ZERO(&readfds); + + FD_SET(0, &readfds); + FD_SET(s, &readfds); + + n = select(s+1, &readfds, (fd_set *)0, (fd_set *)0, (struct timeval *)0); + + if (n <= 0) + slirp_exit(0); + + if (FD_ISSET(0, &readfds)) { + n = read(0, buf, 8192); + if (n <= 0) + slirp_exit(0); + n = writen(s, buf, n); + if (n <= 0) + slirp_exit(0); + } + + if (FD_ISSET(s, &readfds)) { + n = read(s, buf, 8192); + if (n <= 0) + slirp_exit(0); + n = writen(0, buf, n); + if (n <= 0) + slirp_exit(0); + } + } + + /* Just in case.... */ + exit(1); +} +#endif + +int (*lprint_print) _P((void *, const char *, va_list)); +char *lprint_ptr, *lprint_ptr2, **lprint_arg; + +void +#ifdef __STDC__ +lprint(const char *format, ...) +#else +lprint(va_alist) va_dcl +#endif +{ + va_list args; + +#ifdef __STDC__ + va_start(args, format); +#else + char *format; + va_start(args); + format = va_arg(args, char *); +#endif +#if 0 + /* If we're printing to an sbuf, make sure there's enough room */ + /* XXX +100? */ + if (lprint_sb) { + if ((lprint_ptr - lprint_sb->sb_wptr) >= + (lprint_sb->sb_datalen - (strlen(format) + 100))) { + int deltaw = lprint_sb->sb_wptr - lprint_sb->sb_data; + int deltar = lprint_sb->sb_rptr - lprint_sb->sb_data; + int deltap = lprint_ptr - lprint_sb->sb_data; + + lprint_sb->sb_data = (char *)realloc(lprint_sb->sb_data, + lprint_sb->sb_datalen + TCP_SNDSPACE); + + /* Adjust all values */ + lprint_sb->sb_wptr = lprint_sb->sb_data + deltaw; + lprint_sb->sb_rptr = lprint_sb->sb_data + deltar; + lprint_ptr = lprint_sb->sb_data + deltap; + + lprint_sb->sb_datalen += TCP_SNDSPACE; + } + } +#endif + if (lprint_print) + lprint_ptr += (*lprint_print)(*lprint_arg, format, args); + + /* Check if they want output to be logged to file as well */ + if (lfd) { + /* + * Remove \r's + * otherwise you'll get ^M all over the file + */ + int len = strlen(format); + char *bptr1, *bptr2; + + bptr1 = bptr2 = strdup(format); + + while (len--) { + if (*bptr1 == '\r') + memcpy(bptr1, bptr1+1, len+1); + else + bptr1++; + } + vfprintf(lfd, bptr2, args); + free(bptr2); + } + va_end(args); +} + +void +add_emu(buff) + char *buff; +{ + u_int lport, fport; + u_int8_t tos = 0, emu = 0; + char buff1[256], buff2[256], buff4[128]; + char *buff3 = buff4; + struct emu_t *emup; + struct socket *so; + + if (sscanf(buff, "%256s %256s", buff2, buff1) != 2) { + lprint("Error: Bad arguments\r\n"); + return; + } + + if (sscanf(buff1, "%d:%d", &lport, &fport) != 2) { + lport = 0; + if (sscanf(buff1, "%d", &fport) != 1) { + lprint("Error: Bad first argument\r\n"); + return; + } + } + + if (sscanf(buff2, "%128[^:]:%128s", buff1, buff3) != 2) { + buff3 = 0; + if (sscanf(buff2, "%256s", buff1) != 1) { + lprint("Error: Bad second argument\r\n"); + return; + } + } + + if (buff3) { + if (strcmp(buff3, "lowdelay") == 0) + tos = IPTOS_LOWDELAY; + else if (strcmp(buff3, "throughput") == 0) + tos = IPTOS_THROUGHPUT; + else { + lprint("Error: Expecting \"lowdelay\"/\"throughput\"\r\n"); + return; + } + } + + if (strcmp(buff1, "ftp") == 0) + emu = EMU_FTP; + else if (strcmp(buff1, "irc") == 0) + emu = EMU_IRC; + else if (strcmp(buff1, "none") == 0) + emu = EMU_NONE; /* ie: no emulation */ + else { + lprint("Error: Unknown service\r\n"); + return; + } + + /* First, check that it isn't already emulated */ + for (emup = tcpemu; emup; emup = emup->next) { + if (emup->lport == lport && emup->fport == fport) { + lprint("Error: port already emulated\r\n"); + return; + } + } + + /* link it */ + emup = (struct emu_t *)malloc(sizeof (struct emu_t)); + emup->lport = (u_int16_t)lport; + emup->fport = (u_int16_t)fport; + emup->tos = tos; + emup->emu = emu; + emup->next = tcpemu; + tcpemu = emup; + + /* And finally, mark all current sessions, if any, as being emulated */ + for (so = tcb.so_next; so != &tcb; so = so->so_next) { + if ((lport && lport == ntohs(so->so_lport)) || + (fport && fport == ntohs(so->so_fport))) { + if (emu) + so->so_emu = emu; + if (tos) + so->so_iptos = tos; + } + } + + lprint("Adding emulation for %s to port %d/%d\r\n", buff1, emup->lport, emup->fport); +} + +#ifdef BAD_SPRINTF + +#undef vsprintf +#undef sprintf + +/* + * Some BSD-derived systems have a sprintf which returns char * + */ + +int +vsprintf_len(string, format, args) + char *string; + const char *format; + va_list args; +{ + vsprintf(string, format, args); + return strlen(string); +} + +int +#ifdef __STDC__ +sprintf_len(char *string, const char *format, ...) +#else +sprintf_len(va_alist) va_dcl +#endif +{ + va_list args; +#ifdef __STDC__ + va_start(args, format); +#else + char *string; + char *format; + va_start(args); + string = va_arg(args, char *); + format = va_arg(args, char *); +#endif + vsprintf(string, format, args); + return strlen(string); +} + +#endif + +void +u_sleep(usec) + int usec; +{ + struct timeval t; + fd_set fdset; + + FD_ZERO(&fdset); + + t.tv_sec = 0; + t.tv_usec = usec * 1000; + + select(0, &fdset, &fdset, &fdset, &t); +} + +/* + * Set fd blocking and non-blocking + */ + +void +fd_nonblock(fd) + int fd; +{ +#if defined USE_FIONBIO && defined FIONBIO + ioctlsockopt_t opt = 1; + + ioctlsocket(fd, FIONBIO, &opt); +#else + int opt; + + opt = fcntl(fd, F_GETFL, 0); + opt |= O_NONBLOCK; + fcntl(fd, F_SETFL, opt); +#endif +} + +void +fd_block(fd) + int fd; +{ +#if defined USE_FIONBIO && defined FIONBIO + ioctlsockopt_t opt = 0; + + ioctlsocket(fd, FIONBIO, &opt); +#else + int opt; + + opt = fcntl(fd, F_GETFL, 0); + opt &= ~O_NONBLOCK; + fcntl(fd, F_SETFL, opt); +#endif +} + + +#if 0 +/* + * invoke RSH + */ +int +rsh_exec(so,ns, user, host, args) + struct socket *so; + struct socket *ns; + char *user; + char *host; + char *args; +{ + int fd[2]; + int fd0[2]; + int s; + char buff[256]; + + DEBUG_CALL("rsh_exec"); + DEBUG_ARG("so = %lx", (long)so); + + if (pipe(fd)<0) { + lprint("Error: pipe failed: %s\n", strerror(errno)); + return 0; + } +/* #ifdef HAVE_SOCKETPAIR */ +#if 1 + if (socketpair(PF_UNIX,SOCK_STREAM,0, fd0) == -1) { + close(fd[0]); + close(fd[1]); + lprint("Error: openpty failed: %s\n", strerror(errno)); + return 0; + } +#else + if (slirp_openpty(&fd0[0], &fd0[1]) == -1) { + close(fd[0]); + close(fd[1]); + lprint("Error: openpty failed: %s\n", strerror(errno)); + return 0; + } +#endif + + switch(fork()) { + case -1: + lprint("Error: fork failed: %s\n", strerror(errno)); + close(fd[0]); + close(fd[1]); + close(fd0[0]); + close(fd0[1]); + return 0; + + case 0: + close(fd[0]); + close(fd0[0]); + + /* Set the DISPLAY */ + if (x_port >= 0) { +#ifdef HAVE_SETENV + sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); + setenv("DISPLAY", buff, 1); +#else + sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); + putenv(buff); +#endif + } + + dup2(fd0[1], 0); + dup2(fd0[1], 1); + dup2(fd[1], 2); + for (s = 3; s <= 255; s++) + close(s); + + execlp("rsh","rsh","-l", user, host, args, NULL); + + /* Ooops, failed, let's tell the user why */ + + sprintf(buff, "Error: execlp of %s failed: %s\n", + "rsh", strerror(errno)); + write(2, buff, strlen(buff)+1); + close(0); close(1); close(2); /* XXX */ + exit(1); + + default: + close(fd[1]); + close(fd0[1]); + ns->s=fd[0]; + so->s=fd0[0]; + + return 1; + } +} +#endif diff --git a/SheepShaver/src/slirp/misc.h b/SheepShaver/src/slirp/misc.h new file mode 100755 index 000000000..efea9ff8b --- /dev/null +++ b/SheepShaver/src/slirp/misc.h @@ -0,0 +1,87 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#ifndef _MISC_H_ +#define _MISC_H_ + +struct ex_list { + int ex_pty; /* Do we want a pty? */ + int ex_addr; /* The last byte of the address */ + int ex_fport; /* Port to telnet to */ + char *ex_exec; /* Command line of what to exec */ + struct ex_list *ex_next; +}; + +extern struct ex_list *exec_list; +extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; + +extern int (*lprint_print) _P((void *, const char *, va_list)); +extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; +extern struct sbuf *lprint_sb; + +#ifndef HAVE_STRDUP +char *strdup _P((const char *)); +#endif + +void do_wait _P((int)); + +#define EMU_NONE 0x0 + +/* TCP emulations */ +#define EMU_CTL 0x1 +#define EMU_FTP 0x2 +#define EMU_KSH 0x3 +#define EMU_IRC 0x4 +#define EMU_REALAUDIO 0x5 +#define EMU_RLOGIN 0x6 +#define EMU_IDENT 0x7 +#define EMU_RSH 0x8 + +#define EMU_NOCONNECT 0x10 /* Don't connect */ + +/* UDP emulations */ +#define EMU_TALK 0x1 +#define EMU_NTALK 0x2 +#define EMU_CUSEEME 0x3 + +struct tos_t { + u_int16_t lport; + u_int16_t fport; + u_int8_t tos; + u_int8_t emu; +}; + +struct emu_t { + u_int16_t lport; + u_int16_t fport; + u_int8_t tos; + u_int8_t emu; + struct emu_t *next; +}; + +extern struct emu_t *tcpemu; + +extern int x_port, x_server, x_display; + +int show_x _P((char *, struct socket *)); +void redir_x _P((u_int32_t, int, int, int)); +void getouraddr _P((void)); +void slirp_insque _P((void *, void *)); +void slirp_remque _P((void *)); +int add_exec _P((struct ex_list **, int, char *, int, int)); +int slirp_openpty _P((int *, int *)); +int fork_exec _P((struct socket *, char *, int)); +void snooze_hup _P((int)); +void snooze _P((void)); +void relay _P((int)); +void add_emu _P((char *)); +void u_sleep _P((int)); +void fd_nonblock _P((int)); +void fd_block _P((int)); +int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); + +#endif diff --git a/SheepShaver/src/slirp/sbuf.c b/SheepShaver/src/slirp/sbuf.c new file mode 100755 index 000000000..0d8800920 --- /dev/null +++ b/SheepShaver/src/slirp/sbuf.c @@ -0,0 +1,202 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +// #include +#include + +/* Done as a macro in socket.h */ +/* int + * sbspace(struct sockbuff *sb) + * { + * return SB_DATALEN - sb->sb_cc; + * } + */ + +void +sbfree(sb) + struct sbuf *sb; +{ + free(sb->sb_data); +} + +void +sbdrop(sb, num) + struct sbuf *sb; + int num; +{ + /* + * We can only drop how much we have + * This should never succeed + */ + if(num > sb->sb_cc) + num = sb->sb_cc; + sb->sb_cc -= num; + sb->sb_rptr += num; + if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen) + sb->sb_rptr -= sb->sb_datalen; + +} + +void +sbreserve(sb, size) + struct sbuf *sb; + int size; +{ + if (sb->sb_data) { + /* Already alloced, realloc if necessary */ + if (sb->sb_datalen != size) { + sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)realloc(sb->sb_data, size); + sb->sb_cc = 0; + if (sb->sb_wptr) + sb->sb_datalen = size; + else + sb->sb_datalen = 0; + } + } else { + sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)malloc(size); + sb->sb_cc = 0; + if (sb->sb_wptr) + sb->sb_datalen = size; + else + sb->sb_datalen = 0; + } +} + +/* + * Try and write() to the socket, whatever doesn't get written + * append to the buffer... for a host with a fast net connection, + * this prevents an unnecessary copy of the data + * (the socket is non-blocking, so we won't hang) + */ +void +sbappend(so, m) + struct socket *so; + struct mbuf *m; +{ + int ret = 0; + + DEBUG_CALL("sbappend"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("m = %lx", (long)m); + DEBUG_ARG("m->m_len = %d", m->m_len); + + /* Shouldn't happen, but... e.g. foreign host closes connection */ + if (m->m_len <= 0) { + m_free(m); + return; + } + + /* + * If there is urgent data, call sosendoob + * if not all was sent, sowrite will take care of the rest + * (The rest of this function is just an optimisation) + */ + if (so->so_urgc) { + sbappendsb(&so->so_rcv, m); + m_free(m); + sosendoob(so); + return; + } + + /* + * We only write if there's nothing in the buffer, + * ottherwise it'll arrive out of order, and hence corrupt + */ + if (!so->so_rcv.sb_cc) + ret = send(so->s, m->m_data, m->m_len, 0); + + if (ret <= 0) { + /* + * Nothing was written + * It's possible that the socket has closed, but + * we don't need to check because if it has closed, + * it will be detected in the normal way by soread() + */ + sbappendsb(&so->so_rcv, m); + } else if (ret != m->m_len) { + /* + * Something was written, but not everything.. + * sbappendsb the rest + */ + m->m_len -= ret; + m->m_data += ret; + sbappendsb(&so->so_rcv, m); + } /* else */ + /* Whatever happened, we free the mbuf */ + m_free(m); +} + +/* + * Copy the data from m into sb + * The caller is responsible to make sure there's enough room + */ +void +sbappendsb(sb, m) + struct sbuf *sb; + struct mbuf *m; +{ + int len, n, nn; + + len = m->m_len; + + if (sb->sb_wptr < sb->sb_rptr) { + n = sb->sb_rptr - sb->sb_wptr; + if (n > len) n = len; + memcpy(sb->sb_wptr, m->m_data, n); + } else { + /* Do the right edge first */ + n = sb->sb_data + sb->sb_datalen - sb->sb_wptr; + if (n > len) n = len; + memcpy(sb->sb_wptr, m->m_data, n); + len -= n; + if (len) { + /* Now the left edge */ + nn = sb->sb_rptr - sb->sb_data; + if (nn > len) nn = len; + memcpy(sb->sb_data,m->m_data+n,nn); + n += nn; + } + } + + sb->sb_cc += n; + sb->sb_wptr += n; + if (sb->sb_wptr >= sb->sb_data + sb->sb_datalen) + sb->sb_wptr -= sb->sb_datalen; +} + +/* + * Copy data from sbuf to a normal, straight buffer + * Don't update the sbuf rptr, this will be + * done in sbdrop when the data is acked + */ +void +sbcopy(sb, off, len, to) + struct sbuf *sb; + int off; + int len; + char *to; +{ + char *from; + + from = sb->sb_rptr + off; + if (from >= sb->sb_data + sb->sb_datalen) + from -= sb->sb_datalen; + + if (from < sb->sb_wptr) { + if (len > sb->sb_cc) len = sb->sb_cc; + memcpy(to,from,len); + } else { + /* re-use off */ + off = (sb->sb_data + sb->sb_datalen) - from; + if (off > len) off = len; + memcpy(to,from,off); + len -= off; + if (len) + memcpy(to+off,sb->sb_data,len); + } +} + diff --git a/SheepShaver/src/slirp/sbuf.h b/SheepShaver/src/slirp/sbuf.h new file mode 100755 index 000000000..161e0bb76 --- /dev/null +++ b/SheepShaver/src/slirp/sbuf.h @@ -0,0 +1,31 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#ifndef _SBUF_H_ +#define _SBUF_H_ + +#define sbflush(sb) sbdrop((sb),(sb)->sb_cc) +#define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) + +struct sbuf { + u_int sb_cc; /* actual chars in buffer */ + u_int sb_datalen; /* Length of data */ + char *sb_wptr; /* write pointer. points to where the next + * bytes should be written in the sbuf */ + char *sb_rptr; /* read pointer. points to where the next + * byte should be read from the sbuf */ + char *sb_data; /* Actual data */ +}; + +void sbfree _P((struct sbuf *)); +void sbdrop _P((struct sbuf *, int)); +void sbreserve _P((struct sbuf *, int)); +void sbappend _P((struct socket *, struct mbuf *)); +void sbappendsb _P((struct sbuf *, struct mbuf *)); +void sbcopy _P((struct sbuf *, int, int, char *)); + +#endif diff --git a/SheepShaver/src/slirp/slirp.c b/SheepShaver/src/slirp/slirp.c new file mode 100755 index 000000000..44f777d08 --- /dev/null +++ b/SheepShaver/src/slirp/slirp.c @@ -0,0 +1,670 @@ +#include "slirp.h" + +/* host address */ +struct in_addr our_addr; +/* host dns address */ +struct in_addr dns_addr; +/* host loopback address */ +struct in_addr loopback_addr; + +/* address for slirp virtual addresses */ +struct in_addr special_addr; +/* virtual address alias for host */ +struct in_addr alias_addr; + +const uint8_t special_ethaddr[6] = { + 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 +}; + +uint8_t client_ethaddr[6]; + +int do_slowtimo; +int link_up; +struct timeval tt; +FILE *lfd; +struct ex_list *exec_list; + +/* XXX: suppress those select globals */ +fd_set *global_readfds, *global_writefds, *global_xfds; + +char slirp_hostname[33]; + +#ifdef _WIN32 + +static int get_dns_addr(struct in_addr *pdns_addr) +{ + FIXED_INFO *FixedInfo=NULL; + ULONG BufLen; + DWORD ret; + IP_ADDR_STRING *pIPAddr; + struct in_addr tmp_addr; + + FixedInfo = (FIXED_INFO *)GlobalAlloc(GPTR, sizeof(FIXED_INFO)); + BufLen = sizeof(FIXED_INFO); + + if (ERROR_BUFFER_OVERFLOW == GetNetworkParams(FixedInfo, &BufLen)) { + if (FixedInfo) { + GlobalFree(FixedInfo); + FixedInfo = NULL; + } + FixedInfo = GlobalAlloc(GPTR, BufLen); + } + + if ((ret = GetNetworkParams(FixedInfo, &BufLen)) != ERROR_SUCCESS) { + printf("GetNetworkParams failed. ret = %08x\n", (u_int)ret ); + if (FixedInfo) { + GlobalFree(FixedInfo); + FixedInfo = NULL; + } + return -1; + } + + pIPAddr = &(FixedInfo->DnsServerList); + inet_aton(pIPAddr->IpAddress.String, &tmp_addr); + *pdns_addr = tmp_addr; +#if 0 + printf( "DNS Servers:\n" ); + printf( "DNS Addr:%s\n", pIPAddr->IpAddress.String ); + + pIPAddr = FixedInfo -> DnsServerList.Next; + while ( pIPAddr ) { + printf( "DNS Addr:%s\n", pIPAddr ->IpAddress.String ); + pIPAddr = pIPAddr ->Next; + } +#endif + if (FixedInfo) { + GlobalFree(FixedInfo); + FixedInfo = NULL; + } + return 0; +} + +#else + +static int get_dns_addr(struct in_addr *pdns_addr) +{ + char buff[512]; + char buff2[256]; + FILE *f; + int found = 0; + struct in_addr tmp_addr; + + f = fopen("/etc/resolv.conf", "r"); + if (!f) + return -1; + + lprint("IP address of your DNS(s): "); + while (fgets(buff, 512, f) != NULL) { + if (sscanf(buff, "nameserver%*[ \t]%256s", buff2) == 1) { + if (!inet_aton(buff2, &tmp_addr)) + continue; + if (tmp_addr.s_addr == loopback_addr.s_addr) + tmp_addr = our_addr; + /* If it's the first one, set it to dns_addr */ + if (!found) + *pdns_addr = tmp_addr; + else + lprint(", "); + if (++found > 3) { + lprint("(more)"); + break; + } else + lprint("%s", inet_ntoa(tmp_addr)); + } + } + fclose(f); + if (!found) + return -1; + return 0; +} + +#endif + +#ifdef _WIN32 +void slirp_cleanup(void) +{ + WSACleanup(); +} +#endif + +int slirp_init(void) +{ + // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); + +#ifdef _WIN32 + { + WSADATA Data; + WSAStartup(MAKEWORD(2,0), &Data); + atexit(slirp_cleanup); + } +#endif + + link_up = 1; + + if_init(); + ip_init(); + + /* Initialise mbufs *after* setting the MTU */ + m_init(); + + /* set default addresses */ + inet_aton("127.0.0.1", &loopback_addr); + + if (get_dns_addr(&dns_addr) < 0) + return -1; + + inet_aton(CTL_SPECIAL, &special_addr); + alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); + getouraddr(); + return 0; +} + +#define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) +#define CONN_CANFRCV(so) (((so)->so_state & (SS_FCANTRCVMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) +#define UPD_NFDS(x) if (nfds < (x)) nfds = (x) + +/* + * curtime kept to an accuracy of 1ms + */ +#ifdef _WIN32 +static void updtime(void) +{ + struct _timeb tb; + + _ftime(&tb); + curtime = (u_int)tb.time * (u_int)1000; + curtime += (u_int)tb.millitm; +} +#else +static void updtime(void) +{ + gettimeofday(&tt, 0); + + curtime = (u_int)tt.tv_sec * (u_int)1000; + curtime += (u_int)tt.tv_usec / (u_int)1000; + + if ((tt.tv_usec % 1000) >= 500) + curtime++; +} +#endif + +int slirp_select_fill(int *pnfds, + fd_set *readfds, fd_set *writefds, fd_set *xfds) +{ + struct socket *so, *so_next; + int nfds; + int timeout, tmp_time; + + /* fail safe */ + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; + + nfds = *pnfds; + /* + * First, TCP sockets + */ + do_slowtimo = 0; + if (link_up) { + /* + * *_slowtimo needs calling if there are IP fragments + * in the fragment queue, or there are TCP connections active + */ + do_slowtimo = ((tcb.so_next != &tcb) || + (&ipq.ip_link != ipq.ip_link.next)); + + for (so = tcb.so_next; so != &tcb; so = so_next) { + so_next = so->so_next; + + /* + * See if we need a tcp_fasttimo + */ + if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) + time_fasttimo = curtime; /* Flag when we want a fasttimo */ + + /* + * NOFDREF can include still connecting to local-host, + * newly socreated() sockets etc. Don't want to select these. + */ + if (so->so_state & SS_NOFDREF || so->s == -1) + continue; + + /* + * Set for reading sockets which are accepting + */ + if (so->so_state & SS_FACCEPTCONN) { + FD_SET(so->s, readfds); + UPD_NFDS(so->s); + continue; + } + + /* + * Set for writing sockets which are connecting + */ + if (so->so_state & SS_ISFCONNECTING) { + FD_SET(so->s, writefds); + UPD_NFDS(so->s); + continue; + } + + /* + * Set for writing if we are connected, can send more, and + * we have something to send + */ + if (CONN_CANFSEND(so) && so->so_rcv.sb_cc) { + FD_SET(so->s, writefds); + UPD_NFDS(so->s); + } + + /* + * Set for reading (and urgent data) if we are connected, can + * receive more, and we have room for it XXX /2 ? + */ + if (CONN_CANFRCV(so) && (so->so_snd.sb_cc < (so->so_snd.sb_datalen/2))) { + FD_SET(so->s, readfds); + FD_SET(so->s, xfds); + UPD_NFDS(so->s); + } + } + + /* + * UDP sockets + */ + for (so = udb.so_next; so != &udb; so = so_next) { + so_next = so->so_next; + + /* + * See if it's timed out + */ + if (so->so_expire) { + if (so->so_expire <= curtime) { + udp_detach(so); + continue; + } else + do_slowtimo = 1; /* Let socket expire */ + } + + /* + * When UDP packets are received from over the + * link, they're sendto()'d straight away, so + * no need for setting for writing + * Limit the number of packets queued by this session + * to 4. Note that even though we try and limit this + * to 4 packets, the session could have more queued + * if the packets needed to be fragmented + * (XXX <= 4 ?) + */ + if ((so->so_state & SS_ISFCONNECTED) && so->so_queued <= 4) { + FD_SET(so->s, readfds); + UPD_NFDS(so->s); + } + } + } + + /* + * Setup timeout to use minimum CPU usage, especially when idle + */ + + timeout = -1; + + /* + * If a slowtimo is needed, set timeout to 5ms from the last + * slow timeout. If a fast timeout is needed, set timeout within + * 2ms of when it was requested. + */ +# define SLOW_TIMO 5 +# define FAST_TIMO 2 + if (do_slowtimo) { + timeout = (SLOW_TIMO - (curtime - last_slowtimo)) * 1000; + if (timeout < 0) + timeout = 0; + else if (timeout > (SLOW_TIMO * 1000)) + timeout = SLOW_TIMO * 1000; + + /* Can only fasttimo if we also slowtimo */ + if (time_fasttimo) { + tmp_time = (FAST_TIMO - (curtime - time_fasttimo)) * 1000; + if (tmp_time < 0) + tmp_time = 0; + + /* Choose the smallest of the 2 */ + if (tmp_time < timeout) + timeout = tmp_time; + } + } + *pnfds = nfds; + + /* + * Adjust the timeout to make the minimum timeout + * 2ms (XXX?) to lessen the CPU load + */ + if (timeout < (FAST_TIMO * 1000)) + timeout = FAST_TIMO * 1000; + + return timeout; +} + +void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) +{ + struct socket *so, *so_next; + int ret; + + global_readfds = readfds; + global_writefds = writefds; + global_xfds = xfds; + + /* Update time */ + updtime(); + + /* + * See if anything has timed out + */ + if (link_up) { + if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { + tcp_fasttimo(); + time_fasttimo = 0; + } + if (do_slowtimo && ((curtime - last_slowtimo) >= SLOW_TIMO)) { + ip_slowtimo(); + tcp_slowtimo(); + last_slowtimo = curtime; + } + } + + /* + * Check sockets + */ + if (link_up) { + /* + * Check TCP sockets + */ + for (so = tcb.so_next; so != &tcb; so = so_next) { + so_next = so->so_next; + + /* + * FD_ISSET is meaningless on these sockets + * (and they can crash the program) + */ + if (so->so_state & SS_NOFDREF || so->s == -1) + continue; + + /* + * Check for URG data + * This will soread as well, so no need to + * test for readfds below if this succeeds + */ + if (FD_ISSET(so->s, xfds)) + sorecvoob(so); + /* + * Check sockets for reading + */ + else if (FD_ISSET(so->s, readfds)) { + /* + * Check for incoming connections + */ + if (so->so_state & SS_FACCEPTCONN) { + tcp_connect(so); + continue; + } /* else */ + ret = soread(so); + + /* Output it if we read something */ + if (ret > 0) + tcp_output(sototcpcb(so)); + } + + /* + * Check sockets for writing + */ + if (FD_ISSET(so->s, writefds)) { + /* + * Check for non-blocking, still-connecting sockets + */ + if (so->so_state & SS_ISFCONNECTING) { + /* Connected */ + so->so_state &= ~SS_ISFCONNECTING; + + ret = send(so->s, &ret, 0, 0); + if (ret < 0) { + /* XXXXX Must fix, zero bytes is a NOP */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + + /* else failed */ + so->so_state = SS_NOFDREF; + } + /* else so->so_state &= ~SS_ISFCONNECTING; */ + + /* + * Continue tcp_input + */ + tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); + /* continue; */ + } else + ret = sowrite(so); + /* + * XXXXX If we wrote something (a lot), there + * could be a need for a window update. + * In the worst case, the remote will send + * a window probe to get things going again + */ + } + + /* + * Probe a still-connecting, non-blocking socket + * to check if it's still alive + */ +#ifdef PROBE_CONN + if (so->so_state & SS_ISFCONNECTING) { + ret = recv(so->s, (char *)&ret, 0,0); + + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; /* Still connecting, continue */ + + /* else failed */ + so->so_state = SS_NOFDREF; + + /* tcp_input will take care of it */ + } else { + ret = send(so->s, &ret, 0,0); + if (ret < 0) { + /* XXX */ + if (errno == EAGAIN || errno == EWOULDBLOCK || + errno == EINPROGRESS || errno == ENOTCONN) + continue; + /* else failed */ + so->so_state = SS_NOFDREF; + } else + so->so_state &= ~SS_ISFCONNECTING; + + } + tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); + } /* SS_ISFCONNECTING */ +#endif + } + + /* + * Now UDP sockets. + * Incoming packets are sent straight away, they're not buffered. + * Incoming UDP data isn't buffered either. + */ + for (so = udb.so_next; so != &udb; so = so_next) { + so_next = so->so_next; + + if (so->s != -1 && FD_ISSET(so->s, readfds)) { + sorecvfrom(so); + } + } + } + + /* + * See if we can start outputting + */ + if (if_queued && link_up) + if_start(); + + /* clear global file descriptor sets. + * these reside on the stack in vl.c + * so they're unusable if we're not in + * slirp_select_fill or slirp_select_poll. + */ + global_readfds = NULL; + global_writefds = NULL; + global_xfds = NULL; +} + +#define ETH_ALEN 6 +#define ETH_HLEN 14 + +#define ETH_P_IP 0x0800 /* Internet Protocol packet */ +#define ETH_P_ARP 0x0806 /* Address Resolution packet */ + +#define ARPOP_REQUEST 1 /* ARP request */ +#define ARPOP_REPLY 2 /* ARP reply */ + +struct ethhdr +{ + unsigned char h_dest[ETH_ALEN]; /* destination eth addr */ + unsigned char h_source[ETH_ALEN]; /* source ether addr */ + unsigned short h_proto; /* packet type ID field */ +}; + +struct arphdr +{ + unsigned short ar_hrd; /* format of hardware address */ + unsigned short ar_pro; /* format of protocol address */ + unsigned char ar_hln; /* length of hardware address */ + unsigned char ar_pln; /* length of protocol address */ + unsigned short ar_op; /* ARP opcode (command) */ + + /* + * Ethernet looks like this : This bit is variable sized however... + */ + unsigned char ar_sha[ETH_ALEN]; /* sender hardware address */ + unsigned char ar_sip[4]; /* sender IP address */ + unsigned char ar_tha[ETH_ALEN]; /* target hardware address */ + unsigned char ar_tip[4]; /* target IP address */ +}; + +void arp_input(const uint8_t *pkt, int pkt_len) +{ + struct ethhdr *eh = (struct ethhdr *)pkt; + struct arphdr *ah = (struct arphdr *)(pkt + ETH_HLEN); + uint8_t arp_reply[ETH_HLEN + sizeof(struct arphdr)]; + struct ethhdr *reh = (struct ethhdr *)arp_reply; + struct arphdr *rah = (struct arphdr *)(arp_reply + ETH_HLEN); + int ar_op; + struct ex_list *ex_ptr; + + ar_op = ntohs(ah->ar_op); + switch(ar_op) { + case ARPOP_REQUEST: + if (!memcmp(ah->ar_tip, &special_addr, 3)) { + if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) + goto arp_ok; + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if (ex_ptr->ex_addr == ah->ar_tip[3]) + goto arp_ok; + } + return; + arp_ok: + /* XXX: make an ARP request to have the client address */ + memcpy(client_ethaddr, eh->h_source, ETH_ALEN); + + /* ARP request for alias/dns mac address */ + memcpy(reh->h_dest, pkt + ETH_ALEN, ETH_ALEN); + memcpy(reh->h_source, special_ethaddr, ETH_ALEN - 1); + reh->h_source[5] = ah->ar_tip[3]; + reh->h_proto = htons(ETH_P_ARP); + + rah->ar_hrd = htons(1); + rah->ar_pro = htons(ETH_P_IP); + rah->ar_hln = ETH_ALEN; + rah->ar_pln = 4; + rah->ar_op = htons(ARPOP_REPLY); + memcpy(rah->ar_sha, reh->h_source, ETH_ALEN); + memcpy(rah->ar_sip, ah->ar_tip, 4); + memcpy(rah->ar_tha, ah->ar_sha, ETH_ALEN); + memcpy(rah->ar_tip, ah->ar_sip, 4); + slirp_output(arp_reply, sizeof(arp_reply)); + } + break; + default: + break; + } +} + +void slirp_input(const uint8_t *pkt, int pkt_len) +{ + struct mbuf *m; + int proto; + + if (pkt_len < ETH_HLEN) + return; + + proto = (pkt[12] << 8) | pkt[13]; + switch(proto) { + case ETH_P_ARP: + arp_input(pkt, pkt_len); + break; + case ETH_P_IP: + m = m_get(); + if (!m) + return; + /* Note: we add to align the IP header */ + m->m_len = pkt_len + 2; + memcpy(m->m_data + 2, pkt, pkt_len); + + m->m_data += 2 + ETH_HLEN; + m->m_len -= 2 + ETH_HLEN; + + ip_input(m); + break; + default: + break; + } +} + +/* output the IP packet to the ethernet device */ +void if_encap(const uint8_t *ip_data, int ip_data_len) +{ + uint8_t buf[1600]; + struct ethhdr *eh = (struct ethhdr *)buf; + + if (ip_data_len + ETH_HLEN > sizeof(buf)) + return; + + memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); + memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); + /* XXX: not correct */ + eh->h_source[5] = CTL_ALIAS; + eh->h_proto = htons(ETH_P_IP); + memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); + slirp_output(buf, ip_data_len + ETH_HLEN); +} + +int slirp_redir(int is_udp, int host_port, + struct in_addr guest_addr, int guest_port) +{ + if (is_udp) { + if (!udp_listen(htons(host_port), guest_addr.s_addr, + htons(guest_port), 0)) + return -1; + } else { + if (!solisten(htons(host_port), guest_addr.s_addr, + htons(guest_port), 0)) + return -1; + } + return 0; +} + +int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, + int guest_port) +{ + return add_exec(&exec_list, do_pty, (char *)args, + addr_low_byte, htons(guest_port)); +} diff --git a/SheepShaver/src/slirp/slirp.h b/SheepShaver/src/slirp/slirp.h new file mode 100755 index 000000000..16266f6c1 --- /dev/null +++ b/SheepShaver/src/slirp/slirp.h @@ -0,0 +1,367 @@ +#ifndef __COMMON_H__ +#define __COMMON_H__ + +#define CONFIG_QEMU + +#define DEBUG 1 + +#ifndef CONFIG_QEMU +#include "version.h" +#endif +#include "config.h" +#include "slirp_config.h" + +#ifdef _WIN32 +# include + +typedef uint8_t u_int8_t; +typedef uint16_t u_int16_t; +typedef uint32_t u_int32_t; +typedef uint64_t u_int64_t; +typedef char *caddr_t; +typedef int socklen_t; +typedef unsigned long ioctlsockopt_t; + +# include +# include +# include +# include + +# define USE_FIONBIO 1 +# define EWOULDBLOCK WSAEWOULDBLOCK +# define EINPROGRESS WSAEINPROGRESS +# define ENOTCONN WSAENOTCONN +# define EHOSTUNREACH WSAEHOSTUNREACH +# define ENETUNREACH WSAENETUNREACH +# define ECONNREFUSED WSAECONNREFUSED + +/* Basilisk II Router defines those */ +# define udp_read_completion slirp_udp_read_completion +# define write_udp slirp_write_udp +# define init_udp slirp_init_udp +# define final_udp slirp_final_udp +#else +# define WSAGetLastError() (int)(errno) +# define WSASetLastError(e) (void)(errno = (e)) +# define WSAEWOULDBLOCK EWOULDBLOCK +# define WSAEINPROGRESS EINPROGRESS +# define WSAENOTCONN ENOTCONN +# define WSAEHOSTUNREACH EHOSTUNREACH +# define WSAENETUNREACH ENETUNREACH +# define WSAECONNREFUSED ECONNREFUSED +typedef int ioctlsockopt_t; +# define ioctlsocket ioctl +# define closesocket(s) close(s) +# define O_BINARY 0 +#endif + +#include +#ifdef HAVE_SYS_BITYPES_H +# include +#endif +#ifdef HAVE_STDINT_H +# include +#endif + +#ifndef _WIN32 +#include +#endif + +#ifdef NEED_TYPEDEFS +typedef char int8_t; +typedef unsigned char u_int8_t; + +# if SIZEOF_SHORT == 2 + typedef short int16_t; + typedef unsigned short u_int16_t; +# else +# if SIZEOF_INT == 2 + typedef int int16_t; + typedef unsigned int u_int16_t; +# else + #error Cannot find a type with sizeof() == 2 +# endif +# endif + +# if SIZEOF_SHORT == 4 + typedef short int32_t; + typedef unsigned short u_int32_t; +# else +# if SIZEOF_INT == 4 + typedef int int32_t; + typedef unsigned int u_int32_t; +# else + #error Cannot find a type with sizeof() == 4 +# endif +# endif +#endif /* NEED_TYPEDEFS */ + +/* Basilisk II types glue */ +typedef u_int8_t uint8; +typedef u_int16_t uint16; +typedef u_int32_t uint32; + +#ifdef HAVE_UNISTD_H +# include +#endif + +#ifdef HAVE_STDLIB_H +# include +#endif + +#include +#include + +#ifndef HAVE_MEMMOVE +#define memmove(x, y, z) bcopy(y, x, z) +#endif + +#if TIME_WITH_SYS_TIME +# include +# include +#else +# if HAVE_SYS_TIME_H +# include +# else +# include +# endif +#endif + +#ifdef HAVE_STRING_H +# include +#else +# include +#endif + +#ifndef _WIN32 +#include +#include +#include +#endif + +#ifndef _P +#ifndef NO_PROTOTYPES +# define _P(x) x +#else +# define _P(x) () +#endif +#endif + + +#ifdef GETTIMEOFDAY_ONE_ARG +#define gettimeofday(x, y) gettimeofday(x) +#endif + +/* Systems lacking strdup() definition in . */ +#if defined(ultrix) +char *strdup _P((const char *)); +#endif + +/* Systems lacking malloc() definition in . */ +#if defined(ultrix) || defined(hcx) +void *malloc _P((size_t arg)); +void free _P((void *ptr)); +#endif + +#ifndef HAVE_INET_ATON +int inet_aton _P((const char *cp, struct in_addr *ia)); +#endif + +#include +#ifndef NO_UNIX_SOCKETS +#include +#endif +#include +#ifdef HAVE_SYS_SIGNAL_H +# include +#endif +#ifndef _WIN32 +#include +#endif + +#if defined(HAVE_SYS_IOCTL_H) +# include +#endif + +#ifdef HAVE_SYS_SELECT_H +# include +#endif + +#ifdef HAVE_SYS_WAIT_H +# include +#endif + +#ifdef HAVE_SYS_FILIO_H +# include +#endif + +#ifdef USE_PPP +#include +#endif + +#ifdef __STDC__ +#include +#else +#include +#endif + +#include + +/* Avoid conflicting with the libc insque() and remque(), which + have different prototypes. */ +#define insque slirp_insque +#define remque slirp_remque + +#ifdef HAVE_SYS_STROPTS_H +#include +#endif + +#include "debug.h" + +#if defined __GNUC__ +#define PACKED__ __attribute__ ((packed)) +#elif defined __sgi +#define PRAGMA_PACK_SUPPORTED 1 +#define PACKED__ +#else +#error "Packed attribute or pragma shall be supported" +#endif + +#include "ip.h" +#include "tcp.h" +#include "tcp_timer.h" +#include "tcp_var.h" +#include "tcpip.h" +#include "udp.h" +#include "icmp_var.h" +#include "mbuf.h" +#include "sbuf.h" +#include "socket.h" +#include "if.h" +#include "main.h" +#include "misc.h" +#include "ctl.h" +#ifdef USE_PPP +#include "ppp/pppd.h" +#include "ppp/ppp.h" +#endif + +#include "bootp.h" +#include "tftp.h" +#include "libslirp.h" + +extern struct ttys *ttys_unit[MAX_INTERFACES]; + +#ifndef NULL +#define NULL (void *)0 +#endif + +#ifndef FULL_BOLT +void if_start _P((void)); +#else +void if_start _P((struct ttys *)); +#endif + +#ifdef BAD_SPRINTF +# define vsprintf vsprintf_len +# define sprintf sprintf_len + extern int vsprintf_len _P((char *, const char *, va_list)); + extern int sprintf_len _P((char *, const char *, ...)); +#endif + +#ifdef DECLARE_SPRINTF +# ifndef BAD_SPRINTF + extern int vsprintf _P((char *, const char *, va_list)); +# endif + extern int vfprintf _P((FILE *, const char *, va_list)); +#endif + +#ifndef HAVE_STRERROR + extern char *strerror _P((int error)); +#endif + +#ifndef HAVE_INDEX + char *index _P((const char *, int)); +#endif + +#ifndef HAVE_GETHOSTID + long gethostid _P((void)); +#endif + +void lprint _P((const char *, ...)); + +extern int do_echo; + +#ifndef _WIN32 +#include +#endif + +#define DEFAULT_BAUD 115200 + +/* cksum.c */ +int cksum(struct mbuf *m, int len); + +/* if.c */ +void if_init _P((void)); +void if_output _P((struct socket *, struct mbuf *)); + +/* ip_input.c */ +void ip_init _P((void)); +void ip_input _P((struct mbuf *)); +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *); +void ip_freef _P((struct ipq *)); +void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); +void ip_deq _P((register struct ipasfrag *)); +void ip_slowtimo _P((void)); +void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); + +/* ip_output.c */ +int ip_output _P((struct socket *, struct mbuf *)); + +/* tcp_input.c */ +int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); +void tcp_input _P((register struct mbuf *, int, struct socket *)); +void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); +void tcp_xmit_timer _P((register struct tcpcb *, int)); +int tcp_mss _P((register struct tcpcb *, u_int)); + +/* tcp_output.c */ +int tcp_output _P((register struct tcpcb *)); +void tcp_setpersist _P((register struct tcpcb *)); + +/* tcp_subr.c */ +void tcp_init _P((void)); +void tcp_template _P((struct tcpcb *)); +void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); +struct tcpcb * tcp_newtcpcb _P((struct socket *)); +struct tcpcb * tcp_close _P((register struct tcpcb *)); +void tcp_drain _P((void)); +void tcp_sockclosed _P((struct tcpcb *)); +int tcp_fconnect _P((struct socket *)); +void tcp_connect _P((struct socket *)); +int tcp_attach _P((struct socket *)); +u_int8_t tcp_tos _P((struct socket *)); +int tcp_emu _P((struct socket *, struct mbuf *)); +int tcp_ctl _P((struct socket *)); +struct tcpcb *tcp_drop(struct tcpcb *tp, int err); + +#ifdef USE_PPP +#define MIN_MRU MINMRU +#define MAX_MRU MAXMRU +#else +#define MIN_MRU 128 +#define MAX_MRU 16384 +#endif + +#ifndef _WIN32 +#define min(x,y) ((x) < (y) ? (x) : (y)) +#define max(x,y) ((x) > (y) ? (x) : (y)) +#endif + +#ifdef _WIN32 +#undef errno +#define errno (WSAGetLastError()) +#endif + +#endif diff --git a/SheepShaver/src/slirp/slirp_config.h b/SheepShaver/src/slirp/slirp_config.h new file mode 100755 index 000000000..e583dcc80 --- /dev/null +++ b/SheepShaver/src/slirp/slirp_config.h @@ -0,0 +1,135 @@ +/* + * User definable configuration options + */ + +/* Undefine if you don't want talk emulation */ +#undef EMULATE_TALK + +/* Define if you want the connection to be probed */ +/* XXX Not working yet, so ignore this for now */ +#undef PROBE_CONN + +/* Define to 1 if you want KEEPALIVE timers */ +#define DO_KEEPALIVE 0 + +/* Define to MAX interfaces you expect to use at once */ +/* MAX_INTERFACES determines the max. TOTAL number of interfaces (SLIP and PPP) */ +/* MAX_PPP_INTERFACES determines max. number of PPP interfaces */ +#define MAX_INTERFACES 1 +#define MAX_PPP_INTERFACES 1 + +/* Define if you want slirp's socket in /tmp */ +/* XXXXXX Do this in ./configure */ +#undef USE_TMPSOCKET + +/* Define if you want slirp to use cfsetXspeed() on the terminal */ +#undef DO_CFSETSPEED + +/* Define this if you want slirp to write to the tty as fast as it can */ +/* This should only be set if you are using load-balancing, slirp does a */ +/* pretty good job on single modems already, and seting this will make */ +/* interactive sessions less responsive */ +/* XXXXX Talk about having fast modem as unit 0 */ +#undef FULL_BOLT + +/* + * Define if you want slirp to use less CPU + * You will notice a small lag in interactive sessions, but it's not that bad + * Things like Netscape/ftp/etc. are completely unaffected + * This is mainly for sysadmins who have many slirp users + */ +#undef USE_LOWCPU + +/* Define this if your compiler doesn't like prototypes */ +#ifndef __STDC__ +#define NO_PROTOTYPES +#endif + +/*********************************************************/ +/* + * Autoconf defined configuration options + * You shouldn't need to touch any of these + */ + +/* Ignore this */ +#undef DUMMY_PPP + +/* XXX: Define according to how time.h should be included */ +#undef TIME_WITH_SYS_TIME +#define TIME_WITH_SYS_TIME 0 +#undef HAVE_SYS_TIME_H + +/* Define if your sprintf returns char * instead of int */ +#undef BAD_SPRINTF + +/* Define if you have readv */ +#undef HAVE_READV + +/* Define if iovec needs to be declared */ +#undef DECLARE_IOVEC +#ifdef _WIN32 +#define DECLARE_IOVEC +#endif + +/* Define if a declaration of sprintf/fprintf is needed */ +#undef DECLARE_SPRINTF + +/* Define if you have sys/stropts.h */ +#undef HAVE_SYS_STROPTS_H + +/* Define if your compiler doesn't like prototypes */ +#undef NO_PROTOTYPES + +/* Define if you don't have u_int32_t etc. typedef'd */ +#undef NEED_TYPEDEFS +#ifdef __sun__ +#define NEED_TYPEDEFS +#endif + +/* Define to sizeof(char *) */ +#define SIZEOF_CHAR_P SIZEOF_VOID_P + +/* Define if you have random() */ +#undef HAVE_RANDOM + +/* Define if you have srandom() */ +#undef HAVE_SRANDOM + +/* Define if you have setenv */ +#undef HAVE_SETENV + +/* Define if you have index() */ +#undef HAVE_INDEX + +/* Define if you have bcmp() */ +#undef HAVE_BCMP + +/* Define if you have drand48 */ +#undef HAVE_DRAND48 + +/* Define if you have memmove */ +#define HAVE_MEMMOVE + +/* Define if you have gethostid */ +#undef HAVE_GETHOSTID + +/* Define if you DON'T have unix-domain sockets */ +#undef NO_UNIX_SOCKETS +#ifdef _WIN32 +#define NO_UNIX_SOCKETS +#endif + +/* Define if gettimeofday only takes one argument */ +#undef GETTIMEOFDAY_ONE_ARG + +/* Define if you have revoke() */ +#undef HAVE_REVOKE + +/* Define if you have the sysv method of opening pty's (/dev/ptmx, etc.) */ +#undef HAVE_GRANTPT + +/* Define if you have fchmod */ +#undef HAVE_FCHMOD + +/* Define if you have */ +#undef HAVE_SYS_TYPES32_H diff --git a/SheepShaver/src/slirp/socket.c b/SheepShaver/src/slirp/socket.c new file mode 100755 index 000000000..f3d10e538 --- /dev/null +++ b/SheepShaver/src/slirp/socket.c @@ -0,0 +1,722 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#define WANT_SYS_IOCTL_H +#include +#include +#include "ip_icmp.h" +#include "main.h" +#ifdef __sun__ +#include +#endif + +void +so_init() +{ + /* Nothing yet */ +} + + +struct socket * +solookup(head, laddr, lport, faddr, fport) + struct socket *head; + struct in_addr laddr; + u_int lport; + struct in_addr faddr; + u_int fport; +{ + struct socket *so; + + for (so = head->so_next; so != head; so = so->so_next) { + if (so->so_lport == lport && + so->so_laddr.s_addr == laddr.s_addr && + so->so_faddr.s_addr == faddr.s_addr && + so->so_fport == fport) + break; + } + + if (so == head) + return (struct socket *)NULL; + return so; + +} + +/* + * Create a new socket, initialise the fields + * It is the responsibility of the caller to + * insque() it into the correct linked-list + */ +struct socket * +socreate() +{ + struct socket *so; + + so = (struct socket *)malloc(sizeof(struct socket)); + if(so) { + memset(so, 0, sizeof(struct socket)); + so->so_state = SS_NOFDREF; + so->s = -1; + } + return(so); +} + +/* + * remque and free a socket, clobber cache + */ +void +sofree(so) + struct socket *so; +{ + if (so->so_emu==EMU_RSH && so->extra) { + sofree(so->extra); + so->extra=NULL; + } + if (so == tcp_last_so) + tcp_last_so = &tcb; + else if (so == udp_last_so) + udp_last_so = &udb; + + m_free(so->so_m); + + if(so->so_next && so->so_prev) + remque(so); /* crashes if so is not in a queue */ + + free(so); +} + +/* + * Read from so's socket into sb_snd, updating all relevant sbuf fields + * NOTE: This will only be called if it is select()ed for reading, so + * a read() of 0 (or less) means it's disconnected + */ +int +soread(so) + struct socket *so; +{ + int n, nn, lss, total; + struct sbuf *sb = &so->so_snd; + int len = sb->sb_datalen - sb->sb_cc; + struct iovec iov[2]; + int mss = so->so_tcpcb->t_maxseg; + + DEBUG_CALL("soread"); + DEBUG_ARG("so = %lx", (long )so); + + /* + * No need to check if there's enough room to read. + * soread wouldn't have been called if there weren't + */ + + len = sb->sb_datalen - sb->sb_cc; + + iov[0].iov_base = sb->sb_wptr; + if (sb->sb_wptr < sb->sb_rptr) { + iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; + /* Should never succeed, but... */ + if (iov[0].iov_len > len) + iov[0].iov_len = len; + if (iov[0].iov_len > mss) + iov[0].iov_len -= iov[0].iov_len%mss; + n = 1; + } else { + iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_wptr; + /* Should never succeed, but... */ + if (iov[0].iov_len > len) iov[0].iov_len = len; + len -= iov[0].iov_len; + if (len) { + iov[1].iov_base = sb->sb_data; + iov[1].iov_len = sb->sb_rptr - sb->sb_data; + if(iov[1].iov_len > len) + iov[1].iov_len = len; + total = iov[0].iov_len + iov[1].iov_len; + if (total > mss) { + lss = total%mss; + if (iov[1].iov_len > lss) { + iov[1].iov_len -= lss; + n = 2; + } else { + lss -= iov[1].iov_len; + iov[0].iov_len -= lss; + n = 1; + } + } else + n = 2; + } else { + if (iov[0].iov_len > mss) + iov[0].iov_len -= iov[0].iov_len%mss; + n = 1; + } + } + +#ifdef HAVE_READV + nn = readv(so->s, (struct iovec *)iov, n); + DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); +#else + nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); +#endif + if (nn <= 0) { + if (nn < 0 && (errno == EINTR || errno == EAGAIN)) + return 0; + else { + DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); + sofcantrcvmore(so); + tcp_sockclosed(sototcpcb(so)); + return -1; + } + } + +#ifndef HAVE_READV + /* + * If there was no error, try and read the second time round + * We read again if n = 2 (ie, there's another part of the buffer) + * and we read as much as we could in the first read + * We don't test for <= 0 this time, because there legitimately + * might not be any more data (since the socket is non-blocking), + * a close will be detected on next iteration. + * A return of -1 wont (shouldn't) happen, since it didn't happen above + */ + if (n == 2 && nn == iov[0].iov_len) { + int ret; + ret = recv(so->s, iov[1].iov_base, iov[1].iov_len,0); + if (ret > 0) + nn += ret; + } + + DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); +#endif + + /* Update fields */ + sb->sb_cc += nn; + sb->sb_wptr += nn; + if (sb->sb_wptr >= (sb->sb_data + sb->sb_datalen)) + sb->sb_wptr -= sb->sb_datalen; + return nn; +} + +/* + * Get urgent data + * + * When the socket is created, we set it SO_OOBINLINE, + * so when OOB data arrives, we soread() it and everything + * in the send buffer is sent as urgent data + */ +void +sorecvoob(so) + struct socket *so; +{ + struct tcpcb *tp = sototcpcb(so); + + DEBUG_CALL("sorecvoob"); + DEBUG_ARG("so = %lx", (long)so); + + /* + * We take a guess at how much urgent data has arrived. + * In most situations, when urgent data arrives, the next + * read() should get all the urgent data. This guess will + * be wrong however if more data arrives just after the + * urgent data, or the read() doesn't return all the + * urgent data. + */ + soread(so); + tp->snd_up = tp->snd_una + so->so_snd.sb_cc; + tp->t_force = 1; + tcp_output(tp); + tp->t_force = 0; +} + +/* + * Send urgent data + * There's a lot duplicated code here, but... + */ +int +sosendoob(so) + struct socket *so; +{ + struct sbuf *sb = &so->so_rcv; + char buff[2048]; /* XXX Shouldn't be sending more oob data than this */ + + int n, len; + + DEBUG_CALL("sosendoob"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("sb->sb_cc = %d", sb->sb_cc); + + if (so->so_urgc > 2048) + so->so_urgc = 2048; /* XXXX */ + + if (sb->sb_rptr < sb->sb_wptr) { + /* We can send it directly */ + n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ + so->so_urgc -= n; + + DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); + } else { + /* + * Since there's no sendv or sendtov like writev, + * we must copy all data to a linear buffer then + * send it all + */ + len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; + if (len > so->so_urgc) len = so->so_urgc; + memcpy(buff, sb->sb_rptr, len); + so->so_urgc -= len; + if (so->so_urgc) { + n = sb->sb_wptr - sb->sb_data; + if (n > so->so_urgc) n = so->so_urgc; + memcpy((buff + len), sb->sb_data, n); + so->so_urgc -= n; + len += n; + } + n = send(so->s, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ +#ifdef DEBUG + if (n != len) + DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); +#endif + DEBUG_MISC((dfd, " ---2 sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); + } + + sb->sb_cc -= n; + sb->sb_rptr += n; + if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) + sb->sb_rptr -= sb->sb_datalen; + + return n; +} + +/* + * Write data from so_rcv to so's socket, + * updating all sbuf field as necessary + */ +int +sowrite(so) + struct socket *so; +{ + int n,nn; + struct sbuf *sb = &so->so_rcv; + int len = sb->sb_cc; + struct iovec iov[2]; + + DEBUG_CALL("sowrite"); + DEBUG_ARG("so = %lx", (long)so); + + if (so->so_urgc) { + sosendoob(so); + if (sb->sb_cc == 0) + return 0; + } + + /* + * No need to check if there's something to write, + * sowrite wouldn't have been called otherwise + */ + + len = sb->sb_cc; + + iov[0].iov_base = sb->sb_rptr; + if (sb->sb_rptr < sb->sb_wptr) { + iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; + /* Should never succeed, but... */ + if (iov[0].iov_len > len) iov[0].iov_len = len; + n = 1; + } else { + iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; + if (iov[0].iov_len > len) iov[0].iov_len = len; + len -= iov[0].iov_len; + if (len) { + iov[1].iov_base = sb->sb_data; + iov[1].iov_len = sb->sb_wptr - sb->sb_data; + if (iov[1].iov_len > len) iov[1].iov_len = len; + n = 2; + } else + n = 1; + } + /* Check if there's urgent data to send, and if so, send it */ + +#ifdef HAVE_READV + nn = writev(so->s, (const struct iovec *)iov, n); + + DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); +#else + nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); +#endif + /* This should never happen, but people tell me it does *shrug* */ + if (nn < 0 && (errno == EAGAIN || errno == EINTR)) + return 0; + + if (nn <= 0) { + DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", + so->so_state, errno)); + sofcantsendmore(so); + tcp_sockclosed(sototcpcb(so)); + return -1; + } + +#ifndef HAVE_READV + if (n == 2 && nn == iov[0].iov_len) { + int ret; + ret = send(so->s, iov[1].iov_base, iov[1].iov_len,0); + if (ret > 0) + nn += ret; + } + DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); +#endif + + /* Update sbuf */ + sb->sb_cc -= nn; + sb->sb_rptr += nn; + if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) + sb->sb_rptr -= sb->sb_datalen; + + /* + * If in DRAIN mode, and there's no more data, set + * it CANTSENDMORE + */ + if ((so->so_state & SS_FWDRAIN) && sb->sb_cc == 0) + sofcantsendmore(so); + + return nn; +} + +/* + * recvfrom() a UDP socket + */ +void +sorecvfrom(so) + struct socket *so; +{ + struct sockaddr_in addr; + socklen_t addrlen = sizeof(struct sockaddr_in); + + DEBUG_CALL("sorecvfrom"); + DEBUG_ARG("so = %lx", (long)so); + + if (so->so_type == IPPROTO_ICMP) { /* This is a "ping" reply */ + char buff[256]; + int len; + + len = recvfrom(so->s, buff, 256, 0, + (struct sockaddr *)&addr, &addrlen); + /* XXX Check if reply is "correct"? */ + + if(len == -1 || len == 0) { + u_char code=ICMP_UNREACH_PORT; + + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + + DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", + errno,strerror(errno))); + icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); + } else { + icmp_reflect(so->so_m); + so->so_m = 0; /* Don't m_free() it again! */ + } + /* No need for this socket anymore, udp_detach it */ + udp_detach(so); + } else { /* A "normal" UDP packet */ + struct mbuf *m; + int len; + ioctlsockopt_t n; + + if (!(m = m_get())) return; + m->m_data += if_maxlinkhdr; + + /* + * XXX Shouldn't FIONREAD packets destined for port 53, + * but I don't know the max packet size for DNS lookups + */ + len = M_FREEROOM(m); + /* if (so->so_fport != htons(53)) { */ + ioctlsocket(so->s, FIONREAD, &n); + + if (n > len) { + n = (m->m_data - m->m_dat) + m->m_len + n + 1; + m_inc(m, n); + len = M_FREEROOM(m); + } + /* } */ + + m->m_len = recvfrom(so->s, m->m_data, len, 0, + (struct sockaddr *)&addr, &addrlen); + DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", + m->m_len, errno,strerror(errno))); + if(m->m_len<0) { + u_char code=ICMP_UNREACH_PORT; + + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; + + DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); + icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); + m_free(m); + } else { + /* + * Hack: domain name lookup will be used the most for UDP, + * and since they'll only be used once there's no need + * for the 4 minute (or whatever) timeout... So we time them + * out much quicker (10 seconds for now...) + */ + if (so->so_expire) { + if (so->so_fport == htons(53)) + so->so_expire = curtime + SO_EXPIREFAST; + else + so->so_expire = curtime + SO_EXPIRE; + } + + /* if (m->m_len == len) { + * m_inc(m, MINCSIZE); + * m->m_len = 0; + * } + */ + + /* + * If this packet was destined for CTL_ADDR, + * make it look like that's where it came from, done by udp_output + */ + udp_output(so, m, &addr); + } /* rx error */ + } /* if ping packet */ +} + +/* + * sendto() a socket + */ +int +sosendto(so, m) + struct socket *so; + struct mbuf *m; +{ + int ret; + struct sockaddr_in addr; + + DEBUG_CALL("sosendto"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("m = %lx", (long)m); + + addr.sin_family = AF_INET; + if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { + /* It's an alias */ + switch(ntohl(so->so_faddr.s_addr) & 0xff) { + case CTL_DNS: + addr.sin_addr = dns_addr; + break; + case CTL_ALIAS: + default: + addr.sin_addr = loopback_addr; + break; + } + } else + addr.sin_addr = so->so_faddr; + addr.sin_port = so->so_fport; + + DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + + /* Don't care what port we get */ + ret = sendto(so->s, m->m_data, m->m_len, 0, + (struct sockaddr *)&addr, sizeof (struct sockaddr)); + if (ret < 0) + return -1; + + /* + * Kill the socket if there's no reply in 4 minutes, + * but only if it's an expirable socket + */ + if (so->so_expire) + so->so_expire = curtime + SO_EXPIRE; + so->so_state = SS_ISFCONNECTED; /* So that it gets select()ed */ + return 0; +} + +/* + * XXX This should really be tcp_listen + */ +struct socket * +solisten(port, laddr, lport, flags) + u_int port; + u_int32_t laddr; + u_int lport; + int flags; +{ + struct sockaddr_in addr; + struct socket *so; + int s; + socklen_t addrlen = sizeof(addr); + int opt = 1; + + DEBUG_CALL("solisten"); + DEBUG_ARG("port = %d", port); + DEBUG_ARG("laddr = %x", laddr); + DEBUG_ARG("lport = %d", lport); + DEBUG_ARG("flags = %x", flags); + + if ((so = socreate()) == NULL) { + /* free(so); Not sofree() ??? free(NULL) == NOP */ + return NULL; + } + + /* Don't tcp_attach... we don't need so_snd nor so_rcv */ + if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) { + free(so); + return NULL; + } + insque(so,&tcb); + + /* + * SS_FACCEPTONCE sockets must time out. + */ + if (flags & SS_FACCEPTONCE) + so->so_tcpcb->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT*2; + + so->so_state = (SS_FACCEPTCONN|flags); + so->so_lport = lport; /* Kept in network format */ + so->so_laddr.s_addr = laddr; /* Ditto */ + + memset(&addr, 0, sizeof(struct sockaddr_in)); + addr.sin_family = AF_INET; + addr.sin_addr.s_addr = INADDR_ANY; + addr.sin_port = port; + + if (((s = socket(AF_INET,SOCK_STREAM,0)) < 0) || + (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || + (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || + (listen(s,1) < 0)) { + int tmperrno = errno; /* Don't clobber the real reason we failed */ + + close(s); + sofree(so); + /* Restore the real errno */ +#ifdef _WIN32 + WSASetLastError(tmperrno); +#else + errno = tmperrno; +#endif + return NULL; + } + setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); + + getsockname(s,(struct sockaddr *)&addr,&addrlen); + so->so_fport = addr.sin_port; + if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) + so->so_faddr = alias_addr; + else + so->so_faddr = addr.sin_addr; + + so->s = s; + return so; +} + +/* + * Data is available in so_rcv + * Just write() the data to the socket + * XXX not yet... + */ +void +sorwakeup(so) + struct socket *so; +{ +/* sowrite(so); */ +/* FD_CLR(so->s,&writefds); */ +} + +/* + * Data has been freed in so_snd + * We have room for a read() if we want to + * For now, don't read, it'll be done in the main loop + */ +void +sowwakeup(so) + struct socket *so; +{ + /* Nothing, yet */ +} + +/* + * Various session state calls + * XXX Should be #define's + * The socket state stuff needs work, these often get call 2 or 3 + * times each when only 1 was needed + */ +void +soisfconnecting(so) + register struct socket *so; +{ + so->so_state &= ~(SS_NOFDREF|SS_ISFCONNECTED|SS_FCANTRCVMORE| + SS_FCANTSENDMORE|SS_FWDRAIN); + so->so_state |= SS_ISFCONNECTING; /* Clobber other states */ +} + +void +soisfconnected(so) + register struct socket *so; +{ + so->so_state &= ~(SS_ISFCONNECTING|SS_FWDRAIN|SS_NOFDREF); + so->so_state |= SS_ISFCONNECTED; /* Clobber other states */ +} + +void +sofcantrcvmore(so) + struct socket *so; +{ + if ((so->so_state & SS_NOFDREF) == 0) { + shutdown(so->s,0); + if(global_writefds) { + FD_CLR(so->s,global_writefds); + } + } + so->so_state &= ~(SS_ISFCONNECTING); + if (so->so_state & SS_FCANTSENDMORE) + so->so_state = SS_NOFDREF; /* Don't select it */ /* XXX close() here as well? */ + else + so->so_state |= SS_FCANTRCVMORE; +} + +void +sofcantsendmore(so) + struct socket *so; +{ + if ((so->so_state & SS_NOFDREF) == 0) { + shutdown(so->s,1); /* send FIN to fhost */ + if (global_readfds) { + FD_CLR(so->s,global_readfds); + } + if (global_xfds) { + FD_CLR(so->s,global_xfds); + } + } + so->so_state &= ~(SS_ISFCONNECTING); + if (so->so_state & SS_FCANTRCVMORE) + so->so_state = SS_NOFDREF; /* as above */ + else + so->so_state |= SS_FCANTSENDMORE; +} + +void +soisfdisconnected(so) + struct socket *so; +{ +/* so->so_state &= ~(SS_ISFCONNECTING|SS_ISFCONNECTED); */ +/* close(so->s); */ +/* so->so_state = SS_ISFDISCONNECTED; */ + /* + * XXX Do nothing ... ? + */ +} + +/* + * Set write drain mode + * Set CANTSENDMORE once all data has been write()n + */ +void +sofwdrain(so) + struct socket *so; +{ + if (so->so_rcv.sb_cc) + so->so_state |= SS_FWDRAIN; + else + sofcantsendmore(so); +} + diff --git a/SheepShaver/src/slirp/socket.h b/SheepShaver/src/slirp/socket.h new file mode 100755 index 000000000..d05354c8c --- /dev/null +++ b/SheepShaver/src/slirp/socket.h @@ -0,0 +1,104 @@ +/* + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +/* MINE */ + +#ifndef _SLIRP_SOCKET_H_ +#define _SLIRP_SOCKET_H_ + +#define SO_EXPIRE 240000 +#define SO_EXPIREFAST 10000 + +/* + * Our socket structure + */ + +struct socket { + struct socket *so_next,*so_prev; /* For a linked list of sockets */ + + int s; /* The actual socket */ + + /* XXX union these with not-yet-used sbuf params */ + struct mbuf *so_m; /* Pointer to the original SYN packet, + * for non-blocking connect()'s, and + * PING reply's */ + struct tcpiphdr *so_ti; /* Pointer to the original ti within + * so_mconn, for non-blocking connections */ + int so_urgc; + struct in_addr so_faddr; /* foreign host table entry */ + struct in_addr so_laddr; /* local host table entry */ + u_int16_t so_fport; /* foreign port */ + u_int16_t so_lport; /* local port */ + + u_int8_t so_iptos; /* Type of service */ + u_int8_t so_emu; /* Is the socket emulated? */ + + u_char so_type; /* Type of socket, UDP or TCP */ + int so_state; /* internal state flags SS_*, below */ + + struct tcpcb *so_tcpcb; /* pointer to TCP protocol control block */ + u_int so_expire; /* When the socket will expire */ + + int so_queued; /* Number of packets queued from this socket */ + int so_nqueued; /* Number of packets queued in a row + * Used to determine when to "downgrade" a session + * from fastq to batchq */ + + struct sbuf so_rcv; /* Receive buffer */ + struct sbuf so_snd; /* Send buffer */ + void * extra; /* Extra pointer */ +}; + + +/* + * Socket state bits. (peer means the host on the Internet, + * local host means the host on the other end of the modem) + */ +#define SS_NOFDREF 0x001 /* No fd reference */ + +#define SS_ISFCONNECTING 0x002 /* Socket is connecting to peer (non-blocking connect()'s) */ +#define SS_ISFCONNECTED 0x004 /* Socket is connected to peer */ +#define SS_FCANTRCVMORE 0x008 /* Socket can't receive more from peer (for half-closes) */ +#define SS_FCANTSENDMORE 0x010 /* Socket can't send more to peer (for half-closes) */ +/* #define SS_ISFDISCONNECTED 0x020*/ /* Socket has disconnected from peer, in 2MSL state */ +#define SS_FWDRAIN 0x040 /* We received a FIN, drain data and set SS_FCANTSENDMORE */ + +#define SS_CTL 0x080 +#define SS_FACCEPTCONN 0x100 /* Socket is accepting connections from a host on the internet */ +#define SS_FACCEPTONCE 0x200 /* If set, the SS_FACCEPTCONN socket will die after one accept */ + +extern struct socket tcb; + + +#if defined(DECLARE_IOVEC) && !defined(HAVE_READV) +struct iovec { + char *iov_base; + size_t iov_len; +}; +#endif + +void so_init _P((void)); +struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); +struct socket * socreate _P((void)); +void sofree _P((struct socket *)); +int soread _P((struct socket *)); +void sorecvoob _P((struct socket *)); +int sosendoob _P((struct socket *)); +int sowrite _P((struct socket *)); +void sorecvfrom _P((struct socket *)); +int sosendto _P((struct socket *, struct mbuf *)); +struct socket * solisten _P((u_int, u_int32_t, u_int, int)); +void sorwakeup _P((struct socket *)); +void sowwakeup _P((struct socket *)); +void soisfconnecting _P((register struct socket *)); +void soisfconnected _P((register struct socket *)); +void sofcantrcvmore _P((struct socket *)); +void sofcantsendmore _P((struct socket *)); +void soisfdisconnected _P((struct socket *)); +void sofwdrain _P((struct socket *)); + +#endif /* _SOCKET_H_ */ diff --git a/SheepShaver/src/slirp/tcp.h b/SheepShaver/src/slirp/tcp.h new file mode 100755 index 000000000..5f03f9e17 --- /dev/null +++ b/SheepShaver/src/slirp/tcp.h @@ -0,0 +1,181 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp.h 8.1 (Berkeley) 6/10/93 + * tcp.h,v 1.3 1994/08/21 05:27:34 paul Exp + */ + +#ifndef _TCP_H_ +#define _TCP_H_ + +typedef u_int32_t tcp_seq; + +#define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ +#define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ + +extern int tcp_rcvspace; +extern int tcp_sndspace; +extern struct socket *tcp_last_so; + +#define TCP_SNDSPACE 8192 +#define TCP_RCVSPACE 8192 + +/* + * TCP header. + * Per RFC 793, September, 1981. + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct tcphdr { + u_int16_t th_sport; /* source port */ + u_int16_t th_dport; /* destination port */ + tcp_seq th_seq; /* sequence number */ + tcp_seq th_ack; /* acknowledgement number */ +#ifdef WORDS_BIGENDIAN + u_char th_off:4, /* data offset */ + th_x2:4; /* (unused) */ +#else + u_char th_x2:4, /* (unused) */ + th_off:4; /* data offset */ +#endif + u_int8_t th_flags; +#define TH_FIN 0x01 +#define TH_SYN 0x02 +#define TH_RST 0x04 +#define TH_PUSH 0x08 +#define TH_ACK 0x10 +#define TH_URG 0x20 + u_int16_t th_win; /* window */ + u_int16_t th_sum; /* checksum */ + u_int16_t th_urp; /* urgent pointer */ +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +#include "tcp_var.h" + +#define TCPOPT_EOL 0 +#define TCPOPT_NOP 1 +#define TCPOPT_MAXSEG 2 +#define TCPOLEN_MAXSEG 4 +#define TCPOPT_WINDOW 3 +#define TCPOLEN_WINDOW 3 +#define TCPOPT_SACK_PERMITTED 4 /* Experimental */ +#define TCPOLEN_SACK_PERMITTED 2 +#define TCPOPT_SACK 5 /* Experimental */ +#define TCPOPT_TIMESTAMP 8 +#define TCPOLEN_TIMESTAMP 10 +#define TCPOLEN_TSTAMP_APPA (TCPOLEN_TIMESTAMP+2) /* appendix A */ + +#define TCPOPT_TSTAMP_HDR \ + (TCPOPT_NOP<<24|TCPOPT_NOP<<16|TCPOPT_TIMESTAMP<<8|TCPOLEN_TIMESTAMP) + +/* + * Default maximum segment size for TCP. + * With an IP MSS of 576, this is 536, + * but 512 is probably more convenient. + * This should be defined as MIN(512, IP_MSS - sizeof (struct tcpiphdr)). + * + * We make this 1460 because we only care about Ethernet in the qemu context. + */ +#define TCP_MSS 1460 + +#define TCP_MAXWIN 65535 /* largest value for (unscaled) window */ + +#define TCP_MAX_WINSHIFT 14 /* maximum window shift */ + +/* + * User-settable options (used with setsockopt). + * + * We don't use the system headers on unix because we have conflicting + * local structures. We can't avoid the system definitions on Windows, + * so we undefine them. + */ +#undef TCP_NODELAY +#define TCP_NODELAY 0x01 /* don't delay send to coalesce packets */ +#undef TCP_MAXSEG +/* #define TCP_MAXSEG 0x02 */ /* set maximum segment size */ + +/* + * TCP FSM state definitions. + * Per RFC793, September, 1981. + */ + +#define TCP_NSTATES 11 + +#define TCPS_CLOSED 0 /* closed */ +#define TCPS_LISTEN 1 /* listening for connection */ +#define TCPS_SYN_SENT 2 /* active, have sent syn */ +#define TCPS_SYN_RECEIVED 3 /* have send and received syn */ +/* states < TCPS_ESTABLISHED are those where connections not established */ +#define TCPS_ESTABLISHED 4 /* established */ +#define TCPS_CLOSE_WAIT 5 /* rcvd fin, waiting for close */ +/* states > TCPS_CLOSE_WAIT are those where user has closed */ +#define TCPS_FIN_WAIT_1 6 /* have closed, sent fin */ +#define TCPS_CLOSING 7 /* closed xchd FIN; await FIN ACK */ +#define TCPS_LAST_ACK 8 /* had fin and close; await FIN ACK */ +/* states > TCPS_CLOSE_WAIT && < TCPS_FIN_WAIT_2 await ACK of FIN */ +#define TCPS_FIN_WAIT_2 9 /* have closed, fin is acked */ +#define TCPS_TIME_WAIT 10 /* in 2*msl quiet wait after close */ + +#define TCPS_HAVERCVDSYN(s) ((s) >= TCPS_SYN_RECEIVED) +#define TCPS_HAVEESTABLISHED(s) ((s) >= TCPS_ESTABLISHED) +#define TCPS_HAVERCVDFIN(s) ((s) >= TCPS_TIME_WAIT) + +/* + * TCP sequence numbers are 32 bit integers operated + * on with modular arithmetic. These macros can be + * used to compare such integers. + */ +#define SEQ_LT(a,b) ((int)((a)-(b)) < 0) +#define SEQ_LEQ(a,b) ((int)((a)-(b)) <= 0) +#define SEQ_GT(a,b) ((int)((a)-(b)) > 0) +#define SEQ_GEQ(a,b) ((int)((a)-(b)) >= 0) + +/* + * Macros to initialize tcp sequence numbers for + * send and receive from initial send and receive + * sequence numbers. + */ +#define tcp_rcvseqinit(tp) \ + (tp)->rcv_adv = (tp)->rcv_nxt = (tp)->irs + 1 + +#define tcp_sendseqinit(tp) \ + (tp)->snd_una = (tp)->snd_nxt = (tp)->snd_max = (tp)->snd_up = (tp)->iss + +#define TCP_ISSINCR (125*1024) /* increment for tcp_iss each second */ + +extern tcp_seq tcp_iss; /* tcp initial send seq # */ + +extern char *tcpstates[]; + +#endif diff --git a/SheepShaver/src/slirp/tcp_input.c b/SheepShaver/src/slirp/tcp_input.c new file mode 100755 index 000000000..fc7c0bc01 --- /dev/null +++ b/SheepShaver/src/slirp/tcp_input.c @@ -0,0 +1,1722 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993, 1994 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_input.c 8.5 (Berkeley) 4/10/94 + * tcp_input.c,v 1.10 1994/10/13 18:36:32 wollman Exp + */ + +/* + * Changes and additions relating to SLiRP + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include +#include +#include "ip_icmp.h" + +struct socket tcb; + +int tcprexmtthresh = 3; +struct socket *tcp_last_so = &tcb; + +tcp_seq tcp_iss; /* tcp initial send seq # */ + +#define TCP_PAWS_IDLE (24 * 24 * 60 * 60 * PR_SLOWHZ) + +/* for modulo comparisons of timestamps */ +#define TSTMP_LT(a,b) ((int)((a)-(b)) < 0) +#define TSTMP_GEQ(a,b) ((int)((a)-(b)) >= 0) + +/* + * Insert segment ti into reassembly queue of tcp with + * control block tp. Return TH_FIN if reassembly now includes + * a segment with FIN. The macro form does the common case inline + * (segment is the next to be received on an established connection, + * and the queue is empty), avoiding linkage into and removal + * from the queue and repetition of various conversions. + * Set DELACK for segments received in order, but ack immediately + * when segments are out of order (so fast retransmit can work). + */ +#ifdef TCP_ACK_HACK +#define TCP_REASS(tp, ti, m, so, flags) {\ + if ((ti)->ti_seq == (tp)->rcv_nxt && \ + tcpfrag_list_empty(tp) && \ + (tp)->t_state == TCPS_ESTABLISHED) {\ + if (ti->ti_flags & TH_PUSH) \ + tp->t_flags |= TF_ACKNOW; \ + else \ + tp->t_flags |= TF_DELACK; \ + (tp)->rcv_nxt += (ti)->ti_len; \ + flags = (ti)->ti_flags & TH_FIN; \ + tcpstat.tcps_rcvpack++;\ + tcpstat.tcps_rcvbyte += (ti)->ti_len;\ + if (so->so_emu) { \ + if (tcp_emu((so),(m))) sbappend((so), (m)); \ + } else \ + sbappend((so), (m)); \ +/* sorwakeup(so); */ \ + } else {\ + (flags) = tcp_reass((tp), (ti), (m)); \ + tp->t_flags |= TF_ACKNOW; \ + } \ +} +#else +#define TCP_REASS(tp, ti, m, so, flags) { \ + if ((ti)->ti_seq == (tp)->rcv_nxt && \ + tcpfrag_list_empty(tp) && \ + (tp)->t_state == TCPS_ESTABLISHED) { \ + tp->t_flags |= TF_DELACK; \ + (tp)->rcv_nxt += (ti)->ti_len; \ + flags = (ti)->ti_flags & TH_FIN; \ + tcpstat.tcps_rcvpack++;\ + tcpstat.tcps_rcvbyte += (ti)->ti_len;\ + if (so->so_emu) { \ + if (tcp_emu((so),(m))) sbappend(so, (m)); \ + } else \ + sbappend((so), (m)); \ +/* sorwakeup(so); */ \ + } else { \ + (flags) = tcp_reass((tp), (ti), (m)); \ + tp->t_flags |= TF_ACKNOW; \ + } \ +} +#endif + +int +tcp_reass(tp, ti, m) + register struct tcpcb *tp; + register struct tcpiphdr *ti; + struct mbuf *m; +{ + register struct tcpiphdr *q; + struct socket *so = tp->t_socket; + int flags; + + /* + * Call with ti==0 after become established to + * force pre-ESTABLISHED data up to user socket. + */ + if (ti == 0) + goto present; + + /* + * Find a segment which begins after this one does. + */ + for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); + q = tcpiphdr_next(q)) + if (SEQ_GT(q->ti_seq, ti->ti_seq)) + break; + + /* + * If there is a preceding segment, it may provide some of + * our data already. If so, drop the data from the incoming + * segment. If it provides all of our data, drop us. + */ + if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { + register int i; + q = tcpiphdr_prev(q); + /* conversion to int (in i) handles seq wraparound */ + i = q->ti_seq + q->ti_len - ti->ti_seq; + if (i > 0) { + if (i >= ti->ti_len) { + tcpstat.tcps_rcvduppack++; + tcpstat.tcps_rcvdupbyte += ti->ti_len; + m_freem(m); + /* + * Try to present any queued data + * at the left window edge to the user. + * This is needed after the 3-WHS + * completes. + */ + goto present; /* ??? */ + } + m_adj(m, i); + ti->ti_len -= i; + ti->ti_seq += i; + } + q = tcpiphdr_next(q); + } + tcpstat.tcps_rcvoopack++; + tcpstat.tcps_rcvoobyte += ti->ti_len; + ti->ti_mbuf = m; + + /* + * While we overlap succeeding segments trim them or, + * if they are completely covered, dequeue them. + */ + while (!tcpfrag_list_end(q, tp)) { + register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; + if (i <= 0) + break; + if (i < q->ti_len) { + q->ti_seq += i; + q->ti_len -= i; + m_adj(q->ti_mbuf, i); + break; + } + q = tcpiphdr_next(q); + m = tcpiphdr_prev(q)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(q))); + m_freem(m); + } + + /* + * Stick new segment in its place. + */ + insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); +present: + /* + * Present data to user, advancing rcv_nxt through + * completed sequence space. + */ + if (!TCPS_HAVEESTABLISHED(tp->t_state)) + return (0); + ti = tcpfrag_list_first(tp); + if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) + return (0); + if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) + return (0); + do { + tp->rcv_nxt += ti->ti_len; + flags = ti->ti_flags & TH_FIN; + remque(tcpiphdr2qlink(ti)); + m = ti->ti_mbuf; + ti = tcpiphdr_next(ti); +/* if (so->so_state & SS_FCANTRCVMORE) */ + if (so->so_state & SS_FCANTSENDMORE) + m_freem(m); + else { + if (so->so_emu) { + if (tcp_emu(so,m)) sbappend(so, m); + } else + sbappend(so, m); + } + } while (ti != (struct tcpiphdr *)tp && ti->ti_seq == tp->rcv_nxt); +/* sorwakeup(so); */ + return (flags); +} + +/* + * TCP input routine, follows pages 65-76 of the + * protocol specification dated September, 1981 very closely. + */ +void +tcp_input(m, iphlen, inso) + register struct mbuf *m; + int iphlen; + struct socket *inso; +{ + struct ip save_ip, *ip; + register struct tcpiphdr *ti; + caddr_t optp = NULL; + int optlen = 0; + int len, tlen, off; + register struct tcpcb *tp = 0; + register int tiflags; + struct socket *so = 0; + int todrop, acked, ourfinisacked, needoutput = 0; +/* int dropsocket = 0; */ + int iss = 0; + u_long tiwin; + int ret; +/* int ts_present = 0; */ + + DEBUG_CALL("tcp_input"); + DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", + (long )m, iphlen, (long )inso )); + + /* + * If called with m == 0, then we're continuing the connect + */ + if (m == NULL) { + so = inso; + + /* Re-set a few variables */ + tp = sototcpcb(so); + m = so->so_m; + so->so_m = 0; + ti = so->so_ti; + tiwin = ti->ti_win; + tiflags = ti->ti_flags; + + goto cont_conn; + } + + + tcpstat.tcps_rcvtotal++; + /* + * Get IP and TCP header together in first mbuf. + * Note: IP leaves IP header in first mbuf. + */ + ti = mtod(m, struct tcpiphdr *); + if (iphlen > sizeof(struct ip )) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen=sizeof(struct ip ); + } + /* XXX Check if too short */ + + + /* + * Save a copy of the IP header in case we want restore it + * for sending an ICMP error message in response. + */ + ip=mtod(m, struct ip *); + save_ip = *ip; + save_ip.ip_len+= iphlen; + + /* + * Checksum extended TCP header and data. + */ + tlen = ((struct ip *)ti)->ip_len; + tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; + memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ti->ti_x1 = 0; + ti->ti_len = htons((u_int16_t)tlen); + len = sizeof(struct ip ) + tlen; + /* keep checksum for ICMP reply + * ti->ti_sum = cksum(m, len); + * if (ti->ti_sum) { */ + if(cksum(m, len)) { + tcpstat.tcps_rcvbadsum++; + goto drop; + } + + /* + * Check that TCP offset makes sense, + * pull out TCP options and adjust length. XXX + */ + off = ti->ti_off << 2; + if (off < sizeof (struct tcphdr) || off > tlen) { + tcpstat.tcps_rcvbadoff++; + goto drop; + } + tlen -= off; + ti->ti_len = tlen; + if (off > sizeof (struct tcphdr)) { + optlen = off - sizeof (struct tcphdr); + optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); + + /* + * Do quick retrieval of timestamp options ("options + * prediction?"). If timestamp is the only option and it's + * formatted as recommended in RFC 1323 appendix A, we + * quickly get the values now and not bother calling + * tcp_dooptions(), etc. + */ +/* if ((optlen == TCPOLEN_TSTAMP_APPA || + * (optlen > TCPOLEN_TSTAMP_APPA && + * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && + * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && + * (ti->ti_flags & TH_SYN) == 0) { + * ts_present = 1; + * ts_val = ntohl(*(u_int32_t *)(optp + 4)); + * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); + * optp = NULL; / * we've parsed the options * / + * } + */ + } + tiflags = ti->ti_flags; + + /* + * Convert TCP protocol specific fields to host format. + */ + NTOHL(ti->ti_seq); + NTOHL(ti->ti_ack); + NTOHS(ti->ti_win); + NTOHS(ti->ti_urp); + + /* + * Drop TCP, IP headers and TCP options. + */ + m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + + /* + * Locate pcb for segment. + */ +findso: + so = tcp_last_so; + if (so->so_fport != ti->ti_dport || + so->so_lport != ti->ti_sport || + so->so_laddr.s_addr != ti->ti_src.s_addr || + so->so_faddr.s_addr != ti->ti_dst.s_addr) { + so = solookup(&tcb, ti->ti_src, ti->ti_sport, + ti->ti_dst, ti->ti_dport); + if (so) + tcp_last_so = so; + ++tcpstat.tcps_socachemiss; + } + + /* + * If the state is CLOSED (i.e., TCB does not exist) then + * all data in the incoming segment is discarded. + * If the TCB exists but is in CLOSED state, it is embryonic, + * but should either do a listen or a connect soon. + * + * state == CLOSED means we've done socreate() but haven't + * attached it to a protocol yet... + * + * XXX If a TCB does not exist, and the TH_SYN flag is + * the only flag set, then create a session, mark it + * as if it was LISTENING, and continue... + */ + if (so == 0) { + if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) + goto dropwithreset; + + if ((so = socreate()) == NULL) + goto dropwithreset; + if (tcp_attach(so) < 0) { + free(so); /* Not sofree (if it failed, it's not insqued) */ + goto dropwithreset; + } + + sbreserve(&so->so_snd, tcp_sndspace); + sbreserve(&so->so_rcv, tcp_rcvspace); + + /* tcp_last_so = so; */ /* XXX ? */ + /* tp = sototcpcb(so); */ + + so->so_laddr = ti->ti_src; + so->so_lport = ti->ti_sport; + so->so_faddr = ti->ti_dst; + so->so_fport = ti->ti_dport; + + if ((so->so_iptos = tcp_tos(so)) == 0) + so->so_iptos = ((struct ip *)ti)->ip_tos; + + tp = sototcpcb(so); + tp->t_state = TCPS_LISTEN; + } + + /* + * If this is a still-connecting socket, this probably + * a retransmit of the SYN. Whether it's a retransmit SYN + * or something else, we nuke it. + */ + if (so->so_state & SS_ISFCONNECTING) + goto drop; + + tp = sototcpcb(so); + + /* XXX Should never fail */ + if (tp == 0) + goto dropwithreset; + if (tp->t_state == TCPS_CLOSED) + goto drop; + + /* Unscale the window into a 32-bit value. */ +/* if ((tiflags & TH_SYN) == 0) + * tiwin = ti->ti_win << tp->snd_scale; + * else + */ + tiwin = ti->ti_win; + + /* + * Segment received on connection. + * Reset idle time and keep-alive timer. + */ + tp->t_idle = 0; + if (so_options) + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + else + tp->t_timer[TCPT_KEEP] = tcp_keepidle; + + /* + * Process options if not in LISTEN state, + * else do it below (after getting remote address). + */ + if (optp && tp->t_state != TCPS_LISTEN) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); +/* , */ +/* &ts_present, &ts_val, &ts_ecr); */ + + /* + * Header prediction: check for the two common cases + * of a uni-directional data xfer. If the packet has + * no control flags, is in-sequence, the window didn't + * change and we're not retransmitting, it's a + * candidate. If the length is zero and the ack moved + * forward, we're the sender side of the xfer. Just + * free the data acked & wake any higher level process + * that was blocked waiting for space. If the length + * is non-zero and the ack didn't move, we're the + * receiver side. If we're getting packets in-order + * (the reassembly queue is empty), add the data to + * the socket buffer and note that we need a delayed ack. + * + * XXX Some of these tests are not needed + * eg: the tiwin == tp->snd_wnd prevents many more + * predictions.. with no *real* advantage.. + */ + if (tp->t_state == TCPS_ESTABLISHED && + (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && +/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ + ti->ti_seq == tp->rcv_nxt && + tiwin && tiwin == tp->snd_wnd && + tp->snd_nxt == tp->snd_max) { + /* + * If last ACK falls within this segment's sequence numbers, + * record the timestamp. + */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ + if (ti->ti_len == 0) { + if (SEQ_GT(ti->ti_ack, tp->snd_una) && + SEQ_LEQ(ti->ti_ack, tp->snd_max) && + tp->snd_cwnd >= tp->snd_wnd) { + /* + * this is a pure ack for outstanding data. + */ + ++tcpstat.tcps_predack; +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ if (tp->t_rtt && + SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp, tp->t_rtt); + acked = ti->ti_ack - tp->snd_una; + tcpstat.tcps_rcvackpack++; + tcpstat.tcps_rcvackbyte += acked; + sbdrop(&so->so_snd, acked); + tp->snd_una = ti->ti_ack; + m_freem(m); + + /* + * If all outstanding data are acked, stop + * retransmit timer, otherwise restart timer + * using current (possibly backed-off) value. + * If process is waiting for space, + * wakeup/selwakeup/signal. If data + * are ready to send, let tcp_output + * decide between more output or persist. + */ + if (tp->snd_una == tp->snd_max) + tp->t_timer[TCPT_REXMT] = 0; + else if (tp->t_timer[TCPT_PERSIST] == 0) + tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; + + /* + * There's room in so_snd, sowwakup will read() + * from the socket if we can + */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + /* + * This is called because sowwakeup might have + * put data into so_snd. Since we don't so sowwakeup, + * we don't need this.. XXX??? + */ + if (so->so_snd.sb_cc) + (void) tcp_output(tp); + + return; + } + } else if (ti->ti_ack == tp->snd_una && + tcpfrag_list_empty(tp) && + ti->ti_len <= sbspace(&so->so_rcv)) { + /* + * this is a pure, in-sequence data packet + * with nothing on the reassembly queue and + * we have enough buffer space to take it. + */ + ++tcpstat.tcps_preddat; + tp->rcv_nxt += ti->ti_len; + tcpstat.tcps_rcvpack++; + tcpstat.tcps_rcvbyte += ti->ti_len; + /* + * Add data to socket buffer. + */ + if (so->so_emu) { + if (tcp_emu(so,m)) sbappend(so, m); + } else + sbappend(so, m); + + /* + * XXX This is called when data arrives. Later, check + * if we can actually write() to the socket + * XXX Need to check? It's be NON_BLOCKING + */ +/* sorwakeup(so); */ + + /* + * If this is a short packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * It is better to not delay acks at all to maximize + * TCP throughput. See RFC 2581. + */ + tp->t_flags |= TF_ACKNOW; + tcp_output(tp); + return; + } + } /* header prediction */ + /* + * Calculate amount of space in receive window, + * and then do TCP input processing. + * Receive window is amount of space in rcv queue, + * but not less than advertised window. + */ + { int win; + win = sbspace(&so->so_rcv); + if (win < 0) + win = 0; + tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); + } + + switch (tp->t_state) { + + /* + * If the state is LISTEN then ignore segment if it contains an RST. + * If the segment contains an ACK then it is bad and send a RST. + * If it does not contain a SYN then it is not interesting; drop it. + * Don't bother responding if the destination was a broadcast. + * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial + * tp->iss, and send a segment: + * + * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. + * Fill in remote peer address fields if not previously specified. + * Enter SYN_RECEIVED state, and process any other fields of this + * segment in this state. + */ + case TCPS_LISTEN: { + + if (tiflags & TH_RST) + goto drop; + if (tiflags & TH_ACK) + goto dropwithreset; + if ((tiflags & TH_SYN) == 0) + goto drop; + + /* + * This has way too many gotos... + * But a bit of spaghetti code never hurt anybody :) + */ + + /* + * If this is destined for the control address, then flag to + * tcp_ctl once connected, otherwise connect + */ + if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { + int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; + if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { +#if 0 + if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { + /* Command or exec adress */ + so->so_state |= SS_CTL; + } else +#endif + { + /* May be an add exec */ + struct ex_list *ex_ptr; + for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if(ex_ptr->ex_fport == so->so_fport && + lastbyte == ex_ptr->ex_addr) { + so->so_state |= SS_CTL; + break; + } + } + } + if(so->so_state & SS_CTL) goto cont_input; + } + /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ + } + + if (so->so_emu & EMU_NOCONNECT) { + so->so_emu &= ~EMU_NOCONNECT; + goto cont_input; + } + + if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { + u_char code=ICMP_UNREACH_NET; + DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", + errno,strerror(errno))); + if(errno == ECONNREFUSED) { + /* ACK the SYN, send RST to refuse the connection */ + tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, + TH_RST|TH_ACK); + } else { + if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; + HTONL(ti->ti_seq); /* restore tcp header */ + HTONL(ti->ti_ack); + HTONS(ti->ti_win); + HTONS(ti->ti_urp); + m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); + *ip=save_ip; + icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); + } + tp = tcp_close(tp); + m_free(m); + } else { + /* + * Haven't connected yet, save the current mbuf + * and ti, and return + * XXX Some OS's don't tell us whether the connect() + * succeeded or not. So we must time it out. + */ + so->so_m = m; + so->so_ti = ti; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->t_state = TCPS_SYN_RECEIVED; + } + return; + + cont_conn: + /* m==NULL + * Check if the connect succeeded + */ + if (so->so_state & SS_NOFDREF) { + tp = tcp_close(tp); + goto dropwithreset; + } + cont_input: + tcp_template(tp); + + if (optp) + tcp_dooptions(tp, (u_char *)optp, optlen, ti); + /* , */ + /* &ts_present, &ts_val, &ts_ecr); */ + + if (iss) + tp->iss = iss; + else + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tp->irs = ti->ti_seq; + tcp_sendseqinit(tp); + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + tp->t_state = TCPS_SYN_RECEIVED; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tcpstat.tcps_accepts++; + goto trimthenstep6; + } /* case TCPS_LISTEN */ + + /* + * If the state is SYN_SENT: + * if seg contains an ACK, but not for our SYN, drop the input. + * if seg contains a RST, then drop the connection. + * if seg does not contain SYN, then drop it. + * Otherwise this is an acceptable SYN segment + * initialize tp->rcv_nxt and tp->irs + * if seg contains ack then advance tp->snd_una + * if SYN has been acked change to ESTABLISHED else SYN_RCVD state + * arrange for segment to be acked (eventually) + * continue processing rest of data/controls, beginning with URG + */ + case TCPS_SYN_SENT: + if ((tiflags & TH_ACK) && + (SEQ_LEQ(ti->ti_ack, tp->iss) || + SEQ_GT(ti->ti_ack, tp->snd_max))) + goto dropwithreset; + + if (tiflags & TH_RST) { + if (tiflags & TH_ACK) + tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ + goto drop; + } + + if ((tiflags & TH_SYN) == 0) + goto drop; + if (tiflags & TH_ACK) { + tp->snd_una = ti->ti_ack; + if (SEQ_LT(tp->snd_nxt, tp->snd_una)) + tp->snd_nxt = tp->snd_una; + } + + tp->t_timer[TCPT_REXMT] = 0; + tp->irs = ti->ti_seq; + tcp_rcvseqinit(tp); + tp->t_flags |= TF_ACKNOW; + if (tiflags & TH_ACK && SEQ_GT(tp->snd_una, tp->iss)) { + tcpstat.tcps_connects++; + soisfconnected(so); + tp->t_state = TCPS_ESTABLISHED; + + /* Do window scaling on this connection? */ +/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == + * (TF_RCVD_SCALE|TF_REQ_SCALE)) { + * tp->snd_scale = tp->requested_s_scale; + * tp->rcv_scale = tp->request_r_scale; + * } + */ + (void) tcp_reass(tp, (struct tcpiphdr *)0, + (struct mbuf *)0); + /* + * if we didn't have to retransmit the SYN, + * use its rtt as our initial srtt & rtt var. + */ + if (tp->t_rtt) + tcp_xmit_timer(tp, tp->t_rtt); + } else + tp->t_state = TCPS_SYN_RECEIVED; + +trimthenstep6: + /* + * Advance ti->ti_seq to correspond to first data byte. + * If data, trim to stay within window, + * dropping FIN if necessary. + */ + ti->ti_seq++; + if (ti->ti_len > tp->rcv_wnd) { + todrop = ti->ti_len - tp->rcv_wnd; + m_adj(m, -todrop); + ti->ti_len = tp->rcv_wnd; + tiflags &= ~TH_FIN; + tcpstat.tcps_rcvpackafterwin++; + tcpstat.tcps_rcvbyteafterwin += todrop; + } + tp->snd_wl1 = ti->ti_seq - 1; + tp->rcv_up = ti->ti_seq; + goto step6; + } /* switch tp->t_state */ + /* + * States other than LISTEN or SYN_SENT. + * First check timestamp, if present. + * Then check that at least some bytes of segment are within + * receive window. If segment begins before rcv_nxt, + * drop leading data (and SYN); if nothing left, just ack. + * + * RFC 1323 PAWS: If we have a timestamp reply on this segment + * and it's less than ts_recent, drop it. + */ +/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && + * TSTMP_LT(ts_val, tp->ts_recent)) { + * + */ /* Check to see if ts_recent is over 24 days old. */ +/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { + */ /* + * * Invalidate ts_recent. If this segment updates + * * ts_recent, the age will be reset later and ts_recent + * * will get a valid value. If it does not, setting + * * ts_recent to zero will at least satisfy the + * * requirement that zero be placed in the timestamp + * * echo reply when ts_recent isn't valid. The + * * age isn't reset until we get a valid ts_recent + * * because we don't want out-of-order segments to be + * * dropped when ts_recent is old. + * */ +/* tp->ts_recent = 0; + * } else { + * tcpstat.tcps_rcvduppack++; + * tcpstat.tcps_rcvdupbyte += ti->ti_len; + * tcpstat.tcps_pawsdrop++; + * goto dropafterack; + * } + * } + */ + + todrop = tp->rcv_nxt - ti->ti_seq; + if (todrop > 0) { + if (tiflags & TH_SYN) { + tiflags &= ~TH_SYN; + ti->ti_seq++; + if (ti->ti_urp > 1) + ti->ti_urp--; + else + tiflags &= ~TH_URG; + todrop--; + } + /* + * Following if statement from Stevens, vol. 2, p. 960. + */ + if (todrop > ti->ti_len + || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { + /* + * Any valid FIN must be to the left of the window. + * At this point the FIN must be a duplicate or out + * of sequence; drop it. + */ + tiflags &= ~TH_FIN; + + /* + * Send an ACK to resynchronize and drop any data. + * But keep on processing for RST or ACK. + */ + tp->t_flags |= TF_ACKNOW; + todrop = ti->ti_len; + tcpstat.tcps_rcvduppack++; + tcpstat.tcps_rcvdupbyte += todrop; + } else { + tcpstat.tcps_rcvpartduppack++; + tcpstat.tcps_rcvpartdupbyte += todrop; + } + m_adj(m, todrop); + ti->ti_seq += todrop; + ti->ti_len -= todrop; + if (ti->ti_urp > todrop) + ti->ti_urp -= todrop; + else { + tiflags &= ~TH_URG; + ti->ti_urp = 0; + } + } + /* + * If new data are received on a connection after the + * user processes are gone, then RST the other end. + */ + if ((so->so_state & SS_NOFDREF) && + tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { + tp = tcp_close(tp); + tcpstat.tcps_rcvafterclose++; + goto dropwithreset; + } + + /* + * If segment ends after window, drop trailing data + * (and PUSH and FIN); if nothing left, just ACK. + */ + todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); + if (todrop > 0) { + tcpstat.tcps_rcvpackafterwin++; + if (todrop >= ti->ti_len) { + tcpstat.tcps_rcvbyteafterwin += ti->ti_len; + /* + * If a new connection request is received + * while in TIME_WAIT, drop the old connection + * and start over if the sequence numbers + * are above the previous ones. + */ + if (tiflags & TH_SYN && + tp->t_state == TCPS_TIME_WAIT && + SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { + iss = tp->rcv_nxt + TCP_ISSINCR; + tp = tcp_close(tp); + goto findso; + } + /* + * If window is closed can only take segments at + * window edge, and have to drop data and PUSH from + * incoming segments. Continue processing, but + * remember to ack. Otherwise, drop segment + * and ack. + */ + if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { + tp->t_flags |= TF_ACKNOW; + tcpstat.tcps_rcvwinprobe++; + } else + goto dropafterack; + } else + tcpstat.tcps_rcvbyteafterwin += todrop; + m_adj(m, -todrop); + ti->ti_len -= todrop; + tiflags &= ~(TH_PUSH|TH_FIN); + } + + /* + * If last ACK falls within this segment's sequence numbers, + * record its timestamp. + */ +/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && + * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + + * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { + * tp->ts_recent_age = tcp_now; + * tp->ts_recent = ts_val; + * } + */ + + /* + * If the RST bit is set examine the state: + * SYN_RECEIVED STATE: + * If passive open, return to LISTEN state. + * If active open, inform user that connection was refused. + * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: + * Inform user that connection was reset, and close tcb. + * CLOSING, LAST_ACK, TIME_WAIT STATES + * Close the tcb. + */ + if (tiflags&TH_RST) switch (tp->t_state) { + + case TCPS_SYN_RECEIVED: +/* so->so_error = ECONNREFUSED; */ + goto close; + + case TCPS_ESTABLISHED: + case TCPS_FIN_WAIT_1: + case TCPS_FIN_WAIT_2: + case TCPS_CLOSE_WAIT: +/* so->so_error = ECONNRESET; */ + close: + tp->t_state = TCPS_CLOSED; + tcpstat.tcps_drops++; + tp = tcp_close(tp); + goto drop; + + case TCPS_CLOSING: + case TCPS_LAST_ACK: + case TCPS_TIME_WAIT: + tp = tcp_close(tp); + goto drop; + } + + /* + * If a SYN is in the window, then this is an + * error and we send an RST and drop the connection. + */ + if (tiflags & TH_SYN) { + tp = tcp_drop(tp,0); + goto dropwithreset; + } + + /* + * If the ACK bit is off we drop the segment and return. + */ + if ((tiflags & TH_ACK) == 0) goto drop; + + /* + * Ack processing. + */ + switch (tp->t_state) { + /* + * In SYN_RECEIVED state if the ack ACKs our SYN then enter + * ESTABLISHED state and continue processing, otherwise + * send an RST. una<=ack<=max + */ + case TCPS_SYN_RECEIVED: + + if (SEQ_GT(tp->snd_una, ti->ti_ack) || + SEQ_GT(ti->ti_ack, tp->snd_max)) + goto dropwithreset; + tcpstat.tcps_connects++; + tp->t_state = TCPS_ESTABLISHED; + /* + * The sent SYN is ack'ed with our sequence number +1 + * The first data byte already in the buffer will get + * lost if no correction is made. This is only needed for + * SS_CTL since the buffer is empty otherwise. + * tp->snd_una++; or: + */ + tp->snd_una=ti->ti_ack; + if (so->so_state & SS_CTL) { + /* So tcp_ctl reports the right state */ + ret = tcp_ctl(so); + if (ret == 1) { + soisfconnected(so); + so->so_state &= ~SS_CTL; /* success XXX */ + } else if (ret == 2) { + so->so_state = SS_NOFDREF; /* CTL_CMD */ + } else { + needoutput = 1; + tp->t_state = TCPS_FIN_WAIT_1; + } + } else { + soisfconnected(so); + } + + /* Do window scaling? */ +/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == + * (TF_RCVD_SCALE|TF_REQ_SCALE)) { + * tp->snd_scale = tp->requested_s_scale; + * tp->rcv_scale = tp->request_r_scale; + * } + */ + (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); + tp->snd_wl1 = ti->ti_seq - 1; + /* Avoid ack processing; snd_una==ti_ack => dup ack */ + goto synrx_to_est; + /* fall into ... */ + + /* + * In ESTABLISHED state: drop duplicate ACKs; ACK out of range + * ACKs. If the ack is in the range + * tp->snd_una < ti->ti_ack <= tp->snd_max + * then advance tp->snd_una to ti->ti_ack and drop + * data from the retransmission queue. If this ACK reflects + * more up to date window information we update our window information. + */ + case TCPS_ESTABLISHED: + case TCPS_FIN_WAIT_1: + case TCPS_FIN_WAIT_2: + case TCPS_CLOSE_WAIT: + case TCPS_CLOSING: + case TCPS_LAST_ACK: + case TCPS_TIME_WAIT: + + if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { + if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { + tcpstat.tcps_rcvdupack++; + DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", + (long )m, (long )so)); + /* + * If we have outstanding data (other than + * a window probe), this is a completely + * duplicate ack (ie, window info didn't + * change), the ack is the biggest we've + * seen and we've seen exactly our rexmt + * threshold of them, assume a packet + * has been dropped and retransmit it. + * Kludge snd_nxt & the congestion + * window so we send only this one + * packet. + * + * We know we're losing at the current + * window size so do congestion avoidance + * (set ssthresh to half the current window + * and pull our congestion window back to + * the new ssthresh). + * + * Dup acks mean that packets have left the + * network (they're now cached at the receiver) + * so bump cwnd by the amount in the receiver + * to keep a constant cwnd packets in the + * network. + */ + if (tp->t_timer[TCPT_REXMT] == 0 || + ti->ti_ack != tp->snd_una) + tp->t_dupacks = 0; + else if (++tp->t_dupacks == tcprexmtthresh) { + tcp_seq onxt = tp->snd_nxt; + u_int win = + min(tp->snd_wnd, tp->snd_cwnd) / 2 / + tp->t_maxseg; + + if (win < 2) + win = 2; + tp->snd_ssthresh = win * tp->t_maxseg; + tp->t_timer[TCPT_REXMT] = 0; + tp->t_rtt = 0; + tp->snd_nxt = ti->ti_ack; + tp->snd_cwnd = tp->t_maxseg; + (void) tcp_output(tp); + tp->snd_cwnd = tp->snd_ssthresh + + tp->t_maxseg * tp->t_dupacks; + if (SEQ_GT(onxt, tp->snd_nxt)) + tp->snd_nxt = onxt; + goto drop; + } else if (tp->t_dupacks > tcprexmtthresh) { + tp->snd_cwnd += tp->t_maxseg; + (void) tcp_output(tp); + goto drop; + } + } else + tp->t_dupacks = 0; + break; + } + synrx_to_est: + /* + * If the congestion window was inflated to account + * for the other side's cached packets, retract it. + */ + if (tp->t_dupacks > tcprexmtthresh && + tp->snd_cwnd > tp->snd_ssthresh) + tp->snd_cwnd = tp->snd_ssthresh; + tp->t_dupacks = 0; + if (SEQ_GT(ti->ti_ack, tp->snd_max)) { + tcpstat.tcps_rcvacktoomuch++; + goto dropafterack; + } + acked = ti->ti_ack - tp->snd_una; + tcpstat.tcps_rcvackpack++; + tcpstat.tcps_rcvackbyte += acked; + + /* + * If we have a timestamp reply, update smoothed + * round trip time. If no timestamp is present but + * transmit timer is running and timed sequence + * number was acked, update smoothed round trip time. + * Since we now have an rtt measurement, cancel the + * timer backoff (cf., Phil Karn's retransmit alg.). + * Recompute the initial retransmit timer. + */ +/* if (ts_present) + * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); + * else + */ + if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) + tcp_xmit_timer(tp,tp->t_rtt); + + /* + * If all outstanding data is acked, stop retransmit + * timer and remember to restart (more output or persist). + * If there is more data to be acked, restart retransmit + * timer, using current (possibly backed-off) value. + */ + if (ti->ti_ack == tp->snd_max) { + tp->t_timer[TCPT_REXMT] = 0; + needoutput = 1; + } else if (tp->t_timer[TCPT_PERSIST] == 0) + tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; + /* + * When new data is acked, open the congestion window. + * If the window gives us less than ssthresh packets + * in flight, open exponentially (maxseg per packet). + * Otherwise open linearly: maxseg per window + * (maxseg^2 / cwnd per packet). + */ + { + register u_int cw = tp->snd_cwnd; + register u_int incr = tp->t_maxseg; + + if (cw > tp->snd_ssthresh) + incr = incr * incr / cw; + tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); + } + if (acked > so->so_snd.sb_cc) { + tp->snd_wnd -= so->so_snd.sb_cc; + sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); + ourfinisacked = 1; + } else { + sbdrop(&so->so_snd, acked); + tp->snd_wnd -= acked; + ourfinisacked = 0; + } + /* + * XXX sowwakup is called when data is acked and there's room for + * for more data... it should read() the socket + */ +/* if (so->so_snd.sb_flags & SB_NOTIFY) + * sowwakeup(so); + */ + tp->snd_una = ti->ti_ack; + if (SEQ_LT(tp->snd_nxt, tp->snd_una)) + tp->snd_nxt = tp->snd_una; + + switch (tp->t_state) { + + /* + * In FIN_WAIT_1 STATE in addition to the processing + * for the ESTABLISHED state if our FIN is now acknowledged + * then enter FIN_WAIT_2. + */ + case TCPS_FIN_WAIT_1: + if (ourfinisacked) { + /* + * If we can't receive any more + * data, then closing user can proceed. + * Starting the timer is contrary to the + * specification, but if we don't get a FIN + * we'll hang forever. + */ + if (so->so_state & SS_FCANTRCVMORE) { + soisfdisconnected(so); + tp->t_timer[TCPT_2MSL] = tcp_maxidle; + } + tp->t_state = TCPS_FIN_WAIT_2; + } + break; + + /* + * In CLOSING STATE in addition to the processing for + * the ESTABLISHED state if the ACK acknowledges our FIN + * then enter the TIME-WAIT state, otherwise ignore + * the segment. + */ + case TCPS_CLOSING: + if (ourfinisacked) { + tp->t_state = TCPS_TIME_WAIT; + tcp_canceltimers(tp); + tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; + soisfdisconnected(so); + } + break; + + /* + * In LAST_ACK, we may still be waiting for data to drain + * and/or to be acked, as well as for the ack of our FIN. + * If our FIN is now acknowledged, delete the TCB, + * enter the closed state and return. + */ + case TCPS_LAST_ACK: + if (ourfinisacked) { + tp = tcp_close(tp); + goto drop; + } + break; + + /* + * In TIME_WAIT state the only thing that should arrive + * is a retransmission of the remote FIN. Acknowledge + * it and restart the finack timer. + */ + case TCPS_TIME_WAIT: + tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; + goto dropafterack; + } + } /* switch(tp->t_state) */ + +step6: + /* + * Update window information. + * Don't look at window if no ACK: TAC's send garbage on first SYN. + */ + if ((tiflags & TH_ACK) && + (SEQ_LT(tp->snd_wl1, ti->ti_seq) || + (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || + (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { + /* keep track of pure window updates */ + if (ti->ti_len == 0 && + tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) + tcpstat.tcps_rcvwinupd++; + tp->snd_wnd = tiwin; + tp->snd_wl1 = ti->ti_seq; + tp->snd_wl2 = ti->ti_ack; + if (tp->snd_wnd > tp->max_sndwnd) + tp->max_sndwnd = tp->snd_wnd; + needoutput = 1; + } + + /* + * Process segments with URG. + */ + if ((tiflags & TH_URG) && ti->ti_urp && + TCPS_HAVERCVDFIN(tp->t_state) == 0) { + /* + * This is a kludge, but if we receive and accept + * random urgent pointers, we'll crash in + * soreceive. It's hard to imagine someone + * actually wanting to send this much urgent data. + */ + if (ti->ti_urp + so->so_rcv.sb_cc > so->so_rcv.sb_datalen) { + ti->ti_urp = 0; + tiflags &= ~TH_URG; + goto dodata; + } + /* + * If this segment advances the known urgent pointer, + * then mark the data stream. This should not happen + * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since + * a FIN has been received from the remote side. + * In these states we ignore the URG. + * + * According to RFC961 (Assigned Protocols), + * the urgent pointer points to the last octet + * of urgent data. We continue, however, + * to consider it to indicate the first octet + * of data past the urgent section as the original + * spec states (in one of two places). + */ + if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { + tp->rcv_up = ti->ti_seq + ti->ti_urp; + so->so_urgc = so->so_rcv.sb_cc + + (tp->rcv_up - tp->rcv_nxt); /* -1; */ + tp->rcv_up = ti->ti_seq + ti->ti_urp; + + } + } else + /* + * If no out of band data is expected, + * pull receive urgent pointer along + * with the receive window. + */ + if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) + tp->rcv_up = tp->rcv_nxt; +dodata: + + /* + * Process the segment text, merging it into the TCP sequencing queue, + * and arranging for acknowledgment of receipt if necessary. + * This process logically involves adjusting tp->rcv_wnd as data + * is presented to the user (this happens in tcp_usrreq.c, + * case PRU_RCVD). If a FIN has already been received on this + * connection then we just ignore the text. + */ + if ((ti->ti_len || (tiflags&TH_FIN)) && + TCPS_HAVERCVDFIN(tp->t_state) == 0) { + TCP_REASS(tp, ti, m, so, tiflags); + /* + * Note the amount of data that peer has sent into + * our window, in order to estimate the sender's + * buffer size. + */ + len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); + } else { + m_free(m); + tiflags &= ~TH_FIN; + } + + /* + * If FIN is received ACK the FIN and let the user know + * that the connection is closing. + */ + if (tiflags & TH_FIN) { + if (TCPS_HAVERCVDFIN(tp->t_state) == 0) { + /* + * If we receive a FIN we can't send more data, + * set it SS_FDRAIN + * Shutdown the socket if there is no rx data in the + * buffer. + * soread() is called on completion of shutdown() and + * will got to TCPS_LAST_ACK, and use tcp_output() + * to send the FIN. + */ +/* sofcantrcvmore(so); */ + sofwdrain(so); + + tp->t_flags |= TF_ACKNOW; + tp->rcv_nxt++; + } + switch (tp->t_state) { + + /* + * In SYN_RECEIVED and ESTABLISHED STATES + * enter the CLOSE_WAIT state. + */ + case TCPS_SYN_RECEIVED: + case TCPS_ESTABLISHED: + if(so->so_emu == EMU_CTL) /* no shutdown on socket */ + tp->t_state = TCPS_LAST_ACK; + else + tp->t_state = TCPS_CLOSE_WAIT; + break; + + /* + * If still in FIN_WAIT_1 STATE FIN has not been acked so + * enter the CLOSING state. + */ + case TCPS_FIN_WAIT_1: + tp->t_state = TCPS_CLOSING; + break; + + /* + * In FIN_WAIT_2 state enter the TIME_WAIT state, + * starting the time-wait timer, turning off the other + * standard timers. + */ + case TCPS_FIN_WAIT_2: + tp->t_state = TCPS_TIME_WAIT; + tcp_canceltimers(tp); + tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; + soisfdisconnected(so); + break; + + /* + * In TIME_WAIT state restart the 2 MSL time_wait timer. + */ + case TCPS_TIME_WAIT: + tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; + break; + } + } + + /* + * If this is a small packet, then ACK now - with Nagel + * congestion avoidance sender won't send more until + * he gets an ACK. + * + * See above. + */ +/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { + */ +/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && + * (so->so_iptos & IPTOS_LOWDELAY) == 0) || + * ((so->so_iptos & IPTOS_LOWDELAY) && + * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { + */ + if (ti->ti_len && (unsigned)ti->ti_len <= 5 && + ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { + tp->t_flags |= TF_ACKNOW; + } + + /* + * Return any desired output. + */ + if (needoutput || (tp->t_flags & TF_ACKNOW)) { + (void) tcp_output(tp); + } + return; + +dropafterack: + /* + * Generate an ACK dropping incoming segment if it occupies + * sequence space, where the ACK reflects our state. + */ + if (tiflags & TH_RST) + goto drop; + m_freem(m); + tp->t_flags |= TF_ACKNOW; + (void) tcp_output(tp); + return; + +dropwithreset: + /* reuses m if m!=NULL, m_free() unnecessary */ + if (tiflags & TH_ACK) + tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); + else { + if (tiflags & TH_SYN) ti->ti_len++; + tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, + TH_RST|TH_ACK); + } + + return; + +drop: + /* + * Drop space held by incoming segment and return. + */ + m_free(m); + + return; +} + + /* , ts_present, ts_val, ts_ecr) */ +/* int *ts_present; + * u_int32_t *ts_val, *ts_ecr; + */ +void +tcp_dooptions(tp, cp, cnt, ti) + struct tcpcb *tp; + u_char *cp; + int cnt; + struct tcpiphdr *ti; +{ + u_int16_t mss; + int opt, optlen; + + DEBUG_CALL("tcp_dooptions"); + DEBUG_ARGS((dfd," tp = %lx cnt=%i \n", (long )tp, cnt)); + + for (; cnt > 0; cnt -= optlen, cp += optlen) { + opt = cp[0]; + if (opt == TCPOPT_EOL) + break; + if (opt == TCPOPT_NOP) + optlen = 1; + else { + optlen = cp[1]; + if (optlen <= 0) + break; + } + switch (opt) { + + default: + continue; + + case TCPOPT_MAXSEG: + if (optlen != TCPOLEN_MAXSEG) + continue; + if (!(ti->ti_flags & TH_SYN)) + continue; + memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); + NTOHS(mss); + (void) tcp_mss(tp, mss); /* sets t_maxseg */ + break; + +/* case TCPOPT_WINDOW: + * if (optlen != TCPOLEN_WINDOW) + * continue; + * if (!(ti->ti_flags & TH_SYN)) + * continue; + * tp->t_flags |= TF_RCVD_SCALE; + * tp->requested_s_scale = min(cp[2], TCP_MAX_WINSHIFT); + * break; + */ +/* case TCPOPT_TIMESTAMP: + * if (optlen != TCPOLEN_TIMESTAMP) + * continue; + * *ts_present = 1; + * memcpy((char *) ts_val, (char *)cp + 2, sizeof(*ts_val)); + * NTOHL(*ts_val); + * memcpy((char *) ts_ecr, (char *)cp + 6, sizeof(*ts_ecr)); + * NTOHL(*ts_ecr); + * + */ /* + * * A timestamp received in a SYN makes + * * it ok to send timestamp requests and replies. + * */ +/* if (ti->ti_flags & TH_SYN) { + * tp->t_flags |= TF_RCVD_TSTMP; + * tp->ts_recent = *ts_val; + * tp->ts_recent_age = tcp_now; + * } + */ break; + } + } +} + + +/* + * Pull out of band byte out of a segment so + * it doesn't appear in the user's data queue. + * It is still reflected in the segment length for + * sequencing purposes. + */ + +#ifdef notdef + +void +tcp_pulloutofband(so, ti, m) + struct socket *so; + struct tcpiphdr *ti; + register struct mbuf *m; +{ + int cnt = ti->ti_urp - 1; + + while (cnt >= 0) { + if (m->m_len > cnt) { + char *cp = mtod(m, caddr_t) + cnt; + struct tcpcb *tp = sototcpcb(so); + + tp->t_iobc = *cp; + tp->t_oobflags |= TCPOOB_HAVEDATA; + memcpy(sp, cp+1, (unsigned)(m->m_len - cnt - 1)); + m->m_len--; + return; + } + cnt -= m->m_len; + m = m->m_next; /* XXX WRONG! Fix it! */ + if (m == 0) + break; + } + panic("tcp_pulloutofband"); +} + +#endif /* notdef */ + +/* + * Collect new round-trip time estimate + * and update averages and current timeout. + */ + +void +tcp_xmit_timer(tp, rtt) + register struct tcpcb *tp; + int rtt; +{ + register short delta; + + DEBUG_CALL("tcp_xmit_timer"); + DEBUG_ARG("tp = %lx", (long)tp); + DEBUG_ARG("rtt = %d", rtt); + + tcpstat.tcps_rttupdated++; + if (tp->t_srtt != 0) { + /* + * srtt is stored as fixed point with 3 bits after the + * binary point (i.e., scaled by 8). The following magic + * is equivalent to the smoothing algorithm in rfc793 with + * an alpha of .875 (srtt = rtt/8 + srtt*7/8 in fixed + * point). Adjust rtt to origin 0. + */ + delta = rtt - 1 - (tp->t_srtt >> TCP_RTT_SHIFT); + if ((tp->t_srtt += delta) <= 0) + tp->t_srtt = 1; + /* + * We accumulate a smoothed rtt variance (actually, a + * smoothed mean difference), then set the retransmit + * timer to smoothed rtt + 4 times the smoothed variance. + * rttvar is stored as fixed point with 2 bits after the + * binary point (scaled by 4). The following is + * equivalent to rfc793 smoothing with an alpha of .75 + * (rttvar = rttvar*3/4 + |delta| / 4). This replaces + * rfc793's wired-in beta. + */ + if (delta < 0) + delta = -delta; + delta -= (tp->t_rttvar >> TCP_RTTVAR_SHIFT); + if ((tp->t_rttvar += delta) <= 0) + tp->t_rttvar = 1; + } else { + /* + * No rtt measurement yet - use the unsmoothed rtt. + * Set the variance to half the rtt (so our first + * retransmit happens at 3*rtt). + */ + tp->t_srtt = rtt << TCP_RTT_SHIFT; + tp->t_rttvar = rtt << (TCP_RTTVAR_SHIFT - 1); + } + tp->t_rtt = 0; + tp->t_rxtshift = 0; + + /* + * the retransmit should happen at rtt + 4 * rttvar. + * Because of the way we do the smoothing, srtt and rttvar + * will each average +1/2 tick of bias. When we compute + * the retransmit timer, we want 1/2 tick of rounding and + * 1 extra tick because of +-1/2 tick uncertainty in the + * firing of the timer. The bias will give us exactly the + * 1.5 tick we need. But, because the bias is + * statistical, we have to test that we don't drop below + * the minimum feasible timer (which is 2 ticks). + */ + TCPT_RANGESET(tp->t_rxtcur, TCP_REXMTVAL(tp), + (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ + + /* + * We received an ack for a packet that wasn't retransmitted; + * it is probably safe to discard any error indications we've + * received recently. This isn't quite right, but close enough + * for now (a route might have failed after we sent a segment, + * and the return path might not be symmetrical). + */ + tp->t_softerror = 0; +} + +/* + * Determine a reasonable value for maxseg size. + * If the route is known, check route for mtu. + * If none, use an mss that can be handled on the outgoing + * interface without forcing IP to fragment; if bigger than + * an mbuf cluster (MCLBYTES), round down to nearest multiple of MCLBYTES + * to utilize large mbufs. If no route is found, route has no mtu, + * or the destination isn't local, use a default, hopefully conservative + * size (usually 512 or the default IP max size, but no more than the mtu + * of the interface), as we can't discover anything about intervening + * gateways or networks. We also initialize the congestion/slow start + * window to be a single segment if the destination isn't local. + * While looking at the routing entry, we also initialize other path-dependent + * parameters from pre-set or cached values in the routing entry. + */ + +int +tcp_mss(tp, offer) + register struct tcpcb *tp; + u_int offer; +{ + struct socket *so = tp->t_socket; + int mss; + + DEBUG_CALL("tcp_mss"); + DEBUG_ARG("tp = %lx", (long)tp); + DEBUG_ARG("offer = %d", offer); + + mss = min(if_mtu, if_mru) - sizeof(struct tcpiphdr); + if (offer) + mss = min(mss, offer); + mss = max(mss, 32); + if (mss < tp->t_maxseg || offer != 0) + tp->t_maxseg = mss; + + tp->snd_cwnd = mss; + + sbreserve(&so->so_snd, tcp_sndspace+((tcp_sndspace%mss)?(mss-(tcp_sndspace%mss)):0)); + sbreserve(&so->so_rcv, tcp_rcvspace+((tcp_rcvspace%mss)?(mss-(tcp_rcvspace%mss)):0)); + + DEBUG_MISC((dfd, " returning mss = %d\n", mss)); + + return mss; +} diff --git a/SheepShaver/src/slirp/tcp_output.c b/SheepShaver/src/slirp/tcp_output.c new file mode 100755 index 000000000..5cb1a61e3 --- /dev/null +++ b/SheepShaver/src/slirp/tcp_output.c @@ -0,0 +1,601 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_output.c 8.3 (Berkeley) 12/30/93 + * tcp_output.c,v 1.3 1994/09/15 10:36:55 davidg Exp + */ + +/* + * Changes and additions relating to SLiRP + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include + +/* + * Since this is only used in "stats socket", we give meaning + * names instead of the REAL names + */ +char *tcpstates[] = { +/* "CLOSED", "LISTEN", "SYN_SENT", "SYN_RCVD", */ + "REDIRECT", "LISTEN", "SYN_SENT", "SYN_RCVD", + "ESTABLISHED", "CLOSE_WAIT", "FIN_WAIT_1", "CLOSING", + "LAST_ACK", "FIN_WAIT_2", "TIME_WAIT", +}; + +u_char tcp_outflags[TCP_NSTATES] = { + TH_RST|TH_ACK, 0, TH_SYN, TH_SYN|TH_ACK, + TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, + TH_FIN|TH_ACK, TH_ACK, TH_ACK, +}; + + +#define MAX_TCPOPTLEN 32 /* max # bytes that go in options */ + +/* + * Tcp output routine: figure out what should be sent and send it. + */ +int +tcp_output(tp) + register struct tcpcb *tp; +{ + register struct socket *so = tp->t_socket; + register long len, win; + int off, flags, error; + register struct mbuf *m; + register struct tcpiphdr *ti; + u_char opt[MAX_TCPOPTLEN]; + unsigned optlen, hdrlen; + int idle, sendalot; + + DEBUG_CALL("tcp_output"); + DEBUG_ARG("tp = %lx", (long )tp); + + /* + * Determine length of data that should be transmitted, + * and flags that will be used. + * If there is some data or critical controls (SYN, RST) + * to send, then transmit; otherwise, investigate further. + */ + idle = (tp->snd_max == tp->snd_una); + if (idle && tp->t_idle >= tp->t_rxtcur) + /* + * We have been idle for "a while" and no acks are + * expected to clock out any data we send -- + * slow start to get ack "clock" running again. + */ + tp->snd_cwnd = tp->t_maxseg; +again: + sendalot = 0; + off = tp->snd_nxt - tp->snd_una; + win = min(tp->snd_wnd, tp->snd_cwnd); + + flags = tcp_outflags[tp->t_state]; + + DEBUG_MISC((dfd, " --- tcp_output flags = 0x%x\n",flags)); + + /* + * If in persist timeout with window of 0, send 1 byte. + * Otherwise, if window is small but nonzero + * and timer expired, we will send what we can + * and go to transmit state. + */ + if (tp->t_force) { + if (win == 0) { + /* + * If we still have some data to send, then + * clear the FIN bit. Usually this would + * happen below when it realizes that we + * aren't sending all the data. However, + * if we have exactly 1 byte of unset data, + * then it won't clear the FIN bit below, + * and if we are in persist state, we wind + * up sending the packet without recording + * that we sent the FIN bit. + * + * We can't just blindly clear the FIN bit, + * because if we don't have any more data + * to send then the probe will be the FIN + * itself. + */ + if (off < so->so_snd.sb_cc) + flags &= ~TH_FIN; + win = 1; + } else { + tp->t_timer[TCPT_PERSIST] = 0; + tp->t_rxtshift = 0; + } + } + + len = min(so->so_snd.sb_cc, win) - off; + + if (len < 0) { + /* + * If FIN has been sent but not acked, + * but we haven't been called to retransmit, + * len will be -1. Otherwise, window shrank + * after we sent into it. If window shrank to 0, + * cancel pending retransmit and pull snd_nxt + * back to (closed) window. We will enter persist + * state below. If the window didn't close completely, + * just wait for an ACK. + */ + len = 0; + if (win == 0) { + tp->t_timer[TCPT_REXMT] = 0; + tp->snd_nxt = tp->snd_una; + } + } + + if (len > tp->t_maxseg) { + len = tp->t_maxseg; + sendalot = 1; + } + if (SEQ_LT(tp->snd_nxt + len, tp->snd_una + so->so_snd.sb_cc)) + flags &= ~TH_FIN; + + win = sbspace(&so->so_rcv); + + /* + * Sender silly window avoidance. If connection is idle + * and can send all data, a maximum segment, + * at least a maximum default-size segment do it, + * or are forced, do it; otherwise don't bother. + * If peer's buffer is tiny, then send + * when window is at least half open. + * If retransmitting (possibly after persist timer forced us + * to send into a small window), then must resend. + */ + if (len) { + if (len == tp->t_maxseg) + goto send; + if ((1 || idle || tp->t_flags & TF_NODELAY) && + len + off >= so->so_snd.sb_cc) + goto send; + if (tp->t_force) + goto send; + if (len >= tp->max_sndwnd / 2 && tp->max_sndwnd > 0) + goto send; + if (SEQ_LT(tp->snd_nxt, tp->snd_max)) + goto send; + } + + /* + * Compare available window to amount of window + * known to peer (as advertised window less + * next expected input). If the difference is at least two + * max size segments, or at least 50% of the maximum possible + * window, then want to send a window update to peer. + */ + if (win > 0) { + /* + * "adv" is the amount we can increase the window, + * taking into account that we are limited by + * TCP_MAXWIN << tp->rcv_scale. + */ + long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - + (tp->rcv_adv - tp->rcv_nxt); + + if (adv >= (long) (2 * tp->t_maxseg)) + goto send; + if (2 * adv >= (long) so->so_rcv.sb_datalen) + goto send; + } + + /* + * Send if we owe peer an ACK. + */ + if (tp->t_flags & TF_ACKNOW) + goto send; + if (flags & (TH_SYN|TH_RST)) + goto send; + if (SEQ_GT(tp->snd_up, tp->snd_una)) + goto send; + /* + * If our state indicates that FIN should be sent + * and we have not yet done so, or we're retransmitting the FIN, + * then we need to send. + */ + if (flags & TH_FIN && + ((tp->t_flags & TF_SENTFIN) == 0 || tp->snd_nxt == tp->snd_una)) + goto send; + + /* + * TCP window updates are not reliable, rather a polling protocol + * using ``persist'' packets is used to insure receipt of window + * updates. The three ``states'' for the output side are: + * idle not doing retransmits or persists + * persisting to move a small or zero window + * (re)transmitting and thereby not persisting + * + * tp->t_timer[TCPT_PERSIST] + * is set when we are in persist state. + * tp->t_force + * is set when we are called to send a persist packet. + * tp->t_timer[TCPT_REXMT] + * is set when we are retransmitting + * The output side is idle when both timers are zero. + * + * If send window is too small, there is data to transmit, and no + * retransmit or persist is pending, then go to persist state. + * If nothing happens soon, send when timer expires: + * if window is nonzero, transmit what we can, + * otherwise force out a byte. + */ + if (so->so_snd.sb_cc && tp->t_timer[TCPT_REXMT] == 0 && + tp->t_timer[TCPT_PERSIST] == 0) { + tp->t_rxtshift = 0; + tcp_setpersist(tp); + } + + /* + * No reason to send a segment, just return. + */ + tcpstat.tcps_didnuttin++; + + return (0); + +send: + /* + * Before ESTABLISHED, force sending of initial options + * unless TCP set not to do any options. + * NOTE: we assume that the IP/TCP header plus TCP options + * always fit in a single mbuf, leaving room for a maximum + * link header, i.e. + * max_linkhdr + sizeof (struct tcpiphdr) + optlen <= MHLEN + */ + optlen = 0; + hdrlen = sizeof (struct tcpiphdr); + if (flags & TH_SYN) { + tp->snd_nxt = tp->iss; + if ((tp->t_flags & TF_NOOPT) == 0) { + u_int16_t mss; + + opt[0] = TCPOPT_MAXSEG; + opt[1] = 4; + mss = htons((u_int16_t) tcp_mss(tp, 0)); + memcpy((caddr_t)(opt + 2), (caddr_t)&mss, sizeof(mss)); + optlen = 4; + +/* if ((tp->t_flags & TF_REQ_SCALE) && + * ((flags & TH_ACK) == 0 || + * (tp->t_flags & TF_RCVD_SCALE))) { + * *((u_int32_t *) (opt + optlen)) = htonl( + * TCPOPT_NOP << 24 | + * TCPOPT_WINDOW << 16 | + * TCPOLEN_WINDOW << 8 | + * tp->request_r_scale); + * optlen += 4; + * } + */ + } + } + + /* + * Send a timestamp and echo-reply if this is a SYN and our side + * wants to use timestamps (TF_REQ_TSTMP is set) or both our side + * and our peer have sent timestamps in our SYN's. + */ +/* if ((tp->t_flags & (TF_REQ_TSTMP|TF_NOOPT)) == TF_REQ_TSTMP && + * (flags & TH_RST) == 0 && + * ((flags & (TH_SYN|TH_ACK)) == TH_SYN || + * (tp->t_flags & TF_RCVD_TSTMP))) { + * u_int32_t *lp = (u_int32_t *)(opt + optlen); + * + * / * Form timestamp option as shown in appendix A of RFC 1323. * / + * *lp++ = htonl(TCPOPT_TSTAMP_HDR); + * *lp++ = htonl(tcp_now); + * *lp = htonl(tp->ts_recent); + * optlen += TCPOLEN_TSTAMP_APPA; + * } + */ + hdrlen += optlen; + + /* + * Adjust data length if insertion of options will + * bump the packet length beyond the t_maxseg length. + */ + if (len > tp->t_maxseg - optlen) { + len = tp->t_maxseg - optlen; + sendalot = 1; + } + + /* + * Grab a header mbuf, attaching a copy of data to + * be transmitted, and initialize the header from + * the template for sends on this connection. + */ + if (len) { + if (tp->t_force && len == 1) + tcpstat.tcps_sndprobe++; + else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) { + tcpstat.tcps_sndrexmitpack++; + tcpstat.tcps_sndrexmitbyte += len; + } else { + tcpstat.tcps_sndpack++; + tcpstat.tcps_sndbyte += len; + } + + m = m_get(); + if (m == NULL) { +/* error = ENOBUFS; */ + error = 1; + goto out; + } + m->m_data += if_maxlinkhdr; + m->m_len = hdrlen; + + /* + * This will always succeed, since we make sure our mbufs + * are big enough to hold one MSS packet + header + ... etc. + */ +/* if (len <= MHLEN - hdrlen - max_linkhdr) { */ + + sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); + m->m_len += len; + +/* } else { + * m->m_next = m_copy(so->so_snd.sb_mb, off, (int) len); + * if (m->m_next == 0) + * len = 0; + * } + */ + /* + * If we're sending everything we've got, set PUSH. + * (This will keep happy those implementations which only + * give data to the user when a buffer fills or + * a PUSH comes in.) + */ + if (off + len == so->so_snd.sb_cc) + flags |= TH_PUSH; + } else { + if (tp->t_flags & TF_ACKNOW) + tcpstat.tcps_sndacks++; + else if (flags & (TH_SYN|TH_FIN|TH_RST)) + tcpstat.tcps_sndctrl++; + else if (SEQ_GT(tp->snd_up, tp->snd_una)) + tcpstat.tcps_sndurg++; + else + tcpstat.tcps_sndwinup++; + + m = m_get(); + if (m == NULL) { +/* error = ENOBUFS; */ + error = 1; + goto out; + } + m->m_data += if_maxlinkhdr; + m->m_len = hdrlen; + } + + ti = mtod(m, struct tcpiphdr *); + + memcpy((caddr_t)ti, &tp->t_template, sizeof (struct tcpiphdr)); + + /* + * Fill in fields, remembering maximum advertised + * window for use in delaying messages about window sizes. + * If resending a FIN, be sure not to use a new sequence number. + */ + if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && + tp->snd_nxt == tp->snd_max) + tp->snd_nxt--; + /* + * If we are doing retransmissions, then snd_nxt will + * not reflect the first unsent octet. For ACK only + * packets, we do not want the sequence number of the + * retransmitted packet, we want the sequence number + * of the next unsent octet. So, if there is no data + * (and no SYN or FIN), use snd_max instead of snd_nxt + * when filling in ti_seq. But if we are in persist + * state, snd_max might reflect one byte beyond the + * right edge of the window, so use snd_nxt in that + * case, since we know we aren't doing a retransmission. + * (retransmit and persist are mutually exclusive...) + */ + if (len || (flags & (TH_SYN|TH_FIN)) || tp->t_timer[TCPT_PERSIST]) + ti->ti_seq = htonl(tp->snd_nxt); + else + ti->ti_seq = htonl(tp->snd_max); + ti->ti_ack = htonl(tp->rcv_nxt); + if (optlen) { + memcpy((caddr_t)(ti + 1), (caddr_t)opt, optlen); + ti->ti_off = (sizeof (struct tcphdr) + optlen) >> 2; + } + ti->ti_flags = flags; + /* + * Calculate receive window. Don't shrink window, + * but avoid silly window syndrome. + */ + if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) + win = 0; + if (win > (long)TCP_MAXWIN << tp->rcv_scale) + win = (long)TCP_MAXWIN << tp->rcv_scale; + if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) + win = (long)(tp->rcv_adv - tp->rcv_nxt); + ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); + + if (SEQ_GT(tp->snd_up, tp->snd_una)) { + ti->ti_urp = htons((u_int16_t)(tp->snd_up - ntohl(ti->ti_seq))); +#ifdef notdef + if (SEQ_GT(tp->snd_up, tp->snd_nxt)) { + ti->ti_urp = htons((u_int16_t)(tp->snd_up - tp->snd_nxt)); +#endif + ti->ti_flags |= TH_URG; + } else + /* + * If no urgent pointer to send, then we pull + * the urgent pointer to the left edge of the send window + * so that it doesn't drift into the send window on sequence + * number wraparound. + */ + tp->snd_up = tp->snd_una; /* drag it along */ + + /* + * Put TCP length in extended header, and then + * checksum extended header and data. + */ + if (len + optlen) + ti->ti_len = htons((u_int16_t)(sizeof (struct tcphdr) + + optlen + len)); + ti->ti_sum = cksum(m, (int)(hdrlen + len)); + + /* + * In transmit state, time the transmission and arrange for + * the retransmit. In persist state, just set snd_max. + */ + if (tp->t_force == 0 || tp->t_timer[TCPT_PERSIST] == 0) { + tcp_seq startseq = tp->snd_nxt; + + /* + * Advance snd_nxt over sequence space of this segment. + */ + if (flags & (TH_SYN|TH_FIN)) { + if (flags & TH_SYN) + tp->snd_nxt++; + if (flags & TH_FIN) { + tp->snd_nxt++; + tp->t_flags |= TF_SENTFIN; + } + } + tp->snd_nxt += len; + if (SEQ_GT(tp->snd_nxt, tp->snd_max)) { + tp->snd_max = tp->snd_nxt; + /* + * Time this transmission if not a retransmission and + * not currently timing anything. + */ + if (tp->t_rtt == 0) { + tp->t_rtt = 1; + tp->t_rtseq = startseq; + tcpstat.tcps_segstimed++; + } + } + + /* + * Set retransmit timer if not currently set, + * and not doing an ack or a keep-alive probe. + * Initial value for retransmit timer is smoothed + * round-trip time + 2 * round-trip time variance. + * Initialize shift counter which is used for backoff + * of retransmit time. + */ + if (tp->t_timer[TCPT_REXMT] == 0 && + tp->snd_nxt != tp->snd_una) { + tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; + if (tp->t_timer[TCPT_PERSIST]) { + tp->t_timer[TCPT_PERSIST] = 0; + tp->t_rxtshift = 0; + } + } + } else + if (SEQ_GT(tp->snd_nxt + len, tp->snd_max)) + tp->snd_max = tp->snd_nxt + len; + + /* + * Fill in IP length and desired time to live and + * send to IP level. There should be a better way + * to handle ttl and tos; we could keep them in + * the template, but need a way to checksum without them. + */ + m->m_len = hdrlen + len; /* XXX Needed? m_len should be correct */ + + { + + ((struct ip *)ti)->ip_len = m->m_len; + + ((struct ip *)ti)->ip_ttl = ip_defttl; + ((struct ip *)ti)->ip_tos = so->so_iptos; + +/* #if BSD >= 43 */ + /* Don't do IP options... */ +/* error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route, + * so->so_options & SO_DONTROUTE, 0); + */ + error = ip_output(so, m); + +/* #else + * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, + * so->so_options & SO_DONTROUTE); + * #endif + */ + } + if (error) { +out: +/* if (error == ENOBUFS) { + * tcp_quench(tp->t_inpcb, 0); + * return (0); + * } + */ +/* if ((error == EHOSTUNREACH || error == ENETDOWN) + * && TCPS_HAVERCVDSYN(tp->t_state)) { + * tp->t_softerror = error; + * return (0); + * } + */ + return (error); + } + tcpstat.tcps_sndtotal++; + + /* + * Data sent (as far as we can tell). + * If this advertises a larger window than any other segment, + * then remember the size of the advertised window. + * Any pending ACK has now been sent. + */ + if (win > 0 && SEQ_GT(tp->rcv_nxt+win, tp->rcv_adv)) + tp->rcv_adv = tp->rcv_nxt + win; + tp->last_ack_sent = tp->rcv_nxt; + tp->t_flags &= ~(TF_ACKNOW|TF_DELACK); + if (sendalot) + goto again; + + return (0); +} + +void +tcp_setpersist(tp) + register struct tcpcb *tp; +{ + int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; + +/* if (tp->t_timer[TCPT_REXMT]) + * panic("tcp_output REXMT"); + */ + /* + * Start/restart persistence timer. + */ + TCPT_RANGESET(tp->t_timer[TCPT_PERSIST], + t * tcp_backoff[tp->t_rxtshift], + TCPTV_PERSMIN, TCPTV_PERSMAX); + if (tp->t_rxtshift < TCP_MAXRXTSHIFT) + tp->t_rxtshift++; +} diff --git a/SheepShaver/src/slirp/tcp_subr.c b/SheepShaver/src/slirp/tcp_subr.c new file mode 100755 index 000000000..391350802 --- /dev/null +++ b/SheepShaver/src/slirp/tcp_subr.c @@ -0,0 +1,1324 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_subr.c 8.1 (Berkeley) 6/10/93 + * tcp_subr.c,v 1.5 1994/10/08 22:39:58 phk Exp + */ + +/* + * Changes and additions relating to SLiRP + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#define WANT_SYS_IOCTL_H +#include +#include + +/* patchable/settable parameters for tcp */ +int tcp_mssdflt = TCP_MSS; +int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; +int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ +int tcp_rcvspace; /* You may want to change this */ +int tcp_sndspace; /* Keep small if you have an error prone link */ + +/* + * Tcp initialization + */ +void +tcp_init() +{ + tcp_iss = 1; /* wrong */ + tcb.so_next = tcb.so_prev = &tcb; + + /* tcp_rcvspace = our Window we advertise to the remote */ + tcp_rcvspace = TCP_RCVSPACE; + tcp_sndspace = TCP_SNDSPACE; + + /* Make sure tcp_sndspace is at least 2*MSS */ + if (tcp_sndspace < 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr))) + tcp_sndspace = 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr)); +} + +/* + * Create template to be used to send tcp packets on a connection. + * Call after host entry created, fills + * in a skeletal tcp/ip header, minimizing the amount of work + * necessary when the connection is used. + */ +/* struct tcpiphdr * */ +void +tcp_template(tp) + struct tcpcb *tp; +{ + struct socket *so = tp->t_socket; + register struct tcpiphdr *n = &tp->t_template; + + n->ti_mbuf = NULL; + n->ti_x1 = 0; + n->ti_pr = IPPROTO_TCP; + n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); + n->ti_src = so->so_faddr; + n->ti_dst = so->so_laddr; + n->ti_sport = so->so_fport; + n->ti_dport = so->so_lport; + + n->ti_seq = 0; + n->ti_ack = 0; + n->ti_x2 = 0; + n->ti_off = 5; + n->ti_flags = 0; + n->ti_win = 0; + n->ti_sum = 0; + n->ti_urp = 0; +} + +/* + * Send a single message to the TCP at address specified by + * the given TCP/IP header. If m == 0, then we make a copy + * of the tcpiphdr at ti and send directly to the addressed host. + * This is used to force keep alive messages out using the TCP + * template for a connection tp->t_template. If flags are given + * then we send a message back to the TCP which originated the + * segment ti, and discard the mbuf containing it and any other + * attached mbufs. + * + * In any case the ack and sequence number of the transmitted + * segment are as specified by the parameters. + */ +void +tcp_respond(tp, ti, m, ack, seq, flags) + struct tcpcb *tp; + register struct tcpiphdr *ti; + register struct mbuf *m; + tcp_seq ack, seq; + int flags; +{ + register int tlen; + int win = 0; + + DEBUG_CALL("tcp_respond"); + DEBUG_ARG("tp = %lx", (long)tp); + DEBUG_ARG("ti = %lx", (long)ti); + DEBUG_ARG("m = %lx", (long)m); + DEBUG_ARG("ack = %u", ack); + DEBUG_ARG("seq = %u", seq); + DEBUG_ARG("flags = %x", flags); + + if (tp) + win = sbspace(&tp->t_socket->so_rcv); + if (m == 0) { + if ((m = m_get()) == NULL) + return; +#ifdef TCP_COMPAT_42 + tlen = 1; +#else + tlen = 0; +#endif + m->m_data += if_maxlinkhdr; + *mtod(m, struct tcpiphdr *) = *ti; + ti = mtod(m, struct tcpiphdr *); + flags = TH_ACK; + } else { + /* + * ti points into m so the next line is just making + * the mbuf point to ti + */ + m->m_data = (caddr_t)ti; + + m->m_len = sizeof (struct tcpiphdr); + tlen = 0; +#define xchg(a,b,type) { type t; t=a; a=b; b=t; } + xchg(ti->ti_dst.s_addr, ti->ti_src.s_addr, u_int32_t); + xchg(ti->ti_dport, ti->ti_sport, u_int16_t); +#undef xchg + } + ti->ti_len = htons((u_short)(sizeof (struct tcphdr) + tlen)); + tlen += sizeof (struct tcpiphdr); + m->m_len = tlen; + + ti->ti_mbuf = 0; + ti->ti_x1 = 0; + ti->ti_seq = htonl(seq); + ti->ti_ack = htonl(ack); + ti->ti_x2 = 0; + ti->ti_off = sizeof (struct tcphdr) >> 2; + ti->ti_flags = flags; + if (tp) + ti->ti_win = htons((u_int16_t) (win >> tp->rcv_scale)); + else + ti->ti_win = htons((u_int16_t)win); + ti->ti_urp = 0; + ti->ti_sum = 0; + ti->ti_sum = cksum(m, tlen); + ((struct ip *)ti)->ip_len = tlen; + + if(flags & TH_RST) + ((struct ip *)ti)->ip_ttl = MAXTTL; + else + ((struct ip *)ti)->ip_ttl = ip_defttl; + + (void) ip_output((struct socket *)0, m); +} + +/* + * Create a new TCP control block, making an + * empty reassembly queue and hooking it to the argument + * protocol control block. + */ +struct tcpcb * +tcp_newtcpcb(so) + struct socket *so; +{ + register struct tcpcb *tp; + + tp = (struct tcpcb *)malloc(sizeof(*tp)); + if (tp == NULL) + return ((struct tcpcb *)0); + + memset((char *) tp, 0, sizeof(struct tcpcb)); + tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; + tp->t_maxseg = tcp_mssdflt; + + tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; + tp->t_socket = so; + + /* + * Init srtt to TCPTV_SRTTBASE (0), so we can tell that we have no + * rtt estimate. Set rttvar so that srtt + 2 * rttvar gives + * reasonable initial retransmit time. + */ + tp->t_srtt = TCPTV_SRTTBASE; + tp->t_rttvar = tcp_rttdflt * PR_SLOWHZ << 2; + tp->t_rttmin = TCPTV_MIN; + + TCPT_RANGESET(tp->t_rxtcur, + ((TCPTV_SRTTBASE >> 2) + (TCPTV_SRTTDFLT << 2)) >> 1, + TCPTV_MIN, TCPTV_REXMTMAX); + + tp->snd_cwnd = TCP_MAXWIN << TCP_MAX_WINSHIFT; + tp->snd_ssthresh = TCP_MAXWIN << TCP_MAX_WINSHIFT; + tp->t_state = TCPS_CLOSED; + + so->so_tcpcb = tp; + + return (tp); +} + +/* + * Drop a TCP connection, reporting + * the specified error. If connection is synchronized, + * then send a RST to peer. + */ +struct tcpcb *tcp_drop(struct tcpcb *tp, int err) +{ +/* tcp_drop(tp, errno) + register struct tcpcb *tp; + int errno; +{ +*/ + + DEBUG_CALL("tcp_drop"); + DEBUG_ARG("tp = %lx", (long)tp); + DEBUG_ARG("errno = %d", errno); + + if (TCPS_HAVERCVDSYN(tp->t_state)) { + tp->t_state = TCPS_CLOSED; + (void) tcp_output(tp); + tcpstat.tcps_drops++; + } else + tcpstat.tcps_conndrops++; +/* if (errno == ETIMEDOUT && tp->t_softerror) + * errno = tp->t_softerror; + */ +/* so->so_error = errno; */ + return (tcp_close(tp)); +} + +/* + * Close a TCP control block: + * discard all space held by the tcp + * discard internet protocol block + * wake up any sleepers + */ +struct tcpcb * +tcp_close(tp) + register struct tcpcb *tp; +{ + register struct tcpiphdr *t; + struct socket *so = tp->t_socket; + register struct mbuf *m; + + DEBUG_CALL("tcp_close"); + DEBUG_ARG("tp = %lx", (long )tp); + + /* free the reassembly queue, if any */ + t = tcpfrag_list_first(tp); + while (!tcpfrag_list_end(t, tp)) { + t = tcpiphdr_next(t); + m = tcpiphdr_prev(t)->ti_mbuf; + remque(tcpiphdr2qlink(tcpiphdr_prev(t))); + m_freem(m); + } + /* It's static */ +/* if (tp->t_template) + * (void) m_free(dtom(tp->t_template)); + */ +/* free(tp, M_PCB); */ + free(tp); + so->so_tcpcb = 0; + soisfdisconnected(so); + /* clobber input socket cache if we're closing the cached connection */ + if (so == tcp_last_so) + tcp_last_so = &tcb; + closesocket(so->s); + sbfree(&so->so_rcv); + sbfree(&so->so_snd); + sofree(so); + tcpstat.tcps_closed++; + return ((struct tcpcb *)0); +} + +void +tcp_drain() +{ + /* XXX */ +} + +/* + * When a source quench is received, close congestion window + * to one segment. We will gradually open it again as we proceed. + */ + +#ifdef notdef + +void +tcp_quench(i, errno) + + int errno; +{ + struct tcpcb *tp = intotcpcb(inp); + + if (tp) + tp->snd_cwnd = tp->t_maxseg; +} + +#endif /* notdef */ + +/* + * TCP protocol interface to socket abstraction. + */ + +/* + * User issued close, and wish to trail through shutdown states: + * if never received SYN, just forget it. If got a SYN from peer, + * but haven't sent FIN, then go to FIN_WAIT_1 state to send peer a FIN. + * If already got a FIN from peer, then almost done; go to LAST_ACK + * state. In all other cases, have already sent FIN to peer (e.g. + * after PRU_SHUTDOWN), and just have to play tedious game waiting + * for peer to send FIN or not respond to keep-alives, etc. + * We can let the user exit from the close as soon as the FIN is acked. + */ +void +tcp_sockclosed(tp) + struct tcpcb *tp; +{ + + DEBUG_CALL("tcp_sockclosed"); + DEBUG_ARG("tp = %lx", (long)tp); + + switch (tp->t_state) { + + case TCPS_CLOSED: + case TCPS_LISTEN: + case TCPS_SYN_SENT: + tp->t_state = TCPS_CLOSED; + tp = tcp_close(tp); + break; + + case TCPS_SYN_RECEIVED: + case TCPS_ESTABLISHED: + tp->t_state = TCPS_FIN_WAIT_1; + break; + + case TCPS_CLOSE_WAIT: + tp->t_state = TCPS_LAST_ACK; + break; + } +/* soisfdisconnecting(tp->t_socket); */ + if (tp && tp->t_state >= TCPS_FIN_WAIT_2) + soisfdisconnected(tp->t_socket); + if (tp) + tcp_output(tp); +} + +/* + * Connect to a host on the Internet + * Called by tcp_input + * Only do a connect, the tcp fields will be set in tcp_input + * return 0 if there's a result of the connect, + * else return -1 means we're still connecting + * The return value is almost always -1 since the socket is + * nonblocking. Connect returns after the SYN is sent, and does + * not wait for ACK+SYN. + */ +int tcp_fconnect(so) + struct socket *so; +{ + int ret=0; + + DEBUG_CALL("tcp_fconnect"); + DEBUG_ARG("so = %lx", (long )so); + + if( (ret=so->s=socket(AF_INET,SOCK_STREAM,0)) >= 0) { + int opt, s=so->s; + struct sockaddr_in addr; + memset(&addr, 0, sizeof(struct sockaddr_in)); + + fd_nonblock(s); + opt = 1; + setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(opt )); + opt = 1; + setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(opt )); + + addr.sin_family = AF_INET; + if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { + /* It's an alias */ + switch(ntohl(so->so_faddr.s_addr) & 0xff) { + case CTL_DNS: + addr.sin_addr = dns_addr; + break; + case CTL_ALIAS: + default: + addr.sin_addr = loopback_addr; + break; + } + } else + addr.sin_addr = so->so_faddr; + addr.sin_port = so->so_fport; + + DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " + "addr.sin_addr.s_addr=%.16s\n", + ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); + /* We don't care what port we get */ + ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); + + /* + * If it's not in progress, it failed, so we just return 0, + * without clearing SS_NOFDREF + */ + soisfconnecting(so); + } + + return(ret); +} + +/* + * Accept the socket and connect to the local-host + * + * We have a problem. The correct thing to do would be + * to first connect to the local-host, and only if the + * connection is accepted, then do an accept() here. + * But, a) we need to know who's trying to connect + * to the socket to be able to SYN the local-host, and + * b) we are already connected to the foreign host by + * the time it gets to accept(), so... We simply accept + * here and SYN the local-host. + */ +void +tcp_connect(inso) + struct socket *inso; +{ + struct socket *so; + struct sockaddr_in addr; + socklen_t addrlen = sizeof(struct sockaddr_in); + struct tcpcb *tp; + int s, opt; + + DEBUG_CALL("tcp_connect"); + DEBUG_ARG("inso = %lx", (long)inso); + + /* + * If it's an SS_ACCEPTONCE socket, no need to socreate() + * another socket, just use the accept() socket. + */ + if (inso->so_state & SS_FACCEPTONCE) { + /* FACCEPTONCE already have a tcpcb */ + so = inso; + } else { + if ((so = socreate()) == NULL) { + /* If it failed, get rid of the pending connection */ + closesocket(accept(inso->s,(struct sockaddr *)&addr,&addrlen)); + return; + } + if (tcp_attach(so) < 0) { + free(so); /* NOT sofree */ + return; + } + so->so_laddr = inso->so_laddr; + so->so_lport = inso->so_lport; + } + + (void) tcp_mss(sototcpcb(so), 0); + + if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { + tcp_close(sototcpcb(so)); /* This will sofree() as well */ + return; + } + fd_nonblock(s); + opt = 1; + setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); + opt = 1; + setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); + opt = 1; + setsockopt(s,IPPROTO_TCP,TCP_NODELAY,(char *)&opt,sizeof(int)); + + so->so_fport = addr.sin_port; + so->so_faddr = addr.sin_addr; + /* Translate connections from localhost to the real hostname */ + if (so->so_faddr.s_addr == 0 || so->so_faddr.s_addr == loopback_addr.s_addr) + so->so_faddr = alias_addr; + + /* Close the accept() socket, set right state */ + if (inso->so_state & SS_FACCEPTONCE) { + closesocket(so->s); /* If we only accept once, close the accept() socket */ + so->so_state = SS_NOFDREF; /* Don't select it yet, even though we have an FD */ + /* if it's not FACCEPTONCE, it's already NOFDREF */ + } + so->s = s; + + so->so_iptos = tcp_tos(so); + tp = sototcpcb(so); + + tcp_template(tp); + + /* Compute window scaling to request. */ +/* while (tp->request_r_scale < TCP_MAX_WINSHIFT && + * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) + * tp->request_r_scale++; + */ + +/* soisconnecting(so); */ /* NOFDREF used instead */ + tcpstat.tcps_connattempt++; + + tp->t_state = TCPS_SYN_SENT; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tcp_sendseqinit(tp); + tcp_output(tp); +} + +/* + * Attach a TCPCB to a socket. + */ +int +tcp_attach(so) + struct socket *so; +{ + if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) + return -1; + + insque(so, &tcb); + + return 0; +} + +/* + * Set the socket's type of service field + */ +struct tos_t tcptos[] = { + {0, 20, IPTOS_THROUGHPUT, 0}, /* ftp data */ + {21, 21, IPTOS_LOWDELAY, EMU_FTP}, /* ftp control */ + {0, 23, IPTOS_LOWDELAY, 0}, /* telnet */ + {0, 80, IPTOS_THROUGHPUT, 0}, /* WWW */ + {0, 513, IPTOS_LOWDELAY, EMU_RLOGIN|EMU_NOCONNECT}, /* rlogin */ + {0, 514, IPTOS_LOWDELAY, EMU_RSH|EMU_NOCONNECT}, /* shell */ + {0, 544, IPTOS_LOWDELAY, EMU_KSH}, /* kshell */ + {0, 543, IPTOS_LOWDELAY, 0}, /* klogin */ + {0, 6667, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC */ + {0, 6668, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC undernet */ + {0, 7070, IPTOS_LOWDELAY, EMU_REALAUDIO }, /* RealAudio control */ + {0, 113, IPTOS_LOWDELAY, EMU_IDENT }, /* identd protocol */ + {0, 0, 0, 0} +}; + +struct emu_t *tcpemu = 0; + +/* + * Return TOS according to the above table + */ +u_int8_t +tcp_tos(so) + struct socket *so; +{ + int i = 0; + struct emu_t *emup; + + while(tcptos[i].tos) { + if ((tcptos[i].fport && (ntohs(so->so_fport) == tcptos[i].fport)) || + (tcptos[i].lport && (ntohs(so->so_lport) == tcptos[i].lport))) { + so->so_emu = tcptos[i].emu; + return tcptos[i].tos; + } + i++; + } + + /* Nope, lets see if there's a user-added one */ + for (emup = tcpemu; emup; emup = emup->next) { + if ((emup->fport && (ntohs(so->so_fport) == emup->fport)) || + (emup->lport && (ntohs(so->so_lport) == emup->lport))) { + so->so_emu = emup->emu; + return emup->tos; + } + } + + return 0; +} + +int do_echo = -1; + +/* + * Emulate programs that try and connect to us + * This includes ftp (the data connection is + * initiated by the server) and IRC (DCC CHAT and + * DCC SEND) for now + * + * NOTE: It's possible to crash SLiRP by sending it + * unstandard strings to emulate... if this is a problem, + * more checks are needed here + * + * XXX Assumes the whole command came in one packet + * + * XXX Some ftp clients will have their TOS set to + * LOWDELAY and so Nagel will kick in. Because of this, + * we'll get the first letter, followed by the rest, so + * we simply scan for ORT instead of PORT... + * DCC doesn't have this problem because there's other stuff + * in the packet before the DCC command. + * + * Return 1 if the mbuf m is still valid and should be + * sbappend()ed + * + * NOTE: if you return 0 you MUST m_free() the mbuf! + */ +int +tcp_emu(so, m) + struct socket *so; + struct mbuf *m; +{ + u_int n1, n2, n3, n4, n5, n6; + char buff[256]; + u_int32_t laddr; + u_int lport; + char *bptr; + + DEBUG_CALL("tcp_emu"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("m = %lx", (long)m); + + switch(so->so_emu) { + int x, i; + + case EMU_IDENT: + /* + * Identification protocol as per rfc-1413 + */ + + { + struct socket *tmpso; + struct sockaddr_in addr; + socklen_t addrlen = sizeof(struct sockaddr_in); + struct sbuf *so_rcv = &so->so_rcv; + + memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); + so_rcv->sb_wptr += m->m_len; + so_rcv->sb_rptr += m->m_len; + m->m_data[m->m_len] = 0; /* NULL terminate */ + if (strchr(m->m_data, '\r') || strchr(m->m_data, '\n')) { + if (sscanf(so_rcv->sb_data, "%d%*[ ,]%d", &n1, &n2) == 2) { + HTONS(n1); + HTONS(n2); + /* n2 is the one on our host */ + for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { + if (tmpso->so_laddr.s_addr == so->so_laddr.s_addr && + tmpso->so_lport == n2 && + tmpso->so_faddr.s_addr == so->so_faddr.s_addr && + tmpso->so_fport == n1) { + if (getsockname(tmpso->s, + (struct sockaddr *)&addr, &addrlen) == 0) + n2 = ntohs(addr.sin_port); + break; + } + } + } + so_rcv->sb_cc = sprintf(so_rcv->sb_data, "%d,%d\r\n", n1, n2); + so_rcv->sb_rptr = so_rcv->sb_data; + so_rcv->sb_wptr = so_rcv->sb_data + so_rcv->sb_cc; + } + m_free(m); + return 0; + } + +#if 0 + case EMU_RLOGIN: + /* + * Rlogin emulation + * First we accumulate all the initial option negotiation, + * then fork_exec() rlogin according to the options + */ + { + int i, i2, n; + char *ptr; + char args[100]; + char term[100]; + struct sbuf *so_snd = &so->so_snd; + struct sbuf *so_rcv = &so->so_rcv; + + /* First check if they have a priveladged port, or too much data has arrived */ + if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || + (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { + memcpy(so_snd->sb_wptr, "Permission denied\n", 18); + so_snd->sb_wptr += 18; + so_snd->sb_cc += 18; + tcp_sockclosed(sototcpcb(so)); + m_free(m); + return 0; + } + + /* Append the current data */ + memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); + so_rcv->sb_wptr += m->m_len; + so_rcv->sb_rptr += m->m_len; + m_free(m); + + /* + * Check if we have all the initial options, + * and build argument list to rlogin while we're here + */ + n = 0; + ptr = so_rcv->sb_data; + args[0] = 0; + term[0] = 0; + while (ptr < so_rcv->sb_wptr) { + if (*ptr++ == 0) { + n++; + if (n == 2) { + sprintf(args, "rlogin -l %s %s", + ptr, inet_ntoa(so->so_faddr)); + } else if (n == 3) { + i2 = so_rcv->sb_wptr - ptr; + for (i = 0; i < i2; i++) { + if (ptr[i] == '/') { + ptr[i] = 0; +#ifdef HAVE_SETENV + sprintf(term, "%s", ptr); +#else + sprintf(term, "TERM=%s", ptr); +#endif + ptr[i] = '/'; + break; + } + } + } + } + } + + if (n != 4) + return 0; + + /* We have it, set our term variable and fork_exec() */ +#ifdef HAVE_SETENV + setenv("TERM", term, 1); +#else + putenv(term); +#endif + fork_exec(so, args, 2); + term[0] = 0; + so->so_emu = 0; + + /* And finally, send the client a 0 character */ + so_snd->sb_wptr[0] = 0; + so_snd->sb_wptr++; + so_snd->sb_cc++; + + return 0; + } + + case EMU_RSH: + /* + * rsh emulation + * First we accumulate all the initial option negotiation, + * then rsh_exec() rsh according to the options + */ + { + int n; + char *ptr; + char *user; + char *args; + struct sbuf *so_snd = &so->so_snd; + struct sbuf *so_rcv = &so->so_rcv; + + /* First check if they have a priveladged port, or too much data has arrived */ + if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || + (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { + memcpy(so_snd->sb_wptr, "Permission denied\n", 18); + so_snd->sb_wptr += 18; + so_snd->sb_cc += 18; + tcp_sockclosed(sototcpcb(so)); + m_free(m); + return 0; + } + + /* Append the current data */ + memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); + so_rcv->sb_wptr += m->m_len; + so_rcv->sb_rptr += m->m_len; + m_free(m); + + /* + * Check if we have all the initial options, + * and build argument list to rlogin while we're here + */ + n = 0; + ptr = so_rcv->sb_data; + user=""; + args=""; + if (so->extra==NULL) { + struct socket *ns; + struct tcpcb* tp; + int port=atoi(ptr); + if (port <= 0) return 0; + if (port > 1023 || port < 512) { + memcpy(so_snd->sb_wptr, "Permission denied\n", 18); + so_snd->sb_wptr += 18; + so_snd->sb_cc += 18; + tcp_sockclosed(sototcpcb(so)); + return 0; + } + if ((ns=socreate()) == NULL) + return 0; + if (tcp_attach(ns)<0) { + free(ns); + return 0; + } + + ns->so_laddr=so->so_laddr; + ns->so_lport=htons(port); + + (void) tcp_mss(sototcpcb(ns), 0); + + ns->so_faddr=so->so_faddr; + ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ + + if (ns->so_faddr.s_addr == 0 || + ns->so_faddr.s_addr == loopback_addr.s_addr) + ns->so_faddr = alias_addr; + + ns->so_iptos = tcp_tos(ns); + tp = sototcpcb(ns); + + tcp_template(tp); + + /* Compute window scaling to request. */ + /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && + * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) + * tp->request_r_scale++; + */ + + /*soisfconnecting(ns);*/ + + tcpstat.tcps_connattempt++; + + tp->t_state = TCPS_SYN_SENT; + tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; + tp->iss = tcp_iss; + tcp_iss += TCP_ISSINCR/2; + tcp_sendseqinit(tp); + tcp_output(tp); + so->extra=ns; + } + while (ptr < so_rcv->sb_wptr) { + if (*ptr++ == 0) { + n++; + if (n == 2) { + user=ptr; + } else if (n == 3) { + args=ptr; + } + } + } + + if (n != 4) + return 0; + + rsh_exec(so,so->extra, user, inet_ntoa(so->so_faddr), args); + so->so_emu = 0; + so->extra=NULL; + + /* And finally, send the client a 0 character */ + so_snd->sb_wptr[0] = 0; + so_snd->sb_wptr++; + so_snd->sb_cc++; + + return 0; + } + + case EMU_CTL: + { + int num; + struct sbuf *so_snd = &so->so_snd; + struct sbuf *so_rcv = &so->so_rcv; + + /* + * If there is binary data here, we save it in so->so_m + */ + if (!so->so_m) { + int rxlen; + char *rxdata; + rxdata=mtod(m, char *); + for (rxlen=m->m_len; rxlen; rxlen--) { + if (*rxdata++ & 0x80) { + so->so_m = m; + return 0; + } + } + } /* if(so->so_m==NULL) */ + + /* + * Append the line + */ + sbappendsb(so_rcv, m); + + /* To avoid going over the edge of the buffer, we reset it */ + if (so_snd->sb_cc == 0) + so_snd->sb_wptr = so_snd->sb_rptr = so_snd->sb_data; + + /* + * A bit of a hack: + * If the first packet we get here is 1 byte long, then it + * was done in telnet character mode, therefore we must echo + * the characters as they come. Otherwise, we echo nothing, + * because in linemode, the line is already echoed + * XXX two or more control connections won't work + */ + if (do_echo == -1) { + if (m->m_len == 1) do_echo = 1; + else do_echo = 0; + } + if (do_echo) { + sbappendsb(so_snd, m); + m_free(m); + tcp_output(sototcpcb(so)); /* XXX */ + } else + m_free(m); + + num = 0; + while (num < so->so_rcv.sb_cc) { + if (*(so->so_rcv.sb_rptr + num) == '\n' || + *(so->so_rcv.sb_rptr + num) == '\r') { + int n; + + *(so_rcv->sb_rptr + num) = 0; + if (ctl_password && !ctl_password_ok) { + /* Need a password */ + if (sscanf(so_rcv->sb_rptr, "pass %256s", buff) == 1) { + if (strcmp(buff, ctl_password) == 0) { + ctl_password_ok = 1; + n = sprintf(so_snd->sb_wptr, + "Password OK.\r\n"); + goto do_prompt; + } + } + n = sprintf(so_snd->sb_wptr, + "Error: Password required, log on with \"pass PASSWORD\"\r\n"); + goto do_prompt; + } + cfg_quitting = 0; + n = do_config(so_rcv->sb_rptr, so, PRN_SPRINTF); + if (!cfg_quitting) { + /* Register the printed data */ +do_prompt: + so_snd->sb_cc += n; + so_snd->sb_wptr += n; + /* Add prompt */ + n = sprintf(so_snd->sb_wptr, "Slirp> "); + so_snd->sb_cc += n; + so_snd->sb_wptr += n; + } + /* Drop so_rcv data */ + so_rcv->sb_cc = 0; + so_rcv->sb_wptr = so_rcv->sb_rptr = so_rcv->sb_data; + tcp_output(sototcpcb(so)); /* Send the reply */ + } + num++; + } + return 0; + } +#endif + case EMU_FTP: /* ftp */ + *(m->m_data+m->m_len) = 0; /* NULL terminate for strstr */ + if ((bptr = (char *)strstr(m->m_data, "ORT")) != NULL) { + /* + * Need to emulate the PORT command + */ + x = sscanf(bptr, "ORT %d,%d,%d,%d,%d,%d\r\n%256[^\177]", + &n1, &n2, &n3, &n4, &n5, &n6, buff); + if (x < 6) + return 1; + + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); + lport = htons((n5 << 8) | (n6)); + + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) + return 1; + + n6 = ntohs(so->so_fport); + + n5 = (n6 >> 8) & 0xff; + n6 &= 0xff; + + laddr = ntohl(so->so_faddr.s_addr); + + n1 = ((laddr >> 24) & 0xff); + n2 = ((laddr >> 16) & 0xff); + n3 = ((laddr >> 8) & 0xff); + n4 = (laddr & 0xff); + + m->m_len = bptr - m->m_data; /* Adjust length */ + m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); + return 1; + } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { + /* + * Need to emulate the PASV response + */ + x = sscanf(bptr, "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%256[^\177]", + &n1, &n2, &n3, &n4, &n5, &n6, buff); + if (x < 6) + return 1; + + laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); + lport = htons((n5 << 8) | (n6)); + + if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) + return 1; + + n6 = ntohs(so->so_fport); + + n5 = (n6 >> 8) & 0xff; + n6 &= 0xff; + + laddr = ntohl(so->so_faddr.s_addr); + + n1 = ((laddr >> 24) & 0xff); + n2 = ((laddr >> 16) & 0xff); + n3 = ((laddr >> 8) & 0xff); + n4 = (laddr & 0xff); + + m->m_len = bptr - m->m_data; /* Adjust length */ + m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", + n1, n2, n3, n4, n5, n6, x==7?buff:""); + + return 1; + } + + return 1; + + case EMU_KSH: + /* + * The kshell (Kerberos rsh) and shell services both pass + * a local port port number to carry signals to the server + * and stderr to the client. It is passed at the beginning + * of the connection as a NUL-terminated decimal ASCII string. + */ + so->so_emu = 0; + for (lport = 0, i = 0; i < m->m_len-1; ++i) { + if (m->m_data[i] < '0' || m->m_data[i] > '9') + return 1; /* invalid number */ + lport *= 10; + lport += m->m_data[i] - '0'; + } + if (m->m_data[m->m_len-1] == '\0' && lport != 0 && + (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) + m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; + return 1; + + case EMU_IRC: + /* + * Need to emulate DCC CHAT, DCC SEND and DCC MOVE + */ + *(m->m_data+m->m_len) = 0; /* NULL terminate the string for strstr */ + if ((bptr = (char *)strstr(m->m_data, "DCC")) == NULL) + return 1; + + /* The %256s is for the broken mIRC */ + if (sscanf(bptr, "DCC CHAT %256s %u %u", buff, &laddr, &lport) == 3) { + if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) + return 1; + + m->m_len = bptr - m->m_data; /* Adjust length */ + m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", + (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), 1); + } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { + if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) + return 1; + + m->m_len = bptr - m->m_data; /* Adjust length */ + m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", + buff, (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); + } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { + if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) + return 1; + + m->m_len = bptr - m->m_data; /* Adjust length */ + m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", + buff, (unsigned long)ntohl(so->so_faddr.s_addr), + ntohs(so->so_fport), n1, 1); + } + return 1; + + case EMU_REALAUDIO: + /* + * RealAudio emulation - JP. We must try to parse the incoming + * data and try to find the two characters that contain the + * port number. Then we redirect an udp port and replace the + * number with the real port we got. + * + * The 1.0 beta versions of the player are not supported + * any more. + * + * A typical packet for player version 1.0 (release version): + * + * 0000:50 4E 41 00 05 + * 0000:00 01 00 02 1B D7 00 00 67 E6 6C DC 63 00 12 50 .....×..gælÜc..P + * 0010:4E 43 4C 49 45 4E 54 20 31 30 31 20 41 4C 50 48 NCLIENT 101 ALPH + * 0020:41 6C 00 00 52 00 17 72 61 66 69 6C 65 73 2F 76 Al..R..rafiles/v + * 0030:6F 61 2F 65 6E 67 6C 69 73 68 5F 2E 72 61 79 42 oa/english_.rayB + * + * Now the port number 0x1BD7 is found at offset 0x04 of the + * Now the port number 0x1BD7 is found at offset 0x04 of the + * second packet. This time we received five bytes first and + * then the rest. You never know how many bytes you get. + * + * A typical packet for player version 2.0 (beta): + * + * 0000:50 4E 41 00 06 00 02 00 00 00 01 00 02 1B C1 00 PNA...........Á. + * 0010:00 67 75 78 F5 63 00 0A 57 69 6E 32 2E 30 2E 30 .guxõc..Win2.0.0 + * 0020:2E 35 6C 00 00 52 00 1C 72 61 66 69 6C 65 73 2F .5l..R..rafiles/ + * 0030:77 65 62 73 69 74 65 2F 32 30 72 65 6C 65 61 73 website/20releas + * 0040:65 2E 72 61 79 53 00 00 06 36 42 e.rayS...6B + * + * Port number 0x1BC1 is found at offset 0x0d. + * + * This is just a horrible switch statement. Variable ra tells + * us where we're going. + */ + + bptr = m->m_data; + while (bptr < m->m_data + m->m_len) { + u_short p; + static int ra = 0; + char ra_tbl[4]; + + ra_tbl[0] = 0x50; + ra_tbl[1] = 0x4e; + ra_tbl[2] = 0x41; + ra_tbl[3] = 0; + + switch (ra) { + case 0: + case 2: + case 3: + if (*bptr++ != ra_tbl[ra]) { + ra = 0; + continue; + } + break; + + case 1: + /* + * We may get 0x50 several times, ignore them + */ + if (*bptr == 0x50) { + ra = 1; + bptr++; + continue; + } else if (*bptr++ != ra_tbl[ra]) { + ra = 0; + continue; + } + break; + + case 4: + /* + * skip version number + */ + bptr++; + break; + + case 5: + /* + * The difference between versions 1.0 and + * 2.0 is here. For future versions of + * the player this may need to be modified. + */ + if (*(bptr + 1) == 0x02) + bptr += 8; + else + bptr += 4; + break; + + case 6: + /* This is the field containing the port + * number that RA-player is listening to. + */ + lport = (((u_char*)bptr)[0] << 8) + + ((u_char *)bptr)[1]; + if (lport < 6970) + lport += 256; /* don't know why */ + if (lport < 6970 || lport > 7170) + return 1; /* failed */ + + /* try to get udp port between 6970 - 7170 */ + for (p = 6970; p < 7071; p++) { + if (udp_listen( htons(p), + so->so_laddr.s_addr, + htons(lport), + SS_FACCEPTONCE)) { + break; + } + } + if (p == 7071) + p = 0; + *(u_char *)bptr++ = (p >> 8) & 0xff; + *(u_char *)bptr++ = p & 0xff; + ra = 0; + return 1; /* port redirected, we're done */ + break; + + default: + ra = 0; + } + ra++; + } + return 1; + + default: + /* Ooops, not emulated, won't call tcp_emu again */ + so->so_emu = 0; + return 1; + } +} + +/* + * Do misc. config of SLiRP while its running. + * Return 0 if this connections is to be closed, 1 otherwise, + * return 2 if this is a command-line connection + */ +int +tcp_ctl(so) + struct socket *so; +{ + struct sbuf *sb = &so->so_snd; + int command; + struct ex_list *ex_ptr; + int do_pty; + // struct socket *tmpso; + + DEBUG_CALL("tcp_ctl"); + DEBUG_ARG("so = %lx", (long )so); + +#if 0 + /* + * Check if they're authorised + */ + if (ctl_addr.s_addr && (ctl_addr.s_addr == -1 || (so->so_laddr.s_addr != ctl_addr.s_addr))) { + sb->sb_cc = sprintf(sb->sb_wptr,"Error: Permission denied.\r\n"); + sb->sb_wptr += sb->sb_cc; + return 0; + } +#endif + command = (ntohl(so->so_faddr.s_addr) & 0xff); + + switch(command) { + default: /* Check for exec's */ + + /* + * Check if it's pty_exec + */ + for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { + if (ex_ptr->ex_fport == so->so_fport && + command == ex_ptr->ex_addr) { + do_pty = ex_ptr->ex_pty; + goto do_exec; + } + } + + /* + * Nothing bound.. + */ + /* tcp_fconnect(so); */ + + /* FALLTHROUGH */ + case CTL_ALIAS: + sb->sb_cc = sprintf(sb->sb_wptr, + "Error: No application configured.\r\n"); + sb->sb_wptr += sb->sb_cc; + return(0); + + do_exec: + DEBUG_MISC((dfd, " executing %s \n",ex_ptr->ex_exec)); + return(fork_exec(so, ex_ptr->ex_exec, do_pty)); + +#if 0 + case CTL_CMD: + for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { + if (tmpso->so_emu == EMU_CTL && + !(tmpso->so_tcpcb? + (tmpso->so_tcpcb->t_state & (TCPS_TIME_WAIT|TCPS_LAST_ACK)) + :0)) { + /* Ooops, control connection already active */ + sb->sb_cc = sprintf(sb->sb_wptr,"Sorry, already connected.\r\n"); + sb->sb_wptr += sb->sb_cc; + return 0; + } + } + so->so_emu = EMU_CTL; + ctl_password_ok = 0; + sb->sb_cc = sprintf(sb->sb_wptr, "Slirp command-line ready (type \"help\" for help).\r\nSlirp> "); + sb->sb_wptr += sb->sb_cc; + do_echo=-1; + return(2); +#endif + } +} diff --git a/SheepShaver/src/slirp/tcp_timer.c b/SheepShaver/src/slirp/tcp_timer.c new file mode 100755 index 000000000..ab9aa580d --- /dev/null +++ b/SheepShaver/src/slirp/tcp_timer.c @@ -0,0 +1,322 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_timer.c 8.1 (Berkeley) 6/10/93 + * tcp_timer.c,v 1.2 1994/08/02 07:49:10 davidg Exp + */ + +#include + +int tcp_keepidle = TCPTV_KEEP_IDLE; +int tcp_keepintvl = TCPTV_KEEPINTVL; +int tcp_maxidle; +int so_options = DO_KEEPALIVE; + +struct tcpstat tcpstat; /* tcp statistics */ +u_int32_t tcp_now; /* for RFC 1323 timestamps */ + +/* + * Fast timeout routine for processing delayed acks + */ +void +tcp_fasttimo() +{ + register struct socket *so; + register struct tcpcb *tp; + + DEBUG_CALL("tcp_fasttimo"); + + so = tcb.so_next; + if (so) + for (; so != &tcb; so = so->so_next) + if ((tp = (struct tcpcb *)so->so_tcpcb) && + (tp->t_flags & TF_DELACK)) { + tp->t_flags &= ~TF_DELACK; + tp->t_flags |= TF_ACKNOW; + tcpstat.tcps_delack++; + (void) tcp_output(tp); + } +} + +/* + * Tcp protocol timeout routine called every 500 ms. + * Updates the timers in all active tcb's and + * causes finite state machine actions if timers expire. + */ +void +tcp_slowtimo() +{ + register struct socket *ip, *ipnxt; + register struct tcpcb *tp; + register int i; + + DEBUG_CALL("tcp_slowtimo"); + + tcp_maxidle = TCPTV_KEEPCNT * tcp_keepintvl; + /* + * Search through tcb's and update active timers. + */ + ip = tcb.so_next; + if (ip == 0) + return; + for (; ip != &tcb; ip = ipnxt) { + ipnxt = ip->so_next; + tp = sototcpcb(ip); + if (tp == 0) + continue; + for (i = 0; i < TCPT_NTIMERS; i++) { + if (tp->t_timer[i] && --tp->t_timer[i] == 0) { + tcp_timers(tp,i); + if (ipnxt->so_prev != ip) + goto tpgone; + } + } + tp->t_idle++; + if (tp->t_rtt) + tp->t_rtt++; +tpgone: + ; + } + tcp_iss += TCP_ISSINCR/PR_SLOWHZ; /* increment iss */ +#ifdef TCP_COMPAT_42 + if ((int)tcp_iss < 0) + tcp_iss = 0; /* XXX */ +#endif + tcp_now++; /* for timestamps */ +} + +/* + * Cancel all timers for TCP tp. + */ +void +tcp_canceltimers(tp) + struct tcpcb *tp; +{ + register int i; + + for (i = 0; i < TCPT_NTIMERS; i++) + tp->t_timer[i] = 0; +} + +int tcp_backoff[TCP_MAXRXTSHIFT + 1] = + { 1, 2, 4, 8, 16, 32, 64, 64, 64, 64, 64, 64, 64 }; + +/* + * TCP timer processing. + */ +struct tcpcb * +tcp_timers(tp, timer) + register struct tcpcb *tp; + int timer; +{ + register int rexmt; + + DEBUG_CALL("tcp_timers"); + + switch (timer) { + + /* + * 2 MSL timeout in shutdown went off. If we're closed but + * still waiting for peer to close and connection has been idle + * too long, or if 2MSL time is up from TIME_WAIT, delete connection + * control block. Otherwise, check again in a bit. + */ + case TCPT_2MSL: + if (tp->t_state != TCPS_TIME_WAIT && + tp->t_idle <= tcp_maxidle) + tp->t_timer[TCPT_2MSL] = tcp_keepintvl; + else + tp = tcp_close(tp); + break; + + /* + * Retransmission timer went off. Message has not + * been acked within retransmit interval. Back off + * to a longer retransmit interval and retransmit one segment. + */ + case TCPT_REXMT: + + /* + * XXXXX If a packet has timed out, then remove all the queued + * packets for that session. + */ + + if (++tp->t_rxtshift > TCP_MAXRXTSHIFT) { + /* + * This is a hack to suit our terminal server here at the uni of canberra + * since they have trouble with zeroes... It usually lets them through + * unharmed, but under some conditions, it'll eat the zeros. If we + * keep retransmitting it, it'll keep eating the zeroes, so we keep + * retransmitting, and eventually the connection dies... + * (this only happens on incoming data) + * + * So, if we were gonna drop the connection from too many retransmits, + * don't... instead halve the t_maxseg, which might break up the NULLs and + * let them through + * + * *sigh* + */ + + tp->t_maxseg >>= 1; + if (tp->t_maxseg < 32) { + /* + * We tried our best, now the connection must die! + */ + tp->t_rxtshift = TCP_MAXRXTSHIFT; + tcpstat.tcps_timeoutdrop++; + tp = tcp_drop(tp, tp->t_softerror); + /* tp->t_softerror : ETIMEDOUT); */ /* XXX */ + return (tp); /* XXX */ + } + + /* + * Set rxtshift to 6, which is still at the maximum + * backoff time + */ + tp->t_rxtshift = 6; + } + tcpstat.tcps_rexmttimeo++; + rexmt = TCP_REXMTVAL(tp) * tcp_backoff[tp->t_rxtshift]; + TCPT_RANGESET(tp->t_rxtcur, rexmt, + (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ + tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; + /* + * If losing, let the lower level know and try for + * a better route. Also, if we backed off this far, + * our srtt estimate is probably bogus. Clobber it + * so we'll take the next rtt measurement as our srtt; + * move the current srtt into rttvar to keep the current + * retransmit times until then. + */ + if (tp->t_rxtshift > TCP_MAXRXTSHIFT / 4) { +/* in_losing(tp->t_inpcb); */ + tp->t_rttvar += (tp->t_srtt >> TCP_RTT_SHIFT); + tp->t_srtt = 0; + } + tp->snd_nxt = tp->snd_una; + /* + * If timing a segment in this window, stop the timer. + */ + tp->t_rtt = 0; + /* + * Close the congestion window down to one segment + * (we'll open it by one segment for each ack we get). + * Since we probably have a window's worth of unacked + * data accumulated, this "slow start" keeps us from + * dumping all that data as back-to-back packets (which + * might overwhelm an intermediate gateway). + * + * There are two phases to the opening: Initially we + * open by one mss on each ack. This makes the window + * size increase exponentially with time. If the + * window is larger than the path can handle, this + * exponential growth results in dropped packet(s) + * almost immediately. To get more time between + * drops but still "push" the network to take advantage + * of improving conditions, we switch from exponential + * to linear window opening at some threshold size. + * For a threshold, we use half the current window + * size, truncated to a multiple of the mss. + * + * (the minimum cwnd that will give us exponential + * growth is 2 mss. We don't allow the threshold + * to go below this.) + */ + { + u_int win = min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; + if (win < 2) + win = 2; + tp->snd_cwnd = tp->t_maxseg; + tp->snd_ssthresh = win * tp->t_maxseg; + tp->t_dupacks = 0; + } + (void) tcp_output(tp); + break; + + /* + * Persistence timer into zero window. + * Force a byte to be output, if possible. + */ + case TCPT_PERSIST: + tcpstat.tcps_persisttimeo++; + tcp_setpersist(tp); + tp->t_force = 1; + (void) tcp_output(tp); + tp->t_force = 0; + break; + + /* + * Keep-alive timer went off; send something + * or drop connection if idle for too long. + */ + case TCPT_KEEP: + tcpstat.tcps_keeptimeo++; + if (tp->t_state < TCPS_ESTABLISHED) + goto dropit; + +/* if (tp->t_socket->so_options & SO_KEEPALIVE && */ + if ((so_options) && tp->t_state <= TCPS_CLOSE_WAIT) { + if (tp->t_idle >= tcp_keepidle + tcp_maxidle) + goto dropit; + /* + * Send a packet designed to force a response + * if the peer is up and reachable: + * either an ACK if the connection is still alive, + * or an RST if the peer has closed the connection + * due to timeout or reboot. + * Using sequence number tp->snd_una-1 + * causes the transmitted zero-length segment + * to lie outside the receive window; + * by the protocol spec, this requires the + * correspondent TCP to respond. + */ + tcpstat.tcps_keepprobe++; +#ifdef TCP_COMPAT_42 + /* + * The keepalive packet must have nonzero length + * to get a 4.2 host to respond. + */ + tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, + tp->rcv_nxt - 1, tp->snd_una - 1, 0); +#else + tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, + tp->rcv_nxt, tp->snd_una - 1, 0); +#endif + tp->t_timer[TCPT_KEEP] = tcp_keepintvl; + } else + tp->t_timer[TCPT_KEEP] = tcp_keepidle; + break; + + dropit: + tcpstat.tcps_keepdrops++; + tp = tcp_drop(tp, 0); /* ETIMEDOUT); */ + break; + } + + return (tp); +} diff --git a/SheepShaver/src/slirp/tcp_timer.h b/SheepShaver/src/slirp/tcp_timer.h new file mode 100755 index 000000000..0bc438c76 --- /dev/null +++ b/SheepShaver/src/slirp/tcp_timer.h @@ -0,0 +1,138 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_timer.h 8.1 (Berkeley) 6/10/93 + * tcp_timer.h,v 1.4 1994/08/21 05:27:38 paul Exp + */ + +#ifndef _TCP_TIMER_H_ +#define _TCP_TIMER_H_ + +/* + * Definitions of the TCP timers. These timers are counted + * down PR_SLOWHZ times a second. + */ +#define TCPT_NTIMERS 4 + +#define TCPT_REXMT 0 /* retransmit */ +#define TCPT_PERSIST 1 /* retransmit persistence */ +#define TCPT_KEEP 2 /* keep alive */ +#define TCPT_2MSL 3 /* 2*msl quiet time timer */ + +/* + * The TCPT_REXMT timer is used to force retransmissions. + * The TCP has the TCPT_REXMT timer set whenever segments + * have been sent for which ACKs are expected but not yet + * received. If an ACK is received which advances tp->snd_una, + * then the retransmit timer is cleared (if there are no more + * outstanding segments) or reset to the base value (if there + * are more ACKs expected). Whenever the retransmit timer goes off, + * we retransmit one unacknowledged segment, and do a backoff + * on the retransmit timer. + * + * The TCPT_PERSIST timer is used to keep window size information + * flowing even if the window goes shut. If all previous transmissions + * have been acknowledged (so that there are no retransmissions in progress), + * and the window is too small to bother sending anything, then we start + * the TCPT_PERSIST timer. When it expires, if the window is nonzero, + * we go to transmit state. Otherwise, at intervals send a single byte + * into the peer's window to force him to update our window information. + * We do this at most as often as TCPT_PERSMIN time intervals, + * but no more frequently than the current estimate of round-trip + * packet time. The TCPT_PERSIST timer is cleared whenever we receive + * a window update from the peer. + * + * The TCPT_KEEP timer is used to keep connections alive. If an + * connection is idle (no segments received) for TCPTV_KEEP_INIT amount of time, + * but not yet established, then we drop the connection. Once the connection + * is established, if the connection is idle for TCPTV_KEEP_IDLE time + * (and keepalives have been enabled on the socket), we begin to probe + * the connection. We force the peer to send us a segment by sending: + * + * This segment is (deliberately) outside the window, and should elicit + * an ack segment in response from the peer. If, despite the TCPT_KEEP + * initiated segments we cannot elicit a response from a peer in TCPT_MAXIDLE + * amount of time probing, then we drop the connection. + */ + +/* + * Time constants. + */ +#define TCPTV_MSL ( 5*PR_SLOWHZ) /* max seg lifetime (hah!) */ + +#define TCPTV_SRTTBASE 0 /* base roundtrip time; + if 0, no idea yet */ +#define TCPTV_SRTTDFLT ( 3*PR_SLOWHZ) /* assumed RTT if no info */ + +#define TCPTV_PERSMIN ( 5*PR_SLOWHZ) /* retransmit persistence */ +#define TCPTV_PERSMAX ( 60*PR_SLOWHZ) /* maximum persist interval */ + +#define TCPTV_KEEP_INIT ( 75*PR_SLOWHZ) /* initial connect keep alive */ +#define TCPTV_KEEP_IDLE (120*60*PR_SLOWHZ) /* dflt time before probing */ +#define TCPTV_KEEPINTVL ( 75*PR_SLOWHZ) /* default probe interval */ +#define TCPTV_KEEPCNT 8 /* max probes before drop */ + +#define TCPTV_MIN ( 1*PR_SLOWHZ) /* minimum allowable value */ +/* #define TCPTV_REXMTMAX ( 64*PR_SLOWHZ) */ /* max allowable REXMT value */ +#define TCPTV_REXMTMAX ( 12*PR_SLOWHZ) /* max allowable REXMT value */ + +#define TCP_LINGERTIME 120 /* linger at most 2 minutes */ + +#define TCP_MAXRXTSHIFT 12 /* maximum retransmits */ + + +#ifdef TCPTIMERS +char *tcptimers[] = + { "REXMT", "PERSIST", "KEEP", "2MSL" }; +#endif + +/* + * Force a time value to be in a certain range. + */ +#define TCPT_RANGESET(tv, value, tvmin, tvmax) { \ + (tv) = (value); \ + if ((tv) < (tvmin)) \ + (tv) = (tvmin); \ + else if ((tv) > (tvmax)) \ + (tv) = (tvmax); \ +} + +extern int tcp_keepidle; /* time before keepalive probes begin */ +extern int tcp_keepintvl; /* time between keepalive probes */ +extern int tcp_maxidle; /* time to drop after starting probes */ +extern int tcp_ttl; /* time to live for TCP segs */ +extern int tcp_backoff[]; + +struct tcpcb; + +void tcp_fasttimo _P((void)); +void tcp_slowtimo _P((void)); +void tcp_canceltimers _P((struct tcpcb *)); +struct tcpcb * tcp_timers _P((register struct tcpcb *, int)); + +#endif diff --git a/SheepShaver/src/slirp/tcp_var.h b/SheepShaver/src/slirp/tcp_var.h new file mode 100755 index 000000000..064ac69a1 --- /dev/null +++ b/SheepShaver/src/slirp/tcp_var.h @@ -0,0 +1,227 @@ +/* + * Copyright (c) 1982, 1986, 1993, 1994 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcp_var.h 8.3 (Berkeley) 4/10/94 + * tcp_var.h,v 1.3 1994/08/21 05:27:39 paul Exp + */ + +#ifndef _TCP_VAR_H_ +#define _TCP_VAR_H_ + +#include "tcpip.h" +#include "tcp_timer.h" + +/* + * Tcp control block, one per tcp; fields: + */ +struct tcpcb { + struct tcpiphdr *seg_next; /* sequencing queue */ + struct tcpiphdr *seg_prev; + short t_state; /* state of this connection */ + short t_timer[TCPT_NTIMERS]; /* tcp timers */ + short t_rxtshift; /* log(2) of rexmt exp. backoff */ + short t_rxtcur; /* current retransmit value */ + short t_dupacks; /* consecutive dup acks recd */ + u_short t_maxseg; /* maximum segment size */ + char t_force; /* 1 if forcing out a byte */ + u_short t_flags; +#define TF_ACKNOW 0x0001 /* ack peer immediately */ +#define TF_DELACK 0x0002 /* ack, but try to delay it */ +#define TF_NODELAY 0x0004 /* don't delay packets to coalesce */ +#define TF_NOOPT 0x0008 /* don't use tcp options */ +#define TF_SENTFIN 0x0010 /* have sent FIN */ +#define TF_REQ_SCALE 0x0020 /* have/will request window scaling */ +#define TF_RCVD_SCALE 0x0040 /* other side has requested scaling */ +#define TF_REQ_TSTMP 0x0080 /* have/will request timestamps */ +#define TF_RCVD_TSTMP 0x0100 /* a timestamp was received in SYN */ +#define TF_SACK_PERMIT 0x0200 /* other side said I could SACK */ + + /* Make it static for now */ +/* struct tcpiphdr *t_template; / * skeletal packet for transmit */ + struct tcpiphdr t_template; + + struct socket *t_socket; /* back pointer to socket */ +/* + * The following fields are used as in the protocol specification. + * See RFC783, Dec. 1981, page 21. + */ +/* send sequence variables */ + tcp_seq snd_una; /* send unacknowledged */ + tcp_seq snd_nxt; /* send next */ + tcp_seq snd_up; /* send urgent pointer */ + tcp_seq snd_wl1; /* window update seg seq number */ + tcp_seq snd_wl2; /* window update seg ack number */ + tcp_seq iss; /* initial send sequence number */ + u_int32_t snd_wnd; /* send window */ +/* receive sequence variables */ + u_int32_t rcv_wnd; /* receive window */ + tcp_seq rcv_nxt; /* receive next */ + tcp_seq rcv_up; /* receive urgent pointer */ + tcp_seq irs; /* initial receive sequence number */ +/* + * Additional variables for this implementation. + */ +/* receive variables */ + tcp_seq rcv_adv; /* advertised window */ +/* retransmit variables */ + tcp_seq snd_max; /* highest sequence number sent; + * used to recognize retransmits + */ +/* congestion control (for slow start, source quench, retransmit after loss) */ + u_int32_t snd_cwnd; /* congestion-controlled window */ + u_int32_t snd_ssthresh; /* snd_cwnd size threshold for + * for slow start exponential to + * linear switch + */ +/* + * transmit timing stuff. See below for scale of srtt and rttvar. + * "Variance" is actually smoothed difference. + */ + short t_idle; /* inactivity time */ + short t_rtt; /* round trip time */ + tcp_seq t_rtseq; /* sequence number being timed */ + short t_srtt; /* smoothed round-trip time */ + short t_rttvar; /* variance in round-trip time */ + u_short t_rttmin; /* minimum rtt allowed */ + u_int32_t max_sndwnd; /* largest window peer has offered */ + +/* out-of-band data */ + char t_oobflags; /* have some */ + char t_iobc; /* input character */ +#define TCPOOB_HAVEDATA 0x01 +#define TCPOOB_HADDATA 0x02 + short t_softerror; /* possible error not yet reported */ + +/* RFC 1323 variables */ + u_char snd_scale; /* window scaling for send window */ + u_char rcv_scale; /* window scaling for recv window */ + u_char request_r_scale; /* pending window scaling */ + u_char requested_s_scale; + u_int32_t ts_recent; /* timestamp echo data */ + u_int32_t ts_recent_age; /* when last updated */ + tcp_seq last_ack_sent; + +}; + +#define sototcpcb(so) ((so)->so_tcpcb) + +/* + * The smoothed round-trip time and estimated variance + * are stored as fixed point numbers scaled by the values below. + * For convenience, these scales are also used in smoothing the average + * (smoothed = (1/scale)sample + ((scale-1)/scale)smoothed). + * With these scales, srtt has 3 bits to the right of the binary point, + * and thus an "ALPHA" of 0.875. rttvar has 2 bits to the right of the + * binary point, and is smoothed with an ALPHA of 0.75. + */ +#define TCP_RTT_SCALE 8 /* multiplier for srtt; 3 bits frac. */ +#define TCP_RTT_SHIFT 3 /* shift for srtt; 3 bits frac. */ +#define TCP_RTTVAR_SCALE 4 /* multiplier for rttvar; 2 bits */ +#define TCP_RTTVAR_SHIFT 2 /* multiplier for rttvar; 2 bits */ + +/* + * The initial retransmission should happen at rtt + 4 * rttvar. + * Because of the way we do the smoothing, srtt and rttvar + * will each average +1/2 tick of bias. When we compute + * the retransmit timer, we want 1/2 tick of rounding and + * 1 extra tick because of +-1/2 tick uncertainty in the + * firing of the timer. The bias will give us exactly the + * 1.5 tick we need. But, because the bias is + * statistical, we have to test that we don't drop below + * the minimum feasible timer (which is 2 ticks). + * This macro assumes that the value of TCP_RTTVAR_SCALE + * is the same as the multiplier for rttvar. + */ +#define TCP_REXMTVAL(tp) \ + (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) + +/* + * TCP statistics. + * Many of these should be kept per connection, + * but that's inconvenient at the moment. + */ +struct tcpstat { + u_long tcps_connattempt; /* connections initiated */ + u_long tcps_accepts; /* connections accepted */ + u_long tcps_connects; /* connections established */ + u_long tcps_drops; /* connections dropped */ + u_long tcps_conndrops; /* embryonic connections dropped */ + u_long tcps_closed; /* conn. closed (includes drops) */ + u_long tcps_segstimed; /* segs where we tried to get rtt */ + u_long tcps_rttupdated; /* times we succeeded */ + u_long tcps_delack; /* delayed acks sent */ + u_long tcps_timeoutdrop; /* conn. dropped in rxmt timeout */ + u_long tcps_rexmttimeo; /* retransmit timeouts */ + u_long tcps_persisttimeo; /* persist timeouts */ + u_long tcps_keeptimeo; /* keepalive timeouts */ + u_long tcps_keepprobe; /* keepalive probes sent */ + u_long tcps_keepdrops; /* connections dropped in keepalive */ + + u_long tcps_sndtotal; /* total packets sent */ + u_long tcps_sndpack; /* data packets sent */ + u_long tcps_sndbyte; /* data bytes sent */ + u_long tcps_sndrexmitpack; /* data packets retransmitted */ + u_long tcps_sndrexmitbyte; /* data bytes retransmitted */ + u_long tcps_sndacks; /* ack-only packets sent */ + u_long tcps_sndprobe; /* window probes sent */ + u_long tcps_sndurg; /* packets sent with URG only */ + u_long tcps_sndwinup; /* window update-only packets sent */ + u_long tcps_sndctrl; /* control (SYN|FIN|RST) packets sent */ + + u_long tcps_rcvtotal; /* total packets received */ + u_long tcps_rcvpack; /* packets received in sequence */ + u_long tcps_rcvbyte; /* bytes received in sequence */ + u_long tcps_rcvbadsum; /* packets received with ccksum errs */ + u_long tcps_rcvbadoff; /* packets received with bad offset */ +/* u_long tcps_rcvshort; */ /* packets received too short */ + u_long tcps_rcvduppack; /* duplicate-only packets received */ + u_long tcps_rcvdupbyte; /* duplicate-only bytes received */ + u_long tcps_rcvpartduppack; /* packets with some duplicate data */ + u_long tcps_rcvpartdupbyte; /* dup. bytes in part-dup. packets */ + u_long tcps_rcvoopack; /* out-of-order packets received */ + u_long tcps_rcvoobyte; /* out-of-order bytes received */ + u_long tcps_rcvpackafterwin; /* packets with data after window */ + u_long tcps_rcvbyteafterwin; /* bytes rcvd after window */ + u_long tcps_rcvafterclose; /* packets rcvd after "close" */ + u_long tcps_rcvwinprobe; /* rcvd window probe packets */ + u_long tcps_rcvdupack; /* rcvd duplicate acks */ + u_long tcps_rcvacktoomuch; /* rcvd acks for unsent data */ + u_long tcps_rcvackpack; /* rcvd ack packets */ + u_long tcps_rcvackbyte; /* bytes acked by rcvd acks */ + u_long tcps_rcvwinupd; /* rcvd window update packets */ +/* u_long tcps_pawsdrop; */ /* segments dropped due to PAWS */ + u_long tcps_predack; /* times hdr predict ok for acks */ + u_long tcps_preddat; /* times hdr predict ok for data pkts */ + u_long tcps_socachemiss; /* tcp_last_so misses */ + u_long tcps_didnuttin; /* Times tcp_output didn't do anything XXX */ +}; + +extern struct tcpstat tcpstat; /* tcp statistics */ +extern u_int32_t tcp_now; /* for RFC 1323 timestamps */ + +#endif diff --git a/SheepShaver/src/slirp/tcpip.h b/SheepShaver/src/slirp/tcpip.h new file mode 100755 index 000000000..7974ce3d5 --- /dev/null +++ b/SheepShaver/src/slirp/tcpip.h @@ -0,0 +1,77 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)tcpip.h 8.1 (Berkeley) 6/10/93 + * tcpip.h,v 1.3 1994/08/21 05:27:40 paul Exp + */ + +#ifndef _TCPIP_H_ +#define _TCPIP_H_ + +/* + * Tcp+ip header, after ip options removed. + */ +struct tcpiphdr { + struct ipovly ti_i; /* overlaid ip structure */ + struct tcphdr ti_t; /* tcp header */ +}; +#define ti_mbuf ti_i.ih_mbuf.mptr +#define ti_x1 ti_i.ih_x1 +#define ti_pr ti_i.ih_pr +#define ti_len ti_i.ih_len +#define ti_src ti_i.ih_src +#define ti_dst ti_i.ih_dst +#define ti_sport ti_t.th_sport +#define ti_dport ti_t.th_dport +#define ti_seq ti_t.th_seq +#define ti_ack ti_t.th_ack +#define ti_x2 ti_t.th_x2 +#define ti_off ti_t.th_off +#define ti_flags ti_t.th_flags +#define ti_win ti_t.th_win +#define ti_sum ti_t.th_sum +#define ti_urp ti_t.th_urp + +#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) +#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) +#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) +#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) +#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) +#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) +#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) + +/* + * Just a clean way to get to the first byte + * of the packet + */ +struct tcpiphdr_2 { + struct tcpiphdr dummy; + char first_char; +}; + +#endif diff --git a/SheepShaver/src/slirp/tftp.c b/SheepShaver/src/slirp/tftp.c new file mode 100755 index 000000000..e656c4f06 --- /dev/null +++ b/SheepShaver/src/slirp/tftp.c @@ -0,0 +1,334 @@ +/* + * tftp.c - a simple, read-only tftp server for qemu + * + * Copyright (c) 2004 Magnus Damm + * + * 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 + * THE AUTHORS OR COPYRIGHT HOLDERS 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. + */ + +#include + +struct tftp_session { + int in_use; + char filename[TFTP_FILENAME_MAX]; + + struct in_addr client_ip; + u_int16_t client_port; + + int timestamp; +}; + +struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; + +const char *tftp_prefix; + +static void tftp_session_update(struct tftp_session *spt) +{ + spt->timestamp = curtime; + spt->in_use = 1; +} + +static void tftp_session_terminate(struct tftp_session *spt) +{ + spt->in_use = 0; +} + +static int tftp_session_allocate(struct tftp_t *tp) +{ + struct tftp_session *spt; + int k; + + for (k = 0; k < TFTP_SESSIONS_MAX; k++) { + spt = &tftp_sessions[k]; + + if (!spt->in_use) + goto found; + + /* sessions time out after 5 inactive seconds */ + if ((int)(curtime - spt->timestamp) > 5000) + goto found; + } + + return -1; + + found: + memset(spt, 0, sizeof(*spt)); + memcpy(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip)); + spt->client_port = tp->udp.uh_sport; + + tftp_session_update(spt); + + return k; +} + +static int tftp_session_find(struct tftp_t *tp) +{ + struct tftp_session *spt; + int k; + + for (k = 0; k < TFTP_SESSIONS_MAX; k++) { + spt = &tftp_sessions[k]; + + if (spt->in_use) { + if (!memcmp(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip))) { + if (spt->client_port == tp->udp.uh_sport) { + return k; + } + } + } + } + + return -1; +} + +static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, + u_int8_t *buf, int len) +{ + int fd; + int bytes_read = 0; + + fd = open(spt->filename, O_RDONLY | O_BINARY); + + if (fd < 0) { + return -1; + } + + if (len) { + lseek(fd, block_nr * 512, SEEK_SET); + + bytes_read = read(fd, buf, len); + } + + close(fd); + + return bytes_read; +} + +static int tftp_send_error(struct tftp_session *spt, + u_int16_t errorcode, const char *msg, + struct tftp_t *recv_tp) +{ + struct sockaddr_in saddr, daddr; + struct mbuf *m; + struct tftp_t *tp; + int nobytes; + + m = m_get(); + + if (!m) { + return -1; + } + + memset(m->m_data, 0, m->m_size); + + m->m_data += if_maxlinkhdr; + tp = (void *)m->m_data; + m->m_data += sizeof(struct udpiphdr); + + tp->tp_op = htons(TFTP_ERROR); + tp->x.tp_error.tp_error_code = htons(errorcode); + strncpy((char *)tp->x.tp_error.tp_msg, msg, sizeof(tp->x.tp_error.tp_msg)); + tp->x.tp_error.tp_msg[sizeof(tp->x.tp_error.tp_msg)-1] = 0; + + saddr.sin_addr = recv_tp->ip.ip_dst; + saddr.sin_port = recv_tp->udp.uh_dport; + + daddr.sin_addr = spt->client_ip; + daddr.sin_port = spt->client_port; + + nobytes = 2; + + m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - + sizeof(struct ip) - sizeof(struct udphdr); + + udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); + + tftp_session_terminate(spt); + + return 0; +} + +static int tftp_send_data(struct tftp_session *spt, + u_int16_t block_nr, + struct tftp_t *recv_tp) +{ + struct sockaddr_in saddr, daddr; + struct mbuf *m; + struct tftp_t *tp; + int nobytes; + + if (block_nr < 1) { + return -1; + } + + m = m_get(); + + if (!m) { + return -1; + } + + memset(m->m_data, 0, m->m_size); + + m->m_data += if_maxlinkhdr; + tp = (void *)m->m_data; + m->m_data += sizeof(struct udpiphdr); + + tp->tp_op = htons(TFTP_DATA); + tp->x.tp_data.tp_block_nr = htons(block_nr); + + saddr.sin_addr = recv_tp->ip.ip_dst; + saddr.sin_port = recv_tp->udp.uh_dport; + + daddr.sin_addr = spt->client_ip; + daddr.sin_port = spt->client_port; + + nobytes = tftp_read_data(spt, block_nr - 1, tp->x.tp_data.tp_buf, 512); + + if (nobytes < 0) { + m_free(m); + + /* send "file not found" error back */ + + tftp_send_error(spt, 1, "File not found", tp); + + return -1; + } + + m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - + sizeof(struct ip) - sizeof(struct udphdr); + + udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); + + if (nobytes == 512) { + tftp_session_update(spt); + } + else { + tftp_session_terminate(spt); + } + + return 0; +} + +static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) +{ + struct tftp_session *spt; + int s, k, n; + u_int8_t *src, *dst; + + s = tftp_session_allocate(tp); + + if (s < 0) { + return; + } + + spt = &tftp_sessions[s]; + + src = tp->x.tp_buf; + dst = (u_int8_t *)spt->filename; + n = pktlen - ((uint8_t *)&tp->x.tp_buf[0] - (uint8_t *)tp); + + /* get name */ + + for (k = 0; k < n; k++) { + if (k < TFTP_FILENAME_MAX) { + dst[k] = src[k]; + } + else { + return; + } + + if (src[k] == '\0') { + break; + } + } + + if (k >= n) { + return; + } + + k++; + + /* check mode */ + if ((n - k) < 6) { + return; + } + + if (memcmp(&src[k], "octet\0", 6) != 0) { + tftp_send_error(spt, 4, "Unsupported transfer mode", tp); + return; + } + + /* do sanity checks on the filename */ + + if ((spt->filename[0] != '/') + || (spt->filename[strlen(spt->filename) - 1] == '/') + || strstr(spt->filename, "/../")) { + tftp_send_error(spt, 2, "Access violation", tp); + return; + } + + /* only allow exported prefixes */ + + if (!tftp_prefix + || (strncmp(spt->filename, tftp_prefix, strlen(tftp_prefix)) != 0)) { + tftp_send_error(spt, 2, "Access violation", tp); + return; + } + + /* check if the file exists */ + + if (tftp_read_data(spt, 0, (u_int8_t *)spt->filename, 0) < 0) { + tftp_send_error(spt, 1, "File not found", tp); + return; + } + + tftp_send_data(spt, 1, tp); +} + +static void tftp_handle_ack(struct tftp_t *tp, int pktlen) +{ + int s; + + s = tftp_session_find(tp); + + if (s < 0) { + return; + } + + if (tftp_send_data(&tftp_sessions[s], + ntohs(tp->x.tp_data.tp_block_nr) + 1, + tp) < 0) { + return; + } +} + +void tftp_input(struct mbuf *m) +{ + struct tftp_t *tp = (struct tftp_t *)m->m_data; + + switch(ntohs(tp->tp_op)) { + case TFTP_RRQ: + tftp_handle_rrq(tp, m->m_len); + break; + + case TFTP_ACK: + tftp_handle_ack(tp, m->m_len); + break; + } +} diff --git a/SheepShaver/src/slirp/tftp.h b/SheepShaver/src/slirp/tftp.h new file mode 100755 index 000000000..f89e03932 --- /dev/null +++ b/SheepShaver/src/slirp/tftp.h @@ -0,0 +1,40 @@ +/* tftp defines */ + +#define TFTP_SESSIONS_MAX 3 + +#define TFTP_SERVER 69 + +#define TFTP_RRQ 1 +#define TFTP_WRQ 2 +#define TFTP_DATA 3 +#define TFTP_ACK 4 +#define TFTP_ERROR 5 + +#define TFTP_FILENAME_MAX 512 + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct tftp_t { + struct ip ip; + struct udphdr udp; + u_int16_t tp_op; + union { + struct { + u_int16_t tp_block_nr; + u_int8_t tp_buf[512]; + } tp_data; + struct { + u_int16_t tp_error_code; + u_int8_t tp_msg[512]; + } tp_error; + u_int8_t tp_buf[512 + 2]; + } x; +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +void tftp_input(struct mbuf *m); diff --git a/SheepShaver/src/slirp/udp.c b/SheepShaver/src/slirp/udp.c new file mode 100755 index 000000000..7917aaa47 --- /dev/null +++ b/SheepShaver/src/slirp/udp.c @@ -0,0 +1,675 @@ +/* + * Copyright (c) 1982, 1986, 1988, 1990, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)udp_usrreq.c 8.4 (Berkeley) 1/21/94 + * udp_usrreq.c,v 1.4 1994/10/02 17:48:45 phk Exp + */ + +/* + * Changes and additions relating to SLiRP + * Copyright (c) 1995 Danny Gasparovski. + * + * Please read the file COPYRIGHT for the + * terms and conditions of the copyright. + */ + +#include +#include +#include "ip_icmp.h" + +struct udpstat udpstat; + +struct socket udb; + +/* + * UDP protocol implementation. + * Per RFC 768, August, 1980. + */ +#ifndef COMPAT_42 +int udpcksum = 1; +#else +int udpcksum = 0; /* XXX */ +#endif + +struct socket *udp_last_so = &udb; + +void +udp_init() +{ + udb.so_next = udb.so_prev = &udb; +} +/* m->m_data points at ip packet header + * m->m_len length ip packet + * ip->ip_len length data (IPDU) + */ +void +udp_input(m, iphlen) + register struct mbuf *m; + int iphlen; +{ + register struct ip *ip; + register struct udphdr *uh; +/* struct mbuf *opts = 0;*/ + int len; + struct ip save_ip; + struct socket *so; + + DEBUG_CALL("udp_input"); + DEBUG_ARG("m = %lx", (long)m); + DEBUG_ARG("iphlen = %d", iphlen); + + udpstat.udps_ipackets++; + + /* + * Strip IP options, if any; should skip this, + * make available to user, and use on returned packets, + * but we don't yet have a way to check the checksum + * with options still present. + */ + if(iphlen > sizeof(struct ip)) { + ip_stripoptions(m, (struct mbuf *)0); + iphlen = sizeof(struct ip); + } + + /* + * Get IP and UDP header together in first mbuf. + */ + ip = mtod(m, struct ip *); + uh = (struct udphdr *)((caddr_t)ip + iphlen); + + /* + * Make mbuf data length reflect UDP length. + * If not enough data to reflect UDP length, drop. + */ + len = ntohs((u_int16_t)uh->uh_ulen); + + if (ip->ip_len != len) { + if (len > ip->ip_len) { + udpstat.udps_badlen++; + goto bad; + } + m_adj(m, len - ip->ip_len); + ip->ip_len = len; + } + + /* + * Save a copy of the IP header in case we want restore it + * for sending an ICMP error message in response. + */ + save_ip = *ip; + save_ip.ip_len+= iphlen; /* tcp_input subtracts this */ + + /* + * Checksum extended UDP header and data. + */ + if (udpcksum && uh->uh_sum) { + memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); + ((struct ipovly *)ip)->ih_x1 = 0; + ((struct ipovly *)ip)->ih_len = uh->uh_ulen; + /* keep uh_sum for ICMP reply + * uh->uh_sum = cksum(m, len + sizeof (struct ip)); + * if (uh->uh_sum) { + */ + if(cksum(m, len + sizeof(struct ip))) { + udpstat.udps_badsum++; + goto bad; + } + } + + /* + * handle DHCP/BOOTP + */ + if (ntohs(uh->uh_dport) == BOOTP_SERVER) { + bootp_input(m); + goto bad; + } + + /* + * handle TFTP + */ + if (ntohs(uh->uh_dport) == TFTP_SERVER) { + tftp_input(m); + goto bad; + } + + /* + * Locate pcb for datagram. + */ + so = udp_last_so; + if (so->so_lport != uh->uh_sport || + so->so_laddr.s_addr != ip->ip_src.s_addr) { + struct socket *tmp; + + for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next) { + if (tmp->so_lport == uh->uh_sport && + tmp->so_laddr.s_addr == ip->ip_src.s_addr) { + tmp->so_faddr.s_addr = ip->ip_dst.s_addr; + tmp->so_fport = uh->uh_dport; + so = tmp; + break; + } + } + if (tmp == &udb) { + so = NULL; + } else { + udpstat.udpps_pcbcachemiss++; + udp_last_so = so; + } + } + + if (so == NULL) { + /* + * If there's no socket for this packet, + * create one + */ + if ((so = socreate()) == NULL) goto bad; + if(udp_attach(so) == -1) { + DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", + errno,strerror(errno))); + sofree(so); + goto bad; + } + + /* + * Setup fields + */ + /* udp_last_so = so; */ + so->so_laddr = ip->ip_src; + so->so_lport = uh->uh_sport; + + if ((so->so_iptos = udp_tos(so)) == 0) + so->so_iptos = ip->ip_tos; + + /* + * XXXXX Here, check if it's in udpexec_list, + * and if it is, do the fork_exec() etc. + */ + } + + so->so_faddr = ip->ip_dst; /* XXX */ + so->so_fport = uh->uh_dport; /* XXX */ + + iphlen += sizeof(struct udphdr); + m->m_len -= iphlen; + m->m_data += iphlen; + + /* + * Now we sendto() the packet. + */ + if (so->so_emu) + udp_emu(so, m); + + if(sosendto(so,m) == -1) { + m->m_len += iphlen; + m->m_data -= iphlen; + *ip=save_ip; + DEBUG_MISC((dfd,"udp tx errno = %d-%s\n",errno,strerror(errno))); + icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); + } + + m_free(so->so_m); /* used for ICMP if error on sorecvfrom */ + + /* restore the orig mbuf packet */ + m->m_len += iphlen; + m->m_data -= iphlen; + *ip=save_ip; + so->so_m=m; /* ICMP backup */ + + return; +bad: + m_freem(m); + /* if (opts) m_freem(opts); */ + return; +} + +int udp_output2(struct socket *so, struct mbuf *m, + struct sockaddr_in *saddr, struct sockaddr_in *daddr, + int iptos) +{ + register struct udpiphdr *ui; + int error = 0; + + DEBUG_CALL("udp_output"); + DEBUG_ARG("so = %lx", (long)so); + DEBUG_ARG("m = %lx", (long)m); + DEBUG_ARG("saddr = %lx", (long)saddr->sin_addr.s_addr); + DEBUG_ARG("daddr = %lx", (long)daddr->sin_addr.s_addr); + + /* + * Adjust for header + */ + m->m_data -= sizeof(struct udpiphdr); + m->m_len += sizeof(struct udpiphdr); + + /* + * Fill in mbuf with extended UDP header + * and addresses and length put into network format. + */ + ui = mtod(m, struct udpiphdr *); + memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); + ui->ui_x1 = 0; + ui->ui_pr = IPPROTO_UDP; + ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ + /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ + ui->ui_src = saddr->sin_addr; + ui->ui_dst = daddr->sin_addr; + ui->ui_sport = saddr->sin_port; + ui->ui_dport = daddr->sin_port; + ui->ui_ulen = ui->ui_len; + + /* + * Stuff checksum and output datagram. + */ + ui->ui_sum = 0; + if (udpcksum) { + if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) + ui->ui_sum = 0xffff; + } + ((struct ip *)ui)->ip_len = m->m_len; + + ((struct ip *)ui)->ip_ttl = ip_defttl; + ((struct ip *)ui)->ip_tos = iptos; + + udpstat.udps_opackets++; + + error = ip_output(so, m); + + return (error); +} + +int udp_output(struct socket *so, struct mbuf *m, + struct sockaddr_in *addr) + +{ + struct sockaddr_in saddr, daddr; + + saddr = *addr; + if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { + saddr.sin_addr.s_addr = so->so_faddr.s_addr; + if ((so->so_faddr.s_addr & htonl(0x000000ff)) == htonl(0xff)) + saddr.sin_addr.s_addr = alias_addr.s_addr; + } + daddr.sin_addr = so->so_laddr; + daddr.sin_port = so->so_lport; + + return udp_output2(so, m, &saddr, &daddr, so->so_iptos); +} + +int +udp_attach(so) + struct socket *so; +{ + struct sockaddr_in addr; + + if((so->s = socket(AF_INET,SOCK_DGRAM,0)) != -1) { + /* + * Here, we bind() the socket. Although not really needed + * (sendto() on an unbound socket will bind it), it's done + * here so that emulation of ytalk etc. don't have to do it + */ + memset(&addr, 0, sizeof(struct sockaddr_in)); + addr.sin_family = AF_INET; + addr.sin_port = 0; + addr.sin_addr.s_addr = INADDR_ANY; + if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { + int lasterrno=errno; + closesocket(so->s); + so->s=-1; +#ifdef _WIN32 + WSASetLastError(lasterrno); +#else + errno=lasterrno; +#endif + } else { + /* success, insert in queue */ + so->so_expire = curtime + SO_EXPIRE; + insque(so,&udb); + } + } + return(so->s); +} + +void +udp_detach(so) + struct socket *so; +{ + closesocket(so->s); + /* if (so->so_m) m_free(so->so_m); done by sofree */ + + sofree(so); +} + +struct tos_t udptos[] = { + {0, 53, IPTOS_LOWDELAY, 0}, /* DNS */ + {517, 517, IPTOS_LOWDELAY, EMU_TALK}, /* talk */ + {518, 518, IPTOS_LOWDELAY, EMU_NTALK}, /* ntalk */ + {0, 7648, IPTOS_LOWDELAY, EMU_CUSEEME}, /* Cu-Seeme */ + {0, 0, 0, 0} +}; + +u_int8_t +udp_tos(so) + struct socket *so; +{ + int i = 0; + + while(udptos[i].tos) { + if ((udptos[i].fport && ntohs(so->so_fport) == udptos[i].fport) || + (udptos[i].lport && ntohs(so->so_lport) == udptos[i].lport)) { + so->so_emu = udptos[i].emu; + return udptos[i].tos; + } + i++; + } + + return 0; +} + +#ifdef EMULATE_TALK +#include "talkd.h" +#endif + +/* + * Here, talk/ytalk/ntalk requests must be emulated + */ +void +udp_emu(so, m) + struct socket *so; + struct mbuf *m; +{ + struct sockaddr_in addr; + socklen_t addrlen = sizeof(addr); +#ifdef EMULATE_TALK + CTL_MSG_OLD *omsg; + CTL_MSG *nmsg; + char buff[sizeof(CTL_MSG)]; + u_char type; + +struct talk_request { + struct talk_request *next; + struct socket *udp_so; + struct socket *tcp_so; +} *req; + + static struct talk_request *req_tbl = 0; + +#endif + +struct cu_header { + uint16_t d_family; // destination family + uint16_t d_port; // destination port + uint32_t d_addr; // destination address + uint16_t s_family; // source family + uint16_t s_port; // source port + uint32_t so_addr; // source address + uint32_t seqn; // sequence number + uint16_t message; // message + uint16_t data_type; // data type + uint16_t pkt_len; // packet length +} *cu_head; + + switch(so->so_emu) { + +#ifdef EMULATE_TALK + case EMU_TALK: + case EMU_NTALK: + /* + * Talk emulation. We always change the ctl_addr to get + * some answers from the daemon. When an ANNOUNCE comes, + * we send LEAVE_INVITE to the local daemons. Also when a + * DELETE comes, we send copies to the local daemons. + */ + if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) + return; + +#define IS_OLD (so->so_emu == EMU_TALK) + +#define COPY_MSG(dest, src) { dest->type = src->type; \ + dest->id_num = src->id_num; \ + dest->pid = src->pid; \ + dest->addr = src->addr; \ + dest->ctl_addr = src->ctl_addr; \ + memcpy(&dest->l_name, &src->l_name, NAME_SIZE_OLD); \ + memcpy(&dest->r_name, &src->r_name, NAME_SIZE_OLD); \ + memcpy(&dest->r_tty, &src->r_tty, TTY_SIZE); } + +#define OTOSIN(ptr, field) ((struct sockaddr_in *)&ptr->field) +/* old_sockaddr to sockaddr_in */ + + + if (IS_OLD) { /* old talk */ + omsg = mtod(m, CTL_MSG_OLD*); + nmsg = (CTL_MSG *) buff; + type = omsg->type; + OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; + OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; + strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); + } else { /* new talk */ + omsg = (CTL_MSG_OLD *) buff; + nmsg = mtod(m, CTL_MSG *); + type = nmsg->type; + OTOSIN(nmsg, ctl_addr)->sin_port = addr.sin_port; + OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; + strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); + } + + if (type == LOOK_UP) + return; /* for LOOK_UP this is enough */ + + if (IS_OLD) { /* make a copy of the message */ + COPY_MSG(nmsg, omsg); + nmsg->vers = 1; + nmsg->answer = 0; + } else + COPY_MSG(omsg, nmsg); + + /* + * If if is an ANNOUNCE message, we go through the + * request table to see if a tcp port has already + * been redirected for this socket. If not, we solisten() + * a new socket and add this entry to the table. + * The port number of the tcp socket and our IP + * are put to the addr field of the message structures. + * Then a LEAVE_INVITE is sent to both local daemon + * ports, 517 and 518. This is why we have two copies + * of the message, one in old talk and one in new talk + * format. + */ + + if (type == ANNOUNCE) { + int s; + u_short temp_port; + + for(req = req_tbl; req; req = req->next) + if (so == req->udp_so) + break; /* found it */ + + if (!req) { /* no entry for so, create new */ + req = (struct talk_request *) + malloc(sizeof(struct talk_request)); + req->udp_so = so; + req->tcp_so = solisten(0, + OTOSIN(omsg, addr)->sin_addr.s_addr, + OTOSIN(omsg, addr)->sin_port, + SS_FACCEPTONCE); + req->next = req_tbl; + req_tbl = req; + } + + /* replace port number in addr field */ + addrlen = sizeof(addr); + getsockname(req->tcp_so->s, + (struct sockaddr *) &addr, + &addrlen); + OTOSIN(omsg, addr)->sin_port = addr.sin_port; + OTOSIN(omsg, addr)->sin_addr = our_addr; + OTOSIN(nmsg, addr)->sin_port = addr.sin_port; + OTOSIN(nmsg, addr)->sin_addr = our_addr; + + /* send LEAVE_INVITEs */ + temp_port = OTOSIN(omsg, ctl_addr)->sin_port; + OTOSIN(omsg, ctl_addr)->sin_port = 0; + OTOSIN(nmsg, ctl_addr)->sin_port = 0; + omsg->type = nmsg->type = LEAVE_INVITE; + + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); + addr.sin_addr = our_addr; + addr.sin_family = AF_INET; + addr.sin_port = htons(517); + sendto(s, (char *)omsg, sizeof(*omsg), 0, + (struct sockaddr *)&addr, sizeof(addr)); + addr.sin_port = htons(518); + sendto(s, (char *)nmsg, sizeof(*nmsg), 0, + (struct sockaddr *) &addr, sizeof(addr)); + closesocket(s) ; + + omsg->type = nmsg->type = ANNOUNCE; + OTOSIN(omsg, ctl_addr)->sin_port = temp_port; + OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; + } + + /* + * If it is a DELETE message, we send a copy to the + * local daemons. Then we delete the entry corresponding + * to our socket from the request table. + */ + + if (type == DELETE) { + struct talk_request *temp_req, *req_next; + int s; + u_short temp_port; + + temp_port = OTOSIN(omsg, ctl_addr)->sin_port; + OTOSIN(omsg, ctl_addr)->sin_port = 0; + OTOSIN(nmsg, ctl_addr)->sin_port = 0; + + s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); + addr.sin_addr = our_addr; + addr.sin_family = AF_INET; + addr.sin_port = htons(517); + sendto(s, (char *)omsg, sizeof(*omsg), 0, + (struct sockaddr *)&addr, sizeof(addr)); + addr.sin_port = htons(518); + sendto(s, (char *)nmsg, sizeof(*nmsg), 0, + (struct sockaddr *)&addr, sizeof(addr)); + closesocket(s); + + OTOSIN(omsg, ctl_addr)->sin_port = temp_port; + OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; + + /* delete table entry */ + if (so == req_tbl->udp_so) { + temp_req = req_tbl; + req_tbl = req_tbl->next; + free(temp_req); + } else { + temp_req = req_tbl; + for(req = req_tbl->next; req; req = req_next) { + req_next = req->next; + if (so == req->udp_so) { + temp_req->next = req_next; + free(req); + break; + } else { + temp_req = req; + } + } + } + } + + return; +#endif + + case EMU_CUSEEME: + + /* + * Cu-SeeMe emulation. + * Hopefully the packet is more that 16 bytes long. We don't + * do any other tests, just replace the address and port + * fields. + */ + if (m->m_len >= sizeof (*cu_head)) { + if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) + return; + cu_head = mtod(m, struct cu_header *); + cu_head->s_port = addr.sin_port; + cu_head->so_addr = our_addr.s_addr; + } + + return; + } +} + +struct socket * +udp_listen(port, laddr, lport, flags) + u_int port; + u_int32_t laddr; + u_int lport; + int flags; +{ + struct sockaddr_in addr; + struct socket *so; + socklen_t addrlen = sizeof(struct sockaddr_in); + int opt = 1; + + if ((so = socreate()) == NULL) { + free(so); + return NULL; + } + so->s = socket(AF_INET,SOCK_DGRAM,0); + so->so_expire = curtime + SO_EXPIRE; + insque(so,&udb); + + memset(&addr, 0, sizeof(struct sockaddr_in)); + addr.sin_family = AF_INET; + addr.sin_addr.s_addr = INADDR_ANY; + addr.sin_port = port; + + if (bind(so->s,(struct sockaddr *)&addr, addrlen) < 0) { + udp_detach(so); + return NULL; + } + setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); +/* setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); */ + + getsockname(so->s,(struct sockaddr *)&addr,&addrlen); + so->so_fport = addr.sin_port; + if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) + so->so_faddr = alias_addr; + else + so->so_faddr = addr.sin_addr; + + so->so_lport = lport; + so->so_laddr.s_addr = laddr; + if (flags != SS_FACCEPTONCE) + so->so_expire = 0; + + so->so_state = SS_ISFCONNECTED; + + return so; +} diff --git a/SheepShaver/src/slirp/udp.h b/SheepShaver/src/slirp/udp.h new file mode 100755 index 000000000..639a2f2c7 --- /dev/null +++ b/SheepShaver/src/slirp/udp.h @@ -0,0 +1,113 @@ +/* + * Copyright (c) 1982, 1986, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)udp.h 8.1 (Berkeley) 6/10/93 + * udp.h,v 1.3 1994/08/21 05:27:41 paul Exp + */ + +#ifndef _UDP_H_ +#define _UDP_H_ + +#define UDP_TTL 0x60 +#define UDP_UDPDATALEN 16192 + +extern struct socket *udp_last_so; + +/* + * Udp protocol header. + * Per RFC 768, September, 1981. + */ +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(1) +#endif + +struct udphdr { + u_int16_t uh_sport; /* source port */ + u_int16_t uh_dport; /* destination port */ + int16_t uh_ulen; /* udp length */ + u_int16_t uh_sum; /* udp checksum */ +} PACKED__; + +#ifdef PRAGMA_PACK_SUPPORTED +#pragma pack(0) +#endif + +/* + * UDP kernel structures and variables. + */ +struct udpiphdr { + struct ipovly ui_i; /* overlaid ip structure */ + struct udphdr ui_u; /* udp header */ +}; +#define ui_mbuf ui_i.ih_mbuf.mptr +#define ui_x1 ui_i.ih_x1 +#define ui_pr ui_i.ih_pr +#define ui_len ui_i.ih_len +#define ui_src ui_i.ih_src +#define ui_dst ui_i.ih_dst +#define ui_sport ui_u.uh_sport +#define ui_dport ui_u.uh_dport +#define ui_ulen ui_u.uh_ulen +#define ui_sum ui_u.uh_sum + +struct udpstat { + /* input statistics: */ + u_long udps_ipackets; /* total input packets */ + u_long udps_hdrops; /* packet shorter than header */ + u_long udps_badsum; /* checksum error */ + u_long udps_badlen; /* data length larger than packet */ + u_long udps_noport; /* no socket on port */ + u_long udps_noportbcast; /* of above, arrived as broadcast */ + u_long udps_fullsock; /* not delivered, input socket full */ + u_long udpps_pcbcachemiss; /* input packets missing pcb cache */ + /* output statistics: */ + u_long udps_opackets; /* total output packets */ +}; + +/* + * Names for UDP sysctl objects + */ +#define UDPCTL_CHECKSUM 1 /* checksum UDP packets */ +#define UDPCTL_MAXID 2 + +extern struct udpstat udpstat; +extern struct socket udb; +struct mbuf; + +void udp_init _P((void)); +void udp_input _P((register struct mbuf *, int)); +int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); +int udp_attach _P((struct socket *)); +void udp_detach _P((struct socket *)); +u_int8_t udp_tos _P((struct socket *)); +void udp_emu _P((struct socket *, struct mbuf *)); +struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); +int udp_output2(struct socket *so, struct mbuf *m, + struct sockaddr_in *saddr, struct sockaddr_in *daddr, + int iptos); +#endif From ea626e216d4d0056f8d42b3816d855ed95352bcc Mon Sep 17 00:00:00 2001 From: jvernet Date: Tue, 2 Jan 2018 17:01:45 +0100 Subject: [PATCH 203/534] icns --- SheepShaver/src/MacOSX/SheepShaver.icns | Bin 59840 -> 79532 bytes .../src/MacOSX/SheepShaver.xcodeproj.zip | Bin 0 -> 35529 bytes .../SheepShaver.xcodeproj/project.pbxproj | 2449 ----------------- .../contents.xcworkspacedata | 7 - .../project.pbxproj | 4 +- SheepShaver/src/Unix/config.h.old | 6 +- 6 files changed, 5 insertions(+), 2461 deletions(-) create mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj.zip delete mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj delete mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata diff --git a/SheepShaver/src/MacOSX/SheepShaver.icns b/SheepShaver/src/MacOSX/SheepShaver.icns index 84fb9395869b296f201ffee9d87a55e4bee1bb8d..ae6d1d5b8095331382622d487684d415bcaa86dd 100644 GIT binary patch literal 79532 zcmeEv2|SeB`}k|$w^D>GQItYa6dBzVr7Wpbh!&wjLKI_6iXv$dMWIyErc#k@q?9Fw zD9JL6eczX1X5RmKXH22G*Z2Nz-R}S6Xy!fVd7kq==UL8k&U4;3?DsgjKupW-Z#G&j z4MC8#y^HD+2x8vsqTz4=f|xk%4$^#^HfR!)06q%BZnM{9F&+Pfm{`FCAuZ5>Yg zJt`UyG(#O+mqU<3sQsSBDiCC+&A4wM#H6fq5)x3`zu$yOj&KALfE1ji=Eq^-O~u}8 zA&m{n`Eao18LwIj2_A$X5nVC~#>i=@6%RBMiGWir4C8du?$p42)J2D{K|+r{L@mmJ zN4iJgi>n_;LXf!gV9B0mGE;!3hFTIBd59a zQ-5yE9YqMLhv5v}^tc+hKU?0=3KDwq@y4QDm@+Wf?jmEPhe+XUllF@6_OOP4)I2F5 zh0p7~7kzmAA=W*Y+-|s@f>_yj4P3t!VT0Wch#|uB@ggKWYB6Joz{)`rK@kx_&E8(0 zT{dMm#0N?2nltAjB7!3j!F1UjyoJeG$2T*WI}2hVX&d+1BfCedf##`Y4G7 zK@1-SeoHTWeB2QCr&grF2SKu-Jw5FabuezRkLIhM@E{6IEBl~gdS&!`Ib=o}3%J0v zf0U9A9fD4bMZ@rN-h^H%9hCP3hCl5A+8F|E(us`=B!X{lTn5|^KN}4KSv)>Jmk%y~2k%GPbKT-T!PLd>a5wx0X`i9pAQC#24m<_46>04V zP;-IrgKxc?&cm3a$q*AIECOPRrUXMwM2b%vCnXw!qAAf7l^}?lLZr0O zf1(2*VKhu!3qeGf2-ATBlmSYZFElF-^gy6QIND|{v5kgBa6~c|5}ysQXd=KvFt{)1 zZ%L%#D0njdI3zZk(KQQ(Y=VQMp)i<8!6QiW31}Amu30b|iiT_;JlqD;QFt=wItGc4 zw#37;U*7 zKM8Oc97atDgU}69oHF^|!8Dfp5Lip$_5OXvX?GG`dQc+p>l z3~rnNmH9)QKqUYKw{f0=pt4ioRxlS8PzAq(fLEl`ydoX(ige%=>4;aPN2eoRkxoo+ zqyJ3s3L0=AeIWh2UIDNOj_CUXuRw6=c;6p+MLHfq`hMRlXehkzkG#Sccm?go-}4IJ z1Yjt<@b|qU6Clx$@b|qU6Y&aR(DyrDk%@SPFw*r~uMkGOBJ+z^WD=oF;1!vOR{&@x zXwkib21UFg^KW`Z<^-?E1lG6YRx>sb-ydnefiVWZt8HiV8L}wsg zkwMI8qyNyn!jBd!{D^*Z;6TPe#uu*uP@*3#R?x5rj_5bWEBqk8FR=o_W#Ii7UP0@c zehFX< z_|1q{0F=!bWP%@_3n0zc8LKF2pM~gTBBk5VlCH0N5}Z4)Kc3 zNLSz$JVb~G#0nnJ2Ze7?pC9xg7>33vr#mk0e>fkE*9lY*>N z-=K|Y>lbWHUl=FiN3nDo7)~4Qj(~4N&=Cfle!YfZZ^5wfgkE2$0QyHLgk~GSfBZuH zZRI3b#{P`J&kEp2<@mNYfFStqA{fA*jo)VW=L0YU`0tHSfIdLSZHS5{k_ZTbA2S$s zGTZhoUO-S#V4E4O0PJY@F)R=)z;6TJ4CJ``3(#>iu3x{tT9MXq8!|knuV_#kr7#9O z!O*}zP{t8JP5@#|1Az+d4igB#tcPI`9%!Sb5sbTmEpkgx{2)ioj7Gl@ zAaF(*z#9T-j3xgm=mUjnY;S%6tiGx^|I&7H5atGue-Ngpn;JUG#>cAfgvB>Oku=m+3 zV0X|8qB{`ZA-; z59aQ8b!*=Od3l+TGUL+_8?TnFlc|gk#3JwHmEi+3_4oPo^A7g)g55dwwaYq5Na+N` zJbjL+4{`+G^lBnlO#5KqiJ0VxREU)?JR%{=wF zX9R{nWT&3Rpby7143NqF{e!)Iq~T!_3DCl6(#N3%(-t{C4_U8jX141VJQ(6x{(ArR zgAS`vrrR;NrlH}%K{BPUhtyTy2|tqp)N@V4PA}lySM_|QEtzsyKQ&B}8+FEE@hl0s z%}=_9hlWUf?X8`4RUPn6uoGDzqogLuG2=Si`z(vpnU|7R?mtudh`)=I(<1SsHN)M# zy;V(JgoX|xIa$&dTEGcGvps7-)(dxa5A?QEuFsrnw|?g_6HTj!%>x51wRQD%P5m%s zlx~4?WnD9k6R^Xc~WJuzPx?ia9>YveN|fnvFUYOYGKEK9UvC< zYleHe``dfE${O46YKmDrP4%<1I#o<<21&9?sjpWvT%xNcg zx3=EV6gA0cEF(OLX{0nZb@#S3G&NQkQ^hS2Wx=B}=svoCrdYl&{f^)ujqfcURUF7gS}Z5Q^V6*Ct>V&qdcoOK+sY zj)0g`+7qAsvbx7s!es5LM?Jcg|Ki!<#Yk3lqUv%uK z+cBGM-f6nR*J1pj%N@mqg!0@ z@B1a(@IJcqB*bhTAr}ly+XI4>^i%kW*d}hzJ+J3CQpUL%jQ7*i_~jd|T3Z zkYo`J@jAj3LzzVQnuI|Y)gH9>B7GC!M^amk?~Q;RB$}Ehfn?dYbx7RX#DT*D{3#7{%491^SaWiEj%!+e&8^-MpA zhl3p)^2qzAx-AiAy8y9r332iZf?bV-JP!o%>?tfva1g!@@vQdI45wwPYA36m?Pv>0KrBk3+odLelcnc=cXBoU7?54roM9c7TjLrxS)psGWIz zMe-n9Vi8`obC=P!{mZ#eL4ty2X)ydg>0{Tx@X#<^7YsVFi#cu6J!8fPu&hED81DV> zFpoSu1XE8)a0NnaV*Agmn#mRb@tU;3X(yBWV7R9;-{>sFtY*r02I5r=Oy4LOoSpG1 z-0k3Epmr|NIp8E^o~*36@O1882t-g09xgTzK^3;H7iU8vXI82{5%!ZYL7@S}Iy9UMI!bE|?=D>3T;W#8DoteFu>^Dk|@E?0yHeqp0XZNpbOqk}_gb z7tR7D56OOwqucIwQLB+SYM=kPX^2Ygz!#Mll#~~i*A-W^en@eeHYSdK>LO7oAKs>( z_3?7P-84ucHx=fWmlP5|7ZJ-#>)$znbF(pVG=|!D@!02A_DCGnHr?)>+1C7_q_m>4 zq^Rt}tAx}OB46WZ<+GKxBP3_Nv2pZie@DRwVqX5ooXjT?iRTgO(Kt%&ewH=V@h&Cz z^Ora(cC>b+t{^8TJ2&Uv)u$tdIAeGwL)8E@Ve0_%8XdJ!QKq8f;XXa(z zzn7Src2RF82nHaI_K);-4s^A2)Yi4${t`!P2YS1En?Gj1P6!RV=yEpmo(>=u^=qVd zclEXRbd)u;#I2ymQR`F1uiUw(4MB$YJ>~&o={S5w*XPGM4MROK+M>p<`&z3zTZo-4 zgvPF+frj);H)0Ph73MSuGDOBKv^%Y_vn%`Ti|$7tj%M^VHFpv_`iV^q?e~e0rLvng&EhnV1h#!z1@kKE96eK;kGD zKO2an`^a^FNI$1Onq@-i8I7ai5bw6?>UH7~gRxSk?UftAR5T+rY!naazbK(!R=OFq zty(H|rSFcMnWbC&c{^xtZ|*jhj2SsEwx+aV8)z@N5WiadeE%hh^@K8no?A>>P}Ha5 zoW#ab+*%Mp`P9P#rHm77W{-`a7C(rf)43)QLD|0_L05e@f^I(KAS2{<`OqOp6yJ9u zsN~X9?}sTK>)({#E*`o*`}+~}_PbgFaj52f8{zq*&g^;LjiBAsmPhv+DU^!$MX&lx zzKx*UUiN-^_M)t-si=ZPC7u(T7(qw+TS_11477JqslKy0$3{@&HtI`sWFvLB`ZIoP z1Whv*Iq>3XB*x8&9zkXJp&7E$5+V~Ls2M$i8oo(eM~|RITj>$h+?*CcjcF0o21L;N zek$xBg7Qenc$8O^f(Tms{&gS{LC*#pe;99oM9`I2pJ!Hd)>ikoR<>4VCExiPL1l!N zuGqYNE;9rzv^ET^D#|PW^zj3TpdUWhwtxt#GcJN|^0}6m=e1Nq(mC?WZvsXxXVsQPrF-PZmfB9=l$oRiVsD#eFU;XJ*W#xyW^3vB&)BR^LA}HVf_t#h26g<>X zaJCR)TXmMU6W#ivu?$~X`!4_EyVnWVlD|gKSuyW#Mu*3}KJOBJbuIT?uoHE3Ql8^^ zH?E-UT~1D3-u-LO(_O$R7_t+UJM!>F5-vI6X;R|D1P6Wv`}I4InyfbWjDGesH9P0s zs|WX!({Yz*5tM7zv7ATGvhF0{qVGJv?4~PY<*%x`UeP8o_F2}=o47aG&n{mHaXa@a z4vC=Rr;;9JCEU(@di~+u%NPwwtEXxHmNus&@1(}xdUpGI#^dN)yCi0=dxS?KsB~1) zxjW%!AEiHiaKlYQetlqe;k}T^Ckc1&B|LlZ=;__ayZ2ELwC-t?CLk8xeeqIc_-V|& z+$iTiq&9>{KX?{>Kk@qg=g~<8_am-ch>bg}Cd6U*&`${v3z?v=yn5no=M&|xA-y9o zIwkJf^9R?T-H(X5aX;B%O~BK`a!c0>&-Hz10*GhqIb!2^$if!AUt@)R$h`;m;_g3) ziN1TsZ@1eSM?<@tM;0#FVKRN`l?X(@X{P(OT5a8X$zNN{@J8&z=dq6x!Xs{n`R`e_ z*-q!s^8i)Z-Pl$98i4Y?OyIw7HV)qK0fyyaNmWgvpiStF9_J1;;0elueryF!}r^5=q&%z49q$` z`;*>>4tNAcInMlM8@fF$$=v4X8tfwrOhH1*1*r)^baQMinMKTstQ7 z|BEW0Pe+H3)L#&NMRV-Uh2dQ6SHQ#?pMo;IC?JpKl(&{62NRTuRA1WDcDyL0mlxZa z=G-o%k^hi>kyG$X`auWyetA56fYumDK!3R(iv-}lNRkZzW+<)+YW+ezTA{XoF1WoG zWI^=8vN#BE&k5B6G0-jJ<2U5+AkJP{7DPzNt)4y(3%Qlg*C97*z3<}_Q8Mw~NPDEx z61lU`j%*6t6u2X>@q0vLV8iv`@jC?RM}ve127CN5sP9%=E`hZVoQpPp7yB)+$!7r~ z?A@ksQQw8Mg>95#fuLol{%YW(z1t%9|G^6wNV?J#^WA%n1@;%5U&9SS%ri_u8aSzv z1rB#0zCC!5kWH%eCn`YDw17#`(um5z>jpyD$Lp<@xRC6Jau= zYCL9Q$RbLgXp^C@_1tU%L9~hdL-OvZOa`v@*1oN@lT}+VQ_AQwj)9|HJB#x1(F@EA zEBax0u#RwR&lc;gh>r?^nYg8F94W04siC5|h-ZejJ($XGPrBM{F|#&B=#e7%ZXA8{ zHJ_8d8qhR3ITeLDI^Os09p7rWb(i(Jg>-5NQYsurU%VXR77>}Z(PHbi9p>gcw(qdq zwq9?;I$2f*y>ihw`l7`UkE)*Gc1v?WzHO7C(GCMiK_NjTdeF;~igEOX%lMXW+hw_Z zo7u+2qM{|@M7FM2A}m5%*?l&nHX4jm?pD$2pqYUfsmYd2%>5|H~8UfIhru?O?wpyGPu zJqAjZ&yrc!XqEhH=SO{$|WEmz^7dfQ>w#)2ml7d z<#rS4L3`GQ0|(ALzln8Tg{W>JVs!lF%XnIcfbY<=N-SJx9^VHKJl?4&!m5xq2q+0b zm#Yx(I`%C+o7UM^uL_aa*kAP;Gf&7K@e)e)<)A8X^&U^pt8v)JFTM>RMoYN`vm|(o z1PVSLiGms9Ritqh93qV?7znZ*JNwGF3XNfLxN96SXqIC+!l$5qvh;GayT5g zBgft=3D54mMuI*lg+UBz2s+#`3Z$cekrMR~o64+Rr@8Ab-MdJoU+Fcjw$mx;-y?v2 zJ#ek};d^de&O8Z2RH82XbGI&41u9;2OxKLzh! zFTkLOME1UG$ameK^92Aw(=mwo8KwB#ZgYJQz!^niFWPmR(sV`>Tsf3>pN>mR7%k`b zo3D`r>+P2!GDmj7SaR_6fmh0C&rVBv*|x=4kqvo0=1XB_VPl3Eud5+Yw*Ix85mpn;tbyV-yb9!P_D-xz5SiGb%J)Qk_Jf#0kb&^cptrPqj6+}VXfc4*DbnS$afpC0y2~65=Dctk39aFSR(KM2&{>;brOrO zL?YPVflxs|2=v6$yod_!^YHN zo+xZ876ta1$eK3kc0K5K8Uj7bun9Gjt0!RHKo2_oU)HmrlWT!TC16uO{An!<0+Al^ zLN4$@Vm=k@kr0W>fHVo%vS&XT{{Xo^G8d?{Q6N{)zJ`o}HUgmEpN}8q`gIh5YXXqJ z>^fa~+L-=XEZ{)j`Ou|9>YQdlJd;gn?YY zf3L}9YMF>sV0A|_JmLQ#!~6I9{Z)pCjF6t;2?NybM}~_w9EyHlrVzN8`S; zka?W}GQ5n@3=dpEou1+S18|VxWgr}YoMS&ohWC%aK}<$t{Qw90Gd!f`H;&f;;DdbV z8Q#A}3D!PFhDRSGGS08h@V<_jF8S8fv@vyJY@aVcn?2iZXe(xFH zZ`KR!mFXGYS1V+x~e!|Gr5YGda`6>-!Dd2gC ze=s~|Gp z@Yu~juHV0x4HzRL5pw;WR6rUa3l}04m~RNh=FtrAztPVRWNUt-&+xw53y~%a%L6`$ zWb_PgGmvf6YQJkA5CItTABpJ5c-X<<3j(%4G9(@_i;xTtu?+G- zp5bkN{4=pc-~mX6$3x>z+mgo`$QE?^PFDqJ8l`+E?^c#tuGyU{W{`gr~~Nc1=3 z`5O>ghKKNFWO#p3|Nkt*^8*$@A~+A0>$@4=Ps7tPJY+@TqRj>53Py2l{4>0tjUVMY zItsuI%+j$L9&JqjEEaH}ucOFXi>#+#pW*#eaG=MNh*r5q^Sep47#SVo8V50cq2QPI zH-BM;@sjEPj- zi2p;y7!=0+CSDO7a_fn3M*IK3_Dk0({{N2t|4i=;`~K*f2Fe!${>{o1{~z1^M|x+# z|4RQ8b$c5WhMA6l!nn`>dc6h;<34|Oo#H>N#h;;n?p=^7QYqJjd1M>hh|a%P#@ZdJ zkG1#2`ef}s#h*Us{w@7a`e?Q_k z)}H@seX{nS;{S8>KiTJUjCnnFjw7&%_CwbG|HTKU_)qS+;Lp-O!&ZN02L#99k6aNS zVAy?ZodH9xjQdXZI>rCTe()>w&#)6Rf5+Mp;myE}y^f_pd}3^yQ6Eb`+4>a!e^>uw z?SwqTW!Ms_kHsC3g<;e0T^W9Wob61+PxOJmWAiEgzh3`; zrSpk)X4rKi{CjN%?Vnwz`2V@hC+d}<%Zc#swHdU3cKu$zKZA|E*PqcbaAWDeS7*>o z_B!?+lj$>-{(JSw++!@w*n5nH|ENBe{(JQw_4^Tg>^*)&GZsFU{(JSYw3DeLaenN5 zkT#?IsQ*~{iS-}#`4Jr9HTE71-pKVwea6yHtpBLbkKhQOvG+jQjPj#CW9cW>f7Itk zaD>;`doXw-*B|v6OFywb+4wsM3UYsh&%}E$+TR<)pV1@zrua`T{{JlfBR2Sv-%Nxf z`@g@k=U5*=>PSI&{8^dE=SS@+{y#_mh+coBa|RrtVVwW{nJp0@8}@Ys>ZjwxIm(-#-!<~Ys8^V-?A)TA8QEpPhTqJKDVIbnIDX5-Fs-IZ4M&%$SI zITd>E;WfP6rHipMLn1c@yiX`GU@5uRY`ExrUj8(tmoo+nT5DzpaOSn2@1PnE$l{I# zRur9{W0c`IV>Wu$5Ul>{_Xx_9-XsvSJaYgMD3mDK~` zD)uTi&!R)IJR3*$yDj#V5Pe+KKezRAwyZ{}o9(oOn<74)TZf*0+S7FYPPVCi^{(od z>(O_wScN-pZ8%Yxm$2i?J7(G7y|~!?Iv)-n)YAv4ci8gZuTWRLF|)_O?11CLxK*DY zhHp3Fp)9$gxidI>zC+5T%n+$O{^TRqXXVXY|E8#U9_GQmW41z{Ke44mihMp7Rr$Wn zm0k4cCsgVR$M4HFrt&iIcDL zb}gP`^nTjG%A?DJYu}zY^F$OPQUp`{Zm96 zr@_k=FZtQH4?C=wv7i{O(BGSCl%-jR>X za%Y&8#ovve&*hbyw8Zj*p8t$|wHf$&g=OwZX_|U6!(7)N z&eUw(YG;0DI=Wr3A1C(NuglP@LG?x;M}Kk}u`x!!j{UspibsTz+06#TO4r0951+v; zczIn-DRnXUp}Lr+)f{+ckxegZJLK$fP+SrG?Kr_V>vUIb_F!ti=47|Ce%2eKn|tQ% zIcS-z{8?B2)$Z8mHhazlY`y9-omYW(-`gcD#h<;3r1w}S4!yjwWMRUb`%826V^?dk z^S23VE_$~*}Fm-~gce|%0M@Opm^1+eTw-$}w;7^}d=48zu zL>DyQ8{%N%yuX*(;N`3SxS`^ZQ|wHfb@P0f>K-bWt478B=wgZS*Z7E{GZy1W#))KR4fhv6e*GVj?%5&D}euj(`pv2gI~YxhfFOTGSyU&b^=-3^;2a;O6J0{Q*dx<3pwE^lLjkNH(E5pBYtE+;5PMp21NDyyKJ?dKt8oT4B;k1SGW-+~kuR zyZ!wnLk*I8Q--p#91c_7qmL!RI9%VFqtsw($Ka;mH%7qVrBYJvP95>#2 zy;OBB_KS=q;4nB{SK@1~IK8M?rAqnWfwIAN&DA|eJ6<&2^d9Qk6^9zC_T3~UDtd0X zx;mu90MDg6(pTg$sC`m(pm}-FmW!It*Jo_$zf-h&i917T6`v!e!Nsekbs-kc8d*{1 zcHr<&Q@pQAGRpu(a!S1vv;)2xUD;pTC&($30sS$=>8F#zbze+OEZOwdqXVT%bIpph zah^M2KXJ!%BjD8vgOw}f3riDMKg2zitIy49ZMu7y5asRyoeeI>xVmoMdHC(@x3{#d zBi~w8);D%rMo~8;zy|kFGQBAoeI%>&mi4o&Hg+WGSQ$63I(K)6O82G)ejVbf6FP`t zJBBaJW|d>&oit$JT5bQ;jCXjjiC9wA->j@Pa72N6oW&^HqqNbzyMF}g zK>Yn`(cmo0+zKXrty6;88zC@vte*J#$oWhfV13CTzN0r~ZGzXF^wJS>V&!dIVD*rd zYtfpXX{E95F02AtT|O4@Ns*oBhTjAw8+D|MtEkmrT4UKOJR&Ja#>|juUik zb7yMNSkCe2sjIF3E!0qVMfT3ummt1RVSXcn(&OUrPSb}o0jxBRQ=U6uLR(WP&Alm&r2gI^4*sUb=J@3GgJqRh zGyU9`(aj5y0(UD6;RlL`hhnV7xn2W>c!Ag0zL9M~{7)jLU zSVD^Xv$_QIi2JQ{_fDla!q5xzn;pYsy|WVMyK8G}H@Ty!=rz;!RTG z;un)!dyjY;W(+n5=k$&YbqtU?;o{&r((p*X`&NN%YGoT)Ee>tA+A)0DV)w39sLu8V&Who{K>vE`fsgmk4;RJg-O|?Z z2ra4X9V%)h#h{NJ9ok2f&$oe>B!^UbQYuHFI%59o2mnw?4tc?H&O=b<99Ue=rKIoW zU|I)F8j#_?n4{3)_~8O;Z||KQxPb?5n^5f+rf))dlaoqDMo^3T)6?B=bu{qqv&AUZ zihEh@e535!G~CzWZu~J(+e(dkVBTB3ppH5&mzRW~jvm#T9UyAI_(*&?H!ScJqLhCF)RsneP`g0zfPcMUMP9!?J za_RyPGCBTwb#xZkF3c1Oj#(|e9%4kWbKd+J{iMpPKKI&llo#e2EW5m%X_iIcLp;3u zP(gH6X8(0dDeC%*zJcmByUOYtmmO*heyBXs*Kx??nx>D!Dxyr`ZXkSM;M*b@!MQ$6 zx?GbV%zHeO#0ppa(8ecu$s^i6c2QMXDa)CzkU4I&y68of1`p&|aywFPppUo@y`T@RB=o7UKLKmkNs z7tRnMVn{u{Lr?)|P$3{HU&c5Tj3X44vN{?lK3c(hnZM3j&E~%NAK#*-i0T52-AM;s=y_)m-qyX551ESMiMpR5wiVq&SS9HxQ?1i;|QOuL8EFR?U zxAnt#?UDN>o#`WvaizQM46Pj<4IknqkZm**XNX(|hH3qKTPIFou+9oALFKEX!LB4) z4n5$fvkR!8hWXJ-*7abW{f4LkBKA3{8MG}urk_p>Q2e8tLqL)@tMp~j^5YTjm^!v3 zM@(<(>@=(SP#2sGr zzS!Apz zF>kgGOQr=g_C6TE{Y!I|In|_nnACh;&lSuD-k7~(d(Uwl7N8dv{T~oXm#jX>C0wR= z1Wi88RoS@HqGH}+ua+$o$`IzE)wyn8U)yzP=k7-(mDEA13Fb&fK389Vn&M!5mLq&N zXE^!Q8aH)+m8G{DwJIchB2-0Z&2pZvPpx3m@M;p&-v9x&7Mpy1WPO-4{+JxVdJC~4 zbnY{da14|wcQ{57@@H+ZxIa?jSP*^pqeek#IFIDg%N{%i^ zQ(wGT{tUgPQ@K$tiRIkT-&_rRTCeZR*6y?Pxiy!Pni?_vP$y-uvpqO1IHSF@0C%MQ z^Tn31>bjhZv5ILQpNp+r!C@WRncUXETX)q*)6!QPXZ}Y|BY#HC>d8&NZ)R*-m$uKy zM#{i~%E9LTUNQ?yXI%X~_o$G=&yw!o#H*`DaOJ6kxVw@UIP3}=aRy4~tj-iH&R)(m zsErkiZ|l`01I15L&)=9PTBM4jIyY8oDE_W_C3B8jX(OhnuG9PN4YX?lB_Iq}R6o7L ztks1hx+!{<^l~umk7CyeFb6>FlLnN=Y>cEnx!G97gIgGJzj{sGU}LLGo^~I1!9Dr2 zZ)WQlg}_!m(C$+}j z%=BZ^K97>&sbkZrW7DZ))2U5k^;a;Xp4sH=9{bGPRvv)6&o z>>WP|p0;}(mvGL9ZCATpDT}IokFN3@mKb$`R5hDzA5T4cqfmR~h}?|pnL)z$Lf@20 z-;jHLZSI=nhN_k~O-mKC<`JV3S|yeeW5`wh=-!;p`WVl^PQqX>8f|z%y)nmWe>H}c zQ&3vRM@Izf99GDxYMPU<^ZW@LE(8W)!}u7M+(`6&6&n@M<2l$7)RWG1YUl)gd>fhAq8q9< zY^2FFhlx#^IGsMerEJ1J;hw7W+niz*_BmyAnWlsiVPj~2M}7%SCh2L$&>ZbuG$k0D z>M-4Tp>9f-NnhtDF|kf=_ylxVJxyrHTH~$nuAN%blja8sq>DAY-IZ=nHps)TZS0IZ zY7jyYzs12qfKK=j>FU1$)bD&?A6>lbK>f@C^q~d-vt~WGa)l<|3DDqFFr?{Y0kH9m z#C`i{;t7I=Otc2w#tPBU=8EtubRB}m&tals>1?MuUApT@28R_ju3SLiNFYV&S!(Ll z*BoY)p(_fQ0l(H5uhuTVw^3)->J#)(VnH`3davS7iin8B=v6##4l>d1H^9RQ!TBqv zSz4eaQVdqdp48!&C39%p0J#MY3wPQdfM z-Vppqx19-)TD?2nqIR;;&{Jpk1vCNd7DWG7Fe*#2d*HcVYg-3j5QGb&-bihbR6(Jl zUUNiI`;rxKPYxdlfxG-s67^EvLp2Ifeqmu@F?ziIgLx>+R`sG^@J-t0$+ZE~hE2 zX<_t#1>-%UR4d?DtJj%;sm5~LsKsB?6sgyXF$pnxg~mjAwGNgM+zH}0W@rz5+G9d} zcSY5N8fZn{9b$#^Mu!lRx(|g|Sys-b`xeUcRlkY$N?61RW9~|2C@w0s`Li8Wy}}(6 z5*0~sH|XQ_3uAwCLx>p_ZJ~C|mC@D#F zB@t1nHifL~AAiy*rTux6kb4zrQ-~Ejkhq4#N1*Hsf!BCY?`8I4dTt+xA;oj!FDiE~+y`me@axmTuNx4st%5571nG%V~Q*cPOsa$`HE$9q#xPcN6nIh3E( zBT+{1Ye;J3v+k*~$6nj11@xpGX%FbJ8p;&8LC(1-A46_CIG|1X@S(DZ^s1&t0keOp zXB36c*6LIN&G*O+d#=FKHJ^+mYQtu}FXg9YG?UOVa)cGF;yxe64{6ia4Qa4$=(x+# z8;ih-QsvW2UpZO8%E^>0OK%(ijehp4Mzl?a7^ecnS2%ket+9hg0eYZb?L}LM3w3mu z?0h=(>5Uzrk;c?Wj~(nFT(G$6(PPI)&}ik;h@!3PYJ$d)ShVH^TI1DgtCPAWL3#S%5?DpFZ!mY=f^{_%YK2Y2)tC9H2G zAq0_+~L20v7XjBM^e6&@a%xuG${#fa;%BB zP5no(Zd6ItyLVCt6{4yz!0U=gJUl!m-p(No75fxRK2uSb4$HgF;Ew7voUgN9+A>^hS~2fT{lRfq4vhhsQLS z-97T9I&`g>l|C;m!MyC~*g)U>uK-i=zk$K7OAYk6YJt(xKKGiV(|fQK$q8bDsWxhv zdfGiwCRCTG5sMJi(Vo2_QPl&VH#LW zbYbc+yL5>NJ*3P4d&2;8RaIInD`&3mo&`(bEpl_(R8;?!_j+i<6du zga^bVtg#LgCsP*PE^B~Yh#%k46YoDj+QBOP6PRG*46K`)&~IwHu}$2HiivAUHCntk+u4HsAd2w!RBSU!!CfX>twua=cN7AeseyjkKFeCm7 zILFFlg(xbi47j)}6{UR{?X8_QxQOo2)G#w|g1uB(V82MjH` z%)_J-k8q`3UGCPRsSH=t`!7;;gw87IoI)Y+l1Mfv$JKbYHM2?DI8~mw<0uFrmoQ^u1_nneTZ_o{q z;(hK%S~aZQ=d6(tv`c#>N-O=SR;AT3YzeNPtY_+z3$ppmRgqNV4Ke_e{7&zeO^!U^t_{ZPeVP@OKZ~*9B`EwvVfJ#oLm8Ru$MhX4HZdT(`Y1p zH62f3so`xVJs`+S?ZlibAb^BFb_k6hVUO;Nf(DVL1-lc>k2H%E17sTM5Ww=4j$y8# z?XZu53DS4CU5Pf2&?3grFqP{N2AM}qx4@n{?^z0MBK2A7Fg1w?ZU$tV*K^Q3`~JFYW9>!a<=K z5F$Rp-H9eRl1#Mrr)VLr)3*f(-r7(Zfvon&KoZnPU@$@)Q!OL5-=tspjL1TdeJ&WT8{=ycv zZ!bNbf<|04O&fv=;B;8nBK$mkih+a0o5yJi)QOG;@$``WT6#Q<1M!qQ_a`vXi6@-2 zIAj%8n=Qqs?56TA@hm}@zw3hvVQ@%;=~Ft|bDGqKYV<&&E(BiX%7t~;%3*Qdar<^<7ZuqYFN(7k&0uD`yLVK~sxQsF1@rau z=_Gp}r5V~7>{1ny)MV*)1IOn2Z1r?QuL9Gf`u!RDmUR=@vd##hZ&}&Ej5=Q`rP||FYpHv%n$#hbWeH}vs|nm`&<2yK zgE(BXt^kUBsJOS3AEzi`ZFL#ezYHI|V6|h%dZMpe>&G>u!Sq3p3oP<781j+bmF||> zhr6E6WJl?C{?DI)tjFagVM}j$)XlCj_6KK*xW-7&8)Sz>5H-~uwIu3G8hD5t4O z)eA_ztKvYZ55_f-yK&Tcxj3R_;|&li`U$&g>zK0ZEGLi$~zLfad}AH+gg@&UXOqmfjseY8lGDH(hYH$#v5L(Be9KE=>89l(|vjy@mA;S zN}nX2AjQz01uqX2ID3Mm;62>etbkHgoeqL_Q6oVen*ZNjyf%njEz8CzbdgZx{u>xg z*P_!r%p3v_Q>qgKVQ0sV@IV2}bK7uKbrJHBZWNW=DiZZV<#BTI;hK06N^dJhEw$<0 zNvtnQ<4{ffY;Wo&|973Tjrb@WaS-P=-2BjR{`I^y)poUk66*@0u3TA1#N}6A(3Z{_ zVgJ>ScYk=O@V`H(#>U-n5%)aI+{{ytTKvL9D=s?2vgRF%x3`(F>j6PeYNwT!@X$T5 z2c+sO`L9o!TVT?>0a3*<{lvb-xiBt6Lu<(~sbe0`HL&lQ)0q^~v|rITD2`yms;)kt zzI6f56aFh0n8kZ#n|nWZbOw0caLikYi&Y@VPW#)p5?KKiEB&oR%xp#9skaiR-b$Q$ zD{<wcvBQOPcsa8~`~(960bK6@0OE|8S_)cy3i%m$C$LRs(h zPk$7+DOdD(o~GP;{T*=;Vh00S6z&)=Qo9)XIyy^j7uOE^19xo#uw-vaLQF8Zt$f|uQ)TY>3FfRPk{C_bNd|I!}WDc2wQ2T zXy{aY1~eWTy;FzD*l8hlJh#_ChVB`nC7w>pvS<# z(jK$YmN|xC(t<#S*Jjqxc&M>*G;~Kj^a~ZeLIg4laq~`qPAL~C1p5Q!ZaZT%LAOnU z+nPDIE7qQr*G~BOAheakh`i3AV26x4!K-&i;^&7W>^kDlq{o}%+;n58u5B)DxAN7> z%YZ$nNT)RL%QT>&F0zPz#49MexjMY-g%np~p!_-Eq-C?x!zn2>=~?~))V56F*pIgGjo9cM$easqQb<)Hbu;c@l)CuyEgv|+BoFs z=0kt8jEPx!T2jLrvt!Cy@5Kjw?ep^TP#)JwM)Blf_3-H!m5%aqCHN%|wPeAe8dIah z2FjsNzOm_~S7AHg)Td8{DI0hhXa<$yLxY- zcd1^Wb}Ls6zdn<9EsT29_S5}^1nBZDqS%*!PpfRR1&grTbK|!%UnUK$lE5kqC2Y2k z9S?2Ypu_a2U}lTP_#K9Is1LJsXuyF9&}-m%_s6n7X8VuddAtMvnc>|g=b-V>`>J57 zt}wq-J7Jfx9gJ`Lf`>xm_CHuR@WgzZEsvYT_=QcyK!-`iAZzJ(=%WH4OzXkxXIC?3 z0$r+oV0`=HlGcugegx0lt*k14R7=)u`+7F zby=Yp-$BwGOnX!>)8!(>c17z{Dw)m(jxTz84HFT(tLP+y; zSHm#Zz>BqB;kX+Gq&mf+S2*xrFUNYNH7jrhPV*yc$GMp(*k-Gc6`}Fov=%&NIP=KH zmi{LH=mf#mfX(;RZKsp~{S%(BjaRBCriN_A*%(_JzfnN203&w=2VUshOU{f>8zkFN zdlEWNHFTCG$cMv2wZVG5#Wi5LDH2jD8?sh|%Zf|&deu+jF%4~1O(b;*%!+WhF+OEs zI2@piULKA)(pq0c?xVsjxlyMh;agTiF?Q6ZMqKATtJA}T!+DE}$RE1;I-{C<-}a(e zrn1DT6dVbPzw!CT!iQ@uOr;X`Wy&6?vQO%M9E`p%W7B>LyeH}19>M1x8X79L>9+Xe z)KrPtj>T^{Vn})TblGqm=|b>Y@Gfe)b~soq^dvoO`p8Dwq`hh|_$>=XWC6_3t0FRw zQj&ByrpV8?h^%TmxVD!znMNlN2{)L4n!OUvqjm)rk&Ezfn^F3L7C4uXOC4!Ur6gL3 zux;Dsp>Y-E1>Q^Lg}I^e`yC;$gONR0HjDPw17lsa_5kZpS3LOD0An{^qN~6LOQyLoaPDq z-;6-9qay$5hZLbivQxu!UoDRzDJtvMio9>cM|$t7DZIYANa#HVeviW37`j)ZUgfdJ z^#lt?WMG5Up?bV-uew)F@C_1Sq%7)e15VA0T8!$ySk&u8exT?m5WngO3DD4sN~|)zmi%&Ow0*0-L2#_0?d#f}Cz=Tsvn>D4U&O@K@r)r;|1976{Ok5keZ`lakx*ss8@>6)niBfn1B(=4~~M1 z-act0JW~zF933Jzw&N&h6Q7eOr`M2!PxRJyr%yf0n0l5$+d=%s4~hyN1aH&ab@V9d z*#UyXi-h+Vo~+FV>rH7=vCC1gck?{{QGdDH@bJ=(K8y6dUA?h`FiE+sX?vg8d?yde zc?4Vq-@^~GZd9wkd+%X@;d5}bmQP5qHBy6DOAQ;V!A(UmMPvtaslbM)&WN$wvNo82l#LcsZ;8*WR^;HF0h25bi|` z78R=8thL&z4b>LBL9nJV&dbRw#lb zf`}DEM5}hIqyW*1 zZVmOVb`h7x57w&w`C40k92t;s7zWj|?vcMATuAO8NqhR|Q-h>nq80_%0kcyEoi~4h|-wlEF9A-Gv&y@eTc=pgA!Od!k8|I?7}^fjV$ExL;Y!8U3G_Wbyt)ORc6RJ z7`NXbjH~TB-GMyr?`bq_*J^64J)}pIakqYH%A`fALsX1rQZFh-8~QO?>zZa4`n#+Vd$O35hoJMv~t)~f4{4ojkR4X&cOxGDvH85gGQ4(bB;f5 zT^pyVLQfDz6RyOAl*uU=zc!BH;lG5iD_9|hI1+%b+gtb(}bVUtX;~(lg z!lE?$Rk}>)6fBgjyZX#of*3B8rL4#7_bbn6gs%gajV3J3TVJ0k!GqOL3IY=BmQ3w7 zZ3|+Kwj${e(m77K?m!OdP61Jvy7>)eNlD}FgyVlf8tJkRzCH|KUF(Sqjy9S%zy#2` zhK=5kgg9ZIvq%;Si)iV+h&JRulmgT%};FyNDjmiPYjMYvqrpi(C zx@s0c>7KWzncIUG!4W{-T*;3oJ@0dO+$q}2CCBEPZFlgZ8thj^zhS|i8xHKbv`fRt zFK~g4f%drhm?{s=zvy;Ys?9pG*4!Sv5R?GPvXZ8L`vah&d0w#9-JhoHeq$G=k?euY zsmykt1ufMR#x;EH2jmy{K!LdfGuTv6YF;wFgsk-TN%iKo>0%XpLOdnfe^s;*-3}*W zZ+^M8RG1=bfF;-EqT)_sa@(Iuzg9XV7>V4sfwRrXC)+#=+tm4XA|8&MClf2~3)&J8*_@+sqt% zV_D_LIY^sGz{NC7OvlCU3vmS(>+b>B{hW*!&d6%eIP?4Lo?ED{9sKUrmmJ8dn+2-- zv!9P?w=1)%vOsmmWQCa9Ce{5FRQH;d#XNTk@=$mAQ+AP6_h(SuPG?I-wKJ%$-5OJs zrrFqhfYP^+7i_9{HLEHYRF~zGZf=_{*25Y><(Hq@e!WuL z_;N&e9`+*_lZ$f;b?foz(cuduh`QD-6cxTc&kI4Bk5p&5Sdhk;0Q}HgEQZBS#)wR8 z0!A2El`7S#22QZ+2yMrkLhxxh_~Gf^nQ|x2Z!q?bMPElw2xx)51E-~|y6;yuA9a&zlUR6p2azyUT|(T&oY@l-v7>G&tOP8oj_oFf zTx=qX6ThOZT4mFT;2}6(v4K6HlfIvVdkqJ=5YLIBik2Drq(YS%g`7{8RN!dg0?WaN zo{S(nahF@*Lwf^(K}(u5CP8}rh^v!@Yu*X2ImP~Ci{2ODF1N0>vIth7OyrhQWJB&f z1%)+B!lsz#1=GcIm`HS<$1Qq~z`$<*U~4fyRl@uvw05=V-3kK>xJV{X_+-I1JdcAl z8fgqmps;4r#L*-?m~PVx-(VQN$fEZ)4D7`Xx`h~l97qZG-yz(Fso^fb#$6;>ENz{J zCN$M9&CY+h|J(7==$NL&&p4_&H;v8tLtDG+<_K@*U8sLtv1^^&BM>V;(Nyu-W@E$H ztEbQ8Y+DsyQX7lCRP!9If7yf9M%zBkKag2egkXO|+npR3s#t#nHY}u~1S$X%4B6OL zRPOu%#H+{0#lE`dO3?lvY45OKIps#)L-FT}wx6AhJq{uAE~Aj0f8D+(icKsCs;m2B zvFg?Fe5kBxh=t{dtepX9l|FlA@PN_#2`=k%@?lSggylC#C&>W@p9+C!zIw_Y@wTwC4v8#1ln4UjT~p=P`R+}hl%;|jaM3+cnSBH1-7qS6O+H?yz<^x!ry*kZd!2f zqBmZhaV{^rG;Z&;NnOpE$yi9!EaoO-!_mAgOYeN^$asB>Q2%rpn(0;0kHq)c`m?R* z0ajAlt(LD$TZNhRKL)1xnH%Ps+k+QA6CqTgZlxsfACo{w=>*3QeS-uWe;hw`>eQga zcf5o2f@nqh`>m?8lM8i)Y4}4wg|ln-@D678BB%o3ICf-u3El1DxhjK7-L5W6ov0PZ zR%x%>CRs;SQ0r5xWw*>JH8|ZzU~lu`)Zxqv?S&C-3#oMjG({?r0{Owv2eBQ=w2D3&ZTxj&FMu~UIAj3y>K-KtGws*@ zCYat0;k_MVJ;q(6PBV<8A;rx&i^*b!y^eB(}@Jm3rBhJ{E zm+jR#Ece@oKg~-!O;|$+subcF7gIc`AfV2sz4r0n_#=JVqrRdVnPI!(agFtSV_bLh zh#(9z>I-%D!#(!Ny#uy>lp`FY&;Ob?S%r+gRBPdltD82F>;u-YkiX3Ty$(zB71E*JL1 z@Y3bQd-cZYl@RSvsUa%sW;1jXn(3b7Oo>_%!?9I24^d$4#oO(}rYMtTJ2x|k_~x*U zKNRjxOOahJFm7Vu*52A+7Ba(dRYhY=fKyfc4?+5Rph@T@CQiSAzqBd~WX@VUD$fbg z5tTw7s@Zu+As>SLqQLRJ){*(0Pl;_%cqwRZ+8n$+lRc+Tw~T>T`HFgEhPYG|nSKJ% zs$`I8hQl7b#lnGC=LTb-RQvczC)o*=Qg#gwwqB%Y2o%GEK4cjlg4%;Fz+AaA^0)Q! z2UY2s{*cAY&I=Wa{lmYnarT=JN#0oB9OOFN-$jfo@K$dz-u9#;6y+s0RdF#6qCi4X zNsD?JQH%4>0`ck-`9JFe%^3{6UnSSvxKG;T9RE~3aqLzcJI zamF6lV4~yn=my0BFT?5LO|V#2WkMB`w14kcg}Ug5{0uoy+k2CXwbX~fq+=|C!rV?H zbIJ;jAbf)sz@^z94dHdnz4i;0>?Fe`!=dq^USEcltgSx=QJJhJtx!jtf+;WX-|}IO z@G5@vCGDIH$QJJ^v&>MiqbH*7_NV*lB|k>+FaFQB884DQlG*+`Z#gHDoBCeNRCllI zX(c6}pLjIp%=oeq6GpQ%MXeiqZWQO9{7b_u^!x{3eEpdTI(BjKrP=&HI$eLfU z)*W^0yCs3&-dnTJC%7%5t)jiXxidZD-rTzt!eU0)wosm;N}THXQL?U}PcuM)3GV@S$NnLjpkpx5f}zx=(O`)F;m_{AYtIzCnq z`l6t3ZGdnLl9;$$%+3pYV9>~V5S*=cgyuEl)a>t%^bIJA3)`DpcC&^1*LvC-`}D6Hx2U?C zA|I~(Lzh$)w{uL;&M}K!7w|;Bd{aA^y;8-B@ H=|TShe3i*U literal 59840 zcmeHw4SZ9_mG1~J*nmR}*w`3baVQ~9La0MY+X=1Y786q_#*49Eh1kO02#oI7`< zE9pv>KZx5`Y|y=T?#!H-bIzPIXXdZ*jDr8GA>`}rGYT~02_a9DfeN1Q6o2_SypmVm zQr;TUsq9pKrQAK@^RC{{&`f!ZkOBX_kSMfjJsIdVYqgv@!Dw*lU3nU{$aUQx|wTIB$-XXg%%@cb?ns^?E!Sjh5(bX1mJc^|;+0 zlR=|#60KHK&|!7CO!+F)bd{MS!?jwkMys{EoLa5f&XJ)7+76AzZ8by6Tr$*}Z7fh( z&G|Wb8a+ucsnl*VJx}G-7Ls8eyEYbdZPIRfoOYW* z+D)rUl_%+@Q>&UjJG;L1WO`Fwj&a<2Bb{ljvpXjv)gUV{NS@mjdL4LlI6cpqZ zn2g$d75t_O-OSC^V?y#{akA{?;_{iudAw9@2Ov{2xgFcfz%0Am2&g z+6XOZA^$Mq1{qRvgG}?@Q1G5x3jS=Tg7@(XzGWKWTa@ts9x|;F8`H1!XUs%f7Qe~_ zTv`PTFqaTw)4_ij`!;?N8E7LOp7X}@HbShtji0WEcN`h1BE&#=5ATKF4&DoI3ku0t zNVQpsf%oJSDCWU8!ut;1Tu8>*h}}xlJ-kf|mQHxz0iPb;%8^l7P}b;$f&}Dgg}T&W zDEYx2-p#u-9*&I5W~E&`(VEOwXpx6^!LOUwn&*44mjIV|Gcun?J8Xs* zL%cks0+D%Sh?x+h)oivxDrR>H4I|dM=0TWhF7jt~bA&SwwwkS&KA()RiMfHNkZ3j= z1PR93pm|ovIRKKt;u{x`ktk#MwLvZrl$GQ=@*uO3g917-I3H3R9{XZ45WK0TkPLR{ ziJ7?V3kflCWLQ23ObZ;bJBfJ#843zz^78S}CBBfvje5q?b(wc7~VZHlDbMmw;@l_Rg+ zPKOC(nJcf|4%F^kC@ZhsPSoxk1Idxs?%aTOJLR<7=^;+gZkW&nYd2(e5~qxIJ1{q7 z4$^Mtcck6U5bbt?b~}Q#+X>nY$=%X!P`v)pZj)fUO&(*1oOYW$@J6uRCVU^R-9};r zNl@Dzrrky??J|nC+vEw-Zj;yOF*=Q+?KXN%ZmD)dK`#^)ZMVr~!eJq5ccCc-YKDTs zU~rkd@KVt20@Q7&NeeG+SO#Ah-9*rBHR`qrEVmIXHw+?|$!;M zftuB1278CPtu~MX)a@cN)I$guZb%mlx0LbZCJ34Azbii0T?{vH$YN1Q;06r%3}pWaRhPM#zkUe;-fCfTx8-rSLh;|2gM2RDdy< z@YzY`tby2T4pt<7;w|4Id}2HYQQaKLr&4k+O_$um`VjsoC7&aNdol+vl24!x3EKmo zjSy5q3MZyuvF$_wp<)XJTA#xwQR1h9zX_ky;1i-n{u|-*#+**LhiDT&rwN}5_Bn#T z1pyL%{)70bfHL&wE`KOzWcV}V-!al1^_OZg2x3@0Zy|Adtu|k+ttJEYyfuG0EOtR? zp|HWcU|_zD*BeQi*QGT(As4L9Y1OKHwO$4PjBb-bTS^ka4Qn98^>%n6RD>D+5GzD? zE>OcYjCAsLeo;R?h^THb?kFz{ub`W0IG1%kMt5rFsxmX)VCcsJ($usaB9uAmovF{;!WXp0x? z@8AnN3cUji4w%k7lC8Ew?FPFS8=xgTFf!kk5ADg(VExz(h;$+Fc4@61SV1smbL1X) z0SthDE{N=NwVZjh6+%g;nBoTJL0txjVFo*mBv<40avch92j{uhC^*}ng`ZLyJ3Bm15U$7N$jeu8u6VcI3=6fulR_`&9*iNd z*Q1$>HS;bL4|9BIi^D)vR^ICti9UC$^cid3uM?5W=|zLHG^pEcxSk zP&yz7T}L+9K{iRZG~|F|C|ND%?`D-gL92>x?EP1Ha}mbEy&fH9V8c&HV;C0SWhtq8z#v=!hk7VAuN(WQ*OPl`X?%@$R0xP+l7UptbMLa;e<7VRFxIG7EUKZoQSU8KMPtH5R;3QH9EL$XQs^a8a;UqX^V7O2T8D|}MIXj$?} zzQK{74HOJ{Fs`gFSRBcQL@QL}cG`({2^s1z>$R#}uuyjQTrzyRJ}(cXQs8mf379g4 zT?=MMV}~~dcGSFl;&wW)oWck-a$sSGY3&5w*d0!&7sRJuNbYxo_0xm7(@uvVKns>I z*F-@22D3v`paLsFrt23Fg%g&D;!QBF^zks-IQ||2hCz!>c58^k>0ShSKuk{20)j~~ z;R0SU8IljdRROebK8c65BqxkeCqK6%4n{jL5ZbF(7v>Mh&eL!O12h_aF&U*LW``GO z;20PF5fy0KAQuXVBZKTJ;?~S3qnxlXgw#Zu+IW(0o=4(Qr8I6R0yTM@MD6Ub>s`1J z;&c|o=c+M_%a~7c)%jXjG`ct6gdKwBy3D3LqBVdTDxiD9>eAb=_mexH44SS5A-xSt zP;hZAAaQmRXryXx{$N$U#%Ol9-X?`E;#~ye4cDX!%>zLjoJ)w*326$b6H+_FoRFh{ zIiUg#Iw9aWIw6%>Ww3)Vm=kii(Fr;2Fi3}39Zsv=8RmovoF13c>!$x8a)+!kPH3p; zgsg6_SLY_Kx$Za@(CoqqIo)1p0SFB?m7KONosiq%b;Gudqr(HMi6(SHc7w4?9|Vms+1w^O ztkA{egX~81L3yUGeGum*cFsB&a;xn6=`naAqtyXA45KPHwM#GLbU3U=^g^jQU3wv> z(_uqPQvjAgKfOyY<0b|d&3F&J_f!3jn2LnenqpKsUai@}gq?~U$Wde&V216#B-QfszL%<88!(*~JO~ybd zWOR5L$0aEALJ7BX9bIv_2qHmgacH>m-J0dA;3OY(58MuQ=f z27)1z0fQl=4Q|+KH^R=Q$_$fEbVFJ-yi(^-HUSkAmscHCDTF4$Ob_` z1Hdj2kE?TK+|N)U2%;1UNrFra1cM=}_fe_-M!ZiVi-Gd8<01BiI5?vB!5GMt7cb2A z5<^2EVQ?fu>@XwkY`CtXu**8lG;Nm79T_MhdqXt3d<0h z5LzItgCPaN^Fs>DBfeyh^eR(Ak^$dJ9^qCdza*37RxBoyKcvEt$Djhi?}Vq2_5?Rb zE`LaYF6)O3!PQ7g1izq9VfiIZijY4dfk^pexXU$!LPI@{Q|`w68o zGbK5BvV&`cq_aO(DxcWh*yt)NE!98DDIuv*30usKJl|GZU0s^Y5t*dzmblK2_V(5@ zrHu(^THD(@IxUu4XLXHc_RUrWB4q#*Q6zb>=Ch%7iKAy1E@57R%Wm z>y(M(1`;x+qONZH)wZ@{nL@_)x{VuGrIeC{lvNuy*0ozKjml#70QhKSjG4At5^38S z8&BG|Yv_@TOc=$DaZQ(+o3Gr~ zS<*VM`F!3pjg4P^0^HBZ$oOHyrAwD@b#~sq#`y|cINyY8w>vxAQ8bTbW@boObNqv< zs!gpte`)5k&(6FAbyJ2EE90_XnmKd!6`f_mwaR77iXT-ffAnR0yRV_X{$R)L+qZxo zR(adk(&ED_(BaxMuDK2!s$U!6T=omEyz=H1p1*ww*#osxwiJ`NVZV6pxtYy6%T(X8 z`SV{-qAEzUAs3-mV4~dh;#O1}0G$>Q^%^0jVpqXU=>nTc=b^G3)A*-+MSEW&CTiXD>Y5*m&AmUvGc;x#ymls8de( z;m%X1PJh+d*z`5fxhau=l+JCgv+xGjnRLtN^2e(x zO~&%K=grgoVdl&?k6*m_b&CukK|+*qiMK&znp@l2zFt#WT7C_PZA?U|j9I&N>y}Ma z%YPCo4JH*FNHufbc;k=%`rLD`xPX{fZpiq1#V4|YD6QJI@0!?}Cl^0BX3WEtTef^y zCXS_X85vV-)SBSf`5M#}bsMi}XqV~c%+W&UUbffQ?>l(t(9ve@D(6k`p^+7al+d@^ zpn*3NzrnHh&CQ!F)`|-2HSTtih0D!-%D8rI<%Uh0${wO4YW|M;dfODyG{OLC0#}Fw z7q93TvX|A=ta%AW+XOCy%S?FqkA;PcPksG$b31pV5JwfCf%3Wx^lvtvI@S2i?c3kL zwPC^R*@jb?uD5UxX8)*)$&QY$)u%6Btj`Ge2j*KhT?=`;V)ts?0DDibnxTYX0ig=Eh5x8h#kU zRQI>vx`C;-WiZ)wAX7VT-o$GI zbW(r#tFO-9gifBH)$mV0`q9+%l$6l}2uc6!^ywzxeaFFI)o~v?dh{3!LY$F|cy-R4 zxyI$omn||F7Oz;fYW{uq+%tYPPBOsM$;gnA#cT8YH{O_CSyQvQt=JNGe)@wCj*ruk z>`0^V+oKH)N593{3Q(Q##v5;~)|Ka0e1KyY`d*47jX6ImJ|;%#)e9uwT3ueguC-rC z=3ab$`t%>c`r5#;0XYiZ3M?AFEe=l6oR(rN>uM9;=(-vF8?+rItwYE4<$ z0?;?qrDYRGkIs7at+!qs4>P%HyM5MB&bW@BgLS=}=@d6Y0>D%9N$IuIo3V#goXrnPoDyF4rJ-KXmG!!W7E&#)*ClkcG>Npec9Of)oGgV$|{3l zm9NrGI+uwLgDox9_?x68pBZ^IM5wK;o^= z-MeeQ&!uz9#2VB9(TyJf?4pR|!MPB33!QsjTi$Rb5$noPx>~(dUir#wb?S_D{ zZ4Bix2-XKY-XQe#6y@*^XndK#^_^aCkGITDeQlH~WG`x`Pc9(Qit}W`}gliXyE)1+nlWBS+qg zjx>bFvyg7m>+|O?^#t_EvvmIaW!~GjeW6nQN}@j!;(`=A0%Mj*^%U5HhyQc->_31B zRfedPKp5@oe1Ir3fuc{u=U4^H1jz)>p0QIH<)AGO9k=~U7+Gy}U%KQue)Q;Z&!tOl zBe4E#OG^{j;{TkOo<13uPeSDja%=^2_|>(xHt+u3yZ3wB+ODA}B(@mkJKjJ&rj*s0 z$MkKSC4p&|`%m2O3JbX3z4#|U@ts{=Qo?18961p^suu=rhGti*g|EK)Z}-y~i{G`0 z!$vC0E3l0A@s+kVcD=gmlTYeal$OrDZ^VeKg=J;co^bxsz9zA?zFb)Np(>@jH1)v4 z_uiWY?iHtK%$KuikyMsanpZy7)n;M%d*5$n%=mNDwQHX0aAiWGdODLrp|VknSB!Sp ztcl5l$uv}!(&w5Dfti+cUOjQ-$O%i4 z$#GP&oU$;Z5Eh>lkMHIhxu&FDFmcA=jegYiczXKdE?9tTOJn%q8W0u`>C`rz{rqOmuym#*PE-vXHd(t7&Di3Srcx6_b##2;qQE?iPt zy0p@4uCnN>jg}`&Z_1_}J6oh#lpL5=-1wVVxfMOxbJby9z@4cQZ+t zfJyxIz;UoJjBIOfS$H+>!p7?Ar4Q;Dw~DJ3HJi9vqa|DDLx@Ch(FA9aQs0pNN%4s| z1q|5YM}h4%f)Sq_D)tlOdA9x z!J)-^E|kAoTZz4`jHE-clp43Isp;Ie61~2e7Akif+wCn^uU^<#f;}z4o>p3NP|hi9 zw`}?3Y+&Tc$r+2|oMBT96yJ2Y1Up)3nIsg40DDUlbsN&&G1ozdgT->SwiG+MrKhFN zOrhIB<-6+ZYt!hi6;5*mm4u)kW0d1yFftC(UdEZ1p~ZkbmNPBau3d)>uSwUd#ElJD zxg0C*XW=+NO~ z($XgWdH(#;qp(tUtJ0FqHrQ}o7FYfTjHdf<}g5H3QshGgU!#Xc5xTeip)b+ z{*Bxo&YAGV`s(Us;H-aqc7r93Mm^v`shX5nCZL`mAF%(7FKHY0?5T%&$f=#UFoAsO zUD4|hh=0=7tM=3mApC1pX|krxk|Hf;C^W;8)9 z=)8XITFV(-W75GlX3Y3a7TrRf1nRU5R)&O*-~f4l&g-wMvnU(%52mF(25byev&|BR z5#Wpw;O1y(C>Bkv-oCxAgzgwJKH!|GPl^KjI$N(__d(<1u<^ehqZ>AL%&+MTjWWVw zIWrk&X4Td2m6ntgPE1RCP)~XB@CQ40?hxY=K@zPS-g~d~`#NPDvUAMObic^{*%&(e zqRar3xEMmc@1>?b0-@fPO&d0tz+RwQ=pW|Baj9|1IIlsOUVm@JilR~Qy|Q7y&^@QX zExats6pMw$$HX%-8 z@wo?e$}F72YOh!VU0H#b%+U%u9*Ys}g8(1;O}nk*JnDO`C*{hRsmo;|yF?cDjn z!=Qg4hjlx4?pzPrKX4ol9;ljf3+%^eLwWi87wC+&>4Et82b$Qzk&cfO{7R$FlEFq6 zS{NKnIMYLJ?u50Ho#OIqF=xg5?{B_HHw@1{`M?8Dp6%>x zg*CPhn_FAkVEdT0Hyfjn?>$MaYOUCJxF=!HL>|aSY?8+n$@3x;l{2B=mfYlZd@8l4cY#O1GIWnE^4P% zQ~!@#UIzdIwzL*{WlMIHKrxLllF^pEaT6vw~6bf58Uxol)z$G#O zFCd?7t(~1Xo6kJf*4Eysv&12vGgFGG!T&!W?%cUyQflf$%b@pg0K~qEbNn@ zWuD-QkjIn&pf7-00)`?eq;2g`GjiBfR$Q8l=70FuapNAvS|3VHowNa{{D4!guuS#W zEb1@gVkmc6WQJm?g)J*ZTP@6+(S0VO5+hr2%&CKeF=%T0w&L1kTxr00hoD!$*&N`(2M=?}D=dj@c;qxuxpA#og0_OB0u1)~ zj!l~|A#0GN-p=;owq)E>#|a1y2Z66SXpFd0-~u%eXj=nXE63l%6XN5CC|Jd%mN*Q1 zk+lhwrTB)cz5^8|pmkg_8kEt6Tuj8_da{=4=xqerv?g7sB?QC7AD^D~)2hdH;uE5Fw`@`6$z-631siA4oh!M&+ z(Y%3*12@Kls=JR+XL5A8&XD+~a>R&?S8;JeYy)KxgskW~Fj_TPlCEfBo}#2?7@gZ7 zSQIG)Pp8OC){Rb7!ZO&at1BuhEn*dvClIDCGgnt*glb}wmDO~zGP^>Dp~`A;FxIw# z|Ddy($Qcq42KDDjXmXY(C*BVLAZ&8YCNvpP5e^jyxz<<`Zu^lv%S#iNmeY1^x{O8( z@}cTOY-K^xYp@Z=WbQUvT6_}xV1)b2K8hcFEG;dS;Rk&Je(*8a?EPT5h#&L`<`uVa zcf$-;zz>EeZTE%Z2Yo(2eh{azJ2$RhzZ|fKkdaQx{rEwj&yOEWDcii+whK3=gp3qQ z=Eo2Ee181k<~T-0_wmP7Qvg5c zOJXs^6MLGPzT8?{`;ij>gwBs@Yd0Xy1p*1g9U_3RYy(Xz{|q9T7k>H60t68Hf&hf) z4gj#I832UMfU?`O86!e5NWvar0$xA867(!nH z!w^ob<@OZTa|fm#_R#u{TyAN(e1y{R?AxcVUIMLL?|iPNau)51%=A?n_v(S!oo|g+3W{ z;jcp_#Wr%Hp$nywWRhc79DnYL6)RR%p|b?eh9es9Jk7qs8fIMMt4^cD?OK z9r}8MI-D9n9R?3YW=QwDjvsF*U$LURAqaZdPegl*Kb#uCA3}GJ2Bg{0bnaYJ!~Xrw z0}TydRF#)kA&+%_5TcJe|I5AvA>Q&ZiDn#aIB=lhsLRzLQbp>k-|}M+eSL^QM8}Bo zbnT~CCRe-~-}GY;`-5a(V-PPK1X%)Ck2-^8DsZ>(%{L1v+|t+A7(|4E3p7I{iu$w% z&Rkgbt^f!0y@v69B;(6KrEG1Ft&U?b6$yhVCsQ1=DBG25`i*F@?~lUvbsu98PadFR z-TPiy+1fh0{UbwBQHg^N-LewEAkO#A!u6ZJh9I_scyXXsZr!%cGC4hc?C4RWCM>4r zV(TLU2GMuNFo-D1vTY&;aa0kt$sz`^U#a#n2C*G5)q-HRY}@wU7+A={RfhLI{rvNF zu$Tq7Jla=fA7c=YTBumJti?rapgQ)WhK5g{fBNZZ2~w)CWW<(=*ppuVd!)F6L77%%T zi9tj|QE%V24W(-M-l$Rc!NLk+5EG_7{q(aR22`rgp@3+Qzu2*TI~8mIgE)B7lqpYt z?#B-M`j>EDVGw;M!R^(5@x`7`sVzqN-uEZH{*Qp~ld@XCAo}_agJ}C=|NecS?bz`N zU=UY4K*jr~|21ve6GLDRN1|H-29eUmMc-aw5ZCXfl9gf*_0#Bx#hrXMdIelw|IlPW zwO(NmFWc6y->`G{ZpWtq3}WUiyLzV2Hk6!Vn+EMJt3MCNUV|JwpZ$PJ9A&3H}n%;Dm(K z^mIQA5tpQU4ny?$1Q;SpY|>yU4DpUt8w5lA7J|Dyh|a|ArPyGIJ|BZ2ram-j(t~jT z90`FT`V>Jh#0!TH9QX*f`eTD3CZ2Bf`4|kbFqIq3k;E_*qECQ|VN8N?B0{91pb&jB zD8$}ZAm9ea?SWAI5ba*(5rAI7_l_7G4d)U64O@sJ4AJL{21E1-)unxO;J_h>?olFR zw;Vip=*s{M5oZSvF(5Y^vR$QDcMk7;=&acO8bz8$5@$AK{yPNRuHTXbcqPNDDApX z0mC8ov{(+#I1z~GmWW=yxhVAzBqCKkL?YVVOw`D&v~X^rkVAlozAzx7w0psl_4ybO zv8Sa%frz;MwHKBPu&DyAFDQy9A`sCR21LY-v5#OXBO5Fw``ecEKxFIL>w!1(?)}!745&NW$J_REB`VNQ) z*Z|>cumK>VFIFI8uZl(kBGMMb07QgMP7#QBZx|49KCK1EM;ACmUlSw|T$$<|NDskU%#ui9TT>!Ei~^jc0bA5N=;O%oMYTlMY-_6vB;2n8Z6# z zWa0_m~4FHJah=LVb*uTv57E~6yTduY@#n5o0!6-0X8vBkt%~t1V1U@ zHKo`@HVX-X9*W};u!&t|DEGxjfhN+yg3v@?RA?gAeS{_=WeQD{x!dS#;TbgXy3C!I z4+kak;h;qN)k%!v{Gi0}r0sktC=vd0`&sc&!yr&19|}t3d3jJGFQU`@phWsbSmB^2 z8e{<|F_uhQ`Cfn$`Cft&`JRIkdtP)olSTlP$oC~Ek;yOsO62{M5tq zmEn?Pctmy$!6o(&%{4P3oq_1EP-z~9fw1JT+l^Ob@3N3H5WiSmTKeueueUqEM4rpd zj&u~_R0kF5k_mugSyEB4WCChZLhwn58QHJQnx#Ma_1E3QCGuV15>dQGc#0q(SrGaV zbQ)q$af$szG#r;$34eUkF*PGY%Hi)VUbAK~fDn@K>rO%EBKmQOP0g1tUxd9KhBEB} zm&nWD5?wGvEe?orB|5cu``*3V7Z(-Hg8leNha-Ma_1=5yPsNH$-iG5L1Sy=g9pbelWg`Xt9A3C zvJ<5pEiUOWavFYu4}Yp+p6-q7y}!@0yi? zE1NS(hpTmUWD!b-tt>8a@2rAL|2zq{0EEQ7h}(ehxCu3sDA zDB~<%QG``!7h%v=er&hb0X8rcn3%S4@7_gAVb?e*gl`Fq;RApMV>RrHw*E|9TY}5pBiCNkO3;qlK-hhKnC z((KgK?4?yzOCNz&F5{}Xbr}qp_~!qeIrF!PfSr)&mHt?QW2v_ab_GUS`@JqoH%R7%P-GdKxbmo(c8adadLwa#x{%ELPW=79s#GuNDU*l&lS=jS zCJ8u^|2dN`E@O>@FJ<6$ESy||h$1{GaUh@zf3WZT`F%g2*ZRrH$rFtMu`XM`VZ$mQ zJ75%I6yqpHksHAcPfmS-s+3~b@ZtBQNid4II$c8I5Fu5c0Vnd{*@*0nM7Ht8h9;F8 zEDtJA@Vo#{M2V?}OTmeKU!Nb9hzGmlpISgc;4wLmZ##5oE8@tu9y+uQJkdjNNDrRy z5Ma7+I3mw8RAS~YRjPj)7LH2f1ytfBJTeE@Iq|P6AlK7BIdNjgKP>84{a3&UG zhj3;!!ynqy@wB273wb~Iu$#Gsp2yNufc)_?phMc%FintQolrqI=rDrJ5~!?U=81F} z)UbP*{Q$!~5cBz!RJLg-&=7zjFBC^3_OWob1RY0mQp6D+hA^a?Pxw7Pdeou#MIWi) z1k=E}M&a;78W70r{BJo$;3*3u}e;E!_ zxp6FISM$nYZ9DB*bOKl>#yWo zLtJB>H#R^!>YV;C)*`KaS#!Vunp3MnoM{?OB?j0cv#|Ne&khYsz7^|O-nAw$wj zDl5z3o7r!TA3b{H0O3?c9p4?`AfL^SnOisyc8gD5xUm0+nVCO?IsM)Yg(73``SbOU zjvhT8&N|d4iPd)lHYhIL!558j1r1liq*Hk|wMR&iVYEg^2G*2 zNjZJSVS@Yh`+pL2mLcB-VvzSE262UfE#R_+VD^mHkh2W=2#CQuP$4_ZaMV1iKzo+V zn^(Lr&~;=*#p$rq4Ee~ALBK|drx}hipvJ?gv}3c@35P z1E2~8RDtm~#^D1-hM#2!ZZHfl$R-&fctLSE0$#A|3{lTAq+%B|g&w;3Xx>GOx)ceAT z^sJGr2|X*_2c^UY^g&HMtKu$wfdf5bULTZV3fNym;4Xc}fj$ss52|3)>9q$H^s>lb z5B*+tq=&@={qJD~y)1T@KI1?y8QH_)jQU;s+d~HSve;ezGY<5Ukv%NVsQNuErXJLS#Nnq0CHtlbCI5F%zwc!bqfABq-=!ZTzhc(<80(Yp zUwRuenV^i)8t8q{Yq^K;B0`E>)~?gSE9yh72KpSHS3X~8YIwP>QbKD8eh!ol zPLK2y$RF!nq?%}YpqA+Q*xNw-w-Y9ODqbmaTH^ds{|`X<2FXm`>QvE9eYf2=JUW%@2Qn$leTPaj(@ZBgX= zJJbKa9s0H9!_xx3iv2+c)n3Qdjp zEJs*Oi&!S=i@y%~*ovslWG}_O%3WBN?p*^l#Z)ekJ?t)~@?n_*)r7s0O9*5SyOYb_ zby}dBuJb~UK=!b^n97G`3ads)2+PJ2~*>dnkj*72c&U!-2@`>T~{Mg~2W8f_PZ|;L`F>(d!H@6Fo1!4bC6SQ}jB6Ylxor juYo>mVQ{-6J+a(QYT;@L-|Mi0ogb1W!VQT82VqxfJ>O}8hY;R)f;AC&b zpsE22l-u~O>GOL<^8xq)Sn-<%DiGlN3aAwMA83&MZ)yA^WNPd}?_lKdulbK;z&FX> z!-fAKdFAWve88D_va^)ee{mLZmP@%&NP3Rs+sNcoKE6P|Vc7m!zk&g+RcPBnr6i=h z^f>+KF3?E{Vvq<%mY}*_9?`x*kCpK&#<_!a4+KV)WM<9ApY_BD6xK?)!2iVu^rsQ z{hQsN2_K*Mx=*fCo5SmGVi6|WfQvuR+woM^w8bh5#6a#c$7I4@G*8Z_=tbrL$)I6Z zZl1@?woj4=#itVrHSdTFsx2aJfSxO$@*6{72dJu@KEp zMidmhDbI=`proyEq+dhz(SI=eCILsz*U9V4D@?oX{Re~#?qbB2z;5l+!6okV3+Fob9?g)O z);v{j*1VWIs)H&J^+pe%(9cBQ~AJ25e=mJ-{(X2#)4|AdjU#}T!oEH>Jm&}fTzICYm4|ZRTZ`7>%cKF|3#v0@g^ge`6-O=UsD z#&((Z>f%NJP{S*7ZVd?I0aS9^qb)_5;JBGfc0NqpSz|Rr$W3VuFj;Uxu^_V|9($Ro z`}-SHZ!}O5@coH%hbEw>y1aX_Q2X{cCoFKo$WORn?D6RzndEyA<%Ttdja@M_e?~)a zec>ziDh)NJIMzjQFni*T_Q@ard3Qu8(lBU3!kW`wuHvWJ-Zj7V zhA)h0ohh}UgCOjk7%IK{2qV}@VRU)4A&_D3&og|)-rbfXDv~-vup8dTC(R@SToQ-l zgntGC#I$aLH9EwRx`WA&@oGa!WZFn^CQ2}@gAQSe)|*lrp9W&)CcSwe!0uv>rH^C2 zB8G*(nY;5p1@RdK@KgUqi_bUU35%!Q^2D5RFzS|QK$z}EHiwc^XSmG5D)8CHQ&>^k zrz4tIiCYRejJyP5tT=Mw5EOA>9IZ0tH3rO}nj@$r@@2o?sYU~Dc{tiik~r8LwoRnN z0#x3SXVC5L!+X3T!c%VyP|>(1EMx&w^II?@0DLlV04)G`TPj;@JD7lC?$6#1Rv;+* zjLxtL##?=!$HbO#9t(5i2d6RJfg|+IW#AyKD2P$IAf}=;lXeG`R_$dlSoWvsGIB03 zrgb4_CIJv4=7&?KsVFvQgHlaBBr+q$+HEqD3lSLUOZHF{Ur8wwrmxsAb1FZk_f-@E zC*mb1O!QuS$G3fEiD2{ILtAV4dXq&>XpOM~w)e!kI}i{VA$QxxDZ>yWI~Zk`J8T+J z0J}{|4arAwgfDlc9*qm^0tpDi&&kEK1lhhA+grzm<}U{K(wgJ9eJ{&BJDSg6$nwu) ziG7~S`ZMn@PAA5% z=&#v%yn}(w^^%K7eF4*XG6K2Rw0N?%m=c=Yyy}07csj#@F5st=9Csx;;=nu#&A!8k zPtlLl|JKb-0A*8d<6H57MrY<7XUfc7#ltlt-1;=q&-1|SvAP<5ojiR`j>fUj8@ot9 zF8=oUSSB@Kdd>vn?zb3C6x>D-{WXVO)>x|jDcvR(cn6r+1L`86QpZjHo3!mejJ@UA z<}?RDrFVyZPd5Ev>SWPHw0Jt(_UIijkavFLim7n&hmLLQ#?4lNnvbca(LmX=Nh4F| zmT|=hom4Z9DM|q<+|Fq^LIIXy|12SY`Uektpi$s`iTK^PMf1h`GECDzBN$wARotQf zs`ePiUjK)|ABx7*ztMe2GLQaGAqTzML&WA#F~B7U9+egfj3|uJ5z%6_T9DC~F6L$o zj3`|uGo^@dryO%$-3;g+wV@|8B*1)O^h{6SpcHb*)>sIbPy5e~Ih~i7&lI2z0rsBb zfZlWr3MEGUYj|K;VCE8L2*%^RsqK&7CP4H=VBO5f4p<^V58WEQjwFt$vlhGkM!`N- zVKzS-r+tM2K>_H5#-JpVcic{C-a*(w)8BpO0+7PgO%Qkuh%*l8NI*#7)>Jn@p-*SA zRG>rJIaN@~N6gXpEDlqP0i;v!76~{nCy=U@S9+N_7hg0PpKAk7QlI9Cim1-c;G zVpsc4Vn@FJA$BhQ?@G$c#He`k{Mi_WB7Bf_*{H548z~ov7R^QG?9^fGIMfHG|1B@} zB*cgAA9X~iU~FU)mjk2qoEun~Z)-*~tn(k6x6DLj+qAmKwZ1GLn!NFkhytwTLfPWX zZPqQY3UP{%#tXUeHqPP0*|8u$eM)`B`se8PD5VJC95?F2u6<2yhq?zTWWBd?ydY&} zttI2y_2B0+0UJ&Y^{#uSm zfj8o*)u%Yh5`w(aebBEy_yP8K)pltMgvz-^8?)Pm5T~DdjZ|-s;x!KHZ7nkS|8R-; z_}jALbNRmN^88(S%liYmQpaqKAGdYA{@gG=i+g5P%F+^DGdCov#)+`Smj)ctQQof` z6vD7&KsAQxTE5iW?KPGR3qx+aL)Jc|wPw&e z%A!o0Tni*?U9@#d31iJI#HmY2fwQ_{0bF=^O>wtV%$ShSxN{drlW%KS9T09jg`bda z`gXH$HL+gl&m7@+rRrcxIo;A4)u%ns-(}Pp?evj?kwdY4%MG2Ue+V;tm`OG53%hk1 z$Gyp>l8)O(m1{3XFEg`{S35xI80>PYb;;9s1rWiQ+tdCdao_NU)N#`_yjk}uao_)* z#gWhoi*l`txZU2@&PS%rByr}enX{F~23bywJN0tTFG_cIrRk=^)0Jv6OB3#;&<61` zP8)!RweS|`>+LN=ZXa0saA(uKElFOtDyQiDH&QNOB?P@%coxeB<+Kwjc8F}h-X@Bu zap=@_1BCKR(Ez3_y6+J`Q|`LJHAmeBt`KmwT(82+xhlsw4YnGKr=?$L4wXWumjN}p zd%Dm!hm*n?(pl?Ft63!Do&{likfL2A!Li2uTge8_3St_B1P>`z%4~xpL4Yu;@cj@? z3y5a^3Q^39^c+R(7QJ^YqpIhnN6fzj&|ail_?16H8*i$A)Si+YR;}-li=MRs&F+LR zUem^XA6ZGKgBfn$B>gyfLtzyk#08OX*B6tgXpA}%_Mv1yTbkP)kz~!`IT-xO`C<6G zy#oQXDLSvFi>t*b{2jcs(q}EF>(8N6v&VcSk1`1~#d=kZTHgd|w2eJp2!o7$icYv= zkQWx&3e$yDzP0of-ThQZ$)4U}^|8ZC&bTy}a2UhiBF*l`%y5{<=C1*z-Qlsg%D-`F zc4NFLep>~hVDbe1oLY_YYtmewfz9nPyhb%&cZi``5B~Tts$LZ^=eU^XyurUyl;K>% zm3hL4y2x8qTUQOsrL9hNJ%<99@~xwxSGVuD|DO2u8}jCcPq4k7?4wqP5-9YmWTv*e z2Zj&6R(jTH=9js2YkABJ-l)K>7K)47`0@6%<>>C{tPxaioK5ogAiMCX+@(7!9#b!@BqEgZ%Ua-rkLybm_lJ!7r z0a`c78?>U-!f>P-D~W2S8oP<~QzWKNi@T4JDgojN%t%&*eN@Qy797zDl8V8AWjGO; zF09;mN%Ad5HKk;13kUd8G!|^|3DL4ZFl*%`(n`%}(I9M5#yEMF1aT$1&@x~;Dc8(U zDY3FZR%oFXL?KTuD~CQ)S~%()qLdiK&4 z$jXGk?v(0*^oumel%(_F+Qxks+XntarmEyG%oUL3YErgQgV^zv7i-jdLPEcD2IQ9VaqbA7lS)xiv1HFjO9lGK(I(dOv)<0&*uTfSE)v` zNt?(@uunEcjm-j`9IXHXc~ar*D*hOhl0gEFKE0B^v4|zcXbV~i#46~8ijHEAR`#Er z(|OuU_sF>{yYJ#Wg_g|E0S1iDg{AG+K@OjydYfK0$Id|ExbbCWf@3iJ&wnMfXESKU zW(`usu&RTnK=mwJLU>S00eF+Gk|Q~@+BtND7{yc|;ZJbEZ|o3e&_NZnT5p{oz1Qe_x2J zr&UDqk>c+4XikAQ*+(r1cKmXU0djya5Gv^Ut3vaKva4{dsuE@%)i4-Eb+`!(MLH%MpTw#!LCS4I> z=5sD~31?BRxwv9Z5_;t2SM*SA3e24rdxN;(yK{X{D4x18X!p@4bCOEUEFt;Z8tmLb zc_l@aZ85nNZrm)#+T{ z4#Ab}YPi+B0#z z6mwz8A(qzj$zs$MK*y2kJJ%c3^-~?NNyPxHNjMeuE6gk@WiVK~MMHL?@s&+gYfm%= zc_i-iUOUg`vz0QL$$OWt`fRr@*(_ zpf%6$Na%BUTxjqt`wnbLMxLARjk^6KJZEsGlyWeP8CkT{f!ow!Ss+~-Xc8}kUn3cF zORG#v;UW;mW>A3+HU|TRBzVmNFeIjD0SH6nXl8p%Kx$GM>TEWAn;U8dn?T0lAyp9M zNWY4AZ%CJ_MDxvg2CEBPz5-N3>dj31IP?50^a_J(5?%#3) zuY)?i!v&WnZeERC*q}A*w)vAceEJ35$170Z0ySk0%~`PpLxWN2F(Adi}}q zyjrI?e92v+vd?+nzW^o;;;2s{aKdLB62Et6p>fF;r$>eO5(pfh{e(?rTQcGj#TN}g zKSN}YB^99(@XfguOy(ijEj6(JkA>>P8)Jc+)M`}d#K9Y{qt9O@XwTiOT|FDA{Q2ar zE5f@VCRQ{22XJCX^GPc%60S zIH?bn3vA{Y(W!~EO`|mfbk|-&!(FlL>;lVJbhpBCNecJmKrISKnLby{i_K1sQV4-6 zd%_sET&1|=cae&MPI6`oc)}?hl*6*68?=mRulCpj?LOqXajiP=KVZ+m1(dU)mrQaBE+}q_fpy79E2mR2^uI+vyvlEtXbt z379vCy-oXP1>0f}BibxV*P(-vcA1!^Rh^Kw#6{Q>;?M5|!{537hfcQ2+lEEL0qw}` zd0m09gq3?^1Z^fOgS{!SR})cf^3-o01id)MpCX5BAGp105!i|j^RWjbuDA1l;qj9S zAW-<9#57s0<;g|h$lHFR{M$5h*iQfW?)MA(|e)%RyHI9^MT z2VNTinoC_XkyHun)afm^>{Zl)_u%LoNp!AT+rzWOVas>yfE^$Z1I^)wug*lBks>cyDoSv z=Ha@96IW+7gg^rIp-tu-wa+azoMGEa@V6(+y4e1m8NXM?heWWr`@A!j+mI&a=rumM z;C%DTDu)zNLqygON0`*I5@B`CP&GR)49S{B(^Zyx{NFV!(=H~2B!7y1Qk_;MF&Jb`U0$$C!CY`AiJa{Sb)vu5PPALE zMGG;f{9Ku=c4L4 zM3Mj?kK_iBLks_Aw2`9vr3O76k+?``of5A-)=&C#X?3KeIxEvIT099DJF8_058jrU z{ljwrlIP$5mOYdc_mGgC<*syyB?7F#3F58Ti7Co3&IQ)HiVGb<8@G>=aLQ{-Em)jd znaIL`3}Q)omvONHxm=QsOmRCRnUQT^H-&SAY;SfEpQ6-nNmvAq$5VUPGoy=&FrqBX zDwfST;*;ZCmV9)(sD>X)e$~Bp)%$sIJfTn)_4-8(b@;}0m;A}Fi5CT16#=4ZrA)Tg zOh;n=v|fvV3m?sjC9J7n3G+`-n2gX}R+zTs(C@LUMO0R5RGX#|4=(9Qs;4Z?s^wBf zyL09EeDoBRVzqT?IXajh)?7u`A1!;)*;U9(A!=3?YsD388~WN*(A4GkOOhP-H6>>U zxeF{x%thKCW3wie$~rm?ea)w8L9eeU16L1Fo1YFKy<*mJ!@$N^=katMJ3|QE86wWV zvT~+ZnSYC?p~66&6l~1abPQ^nuJB1HcU{D~4$RmZY&nn*oE?k1?^RG8kseF0A6Zl^ zHU3L?$bF|f=E6SyE8U^$DYiX3E-j6&na}~}I?+TfB9e95!gWqOf>Us`m`{Nka^8}L z_G|vRP3+73cYWOLTZLScQXxdMI&||{qESY^a?|0$8ZpHe<>M#{8Q_qkE#{0bzZlxC8PEE77y*4H&W@IK z7_`D#LpSI0?!uUN!zFB#53kBse5y&}YR3c}$ivvXyM5q`H6j|p?ma}yz4^0F;2iE% zWF82IMqI!@{OgAAh3bE?d2fjAZ^sx}tian$4h{V5Jv->vELpzVfX{RZ``B}MhgQ7U z0v6(P(}T0}HPAfU!k*giA#Dlb{y42w_rI6WV-WPpnsaBPpHiwCa1*}w=NohNh!MZQk%=d;de?rZ?h>`Q<)qXgly zu0?7`Z2yp1u4ICS)Q)r*Pg$)H?aS*sy{16tk(b)F@C)9RW=(lN6Hd2f7YPuEX^j0J zD!j30Sjqzt7ln%xEI*JR#IqeFlxu}SW_F#ZfW=4M=Vj^*{1>4lH-9*e3WpajJyG^a z)&|344P(Cn+0`cGk+3aD0yYkA4@Lg}Ue5 z(d&DF;1AVxeGAy_LGcUf@*H6)hXO7iF_@L^L@l*taYStO6(Yn;_3bANtzh+Hftq*o z`hr(D$iTAON1&bGui1WnMusRsx1GvJ_!s8!hc9%jKe>(hXY!3lwV$OhrvT2BA%XVg zhIvy-0O_QjM1lsn$;;OMIJ!cj3J{Ac)+zkJ+F!TeD5IYg_CZX~>{Pji&UAg4@+T`g z+J6HDU!8_PAS-ZzpGgUFVx4XK^hny3Yp6KW^0~~zC^T;Ywz&}5vJF~0!rFh46cRBG zGlQTcxK~cJ(kAcQTXqkYn%;qJY#1vGe+t#uIwC9ecJ5wHUESx9Pmy&$F?RS-cX5|b zg1Ng&sABUi3Hv@q02L?w>W^$|Sor8F*6dkyT$KLHOcLO52rbwVMGdB2M56 z**L?x>b}66$rh!GY(yki>#-kk8CS_V9&fo*XL68)dosF5rg!B%| zkUod{RA0(1o2~YHGz^*>=M!5SfjVs_$E-XRpVmd3&TC8a0Ow|OP~z?+0#yu{i&C!o z-qq(?--;Rlk@U*1_GR+I@lHTKfujQrtevA^H$UMZqTtSNK10nOcyG%K&)? za6)2!I#v36gK#5x=WFRb2KR+zvqH)R)U7D?fc=F(4@Sy)o!=B=;aXfVQ2g3b_~phP zfjY#x)|B7A|M1T5Kwt#a3kHjHALBjSYXG2Tb@=J^0B6&8k$z+}o7U7IT`1vIKyMCR zNgBXNJm=T^y-u9(ts}f9q~78~T@6w}6$!d7j2v^0k@*EeTKtv;LO&arKv7o!j0wP% z#}eC4t0uPR>60+N{g8k_KUGN%+r}PG3NVIEBDK5UCF7hTEcc!Uuyd}aesZVc1bt=^ z{9)%r zCb73Za?C;%Ns-7w^p-VXtC#7g<-2OOD2|gT;2zgO z)~J7{wRJY+aaU1x1N1!#0);spqn&0or;n+TjC!%y;d0j3oB?D-A=H>c=y|^vjmPq- zO}E*ihCrJ07;W)q$x*G|x6Y(ub0j$Y)&qd*@#%4J3BV=9Nh1)=q zH1zqT`fR{57E98U^CYndk_AkCi;#0rY8H$@O8hJ+oS+ScHSxuI>kbJlkb?YFomnyQb;({2R!4*Rtz{UaVD~I+ z*WLHEK9T{XZy|d3^F9~0aQxt_RFI}_4OrdSdqpzzA z=+m+?_zP=TXniKv&NjVE=@wYNEVKwO+)|i@mK-T`LCa0#>7Zq*@%mCXReJ;`+gCm# zmI*39AePRyopZ?+IGzfp{~<(qEa^1`cx@c=-wFR z&bGYoaevbWbrN2f58n()EoP{IqNB-WpHSEuj42-Dd6RQ|rRPJ`_O?~3y)>=p?pLMQ zR({YML8e5@`?YVms240v^{=dh=|9Uli0f!!sKm_d1pG3GtT`g*P`kAb`HzvL8{?TN zq}2VNe^MxUyHFMPV%YqhB1U;I898QHB^29KJ?#JzYL&1*+^snTth#2G10)}W$O3=e zGm#V&k5>wV1omg~3wsZlyLx1vW7vi)tImuAVk+_7k+9YI>xr9cd`?6ys&7{#1QlNv z!)LXwy5Rh5TzOn<3chxS)%I)ka?|!-DamG~p`7Bax{8SumpyueN>zM#hy@&XPwA&{ zHu927;6h^xxK+ZPs1jOz?#`X?H|5o8SwetBQVz)aGuigR=QEqv?zBV8g_a%_QQ4oY zrcWQD)Ni%z*kr_=vgBPaE}?&^F4^9hmH7W)ZMa<;$E&fSUi9&qXsxX(rfgEHRHckB z`|*VW_;G#?1xAf_0Ty)5?eG#o;S!@IK(kF(yE4{H?cQ}1@k1u#ChMspF4loH^19{_ zE_?0Q`fu|MYN+;pNMX&8r`(Reg^9n#54)d%eltu<7JQC5k_A|=R1%GBj2wmUC17JA zPMdY0p`D97ZQ`i8xqH?4)@gUNyeI>~XZ@;$ifsnMx;>;;;M~fjn|2yj(xy?t*k;V{}1w@u8MpPWK4N z-xE$!AUbeQ;D^`TzVcI_6x2()9XCMp6i=kl%?KV|C{!KgUtp*-ZQxPlMF=Q> z@o2kWlIlLCihpHy849hbF(fPY@`35ry|F3E-cAxL&$oz@T^qVKLEETvLF#~tcviPm zv9hhyt7QvAZEf(ZV18Ff56y@SvX)Tpa`);x)fA~wUl7(59Ym^K4oDfIHTrIa0}MOn zGpAt6Pxx_vSz%!B;`ytrcs+)26r$DWM@CH-@4$$uY@Ea@dl%9LMbBgoUsvtXe=%x& zhUWgqZilkQ9S>b7+e>LPzd-K#?A&EAjKpf-Gosay3$L8ieAZ;8>Dfd*aJoW@BKLYc z8wY>`?vExCu2)2A7;_rve|uu$Af2`96}R0;>kV)@DHD2Ls9nU{4MtbbG+$Om7N7NN6@Hxb9XIk?)71f24@^B}_pm(-4Tu~}3o@66%8ABhlFo1nI_8>=u3H*ba`V+`&&WsU#Q1xtyg?dQ+^ESNI}GlCFNkH+4lYSYKXrhwxN3MIi{7ZeFxA z3@h(7QNR82c`fEr+~{1OUe*v8ypL%H;{|;AVEmpdTyDeEL zuGBv{hQ;?V>Hpi>{b&gPW92*b_BO%8p!J((n&@Uu=@n0)S>_WQXsmJYI0gJ(#ma_# zBd%tRr*7o^n!_;NL}1jtlz+ndYkXp2U8vLXx)N_nEfdL zhtP(!~ZDo%Ts*s-OcC6;_imOROZLaMt#$`>YC!S zkyqr^R+rp{PR5r@)yCQ(Zh1IPw$EG6!_DzA(h6T`{91brXB&~kv8Ye)^NGy3)pIGG=4LcC~E8NWRwF5<2cMV;qc;s zc!|7_UvL8-rI9T*xRP5hCu6N&iNEh=_W!(JJ-4EPM{XVWGFqxH2Wam8#yqsAvHy$+ z{Tk{K(DHcVAIIv+nkqADTzirn_pcBtN^g1hlle?kYyG%t-Erb^?d+P%t54rLd>?`V zJJe7Q>)_h0f_wzW_xA3)F9gt0@z+Rl`!|`DW<3ctX+1yj%uc8T_M2^9eIu(LBX*SI={Ecw0nWwaa=+`9|~yP_`b5q(Cd`5dO&%2@3f0wql7bJ%^T|(7zo^fP9Os`HIb4v{e-sB#{bQH)P$}okaSb#RvBhI!0~$MxP1s=U_)yq~Sdh6i7c4$oir zeY{|r3-ozt%j8lJ}JiQ?ZrUPdw# z&=#dv}C0f+!0*%?#;WkESNyu zJO$G#vn7wrqOj_;!B!hZAuNZsjpmt1@J4_6uJ%RtS%oW|pq@zc zU??BNIfQr-tCWV8MoDGlMa$;?@M$YdPgkqQiUv_z}C#VM?mg4eocs z?rV#~ibMn|Gi{1skAcihX!r=>&P1ePZuW-j&V;8!t>|;zoQ_>pHQ2MPE6EKk<7SHB zj)Btu(9~k@fq@bvmKk!=31g8^G(d(ogwY05-eE9QszY}u?9~P8>zo>ehLMDW*#093 zGv7@0yGW~|d8k27^6}B}#)uoHaH5ArZ?c!ZMe{M%gQ;CbQcs985OB0I1TzL{pnign z%}}z^+bzF?%TRJ5>|#W8Y_!ksL2jhY*`BT#4j9579~uNzT)HH?HyS4r%}8aSC&v*o zv2@)xVs>~g1`mxI>rD`W2EtefC?c=i)RqOrqSw&cGm&vBK0|j6{n}MDBy)u+58DM8 zk~v3}?>Z`x!Qi4QS}85u4L1Z zgF~XwylTmU=XMv0=|=tRO%To1rH4ZiabT@aOPQeR+Z(h|mIlO(;3owrsb(E$ooLkdhW=}4@)wTP*8|8j{3$9mL z4=kb@VYQ-h(ou+O_CyI)*siFaW7Ccp7atE80jQ!1RUA)Ruoi2%XQBm+#zf6a=i5>5n3;GJAJHb?Rcxn!^<8v zIQNemi2j7wF%t6nGS||{*YB4qb=CWN+A8OXrTq}n3ZZ?${x<8sgC}ld$lFdu)KcxQ zX7<1*_1uZ1d+4C`iJVu$3uF-4sACVk1nmZN>zZD`f@D`#$^08) zJP+2^L$7c!gw&_%mFcte@|vF3HIj6=UWO*BR!h}-by+GE+g4x?B#0g0h^qIMDmEq* zAJp_7=vGU3s6dtT6?Q{q>sqRM6JV~yb;ICw$u1R2Q&t=~7@rygk_~>>E)r{@qA=oo? zopWV4#xW`n4JFIBtsy6B?P^435ai=5C->v*{PppD;Kd)QVlDJ8$+@0SP4d&v_dr9P zpyoyu>^=|k&U>UT2S+OCox@E(@14%~{PJ4jLuL5o-O0;ZM<<@YHyoYA(FHxknWJ|E z!!oII;Y7`N1$%z>6|IG0(hg zzyZTSEM!Oair~i4koJA!+QufU(mDj{L$(%k&fKAS+S1<{n<1C7SKy^y%qI;dd2qsY zbi%%~cVOZt!_G{rycN&!h&zjq{L?Y$1Hr5Qs$P`9=IQ4lf`BKl<{-m_G1@gGZinH? z*ZC$}&fAnf7l(Rd)ZGLD3sKMj3r8wChH(-Eb6}am$gn0x`j^*T9{5RP@kjp~ z@Sz@+kx&1TC0UoDj3`)R80_IMc9yi8n@4D_->%-S17T&n4bF4G(x;1N-DituQ`!1< zITKVkyNI=CBNrDiC!p9V9;t(*t0eaE)o$8Q;!TyhE9kYaKzB>UkwG zY2c-bKNV_@T?l_b-hLtLt9@66iL{3CFL0x^Pi^3#Y$YEYLU``ZsB;L67XgjhH`JSa zM2D@0uidLBtA0AAx0e)D<1NG1d$=3x^rW?C>lYFo$eItsZSQb>jkUQ-O8efKUd8#< zx3jT*HEp^H9u5h7*=*`e^Xm~SKHA*g%m<~)_~0n7Lb#Ie9Pf~bDNNw*ItfU2RhbM} z{?;B%5vFt?DFAmSugUxM6LyOCx|W}FCl6~)hOUbKBdhQTNEhhdU4yl*PqdYn&T}N` z!^ii=G4gBYac0MF1jUD;Y5Gxa;l{DSjiB@EvCski?dz&|d)xC*0cS3JL{eUGD@FZN zetVSIeajs$uIuPc>Va)Ap)WSWTj*jA2KS{#uOOOuL8gVb0q5DBx$B<8qy3OzaCb!c zp03S{ZP84t@gsx;<1aHmiXLW|1_%eK{h6jTw*ZrYVU(y)Gv(Jb>-x6~22wW}y$X&q zt7480`(3Id4mg`z-@Wprw$f)d*LBP5TkD`^nV_S0r~ z5~Erwv<>^xJlwBKkr9C}T?O*@S^@dgq0XeEeQ?h(0RhcW3hPJ3Idh)$0lt~FUUkU* zQ|`mlFZP{37rx$KUWHX`BU?;%+MuUe{npVN`n`7ETOQl0x9*lXEhE_SI=MnHoStM5 z)yuu6Tlf;IR@L&0J(SWYOYGLkCzZC_?gaE7hapwt^2-H1(wz}+Bvw}tp9ANI_|;9P z=frPCJ<#td>W`(p5|dxCG#Df?A>TULol!lUW=3L&3m9YkHRe z9m!S3_e@yd7?$uz7CG>!nY0<$FyFFcsR2lb%DcD*Ij=H;XAn9oU=Km*iQ_y(>-Ttj zV_=mjdY)$}D%-ixaaSLqlURX`qgC#m)b4GeYEPLx#SFa9zneeUCBh^Su<`X5HQO0D zQr@_!^-juG9jVV;3#g@R704tNZu2Zq32WKxY~CNMJmsfFr~HV*MZH<*_@sZ$qTc-a zxv}!|^dg=H?$5`lXO8ern`kUzKdDSMAKyt3kXd6BP7@S~$PN7JyqBGb{wm8)P5 z+%Fh|nqER?J=Qjfp+hVLcM6>95N+p;v47}_eoi5eR}1v-Y5KAPHw1(iyfFK8sKA&) zU}{>Y_e5(IC64&Ia;c`r(;sq4u)dQU1^(^(n-&$c#q)-$$RwdWOHt0}sEY^M^js~z zc&N%KnXV&kwZ&S?%@D5@qh>wGjx0vLNFPoVwZ#sPf8_LLtDwdn9N~WR>zVdnP`=|0 zg%lb88N4l^)$m>Vq+4k?fAzjYZ(5b1%+wtTDnwy78NP*i?!>D6Gs9*r?o_y3Kw;&$ z_F@y&n2U7=|MYKI{s-Mo!@j7)_b|(w^J$OH4sd4*0(gswTal7Zy2@$2W`l{(&z9uw zcHH^IVn`k^88x4F+s(w_f-!zw4Od!AUS84d;4Hu}DnBCbbT-;f%JwZCP4~ce(M*Hq zMyZV1`>jfgNzF<6Va-zDrTRzL(KkP%i+0bq2Ud%Tg6o7kwMb~De)6QPpwReuqLJ&jIR@pF9JmwNWjEh7cD$D5YVq@V4#11 z)BgmmV*O8`RqFp&z^R9^yS3;{Z2L3;Qtp76@R`~yjuCcwHi>aN9^EYPp zzcVv2bTRyIC|B?Q;@4PTJ36IADMLp+Jvq~;%Dl*;s4O`pGp#T-DbuP74d=Mftk}?c z&;T{VFiuY|DJy@ZtQbJ0UZ)CVT?hJetx2Yfj(&^Xu#^0#k@bB;c-gIpLM=E+4yE>aX{Zs0HX~qBaPD!Tm{{RP; z|NqLu%GAl;*7O^NY-j57ZPfq9+T_3UPW#3V|Bq1Q|CzVV|Np$d4IuUHXeYDpSWk??QLmTqn8S*X>`< zeyqr!^b*d7;gS9k|B?R@_>svCJ5wM=SR>-WKO>yC}}4udTWv1`$=EVb;ejvqzNiWj+Myw60wzu+z+lOg8g5$ug6Ysho&jVpQuC`Zw z53vWR2eAjN2UkB_Ke%?pe$c+peuQJseb;^8{orZ;=>TCbZa?loVQ*%4=73?ZcE9%E z?JwxF_H)NG&x(!29J1kewT+~*?n zi%^U4yS5~rR1(bu&;afkI(=!%VyA^Y144X*p=>E3c3K}0N9~#lCM&(60efC$<&EB;HLT1W9 zMCud8BqA?CV);o)oEkxqSa%okgE(rG1Ra@KSPT_uC?t%Mq$%WQ8KG5#R$)pVicAE1 zVa_QMHv_a{8UL&~r)VAcdSPcao1shU!q^zG;gSvxVgCc|U`=0yY`(j1}H{{<) z*YM}~=R{8FY(hWMPts3fc@+O7;9n82q`{*G%ptI3B%_uls9193iBcxa8Ny}>o`=H9 z;^Sl74Y^J6QBpK(g6xTMzhZ32wMW$&VlGM35`7PWJc&G!JefSY!4_vOvubHp0uYs>WUqfGGUXxz4hAk7#ECjru z@g&1%_nJa-n7@jmKOxGaKl`>IIcOj1&Gd*U8Nf#EMF2iIiGIWU!WMWB?g;SZ)$RIBX z)$Dg++=@;*Gficp$+$~jn#4XPK2|=4KBhj_I`%pyKUOmXZOm93w=w@?=*En|h`Lj z$SHM7agQO79tKkiJtX{-Q5=&dn=Trq1coIfqaU|GT7#4py&{xMxY{9MmXH-%u3y@) zt4_#*WyIyNsg+tquys zFpw6w@1<&vI8sWTdOoFH^Y-wvO2^VkP0vgG|6=VeU@Pl^sIep)=4@yK8)jyP4Kve* znVFfHnVFfHnVA_j%nUEw_qF=l>aVI+YW4JFd2G*_vB%QABj00(9_9GNtkl{md8(tc zboEzv423X_{HjxjCeF_4Xf_cwL%GoE#Upc0_{^ALtKotA^0Z%xdMIlwDMpkjCRnOt zvKtZ8eI^F+rzU6^({J^O>kcUadaRvc)eT|$p*S^lu58Xv>P@17(`V-ne{nXfMN^lJ zmHuk0Mw0zs&C0DzBBf?(KvzFw za<_@086^7Y2)QMb*3q$nQ-#>vxOLrBs7h0iewx!XAG|QNCbQ(}tb%9>rI^NLG_^s1 zV{!qK5;Q`BCH3#P0LHxrjzk$D#|z31R6r39LzZDST+mFEV|>>4K54GboDn8mqI{jR z-SIWNHH>J1sF8_ik@;dYBu)jb*VPL%S`bml^wftWv$85WfxTX%6Ph;DbP24K^ z!%?Oqt#?j!sDaW5(&a7#a_lzAFR{!;qKtgj^X_w#<_2Kaeq7J8h0`iKxZ5`D9&T($aEP6yVbb6({p6=q@K7HCEc>bu) zwIxsXeTQiyb@Q(;TD($Qa9nmuN@{LmW>&FcF?pqfBU2)JMb*~f&Txlt!v9T$^`4ZOq!HL~_n4I*Umyk?5sX8LII0V7P zdIJaxT1x^-hq`}TTT}j^vrkR`Rvn=@V(;%Syk%@BBLAeGOxG@Bqr0H(YG z(G-AG*Dtk9t&seV>Og{nEoN#LET^JUO--_xXyUpe3Y<5ht9|(E)ERQzXXI)xMK-tJ z-cPTV`D0s&JAU4wdcI1PnyNk4Sk<#sgk%9*#U*qxn546lE7K|lyINreB4C9Vk0`Qs zRn}?qRAa@4x{+&>ra*62+qSO)eaFYblM7pZ4pg;IQ4j-@Xp3-7q5vcX9_>)Oj2Qd!wM0(Z1z8-a4wksp|Hk+}eR z8K`p~SXCZMvYBO{%pQgv&KiggBvgOr9t8k9tB?Gk+>MKBvEhzsD}=s3^&hnYs0)M- zdJmTGPhW&&72W;a1M<7YGOG+aanvcyU*M_e>~@|;cJ=)%7P=#+nQLhz=&^W)xr z8=$An`Ud!{e1oKf6c^SQ#WWYq2`4|baV#BzI5Pj79B7!=vdaxgSs*YwF@X3x#YTfP zIeKjHQ1`k9W<|&iK}+I#THkLq##V*g-vXa#2>VzYfnYpINa6nnNdSM~cHK(lw;-Hx z;_vD1C4C`iTEX1tYBR~I?q>|@4l5MWT$HA1I?vAS=BPy$A}6QhO>6Him|8Ad*0U%w zG`7<2Vn=wmEYvPcm*4S^3j?3mOyd7HDQYQ8WURDqI9_Qq|#* z`hS zh+cV)mct8VK^!&BkX06z+sr9_VF)fd@R8o;M)M;47Vq##E1*aVG}UZu2A+wkV|{G8 z{ei~mW)3Zb0DWjJ`xuz4d1nR=w!KfwHhSy7zwxYfLi2l|qt3>P5*r2Tcu4Cn5}34@ zTB_8+Rm94bh+Aa!;?BY0?*o&;m7Dz==_{8tZsfkGj^UEJUpV6>z0ptkM<=1QgDHm8 z^2CT%=q`9826aFEBAVJV^f|M|f^h0HX$s7>5DtD5@SU_b zKdN>bqPj4r@W#N~UZ`HOfgdV{4t7|fzQz6a+S&c^g{qGptCv|bv4T6Ux|0rH&ntIW z=az@9b8%`6xB3~WE_^lp?6SGFw4~gK3SoTyGqbRAFr@3Msa=ux;6&QG;i&{;UAvkW zq1@O^n#)6SLWz5ezXWjf+zJ$cN!DoXWYzo6i@%@eX7sD zcxZ0wlj(I6hI{CjtTTO;R?nhVNSTAG>1~1oj;{DF$Z#7`-QicGh;{8&c$vLe+(8&q zo0nRMp(l3SnVfuA?Jp>zEV|jWA1MP$@a?F=Wwlk+zey!E7soC{*wBXPMwxsD_zuY~ z8MtFL8@kkT^>pnipP-*9pRt}fpCO(}U6QhA>GUugAgl1qyZqe~ni(NEw zZd!w^ZLb`wALf1Fa9Ae3J7gT9{a{r`k`xxroD3E;W*9|qL6-*mqM-1{*K9zMHj!#C zLliFCpDy3J<=UPH1rrz}Q-guM;#;v!JZ>aIAzG;)`)S~Gz~3|^eG;_&X{TW^o0%;Tm(KFG^`T$O_4T@3 zs(ac-wAIA1jEL``?BPc{2rYA6T($855-6o49|Z&`R-9p`f5XICjvn37YNInvMNf&C zlaDpg;tB`+i z;ABcRmAz%NbG~JD+YRExlhpD-5PUX%-qVxRTHa7hh~iMzeu*d8sm5ea3or7o|JH2{Tu4T z9!y8kUUZkH=c-8n6SGHJT4}U{rDyE4n8h1b^xaG0NZo+{ECcZe11$t0x5x_!lpPr6 zDQI^d(qo{p9_L?B)d0{s*es~OApI70d~G1s11kY={UUn?b}(&dT99;5YJSxHTz2Sf z*jhhoAXfdK_B`x%q1Cu!7j^%huy=gWE#52IcPS z)+292+CstuK?(@%8{9*=rEr741d9zM?@QdHyk%KK$N`-VIO%)XgSaJfgR%bB0j&*K z?Zdm}a{F-!@!prI$Is!%7985Axo3TgxPjXPwF8Ckht#isivsxN1s3Bc*KfM#cnbme zX^qP%xg`d`e89^F==Rm_p#cy+5Whft1A6<+Z`osj-xkHd z*@2PU!{wm~Be1>WlMfFlhL-r9Ll(T$M0f%75c&bZWRTd{X0 zIoHXq3_sU(Tj6ic(ix^UQm-Xnf^lRcX}V?3)qvpu`G{OF9|9ib&YimU+QWbZRP5AX=>v9`%>vJ1*>vS8$)@#=cFIO+wFIz8NFJCV0pP``27?461WzQm4eY}Y7)O@&CjbEh z9$H2Q7eIy=fCkS;4iZ2{>{kwpYrF?J4i(#Pye*@uW*k1FYfw)rG6i!5b6wv`?sYtp zEEmjYD|gl?A2Co)!ro2`AKk0JE@ci(8(%%moHq_iP2O@uxo#{C=FHljQ*c4JHz*V% z2}cdbr7T#qsGw17m(Z?hvfIZyQk=&*AsH&xUzYIA6x1{;23)UMvkHx=0dD45sFIge;c4`rXeXOF3RyM3YE} zAEF$M(Trh!ie}P2PQ+}9j$JI~xT7b=lc7;AUD$Nmgc1C+xwP(Al4$lifttss<``v> zC;CX7aCH8eU}EtKwv1x*h(Q8|`*LxX$G-YEi$7SU3A|+m7kJ8X7F0zl zqHz5CBe2aAMgrL@R7H@%B84efMUYQ(YiFFO%%T}_>C4!`#kdlZ&1AJz@knVX4I&Qh z#aiYJ1&3j?z?V)YS9QP|}izd*^*%oNi#3fWZL z4=p)ggB0$Q9ir9yop*S>G0-iR3zAb1o;C)=9>;Phnk565iVpXGo|QF=V6@BrbFR^! z8d=)7!)~;oVSYy&qhSW|E&ICy`^#)A2Q=8HnFJ)akVK-|{2qcK8 zn=4whpVf&!S-?SI;%&3ZvKtoFDA0)%m?^+tfI0}7-nJcINsuFn6F+W;F>+XCb>f{B zXE|}muXSv8rq~Q7p*!hG|rM#uVTrVC83aDDL8pJ(H%RH@NwZ~Jz(`u&d{7N z`>5TgF{I$Kdtlgr@iwSAHW2oF6{zEdSgzjPvZt_iFCEJ0vftjaYfUBMp;6SDZJ%L~ zGB(d!zM9CAu8SE%H^?Xo#V1U9!Wy?{L|T}qdzg`Kv29QqmTTOMBjMFYXZ@WzMSdP@ zw_hheZMDNz8l7Xvs0gvM**s1Am9+n_qe8l5(T(_&4zJovR9?4gk;)kwD#q|^US<8f2PnJTi7Ia&jwFn1Vi}2@|Np! zYhAiP_*mP3{$9$|svkxD9vu&#^?8O(8Ph=`wK4#iNIZ1;mnXpd5tgz-9=6pk{YO7! zF1*;r_M}=BvC0(W4|W{lpclu1#ZZ{ScxO}INN$3sLA_&S{16?5BmyY~HnpA5O@Gi2X zpFB*XfZ}~-w-ngsasW;9dg}*9e`VkbeZ?Qz5~}XiOM5(@ZldeArO|i%R|5P526SSW zr4)(MML<<%BJsYxyy8D%CktU756cp!auk_d2=r!2@by7nfZ@<>9K#XNE4j zPP$^TVr-s@_DuRQEOy`uF*Qh*Rn4py4bw&3mfjztHb%$3!BvKx3MKz4_tj*-J^f+J zp}fZtzX`vAVnI`ir*I?C=^v|qu|K9%UMJ+Rb#o?tbzaAb1%Eli^%IgCFjBRDrq#BY z4TWJPdz5<;0gziL<{_7fad-?&c$pczOd#~VBymmTZLr}>{~7F~*km-DYVrh_6IZE< zBWTprJtI)}PoZ=RWaDF~d*CN3ctM|6M_aF8w6dsus^-rxw7GgixMQ`y;+npMb9CRx za=bVt&wFMq?VK_KSpQYU$pd??K-?!bIHtE86%kRNbuWGapkd^ZRiJUa7*1r5PBB2Q zs3{^V7aQ#>J<{jG+j_jFaK^U5LaJ%vJcT*Ej)5&kM^mW_?}qsA@`Q4KcV`Digl zF)|`G|6IJzXz9G1fj~>JMXdT0(Pt!z?Rra(#MMgww0xRiDKk1y)?KJDGZ$31I3I#b zHNx&b@v?Hj)l2$S#|H&4;pwpa7j_ar`K-b~Q8|jHGY&J0Pk8CAZ1`s{lmHSvWYCFL zv{5>rtqpZvUYmr&mPTslgyF=%oK-jbO@m1_U$SJ%;kjOW(0m3<^MOXl3q?2jwIY8U zZ%JTsme~F5ufRTHWMf)yfEZ38FqMGJ+a{=^UDRw>xfrz4>Tv3wvsWQtDk}9*x&EFd zV@I1iJQ|1FQ;n`Q8(5$QZ{3}Yot?7_K~-#w*PaP^FhV?98bDac=f0=v!|4%>!jM$i zel#>#Fw;#D?NPi1<;`{rF|6Lq(~$WJwrk|rvDL5@C%+?njMBb6qMl zhTU2}*9HexKK~iFP>@i;YBDIFW_^;2n_=}?W0ao!jxArIhBP@s299FGOc9znwNvre zZg$PXf_8NaS=JM5xw17;?t}OVpwDJ62jMLW0QCtHi$L;m*2BHV>-abCkp^`TuhBEW zCvjL`zwN*s1Pk9>VF6g=>__$b5ome=Xv5hWDu8jaWfn~$m3v6!(=wDFV5-<~PZ?cg zp14<`tw2A_DHRC71S~s?qVG0b9oZK}n=CV&tX_ij=)0Jn>;9Ymp?If&% zzlaYY2yP)=*OGTh9SY49TxQXxP)<5gxTfU8iP&5|t-Yr;rn=5NH*r<3Tzd0R0v_Q% z51ZTT4`jdXDy^C*n-o$tn?&0s%^6O+m_Hy)?dSO$$9N}J$||9H3;uci?kZ4roAMn_ zXa68SPB!*@#+m6k*M$$$DxJT@5x80Mon4>$Hf4)E+^Nakn=<=O$Et3Z zW_z@Pcyb57{`3ktecU*fi`(?H9>1@Dr)9;eY;uV0*5&lP_ccVSCP2twi0$8<1;IsS z51ZiDPRFCAP^y>x=L3G6o!2{}32}h!N^a1+WfFt)t2b*^mgq?jmL zy4Z=}$qfB(HeL0bda-zd%AN7#L7r9++|GphJ6XMX<+Ct>T69Xoy@$4WBf5pQ#_Mrd&BpG z+7uz>1Q6eDs2$_x@}Hm55*hR|IS~zhY&b9F`TlNkp$?6pffV4$9E&Yar(m~?HVHIA z)jy8uci1jJ>`;Ob0K>6G35Jh3HfEB<3?Ld$QDFCXeQeMxB^wWdmzT^e1E)`#SI#=f;MpG5*lD7J~Gv}BK z8fsOGd|t!}Rf0yy8-I zL%YeiAu47-oXn8O&@l3$5W}t~Zf0B5U-tVpW_xrD39TRfS}~Vw zv8*1U>>YL@`R`keVy}?r z^k~0-rZ96YI>QI&pWvt(ob{BjQ~-As>7C^r?q;3zj7O8<_9MW+1qIyV+RE22Gm~wI zERwFudt`J1bboFxsT)F|eDutfvvikuC-lz`f0wbd!J+ti*+SG@$I^L13d896;2$2j zY&}Fhzm<+SY6}jOfv0NAK7>CahONka$Yg)^{_*oL^y_O&=Mec2{Xq1G3BZ8XXg>>o zWa^Z>szIZdU>ue@5@bFNf7OQ{J2RC(c$mqhDq<8icru*^RXG(gk_%!(&H$MB5$y|X%7riIKE;FyFP)6OSO$Uv|Q z2)_r6KcJfCQ=j62@gafS6Pn#vDY!UX)Q6kudt|?u3!7M8JFInKcS*#Unk02j2H~BE zTjt1y#w*q5MH_K|H{(b!f;;DM?1PG&i8*cN{nN&Wai?ZtuoCOYGwVz4EbGEzdpphw!KN5~26R_2b&Q@D7 zjha#>ydHKDuD>F)AdO?h1$SKv7yc1AuTSfgAdLthYDiN~BsHQeC!7?gEf4IwjtM12 zZW5S76o3NHMs^aILjVo18QrE}fd5Nk4pwc%`2t1g#-ctm9GVE{lge%Uc>7)Gr#|$l zH2h8Wqj+%s=ojzVA|zJDeGOua&7rW~bpu;Vd-&c=f6xKy9j?nN5*4TMq}#IzLC0P( zo!uoF`S%4>*J=c=Ht+TfN8#Gy!W!SVZEu}!ZYQE z)*ok8&_Pj+WHo=-zA&)0Y_uW6{^Ku*Q*6T@MZ%~z$F5u)7V+#vz``Y>ytlY6owgBa zl3`eD8$kJ&48{DaE7q4R@F9nbQ_(m)vh8pp;%w@O`SXS5S1mx9FUgx)e#Us#k58

_|HqMLNf6oDKk2AhX_?JD%>|H#mY}DW}-Zt^ZE{YFY zzD|4E{;gt!)Gi)ZE`bNWpLOt;)*<;JN=!dQzcaEHcT{_GgJH;MB>i|TRJ!INV@x|l z|J(E-`yVMEsQxD_VsLi5>TjtIjGO(~tVn(VyTaBU5?{h^E*ynO9+|HzLJI*q)S<`_ z#^x@0c8es!C*ywWe(QlpGrTe0y0EpN=@XM z%f&4)&_zU)7?o*QGb0N3%Q=<7lEq0C#+6}{C5si#lp&KPj1|_E5tF5k6keCKEbv%! zHU7{R!IlY1N{&--7Uv};MNkz)P_n8BCM#lBL@g+CNy^a{z$e8sDVS7bRpe2XQ&nVC zNs6{8(I``$kfqJvD08U@JTK}fv$3E&%F9ZMJkR$i=c~xo z5Tz|um8UKTwLo{q8&-_dkja+Q{!^X5qKK)8seq}JDxa#Ds*tLrCazt%X+hi^z9DU$f1TH&xLL+sezl~%w7tZ;gm|uF zLGFz2%pYvAlS$YH0T!g*D&S{f6SR&)xCY*D0^Rb*5B8!O*(z{P7P>{q4inr}$dAAb z3j9T|4mIGNpba0)=tKY-FJMm}8qXhOc{*004lZDn&@u2S9!e;&5z=lu>bHMM6!b<<} zpzoU_%Z0i@4lxtvK-^h{o&4d!+;>Nw4Fzb0%?1Lz!sz_~f?=3{x{&u3!zKynLfgRh zCBrJaV!6x20JZ_6hH7^Moq&fp(|lW4@lg zvPqQZ=wB=Y?MfwOyn(;dDU2f=a#6lUlPE3teMzpeD3z87zX}LI$MB0&Hzo{qCo?yOJu7oL+mP`-$XAU5G55*q;8^rh(H!BP*TR+kR9E+tDMqk7D z$br2N(xRiK(hIi4;{O}$9Krt!AO{?b|1lryE16y(`{2jIIDv)$2<$K|mYxUqwKDaZ zK$FRpao{)#%^4a!YfGZ^VDeQx+@erw3gfS55ST#wJ%zL}M4{yL%Xj2P3n)(GFK59s zj>vH_;mp0m;pyc;nLxYZ>-Ay-cAXsD1-inO6WZ&TCp~{HH1QqABvKmXVgWyamOYcZ zkT^g}adfvq6Oge~3MC~5nraFP9Jt%j; zDPMBx(F322Y#h;YPwq|rC%qsOz`z5XpzVQF{}b8tg4C$fk#(R`P_g5vMbh)z#8$b{ zPXgSpsL7_l>UH6WX{q%5B%s)V4mcsCy&@cN#u0q6p}YSXyzCVhE0>pMjlZbAAZDzQ9iP?+9uCGLTLG6*g@qQBJn+IMS8E^q?v2}d__NH$u zD1=@v6KLJ~Lt)v$Od_^;jE#m0C8yQEoJ}aOivRC;ol@zMm$)iMCcVHl=5$&ei1fn? zI_HORgijiM#y1SGjH=BT0s1d@%jsT<#QdAx@xhy7;Zyt+3qrmv; zz3&`w1X|b|tHEmuRPKAn>;l{okO!uFxD-lJez}L?iY31ybiq+eq!|T$B7mw4wn|CA z;U>^f8B&UU1=9@z0OyZeluA+WP6wPyC28eetZaP75#hh6#Ygg`8JXRh(tjC8q_dt* z0V9_zWOn~Rz9fwU4{fwinh_?@o*5XMiBt5WKqDBM;7%P*11z%wH0h%z@m1FPH@k7f`cU(|FVI?7JA{v3pl8|N zJ{q%s(haWhY`y&x{LNu_8vZ>4wTa&H^jT+?ho%U z3r{V6u*;b888W)D#JPvKBf@Qr@xa|BL{B{+(;p#iIrMI1eQ!@0;!2t7=sz0@xH8o; z)iQdft){c5bx-jf%Y>y0Xu;Y49(qF71-Jh(6phTjJ&xN)RBv`ndu)CD`&gUi=l&M` zo*38>a;={m=}_gIsbTWur{+a;#DYbq(z=c9KV3BB5na_akE>|5=Ei~Ry5`NcR+1q2 zUPj?<*nN5={@BCrvB`?6-_Os+7z(Gik=F;y4lg$z`11u_m5uZIj_Vd&RngirUyn^m zkJ6D873HhThbiJVV%DwX>@LnuFKt#a?bor@+OlfyzB)0acA;>$fDdSbTj z(-aIf!c9~~TZ?M8F84ReA7^Q2eD9TL3u7{U_&0L(`x8+YN&e0xd+i z19qnxwz*z$I?%6{N*lq_xtc7-FUa9Y^C|w1MjvfxlVAt&4pCNj=mO_B=1jDU!JLM9 z97tGAHPlJ4gK$?oCf$$3$Lr9WuaFj8d-}qFJMGDVUBWZ_TxV1E(K$LPeEZED8ob0}Yo9 z?|?TnQ&3PnfRsI0&X`hlDkRA=x}ruFGa<>f*_CrAgU`_9ut;5Dp0WNE@kK{y$*i$r zdt;!PO}Igboii(fE^9hgd{2ZZMc>?oD&ii^^|zJQvC}%&l*LR(Rb}^CUlD*41|vSm z)^=>64lk%taOSS4scL$hviy={CH84ID+gt;`!C8mqGK;;(BkpO{W;;I*i2^I1yyG9 zAnxq^r9M$$MAqz1B~$>}(d;HiDuSL+y9p**1UoIwo{na#1l7T=R;V2=*7L8Um`zvC zklu0XEzeZqbogx)eWG)am;1r`otl&Pm81ox8=R-O5Ly0vQi=`{&Rmh?$qrOR zI0&@>SF}uy`1;aV^V(D|{33UWjF+E{1uf3Q+i9!FwXG$){Y{8rf0!Cgiea-^cC(>u z)Uc`{rk-W}WW8m*W}Wq#_8RY6_uA)L;M(9?;o9Pw)SAzw_9gT)uggzv1mKqrKj#R3 z4uN6GgP>FVi1b5A6Bw>bWuW`f>Icv)4w~+KN7o_`%kxh*V$W= zK^+JM>j2>h0YR)Yy2iNg9HqFj`$M>WAQ+fO02h88Xcr{NqSx9BAtoQvhK?uL`Ej>X zEeL9cE*Z=;2dlw32DM1A19fL?qml9sL9bv6Wu7C$8WT70SyI+^7rb?|imSF@bhAf_ z1TCc?#wtixrNn`ql39mBW&4Ns(lxO-h$}zGceBVkQ9jgoHM1k5YLckBX6*5!9qX*1 zc5<`xjmzrybr&T|AuN1m)ZA<$QLxGYc1(OgjWt@qP>)5NIAN0;>FaE?kP)pu^UF`V zn85**O0nUxI+-;amqx!WeX5ayI$;`|%t-V&$%dpV63j&FqQFby)Oc#~6fKz=LVA)L zQe6_HIQ&GhvDq>DvBE>fdz^c;SMFDG_lyAwP!UCzWC6}{>hkw;(=w#8*>c-YhmZS@ zA|Gu2M%}{QpS{IClb>{tnm4Y2yD~nlfbHYfe%r)dj9#cuyl2m)8~fhUkDNQtnHz}S z)DOhh-%m&{a<{ejwlBH|zRlmizcxQw-*>Ni2YpMwKfjRP_%FZ9zAe9M-*29L7lF6T z5q`UV>;fr(zU#kHzHP}969dV~rDt-qxY`}>&&O9~cDP={$8BZ4^zUO6eRDo050#X_ zO2td2G7@-1_={a6Ka+-)uuE8E%>QHN)tl&`Y?X7@o7kbWmE~kOnoDXe?ZRQ8B;X*R z(X;R)A)q55CZN}|>HF{t1|fS`KjPM*F0*0sqilNPk&_sR1V5Heg+mhi#!rL4Lz$ox;eBqs@s9S-~LG8Jvac7 zJvDz_C?8BWo?GEK4l|dzth}MTq`aoQsJtx#5qWcY^*A~+1$kq6XL;*5(lKl&_qpE! zauD5Uj}~(|dF%l@NL(0?GIOp1qk*#EpJ+}@r>lBYX)rlxJe+^gaB*=lXb@wdV~}QG zS0LCSb1}UvZ=d&00(aqk=mCLygZ=nW_%L5wfX%&|Kws!DN`R5LQ5c<(%2+p{ToBLi zd+D(ULi&&{+A;Cex(vTU%X?T@jIv8s> z=U~Jjou3}Yr?mN*LO0Oc7#+NiJ#$ck_^{q2kM(of`LUsV_-`JkQ2DtbKB$lbX?1CJ zhjmSLQFT=e#%Xj`3Tcc}xT;tt2p8}dFc)x|7%fCr&TA0*mVix}OoZ-x2*Ra;`*2o)-8{`|bU3wq+k2-+D9o-%3e(6x>@N7gbW-o=0`bULZ zECAt-@6P8=;7)Vjb?7FX9~mFRmxhn%OZp=iPzFc?;M}?HAMB&<=MIq%_eS`leiMF4 zeYAp$ga1?%lnVOEKW-%9MYwdP!_jHi^g~I`c#) z@eUFxQdx=EBDn_X20wgbNaOahsGavUQ4eqII%% zsRkj3+(UtJ;soska?(!HSqYsaAP+zBI`uj|CyBe*ea~Utq2ah%0zN6fSdhq6lz8k| zWSnS{uo+PX5f@PhQB6!6=l)9A39(M>8qS^d(0G_`>2yX41FgBnbW@4>^deoR%XZU6 z=~cRm*~aE#_*r5pl(bw{4lA!|hrY-3W5=0gi7un}_M=+KO|FmK+w9_Z#@9>K8MDc3 zSgr!!Ak!e1;Z+p1sTS+O85aGloAZbq^H-L=hspj_RXQhg>a-T`LqIyxte3|zGqctkn9d$5of=$&FQw z*rwWS7ai)WvmRzEN{ueFZ+0t~jWME(3jPZH3NQ-k3hN4y1r>!Bg>+#ZJm(W-+X}V9 z-55{COLt|c^Gb!LB4T3nQFIZiVy$8?!Y?AWQ9aaeIj2JNp@sZ0goY(UVFvexMvM`^ zJfnz5&>bD8Qqrm!>4&;d8tISU({v4eA`xPvqoN~{M=cDR>#OUf472OmM{UBlvEL;x zzt#fl`G>!-JUv`KE+5y^8*xlpr?1nzk1lacc3Ixf*6C+`oS)eneRDpgvV677wA{2b zw0yR@+Dh7D+G^V14pxS>f4A~p`?rPeBaV3gdQsRacSEKRlZ%>-mw3+Zs+MW66!<0fJ{VWwD zCo4B2O()kvqM1l9(L?syakxEROVXR-#q+9se?zH28BRG)*^xAnbe@!xq(W&m(USD8 zh$sF^aP*Kwuk=HSw0u$Vq?Af2QZcoJPEI?$gVb5}sGXb>X@AN>0q2Ynz^zy_-Qh#YRRqVJD}D@ALUF`i#D)H@=7d^ZikG(RUJh zIxQY0y`DfQSs|;QWH5a`v7XS-b7UK<*0d}6PIklASL> z($Vqcc(&W=y4i7cmY3&cvR!w2GK<}JXTaU^M4R)b!X1C+-C$?_wfzAO_&Tr4`2F_E zKJ)GVrTg%$qo*U^t9KUwg~`*tcNVOK5kikfZ>4#vvDSHe6l_b!Q+Infun6(DzbYUo zpeUdK%-g>{uPd*iPh;*c2pk<{TjkzYz$b(loDUs``mI!d`M`K^!NA_Y+`z4%1mT7~ z`V6Hs%@lQ(T3cRSUR~3ivKg%vO%r+x8W)@^8lMh8>)*}*I~)>5j|xEH-%0Q&tS=3Z zx?9Dqt9hPN2#ah6flNw?1at92F@$2eG9_(Fig@$_n|WCoVehz1Y^zyE%hF0Ql&{2rtB#K=5Y;UDdX-2~ z>eOw5PVE+n7LgX27VT%hOPF=)2JeQ?hQNkaBm4=zl;82*bnlAKftT!@q?i+*N1*qA z-0OH`b4X`XPR1S%CEe@0gmuVPClT(kUk!kifa*I`H}SPewF!;)%lDB-spGYAx}?3L zK9ydT9|Erj_vA-%lezJ|G`=!l9bUO!y&uf4t@pc!z7yZ7d$5WE)WQ++!^$E-1|38K z@ik-0M$``IaOlCX>4N1Hil^w#5o98b1uFHz^~(R0A1U6@C(%!+S14=Lwu;(R>ILd$ z>{AUw_xXl@M6{xfCJ7p+F==pWa*CxFNvoJpG$u0@E2>w~sH9LnNd_(ySt-$}>6CQI zz1H71O~|o|pqIfa1Xm7K2&?2+4c zdUUlHxA(gH*q<;EyBi)>!_-ys(!R4EZpE~v>gfc0?Tba^()*MHmiJd9U(j#peR=`n zcPGPQk-cQ)k<6C-Krj$Zh_CdH;E_0CzPkzbKT|M%5SQENpMo-@VcR1l01?M zk`j^{l6;bOl4_Dhl2VdhBcJhspN`>$hg}Izq_rtt@(vYFisn}4qUJ8NjhpB<&W13zl*u0Zs@)19>*6-rE+P#^B<2E)TDYTK6@U8&t{8z z&CI4rrj2C$$iz|e!&i$e7Fg3WaHqj!@j%xjjlYTFeWRUYz=^`{Fn zv@^(Aw3*S5?g|n=z~dS4ymx zTgw5lu4}WI9O5HHrux%b~=C_cukTd_D%UJ>a zonPpj=#=P8q+LfRO}-+tIK3otX5f6+A*>xir=40nxjem0JBNOL$dxQxy?E-x6*yB> zxwL$G?yRbvSR>LZyqbTp!s*=IVce12@!(YHYzgGHr(4#}@04_{zV_Ib>Ckk>amsYo zbl!A+IdwV5o8ztWlzs`iHs5aSz;vR&&{^!x_f&F~e`&eq-45-Dbg z>`~k!Ub~9(NcZXY#q;^}hVUlyhWX_AWP9#A|J@BulhID$qcA|USkNJoBBDmq;WHl{ z=|b;eJZ~8(i(?iz7iUSqG6w$?f)Th~H)0p8pZ$+BkO@ z!&a=d47z$cmOX=BwXb{+d=H(+FVm$H0_}M`#XPM%y}D$Q!ls@wAR?<1(G@v7ZQ_S+-yslUnqz)LZ(RIrrP zHOwn$YPB@lyBv&270=3@ za*x{cRf{U@+8mW^`D|rvMe8aywHMV~HH1prnjOXNW)IsZ?&TYmZv~+xdDcctMauHbb81baz3D)DyOMf$Hrc;(vq-aw$ zubX)+){Qw0UN`Qq_Rk_s>0@-Ow5qhLbT75K9PTQHTWNP%+}`(HF?<^UO4P;(b&wj1 z)sEE<)ha8HmWfYX7uG8XE2&lQRqr^rki8+}2-t~{X;P6|16qrjYxh1wq%qy=H zS)N;*+iL7I6`PAK&Xl-j@R`3YiEawF5NPJeSR`&*wa99=T9;liZXUGkX55(+a5lR8 zJPaI@PR|_Y99w4ETK9CnE+7Ax4$bhj?$@|YQKyBWm7pD_jns&u-KL$?P;J`UXlOo~ zNeQIIZ}D2XccotBDraqQmbEmv*jM$m)Vx5b#?fSN?OA`*xqzzn-Nbq)@oe$V@1EN+ zxM|_Oytr!JWZ%%OziGv9`nLL>{CY`fBQ=*|N=ZvyqF3)a{2)!GZ8sR7A&sSV_ZkzIoq5xfH2XDvdMUmHOM|!fHy-b(mujClf9vXN`l_0bs#?%YJ~; zIfa9DW-|-;%kJ$2r&~b3k#sfgkgnlM9d6!o?y;=CFjy_FvDCiMMrzM-?%wlQf6BN( zSmj&QUu9gS=XIJb${FV^$l1%O!?T}l%1P%n=S}Bb=WXY8^u%~Xdmi&l;uYbI^sw;s z@SwX`UwaUr-N`BB<$sdB%3jA=&s^ZHRa>dNq`juSVtvf;r1rG*xbRqg+Sz^=yuszdwhSAJ43oeI*UEco#(IQFY$HpweS`F9{5`D z5$bL4ZRjoO&EH+w-2ndQcQ^UxdR>kpsdaVS&5q)eb8C4z?k|#et3ULQG@$J zBLa}X;lUAt;17|OkhEBC`}$CS%p!I1)!FWC`^Q4@;RDR~4*PN|$5f^&Bq~4D!qsFn zSq+z~R2VBwY9+Ok>!~bNW-00%^=!&$}8qHIPi{40+zAhp##Ml3_ zf?hkBh>!BOf3!<)dUSv5NApE-fg869@!VpuT+gMk=Eq*MeFFc#^}JhOxqxlg)dw4# zo`fxXD0*2duq@o{S9HOwImiFbe^_1*&H!wR!5nss3=F4OKpB9MNt79TniXT<0iNmv z1`cl>L3D6NYHC4nMk4UEB;a{O`6;OdMfq94w8FtK4;VwB)Cn<9gnpUwZ#EHY704X(93s4Bv-z5 zT-<~!w2(puGuvR#hE^y>e \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#include \\\"basic-dyngen-ops-x86_64.hpp\\\"\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#elif defined(__i386__)\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#include \\\"basic-dyngen-ops-x86_32.hpp\\\"\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#else\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#error Unknown platform\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#endif\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\n"; - }; - 0873A66914AB8A40004F12B7 /* Run dyngen */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - "$(BUILT_PRODUCTS_DIR)/dyngen", - "$(OBJECT_FILE_DIR)-$(CURRENT_VARIANT)/i386/ppc-dyngen-ops.o", - "$(OBJECT_FILE_DIR)-$(CURRENT_VARIANT)/x86_64/ppc-dyngen-ops.o", - ); - name = "Run dyngen"; - outputPaths = ( - "$(SRCROOT)/../Unix/ppc-dyngen-ops-x86_32.hpp", - "$(SRCROOT)/../Unix/ppc-dyngen-ops-x86_64.hpp", - "$(SRCROOT)/../Unix/ppc-dyngen-ops.hpp", - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "arch -x86_64 \"${BUILT_PRODUCTS_DIR}/dyngen\" -o \"${SRCROOT}/../Unix/ppc-dyngen-ops-x86_64.hpp\" \"${OBJECT_FILE_DIR}-${CURRENT_VARIANT}/x86_64/ppc-dyngen-ops.o\"\narch -i386 \"${BUILT_PRODUCTS_DIR}/dyngen\" -o \"${SRCROOT}/../Unix/ppc-dyngen-ops-x86_32.hpp\" \"${OBJECT_FILE_DIR}-${CURRENT_VARIANT}/i386/ppc-dyngen-ops.o\"\n\necho \"#if defined(__x86_64__)\" > \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#include \\\"ppc-dyngen-ops-x86_64.hpp\\\"\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#elif defined(__i386__)\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#include \\\"ppc-dyngen-ops-x86_32.hpp\\\"\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#else\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#error Unknown platform\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#endif\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\n"; - }; - 0873A67214AB8AE9004F12B7 /* Run genexec */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - "$(SRCROOT)/../kpx_cpu/src/cpu/ppc/ppc-decode.cpp", - "$(SRCROOT)/../kpx_cpu/src/cpu/ppc/genexec.pl", - ); - name = "Run genexec"; - outputPaths = ( - "$(SRCROOT)/../Unix/ppc-execute-impl.cpp", - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "gcc -E \"-I${SRCROOT}/config\" \"-I${SRCROOT}/../include\" \"-I${SRCROOT}/../kpx_cpu/include\" \"-I${SRCROOT}/../kpx_cpu/src\" \"-I${SRCROOT}/../Unix\" -DUSE_JIT -DGENEXEC \"${SRCROOT}/../kpx_cpu/src/cpu/ppc/ppc-decode.cpp\" | perl \"${SRCROOT}/../kpx_cpu/src/cpu/ppc/genexec.pl\" > \"${SRCROOT}/../Unix/ppc-execute-impl.cpp\"\n"; - }; - 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Preprocess Info.plist"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.4/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; - }; - 08CD43CF14B7BD01009CA2A2 /* Change SDL load path */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Change SDL load path"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "install_name_tool -change @rpath/SDL.framework/Versions/A/SDL @executable_path/../Frameworks/SDL.framework/Versions/A/SDL \"${BUILT_PRODUCTS_DIR}/${EXECUTABLE_PATH}\"\n"; - }; -/* End PBXShellScriptBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 082AC24F14AA59B600071F5E /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 082AC26214AA59F000071F5E /* lowmem.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0846E49714B124DE00574779 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, - 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, - 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, - 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, - 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, - 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, - 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, - 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, - 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, - 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, - 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, - 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, - 08163340158C125800C449F9 /* ppc-dis.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0846E52514B129EE00574779 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0846E52B14B12A0800574779 /* ppc_asm.S in Sources */, - 0846E55314B12B0D00574779 /* paranoia.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0856CCBE14A99E1C000B1711 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, - 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, - 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */, - 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, - 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, - 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, - 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, - 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, - 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */, - 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, - 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, - 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, - 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, - 75CBCF7B1F5DB82B00830063 /* video_sdl2.cpp in Sources */, - 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, - 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, - 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, - 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, - 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, - 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, - 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, - 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */, - 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */, - 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, - 0856D06714A99EF1000B1711 /* bootp.c in Sources */, - 0856D06814A99EF1000B1711 /* cksum.c in Sources */, - 0856D06A14A99EF1000B1711 /* debug.c in Sources */, - 0856D06B14A99EF1000B1711 /* if.c in Sources */, - 0856D06C14A99EF1000B1711 /* ip_icmp.c in Sources */, - 0856D06D14A99EF1000B1711 /* ip_input.c in Sources */, - 0856D06E14A99EF1000B1711 /* ip_output.c in Sources */, - 0856D06F14A99EF1000B1711 /* mbuf.c in Sources */, - 0856D07014A99EF1000B1711 /* misc.c in Sources */, - 0856D07114A99EF1000B1711 /* sbuf.c in Sources */, - 0856D07214A99EF1000B1711 /* slirp.c in Sources */, - 0856D07314A99EF1000B1711 /* socket.c in Sources */, - 0856D07414A99EF1000B1711 /* tcp_input.c in Sources */, - 0856D07514A99EF1000B1711 /* tcp_output.c in Sources */, - 0856D07614A99EF1000B1711 /* tcp_subr.c in Sources */, - 0856D07714A99EF1000B1711 /* tcp_timer.c in Sources */, - 0856D07814A99EF1000B1711 /* tftp.c in Sources */, - 0856D07914A99EF1000B1711 /* udp.c in Sources */, - 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, - 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, - 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, - 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, - 0856D08714A99EF1000B1711 /* bincue_unix.cpp in Sources */, - 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, - 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, - 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */, - 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */, - 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */, - 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */, - 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */, - 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, - 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, - 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, - 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, - 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, - 0856D11814A99EF1000B1711 /* video.cpp in Sources */, - 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, - 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */, - 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */, - 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */, - 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */, - 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */, - A7B1921418C35D4700791D8D /* DiskType.m in Sources */, - 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */, - 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */, - 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A52F14AAF05A004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A54214AAF18E004F12B7 /* cxxdemangle.cpp in Sources */, - 0873A54314AAF18E004F12B7 /* dyngen.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A5C214AB8038004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A5D614AB80CA004F12B7 /* basic-dyngen-ops.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A5C914AB806D004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A5D814AB80E3004F12B7 /* ppc-dyngen-ops.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0885A51E1593E3B6005C4F7B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 08C99DA11593E79F00898E41 /* clip_macosx.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0885A52D1593E47F005C4F7B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 08D93A16159FE174003B04EC /* clip_macosx64.mm in Sources */, - 0879BD5E15A88F7600DC277D /* pict.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXTargetDependency section */ - 082AC26814AA5A4800071F5E /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 082AC25114AA59B600071F5E /* lowmem */; - targetProxy = 082AC26714AA5A4800071F5E /* PBXContainerItemProxy */; - }; - 0846E4A714B1253500574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0846E49914B124DE00574779 /* kpx_cpu */; - targetProxy = 0846E4A614B1253500574779 /* PBXContainerItemProxy */; - }; - 0846E4C614B126B600574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A5CB14AB806D004F12B7 /* ppc-dyngen-ops */; - targetProxy = 0846E4C514B126B600574779 /* PBXContainerItemProxy */; - }; - 0846E4C814B126B800574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A67314AB8AE9004F12B7 /* ppc-execute-impl */; - targetProxy = 0846E4C714B126B800574779 /* PBXContainerItemProxy */; - }; - 0846E52E14B12A2E00574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0846E52714B129EE00574779 /* ppc_asm */; - targetProxy = 0846E52D14B12A2E00574779 /* PBXContainerItemProxy */; - }; - 0873A60314AB83CC004F12B7 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A5C414AB8038004F12B7 /* basic-dyngen-ops */; - targetProxy = 0873A60214AB83CC004F12B7 /* PBXContainerItemProxy */; - }; - 0873A62714AB869A004F12B7 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A53114AAF05A004F12B7 /* dyngen */; - targetProxy = 0873A62614AB869A004F12B7 /* PBXContainerItemProxy */; - }; - 0885A53A1593E4BC005C4F7B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0885A5201593E3B6005C4F7B /* clip */; - targetProxy = 0885A5391593E4BC005C4F7B /* PBXContainerItemProxy */; - }; - 0885A53C1593E4BC005C4F7B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0885A52B1593E47F005C4F7B /* clip64 */; - targetProxy = 0885A53B1593E4BC005C4F7B /* PBXContainerItemProxy */; - }; -/* End PBXTargetDependency section */ - -/* Begin PBXVariantGroup section */ - 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */ = { - isa = PBXVariantGroup; - children = ( - 0856D30814A9A704000B1711 /* English */, - ); - name = VMSettingsWindow.nib; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - 082AC25414AA59B700071F5E /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 082AC25514AA59B700071F5E /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0846E49B14B124DF00574779 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = ""; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = kpx_cpu; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - }; - name = Debug; - }; - 0846E49C14B124DF00574779 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_AUTO_VECTORIZATION = YES; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_SSE3_EXTENSIONS = YES; - GCC_ENABLE_SUPPLEMENTAL_SSE3_INSTRUCTIONS = YES; - GCC_MODEL_TUNING = ""; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.6; - PREBINDING = NO; - PRODUCT_NAME = kpx_cpu; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0846E52914B129EF00574779 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ppc; - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = __ASSEMBLY__; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../Unix, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = ppc_asm; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0846E52A14B129EF00574779 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ppc; - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PREPROCESSOR_DEFINITIONS = __ASSEMBLY__; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../Unix, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = ppc_asm; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0856CCAF14A99DE0000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - }; - name = Debug; - }; - 0856CCB014A99DE0000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = YES; - }; - name = Release; - }; - 0856CCC514A99E1C000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_VERSION = 4.0; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.4; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip", - ); - "OTHER_LDFLAGS[arch=ppc]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lppc_asm", - "-lclip", - ); - "OTHER_LDFLAGS[arch=x86_64]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip64", - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = SheepShaver; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - WARNING_LDFLAGS = ""; - }; - name = Debug; - }; - 0856CCC614A99E1C000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - DEAD_CODE_STRIPPING = NO; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_AUTO_VECTORIZATION = YES; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SSE3_EXTENSIONS = YES; - GCC_ENABLE_SUPPLEMENTAL_SSE3_INSTRUCTIONS = YES; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INFOPLIST_EXPAND_BUILD_SETTINGS = NO; - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.4; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip", - ); - "OTHER_LDFLAGS[arch=ppc]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lppc_asm", - "-lclip", - ); - "OTHER_LDFLAGS[arch=x86_64]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip64", - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = SheepShaver; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A53414AAF05A004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_CFLAGS = "-mdynamic-no-pic"; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = dyngen; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A53514AAF05A004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = dyngen; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A5C614AB8038004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 2; - GCC_PRECOMPILE_PREFIX_HEADER = ""; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - USE_JIT, - HAVE_CONFIG_H, - _REENTRANT, - _THREAD_SAFE, - "_GNU_SOURCE=1", - ); - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "basic-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A5C714AB8038004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "basic-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A5CD14AB806E004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 2; - GCC_PRECOMPILE_PREFIX_HEADER = ""; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "ppc-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A5CE14AB806E004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = YES; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRODUCT_NAME = "ppc-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A67414AB8AE9004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_OPTIMIZATION_LEVEL = 0; - PRODUCT_NAME = "ppc-execute-impl"; - }; - name = Debug; - }; - 0873A67514AB8AE9004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - PRODUCT_NAME = "ppc-execute-impl"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0885A5221593E3B6005C4F7B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0885A5231593E3B6005C4F7B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0885A5321593E47F005C4F7B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1)"; - ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1 = x86_64; - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip64; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - }; - name = Debug; - }; - 0885A5331593E47F005C4F7B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1)"; - ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1 = x86_64; - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip64; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - 082AC25714AA59DB00071F5E /* Build configuration list for PBXNativeTarget "lowmem" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 082AC25414AA59B700071F5E /* Debug */, - 082AC25514AA59B700071F5E /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0846E49B14B124DF00574779 /* Debug */, - 0846E49C14B124DF00574779 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0846E52C14B12A2600574779 /* Build configuration list for PBXNativeTarget "ppc_asm" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0846E52914B129EF00574779 /* Debug */, - 0846E52A14B129EF00574779 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCAF14A99DE0000B1711 /* Debug */, - 0856CCB014A99DE0000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCC514A99E1C000B1711 /* Debug */, - 0856CCC614A99E1C000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A53E14AAF076004F12B7 /* Build configuration list for PBXNativeTarget "dyngen" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A53414AAF05A004F12B7 /* Debug */, - 0873A53514AAF05A004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A5D314AB8099004F12B7 /* Build configuration list for PBXNativeTarget "basic-dyngen-ops" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A5C614AB8038004F12B7 /* Debug */, - 0873A5C714AB8038004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A5D414AB8099004F12B7 /* Build configuration list for PBXNativeTarget "ppc-dyngen-ops" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A5CD14AB806E004F12B7 /* Debug */, - 0873A5CE14AB806E004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A67B14AB8AEC004F12B7 /* Build configuration list for PBXAggregateTarget "ppc-execute-impl" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A67414AB8AE9004F12B7 /* Debug */, - 0873A67514AB8AE9004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0885A5241593E450005C4F7B /* Build configuration list for PBXNativeTarget "clip" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0885A5221593E3B6005C4F7B /* Debug */, - 0885A5231593E3B6005C4F7B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0885A5311593E47F005C4F7B /* Build configuration list for PBXNativeTarget "clip64" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0885A5321593E47F005C4F7B /* Debug */, - 0885A5331593E47F005C4F7B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 0856CCAE14A99DE0000B1711 /* Project object */; -} diff --git a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata deleted file mode 100644 index 919434a62..000000000 --- a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/contents.xcworkspacedata +++ /dev/null @@ -1,7 +0,0 @@ - - - - - diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 4618cdf5e..9a560f6c1 100644 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1447,7 +1447,7 @@ INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.6; - OTHER_CFLAGS = ""; + OTHER_CFLAGS = "-D__MACH__"; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; OTHER_LDFLAGS = ( "-pagezero_size", @@ -1506,7 +1506,7 @@ INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.6; - OTHER_CFLAGS = ""; + OTHER_CFLAGS = "-D__MACH__"; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; OTHER_LDFLAGS = ( "-pagezero_size", diff --git a/SheepShaver/src/Unix/config.h.old b/SheepShaver/src/Unix/config.h.old index 9fcc90d9c..ce1715f80 100644 --- a/SheepShaver/src/Unix/config.h.old +++ b/SheepShaver/src/Unix/config.h.old @@ -9,7 +9,7 @@ /* #undef AC_APPLE_UNIVERSAL_BUILD */ /* Define if using a PowerPC CPU emulator. */ -#define EMULATED_PPC 1 +// #define EMULATED_PPC 1 /* Define to enable dyngen engine */ #define ENABLE_DYNGEN 1 @@ -114,8 +114,8 @@ /* #undef HAVE_FRAMEWORK_SDL */ /* Define if framework SDL2 is available. */ -/* #undef HAVE_FRAMEWORK_SDL2 */ - +#define HAVE_FRAMEWORK_SDL2 */ +#error stophere /* Define to 1 if you have the header file. */ /* #undef HAVE_HISTORY_H */ From c4b1b1937e6175d5c27fca41ca0ce9417935ad96 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 15 Apr 2018 11:17:57 -0500 Subject: [PATCH 204/534] Remove support for all other platforms other than macOS --- BasiliskII/src/AmigaOS/BasiliskII.info | Bin 1519 -> 0 bytes BasiliskII/src/AmigaOS/Makefile | 64 - BasiliskII/src/AmigaOS/asm_support.asm | 1393 ---- BasiliskII/src/AmigaOS/audio_amiga.cpp | 515 -- BasiliskII/src/AmigaOS/clip_amiga.cpp | 166 - BasiliskII/src/AmigaOS/ether_amiga.cpp | 705 -- BasiliskII/src/AmigaOS/extfs_amiga.cpp | 387 - BasiliskII/src/AmigaOS/main_amiga.cpp | 743 -- BasiliskII/src/AmigaOS/prefs_amiga.cpp | 89 - BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp | 1735 ---- BasiliskII/src/AmigaOS/scsi_amiga.cpp | 289 - BasiliskII/src/AmigaOS/serial_amiga.cpp | 861 -- BasiliskII/src/AmigaOS/sys_amiga.cpp | 1122 --- BasiliskII/src/AmigaOS/sysdeps.h | 76 - BasiliskII/src/AmigaOS/timer_amiga.cpp | 157 - BasiliskII/src/AmigaOS/user_strings_amiga.cpp | 85 - BasiliskII/src/AmigaOS/user_strings_amiga.h | 51 - BasiliskII/src/AmigaOS/video_amiga.cpp | 1165 --- BasiliskII/src/AmigaOS/xpram_amiga.cpp | 80 - BasiliskII/src/BeOS/Makefile | 151 - BasiliskII/src/BeOS/SheepDriver/Makefile | 117 - .../src/BeOS/SheepDriver/sheep_driver.c | 476 -- .../src/BeOS/SheepDriver/sheep_driver.h | 33 - BasiliskII/src/BeOS/SheepNet/Makefile | 115 - BasiliskII/src/BeOS/SheepNet/sheep_net.cpp | 294 - BasiliskII/src/BeOS/SheepNet/sheep_net.h | 65 - BasiliskII/src/BeOS/about_window.cpp | 59 - BasiliskII/src/BeOS/about_window.h | 27 - BasiliskII/src/BeOS/audio_beos.cpp | 342 - BasiliskII/src/BeOS/clip_beos.cpp | 128 - BasiliskII/src/BeOS/ether_beos.cpp | 532 -- BasiliskII/src/BeOS/extfs_beos.cpp | 489 -- BasiliskII/src/BeOS/main_beos.cpp | 826 -- BasiliskII/src/BeOS/prefs_beos.cpp | 106 - BasiliskII/src/BeOS/prefs_editor_beos.cpp | 1022 --- BasiliskII/src/BeOS/scsi_beos.cpp | 237 - BasiliskII/src/BeOS/serial_beos.cpp | 873 -- BasiliskII/src/BeOS/sys_beos.cpp | 841 -- BasiliskII/src/BeOS/sysdeps.h | 144 - BasiliskII/src/BeOS/timer_beos.cpp | 166 - BasiliskII/src/BeOS/user_strings_beos.cpp | 69 - BasiliskII/src/BeOS/user_strings_beos.h | 35 - BasiliskII/src/BeOS/video_beos.cpp | 1086 --- BasiliskII/src/BeOS/xpram_beos.cpp | 84 - BasiliskII/src/CrossPlatform/sigsegv.cpp | 2163 +---- BasiliskII/src/CrossPlatform/video_blit.cpp | 2 +- BasiliskII/src/CrossPlatform/video_vosf.h | 11 +- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 136 +- BasiliskII/src/MacOSX/AudioBackEnd.cpp | 307 - BasiliskII/src/MacOSX/AudioBackEnd.h | 86 - BasiliskII/src/MacOSX/AudioDevice.cpp | 97 - BasiliskII/src/MacOSX/AudioDevice.h | 72 - BasiliskII/src/MacOSX/BasiliskII.icns | Bin 44909 -> 0 bytes BasiliskII/src/MacOSX/Controller.h | 59 - BasiliskII/src/MacOSX/Controller.mm | 410 - BasiliskII/src/MacOSX/Credits.html | 11 - BasiliskII/src/MacOSX/Emulator.h | 82 - BasiliskII/src/MacOSX/Emulator.mm | 473 -- BasiliskII/src/MacOSX/EmulatorView.h | 108 - BasiliskII/src/MacOSX/EmulatorView.mm | 550 -- .../MacOSX/English.lproj/InfoPlist.strings | 3 - .../English.lproj/MainMenu.nib/Collapsed.tiff | Bin 870 -> 0 bytes .../English.lproj/MainMenu.nib/Expanded.tiff | Bin 870 -> 0 bytes .../English.lproj/MainMenu.nib/classes.nib | 131 - .../English.lproj/MainMenu.nib/info.nib | 36 - .../English.lproj/MainMenu.nib/objects.nib | Bin 29653 -> 0 bytes .../English.lproj/MainMenu.nib/resetH.tiff | Bin 9798 -> 0 bytes .../English.lproj/MainMenu.nib/resetN.tiff | Bin 9798 -> 0 bytes .../English.lproj/MainMenu.nib/shutdownH.tiff | Bin 9798 -> 0 bytes .../English.lproj/MainMenu.nib/shutdownN.tiff | Bin 9798 -> 0 bytes BasiliskII/src/MacOSX/HowTo.html | 226 - BasiliskII/src/MacOSX/Info.plist | 32 - BasiliskII/src/MacOSX/MacOSX_sound_if.cpp | 86 - BasiliskII/src/MacOSX/MacOSX_sound_if.h | 41 - .../English.lproj/InfoPlist.strings | 4 - .../English.lproj/MainMenu.nib/classes.nib | 118 - .../English.lproj/MainMenu.nib/info.nib | 20 - .../English.lproj/MainMenu.nib/objects.nib | Bin 19336 -> 0 bytes .../Win512x342.nib/Collapsed.tiff | Bin 870 -> 0 bytes .../Win512x342.nib/Expanded.tiff | Bin 870 -> 0 bytes .../English.lproj/Win512x342.nib/classes.nib | 32 - .../English.lproj/Win512x342.nib/info.nib | 20 - .../English.lproj/Win512x342.nib/objects.nib | Bin 3069 -> 0 bytes .../English.lproj/Win512x342.nib/resetH.tiff | Bin 9798 -> 0 bytes .../English.lproj/Win512x342.nib/resetN.tiff | Bin 9798 -> 0 bytes .../Win512x342.nib/shutdownH.tiff | Bin 9798 -> 0 bytes .../Win512x342.nib/shutdownN.tiff | Bin 9798 -> 0 bytes BasiliskII/src/MacOSX/Multiple-Windows/README | 5 - BasiliskII/src/MacOSX/NNThread.h | 91 - BasiliskII/src/MacOSX/NNThread.m | 257 - BasiliskII/src/MacOSX/PrefsEditor.h | 145 - BasiliskII/src/MacOSX/PrefsEditor.mm | 844 -- BasiliskII/src/MacOSX/ToDo.html | 61 - BasiliskII/src/MacOSX/Versions.html | 120 - BasiliskII/src/MacOSX/audio_defs_macosx.h | 80 - BasiliskII/src/MacOSX/audio_macosx.cpp | 271 - BasiliskII/src/MacOSX/autorelease.h | 46 - BasiliskII/src/MacOSX/clip_macosx.cpp | 211 - BasiliskII/src/MacOSX/clip_macosx64.mm | 1286 --- BasiliskII/src/MacOSX/extfs_macosx.cpp | 634 -- BasiliskII/src/MacOSX/macos_util_macosx.h | 178 - BasiliskII/src/MacOSX/main_macosx.h | 29 - BasiliskII/src/MacOSX/main_macosx.mm | 744 -- BasiliskII/src/MacOSX/misc_macosx.h | 38 - BasiliskII/src/MacOSX/misc_macosx.mm | 112 - BasiliskII/src/MacOSX/prefs_macosx.cpp | 150 - BasiliskII/src/MacOSX/utils_macosx.h | 27 - BasiliskII/src/MacOSX/utils_macosx.mm | 30 - BasiliskII/src/MacOSX/video_macosx.h | 75 - BasiliskII/src/MacOSX/video_macosx.mm | 1123 --- BasiliskII/src/SDL/SDLMain.h | 16 - BasiliskII/src/SDL/SDLMain.m | 381 - BasiliskII/src/SDL/audio_sdl.cpp | 13 +- BasiliskII/src/SDL/video_sdl.cpp | 85 +- .../{MacOSX => Unix/Darwin}/sys_darwin.cpp | 0 BasiliskII/src/Unix/FreeBSD/scsi_freebsd.cpp | 743 -- BasiliskII/src/Unix/FreeBSD/scsidump.cpp | 478 -- BasiliskII/src/Unix/Irix/README.networking | 110 - BasiliskII/src/Unix/Irix/audio_irix.cpp | 680 -- BasiliskII/src/Unix/Irix/unaligned.c | 44 - BasiliskII/src/Unix/Linux/NetDriver/Makefile | 53 - BasiliskII/src/Unix/Linux/NetDriver/config.h | 1 - .../src/Unix/Linux/NetDriver/sheep_net.c | 770 -- BasiliskII/src/Unix/Linux/scsi_linux.cpp | 271 - BasiliskII/src/Unix/Makefile.in | 150 +- BasiliskII/src/Unix/Solaris/audio_solaris.cpp | 320 - BasiliskII/src/Unix/Solaris/which_sparc | 121 - BasiliskII/src/Unix/asm_support.s | 180 - BasiliskII/src/Unix/audio_oss_esd.cpp | 558 -- BasiliskII/src/Unix/bincue_unix.cpp | 834 -- BasiliskII/src/Unix/bincue_unix.h | 43 - BasiliskII/src/Unix/clip_unix.cpp | 691 -- BasiliskII/src/Unix/configure.ac | 980 +-- BasiliskII/src/Unix/disk_sparsebundle.cpp | 315 - BasiliskII/src/Unix/disk_unix.h | 3 - BasiliskII/src/Unix/ether_unix.cpp | 1051 --- BasiliskII/src/Unix/ldscripts/freebsd-i386.ld | 175 - BasiliskII/src/Unix/ldscripts/linux-i386.ld | 137 - BasiliskII/src/Unix/ldscripts/linux-ppc.ld | 219 - BasiliskII/src/Unix/ldscripts/linux-x86_64.ld | 171 - BasiliskII/src/Unix/main_unix.cpp | 692 +- BasiliskII/src/Unix/prefs_editor_gtk.cpp | 1828 ----- BasiliskII/src/Unix/prefs_unix.cpp | 13 - BasiliskII/src/Unix/rpc_unix.cpp | 5 - BasiliskII/src/Unix/serial_unix.cpp | 833 -- BasiliskII/src/Unix/sshpty.c | 478 -- BasiliskII/src/Unix/sshpty.h | 26 - BasiliskII/src/Unix/strlcpy.c | 75 - BasiliskII/src/Unix/strlcpy.h | 12 - BasiliskII/src/Unix/sys_unix.cpp | 683 +- BasiliskII/src/Unix/sysdeps.h | 161 +- BasiliskII/src/Unix/timer_unix.cpp | 43 +- BasiliskII/src/Unix/tinyxml2.cpp | 2095 ----- BasiliskII/src/Unix/tinyxml2.h | 1968 ----- BasiliskII/src/Unix/user_strings_unix.cpp | 8 - BasiliskII/src/Unix/user_strings_unix.h | 8 - BasiliskII/src/Unix/vhd_unix.cpp | 160 - BasiliskII/src/Unix/video_x.cpp | 2686 ------- .../src/Windows/BasiliskII.DebugJIT.props | 14 - .../src/Windows/BasiliskII.ReleaseJIT.props | 14 - BasiliskII/src/Windows/BasiliskII.ico | Bin 2998 -> 0 bytes BasiliskII/src/Windows/BasiliskII.props | 14 - BasiliskII/src/Windows/BasiliskII.rc | 2 - BasiliskII/src/Windows/BasiliskII.sln | 140 - BasiliskII/src/Windows/BasiliskII.vcxproj | 685 -- .../src/Windows/BasiliskII.vcxproj.filters | 589 -- BasiliskII/src/Windows/BasiliskIIGUI.ico | Bin 1078 -> 0 bytes BasiliskII/src/Windows/BasiliskIIGUI.rc | 2 - BasiliskII/src/Windows/Makefile.in | 236 - BasiliskII/src/Windows/b2ether/driver/DEBUG.H | 43 - .../src/Windows/b2ether/driver/MAKEFILE | 7 - .../src/Windows/b2ether/driver/OEMSETUP.INF | 430 - BasiliskII/src/Windows/b2ether/driver/SOURCES | 15 - .../src/Windows/b2ether/driver/b2ether.c | 556 -- .../src/Windows/b2ether/driver/b2ether.h | 195 - .../b2ether/driver/b2ether_openclose.c | 303 - .../src/Windows/b2ether/driver/b2ether_read.c | 238 - .../Windows/b2ether/driver/b2ether_write.c | 103 - .../src/Windows/b2ether/inc/b2ether_hl.h | 115 - BasiliskII/src/Windows/b2ether/inc/ntddpack.h | 32 - BasiliskII/src/Windows/b2ether/multiopt.h | 27 - .../src/Windows/b2ether/nt5/B2Win2k.inf | 80 - .../Windows/b2ether/nt5/B2Win7Vista-x64.inf | 80 - BasiliskII/src/Windows/b2ether/nt5/MAKEFILE | 7 - BasiliskII/src/Windows/b2ether/nt5/NTDDPACK.H | 32 - BasiliskII/src/Windows/b2ether/nt5/SOURCES | 17 - BasiliskII/src/Windows/b2ether/nt5/b2ether.c | 755 -- BasiliskII/src/Windows/b2ether/nt5/b2ether.h | 276 - BasiliskII/src/Windows/b2ether/nt5/b2ether.rc | 10 - .../src/Windows/b2ether/nt5/b2ether64.sln | 26 - .../src/Windows/b2ether/nt5/b2ether64.vcxproj | 120 - .../Windows/b2ether/nt5/b2ether_openclose.c | 155 - .../src/Windows/b2ether/nt5/b2ether_read.c | 418 - .../src/Windows/b2ether/nt5/b2ether_write.c | 101 - BasiliskII/src/Windows/b2ether/packet32.cpp | 694 -- BasiliskII/src/Windows/build68k.vcxproj | 156 - .../src/Windows/build68k.vcxproj.filters | 22 - BasiliskII/src/Windows/cd_defs.h | 153 - BasiliskII/src/Windows/cdenable/cache.cpp | 181 - BasiliskII/src/Windows/cdenable/cache.h | 50 - BasiliskII/src/Windows/cdenable/cdenable.h | 60 - BasiliskII/src/Windows/cdenable/eject_nt.cpp | 189 - BasiliskII/src/Windows/cdenable/eject_nt.h | 44 - BasiliskII/src/Windows/cdenable/ntcd.cpp | 344 - BasiliskII/src/Windows/cdenable/ntcd.h | 99 - BasiliskII/src/Windows/clip_windows.cpp | 281 - BasiliskII/src/Windows/config.h | 260 - BasiliskII/src/Windows/configure.ac | 569 -- BasiliskII/src/Windows/ether_windows.cpp | 1609 ---- BasiliskII/src/Windows/ether_windows.h | 10 - BasiliskII/src/Windows/extfs_windows.cpp | 405 - BasiliskII/src/Windows/gencomp.vcxproj | 182 - .../src/Windows/gencomp.vcxproj.filters | 36 - BasiliskII/src/Windows/gencpu.vcxproj | 182 - BasiliskII/src/Windows/gencpu.vcxproj.filters | 36 - BasiliskII/src/Windows/main_windows.cpp | 703 -- BasiliskII/src/Windows/posix_emu.cpp | 1125 --- BasiliskII/src/Windows/posix_emu.h | 122 - BasiliskII/src/Windows/prefs_editor_gtk.cpp | 1769 ---- BasiliskII/src/Windows/prefs_windows.cpp | 137 - BasiliskII/src/Windows/router/arp.cpp | 96 - BasiliskII/src/Windows/router/arp.h | 28 - BasiliskII/src/Windows/router/dump.cpp | 50 - BasiliskII/src/Windows/router/dump.h | 30 - BasiliskII/src/Windows/router/dynsockets.cpp | 185 - BasiliskII/src/Windows/router/dynsockets.h | 59 - BasiliskII/src/Windows/router/ftp.cpp | 193 - BasiliskII/src/Windows/router/ftp.h | 50 - BasiliskII/src/Windows/router/icmp.cpp | 221 - BasiliskII/src/Windows/router/icmp.h | 38 - BasiliskII/src/Windows/router/iphelp.cpp | 236 - BasiliskII/src/Windows/router/iphelp.h | 36 - BasiliskII/src/Windows/router/ipsocket.cpp | 266 - BasiliskII/src/Windows/router/ipsocket.h | 66 - .../src/Windows/router/mib/interfaces.cpp | 69 - .../src/Windows/router/mib/interfaces.h | 35 - .../src/Windows/router/mib/mibaccess.cpp | 308 - BasiliskII/src/Windows/router/mib/mibaccess.h | 83 - BasiliskII/src/Windows/router/router.cpp | 201 - BasiliskII/src/Windows/router/router.h | 54 - BasiliskII/src/Windows/router/router_types.h | 187 - BasiliskII/src/Windows/router/tcp.cpp | 1605 ---- BasiliskII/src/Windows/router/tcp.h | 31 - BasiliskII/src/Windows/router/udp.cpp | 206 - BasiliskII/src/Windows/router/udp.h | 38 - BasiliskII/src/Windows/serial_windows.cpp | 1198 --- BasiliskII/src/Windows/sys_windows.cpp | 994 --- BasiliskII/src/Windows/sysdeps.h | 336 - BasiliskII/src/Windows/timer_windows.cpp | 268 - .../src/Windows/user_strings_windows.cpp | 179 - BasiliskII/src/Windows/user_strings_windows.h | 75 - BasiliskII/src/Windows/util_windows.cpp | 510 -- BasiliskII/src/Windows/util_windows.h | 125 - BasiliskII/src/Windows/xpram_windows.cpp | 99 - BasiliskII/src/emul_op.cpp | 13 +- BasiliskII/src/ether.cpp | 11 +- BasiliskII/src/extfs.cpp | 22 +- BasiliskII/src/include/debug.h | 82 - BasiliskII/src/include/ether.h | 8 +- BasiliskII/src/main.cpp | 25 - BasiliskII/src/native_cpu/cpu_emulation.h | 67 - BasiliskII/src/pict.c | 267 - BasiliskII/src/powerrom_cpu/cpu_emulation.h | 66 - BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp | 1367 ---- BasiliskII/src/prefs_items.cpp | 10 - BasiliskII/src/rom_patches.cpp | 25 +- BasiliskII/src/rsrc_patches.cpp | 3 - BasiliskII/src/slirp/COPYRIGHT | 61 - BasiliskII/src/slirp/VERSION | 1 - BasiliskII/src/slirp/bootp.c | 242 - BasiliskII/src/slirp/bootp.h | 121 - BasiliskII/src/slirp/cksum.c | 137 - BasiliskII/src/slirp/ctl.h | 7 - BasiliskII/src/slirp/debug.c | 379 - BasiliskII/src/slirp/debug.h | 50 - BasiliskII/src/slirp/icmp_var.h | 65 - BasiliskII/src/slirp/if.c | 323 - BasiliskII/src/slirp/if.h | 50 - BasiliskII/src/slirp/ip.h | 333 - BasiliskII/src/slirp/ip_icmp.c | 371 - BasiliskII/src/slirp/ip_icmp.h | 168 - BasiliskII/src/slirp/ip_input.c | 693 -- BasiliskII/src/slirp/ip_output.c | 202 - BasiliskII/src/slirp/libslirp.h | 41 - BasiliskII/src/slirp/main.h | 54 - BasiliskII/src/slirp/mbuf.c | 230 - BasiliskII/src/slirp/mbuf.h | 143 - BasiliskII/src/slirp/misc.c | 863 -- BasiliskII/src/slirp/misc.h | 87 - BasiliskII/src/slirp/sbuf.c | 183 - BasiliskII/src/slirp/sbuf.h | 33 - BasiliskII/src/slirp/slirp.c | 676 -- BasiliskII/src/slirp/slirp.h | 358 - BasiliskII/src/slirp/slirp_config.h | 127 - BasiliskII/src/slirp/socket.c | 733 -- BasiliskII/src/slirp/socket.h | 104 - BasiliskII/src/slirp/tcp.h | 181 - BasiliskII/src/slirp/tcp_input.c | 1724 ---- BasiliskII/src/slirp/tcp_output.c | 597 -- BasiliskII/src/slirp/tcp_subr.c | 1296 --- BasiliskII/src/slirp/tcp_timer.c | 322 - BasiliskII/src/slirp/tcp_timer.h | 138 - BasiliskII/src/slirp/tcp_var.h | 248 - BasiliskII/src/slirp/tcpip.h | 70 - BasiliskII/src/slirp/tftp.c | 334 - BasiliskII/src/slirp/tftp.h | 40 - BasiliskII/src/slirp/udp.c | 672 -- BasiliskII/src/slirp/udp.h | 114 - BasiliskII/src/sony.cpp | 4 - BasiliskII/src/uae_cpu/basilisk_glue.cpp | 53 +- BasiliskII/src/uae_cpu/build68k.c | 8 - .../src/uae_cpu/compiler/codegen_x86.cpp | 4758 ----------- BasiliskII/src/uae_cpu/compiler/codegen_x86.h | 2565 ------ BasiliskII/src/uae_cpu/compiler/compemu.h | 609 -- .../src/uae_cpu/compiler/compemu_fpp.cpp | 1637 ---- .../src/uae_cpu/compiler/compemu_support.cpp | 7129 ----------------- BasiliskII/src/uae_cpu/compiler/flags_x86.h | 47 - BasiliskII/src/uae_cpu/compiler/gencomp.c | 3072 ------- .../src/uae_cpu/compiler/test_codegen_x86.cpp | 2254 ------ BasiliskII/src/uae_cpu/cpu_emulation.h | 15 - BasiliskII/src/uae_cpu/fpu/flags.h | 6 - BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 2152 ----- BasiliskII/src/uae_cpu/fpu/fpu_ieee.h | 149 - BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp | 6126 -------------- BasiliskII/src/uae_cpu/fpu/fpu_x86.h | 361 - BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h | 72 - BasiliskII/src/uae_cpu/fpu/mathlib.h | 6 - BasiliskII/src/uae_cpu/gencpu.c | 20 +- BasiliskII/src/uae_cpu/memory.cpp | 585 -- BasiliskII/src/uae_cpu/memory.h | 133 +- BasiliskII/src/uae_cpu/newcpu.cpp | 63 +- BasiliskII/src/uae_cpu/newcpu.h | 18 +- BasiliskII/src/uae_cpu/spcflags.h | 8 +- BasiliskII/src/user_strings.cpp | 4 - 334 files changed, 254 insertions(+), 120787 deletions(-) delete mode 100644 BasiliskII/src/AmigaOS/BasiliskII.info delete mode 100644 BasiliskII/src/AmigaOS/Makefile delete mode 100644 BasiliskII/src/AmigaOS/asm_support.asm delete mode 100644 BasiliskII/src/AmigaOS/audio_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/clip_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/ether_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/extfs_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/main_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/prefs_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/scsi_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/serial_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/sys_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/sysdeps.h delete mode 100644 BasiliskII/src/AmigaOS/timer_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/user_strings_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/user_strings_amiga.h delete mode 100644 BasiliskII/src/AmigaOS/video_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/xpram_amiga.cpp delete mode 100644 BasiliskII/src/BeOS/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepDriver/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepDriver/sheep_driver.c delete mode 100644 BasiliskII/src/BeOS/SheepDriver/sheep_driver.h delete mode 100644 BasiliskII/src/BeOS/SheepNet/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepNet/sheep_net.cpp delete mode 100644 BasiliskII/src/BeOS/SheepNet/sheep_net.h delete mode 100644 BasiliskII/src/BeOS/about_window.cpp delete mode 100644 BasiliskII/src/BeOS/about_window.h delete mode 100644 BasiliskII/src/BeOS/audio_beos.cpp delete mode 100644 BasiliskII/src/BeOS/clip_beos.cpp delete mode 100644 BasiliskII/src/BeOS/ether_beos.cpp delete mode 100644 BasiliskII/src/BeOS/extfs_beos.cpp delete mode 100644 BasiliskII/src/BeOS/main_beos.cpp delete mode 100644 BasiliskII/src/BeOS/prefs_beos.cpp delete mode 100644 BasiliskII/src/BeOS/prefs_editor_beos.cpp delete mode 100644 BasiliskII/src/BeOS/scsi_beos.cpp delete mode 100644 BasiliskII/src/BeOS/serial_beos.cpp delete mode 100644 BasiliskII/src/BeOS/sys_beos.cpp delete mode 100644 BasiliskII/src/BeOS/sysdeps.h delete mode 100644 BasiliskII/src/BeOS/timer_beos.cpp delete mode 100644 BasiliskII/src/BeOS/user_strings_beos.cpp delete mode 100644 BasiliskII/src/BeOS/user_strings_beos.h delete mode 100644 BasiliskII/src/BeOS/video_beos.cpp delete mode 100644 BasiliskII/src/BeOS/xpram_beos.cpp delete mode 100644 BasiliskII/src/MacOSX/AudioBackEnd.cpp delete mode 100644 BasiliskII/src/MacOSX/AudioBackEnd.h delete mode 100644 BasiliskII/src/MacOSX/AudioDevice.cpp delete mode 100644 BasiliskII/src/MacOSX/AudioDevice.h delete mode 100644 BasiliskII/src/MacOSX/BasiliskII.icns delete mode 100644 BasiliskII/src/MacOSX/Controller.h delete mode 100644 BasiliskII/src/MacOSX/Controller.mm delete mode 100644 BasiliskII/src/MacOSX/Credits.html delete mode 100644 BasiliskII/src/MacOSX/Emulator.h delete mode 100644 BasiliskII/src/MacOSX/Emulator.mm delete mode 100644 BasiliskII/src/MacOSX/EmulatorView.h delete mode 100644 BasiliskII/src/MacOSX/EmulatorView.mm delete mode 100755 BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Collapsed.tiff delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Expanded.tiff delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/classes.nib delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/info.nib delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/objects.nib delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/resetH.tiff delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/resetN.tiff delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/shutdownH.tiff delete mode 100644 BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/shutdownN.tiff delete mode 100644 BasiliskII/src/MacOSX/HowTo.html delete mode 100644 BasiliskII/src/MacOSX/Info.plist delete mode 100644 BasiliskII/src/MacOSX/MacOSX_sound_if.cpp delete mode 100644 BasiliskII/src/MacOSX/MacOSX_sound_if.h delete mode 100755 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/InfoPlist.strings delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/classes.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/info.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/objects.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Collapsed.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Expanded.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/classes.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/info.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/objects.nib delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/resetH.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/resetN.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/shutdownH.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/shutdownN.tiff delete mode 100644 BasiliskII/src/MacOSX/Multiple-Windows/README delete mode 100644 BasiliskII/src/MacOSX/NNThread.h delete mode 100644 BasiliskII/src/MacOSX/NNThread.m delete mode 100644 BasiliskII/src/MacOSX/PrefsEditor.h delete mode 100644 BasiliskII/src/MacOSX/PrefsEditor.mm delete mode 100644 BasiliskII/src/MacOSX/ToDo.html delete mode 100644 BasiliskII/src/MacOSX/Versions.html delete mode 100644 BasiliskII/src/MacOSX/audio_defs_macosx.h delete mode 100644 BasiliskII/src/MacOSX/audio_macosx.cpp delete mode 100644 BasiliskII/src/MacOSX/autorelease.h delete mode 100644 BasiliskII/src/MacOSX/clip_macosx.cpp delete mode 100644 BasiliskII/src/MacOSX/clip_macosx64.mm delete mode 100644 BasiliskII/src/MacOSX/extfs_macosx.cpp delete mode 100644 BasiliskII/src/MacOSX/macos_util_macosx.h delete mode 100644 BasiliskII/src/MacOSX/main_macosx.h delete mode 100644 BasiliskII/src/MacOSX/main_macosx.mm delete mode 100644 BasiliskII/src/MacOSX/misc_macosx.h delete mode 100644 BasiliskII/src/MacOSX/misc_macosx.mm delete mode 100644 BasiliskII/src/MacOSX/prefs_macosx.cpp delete mode 100644 BasiliskII/src/MacOSX/utils_macosx.h delete mode 100644 BasiliskII/src/MacOSX/utils_macosx.mm delete mode 100644 BasiliskII/src/MacOSX/video_macosx.h delete mode 100644 BasiliskII/src/MacOSX/video_macosx.mm delete mode 100644 BasiliskII/src/SDL/SDLMain.h delete mode 100644 BasiliskII/src/SDL/SDLMain.m rename BasiliskII/src/{MacOSX => Unix/Darwin}/sys_darwin.cpp (100%) delete mode 100644 BasiliskII/src/Unix/FreeBSD/scsi_freebsd.cpp delete mode 100644 BasiliskII/src/Unix/FreeBSD/scsidump.cpp delete mode 100644 BasiliskII/src/Unix/Irix/README.networking delete mode 100644 BasiliskII/src/Unix/Irix/audio_irix.cpp delete mode 100644 BasiliskII/src/Unix/Irix/unaligned.c delete mode 100644 BasiliskII/src/Unix/Linux/NetDriver/Makefile delete mode 120000 BasiliskII/src/Unix/Linux/NetDriver/config.h delete mode 100644 BasiliskII/src/Unix/Linux/NetDriver/sheep_net.c delete mode 100644 BasiliskII/src/Unix/Linux/scsi_linux.cpp delete mode 100644 BasiliskII/src/Unix/Solaris/audio_solaris.cpp delete mode 100755 BasiliskII/src/Unix/Solaris/which_sparc delete mode 100644 BasiliskII/src/Unix/asm_support.s delete mode 100644 BasiliskII/src/Unix/audio_oss_esd.cpp delete mode 100644 BasiliskII/src/Unix/bincue_unix.cpp delete mode 100644 BasiliskII/src/Unix/bincue_unix.h delete mode 100644 BasiliskII/src/Unix/clip_unix.cpp delete mode 100644 BasiliskII/src/Unix/disk_sparsebundle.cpp delete mode 100644 BasiliskII/src/Unix/ether_unix.cpp delete mode 100644 BasiliskII/src/Unix/ldscripts/freebsd-i386.ld delete mode 100644 BasiliskII/src/Unix/ldscripts/linux-i386.ld delete mode 100644 BasiliskII/src/Unix/ldscripts/linux-ppc.ld delete mode 100644 BasiliskII/src/Unix/ldscripts/linux-x86_64.ld delete mode 100644 BasiliskII/src/Unix/prefs_editor_gtk.cpp delete mode 100644 BasiliskII/src/Unix/serial_unix.cpp delete mode 100644 BasiliskII/src/Unix/sshpty.c delete mode 100644 BasiliskII/src/Unix/sshpty.h delete mode 100644 BasiliskII/src/Unix/strlcpy.c delete mode 100644 BasiliskII/src/Unix/strlcpy.h delete mode 100755 BasiliskII/src/Unix/tinyxml2.cpp delete mode 100755 BasiliskII/src/Unix/tinyxml2.h delete mode 100644 BasiliskII/src/Unix/vhd_unix.cpp delete mode 100644 BasiliskII/src/Unix/video_x.cpp delete mode 100644 BasiliskII/src/Windows/BasiliskII.DebugJIT.props delete mode 100644 BasiliskII/src/Windows/BasiliskII.ReleaseJIT.props delete mode 100755 BasiliskII/src/Windows/BasiliskII.ico delete mode 100644 BasiliskII/src/Windows/BasiliskII.props delete mode 100644 BasiliskII/src/Windows/BasiliskII.rc delete mode 100644 BasiliskII/src/Windows/BasiliskII.sln delete mode 100644 BasiliskII/src/Windows/BasiliskII.vcxproj delete mode 100644 BasiliskII/src/Windows/BasiliskII.vcxproj.filters delete mode 100755 BasiliskII/src/Windows/BasiliskIIGUI.ico delete mode 100644 BasiliskII/src/Windows/BasiliskIIGUI.rc delete mode 100755 BasiliskII/src/Windows/Makefile.in delete mode 100755 BasiliskII/src/Windows/b2ether/driver/DEBUG.H delete mode 100755 BasiliskII/src/Windows/b2ether/driver/MAKEFILE delete mode 100755 BasiliskII/src/Windows/b2ether/driver/OEMSETUP.INF delete mode 100755 BasiliskII/src/Windows/b2ether/driver/SOURCES delete mode 100755 BasiliskII/src/Windows/b2ether/driver/b2ether.c delete mode 100755 BasiliskII/src/Windows/b2ether/driver/b2ether.h delete mode 100755 BasiliskII/src/Windows/b2ether/driver/b2ether_openclose.c delete mode 100755 BasiliskII/src/Windows/b2ether/driver/b2ether_read.c delete mode 100755 BasiliskII/src/Windows/b2ether/driver/b2ether_write.c delete mode 100755 BasiliskII/src/Windows/b2ether/inc/b2ether_hl.h delete mode 100755 BasiliskII/src/Windows/b2ether/inc/ntddpack.h delete mode 100755 BasiliskII/src/Windows/b2ether/multiopt.h delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/B2Win2k.inf delete mode 100755 BasiliskII/src/Windows/b2ether/nt5/B2Win7Vista-x64.inf delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/MAKEFILE delete mode 100755 BasiliskII/src/Windows/b2ether/nt5/NTDDPACK.H delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/SOURCES delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether.c delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether.h delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether.rc delete mode 100755 BasiliskII/src/Windows/b2ether/nt5/b2ether64.sln delete mode 100755 BasiliskII/src/Windows/b2ether/nt5/b2ether64.vcxproj delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether_openclose.c delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether_read.c delete mode 100644 BasiliskII/src/Windows/b2ether/nt5/b2ether_write.c delete mode 100755 BasiliskII/src/Windows/b2ether/packet32.cpp delete mode 100644 BasiliskII/src/Windows/build68k.vcxproj delete mode 100644 BasiliskII/src/Windows/build68k.vcxproj.filters delete mode 100755 BasiliskII/src/Windows/cd_defs.h delete mode 100755 BasiliskII/src/Windows/cdenable/cache.cpp delete mode 100755 BasiliskII/src/Windows/cdenable/cache.h delete mode 100755 BasiliskII/src/Windows/cdenable/cdenable.h delete mode 100755 BasiliskII/src/Windows/cdenable/eject_nt.cpp delete mode 100755 BasiliskII/src/Windows/cdenable/eject_nt.h delete mode 100755 BasiliskII/src/Windows/cdenable/ntcd.cpp delete mode 100755 BasiliskII/src/Windows/cdenable/ntcd.h delete mode 100755 BasiliskII/src/Windows/clip_windows.cpp delete mode 100644 BasiliskII/src/Windows/config.h delete mode 100755 BasiliskII/src/Windows/configure.ac delete mode 100755 BasiliskII/src/Windows/ether_windows.cpp delete mode 100755 BasiliskII/src/Windows/ether_windows.h delete mode 100755 BasiliskII/src/Windows/extfs_windows.cpp delete mode 100644 BasiliskII/src/Windows/gencomp.vcxproj delete mode 100644 BasiliskII/src/Windows/gencomp.vcxproj.filters delete mode 100644 BasiliskII/src/Windows/gencpu.vcxproj delete mode 100644 BasiliskII/src/Windows/gencpu.vcxproj.filters delete mode 100755 BasiliskII/src/Windows/main_windows.cpp delete mode 100755 BasiliskII/src/Windows/posix_emu.cpp delete mode 100755 BasiliskII/src/Windows/posix_emu.h delete mode 100644 BasiliskII/src/Windows/prefs_editor_gtk.cpp delete mode 100755 BasiliskII/src/Windows/prefs_windows.cpp delete mode 100755 BasiliskII/src/Windows/router/arp.cpp delete mode 100755 BasiliskII/src/Windows/router/arp.h delete mode 100755 BasiliskII/src/Windows/router/dump.cpp delete mode 100755 BasiliskII/src/Windows/router/dump.h delete mode 100755 BasiliskII/src/Windows/router/dynsockets.cpp delete mode 100755 BasiliskII/src/Windows/router/dynsockets.h delete mode 100755 BasiliskII/src/Windows/router/ftp.cpp delete mode 100755 BasiliskII/src/Windows/router/ftp.h delete mode 100755 BasiliskII/src/Windows/router/icmp.cpp delete mode 100755 BasiliskII/src/Windows/router/icmp.h delete mode 100755 BasiliskII/src/Windows/router/iphelp.cpp delete mode 100755 BasiliskII/src/Windows/router/iphelp.h delete mode 100755 BasiliskII/src/Windows/router/ipsocket.cpp delete mode 100755 BasiliskII/src/Windows/router/ipsocket.h delete mode 100755 BasiliskII/src/Windows/router/mib/interfaces.cpp delete mode 100755 BasiliskII/src/Windows/router/mib/interfaces.h delete mode 100755 BasiliskII/src/Windows/router/mib/mibaccess.cpp delete mode 100755 BasiliskII/src/Windows/router/mib/mibaccess.h delete mode 100755 BasiliskII/src/Windows/router/router.cpp delete mode 100755 BasiliskII/src/Windows/router/router.h delete mode 100755 BasiliskII/src/Windows/router/router_types.h delete mode 100755 BasiliskII/src/Windows/router/tcp.cpp delete mode 100755 BasiliskII/src/Windows/router/tcp.h delete mode 100755 BasiliskII/src/Windows/router/udp.cpp delete mode 100755 BasiliskII/src/Windows/router/udp.h delete mode 100755 BasiliskII/src/Windows/serial_windows.cpp delete mode 100755 BasiliskII/src/Windows/sys_windows.cpp delete mode 100755 BasiliskII/src/Windows/sysdeps.h delete mode 100755 BasiliskII/src/Windows/timer_windows.cpp delete mode 100755 BasiliskII/src/Windows/user_strings_windows.cpp delete mode 100755 BasiliskII/src/Windows/user_strings_windows.h delete mode 100755 BasiliskII/src/Windows/util_windows.cpp delete mode 100755 BasiliskII/src/Windows/util_windows.h delete mode 100755 BasiliskII/src/Windows/xpram_windows.cpp delete mode 100644 BasiliskII/src/native_cpu/cpu_emulation.h delete mode 100644 BasiliskII/src/pict.c delete mode 100644 BasiliskII/src/powerrom_cpu/cpu_emulation.h delete mode 100644 BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp delete mode 100644 BasiliskII/src/slirp/COPYRIGHT delete mode 100644 BasiliskII/src/slirp/VERSION delete mode 100644 BasiliskII/src/slirp/bootp.c delete mode 100644 BasiliskII/src/slirp/bootp.h delete mode 100644 BasiliskII/src/slirp/cksum.c delete mode 100644 BasiliskII/src/slirp/ctl.h delete mode 100644 BasiliskII/src/slirp/debug.c delete mode 100644 BasiliskII/src/slirp/debug.h delete mode 100644 BasiliskII/src/slirp/icmp_var.h delete mode 100644 BasiliskII/src/slirp/if.c delete mode 100644 BasiliskII/src/slirp/if.h delete mode 100644 BasiliskII/src/slirp/ip.h delete mode 100644 BasiliskII/src/slirp/ip_icmp.c delete mode 100644 BasiliskII/src/slirp/ip_icmp.h delete mode 100644 BasiliskII/src/slirp/ip_input.c delete mode 100644 BasiliskII/src/slirp/ip_output.c delete mode 100644 BasiliskII/src/slirp/libslirp.h delete mode 100644 BasiliskII/src/slirp/main.h delete mode 100644 BasiliskII/src/slirp/mbuf.c delete mode 100644 BasiliskII/src/slirp/mbuf.h delete mode 100644 BasiliskII/src/slirp/misc.c delete mode 100644 BasiliskII/src/slirp/misc.h delete mode 100644 BasiliskII/src/slirp/sbuf.c delete mode 100644 BasiliskII/src/slirp/sbuf.h delete mode 100644 BasiliskII/src/slirp/slirp.c delete mode 100644 BasiliskII/src/slirp/slirp.h delete mode 100644 BasiliskII/src/slirp/slirp_config.h delete mode 100644 BasiliskII/src/slirp/socket.c delete mode 100644 BasiliskII/src/slirp/socket.h delete mode 100644 BasiliskII/src/slirp/tcp.h delete mode 100644 BasiliskII/src/slirp/tcp_input.c delete mode 100644 BasiliskII/src/slirp/tcp_output.c delete mode 100644 BasiliskII/src/slirp/tcp_subr.c delete mode 100644 BasiliskII/src/slirp/tcp_timer.c delete mode 100644 BasiliskII/src/slirp/tcp_timer.h delete mode 100644 BasiliskII/src/slirp/tcp_var.h delete mode 100644 BasiliskII/src/slirp/tcpip.h delete mode 100644 BasiliskII/src/slirp/tftp.c delete mode 100644 BasiliskII/src/slirp/tftp.h delete mode 100644 BasiliskII/src/slirp/udp.c delete mode 100644 BasiliskII/src/slirp/udp.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_support.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/flags_x86.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/gencomp.c delete mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h delete mode 100644 BasiliskII/src/uae_cpu/memory.cpp diff --git a/BasiliskII/src/AmigaOS/BasiliskII.info b/BasiliskII/src/AmigaOS/BasiliskII.info deleted file mode 100644 index b590d7da63a3715fbbdad593d3b0af11ed0a8366..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1519 zcmeH_zfQw25XL{}kKCa`WB@Xe873CGwhKZ631z?&1APQWwtDLm@DT76jIhHV39)xU zVyJrDogFoFLZV|nDf#)kJI9xkKXzdty1^|*I6#gR#-6;sXms;s(##e|u*K<{=bSui z`LG;e9|I)C9j#Ny;(FMn^-y0u2aW@)aie}l-$FyQ5~dV9bD`e3T9^Pkkw(b>lL)!H zOgTlVEbpgEJNHUyMe0OD%t*9^f=_yPqPojE`pI61M@}MvT;kWig9(_VbOmslN~ZyASz=ySkK5WItaO2t)t? diff --git a/BasiliskII/src/AmigaOS/Makefile b/BasiliskII/src/AmigaOS/Makefile deleted file mode 100644 index 2ccaeec03..000000000 --- a/BasiliskII/src/AmigaOS/Makefile +++ /dev/null @@ -1,64 +0,0 @@ -# AmigaOS makefile for Basilisk II (GeekGadgets tool chain) - -## System specific configuration -CC = gcc -CXX = c++ -CXXFLAGS = -g -O1 -noixemul -m68020 -msmall-code -Wno-multichar -CPPFLAGS = -I../include -I../native_cpu -I. -DEFS = -LDFLAGS = -noixemul -LIBS = /gg/lib/libnix/swapstack.o -AS = PhxAss -ASFLAGS = OPT ! INCPATH GG:os-include FPU=1 - -## Files -SRCS = ../main.cpp main_amiga.cpp ../prefs.cpp ../prefs_items.cpp \ - prefs_amiga.cpp prefs_editor_amiga.cpp sys_amiga.cpp ../rom_patches.cpp \ - ../slot_rom.cpp ../rsrc_patches.cpp ../emul_op.cpp \ - ../macos_util.cpp ../xpram.cpp xpram_amiga.cpp ../timer.cpp \ - timer_amiga.cpp clip_amiga.cpp ../adb.cpp ../serial.cpp \ - serial_amiga.cpp ../ether.cpp ether_amiga.cpp ../sony.cpp ../disk.cpp \ - ../cdrom.cpp ../scsi.cpp scsi_amiga.cpp ../video.cpp video_amiga.cpp \ - ../audio.cpp audio_amiga.cpp ../extfs.cpp extfs_amiga.cpp \ - ../user_strings.cpp user_strings_amiga.cpp asm_support.asm -APP = BasiliskII - -## Rules -.PHONY: clean distclean -.SUFFIXES: -.SUFFIXES: .c .cpp .asm .o .h - -all: $(APP) - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS = $(SRCS_LIST_TO_OBJS) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -$(APP): $(OBJ_DIR) $(OBJS) - $(CXX) -o $(APP) $(LDFLAGS) $(LIBS) $(OBJS) - -clean: - rm -f $(APP) $(OBJ_DIR)/* *~ *.bak obj.0000.* - -distclean: clean - rm -rf $(OBJ_DIR) - -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.asm - $(AS) $(ASFLAGS) $< TO $(OBJ_DIR)/$*.obj - hunk2aout $(OBJ_DIR)/$*.obj >/dev/null - mv obj.0000.* $@ - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/BasiliskII/src/AmigaOS/asm_support.asm b/BasiliskII/src/AmigaOS/asm_support.asm deleted file mode 100644 index d2a81b076..000000000 --- a/BasiliskII/src/AmigaOS/asm_support.asm +++ /dev/null @@ -1,1393 +0,0 @@ -* -* asm_support.asm - AmigaOS utility functions in assembly language -* -* Basilisk II (C) 1997-2001 Christian Bauer -* -* 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 -* - -DEBUG_DETAIL SET 1 - - INCLUDE "exec/types.i" - INCLUDE "exec/macros.i" - INCLUDE "exec/memory.i" - INCLUDE "exec/tasks.i" - INCLUDE "dos/dos.i" - INCLUDE "devices/timer.i" - -; INCLUDE "asmsupp.i" - - XDEF _AtomicAnd - XDEF _AtomicOr - XDEF _MoveVBR - XDEF _DisableSuperBypass - XDEF _Execute68k - XDEF _Execute68kTrap - XDEF _TrapHandlerAsm - XDEF _ExceptionHandlerAsm - XDEF _AsmTriggerNMI - - XREF _OldTrapHandler - XREF _OldExceptionHandler - XREF _IllInstrHandler - XREF _PrivViolHandler - XREF _EmulatedSR - XREF _IRQSigMask - XREF _InterruptFlags - XREF _MainTask - XREF _SysBase - XREF _quit_emulator - -INFO_LEVEL equ 0 - - SECTION text,CODE - - MACHINE 68020 - - IFGE INFO_LEVEL -subSysName: dc.b '+',0 - ENDIF - -* -* Atomic bit operations (don't trust the compiler) -* - -_AtomicAnd move.l 4(sp),a0 - move.l 8(sp),d0 - and.l d0,(a0) - rts - -_AtomicOr move.l 4(sp),a0 - move.l 8(sp),d0 - or.l d0,(a0) - rts - -* -* Move VBR away from 0 if neccessary -* - -_MoveVBR movem.l d0-d1/a0-a1/a5-a6,-(sp) - move.l _SysBase,a6 - - lea getvbr,a5 ;VBR at 0? - JSRLIB Supervisor - tst.l d0 - bne.s 1$ - - move.l #$400,d0 ;Yes, allocate memory for new table - move.l #MEMF_PUBLIC,d1 - JSRLIB AllocMem - tst.l d0 - beq.s 1$ - - JSRLIB Disable - - move.l d0,a5 ;Copy old table - move.l d0,a1 - sub.l a0,a0 - move.l #$400,d0 - JSRLIB CopyMem - JSRLIB CacheClearU - - move.l a5,d0 ;Set VBR - lea setvbr,a5 - JSRLIB Supervisor - - JSRLIB Enable - -1$ movem.l (sp)+,d0-d1/a0-a1/a5-a6 - rts - -getvbr movec vbr,d0 - rte - -setvbr movec d0,vbr - rte - -* -* Disable 68060 Super Bypass mode -* - -_DisableSuperBypass - movem.l d0-d1/a0-a1/a5-a6,-(sp) - move.l _SysBase,a6 - - lea dissb,a5 - JSRLIB Supervisor - - movem.l (sp)+,d0-d1/a0-a1/a5-a6 - rts - - MACHINE 68060 - -dissb movec pcr,d0 - bset #5,d0 - movec d0,pcr - rte - - MACHINE 68020 - -* -* Execute 68k subroutine (must be ended with rts) -* r->a[7] and r->sr are unused! -* - -; void Execute68k(uint32 addr, M68kRegisters *r); -_Execute68k - move.l 4(sp),d0 ;Get arguments - move.l 8(sp),a0 - - movem.l d2-d7/a2-a6,-(sp) ;Save registers - - move.l a0,-(sp) ;Push pointer to M68kRegisters on stack - pea 1$ ;Push return address on stack - move.l d0,-(sp) ;Push pointer to 68k routine on stack - movem.l (a0),d0-d7/a0-a6 ;Load registers from M68kRegisters - - rts ;Jump into 68k routine - -1$ move.l a6,-(sp) ;Save a6 - move.l 4(sp),a6 ;Get pointer to M68kRegisters - movem.l d0-d7/a0-a5,(a6) ;Save d0-d7/a0-a5 to M68kRegisters - move.l (sp)+,56(a6) ;Save a6 to M68kRegisters - addq.l #4,sp ;Remove pointer from stack - - movem.l (sp)+,d2-d7/a2-a6 ;Restore registers - rts - -* -* Execute MacOS 68k trap -* r->a[7] and r->sr are unused! -* - -; void Execute68kTrap(uint16 trap, M68kRegisters *r); -_Execute68kTrap - move.l 4(sp),d0 ;Get arguments - move.l 8(sp),a0 - - movem.l d2-d7/a2-a6,-(sp) ;Save registers - - move.l a0,-(sp) ;Push pointer to M68kRegisters on stack - move.w d0,-(sp) ;Push trap word on stack - subq.l #8,sp ;Create fake A-Line exception frame - movem.l (a0),d0-d7/a0-a6 ;Load registers from M68kRegisters - - move.l a2,-(sp) ;Save a2 and d2 - move.l d2,-(sp) - lea 1$,a2 ;a2 points to return address - move.w 16(sp),d2 ;Load trap word into d2 - - jmp ([$28.w],10) ;Jump into MacOS A-Line handler - -1$ move.l a6,-(sp) ;Save a6 - move.l 6(sp),a6 ;Get pointer to M68kRegisters - movem.l d0-d7/a0-a5,(a6) ;Save d0-d7/a0-a5 to M68kRegisters - move.l (sp)+,56(a6) ;Save a6 to M68kRegisters - addq.l #6,sp ;Remove pointer and trap word from stack - - movem.l (sp)+,d2-d7/a2-a6 ;Restore registers - rts - -* -* Exception handler of main task (for interrupts) -* - -_ExceptionHandlerAsm - move.l d0,-(sp) ;Save d0 - - and.l #SIGBREAKF_CTRL_C,d0 ;CTRL-C? - bne.s 2$ - - move.w _EmulatedSR,d0 ;Interrupts enabled in emulated SR? - and.w #$0700,d0 - bne 1$ - move.w #$0064,-(sp) ;Yes, fake interrupt stack frame - pea 1$ - move.w _EmulatedSR,d0 - move.w d0,-(sp) - or.w #$2100,d0 ;Set interrupt level in SR, enter (virtual) supervisor mode - move.w d0,_EmulatedSR - move.l $64.w,-(sp) ;Jump to MacOS interrupt handler - rts - -1$ move.l (sp)+,d0 ;Restore d0 - rts - -2$ JSRLIB Forbid ;Waiting for Dos signal? - sub.l a1,a1 - JSRLIB FindTask - move.l d0,a0 - move.l TC_SIGWAIT(a0),d0 - move.l TC_SIGRECVD(a0),d1 - JSRLIB Permit - btst #SIGB_DOS,d0 - beq 3$ - btst #SIGB_DOS,d1 - bne 4$ - -3$ lea TC_SIZE(a0),a0 ;No, remove pending Dos packets - JSRLIB GetMsg - - move.w _EmulatedSR,d0 - or.w #$0700,d0 ;Disable all interrupts - move.w d0,_EmulatedSR - moveq #0,d0 ;Disable all exception signals - moveq #-1,d1 - JSRLIB SetExcept - jsr _quit_emulator ;CTRL-C, quit emulator -4$ move.l (sp)+,d0 - rts - -* -* Trap handler of main task -* - -_TrapHandlerAsm: - IFEQ INFO_LEVEL-1002 - move.w ([6,a0]),-(sp) - move.w #0,-(sp) - move.l (4+6,a0),-(sp) - PUTMSG 0,'%s/TrapHandlerAsm: addr=%08lx opcode=%04lx' - lea (2*4,sp),sp - ENDC - - cmp.l #4,(sp) ;Illegal instruction? - beq.s doillinstr - cmp.l #10,(sp) ;A-Line exception? - beq.s doaline - cmp.l #8,(sp) ;Privilege violation? - beq.s doprivviol - - cmp.l #9,(sp) ;Trace? - beq dotrace - cmp.l #3,(sp) ;Illegal Address? - beq.s doilladdr - cmp.l #11,(sp) ;F-Line exception - beq.s dofline - - cmp.l #32,(sp) - blt 1$ - cmp.l #47,(sp) - ble doTrapXX ; Vector 32-47 : TRAP #0 - 15 Instruction Vectors - -1$: - cmp.l #48,(sp) - blt 2$ - cmp.l #55,(sp) - ble doTrapFPU -2$: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/TrapHandlerAsm: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l _OldTrapHandler,-(sp) ;No, jump to old trap handler - rts - -* -* TRAP #0 - 15 Instruction Vectors -* - -doTrapXX: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/doTrapXX: stack=%08lx %08lx %08lx %08lx' - ENDC - - movem.l a0/d0,-(sp) ;Save a0,d0 - move.l (2*4,sp),d0 ;vector number 32-47 - - move.l usp,a0 ;Get user stack pointer - move.l (4*4,sp),-(a0) ;Copy 4-word stack frame to user stack - move.l (3*4,sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - - lsl.l #2,d0 ;convert vector number to vector offset - move.l d0,a0 - move.l (a0),d0 ;get mac trap vector - - move.l usp,a0 ;Get user stack pointer - move.l d0,-(a0) ;store vector offset as return address - move.l a0,usp ;Update USP - - movem.l (sp)+,a0/d0 ;Restore a0,d0 - addq.l #4*2,sp ;Remove exception frame from supervisor stack - - andi #$d8ff,sr ;Switch to user mode, enable interrupts - rts - - -* -* FPU Exception Instruction Vectors -* - -doTrapFPU: - move.l d0,(sp) - fmove.l fpcr,d0 - and.w #$00ff,d0 ;disable FPU exceptions - fmove.l d0,fpcr - move.l (sp)+,d0 ;Restore d0 - rte - - -* -* trace Vector -* - -dotrace - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/dotrace: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - - IFEQ INFO_LEVEL-1009 - move.l (12,a0),-(sp) - move.l (8,a0),-(sp) - move.l (4,a0),-(sp) - move.l (0,a0),-(sp) - move.l a0,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/dotrace: sp=%08lx usp=%08lx (%08lx %08lx %08lx %08lx)' - lea (6*4,sp),sp - ENDC - - move.l 3*4(sp),-(a0) ;Copy 6-word stack frame to user stack - move.l 2*4(sp),-(a0) - move.l 1*4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - lea 6*2(sp),sp ;Remove exception frame from supervisor stack - andi #$18ff,sr ;Switch to user mode, enable interrupts, disable trace - - move.l $24.w,-(sp) ;Jump to MacOS exception handler - rts - - -* -* A-Line handler: call MacOS A-Line handler -* - -doaline move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - addq.l #8,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - -; and.w #$f8ff,_EmulatedSR ;enable interrupts in EmulatedSR - - move.l $28.w,-(sp) ;Jump to MacOS exception handler - rts - -* -* F-Line handler: call F-Line exception handler -* - -dofline move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - addq.l #8,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - and.w #$f8ff,_EmulatedSR ;enable interrupts in EmulatedSR - - move.l $2c.w,-(sp) ;Jump to MacOS exception handler - rts - -* -* Illegal address handler -* - -doilladdr: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/doilladdr: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l a0,(sp) ;Save a0 - - move.l usp,a0 ;Get user stack pointer - move.l 3*4(sp),-(a0) ;Copy 6-word stack frame to user stack - move.l 2*4(sp),-(a0) - move.l 1*4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - lea 6*2(sp),sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l $0c.w,-(sp) ;Jump to MacOS exception handler - rts - - -* -* Illegal instruction handler: call IllInstrHandler() (which calls EmulOp()) -* to execute extended opcodes (see emul_op.h) -* - -doillinstr movem.l a0/d0,-(sp) - move.w ([6+2*4,sp]),d0 - and.w #$ff00,d0 - cmp.w #$7100,d0 - - IFEQ INFO_LEVEL-1009 - move.l d0,-(sp) - PUTMSG 0,'%s/doillinst: d0=%08lx stack=%08lx %08lx %08lx %08lx' - lea (1*4,sp),sp - ENDC - movem.l (sp)+,a0/d0 - beq 1$ - - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - add.w #3*4,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l $10.w,-(sp) ;Jump to MacOS exception handler - rts - -1$: - move.l a6,(sp) ;Save a6 - move.l usp,a6 ;Get user stack pointer - - move.l a6,-10(a6) ;Push USP (a7) - move.l 6(sp),-(a6) ;Push PC - move.w 4(sp),-(a6) ;Push SR - subq.l #4,a6 ;Skip saved USP - move.l (sp),-(a6) ;Push old a6 - movem.l d0-d7/a0-a5,-(a6) ;Push remaining registers - move.l a6,usp ;Update USP - - add.w #12,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l a6,-(sp) ;Jump to IllInstrHandler() in main.cpp - jsr _IllInstrHandler - addq.l #4,sp - - movem.l (sp)+,d0-d7/a0-a6 ;Restore registers - addq.l #4,sp ;Skip saved USP (!!) - rtr ;Return from exception - -* -* Privilege violation handler: MacOS runs in supervisor mode, -* so we have to emulate certain privileged instructions -* - -doprivviol move.l d0,(sp) ;Save d0 - move.w ([6,sp]),d0 ;Get instruction word - - IFEQ INFO_LEVEL-1001 - move.w ([6,a0]),-(sp) - move.w #0,-(sp) - PUTMSG 0,'%s/doprivviol: opcode=%04lx' - lea (1*4,sp),sp - ENDC - - cmp.w #$40e7,d0 ;move sr,-(sp)? - beq pushsr - cmp.w #$46df,d0 ;move (sp)+,sr? - beq popsr - - cmp.w #$007c,d0 ;ori #xxxx,sr? - beq orisr - cmp.w #$027c,d0 ;andi #xxxx,sr? - beq andisr - - cmp.w #$46fc,d0 ;move #xxxx,sr? - beq movetosrimm - - cmp.w #$46ef,d0 ;move (xxxx,sp),sr? - beq movetosrsprel - cmp.w #$46d8,d0 ;move (a0)+,sr? - beq movetosra0p - cmp.w #$46d9,d0 ;move (a1)+,sr? - beq movetosra1p - - cmp.w #$40f8,d0 ;move sr,xxxx.w? - beq movefromsrabs - cmp.w #$40d0,d0 ;move sr,(a0)? - beq movefromsra0 - cmp.w #$40d7,d0 ;move sr,(sp)? - beq movefromsrsp - - cmp.w #$f327,d0 ;fsave -(sp)? - beq fsavepush - cmp.w #$f35f,d0 ;frestore (sp)+? - beq frestorepop - cmp.w #$f32d,d0 ;fsave xxx(a5) ? - beq fsavea5 - cmp.w #$f36d,d0 ;frestore xxx(a5) ? - beq frestorea5 - - cmp.w #$4e73,d0 ;rte? - beq pvrte - - cmp.w #$40c0,d0 ;move sr,d0? - beq movefromsrd0 - cmp.w #$40c1,d0 ;move sr,d1? - beq movefromsrd1 - cmp.w #$40c2,d0 ;move sr,d2? - beq movefromsrd2 - cmp.w #$40c3,d0 ;move sr,d3? - beq movefromsrd3 - cmp.w #$40c4,d0 ;move sr,d4? - beq movefromsrd4 - cmp.w #$40c5,d0 ;move sr,d5? - beq movefromsrd5 - cmp.w #$40c6,d0 ;move sr,d6? - beq movefromsrd6 - cmp.w #$40c7,d0 ;move sr,d7? - beq movefromsrd7 - - cmp.w #$46c0,d0 ;move d0,sr? - beq movetosrd0 - cmp.w #$46c1,d0 ;move d1,sr? - beq movetosrd1 - cmp.w #$46c2,d0 ;move d2,sr? - beq movetosrd2 - cmp.w #$46c3,d0 ;move d3,sr? - beq movetosrd3 - cmp.w #$46c4,d0 ;move d4,sr? - beq movetosrd4 - cmp.w #$46c5,d0 ;move d5,sr? - beq movetosrd5 - cmp.w #$46c6,d0 ;move d6,sr? - beq movetosrd6 - cmp.w #$46c7,d0 ;move d7,sr? - beq movetosrd7 - - cmp.w #$4e7a,d0 ;movec cr,x? - beq movecfromcr - cmp.w #$4e7b,d0 ;movec x,cr? - beq movectocr - - cmp.w #$f478,d0 ;cpusha dc? - beq cpushadc - cmp.w #$f4f8,d0 ;cpusha dc/ic? - beq cpushadcic - - cmp.w #$4e69,d0 ;move usp,a1 - beq moveuspa1 - cmp.w #$4e68,d0 ;move usp,a0 - beq moveuspa0 - - cmp.w #$4e61,d0 ;move a1,usp - beq moved1usp - -pv_unhandled move.l (sp),d0 ;Unhandled instruction, jump to handler in main.cpp - move.l a6,(sp) ;Save a6 - move.l usp,a6 ;Get user stack pointer - - move.l a6,-10(a6) ;Push USP (a7) - move.l 6(sp),-(a6) ;Push PC - move.w 4(sp),-(a6) ;Push SR - subq.l #4,a6 ;Skip saved USP - move.l (sp),-(a6) ;Push old a6 - movem.l d0-d7/a0-a5,-(a6) ;Push remaining registers - move.l a6,usp ;Update USP - - add.w #12,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l a6,-(sp) ;Jump to PrivViolHandler() in main.cpp - jsr _PrivViolHandler - addq.l #4,sp - - movem.l (sp)+,d0-d7/a0-a6 ;Restore registers - addq.l #4,sp ;Skip saved USP - rtr ;Return from exception - -; move sr,-(sp) -pushsr move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w 8(sp),d0 ;Get CCR from exception stack frame - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,-(a0) ;Store SR on user stack - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move (sp)+,sr -popsr move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w (a0)+,d0 ;Get SR from user stack - move.w d0,8(sp) ;Store into CCR on exception stack frame - and.w #$00ff,8(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne 1$ - tst.l _InterruptFlags - beq 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; ori #xxxx,sr -orisr move.w 4(sp),d0 ;Get CCR from stack - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - or.w ([6,sp],2),d0 ;Or with immediate value - move.w d0,4(sp) ;Store into CCR on stack - and.w #$00ff,4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; andi #xxxx,sr -andisr move.w 4(sp),d0 ;Get CCR from stack - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - and.w ([6,sp],2),d0 ;And with immediate value -storesr4 move.w d0,4(sp) ;Store into CCR on stack - and.w #$00ff,4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne.s 1$ - tst.l _InterruptFlags - beq.s 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move #xxxx,sr -movetosrimm move.w ([6,sp],2),d0 ;Get immediate value - bra.s storesr4 - -; move (xxxx,sp),sr -movetosrsprel move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w ([10,sp],2),d0 ;Get offset - move.w (a0,d0.w),d0 ;Read word - move.l (sp)+,a0 ;Restore a0 - bra.s storesr4 - -; move (a0)+,sr -movetosra0p move.w (a0)+,d0 ;Read word - bra storesr2 - -; move (a1)+,sr -movetosra1p move.w (a1)+,d0 ;Read word - bra storesr2 - -; move sr,xxxx.w -movefromsrabs move.l a0,-(sp) ;Save a0 - move.w ([10,sp],2),a0 ;Get address - move.w 8(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move sr,(a0) -movefromsra0 move.w 4(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move sr,(sp) -movefromsrsp move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w 8(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; fsave -(sp) -fsavepush move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l #$41000000,-(a0) ;Push idle frame - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; fsave xxx(a5) -fsavea5 move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l a5,a0 ;Get base register - add.w ([6,sp],2),a0 ;Add offset to base register - move.l #$41000000,(a0) ;Push idle frame - move.l (sp)+,a0 ;Restore a0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; frestore (sp)+ -frestorepop move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - addq.l #4,a0 ;Nothing to do... - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; frestore xxx(a5) -frestorea5 move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l (sp)+,a0 ;Restore a0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; rte -pvrte movem.l a0/a1,-(sp) ;Save a0 and a1 - move.l usp,a0 ;Get user stack pointer - - move.w (a0)+,d0 ;Get SR from user stack - move.w d0,8+4(sp) ;Store into CCR on exception stack frame - and.w #$c0ff,8+4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - move.l (a0)+,10+4(sp) ;Store return address in exception stack frame - - move.w (a0)+,d0 ;get format word - lsr.w #7,d0 ;get stack frame Id - lsr.w #4,d0 - and.w #$001e,d0 - move.w (StackFormatTable,pc,d0.w),d0 ; get total stack frame length - subq.w #4,d0 ; count only extra words - lea 16+4(sp),a1 ; destination address (in supervisor stack) - bra 1$ - -2$ move.w (a0)+,(a1)+ ; copy additional stack words back to supervisor stack -1$ dbf d0,2$ - - move.l a0,usp ;Update USP - movem.l (sp)+,a0/a1 ;Restore a0 and a1 - move.l (sp)+,d0 ;Restore d0 - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; sizes of exceptions stack frames -StackFormatTable: - dc.w 4 ; Four-word stack frame, format $0 - dc.w 4 ; Throwaway four-word stack frame, format $1 - dc.w 6 ; Six-word stack frame, format $2 - dc.w 6 ; MC68040 floating-point post-instruction stack frame, format $3 - dc.w 8 ; MC68EC040 and MC68LC040 floating-point unimplemented stack frame, format $4 - dc.w 4 ; Format $5 - dc.w 4 ; Format $6 - dc.w 30 ; MC68040 access error stack frame, Format $7 - dc.w 29 ; MC68010 bus and address error stack frame, format $8 - dc.w 10 ; MC68020 and MC68030 coprocessor mid-instruction stack frame, format $9 - dc.w 16 ; MC68020 and MC68030 short bus cycle stack frame, format $a - dc.w 46 ; MC68020 and MC68030 long bus cycle stack frame, format $b - dc.w 12 ; CPU32 bus error for prefetches and operands stack frame, format $c - dc.w 4 ; Format $d - dc.w 4 ; Format $e - dc.w 4 ; Format $f - -; move sr,dx -movefromsrd0 addq.l #4,sp ;Skip saved d0 - moveq #0,d0 - move.w (sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd1 move.l (sp)+,d0 - moveq #0,d1 - move.w (sp),d1 - or.w _EmulatedSR,d1 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd2 move.l (sp)+,d0 - moveq #0,d2 - move.w (sp),d2 - or.w _EmulatedSR,d2 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd3 move.l (sp)+,d0 - moveq #0,d3 - move.w (sp),d3 - or.w _EmulatedSR,d3 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd4 move.l (sp)+,d0 - moveq #0,d4 - move.w (sp),d4 - or.w _EmulatedSR,d4 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd5 move.l (sp)+,d0 - moveq #0,d5 - move.w (sp),d5 - or.w _EmulatedSR,d5 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd6 move.l (sp)+,d0 - moveq #0,d6 - move.w (sp),d6 - or.w _EmulatedSR,d6 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd7 move.l (sp)+,d0 - moveq #0,d7 - move.w (sp),d7 - or.w _EmulatedSR,d7 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move dx,sr -movetosrd0 move.l (sp),d0 -storesr2 move.w d0,4(sp) - and.w #$00ff,4(sp) - and.w #$e700,d0 - move.w d0,_EmulatedSR - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne.s 1$ - tst.l _InterruptFlags - beq.s 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ move.l (sp)+,d0 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movetosrd1 move.l d1,d0 - bra.s storesr2 - -movetosrd2 move.l d2,d0 - bra.s storesr2 - -movetosrd3 move.l d3,d0 - bra.s storesr2 - -movetosrd4 move.l d4,d0 - bra.s storesr2 - -movetosrd5 move.l d5,d0 - bra.s storesr2 - -movetosrd6 move.l d6,d0 - bra.s storesr2 - -movetosrd7 move.l d7,d0 - bra.s storesr2 - -; movec cr,x -movecfromcr move.w ([6,sp],2),d0 ;Get next instruction word - - cmp.w #$8801,d0 ;movec vbr,a0? - beq.s movecvbra0 - cmp.w #$9801,d0 ;movec vbr,a1? - beq.s movecvbra1 - cmp.w #$A801,d0 ;movec vbr,a2? - beq.s movecvbra2 - cmp.w #$1801,d0 ;movec vbr,d1? - beq movecvbrd1 - cmp.w #$0002,d0 ;movec cacr,d0? - beq.s moveccacrd0 - cmp.w #$1002,d0 ;movec cacr,d1? - beq.s moveccacrd1 - cmp.w #$0003,d0 ;movec tc,d0? - beq.s movectcd0 - cmp.w #$1003,d0 ;movec tc,d1? - beq.s movectcd1 - cmp.w #$1000,d0 ;movec sfc,d1? - beq movecsfcd1 - cmp.w #$1001,d0 ;movec dfc,d1? - beq movecdfcd1 - cmp.w #$0806,d0 ;movec urp,d0? - beq movecurpd0 - cmp.w #$0807,d0 ;movec srp,d0? - beq.s movecsrpd0 - cmp.w #$0004,d0 ;movec itt0,d0 - beq.s movecitt0d0 - cmp.w #$0005,d0 ;movec itt1,d0 - beq.s movecitt1d0 - cmp.w #$0006,d0 ;movec dtt0,d0 - beq.s movecdtt0d0 - cmp.w #$0007,d0 ;movec dtt1,d0 - beq.s movecdtt1d0 - - bra pv_unhandled - -; movec cacr,d0 -moveccacrd0 move.l (sp)+,d0 - move.l #$3111,d0 ;All caches and bursts on - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec cacr,d1 -moveccacrd1 move.l (sp)+,d0 - move.l #$3111,d1 ;All caches and bursts on - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a0 -movecvbra0 move.l (sp)+,d0 - sub.l a0,a0 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a1 -movecvbra1 move.l (sp)+,d0 - sub.l a1,a1 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a2 -movecvbra2 move.l (sp)+,d0 - sub.l a2,a2 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,d1 -movecvbrd1 move.l (sp)+,d0 - moveq.l #0,d1 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec tc,d0 -movectcd0 addq.l #4,sp - moveq #0,d0 ;MMU is always off - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec tc,d1 +jl+ -movectcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 ;MMU is always off - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec sfc,d1 +jl+ -movecsfcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec dfc,d1 +jl+ -movecdfcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movecurpd0 ; movec urp,d0 +jl+ -movecsrpd0 ; movec srp,d0 -movecitt0d0 ; movec itt0,d0 -movecitt1d0 ; movec itt1,d0 -movecdtt0d0 ; movec dtt0,d0 -movecdtt1d0 ; movec dtt1,d0 - addq.l #4,sp - moveq.l #0,d0 ;MMU is always off - addq.l #4,2(sp) ;skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec x,cr -movectocr move.w ([6,sp],2),d0 ;Get next instruction word - - cmp.w #$0801,d0 ;movec d0,vbr? - beq.s movectovbr - cmp.w #$1801,d0 ;movec d1,vbr? - beq.s movectovbr - cmp.w #$A801,d0 ;movec a2,vbr? - beq.s movectovbr - cmp.w #$0002,d0 ;movec d0,cacr? - beq.s movectocacr - cmp.w #$1002,d0 ;movec d1,cacr? - beq.s movectocacr - cmp.w #$1000,d0 ;movec d1,sfc? - beq.s movectoxfc - cmp.w #$1001,d0 ;movec d1,dfc? - beq.s movectoxfc - - bra pv_unhandled - -; movec x,vbr -movectovbr move.l (sp)+,d0 ;Ignore moves to VBR - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec dx,cacr -movectocacr movem.l d1/a0-a1/a6,-(sp) ;Move to CACR, clear caches - move.l _SysBase,a6 - JSRLIB CacheClearU - movem.l (sp)+,d1/a0-a1/a6 - move.l (sp)+,d0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec x,sfc -; movec x,dfc -movectoxfc move.l (sp)+,d0 ;Ignore moves to SFC, DFC - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; cpusha -cpushadc -cpushadcic - IFEQ INFO_LEVEL-1003 - move.l (4),-(sp) - move.l d0,-(sp) - PUTMSG 0,'%s/cpushadc: opcode=%04lx Execbase=%08lx' - lea (2*4,sp),sp - ENDC - movem.l d1/a0-a1/a6,-(sp) ;Clear caches - move.l _SysBase,a6 - JSRLIB CacheClearU - movem.l (sp)+,d1/a0-a1/a6 - move.l (sp)+,d0 - addq.l #2,2(sp) - rte - -; move usp,a1 +jl+ -moveuspa1 move.l (sp)+,d0 - move usp,a1 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1009 - move.l a1,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/moveuspa1: a7=%08lx a1=%08lx' - lea (2*4,sp),sp - ENDC - - rte - -; move usp,a0 +jl+ -moveuspa0 move.l (sp)+,d0 - move usp,a0 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1009 - move.l a0,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/moveuspa0: a7=%08lx a0=%08lx' - lea (2*4,sp),sp - ENDC - - rte - -; move a1,usp +jl+ -moved1usp move.l (sp)+,d0 - move a1,usp - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; -; Trigger NMI (Pop up debugger) -; - -_AsmTriggerNMI move.l d0,-(sp) ;Save d0 - move.w #$007c,-(sp) ;Yes, fake NMI stack frame - pea 1$ - move.w _EmulatedSR,d0 - and.w #$f8ff,d0 ;Set interrupt level in SR - move.w d0,-(sp) - move.w d0,_EmulatedSR - - move.l $7c.w,-(sp) ;Jump to MacOS NMI handler - rts - -1$ move.l (sp)+,d0 ;Restore d0 - rts - - -CopyTrapStack: - movem.l d0/a0/a1,-(sp) - - move.w (5*4+6,sp),d0 ;get format word - lsr.w #7,d0 ;get stack frame Id - lsr.w #4,d0 - and.w #$001e,d0 - move.w (StackFormatTable,pc,d0.w),d0 ; get total stack frame length - - lea (5*4,sp),a0 ;get start of exception stack frame - move.l usp,a1 ;Get user stack pointer - bra 1$ - -2$ move.w (a0)+,(a1)+ ; copy additional stack words back to supervisor stack -1$ dbf d0,2$ - - move.l (3*4,sp),-(a0) ;copy return address to new top of stack - move.l a0,sp - rts - - END diff --git a/BasiliskII/src/AmigaOS/audio_amiga.cpp b/BasiliskII/src/AmigaOS/audio_amiga.cpp deleted file mode 100644 index 5c2643146..000000000 --- a/BasiliskII/src/AmigaOS/audio_amiga.cpp +++ /dev/null @@ -1,515 +0,0 @@ -/* - * audio_amiga.cpp - Audio support, AmigaOS implementation using AHI - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define D1(x) ; - - -// Global variables -static ULONG ahi_id = AHI_DEFAULT_ID; // AHI audio ID -static struct AHIAudioCtrl *ahi_ctrl = NULL; -static struct AHISampleInfo sample[2]; // Two sample infos for double-buffering -static struct Hook sf_hook; -static int play_buf = 0; // Number of currently played buffer -static long sound_buffer_size; // Size of one audio buffer in bytes -static int audio_block_fetched = 0; // Number of audio blocks fetched by interrupt routine - -static bool main_mute = false; -static bool speaker_mute = false; -static ULONG supports_volume_changes = false; -static ULONG supports_stereo_panning = false; -static ULONG current_main_volume; -static ULONG current_speaker_volume; - - -// Prototypes -static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/); -void audio_set_sample_rate_byval(uint32 value); -void audio_set_sample_size_byval(uint32 value); -void audio_set_channels_byval(uint32 value); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(int sample_rate_index) -{ - AudioStatus.sample_rate = audio_sample_rates[sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - sample[0].ahisi_Address = sample[1].ahisi_Address = NULL; - - // Init audio status and feature flags - audio_channel_counts.push_back(2); -// set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // AHI available? - if (AHIBase == NULL) { - WarningAlert(GetString(STR_NO_AHI_WARN)); - return; - } - - // Initialize callback hook - sf_hook.h_Entry = (HOOKFUNC)audio_callback; - - // Read "sound" preferences - const char *str = PrefsFindString("sound"); - if (str) - sscanf(str, "ahi/%08lx", &ahi_id); - - // Open audio control structure - if ((ahi_ctrl = AHI_AllocAudio( - AHIA_AudioID, ahi_id, - AHIA_MixFreq, AudioStatus.sample_rate >> 16, - AHIA_Channels, 1, - AHIA_Sounds, 2, - AHIA_SoundFunc, (ULONG)&sf_hook, - TAG_END)) == NULL) { - WarningAlert(GetString(STR_NO_AHI_CTRL_WARN)); - return; - } - - ULONG max_channels, sample_rate, frequencies, sample_rate_index; - - AHI_GetAudioAttrs(ahi_id, ahi_ctrl, - AHIDB_MaxChannels, (ULONG) &max_channels, - AHIDB_Frequencies, (ULONG) &frequencies, - TAG_END); - - D(bug("AudioInit: max_channels=%ld frequencies=%ld\n", max_channels, frequencies)); - - for (int n=0; n> 3) * AudioStatus.channels * audio_frames_per_block; - - // Prepare SampleInfos and load sounds (two sounds for double buffering) - sample[0].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S; - sample[0].ahisi_Length = audio_frames_per_block; - sample[0].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR); - sample[1].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S; - sample[1].ahisi_Length = audio_frames_per_block; - sample[1].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR); - if (sample[0].ahisi_Address == NULL || sample[1].ahisi_Address == NULL) - return; - - AHI_LoadSound(0, AHIST_DYNAMICSAMPLE, &sample[0], ahi_ctrl); - AHI_LoadSound(1, AHIST_DYNAMICSAMPLE, &sample[1], ahi_ctrl); - - // Set parameters - play_buf = 0; - current_main_volume = current_speaker_volume = 0x10000; - AHI_SetVol(0, current_speaker_volume, 0x8000, ahi_ctrl, AHISF_IMM); - - AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, AHISF_IMM); - AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, AHISF_IMM); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Free everything - if (ahi_ctrl != NULL) { - AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END); - AHI_FreeAudio(ahi_ctrl); - } - - FreeVec(sample[0].ahisi_Address); - FreeVec(sample[1].ahisi_Address); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - AHI_ControlAudio(ahi_ctrl, AHIC_Play, TRUE, TAG_END); -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END); -} - - -/* - * AHI sound callback, request next buffer - */ - -static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/) -{ - play_buf ^= 1; - - // New buffer available? - if (audio_block_fetched) - { - audio_block_fetched--; - - if (main_mute || speaker_mute) - { - memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size); - } - else - { - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int32 sample_count = ReadMacInt32(apple_stream_info + scd_sampleCount); - - uint32 num_channels = ReadMacInt16(apple_stream_info + scd_numChannels); - uint32 sample_size = ReadMacInt16(apple_stream_info + scd_sampleSize); - uint32 sample_rate = ReadMacInt32(apple_stream_info + scd_sampleRate); - - D(bug("stream: sample_count=%ld num_channels=%ld sample_size=%ld sample_rate=%ld\n", sample_count, num_channels, sample_size, sample_rate >> 16)); - - // Yes, this can happen. - if(sample_count != 0) { - if(sample_rate != AudioStatus.sample_rate) { - audio_set_sample_rate_byval(sample_rate); - } - if(num_channels != AudioStatus.channels) { - audio_set_channels_byval(num_channels); - } - if(sample_size != AudioStatus.sample_size) { - audio_set_sample_size_byval(sample_size); - } - } - - if (sample_count < 0) - sample_count = 0; - - int work_size = sample_count * num_channels * (sample_size>>3); - D(bug("stream: work_size=%ld sound_buffer_size=%ld\n", work_size, sound_buffer_size)); - - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - - // Put data into AHI buffer (convert 8-bit data unsigned->signed) - if (AudioStatus.sample_size == 16) - Mac2Host_memcpy(sample[play_buf].ahisi_Address, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - else { - uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - uint32 *q = (uint32 *)sample[play_buf].ahisi_Address; - int r = work_size >> 2; - while (r--) - *q++ = *p++ ^ 0x80808080; - } - if (work_size != sound_buffer_size) - memset((uint8 *)sample[play_buf].ahisi_Address + work_size, 0, sound_buffer_size - work_size); - } - } - - } - else - memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size); - - // Play next buffer - AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, 0); - - // Trigger audio interrupt to get new buffer - if (AudioStatus.num_sources) { - D1(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - } - return 0; -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D1(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D1(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - audio_block_fetched++; - D1(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -void audio_set_sample_rate_byval(uint32 value) -{ - bool changed = (AudioStatus.sample_rate != value); - if(changed) - { - ULONG sample_rate_index; - - // get index of sample rate closest to Hz - AHI_GetAudioAttrs(ahi_id, ahi_ctrl, - AHIDB_IndexArg, value >> 16, - AHIDB_Index, (ULONG) &sample_rate_index, - TAG_END); - - D(bug(" audio_set_sample_rate_byval requested rate=%ld Hz\n", value >> 16)); - - AudioStatus.sample_rate = audio_sample_rates[sample_rate_index]; - - AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, 0); - } - - D(bug(" audio_set_sample_rate_byval rate=%ld Hz\n", AudioStatus.sample_rate >> 16)); -} - -void audio_set_sample_size_byval(uint32 value) -{ - bool changed = (AudioStatus.sample_size != value); - if(changed) { -// AudioStatus.sample_size = value; -// update_sound_parameters(); -// WritePrivateProfileInt( "Audio", "SampleSize", AudioStatus.sample_size, ini_file_name ); - } - D(bug(" audio_set_sample_size_byval %d\n", AudioStatus.sample_size)); -} - -void audio_set_channels_byval(uint32 value) -{ - bool changed = (AudioStatus.channels != value); - if(changed) { -// AudioStatus.channels = value; -// update_sound_parameters(); -// WritePrivateProfileInt( "Audio", "Channels", AudioStatus.channels, ini_file_name ); - } - D(bug(" audio_set_channels_byval %d\n", AudioStatus.channels)); -} - -bool audio_set_sample_rate(int index) -{ - if(index >= 0 && index < audio_sample_rates.size() ) { - audio_set_sample_rate_byval( audio_sample_rates[index] ); - D(bug(" audio_set_sample_rate index=%ld rate=%ld\n", index, AudioStatus.sample_rate >> 16)); - } - - return true; -} - -bool audio_set_sample_size(int index) -{ - if(index >= 0 && index < audio_sample_sizes.size() ) { - audio_set_sample_size_byval( audio_sample_sizes[index] ); - D(bug(" audio_set_sample_size %d,%d\n", index,AudioStatus.sample_size)); - } - - return true; -} - -bool audio_set_channels(int index) -{ - if(index >= 0 && index < audio_channel_counts.size() ) { - audio_set_channels_byval( audio_channel_counts[index] ); - D(bug(" audio_set_channels %d,%d\n", index,AudioStatus.channels)); - } - - return true; -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - D(bug("audio_get_main_mute: mute=%ld\n", main_mute)); - - return main_mute; -} - -uint32 audio_get_main_volume(void) -{ - D(bug("audio_get_main_volume\n")); - - ULONG volume = current_main_volume >> 8; // 0x10000 => 0x100 - - D(bug("audio_get_main_volume: volume=%08lx\n", volume)); - - return (volume << 16) + volume; - - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - D(bug("audio_get_speaker_mute: mute=%ld\n", speaker_mute)); - - return speaker_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - D(bug("audio_get_speaker_volume: \n")); - - if (audio_open) - { - ULONG volume = current_speaker_volume >> 8; // 0x10000 => 0x100 - - D(bug("audio_get_speaker_volume: volume=%08lx\n", volume)); - - return (volume << 16) + volume; - } - - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ - D(bug("audio_set_main_mute: mute=%ld\n", mute)); - - if (mute != main_mute) - { - main_mute = mute; - } -} - -void audio_set_main_volume(uint32 vol) -{ - D(bug("audio_set_main_volume: vol=%08lx\n", vol)); - - if (audio_open && supports_volume_changes) - { - ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff)); - - D(bug("audio_set_main_volume: volume=%08lx\n", volume)); - - current_main_volume = volume; - - AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM); - } -} - -void audio_set_speaker_mute(bool mute) -{ - D(bug("audio_set_speaker_mute: mute=%ld\n", mute)); - - if (mute != speaker_mute) - { - speaker_mute = mute; - } -} - -void audio_set_speaker_volume(uint32 vol) -{ - D(bug("audio_set_speaker_volume: vol=%08lx\n", vol)); - - if (audio_open && supports_volume_changes) - { - ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff)); - - D(bug("audio_set_speaker_volume: volume=%08lx\n", volume)); - - current_speaker_volume = volume; - - AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM); - } -} diff --git a/BasiliskII/src/AmigaOS/clip_amiga.cpp b/BasiliskII/src/AmigaOS/clip_amiga.cpp deleted file mode 100644 index 10336bbd2..000000000 --- a/BasiliskII/src/AmigaOS/clip_amiga.cpp +++ /dev/null @@ -1,166 +0,0 @@ -/* - * clip_amiga.cpp - Clipboard handling, AmigaOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "clip.h" -#include "prefs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static struct IFFHandle *iffw = NULL; -static struct ClipboardHandle *ch = NULL; -static bool clipboard_open = false; -static bool no_clip_conversion; - - -// Conversion tables -static const uint8 mac2iso[0x80] = { - 0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1, - 0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8, - 0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3, - 0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc, - 0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf, - 0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8, - 0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53, - 0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8, - 0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab, - 0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f, - 0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20, - 0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66, - 0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1, - 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4, - 0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e, - 0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20 -}; - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); - - // Create clipboard IFF handle - iffw = AllocIFF(); - if (iffw) { - ch = OpenClipboard(PRIMARY_CLIP); - if (ch) { - iffw->iff_Stream = (ULONG)ch; - InitIFFasClip(iffw); - clipboard_open = true; - } - } -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ - if (ch) - CloseClipboard(ch); - if (iffw) - FreeIFF(iffw); -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length)); - if (length <= 0 || !clipboard_open) - return; - - switch (type) { - case 'TEXT': { - D(bug(" clipping TEXT\n")); - - // Open IFF stream - if (OpenIFF(iffw, IFFF_WRITE)) - break; - - // Convert text from Mac charset to ISO-Latin1 - uint8 *buf = new uint8[length]; - uint8 *p = (uint8 *)scrap; - uint8 *q = buf; - for (int i=0; i LF - c = 10; - } else if (!no_clip_conversion) - c = mac2iso[c & 0x7f]; - *q++ = c; - } - - // Write text - if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) { - if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) { - WriteChunkBytes(iffw, scrap, length); - PopChunk(iffw); - } - PopChunk(iffw); - } - - // Close IFF stream - CloseIFF(iffw); - delete[] buf; - break; - } - } -} diff --git a/BasiliskII/src/AmigaOS/ether_amiga.cpp b/BasiliskII/src/AmigaOS/ether_amiga.cpp deleted file mode 100644 index 99121a24f..000000000 --- a/BasiliskII/src/AmigaOS/ether_amiga.cpp +++ /dev/null @@ -1,705 +0,0 @@ -/* - * ether_amiga.cpp - Ethernet device driver, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "macos_util.h" -#include "ether.h" -#include "ether_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// These messages are sent to the network process -const uint32 MSG_CLEANUP = 'clea'; // Remove all protocols -const uint32 MSG_ADD_MULTI = 'addm'; // Add multicast address -const uint32 MSG_DEL_MULTI = 'delm'; // Add multicast address -const uint32 MSG_ATTACH_PH = 'atph'; // Attach protocol handler -const uint32 MSG_DETACH_PH = 'deph'; // Attach protocol handler -const uint32 MSG_WRITE = 'writ'; // Write packet - -struct NetMessage : public Message { - NetMessage(uint32 what_, const struct MsgPort *reply_port) - { - what = what_; - mn_ReplyPort = (struct MsgPort *)reply_port; - mn_Length = sizeof(*this); - } - uint32 what; - uint32 pointer; - uint16 type; - int16 result; -}; - - -// List of attached protocols -static const int NUM_READ_REQUESTS = 32; // Number of read requests that are sent to device in advance - -struct NetProtocol : public Node { - struct IOSana2Req read_io[NUM_READ_REQUESTS]; - uint8 read_buf[NUM_READ_REQUESTS][1518]; // 14 bytes header, 1500 bytes data, 4 bytes CRC - uint16 type; - uint32 handler; -}; - -static struct List prot_list; - - -// Global variables -static struct Process *net_proc = NULL; // Network device handler process -static bool proc_error; // Flag: process didn't initialize -static struct MsgPort *proc_port = NULL; // Message port of process, for communication with main task -static struct MsgPort *reply_port = NULL; // Reply port for communication with process -static struct MsgPort *read_port = NULL; // Reply port for read IORequests (set up and owned by network process) - -static bool write_done = false; // Flag: write request done - -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -// Prototypes -static void net_func(void); - - -/* - * Send message to network process - */ - -static int16 send_to_proc(uint32 what, uint32 pointer = 0, uint16 type = 0) -{ - D(bug("sending %08lx to net_proc\n", what)); - NetMessage msg(what, reply_port); - msg.pointer = pointer; - msg.type = type; - PutMsg(proc_port, &msg); - WaitPort(reply_port); - GetMsg(reply_port); - D(bug(" sent\n")); - return msg.result; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - // Do nothing if no Ethernet device specified - if (PrefsFindString("ether") == NULL) - return false; - - // Initialize protocol list - NewList(&prot_list); - - // Create message port - reply_port = CreateMsgPort(); - if (reply_port == NULL) - goto open_error; - D(bug("signal mask %08lx\n", 1 << reply_port->mp_SigBit)); - - // Start process - proc_error = false; - SetSignal(0, SIGF_SINGLE); - net_proc = CreateNewProcTags( - NP_Entry, (ULONG)net_func, - NP_Name, (ULONG)"Basilisk II Ethernet Task", - NP_Priority, 1, - TAG_END - ); - if (net_proc == NULL) - goto open_error; - - // Wait for signal from process - Wait(SIGF_SINGLE); - - // Initialization error? Then bail out - if (proc_error) - goto open_error; - - // Everything OK - return true; - -open_error: - net_proc = NULL; - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return false; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - // Stop process - if (net_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&net_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - // Delete reply port - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } -} - - -/* - * Reset - */ - -void ether_reset(void) -{ - // Remove all protocols - if (net_proc) - send_to_proc(MSG_CLEANUP); -} - - -/* - * Add multicast address - */ - -int16 ether_add_multicast(uint32 pb) -{ - return send_to_proc(MSG_ADD_MULTI, pb); -} - - -/* - * Delete multicast address - */ - -int16 ether_del_multicast(uint32 pb) -{ - return send_to_proc(MSG_DEL_MULTI, pb); -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - return send_to_proc(MSG_ATTACH_PH, handler, type); -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - return send_to_proc(MSG_DETACH_PH, type); -} - - -/* - * Transmit raw ethernet packet - */ - -int16 ether_write(uint32 wds) -{ - send_to_proc(MSG_WRITE, wds); - return 1; // Command in progress -} - - -/* - * Remove protocol from protocol list - */ - -static void remove_protocol(NetProtocol *p) -{ - // Remove from list - Forbid(); - Remove(p); - Permit(); - - // Cancel read requests - for (int i=0; iread_io + i)); - WaitIO((struct IORequest *)(p->read_io + i)); - } - - // Free protocol struct - FreeMem(p, sizeof(NetProtocol)); -} - - -/* - * Remove all protocols - */ - -static void remove_all_protocols(void) -{ - NetProtocol *n = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)n->ln_Succ) != NULL) { - remove_protocol(n); - n = next; - } -} - - -/* - * Copy received network packet to Mac side - */ - -static __saveds __regargs LONG copy_to_buff(uint8 *to /*a0*/, uint8 *from /*a1*/, uint32 packet_len /*d0*/) -{ - D(bug("CopyToBuff to %08lx, from %08lx, size %08lx\n", to, from, packet_len)); - - // It would be more efficient (and take up less memory) if we - // could invoke the packet handler from here. But we don't know - // in what context we run, so calling Execute68k() would not be - // a good idea, and even worse, we might run inside a hardware - // interrupt, so we can't even trigger a Basilisk interrupt from - // here and wait for its completion. - CopyMem(from, to, packet_len); -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; imp_SigBit; - - // Create message ports for device I/O - read_port = CreateMsgPort(); - if (read_port == NULL) - goto quit; - read_mask = 1 << read_port->mp_SigBit; - write_port = CreateMsgPort(); - if (write_port == NULL) - goto quit; - write_mask = 1 << write_port->mp_SigBit; - control_port = CreateMsgPort(); - if (control_port == NULL) - goto quit; - - // Create control IORequest - control_io = (struct IOSana2Req *)CreateIORequest(control_port, sizeof(struct IOSana2Req)); - if (control_io == NULL) - goto quit; - control_io->ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - - // Parse device name - char dev_name[256]; - ULONG dev_unit; - - str = PrefsFindString("ether"); - if (str) { - const char *FirstSlash = strchr(str, '/'); - const char *LastSlash = strrchr(str, '/'); - - if (FirstSlash && FirstSlash && FirstSlash != LastSlash) { - - // Device name contains path, i.e. "Networks/xyzzy.device" - const char *lp = str; - char *dp = dev_name; - - while (lp != LastSlash) - *dp++ = *lp++; - *dp = '\0'; - - if (strlen(dev_name) < 1) - goto quit; - - if (sscanf(LastSlash, "/%ld", &dev_unit) != 1) - goto quit; - } else { - if (sscanf(str, "%[^/]/%ld", dev_name, &dev_unit) != 2) - goto quit; - } - } else - goto quit; - - // Open device - control_io->ios2_BufferManagement = buffer_tags; - od_error = OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)control_io, 0); - if (od_error != 0 || control_io->ios2_Req.io_Device == 0) { - printf("WARNING: OpenDevice(<%s>, unit=%d) returned error %d)\n", (UBYTE *)dev_name, dev_unit, od_error); - goto quit; - } - opened = true; - - // Is it Ethernet? - control_io->ios2_Req.io_Command = S2_DEVICEQUERY; - control_io->ios2_StatData = (void *)&query_data; - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error) - goto quit; - if (query_data.HardwareType != S2WireType_Ethernet) { - WarningAlert(GetString(STR_NOT_ETHERNET_WARN)); - goto quit; - } - - // Yes, create IORequest for writing - write_io = (struct IOSana2Req *)CreateIORequest(write_port, sizeof(struct IOSana2Req)); - if (write_io == NULL) - goto quit; - memcpy(write_io, control_io, sizeof(struct IOSana2Req)); - write_io->ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - write_io->ios2_Req.io_Message.mn_ReplyPort = write_port; - - // Configure Ethernet - control_io->ios2_Req.io_Command = S2_GETSTATIONADDRESS; - DoIO((struct IORequest *)control_io); - memcpy(ether_addr, control_io->ios2_DstAddr, 6); - memcpy(control_io->ios2_SrcAddr, control_io->ios2_DstAddr, 6); - control_io->ios2_Req.io_Command = S2_CONFIGINTERFACE; - DoIO((struct IORequest *)control_io); - D(bug("Ethernet address %08lx %08lx\n", *(uint32 *)ether_addr, *(uint16 *)(ether_addr + 4))); - - // Initialization went well, inform main task - proc_error = false; - Signal(MainTask, SIGF_SINGLE); - - // Main loop - for (;;) { - - // Wait for I/O and messages (CTRL_C is used for quitting the task) - ULONG sig = Wait(proc_port_mask | read_mask | write_mask | SIGBREAKF_CTRL_C); - - // Main task wants to quit us - if (sig & SIGBREAKF_CTRL_C) - break; - - // Main task sent a command to us - if (sig & proc_port_mask) { - struct NetMessage *msg; - while (msg = (NetMessage *)GetMsg(proc_port)) { - D(bug("net_proc received %08lx\n", msg->what)); - switch (msg->what) { - case MSG_CLEANUP: - remove_all_protocols(); - break; - - case MSG_ADD_MULTI: - control_io->ios2_Req.io_Command = S2_ADDMULTICASTADDRESS; - Mac2Host_memcpy(control_io->ios2_SrcAddr, msg->pointer + eMultiAddr, 6); - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error == S2ERR_NOT_SUPPORTED) { - WarningAlert(GetString(STR_NO_MULTICAST_WARN)); - msg->result = noErr; - } else if (control_io->ios2_Req.io_Error) - msg->result = eMultiErr; - else - msg->result = noErr; - break; - - case MSG_DEL_MULTI: - control_io->ios2_Req.io_Command = S2_DELMULTICASTADDRESS; - Mac2Host_memcpy(control_io->ios2_SrcAddr, msg->pointer + eMultiAddr, 6); - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error) - msg->result = eMultiErr; - else - msg->result = noErr; - break; - - case MSG_ATTACH_PH: { - uint16 type = msg->type; - uint32 handler = msg->pointer; - - // Protocol of that type already installed? - NetProtocol *p = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)p->ln_Succ) != NULL) { - if (p->type == type) { - msg->result = lapProtErr; - goto reply; - } - p = next; - } - - // Allocate NetProtocol, set type and handler - p = (NetProtocol *)AllocMem(sizeof(NetProtocol), MEMF_PUBLIC); - if (p == NULL) { - msg->result = lapProtErr; - goto reply; - } - p->type = type; - p->handler = handler; - - // Set up and submit read requests - for (int i=0; iread_io + i, control_io, sizeof(struct IOSana2Req)); - p->read_io[i].ios2_Req.io_Message.mn_Node.ln_Name = (char *)p; // Hide pointer to NetProtocol in node name - p->read_io[i].ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - p->read_io[i].ios2_Req.io_Message.mn_ReplyPort = read_port; - p->read_io[i].ios2_Req.io_Command = CMD_READ; - p->read_io[i].ios2_PacketType = type; - p->read_io[i].ios2_Data = p->read_buf[i]; - p->read_io[i].ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((struct IORequest *)(p->read_io + i)); - } - - // Add protocol to list - AddTail(&prot_list, p); - - // Everything OK - msg->result = noErr; - break; - } - - case MSG_DETACH_PH: { - uint16 type = msg->type; - msg->result = lapProtErr; - NetProtocol *p = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)p->ln_Succ) != NULL) { - if (p->type == type) { - remove_protocol(p); - msg->result = noErr; - break; - } - p = next; - } - break; - } - - case MSG_WRITE: { - // Get pointer to Write Data Structure - uint32 wds = msg->pointer; - write_io->ios2_Data = (void *)wds; - - // Calculate total packet length - long len = 0; - uint32 tmp = wds; - for (;;) { - int16 w = ReadMacInt16(tmp); - if (w == 0) - break; - len += w; - tmp += 6; - } - write_io->ios2_DataLength = len; - - // Get destination address - uint32 hdr = ReadMacInt32(wds + 2); - Mac2Host_memcpy(write_io->ios2_DstAddr, hdr, 6); - - // Get packet type - uint32 type = ReadMacInt16(hdr + 12); - if (type <= 1500) - type = 0; // 802.3 packet - write_io->ios2_PacketType = type; - - // Multicast/broadcard packet? - if (write_io->ios2_DstAddr[0] & 1) { - if (*(uint32 *)(write_io->ios2_DstAddr) == 0xffffffff && *(uint16 *)(write_io->ios2_DstAddr + 4) == 0xffff) - write_io->ios2_Req.io_Command = S2_BROADCAST; - else - write_io->ios2_Req.io_Command = S2_MULTICAST; - } else - write_io->ios2_Req.io_Command = CMD_WRITE; - - // Send packet - write_done = false; - write_io->ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((IORequest *)write_io); - break; - } - } -reply: D(bug(" net_proc replying\n")); - ReplyMsg(msg); - } - } - - // Packet received - if (sig & read_mask) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - - // Packet write completed - if (sig & write_mask) { - GetMsg(write_port); - WriteMacInt32(ether_data + ed_Result, write_io->ios2_Req.io_Error ? excessCollsns : 0); - write_done = true; - D(bug(" packet write done, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } -quit: - - // Close everything - remove_all_protocols(); - if (opened) { - if (CheckIO((struct IORequest *)write_io) == 0) { - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)write_io); - } - CloseDevice((struct IORequest *)control_io); - } - if (write_io) - DeleteIORequest(write_io); - if (control_io) - DeleteIORequest(control_io); - if (control_port) - DeleteMsgPort(control_port); - if (write_port) - DeleteMsgPort(write_port); - if (read_port) - DeleteMsgPort(read_port); - - // Send signal to main task to confirm termination - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - - // Packet write done, enqueue DT to call IODone - if (write_done) { - EnqueueMac(ether_data + ed_DeferredTask, 0xd92); - write_done = false; - } - - // Call protocol handler for received packets - IOSana2Req *io; - while (io = (struct IOSana2Req *)GetMsg(read_port)) { - - // Get pointer to NetProtocol (hidden in node name) - NetProtocol *p = (NetProtocol *)io->ios2_Req.io_Message.mn_Node.ln_Name; - - // No default handler - if (p->handler == 0) - continue; - - // Copy header to RHA - Host2Mac_memcpy(ether_data + ed_RHA, io->ios2_Data, 14); - D(bug(" header %08lx%04lx %08lx%04lx %04lx\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = *(uint16 *)((uint32)io->ios2_Data + 12); // Packet type - r.d[1] = io->ios2_DataLength - 18; // Remaining packet length (without header, for ReadPacket) (-18 because the CRC is also included) - r.a[0] = (uint32)io->ios2_Data + 14; // Pointer to packet (host address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08lx, type %08lx, length %08lx, data %08lx, rha %08lx, read_packet %08lx\n", p->handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(p->handler, &r); - - // Resend IORequest - io->ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((struct IORequest *)io); - } - D(bug(" EtherIRQ done\n")); -} diff --git a/BasiliskII/src/AmigaOS/extfs_amiga.cpp b/BasiliskII/src/AmigaOS/extfs_amiga.cpp deleted file mode 100644 index 9f157e294..000000000 --- a/BasiliskII/src/AmigaOS/extfs_amiga.cpp +++ /dev/null @@ -1,387 +0,0 @@ -/* - * extfs_amiga.cpp - MacOS file system for access native file system access, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#define __USE_SYSBASE -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "extfs.h" -#include "extfs_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - - -/* - * Initialization - */ - -void extfs_init(void) -{ -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - AddPart(path, (char *)component, MAX_PATH_LENGTH); -} - - -/* - * Finder info and resource forks are kept in helper files - * - * Finder info: - * /path/.finf/file - * Resource fork: - * /path/.rsrc/file - * - * The .finf files store a FInfo/DInfo, followed by a FXInfo/DXInfo - * (16+16 bytes) - */ - -static void make_helper_path(const char *src, char *dest, const char *add, bool only_dir = false) -{ - dest[0] = 0; - - // Get pointer to last component of path - const char *last_part = FilePart((char *)src); - - // Copy everything before - strncpy(dest, src, last_part-src); - dest[last_part-src] = 0; - - // Add additional component - AddPart(dest, (char *)add, MAX_PATH_LENGTH); - - // Add last component - if (!only_dir) - AddPart(dest, (char *)last_part, MAX_PATH_LENGTH); -} - -static int create_helper_dir(const char *path, const char *add) -{ - char helper_dir[MAX_PATH_LENGTH]; - make_helper_path(path, helper_dir, add, true); - if (helper_dir[strlen(helper_dir) - 1] == '/') // Remove trailing "/" - helper_dir[strlen(helper_dir) - 1] = 0; - return mkdir(helper_dir, 0777); -} - -static int open_helper(const char *path, const char *add, int flag) -{ - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, add); - - if ((flag & O_ACCMODE) == O_RDWR || (flag & O_ACCMODE) == O_WRONLY) - flag |= O_CREAT; - int fd = open(helper_path, flag, 0666); - if (fd < 0) { - if (errno == ENOENT && (flag & O_CREAT)) { - // One path component was missing, probably the helper - // directory. Try to create it and re-open the file. - int ret = create_helper_dir(path, add); - if (ret < 0) - return ret; - fd = open(helper_path, flag, 0666); - } - } - return fd; -} - -static int open_finf(const char *path, int flag) -{ - return open_helper(path, ".finf/", flag); -} - -static int open_rsrc(const char *path, int flag) -{ - return open_helper(path, ".rsrc/", flag); -} - - -/* - * Get/set finder type/creator for file specified by full path - */ - -struct ext2type { - const char *ext; - uint32 type; - uint32 creator; -}; - -static const ext2type e2t_translation[] = { - {".z", FOURCC('Z','I','V','M'), FOURCC('L','Z','I','V')}, - {".gz", FOURCC('G','z','i','p'), FOURCC('G','z','i','p')}, - {".hqx", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".bin", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".pdf", FOURCC('P','D','F',' '), FOURCC('C','A','R','O')}, - {".ps", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".sit", FOURCC('S','I','T','!'), FOURCC('S','I','T','x')}, - {".tar", FOURCC('T','A','R','F'), FOURCC('T','A','R',' ')}, - {".uu", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".uue", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".zip", FOURCC('Z','I','P',' '), FOURCC('Z','I','P',' ')}, - {".8svx", FOURCC('8','S','V','X'), FOURCC('S','N','D','M')}, - {".aifc", FOURCC('A','I','F','C'), FOURCC('T','V','O','D')}, - {".aiff", FOURCC('A','I','F','F'), FOURCC('T','V','O','D')}, - {".au", FOURCC('U','L','A','W'), FOURCC('T','V','O','D')}, - {".mid", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".midi", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".mp2", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".mp3", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".wav", FOURCC('W','A','V','E'), FOURCC('T','V','O','D')}, - {".bmp", FOURCC('B','M','P','f'), FOURCC('o','g','l','e')}, - {".gif", FOURCC('G','I','F','f'), FOURCC('o','g','l','e')}, - {".lbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".ilbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".jpg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".jpeg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".pict", FOURCC('P','I','C','T'), FOURCC('o','g','l','e')}, - {".png", FOURCC('P','N','G','f'), FOURCC('o','g','l','e')}, - {".sgi", FOURCC('.','S','G','I'), FOURCC('o','g','l','e')}, - {".tga", FOURCC('T','P','I','C'), FOURCC('o','g','l','e')}, - {".tif", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".tiff", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".htm", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".html", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".txt", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".rtf", FOURCC('T','E','X','T'), FOURCC('M','S','W','D')}, - {".c", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cc", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".h", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hh", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".s", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".i", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".mpg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mpeg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mov", FOURCC('M','o','o','V'), FOURCC('T','V','O','D')}, - {".fli", FOURCC('F','L','I',' '), FOURCC('T','V','O','D')}, - {".avi", FOURCC('V','f','W',' '), FOURCC('T','V','O','D')}, - {".qxd", FOURCC('X','D','O','C'), FOURCC('X','P','R','3')}, - {".hfv", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".dsk", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".img", FOURCC('r','o','h','d'), FOURCC('d','d','s','k')}, - {NULL, 0, 0} // End marker -}; - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Read Finder info file - int fd = open_finf(path, O_RDONLY); - if (fd >= 0) { - ssize_t actual = read(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - actual += read(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); - if (actual >= SIZEOF_FInfo) - return; - } - - // No Finder info file, translate file name extension to MacOS type/creator - if (!is_dir) { - int path_len = strlen(path); - for (int i=0; e2t_translation[i].ext; i++) { - int ext_len = strlen(e2t_translation[i].ext); - if (path_len < ext_len) - continue; - if (!strcasecmp(path + path_len - ext_len, e2t_translation[i].ext)) { - WriteMacInt32(finfo + fdType, e2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, e2t_translation[i].creator); - break; - } - } - } -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Open Finder info file - int fd = open_finf(path, O_RDWR); - if (fd < 0) - return; - - // Write file - write(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - write(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open resource file - int fd = open_rsrc(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size - off_t size = lseek(fd, 0, SEEK_END); - - // Close file and return size - close(fd); - return size < 0 ? 0 : size; -} - -int open_rfork(const char *path, int flag) -{ - return open_rsrc(path, flag); -} - -void close_rfork(const char *path, int fd) -{ - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - return read(fd, buffer, length); -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - return write(fd, buffer, length); -} - - -/* - * Remove file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - // Remove helpers first, don't complain if this fails - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, ".finf/", false); - remove(helper_path); - make_helper_path(path, helper_path, ".rsrc/", false); - remove(helper_path); - - // Now remove file or directory (and helper directories in the directory) - if (remove(path) < 0) { - if (errno == EISDIR || errno == ENOTEMPTY) { - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".finf"); - rmdir(helper_path); - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".rsrc"); - rmdir(helper_path); - return rmdir(path) == 0; - } else - return false; - } - return true; -} - - -/* - * Rename/move file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - // Rename helpers first, don't complain if this fails - char old_helper_path[MAX_PATH_LENGTH], new_helper_path[MAX_PATH_LENGTH]; - make_helper_path(old_path, old_helper_path, ".finf/", false); - make_helper_path(new_path, new_helper_path, ".finf/", false); - create_helper_dir(new_path, ".finf/"); - rename(old_helper_path, new_helper_path); - make_helper_path(old_path, old_helper_path, ".rsrc/", false); - make_helper_path(new_path, new_helper_path, ".rsrc/", false); - create_helper_dir(new_path, ".rsrc/"); - rename(old_helper_path, new_helper_path); - - // Now rename file - return rename(old_path, new_path) == 0; -} - - -/* - * ftruncate() is missing from libnix - */ - -extern unsigned long *__stdfiledes; - -int ftruncate(int fd, off_t size) -{ - if (SetFileSize(__stdfiledes[fd], size, OFFSET_BEGINNING) < 0) - return -1; - else - return 0; -} diff --git a/BasiliskII/src/AmigaOS/main_amiga.cpp b/BasiliskII/src/AmigaOS/main_amiga.cpp deleted file mode 100644 index 90ac6db23..000000000 --- a/BasiliskII/src/AmigaOS/main_amiga.cpp +++ /dev/null @@ -1,743 +0,0 @@ -/* - * main_amiga.cpp - Startup code for AmigaOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "xpram.h" -#include "timer.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "scsi.h" -#include "audio.h" -#include "video.h" -#include "serial.h" -#include "ether.h" -#include "clip.h" -#include "emul_op.h" -#include "rom_patches.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "sys.h" -#include "user_strings.h" -#include "version.h" - -#define DEBUG 0 -#include "debug.h" - - -// Options for libnix -unsigned long __stack = 0x4000; // Stack requirement -int __nocommandline = 1; // Disable command line parsing - - -// Constants -static const char ROM_FILE_NAME[] = "ROM"; -static const char __ver[] = "$VER: " VERSION_STRING " " __DATE__; -static const int SCRATCH_MEM_SIZE = 65536; - - -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables -extern ExecBase *SysBase; -struct Library *GfxBase = NULL; -struct IntuitionBase *IntuitionBase = NULL; -struct Library *GadToolsBase = NULL; -struct Library *IFFParseBase = NULL; -struct Library *AslBase = NULL; -struct Library *P96Base = NULL; -struct Library *CyberGfxBase = NULL; -struct Library *TimerBase = NULL; -struct Library *AHIBase = NULL; -struct Library *DiskBase = NULL; - -struct Task *MainTask; // Our task -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -APTR OldTrapHandler = NULL; // Old trap handler -APTR OldExceptionHandler = NULL; // Old exception handler -BYTE IRQSig = -1; // "Interrupt" signal number -ULONG IRQSigMask = 0; // "Interrupt" signal mask - -static struct timerequest *timereq = NULL; // IORequest for timer - -static struct MsgPort *ahi_port = NULL; // Port for AHI -static struct AHIRequest *ahi_io = NULL; // IORequest for AHI - -static struct Process *xpram_proc = NULL; // XPRAM watchdog -static volatile bool xpram_proc_active = true; // Flag for quitting the XPRAM watchdog - -static struct Process *tick_proc = NULL; // 60Hz process -static volatile bool tick_proc_active = true; // Flag for quitting the 60Hz process - -static bool stack_swapped = false; // Stack swapping -static StackSwapStruct stack_swap; - - -// Assembly functions -struct trap_regs; -extern "C" void AtomicAnd(uint32 *p, uint32 val); -extern "C" void AtomicOr(uint32 *p, uint32 val); -extern "C" void MoveVBR(void); -extern "C" void DisableSuperBypass(void); -extern "C" void TrapHandlerAsm(void); -extern "C" void ExceptionHandlerAsm(void); -extern "C" void IllInstrHandler(trap_regs *regs); -extern "C" void PrivViolHandler(trap_regs *regs); -extern "C" void quit_emulator(void); -extern "C" void AsmTriggerNMI(void); -uint16 EmulatedSR; // Emulated SR (supervisor bit and interrupt mask) - - -// Prototypes -static void jump_to_rom(void); -static void xpram_func(void); -static void tick_func(void); - - -/* - * Main program - */ - -int main(int argc, char **argv) -{ - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - MainTask = FindTask(NULL); - struct DateStamp ds; - DateStamp(&ds); - srand(ds.ds_Tick); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Open libraries - GfxBase = OpenLibrary((UBYTE *) "graphics.library", 39); - if (GfxBase == NULL) { - printf("Cannot open graphics.library V39.\n"); - exit(1); - } - IntuitionBase = (struct IntuitionBase *)OpenLibrary((UBYTE *) "intuition.library", 39); - if (IntuitionBase == NULL) { - printf("Cannot open intuition.library V39.\n"); - CloseLibrary(GfxBase); - exit(1); - } - DiskBase = (struct Library *)OpenResource((UBYTE *) "disk.resource"); - if (DiskBase == NULL) - QuitEmulator(); - GadToolsBase = OpenLibrary((UBYTE *) "gadtools.library", 39); - if (GadToolsBase == NULL) { - ErrorAlert(STR_NO_GADTOOLS_LIB_ERR); - QuitEmulator(); - } - IFFParseBase = OpenLibrary((UBYTE *) "iffparse.library", 39); - if (IFFParseBase == NULL) { - ErrorAlert(STR_NO_IFFPARSE_LIB_ERR); - QuitEmulator(); - } - AslBase = OpenLibrary((UBYTE *) "asl.library", 36); - if (AslBase == NULL) { - ErrorAlert(STR_NO_ASL_LIB_ERR); - QuitEmulator(); - } - - if (FindTask((UBYTE *) "« Enforcer »")) { - ErrorAlert(STR_ENFORCER_RUNNING_ERR); - QuitEmulator(); - } - - // These two can fail (the respective gfx support won't be available, then) - P96Base = OpenLibrary((UBYTE *) "Picasso96API.library", 2); - CyberGfxBase = OpenLibrary((UBYTE *) "cybergraphics.library", 2); - - // Read preferences - PrefsInit(NULL, argc, argv); - - // Open AHI - ahi_port = CreateMsgPort(); - if (ahi_port) { - ahi_io = (struct AHIRequest *)CreateIORequest(ahi_port, sizeof(struct AHIRequest)); - if (ahi_io) { - ahi_io->ahir_Version = 2; - if (OpenDevice((UBYTE *) AHINAME, AHI_NO_UNIT, (struct IORequest *)ahi_io, 0) == 0) { - AHIBase = (struct Library *)ahi_io->ahir_Std.io_Device; - } - } - } - - // Init system routines - SysInit(); - - // Show preferences editor - if (!PrefsFindBool("nogui")) - if (!PrefsEditor()) - QuitEmulator(); - - // Check start of Chip memory (because we need access to 0x0000..0x2000) - if ((uint32)FindName(&SysBase->MemList, (UBYTE *) "chip memory") < 0x2000) { - ErrorAlert(STR_NO_PREPARE_EMUL_ERR); - QuitEmulator(); - } - - // Open timer.device - timereq = (struct timerequest *)AllocVec(sizeof(timerequest), MEMF_PUBLIC | MEMF_CLEAR); - if (timereq == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - if (OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timereq, 0)) { - ErrorAlert(STR_NO_TIMER_DEV_ERR); - QuitEmulator(); - } - TimerBase = (struct Library *)timereq->tr_node.io_Device; - - // Allocate scratch memory - ScratchMem = (uint8 *)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC); - if (ScratchMem == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block - - // Create area for Mac RAM and ROM (ROM must be higher in memory, - // so we allocate one big chunk and put the ROM at the top of it) - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC); - if (RAMBaseHost == NULL) { - uint32 newRAMSize = AvailMem(MEMF_LARGEST) - 0x100000; - char xText[120]; - - sprintf(xText, GetString(STR_NOT_ENOUGH_MEM_WARN), RAMSize, newRAMSize); - - if (ChoiceAlert(xText, "Use", "Quit") != 1) - QuitEmulator(); - - RAMSize = newRAMSize; - RAMBaseHost = (uint8 *)AllocVec(RAMSize - 0x100000, MEMF_PUBLIC); - if (RAMBaseHost == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - } - RAMBaseMac = (uint32)RAMBaseHost; - D(bug("Mac RAM starts at %08lx\n", RAMBaseHost)); - ROMBaseHost = RAMBaseHost + RAMSize; - ROMBaseMac = (uint32)ROMBaseHost; - D(bug("Mac ROM starts at %08lx\n", ROMBaseHost)); - - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Load Mac ROM - BPTR rom_fh = Open(rom_path ? (char *)rom_path : (char *)ROM_FILE_NAME, MODE_OLDFILE); - if (rom_fh == 0) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf(GetString(STR_READING_ROM_FILE)); - Seek(rom_fh, 0, OFFSET_END); - ROMSize = Seek(rom_fh, 0, OFFSET_CURRENT); - if (ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - Close(rom_fh); - QuitEmulator(); - } - Seek(rom_fh, 0, OFFSET_BEGINNING); - if (Read(rom_fh, ROMBaseHost, ROMSize) != ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - Close(rom_fh); - QuitEmulator(); - } - - // Set CPU and FPU type - UWORD attn = SysBase->AttnFlags; - CPUType = attn & AFF_68040 ? 4 : (attn & AFF_68030 ? 3 : 2); - CPUIs68060 = attn & AFF_68060; - FPUType = attn & AFF_68881 ? 1 : 0; - - // Initialize everything - if (!InitAll(NULL)) - QuitEmulator(); - - // Move VBR away from 0 if neccessary - MoveVBR(); - - // On 68060, disable Super Bypass mode because of a CPU bug that is triggered by MacOS 8 - if (CPUIs68060) - DisableSuperBypass(); - - memset((UBYTE *) 8, 0, 0x2000-8); - - // Install trap handler - EmulatedSR = 0x2700; - OldTrapHandler = MainTask->tc_TrapCode; - MainTask->tc_TrapCode = (APTR)TrapHandlerAsm; - - // Allocate signal for interrupt emulation and install exception handler - IRQSig = AllocSignal(-1); - IRQSigMask = 1 << IRQSig; - OldExceptionHandler = MainTask->tc_ExceptCode; - MainTask->tc_ExceptCode = (APTR)ExceptionHandlerAsm; - SetExcept(SIGBREAKF_CTRL_C | IRQSigMask, SIGBREAKF_CTRL_C | IRQSigMask); - - // Start XPRAM watchdog process - xpram_proc = CreateNewProcTags( - NP_Entry, (ULONG)xpram_func, - NP_Name, (ULONG)"Basilisk II XPRAM Watchdog", - NP_Priority, 0, - TAG_END - ); - - // Start 60Hz process - tick_proc = CreateNewProcTags( - NP_Entry, (ULONG)tick_func, - NP_Name, (ULONG)"Basilisk II 60Hz", - NP_Priority, 5, - TAG_END - ); - - // Set task priority to -1 so we don't use all processing time - SetTaskPri(MainTask, -1); - - WriteMacInt32(0xbff, 0); // MacsBugFlags - - // Swap stack to Mac RAM area - stack_swap.stk_Lower = RAMBaseHost; - stack_swap.stk_Upper = (ULONG)RAMBaseHost + RAMSize; - stack_swap.stk_Pointer = RAMBaseHost + 0x8000; - StackSwap(&stack_swap); - stack_swapped = true; - - // Jump to ROM boot routine - Start680x0(); - - QuitEmulator(); - return 0; -} - -void Start680x0(void) -{ - typedef void (*rom_func)(void); - rom_func fp = (rom_func)(ROMBaseHost + 0x2a); - fp(); -} - - -/* - * Quit emulator (__saveds because it might be called from an exception) - */ - -// Assembly entry point -void __saveds quit_emulator(void) -{ - QuitEmulator(); -} - -void QuitEmulator(void) -{ - // Stop 60Hz process - if (tick_proc) { - SetSignal(0, SIGF_SINGLE); - tick_proc_active = false; - Wait(SIGF_SINGLE); - } - - // Stop XPRAM watchdog process - if (xpram_proc) { - SetSignal(0, SIGF_SINGLE); - xpram_proc_active = false; - Wait(SIGF_SINGLE); - } - - // Restore stack - if (stack_swapped) { - stack_swapped = false; - StackSwap(&stack_swap); - } - - // Remove exception handler - if (IRQSig >= 0) { - SetExcept(0, SIGBREAKF_CTRL_C | IRQSigMask); - MainTask->tc_ExceptCode = OldExceptionHandler; - FreeSignal(IRQSig); - } - - // Remove trap handler - MainTask->tc_TrapCode = OldTrapHandler; - - // Deinitialize everything - ExitAll(); - - // Delete RAM/ROM area - if (RAMBaseHost) - FreeVec(RAMBaseHost); - - // Delete scratch memory area - if (ScratchMem) - FreeMem((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - - // Close timer.device - if (TimerBase) - CloseDevice((struct IORequest *)timereq); - if (timereq) - FreeVec(timereq); - - // Exit system routines - SysExit(); - - // Close AHI - if (AHIBase) - CloseDevice((struct IORequest *)ahi_io); - if (ahi_io) - DeleteIORequest((struct IORequest *)ahi_io); - if (ahi_port) - DeleteMsgPort(ahi_port); - - // Exit preferences - PrefsExit(); - - // Close libraries - if (CyberGfxBase) - CloseLibrary(CyberGfxBase); - if (P96Base) - CloseLibrary(P96Base); - if (AslBase) - CloseLibrary(AslBase); - if (IFFParseBase) - CloseLibrary(IFFParseBase); - if (GadToolsBase) - CloseLibrary(GadToolsBase); - if (IntuitionBase) - CloseLibrary((struct Library *)IntuitionBase); - if (GfxBase) - CloseLibrary(GfxBase); - - exit(0); -} - - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ - CacheClearE(start, size, CACRF_ClearI | CACRF_ClearD); -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags; - -void SetInterruptFlag(uint32 flag) -{ - AtomicOr(&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - AtomicAnd(&InterruptFlags, ~flag); -} - -void TriggerInterrupt(void) -{ - Signal(MainTask, IRQSigMask); -} - -void TriggerNMI(void) -{ - AsmTriggerNMI(); -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -static __saveds void tick_func(void) -{ - int tick_counter = 0; - struct MsgPort *timer_port = NULL; - struct timerequest *timer_io = NULL; - ULONG timer_mask = 0; - - // Start 60Hz timer - timer_port = CreateMsgPort(); - if (timer_port) { - timer_io = (struct timerequest *)CreateIORequest(timer_port, sizeof(struct timerequest)); - if (timer_io) { - if (!OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timer_io, 0)) { - timer_mask = 1 << timer_port->mp_SigBit; - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16625; - SendIO((struct IORequest *)timer_io); - } - } - } - - while (tick_proc_active) { - - // Wait for timer tick - Wait(timer_mask); - - // Restart timer - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16625; - SendIO((struct IORequest *)timer_io); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); - } - - // Trigger 60Hz interrupt - SetInterruptFlag(INTFLAG_60HZ); - TriggerInterrupt(); - } - - // Stop timer - if (timer_io) { - if (!CheckIO((struct IORequest *)timer_io)) - AbortIO((struct IORequest *)timer_io); - WaitIO((struct IORequest *)timer_io); - CloseDevice((struct IORequest *)timer_io); - DeleteIORequest(timer_io); - } - if (timer_port) - DeleteMsgPort(timer_port); - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * XPRAM watchdog thread (saves XPRAM every minute) - */ - -static __saveds void xpram_func(void) -{ - uint8 last_xpram[XPRAM_SIZE]; - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - - while (xpram_proc_active) { - for (int i=0; i<60 && xpram_proc_active; i++) - Delay(50); // Only wait 1 second so we quit promptly when xpram_proc_active becomes false - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_ERROR_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_ERROR_PREFIX); - req.es_GadgetFormat = (UBYTE *)GetString(STR_QUIT_BUTTON); - EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX); - req.es_GadgetFormat = (UBYTE *)GetString(STR_OK_BUTTON); - EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, "%s|%s", pos, neg); - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX); - req.es_GadgetFormat = (UBYTE *)str; - return EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Illegal Instruction and Privilege Violation trap handlers - */ - -struct trap_regs { // This must match the layout of M68kRegisters - uint32 d[8]; - uint32 a[8]; - uint16 sr; - uint32 pc; -}; - -void __saveds IllInstrHandler(trap_regs *r) -{ -// D(bug("IllInstrHandler/%ld\n", __LINE__)); - - uint16 opcode = *(uint16 *)(r->pc); - if ((opcode & 0xff00) != 0x7100) { - printf("Illegal Instruction %04x at %08lx\n", *(uint16 *)(r->pc), r->pc); - printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" - "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" - "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" - "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" - "sr %04x\n", - r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], - r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], - r->sr); - QuitEmulator(); - } else { - // Disable interrupts - uint16 sr = EmulatedSR; - EmulatedSR |= 0x0700; - - // Call opcode routine - EmulOp(opcode, (M68kRegisters *)r); - r->pc += 2; - - // Restore interrupts - EmulatedSR = sr; - if ((EmulatedSR & 0x0700) == 0 && InterruptFlags) - Signal(MainTask, IRQSigMask); - } -} - -void __saveds PrivViolHandler(trap_regs *r) -{ - printf("Privileged instruction %04x %04x at %08lx\n", *(uint16 *)(r->pc), *(uint16 *)(r->pc + 2), r->pc); - printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" - "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" - "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" - "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" - "sr %04x\n", - r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], - r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], - r->sr); - QuitEmulator(); -} diff --git a/BasiliskII/src/AmigaOS/prefs_amiga.cpp b/BasiliskII/src/AmigaOS/prefs_amiga.cpp deleted file mode 100644 index 3d71c1de7..000000000 --- a/BasiliskII/src/AmigaOS/prefs_amiga.cpp +++ /dev/null @@ -1,89 +0,0 @@ -/* - * prefs_amiga.cpp - Preferences handling, AmigaOS specifix stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - -#include "sysdeps.h" -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"sound", TYPE_STRING, false, "sound output mode description"}, - {"scsimemtype", TYPE_INT32, false, "SCSI buffer memory type"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name -const char PREFS_FILE_NAME[] = "ENV:BasiliskII_prefs"; -const char PREFS_FILE_NAME_ARC[] = "ENVARC:BasiliskII_prefs"; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(void) -{ - // Read preferences from settings file - FILE *f = fopen(PREFS_FILE_NAME, "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(PREFS_FILE_NAME, "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } - if ((f = fopen(PREFS_FILE_NAME_ARC, "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "WORK:"); - PrefsAddInt32("scsimemtype", 0); -} diff --git a/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp b/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp deleted file mode 100644 index f19569061..000000000 --- a/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp +++ /dev/null @@ -1,1735 +0,0 @@ -/* - * prefs_editor_amiga.cpp - Preferences editor, AmigaOS implementation (using gtlayout.library) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "xpram.h" -#include "cdrom.h" -#include "user_strings.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" - - -// Gadget/menu IDs -const int MSG_OK = 0x0100; // "Start" button -const int MSG_CANCEL = 0x0101; // "Quit" button -const int MSG_ABOUT = 0x0102; // "About..." menu item -const int MSG_ZAP_PRAM = 0x0103; // "Zap PRAM" menu item - -const int GAD_PAGEGROUP = 0x0200; - -const int GAD_DISK_LIST = 0x0300; // "Volumes" pane -const int GAD_ADD_VOLUME = 0x0301; -const int GAD_EDIT_VOLUME = 0x0302; -const int GAD_REMOVE_VOLUME = 0x0303; -const int GAD_CDROM_DEVICE = 0x0304; -const int GAD_CDROM_UNIT = 0x0305; -const int GAD_BOOTDRIVER = 0x0306; -const int GAD_NOCDROM = 0x0307; -const int GAD_EXTFS = 0x0308; - -const int GAD_VOLUME_READONLY = 0x0310; // "Add/Edit Volume" window -const int GAD_VOLUME_TYPE = 0x0311; -const int GAD_VOLUME_FILE = 0x0312; -const int GAD_VOLUME_DEVICE = 0x0313; -const int GAD_VOLUME_UNIT = 0x0314; -const int GAD_VOLUME_OPENFLAGS = 0x0315; -const int GAD_VOLUME_STARTBLOCK = 0x0316; -const int GAD_VOLUME_SIZE = 0x0317; -const int GAD_VOLUME_BLOCKSIZE = 0x0318; -const int GAD_VOLUME_PAGEGROUP = 0x0319; - -const int GAD_SCSI0_DEVICE = 0x0400; // "SCSI" pane -const int GAD_SCSI1_DEVICE = 0x0401; -const int GAD_SCSI2_DEVICE = 0x0402; -const int GAD_SCSI3_DEVICE = 0x0403; -const int GAD_SCSI4_DEVICE = 0x0404; -const int GAD_SCSI5_DEVICE = 0x0405; -const int GAD_SCSI6_DEVICE = 0x0406; -const int GAD_SCSI0_UNIT = 0x0410; -const int GAD_SCSI1_UNIT = 0x0411; -const int GAD_SCSI2_UNIT = 0x0412; -const int GAD_SCSI3_UNIT = 0x0413; -const int GAD_SCSI4_UNIT = 0x0414; -const int GAD_SCSI5_UNIT = 0x0415; -const int GAD_SCSI6_UNIT = 0x0416; -const int GAD_SCSI_MEMTYPE = 0x0420; - -const int GAD_VIDEO_TYPE = 0x0500; // "Graphics/Sound" pane -const int GAD_DISPLAY_X = 0x0501; -const int GAD_DISPLAY_Y = 0x0502; -const int GAD_FRAMESKIP = 0x0503; -const int GAD_SCREEN_MODE = 0x0504; -const int GAD_AHI_MODE = 0x0505; -const int GAD_NOSOUND = 0x0506; - -const int GAD_SERIALA_DEVICE = 0x0600; // "Serial/Network" pane -const int GAD_SERIALA_UNIT = 0x0601; -const int GAD_SERIALA_ISPAR = 0x0602; -const int GAD_SERIALB_DEVICE = 0x0603; -const int GAD_SERIALB_UNIT = 0x0604; -const int GAD_SERIALB_ISPAR = 0x0605; -const int GAD_ETHER_DEVICE = 0x0606; -const int GAD_ETHER_UNIT = 0x00607; - -const int GAD_RAMSIZE = 0x0700; // "Memory/Misc" pane -const int GAD_MODELID = 0x0701; -const int GAD_ROM_FILE = 0x0702; - - -// Global variables -struct Library *GTLayoutBase = NULL; -static struct FileRequester *dev_request = NULL, *file_request = NULL; - -// gtlayout.library macros -#define VGROUP LT_New(h, LA_Type, VERTICAL_KIND, TAG_END) -#define HGROUP LT_New(h, LA_Type, HORIZONTAL_KIND, TAG_END) -#define ENDGROUP LT_EndGroup(h) - -// Prototypes -static void create_volumes_pane(struct LayoutHandle *h); -static void create_scsi_pane(struct LayoutHandle *h); -static void create_graphics_pane(struct LayoutHandle *h); -static void create_serial_pane(struct LayoutHandle *h); -static void create_memory_pane(struct LayoutHandle *h); -static void add_edit_volume(struct LayoutHandle *h, bool adding); -static void remove_volume(struct LayoutHandle *h); -static void ghost_volumes_gadgets(struct LayoutHandle *h); -static void ghost_graphics_gadgets(struct LayoutHandle *h); -static void screen_mode_req(struct Window *win, struct LayoutHandle *h); -static void ahi_mode_req(struct Window *win, struct LayoutHandle *h); -static void read_settings(struct LayoutHandle *h); - - -/* - * Locale hook - returns string for given ID - */ - -static __saveds __attribute__((regparm(3))) const char *locale_hook_func(struct Hook *hook /*a0*/, void *id /*a1*/, struct LayoutHandle *h /*a2*/) -{ - return GetString((uint32)id); -} - -struct Hook locale_hook = {{NULL, NULL}, (HOOKFUNC)locale_hook_func, NULL, NULL}; - - -/* - * Show preferences editor - * Returns true when user clicked on "Start", false otherwise - */ - -bool PrefsEditor(void) -{ - bool retval = true, done = false; - struct LayoutHandle *h = NULL; - struct Window *win = NULL; - struct Menu *menu = NULL; - - // Pane tabs - static const LONG labels[] = { - STR_VOLUMES_PANE_TITLE, - STR_SCSI_PANE_TITLE, - STR_GRAPHICS_SOUND_PANE_TITLE, - STR_SERIAL_NETWORK_PANE_TITLE, - STR_MEMORY_MISC_PANE_TITLE, - -1 - }; - - // Open gtlayout.library - GTLayoutBase = (struct Library *)OpenLibrary("gtlayout.library", 39); - if (GTLayoutBase == NULL) { - WarningAlert(GetString(STR_NO_GTLAYOUT_LIB_WARN)); - return true; - } - - // Create layout handle - h = LT_CreateHandleTags(NULL, - LAHN_AutoActivate, FALSE, - LAHN_LocaleHook, (ULONG)&locale_hook, - TAG_END - ); - if (h == NULL) - goto quit; - - // Create menus - menu = LT_NewMenuTags( - LAMN_LayoutHandle, (ULONG)h, - LAMN_TitleID, STR_PREFS_MENU, - LAMN_ItemID, STR_PREFS_ITEM_ABOUT, - LAMN_UserData, MSG_ABOUT, - LAMN_ItemText, (ULONG)NM_BARLABEL, - LAMN_ItemID, STR_PREFS_ITEM_START, - LAMN_UserData, MSG_OK, - LAMN_ItemID, STR_PREFS_ITEM_ZAP_PRAM, - LAMN_UserData, MSG_ZAP_PRAM, - LAMN_ItemText, (ULONG)NM_BARLABEL, - LAMN_ItemID, STR_PREFS_ITEM_QUIT, - LAMN_UserData, MSG_CANCEL, - LAMN_KeyText, (ULONG)"Q", - TAG_END - ); - - // Create window contents - VGROUP; - VGROUP; - LT_New(h, LA_Type, TAB_KIND, - LATB_LabelTable, (ULONG)labels, - LATB_AutoPageID, GAD_PAGEGROUP, - LATB_FullWidth, TRUE, - TAG_END - ); - ENDGROUP; - - // Panes - LT_New(h, LA_Type, VERTICAL_KIND, - LA_ID, GAD_PAGEGROUP, - LAGR_ActivePage, 0, - TAG_END - ); - create_volumes_pane(h); - create_scsi_pane(h); - create_graphics_pane(h); - create_serial_pane(h); - create_memory_pane(h); - ENDGROUP; - - // Separator between tabs and buttons - VGROUP; - LT_New(h, LA_Type, XBAR_KIND, - LAXB_FullSize, TRUE, - TAG_END - ); - ENDGROUP; - - // "Start" and "Quit" buttons - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_START_BUTTON, - LA_ID, MSG_OK, - LABT_ReturnKey, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_QUIT_BUTTON, - LA_ID, MSG_CANCEL, - LABT_EscKey, TRUE, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Open window - win = LT_Build(h, - LAWN_TitleID, STR_PREFS_TITLE, - LAWN_Menu, (ULONG)menu, - LAWN_IDCMP, IDCMP_CLOSEWINDOW, - LAWN_BelowMouse, TRUE, - LAWN_SmartZoom, TRUE, - WA_SimpleRefresh, TRUE, - WA_Activate, TRUE, - WA_CloseGadget, TRUE, - WA_DepthGadget, TRUE, - WA_DragBar, TRUE, - TAG_END - ); - if (win == NULL) - goto quit; - - // Create file requesters - dev_request = (struct FileRequester *)AllocAslRequestTags(ASL_FileRequest, - ASLFR_DoPatterns, TRUE, - ASLFR_RejectIcons, TRUE, - ASLFR_InitialDrawer, (ULONG)"DEVS:", - ASLFR_InitialPattern, (ULONG)"#?.device", - TAG_END - ); - file_request = (struct FileRequester *)AllocAslRequestTags(ASL_FileRequest, - ASLFR_DoPatterns, TRUE, - ASLFR_RejectIcons, TRUE, - ASLFR_InitialPattern, (ULONG)"#?", - TAG_END - ); - - // Event loop - do { - struct IntuiMessage *msg; - - // Wait for message - WaitPort(win->UserPort); - - // Get pending messages - while (msg = LT_GetIMsg(h)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - struct Gadget *gad = (struct Gadget *)msg->IAddress; - LT_ReplyIMsg(msg); - - // Handle message according to class - switch (cl) { - case IDCMP_CLOSEWINDOW: - retval = false; - done = true; - break; - - case IDCMP_GADGETUP: - switch (gad->GadgetID) { - case MSG_OK: - read_settings(h); - SavePrefs(); - retval = true; - done = true; - break; - - case MSG_CANCEL: - retval = false; - done = true; - break; - - case GAD_DISK_LIST: - ghost_volumes_gadgets(h); - break; - - case GAD_ADD_VOLUME: - LT_LockWindow(win); - add_edit_volume(h, true); - LT_UnlockWindow(win); - break; - - case GAD_EDIT_VOLUME: - LT_LockWindow(win); - add_edit_volume(h, false); - LT_UnlockWindow(win); - break; - - case GAD_REMOVE_VOLUME: - remove_volume(h); - break; - - case GAD_BOOTDRIVER: - switch (code) { - case 0: - PrefsReplaceInt32("bootdriver", 0); - break; - case 1: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - } - break; - - case GAD_SCSI_MEMTYPE: - PrefsReplaceInt32("scsimemtype", code); - break; - - case GAD_VIDEO_TYPE: - ghost_graphics_gadgets(h); - break; - - case GAD_FRAMESKIP: - switch (code) { - case 0: - PrefsReplaceInt32("frameskip", 12); - break; - case 1: - PrefsReplaceInt32("frameskip", 8); - break; - case 2: - PrefsReplaceInt32("frameskip", 6); - break; - case 3: - PrefsReplaceInt32("frameskip", 4); - break; - case 4: - PrefsReplaceInt32("frameskip", 2); - break; - case 5: - PrefsReplaceInt32("frameskip", 1); - break; - } - break; - - case GAD_MODELID: - switch (code) { - case 0: - PrefsReplaceInt32("modelid", 5); - break; - case 1: - PrefsReplaceInt32("modelid", 14); - break; - } - break; - } - break; - - case IDCMP_IDCMPUPDATE: - switch (gad->GadgetID) { - case GAD_DISK_LIST: // Double-click on volumes list = edit volume - LT_LockWindow(win); - add_edit_volume(h, false); - LT_UnlockWindow(win); - break; - - case GAD_SCREEN_MODE: - screen_mode_req(win, h); - break; - - case GAD_AHI_MODE: - ahi_mode_req(win, h); - break; - - case GAD_CDROM_DEVICE: - case GAD_SCSI0_DEVICE: - case GAD_SCSI1_DEVICE: - case GAD_SCSI2_DEVICE: - case GAD_SCSI3_DEVICE: - case GAD_SCSI4_DEVICE: - case GAD_SCSI5_DEVICE: - case GAD_SCSI6_DEVICE: - case GAD_SERIALA_DEVICE: - case GAD_SERIALB_DEVICE: - if (dev_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(dev_request, - ASLFR_Window, (ULONG)win, - ASLFR_InitialDrawer, (ULONG) "Devs:", - TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, dev_request->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - - case GAD_ETHER_DEVICE: - if (dev_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(dev_request, - ASLFR_Window, (ULONG)win, - ASLFR_InitialDrawer, (ULONG) "Devs:Networks", - TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, dev_request->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - - case GAD_ROM_FILE: - if (file_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(file_request, ASLFR_Window, (ULONG)win, TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, file_request->rf_Dir, 255); - str[255] = 0; - AddPart(str, file_request->rf_File, 255); - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - } - break; - - case IDCMP_MENUPICK: - while (code != MENUNULL) { - struct MenuItem *item = ItemAddress(menu, code); - if (item == NULL) - break; - switch ((ULONG)GTMENUITEM_USERDATA(item)) { - case MSG_OK: - read_settings(h); - SavePrefs(); - retval = true; - done = true; - break; - - case MSG_CANCEL: - retval = false; - done = true; - break; - - case MSG_ABOUT: { - char str[256]; - sprintf(str, GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - strncat(str, "\n", 255); - strncat(str, GetString(STR_ABOUT_TEXT2), 255); - - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_ABOUT_TITLE); - req.es_TextFormat = (UBYTE *)str; - req.es_GadgetFormat = (UBYTE *)GetString(STR_OK_BUTTON); - LT_LockWindow(win); - EasyRequest(win, &req, NULL); - LT_UnlockWindow(win); - break; - } - - case MSG_ZAP_PRAM: - ZapPRAM(); - break; - } - code = item->NextSelect; - } - break; - } - } - } while (!done); - -quit: - // Free requesters - FreeAslRequest(dev_request); - FreeAslRequest(file_request); - - // Delete Menus - LT_DisposeMenu(menu); - - // Delete handle - LT_DeleteHandle(h); - - // Close gtlayout.library - CloseLibrary(GTLayoutBase); - return retval; -} - - -/* - * "Volumes" pane - */ - -static struct List disk_list; -static char cdrom_name[256], extfs_name[256]; -static ULONG cdrom_unit, cdrom_flags, cdrom_start, cdrom_size, cdrom_bsize; -static BYTE bootdriver_num, nocdrom; - -// Read volumes preferences -static void parse_volumes_prefs(void) -{ - NewList(&disk_list); - const char *str; - for (int i=0; (str = PrefsFindString("disk", i)) != NULL; i++) { - struct Node *item = (struct Node *)AllocMem(sizeof(struct Node), MEMF_CLEAR); - item->ln_Name = (char *)str; - AddTail(&disk_list, item); - } - - cdrom_name[0] = 0; - cdrom_unit = 0; cdrom_flags = 0; cdrom_start = 0; cdrom_size = 0; cdrom_bsize = 2048; - - str = PrefsFindString("cdrom"); - if (str) - sscanf(str, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", cdrom_name, &cdrom_unit, &cdrom_flags, &cdrom_start, &cdrom_size, &cdrom_bsize); - - bootdriver_num = 0; - - int bootdriver = PrefsFindInt32("bootdriver"); - switch (bootdriver) { - case 0: - bootdriver_num = 0; - break; - case CDROMRefNum: - bootdriver_num = 1; - break; - } - - nocdrom = PrefsFindBool("nocdrom"); - - extfs_name[0] = 0; - str = PrefsFindString("extfs"); - if (str) - strncpy(extfs_name, str, sizeof(extfs_name) - 1); -} - -// Ghost/unghost "Edit" and "Remove" buttons -static void ghost_volumes_gadgets(struct LayoutHandle *h) -{ - UWORD sel = LT_GetAttributes(h, GAD_DISK_LIST, TAG_END); - if (sel == 0xffff) { - LT_SetAttributes(h, GAD_EDIT_VOLUME, GA_Disabled, TRUE, TAG_END); - LT_SetAttributes(h, GAD_REMOVE_VOLUME, GA_Disabled, TRUE, TAG_END); - } else { - LT_SetAttributes(h, GAD_EDIT_VOLUME, GA_Disabled, FALSE, TAG_END); - LT_SetAttributes(h, GAD_REMOVE_VOLUME, GA_Disabled, FALSE, TAG_END); - } -} - -// Get device data from partition name -static void analyze_partition(const char *part, char *dev_name, ULONG &dev_unit, ULONG &dev_flags, ULONG &dev_start, ULONG &dev_size, ULONG &dev_bsize) -{ - // Remove everything after and including the ':' - char str[256]; - strncpy(str, part, sizeof(str) - 1); - str[sizeof(str) - 1] = 0; - char *colon = strchr(str, ':'); - if (colon) - *colon = 0; - - // Look for partition - struct DosList *dl = LockDosList(LDF_DEVICES | LDF_READ); - dl = FindDosEntry(dl, str, LDF_DEVICES); - if (dl) { - // Get File System Startup Message - struct FileSysStartupMsg *fssm = (struct FileSysStartupMsg *)(dl->dol_misc.dol_handler.dol_Startup << 2); - if (fssm) { - // Get DOS environment vector - struct DosEnvec *de = (struct DosEnvec *)(fssm->fssm_Environ << 2); - if (de && de->de_TableSize >= DE_UPPERCYL) { - // Read settings from FSSM and Envec - strncpy(dev_name, (char *)(fssm->fssm_Device << 2) + 1, 255); - dev_name[255] = 0; - dev_unit = fssm->fssm_Unit; - dev_flags = fssm->fssm_Flags; - dev_start = de->de_BlocksPerTrack * de->de_Surfaces * de->de_LowCyl; - dev_size = de->de_BlocksPerTrack * de->de_Surfaces * (de->de_HighCyl - de->de_LowCyl + 1); - dev_bsize = de->de_SizeBlock << 2; - } - } - } - UnLockDosList(LDF_DEVICES | LDF_READ); -} - -// Display and handle "Add/Edit Volume" window -static void add_edit_volume(struct LayoutHandle *h2, bool adding) -{ - bool ok_clicked = false; - - UWORD sel = LT_GetAttributes(h2, GAD_DISK_LIST, TAG_END); - if ((sel == 0xffff) && !adding) - return; - - char dev_name[256] = ""; - char file_name[256] = ""; - ULONG dev_unit = 0, dev_flags = 0, dev_start = 0, dev_size = 0, dev_bsize = 512; - BYTE read_only = false, is_device = false; - - if (!adding) { - const char *str = PrefsFindString("disk", sel); - if (str == NULL) - return; - if (str[0] == '*') { - read_only = true; - str++; - } - if (strstr(str, "/dev/") == str) { - is_device = true; - sscanf(str, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", dev_name, &dev_unit, &dev_flags, &dev_start, &dev_size, &dev_bsize); - } else { - strncpy(file_name, str, sizeof(file_name) - 1); - file_name[sizeof(file_name) - 1] = 0; - } - } - - // Create layout handle - struct LayoutHandle *h = NULL; - struct Window *win = NULL; - h = LT_CreateHandleTags(NULL, - LAHN_AutoActivate, FALSE, - LAHN_LocaleHook, (ULONG)&locale_hook, - TAG_END - ); - if (h == NULL) - return; - - // Create window contents - VGROUP; - // Volume gadgets - VGROUP; - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_VOL_READONLY_CTRL, - LA_ID, GAD_VOLUME_READONLY, - LA_BYTE, (ULONG)&read_only, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_VOL_TYPE_CTRL, - LA_ID, GAD_VOLUME_TYPE, - LACY_AutoPageID, GAD_VOLUME_PAGEGROUP, - LACY_FirstLabel, STR_VOL_FILE_LAB, - LACY_LastLabel, STR_VOL_DEVICE_LAB, - LA_BYTE, (ULONG)&is_device, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_ID, GAD_VOLUME_PAGEGROUP, - LAGR_ActivePage, is_device, - TAG_END - ); - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_VOL_FILE_CTRL, - LA_ID, GAD_VOLUME_FILE, - LA_Chars, 20, - LA_STRPTR, (ULONG)file_name, - GTST_MaxChars, sizeof(file_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_VOLUME_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)dev_name, - GTST_MaxChars, sizeof(dev_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_VOLUME_UNIT, - LA_LONG, (ULONG)&dev_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_OPENFLAGS_CTRL, - LA_ID, GAD_VOLUME_OPENFLAGS, - LA_LONG, (ULONG)&dev_flags, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_STARTBLOCK_CTRL, - LA_ID, GAD_VOLUME_STARTBLOCK, - LA_LONG, (ULONG)&dev_start, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_SIZE_CTRL, - LA_ID, GAD_VOLUME_SIZE, - LA_LONG, (ULONG)&dev_size, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_BLOCKSIZE_CTRL, - LA_ID, GAD_VOLUME_BLOCKSIZE, - LA_LONG, (ULONG)&dev_bsize, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Separator between gadgets and buttons - VGROUP; - LT_New(h, LA_Type, XBAR_KIND, - LAXB_FullSize, TRUE, - TAG_END - ); - ENDGROUP; - - // "OK" and "Cancel" buttons - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_OK_BUTTON, - LA_ID, MSG_OK, - LABT_ReturnKey, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_CANCEL_BUTTON, - LA_ID, MSG_CANCEL, - LABT_EscKey, TRUE, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Open window - win = LT_Build(h, - LAWN_TitleID, adding ? STR_ADD_VOLUME_TITLE : STR_EDIT_VOLUME_TITLE, - LAWN_IDCMP, IDCMP_CLOSEWINDOW, - LAWN_BelowMouse, TRUE, - LAWN_SmartZoom, TRUE, - WA_SimpleRefresh, TRUE, - WA_Activate, TRUE, - WA_CloseGadget, TRUE, - WA_DepthGadget, TRUE, - WA_DragBar, TRUE, - TAG_END - ); - if (win == NULL) { - LT_DeleteHandle(h); - return; - } - - // Event loop - bool done = false; - do { - struct IntuiMessage *msg; - - // Wait for message - WaitPort(win->UserPort); - - // Get pending messages - while (msg = LT_GetIMsg(h)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - struct Gadget *gad = (struct Gadget *)msg->IAddress; - LT_ReplyIMsg(msg); - - // Handle message according to class - switch (cl) { - case IDCMP_CLOSEWINDOW: - done = true; - break; - - case IDCMP_GADGETUP: - switch (gad->GadgetID) { - case MSG_OK: - ok_clicked = true; - done = true; - break; - case MSG_CANCEL: - done = true; - break; - } - break; - - case IDCMP_IDCMPUPDATE: { - struct FileRequester *req = NULL; - switch (gad->GadgetID) { - case GAD_VOLUME_FILE: - req = file_request; - goto do_req; - case GAD_VOLUME_DEVICE: - req = dev_request; -do_req: if (req) { - LT_LockWindow(win); - BOOL result = AslRequestTags(req, ASLFR_Window, (ULONG)win, TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - if (gad->GadgetID == GAD_VOLUME_FILE) { - strncpy(str, req->rf_Dir, 255); - str[255] = 0; - AddPart(str, req->rf_File, 255); - } else { - if (strlen(req->rf_File)) { - strncpy(str, req->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - } else if (strlen(req->rf_Dir) && req->rf_Dir[strlen(req->rf_Dir) - 1] == ':') { - analyze_partition(req->rf_Dir, str, dev_unit, dev_flags, dev_start, dev_size, dev_bsize); - LT_SetAttributes(h, GAD_VOLUME_UNIT, GTIN_Number, dev_unit, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_OPENFLAGS, GTIN_Number, dev_flags, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_STARTBLOCK, GTIN_Number, dev_start, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_SIZE, GTIN_Number, dev_size, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_BLOCKSIZE, GTIN_Number, dev_bsize, TAG_END); - } - } - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - } - break; - } - } - } - } while (!done); - - // Update preferences and list view - if (ok_clicked) { - char str[256]; - LT_UpdateStrings(h); - - if (is_device) - sprintf(str, "%s/dev/%s/%ld/%ld/%ld/%ld/%ld", read_only ? "*" : "", dev_name, dev_unit, dev_flags, dev_start, dev_size, dev_bsize); - else - sprintf(str, "%s%s", read_only ? "*" : "", file_name); - LT_SetAttributes(h2, GAD_DISK_LIST, GTLV_Labels, ~0, TAG_END); - - if (adding) { - - // Add new item - int i; - PrefsAddString("disk", str); - struct Node *item = (struct Node *)AllocMem(sizeof(struct Node), MEMF_CLEAR); - for (i=0; PrefsFindString("disk", i); i++) ; - item->ln_Name = (char *)PrefsFindString("disk", i - 1); - AddTail(&disk_list, item); - - } else { - - // Replace existing item - PrefsReplaceString("disk", str, sel); - struct Node *item = disk_list.lh_Head; - for (int i=0; item->ln_Succ; i++) { - if (i == sel) { - item->ln_Name = (char *)PrefsFindString("disk", sel); - break; - } - item = item->ln_Succ; - } - } - LT_SetAttributes(h2, GAD_DISK_LIST, GTLV_Labels, (ULONG)&disk_list, TAG_END); - ghost_volumes_gadgets(h2); - } - - // Delete handle - LT_DeleteHandle(h); -} - -// Remove volume from list -static void remove_volume(struct LayoutHandle *h) -{ - UWORD sel = LT_GetAttributes(h, GAD_DISK_LIST, TAG_END); - if (sel != 0xffff) { - - // Remove item from preferences and list view - LT_SetAttributes(h, GAD_DISK_LIST, GTLV_Labels, ~0, TAG_END); - PrefsRemoveItem("disk", sel); - struct Node *item = disk_list.lh_Head; - for (int i=0; item->ln_Succ; i++) { - struct Node *next = item->ln_Succ; - if (i == sel) { - Remove(item); - FreeMem(item, sizeof(struct Node)); - break; - } - item = next; - } - LT_SetAttributes(h, GAD_DISK_LIST, GTLV_Labels, (ULONG)&disk_list, GTLV_Selected, 0xffff, TAG_END); - ghost_volumes_gadgets(h); - } -} - -// Read settings from gadgets and set preferences -static void read_volumes_settings(void) -{ - struct Node *item = disk_list.lh_Head; - while (item->ln_Succ) { - struct Node *next = item->ln_Succ; - Remove(item); - FreeMem(item, sizeof(struct Node)); - item = next; - } - - if (strlen(cdrom_name)) { - char str[256]; - sprintf(str, "/dev/%s/%ld/%ld/%ld/%ld/%ld", cdrom_name, cdrom_unit, cdrom_flags, cdrom_start, cdrom_size, cdrom_bsize); - PrefsReplaceString("cdrom", str); - } else - PrefsRemoveItem("cdrom"); - - PrefsReplaceBool("nocdrom", nocdrom); - - if (strlen(extfs_name)) - PrefsReplaceString("extfs", extfs_name); -} - -// Create "Volumes" pane -static void create_volumes_pane(struct LayoutHandle *h) -{ - parse_volumes_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_VOLUMES_CTRL, - TAG_END - ); - VGROUP; - LT_New(h, LA_Type, LISTVIEW_KIND, - LA_ID, GAD_DISK_LIST, - LA_Chars, 20, - GTLV_Labels, (ULONG)&disk_list, - LALV_Lines, 6, - LALV_Link, (ULONG)NIL_LINK, - LALV_ResizeX, TRUE, - LALV_ResizeY, TRUE, - LALV_Selected, 0, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_ADD_VOLUME_BUTTON, - LA_ID, GAD_ADD_VOLUME, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_EDIT_VOLUME_BUTTON, - LA_ID, GAD_EDIT_VOLUME, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_REMOVE_VOLUME_BUTTON, - LA_ID, GAD_REMOVE_VOLUME, - TAG_END - ); - ENDGROUP; - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_CDROM_DRIVE_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_CDROM_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)cdrom_name, - GTST_MaxChars, sizeof(cdrom_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_CDROM_UNIT, - LA_LONG, (ULONG)&cdrom_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_BOOTDRIVER_CTRL, - LA_ID, GAD_BOOTDRIVER, - LACY_FirstLabel, STR_BOOT_ANY_LAB, - LACY_LastLabel, STR_BOOT_CDROM_LAB, - LA_BYTE, (ULONG)&bootdriver_num, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_NOCDROM_CTRL, - LA_ID, GAD_NOCDROM, - LA_BYTE, (ULONG)&nocdrom, - TAG_END - ); - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_EXTFS_CTRL, - LA_ID, GAD_EXTFS, - LA_Chars, 20, - LA_STRPTR, (ULONG)extfs_name, - GTST_MaxChars, sizeof(extfs_name) - 1, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "SCSI" pane - */ - -static char scsi_dev[6][256]; -static LONG scsi_unit[6]; -static LONG scsi_memtype; - -// Read SCSI preferences -static void parse_scsi_prefs(void) -{ - for (int i=0; i<7; i++) { - scsi_dev[i][0] = 0; - scsi_unit[i] = 0; - - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", i); - const char *str = PrefsFindString(prefs_name); - if (str) - sscanf(str, "%[^/]/%ld", scsi_dev[i], &scsi_unit[i]); - } - - scsi_memtype = PrefsFindInt32("scsimemtype"); -} - -// Read settings from gadgets and set preferences -static void read_scsi_settings(void) -{ - for (int i=0; i<7; i++) { - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", i); - - if (strlen(scsi_dev[i])) { - char str[256]; - sprintf(str, "%s/%ld", scsi_dev[i], scsi_unit[i]); - PrefsReplaceString(prefs_name, str); - } else - PrefsRemoveItem(prefs_name); - } -} - -// Create "SCSI" pane -static void create_scsi_pane(struct LayoutHandle *h) -{ - parse_scsi_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SCSI_DEVICES_CTRL, - TAG_END - ); - for (int i=0; i<7; i++) { - HGROUP; - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_SCSI_ID_0 + i, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SCSI0_DEVICE + i, - LA_Chars, 20, - LA_STRPTR, (ULONG)scsi_dev[i], - GTST_MaxChars, sizeof(scsi_dev[i]) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SCSI0_UNIT + i, - LA_Chars, 4, - LA_LONG, (ULONG)&scsi_unit[i], - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - } - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_SCSI_MEMTYPE_CTRL, - LA_ID, GAD_SCSI_MEMTYPE, - LACY_FirstLabel, STR_MEMTYPE_CHIP_LAB, - LACY_LastLabel, STR_MEMTYPE_ANY_LAB, - LA_LONG, (ULONG)&scsi_memtype, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "Graphics/Sound" pane - */ - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_PIP, - DISPLAY_SCREEN -}; - -static LONG display_type; -static LONG dis_width, dis_height; -static ULONG mode_id; -static BYTE frameskip_num; -static struct NameInfo mode_name; -static ULONG ahi_id; -static char ahi_mode_name[256]; -static BYTE nosound; - -// Read graphics preferences -static void parse_graphics_prefs(void) -{ - display_type = DISPLAY_WINDOW; - dis_width = 512; - dis_height = 384; - mode_id = 0; - ahi_id = AHI_DEFAULT_ID; - ahi_mode_name[0] = 0; - - frameskip_num = 0; - int frameskip = PrefsFindInt32("frameskip"); - switch (frameskip) { - case 12: - frameskip_num = 0; - break; - case 8: - frameskip_num = 1; - break; - case 6: - frameskip_num = 2; - break; - case 4: - frameskip_num = 3; - break; - case 2: - frameskip_num = 4; - break; - case 1: - frameskip_num = 5; - break; - } - - const char *str = PrefsFindString("screen"); - if (str) { - if (sscanf(str, "win/%ld/%ld", &dis_width, &dis_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(str, "pip/%ld/%ld", &dis_width, &dis_height) == 2) - display_type = DISPLAY_PIP; - else if (sscanf(str, "scr/%08lx", &mode_id) == 1) - display_type = DISPLAY_SCREEN; - } - - GetDisplayInfoData(NULL, (UBYTE *)&mode_name, sizeof(mode_name), DTAG_NAME, mode_id); - - str = PrefsFindString("sound"); - if (str) { - if (sscanf(str, "ahi/%08lx", &ahi_id) == 1 && AHIBase) { - AHI_GetAudioAttrs(ahi_id, NULL, - AHIDB_Name, (ULONG)ahi_mode_name, - AHIDB_BufferLen, sizeof(ahi_mode_name) - 1, - TAG_END - ); - } - } - nosound = PrefsFindBool("nosound"); -} - -// Ghost/unghost graphics gadgets, depending on display type -static void ghost_graphics_gadgets(struct LayoutHandle *h) -{ - bool dis_xy, dis_skip, dis_mode; - switch (display_type) { - case DISPLAY_WINDOW: - dis_xy = false; - dis_skip = false; - dis_mode = true; - break; - case DISPLAY_PIP: - dis_xy = false; - dis_skip = true; - dis_mode = true; - break; - case DISPLAY_SCREEN: - dis_xy = true; - dis_skip = true; - dis_mode = false; - break; - } - LT_SetAttributes(h, GAD_DISPLAY_X, GA_Disabled, dis_xy, TAG_END); - LT_SetAttributes(h, GAD_DISPLAY_Y, GA_Disabled, dis_xy, TAG_END); - LT_SetAttributes(h, GAD_FRAMESKIP, GA_Disabled, dis_skip, TAG_END); - LT_SetAttributes(h, GAD_SCREEN_MODE, GA_Disabled, dis_mode, TAG_END); - LT_SetAttributes(h, GAD_AHI_MODE, GA_Disabled, AHIBase == NULL, TAG_END); -} - -// Show screen mode requester -static void screen_mode_req(struct Window *win, struct LayoutHandle *h) -{ - if (P96Base == NULL && CyberGfxBase == NULL) - return; - - LT_LockWindow(win); - - ULONG id; - - // Try P96 first, because it also provides a (fake) cybergraphics.library - if (P96Base) { - id = p96RequestModeIDTags( - P96MA_MinDepth, 8, - P96MA_FormatsAllowed, RGBFF_CLUT | RGBFF_R5G5B5 | RGBFF_A8R8G8B8, - TAG_END - ); - } else { - UWORD ModelArray[] = { PIXFMT_LUT8, PIXFMT_RGB15, PIXFMT_ARGB32, 0, ~0 }; - id = (ULONG) CModeRequestTags(NULL, - CYBRMREQ_MinDepth, 8, - CYBRMREQ_CModelArray, (ULONG) ModelArray, - TAG_END - ); - } - LT_UnlockWindow(win); - - if (id != INVALID_ID) { - mode_id = id; - GetDisplayInfoData(NULL, (UBYTE *)&mode_name, sizeof(mode_name), DTAG_NAME, mode_id); - LT_SetAttributes(h, GAD_SCREEN_MODE, GTTX_Text, (ULONG)mode_name.Name, TAG_END); - } -} - -// Show AHI mode requester -static void ahi_mode_req(struct Window *win, struct LayoutHandle *h) -{ - if (AHIBase == NULL) - return; - - struct AHIAudioModeRequester *req = AHI_AllocAudioRequest( - AHIR_Window, (ULONG)win, - TAG_END - ); - if (req == NULL) - return; - - LT_LockWindow(win); - BOOL ok = AHI_AudioRequest(req, - AHIR_InitialAudioID, ahi_id, - TAG_END - ); - LT_UnlockWindow(win); - - if (ok) { - ahi_id = req->ahiam_AudioID; - AHI_GetAudioAttrs(ahi_id, NULL, - AHIDB_Name, (ULONG)ahi_mode_name, - AHIDB_BufferLen, sizeof(ahi_mode_name) - 1, - TAG_END - ); - LT_SetAttributes(h, GAD_AHI_MODE, GTTX_Text, (ULONG)ahi_mode_name, TAG_END); - } - AHI_FreeAudioRequest(req); -} - -// Read settings from gadgets and set preferences -static void read_graphics_settings(void) -{ - char str[256]; - switch (display_type) { - case DISPLAY_WINDOW: - sprintf(str, "win/%ld/%ld", dis_width, dis_height); - break; - case DISPLAY_PIP: - sprintf(str, "pip/%ld/%ld", dis_width, dis_height); - break; - case DISPLAY_SCREEN: - sprintf(str, "scr/%08lx", mode_id); - break; - default: - PrefsRemoveItem("screen"); - return; - } - PrefsReplaceString("screen", str); - - sprintf(str, "ahi/%08lx", ahi_id); - PrefsReplaceString("sound", str); - - PrefsReplaceBool("nosound", nosound); -} - -// Create "Graphics/Sound" pane -static void create_graphics_pane(struct LayoutHandle *h) -{ - parse_graphics_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_GRAPHICS_CTRL, - TAG_END - ); - static const LONG labels[] = {STR_WINDOW_LAB, STR_PIP_LAB, STR_FULLSCREEN_LAB, -1}; - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_VIDEO_TYPE_CTRL, - LA_ID, GAD_VIDEO_TYPE, - LACY_LabelTable, (ULONG)labels, - LA_LONG, (ULONG)&display_type, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_DISPLAY_X_CTRL, - LA_ID, GAD_DISPLAY_X, - LA_LONG, (ULONG)&dis_width, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_DISPLAY_Y_CTRL, - LA_ID, GAD_DISPLAY_Y, - LA_LONG, (ULONG)&dis_height, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, POPUP_KIND, - LA_LabelID, STR_FRAMESKIP_CTRL, - LA_ID, GAD_FRAMESKIP, - LAPU_FirstLabel, STR_REF_5HZ_LAB, - LAPU_LastLabel, STR_REF_60HZ_LAB, - LA_BYTE, (ULONG)&frameskip_num, - TAG_END - ); - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_SCREEN_MODE_CTRL, - LA_ID, GAD_SCREEN_MODE, - LA_Chars, DISPLAYNAMELEN, - LATX_Picker, TRUE, - GTTX_Text, (ULONG)mode_name.Name, - GTTX_Border, TRUE, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SOUND_CTRL, - TAG_END - ); - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_AHI_MODE_CTRL, - LA_ID, GAD_AHI_MODE, - LA_Chars, DISPLAYNAMELEN, - LATX_Picker, TRUE, - GTTX_Text, (ULONG)ahi_mode_name, - GTTX_Border, TRUE, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_NOSOUND_CTRL, - LA_ID, GAD_NOSOUND, - LA_BYTE, (ULONG)&nosound, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - ghost_graphics_gadgets(h); -} - - -/* - * "Serial/Network" pane - */ - -static char seriala_dev[256], serialb_dev[256]; -static LONG seriala_unit, serialb_unit; -static BYTE seriala_ispar, serialb_ispar; - -static char ether_dev[256]; -static ULONG ether_unit; - -// Read serial/network preferences -static void parse_ser_prefs(const char *prefs, char *dev, LONG &unit, BYTE &ispar) -{ - dev[0] = 0; - unit = 0; - ispar = false; - - const char *str = PrefsFindString(prefs); - if (str) { - if (str[0] == '*') { - ispar = true; - str++; - } - sscanf(str, "%[^/]/%ld", dev, &unit); - } -} - -static void parse_serial_prefs(void) -{ - parse_ser_prefs("seriala", seriala_dev, seriala_unit, seriala_ispar); - parse_ser_prefs("serialb", serialb_dev, serialb_unit, serialb_ispar); - - ether_dev[0] = 0; - ether_unit = 0; - - const char *str = PrefsFindString("ether"); - if (str) { - const char *FirstSlash = strchr(str, '/'); - const char *LastSlash = strrchr(str, '/'); - - if (FirstSlash && FirstSlash && FirstSlash != LastSlash) { - // Device name contains path, i.e. "Networks/xyzzy.device" - const char *lp = str; - char *dp = ether_dev; - - while (lp != LastSlash) - *dp++ = *lp++; - *dp = '\0'; - - sscanf(LastSlash, "/%ld", ðer_unit); - -// printf("dev=<%s> unit=%d\n", ether_dev, ether_unit); - } else { - sscanf(str, "%[^/]/%ld", ether_dev, ðer_unit); - } - } -} - -// Set serial preference item -static void make_serial_prefs(const char *prefs, const char *dev, LONG unit, BYTE ispar) -{ - if (strlen(dev)) { - char str[256]; - sprintf(str, "%s%s/%ld", ispar ? "*" : "", dev, unit); - PrefsReplaceString(prefs, str); - } else - PrefsRemoveItem(prefs); -} - -// Read settings from gadgets and set preferences -static void read_serial_settings(void) -{ - make_serial_prefs("seriala", seriala_dev, seriala_unit, seriala_ispar); - make_serial_prefs("serialb", serialb_dev, serialb_unit, serialb_ispar); - - if (strlen(ether_dev)) { - char str[256]; - - sprintf(str, "%s/%ld", ether_dev, ether_unit); - PrefsReplaceString("ether", str); - } else - PrefsRemoveItem("ether"); -} - -// Create "Serial/Network" pane -static void create_serial_pane(struct LayoutHandle *h) -{ - parse_serial_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SERIALA_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SERIALA_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)seriala_dev, - GTST_MaxChars, sizeof(seriala_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SERIALA_UNIT, - LA_LONG, (ULONG)&seriala_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_ISPAR_CTRL, - LA_ID, GAD_SERIALA_ISPAR, - LA_BYTE, (ULONG)&seriala_ispar, - TAG_END - ); - ENDGROUP; - - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SERIALB_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SERIALB_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)serialb_dev, - GTST_MaxChars, sizeof(serialb_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SERIALB_UNIT, - LA_LONG, (ULONG)&serialb_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_ISPAR_CTRL, - LA_ID, GAD_SERIALB_ISPAR, - LA_BYTE, (ULONG)&serialb_ispar, - TAG_END - ); - ENDGROUP; - - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_ETHERNET_IF_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_ETHER_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)ether_dev, - GTST_MaxChars, sizeof(ether_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_ETHER_UNIT, - LA_LONG, (ULONG)ðer_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "Memory/Misc" pane - */ - -static ULONG ramsize_mb; -static BYTE model_num; -static char rom_file[256]; - -// Read memory/misc preferences -static void parse_memory_prefs(void) -{ - ramsize_mb = PrefsFindInt32("ramsize") >> 20; - - model_num = 0; - int id = PrefsFindInt32("modelid"); - switch (id) { - case 5: - model_num = 0; - break; - case 14: - model_num = 1; - break; - } - - rom_file[0] = 0; - const char *str = PrefsFindString("rom"); - if (str) { - strncpy(rom_file, str, sizeof(rom_file) - 1); - rom_file[sizeof(rom_file) - 1] = 0; - } -} - -// Read settings from gadgets and set preferences -static void read_memory_settings(void) -{ - PrefsReplaceInt32("ramsize", ramsize_mb << 20); - - if (strlen(rom_file)) - PrefsReplaceString("rom", rom_file); - else - PrefsRemoveItem("rom"); -} - -// Create "Memory/Misc" pane -static void create_memory_pane(struct LayoutHandle *h) -{ - parse_memory_prefs(); - - VGROUP; - LT_New(h, LA_Type, LEVEL_KIND, - LA_LabelID, STR_RAMSIZE_SLIDER, - LA_ID, GAD_RAMSIZE, - LA_Chars, 20, - LA_LONG, (ULONG)&ramsize_mb, - GTSL_LevelFormat, (ULONG)GetString(STR_RAMSIZE_FMT), - GTSL_Min, 1, - GTSL_Max, AvailMem(MEMF_LARGEST) >> 20, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_MODELID_CTRL, - LA_ID, GAD_MODELID, - LACY_FirstLabel, STR_MODELID_5_LAB, - LACY_LastLabel, STR_MODELID_14_LAB, - LA_BYTE, (ULONG)&model_num, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_ROM_FILE_CTRL, - LA_ID, GAD_ROM_FILE, - LA_Chars, 20, - LA_STRPTR, (ULONG)rom_file, - GTST_MaxChars, sizeof(rom_file) - 1, - LAST_Picker, TRUE, - TAG_END - ); - ENDGROUP; -} - - -/* - * Read settings from gadgets and set preferences - */ - -static void read_settings(struct LayoutHandle *h) -{ - LT_UpdateStrings(h); - read_volumes_settings(); - read_scsi_settings(); - read_graphics_settings(); - read_serial_settings(); - read_memory_settings(); -} diff --git a/BasiliskII/src/AmigaOS/scsi_amiga.cpp b/BasiliskII/src/AmigaOS/scsi_amiga.cpp deleted file mode 100644 index c660eb268..000000000 --- a/BasiliskII/src/AmigaOS/scsi_amiga.cpp +++ /dev/null @@ -1,289 +0,0 @@ -/* - * scsi_amiga.cpp - SCSI Manager, Amiga specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#define __USE_SYSBASE -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static struct SCSICmd scsi; - -static IOStdReq *ios[8*8]; // IORequests for 8 units and 8 LUNs each -static IOStdReq *io; // Active IORequest (selected target) - -static struct MsgPort *the_port = NULL; // Message port for device communication - -static ULONG buffer_size; // Size of data buffer -static UBYTE *buffer = NULL; // Pointer to data buffer -static ULONG buffer_memf; // Buffer memory flags - -static UBYTE cmd_buffer[12]; // Buffer for SCSI command - -const int SENSE_LENGTH = 256; -static UBYTE *sense_buffer = NULL; // Buffer for autosense data - -static bool direct_transfers_supported = false; // Direct data transfers (bypassing the buffer) are supported - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - int id, lun; - - int memtype = PrefsFindInt32("scsimemtype"); - switch (memtype) { - case 1: - buffer_memf = MEMF_24BITDMA | MEMF_PUBLIC; - break; - case 2: - buffer_memf = MEMF_ANY | MEMF_PUBLIC; - direct_transfers_supported = true; - break; - default: - buffer_memf = MEMF_CHIP | MEMF_PUBLIC; - break; - } - - // Create port and buffers - the_port = CreateMsgPort(); - buffer = (UBYTE *)AllocMem(buffer_size = 0x10000, buffer_memf); - sense_buffer = (UBYTE *)AllocMem(SENSE_LENGTH, MEMF_CHIP | MEMF_PUBLIC); - if (the_port == NULL || buffer == NULL || sense_buffer == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - - // Create and open IORequests for all 8 units (and all 8 LUNs) - for (id=0; id<8; id++) { - for (lun=0; lun<8; lun++) - ios[id*8+lun] = NULL; - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", id); - const char *str = PrefsFindString(prefs_name); - if (str) { - char dev_name[256]; - ULONG dev_unit = 0; - if (sscanf(str, "%[^/]/%ld", dev_name, &dev_unit) == 2) { - for (lun=0; lun<8; lun++) { - struct IOStdReq *io = (struct IOStdReq *)CreateIORequest(the_port, sizeof(struct IOStdReq)); - if (io == NULL) - continue; - if (OpenDevice((UBYTE *) dev_name, dev_unit + lun * 10, (struct IORequest *)io, 0)) { - DeleteIORequest(io); - continue; - } - io->io_Data = &scsi; - io->io_Length = sizeof(scsi); - io->io_Command = HD_SCSICMD; - ios[id*8+lun] = io; - } - } - } - } - - // Reset SCSI bus - SCSIReset(); - - // Init SCSICmd - memset(&scsi, 0, sizeof(scsi)); - scsi.scsi_Command = cmd_buffer; - scsi.scsi_SenseData = sense_buffer; - scsi.scsi_SenseLength = SENSE_LENGTH; -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - // Close all devices - for (int i=0; i<8; i++) - for (int j=0; j<8; j++) { - struct IOStdReq *io = ios[i*8+j]; - if (io) { - CloseDevice((struct IORequest *)io); - DeleteIORequest(io); - } - } - - // Delete port and buffers - if (the_port) - DeleteMsgPort(the_port); - if (buffer) - FreeMem(buffer, buffer_size); - if (sense_buffer) - FreeMem(sense_buffer, SENSE_LENGTH); -} - - -/* - * Check if requested data size fits into buffer, allocate new buffer if needed - */ - -static bool try_buffer(int size) -{ - if (size <= buffer_size) - return true; - - UBYTE *new_buffer = (UBYTE *)AllocMem(size, buffer_memf); - if (new_buffer == NULL) - return false; - FreeMem(buffer, buffer_size); - buffer = new_buffer; - buffer_size = size; - return true; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - scsi.scsi_CmdLength = cmd_length; - memcpy(cmd_buffer, cmd, cmd_length); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return ios[id * 8] != NULL; -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - struct IOStdReq *new_io = ios[id * 8 + lun]; - if (new_io == NULL) - return false; - if (new_io != io) - scsi.scsi_SenseActual = 0; // Clear sense data when selecting new target - io = new_io; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error); timeout is in 1/60 sec - */ - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - // Bypass the buffer if there's only one S/G table entry - bool do_direct_transfer = (sg_size == 1 && ((uint32)sg_ptr[0] & 1) == 0 && direct_transfers_supported); - - if (!do_direct_transfer) { - - // Check if buffer is large enough, allocate new buffer if needed - if (!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - // Process S/G table when writing - if (!reading) { - D(bug(" writing to buffer\n")); - uint8 *buffer_ptr = buffer; - for (int i=0; i -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// These messages are sent to the serial process -const uint32 MSG_QUERY = 'qery'; // Query port status, return status in control_io -const uint32 MSG_SET_PARAMS = 'setp'; // Set serial parameters (parameters in control_io) -const uint32 MSG_SET_PAR_PARAMS = 'pstp'; // Set parallel parameters (parameters in control_io) -const uint32 MSG_KILL_IO = 'kill'; // Kill pending I/O requests -const uint32 MSG_BREAK = 'brek'; // Send break -const uint32 MSG_RESET = 'rset'; // Reset channel -const uint32 MSG_PRIME_IN = 'prin'; // Data input -const uint32 MSG_PRIME_OUT = 'pout'; // Data output - -struct SerMessage : public Message { - SerMessage(uint32 what_, const struct MsgPort *reply_port = NULL) - { - what = what_; - mn_ReplyPort = (struct MsgPort *)reply_port; - mn_Length = sizeof(*this); - } - uint32 what; - uint32 pb; -}; - - -// Driver private variables -class ASERDPort : public SERDPort { -public: - ASERDPort(const char *dev) - { - device_name = dev; - if (dev && dev[0] == '*') { - is_parallel = true; - device_name++; - } else - is_parallel = false; - control_io = NULL; - serial_proc = NULL; - reply_port = NULL; - } - - virtual ~ASERDPort() - { - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - void send_to_proc(uint32 what, uint32 pb = 0); - bool query(void); - bool set_params(void); - bool set_par_params(void); - void conv_error(struct IOExtSer *io, uint32 dt); - static void serial_func(void); - - const char *device_name; // Device name - bool is_parallel; // Flag: Port is parallel - IOExtSer *control_io; // IORequest for setting serial port characteristics etc. - - struct Process *serial_proc; // Serial device handler process - bool proc_error; // Flag: process didn't initialize - struct MsgPort *proc_port; // Message port of process, for communication with main task - struct MsgPort *reply_port; // Reply port for communication with process - - uint8 err_mask; // shkErrs -}; - - -// Global variables -static void *proc_arg; // Argument to process -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -/* - * Initialization - */ - -void SerialInit(void) -{ - // Read serial preferences and create structs for both ports - the_serd_port[0] = new ASERDPort(PrefsFindString("seriala")); - the_serd_port[1] = new ASERDPort(PrefsFindString("serialb")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - delete (ASERDPort *)the_serd_port[0]; - delete (ASERDPort *)the_serd_port[1]; -} - - -/* - * Open serial port - */ - -int16 ASERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (device_name == NULL) - return openErr; - - // Init variables - err_mask = 0; - - // Create message port - reply_port = CreateMsgPort(); - if (reply_port == NULL) - goto open_error; - - // Start process - proc_error = false; - proc_arg = this; - SetSignal(0, SIGF_SINGLE); - serial_proc = CreateNewProcTags( - NP_Entry, (ULONG)serial_func, - NP_Name, (ULONG)"Basilisk II Serial Task", - NP_Priority, 1, - TAG_END - ); - if (serial_proc == NULL) - goto open_error; - - // Wait for signal from process - Wait(SIGF_SINGLE); - - // Initialization error? Then bail out - if (proc_error) - goto open_error; - - // Configure port - configure(config); - return noErr; - -open_error: - serial_proc = NULL; - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return openErr; -} - - -/* - * Read data from port - */ - -int16 ASERDPort::prime_in(uint32 pb, uint32 dce) -{ - // Send input command to serial process - D(bug("primein\n")); - read_done = false; - read_pending = true; - WriteMacInt32(input_dt + serdtDCE, dce); - send_to_proc(MSG_PRIME_IN, pb); - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 ASERDPort::prime_out(uint32 pb, uint32 dce) -{ - // Send output command to serial process - D(bug("primeout\n")); - write_done = false; - write_pending = true; - WriteMacInt32(output_dt + serdtDCE, dce); - send_to_proc(MSG_PRIME_OUT, pb); - return 1; // Command in progress -} - - -/* - * Control calls - */ - -int16 ASERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - D(bug("control(%ld)\n", (uint32)code)); - switch (code) { - case 1: // KillIO - send_to_proc(MSG_KILL_IO); - return noErr; - - case kSERDConfiguration: - if (configure(ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: { - if (is_parallel) - return noErr; - int buf = ReadMacInt16(pb + csParam + 4) & 0xffffffc0; - if (buf < 1024) // 1k minimum - buf = 1024; - D(bug(" buffer size is now %08lx\n", buf)); - control_io->io_RBufLen = buf; - return set_params() ? noErr : paramErr; - } - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDSetBreak: - if (!is_parallel) - send_to_proc(MSG_BREAK); - return noErr; - - case kSERDClearBreak: - return noErr; - - case kSERDBaudRate: - if (is_parallel) - return noErr; - control_io->io_Baud = ReadMacInt16(pb + csParam); - D(bug(" baud rate %ld\n", control_io->io_Baud)); - return set_params() ? noErr : paramErr; - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDClockMIDI: - if (is_parallel) - return noErr; - control_io->io_Baud = 31250; - control_io->io_SerFlags = SERF_XDISABLED | SERF_SHARED; - control_io->io_StopBits = 1; - control_io->io_ReadLen = control_io->io_WriteLen = 8; - return set_params() ? noErr : paramErr; - - case kSERDMiscOptions: - case kSERDAssertDTR: - case kSERDNegateDTR: - case kSERDSetPEChar: - case kSERDSetPEAltChar: - case kSERDAssertRTS: - case kSERDNegateRTS: - return noErr; // Not supported under AmigaOS - - case kSERD115KBaud: - if (is_parallel) - return noErr; - control_io->io_Baud = 115200; - return set_params() ? noErr : paramErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (is_parallel) - return noErr; - control_io->io_Baud = 230400; - return set_params() ? noErr : paramErr; - - case kSERDResetChannel: - send_to_proc(MSG_RESET); - return noErr; - - default: - printf("WARNING: SerialControl(): unimplemented control code %d\n", code); - return controlErr; - } -} - - -/* - * Status calls - */ - -int16 ASERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - D(bug("status(%ld)\n", (uint32)code)); - switch (code) { - case kSERDInputCount: - WriteMacInt32(pb + csParam, 0); - if (!is_parallel) { - if (!query()) - return noErr; - D(bug("status(2) successful, returning %08lx\n", control_io->IOSer.io_Actual)); - WriteMacInt32(pb + csParam, control_io->IOSer.io_Actual); - } - return noErr; - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - if (is_parallel) { - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staCtsHold, 0); - WriteMacInt8(p + staDsrHold, 0); - WriteMacInt8(p + staModemStatus, dsrEvent | dcdEvent | ctsEvent); - } else { - query(); - WriteMacInt8(p + staXOffSent, - (control_io->io_Status & IO_STATF_XOFFREAD ? xOffWasSent : 0) - | (control_io->io_Status & (1 << 6) ? dtrNegated : 0)); // RTS - WriteMacInt8(p + staXOffHold, control_io->io_Status & IO_STATF_XOFFWRITE); - WriteMacInt8(p + staCtsHold, control_io->io_Status & (1 << 4)); // CTS - WriteMacInt8(p + staDsrHold, control_io->io_Status & (1 << 3)); // DSR - WriteMacInt8(p + staModemStatus, - (control_io->io_Status & (1 << 3) ? 0 : dsrEvent) - | (control_io->io_Status & (1 << 2) ? riEvent : 0) - | (control_io->io_Status & (1 << 5) ? 0 : dcdEvent) - | (control_io->io_Status & (1 << 4) ? 0 : ctsEvent) - | (control_io->io_Status & IO_STATF_READBREAK ? breakEvent : 0)); - } - return noErr; - } - - default: - printf("WARNING: SerialStatus(): unimplemented status code %d\n", code); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 ASERDPort::close() -{ - // Stop process - if (serial_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&serial_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - // Delete reply port - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return noErr; -} - - -/* - * Configure serial port with MacOS config word - */ - -bool ASERDPort::configure(uint16 config) -{ - D(bug(" configure %04lx\n", (uint32)config)); - if (is_parallel) - return true; - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - control_io->io_StopBits = 1; - break; - case stop20: - control_io->io_StopBits = 2; - break; - default: - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - control_io->io_SerFlags &= ~SERF_PARTY_ON; - break; - case oddParity: - control_io->io_SerFlags |= SERF_PARTY_ON | SERF_PARTY_ODD; - break; - case evenParity: - control_io->io_SerFlags |= SERF_PARTY_ON; - control_io->io_SerFlags &= ~SERF_PARTY_ODD; - break; - default: - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - case data5: - control_io->io_ReadLen = control_io->io_WriteLen = 5; - break; - case data6: - control_io->io_ReadLen = control_io->io_WriteLen = 6; - break; - case data7: - control_io->io_ReadLen = control_io->io_WriteLen = 7; - break; - case data8: - control_io->io_ReadLen = control_io->io_WriteLen = 8; - break; - } - - // Set baud rate - control_io->io_Baud = 115200 / ((config & 0x03ff) + 2); - return set_params(); -} - - -/* - * Set serial handshaking - */ - -void ASERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - - err_mask = ReadMacInt8(s + shkErrs); - - if (is_parallel) { - - // Parallel handshake - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - ((IOExtPar *)control_io)->io_ParFlags |= PARF_ACKMODE; - else - ((IOExtPar *)control_io)->io_ParFlags &= ~PARF_ACKMODE; - } else { - if (ReadMacInt8(s + shkFCTS)) - ((IOExtPar *)control_io)->io_ParFlags |= PARF_ACKMODE; - else - ((IOExtPar *)control_io)->io_ParFlags &= ~PARF_ACKMODE; - } - set_par_params(); - - } else { - - // Serial handshake - if (ReadMacInt8(s + shkFXOn) || ReadMacInt8(s + shkFInX)) - control_io->io_SerFlags &= ~SERF_XDISABLED; - else - control_io->io_SerFlags |= SERF_XDISABLED; - - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - control_io->io_SerFlags |= SERF_7WIRE; - else - control_io->io_SerFlags &= ~SERF_7WIRE; - } else { - if (ReadMacInt8(s + shkFCTS)) - control_io->io_SerFlags |= SERF_7WIRE; - else - control_io->io_SerFlags &= ~SERF_7WIRE; - } - control_io->io_CtlChar = ReadMacInt16(s + shkXOn) << 16; - set_params(); - } -} - - -/* - * Send message to serial process - */ - -void ASERDPort::send_to_proc(uint32 what, uint32 pb) -{ - D(bug("sending %08lx to serial_proc\n", what)); - SerMessage msg(what, reply_port); - msg.pb = pb; - PutMsg(proc_port, &msg); - WaitPort(reply_port); - GetMsg(reply_port); - D(bug(" sent\n")); -} - - -/* - * Query serial port status - */ - -bool ASERDPort::query(void) -{ - send_to_proc(MSG_QUERY); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Set serial parameters - */ - -bool ASERDPort::set_params(void) -{ - // Set/clear RadBoogie - UBYTE flags = control_io->io_SerFlags; - if (!(flags & SERF_PARTY_ON) && (flags & SERF_XDISABLED) && control_io->io_ReadLen == 8) - control_io->io_SerFlags |= SERF_RAD_BOOGIE; - else - control_io->io_SerFlags &= ~SERF_RAD_BOOGIE; - - // Send message to serial process - send_to_proc(MSG_SET_PARAMS); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Set parallel parameters - */ - -bool ASERDPort::set_par_params(void) -{ - send_to_proc(MSG_SET_PAR_PARAMS); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Convert AmigaOS error code to MacOS error code, set serdtResult and cum_errors - */ - -void ASERDPort::conv_error(struct IOExtSer *io, uint32 dt) -{ - int16 oserr; - uint8 cum; - - BYTE err = io->IOSer.io_Error; - if (err == 0 || err == IOERR_NOCMD) { - oserr = 0; - cum = 0; - } else { - if (is_parallel) { - oserr = (err_mask & framingErr) ? rcvrErr : 0; - cum = framingErr; - } else { - switch (io->IOSer.io_Error) { - case SerErr_DetectedBreak: - oserr = breakRecd; - cum = breakErr; - break; - case SerErr_ParityErr: - oserr = (err_mask & parityErr) ? rcvrErr : 0; - cum = parityErr; - break; - case SerErr_BufOverflow: - oserr = (err_mask & swOverrunErr) ? rcvrErr : 0; - cum = swOverrunErr; - break; - case SerErr_LineErr: - oserr = (err_mask & hwOverrunErr) ? rcvrErr : 0; - cum = hwOverrunErr; - break; - default: - oserr = (err_mask & framingErr) ? rcvrErr : 0; - cum = framingErr; - break; - } - } - } - - WriteMacInt32(dt + serdtResult, oserr); - cum_errors |= cum; -} - - -/* - * Process for communication with the serial.device - */ - -__saveds void ASERDPort::serial_func(void) -{ - struct ASERDPort *obj = (ASERDPort *)proc_arg; - struct MsgPort *proc_port = NULL, *io_port = NULL, *control_port = NULL; - struct IOExtSer *read_io = NULL, *write_io = NULL, *control_io = NULL; - uint8 orig_params[sizeof(struct IOExtSer)]; - bool opened = false; - ULONG io_mask = 0, proc_port_mask = 0; - - // Default: error occured - obj->proc_error = true; - - // Create message port for communication with main task - proc_port = CreateMsgPort(); - if (proc_port == NULL) - goto quit; - proc_port_mask = 1 << proc_port->mp_SigBit; - - // Create message ports for serial.device I/O - io_port = CreateMsgPort(); - if (io_port == NULL) - goto quit; - io_mask = 1 << io_port->mp_SigBit; - control_port = CreateMsgPort(); - if (control_port == NULL) - goto quit; - - // Create IORequests - read_io = (struct IOExtSer *)CreateIORequest(io_port, sizeof(struct IOExtSer)); - write_io = (struct IOExtSer *)CreateIORequest(io_port, sizeof(struct IOExtSer)); - control_io = (struct IOExtSer *)CreateIORequest(control_port, sizeof(struct IOExtSer)); - if (read_io == NULL || write_io == NULL || control_io == NULL) - goto quit; - read_io->IOSer.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - write_io->IOSer.io_Message.mn_Node.ln_Type = 0; - control_io->IOSer.io_Message.mn_Node.ln_Type = 0; - - // Parse device name - char dev_name[256]; - ULONG dev_unit; - if (sscanf(obj->device_name, "%[^/]/%ld", dev_name, &dev_unit) < 2) - goto quit; - - // Open device - if (obj->is_parallel) - ((IOExtPar *)read_io)->io_ParFlags = PARF_SHARED; - else - read_io->io_SerFlags = SERF_SHARED | SERF_7WIRE; - if (OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)read_io, 0) || read_io->IOSer.io_Device == NULL) - goto quit; - opened = true; - - // Copy IORequests - memcpy(write_io, read_io, sizeof(struct IOExtSer)); - memcpy(control_io, read_io, sizeof(struct IOExtSer)); - - // Attach control_io to control_port and set default values - control_io->IOSer.io_Message.mn_ReplyPort = control_port; - if (!obj->is_parallel) { - control_io->io_CtlChar = SER_DEFAULT_CTLCHAR; - control_io->io_RBufLen = 64; - control_io->io_ExtFlags = 0; - control_io->io_Baud = 9600; - control_io->io_BrkTime = 250000; - control_io->io_ReadLen = control_io->io_WriteLen = 8; - control_io->io_StopBits = 1; - control_io->io_SerFlags = SERF_SHARED; - control_io->IOSer.io_Command = SDCMD_SETPARAMS; - DoIO((struct IORequest *)control_io); - memcpy(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - } - - // Initialization went well, inform main task - obj->proc_port = proc_port; - obj->control_io = control_io; - obj->proc_error = false; - Signal(MainTask, SIGF_SINGLE); - - // Main loop - for (;;) { - - // Wait for I/O and messages (CTRL_C is used for quitting the task) - ULONG sig = Wait(proc_port_mask | io_mask | SIGBREAKF_CTRL_C); - - // Main task wants to quit us - if (sig & SIGBREAKF_CTRL_C) - break; - - // Main task sent a command to us - if (sig & proc_port_mask) { - struct SerMessage *msg; - while (msg = (SerMessage *)GetMsg(proc_port)) { - D(bug("serial_proc received %08lx\n", msg->what)); - switch (msg->what) { - case MSG_QUERY: - control_io->IOSer.io_Command = SDCMD_QUERY; - DoIO((struct IORequest *)control_io); - D(bug(" query returned %08lx, actual %08lx\n", control_io->IOSer.io_Error, control_io->IOSer.io_Actual)); - break; - - case MSG_SET_PARAMS: - // Only send SDCMD_SETPARAMS when configuration has changed - if (memcmp(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar))) { - memcpy(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - memcpy(&(read_io->io_CtlChar), &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - memcpy(&(write_io->io_CtlChar), &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - control_io->IOSer.io_Command = SDCMD_SETPARAMS; - D(bug(" params %08lx %08lx %08lx %08lx %08lx %08lx\n", control_io->io_CtlChar, control_io->io_RBufLen, control_io->io_ExtFlags, control_io->io_Baud, control_io->io_BrkTime, *(uint32 *)((uint8 *)control_io + 76))); - DoIO((struct IORequest *)control_io); - D(bug(" set_parms returned %08lx\n", control_io->IOSer.io_Error)); - } - break; - - case MSG_SET_PAR_PARAMS: - control_io->IOSer.io_Command = PDCMD_SETPARAMS; - DoIO((struct IORequest *)control_io); - D(bug(" set_par_parms returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_BREAK: - control_io->IOSer.io_Command = SDCMD_BREAK; - DoIO((struct IORequest *)control_io); - D(bug(" break returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_RESET: - control_io->IOSer.io_Command = CMD_RESET; - DoIO((struct IORequest *)control_io); - D(bug(" reset returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_KILL_IO: - AbortIO((struct IORequest *)read_io); - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)read_io); - WaitIO((struct IORequest *)write_io); - obj->read_pending = obj->write_pending = false; - obj->read_done = obj->write_done = false; - break; - - case MSG_PRIME_IN: - read_io->IOSer.io_Message.mn_Node.ln_Name = (char *)msg->pb; - read_io->IOSer.io_Data = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - read_io->IOSer.io_Length = ReadMacInt32(msg->pb + ioReqCount); - read_io->IOSer.io_Actual = 0; - read_io->IOSer.io_Command = CMD_READ; - D(bug("serial_proc receiving %ld bytes from %08lx\n", read_io->IOSer.io_Length, read_io->IOSer.io_Data)); - SendIO((struct IORequest *)read_io); - break; - - case MSG_PRIME_OUT: { - write_io->IOSer.io_Message.mn_Node.ln_Name = (char *)msg->pb; - write_io->IOSer.io_Data = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - write_io->IOSer.io_Length = ReadMacInt32(msg->pb + ioReqCount); - write_io->IOSer.io_Actual = 0; - write_io->IOSer.io_Command = CMD_WRITE; - D(bug("serial_proc transmitting %ld bytes from %08lx\n", write_io->IOSer.io_Length, write_io->IOSer.io_Data)); -#if MONITOR - bug("Sending serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - for (int i=0; iIOSer.io_Actual, read_io->IOSer.io_Error)); - uint32 pb = (uint32)read_io->IOSer.io_Message.mn_Node.ln_Name; -#if MONITOR - bug("Receiving serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - for (int i=0; iIOSer.io_Actual; i++) { - bug("%02lx ", adr[i]); - } - bug("\n"); -#endif - WriteMacInt32(pb + ioActCount, read_io->IOSer.io_Actual); - obj->conv_error(read_io, obj->input_dt); - obj->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } else if (io == write_io) { - D(bug("write_io complete, %ld bytes sent, error %ld\n", write_io->IOSer.io_Actual, write_io->IOSer.io_Error)); - uint32 pb = (uint32)write_io->IOSer.io_Message.mn_Node.ln_Name; - WriteMacInt32(pb + ioActCount, write_io->IOSer.io_Actual); - obj->conv_error(write_io, obj->output_dt); - obj->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - } - } -quit: - - // Close everything - if (opened) { - if (CheckIO((struct IORequest *)write_io) == 0) { - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)write_io); - } - if (CheckIO((struct IORequest *)read_io) == 0) { - AbortIO((struct IORequest *)read_io); - WaitIO((struct IORequest *)read_io); - } - CloseDevice((struct IORequest *)read_io); - } - if (control_io) - DeleteIORequest(control_io); - if (write_io) - DeleteIORequest(write_io); - if (read_io) - DeleteIORequest(read_io); - if (control_port) - DeleteMsgPort(control_port); - if (io_port) - DeleteMsgPort(io_port); - - // Send signal to main task to confirm termination - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} diff --git a/BasiliskII/src/AmigaOS/sys_amiga.cpp b/BasiliskII/src/AmigaOS/sys_amiga.cpp deleted file mode 100644 index 617df7b0a..000000000 --- a/BasiliskII/src/AmigaOS/sys_amiga.cpp +++ /dev/null @@ -1,1122 +0,0 @@ -/* - * sys_amiga.cpp - System dependent routines, Amiga implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "sys.h" - -#define DEBUG 0 -#include "debug.h" - - -// File handles are pointers to these structures -struct file_handle { - bool is_file; // Flag: plain file or /dev/something? - bool read_only; // Copy of Sys_open() flag - loff_t start_byte; // Size of file header (if any) - loff_t size; // Size of file/device (minus header) - - BPTR f; // AmigaDOS file handle (if is_file == true) - - struct IOStdReq *io; // Pointer to IORequest (if is_file == false) - ULONG block_size; // Block size of device (must be a power of two) - bool is_nsd; // New style device? - bool does_64bit; // Supports 64 bit trackdisk commands? - bool is_ejected; // Volume has been (logically) ejected - bool is_2060scsi; // Enable workaround for 2060scsi.device CD-ROM TD_READ bug -}; - - -// FileInfoBlock (must be global because it has to be on a longword boundary) -static struct FileInfoBlock FIB; - -// Message port for device communication -static struct MsgPort *the_port = NULL; - -// Temporary buffer in chip memory -const int TMP_BUF_SIZE = 0x10000; -static UBYTE *tmp_buf = NULL; - - -/* - * Initialization - */ - -void SysInit(void) -{ - // Create port and temporary buffer - the_port = CreateMsgPort(); - tmp_buf = (UBYTE *)AllocMem(TMP_BUF_SIZE, MEMF_CHIP | MEMF_PUBLIC); - if (the_port == NULL || tmp_buf == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } -} - - -/* - * Deinitialization - */ - -void SysExit(void) -{ - // Delete port and temporary buffer - if (the_port) { - DeleteMsgPort(the_port); - the_port = NULL; - } - if (tmp_buf) { - FreeMem(tmp_buf, TMP_BUF_SIZE); - tmp_buf = NULL; - } -} - - -/* - * This gets called when no "floppy" prefs items are found - * It scans for available floppy drives and adds appropriate prefs items - */ - -void SysAddFloppyPrefs(void) -{ - for (int i=0; i<4; i++) { - ULONG id = GetUnitID(i); - if (id == DRT_150RPM) { // We need an HD drive - char str[256]; - sprintf(str, "/dev/mfm.device/%d/0/0/2880/512", i); - PrefsAddString("floppy", str); - } - } -} - - -/* - * This gets called when no "disk" prefs items are found - * It scans for available HFS volumes and adds appropriate prefs items - */ - -void SysAddDiskPrefs(void) -{ - // AmigaOS doesn't support MacOS partitioning, so this probably doesn't make much sense... -} - - -/* - * This gets called when no "cdrom" prefs items are found - * It scans for available CD-ROM drives and adds appropriate prefs items - */ - -void SysAddCDROMPrefs(void) -{ - // Don't scan for drives if nocdrom option given - if (PrefsFindBool("nocdrom")) - return; - - //!! -} - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ - PrefsAddString("seriala", "serial.device/0"); - PrefsAddString("serialb", "*parallel.device/0"); -} - - -/* - * Open file/device, create new file handle (returns NULL on error) - * - * Format for device names: /dev////// - */ - -void *Sys_open(const char *name, bool read_only) -{ - bool is_file = (strstr(name, "/dev/") != name); - - D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write")); - - // File or device? - if (is_file) { - - // File, open it and get stats - BPTR f = Open((char *)name, MODE_OLDFILE); - if (!f) - return NULL; - if (!ExamineFH(f, &FIB)) { - Close(f); - return NULL; - } - - // Check if file is write protected - if (FIB.fib_Protection & FIBF_WRITE) - read_only = true; - - // Create file_handle - file_handle *fh = new file_handle; - fh->f = f; - fh->is_file = true; - fh->read_only = read_only; - - // Detect disk image file layout - loff_t size = FIB.fib_Size; - Seek(fh->f, 0, OFFSET_BEGINNING); - Read(fh->f, tmp_buf, 256); - FileDiskLayout(size, tmp_buf, fh->start_byte, fh->size); - return fh; - - } else { - - // Device, parse string - char dev_name[256]; - ULONG dev_unit = 0, dev_flags = 0, dev_start = 0, dev_size = 16, dev_bsize = 512; - if (sscanf(name, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", dev_name, &dev_unit, &dev_flags, &dev_start, &dev_size, &dev_bsize) < 2) - return NULL; - - // Create IORequest - struct IOStdReq *io = (struct IOStdReq *)CreateIORequest(the_port, sizeof(struct IOExtTD)); - if (io == NULL) - return NULL; - - // Open device - if (OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)io, dev_flags)) { - D(bug(" couldn't open device\n")); - DeleteIORequest(io); - return NULL; - } - - // Check for new style device - bool is_nsd = false, does_64bit = false; - struct NSDeviceQueryResult nsdqr; - nsdqr.DevQueryFormat = 0; - nsdqr.SizeAvailable = 0; - io->io_Command = NSCMD_DEVICEQUERY; - io->io_Length = sizeof(nsdqr); - io->io_Data = (APTR)&nsdqr; - LONG error = DoIO((struct IORequest *)io); - D(bug("DEVICEQUERY returned %ld (length %ld, actual %ld)\n", error, io->io_Length, io->io_Actual)); - if ((!error) && (io->io_Actual >= 16) && (io->io_Actual <= sizeof(nsdqr)) && (nsdqr.SizeAvailable == io->io_Actual)) { - - // Looks like an NSD - is_nsd = true; - D(bug(" new style device, type %ld\n", nsdqr.DeviceType)); - - // We only work with trackdisk-like devices - if (nsdqr.DeviceType != NSDEVTYPE_TRACKDISK) { - CloseDevice((struct IORequest *)io); - DeleteIORequest(io); - return NULL; - } - - // Check whether device is 64 bit capable - UWORD *cmdcheck; - for (cmdcheck = nsdqr.SupportedCommands; *cmdcheck; cmdcheck++) { - if (*cmdcheck == NSCMD_TD_READ64) { - D(bug(" supports 64 bit commands\n")); - does_64bit = true; - } - } - } - - // Create file_handle - file_handle *fh = new file_handle; - fh->io = io; - fh->is_file = false; - fh->read_only = read_only; - fh->start_byte = (loff_t)dev_start * dev_bsize; - fh->size = (loff_t)dev_size * dev_bsize; - fh->block_size = dev_bsize; - fh->is_nsd = is_nsd; - fh->does_64bit = does_64bit; - fh->is_ejected = false; - fh->is_2060scsi = (strcmp(dev_name, "2060scsi.device") == 0); - return fh; - } -} - - -/* - * Close file/device, delete file handle - */ - -void Sys_close(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - D(bug("Sys_close(%08lx)\n", arg)); - - // File or device? - if (fh->is_file) { - - // File, simply close it - Close(fh->f); - - } else { - - // Device, close it and delete IORequest - fh->io->io_Command = CMD_UPDATE; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_MOTOR; - fh->io->io_Length = 0; - DoIO((struct IORequest *)fh->io); - - CloseDevice((struct IORequest *)fh->io); - DeleteIORequest(fh->io); - } - delete fh; -} - - -/* - * Send one I/O request, using 64-bit addressing if the device supports it - */ - -static loff_t send_io_request(file_handle *fh, bool writing, ULONG length, loff_t offset, APTR data) -{ - if (fh->does_64bit) { - fh->io->io_Command = writing ? NSCMD_TD_WRITE64 : NSCMD_TD_READ64; - fh->io->io_Actual = offset >> 32; - } else { - fh->io->io_Command = writing ? CMD_WRITE : CMD_READ; - fh->io->io_Actual = 0; - } - fh->io->io_Length = length; - fh->io->io_Offset = offset; - fh->io->io_Data = data; - - if (fh->is_2060scsi && fh->block_size == 2048) { - - // 2060scsi.device has serious problems reading CD-ROMs via TD_READ - static struct SCSICmd scsi; - const int SENSE_LENGTH = 256; - static UBYTE sense_buffer[SENSE_LENGTH]; // Buffer for autosense data - static UBYTE cmd_buffer[10] = { 0x28, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; - - D(bug("send_io_request length=%lu offset=%lu\n", length, (ULONG) offset)); - - memset(sense_buffer, 0, sizeof(sense_buffer)); - - scsi.scsi_Command = cmd_buffer; - scsi.scsi_CmdLength = sizeof(cmd_buffer); - scsi.scsi_SenseData = sense_buffer; - scsi.scsi_SenseLength = SENSE_LENGTH; - scsi.scsi_Flags = SCSIF_AUTOSENSE | (writing ? SCSIF_WRITE : SCSIF_READ); - scsi.scsi_Data = (UWORD *) data; - scsi.scsi_Length = length; - - ULONG block_offset = (ULONG) offset / fh->block_size; - ULONG block_length = length / fh->block_size; - - cmd_buffer[2] = block_offset >> 24; - cmd_buffer[3] = block_offset >> 16; - cmd_buffer[4] = block_offset >> 8; - cmd_buffer[5] = block_offset & 0xff; - - cmd_buffer[7] = block_length >> 8; - cmd_buffer[8] = block_length & 0xff; - - fh->io->io_Command = HD_SCSICMD; - fh->io->io_Actual = 0; - fh->io->io_Offset = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - - BYTE result = DoIO((struct IORequest *)fh->io); - - if (result) { - D(bug("send_io_request SCSI FAIL result=%lu\n", result)); - - if (result == HFERR_BadStatus) { - D(bug("send_io_request SCSI Status=%lu\n", scsi.scsi_Status)); - if (scsi.scsi_Status == 2) { - D(bug("send_io_request Sense Key=%02lx\n", sense_buffer[2] & 0x0f)); - D(bug("send_io_request ASC=%02lx ASCQ=%02lx\n", sense_buffer[12], sense_buffer[13])); - } - } - return 0; - } - - D(bug("send_io_request SCSI Actual=%lu\n", scsi.scsi_Actual)); - - if (scsi.scsi_Actual != length) - return 0; - - return scsi.scsi_Actual; - - } else { - -// if (DoIO((struct IORequest *)fh->io) || fh->io->io_Actual != length) - if (DoIO((struct IORequest *)fh->io)) - { - D(bug("send_io_request/%ld: Actual=%lu length=%lu Err=%ld\n", __LINE__, fh->io->io_Actual, length, fh->io->io_Error)); - return 0; - } - return fh->io->io_Actual; - } -} - - -/* - * Read "length" bytes from file/device, starting at "offset", to "buffer", - * returns number of bytes read (or 0) - */ - -size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - - D(bug("Sys_read/%ld length=%ld\n", __LINE__, length)); - - // File or device? - if (fh->is_file) { - - // File, seek to position - if (Seek(fh->f, offset + fh->start_byte, OFFSET_BEGINNING) == -1) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - - // Read data - LONG actual = Read(fh->f, buffer, length); - if (actual == -1) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - else - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, actual)); - return actual; - } - - } else { - - // Device, pre-read (partial read of first block) necessary? - loff_t pos = offset + fh->start_byte; - size_t actual = 0; - uint32 pre_offset = pos % fh->block_size; - if (pre_offset) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data to destination buffer - size_t pre_length = fh->block_size - pre_offset; - if (pre_length > length) - pre_length = length; - memcpy(buffer, tmp_buf + pre_offset, pre_length); - - // Adjust data pointers - buffer = (uint8 *)buffer + pre_length; - pos += pre_length; - length -= pre_length; - actual += pre_length; - } - - // Main read (complete reads of middle blocks) possible? - if (length >= fh->block_size) { - - // Yes, read blocks - size_t main_length = length & ~(fh->block_size - 1); - if (send_io_request(fh, false, main_length, pos, buffer) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + main_length; - pos += main_length; - length -= main_length; - actual += main_length; - } - - // Post-read (partial read of last block) necessary? - if (length) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data to destination buffer - memcpy(buffer, tmp_buf, length); - actual += length; - } - - D(bug("Sys_read/%ld return %ld\n", __LINE__, actual)); - return actual; - } -} - - -/* - * Write "length" bytes from "buffer" to file/device, starting at "offset", - * returns number of bytes written (or 0) - */ - -size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - D(bug("Sys_write/%ld length=%ld\n", __LINE__, length)); - - // File or device? - if (fh->is_file) { - - // File, seek to position if necessary - if (Seek(fh->f, offset + fh->start_byte, OFFSET_BEGINNING) == -1) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Write data - LONG actual = Write(fh->f, buffer, length); - if (actual == -1) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - else - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, actual)); - return actual; - } - - } else { - - // Device, pre-write (partial write of first block) necessary - loff_t pos = offset + fh->start_byte; - size_t actual = 0; - uint32 pre_offset = pos % fh->block_size; - if (pre_offset) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data from source buffer - size_t pre_length = fh->block_size - pre_offset; - if (pre_length > length) - pre_length = length; - memcpy(tmp_buf + pre_offset, buffer, pre_length); - - // Write block back - if (send_io_request(fh, true, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + pre_length; - pos += pre_length; - length -= pre_length; - actual += pre_length; - } - - // Main write (complete writes of middle blocks) possible? - if (length >= fh->block_size) { - - // Yes, write blocks - size_t main_length = length & ~(fh->block_size - 1); - if (send_io_request(fh, true, main_length, pos, buffer) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + main_length; - pos += main_length; - length -= main_length; - actual += main_length; - } - - // Post-write (partial write of last block) necessary? - if (length) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data from source buffer - memcpy(buffer, tmp_buf, length); - - // Write block back - if (send_io_request(fh, true, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - actual += length; - } - - D(bug("Sys_write/%ld return %ld\n", __LINE__, actual)); - return actual; - } -} - - -/* - * Return size of file/device (minus header) - */ - -loff_t SysGetFileSize(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - return fh->size; -} - - -/* - * Eject volume (if applicable) - */ - -void SysEject(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Flush buffer, turn off the drive motor and eject volume - fh->io->io_Command = CMD_UPDATE; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_MOTOR; - fh->io->io_Length = 0; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_EJECT; - fh->io->io_Length = 1; - DoIO((struct IORequest *)fh->io); - - fh->is_ejected = true; - } -} - - -/* - * Format volume (if applicable) - */ - -bool SysFormat(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - //!! - return true; -} - - -/* - * Check if file/device is read-only (this includes the read-only flag on Sys_open()) - */ - -bool SysIsReadOnly(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) { - - // File, return flag given to Sys_open - return fh->read_only; - - } else { - - // Device, check write protection - fh->io->io_Command = TD_PROTSTATUS; - DoIO((struct IORequest *)fh->io); - if (fh->io->io_Actual) - return true; - else - return fh->read_only; - } -} - - -/* - * Check if the given file handle refers to a fixed or a removable disk - */ - -bool SysIsFixedDisk(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - return true; -} - - -/* - * Check if a disk is inserted in the drive (always true for files) - */ - -bool SysIsDiskInserted(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return true; - else { - - // Check medium status - fh->io->io_Command = TD_CHANGESTATE; - fh->io->io_Actual = 0; - DoIO((struct IORequest *)fh->io); - bool inserted = (fh->io->io_Actual == 0); - - if (!inserted) { - // Disk was ejected and has now been taken out - fh->is_ejected = false; - } - - if (fh->is_ejected) { - // Disk was ejected but has not yet been taken out, report it as - // no longer in the drive - return false; - } else - return inserted; - } -} - - -/* - * Prevent medium removal (if applicable) - */ - -void SysPreventRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send PREVENT ALLOW MEDIUM REMOVAL SCSI command - struct SCSICmd scsi; - static const UBYTE the_cmd[6] = {0x1e, 0, 0, 0, 1, 0}; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)the_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Allow medium removal (if applicable) - */ - -void SysAllowRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send PREVENT ALLOW MEDIUM REMOVAL SCSI command - struct SCSICmd scsi; - static const UBYTE the_cmd[6] = {0x1e, 0, 0, 0, 0, 0}; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)the_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Read CD-ROM TOC (binary MSF format, 804 bytes max.) - */ - -bool SysCDReadTOC(void *arg, uint8 *toc) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send READ TOC MSF SCSI command - struct SCSICmd scsi; - static const UBYTE read_toc_cmd[10] = {0x43, 0x02, 0, 0, 0, 0, 0, 0x03, 0x24, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 804; - scsi.scsi_Command = (UBYTE *)read_toc_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - memcpy(toc, tmp_buf, 804); - return true; - } -} - - -/* - * Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard) - */ - -bool SysCDGetPosition(void *arg, uint8 *pos) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send READ SUB-CHANNEL SCSI command - struct SCSICmd scsi; - static const UBYTE read_subq_cmd[10] = {0x42, 0x02, 0x40, 0x01, 0, 0, 0, 0, 0x10, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 16; - scsi.scsi_Command = (UBYTE *)read_subq_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - memcpy(pos, tmp_buf, 16); - return true; - } -} - - -/* - * Play CD audio - */ - -bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PLAY AUDIO MSF SCSI command - struct SCSICmd scsi; - UBYTE play_cmd[10] = {0x47, 0, 0, start_m, start_s, start_f, end_m, end_s, end_f, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = play_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Pause CD audio - */ - -bool SysCDPause(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PAUSE RESUME SCSI command - struct SCSICmd scsi; - static const UBYTE pause_cmd[10] = {0x4b, 0, 0, 0, 0, 0, 0, 0, 0, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)pause_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Resume paused CD audio - */ - -bool SysCDResume(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PAUSE RESUME SCSI command - struct SCSICmd scsi; - static const UBYTE resume_cmd[10] = {0x4b, 0, 0, 0, 0, 0, 0, 0, 1, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)resume_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Stop CD audio - */ - -bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - uint8 end_m = lead_out_m; - uint8 end_s = lead_out_s; - uint8 end_f = lead_out_f + 1; - if (end_f >= 75) { - end_f = 0; - end_s++; - if (end_s >= 60) { - end_s = 0; - end_m++; - } - } - - // Send PLAY AUDIO MSF SCSI command (play first frame of lead-out area) - struct SCSICmd scsi; - UBYTE play_cmd[10] = {0x47, 0, 0, lead_out_m, lead_out_s, lead_out_f, end_m, end_s, end_f, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = play_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Perform CD audio fast-forward/fast-reverse operation starting from specified address - */ - -bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - //!! - return false; -} - - -/* - * Set CD audio volume (0..255 each channel) - */ - -void SysCDSetVolume(void *arg, uint8 left, uint8 right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send MODE SENSE (CD-ROM Audio Control Parameters Page) SCSI command - struct SCSICmd scsi; - static const UBYTE mode_sense_cmd[6] = {0x1a, 0x08, 0x0e, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_sense_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return; - - tmp_buf[6] = 0x04; // Immed - tmp_buf[9] = 0; // LBA/sec format - tmp_buf[10] = 0; // LBA/sec - tmp_buf[11] = 0; - tmp_buf[13] = left; // Port 0 volume - tmp_buf[15] = right; // Port 1 volume - - // Send MODE SELECT (CD-ROM Audio Control Parameters Page) SCSI command - static const UBYTE mode_select_cmd[6] = {0x15, 0x10, 0, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_select_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_WRITE; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Get CD audio volume (0..255 each channel) - */ - -void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send MODE SENSE (CD-ROM Audio Control Parameters Page) SCSI command - struct SCSICmd scsi; - static const UBYTE mode_sense_cmd[6] = {0x1a, 0x08, 0x0e, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_sense_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return; - left = tmp_buf[13]; // Port 0 volume - right = tmp_buf[15]; // Port 1 volume - } -} diff --git a/BasiliskII/src/AmigaOS/sysdeps.h b/BasiliskII/src/AmigaOS/sysdeps.h deleted file mode 100644 index 895058301..000000000 --- a/BasiliskII/src/AmigaOS/sysdeps.h +++ /dev/null @@ -1,76 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for AmigaOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#include -#include -#include -#include -#include -#include -#include - -#include "user_strings_amiga.h" - -// Mac and host address space are the same -#define REAL_ADDRESSING 1 - -// Using 68k natively -#define EMULATED_68K 0 - -// Mac ROM is not write protected -#define ROM_IS_WRITE_PROTECTED 0 -#define USE_SCRATCHMEM_SUBTERFUGE 1 - -// ExtFS is supported -#define SUPPORTS_EXTFS 1 - -// mon is not supported -#undef ENABLE_MON - -// Data types -typedef unsigned char uint8; -typedef signed char int8; -typedef unsigned short uint16; -typedef signed short int16; -typedef unsigned long uint32; -typedef signed long int32; -typedef unsigned long long uint64; -typedef signed long long int64; - -typedef unsigned long long loff_t; - -// Time data type for Time Manager emulation -typedef struct timeval tm_time_t; - -// Endianess conversion (not needed) -#define ntohs(x) (x) -#define ntohl(x) (x) -#define htons(x) (x) -#define htonl(x) (x) - -// Some systems don't define this (ExecBase->AttnFlags) -#ifndef AFF_68060 -#define AFF_68060 (1L<<7) -#endif - -#endif diff --git a/BasiliskII/src/AmigaOS/timer_amiga.cpp b/BasiliskII/src/AmigaOS/timer_amiga.cpp deleted file mode 100644 index ce5fd5156..000000000 --- a/BasiliskII/src/AmigaOS/timer_amiga.cpp +++ /dev/null @@ -1,157 +0,0 @@ -/* - * timer_amiga.cpp - Time Manager emulation, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "sysdeps.h" -#include "timer.h" - -#define DEBUG 0 -#include "debug.h" - - -/* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); - struct timeval tv; - GetSysTime(&tv); - uint64 tl = (uint64)tv.tv_secs * 1000000 + tv.tv_micro; - hi = tl >> 32; - lo = tl; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - ULONG secs, mics; - CurrentTime(&secs, &mics); - return secs + 0x8b31ef80; -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ - GetSysTime(&t); -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a; - AddTime(&res, &b); -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a; - SubTime(&res, &b); -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ - return CmpTime(&b, &a); -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ - if (mactime > 0) { - res.tv_secs = mactime / 1000; // Time in milliseconds - res.tv_micro = (mactime % 1000) * 1000; - } else { - res.tv_secs = -mactime / 1000000; // Time in negative microseconds - res.tv_micro = -mactime % 1000000; - } -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime.tv_secs < 0) - return 0; - else { - uint64 t = (uint64)hosttime.tv_secs * 1000000 + hosttime.tv_micro; - if (t > 0x7fffffff) - return t / 1000; // Time in milliseconds - else - return -t; // Time in negative microseconds - } -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -void idle_wait(void) -{ - // XXX if you implement this make sure to call idle_resume() from TriggerInterrupt() -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ -} diff --git a/BasiliskII/src/AmigaOS/user_strings_amiga.cpp b/BasiliskII/src/AmigaOS/user_strings_amiga.cpp deleted file mode 100644 index 5b41a5879..000000000 --- a/BasiliskII/src/AmigaOS/user_strings_amiga.cpp +++ /dev/null @@ -1,85 +0,0 @@ -/* - * user_strings_amiga.cpp - AmigaOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under AmigaOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "Amiga Root"}, - {STR_EXTFS_NAME, "Amiga Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "Amiga"}, - - // Purely platform-specific strings - {STR_NO_PREPARE_EMUL_ERR, "PrepareEmul is not installed. Run PrepareEmul and then try again to start Basilisk II."}, - {STR_NO_GADTOOLS_LIB_ERR, "Cannot open gadtools.library V39."}, - {STR_NO_IFFPARSE_LIB_ERR, "Cannot open iffparse.library V39."}, - {STR_NO_ASL_LIB_ERR, "Cannot open asl.library V36."}, - {STR_NO_TIMER_DEV_ERR, "Cannot open timer.device."}, - {STR_NO_P96_MODE_ERR, "The selected screen mode is not a Picasso96 or CyberGraphX mode."}, - {STR_NO_VIDEO_MODE_ERR, "Cannot obtain selected video mode."}, - {STR_WRONG_SCREEN_DEPTH_ERR, "Basilisk II only supports 8, 16 or 24 bit screens."}, - {STR_WRONG_SCREEN_FORMAT_ERR, "Basilisk II only supports big-endian chunky ARGB screen modes."}, - {STR_ENFORCER_RUNNING_ERR, "Enforcer/CyberGuard is running. Remove and then try again to start Basilisk II."}, - - {STR_NOT_ETHERNET_WARN, "The selected network device is not an Ethernet device. Networking will be disabled."}, - {STR_NO_MULTICAST_WARN, "Your Ethernet card does not support multicast and is not usable with AppleTalk. Please report this to the manufacturer of the card."}, - {STR_NO_GTLAYOUT_LIB_WARN, "Cannot open gtlayout.library V39. The preferences editor GUI will not be available."}, - {STR_NO_AHI_WARN, "Cannot open ahi.device V2. Audio output will be disabled."}, - {STR_NO_AHI_CTRL_WARN, "Cannot open AHI control structure. Audio output will be disabled."}, - {STR_NOT_ENOUGH_MEM_WARN, "Could not get %lu MBytes of memory.\nShould I use the largest Block (%lu MBytes) instead ?"}, - - {STR_AHI_MODE_CTRL, "AHI Mode"}, - {STR_SCSI_MEMTYPE_CTRL, "Buffer Memory Type"}, - {STR_MEMTYPE_CHIP_LAB, "Chip"}, - {STR_MEMTYPE_24BITDMA_LAB, "24-Bit DMA"}, - {STR_MEMTYPE_ANY_LAB, "Any"}, - {STR_SCSI_DEVICES_CTRL, "Virtual SCSI Devices"}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/BasiliskII/src/AmigaOS/user_strings_amiga.h b/BasiliskII/src/AmigaOS/user_strings_amiga.h deleted file mode 100644 index 8903e5e80..000000000 --- a/BasiliskII/src/AmigaOS/user_strings_amiga.h +++ /dev/null @@ -1,51 +0,0 @@ -/* - * user_strings_amiga.h - AmigaOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 USER_STRINGS_AMIGA_H -#define USER_STRINGS_AMIGA_H - -enum { - STR_NO_PREPARE_EMUL_ERR = 10000, - STR_NO_GADTOOLS_LIB_ERR, - STR_NO_IFFPARSE_LIB_ERR, - STR_NO_ASL_LIB_ERR, - STR_NO_TIMER_DEV_ERR, - STR_NO_P96_MODE_ERR, - STR_NO_VIDEO_MODE_ERR, - STR_WRONG_SCREEN_DEPTH_ERR, - STR_WRONG_SCREEN_FORMAT_ERR, - STR_ENFORCER_RUNNING_ERR, - - STR_NOT_ETHERNET_WARN, - STR_NO_MULTICAST_WARN, - STR_NO_GTLAYOUT_LIB_WARN, - STR_NO_AHI_WARN, - STR_NO_AHI_CTRL_WARN, - STR_NOT_ENOUGH_MEM_WARN, - - STR_AHI_MODE_CTRL, - STR_SCSI_MEMTYPE_CTRL, - STR_MEMTYPE_CHIP_LAB, - STR_MEMTYPE_24BITDMA_LAB, - STR_MEMTYPE_ANY_LAB, - STR_SCSI_DEVICES_CTRL -}; - -#endif diff --git a/BasiliskII/src/AmigaOS/video_amiga.cpp b/BasiliskII/src/AmigaOS/video_amiga.cpp deleted file mode 100644 index 5e870a9c2..000000000 --- a/BasiliskII/src/AmigaOS/video_amiga.cpp +++ /dev/null @@ -1,1165 +0,0 @@ -/* - * video_amiga.cpp - Video/graphics emulation, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" - -#define DEBUG 0 -#include "debug.h" - - -// Supported video modes -static vector VideoModes; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_PIP, - DISPLAY_SCREEN_P96, - DISPLAY_SCREEN_CGFX -}; - -// Global variables -static int32 frame_skip; -static UWORD *null_pointer = NULL; // Blank mouse pointer data -static UWORD *current_pointer = (UWORD *)-1; // Currently visible mouse pointer data -static struct Process *periodic_proc = NULL; // Periodic process - -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -// Amiga -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, 0x1a, // ` 1 2 3 4 5 6 7 - 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x2a, 0xff, 0x52, // 8 9 0 - = \ inv 0 - 0x0c, 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, // Q W E R T Y U I - 0x1f, 0x23, 0x21, 0x1e, 0xff, 0x53, 0x54, 0x55, // O P [ ] inv 1 2 3 - 0x00, 0x01, 0x02, 0x03, 0x05, 0x04, 0x26, 0x28, // A S D F G H J K - 0x25, 0x29, 0x27, 0x2a, 0xff, 0x56, 0x57, 0x58, // L ; ' # inv 4 5 6 - 0x32, 0x06, 0x07, 0x08, 0x09, 0x0b, 0x2d, 0x2e, // < Z X C V B N M - 0x2b, 0x2f, 0x2c, 0xff, 0x41, 0x59, 0x5b, 0x5c, // , . / inv . 7 8 9 - 0x31, 0x33, 0x30, 0x4c, 0x24, 0x35, 0x75, 0xff, // SPC BSP TAB ENT RET ESC DEL inv - 0xff, 0xff, 0x4e, 0xff, 0x3e, 0x3d, 0x3c, 0x3b, // inv inv - inv CUP CDN CRT CLF - 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, 0x62, 0x64, // F1 F2 F3 F4 F5 F6 F7 F8 - 0x65, 0x6d, 0x47, 0x51, 0x4b, 0x43, 0x45, 0x72, // F9 F10 ( ) / * + HLP - 0x38, 0x38, 0x39, 0x36, 0x3a, 0x3a, 0x37, 0x37, // SHL SHR CAP CTL ALL ALR AML AMR - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - - -class Amiga_monitor_desc : public monitor_desc { -public: - Amiga_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id, int default_display_type) - : monitor_desc(available_modes, default_depth, default_id), display_type(default_display_type) {}; - ~Amiga_monitor_desc() {}; - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -public: - int display_type; // See enum above -}; - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(Amiga_monitor_desc &m); - virtual ~driver_base(); - - virtual void set_palette(uint8 *pal, int num) {}; - virtual struct BitMap *get_bitmap() { return NULL; }; -public: - Amiga_monitor_desc &monitor; // Associated video monitor - const video_mode &mode; // Video mode handled by the driver - BOOL init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - struct Window *the_win; -}; - - -class driver_window : public driver_base { -public: - driver_window(Amiga_monitor_desc &m, int width, int height); - ~driver_window(); - - struct BitMap *get_bitmap() { return the_bitmap; }; - -private: - LONG black_pen, white_pen; - struct BitMap *the_bitmap; -}; - -class driver_pip : public driver_base { -public: - driver_pip(Amiga_monitor_desc &m, int width, int height); - ~driver_pip(); - - struct BitMap *get_bitmap() { return the_bitmap; }; - -private: - struct BitMap *the_bitmap; -}; - -class driver_screen_p96 : public driver_base { -public: - driver_screen_p96(Amiga_monitor_desc &m, ULONG mode_id); - ~driver_screen_p96(); - - void set_palette(uint8 *pal, int num); - -private: - struct Screen *the_screen; -}; - -class driver_screen_cgfx : public driver_base { -public: - driver_screen_cgfx(Amiga_monitor_desc &m, ULONG mode_id); - ~driver_screen_cgfx(); - - void set_palette(uint8 *pal, int num); - -private: - struct Screen *the_screen; -}; - - -static driver_base *drv = NULL; // Pointer to currently used driver object - - - -// Prototypes -static void periodic_func(void); -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth); -static void add_modes(uint32 width, uint32 height, video_depth depth); -static ULONG find_mode_for_depth(uint32 width, uint32 height, uint32 depth); -static ULONG bits_from_depth(video_depth depth); -static bool is_valid_modeid(int display_type, ULONG mode_id); -static bool check_modeid_p96(ULONG mode_id); -static bool check_modeid_cgfx(ULONG mode_id); - - -/* - * Initialization - */ - - -bool VideoInit(bool classic) -{ - video_depth default_depth = VDEPTH_1BIT; - int default_width, default_height; - int default_display_type = DISPLAY_WINDOW; - int window_width, window_height; // width and height for window display - ULONG screen_mode_id; // mode ID for screen display - - // Allocate blank mouse pointer data - null_pointer = (UWORD *)AllocMem(12, MEMF_PUBLIC | MEMF_CHIP | MEMF_CLEAR); - if (null_pointer == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - return false; - } - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Get screen mode from preferences - const char *mode_str; - if (classic) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - default_width = window_width = 512; - default_height = window_height = 384; - - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &window_width, &window_height) == 2) - default_display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "pip/%d/%d", &window_width, &window_height) == 2 && P96Base) - default_display_type = DISPLAY_PIP; - else if (sscanf(mode_str, "scr/%08lx", &screen_mode_id) == 1 && (CyberGfxBase || P96Base)) { - if (P96Base && p96GetModeIDAttr(screen_mode_id, P96IDA_ISP96)) - default_display_type = DISPLAY_SCREEN_P96; - else if (CyberGfxBase && IsCyberModeID(screen_mode_id)) - default_display_type = DISPLAY_SCREEN_CGFX; - else { - ErrorAlert(STR_NO_P96_MODE_ERR); - return false; - } - } - } - - D(bug("default_display_type %d, window_width %d, window_height %d\n", default_display_type, window_width, window_height)); - - // Construct list of supported modes - switch (default_display_type) { - case DISPLAY_WINDOW: - default_width = window_width; - default_height = window_height; - default_depth = VDEPTH_1BIT; - add_modes(window_width, window_height, VDEPTH_1BIT); - break; - - case DISPLAY_PIP: - default_width = window_width; - default_height = window_height; - default_depth = VDEPTH_16BIT; - add_modes(window_width, window_height, VDEPTH_16BIT); - break; - - case DISPLAY_SCREEN_P96: - case DISPLAY_SCREEN_CGFX: - struct DimensionInfo dimInfo; - DisplayInfoHandle handle = FindDisplayInfo(screen_mode_id); - - if (handle == NULL) - return false; - - if (GetDisplayInfoData(handle, (UBYTE *) &dimInfo, sizeof(dimInfo), DTAG_DIMS, 0) <= 0) - return false; - - default_width = 1 + dimInfo.Nominal.MaxX - dimInfo.Nominal.MinX; - default_height = 1 + dimInfo.Nominal.MaxY - dimInfo.Nominal.MinY; - - switch (dimInfo.MaxDepth) { - case 1: - default_depth = VDEPTH_1BIT; - break; - case 8: - default_depth = VDEPTH_8BIT; - break; - case 15: - case 16: - default_depth = VDEPTH_16BIT; - break; - case 24: - case 32: - default_depth = VDEPTH_32BIT; - break; - } - - for (unsigned d=VDEPTH_8BIT; d<=VDEPTH_32BIT; d++) { - ULONG mode_id = find_mode_for_depth(default_width, default_height, bits_from_depth(video_depth(d))); - - if (is_valid_modeid(default_display_type, mode_id)) - add_modes(default_width, default_height, video_depth(d)); - } - break; - } - -#if DEBUG - bug("Available video modes:\n"); - vector::const_iterator i = VideoModes.begin(), end = VideoModes.end(); - while (i != end) { - bug(" %ld x %ld (ID %02lx), %ld colors\n", i->x, i->y, i->resolution_id, 1 << bits_from_depth(i->depth)); - ++i; - } -#endif - - D(bug("VideoInit/%ld: def_width=%ld def_height=%ld def_depth=%ld\n", \ - __LINE__, default_width, default_height, default_depth)); - - // Find requested default mode and open display - if (VideoModes.size() == 1) { - uint32 default_id ; - - // Create Amiga_monitor_desc for this (the only) display - default_id = VideoModes[0].resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - - } else { - - // Find mode with specified dimensions - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - D(bug("VideoInit/%ld: w=%ld h=%ld d=%ld\n", __LINE__, i->x, i->y, bits_from_depth(i->depth))); - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - // Create Amiga_monitor_desc for this (the only) display - uint32 default_id = i->resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - } - } - - // Create Amiga_monitor_desc for this (the only) display - uint32 default_id = VideoModes[0].resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - } - - return true; -} - - -bool Amiga_monitor_desc::video_open() -{ - const video_mode &mode = get_current_mode(); - ULONG depth_bits = bits_from_depth(mode.depth); - ULONG ID = find_mode_for_depth(mode.x, mode.y, depth_bits); - - D(bug("video_open/%ld: width=%ld height=%ld depth=%ld ID=%08lx\n", __LINE__, mode.x, mode.y, depth_bits, ID)); - - if (ID == INVALID_ID) { - ErrorAlert(STR_NO_VIDEO_MODE_ERR); - return false; - } - - D(bug("video_open/%ld: display_type=%ld\n", __LINE__, display_type)); - - // Open display - switch (display_type) { - case DISPLAY_WINDOW: - drv = new driver_window(*this, mode.x, mode.y); - break; - - case DISPLAY_PIP: - drv = new driver_pip(*this, mode.x, mode.y); - break; - - case DISPLAY_SCREEN_P96: - drv = new driver_screen_p96(*this, ID); - break; - - case DISPLAY_SCREEN_CGFX: - drv = new driver_screen_cgfx(*this, ID); - break; - } - - D(bug("video_open/%ld: drv=%08lx\n", __LINE__, drv)); - - if (drv == NULL) - return false; - - D(bug("video_open/%ld: init_ok=%ld\n", __LINE__, drv->init_ok)); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - - // Start periodic process - periodic_proc = CreateNewProcTags( - NP_Entry, (ULONG)periodic_func, - NP_Name, (ULONG)"Basilisk II IDCMP Handler", - NP_Priority, 0, - TAG_END - ); - - D(bug("video_open/%ld: periodic_proc=%08lx\n", __LINE__, periodic_proc)); - - if (periodic_proc == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - return false; - } - - return true; -} - - -void Amiga_monitor_desc::video_close() -{ - // Stop periodic process - if (periodic_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&periodic_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - delete drv; - drv = NULL; - - // Free mouse pointer - if (null_pointer) { - FreeMem(null_pointer, 12); - null_pointer = NULL; - } -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); -} - - -/* - * Set palette - */ - -void Amiga_monitor_desc::set_palette(uint8 *pal, int num) -{ - drv->set_palette(pal, num); -} - - -/* - * Switch video mode - */ - -void Amiga_monitor_desc::switch_to_current_mode() -{ - // Close and reopen display - video_close(); - if (!video_open()) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ -} - - -/* - * Video message handling (not neccessary under AmigaOS, handled by periodic_func()) - */ - -void VideoInterrupt(void) -{ -} - - -/* - * Process for window refresh and message handling - */ - -static __saveds void periodic_func(void) -{ - struct MsgPort *timer_port = NULL; - struct timerequest *timer_io = NULL; - struct IntuiMessage *msg; - ULONG win_mask = 0, timer_mask = 0; - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Create message port for window and attach it - struct MsgPort *win_port = CreateMsgPort(); - if (win_port) { - win_mask = 1 << win_port->mp_SigBit; - drv->the_win->UserPort = win_port; - ModifyIDCMP(drv->the_win, IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_RAWKEY | - ((drv->monitor.display_type == DISPLAY_SCREEN_P96 || drv->monitor.display_type == DISPLAY_SCREEN_CGFX) ? IDCMP_DELTAMOVE : 0)); - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Start 60Hz timer for window refresh - if (drv->monitor.display_type == DISPLAY_WINDOW) { - timer_port = CreateMsgPort(); - if (timer_port) { - timer_io = (struct timerequest *)CreateIORequest(timer_port, sizeof(struct timerequest)); - if (timer_io) { - if (!OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timer_io, 0)) { - timer_mask = 1 << timer_port->mp_SigBit; - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16667 * frame_skip; - SendIO((struct IORequest *)timer_io); - } - } - } - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Main loop - for (;;) { - const video_mode &mode = drv->monitor.get_current_mode(); - - // Wait for timer and/or window (CTRL_C is used for quitting the task) - ULONG sig = Wait(win_mask | timer_mask | SIGBREAKF_CTRL_C); - - if (sig & SIGBREAKF_CTRL_C) - break; - -// D(bug("periodic_func/%ld: display_type=%ld the_win=%08lx\n", __LINE__, drv->monitor.display_type, drv->the_win)); - - if (sig & timer_mask) { - if (drv->get_bitmap()) { - // Timer tick, update display - BltTemplate(drv->get_bitmap()->Planes[0], 0, - drv->get_bitmap()->BytesPerRow, drv->the_win->RPort, - drv->the_win->BorderLeft, drv->the_win->BorderTop, - mode.x, mode.y); - } - - // Restart timer - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16667 * frame_skip; - SendIO((struct IORequest *)timer_io); - } - - if (sig & win_mask) { - - // Handle window messages - while (msg = (struct IntuiMessage *)GetMsg(win_port)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - UWORD qualifier = msg->Qualifier; - WORD mx = msg->MouseX; - WORD my = msg->MouseY; - ReplyMsg((struct Message *)msg); - - // Handle message according to class - switch (cl) { - case IDCMP_MOUSEMOVE: - switch (drv->monitor.display_type) { - case DISPLAY_SCREEN_P96: - case DISPLAY_SCREEN_CGFX: -// D(bug("periodic_func/%ld: IDCMP_MOUSEMOVE mx=%ld my=%ld\n", __LINE__, mx, my)); - ADBMouseMoved(mx, my); - break; - default: -// D(bug("periodic_func/%ld: IDCMP_MOUSEMOVE mx=%ld my=%ld\n", __LINE__, mx - drv->the_win->BorderLeft, my - drv->the_win->BorderTop)); - ADBMouseMoved(mx - drv->the_win->BorderLeft, my - drv->the_win->BorderTop); - if (mx < drv->the_win->BorderLeft - || my < drv->the_win->BorderTop - || mx >= drv->the_win->BorderLeft + mode.x - || my >= drv->the_win->BorderTop + mode.y) { - if (current_pointer) { - ClearPointer(drv->the_win); - current_pointer = NULL; - } - } else { - if (current_pointer != null_pointer) { - // Hide mouse pointer inside window - SetPointer(drv->the_win, null_pointer, 1, 16, 0, 0); - current_pointer = null_pointer; - } - } - break; - } - break; - - case IDCMP_MOUSEBUTTONS: - if (code == SELECTDOWN) - ADBMouseDown(0); - else if (code == SELECTUP) - ADBMouseUp(0); - else if (code == MENUDOWN) - ADBMouseDown(1); - else if (code == MENUUP) - ADBMouseUp(1); - else if (code == MIDDLEDOWN) - ADBMouseDown(2); - else if (code == MIDDLEUP) - ADBMouseUp(2); - break; - - case IDCMP_RAWKEY: - if (qualifier & IEQUALIFIER_REPEAT) // Keyboard repeat is done by MacOS - break; - if ((qualifier & (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL)) == - (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL) && code == 0x5f) { - SetInterruptFlag(INTFLAG_NMI); - TriggerInterrupt(); - break; - } - - if (code & IECODE_UP_PREFIX) - ADBKeyUp(keycode2mac[code & 0x7f]); - else - ADBKeyDown(keycode2mac[code & 0x7f]); - break; - } - } - } - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Stop timer - if (timer_io) { - if (!CheckIO((struct IORequest *)timer_io)) - AbortIO((struct IORequest *)timer_io); - WaitIO((struct IORequest *)timer_io); - CloseDevice((struct IORequest *)timer_io); - DeleteIORequest(timer_io); - } - if (timer_port) - DeleteMsgPort(timer_port); - - // Remove port from window and delete it - Forbid(); - msg = (struct IntuiMessage *)win_port->mp_MsgList.lh_Head; - struct Node *succ; - while (succ = msg->ExecMessage.mn_Node.ln_Succ) { - if (msg->IDCMPWindow == drv->the_win) { - Remove((struct Node *)msg); - ReplyMsg((struct Message *)msg); - } - msg = (struct IntuiMessage *)succ; - } - drv->the_win->UserPort = NULL; - ModifyIDCMP(drv->the_win, 0); - Permit(); - DeleteMsgPort(win_port); - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - - D(bug("Added video mode: w=%ld h=%ld d=%ld\n", width, height, depth)); - - VideoModes.push_back(mode); -} - -// Add standard list of modes for given color depth -static void add_modes(uint32 width, uint32 height, video_depth depth) -{ - D(bug("add_modes: w=%ld h=%ld d=%ld\n", width, height, depth)); - - if (width >= 512 && height >= 384) - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - if (width >= 640 && height >= 480) - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - if (width >= 800 && height >= 600) - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - if (width >= 1024 && height >= 768) - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - if (width >= 1152 && height >= 870) - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - if (width >= 1280 && height >= 1024) - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - if (width >= 1600 && height >= 1200) - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -} - - -static ULONG find_mode_for_depth(uint32 width, uint32 height, uint32 depth) -{ - ULONG ID = BestModeID(BIDTAG_NominalWidth, width, - BIDTAG_NominalHeight, height, - BIDTAG_Depth, depth, - BIDTAG_DIPFMustNotHave, DIPF_IS_ECS | DIPF_IS_HAM | DIPF_IS_AA, - TAG_END); - - return ID; -} - - -static ULONG bits_from_depth(video_depth depth) -{ - int bits = 1 << depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - - return bits; -} - - -static bool is_valid_modeid(int display_type, ULONG mode_id) -{ - if (INVALID_ID == mode_id) - return false; - - switch (display_type) { - case DISPLAY_SCREEN_P96: - return check_modeid_p96(mode_id); - break; - case DISPLAY_SCREEN_CGFX: - return check_modeid_cgfx(mode_id); - break; - default: - return false; - break; - } -} - - -static bool check_modeid_p96(ULONG mode_id) -{ - // Check if the mode is one we can handle - uint32 depth = p96GetModeIDAttr(mode_id, P96IDA_DEPTH); - uint32 format = p96GetModeIDAttr(mode_id, P96IDA_RGBFORMAT); - - D(bug("check_modeid_p96: mode_id=%08lx depth=%ld format=%ld\n", mode_id, depth, format)); - - if (!p96GetModeIDAttr(mode_id, P96IDA_ISP96)) - return false; - - switch (depth) { - case 8: - break; - case 15: - case 16: - if (format != RGBFB_R5G5B5) - return false; - break; - case 24: - case 32: - if (format != RGBFB_A8R8G8B8) - return false; - break; - default: - return false; - } - - return true; -} - - -static bool check_modeid_cgfx(ULONG mode_id) -{ - uint32 depth = GetCyberIDAttr(CYBRIDATTR_DEPTH, mode_id); - uint32 format = GetCyberIDAttr(CYBRIDATTR_PIXFMT, mode_id); - - D(bug("check_modeid_cgfx: mode_id=%08lx depth=%ld format=%ld\n", mode_id, depth, format)); - - if (!IsCyberModeID(mode_id)) - return false; - - switch (depth) { - case 8: - break; - case 15: - case 16: - if (format != PIXFMT_RGB15) - return false; - break; - case 24: - case 32: - if (format != PIXFMT_ARGB32) - return false; - break; - default: - return false; - } - - return true; -} - - -driver_base::driver_base(Amiga_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false) -{ -} - -driver_base::~driver_base() -{ -} - - -// Open window -driver_window::driver_window(Amiga_monitor_desc &m, int width, int height) - : black_pen(-1), white_pen(-1), driver_base(m) -{ - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_InnerWidth, width, WA_InnerHeight, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_DragBar, true, - WA_DepthGadget, true, - WA_SizeGadget, false, - WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - TAG_END - ); - if (the_win == NULL) { - init_ok = false; - ErrorAlert(STR_OPEN_WINDOW_ERR); - return; - } - - // Create bitmap ("height + 2" for safety) - the_bitmap = AllocBitMap(width, height + 2, 1, BMF_CLEAR, NULL); - if (the_bitmap == NULL) { - init_ok = false; - ErrorAlert(STR_NO_MEM_ERR); - return; - } - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base((uint32)the_bitmap->Planes[0]); - - // Set FgPen and BgPen - black_pen = ObtainBestPenA(the_win->WScreen->ViewPort.ColorMap, 0, 0, 0, NULL); - white_pen = ObtainBestPenA(the_win->WScreen->ViewPort.ColorMap, 0xffffffff, 0xffffffff, 0xffffffff, NULL); - SetAPen(the_win->RPort, black_pen); - SetBPen(the_win->RPort, white_pen); - SetDrMd(the_win->RPort, JAM2); - - init_ok = true; -} - - -driver_window::~driver_window() -{ - // Window mode, free bitmap - if (the_bitmap) { - WaitBlit(); - FreeBitMap(the_bitmap); - } - - // Free pens and close window - if (the_win) { - ReleasePen(the_win->WScreen->ViewPort.ColorMap, black_pen); - ReleasePen(the_win->WScreen->ViewPort.ColorMap, white_pen); - - CloseWindow(the_win); - the_win = NULL; - } -} - - -// Open PIP (requires Picasso96) -driver_pip::driver_pip(Amiga_monitor_desc &m, int width, int height) - : driver_base(m) -{ - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - D(bug("driver_pip(%d,%d)\n", width, height)); - - // Open window - ULONG error = 0; - the_win = p96PIP_OpenTags( - P96PIP_SourceFormat, RGBFB_R5G5B5, - P96PIP_SourceWidth, width, - P96PIP_SourceHeight, height, - P96PIP_ErrorCode, (ULONG)&error, - P96PIP_AllowCropping, true, - WA_Left, 0, WA_Top, 0, - WA_InnerWidth, width, WA_InnerHeight, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_DragBar, true, - WA_DepthGadget, true, - WA_SizeGadget, false, - WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - WA_PubScreenName, (ULONG)"Workbench", - TAG_END - ); - if (the_win == NULL || error) { - init_ok = false; - ErrorAlert(STR_OPEN_WINDOW_ERR); - return; - } - - // Find bitmap - p96PIP_GetTags(the_win, P96PIP_SourceBitMap, (ULONG)&the_bitmap, TAG_END); - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base(p96GetBitMapAttr(the_bitmap, P96BMA_MEMORY)); - - init_ok = true; -} - -driver_pip::~driver_pip() -{ - // Close PIP - if (the_win) - p96PIP_Close(the_win); -} - - -// Open Picasso96 screen -driver_screen_p96::driver_screen_p96(Amiga_monitor_desc &m, ULONG mode_id) - : driver_base(m) -{ - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Check if the mode is one we can handle - if (!check_modeid_p96(mode_id)) - { - init_ok = false; - ErrorAlert(STR_WRONG_SCREEN_FORMAT_ERR); - return; - } - - // Yes, get width and height - uint32 depth = p96GetModeIDAttr(mode_id, P96IDA_DEPTH); - uint32 width = p96GetModeIDAttr(mode_id, P96IDA_WIDTH); - uint32 height = p96GetModeIDAttr(mode_id, P96IDA_HEIGHT); - - // Open screen - the_screen = p96OpenScreenTags( - P96SA_DisplayID, mode_id, - P96SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - P96SA_Quiet, true, - P96SA_NoMemory, true, - P96SA_NoSprite, true, - P96SA_Exclusive, true, - TAG_END - ); - if (the_screen == NULL) { - ErrorAlert(STR_OPEN_SCREEN_ERR); - init_ok = false; - return; - } - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_Width, width, WA_Height, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Borderless, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_CustomScreen, (ULONG)the_screen, - TAG_END - ); - if (the_win == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - init_ok = false; - return; - } - - ScreenToFront(the_screen); - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base(p96GetBitMapAttr(the_screen->RastPort.BitMap, P96BMA_MEMORY)); - - init_ok = true; -} - - -driver_screen_p96::~driver_screen_p96() -{ - // Close window - if (the_win) - { - CloseWindow(the_win); - the_win = NULL; - } - - // Close screen - if (the_screen) { - p96CloseScreen(the_screen); - the_screen = NULL; - } -} - - -void driver_screen_p96::set_palette(uint8 *pal, int num) -{ - // Convert palette to 32 bits - ULONG table[2 + 256 * 3]; - table[0] = num << 16; - table[num * 3 + 1] = 0; - for (int i=0; iViewPort, table); -} - - -// Open CyberGraphX screen -driver_screen_cgfx::driver_screen_cgfx(Amiga_monitor_desc &m, ULONG mode_id) - : driver_base(m) -{ - D(bug("driver_screen_cgfx/%ld: mode_id=%08lx\n", __LINE__, mode_id)); - - // Set absolute mouse mode - ADBSetRelMouseMode(true); - - // Check if the mode is one we can handle - if (!check_modeid_cgfx(mode_id)) - { - ErrorAlert(STR_WRONG_SCREEN_FORMAT_ERR); - init_ok = false; - return; - } - - // Yes, get width and height - uint32 depth = GetCyberIDAttr(CYBRIDATTR_DEPTH, mode_id); - uint32 width = GetCyberIDAttr(CYBRIDATTR_WIDTH, mode_id); - uint32 height = GetCyberIDAttr(CYBRIDATTR_HEIGHT, mode_id); - - // Open screen - the_screen = OpenScreenTags(NULL, - SA_DisplayID, mode_id, - SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - SA_Quiet, true, - SA_Exclusive, true, - TAG_END - ); - if (the_screen == NULL) { - ErrorAlert(STR_OPEN_SCREEN_ERR); - init_ok = false; - return; - } - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_Width, width, WA_Height, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Borderless, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_CustomScreen, (ULONG)the_screen, - TAG_END - ); - if (the_win == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - init_ok = false; - return; - } - - ScreenToFront(the_screen); - static UWORD ptr[] = { 0, 0, 0, 0 }; - SetPointer(the_win, ptr, 0, 0, 0, 0); // Hide mouse pointer - - // Set VideoMonitor - ULONG frame_base; - APTR handle = LockBitMapTags(the_screen->RastPort.BitMap, - LBMI_BASEADDRESS, (ULONG)&frame_base, - TAG_END - ); - UnLockBitMap(handle); - - D(bug("driver_screen_cgfx/%ld: frame_base=%08lx\n", __LINE__, frame_base)); - - monitor.set_mac_frame_base(frame_base); - - init_ok = true; -} - - -driver_screen_cgfx::~driver_screen_cgfx() -{ - D(bug("~driver_screen_cgfx/%ld: \n", __LINE__)); - - // Close window - if (the_win) - { - CloseWindow(the_win); - the_win = NULL; - } - - // Close screen - if (the_screen) { - CloseScreen(the_screen); - the_screen = NULL; - } -} - - -void driver_screen_cgfx::set_palette(uint8 *pal, int num) -{ - // Convert palette to 32 bits - ULONG table[2 + 256 * 3]; - table[0] = num << 16; - table[num * 3 + 1] = 0; - for (int i=0; iViewPort, table); -} diff --git a/BasiliskII/src/AmigaOS/xpram_amiga.cpp b/BasiliskII/src/AmigaOS/xpram_amiga.cpp deleted file mode 100644 index 69195d119..000000000 --- a/BasiliskII/src/AmigaOS/xpram_amiga.cpp +++ /dev/null @@ -1,80 +0,0 @@ -/* - * xpram_amiga.cpp - XPRAM handling, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#define __USE_SYSBASE -#include -#include - -#include "sysdeps.h" -#include "xpram.h" - - -// XPRAM file name -#if POWERPC_ROM -static char XPRAM_FILE_NAME[] = "ENV:SheepShaver_NVRAM"; -static char XPRAM_FILE_NAME_ARC[] = "ENVARC:SheepShaver_NVRAM"; -#else -static char XPRAM_FILE_NAME[] = "ENV:BasiliskII_XPRAM"; -static char XPRAM_FILE_NAME_ARC[] = "ENVARC:BasiliskII_XPRAM"; -#endif - - -/* - * Load XPRAM from settings file - */ - -void LoadXPRAM(void) -{ - BPTR fh; - if ((fh = Open(XPRAM_FILE_NAME, MODE_OLDFILE)) != NULL) { - Read(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } -} - - -/* - * Save XPRAM to settings file - */ - -void SaveXPRAM(void) -{ - BPTR fh; - if ((fh = Open(XPRAM_FILE_NAME, MODE_NEWFILE)) != NULL) { - Write(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } - if ((fh = Open(XPRAM_FILE_NAME_ARC, MODE_NEWFILE)) != NULL) { - Write(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } -} - - -/* - * Delete PRAM file - */ - -void ZapPRAM(void) -{ - DeleteFile(XPRAM_FILE_NAME); - DeleteFile(XPRAM_FILE_NAME_ARC); -} diff --git a/BasiliskII/src/BeOS/Makefile b/BasiliskII/src/BeOS/Makefile deleted file mode 100644 index e7feb6363..000000000 --- a/BasiliskII/src/BeOS/Makefile +++ /dev/null @@ -1,151 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= BasiliskII - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -MACHINE=$(shell uname -m) -ifeq ($(MACHINE), BePC) - CPUSRCS = ../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp \ - ../uae_cpu/readcpu.cpp ../uae_cpu/fpu/fpu_x86.cpp cpustbl.cpp cpudefs.cpp cpufast.s -else -# CPUSRCS = ../powerrom_cpu/powerrom_cpu.cpp - CPUSRCS = ../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp \ - ../uae_cpu/readcpu.cpp ../uae_cpu/fpu/fpu_uae.cpp cpustbl.cpp cpudefs.cpp cpuemu.cpp -endif -SRCS = ../main.cpp main_beos.cpp ../prefs.cpp ../prefs_items.cpp prefs_beos.cpp \ - prefs_editor_beos.cpp sys_beos.cpp ../rom_patches.cpp ../slot_rom.cpp \ - ../rsrc_patches.cpp ../emul_op.cpp ../macos_util.cpp ../xpram.cpp \ - xpram_beos.cpp ../timer.cpp timer_beos.cpp clip_beos.cpp ../adb.cpp \ - ../serial.cpp serial_beos.cpp ../ether.cpp ether_beos.cpp ../sony.cpp \ - ../disk.cpp ../cdrom.cpp ../scsi.cpp scsi_beos.cpp ../video.cpp \ - video_beos.cpp ../audio.cpp audio_beos.cpp ../extfs.cpp extfs_beos.cpp \ - ../user_strings.cpp user_strings_beos.cpp about_window.cpp \ - $(CPUSRCS) - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS=be game media device textencoding tracker net - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include

-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../include SheepDriver SheepNet - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= FPU_X86 SIZEOF_FLOAT=4 SIZEOF_DOUBLE=8 SIZEOF_LONG_DOUBLE=10 - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from -# a source-level debugger -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = -fomit-frame-pointer -fno-PIC - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/system/develop/etc/makefile-engine - - -# special handling of UAE CPU engine -$(OBJ_DIR)/%.o : %.s - $(CC) $(INCLUDES) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuopti: $(OBJ_DIR)/cpuopti.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/cpuopti $(OBJ_DIR)/cpuopti.o -$(OBJ_DIR)/build68k: $(OBJ_DIR)/build68k.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/build68k $(OBJ_DIR)/build68k.o -$(OBJ_DIR)/gencpu: $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/gencpu $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o -cpudefs.cpp: $(OBJ_DIR)/build68k ../uae_cpu/table68k - $(OBJ_DIR)/build68k <../uae_cpu/table68k >cpudefs.cpp -cpuemu.cpp: $(OBJ_DIR)/gencpu - $(OBJ_DIR)/gencpu -cpustbl.cpp: cpuemu.cpp -cputbl.h: cpuemu.cpp -cpufast.s: cpuemu.cpp $(OBJ_DIR)/cpuopti - $(CXX) $(INCLUDES) -S $(CFLAGS) $< -o cputmp.s - $(OBJ_DIR)/cpuopti $@ || mv cputmp.s $@ - rm -f cputmp.s - -streifenfrei: - -rm -f $(OBJ_DIR)/gencpu $(OBJ_DIR)/build68k $(OBJ_DIR)/cpuopti - -rm -f cpuemu.cpp cpudefs.cpp cputmp.s cpufast*.s cpustbl.cpp cputbl.h diff --git a/BasiliskII/src/BeOS/SheepDriver/Makefile b/BasiliskII/src/BeOS/SheepDriver/Makefile deleted file mode 100644 index 52b2b70ec..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/Makefile +++ /dev/null @@ -1,117 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= sheep - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= DRIVER - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= sheep_driver.c - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - -install: $(TARGET) - cp $(TARGET) /boot/home/config/add-ons/kernel/drivers/bin - ln -sf /boot/home/config/add-ons/kernel/drivers/bin/$(NAME) /boot/home/config/add-ons/kernel/drivers/dev/$(NAME) - -uninstall: - rm /boot/home/config/add-ons/kernel/drivers/bin/$(NAME) - rm /boot/home/config/add-ons/kernel/drivers/dev/$(NAME) diff --git a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c b/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c deleted file mode 100644 index 859d82e22..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c +++ /dev/null @@ -1,476 +0,0 @@ -/* - * sheep_driver.c - Low memory and ROM access driver for SheepShaver and - * Basilisk II on PowerPC systems - * - * SheepShaver (C) 1997-2002 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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 - */ - -#ifdef __i386__ -#error The sheep driver only runs on PowerPC machines. -#endif - -#include -#include -#include -#include -#include -#include -#include - -#include "sheep_driver.h" - -#define DEBUG 0 - -#if DEBUG==1 -#define bug pprintf -#elif DEBUG==2 -#define bug dprintf -#endif - -#if DEBUG -#define D(x) (x) -#else -#define D(x) ; -#endif - -#define PORT_NAME "sheep_driver installed" - - -/* - * For debugging - */ - -static int pprintf(const char* format, ...) -{ - port_id PortNum; - int len, ret; - char Buffer[1024]; - va_list ap; - - if ((PortNum = find_port("PortLogger")) == B_NAME_NOT_FOUND) - return(PortNum); - for (len=0; len<1024; len++) - Buffer[len]='\0'; - va_start(ap, format); - vsprintf(Buffer, format, ap); - ret = write_port(PortNum, 0, Buffer, strlen(Buffer)); - return ret; -} - - -/* - * Page table functions - */ - -static uint32 *pte_address = 0; -static uint32 vsid; -static uint32 table_size; - -static status_t map_page(uint32 ea, uint32 ra, uint32 **free_pte, uint32 bits) -{ - int i; - int pte_class; - uint32 hash1, hash2, api, *pteg1, *pteg2; - - D(bug("Trying to map EA %p -> RA %p\n", ea, ra)); - - // Find PTEG addresses for given EA - hash1 = (vsid & 0x7ffff) ^ ((ea >> 12) & 0xffff); - hash2 = ~hash1 & 0x7ffff; - api = (ea >> 22) & 0x3f; - pteg1 = (uint32 *)((uint32)pte_address + ((hash1 << 6) & (table_size - 1))); - pteg2 = (uint32 *)((uint32)pte_address + ((hash2 << 6) & (table_size - 1))); - D(bug("PTEG1 at %p, PTEG2 at %p\n", pteg1, pteg2)); - - // Search all 8 PTEs of each PTEG - *free_pte = NULL; - pte_class = 0; - for (i=0; i<8; i++) { - D(bug(" found %08lx %08lx\n", pteg1[i*2], pteg1[i*2+1])); - if (pteg1[i*2] == (0x80000000 | (vsid << 7) | (pte_class << 6) | api)) { - *free_pte = pteg1 + i*2; - D(bug(" existing PTE found (PTEG1)\n")); - break; - } else if (!pteg1[i*2]) { - *free_pte = pteg1 + i*2; - D(bug(" free PTE found (PTEG1)\n")); - break; - } - } - if (*free_pte == NULL) { - pte_class = 1; - for (i=0; i<8; i++) { - D(bug(" found %08lx %08lx\n", pteg2[i*2], pteg2[i*2+1])); - if (pteg2[i*2] == (0x80000000 | (vsid << 7) | (pte_class << 6) | api)) { - *free_pte = pteg2 + i*2; - D(bug(" existing PTE found (PTEG2)\n")); - break; - } else if (!pteg2[i*2]) { - *free_pte = pteg2 + i*2; - D(bug(" free PTE found (PTEG2)\n")); - break; - } - } - } - - // Remap page - if (*free_pte == NULL) { - D(bug(" No free PTE found :-(\m")); - return B_DEVICE_FULL; - } else { - (*free_pte)[0] = 0x80000000 | (vsid << 7) | (pte_class << 6) | api; - (*free_pte)[1] = ra | bits; - D(bug(" written %08lx %08lx to PTE\n", (*free_pte)[0], (*free_pte)[1])); - return B_NO_ERROR; - } -} - -static status_t remap_page(uint32 *free_pte, uint32 ra, uint32 bits) -{ - D(bug("Remapping PTE %p -> RA %p\n", free_pte, ra)); - - // Remap page - if (free_pte == NULL) { - D(bug(" Invalid PTE :-(\n")); - return B_BAD_ADDRESS; - } else { - free_pte[1] = ra | bits; - D(bug(" written %08lx %08lx to PTE\n", free_pte[0], free_pte[1])); - return B_NO_ERROR; - } -} - - -/* - * Foward declarations for hook functions - */ - -static status_t sheep_open(const char *name, uint32 flags, void **cookie); -static status_t sheep_close(void *cookie); -static status_t sheep_free(void *cookie); -static status_t sheep_control(void *cookie, uint32 op, void *data, size_t len); -static status_t sheep_read(void *cookie, off_t pos, void *data, size_t *len); -static status_t sheep_write(void *cookie, off_t pos, const void *data, size_t *len); - - -/* - * Version of our driver - */ - -int32 api_version = B_CUR_DRIVER_API_VERSION; - - -/* - * Device_hooks structure - has function pointers to the - * various entry points for device operations - */ - -static device_hooks my_device_hooks = { - &sheep_open, - &sheep_close, - &sheep_free, - &sheep_control, - &sheep_read, - &sheep_write, - NULL, - NULL, - NULL, - NULL -}; - - -/* - * List of device names to be returned by publish_devices() - */ - -static char *device_name_list[] = { - "sheep", - 0 -}; - - -/* - * Init - do nothing - */ - -status_t init_hardware(void) -{ -#if DEBUG==2 - set_dprintf_enabled(true); -#endif - D(bug("init_hardware()\n")); - return B_NO_ERROR; -} - -status_t init_driver(void) -{ - D(bug("init_driver()\n")); - return B_NO_ERROR; -} - -void uninit_driver(void) -{ - D(bug("uninit_driver()\n")); -} - - -/* - * publish_devices - return list of device names implemented by this driver - */ - -const char **publish_devices(void) -{ - return device_name_list; -} - - -/* - * find_device - return device hooks for a specific device name - */ - -device_hooks *find_device(const char *name) -{ - if (!strcmp(name, device_name_list[0])) - return &my_device_hooks; - - return NULL; -} - - -/* - * sheep_open - hook function for the open call. - */ - -static status_t sheep_open(const char *name, uint32 flags, void **cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_close - hook function for the close call. - */ - -static status_t sheep_close(void *cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_free - hook function to free the cookie returned - * by the open hook. Since the open hook did not return - * a cookie, this is a no-op. - */ - -static status_t sheep_free(void *cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_control - hook function for the ioctl call - */ - -static asm void inval_tlb(uint32 ea) -{ - isync - tlbie r3 - sync - blr -} - -static asm void tlbsync(void) -{ - machine 604 - tlbsync - sync - blr -} - -static status_t sheep_control(void *cookie, uint32 op, void *data, size_t len) -{ - static void *block; - static void *block_aligned; - physical_entry pe[2]; - system_info sysinfo; - area_id id; - area_info info; - cpu_status cpu_st; - status_t res; - uint32 ra0, ra1; - uint32 *free_pte_0, *free_pte_1; - int i; - - D(bug("control(%d) data %p, len %08x\n", op, data, len)); - - switch (op) { - case SHEEP_UP: - - // Already messed up? Then do nothing now - if (find_port(PORT_NAME) != B_NAME_NOT_FOUND) - return B_NO_ERROR; - - // Get system info - get_system_info(&sysinfo); - - // Prepare replacement memory - block = malloc(B_PAGE_SIZE * 3); - D(bug("3 pages malloc()ed at %p\n", block)); - block_aligned = (void *)(((uint32)block + B_PAGE_SIZE - 1) & ~(B_PAGE_SIZE-1)); - D(bug("Address aligned to %p\n", block_aligned)); - res = lock_memory(block_aligned, B_PAGE_SIZE * 2, 0); - if (res < 0) - return res; - - // Get memory mapping - D(bug("Memory locked\n")); - res = get_memory_map(block_aligned, B_PAGE_SIZE * 2, pe, 2); - D(bug("get_memory_map returned %d\n", res)); - if (res != B_NO_ERROR) - return res; - - // Find PTE table area - id = find_area("pte_table"); - get_area_info(id, &info); - pte_address = (uint32 *)info.address; - D(bug("PTE table seems to be at %p\n", pte_address)); - table_size = info.size; - D(bug("PTE table size: %dKB\n", table_size / 1024)); - - // Disable interrupts - cpu_st = disable_interrupts(); - - // Find vsid and real addresses of replacement memory - for (i=0; i> 31),((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6),(pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12),((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7),((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - vsid = (pte_address[i*2]&0x7fffff80) >> 7; - ra0 = (uint32)pe[0].address & 0xfffff000; - } - if ((uint32)pe[0].size == B_PAGE_SIZE) { - if (((uint32)pe[1].address & 0xfffff000)==(pte_address[i*2+1]&0xfffff000)) { - D(bug("Found page 1f PtePos %04x V%x VSID %03x H%x API %02x RPN %03x R%1x C%1x WIMG%1x PP%1x \n", - i << 2, - ((pte_address[i*2]&0x80000000) >> 31), ((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6), (pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12), ((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7), ((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - ra1 = (uint32)pe[1].address & 0xfffff000; - } - } else { - if ((((uint32)pe[0].address + B_PAGE_SIZE) & 0xfffff000)==(pte_address[i*2+1]&0xfffff000)) { - D(bug("Found page 1d PtePos %04x V%x VSID %03x H%x API %02x RPN %03x R%1x C%1x WIMG%1x PP%1x \n", - i << 2, - ((pte_address[i*2]&0x80000000) >> 31), ((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6), (pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12), ((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7), ((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - ra1 = ((uint32)pe[0].address + B_PAGE_SIZE) & 0xfffff000; - } - } - } - - // Map low memory for emulator - free_pte_0 = NULL; - free_pte_1 = NULL; - __sync(); - __isync(); - inval_tlb(0); - inval_tlb(B_PAGE_SIZE); - if (sysinfo.cpu_type != B_CPU_PPC_603 && sysinfo.cpu_type != B_CPU_PPC_603e) - tlbsync(); - res = map_page(0, ra0, &free_pte_0, 0x12); - if (res == B_NO_ERROR) - res = map_page(B_PAGE_SIZE, ra1, &free_pte_1, 0x12); - inval_tlb(0); - inval_tlb(B_PAGE_SIZE); - if (sysinfo.cpu_type != B_CPU_PPC_603 && sysinfo.cpu_type != B_CPU_PPC_603e) - tlbsync(); - __sync(); - __isync(); - - // Restore interrupts - restore_interrupts(cpu_st); - - // Create port so we know that messing was successful - set_port_owner(create_port(1, PORT_NAME), B_SYSTEM_TEAM); - return B_NO_ERROR; - - case SHEEP_DOWN: - return B_NO_ERROR; - - default: - return B_BAD_VALUE; - } -} - - -/* - * sheep_read - hook function for the read call - */ - -static status_t sheep_read(void *cookie, off_t pos, void *data, size_t *len) -{ - void *rom_adr; - area_id area; - system_info info; - - D(bug("read() pos %Lx, data %p, len %08x\n", pos, data, *len)); - - get_system_info(&info); - if (info.platform_type == B_BEBOX_PLATFORM) { - *len = 0; - return B_ERROR; - } - if (*len != 0x400000 && pos != 0) { - *len = 0; - return B_BAD_VALUE; - } - area = map_physical_memory("mac_rom", (void *)0xff000000, 0x00400000, B_ANY_KERNEL_ADDRESS, B_READ_AREA, &rom_adr); - D(bug("Mapped ROM to %p, area id %d\n", rom_adr, area)); - if (area < 0) { - *len = 0; - return area; - } - D(bug("Copying ROM\n")); - memcpy(data, rom_adr, *len); - D(bug("Deleting area\n")); - delete_area(area); - return B_NO_ERROR; -} - - -/* - * sheep_write - hook function for the write call - */ - -static status_t sheep_write(void *cookie, off_t pos, const void *data, size_t *len) -{ - D(bug("write() pos %Lx, data %p, len %08x\n", pos, data, *len)); - return B_READ_ONLY_DEVICE; -} diff --git a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h b/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h deleted file mode 100644 index 8486a0213..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h +++ /dev/null @@ -1,33 +0,0 @@ -/* - * sheep_driver.h - Low memory and ROM access driver for SheepShaver and - * Basilisk II on PowerPC systems - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SHEEP_DRIVER_H -#define SHEEP_DRIVER_H - -#include - -enum { - SHEEP_UP = B_DEVICE_OP_CODES_END + 1, - SHEEP_DOWN -}; - -#endif diff --git a/BasiliskII/src/BeOS/SheepNet/Makefile b/BasiliskII/src/BeOS/SheepNet/Makefile deleted file mode 100644 index 36b882fc1..000000000 --- a/BasiliskII/src/BeOS/SheepNet/Makefile +++ /dev/null @@ -1,115 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= sheep_net - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= SHARED - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= sheep_net.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= netdev - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - -install: $(TARGET) - cp $(TARGET) /boot/beos/system/add-ons/net_server/$(NAME) - -uninstall: - rm /boot/beos/system/add-ons/net_server/$(NAME) diff --git a/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp b/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp deleted file mode 100644 index c026293c9..000000000 --- a/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp +++ /dev/null @@ -1,294 +0,0 @@ -/* - * sheep_net.cpp - Net server add-on for SheepShaver and Basilisk II - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sheep_net.h" - -#define DEBUG 0 - -#if DEBUG==1 -#define bug pprintf -#elif DEBUG==2 -#define bug kprintf -#endif - -#if DEBUG -#define D(x) (x) -#else -#define D(x) ; -#endif - -static int pprintf(const char* format, ...) -{ - port_id PortNum; - int len,Ret; - char Buffer[1024]; - va_list ap; - - if ((PortNum = find_port("PortLogger")) == B_NAME_NOT_FOUND) - return(PortNum); - for (len=0; len<1024; len++) - Buffer[len]='\0'; - va_start(ap, format); - vsprintf(Buffer, format, ap); - Ret = write_port(PortNum, 0, Buffer, strlen(Buffer)); - return(Ret); -} - - -// Constants -#define NETDUMP_PRIO 1 // Default is 0 - -const uint32 buffer_size = (sizeof(net_buffer) / B_PAGE_SIZE + 1) * B_PAGE_SIZE; - - -// SheepNet add-on object -class SheepNetAddOn : public BNetProtocol, BPacketHandler { -public: - void AddDevice(BNetDevice *dev, const char *name); - bool PacketReceived(BNetPacket *buf, BNetDevice *dev); -}; - - -// Global variables -static bool shutdown_now = false; -static bool active = false; - -static thread_id write_thread; // Packet writer -static sem_id write_sem; // Semaphore to trigger packet writing -static BNetDevice *EtherCard = NULL; // The Ethernet card we are attached to -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer - -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer - - -/* - * Clear packet buffer - */ - -static void clear(void) -{ - int i; - for (i=0;iread[i].cmd = 0; - net_buffer_ptr->read[i].length = 0; - net_buffer_ptr->read[i].card = 0; - net_buffer_ptr->read[i].reserved = 0; - } - for (i=0;iwrite[i].cmd = 0; - net_buffer_ptr->write[i].length = 0; - net_buffer_ptr->write[i].card = 0; - net_buffer_ptr->write[i].reserved = 0; - } - rd_pos = wr_pos = 0; -} - - -/* - * Packet writer thread - */ - -static status_t write_packet_func(void *arg) -{ - while (!shutdown_now) { - - // Read and execute command - net_packet *p = &net_buffer_ptr->write[wr_pos]; - while (p->cmd & IN_USE) { - D(bug("wp: %d\n", wr_pos)); - switch (p->cmd >> 8) { - - case ACTIVATE_SHEEP_NET: - D(bug("activate sheep-net\n")); - active = false; - clear(); - active = true; - goto next; - - case DEACTIVATE_SHEEP_NET: - D(bug("deactivate sheep-net\n")); - active = false; - clear(); - goto next; - - case SHUTDOWN_SHEEP_NET: - D(bug("shutdown sheep-net\n")); - active = false; - clear(); - shutdown_now = true; - goto next; - - case ADD_MULTICAST: { - const char *data = (const char *)p->data; - D(bug("add multicast %02x %02x %02x %02x %02x %02x\n", data[0], data[1], data[2], data[3], data[4], data[5])); - if (active) { - status_t result; - if ((result = EtherCard->AddMulticastAddress(data)) != B_OK) { - // !! handle error !! error while creating multicast address - D(bug("error while creating multicast address %d\n", result)); - } - } - break; - } - - case REMOVE_MULTICAST: { - const char *data = (const char *)p->data; - D(bug("remove multicast %02x %02x %02x %02x %02x %02x\n", data[0], data[1], data[2], data[3], data[4], data[5])); - if (active) { - status_t result; - if ((result = EtherCard->RemoveMulticastAddress(data)) != B_OK) { - // !! handle error !! error while removing multicast address - D(bug("error while removing multicast address %d\n", result)); - } - } - break; - } - - case SHEEP_PACKET: { - uint32 length = p->length; - // D(bug("sheep packet %d\n", length)); - if (active) { - BStandardPacket *packet = new BStandardPacket(length); - packet->Write(0, (const char *)p->data, length); - EtherCard->SendPacket(packet); - } - break; - } - - default: - D(bug("error: unknown port packet type\n")); - break; - } - p->cmd = 0; // Free packet - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - p = &net_buffer_ptr->write[wr_pos]; - } - - // Wait for next packet -next: acquire_sem_etc(write_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Init the net add-on - */ - -static void init_addon() -{ - int i; - D(bug("init sheep-net\n")); - - // Create packet buffer - if ((buffer_area = create_area("packet buffer", (void **)&net_buffer_ptr, B_ANY_ADDRESS, buffer_size, B_FULL_LOCK, B_READ_AREA | B_WRITE_AREA)) < B_NO_ERROR) { - D(bug("FATAL ERROR: can't create shared area\n")); - return; - } - - // Init packet buffer - clear(); - EtherCard->Address((char *)net_buffer_ptr->ether_addr); - net_buffer_ptr->read_sem = -1; - net_buffer_ptr->read_ofs = (uint32)(net_buffer_ptr->read) - (uint32)net_buffer_ptr; - net_buffer_ptr->read_packet_size = sizeof(net_packet); - net_buffer_ptr->read_packet_count = READ_PACKET_COUNT; - if ((write_sem = create_sem(0, "ether write")) < B_NO_ERROR) { - D(bug("FATAL ERROR: can't create semaphore\n")); - return; - } - net_buffer_ptr->write_sem = write_sem; - net_buffer_ptr->write_ofs = (uint32)(net_buffer_ptr->write) - (uint32)net_buffer_ptr; - net_buffer_ptr->write_packet_size = sizeof(net_packet); - net_buffer_ptr->write_packet_count = WRITE_PACKET_COUNT; - - // Start packet writer thread - write_thread = spawn_thread(write_packet_func, "sheep_net ether write", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(write_thread); -} - - -/* - * Add-on attached to Ethernet card - */ - -void SheepNetAddOn::AddDevice(BNetDevice *dev, const char *name) -{ - if (dev->Type() != B_ETHER_NET_DEVICE) - return; - if (EtherCard != NULL) { - // !! handle error !! support for multiple ethernet cards ... - D(bug("error: SheepShaver doesn't support multiple Ethernetcards !\n")); - return; - } - EtherCard = dev; - init_addon(); - register_packet_handler(this, dev, NETDUMP_PRIO); -} - - -/* - * Ethernet packet received - */ - -bool SheepNetAddOn::PacketReceived(BNetPacket *pkt, BNetDevice *dev) -{ - if (shutdown_now) { - unregister_packet_handler(this, dev); - return false; - } -// D(bug("read_packet_func %d\n", pkt->Size())); - if (active) { - D(bug("rp: %d\n", rd_pos)); - net_packet *p = &net_buffer_ptr->read[rd_pos]; - if (p->cmd & IN_USE) { - D(bug("error: full read buffer ... lost packet\n")); - } else { - memcpy(p->data, pkt->Data(), pkt->Size()); - p->length = pkt->Size(); - p->cmd = IN_USE | (SHEEP_PACKET << 8); - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - release_sem(net_buffer_ptr->read_sem); - } - } - //D(bug("%02x %02x %02x %02x %02x %02x", (uchar) (pkt->Data())[0],(uchar) (pkt->Data())[1],(uchar) (pkt->Data())[2],(uchar) (pkt->Data())[3],(uchar) (pkt->Data())[4],(uchar) (pkt->Data())[5])); - return false; -} - -#pragma export on -extern "C" BNetProtocol *open_protocol(const char *device) -{ - SheepNetAddOn *dev = new SheepNetAddOn; - return dev; -} -#pragma export off diff --git a/BasiliskII/src/BeOS/SheepNet/sheep_net.h b/BasiliskII/src/BeOS/SheepNet/sheep_net.h deleted file mode 100644 index d4585b4dd..000000000 --- a/BasiliskII/src/BeOS/SheepNet/sheep_net.h +++ /dev/null @@ -1,65 +0,0 @@ -/* - * sheep_net.h - Net server add-on for SheepShaver and Basilisk II - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SHEEP_NET_H -#define SHEEP_NET_H - -// Net buffer dimensions -#define READ_PACKET_COUNT 10 -#define WRITE_PACKET_COUNT 10 - -// Net packet -struct net_packet { - uint32 cmd; // Command - uint32 length; // Data length - uint32 card; // Network card ID - uint32 reserved; - uint8 data[1584]; -}; - -// Net buffer (shared area) -struct net_buffer { - uint8 ether_addr[6]; // Ethernet address - uint8 filler1[2]; - sem_id read_sem; // Semaphore for read packets - uint32 read_ofs; - uint32 read_packet_size; - uint32 read_packet_count; - sem_id write_sem; // Semaphore for write packets - uint32 write_ofs; - uint32 write_packet_size; - uint32 write_packet_count; - uint8 filler[24]; - net_packet read[READ_PACKET_COUNT]; - net_packet write[WRITE_PACKET_COUNT]; -}; - -// Packet commands -#define SHEEP_PACKET 0 -#define ADD_MULTICAST 1 -#define REMOVE_MULTICAST 2 -#define ACTIVATE_SHEEP_NET 8 -#define DEACTIVATE_SHEEP_NET 9 -#define SHUTDOWN_SHEEP_NET 10 - -#define IN_USE 1 - -#endif diff --git a/BasiliskII/src/BeOS/about_window.cpp b/BasiliskII/src/BeOS/about_window.cpp deleted file mode 100644 index 94f9944e0..000000000 --- a/BasiliskII/src/BeOS/about_window.cpp +++ /dev/null @@ -1,59 +0,0 @@ -/* - * about_window.cpp - "About" window - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include - -#include "sysdeps.h" -#include "version.h" -#include "user_strings.h" - -/* - * Display "About" window - */ - -void ShowAboutWindow(void) -{ - char str[512]; - sprintf(str, - "Basilisk II\nVersion %d.%d\n\n" - "Copyright " B_UTF8_COPYRIGHT " 1997-2008 Christian Bauer et al.\n" - "E-mail: Christian.Bauer@uni-mainz.de\n" - "http://www.uni-mainz.de/~bauec002/B2Main.html\n\n" - "Basilisk II comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - BAlert *about = new BAlert("", str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_FROM_LABEL); - BTextView *theText = about->TextView(); - if (theText) { - theText->SetStylable(true); - theText->Select(0, 11); - BFont ourFont; - theText->SetFontAndColor(be_bold_font); - theText->GetFontAndColor(2, &ourFont, NULL); - ourFont.SetSize(24); - theText->SetFontAndColor(&ourFont); - } - about->Go(); -} diff --git a/BasiliskII/src/BeOS/about_window.h b/BasiliskII/src/BeOS/about_window.h deleted file mode 100644 index 1960c9766..000000000 --- a/BasiliskII/src/BeOS/about_window.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * about_window.h - "About" window - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 ABOUT_WINDOW_H -#define ABOUT_WINDOW_H - -// Display "About" window -extern void ShowAboutWindow(void); - -#endif diff --git a/BasiliskII/src/BeOS/audio_beos.cpp b/BasiliskII/src/BeOS/audio_beos.cpp deleted file mode 100644 index 026545870..000000000 --- a/BasiliskII/src/BeOS/audio_beos.cpp +++ /dev/null @@ -1,342 +0,0 @@ -/* - * audio_beos.cpp - Audio support, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int audio_irq_done_sem = -1; // Signal from interrupt to streaming thread: data block read -static BSoundPlayer *the_player; - -// Prototypes -static void playbuffer_func(void *arg, void *buf, size_t size, const media_raw_audio_format &format); - - -/* - * Audio manager thread (for calling media kit functions; - * this is not safe under R4 when running on the MacOS stack in kernel space) - */ - -// Message constants -const uint32 MSG_QUIT_AUDIO_MANAGER = 'quit'; -const uint32 MSG_ENTER_STREAM = 'entr'; -const uint32 MSG_EXIT_STREAM = 'exit'; -const uint32 MSG_GET_VOLUME = 'getv'; -const uint32 MSG_SET_VOLUME = 'setv'; - -static thread_id am_thread = -1; -static sem_id am_done_sem = -1; - -static volatile float am_volume; - -static status_t audio_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Audio manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_AUDIO_MANAGER: - return 0; - - case MSG_ENTER_STREAM: - the_player->Start(); - break; - - case MSG_EXIT_STREAM: - the_player->Stop(); - break; - - case MSG_GET_VOLUME: - am_volume = the_player->Volume(); - break; - - case MSG_SET_VOLUME: - the_player->SetVolume(am_volume); - break; - } - - // Acknowledge - release_sem(am_done_sem); - } -} - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[0]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - // Init audio status and feature flags - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(2); - set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphores - audio_irq_done_sem = create_sem(0, "Audio IRQ Done"); - am_done_sem = create_sem(0, "Audio Manager Done"); - - // Start audio manager thread - am_thread = spawn_thread(audio_manager, "Audio Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(am_thread); - - // Start stream - media_raw_audio_format format; - format.frame_rate = AudioStatus.sample_rate >> 16; - format.channel_count = AudioStatus.channels; - format.format = media_raw_audio_format::B_AUDIO_SHORT; - format.byte_order = B_MEDIA_BIG_ENDIAN; - audio_frames_per_block = 4096; - size_t block_size = (AudioStatus.sample_size >> 3) * AudioStatus.channels * audio_frames_per_block; - D(bug("AudioInit: block size %d\n", block_size)); - format.buffer_size = block_size; - the_player = new BSoundPlayer(&format, "MacOS Audio", playbuffer_func, NULL, NULL); - if (the_player->InitCheck() != B_NO_ERROR) { - printf("FATAL: Cannot initialize BSoundPlayer\n"); - delete the_player; - the_player = NULL; - return; - } else - the_player->SetHasData(true); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Stop stream - if (the_player) { - the_player->Stop(); - delete the_player; - the_player = NULL; - } - - // Stop audio manager - if (am_thread > 0) { - status_t l; - send_data(am_thread, MSG_QUIT_AUDIO_MANAGER, NULL, 0); - wait_for_thread(am_thread, &l); - } - - // Delete semaphores - delete_sem(am_done_sem); - delete_sem(audio_irq_done_sem); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - while (send_data(am_thread, MSG_ENTER_STREAM, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - while (send_data(am_thread, MSG_EXIT_STREAM, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; -} - - -/* - * Streaming function - */ - -static uint32 apple_stream_info; // Mac address of SoundComponentData struct describing next buffer - -static void playbuffer_func(void *arg, void *buf, size_t size, const media_raw_audio_format &format) -{ - // Check if new buffer is available - if (acquire_sem_etc(audio_irq_done_sem, 1, B_TIMEOUT, 0) == B_NO_ERROR) { - - // Get size of audio data - D(bug("stream: new buffer present\n")); - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - size_t work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: size %d, work_size %d\n", size, work_size)); - if (work_size > size) - work_size = size; - - if (format.format != media_raw_audio_format::B_AUDIO_SHORT) { - D(bug("Wrong audio format %04x\n", format.format)); - return; - } - - // Place data into Media Kit buffer - Mac2Host_memcpy(buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - if (work_size != size) - memset((uint8 *)buf + work_size, 0, size - work_size); - } - - } else - memset(buf, 0, size); - - // Trigger audio interrupt to get new buffer - if (AudioStatus.num_sources) { - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - } -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - release_sem(audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - return true; -} - -bool audio_set_sample_size(int index) -{ - return true; -} - -bool audio_set_channels(int index) -{ - return true; -} - - -/* - * Get/set audio info - */ - -bool audio_get_main_mute(void) -{ - return false; -} - -uint32 audio_get_main_volume(void) -{ - if (audio_open) { - while (send_data(am_thread, MSG_GET_VOLUME, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; - return int(am_volume * 256.0) * 0x00010001; - } else - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ - if (audio_open) { - am_volume = float((vol >> 16) + (vol & 0xffff)) / 512.0; - while (send_data(am_thread, MSG_SET_VOLUME, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; - } -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ -} diff --git a/BasiliskII/src/BeOS/clip_beos.cpp b/BasiliskII/src/BeOS/clip_beos.cpp deleted file mode 100644 index 10159ec6c..000000000 --- a/BasiliskII/src/BeOS/clip_beos.cpp +++ /dev/null @@ -1,128 +0,0 @@ -/* - * clip_beos.cpp - Clipboard handling, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include - -#include "clip.h" -#include "prefs.h" - -#define DEBUG 1 -#include "debug.h" - - -// Flag: Don't convert clipboard text -static bool no_clip_conversion; - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length)); - if (length <= 0) - return; - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - - if (no_clip_conversion) { - - // Only convert CR->LF - char *buf = new char[length]; - for (int i=0; iAddData("text/plain", B_MIME_TYPE, buf, length); - be_clipboard->Commit(); - delete[] buf; - - } else { - - // Convert text from Mac charset to UTF-8 - int32 dest_length = length*3; - int32 state = 0; - char *buf = new char[dest_length]; - if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, (char *)scrap, &length, buf, &dest_length, &state) == B_OK) { - for (int i=0; iAddData("text/plain", B_MIME_TYPE, buf, dest_length); - be_clipboard->Commit(); - } - delete[] buf; - } - be_clipboard->Unlock(); - } - break; - } -} diff --git a/BasiliskII/src/BeOS/ether_beos.cpp b/BasiliskII/src/BeOS/ether_beos.cpp deleted file mode 100644 index ebc85daa6..000000000 --- a/BasiliskII/src/BeOS/ether_beos.cpp +++ /dev/null @@ -1,532 +0,0 @@ -/* - * ether_beos.cpp - Ethernet device driver, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include -#include -#include - -#include -#include -#include -#include - -#ifdef __HAIKU__ -#include -#include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "macos_util.h" -#include "ether.h" -#include "ether_defs.h" - -#include "sheep_net.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// List of attached protocols -struct NetProtocol { - uint16 type; - uint32 handler; -}; - -static BList prot_list; - - -// Global variables -static thread_id read_thread; // Packet reception thread -static bool ether_thread_active = true; // Flag for quitting the reception thread - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer -static sem_id read_sem, write_sem; // Semaphores to trigger packet reading/writing - -static int fd = -1; // UDP socket fd -static bool udp_tunnel = false; - - -// Prototypes -static status_t receive_proc(void *data); - - -/* - * Find protocol in list - */ - -static NetProtocol *find_protocol(uint16 type) -{ - // All 802.2 types are the same - if (type <= 1500) - type = 0; - - // Search list (we could use hashing here but there are usually only three - // handlers installed: 0x0000 for AppleTalk and 0x0800/0x0806 for TCP/IP) - NetProtocol *p; - for (int i=0; (p = (NetProtocol *)prot_list.ItemAt(i)) != NULL; i++) - if (p->type == type) - return p; - return NULL; -} - - -/* - * Remove all protocols - */ - -static void remove_all_protocols(void) -{ - NetProtocol *p; - while ((p = (NetProtocol *)prot_list.RemoveItem((long)0)) != NULL) - delete p; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - // Do nothing if no Ethernet device specified - if (PrefsFindString("ether") == NULL) - return false; - - // Find net_server team -i_wanna_try_that_again: - bool found_add_on = false; - team_info t_info; - int32 t_cookie = 0; - image_info i_info; - int32 i_cookie = 0; - while (get_next_team_info(&t_cookie, &t_info) == B_NO_ERROR) { - if (strstr(t_info.args,"net_server")!=NULL) { - - // Check if sheep_net add-on is loaded - while (get_next_image_info(t_info.team, &i_cookie, &i_info) == B_NO_ERROR) { - if (strstr(i_info.name, "sheep_net") != NULL) { - found_add_on = true; - break; - } - } - } - if (found_add_on) break; - } - if (!found_add_on) { - - // Search for sheep_net in network config file - char str[1024]; - bool sheep_net_found = false; - FILE *fin = fopen("/boot/home/config/settings/network", "r"); - while (!feof(fin)) { - fgets(str, 1024, fin); - if (strstr(str, "PROTOCOLS")) - if (strstr(str, "sheep_net")) - sheep_net_found = true; - } - fclose(fin); - - // It was found, so something else must be wrong - if (sheep_net_found) { - WarningAlert(GetString(STR_NO_NET_ADDON_WARN)); - return false; - } - - // Not found, inform the user - if (!ChoiceAlert(GetString(STR_NET_CONFIG_MODIFY_WARN), GetString(STR_OK_BUTTON), GetString(STR_CANCEL_BUTTON))) - return false; - - // Change the network config file and restart the network - fin = fopen("/boot/home/config/settings/network", "r"); - FILE *fout = fopen("/boot/home/config/settings/network.2", "w"); - bool global_found = false; - bool modified = false; - while (!feof(fin)) { - str[0] = 0; - fgets(str, 1024, fin); - if (!global_found && strstr(str, "GLOBAL:")) { - global_found = true; - } else if (global_found && !modified && strstr(str, "PROTOCOLS")) { - str[strlen(str)-1] = 0; - strcat(str, " sheep_net\n"); - modified = true; - } else if (global_found && !modified && strlen(str) > 2 && str[strlen(str) - 2] == ':') { - fputs("\tPROTOCOLS = sheep_net\n", fout); - modified = true; - } - fputs(str, fout); - } - if (!modified) - fputs("\tPROTOCOLS = sheep_net\n", fout); - fclose(fout); - fclose(fin); - remove("/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network", "/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network.2", "/boot/home/config/settings/network"); - - app_info ai; - if (be_roster->GetAppInfo("application/x-vnd.Be-NETS", &ai) == B_OK) { - BMessenger msg(NULL, ai.team); - if (msg.IsValid()) { - while (be_roster->IsRunning("application/x-vnd.Be-NETS")) { - msg.SendMessage(B_QUIT_REQUESTED); - snooze(500000); - } - } - } - BPath path; - find_directory(B_BEOS_BOOT_DIRECTORY, &path); - path.Append("Netscript"); - const char *argv[3] = {"/bin/sh", path.Path(), NULL}; - thread_id net_server = load_image(2, argv, (const char **)environ); - resume_thread(net_server); - status_t l; - wait_for_thread(net_server, &l); - goto i_wanna_try_that_again; - } - - // Set up communications with add-on - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - WarningAlert(GetString(STR_NET_ADDON_INIT_FAILED)); - return false; - } - if ((buffer_area = clone_area("local packet buffer", (void **)&net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - D(bug("EtherInit: couldn't clone packet area\n")); - WarningAlert(GetString(STR_NET_ADDON_CLONE_FAILED)); - return false; - } - if ((read_sem = create_sem(0, "ether read")) < B_NO_ERROR) { - printf("FATAL: can't create Ethernet semaphore\n"); - return false; - } - net_buffer_ptr->read_sem = read_sem; - write_sem = net_buffer_ptr->write_sem; - read_thread = spawn_thread(receive_proc, "Ethernet Receiver", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - for (int i=0; iwrite[i].cmd = IN_USE | (ACTIVATE_SHEEP_NET << 8); - rd_pos = wr_pos = 0; - release_sem(write_sem); - - // Get Ethernet address - memcpy(ether_addr, net_buffer_ptr->ether_addr, 6); - D(bug("Ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - - // Everything OK - return true; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - // Close communications with add-on - for (int i=0; iwrite[i].cmd = IN_USE | (DEACTIVATE_SHEEP_NET << 8); - release_sem(write_sem); - - // Quit reception thread - ether_thread_active = false; - status_t result; - release_sem(read_sem); - wait_for_thread(read_thread, &result); - - delete_sem(read_sem); - delete_area(buffer_area); - - // Remove all protocols - remove_all_protocols(); -} - - -/* - * Reset - */ - -void ether_reset(void) -{ - remove_all_protocols(); -} - - -/* - * Add multicast address - */ - -int16 ether_add_multicast(uint32 pb) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't enable multicast address\n")); - } else { - Mac2Host_memcpy(p->data, pb + eMultiAddr, 6); - p->length = 6; - p->cmd = IN_USE | (ADD_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Delete multicast address - */ - -int16 ether_del_multicast(uint32 pb) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't enable multicast address\n")); - } else { - Mac2Host_memcpy(p->data, pb + eMultiAddr, 6); - p->length = 6; - p->cmd = IN_USE | (REMOVE_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - // Already attached? - NetProtocol *p = find_protocol(type); - if (p != NULL) - return lapProtErr; - else { - // No, create and attach - p = new NetProtocol; - p->type = type; - p->handler = handler; - prot_list.AddItem(p); - return noErr; - } -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - NetProtocol *p = find_protocol(type); - if (p != NULL) { - prot_list.RemoveItem(p); - delete p; - return noErr; - } else - return lapProtErr; -} - - -/* - * Transmit raw ethernet packet - */ - -int16 ether_write(uint32 wds) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't transmit packet (buffer full)\n")); - } else { - - // Copy packet to buffer - int len = ether_wds_to_buffer(wds, p->data); - -#if MONITOR - bug("Sending Ethernet packet:\n"); - for (int i=0; idata[i]); - } - bug("\n"); -#endif - - // Notify add-on - p->length = len; - p->cmd = IN_USE | (SHEEP_PACKET << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Packet reception thread (non-UDP) - */ - -static status_t receive_proc(void *data) -{ - while (ether_thread_active) { - if (net_buffer_ptr->read[rd_pos].cmd & IN_USE) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - acquire_sem_etc(read_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Packet reception thread (UDP) - */ - -static status_t receive_proc_udp(void *data) -{ - while (ether_thread_active) { - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 1; - timeout.tv_usec = 0; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Start UDP packet reception thread - */ - -bool ether_start_udp_thread(int socket_fd) -{ - fd = socket_fd; - udp_tunnel = true; - ether_thread_active = true; - read_thread = spawn_thread(receive_proc_udp, "UDP Receiver", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - return true; -} - - -/* - * Stop UDP packet reception thread - */ - -void ether_stop_udp_thread(void) -{ - ether_thread_active = false; - status_t result; - wait_for_thread(read_thread, &result); -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - EthernetPacket ether_packet; - uint32 packet = ether_packet.addr(); - - if (udp_tunnel) { - - ssize_t length; - - // Read packets from socket and hand to ether_udp_read() for processing - while (true) { - struct sockaddr_in from; - socklen_t from_len = sizeof(from); - length = recvfrom(fd, Mac2HostAddr(packet), 1514, 0, (struct sockaddr *)&from, &from_len); - if (length < 14) - break; - ether_udp_read(packet, length, &from); - } - - } else { - - // Call protocol handler for received packets - net_packet *p = &net_buffer_ptr->read[rd_pos]; - while (p->cmd & IN_USE) { - if ((p->cmd >> 8) == SHEEP_PACKET) { - Host2Mac_memcpy(packet, p->data, p->length); -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; ilength; i++) { - bug("%02x ", ReadMacInt8(packet + i)); - } - bug("\n"); -#endif - // Get packet type - uint16 type = ReadMacInt16(packet + 12); - - // Look for protocol - NetProtocol *prot = find_protocol(type); - if (prot == NULL) - goto next; - - // No default handler - if (prot->handler == 0) - goto next; - - // Copy header to RHA - Mac2Mac_memcpy(ether_data + ed_RHA, packet, 14); - D(bug(" header %08lx%04lx %08lx%04lx %04lx\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = type; // Packet type - r.d[1] = p->length - 14; // Remaining packet length (without header, for ReadPacket) - r.a[0] = packet + 14; // Pointer to packet (Mac address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08lx, type %08lx, length %08lx, data %08lx, rha %08lx, read_packet %08lx\n", prot->handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(prot->handler, &r); - } -next: p->cmd = 0; // Free packet - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - p = &net_buffer_ptr->read[rd_pos]; - } - } - D(bug(" EtherIRQ done\n")); -} diff --git a/BasiliskII/src/BeOS/extfs_beos.cpp b/BasiliskII/src/BeOS/extfs_beos.cpp deleted file mode 100644 index 5b7ab4d62..000000000 --- a/BasiliskII/src/BeOS/extfs_beos.cpp +++ /dev/null @@ -1,489 +0,0 @@ -/* - * extfs_beos.cpp - MacOS file system for access native file system access, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include -#include -#include -#include - -#include "extfs.h" -#include "extfs_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - -// Temporary buffer for transfers from/to kernel space -const int TMP_BUF_SIZE = 0x10000; -static uint8 *tmp_buf = NULL; - - -/* - * Initialization - */ - -void extfs_init(void) -{ - // Allocate temporary buffer - tmp_buf = new uint8[TMP_BUF_SIZE]; -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ - // Delete temporary buffer - delete[] tmp_buf; -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - int l = strlen(path); - if (l < MAX_PATH_LENGTH-1 && path[l-1] != '/') { - path[l] = '/'; - path[l+1] = 0; - } - strncat(path, component, MAX_PATH_LENGTH-1); -} - - -/* - * Get/set finder info for file/directory specified by full path - */ - -struct mime2type { - const char *mime; - uint32 type; - uint32 creator; - bool reversible; // type -> mime translation possible -}; - -static const mime2type m2t_translation[] = { - {"application/x-compress", 'ZIVM', 'LZIV', true}, - {"application/x-gzip", 'Gzip', 'Gzip', true}, - {"application/x-macbinary", 'BINA', '????', false}, - {"application/mac-binhex40", 'TEXT', 'SITx', false}, - {"application/pdf", 'PDF ', 'CARO', true}, - {"application/postscript", 'TEXT', 'ttxt', false}, - {"application/x-stuffit", 'SIT!', 'SITx', true}, - {"application/x-tar", 'TARF', 'TAR ', true}, - {"application/x-uuencode", 'TEXT', 'SITx', false}, - {"application/zip", 'ZIP ', 'ZIP ', true}, - {"audio/x-8svx", '8SVX', 'SNDM', true}, - {"audio/x-aifc", 'AIFC', 'TVOD', true}, - {"audio/x-aiff", 'AIFF', 'TVOD', true}, - {"audio/basic", 'ULAW', 'TVOD', true}, - {"audio/x-midi", 'MIDI', 'TVOD', true}, - {"audio/x-mpeg", 'MPG ', 'TVOD', true}, - {"audio/x-wav", 'WAVE', 'TVOD', true}, - {"image/x-bmp", 'BMPf', 'ogle', true}, - {"image/gif", 'GIFf', 'ogle', true}, - {"image/x-ilbm", 'ILBM', 'GKON', true}, - {"image/jpeg", 'JPEG', 'ogle', true}, - {"image/jpeg", 'JFIF', 'ogle', true}, - {"image/x-photoshop", '8BPS', '8BIM', true}, - {"image/pict", 'PICT', 'ogle', true}, - {"image/png", 'PNGf', 'ogle', true}, - {"image/x-sgi", '.SGI', 'ogle', true}, - {"image/x-targa", 'TPIC', 'ogle', true}, - {"image/tiff", 'TIFF', 'ogle', true}, - {"text/html", 'TEXT', 'MOSS', false}, - {"text/plain", 'TEXT', 'ttxt', true}, - {"text/rtf", 'TEXT', 'MSWD', false}, - {"text/x-source-code", 'TEXT', 'R*ch', false}, - {"video/mpeg", 'MPEG', 'TVOD', true}, - {"video/quicktime", 'MooV', 'TVOD', true}, - {"video/x-flc", 'FLI ', 'TVOD', true}, - {"video/x-msvideo", 'VfW ', 'TVOD', true}, - {NULL, 0, 0, false} // End marker -}; - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Open file - int fd = open(path, O_RDONLY); - if (fd < 0) - return; - - if (!is_dir) { - - // Read BeOS MIME type - ssize_t actual = fs_read_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, tmp_buf, 256); - tmp_buf[255] = 0; - - if (actual > 0) { - - // Translate MIME type to MacOS type/creator - uint8 mactype[4]; - if (sscanf((char *)tmp_buf, "application/x-MacOS-%c%c%c%c", mactype, mactype+1, mactype+2, mactype+3) == 4) { - - // MacOS style type - WriteMacInt32(finfo + fdType, (mactype[0] << 24) | (mactype[1] << 16) | (mactype[2] << 8) | mactype[3]); - - } else { - - // MIME string, look in table - for (int i=0; m2t_translation[i].mime; i++) { - if (!strcmp((char *)tmp_buf, m2t_translation[i].mime)) { - WriteMacInt32(finfo + fdType, m2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, m2t_translation[i].creator); - break; - } - } - } - } - - // Override file type with MACOS:CREATOR attribute - if (fs_read_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4) == 4) - WriteMacInt32(finfo + fdCreator, (tmp_buf[0] << 24) | (tmp_buf[1] << 16) | (tmp_buf[2] << 8) | tmp_buf[3]); - } - - // Read MACOS:HFS_FLAGS attribute - if (fs_read_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2) == 2) - WriteMacInt16(finfo + fdFlags, (tmp_buf[0] << 8) | tmp_buf[1]); - - // Close file - close(fd); -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Open file - int fd = open(path, O_WRONLY); - if (fd < 0) - return; - - if (!is_dir) { - - // Set BEOS:TYPE attribute - uint32 type = ReadMacInt32(finfo + fdType); - if (type) { - for (int i=0; m2t_translation[i].mime; i++) { - if (m2t_translation[i].type == type && m2t_translation[i].reversible) { - fs_write_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, m2t_translation[i].mime, strlen(m2t_translation[i].mime) + 1); - break; - } - } - } - - // Set MACOS:CREATOR attribute - uint32 creator = ReadMacInt32(finfo + fdCreator); - if (creator) { - tmp_buf[0] = creator >> 24; - tmp_buf[1] = creator >> 16; - tmp_buf[2] = creator >> 8; - tmp_buf[3] = creator; - fs_write_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4); - } - } - - // Write MACOS:HFS_FLAGS attribute - uint16 flags = ReadMacInt16(finfo + fdFlags); - if (flags != DEFAULT_FINDER_FLAGS) { - tmp_buf[0] = flags >> 8; - tmp_buf[1] = flags; - fs_write_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2); - } else - fs_remove_attr(fd, "MACOS:HFS_FLAGS"); - - // Close file - close(fd); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open file - int fd = open(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size of MACOS:RFORK attribute - struct attr_info info; - if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0) - info.size = 0; - - // Close file and return size - close(fd); - return info.size; -} - -int open_rfork(const char *path, int flag) -{ - // Open original file - int fd = open(path, flag); - if (fd < 0) - return -1; - - // Open temporary file for resource fork - char rname[L_tmpnam]; - tmpnam(rname); - int rfd = open(rname, O_RDWR | O_CREAT | O_TRUNC, 0666); - if (rfd < 0) { - close(fd); - return -1; - } - unlink(rname); // File will be deleted when closed - - // Get size of MACOS:RFORK attribute - struct attr_info info; - if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0) - info.size = 0; - - // Copy resource data from attribute to temporary file - if (info.size > 0) { - - // Allocate buffer - void *buf = malloc(info.size); - if (buf == NULL) { - close(rfd); - close(fd); - return -1; - } - - // Copy data - fs_read_attr(fd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, info.size); - write(rfd, buf, info.size); - lseek(rfd, 0, SEEK_SET); - - // Free buffer - if (buf) - free(buf); - } - - // Close original file - close(fd); - return rfd; -} - -void close_rfork(const char *path, int fd) -{ - if (fd < 0) - return; - - // Get size of temporary file - struct stat st; - if (fstat(fd, &st) < 0) - st.st_size = 0; - - // Open original file - int ofd = open(path, O_WRONLY); - if (ofd > 0) { - - // Copy resource data to MACOS:RFORK attribute - if (st.st_size > 0) { - - // Allocate buffer - void *buf = malloc(st.st_size); - if (buf == NULL) { - close(ofd); - close(fd); - return; - } - - // Copy data - lseek(fd, 0, SEEK_SET); - read(fd, buf, st.st_size); - fs_write_attr(ofd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, st.st_size); - - // Free buffer - if (buf) - free(buf); - - } else - fs_remove_attr(ofd, "MACOS:RFORK"); - - // Close original file - close(ofd); - } - - // Close temporary file - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -static inline ssize_t sread(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = read(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - // Buffer in kernel space? - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - ssize_t actual = 0; - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - ssize_t res = sread(fd, tmp_buf, transfer_size); - if (res < 0) - return res; - memcpy(buffer, tmp_buf, res); - buffer = (void *)((uint8 *)buffer + res); - length -= res; - actual += res; - if (res != transfer_size) - return actual; - } - return actual; - - } else { - - // No, transfer directly - return sread(fd, buffer, length); - } -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -static inline ssize_t swrite(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = write(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - // Buffer in kernel space? - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - ssize_t actual = 0; - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(tmp_buf, buffer, transfer_size); - ssize_t res = swrite(fd, tmp_buf, transfer_size); - if (res < 0) - return res; - buffer = (void *)((uint8 *)buffer + res); - length -= res; - actual += res; - if (res != transfer_size) - return actual; - } - return actual; - - } else { - - // No, transfer directly - return swrite(fd, buffer, length); - } -} - - -/* - * Remove file/directory, returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - if (remove(path) < 0) { - if (errno == EISDIR) - return rmdir(path) == 0; - else - return false; - } - return true; -} - - -/* - * Rename/move file/directory, returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - return rename(old_path, new_path) == 0; -} - -/* - * Strings (filenames) conversion - */ - -// Convert from the host OS filename encoding to MacRoman -const char *host_encoding_to_macroman(const char *filename) -{ - int32 state = 0; - static char buffer[512]; - int32 size = sizeof(buffer) - 1; - int32 insize = strlen(filename); - convert_from_utf8(B_MAC_ROMAN_CONVERSION, filename, &insize, buffer, &size, &state); - buffer[size] = 0; - return buffer; -} - -// Convert from MacRoman to host OS filename encoding -const char *macroman_to_host_encoding(const char *filename) -{ - int32 state = 0; - static char buffer[512]; - int32 insize = strlen(filename); - int32 size = sizeof(buffer) - 1; - convert_to_utf8(B_MAC_ROMAN_CONVERSION, filename, &insize, buffer, &size, &state); - buffer[size] = 0; - return buffer; -} diff --git a/BasiliskII/src/BeOS/main_beos.cpp b/BasiliskII/src/BeOS/main_beos.cpp deleted file mode 100644 index 507e3bde0..000000000 --- a/BasiliskII/src/BeOS/main_beos.cpp +++ /dev/null @@ -1,826 +0,0 @@ -/* - * main_beos.cpp - Startup code for BeOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include - -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "xpram.h" -#include "timer.h" -#include "video.h" -#include "rom_patches.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "sys.h" -#include "user_strings.h" -#include "version.h" -#include "main.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-BasiliskII"; -const char ROM_FILE_NAME[] = "ROM"; -const char RAM_AREA_NAME[] = "Macintosh RAM"; -const char ROM_AREA_NAME[] = "Macintosh ROM"; -const uint32 MSG_START = 'strt'; // Emulator start message -const uint32 ROM_AREA_SIZE = 0x500000; // Enough to hold PowerMac ROM (for powerrom_cpu) - -// Prototypes -#if __POWERPC__ -static void sigsegv_handler(vregs *r); -#endif - - -// Application object -class BasiliskII : public BApplication { -public: - BasiliskII() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - - // Initialize other variables - rom_area = ram_area = -1; - xpram_thread = tick_thread = -1; - xpram_thread_active = true; - tick_thread_active = true; - AllowQuitting = true; - } - virtual void ReadyToRun(void); - virtual void MessageReceived(BMessage *msg); - void StartEmulator(void); - virtual bool QuitRequested(void); - virtual void Quit(void); - - thread_id xpram_thread; // XPRAM watchdog - thread_id tick_thread; // 60Hz thread - - volatile bool xpram_thread_active; // Flag for quitting the XPRAM thread - volatile bool tick_thread_active; // Flag for quitting the 60Hz thread - - bool AllowQuitting; // Flag: Alt-Q quitting allowed - -private: - static status_t emul_func(void *arg); - static status_t tick_func(void *arg); - static status_t xpram_func(void *arg); - static void sigsegv_invoc(int sig, void *arg, vregs *r); - - void init_rom(void); - void load_rom(void); - - area_id rom_area; // ROM area ID - area_id ram_area; // RAM area ID - - struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) - - // Exceptions - class area_error {}; - class file_open_error {}; - class file_read_error {}; - class rom_size_error {}; - - char* vmdir; -}; - -static BasiliskII *the_app; - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables for PowerROM CPU -thread_id emul_thread = -1; // Emulator thread - -#if __POWERPC__ -int sheep_fd = -1; // fd of sheep driver -#endif - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - the_app = new BasiliskII(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Run application - */ - -void BasiliskII::ReadyToRun(void) -{ - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - srand(real_time_clock()); - tzset(); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Delete old areas - area_id old_ram_area = find_area(RAM_AREA_NAME); - if (old_ram_area > 0) - delete_area(old_ram_area); - area_id old_rom_area = find_area(ROM_AREA_NAME); - if (old_rom_area > 0) - delete_area(old_rom_area); - - // Read preferences - int argc = 0; - char **argv = NULL; - PrefsInit(vmdir, argc, argv); - - // Init system routines - SysInit(); - - // Show preferences editor (or start emulator directly) - if (!PrefsFindBool("nogui")) - PrefsEditor(); - else - PostMessage(MSG_START); -} - - -/* - * Message received - */ - -void BasiliskII::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_START: - StartEmulator(); - break; - default: - BApplication::MessageReceived(msg); - } -} - - -/* - * Start emulator - */ - -void BasiliskII::StartEmulator(void) -{ - char str[256]; - -#if REAL_ADDRESSING - // Open sheep driver and remap low memory - sheep_fd = open("/dev/sheep", 0); - if (sheep_fd < 0) { - sprintf(str, GetString(STR_NO_SHEEP_DRIVER_ERR), strerror(sheep_fd), sheep_fd); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - status_t res = ioctl(sheep_fd, SHEEP_UP); - if (res < 0) { - sprintf(str, GetString(STR_SHEEP_UP_ERR), strerror(res), res); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } -#endif - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - - RAMBaseHost = (uint8 *)0x10000000; - ram_area = create_area(RAM_AREA_NAME, (void **)&RAMBaseHost, B_BASE_ADDRESS, RAMSize, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (ram_area < 0) { - ErrorAlert(STR_NO_RAM_AREA_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); - - // Create area and load Mac ROM - try { - init_rom(); - } catch (area_error) { - ErrorAlert(STR_NO_ROM_AREA_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_open_error) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_read_error) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (rom_size_error) { - ErrorAlert(STR_ROM_SIZE_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Initialize everything - if (!InitAll(NULL)) { - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Write protect ROM - set_area_protection(rom_area, B_READ_AREA); - - // Disallow quitting with Alt-Q from now on - AllowQuitting = false; - - // Start XPRAM watchdog thread - xpram_thread = spawn_thread(xpram_func, "XPRAM Watchdog", B_LOW_PRIORITY, this); - resume_thread(xpram_thread); - - // Start 60Hz interrupt - tick_thread = spawn_thread(tick_func, "60Hz", B_REAL_TIME_PRIORITY, this); - resume_thread(tick_thread); - - // Start emulator thread - emul_thread = spawn_thread(emul_func, "MacOS", B_NORMAL_PRIORITY, this); - resume_thread(emul_thread); -} - - -/* - * Quit emulator - */ - -void QuitEmulator(void) -{ - the_app->AllowQuitting = true; - be_app->PostMessage(B_QUIT_REQUESTED); - exit_thread(0); -} - -bool BasiliskII::QuitRequested(void) -{ - if (AllowQuitting) - return BApplication::QuitRequested(); - else - return false; -} - -void BasiliskII::Quit(void) -{ - status_t l; - - // Stop 60Hz interrupt - if (tick_thread > 0) { - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - } - - // Wait for emulator thread to finish - if (emul_thread > 0) - wait_for_thread(emul_thread, &l); - - // Exit 680x0 emulation - Exit680x0(); - - // Stop XPRAM watchdog thread - if (xpram_thread > 0) { - xpram_thread_active = false; - suspend_thread(xpram_thread); // Wake thread up from snooze() - snooze(1000); - resume_thread(xpram_thread); - wait_for_thread(xpram_thread, &l); - } - - // Deinitialize everything - ExitAll(); - - // Delete ROM area - if (rom_area >= 0) - delete_area(rom_area); - - // Delete RAM area - if (ram_area >= 0) - delete_area(ram_area); - -#if REAL_ADDRESSING - // Unmap low memory and close memory mess driver - if (sheep_fd >= 0) { - ioctl(sheep_fd, SHEEP_DOWN); - close(sheep_fd); - } -#endif - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - - BApplication::Quit(); -} - - -/* - * Create area for ROM (sets rom_area) and load ROM file - * - * area_error : Cannot create area - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void BasiliskII::init_rom(void) -{ - // Create area for ROM - ROMBaseHost = (uint8 *)0x40800000; - rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBaseHost, B_BASE_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (rom_area < 0) - throw area_error(); - D(bug("ROM area %ld at %p\n", rom_area, ROMBaseHost)); - - // Load ROM - load_rom(); -} - - -/* - * Load ROM file - * - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void BasiliskII::load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Try to open ROM file - BFile file(rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) - throw file_open_error(); - - printf(GetString(STR_READING_ROM_FILE)); - - // Is the ROM size correct? - off_t rom_size = 0; - file.GetSize(&rom_size); - if (rom_size != 64*1024 && rom_size != 128*1024 && rom_size != 256*1024 && rom_size != 512*1024 && rom_size != 1024*1024) - throw rom_size_error(); - - uint8 *rom = new uint8[rom_size]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, rom_size); - if (actual == rom_size) - memcpy(ROMBaseHost, rom, rom_size); - delete[] rom; - if (actual != rom_size) - throw file_read_error(); - ROMSize = rom_size; -} - - -/* - * Emulator thread function - */ - -status_t BasiliskII::emul_func(void *arg) -{ - BasiliskII *obj = (BasiliskII *)arg; - -#if __POWERPC__ - // Install data access signal handler - sigemptyset(&obj->sigsegv_action.sa_mask); - obj->sigsegv_action.sa_handler = (__signal_func_ptr)(obj->sigsegv_invoc); - obj->sigsegv_action.sa_flags = 0; - obj->sigsegv_action.sa_userdata = arg; - sigaction(SIGSEGV, &obj->sigsegv_action, NULL); -#endif - - // Exceptions will send signals - disable_debugger(true); - - // Start 68k and jump to ROM boot routine - Start680x0(); - - // Quit program - obj->AllowQuitting = true; - be_app->PostMessage(B_QUIT_REQUESTED); - return 0; -} - - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - atomic_or((int32 *)&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - atomic_and((int32 *)&InterruptFlags, ~flag); -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -status_t BasiliskII::tick_func(void *arg) -{ - BasiliskII *obj = (BasiliskII *)arg; - int tick_counter = 0; - bigtime_t current = system_time(); - - while (obj->tick_thread_active) { - - // Wait - current += 16625; - snooze_until(current, B_SYSTEM_TIMEBASE); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); - } - - // Trigger 60Hz interrupt - SetInterruptFlag(INTFLAG_60HZ); - TriggerInterrupt(); - } - return 0; -} - - -/* - * XPRAM watchdog thread (saves XPRAM every minute) - */ - -status_t BasiliskII::xpram_func(void *arg) -{ - uint8 last_xpram[XPRAM_SIZE]; - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - - while (((BasiliskII *)arg)->xpram_thread_active) { - snooze(60*1000000); - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - return 0; -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - VideoQuitFullScreen(); - char str[256]; - sprintf(str, GetString(STR_GUI_ERROR_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_ERROR_ALERT_TITLE), str, GetString(STR_QUIT_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, pos, neg, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - return alert->Go() == 0; -} - - -/* - * SEGV handler - */ - -#if __POWERPC__ -static uint32 segv_r[32]; - -asm void BasiliskII::sigsegv_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigsegv_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} - -static void sigsegv_handler(vregs *r) -{ - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Analyze opcode - enum { - TYPE_UNKNOWN, - TYPE_LOAD, - TYPE_STORE - } transfer_type = TYPE_UNKNOWN; - enum { - SIZE_UNKNOWN, - SIZE_BYTE, - SIZE_HALFWORD, - SIZE_WORD - } transfer_size = SIZE_UNKNOWN; - enum { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX - } addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - } - - // Calculate effective address - uint32 addr = 0; - switch (addr_mode) { - case MODE_X: - case MODE_UX: - if (ra == 0) - addr = segv_r[rb]; - else - addr = segv_r[ra] + segv_r[rb]; - break; - case MODE_NORM: - case MODE_U: - if (ra == 0) - addr = (int32)(int16)imm; - else - addr = segv_r[ra] + (int32)(int16)imm; - break; - } - - // Ignore ROM writes - if (transfer_type == TYPE_STORE && addr >= (uint32)ROMBaseHost && addr < (uint32)ROMBaseHost + ROMSize) { -// D(bug("WARNING: %s write access to ROM at %p, 68k pc %p\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc)); - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - r->pc += 4; - goto rti; - } - - // For all other errors, jump into debugger - char str[256]; - sprintf(str, "SIGSEGV\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - disable_debugger(false); - debugger(str); - QuitEmulator(); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} -#endif diff --git a/BasiliskII/src/BeOS/prefs_beos.cpp b/BasiliskII/src/BeOS/prefs_beos.cpp deleted file mode 100644 index 9a74d6431..000000000 --- a/BasiliskII/src/BeOS/prefs_beos.cpp +++ /dev/null @@ -1,106 +0,0 @@ -/* - * prefs_beos.cpp - Preferences handling, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include - -#include "sysdeps.h" -#include "prefs.h" -#include "main.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"powerrom", TYPE_STRING, false, "path of PowerMac ROM"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Preferences file name and path -const char PREFS_FILE_NAME[] = "BasiliskII_prefs"; -static BPath prefs_path; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char* vmdir) -{ -#if 0 - if (vmdir) { - prefs_path.SetTo(vmdir); - prefs_path.Append("prefs"); - FILE *prefs = fopen(prefs_path.Path(), "r"); - if (!prefs) { - printf("No file at %s found.\n", prefs_path.Path()); - exit(1); - } - LoadPrefsFromStream(prefs); - fclose(prefs); - return; - } -#endif - - // Construct prefs path - find_directory(B_USER_SETTINGS_DIRECTORY, &prefs_path, true); - prefs_path.Append(PREFS_FILE_NAME); - - // Read preferences from settings file - FILE *f = fopen(prefs_path.Path(), "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.Path(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "/boot"); -} diff --git a/BasiliskII/src/BeOS/prefs_editor_beos.cpp b/BasiliskII/src/BeOS/prefs_editor_beos.cpp deleted file mode 100644 index a40e4748d..000000000 --- a/BasiliskII/src/BeOS/prefs_editor_beos.cpp +++ /dev/null @@ -1,1022 +0,0 @@ -/* - * prefs_editor_beos.cpp - Preferences editor, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "cdrom.h" -#include "xpram.h" -#include "prefs.h" -#include "about_window.h" -#include "user_strings.h" -#include "prefs_editor.h" - - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; -const rgb_color slider_fill_color = {102, 152, 255, 0}; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -// Window messages -const uint32 MSG_OK = 'okok'; // "Start" clicked -const uint32 MSG_CANCEL = 'cncl'; // "Quit" clicked -const uint32 MSG_ZAP_PRAM = 'zprm'; - -const int NUM_PANES = 4; - -const uint32 MSG_VOLUME_SELECTED = 'volu'; // "Volumes" pane -const uint32 MSG_VOLUME_INVOKED = 'voli'; -const uint32 MSG_ADD_VOLUME = 'addv'; -const uint32 MSG_CREATE_VOLUME = 'crev'; -const uint32 MSG_REMOVE_VOLUME = 'remv'; -const uint32 MSG_ADD_VOLUME_PANEL = 'advp'; -const uint32 MSG_CREATE_VOLUME_PANEL = 'crvp'; -const uint32 MSG_DEVICE_NAME = 'devn'; -const uint32 MSG_BOOT_ANY = 'bany'; -const uint32 MSG_BOOT_CDROM = 'bcdr'; -const uint32 MSG_NOCDROM = 'nocd'; - -const uint32 MSG_REF_5HZ = ' 5Hz'; // "Graphics/Sound" pane -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_VIDEO_WINDOW = 'vtyw'; -const uint32 MSG_VIDEO_SCREEN = 'vtys'; -const uint32 MSG_SCREEN_MODE = 'sm\0\0'; -const uint32 MSG_NOSOUND = 'nosn'; - -const uint32 MSG_SER_A = 'sera'; // "Serial/Network" pane -const uint32 MSG_SER_B = 'serb'; -const uint32 MSG_ETHER = 'ethr'; -const uint32 MSG_UDPTUNNEL = 'udpt'; - -const uint32 MSG_RAMSIZE = 'rmsz'; // "Memory/Misc" pane -const uint32 MSG_MODELID_5 = 'mi05'; -const uint32 MSG_MODELID_14 = 'mi14'; -const uint32 MSG_CPU_68020 = 'cpu2'; -const uint32 MSG_CPU_68020_FPU = 'cpf2'; -const uint32 MSG_CPU_68030 = 'cpu3'; -const uint32 MSG_CPU_68030_FPU = 'cpf3'; -const uint32 MSG_CPU_68040 = 'cpu4'; - - -// RAM size slider class -class RAMSlider : public BSlider { -public: - RAMSlider(BRect frame, const char *name, const char *label, BMessage *message, - int32 minValue, int32 maxValue, thumb_style thumbType = B_BLOCK_THUMB, - uint32 resizingMode = B_FOLLOW_LEFT | - B_FOLLOW_TOP, - uint32 flags = B_NAVIGABLE | B_WILL_DRAW | - B_FRAME_EVENTS) : BSlider(frame, name, label, message, minValue, maxValue, thumbType, resizingMode, flags) - { - update_text = (char *)malloc(256); - } - - virtual ~RAMSlider() - { - if (update_text) - free(update_text); - } - - virtual char *UpdateText(void) const - { - if (update_text) { - sprintf(update_text, GetString(STR_RAMSIZE_FMT), Value()); - } - return update_text; - } - -private: - char *update_text; -}; - - -// Volumes list view class -class VolumeListView : public BListView { -public: - VolumeListView(BRect frame, const char *name, list_view_type type = B_SINGLE_SELECTION_LIST, uint32 resizeMask = B_FOLLOW_LEFT | B_FOLLOW_TOP, uint32 flags = B_WILL_DRAW | B_FRAME_EVENTS | B_NAVIGABLE) - : BListView(frame, name, type, resizeMask, flags) - {} - - // Handle dropped files and volumes - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - BMessage msg2(MSG_ADD_VOLUME_PANEL); - entry_ref ref; - for (int i=0; msg->FindRef("refs", i, &ref) == B_NO_ERROR; i++) - msg2.AddRef("refs", &ref); - Window()->PostMessage(&msg2); - } else - BListView::MessageReceived(msg); - } -}; - - -// Number-entry BTextControl -class NumberControl : public BTextControl { -public: - NumberControl(BRect frame, float divider, const char *name, const char *label, long value, BMessage *message) - : BTextControl(frame, name, label, NULL, message, B_FOLLOW_LEFT | B_FOLLOW_TOP, B_WILL_DRAW | B_NAVIGABLE) - { - SetDivider(divider); - for (int c=0; c<256; c++) - if (!isdigit(c) && c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - SetValue(value); - } - - // Set integer value - void SetValue(long value) - { - char str[32]; - sprintf(str, "%ld", value); - SetText(str); - } - - // Get integer value - long Value(void) - { - return atol(Text()); - } -}; - - -// Path-entry BTextControl -class PathControl : public BTextControl { -public: - PathControl(bool dir_ctrl_, BRect frame, const char *name, const char *label, const char *text, BMessage *message) : BTextControl(frame, name, label, text, message), dir_ctrl(dir_ctrl_) - { - for (int c=0; c<' '; c++) - if (c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - } - - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - entry_ref the_ref; - BEntry the_entry; - - // Look for dropped refs - if (msg->FindRef("refs", &the_ref) == B_NO_ERROR) { - if (the_entry.SetTo(&the_ref) == B_NO_ERROR && (dir_ctrl&& the_entry.IsDirectory() || !dir_ctrl && the_entry.IsFile())) { - BPath the_path; - the_entry.GetPath(&the_path); - SetText(the_path.Path()); - } - } else - BTextControl::MessageReceived(msg); - - MakeFocus(); - } else - BTextControl::MessageReceived(msg); - } - -private: - bool dir_ctrl; -}; - - -// Preferences window class -class PrefsWindow : public BWindow { -public: - PrefsWindow(uint32 msg); - virtual ~PrefsWindow(); - virtual void MessageReceived(BMessage *msg); - -private: - void read_volumes_prefs(void); - void hide_show_graphics_ctrls(void); - void read_graphics_prefs(void); - void hide_show_serial_ctrls(void); - void read_serial_prefs(void); - void add_serial_names(BPopUpMenu *menu, uint32 msg); - void read_memory_prefs(void); - - BView *create_volumes_pane(void); - BView *create_graphics_pane(void); - BView *create_serial_pane(void); - BView *create_memory_pane(void); - - uint32 ok_message; - bool send_quit_on_close; - - system_info sys_info; - BMessenger this_messenger; - BView *top; - BRect top_frame; - BTabView *pane_tabs; - BView *panes[NUM_PANES]; - int current_pane; - - VolumeListView *volume_list; - BCheckBox *nocdrom_checkbox; - BMenuField *frameskip_menu; - NumberControl *display_x_ctrl; - NumberControl *display_y_ctrl; - BMenuField *scr_mode_menu; - BCheckBox *nosound_checkbox; - BCheckBox *ether_checkbox; - BCheckBox *udptunnel_checkbox; - NumberControl *udpport_ctrl; - RAMSlider *ramsize_slider; - PathControl *extfs_control; - PathControl *rom_control; - BCheckBox *fpu_checkbox; - - BFilePanel *add_volume_panel; - BFilePanel *create_volume_panel; - - uint32 max_ramsize; // In MB - int display_type; - int scr_mode_bit; -}; - - -/* - * Show preferences editor (asynchronously) - * Under BeOS, the return value is ignored. Instead, a message is sent to the - * application when the user clicks on "Start" or "Quit" - */ - -bool PrefsEditor(void) -{ - new PrefsWindow('strt'); - return true; -} - - -/* - * Preferences window constructor - */ - -PrefsWindow::PrefsWindow(uint32 msg) : BWindow(BRect(0, 0, 400, 289), GetString(STR_PREFS_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_ASYNCHRONOUS_CONTROLS), this_messenger(this) -{ - int i; - ok_message = msg; - send_quit_on_close = true; - get_system_info(&sys_info); - - // Move window to right position - Lock(); - MoveTo(80, 80); - - // Set up menus - BMenuBar *bar = new BMenuBar(Bounds(), "menu"); - BMenu *menu = new BMenu(GetString(STR_PREFS_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ABOUT), new BMessage(B_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_START), new BMessage(MSG_OK))); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ZAP_PRAM), new BMessage(MSG_ZAP_PRAM))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_QUIT), new BMessage(MSG_CANCEL), 'Q')); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = int(bar->Bounds().bottom) + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Light gray background - BRect b = Bounds(); - top = new BView(BRect(0, mbar_height, b.right, b.bottom), "top", B_FOLLOW_NONE, B_WILL_DRAW); - AddChild(top); - top->SetViewColor(fill_color); - top_frame = top->Bounds(); - - // Create panes - panes[0] = create_volumes_pane(); - panes[1] = create_graphics_pane(); - panes[2] = create_serial_pane(); - panes[3] = create_memory_pane(); - - // Prefs item tab view - pane_tabs = new BTabView(BRect(10, 10, top_frame.right-10, top_frame.bottom-50), "items", B_WIDTH_FROM_LABEL); - for (i=0; iAddTab(panes[i]); - top->AddChild(pane_tabs); - - volume_list->Select(0); - - // Create volume file panels - add_volume_panel = new BFilePanel(B_OPEN_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_ADD_VOLUME_PANEL)); - add_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_ADD_VOLUME_PANEL_BUTTON)); - add_volume_panel->Window()->SetTitle(GetString(STR_ADD_VOLUME_TITLE)); - create_volume_panel = new BFilePanel(B_SAVE_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_CREATE_VOLUME_PANEL)); - create_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_CREATE_VOLUME_PANEL_BUTTON)); - create_volume_panel->Window()->SetTitle(GetString(STR_CREATE_VOLUME_TITLE)); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - background->FindView("PoseView")->ResizeBy(0, -30); - background->FindView("VScrollBar")->ResizeBy(0, -30); - background->FindView("CountVw")->MoveBy(0, -30); - BView *v = background->FindView("HScrollBar"); - if (v) - v->MoveBy(0, -30); - else { - i = 0; - while ((v = background->ChildAt(i++)) != NULL) { - if (v->Name() == NULL || v->Name()[0] == 0) { - v->MoveBy(0, -30); // unnamed horizontal scroll bar - break; - } - } - } - BView *filename = background->FindView("text view"); - BRect fnr(filename->Frame()); - fnr.OffsetBy(0, -30); - NumberControl *nc = new NumberControl(fnr, 80, "hardfile_size", GetString(STR_HARDFILE_SIZE_CTRL), 40, NULL); - background->AddChild(nc); - create_volume_panel->Window()->Unlock(); - - // "Start" button - BButton *button = new BButton(BRect(20, top_frame.bottom-35, 90, top_frame.bottom-10), "start", GetString(STR_START_BUTTON), new BMessage(MSG_OK)); - top->AddChild(button); - SetDefaultButton(button); - - // "Quit" button - top->AddChild(new BButton(BRect(top_frame.right-90, top_frame.bottom-35, top_frame.right-20, top_frame.bottom-10), "cancel", GetString(STR_QUIT_BUTTON), new BMessage(MSG_CANCEL))); - - Unlock(); - Show(); -} - - -/* - * Preferences window destructor - */ - -PrefsWindow::~PrefsWindow() -{ - delete add_volume_panel; - delete create_volume_panel; - if (send_quit_on_close) - be_app->PostMessage(B_QUIT_REQUESTED); -} - - -/* - * Create "Volumes" pane - */ - -void PrefsWindow::read_volumes_prefs(void) -{ - PrefsReplaceString("extfs", extfs_control->Text()); -} - -BView *PrefsWindow::create_volumes_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_VOLUMES_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *str; - int32 index = 0; - volume_list = new VolumeListView(BRect(15, 10, pane->Bounds().right-30, 113), "volumes"); - while ((str = PrefsFindString("disk", index++)) != NULL) - volume_list->AddItem(new BStringItem(str)); - volume_list->SetSelectionMessage(new BMessage(MSG_VOLUME_SELECTED)); - volume_list->SetInvocationMessage(new BMessage(MSG_VOLUME_INVOKED)); - pane->AddChild(new BScrollView("volumes_border", volume_list, B_FOLLOW_LEFT | B_FOLLOW_TOP, 0, false, true)); - - pane->AddChild(new BButton(BRect(10, 118, pane->Bounds().right/3, 138), "add_volume", GetString(STR_ADD_VOLUME_BUTTON), new BMessage(MSG_ADD_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right/3, 118, pane->Bounds().right*2/3, 138), "create_volume", GetString(STR_CREATE_VOLUME_BUTTON), new BMessage(MSG_CREATE_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right*2/3, 118, pane->Bounds().right-11, 138), "remove_volume", GetString(STR_REMOVE_VOLUME_BUTTON), new BMessage(MSG_REMOVE_VOLUME))); - - extfs_control = new PathControl(true, BRect(10, 145, right, 160), "extfs", GetString(STR_EXTFS_CTRL), PrefsFindString("extfs"), NULL); - extfs_control->SetDivider(90); - pane->AddChild(extfs_control); - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 165, right, 180), "bootdriver", GetString(STR_BOOTDRIVER_CTRL), menu); - menu_field->SetDivider(90); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_ANY_LAB), new BMessage(MSG_BOOT_ANY))); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_CDROM_LAB), new BMessage(MSG_BOOT_CDROM))); - pane->AddChild(menu_field); - int32 i32 = PrefsFindInt32("bootdriver"); - BMenuItem *item; - if (i32 == 0) { - if ((item = menu->FindItem(GetString(STR_BOOT_ANY_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == CDROMRefNum) { - if ((item = menu->FindItem(GetString(STR_BOOT_CDROM_LAB))) != NULL) - item->SetMarked(true); - } - - nocdrom_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nocdrom", GetString(STR_NOCDROM_CTRL), new BMessage(MSG_NOCDROM)); - pane->AddChild(nocdrom_checkbox); - nocdrom_checkbox->SetValue(PrefsFindBool("nocdrom") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Graphics/Sound" pane - */ - -// Screen mode list -struct scr_mode_desc { - int mode_mask; - int str; -}; - -static const scr_mode_desc scr_mode[] = { - {B_8_BIT_640x480, STR_8_BIT_640x480_LAB}, - {B_8_BIT_800x600, STR_8_BIT_800x600_LAB}, - {B_8_BIT_1024x768, STR_8_BIT_1024x768_LAB}, - {B_8_BIT_1152x900, STR_8_BIT_1152x900_LAB}, - {B_8_BIT_1280x1024, STR_8_BIT_1280x1024_LAB}, - {B_8_BIT_1600x1200, STR_8_BIT_1600x1200_LAB}, - {B_15_BIT_640x480, STR_15_BIT_640x480_LAB}, - {B_15_BIT_800x600, STR_15_BIT_800x600_LAB}, - {B_15_BIT_1024x768, STR_15_BIT_1024x768_LAB}, - {B_15_BIT_1152x900, STR_15_BIT_1152x900_LAB}, - {B_15_BIT_1280x1024, STR_15_BIT_1280x1024_LAB}, - {B_15_BIT_1600x1200, STR_15_BIT_1600x1200_LAB}, - {B_32_BIT_640x480, STR_24_BIT_640x480_LAB}, - {B_32_BIT_800x600, STR_24_BIT_800x600_LAB}, - {B_32_BIT_1024x768, STR_24_BIT_1024x768_LAB}, - {B_32_BIT_1152x900, STR_24_BIT_1152x900_LAB}, - {B_32_BIT_1280x1024, STR_24_BIT_1280x1024_LAB}, - {B_32_BIT_1600x1200, STR_24_BIT_1600x1200_LAB}, - {0, 0} // End marker -}; - -void PrefsWindow::hide_show_graphics_ctrls(void) -{ - if (display_type == DISPLAY_WINDOW) { - if (!scr_mode_menu->IsHidden()) - scr_mode_menu->Hide(); - if (frameskip_menu->IsHidden()) - frameskip_menu->Show(); - if (display_x_ctrl->IsHidden()) - display_x_ctrl->Show(); - if (display_y_ctrl->IsHidden()) - display_y_ctrl->Show(); - } else { - if (!frameskip_menu->IsHidden()) - frameskip_menu->Hide(); - if (!display_x_ctrl->IsHidden()) - display_x_ctrl->Hide(); - if (!display_y_ctrl->IsHidden()) - display_y_ctrl->Hide(); - if (scr_mode_menu->IsHidden()) - scr_mode_menu->Show(); - } -} - -void PrefsWindow::read_graphics_prefs(void) -{ - char str[64]; - if (display_type == DISPLAY_WINDOW) { - sprintf(str, "win/%d/%d", display_x_ctrl->Value(), display_y_ctrl->Value()); - } else { - sprintf(str, "scr/%d", scr_mode_bit); - } - PrefsReplaceString("screen", str); -} - -BView *PrefsWindow::create_graphics_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_GRAPHICS_SOUND_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *mode_str = PrefsFindString("screen"); - int width = 512, height = 384; - scr_mode_bit = 0; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "scr/%d", &scr_mode_bit) == 1) - display_type = DISPLAY_SCREEN; - } - - BMenuField *menu_field; - BMenuItem *item; - BPopUpMenu *menu; - - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 5, right, 20), "videotype", GetString(STR_VIDEO_TYPE_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_WINDOW_LAB), new BMessage(MSG_VIDEO_WINDOW))); - if (display_type == DISPLAY_WINDOW) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_FULLSCREEN_LAB), new BMessage(MSG_VIDEO_SCREEN))); - if (display_type == DISPLAY_SCREEN) - item->SetMarked(true); - pane->AddChild(menu_field); - - menu = new BPopUpMenu(""); - frameskip_menu = new BMenuField(BRect(10, 26, right, 41), "frameskip", GetString(STR_FRAMESKIP_CTRL), menu); - frameskip_menu->SetDivider(120); - menu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - pane->AddChild(frameskip_menu); - int32 i32 = PrefsFindInt32("frameskip"); - if (i32 == 12) { - if ((item = menu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 8) { - if ((item = menu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 6) { - if ((item = menu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 4) { - if ((item = menu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 2) { - if ((item = menu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } - - display_x_ctrl = new NumberControl(BRect(10, 48, right / 2, 66), 118, "width", GetString(STR_DISPLAY_X_CTRL), width, NULL); - pane->AddChild(display_x_ctrl); - display_y_ctrl = new NumberControl(BRect(10, 69, right / 2, 87), 118, "height", GetString(STR_DISPLAY_Y_CTRL), height, NULL); - pane->AddChild(display_y_ctrl); - - menu = new BPopUpMenu(""); - scr_mode_menu = new BMenuField(BRect(10, 26, right, 41), "screenmode", GetString(STR_SCREEN_MODE_CTRL), menu); - scr_mode_menu->SetDivider(120); - for (int i=0; scr_mode[i].mode_mask; i++) { - menu->AddItem(item = new BMenuItem(GetString(scr_mode[i].str), new BMessage(MSG_SCREEN_MODE + i))); - if (scr_mode[i].mode_mask & (1 << scr_mode_bit)) - item->SetMarked(true); - } - pane->AddChild(scr_mode_menu); - - nosound_checkbox = new BCheckBox(BRect(10, 90, right, 105), "nosound", GetString(STR_NOSOUND_CTRL), new BMessage(MSG_NOSOUND)); - pane->AddChild(nosound_checkbox); - nosound_checkbox->SetValue(PrefsFindBool("nosound") ? B_CONTROL_ON : B_CONTROL_OFF); - - hide_show_graphics_ctrls(); - return pane; -} - - -/* - * Create "Serial/Network" pane - */ - -void PrefsWindow::hide_show_serial_ctrls(void) -{ - if (udptunnel_checkbox->Value() == B_CONTROL_ON) { - ether_checkbox->SetEnabled(false); - udpport_ctrl->SetEnabled(true); - } else { - ether_checkbox->SetEnabled(true); - udpport_ctrl->SetEnabled(false); - } -} - -void PrefsWindow::read_serial_prefs(void) -{ - PrefsReplaceInt32("udpport", udpport_ctrl->Value()); -} - -void PrefsWindow::add_serial_names(BPopUpMenu *menu, uint32 msg) -{ - BSerialPort *port = new BSerialPort; - char name[B_PATH_NAME_LENGTH]; - for (int i=0; iCountDevices(); i++) { - port->GetDeviceName(i, name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - BDirectory dir; - BEntry entry; - dir.SetTo("/dev/parallel"); - if (dir.InitCheck() == B_NO_ERROR) { - dir.Rewind(); - while (dir.GetNextEntry(&entry) >= 0) { - if (!entry.IsDirectory()) { - entry.GetName(name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - } - } - delete port; -} - -static void set_serial_label(BPopUpMenu *menu, const char *prefs_name) -{ - const char *str; - BMenuItem *item; - if ((str = PrefsFindString(prefs_name)) != NULL) - if ((item = menu->FindItem(str)) != NULL) - item->SetMarked(true); -} - -BView *PrefsWindow::create_serial_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_SERIAL_NETWORK_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu_a = new BPopUpMenu(""); - add_serial_names(menu_a, MSG_SER_A); - menu_field = new BMenuField(BRect(10, 5, right, 20), "seriala", GetString(STR_SERIALA_CTRL), menu_a); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_a, "seriala"); - - BPopUpMenu *menu_b = new BPopUpMenu(""); - add_serial_names(menu_b, MSG_SER_B); - menu_field = new BMenuField(BRect(10, 26, right, 41), "serialb", GetString(STR_SERIALB_CTRL), menu_b); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_b, "serialb"); - - ether_checkbox = new BCheckBox(BRect(10, 47, right, 62), "ether", GetString(STR_ETHER_ENABLE_CTRL), new BMessage(MSG_ETHER)); - pane->AddChild(ether_checkbox); - ether_checkbox->SetValue(PrefsFindString("ether") ? B_CONTROL_ON : B_CONTROL_OFF); - - udptunnel_checkbox = new BCheckBox(BRect(10, 67, right, 72), "udptunnel", GetString(STR_UDPTUNNEL_CTRL), new BMessage(MSG_UDPTUNNEL)); - pane->AddChild(udptunnel_checkbox); - udptunnel_checkbox->SetValue(PrefsFindBool("udptunnel") ? B_CONTROL_ON : B_CONTROL_OFF); - - udpport_ctrl = new NumberControl(BRect(10, 87, right / 2, 105), 118, "udpport", GetString(STR_UDPPORT_CTRL), PrefsFindInt32("udpport"), NULL); - pane->AddChild(udpport_ctrl); - - hide_show_serial_ctrls(); - return pane; -} - - -/* - * Create "Memory" pane - */ - -void PrefsWindow::read_memory_prefs(void) -{ - const char *str = rom_control->Text(); - if (strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); -} - -BView *PrefsWindow::create_memory_pane(void) -{ - char str[256], str2[256]; - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_MEMORY_MISC_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BEntry entry("/boot/var/swap"); - off_t swap_space; - if (entry.GetSize(&swap_space) == B_NO_ERROR) - max_ramsize = swap_space / (1024 * 1024) - 8; - else - max_ramsize = sys_info.max_pages * B_PAGE_SIZE / (1024 * 1024) - 8; - - int32 value = PrefsFindInt32("ramsize") / (1024 * 1024); - - ramsize_slider = new RAMSlider(BRect(10, 5, right, 55), "ramsize", GetString(STR_RAMSIZE_SLIDER), new BMessage(MSG_RAMSIZE), 1, max_ramsize, B_TRIANGLE_THUMB); - ramsize_slider->SetValue(value); - ramsize_slider->UseFillColor(true, &slider_fill_color); - sprintf(str, GetString(STR_RAMSIZE_FMT), 1); - sprintf(str2, GetString(STR_RAMSIZE_FMT), max_ramsize); - ramsize_slider->SetLimitLabels(str, str2); - pane->AddChild(ramsize_slider); - - BMenuField *menu_field; - BMenuItem *item; - BPopUpMenu *menu; - - int id = PrefsFindInt32("modelid"); - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 60, right, 75), "modelid", GetString(STR_MODELID_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_MODELID_5_LAB), new BMessage(MSG_MODELID_5))); - if (id == 5) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_MODELID_14_LAB), new BMessage(MSG_MODELID_14))); - if (id == 14) - item->SetMarked(true); - pane->AddChild(menu_field); - - int cpu = PrefsFindInt32("cpu"); - bool fpu = PrefsFindBool("fpu"); - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 82, right, 97), "cpu", GetString(STR_CPU_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68020_LAB), new BMessage(MSG_CPU_68020))); - if (cpu == 2 && !fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68020_FPU_LAB), new BMessage(MSG_CPU_68020_FPU))); - if (cpu == 2 && fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68030_LAB), new BMessage(MSG_CPU_68030))); - if (cpu == 3 && !fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68030_FPU_LAB), new BMessage(MSG_CPU_68030_FPU))); - if (cpu == 3 && fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68040_LAB), new BMessage(MSG_CPU_68040))); - if (cpu == 4) - item->SetMarked(true); - pane->AddChild(menu_field); - - rom_control = new PathControl(false, BRect(10, 104, right, 119), "rom", GetString(STR_ROM_FILE_CTRL), PrefsFindString("rom"), NULL); - rom_control->SetDivider(117); - pane->AddChild(rom_control); - - return pane; -} - - -/* - * Message from controls/menus received - */ - -void PrefsWindow::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_OK: { // "Start" button clicked - read_volumes_prefs(); - read_memory_prefs(); - read_graphics_prefs(); - SavePrefs(); - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(ok_message); - break; - } - - case MSG_CANCEL: // "Quit" button clicked - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(B_QUIT_REQUESTED); - break; - - case B_ABOUT_REQUESTED: { // "About" menu item selected - ShowAboutWindow(); - break; - } - - case MSG_ZAP_PRAM: // "Zap PRAM File" menu item selected - ZapPRAM(); - break; - - case MSG_VOLUME_INVOKED: { // Double-clicked on volume name, toggle read-only flag - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - const char *str = PrefsFindString("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - char newstr[256]; - if (str[0] == '*') - strcpy(newstr, str+1); - else { - strcpy(newstr, "*"); - strcat(newstr, str); - } - PrefsReplaceString("disk", newstr, selected); - volume_list->AddItem(new BStringItem(newstr), selected); - volume_list->Select(selected); - } - break; - } - - case MSG_ADD_VOLUME: - add_volume_panel->Show(); - break; - - case MSG_CREATE_VOLUME: - create_volume_panel->Show(); - break; - - case MSG_ADD_VOLUME_PANEL: { - entry_ref ref; - if (msg->FindRef("refs", &ref) == B_NO_ERROR) { - BEntry entry(&ref, true); - BPath path; - entry.GetPath(&path); - if (entry.IsFile()) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else if (entry.IsDirectory()) { - BVolume volume; - if (path.Path()[0] == '/' && strchr(path.Path()+1, '/') == NULL && entry.GetVolume(&volume) == B_NO_ERROR) { - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (volume.Device() == info.dev) { - PrefsAddString("disk", info.device_name); - volume_list->AddItem(new BStringItem(info.device_name)); - } - } - } - } - } - break; - } - - case MSG_CREATE_VOLUME_PANEL: { - entry_ref dir; - if (msg->FindRef("directory", &dir) == B_NO_ERROR) { - BEntry entry(&dir, true); - BPath path; - entry.GetPath(&path); - path.Append(msg->FindString("name")); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - NumberControl *v = (NumberControl *)background->FindView("hardfile_size"); - int size = v->Value(); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", path.Path(), size); - int ret = system(cmd); - if (ret == 0) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else { - sprintf(cmd, GetString(STR_CREATE_VOLUME_WARN), strerror(ret)); - WarningAlert(cmd); - } - } - break; - } - - case MSG_REMOVE_VOLUME: { - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - PrefsRemoveItem("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - volume_list->Select(selected); - } - break; - } - - case MSG_BOOT_ANY: - PrefsReplaceInt32("bootdriver", 0); - break; - - case MSG_BOOT_CDROM: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - - case MSG_NOCDROM: - PrefsReplaceBool("nocdrom", nocdrom_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_VIDEO_WINDOW: - display_type = DISPLAY_WINDOW; - hide_show_graphics_ctrls(); - break; - - case MSG_VIDEO_SCREEN: - display_type = DISPLAY_SCREEN; - hide_show_graphics_ctrls(); - break; - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", 2); - break; - - case MSG_NOSOUND: - PrefsReplaceBool("nosound", nosound_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_SER_A: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - PrefsReplaceString("seriala", source->Label()); - break; - } - - case MSG_SER_B: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - PrefsReplaceString("serialb", source->Label()); - break; - } - - case MSG_ETHER: - if (ether_checkbox->Value() == B_CONTROL_ON) - PrefsReplaceString("ether", "yes"); - else - PrefsRemoveItem("ether"); - break; - - case MSG_UDPTUNNEL: - PrefsReplaceBool("udptunnel", udptunnel_checkbox->Value() == B_CONTROL_ON); - hide_show_serial_ctrls(); - break; - - case MSG_RAMSIZE: - PrefsReplaceInt32("ramsize", ramsize_slider->Value() * 1024 * 1024); - break; - - case MSG_MODELID_5: - PrefsReplaceInt32("modelid", 5); - break; - - case MSG_MODELID_14: - PrefsReplaceInt32("modelid", 14); - break; - - case MSG_CPU_68020: - PrefsReplaceInt32("cpu", 2); - PrefsReplaceBool("fpu", false); - break; - - case MSG_CPU_68020_FPU: - PrefsReplaceInt32("cpu", 2); - PrefsReplaceBool("fpu", true); - break; - - case MSG_CPU_68030: - PrefsReplaceInt32("cpu", 3); - PrefsReplaceBool("fpu", false); - break; - - case MSG_CPU_68030_FPU: - PrefsReplaceInt32("cpu", 3); - PrefsReplaceBool("fpu", true); - break; - - case MSG_CPU_68040: - PrefsReplaceInt32("cpu", 4); - PrefsReplaceBool("fpu", true); - break; - - default: { - // Screen mode messages - if ((msg->what & 0xffff0000) == MSG_SCREEN_MODE) { - int m = msg->what & 0xffff; - uint32 mask = scr_mode[m].mode_mask; - for (int i=0; i<32; i++) - if (mask & (1 << i)) - scr_mode_bit = i; - } else - BWindow::MessageReceived(msg); - } - } -} diff --git a/BasiliskII/src/BeOS/scsi_beos.cpp b/BasiliskII/src/BeOS/scsi_beos.cpp deleted file mode 100644 index 75d1e29ad..000000000 --- a/BasiliskII/src/BeOS/scsi_beos.cpp +++ /dev/null @@ -1,237 +0,0 @@ -/* - * scsi_beos.cpp - SCSI Manager, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#ifdef __HAIKU__ -#include -#else -#include -#endif - -#include "sysdeps.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static raw_device_command rdc; - -static int fds[8*8]; // fd's for 8 units and 8 LUNs each -static int fd; // Active fd (selected target) - -static uint32 buffer_size; // Size of data buffer -static uint8 *buffer = NULL; // Pointer to data buffer - -static uint8 sense_data[256]; // Buffer for autosense data - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - int id, lun; - - // Allocate buffer - buffer = (uint8 *)malloc(buffer_size = 0x10000); - - // Open scsi_raw driver for all 8 units (and all 8 LUNs) - char dev_name[256]; - for (id=0; id<8; id++) { - for (lun=0; lun<8; lun++) - fds[id*8+lun] = -1; - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", id); - const char *str = PrefsFindString(prefs_name); - if (str) { - int bus, unit; - if (sscanf(str, "%d/%d", &bus, &unit) == 2) { - for (lun=0; lun<8; lun++) { - sprintf(dev_name, "/dev/bus/scsi/%d/%d/%d/raw", bus, unit, lun); - D(bug("SCSI %d: Opening %s\n", id, dev_name)); - fds[id*8+lun] = open(dev_name, O_RDWR); - } - } - } - } - - // Reset SCSI bus - SCSIReset(); - - // Init rdc - memset(&rdc, 0, sizeof(rdc)); - rdc.data = buffer; - rdc.sense_data = sense_data; -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - // Close all devices - for (int i=0; i<8; i++) - for (int j=0; j<8; j++) { - int fd = fds[i*8+j]; - if (fd > 0) - close(fd); - } - - // Free buffer - if (buffer) { - free(buffer); - buffer = NULL; - } -} - - -/* - * Check if requested data size fits into buffer, allocate new buffer if needed - */ - -static bool try_buffer(int size) -{ - if (size <= buffer_size) - return true; - - uint8 *new_buffer = (uint8 *)malloc(size); - if (new_buffer == NULL) - return false; - free(buffer); - buffer = new_buffer; - buffer_size = size; - return true; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - rdc.command_length = cmd_length; - memcpy(rdc.command, cmd, cmd_length); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return fds[id * 8] > 0; -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - int new_fd = fds[id * 8 + lun]; - if (new_fd < 0) - return false; - if (new_fd != fd) - rdc.cam_status &= ~CAM_AUTOSNS_VALID; // Clear sense data when selecting new target - fd = new_fd; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error); timeout is in 1/60 sec - */ - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - // Check if buffer is large enough, allocate new buffer if needed - if (!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - // Process S/G table when writing - if (!reading) { - D(bug(" writing to buffer\n")); - uint8 *buffer_ptr = buffer; - for (int i=0; i -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// Buffer size for kernel-space transfers -const int TMP_BUF_SIZE = 2048; - -// These packets are sent to the input/output threads -const uint32 CMD_READ = 'read'; -const uint32 CMD_WRITE = 'writ'; -const uint32 CMD_QUIT = 'quit'; - -struct ThreadPacket { - uint32 pb; -}; - - -// Driver private variables -class BeSERDPort : public SERDPort { -public: - BeSERDPort(const char *dev) - { - device_name = dev; - if (strstr(dev, "parallel")) { - is_parallel = true; - fd = -1; - device = NULL; - } else { - is_parallel = false; - device = new BSerialPort; - } - device_sem = create_sem(1, "serial port"); - input_thread = output_thread = 0; - } - - virtual ~BeSERDPort() - { - status_t l; - if (input_thread > 0) { - send_data(input_thread, CMD_QUIT, NULL, 0); - suspend_thread(input_thread); // Unblock thread - snooze(1000); - resume_thread(input_thread); - while (wait_for_thread(input_thread, &l) == B_INTERRUPTED) ; - } - if (output_thread > 0) { - send_data(output_thread, CMD_QUIT, NULL, 0); - suspend_thread(output_thread); // Unblock thread - snooze(1000); - resume_thread(output_thread); - while (wait_for_thread(output_thread, &l) == B_INTERRUPTED) ; - } - acquire_sem(device_sem); - delete_sem(device_sem); - delete device; - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - static status_t input_func(void *arg); - static status_t output_func(void *arg); - - const char *device_name; // Name of BeOS port - BSerialPort *device; // BeOS port object - bool is_parallel; // Flag: Port is parallel, use fd - int fd; // FD for parallel ports - sem_id device_sem; // BSerialPort arbitration - - thread_id input_thread; // Data input thread - thread_id output_thread; // Data output thread - - bool io_killed; // Flag: KillIO called, I/O threads must not call deferred tasks - bool drop_dtr_on_close; // Flag: Negate DTR when driver is closed - - uint8 tmp_in_buf[TMP_BUF_SIZE]; // Buffers for copying from/to kernel space - uint8 tmp_out_buf[TMP_BUF_SIZE]; -}; - - -#if DEBUG -static const int baud_rates[] = { - 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400, 4800, 9600, 19200, 38400, 57600, 115200, 230400, 31250 -}; -#endif - - -/* - * Initialization - */ - -void SerialInit(void) -{ - // Read serial preferences and create structs for both ports - the_serd_port[0] = new BeSERDPort(PrefsFindString("seriala")); - the_serd_port[1] = new BeSERDPort(PrefsFindString("serialb")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - delete (BeSERDPort *)the_serd_port[0]; - delete (BeSERDPort *)the_serd_port[1]; -} - - -/* - * Open serial port - */ - -int16 BeSERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (device_name == NULL) - return openErr; - - // Init variables - io_killed = false; - drop_dtr_on_close = true; - - // Open port - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (is_parallel) { - char name[256]; - sprintf(name, "/dev/parallel/%s", device_name); - fd = ::open(name, O_WRONLY); - if (fd < 0) { - release_sem(device_sem); - return openErr; - } - } else { - device->SetFlowControl(B_HARDWARE_CONTROL); // Must be set before port is opened - if (device->Open(device_name) > 0) { - device->SetBlocking(true); - device->SetTimeout(10000000); - device->SetDTR(true); - device->SetRTS(true); - } else { - release_sem(device_sem); - return openErr; - } - } - - // Start input/output threads - release_sem(device_sem); - configure(config); - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - while ((input_thread = spawn_thread(input_func, "Serial Input", B_NORMAL_PRIORITY, this)) == B_INTERRUPTED) ; - resume_thread(input_thread); - while ((output_thread = spawn_thread(output_func, "Serial Output", B_NORMAL_PRIORITY, this)) == B_INTERRUPTED) ; - resume_thread(output_thread); - release_sem(device_sem); - return noErr; -} - - -/* - * Read data from port - */ - -int16 BeSERDPort::prime_in(uint32 pb, uint32 dce) -{ - // Send input command to input_thread - read_done = false; - read_pending = true; - ThreadPacket p; - p.pb = pb; - WriteMacInt32(input_dt + serdtDCE, dce); - while (send_data(input_thread, CMD_READ, &p, sizeof(ThreadPacket)) == B_INTERRUPTED) ; - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 BeSERDPort::prime_out(uint32 pb, uint32 dce) -{ - // Send output command to output_thread - write_done = false; - write_pending = true; - ThreadPacket p; - p.pb = pb; - WriteMacInt32(output_dt + serdtDCE, dce); - while (send_data(output_thread, CMD_WRITE, &p, sizeof(ThreadPacket)) == B_INTERRUPTED) ; - return 1; // Command in progress -} - - -/* - * Control calls - */ - -int16 BeSERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case 1: // KillIO - io_killed = true; - suspend_thread(input_thread); // Unblock threads - suspend_thread(output_thread); - snooze(1000); - resume_thread(input_thread); - resume_thread(output_thread); - while (read_pending || write_pending) - snooze(10000); - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->ClearInput(); - device->ClearOutput(); - release_sem(device_sem); - } - io_killed = false; - return noErr; - - case kSERDConfiguration: - if (configure(ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: - return noErr; // Not supported under BeOS - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDClearBreak: - case kSERDSetBreak: - return noErr; // Not supported under BeOS - - case kSERDBaudRate: - if (!is_parallel) { - uint16 rate = ReadMacInt16(pb + csParam); - data_rate baud_rate; - if (rate <= 50) { - rate = 50; baud_rate = B_50_BPS; - } else if (rate <= 75) { - rate = 75; baud_rate = B_75_BPS; - } else if (rate <= 110) { - rate = 110; baud_rate = B_110_BPS; - } else if (rate <= 134) { - rate = 134; baud_rate = B_134_BPS; - } else if (rate <= 150) { - rate = 150; baud_rate = B_150_BPS; - } else if (rate <= 200) { - rate = 200; baud_rate = B_200_BPS; - } else if (rate <= 300) { - rate = 300; baud_rate = B_300_BPS; - } else if (rate <= 600) { - rate = 600; baud_rate = B_600_BPS; - } else if (rate <= 1200) { - rate = 1200; baud_rate = B_1200_BPS; - } else if (rate <= 1800) { - rate = 1800; baud_rate = B_1800_BPS; - } else if (rate <= 2400) { - rate = 2400; baud_rate = B_2400_BPS; - } else if (rate <= 4800) { - rate = 4800; baud_rate = B_4800_BPS; - } else if (rate <= 9600) { - rate = 9600; baud_rate = B_9600_BPS; - } else if (rate <= 19200) { - rate = 19200; baud_rate = B_19200_BPS; - } else if (rate <= 31250) { - rate = 31250; baud_rate = B_31250_BPS; - } else if (rate <= 38400) { - rate = 38400; baud_rate = B_38400_BPS; - } else if (rate <= 57600) { - rate = 57600; baud_rate = B_57600_BPS; - } - WriteMacInt16(pb + csParam, rate); - acquire_sem(device_sem); - if (device->SetDataRate(baud_rate) == B_OK) { - release_sem(device_sem); - return noErr; - } else { - release_sem(device_sem); - return paramErr; - } - } else - return noErr; - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDClockMIDI: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetParityMode(B_NO_PARITY); - device->SetDataBits(B_DATA_BITS_8); - device->SetStopBits(B_STOP_BITS_1); - if (device->SetDataRate(B_31250_BPS) == B_OK) { - release_sem(device_sem); - return noErr; - } else { - release_sem(device_sem); - return paramErr; - } - } else - return noErr; - - case kSERDMiscOptions: - drop_dtr_on_close = !(ReadMacInt8(pb + csParam) & kOptionPreserveDTR); - return noErr; - - case kSERDAssertDTR: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetDTR(true); - release_sem(device_sem); - } - return noErr; - - case kSERDNegateDTR: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetDTR(false); - release_sem(device_sem); - } - return noErr; - - case kSERDSetPEChar: - case kSERDSetPEAltChar: - return noErr; // Not supported under BeOS - - case kSERDResetChannel: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->ClearInput(); - device->ClearOutput(); - release_sem(device_sem); - } - return noErr; - - case kSERDAssertRTS: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetRTS(true); - release_sem(device_sem); - } - return noErr; - - case kSERDNegateRTS: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetRTS(false); - release_sem(device_sem); - } - return noErr; - - case kSERD115KBaud: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->DataRate() != B_115200_BPS) - if (device->SetDataRate(B_115200_BPS) != B_OK) { - release_sem(device_sem); - return paramErr; - } - release_sem(device_sem); - } - return noErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->DataRate() != B_230400_BPS) - if (device->SetDataRate(B_230400_BPS) != B_OK) { - release_sem(device_sem); - return paramErr; - } - release_sem(device_sem); - } - return noErr; - - default: - printf("WARNING: SerialControl(): unimplemented control code %d\n", code); - return controlErr; - } -} - - -/* - * Status calls - */ - -int16 BeSERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case kSERDInputCount: - WriteMacInt32(pb + csParam, 0); - if (!is_parallel) { - int32 num = 0; - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->NumCharsAvailable(&num); - release_sem(device_sem); - D(bug(" %d bytes in buffer\n", num)); - WriteMacInt32(pb + csParam, num); - } - return noErr; - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - if (is_parallel) { - WriteMacInt8(p + staCtsHold, 0); - WriteMacInt8(p + staDsrHold, 0); - WriteMacInt8(p + staModemStatus, dsrEvent | dcdEvent | ctsEvent); - } else { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - WriteMacInt8(p + staCtsHold, !device->IsCTS()); - WriteMacInt8(p + staDsrHold, !device->IsDSR()); - WriteMacInt8(p + staModemStatus, - (device->IsDSR() ? dsrEvent : 0) - | (device->IsRI() ? riEvent : 0) - | (device->IsDCD() ? dcdEvent : 0) - | (device->IsCTS() ? ctsEvent : 0)); - release_sem(device_sem); - } - return noErr; - } - - default: - printf("WARNING: SerialStatus(): unimplemented status code %d\n", code); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 BeSERDPort::close() -{ - // Kill threads - status_t l; - io_killed = true; - if (input_thread > 0) { - while (send_data(input_thread, CMD_QUIT, NULL, 0) == B_INTERRUPTED) ; - if (read_pending) { - suspend_thread(input_thread); // Unblock thread - snooze(1000); - resume_thread(input_thread); - } - while (wait_for_thread(input_thread, &l) == B_INTERRUPTED) ; - } - if (output_thread > 0) { - while (send_data(output_thread, CMD_QUIT, NULL, 0) == B_INTERRUPTED) ; - if (write_pending) { - suspend_thread(output_thread); // Unblock thread - snooze(1000); - resume_thread(output_thread); - } - while (wait_for_thread(output_thread, &l) == B_INTERRUPTED) ; - } - input_thread = output_thread = 0; - - // Close port - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (is_parallel) { - ::close(fd); - fd = -1; - } else { - if (drop_dtr_on_close) - device->SetDTR(false); - device->Close(); - } - release_sem(device_sem); - return noErr; -} - - -/* - * Configure serial port with MacOS config word - */ - -bool BeSERDPort::configure(uint16 config) -{ - D(bug(" configure %04x\n", config)); - if (is_parallel) - return true; - - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - if (device->StopBits() != B_STOP_BITS_1) - device->SetStopBits(B_STOP_BITS_1); - break; - case stop20: - if (device->StopBits() != B_STOP_BITS_2) - device->SetStopBits(B_STOP_BITS_2); - break; - default: - release_sem(device_sem); - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - if (device->ParityMode() != B_NO_PARITY) - device->SetParityMode(B_NO_PARITY); - break; - case oddParity: - if (device->ParityMode() != B_ODD_PARITY) - device->SetParityMode(B_ODD_PARITY); - break; - case evenParity: - if (device->ParityMode() != B_EVEN_PARITY) - device->SetParityMode(B_EVEN_PARITY); - break; - default: - release_sem(device_sem); - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - case data7: - if (device->DataBits() != B_DATA_BITS_7) - device->SetDataBits(B_DATA_BITS_7); - break; - case data8: - if (device->DataBits() != B_DATA_BITS_8) - device->SetDataBits(B_DATA_BITS_8); - break; - default: - release_sem(device_sem); - return false; - } - - // Set baud rate - data_rate baud_rate; - switch (config & 0x03ff) { - case baud150: baud_rate = B_150_BPS; break; - case baud300: baud_rate = B_300_BPS; break; - case baud600: baud_rate = B_600_BPS; break; - case baud1200: baud_rate = B_1200_BPS; break; - case baud1800: baud_rate = B_1800_BPS; break; - case baud2400: baud_rate = B_2400_BPS; break; - case baud4800: baud_rate = B_4800_BPS; break; - case baud9600: baud_rate = B_9600_BPS; break; - case baud19200: baud_rate = B_19200_BPS; break; - case baud38400: baud_rate = B_38400_BPS; break; - case baud57600: baud_rate = B_57600_BPS; break; - default: - release_sem(device_sem); - return false; - } - - D(bug(" baud rate %d, %d stop bits, %s parity, %d data bits\n", baud_rates[baud_rate], device->StopBits() == B_STOP_BITS_1 ? 1 : 2, device->ParityMode() == B_NO_PARITY ? "no" : device->ParityMode() == B_ODD_PARITY ? "odd" : "even", device->DataBits() == B_DATA_BITS_7 ? 7 : 8)); - if (device->DataRate() != baud_rate) { - bool res = device->SetDataRate(baud_rate) == B_OK; - release_sem(device_sem); - return res; - } else { - release_sem(device_sem); - return true; - } -} - - -/* - * Set serial handshaking - */ - -void BeSERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - if (is_parallel) - return; - - uint32 flow; - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - flow = B_HARDWARE_CONTROL; - else - flow = B_SOFTWARE_CONTROL; - } else { - if (ReadMacInt8(s + shkFCTS)) - flow = B_HARDWARE_CONTROL; - else - flow = B_SOFTWARE_CONTROL; - } - - D(bug(" %sware flow control\n", flow == B_HARDWARE_CONTROL ? "hard" : "soft")); - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->FlowControl() != flow) { - device->Close(); - device->SetFlowControl(flow); - device->Open(device_name); - } - release_sem(device_sem); -} - - -/* - * Data input thread - */ - -status_t BeSERDPort::input_func(void *arg) -{ - BeSERDPort *s = (BeSERDPort *)arg; - for (;;) { - - // Wait for commands - thread_id sender; - ThreadPacket p; - uint32 code = receive_data(&sender, &p, sizeof(ThreadPacket)); - if (code == CMD_QUIT) - break; - if (code != CMD_READ) - continue; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - uint32 length = ReadMacInt32(p.pb + ioReqCount); - D(bug("input_func waiting for %ld bytes of data...\n", length)); - int32 actual; - - // Buffer in kernel space? - if ((uint32)buf < 0x80000000) { - - // Yes, transfer via buffer - actual = 0; - while (length) { - uint32 transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - int32 transferred; - acquire_sem(s->device_sem); - if (s->is_parallel) { - if ((transferred = read(s->fd, s->tmp_in_buf, transfer_size)) < 0 || s->io_killed) { - // Error - actual = transferred; - release_sem(s->device_sem); - break; - } - } else { - if ((transferred = s->device->Read(s->tmp_in_buf, transfer_size)) < 0 || s->io_killed) { - // Error - actual = transferred; - release_sem(s->device_sem); - break; - } - } - release_sem(s->device_sem); - memcpy(buf, s->tmp_in_buf, transferred); - buf = (void *)((uint8 *)buf + transferred); - length -= transferred; - actual += transferred; - } - - } else { - - // No, transfer directly - acquire_sem(s->device_sem); - if (s->is_parallel) - actual = read(s->fd, buf, length); - else - actual = s->device->Read(buf, length); - release_sem(s->device_sem); - } - - D(bug(" %ld bytes received\n", actual)); - -#if MONITOR - bug("Receiving serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - for (int i=0; iio_killed) { - - WriteMacInt16(p.pb + ioResult, abortErr); - WriteMacInt32(p.pb + ioActCount, 0); - s->read_pending = s->read_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(p.pb + ioActCount, actual); - WriteMacInt32(s->input_dt + serdtResult, noErr); - } else { - WriteMacInt32(p.pb + ioActCount, 0); - WriteMacInt32(s->input_dt + serdtResult, readErr); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Data output thread - */ - -status_t BeSERDPort::output_func(void *arg) -{ - BeSERDPort *s = (BeSERDPort *)arg; - for (;;) { - - // Wait for commands - thread_id sender; - ThreadPacket p; - uint32 code = receive_data(&sender, &p, sizeof(ThreadPacket)); - if (code == CMD_QUIT) - break; - if (code != CMD_WRITE) - continue; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - uint32 length = ReadMacInt32(p.pb + ioReqCount); - D(bug("output_func transmitting %ld bytes of data...\n", length)); - int32 actual; - -#if MONITOR - bug("Sending serial data:\n"); - uint8 *adr = (uint8 *)buf; - for (int i=0; i TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(s->tmp_out_buf, buf, transfer_size); - int32 transferred; - acquire_sem(s->device_sem); - if (s->is_parallel) { - if ((transferred = write(s->fd, s->tmp_out_buf, transfer_size)) < transfer_size || s->io_killed) { - if (transferred < 0) // Error - actual = transferred; - else - actual += transferred; - release_sem(s->device_sem); - break; - } - } else { - if ((transferred = s->device->Write(s->tmp_out_buf, transfer_size)) < transfer_size || s->io_killed) { - if (transferred < 0) // Error - actual = transferred; - else - actual += transferred; - release_sem(s->device_sem); - break; - } - } - release_sem(s->device_sem); - if (transferred > transfer_size) // R3 parallel port driver bug - transferred = transfer_size; - buf = (void *)((uint8 *)buf + transferred); - length -= transferred; - actual += transferred; - } - - } else { - - // No, transfer directly - acquire_sem(s->device_sem); - if (s->is_parallel) - actual = write(s->fd, buf, length); - else - actual = s->device->Write(buf, length); - release_sem(s->device_sem); - if (actual > length) // R3 parallel port driver bug - actual = length; - } - - D(bug(" %ld bytes transmitted\n", actual)); - - // KillIO called? Then simply return - if (s->io_killed) { - - WriteMacInt16(p.pb + ioResult, abortErr); - WriteMacInt32(p.pb + ioActCount, 0); - s->write_pending = s->write_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(p.pb + ioActCount, actual); - WriteMacInt32(s->output_dt + serdtResult, noErr); - } else { - WriteMacInt32(p.pb + ioActCount, 0); - WriteMacInt32(s->output_dt + serdtResult, writErr); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return 0; -} diff --git a/BasiliskII/src/BeOS/sys_beos.cpp b/BasiliskII/src/BeOS/sys_beos.cpp deleted file mode 100644 index ff6fcb830..000000000 --- a/BasiliskII/src/BeOS/sys_beos.cpp +++ /dev/null @@ -1,841 +0,0 @@ -/* - * sys_beos.cpp - System dependent routines, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include - -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "sys.h" - -#define DEBUG 0 -#include "debug.h" - -#ifdef __HAIKU__ -#include -#define unmount(x) fs_unmount_volume(x, 0) -#endif - - -// File handles are pointers to these structures -struct file_handle { - file_handle *next; // Pointer to next file handle (must be first in struct!) - const char *name; // File/device name (copied, for mount menu) - int fd; // fd of file/device - bool is_file; // Flag: plain file or /dev/something? - bool read_only; // Copy of Sys_open() flag - loff_t start_byte; // Size of file header (if any) - loff_t file_size; // Size of file data (only valid if is_file is true) -}; - -// Linked list of file handles -static file_handle *first_file_handle; - -// Temporary buffer for transfers from/to kernel space -const int TMP_BUF_SIZE = 0x10000; -static uint8 *tmp_buf; - -// For B_SCSI_PREVENT_ALLOW -static const int32 PREVENT = 1; -static const int32 ALLOW = 0; - - -/* - * Check if device is a mounted HFS volume, get mount name - */ - -static bool is_drive_mounted(const char *dev_name, char *mount_name) -{ - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (strcmp(dev_name, info.device_name) == 0) { - status_t err = -1; - BPath mount; - BDirectory dir; - BEntry entry; - node_ref node; - node.device = info.dev; - node.node = info.root; - err = dir.SetTo(&node); - if (!err) - err = dir.GetEntry(&entry); - if (!err) - err = entry.GetPath(&mount); - if (!err) { - strcpy(mount_name, mount.Path()); - return true; - } - } - } - return false; -} - - -/* - * Initialization - */ - -void SysInit(void) -{ - first_file_handle = NULL; - - // Allocate temporary buffer - tmp_buf = new uint8[TMP_BUF_SIZE]; -} - - -/* - * Deinitialization - */ - -void SysExit(void) -{ - delete[] tmp_buf; -} - - -/* - * Create menu of used volumes (for "mount" menu) - */ - -void SysCreateVolumeMenu(BMenu *menu, uint32 msg) -{ - for (file_handle *fh=first_file_handle; fh; fh=fh->next) - if (!SysIsFixedDisk(fh)) - menu->AddItem(new BMenuItem(fh->name, new BMessage(msg))); -} - - -/* - * Mount volume given name from mount menu - */ - -void SysMountVolume(const char *name) -{ - file_handle *fh; - for (fh=first_file_handle; fh && strcmp(fh->name, name); fh=fh->next) ; - if (fh) - MountVolume(fh); -} - - -/* - * This gets called when no "floppy" prefs items are found - * It scans for available floppy drives and adds appropriate prefs items - */ - -void SysAddFloppyPrefs(void) -{ - // Only one floppy drive under BeOS - PrefsAddString("floppy", "/dev/disk/floppy/raw"); -} - - -/* - * This gets called when no "disk" prefs items are found - * It scans for available HFS volumes and adds appropriate prefs items - */ - -void SysAddDiskPrefs(void) -{ - // Let BeOS scan for HFS drives - D(bug("Looking for Mac volumes...\n")); - system("mountvolume -allhfs"); - - // Add all HFS volumes - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - status_t err = -1; - BPath mount; - if (!strcmp(info.fsh_name, "hfs")) { - BDirectory dir; - BEntry entry; - node_ref node; - node.device = info.dev; - node.node = info.root; - err = dir.SetTo(&node); - if (!err) - err = dir.GetEntry(&entry); - if (!err) - err = entry.GetPath(&mount); - } - if (!err) - err = unmount(mount.Path()); - if (!err) { - char dev_name[B_FILE_NAME_LENGTH]; - if (info.flags & B_FS_IS_READONLY) { - dev_name[0] = '*'; - dev_name[1] = 0; - } else - dev_name[0] = 0; - strcat(dev_name, info.device_name); - PrefsAddString("disk", dev_name); - } - } -} - - -/* - * This gets called when no "cdrom" prefs items are found - * It scans for available CD-ROM drives and adds appropriate prefs items - */ - -// Scan directory for CD-ROM drives, add them to prefs -static void scan_for_cdrom_drives(const char *directory) -{ - // Set directory - BDirectory dir; - dir.SetTo(directory); - if (dir.InitCheck() != B_NO_ERROR) - return; - dir.Rewind(); - - // Scan each entry - BEntry entry; - while (dir.GetNextEntry(&entry) >= 0) { - - // Get path and ref for entry - BPath path; - if (entry.GetPath(&path) != B_NO_ERROR) - continue; - const char *name = path.Path(); - entry_ref e; - if (entry.GetRef(&e) != B_NO_ERROR) - continue; - - // Recursively enter subdirectories (except for floppy) - if (entry.IsDirectory()) { - if (!strcmp(e.name, "floppy")) - continue; - scan_for_cdrom_drives(name); - } else { - - D(bug(" checking '%s'\n", name)); - - // Ignore partitions - if (strcmp(e.name, "raw")) - continue; - - // Open device - int fd = open(name, O_RDONLY); - if (fd < 0) - continue; - - // Get geometry and device type - device_geometry g; - if (ioctl(fd, B_GET_GEOMETRY, &g, sizeof(g)) < 0) { - close(fd); - continue; - } - - // Insert to list if it is a CD drive - if (g.device_type == B_CD) - PrefsAddString("cdrom", name); - close(fd); - } - } -} - -void SysAddCDROMPrefs(void) -{ - // Don't scan for drives if nocdrom option given - if (PrefsFindBool("nocdrom")) - return; - - // Look for CD-ROM drives and add prefs items - D(bug("Looking for CD-ROM drives...\n")); - scan_for_cdrom_drives("/dev/disk"); -} - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ -#ifdef __HAIKU__ - PrefsAddString("seriala", "serial1"); - PrefsAddString("serialb", "serial2"); -#else - system_info info; - get_system_info(&info); - switch (info.platform_type) { - case B_BEBOX_PLATFORM: - case B_AT_CLONE_PLATFORM: - PrefsAddString("seriala", "serial1"); - PrefsAddString("serialb", "serial2"); - break; - case B_MAC_PLATFORM: - PrefsAddString("seriala", "modem"); - PrefsAddString("serialb", "printer"); - break; - default: - PrefsAddString("seriala", "none"); - PrefsAddString("serialb", "none"); - break; - } -#endif -} - - -/* - * Open file/device, create new file handle (returns NULL on error) - */ - -void *Sys_open(const char *name, bool read_only) -{ - static bool published_all = false; - bool is_file = (strstr(name, "/dev/") != name); - - D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write")); - - // Print warning message and eventually unmount drive when this is an HFS volume mounted under BeOS (double mounting will corrupt the volume) - char mount_name[B_FILE_NAME_LENGTH]; - if (!is_file && !read_only && is_drive_mounted(name, mount_name)) { - char str[256 + B_FILE_NAME_LENGTH]; - sprintf(str, GetString(STR_VOLUME_IS_MOUNTED_WARN), mount_name); - WarningAlert(str); - if (unmount(mount_name) != 0) { - sprintf(str, GetString(STR_CANNOT_UNMOUNT_WARN), mount_name); - WarningAlert(str); - return NULL; - } - } - - int fd = open(name, read_only ? O_RDONLY : O_RDWR); - if (fd < 0 && !published_all) { - // Open failed, create all device nodes and try again, but only the first time - system("mountvolume -publishall"); - published_all = true; - fd = open(name, read_only ? O_RDONLY : O_RDWR); - } - if (fd >= 0) { - file_handle *fh = new file_handle; - fh->name = strdup(name); - fh->fd = fd; - fh->is_file = is_file; - fh->read_only = read_only; - fh->start_byte = 0; - if (fh->is_file) { - // Detect disk image file layout - loff_t size = lseek(fd, 0, SEEK_END); - uint8 data[256]; - lseek(fd, 0, SEEK_SET); - read(fd, data, 256); - FileDiskLayout(size, data, fh->start_byte, fh->file_size); - } - - // Enqueue file handle - fh->next = NULL; - file_handle *q = first_file_handle; - if (q) { - while (q->next) - q = q->next; - q->next = fh; - } else - first_file_handle = fh; - return fh; - } else - return NULL; -} - - -/* - * Close file/device, delete file handle - */ - -void Sys_close(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - // Free device name and close file/device - free((void *)fh->name); - close(fh->fd); - - // Dequeue file handle - file_handle *q = first_file_handle; - if (q == fh) { - first_file_handle = NULL; - delete fh; - return; - } - while (q) { - if (q->next == fh) { - q->next = fh->next; - delete fh; - return; - } - q = q->next; - } -} - - -/* - * Read "length" bytes from file/device, starting at "offset", to "buffer", - * returns number of bytes read (or 0) - */ - -static inline ssize_t sread(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = read(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - -// D(bug("Sys_read(%08lx, %08lx, %Ld, %d)\n", fh, buffer, offset, length)); - - // Seek to position - if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0) - return 0; - - // Buffer in kernel space? - size_t actual = 0; - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - if (sread(fh->fd, tmp_buf, transfer_size) != transfer_size) - return actual; - memcpy(buffer, tmp_buf, transfer_size); - buffer = (void *)((uint8 *)buffer + transfer_size); - length -= transfer_size; - actual += transfer_size; - } - - } else { - - // No, transfer directly - actual = sread(fh->fd, buffer, length); - if (actual < 0) - actual = 0; - } - return actual; -} - - -/* - * Write "length" bytes from "buffer" to file/device, starting at "offset", - * returns number of bytes written (or 0) - */ - -static inline ssize_t swrite(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = write(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - -// D(bug("Sys_write(%08lx, %08lx, %Ld, %d)\n", fh, buffer, offset, length)); - - // Seek to position - if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0) - return 0; - - // Buffer in kernel space? - size_t actual = 0; - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(tmp_buf, buffer, transfer_size); - if (swrite(fh->fd, tmp_buf, transfer_size) != transfer_size) - return actual; - buffer = (void *)((uint8 *)buffer + transfer_size); - length -= transfer_size; - actual += transfer_size; - } - - } else { - - // No, transfer directly - actual = swrite(fh->fd, buffer, length); - if (actual < 0) - actual = 0; - } - return actual; -} - - -/* - * Return size of file/device (minus header) - */ - -loff_t SysGetFileSize(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return fh->file_size; - else { - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return (loff_t)g.bytes_per_sector * g.sectors_per_track * g.cylinder_count * g.head_count; - else - return 0; - } -} - - -/* - * Eject volume (if applicable) - */ - -void SysEject(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_EJECT_DEVICE); -} - - -/* - * Format volume (if applicable) - */ - -bool SysFormat(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_FORMAT_DEVICE) >= 0; - else - return false; -} - - -/* - * Check if file/device is read-only (this includes the read-only flag on Sys_open()) - */ - -bool SysIsReadOnly(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) { - - // File, return flag given to Sys_open - return fh->read_only; - - } else { - - // Device, check write protection - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return g.read_only | fh->read_only; - else - return fh->read_only; // Removable but not inserted - } -} - - -/* - * Check if the given file handle refers to a fixed or a removable disk - */ - -bool SysIsFixedDisk(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return true; - else { - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return !g.removable; - else - return false; // Removable but not inserted - } -} - - -/* - * Check if a disk is inserted in the drive (always true for files) - */ - -bool SysIsDiskInserted(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return true; - else { - status_t l; - if (ioctl(fh->fd, B_GET_MEDIA_STATUS, &l, sizeof(l)) >= 0 && l == B_NO_ERROR) - return true; - else - return false; - } -} - - -/* - * Prevent medium removal (if applicable) - */ - -void SysPreventRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_SCSI_PREVENT_ALLOW, &PREVENT, sizeof(PREVENT)); -} - - -/* - * Allow medium removal (if applicable) - */ - -void SysAllowRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_SCSI_PREVENT_ALLOW, &ALLOW, sizeof(ALLOW)); -} - - -/* - * Read CD-ROM TOC (binary MSF format, 804 bytes max.) - */ - -bool SysCDReadTOC(void *arg, uint8 *toc) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - memset(tmp_buf, 0, 804); - if (ioctl(fh->fd, B_SCSI_GET_TOC, tmp_buf, 804) < 0) - return false; - memcpy(toc, tmp_buf, 804); - return true; - } else - return false; -} - - -/* - * Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard) - */ - -bool SysCDGetPosition(void *arg, uint8 *pos) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - if (ioctl(fh->fd, B_SCSI_GET_POSITION, tmp_buf, 16) < 0) - return false; - memcpy(pos, tmp_buf, 16); - return true; - } else - return false; -} - - -/* - * Play CD audio - */ - -bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - scsi_play_position *p = (scsi_play_position *)tmp_buf; - p->start_m = start_m; - p->start_s = start_s; - p->start_f = start_f; - p->end_m = end_m; - p->end_s = end_s; - p->end_f = end_f; - return ioctl(fh->fd, B_SCSI_PLAY_POSITION, p, sizeof(scsi_play_position)) == 0; - } else - return false; -} - - -/* - * Pause CD audio - */ - -bool SysCDPause(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_PAUSE_AUDIO) == 0; - else - return false; -} - - -/* - * Resume paused CD audio - */ - -bool SysCDResume(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_RESUME_AUDIO) == 0; - else - return false; -} - - -/* - * Stop CD audio - */ - -bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_STOP_AUDIO) == 0; - else - return false; -} - - -/* - * Perform CD audio fast-forward/fast-reverse operation starting from specified address - */ - -bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - scsi_scan *p = (scsi_scan *)tmp_buf; - p->speed = 0; - p->direction = reverse ? -1 : 1; - return ioctl(fh->fd, B_SCSI_SCAN, p, sizeof(scsi_scan)) == 0; - } else - return false; -} - - -/* - * Set CD audio volume (0..255 each channel) - */ - -void SysCDSetVolume(void *arg, uint8 left, uint8 right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - scsi_volume *p = (scsi_volume *)tmp_buf; - p->flags = B_SCSI_PORT0_VOLUME | B_SCSI_PORT1_VOLUME; - p->port0_volume = left; - p->port1_volume = right; - ioctl(fh->fd, B_SCSI_SET_VOLUME, p, sizeof(scsi_volume)); - } -} - - -/* - * Get CD audio volume (0..255 each channel) - */ - -void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - left = right = 0; - if (!fh->is_file) { - scsi_volume *p = (scsi_volume *)tmp_buf; - p->flags = B_SCSI_PORT0_VOLUME | B_SCSI_PORT1_VOLUME; - if (ioctl(fh->fd, B_SCSI_GET_VOLUME, p, sizeof(scsi_volume)) == 0) { - left = p->port0_volume; - right = p->port1_volume; - } - } -} diff --git a/BasiliskII/src/BeOS/sysdeps.h b/BasiliskII/src/BeOS/sysdeps.h deleted file mode 100644 index ed3ba9c33..000000000 --- a/BasiliskII/src/BeOS/sysdeps.h +++ /dev/null @@ -1,144 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for BeOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#ifdef __POWERPC__ -#define NO_STD_NAMESPACE -#endif - -#include -#include -#include - -#include "user_strings_beos.h" - -// Are the Mac and the host address space the same? -#ifdef __i386__ -#define REAL_ADDRESSING 0 -#undef WORDS_BIGENDIAN -#else -#define REAL_ADDRESSING 1 -#define WORDS_BIGENDIAN 1 -#endif - -// Using 68k emulator -#define EMULATED_68K 1 - -// Mac ROM is write protected -#define ROM_IS_WRITE_PROTECTED 1 - -// ExtFS is supported -#define SUPPORTS_EXTFS 1 - -// BSD socket API is supported -#define SUPPORTS_UDP_TUNNEL 1 - -// mon is not supported -#undef ENABLE_MON - -// Time data type for Time Manager emulation -typedef bigtime_t tm_time_t; - -// 64 bit file offsets -typedef off_t loff_t; - -// Networking types -#define PF_INET AF_INET -#ifndef __HAIKU__ -typedef int socklen_t; -#endif - -// UAE CPU data types -#define uae_s8 int8 -#define uae_u8 uint8 -#define uae_s16 int16 -#define uae_u16 uint16 -#define uae_s32 int32 -#define uae_u32 uint32 -#define uae_s64 int64 -#define uae_u64 uint64 -typedef uae_u32 uaecptr; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -typedef uint32 uintptr; -typedef int32 intptr; - -/* Timing functions */ -extern void Delay_usec(uint32 usec); - -// UAE CPU defines -#ifdef __i386__ - -// Intel x86 assembler optimizations -#define X86_PPRO_OPT -static inline uae_u32 do_get_mem_long(uae_u32 *a) {uint32 retval; __asm__ ("bswap %0" : "=r" (retval) : "0" (*a) : "cc"); return retval;} -#ifdef X86_PPRO_OPT -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("movzwl %w1,%k0\n\tshll $16,%k0\n\tbswap %k0\n" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#else -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("xorl %k0,%k0\n\tmovw %w1,%w0\n\trolw $8,%w0" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#endif -#define HAVE_GET_WORD_UNSWAPPED -#define do_get_mem_word_unswapped(a) ((uae_u32)*((uae_u16 *)(a))) -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {__asm__ ("bswap %0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#ifdef X86_PPRO_OPT -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("bswap %0" : "=&r" (v) : "0" (v << 16) : "cc"); *a = v;} -#else -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("rolw $8,%0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#endif - -#define X86_ASSEMBLY -#define UNALIGNED_PROFITABLE -#define OPTIMIZED_FLAGS -#define ASM_SYM(a) __asm__(a) -#define REGPARAM __attribute__((regparm(3))) - -#else - -// PowerPC (memory.cpp not used, so no optimization neccessary) -static inline uae_u32 do_get_mem_long(uae_u32 *a) {return *a;} -static inline uae_u32 do_get_mem_word(uae_u16 *a) {return *a;} -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {*a = v;} -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {*a = v;} - -#undef X86_ASSEMBLY -#define UNALIGNED_PROFITABLE -#undef OPTIMIZED_FLAGS -#define ASM_SYM(a) -#define REGPARAM -#endif - -#define do_get_mem_byte(a) ((uae_u32)*((uae_u8 *)(a))) -#define do_put_mem_byte(a, v) (*(uae_u8 *)(a) = (v)) - -#define call_mem_get_func(func, addr) ((*func)(addr)) -#define call_mem_put_func(func, addr, v) ((*func)(addr, v)) -#define __inline__ inline -#define CPU_EMU_SIZE 0 -#undef NO_INLINE_MEMORY_ACCESS -#undef MD_HAVE_MEM_1_FUNCS -#undef USE_COMPILER -#define REGPARAM2 -#define ENUMDECL typedef enum -#define ENUMNAME(name) name -#define write_log printf - -#endif diff --git a/BasiliskII/src/BeOS/timer_beos.cpp b/BasiliskII/src/BeOS/timer_beos.cpp deleted file mode 100644 index f6e71b506..000000000 --- a/BasiliskII/src/BeOS/timer_beos.cpp +++ /dev/null @@ -1,166 +0,0 @@ -/* - * timer_beos.cpp - Time Manager emulation, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - -#include "sysdeps.h" -#include "macos_util.h" -#include "timer.h" - -#define DEBUG 0 -#include "debug.h" - - -// From main_beos.cpp -extern thread_id emul_thread; - - -/* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); - bigtime_t time = system_time(); - hi = time >> 32; - lo = time; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - return TimeToMacTime(time(NULL)); -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ - t = system_time(); -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a + b; -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a - b; -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ - tm_time_t r = a - b; - return r < 0 ? -1 : (r > 0 ? 1 : 0); -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ - if (mactime > 0) - res = mactime * 1000; // Time in milliseconds - else - res = -mactime; // Time in negative microseconds -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime < 0) - return 0; - else if (hosttime > 0x7fffffff) - return hosttime / 1000; // Time in milliseconds - else - return -hosttime; // Time in negative microseconds -} - - -/* - * Delay by specified number of microseconds (<1 second) - */ - -void Delay_usec(uint32 usec) -{ - snooze(usec); -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -void idle_wait(void) -{ -#if 0 - /* - FIXME: add a semaphore (counter) to avoid a B_BAD_THREAD_STATE - return if we call idle_resume() when thread is not suspended? - - Sorry, I can't test -- gb. - */ - suspend_thread(emul_thread); -#endif -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ -#if 0 - resume_thread(emul_thread); -#endif -} diff --git a/BasiliskII/src/BeOS/user_strings_beos.cpp b/BasiliskII/src/BeOS/user_strings_beos.cpp deleted file mode 100644 index c3694578e..000000000 --- a/BasiliskII/src/BeOS/user_strings_beos.cpp +++ /dev/null @@ -1,69 +0,0 @@ -/* - * user_strings_beos.cpp - BeOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under BeOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "BeOS Root"}, - {STR_EXTFS_NAME, "BeOS Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "BeOS"}, - - // Purely platform-specific strings - {STR_NO_SHEEP_DRIVER_ERR, "Cannot open /dev/sheep: %s (%08x). Basilisk II is not properly installed."}, - {STR_SHEEP_UP_ERR, "Cannot allocate Low Memory Globals: %s (%08x)."}, - {STR_NO_KERNEL_DATA_ERR, "Cannot create Kernel Data area: %s (%08x)."}, - {STR_NO_NET_ADDON_WARN, "The SheepShaver net server add-on cannot be found. Ethernet will not be available."}, - {STR_NET_CONFIG_MODIFY_WARN, "To enable Ethernet networking for Basilisk II, your network configuration has to be modified and the network restarted. Do you want this to be done now (selecting \"Cancel\" will disable Ethernet under Basilisk II)?."}, - {STR_NET_ADDON_INIT_FAILED, "SheepShaver net server add-on found\nbut there seems to be no network hardware.\nPlease check your network preferences."}, - {STR_NET_ADDON_CLONE_FAILED, "Cloning of the network transfer area failed."}, - {STR_VIDEO_FAILED, "Failed to set video mode."}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/BasiliskII/src/BeOS/user_strings_beos.h b/BasiliskII/src/BeOS/user_strings_beos.h deleted file mode 100644 index 8de695e93..000000000 --- a/BasiliskII/src/BeOS/user_strings_beos.h +++ /dev/null @@ -1,35 +0,0 @@ -/* - * user_strings_beos.h - BeOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 USER_STRINGS_BEOS_H -#define USER_STRINGS_BEOS_H - -enum { - STR_NO_SHEEP_DRIVER_ERR = 10000, - STR_SHEEP_UP_ERR, - STR_NO_KERNEL_DATA_ERR, - STR_NO_NET_ADDON_WARN, - STR_NET_CONFIG_MODIFY_WARN, - STR_NET_ADDON_INIT_FAILED, - STR_NET_ADDON_CLONE_FAILED, - STR_VIDEO_FAILED -}; - -#endif diff --git a/BasiliskII/src/BeOS/video_beos.cpp b/BasiliskII/src/BeOS/video_beos.cpp deleted file mode 100644 index d70ad834b..000000000 --- a/BasiliskII/src/BeOS/video_beos.cpp +++ /dev/null @@ -1,1086 +0,0 @@ -/* - * video_beos.cpp - Video/graphics emulation, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 -#include -#include - -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "video.h" - -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" - -#define DEBUG 0 -#include "debug.h" - -#define DEBUGGER_AVAILABLE 0 - - -// Messages -const uint32 MSG_REDRAW = 'draw'; -const uint32 MSG_ABOUT_REQUESTED = B_ABOUT_REQUESTED; -const uint32 MSG_REF_5HZ = ' 5Hz'; -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_REF_60HZ = '60Hz'; -const uint32 MSG_MOUNT = 'moun'; -const uint32 MSG_DEBUGGER = 'dbug'; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - -// Global variables -static bool classic_mode = false; // Flag: Classic Mac video mode -static int scr_mode_bit = 0; -static vector VideoModes; // Supported video modes - - /* - * monitor_desc subclass for BeOS display - */ - -class BeOS_monitor_desc : public monitor_desc { -public: - BeOS_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~BeOS_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * A simple view class for blitting a bitmap on the screen - */ - -class BitmapView : public BView { -public: - BitmapView(BRect frame, BBitmap *bitmap) : BView(frame, "bitmap", B_FOLLOW_NONE, B_WILL_DRAW) - { - the_bitmap = bitmap; - } - virtual void Draw(BRect update) - { - DrawBitmap(the_bitmap, update, update); - } - virtual void MouseMoved(BPoint point, uint32 transit, const BMessage *message); - -private: - BBitmap *the_bitmap; -}; - - -/* - * Window class - */ - -class MacWindow : public BDirectWindow { -public: - MacWindow(BRect frame, const BeOS_monitor_desc& monitor); - virtual ~MacWindow(); - virtual void MessageReceived(BMessage *msg); - virtual void DirectConnected(direct_buffer_info *info); - virtual void WindowActivated(bool active); - - int32 frame_skip; - bool mouse_in_view; // Flag: Mouse pointer within bitmap view - uint8 remap_mac_be[256]; // For remapping of Mac colors to Be colors - -private: - static status_t tick_func(void *arg); - - thread_id tick_thread; - bool tick_thread_active; // Flag for quitting the tick thread - - BitmapView *main_view; // Main view for bitmap drawing - BBitmap *the_bitmap; // Mac screen bitmap - - uint32 old_scroll_lock_state; - - bool supports_direct_mode; // Flag: Direct frame buffer access supported - sem_id drawing_sem; - - void *bits; - int32 bytes_per_row; - color_space pixel_format; - bool unclipped; - - BeOS_monitor_desc monitor; -}; - - -/* - * Screen class - */ - -class MacScreen : public BWindowScreen { -public: - MacScreen(const BeOS_monitor_desc& monitor, const char *name, int mode_bit, status_t *error); - virtual ~MacScreen(); - virtual void Quit(void); - virtual void ScreenConnected(bool active); - - rgb_color palette[256]; // Color palette, 256 entries - bool palette_changed; - -private: - static status_t tick_func(void *arg); - - thread_id tick_thread; - bool tick_thread_active; // Flag for quitting the tick thread - - BView *main_view; // Main view for GetMouse() - uint8 *frame_backup; // Frame buffer backup when switching from/to different workspace - bool quitting; // Flag for ScreenConnected: We are quitting, don't pause emulator thread - bool screen_active; - bool first_time; - - BeOS_monitor_desc monitor; -}; - - -// Global variables -static int display_type = DISPLAY_WINDOW; // See enum above -static MacWindow *the_window = NULL; // Pointer to the window -static MacScreen *the_screen = NULL; // Pointer to the screen -static sem_id mac_os_lock = -1; // This is used to stop the MacOS thread when the Basilisk workspace is switched out -static uint8 MacCursor[68] = {16, 1}; // Mac cursor image - - -/* - * Initialization - */ - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - VideoModes.push_back(mode); -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(video_depth depth) -{ -#if 0 - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -#endif -} - - - -bool VideoInit(bool classic) -{ - classic_mode = classic; - - // Get screen mode from preferences - const char *mode_str; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine type and mode - int default_width = 512, default_height = 384; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "scr/%d", &scr_mode_bit) == 1) - display_type = DISPLAY_SCREEN; - } -#if 0 - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); -#endif - - // Mac screen depth follows BeOS depth - video_depth default_depth = VDEPTH_1BIT; - switch (BScreen().ColorSpace()) { - case B_CMAP8: - default_depth = VDEPTH_8BIT; - break; - case B_RGB15: - default_depth = VDEPTH_16BIT; - break; - case B_RGB32: - default_depth = VDEPTH_32BIT; - break; - default: - fprintf(stderr, "Unknown color space!"); - } - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(512, 342, 0x80, 64, VDEPTH_1BIT); - else { - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); -#if 0 - for (unsigned d=VDEPTH_1BIT; d<=VDEPTH_32BIT; d++) { - if (find_visual_for_depth(video_depth(d))) - add_window_modes(video_depth(d)); - } -#endif - } - } else - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); - if (VideoModes.empty()) { - ErrorAlert(STR_VIDEO_FAILED); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - default_id = i->resolution_id; - break; - } - } - if (i == end) { // not found, use first available mode - default_depth = VideoModes[0].depth; - default_id = VideoModes[0].resolution_id; - } - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - int bits = 1 << i->depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", i->x, i->y, i->resolution_id, 1 << bits)); - } -#endif - - // Create X11_monitor_desc for this (the only) display - BeOS_monitor_desc *monitor = new BeOS_monitor_desc(VideoModes, default_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - -bool BeOS_monitor_desc::video_open() { - // Create semaphore - mac_os_lock = create_sem(0, "MacOS Frame Buffer Lock"); - - const video_mode &mode = get_current_mode(); - - // Open display - switch (display_type) { - case DISPLAY_WINDOW: - the_window = new MacWindow(BRect(0, 0, mode.x-1, mode.y-1), *this); - break; - case DISPLAY_SCREEN: { - status_t screen_error; - the_screen = new MacScreen(*this, GetString(STR_WINDOW_TITLE), scr_mode_bit & 0x1f, &screen_error); - if (screen_error != B_NO_ERROR) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - ErrorAlert(STR_OPEN_SCREEN_ERR); - return false; - } else { - the_screen->Show(); - acquire_sem(mac_os_lock); - } - break; - } - } - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Close display - switch (display_type) { - case DISPLAY_WINDOW: - if (the_window != NULL) { - the_window->PostMessage(B_QUIT_REQUESTED); - while (the_window) - snooze(200000); - } - break; - case DISPLAY_SCREEN: - if (the_screen != NULL) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - } - break; - } - - // Delete semaphore - delete_sem(mac_os_lock); -} - - -/* - * Set palette - */ - -void BeOS_monitor_desc::set_palette(uint8 *pal, int num) -{ - switch (display_type) { - case DISPLAY_WINDOW: { - BScreen screen(the_window); - for (int i=0; i<256; i++) - the_window->remap_mac_be[i] = screen.IndexForColor(pal[i*3], pal[i*3+1], pal[i*3+2]); - break; - } - case DISPLAY_SCREEN: - for (int i=0; i<256; i++) { - the_screen->palette[i].red = pal[i*3]; - the_screen->palette[i].green = pal[i*3+1]; - the_screen->palette[i].blue = pal[i*3+2]; - } - the_screen->palette_changed = true; - break; - } -} - - -/* - * Switch video mode - */ - -void BeOS_monitor_desc::switch_to_current_mode() -{ -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DISPLAY_SCREEN) { - if (the_screen != NULL) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - } - } -} - - -/* - * Video event handling (not neccessary under BeOS, handled by filter function) - */ - -void VideoInterrupt(void) -{ - release_sem(mac_os_lock); - while (acquire_sem(mac_os_lock) == B_INTERRUPTED) ; -} - - -/* - * Filter function for receiving mouse and keyboard events - */ - -#define MENU_IS_POWER 0 - -// Be -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0xff, 0x35, 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, // inv Esc F1 F2 F3 F4 F5 F6 - 0x62, 0x64, 0x65, 0x6d, 0x67, 0x6f, 0x69, 0x6b, // F7 F8 F9 F10 F11 F12 F13 F14 - 0x71, 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, // F15 ` 1 2 3 4 5 6 - 0x1a, 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x33, 0x72, // 7 8 9 0 - = BSP INS - 0x73, 0x74, 0x47, 0x4b, 0x43, 0x4e, 0x30, 0x0c, // HOM PUP NUM / * - TAB Q - 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, 0x1f, // W E R T Y U I O - 0x23, 0x21, 0x1e, 0x2a, 0x75, 0x77, 0x79, 0x59, // P [ ] \ DEL END PDN 7 - 0x5b, 0x5c, 0x45, 0x39, 0x00, 0x01, 0x02, 0x03, // 8 9 + CAP A S D F - 0x05, 0x04, 0x26, 0x28, 0x25, 0x29, 0x27, 0x24, // G H J K L ; ' RET - 0x56, 0x57, 0x58, 0x38, 0x06, 0x07, 0x08, 0x09, // 4 5 6 SHL Z X C V - 0x0b, 0x2d, 0x2e, 0x2b, 0x2f, 0x2c, 0x38, 0x3e, // B N M , . / SHR CUP - 0x53, 0x54, 0x55, 0x4c, 0x36, 0x37, 0x31, 0x37, // 1 2 3 ENT CTL ALT SPC ALT - 0x36, 0x3b, 0x3d, 0x3c, 0x52, 0x41, 0x3a, 0x3a, // CTR CLF CDN CRT 0 . CMD CMD -#if MENU_IS_POWER - 0x7f, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#else - 0x32, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static const uint8 modifier2mac[0x20] = { -#if MENU_IS_POWER - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x7f, // SHF CMD inv CAP F14 NUM OPT MNU -#else - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x32, // SHF CMD CTR CAP F14 NUM OPT MNU -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter) -{ - switch (msg->what) { - case B_KEY_DOWN: - case B_KEY_UP: { - uint32 be_code = msg->FindInt32("key") & 0xff; - uint32 mac_code = keycode2mac[be_code]; - - // Intercept Ctrl-F1 (mount floppy disk shortcut) - uint32 mods = msg->FindInt32("modifiers"); - if (be_code == 0x02 && (mods & B_CONTROL_KEY)) - SysMountVolume("/dev/disk/floppy/raw"); - - if (mac_code == 0xff) - return B_DISPATCH_MESSAGE; - if (msg->what == B_KEY_DOWN) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - return B_SKIP_MESSAGE; - } - - case B_MODIFIERS_CHANGED: { - uint32 mods = msg->FindInt32("modifiers"); - uint32 old_mods = msg->FindInt32("be:old_modifiers"); - uint32 changed = mods ^ old_mods; - uint32 mask = 1; - for (int i=0; i<32; i++, mask<<=1) - if (changed & mask) { - uint32 mac_code = modifier2mac[i]; - if (mac_code == 0xff) - continue; - if (mods & mask) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - } - return B_SKIP_MESSAGE; - } - - case B_MOUSE_MOVED: { - BPoint point; - msg->FindPoint("where", &point); - ADBMouseMoved(int(point.x), int(point.y)); - return B_DISPATCH_MESSAGE; // Otherwise BitmapView::MouseMoved() wouldn't be called - } - - case B_MOUSE_DOWN: { - uint32 buttons = msg->FindInt32("buttons"); - if (buttons & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (buttons & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (buttons & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - return B_SKIP_MESSAGE; - } - - case B_MOUSE_UP: // B_MOUSE_UP means "all buttons released" - ADBMouseUp(0); - ADBMouseUp(1); - ADBMouseUp(2); - return B_SKIP_MESSAGE; - - default: - return B_DISPATCH_MESSAGE; - } -} - - -/* - * Window constructor - */ - -MacWindow::MacWindow(BRect frame, const BeOS_monitor_desc& monitor) - : BDirectWindow(frame, GetString(STR_WINDOW_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_CLOSABLE | B_NOT_ZOOMABLE) - , monitor(monitor) -{ - supports_direct_mode = SupportsWindowMode(); - - // Move window to right position - Lock(); - MoveTo(80, 60); - - // Allocate bitmap and Mac frame buffer - uint32 x = frame.IntegerWidth() + 1; - uint32 y = frame.IntegerHeight() + 1; - int fbsize = x * y; - const video_mode &mode = monitor.get_current_mode(); - switch (mode.depth) { - case VDEPTH_1BIT: - fprintf(stderr, "1BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_GRAY1); - fbsize /= 8; - break; - case VDEPTH_8BIT: - fprintf(stderr, "8BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_CMAP8); - break; - case VDEPTH_32BIT: - fprintf(stderr, "32BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_RGB32_BIG); - fbsize *= 4; - break; - default: - fprintf(stderr, "width: %d", 1 << mode.depth); - debugger("OOPS"); - } - -#if REAL_ADDRESSING - monitor.set_mac_frame_base((uint32)the_bitmap->Bits()); -#else - monitor.set_mac_frame_base(MacFrameBaseMac); -#endif - -#if !REAL_ADDRESSING - // Set variables for UAE memory mapping - MacFrameBaseHost = (uint8*)the_bitmap->Bits(); - MacFrameSize = fbsize; - MacFrameLayout = FLAYOUT_DIRECT; -#endif - - // Create bitmap view - main_view = new BitmapView(frame, the_bitmap); - AddChild(main_view); - main_view->MakeFocus(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Set up menus - BRect bounds = Bounds(); - bounds.OffsetBy(0, bounds.IntegerHeight() + 1); - BMenuItem *item; - BMenuBar *bar = new BMenuBar(bounds, "menu"); - BMenu *menu = new BMenu(GetString(STR_WINDOW_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_WINDOW_ITEM_ABOUT), new BMessage(MSG_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - BMenu *submenu = new BMenu(GetString(STR_WINDOW_ITEM_REFRESH)); - submenu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_60HZ_LAB), new BMessage(MSG_REF_60HZ))); - submenu->SetRadioMode(true); - if (frame_skip == 12) { - if ((item = submenu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 8) { - if ((item = submenu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 6) { - if ((item = submenu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 4) { - if ((item = submenu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 2) { - if ((item = submenu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 1) { - if ((item = submenu->FindItem(GetString(STR_REF_60HZ_LAB))) != NULL) - item->SetMarked(true); - } - menu->AddItem(submenu); - submenu = new BMenu(GetString(STR_WINDOW_ITEM_MOUNT)); - SysCreateVolumeMenu(submenu, MSG_MOUNT); - menu->AddItem(submenu); -#if DEBUGGER_AVAILABLE - menu->AddItem(new BMenuItem("Debugger", new BMessage(MSG_DEBUGGER))); -#endif - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Frame().IntegerHeight() + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Set absolute mouse mode and get scroll lock state - ADBSetRelMouseMode(false); - mouse_in_view = true; - old_scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (old_scroll_lock_state) - SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - SetTitle(GetString(STR_WINDOW_TITLE)); - - // Keep window aligned to 8-byte frame buffer boundaries for faster blitting - SetWindowAlignment(B_BYTE_ALIGNMENT, 8); - - // Create drawing semaphore (for direct mode) - drawing_sem = create_sem(0, "direct frame buffer access"); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Window Redraw", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - main_view->AddFilter(filter); - - // Show window - Unlock(); - Show(); - Sync(); -} - - -/* - * Window destructor - */ - -MacWindow::~MacWindow() -{ - // Restore cursor - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - - // Hide window - Hide(); - Sync(); - - // Stop 60Hz interrupt - status_t l; - tick_thread_active = false; - delete_sem(drawing_sem); - wait_for_thread(tick_thread, &l); - - // Free bitmap and frame buffer - delete the_bitmap; - - // Tell emulator that we're done - the_window = NULL; -} - - -/* - * Window connected/disconnected - */ - -void MacWindow::DirectConnected(direct_buffer_info *info) -{ - switch (info->buffer_state & B_DIRECT_MODE_MASK) { - case B_DIRECT_STOP: - acquire_sem(drawing_sem); - break; - case B_DIRECT_MODIFY: - acquire_sem(drawing_sem); - case B_DIRECT_START: - bits = (void *)((uint8 *)info->bits + info->window_bounds.top * info->bytes_per_row + info->window_bounds.left * info->bits_per_pixel / 8); - bytes_per_row = info->bytes_per_row; - pixel_format = info->pixel_format; - unclipped = false; - if (info->clip_list_count == 1) - if (memcmp(&info->clip_bounds, &info->window_bounds, sizeof(clipping_rect)) == 0) - unclipped = true; - release_sem(drawing_sem); - break; - } -} - - -/* - * Handle redraw and menu messages - */ - -void MacWindow::MessageReceived(BMessage *msg) -{ - BMessage *msg2; - - switch (msg->what) { - case MSG_REDRAW: { - - // Prevent backlog of messages - MessageQueue()->Lock(); - while ((msg2 = MessageQueue()->FindMessage(MSG_REDRAW, 0)) != NULL) { - MessageQueue()->RemoveMessage(msg2); - delete msg2; - } - MessageQueue()->Unlock(); - - // Convert Mac screen buffer to BeOS palette and blit - const video_mode &mode = monitor.get_current_mode(); - BRect update_rect = BRect(0, 0, mode.x-1, mode.y-1); - main_view->DrawBitmapAsync(the_bitmap, update_rect, update_rect); - break; - } - - case MSG_ABOUT_REQUESTED: { - ShowAboutWindow(); - break; - } - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", frame_skip = 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", frame_skip = 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", frame_skip = 2); - break; - - case MSG_REF_60HZ: - PrefsReplaceInt32("frameskip", frame_skip = 1); - break; - - case MSG_MOUNT: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - SysMountVolume(source->Label()); - break; - } - -#if DEBUGGER_AVAILABLE - case MSG_DEBUGGER: - extern int debugging; - debugging = 1; - regs.spcflags |= SPCFLAG_BRK; - break; -#endif - - default: - BDirectWindow::MessageReceived(msg); - } -} - - -/* - * Window activated/deactivated - */ - -void MacWindow::WindowActivated(bool active) -{ - if (active) { - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - } else - frame_skip = 12; // 5Hz in background -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacWindow::tick_func(void *arg) -{ - MacWindow *obj = (MacWindow *)arg; - static int tick_counter = 0; - while (obj->tick_thread_active) { - - tick_counter++; - if (tick_counter >= obj->frame_skip) { - tick_counter = 0; - - // Window title is determined by Scroll Lock state - uint32 scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (scroll_lock_state != obj->old_scroll_lock_state) { - if (scroll_lock_state) - obj->SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - obj->SetTitle(GetString(STR_WINDOW_TITLE)); - obj->old_scroll_lock_state = scroll_lock_state; - } - - // Has the Mac started? - if (HasMacStarted()) { - - // Yes, set new cursor image if it was changed - if (memcmp(MacCursor+4, Mac2HostAddr(0x844), 64)) { - Mac2Host_memcpy(MacCursor+4, 0x844, 64); // Cursor image - MacCursor[2] = ReadMacInt8(0x885); // Hotspot - MacCursor[3] = ReadMacInt8(0x887); - be_app->SetCursor(MacCursor); - } - } - - // Refresh screen unless Scroll Lock is down - if (!scroll_lock_state) { - obj->PostMessage(MSG_REDRAW); - } - } - snooze(16666); - } - return 0; -} - - -/* - * Mouse moved in window - */ - -void BitmapView::MouseMoved(BPoint point, uint32 transit, const BMessage *message) -{ - switch (transit) { - case B_ENTERED_VIEW: - ((MacWindow *)Window())->mouse_in_view = true; - be_app->SetCursor(MacCursor); - break; - case B_EXITED_VIEW: - ((MacWindow *)Window())->mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - break; - } -} - - -/* - * Screen constructor - */ - -MacScreen::MacScreen(const BeOS_monitor_desc& monitor, const char *name, int mode_bit, status_t *error) - : BWindowScreen(name, 1 << mode_bit, error), tick_thread(-1) - , monitor(monitor) -{ - // Set all variables - frame_backup = NULL; - palette_changed = false; - screen_active = false; - first_time = true; - quitting = false; - - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Create view to get mouse events - main_view = new BView(Frame(), NULL, B_FOLLOW_NONE, 0); - AddChild(main_view); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Polling sucks...", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - AddCommonFilter(filter); -} - - -/* - * Screen destructor - */ - -MacScreen::~MacScreen() -{ - // Stop 60Hz interrupt - if (tick_thread > 0) { - status_t l; - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - } - - // Tell emulator that we're done - the_screen = NULL; -} - - -/* - * Screen closed - */ - -void MacScreen::Quit(void) -{ - // Tell ScreenConnected() that we are quitting - quitting = true; - BWindowScreen::Quit(); -} - - -/* - * Screen connected/disconnected - */ - -void MacScreen::ScreenConnected(bool active) -{ - graphics_card_info *info = CardInfo(); - screen_active = active; - const video_mode &mode = monitor.get_current_mode(); - - if (active == true) { - - // Set VideoMonitor -#if REAL_ADDRESSING - monitor.set_mac_frame_base((uint32)info->frame_buffer); -#else - monitor.set_mac_frame_base(MacFrameBaseMac); -#endif - -#if !REAL_ADDRESSING - // Set variables for UAE memory mapping - MacFrameBaseHost = (uint8 *)info->frame_buffer; - MacFrameSize = mode.bytes_per_row * mode.y; - switch (info->bits_per_pixel) { - case 15: - MacFrameLayout = FLAYOUT_HOST_555; - break; - case 16: - MacFrameLayout = FLAYOUT_HOST_565; - break; - case 32: - MacFrameLayout = FLAYOUT_HOST_888; - break; - default: - MacFrameLayout = FLAYOUT_DIRECT; - break; - } -#endif - - // Copy from backup store to frame buffer - if (frame_backup != NULL) { - memcpy(info->frame_buffer, frame_backup, mode.bytes_per_row * mode.y); - delete[] frame_backup; - frame_backup = NULL; - } - - // Restore palette - if (mode.depth == VDEPTH_8BIT) - SetColorList(palette); - - // Restart/signal emulator thread - release_sem(mac_os_lock); - - } else { - - if (!quitting) { - - // Stop emulator thread - acquire_sem(mac_os_lock); - - // Create backup store and save frame buffer - frame_backup = new uint8[mode.bytes_per_row * mode.y]; - memcpy(frame_backup, info->frame_buffer, mode.bytes_per_row * mode.y); - } - } -} - - -/* - * Screen 60Hz interrupt routine - */ - -status_t MacScreen::tick_func(void *arg) -{ - MacScreen *obj = (MacScreen *)arg; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Workspace activated? Then poll the mouse and set the palette if needed - if (!obj->quitting && obj->LockWithTimeout(200000) == B_OK) { - if (obj->screen_active) { - BPoint pt; - uint32 button = 0; - if (obj->palette_changed) { - obj->palette_changed = false; - obj->SetColorList(obj->palette); - } - obj->main_view->GetMouse(&pt, &button); - set_mouse_position(320, 240); - ADBMouseMoved(int(pt.x) - 320, int(pt.y) - 240); - if (button & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (!(button & B_PRIMARY_MOUSE_BUTTON)) - ADBMouseUp(0); - if (button & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (!(button & B_SECONDARY_MOUSE_BUTTON)) - ADBMouseUp(1); - if (button & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - if (!(button & B_TERTIARY_MOUSE_BUTTON)) - ADBMouseUp(2); - } - obj->Unlock(); - } - } - return 0; -} diff --git a/BasiliskII/src/BeOS/xpram_beos.cpp b/BasiliskII/src/BeOS/xpram_beos.cpp deleted file mode 100644 index 8ee250a47..000000000 --- a/BasiliskII/src/BeOS/xpram_beos.cpp +++ /dev/null @@ -1,84 +0,0 @@ -/* - * xpram_beos.cpp - XPRAM handling, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include - -#include "sysdeps.h" -#include "xpram.h" - - -// XPRAM file name and path -#if POWERPC_ROM -const char XPRAM_FILE_NAME[] = "SheepShaver_NVRAM"; -#else -const char XPRAM_FILE_NAME[] = "BasiliskII_XPRAM"; -#endif -static BPath xpram_path; - - -/* - * Load XPRAM from settings file - */ - -void LoadXPRAM(const char *vmdir) -{ - // Construct XPRAM path - find_directory(B_USER_SETTINGS_DIRECTORY, &xpram_path, true); - xpram_path.Append(XPRAM_FILE_NAME); - - // Load XPRAM from settings file - int fd; - if ((fd = open(xpram_path.Path(), O_RDONLY)) >= 0) { - read(fd, XPRAM, XPRAM_SIZE); - close(fd); - } -} - - -/* - * Save XPRAM to settings file - */ - -void SaveXPRAM(void) -{ - if (xpram_path.InitCheck() != B_NO_ERROR) - return; - int fd; - if ((fd = open(xpram_path.Path(), O_WRONLY | O_CREAT, 0666)) >= 0) { - write(fd, XPRAM, XPRAM_SIZE); - close(fd); - } -} - - -/* - * Delete PRAM file - */ - -void ZapPRAM(void) -{ - // Construct PRAM path - find_directory(B_USER_SETTINGS_DIRECTORY, &xpram_path, true); - xpram_path.Append(XPRAM_FILE_NAME); - - // Delete file - unlink(xpram_path.Path()); -} diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index 570058c23..41a5d04e5 100644 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -53,14 +53,8 @@ using std::list; // Size of an unsigned integer large enough to hold all bits of a pointer // NOTE: this can be different than SIGSEGV_REGISTER_TYPE. In // particular, on ILP32 systems with a 64-bit kernel (HP-UX/ia64?) -#if defined(HAVE_WIN32_VM) -// Windows is either ILP32 or LLP64 -#include -typedef UINT_PTR sigsegv_uintptr_t; -#else // Other systems are sane enough to follow ILP32 or LP64 models typedef unsigned long sigsegv_uintptr_t; -#endif // Type of the system signal handler typedef RETSIGTYPE (*signal_handler)(int); @@ -96,507 +90,19 @@ enum transfer_size_t { SIZE_QUAD // 8 bytes }; -#if (defined(powerpc) || defined(__powerpc__) || defined(__ppc__) || defined(__ppc64__)) -// Addressing mode -enum addressing_mode_t { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX -}; - -// Decoded instruction -struct instruction_t { - transfer_type_t transfer_type; - transfer_size_t transfer_size; - addressing_mode_t addr_mode; - unsigned int addr; - char ra, rd; -}; - -static void powerpc_decode_instruction(instruction_t *instruction, unsigned int nip, unsigned long * gpr) -{ - // Get opcode and divide into fields - unsigned int opcode = *((unsigned int *)(unsigned long)nip); - unsigned int primop = opcode >> 26; - unsigned int exop = (opcode >> 1) & 0x3ff; - unsigned int ra = (opcode >> 16) & 0x1f; - unsigned int rb = (opcode >> 11) & 0x1f; - unsigned int rd = (opcode >> 21) & 0x1f; - signed int imm = (signed short)(opcode & 0xffff); - - // Analyze opcode - transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; - transfer_size_t transfer_size = SIZE_UNKNOWN; - addressing_mode_t addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_LONG; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_LONG; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = SIGSEGV_TRANSFER_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = SIGSEGV_TRANSFER_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 58: // ld, ldu, lwa - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - addr_mode = ((opcode & 3) == 1) ? MODE_U : MODE_NORM; - imm &= ~3; - break; - case 62: // std, stdu, stq - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_QUAD; - addr_mode = ((opcode & 3) == 1) ? MODE_U : MODE_NORM; - imm &= ~3; - break; - } - - // Calculate effective address - unsigned int addr = 0; - switch (addr_mode) { - case MODE_X: - case MODE_UX: - if (ra == 0) - addr = gpr[rb]; - else - addr = gpr[ra] + gpr[rb]; - break; - case MODE_NORM: - case MODE_U: - if (ra == 0) - addr = (signed int)(signed short)imm; - else - addr = gpr[ra] + (signed int)(signed short)imm; - break; - default: - break; - } - - // Commit decoded instruction - instruction->addr = addr; - instruction->addr_mode = addr_mode; - instruction->transfer_type = transfer_type; - instruction->transfer_size = transfer_size; - instruction->ra = ra; - instruction->rd = rd; -} -#endif - - /* * OS-dependant SIGSEGV signals support section */ #if HAVE_SIGINFO_T // Generic extended signal handler -#if defined(__hpux) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) FAULT_HANDLER(SIGBUS) -#else -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#endif + #define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, siginfo_t *sip, void *scp #define SIGSEGV_FAULT_HANDLER_ARGLIST_1 siginfo_t *sip, void *scp #define SIGSEGV_FAULT_HANDLER_ARGS sip, scp #define SIGSEGV_FAULT_ADDRESS sip->si_addr -#if (defined(sgi) || defined(__sgi)) -#include -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) -#define SIGSEGV_FAULT_INSTRUCTION (unsigned long)SIGSEGV_CONTEXT_REGS[CTX_EPC] -#if (defined(mips) || defined(__mips)) -#define SIGSEGV_REGISTER_FILE &SIGSEGV_CONTEXT_REGS[CTX_EPC], &SIGSEGV_CONTEXT_REGS[CTX_R0] -#define SIGSEGV_SKIP_INSTRUCTION mips_skip_instruction -#endif -#endif -#if defined(__sun__) -#if (defined(sparc) || defined(__sparc__)) -#include -#include -#include -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[REG_PC] -#define SIGSEGV_SPARC_GWINDOWS (((ucontext_t *)scp)->uc_mcontext.gwins) -#define SIGSEGV_SPARC_RWINDOW (struct rwindow *)((char *)SIGSEGV_CONTEXT_REGS[REG_SP] + STACK_BIAS) -#define SIGSEGV_REGISTER_FILE ((unsigned long *)SIGSEGV_CONTEXT_REGS), SIGSEGV_SPARC_GWINDOWS, SIGSEGV_SPARC_RWINDOW -#define SIGSEGV_SKIP_INSTRUCTION sparc_skip_instruction -#endif -#if defined(__i386__) -#include -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[EIP] -#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#endif -#if defined(__FreeBSD__) || defined(__OpenBSD__) -#if (defined(i386) || defined(__i386__)) -#undef SIGSEGV_ALL_SIGNALS -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) -#define SIGSEGV_FAULT_INSTRUCTION (((struct sigcontext *)scp)->sc_eip) -#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&(((struct sigcontext *)scp)->sc_edi)) /* EDI is the first GPR (even below EIP) in sigcontext */ -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#elif (defined(x86_64) || defined(__x86_64__)) -#define SIGSEGV_FAULT_INSTRUCTION (((struct sigcontext *)scp)->sc_rip) -#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&(((struct sigcontext *)scp)->sc_rdi)) -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#endif -#if defined(__NetBSD__) -#if (defined(i386) || defined(__i386__)) -#include -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.__gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[_REG_EIP] -#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#if (defined(powerpc) || defined(__powerpc__)) -#include -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.__gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[_REG_PC] -#define SIGSEGV_REGISTER_FILE (unsigned long *)&SIGSEGV_CONTEXT_REGS[_REG_PC], (unsigned long *)&SIGSEGV_CONTEXT_REGS[_REG_R0] -#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction -#endif -#endif -#if defined(__linux__) -#if HAVE_ASM_UCONTEXT -#include /* use kernel structure, glibc may not be in sync */ -#else -#include -#endif -#if (defined(hppa) || defined(__hppa__)) -#undef SIGSEGV_FAULT_ADDRESS -#define SIGSEGV_FAULT_ADDRESS sip->si_ptr -#endif -#if (defined(i386) || defined(__i386__)) -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[14] /* should use REG_EIP instead */ -#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#elif (defined(x86_64) || defined(__x86_64__)) -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.gregs) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS[16] /* should use REG_RIP instead */ -#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#elif (defined(ia64) || defined(__ia64__)) -#define SIGSEGV_CONTEXT_REGS ((struct sigcontext *)scp) -#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS->sc_ip & ~0x3ULL) /* slot number is in bits 0 and 1 */ -#define SIGSEGV_REGISTER_FILE SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ia64_skip_instruction -#elif (defined(powerpc) || defined(__powerpc__)) -#define SIGSEGV_CONTEXT_REGS (((ucontext_t *)scp)->uc_mcontext.regs) -#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS->nip) -#define SIGSEGV_REGISTER_FILE (unsigned long *)&SIGSEGV_CONTEXT_REGS->nip, (unsigned long *)(SIGSEGV_CONTEXT_REGS->gpr) -#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction -#elif (defined(arm) || defined(__arm__)) -#define SIGSEGV_CONTEXT_REGS (((struct ucontext *)scp)->uc_mcontext) -#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS.arm_pc) -#define SIGSEGV_REGISTER_FILE (&SIGSEGV_CONTEXT_REGS.arm_r0) -#define SIGSEGV_SKIP_INSTRUCTION arm_skip_instruction -#elif (defined(mips) || defined(__mips__)) -#define SIGSEGV_CONTEXT_REGS (((struct ucontext *)scp)->uc_mcontext) -#define SIGSEGV_FAULT_INSTRUCTION (SIGSEGV_CONTEXT_REGS.pc) -#define SIGSEGV_REGISTER_FILE &SIGSEGV_CONTEXT_REGS.pc, &SIGSEGV_CONTEXT_REGS.gregs[0] -#define SIGSEGV_SKIP_INSTRUCTION mips_skip_instruction -#endif -#endif // defined(__linux__) -#if (defined(__hpux) || defined(__hpux__)) -#if (defined(__hppa) || defined(__hppa__)) -#define SIGSEGV_CONTEXT_REGS (&((ucontext_t *)scp)->uc_mcontext) -#define SIGSEGV_FAULT_INSTRUCTION_32 (SIGSEGV_CONTEXT_REGS->ss_narrow.ss_pcoq_head & ~3ul) -#define SIGSEGV_FAULT_INSTRUCTION_64 (SIGSEGV_CONTEXT_REGS->ss_wide.ss_64.ss_pcoq_head & ~3ull) -#if defined(__LP64__) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_FAULT_INSTRUCTION_64 -#else -#define SIGSEGV_FAULT_INSTRUCTION ((SIGSEGV_CONTEXT_REGS->ss_flags & SS_WIDEREGS) ? \ - (uint32_t)SIGSEGV_FAULT_INSTRUCTION_64 : \ - SIGSEGV_FAULT_INSTRUCTION_32) -#endif -#endif -#if (defined(__ia64) || defined(__ia64__)) -#include -#define SIGSEGV_CONTEXT_REGS ((ucontext_t *)scp) -#define SIGSEGV_FAULT_INSTRUCTION get_fault_instruction(SIGSEGV_CONTEXT_REGS) -#define SIGSEGV_REGISTER_FILE SIGSEGV_CONTEXT_REGS -#define SIGSEGV_SKIP_INSTRUCTION ia64_skip_instruction - -#include -static inline sigsegv_address_t get_fault_instruction(const ucontext_t *ucp) -{ - uint64_t ip; - if (__uc_get_ip(ucp, &ip) != 0) - return SIGSEGV_INVALID_ADDRESS; - return (sigsegv_address_t)(ip & ~3ULL); -} -#endif -#endif -#endif - -#if HAVE_SIGCONTEXT_SUBTERFUGE -// Linux kernels prior to 2.4 ? -#if defined(__linux__) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#if (defined(i386) || defined(__i386__)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, struct sigcontext scs -#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS &scs -#define SIGSEGV_FAULT_ADDRESS scp->cr2 -#define SIGSEGV_FAULT_INSTRUCTION scp->eip -#define SIGSEGV_REGISTER_FILE (SIGSEGV_REGISTER_TYPE *)scp -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#if (defined(sparc) || defined(__sparc__)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp, char *addr -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp, addr -#define SIGSEGV_FAULT_ADDRESS addr -#endif -#if (defined(powerpc) || defined(__powerpc__)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, scp -#define SIGSEGV_FAULT_ADDRESS scp->regs->dar -#define SIGSEGV_FAULT_INSTRUCTION scp->regs->nip -#define SIGSEGV_REGISTER_FILE (unsigned long *)&scp->regs->nip, (unsigned long *)(scp->regs->gpr) -#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction -#endif -#if (defined(alpha) || defined(__alpha__)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) -#define SIGSEGV_FAULT_INSTRUCTION scp->sc_pc -#endif -#if (defined(arm) || defined(__arm__)) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int r1, int r2, int r3, struct sigcontext sc -#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS &sc -#define SIGSEGV_FAULT_ADDRESS scp->fault_address -#define SIGSEGV_FAULT_INSTRUCTION scp->arm_pc -#define SIGSEGV_REGISTER_FILE &scp->arm_r0 -#define SIGSEGV_SKIP_INSTRUCTION arm_skip_instruction -#endif -#endif - -// Irix 5 or 6 on MIPS -#if (defined(sgi) || defined(__sgi)) && (defined(SYSTYPE_SVR4) || defined(_SYSTYPE_SVR4)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS (unsigned long)scp->sc_badvaddr -#define SIGSEGV_FAULT_INSTRUCTION (unsigned long)scp->sc_pc -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#endif - -// HP-UX -#if (defined(hpux) || defined(__hpux__)) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS scp->sc_sl.sl_ss.ss_narrow.ss_cr21 -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) FAULT_HANDLER(SIGBUS) -#endif - -// OSF/1 on Alpha -#if defined(__osf__) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS scp->sc_traparg_a0 -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#endif - -// AIX -#if defined(_AIX) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS scp->sc_jmpbuf.jmp_context.o_vaddr -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#endif - -// NetBSD -#if defined(__NetBSD__) -#if (defined(m68k) || defined(__m68k__)) -#include -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) - -// Use decoding scheme from BasiliskII/m68k native -static sigsegv_address_t get_fault_address(struct sigcontext *scp) -{ - struct sigstate { - int ss_flags; - struct frame ss_frame; - }; - struct sigstate *state = (struct sigstate *)scp->sc_ap; - char *fault_addr; - switch (state->ss_frame.f_format) { - case 7: /* 68040 access error */ - /* "code" is sometimes unreliable (i.e. contains NULL or a bogus address), reason unknown */ - fault_addr = state->ss_frame.f_fmt7.f_fa; - break; - default: - fault_addr = (char *)code; - break; - } - return (sigsegv_address_t)fault_addr; -} -#endif -#if (defined(alpha) || defined(__alpha__)) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) -#endif -#if (defined(i386) || defined(__i386__)) -#error "FIXME: need to decode instruction and compute EA" -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#endif -#endif -#if defined(__FreeBSD__) -#if (defined(i386) || defined(__i386__)) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct sigcontext *scp, char *addr -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp, addr -#define SIGSEGV_FAULT_ADDRESS addr -#define SIGSEGV_FAULT_INSTRUCTION scp->sc_eip -#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&scp->sc_edi) -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#if (defined(alpha) || defined(__alpha__)) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGSEGV) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, char *addr, struct sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, addr, scp -#define SIGSEGV_FAULT_ADDRESS addr -#define SIGSEGV_FAULT_INSTRUCTION scp->sc_pc -#endif -#endif - -// Extract fault address out of a sigcontext -#if (defined(alpha) || defined(__alpha__)) -// From Boehm's GC 6.0alpha8 -static sigsegv_address_t get_fault_address(struct sigcontext *scp) -{ - unsigned int instruction = *((unsigned int *)(scp->sc_pc)); - unsigned long fault_address = scp->sc_regs[(instruction >> 16) & 0x1f]; - fault_address += (signed long)(signed short)(instruction & 0xffff); - return (sigsegv_address_t)fault_address; -} -#endif - - -// MacOS X, not sure which version this works in. Under 10.1 -// vm_protect does not appear to work from a signal handler. Under -// 10.2 signal handlers get siginfo type arguments but the si_addr -// field is the address of the faulting instruction and not the -// address that caused the SIGBUS. Maybe this works in 10.0? In any -// case with Mach exception handlers there is a way to do what this -// was meant to do. -#ifndef HAVE_MACH_EXCEPTIONS -#if defined(__APPLE__) && defined(__MACH__) -#if (defined(ppc) || defined(__ppc__)) -#define SIGSEGV_FAULT_HANDLER_ARGLIST int sig, int code, struct __darwin_sigcontext *scp -#define SIGSEGV_FAULT_HANDLER_ARGS sig, code, scp -#define SIGSEGV_FAULT_ADDRESS get_fault_address(scp) -#define SIGSEGV_FAULT_INSTRUCTION scp->MACH_FIELD_NAME(sc_ir) -#define SIGSEGV_ALL_SIGNALS FAULT_HANDLER(SIGBUS) -#define SIGSEGV_REGISTER_FILE (unsigned int *)&scp->sc_ir, &((unsigned int *) scp->sc_regs)[2] -#define SIGSEGV_SKIP_INSTRUCTION powerpc_skip_instruction - -// Use decoding scheme from SheepShaver -static sigsegv_address_t get_fault_address(struct sigcontext *scp) -{ - unsigned int nip = (unsigned int) scp->MACH_FIELD_NAME(sc_ir); - unsigned int * gpr = &((unsigned int *) scp->MACH_FIELD_NAME(sc_regs))[2]; - instruction_t instr; - powerpc_decode_instruction(&instr, nip, (long unsigned int*)gpr); - return (sigsegv_address_t)instr.addr; -} -#endif -#endif -#endif -#endif -#if HAVE_WIN32_EXCEPTIONS -#define WIN32_LEAN_AND_MEAN /* avoid including junk */ -#include -#include - -#define SIGSEGV_FAULT_HANDLER_ARGLIST EXCEPTION_POINTERS *ExceptionInfo -#define SIGSEGV_FAULT_HANDLER_ARGS ExceptionInfo -#define SIGSEGV_FAULT_ADDRESS ExceptionInfo->ExceptionRecord->ExceptionInformation[1] -#define SIGSEGV_CONTEXT_REGS ExceptionInfo->ContextRecord -#if defined(_M_IX86) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->Eip -#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIGSEGV_CONTEXT_REGS->Edi) -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#if defined(_M_X64) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->Rip -#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIGSEGV_CONTEXT_REGS->Rax) -#define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction -#endif -#if defined(_M_IA64) -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_CONTEXT_REGS->StIIP -#endif #endif #if HAVE_MACH_EXCEPTIONS @@ -748,130 +254,11 @@ handleExceptions(void *priv) #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION // Decode and skip X86 instruction #if (defined(i386) || defined(__i386__) || defined(_M_IX86)) || (defined(__x86_64__) || defined(_M_X64)) -#if defined(__linux__) -enum { -#if (defined(i386) || defined(__i386__)) - X86_REG_EIP = 14, - X86_REG_EAX = 11, - X86_REG_ECX = 10, - X86_REG_EDX = 9, - X86_REG_EBX = 8, - X86_REG_ESP = 7, - X86_REG_EBP = 6, - X86_REG_ESI = 5, - X86_REG_EDI = 4 -#endif -#if defined(__x86_64__) - X86_REG_R8 = 0, - X86_REG_R9 = 1, - X86_REG_R10 = 2, - X86_REG_R11 = 3, - X86_REG_R12 = 4, - X86_REG_R13 = 5, - X86_REG_R14 = 6, - X86_REG_R15 = 7, - X86_REG_EDI = 8, - X86_REG_ESI = 9, - X86_REG_EBP = 10, - X86_REG_EBX = 11, - X86_REG_EDX = 12, - X86_REG_EAX = 13, - X86_REG_ECX = 14, - X86_REG_ESP = 15, - X86_REG_EIP = 16 -#endif -}; -#endif -#if defined(__NetBSD__) -enum { -#if (defined(i386) || defined(__i386__)) - X86_REG_EIP = _REG_EIP, - X86_REG_EAX = _REG_EAX, - X86_REG_ECX = _REG_ECX, - X86_REG_EDX = _REG_EDX, - X86_REG_EBX = _REG_EBX, - X86_REG_ESP = _REG_ESP, - X86_REG_EBP = _REG_EBP, - X86_REG_ESI = _REG_ESI, - X86_REG_EDI = _REG_EDI -#endif -}; -#endif -#if defined(__FreeBSD__) -enum { -#if (defined(i386) || defined(__i386__)) - X86_REG_EIP = 10, - X86_REG_EAX = 7, - X86_REG_ECX = 6, - X86_REG_EDX = 5, - X86_REG_EBX = 4, - X86_REG_ESP = 13, - X86_REG_EBP = 2, - X86_REG_ESI = 1, - X86_REG_EDI = 0 -#endif -#if (defined(x86_64) || defined(__x86_64__)) - X86_REG_EDI = 0, - X86_REG_ESI = 1, - X86_REG_EDX = 2, - X86_REG_ECX = 3, - X86_REG_R8 = 4, - X86_REG_R9 = 5, - X86_REG_EAX = 6, - X86_REG_EBX = 7, - X86_REG_EBP = 8, - X86_REG_R10 = 9, - X86_REG_R11 = 10, - X86_REG_R12 = 11, - X86_REG_R13 = 12, - X86_REG_R14 = 13, - X86_REG_R15 = 14, - X86_REG_EIP = 19, - X86_REG_ESP = 22, -#endif -}; -#endif -#if defined(__OpenBSD__) -enum { -#if defined(__i386__) - // EDI is the first register we consider -#define OREG(REG) offsetof(struct sigcontext, sc_##REG) -#define DREG(REG) ((OREG(REG) - OREG(edi)) / 4) - X86_REG_EIP = DREG(eip), // 7 - X86_REG_EAX = DREG(eax), // 6 - X86_REG_ECX = DREG(ecx), // 5 - X86_REG_EDX = DREG(edx), // 4 - X86_REG_EBX = DREG(ebx), // 3 - X86_REG_ESP = DREG(esp), // 10 - X86_REG_EBP = DREG(ebp), // 2 - X86_REG_ESI = DREG(esi), // 1 - X86_REG_EDI = DREG(edi) // 0 -#undef DREG -#undef OREG -#endif -}; -#endif -#if defined(__sun__) -// Same as for Linux, need to check for x86-64 -enum { -#if defined(__i386__) - X86_REG_EIP = EIP, - X86_REG_EAX = EAX, - X86_REG_ECX = ECX, - X86_REG_EDX = EDX, - X86_REG_EBX = EBX, - X86_REG_ESP = ESP, - X86_REG_EBP = EBP, - X86_REG_ESI = ESI, - X86_REG_EDI = EDI -#endif -}; -#endif + #if defined(__APPLE__) && defined(__MACH__) enum { #if (defined(i386) || defined(__i386__)) #ifdef i386_SAVED_STATE - // same as FreeBSD (in Open Darwin 8.0.1) X86_REG_EIP = 10, X86_REG_EAX = 7, X86_REG_ECX = 6, @@ -915,40 +302,7 @@ enum { #endif }; #endif -#if defined(_WIN32) -enum { -#if defined(_M_IX86) - X86_REG_EIP = 7, - X86_REG_EAX = 5, - X86_REG_ECX = 4, - X86_REG_EDX = 3, - X86_REG_EBX = 2, - X86_REG_ESP = 10, - X86_REG_EBP = 6, - X86_REG_ESI = 1, - X86_REG_EDI = 0 -#endif -#if defined(_M_X64) - X86_REG_EAX = 0, - X86_REG_ECX = 1, - X86_REG_EDX = 2, - X86_REG_EBX = 3, - X86_REG_ESP = 4, - X86_REG_EBP = 5, - X86_REG_ESI = 6, - X86_REG_EDI = 7, - X86_REG_R8 = 8, - X86_REG_R9 = 9, - X86_REG_R10 = 10, - X86_REG_R11 = 11, - X86_REG_R12 = 12, - X86_REG_R13 = 13, - X86_REG_R14 = 14, - X86_REG_R15 = 15, - X86_REG_EIP = 16 -#endif -}; -#endif + // FIXME: this is partly redundant with the instruction decoding phase // to discover transfer type and register number static inline int ix86_step_over_modrm(unsigned char * p) @@ -989,10 +343,6 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) if (eip == 0) return false; -#ifdef _WIN32 - if (IsBadCodePtr((FARPROC)eip)) - return false; -#endif enum instruction_type_t { i_MOV, @@ -1242,1383 +592,86 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) } #endif -// Decode and skip IA-64 instruction -#if defined(__ia64) || defined(__ia64__) -typedef uint64_t ia64_bundle_t[2]; -#if defined(__linux__) -// We can directly patch the slot number -#define IA64_CAN_PATCH_IP_SLOT 1 -// Helper macros to access the machine context -#define IA64_CONTEXT_TYPE struct sigcontext * -#define IA64_CONTEXT scp -#define IA64_GET_IP() (IA64_CONTEXT->sc_ip) -#define IA64_SET_IP(V) (IA64_CONTEXT->sc_ip = (V)) -#define IA64_GET_PR(P) ((IA64_CONTEXT->sc_pr >> (P)) & 1) -#define IA64_GET_NAT(I) ((IA64_CONTEXT->sc_nat >> (I)) & 1) -#define IA64_GET_GR(R) (IA64_CONTEXT->sc_gr[(R)]) -#define _IA64_SET_GR(R,V) (IA64_CONTEXT->sc_gr[(R)] = (V)) -#define _IA64_SET_NAT(I,V) (IA64_CONTEXT->sc_nat = (IA64_CONTEXT->sc_nat & ~(1ull << (I))) | (((uint64_t)!!(V)) << (I))) -#define IA64_SET_GR(R,V,N) (_IA64_SET_GR(R,V), _IA64_SET_NAT(R,N)) - -// Load bundle (in little-endian) -static inline void ia64_load_bundle(ia64_bundle_t bundle, uint64_t raw_ip) -{ - uint64_t *ip = (uint64_t *)(raw_ip & ~3ull); - bundle[0] = ip[0]; - bundle[1] = ip[1]; -} #endif -#if defined(__hpux) || defined(__hpux__) -// We can directly patch the slot number -#define IA64_CAN_PATCH_IP_SLOT 1 -// Helper macros to access the machine context -#define IA64_CONTEXT_TYPE ucontext_t * -#define IA64_CONTEXT ucp -#define IA64_GET_IP() ia64_get_ip(IA64_CONTEXT) -#define IA64_SET_IP(V) ia64_set_ip(IA64_CONTEXT, V) -#define IA64_GET_PR(P) ia64_get_pr(IA64_CONTEXT, P) -#define IA64_GET_NAT(I) ia64_get_nat(IA64_CONTEXT, I) -#define IA64_GET_GR(R) ia64_get_gr(IA64_CONTEXT, R) -#define IA64_SET_GR(R,V,N) ia64_set_gr(IA64_CONTEXT, R, V, N) -#define UC_ACCESS(FUNC,ARGS) do { if (__uc_##FUNC ARGS != 0) abort(); } while (0) - -static inline uint64_t ia64_get_ip(IA64_CONTEXT_TYPE IA64_CONTEXT) - { uint64_t v; UC_ACCESS(get_ip,(IA64_CONTEXT, &v)); return v; } -static inline void ia64_set_ip(IA64_CONTEXT_TYPE IA64_CONTEXT, uint64_t v) - { UC_ACCESS(set_ip,(IA64_CONTEXT, v)); } -static inline unsigned int ia64_get_pr(IA64_CONTEXT_TYPE IA64_CONTEXT, int pr) - { uint64_t v; UC_ACCESS(get_prs,(IA64_CONTEXT, &v)); return (v >> pr) & 1; } -static inline unsigned int ia64_get_nat(IA64_CONTEXT_TYPE IA64_CONTEXT, int r) - { uint64_t v; unsigned int nat; UC_ACCESS(get_grs,(IA64_CONTEXT, r, 1, &v, &nat)); return (nat >> r) & 1; } -static inline uint64_t ia64_get_gr(IA64_CONTEXT_TYPE IA64_CONTEXT, int r) - { uint64_t v; unsigned int nat; UC_ACCESS(get_grs,(IA64_CONTEXT, r, 1, &v, &nat)); return v; } - -static void ia64_set_gr(IA64_CONTEXT_TYPE IA64_CONTEXT, int r, uint64_t v, unsigned int nat) -{ - if (r == 0) - return; - if (r > 0 && r < 32) - UC_ACCESS(set_grs,(IA64_CONTEXT, r, 1, &v, (!!nat) << r)); - else { - uint64_t bsp, bspstore; - UC_ACCESS(get_ar_bsp,(IA64_CONTEXT, &bsp)); - UC_ACCESS(get_ar_bspstore,(IA64_CONTEXT, &bspstore)); - abort(); /* XXX: use libunwind, this is not fun... */ - } -} -// Byte-swapping -#if defined(__GNUC__) -#define BSWAP64(V) ({ uint64_t r; __asm__ __volatile__("mux1 %0=%1,@rev;;" : "=r" (r) : "r" (V)); r; }) -#elif defined (__HP_aCC) -#define BSWAP64(V) _Asm_mux1(_MBTYPE_REV, V) -#else -#error "Define byte-swap instruction" -#endif -// Load bundle (in little-endian) -static inline void ia64_load_bundle(ia64_bundle_t bundle, uint64_t raw_ip) -{ - uint64_t *ip = (uint64_t *)(raw_ip & ~3ull); - bundle[0] = BSWAP64(ip[0]); - bundle[1] = BSWAP64(ip[1]); -} +// Fallbacks +#ifndef SIGSEGV_FAULT_ADDRESS_FAST +#define SIGSEGV_FAULT_ADDRESS_FAST SIGSEGV_FAULT_ADDRESS +#endif +#ifndef SIGSEGV_FAULT_INSTRUCTION_FAST +#define SIGSEGV_FAULT_INSTRUCTION_FAST SIGSEGV_FAULT_INSTRUCTION +#endif +#ifndef SIGSEGV_FAULT_INSTRUCTION +#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_INVALID_ADDRESS +#endif +#ifndef SIGSEGV_FAULT_HANDLER_ARGLIST_1 +#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 SIGSEGV_FAULT_HANDLER_ARGLIST +#endif +#ifndef SIGSEGV_FAULT_HANDLER_INVOKE +#define SIGSEGV_FAULT_HANDLER_INVOKE(P) sigsegv_fault_handler(P) #endif -// Instruction operations -enum { - IA64_INST_UNKNOWN = 0, - IA64_INST_LD1, // ld1 op0=[op1] - IA64_INST_LD1_UPDATE, // ld1 op0=[op1],op2 - IA64_INST_LD2, // ld2 op0=[op1] - IA64_INST_LD2_UPDATE, // ld2 op0=[op1],op2 - IA64_INST_LD4, // ld4 op0=[op1] - IA64_INST_LD4_UPDATE, // ld4 op0=[op1],op2 - IA64_INST_LD8, // ld8 op0=[op1] - IA64_INST_LD8_UPDATE, // ld8 op0=[op1],op2 - IA64_INST_ST1, // st1 [op0]=op1 - IA64_INST_ST1_UPDATE, // st1 [op0]=op1,op2 - IA64_INST_ST2, // st2 [op0]=op1 - IA64_INST_ST2_UPDATE, // st2 [op0]=op1,op2 - IA64_INST_ST4, // st4 [op0]=op1 - IA64_INST_ST4_UPDATE, // st4 [op0]=op1,op2 - IA64_INST_ST8, // st8 [op0]=op1 - IA64_INST_ST8_UPDATE, // st8 [op0]=op1,op2 - IA64_INST_ADD, // add op0=op1,op2,op3 - IA64_INST_SUB, // sub op0=op1,op2,op3 - IA64_INST_SHLADD, // shladd op0=op1,op3,op2 - IA64_INST_AND, // and op0=op1,op2 - IA64_INST_ANDCM, // andcm op0=op1,op2 - IA64_INST_OR, // or op0=op1,op2 - IA64_INST_XOR, // xor op0=op1,op2 - IA64_INST_SXT1, // sxt1 op0=op1 - IA64_INST_SXT2, // sxt2 op0=op1 - IA64_INST_SXT4, // sxt4 op0=op1 - IA64_INST_ZXT1, // zxt1 op0=op1 - IA64_INST_ZXT2, // zxt2 op0=op1 - IA64_INST_ZXT4, // zxt4 op0=op1 - IA64_INST_NOP // nop op0 -}; - -const int IA64_N_OPERANDS = 4; - -// Decoded operand type -struct ia64_operand_t { - uint8_t commit; // commit result of operation to register file? - uint8_t valid; // XXX: not really used, can be removed (debug) - int8_t index; // index of GPR, or -1 if immediate value - uint8_t nat; // NaT state before operation - uint64_t value; // register contents or immediate value -}; - -// Decoded instruction type -struct ia64_instruction_t { - uint8_t mnemo; // operation to perform - uint8_t pred; // predicate register to check - uint8_t no_memory; // used to emulated main fault instruction - uint64_t inst; // the raw instruction bits (41-bit wide) - ia64_operand_t operands[IA64_N_OPERANDS]; -}; - -// Get immediate sign-bit -static inline int ia64_inst_get_sbit(uint64_t inst) -{ - return (inst >> 36) & 1; -} +// SIGSEGV recovery supported ? +#if defined(SIGSEGV_ALL_SIGNALS) && defined(SIGSEGV_FAULT_HANDLER_ARGLIST) && defined(SIGSEGV_FAULT_ADDRESS) +#define HAVE_SIGSEGV_RECOVERY +#endif -// Get 8-bit immediate value (A3, A8, I27, M30) -static inline uint64_t ia64_inst_get_imm8(uint64_t inst) -{ - uint64_t value = (inst >> 13) & 0x7full; - if (ia64_inst_get_sbit(inst)) - value |= ~0x7full; - return value; -} -// Get 9-bit immediate value (M3) -static inline uint64_t ia64_inst_get_imm9b(uint64_t inst) -{ - uint64_t value = (((inst >> 27) & 1) << 7) | ((inst >> 13) & 0x7f); - if (ia64_inst_get_sbit(inst)) - value |= ~0xffull; - return value; -} +/* + * SIGSEGV global handler + */ -// Get 9-bit immediate value (M5) -static inline uint64_t ia64_inst_get_imm9a(uint64_t inst) -{ - uint64_t value = (((inst >> 27) & 1) << 7) | ((inst >> 6) & 0x7f); - if (ia64_inst_get_sbit(inst)) - value |= ~0xffull; - return value; -} +#ifdef HAVE_MACH_EXCEPTIONS -// Get 14-bit immediate value (A4) -static inline uint64_t ia64_inst_get_imm14(uint64_t inst) -{ - uint64_t value = (((inst >> 27) & 0x3f) << 7) | (inst & 0x7f); - if (ia64_inst_get_sbit(inst)) - value |= ~0x1ffull; - return value; -} -// Get 22-bit immediate value (A5) -static inline uint64_t ia64_inst_get_imm22(uint64_t inst) +static void mach_get_thread_state(sigsegv_info_t *SIP) { - uint64_t value = ((((inst >> 22) & 0x1f) << 16) | - (((inst >> 27) & 0x1ff) << 7) | - (inst & 0x7f)); - if (ia64_inst_get_sbit(inst)) - value |= ~0x1fffffull; - return value; + SIP->thr_state_count = SIGSEGV_THREAD_STATE_COUNT; + kern_return_t krc = thread_get_state(SIP->thread, + SIGSEGV_THREAD_STATE_FLAVOR, + (natural_t *)&SIP->thr_state, + &SIP->thr_state_count); + MACH_CHECK_ERROR(thread_get_state, krc); + SIP->has_thr_state = true; } -// Get 21-bit immediate value (I19) -static inline uint64_t ia64_inst_get_imm21(uint64_t inst) +static void mach_set_thread_state(sigsegv_info_t *SIP) { - return (((inst >> 36) & 1) << 20) | ((inst >> 6) & 0xfffff); + kern_return_t krc = thread_set_state(SIP->thread, + SIGSEGV_THREAD_STATE_FLAVOR, + (natural_t *)&SIP->thr_state, + SIP->thr_state_count); + MACH_CHECK_ERROR(thread_set_state, krc); } +#endif -// Get 2-bit count value (A2) -static inline int ia64_inst_get_count2(uint64_t inst) +// Return the address of the invalid memory reference +sigsegv_address_t sigsegv_get_fault_address(sigsegv_info_t *SIP) { - return (inst >> 27) & 0x3; + return SIP->addr; } -// Get bundle template -static inline unsigned int ia64_get_template(uint64_t ip) +// Return the address of the instruction that caused the fault, or +// SIGSEGV_INVALID_ADDRESS if we could not retrieve this information +sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) { - ia64_bundle_t bundle; - ia64_load_bundle(bundle, ip); - return bundle[0] & 0x1f; + return SIP->pc; } -// Get specified instruction in bundle -static uint64_t ia64_get_instruction(uint64_t ip, int slot) +// This function handles the badaccess to memory. +// It is called from the signal handler or the exception handler. +static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) { - uint64_t inst; - ia64_bundle_t bundle; - ia64_load_bundle(bundle, ip); -#if DEBUG - printf("Bundle: %016llx%016llx\n", bundle[1], bundle[0]); + sigsegv_info_t SI; + SI.addr = (sigsegv_address_t)SIGSEGV_FAULT_ADDRESS_FAST; + SI.pc = (sigsegv_address_t)SIGSEGV_FAULT_INSTRUCTION_FAST; +#ifdef HAVE_MACH_EXCEPTIONS + SI.thread = thread; + SI.has_exc_state = false; + SI.has_thr_state = false; #endif - - switch (slot) { - case 0: - inst = (bundle[0] >> 5) & 0x1ffffffffffull; - break; - case 1: - inst = ((bundle[1] & 0x7fffffull) << 18) | ((bundle[0] >> 46) & 0x3ffffull); - break; - case 2: - inst = (bundle[1] >> 23) & 0x1ffffffffffull; - break; - case 3: - fprintf(stderr, "ERROR: ia64_get_instruction(), invalid slot number %d\n", slot); - abort(); - break; - } - -#if DEBUG - printf(" Instruction %d: 0x%016llx\n", slot, inst); -#endif - return inst; -} - -// Decode group 0 instructions -static bool ia64_decode_instruction_0(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - const int r1 = (inst->inst >> 6) & 0x7f; - const int r3 = (inst->inst >> 20) & 0x7f; - - const int x3 = (inst->inst >> 33) & 0x07; - const int x6 = (inst->inst >> 27) & 0x3f; - const int x2 = (inst->inst >> 31) & 0x03; - const int x4 = (inst->inst >> 27) & 0x0f; - - if (x3 == 0) { - switch (x6) { - case 0x01: // nop.i (I19) - inst->mnemo = IA64_INST_NOP; - inst->operands[0].valid = true; - inst->operands[0].index = -1; - inst->operands[0].value = ia64_inst_get_imm21(inst->inst); - return true; - case 0x14: // sxt1 (I29) - case 0x15: // sxt2 (I29) - case 0x16: // sxt4 (I29) - case 0x10: // zxt1 (I29) - case 0x11: // zxt2 (I29) - case 0x12: // zxt4 (I29) - switch (x6) { - case 0x14: inst->mnemo = IA64_INST_SXT1; break; - case 0x15: inst->mnemo = IA64_INST_SXT2; break; - case 0x16: inst->mnemo = IA64_INST_SXT4; break; - case 0x10: inst->mnemo = IA64_INST_ZXT1; break; - case 0x11: inst->mnemo = IA64_INST_ZXT2; break; - case 0x12: inst->mnemo = IA64_INST_ZXT4; break; - default: abort(); - } - inst->operands[0].valid = true; - inst->operands[0].index = r1; - inst->operands[1].valid = true; - inst->operands[1].index = r3; - inst->operands[1].value = IA64_GET_GR(r3); - inst->operands[1].nat = IA64_GET_NAT(r3); - return true; - } - } - return false; -} - -// Decode group 4 instructions (load/store instructions) -static bool ia64_decode_instruction_4(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - const int r1 = (inst->inst >> 6) & 0x7f; - const int r2 = (inst->inst >> 13) & 0x7f; - const int r3 = (inst->inst >> 20) & 0x7f; - - const int m = (inst->inst >> 36) & 1; - const int x = (inst->inst >> 27) & 1; - const int x6 = (inst->inst >> 30) & 0x3f; - - switch (x6) { - case 0x00: - case 0x01: - case 0x02: - case 0x03: - if (x == 0) { - inst->operands[0].valid = true; - inst->operands[0].index = r1; - inst->operands[1].valid = true; - inst->operands[1].index = r3; - inst->operands[1].value = IA64_GET_GR(r3); - inst->operands[1].nat = IA64_GET_NAT(r3); - if (m == 0) { - switch (x6) { - case 0x00: inst->mnemo = IA64_INST_LD1; break; - case 0x01: inst->mnemo = IA64_INST_LD2; break; - case 0x02: inst->mnemo = IA64_INST_LD4; break; - case 0x03: inst->mnemo = IA64_INST_LD8; break; - } - } - else { - inst->operands[2].valid = true; - inst->operands[2].index = r2; - inst->operands[2].value = IA64_GET_GR(r2); - inst->operands[2].nat = IA64_GET_NAT(r2); - switch (x6) { - case 0x00: inst->mnemo = IA64_INST_LD1_UPDATE; break; - case 0x01: inst->mnemo = IA64_INST_LD2_UPDATE; break; - case 0x02: inst->mnemo = IA64_INST_LD4_UPDATE; break; - case 0x03: inst->mnemo = IA64_INST_LD8_UPDATE; break; - } - } - return true; - } - break; - case 0x30: - case 0x31: - case 0x32: - case 0x33: - if (m == 0 && x == 0) { - inst->operands[0].valid = true; - inst->operands[0].index = r3; - inst->operands[0].value = IA64_GET_GR(r3); - inst->operands[0].nat = IA64_GET_NAT(r3); - inst->operands[1].valid = true; - inst->operands[1].index = r2; - inst->operands[1].value = IA64_GET_GR(r2); - inst->operands[1].nat = IA64_GET_NAT(r2); - switch (x6) { - case 0x30: inst->mnemo = IA64_INST_ST1; break; - case 0x31: inst->mnemo = IA64_INST_ST2; break; - case 0x32: inst->mnemo = IA64_INST_ST4; break; - case 0x33: inst->mnemo = IA64_INST_ST8; break; - } - return true; - } - break; - } - return false; -} - -// Decode group 5 instructions (load/store instructions) -static bool ia64_decode_instruction_5(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - const int r1 = (inst->inst >> 6) & 0x7f; - const int r2 = (inst->inst >> 13) & 0x7f; - const int r3 = (inst->inst >> 20) & 0x7f; - - const int x6 = (inst->inst >> 30) & 0x3f; - - switch (x6) { - case 0x00: - case 0x01: - case 0x02: - case 0x03: - inst->operands[0].valid = true; - inst->operands[0].index = r1; - inst->operands[1].valid = true; - inst->operands[1].index = r3; - inst->operands[1].value = IA64_GET_GR(r3); - inst->operands[1].nat = IA64_GET_NAT(r3); - inst->operands[2].valid = true; - inst->operands[2].index = -1; - inst->operands[2].value = ia64_inst_get_imm9b(inst->inst); - inst->operands[2].nat = 0; - switch (x6) { - case 0x00: inst->mnemo = IA64_INST_LD1_UPDATE; break; - case 0x01: inst->mnemo = IA64_INST_LD2_UPDATE; break; - case 0x02: inst->mnemo = IA64_INST_LD4_UPDATE; break; - case 0x03: inst->mnemo = IA64_INST_LD8_UPDATE; break; - } - return true; - case 0x30: - case 0x31: - case 0x32: - case 0x33: - inst->operands[0].valid = true; - inst->operands[0].index = r3; - inst->operands[0].value = IA64_GET_GR(r3); - inst->operands[0].nat = IA64_GET_NAT(r3); - inst->operands[1].valid = true; - inst->operands[1].index = r2; - inst->operands[1].value = IA64_GET_GR(r2); - inst->operands[1].nat = IA64_GET_NAT(r2); - inst->operands[2].valid = true; - inst->operands[2].index = -1; - inst->operands[2].value = ia64_inst_get_imm9a(inst->inst); - inst->operands[2].nat = 0; - switch (x6) { - case 0x30: inst->mnemo = IA64_INST_ST1_UPDATE; break; - case 0x31: inst->mnemo = IA64_INST_ST2_UPDATE; break; - case 0x32: inst->mnemo = IA64_INST_ST4_UPDATE; break; - case 0x33: inst->mnemo = IA64_INST_ST8_UPDATE; break; - } - return true; - } - return false; -} - -// Decode group 8 instructions (ALU integer) -static bool ia64_decode_instruction_8(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - const int r1 = (inst->inst >> 6) & 0x7f; - const int r2 = (inst->inst >> 13) & 0x7f; - const int r3 = (inst->inst >> 20) & 0x7f; - - const int x2a = (inst->inst >> 34) & 0x3; - const int x2b = (inst->inst >> 27) & 0x3; - const int x4 = (inst->inst >> 29) & 0xf; - const int ve = (inst->inst >> 33) & 0x1; - - // destination register (r1) is always valid in this group - inst->operands[0].valid = true; - inst->operands[0].index = r1; - - // source register (r3) is always valid in this group - inst->operands[2].valid = true; - inst->operands[2].index = r3; - inst->operands[2].value = IA64_GET_GR(r3); - inst->operands[2].nat = IA64_GET_NAT(r3); - - if (x2a == 0 && ve == 0) { - inst->operands[1].valid = true; - inst->operands[1].index = r2; - inst->operands[1].value = IA64_GET_GR(r2); - inst->operands[1].nat = IA64_GET_NAT(r2); - switch (x4) { - case 0x0: // add (A1) - inst->mnemo = IA64_INST_ADD; - inst->operands[3].valid = true; - inst->operands[3].index = -1; - inst->operands[3].value = x2b == 1; - return true; - case 0x1: // add (A1) - inst->mnemo = IA64_INST_SUB; - inst->operands[3].valid = true; - inst->operands[3].index = -1; - inst->operands[3].value = x2b == 0; - return true; - case 0x4: // shladd (A2) - inst->mnemo = IA64_INST_SHLADD; - inst->operands[3].valid = true; - inst->operands[3].index = -1; - inst->operands[3].value = ia64_inst_get_count2(inst->inst); - return true; - case 0x9: - if (x2b == 1) { - inst->mnemo = IA64_INST_SUB; - inst->operands[1].index = -1; - inst->operands[1].value = ia64_inst_get_imm8(inst->inst); - inst->operands[1].nat = 0; - return true; - } - break; - case 0xb: - inst->operands[1].index = -1; - inst->operands[1].value = ia64_inst_get_imm8(inst->inst); - inst->operands[1].nat = 0; - // fall-through - case 0x3: - switch (x2b) { - case 0: inst->mnemo = IA64_INST_AND; break; - case 1: inst->mnemo = IA64_INST_ANDCM; break; - case 2: inst->mnemo = IA64_INST_OR; break; - case 3: inst->mnemo = IA64_INST_XOR; break; - } - return true; - } - } - return false; -} - -// Decode instruction -static bool ia64_decode_instruction(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - const int major = (inst->inst >> 37) & 0xf; - - inst->mnemo = IA64_INST_UNKNOWN; - inst->pred = inst->inst & 0x3f; - memset(&inst->operands[0], 0, sizeof(inst->operands)); - - switch (major) { - case 0x0: return ia64_decode_instruction_0(inst, IA64_CONTEXT); - case 0x4: return ia64_decode_instruction_4(inst, IA64_CONTEXT); - case 0x5: return ia64_decode_instruction_5(inst, IA64_CONTEXT); - case 0x8: return ia64_decode_instruction_8(inst, IA64_CONTEXT); - } - return false; -} - -static bool ia64_emulate_instruction(ia64_instruction_t *inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - // XXX: handle Register NaT Consumption fault? - // XXX: this simple emulator assumes instructions in a bundle - // don't depend on effects of other instructions in the same - // bundle. It probably would be simpler to JIT-generate code to be - // executed natively but probably more costly (inject/extract CPU state) - if (inst->mnemo == IA64_INST_UNKNOWN) - return false; - if (inst->pred && !IA64_GET_PR(inst->pred)) - return true; - - uint8_t nat, nat2; - uint64_t dst, dst2, src1, src2, src3; - - switch (inst->mnemo) { - case IA64_INST_NOP: - break; - case IA64_INST_ADD: - case IA64_INST_SUB: - case IA64_INST_SHLADD: - src3 = inst->operands[3].value; - // fall-through - case IA64_INST_AND: - case IA64_INST_ANDCM: - case IA64_INST_OR: - case IA64_INST_XOR: - src1 = inst->operands[1].value; - src2 = inst->operands[2].value; - switch (inst->mnemo) { - case IA64_INST_ADD: dst = src1 + src2 + src3; break; - case IA64_INST_SUB: dst = src1 - src2 - src3; break; - case IA64_INST_SHLADD: dst = (src1 << src3) + src2; break; - case IA64_INST_AND: dst = src1 & src2; break; - case IA64_INST_ANDCM: dst = src1 &~ src2; break; - case IA64_INST_OR: dst = src1 | src2; break; - case IA64_INST_XOR: dst = src1 ^ src2; break; - } - inst->operands[0].commit = true; - inst->operands[0].value = dst; - inst->operands[0].nat = inst->operands[1].nat | inst->operands[2].nat; - break; - case IA64_INST_SXT1: - case IA64_INST_SXT2: - case IA64_INST_SXT4: - case IA64_INST_ZXT1: - case IA64_INST_ZXT2: - case IA64_INST_ZXT4: - src1 = inst->operands[1].value; - switch (inst->mnemo) { - case IA64_INST_SXT1: dst = (int64_t)(int8_t)src1; break; - case IA64_INST_SXT2: dst = (int64_t)(int16_t)src1; break; - case IA64_INST_SXT4: dst = (int64_t)(int32_t)src1; break; - case IA64_INST_ZXT1: dst = (uint8_t)src1; break; - case IA64_INST_ZXT2: dst = (uint16_t)src1; break; - case IA64_INST_ZXT4: dst = (uint32_t)src1; break; - } - inst->operands[0].commit = true; - inst->operands[0].value = dst; - inst->operands[0].nat = inst->operands[1].nat; - break; - case IA64_INST_LD1_UPDATE: - case IA64_INST_LD2_UPDATE: - case IA64_INST_LD4_UPDATE: - case IA64_INST_LD8_UPDATE: - inst->operands[1].commit = true; - dst2 = inst->operands[1].value + inst->operands[2].value; - nat2 = inst->operands[2].nat ? inst->operands[2].nat : 0; - // fall-through - case IA64_INST_LD1: - case IA64_INST_LD2: - case IA64_INST_LD4: - case IA64_INST_LD8: - src1 = inst->operands[1].value; - if (inst->no_memory) - dst = 0; - else { - switch (inst->mnemo) { - case IA64_INST_LD1: case IA64_INST_LD1_UPDATE: dst = *((uint8_t *)src1); break; - case IA64_INST_LD2: case IA64_INST_LD2_UPDATE: dst = *((uint16_t *)src1); break; - case IA64_INST_LD4: case IA64_INST_LD4_UPDATE: dst = *((uint32_t *)src1); break; - case IA64_INST_LD8: case IA64_INST_LD8_UPDATE: dst = *((uint64_t *)src1); break; - } - } - inst->operands[0].commit = true; - inst->operands[0].value = dst; - inst->operands[0].nat = 0; - inst->operands[1].value = dst2; - inst->operands[1].nat = nat2; - break; - case IA64_INST_ST1_UPDATE: - case IA64_INST_ST2_UPDATE: - case IA64_INST_ST4_UPDATE: - case IA64_INST_ST8_UPDATE: - inst->operands[0].commit = 0; - dst2 = inst->operands[0].value + inst->operands[2].value; - nat2 = inst->operands[2].nat ? inst->operands[2].nat : 0; - // fall-through - case IA64_INST_ST1: - case IA64_INST_ST2: - case IA64_INST_ST4: - case IA64_INST_ST8: - dst = inst->operands[0].value; - src1 = inst->operands[1].value; - if (!inst->no_memory) { - switch (inst->mnemo) { - case IA64_INST_ST1: case IA64_INST_ST1_UPDATE: *((uint8_t *)dst) = src1; break; - case IA64_INST_ST2: case IA64_INST_ST2_UPDATE: *((uint16_t *)dst) = src1; break; - case IA64_INST_ST4: case IA64_INST_ST4_UPDATE: *((uint32_t *)dst) = src1; break; - case IA64_INST_ST8: case IA64_INST_ST8_UPDATE: *((uint64_t *)dst) = src1; break; - } - } - inst->operands[0].value = dst2; - inst->operands[0].nat = nat2; - break; - default: - return false; - } - - for (int i = 0; i < IA64_N_OPERANDS; i++) { - ia64_operand_t const & op = inst->operands[i]; - if (!op.commit) - continue; - if (op.index == -1) - return false; // XXX: internal error - IA64_SET_GR(op.index, op.value, op.nat); - } - return true; -} - -static bool ia64_emulate_instruction(uint64_t raw_inst, IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - ia64_instruction_t inst; - memset(&inst, 0, sizeof(inst)); - inst.inst = raw_inst; - if (!ia64_decode_instruction(&inst, IA64_CONTEXT)) - return false; - return ia64_emulate_instruction(&inst, IA64_CONTEXT); -} - -static bool ia64_skip_instruction(IA64_CONTEXT_TYPE IA64_CONTEXT) -{ - uint64_t ip = IA64_GET_IP(); -#if DEBUG - printf("IP: 0x%016llx\n", ip); -#if 0 - printf(" Template 0x%02x\n", ia64_get_template(ip)); - ia64_get_instruction(ip, 0); - ia64_get_instruction(ip, 1); - ia64_get_instruction(ip, 2); -#endif -#endif - - // Select which decode switch to use - ia64_instruction_t inst; - inst.inst = ia64_get_instruction(ip, ip & 3); - if (!ia64_decode_instruction(&inst, IA64_CONTEXT)) { - fprintf(stderr, "ERROR: ia64_skip_instruction(): could not decode instruction\n"); - return false; - } - - transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; - transfer_size_t transfer_size = SIZE_UNKNOWN; - - switch (inst.mnemo) { - case IA64_INST_LD1: - case IA64_INST_LD2: - case IA64_INST_LD4: - case IA64_INST_LD8: - case IA64_INST_LD1_UPDATE: - case IA64_INST_LD2_UPDATE: - case IA64_INST_LD4_UPDATE: - case IA64_INST_LD8_UPDATE: - transfer_type = SIGSEGV_TRANSFER_LOAD; - break; - case IA64_INST_ST1: - case IA64_INST_ST2: - case IA64_INST_ST4: - case IA64_INST_ST8: - case IA64_INST_ST1_UPDATE: - case IA64_INST_ST2_UPDATE: - case IA64_INST_ST4_UPDATE: - case IA64_INST_ST8_UPDATE: - transfer_type = SIGSEGV_TRANSFER_STORE; - break; - } - - if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { - // Unknown machine code, let it crash. Then patch the decoder - fprintf(stderr, "ERROR: ia64_skip_instruction(): not a load/store instruction\n"); - return false; - } - - switch (inst.mnemo) { - case IA64_INST_LD1: - case IA64_INST_LD1_UPDATE: - case IA64_INST_ST1: - case IA64_INST_ST1_UPDATE: - transfer_size = SIZE_BYTE; - break; - case IA64_INST_LD2: - case IA64_INST_LD2_UPDATE: - case IA64_INST_ST2: - case IA64_INST_ST2_UPDATE: - transfer_size = SIZE_WORD; - break; - case IA64_INST_LD4: - case IA64_INST_LD4_UPDATE: - case IA64_INST_ST4: - case IA64_INST_ST4_UPDATE: - transfer_size = SIZE_LONG; - break; - case IA64_INST_LD8: - case IA64_INST_LD8_UPDATE: - case IA64_INST_ST8: - case IA64_INST_ST8_UPDATE: - transfer_size = SIZE_QUAD; - break; - } - - if (transfer_size == SIZE_UNKNOWN) { - // Unknown machine code, let it crash. Then patch the decoder - fprintf(stderr, "ERROR: ia64_skip_instruction(): unknown transfer size\n"); - return false; - } - - inst.no_memory = true; - if (!ia64_emulate_instruction(&inst, IA64_CONTEXT)) { - fprintf(stderr, "ERROR: ia64_skip_instruction(): could not emulate fault instruction\n"); - return false; - } - - int slot = ip & 3; - bool emulate_next = false; - switch (slot) { - case 0: - switch (ia64_get_template(ip)) { - case 0x2: // MI;I - case 0x3: // MI;I; - emulate_next = true; - slot = 2; - break; - case 0xa: // M;MI - case 0xb: // M;MI; - emulate_next = true; - slot = 1; - break; - } - break; - } - if (emulate_next && !IA64_CAN_PATCH_IP_SLOT) { - while (slot < 3) { - if (!ia64_emulate_instruction(ia64_get_instruction(ip, slot), IA64_CONTEXT)) { - fprintf(stderr, "ERROR: ia64_skip_instruction(): could not emulate instruction\n"); - return false; - } - ++slot; - } - } - -#if IA64_CAN_PATCH_IP_SLOT - if ((slot = ip & 3) < 2) - IA64_SET_IP((ip & ~3ull) + (slot + 1)); - else -#endif - IA64_SET_IP((ip & ~3ull) + 16); -#if DEBUG - printf("IP: 0x%016llx\n", IA64_GET_IP()); -#endif - return true; -} -#endif - -// Decode and skip PPC instruction -#if (defined(powerpc) || defined(__powerpc__) || defined(__ppc__) || defined(__ppc64__)) -static bool powerpc_skip_instruction(unsigned long * nip_p, unsigned long * regs) -{ - instruction_t instr; - powerpc_decode_instruction(&instr, *nip_p, regs); - - if (instr.transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { - // Unknown machine code, let it crash. Then patch the decoder - return false; - } - -#if DEBUG - printf("%08x: %s %s access", *nip_p, - instr.transfer_size == SIZE_BYTE ? "byte" : - instr.transfer_size == SIZE_WORD ? "word" : - instr.transfer_size == SIZE_LONG ? "long" : "quad", - instr.transfer_type == SIGSEGV_TRANSFER_LOAD ? "read" : "write"); - - if (instr.addr_mode == MODE_U || instr.addr_mode == MODE_UX) - printf(" r%d (ra = %08x)\n", instr.ra, instr.addr); - if (instr.transfer_type == SIGSEGV_TRANSFER_LOAD) - printf(" r%d (rd = 0)\n", instr.rd); -#endif - - if (instr.addr_mode == MODE_U || instr.addr_mode == MODE_UX) - regs[instr.ra] = instr.addr; - if (instr.transfer_type == SIGSEGV_TRANSFER_LOAD) - regs[instr.rd] = 0; - - *nip_p += 4; - return true; -} -#endif - -// Decode and skip MIPS instruction -#if (defined(mips) || defined(__mips)) -static bool mips_skip_instruction(greg_t * pc_p, greg_t * regs) -{ - unsigned int * epc = (unsigned int *)(unsigned long)*pc_p; - - if (epc == 0) - return false; - -#if DEBUG - printf("IP: %p [%08x]\n", epc, epc[0]); -#endif - - transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; - transfer_size_t transfer_size = SIZE_LONG; - int direction = 0; - - const unsigned int opcode = epc[0]; - switch (opcode >> 26) { - case 32: // Load Byte - case 36: // Load Byte Unsigned - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_BYTE; - break; - case 33: // Load Halfword - case 37: // Load Halfword Unsigned - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_WORD; - break; - case 35: // Load Word - case 39: // Load Word Unsigned - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - break; - case 34: // Load Word Left - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - direction = -1; - break; - case 38: // Load Word Right - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - direction = 1; - break; - case 55: // Load Doubleword - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - break; - case 26: // Load Doubleword Left - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - direction = -1; - break; - case 27: // Load Doubleword Right - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - direction = 1; - break; - case 40: // Store Byte - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_BYTE; - break; - case 41: // Store Halfword - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_WORD; - break; - case 43: // Store Word - case 42: // Store Word Left - case 46: // Store Word Right - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_LONG; - break; - case 63: // Store Doubleword - case 44: // Store Doubleword Left - case 45: // Store Doubleword Right - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_QUAD; - break; - /* Misc instructions unlikely to be used within CPU emulators */ - case 48: // Load Linked Word - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - break; - case 52: // Load Linked Doubleword - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - break; - case 56: // Store Conditional Word - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_LONG; - break; - case 60: // Store Conditional Doubleword - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_QUAD; - break; - } - - if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { - // Unknown machine code, let it crash. Then patch the decoder - return false; - } - - // Zero target register in case of a load operation - const int reg = (opcode >> 16) & 0x1f; - if (transfer_type == SIGSEGV_TRANSFER_LOAD) { - if (direction == 0) - regs[reg] = 0; - else { - // FIXME: untested code - unsigned long ea = regs[(opcode >> 21) & 0x1f]; - ea += (signed long)(signed int)(signed short)(opcode & 0xffff); - const int offset = ea & (transfer_size == SIZE_LONG ? 3 : 7); - unsigned long value; - if (direction > 0) { - const unsigned long rmask = ~((1L << ((offset + 1) * 8)) - 1); - value = regs[reg] & rmask; - } - else { - const unsigned long lmask = (1L << (offset * 8)) - 1; - value = regs[reg] & lmask; - } - // restore most significant bits - if (transfer_size == SIZE_LONG) - value = (signed long)(signed int)value; - regs[reg] = value; - } - } - -#if DEBUG -#if (defined(_ABIN32) || defined(_ABI64)) - static const char * mips_gpr_names[32] = { - "zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", - "t0", "t1", "t2", "t3", "t4", "t5", "t6", "t7", - "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", - "t8", "t9", "k0", "k1", "gp", "sp", "s8", "ra" - }; -#else - static const char * mips_gpr_names[32] = { - "zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", - "a4", "a5", "a6", "a7", "t0", "t1", "t2", "t3", - "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", - "t8", "t9", "k0", "k1", "gp", "sp", "s8", "ra" - }; -#endif - printf("%s %s register %s\n", - transfer_size == SIZE_BYTE ? "byte" : - transfer_size == SIZE_WORD ? "word" : - transfer_size == SIZE_LONG ? "long" : - transfer_size == SIZE_QUAD ? "quad" : "unknown", - transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", - mips_gpr_names[reg]); -#endif - - *pc_p += 4; - return true; -} -#endif - -// Decode and skip SPARC instruction -#if (defined(sparc) || defined(__sparc__)) -enum { -#if (defined(__sun__)) - SPARC_REG_G1 = REG_G1, - SPARC_REG_O0 = REG_O0, - SPARC_REG_PC = REG_PC, - SPARC_REG_nPC = REG_nPC -#endif -}; -static bool sparc_skip_instruction(unsigned long * regs, gwindows_t * gwins, struct rwindow * rwin) -{ - unsigned int * pc = (unsigned int *)regs[SPARC_REG_PC]; - - if (pc == 0) - return false; - -#if DEBUG - printf("IP: %p [%08x]\n", pc, pc[0]); -#endif - - transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; - transfer_size_t transfer_size = SIZE_LONG; - bool register_pair = false; - - const unsigned int opcode = pc[0]; - if ((opcode >> 30) != 3) - return false; - switch ((opcode >> 19) & 0x3f) { - case 9: // Load Signed Byte - case 1: // Load Unsigned Byte - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_BYTE; - break; - case 10:// Load Signed Halfword - case 2: // Load Unsigned Word - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_WORD; - break; - case 8: // Load Word - case 0: // Load Unsigned Word - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - break; - case 11:// Load Extended Word - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_QUAD; - break; - case 3: // Load Doubleword - transfer_type = SIGSEGV_TRANSFER_LOAD; - transfer_size = SIZE_LONG; - register_pair = true; - break; - case 5: // Store Byte - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_BYTE; - break; - case 6: // Store Halfword - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_WORD; - break; - case 4: // Store Word - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_LONG; - break; - case 14:// Store Extended Word - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_QUAD; - break; - case 7: // Store Doubleword - transfer_type = SIGSEGV_TRANSFER_STORE; - transfer_size = SIZE_LONG; - register_pair = true; - break; - } - - if (transfer_type == SIGSEGV_TRANSFER_UNKNOWN) { - // Unknown machine code, let it crash. Then patch the decoder - return false; - } - - const int reg = (opcode >> 25) & 0x1f; - -#if DEBUG - static const char * reg_names[] = { - "g0", "g1", "g2", "g3", "g4", "g5", "g6", "g7", - "o0", "o1", "o2", "o3", "o4", "o5", "sp", "o7", - "l0", "l1", "l2", "l3", "l4", "l5", "l6", "l7", - "i0", "i1", "i2", "i3", "i4", "i5", "fp", "i7" - }; - printf("%s %s register %s\n", - transfer_size == SIZE_BYTE ? "byte" : - transfer_size == SIZE_WORD ? "word" : - transfer_size == SIZE_LONG ? "long" : - transfer_size == SIZE_QUAD ? "quad" : "unknown", - transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", - reg_names[reg]); -#endif - - // Zero target register in case of a load operation - if (transfer_type == SIGSEGV_TRANSFER_LOAD && reg != 0) { - // FIXME: code to handle local & input registers is not tested - if (reg >= 1 && reg < 8) { - // global registers - regs[reg - 1 + SPARC_REG_G1] = 0; - } - else if (reg >= 8 && reg < 16) { - // output registers - regs[reg - 8 + SPARC_REG_O0] = 0; - } - else if (reg >= 16 && reg < 24) { - // local registers (in register windows) - if (gwins) - gwins->wbuf->rw_local[reg - 16] = 0; - else - rwin->rw_local[reg - 16] = 0; - } - else { - // input registers (in register windows) - if (gwins) - gwins->wbuf->rw_in[reg - 24] = 0; - else - rwin->rw_in[reg - 24] = 0; - } - } - - regs[SPARC_REG_PC] += 4; - regs[SPARC_REG_nPC] += 4; - return true; -} -#endif -#endif - -// Decode and skip ARM instruction -#if (defined(arm) || defined(__arm__)) -enum { -#if (defined(__linux__)) - ARM_REG_PC = 15, - ARM_REG_CPSR = 16 -#endif -}; -static bool arm_skip_instruction(unsigned long * regs) -{ - unsigned int * pc = (unsigned int *)regs[ARM_REG_PC]; - - if (pc == 0) - return false; - -#if DEBUG - printf("IP: %p [%08x]\n", pc, pc[0]); -#endif - - transfer_type_t transfer_type = SIGSEGV_TRANSFER_UNKNOWN; - transfer_size_t transfer_size = SIZE_UNKNOWN; - enum { op_sdt = 1, op_sdth = 2 }; - int op = 0; - - // Handle load/store instructions only - const unsigned int opcode = pc[0]; - switch ((opcode >> 25) & 7) { - case 0: // Halfword and Signed Data Transfer (LDRH, STRH, LDRSB, LDRSH) - op = op_sdth; - // Determine transfer size (S/H bits) - switch ((opcode >> 5) & 3) { - case 0: // SWP instruction - break; - case 1: // Unsigned halfwords - case 3: // Signed halfwords - transfer_size = SIZE_WORD; - break; - case 2: // Signed byte - transfer_size = SIZE_BYTE; - break; - } - break; - case 2: - case 3: // Single Data Transfer (LDR, STR) - op = op_sdt; - // Determine transfer size (B bit) - if (((opcode >> 22) & 1) == 1) - transfer_size = SIZE_BYTE; - else - transfer_size = SIZE_LONG; - break; - default: - // FIXME: support load/store mutliple? - return false; - } - - // Check for invalid transfer size (SWP instruction?) - if (transfer_size == SIZE_UNKNOWN) - return false; - - // Determine transfer type (L bit) - if (((opcode >> 20) & 1) == 1) - transfer_type = SIGSEGV_TRANSFER_LOAD; - else - transfer_type = SIGSEGV_TRANSFER_STORE; - - // Compute offset - int offset; - if (((opcode >> 25) & 1) == 0) { - if (op == op_sdt) - offset = opcode & 0xfff; - else if (op == op_sdth) { - int rm = opcode & 0xf; - if (((opcode >> 22) & 1) == 0) { - // register offset - offset = regs[rm]; - } - else { - // immediate offset - offset = ((opcode >> 4) & 0xf0) | (opcode & 0x0f); - } - } - } - else { - const int rm = opcode & 0xf; - const int sh = (opcode >> 7) & 0x1f; - if (((opcode >> 4) & 1) == 1) { - // we expect only legal load/store instructions - printf("FATAL: invalid shift operand\n"); - return false; - } - const unsigned int v = regs[rm]; - switch ((opcode >> 5) & 3) { - case 0: // logical shift left - offset = sh ? v << sh : v; - break; - case 1: // logical shift right - offset = sh ? v >> sh : 0; - break; - case 2: // arithmetic shift right - if (sh) - offset = ((signed int)v) >> sh; - else - offset = (v & 0x80000000) ? 0xffffffff : 0; - break; - case 3: // rotate right - if (sh) - offset = (v >> sh) | (v << (32 - sh)); - else - offset = (v >> 1) | ((regs[ARM_REG_CPSR] << 2) & 0x80000000); - break; - } - } - if (((opcode >> 23) & 1) == 0) - offset = -offset; - - int rd = (opcode >> 12) & 0xf; - int rn = (opcode >> 16) & 0xf; -#if DEBUG - static const char * reg_names[] = { - "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", - "r9", "r9", "sl", "fp", "ip", "sp", "lr", "pc" - }; - printf("%s %s register %s\n", - transfer_size == SIZE_BYTE ? "byte" : - transfer_size == SIZE_WORD ? "word" : - transfer_size == SIZE_LONG ? "long" : "unknown", - transfer_type == SIGSEGV_TRANSFER_LOAD ? "load to" : "store from", - reg_names[rd]); -#endif - - unsigned int base = regs[rn]; - if (((opcode >> 24) & 1) == 1) - base += offset; - - if (transfer_type == SIGSEGV_TRANSFER_LOAD) - regs[rd] = 0; - - if (((opcode >> 24) & 1) == 0) // post-index addressing - regs[rn] += offset; - else if (((opcode >> 21) & 1) == 1) // write-back address into base - regs[rn] = base; - - regs[ARM_REG_PC] += 4; - return true; -} -#endif - - -// Fallbacks -#ifndef SIGSEGV_FAULT_ADDRESS_FAST -#define SIGSEGV_FAULT_ADDRESS_FAST SIGSEGV_FAULT_ADDRESS -#endif -#ifndef SIGSEGV_FAULT_INSTRUCTION_FAST -#define SIGSEGV_FAULT_INSTRUCTION_FAST SIGSEGV_FAULT_INSTRUCTION -#endif -#ifndef SIGSEGV_FAULT_INSTRUCTION -#define SIGSEGV_FAULT_INSTRUCTION SIGSEGV_INVALID_ADDRESS -#endif -#ifndef SIGSEGV_FAULT_HANDLER_ARGLIST_1 -#define SIGSEGV_FAULT_HANDLER_ARGLIST_1 SIGSEGV_FAULT_HANDLER_ARGLIST -#endif -#ifndef SIGSEGV_FAULT_HANDLER_INVOKE -#define SIGSEGV_FAULT_HANDLER_INVOKE(P) sigsegv_fault_handler(P) -#endif - -// SIGSEGV recovery supported ? -#if defined(SIGSEGV_ALL_SIGNALS) && defined(SIGSEGV_FAULT_HANDLER_ARGLIST) && defined(SIGSEGV_FAULT_ADDRESS) -#define HAVE_SIGSEGV_RECOVERY -#endif - - -/* - * SIGSEGV global handler - */ - -#ifdef HAVE_MACH_EXCEPTIONS -#ifdef EMULATED_PPC -static void mach_get_exception_state(sigsegv_info_t *SIP) -{ - SIP->exc_state_count = SIGSEGV_EXCEPTION_STATE_COUNT; - kern_return_t krc = thread_get_state(SIP->thread, - SIGSEGV_EXCEPTION_STATE_FLAVOR, - (natural_t *)&SIP->exc_state, - &SIP->exc_state_count); - MACH_CHECK_ERROR(thread_get_state, krc); - SIP->has_exc_state = true; -} -#endif - -static void mach_get_thread_state(sigsegv_info_t *SIP) -{ - SIP->thr_state_count = SIGSEGV_THREAD_STATE_COUNT; - kern_return_t krc = thread_get_state(SIP->thread, - SIGSEGV_THREAD_STATE_FLAVOR, - (natural_t *)&SIP->thr_state, - &SIP->thr_state_count); - MACH_CHECK_ERROR(thread_get_state, krc); - SIP->has_thr_state = true; -} - -static void mach_set_thread_state(sigsegv_info_t *SIP) -{ - kern_return_t krc = thread_set_state(SIP->thread, - SIGSEGV_THREAD_STATE_FLAVOR, - (natural_t *)&SIP->thr_state, - SIP->thr_state_count); - MACH_CHECK_ERROR(thread_set_state, krc); -} -#endif - -// Return the address of the invalid memory reference -sigsegv_address_t sigsegv_get_fault_address(sigsegv_info_t *SIP) -{ -#ifdef HAVE_MACH_EXCEPTIONS -#ifdef EMULATED_PPC - static int use_fast_path = -1; - if (use_fast_path != 1 && !SIP->has_exc_state) { - mach_get_exception_state(SIP); - - sigsegv_address_t addr = (sigsegv_address_t)SIGSEGV_FAULT_ADDRESS; - if (use_fast_path < 0) { - const char *machfault = getenv("SIGSEGV_MACH_FAULT"); - if (machfault) { - if (strcmp(machfault, "fast") == 0) - use_fast_path = 1; - else if (strcmp(machfault, "slow") == 0) - use_fast_path = 0; - } - if (use_fast_path < 0) - use_fast_path = addr == SIP->addr; - } - SIP->addr = addr; - } -#endif -#endif - return SIP->addr; -} - -// Return the address of the instruction that caused the fault, or -// SIGSEGV_INVALID_ADDRESS if we could not retrieve this information -sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) -{ -#ifdef HAVE_MACH_EXCEPTIONS -#ifdef EMULATED_PPC - if (!SIP->has_thr_state) { - mach_get_thread_state(SIP); - - SIP->pc = (sigsegv_address_t)SIGSEGV_FAULT_INSTRUCTION; - } -#endif -#endif - return SIP->pc; -} - -// This function handles the badaccess to memory. -// It is called from the signal handler or the exception handler. -static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) -{ - sigsegv_info_t SI; - SI.addr = (sigsegv_address_t)SIGSEGV_FAULT_ADDRESS_FAST; - SI.pc = (sigsegv_address_t)SIGSEGV_FAULT_INSTRUCTION_FAST; -#ifdef HAVE_MACH_EXCEPTIONS - SI.thread = thread; - SI.has_exc_state = false; - SI.has_thr_state = false; -#endif - sigsegv_info_t * const SIP = &SI; + sigsegv_info_t * const SIP = &SI; // Call user's handler and reinstall the global handler, if required switch (SIGSEGV_FAULT_HANDLER_INVOKE(SIP)) { @@ -2907,10 +960,6 @@ static bool sigsegv_do_install_handler(int sig) sigemptyset(&sigsegv_sa.sa_mask); sigsegv_sa.sa_handler = (signal_handler)sigsegv_handler; sigsegv_sa.sa_flags = 0; -#if !EMULATED_68K && defined(__NetBSD__) - sigaddset(&sigsegv_sa.sa_mask, SIGALRM); - sigsegv_sa.sa_flags |= SA_ONSTACK; -#endif return (sigaction(sig, &sigsegv_sa, 0) == 0); #else return (signal(sig, (signal_handler)sigsegv_handler) != SIG_ERR); @@ -3003,95 +1052,6 @@ static bool sigsegv_do_install_handler(sigsegv_fault_handler_t handler) } #endif -#ifdef HAVE_WIN32_EXCEPTIONS -static LONG WINAPI main_exception_filter(EXCEPTION_POINTERS *ExceptionInfo) -{ - if (sigsegv_fault_handler != NULL - && ExceptionInfo->ExceptionRecord->ExceptionCode == EXCEPTION_ACCESS_VIOLATION - && ExceptionInfo->ExceptionRecord->NumberParameters >= 2 - && handle_badaccess(ExceptionInfo)) - return EXCEPTION_CONTINUE_EXECUTION; - - return EXCEPTION_CONTINUE_SEARCH; -} - -#if defined __CYGWIN__ && defined __i386__ -/* In Cygwin programs, SetUnhandledExceptionFilter has no effect because Cygwin - installs a global exception handler. We have to dig deep in order to install - our main_exception_filter. */ - -/* Data structures for the current thread's exception handler chain. - On the x86 Windows uses register fs, offset 0 to point to the current - exception handler; Cygwin mucks with it, so we must do the same... :-/ */ - -/* Magic taken from winsup/cygwin/include/exceptions.h. */ - -struct exception_list { - struct exception_list *prev; - int (*handler) (EXCEPTION_RECORD *, void *, CONTEXT *, void *); -}; -typedef struct exception_list exception_list; - -/* Magic taken from winsup/cygwin/exceptions.cc. */ - -__asm__ (".equ __except_list,0"); - -extern exception_list *_except_list __asm__ ("%fs:__except_list"); - -/* For debugging. _except_list is not otherwise accessible from gdb. */ -static exception_list * -debug_get_except_list () -{ - return _except_list; -} - -/* Cygwin's original exception handler. */ -static int (*cygwin_exception_handler) (EXCEPTION_RECORD *, void *, CONTEXT *, void *); - -/* Our exception handler. */ -static int -libsigsegv_exception_handler (EXCEPTION_RECORD *exception, void *frame, CONTEXT *context, void *dispatch) -{ - EXCEPTION_POINTERS ExceptionInfo; - ExceptionInfo.ExceptionRecord = exception; - ExceptionInfo.ContextRecord = context; - if (main_exception_filter (&ExceptionInfo) == EXCEPTION_CONTINUE_SEARCH) - return cygwin_exception_handler (exception, frame, context, dispatch); - else - return 0; -} - -static void -do_install_main_exception_filter () -{ - /* We cannot insert any handler into the chain, because such handlers - must lie on the stack (?). Instead, we have to replace(!) Cygwin's - global exception handler. */ - cygwin_exception_handler = _except_list->handler; - _except_list->handler = libsigsegv_exception_handler; -} - -#else - -static void -do_install_main_exception_filter () -{ - SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) &main_exception_filter); -} -#endif - -static bool sigsegv_do_install_handler(sigsegv_fault_handler_t handler) -{ - static bool main_exception_filter_installed = false; - if (!main_exception_filter_installed) { - do_install_main_exception_filter(); - main_exception_filter_installed = true; - } - sigsegv_fault_handler = handler; - return true; -} -#endif - bool sigsegv_install_handler(sigsegv_fault_handler_t handler) { #if defined(HAVE_SIGSEGV_RECOVERY) @@ -3102,7 +1062,7 @@ bool sigsegv_install_handler(sigsegv_fault_handler_t handler) if (success) sigsegv_fault_handler = handler; return success; -#elif defined(HAVE_MACH_EXCEPTIONS) || defined(HAVE_WIN32_EXCEPTIONS) +#elif defined(HAVE_MACH_EXCEPTIONS) return sigsegv_do_install_handler(handler); #else // FAIL: no siginfo_t nor sigcontext subterfuge is available @@ -3128,9 +1088,6 @@ void sigsegv_deinstall_handler(void) SIGSEGV_ALL_SIGNALS #undef FAULT_HANDLER #endif -#ifdef HAVE_WIN32_EXCEPTIONS - sigsegv_fault_handler = NULL; -#endif } diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index 19e400fdd..d889291aa 100644 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -498,7 +498,7 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or #else const bool use_sdl_video = false; #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING if (mac_depth == 1 && !use_sdl_video && !visual_format.fullscreen) { // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index 4a5677e16..148a9e6f5 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -26,10 +26,7 @@ #include "sigsegv.h" #include "vm_alloc.h" -#ifdef _WIN32 -#include "util_windows.h" -#endif - + // Glue for SDL and X11 support #ifdef TEST_VOSF_PERFORMANCE #define MONITOR_INIT /* nothing */ @@ -180,10 +177,6 @@ static inline unsigned find_next_page_clear(unsigned page) static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact) #define LOCK_VOSF pthread_mutex_lock(&vosf_lock); #define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock); -#elif defined(_WIN32) -static mutex_t vosf_lock; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF vosf_lock.lock(); -#define UNLOCK_VOSF vosf_lock.unlock(); #elif defined(HAVE_SPINLOCKS) static spinlock_t vosf_lock = SPIN_LOCK_UNLOCKED; // Mutex to protect frame buffer (dirtyPages in fact) #define LOCK_VOSF spin_lock(&vosf_lock) @@ -533,7 +526,7 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) */ #ifndef TEST_VOSF_PERFORMANCE -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) { VIDEO_MODE_INIT; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 005cb727c..0dde455c8 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -27,11 +27,6 @@ #include #endif -#ifdef HAVE_WIN32_VM -#define WIN32_LEAN_AND_MEAN /* avoid including junk */ -#include -#endif - #include #include #include @@ -53,13 +48,8 @@ #endif #endif -#ifdef HAVE_WIN32_VM -/* Windows is either ILP32 or LLP64 */ -typedef UINT_PTR vm_uintptr_t; -#else /* Other systems are sane as they are either ILP32 or LP64 */ typedef unsigned long vm_uintptr_t; -#endif /* We want MAP_32BIT, if available, for SheepShaver and BasiliskII because the emulated target is 32-bit and this helps to allocate @@ -71,11 +61,7 @@ typedef unsigned long vm_uintptr_t; #ifndef MAP_32BIT #define MAP_32BIT 0 #endif -#ifdef __FreeBSD__ -#define FORCE_MAP_32BIT MAP_FIXED -#else #define FORCE_MAP_32BIT MAP_32BIT -#endif #ifndef MAP_ANON #define MAP_ANON 0 #endif @@ -86,10 +72,9 @@ typedef unsigned long vm_uintptr_t; #define MAP_EXTRA_FLAGS (MAP_32BIT) #ifdef HAVE_MMAP_VM -#if (defined(__linux__) && defined(__i386__)) || defined(__FreeBSD__) || HAVE_LINKER_SCRIPT +#if HAVE_LINKER_SCRIPT /* Force a reasonnable address below 0x80000000 on x86 so that we - don't get addresses above when the program is run on AMD64. - NOTE: this is empirically determined on Linux/x86. */ + don't get addresses above when the program is run on AMD64. */ #define MAP_BASE 0x10000000 #else #define MAP_BASE 0x00000000 @@ -127,40 +112,6 @@ static int translate_map_flags(int vm_flags) } #endif -/* Align ADDR and SIZE to 64K boundaries. */ - -#ifdef HAVE_WIN32_VM -static inline LPVOID align_addr_segment(LPVOID addr) -{ - return LPVOID(vm_uintptr_t(addr) & ~vm_uintptr_t(0xFFFF)); -} - -static inline DWORD align_size_segment(LPVOID addr, DWORD size) -{ - return size + ((vm_uintptr_t)addr - (vm_uintptr_t)align_addr_segment(addr)); -} -#endif - -/* Translate generic VM prot flags to host values. */ - -#ifdef HAVE_WIN32_VM -static int translate_prot_flags(int prot_flags) -{ - int prot = PAGE_READWRITE; - if (prot_flags == (VM_PAGE_EXECUTE | VM_PAGE_READ | VM_PAGE_WRITE)) - prot = PAGE_EXECUTE_READWRITE; - else if (prot_flags == (VM_PAGE_EXECUTE | VM_PAGE_READ)) - prot = PAGE_EXECUTE_READ; - else if (prot_flags == (VM_PAGE_READ | VM_PAGE_WRITE)) - prot = PAGE_READWRITE; - else if (prot_flags == VM_PAGE_READ) - prot = PAGE_READONLY; - else if (prot_flags == 0) - prot = PAGE_NOACCESS; - return prot; -} -#endif - /* Translate Mach return codes to POSIX errno values. */ #ifdef HAVE_MACH_VM static int vm_error(kern_return_t ret_code) @@ -193,17 +144,17 @@ int vm_init(void) // On 10.4 and earlier, reset CrashReporter's task signal handler to // avoid having it show up for signals that get handled. -#if defined(__APPLE__) && defined(__MACH__) - struct utsname info; - - if (!uname(&info) && atoi(info.release) <= 8) { - task_set_exception_ports(mach_task_self(), - EXC_MASK_BAD_ACCESS | EXC_MASK_ARITHMETIC, - MACH_PORT_NULL, - EXCEPTION_STATE_IDENTITY, - MACHINE_THREAD_STATE); - } -#endif +// #if defined(__APPLE__) && defined(__MACH__) +// struct utsname info; + +// if (!uname(&info) && atoi(info.release) <= 8) { +// task_set_exception_ports(mach_task_self(), +// EXC_MASK_BAD_ACCESS | EXC_MASK_ARITHMETIC, +// MACH_PORT_NULL, +// EXCEPTION_STATE_IDENTITY, +// MACHINE_THREAD_STATE); +// } +// #endif return 0; } @@ -260,13 +211,6 @@ void * vm_acquire(size_t size, int options) return VM_MAP_FAILED; next_address = (char *)addr + size; -#elif defined(HAVE_WIN32_VM) - int alloc_type = MEM_RESERVE | MEM_COMMIT; - if (options & VM_MAP_WRITE_WATCH) - alloc_type |= MEM_WRITE_WATCH; - - if ((addr = VirtualAlloc(NULL, size, alloc_type, PAGE_EXECUTE_READWRITE)) == NULL) - return VM_MAP_FAILED; #else if ((addr = calloc(size, 1)) == 0) return VM_MAP_FAILED; @@ -312,21 +256,6 @@ int vm_acquire_fixed(void * addr, size_t size, int options) if (mmap((caddr_t)addr, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0) == (void *)MAP_FAILED) return -1; -#elif defined(HAVE_WIN32_VM) - // Windows cannot allocate Low Memory - if (addr == NULL) - return -1; - - int alloc_type = MEM_RESERVE | MEM_COMMIT; - if (options & VM_MAP_WRITE_WATCH) - alloc_type |= MEM_WRITE_WATCH; - - // Allocate a possibly offset region to align on 64K boundaries - LPVOID req_addr = align_addr_segment(addr); - DWORD req_size = align_size_segment(addr, size); - LPVOID ret_addr = VirtualAlloc(req_addr, req_size, alloc_type, PAGE_EXECUTE_READWRITE); - if (ret_addr != req_addr) - return -1; #else // Unsupported return -1; @@ -356,14 +285,9 @@ int vm_release(void * addr, size_t size) #ifdef HAVE_MMAP_VM if (munmap((caddr_t)addr, size) != 0) return -1; -#else -#ifdef HAVE_WIN32_VM - if (VirtualFree(align_addr_segment(addr), 0, MEM_RELEASE) == 0) - return -1; #else free(addr); #endif -#endif #endif return 0; @@ -381,17 +305,11 @@ int vm_protect(void * addr, size_t size, int prot) #ifdef HAVE_MMAP_VM int ret_code = mprotect((caddr_t)addr, size, prot); return ret_code == 0 ? 0 : -1; -#else -#ifdef HAVE_WIN32_VM - DWORD old_prot; - int ret_code = VirtualProtect(addr, size, translate_prot_flags(prot), &old_prot); - return ret_code != 0 ? 0 : -1; #else // Unsupported return -1; #endif #endif -#endif } /* Return the addresses of the pages that got modified in the @@ -403,20 +321,7 @@ int vm_get_write_watch(void * addr, size_t size, int options) { #ifdef HAVE_VM_WRITE_WATCH -#ifdef HAVE_WIN32_VM - DWORD flags = 0; - if (options & VM_WRITE_WATCH_RESET) - flags |= WRITE_WATCH_FLAG_RESET; - - ULONG page_size; - ULONG_PTR count = *n_pages; - int ret_code = GetWriteWatch(flags, addr, size, pages, &count, &page_size); - if (ret_code != 0) - return -1; - *n_pages = count; - return 0; -#endif #endif // Unsupported return -1; @@ -428,10 +333,7 @@ int vm_get_write_watch(void * addr, size_t size, int vm_reset_write_watch(void * addr, size_t size) { #ifdef HAVE_VM_WRITE_WATCH -#ifdef HAVE_WIN32_VM - int ret_code = ResetWriteWatch(addr, size); - return ret_code == 0 ? 0 : -1; -#endif + #endif // Unsupported return -1; @@ -441,17 +343,7 @@ int vm_reset_write_watch(void * addr, size_t size) int vm_get_page_size(void) { -#ifdef HAVE_WIN32_VM - static vm_uintptr_t page_size = 0; - if (page_size == 0) { - SYSTEM_INFO si; - GetSystemInfo(&si); - page_size = si.dwAllocationGranularity; - } - return page_size; -#else return getpagesize(); -#endif } #ifdef CONFIGURE_TEST_VM_WRITE_WATCH diff --git a/BasiliskII/src/MacOSX/AudioBackEnd.cpp b/BasiliskII/src/MacOSX/AudioBackEnd.cpp deleted file mode 100644 index 65a8cb5db..000000000 --- a/BasiliskII/src/MacOSX/AudioBackEnd.cpp +++ /dev/null @@ -1,307 +0,0 @@ -/* - * - * This is based on Apple example software AudioBackEnd.cpp - * - * Copyright © 2004 Apple Computer, Inc., All Rights Reserved - * Original Apple code modified by Daniel Sumorok - * - * 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 "AudioBackEnd.h" - -#pragma mark ---Public Methods--- - -AudioBackEnd::AudioBackEnd(int bitsPerSample, int numChannels, int sampleRate): - mBitsPerSample(bitsPerSample), - mSampleRate(sampleRate), - mNumChannels(numChannels), - mCallback(NULL), - mCallbackArg(NULL), - mBufferSizeFrames(0), - mFramesProcessed(0), - mAudioBuffer(NULL), - mAudioBufferWriteIndex(0), - mAudioBufferReadIndex(0), - mBytesPerFrame(0), - mAudioBufferSize(0) { - OSStatus err = noErr; - err = Init(); - if(err) { - fprintf(stderr,"AudioBackEnd ERROR: Cannot Init AudioBackEnd"); - exit(1); - } -} - -AudioBackEnd::~AudioBackEnd() { //clean up - Stop(); - - AUGraphClose(mGraph); - DisposeAUGraph(mGraph); - - if(mAudioBuffer != NULL) { - delete mAudioBuffer; - mAudioBuffer = NULL; - mAudioBufferSize = 0; - } -} - -OSStatus AudioBackEnd::Init() { - OSStatus err = noErr; - - err = SetupGraph(); - checkErr(err); - - err = SetupBuffers(); - checkErr(err); - - err = AUGraphInitialize(mGraph); - checkErr(err); - - return err; -} - -#pragma mark --- Operation--- - -OSStatus AudioBackEnd::Start() -{ - OSStatus err = noErr; - if(!IsRunning()) { - mFramesProcessed = 0; - mAudioBufferWriteIndex = 0; - mAudioBufferReadIndex = 0; - - err = AUGraphStart(mGraph); - } - return err; -} - -OSStatus AudioBackEnd::Stop() { - OSStatus err = noErr; - - if(IsRunning()) { - err = AUGraphStop(mGraph); - } - return err; -} - -Boolean AudioBackEnd::IsRunning() { - OSStatus err = noErr; - Boolean graphRunning; - - err = AUGraphIsRunning(mGraph,&graphRunning); - - return (graphRunning); -} - -#pragma mark - -#pragma mark --Private methods--- -OSStatus AudioBackEnd::SetupGraph() { - OSStatus err = noErr; - AURenderCallbackStruct output; - UInt32 size; - ComponentDescription outDesc; - AudioDeviceID out; - - //Make a New Graph - err = NewAUGraph(&mGraph); - checkErr(err); - - //Open the Graph, AudioUnits are opened but not initialized - err = AUGraphOpen(mGraph); - checkErr(err); - - outDesc.componentType = kAudioUnitType_Output; - outDesc.componentSubType = kAudioUnitSubType_DefaultOutput; - outDesc.componentManufacturer = kAudioUnitManufacturer_Apple; - outDesc.componentFlags = 0; - outDesc.componentFlagsMask = 0; - - ////////////////////////// - ///MAKE NODES - //This creates a node in the graph that is an AudioUnit, using - //the supplied ComponentDescription to find and open that unit - err = AUGraphNewNode(mGraph, &outDesc, 0, NULL, &mOutputNode); - checkErr(err); - - //Get Audio Units from AUGraph node - err = AUGraphGetNodeInfo(mGraph, mOutputNode, NULL, NULL, NULL, &mOutputUnit); - checkErr(err); - - err = AUGraphUpdate(mGraph, NULL); - checkErr(err); - - size = sizeof(AudioDeviceID); - err = AudioHardwareGetProperty(kAudioHardwarePropertyDefaultOutputDevice, - &size, &out); - checkErr(err); - mOutputDevice.Init(out, false); - - //Set the Current Device to the Default Output Unit. - err = AudioUnitSetProperty(mOutputUnit, - kAudioOutputUnitProperty_CurrentDevice, - kAudioUnitScope_Global, - 0, - &out, - sizeof(out)); - checkErr(err); - - output.inputProc = OutputProc; - output.inputProcRefCon = this; - - err = AudioUnitSetProperty(mOutputUnit, - kAudioUnitProperty_SetRenderCallback, - kAudioUnitScope_Input, - 0, - &output, - sizeof(output)); - checkErr(err); - return err; -} - -//Allocate Audio Buffer List(s) to hold the data from input. -OSStatus AudioBackEnd::SetupBuffers() { - OSStatus err = noErr; - UInt32 safetyOffset; - AudioStreamBasicDescription asbd; - UInt32 propertySize; - - propertySize = sizeof(mBufferSizeFrames); - err = AudioUnitGetProperty(mOutputUnit, kAudioDevicePropertyBufferFrameSize, - kAudioUnitScope_Global, 0, &mBufferSizeFrames, - &propertySize); - - propertySize = sizeof(safetyOffset); - safetyOffset = 0; - err = AudioUnitGetProperty(mOutputUnit, kAudioDevicePropertySafetyOffset, - kAudioUnitScope_Global, 0, &safetyOffset, - &propertySize); - - - asbd.mFormatID = 0x6c70636d; // 'lpcm' - asbd.mFormatFlags = (kAudioFormatFlagIsSignedInteger | - kAudioFormatFlagIsBigEndian | - kAudioFormatFlagIsPacked); - asbd.mChannelsPerFrame = mNumChannels; - asbd.mSampleRate = mSampleRate; - - if(asbd.mFormatFlags & kAudioFormatFlagIsSignedInteger) { - asbd.mBitsPerChannel = mBitsPerSample; - } else if(asbd.mFormatFlags & kAudioFormatFlagIsFloat) { - asbd.mBitsPerChannel = 32; - } else { - asbd.mBitsPerChannel = 0; - } - - asbd.mFramesPerPacket = 1; - asbd.mBytesPerFrame = (asbd.mBitsPerChannel / 8) * asbd.mChannelsPerFrame; - asbd.mBytesPerPacket = asbd.mBytesPerFrame * asbd.mFramesPerPacket; - - asbd.mReserved = 0; - - mBytesPerFrame = asbd.mBytesPerFrame; - if((mBytesPerFrame & (mBytesPerFrame - 1)) != 0) { - printf("Audio buffer size must be a power of two!\n"); - return -1; - } - - propertySize = sizeof(asbd); - err = AudioUnitSetProperty(mOutputUnit, kAudioUnitProperty_StreamFormat, - kAudioUnitScope_Input, 0, &asbd, propertySize); - checkErr(err); - - if(mAudioBuffer != NULL) { - delete mAudioBuffer; - mAudioBufferSize = 0; - } - - mAudioBufferSize = mBytesPerFrame * mBufferSizeFrames * 2; - mAudioBuffer = new UInt8[mAudioBufferSize]; - bzero(mAudioBuffer, mAudioBufferSize); - return err; -} - -#pragma mark - -#pragma mark -- IO Procs -- -OSStatus AudioBackEnd::OutputProc(void *inRefCon, - AudioUnitRenderActionFlags *ioActionFlags, - const AudioTimeStamp *TimeStamp, - UInt32 inBusNumber, - UInt32 inNumberFrames, - AudioBufferList * ioData) { - OSStatus err = noErr; - AudioBackEnd *This = (AudioBackEnd *)inRefCon; - UInt8 *dstPtr; - UInt32 bytesToCopy; - UInt32 bytesUntilEnd; - - This->mFramesProcessed += inNumberFrames; - - dstPtr = (UInt8 *)ioData->mBuffers[0].mData; - if(This->mAudioBuffer == NULL) { - bzero(dstPtr, inNumberFrames * This->mBytesPerFrame); - return noErr; - } - - bytesToCopy = inNumberFrames * This->mBytesPerFrame; - bytesUntilEnd = This->mAudioBufferSize - This->mAudioBufferReadIndex; - if(bytesUntilEnd < bytesToCopy) { - memcpy(dstPtr, &This->mAudioBuffer[This->mAudioBufferReadIndex], - bytesUntilEnd); - memcpy(dstPtr, This->mAudioBuffer, bytesToCopy - bytesUntilEnd); - - This->mAudioBufferReadIndex = bytesToCopy - bytesUntilEnd; - } else { - memcpy(dstPtr, &This->mAudioBuffer[This->mAudioBufferReadIndex], - bytesToCopy); - This->mAudioBufferReadIndex += bytesToCopy; - } - - - while(This->mFramesProcessed >= This->mBufferSizeFrames) { - This->mFramesProcessed -= This->mBufferSizeFrames; - if(This->mCallback != NULL) { - This->mCallback(This->mCallbackArg); - } - } - - return err; -} - -void AudioBackEnd::setCallback(playthruCallback func, void *arg) { - mCallback = func; - mCallbackArg = arg; -} - -UInt32 AudioBackEnd::BufferSizeFrames() { - return mBufferSizeFrames; -} - -int AudioBackEnd::sendAudioBuffer(void *buffer, int numFrames) { - UInt8 *dstBuffer; - int totalBytes; - - mAudioBufferWriteIndex += (mAudioBufferSize / 2); - mAudioBufferWriteIndex &= (mAudioBufferSize - 1); - - dstBuffer = &mAudioBuffer[mAudioBufferWriteIndex]; - totalBytes = mBytesPerFrame * numFrames; - memcpy(dstBuffer, buffer, totalBytes); - - dstBuffer += totalBytes; - bzero(dstBuffer, (mBufferSizeFrames * mBytesPerFrame) - totalBytes); - - return numFrames; -} diff --git a/BasiliskII/src/MacOSX/AudioBackEnd.h b/BasiliskII/src/MacOSX/AudioBackEnd.h deleted file mode 100644 index 455d42ffa..000000000 --- a/BasiliskII/src/MacOSX/AudioBackEnd.h +++ /dev/null @@ -1,86 +0,0 @@ -/* - * - * This is based on Apple example software AudioBackEnd.cpp - * - * Copyright © 2004 Apple Computer, Inc., All Rights Reserved - * Original Apple code modified by Daniel Sumorok - * - * 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 __AudioBackEnd_H__ -#define __AudioBackEnd_H__ - -#define checkErr( err) \ -if(err) {\ - OSStatus error = static_cast(err);\ - fprintf(stderr, "AudioBackEnd Error: %ld -> %s: %d\n", error,\ - __FILE__, \ - __LINE__\ - );\ - fflush(stdout);\ -} - -#include -#include -#include -#include -#include "AudioDevice.h" - -typedef void (*playthruCallback)(void *arg); - -class AudioBackEnd { - public: - AudioBackEnd(int bitsPerSample, int numChannels, int sampleRate); - ~AudioBackEnd(); - OSStatus Init(); - OSStatus Start(); - OSStatus Stop(); - Boolean IsRunning(); - void setCallback(playthruCallback func, void *arg); - UInt32 BufferSizeFrames(); - int sendAudioBuffer(void *buffer, int numFrames); - private: - OSStatus SetupGraph(); - OSStatus CallbackSetup(); - OSStatus SetupBuffers(); - - static OSStatus OutputProc(void *inRefCon, - AudioUnitRenderActionFlags *ioActionFlags, - const AudioTimeStamp *inTimeStamp, - UInt32 inBusNumber, - UInt32 inNumberFrames, - AudioBufferList * ioData); - - AudioDevice mOutputDevice; - - AUGraph mGraph; - AUNode mOutputNode; - AudioUnit mOutputUnit; - int mBitsPerSample; - int mSampleRate; - int mNumChannels; - playthruCallback mCallback; - void *mCallbackArg; - UInt32 mBufferSizeFrames; - UInt32 mFramesProcessed; - UInt8 *mAudioBuffer; - UInt32 mAudioBufferWriteIndex; - UInt32 mAudioBufferReadIndex; - UInt32 mBytesPerFrame; - UInt32 mAudioBufferSize; -}; - -#endif //__AudioBackEnd_H__ diff --git a/BasiliskII/src/MacOSX/AudioDevice.cpp b/BasiliskII/src/MacOSX/AudioDevice.cpp deleted file mode 100644 index 9fe065f67..000000000 --- a/BasiliskII/src/MacOSX/AudioDevice.cpp +++ /dev/null @@ -1,97 +0,0 @@ -/* Copyright: © Copyright 2004 Apple Computer, Inc. All rights reserved. - - Disclaimer: IMPORTANT: This Apple software is supplied to you by Apple Computer, Inc. - ("Apple") in consideration of your agreement to the following terms, and your - use, installation, modification or redistribution of this Apple software - constitutes acceptance of these terms. If you do not agree with these terms, - please do not use, install, modify or redistribute this Apple software. - - In consideration of your agreement to abide by the following terms, and subject - to these terms, Apple grants you a personal, non-exclusive license, under AppleÕs - copyrights in this original Apple software (the "Apple Software"), to use, - reproduce, modify and redistribute the Apple Software, with or without - modifications, in source and/or binary forms; provided that if you redistribute - the Apple Software in its entirety and without modifications, you must retain - this notice and the following text and disclaimers in all such redistributions of - the Apple Software. Neither the name, trademarks, service marks or logos of - Apple Computer, Inc. may be used to endorse or promote products derived from the - Apple Software without specific prior written permission from Apple. Except as - expressly stated in this notice, no other rights or licenses, express or implied, - are granted by Apple herein, including but not limited to any patent rights that - may be infringed by your derivative works or by other works in which the Apple - Software may be incorporated. - - The Apple Software is provided by Apple on an "AS IS" basis. APPLE MAKES NO - WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED - WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR - PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN - COMBINATION WITH YOUR PRODUCTS. - - IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR - CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE - GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION - OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT - (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN - ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. -*/ -/*============================================================================= - AudioDevice.cpp - -=============================================================================*/ - -#include "AudioDevice.h" - -void AudioDevice::Init(AudioDeviceID devid, bool isInput) -{ - mID = devid; - mIsInput = isInput; - if (mID == kAudioDeviceUnknown) return; - - UInt32 propsize; - - propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertySafetyOffset, &propsize, &mSafetyOffset)); - - propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); - - propsize = sizeof(AudioStreamBasicDescription); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyStreamFormat, &propsize, &mFormat)); - -} - -void AudioDevice::SetBufferSize(UInt32 size) -{ - UInt32 propsize = sizeof(UInt32); - verify_noerr(AudioDeviceSetProperty(mID, NULL, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, propsize, &size)); - - propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); -} - -int AudioDevice::CountChannels() -{ - OSStatus err; - UInt32 propSize; - int result = 0; - - err = AudioDeviceGetPropertyInfo(mID, 0, mIsInput, kAudioDevicePropertyStreamConfiguration, &propSize, NULL); - if (err) return 0; - - AudioBufferList *buflist = (AudioBufferList *)malloc(propSize); - err = AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyStreamConfiguration, &propSize, buflist); - if (!err) { - for (UInt32 i = 0; i < buflist->mNumberBuffers; ++i) { - result += buflist->mBuffers[i].mNumberChannels; - } - } - free(buflist); - return result; -} - -char * AudioDevice::GetName(char *buf, UInt32 maxlen) -{ - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyDeviceName, &maxlen, buf)); - return buf; -} diff --git a/BasiliskII/src/MacOSX/AudioDevice.h b/BasiliskII/src/MacOSX/AudioDevice.h deleted file mode 100644 index d32be2875..000000000 --- a/BasiliskII/src/MacOSX/AudioDevice.h +++ /dev/null @@ -1,72 +0,0 @@ -/* Copyright: © Copyright 2004 Apple Computer, Inc. All rights reserved. - - Disclaimer: IMPORTANT: This Apple software is supplied to you by Apple Computer, Inc. - ("Apple") in consideration of your agreement to the following terms, and your - use, installation, modification or redistribution of this Apple software - constitutes acceptance of these terms. If you do not agree with these terms, - please do not use, install, modify or redistribute this Apple software. - - In consideration of your agreement to abide by the following terms, and subject - to these terms, Apple grants you a personal, non-exclusive license, under AppleÕs - copyrights in this original Apple software (the "Apple Software"), to use, - reproduce, modify and redistribute the Apple Software, with or without - modifications, in source and/or binary forms; provided that if you redistribute - the Apple Software in its entirety and without modifications, you must retain - this notice and the following text and disclaimers in all such redistributions of - the Apple Software. Neither the name, trademarks, service marks or logos of - Apple Computer, Inc. may be used to endorse or promote products derived from the - Apple Software without specific prior written permission from Apple. Except as - expressly stated in this notice, no other rights or licenses, express or implied, - are granted by Apple herein, including but not limited to any patent rights that - may be infringed by your derivative works or by other works in which the Apple - Software may be incorporated. - - The Apple Software is provided by Apple on an "AS IS" basis. APPLE MAKES NO - WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED - WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR - PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN - COMBINATION WITH YOUR PRODUCTS. - - IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR - CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE - GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION - OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT - (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN - ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. -*/ -/*============================================================================= - AudioDevice.h - -=============================================================================*/ - -#ifndef __AudioDevice_h__ -#define __AudioDevice_h__ - -#include -#include - -class AudioDevice { -public: - AudioDevice() : mID(kAudioDeviceUnknown) { } - AudioDevice(AudioDeviceID devid, bool isInput) { Init(devid, isInput); } - - void Init(AudioDeviceID devid, bool isInput); - - bool Valid() { return mID != kAudioDeviceUnknown; } - - void SetBufferSize(UInt32 size); - - int CountChannels(); - char * GetName(char *buf, UInt32 maxlen); - -public: - AudioDeviceID mID; - bool mIsInput; - UInt32 mSafetyOffset; - UInt32 mBufferSizeFrames; - AudioStreamBasicDescription mFormat; -}; - - -#endif // __AudioDevice_h__ diff --git a/BasiliskII/src/MacOSX/BasiliskII.icns b/BasiliskII/src/MacOSX/BasiliskII.icns deleted file mode 100644 index b26870dd94b59d5f08b0047b5e4a87fc752c8450..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 44909 zcmeHw30zah_wNKyKoC$-aM$+NR$FV`mAZnW1uH^O)VLv_C{cr;f`F2Zkc6-%Y#KHN zR0MGYH!NDMiXv_ZuAqP-Zn)H1t@ge%_a-4B0e|+rKYreOjUNPZ?|jdhGv~~ine*jl zh39I2gz{H8Om_MbA(|1PeEkJK)VJSHq#^yk$0Pl_W8llT@BO>?*!uVG8R*xZG|)e3 zXP|#Z59tfqBf}^IWGI0z)8p`U@~)vN&0XJ=Hp$SKGb!BY-fcr8+H*q*?YN;t|F|Jv z-`(((em}$7GjE6&=id;2P9%uG6>^dCWoC^KypQ00_@?XYZ+QRjQ0nVFe18wOee?_8 zr~H~o6tnx1UlWn}-{#2ty%}1ua`-TWjJK5_y*0!d4x%|4#v#k)#IrsfzIt|He-h>p9v2id=tDGM%92aqeN@GTYxP8# zgvUnacR;QqgO4v}c{1y(*!9L$08mf7DUbx=wt5VDFo!T~%%bOEWL~`?Q6F*>$X7F;)I z^pw#hxG_L)h5QPFI8FC=1Y9tv z>=;NPjndJ1a9YEBI$-<jk2NF|829hbX){dlO{!}E*lla@|iX=}@GLqVpjhPI#zad=}OWl}dWGq?9`~jKi z=_&E|_auXVXmkilg#nBWFGMKJZC^QmC+koY@N!Nh>eieNIYs%I*KiNR;u z;b8g(3~i^3CK*E!O<+ztg*SUjn2uC54Xt8iDWVCkJ1U~dQwH`?L=#gPO&-vQiYB_F z4C082COb!EG>wMfQbZF&=I^M8CQtBpDw;Y=pzl;PGjT`AXsYm3MUypnk0TXMU>-** zoILreaI%^N?^5C9$@f%*lYdh<^@Lf5iYL&Hil;ofT0DIv31;AU8WZfIh$lv0DxPd* z!HmJEZ}2>2Jo%IHWMV#V9{8*0*Z(M>%u#zqKpC4MGYBZNe*Fdt5Y4Ki2pN!p6oERa zLZ}}k6)Nu_Ro;OVs?0m6n~fq~ED%!0OMmDu#ETJ9#0%W79WTh5iWfRUL$%_?=rk&z z;ss_a9r0p=sCY3$$VOMZAU?zk59vrd1&9ikZU|ZH3YPu@Ay{}wAA-S%jSQ_-kz$Ax zk-~-S0$Pg7MW^AO)IDu^fNLOSV zq|7!*86JFO?Mdbugy>Xk$iW!OT!Z?uQD+<*R>({d8>kx<8$$qfFfvDG%Gf~4Tw@41 z#_H2UW967tOa!)7t`z@IeD^0{6^szkUndxoXzXu2u(7Oy;0Fiu;a@Pnz(yq>*31L@ z(`7PPeyY7}z{WOwxEbE(%THI7WvN|+A5RxRuxY-f`P;G9ufO59e!apDp{y<}PVughMbqUKYw=diJqOlyw`0zuN`xm9v_0L{BeEj&u+YiJCF44XwBxJs`vrjt2 z(k{5e^nFfw&Epr3>mStJyZ7QCkpuF~{(|?OynK59UR6c;r7N!w60{tUiE_5WMT_@2 zrEu}tgX+pl=T06k{`Gkwq4&P#K5PJLGT?eAkO-IS@7}n0=9j{~`FjpF7831WKYaA~ z$)i_ka6^~BimMx5K7CMKQFf~6K<>`%+jGfV?$_O`sk&F63b$CkD6fD1(X6>_+#+lSJcXAKSaZeITF=)PUq+qPxx+;jNkh1YP~ zg`-Cg79Kiwb_?8Q_5NnV%lg_|SI!>WzblKn>(}$w?)-UxFnX1pm6?%|nR_T4#gw5( zVMO;2*Up_e^~=HC*>aggz~c$TF^TEfy9VtGiclE!-yX5 z_M~i1h>hTftXsWe+0tb`taTw=VN_f~viu@6i53dOg`(J$eB4BmLEHa(7}4`tjyy>g z70wRu^;zcSwS1*t5JwmpmzXS1O+B}tKo>b&1Acf+Dk&x+gZ9h2FrwG*+qNXeM(~3D zS1$AP@LIll{U(6~3rS5&Pd~JuFizXFiOuE-W49f|lEfM4lz^~)m!B+)7P13a%RQGY z@mjHF14k4SkK1t4QQkfRHL^q7Z({Q!5_5`iD^UizBp|Hb?M{l5goXGsmo8bn#Ea=4 z5+;dD+L8i|*cs^cUIHD&%{YSS)V*hMGhqh09Zq!Joe(SLZ17#~v3QaD(v|Brg-6FH zr=+sexfwLU**yg9O&By|^F*?&qZe_raH`qy_~`IW>sBpwU%1eH>8b#>C^i9P;btAB z&T#~Br~JmXUoy8OMaup3f>Yn}2->-g0K^H4OwK(~fq?`hkku7gWLSuwkLRKV3l=Y1 z9l#NT(%3rujE+p_`DJ2=Jj5G&`VRD?!W)@yMy+19I8x$B27`S0W zQV@~?R?fOmHk-2S?FNj+11urYHBZD|ztU?VWA40#UaJC0DCikcPL9H zy$xD?+MnptL#l%WwvUphndJKT41?+G>PY}6f_sJU%USL2D zM8R7Cd=$QE?TRG}=DPhj&UTuUTN5BC*g35B?(M6m59e-61u0uIv$DsI<&2Bjg^u!w zjyt46NqCq@x~=fS-DjkZoD5ViBrH=m`mITag(Mx&0ZiSH3U}^aGg69)!wVV ze(|@W!u|UX6dpW$#OifEOBimhuCp0Sm^0@r^7LLoBEq49Np&0V~F?d$~}%a;43N06>eTUf!X6V>vZ zqiWF;(Bx(L>4J@2=o*Ki+%i-|6WmMxq+i%y?4chT~-90^#!hl$%l7$QL| z)%F>*eN=w>KzdBLEMwo<+YMksAtcsLZ~PX|olU2^!ho+=qjk3OLSSGTc^Dhw4G@tIBhSvt*+1 zlzbdj*kI5$0D9}<0%Di>g+|D>tf1OrKM=%GO`k*4+N;0qON$nYw;jaMQwpOlCOV&9 zG}o2xLI+E&+8~Hc!jUbZ?7Vw>9eNMizP)krm)ztCVPwwnE42@6NQs?7=gp>Li3`2K zNC{iO@gkMVX4jzxY@mvggIO}MC~jZLt%k;OQd+0$q@p0rV|9=)E;%JVJxXC(5cUe2 z=FXLqdsCxD5lKfb-FsY5nnrKSTvxV>iR&B~5pHCH98?5hq)#eTe09C-SWZ%eC?@sf z_4{BH+_O%v8CXS9Rxro{6+ss10-z!Gy}D~>3%5zd5%F22cb`3`?4kFo8!5|e;qrCd zs6;Faw}Me%RzS1YpyFS*F8`V@j}}MC^U7;qQTDJ1RLWWfvNnUPXsTaQ&=3d8)9a;0 zI}#-k(yaw5Yv?`3vP{8<%hqzBUs=Cgs$tjb*IfE#yC8#{Y0z$v3EpN_eeHC?R%wJJ zDd(8dDzw5`92cWmbC;|P3QsP6DkSutp4tu>K-t4LAocalODA^Aqa$Kd_nxX(I16n( z2sNb7Ua-`Uefm!cL3?|NovxRW0ewVF5QhV!q4NBZ?FkaF%;9rSl$Loti_Ugw=Q?Mx zPxA8^g7#`3JDrLOX!IQ0tIPm)t{t#s07P% z6R-)BKli1irlxF8jEhWdh#-t!uW*>oslHcJn?bt2*ohi(eMaIZ?pSX1M zZVd^+ap{U3AW#6yrDSOYC(xJa?d9pQBs_vJ-Y?22JW+D-YWX!$MGP4#7B6t9q{K$b zG7HaKyK}GhFLH)02Q^&4aaV3Nkhhu0dmBw=&1EP}nBwQ9BR+JFs#>-o^1tdT!X zvUdPy5W=JnKydWm=`FZu!B$yhT-x4KS8jo|NQHXsAd$c>ylC7lF+0G2Z9oVoOd#O1 zFNg`_mqSO6wVmoXW9Cc�c~aVyn}Wo0pF7md8XTWF0E0th!fQr@(S{#?#`8fUwx) zEy*$oe^baNo-i^dE-ofA0n}m*9X)>XPt%<+loZs0Ila?89BzqGG4i}(@Rb?`l+_L} zlk42Y%pjq3a|&M23k0IbxP&BjvR*=54d|6Wc=(tJQ*a-{oJnIr7t2q6zjc_GWzNeF*pzGLgHd#@sQ^!hD&5J z2JLXhcyas6seS3vsCb2svFi{y5+)=X9@LoR6xfZxj)aq;pPrsp23Wt~3=|@gLE^$# z8GwaTT^+1tcWsG@*}RK#G<7T()aC18P*Vl4yw^)lF9evYkds!d=f@QW=fonpp&cHq7?xG(kigUgXI;`;dkh@mv5*fK^}`&D1d@H_T<*( zlY7#n(Fxgb@!%8#IoGfgpjUUjm?wFkyN5u_F_?7)Ss>IE4ykI833-;$oB@r35nB zfr0SE5Wgih9OJ98bT1_qM?8s8bs2d}Dfn#;@FkrXRSS4>_?I8zNc*knlsVy2id_nSOr>hxKQR|d?* z>MdLt;f!!MkL);e`oLCMY@))i_+&RBUKN8VmTgH(=VjZ016wIn}OV}W_14RUZfhrh>Sqot*7CN_Q3NngH>hRLz5oG!O8M3(K z9XQ+7G(n}{aPv__3M}NLBEs|rXft}Ot%K_VfMLUKjwz64>@F&)0N;5JKK0=)B>p_P zRF5ODoYM!C&eWw zW+j0Vql)wyaw5TtL=j<5P4i1uZ;bFHF~n5(KOpBdnRJU{E}{_dFkvTI2eTTv$^-x@ znI|*=K0rU-;hlLd^do&QEPWuYs1P71=P&igvn;u~%>xWSoE_$Qur^7&u(Jq6RK!0c zXR<_T68K65B)M?th8Rp?vfpJE%={47FdKtiVSj7!JDJuQ9*_?yd%8>uc=dID(_ICRKfkr72^UZHE=Xq;sP+_Y5>6J zW0)cs1V|C)FRLNv@7OF&%%WCCU@OoC`r{9&z>h;_IRJSYP9QNX^OXUy0w*hg!1>_; zIQ@aG2{O6DK`?{_fvXZ7j!}k<2g62YgcGz!*frQ*f4HRzU3I+yI_}9bTsN6!2ouhE|N#*{Mh- z;BEi}r-piecwi*3j5jt|N*qpm07SV9>;Ti_Rqmny%J~z3Uc1kSm*9_-jdN*>-?p^8P}9gQ@;_e*fBu-P^Y9K5^~-^FQ9clVG5n>enK| z_&Po&CC?K?NI-Ocm=Po3u*u`XU#{Z4CMpI?6?5S5-~2dB@1@ zHqha6?mv8oyOg{YpQ${<8+QR=ab z*?Uis+wU}F5L*818Cb@sCOPk9WzDPm#R5R-^ssnGf|$qQ3Zhf?oVt#WF8~I*#Ks+Z z|D^uT`9nLl?KpJd4nCepM+U|BA3nk;6`2Pwkh<`(RbE{_oGBIZxO`DU_R$N~cjog#hY8&c{c^KzSRmuLeXgIjX z$LFW7KX_S_!$s&Oc(o5@;3qYgi*mPRA2>@Ml5IupitoRwulfsc>W`OJH9W7*;Q&sT zcMmE~<|a$R;H)!gN73b)r=So3;i0Mlb>2U3xP7J|d)v+<7pk8&lx{=qL(88$tGbS@ z{I06}-jgTgFeHHU*VC$t&@)jOKH)4Vx$y|>1N9j^Si1n{{=?cU$MZ8Y^H1Wl%A8Ep zKBxM{quZrVL`1v48ehDA^B0s$-o3nE`P<%QE*V8HJYCKdP-bb>(dWVfpUaGw`YGL`k?PddtpZ7w^_L-pqm0(E_$} zmo-3{{P2o2ZDz)7`Oc4VAW{k-80%s@HUq6w=HuWFt>s=s*_!YoP>os?C0 z_Ik~u27IUo&5wkZH#XcVDa_uw{y0o`MtL5e>z;XiyFYx^?0B-ptLh5@EO~QYz2h zd-%kev**s9EIP0=V@pzU#;!wWuK`R=aU3AjynJx;!mq`rE|adAhrR=Zhjn+ZoGQ#o zPmF~F`l#5%^zC_j3knYG*_D-^B2UZSd#vQf{b$fVG!CqJv+>!z>z6KHt9tOTzBnHZ z3@vYX*-%qi^2@#*X^GO9=oo22aw;6jXKu?#Pv4rIcktxJ+qF+|YbmrYt$+EjwyL`B zQN!c%&^^dJwDkUqXSkGBv~TCO)XhokL`$e9!E!e+6d&B1yCaLety5<9_MN$V3X4vjzfx6O{}S#?0`Gxx<>SZo zP{urfz6ix2PafU7eXZ>5ug8uaEGR5Ec(~~JsdJYr?$kCkJgX@U-HZ%FbBaq#i*rIV z)at3Ywo27h4T_}h?nTPFs$q5bn4jmb@Ep@rUNt`BZnG>hM!3=2zNyY?cE){bkW3mA zvC-A_ns&jp8@>$1z^IM%aWb8y*RQHq!5wfw;OAtYUZ-iv zuNW#k_D z6P7^(NyrTMvlVDYH=n62>h_XO3X;Y|iZG+9nNakd|fukWYV};c1%{RSxmH;8?<)Kkn74C@Hf&)Y-x-{z?rqOPDd?x z7H%6O5ebEC5nqf%Jh7fgERu+6A~9QJCKPaj*ZaBosEWnkRJ*&&;-ba8K!-S;MdLYu z7Z(YMc~fSn*`|;U>->DjC#j0a-xf^?lEp=dxa+6v(p^ku;Pw&R;Pvac>uCW2?Dg#f z)|3A@@auYZ01v*ptcSPOuUqHu=j%OIz3@E9e?}z0hqKq&?QWs^9Oy2S#fsU1{(fuN zerQb$e1*Xm*N?r1?Q86`ShFxaXtRSi?oW6qbF8SP>hw|yGQe+#FPmjNgsWMo9vopC zM4Duik9|yw)#_FAKrK;dfS+#~iw`g~x9OU->mNew!)4M~N!X^<6B1f3VDqMuIP3j< zQ(0Yo*ZBEEKYe{!tnoh0s@h+yn-PgUiWlNHQP^T_+c?e!<84~M#&-vc<~_Q3mAn5k zSL_X8p+UYA1ufUQjedxfMuSI_C=QI~Melxd!Kb2x+>n5^Hi8yw-$sJb{?d@uvz({0 z$0Hm0AiW{BOfE~0IU=xmHN4;4RiqaLt@oe0rnRED-NZq|MzNTyS<5_^%Kh|LFPOsQ zu=L!fYL&&mpb$ehtX)H2&{}oe$w9q3PMffZ!!jMQLaRRBckwcr6!-*yw|LqomC4Z{ z4y)s$3EGwNzUy2ekVPDTTsd0uNd%{mc1$LUPH=vJCX!yCkNNacJ1u`an`Pl`t5t0OqAUZOJ2oFg|z^2e0Sfj96dh|(f zCfJRl4@i7%huAvJU%Y4$!^w7t-MY<9Gy=J&wrNtvK8iO+spX`^OjT0QgnNXC1 z1*7dfe0@1d3X(Gp^r|aB>BkU(jn%EG&Q&+}_`5^%?ad2419z&XV5#&ta z=Bq`FFd78$5sAZ`&FVk?C-U&0;pw?plOyrthL{Nc#`XSSPGhGLO=Jl&>}b|Fw8t0RtL8s8q|uec&?!bYjZ35NpYH0%vXy>fzG;U79CdDtx_(-I4q+P z<1`2tWQ2AaQKC(`7`h6tR1{P4qLGxLb+Ip2*eF*tFog8MnmmkdY4+HGbr3O(a84$@ zgU$NdX#$C_o0H*y_dWugq1dbr%t6iA8Qt)dWiQu3&!8qP$kx#A8>b1aFf~HRbp{W6 zD(rV{zt<#fkWt-vNVyK$2I-9w${Vdg1g@#-VsMxw#KAFvB4VKzZiAX}Ijr!+=H{!5 z%t6XfxaK$Gf1*ZNH?LzAI9nW0lyQ$cG6(Bmcv#`3jqMIy6c0)co|4%tD@u+owueb- zO589wVIf@u_JTGuw0R%a7e?T4&`JEjVyKxProZvibaOyV(o&{vfcwbv12)Ul!A^?} zLQW9$V4ZXjN(L2lrj(3k%n(yxhIlQ;*5bm}2PC-tsKpT>r^*o}I!Pi538YVw5->GD z#TPM2Pv_W!jiSO}=?dVBMrtufx}LDXfuWl^LZXX8Npv%;zXpq>dwTjHDL4~(`~c~5 zaC1HhX&QUEPC|(idJS}%G(WC2s&Pv|bz64R2z3}lmH5?ICgdDC|#RdeyMQVSsfZ_ZQcR#7wzlJH>NJQWI_ ziZFF}6=lVkr|=r=k{DhwI7;$Lcapqf2U9A2tWNfdx&$+|4p2lEQy{VgVhPa#(l5Qd%rW!@O$qlTJ^5f47ovRCndebc=1GVP*{&)@3#UeEf8J0It_s!7_OV? zf)fO+nW(YW6rv!#7^%Vl`|@}#{);8Hl*2-u1Q;VoZ#d!mL&h~7q;Mn+E{rvx%VHJj z)n>Q`Eyi->A{J}NHJ!W|BS_15TJgikLuOL(qd}3OkjXPh7Hg0uTc+DWrT`{S#!{Vh z8Ka^Z7#n;Wj<@jWslp4Y+I=YI45>Cu9(XII09SHodQco1oNH`%=p@k?!Ty6<=z{=< zNqFLE;?s1OQrP(Ll;ttFWnvAUIhmvH>Lk{Hi{hOgZ0R9K(Z{Ly5+uE)x0--O!*sB1 zEb+8S57tSy0f&JMOGR%-kKv?itC%-v5L;$N?uKA3N+oJ_3Jp1B+WexEgkww%C>R}7 z24B%2SF~(qAOqD?t>n8SCgInWR$0mjYk)PE`KD}4Z!`Ik& zM{GZtTqbIgeaJnb?GBx6A8ZNmHcDd$TMgn*_hqnrhBJKZ%n+v91R%UQ1TWS}0I~+3 zfGH5q9}o(|HMl_C;fxPXi8jEG{Ef)q}ylM`f(w~8v2ZKkX9gG}t$pztP`5m~m= zv}r<0AJ)YavI>C10HuZ9epDw6nGC{fMmRr&^9CKnA)M~92kRmZS>IAqmO0Etok3*E zhdm8-MQ^fE^ESAzR6Q z>eV=V4JQ}=84wIvEVRQ|Z-fq`&9 zH#ML|Qj}#Xj2v@}7A?A zX`};d@uYexcv9;otiopxIG$NdH;3`#ZRy@Dwy)JnC)bOuu%{eG4jQ!bVRQDBxq>~F zHphku1$#eV5zE@!X>8o5@~F&|JgO*{VL#9J@fEOoded#~rS+dksIq7xR7sZoJaXiC zdyZ3Y+wnuDa0~x;X;p!%z2>_wTN%3z=q>-!s{TKtRpoA+Fd=U7)P~GtvY&Kzn)5eYR%yHwU zQxvM|qw$RA?tM`(y9V~DoeC=B)LB5j#06u2K5 zFK)&QLS6!7Z4}xfBM3$AgNL~^=K&#S0kSgM)G`AIwcm@-wC2PgG(H@4-P9uEhbHL0 z2hj}IHRtz`&D>if_Q1no%(~8-y~u0++=cM83#L;$9-@7xMeD&pR+C%f^Gvr@=kuW6 zJY?df#pXfN;JJ!le-e#{hfI5Gb9j&!02zxuiM)e60n1UFx`VugsOzdvrR<>TT-4D* z2VsZCGlH@D>64i{s22cE)xp!DB^m=@&woJBK@mLEQK*BSg9ZqZ@2A#jvqQ+pUoo2Si zh(U+3skHbos012zZ-oYfys(ijG-tt}MIxj(wiWUVspu>%?hC30dF@-FypY~_K#TB# zHiEn_TjRMPH&C>f7R?3qf${jMWp)c0J{z^jE!Zx4rkb3V_|?wC*#q>4JFiYuiOw0Y1R8PfMukxs}E@zCO& zpux~&Bz{%}oM(NLfDEUocqKS2%zkaoDnXTEc-k@fM2sQu>`==A13E+@Lwgl@1o?q# z-)eD3kR0TgU^(>Jv*4kuhChliVD#DCAviS5E;Xlw;69>(2|_ z7}Fwhc z$rjkvJ6+bITEru(0c3GS7rO$UkMSkwWzmdNfkU(NY;8(KJnB83GP`aT#R4%hZKs1f zf#bIGW^L+3JnBZ`>0(R3voWG0kcquEM*^MUpf0_1P$c4!`8eII2zWBa*J5PygBBNp z3>FU^R0#NED-x?2`vE@}!wHc3YH=ROus@}P@<1WsYO#vt0FR+q4# zE^0$O>InL1uo>_(F;Itg%{dHYmn1qU43v4Au@*p;KHvdbTm^C(IHiNCfE9tFuc~~i zWGB$lhk-Uf<9@1h67W=DK3WGQAs(3yQxuQYSqQXrXMh>6EO{uo2V^=OrGt6^)*Ya# zqBlJYgMmSsa}3~F7{+X5(M}h~Km$ibD?ouHPBStA^(2g8(6KLda0$RbO&U@30sI_{ zRbpgD)@*f?22gi^o2ZjBfF}cUOI0V8Q~@+cjJl0$i6DTcgD08m<_F-p%2WeT`78`% zK1_=XfN)10by5Kk4h6*^YA^uc?e8?o{>TzQuIQ}#qm6L)&pL|z@U~`!AD)N70hnnz z3;ZY-CLb`c$}!cRh@k{hR`V54#J~%X%{q(uINOl=yCX)d+IFFlVfJCS(yj7pr&^9x;YvCg*waeq@^{B@BlHK%nlk5 z@KAJ%?{t^mv1LpkJk<*BC=yWYa9+@;vy+j(NoScId$h@aG^*%G!4cl-smunWx$tCM%o%M3E zOW$jh$&s@VbyN^yHJ^|19qB1L%j0-)V`8pR6-UFvky#I2<#5VhbXLRh61T%-^%^+p z1Ak!tqjvFI;V`;t-)I4R>_;EPfOV9*k-}qimAcU_=utZ-^$IuI062qmmbR5% zqocA-D_#id3{)>@RC?ORyrs!hW~ zG7gH6@j$hbG#U)2>^3b`qtQ{Acou3Eqw#|>yhX@pc~cD<9SuX4COcXzKcht)WOlxJ z^%*}b<2&3pVN=x^!5O@TwB>>`e(;8QAFX;bequ(IsSp``*;Hpn@-WmXu*DKHiUgzx ztqL=KYQ~WcfHbmI#}7fs7yXNqX57Re^eEdY1M-OYhFu* zWIZ303wk+e)se}kXXL|4p5ZrX%K9;h)n$H*wPRY%1W;>B^U^W(1dSZf%fxu`DMiT` z7j3%CZ?RmAl0mDM9->k7y$BhaICJ(N%4PKlLtVDCSRY2?0A`_9d06=v4Ns$Z)b)q+ ztyF?-O%Za^sst;aqmeu|4s|mN`P2fi>OmUfQBlac@5WCp{Hi@kL+CctJRJ4ty<*4z zZpqi*)79Q_<{WNP$-gDv|CgVnv6lSAl1XYGi~t{5@bBwi3;b(=|BEeP&^Ed|vx|$J zb%?SiG(Jg1#~uF%-s%@keg;sZHk2`Zt_yrv<^SkwQZWd@uWCdiUro|zTk-q&Q-uD< zUMlIt#i4q7`UVCD`g$~)LLBvJPyd4>&?LQ)qi@jO$k@cBgHbzug#vSN@Batw-!GpO z0RL65>C(=~#Jr1Dj~-tqUT!>IoX=*vGsvs|jrA=ixwDJYnm)AWzZxxzXr=VxCHn1+ zJ9g>Of8dZ2!$rz>KlyucbN6Xg4R__|UKQJdbhEC#2MnJ$eb(IBS3X&;s)0V~KCMbs zUK~=aXjQ#Lza2>L`|X%%bC&rBZ(M&}1^1~x>@)6QVq#*f6w%suwh}uU#vP=8_oL&2 z)uE9|Dan%C%1fX8eYI8h9zDCmhw6RoHRPfKyV};k$kej;w>Hxkt>MWsa(3rtME!I5 zeA^$(H$S+j=nYn9h4E*#mc zln$R4)|Rg)kDok!Qh)Q;)XyXT{Tq1w{`B_oq|YP&?++i||Mkb?%0kKKkq@5`{^76R zA6(e6@pH*1KD>Qibv#Ke{@T+0p#Sgxcyx7d`25e+|G(e8tT~ghPHp~c)BgYc;m@Zx z4o7>A`#k;s`)}-hJ2%pQ_&oC8zkmDuPH_@*@_#;${I~C3H(c2h#u(Z2^T_}GkLUM( zOY?Ue*yZ!cfA->0MPcNUv3=k}kd?2t^#A(DHRrN}oWJj;w*G5N`8D^iAC)bi^o2!x zW$)WI|5jC%?&7!&>u#d9VQN9y%$oXjXG6Wu)Bo!i_6iq{?q%9expxIM+Oq%U zzoxJM`Ma)0`kzUDSwXbd_I1ay;|@M zY17e%Q?d~~Ow_$Et&Qb74AAgCi#8Td{Me_X`rOBEYx#q_X?S0CTg(5v-bWCh*ZT-U z!~2l(kf-fNLBspnI{2ZR8r~P(cKudLQlI;f@_bWyu?@bf&wXvW@KE$kJ@vS^L4TWz zP)j}NGYmhWw($8J!>=K~xoz6w_oiJB`V7%e5Nh&2hx@6^Z}Z%X$5*ZY`E4=Y&1I;` zFK&LVEq+&%-`E!Nn#)j=-~3XW{Qj?el?B?w-pz%mq_^#{i%N}u<*O{9vPoP1ppyRY z__w9mRkHrIzsdriJO34{2Bi&uQ1u?6&%OTn-0MH*HZ;3Rl$!lN_xc~Hlxo8t)cW7H z2k(kLs>}Zz4yZ2wb2xyy{LgUwrM~|{D6I`0PsjM9&oBdM*#9#OfTsMmj{r^i{o33C zH07hMZLL5v`TzOM@(s4Nu>#Hdum8>Gm9N)c*tQBZ>p#t)XHAJ7I>jTJeg`XcD*4|x4*@}n<`#^p4l4U^nEuq1Gp3Q=)dGOZmf7UWCY9{Y^|(PTU=DUy=&s~_+Rcc{_*VqT4&PcTN?Bjx>oO{r z?=kH;lEKX^$d|3O{|ZeYsp6aWKs8?@>Vg%tel$ri7PUv{EM5-RcAzx_F2TS?u^ z*UxLt?c~lI)mvG~qXxjZ7`OE5^dCE)*u28+f`wyxYjBKOl8z8fuf18H(SdJpd&TSR zFYY6Hnc)#o{q;p=@6ii{`{3_FU(}Zu#;%z1byFde8~_j8w6TNL4=zEe2M(kJ%mjv; zdabEt`49p|UB0&S)tHC=I3jfU$u*{0p%Agma=~^&1ep-h=&kpXVQJ}&uf1BO9j;IhfAZ(`;M6(mRDB$^wFKu+c^t< z>~CS%)H^bXza)q~R+a<7`}Q5o;?5hjs+~syNHt+tOy?5l^vb%LvrF&ymI(*;Vw4Iu7)5u1X_1ar}X}dfo@6fIY&*l`b z*5xBTgAQH4nY5U@?ZnL&@BVJmp*Cs0Sx57(eZHTvgr9w?vijEfeQ~}{Ln+^E!nDIJ zChHklemmVidC$I72!3m|39RYHmVTn?wKKIEXt#vBt@zsg#@BCNzkGPREL-F@=DRQZ z_Wk19(T-l+jANH>RGi%_UE?yMulnF)NC-hY1Dd`ucz5SVuT z&!`zoHzn*kcK+I}JGUw>o+&^`x z#KHY6F|y9yV-T7?{BdH(jwbjoBUPZE@&io|ccJIkBkY_PG1s%hCDAd_5+OHe&9Zqv dkN@FIYjb1uX-69w+8eZMhyOBE` -#import "PrefsEditor.h" - -// If the application supports multiple windows, -// ENABLE_MULTIPLE can be defined in config.h - -@interface Controller : NSApplication -{ -#ifdef ENABLE_MULTIPLE - NSMutableArray *emulators; // Array of created Emulators -#endif - IBOutlet Emulator *theEmulator; - IBOutlet PrefsEditor *thePrefsEditor; -} - -- (void) dispatchKeyEvent: (NSEvent *)event - type: (NSEventType)type; -- (void) dispatchEvent: (NSEvent *)event - type: (NSEventType)type; - - -- (IBAction) HelpHowTo: (id)sender; -- (IBAction) HelpToDo: (id)sender; -- (IBAction) HelpVersions: (id)sender; - -#ifdef ENABLE_MULTIPLE -- (IBAction) NewEmulator: (id)sender; -- (IBAction) PauseAll: (id)sender; -- (IBAction) RunAll: (id)sender; -- (IBAction) TerminateAll: (id)sender; -#endif - -- (BOOL) isAnyEmulatorDisplayingSheets; -- (BOOL) isAnyEmulatorRunning; -- (short) emulatorCreatedCount; // If any emulator environments have been setup, count how many - -@end diff --git a/BasiliskII/src/MacOSX/Controller.mm b/BasiliskII/src/MacOSX/Controller.mm deleted file mode 100644 index af4a96e6a..000000000 --- a/BasiliskII/src/MacOSX/Controller.mm +++ /dev/null @@ -1,410 +0,0 @@ -/* - * Controller.m - Simple application window management. - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import "Controller.h" -#import "Emulator.h" - -#import "sysdeps.h" // Types used in Basilisk C++ code - -#import -#import - -#define DEBUG 0 -#import - -#import "misc_macosx.h" -#import "video_macosx.h" - -@implementation Controller - -// -// Standard NSApplication methods that we override -// - -- (id) init -{ -#ifdef ENABLE_MULTIPLE - emulators = [NSMutableArray new]; -#endif - return [super init]; -} - -- (void) dealloc -{ -#ifdef ENABLE_MULTIPLE - [emulators dealloc]; -#endif - [super dealloc]; -} - -- (void) awakeFromNib -{ -#ifdef ENABLE_MULTIPLE - [self NewEmulator: self]; // So the user gets something on screen -#endif - [[NSApplication sharedApplication] - setDelegate: self]; // Enable applicationShouldTerminate -} - -- (void) sendEvent: (NSEvent *)event; -{ - // We can either process the event ourselves, - // or pass it to our superclass for the other UI objects to process - bool passToSuper = false; - - if ( [self isAnyEmulatorDisplayingSheets] || - [[thePrefsEditor window] isVisible] || ! [self isAnyEmulatorRunning] ) - passToSuper = true; - - if ( [[theEmulator screen] isFullScreen] ) - passToSuper = false; - - if ( passToSuper ) - [super sendEvent: event]; // NSApplication default - else - { - NSEventType type = [event type]; - - if ( type == NSKeyUp || type == NSKeyDown || type == NSFlagsChanged ) - [self dispatchKeyEvent: event - type: type]; - else - [self dispatchEvent: event - type: type]; - } -} - -// NSApplication methods which are invoked through delegation - -- (BOOL) applicationShouldTerminateAfterLastWindowClosed: (NSApplication *)app -{ return YES; } - -- (NSApplicationTerminateReply) applicationShouldTerminate: (NSApplication *)app -{ - short count; - const char *stillRunningMessage; - - if ( [thePrefsEditor hasEdited] ) - if ( ChoiceAlert("Preferences have been edited", - "Save changes", "Quit") ) - SavePrefs(); - -// if ( edited ) -// { -// NSString *title = [NSString stringWithCString: getString(STR_WARNING_ALERT_TITLE)], -// *msg = @"Preferences have been edited", -// *def = @"Save changes", -// *alt = @"Quit Application", -// *other = @"Continue"; -// -// switch ( NSRunAlertPanel(title, msg, def, alt, other, nil) ) -// { -// case NSAlertDefault: savePrefs(); -// case NSAlertAlternate: return NSTerminateNow; -// case NSAlertOther: return NSTerminateCancel; -// } -// } - - - if ( [[thePrefsEditor window] isVisible] ) - [[thePrefsEditor window] performClose: self]; - - - count = [self emulatorCreatedCount]; - - if ( count > 0 ) - { - if ( count > 1 ) - stillRunningMessage = "Emulators are still running\nExiting Basilisk may lose data"; - else - stillRunningMessage = "Emulator is still running\nExiting Basilisk may lose data"; - if ( ! ChoiceAlert(stillRunningMessage, "Exit", "Continue") ) - return NSTerminateCancel; // NSTerminateLater? - } - - return NSTerminateNow; -} - - -// Event dispatching, called by sendEvent - -- (void) dispatchKeyEvent: (NSEvent *)event - type: (NSEventType)type -{ - EmulatorView *view; - -#ifdef ENABLE_MULTIPLE - // We need to work out what window's Emulator should receive these messages - - - int tmp; - - for ( tmp = 0; tmp < [emulators count], ++tmp ) - { - theEmulator = [emulators objectAtIndex: tmp]; - view = [theEmulator screen]; - - if ( [ theEmulator isRunning ] && - ( [[theEmulator window] isKeyWindow] || [view isFullScreen] ) ) - break; - } - - if ( tmp < [emulators count] ) // i.e. if we exited the for loop -#else - view = [theEmulator screen]; - - if ( [theEmulator isRunning] && - ( [[theEmulator window] isKeyWindow] || [view isFullScreen] ) ) -#endif - { - D(NSLog(@"Got a key event - %d\n", [event keyCode])); - switch ( type ) - { - case NSKeyUp: - [view keyUp: event]; - break; - case NSKeyDown: - D(NSLog(@"%s - NSKeyDown - %@", __PRETTY_FUNCTION__, event)); - [view keyDown: event]; - break; - case NSFlagsChanged: - [view flagsChanged: event]; - break; - default: - NSLog(@"%s - Sent a non-key event (logic error)", - __PRETTY_FUNCTION__); - [super sendEvent: event]; - } - } - else // No Basilisk window is key (maybe a panel or pane). - [super sendEvent: event]; // Call NSApplication default - -} - -- (void) dispatchEvent: (NSEvent *)event - type: (NSEventType)type -{ - EmulatorView *view; - BOOL fullScreen; - -#ifdef ENABLE_MULTIPLE - // We need to work out what window's Emulator should receive these messages - - - int tmp; - - for ( tmp = 0; tmp < [emulators count], ++tmp ) - { - theEmulator = [emulators objectAtIndex: tmp]; - view = [theEmulator screen]; - fullScreen = [view isFullScreen]; - - if ( [theEmulator isRunning] && - ( fullScreen || [[theEmulator window] isMainWindow] ) ) - break; - } - - if ( tmp < [emulators count] ) // i.e. if we exited the for loop -#else - view = [theEmulator screen]; - fullScreen = [view isFullScreen]; - - if ( [theEmulator isRunning] && - ( fullScreen || [[theEmulator window] isMainWindow] ) ) -#endif - { - if ( fullScreen || [view mouseInView: event] ) - { - switch ( type ) - { - case NSLeftMouseDown: - [view mouseDown: event]; - break; - case NSLeftMouseUp: - [view mouseUp: event]; - break; - case NSLeftMouseDragged: - case NSMouseMoved: - if ( fullScreen ) - [view fullscreenMouseMove]; - else - [view processMouseMove: event]; - break; - default: - [super sendEvent: event]; // NSApplication default - } - return; - } - } - - // Either the pointer is not in the Emulator's screen, no Basilisk window is running, - // or no Basilisk window is main (e.g. there might be a panel or pane up). - // - // We should just be calling NSApp's default sendEvent, but then for some reason - // mouseMoved events are still passed to our EmulatorView, so we filter them out. - - if ( type != NSMouseMoved ) - [super sendEvent: event]; -} - - -// Methods to display documentation: - -- (IBAction) HelpHowTo: (id)sender -{ - NSString *path = [[NSBundle mainBundle] pathForResource: @"HowTo" - ofType: @"html"]; - - if ( ! path ) - InfoSheet(@"Cannot find HowTo.html", [theEmulator window]); - else - if ( ! [[NSWorkspace sharedWorkspace] openFile: path] ) - InfoSheet(@"Cannot open HowTo.html with default app", [theEmulator window]); -} - -- (IBAction) HelpToDo: (id)sender -{ - NSString *path = [[NSBundle mainBundle] pathForResource: @"ToDo" - ofType: @"html"]; - - if ( ! path ) - InfoSheet(@"Cannot find ToDo.html", [theEmulator window]); - else - if ( ! [[NSWorkspace sharedWorkspace] openFile: path - withApplication: @"TextEdit"] ) - InfoSheet(@"Cannot open ToDo.html with TextEdit", [theEmulator window]); -} - -- (IBAction) HelpVersions: (id)sender -{ - NSString *path = [[NSBundle mainBundle] pathForResource: @"Versions" - ofType: @"html"]; - - if ( ! path ) - InfoSheet(@"Cannot find Versions.html", [theEmulator window]); - else - if ( ! [[NSWorkspace sharedWorkspace] openFile: path - withApplication: @"TextEdit"] ) - InfoSheet(@"Cannot open Versions.html with TextEdit", - [theEmulator window]); -} - - -// Menu items which for managing more than one window - -#ifdef ENABLE_MULTIPLE - -- (IBAction) NewEmulator: (id)sender -{ - NSString *title; - - if ( ! [NSBundle loadNibNamed:@"Win512x342" owner:self] ) - { - NSLog(@"%s - LoadNibNamed@Win512x342 failed", __PRETTY_FUNCTION__); - return; - } - - if ( theEmulator == nil) - { - NSLog(@"%s - Newly created emulator's NIB stuff not fully linked?", __PRETTY_FUNCTION__); - return; - } - - [emulators addObject: theEmulator]; - title = [NSString localizedStringWithFormat:@"BasiliskII Emulator %d", [emulators count]]; - [theEmulator -> win setTitle: title]; -} - -- (IBAction) PauseAll: (id)sender -{ - [emulators makeObjectsPerformSelector:@selector(Suspend:) - withObject:self]; -} - -- (IBAction) RunAll: (id)sender -{ - [emulators makeObjectsPerformSelector:@selector(Resume:) - withObject:self]; -} - -- (IBAction) TerminateAll: (id)sender -{ - [emulators makeObjectsPerformSelector:@selector(Terminate:) - withObject:self]; -} - -#endif - -- (BOOL) isAnyEmulatorDisplayingSheets -{ -#ifdef ENABLE_MULTIPLE - int tmp; - - for ( tmp = 0; tmp < [emulators count], ++tmp ) - if ( [[[emulators objectAtIndex: tmp] window] attachedSheet] ) - break; - - if ( tmp < [emulators count] ) // i.e. if we exited the for loop -#else - if ( [[theEmulator window] attachedSheet] ) -#endif - return TRUE; - - return FALSE; -} - -- (BOOL) isAnyEmulatorRunning -{ -#ifdef ENABLE_MULTIPLE - int tmp; - - for ( tmp = 0; tmp < [emulators count], ++tmp ) - if ( [[emulators objectAtIndex: tmp] isRunning] ) - break; - - if ( tmp < [emulators count] ) // i.e. if we exited the for loop -#else - if ( [theEmulator isRunning] ) -#endif - return TRUE; - - return FALSE; -} - -- (short) emulatorCreatedCount -{ - short count = 0; -#ifdef ENABLE_MULTIPLE - int tmp; - - for ( tmp = 0; tmp < [emulators count], ++tmp ) - if ( [[emulators objectAtIndex: tmp] uaeCreated] ) - ++count; -#else - if ( [theEmulator uaeCreated] ) - ++count; -#endif - - return count; -} - -@end diff --git a/BasiliskII/src/MacOSX/Credits.html b/BasiliskII/src/MacOSX/Credits.html deleted file mode 100644 index 29ee57a93..000000000 --- a/BasiliskII/src/MacOSX/Credits.html +++ /dev/null @@ -1,11 +0,0 @@ -Basilisk II is an open source, 68k Mac. emulator. -
-It enables you to run 68k MacOS software on your computer, even if you are using a different operating system (however, you do need a copy of the MacOS and a Macintosh ROM image to use it). -
-The Official Basilisk II Home Page -
- -MacOS X (native windowing) port -
-by Nigel Pearson <nigel@ind.tansu.com.au> - diff --git a/BasiliskII/src/MacOSX/Emulator.h b/BasiliskII/src/MacOSX/Emulator.h deleted file mode 100644 index 761ce55ee..000000000 --- a/BasiliskII/src/MacOSX/Emulator.h +++ /dev/null @@ -1,82 +0,0 @@ -/* - * Emulator.h - Class whose actions are attached GUI widgets in a window, - * used to control a single Basilisk II emulated Macintosh. - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import -#import -#import "EmulatorView.h" -#import "NNThread.h" - -@interface Emulator : NSObject -{ - NNThread *emul; // Run emulThread - NNTimer *RTC, // Invoke RTCinterrupt - *redraw, // Invoke redrawScreen - *tick, // Invoke tickInterrupt - *xPRAM; // Invoke xPRAMbackup - - BOOL uaeCreated, // Has thread created the emulator environment? - running; // Is the emulator currently grinding away? - float redrawDelay; // Seconds until next screen update - - // UI elements that this class changes the state of - - IBOutlet NSProgressIndicator *barberPole; - IBOutlet NSButton *runOrPause; - IBOutlet EmulatorView *screen; - IBOutlet NSSlider *speed; - IBOutlet NSWindow *win; -} - -// The following allow the Controller and PrefsEditor classes to access our internal data - -- (BOOL) isRunning; -- (BOOL) uaeCreated; -- (EmulatorView *) screen; -- (NSSlider *) speed; -- (NSWindow *) window; - -- (void) runUpdate; // Update some UI elements - -- (IBAction) Benchmark: (id)sender; -- (IBAction) Interrupt: (id)sender; -- (IBAction) PowerKey: (id)sender; -- (IBAction) Restart: (id)sender; -- (IBAction) Resume: (id)sender; -- (IBAction) ScreenHideShow:(NSButton *)sender; -- (IBAction) Snapshot: (id)sender; -- (IBAction) SpeedChange: (NSSlider *)sender; -- (IBAction) Suspend: (id)sender; -- (IBAction) Terminate: (id)sender; -- (IBAction) ToggleState: (NSButton *)sender; -- (IBAction) ZapPRAM: (id)sender; - -- (void) createThreads; -- (void) exitThreads; - -- (void) emulThread; // Thread for processor emulator -- (void) RTCinterrupt; // Emulator real time clock update -- (void) redrawScreen; // Draw emulator screen in window -- (void) tickInterrupt; // Draw emulator screen in window -- (void) xPRAMbackup; // PRAM watchdog - -@end diff --git a/BasiliskII/src/MacOSX/Emulator.mm b/BasiliskII/src/MacOSX/Emulator.mm deleted file mode 100644 index 61d191ff9..000000000 --- a/BasiliskII/src/MacOSX/Emulator.mm +++ /dev/null @@ -1,473 +0,0 @@ -/* - * Emulator.mm - Class whose actions are attached to GUI widgets in a window, - * used to control a single Basilisk II emulated Macintosh. - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import "Emulator.h" -#import "EmulatorView.h" - -#import "sysdeps.h" // Types used in Basilisk C++ code - -#import "main_macosx.h" // Prototypes for QuitEmuNoExit() and InitEmulator() -#import "misc_macosx.h" // Some other prototypes -#import "video_macosx.h" // Some window/view globals - -#import "adb.h" -#import "main.h" -#import "prefs.h" -#import "timer.h" - -#undef check // memory.h defines a check macro, - // which may clash with an OS X one on 10.1 or 10.2 -#import "cpu_emulation.h" - -#define DEBUG 0 -#import "debug.h" - -@implementation Emulator - -// NSWindow method, which is invoked via delegation - -- (BOOL) windowShouldClose: (id)sender -{ - if ( uaeCreated ) - { - NSLog(@"windowShouldClose returning NO"); - return NO; // Should initiate poweroff and return NSTerminateLater ? - } - - NSLog(@"windowShouldClose returning YES"); - return YES; -} - -// Default methods - -- (Emulator *) init -{ - int frameSkip; - - self = [super init]; - - running = NO; // Save churn when application loads -// running = YES; - uaeCreated = NO; - - frameSkip = PrefsFindInt32("frameskip"); - if ( frameSkip ) - redrawDelay = frameSkip / 60.0; - else - redrawDelay = 0.0; - - // We do this so that we can work out if we are in full screen mode: - parse_screen_prefs(PrefsFindString("screen")); - - [self createThreads]; - - return self; -} - -- (void) awakeFromNib -{ - the_win = win; // Set global for access by Basilisk C++ code - - - [win setDelegate: self]; // Enable windowShouldClose calling - - // Try to speed up everything - //[win setHasShadow: NO]; // This causes view & window to now be drawn correctly - [win useOptimizedDrawing: YES]; - - [win makeKeyAndOrderFront:self]; - - if ( redrawDelay ) - [speed setFloatValue: 1.0 / redrawDelay]; - else - [speed setFloatValue: 60.0]; - - - if ( runOrPause == nil ) - NSLog(@"%s - runOrPause button pointer is nil!", __PRETTY_FUNCTION__); - - [self runUpdate]; -} - - -// Helpers which other classes use to access our private stuff - -- (BOOL) isRunning { return running; } -- (BOOL) uaeCreated { return uaeCreated; } -- (EmulatorView *) screen { return screen; } -- (NSSlider *) speed { return speed; } -- (NSWindow *) window { return win; } - - -// Update some UI elements - -- (void) runUpdate -{ - if ( running ) - [runOrPause setState: NSOnState]; // Running. Change button label to 'Pause' - else - [runOrPause setState: NSOffState]; // Paused. Change button label to 'Run' - - [win setDocumentEdited: uaeCreated]; // Set the little dimple in the close button -} - - -// Methods invoked by buttons & menu items - -- (IBAction) Benchmark: (id)sender; -{ - BOOL wasRunning = running; - - if ( running ) - [self Suspend: self]; - [screen benchmark]; - if ( wasRunning ) - [self Resume: self]; -} - -#ifdef NIGEL -- (IBAction) EjectCD: (id)sender; -{ - NSString *path; - const char *cdrom = PrefsFindString("cdrom"); - - if ( cdrom ) - { - #include - #define KERNEL - #include - - struct statfs buf; - if ( fsstat(path, &buf) < 0 ) - return; - - path = [NSString stringWithCString: cdrom]; - - [[NSWorkspace sharedWorkspace] unmountAndEjectDeviceAtPath: path]; -// [path release]; - } -} -#endif - -- (IBAction) Interrupt: (id)sender; -{ - WarningSheet (@"Interrupt action not yet supported", win); -} - -- (IBAction) PowerKey: (id)sender; -{ - if ( uaeCreated ) // If Mac has started - { - ADBKeyDown(0x7f); // Send power key, which is also - ADBKeyUp(0x7f); // called ADB_RESET or ADB_POWER - } - else - { - running = YES; // Start emulator - [self runUpdate]; - [self Resume: nil]; - } -} - -- (IBAction) Restart: (id)sender -{ - if ( ! running ) - { - running = YES; // Start emulator - [self runUpdate]; - [self Resume: nil]; - } - - if ( running ) -#ifdef UAE_CPU_HAS_RESET - reset680x0(); -#else - { - uaeCreated = NO; - [redraw suspend]; - NSLog (@"%s - uae_cpu reset not yet supported, will try to fake it", - __PRETTY_FUNCTION__); - - [screen clear]; - [screen display]; - - [emul terminate]; QuitEmuNoExit(); - - - // OK. We have killed & cleaned up. Now, start afresh: - #include - int argc = 0; - char **argv; - - PrefsInit(NULL, argc, argv); - SysInit(); - - emul = [NNThread new]; - [emul perform:@selector(emulThread) of:self]; - [emul start]; - - if ( display_type != DISPLAY_SCREEN ) - [redraw resume]; - } -#endif -} - -- (IBAction) Resume: (id)sender -{ - [RTC resume]; - [emul resume]; - if ( display_type != DISPLAY_SCREEN ) - [redraw resume]; - [tick resume]; - [xPRAM resume]; -} - -- (IBAction) ScreenHideShow: (NSButton *)sender; -{ - WarningSheet(@"Nigel doesn't know how to shrink or grow this window", - @"Maybe you can grab the source code and have a go yourself?", - nil, win); -} - -- (IBAction) Snapshot: (id) sender -{ - if ( screen == nil || uaeCreated == NO ) - WarningSheet(@"The emulator has not yet started.", - @"There is no screen output to snapshot", - nil, win); - else - { - NSData *TIFFdata; - - [self Suspend: self]; - - TIFFdata = [screen TIFFrep]; - if ( TIFFdata == nil ) - NSLog(@"%s - Unable to convert Basilisk screen to a TIFF representation", - __PRETTY_FUNCTION__); - else - { - NSSavePanel *sp = [NSSavePanel savePanel]; - - [sp setRequiredFileType:@"tiff"]; - - if ( [sp runModalForDirectory:NSHomeDirectory() - file:@"B2-screen-snapshot.tiff"] == NSOKButton ) - if ( ! [TIFFdata writeToFile:[sp filename] atomically:YES] ) - NSLog(@"%s - Could not write TIFF data to file @%", - __PRETTY_FUNCTION__, [sp filename]); - - } - if ( running ) - [self Resume: self]; - } -} - -- (IBAction) SpeedChange: (NSSlider *)sender -{ - float frequency = [sender floatValue]; - - [redraw suspend]; - - if ( frequency == 0.0 ) - redrawDelay = 0.0; - else - { - frequencyToTickDelay(frequency); - - redrawDelay = 1.0 / frequency; - - [redraw changeIntervalTo: (int)(redrawDelay * 1e6) - units: NNmicroSeconds]; - if ( running && display_type != DISPLAY_SCREEN ) - [redraw resume]; - } -} - -- (IBAction) Suspend: (id)sender -{ - [RTC suspend]; - [emul suspend]; - [redraw suspend]; - [tick suspend]; - [xPRAM suspend]; -} - -- (IBAction) ToggleState: (NSButton *)sender -{ - running = [sender state]; // State of the toggled NSButton - if ( running ) - [self Resume: nil]; - else - [self Suspend: nil]; -} - -- (IBAction) Terminate: (id)sender; -{ - [self exitThreads]; - [win performClose: self]; -} - -#include - -#define XPRAM_SIZE 256 - -uint8 lastXPRAM[XPRAM_SIZE]; // Copy of PRAM - -- (IBAction) ZapPRAM: (id)sender; -{ - memset(XPRAM, 0, XPRAM_SIZE); - memset(lastXPRAM, 0, XPRAM_SIZE); - ZapPRAM(); -} - -// -// Threads, Timers and stuff to manage them: -// - -- (void) createThreads -{ -#ifdef USE_PTHREADS - // Make UI threadsafe: - [NSThread detachNewThreadSelector:(SEL)"" toTarget:nil withObject:nil]; - //emul = [[NNThread alloc] initWithAutoReleasePool]; -#endif - emul = [NNThread new]; - RTC = [NNTimer new]; - redraw = [[NNTimer alloc] initWithAutoRelPool]; - tick = [NNTimer new]; - xPRAM = [NNTimer new]; - - [emul perform:@selector(emulThread) of:self]; - [RTC repeat:@selector(RTCinterrupt) of:self - every:1 - units:NNseconds]; - [redraw repeat:@selector(redrawScreen) of:self - every:(int)(1000*redrawDelay) - units:NNmilliSeconds]; - [tick repeat:@selector(tickInterrupt) of:self - every:16625 - units:NNmicroSeconds]; - [xPRAM repeat:@selector(xPRAMbackup) of:self - every:60 - units:NNseconds]; - - if ( running ) // Start emulator, then threads in most economical order - { - [emul start]; - [xPRAM start]; - [RTC start]; - if ( display_type != DISPLAY_SCREEN ) - [redraw start]; - [tick start]; - } -} - -- (void) exitThreads -{ - running = NO; - [emul terminate]; [emul release]; emul = nil; - [tick invalidate]; [tick release]; tick = nil; - [redraw invalidate]; [redraw release]; redraw = nil; - [RTC invalidate]; [RTC release]; RTC = nil; - [xPRAM invalidate]; [xPRAM release]; xPRAM = nil; -} - -- (void) emulThread -{ - NSAutoreleasePool *pool = [NSAutoreleasePool new]; - - if ( ! InitEmulator() ) - { - [redraw suspend]; // Stop the barberpole - - ErrorSheet(@"Cannot start Emulator", @"", @"Quit", win); - } - else - { - memcpy(lastXPRAM, XPRAM, XPRAM_SIZE); - - uaeCreated = YES; // Enable timers to access emulated Mac's memory - - while ( screen == nil ) // If we are still loading from Nib? - [NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow: 1.0]]; - - [self runUpdate]; // Set the window close gadget to dimpled - - Start680x0(); // Start 68k and jump to ROM boot routine - - puts ("Emulator exited normally"); - } - - [pool release]; - QuitEmulator(); -} - -- (void) RTCinterrupt -{ - if ( ! uaeCreated ) - return; - - WriteMacInt32 (0x20c, TimerDateTime() ); // Update MacOS time - - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); -} - -- (void) redrawScreen -{ - if ( display_type == DISPLAY_SCREEN ) - { - NSLog(@"We are in fullscreen mode - why was redrawScreen() called?"); - return; - } - [barberPole animate:self]; // wobble the pole - [screen setNeedsDisplay: YES]; // redisplay next time through runLoop - // Or, use a direct method. e.g. - // [screen display] or [screen cgDrawInto: ...]; -} - -#include // For #define INTFLAG_60HZ -#include // For ROMVersion -#include "macos_util_macosx.h" // For HasMacStarted() - -- (void) tickInterrupt -{ - if ( ROMVersion != ROM_VERSION_CLASSIC || HasMacStarted() ) - { - SetInterruptFlag (INTFLAG_60HZ); - TriggerInterrupt (); - } -} - -- (void) xPRAMbackup -{ - if ( uaeCreated && - memcmp(lastXPRAM, XPRAM, XPRAM_SIZE) ) // if PRAM changed from copy - { - memcpy (lastXPRAM, XPRAM, XPRAM_SIZE); // re-copy - SaveXPRAM (); // and save to disk - } -} - -@end diff --git a/BasiliskII/src/MacOSX/EmulatorView.h b/BasiliskII/src/MacOSX/EmulatorView.h deleted file mode 100644 index 9fc152b55..000000000 --- a/BasiliskII/src/MacOSX/EmulatorView.h +++ /dev/null @@ -1,108 +0,0 @@ -/* - * EmulatorView.h - Custom NSView for Basilisk II window input & output - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#ifdef NSBITMAP -#import -#endif - -#import - - -@interface EmulatorView : NSView -{ -#ifdef CGIMAGEREF - CGImageRef cgImgRep; -#endif -#ifdef NSBITMAP - NSBitmapImageRep *bitmap; -#else - void *bitmap; -#endif -#ifdef CGDRAWBITMAP - short bps, spp, bpp; - int bytesPerRow; - BOOL isPlanar, hasAlpha; -#endif - float numBytes; - - short x, y; - - BOOL drawView, // Set when the bitmap is all set up - // and ready to display - fullScreen; // Is this Emulator using the whole screen? - - NSRect displayBox; // Cached dimensions of the screen - - int screen_height; // Height of the screen with the key window -} - -- (void) benchmark; -- (NSData *) TIFFrep; // Used for snapshot function - -// Enable display of, and drawing into, the view -#ifdef NSBITMAP -- (void) readyToDraw: (NSBitmapImageRep *) theBitmap - imageWidth: (short) width - imageHeight: (short) height; -#endif -#ifdef CGIMAGEREF -- (void) readyToDraw: (CGImageRef) image - bitmap: (void *) theBitmap - imageWidth: (short) width - imageHeight: (short) height; -#endif -#ifdef CGDRAWBITMAP -- (void) readyToDraw: (void *) theBitmap - width: (short) width - height: (short) height - bps: (short) bitsPerSample - spp: (short) samplesPerPixel - bpp: (short) bitsPerPixel - bpr: (int) bpr - isPlanar: (BOOL) planar - hasAlpha: (BOOL) alpha; -#endif - -- (void) disableDrawing; -- (void) startedFullScreen: (CGDirectDisplayID) theDisplay; - -- (void) blacken; -- (void) clear; - -- (short) width; -- (short) height; - -- (BOOL) isFullScreen; -- (BOOL) mouseInView: (NSEvent *) event; -- (BOOL) mouseInView; -- (void) fullscreenMouseMove; -- (BOOL) processMouseMove: (NSEvent *) event; - -#ifdef CGDRAWBITMAP -- (void) CGDrawBitmap; -#endif - -#ifdef CGIMAGEREF -void cgDrawInto(NSRect rect, CGImageRef bitmap); -#endif - -@end diff --git a/BasiliskII/src/MacOSX/EmulatorView.mm b/BasiliskII/src/MacOSX/EmulatorView.mm deleted file mode 100644 index cf3004816..000000000 --- a/BasiliskII/src/MacOSX/EmulatorView.mm +++ /dev/null @@ -1,550 +0,0 @@ -/* - * EmulatorView.mm - Custom NSView for Basilisk II windowed graphics output - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import "sysdeps.h" // Types used in Basilisk C++ code, - -#define DEBUG 0 -#import - -#import - -#import "main_macosx.h" // For WarningAlert() et al prototypes -#import "misc_macosx.h" // For InfoSheet() prototype -#import "video_macosx.h" // For init_* globals, and bitmap drawing strategy - -#import "EmulatorView.h" - -@implementation EmulatorView - - -// -// Standard NSView methods that we override -// - -- (id) initWithFrame: (NSRect) frameRect -{ - self = [super initWithFrame: frameRect]; - - output = self; // Set global for access by Basilisk C++ code -// bitmap = nil; // Set by readyToDraw: - drawView = NO; // Disable drawing until later - fullScreen = NO; - - return self; -} - -- (void) awakeFromNib -{ - // Here we store the height of the screen which the app was opened on. - // NSApplication's sendEvent: always uses that screen for its mouse co-ords - screen_height = (int) [[NSScreen mainScreen] frame].size.height; -} - - -// Mouse click in this window. If window is not active, -// should the click be passed to this view? -- (BOOL) acceptsFirstMouse: (NSEvent *) event -{ - return [self mouseInView]; -} - - -// -// Key event processing. -// OS X doesn't send us separate events for the modifier keys -// (shift/control/command), so we need to monitor them separately -// - -#include - -static int prevFlags; - -- (void) flagsChanged: (NSEvent *) event -{ - int flags = [event modifierFlags]; - - if ( (flags & NSAlphaShiftKeyMask) != (prevFlags & NSAlphaShiftKeyMask) ) - if ( flags & NSAlphaShiftKeyMask ) - ADBKeyDown(0x39); // CAPS_LOCK - else - ADBKeyUp(0x39); - - if ( (flags & NSShiftKeyMask) != (prevFlags & NSShiftKeyMask) ) - if ( flags & NSShiftKeyMask ) - ADBKeyDown(0x38); // SHIFT_LEFT - else - ADBKeyUp(0x38); - - if ( (flags & NSControlKeyMask) != (prevFlags & NSControlKeyMask) ) - if ( flags & NSControlKeyMask ) - ADBKeyDown(0x36); // CTL_LEFT - else - ADBKeyUp(0x36); - - if ( (flags & NSAlternateKeyMask) != (prevFlags & NSAlternateKeyMask) ) - if ( flags & NSAlternateKeyMask ) - ADBKeyDown(0x3a); // OPTION_LEFT - else - ADBKeyUp(0x3a); - - if ( (flags & NSCommandKeyMask) != (prevFlags & NSCommandKeyMask) ) - if ( flags & NSCommandKeyMask ) - ADBKeyDown(0x37); // APPLE_LEFT - else - ADBKeyUp(0x37); - - prevFlags = flags; -} - -// -// Windowed mode. We only send mouse/key events -// if the OS X mouse is within the little screen -// -- (BOOL) mouseInView: (NSEvent *) event -{ - NSRect box; - NSPoint loc; - - if ( fullScreen ) - { - box = displayBox; - loc = [NSEvent mouseLocation]; - } - else - { - box = [self frame]; - loc = [event locationInWindow]; - } - - D(NSLog (@"%s - loc.x=%f, loc.y=%f, box.origin.x=%f, box.origin.y=%f, box.size.width=%f, box.size.height=%f", __PRETTY_FUNCTION__, loc.x, loc.y, box.origin.x, box.origin.y, box.size.width, box.size.height)); - return [self mouse: loc inRect: box]; -} - -- (BOOL) mouseInView -{ - NSPoint loc = [[self window] mouseLocationOutsideOfEventStream]; - NSRect box = [self frame]; - D(NSLog (@"%s - loc.x=%f, loc.y=%f, box.origin.x=%f, box.origin.y=%f", - __PRETTY_FUNCTION__, loc.x, loc.y, box.origin.x, box.origin.y)); - return [self mouse: loc inRect: box]; -} - -// -// Custom methods -// - -- (void) benchmark -{ - int i; - float seconds; - NSDate *startDate; - const char *method; - - if ( ! drawView ) - { - WarningSheet (@"The emulator has not been setup yet.", - @"Try to run, then pause the emulator, first.", nil, [self window]); - return; - } - - drawView = NO; - [self lockFocus]; - startDate = [NSDate date]; - for (i = 1; i < 300; ++i ) -#ifdef NSBITMAP - [bitmap draw]; -#endif -#ifdef CGIMAGEREF - cgDrawInto([self bounds], cgImgRep); -#endif -#ifdef CGDRAWBITMAP - [self CGDrawBitmap]; -#endif - seconds = -[startDate timeIntervalSinceNow]; - [self unlockFocus]; - drawView = YES; - -#ifdef NSBITMAP - method = "NSBITMAP"; -#endif -#ifdef CGIMAGEREF - method = "CGIMAGEREF"; -#endif -#ifdef CGDRAWBITMAP - method = "CGDRAWBITMAP"; -#endif - - InfoSheet(@"Ran benchmark (300 screen redraws)", - [NSString stringWithFormat: - @"%.2f seconds, %.3f frames per second (using %s implementation)", - seconds, i/seconds, method], - @"Thanks", [self window]); -} - -// Return a TIFF for a snapshot of the screen image -- (NSData *) TIFFrep -{ -#ifdef NSBITMAP - return [bitmap TIFFRepresentation]; -#else - NSBitmapImageRep *b = [NSBitmapImageRep alloc]; - - b = [b initWithBitmapDataPlanes: (unsigned char **) &bitmap - pixelsWide: x - pixelsHigh: y - #ifdef CGIMAGEREF - bitsPerSample: CGImageGetBitsPerComponent(cgImgRep) - samplesPerPixel: 3 - hasAlpha: NO - isPlanar: NO - colorSpaceName: NSCalibratedRGBColorSpace - bytesPerRow: CGImageGetBytesPerRow(cgImgRep) - bitsPerPixel: CGImageGetBitsPerPixel(cgImgRep)]; - #endif - #ifdef CGDRAWBITMAP - bitsPerSample: bps - samplesPerPixel: spp - hasAlpha: hasAlpha - isPlanar: isPlanar - colorSpaceName: NSCalibratedRGBColorSpace - bytesPerRow: bytesPerRow - bitsPerPixel: bpp]; - #endif - - if ( ! b ) - { - ErrorAlert("Could not allocate an NSBitmapImageRep for the TIFF\nTry setting the emulation to millions of colours?"); - return nil; - } - - return [b TIFFRepresentation]; -#endif -} - -// Enable display of, and drawing into, the view -#ifdef NSBITMAP -- (void) readyToDraw: (NSBitmapImageRep *) theBitmap - imageWidth: (short) width - imageHeight: (short) height -{ - numBytes = [theBitmap bytesPerRow] * height; -#endif -#ifdef CGIMAGEREF -- (void) readyToDraw: (CGImageRef) image - bitmap: (void *) theBitmap - imageWidth: (short) width - imageHeight: (short) height -{ - cgImgRep = image; - numBytes = CGImageGetBytesPerRow(image) * height; -#endif -#ifdef CGDRAWBITMAP -- (void) readyToDraw: (void *) theBitmap - width: (short) width - height: (short) height - bps: (short) bitsPerSample - spp: (short) samplesPerPixel - bpp: (short) bitsPerPixel - bpr: (int) bpr - isPlanar: (BOOL) planar - hasAlpha: (BOOL) alpha -{ - bps = bitsPerSample; - spp = samplesPerPixel; - bpp = bitsPerPixel; - bytesPerRow = bpr; - isPlanar = planar; - hasAlpha = alpha; - numBytes = bpr * height; -#endif - D(NSLog(@"readyToDraw: theBitmap=%lx\n", theBitmap)); - - bitmap = theBitmap; - x = width, y = height; - drawView = YES; - [[self window] setAcceptsMouseMovedEvents: YES]; -// [[self window] setInitialFirstResponder: self]; - [[self window] makeFirstResponder: self]; -} - -- (void) disableDrawing -{ - drawView = NO; -} - -- (void) startedFullScreen: (CGDirectDisplayID) display -{ - CGRect displayBounds = CGDisplayBounds(display); - - fullScreen = YES; - memcpy(&displayBox, &displayBounds, sizeof(displayBox)); -} - -- (short) width -{ - return (short)[self bounds].size.width; -} - -- (short) height -{ - return (short)[self bounds].size.height; -} - -- (BOOL) isFullScreen -{ - return fullScreen; -} - -- (BOOL) isOpaque -{ - return drawView; -} - -- (BOOL) processKeyEvent: (NSEvent *) event -{ - if ( fullScreen || [self acceptsFirstMouse: event] ) - if ( [event isARepeat] ) - return NO; - else - return YES; - - [self interpretKeyEvents:[NSArray arrayWithObject:event]]; - return NO; -} - -- (void) keyDown: (NSEvent *) event -{ - if ( [self processKeyEvent: event] ) - { - int code = [event keyCode]; - - if ( code == 126 ) code = 0x3e; // CURS_UP - if ( code == 125 ) code = 0x3d; // CURS_DOWN - if ( code == 124 ) code = 0x3c; // CURS_RIGHT - if ( code == 123 ) code = 0x3b; // CURS_LEFT - - ADBKeyDown(code); - } -} - -- (void) keyUp: (NSEvent *) event -{ - if ( [self processKeyEvent: event] ) - { - int code = [event keyCode]; - - if ( code == 126 ) code = 0x3e; // CURS_UP - if ( code == 125 ) code = 0x3d; // CURS_DOWN - if ( code == 124 ) code = 0x3c; // CURS_RIGHT - if ( code == 123 ) code = 0x3b; // CURS_LEFT - - ADBKeyUp(code); - } -} - - -- (void) fullscreenMouseMove -{ - NSPoint location = [NSEvent mouseLocation]; - - D(NSLog (@"%s - loc.x=%f, loc.y=%f", - __PRETTY_FUNCTION__, location.x, location.y)); - D(NSLog (@"%s - Sending ADBMouseMoved(%d,%d). (%d-%d)", - __PRETTY_FUNCTION__, (int)location.x, - screen_height - (int)location.y, screen_height, (int)location.y)); - ADBMouseMoved((int)location.x, screen_height - (int)location.y); -} - -static NSPoint mouse; // Previous/current mouse location - -- (BOOL) processMouseMove: (NSEvent *) event -{ - if ( ! drawView ) - { - D(NSLog(@"Unable to process event - Emulator has not started yet")); - return NO; - } - - if ( fullScreen ) - { - [self fullscreenMouseMove]; - return YES; - } - - NSPoint location = [self convertPoint: [event locationInWindow] fromView:nil]; - - D(NSLog (@"%s - loc.x=%f, loc.y=%f", - __PRETTY_FUNCTION__, location.x, location.y)); - - if ( NSEqualPoints(location, mouse) ) - return NO; - - mouse = location; - - int mouseY = y - (int) (y * mouse.y / [self height]); - int mouseX = (int) (x * mouse.x / [self width]); - // If the view was not resizable, then this would be simpler: - // int mouseY = y - (int) mouse.y; - // int mouseX = (int) mouse.x; - - ADBMouseMoved(mouseX, mouseY); - return YES; -} - -- (void) mouseDown: (NSEvent *) event -{ - [self processMouseMove: event]; - ADBMouseDown(0); -} - -- (void) mouseDragged: (NSEvent *) event -{ - [self processMouseMove: event]; -} - -- (void) mouseMoved: (NSEvent *) event -{ -#if DEBUG - if ( ! [self mouseInView] ) - { - NSLog (@"%s - Received event while outside of view", __PRETTY_FUNCTION__); - return; - } -#endif - [self processMouseMove: event]; -} - -- (void) mouseUp: (NSEvent *) event -{ - [self processMouseMove: event]; - ADBMouseUp(0); -} - -#if DEBUG -- (void) randomise // Draw some coloured snow in the bitmap -{ - unsigned char *data, - *pixel; - - #ifdef NSBITMAP - data = [bitmap bitmapData]; - #else - data = bitmap; - #endif - - for ( int i = 0; i < 1000; ++i ) - { - pixel = data + (int) (numBytes * rand() / RAND_MAX); - *pixel = (unsigned char) (256.0 * rand() / RAND_MAX); - } -} -#endif - -- (void) drawRect: (NSRect) rect -{ - if ( ! drawView ) // If the emulator is still being setup, - return; // we do not want to draw - -#if DEBUG - NSLog(@"In drawRect"); - [self randomise]; -#endif - -#ifdef NSBITMAP - NSRectClip(rect); - [bitmap draw]; -#endif -#ifdef CGIMAGEREF - cgDrawInto(rect, cgImgRep); -#endif -#ifdef CGDRAWBITMAP - [self CGDrawBitmap]; -#endif -} - -- (void) setTo: (int) val // Set all of bitmap to val -{ - unsigned char *data - #ifdef NSBITMAP - = [bitmap bitmapData]; - #else - = (unsigned char *) bitmap; - #endif - - memset(data, val, (long unsigned)numBytes); -} - -- (void) blacken // Set bitmap black -{ - [self setTo: 0]; -} - -- (void) clear // Set bitmap white -{ - [self setTo: 0xFF]; -} - -// -// Extra drawing stuff -// - -#ifdef CGDRAWBITMAP -extern "C" void CGDrawBitmap(...); - -- (void) CGDrawBitmap -{ - CGContextRef cgContext = (CGContextRef) [[NSGraphicsContext currentContext] - graphicsPort]; - NSRect rect = [self bounds]; - CGRect cgRect = { - {rect.origin.x, rect.origin.y}, - {rect.size.width, rect.size.height} - }; - - CGColorSpaceRef colourSpace = CGColorSpaceCreateDeviceRGB(); - - -// CGContextSetShouldAntialias(cgContext, NO); // Seems to have no effect? - - CGDrawBitmap(cgContext, cgRect, x, y, bps, spp, bpp, - bytesPerRow, isPlanar, hasAlpha, colourSpace, &bitmap); -} -#endif - -#ifdef CGIMAGEREF -void -cgDrawInto(NSRect rect, CGImageRef cgImgRep) -{ - CGContextRef cgContext = (CGContextRef) [[NSGraphicsContext currentContext] - graphicsPort]; - CGRect cgRect = { - {rect.origin.x, rect.origin.y}, - {rect.size.width, rect.size.height} - }; - -// CGContextSetShouldAntialias(cgContext, NO); // Seems to have no effect? - - CGContextDrawImage(cgContext, cgRect, cgImgRep); -} -#endif - -@end diff --git a/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings b/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings deleted file mode 100755 index fbcc2d402..000000000 --- a/BasiliskII/src/MacOSX/English.lproj/InfoPlist.strings +++ /dev/null @@ -1,3 +0,0 @@ -/* Localized versions of Info.plist keys */ - -NSHumanReadableCopyright = "Copyright © 1997-2006 Christian Bauer et al. Freely distributable under the terms of the GNU GPL."; diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Collapsed.tiff b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Collapsed.tiff deleted file mode 100644 index e4647bbb7671104bc0058766a208c68e3c2aac72..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 870 zcmebEWzb?^U|PdK8L%Zo`xKy_J|I>iLGON`S`c0Z#Cbr>2gHN`Ob?7+2h`vX#4LC; z!qlSE^MQJdftVYMUUap{{GCActt99n#U4`pLrS=j6F=mn11!OULx`7=fq@w)$H>47 zBp8v{Okg%JMw$H>nW5r9#f)rFHWQF72##@}C<6zhC{!G%gHaqN&a{M4ih&huJ_BiRDkn2wa1B1E%1C#~;K3plk diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Expanded.tiff b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/Expanded.tiff deleted file mode 100644 index 819a88f0b74b93e6599b8685a75e65ff98199a98..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 870 zcmc&wu?_)25Ph?YT*wK9NKk2rR_zmxM4|Kv_YE4YO0Q9g=v979;mulXTI0I(5JQP zd6=;odbIwA5(jpq`ZQ`?1Y-`JNsUEOw~SUxX^`I8_wF6Ra8RIJxIEES&{ x=1q4Ys)(fJbvmT|(9K>tD7*cz3+X=drSyWG!(iw9rMt64xPR5_3K%rt;|*=YDZc;! diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/classes.nib b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/classes.nib deleted file mode 100644 index 8d5b001bd..000000000 --- a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/classes.nib +++ /dev/null @@ -1,131 +0,0 @@ -{ - IBClasses = ( - { - ACTIONS = { - HelpHowTo = id; - HelpToDo = id; - HelpVersions = id; - NewEmulator = id; - PauseAll = id; - RunAll = id; - TerminateAll = id; - }; - CLASS = Controller; - LANGUAGE = ObjC; - OUTLETS = {theEmulator = id; thePrefsEditor = id; }; - SUPERCLASS = NSApplication; - }, - { - ACTIONS = { - Benchmark = id; - Interrupt = id; - PowerKey = id; - Restart = id; - Resume = id; - ScreenHideShow = id; - Snapshot = id; - SpeedChange = id; - Suspend = id; - Terminate = id; - ToggleState = id; - ZapPRAM = id; - }; - CLASS = Emulator; - LANGUAGE = ObjC; - OUTLETS = {barberPole = id; runOrPause = id; screen = id; speed = id; win = id; }; - SUPERCLASS = NSObject; - }, - {CLASS = EmulatorView; LANGUAGE = ObjC; SUPERCLASS = NSView; }, - { - ACTIONS = { - Interrupt = id; - PowerKey = id; - Restart = id; - Resume = id; - Snapshot = id; - Suspend = id; - Terminate = id; - ZapPRAM = id; - }; - CLASS = FirstResponder; - LANGUAGE = ObjC; - SUPERCLASS = NSObject; - }, - { - ACTIONS = { - AddSCSI = id; - AddVolume = id; - BrowseExtFS = id; - BrowsePrefs = id; - BrowseROM = id; - ChangeBootFrom = id; - ChangeCPU = id; - ChangeDisableCD = id; - ChangeDisableSound = id; - ChangeFPU = id; - ChangeKeyboard = id; - ChangeModel = id; - ChangeScreen = id; - CreateVolume = id; - DeleteVolume = id; - EditBytes = id; - EditDelay = id; - EditEtherNetDevice = id; - EditExtFS = id; - EditFrequency = id; - EditMB = id; - EditModemDevice = id; - EditPrinterDevice = id; - EditROMpath = id; - LoadPrefs = id; - RemoveSCSI = id; - RemoveVolume = id; - ResetPrefs = id; - SavePrefs = id; - ShowPrefs = id; - }; - CLASS = PrefsEditor; - LANGUAGE = ObjC; - OUTLETS = { - CPU68000 = id; - CPU68020 = id; - CPU68030 = id; - CPU68040 = id; - FPU = id; - IIci = id; - MB = id; - ROMfile = id; - SCSIdisks = id; - bootFromAny = id; - bootFromCD = id; - bytes = id; - classic = id; - delay = id; - depth = id; - disableCD = id; - disableSound = id; - diskImages = id; - emuFreq = id; - emuWin = id; - etherNet = id; - extFS = id; - frequency = id; - height = id; - keyboard = id; - modem = id; - newVolumeSize = id; - newVolumeView = id; - panel = id; - prefsFile = id; - printer = id; - quadra900 = id; - screen = id; - theEmulator = id; - width = id; - window = id; - }; - SUPERCLASS = NSObject; - } - ); - IBVersion = 1; -} \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/info.nib b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/info.nib deleted file mode 100644 index 867845420..000000000 --- a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/info.nib +++ /dev/null @@ -1,36 +0,0 @@ - - - - - IBDocumentLocation - 3 11 521 240 0 4 1152 742 - IBEditorPositions - - 29 - 3 256 365 44 0 0 1152 746 - - IBFramework Version - 349.0 - IBLockedObjects - - 288 - - IBOpenObjects - - 29 - 813 - - IBSystem Version - 7D24 - IBUserGuides - - VolumeSize - - guideLocations - - guidesLocked - NO - - - - diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/objects.nib b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/objects.nib deleted file mode 100644 index c86a0e8f72eba08a87ae03bbdfafb7c95cabef6f..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 29653 zcmeHwd3+RA_HW&)>>Gp~QPbiAC=wDD5fu^=mIw(;g4^KJPEwGTB;9s*SR5U^p}XI6 zbkxZ}4RIZ0)IokQZa>9A1Qe0S=&0y8I{f6x=u;U~RD3;*2>tt>d#kFemjJ%s=l$_M zpK0i>s&nr>_ndRjJ?GTjl93-=?$etCLBH;9;SQSz$s3@}42mPM*MQl}wU6fblZ4dgrt*yF05{`tJ zhbylc$dy%BU#quwaOL$?p$tz&MTHVtvnHq3?P(`)MB=aQ2)Y|v^-90ry<7=}vg_*Q z?W*ofq99M=s0r$ATzz;|S9hoom}+VWUByI?Kv_^%Kc%C+xmB-ox9Jhop+q{B-ip$> zA{L7&VPNT9S1Rm5QKLph9&z%KQlfLaq9~7? zJdY50z3yM)0m>A7Yi+_IB$9w^46|*~SawP9rI2WQ-GHVy(TP@!nB<=>F}-GZnsui{ zfRwc)G*}9w#6-R*H#^v(`&0Qym1ItRi+8E3vb8mZ=fu3HP4?UlPeMZy**Et@Hc6@g zlB)FiT6Kq*x`kHcRC(Ll-0jV&e8k)1RS3L@6l0etQaH!ERQJ2)`%0_5OWS+YBAGdJ zj=Liul$wp|iNZK)ZC=O85T05w3Fu3VLCSummUTVUmVkW|{hSw=dA*1#c(m zxTjA_;T#wzSG^wW@R2njm78Q#X~YU90K{iprOr93R<_j4H2hxyamf z>dfdt0Vo~`e939#u4>iY{*$)3q&Kf#Z-uuNW{GgSd%~UAHd$ADAmybg6(qEdl?m+w z$N8HsMYK;rRjW6kyG#UB=hB|)j2Ftk&g*Tn%A8D-WgWe0J?)-0&n*enw4J<~Q@60h z-De6#86+@Q(CeD!N1%}+2FsvRa}~kpN@fEoW;bJo-s(#!oghS+1tQEKX%q_)_L^Pq zy2j=6`h%_+-lYvv+b5rlJz1_OUarAg?Mmu@MuIWN}^n97>qd5e$0UtMt}Zu9k@yl-h~13z)Ju z6cXW_m20wimZ&I4u?Q>at`fnh$I}_AJfU>vAP@>=RNzC=9^%evP?Y|wy3Y$`{$$Mf zrt7nieg?iLV#+L~LupbxO0(itrYnB@w&Pw$dA6`H#F~^%Y?HDnBN7e+y&2erLWK$B zBcc^Cuw({NYcAqT83T_H)sy^imtR*8XXo>_H|u_7Raa;!zj(g(;z7 z>pL@;DUm18(wQJY4@NEwhkq|(y@{dRK)@rS=L)Xu9?Uu;ofWZ1(DDib-ix}=gv81x zNQw265}N_(v?@#R8-(1N6!*qLNQk6_BIH9Hl(8FYI5lP`Q?14D`FWs`~ZMCT5o(y24`=iPXYqTF~+0*%RvoIAzuT^i8;cKc&-Viu%t zU-aEDW1MZ~Dhz|X%6`%nj-U^rN3pJPluN1N?0L>!q+E2hCkM?r(Nd zvQ)~dP&U%(gGOOx5%gqqTf(b$g~oR2RvmyZlJ{`Qqq;n}r~a#H4dA!ooGy=~DzT4D zkQ$X$+1#AK>|zJAqPxmIYxNWh`PJHWKz`jRkk8ZGyv{D@J3ZuFc}p|f>SVO%R$-ta znAlbwr&$9VeOl6~MkIv@&9-Z|oD9A2AqdeiL_vm@D}Nh}#^_XTS45+sal}AFRjbEG z=@UnHtw8E_naU^?mK+Mus#Ee6rCnU8H z1gO2$Nm_Mu^^Uf7j1}dO4L2{243xpgOSWTwQd>o~icDy6HWhRhPeD$!6^kv+oT z=d5seJldmaCsIYmM3I2jCHdl5ecnL1__7z#qb_|VB zLUc%S46no+HM|>W?~s;12@eL(MK`8WmhDFtltqgCwL5W=U3cW)ZOVZwuSQVSJtnnD zz1uS75`Wy7lf?_KtXy}ml1I}8iIz^SsgC>zv-YYmrV1I;S0VlcW4f|x-D}P&tR9vx zbfj9RQR}3-Y?GKTO}Y#$uSKo|yZYmuNEW0nod^is%3vo=7w~FC8e^D1VQwo@&FxL1 zjc+0$ixzrS{@U#%t)Xn_q$Vitg~Gk8qPBTOUb2V-cC^0ju&1dQ9(bSw_OzpyS#@%G zr$yb3JbOf!A&Yt|ksP=cux)}^QckXXfbTwhU%^-8-y6526v9$JuwFv3Gud1(sB?~O>*$sf7xFblmF`r3WktJQhK~u8XGvUvu=i?WZ zAC#3_t{~yHvrnzJS#OhrQ_Z5cINmdJr_y{*ogQ>y#9H?+bT>I)pSki)Px#S0XCRpzCVo?;6o0*S zI?V5!4$~cxbn9XVKD^x)}v(VQ6=?px~i>xmw;JTeZBG3gwEER zHeRmAc8!yYE?p~Q@~J==6sDPKk6DoSBoM{flHv<IpWrAovf3`qH#9jWdc!u3pRwYZ#@&v}Zh@ z7>6>46#Z>X4Exo(G55V}5?%vs;&aZrrc_a`5uiBP;ZUD*J@`zVI8j8UG-6OOJQhN|LmG9F^p!_E{&!CAFP7YWiE{5rRDw~?hJH|!C}<2kxR+b3o?J|+rSqow^_x2|v1nm99a%dGI4xPT zYbOkaq=%kL&Y3|^(_+Wi9%rMSf`x&Mi-m6KJe-BIK;MqoK3ra-~by;I1Sa9RAC23^}N< zTr>Kpth4%emgRzN4q1VFmYfK8wtuy-#)`1U!jf?|gX{~;|C%)zSe@r?_IRZsMg#`q z<+SzItfs^I0Ux_}ro@Ly8ZovmEcmEZU15rq<_^6G1v$ z0#89f!L0J~@;@$EupqW_<;qxhcenUro*~xQ*cdA-D|;V#ZUCN4e3S7AdO^cwGiT0x zcg2bovBw^J?AR->ymI{Qx8FYT&O7hKUVH7e<4-;H)G@+`Jf8s99Fr!CS8)Zs#g|`x z`QwCR?b@}+UV7=J*z2#q9s{1(yYIdm+q-u!;fg)_=%dGOz4g`@@@`jE^=uOt@k#V4 z+1c5Xyk768_uqeiY}2Mq$6tK$#n|@k+r@XsjvcXW+qT8FY}pb6O(*WV@4lGd@BbDw zU1j2-0m5v$FDfd!(Zq3V>(;F?@D$s*bEmixo|j*KIYw7X+qiM#u{CSf#D)wRayym9 zhiIXJP1e7EfB&=3J{to+-xEK?2g&8nfBv)0*PCy?8GGZ6H)5dm`)8hcCN^x?uvI8) z@kF?C`u6SH{`~XLQ@-QxzyJP;k3RY+cHqE)*e9QSBEBDg{Bdmm{{68JKKLNEXV0GF zn>TNcK^K0GvIY1O4&to&@`0(M_x8Hsn`}*szV_$yx zW$f>N|2w6fKs~W1o_ONB0Rskfpe)`#1rDOC2<=rhZ{EC@2oG?aICA7j?ECM($1=QF z?1vwIi2dUq|A>9_%{Q^nKmYv1zJ2>*ixw^VQ$|L{T$F{m6?#s(l#lPo-o1O@e%D=h z{q3u-zKR_?cI*T`G5Q`qeq7uiJ$h8o_RvEQ{eAG@!S|rd7<`NHC0Ym%@ki6XwSxu? z>V_VF2tGtvL6G@FH2&&Wzxrh8(4mha?|gh+_)>dYdTr4J8=zd9m6i32%PzZY+p=ZL z{tCT5v|+=BFQA|Mr%s)^GcPZ1HS*kuFJcgz7Tk&t;UT>y8VMKi9l-Yve5q}z>|OXS z#g}xCa9|yyEf?I{9}8C=AZOt_7T+0=e*?b6!%TcH!S@_|3-P6TsZ38FN+WrZUQk=~ zH@|dG<%Qnjn)oS1F^L&Ai!sN&D(<0OnSWrK2}fp@W!|HWSh3I?syT=CH{mG323qjU z-s}uP74l@h%!b(ad)S!{oWmVB=f&ZI)Eq_r%lqMWgfG1n^9nyh^8^?m#+wRfHHh

WdFas$iKV@>Eyq>$iKYEzq|g7`@Z+dWG>Y`ezO?vm%V&Ef?c=%e%(Oq~yWnqUnCO zuf@|8D8KwOGmHUtU`42{et0^DdR7T&jpf+?xhX%56Q_%$55tK-*nV+*K|KuxA(;1|Ai& z?J}n<4`S}rp&4z?W{YFY2EHobt2#NpTrAXg)nl=6f-3lWz}Z*{jFqVvouh@hRdeRM zXn#`z#z15}wFXJa1Cm9#%6)=KQ97m} z*z&}IEUQhj^CyAZNvGhJx@*!hL(YDhp0GMJ%6nptZI*0!qri(_qtO{lhtH4`Q#Y`u9VP`UEe7?eAXRsXHIm(qee!}R{qn&l$Vb;0( z@=9wlZ5lg6<;rC_Rhk5p!(f)$Dau*aBJnK*WyZ)d+K(wSR+h==xy*mXl-(&N8RDYk z?CgndEGltNND-z+!gM=?i6s?IVP;pgy0Ij=Nr=<5zQ$>ZGlzOJqUb3k znm4z@-RyU}E;XC5sON(J6%nn0h{g(C!vv2x^R?DAzp5(6D#jo(SZi8;GWuM(b65sm z+A}V(q?l~(H7p&E>zx$}tiyl_f{O$L&kzUPHwXr0P^v+38hEvKN*p0)kEORHm^y}$ z8v-Z8=cZio|S&yaFuvxu^A?HUvJ zq>yHK)>6*KV*H1GErF7gJ1-)1B*FNc{(2F|;&<9NAvZ@1l$#?gs%b06@GEN)H%PEB zHa4ys5bin;Z50k_o(fOr6^MXK`qCIg*V$b*w!TnoOo)3i_cgApd}jKs7VBUR2vfXR zzvLYnHTAPow`i<`Nk}YrzAT5OS2}hoG`kYGsH~nc(v=<&dR!u+fpNO$c>O^UVW!zvk(z(^M+r(0Z$_2oY7Vo2V2wJtxo_#oMCVrwWu?8T+k9o`;vr69TN;Iw7a zb6S{O_$*ntviT-#4i~Kq)gh?ZM9y>XwEwon)Lki z{?T}nyRss>a&a=AL3UHnI!4)-v-=_uhBkau< z2qb8ZdY}DHb7#MDc&Ku$2V(mY-)Yj%DDQXps038S13KWNI%xVg36a=bWxX8ruG5#g z+l#DEr{<|DWtU`{{c1+c6TDw7TY1j($%~xxC+O44X}$VWs!Bz!3hO& z)sI)~V4!-eD&dX9!kRgL?;@<-2-LJUdz#!>=gXDMDD6^@lxw%PU&CM9br`3ssKUd(V zXo~IQ?AK*wic(ecV3%vko=xRqWwz3YeViWUX6%5~?Y%S9+s)-L zYM)ScGd@_cb~$F+Aaqh@GO-qoxw*wKT*YL#(k)B12K<=w-B=wIw_1tV7Um8Hw!x>u zrjAcQH>4+YXXajsiPbBMPC;D$G(V1s36utO449pM*q?7MEGclv>+CowWREdGs`lgT zEwY((wQMrBUpacszKqi{N%k=rah+nHo0^@Itl3$xwR$jak>s;9M`$YJi%$)%e1(@d zqqrCDKE$eILvJ*8?}CdRj%8|qZNoZfJk8{+8c!QBh>WMF$p_y!4nKzo4R|Us4u5Kl zpJ1$i7*FAHqhB$u>&x*IC^z;HzJXX@XoL)M6FHWfK<8R*Y*=r64LaDfK&l)ckGuUa z(Z)c+u!b`Om%Sy%8@r4~q$xXyMy~uGv>*Yap&Fjvz|wqU!31ODdgBP8dalG6Tx`6F zYSliHz;_AxH^eFJf?_w~!a%=rfY80Q%lQ3zBl@Xvi^mv3)ow;^cE7CqutX3O7j=+) zT3$}^2X_C7g+b(1&nR`cPZ@!z7uylYFV4pzx|^T?`0e8A#fec!##4?>w_JI8in-4g zuZtsH=9YigF1_@U zzums7eDvtCuBsNlClK_wae#@t153BDw%Xk~iWVN~t;=b#I{a;;Jm$xRc?IOa5^NV1 zU$+JFybHy{^t$=3={oiRx?5dyIvQI&O|Dtkh|wO<9V5(KEsbkGSiMN}ZHFj+-ix#G z=#ccAMikEB)?#8We)s_-5aH@Mal2F=uSxVX?CpJ<(`pHMjrTKQxY1w;7_Fm>^dR)$-SpleClsPeSM`eTtVHVU?r37R9SZLn%R!+a&HscJ|m z8p-U3ZAkbJp2amuqH!H1Couv`gB9r_WQ2lkr-YnBF|5?C!7fEH6@f7bj|Zz|BAXZl zelhyOdnLw`>y44+#$M{mca$6dq;B>x^;6FNK)pp5ol1fHUq!ciN_NlpON^(VMB*gT zP1%FgqmF%Qyh}(l^gvu*EHSDk;5u6Nnn0#W64xt+Vyw+zb<*Q^;}bs=;P$JtpFlETYc$DZKq8W9jr2(wTIVT2Sj zZs+RXH?i#kAI4s+J^W^wO{$p^fo&NgjDhkhtP(hQiNsJMIsGYFzB?f)q8qSMDc|iS#s?&nBa~(HdfZh~F69KWl*=q@3FQ*}D4$_zzp)q? z+1*qFXJaVuJ}UomiJ>XR79dcfB+2Ozt$J~Yt5d$#Xot%$WY4g~lzI*s_{HgGbKLEE zYXq+hQa(TtX5To4qx_jGoP?7pPBM!?EQkt>i4%J4!*#wXm@2*~HR^yNoQw zco-bBog}8AMDf=3razFUB+yAiUOFjmH8T8+xV=}hw}I~4@S|3)Hue*n*wD8Y)nM%L zGeEPYT%Rm4wyigE6r}H>I;yD-I300OULePU5a14@WTdfuy>Wo>j2CI@^woyXW8|Zx za#XsA-6h6kh)&tUl^2ljn5aQHBodYI3Zp7&{vJ@;h;LO+u1DCmWYUj3Huevhkiwu@0pnbkIQn@rH}BcRV&El^qi?vWRezlcF9}Ek!{P zWs58;><>_#heyXo56W>smXS-KAqFVA6EZ$x5aTFh5fw3X0IXMT<1p1ej_9nG<>Ixg z(*ZHNF47M=i!GL!WwjvneLSmzU*%QYI!`Kj~BuU{sE$fJq!|1HhyWRvVKt?d0l>Mimku?YQJ{*kdZ?MSwwAw6`W=48=o& zC}C9ra`FM}x5!))@fd1H#sPv$k)Vh%5|5zCai$S5uoY0LD54$D#-kIn;O0&Vl!(Y% zM~q#>46L0jEmb97!j=P;sPpB{T!_1520K0_T5kjlw8lFm9bb^rpV&u$I>`f{`y@8I z0g0)n0JEh`vQVNXI;%mXgxZqO32ui=gx1C;Axav^un~$}Yh+QUOb|5y7#F7U6&{nd z0Df4Ov~@#h<{=4;j~Pac-DVf1CV@OH20_nMj0v>HEj71oDbaF9R^IgSF+v+TS;e066`@dC+h*?Z$NF{;g#OPvxdNfWM}qvsgttLkTXp{ zf{Y%(98F7IC?Sh5GXnul^yMrQAcrE6KX3?QJTTLySqElnHK!QH37XV8%4NQa7<=)M zL4gx7u+dq*0}nQ*M3a)>;yEJ~b?OgvauGn5f{`_Hm>0A!DX0T70XQ)%D43FCmH@Ez z064KCd_p9j1Qa3~Ez#Mnj8_MVOg2Eoco&cHpzw1%+58Z@>JUJjRRMUAR8e3LBqff+ z+dEgse}VX4t;79;2w_7sBZ0T>I!|Mjb;w$KyEuCUi^0SRgfdCOidSv>I*bZ3nmVu_ zR^U6b?Fd0Kn=s^JgQ5h=5`zae>=?oF0^*EMoLFhYa|qtohyCr)TRJS$9qjOnC2%JG z0?N?KjU%wz7wI+a;+RXj^Z{8Do#|@B_7kkg-_cG7#LjXr#~x@q?Vlol6CFuv!wwQG z6T>}T8}x+$`Eeqv4H`lqOlEkO(n*;%IE%mqCi!$UsGXvbl_@k+#7U!e(qd`2^Kgop zbX9grhfFDyXM`ms-eM-o`G}MQKaV4+hMdB0CR1uSausnfOow(0&^3v*?csHD$Xqjb;iRbS=!jNC}1d30XC+ouC!|sAlWR7MnWP@s zhL;E_vR+c0w1iu(;CA2@FN(Qz3JS_&C%H3;Ud%IT32j>fm|h*SePqlKpgHqXP?MvZ z$AO3xq5@MDqG#p6j!-@ECdG)pNXeJhATg2MArtc?@o30+L3XW7>z&ZstEv-}LcB=k z5m(~HDuFc-4@32_ncSjtHy0rg1{rWlJJ!P3we67!IrSX@AJ&7|@HZqp8>h44Y$_Z4 zmIUY3SZAr*DSJ&sC_sm&+wgbI68357cFKEZ2^^13r=#2OeG;B)OhUtn1 zueY_qg)u5dmMMjDOZlJ^;sz_7(7FoPZhE@qwilXf}Z-owp zrQ&I+rWi`lebH1hPog@CR$Q1ibh~;u)z4~X3@l4ED3F>?2Uo=-WE#ZpsUKL1F5Yjk zeghL0rs{lP8W8(0HOMBn{Q5MA*x5-f_)LPs2+)!GCZ>L(`Kc|%5%0F@3?z6i!RZKh z8$6i6g#@U zR$34a^E^_jrWpmo(uq`4-O)0PUfI)%wzuiK?L`ZgENJ#qqwui5h$LLz_EPV{g{j%# z>P5D`(knt{*tN0LO zQLZ5({Q;MCT>A+wA8~C*)Wg~1(PQ~hEPU*YVqpx|zD81SuI5FjbM49KB8*W2K8Tz5i<=TSiV6Hum zqL9yMT(EZMW2EfhT30lG0qziO^>wu$kks0bUjy3ME7x)hx@;A?d51WS09gJ z4)F{CF2UR_E>OTLqHl6`JMK^LjLay_ZYvMq>2a>z4B`%Q^$>t(b8Q%auW)S@F8#P# z5bZt-RaJ5ok|39{0=a%TABmS@ZX2K%x%Of7iy#0ua5Vd1yb!3 zkQUWB8-RP1XpD~M4CG;PkX8zin`@YTCv6!X9pVKXbNR05TR5W_iD9mh++X9`{kUx4 z8nqCb7S*aJi0Lc1x*nH7P+_Eu=jz<(hn(f${t(yB!v&G^^|*Y@wd;_tiE9j(|IW1v zuz_=wAHviBgwo&%Zxeg)ggA3U^l%66&fsb>E*rT9Nx^M1)I=*U4&(9?*Y+drk6imL zNXh2fg?Q4r2KKScR(l(lJzOI-_>5~iaZ#=UsFADR;{Fb<#n1+TUgz2oJRRcNE?lN_6%4WWx%NeL*IeA~ z^d(*gPw z*QNpVIoB@0)1SG9R@E?6HZ+PQgdF!?u8qaz-??^6RO^SkoTbqcuDyjqYq|PJv=Lhe zabL}~+mSevtAt=RDhIHOt7~z24$eP{6&k<9{mWeYU&!zmV8rDDuAU1nj&laVX*a{# zf%+j_8-=ICT>C0IhO3X^zLu-cq3|TGUKcIC33pfs@d++}f}xMDfN4XXUvurs=zE;` zai4b!em>wDbV9?}9$3R733Wc60$dx9I!d|n5H1&SZ3uubaP6nKe1l4Hna$PbQ2_Oq zMWg7?>bGD}*#O0l?gm#_I;EnMY293#g~Vt{6l)w0N3)gzh7kV}z%&fX;pqt1VBs*X z$({f{EdD_^)8?WGfG=?MPk7qGwOdhO1lLFoJGi<%ie)DTQtk)W0DZ>QucH09_B&wM z%(Z>d26P+T@8{YzNIuF{kj!?%>!8e1u1&zDo~!?ez7M+r%olUzeq4^a0RIoJZNue4 zu0n~}TR0gSm;1STFMtnnZBFz_uB-$I?(7?Y$mmALLDtcKk^#GztKf~HvyQ~ma#-}} z9vA@JZ{^x;NckBI51!_uw&+lFVcb6qenI7TT>UcoDH-NFxeB>sDXU7dD1g*yXzx+n zgQ4w6*}~N~q64``t&TNUV23fTk}EsPGgvfdAOOob10O8R)&GXe5|~6>Fx>Tj!07kq z;NAy6gAzaG+QcaCsr1!c{bv+`=r>WQ#eD#*1*OQ3@Z)@xSjW|M0G4qT#)F2YUPoFT zn8sx~SD;_CVvOYV2gngQx4|Xj@;%RhoY*d|9l#T`^>SQpgSUxdsq53-JR`ds^S95g U>0L9W%G>01i?z$*G}p*~0xMf;$N&HU diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/resetH.tiff b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/resetH.tiff deleted file mode 100644 index ed556af40b23bbcea388895fe599760f8cfd04c5..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 9798 zcmc&(2Ut~C))laq#NLyT7@g7R7?T)VR3dg!5wT&#f(R%@iUO+r$493 z&@i%M$kDYkq04W8pYwZ3U;gg@vq^X}udbbBI{zrwxxaRgKI6Rm4_$ca^D(=GV<$T_ zO#I2KZQPV24f11kg#CvuzSN`7H{Nnx`fGE4(Rc0ovQGa?eOMOTlI$$=74g~AyWjN0 zQIife&QgiOdfgi^I#LS9QxD)7_87h~PvI5*1kQnVFmt(&t;RW+w=NNXo$A!sXW*LRf_$H-8*u7eCe9j5fl-xPhZY*z-1j#a}au@M*YfxIf9>fCdrEz2da{6C^cNB+Huzg_=H2im?|;)n0I#Y1u56)d;U z#+qY=SbyRUHhSN|X0HOMd)>x1?|keaXq?Q)PM`PSdkwnZagzF+EWlRpLTvHAi%s6e zQ1d9l%A>cjz#xg!2MeQ!g{uMoRW7h;e99Vz%;o3P8bP^5>t zXC5}V=VGl}4pf|PVeye)FvsdTrW#$ugdJz`#fm`mpJLf0+ij5XM|#lhziiB(t~mT)bOAqGUdCdF8(8U_1-0WjWPi4I0d!8^fnHz{#nC+& z2})orDD8j}>~JRLSzp7n{b`u6ClRAIhhx}s zKlB=_Ud}v3eBS5BKU0EZi0cpM)2PmaCMWfq;HtN}62l-`_ z=WVPZe=0fLB>P;!55^ZTTJtQ1tA$~};*;nyY(^6E5%Xex%=7me`+)0OUzzTM5BC1a z2K`s~Y?O-m#D4|(e!WLNw)@_Jc0e)oLrRHP8F6gqYY|g{L$MXGVw`OU z-&@l2{eicjX=IJHYu7?))n@1f6p>FTpF9h&>R2xM_aCH(61MS`uuFIktLP%=S)aiA4I81Pq=Z?sW?`<<+pI4ZmV+@+!ni*IX>L&%|`|42;)1kKyW3_*5kjT}Q9Xqw+MVou7#3Z~21P58Vj^ zI&~jt-b3Lq`jQR4&^U`plxMRouR+O)YLPqD6rW;f1(p(jp@_eE6!DL#6!Etu{tgLM zIGk98BLs(dA&id(W0U$eC@U*t&YU@zK7Bf-O`8VAB`dKvsF3`44?00**m0_u>RcgK zxa4B4Z62`UMo4}VfLX+d~28nd5w7VT^$Np`MK%L zkH9=RW;*(U+TBty+b7^X5r;&sm^^ZI-_8?-wbjZg#g*atWi{{Xg$wXlw++GKScYHDhteC-%7n++VG=MsxO zPLa@Y498BpV5ts@q{IH;T&e}-IC!=O`=V-~PwN$}kP2+^E63^+C0OWKfa#VuF;*`X z!)T7}JYsSL^Az)C-ppSTM+52in67_O${tSh%Qt(|G2_rJEIN7ztG&vg?q3OQ0j-B3 z9$it6UxBLUd7SslxlFPG*j>#%003G`i~iGMo`-Q!{8aSnRUG4FL)tPJze z+oD=vmGF@4QU{}`TI@MfjU7Q%Q1dCrGPiqBu*=1_`>sM>GZ8%|tj=bh1m?@}&-@uY zr}5f-eD7&G59D{otGzsvT9*?>@2oy--#6~R*34P z#P-Y7G>B&u@sEK4>0m_M&3rGyD)#F<<7*{JBPPE{r5h8o1cLY0U0qOtH8{ z-xfpFs~qY<51@VKAq=A*LEkeK+qL&%<;s;%R8*AmS+Hz1bPk8Yz%7n&mTaB?GoMsg zg=FGzbOBt?3E`YribEkcrQgh@x^yU_2=)|@_9;(co%9su@lVK3kFh7B9y>zo$QM;m zI#!CAv`!vxcm=~(dNeUlF<<7*{5dZ^A$(4lJVe#2?Hhwj_{rurmbeMAj@HE*p^va9 z@+nkz+ezh1?5;3(AvA6LVc>p_xF?9>#ndN_xZlK)m^(O@bRQ>D>)@U71n#M|u#3o- zjxl$M3T&hA!SQ@Oj$Hf|b}27lne+ntS3b(Zt_OTyIQE1a9YHMt6f!*@mBZU}e?P1+ah(U`_DkFd=?5?oItIxJYQ zKvaiz=o0NYMg!eHfqVt3>-s0TlS>d6|+b1tRW$cFp|KlZ~^F<<7*{3SYkMZc#H znP*z}-Tv#Cd$a^9J`|H7PoN$790sw^U_^0h7*Y(~lh?6kk1b}-o+IV6c=2MaTelAS z2c6)aQh`&~UcjIBZvI(K2%!BN!~4op^37f8H}jNKXdbVCOFHcZuQtOmqZxLoO|VF5 z!oG8j(2aSC9bwO~#;*>G-0ow#bv`~CKkBf$Es8H z*cSEzyJH(*c=iR=j0Z3Xx&s~WYuM#_9vTjjP}ypT89&XE@>;fR8P=~~k3$|22+Dbb z;Jj8T{4yJGG`>{Ycb?Kpn$I7=?Mfq#-)M#NwN^M}yn|KRTbR-Q)*zu7nvo6I5cmX2 zC#o^it`I|KX%=+QfqDOfANqVfGkJ>nbu2nwiM4@Gp%M8C`th&HF3m8bI5ml^fKgx` z^iN)<{d_X?JPflHoHYM?XmOq1(VO zy?)%64keFjs0BZVW=t~-lUi}$0@)|E8CDmb!z!Vg)<{KE+p}OAa2ck4X)vetg^_y{ zl-0ILIda`nRaJ%NZhf3gD@9Nq+55tWI=H6S!jt1H5AetaoNog5q=)4tz%-=|yW`$q zOIQO`eCsjWz5qRjjPW8JKF)^^>XK}?UIr621+SGns<4st-*xsaj8gy$8q@A-E1Yh; zf%ElOaJljXju$IopKu4(5jSBGk^zh0G#nCSz`!K{^OgQF?{!Tr;S!$%t^-^X7A#YR z`_)?bMi^bL7Sj+J4fpaEKO?_hF~>~aM-Og5tBJx=7e!YjW8CvzL%mGubjm&L_$k$M%+?1cImB;)DAI}dT%+vIKe$OFe0_GpiAsrf_72gKh{(!dYa3o*5 z(b<+aoz?l3v>~{x6(Oas5mfXNez_0fohgLd#XKBMxK8t0Ivfc05f`!D#1cQvnk|hn zNnKv3tP1a6Y7tOGb*l{UxkvFt{%|Hc(e?r6loxtQz_zG2Q1+@qpAp{#Fh9b_^EB(g z>kiR+iLSF{J9pI{t70Zp3wj3a1i&PnbRfGp(b(>HNfw>w1(X8pyeb^3CYJ~AD7z{ zx8w_R@;zrdU{4}Z_IQs-hc-Dr*r*9Eg--MW&XE;+*gVQ-hIB_`(t|^z{ zbS@2!2^V4N6Nsg2*Nc3zXoV_H(IIR|Wix`S$+u(|FR~A9RbWRxH>aGSEf_WgKSTeo zz85erF+X{_GGFG+{JC*n^V(w=VFF>kjBID^uNAjtZ#_fv0{MZKzo2adJjmat$Y#NG zt{P6~r!jOE98YJ$Neuu^O}Nn5hLnakNPgak__`!^6> zAM?aIZC&^m*FsQ3XP9+Vdr1#3@`Wqq1?yl&I%p@n#ki$<+02J|iTN>4=F7Y#O%hMM zKl++5gP_{I?@(6-{lI#?I!@SxmwqP%9m?+B@A88muw2=fs0VP3ztpQcx$ zHEjEyy8S$g=MiOs#;|W@#cG6>w;iIhYG=v^Ptt*wlc1#xqA7+FUXvfl_Nl~Mq61A+ zV6ZONNS7<`-XX2I8A&f*Ac}RVu0cpu9m48gLh$$vf=CBn(!q`Lfo-LK?rGb|Ns6&7 zU(AE~j3P*Uz;nXKP2vklUVK9x6bNew8Y3o<9)Y)8Y;)+$o&4=b`5a1qU>)LHfb*oo z#SS`9D2w>B4ia1;UDDpZ#d*>t?$s+qKYxXY7cFFqRs>Kic~OiWrMjmdTi)`;cT)Z= zpLsAJNgi;_NOGBee$Y5CMCW{T<^9CB1kR%k1dSo1zY9^d7S!A4G{KYP1(5B+C?9A^ zgG9;$n$AH}iPRUY2m6Ar3<__g6H-W*M9P=gCaTH5(wgu|8+^$o&UfEpqf1=<@UcH~ z{ILC5F3V>g%%?Ab`7zJmYpfgRI`8q=XI~M1AS@(oBxv*=IKp-68l7yb>yJo}R?xB# z;pB^0@jTbmKiw-9dqgbhBa>> zAb&(tUc^yMF~{>_zR7fzfS=QJgP6CZH`TJh$M2}ly@cukH{loGP8Y~_?xIIBB=%={ zESKdo59Y(X{+SQxwX|`+t_04F!2}+M?ZJK(9-cator1j&S*9){v@;;mJLvWYwJ&bug zF?f8I!}3@z%V!?U=ilW|T}8g?s0Z8OD+0%*0zsL;^-dyJqsJ$Gtw)ZV7&Lj=nsnuT zRzQvbDCZ9%iC-+a+`GnqUu%m+ZIh(u`d0y@somje%jBvio`it7W{Ii5dM30nwKUH-st{+`F-@pxPwpXIPTmMgLU z|CK*|DryovI1V|V`VzRlah>M*hUfG71YXCe5!4C)jy~Lv`}24FJ&(iV@whxb%VBwv z`2VB)X$Wa!e{?2rU1Q&}jd;G~c;)pKuM>Ga$$XRu%xx8cV|%Um%J=-7-*Z3i&)@O) zJPwb?F-%GBRh=w*A8Q6k(INESmIXy}L=7DQA&@{oAV8**LJycC z!1Rvk5WvBqmzds6LI>M4pPldI&fDu38;l|Bu}1H`d(S!Z&&)q_iW@ifEAHo4bb{Zz zX&#v-og?YxGlNLRWQ6Cu*S?JVe>TMpF8}oD(^trvHEWL|MT&e=ty;C69XfP~88BeL zqfw(qB@P-i=uxLmonmU#sIjwX(W2i31qJn>KjTCgk4^8>9>t!~({TFix)4NlP6D_y?ghXB}EG%N7$86Js7ed}vbB;^X73 zZTt4^Gv9vut@-%lj}K+fo_&DKn@0p&{*1UVCo%tvw5Fv>m0I)VmtR_c9y)Z$#Ky*& z=g*&~27Z!0*nHx|3A1k9I)g7h`skxI%#R*NA9~-mxqbhE@TOnOmMt%Yg@u{*>(^V( zT)leL+`D(rJbwJx%A-e*%!3CH?6W&}?iiK3ckkNgypM~EGsJ>1w{PDz=gyrok&%%$ zCXzQ7B*y&&cqWmzjfvtX?=t7ko%`!vy?VvXm@&hwTD8i+gX71KTmA3|{)6T8>C@J? zygPR6n6;Bne&ciA(~mKiE?u&Da`x<5bL7Yovth#qLrx7IJUA|I-n?I!8qQS2Ba_yf~u2XKAS5fKq)(V|7xZ^XZR`SKeDPhk=A9DLwRsbM2^El6Vc#gHLG3^}}D!2+{v*)oeC zJ@^eizzzHkCO76YXU-V%)K_?p-@)FlT|3jcb7z|m%!4n8De=G#{DmE?A7jRhF*$SQ z`~qAKzLa8tZEz@1*3GhY>(-5)Fkym?>C&Z3&DynVt^e^C`0>5+1^oCLjMN;J^XJbS z72-5?>Qp1O(==+-$W*Uh-Lz`e%G!V*5MqLj*g=gV_wXN_YTC4EG`PU$;7l$Stn&dP z*`+>zK4QcO%OQM0Y&UP-?DfCmSKq7O!478XtO~YK3qJYe6Vt3&GgGr>O(S~@Q@L_w z)1pNSi(7f9b`TG02E4_8-+%wT!JiU~&%x*51h2bk46?|>e3dFyikvcKink7dAO7Qi z<&JV)eecFj?ML84&z?OkRRWHFK*cv+1RQb z!Vg;)n3MU4nc4xbu!C9!rxq?;XoMT_;1jGG3wK_S>+mdZjvP5gjvF`5<`Z=kUr>MG zkK)Jo>UVHoxNyM={bWCC+O}C&#ZC;^pRixWH@-Fy1LjjZ;HdIy_wL=6Q`B4P zORikGMuOA93vL?mU_B$}3l=Y4eEH0oGp+4#2wy0E{Dkk}x*I#W%^EIe2Ai*nkxyzf zHI4NhPOz8I_rw8y;uHM9ylM+}z$@M>r^s)q_shZQ-~~7Ml}9<`dohW96gfyfQ6H#z zV8mB$?Cf>$8-DHDwJUYQo2y_PIB=lFPEI21v4|`FblU)Dn1}O)#uGg}!w&pMEre5y z6+Kbl6ag>%2S38v!QQ>3;JHrB8AA++Dfsa}I>1g0nD5h1KQ+ypH@9_CaZ!I5&wKn2 zm&qwOq5RgqVpkcUm9x?%n%3I32v;20t~5T*xm{ zR`yzP_>4TJKHv*<;3xF3{`BkD&&VFc)T&j>>r?WVykji&2%p16d`K-&u49MW2Hr8Z zp7+?xBkC*cpbzT?x+PcR!0F%xH~7hmzlszPDKC8z*|RW)7~p^A13&qy`t`GZ{ra|k zgBkqnArw1206XKs$S2&TOTzMNy#4r&$S$P1~liQshbf*btQ zS@QWqkxE~E^;H}g7()!;4>86!=prxSzT&7?ub!<##0LN4cWehc{lWC>ufLk#e*4Xy ztFcSR!b5a$-sV015Y9!|qjnGr=7f(@JBULi2QRq6uQn8t?^T3vH`&u^48Wmr#vW<~ z+!R~wnyYvkHf(6xw{LI8j~{PyA1wFp-?wKs&YTFoX1tDJohHsa*RvmILe6~H#B=N* z|A+l~U*KI?v^Q?;OVU80sa*46{h`I15zsW)N0dR(T*|%@sBstxrNfY+V z_MM(PIeQ}D!tZVyn3MDBlP6E?*%VvV9{LjxI7MBj&UWe2<+#fRaQ`6=6)RTUOdP01 zj0L~?1v}sfbpku7zX%-q?6c3j*yMi6)+=fh>)x|x&+MH6*zmjBKwTit;C}k_sYysk zu;*;f+IlX>4q`!_La*FWZFbq}tZ@n00FRgh9^faPAA9f*xehmoF|}CFr>v3G9L1`6KXT+qyJqp5cWxV! zT-wMF?s~98^9WAJ{x2agFpxVB-@24!eUSH!BsZhMhL4y7F5o9^_zRneH#Gzwkw5T; zcwh@_JZCWXo{zle>_9z!oek*1XT*Zoqa!plG#Y#&zUxDhbz0unl{?e<)Bxgu&%x~5 zH1_H%au1$R&lrmh2)Tv-LqbBlanbm^Dh{fT`LTieDto#4;1ls(r?G*3huts9XNbSQ ze-F9ii6MU2;EsXLt)INZUvL`U5j*l$_c>|{`wh9@Nn%H8Y#`pmdhFP-G2jB9i0^)h zeINTj^17f1_tDKulqeC-UIV_QreO;lCU>Y~)Dr5UJMW1JdrxX_YPf`6Y`~Xg%a#oX zmxHgMe1aF;;HQz->^<0*|5K!{+^zSJvu_kN;Z`d+M>) zCEt1UH$3Rpty@%v3>k<4JOZEZ`9U6e_urh4iilJdX(jiQVRPopi3QV}w&e1jy%D*> z+CuJ=JLC~OOsUCPK34Ag!ocI;0$+0HIO4&2mqmp0YH5*rBL68_vg9J!H$H{)Z`z0n zw)o~f`wj3@zsXnll3bJ8{Z#J47lFgU1Fn?L)AGvhVeOe(z84l@9cd;KTD5A`2w5i+ z(_#nMu*IGCx}SrmTDyI15Ze-K)~p$Ueg_A5z@;%@P4I0R3(boX(xHY(Tai$?4~mdA z<7skr)>nT@zp;h9hdb~bAqKv4;(uA=6+imH0Upf*IHS2NUz0TIti9)xPtFr%M98B~ zBB4?n7RmW6mVAAirW_+S;O94u-?Gn%mAgs!ga6TsesF*%NCbS~OsQcTHHtGHF)JkU zFOm8p{}u_&moHyf_wL=J*bAoRe?Q6Djty{1&LC0w^XCskkE0L0=m!UQQgh!b-K>qo zDzivV5$XW@6Xvt=kUH0=T)A@La^DieTJSb`0-vPL#>jp-T<(tghz|8X`p}DhaDWF~ zuZn@Z_BQ(Yi;x?+M3@JE5LcTY@);_3>VwLZDf5HeVMI&aOyK-N4Z|hy|ZB)FRBx#K zuWpq5uW@0UHfTN3pWskEfo=dLJ+MGqG~^J1zI!kz)5k`QOYa_jqSM=B*)u z9`vEtjX$M4mTt*5`ll1Y4&n$O$t&sub&mC;l}Hy6uPtf#&UofwKIUb9^q>#D=m*D} z;+G+|sU7f;d>Kd`dN356dmHi9*MD~;5X(R%+)*^7bo%6|Wp7Wl5^k*F7nTPq9m-*3yKJ>oJ z=8j2#Ow7Ino%pSwNHLL;B4tI&i@*!+A5{3wbKcXB{sl!C&pgb>yzkQYGF`F_Thfc5 z3!V6l*yj+*Bf@V3w$$A{YoFijpP6BPUTrQOsgM za*(KkC@N;6@Xl6Uz(sdvcmLVh{V(77`gOQfr@E@Ux-WC*wiwo;#Sq&Tf6XI7Vk8^U zlFC+u*1rR8=l-U#{NDfP)5M#3wP_*IYC_9a-Spab9_G@mkLuMQr8gH0l|A}#^kir8 zu!+_mrG{=P=+)%Kl-yR>ZGO^?S5?={%VHvKQ{VO>0zG|v(PiO;r9T@}s^k}t)bslWaJcCo)C++l^X1Ke}$#HlQ3RQgswji!W`S>EA6EnS zTc6>5_cMI%*TCm)6}%HG;B|-b30{ex;Cr_M{`ad8@Sq0%Nj$b5r>@q+BC-;jol2p) z`#wf22t?PxYYQdY_Si+lI}q6C|A|kU__rZB9b2~Vf2jLt!%As2Z%oyT$70JAY;Y>X zHlJtM9asv3U`8?hF2c@$0_^h7$4PEtvU=i#Ci#=|IgUboPQ_cf4G~BnfT}5JTPwkS}jgh*gfs0{>0!Y0&k^z*f%;sIJ?OY4cWL_6BpIu19T~-7^F` z);gs?>r^t9oqUKzb`LPe`W}=H-iDk(JVtJe!cPl*&~4&@O3Ai84ZpF2s{is~{v3xL zTeNJyq{EJmz7(8}5hRe?uN&~9z4tPYdm5r_5Srk9%WOEv{PN!gr{R7OiO2kZyTae##1tYhe z!=Tl{=sVv79fz(hVjcpYzpsyfW(3C&??1er2DR!b8{1XsIQlI0#lQ_=7`-zVlTEKe z_0VlBI(DDtF@@qH1G=7Bv@V!qE{uZmU>uwWlfXw9EHe#*2wd)=x(T%#2j#;cFb_M( zPCc(|Y$U&|a!P{+`BUxaU7DX87;kt9Lv*6hPcsnR=eVME-$}8|r;!))W1fHXun%}& z>mt#v*S=1ZEzxbE7k*e1ilJN2(Hvcd3h`e^zF%=V6&u_$q34~0o&I^mD<6gd+1O+o z4YSaE>&iJlrFe5ZU85*_;NV_uE?nCI_3Y#YZAtsx1S)>3m)I{)T^UMqtkt#=Nx zMpvM0aR&>ICD9tBb?KfBJzv^)MENiZF2qKw2rSmMz{HvAFb~g%sVI&3D`4PAd7(57 zOv6EHmz%j5OST?{&aoJngcLzPumIcq@}TXJgH_HMSZtpR)gy^eFujHmJ1(H#+Aw^- z$OmnPEKZ^ANv46H!1MQf!RLo|gzhcc^)PL(XoW5`2R~^?L59}Zv;()GW=ng~DcV!q za-i#zNBj%0!!sGn4NpTsRRg0Y&%rO_m0%H`i+!RL3>qa*HcS*su3JRp3jJfI{Dw)h zmtm!;JM{gtXg@B%7TF3Z|JSVvPP3NNJx%m!$!alu}M$egx*pG1J@^9A6DSkZe7-^(2$3?z9gL z(mjuH#@8_8&;u;6PluMvBW(06z}5hYfuP4w-*p1xrq3t-v~DT(7jLtInST-v2B*P1 zFd2g>mIjTK6H2Zh3`xgc??f!nwWM`EMR%opVXw79D#X==7Td`mc|~h+S7O=|Cdp z*rs9W=^U)}D1fftW9%aSD=mUCX6oFAy=Tm1n$MFka=!snpL?(jPK9MqGKP>1gGb2; zCD$#?~Ykdg$LuT51Y_h)u{g9{F67U!syb7_xB^UGUGoVQGCu4LS zKkJ-F*QGv?=+yUsz_Wob^X7;B!TF5Wyp&|0(IGvScwrFb%W)<*G5ts~7M#q1mRkWf z`O;hkKBavq7fLG(Fm!@4t=Gwzt7D1X&R1aUaRUcM4{;yBLOXxT8 zxCwoi1k72tSMc9(ITfg`-v^^ml1=9oUH`{e<57gAj=4~^Nr%FLyBNCTGWt@EZPi~k zgn2gdW!}ucDUN#3Z|OF_s3rBI{4#uZ0w$S1!0cn0Sn8aQwO&u4C!+IEa0yl&iNbJ& z*}^=IQ`UgK>owwk6XpTQI2!Q?wlR6I3eSY}m`P-Zyii(2WZ)RLQ@=T_4Yp&mO*qCX zsZ$P_iV+H`*y2ogkI-k>7F3LlzE7d)R)l#cA3^bOGR7F+gp|%Xv>&-NiFp#3FULRg zXK+sAv-^ln@>`xsZ90pwd+v}A(lFm44_Y2iu*ts!JA$7JI_7M)!mqN*7)X2nqOI02 z@w`p(p9-7kd>oH^h7)ncu!+jSFER}_aCs~`2M%#hsjmdqQMtl;G4{L(wGI0OUk;rx z6HAQGz&N}VyF#BsSM&^Pyo;eu=SmgZEXeJ@k6*T3Mpq@HXUwyaFY{*pyhrg`7(kHe zG3Q97^wu~`-2Z^y&4Ide5!U)XgI>@J=!ccTDEt}Z7wQOmjyAlJl$V3{2P5$DWAiFbsQ% zZ6RgY81S5Y@f2z&@-T(Y$s_b{px@%tmCUn|FY{*pye_^Y{78`Pt?n!yzUwL`Tc+W+ zlLc5#=VI*uk{MbK!^l@Kjwr?ODf5NBk#n%AKgAF6KXJJX&ez|<_11f`<0b6R7vh(( zQ-nDBl}fHVU3&=^>UW}XC*oh=XcV10XkD-z>2cFBYWiaAjd}r-=yL1~FURJfS6Jo! z919$uV7hfSWcDWF$2CD>=Gn-Xc{6|BXL&vUOpxoh(5`Zf(M>2?WeM+UdB1>8&};0B zd=D#XO<=7|nlT70%qNh6lm@_IsR;e+H|tG#m=NFO*z&qjt}GRl*ooy5pTp zD5re#5Yi-v^TjB|Mc5bp0%oxvV0^v;+ao?;W8fQTcs$4KlZ8;QNX3r}jyz|c1m@e^ zhOUim3f(8HNS8HD#4P(lEICt#^?~oOEvf>>vDGlU@CjzoWsqO6iF8gCV%R)53r@Ey z;gKYU*F!P9lk4I2pc<~^i{t0=VH24plw9|wb|32Zrg0t*>fm^*0y`Wo&>lTQkf*q8 zC-%p@!v2eu*h}}@T`^VA3H=BypVv@xEXI_>8R#=rC%u^s%=;hw(0TBbxQV8>G27t@ zmid%JJM;m)HavZ!& zdg8?}jID)kL?u=Qyu*B#QYaqHLf2s`am{RK?uReyp>2aZ@T0*lYQguKb+>Xz*~@i&ie_oc7$1NE!* zSI|oN?Ll=8C@hRIEbfoD9dDDG@&&$78&2g^GET^X_c zycp|3tD#P7Q%YGkh4~S_%@1GYY3f($&|BJD#p)s1PyyYuV$k&mbX|w_{d(BmuYk>s z=QwgP2g{AEiNkcrD5_${B2Aciguy?f4Ch_|v4r#AfZM&3p2F~y50n-z!|16q>ApQ3 zYb_jM9iI!kJCs+Fs&I_fJY64PdL7si3#<>T#RBK2=-hv}H}fNWo2S_ZK6eP`B`T*$ zwrZm{bkW`dP2V@rivf%h$Of7h8a#^U8z zXM6yM1J6<($VB9m_qa&kD9=8tfal$89P|yxYJF2EEz+RzDs*R3!YWg19J`!}Re@xywtCEu@a=ht&wYIU<8>`X;P253zyEQh zXyK_GY$iV#lTQ!c1?XA=hm1O$&iDj}r01}|`3N?b9$>>Ed*U<`<7Ui){G54E(a^;F z)$5_YQ3p%4Hwz`#xm|wtTpFh$jMueuhW+()oVc9}$7IU$*_Cj5R1dnU;BXSzKx=}o zV9@e=gKh)IiI`U-KPf7iFY{*p{P4QwvqxXTNP>!lWGlVFGu9`q3!?l+exTzo=o*1j zIbyix*TOaD9h_2⁡^m)SYy?dq!Zn!5-o_6S6Z^F>%&xOjMl>In_Br$#vP8vxI(4 z!@W3q{t6ru)8Tk82d-%)IFtJxXNqd!lrM%o?Qv|wUa~F-Ju%vI$M%RGZ`=ZM_bRS^Pd>VN%zu&vZu|GK9@jaFAtD_0C2&=nEjrL#W zoKmyrdOeO%ES<;!Tp!cgEUANkX%+mQzJX7EF+8(!;gOLE&-8ToWMm*9D+>YH*_1OH z;7@g5YWJdkPa5ZyoeTe>5{OFQLR3}_zZdoJpndB!?Y*{?2ifl%{U6u#93tz_JR12h zuRpp^Qvc7PU%p3R z=?errehlA7kKjjq{fMtG@%2qhgCCV#=k|cyT!?5~$cr+Bm486kyBY+&sfX`Nz@2P3 zN#Fl@u6CX;7Y~q`5y|=+c`%SF~W-@ZjeSsB8MixE;-h~T_D1QBO0!-|R!QBs1amoIVl z-8-DEtVDE0Ey6$1JiH^nmI2O`TaINB|Hz`6pT>US&-$4M^J!WK95YR8nSOrt@VXGb z^HIt7i7^CTM_L5!-b2Rvt6PZ5jy$COgYU`SQ>Y(t{zd^tlJN4*qFQ>63>EP{`WJf*dScqWa5m^Jo z)Qb^UUyqA*b-48TGvbNsrJ5R{jHmh~YL63(aUPVz>nLAWk}uyj@V8F=h$*XfC4JZX z2Yc4jsE_rse&)e^m>2W=BOg$g@UV^StB!=81l|Yue8Tbse@M1$y<@w`+|)@|Dv_8%(ar?g>r z%KrG2YUcvlBVSb`@KYVxBSz$BF`{U`>DY+y8ZkmD>f!&Umewwvxo&1w&(bwY`C;UE zzt-*A8?wAcuzc3T`dBaPXCBPw-{nt31z$C{gXdu&f#Xttnrt<uQRzHuRf$a11ji{{F`N7+stF=63GqaXg;iYl@lwC3jN$4^NXl zY!lBV^I|`J3vTCr9>@4=cy}f-4IZR8m5^xmTe69b^eBmzjqNm8qD|v(;vmsgV9QL} zN%U-NC!P|$o7#t1O7s&fp)t}EB>I2(Jyl{rGnv0Oley^c?If4|)$rG$?m&wczjSHQ GSpE$k?VslW diff --git a/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/shutdownN.tiff b/BasiliskII/src/MacOSX/English.lproj/MainMenu.nib/shutdownN.tiff deleted file mode 100644 index 61f5a7dd98c86c8695316bc91ca68cfb128cba31..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 9798 zcmc)P3Dnoqx(D!H4Y!kAMUh*}>PYTgxQJVlDO0B6pv=}~p=DT-BvXz^Su8^=L&uy- z$dECa%1lIrOqD6gOqvYuzRzc$|9b9 z^#V`7E?v4jaK;&DEWGKao6=*CJ(ga5_0{y=d+()>KmIs<^2sM@?%cU)&YU^vjW^y% zPe1*1y7ksuQ|Pv^Teofxv~1b3A3mW2zwyyOQ}c=Gwb#I^S( zn{0CLIp>^{?KySo)HHwo{Pg3GKdub?W!BL7_19ld_uqeiVvEf;-~3+u$*IUA_aD8g zZU2Xen*sanx8Lj$BSxeL9(W+f%ts%6l)nD@>-7Ei-)CB|U_tu!+i&x;FTeaU75eI{ zukv&Aixw?PeBqtXKKm@a^UgbI^5n_cCy_U^!^Z;xc(b5?)F%bMyjykcwbveY!U-oV zy6UQ{(%pC8oy5V688fncaU}j>nK^T2wyn9>UVAO;X>`x#=B@M2`|rP>^W^Qf-%c;R z^iq28!3UF^I`!037p=3-I>X2fBLCOKRyF?SZQ8UM-oJnU+RHAxER7pCF3WoAsi%@S znl^1(mjB|5FXnsCmPaqV@Iu{lYhix*<(Jbdue_4S=bwK*J^JXQ>CQXv%>Fp@%rk34 zkKuv8`LEQ2-t=!Cbz>0wi`P-3My0#%x-0AO_~VbKC!TmB*O_OZeKtM!+;a(zf{$*2 zBSmbav(7pzt`X;}}j~}0Iyz$0##T8eiLk>A)4jk}QaQ#xAiy`&r4?*i~y6L79 z&pYqDG;-v~>;rz5%X|($+rt4nj3wrcbcnsKj_S|5rwhNZfqlc?^3X#Mr3n)zq_Jbi zX1no!=gyrc2A&Q<@*F-mS9H-)U273O{PXFjpPuCK%{SkiZomEZjGr8K6AxkoR+#Ny zFwwL8-g@h;Q|x2OXwGx^_``2GP8T*{3qIu!df-D3`^WI%!&B?lt^W*H1>cH%K{qkf zJoe2_5d+gNy6B?p)7x&lE!}tDecAr(1wXl^-oRtc*=L`f_T6{ijE{Y{+G?w`<(6CK z(YX_q)C(N>|gN1B%ai(K7IP6-FDk8MNgD*!PB*C*A#t79^JFM`Q3NlJ?+2${@KTT ziBE|?>-a;>5Vve|-F4R`_6%PPhOdGX-s-FPV6}MIHe^q}{PN4|>Ja?mpZ!bhup#{X zyw_fP<-FZ)yX|rv5+7otS_k)@A9mPb$vXKSwoR8_dTI7&@rgC^ogU(r|J5lm74J-j zF9=RCQ|$}!m3`2-apPVmpM3J->#x5)+dvJ1U*3sn_9E}Cx86$XRj*#XGA1!kA9}$+ z-)bF7{>UYL$~N00s8wQW^ytxIbuoN_wfLesFXXy7Tc=g4Rzohh z;DQ`O>L^>lC4LHivcy>QYPs&fuYOo7U#fMG4|Jh}=cWG8*L!@z4&ugsjknk;`SIkF zPv$xGR()A(t+j^0S-}gpi$CmVa=!hB8*VuM>Z`BLx{Dz`E%-~HAO}x6>7=ydjyvYM zGi1n+oG)USzsQHTeolK%7whmo?X=Uf9?}2i{ZJ3`?z``1UFg9d)|Z%)-%;Rr((st^OCi4 zgwEE|Pi*(=*KaPI6})i6uSUs*c0rw@$62H=mB-?NJpRS^gAYE)dK`W9(YZ#lv;GEt zcKh(d5A)f^NFVWTjnRGeJbbXJH`cI8^p#nTb$VL*SjUI<4SQeY>LNHRc;SX$Ui@p& zx|O|72AJAA^QY@U}j-+c2;=Eslt*e~pP z;?>#CT72mtruaf^L?1s7&LDWJb!b_6)-CGH3_g=f-Yx!TKYEaH)KN!exnh{E=A17J z(TCo0z`W7D=Vi^pg$uJkmRbG5 z;^&`#PD__A&AQRu*&k-l%T-%jn{9i{F~?*-;3w|*nvdvfq&pwVb#d3BLx+)}L;ZYM zrY<#W)@(rRaZ5@a!Gr%{LhLKY;(VHOP%W{aRO5rwJ)855vHrYg`lQk?o^r}587Fzg zpY&h@b`ulP|1D|Wyt!{4_3P3y`$Nq4Jm{curtS?yJi#4LN2i!bOvUi5OK z;0vn1Pt!r)k^7|>w{Oy<$?@@xXBPj_q3|?{Cw0g^A;;wRPCM)J$?Nt(zDMt~(MB7M z(`)c;^~JyR;tM%rjqiSHi#||%^U0A%9+~9pvBw^pNB5rFNF0n3cmI+!V5S2E_to@(3k&bP>=Ywetdizng(m}1HOK<6`QGB>OC zeIL*v&hqo)d*29nD!AZV-Z_px?02gLIj?RSv}@3RZ@lrwW22{8T51KpF8A_}9&m^U zI=}{_J(6yP+!yTDSF1ldRa6x28R zu?ewH)>i8wriwqrLFozPNHt#PhHAZF7vJJvonDdsqZZXh&QBn}f&(77iVy4w^{?WK zk{27rg6=^F1oe$`?}V`5()#vtFV@r^HieB})GhrW%;o&S?rKcgH@#P%A0M-S)VhM7 zd^q4Kc_3y=F2~PhE_F74=Zn#KVzVH5bZAiDs10M|JUAcT>WfeK2qv{fErU~>=~ayG zJr{okdv&eA50B_`=Et{5@x%V)k`D(wErQ^Kb43^3)F@{>K3gy7zk+rPIxMJf+qP{- z9CzGt)7V>2P<@s7g2f!HV#Qc`j{3O0@0qw7Fkry6cJ11YAg3aaT=L<7XJx*(#M9w`sH!)?WljqDE23h zT=L<72d=;8gP5+ntZNb^H`WTmhduZ;=SPfvgv+-d8@8g3XzW9?vUWxx-i$7S@UF^^( zNL}MwHnLxeSN)4VQ9lV!&mh?P1c~hfE2DeQ&0A-^_q>k}e)!@~4teDMmRGe;ng(Ni z37PEHK4^oWje|M`bq*32zCRRl@40#FtZyIWeSGl4_qVituv_j$mxe)Pk;!g+-zun0 zkne@!`Hw;CRgrto&0A-^_q<=Q@`x|_yWz}!b&0A-^_e#wC zp4da|-&{o>IjtVyidpi52Ly5HN?w5#IzA5}c}{om)om%sk{*X*Yu N4I2D=iw2ePe*pf7`a1vs diff --git a/BasiliskII/src/MacOSX/HowTo.html b/BasiliskII/src/MacOSX/HowTo.html deleted file mode 100644 index 49fcb4c6e..000000000 --- a/BasiliskII/src/MacOSX/HowTo.html +++ /dev/null @@ -1,226 +0,0 @@ - -Basilisk II, Mac OS X port, HowTos - - -

Index

- - - -
- -

Minimum Requirements

- -To run Basilisk II, you need both: -
    -
  • A Mac ROM image. Even though there is a ROM in your OS X Mac, - it is too new for a 68k Mac to make use of. Any Mac II ROM, - and most of the Quadra ROMS, will work. -
    (Quadra 660av and 840av ROMs are currently unusable. - I don't know about Mac LC ROMs. In the near future, Mac Plus, - SE or Classic ROMS may also be usable, though only for emulating - a monochrome Mac).
    • -
  • A copy of the MacOS, which at the moment has to either be on - a CD-ROM, or on a disk image
    • -
- -
- -

Macintosh ROM image

- -

To run Basilisk II, you need a ROM image, which is a data file -containing a copy of the ROM chips from a real 68k Macintosh.

- -

The best way (i.e. most legally acceptable) to get a ROM -image is to produce it from your old Mac. Take a program like CopyROM, -download it onto your old Mac, and use it to produce the image file, -which you then copy or upload to your OS X Mac. -A good page which describes this process is -here. -

- -

The easiest way to get a ROM image is to get one from someone else -(e.g. another Basilisk II user, or an emulation web site). -Note that this probably contravenes several copyright laws.

- -

Once you have your ROM image, you need to tell Basilisk II to use it: -

    -
  1. Open the Basilisk II application
    2. -
  2. Go to the 'BasiliskII' menu, then the Preferences...' menu item
    3. -
  3. On the Emulation tab, there is a field 'ROM file:'. Either type in the -path to the ROM file, or click the Browse button and Open the ROM file
    4. -
  4. Click the Save button, so that Basilisk II will be able to find the ROM -each time you boot it
    5. -
-

- -

If you want to test this, press the Run or Power button -(in the top right corner of the 'BasiliskII Emulator' window). -After a few moments you should see a Mac screen, with a picture of a floppy -disk with a flashing question mark. That is the Mac telling you that it needs -a disk to boot from.

- -
- -

Finding a boot disk

- -

Basilisk II needs a copy of the MacOS to boot from. Anything from System 7 -through to MacOS 8.1 should be usable. -
(Felix Eng and I have only tested System 7.0.1, 7.1, 7.5.3 and 7.6, -although Felix also got System 6.0.8 to work with SE/30 Roms)

- -Basilisk II can currently boot from: - - - - - - - - - - - - - -
CD-ROM Most (not all) MacOS Install CDs will also boot your Mac. I also think - that some old Norton Utilities install CDs might have booted 68k Macs
Floppy disk image Jonathan C. Silverstein reports that - this Apple floppy disk image will boot Basilisk II
Preinstalled Basilisk II disk image Another Basilisk II user might be willing to loan you the disk image -that they are using
- -

It is possible to use Basilisk II with a CD-ROM or floppy image, but -because most bootable CDs have a minimal System Folder, it is better if you -use a disk image with a more complete MacOS installed on it. The next section -tells you how to do this.

- -

Note that there is currently no Install CD image on Apple's Web site, but -they do seem to have MacOS 7.5.3 floppy disk images (all 19 of them). Burning -those images onto a CD (not in the extended format) should allow you to install. -
Thanks to Attilio Farina for this tip!

- -

Installing the MacOS

- -

Create a new BasiliskII disk

- -

Before you can install the MacOS onto a disk volume, -you need to create a disk to install onto:

- -
    -
  1. Start up the Basilisk application.
    - (If it is already running, skip this step)
    2. -
  2. Open the preferences.
    3. -
  3. Go to the Disk Volumes tab.
    4. -
  4. Press the 'Create...' button - (go with the defaults, unless you think you will need a huge disk).
    5. -
- -

If you want to have more than one hard disk available to Basilisk II, -you could create additional volumes here.

- -

Installing the MacOS

- -

Insert your MacOS install CD-ROM, and wait a few moments for the -OS X Finder to mount the disk. While still in your preferences:

- -
    -
  1. Go to the Emulation tab and check that your emulation is appropriate - for your install image -
    (e.g. I had to change from Quadra900 to IIci, - because my generic 7.1 install CD didn't support the Quadra), - and that you have the RAM size set appropriately -
    (e.g. 8MB RAM may not be enough for a 7.5.3 install).
    2. -
  2. Click the save button.
    3. -
  3. In the BasiliskII Emulator window, click Run.
    - (If it is already running, but showing the floppy with the question mark, - press the restart button - the triangle in the bottom right hand corner)
    - You should get a HappyMac, and the emulator will start to boot from the CD. - You should then a dialog asking you to format a disk.
    4. -
  4. Click Initialize, then Erase, give the disk an appropriate name - (e.g. Hard Disk), then click OK.
    5. -
  5. Find the OS installer (in my case the CD booted into At Ease, and one of - the first buttons was 'Install System'), and go with the defaults.
    6. -
- -

After the installer finishes it may try to reboot (or you may need to -force a reboot). When it reboots, BasiliskII may exit. Start it again, -and you should boot into your installed OS.

- -
- -

Mounting Unix Files

- -

If Basilisk II is running MacOS 7.5.3 or newer, you can easily access some -of the files from your OS X disks. Just set the 'Unix directory to mount' in the -Volumes tab of the Preferences. Next time the Emulator starts up, a new disk -will appear on its Desktop (called Unix).

- -

To prevent clashes with the OS X desktop files, I suggest that the directory -you select is not a whole disk (e.g. '/' or '/Volumes/disk'). Mount a -sub-folder instead (like '/Applications (Mac OS 9)').

- -
- -

Importing Mac Files

- -

If you are not running MacOS 7.5.3 or newer, the above trick won't work. -This makes getting files into Basilisk II harder. Luckily, Apple's 'Disk Copy' -or 'Disk Utility' can create a disk image file that is compatible -with Basilisk II (i.e. you can add it as a disk volume).

- -
    -
  1. Open 10.1's 'Disk Copy' program, and create a 'Mac Standard' image, -
    or 10.3's 'Disk Utility', and create a 'read/write disk image', -
    or Disk Copy 6.??? in Classic, and create new image
    2. -
  2. If the image is not mounted, mount it
    3. -
  3. Copy any files that you want to access in the emulator to the mounted - image
    4. -
  4. Unmount the image
    5. -
  5. In Basilisk II's preferences, go to the 'Disk Volumes' tab, - add your new image, and start the emulation
    6. -
- -A new disk should appear on the emulation's desktop which contains the files -that you wanted to access. If the emulator complains about a disk needing to -be formatted, you may have chosen the wrong type of image type in 'Disk Copy' -or 'Disk Utility.' - -
-

Networking

- -

If your Mac is networked, then your emulated MacOS can also access that -network: -

    -
  1. Open Basilisk II, go to the Preferences, then the Hardware tab, -and set the emulator's EtherNet interface to slirp
    2. -
  2. Start the Emulator
    3. -
  3. In the emulated MacOS, open the TCP/IP Control Panel and set: -
      -
    • 'Connect via:' to EtherNet, and
      • -
    • 'Configure:' to 'Using DHCP Server'
      • -
    -
  4. Restart the emulation.
    5. -
-You should now be able to surf the web, or FTP download software, -in the emulated Mac. Not sure about AppleTalk networking, though.

- -

Note that this does not require the OS X Mac to be using EtherNet, -any working TCP/IP networking should be fine. I have tested it over -DHCP EtherNet (ADSL modem/router at home), and with a static IP -address at work (which also has an external web proxy/firewall).

- -
- -$Id$ -
-Written by Nigel Pearson on 26th March, 2003. - - - - diff --git a/BasiliskII/src/MacOSX/Info.plist b/BasiliskII/src/MacOSX/Info.plist deleted file mode 100644 index 31a02329c..000000000 --- a/BasiliskII/src/MacOSX/Info.plist +++ /dev/null @@ -1,32 +0,0 @@ - - - - - CFBundleDevelopmentRegion - English - CFBundleExecutable - BasiliskII - CFBundleGetInfoString - Basilisk II version 1.0, Copyright © 1997-2006 Christian Bauer et al. Mac OS X port 19 - CFBundleIconFile - BasiliskII.icns - CFBundleIdentifier - - CFBundleInfoDictionaryVersion - 6.0 - CFBundleName - BasiliskII - CFBundlePackageType - APPL - CFBundleShortVersionString - Basilisk II 1.0, Mac OS X port 19 - CFBundleSignature - ???? - NSHelpFile - README.txt - NSMainNibFile - MainMenu - NSPrincipalClass - Controller - - diff --git a/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp b/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp deleted file mode 100644 index bb463c658..000000000 --- a/BasiliskII/src/MacOSX/MacOSX_sound_if.cpp +++ /dev/null @@ -1,86 +0,0 @@ -/* - * MacOSX_sound_if.h - * BasiliskII - * - * Copyright 2006 Daniel Sumorok. All rights reserved. - * - * 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 "AudioBackEnd.h" -#include "MacOSX_sound_if.h" - -OSXsoundOutput::OSXsoundOutput() : - player(NULL), - callback(NULL) { -} - -void OSXsoundOutput::getMoreSamples(void *arg) { - OSXsoundOutput *me; - - me = (OSXsoundOutput *)arg; - - if(me == NULL) { - return; - } - - if(me->callback == NULL) { - return; - } - - me->callback(); -} - -int OSXsoundOutput::start(int bitsPerSample, int numChannels, int sampleRate) { - stop(); - player = new AudioBackEnd(bitsPerSample, numChannels, sampleRate); - if(player != NULL) { - player->setCallback(getMoreSamples, (void *)this); - player->Start(); - } - return 0; -} - -int OSXsoundOutput::stop() { - if(player != NULL) { - player->Stop(); - delete player; - player = NULL; - } - return 0; -} - -OSXsoundOutput::~OSXsoundOutput() { - stop(); -} - -void OSXsoundOutput::setCallback(audioCallback fn) { - callback = fn; -} - -unsigned int OSXsoundOutput::bufferSizeFrames() { - if(player != NULL) { - return player->BufferSizeFrames(); - } - - return 0; -} - -int OSXsoundOutput::sendAudioBuffer(void *buffer, int numFrames) { - if(player != NULL) { - return player->sendAudioBuffer(buffer, numFrames); - } - - return 0; -} diff --git a/BasiliskII/src/MacOSX/MacOSX_sound_if.h b/BasiliskII/src/MacOSX/MacOSX_sound_if.h deleted file mode 100644 index 5cfdd438a..000000000 --- a/BasiliskII/src/MacOSX/MacOSX_sound_if.h +++ /dev/null @@ -1,41 +0,0 @@ -/* - * MacOSX_sound_if.h - * BasiliskII - * - * Copyright 2006 Daniel Sumorok. All rights reserved. - * - * 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 - */ - -typedef int (*audioCallback)(void); - -class AudioBackEnd; - -class OSXsoundOutput { - private: - static void getMoreSamples(void *arg); - - AudioBackEnd *player; - audioCallback callback; - public: - OSXsoundOutput(); - ~OSXsoundOutput(); - int start(int bitsPerSample, int numChannels, int sampleRate); - int stop(); - int putBuffer(void *buffer, int numSamples); - void setCallback(audioCallback fn); - unsigned int bufferSizeFrames(); - int sendAudioBuffer(void *buffer, int numFrames); -}; diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/InfoPlist.strings b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/InfoPlist.strings deleted file mode 100755 index da3ff3eb0..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/InfoPlist.strings +++ /dev/null @@ -1,4 +0,0 @@ -/* Localized versions of Info.plist keys */ - -CFBundleName = "BasiliskII"; -NSHumanReadableCopyright = "Copyright 1997-2001 Christian Bauer et al., Freely distributable under the terms of the GNU GPL"; diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/classes.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/classes.nib deleted file mode 100644 index aee209e43..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/classes.nib +++ /dev/null @@ -1,118 +0,0 @@ -{ - IBClasses = ( - { - ACTIONS = { - NewEmulator = id; - PauseAll = id; - RunAll = id; - ShowAbout = id; - TerminateAll = id; - }; - CLASS = Controller; - LANGUAGE = ObjC; - OUTLETS = {myEmulator = id; }; - SUPERCLASS = NSObject; - }, - { - ACTIONS = { - Interrupt = id; - PowerKey = id; - Restart = id; - Resume = id; - Snapshot = id; - SpeedChange = id; - Suspend = id; - Terminate = id; - ToggleState = id; - ZapPRAM = id; - }; - CLASS = Emulator; - LANGUAGE = ObjC; - OUTLETS = {barberPole = id; runOrPause = id; screen = id; speed = id; win = id; }; - SUPERCLASS = NSObject; - }, - {CLASS = EmulatorView; LANGUAGE = ObjC; SUPERCLASS = NSView; }, - { - ACTIONS = { - Interrupt = id; - PowerKey = id; - Restart = id; - Resume = id; - Snapshot = id; - Suspend = id; - Terminate = id; - ZapPRAM = id; - }; - CLASS = FirstResponder; - LANGUAGE = ObjC; - SUPERCLASS = NSObject; - }, - { - ACTIONS = { - AddSCSI = id; - AddVolume = id; - BrowseEtherNet = id; - BrowseExtFS = id; - BrowseModem = id; - BrowsePrinter = id; - BrowseROM = id; - ChangeBootFrom = id; - ChangeCPU = id; - ChangeDisableCD = id; - ChangeDisableSound = id; - ChangeFPU = id; - ChangeModel = id; - CreateVolume = id; - DeleteVolume = id; - EditBytes = id; - EditDelay = id; - EditDepth = id; - EditEtherNetDevice = id; - EditExtFS = id; - EditFrequency = id; - EditHeight = id; - EditMB = id; - EditModemDevice = id; - EditPrinterDevice = id; - EditROMpath = id; - EditWidth = id; - RemoveSCSI = id; - RemoveVolume = id; - ShowPrefs = id; - }; - CLASS = PrefsEditor; - LANGUAGE = ObjC; - OUTLETS = { - CPU68000 = id; - CPU68020 = id; - CPU68030 = id; - CPU68040 = id; - FPU = id; - IIci = id; - MB = id; - Quadra900 = id; - ROMfile = id; - SCSIdisks = id; - bootFromAny = id; - bootFromCD = id; - bytes = id; - classic = id; - delay = id; - depth = id; - disableCD = id; - disableSound = id; - diskImages = id; - etherNet = id; - extFS = id; - frequency = id; - height = id; - modem = id; - panel = id; - printer = id; - width = id; - }; - SUPERCLASS = NSObject; - } - ); - IBVersion = 1; -} \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/info.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/info.nib deleted file mode 100644 index c3bc04473..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/info.nib +++ /dev/null @@ -1,20 +0,0 @@ - - - - - IBDocumentLocation - 5 42 473 240 0 41 1024 705 - IBMainMenuLocation - 0 702 365 44 0 42 1152 704 - IBUserGuides - - About - - guideLocations - - guidesLocked - NO - - - - diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/objects.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/MainMenu.nib/objects.nib deleted file mode 100644 index 25afc5f2a1473970e433191774cb77dabe798bab..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 19336 zcmbtc3z$^Jm9DxyJ?~)v5g*9XD2SjU4}*vgW|$F}4`+C^Ad5up>A5g1J>6}04+9#F zHFUS^>SwffXko+*f+ztYfRB)%26c5^HwL4UhpYKao46)KH^!)WxUm1Jy7zW<&%-f6 z=(_ius#8_xRi{qXwWuP#K4P}S;!)GrCR`sRcugXa7}Dfzn6t3?Cet6U_r-mJy_-ms zHhC3}H9|8vI#h{ZTWpMp_$<`qr~V zq69;ek6qn7y(5)OCOH>;o8a3SQ)N1-{!4YUhZ2vX)^@7JP72;5csJFeGQCsPN))5V zfZvarE*d1JZjGuTZnm+mLnxqgSfa=pS#fPkOZJXOQXmB(%!Ncw?dl$va9=llhX3oujIlHE@5D)VHEU;n z7GN#R$L6spenWURL5Z)bN^n0rzz?tk#b6jZnguONrk_ZZ#bSYgpTRp*oi!&D zo42r({7ELB?mi1WO`EBD8lifc52``77Qb=y=V!kCRiI4N8T2WYPCV%_M(|TzE5Mo+ z4r_K1SHAaHZlZg^{o*BNTX?ORI-E=%lp{Oxc%S3>VFCH;TsMOFjRO-etAlaHP2!Fm)c9dr(roL(!7!Y`f#QTqnNzWM zeGE31f^0|nl@poc^RHPQ4Y!9{WbIVqodd3fv1-+Z*^_qf;i(jc&Qlf}$fi_>R=01d znWT@A8C2aso+%nq!)A&<7WX6*1Yg94V#Gt$c%kYkW!1J12$~o}ds_%@vy^-iO@-7j z81}C*TT-5(o?aXx8$C<&? zH8qU*^2~-ScN0_aT>SJeLAknBiix_;aqk&0ER{<9?y=4hQ%}@%7D4QLVYhDSz;n8u zd_mFV8oi;GP;vzSkVMvj(J?y=<&!_Deo`*uZD)FAtD^x;EuPsh8*{kOq3|~_G2OVzH+-#S4Y$bVrx7NB)OO;9`>}sGUKE)se>*9 z42L4*uYqpmWw16rkS?*-J(|c3BdN<9My5+thtfkrC%bMwQQOHNyuHUA`Io)G9hsjJ zhcXvBg->!SUq*PP?9k10GQnrjpq_L(7wliS<^J`q3)hyiIni)OEZ_ZC_wS!cK9bS% zC7b7`-8z%Y!Q7RS#Vc(Fzg)oBsY^qFb)J?$6wzBa8qm1wId5&i=eY_Ime+Hxr_twM z==EGOdB#M^^%BK(sUBkmzf15S^+Tl^06DQOTPmg4mXY@|V>xD3TK25?^)9IF0Iwc< z1TA_;Hlvgzv6MWR9<81cAH9|yleY-Hksh13?EEx+j;h;xojE5b`Q)L*FK8LbYde8v z#W5Ra85xTf6X>61wEg-0^Q^g#PbIRFW`PykZl37n-2D4Tk{fDw+{?--qSif^(NN#N zo9f$j!e23-9-r?QH`H~{%TY(jCQYhBO1|D)8}R3QLr3Q;lp9x4`Xr@0Nl40a++TeS zp`gxMLtfx-O9wkXMGp3F{W;K^NVgW=lqSB7r+<#~JlPkUhgG9NwWfqP zOO9V8q3Z(Ly0sl%vAtS$lix1q6VFRel1fiL@f$R(8^4hrgCUVpU6#HAC2IUf&J&Ug z7-RV#!44Z%cu7rU7k!17RtW9*q1pZ0e;#>0Vo>A@qu2WW$I;)HiJ@^ORgYkFv(As|wj#aiun`}uh&@Hk8cDPPj|}_=q;b9liV_#+F~C&nKA}eog>?X3d%=d2ZiZNN6QW?EkKTzqYy zCEhB%2_-xP+t?=oPHPefyq4d(WWE_#-5R%=r%wAM*)Ii|4N2y;-@K(*?(pp1<+>*w zZ%*Pzy?*#d|1h09v{B6S>D7oOBSGJKPt;r$HDj$ghb~x`?i~e7ID8lE=;#PIAIazZ zk8L(b^4Z)UXXLyDyZ^O@e7+)+;#+UeY+$bRZe2b%YTn##hWs{#!LU{zz#v%5>t~(~ z)}B2uYu)jHe@#qh=uVxX59HX%>pc@dZ^D<*n{P(rx9IeC>GTBHX$!x2v0(Q~W4|}g z*poj#1lM7}66OzQyt5uboU#NsfpK;STa3-FX@>NU_E?7h^5wOb;ghxsvRNclm-t!& zVU-U>_yR2iwS+_M+CZo!+)+S{-@Cx*l+=zV1=|m6Kkbvlc1lpXBDbWPYnFUmpb_hw zKXdWPq}51zF~JVzDgKr2vrmO=PAydXzLsslp3;}eoJibd(;<-QeG8;iItZkS>dlDd z0F-|e?2s;z96595B#@ibH#xaK1}BRnfpumuPhk%CLvGC9NAB5v$Q2Jln~RzQ@w~A; zmm}sZou*tm&2(H}ItBX(i|2Z|c&<-xSE#~3cF4S_FVY(D$1cKx5NaX0r`B3A>^54- zXoZ8`LR)@TD%c*W+g^iy2Xke`w&8d@MFZEi?zJUl! zt~(Dny}3s>LU4`4^7^rTsI3R(bHd@cXKpmyCY_e83$NrDM5{y6A-cGG z@Tl6n6lN}VSju3BC_QqkcbVMS?3P*~*lwE_g?drhh*N>+`imL^G5=(#6+KET6ty9= z*XVInO4)w8i}`T~axECAZgsTHV0Z%9hkN zdc1*K^lgP;@AN~lxfT>_dsEc6S!H#LmU`$&Fi)G_?VBP_Cz>r4Eu6DXvmBWwr1x6P zU>?!;`X;*Y))wr2T1FPKvCDU&R!`*#_I|$mv?WneaV6$?<(JHp>~a;-$azEhpzk3y zl?e8%+>kxndsuyB83jA85ADgElJH?TERqLCI>QFD0TS#(X>jU@Oa;J6`#8#;x?uly z8BCZp4bS7A9%Ywa8;G}h<}O;Q>)^-zyCd=)Hu(h;Y8Eh7vp^>6sYD9T@l z-7{uRnKDK1@l&fuZBds?alY@McGFZlLq)P^*K7Ii-DbLK>-d`fu}(xTnu$ zke*|u;FYs{IA!(C?8QtMG1I3p6S+}6s41xn`fzIMm+Vv?l^cU%XDJzCLxVpco4Vyp zsp*$+w0v>9uO;g9TxyAMNdFE00T%Hhu;?MFYX}SFW>WAf%exu|o6Zmur2*2GcfszO zP;?1nMVHuIe0f9hh?S-CM~mw>Z*k#v0L>aFO4Su~o|8&<=ezIU-Z}~tXp?We;do!;9c=_`ZLI45Ty-8o0plUXn-Gi^NGkHD!? zqZw+a%L9V{1-n+cM>4_>-XlRhf z?Xv>1W@VGv;Za-saFlk-Je2BWLmBJ*=E;*MacFy6=5|2oQU`jeYc>6A+I&baq-+c} z;Dl*J^w{E!W42E;6S#=|h z+1n6i+D$QF-Zs#*a@`J|^Qy1mbLiF>F@g?-v9H0Q@IWIa*$lyb3^l13Iir+fX=Pn7 z9LpPW$3R0Cygnn?>w>+S>DdNGUrhj=xj6fz+)l_XrEu z3VT+q;SOatgYX1{8k!Wk;EI0r;`TtENJ;l^9!QahJC)!L-EuTFeXN!f)RcoLwGKoH zW5}#q3$6TIuuq|qMh~95)>0^dbysQpHD()9sBu&9KX+k)59IRBeixnd?GpSYn+lL8d%ObQU9V6%HbJF~mp zo-BgS3p~ppSll}FOqo2hyw-z+uX%wybCa186`6WWdD;+;mY3IsBkQA-r1m`j9naKD zFTLc#X;Y?5_0+XS1F?9(7lM_wBSyg4nlCt+@~&oZJ)K1&OW&;SpO$}x%TV_H!7>DN zRtkm3b1|58=S`j&5P#0xnqvus0l#41c{Ss>a*4~RSUPaOlQ$ra-LmCWT${vJGX$>@ zThtuJamzK>VW(21NG9EZzhI^;3)m^|*~vcT5dkjGFqKqMK^ZR4X%}f5Z~;T6KoTw- zKrn-)4scjxzU=OE3-hA3!1)UYMy9m95l^^JM$2dktSR%^F+6obhf(c8Wb^af zJxt-MmOz}`e5viJHcB^Nv=mFMj0tWT$a)JJEitV|D+bqS@C&CJm8%Y?W#m%U4M<<` zJM#yIxEVJkWy`e#wzS-$>djpjg#7zlNecb6YEbUQ6;*#+dTJV_Z=k;HsHlj%fE=2C zpz4BegaqH~$&49|as!0VXOo!Y+wpo330nZX`Aa#r!hw)<&Q_$KOo6x;8`&xpJ z$&C#NJ1ZUPVlGNg25PafpoJZ!4b-N-piR+yGZ^WU;c8sYTCFN#TJSw;2ew-dv%GOV z{Dnu7AqmVLh^2IoniyY!h0I|U;wr(f8EDYn6j)s^_#>Hp#Pml5r%(#%R@fXnO0kvT z_bG8bOJc%p`E8j!J2GeNz{~ln+6lGTT`u2vGg)qR37WqvW8KitN{nj3-Drq=`S!9l z(q3sA8a!GsMKi$puN@QHtJ}^b|E2Coh}0wGs4J*#%&HD|A`B*sk>pbNCN=8!$(!s@ z(<&n$vQzK_7~Eggpc^P?Y+QgkSS5F4jvUO4Is-2)Gzs__!P`(=r`~pBamL$)YMy%q z-<`Q|JV+fP=k?0=Oo?oc#%OUa=iu`g} zun#C^*h9R&OU>Z^wV9QTnQhxMuN(yCFk#M-ov^*iQr1a_$fv2E5kHU!;|ln&d}E*X zWX6uktc`=fozlzlD&osMY5?6-ym&A(ek@?)6qzF8)e@S(OE5~_D5Gt@QSgT|WhI%} zV=@Z~_ZAKId^mB%q%EeTuK`4EpWdhj~H45lvRX6fdnUxqMeei)xr1G@<;;E_30>IRl zDyhsgJmWhXd5<3V@o*U&6_A?%*fn)3J+nLUjH~wcB>{=QRKdt~Q66X-)q4jp#2`*r zsMrIL^~nrTy;`2o;Gqq0Yq`vEcvoIY2str^#_l z1k{)++0s?ehNi=w1CZEmi{)#Q)x5Kyt{nb@02c6{y{}+Sd!qSXLE{;z%ou>2X_n|O zuov}8Vnu5{8}sF8;#OcJD$)59cmdZHU+`Y9zsuR(4G0o~wsH`qYDGat@EF!nyykuU zLv`j+Z*q3e0o$sF9xW6U1Fl*yBb$b2QYqWLYa!z=A5 zYzwD4jOJ5F4vrg8_cVA5S%+psU*_1VP29z@@;r)*fhwMA)x1#A(mW5n008-AjK*OKD((YR zliy^#LZKvuzv8(!D^>uS*Y}G6IP#IhTLuVbXft*u&5%R_AE>+=vEeS#1L-O52MRl5 z8Y%ki#+z;}G?s0EDNdjP@d^V_bDb_ndKe&`eWa!A3q>fW7|@;ZfRW_vZ>mz62q5{Y zLdL|W0qmA?q&E_z3qqymxJ4o-{Mmpw15z6DDL~q6$Kn;^Q{R`^UgKi`9llA@QvfNV zPN|=Jh(GYYf|miDCkKqsayfYvIXUXwpvMsbNva5Nbf4oyDzikKAz->d$eFRX3V@Q)2=T~n&IQh(K@fYDs3m$ECXw4h zfXJ)BYn(-tOVgABKU6>;%=-;Mz1MzuU7~;?2x1gv#U>o-BW^p zFS8#oJJz6^oQ^du#f!cID(}HpQyp?8G~Hu($yZ3SFJ1ph!~KBeG)ywaryANehDw4H z1M(sz+Lzq=-}oE}o0O%LTS0=PDbQ?1bSOgd(-m65=u>2cQm|oNPYYZ>1q+J&?YO{5 znlIEv zjZ~%DhtGsVtIdXxOi*hSW~(0QO1TEToS;LZ?IAi=xZ1ZKSz-;lS+?=hhFXK(MNl`= z&0!6Aj|4`MO3;9N30Q{HkPh10X^44*sI;a-secW(n!>DdoH(g7Aq~^K3Gy1*ifpV* z#%ejHm{w~E)pAoU4cH=^wucA|&i2!^E{Ud9*05xf-XZaX(w1_3FQGm$axgC{OqKeU zwgCBxg;bxx79fvUNcE9K0TSW5v`_Vo)>ZUrl+z{lcZ4ga_&y(lEfQf)scR)Iux@+F zyJJpc+8O1VTeo#>EkbTe;wp%=eHYh3ZqXWA*HInZg9Z_@JnSE_8Fmt*hoX7 zb;3=Hgjcx^2~;~RcL!am&I417UEC_~O6S2Th;idSlW%<0sK8l|T-3OG%@J4Kffey1`?!lznW;N9iL_8ZU+`TnS0N zagNRl72MOk1HD_?k(J^Wn7Xo~WB!`M;8Ko`p_s;MgR3_>hN6E9g9|nqhEsrCBrl`r zP?ArXx^F_)O>`863nhN*?u&+y`<#kqT!W-rkaSB?N4}0$=gyLoFH{$xRvKp^TCy_$>C}GqD zgpn4;MOk5dQy61VtVcdFi!6pPuFDGeWhPKGx`Ej*jDskCEL=R>DvaM|k(oRb$k|P( zk0s^9Y_~8T2H--$??AD!DtlD$2eZ?J@e{PW0XeJe8EB7Z6AiNakc-0eK4Ba{?UBM& zinmvUaT3M93*!p_w~fY6-3S1731bh6j4&=iZ?6mEPrzJDzW0PhI?G~U{9 z_>(<`*`OX+Gz*~3D}X*Kj6Y`M!ocv^OTzdV#mB<99_ZCLnaW-WZs0j8*aK*IP#BM+ z__=TuqaIdT!u8C=&kDi*7e#kP7V*S)Q0E82_zZx%VtD@gt@ycD7?V*P62|ucF985= zKNT)_cBwG_2hTBK49m{OWI*~;h$lN%7)P>8gz*Q|KS#K#vZICZOm@65zMowSqNs-8 zxJ zGF%utF(w3d|AjhG;r~OiTNsZ4hye6G6o~djz2+Xx>(FRF(cofzp_y+)eBwXj< z4QBw*H1?L@hXKqA7o=~%HNl7sNbD)JI~`&(=0VuFpv0cYmIzM0yes%KC=j%Ml=Tba zgDhh4m08RP5@HBde~3n}2^UE6i-n8GJqAaXT>-7b^ZUXD2V=Y|Tq9BV1>2mhhvMS- z5n;fRaOh(6;O)9w@cachg<_}R#P0=TL2_>xKlioc^=;vTXpzxpWHD)w&|m?_wIf!r>PIo-lFuA8N??HbxJr!MRd`{qV*BS3zxnfiZF C3$ywF diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Collapsed.tiff b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Collapsed.tiff deleted file mode 100644 index e4647bbb7671104bc0058766a208c68e3c2aac72..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 870 zcmebEWzb?^U|PdK8L%Zo`xKy_J|I>iLGON`S`c0Z#Cbr>2gHN`Ob?7+2h`vX#4LC; z!qlSE^MQJdftVYMUUap{{GCActt99n#U4`pLrS=j6F=mn11!OULx`7=fq@w)$H>47 zBp8v{Okg%JMw$H>nW5r9#f)rFHWQF72##@}C<6zhC{!G%gHaqN&a{M4ih&huJ_BiRDkn2wa1B1E%1C#~;K3plk diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Expanded.tiff b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/Expanded.tiff deleted file mode 100644 index 819a88f0b74b93e6599b8685a75e65ff98199a98..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 870 zcmc&wu?_)25Ph?YT*wK9NKk2rR_zmxM4|Kv_YE4YO0Q9g=v979;mulXTI0I(5JQP zd6=;odbIwA5(jpq`ZQ`?1Y-`JNsUEOw~SUxX^`I8_wF6Ra8RIJxIEES&{ x=1q4Ys)(fJbvmT|(9K>tD7*cz3+X=drSyWG!(iw9rMt64xPR5_3K%rt;|*=YDZc;! diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/classes.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/classes.nib deleted file mode 100644 index e78b85725..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/classes.nib +++ /dev/null @@ -1,32 +0,0 @@ -{ - IBClasses = ( - { - ACTIONS = {NewEmulator = id; ShowAbout = id; pauseAll = id; terminateAll = id; }; - CLASS = Controller; - LANGUAGE = ObjC; - OUTLETS = {myEmulator = id; }; - SUPERCLASS = NSObject; - }, - { - ACTIONS = { - Interrupt = id; - PowerKey = id; - Restart = id; - Resume = id; - Snapshot = id; - SpeedChange = id; - Suspend = id; - Terminate = id; - ToggleState = id; - ZapPRAM = id; - }; - CLASS = Emulator; - LANGUAGE = ObjC; - OUTLETS = {barberPole = id; runOrPause = id; screen = id; speed = id; win = id; }; - SUPERCLASS = NSObject; - }, - {CLASS = EmulatorView; LANGUAGE = ObjC; SUPERCLASS = NSView; }, - {CLASS = FirstResponder; LANGUAGE = ObjC; SUPERCLASS = NSObject; } - ); - IBVersion = 1; -} \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/info.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/info.nib deleted file mode 100644 index 8c4ad3392..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/info.nib +++ /dev/null @@ -1,20 +0,0 @@ - - - - - IBDocumentLocation - 18 42 473 240 0 41 1024 705 - IBMainMenuLocation - 0 702 365 44 0 41 1024 705 - IBUserGuides - - Window - - guideLocations - - guidesLocked - NO - - - - diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/objects.nib b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/objects.nib deleted file mode 100644 index a1bd5ec9c1220688221cbb813122a05b3bfe71f9..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3069 zcma)8U1%It6h3#d+3cp9+Sn?_`qN@X;%`%Hk)pUsv>LUW&G!jK+^tw72Z2BSqS4S?VNk-j>VDkJX?pQP4HP z$l&`(MW0aNB2zmu<@c)S^r6lwZ+)p}$LM|nfWP=61US*i49o~q(u|y9@b)IO1m86~ zc&nxr3L20?0V1`CVPDyCOaq-wqjM6&ZlM-c;={-?BX9Ne0QB_Kr6hDs%c5F|h!oII zi^azxgnBhcHw|&_i~=A&^sk_dD^yhU1-TN zIMby}rG~RtQ6UIj*X8nYq~i>V=^JYC#Z)oNmPWg)B6OGr1LNu#6;Vsu2g^>uoG@~p z$3OSKXeK@7Vd^2SA2z{vkdgO?w*m}rt-<$!K<=aC4KO}J87=$DhWDxKei~UncT(6) zrq1xl=GGy#Y*X(P#$&Dc<;3dP{HyRbbjMLGr=egWQh=a5p1pdCeR!OIwEa_3mvTarU3qe7#0E*3x?&9RM92*AC&S zdhE`{(4JWfZR&|bB^BFGp^-TK*ss)*El6v0GI%p{03AAT4TlgRfp02r;QfPU6TC|` zhpKgWW!lJ&S=2=XJXX)p)Mlp(!0B4$T2#mRh*eZCg9{(ad_|>EvYZU=#dz)9DdV;6 z8u5brU=T(yhB~~81x!z5;!+hIN@n^pZ!6%V>-r(|Gc8;h9ev}myN?|w7{Xs>lJmbJ+lH7;SkPcS4annFTuyeo*by$& z@g7Zgp$lEBUHEB@y~?g8gD=j(&%dFlh1G&?Nk6?F;OX_NuvjZ--5yIFr}hIj)$aGO z%C>#-f12uvb#a_B^*CK>7=bjGq?xjbk#EJI6aVFytKi_}9GmF#x`8cnn2wil;!#Ha zsPYb77n4?YWUWn%$rgEcYWpGV{D&MsN1g$3~Z^*N)ZQ~QBt0VxtEBhXW$Z^ z5aQr&mUx{hU(S%zk+2IDypW99XOz>dWd~DcJ^yUrF9!a(z`qpu=L3H^@Q(!kT;N}x z_Kybs#lT+*{Dr{hzG(NUx^~x__Gg2j(+`ALxl5ohJm9dDbMGO~Uu-__@ceVl=UtwE z3D3AW)Ke5$&LgQg$31@;DPp6Eiq7+o$UBW~!}F)n{mdS{Nbj<@3{Dt0HT^kxNm}Ch zm+@G0-am>5(&PCTrKGxcBrPGS?!ZpZUuZt#_bYgAfZ)$IfBj&zH=sMU0ZJXLrB<{Y zKj0!ZKq{A!^0v+iywYdr*&56SA@mwBdRq*ts%2W zMJL!ezapG!nb3{+D1b@Ynnh_u;rxb31qu?|UtJ#R*fhT^9LeNMlot9As>T@I9Sad) zx7va(2%G0;1!Fo|MV_IP5!dGVrHEK-urYBi5;<&+jTLF$!Q_tV3xb}C=WI+{6twpG z1dOR?BTgJdVh%+#baGB`T4iI3X zGJ`AOA|ro>-AqY`7a2)}ml$acZ({I6c!a@XxWLFtc$vZ1;ayBgg=ZQ0E4+s(cZPQ| zr7gUX!BTi1Q?`e9FeMqT;L;dwWyA}wXYgHk9&0r`iYrNYJ0os*DO+r$493 z&@i%M$kDYkq04W8pYwZ3U;gg@vq^X}udbbBI{zrwxxaRgKI6Rm4_$ca^D(=GV<$T_ zO#I2KZQPV24f11kg#CvuzSN`7H{Nnx`fGE4(Rc0ovQGa?eOMOTlI$$=74g~AyWjN0 zQIife&QgiOdfgi^I#LS9QxD)7_87h~PvI5*1kQnVFmt(&t;RW+w=NNXo$A!sXW*LRf_$H-8*u7eCe9j5fl-xPhZY*z-1j#a}au@M*YfxIf9>fCdrEz2da{6C^cNB+Huzg_=H2im?|;)n0I#Y1u56)d;U z#+qY=SbyRUHhSN|X0HOMd)>x1?|keaXq?Q)PM`PSdkwnZagzF+EWlRpLTvHAi%s6e zQ1d9l%A>cjz#xg!2MeQ!g{uMoRW7h;e99Vz%;o3P8bP^5>t zXC5}V=VGl}4pf|PVeye)FvsdTrW#$ugdJz`#fm`mpJLf0+ij5XM|#lhziiB(t~mT)bOAqGUdCdF8(8U_1-0WjWPi4I0d!8^fnHz{#nC+& z2})orDD8j}>~JRLSzp7n{b`u6ClRAIhhx}s zKlB=_Ud}v3eBS5BKU0EZi0cpM)2PmaCMWfq;HtN}62l-`_ z=WVPZe=0fLB>P;!55^ZTTJtQ1tA$~};*;nyY(^6E5%Xex%=7me`+)0OUzzTM5BC1a z2K`s~Y?O-m#D4|(e!WLNw)@_Jc0e)oLrRHP8F6gqYY|g{L$MXGVw`OU z-&@l2{eicjX=IJHYu7?))n@1f6p>FTpF9h&>R2xM_aCH(61MS`uuFIktLP%=S)aiA4I81Pq=Z?sW?`<<+pI4ZmV+@+!ni*IX>L&%|`|42;)1kKyW3_*5kjT}Q9Xqw+MVou7#3Z~21P58Vj^ zI&~jt-b3Lq`jQR4&^U`plxMRouR+O)YLPqD6rW;f1(p(jp@_eE6!DL#6!Etu{tgLM zIGk98BLs(dA&id(W0U$eC@U*t&YU@zK7Bf-O`8VAB`dKvsF3`44?00**m0_u>RcgK zxa4B4Z62`UMo4}VfLX+d~28nd5w7VT^$Np`MK%L zkH9=RW;*(U+TBty+b7^X5r;&sm^^ZI-_8?-wbjZg#g*atWi{{Xg$wXlw++GKScYHDhteC-%7n++VG=MsxO zPLa@Y498BpV5ts@q{IH;T&e}-IC!=O`=V-~PwN$}kP2+^E63^+C0OWKfa#VuF;*`X z!)T7}JYsSL^Az)C-ppSTM+52in67_O${tSh%Qt(|G2_rJEIN7ztG&vg?q3OQ0j-B3 z9$it6UxBLUd7SslxlFPG*j>#%003G`i~iGMo`-Q!{8aSnRUG4FL)tPJze z+oD=vmGF@4QU{}`TI@MfjU7Q%Q1dCrGPiqBu*=1_`>sM>GZ8%|tj=bh1m?@}&-@uY zr}5f-eD7&G59D{otGzsvT9*?>@2oy--#6~R*34P z#P-Y7G>B&u@sEK4>0m_M&3rGyD)#F<<7*{JBPPE{r5h8o1cLY0U0qOtH8{ z-xfpFs~qY<51@VKAq=A*LEkeK+qL&%<;s;%R8*AmS+Hz1bPk8Yz%7n&mTaB?GoMsg zg=FGzbOBt?3E`YribEkcrQgh@x^yU_2=)|@_9;(co%9su@lVK3kFh7B9y>zo$QM;m zI#!CAv`!vxcm=~(dNeUlF<<7*{5dZ^A$(4lJVe#2?Hhwj_{rurmbeMAj@HE*p^va9 z@+nkz+ezh1?5;3(AvA6LVc>p_xF?9>#ndN_xZlK)m^(O@bRQ>D>)@U71n#M|u#3o- zjxl$M3T&hA!SQ@Oj$Hf|b}27lne+ntS3b(Zt_OTyIQE1a9YHMt6f!*@mBZU}e?P1+ah(U`_DkFd=?5?oItIxJYQ zKvaiz=o0NYMg!eHfqVt3>-s0TlS>d6|+b1tRW$cFp|KlZ~^F<<7*{3SYkMZc#H znP*z}-Tv#Cd$a^9J`|H7PoN$790sw^U_^0h7*Y(~lh?6kk1b}-o+IV6c=2MaTelAS z2c6)aQh`&~UcjIBZvI(K2%!BN!~4op^37f8H}jNKXdbVCOFHcZuQtOmqZxLoO|VF5 z!oG8j(2aSC9bwO~#;*>G-0ow#bv`~CKkBf$Es8H z*cSEzyJH(*c=iR=j0Z3Xx&s~WYuM#_9vTjjP}ypT89&XE@>;fR8P=~~k3$|22+Dbb z;Jj8T{4yJGG`>{Ycb?Kpn$I7=?Mfq#-)M#NwN^M}yn|KRTbR-Q)*zu7nvo6I5cmX2 zC#o^it`I|KX%=+QfqDOfANqVfGkJ>nbu2nwiM4@Gp%M8C`th&HF3m8bI5ml^fKgx` z^iN)<{d_X?JPflHoHYM?XmOq1(VO zy?)%64keFjs0BZVW=t~-lUi}$0@)|E8CDmb!z!Vg)<{KE+p}OAa2ck4X)vetg^_y{ zl-0ILIda`nRaJ%NZhf3gD@9Nq+55tWI=H6S!jt1H5AetaoNog5q=)4tz%-=|yW`$q zOIQO`eCsjWz5qRjjPW8JKF)^^>XK}?UIr621+SGns<4st-*xsaj8gy$8q@A-E1Yh; zf%ElOaJljXju$IopKu4(5jSBGk^zh0G#nCSz`!K{^OgQF?{!Tr;S!$%t^-^X7A#YR z`_)?bMi^bL7Sj+J4fpaEKO?_hF~>~aM-Og5tBJx=7e!YjW8CvzL%mGubjm&L_$k$M%+?1cImB;)DAI}dT%+vIKe$OFe0_GpiAsrf_72gKh{(!dYa3o*5 z(b<+aoz?l3v>~{x6(Oas5mfXNez_0fohgLd#XKBMxK8t0Ivfc05f`!D#1cQvnk|hn zNnKv3tP1a6Y7tOGb*l{UxkvFt{%|Hc(e?r6loxtQz_zG2Q1+@qpAp{#Fh9b_^EB(g z>kiR+iLSF{J9pI{t70Zp3wj3a1i&PnbRfGp(b(>HNfw>w1(X8pyeb^3CYJ~AD7z{ zx8w_R@;zrdU{4}Z_IQs-hc-Dr*r*9Eg--MW&XE;+*gVQ-hIB_`(t|^z{ zbS@2!2^V4N6Nsg2*Nc3zXoV_H(IIR|Wix`S$+u(|FR~A9RbWRxH>aGSEf_WgKSTeo zz85erF+X{_GGFG+{JC*n^V(w=VFF>kjBID^uNAjtZ#_fv0{MZKzo2adJjmat$Y#NG zt{P6~r!jOE98YJ$Neuu^O}Nn5hLnakNPgak__`!^6> zAM?aIZC&^m*FsQ3XP9+Vdr1#3@`Wqq1?yl&I%p@n#ki$<+02J|iTN>4=F7Y#O%hMM zKl++5gP_{I?@(6-{lI#?I!@SxmwqP%9m?+B@A88muw2=fs0VP3ztpQcx$ zHEjEyy8S$g=MiOs#;|W@#cG6>w;iIhYG=v^Ptt*wlc1#xqA7+FUXvfl_Nl~Mq61A+ zV6ZONNS7<`-XX2I8A&f*Ac}RVu0cpu9m48gLh$$vf=CBn(!q`Lfo-LK?rGb|Ns6&7 zU(AE~j3P*Uz;nXKP2vklUVK9x6bNew8Y3o<9)Y)8Y;)+$o&4=b`5a1qU>)LHfb*oo z#SS`9D2w>B4ia1;UDDpZ#d*>t?$s+qKYxXY7cFFqRs>Kic~OiWrMjmdTi)`;cT)Z= zpLsAJNgi;_NOGBee$Y5CMCW{T<^9CB1kR%k1dSo1zY9^d7S!A4G{KYP1(5B+C?9A^ zgG9;$n$AH}iPRUY2m6Ar3<__g6H-W*M9P=gCaTH5(wgu|8+^$o&UfEpqf1=<@UcH~ z{ILC5F3V>g%%?Ab`7zJmYpfgRI`8q=XI~M1AS@(oBxv*=IKp-68l7yb>yJo}R?xB# z;pB^0@jTbmKiw-9dqgbhBa>> zAb&(tUc^yMF~{>_zR7fzfS=QJgP6CZH`TJh$M2}ly@cukH{loGP8Y~_?xIIBB=%={ zESKdo59Y(X{+SQxwX|`+t_04F!2}+M?ZJK(9-cator1j&S*9){v@;;mJLvWYwJ&bug zF?f8I!}3@z%V!?U=ilW|T}8g?s0Z8OD+0%*0zsL;^-dyJqsJ$Gtw)ZV7&Lj=nsnuT zRzQvbDCZ9%iC-+a+`GnqUu%m+ZIh(u`d0y@somje%jBvio`it7W{Ii5dM30nwKUH-st{+`F-@pxPwpXIPTmMgLU z|CK*|DryovI1V|V`VzRlah>M*hUfG71YXCe5!4C)jy~Lv`}24FJ&(iV@whxb%VBwv z`2VB)X$Wa!e{?2rU1Q&}jd;G~c;)pKuM>Ga$$XRu%xx8cV|%Um%J=-7-*Z3i&)@O) zJPwb?F-%GBRh=w*A8Q6k(INESmIXy}L=7DQA&@{oAV8**LJycC z!1Rvk5WvBqmzds6LI>M4pPldI&fDu38;l|Bu}1H`d(S!Z&&)q_iW@ifEAHo4bb{Zz zX&#v-og?YxGlNLRWQ6Cu*S?JVe>TMpF8}oD(^trvHEWL|MT&e=ty;C69XfP~88BeL zqfw(qB@P-i=uxLmonmU#sIjwX(W2i31qJn>KjTCgk4^8>9>t!~({TFix)4NlP6D_y?ghXB}EG%N7$86Js7ed}vbB;^X73 zZTt4^Gv9vut@-%lj}K+fo_&DKn@0p&{*1UVCo%tvw5Fv>m0I)VmtR_c9y)Z$#Ky*& z=g*&~27Z!0*nHx|3A1k9I)g7h`skxI%#R*NA9~-mxqbhE@TOnOmMt%Yg@u{*>(^V( zT)leL+`D(rJbwJx%A-e*%!3CH?6W&}?iiK3ckkNgypM~EGsJ>1w{PDz=gyrok&%%$ zCXzQ7B*y&&cqWmzjfvtX?=t7ko%`!vy?VvXm@&hwTD8i+gX71KTmA3|{)6T8>C@J? zygPR6n6;Bne&ciA(~mKiE?u&Da`x<5bL7Yovth#qLrx7IJUA|I-n?I!8qQS2Ba_yf~u2XKAS5fKq)(V|7xZ^XZR`SKeDPhk=A9DLwRsbM2^El6Vc#gHLG3^}}D!2+{v*)oeC zJ@^eizzzHkCO76YXU-V%)K_?p-@)FlT|3jcb7z|m%!4n8De=G#{DmE?A7jRhF*$SQ z`~qAKzLa8tZEz@1*3GhY>(-5)Fkym?>C&Z3&DynVt^e^C`0>5+1^oCLjMN;J^XJbS z72-5?>Qp1O(==+-$W*Uh-Lz`e%G!V*5MqLj*g=gV_wXN_YTC4EG`PU$;7l$Stn&dP z*`+>zK4QcO%OQM0Y&UP-?DfCmSKq7O!478XtO~YK3qJYe6Vt3&GgGr>O(S~@Q@L_w z)1pNSi(7f9b`TG02E4_8-+%wT!JiU~&%x*51h2bk46?|>e3dFyikvcKink7dAO7Qi z<&JV)eecFj?ML84&z?OkRRWHFK*cv+1RQb z!Vg;)n3MU4nc4xbu!C9!rxq?;XoMT_;1jGG3wK_S>+mdZjvP5gjvF`5<`Z=kUr>MG zkK)Jo>UVHoxNyM={bWCC+O}C&#ZC;^pRixWH@-Fy1LjjZ;HdIy_wL=6Q`B4P zORikGMuOA93vL?mU_B$}3l=Y4eEH0oGp+4#2wy0E{Dkk}x*I#W%^EIe2Ai*nkxyzf zHI4NhPOz8I_rw8y;uHM9ylM+}z$@M>r^s)q_shZQ-~~7Ml}9<`dohW96gfyfQ6H#z zV8mB$?Cf>$8-DHDwJUYQo2y_PIB=lFPEI21v4|`FblU)Dn1}O)#uGg}!w&pMEre5y z6+Kbl6ag>%2S38v!QQ>3;JHrB8AA++Dfsa}I>1g0nD5h1KQ+ypH@9_CaZ!I5&wKn2 zm&qwOq5RgqVpkcUm9x?%n%3I32v;20t~5T*xm{ zR`yzP_>4TJKHv*<;3xF3{`BkD&&VFc)T&j>>r?WVykji&2%p16d`K-&u49MW2Hr8Z zp7+?xBkC*cpbzT?x+PcR!0F%xH~7hmzlszPDKC8z*|RW)7~p^A13&qy`t`GZ{ra|k zgBkqnArw1206XKs$S2&TOTzMNy#4r&$S$P1~liQshbf*btQ zS@QWqkxE~E^;H}g7()!;4>86!=prxSzT&7?ub!<##0LN4cWehc{lWC>ufLk#e*4Xy ztFcSR!b5a$-sV015Y9!|qjnGr=7f(@JBULi2QRq6uQn8t?^T3vH`&u^48Wmr#vW<~ z+!R~wnyYvkHf(6xw{LI8j~{PyA1wFp-?wKs&YTFoX1tDJohHsa*RvmILe6~H#B=N* z|A+l~U*KI?v^Q?;OVU80sa*46{h`I15zsW)N0dR(T*|%@sBstxrNfY+V z_MM(PIeQ}D!tZVyn3MDBlP6E?*%VvV9{LjxI7MBj&UWe2<+#fRaQ`6=6)RTUOdP01 zj0L~?1v}sfbpku7zX%-q?6c3j*yMi6)+=fh>)x|x&+MH6*zmjBKwTit;C}k_sYysk zu;*;f+IlX>4q`!_La*FWZFbq}tZ@n00FRgh9^faPAA9f*xehmoF|}CFr>v3G9L1`6KXT+qyJqp5cWxV! zT-wMF?s~98^9WAJ{x2agFpxVB-@24!eUSH!BsZhMhL4y7F5o9^_zRneH#Gzwkw5T; zcwh@_JZCWXo{zle>_9z!oek*1XT*Zoqa!plG#Y#&zUxDhbz0unl{?e<)Bxgu&%x~5 zH1_H%au1$R&lrmh2)Tv-LqbBlanbm^Dh{fT`LTieDto#4;1ls(r?G*3huts9XNbSQ ze-F9ii6MU2;EsXLt)INZUvL`U5j*l$_c>|{`wh9@Nn%H8Y#`pmdhFP-G2jB9i0^)h zeINTj^17f1_tDKulqeC-UIV_QreO;lCU>Y~)Dr5UJMW1JdrxX_YPf`6Y`~Xg%a#oX zmxHgMe1aF;;HQz->^<0*|5K!{+^zSJvu_kN;Z`d+M>) zCEt1UH$3Rpty@%v3>k<4JOZEZ`9U6e_urh4iilJdX(jiQVRPopi3QV}w&e1jy%D*> z+CuJ=JLC~OOsUCPK34Ag!ocI;0$+0HIO4&2mqmp0YH5*rBL68_vg9J!H$H{)Z`z0n zw)o~f`wj3@zsXnll3bJ8{Z#J47lFgU1Fn?L)AGvhVeOe(z84l@9cd;KTD5A`2w5i+ z(_#nMu*IGCx}SrmTDyI15Ze-K)~p$Ueg_A5z@;%@P4I0R3(boX(xHY(Tai$?4~mdA z<7skr)>nT@zp;h9hdb~bAqKv4;(uA=6+imH0Upf*IHS2NUz0TIti9)xPtFr%M98B~ zBB4?n7RmW6mVAAirW_+S;O94u-?Gn%mAgs!ga6TsesF*%NCbS~OsQcTHHtGHF)JkU zFOm8p{}u_&moHyf_wL=J*bAoRe?Q6Djty{1&LC0w^XCskkE0L0=m!UQQgh!b-K>qo zDzivV5$XW@6Xvt=kUH0=T)A@La^DieTJSb`0-vPL#>jp-T<(tghz|8X`p}DhaDWF~ zuZn@Z_BQ(Yi;x?+M3@JE5LcTY@);_3>VwLZDf5HeVMI&aOyK-N4Z|hy|ZB)FRBx#K zuWpq5uW@0UHfTN3pWskEfo=dLJ+MGqG~^J1zI!kz)5k`QOYa_jqSM=B*)u z9`vEtjX$M4mTt*5`ll1Y4&n$O$t&sub&mC;l}Hy6uPtf#&UofwKIUb9^q>#D=m*D} z;+G+|sU7f;d>Kd`dN356dmHi9*MD~;5X(R%+)*^7bo%6|Wp7Wl5^k*F7nTPq9m-*3yKJ>oJ z=8j2#Ow7Ino%pSwNHLL;B4tI&i@*!+A5{3wbKcXB{sl!C&pgb>yzkQYGF`F_Thfc5 z3!V6l*yj+*Bf@V3w$$A{YoFijpP6BPUTrQOsgM za*(KkC@N;6@Xl6Uz(sdvcmLVh{V(77`gOQfr@E@Ux-WC*wiwo;#Sq&Tf6XI7Vk8^U zlFC+u*1rR8=l-U#{NDfP)5M#3wP_*IYC_9a-Spab9_G@mkLuMQr8gH0l|A}#^kir8 zu!+_mrG{=P=+)%Kl-yR>ZGO^?S5?={%VHvKQ{VO>0zG|v(PiO;r9T@}s^k}t)bslWaJcCo)C++l^X1Ke}$#HlQ3RQgswji!W`S>EA6EnS zTc6>5_cMI%*TCm)6}%HG;B|-b30{ex;Cr_M{`ad8@Sq0%Nj$b5r>@q+BC-;jol2p) z`#wf22t?PxYYQdY_Si+lI}q6C|A|kU__rZB9b2~Vf2jLt!%As2Z%oyT$70JAY;Y>X zHlJtM9asv3U`8?hF2c@$0_^h7$4PEtvU=i#Ci#=|IgUboPQ_cf4G~BnfT}5JTPwkS}jgh*gfs0{>0!Y0&k^z*f%;sIJ?OY4cWL_6BpIu19T~-7^F` z);gs?>r^t9oqUKzb`LPe`W}=H-iDk(JVtJe!cPl*&~4&@O3Ai84ZpF2s{is~{v3xL zTeNJyq{EJmz7(8}5hRe?uN&~9z4tPYdm5r_5Srk9%WOEv{PN!gr{R7OiO2kZyTae##1tYhe z!=Tl{=sVv79fz(hVjcpYzpsyfW(3C&??1er2DR!b8{1XsIQlI0#lQ_=7`-zVlTEKe z_0VlBI(DDtF@@qH1G=7Bv@V!qE{uZmU>uwWlfXw9EHe#*2wd)=x(T%#2j#;cFb_M( zPCc(|Y$U&|a!P{+`BUxaU7DX87;kt9Lv*6hPcsnR=eVME-$}8|r;!))W1fHXun%}& z>mt#v*S=1ZEzxbE7k*e1ilJN2(Hvcd3h`e^zF%=V6&u_$q34~0o&I^mD<6gd+1O+o z4YSaE>&iJlrFe5ZU85*_;NV_uE?nCI_3Y#YZAtsx1S)>3m)I{)T^UMqtkt#=Nx zMpvM0aR&>ICD9tBb?KfBJzv^)MENiZF2qKw2rSmMz{HvAFb~g%sVI&3D`4PAd7(57 zOv6EHmz%j5OST?{&aoJngcLzPumIcq@}TXJgH_HMSZtpR)gy^eFujHmJ1(H#+Aw^- z$OmnPEKZ^ANv46H!1MQf!RLo|gzhcc^)PL(XoW5`2R~^?L59}Zv;()GW=ng~DcV!q za-i#zNBj%0!!sGn4NpTsRRg0Y&%rO_m0%H`i+!RL3>qa*HcS*su3JRp3jJfI{Dw)h zmtm!;JM{gtXg@B%7TF3Z|JSVvPP3NNJx%m!$!alu}M$egx*pG1J@^9A6DSkZe7-^(2$3?z9gL z(mjuH#@8_8&;u;6PluMvBW(06z}5hYfuP4w-*p1xrq3t-v~DT(7jLtInST-v2B*P1 zFd2g>mIjTK6H2Zh3`xgc??f!nwWM`EMR%opVXw79D#X==7Td`mc|~h+S7O=|Cdp z*rs9W=^U)}D1fftW9%aSD=mUCX6oFAy=Tm1n$MFka=!snpL?(jPK9MqGKP>1gGb2; zCD$#?~Ykdg$LuT51Y_h)u{g9{F67U!syb7_xB^UGUGoVQGCu4LS zKkJ-F*QGv?=+yUsz_Wob^X7;B!TF5Wyp&|0(IGvScwrFb%W)<*G5ts~7M#q1mRkWf z`O;hkKBavq7fLG(Fm!@4t=Gwzt7D1X&R1aUaRUcM4{;yBLOXxT8 zxCwoi1k72tSMc9(ITfg`-v^^ml1=9oUH`{e<57gAj=4~^Nr%FLyBNCTGWt@EZPi~k zgn2gdW!}ucDUN#3Z|OF_s3rBI{4#uZ0w$S1!0cn0Sn8aQwO&u4C!+IEa0yl&iNbJ& z*}^=IQ`UgK>owwk6XpTQI2!Q?wlR6I3eSY}m`P-Zyii(2WZ)RLQ@=T_4Yp&mO*qCX zsZ$P_iV+H`*y2ogkI-k>7F3LlzE7d)R)l#cA3^bOGR7F+gp|%Xv>&-NiFp#3FULRg zXK+sAv-^ln@>`xsZ90pwd+v}A(lFm44_Y2iu*ts!JA$7JI_7M)!mqN*7)X2nqOI02 z@w`p(p9-7kd>oH^h7)ncu!+jSFER}_aCs~`2M%#hsjmdqQMtl;G4{L(wGI0OUk;rx z6HAQGz&N}VyF#BsSM&^Pyo;eu=SmgZEXeJ@k6*T3Mpq@HXUwyaFY{*pyhrg`7(kHe zG3Q97^wu~`-2Z^y&4Ide5!U)XgI>@J=!ccTDEt}Z7wQOmjyAlJl$V3{2P5$DWAiFbsQ% zZ6RgY81S5Y@f2z&@-T(Y$s_b{px@%tmCUn|FY{*pye_^Y{78`Pt?n!yzUwL`Tc+W+ zlLc5#=VI*uk{MbK!^l@Kjwr?ODf5NBk#n%AKgAF6KXJJX&ez|<_11f`<0b6R7vh(( zQ-nDBl}fHVU3&=^>UW}XC*oh=XcV10XkD-z>2cFBYWiaAjd}r-=yL1~FURJfS6Jo! z919$uV7hfSWcDWF$2CD>=Gn-Xc{6|BXL&vUOpxoh(5`Zf(M>2?WeM+UdB1>8&};0B zd=D#XO<=7|nlT70%qNh6lm@_IsR;e+H|tG#m=NFO*z&qjt}GRl*ooy5pTp zD5re#5Yi-v^TjB|Mc5bp0%oxvV0^v;+ao?;W8fQTcs$4KlZ8;QNX3r}jyz|c1m@e^ zhOUim3f(8HNS8HD#4P(lEICt#^?~oOEvf>>vDGlU@CjzoWsqO6iF8gCV%R)53r@Ey z;gKYU*F!P9lk4I2pc<~^i{t0=VH24plw9|wb|32Zrg0t*>fm^*0y`Wo&>lTQkf*q8 zC-%p@!v2eu*h}}@T`^VA3H=BypVv@xEXI_>8R#=rC%u^s%=;hw(0TBbxQV8>G27t@ zmid%JJM;m)HavZ!& zdg8?}jID)kL?u=Qyu*B#QYaqHLf2s`am{RK?uReyp>2aZ@T0*lYQguKb+>Xz*~@i&ie_oc7$1NE!* zSI|oN?Ll=8C@hRIEbfoD9dDDG@&&$78&2g^GET^X_c zycp|3tD#P7Q%YGkh4~S_%@1GYY3f($&|BJD#p)s1PyyYuV$k&mbX|w_{d(BmuYk>s z=QwgP2g{AEiNkcrD5_${B2Aciguy?f4Ch_|v4r#AfZM&3p2F~y50n-z!|16q>ApQ3 zYb_jM9iI!kJCs+Fs&I_fJY64PdL7si3#<>T#RBK2=-hv}H}fNWo2S_ZK6eP`B`T*$ zwrZm{bkW`dP2V@rivf%h$Of7h8a#^U8z zXM6yM1J6<($VB9m_qa&kD9=8tfal$89P|yxYJF2EEz+RzDs*R3!YWg19J`!}Re@xywtCEu@a=ht&wYIU<8>`X;P253zyEQh zXyK_GY$iV#lTQ!c1?XA=hm1O$&iDj}r01}|`3N?b9$>>Ed*U<`<7Ui){G54E(a^;F z)$5_YQ3p%4Hwz`#xm|wtTpFh$jMueuhW+()oVc9}$7IU$*_Cj5R1dnU;BXSzKx=}o zV9@e=gKh)IiI`U-KPf7iFY{*p{P4QwvqxXTNP>!lWGlVFGu9`q3!?l+exTzo=o*1j zIbyix*TOaD9h_2⁡^m)SYy?dq!Zn!5-o_6S6Z^F>%&xOjMl>In_Br$#vP8vxI(4 z!@W3q{t6ru)8Tk82d-%)IFtJxXNqd!lrM%o?Qv|wUa~F-Ju%vI$M%RGZ`=ZM_bRS^Pd>VN%zu&vZu|GK9@jaFAtD_0C2&=nEjrL#W zoKmyrdOeO%ES<;!Tp!cgEUANkX%+mQzJX7EF+8(!;gOLE&-8ToWMm*9D+>YH*_1OH z;7@g5YWJdkPa5ZyoeTe>5{OFQLR3}_zZdoJpndB!?Y*{?2ifl%{U6u#93tz_JR12h zuRpp^Qvc7PU%p3R z=?errehlA7kKjjq{fMtG@%2qhgCCV#=k|cyT!?5~$cr+Bm486kyBY+&sfX`Nz@2P3 zN#Fl@u6CX;7Y~q`5y|=+c`%SF~W-@ZjeSsB8MixE;-h~T_D1QBO0!-|R!QBs1amoIVl z-8-DEtVDE0Ey6$1JiH^nmI2O`TaINB|Hz`6pT>US&-$4M^J!WK95YR8nSOrt@VXGb z^HIt7i7^CTM_L5!-b2Rvt6PZ5jy$COgYU`SQ>Y(t{zd^tlJN4*qFQ>63>EP{`WJf*dScqWa5m^Jo z)Qb^UUyqA*b-48TGvbNsrJ5R{jHmh~YL63(aUPVz>nLAWk}uyj@V8F=h$*XfC4JZX z2Yc4jsE_rse&)e^m>2W=BOg$g@UV^StB!=81l|Yue8Tbse@M1$y<@w`+|)@|Dv_8%(ar?g>r z%KrG2YUcvlBVSb`@KYVxBSz$BF`{U`>DY+y8ZkmD>f!&Umewwvxo&1w&(bwY`C;UE zzt-*A8?wAcuzc3T`dBaPXCBPw-{nt31z$C{gXdu&f#Xttnrt<uQRzHuRf$a11ji{{F`N7+stF=63GqaXg;iYl@lwC3jN$4^NXl zY!lBV^I|`J3vTCr9>@4=cy}f-4IZR8m5^xmTe69b^eBmzjqNm8qD|v(;vmsgV9QL} zN%U-NC!P|$o7#t1O7s&fp)t}EB>I2(Jyl{rGnv0Oley^c?If4|)$rG$?m&wczjSHQ GSpE$k?VslW diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/shutdownN.tiff b/BasiliskII/src/MacOSX/Multiple-Windows/English.lproj/Win512x342.nib/shutdownN.tiff deleted file mode 100644 index 61f5a7dd98c86c8695316bc91ca68cfb128cba31..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 9798 zcmc)P3Dnoqx(D!H4Y!kAMUh*}>PYTgxQJVlDO0B6pv=}~p=DT-BvXz^Su8^=L&uy- z$dECa%1lIrOqD6gOqvYuzRzc$|9b9 z^#V`7E?v4jaK;&DEWGKao6=*CJ(ga5_0{y=d+()>KmIs<^2sM@?%cU)&YU^vjW^y% zPe1*1y7ksuQ|Pv^Teofxv~1b3A3mW2zwyyOQ}c=Gwb#I^S( zn{0CLIp>^{?KySo)HHwo{Pg3GKdub?W!BL7_19ld_uqeiVvEf;-~3+u$*IUA_aD8g zZU2Xen*sanx8Lj$BSxeL9(W+f%ts%6l)nD@>-7Ei-)CB|U_tu!+i&x;FTeaU75eI{ zukv&Aixw?PeBqtXKKm@a^UgbI^5n_cCy_U^!^Z;xc(b5?)F%bMyjykcwbveY!U-oV zy6UQ{(%pC8oy5V688fncaU}j>nK^T2wyn9>UVAO;X>`x#=B@M2`|rP>^W^Qf-%c;R z^iq28!3UF^I`!037p=3-I>X2fBLCOKRyF?SZQ8UM-oJnU+RHAxER7pCF3WoAsi%@S znl^1(mjB|5FXnsCmPaqV@Iu{lYhix*<(Jbdue_4S=bwK*J^JXQ>CQXv%>Fp@%rk34 zkKuv8`LEQ2-t=!Cbz>0wi`P-3My0#%x-0AO_~VbKC!TmB*O_OZeKtM!+;a(zf{$*2 zBSmbav(7pzt`X;}}j~}0Iyz$0##T8eiLk>A)4jk}QaQ#xAiy`&r4?*i~y6L79 z&pYqDG;-v~>;rz5%X|($+rt4nj3wrcbcnsKj_S|5rwhNZfqlc?^3X#Mr3n)zq_Jbi zX1no!=gyrc2A&Q<@*F-mS9H-)U273O{PXFjpPuCK%{SkiZomEZjGr8K6AxkoR+#Ny zFwwL8-g@h;Q|x2OXwGx^_``2GP8T*{3qIu!df-D3`^WI%!&B?lt^W*H1>cH%K{qkf zJoe2_5d+gNy6B?p)7x&lE!}tDecAr(1wXl^-oRtc*=L`f_T6{ijE{Y{+G?w`<(6CK z(YX_q)C(N>|gN1B%ai(K7IP6-FDk8MNgD*!PB*C*A#t79^JFM`Q3NlJ?+2${@KTT ziBE|?>-a;>5Vve|-F4R`_6%PPhOdGX-s-FPV6}MIHe^q}{PN4|>Ja?mpZ!bhup#{X zyw_fP<-FZ)yX|rv5+7otS_k)@A9mPb$vXKSwoR8_dTI7&@rgC^ogU(r|J5lm74J-j zF9=RCQ|$}!m3`2-apPVmpM3J->#x5)+dvJ1U*3sn_9E}Cx86$XRj*#XGA1!kA9}$+ z-)bF7{>UYL$~N00s8wQW^ytxIbuoN_wfLesFXXy7Tc=g4Rzohh z;DQ`O>L^>lC4LHivcy>QYPs&fuYOo7U#fMG4|Jh}=cWG8*L!@z4&ugsjknk;`SIkF zPv$xGR()A(t+j^0S-}gpi$CmVa=!hB8*VuM>Z`BLx{Dz`E%-~HAO}x6>7=ydjyvYM zGi1n+oG)USzsQHTeolK%7whmo?X=Uf9?}2i{ZJ3`?z``1UFg9d)|Z%)-%;Rr((st^OCi4 zgwEE|Pi*(=*KaPI6})i6uSUs*c0rw@$62H=mB-?NJpRS^gAYE)dK`W9(YZ#lv;GEt zcKh(d5A)f^NFVWTjnRGeJbbXJH`cI8^p#nTb$VL*SjUI<4SQeY>LNHRc;SX$Ui@p& zx|O|72AJAA^QY@U}j-+c2;=Eslt*e~pP z;?>#CT72mtruaf^L?1s7&LDWJb!b_6)-CGH3_g=f-Yx!TKYEaH)KN!exnh{E=A17J z(TCo0z`W7D=Vi^pg$uJkmRbG5 z;^&`#PD__A&AQRu*&k-l%T-%jn{9i{F~?*-;3w|*nvdvfq&pwVb#d3BLx+)}L;ZYM zrY<#W)@(rRaZ5@a!Gr%{LhLKY;(VHOP%W{aRO5rwJ)855vHrYg`lQk?o^r}587Fzg zpY&h@b`ulP|1D|Wyt!{4_3P3y`$Nq4Jm{curtS?yJi#4LN2i!bOvUi5OK z;0vn1Pt!r)k^7|>w{Oy<$?@@xXBPj_q3|?{Cw0g^A;;wRPCM)J$?Nt(zDMt~(MB7M z(`)c;^~JyR;tM%rjqiSHi#||%^U0A%9+~9pvBw^pNB5rFNF0n3cmI+!V5S2E_to@(3k&bP>=Ywetdizng(m}1HOK<6`QGB>OC zeIL*v&hqo)d*29nD!AZV-Z_px?02gLIj?RSv}@3RZ@lrwW22{8T51KpF8A_}9&m^U zI=}{_J(6yP+!yTDSF1ldRa6x28R zu?ewH)>i8wriwqrLFozPNHt#PhHAZF7vJJvonDdsqZZXh&QBn}f&(77iVy4w^{?WK zk{27rg6=^F1oe$`?}V`5()#vtFV@r^HieB})GhrW%;o&S?rKcgH@#P%A0M-S)VhM7 zd^q4Kc_3y=F2~PhE_F74=Zn#KVzVH5bZAiDs10M|JUAcT>WfeK2qv{fErU~>=~ayG zJr{okdv&eA50B_`=Et{5@x%V)k`D(wErQ^Kb43^3)F@{>K3gy7zk+rPIxMJf+qP{- z9CzGt)7V>2P<@s7g2f!HV#Qc`j{3O0@0qw7Fkry6cJ11YAg3aaT=L<7XJx*(#M9w`sH!)?WljqDE23h zT=L<72d=;8gP5+ntZNb^H`WTmhduZ;=SPfvgv+-d8@8g3XzW9?vUWxx-i$7S@UF^^( zNL}MwHnLxeSN)4VQ9lV!&mh?P1c~hfE2DeQ&0A-^_q>k}e)!@~4teDMmRGe;ng(Ni z37PEHK4^oWje|M`bq*32zCRRl@40#FtZyIWeSGl4_qVituv_j$mxe)Pk;!g+-zun0 zkne@!`Hw;CRgrto&0A-^_q<=Q@`x|_yWz}!b&0A-^_e#wC zp4da|-&{o>IjtVyidpi52Ly5HN?w5#IzA5}c}{om)om%sk{*X*Yu N4I2D=iw2ePe*pf7`a1vs diff --git a/BasiliskII/src/MacOSX/Multiple-Windows/README b/BasiliskII/src/MacOSX/Multiple-Windows/README deleted file mode 100644 index b67bd8926..000000000 --- a/BasiliskII/src/MacOSX/Multiple-Windows/README +++ /dev/null @@ -1,5 +0,0 @@ -This is a version of the interface that would allow multiple emulations to -run side-by-side, in different windows. Currently, the uae_cpu engine is not -re-entrant, and some of the Basilisk glue would not allow this, so this will -probably never be used. I will save it here for educational purposes, and just -in case this feature is ever needed. diff --git a/BasiliskII/src/MacOSX/NNThread.h b/BasiliskII/src/MacOSX/NNThread.h deleted file mode 100644 index 72a0a1d56..000000000 --- a/BasiliskII/src/MacOSX/NNThread.h +++ /dev/null @@ -1,91 +0,0 @@ -// -// NNThread.h -Not Nextstep Thread? -// Nigel's Nice Thread? -// -// Revision 1.2, Tuesday May 25 2004 -// -// Created by Nigel Pearson on Tue Nov 28 2000. -// Public Domain. No rights reserved. -// - -// Define what flavour of threading to use: -#define USE_NSTHREAD -//#define USE_PTHREAD - -#import - -#import -#import - -#ifdef USE_PTHREAD -#include - -struct pthreadArgs // This duplicates most of the stuff in the NNThread object -{ - id *object; - SEL *sel; - - NSAutoreleasePool *pool; - BOOL allocPool, - *completed; -}; -#endif - -@interface NNThread : NSObject -{ - id object; - SEL sel; - thread_t machThread; -#ifdef USE_PTHREAD - pthread_t pThread; - struct pthreadArgs pthreadArgs; -#endif - NSAutoreleasePool *pool; - BOOL allocPool, - completed, - suspended; -} - -- (NNThread *) initWithAutoReleasePool; -- (NNThread *) initSuspended: (BOOL) startSuspended - withAutoreleasePool: (BOOL) allocatePool; - -- (void) perform: (SEL)action of: (id)receiver; -- (void) resume; -- (BOOL) start; -- (void) suspend; -- (void) terminate; - -@end - -typedef enum _NNTimeUnits -{ - NNnanoSeconds = 1, - NNmicroSeconds = 2, - NNmilliSeconds = 3, - NNseconds = 4 -} -NNTimeUnits; - -#import - -@interface NNTimer : NNThread -{ - struct timespec delay; - BOOL repeating; - id timerObject; - SEL timerSel; -} - -- (NNTimer *) initWithAutoRelPool; - -- (void) changeIntervalTo: (int)number units: (NNTimeUnits)units; -- (void) invalidate; - -- (void) perform: (SEL)action of: (id)receiver - after: (int)number units: (NNTimeUnits)units; - -- (void) repeat: (SEL)action of: (id)receiver - every: (int)number units: (NNTimeUnits)units; - -@end \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/NNThread.m b/BasiliskII/src/MacOSX/NNThread.m deleted file mode 100644 index 535aa8777..000000000 --- a/BasiliskII/src/MacOSX/NNThread.m +++ /dev/null @@ -1,257 +0,0 @@ -// -// NNThread.m -Not Nextstep Thread? -// Nigel's Nice Thread? -// -// Revision 1.4, Tuesday May 25 2004 -// -// Created by Nigel Pearson on Tue Nov 28 2000. -// Public Domain. No rights reserved. -// - -#import "NNThread.h" -#import // For objc_msgSend() prototype - -@implementation NNThread - -// Define the wrapper first so that init knows about it without having to put it in the .h - -#ifdef USE_NSTHREAD -- (void) wrapper -{ - machThread = mach_thread_self(); - - if ( object == nil || sel == (SEL) nil || suspended ) - thread_suspend (machThread); // Suspend myself - - if ( allocPool ) - pool = [NSAutoreleasePool new]; - - // [object sel] caused "cannot find method" warnings, so I do it a non-obvious way: - objc_msgSend (object, sel); - - completed = YES; - - if ( allocPool ) - [pool release]; -} -#endif - -#ifdef USE_PTHREAD -void * -pthreadWrapper (void *arg) -{ - struct pthreadArgs *args = arg; - - if ( args -> allocPool ) - args -> pool = [NSAutoreleasePool new]; - - objc_msgSend (*(args->object), *(args->sel)); - - *(args->completed) = YES; - - if ( args -> allocPool ) - [args -> pool release]; - - return NULL; -} - -- (BOOL) wrapper -{ - int error; - - pthreadArgs.object = &object; - pthreadArgs.sel = &sel; - pthreadArgs.allocPool = allocPool; - pthreadArgs.completed = &completed; - pthreadArgs.pool = nil; - - if ( object == nil || sel == (SEL) nil || suspended ) - error = pthread_create_suspended_np (&pThread, NULL, &pthreadWrapper, &pthreadArgs); - else - error = pthread_create (&pThread, NULL, &pthreadWrapper, &pthreadArgs); - - if ( error ) - NSLog(@"%s - pthread_create failed"); - else - machThread = pthread_mach_thread_np (pThread); - - return ! error; -} -#endif - -- (NNThread *) initSuspended: (BOOL) startSuspended - withAutoreleasePool: (BOOL) allocatePool -{ - self = [super init]; - - allocPool = allocatePool; - completed = NO; - suspended = startSuspended; - object = nil; - sel = (SEL) nil; - -#ifdef USE_NSTHREAD - [NSThread detachNewThreadSelector:@selector(wrapper) - toTarget:self - withObject:nil]; -#endif - -#ifdef USE_PTHREAD - if ( ! [self wrapper] ) // Wrapper does the thread creation - { - NSLog(@"%s - pthread wrapper failed", __PRETTY_FUNCTION__); - return nil; - } -#endif - - return self; -} - -- (NNThread *) init -{ - return [self initSuspended: YES withAutoreleasePool: NO]; -} - -- (NNThread *) initWithAutoReleasePool -{ - return [self initSuspended: YES withAutoreleasePool: YES]; -} - -- (BOOL) completed -{ - return completed; -} - -- (void) perform: (SEL)action of: (id)receiver -{ - object = receiver, sel = action; -} - -- (void) resume -{ - if ( suspended ) - [self start]; - else - NSLog (@"%s - thread not suspended", __PRETTY_FUNCTION__); -} - -- (BOOL) start -{ - kern_return_t error; - - if ( object == nil || sel == (SEL) nil ) - { - NSLog (@"%s - cannot start thread, object or selector invalid", __PRETTY_FUNCTION__); - return NO; - } - if ( ( error = thread_resume (machThread) ) != KERN_SUCCESS ) - NSLog (@"%s - thread_resume() failed, returned %d", __PRETTY_FUNCTION__, error); - suspended = NO; - return YES; -} - -- (void) suspend -{ - if ( ! suspended ) - { - kern_return_t error; - - if ( ( error = thread_suspend (machThread) ) != KERN_SUCCESS ) - NSLog (@"%s - thread_resume() failed, returned %d", __PRETTY_FUNCTION__, error); - suspended = YES; - } -} - -- (void) terminate -{ - kern_return_t error; - - if ( ( error = thread_terminate (machThread) ) != KERN_SUCCESS ) - NSLog (@"%s - thread_terminate() failed, returned %d", __PRETTY_FUNCTION__, error); -} - -@end - -@implementation NNTimer - -- (NNTimer *) init -{ - self = [super init]; - repeating = YES; - return self; -} - -- (NNTimer *) initWithAutoRelPool -{ - self = [super init]; - allocPool = YES; - repeating = YES; - return self; -} - - -- (void) changeIntervalTo: (int)number - units: (NNTimeUnits)units -{ - switch ( units ) - { - case NNnanoSeconds: - delay.tv_nsec = number; - delay.tv_sec = 0; - break; - case NNmicroSeconds: - delay.tv_nsec = number * 1000; - delay.tv_sec = 0; - break; - case NNmilliSeconds: - delay.tv_nsec = number * 1000000; - delay.tv_sec = 0; - break; - case NNseconds: - delay.tv_nsec = 0; - delay.tv_sec = number; - break; - default: - NSLog (@"%s illegal units(%d)", __PRETTY_FUNCTION__, units); - } -} - -- (void) invalidate -{ - repeating = NO; -} - -- (void) timerLoop -{ - // For some strange reason, Mac OS X does not have this prototype - extern int nanosleep (const struct timespec *rqtp, struct timespec *rmtp); - - while ( repeating ) - { - nanosleep(&delay, NULL); - completed = NO; - // This caused a few warnings: - // [timerObject timerSel]; - // so I do it a non-obvious way: - objc_msgSend (timerObject, timerSel); - completed = YES; - } -} - -- (void) perform: (SEL)action of: (id)receiver - after: (int)number units: (NNTimeUnits)units -{ - object = self, sel = @selector(timerLoop), - timerObject = receiver, timerSel = action, repeating = NO; - [self changeIntervalTo: number units: units]; -} - -- (void) repeat: (SEL)action of: (id)receiver - every: (int)number units: (NNTimeUnits)units -{ - object = self, sel = @selector(timerLoop), - timerObject = receiver, timerSel = action, repeating = YES; - [self changeIntervalTo: number units: units]; -} - -@end \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/PrefsEditor.h b/BasiliskII/src/MacOSX/PrefsEditor.h deleted file mode 100644 index b67c2310e..000000000 --- a/BasiliskII/src/MacOSX/PrefsEditor.h +++ /dev/null @@ -1,145 +0,0 @@ -/* - * PrefsEditor.h - GUI stuff for Basilisk II preferences - * (which is a text file in the user's home directory) - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import - -@interface TableDS : NSObject -{ - int numItems; - NSMutableArray *col1, - *col2; -} - -- (void) addInt: (int)target - withPath: (NSString *)path; - -- (void) addObject: (NSObject *)obj - withPath: (NSString *)path; - -- (void) deleteAll; - -- (BOOL) deleteRow: (int)row; - -- (int) intAtRow: (int)row; - -- (int) numberOfRowsInTableView: (NSTableView *)tView; - -- (NSString *) pathAtRow: (int)row; - -- (id) tableView: (NSTableView *)tView - objectValueForTableColumn: (NSTableColumn *)tColumn - row: (int)rowIndex; -@end - -#include "Emulator.h" - -@interface PrefsEditor : NSObject -{ - IBOutlet NSSlider *emuFreq; - IBOutlet NSView *newVolumeView; - IBOutlet NSTextField *newVolumeSize; - IBOutlet NSWindow *panel; - IBOutlet Emulator *theEmulator; - - - IBOutlet NSButton *bootFromAny, - *bootFromCD; - IBOutlet NSTextField *bytes; - IBOutlet NSButton *classic, - *CPU68000, - *CPU68020, - *CPU68030, - *CPU68040; - IBOutlet NSTextField *delay, - *depth; - IBOutlet NSButton *disableCD, - *disableSound; - IBOutlet NSTableView *diskImages; - IBOutlet NSTextField *etherNet, - *extFS; - IBOutlet NSButton *FPU; - IBOutlet NSTextField *frequency, - *height; - IBOutlet NSButton *IIci; - IBOutlet NSPopUpButton *keyboard; - IBOutlet NSTextField *MB, - *modem; - IBOutlet NSButton *openGL; - IBOutlet NSTextField *prefsFile, - *printer; - IBOutlet NSButton *quadra900; - IBOutlet NSTextField *ROMfile; - IBOutlet NSButton *screen; - IBOutlet NSTableView *SCSIdisks; - IBOutlet NSTextField *width; - IBOutlet NSButton *window; - - NSString *devs, - *home; - - TableDS *volsDS, // Object managing tha data in the Volumes, - *SCSIds; // and SCSI devices, tables - - NSImage *locked, - *blank; - NSImageCell *lockCell; - - BOOL edited; // Set if the user changes anything, reset on save -} - -- (BOOL) hasEdited; -- (NSWindow *) window; - -- (IBAction) AddSCSI: (id)sender; -- (IBAction) AddVolume: (id)sender; -- (IBAction) BrowseExtFS: (id)sender; -- (IBAction) BrowsePrefs: (id)sender; -- (IBAction) BrowseROM: (id)sender; -- (IBAction) ChangeBootFrom: (NSMatrix *)sender; -- (IBAction) ChangeCPU: (NSMatrix *)sender; -- (IBAction) ChangeDisableCD: (NSButton *)sender; -- (IBAction) ChangeDisableSound:(NSButton *)sender; -- (IBAction) ChangeFPU: (NSButton *)sender; -- (IBAction) ChangeKeyboard: (NSPopUpButton *)sender; -- (IBAction) ChangeModel: (NSMatrix *)sender; -- (IBAction) ChangeScreen: (id)sender; -- (IBAction) CreateVolume: (id)sender; -- (IBAction) DeleteVolume: (id)sender; -- (IBAction) EditBytes: (NSTextField *)sender; -- (IBAction) EditDelay: (NSTextField *)sender; -- (IBAction) EditEtherNetDevice:(NSTextField *)sender; -- (IBAction) EditExtFS: (NSTextField *)sender; -- (IBAction) EditFrequency: (NSTextField *)sender; -- (IBAction) EditMB: (NSTextField *)sender; -- (IBAction) EditModemDevice: (NSTextField *)sender; -- (IBAction) EditPrinterDevice: (NSTextField *)sender; -- (IBAction) EditROMpath: (NSTextField *)sender; -- (IBAction) LoadPrefs: (id)sender; -- (IBAction) RemoveSCSI: (id)sender; -- (IBAction) RemoveVolume: (id)sender; -- (NSString *) RemoveVolumeEntry; -- (IBAction) ResetPrefs: (id)sender; -- (IBAction) ShowPrefs: (id)sender; -- (IBAction) SavePrefs: (id)sender; - -@end \ No newline at end of file diff --git a/BasiliskII/src/MacOSX/PrefsEditor.mm b/BasiliskII/src/MacOSX/PrefsEditor.mm deleted file mode 100644 index 1b9cd13a6..000000000 --- a/BasiliskII/src/MacOSX/PrefsEditor.mm +++ /dev/null @@ -1,844 +0,0 @@ -/* - * PrefsEditor.m - GUI stuff for Basilisk II preferences - * (which is a text file in the user's home directory) - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import "PrefsEditor.h" - -@implementation TableDS - -- (TableDS *) init -{ - self = [super init]; - - numItems = 0; - col1 = [NSMutableArray new]; - col2 = [NSMutableArray new]; - - return self; -} - -- (void) dealloc -{ - [col1 dealloc]; - [col2 dealloc]; - [super dealloc]; -} - -- (void) addInt: (int)target - withPath: (NSString *)path -{ - [col1 addObject: [NSNumber numberWithInt: target]]; - [col2 addObject: path]; - ++numItems; -} - -- (void) addObject: (NSObject *)obj - withPath: (NSString *)path -{ - [col1 addObject: obj]; - [col2 addObject: path]; - ++numItems; -} - -- (void) deleteAll -{ - numItems = 0; - [col1 removeAllObjects]; - [col2 removeAllObjects]; -} - -- (BOOL) deleteRow: (int)row -{ - if ( row > numItems ) - return NO; - - [col1 removeObjectAtIndex: row]; - [col2 removeObjectAtIndex: row]; - -- numItems; - - return YES; -} - -- (int)intAtRow: (int)row -{ - return [[col1 objectAtIndex: row] intValue]; -} - -- (int) numberOfRowsInTableView: (NSTableView *)tView -{ - return numItems; -} - -- (NSString *)pathAtRow: (int)row -{ - return (NSString *) [col2 objectAtIndex: row]; -} - -- (id) tableView: (NSTableView *)tView - objectValueForTableColumn: (NSTableColumn *)tColumn - row: (int)row -{ - if ( [[tColumn identifier] isEqualToString:@"path"] ) - return [col2 objectAtIndex: row]; - else - return [col1 objectAtIndex: row]; -} - -@end - -#import // For [NSBundle pathForImageResource:] proto - -#include -using std::string; -extern string UserPrefsPath; // from prefs_unix.cpp - -#import "sysdeps.h" // Types used in Basilisk C++ code -#import "video_macosx.h" // some items that we edit here -#import "misc_macosx.h" // WarningSheet() prototype -#import "main_macosx.h" // ChoiceAlert() prototype - - -#import - -#define DEBUG 0 -#import - -@implementation PrefsEditor - -- (PrefsEditor *) init -{ - self = [super init]; - - edited = NO; - - devs = @"/dev"; - home = [NSHomeDirectory() retain]; - volsDS = [TableDS new]; - SCSIds = [TableDS new]; - - lockCell = [NSImageCell new]; - if ( lockCell == nil ) - NSLog (@"%s - Can't create NSImageCell?", __PRETTY_FUNCTION__); - - blank = [NSImage new]; - locked = [[NSImage alloc] initWithContentsOfFile: - [[NSBundle mainBundle] pathForImageResource: @"nowrite.icns"]]; - if (locked == nil ) - NSLog(@"%s - Couldn't open write protection image", __PRETTY_FUNCTION__); - - return self; -} - -- (void) dealloc -{ - [home release]; - [volsDS release]; - [SCSIds release]; - [lockCell release]; - [blank release]; - [locked release]; - [super dealloc]; -} - -- (void) awakeFromNib -{ - emuFreq = [theEmulator speed]; -#if DEBUG - [self ShowPrefs: self]; // For testing -#endif -} - -- (BOOL) hasEdited -{ - return edited; -} - -- (NSWindow *) window -{ - return panel; -} - -- (IBAction) AddSCSI: (id)sender -{ - NSOpenPanel *oP = [NSOpenPanel openPanel]; - - if ( [oP runModalForDirectory:home file:nil types:nil] == NSOKButton ) - { - [SCSIds addInt: -1 - withPath: [oP filename] ]; - [SCSIdisks reloadData]; - edited = YES; - } -} - -- (IBAction) AddVolume: (id)sender -{ - NSOpenPanel *oP = [NSOpenPanel openPanel]; - - if ( [oP runModalForDirectory:home file:nil types:nil] == NSOKButton ) - { - [volsDS addObject: (NSObject *) locked - withPath: [oP filename] ]; - PrefsAddString("disk", [[oP filename] UTF8String]); - [diskImages reloadData]; - edited = YES; - } -} - -- (IBAction) BrowseExtFS: (id)sender -{ - NSOpenPanel *oP = [NSOpenPanel openPanel]; - - [oP setCanChooseDirectories: YES]; - [oP setCanChooseFiles: NO]; - [oP setPrompt: @"Select"]; - [oP setTitle: @"Select a directory to mount"]; - D(NSLog(@"%s - home = %@, [extFS stringValue] = %@", - __PRETTY_FUNCTION__, home, [extFS stringValue])); - if ( [oP runModalForDirectory: ([extFS stringValue] ? [extFS stringValue] : home) - file:nil - types:nil] == NSOKButton ) - { - [extFS setStringValue: [oP directory] ]; - PrefsReplaceString("extfs", [[oP directory] UTF8String]); - edited = YES; - } -} - -- (IBAction) BrowsePrefs: (id)sender -{ - NSOpenPanel *oP = [NSOpenPanel openPanel]; - - [oP setCanChooseFiles: YES]; - [oP setTitle: @"Select a Preferences file"]; - D(NSLog(@"%s - home = %@", __PRETTY_FUNCTION__, home)); - if ( [oP runModalForDirectory: ([prefsFile stringValue] ? [prefsFile stringValue] : home) - file:nil - types:nil] == NSOKButton ) - { - [prefsFile setStringValue: [oP filename] ]; - UserPrefsPath = [[oP filename] UTF8String]; - } -} - -- (IBAction) BrowseROM: (id)sender -{ - NSOpenPanel *oP = [NSOpenPanel openPanel]; - - [oP setCanChooseFiles: YES]; - [oP setTitle: @"Open a ROM file"]; - D(NSLog(@"%s - home = %@", __PRETTY_FUNCTION__, home)); - if ( [oP runModalForDirectory: ([ROMfile stringValue] ? [ROMfile stringValue] : home) - file:nil - types:nil] == NSOKButton ) - { - [ROMfile setStringValue: [oP filename] ]; - PrefsReplaceString("rom", [[oP filename] UTF8String]); - edited = YES; - } -} - -#include // for CDROMRefNum - -- (IBAction) ChangeBootFrom: (NSMatrix *)sender -{ - if ( [sender selectedCell] == (id)bootFromCD ) - { - [disableCD setState: NSOffState]; - - PrefsReplaceInt32("bootdriver", CDROMRefNum); - } - else - PrefsReplaceInt32("bootdriver", 0); - edited = YES; -} - -- (IBAction) ChangeCPU: (NSMatrix *)sender -{ - PrefsReplaceInt32("cpu", [[sender selectedCell] tag]); - edited = YES; -} - -- (IBAction) ChangeDisableCD: (NSButton *)sender -{ - int disabled = [disableCD state]; - - PrefsReplaceBool("nocdrom", disabled); - if ( disabled ) - { - [bootFromAny setState: NSOnState]; - [bootFromCD setState: ![disableCD state]]; - } - edited = YES; -} - -- (IBAction) ChangeDisableSound: (NSButton *)sender -{ - BOOL noSound = [disableSound state]; - - if ( ! noSound ) - WarningSheet(@"Sound is currently unimplemented", panel); - - PrefsReplaceBool("nosound", noSound); - edited = YES; -} - -- (IBAction) ChangeFPU: (NSButton *)sender -{ - PrefsReplaceBool("fpu", [FPU state]); - edited = YES; -} - -- (IBAction) ChangeKeyboard: (NSPopUpButton *)sender -{ - // Deselest current item - int current = [keyboard indexOfItemWithTag: PrefsFindInt32("keyboardtype")]; - if ( current != -1 ) - [[keyboard itemAtIndex: current] setState: FALSE]; - - PrefsReplaceInt32("keyboardtype", [[sender selectedItem] tag]); - edited = YES; -} - -- (IBAction) ChangeModel: (NSMatrix *)sender -{ - PrefsReplaceInt32("modelid", [[sender selectedCell] tag]); - edited = YES; -} - - -// If we are not using the CGIMAGEREF drawing strategy, -// then source bitmaps must be 32bits deep. - -- (short) testWinDepth: (int) newbpp -{ -#ifdef CGIMAGEREF - return newbpp; -#else - if ( newbpp != 32 ) - WarningSheet(@"Sorry - In windowed mode, depth must be 32", panel); - return 32; -#endif -} - -// This is called when the screen/window, -// width, height or depth is clicked. -// -// Note that sender may not actually be an NSMatrix. - -- (IBAction) ChangeScreen: (NSMatrix *)sender -{ - NSButton *cell = [sender selectedCell]; - - short newx = [width intValue]; - short newy = [height intValue]; - short newbpp = [depth intValue]; - short newtype; - char str[20]; - - if ( cell == screen ) - newtype = DISPLAY_SCREEN; - else if ( cell == window ) - newtype = DISPLAY_WINDOW; - else - newtype = display_type; - - // Check that a field actually changed - if ( newbpp == init_depth && newx == init_width && - newy == init_height && newtype == display_type ) - { - D(NSLog(@"No changed GUI items in ChangeScreen")); - return; - } - - // If we are changing type, supply some sensible defaults - - short screenx = CGDisplayPixelsWide(kCGDirectMainDisplay), - screeny = CGDisplayPixelsHigh(kCGDirectMainDisplay), - screenb = CGDisplayBitsPerPixel(kCGDirectMainDisplay); - - if ( newtype != display_type ) - { - D(NSLog(@"Changing display type in ChangeScreen")); - - // If changing to full screen, supply main screen dimensions as a default - if ( newtype == DISPLAY_SCREEN ) - newx = screenx, newy = screeny, newbpp = screenb; - - // If changing from full screen, use minimum screen resolutions - if ( display_type == DISPLAY_SCREEN ) - { - newx = MIN_WIDTH, newy = MIN_HEIGHT; - newbpp = [self testWinDepth: newbpp]; - } - } - else - { - newbpp = [self testWinDepth: newbpp]; - - // Check size is within ranges of MIN_WIDTH ... MAX_WIDTH - // and MIN_HEIGHT ... MAX_HEIGHT - // ??? - } - - [width setIntValue: newx]; - [height setIntValue: newy]; - [depth setIntValue: newbpp]; - - - // Store new prefs - *str = '\0'; - switch ( newtype ) - { - case DISPLAY_WINDOW: - if ( newbpp ) - sprintf(str, "win/%hd/%hd/%hd", newx, newy, newbpp); - else - sprintf(str, "win/%hd/%hd", newx, newy); - break; - case DISPLAY_SCREEN: - if ( newbpp ) - sprintf(str, "full/%hd/%hd/%hd", newx, newy, newbpp); - else - sprintf(str, "full/%hd/%hd", newx, newy); - break; - }; - PrefsReplaceString("screen", str); - - parse_screen_prefs(str); - - edited = YES; - - if ( display_type != DISPLAY_SCREEN ) - { - D(NSLog(@"Display type is not SCREEN (%d), resizing window", - display_type)); - resizeWinTo(newx, newy); - } -} - -- (IBAction) CreateVolume: (id)sender -{ - NSSavePanel *sP = [NSSavePanel savePanel]; - - [sP setAccessoryView: newVolumeView]; - [sP setPrompt: @"Create"]; - [sP setTitle: @"Create new volume as"]; - - if ( [sP runModalForDirectory:NSHomeDirectory() file:@"basilisk-II.vol"] == NSOKButton ) - { - char cmd[1024]; - const char *filename = [[sP filename] UTF8String]; - int retVal, - size = [newVolumeSize intValue]; - - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", filename, size); - - retVal = system(cmd); - if (retVal != 0) - { - NSString *details = [NSString stringWithFormat: - @"The dd command failed.\nReturn status %d (%s)", - retVal, strerror(errno)]; - WarningSheet(@"Unable to create volume", details, nil, panel); - } - else - { - [volsDS addObject: (NSObject *) blank - withPath: [sP filename] ]; - PrefsAddString("disk", filename); - [diskImages reloadData]; - } - } -} - -- (BOOL) fileManager: (NSFileManager *) manager -shouldProceedAfterError: (NSDictionary *) errorDict -{ - NSRunAlertPanel(@"File operation error", - @"%@ %@, toPath %@", - @"Bugger!", nil, nil, - [errorDict objectForKey:@"Error"], - [errorDict objectForKey:@"Path"], - [errorDict objectForKey:@"ToPath"]); - return NO; -} - -- (IBAction) DeleteVolume: (id)sender -{ - NSString *Path = [self RemoveVolumeEntry]; - - if ( ! Path ) - return; - - if ( ! [[NSFileManager defaultManager] removeFileAtPath: Path - handler: self] ) - { - WarningSheet(@"Unable to delete volume", panel); - NSLog(@"%s unlink(%s) failed - %s", __PRETTY_FUNCTION__, - [Path cString], strerror(errno)); - } -} - -- (IBAction) EditDelay: (NSTextField *)sender -{ - int ticks = [delay intValue]; - float freq; - - if ( ticks ) - freq = 60.0 / ticks; - else - freq = 60.0; - - [frequency setFloatValue: freq]; - [emuFreq setFloatValue: freq]; - PrefsReplaceInt32("frameskip", ticks); - edited = YES; -} - -- (IBAction) EditBytes: (NSTextField *)sender -{ - int B = (int) [bytes floatValue]; - float M = B / 1024 / 1024; - - D(NSLog(@"%s = %f %d", __PRETTY_FUNCTION__, M, B)); - PrefsReplaceInt32("ramsize", B); - [MB setFloatValue: M]; - edited = YES; -} - -- (IBAction) EditEtherNetDevice: (NSTextField *)sender -{ - NSString *path = [etherNet stringValue]; - - PrefsReplaceString("ether", [path UTF8String]); - edited = YES; -} - -- (IBAction) EditExtFS: (NSTextField *)sender -{ - NSString *path = [extFS stringValue]; - - PrefsReplaceString("extfs", [path UTF8String]); - edited = YES; -} - -- (IBAction) EditFrequency: (NSTextField *)sender -{ - float freq = [frequency floatValue]; - - [delay setIntValue: frequencyToTickDelay(freq)]; - [emuFreq setFloatValue: freq]; - edited = YES; -} - -- (IBAction) EditModemDevice: (NSTextField *)sender -{ - NSString *path = [modem stringValue]; - - PrefsReplaceString("seriala", [path UTF8String]); - edited = YES; -} - -- (IBAction) EditMB: (NSTextField *)sender -{ - float M = [MB floatValue]; - int B = (int) (M * 1024 * 1024); - - D(NSLog(@"%s = %f %d", __PRETTY_FUNCTION__, M, B)); - PrefsReplaceInt32("ramsize", B); - [bytes setIntValue: B]; - edited = YES; -} - -- (IBAction) EditPrinterDevice: (NSTextField *)sender -{ - NSString *path = [printer stringValue]; - - PrefsReplaceString("serialb", [path UTF8String]); - edited = YES; -} - -- (IBAction) EditROMpath: (NSTextField *)sender -{ - NSString *path = [ROMfile stringValue]; - - PrefsReplaceString("rom", [path UTF8String]); -} - -- (IBAction) RemoveSCSI: (id)sender -{ - char pref[6]; - int row = [SCSIdisks selectedRow], - SCSIid = [SCSIds intAtRow: row]; - - if ( ! [SCSIds deleteRow: row] ) - NSLog (@"%s - [SCSIds deleteRow: %d] failed", __PRETTY_FUNCTION__, row); - [SCSIdisks reloadData]; - sprintf(pref, "scsi%d", SCSIid); - //PrefsRemoveItem(pref,0); - PrefsRemoveItem(pref, 1); -} - -- (NSString *) RemoveVolumeEntry -{ - int row = [diskImages selectedRow]; - - if ( row != -1 ) - { - NSString *Path = [volsDS pathAtRow: row]; - const char *path = [Path UTF8String], - *str; - int tmp = 0; - - NSString *prompt = [NSString stringWithFormat: @"%s\n%s", - "Are you sure you want to delete the file", - path]; - - if ( ! ChoiceAlert([prompt cString], "Delete", "Cancel") ) - return NULL; - - while ( (str = PrefsFindString("disk", tmp) ) != NULL ) - { - if ( strcmp(str, path) == 0 ) - { - PrefsRemoveItem("disk", tmp); - D(NSLog(@"%s - Deleted prefs entry \"disk\", %d", - __PRETTY_FUNCTION__, tmp)); - edited = YES; - break; - } - ++tmp; - } - - if ( str == NULL ) - { - NSLog(@"%s - Couldn't find any disk preference to match %s", - __PRETTY_FUNCTION__, path); - return NULL; - } - - if ( ! [volsDS deleteRow: row] ) - NSLog (@"%s - RemoveVolume %d failed", __PRETTY_FUNCTION__, tmp); - [diskImages reloadData]; -// return path; - return Path; - } - else - { - WarningSheet(@"Please select a volume first", panel); - return NULL; - } -} - -- (IBAction) RemoveVolume: (id)sender -{ - [self RemoveVolumeEntry]; -} - -- (void) loadPrefs: (int) argc - args: (char **) argv -{ - [panel close]; // Temporarily hide preferences panel - - PrefsExit(); // Purge all the old pref values - - PrefsInit(NULL, argc, argv); - AddPrefsDefaults(); - AddPlatformPrefsDefaults(); // and only create basic ones - - [SCSIds deleteAll]; // Clear out datasources for the tables - [volsDS deleteAll]; - - [self ShowPrefs: self]; // Reset items in panel, and redisplay - edited = NO; -} - -- (IBAction) LoadPrefs: (id)sender -{ - int argc = 2; - char *argv[2]; - - argv[0] = "--prefs", - argv[1] = (char *) [[prefsFile stringValue] UTF8String]; - - [self loadPrefs: argc - args: argv]; -} - -- (IBAction) ResetPrefs: (id)sender -{ - [self loadPrefs: 0 - args: NULL]; -} - -- (void) setStringOf: (NSTextField *) field - fromPref: (const char *) prefName -{ - const char *value = PrefsFindString(prefName, 0); - - if ( value ) - [field setStringValue: [NSString stringWithUTF8String: value] ]; -} - -- (IBAction) SavePrefs: (id)sender -{ - SavePrefs(); - edited = NO; -} - -- (IBAction) ShowPrefs: (id)sender -{ - NSTableColumn *locks; - const char *str; - int cpu, tmp, val; - - - // Set simple single field items - - val = PrefsFindInt32("frameskip"); - [delay setIntValue: val]; - if ( val ) - [frequency setFloatValue: 60.0 / val]; - else - [frequency setFloatValue: 60.0]; - - val = PrefsFindInt32("ramsize"); - [bytes setIntValue: val]; - [MB setFloatValue: val / (1024.0 * 1024.0)]; - - [disableCD setState: PrefsFindBool("nocdrom")]; - [disableSound setState: PrefsFindBool("nosound")]; - [FPU setState: PrefsFindBool("fpu") ]; - - [self setStringOf: etherNet fromPref: "ether" ]; - [self setStringOf: extFS fromPref: "extfs" ]; - [self setStringOf: modem fromPref: "seriala"]; - [self setStringOf: printer fromPref: "serialb"]; - [self setStringOf: ROMfile fromPref: "rom"]; - - [prefsFile setStringValue: [NSString stringWithUTF8String: UserPrefsPath.c_str()] ]; - - - parse_screen_prefs(PrefsFindString("screen")); - - [width setIntValue: init_width]; - [height setIntValue: init_height]; - [depth setIntValue: init_depth]; - - [screen setState: NO]; - switch ( display_type ) - { - case DISPLAY_WINDOW: [window setState: YES]; break; - case DISPLAY_SCREEN: [screen setState: YES]; break; - } - - [newVolumeSize setIntValue: 10]; - - // Radio button groups: - - val = PrefsFindInt32("bootdriver"); - [bootFromAny setState: val != CDROMRefNum]; - [bootFromCD setState: val == CDROMRefNum]; - - cpu = PrefsFindInt32("cpu"); - val = PrefsFindInt32("modelid"); - -#if REAL_ADDRESSING || DIRECT_ADDRESSING - puts("Current memory model does not support 24bit addressing"); - if ( val == [classic tag] ) - { - // Window already created by NIB file, just display - [panel makeKeyAndOrderFront:self]; - WarningSheet(@"Compiled-in memory model does not support 24bit", - @"Disabling Mac Classic emulation", nil, panel); - cpu = [CPU68030 tag]; - PrefsReplaceInt32("cpu", cpu); - val = [IIci tag]; - PrefsReplaceInt32("modelid", val); - } - - puts("Disabling 68000 & Mac Classic buttons"); - [CPU68000 setEnabled:FALSE]; - [classic setEnabled:FALSE]; -#endif - - [CPU68000 setState: [CPU68000 tag] == cpu]; - [CPU68020 setState: [CPU68020 tag] == cpu]; - [CPU68030 setState: [CPU68030 tag] == cpu]; - [CPU68040 setState: [CPU68040 tag] == cpu]; - - [classic setState: [classic tag] == val]; - [IIci setState: [IIci tag] == val]; - [quadra900 setState: [quadra900 tag] == val]; - - - // Lists of thingies: - - val = PrefsFindInt32("keyboardtype"); - tmp = [keyboard indexOfItemWithTag: val]; - if ( tmp != -1 ) - [keyboard selectItemAtIndex: tmp]; - for ( tmp = 0; tmp < [keyboard numberOfItems]; ++tmp ) - { - NSMenuItem *type = [keyboard itemAtIndex: tmp]; - [type setState: [type tag] == val]; - } - - - for ( tmp = 0; tmp < 7; ++tmp) - { - char pref[6]; - - pref[0] = '\0'; - - sprintf (pref, "scsi%d", tmp); - if ( (str = PrefsFindString(pref, 0) ) ) - [SCSIds addInt: tmp - withPath: [NSString stringWithCString: str] ]; - } - - [SCSIdisks setDataSource: SCSIds]; - - locks = [diskImages tableColumnWithIdentifier: @"locked"]; - if ( locks == nil ) - NSLog (@"%s - Can't find column for lock images", __PRETTY_FUNCTION__); - [locks setDataCell: lockCell]; - - tmp = 0; - while ( (str = PrefsFindString("disk", tmp++) ) != NULL ) - { - if ( *str == '*' ) - [volsDS addObject: (NSObject *) locked - withPath: [NSString stringWithUTF8String: str+1]]; - else - [volsDS addObject: (NSObject *) blank - withPath: [NSString stringWithUTF8String: str]]; - } - - [diskImages setDataSource: volsDS]; - - - [panel makeKeyAndOrderFront:self]; // Window already created by NIB file, just display -} - -@end diff --git a/BasiliskII/src/MacOSX/ToDo.html b/BasiliskII/src/MacOSX/ToDo.html deleted file mode 100644 index d4b4f66d4..000000000 --- a/BasiliskII/src/MacOSX/ToDo.html +++ /dev/null @@ -1,61 +0,0 @@ - -Bugs: -
    -
  • In window mode, if the framerate is low (e.g. if you leave it at the - default of 10fps) or if the emulated screen is too large, - really fast mouse clicks are sometimes not picked up - by the Emulator. For now, click more slowly
    • -
  • In full screen mode after a restart, when the mouse is first moved, - the emulated pointer jumps to the location that it was before the restart. - Disturbing, but not damaging.
    • -
  • Ejecting a CD only works in 10.2 or higher, and it freezes the emulation - for about 5 seconds.
    • -
  • Status of 'dd' command is not always correct. (If it runs out of space, - an error about file not found is printed?)
    • -
  • The Snapshot function is currently broken in some situations - (if the emulation changes its own screen settings, and the program - is compiled with the default window drawing mode of CGIMAGEREF). - Setting the depth to millions (in the emulator) is a workaround for now
    • -
  • Cut and paste between emulator and OS X only half works
    • -
-Untested: -
    -
  • Mac Classic emulation. I don't have a ROM, but I suspect it will crash
    • -
  • Serial port code
    • -
-Unimplemented: -
    -
  • CD audio stuff. I am still trying to get this to work
    • -
  • CD insert detection. At the moment, if a CD isn't there when the - emulator boots, or if you change CDs, it will never know. I don't - know how to register with the OS for disk insertion and mount events. - (Gwenolé rewrote the CD code, and it should poll for new disks, - but it don't work for me. I must be doing something wrong!)
    • -
  • Floppy stuff. If a floppy is mounted by the OS X Finder, - it is busy and cannot be opened by the emulator
    • -
  • Interrupt function for emulator
    • -
  • 'nogui' to disable GUI alerts (and maybe preferences, but I need to split - MainMenu.nib to do that)
    • -
-Possible Enhancements: -
    -
  • Use NSFileManager's movePath:toPath:handler to rename all a file's forks - in extfs_macosx.mm
    • -
  • Emulator snapshot - save the current emulator state - (memory + registers) to a file for fast startup next time
    • -
  • Multiple emulators. The window stuff is mostly there, - but the uae_cpu code has lots of globals, and is not re-entrant
    • -
  • Real addressing mode for the emulator. Mike Sliczniak had done most of the - work, but with real addressing the emulator just crashes for me
    • -
  • Improve Objective-C object allocation. e.g. http://www.mulle-kybernetik.com/artikel/Optimisation/opti-5.html
    • -
  • Use automake instead of the current 1_prepare_files.sh ?
    • -
  • Add JIT options to preferences?
    • -
  • Use internal windows to display Help doco?
    • -
  • Provide feedback during external commands (e.g. ejecting a CD or - creating a disk volume)
    • -
  • Widescreen window layout (suggestion by Michael Franz), so that users - with widescreen displays can squeeze a bigger emulated screen in. - I have a mock up of this that can be pasted in (MainMenu.nib). - Ideally, this would be via a generalised "theme" facility, - but who has time for that :-)
    • -
diff --git a/BasiliskII/src/MacOSX/Versions.html b/BasiliskII/src/MacOSX/Versions.html deleted file mode 100644 index 9486ef742..000000000 --- a/BasiliskII/src/MacOSX/Versions.html +++ /dev/null @@ -1,120 +0,0 @@ - -Versions of MacOS X port of Basilisk II: -
    -
  1. Initial port to Public Beta, made minor changes to get it to compile under Final Release. -
    Gave a copy of this version to Gwenolé Beauchesne (one of the other porters)
    2. -
  2. Ported to version 0.9 of the Basilisk II tarball. -
    Re-engineered autoconfig files to give a clean autoconf and make of cpu_uae code. -
    Fixed a bug in the EmulatorView class (I was customising release instead of dealloc). -
    Added: -
      -
    • Transparency to icon
      • -
    • Port-specific doco: 0_HOW_TO_BUILD.txt, ToDo.html and Versions.html
      • -
    • Screen Snapshot code
      • -
    • Preferences saving and resetting
      • -
    • Delegate code, called when user attempts to close emulator window or quit application, - to check whether preferences need saving or application should be allowed to quit
      • -
    • ExtFS resource and type/creator access code
      • -
    • Window resizing stuff: -
        -
      1. The screensize can be set in the preferences. If the emulator has yet to - start then the window and emulator screen is resized. Otherwise, and
        2. -
      2. At any time, the window can be resized, which scales the emulator screen image
        3. -
      -
      • -
    - Gave a copy of this to Max Horn
    3. -
  3. Some code fixes suggested by Max, doco updates, and porting to OS 10.1
    4. -
  4. Event handling re-write inspired by Max (subclassing NSApplication for custom sendEvent:). - Command key and double clicks are now passed correctly to the Emulator. Took out the custom - "About" window stuff, and added some credits (with an html link to the official Basilisk home - page) in the standard About box. Also has the standard README in the help menu. -
    Gave a copy to Max
    5. -
  5. Streamlining of event sending (filter mouseMoved events when not in Emulator screen)
    6. -
  6. Recompile in Project Builder, because the makefile generated binary dies at startup
    7. -
  7. Ported to the Basilisk II 1.0 snapshot's source and implemented video resolution switching. - Also uses Objective-C++, which eliminates some of the wrapper code which was previously needed.
    8. -
  8. Video preferences fixes, small tidyup of source.
    9. -
  9. Full screen mode added, more source tidied up.
    10. - -
  10. Finally checked into CVS repository. Key event bug fixes: -
      -
    • Cursor keys are now decoded and passed to the Emulator correctly
      • -
    • New one (in version 9) reported by Kentaro Nakatani - - full screen mode was not passing key events
      • -
    11. -
  11. Repaired help menu item, added documentation folder.
    12. -
  12. Several monitor resolution-changing fixes. Windowed mode now supports all depths, - and is up to 6 times faster. I now no longer have any plans to do an OpenGL mode. -
    Minor change in preferences (RAM size fields no longer require - the user to press return or enter for the value to "take"). -
    Some modifications for compilation on 10.2 and 10.1 -
    Initial CD-ROM reading code.
    13. -
  13. Restarting the emulator should be safe and fairly reliable, - and errors in starting the emulator should now be caught. -
    Resizing of window is now animated, and window is centred afterwards. -
    Reduced memory leaks when changing screensize in windowed mode. -
    Screen default pref is now Mac II (and not Classic) size. -
    Fixed: -
      -
    • Bug where the Prefs could not be edited while the emulator was running
      • -
    • Help menu item (again) and added extra doco there
      • -
    • Preferences RAM size thing (again)
      • -
    • A minor Prefs editor button anomaly
      • -
    14. -
  14. Preferences file can now be specified on the command line, - and changed/loaded in the Preferences editor. - Added a feature from the windows port - now supports different keyboard types. - Changed: -
      -
    • Default extfs; was '/', now user's home directory (Suggestion by Olaf Pluta. - Seeing all the Unix dirs is a bit scary!)
      • -
    • HowTo now displayed by default web browser (as it contains links)
      • -
    • Project Builder defaults so that debug symbols are not included
      • -
    15. -
  15. Now built on 10.3 and Xcode. Also adds: -
      -
    • Xcode project files
      • -
    • Initial floppy and serial port locating code
      • -
    • Some help labels on the buttons - (some users didn't understand what the triangle button meant)
      • -
    • Signal handling for crash protection - (thanks to Mike Sliczniak's hard work)
      • -
    -
    16. -
  16. Now distributed as two applications; the usual one (which should be faster), - and one for emulating a Mac Classic (which may also help the 10.2/10.3 users - who are having problems with a black screen at startup). The difference is - that the "classic" version uses virtual or "banks" memory addressing. - Fixed: -
      -
    • Loading of ROM or disk images from directories or filenames which - contain non-ASCII characters
      • -
    • Floppy locating code. It can't actually access a floppy, but at - least it now won't add the cdrom multiple times
      • -
    -
    17. -
  17. Working ethernet, without extra drivers, thanks to Gwenolé. -
    Lots of bug fixes by Bernie Zenis. Some 10.4 fixes by Kirk Kerekes. -
    Some fixes by Marcus Gail ( 'Boot From: CD-ROM' vs - 'Disable CD-ROM Driver' clash). -
    Some cosmetic changes (widened RAM MB in prefs, added confirmation - when deleting volumes). -
    Now no need for "classic" version - - Gwenolé fixed the black screen problem
    18. -
  18. (actually 18a) Minor fixes: -
      -
    • Mouse should always woork in fullscreen mode, and
      • -
    • If snapshot fails, the dialog makes a workaround suggestion
      • -
    -
    19. -
  19. Updated the HowTo, external filesystem fix on 10.4, CD code rewrite. - Added some new features: -
      -
    • Sound support by Daniel Sumorok! Thanks also to Dave Vasilevsky, - who produced earlier versions of sound code that I didn't use.
      • -
    • Cut & Paste support from Gwenolé. You can now paste from the OS X - clipboard into the emulator (pasting the other way doesn't work - for me yet)
      • -
    -
diff --git a/BasiliskII/src/MacOSX/audio_defs_macosx.h b/BasiliskII/src/MacOSX/audio_defs_macosx.h deleted file mode 100644 index dc37fb427..000000000 --- a/BasiliskII/src/MacOSX/audio_defs_macosx.h +++ /dev/null @@ -1,80 +0,0 @@ -/* - * $Id$ - * - * audio_defs_macosx.h - Work around clashes with the enums in - * Based on: - * - * audio_defs.h - Definitions for MacOS audio components - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 AUDIO_DEFS_H -#define AUDIO_DEFS_H - -#include "macos_util_macosx.h" - -enum { // ComponentResource struct - componentType = 0, - componentSubType = 4, - componentManufacturer = 8, - componentFlags = 12, - componentFlagsMask = 16, - componentResType = 20, - componentResID = 24, - componentNameType = 26, - componentNameID = 30, - componentInfoType = 32, - componentInfoID = 36, - componentIconType = 38, - componentIconID = 42, - componentVersion = 44, - componentRegisterFlags = 48, - componentIconFamily = 52, - componentPFCount = 54, - componentPFFlags = 58, - componentPFResType = 62, - componentPFResID = 66, - componentPFPlatform = 68 -}; - - -enum { // ComponentParameters struct - cp_flags = 0, // call modifiers: sync/async, deferred, immed, etc - cp_paramSize = 1, // size in bytes of actual parameters passed to this call - cp_what = 2, // routine selector, negative for Component management calls - cp_params = 4 // actual parameters for the indicated routine -}; - -enum { // SoundComponentData struct - scd_flags = 0, - scd_format = 4, - scd_numChannels = 8, - scd_sampleSize = 10, - scd_sampleRate = 12, - scd_sampleCount = 16, - scd_buffer = 20, - scd_reserved = 24, - SIZEOF_scd = 28 -}; - -enum { // SoundInfoList struct - sil_count = 0, - sil_infoHandle = 2 -}; - -#endif diff --git a/BasiliskII/src/MacOSX/audio_macosx.cpp b/BasiliskII/src/MacOSX/audio_macosx.cpp deleted file mode 100644 index 840d2f13f..000000000 --- a/BasiliskII/src/MacOSX/audio_macosx.cpp +++ /dev/null @@ -1,271 +0,0 @@ -/* - * audio_macosx.cpp - Audio support, implementation Mac OS X - * Copyright (C) 2006, Daniel Sumorok - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" -#include "MacOSX_sound_if.h" - -#define DEBUG 0 -#include "debug.h" - - -// The currently selected audio parameters (indices in -// audio_sample_rates[] etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Prototypes -static OSXsoundOutput *soundOutput = NULL; -static bool main_mute = false; -static bool speaker_mute = false; - -/* - * Initialization - */ -static int audioInt(void); - -static bool open_audio(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; - - if (soundOutput) - delete soundOutput; - - soundOutput = new OSXsoundOutput(); - soundOutput->start(AudioStatus.sample_size, AudioStatus.channels, - AudioStatus.sample_rate >> 16); - soundOutput->setCallback(audioInt); - audio_frames_per_block = soundOutput->bufferSizeFrames(); - - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - //audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - audio_component_flags = 0; - - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - D(bug("Closing Audio\n")); - - if (soundOutput) - { - delete soundOutput; - soundOutput = NULL; - } - - audio_open = false; -} - -void AudioExit(void) -{ - // Close audio device - close_audio(); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - uint32 apple_stream_info; - uint32 numSamples; - int16 *p; - M68kRegisters r; - - if (!AudioStatus.mixer) - { - numSamples = 0; - soundOutput->sendAudioBuffer((void *)p, (int)numSamples); - D(bug("AudioInterrupt done\n")); - return; - } - - // Get data from apple mixer - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - - apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info && (main_mute == false) && (speaker_mute == false)) - { - numSamples = ReadMacInt32(apple_stream_info + scd_sampleCount); - p = (int16 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - } - else - { - numSamples = 0; - p = NULL; - } - - soundOutput->sendAudioBuffer((void *)p, (int)numSamples); - - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. vectors - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - close_audio(); - audio_sample_rate_index = index; - return open_audio(); -} - -bool audio_set_sample_size(int index) -{ - close_audio(); - audio_sample_size_index = index; - return open_audio(); -} - -bool audio_set_channels(int index) -{ - close_audio(); - audio_channel_count_index = index; - return open_audio(); -} - -/* - * Get/set volume controls (volume values received/returned have the - * left channel volume in the upper 16 bits and the right channel - * volume in the lower 16 bits; both volumes are 8.8 fixed point - * values with 0x0100 meaning "maximum volume")) - */ -bool audio_get_main_mute(void) -{ - return main_mute; -} - -uint32 audio_get_main_volume(void) -{ - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return speaker_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ - main_mute = mute; -} - -void audio_set_main_volume(uint32 vol) -{ -} - -void audio_set_speaker_mute(bool mute) -{ - speaker_mute = mute; -} - -void audio_set_speaker_volume(uint32 vol) -{ -} - -static int audioInt(void) -{ - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - return 0; -} diff --git a/BasiliskII/src/MacOSX/autorelease.h b/BasiliskII/src/MacOSX/autorelease.h deleted file mode 100644 index c89cb100c..000000000 --- a/BasiliskII/src/MacOSX/autorelease.h +++ /dev/null @@ -1,46 +0,0 @@ -/* - * autorelease.h - a macro wrapping autorelease pools for use with Objective-C++ source files. - * - * Expands to @autoreleasepool on clang, uses a little hack to emulate @autoreleasepool on gcc. - * - * (C) 2012 Charles Srstka - * - * 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 - */ - -#import - -#ifndef __Autorelease_H__ -#define __Autorelease_H__ - -// just a little forward compatibility in case we ever support LLVM/clang -#if __clang__ -#define AUTORELEASE_POOL @autoreleasepool -#else -class Autorelease_Pool_Wrapper { -public: - Autorelease_Pool_Wrapper() { m_pool = [[NSAutoreleasePool alloc] init]; } - ~Autorelease_Pool_Wrapper() { [m_pool drain]; } - operator bool() const { return true; } -private: - NSAutoreleasePool *m_pool; -}; - -#define POOL_NAME(x, y) x##_##y -#define POOL_NAME2(x, y) POOL_NAME(x, y) -#define AUTORELEASE_POOL if(Autorelease_Pool_Wrapper POOL_NAME2(pool, __LINE__) = Autorelease_Pool_Wrapper()) -#endif // !__clang__ - -#endif // __Autorelease_H__ diff --git a/BasiliskII/src/MacOSX/clip_macosx.cpp b/BasiliskII/src/MacOSX/clip_macosx.cpp deleted file mode 100644 index 1d37edfcf..000000000 --- a/BasiliskII/src/MacOSX/clip_macosx.cpp +++ /dev/null @@ -1,211 +0,0 @@ -/* - * clip_macosx.cpp - Clipboard handling, MacOS X (Carbon) implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#define _UINT64 -#include - -#include "clip.h" -#include "main.h" -#include "cpu_emulation.h" -#include "emul_op.h" - -#define DEBUG 0 -#include "debug.h" - - -// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the MacOS X side -static bool we_put_this_data = false; - - -static void SwapScrapData(uint32 type, void *data, int32 length, int from_host) { -#if BYTE_ORDER != BIG_ENDIAN - if (type == kScrapFlavorTypeTextStyle) { - uint16 *sdata = (uint16 *) data; - // the first short stores the number of runs - uint16 runs = sdata[0]; - sdata[0] = htons(sdata[0]); - if (from_host) - runs = sdata[0]; - sdata++; - // loop through each run - for (int i = 0; i < runs; i++) { - struct style_data { - uint32 offset; - uint16 line_height; - uint16 line_ascent; - uint16 font_family; - uint16 character_style; // not swapped - uint16 point_size; - uint16 red; - uint16 green; - uint16 blue; - } *style = (struct style_data *) (sdata + i*10); - style->offset = htonl(style->offset); - style->line_height = htons(style->line_height); - style->line_ascent = htons(style->line_ascent); - style->font_family = htons(style->font_family); - style->point_size = htons(style->point_size); - style->red = htons(style->red); - style->green = htons(style->green); - style->blue = htons(style->blue); - } - } else { - // add byteswapping code for other flavor types here ... - } -#endif -} - - -/* - * Initialization - */ - -void ClipInit(void) -{ -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ -} - - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ -#if defined(__LP64__) - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); - #warning Carbon scrapbook function are not implemented in 64-bit mode -#else - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); - ScrapRef theScrap; - - if (GetCurrentScrap(&theScrap) != noErr) { - D(bug(" could not open scrap\n")); - return; - } - - Size byteCount; - if (GetScrapFlavorSize(theScrap, type, &byteCount) == noErr) { - - // Allocate space for new scrap in MacOS side - M68kRegisters r; - r.d[0] = byteCount; - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 scrap_area = r.a[0]; - - // Get the native clipboard data - if (scrap_area) { - uint8 * const data = Mac2HostAddr(scrap_area); - if (GetScrapFlavorData(theScrap, type, &byteCount, data) == noErr) { - SwapScrapData(type, data, byteCount, FALSE); - // Add new data to clipboard - static uint8 proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0xa9, 0xfc, // ZeroScrap() - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) - 0xa9, 0xfe, // PutScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt32(proc_area + 6, byteCount); - WriteMacInt32(proc_area + 12, type); - WriteMacInt32(proc_area + 18, scrap_area); - we_put_this_data = true; - Execute68k(proc_area, &r); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - } - - r.a[0] = scrap_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - } -#endif -} - -/* - * ZeroScrap() is called before a Mac application writes to the clipboard; clears out the previous contents - */ - -void ZeroScrap() -{ - D(bug("ZeroScrap\n")); - - we_put_this_data = false; -} - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ -#if defined(__LP64__) - #warning Carbon scrapbook function are not implemented in 64-bit mode - D(bug("PutScrap type %4.4s, data %08lx, length %ld\n", &type, scrap, length)); -#else - static bool clear = true; - D(bug("PutScrap type %4.4s, data %08lx, length %ld\n", &type, scrap, length)); - ScrapRef theScrap; - - if (we_put_this_data) { - we_put_this_data = false; - clear = true; - return; - } - if (length <= 0) - return; - - if (clear) { - D(bug(" calling ClearCurrentScrap\n")); - ClearCurrentScrap(); - } - if (GetCurrentScrap(&theScrap) != noErr) { - D(bug(" could not open scrap\n")); - return; - } - - SwapScrapData(type, scrap, length, TRUE); - if (PutScrapFlavor(theScrap, type, kScrapFlavorMaskNone, length, scrap) != noErr) { - D(bug(" could not put to scrap\n")); - //return; - } - SwapScrapData(type, scrap, length, FALSE); // swap it back -#endif -} diff --git a/BasiliskII/src/MacOSX/clip_macosx64.mm b/BasiliskII/src/MacOSX/clip_macosx64.mm deleted file mode 100644 index 23261890a..000000000 --- a/BasiliskII/src/MacOSX/clip_macosx64.mm +++ /dev/null @@ -1,1286 +0,0 @@ -/* - * clip_macosx64.mm - Clipboard handling, MacOS X (Pasteboard Manager) implementation - * - * (C) 2012 Jean-Pierre Stierlin - * (C) 2012 Alexei Svitkine - * (C) 2012 Charles Srstka - * - * 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 "sysdeps.h" -#define _UINT64 -#import -#include - -#include "clip.h" -#include "main.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "autorelease.h" -#include "pict.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef FOURCC -#define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) -#endif - -#define TYPE_PICT FOURCC('P','I','C','T') -#define TYPE_TEXT FOURCC('T','E','X','T') -#define TYPE_STYL FOURCC('s','t','y','l') -#define TYPE_UTXT FOURCC('u','t','x','t') -#define TYPE_UT16 FOURCC('u','t','1','6') -#define TYPE_USTL FOURCC('u','s','t','l') -#define TYPE_MOOV FOURCC('m','o','o','v') -#define TYPE_SND FOURCC('s','n','d',' ') -#define TYPE_ICNS FOURCC('i','c','n','s') - -static NSPasteboard *g_pboard; -static NSInteger g_pb_change_count = 0; - -// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the MacOS X side -static bool we_put_this_data = false; - -static bool should_clear = false; - -static NSMutableDictionary *g_macScrap; - -// flavor UTIs - -static NSString * const UTF16_TEXT_FLAVOR_NAME = @"public.utf16-plain-text"; -static NSString * const TEXT_FLAVOR_NAME = @"com.apple.traditional-mac-plain-text"; -static NSString * const STYL_FLAVOR_NAME = @"net.cebix.basilisk.styl-data"; - -// font face types - -enum { - FONT_FACE_PLAIN = 0, - FONT_FACE_BOLD = 1, - FONT_FACE_ITALIC = 2, - FONT_FACE_UNDERLINE = 4, - FONT_FACE_OUTLINE = 8, - FONT_FACE_SHADOW = 16, - FONT_FACE_CONDENSED = 32, - FONT_FACE_EXTENDED = 64 -}; - -// Script Manager constants - -#define smRoman 0 -#define smMacSysScript 18 -#define smMacRegionCode 40 - -static NSString *UTIForFlavor(uint32_t type) -{ - switch (type) { - case TYPE_MOOV: - return (NSString *)kUTTypeQuickTimeMovie; - case TYPE_SND: - return (NSString *)kUTTypeAudio; - case TYPE_ICNS: - return (NSString *)kUTTypeAppleICNS; - default: { - CFStringRef typeString = UTCreateStringForOSType(type); - NSString *uti = (NSString *)UTTypeCreatePreferredIdentifierForTag(kUTTagClassOSType, typeString, NULL); - - CFRelease(typeString); - - if (uti == nil || [uti hasPrefix:@"dyn."]) { - // The docs threaten that this may stop working at some unspecified point in the future. - // However, it seems to work on Lion and Mountain Lion, and there's no other way to do this - // that I can see. Most likely, whichever release eventually breaks this will probably also - // drop support for the 32-bit applications which typically use these 32-bit scrap types anyway, - // making it irrelevant. When this happens, we should include a version check for the version of - // OS X that dropped this support, and leave uti alone in that case. - - [uti release]; - uti = [[NSString alloc] initWithFormat:@"CorePasteboardFlavorType 0x%08x", type]; - } - - return [uti autorelease]; - } - } -} - -static uint32_t FlavorForUTI(NSString *uti) -{ - CFStringRef typeTag = UTTypeCopyPreferredTagWithClass((CFStringRef)uti, kUTTagClassOSType); - - if (!typeTag) - return 0; - - uint32_t type = UTGetOSTypeFromString(typeTag); - - CFRelease(typeTag); - - return type; -} - -/* - * Get current system script encoding on Mac - */ - -static int GetMacScriptManagerVariable(uint16_t varID) -{ - int ret = -1; - M68kRegisters r; - static uint8_t proc[] = { - 0x59, 0x4f, // subq.w #4,sp - 0x3f, 0x3c, 0x00, 0x00, // move.w #varID,-(sp) - 0x2f, 0x3c, 0x84, 0x02, 0x00, 0x08, // move.l #-2080243704,-(sp) - 0xa8, 0xb5, // ScriptUtil() - 0x20, 0x1f, // move.l (a7)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 4, varID); - Execute68k(proc_area, &r); - ret = r.d[0]; - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - return ret; -} - -static ScriptCode ScriptNumberForFontID(int16_t fontID) -{ - ScriptCode ret = -1; - M68kRegisters r; - static uint8_t proc[] = { - 0x55, 0x4f, // subq.w #2,sp - 0x3f, 0x3c, 0x00, 0x00, // move.w #fontID,-(sp) - 0x2f, 0x3c, 0x82, 0x02, 0x00, 0x06, // move.l #-2113798138,-(sp) - 0xa8, 0xb5, // ScriptUtil() - 0x30, 0x1f, // move.w (sp)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 4, fontID); - Execute68k(proc_area, &r); - ret = r.d[0]; - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - return ret; -} - -/* - * Get Mac's default text encoding - */ - -static TextEncoding MacDefaultTextEncoding() -{ - int script = GetMacScriptManagerVariable(smMacSysScript); - int region = GetMacScriptManagerVariable(smMacRegionCode); - TextEncoding encoding; - - if (UpgradeScriptInfoToTextEncoding(script, kTextLanguageDontCare, region, NULL, &encoding)) - encoding = kTextEncodingMacRoman; - - return encoding; -} - -static NSData *ConvertToMacTextEncoding(NSAttributedString *aStr, NSArray **styleAndScriptRuns) -{ - NSUInteger length = [aStr length]; - - NSMutableArray *styleRuns = [NSMutableArray array]; - - for (NSUInteger index = 0; index < length;) { - NSRange attrRange; - NSDictionary *attrs = [aStr attributesAtIndex:index effectiveRange:&attrRange]; - - [styleRuns addObject:[NSDictionary dictionaryWithObjectsAndKeys: - [NSNumber numberWithUnsignedInteger:index], @"offset", - attrs, @"attributes", nil]]; - - index = NSMaxRange(attrRange); - } - - UnicodeToTextRunInfo info; - - OSStatus err = CreateUnicodeToTextRunInfoByScriptCode(0, NULL, &info); - - if (err != noErr) { - if (styleAndScriptRuns) - *styleAndScriptRuns = styleRuns; - - return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - } - - unichar chars[length]; - - [[aStr string] getCharacters:chars range:NSMakeRange(0, length)]; - - NSUInteger unicodeLength = length * sizeof(unichar); - NSUInteger bufLen = unicodeLength * 2; - uint8_t buf[bufLen]; - ByteCount bytesRead; - - ItemCount scriptRunCount = 1601; // max number of allowed style changes - ScriptCodeRun scriptRuns[scriptRunCount]; - - ItemCount inOffsetCount = [styleRuns count]; - ByteOffset inOffsets[inOffsetCount]; - - if (inOffsetCount) { - for (NSUInteger i = 0; i < inOffsetCount; i++) { - NSDictionary *eachRun = [styleRuns objectAtIndex:i]; - - inOffsets[i] = [[eachRun objectForKey:@"offset"] unsignedLongValue] * 2; - } - } - - ItemCount offsetCount; - ByteOffset offsets[inOffsetCount]; - - err = ConvertFromUnicodeToScriptCodeRun(info, unicodeLength, chars, - kUnicodeTextRunMask | kUnicodeUseFallbacksMask | kUnicodeLooseMappingsMask, - inOffsetCount, inOffsets, &offsetCount, offsets, - bufLen, &bytesRead, &bufLen, buf, - scriptRunCount, &scriptRunCount, scriptRuns); - - if (err != noErr) { - if (styleAndScriptRuns) - *styleAndScriptRuns = styleRuns; - - return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - } - - if (styleAndScriptRuns) { - NSMutableArray *runs = [NSMutableArray array]; - NSUInteger currentStyleRun = 0; - NSUInteger currentScriptRun = 0; - - for (NSUInteger currentOffset = 0; currentOffset < bufLen;) { - ScriptCodeRun scriptRun = scriptRuns[currentScriptRun]; - NSDictionary *attrs = [[styleRuns objectAtIndex:currentStyleRun] objectForKey:@"attributes"]; - - NSUInteger nextStyleOffset = (currentStyleRun < offsetCount - 1) ? offsets[currentStyleRun + 1] : bufLen; - NSUInteger nextScriptOffset = (currentScriptRun < scriptRunCount - 1) ? scriptRuns[currentScriptRun + 1].offset : bufLen; - - [runs addObject:[NSDictionary dictionaryWithObjectsAndKeys: - [NSNumber numberWithUnsignedInteger:currentOffset], @"offset", - [NSNumber numberWithShort:scriptRun.script], @"script", - attrs, @"attributes", nil]]; - - if (nextStyleOffset == nextScriptOffset) { - currentStyleRun++; - currentScriptRun++; - currentOffset = nextStyleOffset; - } else if (nextStyleOffset < nextScriptOffset) { - currentStyleRun++; - currentOffset = nextStyleOffset; - } else { - currentScriptRun++; - currentOffset = nextScriptOffset; - } - } - - *styleAndScriptRuns = runs; - } - - return [NSData dataWithBytes:buf length:bufLen]; -} - -/* - * Count all Mac font IDs on the system - */ - -static NSUInteger CountMacFonts() -{ - M68kRegisters r; - static uint8_t proc[] = { - 0x55, 0x4f, // subq.w #2,sp - 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) - 0xa9, 0x9c, // CountResources() - 0x30, 0x1f, // move.w (sp)+,D0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - int16_t fontCount = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - Execute68k(proc_area, &r); - - fontCount = r.d[0]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - if (fontCount < 0) { - fontCount = 0; - } - - return fontCount; -} - -/* - * Get Mac font ID at index - */ - -static int16_t MacFontIDAtIndex(NSUInteger index) -{ - M68kRegisters r; - static uint8_t get_res_handle_proc[] = { - 0x42, 0x27, // clr.b -(sp) - 0xa9, 0x9b, // SetResLoad() - 0x59, 0x4f, // subq.w #4,sp - 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) - 0x3f, 0x3c, 0, 0, // move.w #index,-(sp) - 0xa9, 0x9d, // GetIndResource() - 0x26, 0x5f, // movea.l (sp)+,A3 - 0x1f, 0x3c, 0x00, 0x01, // move.b #1,-(sp) - 0xa9, 0x9b, // SetResLoad() - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(get_res_handle_proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - uint32_t res_handle = 0; - int16_t fontID = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, get_res_handle_proc, sizeof(get_res_handle_proc)); - WriteMacInt16(proc_area + 14, (uint16_t)(index + 1)); - - Execute68k(proc_area, &r); - - res_handle = r.a[3]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr() - } - - if (res_handle) { - static uint8_t get_info_proc[] = { - 0x2f, 0x0a, // move.l A2,-(sp) - 0x2f, 0x0b, // move.l A3,-(sp) - 0x42, 0xa7, // clr.l -(sp) - 0x42, 0xa7, // clr.l -(sp) - 0xa9, 0xa8, // GetResInfo() - 0x2f, 0x0a, // move.l A2,-(sp) - 0xa9, 0xa3, // ReleaseResource() - M68K_RTS >> 8, M68K_RTS & 0xff, - 0, 0 - }; - - r.d[0] = sizeof(get_info_proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, get_info_proc, sizeof(get_info_proc)); - r.a[2] = res_handle; - r.a[3] = proc_area + 16; - - Execute68k(proc_area, &r); - - fontID = ReadMacInt16(proc_area + 16); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr() - } - } - - return fontID; -} - -/* - * List all font IDs on the system - */ - -static NSArray *ListMacFonts() -{ - NSUInteger fontCount = CountMacFonts(); - NSMutableArray *fontIDs = [NSMutableArray array]; - - for (NSUInteger i = 0; i < fontCount; i++) { - int16_t eachFontID = MacFontIDAtIndex(i); - - [fontIDs addObject:[NSNumber numberWithShort:eachFontID]]; - } - - return fontIDs; -} - -/* - * List all font IDs having a certain script - */ - -static NSArray *ListMacFontsForScript(ScriptCode script) -{ - NSMutableArray *fontIDs = [NSMutableArray array]; - - for (NSNumber *eachFontIDNum in ListMacFonts()) { - if (ScriptNumberForFontID([eachFontIDNum shortValue]) == script) - [fontIDs addObject:eachFontIDNum]; - } - - return fontIDs; -} - -/* - * Convert Mac font ID to font name - */ - -static NSString *FontNameFromFontID(int16_t fontID) -{ - M68kRegisters r; - r.d[0] = 256; // Str255: 255 characters + length byte - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t name_area = r.a[0]; - - if (!name_area) - return nil; - - uint8_t proc[] = { - 0x3f, 0x3c, 0, 0, // move.w #fontID,-(sp) - 0x2f, 0x0a, // move.l A2,-(sp) - 0xa8, 0xff, // GetFontName() - M68K_RTS >> 8, M68K_RTS & 0xff - }; - - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 2, fontID); - r.a[2] = name_area; - Execute68k(proc_area, &r); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - uint8_t * const namePtr = Mac2HostAddr(name_area); - - NSString *name = (NSString *)CFStringCreateWithPascalString(kCFAllocatorDefault, namePtr, kCFStringEncodingMacRoman); - - r.a[0] = name_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - return [name autorelease]; -} - -/* - * Convert font name to Mac font ID - */ - -static int16_t FontIDFromFontName(NSString *fontName) -{ - M68kRegisters r; - r.d[0] = 256; // Str255: 255 characters + length byte - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t name_area = r.a[0]; - - if (!name_area) - return 0; - - uint8_t * const namePtr = Mac2HostAddr(name_area); - - CFStringGetPascalString((CFStringRef)fontName, namePtr, 256, kCFStringEncodingMacRoman); - - uint8_t proc[] = { - 0x2f, 0x0a, // move.l A2,-(sp) - 0x2f, 0x0b, // move.l A3,-(sp) - 0xa9, 0x00, // GetFNum() - M68K_RTS >> 8, M68K_RTS & 0xff, - 0, 0 - }; - - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - int16_t fontID = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - r.a[2] = name_area; - r.a[3] = proc_area + 8; - - Execute68k(proc_area, &r); - - fontID = ReadMacInt16(proc_area + 8); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - r.a[0] = name_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - return fontID; -} - -/* - * Get font ID in desired script if possible; otherwise, try to get some font in the desired script. - */ - -static int16_t FontIDFromFontNameAndScript(NSString *fontName, ScriptCode script) -{ - int16_t fontID = FontIDFromFontName(fontName); - - if (ScriptNumberForFontID(fontID) == script) - return fontID; - - NSArray *fontIDs = ListMacFontsForScript(script); - - if ([fontIDs count] == 0) - return fontID; // no fonts are going to work; might as well return the original one - - if (fontName) { - // look for a localized version of our font; e.g. "Helvetica CE" if our font is Helvetica - for (NSNumber *eachFontIDNum in fontIDs) { - int16_t eachFontID = [eachFontIDNum shortValue]; - - if ([FontNameFromFontID(eachFontID) hasPrefix:fontName]) - return eachFontID; - } - } - - // Give up and just return a font that will work - return [[fontIDs objectAtIndex:0] shortValue]; -} - -/* - * Convert Mac TEXT/styl to attributed string - */ - -static NSAttributedString *AttributedStringFromMacTEXTAndStyl(NSData *textData, NSData *stylData) -{ - NSMutableAttributedString *aStr = [[[NSMutableAttributedString alloc] init] autorelease]; - - if (aStr == nil) - return nil; - - const uint8_t *bytes = (const uint8_t *)[stylData bytes]; - NSUInteger length = [stylData length]; - - if (length < 2) - return nil; - - uint16_t elements = CFSwapInt16BigToHost(*(uint16_t *)bytes); - const NSUInteger elementSize = 20; - - if (length < elements * elementSize) - return nil; - - NSUInteger cursor = 2; - - for (NSUInteger i = 0; i < elements; i++) AUTORELEASE_POOL { - int32_t startChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); cursor += 4; - int16_t height __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - int16_t ascent __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - int16_t fontID = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint8_t face = bytes[cursor]; cursor += 2; - int16_t size = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t red = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t green = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t blue = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - - int32_t nextChar; - - if (i + 1 == elements) - nextChar = [textData length]; - else - nextChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); - - NSMutableDictionary *attrs = [[NSMutableDictionary alloc] init]; - NSColor *color = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:1.0]; - NSFont *font; - TextEncoding encoding; - - if (fontID == 0) { // System font - CGFloat fontSize = (size == 0) ? [NSFont systemFontSize] : (CGFloat)size; - font = [NSFont systemFontOfSize:fontSize]; - } else if (fontID == 1) { // Application font - font = [NSFont userFontOfSize:(CGFloat)size]; - } else { - NSString *fontName = FontNameFromFontID(fontID); - font = [NSFont fontWithName:fontName size:(CGFloat)size]; - - if (font == nil) { - // Convert localized variants of fonts; e.g. "Helvetica CE" to "Helvetica" - - NSRange wsRange = [fontName rangeOfCharacterFromSet:[NSCharacterSet whitespaceCharacterSet] options:NSBackwardsSearch]; - - if (wsRange.length) { - fontName = [fontName substringToIndex:wsRange.location]; - font = [NSFont fontWithName:fontName size:(CGFloat)size]; - } - } - } - - if (font == nil) - font = [NSFont userFontOfSize:(CGFloat)size]; - - if (UpgradeScriptInfoToTextEncoding(ScriptNumberForFontID(fontID), kTextLanguageDontCare, kTextRegionDontCare, NULL, &encoding)) - encoding = MacDefaultTextEncoding(); - - NSFontManager *fm = [NSFontManager sharedFontManager]; - - if (face & FONT_FACE_BOLD) - font = [fm convertFont:font toHaveTrait:NSBoldFontMask]; - - if (face & FONT_FACE_ITALIC) - font = [fm convertFont:font toHaveTrait:NSItalicFontMask]; - - if (face & FONT_FACE_CONDENSED) - font = [fm convertFont:font toHaveTrait:NSCondensedFontMask]; - - if (face & FONT_FACE_EXTENDED) - font = [fm convertFont:font toHaveTrait:NSExpandedFontMask]; - - [attrs setObject:font forKey:NSFontAttributeName]; - - if (face & FONT_FACE_UNDERLINE) - [attrs setObject:[NSNumber numberWithInteger:NSUnderlineStyleSingle] forKey:NSUnderlineStyleAttributeName]; - - if (face & FONT_FACE_OUTLINE) { - [attrs setObject:color forKey:NSStrokeColorAttributeName]; - [attrs setObject:[NSNumber numberWithInteger:3] forKey:NSStrokeWidthAttributeName]; - } - - if (face & FONT_FACE_SHADOW) { - NSShadow *shadow = [[NSShadow alloc] init]; - NSColor *shadowColor = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:0.5]; - - [shadow setShadowColor:shadowColor]; - [shadow setShadowOffset:NSMakeSize(2, -2.0)]; - - [attrs setObject:shadow forKey:NSShadowAttributeName]; - - [shadow release]; - } - - [attrs setObject:color forKey:NSForegroundColorAttributeName]; - - NSData *partialData = [textData subdataWithRange:NSMakeRange(startChar, nextChar - startChar)]; - NSString *partialString = [[NSString alloc] initWithData:partialData encoding:CFStringConvertEncodingToNSStringEncoding(encoding)]; - - if (partialString) { - NSAttributedString *partialAttribString = [[NSAttributedString alloc] initWithString:partialString attributes:attrs]; - - [aStr appendAttributedString:partialAttribString]; - - [partialAttribString release]; - } - - [partialString release]; - [attrs release]; - } - - return aStr; -} - -/* - * Append styl data for one text run - */ - -static void AppendStylRunData(NSMutableData *stylData, NSDictionary *attrs, ScriptCode script) -{ - NSFontManager *fontManager = [NSFontManager sharedFontManager]; - NSLayoutManager *layoutManager = [[NSLayoutManager alloc] init]; - - NSFont *font = [attrs objectForKey:NSFontAttributeName]; - NSColor *color = [[attrs objectForKey:NSForegroundColorAttributeName] colorUsingColorSpaceName:NSDeviceRGBColorSpace device:nil]; - NSFontTraitMask traits = [fontManager traitsOfFont:font]; - NSNumber *underlineStyle = [attrs objectForKey:NSUnderlineStyleAttributeName]; - NSNumber *strokeWidth = [attrs objectForKey:NSStrokeWidthAttributeName]; - NSShadow *shadow = [attrs objectForKey:NSShadowAttributeName]; - - int16_t hostFontID = FontIDFromFontNameAndScript([font familyName], script); - - if (hostFontID == 0) { - hostFontID = [font isFixedPitch] ? 4 /* Monaco */ : 1 /* Application font */; - } - - int16_t height = CFSwapInt16HostToBig((int16_t)rint([layoutManager defaultLineHeightForFont:font])); - int16_t ascent = CFSwapInt16HostToBig((int16_t)rint([font ascender])); - int16_t fontID = CFSwapInt16HostToBig(hostFontID); - uint8_t face = 0; - int16_t size = CFSwapInt16HostToBig((int16_t)rint([font pointSize])); - uint16_t red = CFSwapInt16HostToBig((int16_t)rint([color redComponent] * 65535.0)); - uint16_t green = CFSwapInt16HostToBig((int16_t)rint([color greenComponent] * 65535.0)); - uint16_t blue = CFSwapInt16HostToBig((int16_t)rint([color blueComponent] * 65535.0)); - - if (traits & NSBoldFontMask) { - face |= FONT_FACE_BOLD; - } - - if (traits & NSItalicFontMask) { - face |= FONT_FACE_ITALIC; - } - - if (traits & NSCondensedFontMask) { - face |= FONT_FACE_CONDENSED; - } - - if (traits & NSExpandedFontMask) { - face |= FONT_FACE_EXTENDED; - } - - if (underlineStyle && [underlineStyle integerValue] != NSUnderlineStyleNone) { - face |= FONT_FACE_UNDERLINE; - } - - if (strokeWidth && [strokeWidth doubleValue] > 0.0) { - face |= FONT_FACE_OUTLINE; - } - - if (shadow) { - face |= FONT_FACE_SHADOW; - } - - [stylData appendBytes:&height length:2]; - [stylData appendBytes:&ascent length:2]; - [stylData appendBytes:&fontID length:2]; - [stylData appendBytes:&face length:1]; - [stylData increaseLengthBy:1]; - [stylData appendBytes:&size length:2]; - [stylData appendBytes:&red length:2]; - [stylData appendBytes:&green length:2]; - [stylData appendBytes:&blue length:2]; - - [layoutManager release]; -} - -/* - * Convert attributed string to TEXT/styl - */ - -static NSData *ConvertToMacTEXTAndStyl(NSAttributedString *aStr, NSData **outStylData) -{ - // Limitations imposed by the Mac TextEdit system. - const NSUInteger charLimit = 32 * 1024; - const NSUInteger elementLimit = 1601; - - NSUInteger length = [aStr length]; - - if (length > charLimit) { - aStr = [aStr attributedSubstringFromRange:NSMakeRange(0, charLimit)]; - } - - NSArray *runs = nil; - - NSData *textData = ConvertToMacTextEncoding(aStr, &runs); - - NSMutableData *stylData = [NSMutableData dataWithLength:2]; // number of styles to be filled in at the end - - NSUInteger elements = 0; - - for (NSDictionary *eachRun in runs) { - if (elements >= elementLimit) - break; - - NSUInteger offset = [[eachRun objectForKey:@"offset"] unsignedIntegerValue]; - ScriptCode script = [[eachRun objectForKey:@"script"] shortValue]; - NSDictionary *attrs = [eachRun objectForKey:@"attributes"]; - - int32_t startChar = CFSwapInt32HostToBig((int32_t)offset); - [stylData appendBytes:&startChar length:4]; - - AppendStylRunData(stylData, attrs, script); - - elements++; - } - - uint16_t bigEndianElements = CFSwapInt16HostToBig((uint16_t)elements); - - [stylData replaceBytesInRange:NSMakeRange(0, 2) withBytes:&bigEndianElements length:2]; - - if (outStylData) - *outStylData = stylData; - - return textData; -} - -/* - * Get data of a particular flavor from the pasteboard - */ - -static NSData *DataFromPasteboard(NSPasteboard *pboard, NSString *flavor) -{ - return [pboard dataForType:flavor]; -} - -/* - * Convert Mac TEXT/styl to RTF - */ - -static void WriteMacTEXTAndStylToPasteboard(NSPasteboard *pboard, NSData *textData, NSData *stylData) -{ - NSMutableAttributedString *aStr = [AttributedStringFromMacTEXTAndStyl(textData, stylData) mutableCopy]; - - if (!aStr) { - NSString *string = [[NSString alloc] initWithData:textData encoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - - if (!string) - return; - - aStr = [[NSMutableAttributedString alloc] initWithString:string attributes:nil]; - - [string release]; - } - - // fix line endings - [[aStr mutableString] replaceOccurrencesOfString:@"\r" withString:@"\n" options:NSLiteralSearch range:NSMakeRange(0, [aStr length])]; - - [pboard writeObjects:[NSArray arrayWithObject:aStr]]; - - [aStr release]; -} - -/* - * Convert RTF to Mac TEXT/styl - */ - -static NSData *MacTEXTAndStylDataFromPasteboard(NSPasteboard *pboard, NSData **outStylData) -{ - NSMutableAttributedString *aStr; - - NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSAttributedString class]] options:nil]; - - if ([objs count]) { - aStr = [[objs objectAtIndex:0] mutableCopy]; - } else { - objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSString class]] options:nil]; - - if (![objs count]) - return nil; - - aStr = [[NSMutableAttributedString alloc] initWithString:[objs objectAtIndex:0]]; - } - - // fix line endings - [[aStr mutableString] replaceOccurrencesOfString:@"\n" withString:@"\r" options:NSLiteralSearch range:NSMakeRange(0, [[aStr mutableString] length])]; - - NSData *stylData = nil; - NSData *textData = ConvertToMacTEXTAndStyl(aStr, &stylData); - - [aStr release]; - - if (outStylData) - *outStylData = stylData; - - return textData; -} - -/* - * Initialization - */ - -void ClipInit(void) -{ - g_pboard = [[NSPasteboard generalPasteboard] retain]; - if (!g_pboard) { - D(bug("could not create Pasteboard\n")); - } - - g_macScrap = [[NSMutableDictionary alloc] init]; -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ - [g_pboard release]; - g_pboard = nil; - - [g_macScrap release]; - g_macScrap = nil; -} - -/* - * Convert an NSImage to PICT format. - */ - -static NSData *ConvertImageToPICT(NSImage *image) { - if ([[image representations] count] == 0) { - return nil; - } - - NSImageRep *rep = [[image representations] objectAtIndex:0]; - NSUInteger width; - NSUInteger height; - - if ([rep isKindOfClass:[NSBitmapImageRep class]]) { - width = [rep pixelsWide]; - height = [rep pixelsHigh]; - } else { - width = lrint([image size].width); - height = lrint([image size].height); - } - - // create a new bitmap image rep in our desired format, following the advice here: - // https://developer.apple.com/library/mac/#releasenotes/Cocoa/AppKitOlderNotes.html#X10_6Notes - - NSBitmapImageRep *bitmap = [[NSBitmapImageRep alloc] initWithBitmapDataPlanes:NULL - pixelsWide:width - pixelsHigh:height - bitsPerSample:8 - samplesPerPixel:4 - hasAlpha:YES - isPlanar:NO - colorSpaceName:NSCalibratedRGBColorSpace - bytesPerRow:width * 4 - bitsPerPixel:32]; - - [NSGraphicsContext saveGraphicsState]; - [NSGraphicsContext setCurrentContext:[NSGraphicsContext graphicsContextWithBitmapImageRep:bitmap]]; - [rep draw]; - [NSGraphicsContext restoreGraphicsState]; - - unsigned char *rgba = [bitmap bitmapData]; - - long bufSize = ConvertRGBAToPICT(NULL, 0, rgba, width, height); - - NSData *pictData = nil; - - if (bufSize > 0) { - uint8_t *buf = (uint8_t *)malloc(bufSize); - - long pictSize = ConvertRGBAToPICT(buf, bufSize, rgba, width, height); - - if (pictSize > 0) - pictData = [NSData dataWithBytes:buf length:pictSize]; - - free(buf); - } - - [bitmap release]; - - return pictData; -} - -/* - * Convert any images that may be on the clipboard to PICT format if possible. - */ - -static NSData *MacPICTDataFromPasteboard(NSPasteboard *pboard) -{ - // check if there's any PICT data on the pasteboard - NSData *pictData = DataFromPasteboard(pboard, (NSString *)kUTTypePICT); - - if (pictData) - return pictData; - - // now check to see if any images on the pasteboard have PICT representations - NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSImage class]] options:nil]; - - for (NSImage *eachImage in objs) { - for (NSImageRep *eachRep in [eachImage representations]) { - - if ([eachRep isKindOfClass:[NSPICTImageRep class]]) - return [(NSPICTImageRep *)eachRep PICTRepresentation]; - } - } - - // Give up and perform the conversion ourselves - if ([objs count]) - return ConvertImageToPICT([objs objectAtIndex:0]); - - // If none of that worked, sorry, we're out of options - return nil; -} - -/* - * Zero Mac clipboard - */ - -static void ZeroMacClipboard() -{ - D(bug("Zeroing Mac clipboard\n")); - M68kRegisters r; - static uint8_t proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0xa9, 0xfc, // ZeroScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - Execute68k(proc_area, &r); - - [g_macScrap removeAllObjects]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } -} - -/* - * Write data to Mac clipboard - */ - -static void WriteDataToMacClipboard(NSData *pbData, uint32_t type) -{ - D(bug("Writing data %s to Mac clipboard with type '%c%c%c%c'\n", [[pbData description] UTF8String], - (type >> 24) & 0xff, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff)); - - if ([pbData length] == 0) - return; - - NSNumber *typeNum = [NSNumber numberWithInteger:type]; - - if ([g_macScrap objectForKey:typeNum]) { - // the classic Mac OS can't have more than one object of the same type on the clipboard - return; - } - - // Allocate space for new scrap in MacOS side - M68kRegisters r; - r.d[0] = [pbData length]; - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t scrap_area = r.a[0]; - - // Get the native clipboard data - if (scrap_area) { - uint8_t * const data = Mac2HostAddr(scrap_area); - - memcpy(data, [pbData bytes], [pbData length]); - - // Add new data to clipboard - static uint8_t proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) - 0xa9, 0xfe, // PutScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt32(proc_area + 4, [pbData length]); - WriteMacInt32(proc_area + 10, type); - WriteMacInt32(proc_area + 16, scrap_area); - we_put_this_data = true; - Execute68k(proc_area, &r); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - [g_macScrap setObject:pbData forKey:typeNum]; - } - - r.a[0] = scrap_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } -} - -/* - * Take all the data on host pasteboard and convert it to something the Mac understands if possible - */ - -static void ConvertHostPasteboardToMacScrap() -{ - D(bug("ConvertHostPasteboardToMacScrap\n")); - - ZeroMacClipboard(); - - NSData *stylData = nil; - NSData *textData = MacTEXTAndStylDataFromPasteboard(g_pboard, &stylData); - - if (textData) { - if (stylData) - WriteDataToMacClipboard(stylData, TYPE_STYL); - - WriteDataToMacClipboard(textData, TYPE_TEXT); - } - - NSData *pictData = MacPICTDataFromPasteboard(g_pboard); - - if (pictData) - WriteDataToMacClipboard(pictData, TYPE_PICT); - - for (NSString *eachType in [g_pboard types]) { - if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeText)) { - // text types are already handled - continue; - } - - if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeImage)) { - // image types are already handled - continue; - } - - uint32_t type = FlavorForUTI(eachType); - - // skip styl and ustl as well; those fall under text, which is handled already - if (!type || type == TYPE_STYL || type == TYPE_USTL) - continue; - - WriteDataToMacClipboard(DataFromPasteboard(g_pboard, eachType), type); - } -} - -/* - * Take all the data on the Mac clipbord and convert it to something the host pasteboard understands if possible - */ - -static void ConvertMacScrapToHostPasteboard() -{ - D(bug("ConvertMacScrapToHostPasteboard\n")); - - BOOL wroteText = NO; - - [g_pboard clearContents]; - - for (NSNumber *eachTypeNum in g_macScrap) AUTORELEASE_POOL { - uint32_t eachType = [eachTypeNum integerValue]; - - if (eachType == TYPE_TEXT || eachType == TYPE_STYL || eachType == TYPE_UTXT || eachType == TYPE_UT16 || eachType == TYPE_USTL) { - if (wroteText) - continue; - - NSData *textData; - NSData *stylData; - - textData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_TEXT]]; - stylData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_STYL]]; - - if (textData) { - WriteMacTEXTAndStylToPasteboard(g_pboard, textData, stylData); - wroteText = YES; - } - - // sometime, it might be interesting to write a converter for utxt/ustl if possible - - continue; - } - - NSData *pbData = [g_macScrap objectForKey:eachTypeNum]; - - if (pbData) { - NSString *typeStr = UTIForFlavor(eachType); - - if (!typeStr) - continue; - - [g_pboard setData:pbData forType:typeStr]; - } - } -} - -/* - * Check whether the pasteboard has changed since our last check; if it has, write it to the emulated pasteboard - */ - -static void ConvertHostPasteboardToMacScrapIfChanged() -{ - if (!g_pboard) - return; - - if ([g_pboard changeCount] > g_pb_change_count) { - ConvertHostPasteboardToMacScrap(); - g_pb_change_count = [g_pboard changeCount]; - } -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32_t type, int32_t offset) -{ - D(bug("GetScrap handle %p, type %4.4s, offset %d\n", handle, (char *)&type, offset)); - - AUTORELEASE_POOL { - ConvertHostPasteboardToMacScrapIfChanged(); - } -} - -/* - * ZeroScrap() is called before a Mac application writes to the clipboard; clears out the previous contents - */ - -void ZeroScrap() -{ - D(bug("ZeroScrap\n")); - - we_put_this_data = false; - - // Defer clearing the host pasteboard until the Mac tries to put something on it. - // This prevents us from clearing the pasteboard when ZeroScrap() is called during startup. - should_clear = true; -} - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32_t type, void *scrap, int32_t length) -{ - D(bug("PutScrap type %4.4s, data %p, length %ld\n", (char *)&type, scrap, (long)length)); - - AUTORELEASE_POOL { - if (!g_pboard) - return; - - if (we_put_this_data) { - we_put_this_data = false; - return; - } - - if (length <= 0) - return; - - if (should_clear) { - [g_macScrap removeAllObjects]; - should_clear = false; - } - - NSData *pbData = [NSData dataWithBytes:scrap length:length]; - if (!pbData) - return; - - [g_macScrap setObject:pbData forKey:[NSNumber numberWithInteger:type]]; - - ConvertMacScrapToHostPasteboard(); - - // So that our PutScrap() patch won't bounce the data we just wrote back to the Mac clipboard - g_pb_change_count = [g_pboard changeCount]; - } -} diff --git a/BasiliskII/src/MacOSX/extfs_macosx.cpp b/BasiliskII/src/MacOSX/extfs_macosx.cpp deleted file mode 100644 index 41b35a18f..000000000 --- a/BasiliskII/src/MacOSX/extfs_macosx.cpp +++ /dev/null @@ -1,634 +0,0 @@ -/* - * extfs_macosx.cpp - MacOS file system for access native file system access, MacOS X specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "prefs.h" -#include "extfs.h" -#include "extfs_defs.h" - -// XXX: don't clobber with native definitions -#define noErr native_noErr -#define Point native_Point -#define Rect native_Rect -#define ProcPtr native_ProcPtr -# include -#undef ProcPtr -#undef Rect -#undef Point -#undef noErr - -#define DEBUG 0 -#include "debug.h" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - - -/* - * Extended attributes (Tiger+) - */ - -#define USE_XATTRS g_use_xattrs -static bool g_use_xattrs = false; - -#define XATTR_TEST "org.BasiliskII.TestAttr" -#define XATTR_FINFO "org.BasiliskII.FinderInfo" -#define XATTR_FXINFO "org.BasiliskII.ExtendedFinderInfo" - -static bool get_xattr(const char *path, const char *name, void *value, uint32 size) -{ - return syscall(SYS_getxattr, path, name, value, size, 0, 0) == size; -} - -static bool set_xattr(const char *path, const char *name, const void *value, uint32 size) -{ - return syscall(SYS_setxattr, path, name, value, size, 0, 0) == 0; -} - -static bool remove_xattr(const char *path, const char *name) -{ - return syscall(SYS_removexattr, path, name, 0) == 0; -} - -static bool check_xattr(void) -{ - const char *path = PrefsFindString("extfs"); - if (path == NULL) - return false; - const uint32 sentinel = 0xdeadbeef; - if (!set_xattr(path, XATTR_TEST, &sentinel, sizeof(sentinel))) - return false; - uint32 v; - if (!get_xattr(path, XATTR_TEST, &v, sizeof(v))) - return false; - if (!remove_xattr(path, XATTR_TEST)) - return false; - return v == sentinel; -} - - -/* - * Initialization - */ - -void extfs_init(void) -{ - g_use_xattrs = check_xattr(); -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - int l = strlen(path); - if (l < MAX_PATH_LENGTH-1 && path[l-1] != '/') { - path[l] = '/'; - path[l+1] = 0; - } - strncat(path, component, MAX_PATH_LENGTH-1); -} - - -/* - * Finder info manipulation helpers - */ - -typedef uint8 FinderInfo[SIZEOF_FInfo]; - -struct FinderInfoAttrBuf { - uint32 length; - FinderInfo finderInfo; - FinderInfo extendedFinderInfo; -}; - -static const FinderInfo kNativeFInfoMask = {0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x00,0x00,0x00,0x00,0x00,0x00}; -static const FinderInfo kNativeFXInfoMask = {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xff,0xff,0x00,0x00,0x00,0x00,0x00,0x00}; -static const FinderInfo kNativeDInfoMask = {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xff,0xff,0x00,0x00,0x00,0x00,0x00,0x00}; -static const FinderInfo kNativeDXInfoMask = {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xff,0xff,0x00,0x00,0x00,0x00,0x00,0x00}; /* XXX: keep frScroll? */ - -static void finfo_merge(FinderInfo dst, const FinderInfo emu, const FinderInfo nat, const FinderInfo mask) -{ - for (int i = 0; i < SIZEOF_FInfo; i++) - dst[i] = (emu[i] & ~mask[i]) | (nat[i] & mask[i]); -} - -static void finfo_split(FinderInfo dst, const FinderInfo emu, const FinderInfo mask) -{ - for (int i = 0; i < SIZEOF_FInfo; i++) - dst[i] = emu[i] & mask[i]; -} - - -/* - * Finder info are kept in helper files (on anything below Tiger) - * - * Finder info: - * /path/.finf/file - * - * The .finf files store a FInfo/DInfo, followed by a FXInfo/DXInfo - * (16+16 bytes) - */ - -static void make_finf_path(const char *src, char *dest, bool only_dir = false) -{ - dest[0] = 0; - - // Get pointer to last component of path - const char *last_part = strrchr(src, '/'); - if (last_part) - last_part++; - else - last_part = src; - - // Copy everything before - strncpy(dest, src, last_part-src); - dest[last_part-src] = 0; - - // Add additional component - strncat(dest, ".finf/", MAX_PATH_LENGTH-1); - - // Add last component - if (!only_dir) - strncat(dest, last_part, MAX_PATH_LENGTH-1); -} - -static int create_finf_dir(const char *path) -{ - char finf_dir[MAX_PATH_LENGTH]; - make_finf_path(path, finf_dir, true); - if (finf_dir[strlen(finf_dir) - 1] == '/') // Remove trailing "/" - finf_dir[strlen(finf_dir) - 1] = 0; - return mkdir(finf_dir, 0777); -} - -static int open_finf(const char *path, int flag) -{ - char finf_path[MAX_PATH_LENGTH]; - make_finf_path(path, finf_path); - - if ((flag & O_ACCMODE) == O_RDWR || (flag & O_ACCMODE) == O_WRONLY) - flag |= O_CREAT; - int fd = open(finf_path, flag, 0666); - if (fd < 0) { - if (errno == ENOENT && (flag & O_CREAT)) { - // One path component was missing, probably the finf - // directory. Try to create it and re-open the file. - int ret = create_finf_dir(path); - if (ret < 0) - return ret; - fd = open(finf_path, flag, 0666); - } - } - return fd; -} - - -/* - * Resource forks are kept into their native location - * - * Resource fork: - * /path/file/..namedfork/rsrc - */ - -static void make_rsrc_path(const char *src, char *dest) -{ - int l = strlen(src); - if (l + 1 + 16 + 1 <= MAX_PATH_LENGTH) - memcpy(dest, src, l + 1); - else { - // The rsrc component is copied as is, if there is not enough - // space to add it. In that case, open() will fail gracefully - // and this is what we want. - dest[0] = '.'; - dest[1] = '\0'; - } - - add_path_component(dest, "..namedfork/rsrc"); -} - -static int open_rsrc(const char *path, int flag) -{ - char rsrc_path[MAX_PATH_LENGTH]; - make_rsrc_path(path, rsrc_path); - - return open(rsrc_path, flag); -} - - -/* - * Get/set finder info for file/directory specified by full path - */ - -struct ext2type { - const char *ext; - uint32 type; - uint32 creator; -}; - -static const ext2type e2t_translation[] = { - {".Z", FOURCC('Z','I','V','M'), FOURCC('L','Z','I','V')}, - {".gz", FOURCC('G','z','i','p'), FOURCC('G','z','i','p')}, - {".hqx", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".bin", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".pdf", FOURCC('P','D','F',' '), FOURCC('C','A','R','O')}, - {".ps", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".sit", FOURCC('S','I','T','!'), FOURCC('S','I','T','x')}, - {".tar", FOURCC('T','A','R','F'), FOURCC('T','A','R',' ')}, - {".uu", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".uue", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".zip", FOURCC('Z','I','P',' '), FOURCC('Z','I','P',' ')}, - {".8svx", FOURCC('8','S','V','X'), FOURCC('S','N','D','M')}, - {".aifc", FOURCC('A','I','F','C'), FOURCC('T','V','O','D')}, - {".aiff", FOURCC('A','I','F','F'), FOURCC('T','V','O','D')}, - {".au", FOURCC('U','L','A','W'), FOURCC('T','V','O','D')}, - {".mid", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".midi", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".mp2", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".mp3", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".wav", FOURCC('W','A','V','E'), FOURCC('T','V','O','D')}, - {".bmp", FOURCC('B','M','P','f'), FOURCC('o','g','l','e')}, - {".gif", FOURCC('G','I','F','f'), FOURCC('o','g','l','e')}, - {".lbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".ilbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".jpg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".jpeg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".pict", FOURCC('P','I','C','T'), FOURCC('o','g','l','e')}, - {".png", FOURCC('P','N','G','f'), FOURCC('o','g','l','e')}, - {".sgi", FOURCC('.','S','G','I'), FOURCC('o','g','l','e')}, - {".tga", FOURCC('T','P','I','C'), FOURCC('o','g','l','e')}, - {".tif", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".tiff", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".htm", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".html", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".txt", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".rtf", FOURCC('T','E','X','T'), FOURCC('M','S','W','D')}, - {".c", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".C", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cc", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".h", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hh", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".s", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".S", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".i", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".mpg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mpeg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mov", FOURCC('M','o','o','V'), FOURCC('T','V','O','D')}, - {".fli", FOURCC('F','L','I',' '), FOURCC('T','V','O','D')}, - {".avi", FOURCC('V','f','W',' '), FOURCC('T','V','O','D')}, - {".qxd", FOURCC('X','D','O','C'), FOURCC('X','P','R','3')}, - {".hfv", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".dsk", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".img", FOURCC('r','o','h','d'), FOURCC('d','d','s','k')}, - {NULL, 0, 0} // End marker -}; - -// Get emulated Finder info from metadata (Tiger+) -static bool get_finfo_from_xattr(const char *path, uint8 *finfo, uint8 *fxinfo) -{ - if (!get_xattr(path, XATTR_FINFO, finfo, SIZEOF_FInfo)) - return false; - if (fxinfo && !get_xattr(path, XATTR_FXINFO, fxinfo, SIZEOF_FXInfo)) - return false; - return true; -} - -// Get emulated Finder info from helper file -static bool get_finfo_from_helper(const char *path, uint8 *finfo, uint8 *fxinfo) -{ - int fd = open_finf(path, O_RDONLY); - if (fd < 0) - return false; - - ssize_t actual = read(fd, finfo, SIZEOF_FInfo); - if (fxinfo) - actual += read(fd, fxinfo, SIZEOF_FXInfo); - close(fd); - return actual == (SIZEOF_FInfo + (fxinfo ? SIZEOF_FXInfo : 0)); -} - -// Get native Finder info -static bool get_finfo_from_native(const char *path, uint8 *finfo, uint8 *fxinfo) -{ - struct attrlist attrList; - memset(&attrList, 0, sizeof(attrList)); - attrList.bitmapcount = ATTR_BIT_MAP_COUNT; - attrList.commonattr = ATTR_CMN_FNDRINFO; - - FinderInfoAttrBuf attrBuf; - if (getattrlist(path, &attrList, &attrBuf, sizeof(attrBuf), 0) < 0) - return false; - - memcpy(finfo, attrBuf.finderInfo, SIZEOF_FInfo); - if (fxinfo) - memcpy(fxinfo, attrBuf.extendedFinderInfo, SIZEOF_FXInfo); - return true; -} - -static bool do_get_finfo(const char *path, bool has_fxinfo, - FinderInfo emu_finfo, FinderInfo emu_fxinfo, - FinderInfo nat_finfo, FinderInfo nat_fxinfo) -{ - memset(emu_finfo, 0, SIZEOF_FInfo); - if (has_fxinfo) - memset(emu_fxinfo, 0, SIZEOF_FXInfo); - *((uint16 *)(emu_finfo + fdFlags)) = htonl(DEFAULT_FINDER_FLAGS); - *((uint32 *)(emu_finfo + fdLocation)) = htonl((uint32)-1); - - if (USE_XATTRS) - get_finfo_from_xattr(path, emu_finfo, has_fxinfo ? emu_fxinfo : NULL); - else - get_finfo_from_helper(path, emu_finfo, has_fxinfo ? emu_fxinfo : NULL); - - if (!get_finfo_from_native(path, nat_finfo, has_fxinfo ? nat_fxinfo : NULL)) - return false; - return true; -} - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Merge emulated and native Finder info - FinderInfo emu_finfo, emu_fxinfo; - FinderInfo nat_finfo, nat_fxinfo; - if (do_get_finfo(path, fxinfo, emu_finfo, emu_fxinfo, nat_finfo, nat_fxinfo)) { - if (!is_dir) { - finfo_merge(Mac2HostAddr(finfo), emu_finfo, nat_finfo, kNativeFInfoMask); - if (fxinfo) - finfo_merge(Mac2HostAddr(fxinfo), emu_fxinfo, nat_fxinfo, kNativeFXInfoMask); - if (ReadMacInt32(finfo + fdType) != 0 && ReadMacInt32(finfo + fdCreator) != 0) - return; - } - else { - finfo_merge(Mac2HostAddr(finfo), emu_finfo, nat_finfo, kNativeDInfoMask); - if (fxinfo) - finfo_merge(Mac2HostAddr(fxinfo), emu_fxinfo, nat_fxinfo, kNativeDXInfoMask); - return; - } - } - - // No native Finder info, translate file name extension to MacOS type/creator - if (!is_dir) { - int path_len = strlen(path); - for (int i=0; e2t_translation[i].ext; i++) { - int ext_len = strlen(e2t_translation[i].ext); - if (path_len < ext_len) - continue; - if (!strcmp(path + path_len - ext_len, e2t_translation[i].ext)) { - WriteMacInt32(finfo + fdType, e2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, e2t_translation[i].creator); - break; - } - } - } -} - -// Set emulated Finder info into metada (Tiger+) -static bool set_finfo_to_xattr(const char *path, const uint8 *finfo, const uint8 *fxinfo) -{ - if (!set_xattr(path, XATTR_FINFO, finfo, SIZEOF_FInfo)) - return false; - if (fxinfo && !set_xattr(path, XATTR_FXINFO, fxinfo, SIZEOF_FXInfo)) - return false; - return true; -} - -// Set emulated Finder info into helper file -static bool set_finfo_to_helper(const char *path, const uint8 *finfo, const uint8 *fxinfo) -{ - int fd = open_finf(path, O_RDWR); - if (fd < 0) - return false; - - ssize_t actual = write(fd, finfo, SIZEOF_FInfo); - if (fxinfo) - actual += write(fd, fxinfo, SIZEOF_FXInfo); - close(fd); - return actual == (SIZEOF_FInfo + (fxinfo ? SIZEOF_FXInfo : 0)); -} - -// Set native Finder info -static bool set_finfo_to_native(const char *path, const uint8 *finfo, const uint8 *fxinfo, bool is_dir) -{ - struct attrlist attrList; - memset(&attrList, 0, sizeof(attrList)); - attrList.bitmapcount = ATTR_BIT_MAP_COUNT; - attrList.commonattr = ATTR_CMN_FNDRINFO; - - FinderInfoAttrBuf attrBuf; - if (getattrlist(path, &attrList, &attrBuf, sizeof(attrBuf), 0) < 0) - return false; - - finfo_merge(attrBuf.finderInfo, attrBuf.finderInfo, finfo, is_dir ? kNativeDInfoMask : kNativeFInfoMask); - if (fxinfo) - finfo_merge(attrBuf.extendedFinderInfo, attrBuf.extendedFinderInfo, fxinfo, is_dir ? kNativeDXInfoMask : kNativeFXInfoMask); - - attrList.commonattr = ATTR_CMN_FNDRINFO; - if (setattrlist(path, &attrList, attrBuf.finderInfo, 2 * SIZEOF_FInfo, 0) < 0) - return false; - return true; -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Extract native Finder info flags - FinderInfo nat_finfo, nat_fxinfo; - const uint8 *emu_finfo = Mac2HostAddr(finfo); - const uint8 *emu_fxinfo = fxinfo ? Mac2HostAddr(fxinfo) : NULL; - finfo_split(nat_finfo, emu_finfo, is_dir ? kNativeDInfoMask : kNativeFInfoMask); - if (fxinfo) - finfo_split(nat_fxinfo, emu_fxinfo, is_dir ? kNativeDXInfoMask : kNativeFXInfoMask); - - // Update Finder info file (all flags) - if (USE_XATTRS) - set_finfo_to_xattr(path, emu_finfo, emu_fxinfo); - else - set_finfo_to_helper(path, emu_finfo, emu_fxinfo); - - // Update native Finder info flags - set_finfo_to_native(path, nat_finfo, nat_fxinfo, is_dir); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open resource file - int fd = open_rsrc(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size - off_t size = lseek(fd, 0, SEEK_END); - - // Close file and return size - close(fd); - return size < 0 ? 0 : size; -} - -int open_rfork(const char *path, int flag) -{ - return open_rsrc(path, flag); -} - -void close_rfork(const char *path, int fd) -{ - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - return read(fd, buffer, length); -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - return write(fd, buffer, length); -} - - -/* - * Remove file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - // Remove helpers first, don't complain if this fails - char helper_path[MAX_PATH_LENGTH]; - make_finf_path(path, helper_path, false); - remove(helper_path); - make_rsrc_path(path, helper_path); - remove(helper_path); - - // Now remove file or directory (and helper directories in the directory) - if (remove(path) < 0) { - if (errno == EISDIR || errno == ENOTEMPTY) { - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".finf"); - rmdir(helper_path); - return rmdir(path) == 0; - } else - return false; - } - return true; -} - - -/* - * Rename/move file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - // Rename helpers first, don't complain if this fails - char old_helper_path[MAX_PATH_LENGTH], new_helper_path[MAX_PATH_LENGTH]; - make_finf_path(old_path, old_helper_path, false); - make_finf_path(new_path, new_helper_path, false); - create_finf_dir(new_path); - rename(old_helper_path, new_helper_path); - make_rsrc_path(old_path, old_helper_path); - make_rsrc_path(new_path, new_helper_path); - rename(old_helper_path, new_helper_path); - - // Now rename file - return rename(old_path, new_path) == 0; -} - - -/* - * Strings (filenames) conversion - */ - -// Convert string in the specified source and target encodings -const char *convert_string(const char *str, CFStringEncoding from, CFStringEncoding to) -{ - const char *ostr = str; - CFStringRef cfstr = CFStringCreateWithCString(NULL, str, from); - if (cfstr) { - static char buffer[MAX_PATH_LENGTH]; - memset(buffer, 0, sizeof(buffer)); - if (CFStringGetCString(cfstr, buffer, sizeof(buffer), to)) - ostr = buffer; - CFRelease(cfstr); - } - return ostr; -} - -// Convert from the host OS filename encoding to MacRoman -const char *host_encoding_to_macroman(const char *filename) -{ - return convert_string(filename, kCFStringEncodingUTF8, kCFStringEncodingMacRoman); -} - -// Convert from MacRoman to host OS filename encoding -const char *macroman_to_host_encoding(const char *filename) -{ - return convert_string(filename, kCFStringEncodingMacRoman, kCFStringEncodingUTF8); -} diff --git a/BasiliskII/src/MacOSX/macos_util_macosx.h b/BasiliskII/src/MacOSX/macos_util_macosx.h deleted file mode 100644 index 47c078591..000000000 --- a/BasiliskII/src/MacOSX/macos_util_macosx.h +++ /dev/null @@ -1,178 +0,0 @@ -/* - * $Id$ - * - * macos_util_macosx.h - Work around clashes with the enums in - * Based on: - * - * macos_util.h - MacOS definitions/utility functions - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 MACOS_UTIL_H -#define MACOS_UTIL_H - -#include "cpu_emulation.h" - -#import - -/* - * Queues - */ - -enum { // QElem struct - qLink = 0, - qType = 4, - qData = 6 -}; - -enum { // QHdr struct - qFlags = 0, - qHead = 2, - qTail = 6 -}; - - -/* - * Definitions for Device Manager - */ - -// Misc constants - -enum { // IOParam struct - ioTrap = 6, - ioCmdAddr = 8, - ioCompletion = 12, - ioResult = 16, - ioNamePtr = 18, - ioVRefNum = 22, - ioRefNum = 24, - ioVersNum = 26, - ioPermssn = 27, - ioMisc = 28, - ioBuffer = 32, - ioReqCount = 36, - ioActCount = 40, - ioPosMode = 44, - ioPosOffset = 46, - ioWPosOffset = 46, // Wide positioning offset when ioPosMode has kWidePosOffsetBit set - SIZEOF_IOParam = 50 -}; - -enum { // CntrlParam struct - csCode = 26, - csParam = 28 -}; - -enum { // DrvSts struct - dsTrack = 0, - dsWriteProt = 2, - dsDiskInPlace = 3, - dsInstalled = 4, - dsSides = 5, - dsQLink = 6, - dsQType = 10, - dsQDrive = 12, - dsQRefNum = 14, - dsQFSID = 16, - dsTwoSideFmt = 18, - dsNewIntf = 19, - dsDiskErrs = 20, - dsMFMDrive = 22, - dsMFMDisk = 23, - dsTwoMegFmt = 24 -}; - -enum { // DrvSts2 struct - dsDriveSize = 18, - dsDriveS1 = 20, - dsDriveType = 22, - dsDriveManf = 24, - dsDriveChar = 26, - dsDriveMisc = 28, - SIZEOF_DrvSts = 30 -}; - -enum { // DCtlEntry struct - dCtlDriver = 0, - dCtlFlags = 4, - dCtlQHdr = 6, - dCtlPosition = 16, - dCtlStorage = 20, - dCtlRefNum = 24, - dCtlCurTicks = 26, - dCtlWindow = 30, - dCtlDelay = 34, - dCtlEMask = 36, - dCtlMenu = 38, - dCtlSlot = 40, - dCtlSlotId = 41, - dCtlDevBase = 42, - dCtlOwner = 46, - dCtlExtDev = 50, - dCtlFillByte = 51, - dCtlNodeID = 52 -}; - - -/* - * Definitions for Deferred Task Manager - */ - -enum { // DeferredTask struct - dtFlags = 6, - dtAddr = 8, - dtParam = 12, - dtReserved = 16 -}; - - -// Definitions for DebugUtil() Selector -enum { - duDebuggerGetMax = 0, - duDebuggerEnter = 1, - duDebuggerExit = 2, - duDebuggerPoll = 3, - duGetPageState = 4, - duPageFaultFatal = 5, - duDebuggerLockMemory = 6, - duDebuggerUnlockMemory = 7, - duEnterSupervisorMode = 8 -}; - -// Functions -extern void EnqueueMac(uint32 elem, uint32 list); // Enqueue QElem in list -extern int FindFreeDriveNumber(int num); // Find first free drive number, starting at "num" -extern void MountVolume(void *fh); // Mount volume with given file handle (see sys.h) -extern void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size); // Calculate disk image file layout given file size and first 256 data bytes -extern uint32 DebugUtil(uint32 Selector); // DebugUtil() Replacement -extern uint32 TimeToMacTime(time_t t); // Convert time_t value to MacOS time - -// Construct four-character-code -#define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) - -// Emulator identification codes (4 and 2 characters) -const uint32 EMULATOR_ID_4 = 0x62617369; // 'basi' -const uint16 EMULATOR_ID_2 = 0x6261; // 'ba' - -// Test if basic MacOS initializations (of the ROM) are done -static inline bool HasMacStarted(void) -{ - return ReadMacInt32(0xcfc) == FOURCC('W','L','S','C'); // Mac warm start flag -} - -#endif diff --git a/BasiliskII/src/MacOSX/main_macosx.h b/BasiliskII/src/MacOSX/main_macosx.h deleted file mode 100644 index 15fdda961..000000000 --- a/BasiliskII/src/MacOSX/main_macosx.h +++ /dev/null @@ -1,29 +0,0 @@ -/* - * main_macosx.h - Prototypes for Mac OS X general definitions - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -bool InitEmulator (); -void QuitEmuNoExit(); - - -extern void ErrorAlert (const char *text); -extern void WarningAlert(const char *text); -extern bool ChoiceAlert (const char *text, const char *pos, const char *neg); diff --git a/BasiliskII/src/MacOSX/main_macosx.mm b/BasiliskII/src/MacOSX/main_macosx.mm deleted file mode 100644 index abb046c12..000000000 --- a/BasiliskII/src/MacOSX/main_macosx.mm +++ /dev/null @@ -1,744 +0,0 @@ -/* - * $Id$ - * - * main_macosx.mm - Startup code for MacOS X - * Based (in a small way) on the default main.m, - and on Basilisk's main_unix.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import -#undef check - -#define PTHREADS // Why is this here? -#include "sysdeps.h" - -#ifdef HAVE_PTHREADS -# include -#endif - -#if REAL_ADDRESSING || DIRECT_ADDRESSING -# include -#endif - -#include -using std::string; - -#include "cpu_emulation.h" -#include "sys.h" -#include "rom_patches.h" -#include "xpram.h" -#include "video.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "macos_util_macosx.h" -#include "user_strings.h" -#include "version.h" -#include "main.h" -#include "vm_alloc.h" -#include "sigsegv.h" - -#if USE_JIT -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp -#endif - -#ifdef ENABLE_MON -# include "mon.h" -#endif - -#define DEBUG 0 -#include "debug.h" - - -#include "main_macosx.h" // To bridge between main() and misc. classes - - -// Constants -const char ROM_FILE_NAME[] = "ROM"; -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - - -static char *bundle = NULL; // If in an OS X application bundle, its path - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables - -#ifdef HAVE_PTHREADS - -static pthread_mutex_t intflag_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect InterruptFlags -#define LOCK_INTFLAGS pthread_mutex_lock(&intflag_lock) -#define UNLOCK_INTFLAGS pthread_mutex_unlock(&intflag_lock) - -#else - -#define LOCK_INTFLAGS -#define UNLOCK_INTFLAGS - -#endif - -#if USE_SCRATCHMEM_SUBTERFUGE -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -#endif - -#ifdef ENABLE_MON -static struct sigaction sigint_sa; // sigaction for SIGINT handler -static void sigint_handler(...); -#endif - -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif - - -/* - * Helpers to map memory that can be accessed from the Mac side - */ - -// NOTE: VM_MAP_32BIT is only used when compiling a 64-bit JIT on specific platforms -void *vm_acquire_mac(size_t size) -{ - return vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - -static int vm_acquire_mac_fixed(void *addr, size_t size) -{ - return vm_acquire_fixed(addr, size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - - -/* - * SIGSEGV handler - */ - -static sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) -{ - const uintptr fault_address = (uintptr)sigsegv_get_fault_address(sip); -#if ENABLE_VOSF - // Handle screen fault - extern bool Screen_fault_handler(sigsegv_info_t *sip); - if (Screen_fault_handler(sip)) - return SIGSEGV_RETURN_SUCCESS; -#endif - -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - // Ignore writes to ROM - if (((uintptr)fault_address - (uintptr)ROMBaseHost) < ROMSize) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // Ignore all other faults, if requested - if (PrefsFindBool("ignoresegv")) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; -#endif - - return SIGSEGV_RETURN_FAILURE; -} - -/* - * Dump state when everything went wrong after a SEGV - */ - -static void sigsegv_dump_state(sigsegv_info_t *sip) -{ - const sigsegv_address_t fault_address = sigsegv_get_fault_address(sip); - const sigsegv_address_t fault_instruction = sigsegv_get_fault_instruction_address(sip); - fprintf(stderr, "Caught SIGSEGV at address %p", fault_address); - if (fault_instruction != SIGSEGV_INVALID_ADDRESS) - fprintf(stderr, " [IP=%p]", fault_instruction); - fprintf(stderr, "\n"); - uaecptr nextpc; - extern void m68k_dumpstate(uaecptr *nextpc); - m68k_dumpstate(&nextpc); -#if USE_JIT && JIT_DEBUG - extern void compiler_dumpstate(void); - compiler_dumpstate(); -#endif - VideoQuitFullScreen(); -#ifdef ENABLE_MON - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif - QuitEmulator(); -} - - -/* - * Screen fault handler - */ - -bool Screen_fault_handler(sigsegv_info_t *sip) -{ - return true; -} - - -/* - * Main program - */ - -static void usage(const char *prg_name) -{ - printf( - "Usage: %s [OPTION...]\n" - "\nUnix options:\n" - " --config FILE\n read/write configuration from/to FILE\n" - " --break ADDRESS\n set ROM breakpoint\n" - " --rominfo\n dump ROM information\n", prg_name - ); - LoadPrefs(NULL); // read the prefs file so PrefsPrintUsage() will print the correct default values - PrefsPrintUsage(); - exit(0); -} - -int main(int argc, char **argv) -{ - const char *vmdir = NULL; - char str[256]; - - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - srand(time(NULL)); - tzset(); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Parse command line arguments - for (int i=1; i i) { - k -= i; - for (int j=i+k; j 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) - RAMSize = 1023*1024*1024; - -#if REAL_ADDRESSING || DIRECT_ADDRESSING - RAMSize = RAMSize & -getpagesize(); // Round down to page boundary -#endif - - // Initialize VM system - vm_init(); - -#if REAL_ADDRESSING - // Flag: RAM and ROM are contigously allocated from address 0 - bool memory_mapped_from_zero = false; - - // Make sure to map RAM & ROM at address 0 only on platforms that - // supports linker scripts to relocate the Basilisk II executable - // above 0x70000000 -#if HAVE_LINKER_SCRIPT - const bool can_map_all_memory = true; -#else - const bool can_map_all_memory = false; -#endif - - // Try to allocate all memory from 0x0000, if it is not known to crash - if (can_map_all_memory && (vm_acquire_mac_fixed(0, RAMSize + 0x100000) == 0)) { - D(bug("Could allocate RAM and ROM from 0x0000\n")); - memory_mapped_from_zero = true; - } - -#ifndef PAGEZERO_HACK - // Otherwise, just create the Low Memory area (0x0000..0x2000) - else if (vm_acquire_mac_fixed(0, 0x2000) == 0) { - D(bug("Could allocate the Low Memory globals\n")); - lm_area_mapped = true; - } - - // Exit on failure - else { - sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif -#else - *str = 0; // Eliminate unused variable warning -#endif /* REAL_ADDRESSING */ - - // Create areas for Mac RAM and ROM -#if REAL_ADDRESSING - if (memory_mapped_from_zero) { - RAMBaseHost = (uint8 *)0; - ROMBaseHost = RAMBaseHost + RAMSize; - } - else -#endif - { - uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); - if (ram_rom_area == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - RAMBaseHost = ram_rom_area; - ROMBaseHost = RAMBaseHost + RAMSize; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Allocate scratch memory - ScratchMem = (uint8 *)vm_acquire_mac(SCRATCH_MEM_SIZE); - if (ScratchMem == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block -#endif - -#if DIRECT_ADDRESSING - // RAMBaseMac shall always be zero - MEMBaseDiff = (uintptr)RAMBaseHost; - RAMBaseMac = 0; - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif -#if REAL_ADDRESSING - RAMBaseMac = Host2MacAddr(RAMBaseHost); - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif - D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); - D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); - - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - if ( ! rom_path ) - if ( bundle ) - WarningAlert("No rom pathname set. Trying BasiliskII.app/ROM"); - else - WarningAlert("No rom pathname set. Trying ./ROM"); - - // Load Mac ROM - int rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY); - if (rom_fd < 0) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf(GetString(STR_READING_ROM_FILE)); - ROMSize = lseek(rom_fd, 0, SEEK_END); - if (ROMSize != 64*1024 && ROMSize != 128*1024 && ROMSize != 256*1024 && ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - close(rom_fd); - QuitEmulator(); - } - lseek(rom_fd, 0, SEEK_SET); - if (read(rom_fd, ROMBaseHost, ROMSize) != (ssize_t)ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - close(rom_fd); - QuitEmulator(); - } - - - // Initialize everything - if (!InitAll(vmdir)) - QuitEmulator(); - D(bug("Initialization complete\n")); - - -#ifdef ENABLE_MON - // Setup SIGINT handler to enter mon - sigemptyset(&sigint_sa.sa_mask); - sigint_sa.sa_handler = (void (*)(int))sigint_handler; - sigint_sa.sa_flags = 0; - sigaction(SIGINT, &sigint_sa, NULL); -#endif - - - return YES; -} - -#undef QuitEmulator() - - -/* - * Quit emulator - */ - -void QuitEmuNoExit() -{ - D(bug("QuitEmulator\n")); - - // Exit 680x0 emulation - Exit680x0(); - - // Deinitialize everything - ExitAll(); - - // Free ROM/RAM areas - if (RAMBaseHost != VM_MAP_FAILED) { - vm_release(RAMBaseHost, RAMSize + 0x100000); - RAMBaseHost = NULL; - ROMBaseHost = NULL; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Delete scratch memory area - if (ScratchMem != (uint8 *)VM_MAP_FAILED) { - vm_release((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - ScratchMem = NULL; - } -#endif - -#if REAL_ADDRESSING - // Delete Low Memory area - if (lm_area_mapped) - vm_release(0, 0x2000); -#endif - - // Exit VM wrappers - vm_exit(); - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); -} - -void QuitEmulator(void) -{ - QuitEmuNoExit(); - - // Stop run loop? - [NSApp terminate: nil]; - - exit(0); -} - - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ -#if USE_JIT - if (UseJIT) - flush_icache_range((uint8 *)start, size); -#endif -} - - -/* - * SIGINT handler, enters mon - */ - -#ifdef ENABLE_MON -static void sigint_handler(...) -{ - uaecptr nextpc; - extern void m68k_dumpstate(uaecptr *nextpc); - m68k_dumpstate(&nextpc); - VideoQuitFullScreen(); - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); - QuitEmulator(); -} -#endif - - -#ifdef HAVE_PTHREADS -/* - * Pthread configuration - */ - -void Set_pthread_attr(pthread_attr_t *attr, int priority) -{ - pthread_attr_init(attr); -#if defined(_POSIX_THREAD_PRIORITY_SCHEDULING) - // Some of these only work for superuser - if (geteuid() == 0) { - pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED); - pthread_attr_setschedpolicy(attr, SCHED_FIFO); - struct sched_param fifo_param; - fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) - + sched_get_priority_max(SCHED_FIFO)) - / 2 + priority); - pthread_attr_setschedparam(attr, &fifo_param); - } - if (pthread_attr_setscope(attr, PTHREAD_SCOPE_SYSTEM) != 0) { -#ifdef PTHREAD_SCOPE_BOUND_NP - // If system scope is not available (eg. we're not running - // with CAP_SCHED_MGT capability on an SGI box), try bound - // scope. It exposes pthread scheduling to the kernel, - // without setting realtime priority. - pthread_attr_setscope(attr, PTHREAD_SCOPE_BOUND_NP); -#endif - } -#endif -} -#endif // HAVE_PTHREADS - - -/* - * Mutexes - */ - -#ifdef HAVE_PTHREADS - -struct B2_mutex { - B2_mutex() { - pthread_mutexattr_t attr; - pthread_mutexattr_init(&attr); - // Initialize the mutex for priority inheritance -- - // required for accurate timing. -#ifdef HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL - pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT); -#endif -#if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL) - pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_NORMAL); -#endif -#ifdef HAVE_PTHREAD_MUTEXATTR_SETPSHARED - pthread_mutexattr_setpshared(&attr, PTHREAD_PROCESS_PRIVATE); -#endif - pthread_mutex_init(&m, &attr); - pthread_mutexattr_destroy(&attr); - } - ~B2_mutex() { - pthread_mutex_trylock(&m); // Make sure it's locked before - pthread_mutex_unlock(&m); // unlocking it. - pthread_mutex_destroy(&m); - } - pthread_mutex_t m; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ - pthread_mutex_lock(&mutex->m); -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ - pthread_mutex_unlock(&mutex->m); -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - -#else - -struct B2_mutex { - int dummy; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - -#endif - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - LOCK_INTFLAGS; - InterruptFlags |= flag; - UNLOCK_INTFLAGS; -} - -void ClearInterruptFlag(uint32 flag) -{ - LOCK_INTFLAGS; - InterruptFlags &= ~flag; - UNLOCK_INTFLAGS; -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - NSString *title = [NSString stringWithCString: - GetString(STR_ERROR_ALERT_TITLE) ]; - NSString *error = [NSString stringWithCString: text]; - NSString *button = [NSString stringWithCString: GetString(STR_QUIT_BUTTON) ]; - - NSLog(error); - if ( PrefsFindBool("nogui") ) - return; - VideoQuitFullScreen(); - NSRunCriticalAlertPanel(title, error, button, nil, nil); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - NSString *title = [NSString stringWithCString: - GetString(STR_WARNING_ALERT_TITLE) ]; - NSString *warning = [NSString stringWithCString: text]; - NSString *button = [NSString stringWithCString: GetString(STR_OK_BUTTON) ]; - - NSLog(warning); - if ( PrefsFindBool("nogui") ) - return; - VideoQuitFullScreen(); - NSRunAlertPanel(title, warning, button, nil, nil); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - NSString *title = [NSString stringWithCString: - GetString(STR_WARNING_ALERT_TITLE) ]; - NSString *warning = [NSString stringWithCString: text]; - NSString *yes = [NSString stringWithCString: pos]; - NSString *no = [NSString stringWithCString: neg]; - - return NSRunInformationalAlertPanel(title, warning, yes, no, nil); -} diff --git a/BasiliskII/src/MacOSX/misc_macosx.h b/BasiliskII/src/MacOSX/misc_macosx.h deleted file mode 100644 index b22f1c104..000000000 --- a/BasiliskII/src/MacOSX/misc_macosx.h +++ /dev/null @@ -1,38 +0,0 @@ -/* - * $Id$ - * - * misc_macosx.h - Some prototypes of functions defined in misc_macosx.mm - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#if defined(__APPLE__) && defined(__MACH__) - // This means we are on Mac OS X of some sort -#endif - -extern void ErrorSheet (NSString *msg, NSWindow *win), - ErrorSheet (NSString *msg1, NSString *msg2, - NSString *button, NSWindow *win), - WarningSheet (NSString *message,NSWindow *win), - WarningSheet (NSString *msg1, NSString *msg2, - NSString *button, NSWindow *win), - InfoSheet (NSString *msg, NSWindow *win), - InfoSheet (NSString *msg1, NSString *msg2, - NSString *button, NSWindow *win), - EndSheet (NSWindow * window); - -extern int frequencyToTickDelay (float frequency); diff --git a/BasiliskII/src/MacOSX/misc_macosx.mm b/BasiliskII/src/MacOSX/misc_macosx.mm deleted file mode 100644 index f214261ea..000000000 --- a/BasiliskII/src/MacOSX/misc_macosx.mm +++ /dev/null @@ -1,112 +0,0 @@ -/* - * $Id$ - * - * misc_macosx.m - Miscellaneous Mac OS X routines. - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import - -#import "sysdeps.h" // Types used in Basilisk C++ code - -#import - -#define DEBUG 0 -#import - - - -/************************************************************************/ -/* Display Errors and Warnings in a sliding thingy attached to a */ -/* particular window, instead of as a separate window (Panel or Dialog) */ -/************************************************************************/ - -void ErrorSheet (NSString * message, NSWindow * window) -{ - NSLog(message); - NSBeginCriticalAlertSheet(message, nil, nil, nil, window, - nil, nil, nil, NULL, @""); - while ( [window attachedSheet] ) - sleep(1); - //[NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow: 1.0]]; -} - -void ErrorSheet (NSString * message1, NSString * message2, - NSString * button, NSWindow * window) -{ - NSLog(message1); - NSLog(message2); - NSBeginCriticalAlertSheet(message1, button, nil, nil, window, - nil, nil, nil, NULL, message2); - while ( [window attachedSheet] ) - sleep(1); - //[NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow: 1.0]]; -} - - -void WarningSheet (NSString * message, NSWindow * window) -{ - NSLog(message); - NSBeginAlertSheet(message, nil, nil, nil, window, - nil, nil, nil, NULL, @""); -} - -void WarningSheet (NSString * message1, NSString * message2, - NSString * button, NSWindow * window) -{ - NSLog(message1); - NSLog(message2); - NSBeginAlertSheet(message1, button, nil, nil, window, - nil, nil, nil, NULL, message2); -} - - -void InfoSheet (NSString * message, NSWindow * window) -{ - NSLog(message); - NSBeginInformationalAlertSheet(message, nil, nil, nil, window, - nil, nil, nil, NULL, @""); -} - -void InfoSheet (NSString * message1, NSString * message2, - NSString * button, NSWindow * window) -{ - NSLog(message1); - NSLog(message2); - NSBeginInformationalAlertSheet(message1, nil, nil, nil, window, - nil, nil, nil, NULL, message2); -} - -void EndSheet (NSWindow * window) -{ - [[window attachedSheet] close]; -} - -// Convert a frequency (i.e. updates per second) to a 60hz tick delay, and update prefs -int frequencyToTickDelay (float freq) -{ - if ( freq == 0.0 ) - return 0; - else - { - int delay = (int) (60.0 / freq); - - PrefsReplaceInt32("frameskip", delay); - return delay; - } -} diff --git a/BasiliskII/src/MacOSX/prefs_macosx.cpp b/BasiliskII/src/MacOSX/prefs_macosx.cpp deleted file mode 100644 index 74000fd7e..000000000 --- a/BasiliskII/src/MacOSX/prefs_macosx.cpp +++ /dev/null @@ -1,150 +0,0 @@ -/* - * $Id$ - * - * prefs_macosx.cpp - Preferences handling, Mac OS X specific. - * Based on prefs_unix.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include - -#include -using std::string; - -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name and path -const char PREFS_FILE_NAME[] = ".basilisk_ii_prefs"; -string UserPrefsPath; -static string prefs_path; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - if (vmdir) { - prefs_path = string(vmdir) + '/' + string("prefs"); - FILE *prefs = fopen(prefs_path.c_str(), "r"); - if (!prefs) { - printf("No file at %s found.\n", prefs_path.c_str()); - exit(1); - } - LoadPrefsFromStream(prefs); - fclose(prefs); - return; - } - - // Construct prefs path - if (UserPrefsPath.empty()) { - char *home = getenv("HOME"); - if (home) - prefs_path = string(home) + '/'; - prefs_path += PREFS_FILE_NAME; - UserPrefsPath = prefs_path; - } else - prefs_path = UserPrefsPath; - - // Read preferences from settings file - FILE *f = fopen(prefs_path.c_str(), "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } - - // Remove Nigel's bad old serial prefs - - const char *str; - int tmp = 0; - - if ( (str = PrefsFindString("seriala") ) != NULL - && strcmp(str, "/dev/ttys0") == 0 ) - { - puts("Deleting invalid prefs item 'seriala /dev/ttys0'"); - PrefsRemoveItem("seriala", 1); - } - - if ( (str = PrefsFindString("serialb") ) != NULL - && strcmp(str, "/dev/ttys1") == 0 ) - { - puts("Deleting invalid prefs item 'serialb /dev/ttys1'"); - PrefsRemoveItem("serialb", 1); - } - - // Floppy & cdrom prefs are always removed - - // we search for them each time the emulator is started - - while ( (str = PrefsFindString("floppy", tmp) ) != NULL ) - PrefsRemoveItem("floppy", tmp); - - while ( (str = PrefsFindString("cdrom", tmp) ) != NULL ) - PrefsRemoveItem("cdrom", tmp); -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.c_str(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", getenv("HOME")); - PrefsReplaceString("screen", "win/512/384/16"); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif - PrefsAddBool("idlewait", true); -} diff --git a/BasiliskII/src/MacOSX/utils_macosx.h b/BasiliskII/src/MacOSX/utils_macosx.h deleted file mode 100644 index fc2c83c69..000000000 --- a/BasiliskII/src/MacOSX/utils_macosx.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * utils_macosx.h - Mac OS X utility functions. - * - * Copyright (C) 2011 Alexei Svitkine - * - * 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 UTILS_MACOSX_H -#define UTILS_MACOSX_H - -// Invokes the specified function with an NSAutoReleasePool in place. -void NSAutoReleasePool_wrap(void (*fn)(void)); - -#endif diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm deleted file mode 100644 index b653638d2..000000000 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ /dev/null @@ -1,30 +0,0 @@ -/* - * utils_macosx.mm - Mac OS X utility functions. - * - * Copyright (C) 2011 Alexei Svitkine - * - * 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 -#include "utils_macosx.h" - -// This is used from video_sdl.cpp. -void NSAutoReleasePool_wrap(void (*fn)(void)) -{ - NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; - fn(); - [pool release]; -} diff --git a/BasiliskII/src/MacOSX/video_macosx.h b/BasiliskII/src/MacOSX/video_macosx.h deleted file mode 100644 index 9cecd9f23..000000000 --- a/BasiliskII/src/MacOSX/video_macosx.h +++ /dev/null @@ -1,75 +0,0 @@ -/* - * video_macosx.h - Some video constants and globals - * - * $Id$ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -#import - -/* Set the strategy for drawing the bitmap in the Mac OS X window */ -//#define CGDRAWBITMAP -#if defined __i386__ -#define CGIMAGEREF -//#define NSBITMAP -#else -#define CGIMAGEREF -//#define NSBITMAP -#endif - -// Using Core Graphics is fastest when rendering 32bit data. -// Using CGImageRefs allows us to use all the bitmaps that BasiliskII supports. -// When both Basilisk II and OS X are set to 'Thousands', updating a 312x342 -// window happens at over 500fps under 10.2, and over 600fps on 10.3! - -/* When the BasiliskII video driver respects the alpha bits, set this to let us use */ -/* kCGImageAlphaPremultipliedFirst, and to have nice rounded corners on the screen. */ -//#define CG_USE_ALPHA -/* At the moment, it writes in the full 32bits :-( */ - - -#define MIN_WIDTH 512 -#define MIN_HEIGHT 384 -#define MIN_HEIGHTC 342 // For classic emulation - -#define MAX_WIDTH 1240 -#define MAX_HEIGHT 1024 - -// Display types -enum -{ - DISPLAY_OPENGL, - DISPLAY_SCREEN, - DISPLAY_WINDOW -}; - - -extern uint8 display_type, - frame_skip; -extern uint16 init_width, - init_height, - init_depth; - -extern bool parse_screen_prefs (const char *); -extern void resizeWinTo (const uint16, const uint16); - -#import -#import "EmulatorView.h" - -extern NSWindow *the_win; -extern EmulatorView *output; diff --git a/BasiliskII/src/MacOSX/video_macosx.mm b/BasiliskII/src/MacOSX/video_macosx.mm deleted file mode 100644 index d4eff0825..000000000 --- a/BasiliskII/src/MacOSX/video_macosx.mm +++ /dev/null @@ -1,1123 +0,0 @@ -/* - * $Id$ - * - * video_macosx.mm - Interface between Basilisk II and Cocoa windowing. - * Based on video_amiga.cpp and video_x.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#ifdef HAVE_PTHREADS -# include -#endif - -#include -#include -#include -#include "macos_util_macosx.h" -#include -#include -#include "video_macosx.h" - -#define DEBUG 0 -#define VERBOSE 0 -#include "debug.h" - -#ifdef NSBITMAP -#import -#endif - -#import // Needed for NSLog(@"") -#import "misc_macosx.h" // WarningSheet() prototype - - - -// Global variables -uint8 display_type = DISPLAY_WINDOW, // These are used by PrefsEditor - frame_skip; -uint16 init_width = MIN_WIDTH, // as well as this code - init_height = MIN_HEIGHT, - init_depth = 32; - - EmulatorView *output = nil; // Set by [EmulatorView init] - NSWindow *the_win = nil; // Set by [Emulator awakeFromNib] - -static BOOL singleDisplay = YES; - -/* - * Utility functions - */ - -static uint8 -bits_from_depth(const video_depth depth) -{ - int bits = 1 << depth; -// if (bits == 16) -// bits = 15; -// else if (bits == 32) -// bits = 24; - return bits; -} - -static const char * -colours_from_depth(const video_depth depth) -{ - switch ( depth ) - { - case VDEPTH_1BIT : return "Monochrome"; - case VDEPTH_2BIT : return "4 colours"; - case VDEPTH_4BIT : return "16 colours"; - case VDEPTH_8BIT : return "256 colours"; - case VDEPTH_16BIT: return "Thousands of colours"; - case VDEPTH_32BIT: return "Millions of colours"; - } - - return "illegal colour depth"; -} - -static const char * -colours_from_depth(const uint16 depth) -{ - return colours_from_depth(DepthModeForPixelDepth(depth) ); -} - -bool -parse_screen_prefs(const char *mode_str) -{ - if ( ! mode_str ) - { - // No screen pref was found. Supply a default: - mode_str = "win/512/384"; - } - - if (sscanf(mode_str, "win/%hd/%hd/%hd", - &init_width, &init_height, &init_depth) == 3) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "win/%hd/%hd", &init_width, &init_height) == 2) - display_type = DISPLAY_WINDOW; - else if (strcmp(mode_str, "full") == 0) - display_type = DISPLAY_SCREEN; - else if (sscanf(mode_str, "full/%hd/%hd/%hd", - &init_width, &init_height, &init_depth) == 3) - display_type = DISPLAY_SCREEN; - else if (sscanf(mode_str, "full/%hd/%hd", &init_width, &init_height) == 2) - display_type = DISPLAY_SCREEN; - else if (sscanf(mode_str, "opengl/%hd/%hd/%hd", - &init_width, &init_height, &init_depth) == 3) - display_type = DISPLAY_OPENGL; - else if (sscanf(mode_str, "opengl/%hd/%hd", &init_width, &init_height) == 2) - display_type = DISPLAY_OPENGL; - else return false; - - return true; -} - -// Supported video modes -static vector VideoModes; - - -// Add mode to list of supported modes -static void -add_mode(const uint16 width, const uint16 height, - const uint32 resolution_id, const uint32 bytes_per_row, - const uint32 user_data, - const video_depth depth) -{ - vector::const_iterator i, - end = VideoModes.end(); - - for (i = VideoModes.begin(); i != end; ++i) - if ( i->x == width && i->y == height && - i->bytes_per_row == bytes_per_row && i->depth == depth ) - { - D(NSLog(@"Duplicate mode (%hdx%hdx%ld, ID %02x, new ID %02x)\n", - width, height, depth, i->resolution_id, resolution_id)); - return; - } - - video_mode mode; - - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.user_data = user_data; - mode.depth = depth; - - D(bug("Added video mode: w=%d h=%d d=%d(%d bits)\n", - width, height, depth, bits_from_depth(depth) )); - - VideoModes.push_back(mode); -} - -// Add standard list of windowed modes for given color depth -static void add_standard_modes(const video_depth depth) -{ - D(bug("add_standard_modes: depth=%d(%d bits)\n", - depth, bits_from_depth(depth) )); - - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), 0, depth); - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), 0, depth); - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), 0, depth); - add_mode(832, 624, 0x83, TrivialBytesPerRow(832, depth), 0, depth); - add_mode(1024, 768, 0x84, TrivialBytesPerRow(1024, depth), 0, depth); - add_mode(1152, 768, 0x85, TrivialBytesPerRow(1152, depth), 0, depth); - add_mode(1152, 870, 0x86, TrivialBytesPerRow(1152, depth), 0, depth); - add_mode(1280, 1024, 0x87, TrivialBytesPerRow(1280, depth), 0, depth); - add_mode(1600, 1200, 0x88, TrivialBytesPerRow(1600, depth), 0, depth); -} - -// Helper function to get a 32bit int from a dictionary -static int32 getCFint32 (CFDictionaryRef dict, CFStringRef key) -{ - CFNumberRef ref = (CFNumberRef) CFDictionaryGetValue(dict, key); - - if ( ref ) - { - int32 val; - - if ( CFNumberGetValue(ref, kCFNumberSInt32Type, &val) ) - return val; - else - NSLog(@"getCFint32() - Failed to get the value %@", key); - } - else - NSLog(@"getCFint32() - Failed to get a 32bit int for %@", key); - - return 0; -} - -// Nasty hack. Under 10.1, CGDisplayAvailableModes() does not provide bytes per row, -// and the emulator doesn't like setting the bytes per row after the screen, -// so we use a lot of magic numbers here. -// This will probably fail on some video hardware. -// I have tested on my G4 PowerBook 400 and G3 PowerBook Series 292 - -static int -CGBytesPerRow(const uint16 width, const video_depth depth) -{ - if ( depth == VDEPTH_8BIT ) - switch ( width ) - { - case 640: - case 720: return 768; - case 800: - case 896: return 1024; - case 1152: return 1280; - } - - if ( width == 720 && depth == VDEPTH_16BIT) return 1536; - if ( width == 720 && depth == VDEPTH_32BIT) return 3072; - if ( width == 800 && depth == VDEPTH_16BIT) return 1792; - if ( width == 800 && depth == VDEPTH_32BIT) return 3328; - - return TrivialBytesPerRow(width, depth); -} - -static bool add_CGDirectDisplay_modes() -{ -#define kMaxDisplays 8 - CGDirectDisplayID displays[kMaxDisplays]; - CGDisplayErr err; - CGDisplayCount n; - int32 oldRes = 0, - res_id = 0x80; - - - err = CGGetActiveDisplayList(kMaxDisplays, displays, &n); - if ( err != CGDisplayNoErr ) - n = 1, displays[n] = kCGDirectMainDisplay; - - if ( n > 1 ) - singleDisplay = NO; - - for ( CGDisplayCount dc = 0; dc < n; ++dc ) - { - CGDirectDisplayID d = displays[dc]; - CFArrayRef m = CGDisplayAvailableModes(d); - - if ( ! m ) // Store the current display mode - add_mode(CGDisplayPixelsWide(d), - CGDisplayPixelsHigh(d), - res_id++, CGDisplayBytesPerRow(d), - (const uint32) d, - DepthModeForPixelDepth(CGDisplayBitsPerPixel(d))); - else - { - CFIndex nModes = CFArrayGetCount(m); - - for ( CFIndex mc = 0; mc < nModes; ++mc ) - { - CFDictionaryRef modeSpec = (CFDictionaryRef) - CFArrayGetValueAtIndex(m, mc); - - int32 bpp = getCFint32(modeSpec, kCGDisplayBitsPerPixel); - int32 height = getCFint32(modeSpec, kCGDisplayHeight); - int32 width = getCFint32(modeSpec, kCGDisplayWidth); -#ifdef MAC_OS_X_VERSION_10_2 - int32 bytes = getCFint32(modeSpec, kCGDisplayBytesPerRow); -#else - int32 bytes = 0; -#endif - video_depth depth = DepthModeForPixelDepth(bpp); - - if ( ! bpp || ! height || ! width ) - { - NSLog(@"Could not get details of mode %d, display %d", - mc, dc); - return false; - } -#if VERBOSE - else - NSLog(@"Display %ld, spec = %@", d, modeSpec); -#endif - - if ( ! bytes ) - { - NSLog(@"Could not get bytes per row, guessing"); - bytes = CGBytesPerRow(width, depth); - } - - if ( ! oldRes ) - oldRes = width * height; - else - if ( oldRes != width * height ) - { - oldRes = width * height; - ++res_id; - } - - add_mode(width, height, res_id, bytes, (const uint32) d, depth); - } - } - } - - return true; -} - -#ifdef CG_USE_ALPHA -// memset() by long instead of byte - -static void memsetl (long *buffer, long pattern, size_t length) -{ - long *buf = (long *) buffer, - *end = buf + length/4; - - while ( ++buf < end ) - *buf = pattern; -} - -// Sets the alpha channel in a image to full on, except for the corners - -static void mask_buffer (void *buffer, size_t width, size_t size) -{ - long *bufl = (long *) buffer; - char *bufc = (char *) buffer; - - - memsetl(bufl, 0xFF000000, size); - - - // Round upper-left corner - *bufl = 0, *bufc+4 = 0; // XXXXX - bufc += width, *bufc++ = 0, *bufc++ = 0, *bufc++ = 0; // XXX - bufc += width, *bufc++ = 0, *bufc = 0; // XX - bufc += width, *bufc = 0; // X - bufc += width, *bufc = 0; // X - - - NSLog(@"Masked buffer"); -} -#endif - -// monitor_desc subclass for Mac OS X displays - -class OSX_monitor : public monitor_desc -{ - public: - OSX_monitor(const vector &available_modes, - video_depth default_depth, - uint32 default_id); - - virtual void set_palette(uint8 *pal, int num); - virtual void switch_to_current_mode(void); - - void set_mac_frame_buffer(const video_mode mode); - - void video_close(void); - bool video_open (const video_mode &mode); - - - private: - bool init_opengl(const video_mode &mode); - bool init_screen( video_mode &mode); - bool init_window(const video_mode &mode); - - -#ifdef CGIMAGEREF - CGColorSpaceRef colourSpace; - uint8 *colourTable; - CGImageRef imageRef; - CGDataProviderRef provider; - short x, y, bpp, depth, bpr; -#endif -#ifdef NSBITMAP - NSBitmapImageRep *bitmap; -#endif - void *the_buffer; - - - // These record changes we made in setting full screen mode, - // so that we can set the display back as it was again. - CGDirectDisplayID theDisplay; - CFDictionaryRef originalMode, - newMode; -}; - - -OSX_monitor :: OSX_monitor (const vector &available_modes, - video_depth default_depth, - uint32 default_id) - : monitor_desc (available_modes, default_depth, default_id) -{ -#ifdef CGIMAGEREF - colourSpace = nil; - colourTable = (uint8 *) malloc(256 * 3); - imageRef = nil; - provider = nil; -#endif -#ifdef NSBITMAP - bitmap = nil; -#endif - newMode = originalMode = nil; - the_buffer = NULL; - theDisplay = nil; -}; - -// Should also have a destructor which does -//#ifdef CGIMAGEREF -// free(colourTable); -//#endif - - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -void -OSX_monitor::set_mac_frame_buffer(const video_mode mode) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - switch ( mode.depth ) - { - // case VDEPTH_15BIT: - case VDEPTH_16BIT: MacFrameLayout = FLAYOUT_HOST_555; break; - // case VDEPTH_24BIT: - case VDEPTH_32BIT: MacFrameLayout = FLAYOUT_HOST_888; break; - default : MacFrameLayout = FLAYOUT_DIRECT; - } - set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - MacFrameBaseHost = (uint8 *) the_buffer; - MacFrameSize = mode.bytes_per_row * mode.y; - InitFrameBufferMapping(); -#else - set_mac_frame_base((unsigned int)Host2MacAddr((uint8 *)the_buffer)); -#endif - D(bug("mac_frame_base = %08x\n", get_mac_frame_base())); -} - -static void -resizeWinBy(const short deltaX, const short deltaY) -{ - NSRect rect = [the_win frame]; - - D(bug("resizeWinBy(%d,%d) - ", deltaX, deltaY)); - D(bug("old x=%g, y=%g", rect.size.width, rect.size.height)); - - rect.size.width += deltaX; - rect.size.height += deltaY; - - D(bug(", new x=%g, y=%g\n", rect.size.width, rect.size.height)); - - [the_win setFrame: rect display: YES animate: YES]; - [the_win center]; - rect = [the_win frame]; -} - -void resizeWinTo(const uint16 newWidth, const uint16 newHeight) -{ - int deltaX = newWidth - [output width], - deltaY = newHeight - [output height]; - - D(bug("resizeWinTo(%d,%d)\n", newWidth, newHeight)); - - if ( deltaX || deltaY ) - resizeWinBy(deltaX, deltaY); -} - -// Open window -bool -OSX_monitor::init_window(const video_mode &mode) -{ - D(bug("init_window: depth=%d(%d bits)\n", - mode.depth, bits_from_depth(mode.depth) )); - - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - - // Is the window open? - if ( ! the_win ) - { - ErrorAlert(STR_OPEN_WINDOW_ERR); - return false; - } - resizeWinTo(mode.x, mode.y); - - - // Create frame buffer ("height + 2" for safety) - int the_buffer_size = mode.bytes_per_row * (mode.y + 2); - - the_buffer = calloc(the_buffer_size, 1); - if ( ! the_buffer ) - { - NSLog(@"calloc(%d) failed", the_buffer_size); - ErrorAlert(STR_NO_MEM_ERR); - return false; - } - D(bug("the_buffer = %p\n", the_buffer)); - - - unsigned char *offsetBuffer = (unsigned char *) the_buffer; - offsetBuffer += 1; // OS X NSBitmaps are RGBA, but Basilisk generates ARGB - -#ifdef CGIMAGEREF - switch ( mode.depth ) - { - case VDEPTH_1BIT: bpp = 1; break; - case VDEPTH_2BIT: bpp = 2; break; - case VDEPTH_4BIT: bpp = 4; break; - case VDEPTH_8BIT: bpp = 8; break; - case VDEPTH_16BIT: bpp = 5; break; - case VDEPTH_32BIT: bpp = 8; break; - } - - x = mode.x, y = mode.y, depth = bits_from_depth(mode.depth), bpr = mode.bytes_per_row; - - colourSpace = CGColorSpaceCreateDeviceRGB(); - - if ( mode.depth < VDEPTH_16BIT ) - { - CGColorSpaceRef oldColourSpace = colourSpace; - - colourSpace = CGColorSpaceCreateIndexed(colourSpace, 255, colourTable); - - CGColorSpaceRelease(oldColourSpace); - } - - if ( ! colourSpace ) - { - ErrorAlert("No valid colour space"); - return false; - } - - provider = CGDataProviderCreateWithData(NULL, the_buffer, - the_buffer_size, NULL); - if ( ! provider ) - { - ErrorAlert("Could not create CGDataProvider from buffer data"); - return false; - } - - imageRef = CGImageCreate(x, y, bpp, depth, bpr, colourSpace, - #ifdef CG_USE_ALPHA - kCGImageAlphaPremultipliedFirst, - #else - kCGImageAlphaNoneSkipFirst, - #endif - provider, - NULL, // colourMap translation table - NO, // shouldInterpolate colours? - kCGRenderingIntentDefault); - if ( ! imageRef ) - { - ErrorAlert("Could not create CGImage from CGDataProvider"); - return false; - } - - [output readyToDraw: imageRef - bitmap: offsetBuffer - imageWidth: x - imageHeight: y]; - - - #ifdef CG_USE_ALPHA - mask_buffer(the_buffer, x, the_buffer_size); - -/* Create an image mask with this call? */ -//CG_EXTERN CGImageRef -//CGImageMaskCreate(size_t width, size_t height, size_t bitsPerComponent, -// size_t bitsPerPixel, size_t bytesPerRow, -// CGDataProviderRef provider, const float decode[], bool shouldInterpolate); - #endif - - return true; -#endif - - -#ifndef CGIMAGEREF - short bitsPer, samplesPer; // How big is each Pixel? - - if ( mode.depth == VDEPTH_1BIT ) - bitsPer = 1; - else - bitsPer = 8; - - if ( mode.depth == VDEPTH_32BIT ) - samplesPer = 3; - else - samplesPer = 1; -#endif - - -#ifdef NSBITMAP - bitmap = [NSBitmapImageRep alloc]; - bitmap = [bitmap initWithBitmapDataPlanes: (unsigned char **) &offsetBuffer - pixelsWide: mode.x - pixelsHigh: mode.y - bitsPerSample: bitsPer - samplesPerPixel: samplesPer - hasAlpha: NO - isPlanar: NO - colorSpaceName: NSCalibratedRGBColorSpace - bytesPerRow: mode.bytes_per_row - bitsPerPixel: bits_from_depth(mode.depth)]; - - if ( ! bitmap ) - { - ErrorAlert("Could not allocate an NSBitmapImageRep"); - return false; - } - - [output readyToDraw: bitmap - imageWidth: mode.x - imageHeight: mode.y]; -#endif - -#ifdef CGDRAWBITMAP - [output readyToDraw: offsetBuffer - width: mode.x - height: mode.y - bps: bitsPer - spp: samplesPer - bpp: bits_from_depth(mode.depth) - bpr: mode.bytes_per_row - isPlanar: NO - hasAlpha: NO]; -#endif - - return true; -} - -#import -#import -#import "NNThread.h" - -bool -OSX_monitor::init_screen(video_mode &mode) -{ - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Display stored by add_CGDirectDisplay_modes() - theDisplay = (CGDirectDisplayID) mode.user_data; - - originalMode = CGDisplayCurrentMode(theDisplay); - if ( ! originalMode ) - { - ErrorSheet(@"Could not get current mode of display", the_win); - return false; - } - - D(NSLog(@"About to call CGDisplayBestModeForParameters()")); - newMode = CGDisplayBestModeForParameters(theDisplay, - bits_from_depth(mode.depth), - mode.x, mode.y, NULL); - if ( ! newMode ) - { - ErrorSheet(@"Could not find a matching screen mode", the_win); - return false; - } - -// This sometimes takes ages to return after the window is genied, -// so for now we leave it onscreen -// [the_win miniaturize: nil]; - - D(NSLog(@"About to call CGDisplayCapture()")); - if ( CGDisplayCapture(theDisplay) != CGDisplayNoErr ) - { -// [the_win deminiaturize: nil]; - ErrorSheet(@"Could not capture display", the_win); - return false; - } - - D(NSLog(@"About to call CGDisplaySwitchToMode()")); - if ( CGDisplaySwitchToMode(theDisplay, newMode) != CGDisplayNoErr ) - { - CGDisplayRelease(theDisplay); -// [the_win deminiaturize: nil]; - ErrorSheet(@"Could not switch to matching screen mode", the_win); - return false; - } - - the_buffer = CGDisplayBaseAddress(theDisplay); - if ( ! the_buffer ) - { - CGDisplaySwitchToMode(theDisplay, originalMode); - CGDisplayRelease(theDisplay); -// [the_win deminiaturize: nil]; - ErrorSheet(@"Could not get base address of screen", the_win); - return false; - } - - if ( mode.bytes_per_row != CGDisplayBytesPerRow(theDisplay) ) - { - D(bug("Bytes per row (%d) doesn't match current (%ld)\n", - mode.bytes_per_row, CGDisplayBytesPerRow(theDisplay))); - mode.bytes_per_row = CGDisplayBytesPerRow(theDisplay); - } - - [NSMenu setMenuBarVisible:NO]; - - if ( singleDisplay ) - { - CGDisplayHideCursor(theDisplay); - - [output startedFullScreen: theDisplay]; - - // Send emulated mouse to current location - [output fullscreenMouseMove]; - } - else - { - // Should set up something to hide the cursor when it enters theDisplay? - } - - return true; -} - - -bool -OSX_monitor::init_opengl(const video_mode &mode) -{ - ErrorAlert("Sorry. OpenGL mode is not implemented yet"); - return false; -} - -/* - * Initialization - */ -static bool -monitor_init(const video_mode &init_mode) -{ - OSX_monitor *monitor; - BOOL success; - - monitor = new OSX_monitor(VideoModes, init_mode.depth, - init_mode.resolution_id); - success = monitor->video_open(init_mode); - - if ( success ) - { - monitor->set_mac_frame_buffer(init_mode); - VideoMonitors.push_back(monitor); - return YES; - } - - return NO; -} - -bool VideoInit(bool classic) -{ - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Get screen mode from preferences - const char *mode_str; - if (classic) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display_type and init_width, height & depth - parse_screen_prefs(mode_str); - - // Construct list of supported modes - if (classic) - add_mode(512, 342, 0x80, 64, 0, VDEPTH_1BIT); - else - switch ( display_type ) - { - case DISPLAY_SCREEN: - if ( ! add_CGDirectDisplay_modes() ) - { - ErrorAlert("Unable to get list of displays for full screen mode"); - return false; - } - break; - case DISPLAY_OPENGL: - // Same as window depths and sizes? - case DISPLAY_WINDOW: -#ifdef CGIMAGEREF - add_standard_modes(VDEPTH_1BIT); - add_standard_modes(VDEPTH_2BIT); - add_standard_modes(VDEPTH_4BIT); - add_standard_modes(VDEPTH_8BIT); - add_standard_modes(VDEPTH_16BIT); -#endif - add_standard_modes(VDEPTH_32BIT); - break; - } - -// video_init_depth_list(); Now done in monitor_desc constructor? - -#if DEBUG - bug("Available video modes:\n"); - vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) - bug(" %dx%d (ID %02x), %s\n", i->x, i->y, i->resolution_id, - colours_from_depth(i->depth)); -#endif - - D(bug("VideoInit: width=%hd height=%hd depth=%d\n", - init_width, init_height, init_depth)); - - // Find requested default mode and open display - if (VideoModes.size() > 0) - { - // Find mode with specified dimensions - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) - { - D(bug("VideoInit: w=%d h=%d d=%d\n", - i->x, i->y, bits_from_depth(i->depth))); - if (i->x == init_width && i->y == init_height - && bits_from_depth(i->depth) == init_depth) - return monitor_init(*i); - } - } - - char str[150]; - sprintf(str, "Cannot open selected video mode\r(%hd x %hd, %s).\r%s", - init_width, init_height, - colours_from_depth(init_depth), "Using lowest resolution"); - WarningAlert(str); - - return monitor_init(VideoModes[0]); -} - - -// Open display for specified mode -bool -OSX_monitor::video_open(const video_mode &mode) -{ - D(bug("video_open: width=%d height=%d depth=%d bytes_per_row=%d\n", - mode.x, mode.y, bits_from_depth(mode.depth), mode.bytes_per_row)); - - // Open display - switch ( display_type ) - { - case DISPLAY_WINDOW: return init_window(mode); - case DISPLAY_SCREEN: return init_screen((video_mode &)mode); - case DISPLAY_OPENGL: return init_opengl(mode); - } - - return false; -} - - -void -OSX_monitor::video_close() -{ - D(bug("video_close()\n")); - - switch ( display_type ) { - case DISPLAY_WINDOW: - // Stop redraw thread - [output disableDrawing]; - - // Free frame buffer stuff -#ifdef CGIMAGEREF - CGImageRelease(imageRef); - CGColorSpaceRelease(colourSpace); - CGDataProviderRelease(provider); -#endif -#ifdef NSBITMAP - [bitmap release]; -#endif - free(the_buffer); - - break; - - case DISPLAY_SCREEN: - if ( theDisplay && originalMode ) - { - if ( singleDisplay ) - CGDisplayShowCursor(theDisplay); - [NSMenu setMenuBarVisible:YES]; - CGDisplaySwitchToMode(theDisplay, originalMode); - CGDisplayRelease(theDisplay); - //[the_win deminiaturize: nil]; - } - break; - - case DISPLAY_OPENGL: - break; - } -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end; - - end = VideoMonitors.end(); - - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - - VideoMonitors.clear(); - VideoModes.clear(); -} - - -/* - * Set palette - */ - -void -OSX_monitor::set_palette(uint8 *pal, int num) -{ - if ( [output isFullScreen] && CGDisplayCanSetPalette(theDisplay) - && ! IsDirectMode(get_current_mode()) ) - { - CGDirectPaletteRef CGpal; - CGDisplayErr err; - - - CGpal = CGPaletteCreateWithByteSamples((CGDeviceByteColor *)pal, num); - err = CGDisplaySetPalette(theDisplay, CGpal); - if ( err != noErr ) - NSLog(@"Failed to set palette, error = %d", err); - CGPaletteRelease(CGpal); - } - -#ifdef CGIMAGEREF - if ( display_type != DISPLAY_WINDOW ) - return; - - // To change the palette, we have to regenerate - // the CGImageRef with the new colour space. - - CGImageRef oldImageRef = imageRef; - CGColorSpaceRef oldColourSpace = colourSpace; - - colourSpace = CGColorSpaceCreateDeviceRGB(); - - if ( depth < 16 ) - { - CGColorSpaceRef tempColourSpace = colourSpace; - - colourSpace = CGColorSpaceCreateIndexed(colourSpace, 255, pal); - CGColorSpaceRelease(tempColourSpace); - } - - if ( ! colourSpace ) - { - ErrorAlert("No valid colour space"); - return; - } - - imageRef = CGImageCreate(x, y, bpp, depth, bpr, colourSpace, - #ifdef CG_USE_ALPHA - kCGImageAlphaPremultipliedFirst, - #else - kCGImageAlphaNoneSkipFirst, - #endif - provider, - NULL, // colourMap translation table - NO, // shouldInterpolate colours? - kCGRenderingIntentDefault); - if ( ! imageRef ) - { - ErrorAlert("Could not create CGImage from CGDataProvider"); - return; - } - - unsigned char *offsetBuffer = (unsigned char *) the_buffer; - offsetBuffer += 1; // OS X NSBitmaps are RGBA, but Basilisk generates ARGB - - [output readyToDraw: imageRef - bitmap: offsetBuffer - imageWidth: x - imageHeight: y]; - - CGColorSpaceRelease(oldColourSpace); - CGImageRelease(oldImageRef); -#endif -} - - -/* - * Switch video mode - */ - -void -OSX_monitor::switch_to_current_mode(void) -{ - video_mode mode = get_current_mode(); - const char *failure = NULL; - - D(bug("switch_to_current_mode(): width=%d height=%d depth=%d bytes_per_row=%d\n", mode.x, mode.y, bits_from_depth(mode.depth), mode.bytes_per_row)); - - if ( display_type == DISPLAY_SCREEN && originalMode ) - { - D(NSLog(@"About to call CGDisplayBestModeForParameters()")); - newMode = CGDisplayBestModeForParameters(theDisplay, - bits_from_depth(mode.depth), - mode.x, mode.y, NULL); - if ( ! newMode ) - failure = "Could not find a matching screen mode"; - else - { - D(NSLog(@"About to call CGDisplaySwitchToMode()")); - if ( CGDisplaySwitchToMode(theDisplay, newMode) != CGDisplayNoErr ) - failure = "Could not switch to matching screen mode"; - } - - // For mouse event processing: update screen height - [output startedFullScreen: theDisplay]; - - if ( ! failure && - mode.bytes_per_row != CGDisplayBytesPerRow(theDisplay) ) - { - D(bug("Bytes per row (%d) doesn't match current (%ld)\n", - mode.bytes_per_row, CGDisplayBytesPerRow(theDisplay))); - mode.bytes_per_row = CGDisplayBytesPerRow(theDisplay); - } - - if ( ! failure && - ! ( the_buffer = CGDisplayBaseAddress(theDisplay) ) ) - failure = "Could not get base address of screen"; - - } -#ifdef CGIMAGEREF - // Clean up the old CGImageRef stuff - else if ( display_type == DISPLAY_WINDOW && imageRef ) - { - CGImageRef oldImageRef = imageRef; - CGColorSpaceRef oldColourSpace = colourSpace; - CGDataProviderRef oldProvider = provider; - void *oldBuffer = the_buffer; - - if ( video_open(mode) ) - { - CGImageRelease(oldImageRef); - CGColorSpaceRelease(oldColourSpace); - CGDataProviderRelease(oldProvider); - free(oldBuffer); - } - else - failure = "Could not video_open() requested mode"; - } -#endif - else if ( ! video_open(mode) ) - failure = "Could not video_open() requested mode"; - - if ( ! failure && display_type == DISPLAY_SCREEN ) - { - // Whenever we change screen resolution, the MacOS mouse starts - // up in the top left corner. Send real mouse to that location -// if ( CGDisplayMoveCursorToPoint(theDisplay, CGPointMake(15,15)) -// == CGDisplayNoErr ) -// { - // - [output fullscreenMouseMove]; -// } -// else -// failure = "Could move (jump) cursor on screen"; - } - - if ( failure ) - { - NSLog(@"In switch_to_current_mode():"); - NSLog(@"%s.", failure); - video_close(); - if ( display_type == DISPLAY_SCREEN ) - ErrorAlert("Cannot switch screen to selected video mode"); - else - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } - else - set_mac_frame_buffer(mode); -} - -/* - * Close down full-screen mode - * (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ -} - - -/* - * Mac VBL interrupt - */ - -void VideoInterrupt(void) -{ -} - - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ -} - - - -// Deal with a memory access signal referring to the screen. -// For now, just ignore -bool Screen_fault_handler(char *a, char *b) -{ -// NSLog(@"Got a screen fault %lx %lx", a, b); -// [output setNeedsDisplay: YES]; - return YES; -} diff --git a/BasiliskII/src/SDL/SDLMain.h b/BasiliskII/src/SDL/SDLMain.h deleted file mode 100644 index c56d90cbe..000000000 --- a/BasiliskII/src/SDL/SDLMain.h +++ /dev/null @@ -1,16 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#ifndef _SDLMain_h_ -#define _SDLMain_h_ - -#import - -@interface SDLMain : NSObject -@end - -#endif /* _SDLMain_h_ */ diff --git a/BasiliskII/src/SDL/SDLMain.m b/BasiliskII/src/SDL/SDLMain.m deleted file mode 100644 index 2434f81aa..000000000 --- a/BasiliskII/src/SDL/SDLMain.m +++ /dev/null @@ -1,381 +0,0 @@ -/* SDLMain.m - main entry point for our Cocoa-ized SDL app - Initial Version: Darrell Walisser - Non-NIB-Code & other changes: Max Horn - - Feel free to customize this file to suit your needs -*/ - -#include "SDL.h" -#include "SDLMain.h" -#include /* for MAXPATHLEN */ -#include - -/* For some reaon, Apple removed setAppleMenu from the headers in 10.4, - but the method still is there and works. To avoid warnings, we declare - it ourselves here. */ -@interface NSApplication(SDL_Missing_Methods) -- (void)setAppleMenu:(NSMenu *)menu; -@end - -/* Use this flag to determine whether we use SDLMain.nib or not */ -#define SDL_USE_NIB_FILE 0 - -/* Use this flag to determine whether we use CPS (docking) or not */ -#define SDL_USE_CPS 1 -#ifdef SDL_USE_CPS -/* Portions of CPS.h */ -typedef struct CPSProcessSerNum -{ - UInt32 lo; - UInt32 hi; -} CPSProcessSerNum; - -extern OSErr CPSGetCurrentProcess( CPSProcessSerNum *psn); -extern OSErr CPSEnableForegroundOperation( CPSProcessSerNum *psn, UInt32 _arg2, UInt32 _arg3, UInt32 _arg4, UInt32 _arg5); -extern OSErr CPSSetFrontProcess( CPSProcessSerNum *psn); - -#endif /* SDL_USE_CPS */ - -static int gArgc; -static char **gArgv; -static BOOL gFinderLaunch; -static BOOL gCalledAppMainline = FALSE; - -static NSString *getApplicationName(void) -{ - const NSDictionary *dict; - NSString *appName = 0; - - /* Determine the application name */ - dict = (const NSDictionary *)CFBundleGetInfoDictionary(CFBundleGetMainBundle()); - if (dict) - appName = [dict objectForKey: @"CFBundleName"]; - - if (![appName length]) - appName = [[NSProcessInfo processInfo] processName]; - - return appName; -} - -#if SDL_USE_NIB_FILE -/* A helper category for NSString */ -@interface NSString (ReplaceSubString) -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString; -@end -#endif - -@interface NSApplication (SDLApplication) -@end - -@implementation NSApplication (SDLApplication) -/* Invoked from the Quit menu item */ -- (void)terminate:(id)sender -{ - /* Post a SDL_QUIT event */ - SDL_Event event; - event.type = SDL_QUIT; - SDL_PushEvent(&event); -} -@end - -/* The main class of the application, the application's delegate */ -@implementation SDLMain - -/* Set the working directory to the .app's parent directory */ -- (void) setupWorkingDirectory:(BOOL)shouldChdir -{ - if (shouldChdir) - { - char parentdir[MAXPATHLEN]; - CFURLRef url = CFBundleCopyBundleURL(CFBundleGetMainBundle()); - CFURLRef url2 = CFURLCreateCopyDeletingLastPathComponent(0, url); - if (CFURLGetFileSystemRepresentation(url2, 1, (UInt8 *)parentdir, MAXPATHLEN)) { - chdir(parentdir); /* chdir to the binary app's parent */ - } - CFRelease(url); - CFRelease(url2); - } -} - -#if SDL_USE_NIB_FILE - -/* Fix menu to contain the real app name instead of "SDL App" */ -- (void)fixMenu:(NSMenu *)aMenu withAppName:(NSString *)appName -{ - NSRange aRange; - NSEnumerator *enumerator; - NSMenuItem *menuItem; - - aRange = [[aMenu title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [aMenu setTitle: [[aMenu title] stringByReplacingRange:aRange with:appName]]; - - enumerator = [[aMenu itemArray] objectEnumerator]; - while ((menuItem = [enumerator nextObject])) - { - aRange = [[menuItem title] rangeOfString:@"SDL App"]; - if (aRange.length != 0) - [menuItem setTitle: [[menuItem title] stringByReplacingRange:aRange with:appName]]; - if ([menuItem hasSubmenu]) - [self fixMenu:[menuItem submenu] withAppName:appName]; - } -} - -#else - -static void setApplicationMenu(void) -{ - /* warning: this code is very odd */ - NSMenu *appleMenu; - NSMenuItem *menuItem; - NSString *title; - NSString *appName; - - appName = getApplicationName(); - appleMenu = [[NSMenu alloc] initWithTitle:@""]; - - /* Add menu items */ - title = [@"About " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(orderFrontStandardAboutPanel:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Hide " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(hide:) keyEquivalent:@"h"]; - - menuItem = (NSMenuItem *)[appleMenu addItemWithTitle:@"Hide Others" action:@selector(hideOtherApplications:) keyEquivalent:@"h"]; - [menuItem setKeyEquivalentModifierMask:(NSAlternateKeyMask|NSCommandKeyMask)]; - - [appleMenu addItemWithTitle:@"Show All" action:@selector(unhideAllApplications:) keyEquivalent:@""]; - - [appleMenu addItem:[NSMenuItem separatorItem]]; - - title = [@"Quit " stringByAppendingString:appName]; - [appleMenu addItemWithTitle:title action:@selector(terminate:) keyEquivalent:@"q"]; - - - /* Put menu into the menubar */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"" action:nil keyEquivalent:@""]; - [menuItem setSubmenu:appleMenu]; - [[NSApp mainMenu] addItem:menuItem]; - - /* Tell the application object that this is now the application menu */ - [NSApp setAppleMenu:appleMenu]; - - /* Finally give up our references to the objects */ - [appleMenu release]; - [menuItem release]; -} - -/* Create a window menu */ -static void setupWindowMenu(void) -{ - NSMenu *windowMenu; - NSMenuItem *windowMenuItem; - NSMenuItem *menuItem; - - windowMenu = [[NSMenu alloc] initWithTitle:@"Window"]; - - /* "Minimize" item */ - menuItem = [[NSMenuItem alloc] initWithTitle:@"Minimize" action:@selector(performMiniaturize:) keyEquivalent:@"m"]; - [windowMenu addItem:menuItem]; - [menuItem release]; - - /* Put menu into the menubar */ - windowMenuItem = [[NSMenuItem alloc] initWithTitle:@"Window" action:nil keyEquivalent:@""]; - [windowMenuItem setSubmenu:windowMenu]; - [[NSApp mainMenu] addItem:windowMenuItem]; - - /* Tell the application object that this is now the window menu */ - [NSApp setWindowsMenu:windowMenu]; - - /* Finally give up our references to the objects */ - [windowMenu release]; - [windowMenuItem release]; -} - -/* Replacement for NSApplicationMain */ -static void CustomApplicationMain (int argc, char **argv) -{ - NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; - SDLMain *sdlMain; - - /* Ensure the application object is initialised */ - [NSApplication sharedApplication]; - -#ifdef SDL_USE_CPS - { - CPSProcessSerNum PSN; - /* Tell the dock about us */ - if (!CPSGetCurrentProcess(&PSN)) - if (!CPSEnableForegroundOperation(&PSN,0x03,0x3C,0x2C,0x1103)) - if (!CPSSetFrontProcess(&PSN)) - [NSApplication sharedApplication]; - } -#endif /* SDL_USE_CPS */ - - /* Set up the menubar */ - [NSApp setMainMenu:[[NSMenu alloc] init]]; - setApplicationMenu(); - setupWindowMenu(); - - /* Create SDLMain and make it the app delegate */ - sdlMain = [[SDLMain alloc] init]; - [NSApp setDelegate:sdlMain]; - - /* Start the main event loop */ - [NSApp run]; - - [sdlMain release]; - [pool release]; -} - -#endif - - -/* - * Catch document open requests...this lets us notice files when the app - * was launched by double-clicking a document, or when a document was - * dragged/dropped on the app's icon. You need to have a - * CFBundleDocumentsType section in your Info.plist to get this message, - * apparently. - * - * Files are added to gArgv, so to the app, they'll look like command line - * arguments. Previously, apps launched from the finder had nothing but - * an argv[0]. - * - * This message may be received multiple times to open several docs on launch. - * - * This message is ignored once the app's mainline has been called. - */ -- (BOOL)application:(NSApplication *)theApplication openFile:(NSString *)filename -{ - const char *temparg; - size_t arglen; - char *arg; - char **newargv; - - if (!gFinderLaunch) /* MacOS is passing command line args. */ - return FALSE; - - if (gCalledAppMainline) /* app has started, ignore this document. */ - return FALSE; - - temparg = [filename UTF8String]; - arglen = SDL_strlen(temparg) + 1; - arg = (char *) SDL_malloc(arglen); - if (arg == NULL) - return FALSE; - - newargv = (char **) realloc(gArgv, sizeof (char *) * (gArgc + 2)); - if (newargv == NULL) - { - SDL_free(arg); - return FALSE; - } - gArgv = newargv; - - SDL_strlcpy(arg, temparg, arglen); - gArgv[gArgc++] = arg; - gArgv[gArgc] = NULL; - return TRUE; -} - - -/* Called when the internal event loop has just started running */ -- (void) applicationDidFinishLaunching: (NSNotification *) note -{ - int status; - - /* Set the working directory to the .app's parent directory */ - [self setupWorkingDirectory:gFinderLaunch]; - -#if SDL_USE_NIB_FILE - /* Set the main menu to contain the real app name instead of "SDL App" */ - [self fixMenu:[NSApp mainMenu] withAppName:getApplicationName()]; -#endif - - /* Hand off to main application code */ - gCalledAppMainline = TRUE; - status = SDL_main (gArgc, gArgv); - - /* We're done, thank you for playing */ - exit(status); -} -@end - - -@implementation NSString (ReplaceSubString) - -- (NSString *)stringByReplacingRange:(NSRange)aRange with:(NSString *)aString -{ - unsigned int bufferSize; - unsigned int selfLen = [self length]; - unsigned int aStringLen = [aString length]; - unichar *buffer; - NSRange localRange; - NSString *result; - - bufferSize = selfLen + aStringLen - aRange.length; - buffer = (unichar *)NSAllocateMemoryPages(bufferSize*sizeof(unichar)); - - /* Get first part into buffer */ - localRange.location = 0; - localRange.length = aRange.location; - [self getCharacters:buffer range:localRange]; - - /* Get middle part into buffer */ - localRange.location = 0; - localRange.length = aStringLen; - [aString getCharacters:(buffer+aRange.location) range:localRange]; - - /* Get last part into buffer */ - localRange.location = aRange.location + aRange.length; - localRange.length = selfLen - localRange.location; - [self getCharacters:(buffer+aRange.location+aStringLen) range:localRange]; - - /* Build output string */ - result = [NSString stringWithCharacters:buffer length:bufferSize]; - - NSDeallocateMemoryPages(buffer, bufferSize); - - return result; -} - -@end - - - -#ifdef main -# undef main -#endif - - -/* Main entry point to executable - should *not* be SDL_main! */ -int main (int argc, char **argv) -{ - /* Copy the arguments into a global variable */ - /* This is passed if we are launched by double-clicking */ - if ( argc >= 2 && strncmp (argv[1], "-psn", 4) == 0 ) { - gArgv = (char **) SDL_malloc(sizeof (char *) * 2); - gArgv[0] = argv[0]; - gArgv[1] = NULL; - gArgc = 1; - gFinderLaunch = YES; - } else { - int i; - gArgc = argc; - gArgv = (char **) SDL_malloc(sizeof (char *) * (argc+1)); - for (i = 0; i <= argc; i++) - gArgv[i] = argv[i]; - gFinderLaunch = NO; - } - -#if SDL_USE_NIB_FILE - NSApplicationMain (argc, argv); -#else - CustomApplicationMain (argc, argv); -#endif - return 0; -} - diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 921beb4c1..85ad4c8b4 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -32,10 +32,6 @@ #define DEBUG 0 #include "debug.h" -#if defined(BINCUE) -#include "bincue_unix.h" -#endif - #define MAC_MAX_VOLUME 0x0100 @@ -100,11 +96,6 @@ static bool open_sdl_audio(void) return false; } -#if defined(BINCUE) - OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, - audio_spec.silence); -#endif - char driver_name[32]; printf("Using SDL/%s audio output\n", SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1)); silence_byte = audio_spec.silence; @@ -236,9 +227,7 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) // Audio not active, play silence silence: memset(stream, silence_byte, stream_len); } -#if defined(BINCUE) - MixAudio_bincue(stream, stream_len); -#endif + } diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 4ea28b722..9b2855daa 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -48,10 +48,6 @@ #include #include -#ifdef WIN32 -#include /* alloca() */ -#endif - #include "cpu_emulation.h" #include "main.h" #include "adb.h" @@ -86,11 +82,7 @@ static int display_type = DISPLAY_WINDOW; // See enum above #endif // Constants -#ifdef WIN32 -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; -#else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -#endif // Global variables @@ -217,43 +209,6 @@ static inline void vm_release_framebuffer(void *fb, uint32 size) } -/* - * Windows message handler - */ - -#ifdef WIN32 -#include -static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL - -extern void SysMediaArrived(void); -extern void SysMediaRemoved(void); -extern HWND GetMainWindowHandle(void); - -static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) -{ - switch (msg) { - case WM_DEVICECHANGE: - if (wParam == DBT_DEVICEREMOVECOMPLETE) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaRemoved(); - } - else if (wParam == DBT_DEVICEARRIVAL) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaArrived(); - } - return 0; - - default: - if (sdl_window_proc) - return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); - } - - return DefWindowProc(hwnd, msg, wParam, lParam); -} -#endif - /* * SheepShaver glue @@ -502,26 +457,9 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt // Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) { -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VIDEO_DEPTH_16BIT) - layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VIDEO_DEPTH_32BIT) - layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; - monitor.set_mac_frame_base(MacFrameBaseMac); - // Set variables used by UAE memory banking - const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); -#else monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif + D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); } @@ -934,13 +872,6 @@ bool SDL_monitor_desc::video_open(void) return false; } -#ifdef WIN32 - // Chain in a new message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); -#endif - // Initialize VideoRefresh function VideoRefreshInit(); @@ -1162,12 +1093,6 @@ void SDL_monitor_desc::video_close(void) { D(bug("video_close()\n")); -#ifdef WIN32 - // Remove message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); -#endif - // Stop redraw thread #ifndef USE_CPU_EMUL_SERVICES if (redraw_thread_active) { @@ -1489,9 +1414,7 @@ void video_set_cursor(void) // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the // mouse, we have to put it back. bool move = false; -#ifdef WIN32 - move = true; -#elif defined(__APPLE__) +#if defined(__APPLE__) move = mouse_grabbed; #endif if (move) { @@ -2095,7 +2018,7 @@ static void video_refresh_dga(void) } #ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING static void video_refresh_dga_vosf(void) { // Quit DGA mode if requested @@ -2158,7 +2081,7 @@ static void VideoRefreshInit(void) { // TODO: set up specialised 8bpp VideoRefresh handlers ? if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) +#if ENABLE_VOSF && (DIRECT_ADDRESSING) if (use_vosf) video_refresh = video_refresh_dga_vosf; else diff --git a/BasiliskII/src/MacOSX/sys_darwin.cpp b/BasiliskII/src/Unix/Darwin/sys_darwin.cpp similarity index 100% rename from BasiliskII/src/MacOSX/sys_darwin.cpp rename to BasiliskII/src/Unix/Darwin/sys_darwin.cpp diff --git a/BasiliskII/src/Unix/FreeBSD/scsi_freebsd.cpp b/BasiliskII/src/Unix/FreeBSD/scsi_freebsd.cpp deleted file mode 100644 index 556af295f..000000000 --- a/BasiliskII/src/Unix/FreeBSD/scsi_freebsd.cpp +++ /dev/null @@ -1,743 +0,0 @@ -/* - * scsi_freebsd.cpp - SCSI Manager, FreeBSD SCSI Driver implementation - * Copyright (C) 1999 Orlando Bassotto - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - * - * History: - * 29-Jun-1999 Started - * 05-Jul-1999 Changed from array to queue removing the limit of 8 - * devices. - * Implemented old SCSI management for FreeBSD 2.x. - * (Note: This implementation hasn't been tested; - * I don't own anymore a machine with FreeBSD 2.x, - * so if something goes wrong, please mail me to - * future@mediabit.net). - */ - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#ifdef CAM -#include -#include -#include -#include -#include -#include -#include -#include -#else /* !CAM */ -#include -#include -#endif /* !CAM */ - -#include "sysdeps.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -#undef u_int8_t -#define u_int8_t unsigned char - -typedef struct _SCSIDevice { - int controller; // SCSI Controller - int controller_bus; // SCSI Controller Bus - char controller_name[33]; // SCSI Controller name - int mac_unit; // Macintosh SCSI ID (remapped) - int faked_controller; // "Faked" SCSI Controller (Always 0) - int faked_unit; // "Faked" SCSI ID - int unit; // Real SCSI ID - int lun; // Real SCSI LUN - u_int8_t vendor[16]; // SCSI Vendor - u_int8_t product[48]; // SCSI Product - u_int8_t revision[16]; // SCSI Revision - char device[33]; // SCSI Device -#ifdef CAM - char pass_device[33]; // SCSI Pass Device -#else /* !CAM */ - int dev_fd; // Device File Descriptor -#endif /* !CAM */ - void* dev_ptr; // Pointer to CAM/SCSI structure - bool enabled; // Device enabled ? - struct _SCSIDevice* next; // Pointer to the next device -} SCSIDevice; - -static int nDevices = 0; -static SCSIDevice* Devices = NULL; - -static uint32 buffer_size; -static uint8* buffer = NULL; - -static uint8 the_cmd[12]; -static int the_cmd_len; - -static SCSIDevice* CurrentDevice = NULL; - -inline static SCSIDevice* _GetSCSIDeviceByID(int id) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->faked_unit==id) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByIDLUN(int id, int lun) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->faked_unit==id&&aux->lun==lun) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByMacID(int id) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->mac_unit==id) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByMacIDLUN(int id, int lun) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->mac_unit==id&&aux->lun==lun) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _AllocNewDevice() -{ - SCSIDevice* aux; - - aux = new SCSIDevice; - if(aux==NULL) return NULL; - memset(aux, 0, sizeof(SCSIDevice)); - aux->next = Devices; - Devices = aux; - return aux; -} - -#ifdef CAM -inline static struct cam_device* _GetCurrentSCSIDevice() -{ - if(CurrentDevice==NULL) return NULL; - - return (struct cam_device*)CurrentDevice->dev_ptr; -} -#else /* !CAM */ -inline static struct scsireq* _GetCurrentSCSIDevice() -{ - if(CurrentDevice==NULL) return NULL; - - return (struct scsireq*)CurrentDevice->dev_ptr; -} -#endif /* !CAM */ - -/* - * _Build_SCSI_Controller() - * - * This function builds a virtual SCSI Controller (Controller=0) - * where keeps all the devices found, this is due the fact - * I have two SCSI controllers in my PC. :-) - * Use scsidump in contrib/ to see how is remapped your - * SCSI device (only if you have more than one controller, - * that's for sure :-). - * If you have only one controller, remapping does not take act. - */ - -#define GET_FREE_ID(id) \ - { \ - for(int x=0;x<32;x++) { \ - if(!(busyIDs&(1<<(x+1)))) { \ - id = x; \ - break; \ - } \ - } \ - } - -static void _Build_SCSI_Controller() -{ - unsigned int id = 0; - unsigned long long busyIDs = 0x0ll; - SCSIDevice* aux, * dev; - - // What IDs are busy? - dev = Devices; - while(dev) { - dev->enabled = false; - dev->faked_controller = 0; - dev->faked_unit = dev->unit; - busyIDs |= (1 << (dev->unit+1)); - dev = dev->next; - } - - // Find out the duplicate IDs and remap them - dev = Devices, aux = NULL; - while(dev) { - aux = dev; - while(aux) { - SCSIDevice* dev1, * dev2; - - dev1 = dev, dev2 = aux; - - if(dev1->controller!=dev2->controller&& - dev1->unit==dev2->unit) { - int free_id; - GET_FREE_ID(free_id); - busyIDs |= (1<<(free_id+1)); - dev1->faked_unit = free_id; - } - aux = aux->next; - } - dev = dev->next; - } - - // Now reorder the queue -#if 0 - dev = Devices; - while(dev) { - aux = dev; - while(aux) { - SCSIDevice* dev1, * dev2; - - dev1 = dev, dev2 = aux; - if(dev1->faked_unit>dev2->faked_unit) { - SCSIDevice tmp; - - memcpy(&tmp, dev1, sizeof(SCSIDevice)); - memcpy(dev1, dev2, sizeof(SCSIDevice)); - memcpy(dev2, &tmp, sizeof(SCSIDevice)); - } - aux = aux->next; - } - dev = dev->next; - } -#endif - - // Now open the selected SCSI devices :-) - for(int n=0;n<8;n++) { - char tmp[25]; - - snprintf(tmp, sizeof(tmp), "scsi%d", n); - const char* scsi = PrefsFindString(tmp); - if(scsi) { - int id, lun; - - // The format is: RemappedID (or FakedID)/LUN - sscanf(scsi, "%d/%d", &id, &lun); - - SCSIDevice* dev = _GetSCSIDeviceByIDLUN(id, lun); - if(dev==NULL) continue; - dev->enabled = true; - dev->mac_unit = n; - -#ifdef CAM - struct cam_device* cam; - - cam = cam_open_btl(dev->controller, - dev->unit, - dev->lun, O_RDWR, NULL); - if(cam==NULL) { - fprintf(stderr, "Failed to open %d:%d:%d = %s!!!\n", - dev->controller, dev->unit, dev->lun, - cam_errbuf); - } - dev->dev_ptr = (void*)cam; -#else /* !CAM */ - dev->dev_fd = scsi_open(dev->device, O_RDWR); - if(dev->dev_fd<0) { - perror("Failed to open %d:%d:%d"); - } - else { - dev->dev_ptr = (void*)scsireq_new(); - } -#endif /* !CAM */ - } - } -} - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - // Finds the SCSI hosts in the system filling the SCSIDevices queue. - // "Stolen" from camcontrol.c - // Copyright (C) 1997-99 Kenneth D. Merry - // Old SCSI detection "stolen" from scsi.c - // Copyright (C) 1993 Julian Elischer - // - int bufsize, fd; - int need_close = 0; - int error = 0; - int skip_device = 0; - SCSIDevice* Dev, * dev, * PrevDev = NULL; - - nDevices = 0; - - if(PrefsFindBool("noscsi")) - goto no_scsi; - -#ifdef CAM - union ccb ccb; - if ((fd = open(XPT_DEVICE, O_RDWR)) == -1) { - fprintf(stderr, "WARNING: Cannot open CAM device %s (%s)\n", XPT_DEVICE, strerror(errno)); - goto no_scsi; - } - - memset(&(&ccb.ccb_h)[1], 0, sizeof(struct ccb_dev_match)-sizeof(struct ccb_hdr)); - ccb.ccb_h.func_code = XPT_DEV_MATCH; - bufsize = sizeof(struct dev_match_result) * 100; - ccb.cdm.match_buf_len = bufsize; - ccb.cdm.matches = (struct dev_match_result *)malloc(bufsize); - ccb.cdm.num_matches = 0; - - ccb.cdm.num_patterns = 0; - ccb.cdm.pattern_buf_len = 0; - - do { - Dev = _AllocNewDevice(); - if(ioctl(fd, CAMIOCOMMAND, &ccb)==-1) { - fprintf(stderr, "Error sending CAMIOCOMMAND ioctl\n"); - return; - } - - if((ccb.ccb_h.status != CAM_REQ_CMP) - || ((ccb.cdm.status != CAM_DEV_MATCH_LAST) - && (ccb.cdm.status != CAM_DEV_MATCH_MORE))) { - fprintf(stderr, "Got CAM error %#x, CDM error %d\n", - ccb.ccb_h.status, ccb.cdm.status); - return; - } - - char current_controller_name[33]; - int current_controller = -1; - for(int i=0;ipath_id==-1) break; - Dev->controller = bus_result->path_id; - snprintf(Dev->controller_name, sizeof(Dev->controller_name), "%s%d", - bus_result->dev_name, - bus_result->unit_number); - strncpy(current_controller_name, Dev->controller_name, sizeof(current_controller_name)); - current_controller = Dev->controller; - Dev->controller_bus = bus_result->bus_id; - break; - } - case DEV_MATCH_DEVICE: - { - struct device_match_result* dev_result; - char tmpstr[256]; - - dev_result = &ccb.cdm.matches[i].result.device_result; - if(current_controller==-1||dev_result->target_id==-1) { - skip_device = 1; - break; - } - else skip_device = 0; - - cam_strvis(Dev->vendor, (u_int8_t*)dev_result->inq_data.vendor, - sizeof(dev_result->inq_data.vendor), - sizeof(Dev->vendor)); - cam_strvis(Dev->product, (u_int8_t*)dev_result->inq_data.product, - sizeof(dev_result->inq_data.product), - sizeof(Dev->product)); - cam_strvis(Dev->revision, (u_int8_t*)dev_result->inq_data.revision, - sizeof(dev_result->inq_data.revision), - sizeof(Dev->revision)); - strncpy(Dev->controller_name, current_controller_name, sizeof(Dev->controller_name)); - Dev->controller = current_controller; - Dev->unit = dev_result->target_id; - Dev->lun = dev_result->target_lun; - break; - } - case DEV_MATCH_PERIPH: - { - struct periph_match_result* periph_result; - - periph_result = &ccb.cdm.matches[i].result.periph_result; - - if(skip_device != 0) break; - - if(need_close==1) { - snprintf(Dev->device, sizeof(Dev->device), "%s%d*", - periph_result->periph_name, - periph_result->unit_number); - need_close = 0; - } - else if(need_close==0) { - snprintf(Dev->pass_device, sizeof(Dev->pass_device), "%s%d", - periph_result->periph_name, - periph_result->unit_number); - need_close++; - break; - } - else { - need_close = 0; - } - PrevDev = Dev; - Dev = _AllocNewDevice(); - break; - } - } - } - } while (ccb.ccb_h.status == CAM_REQ_CMP - && ccb.cdm.status == CAM_DEV_MATCH_MORE); - - /* Remove last one (ugly coding) */ - Devices = PrevDev; - delete Dev; -end_loop: - close(fd); -#else /* !CAM */ - /* - * FreeBSD 2.x SCSI management is quiet different and - * unfortunatly not flexible as CAM library in FreeBSD 3.x... - * I probe only the first bus, LUN 0, and the - * first 8 devices only. - */ - u_char* inq_buf; - scsireq_t* scsireq; - struct scsi_addr scsi; - int ssc_fd; - - if((ssc_fd=open("/dev/ssc", O_RDWR))==-1) { - fprintf(stderr, "Cannot open SCSI manager: /dev/ssc\n"); - SCSIReset(); - return; - } - - inq_buf = (u_char*)malloc(96); - if(inq_buf==NULL) { - perror("malloc failed"); - SCSIReset(); - return; - } - - scsireq = scsireq_build((scsireq_t*)dev->dev_ptr, - 96, inq_buf, SCCMD_READ, - "12 0 0 0 v 0", 96); - - addr.scbus = 0; - addr.lun = 0; - - for(int n=0;n<8;n++) { - addr.target = n; - - if(ioctl(ssc_fd, SCIOCADDR, &addr) != -1) { - Dev = _AllocNewDevice(); - Dev->controller = addr.scbus; - Dev->lun = addr.lun; - Dev->unit = addr.target; - - struct scsi_devinfo devInfo; - devInfo.addr = addr; - if(ioctl(ssc_fd, SCIOCGETDEVINFO, &devInfo) != -1) { - strncpy(Dev->device, devInfo.devname, sizeof(Dev->device)); - } - strncpy(Dev->controller_name, "FreeBSD 2.x SCSI Manager", sizeof(Dev->controller_name)); - if(scsireq_enter(ssc_fd, scsireq)!=-1) { - Dev->vendor[sizeof(Dev->vendor)-1] = 0; - Dev->product[sizeof(Dev->product)-1] = 0; - Dev->revision[sizeof(Dev->revision)-1] = 0; - - scsireq_decode(scsireq, "s8 c8 c16 c4", - Dev->vendor, Dev->product, Dev->revision); - } - } - } - free(inq_buf); - close(ssc_fd); -#endif /* !CAM */ - _Build_SCSI_Controller(); - - // Print out the periph with ID:LUNs - fprintf(stderr, "Device RealID FkdID MacID Enabled\n"); - fprintf(stderr, "-------------------------------------------------------------\n"); - // 012345678901234567890123456789012 0:0:0 0/0 0:0 Yes - dev = Devices; - while(dev) { - char tmp[40]; - snprintf(tmp, sizeof(tmp), "%s %s %s", - dev->vendor, - dev->product, - dev->revision); - fprintf(stderr, "%-33s %d:%d:%d %d/%d %d:%d %s\n", - tmp, dev->controller, dev->unit, dev->lun, - dev->faked_unit, dev->lun, - dev->mac_unit, dev->lun, dev->enabled?"Yes":"No"); - dev = dev->next; - } - -no_scsi: - // Reset SCSI bus - SCSIReset(); -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - SCSIDevice* aux; - while(Devices) { - aux = Devices->next; - if(Devices->dev_ptr!=NULL) { -#ifdef CAM - cam_close_device((struct cam_device*)Devices->dev_ptr); -#else /* !CAM */ - free(Devices->dev_ptr); // Is this right? - close(Devices->dev_fd); // And this one? -#endif /* !CAM */ - } - delete Devices; - Devices = aux; - } - nDevices = 0; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - the_cmd_len = cmd_length; - memset(the_cmd, 0, sizeof(the_cmd)); - memcpy(the_cmd, cmd, the_cmd_len); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return (_GetSCSIDeviceByMacID(id)!=NULL&&_GetSCSIDeviceByMacID(id)->enabled); -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - SCSIDevice* dev; - - dev = _GetSCSIDeviceByMacIDLUN(id, lun); - if(dev==NULL) return false; - CurrentDevice = dev; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error) - */ - -static bool try_buffer(int size) -{ - if(size <= buffer_size) { - return true; - } - - D(bug("Allocating buffer of %d bytes.\n", size)); - uint8* new_buffer = (uint8*)valloc(size); - if(new_buffer==NULL) { - return false; - } - if(buffer!=NULL) free(buffer); - buffer = new_buffer; - buffer_size = size; - return true; -} - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - int value = 0; -#ifdef CAM -#ifdef VERBOSE_CAM_DEBUG - D(bug("Sending command %x (len=%d) to SCSI Device %d:%d:%d\n", the_cmd[0], - the_cmd_len, - CurrentDevice->controller, - CurrentDevice->unit, - CurrentDevice->lun)); - D(bug("DataLength: %d\n", data_length)); - D(bug("Reading: %d\n", reading)); - D(bug("SG Size: %d\n", sg_size)); - D(bug("Timeout: %d\n", timeout)); -#endif /* VERBOSE_CAM_DEBUG */ -#endif /* CAM */ - if(!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - if(!reading) { - uint8* buffer_ptr = buffer; - for(int i=0;i0) { - dir_flags = reading?CAM_DIR_IN:CAM_DIR_OUT; - } - - ccb.ccb_h.path_id = CurrentDevice->controller; - ccb.ccb_h.target_id = CurrentDevice->unit; - ccb.ccb_h.target_lun = CurrentDevice->lun; - - cam_fill_csio(&ccb.csio, - 0, - NULL, - dir_flags, - MSG_SIMPLE_Q_TAG, - (u_int8_t*)buffer, - data_length, - SSD_FULL_SIZE, - the_cmd_len, - (timeout?timeout:50)*1000); - - ccb.ccb_h.flags |= CAM_DEV_QFRZDIS; - - memcpy(ccb.csio.cdb_io.cdb_bytes, the_cmd, the_cmd_len); - - if(cam_send_ccb(device, &ccb)<0) { - fprintf(stderr, "%d:%d:%d ", CurrentDevice->controller, - CurrentDevice->unit, CurrentDevice->lun); - perror("cam_send_ccb"); - return false; - } - - value = ccb.ccb_h.status; - *stat = ccb.csio.scsi_status; - - if((value & CAM_STATUS_MASK) != CAM_REQ_CMP) { - char tmp[4096]; - if((value & CAM_STATUS_MASK) == CAM_SCSI_STATUS_ERROR) { - scsi_sense_string(device, &ccb.csio, tmp, sizeof(tmp)); - fprintf(stderr, "SCSI Status Error:\n%s\n", tmp); - return false; - } - } -#else /* !CAM */ - struct scsireq* scsireq = _GetCurrentSCSIDevice(); - if(device==NULL) return false; - - int dir_flags = 0x00; - if(data_length>0) dir_flags = reading?SCCMD_READ:SCCMD_WRITE; - - scsireq_reset(scsireq); - scsireq->timeout = (timeout?timeout:50)*1000; - scsireq_build(scsireq, data_length, - (caddr_t)buffer, dir_flags, - "0"); - memcpy(scsireq->cmd, the_cmd, scsireq->cmdlen = the_cmd_len); - - int result = scsi_enter(dev->dev_fd, scsireq); - if(SCSIREQ_ERROR(result)) { - scsi_debug(stderr, result, scsireq); - } - *stat = scsireq->status; -#endif /* !CAM */ - - if(reading) { - uint8* buffer_ptr = buffer; - for(int i=0;i -#include -#include -#include -#include -#include -#include -#include -#include - -#ifdef CAM -#include -#include -#include -#include -#include -#include -#include -#include -#else /* !CAM */ -#include -#include -#endif /* !CAM */ - -#undef u_int8_t -#define u_int8_t unsigned char - -typedef struct _SCSIDevice { - int controller; // SCSI Controller - int controller_bus; // SCSI Controller Bus - char controller_name[33]; // SCSI Controller name - int mac_unit; // Macintosh SCSI ID (remapped) - int faked_controller; // "Faked" SCSI Controller (Always 0) - int faked_unit; // "Faked" SCSI ID - int unit; // Real SCSI ID - int lun; // Real SCSI LUN - u_int8_t vendor[16]; // SCSI Vendor - u_int8_t product[48]; // SCSI Product - u_int8_t revision[16]; // SCSI Revision - char device[33]; // SCSI Device -#ifdef CAM - char pass_device[33]; // SCSI Pass Device -#else /* !CAM */ - int dev_fd; // Device File Descriptor -#endif /* !CAM */ - void* dev_ptr; // Pointer to CAM/SCSI structure - bool enabled; // Device enabled ? - struct _SCSIDevice* next; // Pointer to the next device -} SCSIDevice; - -static int nDevices = 0; -static SCSIDevice* Devices = NULL; - -inline static SCSIDevice* _GetSCSIDeviceByID(int id) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->faked_unit==id) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByIDLUN(int id, int lun) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->faked_unit==id&&aux->lun==lun) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByMacID(int id) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->mac_unit==id) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _GetSCSIDeviceByMacIDLUN(int id, int lun) -{ - SCSIDevice* aux = Devices; - while(aux) { - if(aux->mac_unit==id&&aux->lun==lun) { - return aux; - } - aux = aux->next; - } - return NULL; -} - -inline static SCSIDevice* _AllocNewDevice() -{ - SCSIDevice* aux; - - aux = new SCSIDevice; - if(aux==NULL) return NULL; - memset(aux, 0, sizeof(SCSIDevice)); - aux->next = Devices; - Devices = aux; - return aux; -} - -/* - * _Build_SCSI_Controller() - * - * This function builds a virtual SCSI Controller (Controller=0) - * where keeps all the devices found, this is due the fact - * I have two SCSI controllers in my PC. :-) - * Use FreeBSD-SCSIDump in contrib/ to see how is remapped your - * SCSI device (only if you have more than one controller, - * that's for sure :-). - */ - -#define GET_FREE_ID(id) \ - { \ - for(int x=0;x<32;x++) { \ - if(!(busyIDs&(1<<(x+1)))) { \ - id = x; \ - break; \ - } \ - } \ - } - -static void _Build_SCSI_Controller() -{ - unsigned int id = 0; - unsigned long long busyIDs = 0x0ll; - SCSIDevice* aux, * dev; - - // What IDs are busy? - dev = Devices; - while(dev) { - dev->enabled = false; - dev->faked_controller = 0; - dev->faked_unit = dev->unit; - busyIDs |= (1 << (dev->unit+1)); - dev = dev->next; - } - - // Find out the duplicate IDs and change them - dev = Devices, aux = NULL; - while(dev) { - aux = dev; - while(aux) { - SCSIDevice* dev1, * dev2; - - dev1 = dev, dev2 = aux; - - if(dev1->controller!=dev2->controller&& - dev1->unit==dev2->unit) { - int free_id; - GET_FREE_ID(free_id); - busyIDs |= (1<<(free_id+1)); - dev1->faked_unit = free_id; - } - aux = aux->next; - } - dev = dev->next; - } - - // Now reorder the queue - dev = Devices; - while(dev) { - aux = dev; - while(aux) { - SCSIDevice* dev1, * dev2; - - dev1 = dev, dev2 = aux; -/* - if(dev1->faked_unit>dev2->faked_unit) { - SCSIDevice tmp; - - memcpy(&tmp, dev1, sizeof(SCSIDevice)); - memcpy(dev1, dev2, sizeof(SCSIDevice)); - memcpy(dev2, &tmp, sizeof(SCSIDevice)); - } - */ - aux = aux->next; - } - dev = dev->next; - } -} - -#define SCSIReset() - -/* - * Initialization - */ - -void SCSIInit(void) -{ - // Find the SCSI hosts in the system - // Filling out the SCSIDevices queue. - // Stolen from camcontrol.c - int bufsize, fd; - int need_close = 0; - int error = 0; - int skip_device = 0; - SCSIDevice* Dev, * dev, * PrevDev = NULL; - - nDevices = 0; - -#ifdef CAM - union ccb ccb; - - if ((fd = open(XPT_DEVICE, O_RDWR)) == -1) { - fprintf(stderr, "Cannot open CAM device: %s\n", XPT_DEVICE); - goto no_scsi; - } - - memset(&(&ccb.ccb_h)[1], 0, sizeof(struct ccb_dev_match)-sizeof(struct ccb_hdr)); - ccb.ccb_h.func_code = XPT_DEV_MATCH; - bufsize = sizeof(struct dev_match_result) * 100; - ccb.cdm.match_buf_len = bufsize; - ccb.cdm.matches = (struct dev_match_result *)malloc(bufsize); - ccb.cdm.num_matches = 0; - - ccb.cdm.num_patterns = 0; - ccb.cdm.pattern_buf_len = 0; - - do { - Dev = _AllocNewDevice(); - if(ioctl(fd, CAMIOCOMMAND, &ccb)==-1) { - fprintf(stderr, "Error sending CAMIOCOMMAND ioctl\n"); - return; - } - - if((ccb.ccb_h.status != CAM_REQ_CMP) - || ((ccb.cdm.status != CAM_DEV_MATCH_LAST) - && (ccb.cdm.status != CAM_DEV_MATCH_MORE))) { - fprintf(stderr, "Got CAM error %#x, CDM error %d\n", - ccb.ccb_h.status, ccb.cdm.status); - return; - } - - char current_controller_name[33]; - int current_controller = -1; - for(int i=0;ipath_id==-1) break; - Dev->controller = bus_result->path_id; - snprintf(Dev->controller_name, sizeof(Dev->controller_name), "%s%d", - bus_result->dev_name, - bus_result->unit_number); - strncpy(current_controller_name, Dev->controller_name, sizeof(current_controller_name)); - current_controller = Dev->controller; - Dev->controller_bus = bus_result->bus_id; - break; - } - case DEV_MATCH_DEVICE: - { - struct device_match_result* dev_result; - char tmpstr[256]; - - dev_result = &ccb.cdm.matches[i].result.device_result; - if(current_controller==-1||dev_result->target_id==-1) { - skip_device = 1; - break; - } - else skip_device = 0; - - cam_strvis(Dev->vendor, (u_int8_t*)dev_result->inq_data.vendor, - sizeof(dev_result->inq_data.vendor), - sizeof(Dev->vendor)); - cam_strvis(Dev->product, (u_int8_t*)dev_result->inq_data.product, - sizeof(dev_result->inq_data.product), - sizeof(Dev->product)); - cam_strvis(Dev->revision, (u_int8_t*)dev_result->inq_data.revision, - sizeof(dev_result->inq_data.revision), - sizeof(Dev->revision)); - strncpy(Dev->controller_name, current_controller_name, sizeof(Dev->controller_name)); - Dev->controller = current_controller; - Dev->unit = dev_result->target_id; - Dev->lun = dev_result->target_lun; - break; - } - case DEV_MATCH_PERIPH: - { - struct periph_match_result* periph_result; - - periph_result = &ccb.cdm.matches[i].result.periph_result; - - if(skip_device != 0) break; - - if(need_close==1) { - snprintf(Dev->device, sizeof(Dev->device), "%s%d*", - periph_result->periph_name, - periph_result->unit_number); - need_close = 0; - } - else if(need_close==0) { - snprintf(Dev->pass_device, sizeof(Dev->pass_device), "%s%d", - periph_result->periph_name, - periph_result->unit_number); - need_close++; - break; - } - else { - need_close = 0; - } - PrevDev = Dev; - Dev = _AllocNewDevice(); - break; - } - } - } - } while (ccb.ccb_h.status == CAM_REQ_CMP - && ccb.cdm.status == CAM_DEV_MATCH_MORE); - - /* Remove last one (ugly coding) */ - Devices = PrevDev; - delete Dev; -end_loop: - close(fd); -#else /* !CAM */ - /* - * FreeBSD 2.x SCSI management is quiet different and - * unfortunatly not flexible as CAM library in FreeBSD 3.x... - * I only scan for the first bus, LUN 0, and the - * first 8 devices only. - */ - u_char* inq_buf; - scsireq_t* scsireq; - struct scsi_addr scsi; - int ssc_fd; - - if((ssc_fd=open("/dev/ssc", O_RDWR))==-1) { - fprintf(stderr, "Cannot open SCSI manager: /dev/ssc\n"); - SCSIReset(); - return; - } - - inq_buf = (u_char*)malloc(96); - if(inq_buf==NULL) { - perror("malloc failed"); - SCSIReset(); - return; - } - - scsireq = scsireq_build((scsireq_t*)dev->dev_ptr, - 96, inq_buf, SCCMD_READ, - "12 0 0 0 v 0", 96); - - addr.scbus = 0; - addr.lun = 0; - - for(int n=0;n<8;n++) { - addr.target = n; - - if(ioctl(ssc_fd, SCIOCADDR, &addr) != -1) { - Dev = _AllocNewDevice(); - Dev->controller = addr.scbus; - Dev->lun = addr.lun; - Dev->unit = addr.target; - - struct scsi_devinfo devInfo; - devInfo.addr = addr; - if(ioctl(ssc_fd, SCIOCGETDEVINFO, &devInfo) != -1) { - strncpy(Dev->device, devInfo.devname, sizeof(Dev->device)); - } - strncpy(Dev->controller_name, "FreeBSD 2.x SCSI Manager", sizeof(Dev->controller_name)); - if(scsireq_enter(ssc_fd, scsireq)!=-1) { - Dev->vendor[sizeof(Dev->vendor)-1] = 0; - Dev->product[sizeof(Dev->product)-1] = 0; - Dev->revision[sizeof(Dev->revision)-1] = 0; - - scsireq_decode(scsireq, "s8 c8 c16 c4", - Dev->vendor, Dev->product, Dev->revision); - } - } - } - free(inq_buf); - close(ssc_fd); -#endif /* !CAM */ - _Build_SCSI_Controller(); - - // Print out the periph with ID:LUNs - fprintf(stderr, "Device RealID FkdID\n"); - fprintf(stderr, "----------------------------------------------\n"); - // 012345678901234567890123456789012 0:0:0 0/0 - dev = Devices; - while(dev) { - char tmp[40]; - snprintf(tmp, sizeof(tmp), "%s %s %s", - dev->vendor, - dev->product, - dev->revision); - fprintf(stderr, "%-33s %d:%d:%d %d/%d\n", - tmp, dev->controller, dev->unit, dev->lun, - dev->faked_unit, dev->lun); - dev = dev->next; - } - -no_scsi: - // Reset SCSI bus - SCSIReset(); -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - SCSIDevice* aux; - while(Devices) { - aux = Devices->next; - if(Devices->dev_ptr!=NULL) { -#ifdef CAM - cam_close_device((struct cam_device*)Devices->dev_ptr); -#else /* !CAM */ - free(Devices->dev_ptr); // Is this right? - close(Devices->dev_fd); // And this one? -#endif /* !CAM */ - } - delete Devices; - Devices = aux; - } - nDevices = 0; -} - -int main() -{ - SCSIInit(); - SCSIExit(); - return 0; -} diff --git a/BasiliskII/src/Unix/Irix/README.networking b/BasiliskII/src/Unix/Irix/README.networking deleted file mode 100644 index f6145a71b..000000000 --- a/BasiliskII/src/Unix/Irix/README.networking +++ /dev/null @@ -1,110 +0,0 @@ -README file for networking under IRIX -by Brian J. Johnson 7/23/2002 -version 1.0 -================================================== - -BasiliskII does not currently support networking natively on IRIX. -That is, the emulated Ethernet card does not do anything. There's no -reason one couldn't use raw domain sockets and the snoop(7p) facility -to do networking, but so far no one has written the required glue -code. - -However, it is possible to do TCP/IP networking with BasiliskII on -IRIX via PPP, by connecting an emulated serial port to the IRIX PPP -daemon. Here are the steps to set it up: - - -Set up PPP on IRIX ------------------- - -You need root privileges to do this. - -First, make sure you have eoe.sw.ppp and eoe.sw.uucp installed: - - IRIS# versions eoe.sw.ppp eoe.sw.uucp - I = Installed, R = Removed - - Name Date Description - - I eoe 07/22/2002 IRIX Execution Environment, 6.5.17m - I eoe.sw 07/22/2002 IRIX Execution Environment Software - I eoe.sw.ppp 07/22/2002 Point-to-Point Protocol Software - I eoe.sw.uucp 07/22/2002 UUCP Utilities - -If they aren't installed, install them from your distribution CDs. - -Next, pick IP addresses for the IRIX and MacOS sides of the PPP -connection. You may want to ask your local network administrator -about this, but any two unused addresses on your local subnet should -work. - -Edit /etc/ppp.conf and add these three lines: - -_NET_INCOMING - remotehost= - localhost= - -(Replace the angle brackets and the text in them with the appropriate -IP addresses.) - -Next, make a script to set up the environment properly when invoking -pppd from BasiliskII. You can name this whatever you want; I chose -/usr/etc/ppp-b2: - -IRIS# whoami -root -IRIS# cat < /usr/etc/ppp-b2 -#!/bin/sh -export USER=_NET_INCOMING -exec /usr/etc/ppp "$@" -IRIS# chmod 4775 /usr/etc/ppp-b2 - -Rewrite this in perl or python or C or whatever if you don't like -setuid shell scripts. The alternative is to run BasiliskII as root: -pppd _must_ be run as root. - - -Configure BasiliskII to start the PPP daemon --------------------------------------------- - -Start up BasiliskII, and in the serial devices tab, enter: - - |exec /usr/etc/ppp-b2 - -Supply the name you used for the script you created. Be sure to -include the leading pipe symbol ("|"). - -The "exec" causes your PPP startup script to replace the shell -BasiliskII runs to interpret the command. It's not strictly -necessary, but cuts down on the number of extra processes hanging -about. - - -Install a PPP client on MacOS ------------------------------ - -The details of this step will vary depending on your PPP client -software. Set it up for a "direct" connection, with no modem chatting -or login scripting. For instance, with FreePPP I set the "Connect:" -item on the "Edit..." screen under the "Accounts" tab to "Directly". -Be sure to select the correct serial port. The serial port speed -shouldn't matter (BasiliskII ignores it), but I set it to 115200 bps. - -Next, configure MacOS's TCP/IP stack. If you're using Open Transport, -Open the TCP/IP control panel and select "Using PPP Server" under the -"Configure" item. Copy IRIX's DNS client info. from /etc/resolv.conf -to the control panel: the addresses from the "nameserver" lines go in -the "Name server addr.:" box, and the domains from the "search" lines -go in the "Search domains:" box. The steps should be similar for -MacTCP. - -Now fire up PPP. Your PPP client should establish communication with -the IRIX PPP daemon, and you're off and running. - - -Disclaimer ----------- - -I haven't tried this procedure from scratch on a freshly installed -system, so I might have missed a step somewhere. But it should get -you close.... diff --git a/BasiliskII/src/Unix/Irix/audio_irix.cpp b/BasiliskII/src/Unix/Irix/audio_irix.cpp deleted file mode 100644 index ebd8eb69e..000000000 --- a/BasiliskII/src/Unix/Irix/audio_irix.cpp +++ /dev/null @@ -1,680 +0,0 @@ -/* - * audio_irix.cpp - Audio support, SGI Irix implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// The currently selected audio parameters (indices in audio_sample_rates[] -// etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Global variables -static int audio_fd = -1; // fd from audio library -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static bool sem_inited = false; // Flag: audio_irq_done_sem initialized -static int sound_buffer_size; // Size of sound buffer in bytes -static int sound_buffer_fill_point; // Fill buffer when this many frames are empty -static uint8 silence_byte = 0; // Byte value to use to fill sound buffers with silence -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; // Flag: streaming thread installed -static volatile bool stream_thread_cancel = false; // Flag: cancel streaming thread - -static bool current_main_mute = false; // Flag: output muted -static bool current_speaker_mute = false; // Flag: speaker muted -static uint32 current_main_volume = 0; // Output volume -static uint32 current_speaker_volume = 0; // Speaker volume - -// IRIX libaudio control structures -static ALconfig config; -static ALport port; - - -// Prototypes -static void *stream_func(void *arg); -static uint32 read_volume(void); -static bool read_mute(void); -static void set_mute(bool mute); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; -} - -bool open_audio(void) -{ - ALpv pv[2]; - - printf("Using libaudio audio output\n"); - - // Get supported sample formats - - if (audio_sample_sizes.empty()) { - // All sample sizes are supported - audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - - // Assume at least two channels are supported. Some IRIX boxes - // can do 4 or more... MacOS only handles up to 2. - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - if (audio_sample_sizes.empty() || audio_channel_counts.empty()) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - alClosePort(port); - audio_fd = -1; - return false; - } - - audio_sample_rates.push_back( 8000 << 16); - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Set the sample format - - D(bug("Size %d, channels %d, rate %d\n", - audio_sample_sizes[audio_sample_size_index], - audio_channel_counts[audio_channel_count_index], - audio_sample_rates[audio_sample_rate_index] >> 16)); - config = alNewConfig(); - alSetSampFmt(config, AL_SAMPFMT_TWOSCOMP); - if (audio_sample_sizes[audio_sample_size_index] == 8) { - alSetWidth(config, AL_SAMPLE_8); - } - else { - alSetWidth(config, AL_SAMPLE_16); - } - alSetChannels(config, audio_channel_counts[audio_channel_count_index]); - alSetDevice(config, AL_DEFAULT_OUTPUT); // Allow selecting via prefs? - - // Try to open the audio library - - port = alOpenPort("BasiliskII", "w", config); - if (port == NULL) { - fprintf(stderr, "ERROR: Cannot open audio port: %s\n", - alGetErrorString(oserror())); - WarningAlert(GetString(STR_NO_AUDIO_WARN)); - return false; - } - - // Set the sample rate - - pv[0].param = AL_RATE; - pv[0].value.ll = alDoubleToFixed(audio_sample_rates[audio_sample_rate_index] >> 16); - pv[1].param = AL_MASTER_CLOCK; - pv[1].value.i = AL_CRYSTAL_MCLK_TYPE; - if (alSetParams(AL_DEFAULT_OUTPUT, pv, 2) < 0) { - fprintf(stderr, "ERROR: libaudio setparams failed: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - - // Compute sound buffer size and libaudio refill point - - config = alGetConfig(port); - audio_frames_per_block = alGetQueueSize(config); - if (audio_frames_per_block < 0) { - fprintf(stderr, "ERROR: couldn't get queue size: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - D(bug("alGetQueueSize %d, width %d, channels %d\n", - audio_frames_per_block, - alGetWidth(config), - alGetChannels(config))); - - // Put a limit on the Mac sound buffer size, to decrease delay -#define AUDIO_BUFFER_MSEC 50 // milliseconds of sound to buffer - int target_frames_per_block = - (audio_sample_rates[audio_sample_rate_index] >> 16) * - AUDIO_BUFFER_MSEC / 1000; - if (audio_frames_per_block > target_frames_per_block) - audio_frames_per_block = target_frames_per_block; - D(bug("frames per block %d\n", audio_frames_per_block)); - - alZeroFrames(port, audio_frames_per_block); // so we don't underflow - - // Try to keep the buffer pretty full - sound_buffer_fill_point = alGetQueueSize(config) - - 2 * audio_frames_per_block; - if (sound_buffer_fill_point < 0) - sound_buffer_fill_point = alGetQueueSize(config) / 3; - D(bug("fill point %d\n", sound_buffer_fill_point)); - - sound_buffer_size = (audio_sample_sizes[audio_sample_size_index] >> 3) * - audio_channel_counts[audio_channel_count_index] * - audio_frames_per_block; - set_audio_status_format(); - - // Get a file descriptor we can select() on - - audio_fd = alGetFD(port); - if (audio_fd < 0) { - fprintf(stderr, "ERROR: couldn't get libaudio file descriptor: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - - // Initialize volume, mute settings - current_main_volume = current_speaker_volume = read_volume(); - current_main_mute = current_speaker_mute = read_mute(); - - - // Start streaming thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything went fine - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Init audio status (reasonable defaults) and feature flags - AudioStatus.sample_rate = 44100 << 16; - AudioStatus.sample_size = 16; - AudioStatus.channels = 2; - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - sem_inited = true; - - // Open and initialize audio device - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - // Stop stream and delete semaphore - if (stream_thread_active) { - stream_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(stream_thread); -#endif - pthread_join(stream_thread, NULL); - stream_thread_active = false; - stream_thread_cancel = false; - } - - // Close audio library - alClosePort(port); - - audio_open = false; -} - -void AudioExit(void) -{ - // Close audio device - close_audio(); - - // Delete semaphore - if (sem_inited) { - sem_destroy(&audio_irq_done_sem); - sem_inited = false; - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Streaming function - */ - -static void *stream_func(void *arg) -{ - int32 *last_buffer = new int32[sound_buffer_size / 4]; - fd_set audio_fdset; - int numfds, was_error; - - numfds = audio_fd + 1; - FD_ZERO(&audio_fdset); - - while (!stream_thread_cancel) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (!current_main_mute && - !current_speaker_mute && - apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to audio library. Convert 8-bit data - // unsigned->signed, using same algorithm as audio_amiga.cpp. - // It works fine for 8-bit mono, but not stereo. - if (AudioStatus.sample_size == 8) { - uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - uint32 *q = (uint32 *)last_buffer; - int r = work_size >> 2; - // XXX not quite right.... - while (r--) - *q++ = *p++ ^ 0x80808080; - if (work_size != sound_buffer_size) - memset((uint8 *)last_buffer + work_size, silence_byte, sound_buffer_size - work_size); - alWriteFrames(port, last_buffer, audio_frames_per_block); - } - else if (work_size == sound_buffer_size) - alWriteFrames(port, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), audio_frames_per_block); - else { - // Last buffer - Mac2Host_memcpy(last_buffer, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - memset((uint8 *)last_buffer + work_size, silence_byte, sound_buffer_size - work_size); - alWriteFrames(port, last_buffer, audio_frames_per_block); - } - D(bug("stream: data written\n")); - } else - goto silence; - - } else { - - // Audio not active, play silence - silence: // D(bug("stream: silence\n")); - alZeroFrames(port, audio_frames_per_block); - } - - // Wait for fill point to be reached (may be immediate) - - if (alSetFillPoint(port, sound_buffer_fill_point) < 0) { - fprintf(stderr, "ERROR: alSetFillPoint failed: %s\n", - alGetErrorString(oserror())); - // Should stop the audio here.... - } - - do { - errno = 0; - FD_SET(audio_fd, &audio_fdset); - was_error = select(numfds, NULL, &audio_fdset, NULL, NULL); - } while(was_error < 0 && (errno == EINTR)); - if (was_error < 0) { - fprintf(stderr, "ERROR: select returned %d, errno %d\n", - was_error, errno); - // Should stop audio here.... - } - } - delete[] last_buffer; - return NULL; -} - - -/* - * Read or set the current output volume using the audio library - */ - -static uint32 read_volume(void) -{ - ALpv x[2]; - ALfixed gain[8]; - double maxgain, mingain; - ALparamInfo pi; - uint32 ret = 0x01000100; // default, maximum value - int dev = alGetDevice(config); - - // Fetch the maximum and minimum gain settings - - alGetParamInfo(dev, AL_GAIN, &pi); - maxgain = alFixedToDouble(pi.max.ll); - mingain = alFixedToDouble(pi.min.ll); -// printf("maxgain = %lf dB, mingain = %lf dB\n", maxgain, mingain); - - // Get the current gain values - - x[0].param = AL_GAIN; - x[0].value.ptr = gain; - x[0].sizeIn = sizeof(gain) / sizeof(gain[0]); - x[1].param = AL_CHANNELS; - if (alGetParams(dev, x, 2) < 0) { - printf("alGetParams failed: %s\n", alGetErrorString(oserror())); - } - else { - if (x[0].sizeOut < 0) { - printf("AL_GAIN was an unrecognized parameter\n"); - } - else { - double v; - uint32 left, right; - - // Left - v = alFixedToDouble(gain[0]); - if (v < mingain) - v = mingain; // handle gain == -inf - v = (v - mingain) / (maxgain - mingain); // scale to 0..1 - left = (uint32)(v * (double)256); // convert to 8.8 fixed point - - // Right - if (x[0].sizeOut <= 1) { // handle a mono interface - right = left; - } - else { - v = alFixedToDouble(gain[1]); - if (v < mingain) - v = mingain; // handle gain == -inf - v = (v - mingain) / (maxgain - mingain); // scale to 0..1 - right = (uint32)(v * (double)256); // convert to 8.8 fixed point - } - - ret = (left << 16) | right; - } - } - - return ret; -} - -static void set_volume(uint32 vol) -{ - ALpv x[1]; - ALfixed gain[2]; // left and right - double maxgain, mingain; - ALparamInfo pi; - int dev = alGetDevice(config); - - // Fetch the maximum and minimum gain settings - - alGetParamInfo(dev, AL_GAIN, &pi); - maxgain = alFixedToDouble(pi.max.ll); - mingain = alFixedToDouble(pi.min.ll); - - // Set the new gain values - - x[0].param = AL_GAIN; - x[0].value.ptr = gain; - x[0].sizeIn = sizeof(gain) / sizeof(gain[0]); - - uint32 left = vol >> 16; - uint32 right = vol & 0xffff; - double lv, rv; - - if (left == 0 && pi.specialVals & AL_NEG_INFINITY_BIT) { - lv = AL_NEG_INFINITY; - } - else { - lv = ((double)left / 256) * (maxgain - mingain) + mingain; - } - - if (right == 0 && pi.specialVals & AL_NEG_INFINITY_BIT) { - rv = AL_NEG_INFINITY; - } - else { - rv = ((double)right / 256) * (maxgain - mingain) + mingain; - } - - D(bug("set_volume: left=%lf dB, right=%lf dB\n", lv, rv)); - - gain[0] = alDoubleToFixed(lv); - gain[1] = alDoubleToFixed(rv); - - if (alSetParams(dev, x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - } -} - - -/* - * Read or set the mute setting using the audio library - */ - -static bool read_mute(void) -{ - bool ret; - int dev = alGetDevice(config); - ALpv x; - x.param = AL_MUTE; - - if (alGetParams(dev, &x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - return current_main_mute; // Or just return false? - } - - ret = x.value.i; - - D(bug("read_mute: mute=%d\n", ret)); - return ret; -} - -static void set_mute(bool mute) -{ - D(bug("set_mute: mute=%ld\n", mute)); - - int dev = alGetDevice(config); - ALpv x; - x.param = AL_MUTE; - x.value.i = mute; - - if (alSetParams(dev, &x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - } -} - - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - sem_post(&audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. vectors - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - close_audio(); - audio_sample_rate_index = index; - return open_audio(); -} - -bool audio_set_sample_size(int index) -{ - close_audio(); - audio_sample_size_index = index; - return open_audio(); -} - -bool audio_set_channels(int index) -{ - close_audio(); - audio_channel_count_index = index; - return open_audio(); -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - D(bug("audio_get_main_mute: mute=%ld\n", current_main_mute)); - - return current_main_mute; -} - -uint32 audio_get_main_volume(void) -{ - uint32 ret = current_main_volume; - - D(bug("audio_get_main_volume: vol=0x%x\n", ret)); - - return ret; -} - -bool audio_get_speaker_mute(void) -{ - D(bug("audio_get_speaker_mute: mute=%ld\n", current_speaker_mute)); - - return current_speaker_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - uint32 ret = current_speaker_volume; - - D(bug("audio_get_speaker_volume: vol=0x%x\n", ret)); - - return ret; -} - -void audio_set_main_mute(bool mute) -{ - D(bug("audio_set_main_mute: mute=%ld\n", mute)); - - if (mute != current_main_mute) { - current_main_mute = mute; - } - - set_mute(current_main_mute); -} - -void audio_set_main_volume(uint32 vol) -{ - - D(bug("audio_set_main_volume: vol=%x\n", vol)); - - current_main_volume = vol; - - set_volume(vol); -} - -void audio_set_speaker_mute(bool mute) -{ - D(bug("audio_set_speaker_mute: mute=%ld\n", mute)); - - if (mute != current_speaker_mute) { - current_speaker_mute = mute; - } - - set_mute(current_speaker_mute); -} - -void audio_set_speaker_volume(uint32 vol) -{ - D(bug("audio_set_speaker_volume: vol=%x\n", vol)); - - current_speaker_volume = vol; - - set_volume(vol); -} diff --git a/BasiliskII/src/Unix/Irix/unaligned.c b/BasiliskII/src/Unix/Irix/unaligned.c deleted file mode 100644 index 9f4befb8f..000000000 --- a/BasiliskII/src/Unix/Irix/unaligned.c +++ /dev/null @@ -1,44 +0,0 @@ -/* - * Irix/unaligned.c - Optimized unaligned access for Irix - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 - */ - -#ifdef sgi -#include "sysdeps.h" - -/* Tell the compiler to pack data on 1-byte boundaries - * (i.e. arbitrary alignment). Requires SGI MIPSPro compilers. */ -#pragma pack(1) - -typedef struct _ual32 { - uae_u32 v; -} ual32_t; - -typedef struct _ual16 { - uae_u16 v; -} ual16_t; - -#pragma pack(0) - -/* The compiler is smart enough to inline these when you build with "-ipa" */ -uae_u32 do_get_mem_long(uae_u32 *a) {return ((ual32_t *)a)->v;} -uae_u32 do_get_mem_word(uae_u16 *a) {return ((ual16_t *)a)->v;} -void do_put_mem_long(uae_u32 *a, uae_u32 v) {((ual32_t *)a)->v = v;} -void do_put_mem_word(uae_u16 *a, uae_u32 v) {((ual16_t *)a)->v = v;} - -#endif /* sgi */ diff --git a/BasiliskII/src/Unix/Linux/NetDriver/Makefile b/BasiliskII/src/Unix/Linux/NetDriver/Makefile deleted file mode 100644 index 50a1d238d..000000000 --- a/BasiliskII/src/Unix/Linux/NetDriver/Makefile +++ /dev/null @@ -1,53 +0,0 @@ -# Linux makefile for sheep_net driver -KERNEL_DIR = /lib/modules/$(shell uname -r) -KERNEL_SOURCE = $(KERNEL_DIR)/build -LV := $(shell test -f $(KERNEL_SOURCE)/Rules.make && echo 24 || echo 26) -MP := $(shell test -f $(KERNEL_SOURCE)/Rules.make && echo "o" || echo "ko") - -ifeq ($(LV),26) -# Kernel 2.6 - -KERNEL_DRIVER = $(KERNEL_DIR)/kernel/drivers -obj-m = sheep_net.o - -sheep_net.ko: sheep_net.c - $(MAKE) -C $(KERNEL_SOURCE) M=$$PWD modules - -clean: - $(MAKE) -C $(KERNEL_SOURCE) M=$$PWD clean - -else -# Kernel 2.4 - -## System specific configuration -CPPFLAGS = -I. -I$(KERNEL_SOURCE)/include -CFLAGS = -O2 -Wall -D__KERNEL__ -DMODULE -D_LOOSE_KERNEL_NAMES -ASFLAGS = -LDFLAGS = -LIBS = - -## Files -KERNEL_DRIVER = $(KERNEL_DIR) -OBJS = sheep_net.o - -## Rules -sheep_net.o: sheep_net.c - $(CC) -c $(CPPFLAGS) $(CFLAGS) sheep_net.c - -clean: - -rm $(OBJS) - -dep depend: - makedepend $(CPPFLAGS) -Y *.c - -endif - -dev: - mknod /dev/sheep_net c 10 198 - -install: sheep_net.$(MP) - install -d $(KERNEL_DRIVER)/misc - install -m 644 sheep_net.$(MP) $(KERNEL_DRIVER)/misc - depmod -a - -# DO NOT DELETE diff --git a/BasiliskII/src/Unix/Linux/NetDriver/config.h b/BasiliskII/src/Unix/Linux/NetDriver/config.h deleted file mode 120000 index fc383f113..000000000 --- a/BasiliskII/src/Unix/Linux/NetDriver/config.h +++ /dev/null @@ -1 +0,0 @@ -../../../../../SheepShaver/src/Unix/config.h \ No newline at end of file diff --git a/BasiliskII/src/Unix/Linux/NetDriver/sheep_net.c b/BasiliskII/src/Unix/Linux/NetDriver/sheep_net.c deleted file mode 100644 index b02153f0c..000000000 --- a/BasiliskII/src/Unix/Linux/NetDriver/sheep_net.c +++ /dev/null @@ -1,770 +0,0 @@ -/* - * sheep_net.c - Linux driver for SheepShaver/Basilisk II networking (access to raw Ethernet packets) - * - * sheep_net (C) 1999-2004 Mar"c" Hellwig and Christian Bauer - * - * 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 - */ -/* modversions.h redefines kernel symbols. Now include other headers */ -#include -#include -#include -#include - -#if LINUX_VERSION_CODE >= KERNEL_VERSION(3,15,0) -#define LINUX_3_15 -#endif - -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,35) -#define LINUX_26_35 -#endif - -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,36) -#define LINUX_26_36 -#endif - -/* Compatibility glue */ -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,30) -#define LINUX_26_30 - -#else - -/* determine whether to use checksummed versions of kernel symbols */ -/*** -#include -***/ -#include "config.h" -#include - -#if defined(CONFIG_MODVERSIONS) && !defined(MODVERSIONS) -#define MODVERSIONS -#endif - -#if defined(MODVERSIONS) -#include -#endif - -#endif - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -MODULE_AUTHOR("Christian Bauer"); -MODULE_DESCRIPTION("Pseudo ethernet device for emulators"); - -/* Compatibility glue */ -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0) -#define LINUX_26 -#endif -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0) -#define LINUX_24 -#else -#define net_device device -typedef struct wait_queue *wait_queue_head_t; -#define init_waitqueue_head(x) *(x)=NULL -#endif -#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,9) -#define eth_hdr(skb) (skb)->mac.ethernet -#define skb_mac_header(skb) (skb)->mac.raw -#define ipip_hdr(skb) (skb)->h.ipiph -#endif - -#ifdef LINUX_26 -#define skt_set_dead(skt) do {} while(0) -#define wmem_alloc sk_wmem_alloc -#else -#define skt_set_dead(skt) (skt)->dead = 1 -#endif - -#define DEBUG 0 - -#define bug printk -#if DEBUG -#define D(x) (x); -#else -#define D(x) ; -#endif - - -/* Constants */ -#define SHEEP_NET_MINOR 198 /* Driver minor number */ -#define MAX_QUEUE 32 /* Maximum number of packets in queue */ -#define PROT_MAGIC 1520 /* Our "magic" protocol type */ - -#define ETH_ADDR_MULTICAST 0x1 -#define ETH_ADDR_LOCALLY_DEFINED 0x02 - -#define SIOC_MOL_GET_IPFILTER SIOCDEVPRIVATE -#define SIOC_MOL_SET_IPFILTER (SIOCDEVPRIVATE + 1) - -/* Prototypes */ -static int sheep_net_open(struct inode *inode, struct file *f); -static int sheep_net_release(struct inode *inode, struct file *f); -static ssize_t sheep_net_read(struct file *f, char *buf, size_t count, loff_t *off); -static ssize_t sheep_net_write(struct file *f, const char *buf, size_t count, loff_t *off); -static unsigned int sheep_net_poll(struct file *f, struct poll_table_struct *wait); -#ifdef LINUX_26_36 -static long sheep_net_ioctl(struct file *f, unsigned int code, unsigned long arg); -#else -static int sheep_net_ioctl(struct inode *inode, struct file *f, unsigned int code, unsigned long arg); -#endif -#ifdef LINUX_26 -static int sheep_net_receiver(struct sk_buff *skb, struct net_device *dev, struct packet_type *pt, struct net_device *foo); -#else -static int sheep_net_receiver(struct sk_buff *skb, struct net_device *dev, struct packet_type *pt); -#endif - -/* - * Driver private variables - */ - -struct SheepVars { - /* IMPORTANT: the packet_type struct must go first. It no longer - (2.6) contains * a data field so we typecast to get the SheepVars - struct */ - struct packet_type pt; /* Receiver packet type */ - struct net_device *ether; /* The Ethernet device we're attached to */ - struct sock *skt; /* Socket for communication with Ethernet card */ - struct sk_buff_head queue; /* Receiver packet queue */ - wait_queue_head_t wait; /* Wait queue for blocking read operations */ - u32 ipfilter; /* Only receive IP packets destined for this address (host byte order) */ - char eth_addr[6]; /* Hardware address of the Ethernet card */ - char fake_addr[6]; /* Local faked hardware address (what SheepShaver sees) */ -#ifdef LINUX_3_15 - atomic_t got_packet; -#endif -}; - - -/* - * file_operations structure - has function pointers to the - * various entry points for device operations - */ - -static struct file_operations sheep_net_fops = { - .owner = THIS_MODULE, - .read = sheep_net_read, - .write = sheep_net_write, - .poll = sheep_net_poll, -#ifdef LINUX_26_36 - .unlocked_ioctl = sheep_net_ioctl, -#else - .ioctl = sheep_net_ioctl, -#endif - .open = sheep_net_open, - .release = sheep_net_release, -}; - - -/* - * miscdevice structure for driver initialization - */ - -static struct miscdevice sheep_net_device = { - .minor = SHEEP_NET_MINOR, /* minor number */ - .name = "sheep_net", /* name */ - .fops = &sheep_net_fops -}; - - -/* - * fake protocol to use a common socket - */ -static struct proto sheep_proto = { - .name = "SHEEP", - .owner = THIS_MODULE, - .obj_size = sizeof(struct sock), -}; - - -/* - * Initialize module - */ - -int init_module(void) -{ - int ret; - - /* Register driver */ - ret = misc_register(&sheep_net_device); - D(bug("Sheep net driver installed\n")); - return ret; -} - - -/* - * Deinitialize module - */ - -void cleanup_module(void) -{ - /* Unregister driver */ - misc_deregister(&sheep_net_device); - D(bug("Sheep net driver removed\n")); -} - - -/* - * Driver open() function - */ - -static int sheep_net_open(struct inode *inode, struct file *f) -{ - struct SheepVars *v; - D(bug("sheep_net: open\n")); - - /* Must be opened with read permissions */ - if ((f->f_flags & O_ACCMODE) == O_WRONLY) - return -EPERM; - - /* Allocate private variables */ - v = (struct SheepVars *)kmalloc(sizeof(struct SheepVars), GFP_USER); - if (v == NULL) - return -ENOMEM; - -#ifndef LINUX_26_30 - lock_kernel(); -#endif - memset(v, 0, sizeof(struct SheepVars)); - skb_queue_head_init(&v->queue); - init_waitqueue_head(&v->wait); - v->fake_addr[0] = 'v'; /* "SheepShaver" */ - v->fake_addr[1] = 'r'; /* ^ ^ */ - get_random_bytes(&v->fake_addr[2], 4); - - /* Put our stuff where we will be able to find it later */ - f->private_data = (void *)v; - - /* Yes, we're open */ -#ifndef LINUX_26 - MOD_INC_USE_COUNT; -#endif -#ifndef LINUX_26_30 - unlock_kernel(); -#endif - return 0; -} - - -/* - * Driver release() function - */ - -static int sheep_net_release(struct inode *inode, struct file *f) -{ - struct SheepVars *v = (struct SheepVars *)f->private_data; - struct sk_buff *skb; - D(bug("sheep_net: close\n")); - - /* Detach from Ethernet card */ - if (v->ether) { - dev_remove_pack(&v->pt); - sk_free(v->skt); - v->skt = NULL; -#ifdef LINUX_24 - dev_put( v->ether ); -#endif - v->ether = NULL; - } - - /* Empty packet queue */ - while ((skb = skb_dequeue(&v->queue)) != NULL) - dev_kfree_skb(skb); - - /* Free private variables */ - kfree(v); - - /* Sorry, we're closed */ -#ifndef LINUX_26 - MOD_DEC_USE_COUNT; -#endif - return 0; -} - - -/* - * Check whether an Ethernet address is the local (attached) one or - * the fake one - */ - -static inline int is_local_addr(struct SheepVars *v, void *a) -{ - return memcmp(a, v->eth_addr, 6) == 0; -} - -static inline int is_fake_addr(struct SheepVars *v, void *a) -{ - return memcmp(a, v->fake_addr, 6) == 0; -} - - -/* - * Outgoing packet. Replace the fake enet addr with the real local one. - */ - -static inline void do_demasq(struct SheepVars *v, u8 *p) -{ - memcpy(p, v->eth_addr, 6); -} - -static void demasquerade(struct SheepVars *v, struct sk_buff *skb) -{ - u8 *p = skb_mac_header(skb); - int proto = (p[12] << 8) | p[13]; - - do_demasq(v, p + 6); /* source address */ - - /* Need to fix ARP packets */ - if (proto == ETH_P_ARP) { - if (is_fake_addr(v, p + 14 + 8)) /* sender HW-addr */ - do_demasq(v, p + 14 + 8); - } - - /* ...and AARPs (snap code: 0x00,0x00,0x00,0x80,0xF3) */ - if (p[17] == 0 && p[18] == 0 && p[19] == 0 && p[20] == 0x80 && p[21] == 0xf3) { - /* XXX: we should perhaps look for the 802 frame too */ - if (is_fake_addr(v, p + 30)) - do_demasq(v, p + 30); /* sender HW-addr */ - } -} - - -/* - * Incoming packet. Replace the local enet addr with the fake one. - */ - -static inline void do_masq(struct SheepVars *v, u8 *p) -{ - memcpy(p, v->fake_addr, 6); -} - -static void masquerade(struct SheepVars *v, struct sk_buff *skb) -{ - u8 *p = skb_mac_header(skb); - if (!(p[0] & ETH_ADDR_MULTICAST)) - do_masq(v, p); /* destination address */ - - /* XXX: reverse ARP might need to be fixed */ -} - - -/* - * Driver read() function - */ - -static ssize_t sheep_net_read(struct file *f, char *buf, size_t count, loff_t *off) -{ - struct SheepVars *v = (struct SheepVars *)f->private_data; - struct sk_buff *skb; - - D(bug("sheep_net: read\n")); - - for (;;) { - - /* Get next packet from queue */ - skb = skb_dequeue(&v->queue); - if (skb != NULL || (f->f_flags & O_NONBLOCK)) - break; - - /* No packet in queue and in blocking mode, so block */ -#ifdef LINUX_3_15 - atomic_set(&v->got_packet, 0); - wait_event_interruptible(v->wait, atomic_read(&v->got_packet)); -#else - interruptible_sleep_on(&v->wait); -#endif - - /* Signal received? Then bail out */ - if (signal_pending(current)) - return -EINTR; - } - if (skb == NULL) - return -EAGAIN; - - /* Pass packet to caller */ - if (count > skb->len) - count = skb->len; - if (copy_to_user(buf, skb->data, count)) - count = -EFAULT; - dev_kfree_skb(skb); - return count; -} - - -/* - * Driver write() function - */ - -static inline void do_nothing(struct sk_buff *skb) -{ - return; -} - -static ssize_t sheep_net_write(struct file *f, const char *buf, size_t count, loff_t *off) -{ - struct SheepVars *v = (struct SheepVars *)f->private_data; - struct sk_buff *skb; - char *p; - D(bug("sheep_net: write\n")); - - /* Check packet size */ - if (count < sizeof(struct ethhdr)) - return -EINVAL; - if (count > 1514) { - printk("sheep_net_write: packet size %ld > 1514\n", count); - count = 1514; - } - - /* Interface active? */ - if (v->ether == NULL) - return count; - - /* Allocate buffer for packet */ - skb = dev_alloc_skb(count); - if (skb == NULL) - return -ENOBUFS; - - /* Stuff packet in buffer */ - p = skb_put(skb, count); - if (copy_from_user(p, buf, count)) { - kfree_skb(skb); - return -EFAULT; - } - - /* Transmit packet */ -#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,31) - atomic_add(skb->truesize, &v->skt->wmem_alloc); -#endif - skb->sk = v->skt; - skb->dev = v->ether; - skb->priority = 0; -#if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,9) - skb->nh.raw = skb->h.raw = skb->data + v->ether->hard_header_len; - skb->mac.raw = skb->data; -#else - skb_reset_mac_header(skb); - skb_set_transport_header(skb, v->ether->hard_header_len); - skb_set_network_header(skb, v->ether->hard_header_len); -#endif - - /* Base the IP-filtering on the IP address in any outgoing ARP packets */ - if (eth_hdr(skb)->h_proto == htons(ETH_P_ARP)) { - u8 *p = &skb->data[14+14]; /* source IP address */ - u32 ip = (p[0] << 24) | (p[1] << 16) | (p[2] << 8) | p[3]; - if (ip != v->ipfilter) { - v->ipfilter = ip; - printk("sheep_net: ipfilter set to %d.%d.%d.%d\n", (ip >> 24) & 0xff, (ip >> 16) & 0xff, (ip >> 8) & 0xff, ip & 0xff); - } - } - - /* Is this packet addressed solely to the local host? */ - if (is_local_addr(v, skb->data) && !(skb->data[0] & ETH_ADDR_MULTICAST)) { - skb->destructor = do_nothing; - skb->protocol = eth_type_trans(skb, v->ether); - netif_rx(skb); - return count; - } - if (skb->data[0] & ETH_ADDR_MULTICAST) { - /* We can't clone the skb since we will manipulate the data below */ - struct sk_buff *lskb = skb_copy(skb, GFP_ATOMIC); - if (lskb) { - lskb->protocol = eth_type_trans(lskb, v->ether); - netif_rx(lskb); - } - } - - /* Outgoing packet (will be on the net) */ - demasquerade(v, skb); - - skb->destructor = do_nothing; - skb->protocol = PROT_MAGIC; /* Magic value (we can recognize the packet in sheep_net_receiver) */ - dev_queue_xmit(skb); - return count; -} - - -/* - * Driver poll() function - */ - -static unsigned int sheep_net_poll(struct file *f, struct poll_table_struct *wait) -{ - struct SheepVars *v = (struct SheepVars *)f->private_data; - D(bug("sheep_net: poll\n")); - - /* Packets in queue? Then return */ - if (!skb_queue_empty(&v->queue)) - return POLLIN | POLLRDNORM; - - /* Otherwise wait for packet */ - poll_wait(f, &v->wait, wait); - if (!skb_queue_empty(&v->queue)) - return POLLIN | POLLRDNORM; - else - return 0; -} - - -/* - * Driver ioctl() function - */ - -#ifdef LINUX_26_36 -static long sheep_net_ioctl(struct file *f, unsigned int code, unsigned long arg) -#else -static int sheep_net_ioctl(struct inode *inode, struct file *f, unsigned int code, unsigned long arg) -#endif -{ - struct SheepVars *v = (struct SheepVars *)f->private_data; - D(bug("sheep_net: ioctl %04x\n", code)); - - switch (code) { - - /* Attach to Ethernet card - arg: pointer to name of Ethernet device (char[20]) */ - case SIOCSIFLINK: { - char name[20]; - int err; - - /* Already attached? */ - if (v->ether) - return -EBUSY; - - /* Get Ethernet card name */ - if (copy_from_user(name, (void *)arg, 20)) - return -EFAULT; - name[19] = 0; - - /* Find card */ -#ifdef LINUX_26 - v->ether = dev_get_by_name(&init_net, name); -#elif defined(LINUX_24) - v->ether = dev_get_by_name(name); -#else - dev_lock_list(); - v->ether = dev_get(name); -#endif - if (v->ether == NULL) { - err = -ENODEV; - goto error; - } - - /* Is it Ethernet? */ - if (v->ether->type != ARPHRD_ETHER) { - err = -EINVAL; - goto error; - } - - /* Remember the card's hardware address */ - memcpy(v->eth_addr, v->ether->dev_addr, 6); - - /* Allocate socket */ -#ifdef LINUX_26 - v->skt = sk_alloc(dev_net(v->ether), GFP_USER, 1, &sheep_proto); -#else - v->skt = sk_alloc(0, GFP_USER, 1); -#endif - if (v->skt == NULL) { - err = -ENOMEM; - goto error; - } - skt_set_dead(v->skt); - - /* Attach packet handler */ - v->pt.type = htons(ETH_P_ALL); - v->pt.dev = v->ether; - v->pt.func = sheep_net_receiver; - dev_add_pack(&v->pt); -#ifndef LINUX_24 - dev_unlock_list(); -#endif - return 0; - -error: -#ifdef LINUX_24 - if (v->ether) - dev_put(v->ether); -#else - dev_unlock_list(); -#endif - v->ether = NULL; - return err; - } - - /* Get hardware address of the sheep_net module - arg: pointer to buffer (6 bytes) to store address */ - case SIOCGIFADDR: - if (copy_to_user((void *)arg, v->fake_addr, 6)) - return -EFAULT; - return 0; - - /* Set the hardware address of the sheep_net module - arg: pointer to new address (6 bytes) */ - case SIOCSIFADDR: - if (copy_from_user(v->fake_addr, (void*)arg, 6)) - return -EFAULT; - return 0; - - /* Add multicast address - arg: pointer to address (6 bytes) */ - case SIOCADDMULTI: { - char addr[6]; - if (v->ether == NULL) - return -ENODEV; - if (copy_from_user(addr, (void *)arg, 6)) - return -EFAULT; - #ifdef LINUX_26_35 - return dev_mc_add(v->ether, addr); - #else - return dev_mc_add(v->ether, addr, 6, 0); - #endif - } - - /* Remove multicast address - arg: pointer to address (6 bytes) */ - case SIOCDELMULTI: { - char addr[6]; - if (v->ether == NULL) - return -ENODEV; - if (copy_from_user(addr, (void *)arg, 6)) - return -EFAULT; - #ifdef LINUX_26_35 - return dev_mc_del(v->ether, addr); - #else - return dev_mc_delete(v->ether, addr, 6, 0); - #endif - } - - /* Return size of first packet in queue */ - case FIONREAD: { - int count = 0; - struct sk_buff *skb; -#ifdef LINUX_24 - unsigned long flags; - spin_lock_irqsave(&v->queue.lock, flags); -#else - cli(); -#endif - skb = skb_peek(&v->queue); - if (skb) - count = skb->len; -#ifdef LINUX_24 - spin_unlock_irqrestore(&v->queue.lock, flags); -#else - sti(); -#endif - return put_user(count, (int *)arg); - } - - case SIOC_MOL_GET_IPFILTER: - return put_user(v->ipfilter, (int *)arg); - - case SIOC_MOL_SET_IPFILTER: - v->ipfilter = arg; - return 0; - - default: - return -ENOIOCTLCMD; - } -} - - -/* - * Packet receiver function - */ - -#ifdef LINUX_26 -static int sheep_net_receiver(struct sk_buff *skb, struct net_device *dev, struct packet_type *pt, struct net_device *foo) -#else -static int sheep_net_receiver(struct sk_buff *skb, struct net_device *dev, struct packet_type *pt) -#endif -{ - struct SheepVars *v = (struct SheepVars *)pt; - struct sk_buff *skb2; - int fake; - int multicast; - D(bug("sheep_net: packet received\n")); - - multicast = (eth_hdr(skb)->h_dest[0] & ETH_ADDR_MULTICAST); - fake = is_fake_addr(v, ð_hdr(skb)->h_dest); - - /* Packet sent by us? Then discard */ - if (is_fake_addr(v, ð_hdr(skb)->h_source) || skb->protocol == PROT_MAGIC) - goto drop; - - /* If the packet is not meant for this host, discard it */ - if (!is_local_addr(v, ð_hdr(skb)->h_dest) && !multicast && !fake) - goto drop; - - /* Discard packets if queue gets too full */ - if (skb_queue_len(&v->queue) > MAX_QUEUE) - goto drop; - - /* Apply any filters here (if fake is true, then we *know* we want this packet) */ - if (!fake) { - if ((skb->protocol == htons(ETH_P_IP)) - && (!v->ipfilter || (ntohl(ipip_hdr(skb)->daddr) != v->ipfilter && !multicast))) - goto drop; - } - - /* Masquerade (we are typically a clone - best to make a real copy) */ - skb2 = skb_copy(skb, GFP_ATOMIC); - if (!skb2) - goto drop; - kfree_skb(skb); - skb = skb2; - masquerade(v, skb); - - /* We also want the Ethernet header */ - skb_push(skb, skb->data - skb_mac_header(skb)); - - /* Enqueue packet */ - skb_queue_tail(&v->queue, skb); - - /* Unblock blocked read */ -#ifdef LINUX_3_15 - - atomic_set(&v->got_packet, 1); - - wake_up_interruptible(&v->wait); - -#else - - wake_up(&v->wait); - -#endif - return 0; - -drop: - kfree_skb(skb); - return 0; -} - -MODULE_LICENSE("GPL"); diff --git a/BasiliskII/src/Unix/Linux/scsi_linux.cpp b/BasiliskII/src/Unix/Linux/scsi_linux.cpp deleted file mode 100644 index d63652779..000000000 --- a/BasiliskII/src/Unix/Linux/scsi_linux.cpp +++ /dev/null @@ -1,271 +0,0 @@ -/* - * scsi_linux.cpp - SCSI Manager, Linux specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include // workaround for broken RedHat 6.0 /usr/include/scsi -#include -#include - -#define DRIVER_SENSE 0x08 - -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int fds[8]; // fd's for 8 units -static int fd; // Active fd (selected target) - -static uint32 buffer_size; // Size of data buffer -static uint8 *buffer = NULL; // Pointer to data buffer - -static uint8 the_cmd[12]; // Active SCSI command -static int the_cmd_len; - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - int id; - - // Allocate buffer - buffer = (uint8 *)malloc(buffer_size = 0x10000); - - // Open generic SCSI driver for all 8 units - for (id=0; id<8; id++) { - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", id); - const char *str = PrefsFindString(prefs_name); - if (str) { - int fd = fds[id] = open(str, O_RDWR | O_EXCL); - if (fd > 0) { - // Is it really a Generic SCSI device? - int timeout = ioctl(fd, SG_GET_TIMEOUT); - if (timeout < 0) { - // Error with SG_GET_TIMEOUT, doesn't seem to be a Generic SCSI device - char msg[256]; - sprintf(msg, GetString(STR_SCSI_DEVICE_NOT_SCSI_WARN), str); - WarningAlert(msg); - close(fd); - fds[id] = -1; - } else { - // Flush unwanted garbage from previous use of device - uint8 reply[256]; - int old_fl = fcntl(fd, F_GETFL); - fcntl(fd, F_SETFL, old_fl | O_NONBLOCK); - while (read(fd, reply, sizeof(reply)) != -1 || errno != EAGAIN) ; - fcntl(fd, F_SETFL, old_fl); - } - } else { - char msg[256]; - sprintf(msg, GetString(STR_SCSI_DEVICE_OPEN_WARN), str, strerror(errno)); - WarningAlert(msg); - } - } - } - - // Reset SCSI bus - SCSIReset(); -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - // Close all devices - for (int i=0; i<8; i++) { - int fd = fds[i]; - if (fd > 0) - close(fd); - } - - // Free buffer - if (buffer) { - free(buffer); - buffer = NULL; - } -} - - -/* - * Check if requested data size fits into buffer, allocate new buffer if needed - */ - -static bool try_buffer(uint32 size) -{ - size += sizeof(sg_header) + 12; - if (size <= buffer_size) - return true; - - uint8 *new_buffer = (uint8 *)malloc(size); - if (new_buffer == NULL) - return false; - free(buffer); - buffer = new_buffer; - buffer_size = size; - return true; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - memcpy(the_cmd, cmd, the_cmd_len = cmd_length); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return fds[id] > 0; -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - int new_fd = fds[id]; - if (new_fd < 0) - return false; - if (new_fd != fd) { - // New target, clear autosense data - sg_header *h = (sg_header *)buffer; - h->driver_status &= ~DRIVER_SENSE; - } - fd = new_fd; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error); timeout is in 1/60 sec - */ - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - static int pack_id = 0; - - // Check if buffer is large enough, allocate new buffer if needed - if (!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - // Process S/G table when writing - if (!reading) { - D(bug(" writing to buffer\n")); - uint8 *buffer_ptr = buffer + sizeof(sg_header) + the_cmd_len; - for (int i=0; itarget_status & DRIVER_SENSE)) { - - // Yes, fake command - D(bug(" autosense\n")); - memcpy(buffer + sizeof(sg_header), h->sense_buffer, 16); - h->target_status &= ~DRIVER_SENSE; - res = 0; - *stat = 0; - - } else { - - // No, send regular command - if (timeout) { - int to = timeout * HZ / 60; - ioctl(fd, SG_SET_TIMEOUT, &to); - } - ioctl(fd, SG_NEXT_CMD_LEN, &the_cmd_len); - - D(bug(" sending command, length %d\n", data_length)); - - int request_size, reply_size; - if (reading) { - h->pack_len = request_size = sizeof(sg_header) + the_cmd_len; - h->reply_len = reply_size = sizeof(sg_header) + data_length; - } else { - h->pack_len = request_size = sizeof(sg_header) + the_cmd_len + data_length; - h->reply_len = reply_size = sizeof(sg_header); - } - h->pack_id = pack_id++; - h->result = 0; - h->twelve_byte = (the_cmd_len == 12); - h->target_status = 0; - h->host_status = 0; - h->driver_status = 0; - h->other_flags = 0; - memcpy(buffer + sizeof(sg_header), the_cmd, the_cmd_len); - - res = write(fd, buffer, request_size); - D(bug(" request sent, actual %d, result %d\n", res, h->result)); - if (res >= 0) { - res = read(fd, buffer, reply_size); - D(bug(" reply read, actual %d, result %d, status %02x\n", res, h->result, h->target_status << 1)); - } - - *stat = h->target_status << 1; - } - - // Process S/G table when reading - if (reading && h->result == 0) { - D(bug(" reading from buffer\n")); - uint8 *buffer_ptr = buffer + sizeof(sg_header); - for (int i=0; i= 0; -} diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 8ce513854..389e8eed1 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -21,7 +21,7 @@ CFLAGS = @CFLAGS@ CXXFLAGS = @CXXFLAGS@ CPUINCLUDES_FLAGS=@CPUINCLUDES@ CPUINCLUDES_FLAGS:=$(CPUINCLUDES_FLAGS:-I%=-I@top_srcdir@/%) -CPPFLAGS = @CPPFLAGS@ -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -I@top_srcdir@/../slirp +CPPFLAGS = @CPPFLAGS@ -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) DEFS = @DEFS@ @DEFINES@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ @@ -33,16 +33,6 @@ INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ -SLIRP_CFLAGS = @SLIRP_CFLAGS@ -SLIRP_SRCS = @SLIRP_SRCS@ -SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=obj/%.o) - -STANDALONE_GUI = @STANDALONE_GUI@ -GUI_CFLAGS = @GUI_CFLAGS@ -GUI_LIBS = @GUI_LIBS@ -GUI_SRCS = ../prefs.cpp prefs_unix.cpp prefs_editor_gtk.cpp ../prefs_items.cpp \ - ../user_strings.cpp user_strings_unix.cpp xpram_unix.cpp sys_unix.cpp rpc_unix.cpp - XPLAT_SRCS = ../CrossPlatform/vm_alloc.cpp ../CrossPlatform/sigsegv.cpp ../CrossPlatform/video_blit.cpp ## Files @@ -51,10 +41,9 @@ SRCS = ../main.cpp ../prefs.cpp ../prefs_items.cpp \ ../emul_op.cpp ../macos_util.cpp ../xpram.cpp xpram_unix.cpp ../timer.cpp \ timer_unix.cpp ../adb.cpp ../serial.cpp ../ether.cpp \ ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../video.cpp \ - ../audio.cpp ../extfs.cpp disk_sparsebundle.cpp \ - tinyxml2.cpp \ - ../user_strings.cpp user_strings_unix.cpp sshpty.c strlcpy.c rpc_unix.cpp \ - $(XPLAT_SRCS) $(SYSSRCS) $(CPUSRCS) $(SLIRP_SRCS) + ../audio.cpp ../extfs.cpp \ + ../user_strings.cpp user_strings_unix.cpp rpc_unix.cpp \ + $(XPLAT_SRCS) $(SYSSRCS) $(CPUSRCS) APP_FLAVOR ?= ifneq ($(APP_FLAVOR),) CURR_APP_FLAVOR := -$(APP_FLAVOR) @@ -63,20 +52,11 @@ else endif APP_BASENAME = BasiliskII APP = $(APP_BASENAME)$(CURR_APP_FLAVOR) -APP_APP = $(APP).app PROGS = $(APP)$(EXEEXT) -ifeq ($(STANDALONE_GUI),yes) -GUI_APP = BasiliskIIGUI -GUI_APP_APP = $(GUI_APP).app -PROGS += $(GUI_APP)$(EXEEXT) -else -CXXFLAGS += $(GUI_CFLAGS) -LIBS += $(GUI_LIBS) -endif ## Rules -.PHONY: modules install installdirs uninstall mostlyclean clean distclean depend dep +.PHONY: install installdirs uninstall mostlyclean clean distclean depend dep .SUFFIXES: .SUFFIXES: .c .cpp .s .o .h @@ -93,60 +73,18 @@ endef OBJS := $(SRCS_LIST_TO_OBJS) SRCS := $(SRCS:%=@top_srcdir@/%) -define GUI_SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .guio, $(foreach file, $(GUI_SRCS), \ - $(basename $(notdir $(file)))))) -endef -GUI_OBJS = $(GUI_SRCS_LIST_TO_OBJS) -GUI_SRCS := $(GUI_SRCS:%=@top_srcdir@/%) - SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) VPATH := VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) ## Documentation files -OSX_DOCS = ../MacOSX/Credits.html ../MacOSX/ToDo.html ../MacOSX/HowTo.html ../MacOSX/Versions.html $(APP)$(EXEEXT): $(OBJ_DIR) $(OBJS) $(CXX) -o $@ $(LDFLAGS) $(OBJS) $(LIBS) $(BLESS) $(APP)$(EXEEXT) -$(GUI_APP)$(EXEEXT): $(OBJ_DIR) $(GUI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(GUI_OBJS) $(GUI_LIBS) - -$(APP)_app: $(APP) $(OSX_DOCS) ../../README ../MacOSX/Info.plist ../MacOSX/$(APP).icns - rm -rf $(APP_APP)/Contents - mkdir -p $(APP_APP)/Contents - ./cpr.sh ../MacOSX/Info.plist $(APP_APP)/Contents/ - echo -n 'APPL????' > $(APP_APP)/Contents/PkgInfo - mkdir -p $(APP_APP)/Contents/MacOS - ./cpr.sh $(APP) $(APP_APP)/Contents/MacOS/ - strip -x $(APP_APP)/Contents/MacOS/$(APP) - mkdir -p $(APP_APP)/Contents/Resources - ./cpr.sh ../MacOSX/$(APP).icns $(APP_APP)/Contents/Resources/ - ./cpr.sh ../MacOSX/English.lproj $(APP_APP)/Contents/Resources/ - cp -f $(OSX_DOCS) $(APP_APP)/Contents/Resources/ - cp -f ../../README $(APP_APP)/Contents/Resources/README.txt - -$(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns - rm -rf $(GUI_APP_APP)/Contents - mkdir -p $(GUI_APP_APP)/Contents - sed -e "s/$(APP)/$(GUI_APP)/" < ../MacOSX/Info.plist > $(GUI_APP_APP)/Contents/Info.plist - echo -n 'APPL????' > $(GUI_APP_APP)/Contents/PkgInfo - mkdir -p $(GUI_APP_APP)/Contents/MacOS - ./cpr.sh $(GUI_APP) $(GUI_APP_APP)/Contents/MacOS/ - strip -x $(GUI_APP_APP)/Contents/MacOS/$(GUI_APP) - mkdir -p $(GUI_APP_APP)/Contents/Resources - ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns - -modules: - cd Linux/NetDriver; make - install: $(PROGS) installdirs $(INSTALL_PROGRAM) $(APP)$(EXEEXT) $(DESTDIR)$(bindir)/$(APP)$(EXEEXT) - if test -f "$(GUI_APP)$(EXEEXT)"; then \ - $(INSTALL_PROGRAM) $(GUI_APP)$(EXEEXT) $(DESTDIR)$(bindir)/$(GUI_APP)$(EXEEXT); \ - fi -$(INSTALL_DATA) @top_srcdir@/$(APP_BASENAME).1 $(DESTDIR)$(man1dir)/$(APP).1 $(INSTALL_DATA) @top_srcdir@/$(KEYCODES) $(DESTDIR)$(datadir)/$(APP)/keycodes $(INSTALL_DATA) @top_srcdir@/fbdevices $(DESTDIR)$(datadir)/$(APP)/fbdevices @@ -157,7 +95,6 @@ installdirs: uninstall: rm -f $(DESTDIR)$(bindir)/$(APP)$(EXEEXT) - rm -f $(DESTDIR)$(bindir)/$(GUI_APP)$(EXEEXT) rm -f $(DESTDIR)$(man1dir)/$(APP).1 rm -f $(DESTDIR)$(datadir)/$(APP)/keycodes rm -f $(DESTDIR)$(datadir)/$(APP)/fbdevices @@ -168,7 +105,7 @@ mostlyclean: rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak clean: mostlyclean - rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h + rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h distclean: clean rm -rf $(OBJ_DIR) @@ -180,10 +117,6 @@ distclean: clean depend dep: makedepend $(CPPFLAGS) -Y. $(SRCS) 2>/dev/null -$(OBJ_DIR)/SDLMain.o : SDLMain.m - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : @top_srcdir@/../slirp/%.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(SLIRP_CFLAGS) -c $< -o $@ $(OBJ_DIR)/%.o : %.c $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ $(OBJ_DIR)/%.o : %.cpp @@ -194,90 +127,19 @@ $(OBJ_DIR)/%.o : %.mm $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ $(OBJ_DIR)/%.o : %.s $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.guio : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(GUI_CFLAGS) -DSTANDALONE_GUI -c $< -o $@ - -# Windows resources -$(OBJ_DIR)/%.o: %.rc - windres --include-dir ../Windows -i $< -o $@ $(OBJ_DIR)/build68k$(EXEEXT): $(OBJ_DIR)/build68k.o $(CC) $(LDFLAGS) -o $(OBJ_DIR)/build68k$(EXEEXT) $(OBJ_DIR)/build68k.o $(OBJ_DIR)/gencpu$(EXEEXT): $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o $(CXX) $(LDFLAGS) -o $(OBJ_DIR)/gencpu$(EXEEXT) $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o -$(OBJ_DIR)/gencomp$(EXEEXT): $(OBJ_DIR)/gencomp.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o - $(CXX) $(LDFLAGS) -o $(OBJ_DIR)/gencomp$(EXEEXT) $(OBJ_DIR)/gencomp.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o cpudefs.cpp: $(OBJ_DIR)/build68k$(EXEEXT) @top_srcdir@/../uae_cpu/table68k $(OBJ_DIR)/build68k$(EXEEXT) <@top_srcdir@/../uae_cpu/table68k >cpudefs.cpp cpustbl.cpp: cpuemu.cpp -cpustbl_nf.cpp: cpustbl.cpp -compstbl.cpp: compemu.cpp cputbl.h: cpuemu.cpp -comptbl.h: compemu.cpp cpuemu.cpp: $(OBJ_DIR)/gencpu$(EXEEXT) $(OBJ_DIR)/gencpu$(EXEEXT) -compemu.cpp: $(OBJ_DIR)/gencomp$(EXEEXT) - $(OBJ_DIR)/gencomp$(EXEEXT) - -$(OBJ_DIR)/cpustbl_nf.o: cpustbl.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -DNOFLAGS -c $< -o $@ - -$(OBJ_DIR)/compemu_support.o: compemu_support.cpp comptbl.h - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/cpuemu1.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu2.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu3.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu4.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu5.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu6.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu7.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu8.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/cpuemu1_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu2_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu3_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu4_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu5_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu6_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu7_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu8_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/compemu1.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu2.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu3.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu4.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu5.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu6.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu7.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu8.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 $(CXXFLAGS) -c $< -o $@ - #------------------------------------------------------------------------- # DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/BasiliskII/src/Unix/Solaris/audio_solaris.cpp b/BasiliskII/src/Unix/Solaris/audio_solaris.cpp deleted file mode 100644 index d4b7e0dfa..000000000 --- a/BasiliskII/src/Unix/Solaris/audio_solaris.cpp +++ /dev/null @@ -1,320 +0,0 @@ -/* - * audio_solaris.cpp - Audio support, Solaris implementation - * - * Adapted from Frodo's Solaris sound routines by Marc Chabanas - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int fd = -1; // fd of /dev/audio -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; -static int sound_buffer_size; // Size of sound buffer in bytes - -// Prototypes -static void *stream_func(void *arg); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[0]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - char str[256]; - - // Init audio status and feature flags - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(2); - set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - - // Open /dev/audio - fd = open("/dev/audio", O_WRONLY | O_NDELAY); - if (fd < 0) { - sprintf(str, GetString(STR_NO_AUDIO_DEV_WARN), "/dev/audio", strerror(errno)); - WarningAlert(str); - sem_destroy(&audio_irq_done_sem); - return; - } - - // Set audio parameters - struct audio_info info; - AUDIO_INITINFO(&info); - info.play.sample_rate = AudioStatus.sample_rate >> 16; - info.play.channels = AudioStatus.channels; - info.play.precision = AudioStatus.sample_size; - info.play.encoding = AUDIO_ENCODING_LINEAR; - info.play.port = AUDIO_SPEAKER; - if (ioctl(fd, AUDIO_SETINFO, &info)) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - close(fd); - fd = -1; - sem_destroy(&audio_irq_done_sem); - return; - } - - // 2048 frames per buffer - audio_frames_per_block = 2048; - sound_buffer_size = (AudioStatus.sample_size>>3) * AudioStatus.channels * audio_frames_per_block; - - // Start audio thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Stop audio thread - if (stream_thread_active) { - pthread_cancel(stream_thread); - pthread_join(stream_thread, NULL); - sem_destroy(&audio_irq_done_sem); - stream_thread_active = false; - } - - // Close /dev/audio - if (fd > 0) { - ioctl(fd, AUDIO_DRAIN); - close(fd); - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ -} - - -/* - * Streaming function - */ - -static uint32 apple_stream_info; // Mac address of SoundComponentData struct describing next buffer - -static void *stream_func(void *arg) -{ - int16 *silent_buffer = new int16[sound_buffer_size / 2]; - int16 *last_buffer = new int16[sound_buffer_size / 2]; - memset(silent_buffer, 0, sound_buffer_size); - - uint_t sent = 0, delta; - struct audio_info status; - - for (;;) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to audio port - if (work_size == sound_buffer_size) - write(fd, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), sound_buffer_size); - else { - // Last buffer - Mac2Host_memcpy(last_buffer, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - memset((uint8 *)last_buffer + work_size, 0, sound_buffer_size - work_size); - write(fd, last_buffer, sound_buffer_size); - } - D(bug("stream: data written\n")); - } else - goto silence; - - } else { - - // Audio not active, play silence -silence: write(fd, silent_buffer, sound_buffer_size); - } - - // We allow a maximum of three buffers to be sent - sent += audio_frames_per_block; - ioctl(fd, AUDIO_GETINFO, &status); - while ((delta = sent - status.play.samples) > (audio_frames_per_block * 3)) { - unsigned int sl = 1000000 * (delta - audio_frames_per_block * 3) / (AudioStatus.sample_rate >> 16); - usleep(sl); - ioctl(fd, AUDIO_GETINFO, &status); - } - } - return NULL; -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - sem_post(&audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - return true; -} - -bool audio_set_sample_size(int index) -{ - return true; -} - -bool audio_set_channels(int index) -{ - return true; -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - return false; -} - -uint32 audio_get_main_volume(void) -{ - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ -} diff --git a/BasiliskII/src/Unix/Solaris/which_sparc b/BasiliskII/src/Unix/Solaris/which_sparc deleted file mode 100755 index b6824fd02..000000000 --- a/BasiliskII/src/Unix/Solaris/which_sparc +++ /dev/null @@ -1,121 +0,0 @@ -#!/bin/sh - -# which_sparc -# -# This script generates a program that tests for a SPARC processor class -# Program returns: -# 0 unknown SPARC processor -# 8 SPARC V8 `compliant' processor (umul instruction is legal) -# 9 SPARC V9 `compliant' processor (popc instruction is legal) -# -# The script prints: -# "unknown SPARC architecture" -# SPARC_V8 -# SPARC_V9 -# -# I hope this works for other machines and OS. Tested machines are: -# Sun Ultra 10 (Solaris 7), SPARC Station 5 (Solaris 2.5.1) -# -# Gwenole Beauchesne -# gb@dial.oleane.com - -CC=gcc -PROG=./conftest -SOURCE=./conftest.c - -if [ ! -x $PROG ]; then -cat > $SOURCE << EOF -#include -#include - -typedef unsigned int uint32; -typedef uint32 (*sparc_code_func)(void); - -#define SPARC_UNKNOWN 0 -#define SPARC_V8 8 -#define SPARC_V9 9 - -#define MAX_CODE_SIZE 16 -struct sparc_code_struct { - int version; - uint32 code[MAX_CODE_SIZE]; - struct sparc_code_struct * next; -}; -typedef struct sparc_code_struct sparc_code_struct; - -static sparc_code_struct *current_test_code; - -static sparc_code_struct unknown_sparc_code = -{ - SPARC_UNKNOWN, - { - 0x81C3E008, /* retl */ - 0x01000000 /* nop */ - } -}; - -static sparc_code_struct sparc_v9_code = -{ - SPARC_V9, - { - 0x81C3E008, /* retl */ - 0x81702007 /* popc 7, %g0 */ - } -}; - -static sparc_code_struct sparc_v8_code = -{ - SPARC_V8, - { - 0x90102002, /* mov 2, %o0 */ - 0x81C3E008, /* retl */ - 0x90520008 /* umul %o0, %o0, %o0 */ - } -}; - -static void test_sparc_code(int unused_int) -{ - sparc_code_struct *tested_code = current_test_code; - - if (current_test_code == NULL) - exit(SPARC_UNKNOWN); - - signal(SIGILL, test_sparc_code); - current_test_code = current_test_code->next; - (void) ((sparc_code_func)(tested_code->code))(); - exit(tested_code->version); -} - -int main(void) -{ - sparc_v9_code.next = &sparc_v8_code; - sparc_v8_code.next = &unknown_sparc_code; - unknown_sparc_code.next = NULL; - - signal(SIGILL, test_sparc_code); - current_test_code = &sparc_v9_code; - raise(SIGILL); - - return 0; -} -EOF - -$CC -o $PROG $SOURCE -if [ $? -ne 0 ]; then - echo "Error: could not compile the test program" - exit 1 -fi - -fi - -$PROG -case $? in - 0) echo "unknown SPARC architecture";; - 8) echo "SPARC_V8";; - 9) echo "SPARC_V9";; -esac - -rm -f $PROG -rm -f $SOURCE - -exit 0 diff --git a/BasiliskII/src/Unix/asm_support.s b/BasiliskII/src/Unix/asm_support.s deleted file mode 100644 index ba7b0ba13..000000000 --- a/BasiliskII/src/Unix/asm_support.s +++ /dev/null @@ -1,180 +0,0 @@ -/* - * asm_support.s - Utility functions in assembly language (for native 68k support) - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 - */ - - .file "asm_support.s" - .text - - .globl _m68k_sync_icache - .globl _Start680x0__Fv - .globl _SetInterruptFlag__FUi - .globl _ClearInterruptFlag__FUi - .globl _Execute68k - .globl _Execute68kTrap - .globl _EmulOpTrampoline - - .globl _RAMBaseHost - .globl _ROMBaseHost - .globl _EmulOp__FUsP13M68kRegisters - .globl _EmulatedSR - .globl _InterruptFlags - .globl _TriggerInterrupt__Fv - - -/* - * Call m68k_sync_icache() (NetBSD, the version in libm68k is broken) - */ - - .type _m68k_sync_icache,@function -_m68k_sync_icache: - movl sp@(8),d1 - movl sp@(4),a1 - movl #0x80000004,d0 - trap #12 - rts - - -/* - * Jump to Mac ROM, start emulation - */ - - .type _Start680x0__Fv,@function -_Start680x0__Fv: - movl _RAMBaseHost,a0 - addl #0x8000,a0 - movl a0,sp - movl _ROMBaseHost,a0 - lea a0@(0x2a),a0 - jmp a0@ - - -/* - * Set/clear interrupt flag (atomically) - */ - - .type _SetInterruptFlag__FUi,@function -_SetInterruptFlag__FUi: - movl sp@(4),d0 - orl d0,_InterruptFlags - rts - - .type _ClearInterruptFlag__FUi,@function -_ClearInterruptFlag__FUi: - movl sp@(4),d0 - notl d0 - andl d0,_InterruptFlags - rts - - -/* - * Execute 68k subroutine (must be ended with rts) - * r->a[7] and r->sr are unused! - */ - -/* void Execute68k(uint32 addr, M68kRegisters *r); */ - .type _Execute68k,@function -_Execute68k: movl sp@(4),d0 |Get arguments - movl sp@(8),a0 - - movml d2-d7/a2-a6,sp@- |Save registers - - movl a0,sp@- |Push pointer to M68kRegisters on stack - pea exec68kret |Push return address on stack - movl d0,sp@- |Push pointer to 68k routine on stack - movml a0@,d0-d7/a0-a6 |Load registers from M68kRegisters - - rts |Jump into 68k routine - -exec68kret: movl a6,sp@- |Save a6 - movl sp@(4),a6 |Get pointer to M68kRegisters - movml d0-d7/a0-a5,a6@ |Save d0-d7/a0-a5 to M68kRegisters - movl sp@+,a6@(56) |Save a6 to M68kRegisters - addql #4,sp |Remove pointer from stack - - movml sp@+,d2-d7/a2-a6 |Restore registers - rts - - -/* - * Execute MacOS 68k trap - * r->a[7] and r->sr are unused! - */ - -/* void Execute68kTrap(uint16 trap, M68kRegisters *r); */ - .type _Execute68kTrap,@function -_Execute68kTrap: - movl sp@(4),d0 |Get arguments - movl sp@(8),a0 - - movml d2-d7/a2-a6,sp@- |Save registers - - movl a0,sp@- |Push pointer to M68kRegisters on stack - movw d0,sp@- |Push trap word on stack - subql #8,sp |Create fake A-Line exception frame - movml a0@,d0-d7/a0-a6 |Load registers from M68kRegisters - - movl a2,sp@- |Save a2 and d2 - movl d2,sp@- - lea exectrapret,a2 |a2 points to return address - movw sp@(16),d2 |Load trap word into d2 - - jmp zpc@(0x28:w)@(10) |Jump into MacOS A-Line handler - -exectrapret: movl a6,sp@- |Save a6 - movl sp@(6),a6 |Get pointer to M68kRegisters - movml d0-d7/a0-a5,a6@ |Save d0-d7/a0-a5 to M68kRegisters - movl sp@+,a6@(56) |Save a6 to M68kRegisters - addql #6,sp |Remove pointer and trap word from stack - - movml sp@+,d2-d7/a2-a6 |Restore registers - rts - - -/* - * Call EmulOp() after return from SIGILL handler, registers are pushed on stack - */ - - .type _EmulOpTrampoline,@function -_EmulOpTrampoline: - movl sp,a0 |Get pointer to registers - - movw _EmulatedSR,d0 |Save EmulatedSR, disable interrupts - movw d0,sp@- - oriw #0x0700,d0 - movw d0,_EmulatedSR - - movl a0,sp@- |Push pointer to registers - movl a0@(66),a1 |Get saved PC - addql #2,a0@(66) |Skip EMUL_OP opcode - movw a1@,sp@- |Push opcode word - clrw sp@- - jbsr _EmulOp__FUsP13M68kRegisters - addql #8,sp - - movw sp@+,d0 |Restore interrupts, trigger pending interrupt - movw d0,_EmulatedSR - andiw #0x0700,d0 - bne eot1 - tstl _InterruptFlags - beq eot1 - jbsr _TriggerInterrupt__Fv - -eot1: moveml sp@+,d0-d7/a0-a6 |Restore registers - addql #4,sp |Skip saved SP - rtr diff --git a/BasiliskII/src/Unix/audio_oss_esd.cpp b/BasiliskII/src/Unix/audio_oss_esd.cpp deleted file mode 100644 index 203a5ac75..000000000 --- a/BasiliskII/src/Unix/audio_oss_esd.cpp +++ /dev/null @@ -1,558 +0,0 @@ -/* - * audio_oss_esd.cpp - Audio support, implementation for OSS and ESD (Linux and FreeBSD) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#ifdef __linux__ -#include -#endif - -#ifdef __FreeBSD__ -#include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#ifdef ENABLE_ESD -#include -#endif - -#define DEBUG 0 -#include "debug.h" - - -// The currently selected audio parameters (indices in audio_sample_rates[] etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Global variables -static bool is_dsp_audio = false; // Flag: is DSP audio -static int audio_fd = -1; // fd of dsp or ESD -static int mixer_fd = -1; // fd of mixer -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static bool sem_inited = false; // Flag: audio_irq_done_sem initialized -static int sound_buffer_size; // Size of sound buffer in bytes -static bool little_endian = false; // Flag: DSP accepts only little-endian 16-bit sound data -static uint8 silence_byte; // Byte value to use to fill sound buffers with silence -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; // Flag: streaming thread installed -static volatile bool stream_thread_cancel = false; // Flag: cancel streaming thread - -// Prototypes -static void *stream_func(void *arg); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; -} - -// Init using the dsp device, returns false on error -static bool open_dsp(void) -{ - // Open the device - const char *dsp = PrefsFindString("dsp"); - audio_fd = open(dsp, O_WRONLY); - if (audio_fd < 0) { - fprintf(stderr, "WARNING: Cannot open %s (%s)\n", dsp, strerror(errno)); - return false; - } - - printf("Using %s audio output\n", dsp); - is_dsp_audio = true; - - // Get supported sample formats - if (audio_sample_sizes.empty()) { - unsigned long format; - ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &format); - if (format & AFMT_U8) - audio_sample_sizes.push_back(8); - if (format & (AFMT_S16_BE | AFMT_S16_LE)) - audio_sample_sizes.push_back(16); - - int stereo = 0; - if (ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo) == 0 && stereo == 0) - audio_channel_counts.push_back(1); - stereo = 1; - if (ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo) == 0 && stereo == 1) - audio_channel_counts.push_back(2); - - if (audio_sample_sizes.empty() || audio_channel_counts.empty()) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - close(audio_fd); - audio_fd = -1; - return false; - } - - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - int rate = 44100; - ioctl(audio_fd, SNDCTL_DSP_SPEED, &rate); - if (rate > 22050) - audio_sample_rates.push_back(rate << 16); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Set DSP parameters - unsigned long format; - if (audio_sample_sizes[audio_sample_size_index] == 8) { - format = AFMT_U8; - little_endian = false; - silence_byte = 0x80; - } else { - unsigned long sup_format; - ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &sup_format); - if (sup_format & AFMT_S16_BE) { - little_endian = false; - format = AFMT_S16_BE; - } else { - little_endian = true; - format = AFMT_S16_LE; - } - silence_byte = 0; - } - ioctl(audio_fd, SNDCTL_DSP_SETFMT, &format); - int frag = 0x0004000c; // Block size: 4096 frames - ioctl(audio_fd, SNDCTL_DSP_SETFRAGMENT, &frag); - int stereo = (audio_channel_counts[audio_channel_count_index] == 2); - ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo); - int rate = audio_sample_rates[audio_sample_rate_index] >> 16; - ioctl(audio_fd, SNDCTL_DSP_SPEED, &rate); - - // Get sound buffer size - ioctl(audio_fd, SNDCTL_DSP_GETBLKSIZE, &audio_frames_per_block); - D(bug("DSP_GETBLKSIZE %d\n", audio_frames_per_block)); - return true; -} - -// Init using ESD, returns false on error -static bool open_esd(void) -{ -#ifdef ENABLE_ESD - int rate; - esd_format_t format = ESD_STREAM | ESD_PLAY; - - if (audio_sample_sizes.empty()) { - - // Default values - rate = 44100; - format |= (ESD_BITS16 | ESD_STEREO); - - } else { - - rate = audio_sample_rates[audio_sample_rate_index] >> 16; - if (audio_sample_sizes[audio_sample_size_index] == 8) - format |= ESD_BITS8; - else - format |= ESD_BITS16; - if (audio_channel_counts[audio_channel_count_index] == 1) - format |= ESD_MONO; - else - format |= ESD_STEREO; - } - -#if WORDS_BIGENDIAN - little_endian = false; -#else - little_endian = true; -#endif - silence_byte = 0; // Is this correct for 8-bit mode? - - // Open connection to ESD server - audio_fd = esd_play_stream(format, rate, NULL, NULL); - if (audio_fd < 0) { - fprintf(stderr, "WARNING: Cannot open ESD connection\n"); - return false; - } - - printf("Using ESD audio output\n"); - - // ESD supports a variety of twisted little audio formats, all different - if (audio_sample_sizes.empty()) { - - // The reason we do this here is that we don't want to add sample - // rates etc. unless the ESD server connection could be opened - // (if ESD fails, dsp might be tried next) - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Sound buffer size = 4096 frames - audio_frames_per_block = 4096; - return true; -#else - // ESD is not enabled, shut up the compiler - return false; -#endif -} - -static bool open_audio(void) -{ -#ifdef ENABLE_ESD - // If ESPEAKER is set, the user probably wants to use ESD, so try that first - if (getenv("ESPEAKER")) - if (open_esd()) - goto dev_opened; -#endif - - // Try to open dsp - if (open_dsp()) - goto dev_opened; - -#ifdef ENABLE_ESD - // Hm, dsp failed so we try ESD again if ESPEAKER wasn't set - if (!getenv("ESPEAKER")) - if (open_esd()) - goto dev_opened; -#endif - - // No audio device succeeded - WarningAlert(GetString(STR_NO_AUDIO_WARN)); - return false; - - // Device opened, set AudioStatus -dev_opened: - sound_buffer_size = (audio_sample_sizes[audio_sample_size_index] >> 3) * audio_channel_counts[audio_channel_count_index] * audio_frames_per_block; - set_audio_status_format(); - - // Start streaming thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything went fine - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Init audio status (reasonable defaults) and feature flags - AudioStatus.sample_rate = 44100 << 16; - AudioStatus.sample_size = 16; - AudioStatus.channels = 2; - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - sem_inited = true; - - // Try to open the mixer device - const char *mixer = PrefsFindString("mixer"); - mixer_fd = open(mixer, O_RDWR); - if (mixer_fd < 0) - printf("WARNING: Cannot open %s (%s)\n", mixer, strerror(errno)); - - // Open and initialize audio device - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - // Stop stream and delete semaphore - if (stream_thread_active) { - stream_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(stream_thread); -#endif - pthread_join(stream_thread, NULL); - stream_thread_active = false; - } - - // Close dsp or ESD socket - if (audio_fd >= 0) { - close(audio_fd); - audio_fd = -1; - } - - audio_open = false; -} - -void AudioExit(void) -{ - // Stop the device immediately. Otherwise, close() sends - // SNDCTL_DSP_SYNC, which may hang - if (is_dsp_audio) - ioctl(audio_fd, SNDCTL_DSP_RESET, 0); - - // Close audio device - close_audio(); - - // Delete semaphore - if (sem_inited) { - sem_destroy(&audio_irq_done_sem); - sem_inited = false; - } - - // Close mixer device - if (mixer_fd >= 0) { - close(mixer_fd); - mixer_fd = -1; - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Streaming function - */ - -static void *stream_func(void *arg) -{ - int16 *silent_buffer = new int16[sound_buffer_size / 2]; - int16 *last_buffer = new int16[sound_buffer_size / 2]; - memset(silent_buffer, silence_byte, sound_buffer_size); - - while (!stream_thread_cancel) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to DSP - if (work_size == sound_buffer_size && !little_endian) - write(audio_fd, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), sound_buffer_size); - else { - // Last buffer or little-endian DSP - if (little_endian) { - int16 *p = (int16 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - for (int i=0; i= 0) { - int vol; - if (ioctl(mixer_fd, SOUND_MIXER_READ_PCM, &vol) == 0) { - int left = vol >> 8; - int right = vol & 0xff; - return ((left * 256 / 100) << 16) | (right * 256 / 100); - } - } - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - if (mixer_fd >= 0) { - int vol; - if (ioctl(mixer_fd, SOUND_MIXER_READ_VOLUME, &vol) == 0) { - int left = vol >> 8; - int right = vol & 0xff; - return ((left * 256 / 100) << 16) | (right * 256 / 100); - } - } - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ - if (mixer_fd >= 0) { - int left = vol >> 16; - int right = vol & 0xffff; - int p = ((left * 100 / 256) << 8) | (right * 100 / 256); - ioctl(mixer_fd, SOUND_MIXER_WRITE_PCM, &p); - } -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ - if (mixer_fd >= 0) { - int left = vol >> 16; - int right = vol & 0xffff; - int p = ((left * 100 / 256) << 8) | (right * 100 / 256); - ioctl(mixer_fd, SOUND_MIXER_WRITE_VOLUME, &p); - } -} diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp deleted file mode 100644 index 11c935480..000000000 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ /dev/null @@ -1,834 +0,0 @@ -/* - * Copyright (C) 2002-2010 The DOSBox Team - * - * 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. - */ - -/* Geoffrey Brown 2010 - * Includes ideas from dosbox src/dos/cdrom_image.cpp - * - * Limitations: 1) cue files must reference single bin file - * 2) only supports raw mode1 data and audio - * 3) no support for audio flags - * 4) requires SDL audio or OS X core audio - * 5) limited cue file keyword support - * - * Creating cue/bin files: - * cdrdao read-cd --read-raw --paranoia 3 foo.toc - * toc2cue foo.toc - */ - -#include "sysdeps.h" -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#ifdef OSX_CORE_AUDIO -#include "../MacOSX/MacOSX_sound_if.h" -static int bincue_core_audio_callback(void); -#endif - -#ifdef USE_SDL_AUDIO -#include -#include -#endif - -#include "bincue_unix.h" -#define DEBUG 0 -#include "debug.h" - -#define MAXTRACK 100 -#define MAXLINE 512 -#define CD_FRAMES 75 -#define RAW_SECTOR_SIZE 2352 -#define COOKED_SECTOR_SIZE 2048 - -// Bits of Track Control Field -- These are standard for scsi cd players - -#define PREMPHASIS 0x1 -#define COPY 0x2 -#define DATA 0x4 -#define AUDIO 0 -#define FOURTRACK 0x8 - -// Audio status -- These are standard for scsi cd players - -#define CDROM_AUDIO_INVALID 0x00 -#define CDROM_AUDIO_PLAY 0x11 -#define CDROM_AUDIO_PAUSED 0x12 -#define CDROM_AUDIO_COMPLETED 0x13 -#define CDROM_AUDIO_ERROR 0x14 -#define CDROM_AUDIO_NO_STATUS 0x15 - -typedef unsigned char uint8; - -// cuefiles can be challenging as some information is -// implied. For example, there may a pregap (also postgap) -// of silence that must be generated. Here we implement -// only the pregap. - -typedef struct { - int number; - unsigned int start; // Track start in frames - unsigned int length; // Track length in frames - loff_t fileoffset; // Track frame start within file - unsigned int pregap; // Silence in frames to generate - unsigned char tcf; // Track control field -} Track; - -typedef struct { - char *binfile; // Binary file name - unsigned int length; // file length in frames - int binfh; // binary file handle - int tcnt; // number of tracks - Track tracks[MAXTRACK]; -} CueSheet; - -typedef struct { - CueSheet *cs; // cue sheet to play from - int audiofh; // file handle for audio data - unsigned int audioposition; // current position from audiostart (bytes) - unsigned int audiostart; // start position if playing (frame) - unsigned int audioend; // end position if playing (frames) - unsigned int silence; // pregap (silence) bytes - unsigned char audiostatus; // See defines above for status - loff_t fileoffset; // offset from file beginning to audiostart -#ifdef OSX_CORE_AUDIO - OSXsoundOutput soundoutput; -#endif -} CDPlayer; - -// Minute,Second,Frame data type - -typedef struct { - int m, s, f; // note size matters since we scan for %d ! -} MSF; - -// Parser State - -static unsigned int totalPregap; -static unsigned int prestart; - -// Audio System State - -static bool audio_enabled = false; -static uint8 silence_byte; - - -// CD Player state. Note only one player is supported ! - -static CDPlayer player; - -static void FramesToMSF(unsigned int frames, MSF *msf) -{ - msf->m = frames/(60 * CD_FRAMES); - frames = frames%(60 * CD_FRAMES); - msf->s = frames/CD_FRAMES; - msf->f = frames%CD_FRAMES; -} - -static int MSFToFrames(MSF msf) -{ - return (msf.m * 60 * CD_FRAMES) + (msf.s * CD_FRAMES) + msf.f; -} - - -static int PositionToTrack(CueSheet *cs, unsigned int position) -{ - int i; - MSF msf; - - FramesToMSF(position, &msf); - - for (i = 0; i < cs->tcnt; i++) { - if ((position >= cs->tracks[i].start) && - (position <= (cs->tracks[i].start + cs->tracks[i].length))) - break; - } - return i; -} - -static bool AddTrack(CueSheet *cs) -{ - int skip = prestart; - Track *prev; - Track *curr = &(cs->tracks[cs->tcnt]); - - prestart = 0; - - if (skip > 0) { - if (skip > curr->start) { - D(bug("AddTrack: prestart > start\n")); - return false; - } - } - - curr->fileoffset = curr->start * RAW_SECTOR_SIZE; - - // now we patch up the indicated time - - curr->start += totalPregap; - - // curr->pregap is supposed to be part of this track, but it - // must be generated as silence - - totalPregap += curr->pregap; - - if (cs->tcnt == 0) { - if (curr->number != 1) { - D(bug("AddTrack: number != 1\n")); - return false; - } - cs->tcnt++; - return true; - } - - prev = &(cs->tracks[cs->tcnt - 1]); - - if (prev->start < skip) - prev->length = skip - prev->start - curr->pregap; - else - prev->length = curr->start - prev->start - curr->pregap; - - // error checks - - if (curr->number <= 1) { - D(bug("Bad track number %d\n", curr->number)); - return false; - } - if ((prev->number + 1 != curr->number) && (curr->number != 0xAA)) { - D(bug("Bad track number %d\n", curr->number)); - return false; - } - if (curr->start < prev->start + prev->length) { - D(bug("unexpected start %d\n", curr->start)); - return false; - } - - cs->tcnt++; - return true; -} - -static bool ParseCueSheet(FILE *fh, CueSheet *cs, const char *cuefile) -{ - bool seen1st = false; - char line[MAXLINE]; - unsigned int i_line=0; - char *keyword; - - totalPregap = 0; - prestart = 0; - - while (fgets(line, MAXLINE, fh) != NULL) { - Track *curr = &cs->tracks[cs->tcnt]; - - // check for CUE file - - if (!i_line && (strncmp("FILE", line, 4) != 0)) { - return false; - } - i_line++; - - // extract keyword - - if (NULL != (keyword = strtok(line, " \t\n\t"))) { - if (!strcmp("FILE", keyword)) { - char *filename; - char *filetype; - - if (i_line > 1) { - D(bug("More than one FILE token\n")); - goto fail; - } - filename = strtok(NULL, "\"\t\n\r"); - filetype = strtok(NULL, " \"\t\n\r"); - if (strcmp("BINARY", filetype)) { - D(bug("Not binary file %s", filetype)); - goto fail; - } - else { - char *tmp = strdup(cuefile); - char *b = dirname(tmp); - cs->binfile = (char *) malloc(strlen(b) + strlen(filename) + 2); - sprintf(cs->binfile, "%s/%s", b, filename); - free(tmp); - } - } else if (!strcmp("TRACK", keyword)) { - char *field; - int i_track; - - if (seen1st) { - if (!AddTrack(cs)){ - D(bug("AddTrack failed \n")); - goto fail; - } - curr = &cs->tracks[cs->tcnt]; - } - - seen1st = true; - - // parse track number - - field = strtok(NULL, " \t\n\r"); - if (1 != sscanf(field, "%d", &i_track)) { - D(bug("Expected track number\n")); - goto fail; - } - curr->number = i_track; - - // parse track type - - field = strtok(NULL, " \t\n\r"); - if (!strcmp("MODE1/2352", field)) { - curr->tcf = DATA; - } else if (!strcmp("AUDIO", field)) { - curr->tcf = AUDIO; - } else { - D(bug("Unexpected track type %s", field)); - goto fail; - } - - } else if (!strcmp("INDEX", keyword)) { - char *field; - int i_index; - MSF msf; - - // parse INDEX number - - field = strtok(NULL, " \t\n\r"); - if (1 != sscanf(field, "%d", &i_index)) { - D(bug("Expected index number")); - goto fail; - } - - // parse INDEX start - - field = strtok(NULL, " \t\n\r"); - if (3 != sscanf(field, "%d:%d:%d", - &msf.m, &msf.s, &msf.f)) { - D(bug("Expected index start frame\n")); - goto fail; - } - - if (i_index == 1) - curr->start = MSFToFrames(msf); - else if (i_index == 0) - prestart = MSFToFrames(msf); - } else if (!strcmp("PREGAP", keyword)) { - MSF msf; - char *field = strtok(NULL, " \t\n\r"); - if (3 != sscanf(field, "%d:%d:%d", - &msf.m, &msf.s, &msf.f)) { - D(bug("Expected pregap frame\n")); - goto fail; - } - curr->pregap = MSFToFrames(msf); - - // Ignored directives - - } else if (!strcmp("TITLE", keyword)) { - } else if (!strcmp("PERFORMER", keyword)) { - } else if (!strcmp("REM", keyword)) { - } else if (!strcmp("ISRC", keyword)) { - } else if (!strcmp("SONGWRITER", keyword)) { - } else { - D(bug("Unexpected keyword %s\n", keyword)); - goto fail; - } - } - } - - AddTrack(cs); // add final track - return true; - fail: - return false; -} - -static bool LoadCueSheet(const char *cuefile, CueSheet *cs) -{ - FILE *fh = NULL; - int binfh = -1; - struct stat buf; - Track *tlast = NULL; - - if (cs) { - bzero(cs, sizeof(*cs)); - if (!(fh = fopen(cuefile, "r"))) - return false; - - if (!ParseCueSheet(fh, cs, cuefile)) goto fail; - - // Open bin file and find length - - if ((binfh = open(cs->binfile,O_RDONLY)) < 0) { - D(bug("Can't read bin file %s\n", cs->binfile)); - goto fail; - } - - if (fstat(binfh, &buf)) { - D(bug("fstat returned error\n")); - goto fail; - } - - // compute length of final track - - - tlast = &cs->tracks[cs->tcnt - 1]; - tlast->length = buf.st_size/RAW_SECTOR_SIZE - - tlast->start + totalPregap; - - if (tlast->length < 0) { - D(bug("Binary file too short \n")); - goto fail; - } - - // save bin file length and pointer - - cs->length = buf.st_size/RAW_SECTOR_SIZE; - cs->binfh = binfh; - - fclose(fh); - return true; - - fail: - if (binfh >= 0) - close(binfh); - fclose(fh); - free(cs->binfile); - return false; - - } - return false; -} - - - -void *open_bincue(const char *name) -{ - CueSheet *cs; - - if (player.cs == NULL) { - cs = (CueSheet *) malloc(sizeof(CueSheet)); - if (!cs) { - D(bug("malloc failed\n")); - return NULL; - } - - if (LoadCueSheet(name, cs)) { - player.cs = cs; -#ifdef OSX_CORE_AUDIO - audio_enabled = true; -#endif - if (audio_enabled) - player.audiostatus = CDROM_AUDIO_NO_STATUS; - else - player.audiostatus = CDROM_AUDIO_INVALID; - player.audiofh = dup(cs->binfh); - return cs; - } - else - free(cs); - } - return NULL; -} - -void close_bincue(void *fh) -{ - - -} - -/* - * File read (cooked) - * Data are stored in raw sectors of which only COOKED_SECTOR_SIZE - * bytes are valid -- the remaining include 16 bytes at the beginning - * of each raw sector and RAW_SECTOR_SIZE - COOKED_SECTOR_SIZE - bytes - * at the end - * - * We assume that a read request can land in the middle of - * sector. We compute the byte address of that sector (sec) - * and the offset of the first byte we want within that sector (secoff) - * - * Reading is performed one raw sector at a time, extracting as many - * valid bytes as possible from that raw sector (available) - */ - -size_t read_bincue(void *fh, void *b, loff_t offset, size_t len) -{ - size_t bytes_read = 0; // bytes read so far - unsigned char *buf = (unsigned char *) b; // target buffer - unsigned char secbuf[RAW_SECTOR_SIZE]; // temporary buffer - - off_t sec = ((offset/COOKED_SECTOR_SIZE) * RAW_SECTOR_SIZE); - off_t secoff = offset % COOKED_SECTOR_SIZE; - - // sec contains location (in bytes) of next raw sector to read - // secoff contains offset within that sector at which to start - // reading since we can request a read that starts in the middle - // of a sector - - CueSheet *cs = (CueSheet *) fh; - - if (cs == NULL || lseek(cs->binfh, sec, SEEK_SET) < 0) { - return -1; - } - while (len) { - - // bytes available in next raw sector or len (bytes) - // we want whichever is less - - size_t available = COOKED_SECTOR_SIZE - secoff; - available = (available > len) ? len : available; - - // read the next raw sector - - if (read(cs->binfh, secbuf, RAW_SECTOR_SIZE) != RAW_SECTOR_SIZE) { - return bytes_read; - } - - // copy cooked sector bytes (skip first 16) - // we want out of those available - - bcopy(&secbuf[16+secoff], &buf[bytes_read], available); - - // next sector we start at the beginning - - secoff = 0; - - // increment running count decrement request - - bytes_read += available; - len -= available; - } - return bytes_read; -} - -loff_t size_bincue(void *fh) -{ - if (fh) { - return ((CueSheet *)fh)->length * COOKED_SECTOR_SIZE; - } -} - -bool readtoc_bincue(void *fh, unsigned char *toc) -{ - CueSheet *cs = (CueSheet *) fh; - if (cs) { - - MSF msf; - unsigned char *p = toc + 2; - *p++ = cs->tracks[0].number; - *p++ = cs->tracks[cs->tcnt - 1].number; - for (int i = 0; i < cs->tcnt; i++) { - - FramesToMSF(cs->tracks[i].start, &msf); - *p++ = 0; - *p++ = 0x10 | cs->tracks[i].tcf; - *p++ = cs->tracks[i].number; - *p++ = 0; - *p++ = 0; - *p++ = msf.m; - *p++ = msf.s; - *p++ = msf.f; - } - FramesToMSF(cs->length, &msf); - *p++ = 0; - *p++ = 0x14; - *p++ = 0xAA; - *p++ = 0; - *p++ = 0; - *p++ = msf.m; - *p++ = msf.s; - *p++ = msf.f; - - int toc_size = p - toc; - *toc++ = toc_size >> 8; - *toc++ = toc_size & 0xff; - return true; - } -} - -bool GetPosition_bincue(void *fh, uint8 *pos) -{ - CueSheet *cs = (CueSheet *) fh; - if (cs && player.cs == cs) { - MSF abs, rel; - int fpos = player.audioposition / RAW_SECTOR_SIZE + player.audiostart; - int trackno = PositionToTrack(cs, fpos); - - if (!audio_enabled) - return false; - - FramesToMSF(fpos, &abs); - if (trackno < cs->tcnt) { - // compute position relative to start of frame - - unsigned int position = player.audioposition/RAW_SECTOR_SIZE + - player.audiostart - player.cs->tracks[trackno].start; - - FramesToMSF(position, &rel); - } - else - FramesToMSF(0, &rel); - - *pos++ = 0; - *pos++ = player.audiostatus; - *pos++ = 0; - *pos++ = 12; // Sub-Q data length - *pos++ = 0; - if (trackno < cs->tcnt) - *pos++ = 0x10 | cs->tracks[trackno].tcf; - *pos++ = (trackno < cs->tcnt) ? cs->tracks[trackno].number : 0xAA; - *pos++ = 1; // track index - *pos++ = 0; - *pos++ = abs.m; - *pos++ = abs.s; - *pos++ = abs.f; - *pos++ = 0; - *pos++ = rel.m; - *pos++ = rel.s; - *pos++ = rel.f; - *pos++ = 0; -// D(bug("CDROM position %02d:%02d:%02d track %02d\n", abs.m, abs.s, abs.f, trackno)); - return true; - } - else - return false; -} - -bool CDPause_bincue(void *fh) -{ - CueSheet *cs = (CueSheet *) fh; - if (cs && cs == player.cs) { - if (player.audiostatus == CDROM_AUDIO_PLAY) { - player.audiostatus = CDROM_AUDIO_PAUSED; - return true; - } - } - return false; -} - -bool CDStop_bincue(void *fh) -{ - CueSheet *cs = (CueSheet *) fh; - - if (cs && cs == player.cs) { -#ifdef OSX_CORE_AUDIO - player.soundoutput.stop(); -#endif - if (player.audiostatus != CDROM_AUDIO_INVALID) - player.audiostatus = CDROM_AUDIO_NO_STATUS; - return true; - } - return false; -} - -bool CDResume_bincue(void *fh) -{ - CueSheet *cs = (CueSheet *) fh; - if (cs && cs == player.cs) { - if (player.audiostatus == CDROM_AUDIO_PAUSED) { - player.audiostatus = CDROM_AUDIO_PLAY; - return true; - } - } - return false; -} - -bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, - uint8 end_m, uint8 end_s, uint8 end_f) -{ - CueSheet *cs = (CueSheet *)fh; - if (cs && cs == player.cs) { - int track; - MSF msf; - -#ifdef USE_SDL_AUDIO - SDL_LockAudio(); -#endif - - player.audiostatus = CDROM_AUDIO_NO_STATUS; - - player.audiostart = (start_m * 60 * CD_FRAMES) + - (start_s * CD_FRAMES) + start_f; - player.audioend = (end_m * 60 * CD_FRAMES) + (end_s * CD_FRAMES) + end_f; - - track = PositionToTrack(player.cs, player.audiostart); - - if (track < player.cs->tcnt) { - player.audioposition = 0; - - // here we need to compute silence - - if (player.audiostart - player.cs->tracks[track].start > - player.cs->tracks[track].pregap) - player.silence = 0; - else - player.silence = (player.cs->tracks[track].pregap - - player.audiostart + - player.cs->tracks[track].start) * RAW_SECTOR_SIZE; - - player.fileoffset = player.cs->tracks[track].fileoffset; - - D(bug("file offset %d\n", (unsigned int) player.fileoffset)); - - // fix up file offset if beyond the silence bytes - - if (!player.silence) // not at the beginning - player.fileoffset += (player.audiostart - - player.cs->tracks[track].start - - player.cs->tracks[track].pregap) * RAW_SECTOR_SIZE; - - FramesToMSF(player.cs->tracks[track].start, &msf); - D(bug("CDPlay_bincue track %02d start %02d:%02d:%02d silence %d", - player.cs->tracks[track].number, msf.m, msf.s, msf.f, - player.silence/RAW_SECTOR_SIZE)); - D(bug(" Stop %02u:%02u:%02u\n", end_m, end_s, end_f)); - } - else - D(bug("CDPlay_bincue: play beyond last track !\n")); - -#ifdef USE_SDL_AUDIO - SDL_UnlockAudio(); -#endif - - if (audio_enabled) { - player.audiostatus = CDROM_AUDIO_PLAY; -#ifdef OSX_CORE_AUDIO - D(bug("starting os x sound")); - player.soundoutput.setCallback(bincue_core_audio_callback); - // should be from current track ! - player.soundoutput.start(16, 2, 44100); -#endif - return true; - } - } - return false; -} - -static uint8 *fill_buffer(int stream_len) -{ - static uint8 *buf = 0; - static int bufsize = 0; - int offset = 0; - - if (bufsize < stream_len) { - free(buf); - buf = (uint8 *) malloc(stream_len); - if (buf) { - bufsize = stream_len; - } - else { - D(bug("malloc failed \n")); - return NULL; - } - } - - memset(buf, silence_byte, stream_len); - - if (player.audiostatus == CDROM_AUDIO_PLAY) { - int remaining_silence = player.silence - player.audioposition; - - if (player.audiostart + player.audioposition/RAW_SECTOR_SIZE - >= player.audioend) { - player.audiostatus = CDROM_AUDIO_COMPLETED; - return buf; - } - - if (remaining_silence >= stream_len) { - player.audioposition += stream_len; - return buf; - } - - if (remaining_silence > 0) { - offset += remaining_silence; - player.audioposition += remaining_silence; - } - - int ret = 0; - int available = ((player.audioend - player.audiostart) * - RAW_SECTOR_SIZE) - player.audioposition; - if (available > (stream_len - offset)) - available = stream_len - offset; - - if (lseek(player.audiofh, - player.fileoffset + player.audioposition - player.silence, - SEEK_SET) < 0) - return NULL; - - if (available < 0) { - player.audioposition += available; // correct end !; - available = 0; - } - - if ((ret = read(player.audiofh, &buf[offset], available)) >= 0) { - player.audioposition += ret; - offset += ret; - available -= ret; - } - - while (offset < stream_len) { - buf[offset++] = silence_byte; - if (available-- > 0){ - player.audioposition++; - } - } - } - return buf; -} - - -#ifdef USE_SDL_AUDIO -void MixAudio_bincue(uint8 *stream, int stream_len) -{ - uint8 *buf; - if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { - if (buf = fill_buffer(stream_len)) - SDL_MixAudio(stream, buf, stream_len, SDL_MIX_MAXVOLUME); - } -} - -void OpenAudio_bincue(int freq, int format, int channels, uint8 silence) -{ - if (freq == 44100 && format == AUDIO_S16MSB && channels == 2) { - audio_enabled = true; - silence_byte = silence; - } - else { - D(bug("unexpected frequency %d , format %d, or channels %d\n", - freq, format, channels)); - } -} -#endif - -#ifdef OSX_CORE_AUDIO -static int bincue_core_audio_callback(void) -{ - int frames = player.soundoutput.bufferSizeFrames(); - uint8 *buf = fill_buffer(frames*4); - - // D(bug("Audio request %d\n", stream_len)); - - player.soundoutput.sendAudioBuffer((void *) buf, (buf ? frames : 0)); - - return 1; -} -#endif diff --git a/BasiliskII/src/Unix/bincue_unix.h b/BasiliskII/src/Unix/bincue_unix.h deleted file mode 100644 index dbf5d8b58..000000000 --- a/BasiliskII/src/Unix/bincue_unix.h +++ /dev/null @@ -1,43 +0,0 @@ -/* - * bincue_unix.h -- support for cdrom image files in bin/cue format - * - * (C) 2010 Geoffrey Brown - * - * 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 BINCUE_H -#define BINCUE_H - -extern void *open_bincue(const char *name); -extern bool readtoc_bincue(void *, uint8 *); -extern size_t read_bincue(void *, void *, loff_t, size_t); -extern loff_t size_bincue(void *); -extern void close_bincue(void *); - -extern bool GetPosition_bincue(void *, uint8 *); - -extern bool CDPlay_bincue(void *, uint8, uint8, - uint8, uint8, uint8, uint8); -extern bool CDPause_bincue(void *); -extern bool CDResume_bincue(void *); -extern bool CDStop_bincue(void *); - -#ifdef USE_SDL_AUDIO -extern void OpenAudio_bincue(int, int, int, uint8); -extern void MixAudio_bincue(uint8 *, int); -#endif - -#endif diff --git a/BasiliskII/src/Unix/clip_unix.cpp b/BasiliskII/src/Unix/clip_unix.cpp deleted file mode 100644 index e2a5edfbd..000000000 --- a/BasiliskII/src/Unix/clip_unix.cpp +++ /dev/null @@ -1,691 +0,0 @@ -/* - * clip_unix.cpp - Clipboard handling, Unix implementation - * - * SheepShaver (C) Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - * We must have (fast) X11 display locking routines. Otherwise, we - * can corrupt the X11 event queue from the emulator thread whereas - * the redraw thread is expected to handle them. - * - * Two functions are exported to video_x.cpp: - * - ClipboardSelectionClear() - * called when we lose the selection ownership - * - ClipboardSelectionRequest() - * called when another client wants our clipboard data - * The display is locked by the redraw thread during their execution. - * - * On PutScrap (Mac application wrote to clipboard), we always cache - * the Mac clipboard to a local structure (clip_data). Then, the - * selection ownership is grabbed until ClipboardSelectionClear() - * occurs. In that case, contents in cache becomes invalid. - * - * On GetScrap (Mac application reads clipboard), we always fetch - * data from the X11 clipboard and immediately put it back to Mac - * side. Local cache does not need to be updated. If the selection - * owner supports the TIMESTAMP target, we can avoid useless copies. - * - * For safety purposes, we lock the X11 display in the emulator - * thread during the whole GetScrap/PutScrap execution. Of course, we - * temporarily release the lock when waiting for SelectioNotify. - * - * TODO: - * - handle 'PICT' to image/png, image/ppm, PIXMAP (prefs order) - * - handle 'styl' to text/richtext (OOo Writer) - * - patch ZeroScrap so that we know when cached 'styl' is stale? - */ - -#include "sysdeps.h" - -#include -#include -#include -#include - -#include "macos_util.h" -#include "clip.h" -#include "prefs.h" -#include "cpu_emulation.h" -#include "main.h" -#include "emul_op.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef NO_STD_NAMESPACE -using std::vector; -#endif - - -// Do we want GetScrap() to check for TIMESTAMP and optimize out clipboard syncs? -#define GETSCRAP_REQUESTS_TIMESTAMP 0 - -// Do we want GetScrap() to first check for TARGETS available from the clipboard? -#define GETSCRAP_REQUESTS_TARGETS 0 - - -// From main_linux.cpp -extern Display *x_display; - - -// Conversion tables -static const uint8 mac2iso[0x80] = { - 0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1, - 0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8, - 0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3, - 0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc, - 0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf, - 0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8, - 0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53, - 0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8, - 0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab, - 0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f, - 0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20, - 0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66, - 0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1, - 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4, - 0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e, - 0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20 -}; - -static const uint8 iso2mac[0x80] = { - 0xad, 0xb0, 0xe2, 0xc4, 0xe3, 0xc9, 0xa0, 0xe0, - 0xf6, 0xe4, 0xde, 0xdc, 0xce, 0xb2, 0xb3, 0xb6, - 0xb7, 0xd4, 0xd5, 0xd2, 0xd3, 0xa5, 0xd0, 0xd1, - 0xf7, 0xaa, 0xdf, 0xdd, 0xcf, 0xba, 0xfd, 0xd9, - 0xca, 0xc1, 0xa2, 0xa3, 0xdb, 0xb4, 0xbd, 0xa4, - 0xac, 0xa9, 0xbb, 0xc7, 0xc2, 0xf0, 0xa8, 0xf8, - 0xa1, 0xb1, 0xc3, 0xc5, 0xab, 0xb5, 0xa6, 0xe1, - 0xfc, 0xc6, 0xbc, 0xc8, 0xf9, 0xda, 0xd7, 0xc0, - 0xcb, 0xe7, 0xe5, 0xcc, 0x80, 0x81, 0xae, 0x82, - 0xe9, 0x83, 0xe6, 0xe8, 0xed, 0xea, 0xeb, 0xec, - 0xf5, 0x84, 0xf1, 0xee, 0xef, 0xcd, 0x85, 0xfb, - 0xaf, 0xf4, 0xf2, 0xf3, 0x86, 0xfa, 0xb8, 0xa7, - 0x88, 0x87, 0x89, 0x8b, 0x8a, 0x8c, 0xbe, 0x8d, - 0x8f, 0x8e, 0x90, 0x91, 0x93, 0x92, 0x94, 0x95, - 0xfe, 0x96, 0x98, 0x97, 0x99, 0x9b, 0x9a, 0xd6, - 0xbf, 0x9d, 0x9c, 0x9e, 0x9f, 0xff, 0xb9, 0xd8 -}; - -// Flag: Don't convert clipboard text -static bool no_clip_conversion; - -// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Unix side -static bool we_put_this_data = false; - -// X11 variables -static int screen; // Screen number -static Window rootwin, clip_win; // Root window and the clipboard window -static Atom xa_clipboard; -static Atom xa_targets; -static Atom xa_multiple; -static Atom xa_timestamp; -static Atom xa_atom_pair; - -// Define a byte array (rewrite if it's a bottleneck) -struct ByteArray : public vector { - void resize(int size) { reserve(size); vector::resize(size); } - uint8 *data() { return &(*this)[0]; } -}; - -// Clipboard data for requestors -struct ClipboardData { - Time time; - Atom type; - ByteArray data; -}; -static ClipboardData clip_data; - -// Prototypes -static void do_putscrap(uint32 type, void *scrap, int32 length); -static void do_getscrap(void **handle, uint32 type, int32 offset); - - -/* - * Read an X11 property (hack from QT 3.1.2) - */ - -static inline int max_selection_incr(Display *dpy) -{ - int max_request_size = 4 * XMaxRequestSize(dpy); - if (max_request_size > 4 * 65536) - max_request_size = 4 * 65536; - else if ((max_request_size -= 100) < 0) - max_request_size = 100; - return max_request_size; -} - -static bool read_property(Display *dpy, Window win, - Atom property, bool deleteProperty, - ByteArray & buffer, int *size, Atom *type, - int *format, bool nullterm) -{ - int maxsize = max_selection_incr(dpy); - unsigned long bytes_left; - unsigned long length; - unsigned char *data; - Atom dummy_type; - int dummy_format; - - if (!type) - type = &dummy_type; - if (!format) - format = &dummy_format; - - // Don't read anything but get the size of the property data - if (XGetWindowProperty(dpy, win, property, 0, 0, False, - AnyPropertyType, type, format, &length, &bytes_left, &data) != Success) { - buffer.clear(); - return false; - } - XFree(data); - - int offset = 0, buffer_offset = 0, format_inc = 1, proplen = bytes_left; - - switch (*format) { - case 16: - format_inc = sizeof(short) / 2; - proplen *= format_inc; - break; - case 32: - format_inc = sizeof(long) / 4; - proplen *= format_inc; - break; - } - - buffer.resize(proplen + (nullterm ? 1 : 0)); - while (bytes_left) { - if (XGetWindowProperty(dpy, win, property, offset, maxsize / 4, - False, AnyPropertyType, type, format, - &length, &bytes_left, &data) != Success) - break; - - offset += length / (32 / *format); - length *= format_inc * (*format / 8); - - memcpy(buffer.data() + buffer_offset, data, length); - buffer_offset += length; - XFree(data); - } - - if (nullterm) - buffer[buffer_offset] = '\0'; - - if (size) - *size = buffer_offset; - - if (deleteProperty) - XDeleteProperty(dpy, win, property); - - XFlush(dpy); - return true; -} - - -/* - * Timed wait for a SelectionNotify event - */ - -static const uint64 SELECTION_MAX_WAIT = 500000; // 500 ms - -static bool wait_for_selection_notify_event(Display *dpy, Window win, XEvent *event, int timeout) -{ - uint64 start = GetTicks_usec(); - - do { - // Wait - XDisplayUnlock(); - Delay_usec(5000); - XDisplayLock(); - - // Check for SelectionNotify event - if (XCheckTypedWindowEvent(dpy, win, SelectionNotify, event)) - return true; - - } while ((GetTicks_usec() - start) < timeout); - - return false; -} - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); - - // Find screen and root window - screen = XDefaultScreen(x_display); - rootwin = XRootWindow(x_display, screen); - - // Create fake window to receive selection events - clip_win = XCreateSimpleWindow(x_display, rootwin, 0, 0, 1, 1, 0, 0, 0); - - // Initialize X11 atoms - xa_clipboard = XInternAtom(x_display, "CLIPBOARD", False); - xa_targets = XInternAtom(x_display, "TARGETS", False); - xa_multiple = XInternAtom(x_display, "MULTIPLE", False); - xa_timestamp = XInternAtom(x_display, "TIMESTAMP", False); - xa_atom_pair = XInternAtom(x_display, "ATOM_PAIR", False); -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ - // Close window - if (clip_win) - XDestroyWindow(x_display, clip_win); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %p, length %ld\n", type, scrap, length)); - if (we_put_this_data) { - we_put_this_data = false; - return; - } - if (length <= 0) - return; - - XDisplayLock(); - do_putscrap(type, scrap, length); - XDisplayUnlock(); -} - -static void do_putscrap(uint32 type, void *scrap, int32 length) -{ - clip_data.type = None; - switch (type) { - case FOURCC('T','E','X','T'): { - D(bug(" clipping TEXT\n")); - clip_data.type = XA_STRING; - clip_data.data.clear(); - clip_data.data.reserve(length); - - // Convert text from Mac charset to ISO-Latin1 - uint8 *p = (uint8 *)scrap; - for (int i=0; i LF - c = 10; - } else if (!no_clip_conversion) - c = mac2iso[c & 0x7f]; - clip_data.data.push_back(c); - } - break; - } - - case FOURCC('s','t','y','l'): { - D(bug(" clipping styl\n")); - uint16 *p = (uint16 *)scrap; - uint16 n = ntohs(*p++); - D(bug(" %d styles (%d bytes)\n", n, length)); - for (int i = 0; i < n; i++) { - uint32 offset = ntohl(*(uint32 *)p); p += 2; - uint16 line_height = ntohs(*p++); - uint16 font_ascent = ntohs(*p++); - uint16 font_family = ntohs(*p++); - uint16 style_code = ntohs(*p++); - uint16 char_size = ntohs(*p++); - uint16 r = ntohs(*p++); - uint16 g = ntohs(*p++); - uint16 b = ntohs(*p++); - D(bug(" offset=%d, height=%d, font ascent=%d, id=%d, style=%x, size=%d, RGB=%x/%x/%x\n", - offset, line_height, font_ascent, font_family, style_code, char_size, r, g, b)); - } - break; - } - } - - // Acquire selection ownership - if (clip_data.type != None) { - clip_data.time = CurrentTime; - while (XGetSelectionOwner(x_display, xa_clipboard) != clip_win) - XSetSelectionOwner(x_display, xa_clipboard, clip_win, clip_data.time); - } -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); - - XDisplayLock(); - do_getscrap(handle, type, offset); - XDisplayUnlock(); -} - -static void do_getscrap(void **handle, uint32 type, int32 offset) -{ - ByteArray data; - XEvent event; - - // If we own the selection, the data is already available on MacOS side - if (XGetSelectionOwner(x_display, xa_clipboard) == clip_win) - return; - - // Check TIMESTAMP -#if GETSCRAP_REQUESTS_TIMESTAMP - static Time last_timestamp = 0; - XConvertSelection(x_display, xa_clipboard, xa_timestamp, xa_clipboard, clip_win, CurrentTime); - if (wait_for_selection_notify_event(x_display, clip_win, &event, SELECTION_MAX_WAIT) && - event.xselection.property != None && - read_property(x_display, - event.xselection.requestor, event.xselection.property, - true, data, 0, 0, 0, false)) { - Time timestamp = ((long *)data.data())[0]; - if (timestamp <= last_timestamp) - return; - } - last_timestamp = CurrentTime; -#endif - - // Get TARGETS available -#if GETSCRAP_REQUESTS_TARGETS - XConvertSelection(x_display, xa_clipboard, xa_targets, xa_clipboard, clip_win, CurrentTime); - if (!wait_for_selection_notify_event(x_display, clip_win, &event, SELECTION_MAX_WAIT) || - event.xselection.property == None || - !read_property(x_display, - event.xselection.requestor, event.xselection.property, - true, data, 0, 0, 0, false)) - return; -#endif - - // Get appropriate format for requested data - Atom format = None; -#if GETSCRAP_REQUESTS_TARGETS - int n_atoms = data.size() / sizeof(long); - long *atoms = (long *)data.data(); - for (int i = 0; i < n_atoms; i++) { - Atom target = atoms[i]; - D(bug(" target %08x (%s)\n", target, XGetAtomName(x_display, target))); - switch (type) { - case FOURCC('T','E','X','T'): - D(bug(" clipping TEXT\n")); - if (target == XA_STRING) - format = target; - break; - case FOURCC('P','I','C','T'): - break; - } - } -#else - switch (type) { - case FOURCC('T','E','X','T'): - D(bug(" clipping TEXT\n")); - format = XA_STRING; - break; - case FOURCC('P','I','C','T'): - break; - } -#endif - if (format == None) - return; - - // Get the native clipboard data - XConvertSelection(x_display, xa_clipboard, format, xa_clipboard, clip_win, CurrentTime); - if (!wait_for_selection_notify_event(x_display, clip_win, &event, SELECTION_MAX_WAIT) || - event.xselection.property == None || - !read_property(x_display, - event.xselection.requestor, event.xselection.property, - false, data, 0, 0, 0, format == XA_STRING)) - return; - - // Allocate space for new scrap in MacOS side - M68kRegisters r; - r.d[0] = data.size(); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 scrap_area = r.a[0]; - - if (scrap_area) { - switch (type) { - case FOURCC('T','E','X','T'): - // Convert text from ISO-Latin1 to Mac charset - uint8 *p = Mac2HostAddr(scrap_area); - for (int i = 0; i < data.size(); i++) { - uint8 c = data[i]; - if (c < 0x80) { - if (c == 10) // LF -> CR - c = 13; - } else if (!no_clip_conversion) - c = iso2mac[c & 0x7f]; - *p++ = c; - } - break; - } - - // Add new data to clipboard - static uint8 proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0xa9, 0xfc, // ZeroScrap() - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) - 0xa9, 0xfe, // PutScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 proc_area = r.a[0]; - - // The procedure is run-time generated because it must lays in - // Mac address space. This is mandatory for "33-bit" address - // space optimization on 64-bit platforms because the static - // proc[] array is not remapped - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt32(proc_area + 6, data.size()); - WriteMacInt32(proc_area + 12, type); - WriteMacInt32(proc_area + 18, scrap_area); - we_put_this_data = true; - Execute68k(proc_area, &r); - - // We are done with scratch memory - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - r.a[0] = scrap_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } -} - - -/* - * Handle X11 selection events - */ - -void ClipboardSelectionClear(XSelectionClearEvent *xev) -{ - if (xev->selection != xa_clipboard) - return; - - D(bug("Selection cleared, lost clipboard ownership\n")); - clip_data.type = None; - clip_data.data.clear(); -} - -// Top level selection handler -static bool handle_selection(XSelectionRequestEvent *req, bool is_multiple); - -static bool handle_selection_TIMESTAMP(XSelectionRequestEvent *req) -{ - // 32-bit integer values are always passed as a long whatever is its size - long timestamp = clip_data.time; - - // Change requestor property - XChangeProperty(x_display, req->requestor, req->property, - XA_INTEGER, 32, - PropModeReplace, (uint8 *)×tamp, 1); - - return true; -} - -static bool handle_selection_TARGETS(XSelectionRequestEvent *req) -{ - // Default supported targets - vector targets; - targets.push_back(xa_targets); - targets.push_back(xa_multiple); - targets.push_back(xa_timestamp); - - // Extra targets matchin current clipboard data - if (clip_data.type != None) - targets.push_back(clip_data.type); - - // Change requestor property - XChangeProperty(x_display, req->requestor, req->property, - xa_targets, 32, - PropModeReplace, (uint8 *)&targets[0], targets.size()); - - return true; -} - -static bool handle_selection_STRING(XSelectionRequestEvent *req) -{ - // Make sure we have valid data to send though ICCCM compliant - // clients should have first requested TARGETS to identify - // this possibility. - if (clip_data.type != XA_STRING) - return false; - - // Send the string, it's already encoded as ISO-8859-1 - XChangeProperty(x_display, req->requestor, req->property, - XA_STRING, 8, - PropModeReplace, (uint8 *)clip_data.data.data(), clip_data.data.size()); - - return true; -} - -static bool handle_selection_MULTIPLE(XSelectionRequestEvent *req) -{ - Atom rtype; - int rformat; - ByteArray data; - - if (!read_property(x_display, req->requestor, req->property, - false, data, 0, &rtype, &rformat, 0)) - return false; - - // rtype should be ATOM_PAIR but some clients don't honour that - if (rformat != 32) - return false; - - struct AtomPair { long target; long property; }; - AtomPair *atom_pairs = (AtomPair *)data.data(); - int n_atom_pairs = data.size() / sizeof(AtomPair); - - bool handled = true; - if (n_atom_pairs) { - // Setup a new XSelectionRequestEvent when servicing individual requests - XSelectionRequestEvent event; - memcpy(&event, req, sizeof(event)); - - for (int i = 0; i < n_atom_pairs; i++) { - Atom target = atom_pairs[i].target; - Atom property = atom_pairs[i].property; - - // None is not a valid property - if (property == None) - continue; - - // Service this request - event.target = target; - event.property = property; - if (!handle_selection(&event, true)) { - /* FIXME: ICCCM 2.6.2: - - If the owner fails to convert the target named by an - atom in the MULTIPLE property, it should replace that - atom in the property with None. - */ - handled = false; - } - } - } - - return handled; -} - -static bool handle_selection(XSelectionRequestEvent *req, bool is_multiple) -{ - bool handled =false; - - if (req->target == xa_timestamp) { - handled = handle_selection_TIMESTAMP(req); - } else if (req->target == xa_targets) { - handled = handle_selection_TARGETS(req); - } else if (req->target == XA_STRING) { - handled = handle_selection_STRING(req); - } else if (req->target == xa_multiple) { - handled = handle_selection_MULTIPLE(req); - } - - // Notify requestor only when we are done with his request - if (handled && !is_multiple) { - XEvent out_event; - out_event.xselection.type = SelectionNotify; - out_event.xselection.requestor = req->requestor; - out_event.xselection.selection = req->selection; - out_event.xselection.target = req->target; - out_event.xselection.property = req->property; - out_event.xselection.time = req->time; - XSendEvent(x_display, req->requestor, False, 0, &out_event); - } - - return handled; -} - -void ClipboardSelectionRequest(XSelectionRequestEvent *req) -{ - if (req->requestor == clip_win || req->selection != xa_clipboard) - return; - - D(bug("Selection requested from 0x%lx to 0x%lx (%s) 0x%lx (%s)\n", - req->requestor, - req->selection, - XGetAtomName(req->display, req->selection), - req->target, - XGetAtomName(req->display, req->target))); - - handle_selection(req, false); -} diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index b8aa82c8e..ffba2f414 100644 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -16,40 +16,20 @@ dnl Some systems do not put corefiles in the currect directory, avoid saving dnl cores for the configure tests since some are intended to dump core. ulimit -c 0 -AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI prefs editor [default=no]], [WANT_STANDALONE_GUI=$enableval], [WANT_STANDALONE_GUI=no]) - -dnl Mac OS X GUI. -AC_ARG_ENABLE(macosx-gui, [ --enable-macosx-gui enable Mac OS X GUI [default=no]], [WANT_MACOSX_GUI=$enableval], [WANT_MACOSX_GUI=no]) - -dnl Mac OS X Sound -AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) - dnl Video options. -AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) -AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) -AC_ARG_ENABLE(fbdev-dga, [ --enable-fbdev-dga use direct frame buffer access via /dev/fb [default=yes]], [WANT_FBDEV_DGA=$enableval], [WANT_FBDEV_DGA=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) dnl SDL options. AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=no]) AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) -AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) -AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) - -dnl JIT compiler options. -AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=no]) -AC_ARG_ENABLE(jit-debug, [ --enable-jit-debug activate native code disassemblers [default=no]], [WANT_JIT_DEBUG=$enableval], [WANT_JIT_DEBUG=no]) dnl FPU emulation core. AC_ARG_ENABLE(fpe, [ --enable-fpe=FPE specify which fpu emulator to use [default=auto]], [ case "$enableval" in dnl default is always ieee, if architecture has this fp format - auto) FPE_CORE_TEST_ORDER="ieee uae";; - ieee) FPE_CORE_TEST_ORDER="ieee";; uae) FPE_CORE_TEST_ORDER="uae";; - x86) FPE_CORE_TEST_ORDER="x86";; *) AC_MSG_ERROR([--enable-fpe takes only one of the following values: auto, x86, ieee, uae]);; esac ], @@ -70,35 +50,12 @@ AC_ARG_ENABLE(addressing, [ ADDRESSING_TEST_ORDER="direct banks" ]) -dnl External packages. -AC_ARG_WITH(esd, [ --with-esd support ESD for sound under Linux/FreeBSD [default=yes]], [WANT_ESD=$withval], [WANT_ESD=yes]) -AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], - [case "$withval" in - gtk1) WANT_GTK="gtk";; - gtk|gtk2) WANT_GTK="$withval";; - yes) WANT_GTK="gtk2 gtk";; - *) WANT_GTK="no";; - esac], - [WANT_GTK="gtk2 gtk"]) -AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=yes]) - -AC_ARG_WITH(bincue, - AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) - -AC_ARG_WITH(libvhd, - AS_HELP_STRING([--with-libvhd], [Enable VHD disk images])) - - dnl Canonical system information. AC_CANONICAL_HOST AC_CANONICAL_TARGET dnl Target OS type (target is host if not cross-compiling). case "$target_os" in - linux*) OS_TYPE=linux;; - netbsd*) OS_TYPE=netbsd;; - freebsd*) OS_TYPE=freebsd;; - solaris*) OS_TYPE=solaris;; darwin*) OS_TYPE=darwin;; *) OS_TYPE=`echo $target_os | sed -e 's/-/_/g' | sed -e 's/\./_/g'`;; esac @@ -106,15 +63,9 @@ DEFINES="$DEFINES -DOS_$OS_TYPE" dnl Target CPU type. HAVE_I386=no -HAVE_M68K=no -HAVE_SPARC=no -HAVE_POWERPC=no HAVE_X86_64=no case "$target_cpu" in i386* | i486* | i586* | i686* | i786* ) HAVE_I386=yes;; - m68k* ) HAVE_M68K=yes;; - sparc* ) HAVE_SPARC=yes;; - powerpc* ) HAVE_POWERPC=yes;; x86_64* | amd64* ) HAVE_X86_64=yes;; esac @@ -143,73 +94,17 @@ AC_PROG_MAKE_SET AC_PROG_INSTALL AC_PROG_EGREP -dnl We use mon if possible. -MONSRCS= -if [[ "x$WANT_MON" = "xyes" ]]; then - AC_MSG_CHECKING(for mon) - mon_srcdir=../../../mon/src - if grep mon_init $mon_srcdir/mon.h >/dev/null 2>/dev/null; then - AC_MSG_RESULT(yes) - AC_DEFINE(ENABLE_MON, 1, [Define if using "mon".]) - MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c $mon_srcdir/disass/mips-dis.c $mon_srcdir/disass/mips-opc.c $mon_srcdir/disass/mips16-opc.c" - CXXFLAGS="$CXXFLAGS -I$mon_srcdir -I$mon_srcdir/disass" - AC_CHECK_LIB(ncurses, tgetent, , - [AC_CHECK_LIB(termcap, tgetent, , - [AC_CHECK_LIB(termlib, tgetent, , - [AC_CHECK_LIB(terminfo, tgetent, , - [AC_CHECK_LIB(Hcurses, tgetent, , - [AC_CHECK_LIB(curses, tgetent)])])])])]) - AC_CHECK_LIB(readline, readline) - else - AC_MSG_RESULT(no) - AC_MSG_WARN([Could not find mon, ignoring --with-mon.]) - WANT_MON=no - fi -fi - dnl Checks for libraries. AC_CHECK_LIB(posix4, sem_init) AC_CHECK_LIB(rt, timer_create) AC_CHECK_LIB(rt, shm_open) AC_CHECK_LIB(m, cos) -dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES) -dnl AC_TRY_LINK uses main() but SDL needs main to take args, -dnl therefore main is undefined with #undef. -dnl Framework can be in an custom location. -AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ - AS_VAR_PUSHDEF([ac_Framework], [ac_cv_framework_$1]) - AC_CACHE_CHECK([whether compiler supports framework $1], - ac_Framework, [ - saved_LIBS="$LIBS" - LIBS="$LIBS -framework $1" - if [[ "x$SDL_FRAMEWORK" != "x/Library/Frameworks" ]]; then - if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then - LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" - fi - fi - saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL.framework/Headers" - AC_TRY_LINK( - [$2 -#undef main], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); -LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"] - ) - ]) - AS_IF([test AS_VAR_GET(ac_Framework) = yes], - [AC_DEFINE(AS_TR_CPP(HAVE_FRAMEWORK_$1), 1, [Define if framework $1 is available.])] - ) - AS_VAR_POPDEF([ac_Framework]) -]) dnl Do we need SDL? WANT_SDL=no if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then WANT_SDL=yes - WANT_XF86_DGA=no - WANT_XF86_VIDMODE=no - WANT_FBDEV_DGA=no SDL_SUPPORT="$SDL_SUPPORT video" fi if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then @@ -217,86 +112,36 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then SDL_SUPPORT="$SDL_SUPPORT audio" fi if [[ "x$WANT_SDL" = "xyes" ]]; then - if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ]) + + AC_PATH_PROG(sdl_config, "sdl-config") + if [[ -n "$sdl_config" ]]; then + case $target_os in + *) + sdl_cflags=`$sdl_config --cflags` + if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then + sdl_libs=`$sdl_config --static-libs` + else + sdl_libs=`$sdl_config --libs` + fi + ;; + esac + CFLAGS="$CFLAGS $sdl_cflags" + CXXFLAGS="$CXXFLAGS $sdl_cflags" + LIBS="$LIBS $sdl_libs" else - ac_cv_framework_SDL=no - fi - if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - AC_PATH_PROG(sdl_config, "sdl-config") - if [[ -n "$sdl_config" ]]; then - case $target_os in - # Special treatment for Cygwin so that we can still use the POSIX layer - *cygwin*) - sdl_cflags="-I`$sdl_config --prefix`/include/SDL" - sdl_libs="-L`$sdl_config --exec-prefix`/lib -lSDL" - ;; - *) - sdl_cflags=`$sdl_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl_libs=`$sdl_config --static-libs` - else - sdl_libs=`$sdl_config --libs` - fi - ;; - esac - CFLAGS="$CFLAGS $sdl_cflags" - CXXFLAGS="$CXXFLAGS $sdl_cflags" - LIBS="$LIBS $sdl_libs" - else - WANT_SDL=no - fi + WANT_SDL=no fi + SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` else SDL_SUPPORT="none" fi -dnl We need X11, if not using SDL. -if [[ "x$WANT_SDL_VIDEO" = "xno" ]]; then - AC_PATH_XTRA - if [[ "x$no_x" = "xyes" ]]; then - AC_MSG_ERROR([You need X11 to run Basilisk II.]) - fi - CFLAGS="$CFLAGS $X_CFLAGS" - CXXFLAGS="$CXXFLAGS $X_CFLAGS" - LIBS="$LIBS $X_PRE_LIBS $X_LIBS -lX11 -lXext $X_EXTRA_LIBS" -fi - -dnl BINCUE -AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) -AS_IF([test "x$have_bincue" = "xyes" ], [ - if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then - DEFINES="$DEFINES -DBINCUE" - else - AC_MSG_ERROR([You need SDL Audio to use BINCUE support.]) - fi -]) - -dnl LIBVHD -AS_IF([test "x$with_libvhd" = "xyes" ], [have_libvhd=yes], [have_libvhd=no]) -AS_IF([test "x$have_libvhd" = "xyes" ], [ - CPPFLAGS="$CPPFLAGS -DHAVE_LIBVHD" - LIBS="$LIBS -lvhd" - case $target_os in - linux*) - LIBS="$LIBS -luuid" - esac - AC_CHECK_LIB(vhd, vhd_open) - AC_CHECK_LIB(vhd, vhd_io_read) - AC_CHECK_LIB(vhd, vhd_io_write) - AC_CHECK_LIB(vhd, vhd_close) -]) - - - -dnl We want pthreads. Try libpthread first, then libc_r (FreeBSD), then PTL. +dnl We want pthreads. Try libpthread first, then PTL. HAVE_PTHREADS=yes AC_CHECK_LIB(pthread, pthread_create, , [ - AC_CHECK_LIB(c_r, pthread_create, , [ - AC_CHECK_LIB(PTL, pthread_create, , [ - HAVE_PTHREADS=no - ]) + AC_CHECK_LIB(PTL, pthread_create, , [ + HAVE_PTHREADS=no ]) ]) if [[ "x$HAVE_PTHREADS" = "xyes" ]]; then @@ -316,103 +161,7 @@ AC_CHECK_FUNCS(sem_init, , [ fi ]) -dnl We use DGA (XFree86 or fbdev) if possible. -if [[ "x$WANT_XF86_DGA" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86dga, XF86DGAQueryExtension, [ - AC_DEFINE(ENABLE_XF86_DGA, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86dga" - if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_MSG_WARN([Cannot have both --enable-xf86-dga and --enable-fbdev-dga, ignoring --enable-fbdev-dga.]) - WANT_FBDEV_DGA=no - fi - ], [ - AC_MSG_WARN([Could not find XFree86 DGA extension, ignoring --enable-xf86-dga.]) - WANT_XF86_DGA=no - ]) -fi -if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_DEFINE(ENABLE_FBDEV_DGA, 1, [Define if using DGA with framebuffer device.]) -fi - -dnl We use XFree86 VidMode if possible. -if [[ "x$WANT_XF86_VIDMODE" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86vm, XF86VidModeQueryExtension, [ - AC_DEFINE(ENABLE_XF86_VIDMODE, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86vm" - ], [ - AC_MSG_WARN([Could not find XFree86 VidMode extension, ignoring --enable-xf86-vidmode.]) - WANT_XF86_VIDMODE=no - ]) -fi - -dnl We use GTK+ if possible. UISRCS=../dummy/prefs_editor_dummy.cpp -case "x$WANT_GTK" in -xgtk2*) - AM_PATH_GTK_2_0(1.3.15, [ - GUI_CFLAGS="$GTK_CFLAGS" - GUI_LIBS="$GTK_LIBS" - WANT_GTK=gtk2 - ], [ - case "x${WANT_GTK}x" in - *gtkx) - AC_MSG_WARN([Could not find GTK+ 2.0, trying with GTK+ 1.2.]) - WANT_GTK=gtk - ;; - *) - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) - WANT_GTK=no - ;; - esac - ]) - ;; -esac -if [[ "x$WANT_GTK" = "xgtk" ]]; then - AM_PATH_GTK(1.2.0, [ - GUI_CFLAGS="$GTK_CFLAGS" - GUI_LIBS="$GTK_LIBS" - dnl somehow, would redefine gettext() to nothing if - dnl ENABLE_NLS is not set, thusly conflicting with C++ which - dnl includes - AM_GNU_GETTEXT - B2_PATH_GNOMEUI([ - AC_DEFINE(HAVE_GNOMEUI, 1, [Define if libgnomeui is available.]) - GUI_CFLAGS="$GUI_CFLAGS $GNOMEUI_CFLAGS" - GUI_LIBS="$GUI_LIBS $GNOMEUI_LIBS" - ], []) - ], [ - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) - WANT_GTK=no - ]) -fi -if [[ "x$WANT_GTK" != "xno" -a "x$WANT_STANDALONE_GUI" = "xno" ]]; then - AC_DEFINE(ENABLE_GTK, 1, [Define if using GTK.]) - UISRCS=prefs_editor_gtk.cpp -fi -AC_SUBST(GUI_CFLAGS) -AC_SUBST(GUI_LIBS) - -dnl Build external GUI if requested. -if [[ "$WANT_STANDALONE_GUI" != "yes" ]]; then - WANT_STANDALONE_GUI=no -fi -if [[ "$WANT_GTK" = "no" ]]; then - WANT_STANDALONE_GUI=no -fi -AC_SUBST(STANDALONE_GUI, [$WANT_STANDALONE_GUI]) - -dnl We use ESD if possible. -if [[ "x$WANT_ESD" = "xyes" ]]; then - AM_PATH_ESD(0.2.8, [ - AC_DEFINE(ENABLE_ESD, 1, [Define is using ESD.]) - CFLAGS="$CFLAGS $ESD_CFLAGS" - CXXFLAGS="$CXXFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" - ], [ - AC_MSG_WARN([Could not find ESD, disabling ESD support.]) - WANT_ESD=no - ]) -fi dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE @@ -425,14 +174,6 @@ AC_CHECK_HEADERS(readline.h history.h readline/readline.h readline/history.h) AC_CHECK_HEADERS(sys/socket.h sys/ioctl.h sys/filio.h sys/bitypes.h sys/wait.h) AC_CHECK_HEADERS(sys/poll.h sys/select.h) AC_CHECK_HEADERS(arpa/inet.h) -AC_CHECK_HEADERS(linux/if.h linux/if_tun.h net/if.h net/if_tun.h, [], [], [ -#ifdef HAVE_SYS_TYPES_H -#include -#endif -#ifdef HAVE_SYS_SOCKET_H -#include -#endif -]) AC_CHECK_HEADERS(AvailabilityMacros.h) AC_CHECK_HEADERS(IOKit/storage/IOBlockStorageDevice.h) AC_CHECK_HEADERS(sys/stropts.h stropts.h) @@ -485,58 +226,6 @@ AC_CHECK_FUNCS(poll inet_aton) dnl Darwin seems to define mach_task_self() instead of task_self(). AC_CHECK_FUNCS(mach_task_self task_self) -dnl Check for headers and functions related to pty support (sshpty.c) -dnl From openssh-3.2.2p1 configure.ac - -AC_CHECK_HEADERS(strings.h login.h sys/bsdtty.h sys/stat.h util.h pty.h) -AC_CHECK_FUNCS(_getpty vhangup strlcpy) - -case "$host" in -*-*-hpux10.26) - disable_ptmx_check=yes - ;; -*-*-linux*) - no_dev_ptmx=1 - ;; -mips-sony-bsd|mips-sony-newsos4) - AC_DEFINE(HAVE_NEWS4, 1, [Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for sshpty.c).]) - ;; -*-*-sco3.2v4*) - no_dev_ptmx=1 - ;; -*-*-sco3.2v5*) - no_dev_ptmx=1 - ;; -*-*-cygwin*) - no_dev_ptmx=1 - ;; -*-*-darwin*) - no_dev_ptmx=1 - LIBS="$LIBS -lstdc++" - ;; -*-*-freebsd*) - no_dev_ptmx=1 - ;; -esac - -if test -z "$no_dev_ptmx" ; then - if test "x$disable_ptmx_check" != "xyes" ; then - AC_CHECK_FILE([/dev/ptmx], - [ - AC_DEFINE_UNQUOTED(HAVE_DEV_PTMX, 1, [Define if you have /dev/ptmx.]) - have_dev_ptmx=1 - ] - ) - fi -fi -AC_CHECK_FILE([/dev/ptc], - [ - AC_DEFINE_UNQUOTED(HAVE_DEV_PTS_AND_PTC, 1, [Define if you have /dev/ptc.]) - have_dev_ptc=1 - ] -) -dnl (end of code from openssh-3.2.2p1 configure.ac) - dnl Check for systems where POSIX-style non-blocking I/O (O_NONBLOCK) dnl doesn't work or is unimplemented. On these systems (mostly older dnl ones), use the old BSD-style FIONBIO approach instead. [tcl.m4] @@ -616,191 +305,41 @@ AC_CHECK_FRAMEWORK(IOKit, [#include ]) AC_CHECK_FRAMEWORK(CoreFoundation, [#include ]) dnl Select system-dependant source files. -SERIALSRC=serial_unix.cpp +SERIALSRC=../dummy/serial_dummy.cpp ETHERSRC=../dummy/ether_dummy.cpp SCSISRC=../dummy/scsi_dummy.cpp AUDIOSRC=../dummy/audio_dummy.cpp EXTFSSRC=extfs_unix.cpp EXTRASYSSRCS= -CAN_NATIVE_M68K=no case "$target_os" in -linux*) - ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp - SCSISRC=Linux/scsi_linux.cpp - ;; -freebsd*) - ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp - DEFINES="$DEFINES -DBSD_COMP" - CXXFLAGS="$CXXFLAGS -fpermissive" - dnl Check for the CAM library - AC_CHECK_LIB(cam, cam_open_btl, HAVE_LIBCAM=yes, HAVE_LIBCAM=no) - if [[ "x$HAVE_LIBCAM" = "xno" ]]; then - AC_MSG_WARN([Cannot find libcam for SCSI management, disabling SCSI support.]) - else - dnl Check for the sys kernel includes - AC_CHECK_HEADER(camlib.h) - if [[ "x$ac_cv_header_camlib_h" = "xno" ]]; then - dnl In this case I should fix this thing including a "patch" - dnl to access directly to the functions in the kernel :) --Orlando - AC_MSG_WARN([Cannot find includes for CAM library, disabling SCSI support.]) - else - SCSISRC=FreeBSD/scsi_freebsd.cpp - LIBS="$LIBS -lcam" - DEFINES="$DEFINES -DCAM" - fi - fi - ;; -netbsd*) - CAN_NATIVE_M68K=yes - ETHERSRC=ether_unix.cpp - ;; -solaris*) - AUDIOSRC=Solaris/audio_solaris.cpp - DEFINES="$DEFINES -DBSD_COMP -D_POSIX_PTHREAD_SEMANTICS" - ;; -irix*) - AUDIOSRC=Irix/audio_irix.cpp - EXTRASYSSRCS=Irix/unaligned.c - LIBS="$LIBS -laudio" - WANT_ESD=no - - dnl Check if our compiler supports -IPA (MIPSPro) - HAVE_IPA=no - ocflags="$CFLAGS" - CFLAGS=`echo "$CFLAGS -IPA" | sed -e "s/-g//g"` - AC_MSG_CHECKING(if "-IPA" works) - dnl Do a test compile of an empty function - AC_TRY_COMPILE([#if defined __GNUC__ - # error GCC does not support IPA yet - #endif],, [AC_MSG_RESULT(yes); HAVE_IPA=yes], AC_MSG_RESULT(no)) - CFLAGS="$ocflags" - ;; darwin*) - ETHERSRC=ether_unix.cpp if [[ "x$ac_cv_framework_IOKit" = "xyes" -a "x$ac_cv_framework_CoreFoundation" = "xyes" ]]; then - EXTRASYSSRCS="../MacOSX/sys_darwin.cpp" - fi - if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then - EXTFSSRC=../MacOSX/extfs_macosx.cpp + EXTRASYSSRCS="Darwin/sys_darwin.cpp" fi ;; -cygwin*) - SERIALSRC="../dummy/serial_dummy.cpp" - EXTRASYSSRCS="../Windows/BasiliskII.rc" - ;; esac -dnl Is the slirp library supported? -case "$ac_cv_have_byte_bitfields" in -yes|"guessing yes") - CAN_SLIRP=yes - ETHERSRC=ether_unix.cpp - ;; -esac -if [[ -n "$CAN_SLIRP" ]]; then - AC_DEFINE(HAVE_SLIRP, 1, [Define if slirp library is supported]) - SLIRP_SRCS="\ - ../slirp/bootp.c ../slirp/ip_output.c ../slirp/tcp_input.c \ - ../slirp/cksum.c ../slirp/mbuf.c ../slirp/tcp_output.c \ - ../slirp/debug.c ../slirp/misc.c ../slirp/tcp_subr.c \ - ../slirp/if.c ../slirp/sbuf.c ../slirp/tcp_timer.c \ - ../slirp/ip_icmp.c ../slirp/slirp.c ../slirp/tftp.c \ - ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c" -fi -AC_SUBST(SLIRP_SRCS) - -if [[ "x$WANT_MACOSX_GUI" = "xyes" ]]; then - CPPFLAGS="$CPPFLAGS -I../MacOSX" - LIBS="$LIBS -framework CoreAudio -framework AudioUnit -framework AudioToolbox" - - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/Controller.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/Emulator.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/EmulatorView.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/PrefsEditor.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/NNThread.m" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/misc_macosx.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx.cpp" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/main_macosx.mm" - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/prefs_macosx.cpp" - - VIDEOSRCS="../MacOSX/video_macosx.mm" -else - EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" -fi - -if [[ "x$WANT_MACOSX_SOUND" = "xyes" ]]; then - AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" - LIBS="$LIBS -framework AudioToolbox -framework AudioUnit -framework CoreAudio" -fi +EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" dnl SDL overrides if [[ "x$WANT_SDL" = "xyes" ]]; then AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) - if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../SDL/SDLMain.m" - fi fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) VIDEOSRCS="../SDL/video_sdl.cpp" KEYCODES="../SDL/keycodes" - if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then - AC_MSG_CHECKING([whether __LP64__ is defined]) - AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if !defined(__LP64__) - # error __LP64__ not defined - #endif - ]])], - [AC_MSG_RESULT(yes); LP64_DEFINED=yes], - [AC_MSG_RESULT(no)]) - if [[ "x$LP64_DEFINED" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx64.mm ../pict.c" - else - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx.cpp" - fi - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/utils_macosx.mm" - CPPFLAGS="$CPPFLAGS -I../MacOSX" - else - case "$target_os" in - cygwin*) - EXTRASYSSRCS="$EXTRASYSSRCS ../Windows/clip_windows.cpp" - ;; - *) - EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" - ;; - esac - fi -elif [[ "x$WANT_MACOSX_GUI" != "xyes" ]]; then - VIDEOSRCS="video_x.cpp" - KEYCODES="keycodes" - EXTRASYSSRCS="$EXTRASYSSRCS clip_unix.cpp" + case "$target_os" in + *) + EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" + ;; + esac fi if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then AC_DEFINE(USE_SDL_AUDIO, 1, [Define to enable SDL audio support]) AUDIOSRC="../SDL/audio_sdl.cpp" fi -dnl BINCUE overrides - -if [[ "x$have_bincue" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS bincue_unix.cpp" -fi - -dnl libvhd overrides - -if [[ "x$have_libvhd" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS vhd_unix.cpp" -fi - - -dnl Use 68k CPU natively? -WANT_NATIVE_M68K=no -if [[ "x$HAVE_M68K" = "xyes" -a "x$CAN_NATIVE_M68K" = "xyes" ]]; then - AC_DEFINE(ENABLE_NATIVE_M68K, 1, [Define if using native 68k mode.]) - WANT_NATIVE_M68K=yes -fi - if [[ "x$HAVE_PTHREADS" = "xno" ]]; then dnl Serial, ethernet and audio support needs pthreads AC_MSG_WARN([You don't have pthreads, disabling serial, ethernet and audio support.]) @@ -808,7 +347,7 @@ if [[ "x$HAVE_PTHREADS" = "xno" ]]; then ETHERSRC=../dummy/ether_dummy.cpp AUDIOSRC=../dummy/audio_dummy.cpp fi -SYSSRCS="$VIDEOSRCS $EXTFSSRC $SERIALSRC $ETHERSRC $SCSISRC $AUDIOSRC $SEMSRC $UISRCS $MONSRCS $EXTRASYSSRCS" +SYSSRCS="$VIDEOSRCS $EXTFSSRC $SERIALSRC $ETHERSRC $SCSISRC $AUDIOSRC $SEMSRC $UISRCS $EXTRASYSSRCS" dnl Define a macro that translates a yesno-variable into a C macro definition dnl to be put into the config.h file @@ -825,10 +364,6 @@ dnl Check that the host supports TUN/TAP devices AC_CACHE_CHECK([whether TUN/TAP is supported], ac_cv_tun_tap_support, [ AC_TRY_COMPILE([ - #if defined(HAVE_LINUX_IF_H) && defined(HAVE_LINUX_IF_TUN_H) - #include - #include - #endif #if defined(HAVE_NET_IF_H) && defined(HAVE_NET_IF_TUN_H) #include #include @@ -1114,30 +649,6 @@ AC_CACHE_CHECK([whether your system supports Mach exceptions], AC_TRANSLATE_DEFINE(HAVE_MACH_EXCEPTIONS, "$ac_cv_have_mach_exceptions", [Define if your system supports Mach exceptions.]) -dnl Check if Windows exceptions are supported. -AC_CACHE_CHECK([whether your system supports Windows exceptions], - ac_cv_have_win32_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_WIN32_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=win32 - ac_cv_have_win32_exceptions=yes - ], - ac_cv_have_win32_exceptions=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_win32_exceptions=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_WIN32_EXCEPTIONS, "$ac_cv_have_win32_exceptions", - [Define if your system supports Windows exceptions.]) - dnl Otherwise, check if extended signals are supported with . if [[ -z "$sigsegv_recovery" ]]; then AC_CACHE_CHECK([whether your system supports extended signal handlers via asm], @@ -1254,11 +765,6 @@ AC_PATH_PROG([BLESS], "true") dnl Check for linker script support case $target_os:$target_cpu in -linux*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; -linux*:x86_64) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-x86_64.ld";; -linux*:powerpc) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-ppc.ld";; -netbsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; -freebsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/freebsd-i386.ld";; darwin*:*) LINKER_SCRIPT_FLAGS="-Wl,-seg1addr,0x78048000";; esac if [[ -n "$LINKER_SCRIPT_FLAGS" ]]; then @@ -1286,60 +792,52 @@ AC_TRANSLATE_DEFINE(HAVE_LINKER_SCRIPT, "$ac_cv_linker_script_works", [Define if there is a linker script to relocate the executable above 0x70000000.]) dnl Determine the addressing mode to use -if [[ "x$WANT_NATIVE_M68K" = "xyes" ]]; then - ADDRESSING_MODE="real" -else - ADDRESSING_MODE="" - AC_MSG_CHECKING([for the addressing mode to use]) - for am in $ADDRESSING_TEST_ORDER; do - case $am in - real) - dnl Requires ability to mmap() Low Memory globals - if [[ "x$ac_cv_can_map_lm$ac_cv_pagezero_hack" = "xnono" ]]; then - continue - fi - dnl Requires VOSF screen updates - if [[ "x$CAN_VOSF" = "xno" ]]; then - continue - fi - dnl Real addressing will probably work. - ADDRESSING_MODE="real" + +ADDRESSING_MODE="" +AC_MSG_CHECKING([for the addressing mode to use]) +for am in $ADDRESSING_TEST_ORDER; do + case $am in + real) + dnl Requires ability to mmap() Low Memory globals + if [[ "x$ac_cv_can_map_lm$ac_cv_pagezero_hack" = "xnono" ]]; then + continue + fi + dnl Requires VOSF screen updates + if [[ "x$CAN_VOSF" = "xno" ]]; then + continue + fi + dnl Real addressing will probably work. + ADDRESSING_MODE="real" + WANT_VOSF=yes dnl we can use VOSF and we need it actually + DEFINES="$DEFINES -DREAL_ADDRESSING" + if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then + BLESS=Darwin/lowmem + LDFLAGS="$LDFLAGS -pagezero_size 0x2000" + fi + break + ;; + direct) + dnl Requires VOSF screen updates + if [[ "x$CAN_VOSF" = "xyes" ]]; then + ADDRESSING_MODE="direct" WANT_VOSF=yes dnl we can use VOSF and we need it actually - DEFINES="$DEFINES -DREAL_ADDRESSING" - if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then - BLESS=Darwin/lowmem - LDFLAGS="$LDFLAGS -pagezero_size 0x2000" - fi + DEFINES="$DEFINES -DDIRECT_ADDRESSING" break - ;; - direct) - dnl Requires VOSF screen updates - if [[ "x$CAN_VOSF" = "xyes" ]]; then - ADDRESSING_MODE="direct" - WANT_VOSF=yes dnl we can use VOSF and we need it actually - DEFINES="$DEFINES -DDIRECT_ADDRESSING" - break - fi - ;; - banks) - dnl Default addressing mode - ADDRESSING_MODE="memory banks" - break - ;; - *) - AC_MSG_ERROR([Internal configure.in script error for $am addressing mode]) - esac - done - AC_MSG_RESULT($ADDRESSING_MODE) - if [[ "x$ADDRESSING_MODE" = "x" ]]; then - AC_MSG_WARN([Sorry, no suitable addressing mode in $ADDRESSING_TEST_ORDER]) + fi + ;; + banks) + dnl Default addressing mode ADDRESSING_MODE="memory banks" - fi -fi - -dnl Banked Memory Addressing mode is not supported by the JIT compiler -if [[ "x$WANT_JIT" = "xyes" -a "x$ADDRESSING_MODE" = "xmemory banks" ]]; then - AC_MSG_ERROR([Sorry, the JIT Compiler requires Direct Addressing, at least]) + break + ;; + *) + AC_MSG_ERROR([Internal configure.in script error for $am addressing mode]) + esac +done +AC_MSG_RESULT($ADDRESSING_MODE) +if [[ "x$ADDRESSING_MODE" = "x" ]]; then + AC_MSG_WARN([Sorry, no suitable addressing mode in $ADDRESSING_TEST_ORDER]) + ADDRESSING_MODE="memory banks" fi dnl Enable VOSF screen updates with this feature is requested and feasible @@ -1349,16 +847,6 @@ else WANT_VOSF=no fi -dnl Check for GAS. -HAVE_GAS=no -AC_MSG_CHECKING(for GAS .p2align feature) -cat >conftest.S << EOF - .text - .p2align 5 -EOF -if $CC conftest.S -c -o conftest.o >/dev/null 2>&1 ; then HAVE_GAS=yes; fi -AC_MSG_RESULT($HAVE_GAS) - dnl Check for GCC 2.7 or higher. HAVE_GCC27=no AC_MSG_CHECKING(for GCC 2.7 or higher) @@ -1395,54 +883,6 @@ if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_I386" = "xyes" ]]; then CXXFLAGS="$CXXFLAGS -fomit-frame-pointer -fno-exceptions" fi -dnl (gb) Do not merge constants since it breaks fpu/fpu_x86.cpp. -dnl As of 2001/08/02, this affects the following compilers: -dnl Official: probably gcc-3.1 (mainline CVS) -dnl Mandrake: gcc-2.96 >= 0.59mdk, gcc-3.0.1 >= 0.1mdk -dnl Red Hat : gcc-2.96 >= 89, gcc-3.0 >= 1 -if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then - SAVED_CXXFLAGS="$CXXFLAGS" - CXXFLAGS="$CXXFLAGS -fno-merge-constants" - AC_CACHE_CHECK([whether GCC supports constants merging], ac_cv_gcc_constants_merging, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_COMPILE([],[],[ac_cv_gcc_constants_merging=yes],[ac_cv_gcc_constants_merging=no]) - AC_LANG_RESTORE - ]) - if [[ "x$ac_cv_gcc_constants_merging" != "xyes" ]]; then - CXXFLAGS="$SAVED_CXXFLAGS" - fi -fi - -dnl Store motion was introduced in 3.3-hammer branch and any gcc >= 3.4 -dnl However, there are some corner cases exposed on x86-64 -if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then - SAVED_CXXFLAGS="$CXXFLAGS" - CXXFLAGS="$CXXFLAGS -fno-gcse-sm" - AC_CACHE_CHECK([whether GCC supports store motion], ac_cv_gcc_store_motion, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_COMPILE([],[],[ac_cv_gcc_store_motion=yes],[ac_cv_gcc_store_motion=no]) - AC_LANG_RESTORE - ]) - if [[ "x$ac_cv_gcc_store_motion" != "xyes" ]]; then - CXXFLAGS="$SAVED_CXXFLAGS" - fi -fi - -dnl Add -fno-strict-aliasing for slirp sources -if [[ "x$HAVE_GCC30" = "xyes" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -fno-strict-aliasing" - AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], - ac_cv_gcc_no_strict_aliasing, [ - AC_TRY_COMPILE([],[],[ac_cv_gcc_no_strict_aliasing=yes],[ac_cv_gcc_no_strict_aliasing=no]) - ]) - if [[ "x$ac_cv_gcc_no_strict_aliasing" = "xyes" ]]; then - AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing") - fi - CFLAGS="$SAVED_CFLAGS" -fi dnl Add -mdynamic-no-pic for MacOS X (XXX icc10 will support MacOS X) if [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then @@ -1460,257 +900,13 @@ if [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then fi dnl Select appropriate CPU source and REGPARAM define. -ASM_OPTIMIZATIONS=none -CPUSRCS="cpuemu1.cpp cpuemu2.cpp cpuemu3.cpp cpuemu4.cpp cpuemu5.cpp cpuemu6.cpp cpuemu7.cpp cpuemu8.cpp" - -dnl (gb) JITSRCS will be emptied later if the JIT is not available -dnl Other platforms should define their own set of noflags file variants -CAN_JIT=no -JITSRCS="compemu1.cpp compemu2.cpp compemu3.cpp compemu4.cpp compemu5.cpp compemu6.cpp compemu7.cpp compemu8.cpp" - -if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_I386" = "xyes" ]]; then - dnl i386 CPU - DEFINES="$DEFINES -DUNALIGNED_PROFITABLE -DREGPARAM=\"__attribute__((regparm(3)))\"" - if [[ "x$HAVE_GAS" = "xyes" ]]; then - ASM_OPTIMIZATIONS=i386 - DEFINES="$DEFINES -DX86_ASSEMBLY -DOPTIMIZED_FLAGS -DSAHF_SETO_PROFITABLE" - JITSRCS="cpuemu1_nf.cpp cpuemu2_nf.cpp cpuemu3_nf.cpp cpuemu4_nf.cpp cpuemu5_nf.cpp cpuemu6_nf.cpp cpuemu7_nf.cpp cpuemu8_nf.cpp $JITSRCS" - CAN_JIT=yes - fi -elif [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_X86_64" = "xyes" ]]; then - dnl x86-64 CPU - DEFINES="$DEFINES -DUNALIGNED_PROFITABLE" - if [[ "x$HAVE_GAS" = "xyes" ]]; then - ASM_OPTIMIZATIONS="x86-64" - DEFINES="$DEFINES -DX86_64_ASSEMBLY -DOPTIMIZED_FLAGS" - JITSRCS="cpuemu1_nf.cpp cpuemu2_nf.cpp cpuemu3_nf.cpp cpuemu4_nf.cpp cpuemu5_nf.cpp cpuemu6_nf.cpp cpuemu7_nf.cpp cpuemu8_nf.cpp $JITSRCS" - CAN_JIT=yes - fi -elif [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_SPARC" = "xyes" -a "x$HAVE_GAS" = "xyes" ]]; then - dnl SPARC CPU - case "$target_os" in - solaris*) - AC_MSG_CHECKING(SPARC CPU architecture) - SPARC_TYPE=`Solaris/which_sparc` - AC_MSG_RESULT($SPARC_TYPE) - case "$SPARC_TYPE" in - SPARC_V8) - ASM_OPTIMIZATIONS="SPARC V8 architecture" - DEFINES="$DEFINES -DSPARC_V8_ASSEMBLY" dnl -DOPTIMIZED_FLAGS" - CFLAGS="$CFLAGS -Wa,-Av8" - CXXFLAGS="$CXXFLAGS -Wa,-Av8" - ;; - SPARC_V9) - ASM_OPTIMIZATIONS="SPARC V9 architecture" - DEFINES="$DEFINES -DSPARC_V9_ASSEMBLY" dnl -DOPTIMIZED_FLAGS" - CFLAGS="$CFLAGS -Wa,-Av9" - CXXFLAGS="$CXXFLAGS -Wa,-Av9" - ;; - esac - ;; - esac -elif [[ "x$WANT_NATIVE_M68K" = "xyes" ]]; then - dnl Native m68k, no emulation - CPUINCLUDES="-I../native_cpu" - CPUSRCS="asm_support.s" -fi - -dnl Enable JIT compiler, if possible. -if [[ "x$WANT_JIT" = "xyes" -a "x$CAN_JIT" ]]; then - JITSRCS="$JITSRCS ../uae_cpu/compiler/compemu_support.cpp ../uae_cpu/compiler/compemu_fpp.cpp compstbl.o cpustbl_nf.o" - DEFINES="$DEFINES -DUSE_JIT -DUSE_JIT_FPU" - - if [[ "x$WANT_JIT_DEBUG" = "xyes" ]]; then - if [[ "x$WANT_MON" = "xyes" ]]; then - DEFINES="$DEFINES -DJIT_DEBUG=1" - else - AC_MSG_WARN([cxmon not found, ignoring --enable-jit-debug]) - WANT_JIT_DEBUG=no - fi - fi - - dnl IEEE core is the only FPU emulator to use with the JIT compiler - case $FPE_CORE_TEST_ORDER in - ieee*) ;; - *) AC_MSG_WARN([Forcing use of the IEEE FPU core, as the JIT compiler supports only this one.]) ;; - esac - FPE_CORE_TEST_ORDER="ieee" -else - WANT_JIT=no - WANT_JIT_DEBUG=no - JITSRCS="" -fi - -dnl Utility macro used by next two tests. -dnl AC_EXAMINE_OBJECT(C source code, -dnl commands examining object file, -dnl [commands to run if compile failed]): -dnl -dnl Compile the source code to an object file; then convert it into a -dnl printable representation. All unprintable characters and -dnl asterisks (*) are replaced by dots (.). All white space is -dnl deleted. Newlines (ASCII 0x10) in the input are preserved in the -dnl output, but runs of newlines are compressed to a single newline. -dnl Finally, line breaks are forcibly inserted so that no line is -dnl longer than 80 columns and the file ends with a newline. The -dnl result of all this processing is in the file conftest.dmp, which -dnl may be examined by the commands in the second argument. -dnl -AC_DEFUN([gcc_AC_EXAMINE_OBJECT], -[AC_LANG_SAVE -AC_LANG_C -dnl Next bit cribbed from AC_TRY_COMPILE. -cat > conftest.$ac_ext < conftest.dmp - $2 -ifelse($3, , , else - $3 -)dnl -fi -rm -rf conftest* -AC_LANG_RESTORE]) - -dnl Floating point format probe. -dnl The basic concept is the same as the above: grep the object -dnl file for an interesting string. We have to watch out for -dnl rounding changing the values in the object, however; this is -dnl handled by ignoring the least significant byte of the float. -dnl -dnl Does not know about VAX G-float or C4x idiosyncratic format. -dnl It does know about PDP-10 idiosyncratic format, but this is -dnl not presently supported by GCC. S/390 "binary floating point" -dnl is in fact IEEE (but maybe we should have that in EBCDIC as well -dnl as ASCII?) -dnl -AC_DEFUN([gcc_AC_C_FLOAT_FORMAT], -[AC_CACHE_CHECK(floating point format, ac_cv_c_float_format, -[gcc_AC_EXAMINE_OBJECT( -[/* This will not work unless sizeof(double) == 8. */ -extern char sizeof_double_must_be_8 [sizeof(double) == 8 ? 1 : -1]; - -/* This structure must have no internal padding. */ -struct possibility { - char prefix[8]; - double candidate; - char postfix[8]; -}; - -#define C(cand) { "\nformat:", cand, ":tamrof\n" } -struct possibility table [] = -{ - C( 3.25724264705901305206e+01), /* @@IEEEFP - IEEE 754 */ - C( 3.53802595280598432000e+18), /* D__float - VAX */ - C( 5.32201830133125317057e-19), /* D.PDP-10 - PDP-10 - the dot is 0x13a */ - C( 1.77977764695171661377e+10), /* IBMHEXFP - s/390 format, ascii */ - C(-5.22995989424860458374e+10) /* IBMHEXFP - s/390 format, EBCDIC */ -};], - [if grep 'format:.@IEEEF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.I@@PFE.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.FEEEI@.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.EFP@@I.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.__floa.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='VAX D-float' - elif grep 'format:..PDP-1.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='PDP-10' - elif grep 'format:.BMHEXF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IBM 370 hex' - else - AC_MSG_ERROR(Unknown floating point format) - fi], - [AC_MSG_ERROR(compile failed)]) -]) -# IEEE is the default format. If the float endianness isn't the same -# as the integer endianness, we have to set FLOAT_WORDS_BIG_ENDIAN -# (which is a tristate: yes, no, default). This is only an issue with -# IEEE; the other formats are only supported by a few machines each, -# all with the same endianness. -format=IEEE_FLOAT_FORMAT -fbigend= -case $ac_cv_c_float_format in - 'IEEE (big-endian)' ) - if test $ac_cv_c_bigendian = no; then - fbigend=1 - fi - ;; - 'IEEE (little-endian)' ) - if test $ac_cv_c_bigendian = yes; then - fbigend=0 - fi - ;; - 'VAX D-float' ) - format=VAX_FLOAT_FORMAT - ;; - 'PDP-10' ) - format=PDP10_FLOAT_FORMAT - ;; - 'IBM 370 hex' ) - format=IBM_FLOAT_FORMAT - ;; -esac -AC_DEFINE_UNQUOTED(HOST_FLOAT_FORMAT, $format, - [Define to the floating point format of the host machine.]) -if test -n "$fbigend"; then - AC_DEFINE_UNQUOTED(HOST_FLOAT_WORDS_BIG_ENDIAN, $fbigend, - [Define to 1 if the host machine stores floating point numbers in - memory with the word containing the sign bit at the lowest address, - or to 0 if it does it the other way around. - - This macro should not be defined if the ordering is the same as for - multi-word integers.]) -fi -]) +CPUSRCS="cpuemu.cpp" dnl Select appropriate FPU source. -gcc_AC_C_FLOAT_FORMAT AC_CHECK_HEADERS(ieee754.h ieeefp.h floatingpoint.h nan.h) for fpe in $FPE_CORE_TEST_ORDER; do case $fpe in - ieee) - case $ac_cv_c_float_format in - IEEE*) - FPE_CORE="IEEE fpu core" - DEFINES="$DEFINES -DFPU_IEEE" - FPUSRCS="../uae_cpu/fpu/fpu_ieee.cpp" - dnl Math functions not mandated by C99 standard - AC_CHECK_FUNCS(isnanl isinfl) - dnl Math functions required by C99 standard, but probably not - dnl implemented everywhere. In that case, we fall back to the - dnl regular variant for doubles. - AC_CHECK_FUNCS(logl log10l expl powl fabsl sqrtl) - AC_CHECK_FUNCS(sinl cosl tanl sinhl coshl tanhl) - AC_CHECK_FUNCS(asinl acosl atanl asinhl acoshl atanhl) - AC_CHECK_FUNCS(floorl ceill) - break - ;; - esac - ;; - x86) - if [[ ":$HAVE_GCC27:$HAVE_I386:$HAVE_GAS:" = ":yes:yes:yes:" ]]; then - FPE_CORE="i387 fpu core" - DEFINES="$DEFINES -DFPU_X86" - FPUSRCS="../uae_cpu/fpu/fpu_x86.cpp" - break - fi - ;; uae) FPE_CORE="uae fpu core" DEFINES="$DEFINES -DFPU_UAE" @@ -1731,18 +927,8 @@ AC_CHECK_FUNCS(atanh) AC_CHECK_FUNCS(isnan isinf finite isnormal signbit) dnl UAE CPU sources for all non-m68k-native architectures. -if [[ "x$WANT_NATIVE_M68K" = "xno" ]]; then - CPUINCLUDES="-I../uae_cpu" - CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" -fi - -dnl Or if we have -IPA (MIPSPro compilers) -if [[ "x$HAVE_IPA" = "xyes" ]]; then - CFLAGS="`echo $CFLAGS | sed -e 's/-g//g'` -O3 -OPT:Olimit=0 -IPA" - CXXFLAGS="`echo $CXXFLAGS | sed -e 's/-g//g'` -O3 -OPT:Olimit=0 -IPA" - CXXFLAGS="-LANG:std $CXXFLAGS" - LDFLAGS="$LDFLAGS -O3 -OPT:Olimit=0 -IPA" -fi +CPUINCLUDES="-I../uae_cpu" +CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS" dnl Generate Makefile. AC_SUBST(DEFINES) @@ -1758,23 +944,9 @@ dnl Print summary. echo echo Basilisk II configuration summary: echo -echo Mac OS X GUI ........................... : $WANT_MACOSX_GUI -echo Mac OS X Sound ......................... : $WANT_MACOSX_SOUND echo SDL support ............................ : $SDL_SUPPORT -echo BINCUE support ......................... : $have_bincue -echo LIBVHD support ......................... : $have_libvhd -echo XFree86 DGA support .................... : $WANT_XF86_DGA -echo XFree86 VidMode support ................ : $WANT_XF86_VIDMODE -echo fbdev DGA support ...................... : $WANT_FBDEV_DGA echo Enable video on SEGV signals ........... : $WANT_VOSF -echo ESD sound support ...................... : $WANT_ESD -echo GTK user interface ..................... : $WANT_GTK -echo mon debugger support ................... : $WANT_MON -echo Running m68k code natively ............. : $WANT_NATIVE_M68K -echo Use JIT compiler ....................... : $WANT_JIT -echo JIT debug mode ......................... : $WANT_JIT_DEBUG echo Floating-Point emulation core .......... : $FPE_CORE -echo Assembly optimizations ................. : $ASM_OPTIMIZATIONS echo Addressing mode ........................ : $ADDRESSING_MODE echo Bad memory access recovery type ........ : $sigsegv_recovery echo diff --git a/BasiliskII/src/Unix/disk_sparsebundle.cpp b/BasiliskII/src/Unix/disk_sparsebundle.cpp deleted file mode 100644 index 063e32963..000000000 --- a/BasiliskII/src/Unix/disk_sparsebundle.cpp +++ /dev/null @@ -1,315 +0,0 @@ -/* - * disk_sparsebundle.cpp - Apple sparse bundle implementation - * - * Basilisk II (C) Dave Vasilevsky - * - * 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 "disk_unix.h" -#include "tinyxml2.h" - -#include -#include -#include - -#if defined __APPLE__ && defined __MACH__ -#define __MACOSX__ 1 -#endif - -struct disk_sparsebundle : disk_generic { - disk_sparsebundle(const char *bands, int fd, bool read_only, - loff_t band_size, loff_t total_size) - : token_fd(fd), read_only(read_only), band_size(band_size), - total_size(total_size), band_dir(strdup(bands)), - band_cur(-1), band_fd(-1), band_alloc(-1) { - } - - virtual ~disk_sparsebundle() { - if (band_fd != -1) - close(band_fd); - close(token_fd); - free(band_dir); - } - - virtual bool is_read_only() { return read_only; } - virtual loff_t size() { return total_size; } - - virtual size_t read(void *buf, loff_t offset, size_t length) { - return band_do(&disk_sparsebundle::band_read, buf, offset, length); - } - - virtual size_t write(void *buf, loff_t offset, size_t length) { - return band_do(&disk_sparsebundle::band_write, buf, offset, length); - } - -protected: - int token_fd; // lockfile - bool read_only; - loff_t band_size, total_size; - char *band_dir; // directory containing band files - - // Currently open band - loff_t band_cur; // index of the band - int band_fd; // -1 if not open - loff_t band_alloc; // how much space is already used? - - typedef ssize_t (disk_sparsebundle::*band_func)(char *buf, loff_t band, - size_t offset, size_t len); - - // Split an (offset, length) operation into bands. - size_t band_do(band_func func, void *buf, loff_t offset, size_t length) { - char *b = (char*)buf; - loff_t band = offset / band_size; - size_t done = 0; - while (length) { - if (offset >= total_size) - break; - size_t start = offset % band_size; - size_t segment = std::min((size_t)band_size - start, length); - - ssize_t err = (this->*func)(b, band, start, segment); - if (err > 0) - done += err; - if (err < segment) - break; - - b += segment; - offset += segment; - length -= segment; - ++band; - } - return done; - } - - // Open a band by index. It's ok if the band is already open. - enum open_ret { - OPEN_FAILED = 0, - OPEN_NOENT, // Band doesn't exist yet - OPEN_OK, - }; - open_ret open_band(loff_t band, bool create) { - if (band_cur == band) - return OPEN_OK; - - char path[PATH_MAX + 1]; - if (snprintf(path, PATH_MAX, "%s/%lx", band_dir, - (unsigned long)band) >= PATH_MAX) { - return OPEN_FAILED; - } - - if (band_fd != -1) - close(band_fd); - band_alloc = -1; - band_cur = -1; - - int oflags = read_only ? O_RDONLY : O_RDWR; - if (create) - oflags |= O_CREAT; - band_fd = open(path, oflags, 0644); - if (band_fd == -1) { - return (!create && errno == ENOENT) ? OPEN_NOENT : OPEN_FAILED; - } - - // Get the allocated size - if (!read_only) { - band_alloc = lseek(band_fd, 0, SEEK_END); - if (band_alloc == -1) - band_alloc = band_size; - } - band_cur = band; - return OPEN_OK; - } - - ssize_t band_read(char *buf, loff_t band, size_t off, size_t len) { - open_ret st = open_band(band, false); - if (st == OPEN_FAILED) - return -1; - - // Unallocated bytes - size_t want = (st == OPEN_NOENT || off >= band_alloc) ? 0 - : std::min(len, (size_t)band_alloc - off); - if (want) { - if (lseek(band_fd, off, SEEK_SET) == -1) - return -1; - ssize_t err = ::read(band_fd, buf, want); - if (err < want) - return err; - } - memset(buf + want, 0, len - want); - return len; - } - - ssize_t band_write(char *buf, loff_t band, size_t off, size_t len) { - // If space is unused, don't needlessly fill it with zeros - - // Find min length such that all trailing chars are zero: - size_t nz = len; - for (; nz > 0 && !buf[nz-1]; --nz) - ; // pass - - open_ret st = open_band(band, nz); - if (st != OPEN_OK) - return st == OPEN_NOENT ? len : -1; - - if (lseek(band_fd, off, SEEK_SET) == -1) - return -1; - - size_t space = (off >= band_alloc ? 0 : band_alloc - off); - size_t want = std::max(nz, std::min(space, len)); - ssize_t err = ::write(band_fd, buf, want); - if (err >= 0) - band_alloc = std::max(band_alloc, loff_t(off + err)); - if (err < want) - return err; - return len; - } -}; - - - -using tinyxml2::XML_NO_ERROR; -using tinyxml2::XMLElement; - -// Simplistic plist parser -struct plist { - plist() : doc(true, tinyxml2::COLLAPSE_WHITESPACE) { } - - bool open(const char *path) { - if (doc.LoadFile(path) != XML_NO_ERROR) - return false; - tinyxml2::XMLHandle hnd(&doc); - dict = hnd.FirstChildElement("plist").FirstChildElement("dict") - .ToElement(); - return dict; - } - - const char *str_val(const char *key) { - return value(key, "string"); - } - - bool int_val(const char *key, loff_t *i) { - const char *v = value(key, "integer"); - if (!v || !*v) - return false; - - char *endp; - long long ll = strtoll(v, &endp, 10); - if (*endp) - return false; - *i = ll; - return true; - } - -protected: - tinyxml2::XMLDocument doc; - XMLElement *dict; - - const char *value(const char *key, const char *type) { - // Assume it's a flat plist - XMLElement *cur = dict->FirstChildElement(); - bool found_key = false; - while (cur) { - if (found_key) { - if (strcmp(cur->Name(), type) != 0) - return NULL; - return cur->GetText(); - } - found_key = strcmp(cur->Name(), "key") == 0 - && strcmp(cur->GetText(), key) == 0; - cur = cur->NextSiblingElement(); - } - return NULL; - } -}; - - -static int try_open(const char *path, bool read_only, bool *locked) { - int oflags = (read_only ? O_RDONLY : O_RDWR); - int lockflags = 0; -#if defined(__MACOSX__) - lockflags = O_NONBLOCK | (read_only ? O_SHLOCK : O_EXLOCK); -#endif - int fd = open(path, oflags | lockflags); -#if defined(__MACOSX__) - if (fd == -1) { - if (errno == EOPNOTSUPP) { // no locking support, try again - fd = open(path, oflags); - } else if (errno == EAGAIN) { // locked - *locked = true; - } - } -#endif - return fd; -} - -disk_generic::status disk_sparsebundle_factory(const char *path, - bool read_only, disk_generic **disk) { - // Does it look like a sparsebundle? - char buf[PATH_MAX + 1]; - if (snprintf(buf, PATH_MAX, "%s/%s", path, "Info.plist") >= PATH_MAX) - return disk_generic::DISK_UNKNOWN; - - plist pl; - if (!pl.open(buf)) - return disk_generic::DISK_UNKNOWN; - - const char *type; - if (!(type = pl.str_val("diskimage-bundle-type"))) - return disk_generic::DISK_UNKNOWN; - if (strcmp(type, "com.apple.diskimage.sparsebundle") != 0) - return disk_generic::DISK_UNKNOWN; - - - // Find the sparsebundle parameters - loff_t version, band_size, total_size; - if (!pl.int_val("bundle-backingstore-version", &version) || version != 1) { - fprintf(stderr, "sparsebundle: Bad version\n"); - return disk_generic::DISK_UNKNOWN; - } - if (!pl.int_val("band-size", &band_size) - || !pl.int_val("size", &total_size)) { - fprintf(stderr, "sparsebundle: Can't find size\n"); - return disk_generic::DISK_INVALID; - } - - - // Check if we can open it - if (snprintf(buf, PATH_MAX, "%s/%s", path, "token") >= PATH_MAX) - return disk_generic::DISK_INVALID; - bool locked = false; - int token = try_open(buf, read_only, &locked); - if (token == -1 && !read_only) { // try again, read-only - token = try_open(buf, true, &locked); - if (token != -1 && !read_only) - fprintf(stderr, "sparsebundle: Can only mount read-only\n"); - read_only = true; - } - if (token == -1) { - if (locked) - fprintf(stderr, "sparsebundle: Refusing to double-mount\n"); - else - perror("sparsebundle: open failed:"); - return disk_generic::DISK_INVALID; - } - - - // We're good to go! - if (snprintf(buf, PATH_MAX, "%s/%s", path, "bands") >= PATH_MAX) - return disk_generic::DISK_INVALID; - *disk = new disk_sparsebundle(buf, token, read_only, band_size, - total_size); - return disk_generic::DISK_VALID; -} diff --git a/BasiliskII/src/Unix/disk_unix.h b/BasiliskII/src/Unix/disk_unix.h index 6c427881b..042c90ef9 100644 --- a/BasiliskII/src/Unix/disk_unix.h +++ b/BasiliskII/src/Unix/disk_unix.h @@ -42,7 +42,4 @@ struct disk_generic { typedef disk_generic::status (disk_factory)(const char *path, bool read_only, disk_generic **disk); -extern disk_factory disk_sparsebundle_factory; -extern disk_factory disk_vhd_factory; - #endif diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp deleted file mode 100644 index 526ee29ca..000000000 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ /dev/null @@ -1,1051 +0,0 @@ -/* - * ether_unix.cpp - Ethernet device driver, Unix specific stuff (Linux and FreeBSD) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -/* - * NOTES concerning MacOS X issues: - * - poll() does not exist in 10.2.8, but is available in 10.4.4 - * - select(), and very likely poll(), are not cancellation points. So - * the ethernet thread doesn't stop on exit. An explicit check is - * performed to workaround this problem. - */ -#if (defined __APPLE__ && defined __MACH__) || ! defined HAVE_POLL -#define USE_POLL 0 -#else -#define USE_POLL 1 -#endif - -// Define to let the slirp library determine the right timeout for select() -#define USE_SLIRP_TIMEOUT 1 - -#ifdef HAVE_SYS_POLL_H -#include -#endif -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#if defined(__FreeBSD__) || defined(sgi) || (defined(__APPLE__) && defined(__MACH__)) -#include -#endif - -#if defined(HAVE_LINUX_IF_H) && defined(HAVE_LINUX_IF_TUN_H) -#include -#include -#endif - -#if defined(HAVE_NET_IF_H) && defined(HAVE_NET_IF_TUN_H) -#include -#include -#endif - -#ifdef HAVE_SLIRP -#include "libslirp.h" -#include "ctl.h" -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "ether.h" -#include "ether_defs.h" - -#ifndef NO_STD_NAMESPACE -using std::map; -#endif - -#define DEBUG 0 -#include "debug.h" - -#define STATISTICS 0 -#define MONITOR 0 - - -// Ethernet device types -enum { - NET_IF_SHEEPNET, - NET_IF_ETHERTAP, - NET_IF_TUNTAP, - NET_IF_SLIRP -}; - -// Constants -#if ENABLE_TUNTAP -static const char ETHERCONFIG_FILE_NAME[] = DATADIR "/tunconfig"; -#endif - -// Global variables -static int fd = -1; // fd of sheep_net device -static pthread_t ether_thread; // Packet reception thread -static pthread_attr_t ether_thread_attr; // Packet reception thread attributes -static bool thread_active = false; // Flag: Packet reception thread installed -static sem_t int_ack; // Interrupt acknowledge semaphore -static bool udp_tunnel; // Flag: UDP tunnelling active, fd is the socket descriptor -static int net_if_type = -1; // Ethernet device type -static char *net_if_name = NULL; // TUN/TAP device name -static const char *net_if_script = NULL; // Network config script -static pthread_t slirp_thread; // Slirp reception thread -static bool slirp_thread_active = false; // Flag: Slirp reception threadinstalled -static int slirp_output_fd = -1; // fd of slirp output pipe -static int slirp_input_fds[2] = { -1, -1 }; // fds of slirp input pipe -#ifdef SHEEPSHAVER -static bool net_open = false; // Flag: initialization succeeded, network device open -static uint8 ether_addr[6]; // Our Ethernet address -#else -const bool ether_driver_opened = true; // Flag: is the MacOS driver opened? -#endif - -// Attached network protocols, maps protocol type to MacOS handler address -static map net_protocols; - -// Prototypes -static void *receive_func(void *arg); -static void *slirp_receive_func(void *arg); -static int16 ether_do_add_multicast(uint8 *addr); -static int16 ether_do_del_multicast(uint8 *addr); -static int16 ether_do_write(uint32 arg); -static void ether_do_interrupt(void); -static void slirp_add_redirs(); -static int slirp_add_redir(const char *redir_str); - - -/* - * Start packet reception thread - */ - -static bool start_thread(void) -{ - if (sem_init(&int_ack, 0, 0) < 0) { - printf("WARNING: Cannot init semaphore"); - return false; - } - - Set_pthread_attr(ðer_thread_attr, 1); - thread_active = (pthread_create(ðer_thread, ðer_thread_attr, receive_func, NULL) == 0); - if (!thread_active) { - printf("WARNING: Cannot start Ethernet thread"); - return false; - } - -#ifdef HAVE_SLIRP - if (net_if_type == NET_IF_SLIRP) { - slirp_thread_active = (pthread_create(&slirp_thread, NULL, slirp_receive_func, NULL) == 0); - if (!slirp_thread_active) { - printf("WARNING: Cannot start slirp reception thread\n"); - return false; - } - } -#endif - - return true; -} - - -/* - * Stop packet reception thread - */ - -static void stop_thread(void) -{ -#ifdef HAVE_SLIRP - if (slirp_thread_active) { -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(slirp_thread); -#endif - pthread_join(slirp_thread, NULL); - slirp_thread_active = false; - } -#endif - - if (thread_active) { -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(ether_thread); -#endif - pthread_join(ether_thread, NULL); - sem_destroy(&int_ack); - thread_active = false; - } -} - - -/* - * Execute network script up|down - */ - -static bool execute_network_script(const char *action) -{ - if (net_if_script == NULL || net_if_name == NULL) - return false; - - int pid = fork(); - if (pid >= 0) { - if (pid == 0) { - char *args[4]; - args[0] = (char *)net_if_script; - args[1] = net_if_name; - args[2] = (char *)action; - args[3] = NULL; - execv(net_if_script, args); - exit(1); - } - int status; - while (waitpid(pid, &status, 0) != pid); - return WIFEXITED(status) && WEXITSTATUS(status) == 0; - } - - return false; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - int val; - char str[256]; - - // Do nothing if no Ethernet device specified - const char *name = PrefsFindString("ether"); - if (name == NULL) - return false; - - // Determine Ethernet device type - net_if_type = -1; - if (strncmp(name, "tap", 3) == 0) - net_if_type = NET_IF_ETHERTAP; -#if ENABLE_TUNTAP - else if (strcmp(name, "tun") == 0) - net_if_type = NET_IF_TUNTAP; -#endif -#ifdef HAVE_SLIRP - else if (strcmp(name, "slirp") == 0) - net_if_type = NET_IF_SLIRP; -#endif - else - net_if_type = NET_IF_SHEEPNET; - - // Don't raise SIGPIPE, let errno be set to EPIPE - struct sigaction sigpipe_sa; - if (sigaction(SIGPIPE, NULL, &sigpipe_sa) == 0) { - assert(sigpipe_sa.sa_handler == SIG_DFL || sigpipe_sa.sa_handler == SIG_IGN); - sigfillset(&sigpipe_sa.sa_mask); - sigpipe_sa.sa_flags = 0; - sigpipe_sa.sa_handler = SIG_IGN; - sigaction(SIGPIPE, &sigpipe_sa, NULL); - } - -#ifdef HAVE_SLIRP - // Initialize slirp library - if (net_if_type == NET_IF_SLIRP) { - if (slirp_init() < 0) { - sprintf(str, "%s", GetString(STR_SLIRP_NO_DNS_FOUND_WARN)); - WarningAlert(str); - return false; - } - - // Open slirp output pipe - int fds[2]; - if (pipe(fds) < 0) - return false; - fd = fds[0]; - slirp_output_fd = fds[1]; - - // Open slirp input pipe - if (pipe(slirp_input_fds) < 0) - return false; - - // Set up port redirects - slirp_add_redirs(); - } -#endif - - // Open sheep_net or ethertap or TUN/TAP device - char dev_name[16]; - switch (net_if_type) { - case NET_IF_ETHERTAP: - sprintf(dev_name, "/dev/%s", name); - break; - case NET_IF_TUNTAP: - strcpy(dev_name, "/dev/net/tun"); - break; - case NET_IF_SHEEPNET: - strcpy(dev_name, "/dev/sheep_net"); - break; - } - if (net_if_type != NET_IF_SLIRP) { - fd = open(dev_name, O_RDWR); - if (fd < 0) { - sprintf(str, GetString(STR_NO_SHEEP_NET_DRIVER_WARN), dev_name, strerror(errno)); - WarningAlert(str); - goto open_error; - } - } - -#if ENABLE_TUNTAP - // Open TUN/TAP interface - if (net_if_type == NET_IF_TUNTAP) { - struct ifreq ifr; - memset(&ifr, 0, sizeof(ifr)); - ifr.ifr_flags = IFF_TAP | IFF_NO_PI; - strcpy(ifr.ifr_name, "tun%d"); - if (ioctl(fd, TUNSETIFF, (void *) &ifr) != 0) { - sprintf(str, GetString(STR_SHEEP_NET_ATTACH_WARN), strerror(errno)); - WarningAlert(str); - goto open_error; - } - - // Get network config script file path - net_if_script = PrefsFindString("etherconfig"); - if (net_if_script == NULL) - net_if_script = ETHERCONFIG_FILE_NAME; - - // Start network script up - if (net_if_script == NULL) { - sprintf(str, GetString(STR_TUN_TAP_CONFIG_WARN), "script not found"); - WarningAlert(str); - goto open_error; - } - net_if_name = strdup(ifr.ifr_name); - if (!execute_network_script("up")) { - sprintf(str, GetString(STR_TUN_TAP_CONFIG_WARN), "script execute error"); - WarningAlert(str); - goto open_error; - } - D(bug("Connected to host network interface: %s\n", net_if_name)); - } -#endif - -#if defined(__linux__) - // Attach sheep_net to selected Ethernet card - if (net_if_type == NET_IF_SHEEPNET && ioctl(fd, SIOCSIFLINK, name) < 0) { - sprintf(str, GetString(STR_SHEEP_NET_ATTACH_WARN), strerror(errno)); - WarningAlert(str); - goto open_error; - } -#endif - - // Set nonblocking I/O -#ifdef USE_FIONBIO - int nonblock = 1; - if (ioctl(fd, FIONBIO, &nonblock) < 0) { - sprintf(str, GetString(STR_BLOCKING_NET_SOCKET_WARN), strerror(errno)); - WarningAlert(str); - goto open_error; - } -#else - val = fcntl(fd, F_GETFL, 0); - if (val < 0 || fcntl(fd, F_SETFL, val | O_NONBLOCK) < 0) { - sprintf(str, GetString(STR_BLOCKING_NET_SOCKET_WARN), strerror(errno)); - WarningAlert(str); - goto open_error; - } -#endif - - // Get Ethernet address - if (net_if_type == NET_IF_ETHERTAP) { - pid_t p = getpid(); // If configured for multicast, ethertap requires that the lower 32 bit of the Ethernet address are our PID - ether_addr[0] = 0xfe; - ether_addr[1] = 0xfd; - ether_addr[2] = p >> 24; - ether_addr[3] = p >> 16; - ether_addr[4] = p >> 8; - ether_addr[5] = p; -#ifdef HAVE_SLIRP - } else if (net_if_type == NET_IF_SLIRP) { - ether_addr[0] = 0x52; - ether_addr[1] = 0x54; - ether_addr[2] = 0x00; - ether_addr[3] = 0x12; - ether_addr[4] = 0x34; - ether_addr[5] = 0x56; -#endif - } else - ioctl(fd, SIOCGIFADDR, ether_addr); - D(bug("Ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - - // Start packet reception thread - if (!start_thread()) - goto open_error; - - // Everything OK - return true; - -open_error: - stop_thread(); - - if (fd > 0) { - close(fd); - fd = -1; - } - if (slirp_input_fds[0] >= 0) { - close(slirp_input_fds[0]); - slirp_input_fds[0] = -1; - } - if (slirp_input_fds[1] >= 0) { - close(slirp_input_fds[1]); - slirp_input_fds[1] = -1; - } - if (slirp_output_fd >= 0) { - close(slirp_output_fd); - slirp_output_fd = -1; - } - return false; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - // Stop reception threads - stop_thread(); - - // Shut down TUN/TAP interface - if (net_if_type == NET_IF_TUNTAP) - execute_network_script("down"); - - // Free TUN/TAP device name - if (net_if_name) - free(net_if_name); - - // Close sheep_net device - if (fd > 0) - close(fd); - - // Close slirp input buffer - if (slirp_input_fds[0] >= 0) - close(slirp_input_fds[0]); - if (slirp_input_fds[1] >= 0) - close(slirp_input_fds[1]); - - // Close slirp output buffer - if (slirp_output_fd > 0) - close(slirp_output_fd); - -#if STATISTICS - // Show statistics - printf("%ld messages put on write queue\n", num_wput); - printf("%ld error acks\n", num_error_acks); - printf("%ld packets transmitted (%ld raw, %ld normal)\n", num_tx_packets, num_tx_raw_packets, num_tx_normal_packets); - printf("%ld tx packets dropped because buffer full\n", num_tx_buffer_full); - printf("%ld packets received\n", num_rx_packets); - printf("%ld packets passed upstream (%ld Fast Path, %ld normal)\n", num_rx_fastpath + num_unitdata_ind, num_rx_fastpath, num_unitdata_ind); - printf("EtherIRQ called %ld times\n", num_ether_irq); - printf("%ld rx packets dropped due to low memory\n", num_rx_no_mem); - printf("%ld rx packets dropped because no stream found\n", num_rx_dropped); - printf("%ld rx packets dropped because stream not ready\n", num_rx_stream_not_ready); - printf("%ld rx packets dropped because no memory for unitdata_ind\n", num_rx_no_unitdata_mem); -#endif -} - - -/* - * Glue around low-level implementation - */ - -#ifdef SHEEPSHAVER -// Error codes -enum { - eMultiErr = -91, - eLenErr = -92, - lapProtErr = -94, - excessCollsns = -95 -}; - -// Initialize ethernet -void EtherInit(void) -{ - net_open = false; - - // Do nothing if the user disabled the network - if (PrefsFindBool("nonet")) - return; - - net_open = ether_init(); -} - -// Exit ethernet -void EtherExit(void) -{ - ether_exit(); - net_open = false; -} - -// Get ethernet hardware address -void AO_get_ethernet_address(uint32 arg) -{ - uint8 *addr = Mac2HostAddr(arg); - if (net_open) - OTCopy48BitAddress(ether_addr, addr); - else { - addr[0] = 0x12; - addr[1] = 0x34; - addr[2] = 0x56; - addr[3] = 0x78; - addr[4] = 0x9a; - addr[5] = 0xbc; - } - D(bug("AO_get_ethernet_address: got address %02x%02x%02x%02x%02x%02x\n", addr[0], addr[1], addr[2], addr[3], addr[4], addr[5])); -} - -// Add multicast address -void AO_enable_multicast(uint32 addr) -{ - if (net_open) - ether_do_add_multicast(Mac2HostAddr(addr)); -} - -// Disable multicast address -void AO_disable_multicast(uint32 addr) -{ - if (net_open) - ether_do_del_multicast(Mac2HostAddr(addr)); -} - -// Transmit one packet -void AO_transmit_packet(uint32 mp) -{ - if (net_open) { - switch (ether_do_write(mp)) { - case noErr: - num_tx_packets++; - break; - case excessCollsns: - num_tx_buffer_full++; - break; - } - } -} - -// Copy packet data from message block to linear buffer -static inline int ether_arg_to_buffer(uint32 mp, uint8 *p) -{ - return ether_msgb_to_buffer(mp, p); -} - -// Ethernet interrupt -void EtherIRQ(void) -{ - D(bug("EtherIRQ\n")); - num_ether_irq++; - - OTEnterInterrupt(); - ether_do_interrupt(); - OTLeaveInterrupt(); - - // Acknowledge interrupt to reception thread - D(bug(" EtherIRQ done\n")); - sem_post(&int_ack); -} -#else -// Add multicast address -int16 ether_add_multicast(uint32 pb) -{ - return ether_do_add_multicast(Mac2HostAddr(pb + eMultiAddr)); -} - -// Disable multicast address -int16 ether_del_multicast(uint32 pb) -{ - return ether_do_del_multicast(Mac2HostAddr(pb + eMultiAddr)); -} - -// Transmit one packet -int16 ether_write(uint32 wds) -{ - return ether_do_write(wds); -} - -// Copy packet data from WDS to linear buffer -static inline int ether_arg_to_buffer(uint32 wds, uint8 *p) -{ - return ether_wds_to_buffer(wds, p); -} - -// Dispatch packet to protocol handler -static void ether_dispatch_packet(uint32 p, uint32 length) -{ - // Get packet type - uint16 type = ReadMacInt16(p + 12); - - // Look for protocol - uint16 search_type = (type <= 1500 ? 0 : type); - if (net_protocols.find(search_type) == net_protocols.end()) - return; - uint32 handler = net_protocols[search_type]; - - // No default handler - if (handler == 0) - return; - - // Copy header to RHA - Mac2Mac_memcpy(ether_data + ed_RHA, p, 14); - D(bug(" header %08x%04x %08x%04x %04x\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = type; // Packet type - r.d[1] = length - 14; // Remaining packet length (without header, for ReadPacket) - r.a[0] = p + 14; // Pointer to packet (Mac address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08x, type %08x, length %08x, data %08x, rha %08x, read_packet %08x\n", handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(handler, &r); -} - -// Ethernet interrupt -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - ether_do_interrupt(); - - // Acknowledge interrupt to reception thread - D(bug(" EtherIRQ done\n")); - sem_post(&int_ack); -} -#endif - - -/* - * Reset - */ - -void ether_reset(void) -{ - net_protocols.clear(); -} - - -/* - * Add multicast address - */ - -static int16 ether_do_add_multicast(uint8 *addr) -{ - switch (net_if_type) { - case NET_IF_ETHERTAP: - case NET_IF_SHEEPNET: - if (ioctl(fd, SIOCADDMULTI, addr) < 0) { - D(bug("WARNING: Couldn't enable multicast address\n")); - if (net_if_type == NET_IF_ETHERTAP) { - return noErr; - } else { - return eMultiErr; - } - } - return noErr; - default: - return noErr; - } -} - - -/* - * Delete multicast address - */ - -static int16 ether_do_del_multicast(uint8 *addr) -{ - switch (net_if_type) { - case NET_IF_ETHERTAP: - case NET_IF_SHEEPNET: - if (ioctl(fd, SIOCDELMULTI, addr) < 0) { - D(bug("WARNING: Couldn't disable multicast address\n")); - return eMultiErr; - } - return noErr; - default: - return noErr; - } -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - if (net_protocols.find(type) != net_protocols.end()) - return lapProtErr; - net_protocols[type] = handler; - return noErr; -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - if (net_protocols.erase(type) == 0) - return lapProtErr; - return noErr; -} - - -/* - * Transmit raw ethernet packet - */ - -static int16 ether_do_write(uint32 arg) -{ - // Copy packet to buffer - uint8 packet[1516], *p = packet; - int len = 0; -#if defined(__linux__) - if (net_if_type == NET_IF_ETHERTAP) { - *p++ = 0; // Linux ethertap discards the first 2 bytes - *p++ = 0; - len += 2; - } -#endif - len += ether_arg_to_buffer(arg, p); - -#if MONITOR - bug("Sending Ethernet packet:\n"); - for (int i=0; i 0) { - int len; - read(slirp_input_fd, &len, sizeof(len)); - uint8 packet[1516]; - assert(len <= sizeof(packet)); - read(slirp_input_fd, packet, len); - slirp_input(packet, len); - } - - // ... in the output queue - nfds = -1; - FD_ZERO(&rfds); - FD_ZERO(&wfds); - FD_ZERO(&xfds); - int timeout = slirp_select_fill(&nfds, &rfds, &wfds, &xfds); -#if ! USE_SLIRP_TIMEOUT - timeout = 10000; -#endif - tv.tv_sec = 0; - tv.tv_usec = timeout; - if (select(nfds + 1, &rfds, &wfds, &xfds, &tv) >= 0) - slirp_select_poll(&rfds, &wfds, &xfds); - -#ifdef HAVE_PTHREAD_TESTCANCEL - // Explicit cancellation point if select() was not covered - // This seems to be the case on MacOS X 10.2 - pthread_testcancel(); -#endif - } - return NULL; -} -#else -int slirp_can_output(void) -{ - return 0; -} - -void slirp_output(const uint8 *packet, int len) -{ -} -#endif - - -/* - * Packet reception thread - */ - -static void *receive_func(void *arg) -{ - for (;;) { - - // Wait for packets to arrive -#if USE_POLL - struct pollfd pf = {fd, POLLIN, 0}; - int res = poll(&pf, 1, -1); -#else - fd_set rfds; - FD_ZERO(&rfds); - FD_SET(fd, &rfds); - // A NULL timeout could cause select() to block indefinitely, - // even if it is supposed to be a cancellation point [MacOS X] - struct timeval tv = { 0, 20000 }; - int res = select(fd + 1, &rfds, NULL, NULL, &tv); -#ifdef HAVE_PTHREAD_TESTCANCEL - pthread_testcancel(); -#endif - if (res == 0 || (res == -1 && errno == EINTR)) - continue; -#endif - if (res <= 0) - break; - - if (ether_driver_opened) { - // Trigger Ethernet interrupt - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - - // Wait for interrupt acknowledge by EtherInterrupt() - sem_wait(&int_ack); - } else - Delay_usec(20000); - } - return NULL; -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -void ether_do_interrupt(void) -{ - // Call protocol handler for received packets - EthernetPacket ether_packet; - uint32 packet = ether_packet.addr(); - ssize_t length; - for (;;) { - -#ifndef SHEEPSHAVER - if (udp_tunnel) { - - // Read packet from socket - struct sockaddr_in from; - socklen_t from_len = sizeof(from); - length = recvfrom(fd, Mac2HostAddr(packet), 1514, 0, (struct sockaddr *)&from, &from_len); - if (length < 14) - break; - ether_udp_read(packet, length, &from); - - } else -#endif - { - - // Read packet from sheep_net device -#if defined(__linux__) - length = read(fd, Mac2HostAddr(packet), net_if_type == NET_IF_ETHERTAP ? 1516 : 1514); -#else - length = read(fd, Mac2HostAddr(packet), 1514); -#endif - if (length < 14) - break; - -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; i 0) { - if (len > buf_size - 1) - len = buf_size - 1; - memcpy(buf, p, len); - buf[len] = '\0'; - } - *pp = p1; - return 0; -} - -// Set up port forwarding for slirp -static void slirp_add_redirs() -{ - int index = 0; - const char *str; - while ((str = PrefsFindString("redir", index++)) != NULL) { - slirp_add_redir(str); - } -} - -// Add a port forward/redirection for slirp -static int slirp_add_redir(const char *redir_str) -{ - // code adapted from qemu source - struct in_addr guest_addr = {0}; - int host_port, guest_port; - const char *p; - char buf[256]; - int is_udp; - char *end; - char str[256]; - - p = redir_str; - if (!p || get_str_sep(buf, sizeof(buf), &p, ':') < 0) { - goto fail_syntax; - } - if (!strcmp(buf, "tcp") || buf[0] == '\0') { - is_udp = 0; - } else if (!strcmp(buf, "udp")) { - is_udp = 1; - } else { - goto fail_syntax; - } - - if (get_str_sep(buf, sizeof(buf), &p, ':') < 0) { - goto fail_syntax; - } - host_port = strtol(buf, &end, 0); - if (*end != '\0' || host_port < 1 || host_port > 65535) { - goto fail_syntax; - } - - if (get_str_sep(buf, sizeof(buf), &p, ':') < 0) { - goto fail_syntax; - } - // 0.0.0.0 doesn't seem to work, so default to a client address - // if none is specified - if (buf[0] == '\0' ? - !inet_aton(CTL_LOCAL, &guest_addr) : - !inet_aton(buf, &guest_addr)) { - goto fail_syntax; - } - - guest_port = strtol(p, &end, 0); - if (*end != '\0' || guest_port < 1 || guest_port > 65535) { - goto fail_syntax; - } - - if (slirp_redir(is_udp, host_port, guest_addr, guest_port) < 0) { - sprintf(str, "could not set up host forwarding rule '%s'", redir_str); - WarningAlert(str); - return -1; - } - return 0; - - fail_syntax: - sprintf(str, "invalid host forwarding rule '%s'", redir_str); - WarningAlert(str); - return -1; -} diff --git a/BasiliskII/src/Unix/ldscripts/freebsd-i386.ld b/BasiliskII/src/Unix/ldscripts/freebsd-i386.ld deleted file mode 100644 index a8d6745d1..000000000 --- a/BasiliskII/src/Unix/ldscripts/freebsd-i386.ld +++ /dev/null @@ -1,175 +0,0 @@ -/* Script for -z combreloc: combine and sort reloc sections */ -OUTPUT_FORMAT("elf32-i386-freebsd", "elf32-i386-freebsd", "elf32-i386-freebsd") -OUTPUT_ARCH(i386) -ENTRY(_start) -SEARCH_DIR("/lib"); SEARCH_DIR("/usr/lib"); -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.dyn : - { - *(.rel.init) - *(.rel.text .rel.text.* .rel.gnu.linkonce.t.*) - *(.rel.fini) - *(.rel.rodata .rel.rodata.* .rel.gnu.linkonce.r.*) - *(.rel.data .rel.data.* .rel.gnu.linkonce.d.*) - *(.rel.tdata .rel.tdata.* .rel.gnu.linkonce.td.*) - *(.rel.tbss .rel.tbss.* .rel.gnu.linkonce.tb.*) - *(.rel.ctors) - *(.rel.dtors) - *(.rel.got) - *(.rel.bss .rel.bss.* .rel.gnu.linkonce.b.*) - } - .rela.dyn : - { - *(.rela.init) - *(.rela.text .rela.text.* .rela.gnu.linkonce.t.*) - *(.rela.fini) - *(.rela.rodata .rela.rodata.* .rela.gnu.linkonce.r.*) - *(.rela.data .rela.data.* .rela.gnu.linkonce.d.*) - *(.rela.tdata .rela.tdata.* .rela.gnu.linkonce.td.*) - *(.rela.tbss .rela.tbss.* .rela.gnu.linkonce.tb.*) - *(.rela.ctors) - *(.rela.dtors) - *(.rela.got) - *(.rela.bss .rela.bss.* .rela.gnu.linkonce.b.*) - } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : - { - KEEP (*(.init)) - } =0x90909090 - .plt : { *(.plt) } - .text : - { - *(.text .stub .text.* .gnu.linkonce.t.*) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - } =0x90909090 - .fini : - { - KEEP (*(.fini)) - } =0x90909090 - PROVIDE (__etext = .); - PROVIDE (_etext = .); - PROVIDE (etext = .); - .rodata : { *(.rodata .rodata.* .gnu.linkonce.r.*) } - .rodata1 : { *(.rodata1) } - .eh_frame_hdr : { *(.eh_frame_hdr) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN (0x1000) - ((0x1000 - .) & (0x1000 - 1)); . = DATA_SEGMENT_ALIGN (0x1000, 0x1000); - /* Ensure the __preinit_array_start label is properly aligned. We - could instead move the label definition inside the section, but - the linker would then create the section even if it turns out to - be empty, which isn't pretty. */ - . = ALIGN(32 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { *(.preinit_array) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { *(.init_array) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { *(.fini_array) } - PROVIDE (__fini_array_end = .); - .data : - { - *(.data .data.* .gnu.linkonce.d.*) - SORT(CONSTRUCTORS) - } - .data1 : { *(.data1) } - .tdata : { *(.tdata .tdata.* .gnu.linkonce.td.*) } - .tbss : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) } - .eh_frame : { KEEP (*(.eh_frame)) } - .gcc_except_table : { *(.gcc_except_table) } - .dynamic : { *(.dynamic) } - .ctors : - { - /* gcc uses crtbegin.o to find the start of - the constructors, so we make sure it is - first. Because this is a wildcard, it - doesn't matter if the user does not - actually link against crtbegin.o; the - linker won't look for a file to match a - wildcard. The wildcard also means that it - doesn't matter which directory crtbegin.o - is in. */ - KEEP (*crtbegin*.o(.ctors)) - /* We don't want to include the .ctor section from - from the crtend.o file until after the sorted ctors. - The .ctor section from the crtend file contains the - end of ctors marker and it must be last */ - KEEP (*(EXCLUDE_FILE (*crtend*.o ) .ctors)) - KEEP (*(SORT(.ctors.*))) - KEEP (*(.ctors)) - } - .dtors : - { - KEEP (*crtbegin*.o(.dtors)) - KEEP (*(EXCLUDE_FILE (*crtend*.o ) .dtors)) - KEEP (*(SORT(.dtors.*))) - KEEP (*(.dtors)) - } - .jcr : { KEEP (*(.jcr)) } - .got : { *(.got.plt) *(.got) } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .bss : - { - *(.dynbss) - *(.bss .bss.* .gnu.linkonce.b.*) - *(COMMON) - /* Align here to ensure that the .bss section occupies space up to - _end. Align after .bss to ensure correct alignment even if the - .bss section disappears because there are no input sections. */ - . = ALIGN(32 / 8); - } - . = ALIGN(32 / 8); - _end = .; - PROVIDE (end = .); - . = DATA_SEGMENT_END (.); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } -} diff --git a/BasiliskII/src/Unix/ldscripts/linux-i386.ld b/BasiliskII/src/Unix/ldscripts/linux-i386.ld deleted file mode 100644 index ed3a0b5d2..000000000 --- a/BasiliskII/src/Unix/ldscripts/linux-i386.ld +++ /dev/null @@ -1,137 +0,0 @@ -OUTPUT_FORMAT("elf32-i386", "elf32-i386", "elf32-i386") -OUTPUT_ARCH(i386) -SEARCH_DIR(/lib); SEARCH_DIR(/usr/lib); SEARCH_DIR(/usr/local/lib); -ENTRY(_start) -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.text : - { *(.rel.text) *(.rel.gnu.linkonce.t*) } - .rela.text : - { *(.rela.text) *(.rela.gnu.linkonce.t*) } - .rel.data : - { *(.rel.data) *(.rel.gnu.linkonce.d*) } - .rela.data : - { *(.rela.data) *(.rela.gnu.linkonce.d*) } - .rel.rodata : - { *(.rel.rodata) *(.rel.gnu.linkonce.r*) } - .rela.rodata : - { *(.rela.rodata) *(.rela.gnu.linkonce.r*) } - .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.init : { *(.rel.init) } - .rela.init : { *(.rela.init) } - .rel.fini : { *(.rel.fini) } - .rela.fini : { *(.rela.fini) } - .rel.bss : { *(.rel.bss) } - .rela.bss : { *(.rela.bss) } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : { *(.init) } =0x47ff041f - .text : - { - *(.text) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - *(.gnu.linkonce.t*) - } =0x47ff041f - _etext = .; - PROVIDE (etext = .); - .fini : { *(.fini) } =0x47ff041f - . = ALIGN(32 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { *(.preinit_array) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { *(.init_array) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { *(.fini_array) } - PROVIDE (__fini_array_end = .); - .rodata : { *(.rodata) *(.gnu.linkonce.r*) } - .rodata1 : { *(.rodata1) } - .reginfo : { *(.reginfo) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN(0x100000) + (. & (0x100000 - 1)); - .data : - { - *(.data) - *(.gnu.linkonce.d*) - CONSTRUCTORS - } - .data1 : { *(.data1) } - .ctors : - { - *(.ctors) - } - .dtors : - { - *(.dtors) - } - .plt : { *(.plt) } - .got : { *(.got.plt) *(.got) } - .dynamic : { *(.dynamic) } - /* We want the small data sections together, so single-instruction offsets - can access them all, and initialized data all before uninitialized, so - we can shorten the on-disk segment size. */ - .sdata : { *(.sdata) } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .sbss : { *(.sbss) *(.scommon) } - .bss : - { - *(.dynbss) - *(.bss) - *(COMMON) - } - _end = . ; - PROVIDE (end = .); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } - /* These must appear regardless of . */ -} diff --git a/BasiliskII/src/Unix/ldscripts/linux-ppc.ld b/BasiliskII/src/Unix/ldscripts/linux-ppc.ld deleted file mode 100644 index b54743f52..000000000 --- a/BasiliskII/src/Unix/ldscripts/linux-ppc.ld +++ /dev/null @@ -1,219 +0,0 @@ -/* Script for -z combreloc: combine and sort reloc sections */ -OUTPUT_FORMAT("elf32-powerpc", "elf32-powerpc", "elf32-powerpc") -OUTPUT_ARCH(powerpc:common) -ENTRY(_start) -SEARCH_DIR("/lib"); SEARCH_DIR("/usr/lib"); SEARCH_DIR("/usr/local/lib"); -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.dyn : - { - *(.rel.init) - *(.rel.text .rel.text.* .rel.gnu.linkonce.t.*) - *(.rel.fini) - *(.rel.rodata .rel.rodata.* .rel.gnu.linkonce.r.*) - *(.rel.data.rel.ro*) - *(.rel.data .rel.data.* .rel.gnu.linkonce.d.*) - *(.rel.tdata .rel.tdata.* .rel.gnu.linkonce.td.*) - *(.rel.tbss .rel.tbss.* .rel.gnu.linkonce.tb.*) - *(.rel.ctors) - *(.rel.dtors) - *(.rel.got) - *(.rel.sdata .rel.sdata.* .rel.gnu.linkonce.s.*) - *(.rel.sbss .rel.sbss.* .rel.gnu.linkonce.sb.*) - *(.rel.sdata2 .rel.sdata2.* .rel.gnu.linkonce.s2.*) - *(.rel.sbss2 .rel.sbss2.* .rel.gnu.linkonce.sb2.*) - *(.rel.bss .rel.bss.* .rel.gnu.linkonce.b.*) - } - .rela.dyn : - { - *(.rela.init) - *(.rela.text .rela.text.* .rela.gnu.linkonce.t.*) - *(.rela.fini) - *(.rela.rodata .rela.rodata.* .rela.gnu.linkonce.r.*) - *(.rela.data .rela.data.* .rela.gnu.linkonce.d.*) - *(.rela.tdata .rela.tdata.* .rela.gnu.linkonce.td.*) - *(.rela.tbss .rela.tbss.* .rela.gnu.linkonce.tb.*) - *(.rela.ctors) - *(.rela.dtors) - *(.rela.got) - *(.rela.got1) - *(.rela.got2) - *(.rela.sdata .rela.sdata.* .rela.gnu.linkonce.s.*) - *(.rela.sbss .rela.sbss.* .rela.gnu.linkonce.sb.*) - *(.rela.sdata2 .rela.sdata2.* .rela.gnu.linkonce.s2.*) - *(.rela.sbss2 .rela.sbss2.* .rela.gnu.linkonce.sb2.*) - *(.rela.bss .rela.bss.* .rela.gnu.linkonce.b.*) - } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : - { - KEEP (*(.init)) - } =0 - .text : - { - *(.text .stub .text.* .gnu.linkonce.t.*) - KEEP (*(.text.*personality*)) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - } =0 - .fini : - { - KEEP (*(.fini)) - } =0 - PROVIDE (__etext = .); - PROVIDE (_etext = .); - PROVIDE (etext = .); - .rodata : { *(.rodata .rodata.* .gnu.linkonce.r.*) } - .rodata1 : { *(.rodata1) } - .sdata2 : { *(.sdata2 .sdata2.* .gnu.linkonce.s2.*) } - .sbss2 : { *(.sbss2 .sbss2.* .gnu.linkonce.sb2.*) } - .eh_frame_hdr : { *(.eh_frame_hdr) } - .eh_frame : ONLY_IF_RO { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RO { KEEP (*(.gcc_except_table)) *(.gcc_except_table.*) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN (0x10000) - ((0x10000 - .) & (0x10000 - 1)); . = DATA_SEGMENT_ALIGN (0x10000, 0x1000); - /* Exception handling */ - .eh_frame : ONLY_IF_RW { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RW { KEEP (*(.gcc_except_table)) *(.gcc_except_table.*) } - /* Thread Local Storage sections */ - .tdata : { *(.tdata .tdata.* .gnu.linkonce.td.*) } - .tbss : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) } - /* Ensure the __preinit_array_start label is properly aligned. We - could instead move the label definition inside the section, but - the linker would then create the section even if it turns out to - be empty, which isn't pretty. */ - . = ALIGN(32 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { KEEP (*(.preinit_array)) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { KEEP (*(.init_array)) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { KEEP (*(.fini_array)) } - PROVIDE (__fini_array_end = .); - .ctors : - { - /* gcc uses crtbegin.o to find the start of - the constructors, so we make sure it is - first. Because this is a wildcard, it - doesn't matter if the user does not - actually link against crtbegin.o; the - linker won't look for a file to match a - wildcard. The wildcard also means that it - doesn't matter which directory crtbegin.o - is in. */ - KEEP (*crtbegin*.o(.ctors)) - /* We don't want to include the .ctor section from - from the crtend.o file until after the sorted ctors. - The .ctor section from the crtend file contains the - end of ctors marker and it must be last */ - KEEP (*(EXCLUDE_FILE (*crtend*.o ) .ctors)) - KEEP (*(SORT(.ctors.*))) - KEEP (*(.ctors)) - } - .dtors : - { - KEEP (*crtbegin*.o(.dtors)) - KEEP (*(EXCLUDE_FILE (*crtend*.o ) .dtors)) - KEEP (*(SORT(.dtors.*))) - KEEP (*(.dtors)) - } - .jcr : { KEEP (*(.jcr)) } - .data.rel.ro : { *(.data.rel.ro.local) *(.data.rel.ro*) } - .fixup : { *(.fixup) } - .got1 : { *(.got1) } - .got2 : { *(.got2) } - .dynamic : { *(.dynamic) } - . = DATA_SEGMENT_RELRO_END (0, .); - .data : - { - *(.data .data.* .gnu.linkonce.d.*) - KEEP (*(.gnu.linkonce.d.*personality*)) - SORT(CONSTRUCTORS) - } - .data1 : { *(.data1) } - .got1 : { *(.got1) } - .got2 : { *(.got2) } - .got : { *(.got.plt) *(.got) } - /* We want the small data sections together, so single-instruction offsets - can access them all, and initialized data all before uninitialized, so - we can shorten the on-disk segment size. */ - .sdata : - { - *(.sdata .sdata.* .gnu.linkonce.s.*) - } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .sbss : - { - PROVIDE (__sbss_start = .); - PROVIDE (___sbss_start = .); - *(.dynsbss) - *(.sbss .sbss.* .gnu.linkonce.sb.*) - *(.scommon) - PROVIDE (__sbss_end = .); - PROVIDE (___sbss_end = .); - } - .plt : { *(.plt) } - .bss : - { - *(.dynbss) - *(.bss .bss.* .gnu.linkonce.b.*) - *(COMMON) - /* Align here to ensure that the .bss section occupies space up to - _end. Align after .bss to ensure correct alignment even if the - .bss section disappears because there are no input sections. */ - . = ALIGN(32 / 8); - } - . = ALIGN(32 / 8); - _end = .; - PROVIDE (end = .); - . = DATA_SEGMENT_END (.); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } - /DISCARD/ : { *(.fixup) } -} diff --git a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld b/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld deleted file mode 100644 index b824271ab..000000000 --- a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld +++ /dev/null @@ -1,171 +0,0 @@ -/* Default linker script, for normal executables */ -OUTPUT_FORMAT("elf64-x86-64", "elf64-x86-64", "elf64-x86-64") -OUTPUT_ARCH(i386:x86-64) -ENTRY(_start) -SEARCH_DIR("/lib64"); SEARCH_DIR("/usr/lib64"); SEARCH_DIR("/usr/local/lib64"); -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.init : { *(.rel.init) } - .rela.init : { *(.rela.init) } - .rel.text : { *(.rel.text .rel.text.* .rel.gnu.linkonce.t.*) } - .rela.text : { *(.rela.text .rela.text.* .rela.gnu.linkonce.t.*) } - .rel.fini : { *(.rel.fini) } - .rela.fini : { *(.rela.fini) } - .rel.rodata : { *(.rel.rodata .rel.rodata.* .rel.gnu.linkonce.r.*) } - .rela.rodata : { *(.rela.rodata .rela.rodata.* .rela.gnu.linkonce.r.*) } - .rel.data : { *(.rel.data .rel.data.* .rel.gnu.linkonce.d.*) } - .rela.data : { *(.rela.data .rela.data.* .rela.gnu.linkonce.d.*) } - .rel.tdata : { *(.rel.tdata .rel.tdata.* .rel.gnu.linkonce.td.*) } - .rela.tdata : { *(.rela.tdata .rela.tdata.* .rela.gnu.linkonce.td.*) } - .rel.tbss : { *(.rel.tbss .rel.tbss.* .rel.gnu.linkonce.tb.*) } - .rela.tbss : { *(.rela.tbss .rela.tbss.* .rela.gnu.linkonce.tb.*) } - .rel.ctors : { *(.rel.ctors) } - .rela.ctors : { *(.rela.ctors) } - .rel.dtors : { *(.rel.dtors) } - .rela.dtors : { *(.rela.dtors) } - .rel.got : { *(.rel.got) } - .rela.got : { *(.rela.got) } - .rel.bss : { *(.rel.bss .rel.bss.* .rel.gnu.linkonce.b.*) } - .rela.bss : { *(.rela.bss .rela.bss.* .rela.gnu.linkonce.b.*) } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : - { - KEEP (*(.init)) - } =0x90909090 - .plt : { *(.plt) } - .text : - { - *(.text .stub .text.* .gnu.linkonce.t.*) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - } =0x90909090 - .fini : - { - KEEP (*(.fini)) - } =0x90909090 - PROVIDE (__etext = .); - PROVIDE (_etext = .); - PROVIDE (etext = .); - .rodata : { *(.rodata .rodata.* .gnu.linkonce.r.*) } - .rodata1 : { *(.rodata1) } - .eh_frame_hdr : { *(.eh_frame_hdr) } - .eh_frame : ONLY_IF_RO { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RO { *(.gcc_except_table) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN (0x100000) - ((0x100000 - .) & (0x100000 - 1)); . = DATA_SEGMENT_ALIGN (0x100000, 0x1000); - /* Ensure the __preinit_array_start label is properly aligned. We - could instead move the label definition inside the section, but - the linker would then create the section even if it turns out to - be empty, which isn't pretty. */ - . = ALIGN(64 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { *(.preinit_array) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { *(.init_array) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { *(.fini_array) } - PROVIDE (__fini_array_end = .); - .data : - { - *(.data .data.* .gnu.linkonce.d.*) - SORT(CONSTRUCTORS) - } - .data1 : { *(.data1) } - .tdata : { *(.tdata .tdata.* .gnu.linkonce.td.*) } - .tbss : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) } - .eh_frame : ONLY_IF_RW { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RW { *(.gcc_except_table) } - .dynamic : { *(.dynamic) } - .ctors : - { - /* gcc uses crtbegin.o to find the start of - the constructors, so we make sure it is - first. Because this is a wildcard, it - doesn't matter if the user does not - actually link against crtbegin.o; the - linker won't look for a file to match a - wildcard. The wildcard also means that it - doesn't matter which directory crtbegin.o - is in. */ - KEEP (*crtbegin.o(.ctors)) - /* We don't want to include the .ctor section from - from the crtend.o file until after the sorted ctors. - The .ctor section from the crtend file contains the - end of ctors marker and it must be last */ - KEEP (*(EXCLUDE_FILE (*crtend.o ) .ctors)) - KEEP (*(SORT(.ctors.*))) - KEEP (*(.ctors)) - } - .dtors : - { - KEEP (*crtbegin.o(.dtors)) - KEEP (*(EXCLUDE_FILE (*crtend.o ) .dtors)) - KEEP (*(SORT(.dtors.*))) - KEEP (*(.dtors)) - } - .jcr : { KEEP (*(.jcr)) } - .got : { *(.got.plt) *(.got) } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .bss : - { - *(.dynbss) - *(.bss .bss.* .gnu.linkonce.b.*) - *(COMMON) - /* Align here to ensure that the .bss section occupies space up to - _end. Align after .bss to ensure correct alignment even if the - .bss section disappears because there are no input sections. */ - . = ALIGN(64 / 8); - } - . = ALIGN(64 / 8); - _end = .; - PROVIDE (end = .); - . = DATA_SEGMENT_END (.); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } -} diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 3505335e8..644c215b3 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -29,45 +29,14 @@ # include #endif -#ifndef USE_SDL_VIDEO -# include -#endif - #ifdef HAVE_PTHREADS # include #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # include #endif -#if !EMULATED_68K && defined(__NetBSD__) -# include -# include -# include -# include -struct sigstate { - int ss_flags; - struct frame ss_frame; - struct fpframe ss_fpstate; -}; -# define SS_FPSTATE 0x02 -# define SS_USERREGS 0x04 -#endif - -#ifdef ENABLE_GTK -# include -# include -# ifdef HAVE_GNOMEUI -# include -# endif -#endif - -#ifdef ENABLE_XF86_DGA -# include -# include -#endif - #include using std::string; @@ -88,13 +57,6 @@ using std::string; #include "sigsegv.h" #include "rpc.h" -#if USE_JIT -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp -#endif - -#ifdef ENABLE_MON -# include "mon.h" -#endif #define DEBUG 0 #include "debug.h" @@ -102,21 +64,8 @@ extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_suppo // Constants const char ROM_FILE_NAME[] = "ROM"; -#if !EMULATED_68K -const int SIG_STACK_SIZE = SIGSTKSZ; // Size of signal stack -#endif -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - -#if !EMULATED_68K -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM -#endif +const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area // CPU and FPU type, addressing mode @@ -127,20 +76,10 @@ bool TwentyFourBitAddressing; // Global variables -#ifndef USE_SDL_VIDEO -extern char *x_display_name; // X11 display name -extern Display *x_display; // X11 display handle -#ifdef X11_LOCK_TYPE -X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock -#endif -#endif static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes #ifdef HAVE_PTHREADS -#if !EMULATED_68K -static pthread_t emul_thread; // Handle of MacOS emulation thread (main thread) -#endif static bool xpram_thread_active = false; // Flag: XPRAM watchdog installed static volatile bool xpram_thread_cancel = false; // Flag: Cancel XPRAM thread @@ -162,14 +101,6 @@ static pthread_mutex_t intflag_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to pro #endif -#if !EMULATED_68K -#define SIG_IRQ SIGUSR1 -static struct sigaction sigirq_sa; // Virtual 68k interrupt signal -static struct sigaction sigill_sa; // Illegal instruction -static void *sig_stack = NULL; // Stack for signal handlers -uint16 EmulatedSR; // Emulated bits of SR (supervisor bit and interrupt mask) -#endif - #if USE_SCRATCHMEM_SUBTERFUGE uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes #endif @@ -183,14 +114,6 @@ static timer_t timer; // 60Hz timer #endif #endif // !HAVE_PTHREADS -#ifdef ENABLE_MON -static struct sigaction sigint_sa; // sigaction for SIGINT handler -static void sigint_handler(...); -#endif - -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI static const char *gui_connection_path = NULL; // GUI connection identifier @@ -200,11 +123,6 @@ static const char *gui_connection_path = NULL; // GUI connection identifier static void *xpram_func(void *arg); static void *tick_func(void *arg); static void one_tick(...); -#if !EMULATED_68K -static void sigirq_handler(int sig, int code, struct sigcontext *scp); -static void sigill_handler(int sig, int code, struct sigcontext *scp); -extern "C" void EmulOpTrampoline(void); -#endif /* @@ -285,15 +203,9 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) extern void m68k_dumpstate(uaecptr *nextpc); m68k_dumpstate(&nextpc); #endif -#if USE_JIT && JIT_DEBUG - extern void compiler_dumpstate(void); - compiler_dumpstate(); -#endif + VideoQuitFullScreen(); -#ifdef ENABLE_MON - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif + QuitEmulator(); } @@ -398,12 +310,6 @@ int main(int argc, char **argv) for (int i=1; i 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) RAMSize = 1023*1024*1024; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING RAMSize = RAMSize & -getpagesize(); // Round down to page boundary #endif // Initialize VM system vm_init(); -#if REAL_ADDRESSING - // Flag: RAM and ROM are contigously allocated from address 0 - bool memory_mapped_from_zero = false; - - // Make sure to map RAM & ROM at address 0 only on platforms that - // supports linker scripts to relocate the Basilisk II executable - // above 0x70000000 -#if HAVE_LINKER_SCRIPT - const bool can_map_all_memory = true; -#else - const bool can_map_all_memory = false; -#endif - - // Try to allocate all memory from 0x0000, if it is not known to crash - if (can_map_all_memory && (vm_acquire_mac_fixed(0, RAMSize + 0x100000) == 0)) { - D(bug("Could allocate RAM and ROM from 0x0000\n")); - memory_mapped_from_zero = true; - } - -#ifndef PAGEZERO_HACK - // Otherwise, just create the Low Memory area (0x0000..0x2000) - else if (vm_acquire_mac_fixed(0, 0x2000) == 0) { - D(bug("Could allocate the Low Memory globals\n")); - lm_area_mapped = true; - } - - // Exit on failure - else { - sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif -#endif /* REAL_ADDRESSING */ - // Create areas for Mac RAM and ROM -#if REAL_ADDRESSING - if (memory_mapped_from_zero) { - RAMBaseHost = (uint8 *)0; - ROMBaseHost = RAMBaseHost + RAMSize; - } - else -#endif { uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); if (ram_rom_area == VM_MAP_FAILED) { @@ -615,10 +448,7 @@ int main(int argc, char **argv) RAMBaseMac = 0; ROMBaseMac = Host2MacAddr(ROMBaseHost); #endif -#if REAL_ADDRESSING - RAMBaseMac = Host2MacAddr(RAMBaseHost); - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif + D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); @@ -645,98 +475,11 @@ int main(int argc, char **argv) QuitEmulator(); } -#if !EMULATED_68K - // Get CPU model - int mib[2] = {CTL_HW, HW_MODEL}; - char *model; - size_t model_len; - sysctl(mib, 2, NULL, &model_len, NULL, 0); - model = (char *)malloc(model_len); - sysctl(mib, 2, model, &model_len, NULL, 0); - D(bug("Model: %s\n", model)); - - // Set CPU and FPU type - CPUIs68060 = false; - if (strstr(model, "020")) - CPUType = 2; - else if (strstr(model, "030")) - CPUType = 3; - else if (strstr(model, "040")) - CPUType = 4; - else if (strstr(model, "060")) { - CPUType = 4; - CPUIs68060 = true; - } else { - printf("WARNING: Cannot detect CPU type, assuming 68020\n"); - CPUType = 2; - } - FPUType = 1; // NetBSD has an FPU emulation, so the FPU ought to be available at all times - TwentyFourBitAddressing = false; -#endif - // Initialize everything if (!InitAll(vmdir)) QuitEmulator(); D(bug("Initialization complete\n")); -#if !EMULATED_68K - // (Virtual) supervisor mode, disable interrupts - EmulatedSR = 0x2700; - -#ifdef HAVE_PTHREADS - // Get handle of main thread - emul_thread = pthread_self(); -#endif - - // Create and install stack for signal handlers - sig_stack = malloc(SIG_STACK_SIZE); - D(bug("Signal stack at %p\n", sig_stack)); - if (sig_stack == NULL) { - ErrorAlert(STR_NOT_ENOUGH_MEMORY_ERR); - QuitEmulator(); - } - stack_t new_stack; - new_stack.ss_sp = sig_stack; - new_stack.ss_flags = 0; - new_stack.ss_size = SIG_STACK_SIZE; - if (sigaltstack(&new_stack, NULL) < 0) { - sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - - // Install SIGILL handler for emulating privileged instructions and - // executing A-Trap and EMUL_OP opcodes - sigemptyset(&sigill_sa.sa_mask); // Block virtual 68k interrupts during SIGILL handling - sigaddset(&sigill_sa.sa_mask, SIG_IRQ); - sigaddset(&sigill_sa.sa_mask, SIGALRM); - sigill_sa.sa_handler = (void (*)(int))sigill_handler; - sigill_sa.sa_flags = SA_ONSTACK; - if (sigaction(SIGILL, &sigill_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGILL", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - - // Install virtual 68k interrupt signal handler - sigemptyset(&sigirq_sa.sa_mask); - sigaddset(&sigirq_sa.sa_mask, SIGALRM); - sigirq_sa.sa_handler = (void (*)(int))sigirq_handler; - sigirq_sa.sa_flags = SA_ONSTACK | SA_RESTART; - if (sigaction(SIG_IRQ, &sigirq_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIG_IRQ", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif - -#ifdef ENABLE_MON - // Setup SIGINT handler to enter mon - sigemptyset(&sigint_sa.sa_mask); - sigint_sa.sa_handler = (void (*)(int))sigint_handler; - sigint_sa.sa_flags = 0; - sigaction(SIGINT, &sigint_sa, NULL); -#endif #ifndef USE_CPU_EMUL_SERVICES #if defined(HAVE_PTHREADS) @@ -786,9 +529,6 @@ int main(int argc, char **argv) // Start 60Hz timer sigemptyset(&timer_sa.sa_mask); // Block virtual 68k interrupts during SIGARLM handling -#if !EMULATED_68K - sigaddset(&timer_sa.sa_mask, SIG_IRQ); -#endif timer_sa.sa_handler = one_tick; timer_sa.sa_flags = SA_ONSTACK | SA_RESTART; if (sigaction(SIGALRM, &timer_sa, NULL) < 0) { @@ -887,12 +627,6 @@ void QuitEmulator(void) } #endif -#if REAL_ADDRESSING - // Delete Low Memory area - if (lm_area_mapped) - vm_release(0, 0x2000); -#endif - // Exit VM wrappers vm_exit(); @@ -902,12 +636,6 @@ void QuitEmulator(void) // Exit preferences PrefsExit(); - // Close X11 server connection -#ifndef USE_SDL_VIDEO - if (x_display) - XCloseDisplay(x_display); -#endif - // Notify GUI we are about to leave if (gui_connection) { if (rpc_method_invoke(gui_connection, RPC_METHOD_EXIT, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) @@ -925,34 +653,9 @@ void QuitEmulator(void) void FlushCodeCache(void *start, uint32 size) { -#if USE_JIT - if (UseJIT) - flush_icache_range((uint8 *)start, size); -#endif -#if !EMULATED_68K && defined(__NetBSD__) - m68k_sync_icache(start, size); -#endif -} - - -/* - * SIGINT handler, enters mon - */ -#ifdef ENABLE_MON -static void sigint_handler(...) -{ -#if EMULATED_68K - uaecptr nextpc; - extern void m68k_dumpstate(uaecptr *nextpc); - m68k_dumpstate(&nextpc); -#endif - VideoQuitFullScreen(); - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); - QuitEmulator(); } -#endif + #ifdef HAVE_PTHREADS @@ -1089,22 +792,6 @@ void ClearInterruptFlag(uint32 flag) } #endif -#if !EMULATED_68K -void TriggerInterrupt(void) -{ -#if defined(HAVE_PTHREADS) - pthread_kill(emul_thread, SIG_IRQ); -#else - raise(SIG_IRQ); -#endif -} - -void TriggerNMI(void) -{ - // not yet supported -} -#endif - /* * XPRAM watchdog thread (saves XPRAM every minute) @@ -1200,354 +887,6 @@ static void *tick_func(void *arg) #endif -#if !EMULATED_68K -/* - * Virtual 68k interrupt handler - */ - -static void sigirq_handler(int sig, int code, struct sigcontext *scp) -{ - // Interrupts disabled? Then do nothing - if (EmulatedSR & 0x0700) - return; - - struct sigstate *state = (struct sigstate *)scp->sc_ap; - M68kRegisters *regs = (M68kRegisters *)&state->ss_frame; - - // Set up interrupt frame on stack - uint32 a7 = regs->a[7]; - a7 -= 2; - WriteMacInt16(a7, 0x64); - a7 -= 4; - WriteMacInt32(a7, scp->sc_pc); - a7 -= 2; - WriteMacInt16(a7, scp->sc_ps | EmulatedSR); - scp->sc_sp = regs->a[7] = a7; - - // Set interrupt level - EmulatedSR |= 0x2100; - - // Jump to MacOS interrupt handler on return - scp->sc_pc = ReadMacInt32(0x64); -} - - -/* - * SIGILL handler, for emulation of privileged instructions and executing - * A-Trap and EMUL_OP opcodes - */ - -static void sigill_handler(int sig, int code, struct sigcontext *scp) -{ - struct sigstate *state = (struct sigstate *)scp->sc_ap; - uint16 *pc = (uint16 *)scp->sc_pc; - uint16 opcode = *pc; - M68kRegisters *regs = (M68kRegisters *)&state->ss_frame; - -#define INC_PC(n) scp->sc_pc += (n) - -#define GET_SR (scp->sc_ps | EmulatedSR) - -#define STORE_SR(v) \ - scp->sc_ps = (v) & 0xff; \ - EmulatedSR = (v) & 0xe700; \ - if (((v) & 0x0700) == 0 && InterruptFlags) \ - TriggerInterrupt(); - -//printf("opcode %04x at %p, sr %04x, emul_sr %04x\n", opcode, pc, scp->sc_ps, EmulatedSR); - - if ((opcode & 0xf000) == 0xa000) { - - // A-Line instruction, set up A-Line trap frame on stack - uint32 a7 = regs->a[7]; - a7 -= 2; - WriteMacInt16(a7, 0x28); - a7 -= 4; - WriteMacInt32(a7, (uint32)pc); - a7 -= 2; - WriteMacInt16(a7, GET_SR); - scp->sc_sp = regs->a[7] = a7; - - // Jump to MacOS A-Line handler on return - scp->sc_pc = ReadMacInt32(0x28); - - } else if ((opcode & 0xff00) == 0x7100) { - - // Extended opcode, push registers on user stack - uint32 a7 = regs->a[7]; - a7 -= 4; - WriteMacInt32(a7, (uint32)pc); - a7 -= 2; - WriteMacInt16(a7, scp->sc_ps); - for (int i=7; i>=0; i--) { - a7 -= 4; - WriteMacInt32(a7, regs->a[i]); - } - for (int i=7; i>=0; i--) { - a7 -= 4; - WriteMacInt32(a7, regs->d[i]); - } - scp->sc_sp = regs->a[7] = a7; - - // Jump to EmulOp trampoline code on return - scp->sc_pc = (uint32)EmulOpTrampoline; - - } else switch (opcode) { // Emulate privileged instructions - - case 0x40e7: // move sr,-(sp) - regs->a[7] -= 2; - WriteMacInt16(regs->a[7], GET_SR); - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0x46df: { // move (sp)+,sr - uint16 sr = ReadMacInt16(regs->a[7]); - STORE_SR(sr); - regs->a[7] += 2; - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - } - - case 0x007c: { // ori #xxxx,sr - uint16 sr = GET_SR | pc[1]; - scp->sc_ps = sr & 0xff; // oring bits into the sr can't enable interrupts, so we don't need to call STORE_SR - EmulatedSR = sr & 0xe700; - INC_PC(4); - break; - } - - case 0x027c: { // andi #xxxx,sr - uint16 sr = GET_SR & pc[1]; - STORE_SR(sr); - INC_PC(4); - break; - } - - case 0x46fc: // move #xxxx,sr - STORE_SR(pc[1]); - INC_PC(4); - break; - - case 0x46ef: { // move (xxxx,sp),sr - uint16 sr = ReadMacInt16(regs->a[7] + (int32)(int16)pc[1]); - STORE_SR(sr); - INC_PC(4); - break; - } - - case 0x46d8: // move (a0)+,sr - case 0x46d9: { // move (a1)+,sr - uint16 sr = ReadMacInt16(regs->a[opcode & 7]); - STORE_SR(sr); - regs->a[opcode & 7] += 2; - INC_PC(2); - break; - } - - case 0x40f8: // move sr,xxxx.w - WriteMacInt16(pc[1], GET_SR); - INC_PC(4); - break; - - case 0x40d0: // move sr,(a0) - case 0x40d1: // move sr,(a1) - case 0x40d2: // move sr,(a2) - case 0x40d3: // move sr,(a3) - case 0x40d4: // move sr,(a4) - case 0x40d5: // move sr,(a5) - case 0x40d6: // move sr,(a6) - case 0x40d7: // move sr,(sp) - WriteMacInt16(regs->a[opcode & 7], GET_SR); - INC_PC(2); - break; - - case 0x40c0: // move sr,d0 - case 0x40c1: // move sr,d1 - case 0x40c2: // move sr,d2 - case 0x40c3: // move sr,d3 - case 0x40c4: // move sr,d4 - case 0x40c5: // move sr,d5 - case 0x40c6: // move sr,d6 - case 0x40c7: // move sr,d7 - regs->d[opcode & 7] = GET_SR; - INC_PC(2); - break; - - case 0x46c0: // move d0,sr - case 0x46c1: // move d1,sr - case 0x46c2: // move d2,sr - case 0x46c3: // move d3,sr - case 0x46c4: // move d4,sr - case 0x46c5: // move d5,sr - case 0x46c6: // move d6,sr - case 0x46c7: { // move d7,sr - uint16 sr = regs->d[opcode & 7]; - STORE_SR(sr); - INC_PC(2); - break; - } - - case 0xf327: // fsave -(sp) - regs->a[7] -= 4; - WriteMacInt32(regs->a[7], 0x41000000); // Idle frame - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0xf35f: // frestore (sp)+ - regs->a[7] += 4; - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0x4e73: { // rte - uint32 a7 = regs->a[7]; - uint16 sr = ReadMacInt16(a7); - a7 += 2; - scp->sc_ps = sr & 0xff; - EmulatedSR = sr & 0xe700; - scp->sc_pc = ReadMacInt32(a7); - a7 += 4; - uint16 format = ReadMacInt16(a7) >> 12; - a7 += 2; - static const int frame_adj[16] = { - 0, 0, 4, 4, 8, 0, 0, 52, 50, 12, 24, 84, 16, 0, 0, 0 - }; - scp->sc_sp = regs->a[7] = a7 + frame_adj[format]; - break; - } - - case 0x4e7a: // movec cr,x - switch (pc[1]) { - case 0x0002: // movec cacr,d0 - regs->d[0] = 0x3111; - break; - case 0x1002: // movec cacr,d1 - regs->d[1] = 0x3111; - break; - case 0x0003: // movec tc,d0 - case 0x0004: // movec itt0,d0 - case 0x0005: // movec itt1,d0 - case 0x0006: // movec dtt0,d0 - case 0x0007: // movec dtt1,d0 - case 0x0806: // movec urp,d0 - case 0x0807: // movec srp,d0 - regs->d[0] = 0; - break; - case 0x1000: // movec sfc,d1 - case 0x1001: // movec dfc,d1 - case 0x1003: // movec tc,d1 - case 0x1801: // movec vbr,d1 - regs->d[1] = 0; - break; - case 0x8801: // movec vbr,a0 - regs->a[0] = 0; - break; - case 0x9801: // movec vbr,a1 - regs->a[1] = 0; - break; - default: - goto ill; - } - INC_PC(4); - break; - - case 0x4e7b: // movec x,cr - switch (pc[1]) { - case 0x1000: // movec d1,sfc - case 0x1001: // movec d1,dfc - case 0x0801: // movec d0,vbr - case 0x1801: // movec d1,vbr - break; - case 0x0002: // movec d0,cacr - case 0x1002: // movec d1,cacr - FlushCodeCache(NULL, 0); - break; - default: - goto ill; - } - INC_PC(4); - break; - - case 0xf478: // cpusha dc - case 0xf4f8: // cpusha dc/ic - FlushCodeCache(NULL, 0); - INC_PC(2); - break; - - default: -ill: printf("SIGILL num %d, code %d\n", sig, code); - printf(" context %p:\n", scp); - printf(" onstack %08x\n", scp->sc_onstack); - printf(" sp %08x\n", scp->sc_sp); - printf(" fp %08x\n", scp->sc_fp); - printf(" pc %08x\n", scp->sc_pc); - printf(" opcode %04x\n", opcode); - printf(" sr %08x\n", scp->sc_ps); - printf(" state %p:\n", state); - printf(" flags %d\n", state->ss_flags); - for (int i=0; i<8; i++) - printf(" d%d %08x\n", i, state->ss_frame.f_regs[i]); - for (int i=0; i<8; i++) - printf(" a%d %08x\n", i, state->ss_frame.f_regs[i+8]); - - VideoQuitFullScreen(); -#ifdef ENABLE_MON - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif - QuitEmulator(); - break; - } -} -#endif - - -/* - * Display alert - */ - -#ifdef ENABLE_GTK -static void dl_destroyed(void) -{ - gtk_main_quit(); -} - -static void dl_quit(GtkWidget *dialog) -{ - gtk_widget_destroy(dialog); -} - -void display_alert(int title_id, int prefix_id, int button_id, const char *text) -{ - char str[256]; - sprintf(str, GetString(prefix_id), text); - - GtkWidget *dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); - - GtkWidget *label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); - - gtk_main(); -} -#endif - - /* * Display error alert */ @@ -1559,16 +898,7 @@ void ErrorAlert(const char *text) rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) return; } -#if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - VideoQuitFullScreen(); - display_alert(STR_ERROR_ALERT_TITLE, STR_GUI_ERROR_PREFIX, STR_QUIT_BUTTON, text); -#else printf(GetString(STR_SHELL_ERROR_PREFIX), text); -#endif } @@ -1583,15 +913,7 @@ void WarningAlert(const char *text) rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) return; } -#if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - display_alert(STR_WARNING_ALERT_TITLE, STR_GUI_WARNING_PREFIX, STR_OK_BUTTON, text); -#else printf(GetString(STR_SHELL_WARNING_PREFIX), text); -#endif } diff --git a/BasiliskII/src/Unix/prefs_editor_gtk.cpp b/BasiliskII/src/Unix/prefs_editor_gtk.cpp deleted file mode 100644 index 637e1e672..000000000 --- a/BasiliskII/src/Unix/prefs_editor_gtk.cpp +++ /dev/null @@ -1,1828 +0,0 @@ -/* - * prefs_editor_gtk.cpp - Preferences editor, Unix implementation using GTK+ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include - -#ifdef HAVE_GNOMEUI -#include -#endif - -#include "user_strings.h" -#include "version.h" -#include "cdrom.h" -#include "xpram.h" -#include "prefs.h" -#include "prefs_editor.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static GtkWidget *win; // Preferences window -static bool start_clicked = false; // Return value of PrefsEditor() function - - -// Prototypes -static void create_volumes_pane(GtkWidget *top); -static void create_scsi_pane(GtkWidget *top); -static void create_graphics_pane(GtkWidget *top); -static void create_input_pane(GtkWidget *top); -static void create_serial_pane(GtkWidget *top); -static void create_memory_pane(GtkWidget *top); -static void create_jit_pane(GtkWidget *top); -static void read_settings(void); - - -/* - * Utility functions - */ - -#if ! GLIB_CHECK_VERSION(2,0,0) -#define G_OBJECT(obj) GTK_OBJECT(obj) -#define g_object_get_data(obj, key) gtk_object_get_data((obj), (key)) -#define g_object_set_data(obj, key, data) gtk_object_set_data((obj), (key), (data)) -#endif - -struct opt_desc { - int label_id; - GtkSignalFunc func; -}; - -struct combo_desc { - int label_id; -}; - -struct file_req_assoc { - file_req_assoc(GtkWidget *r, GtkWidget *e) : req(r), entry(e) {} - GtkWidget *req; - GtkWidget *entry; -}; - -static void cb_browse_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (char *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_entry_set_text(GTK_ENTRY(assoc->entry), file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -static void cb_browse(GtkWidget *widget, void *user_data) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_BROWSE_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(cb_browse_ok), new file_req_assoc(req, (GtkWidget *)user_data)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -static GtkWidget *make_browse_button(GtkWidget *entry) -{ - GtkWidget *button; - - button = gtk_button_new_with_label(GetString(STR_BROWSE_CTRL)); - gtk_widget_show(button); - gtk_signal_connect(GTK_OBJECT(button), "clicked", (GtkSignalFunc)cb_browse, (void *)entry); - return button; -} - -static void add_menu_item(GtkWidget *menu, int label_id, GtkSignalFunc func) -{ - GtkWidget *item = gtk_menu_item_new_with_label(GetString(label_id)); - gtk_widget_show(item); - gtk_signal_connect(GTK_OBJECT(item), "activate", func, NULL); - gtk_menu_append(GTK_MENU(menu), item); -} - -static GtkWidget *make_pane(GtkWidget *notebook, int title_id) -{ - GtkWidget *frame, *label, *box; - - frame = gtk_frame_new(NULL); - gtk_container_set_border_width(GTK_CONTAINER(frame), 4); - - box = gtk_vbox_new(FALSE, 4); - gtk_container_set_border_width(GTK_CONTAINER(box), 4); - gtk_container_add(GTK_CONTAINER(frame), box); - - gtk_widget_show_all(frame); - - label = gtk_label_new(GetString(title_id)); - gtk_notebook_append_page(GTK_NOTEBOOK(notebook), frame, label); - return box; -} - -static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *buttons) -{ - GtkWidget *bb, *button; - - bb = gtk_hbutton_box_new(); - gtk_widget_show(bb); - gtk_container_set_border_width(GTK_CONTAINER(bb), border); - gtk_button_box_set_layout(GTK_BUTTON_BOX(bb), GTK_BUTTONBOX_DEFAULT_STYLE); - gtk_button_box_set_spacing(GTK_BUTTON_BOX(bb), 4); - gtk_box_pack_start(GTK_BOX(top), bb, FALSE, FALSE, 0); - - while (buttons->label_id) { - button = gtk_button_new_with_label(GetString(buttons->label_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", buttons->func, NULL); - gtk_box_pack_start(GTK_BOX(bb), button, TRUE, TRUE, 0); - buttons++; - } - return bb; -} - -static GtkWidget *make_separator(GtkWidget *top) -{ - GtkWidget *sep = gtk_hseparator_new(); - gtk_box_pack_start(GTK_BOX(top), sep, FALSE, FALSE, 0); - gtk_widget_show(sep); - return sep; -} - -static GtkWidget *make_table(GtkWidget *top, int x, int y) -{ - GtkWidget *table = gtk_table_new(x, y, FALSE); - gtk_widget_show(table); - gtk_box_pack_start(GTK_BOX(top), table, FALSE, FALSE, 0); - return table; -} - -static GtkWidget *table_make_option_menu(GtkWidget *table, int row, int label_id, const opt_desc *options, int active) -{ - GtkWidget *label, *opt, *menu; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - return menu; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, GList *glist) -{ - GtkWidget *label, *combo; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), default_value); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - return combo; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, const combo_desc *options) -{ - GList *glist = NULL; - while (options->label_id) { - glist = g_list_append(glist, (void *)GetString(options->label_id)); - options++; - } - - return table_make_combobox(table, row, label_id, default_value, glist); -} - -static GtkWidget *table_make_file_entry(GtkWidget *table, int row, int label_id, const char *prefs_item, bool only_dirs = false) -{ - GtkWidget *box, *label, *entry, *button; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_table_attach(GTK_TABLE(table), box, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - entry = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - - button = make_browse_button(entry); - gtk_box_pack_start(GTK_BOX(box), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(entry), "chooser_button", button); - return entry; -} - -static GtkWidget *make_option_menu(GtkWidget *top, int label_id, const opt_desc *options, int active) -{ - GtkWidget *box, *label, *opt, *menu; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_box_pack_start(GTK_BOX(box), opt, FALSE, FALSE, 0); - return menu; -} - -static GtkWidget *make_file_entry(GtkWidget *top, int label_id, const char *prefs_item, bool only_dirs = false) -{ - GtkWidget *box, *label, *entry; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - -#ifdef HAVE_GNOMEUI - entry = gnome_file_entry_new(NULL, GetString(label_id)); - if (only_dirs) - gnome_file_entry_set_directory(GNOME_FILE_ENTRY(entry), true); - gtk_entry_set_text(GTK_ENTRY(gnome_file_entry_gtk_entry(GNOME_FILE_ENTRY(entry))), str); -#else - entry = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(entry), str); -#endif - gtk_widget_show(entry); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - return entry; -} - -static const gchar *get_file_entry_path(GtkWidget *entry) -{ -#ifdef HAVE_GNOMEUI - return gnome_file_entry_get_full_path(GNOME_FILE_ENTRY(entry), false); -#else - return gtk_entry_get_text(GTK_ENTRY(entry)); -#endif -} - -static GtkWidget *make_checkbox(GtkWidget *top, int label_id, const char *prefs_item, GtkSignalFunc func) -{ - GtkWidget *button = gtk_check_button_new_with_label(GetString(label_id)); - gtk_widget_show(button); - gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(button), PrefsFindBool(prefs_item)); - gtk_signal_connect(GTK_OBJECT(button), "toggled", func, button); - gtk_box_pack_start(GTK_BOX(top), button, FALSE, FALSE, 0); - return button; -} - -static GtkWidget *make_combobox(GtkWidget *top, int label_id, const char *prefs_item, const combo_desc *options) -{ - GtkWidget *box, *label, *combo; - char str[32]; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - GList *glist = NULL; - while (options->label_id) { - glist = g_list_append(glist, (void *)GetString(options->label_id)); - options++; - } - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - - sprintf(str, "%d", PrefsFindInt32(prefs_item)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_box_pack_start(GTK_BOX(box), combo, TRUE, TRUE, 0); - - return combo; -} - - -/* - * Show preferences editor - * Returns true when user clicked on "Start", false otherwise - */ - -// Window closed -static gint window_closed(void) -{ - return FALSE; -} - -// Window destroyed -static void window_destroyed(void) -{ - gtk_main_quit(); -} - -// "Start" button clicked -static void cb_start(...) -{ - start_clicked = true; - read_settings(); - SavePrefs(); - gtk_widget_destroy(win); -} - -// "Quit" button clicked -static void cb_quit(...) -{ - start_clicked = false; - gtk_widget_destroy(win); -} - -// "OK" button of "About" dialog clicked -static void dl_quit(GtkWidget *dialog) -{ - gtk_widget_destroy(dialog); -} - -// "About" selected -static void mn_about(...) -{ - GtkWidget *dialog; - -#ifdef HAVE_GNOMEUI - - char version[32]; - sprintf(version, "Version %d.%d", VERSION_MAJOR, VERSION_MINOR); - const char *authors[] = { - "Christian Bauer", - "Orlando Bassotto", - "Gwenolé Beauchesne", - "Marc Chabanas", - "Marc Hellwig", - "Biill Huey", - "Brian J. Johnson", - "Jürgen Lachmann", - "Samuel Lander", - "David Lawrence", - "Lauri Pesonen", - "Bernd Schmidt", - "and others", - NULL - }; - dialog = gnome_about_new( - "Basilisk II", - version, - "Copyright (C) 1997-2008 Christian Bauer", - authors, - "Basilisk II comes with ABSOLUTELY NO WARRANTY." - "This is free software, and you are welcome to redistribute it" - "under the terms of the GNU General Public License.", - NULL - ); - gnome_dialog_set_parent(GNOME_DIALOG(dialog), GTK_WINDOW(win)); - -#else - - GtkWidget *label, *button; - - char str[512]; - sprintf(str, - "Basilisk II\nVersion %d.%d\n\n" - "Copyright (C) 1997-2008 Christian Bauer et al.\n" - "E-mail: Christian.Bauer@uni-mainz.de\n" - "http://www.uni-mainz.de/~bauec002/B2Main.html\n\n" - "Basilisk II comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - -#endif - - gtk_widget_show(dialog); -} - -// "Zap PRAM" selected -static void mn_zap_pram(...) -{ - ZapPRAM(); -} - -// Menu item descriptions -static GtkItemFactoryEntry menu_items[] = { - {(gchar *)GetString(STR_PREFS_MENU_FILE_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_START_GTK), "S", GTK_SIGNAL_FUNC(cb_start), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_ZAP_PRAM_GTK), NULL, GTK_SIGNAL_FUNC(mn_zap_pram), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_SEPL_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_QUIT_GTK), "Q", GTK_SIGNAL_FUNC(cb_quit), 0, NULL}, - {(gchar *)GetString(STR_HELP_MENU_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_HELP_ITEM_ABOUT_GTK), NULL, GTK_SIGNAL_FUNC(mn_about), 0, NULL} -}; - -bool PrefsEditor(void) -{ - // Create window - win = gtk_window_new(GTK_WINDOW_TOPLEVEL); - gtk_window_set_title(GTK_WINDOW(win), GetString(STR_PREFS_TITLE)); - gtk_signal_connect(GTK_OBJECT(win), "delete_event", GTK_SIGNAL_FUNC(window_closed), NULL); - gtk_signal_connect(GTK_OBJECT(win), "destroy", GTK_SIGNAL_FUNC(window_destroyed), NULL); - - // Create window contents - GtkWidget *box = gtk_vbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_container_add(GTK_CONTAINER(win), box); - - GtkAccelGroup *accel_group = gtk_accel_group_new(); - GtkItemFactory *item_factory = gtk_item_factory_new(GTK_TYPE_MENU_BAR, "
", accel_group); - gtk_item_factory_create_items(item_factory, sizeof(menu_items) / sizeof(menu_items[0]), menu_items, NULL); -#if GTK_CHECK_VERSION(1,3,15) - gtk_window_add_accel_group(GTK_WINDOW(win), accel_group); -#else - gtk_accel_group_attach(accel_group, GTK_OBJECT(win)); -#endif - GtkWidget *menu_bar = gtk_item_factory_get_widget(item_factory, "
"); - gtk_widget_show(menu_bar); - gtk_box_pack_start(GTK_BOX(box), menu_bar, FALSE, TRUE, 0); - - GtkWidget *notebook = gtk_notebook_new(); - gtk_notebook_set_tab_pos(GTK_NOTEBOOK(notebook), GTK_POS_TOP); - gtk_notebook_set_scrollable(GTK_NOTEBOOK(notebook), FALSE); - gtk_box_pack_start(GTK_BOX(box), notebook, TRUE, TRUE, 0); - gtk_widget_realize(notebook); - - create_volumes_pane(notebook); - create_scsi_pane(notebook); - create_graphics_pane(notebook); - create_input_pane(notebook); - create_serial_pane(notebook); - create_memory_pane(notebook); - create_jit_pane(notebook); - gtk_widget_show(notebook); - - static const opt_desc buttons[] = { - {STR_START_BUTTON, GTK_SIGNAL_FUNC(cb_start)}, - {STR_QUIT_BUTTON, GTK_SIGNAL_FUNC(cb_quit)}, - {0, NULL} - }; - make_button_box(box, 4, buttons); - - // Show window and enter main loop - gtk_widget_show(win); - gtk_main(); - return start_clicked; -} - - -/* - * "Volumes" pane - */ - -static GtkWidget *volume_list, *w_extfs; -static int selected_volume; - -// Volume in list selected -static void cl_selected(GtkWidget *list, int row, int column) -{ - selected_volume = row; -} - -// Volume selected for addition -static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_clist_append(GTK_CLIST(volume_list), &file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -// Volume selected for creation -static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - - const gchar *str = gtk_entry_get_text(GTK_ENTRY(assoc->entry)); - int size = atoi(str); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", file, size); - int ret = system(cmd); - if (ret == 0) - gtk_clist_append(GTK_CLIST(volume_list), &file); - gtk_widget_destroy(GTK_WIDGET(assoc->req)); - delete assoc; -} - -// "Add Volume" button clicked -static void cb_add_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_ADD_VOLUME_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(add_volume_ok), new file_req_assoc(req, NULL)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Create Hardfile" button clicked -static void cb_create_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_CREATE_VOLUME_TITLE)); - - GtkWidget *box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - GtkWidget *label = gtk_label_new(GetString(STR_HARDFILE_SIZE_CTRL)); - gtk_widget_show(label); - GtkWidget *entry = gtk_entry_new(); - gtk_widget_show(entry); - char str[32]; - sprintf(str, "%d", 40); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(box), entry, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(GTK_FILE_SELECTION(req)->main_vbox), box, FALSE, FALSE, 0); - - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(create_volume_ok), new file_req_assoc(req, entry)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Remove Volume" button clicked -static void cb_remove_volume(...) -{ - gtk_clist_remove(GTK_CLIST(volume_list), selected_volume); -} - -// "Boot From" selected -static void mn_boot_any(...) {PrefsReplaceInt32("bootdriver", 0);} -static void mn_boot_cdrom(...) {PrefsReplaceInt32("bootdriver", CDROMRefNum);} - -// "No CD-ROM Driver" button toggled -static void tb_nocdrom(GtkWidget *widget) -{ - PrefsReplaceBool("nocdrom", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Read settings from widgets and set preferences -static void read_volumes_settings(void) -{ - while (PrefsFindString("disk")) - PrefsRemoveItem("disk"); - - for (int i=0; irows; i++) { - char *str; - gtk_clist_get_text(GTK_CLIST(volume_list), i, 0, &str); - PrefsAddString("disk", str); - } - - PrefsReplaceString("extfs", get_file_entry_path(w_extfs)); -} - -// Create "Volumes" pane -static void create_volumes_pane(GtkWidget *top) -{ - GtkWidget *box, *scroll; - - box = make_pane(top, STR_VOLUMES_PANE_TITLE); - - scroll = gtk_scrolled_window_new(NULL, NULL); - gtk_widget_show(scroll); - gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scroll), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - volume_list = gtk_clist_new(1); - gtk_widget_show(volume_list); - gtk_clist_set_selection_mode(GTK_CLIST(volume_list), GTK_SELECTION_SINGLE); - gtk_clist_set_shadow_type(GTK_CLIST(volume_list), GTK_SHADOW_NONE); - gtk_clist_set_reorderable(GTK_CLIST(volume_list), true); - gtk_signal_connect(GTK_OBJECT(volume_list), "select_row", GTK_SIGNAL_FUNC(cl_selected), NULL); - char *str; - int32 index = 0; - while ((str = const_cast(PrefsFindString("disk", index++))) != NULL) - gtk_clist_append(GTK_CLIST(volume_list), &str); - gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(scroll), volume_list); - gtk_box_pack_start(GTK_BOX(box), scroll, TRUE, TRUE, 0); - selected_volume = 0; - - static const opt_desc buttons[] = { - {STR_ADD_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_add_volume)}, - {STR_CREATE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_create_volume)}, - {STR_REMOVE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_remove_volume)}, - {0, NULL}, - }; - make_button_box(box, 0, buttons); - make_separator(box); - - w_extfs = make_file_entry(box, STR_EXTFS_CTRL, "extfs", true); - - static const opt_desc options[] = { - {STR_BOOT_ANY_LAB, GTK_SIGNAL_FUNC(mn_boot_any)}, - {STR_BOOT_CDROM_LAB, GTK_SIGNAL_FUNC(mn_boot_cdrom)}, - {0, NULL} - }; - int bootdriver = PrefsFindInt32("bootdriver"), active = 0; - switch (bootdriver) { - case 0: active = 0; break; - case CDROMRefNum: active = 1; break; - } - make_option_menu(box, STR_BOOTDRIVER_CTRL, options, active); - - make_checkbox(box, STR_NOCDROM_CTRL, "nocdrom", GTK_SIGNAL_FUNC(tb_nocdrom)); -} - - -/* - * "JIT Compiler" pane - */ - -static GtkWidget *w_jit_fpu; -static GtkWidget *w_jit_cache_size; -static GtkWidget *w_jit_lazy_flush; -static GtkWidget *w_jit_follow_const_jumps; - -// Are we running a JIT capable CPU? -static bool is_jit_capable(void) -{ -#if USE_JIT && (defined __i386__ || defined __x86_64__) - return true; -#elif defined __APPLE__ && defined __MACH__ - // XXX run-time detect so that we can use a PPC GUI prefs editor - static char cpu[10]; - if (cpu[0] == 0) { - FILE *fp = popen("uname -p", "r"); - if (fp == NULL) - return false; - fgets(cpu, sizeof(cpu) - 1, fp); - fclose(fp); - } - if (cpu[0] == 'i' && cpu[2] == '8' && cpu[3] == '6') // XXX assuming i?86 - return true; -#endif - return false; -} - -// Set sensitivity of widgets -static void set_jit_sensitive(void) -{ - const bool jit_enabled = PrefsFindBool("jit"); - gtk_widget_set_sensitive(w_jit_fpu, jit_enabled); - gtk_widget_set_sensitive(w_jit_cache_size, jit_enabled); - gtk_widget_set_sensitive(w_jit_lazy_flush, jit_enabled); - gtk_widget_set_sensitive(w_jit_follow_const_jumps, jit_enabled); -} - -// "Use JIT Compiler" button toggled -static void tb_jit(GtkWidget *widget) -{ - PrefsReplaceBool("jit", GTK_TOGGLE_BUTTON(widget)->active); - set_jit_sensitive(); -} - -// "Compile FPU Instructions" button toggled -static void tb_jit_fpu(GtkWidget *widget) -{ - PrefsReplaceBool("jitfpu", GTK_TOGGLE_BUTTON(widget)->active); -} - -// "Lazy translation cache invalidation" button toggled -static void tb_jit_lazy_flush(GtkWidget *widget) -{ - PrefsReplaceBool("jitlazyflush", GTK_TOGGLE_BUTTON(widget)->active); -} - -// "Translate through constant jumps (inline blocks)" button toggled -static void tb_jit_follow_const_jumps(GtkWidget *widget) -{ - PrefsReplaceBool("jitinline", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Read settings from widgets and set preferences -static void read_jit_settings(void) -{ - bool jit_enabled = is_jit_capable() && PrefsFindBool("jit"); - if (jit_enabled) { - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_jit_cache_size)->entry)); - PrefsReplaceInt32("jitcachesize", atoi(str)); - } -} - -// Create "JIT Compiler" pane -static void create_jit_pane(GtkWidget *top) -{ - if (!is_jit_capable()) - return; - - GtkWidget *box; - - box = make_pane(top, STR_JIT_PANE_TITLE); - make_checkbox(box, STR_JIT_CTRL, "jit", GTK_SIGNAL_FUNC(tb_jit)); - - w_jit_fpu = make_checkbox(box, STR_JIT_FPU_CTRL, "jitfpu", GTK_SIGNAL_FUNC(tb_jit_fpu)); - - // Translation cache size - static const combo_desc options[] = { - STR_JIT_CACHE_SIZE_2MB_LAB, - STR_JIT_CACHE_SIZE_4MB_LAB, - STR_JIT_CACHE_SIZE_8MB_LAB, - STR_JIT_CACHE_SIZE_16MB_LAB, - 0 - }; - w_jit_cache_size = make_combobox(box, STR_JIT_CACHE_SIZE_CTRL, "jitcachesize", options); - - // Lazy translation cache invalidation - w_jit_lazy_flush = make_checkbox(box, STR_JIT_LAZY_CINV_CTRL, "jitlazyflush", GTK_SIGNAL_FUNC(tb_jit_lazy_flush)); - - // Follow constant jumps (inline basic blocks) - w_jit_follow_const_jumps = make_checkbox(box, STR_JIT_FOLLOW_CONST_JUMPS, "jitinline", GTK_SIGNAL_FUNC(tb_jit_follow_const_jumps)); - - set_jit_sensitive(); -} - -/* - * "SCSI" pane - */ - -static GtkWidget *w_scsi[7]; - -// Read settings from widgets and set preferences -static void read_scsi_settings(void) -{ - for (int id=0; id<7; id++) { - char prefs_name[32]; - sprintf(prefs_name, "scsi%d", id); - const char *str = get_file_entry_path(w_scsi[id]); - if (str && strlen(str)) - PrefsReplaceString(prefs_name, str); - else - PrefsRemoveItem(prefs_name); - } -} - -// Create "SCSI" pane -static void create_scsi_pane(GtkWidget *top) -{ - GtkWidget *box; - - box = make_pane(top, STR_SCSI_PANE_TITLE); - - for (int id=0; id<7; id++) { - char prefs_name[32]; - sprintf(prefs_name, "scsi%d", id); - w_scsi[id] = make_file_entry(box, STR_SCSI_ID_0 + id, prefs_name); - } -} - - -/* - * "Graphics/Sound" pane - */ - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -static GtkWidget *w_frameskip, *w_display_x, *w_display_y; -static GtkWidget *l_frameskip, *l_display_x, *l_display_y; -static int display_type; -static int dis_width, dis_height; - -#ifdef ENABLE_FBDEV_DGA -static GtkWidget *w_fbdev_name, *w_fbdevice_file; -static GtkWidget *l_fbdev_name, *l_fbdevice_file; -static char fbdev_name[256]; -#endif - -static GtkWidget *w_dspdevice_file, *w_mixerdevice_file; - -// Hide/show graphics widgets -static void hide_show_graphics_widgets(void) -{ - switch (display_type) { - case DISPLAY_WINDOW: - gtk_widget_show(w_frameskip); gtk_widget_show(l_frameskip); -#ifdef ENABLE_FBDEV_DGA - gtk_widget_show(w_display_x); gtk_widget_show(l_display_x); - gtk_widget_show(w_display_y); gtk_widget_show(l_display_y); - gtk_widget_hide(w_fbdev_name); gtk_widget_hide(l_fbdev_name); -#endif - break; - case DISPLAY_SCREEN: - gtk_widget_hide(w_frameskip); gtk_widget_hide(l_frameskip); -#ifdef ENABLE_FBDEV_DGA - gtk_widget_hide(w_display_x); gtk_widget_hide(l_display_x); - gtk_widget_hide(w_display_y); gtk_widget_hide(l_display_y); - gtk_widget_show(w_fbdev_name); gtk_widget_show(l_fbdev_name); -#endif - break; - } -} - -// "Window" video type selected -static void mn_window(...) -{ - display_type = DISPLAY_WINDOW; - hide_show_graphics_widgets(); -} - -// "Fullscreen" video type selected -static void mn_fullscreen(...) -{ - display_type = DISPLAY_SCREEN; - hide_show_graphics_widgets(); -} - -// "5 Hz".."60Hz" selected -static void mn_5hz(...) {PrefsReplaceInt32("frameskip", 12);} -static void mn_7hz(...) {PrefsReplaceInt32("frameskip", 8);} -static void mn_10hz(...) {PrefsReplaceInt32("frameskip", 6);} -static void mn_15hz(...) {PrefsReplaceInt32("frameskip", 4);} -static void mn_30hz(...) {PrefsReplaceInt32("frameskip", 2);} -static void mn_60hz(...) {PrefsReplaceInt32("frameskip", 1);} -static void mn_dynamic(...) {PrefsReplaceInt32("frameskip", 0);} - -// Set sensitivity of widgets -static void set_graphics_sensitive(void) -{ - const bool sound_enabled = !PrefsFindBool("nosound"); - gtk_widget_set_sensitive(w_dspdevice_file, sound_enabled); - gtk_widget_set_sensitive(w_mixerdevice_file, sound_enabled); -} - -// "Disable Sound Output" button toggled -static void tb_nosound(GtkWidget *widget) -{ - PrefsReplaceBool("nosound", GTK_TOGGLE_BUTTON(widget)->active); - set_graphics_sensitive(); -} - -// Read graphics preferences -static void parse_graphics_prefs(void) -{ - display_type = DISPLAY_WINDOW; - dis_width = 512; - dis_height = 384; -#ifdef ENABLE_FBDEV_DGA - fbdev_name[0] = 0; -#endif - - const char *str = PrefsFindString("screen"); - if (str) { - if (sscanf(str, "win/%d/%d", &dis_width, &dis_height) == 2) - display_type = DISPLAY_WINDOW; -#ifdef ENABLE_FBDEV_DGA - else if (sscanf(str, "dga/%255s", fbdev_name) == 1) -#else - else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) -#endif - display_type = DISPLAY_SCREEN; - } -} - -// Read settings from widgets and set preferences -static void read_graphics_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_display_x)); - dis_width = atoi(str); - - str = gtk_entry_get_text(GTK_ENTRY(w_display_y)); - dis_height = atoi(str); - - char pref[256]; - switch (display_type) { - case DISPLAY_WINDOW: - sprintf(pref, "win/%d/%d", dis_width, dis_height); - break; - case DISPLAY_SCREEN: -#ifdef ENABLE_FBDEV_DGA - str = gtk_entry_get_text(GTK_ENTRY(w_fbdev_name)); - sprintf(pref, "dga/%s", str); -#else - sprintf(pref, "dga/%d/%d", dis_width, dis_height); -#endif - break; - default: - PrefsRemoveItem("screen"); - return; - } - PrefsReplaceString("screen", pref); - -#ifdef ENABLE_FBDEV_DGA - str = get_file_entry_path(w_fbdevice_file); - if (str && strlen(str)) - PrefsReplaceString("fbdevicefile", str); - else - PrefsRemoveItem("fbdevicefile"); -#endif - PrefsReplaceString("dsp", get_file_entry_path(w_dspdevice_file)); - PrefsReplaceString("mixer", get_file_entry_path(w_mixerdevice_file)); -} - -// Create "Graphics/Sound" pane -static void create_graphics_pane(GtkWidget *top) -{ - GtkWidget *box, *table, *label, *opt, *menu, *combo; - char str[32]; - - parse_graphics_prefs(); - - box = make_pane(top, STR_GRAPHICS_SOUND_PANE_TITLE); - table = make_table(box, 2, 5); - - label = gtk_label_new(GetString(STR_VIDEO_TYPE_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - add_menu_item(menu, STR_WINDOW_LAB, GTK_SIGNAL_FUNC(mn_window)); - add_menu_item(menu, STR_FULLSCREEN_LAB, GTK_SIGNAL_FUNC(mn_fullscreen)); - switch (display_type) { - case DISPLAY_WINDOW: - gtk_menu_set_active(GTK_MENU(menu), 0); - break; - case DISPLAY_SCREEN: - gtk_menu_set_active(GTK_MENU(menu), 1); - break; - } - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_frameskip = gtk_label_new(GetString(STR_FRAMESKIP_CTRL)); - gtk_widget_show(l_frameskip); - gtk_table_attach(GTK_TABLE(table), l_frameskip, 0, 1, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_frameskip = gtk_option_menu_new(); - gtk_widget_show(w_frameskip); - menu = gtk_menu_new(); - add_menu_item(menu, STR_REF_5HZ_LAB, GTK_SIGNAL_FUNC(mn_5hz)); - add_menu_item(menu, STR_REF_7_5HZ_LAB, GTK_SIGNAL_FUNC(mn_7hz)); - add_menu_item(menu, STR_REF_10HZ_LAB, GTK_SIGNAL_FUNC(mn_10hz)); - add_menu_item(menu, STR_REF_15HZ_LAB, GTK_SIGNAL_FUNC(mn_15hz)); - add_menu_item(menu, STR_REF_30HZ_LAB, GTK_SIGNAL_FUNC(mn_30hz)); - add_menu_item(menu, STR_REF_60HZ_LAB, GTK_SIGNAL_FUNC(mn_60hz)); - add_menu_item(menu, STR_REF_DYNAMIC_LAB, GTK_SIGNAL_FUNC(mn_dynamic)); - int frameskip = PrefsFindInt32("frameskip"); - int item = -1; - switch (frameskip) { - case 12: item = 0; break; - case 8: item = 1; break; - case 6: item = 2; break; - case 4: item = 3; break; - case 2: item = 4; break; - case 1: item = 5; break; - case 0: item = 6; break; - } - if (item >= 0) - gtk_menu_set_active(GTK_MENU(menu), item); - gtk_option_menu_set_menu(GTK_OPTION_MENU(w_frameskip), menu); - gtk_table_attach(GTK_TABLE(table), w_frameskip, 1, 2, 1, 2, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_display_x = gtk_label_new(GetString(STR_DISPLAY_X_CTRL)); - gtk_widget_show(l_display_x); - gtk_table_attach(GTK_TABLE(table), l_display_x, 0, 1, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist1 = NULL; - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_512_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_640_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_800_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_1024_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist1); - if (dis_width) - sprintf(str, "%d", dis_width); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 2, 3, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_x = GTK_COMBO(combo)->entry; - - l_display_y = gtk_label_new(GetString(STR_DISPLAY_Y_CTRL)); - gtk_widget_show(l_display_y); - gtk_table_attach(GTK_TABLE(table), l_display_y, 0, 1, 3, 4, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist2 = NULL; - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_384_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_480_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_600_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_768_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist2); - if (dis_height) - sprintf(str, "%d", dis_height); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 3, 4, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_y = GTK_COMBO(combo)->entry; - -#ifdef ENABLE_FBDEV_DGA - l_fbdev_name = gtk_label_new(GetString(STR_FBDEV_NAME_CTRL)); - gtk_widget_show(l_fbdev_name); - gtk_table_attach(GTK_TABLE(table), l_fbdev_name, 0, 1, 4, 5, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_fbdev_name = gtk_entry_new(); - gtk_widget_show(w_fbdev_name); - gtk_entry_set_text(GTK_ENTRY(w_fbdev_name), fbdev_name); - gtk_table_attach(GTK_TABLE(table), w_fbdev_name, 1, 2, 4, 5, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_fbdevice_file = make_file_entry(box, STR_FBDEVICE_FILE_CTRL, "fbdevicefile"); -#endif - - make_separator(box); - make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); - w_dspdevice_file = make_file_entry(box, STR_DSPDEVICE_FILE_CTRL, "dsp"); - w_mixerdevice_file = make_file_entry(box, STR_MIXERDEVICE_FILE_CTRL, "mixer"); - - set_graphics_sensitive(); - - hide_show_graphics_widgets(); -} - - -/* - * "Input" pane - */ - -static GtkWidget *w_keycode_file; -static GtkWidget *w_mouse_wheel_lines; - -// Set sensitivity of widgets -static void set_input_sensitive(void) -{ - const bool use_keycodes = PrefsFindBool("keycodes"); - gtk_widget_set_sensitive(w_keycode_file, use_keycodes); - gtk_widget_set_sensitive(GTK_WIDGET(g_object_get_data(G_OBJECT(w_keycode_file), "chooser_button")), use_keycodes); - gtk_widget_set_sensitive(w_mouse_wheel_lines, PrefsFindInt32("mousewheelmode") == 1); -} - -// "Use Raw Keycodes" button toggled -static void tb_keycodes(GtkWidget *widget) -{ - PrefsReplaceBool("keycodes", GTK_TOGGLE_BUTTON(widget)->active); - set_input_sensitive(); -} - -// "Mouse Wheel Mode" selected -static void mn_wheel_page(...) {PrefsReplaceInt32("mousewheelmode", 0); set_input_sensitive();} -static void mn_wheel_cursor(...) {PrefsReplaceInt32("mousewheelmode", 1); set_input_sensitive();} - -// Read settings from widgets and set preferences -static void read_input_settings(void) -{ - const char *str = get_file_entry_path(w_keycode_file); - if (str && strlen(str)) - PrefsReplaceString("keycodefile", str); - else - PrefsRemoveItem("keycodefile"); - - PrefsReplaceInt32("mousewheellines", gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(w_mouse_wheel_lines))); -} - -// Create "Input" pane -static void create_input_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *label, *button; - GtkObject *adj; - - box = make_pane(top, STR_INPUT_PANE_TITLE); - - make_checkbox(box, STR_KEYCODES_CTRL, "keycodes", GTK_SIGNAL_FUNC(tb_keycodes)); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_KEYCODES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - const char *str = PrefsFindString("keycodefile"); - if (str == NULL) - str = ""; - - w_keycode_file = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(w_keycode_file), str); - gtk_widget_show(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), w_keycode_file, TRUE, TRUE, 0); - - button = make_browse_button(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(w_keycode_file), "chooser_button", button); - - make_separator(box); - - static const opt_desc options[] = { - {STR_MOUSEWHEELMODE_PAGE_LAB, GTK_SIGNAL_FUNC(mn_wheel_page)}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, GTK_SIGNAL_FUNC(mn_wheel_cursor)}, - {0, NULL} - }; - int wheelmode = PrefsFindInt32("mousewheelmode"), active = 0; - switch (wheelmode) { - case 0: active = 0; break; - case 1: active = 1; break; - } - make_option_menu(box, STR_MOUSEWHEELMODE_CTRL, options, active); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_MOUSEWHEELLINES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - adj = gtk_adjustment_new(PrefsFindInt32("mousewheellines"), 1, 1000, 1, 5, 0); - w_mouse_wheel_lines = gtk_spin_button_new(GTK_ADJUSTMENT(adj), 0.0, 0); - gtk_widget_show(w_mouse_wheel_lines); - gtk_box_pack_start(GTK_BOX(hbox), w_mouse_wheel_lines, FALSE, FALSE, 0); - - set_input_sensitive(); -} - - -/* - * "Serial/Network" pane - */ - -static GtkWidget *w_seriala, *w_serialb, *w_ether, *w_udp_port; - -// Set sensitivity of widgets -static void set_serial_sensitive(void) -{ -#if SUPPORTS_UDP_TUNNEL - gtk_widget_set_sensitive(w_ether, !PrefsFindBool("udptunnel")); - gtk_widget_set_sensitive(w_udp_port, PrefsFindBool("udptunnel")); -#endif -} - -// "Tunnel AppleTalk over IP" button toggled -static void tb_udptunnel(GtkWidget *widget) -{ - PrefsReplaceBool("udptunnel", GTK_TOGGLE_BUTTON(widget)->active); - set_serial_sensitive(); -} - -// Read settings from widgets and set preferences -static void read_serial_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_seriala)); - PrefsReplaceString("seriala", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_serialb)); - PrefsReplaceString("serialb", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_ether)); - if (str && strlen(str)) - PrefsReplaceString("ether", str); - else - PrefsRemoveItem("ether"); - -#if SUPPORTS_UDP_TUNNEL - PrefsReplaceInt32("udpport", gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(w_udp_port))); -#endif -} - -// Add names of serial devices -static gint gl_str_cmp(gconstpointer a, gconstpointer b) -{ - return strcmp((char *)a, (char *)b); -} - -static GList *add_serial_names(void) -{ - GList *glist = NULL; - - // Search /dev for ttyS* and lp* - DIR *d = opendir("/dev"); - if (d) { - struct dirent *de; - while ((de = readdir(d)) != NULL) { -#if defined(__linux__) - if (strncmp(de->d_name, "ttyS", 4) == 0 || strncmp(de->d_name, "lp", 2) == 0) { -#elif defined(__FreeBSD__) - if (strncmp(de->d_name, "cuaa", 4) == 0 || strncmp(de->d_name, "lpt", 3) == 0) { -#elif defined(__NetBSD__) - if (strncmp(de->d_name, "tty0", 4) == 0 || strncmp(de->d_name, "lpt", 3) == 0) { -#elif defined(sgi) - if (strncmp(de->d_name, "ttyf", 4) == 0 || strncmp(de->d_name, "plp", 3) == 0) { -#else - if (false) { -#endif - char *str = new char[64]; - sprintf(str, "/dev/%s", de->d_name); - glist = g_list_append(glist, str); - } - } - closedir(d); - } - if (glist) - g_list_sort(glist, gl_str_cmp); - else - glist = g_list_append(glist, (void *)GetString(STR_NONE_LAB)); - return glist; -} - -// Add names of ethernet interfaces -static GList *add_ether_names(void) -{ - GList *glist = NULL; - - // Get list of all Ethernet interfaces - int s = socket(PF_INET, SOCK_DGRAM, 0); - if (s >= 0) { - char inbuf[8192]; - struct ifconf ifc; - ifc.ifc_len = sizeof(inbuf); - ifc.ifc_buf = inbuf; - if (ioctl(s, SIOCGIFCONF, &ifc) == 0) { - struct ifreq req, *ifr = ifc.ifc_req; - for (int i=0; iifr_name, 63); - glist = g_list_append(glist, str); - } - } - } - close(s); - } -#ifdef HAVE_SLIRP - static char s_slirp[] = "slirp"; - glist = g_list_append(glist, s_slirp); -#endif - if (glist) - g_list_sort(glist, gl_str_cmp); - else - glist = g_list_append(glist, (void *)GetString(STR_NONE_LAB)); - return glist; -} - -// Create "Serial/Network" pane -static void create_serial_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *table, *label, *combo, *sep; - GtkObject *adj; - - box = make_pane(top, STR_SERIAL_NETWORK_PANE_TITLE); - table = make_table(box, 2, 4); - - label = gtk_label_new(GetString(STR_SERIALA_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - GList *glist = add_serial_names(); - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - const char *str = PrefsFindString("seriala"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 0, 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_seriala = GTK_COMBO(combo)->entry; - - label = gtk_label_new(GetString(STR_SERIALB_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - str = PrefsFindString("serialb"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 1, 2, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_serialb = GTK_COMBO(combo)->entry; - - sep = gtk_hseparator_new(); - gtk_widget_show(sep); - gtk_table_attach(GTK_TABLE(table), sep, 0, 2, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - label = gtk_label_new(GetString(STR_ETHERNET_IF_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 3, 4, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - glist = add_ether_names(); - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - str = PrefsFindString("ether"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 3, 4, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_ether = GTK_COMBO(combo)->entry; - -#if SUPPORTS_UDP_TUNNEL - make_checkbox(box, STR_UDPTUNNEL_CTRL, "udptunnel", GTK_SIGNAL_FUNC(tb_udptunnel)); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_UDPPORT_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - adj = gtk_adjustment_new(PrefsFindInt32("udpport"), 1, 65535, 1, 5, 0); - w_udp_port = gtk_spin_button_new(GTK_ADJUSTMENT(adj), 0.0, 0); - gtk_widget_show(w_udp_port); - gtk_box_pack_start(GTK_BOX(hbox), w_udp_port, FALSE, FALSE, 0); -#endif - - set_serial_sensitive(); -} - - -/* - * "Memory/Misc" pane - */ - -static GtkWidget *w_ramsize; -static GtkWidget *w_rom_file; - -// Don't use CPU when idle? -static void tb_idlewait(GtkWidget *widget) -{ - PrefsReplaceBool("idlewait", GTK_TOGGLE_BUTTON(widget)->active); -} - -// "Ignore SEGV" button toggled -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION -static void tb_ignoresegv(GtkWidget *widget) -{ - PrefsReplaceBool("ignoresegv", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// Model ID selected -static void mn_modelid_5(...) {PrefsReplaceInt32("modelid", 5);} -static void mn_modelid_14(...) {PrefsReplaceInt32("modelid", 14);} - -// CPU/FPU type -static void mn_cpu_68020(...) {PrefsReplaceInt32("cpu", 2); PrefsReplaceBool("fpu", false);} -static void mn_cpu_68020_fpu(...) {PrefsReplaceInt32("cpu", 2); PrefsReplaceBool("fpu", true);} -static void mn_cpu_68030(...) {PrefsReplaceInt32("cpu", 3); PrefsReplaceBool("fpu", false);} -static void mn_cpu_68030_fpu(...) {PrefsReplaceInt32("cpu", 3); PrefsReplaceBool("fpu", true);} -static void mn_cpu_68040(...) {PrefsReplaceInt32("cpu", 4); PrefsReplaceBool("fpu", true);} - -// Read settings from widgets and set preferences -static void read_memory_settings(void) -{ - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_ramsize)->entry)); - PrefsReplaceInt32("ramsize", atoi(str) << 20); - - str = get_file_entry_path(w_rom_file); - if (str && strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); - -} - -// Create "Memory/Misc" pane -static void create_memory_pane(GtkWidget *top) -{ - GtkWidget *box, *table; - - box = make_pane(top, STR_MEMORY_MISC_PANE_TITLE); - table = make_table(box, 2, 5); - - static const combo_desc options[] = { - STR_RAMSIZE_2MB_LAB, - STR_RAMSIZE_4MB_LAB, - STR_RAMSIZE_8MB_LAB, - STR_RAMSIZE_16MB_LAB, - STR_RAMSIZE_32MB_LAB, - STR_RAMSIZE_64MB_LAB, - STR_RAMSIZE_128MB_LAB, - STR_RAMSIZE_256MB_LAB, - STR_RAMSIZE_512MB_LAB, - STR_RAMSIZE_1024MB_LAB, - 0 - }; - char default_ramsize[10]; - sprintf(default_ramsize, "%d", PrefsFindInt32("ramsize") >> 20); - w_ramsize = table_make_combobox(table, 0, STR_RAMSIZE_CTRL, default_ramsize, options); - - static const opt_desc model_options[] = { - {STR_MODELID_5_LAB, GTK_SIGNAL_FUNC(mn_modelid_5)}, - {STR_MODELID_14_LAB, GTK_SIGNAL_FUNC(mn_modelid_14)}, - {0, NULL} - }; - int modelid = PrefsFindInt32("modelid"), active = 0; - switch (modelid) { - case 5: active = 0; break; - case 14: active = 1; break; - } - table_make_option_menu(table, 2, STR_MODELID_CTRL, model_options, active); - -#if EMULATED_68K - static const opt_desc cpu_options[] = { - {STR_CPU_68020_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020)}, - {STR_CPU_68020_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020_fpu)}, - {STR_CPU_68030_LAB, GTK_SIGNAL_FUNC(mn_cpu_68030)}, - {STR_CPU_68030_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68030_fpu)}, - {STR_CPU_68040_LAB, GTK_SIGNAL_FUNC(mn_cpu_68040)}, - {0, NULL} - }; - int cpu = PrefsFindInt32("cpu"); - bool fpu = PrefsFindBool("fpu"); - active = 0; - switch (cpu) { - case 2: active = fpu ? 1 : 0; break; - case 3: active = fpu ? 3 : 2; break; - case 4: active = 4; - } - table_make_option_menu(table, 3, STR_CPU_CTRL, cpu_options, active); -#endif - - w_rom_file = table_make_file_entry(table, 4, STR_ROM_FILE_CTRL, "rom"); - - make_checkbox(box, STR_IDLEWAIT_CTRL, "idlewait", GTK_SIGNAL_FUNC(tb_idlewait)); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - make_checkbox(box, STR_IGNORESEGV_CTRL, "ignoresegv", GTK_SIGNAL_FUNC(tb_ignoresegv)); -#endif -} - - -/* - * Read settings from widgets and set preferences - */ - -static void read_settings(void) -{ - read_volumes_settings(); - read_scsi_settings(); - read_graphics_settings(); - read_input_settings(); - read_serial_settings(); - read_memory_settings(); - read_jit_settings(); -} - - -#ifdef STANDALONE_GUI -#include -#include -#include "rpc.h" - -/* - * Fake unused data and functions - */ - -uint8 XPRAM[XPRAM_SIZE]; -void MountVolume(void *fh) { } -void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size) { } - -#if defined __APPLE__ && defined __MACH__ -void DarwinSysInit(void) { } -void DarwinSysExit(void) { } -void DarwinAddFloppyPrefs(void) { } -void DarwinAddSerialPrefs(void) { } -bool DarwinCDReadTOC(char *, uint8 *) { } -#endif - - -/* - * Display alert - */ - -static void dl_destroyed(void) -{ - gtk_main_quit(); -} - -static void display_alert(int title_id, int prefix_id, int button_id, const char *text) -{ - char str[256]; - sprintf(str, GetString(prefix_id), text); - - GtkWidget *dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); - - GtkWidget *label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); - - gtk_main(); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - display_alert(STR_ERROR_ALERT_TITLE, STR_GUI_ERROR_PREFIX, STR_QUIT_BUTTON, text); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - display_alert(STR_WARNING_ALERT_TITLE, STR_GUI_WARNING_PREFIX, STR_OK_BUTTON, text); -} - - -/* - * RPC handlers - */ - -static GMainLoop *g_gui_loop; - -static int handle_ErrorAlert(rpc_connection_t *connection) -{ - D(bug("handle_ErrorAlert\n")); - - int error; - char *str; - if ((error = rpc_method_get_args(connection, RPC_TYPE_STRING, &str, RPC_TYPE_INVALID)) < 0) - return error; - - ErrorAlert(str); - free(str); - return RPC_ERROR_NO_ERROR; -} - -static int handle_WarningAlert(rpc_connection_t *connection) -{ - D(bug("handle_WarningAlert\n")); - - int error; - char *str; - if ((error = rpc_method_get_args(connection, RPC_TYPE_STRING, &str, RPC_TYPE_INVALID)) < 0) - return error; - - WarningAlert(str); - free(str); - return RPC_ERROR_NO_ERROR; -} - -static int handle_Exit(rpc_connection_t *connection) -{ - D(bug("handle_Exit\n")); - - g_main_quit(g_gui_loop); - return RPC_ERROR_NO_ERROR; -} - - -/* - * SIGCHLD handler - */ - -static char g_app_path[PATH_MAX]; -static rpc_connection_t *g_gui_connection = NULL; - -static void sigchld_handler(int sig, siginfo_t *sip, void *) -{ - D(bug("Child %d exitted with status = %x\n", sip->si_pid, sip->si_status)); - - // XXX perform a new wait because sip->si_status is sometimes not - // the exit _value_ on MacOS X but rather the usual status field - // from waitpid() -- we could arrange this code in some other way... - int status; - if (waitpid(sip->si_pid, &status, 0) < 0) - status = sip->si_status; - if (WIFEXITED(status)) - status = WEXITSTATUS(status); - if (status & 0x80) - status |= -1 ^0xff; - - if (status < 0) { // negative -> execlp/-errno - char str[256]; - sprintf(str, GetString(STR_NO_B2_EXE_FOUND), g_app_path, strerror(-status)); - ErrorAlert(str); - status = 1; - } - - if (status != 0) { - if (g_gui_connection) - rpc_exit(g_gui_connection); - exit(status); - } -} - - -/* - * Start standalone GUI - */ - -int main(int argc, char *argv[]) -{ -#ifdef HAVE_GNOMEUI - // Init GNOME/GTK - char version[16]; - sprintf(version, "%d.%d", VERSION_MAJOR, VERSION_MINOR); - gnome_init("Basilisk II", version, argc, argv); -#else - // Init GTK - gtk_set_locale(); - gtk_init(&argc, &argv); -#endif - - // Read preferences - PrefsInit(NULL, argc, argv); - - // Show preferences editor - bool start = PrefsEditor(); - - // Exit preferences - PrefsExit(); - - // Transfer control to the executable - if (start) { - char gui_connection_path[64]; - sprintf(gui_connection_path, "/org/BasiliskII/GUI/%d", getpid()); - - // Catch exits from the child process - struct sigaction sigchld_sa, old_sigchld_sa; - sigemptyset(&sigchld_sa.sa_mask); - sigchld_sa.sa_sigaction = sigchld_handler; - sigchld_sa.sa_flags = SA_NOCLDSTOP | SA_SIGINFO; - if (sigaction(SIGCHLD, &sigchld_sa, &old_sigchld_sa) < 0) { - char str[256]; - sprintf(str, GetString(STR_SIG_INSTALL_ERR), SIGCHLD, strerror(errno)); - ErrorAlert(str); - return 1; - } - - // Search and run the BasiliskII executable - char *p; - strcpy(g_app_path, argv[0]); - if ((p = strstr(g_app_path, "BasiliskIIGUI.app/Contents/MacOS")) != NULL) { - strcpy(p, "BasiliskII.app/Contents/MacOS/BasiliskII"); - if (access(g_app_path, X_OK) < 0) { - char str[256]; - sprintf(str, GetString(STR_NO_B2_EXE_FOUND), g_app_path, strerror(errno)); - WarningAlert(str); - strcpy(g_app_path, "/Applications/BasiliskII.app/Contents/MacOS/BasiliskII"); - } - } else { - p = strrchr(g_app_path, '/'); - p = p ? p + 1 : g_app_path; - strcpy(p, "BasiliskII"); - } - - int pid = fork(); - if (pid == 0) { - D(bug("Trying to execute %s\n", g_app_path)); - execlp(g_app_path, g_app_path, "--gui-connection", gui_connection_path, (char *)NULL); -#ifdef _POSIX_PRIORITY_SCHEDULING - // XXX get a chance to run the parent process so that to not confuse/upset GTK... - sched_yield(); -#endif - _exit(-errno); - } - - // Establish a connection to Basilisk II - if ((g_gui_connection = rpc_init_server(gui_connection_path)) == NULL) { - printf("ERROR: failed to initialize GUI-side RPC server connection\n"); - return 1; - } - static const rpc_method_descriptor_t vtable[] = { - { RPC_METHOD_ERROR_ALERT, handle_ErrorAlert }, - { RPC_METHOD_WARNING_ALERT, handle_WarningAlert }, - { RPC_METHOD_EXIT, handle_Exit } - }; - if (rpc_method_add_callbacks(g_gui_connection, vtable, sizeof(vtable) / sizeof(vtable[0])) < 0) { - printf("ERROR: failed to setup GUI method callbacks\n"); - return 1; - } - int socket; - if ((socket = rpc_listen_socket(g_gui_connection)) < 0) { - printf("ERROR: failed to initialize RPC server thread\n"); - return 1; - } - - g_gui_loop = g_main_new(TRUE); - while (g_main_is_running(g_gui_loop)) { - - // Process a few events pending - const int N_EVENTS_DISPATCH = 10; - for (int i = 0; i < N_EVENTS_DISPATCH; i++) { - if (!g_main_iteration(FALSE)) - break; - } - - // Check for RPC events (100 ms timeout) - int ret = rpc_wait_dispatch(g_gui_connection, 100000); - if (ret == 0) - continue; - if (ret < 0) - break; - rpc_dispatch(g_gui_connection); - } - - rpc_exit(g_gui_connection); - return 0; - } - - return 0; -} -#endif diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index a92cd6401..39e4fba5c 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -120,21 +120,8 @@ void AddPlatformPrefsDefaults(void) PrefsReplaceString("extfs", "/"); PrefsReplaceInt32("mousewheelmode", 1); PrefsReplaceInt32("mousewheellines", 3); -#ifdef __linux__ - if (access("/dev/sound/dsp", F_OK) == 0) { - PrefsReplaceString("dsp", "/dev/sound/dsp"); - } else { - PrefsReplaceString("dsp", "/dev/dsp"); - } - if (access("/dev/sound/mixer", F_OK) == 0) { - PrefsReplaceString("mixer", "/dev/sound/mixer"); - } else { - PrefsReplaceString("mixer", "/dev/mixer"); - } -#else PrefsReplaceString("dsp", "/dev/dsp"); PrefsReplaceString("mixer", "/dev/mixer"); -#endif #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION PrefsAddBool("ignoresegv", false); #endif diff --git a/BasiliskII/src/Unix/rpc_unix.cpp b/BasiliskII/src/Unix/rpc_unix.cpp index 378c5dd69..cbc23b60e 100644 --- a/BasiliskII/src/Unix/rpc_unix.cpp +++ b/BasiliskII/src/Unix/rpc_unix.cpp @@ -48,11 +48,6 @@ #define NON_BLOCKING_IO 0 -#if defined __linux__ -#define USE_ABSTRACT_NAMESPACES 1 -#endif - - /* ====================================================================== */ /* === PThreads Glue === */ /* ====================================================================== */ diff --git a/BasiliskII/src/Unix/serial_unix.cpp b/BasiliskII/src/Unix/serial_unix.cpp deleted file mode 100644 index 81922b43a..000000000 --- a/BasiliskII/src/Unix/serial_unix.cpp +++ /dev/null @@ -1,833 +0,0 @@ -/* - * serial_unix.cpp - Serial device driver, Unix specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#ifdef __linux__ -#include -#include -#include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" - -extern "C" { -#include "sshpty.h" -} - - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// IRIX missing or unsupported defines -#ifdef sgi -#ifndef CRTSCTS -#define CRTSCTS CNEW_RTSCTS -#endif -#ifndef B230400 -#define B230400 B115200 -#endif -#endif - - -// Missing functions -#ifndef HAVE_CFMAKERAW -static int cfmakeraw(struct termios *termios_p) -{ - termios_p->c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP|INLCR|IGNCR|ICRNL|IXON); - termios_p->c_oflag &= ~OPOST; - termios_p->c_lflag &= ~(ECHO|ECHONL|ICANON|ISIG|IEXTEN); - termios_p->c_cflag &= ~(CSIZE|PARENB); - termios_p->c_cflag |= CS8; - return 0; -} -#endif - - -// Driver private variables -class XSERDPort : public SERDPort { -public: - XSERDPort(const char *dev) - { - device_name = dev; - protocol = serial; - fd = -1; - pid = 0; - input_thread_active = output_thread_active = false; - - Set_pthread_attr(&thread_attr, 2); - } - - virtual ~XSERDPort() - { - if (input_thread_active) { - input_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(input_thread); -#endif - pthread_join(input_thread, NULL); - sem_destroy(&input_signal); - input_thread_active = false; - } - if (output_thread_active) { - output_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(output_thread); -#endif - pthread_join(output_thread, NULL); - sem_destroy(&output_signal); - output_thread_active = false; - } - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool open_pty(void); - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - static void *input_func(void *arg); - static void *output_func(void *arg); - - const char *device_name; // Device name - enum {serial, parallel, pty, midi} - protocol; // Type of device - int fd; // FD of device - pid_t pid; // PID of child process - - bool io_killed; // Flag: KillIO called, I/O threads must not call deferred tasks - bool quitting; // Flag: Quit threads - - pthread_attr_t thread_attr; // Input/output thread attributes - - bool input_thread_active; // Flag: Input thread installed - volatile bool input_thread_cancel; // Flag: Cancel input thread - pthread_t input_thread; // Data input thread - sem_t input_signal; // Signal for input thread: execute command - uint32 input_pb; // Command parameter for input thread - - bool output_thread_active; // Flag: Output thread installed - volatile bool output_thread_cancel; // Flag: Cancel output thread - pthread_t output_thread; // Data output thread - sem_t output_signal; // Signal for output thread: execute command - uint32 output_pb; // Command parameter for output thread - - struct termios mode; // Terminal configuration -}; - - -/* - * Initialization - */ - -void SerialInit(void) -{ - // Read serial preferences and create structs for both ports - the_serd_port[0] = new XSERDPort(PrefsFindString("seriala")); - the_serd_port[1] = new XSERDPort(PrefsFindString("serialb")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - delete (XSERDPort *)the_serd_port[0]; - delete (XSERDPort *)the_serd_port[1]; -} - - -/* - * Open serial port - */ - -int16 XSERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (device_name == NULL) - return openErr; - - // Init variables - io_killed = false; - quitting = false; - - // Open port, according to the syntax of the path - if (device_name[0] == '|') { - // Open a process via ptys - if (!open_pty()) - goto open_error; - } - else if (!strcmp(device_name, "midi")) { - // MIDI: not yet implemented - return openErr; - } - else { - // Device special file - fd = ::open(device_name, O_RDWR); - if (fd < 0) - goto open_error; - -#if defined(__linux__) - // Parallel port? - struct stat st; - if (fstat(fd, &st) == 0) - if (S_ISCHR(st.st_mode)) - protocol = ((MAJOR(st.st_rdev) == LP_MAJOR) ? parallel : serial); -#elif defined(__FreeBSD__) || defined(__NetBSD__) - // Parallel port? - struct stat st; - if (fstat(fd, &st) == 0) - if (S_ISCHR(st.st_mode)) - protocol = (((st.st_rdev >> 16) == 16) ? parallel : serial); -#endif - } - - // Configure port for raw mode - if (protocol == serial || protocol == pty) { - if (tcgetattr(fd, &mode) < 0) - goto open_error; - cfmakeraw(&mode); - mode.c_cflag |= HUPCL; - mode.c_cc[VMIN] = 1; - mode.c_cc[VTIME] = 0; - tcsetattr(fd, TCSAFLUSH, &mode); - } - configure(config); - - // Start input/output threads - input_thread_cancel = false; - output_thread_cancel = false; - if (sem_init(&input_signal, 0, 0) < 0) - goto open_error; - if (sem_init(&output_signal, 0, 0) < 0) - goto open_error; - input_thread_active = (pthread_create(&input_thread, &thread_attr, input_func, this) == 0); - output_thread_active = (pthread_create(&output_thread, &thread_attr, output_func, this) == 0); - if (!input_thread_active || !output_thread_active) - goto open_error; - return noErr; - -open_error: - if (input_thread_active) { - input_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(input_thread); -#endif - pthread_join(input_thread, NULL); - sem_destroy(&input_signal); - input_thread_active = false; - } - if (output_thread_active) { - output_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(output_thread); -#endif - pthread_join(output_thread, NULL); - sem_destroy(&output_signal); - output_thread_active = false; - } - if (fd > 0) { - ::close(fd); - fd = -1; - } - return openErr; -} - - -/* - * Read data from port - */ - -int16 XSERDPort::prime_in(uint32 pb, uint32 dce) -{ - // Send input command to input_thread - read_done = false; - read_pending = true; - input_pb = pb; - WriteMacInt32(input_dt + serdtDCE, dce); - sem_post(&input_signal); - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 XSERDPort::prime_out(uint32 pb, uint32 dce) -{ - // Send output command to output_thread - write_done = false; - write_pending = true; - output_pb = pb; - WriteMacInt32(output_dt + serdtDCE, dce); - sem_post(&output_signal); - return 1; // Command in progress -} - - -/* - * Control calls - */ - -int16 XSERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case 1: // KillIO - io_killed = true; - if (protocol == serial) - tcflush(fd, TCIOFLUSH); - while (read_pending || write_pending) - usleep(10000); - io_killed = false; - return noErr; - - case kSERDConfiguration: - if (configure(ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: - return noErr; // Not supported under Unix - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDSetBreak: - if (protocol == serial) - tcsendbreak(fd, 0); - return noErr; - - case kSERDClearBreak: - return noErr; - - case kSERDBaudRate: { - if (protocol != serial) - return noErr; - uint16 rate = ReadMacInt16(pb + csParam); - speed_t baud_rate; - if (rate <= 50) { - rate = 50; baud_rate = B50; - } else if (rate <= 75) { - rate = 75; baud_rate = B75; - } else if (rate <= 110) { - rate = 110; baud_rate = B110; - } else if (rate <= 134) { - rate = 134; baud_rate = B134; - } else if (rate <= 150) { - rate = 150; baud_rate = B150; - } else if (rate <= 200) { - rate = 200; baud_rate = B200; - } else if (rate <= 300) { - rate = 300; baud_rate = B300; - } else if (rate <= 600) { - rate = 600; baud_rate = B600; - } else if (rate <= 1200) { - rate = 1200; baud_rate = B1200; - } else if (rate <= 1800) { - rate = 1800; baud_rate = B1800; - } else if (rate <= 2400) { - rate = 2400; baud_rate = B2400; - } else if (rate <= 4800) { - rate = 4800; baud_rate = B4800; - } else if (rate <= 9600) { - rate = 9600; baud_rate = B9600; - } else if (rate <= 19200) { - rate = 19200; baud_rate = B19200; - } else if (rate <= 38400) { - rate = 38400; baud_rate = B38400; - } else if (rate <= 57600) { - rate = 57600; baud_rate = B57600; - } else { - // Just for safety in case someone wants a rate between 57600 and 65535 - rate = 57600; baud_rate = B57600; - } - WriteMacInt16(pb + csParam, rate); - cfsetispeed(&mode, baud_rate); - cfsetospeed(&mode, baud_rate); - tcsetattr(fd, TCSANOW, &mode); - return noErr; - } - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDMiscOptions: - if (protocol != serial) - return noErr; - if (ReadMacInt8(pb + csParam) & kOptionPreserveDTR) - mode.c_cflag &= ~HUPCL; - else - mode.c_cflag |= HUPCL; - tcsetattr(fd, TCSANOW, &mode); - return noErr; - - case kSERDAssertDTR: { - if (protocol != serial) - return noErr; - unsigned int status = TIOCM_DTR; - ioctl(fd, TIOCMBIS, &status); - return noErr; - } - - case kSERDNegateDTR: { - if (protocol != serial) - return noErr; - unsigned int status = TIOCM_DTR; - ioctl(fd, TIOCMBIC, &status); - return noErr; - } - - case kSERDSetPEChar: - case kSERDSetPEAltChar: - return noErr; // Not supported under Unix - - case kSERDResetChannel: - if (protocol == serial) - tcflush(fd, TCIOFLUSH); - return noErr; - - case kSERDAssertRTS: { - if (protocol != serial) - return noErr; - unsigned int status = TIOCM_RTS; - ioctl(fd, TIOCMBIS, &status); - return noErr; - } - - case kSERDNegateRTS: { - if (protocol != serial) - return noErr; - unsigned int status = TIOCM_RTS; - ioctl(fd, TIOCMBIC, &status); - return noErr; - } - - case kSERD115KBaud: - if (protocol != serial) - return noErr; - cfsetispeed(&mode, B115200); - cfsetospeed(&mode, B115200); - tcsetattr(fd, TCSANOW, &mode); - return noErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (protocol != serial) - return noErr; - cfsetispeed(&mode, B230400); - cfsetospeed(&mode, B230400); - tcsetattr(fd, TCSANOW, &mode); - return noErr; - - default: - printf("WARNING: SerialControl(): unimplemented control code %d\n", code); - return controlErr; - } -} - - -/* - * Status calls - */ - -int16 XSERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case kSERDInputCount: { - int num; - ioctl(fd, FIONREAD, &num); - WriteMacInt32(pb + csParam, num); - return noErr; - } - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - if (protocol != serial) { - WriteMacInt8(p + staCtsHold, 0); - WriteMacInt8(p + staDsrHold, 0); - WriteMacInt8(p + staModemStatus, dsrEvent | dcdEvent | ctsEvent); - } else { - unsigned int status; - ioctl(fd, TIOCMGET, &status); - WriteMacInt8(p + staCtsHold, status & TIOCM_CTS ? 0 : 1); - WriteMacInt8(p + staDsrHold, status & TIOCM_DTR ? 0 : 1); - WriteMacInt8(p + staModemStatus, - (status & TIOCM_DSR ? dsrEvent : 0) - | (status & TIOCM_RI ? riEvent : 0) - | (status & TIOCM_CD ? dcdEvent : 0) - | (status & TIOCM_CTS ? ctsEvent : 0)); - } - return noErr; - } - - default: - printf("WARNING: SerialStatus(): unimplemented status code %d\n", code); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 XSERDPort::close() -{ - // Kill threads - if (input_thread_active) { - quitting = true; - sem_post(&input_signal); - pthread_join(input_thread, NULL); - input_thread_active = false; - sem_destroy(&input_signal); - } - if (output_thread_active) { - quitting = true; - sem_post(&output_signal); - pthread_join(output_thread, NULL); - output_thread_active = false; - sem_destroy(&output_signal); - } - - // Close port - if (fd > 0) - ::close(fd); - fd = -1; - - // Wait for the subprocess to exit - if (pid) - waitpid(pid, NULL, 0); - pid = 0; - - return noErr; -} - - -/* - * Open a process via ptys - */ - -bool XSERDPort::open_pty(void) -{ - // Talk to a process via a pty - char slave[128]; - int slavefd; - - protocol = pty; - if (!pty_allocate(&fd, &slavefd, slave, sizeof(slave))) - return false; - - fflush(stdout); - fflush(stderr); - switch (pid = fork()) { - case -1: // error - return false; - break; - case 0: // child - ::close(fd); - - /* Make the pseudo tty our controlling tty. */ - pty_make_controlling_tty(&slavefd, slave); - - ::close(0); dup(slavefd); // Use the slave fd for stdin, - ::close(1); dup(slavefd); // stdout, - ::close(2); dup(slavefd); // and stderr. - - // - // - - // Let the shell do the dirty work - execlp("/bin/sh", "/bin/sh", "-c", ++device_name, (char *)NULL); - - // exec failed! - printf("serial_open: could not exec %s: %s\n", - "/bin/sh", strerror(errno)); - exit(1); - break; - default: // parent - // Pid was stored above - break; - } - - return true; -} - - -/* - * Configure serial port with MacOS config word - */ - -bool XSERDPort::configure(uint16 config) -{ - D(bug(" configure %04x\n", config)); - if (protocol != serial) - return true; - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - mode.c_cflag &= ~CSTOPB; - break; - case stop20: - mode.c_cflag |= CSTOPB; - break; - default: - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - mode.c_iflag &= ~INPCK; - mode.c_oflag &= ~PARENB; - break; - case oddParity: - mode.c_iflag |= INPCK; - mode.c_oflag |= PARENB; - mode.c_oflag |= PARODD; - break; - case evenParity: - mode.c_iflag |= INPCK; - mode.c_oflag |= PARENB; - mode.c_oflag &= ~PARODD; - break; - default: - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - case data5: - mode.c_cflag = mode.c_cflag & ~CSIZE | CS5; - break; - case data6: - mode.c_cflag = mode.c_cflag & ~CSIZE | CS6; - break; - case data7: - mode.c_cflag = mode.c_cflag & ~CSIZE | CS7; - break; - case data8: - mode.c_cflag = mode.c_cflag & ~CSIZE | CS8; - break; - } - - // Set baud rate - speed_t baud_rate; - switch (config & 0x03ff) { - case baud150: baud_rate = B150; break; - case baud300: baud_rate = B300; break; - case baud600: baud_rate = B600; break; - case baud1200: baud_rate = B1200; break; - case baud1800: baud_rate = B1800; break; - case baud2400: baud_rate = B2400; break; - case baud4800: baud_rate = B4800; break; - case baud9600: baud_rate = B9600; break; - case baud19200: baud_rate = B19200; break; - case baud38400: baud_rate = B38400; break; - case baud57600: baud_rate = B57600; break; - default: - return false; - } - cfsetispeed(&mode, baud_rate); - cfsetospeed(&mode, baud_rate); - tcsetattr(fd, TCSANOW, &mode); - return true; -} - - -/* - * Set serial handshaking - */ - -void XSERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - if (protocol != serial) - return; - - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - mode.c_cflag |= CRTSCTS; - else - mode.c_cflag &= ~CRTSCTS; - } else { - if (ReadMacInt8(s + shkFCTS)) - mode.c_cflag |= CRTSCTS; - else - mode.c_cflag &= ~CRTSCTS; - } - - D(bug(" %sware flow control\n", mode.c_cflag & CRTSCTS ? "hard" : "soft")); - tcsetattr(fd, TCSANOW, &mode); -} - - -/* - * Data input thread - */ - -void *XSERDPort::input_func(void *arg) -{ - XSERDPort *s = (XSERDPort *)arg; - while (!s->input_thread_cancel) { - - // Wait for commands - sem_wait(&s->input_signal); - if (s->quitting) - break; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(s->input_pb + ioBuffer)); - uint32 length = ReadMacInt32(s->input_pb + ioReqCount); - D(bug("input_func waiting for %ld bytes of data...\n", length)); - int32 actual = read(s->fd, buf, length); - D(bug(" %ld bytes received\n", actual)); - -#if MONITOR - bug("Receiving serial data:\n"); - uint8 *adr = (uint8 *)buf; - for (int i=0; iio_killed) { - - WriteMacInt16(s->input_pb + ioResult, uint16(abortErr)); - WriteMacInt32(s->input_pb + ioActCount, 0); - s->read_pending = s->read_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(s->input_pb + ioActCount, actual); - WriteMacInt32(s->input_dt + serdtResult, noErr); - } else { - WriteMacInt32(s->input_pb + ioActCount, 0); - WriteMacInt32(s->input_dt + serdtResult, uint16(readErr)); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return NULL; -} - - -/* - * Data output thread - */ - -void *XSERDPort::output_func(void *arg) -{ - XSERDPort *s = (XSERDPort *)arg; - while (!s->output_thread_cancel) { - - // Wait for commands - sem_wait(&s->output_signal); - if (s->quitting) - break; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(s->output_pb + ioBuffer)); - uint32 length = ReadMacInt32(s->output_pb + ioReqCount); - D(bug("output_func transmitting %ld bytes of data...\n", length)); - -#if MONITOR - bug("Sending serial data:\n"); - uint8 *adr = (uint8 *)buf; - for (int i=0; ifd, buf, length); - D(bug(" %ld bytes transmitted\n", actual)); - - // KillIO called? Then simply return - if (s->io_killed) { - - WriteMacInt16(s->output_pb + ioResult, uint16(abortErr)); - WriteMacInt32(s->output_pb + ioActCount, 0); - s->write_pending = s->write_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(s->output_pb + ioActCount, actual); - WriteMacInt32(s->output_dt + serdtResult, noErr); - } else { - WriteMacInt32(s->output_pb + ioActCount, 0); - WriteMacInt32(s->output_dt + serdtResult, uint16(writErr)); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return NULL; -} diff --git a/BasiliskII/src/Unix/sshpty.c b/BasiliskII/src/Unix/sshpty.c deleted file mode 100644 index 48e69dc7d..000000000 --- a/BasiliskII/src/Unix/sshpty.c +++ /dev/null @@ -1,478 +0,0 @@ -/* - * Author: Tatu Ylonen - * Copyright (c) 1995 Tatu Ylonen , Espoo, Finland - * All rights reserved - * Allocating a pseudo-terminal, and making it the controlling tty. - * - * As far as I am concerned, the code I have written for this software - * can be used freely for any purpose. Any derived versions of this - * software must be clearly marked as such, and if the derived work is - * incompatible with the protocol description in the RFC file, it must be - * called by a name other than "ssh" or "Secure Shell". - */ - -#if 0 /* not in BasiliskII */ -#include "includes.h" -RCSID("$OpenBSD: sshpty.c,v 1.4 2001/12/19 07:18:56 deraadt Exp $"); -#else /* not in BasiliskII */ -/* Selections from openssh's "includes.h" */ -#include "config.h" - -#include -#include -#include -#include /* For O_NONBLOCK */ -#include -#include -#include - -#include /* For STDIN_FILENO, etc */ -#include /* Struct winsize */ - -/* - *-*-nto-qnx needs these headers for strcasecmp and LASTLOG_FILE respectively - */ -#ifdef HAVE_STRINGS_H -# include -#endif -#ifdef HAVE_LOGIN_H -# include -#endif - -#include - -#ifdef HAVE_SYS_BSDTTY_H -# include -#endif - -#ifdef HAVE_SYS_STAT_H -# include /* For S_* constants and macros */ -#endif - -#ifndef _PATH_TTY -# define _PATH_TTY "/dev/tty" -#endif - -#include "strlcpy.h" - -#define debug(x) ; - -#endif /* not in BasiliskII */ - -#ifdef HAVE_UTIL_H -# include -#endif /* HAVE_UTIL_H */ - -#include "sshpty.h" -#if 0 /* not in BasiliskII */ -#include "log.h" -#include "misc.h" -#else /* stubs for BasiliskII */ -#define log printf -#define error printf -#define fatal(x) do { printf("Fatal error: %s", x); return 0; } while(0) -#endif /* not in BasiliskII */ - -#define mysig_t sig_t -#define mysignal signal -#include - -/* Pty allocated with _getpty gets broken if we do I_PUSH:es to it. */ -#if defined(HAVE__GETPTY) || defined(HAVE_OPENPTY) -#undef HAVE_DEV_PTMX -#endif - -#ifdef HAVE_PTY_H -# include -#endif -#if defined(HAVE_DEV_PTMX) && defined(HAVE_SYS_STROPTS_H) -# include -#endif -#if defined(HAVE_DEV_PTMX) && defined(HAVE_STROPTS_H) -# include -#endif - -#ifndef O_NOCTTY -#define O_NOCTTY 0 -#endif - -/* - * Allocates and opens a pty. Returns 0 if no pty could be allocated, or - * nonzero if a pty was successfully allocated. On success, open file - * descriptors for the pty and tty sides and the name of the tty side are - * returned (the buffer must be able to hold at least 64 characters). - */ - -int -pty_allocate(int *ptyfd, int *ttyfd, char *namebuf, int namebuflen) -{ -#if defined(HAVE_OPENPTY) || defined(BSD4_4) - /* openpty(3) exists in OSF/1 and some other os'es */ - char *name; - int i; - - i = openpty(ptyfd, ttyfd, NULL, NULL, NULL); - if (i < 0) { - error("openpty: %.100s", strerror(errno)); - return 0; - } - name = ttyname(*ttyfd); - if (!name) - fatal("openpty returns device for which ttyname fails."); - - strlcpy(namebuf, name, namebuflen); /* possible truncation */ - return 1; -#else /* HAVE_OPENPTY */ -#ifdef HAVE__GETPTY - /* - * _getpty(3) exists in SGI Irix 4.x, 5.x & 6.x -- it generates more - * pty's automagically when needed - */ - char *slave; - - slave = _getpty(ptyfd, O_RDWR, 0622, 0); - if (slave == NULL) { - error("_getpty: %.100s", strerror(errno)); - return 0; - } - strlcpy(namebuf, slave, namebuflen); - /* Open the slave side. */ - *ttyfd = open(namebuf, O_RDWR | O_NOCTTY); - if (*ttyfd < 0) { - error("%.200s: %.100s", namebuf, strerror(errno)); - close(*ptyfd); - return 0; - } - return 1; -#else /* HAVE__GETPTY */ -#if defined(HAVE_DEV_PTMX) - /* - * This code is used e.g. on Solaris 2.x. (Note that Solaris 2.3 - * also has bsd-style ptys, but they simply do not work.) - */ - int ptm; - char *pts; - mysig_t old_signal; - - ptm = open("/dev/ptmx", O_RDWR | O_NOCTTY); - if (ptm < 0) { - error("/dev/ptmx: %.100s", strerror(errno)); - return 0; - } - old_signal = mysignal(SIGCHLD, SIG_DFL); - if (grantpt(ptm) < 0) { - error("grantpt: %.100s", strerror(errno)); - return 0; - } - mysignal(SIGCHLD, old_signal); - if (unlockpt(ptm) < 0) { - error("unlockpt: %.100s", strerror(errno)); - return 0; - } - pts = ptsname(ptm); - if (pts == NULL) - error("Slave pty side name could not be obtained."); - strlcpy(namebuf, pts, namebuflen); - *ptyfd = ptm; - - /* Open the slave side. */ - *ttyfd = open(namebuf, O_RDWR | O_NOCTTY); - if (*ttyfd < 0) { - error("%.100s: %.100s", namebuf, strerror(errno)); - close(*ptyfd); - return 0; - } -#ifndef HAVE_CYGWIN - /* - * Push the appropriate streams modules, as described in Solaris pts(7). - * HP-UX pts(7) doesn't have ttcompat module. - */ - if (ioctl(*ttyfd, I_PUSH, "ptem") < 0) - error("ioctl I_PUSH ptem: %.100s", strerror(errno)); - if (ioctl(*ttyfd, I_PUSH, "ldterm") < 0) - error("ioctl I_PUSH ldterm: %.100s", strerror(errno)); -#ifndef __hpux - if (ioctl(*ttyfd, I_PUSH, "ttcompat") < 0) - error("ioctl I_PUSH ttcompat: %.100s", strerror(errno)); -#endif -#endif - return 1; -#else /* HAVE_DEV_PTMX */ -#ifdef HAVE_DEV_PTS_AND_PTC - /* AIX-style pty code. */ - const char *name; - - *ptyfd = open("/dev/ptc", O_RDWR | O_NOCTTY); - if (*ptyfd < 0) { - error("Could not open /dev/ptc: %.100s", strerror(errno)); - return 0; - } - name = ttyname(*ptyfd); - if (!name) - fatal("Open of /dev/ptc returns device for which ttyname fails."); - strlcpy(namebuf, name, namebuflen); - *ttyfd = open(name, O_RDWR | O_NOCTTY); - if (*ttyfd < 0) { - error("Could not open pty slave side %.100s: %.100s", - name, strerror(errno)); - close(*ptyfd); - return 0; - } - return 1; -#else /* HAVE_DEV_PTS_AND_PTC */ -#ifdef _CRAY - char buf[64]; - int i; - int highpty; - -#ifdef _SC_CRAY_NPTY - highpty = sysconf(_SC_CRAY_NPTY); - if (highpty == -1) - highpty = 128; -#else - highpty = 128; -#endif - - for (i = 0; i < highpty; i++) { - snprintf(buf, sizeof(buf), "/dev/pty/%03d", i); - *ptyfd = open(buf, O_RDWR|O_NOCTTY); - if (*ptyfd < 0) - continue; - snprintf(namebuf, namebuflen, "/dev/ttyp%03d", i); - /* Open the slave side. */ - *ttyfd = open(namebuf, O_RDWR|O_NOCTTY); - if (*ttyfd < 0) { - error("%.100s: %.100s", namebuf, strerror(errno)); - close(*ptyfd); - return 0; - } - return 1; - } - return 0; -#else - /* BSD-style pty code. */ - char buf[64]; - int i; - const char *ptymajors = "pqrstuvwxyzabcdefghijklmnoABCDEFGHIJKLMNOPQRSTUVWXYZ"; - const char *ptyminors = "0123456789abcdef"; - int num_minors = strlen(ptyminors); - int num_ptys = strlen(ptymajors) * num_minors; - struct termios tio; - - for (i = 0; i < num_ptys; i++) { - snprintf(buf, sizeof buf, "/dev/pty%c%c", ptymajors[i / num_minors], - ptyminors[i % num_minors]); - snprintf(namebuf, namebuflen, "/dev/tty%c%c", - ptymajors[i / num_minors], ptyminors[i % num_minors]); - - *ptyfd = open(buf, O_RDWR | O_NOCTTY); - if (*ptyfd < 0) { - /* Try SCO style naming */ - snprintf(buf, sizeof buf, "/dev/ptyp%d", i); - snprintf(namebuf, namebuflen, "/dev/ttyp%d", i); - *ptyfd = open(buf, O_RDWR | O_NOCTTY); - if (*ptyfd < 0) - continue; - } - - /* Open the slave side. */ - *ttyfd = open(namebuf, O_RDWR | O_NOCTTY); - if (*ttyfd < 0) { - error("%.100s: %.100s", namebuf, strerror(errno)); - close(*ptyfd); - return 0; - } - /* set tty modes to a sane state for broken clients */ - if (tcgetattr(*ptyfd, &tio) < 0) - log("Getting tty modes for pty failed: %.100s", strerror(errno)); - else { - tio.c_lflag |= (ECHO | ISIG | ICANON); - tio.c_oflag |= (OPOST | ONLCR); - tio.c_iflag |= ICRNL; - - /* Set the new modes for the terminal. */ - if (tcsetattr(*ptyfd, TCSANOW, &tio) < 0) - log("Setting tty modes for pty failed: %.100s", strerror(errno)); - } - - return 1; - } - return 0; -#endif /* CRAY */ -#endif /* HAVE_DEV_PTS_AND_PTC */ -#endif /* HAVE_DEV_PTMX */ -#endif /* HAVE__GETPTY */ -#endif /* HAVE_OPENPTY */ -} - -/* Releases the tty. Its ownership is returned to root, and permissions to 0666. */ - -void -pty_release(const char *ttyname) -{ - if (chown(ttyname, (uid_t) 0, (gid_t) 0) < 0) - error("chown %.100s 0 0 failed: %.100s", ttyname, strerror(errno)); - if (chmod(ttyname, (mode_t) 0666) < 0) - error("chmod %.100s 0666 failed: %.100s", ttyname, strerror(errno)); -} - -/* Makes the tty the processes controlling tty and sets it to sane modes. */ - -void -pty_make_controlling_tty(int *ttyfd, const char *ttyname) -{ - int fd; -#ifdef USE_VHANGUP - void *old; -#endif /* USE_VHANGUP */ - -#ifdef _CRAY - if (setsid() < 0) - error("setsid: %.100s", strerror(errno)); - - fd = open(ttyname, O_RDWR|O_NOCTTY); - if (fd != -1) { - mysignal(SIGHUP, SIG_IGN); - ioctl(fd, TCVHUP, (char *)NULL); - mysignal(SIGHUP, SIG_DFL); - setpgid(0, 0); - close(fd); - } else { - error("Failed to disconnect from controlling tty."); - } - - debug("Setting controlling tty using TCSETCTTY."); - ioctl(*ttyfd, TCSETCTTY, NULL); - fd = open("/dev/tty", O_RDWR); - if (fd < 0) - error("%.100s: %.100s", ttyname, strerror(errno)); - close(*ttyfd); - *ttyfd = fd; -#else /* _CRAY */ - - /* First disconnect from the old controlling tty. */ -#ifdef TIOCNOTTY - fd = open(_PATH_TTY, O_RDWR | O_NOCTTY); - if (fd >= 0) { - (void) ioctl(fd, TIOCNOTTY, NULL); - close(fd); - } -#endif /* TIOCNOTTY */ - if (setsid() < 0) - error("setsid: %.100s", strerror(errno)); - - /* - * Verify that we are successfully disconnected from the controlling - * tty. - */ - fd = open(_PATH_TTY, O_RDWR | O_NOCTTY); - if (fd >= 0) { - error("Failed to disconnect from controlling tty."); - close(fd); - } - /* Make it our controlling tty. */ -#ifdef TIOCSCTTY - debug("Setting controlling tty using TIOCSCTTY."); - if (ioctl(*ttyfd, TIOCSCTTY, NULL) < 0) - error("ioctl(TIOCSCTTY): %.100s", strerror(errno)); -#endif /* TIOCSCTTY */ -#ifdef HAVE_NEWS4 - if (setpgrp(0,0) < 0) - error("SETPGRP %s",strerror(errno)); -#endif /* HAVE_NEWS4 */ -#ifdef USE_VHANGUP - old = mysignal(SIGHUP, SIG_IGN); - vhangup(); - mysignal(SIGHUP, old); -#endif /* USE_VHANGUP */ - fd = open(ttyname, O_RDWR); - if (fd < 0) { - error("%.100s: %.100s", ttyname, strerror(errno)); - } else { -#ifdef USE_VHANGUP - close(*ttyfd); - *ttyfd = fd; -#else /* USE_VHANGUP */ - close(fd); -#endif /* USE_VHANGUP */ - } - /* Verify that we now have a controlling tty. */ - fd = open(_PATH_TTY, O_WRONLY); - if (fd < 0) - error("open /dev/tty failed - could not set controlling tty: %.100s", - strerror(errno)); - else { - close(fd); - } -#endif /* _CRAY */ -} - -#if 0 /* not in BasiliskII */ -/* Changes the window size associated with the pty. */ - -void -pty_change_window_size(int ptyfd, int row, int col, - int xpixel, int ypixel) -{ - struct winsize w; - w.ws_row = row; - w.ws_col = col; - w.ws_xpixel = xpixel; - w.ws_ypixel = ypixel; - (void) ioctl(ptyfd, TIOCSWINSZ, &w); -} - -void -pty_setowner(struct passwd *pw, const char *ttyname) -{ - struct group *grp; - gid_t gid; - mode_t mode; - struct stat st; - - /* Determine the group to make the owner of the tty. */ - grp = getgrnam("tty"); - if (grp) { - gid = grp->gr_gid; - mode = S_IRUSR | S_IWUSR | S_IWGRP; - } else { - gid = pw->pw_gid; - mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH; - } - - /* - * Change owner and mode of the tty as required. - * Warn but continue if filesystem is read-only and the uids match/ - * tty is owned by root. - */ - if (stat(ttyname, &st)) - fatal("stat(%.100s) failed: %.100s", ttyname, - strerror(errno)); - - if (st.st_uid != pw->pw_uid || st.st_gid != gid) { - if (chown(ttyname, pw->pw_uid, gid) < 0) { - if (errno == EROFS && - (st.st_uid == pw->pw_uid || st.st_uid == 0)) - error("chown(%.100s, %d, %d) failed: %.100s", - ttyname, pw->pw_uid, gid, - strerror(errno)); - else - fatal("chown(%.100s, %d, %d) failed: %.100s", - ttyname, pw->pw_uid, gid, - strerror(errno)); - } - } - - if ((st.st_mode & (S_IRWXU|S_IRWXG|S_IRWXO)) != mode) { - if (chmod(ttyname, mode) < 0) { - if (errno == EROFS && - (st.st_mode & (S_IRGRP | S_IROTH)) == 0) - error("chmod(%.100s, 0%o) failed: %.100s", - ttyname, mode, strerror(errno)); - else - fatal("chmod(%.100s, 0%o) failed: %.100s", - ttyname, mode, strerror(errno)); - } - } -} -#endif /* not in BasiliskII */ diff --git a/BasiliskII/src/Unix/sshpty.h b/BasiliskII/src/Unix/sshpty.h deleted file mode 100644 index df65e284e..000000000 --- a/BasiliskII/src/Unix/sshpty.h +++ /dev/null @@ -1,26 +0,0 @@ -/* $OpenBSD: sshpty.h,v 1.4 2002/03/04 17:27:39 stevesk Exp $ */ - -/* - * Author: Tatu Ylonen - * Copyright (c) 1995 Tatu Ylonen , Espoo, Finland - * All rights reserved - * Functions for allocating a pseudo-terminal and making it the controlling - * tty. - * - * As far as I am concerned, the code I have written for this software - * can be used freely for any purpose. Any derived versions of this - * software must be clearly marked as such, and if the derived work is - * incompatible with the protocol description in the RFC file, it must be - * called by a name other than "ssh" or "Secure Shell". - */ - -#ifndef SSHPTY_H -#define SSHPTY_H - -int pty_allocate(int *, int *, char *, int); -void pty_release(const char *); -void pty_make_controlling_tty(int *, const char *); -void pty_change_window_size(int, int, int, int, int); -void pty_setowner(struct passwd *, const char *); - -#endif /* SSHPTY_H */ diff --git a/BasiliskII/src/Unix/strlcpy.c b/BasiliskII/src/Unix/strlcpy.c deleted file mode 100644 index b5e5a552e..000000000 --- a/BasiliskII/src/Unix/strlcpy.c +++ /dev/null @@ -1,75 +0,0 @@ -/* $OpenBSD: strlcpy.c,v 1.5 2001/05/13 15:40:16 deraadt Exp $ */ - -/* - * Copyright (c) 1998 Todd C. Miller - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. The name of the author may not be used to endorse or promote products - * derived from this software without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, - * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY - * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL - * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, - * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, - * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; - * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, - * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR - * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF - * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. - */ - -#include "config.h" -#ifndef HAVE_STRLCPY - -#if defined(LIBC_SCCS) && !defined(lint) -static char *rcsid = "$OpenBSD: strlcpy.c,v 1.5 2001/05/13 15:40:16 deraadt Exp $"; -#endif /* LIBC_SCCS and not lint */ - -#include -#include -#include "strlcpy.h" - -/* - * Copy src to string dst of size siz. At most siz-1 characters - * will be copied. Always NUL terminates (unless siz == 0). - * Returns strlen(src); if retval >= siz, truncation occurred. - */ -size_t -strlcpy(dst, src, siz) - char *dst; - const char *src; - size_t siz; -{ - register char *d = dst; - register const char *s = src; - register size_t n = siz; - - /* Copy as many bytes as will fit */ - if (n != 0 && --n != 0) { - do { - if ((*d++ = *s++) == 0) - break; - } while (--n != 0); - } - - /* Not enough room in dst, add NUL and traverse rest of src */ - if (n == 0) { - if (siz != 0) - *d = '\0'; /* NUL-terminate dst */ - while (*s++) - ; - } - - return(s - src - 1); /* count does not include NUL */ -} - -#endif /* !HAVE_STRLCPY */ diff --git a/BasiliskII/src/Unix/strlcpy.h b/BasiliskII/src/Unix/strlcpy.h deleted file mode 100644 index 7b33e4f67..000000000 --- a/BasiliskII/src/Unix/strlcpy.h +++ /dev/null @@ -1,12 +0,0 @@ -/* $Id$ */ - -#ifndef _BSD_STRLCPY_H -#define _BSD_STRLCPY_H - -#include "config.h" -#ifndef HAVE_STRLCPY -#include -size_t strlcpy(char *dst, const char *src, size_t siz); -#endif /* !HAVE_STRLCPY */ - -#endif /* _BSD_STRLCPY_H */ diff --git a/BasiliskII/src/Unix/sys_unix.cpp b/BasiliskII/src/Unix/sys_unix.cpp index 85d650c87..6a5729c10 100644 --- a/BasiliskII/src/Unix/sys_unix.cpp +++ b/BasiliskII/src/Unix/sys_unix.cpp @@ -28,27 +28,9 @@ #include #endif -#ifdef __linux__ -#include -#include -#include -#include -#include -#include -#include -#endif - -#if defined(__FreeBSD__) || defined(__NetBSD__) -#include -#endif - #if defined __APPLE__ && defined __MACH__ #include -#if (defined AQUA || defined HAVE_FRAMEWORK_COREFOUNDATION) -#ifndef __MACOSX__ -#define __MACOSX__ MAC_OS_X_VERSION_MIN_REQUIRED -#endif -#endif + #endif #include "main.h" @@ -58,22 +40,11 @@ #include "sys.h" #include "disk_unix.h" -#if defined(BINCUE) -#include "bincue_unix.h" -#endif - - - #define DEBUG 0 #include "debug.h" static disk_factory *disk_factories[] = { -#ifndef STANDALONE_GUI - disk_sparsebundle_factory, -#if defined(HAVE_LIBVHD) - disk_vhd_factory, -#endif -#endif + NULL }; @@ -93,19 +64,11 @@ struct mac_file_handle { bool is_media_present; // Flag: media is inserted and available disk_generic *generic_disk; -#if defined(__linux__) - int cdrom_cap; // CD-ROM capability flags (only valid if is_cdrom is true) -#elif defined(__FreeBSD__) - struct ioc_capability cdrom_cap; -#elif defined(__APPLE__) && defined(__MACH__) +#if defined(__APPLE__) && defined(__MACH__) char *ioctl_name; // For CDs on OS X - a device for special ioctls int ioctl_fd; #endif -#if defined(BINCUE) - bool is_bincue; // Flag: BIN CUE file - void *bincue_fd; -#endif }; // Open file handles @@ -129,10 +92,7 @@ static bool cdrom_open(mac_file_handle *fh, const char *path = NULL); void SysInit(void) { -#if defined __MACOSX__ - extern void DarwinSysInit(void); - DarwinSysInit(); -#endif + } @@ -142,10 +102,7 @@ void SysInit(void) void SysExit(void) { -#if defined __MACOSX__ - extern void DarwinSysExit(void); - DarwinSysExit(); -#endif + } @@ -242,12 +199,7 @@ void SysMediaRemoved(const char *path, int type) fh->is_media_present = false; break; } -#if defined __MACOSX__ - if (fh->ioctl_name && strcmp(fh->ioctl_name, path) == 0) { - fh->is_media_present = false; - break; - } -#endif + } } @@ -270,26 +222,7 @@ void SysMountFirstFloppy(void) void SysAddFloppyPrefs(void) { -#if defined(__linux__) - DIR *fd_dir = opendir("/dev/floppy"); - if (fd_dir) { - struct dirent *floppy_dev; - while ((floppy_dev = readdir(fd_dir)) != NULL) { - if (strstr(floppy_dev->d_name, "u1440") != NULL) { - char fd_dev[20]; - sprintf(fd_dev, "/dev/floppy/%s", floppy_dev->d_name); - PrefsAddString("floppy", fd_dev); - } - } - closedir(fd_dir); - } else { - PrefsAddString("floppy", "/dev/fd0"); - PrefsAddString("floppy", "/dev/fd1"); - } -#elif defined(__NetBSD__) - PrefsAddString("floppy", "/dev/fd0a"); - PrefsAddString("floppy", "/dev/fd1a"); -#elif defined(__APPLE__) && defined(__MACH__) +#if defined(__APPLE__) && defined(__MACH__) #if defined(AQUA) || defined(HAVE_FRAMEWORK_COREFOUNDATION) extern void DarwinAddFloppyPrefs(void); @@ -316,28 +249,7 @@ void SysAddFloppyPrefs(void) void SysAddDiskPrefs(void) { -#ifdef __linux__ - FILE *f = fopen("/etc/fstab", "r"); - if (f) { - char line[256]; - while(fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0 || line[0] == '#') - continue; - line[len-1] = 0; - // Parse line - char *dev = NULL, *mnt_point = NULL, *fstype = NULL; - if (sscanf(line, "%as %as %as", &dev, &mnt_point, &fstype) == 3) { - if (strcmp(fstype, "hfs") == 0) - PrefsAddString("disk", dev); - } - free(dev); free(mnt_point); free(fstype); - } - fclose(f); - } -#endif } @@ -352,32 +264,6 @@ void SysAddCDROMPrefs(void) if (PrefsFindBool("nocdrom")) return; -#if defined(__linux__) - if (access("/dev/.devfsd", F_OK) < 0) - PrefsAddString("cdrom", "/dev/cdrom"); - else { - DIR *cd_dir = opendir("/dev/cdroms"); - if (cd_dir) { - struct dirent *cdrom_dev; - while ((cdrom_dev = readdir(cd_dir)) != NULL) { - if (strcmp(cdrom_dev->d_name, ".") != 0 && strcmp(cdrom_dev->d_name, "..") != 0) { - char cd_dev[20]; - sprintf(cd_dev, "/dev/cdroms/%s", cdrom_dev->d_name); - PrefsAddString("cdrom", cd_dev); - } - } - closedir(cd_dir); - } - } -#elif defined __MACOSX__ - // There is no predefined path for CD-ROMs on MacOS X. Rather, we - // define a single fake CD-ROM entry for the emulated MacOS. - // XXX this means we handle only CD-ROM drive at a time, wherever - // the disk is, the latest one is used. - PrefsAddString("cdrom", "/dev/poll/cdrom"); -#elif defined(__FreeBSD__) || defined(__NetBSD__) - PrefsAddString("cdrom", "/dev/cd0c"); -#endif } @@ -387,21 +273,7 @@ void SysAddCDROMPrefs(void) void SysAddSerialPrefs(void) { -#if defined(__linux__) - if (access("/dev/.devfsd", F_OK) < 0) { - PrefsAddString("seriala", "/dev/ttyS0"); - PrefsAddString("serialb", "/dev/ttyS1"); - } else { - PrefsAddString("seriala", "/dev/tts/0"); - PrefsAddString("serialb", "/dev/tts/1"); - } -#elif defined(__FreeBSD__) - PrefsAddString("seriala", "/dev/cuaa0"); - PrefsAddString("serialb", "/dev/cuaa1"); -#elif defined(__NetBSD__) - PrefsAddString("seriala", "/dev/tty00"); - PrefsAddString("serialb", "/dev/tty01"); -#elif defined(__APPLE__) && defined(__MACH__) +#if defined(__APPLE__) && defined(__MACH__) #if defined(AQUA) || defined(HAVE_FRAMEWORK_COREFOUNDATION) extern void DarwinAddSerialPrefs(void); @@ -422,26 +294,7 @@ void SysAddSerialPrefs(void) static bool cdrom_open_1(mac_file_handle *fh) { -#if defined __MACOSX__ - // In OS X, the device name is OK for sending ioctls to, - // but not for reading raw CDROM data from. - // (it seems to have extra data padded in) - // - // So, we keep the already opened file handle, - // and open a slightly different file for CDROM data - // - fh->ioctl_fd = fh->fd; - fh->ioctl_name = fh->name; - fh->fd = -1; - fh->name = (char *)malloc(strlen(fh->ioctl_name) + 3); - if (fh->name) { - strcpy(fh->name, fh->ioctl_name); - strcat(fh->name, "s1"); - fh->fd = open(fh->name, O_RDONLY, O_NONBLOCK); - } - if (fh->ioctl_fd < 0) - return false; -#endif + return true; } @@ -472,16 +325,7 @@ void cdrom_close(mac_file_handle *fh) free(fh->name); fh->name = NULL; } -#if defined __MACOSX__ - if (fh->ioctl_fd >= 0) { - close(fh->ioctl_fd); - fh->ioctl_fd = -1; - } - if (fh->ioctl_name) { - free(fh->ioctl_name); - fh->ioctl_name = NULL; - } -#endif + } @@ -491,30 +335,7 @@ void cdrom_close(mac_file_handle *fh) static bool is_drive_mounted(const char *dev_name, char *mount_name) { -#ifdef __linux__ - FILE *f = fopen("/proc/mounts", "r"); - if (f) { - char line[256]; - while(fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Parse line - if (strncmp(line, dev_name, strlen(dev_name)) == 0) { - mount_name[0] = 0; - char *dummy; - sscanf(line, "%as %s", &dummy, mount_name); - free(dummy); - fclose(f); - return true; - } - } - fclose(f); - } -#endif + return false; } @@ -530,51 +351,29 @@ static mac_file_handle *open_filehandle(const char *name) fh->name = strdup(name); fh->fd = -1; fh->generic_disk = NULL; -#if defined __MACOSX__ - fh->ioctl_fd = -1; - fh->ioctl_name = NULL; -#endif + return fh; } void *Sys_open(const char *name, bool read_only) { bool is_file = strncmp(name, "/dev/", 5) != 0; -#if defined(__FreeBSD__) - // SCSI IDE - bool is_cdrom = strncmp(name, "/dev/cd", 7) == 0 || strncmp(name, "/dev/acd", 8) == 0; -#else + bool is_cdrom = strncmp(name, "/dev/cd", 7) == 0; -#endif + bool is_floppy = strncmp(name, "/dev/fd", 7) == 0; bool is_polled_media = strncmp(name, "/dev/poll/", 10) == 0; if (is_floppy) // Floppy open fails if there's no disk inserted is_polled_media = true; -#if defined __MACOSX__ - // There is no set filename in /dev which is the cdrom, - // so we have to see if it is any of the devices that we found earlier - { - int index = 0; - const char *str; - while ((str = PrefsFindString("cdrom", index++)) != NULL) { - if (is_polled_media || strcmp(str, name) == 0) { - is_cdrom = true; - read_only = true; - break; - } - } - } -#endif - D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write")); // Check if write access is allowed, set read-only flag if not if (!read_only && access(name, W_OK)) read_only = true; - // Print warning message and eventually unmount drive when this is an HFS volume mounted under Linux (double mounting will corrupt the volume) + // Print warning message and eventually unmount drive when this is an HFS volume mounted under (double mounting will corrupt the volume) char mount_name[256]; if (!is_file && !read_only && is_drive_mounted(name, mount_name)) { char str[512]; @@ -590,19 +389,6 @@ void *Sys_open(const char *name, bool read_only) // Open file/device -#if defined(BINCUE) - void *binfd = open_bincue(name); - if (binfd) { - mac_file_handle *fh = open_filehandle(name); - D(bug("opening %s as bincue\n", name)); - fh->bincue_fd = binfd; - fh->is_bincue = true; - fh->read_only = true; - fh->is_media_present = true; - sys_add_mac_file_handle(fh); - return fh; - } -#endif for (int i = 0; disk_factories[i]; ++i) { @@ -623,26 +409,9 @@ void *Sys_open(const char *name, bool read_only) } int open_flags = (read_only ? O_RDONLY : O_RDWR); -#if defined(__linux__) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__MACOSX__) - open_flags |= (is_cdrom ? O_NONBLOCK : 0); -#endif -#if defined(__MACOSX__) - open_flags |= (is_file ? O_EXLOCK | O_NONBLOCK : 0); -#endif + int fd = open(name, open_flags); -#if defined(__MACOSX__) - if (fd < 0 && (open_flags & O_EXLOCK)) { - if (errno == EOPNOTSUPP) { - // File system does not support locking. Try again without. - open_flags &= ~O_EXLOCK; - fd = open(name, open_flags); - } else if (errno == EAGAIN) { - // File is likely already locked by another process. - printf("WARNING: Cannot open %s (%s)\n", name, strerror(errno)); - return NULL; - } - } -#endif + if (fd < 0 && !read_only) { // Read-write failed, try read-only read_only = true; @@ -670,35 +439,8 @@ void *Sys_open(const char *name, bool read_only) fh->is_media_present = true; if (S_ISBLK(st.st_mode)) { fh->is_cdrom = is_cdrom; -#if defined(__linux__) - fh->is_floppy = (MAJOR(st.st_rdev) == FLOPPY_MAJOR); -#ifdef CDROM_GET_CAPABILITY - if (is_cdrom) { - fh->cdrom_cap = ioctl(fh->fd, CDROM_GET_CAPABILITY); - if (fh->cdrom_cap < 0) - fh->cdrom_cap = 0; - } -#endif -#elif defined(__FreeBSD__) - fh->is_floppy = ((st.st_rdev >> 16) == 2); -#ifdef CDIOCCAPABILITY - if (is_cdrom) { - if (ioctl(fh->fd, CDIOCCAPABILITY, &fh->cdrom_cap) < 0) - memset(&fh->cdrom_cap, 0, sizeof(fh->cdrom_cap)); - } -#endif -#elif defined(__NetBSD__) - fh->is_floppy = ((st.st_rdev >> 16) == 2); -#endif } -#if defined __MACOSX__ - if (is_cdrom) { - fh->is_cdrom = true; - fh->is_floppy = false; - if (cdrom_open_1(fh)) - fh->is_media_present = true; - } -#endif + } } if (fh->is_floppy && first_floppy == NULL) @@ -724,10 +466,6 @@ void Sys_close(void *arg) sys_remove_mac_file_handle(fh); -#if defined(BINCUE) - if (fh->is_bincue) - close_bincue(fh->bincue_fd); -#endif if (fh->generic_disk) delete fh->generic_disk; @@ -752,10 +490,6 @@ size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) if (!fh) return 0; -#if defined(BINCUE) - if (fh->is_bincue) - return read_bincue(fh->bincue_fd, buffer, offset, length); -#endif if (fh->generic_disk) return fh->generic_disk->read(buffer, offset, length); @@ -802,10 +536,6 @@ loff_t SysGetFileSize(void *arg) if (!fh) return true; -#if defined(BINCUE) - if (fh->is_bincue) - return size_bincue(fh->bincue_fd); -#endif if (fh->generic_disk) return fh->file_size; @@ -813,25 +543,9 @@ loff_t SysGetFileSize(void *arg) if (fh->is_file) return fh->file_size; else { -#if defined(__linux__) - long blocks; - if (ioctl(fh->fd, BLKGETSIZE, &blocks) < 0) - return 0; - D(bug(" BLKGETSIZE returns %d blocks\n", blocks)); - return (loff_t)blocks * 512; -#elif defined __MACOSX__ - uint32 block_size; - if (ioctl(fh->ioctl_fd, DKIOCGETBLOCKSIZE, &block_size) < 0) - return 0; - D(bug(" DKIOCGETBLOCKSIZE returns %lu bytes\n", (unsigned long)block_size)); - uint64 block_count; - if (ioctl(fh->ioctl_fd, DKIOCGETBLOCKCOUNT, &block_count) < 0) - return 0; - D(bug(" DKIOCGETBLOCKCOUNT returns %llu blocks\n", (unsigned long long)block_count)); - return block_count * block_size; -#else + return lseek(fh->fd, 0, SEEK_END) - fh->start_byte; -#endif + } } @@ -846,29 +560,7 @@ void SysEject(void *arg) if (!fh) return; -#if defined(__linux__) - if (fh->is_floppy) { - if (fh->fd >= 0) { - fsync(fh->fd); - ioctl(fh->fd, FDFLUSH); - ioctl(fh->fd, FDEJECT); - close(fh->fd); // Close and reopen so the driver will see the media change - } - fh->fd = open(fh->name, fh->read_only ? O_RDONLY : O_RDWR); - } else if (fh->is_cdrom) { - ioctl(fh->fd, CDROMEJECT); - close(fh->fd); // Close and reopen so the driver will see the media change - fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK); - } -#elif defined(__FreeBSD__) || defined(__NetBSD__) - if (fh->is_floppy) { - fsync(fh->fd); - } else if (fh->is_cdrom) { - ioctl(fh->fd, CDIOCEJECT); - close(fh->fd); // Close and reopen so the driver will see the media change - fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK); - } -#elif defined(__APPLE__) && defined(__MACH__) +#if defined(__APPLE__) && defined(__MACH__) if (fh->is_cdrom && fh->is_media_present) { close(fh->fd); fh->fd = -1; @@ -919,16 +611,6 @@ bool SysIsReadOnly(void *arg) if (!fh) return true; -#if defined(__linux__) - if (fh->is_floppy) { - if (fh->fd >= 0) { - struct floppy_drive_struct stat; - ioctl(fh->fd, FDGETDRVSTAT, &stat); - return !(stat.flags & FD_DISK_WRITABLE); - } else - return true; - } else -#endif return fh->read_only; } @@ -971,47 +653,6 @@ bool SysIsDiskInserted(void *arg) if (fh->is_file) { return true; -#if defined(__linux__) - } else if (fh->is_floppy) { - char block[512]; - lseek(fh->fd, 0, SEEK_SET); - ssize_t actual = read(fh->fd, block, 512); - if (actual < 0) { - close(fh->fd); // Close and reopen so the driver will see the media change - fh->fd = open(fh->name, fh->read_only ? O_RDONLY : O_RDWR); - actual = read(fh->fd, block, 512); - } - return actual == 512; - } else if (fh->is_cdrom) { -#ifdef CDROM_MEDIA_CHANGED - if (fh->cdrom_cap & CDC_MEDIA_CHANGED) { - // If we don't do this, all attempts to read from a disc fail - // once the tray has been opened (altough the TOC reads fine). - // Can somebody explain this to me? - if (ioctl(fh->fd, CDROM_MEDIA_CHANGED) == 1) { - close(fh->fd); - fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK); - } - } -#endif -#ifdef CDROM_DRIVE_STATUS - if (fh->cdrom_cap & CDC_DRIVE_STATUS) { - return ioctl(fh->fd, CDROM_DRIVE_STATUS, CDSL_CURRENT) == CDS_DISC_OK; - } -#endif - cdrom_tochdr header; - return ioctl(fh->fd, CDROMREADTOCHDR, &header) == 0; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - } else if (fh->is_floppy) { - return false; //!! - } else if (fh->is_cdrom) { - struct ioc_toc_header header; - return ioctl(fh->fd, CDIOREADTOCHEADER, &header) == 0; -#elif defined __MACOSX__ - } else if (fh->is_cdrom || fh->is_floppy) { - return fh->is_media_present; -#endif - } else return true; } @@ -1027,10 +668,6 @@ void SysPreventRemoval(void *arg) if (!fh) return; -#if defined(__linux__) && defined(CDROM_LOCKDOOR) - if (fh->is_cdrom) - ioctl(fh->fd, CDROM_LOCKDOOR, 1); -#endif } @@ -1044,10 +681,6 @@ void SysAllowRemoval(void *arg) if (!fh) return; -#if defined(__linux__) && defined(CDROM_LOCKDOOR) - if (fh->is_cdrom) - ioctl(fh->fd, CDROM_LOCKDOOR, 0); -#endif } @@ -1061,138 +694,10 @@ bool SysCDReadTOC(void *arg, uint8 *toc) if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return readtoc_bincue(fh->bincue_fd, toc); -#endif - if (fh->is_cdrom) { -#if defined(__linux__) - uint8 *p = toc + 2; - - // Header - cdrom_tochdr header; - if (ioctl(fh->fd, CDROMREADTOCHDR, &header) < 0) - return false; - *p++ = header.cdth_trk0; - *p++ = header.cdth_trk1; - - // Tracks - cdrom_tocentry entry; - for (int i=header.cdth_trk0; i<=header.cdth_trk1; i++) { - entry.cdte_track = i; - entry.cdte_format = CDROM_MSF; - if (ioctl(fh->fd, CDROMREADTOCENTRY, &entry) < 0) - return false; - *p++ = 0; - *p++ = (entry.cdte_adr << 4) | entry.cdte_ctrl; - *p++ = entry.cdte_track; - *p++ = 0; - *p++ = 0; - *p++ = entry.cdte_addr.msf.minute; - *p++ = entry.cdte_addr.msf.second; - *p++ = entry.cdte_addr.msf.frame; - } - - // Leadout track - entry.cdte_track = CDROM_LEADOUT; - entry.cdte_format = CDROM_MSF; - if (ioctl(fh->fd, CDROMREADTOCENTRY, &entry) < 0) - return false; - *p++ = 0; - *p++ = (entry.cdte_adr << 4) | entry.cdte_ctrl; - *p++ = entry.cdte_track; - *p++ = 0; - *p++ = 0; - *p++ = entry.cdte_addr.msf.minute; - *p++ = entry.cdte_addr.msf.second; - *p++ = entry.cdte_addr.msf.frame; - - // TOC size - int toc_size = p - toc; - *toc++ = toc_size >> 8; - *toc++ = toc_size & 0xff; - return true; -#elif defined __MACOSX__ && defined MAC_OS_X_VERSION_10_2 - if (fh->is_media_present) { - extern bool DarwinCDReadTOC(char *name, uint8 *toc); - return DarwinCDReadTOC(fh->name, toc); - } return false; -#elif defined(__FreeBSD__) - uint8 *p = toc + 2; - - // Header - struct ioc_toc_header header; - if (ioctl(fh->fd, CDIOREADTOCHEADER, &header) < 0) - return false; - *p++ = header.starting_track; - *p++ = header.ending_track; - - // Tracks - struct ioc_read_toc_single_entry entry; - for (int i=header.starting_track; i<=header.ending_track; i++) { - entry.track = i; - entry.address_format = CD_MSF_FORMAT; - if (ioctl(fh->fd, CDIOREADTOCENTRY, &entry) < 0) - return false; - *p++ = 0; - *p++ = (entry.entry.addr_type << 4) | entry.entry.control; - *p++ = entry.entry.track; - *p++ = 0; - *p++ = 0; - *p++ = entry.entry.addr.msf.minute; - *p++ = entry.entry.addr.msf.second; - *p++ = entry.entry.addr.msf.frame; - } - // Leadout track - entry.track = CD_TRACK_INFO; - entry.address_format = CD_MSF_FORMAT; - if (ioctl(fh->fd, CDIOREADTOCENTRY, &entry) < 0) - return false; - *p++ = 0; - *p++ = (entry.entry.addr_type << 4) | entry.entry.control; - *p++ = entry.entry.track; - *p++ = 0; - *p++ = 0; - *p++ = entry.entry.addr.msf.minute; - *p++ = entry.entry.addr.msf.second; - *p++ = entry.entry.addr.msf.frame; - - // TOC size - int toc_size = p - toc; - *toc++ = toc_size >> 8; - *toc++ = toc_size & 0xff; - return true; -#elif defined(__NetBSD__) - uint8 *p = toc + 2; - - // Header - struct ioc_toc_header header; - if (ioctl(fh->fd, CDIOREADTOCHEADER, &header) < 0) - return false; - *p++ = header.starting_track; - *p++ = header.ending_track; - - // Tracks (this is nice... :-) - struct ioc_read_toc_entry entries; - entries.address_format = CD_MSF_FORMAT; - entries.starting_track = 1; - entries.data_len = 800; - entries.data = (cd_toc_entry *)p; - if (ioctl(fh->fd, CDIOREADTOCENTRIES, &entries) < 0) - return false; - - // TOC size - int toc_size = p - toc; - *toc++ = toc_size >> 8; - *toc++ = toc_size & 0xff; - return true; -#else - return false; -#endif } else return false; } @@ -1208,61 +713,10 @@ bool SysCDGetPosition(void *arg, uint8 *pos) if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return GetPosition_bincue(fh->bincue_fd, pos); -#endif - if (fh->is_cdrom) { -#if defined(__linux__) - cdrom_subchnl chan; - chan.cdsc_format = CDROM_MSF; - if (ioctl(fh->fd, CDROMSUBCHNL, &chan) < 0) - return false; - *pos++ = 0; - *pos++ = chan.cdsc_audiostatus; - *pos++ = 0; - *pos++ = 12; // Sub-Q data length - *pos++ = 0; - *pos++ = (chan.cdsc_adr << 4) | chan.cdsc_ctrl; - *pos++ = chan.cdsc_trk; - *pos++ = chan.cdsc_ind; - *pos++ = 0; - *pos++ = chan.cdsc_absaddr.msf.minute; - *pos++ = chan.cdsc_absaddr.msf.second; - *pos++ = chan.cdsc_absaddr.msf.frame; - *pos++ = 0; - *pos++ = chan.cdsc_reladdr.msf.minute; - *pos++ = chan.cdsc_reladdr.msf.second; - *pos++ = chan.cdsc_reladdr.msf.frame; - return true; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - struct ioc_read_subchannel chan; - chan.data_format = CD_MSF_FORMAT; - chan.address_format = CD_MSF_FORMAT; - chan.track = CD_CURRENT_POSITION; - if (ioctl(fh->fd, CDIOCREADSUBCHANNEL, &chan) < 0) - return false; - *pos++ = 0; - *pos++ = chan.data->header.audio_status; - *pos++ = 0; - *pos++ = 12; // Sub-Q data length - *pos++ = 0; - *pos++ = (chan.data->what.position.addr_type << 4) | chan.data->what.position.control; - *pos++ = chan.data->what.position.track_number; - *pos++ = chan.data->what.position.index_number; - *pos++ = 0; - *pos++ = chan.data->what.position.absaddr.msf.minute; - *pos++ = chan.data->what.position.absaddr.msf.second; - *pos++ = chan.data->what.position.absaddr.msf.frame; - *pos++ = 0; - *pos++ = chan.data->what.position.reladdr.msf.minute; - *pos++ = chan.data->what.position.reladdr.msf.second; - *pos++ = chan.data->what.position.reladdr.msf.frame; - return true; -#else + return false; -#endif + } else return false; } @@ -1278,33 +732,11 @@ bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return CDPlay_bincue(fh->bincue_fd, start_m, start_s, start_f, end_m, end_s, end_f); -#endif if (fh->is_cdrom) { -#if defined(__linux__) - cdrom_msf play; - play.cdmsf_min0 = start_m; - play.cdmsf_sec0 = start_s; - play.cdmsf_frame0 = start_f; - play.cdmsf_min1 = end_m; - play.cdmsf_sec1 = end_s; - play.cdmsf_frame1 = end_f; - return ioctl(fh->fd, CDROMPLAYMSF, &play) == 0; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - struct ioc_play_msf play; - play.start_m = start_m; - play.start_s = start_s; - play.start_f = start_f; - play.end_m = end_m; - play.end_s = end_s; - play.end_f = end_f; - return ioctl(fh->fd, CDIOCPLAYMSF, &play) == 0; -#else + return false; -#endif + } else return false; } @@ -1320,19 +752,10 @@ bool SysCDPause(void *arg) if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return CDPause_bincue(fh->bincue_fd); -#endif - if (fh->is_cdrom) { -#if defined(__linux__) - return ioctl(fh->fd, CDROMPAUSE) == 0; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - return ioctl(fh->fd, CDIOCPAUSE) == 0; -#else + return false; -#endif + } else return false; } @@ -1348,20 +771,11 @@ bool SysCDResume(void *arg) if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return CDResume_bincue(fh->bincue_fd); -#endif - if (fh->is_cdrom) { -#if defined(__linux__) - return ioctl(fh->fd, CDROMRESUME) == 0; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - return ioctl(fh->fd, CDIOCRESUME) == 0; -#else + return false; -#endif + } else return false; } @@ -1377,20 +791,10 @@ bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) if (!fh) return false; -#if defined(BINCUE) - if (fh->is_bincue) - return CDStop_bincue(fh->bincue_fd); -#endif - - if (fh->is_cdrom) { -#if defined(__linux__) - return ioctl(fh->fd, CDROMSTOP) == 0; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - return ioctl(fh->fd, CDIOCSTOP) == 0; -#else + return false; -#endif + } else return false; } @@ -1406,7 +810,6 @@ bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reve if (!fh) return false; - // Not supported under Linux return false; } @@ -1422,17 +825,7 @@ void SysCDSetVolume(void *arg, uint8 left, uint8 right) return; if (fh->is_cdrom) { -#if defined(__linux__) - cdrom_volctrl vol; - vol.channel0 = vol.channel2 = left; - vol.channel1 = vol.channel3 = right; - ioctl(fh->fd, CDROMVOLCTRL, &vol); -#elif defined(__FreeBSD__) || defined(__NetBSD__) - struct ioc_vol vol; - vol.vol[0] = vol.vol[2] = left; - vol.vol[1] = vol.vol[3] = right; - ioctl(fh->fd, CDIOCSETVOL, &vol); -#endif + } } @@ -1449,16 +842,6 @@ void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) left = right = 0; if (fh->is_cdrom) { -#if defined(__linux__) - cdrom_volctrl vol; - ioctl(fh->fd, CDROMVOLREAD, &vol); - left = vol.channel0; - right = vol.channel1; -#elif defined(__FreeBSD__) || defined(__NetBSD__) - struct ioc_vol vol; - ioctl(fh->fd, CDIOCGETVOL, &vol); - left = vol.vol[0]; - right = vol.vol[1]; -#endif + } } diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index df2919394..285b5e63e 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -66,25 +66,6 @@ #include #endif -#ifdef ENABLE_NATIVE_M68K - -/* Mac and host address space are the same */ -#define REAL_ADDRESSING 1 - -/* Using 68k natively */ -#define EMULATED_68K 0 - -/* Mac ROM is not write protected */ -#define ROM_IS_WRITE_PROTECTED 0 -#define USE_SCRATCHMEM_SUBTERFUGE 1 - -#else - -/* Mac and host address space are distinct */ -#ifndef REAL_ADDRESSING -#define REAL_ADDRESSING 0 -#endif - /* Using 68k emulator */ #define EMULATED_68K 1 @@ -92,21 +73,13 @@ #define USE_PREFETCH_BUFFER 0 /* Mac ROM is write protected when banked memory is used */ -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # define ROM_IS_WRITE_PROTECTED 0 # define USE_SCRATCHMEM_SUBTERFUGE 1 #else # define ROM_IS_WRITE_PROTECTED 1 #endif -#endif - -/* Direct Addressing requires Video on SEGV signals in plain X11 mode */ -#if DIRECT_ADDRESSING && (!ENABLE_VOSF && !USE_SDL_VIDEO) -# undef ENABLE_VOSF -# define ENABLE_VOSF 1 -#endif - /* ExtFS is supported */ #define SUPPORTS_EXTFS 1 @@ -117,11 +90,6 @@ #ifdef HAVE_PTHREADS #define USE_PTHREADS_SERVICES #endif -#if EMULATED_68K -#if defined(__NetBSD__) -#define USE_CPU_EMUL_SERVICES -#endif -#endif #ifdef USE_CPU_EMUL_SERVICES #undef USE_PTHREADS_SERVICES #endif @@ -185,10 +153,11 @@ typedef char * caddr_t; #endif /* Time data type for Time Manager emulation */ -#ifdef HAVE_CLOCK_GETTIME -typedef struct timespec tm_time_t; -#elif defined(__MACH__) + +#if defined(__MACH__) typedef mach_timespec_t tm_time_t; +#elif defined(HAVE_CLOCK_GETTIME) +typedef struct timespec tm_time_t; #else typedef struct timeval tm_time_t; #endif @@ -221,107 +190,6 @@ typedef uae_u32 uaecptr; extern uint64 GetTicks_usec(void); extern void Delay_usec(uint32 usec); -/* Spinlocks */ -#ifdef __GNUC__ - -#if defined(__powerpc__) || defined(__ppc__) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - __asm__ __volatile__("0: lwarx %0,0,%1\n" - " xor. %0,%3,%0\n" - " bne 1f\n" - " stwcx. %2,0,%1\n" - " bne- 0b\n" - "1: " - : "=&r" (ret) - : "r" (p), "r" (1), "r" (0) - : "cr0", "memory"); - return ret; -} -#endif - -/* FIXME: SheepShaver occasionnally hangs with those locks */ -#if 0 && (defined(__i386__) || defined(__x86_64__)) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - long int ret; - /* Note: the "xchg" instruction does not need a "lock" prefix */ - __asm__ __volatile__("xchgl %k0, %1" - : "=r" (ret), "=m" (*p) - : "0" (1), "m" (*p) - : "memory"); - return ret; -} -#endif - -#ifdef __s390__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - - __asm__ __volatile__("0: cs %0,%1,0(%2)\n" - " jl 0b" - : "=&d" (ret) - : "r" (1), "a" (p), "0" (*p) - : "cc", "memory" ); - return ret; -} -#endif - -#ifdef __alpha__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - unsigned long one; - - __asm__ __volatile__("0: mov 1,%2\n" - " ldl_l %0,%1\n" - " stl_c %2,%1\n" - " beq %2,1f\n" - ".subsection 2\n" - "1: br 0b\n" - ".previous" - : "=r" (ret), "=m" (*p), "=r" (one) - : "m" (*p)); - return ret; -} -#endif - -#ifdef __sparc__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - - __asm__ __volatile__("ldstub [%1], %0" - : "=r" (ret) - : "r" (p) - : "memory"); - - return (ret ? 1 : 0); -} -#endif - -#ifdef __arm__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - register unsigned int ret; - __asm__ __volatile__("swp %0, %1, [%2]" - : "=r"(ret) - : "0"(1), "r"(p)); - - return ret; -} -#endif - -#endif /* __GNUC__ */ - typedef volatile int spinlock_t; static const spinlock_t SPIN_LOCK_UNLOCKED = 0; @@ -357,25 +225,6 @@ static inline int spin_trylock(spinlock_t *lock) } #endif -/* X11 display fast locks */ -#ifdef HAVE_SPINLOCKS -#define X11_LOCK_TYPE spinlock_t -#define X11_LOCK_INIT SPIN_LOCK_UNLOCKED -#define XDisplayLock() spin_lock(&x_display_lock) -#define XDisplayUnlock() spin_unlock(&x_display_lock) -#elif defined(HAVE_PTHREADS) -#define X11_LOCK_TYPE pthread_mutex_t -#define X11_LOCK_INIT PTHREAD_MUTEX_INITIALIZER -#define XDisplayLock() pthread_mutex_lock(&x_display_lock); -#define XDisplayUnlock() pthread_mutex_unlock(&x_display_lock); -#else -#define XDisplayLock() -#define XDisplayUnlock() -#endif -#ifdef X11_LOCK_TYPE -extern X11_LOCK_TYPE x_display_lock; -#endif - #ifdef HAVE_PTHREADS /* Centralized pthread attribute setup */ void Set_pthread_attr(pthread_attr_t *attr, int priority); diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index 9e227d02e..a73e42806 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -27,11 +27,6 @@ #define DEBUG 0 #include "debug.h" -// For NetBSD with broken pthreads headers -#ifndef CLOCK_REALTIME -#define CLOCK_REALTIME 0 -#endif - #if defined(__MACH__) #include #include @@ -57,14 +52,14 @@ static inline void mach_current_time(tm_time_t &t) { void Microseconds(uint32 &hi, uint32 &lo) { D(bug("Microseconds\n")); -#if defined(HAVE_CLOCK_GETTIME) - struct timespec t; - clock_gettime(CLOCK_REALTIME, &t); - uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#elif defined(__MACH__) +#if defined(__MACH__) tm_time_t t; mach_current_time(t); uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#elif defined(HAVE_CLOCK_GETTIME) + struct timespec t; + clock_gettime(CLOCK_REALTIME, &t); + uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; #else struct timeval t; gettimeofday(&t, NULL); @@ -91,10 +86,10 @@ uint32 TimerDateTime(void) void timer_current_time(tm_time_t &t) { -#ifdef HAVE_CLOCK_GETTIME - clock_gettime(CLOCK_REALTIME, &t); -#elif defined(__MACH__) +#if defined(__MACH__) mach_current_time(t); +#elif defined(HAVE_CLOCK_GETTIME) + clock_gettime(CLOCK_REALTIME, &t); #else gettimeofday(&t, NULL); #endif @@ -229,14 +224,14 @@ int32 timer_host2mac_time(tm_time_t hosttime) uint64 GetTicks_usec(void) { -#ifdef HAVE_CLOCK_GETTIME - struct timespec t; - clock_gettime(CLOCK_REALTIME, &t); - return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#elif defined(__MACH__) +#if defined(__MACH__) tm_time_t t; mach_current_time(t); return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; +#elif defined(HAVE_CLOCK_GETTIME) + struct timespec t; + clock_gettime(CLOCK_REALTIME, &t); + return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; #else struct timeval t; gettimeofday(&t, NULL); @@ -251,17 +246,8 @@ uint64 GetTicks_usec(void) * the highest accuracy possible) */ -#if defined(linux) -// Linux select() changes its timeout parameter upon return to contain -// the remaining time. Most other unixen leave it unchanged or undefined. -#define SELECT_SETS_REMAINING -#elif defined(__FreeBSD__) || defined(__sun__) || (defined(__MACH__) && defined(__APPLE__)) +#if (defined(__MACH__) && defined(__APPLE__)) #define USE_NANOSLEEP -#elif defined(HAVE_PTHREADS) && defined(sgi) -// SGI pthreads has a bug when using pthreads+signals+nanosleep, -// so instead of using nanosleep, wait on a CV which is never signalled. -#include -#define USE_COND_TIMEDWAIT #endif void Delay_usec(uint32 usec) @@ -283,7 +269,6 @@ void Delay_usec(uint32 usec) #endif #endif - // Set the timeout interval - Linux only needs to do this once #if defined(SELECT_SETS_REMAINING) tv.tv_sec = 0; tv.tv_usec = usec; diff --git a/BasiliskII/src/Unix/tinyxml2.cpp b/BasiliskII/src/Unix/tinyxml2.cpp deleted file mode 100755 index 4cd8695da..000000000 --- a/BasiliskII/src/Unix/tinyxml2.cpp +++ /dev/null @@ -1,2095 +0,0 @@ -/* -Original code by Lee Thomason (www.grinninglizard.com) - -This software is provided 'as-is', without any express or implied -warranty. In no event will the authors be held liable for any -damages arising from the use of this software. - -Permission is granted to anyone to use this software for any -purpose, including commercial applications, and to alter it and -redistribute it freely, subject to the following restrictions: - -1. The origin of this software must not be misrepresented; you must -not claim that you wrote the original software. If you use this -software in a product, an acknowledgment in the product documentation -would be appreciated but is not required. - -2. Altered source versions must be plainly marked as such, and -must not be misrepresented as being the original software. - -3. This notice may not be removed or altered from any source -distribution. -*/ - -#include "tinyxml2.h" - -#include // yes, this one new style header, is in the Android SDK. -# ifdef ANDROID_NDK -# include -#else -# include -#endif - -static const char LINE_FEED = (char)0x0a; // all line endings are normalized to LF -static const char LF = LINE_FEED; -static const char CARRIAGE_RETURN = (char)0x0d; // CR gets filtered out -static const char CR = CARRIAGE_RETURN; -static const char SINGLE_QUOTE = '\''; -static const char DOUBLE_QUOTE = '\"'; - -// Bunch of unicode info at: -// http://www.unicode.org/faq/utf_bom.html -// ef bb bf (Microsoft "lead bytes") - designates UTF-8 - -static const unsigned char TIXML_UTF_LEAD_0 = 0xefU; -static const unsigned char TIXML_UTF_LEAD_1 = 0xbbU; -static const unsigned char TIXML_UTF_LEAD_2 = 0xbfU; - - -#define DELETE_NODE( node ) { \ - if ( node ) { \ - MemPool* pool = node->_memPool; \ - node->~XMLNode(); \ - pool->Free( node ); \ - } \ - } -#define DELETE_ATTRIBUTE( attrib ) { \ - if ( attrib ) { \ - MemPool* pool = attrib->_memPool; \ - attrib->~XMLAttribute(); \ - pool->Free( attrib ); \ - } \ - } - -namespace tinyxml2 -{ - -struct Entity { - const char* pattern; - int length; - char value; -}; - -static const int NUM_ENTITIES = 5; -static const Entity entities[NUM_ENTITIES] = { - { "quot", 4, DOUBLE_QUOTE }, - { "amp", 3, '&' }, - { "apos", 4, SINGLE_QUOTE }, - { "lt", 2, '<' }, - { "gt", 2, '>' } -}; - - -StrPair::~StrPair() -{ - Reset(); -} - - -void StrPair::Reset() -{ - if ( _flags & NEEDS_DELETE ) { - delete [] _start; - } - _flags = 0; - _start = 0; - _end = 0; -} - - -void StrPair::SetStr( const char* str, int flags ) -{ - Reset(); - size_t len = strlen( str ); - _start = new char[ len+1 ]; - memcpy( _start, str, len+1 ); - _end = _start + len; - _flags = flags | NEEDS_DELETE; -} - - -char* StrPair::ParseText( char* p, const char* endTag, int strFlags ) -{ - TIXMLASSERT( endTag && *endTag ); - - char* start = p; // fixme: hides a member - char endChar = *endTag; - size_t length = strlen( endTag ); - - // Inner loop of text parsing. - while ( *p ) { - if ( *p == endChar && strncmp( p, endTag, length ) == 0 ) { - Set( start, p, strFlags ); - return p + length; - } - ++p; - } - return 0; -} - - -char* StrPair::ParseName( char* p ) -{ - char* start = p; - - if ( !start || !(*start) ) { - return 0; - } - - while( *p && ( p == start ? XMLUtil::IsNameStartChar( *p ) : XMLUtil::IsNameChar( *p ) )) { - ++p; - } - - if ( p > start ) { - Set( start, p, 0 ); - return p; - } - return 0; -} - - -void StrPair::CollapseWhitespace() -{ - // Trim leading space. - _start = XMLUtil::SkipWhiteSpace( _start ); - - if ( _start && *_start ) { - char* p = _start; // the read pointer - char* q = _start; // the write pointer - - while( *p ) { - if ( XMLUtil::IsWhiteSpace( *p )) { - p = XMLUtil::SkipWhiteSpace( p ); - if ( *p == 0 ) { - break; // don't write to q; this trims the trailing space. - } - *q = ' '; - ++q; - } - *q = *p; - ++q; - ++p; - } - *q = 0; - } -} - - -const char* StrPair::GetStr() -{ - if ( _flags & NEEDS_FLUSH ) { - *_end = 0; - _flags ^= NEEDS_FLUSH; - - if ( _flags ) { - char* p = _start; // the read pointer - char* q = _start; // the write pointer - - while( p < _end ) { - if ( (_flags & NEEDS_NEWLINE_NORMALIZATION) && *p == CR ) { - // CR-LF pair becomes LF - // CR alone becomes LF - // LF-CR becomes LF - if ( *(p+1) == LF ) { - p += 2; - } - else { - ++p; - } - *q++ = LF; - } - else if ( (_flags & NEEDS_NEWLINE_NORMALIZATION) && *p == LF ) { - if ( *(p+1) == CR ) { - p += 2; - } - else { - ++p; - } - *q++ = LF; - } - else if ( (_flags & NEEDS_ENTITY_PROCESSING) && *p == '&' ) { - // Entities handled by tinyXML2: - // - special entities in the entity table [in/out] - // - numeric character reference [in] - // 中 or 中 - - if ( *(p+1) == '#' ) { - char buf[10] = { 0 }; - int len; - p = const_cast( XMLUtil::GetCharacterRef( p, buf, &len ) ); - for( int i=0; i(p); - // Check for BOM: - if ( *(pu+0) == TIXML_UTF_LEAD_0 - && *(pu+1) == TIXML_UTF_LEAD_1 - && *(pu+2) == TIXML_UTF_LEAD_2 ) { - *bom = true; - p += 3; - } - return p; -} - - -void XMLUtil::ConvertUTF32ToUTF8( unsigned long input, char* output, int* length ) -{ - const unsigned long BYTE_MASK = 0xBF; - const unsigned long BYTE_MARK = 0x80; - const unsigned long FIRST_BYTE_MARK[7] = { 0x00, 0x00, 0xC0, 0xE0, 0xF0, 0xF8, 0xFC }; - - if (input < 0x80) { - *length = 1; - } - else if ( input < 0x800 ) { - *length = 2; - } - else if ( input < 0x10000 ) { - *length = 3; - } - else if ( input < 0x200000 ) { - *length = 4; - } - else { - *length = 0; // This code won't covert this correctly anyway. - return; - } - - output += *length; - - // Scary scary fall throughs. - switch (*length) { - case 4: - --output; - *output = (char)((input | BYTE_MARK) & BYTE_MASK); - input >>= 6; - case 3: - --output; - *output = (char)((input | BYTE_MARK) & BYTE_MASK); - input >>= 6; - case 2: - --output; - *output = (char)((input | BYTE_MARK) & BYTE_MASK); - input >>= 6; - case 1: - --output; - *output = (char)(input | FIRST_BYTE_MARK[*length]); - default: - break; - } -} - - -const char* XMLUtil::GetCharacterRef( const char* p, char* value, int* length ) -{ - // Presume an entity, and pull it out. - *length = 0; - - if ( *(p+1) == '#' && *(p+2) ) { - unsigned long ucs = 0; - ptrdiff_t delta = 0; - unsigned mult = 1; - - if ( *(p+2) == 'x' ) { - // Hexadecimal. - if ( !*(p+3) ) { - return 0; - } - - const char* q = p+3; - q = strchr( q, ';' ); - - if ( !q || !*q ) { - return 0; - } - - delta = q-p; - --q; - - while ( *q != 'x' ) { - if ( *q >= '0' && *q <= '9' ) { - ucs += mult * (*q - '0'); - } - else if ( *q >= 'a' && *q <= 'f' ) { - ucs += mult * (*q - 'a' + 10); - } - else if ( *q >= 'A' && *q <= 'F' ) { - ucs += mult * (*q - 'A' + 10 ); - } - else { - return 0; - } - mult *= 16; - --q; - } - } - else { - // Decimal. - if ( !*(p+2) ) { - return 0; - } - - const char* q = p+2; - q = strchr( q, ';' ); - - if ( !q || !*q ) { - return 0; - } - - delta = q-p; - --q; - - while ( *q != '#' ) { - if ( *q >= '0' && *q <= '9' ) { - ucs += mult * (*q - '0'); - } - else { - return 0; - } - mult *= 10; - --q; - } - } - // convert the UCS to UTF-8 - ConvertUTF32ToUTF8( ucs, value, length ); - return p + delta + 1; - } - return p+1; -} - - -void XMLUtil::ToStr( int v, char* buffer, int bufferSize ) -{ - TIXML_SNPRINTF( buffer, bufferSize, "%d", v ); -} - - -void XMLUtil::ToStr( unsigned v, char* buffer, int bufferSize ) -{ - TIXML_SNPRINTF( buffer, bufferSize, "%u", v ); -} - - -void XMLUtil::ToStr( bool v, char* buffer, int bufferSize ) -{ - TIXML_SNPRINTF( buffer, bufferSize, "%d", v ? 1 : 0 ); -} - - -void XMLUtil::ToStr( float v, char* buffer, int bufferSize ) -{ - TIXML_SNPRINTF( buffer, bufferSize, "%g", v ); -} - - -void XMLUtil::ToStr( double v, char* buffer, int bufferSize ) -{ - TIXML_SNPRINTF( buffer, bufferSize, "%g", v ); -} - - -bool XMLUtil::ToInt( const char* str, int* value ) -{ - if ( TIXML_SSCANF( str, "%d", value ) == 1 ) { - return true; - } - return false; -} - -bool XMLUtil::ToUnsigned( const char* str, unsigned *value ) -{ - if ( TIXML_SSCANF( str, "%u", value ) == 1 ) { - return true; - } - return false; -} - -bool XMLUtil::ToBool( const char* str, bool* value ) -{ - int ival = 0; - if ( ToInt( str, &ival )) { - *value = (ival==0) ? false : true; - return true; - } - if ( StringEqual( str, "true" ) ) { - *value = true; - return true; - } - else if ( StringEqual( str, "false" ) ) { - *value = false; - return true; - } - return false; -} - - -bool XMLUtil::ToFloat( const char* str, float* value ) -{ - if ( TIXML_SSCANF( str, "%f", value ) == 1 ) { - return true; - } - return false; -} - -bool XMLUtil::ToDouble( const char* str, double* value ) -{ - if ( TIXML_SSCANF( str, "%lf", value ) == 1 ) { - return true; - } - return false; -} - - -char* XMLDocument::Identify( char* p, XMLNode** node ) -{ - XMLNode* returnNode = 0; - char* start = p; - p = XMLUtil::SkipWhiteSpace( p ); - if( !p || !*p ) { - return p; - } - - // What is this thing? - // - Elements start with a letter or underscore, but xml is reserved. - // - Comments: - // - // With a special case: - // - // - // - // - // Where the closing element (/foo) *must* be the next thing after the opening - // element, and the names must match. BUT the tricky bit is that the closing - // element will be read by the child. - // - // 'endTag' is the end tag for this node, it is returned by a call to a child. - // 'parentEnd' is the end tag for the parent, which is filled in and returned. - - while( p && *p ) { - XMLNode* node = 0; - - p = _document->Identify( p, &node ); - if ( p == 0 || node == 0 ) { - break; - } - - StrPair endTag; - p = node->ParseDeep( p, &endTag ); - if ( !p ) { - DELETE_NODE( node ); - node = 0; - if ( !_document->Error() ) { - _document->SetError( XML_ERROR_PARSING, 0, 0 ); - } - break; - } - - // We read the end tag. Return it to the parent. - if ( node->ToElement() && node->ToElement()->ClosingType() == XMLElement::CLOSING ) { - if ( parentEnd ) { - *parentEnd = static_cast(node)->_value; - } - node->_memPool->SetTracked(); // created and then immediately deleted. - DELETE_NODE( node ); - return p; - } - - // Handle an end tag returned to this level. - // And handle a bunch of annoying errors. - XMLElement* ele = node->ToElement(); - if ( ele ) { - if ( endTag.Empty() && ele->ClosingType() == XMLElement::OPEN ) { - _document->SetError( XML_ERROR_MISMATCHED_ELEMENT, node->Value(), 0 ); - p = 0; - } - else if ( !endTag.Empty() && ele->ClosingType() != XMLElement::OPEN ) { - _document->SetError( XML_ERROR_MISMATCHED_ELEMENT, node->Value(), 0 ); - p = 0; - } - else if ( !endTag.Empty() ) { - if ( !XMLUtil::StringEqual( endTag.GetStr(), node->Value() )) { - _document->SetError( XML_ERROR_MISMATCHED_ELEMENT, node->Value(), 0 ); - p = 0; - } - } - } - if ( p == 0 ) { - DELETE_NODE( node ); - node = 0; - } - if ( node ) { - this->InsertEndChild( node ); - } - } - return 0; -} - -// --------- XMLText ---------- // -char* XMLText::ParseDeep( char* p, StrPair* ) -{ - const char* start = p; - if ( this->CData() ) { - p = _value.ParseText( p, "]]>", StrPair::NEEDS_NEWLINE_NORMALIZATION ); - if ( !p ) { - _document->SetError( XML_ERROR_PARSING_CDATA, start, 0 ); - } - return p; - } - else { - int flags = _document->ProcessEntities() ? StrPair::TEXT_ELEMENT : StrPair::TEXT_ELEMENT_LEAVE_ENTITIES; - if ( _document->WhitespaceMode() == COLLAPSE_WHITESPACE ) { - flags |= StrPair::COLLAPSE_WHITESPACE; - } - - p = _value.ParseText( p, "<", flags ); - if ( !p ) { - _document->SetError( XML_ERROR_PARSING_TEXT, start, 0 ); - } - if ( p && *p ) { - return p-1; - } - } - return 0; -} - - -XMLNode* XMLText::ShallowClone( XMLDocument* doc ) const -{ - if ( !doc ) { - doc = _document; - } - XMLText* text = doc->NewText( Value() ); // fixme: this will always allocate memory. Intern? - text->SetCData( this->CData() ); - return text; -} - - -bool XMLText::ShallowEqual( const XMLNode* compare ) const -{ - return ( compare->ToText() && XMLUtil::StringEqual( compare->ToText()->Value(), Value() )); -} - - -bool XMLText::Accept( XMLVisitor* visitor ) const -{ - return visitor->Visit( *this ); -} - - -// --------- XMLComment ---------- // - -XMLComment::XMLComment( XMLDocument* doc ) : XMLNode( doc ) -{ -} - - -XMLComment::~XMLComment() -{ -} - - -char* XMLComment::ParseDeep( char* p, StrPair* ) -{ - // Comment parses as text. - const char* start = p; - p = _value.ParseText( p, "-->", StrPair::COMMENT ); - if ( p == 0 ) { - _document->SetError( XML_ERROR_PARSING_COMMENT, start, 0 ); - } - return p; -} - - -XMLNode* XMLComment::ShallowClone( XMLDocument* doc ) const -{ - if ( !doc ) { - doc = _document; - } - XMLComment* comment = doc->NewComment( Value() ); // fixme: this will always allocate memory. Intern? - return comment; -} - - -bool XMLComment::ShallowEqual( const XMLNode* compare ) const -{ - return ( compare->ToComment() && XMLUtil::StringEqual( compare->ToComment()->Value(), Value() )); -} - - -bool XMLComment::Accept( XMLVisitor* visitor ) const -{ - return visitor->Visit( *this ); -} - - -// --------- XMLDeclaration ---------- // - -XMLDeclaration::XMLDeclaration( XMLDocument* doc ) : XMLNode( doc ) -{ -} - - -XMLDeclaration::~XMLDeclaration() -{ - //printf( "~XMLDeclaration\n" ); -} - - -char* XMLDeclaration::ParseDeep( char* p, StrPair* ) -{ - // Declaration parses as text. - const char* start = p; - p = _value.ParseText( p, "?>", StrPair::NEEDS_NEWLINE_NORMALIZATION ); - if ( p == 0 ) { - _document->SetError( XML_ERROR_PARSING_DECLARATION, start, 0 ); - } - return p; -} - - -XMLNode* XMLDeclaration::ShallowClone( XMLDocument* doc ) const -{ - if ( !doc ) { - doc = _document; - } - XMLDeclaration* dec = doc->NewDeclaration( Value() ); // fixme: this will always allocate memory. Intern? - return dec; -} - - -bool XMLDeclaration::ShallowEqual( const XMLNode* compare ) const -{ - return ( compare->ToDeclaration() && XMLUtil::StringEqual( compare->ToDeclaration()->Value(), Value() )); -} - - - -bool XMLDeclaration::Accept( XMLVisitor* visitor ) const -{ - return visitor->Visit( *this ); -} - -// --------- XMLUnknown ---------- // - -XMLUnknown::XMLUnknown( XMLDocument* doc ) : XMLNode( doc ) -{ -} - - -XMLUnknown::~XMLUnknown() -{ -} - - -char* XMLUnknown::ParseDeep( char* p, StrPair* ) -{ - // Unknown parses as text. - const char* start = p; - - p = _value.ParseText( p, ">", StrPair::NEEDS_NEWLINE_NORMALIZATION ); - if ( !p ) { - _document->SetError( XML_ERROR_PARSING_UNKNOWN, start, 0 ); - } - return p; -} - - -XMLNode* XMLUnknown::ShallowClone( XMLDocument* doc ) const -{ - if ( !doc ) { - doc = _document; - } - XMLUnknown* text = doc->NewUnknown( Value() ); // fixme: this will always allocate memory. Intern? - return text; -} - - -bool XMLUnknown::ShallowEqual( const XMLNode* compare ) const -{ - return ( compare->ToUnknown() && XMLUtil::StringEqual( compare->ToUnknown()->Value(), Value() )); -} - - -bool XMLUnknown::Accept( XMLVisitor* visitor ) const -{ - return visitor->Visit( *this ); -} - -// --------- XMLAttribute ---------- // -char* XMLAttribute::ParseDeep( char* p, bool processEntities ) -{ - // Parse using the name rules: bug fix, was using ParseText before - p = _name.ParseName( p ); - if ( !p || !*p ) { - return 0; - } - - // Skip white space before = - p = XMLUtil::SkipWhiteSpace( p ); - if ( !p || *p != '=' ) { - return 0; - } - - ++p; // move up to opening quote - p = XMLUtil::SkipWhiteSpace( p ); - if ( *p != '\"' && *p != '\'' ) { - return 0; - } - - char endTag[2] = { *p, 0 }; - ++p; // move past opening quote - - p = _value.ParseText( p, endTag, processEntities ? StrPair::ATTRIBUTE_VALUE : StrPair::ATTRIBUTE_VALUE_LEAVE_ENTITIES ); - return p; -} - - -void XMLAttribute::SetName( const char* n ) -{ - _name.SetStr( n ); -} - - -XMLError XMLAttribute::QueryIntValue( int* value ) const -{ - if ( XMLUtil::ToInt( Value(), value )) { - return XML_NO_ERROR; - } - return XML_WRONG_ATTRIBUTE_TYPE; -} - - -XMLError XMLAttribute::QueryUnsignedValue( unsigned int* value ) const -{ - if ( XMLUtil::ToUnsigned( Value(), value )) { - return XML_NO_ERROR; - } - return XML_WRONG_ATTRIBUTE_TYPE; -} - - -XMLError XMLAttribute::QueryBoolValue( bool* value ) const -{ - if ( XMLUtil::ToBool( Value(), value )) { - return XML_NO_ERROR; - } - return XML_WRONG_ATTRIBUTE_TYPE; -} - - -XMLError XMLAttribute::QueryFloatValue( float* value ) const -{ - if ( XMLUtil::ToFloat( Value(), value )) { - return XML_NO_ERROR; - } - return XML_WRONG_ATTRIBUTE_TYPE; -} - - -XMLError XMLAttribute::QueryDoubleValue( double* value ) const -{ - if ( XMLUtil::ToDouble( Value(), value )) { - return XML_NO_ERROR; - } - return XML_WRONG_ATTRIBUTE_TYPE; -} - - -void XMLAttribute::SetAttribute( const char* v ) -{ - _value.SetStr( v ); -} - - -void XMLAttribute::SetAttribute( int v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - _value.SetStr( buf ); -} - - -void XMLAttribute::SetAttribute( unsigned v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - _value.SetStr( buf ); -} - - -void XMLAttribute::SetAttribute( bool v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - _value.SetStr( buf ); -} - -void XMLAttribute::SetAttribute( double v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - _value.SetStr( buf ); -} - -void XMLAttribute::SetAttribute( float v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - _value.SetStr( buf ); -} - - -// --------- XMLElement ---------- // -XMLElement::XMLElement( XMLDocument* doc ) : XMLNode( doc ), - _closingType( 0 ), - _rootAttribute( 0 ) -{ -} - - -XMLElement::~XMLElement() -{ - while( _rootAttribute ) { - XMLAttribute* next = _rootAttribute->_next; - DELETE_ATTRIBUTE( _rootAttribute ); - _rootAttribute = next; - } -} - - -XMLAttribute* XMLElement::FindAttribute( const char* name ) -{ - XMLAttribute* a = 0; - for( a=_rootAttribute; a; a = a->_next ) { - if ( XMLUtil::StringEqual( a->Name(), name ) ) { - return a; - } - } - return 0; -} - - -const XMLAttribute* XMLElement::FindAttribute( const char* name ) const -{ - XMLAttribute* a = 0; - for( a=_rootAttribute; a; a = a->_next ) { - if ( XMLUtil::StringEqual( a->Name(), name ) ) { - return a; - } - } - return 0; -} - - -const char* XMLElement::Attribute( const char* name, const char* value ) const -{ - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return 0; - } - if ( !value || XMLUtil::StringEqual( a->Value(), value )) { - return a->Value(); - } - return 0; -} - - -const char* XMLElement::GetText() const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - return FirstChild()->ToText()->Value(); - } - return 0; -} - - -XMLError XMLElement::QueryIntText( int* ival ) const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - const char* t = FirstChild()->ToText()->Value(); - if ( XMLUtil::ToInt( t, ival ) ) { - return XML_SUCCESS; - } - return XML_CAN_NOT_CONVERT_TEXT; - } - return XML_NO_TEXT_NODE; -} - - -XMLError XMLElement::QueryUnsignedText( unsigned* uval ) const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - const char* t = FirstChild()->ToText()->Value(); - if ( XMLUtil::ToUnsigned( t, uval ) ) { - return XML_SUCCESS; - } - return XML_CAN_NOT_CONVERT_TEXT; - } - return XML_NO_TEXT_NODE; -} - - -XMLError XMLElement::QueryBoolText( bool* bval ) const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - const char* t = FirstChild()->ToText()->Value(); - if ( XMLUtil::ToBool( t, bval ) ) { - return XML_SUCCESS; - } - return XML_CAN_NOT_CONVERT_TEXT; - } - return XML_NO_TEXT_NODE; -} - - -XMLError XMLElement::QueryDoubleText( double* dval ) const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - const char* t = FirstChild()->ToText()->Value(); - if ( XMLUtil::ToDouble( t, dval ) ) { - return XML_SUCCESS; - } - return XML_CAN_NOT_CONVERT_TEXT; - } - return XML_NO_TEXT_NODE; -} - - -XMLError XMLElement::QueryFloatText( float* fval ) const -{ - if ( FirstChild() && FirstChild()->ToText() ) { - const char* t = FirstChild()->ToText()->Value(); - if ( XMLUtil::ToFloat( t, fval ) ) { - return XML_SUCCESS; - } - return XML_CAN_NOT_CONVERT_TEXT; - } - return XML_NO_TEXT_NODE; -} - - - -XMLAttribute* XMLElement::FindOrCreateAttribute( const char* name ) -{ - XMLAttribute* last = 0; - XMLAttribute* attrib = 0; - for( attrib = _rootAttribute; - attrib; - last = attrib, attrib = attrib->_next ) { - if ( XMLUtil::StringEqual( attrib->Name(), name ) ) { - break; - } - } - if ( !attrib ) { - attrib = new (_document->_attributePool.Alloc() ) XMLAttribute(); - attrib->_memPool = &_document->_attributePool; - if ( last ) { - last->_next = attrib; - } - else { - _rootAttribute = attrib; - } - attrib->SetName( name ); - attrib->_memPool->SetTracked(); // always created and linked. - } - return attrib; -} - - -void XMLElement::DeleteAttribute( const char* name ) -{ - XMLAttribute* prev = 0; - for( XMLAttribute* a=_rootAttribute; a; a=a->_next ) { - if ( XMLUtil::StringEqual( name, a->Name() ) ) { - if ( prev ) { - prev->_next = a->_next; - } - else { - _rootAttribute = a->_next; - } - DELETE_ATTRIBUTE( a ); - break; - } - prev = a; - } -} - - -char* XMLElement::ParseAttributes( char* p ) -{ - const char* start = p; - XMLAttribute* prevAttribute = 0; - - // Read the attributes. - while( p ) { - p = XMLUtil::SkipWhiteSpace( p ); - if ( !p || !(*p) ) { - _document->SetError( XML_ERROR_PARSING_ELEMENT, start, Name() ); - return 0; - } - - // attribute. - if (XMLUtil::IsNameStartChar( *p ) ) { - XMLAttribute* attrib = new (_document->_attributePool.Alloc() ) XMLAttribute(); - attrib->_memPool = &_document->_attributePool; - attrib->_memPool->SetTracked(); - - p = attrib->ParseDeep( p, _document->ProcessEntities() ); - if ( !p || Attribute( attrib->Name() ) ) { - DELETE_ATTRIBUTE( attrib ); - _document->SetError( XML_ERROR_PARSING_ATTRIBUTE, start, p ); - return 0; - } - // There is a minor bug here: if the attribute in the source xml - // document is duplicated, it will not be detected and the - // attribute will be doubly added. However, tracking the 'prevAttribute' - // avoids re-scanning the attribute list. Preferring performance for - // now, may reconsider in the future. - if ( prevAttribute ) { - prevAttribute->_next = attrib; - } - else { - _rootAttribute = attrib; - } - prevAttribute = attrib; - } - // end of the tag - else if ( *p == '/' && *(p+1) == '>' ) { - _closingType = CLOSED; - return p+2; // done; sealed element. - } - // end of the tag - else if ( *p == '>' ) { - ++p; - break; - } - else { - _document->SetError( XML_ERROR_PARSING_ELEMENT, start, p ); - return 0; - } - } - return p; -} - - -// -// -// foobar -// -char* XMLElement::ParseDeep( char* p, StrPair* strPair ) -{ - // Read the element name. - p = XMLUtil::SkipWhiteSpace( p ); - if ( !p ) { - return 0; - } - - // The closing element is the form. It is - // parsed just like a regular element then deleted from - // the DOM. - if ( *p == '/' ) { - _closingType = CLOSING; - ++p; - } - - p = _value.ParseName( p ); - if ( _value.Empty() ) { - return 0; - } - - p = ParseAttributes( p ); - if ( !p || !*p || _closingType ) { - return p; - } - - p = XMLNode::ParseDeep( p, strPair ); - return p; -} - - - -XMLNode* XMLElement::ShallowClone( XMLDocument* doc ) const -{ - if ( !doc ) { - doc = _document; - } - XMLElement* element = doc->NewElement( Value() ); // fixme: this will always allocate memory. Intern? - for( const XMLAttribute* a=FirstAttribute(); a; a=a->Next() ) { - element->SetAttribute( a->Name(), a->Value() ); // fixme: this will always allocate memory. Intern? - } - return element; -} - - -bool XMLElement::ShallowEqual( const XMLNode* compare ) const -{ - const XMLElement* other = compare->ToElement(); - if ( other && XMLUtil::StringEqual( other->Value(), Value() )) { - - const XMLAttribute* a=FirstAttribute(); - const XMLAttribute* b=other->FirstAttribute(); - - while ( a && b ) { - if ( !XMLUtil::StringEqual( a->Value(), b->Value() ) ) { - return false; - } - a = a->Next(); - b = b->Next(); - } - if ( a || b ) { - // different count - return false; - } - return true; - } - return false; -} - - -bool XMLElement::Accept( XMLVisitor* visitor ) const -{ - if ( visitor->VisitEnter( *this, _rootAttribute ) ) { - for ( const XMLNode* node=FirstChild(); node; node=node->NextSibling() ) { - if ( !node->Accept( visitor ) ) { - break; - } - } - } - return visitor->VisitExit( *this ); -} - - -// --------- XMLDocument ----------- // -XMLDocument::XMLDocument( bool processEntities, Whitespace whitespace ) : - XMLNode( 0 ), - _writeBOM( false ), - _processEntities( processEntities ), - _errorID( XML_NO_ERROR ), - _whitespace( whitespace ), - _errorStr1( 0 ), - _errorStr2( 0 ), - _charBuffer( 0 ) -{ - _document = this; // avoid warning about 'this' in initializer list -} - - -XMLDocument::~XMLDocument() -{ - DeleteChildren(); - delete [] _charBuffer; - -#if 0 - _textPool.Trace( "text" ); - _elementPool.Trace( "element" ); - _commentPool.Trace( "comment" ); - _attributePool.Trace( "attribute" ); -#endif - -#ifdef DEBUG - if ( Error() == false ) { - TIXMLASSERT( _elementPool.CurrentAllocs() == _elementPool.Untracked() ); - TIXMLASSERT( _attributePool.CurrentAllocs() == _attributePool.Untracked() ); - TIXMLASSERT( _textPool.CurrentAllocs() == _textPool.Untracked() ); - TIXMLASSERT( _commentPool.CurrentAllocs() == _commentPool.Untracked() ); - } -#endif -} - - -void XMLDocument::Clear() -{ - DeleteChildren(); - - _errorID = XML_NO_ERROR; - _errorStr1 = 0; - _errorStr2 = 0; - - delete [] _charBuffer; - _charBuffer = 0; -} - - -XMLElement* XMLDocument::NewElement( const char* name ) -{ - XMLElement* ele = new (_elementPool.Alloc()) XMLElement( this ); - ele->_memPool = &_elementPool; - ele->SetName( name ); - return ele; -} - - -XMLComment* XMLDocument::NewComment( const char* str ) -{ - XMLComment* comment = new (_commentPool.Alloc()) XMLComment( this ); - comment->_memPool = &_commentPool; - comment->SetValue( str ); - return comment; -} - - -XMLText* XMLDocument::NewText( const char* str ) -{ - XMLText* text = new (_textPool.Alloc()) XMLText( this ); - text->_memPool = &_textPool; - text->SetValue( str ); - return text; -} - - -XMLDeclaration* XMLDocument::NewDeclaration( const char* str ) -{ - XMLDeclaration* dec = new (_commentPool.Alloc()) XMLDeclaration( this ); - dec->_memPool = &_commentPool; - dec->SetValue( str ? str : "xml version=\"1.0\" encoding=\"UTF-8\"" ); - return dec; -} - - -XMLUnknown* XMLDocument::NewUnknown( const char* str ) -{ - XMLUnknown* unk = new (_commentPool.Alloc()) XMLUnknown( this ); - unk->_memPool = &_commentPool; - unk->SetValue( str ); - return unk; -} - - -XMLError XMLDocument::LoadFile( const char* filename ) -{ - Clear(); - FILE* fp = 0; - -#if defined(_MSC_VER) && (_MSC_VER >= 1400 ) - errno_t err = fopen_s(&fp, filename, "rb" ); - if ( !fp || err) { -#else - fp = fopen( filename, "rb" ); - if ( !fp) { -#endif - SetError( XML_ERROR_FILE_NOT_FOUND, filename, 0 ); - return _errorID; - } - LoadFile( fp ); - fclose( fp ); - return _errorID; -} - - -XMLError XMLDocument::LoadFile( FILE* fp ) -{ - Clear(); - - fseek( fp, 0, SEEK_END ); - size_t size = ftell( fp ); - fseek( fp, 0, SEEK_SET ); - - if ( size == 0 ) { - return _errorID; - } - - _charBuffer = new char[size+1]; - size_t read = fread( _charBuffer, 1, size, fp ); - if ( read != size ) { - SetError( XML_ERROR_FILE_READ_ERROR, 0, 0 ); - return _errorID; - } - - _charBuffer[size] = 0; - - const char* p = _charBuffer; - p = XMLUtil::SkipWhiteSpace( p ); - p = XMLUtil::ReadBOM( p, &_writeBOM ); - if ( !p || !*p ) { - SetError( XML_ERROR_EMPTY_DOCUMENT, 0, 0 ); - return _errorID; - } - - ParseDeep( _charBuffer + (p-_charBuffer), 0 ); - return _errorID; -} - - -XMLError XMLDocument::SaveFile( const char* filename, bool compact ) -{ - FILE* fp = 0; -#if defined(_MSC_VER) && (_MSC_VER >= 1400 ) - errno_t err = fopen_s(&fp, filename, "w" ); - if ( !fp || err) { -#else - fp = fopen( filename, "w" ); - if ( !fp) { -#endif - SetError( XML_ERROR_FILE_COULD_NOT_BE_OPENED, filename, 0 ); - return _errorID; - } - SaveFile(fp, compact); - fclose( fp ); - return _errorID; -} - - -XMLError XMLDocument::SaveFile( FILE* fp, bool compact ) -{ - XMLPrinter stream( fp, compact ); - Print( &stream ); - return _errorID; -} - - -XMLError XMLDocument::Parse( const char* p, size_t len ) -{ - Clear(); - - if ( !p || !*p ) { - SetError( XML_ERROR_EMPTY_DOCUMENT, 0, 0 ); - return _errorID; - } - if ( len == (size_t)(-1) ) { - len = strlen( p ); - } - _charBuffer = new char[ len+1 ]; - memcpy( _charBuffer, p, len ); - _charBuffer[len] = 0; - - p = XMLUtil::SkipWhiteSpace( p ); - p = XMLUtil::ReadBOM( p, &_writeBOM ); - if ( !p || !*p ) { - SetError( XML_ERROR_EMPTY_DOCUMENT, 0, 0 ); - return _errorID; - } - - ParseDeep( _charBuffer, 0 ); - return _errorID; -} - - -void XMLDocument::Print( XMLPrinter* streamer ) -{ - XMLPrinter stdStreamer( stdout ); - if ( !streamer ) { - streamer = &stdStreamer; - } - Accept( streamer ); -} - - -void XMLDocument::SetError( XMLError error, const char* str1, const char* str2 ) -{ - _errorID = error; - _errorStr1 = str1; - _errorStr2 = str2; -} - - -void XMLDocument::PrintError() const -{ - if ( _errorID ) { - static const int LEN = 20; - char buf1[LEN] = { 0 }; - char buf2[LEN] = { 0 }; - - if ( _errorStr1 ) { - TIXML_SNPRINTF( buf1, LEN, "%s", _errorStr1 ); - } - if ( _errorStr2 ) { - TIXML_SNPRINTF( buf2, LEN, "%s", _errorStr2 ); - } - - printf( "XMLDocument error id=%d str1=%s str2=%s\n", - _errorID, buf1, buf2 ); - } -} - - -XMLPrinter::XMLPrinter( FILE* file, bool compact ) : - _elementJustOpened( false ), - _firstElement( true ), - _fp( file ), - _depth( 0 ), - _textDepth( -1 ), - _processEntities( true ), - _compactMode( compact ) -{ - for( int i=0; i'] = true; // not required, but consistency is nice - _buffer.Push( 0 ); -} - - -void XMLPrinter::Print( const char* format, ... ) -{ - va_list va; - va_start( va, format ); - - if ( _fp ) { - vfprintf( _fp, format, va ); - } - else { - // This seems brutally complex. Haven't figured out a better - // way on windows. -#ifdef _MSC_VER - int len = -1; - int expand = 1000; - while ( len < 0 ) { - len = vsnprintf_s( _accumulator.Mem(), _accumulator.Capacity(), _TRUNCATE, format, va ); - if ( len < 0 ) { - expand *= 3/2; - _accumulator.PushArr( expand ); - } - } - char* p = _buffer.PushArr( len ) - 1; - memcpy( p, _accumulator.Mem(), len+1 ); -#else - int len = vsnprintf( 0, 0, format, va ); - // Close out and re-start the va-args - va_end( va ); - va_start( va, format ); - char* p = _buffer.PushArr( len ) - 1; - vsnprintf( p, len+1, format, va ); -#endif - } - va_end( va ); -} - - -void XMLPrinter::PrintSpace( int depth ) -{ - for( int i=0; i 0 && *q < ENTITY_RANGE ) { - // Check for entities. If one is found, flush - // the stream up until the entity, write the - // entity, and keep looking. - if ( flag[(unsigned)(*q)] ) { - while ( p < q ) { - Print( "%c", *p ); - ++p; - } - for( int i=0; i 0) ) { - Print( "%s", p ); - } -} - - -void XMLPrinter::PushHeader( bool writeBOM, bool writeDec ) -{ - static const unsigned char bom[] = { TIXML_UTF_LEAD_0, TIXML_UTF_LEAD_1, TIXML_UTF_LEAD_2, 0 }; - if ( writeBOM ) { - Print( "%s", bom ); - } - if ( writeDec ) { - PushDeclaration( "xml version=\"1.0\"" ); - } -} - - -void XMLPrinter::OpenElement( const char* name ) -{ - if ( _elementJustOpened ) { - SealElement(); - } - _stack.Push( name ); - - if ( _textDepth < 0 && !_firstElement && !_compactMode ) { - Print( "\n" ); - PrintSpace( _depth ); - } - - Print( "<%s", name ); - _elementJustOpened = true; - _firstElement = false; - ++_depth; -} - - -void XMLPrinter::PushAttribute( const char* name, const char* value ) -{ - TIXMLASSERT( _elementJustOpened ); - Print( " %s=\"", name ); - PrintString( value, false ); - Print( "\"" ); -} - - -void XMLPrinter::PushAttribute( const char* name, int v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - PushAttribute( name, buf ); -} - - -void XMLPrinter::PushAttribute( const char* name, unsigned v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - PushAttribute( name, buf ); -} - - -void XMLPrinter::PushAttribute( const char* name, bool v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - PushAttribute( name, buf ); -} - - -void XMLPrinter::PushAttribute( const char* name, double v ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( v, buf, BUF_SIZE ); - PushAttribute( name, buf ); -} - - -void XMLPrinter::CloseElement() -{ - --_depth; - const char* name = _stack.Pop(); - - if ( _elementJustOpened ) { - Print( "/>" ); - } - else { - if ( _textDepth < 0 && !_compactMode) { - Print( "\n" ); - PrintSpace( _depth ); - } - Print( "", name ); - } - - if ( _textDepth == _depth ) { - _textDepth = -1; - } - if ( _depth == 0 && !_compactMode) { - Print( "\n" ); - } - _elementJustOpened = false; -} - - -void XMLPrinter::SealElement() -{ - _elementJustOpened = false; - Print( ">" ); -} - - -void XMLPrinter::PushText( const char* text, bool cdata ) -{ - _textDepth = _depth-1; - - if ( _elementJustOpened ) { - SealElement(); - } - if ( cdata ) { - Print( "" ); - } - else { - PrintString( text, true ); - } -} - -void XMLPrinter::PushText( int value ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( value, buf, BUF_SIZE ); - PushText( buf, false ); -} - - -void XMLPrinter::PushText( unsigned value ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( value, buf, BUF_SIZE ); - PushText( buf, false ); -} - - -void XMLPrinter::PushText( bool value ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( value, buf, BUF_SIZE ); - PushText( buf, false ); -} - - -void XMLPrinter::PushText( float value ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( value, buf, BUF_SIZE ); - PushText( buf, false ); -} - - -void XMLPrinter::PushText( double value ) -{ - char buf[BUF_SIZE]; - XMLUtil::ToStr( value, buf, BUF_SIZE ); - PushText( buf, false ); -} - - -void XMLPrinter::PushComment( const char* comment ) -{ - if ( _elementJustOpened ) { - SealElement(); - } - if ( _textDepth < 0 && !_firstElement && !_compactMode) { - Print( "\n" ); - PrintSpace( _depth ); - } - _firstElement = false; - Print( "", comment ); -} - - -void XMLPrinter::PushDeclaration( const char* value ) -{ - if ( _elementJustOpened ) { - SealElement(); - } - if ( _textDepth < 0 && !_firstElement && !_compactMode) { - Print( "\n" ); - PrintSpace( _depth ); - } - _firstElement = false; - Print( "", value ); -} - - -void XMLPrinter::PushUnknown( const char* value ) -{ - if ( _elementJustOpened ) { - SealElement(); - } - if ( _textDepth < 0 && !_firstElement && !_compactMode) { - Print( "\n" ); - PrintSpace( _depth ); - } - _firstElement = false; - Print( "", value ); -} - - -bool XMLPrinter::VisitEnter( const XMLDocument& doc ) -{ - _processEntities = doc.ProcessEntities(); - if ( doc.HasBOM() ) { - PushHeader( true, false ); - } - return true; -} - - -bool XMLPrinter::VisitEnter( const XMLElement& element, const XMLAttribute* attribute ) -{ - OpenElement( element.Name() ); - while ( attribute ) { - PushAttribute( attribute->Name(), attribute->Value() ); - attribute = attribute->Next(); - } - return true; -} - - -bool XMLPrinter::VisitExit( const XMLElement& ) -{ - CloseElement(); - return true; -} - - -bool XMLPrinter::Visit( const XMLText& text ) -{ - PushText( text.Value(), text.CData() ); - return true; -} - - -bool XMLPrinter::Visit( const XMLComment& comment ) -{ - PushComment( comment.Value() ); - return true; -} - -bool XMLPrinter::Visit( const XMLDeclaration& declaration ) -{ - PushDeclaration( declaration.Value() ); - return true; -} - - -bool XMLPrinter::Visit( const XMLUnknown& unknown ) -{ - PushUnknown( unknown.Value() ); - return true; -} - -} // namespace tinyxml2 - diff --git a/BasiliskII/src/Unix/tinyxml2.h b/BasiliskII/src/Unix/tinyxml2.h deleted file mode 100755 index 11fceb237..000000000 --- a/BasiliskII/src/Unix/tinyxml2.h +++ /dev/null @@ -1,1968 +0,0 @@ -/* -Original code by Lee Thomason (www.grinninglizard.com) - -This software is provided 'as-is', without any express or implied -warranty. In no event will the authors be held liable for any -damages arising from the use of this software. - -Permission is granted to anyone to use this software for any -purpose, including commercial applications, and to alter it and -redistribute it freely, subject to the following restrictions: - -1. The origin of this software must not be misrepresented; you must -not claim that you wrote the original software. If you use this -software in a product, an acknowledgment in the product documentation -would be appreciated but is not required. - -2. Altered source versions must be plainly marked as such, and -must not be misrepresented as being the original software. - -3. This notice may not be removed or altered from any source -distribution. -*/ - -#ifndef TINYXML2_INCLUDED -#define TINYXML2_INCLUDED - -#if defined(ANDROID_NDK) || defined(__BORLANDC__) -# include -# include -# include -# include -# include -# include -#else -# include -# include -# include -# include -# include -# include -#endif - -/* - TODO: intern strings instead of allocation. -*/ -/* - gcc: - g++ -Wall -DDEBUG tinyxml2.cpp xmltest.cpp -o gccxmltest.exe - - Formatting, Artistic Style: - AStyle.exe --style=1tbs --indent-switches --break-closing-brackets --indent-preprocessor tinyxml2.cpp tinyxml2.h -*/ - -#if defined( _DEBUG ) || defined( DEBUG ) || defined (__DEBUG__) -# ifndef DEBUG -# define DEBUG -# endif -#endif - - -#if defined(DEBUG) -# if defined(_MSC_VER) -# define TIXMLASSERT( x ) if ( !(x)) { __debugbreak(); } //if ( !(x)) WinDebugBreak() -# elif defined (ANDROID_NDK) -# include -# define TIXMLASSERT( x ) if ( !(x)) { __android_log_assert( "assert", "grinliz", "ASSERT in '%s' at %d.", __FILE__, __LINE__ ); } -# else -# include -# define TIXMLASSERT assert -# endif -# else -# define TIXMLASSERT( x ) {} -#endif - - -#if defined(_MSC_VER) && (_MSC_VER >= 1400 ) -// Microsoft visual studio, version 2005 and higher. -/*int _snprintf_s( - char *buffer, - size_t sizeOfBuffer, - size_t count, - const char *format [, - argument] ... -);*/ -inline int TIXML_SNPRINTF( char* buffer, size_t size, const char* format, ... ) -{ - va_list va; - va_start( va, format ); - int result = vsnprintf_s( buffer, size, _TRUNCATE, format, va ); - va_end( va ); - return result; -} -#define TIXML_SSCANF sscanf_s -#else -// GCC version 3 and higher -//#warning( "Using sn* functions." ) -#define TIXML_SNPRINTF snprintf -#define TIXML_SSCANF sscanf -#endif - -static const int TIXML2_MAJOR_VERSION = 1; -static const int TIXML2_MINOR_VERSION = 0; -static const int TIXML2_PATCH_VERSION = 11; - -namespace tinyxml2 -{ -class XMLDocument; -class XMLElement; -class XMLAttribute; -class XMLComment; -class XMLNode; -class XMLText; -class XMLDeclaration; -class XMLUnknown; - -class XMLPrinter; - -/* - A class that wraps strings. Normally stores the start and end - pointers into the XML file itself, and will apply normalization - and entity translation if actually read. Can also store (and memory - manage) a traditional char[] -*/ -class StrPair -{ -public: - enum { - NEEDS_ENTITY_PROCESSING = 0x01, - NEEDS_NEWLINE_NORMALIZATION = 0x02, - COLLAPSE_WHITESPACE = 0x04, - - TEXT_ELEMENT = NEEDS_ENTITY_PROCESSING | NEEDS_NEWLINE_NORMALIZATION, - TEXT_ELEMENT_LEAVE_ENTITIES = NEEDS_NEWLINE_NORMALIZATION, - ATTRIBUTE_NAME = 0, - ATTRIBUTE_VALUE = NEEDS_ENTITY_PROCESSING | NEEDS_NEWLINE_NORMALIZATION, - ATTRIBUTE_VALUE_LEAVE_ENTITIES = NEEDS_NEWLINE_NORMALIZATION, - COMMENT = NEEDS_NEWLINE_NORMALIZATION - }; - - StrPair() : _flags( 0 ), _start( 0 ), _end( 0 ) {} - ~StrPair(); - - void Set( char* start, char* end, int flags ) { - Reset(); - _start = start; - _end = end; - _flags = flags | NEEDS_FLUSH; - } - - const char* GetStr(); - - bool Empty() const { - return _start == _end; - } - - void SetInternedStr( const char* str ) { - Reset(); - _start = const_cast(str); - } - - void SetStr( const char* str, int flags=0 ); - - char* ParseText( char* in, const char* endTag, int strFlags ); - char* ParseName( char* in ); - -private: - void Reset(); - void CollapseWhitespace(); - - enum { - NEEDS_FLUSH = 0x100, - NEEDS_DELETE = 0x200 - }; - - // After parsing, if *end != 0, it can be set to zero. - int _flags; - char* _start; - char* _end; -}; - - -/* - A dynamic array of Plain Old Data. Doesn't support constructors, etc. - Has a small initial memory pool, so that low or no usage will not - cause a call to new/delete -*/ -template -class DynArray -{ -public: - DynArray< T, INIT >() { - _mem = _pool; - _allocated = INIT; - _size = 0; - } - - ~DynArray() { - if ( _mem != _pool ) { - delete [] _mem; - } - } - - void Push( T t ) { - EnsureCapacity( _size+1 ); - _mem[_size++] = t; - } - - T* PushArr( int count ) { - EnsureCapacity( _size+count ); - T* ret = &_mem[_size]; - _size += count; - return ret; - } - - T Pop() { - return _mem[--_size]; - } - - void PopArr( int count ) { - TIXMLASSERT( _size >= count ); - _size -= count; - } - - bool Empty() const { - return _size == 0; - } - - T& operator[](int i) { - TIXMLASSERT( i>= 0 && i < _size ); - return _mem[i]; - } - - const T& operator[](int i) const { - TIXMLASSERT( i>= 0 && i < _size ); - return _mem[i]; - } - - int Size() const { - return _size; - } - - int Capacity() const { - return _allocated; - } - - const T* Mem() const { - return _mem; - } - - T* Mem() { - return _mem; - } - -private: - void EnsureCapacity( int cap ) { - if ( cap > _allocated ) { - int newAllocated = cap * 2; - T* newMem = new T[newAllocated]; - memcpy( newMem, _mem, sizeof(T)*_size ); // warning: not using constructors, only works for PODs - if ( _mem != _pool ) { - delete [] _mem; - } - _mem = newMem; - _allocated = newAllocated; - } - } - - T* _mem; - T _pool[INIT]; - int _allocated; // objects allocated - int _size; // number objects in use -}; - - -/* - Parent virtual class of a pool for fast allocation - and deallocation of objects. -*/ -class MemPool -{ -public: - MemPool() {} - virtual ~MemPool() {} - - virtual int ItemSize() const = 0; - virtual void* Alloc() = 0; - virtual void Free( void* ) = 0; - virtual void SetTracked() = 0; -}; - - -/* - Template child class to create pools of the correct type. -*/ -template< int SIZE > -class MemPoolT : public MemPool -{ -public: - MemPoolT() : _root(0), _currentAllocs(0), _nAllocs(0), _maxAllocs(0), _nUntracked(0) {} - ~MemPoolT() { - // Delete the blocks. - for( int i=0; i<_blockPtrs.Size(); ++i ) { - delete _blockPtrs[i]; - } - } - - virtual int ItemSize() const { - return SIZE; - } - int CurrentAllocs() const { - return _currentAllocs; - } - - virtual void* Alloc() { - if ( !_root ) { - // Need a new block. - Block* block = new Block(); - _blockPtrs.Push( block ); - - for( int i=0; ichunk[i].next = &block->chunk[i+1]; - } - block->chunk[COUNT-1].next = 0; - _root = block->chunk; - } - void* result = _root; - _root = _root->next; - - ++_currentAllocs; - if ( _currentAllocs > _maxAllocs ) { - _maxAllocs = _currentAllocs; - } - _nAllocs++; - _nUntracked++; - return result; - } - virtual void Free( void* mem ) { - if ( !mem ) { - return; - } - --_currentAllocs; - Chunk* chunk = (Chunk*)mem; -#ifdef DEBUG - memset( chunk, 0xfe, sizeof(Chunk) ); -#endif - chunk->next = _root; - _root = chunk; - } - void Trace( const char* name ) { - printf( "Mempool %s watermark=%d [%dk] current=%d size=%d nAlloc=%d blocks=%d\n", - name, _maxAllocs, _maxAllocs*SIZE/1024, _currentAllocs, SIZE, _nAllocs, _blockPtrs.Size() ); - } - - void SetTracked() { - _nUntracked--; - } - - int Untracked() const { - return _nUntracked; - } - - // This number is perf sensitive. 4k seems like a good tradeoff on my machine. - // The test file is large, 170k. - // Release: VS2010 gcc(no opt) - // 1k: 4000 - // 2k: 4000 - // 4k: 3900 21000 - // 16k: 5200 - // 32k: 4300 - // 64k: 4000 21000 - enum { COUNT = (4*1024)/SIZE }; // Some compilers do not accept to use COUNT in private part if COUNT is private - -private: - union Chunk { - Chunk* next; - char mem[SIZE]; - }; - struct Block { - Chunk chunk[COUNT]; - }; - DynArray< Block*, 10 > _blockPtrs; - Chunk* _root; - - int _currentAllocs; - int _nAllocs; - int _maxAllocs; - int _nUntracked; -}; - - - -/** - Implements the interface to the "Visitor pattern" (see the Accept() method.) - If you call the Accept() method, it requires being passed a XMLVisitor - class to handle callbacks. For nodes that contain other nodes (Document, Element) - you will get called with a VisitEnter/VisitExit pair. Nodes that are always leafs - are simply called with Visit(). - - If you return 'true' from a Visit method, recursive parsing will continue. If you return - false, no children of this node or its sibilings will be visited. - - All flavors of Visit methods have a default implementation that returns 'true' (continue - visiting). You need to only override methods that are interesting to you. - - Generally Accept() is called on the TiXmlDocument, although all nodes support visiting. - - You should never change the document from a callback. - - @sa XMLNode::Accept() -*/ -class XMLVisitor -{ -public: - virtual ~XMLVisitor() {} - - /// Visit a document. - virtual bool VisitEnter( const XMLDocument& /*doc*/ ) { - return true; - } - /// Visit a document. - virtual bool VisitExit( const XMLDocument& /*doc*/ ) { - return true; - } - - /// Visit an element. - virtual bool VisitEnter( const XMLElement& /*element*/, const XMLAttribute* /*firstAttribute*/ ) { - return true; - } - /// Visit an element. - virtual bool VisitExit( const XMLElement& /*element*/ ) { - return true; - } - - /// Visit a declaration. - virtual bool Visit( const XMLDeclaration& /*declaration*/ ) { - return true; - } - /// Visit a text node. - virtual bool Visit( const XMLText& /*text*/ ) { - return true; - } - /// Visit a comment node. - virtual bool Visit( const XMLComment& /*comment*/ ) { - return true; - } - /// Visit an unknown node. - virtual bool Visit( const XMLUnknown& /*unknown*/ ) { - return true; - } -}; - - -/* - Utility functionality. -*/ -class XMLUtil -{ -public: - // Anything in the high order range of UTF-8 is assumed to not be whitespace. This isn't - // correct, but simple, and usually works. - static const char* SkipWhiteSpace( const char* p ) { - while( !IsUTF8Continuation(*p) && isspace( *reinterpret_cast(p) ) ) { - ++p; - } - return p; - } - static char* SkipWhiteSpace( char* p ) { - while( !IsUTF8Continuation(*p) && isspace( *reinterpret_cast(p) ) ) { - ++p; - } - return p; - } - static bool IsWhiteSpace( char p ) { - return !IsUTF8Continuation(p) && isspace( static_cast(p) ); - } - - inline static bool IsNameStartChar( unsigned char ch ) { - return ( ( ch < 128 ) ? isalpha( ch ) : 1 ) - || ch == ':' - || ch == '_'; - } - - inline static bool IsNameChar( unsigned char ch ) { - return IsNameStartChar( ch ) - || isdigit( ch ) - || ch == '.' - || ch == '-'; - } - - inline static bool StringEqual( const char* p, const char* q, int nChar=INT_MAX ) { - int n = 0; - if ( p == q ) { - return true; - } - while( *p && *q && *p == *q && n(const_cast(this)->FirstChildElement( value )); - } - - /// Get the last child node, or null if none exists. - const XMLNode* LastChild() const { - return _lastChild; - } - - XMLNode* LastChild() { - return const_cast(const_cast(this)->LastChild() ); - } - - /** Get the last child element or optionally the last child - element with the specified name. - */ - const XMLElement* LastChildElement( const char* value=0 ) const; - - XMLElement* LastChildElement( const char* value=0 ) { - return const_cast(const_cast(this)->LastChildElement(value) ); - } - - /// Get the previous (left) sibling node of this node. - const XMLNode* PreviousSibling() const { - return _prev; - } - - XMLNode* PreviousSibling() { - return _prev; - } - - /// Get the previous (left) sibling element of this node, with an opitionally supplied name. - const XMLElement* PreviousSiblingElement( const char* value=0 ) const ; - - XMLElement* PreviousSiblingElement( const char* value=0 ) { - return const_cast(const_cast(this)->PreviousSiblingElement( value ) ); - } - - /// Get the next (right) sibling node of this node. - const XMLNode* NextSibling() const { - return _next; - } - - XMLNode* NextSibling() { - return _next; - } - - /// Get the next (right) sibling element of this node, with an opitionally supplied name. - const XMLElement* NextSiblingElement( const char* value=0 ) const; - - XMLElement* NextSiblingElement( const char* value=0 ) { - return const_cast(const_cast(this)->NextSiblingElement( value ) ); - } - - /** - Add a child node as the last (right) child. - */ - XMLNode* InsertEndChild( XMLNode* addThis ); - - XMLNode* LinkEndChild( XMLNode* addThis ) { - return InsertEndChild( addThis ); - } - /** - Add a child node as the first (left) child. - */ - XMLNode* InsertFirstChild( XMLNode* addThis ); - /** - Add a node after the specified child node. - */ - XMLNode* InsertAfterChild( XMLNode* afterThis, XMLNode* addThis ); - - /** - Delete all the children of this node. - */ - void DeleteChildren(); - - /** - Delete a child of this node. - */ - void DeleteChild( XMLNode* node ); - - /** - Make a copy of this node, but not its children. - You may pass in a Document pointer that will be - the owner of the new Node. If the 'document' is - null, then the node returned will be allocated - from the current Document. (this->GetDocument()) - - Note: if called on a XMLDocument, this will return null. - */ - virtual XMLNode* ShallowClone( XMLDocument* document ) const = 0; - - /** - Test if 2 nodes are the same, but don't test children. - The 2 nodes do not need to be in the same Document. - - Note: if called on a XMLDocument, this will return false. - */ - virtual bool ShallowEqual( const XMLNode* compare ) const = 0; - - /** Accept a hierarchical visit of the nodes in the TinyXML DOM. Every node in the - XML tree will be conditionally visited and the host will be called back - via the TiXmlVisitor interface. - - This is essentially a SAX interface for TinyXML. (Note however it doesn't re-parse - the XML for the callbacks, so the performance of TinyXML is unchanged by using this - interface versus any other.) - - The interface has been based on ideas from: - - - http://www.saxproject.org/ - - http://c2.com/cgi/wiki?HierarchicalVisitorPattern - - Which are both good references for "visiting". - - An example of using Accept(): - @verbatim - TiXmlPrinter printer; - tinyxmlDoc.Accept( &printer ); - const char* xmlcstr = printer.CStr(); - @endverbatim - */ - virtual bool Accept( XMLVisitor* visitor ) const = 0; - - // internal - virtual char* ParseDeep( char*, StrPair* ); - -protected: - XMLNode( XMLDocument* ); - virtual ~XMLNode(); - XMLNode( const XMLNode& ); // not supported - XMLNode& operator=( const XMLNode& ); // not supported - - XMLDocument* _document; - XMLNode* _parent; - mutable StrPair _value; - - XMLNode* _firstChild; - XMLNode* _lastChild; - - XMLNode* _prev; - XMLNode* _next; - -private: - MemPool* _memPool; - void Unlink( XMLNode* child ); -}; - - -/** XML text. - - Note that a text node can have child element nodes, for example: - @verbatim - This is bold - @endverbatim - - A text node can have 2 ways to output the next. "normal" output - and CDATA. It will default to the mode it was parsed from the XML file and - you generally want to leave it alone, but you can change the output mode with - SetCDATA() and query it with CDATA(). -*/ -class XMLText : public XMLNode -{ - friend class XMLBase; - friend class XMLDocument; -public: - virtual bool Accept( XMLVisitor* visitor ) const; - - virtual XMLText* ToText() { - return this; - } - virtual const XMLText* ToText() const { - return this; - } - - /// Declare whether this should be CDATA or standard text. - void SetCData( bool isCData ) { - _isCData = isCData; - } - /// Returns true if this is a CDATA text element. - bool CData() const { - return _isCData; - } - - char* ParseDeep( char*, StrPair* endTag ); - virtual XMLNode* ShallowClone( XMLDocument* document ) const; - virtual bool ShallowEqual( const XMLNode* compare ) const; - -protected: - XMLText( XMLDocument* doc ) : XMLNode( doc ), _isCData( false ) {} - virtual ~XMLText() {} - XMLText( const XMLText& ); // not supported - XMLText& operator=( const XMLText& ); // not supported - -private: - bool _isCData; -}; - - -/** An XML Comment. */ -class XMLComment : public XMLNode -{ - friend class XMLDocument; -public: - virtual XMLComment* ToComment() { - return this; - } - virtual const XMLComment* ToComment() const { - return this; - } - - virtual bool Accept( XMLVisitor* visitor ) const; - - char* ParseDeep( char*, StrPair* endTag ); - virtual XMLNode* ShallowClone( XMLDocument* document ) const; - virtual bool ShallowEqual( const XMLNode* compare ) const; - -protected: - XMLComment( XMLDocument* doc ); - virtual ~XMLComment(); - XMLComment( const XMLComment& ); // not supported - XMLComment& operator=( const XMLComment& ); // not supported - -private: -}; - - -/** In correct XML the declaration is the first entry in the file. - @verbatim - - @endverbatim - - TinyXML2 will happily read or write files without a declaration, - however. - - The text of the declaration isn't interpreted. It is parsed - and written as a string. -*/ -class XMLDeclaration : public XMLNode -{ - friend class XMLDocument; -public: - virtual XMLDeclaration* ToDeclaration() { - return this; - } - virtual const XMLDeclaration* ToDeclaration() const { - return this; - } - - virtual bool Accept( XMLVisitor* visitor ) const; - - char* ParseDeep( char*, StrPair* endTag ); - virtual XMLNode* ShallowClone( XMLDocument* document ) const; - virtual bool ShallowEqual( const XMLNode* compare ) const; - -protected: - XMLDeclaration( XMLDocument* doc ); - virtual ~XMLDeclaration(); - XMLDeclaration( const XMLDeclaration& ); // not supported - XMLDeclaration& operator=( const XMLDeclaration& ); // not supported -}; - - -/** Any tag that tinyXml doesn't recognize is saved as an - unknown. It is a tag of text, but should not be modified. - It will be written back to the XML, unchanged, when the file - is saved. - - DTD tags get thrown into TiXmlUnknowns. -*/ -class XMLUnknown : public XMLNode -{ - friend class XMLDocument; -public: - virtual XMLUnknown* ToUnknown() { - return this; - } - virtual const XMLUnknown* ToUnknown() const { - return this; - } - - virtual bool Accept( XMLVisitor* visitor ) const; - - char* ParseDeep( char*, StrPair* endTag ); - virtual XMLNode* ShallowClone( XMLDocument* document ) const; - virtual bool ShallowEqual( const XMLNode* compare ) const; - -protected: - XMLUnknown( XMLDocument* doc ); - virtual ~XMLUnknown(); - XMLUnknown( const XMLUnknown& ); // not supported - XMLUnknown& operator=( const XMLUnknown& ); // not supported -}; - - -enum XMLError { - XML_NO_ERROR = 0, - XML_SUCCESS = 0, - - XML_NO_ATTRIBUTE, - XML_WRONG_ATTRIBUTE_TYPE, - - XML_ERROR_FILE_NOT_FOUND, - XML_ERROR_FILE_COULD_NOT_BE_OPENED, - XML_ERROR_FILE_READ_ERROR, - XML_ERROR_ELEMENT_MISMATCH, - XML_ERROR_PARSING_ELEMENT, - XML_ERROR_PARSING_ATTRIBUTE, - XML_ERROR_IDENTIFYING_TAG, - XML_ERROR_PARSING_TEXT, - XML_ERROR_PARSING_CDATA, - XML_ERROR_PARSING_COMMENT, - XML_ERROR_PARSING_DECLARATION, - XML_ERROR_PARSING_UNKNOWN, - XML_ERROR_EMPTY_DOCUMENT, - XML_ERROR_MISMATCHED_ELEMENT, - XML_ERROR_PARSING, - - XML_CAN_NOT_CONVERT_TEXT, - XML_NO_TEXT_NODE -}; - - -/** An attribute is a name-value pair. Elements have an arbitrary - number of attributes, each with a unique name. - - @note The attributes are not XMLNodes. You may only query the - Next() attribute in a list. -*/ -class XMLAttribute -{ - friend class XMLElement; -public: - /// The name of the attribute. - const char* Name() const { - return _name.GetStr(); - } - /// The value of the attribute. - const char* Value() const { - return _value.GetStr(); - } - /// The next attribute in the list. - const XMLAttribute* Next() const { - return _next; - } - - /** IntAttribute interprets the attribute as an integer, and returns the value. - If the value isn't an integer, 0 will be returned. There is no error checking; - use QueryIntAttribute() if you need error checking. - */ - int IntValue() const { - int i=0; - QueryIntValue( &i ); - return i; - } - /// Query as an unsigned integer. See IntAttribute() - unsigned UnsignedValue() const { - unsigned i=0; - QueryUnsignedValue( &i ); - return i; - } - /// Query as a boolean. See IntAttribute() - bool BoolValue() const { - bool b=false; - QueryBoolValue( &b ); - return b; - } - /// Query as a double. See IntAttribute() - double DoubleValue() const { - double d=0; - QueryDoubleValue( &d ); - return d; - } - /// Query as a float. See IntAttribute() - float FloatValue() const { - float f=0; - QueryFloatValue( &f ); - return f; - } - - /** QueryIntAttribute interprets the attribute as an integer, and returns the value - in the provided paremeter. The function will return XML_NO_ERROR on success, - and XML_WRONG_ATTRIBUTE_TYPE if the conversion is not successful. - */ - XMLError QueryIntValue( int* value ) const; - /// See QueryIntAttribute - XMLError QueryUnsignedValue( unsigned int* value ) const; - /// See QueryIntAttribute - XMLError QueryBoolValue( bool* value ) const; - /// See QueryIntAttribute - XMLError QueryDoubleValue( double* value ) const; - /// See QueryIntAttribute - XMLError QueryFloatValue( float* value ) const; - - /// Set the attribute to a string value. - void SetAttribute( const char* value ); - /// Set the attribute to value. - void SetAttribute( int value ); - /// Set the attribute to value. - void SetAttribute( unsigned value ); - /// Set the attribute to value. - void SetAttribute( bool value ); - /// Set the attribute to value. - void SetAttribute( double value ); - /// Set the attribute to value. - void SetAttribute( float value ); - -private: - enum { BUF_SIZE = 200 }; - - XMLAttribute() : _next( 0 ) {} - virtual ~XMLAttribute() {} - - XMLAttribute( const XMLAttribute& ); // not supported - void operator=( const XMLAttribute& ); // not supported - void SetName( const char* name ); - - char* ParseDeep( char* p, bool processEntities ); - - mutable StrPair _name; - mutable StrPair _value; - XMLAttribute* _next; - MemPool* _memPool; -}; - - -/** The element is a container class. It has a value, the element name, - and can contain other elements, text, comments, and unknowns. - Elements also contain an arbitrary number of attributes. -*/ -class XMLElement : public XMLNode -{ - friend class XMLBase; - friend class XMLDocument; -public: - /// Get the name of an element (which is the Value() of the node.) - const char* Name() const { - return Value(); - } - /// Set the name of the element. - void SetName( const char* str, bool staticMem=false ) { - SetValue( str, staticMem ); - } - - virtual XMLElement* ToElement() { - return this; - } - virtual const XMLElement* ToElement() const { - return this; - } - virtual bool Accept( XMLVisitor* visitor ) const; - - /** Given an attribute name, Attribute() returns the value - for the attribute of that name, or null if none - exists. For example: - - @verbatim - const char* value = ele->Attribute( "foo" ); - @endverbatim - - The 'value' parameter is normally null. However, if specified, - the attribute will only be returned if the 'name' and 'value' - match. This allow you to write code: - - @verbatim - if ( ele->Attribute( "foo", "bar" ) ) callFooIsBar(); - @endverbatim - - rather than: - @verbatim - if ( ele->Attribute( "foo" ) ) { - if ( strcmp( ele->Attribute( "foo" ), "bar" ) == 0 ) callFooIsBar(); - } - @endverbatim - */ - const char* Attribute( const char* name, const char* value=0 ) const; - - /** Given an attribute name, IntAttribute() returns the value - of the attribute interpreted as an integer. 0 will be - returned if there is an error. For a method with error - checking, see QueryIntAttribute() - */ - int IntAttribute( const char* name ) const { - int i=0; - QueryIntAttribute( name, &i ); - return i; - } - /// See IntAttribute() - unsigned UnsignedAttribute( const char* name ) const { - unsigned i=0; - QueryUnsignedAttribute( name, &i ); - return i; - } - /// See IntAttribute() - bool BoolAttribute( const char* name ) const { - bool b=false; - QueryBoolAttribute( name, &b ); - return b; - } - /// See IntAttribute() - double DoubleAttribute( const char* name ) const { - double d=0; - QueryDoubleAttribute( name, &d ); - return d; - } - /// See IntAttribute() - float FloatAttribute( const char* name ) const { - float f=0; - QueryFloatAttribute( name, &f ); - return f; - } - - /** Given an attribute name, QueryIntAttribute() returns - XML_NO_ERROR, XML_WRONG_ATTRIBUTE_TYPE if the conversion - can't be performed, or XML_NO_ATTRIBUTE if the attribute - doesn't exist. If successful, the result of the conversion - will be written to 'value'. If not successful, nothing will - be written to 'value'. This allows you to provide default - value: - - @verbatim - int value = 10; - QueryIntAttribute( "foo", &value ); // if "foo" isn't found, value will still be 10 - @endverbatim - */ - XMLError QueryIntAttribute( const char* name, int* value ) const { - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return XML_NO_ATTRIBUTE; - } - return a->QueryIntValue( value ); - } - /// See QueryIntAttribute() - XMLError QueryUnsignedAttribute( const char* name, unsigned int* value ) const { - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return XML_NO_ATTRIBUTE; - } - return a->QueryUnsignedValue( value ); - } - /// See QueryIntAttribute() - XMLError QueryBoolAttribute( const char* name, bool* value ) const { - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return XML_NO_ATTRIBUTE; - } - return a->QueryBoolValue( value ); - } - /// See QueryIntAttribute() - XMLError QueryDoubleAttribute( const char* name, double* value ) const { - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return XML_NO_ATTRIBUTE; - } - return a->QueryDoubleValue( value ); - } - /// See QueryIntAttribute() - XMLError QueryFloatAttribute( const char* name, float* value ) const { - const XMLAttribute* a = FindAttribute( name ); - if ( !a ) { - return XML_NO_ATTRIBUTE; - } - return a->QueryFloatValue( value ); - } - - - /** Given an attribute name, QueryAttribute() returns - XML_NO_ERROR, XML_WRONG_ATTRIBUTE_TYPE if the conversion - can't be performed, or XML_NO_ATTRIBUTE if the attribute - doesn't exist. It is overloaded for the primitive types, - and is a generally more convenient replacement of - QueryIntAttribute() and related functions. - - If successful, the result of the conversion - will be written to 'value'. If not successful, nothing will - be written to 'value'. This allows you to provide default - value: - - @verbatim - int value = 10; - QueryAttribute( "foo", &value ); // if "foo" isn't found, value will still be 10 - @endverbatim - */ - int QueryAttribute( const char* name, int* value ) const { - return QueryIntAttribute( name, value ); - } - - int QueryAttribute( const char* name, unsigned int* value ) const { - return QueryUnsignedAttribute( name, value ); - } - - int QueryAttribute( const char* name, bool* value ) const { - return QueryBoolAttribute( name, value ); - } - - int QueryAttribute( const char* name, double* value ) const { - return QueryDoubleAttribute( name, value ); - } - - int QueryAttribute( const char* name, float* value ) const { - return QueryFloatAttribute( name, value ); - } - - /// Sets the named attribute to value. - void SetAttribute( const char* name, const char* value ) { - XMLAttribute* a = FindOrCreateAttribute( name ); - a->SetAttribute( value ); - } - /// Sets the named attribute to value. - void SetAttribute( const char* name, int value ) { - XMLAttribute* a = FindOrCreateAttribute( name ); - a->SetAttribute( value ); - } - /// Sets the named attribute to value. - void SetAttribute( const char* name, unsigned value ) { - XMLAttribute* a = FindOrCreateAttribute( name ); - a->SetAttribute( value ); - } - /// Sets the named attribute to value. - void SetAttribute( const char* name, bool value ) { - XMLAttribute* a = FindOrCreateAttribute( name ); - a->SetAttribute( value ); - } - /// Sets the named attribute to value. - void SetAttribute( const char* name, double value ) { - XMLAttribute* a = FindOrCreateAttribute( name ); - a->SetAttribute( value ); - } - - /** - Delete an attribute. - */ - void DeleteAttribute( const char* name ); - - /// Return the first attribute in the list. - const XMLAttribute* FirstAttribute() const { - return _rootAttribute; - } - /// Query a specific attribute in the list. - const XMLAttribute* FindAttribute( const char* name ) const; - - /** Convenience function for easy access to the text inside an element. Although easy - and concise, GetText() is limited compared to getting the TiXmlText child - and accessing it directly. - - If the first child of 'this' is a TiXmlText, the GetText() - returns the character string of the Text node, else null is returned. - - This is a convenient method for getting the text of simple contained text: - @verbatim - This is text - const char* str = fooElement->GetText(); - @endverbatim - - 'str' will be a pointer to "This is text". - - Note that this function can be misleading. If the element foo was created from - this XML: - @verbatim - This is text - @endverbatim - - then the value of str would be null. The first child node isn't a text node, it is - another element. From this XML: - @verbatim - This is text - @endverbatim - GetText() will return "This is ". - */ - const char* GetText() const; - - /** - Convenience method to query the value of a child text node. This is probably best - shown by example. Given you have a document is this form: - @verbatim - - 1 - 1.4 - - @endverbatim - - The QueryIntText() and similar functions provide a safe and easier way to get to the - "value" of x and y. - - @verbatim - int x = 0; - float y = 0; // types of x and y are contrived for example - const XMLElement* xElement = pointElement->FirstChildElement( "x" ); - const XMLElement* yElement = pointElement->FirstChildElement( "y" ); - xElement->QueryIntText( &x ); - yElement->QueryFloatText( &y ); - @endverbatim - - @returns XML_SUCCESS (0) on success, XML_CAN_NOT_CONVERT_TEXT if the text cannot be converted - to the requested type, and XML_NO_TEXT_NODE if there is no child text to query. - - */ - XMLError QueryIntText( int* ival ) const; - /// See QueryIntText() - XMLError QueryUnsignedText( unsigned* uval ) const; - /// See QueryIntText() - XMLError QueryBoolText( bool* bval ) const; - /// See QueryIntText() - XMLError QueryDoubleText( double* dval ) const; - /// See QueryIntText() - XMLError QueryFloatText( float* fval ) const; - - // internal: - enum { - OPEN, // - CLOSED, // - CLOSING // - }; - int ClosingType() const { - return _closingType; - } - char* ParseDeep( char* p, StrPair* endTag ); - virtual XMLNode* ShallowClone( XMLDocument* document ) const; - virtual bool ShallowEqual( const XMLNode* compare ) const; - -private: - XMLElement( XMLDocument* doc ); - virtual ~XMLElement(); - XMLElement( const XMLElement& ); // not supported - void operator=( const XMLElement& ); // not supported - - XMLAttribute* FindAttribute( const char* name ); - XMLAttribute* FindOrCreateAttribute( const char* name ); - //void LinkAttribute( XMLAttribute* attrib ); - char* ParseAttributes( char* p ); - - int _closingType; - // The attribute list is ordered; there is no 'lastAttribute' - // because the list needs to be scanned for dupes before adding - // a new attribute. - XMLAttribute* _rootAttribute; -}; - - -enum Whitespace { - PRESERVE_WHITESPACE, - COLLAPSE_WHITESPACE -}; - - -/** A Document binds together all the functionality. - It can be saved, loaded, and printed to the screen. - All Nodes are connected and allocated to a Document. - If the Document is deleted, all its Nodes are also deleted. -*/ -class XMLDocument : public XMLNode -{ - friend class XMLElement; -public: - /// constructor - XMLDocument( bool processEntities = true, Whitespace = PRESERVE_WHITESPACE ); - ~XMLDocument(); - - virtual XMLDocument* ToDocument() { - return this; - } - virtual const XMLDocument* ToDocument() const { - return this; - } - - /** - Parse an XML file from a character string. - Returns XML_NO_ERROR (0) on success, or - an errorID. - - You may optionally pass in the 'nBytes', which is - the number of bytes which will be parsed. If not - specified, TinyXML will assume 'xml' points to a - null terminated string. - */ - XMLError Parse( const char* xml, size_t nBytes=(size_t)(-1) ); - - /** - Load an XML file from disk. - Returns XML_NO_ERROR (0) on success, or - an errorID. - */ - XMLError LoadFile( const char* filename ); - - /** - Load an XML file from disk. You are responsible - for providing and closing the FILE*. - - Returns XML_NO_ERROR (0) on success, or - an errorID. - */ - XMLError LoadFile( FILE* ); - - /** - Save the XML file to disk. - Returns XML_NO_ERROR (0) on success, or - an errorID. - */ - XMLError SaveFile( const char* filename, bool compact = false ); - - /** - Save the XML file to disk. You are responsible - for providing and closing the FILE*. - - Returns XML_NO_ERROR (0) on success, or - an errorID. - */ - XMLError SaveFile( FILE* fp, bool compact = false ); - - bool ProcessEntities() const { - return _processEntities; - } - Whitespace WhitespaceMode() const { - return _whitespace; - } - - /** - Returns true if this document has a leading Byte Order Mark of UTF8. - */ - bool HasBOM() const { - return _writeBOM; - } - /** Sets whether to write the BOM when writing the file. - */ - void SetBOM( bool useBOM ) { - _writeBOM = useBOM; - } - - /** Return the root element of DOM. Equivalent to FirstChildElement(). - To get the first node, use FirstChild(). - */ - XMLElement* RootElement() { - return FirstChildElement(); - } - const XMLElement* RootElement() const { - return FirstChildElement(); - } - - /** Print the Document. If the Printer is not provided, it will - print to stdout. If you provide Printer, this can print to a file: - @verbatim - XMLPrinter printer( fp ); - doc.Print( &printer ); - @endverbatim - - Or you can use a printer to print to memory: - @verbatim - XMLPrinter printer; - doc->Print( &printer ); - // printer.CStr() has a const char* to the XML - @endverbatim - */ - void Print( XMLPrinter* streamer=0 ); - virtual bool Accept( XMLVisitor* visitor ) const; - - /** - Create a new Element associated with - this Document. The memory for the Element - is managed by the Document. - */ - XMLElement* NewElement( const char* name ); - /** - Create a new Comment associated with - this Document. The memory for the Comment - is managed by the Document. - */ - XMLComment* NewComment( const char* comment ); - /** - Create a new Text associated with - this Document. The memory for the Text - is managed by the Document. - */ - XMLText* NewText( const char* text ); - /** - Create a new Declaration associated with - this Document. The memory for the object - is managed by the Document. - - If the 'text' param is null, the standard - declaration is used.: - @verbatim - - @endverbatim - */ - XMLDeclaration* NewDeclaration( const char* text=0 ); - /** - Create a new Unknown associated with - this Document. The memory forthe object - is managed by the Document. - */ - XMLUnknown* NewUnknown( const char* text ); - - /** - Delete a node associated with this document. - It will be unlinked from the DOM. - */ - void DeleteNode( XMLNode* node ) { - node->_parent->DeleteChild( node ); - } - - void SetError( XMLError error, const char* str1, const char* str2 ); - - /// Return true if there was an error parsing the document. - bool Error() const { - return _errorID != XML_NO_ERROR; - } - /// Return the errorID. - XMLError ErrorID() const { - return _errorID; - } - /// Return a possibly helpful diagnostic location or string. - const char* GetErrorStr1() const { - return _errorStr1; - } - /// Return a possibly helpful secondary diagnostic location or string. - const char* GetErrorStr2() const { - return _errorStr2; - } - /// If there is an error, print it to stdout. - void PrintError() const; - - /// Clear the document, resetting it to the initial state. - void Clear(); - - // internal - char* Identify( char* p, XMLNode** node ); - - virtual XMLNode* ShallowClone( XMLDocument* /*document*/ ) const { - return 0; - } - virtual bool ShallowEqual( const XMLNode* /*compare*/ ) const { - return false; - } - -private: - XMLDocument( const XMLDocument& ); // not supported - void operator=( const XMLDocument& ); // not supported - - bool _writeBOM; - bool _processEntities; - XMLError _errorID; - Whitespace _whitespace; - const char* _errorStr1; - const char* _errorStr2; - char* _charBuffer; - - MemPoolT< sizeof(XMLElement) > _elementPool; - MemPoolT< sizeof(XMLAttribute) > _attributePool; - MemPoolT< sizeof(XMLText) > _textPool; - MemPoolT< sizeof(XMLComment) > _commentPool; -}; - - -/** - A XMLHandle is a class that wraps a node pointer with null checks; this is - an incredibly useful thing. Note that XMLHandle is not part of the TinyXML - DOM structure. It is a separate utility class. - - Take an example: - @verbatim - - - - - - - @endverbatim - - Assuming you want the value of "attributeB" in the 2nd "Child" element, it's very - easy to write a *lot* of code that looks like: - - @verbatim - XMLElement* root = document.FirstChildElement( "Document" ); - if ( root ) - { - XMLElement* element = root->FirstChildElement( "Element" ); - if ( element ) - { - XMLElement* child = element->FirstChildElement( "Child" ); - if ( child ) - { - XMLElement* child2 = child->NextSiblingElement( "Child" ); - if ( child2 ) - { - // Finally do something useful. - @endverbatim - - And that doesn't even cover "else" cases. XMLHandle addresses the verbosity - of such code. A XMLHandle checks for null pointers so it is perfectly safe - and correct to use: - - @verbatim - XMLHandle docHandle( &document ); - XMLElement* child2 = docHandle.FirstChild( "Document" ).FirstChild( "Element" ).FirstChild().NextSibling().ToElement(); - if ( child2 ) - { - // do something useful - @endverbatim - - Which is MUCH more concise and useful. - - It is also safe to copy handles - internally they are nothing more than node pointers. - @verbatim - XMLHandle handleCopy = handle; - @endverbatim - - See also XMLConstHandle, which is the same as XMLHandle, but operates on const objects. -*/ -class XMLHandle -{ -public: - /// Create a handle from any node (at any depth of the tree.) This can be a null pointer. - XMLHandle( XMLNode* node ) { - _node = node; - } - /// Create a handle from a node. - XMLHandle( XMLNode& node ) { - _node = &node; - } - /// Copy constructor - XMLHandle( const XMLHandle& ref ) { - _node = ref._node; - } - /// Assignment - XMLHandle& operator=( const XMLHandle& ref ) { - _node = ref._node; - return *this; - } - - /// Get the first child of this handle. - XMLHandle FirstChild() { - return XMLHandle( _node ? _node->FirstChild() : 0 ); - } - /// Get the first child element of this handle. - XMLHandle FirstChildElement( const char* value=0 ) { - return XMLHandle( _node ? _node->FirstChildElement( value ) : 0 ); - } - /// Get the last child of this handle. - XMLHandle LastChild() { - return XMLHandle( _node ? _node->LastChild() : 0 ); - } - /// Get the last child element of this handle. - XMLHandle LastChildElement( const char* _value=0 ) { - return XMLHandle( _node ? _node->LastChildElement( _value ) : 0 ); - } - /// Get the previous sibling of this handle. - XMLHandle PreviousSibling() { - return XMLHandle( _node ? _node->PreviousSibling() : 0 ); - } - /// Get the previous sibling element of this handle. - XMLHandle PreviousSiblingElement( const char* _value=0 ) { - return XMLHandle( _node ? _node->PreviousSiblingElement( _value ) : 0 ); - } - /// Get the next sibling of this handle. - XMLHandle NextSibling() { - return XMLHandle( _node ? _node->NextSibling() : 0 ); - } - /// Get the next sibling element of this handle. - XMLHandle NextSiblingElement( const char* _value=0 ) { - return XMLHandle( _node ? _node->NextSiblingElement( _value ) : 0 ); - } - - /// Safe cast to XMLNode. This can return null. - XMLNode* ToNode() { - return _node; - } - /// Safe cast to XMLElement. This can return null. - XMLElement* ToElement() { - return ( ( _node && _node->ToElement() ) ? _node->ToElement() : 0 ); - } - /// Safe cast to XMLText. This can return null. - XMLText* ToText() { - return ( ( _node && _node->ToText() ) ? _node->ToText() : 0 ); - } - /// Safe cast to XMLUnknown. This can return null. - XMLUnknown* ToUnknown() { - return ( ( _node && _node->ToUnknown() ) ? _node->ToUnknown() : 0 ); - } - /// Safe cast to XMLDeclaration. This can return null. - XMLDeclaration* ToDeclaration() { - return ( ( _node && _node->ToDeclaration() ) ? _node->ToDeclaration() : 0 ); - } - -private: - XMLNode* _node; -}; - - -/** - A variant of the XMLHandle class for working with const XMLNodes and Documents. It is the - same in all regards, except for the 'const' qualifiers. See XMLHandle for API. -*/ -class XMLConstHandle -{ -public: - XMLConstHandle( const XMLNode* node ) { - _node = node; - } - XMLConstHandle( const XMLNode& node ) { - _node = &node; - } - XMLConstHandle( const XMLConstHandle& ref ) { - _node = ref._node; - } - - XMLConstHandle& operator=( const XMLConstHandle& ref ) { - _node = ref._node; - return *this; - } - - const XMLConstHandle FirstChild() const { - return XMLConstHandle( _node ? _node->FirstChild() : 0 ); - } - const XMLConstHandle FirstChildElement( const char* value=0 ) const { - return XMLConstHandle( _node ? _node->FirstChildElement( value ) : 0 ); - } - const XMLConstHandle LastChild() const { - return XMLConstHandle( _node ? _node->LastChild() : 0 ); - } - const XMLConstHandle LastChildElement( const char* _value=0 ) const { - return XMLConstHandle( _node ? _node->LastChildElement( _value ) : 0 ); - } - const XMLConstHandle PreviousSibling() const { - return XMLConstHandle( _node ? _node->PreviousSibling() : 0 ); - } - const XMLConstHandle PreviousSiblingElement( const char* _value=0 ) const { - return XMLConstHandle( _node ? _node->PreviousSiblingElement( _value ) : 0 ); - } - const XMLConstHandle NextSibling() const { - return XMLConstHandle( _node ? _node->NextSibling() : 0 ); - } - const XMLConstHandle NextSiblingElement( const char* _value=0 ) const { - return XMLConstHandle( _node ? _node->NextSiblingElement( _value ) : 0 ); - } - - - const XMLNode* ToNode() const { - return _node; - } - const XMLElement* ToElement() const { - return ( ( _node && _node->ToElement() ) ? _node->ToElement() : 0 ); - } - const XMLText* ToText() const { - return ( ( _node && _node->ToText() ) ? _node->ToText() : 0 ); - } - const XMLUnknown* ToUnknown() const { - return ( ( _node && _node->ToUnknown() ) ? _node->ToUnknown() : 0 ); - } - const XMLDeclaration* ToDeclaration() const { - return ( ( _node && _node->ToDeclaration() ) ? _node->ToDeclaration() : 0 ); - } - -private: - const XMLNode* _node; -}; - - -/** - Printing functionality. The XMLPrinter gives you more - options than the XMLDocument::Print() method. - - It can: - -# Print to memory. - -# Print to a file you provide. - -# Print XML without a XMLDocument. - - Print to Memory - - @verbatim - XMLPrinter printer; - doc->Print( &printer ); - SomeFunction( printer.CStr() ); - @endverbatim - - Print to a File - - You provide the file pointer. - @verbatim - XMLPrinter printer( fp ); - doc.Print( &printer ); - @endverbatim - - Print without a XMLDocument - - When loading, an XML parser is very useful. However, sometimes - when saving, it just gets in the way. The code is often set up - for streaming, and constructing the DOM is just overhead. - - The Printer supports the streaming case. The following code - prints out a trivially simple XML file without ever creating - an XML document. - - @verbatim - XMLPrinter printer( fp ); - printer.OpenElement( "foo" ); - printer.PushAttribute( "foo", "bar" ); - printer.CloseElement(); - @endverbatim -*/ -class XMLPrinter : public XMLVisitor -{ -public: - /** Construct the printer. If the FILE* is specified, - this will print to the FILE. Else it will print - to memory, and the result is available in CStr(). - If 'compact' is set to true, then output is created - with only required whitespace and newlines. - */ - XMLPrinter( FILE* file=0, bool compact = false ); - ~XMLPrinter() {} - - /** If streaming, write the BOM and declaration. */ - void PushHeader( bool writeBOM, bool writeDeclaration ); - /** If streaming, start writing an element. - The element must be closed with CloseElement() - */ - void OpenElement( const char* name ); - /// If streaming, add an attribute to an open element. - void PushAttribute( const char* name, const char* value ); - void PushAttribute( const char* name, int value ); - void PushAttribute( const char* name, unsigned value ); - void PushAttribute( const char* name, bool value ); - void PushAttribute( const char* name, double value ); - /// If streaming, close the Element. - void CloseElement(); - - /// Add a text node. - void PushText( const char* text, bool cdata=false ); - /// Add a text node from an integer. - void PushText( int value ); - /// Add a text node from an unsigned. - void PushText( unsigned value ); - /// Add a text node from a bool. - void PushText( bool value ); - /// Add a text node from a float. - void PushText( float value ); - /// Add a text node from a double. - void PushText( double value ); - - /// Add a comment - void PushComment( const char* comment ); - - void PushDeclaration( const char* value ); - void PushUnknown( const char* value ); - - virtual bool VisitEnter( const XMLDocument& /*doc*/ ); - virtual bool VisitExit( const XMLDocument& /*doc*/ ) { - return true; - } - - virtual bool VisitEnter( const XMLElement& element, const XMLAttribute* attribute ); - virtual bool VisitExit( const XMLElement& element ); - - virtual bool Visit( const XMLText& text ); - virtual bool Visit( const XMLComment& comment ); - virtual bool Visit( const XMLDeclaration& declaration ); - virtual bool Visit( const XMLUnknown& unknown ); - - /** - If in print to memory mode, return a pointer to - the XML file in memory. - */ - const char* CStr() const { - return _buffer.Mem(); - } - /** - If in print to memory mode, return the size - of the XML file in memory. (Note the size returned - includes the terminating null.) - */ - int CStrSize() const { - return _buffer.Size(); - } - -private: - void SealElement(); - void PrintSpace( int depth ); - void PrintString( const char*, bool restrictedEntitySet ); // prints out, after detecting entities. - void Print( const char* format, ... ); - - bool _elementJustOpened; - bool _firstElement; - FILE* _fp; - int _depth; - int _textDepth; - bool _processEntities; - bool _compactMode; - - enum { - ENTITY_RANGE = 64, - BUF_SIZE = 200 - }; - bool _entityFlag[ENTITY_RANGE]; - bool _restrictedEntityFlag[ENTITY_RANGE]; - - DynArray< const char*, 10 > _stack; - DynArray< char, 20 > _buffer; -#ifdef _MSC_VER - DynArray< char, 20 > _accumulator; -#endif -}; - - -} // tinyxml2 - - -#endif // TINYXML2_INCLUDED diff --git a/BasiliskII/src/Unix/user_strings_unix.cpp b/BasiliskII/src/Unix/user_strings_unix.cpp index f095e06ce..5c86a02f1 100644 --- a/BasiliskII/src/Unix/user_strings_unix.cpp +++ b/BasiliskII/src/Unix/user_strings_unix.cpp @@ -59,14 +59,6 @@ user_string_def platform_strings[] = { {STR_KEYCODE_FILE_WARN, "Cannot open keycode translation file %s (%s)."}, {STR_KEYCODE_VENDOR_WARN, "Cannot find vendor '%s' in keycode translation file %s."}, - {STR_PREFS_MENU_FILE_GTK, "/_File"}, - {STR_PREFS_ITEM_START_GTK, "/File/_Start Basilisk II"}, - {STR_PREFS_ITEM_ZAP_PRAM_GTK, "/File/_Zap PRAM File"}, - {STR_PREFS_ITEM_SEPL_GTK, "/File/sepl"}, - {STR_PREFS_ITEM_QUIT_GTK, "/File/_Quit Basilisk II"}, - {STR_HELP_MENU_GTK, "/_Help"}, - {STR_HELP_ITEM_ABOUT_GTK, "/Help/_About Basilisk II"}, - {STR_FBDEV_NAME_CTRL, "Frame Buffer Name"}, {STR_FBDEVICE_FILE_CTRL, "Frame Buffer Spec File"}, {STR_DSPDEVICE_FILE_CTRL, "Audio Output Device"}, diff --git a/BasiliskII/src/Unix/user_strings_unix.h b/BasiliskII/src/Unix/user_strings_unix.h index 9bdb9f62d..0c26dc2ab 100644 --- a/BasiliskII/src/Unix/user_strings_unix.h +++ b/BasiliskII/src/Unix/user_strings_unix.h @@ -50,14 +50,6 @@ enum { STR_KEYCODE_FILE_WARN, STR_KEYCODE_VENDOR_WARN, - STR_PREFS_MENU_FILE_GTK, - STR_PREFS_ITEM_START_GTK, - STR_PREFS_ITEM_ZAP_PRAM_GTK, - STR_PREFS_ITEM_SEPL_GTK, - STR_PREFS_ITEM_QUIT_GTK, - STR_HELP_MENU_GTK, - STR_HELP_ITEM_ABOUT_GTK, - STR_FBDEV_NAME_CTRL, STR_FBDEVICE_FILE_CTRL, STR_DSPDEVICE_FILE_CTRL, diff --git a/BasiliskII/src/Unix/vhd_unix.cpp b/BasiliskII/src/Unix/vhd_unix.cpp deleted file mode 100644 index 45f04e859..000000000 --- a/BasiliskII/src/Unix/vhd_unix.cpp +++ /dev/null @@ -1,160 +0,0 @@ -/* - * vhd_unix.cpp -- support for disk images in vhd format - * - * (C) 2010 Geoffrey Brown - * - * 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 "sysdeps.h" -#include "disk_unix.h" -#include -#include -#include -#include -extern "C" { -#include -} -// libvhd.h defines DEBUG -#undef DEBUG -#define DEBUG 0 -#include "debug.h" - -static disk_generic::status vhd_unix_open(const char *name, int *size, - bool read_only, vhd_context_t **ctx) -{ - int amode = read_only ? R_OK : (R_OK | W_OK); - int fid; - vhd_context_t *vhd; - - D(bug("vhd open %s\n", name)); - - if (access(name, amode)) { - D(bug("vhd open -- incorrect permissions %s\n", name)); - return disk_generic::DISK_UNKNOWN; - } - - if (! (fid = open(name, O_RDONLY))) { - D(bug("vhd open -- couldn't open file %s\n", name)); - return disk_generic::DISK_UNKNOWN; - } - else { - char buf[9]; - read(fid, buf, sizeof(buf)-1); - buf[8] = 0; - close(fid); - if (strcmp("conectix", buf) != 0) { - D(bug("vhd open -- not vhd magic = %s\n", buf)); - return disk_generic::DISK_UNKNOWN; - } - if (vhd = (vhd_context_t *) malloc(sizeof(vhd_context_t))) { - int err; - if (err = vhd_open(vhd, name, read_only ? - VHD_OPEN_RDONLY : VHD_OPEN_RDWR)) { - D(bug("vhd_open failed (%d)\n", err)); - free(vhd); - return disk_generic::DISK_INVALID; - } - else { - *size = (int) vhd->footer.curr_size; - printf("VHD Open %s\n", name); - *ctx = vhd; - return disk_generic::DISK_VALID; - } - } - else { - D(bug("vhd open -- malloc failed\n")); - return disk_generic::DISK_INVALID; - } - } -} - -static int vhd_unix_read(vhd_context_t *ctx, void *buffer, loff_t offset, - size_t length) -{ - int err; - if ((offset % VHD_SECTOR_SIZE) || (length % VHD_SECTOR_SIZE)) { - printf("vhd read only supported on sector boundaries (%d)\n", - VHD_SECTOR_SIZE); - return 0; - } - if (err = vhd_io_read(ctx, (char *) buffer, offset / VHD_SECTOR_SIZE, - length / VHD_SECTOR_SIZE)){ - D(bug("vhd read error %d\n", err)); - return err; - } - else - return length; -} - -static int vhd_unix_write(vhd_context_t *ctx, void *buffer, loff_t offset, - size_t length) -{ - int err; - - if ((offset % VHD_SECTOR_SIZE) || (length % VHD_SECTOR_SIZE)) { - printf("vhd write only supported on sector boundaries (%d)\n", - VHD_SECTOR_SIZE); - return 0; - } - if (err = vhd_io_write(ctx, (char *) buffer, offset/VHD_SECTOR_SIZE, - length/VHD_SECTOR_SIZE)) { - D(bug("vhd write error %d\n", err)); - return err; - } - else - return length; -} - - -static void vhd_unix_close(vhd_context_t *ctx) -{ - D(bug("vhd close\n")); - vhd_close(ctx); - free(ctx); -} - - -struct disk_vhd : disk_generic { - disk_vhd(vhd_context_t *ctx, bool read_only, loff_t size) - : ctx(ctx), read_only(read_only), file_size(size) { } - - virtual ~disk_vhd() { vhd_unix_close(ctx); } - virtual bool is_read_only() { return read_only; } - virtual loff_t size() { return file_size; } - - virtual size_t read(void *buf, loff_t offset, size_t length) { - return vhd_unix_read(ctx, buf, offset, length); - } - - virtual size_t write(void *buf, loff_t offset, size_t length) { - return vhd_unix_write(ctx, buf, offset, length); - } - -protected: - vhd_context_t *ctx; - bool read_only; - loff_t file_size; -}; - -disk_generic::status disk_vhd_factory(const char *path, - bool read_only, disk_generic **disk) { - int size; - vhd_context_t *ctx = NULL; - disk_generic::status st = vhd_unix_open(path, &size, read_only, &ctx); - if (st == disk_generic::DISK_VALID) - *disk = new disk_vhd(ctx, read_only, size); - return st; -} diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp deleted file mode 100644 index 6f8ef67f7..000000000 --- a/BasiliskII/src/Unix/video_x.cpp +++ /dev/null @@ -1,2686 +0,0 @@ -/* - * video_x.cpp - Video/graphics emulation, X11 specific stuff - * - * Basilisk II (C) Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include - -#include - -#ifdef HAVE_PTHREADS -# include -#endif - -#ifdef ENABLE_XF86_DGA -# include -#endif - -#ifdef ENABLE_XF86_VIDMODE -# include -#endif - -#ifdef ENABLE_FBDEV_DGA -# include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_blit.h" - -#define DEBUG 0 -#include "debug.h" - - -// Supported video modes -static vector VideoModes; - -// Display types -enum { - DISPLAY_WINDOW, // X11 window, using MIT SHM extensions if possible - DISPLAY_DGA // DGA fullscreen display -}; - -// Constants -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; - -static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask; -static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask; - - -// Global variables -static int32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; - -static int display_type = DISPLAY_WINDOW; // See enum above -static bool local_X11; // Flag: X server running on local machine? -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifdef HAVE_PTHREADS -static pthread_attr_t redraw_thread_attr; // Redraw thread attributes -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static volatile bool redraw_thread_cancel_ack; // Flag: Acknowledge for redraw thread cancellation -static pthread_t redraw_thread; // Redraw thread -#endif - -static bool has_dga = false; // Flag: Video DGA capable -static bool has_vidmode = false; // Flag: VidMode extension available - -#ifdef ENABLE_VOSF -static bool use_vosf = true; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// X11 variables -char *x_display_name = NULL; // X11 display name -Display *x_display = NULL; // X11 display handle -static int screen; // Screen number -static Window rootwin; // Root window and our window -static int num_depths = 0; // Number of available X depths -static int *avail_depths = NULL; // List of available X depths -static XColor black, white; -static unsigned long black_pixel, white_pixel; -static int eventmask; - -static int xdepth; // Depth of X screen -static VisualFormat visualFormat; -static XVisualInfo visualInfo; -static Visual *vis; -static int color_class; - -static bool x_native_byte_order; // XImage has native byte order? -static int rshift, rloss, gshift, gloss, bshift, bloss; // Pixel format of DirectColor/TrueColor modes - -static Colormap cmap[2] = {0, 0}; // Colormaps for indexed modes (DGA needs two of them) - -static XColor x_palette[256]; // Color palette to be used as CLUT and gamma table -static bool x_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors - -#ifdef ENABLE_FBDEV_DGA -static int fbdev_fd = -1; -#endif - -#ifdef ENABLE_XF86_VIDMODE -static XF86VidModeModeInfo **x_video_modes = NULL; // Array of all available modes -static int num_x_video_modes; -#endif - -// Mutex to protect palette -#ifdef HAVE_PTHREADS -static pthread_mutex_t x_palette_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_PALETTE pthread_mutex_lock(&x_palette_lock) -#define UNLOCK_PALETTE pthread_mutex_unlock(&x_palette_lock) -#else -#define LOCK_PALETTE -#define UNLOCK_PALETTE -#endif - -// Mutex to protect frame buffer -#ifdef HAVE_PTHREADS -static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock); -#define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock); -#else -#define LOCK_FRAME_BUFFER -#define UNLOCK_FRAME_BUFFER -#endif - -// Variables for non-VOSF incremental refresh -static const int sm_uptd[] = {4,1,6,3,0,5,2,7}; -static int sm_no_boxes[] = {1,8,32,64,128,300}; -static bool updt_box[17][17]; -static int nr_boxes; - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static void *redraw_func(void *arg); - -// From main_unix.cpp -extern char *x_display_name; -extern Display *x_display; - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - -// From clip_unix.cpp -extern void ClipboardSelectionClear(XSelectionClearEvent *); -extern void ClipboardSelectionRequest(XSelectionRequestEvent *); - - -/* - * monitor_desc subclass for X11 display - */ - -class X11_monitor_desc : public monitor_desc { -public: - X11_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~X11_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Map video_mode depth ID to numerical depth value -static inline int depth_of_video_mode(video_mode const & mode) -{ - int depth = -1; - switch (mode.depth) { - case VDEPTH_1BIT: - depth = 1; - break; - case VDEPTH_2BIT: - depth = 2; - break; - case VDEPTH_4BIT: - depth = 4; - break; - case VDEPTH_8BIT: - depth = 8; - break; - case VDEPTH_16BIT: - depth = 16; - break; - case VDEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map RGB color to pixel value (this only works in TrueColor/DirectColor visuals) -static inline uint32 map_rgb(uint8 red, uint8 green, uint8 blue, bool fix_byte_order = false) -{ - uint32 val = ((red >> rloss) << rshift) | ((green >> gloss) << gshift) | ((blue >> bloss) << bshift); - if (fix_byte_order && !x_native_byte_order) { - // We have to fix byte order in the ExpandMap[] - // NOTE: this is only an optimization since Screen_blitter_init() - // could be arranged to choose an NBO or OBO (with - // byteswapping) Blit_Expand_X_To_Y() function - switch (visualFormat.depth) { - case 15: case 16: - val = do_byteswap_16(val); - break; - case 24: case 32: - val = do_byteswap_32(val); - break; - } - } - return val; -} - -// Do we have a visual for handling the specified Mac depth? If so, set the -// global variables "xdepth", "visualInfo", "vis" and "color_class". -static bool find_visual_for_depth(video_depth depth) -{ - D(bug("have_visual_for_depth(%d)\n", 1 << depth)); - - // 1-bit works always and uses default visual - if (depth == VDEPTH_1BIT) { - vis = DefaultVisual(x_display, screen); - visualInfo.visualid = XVisualIDFromVisual(vis); - int num = 0; - XVisualInfo *vi = XGetVisualInfo(x_display, VisualIDMask, &visualInfo, &num); - visualInfo = vi[0]; - XFree(vi); - xdepth = visualInfo.depth; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d\n", visualInfo.visualid, xdepth)); - return true; - } - - // Calculate minimum and maximum supported X depth - int min_depth = 1, max_depth = 32; - switch (depth) { -#ifdef ENABLE_VOSF - case VDEPTH_2BIT: - case VDEPTH_4BIT: // VOSF blitters can convert 2/4/8-bit -> 8/16/32-bit - case VDEPTH_8BIT: - min_depth = 8; - max_depth = 32; - break; -#else - case VDEPTH_2BIT: - case VDEPTH_4BIT: // 2/4-bit requires VOSF blitters - return false; - case VDEPTH_8BIT: // 8-bit without VOSF requires an 8-bit visual - min_depth = 8; - max_depth = 8; - break; -#endif - case VDEPTH_16BIT: // 16-bit requires a 15/16-bit visual - min_depth = 15; - max_depth = 16; - break; - case VDEPTH_32BIT: // 32-bit requires a 24/32-bit visual - min_depth = 24; - max_depth = 32; - break; - } - D(bug(" minimum required X depth is %d, maximum supported X depth is %d\n", min_depth, max_depth)); - - // Try to find a visual for one of the color depths - bool visual_found = false; - for (int i=0; i max_depth) - continue; - - // Determine best color class for this depth - switch (xdepth) { - case 1: // Try StaticGray or StaticColor - if (XMatchVisualInfo(x_display, screen, xdepth, StaticGray, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, StaticColor, &visualInfo)) - visual_found = true; - break; - case 8: // Need PseudoColor - if (XMatchVisualInfo(x_display, screen, xdepth, PseudoColor, &visualInfo)) - visual_found = true; - break; - case 15: - case 16: - case 24: - case 32: // Try DirectColor first, as this will allow gamma correction - if (XMatchVisualInfo(x_display, screen, xdepth, DirectColor, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo)) - visual_found = true; - break; - default: - D(bug(" not a supported depth\n")); - break; - } - } - if (!visual_found) - return false; - - // Visual was found - vis = visualInfo.visual; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d, class ", visualInfo.visualid, xdepth)); -#if DEBUG - switch (color_class) { - case StaticGray: D(bug("StaticGray\n")); break; - case GrayScale: D(bug("GrayScale\n")); break; - case StaticColor: D(bug("StaticColor\n")); break; - case PseudoColor: D(bug("PseudoColor\n")); break; - case TrueColor: D(bug("TrueColor\n")); break; - case DirectColor: D(bug("DirectColor\n")); break; - } -#endif - return true; -} - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - mode.user_data = 0; - VideoModes.push_back(mode); -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(video_depth depth) -{ - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(X11_monitor_desc &monitor, video_depth depth, bool native_byte_order) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VDEPTH_16BIT) - layout = (xdepth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VDEPTH_32BIT) - layout = (xdepth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const video_mode &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = mode.bytes_per_row * mode.y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name(Window w, int name) -{ - const char *str = GetString(name); - XStoreName(x_display, w, str); - XSetIconName(x_display, w, str); - - XClassHint *hints; - hints = XAllocClassHint(); - if (hints) { - hints->res_name = "BasiliskII"; - hints->res_class = "BasiliskII"; - XSetClassHint(x_display, w, hints); - XFree(hints); - } -} - -// Set window input focus flag -static void set_window_focus(Window w) -{ - XWMHints *hints = XAllocWMHints(); - if (hints) { - hints->input = True; - hints->initial_state = NormalState; - hints->flags = InputHint | StateHint; - XSetWMHints(x_display, w, hints); - XFree(hints); - } -} - -// Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget) -static Atom WM_DELETE_WINDOW = (Atom)0; -static void set_window_delete_protocol(Window w) -{ - WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false); - XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1); -} - -// Wait until window is mapped/unmapped -void wait_mapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != MapNotify) || (e.xmap.event != w)); -} - -void wait_unmapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != UnmapNotify) || (e.xmap.event != w)); -} - -// Trap SHM errors -static bool shm_error = false; -static int (*old_error_handler)(Display *, XErrorEvent *); - -static int error_handler(Display *d, XErrorEvent *e) -{ - if (e->error_code == BadAccess) { - shm_error = true; - return 0; - } else - return old_error_handler(d, e); -} - - -/* - * Framebuffer allocation routines - */ - -#ifdef ENABLE_VOSF -#include "vm_alloc.h" - -static void *vm_acquire_framebuffer(uint32 size) -{ - // always try to allocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) - fb = VM_MAP_FAILED; - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ - vm_release(fb, size); -} -#endif - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(X11_monitor_desc &m); - virtual ~driver_base(); - - virtual void update_palette(void); - virtual void suspend(void) {} - virtual void resume(void) {} - virtual void toggle_mouse_grab(void) {} - virtual void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - virtual void grab_mouse(void) {} - virtual void ungrab_mouse(void) {} - -public: - X11_monitor_desc &monitor; // Associated video monitor - const video_mode &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - Window w; // The window we draw into - - int orig_accel_numer, orig_accel_denom, orig_threshold; // Original mouse acceleration -}; - -class driver_window; -static void update_display_window_vosf(driver_window *drv); -static void update_display_dynamic(int ticker, driver_window *drv); -static void update_display_static(driver_window *drv); - -class driver_window : public driver_base { - friend void update_display_window_vosf(driver_window *drv); - friend void update_display_dynamic(int ticker, driver_window *drv); - friend void update_display_static(driver_window *drv); - -public: - driver_window(X11_monitor_desc &monitor); - ~driver_window(); - - void toggle_mouse_grab(void); - void mouse_moved(int x, int y); - - void grab_mouse(void); - void ungrab_mouse(void); - -private: - GC gc; - XImage *img; - bool have_shm; // Flag: SHM extensions available - XShmSegmentInfo shminfo; - Cursor mac_cursor; - bool mouse_grabbed; // Flag: mouse pointer grabbed, using relative mouse mode - int mouse_last_x, mouse_last_y; // Last mouse position (for relative mode) -}; - -class driver_dga; -static void update_display_dga_vosf(driver_dga *drv); - -class driver_dga : public driver_base { - friend void update_display_dga_vosf(driver_dga *drv); - -public: - driver_dga(X11_monitor_desc &monitor); - ~driver_dga(); - - void suspend(void); - void resume(void); - -protected: - struct FakeXImage { - int width, height; // size of image - int depth; // depth of image - int bytes_per_line; // accelerator to next line - - FakeXImage(int w, int h, int d) - : width(w), height(h), depth(d) - { bytes_per_line = TrivialBytesPerRow(width, DepthModeForPixelDepth(depth)); } - }; - FakeXImage *img; - -private: - Window suspend_win; // "Suspend" information window - void *fb_save; // Saved frame buffer for suspend/resume -}; - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(X11_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), w(0) -{ - the_buffer = NULL; - the_buffer_copy = NULL; - XGetPointerControl(x_display, &orig_accel_numer, &orig_accel_denom, &orig_threshold); -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - if (w) { - XUnmapWindow(x_display, w); - wait_unmapped(w); - XDestroyWindow(x_display, w); - } - - XFlush(x_display); - XSync(x_display, false); - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer) { - free(the_buffer); - the_buffer = NULL; - } - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - // the_buffer shall always be mapped through vm_acquire() so that we can vm_protect() it at will - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - if (the_host_buffer) { - D(bug(" freeing the_host_buffer at %p\n", the_host_buffer)); - free(the_host_buffer); - the_host_buffer = NULL; - } - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#endif -} - -// Palette has changed -void driver_base::update_palette(void) -{ - if (color_class == PseudoColor || color_class == DirectColor) { - int num = vis->map_entries; - if (!IsDirectMode(monitor.get_current_mode()) && color_class == DirectColor) - return; // Indexed mode on true color screen, don't set CLUT - XStoreColors(x_display, cmap[0], x_palette, num); - XStoreColors(x_display, cmap[1], x_palette, num); - } - XSync(x_display, false); -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ - XChangePointerControl(x_display, True, False, 1, 1, 0); -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ - XChangePointerControl(x_display, True, True, orig_accel_numer, orig_accel_denom, orig_threshold); -} - - -/* - * Windowed display driver - */ - -// Open display -driver_window::driver_window(X11_monitor_desc &m) - : driver_base(m), gc(0), img(NULL), have_shm(false), mac_cursor(0), - mouse_grabbed(false), mouse_last_x(0), mouse_last_y(0) -{ - int width = mode.x, height = mode.y; - int aligned_width = (width + 15) & ~15; - int aligned_height = (height + 15) & ~15; - - // Set absolute mouse mode - ADBSetRelMouseMode(mouse_grabbed); - - // Create window (setting background_pixel, border_pixel and colormap is - // mandatory when using a non-default visual; in 1-bit mode we use the - // default visual, so we can also use the default colormap) - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = win_eventmask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.border_pixel = 0; - wattr.colormap = (mode.depth == VDEPTH_1BIT ? DefaultColormap(x_display, screen) : cmap[0]); - w = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWColormap, &wattr); - D(bug(" window created\n")); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Set delete protocol property - set_window_delete_protocol(w); - - // Make window unresizable - { - XSizeHints *hints = XAllocSizeHints(); - if (hints) { - hints->min_width = width; - hints->max_width = width; - hints->min_height = height; - hints->max_height = height; - hints->flags = PMinSize | PMaxSize; - XSetWMNormalHints(x_display, w, hints); - XFree(hints); - } - } - D(bug(" window attributes set\n")); - - // Show window - XMapWindow(x_display, w); - wait_mapped(w); - D(bug(" window mapped\n")); - - // 1-bit mode is big-endian; if the X server is little-endian, we can't - // use SHM because that doesn't allow changing the image byte order - bool need_msb_image = (mode.depth == VDEPTH_1BIT && XImageByteOrder(x_display) == LSBFirst); - - // Try to create and attach SHM image - if (local_X11 && !need_msb_image && XShmQueryExtension(x_display)) { - - // Create SHM image ("height + 2" for safety) - img = XShmCreateImage(x_display, vis, mode.depth == VDEPTH_1BIT ? 1 : xdepth, mode.depth == VDEPTH_1BIT ? XYBitmap : ZPixmap, 0, &shminfo, width, height); - D(bug(" shm image created\n")); - shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777); - the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0); - shminfo.shmaddr = img->data = (char *)the_buffer_copy; - shminfo.readOnly = False; - - // Try to attach SHM image, catching errors - shm_error = false; - old_error_handler = XSetErrorHandler(error_handler); - XShmAttach(x_display, &shminfo); - XSync(x_display, false); - XSetErrorHandler(old_error_handler); - if (shm_error) { - shmdt(shminfo.shmaddr); - XDestroyImage(img); - img = NULL; - shminfo.shmid = -1; - } else { - have_shm = true; - shmctl(shminfo.shmid, IPC_RMID, 0); - } - D(bug(" shm image attached\n")); - } - - // Create normal X image if SHM doesn't work ("height + 2" for safety) - if (!have_shm) { - int bytes_per_row = (mode.depth == VDEPTH_1BIT ? aligned_width/8 : TrivialBytesPerRow(aligned_width, DepthModeForPixelDepth(xdepth))); - the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row); - img = XCreateImage(x_display, vis, mode.depth == VDEPTH_1BIT ? 1 : xdepth, mode.depth == VDEPTH_1BIT ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row); - D(bug(" X image created\n")); - } - - if (need_msb_image) { - img->byte_order = MSBFirst; - img->bitmap_bit_order = MSBFirst; - } - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer_copy; - the_buffer_size = page_extend((aligned_height + 2) * img->bytes_per_line); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#else - // Allocate memory for frame buffer - the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); -#endif - - // Create GC - gc = XCreateGC(x_display, w, 0, 0); - XSetState(x_display, gc, black_pixel, white_pixel, GXcopy, AllPlanes); - - // Create no_cursor - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, w, 1, 1, 1), - XCreatePixmap(x_display, w, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, w, mac_cursor); - - // Init blitting routines -#ifdef ENABLE_VOSF - Screen_blitter_init(visualFormat, x_native_byte_order, depth_of_video_mode(mode)); -#endif - - // Set frame buffer base - set_mac_frame_buffer(monitor, mode.depth, x_native_byte_order); - - // Everything went well - init_ok = true; -} - -// Close display -driver_window::~driver_window() -{ - if (have_shm) { - XShmDetach(x_display, &shminfo); -#ifdef ENABLE_VOSF - the_host_buffer = NULL; // don't free() in driver_base dtor -#else - the_buffer_copy = NULL; // don't free() in driver_base dtor -#endif - } - if (img) { - if (!have_shm) - img->data = NULL; - XDestroyImage(img); - } - if (have_shm) { - shmdt(shminfo.shmaddr); - shmctl(shminfo.shmid, IPC_RMID, 0); - } - if (gc) - XFreeGC(x_display, gc); -} - -// Toggle mouse grab -void driver_window::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -// Grab mouse, switch to relative mouse mode -void driver_window::grab_mouse(void) -{ - int result; - for (int i=0; i<10; i++) { - result = XGrabPointer(x_display, w, True, 0, - GrabModeAsync, GrabModeAsync, w, None, CurrentTime); - if (result != AlreadyGrabbed) - break; - Delay_usec(100000); - } - if (result == GrabSuccess) { - XStoreName(x_display, w, GetString(STR_WINDOW_TITLE_GRABBED)); - ADBSetRelMouseMode(mouse_grabbed = true); - disable_mouse_accel(); - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_window::ungrab_mouse(void) -{ - if (mouse_grabbed) { - XUngrabPointer(x_display, CurrentTime); - XStoreName(x_display, w, GetString(STR_WINDOW_TITLE)); - ADBSetRelMouseMode(mouse_grabbed = false); - restore_mouse_accel(); - } -} - -// Mouse moved -void driver_window::mouse_moved(int x, int y) -{ - if (!mouse_grabbed) { - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(x, y); - return; - } - - // Warped mouse motion (this code is taken from SDL) - - // Post first mouse event - int width = monitor.get_current_mode().x, height = monitor.get_current_mode().y; - int delta_x = x - mouse_last_x, delta_y = y - mouse_last_y; - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(delta_x, delta_y); - - // Only warp the pointer when it has reached the edge - const int MOUSE_FUDGE_FACTOR = 8; - if (x < MOUSE_FUDGE_FACTOR || x > (width - MOUSE_FUDGE_FACTOR) - || y < MOUSE_FUDGE_FACTOR || y > (height - MOUSE_FUDGE_FACTOR)) { - XEvent event; - while (XCheckTypedEvent(x_display, MotionNotify, &event)) { - delta_x = x - mouse_last_x; delta_y = y - mouse_last_y; - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(delta_x, delta_y); - } - mouse_last_x = width/2; - mouse_last_y = height/2; - XWarpPointer(x_display, None, w, 0, 0, 0, 0, mouse_last_x, mouse_last_y); - for (int i=0; i<10; i++) { - XMaskEvent(x_display, PointerMotionMask, &event); - if (event.xmotion.x > (mouse_last_x - MOUSE_FUDGE_FACTOR) - && event.xmotion.x < (mouse_last_x + MOUSE_FUDGE_FACTOR) - && event.xmotion.y > (mouse_last_y - MOUSE_FUDGE_FACTOR) - && event.xmotion.y < (mouse_last_y + MOUSE_FUDGE_FACTOR)) - break; - } - } -} - - -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -/* - * DGA display driver base class - */ - -driver_dga::driver_dga(X11_monitor_desc &m) - : driver_base(m), suspend_win(0), fb_save(NULL), img(NULL) -{ -} - -driver_dga::~driver_dga() -{ - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - - if (img) - delete img; -} - -// Suspend emulation -void driver_dga::suspend(void) -{ - // Release ctrl key - ADBKeyUp(0x36); - ctrl_down = false; - - // Lock frame buffer (this will stop the MacOS thread) - LOCK_FRAME_BUFFER; - - // Save frame buffer - fb_save = malloc(mode.y * mode.bytes_per_row); - if (fb_save) - memcpy(fb_save, the_buffer, mode.y * mode.bytes_per_row); - - // Close full screen display -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - restore_mouse_accel(); - XUnmapWindow(x_display, w); - wait_unmapped(w); - - // Open "suspend" window - XSetWindowAttributes wattr; - wattr.event_mask = KeyPressMask; - wattr.background_pixel = black_pixel; - - suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel, &wattr); - set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE); - set_window_focus(suspend_win); - XMapWindow(x_display, suspend_win); - emul_suspended = true; -} - -// Resume emulation -void driver_dga::resume(void) -{ - // Close "suspend" window - XDestroyWindow(x_display, suspend_win); - XSync(x_display, false); - - // Reopen full screen display - XMapRaised(x_display, w); - wait_mapped(w); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - disable_mouse_accel(); -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); -#endif - XSync(x_display, false); - - // the_buffer already contains the data to restore. i.e. since a temporary - // frame buffer is used when VOSF is actually used, fb_save is therefore - // not necessary. -#ifdef ENABLE_VOSF - if (use_vosf) { - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } -#endif - - // Restore frame buffer - if (fb_save) { -#ifdef ENABLE_VOSF - // Don't copy fb_save to the temporary frame buffer in VOSF mode - if (!use_vosf) -#endif - memcpy(the_buffer, fb_save, mode.y * mode.bytes_per_row); - free(fb_save); - fb_save = NULL; - } - - // Unlock frame buffer (and continue MacOS thread) - UNLOCK_FRAME_BUFFER; - emul_suspended = false; -} -#endif - - -#ifdef ENABLE_FBDEV_DGA -/* - * fbdev DGA display driver - */ - -const char FBDEVICES_FILE_NAME[] = DATADIR "/fbdevices"; -const char FBDEVICE_FILE_NAME[] = "/dev/fb"; - -class driver_fbdev : public driver_dga { -public: - driver_fbdev(X11_monitor_desc &monitor); - ~driver_fbdev(); -}; - -// Open display -driver_fbdev::driver_fbdev(X11_monitor_desc &m) : driver_dga(m) -{ - int width = mode.x, height = mode.y; - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Find the maximum depth available - int ndepths, max_depth(0); - int *depths = XListDepths(x_display, screen, &ndepths); - if (depths == NULL) { - printf("FATAL: Could not determine the maximal depth available\n"); - return; - } else { - while (ndepths-- > 0) { - if (depths[ndepths] > max_depth) - max_depth = depths[ndepths]; - } - } - - // Get fbdevices file path from preferences - const char *fbd_path = PrefsFindString("fbdevicefile"); - - // Open fbdevices file - FILE *fp = fopen(fbd_path ? fbd_path : FBDEVICES_FILE_NAME, "r"); - if (fp == NULL) { - char str[256]; - sprintf(str, GetString(STR_NO_FBDEVICE_FILE_ERR), fbd_path ? fbd_path : FBDEVICES_FILE_NAME, strerror(errno)); - ErrorAlert(str); - return; - } - - int fb_depth; // supported depth - uint32 fb_offset; // offset used for mmap(2) - char fb_name[20]; - char line[256]; - bool device_found = false; - while (fgets(line, 255, fp)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len - 1] = '\0'; - - // Comments begin with "#" or ";" - if ((line[0] == '#') || (line[0] == ';') || (line[0] == '\0')) - continue; - - if ((sscanf(line, "%19s %d %x", fb_name, &fb_depth, &fb_offset) == 3) - && (strcmp(fb_name, fb_name) == 0) && (fb_depth == max_depth)) { - device_found = true; - break; - } - } - - // fbdevices file completely read - fclose(fp); - - // Frame buffer name not found ? Then, display warning - if (!device_found) { - char str[256]; - sprintf(str, GetString(STR_FBDEV_NAME_ERR), fb_name, max_depth); - ErrorAlert(str); - return; - } - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.background_pixel = white_pixel; - wattr.override_redirect = True; - wattr.colormap = cmap[0]; - - w = XCreateWindow(x_display, rootwin, - 0, 0, width, height, - 0, xdepth, InputOutput, vis, - CWEventMask | CWBackPixel | CWOverrideRedirect | (fb_depth <= 8 ? CWColormap : 0), - &wattr); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Show window - XMapRaised(x_display, w); - wait_mapped(w); - - // Grab mouse and keyboard - XGrabKeyboard(x_display, w, True, - GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, w, True, - PointerMotionMask | ButtonPressMask | ButtonReleaseMask, - GrabModeAsync, GrabModeAsync, w, None, CurrentTime); - disable_mouse_accel(); - - // Calculate bytes per row - int bytes_per_row = TrivialBytesPerRow(mode.x, mode.depth); - - // Map frame buffer - the_buffer_size = height * bytes_per_row; - if ((the_buffer = (uint8 *) mmap(NULL, the_buffer_size, PROT_READ | PROT_WRITE, MAP_PRIVATE, fbdev_fd, fb_offset)) == MAP_FAILED) { - if ((the_buffer = (uint8 *) mmap(NULL, the_buffer_size, PROT_READ | PROT_WRITE, MAP_SHARED, fbdev_fd, fb_offset)) == MAP_FAILED) { - char str[256]; - sprintf(str, GetString(STR_FBDEV_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - return; - } - } - -#if ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, true, mode.depth); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - - // Fake image for DGA/VOSF mode to know about display bounds - img = new FakeXImage(width, height, depth_of_video_mode(mode)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - const_cast(&mode)->bytes_per_row = bytes_per_row; - const_cast(&mode)->depth = DepthModeForPixelDepth(fb_depth); - set_mac_frame_buffer(monitor, mode.depth, true); - - // Everything went well - init_ok = true; -} - -// Close display -driver_fbdev::~driver_fbdev() -{ - if (!use_vosf) { - if (the_buffer != MAP_FAILED) { - // don't free() the screen buffer in driver_base dtor - munmap(the_buffer, the_buffer_size); - the_buffer = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_host_buffer != MAP_FAILED) { - // don't free() the screen buffer in driver_base dtor - munmap(the_host_buffer, the_buffer_size); - the_host_buffer = NULL; - } - } -#endif -} -#endif - - -#ifdef ENABLE_XF86_DGA -/* - * XFree86 DGA display driver - */ - -class driver_xf86dga : public driver_dga { -public: - driver_xf86dga(X11_monitor_desc &monitor); - ~driver_xf86dga(); - - void update_palette(void); - void resume(void); - -private: - int current_dga_cmap; // Number (0 or 1) of currently installed DGA colormap -}; - -// Open display -driver_xf86dga::driver_xf86dga(X11_monitor_desc &m) - : driver_dga(m), current_dga_cmap(0) -{ - int width = mode.x, height = mode.y; - - // Set relative mouse mode - ADBSetRelMouseMode(true); - -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = 0; - for (int i=1; ihdisplay >= width && x_video_modes[i]->vdisplay >= height && - x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) { - best = i; - } - } - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - XSync(x_display, false); - } -#endif - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - wattr.colormap = (mode.depth == VDEPTH_1BIT ? DefaultColormap(x_display, screen) : cmap[0]); - - w = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWOverrideRedirect | - (color_class == DirectColor ? CWColormap : 0), &wattr); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Show window - XMapRaised(x_display, w); - wait_mapped(w); - - // Establish direct screen connection - XMoveResizeWindow(x_display, w, 0, 0, width, height); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - disable_mouse_accel(); - - int v_width, v_bank, v_size; - XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size); - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - XF86DGASetVidPage(x_display, screen, 0); - - // Set colormap - if (!IsDirectMode(mode)) { - XSetWindowColormap(x_display, w, cmap[current_dga_cmap = 0]); - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } - XSync(x_display, false); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, mode.depth); -#if ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, x_native_byte_order, depth_of_video_mode(mode)); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - - // Fake image for DGA/VOSF mode to know about display bounds - img = new FakeXImage((v_width + 7) & ~7, height, depth_of_video_mode(mode)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - const_cast(&mode)->bytes_per_row = bytes_per_row; - set_mac_frame_buffer(monitor, mode.depth, true); - - // Everything went well - init_ok = true; -} - -// Close display -driver_xf86dga::~driver_xf86dga() -{ - XF86DGADirectVideo(x_display, screen, 0); - if (!use_vosf) { - // don't free() the screen buffer in driver_base dtor - the_buffer = NULL; - } -#ifdef ENABLE_VOSF - else { - // don't free() the screen buffer in driver_base dtor - the_host_buffer = NULL; - } -#endif -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]); -#endif -} - -// Palette has changed -void driver_xf86dga::update_palette(void) -{ - driver_dga::update_palette(); - current_dga_cmap ^= 1; - if (!IsDirectMode(monitor.get_current_mode()) && cmap[current_dga_cmap]) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); -} - -// Resume emulation -void driver_xf86dga::resume(void) -{ - driver_dga::resume(); - if (!IsDirectMode(monitor.get_current_mode())) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); -} -#endif - - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - const char *vendor = ServerVendor(x_display); - // Force use of MacX mappings on MacOS X with Apple's X server - int dummy; - if (XQueryExtension(x_display, "Apple-DRI", &dummy, &dummy, &dummy)) - vendor = "MacX"; - bool vendor_found = false; - char line[256]; - while (fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (vendor_found) { - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code; - else - break; - } else { - // Search for vendor string - if (strstr(vendor, line) == vendor) - vendor_found = true; - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = vendor_found; - - // Vendor not found? Then display warning - if (!vendor_found) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - } -} - -// Open display for current mode -bool X11_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); - const video_mode &mode = get_current_mode(); - - // Find best available X visual - if (!find_visual_for_depth(mode.depth)) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Determine the byte order of an XImage content -#ifdef WORDS_BIGENDIAN - x_native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - x_native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif - - // Build up visualFormat structure - visualFormat.fullscreen = (display_type == DISPLAY_DGA); - visualFormat.depth = visualInfo.depth; - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - - // Create color maps - if (color_class == PseudoColor || color_class == DirectColor) { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll); - } else { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocNone); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocNone); - } - - // Find pixel format of direct modes - if (color_class == DirectColor || color_class == TrueColor) { - rshift = gshift = bshift = 0; - rloss = gloss = bloss = 8; - uint32 mask; - for (mask=vis->red_mask; !(mask&1); mask>>=1) - ++rshift; - for (; mask&1; mask>>=1) - --rloss; - for (mask=vis->green_mask; !(mask&1); mask>>=1) - ++gshift; - for (; mask&1; mask>>=1) - --gloss; - for (mask=vis->blue_mask; !(mask&1); mask>>=1) - ++bshift; - for (; mask&1; mask>>=1) - --bloss; - } - - // Preset palette pixel values for CLUT or gamma table - if (color_class == DirectColor) { - int num = vis->map_entries; - for (int i=0; imap_entries : 256); - for (int i=0; i16/32 expand map - if (!IsDirectMode(mode) && xdepth > 8) - for (int i=0; i<256; i++) - ExpandMap[i] = map_rgb(i, i, i, true); -#endif - - // Create display driver object of requested type - switch (display_type) { - case DISPLAY_WINDOW: - drv = new driver_window(*this); - break; -#ifdef ENABLE_FBDEV_DGA - case DISPLAY_DGA: - drv = new driver_fbdev(*this); - break; -#endif -#ifdef ENABLE_XF86_DGA - case DISPLAY_DGA: - drv = new driver_xf86dga(*this); - break; -#endif - } - if (drv == NULL) - return false; - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Initialize the VOSF system - if (!video_vosf_init(*this)) { - ErrorAlert(STR_VOSF_INIT_ERR); - return false; - } - } -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - XSync(x_display, false); - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifdef USE_PTHREADS_SERVICES - redraw_thread_cancel = false; - Set_pthread_attr(&redraw_thread_attr, 0); - redraw_thread_active = (pthread_create(&redraw_thread, &redraw_thread_attr, redraw_func, NULL) == 0); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - - return true; -} - -bool VideoInit(bool classic) -{ - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Check if X server runs on local machine - local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "/", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0); - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Find screen and root window - screen = XDefaultScreen(x_display); - rootwin = XRootWindow(x_display, screen); - - // Get sorted list of available depths - avail_depths = XListDepths(x_display, screen, &num_depths); - if (avail_depths == NULL) { - ErrorAlert(STR_UNSUPP_DEPTH_ERR); - return false; - } - std::sort(avail_depths, avail_depths + num_depths); - -#ifdef ENABLE_FBDEV_DGA - // Frame buffer name - char fb_name[20]; - - // Could do fbdev DGA? - if ((fbdev_fd = open(FBDEVICE_FILE_NAME, O_RDWR)) != -1) - has_dga = true; - else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_DGA - // DGA available? - int dga_event_base, dga_error_base; - if (local_X11 && XF86DGAQueryExtension(x_display, &dga_event_base, &dga_error_base)) { - int dga_flags = 0; - XF86DGAQueryDirectVideo(x_display, screen, &dga_flags); - has_dga = dga_flags & XF86DGADirectPresent; - } else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_VIDMODE - // VidMode available? - int vm_event_base, vm_error_base; - has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base); - if (has_vidmode) - XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes); -#endif - - // Find black and white colors - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black); - XAllocColor(x_display, DefaultColormap(x_display, screen), &black); - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white); - XAllocColor(x_display, DefaultColormap(x_display, screen), &white); - black_pixel = BlackPixel(x_display, screen); - white_pixel = WhitePixel(x_display, screen); - - // Get screen mode from preferences - const char *mode_str; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width = 512, default_height = 384; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) { - display_type = DISPLAY_WINDOW; -#ifdef ENABLE_FBDEV_DGA - } else if (has_dga && sscanf(mode_str, "dga/%19s", fb_name) == 1) { - display_type = DISPLAY_DGA; - default_width = -1; default_height = -1; // use entire screen -#endif -#ifdef ENABLE_XF86_DGA - } else if (has_dga && sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) { - display_type = DISPLAY_DGA; -#endif - } - } - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); - - // Mac screen depth follows X depth - video_depth default_depth = VDEPTH_1BIT; - switch (DefaultDepth(x_display, screen)) { - case 8: - default_depth = VDEPTH_8BIT; - break; - case 15: case 16: - default_depth = VDEPTH_16BIT; - break; - case 24: case 32: - default_depth = VDEPTH_32BIT; - break; - } - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(512, 342, 0x80, 64, VDEPTH_1BIT); - else { - for (unsigned d=VDEPTH_1BIT; d<=VDEPTH_32BIT; d++) { - if (find_visual_for_depth(video_depth(d))) - add_window_modes(video_depth(d)); - } - } - } else - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - default_id = i->resolution_id; - break; - } - } - if (i == end) { // not found, use first available mode - default_depth = VideoModes[0].depth; - default_id = VideoModes[0].resolution_id; - } - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - int bits = 1 << i->depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", i->x, i->y, i->resolution_id, 1 << bits)); - } -#endif - - // Create X11_monitor_desc for this (the only) display - X11_monitor_desc *monitor = new X11_monitor_desc(VideoModes, default_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void X11_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - - // Stop redraw thread -#ifdef USE_PTHREADS_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - redraw_thread_cancel_ack = false; - pthread_join(redraw_thread, NULL); - while (!redraw_thread_cancel_ack) ; - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - XSync(x_display, false); - D(bug(" frame buffer unlocked\n")); - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Close display - delete drv; - drv = NULL; - - // Free colormaps - if (cmap[0]) { - XFreeColormap(x_display, cmap[0]); - cmap[0] = 0; - } - if (cmap[1]) { - XFreeColormap(x_display, cmap[1]); - cmap[1] = 0; - } -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - -#ifdef ENABLE_XF86_VIDMODE - // Free video mode list - if (x_video_modes) { - XFree(x_video_modes); - x_video_modes = NULL; - } -#endif - -#ifdef ENABLE_FBDEV_DGA - // Close framebuffer device - if (fbdev_fd >= 0) { - close(fbdev_fd); - fbdev_fd = -1; - } -#endif - - // Free depth list - if (avail_depths) { - XFree(avail_depths); - avail_depths = NULL; - } -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - - -/* - * Mac VBL interrupt - */ - -void VideoInterrupt(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} - - -/* - * Set palette - */ - -void X11_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - const video_mode &mode = get_current_mode(); - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - if (IsDirectMode(mode)) { - // If X is in 565 mode we have to stretch the gamma table from 32 to 64 entries - num_out = vis->map_entries; - stretch = true; - } - XColor *p = x_palette; - for (int i=0; ired = pal[c*3 + 0] * 0x0101; - p->green = pal[c*3 + 1] * 0x0101; - p->blue = pal[c*3 + 2] * 0x0101; - p++; - } - -#ifdef ENABLE_VOSF - // Recalculate pixel color expansion map - if (!IsDirectMode(mode) && xdepth > 8) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = map_rgb(pal[c*3+0], pal[c*3+1], pal[c*3+2], true); - } - - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } -#endif - - // Tell redraw thread to change palette - x_palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Switch video mode - */ - -void X11_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - video_close(); - video_open(); - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey - */ - -static int kc_decode(KeySym ks, bool key_down) -{ - switch (ks) { - case XK_A: case XK_a: return 0x00; - case XK_B: case XK_b: return 0x0b; - case XK_C: case XK_c: return 0x08; - case XK_D: case XK_d: return 0x02; - case XK_E: case XK_e: return 0x0e; - case XK_F: case XK_f: return 0x03; - case XK_G: case XK_g: return 0x05; - case XK_H: case XK_h: return 0x04; - case XK_I: case XK_i: return 0x22; - case XK_J: case XK_j: return 0x26; - case XK_K: case XK_k: return 0x28; - case XK_L: case XK_l: return 0x25; - case XK_M: case XK_m: return 0x2e; - case XK_N: case XK_n: return 0x2d; - case XK_O: case XK_o: return 0x1f; - case XK_P: case XK_p: return 0x23; - case XK_Q: case XK_q: return 0x0c; - case XK_R: case XK_r: return 0x0f; - case XK_S: case XK_s: return 0x01; - case XK_T: case XK_t: return 0x11; - case XK_U: case XK_u: return 0x20; - case XK_V: case XK_v: return 0x09; - case XK_W: case XK_w: return 0x0d; - case XK_X: case XK_x: return 0x07; - case XK_Y: case XK_y: return 0x10; - case XK_Z: case XK_z: return 0x06; - - case XK_1: case XK_exclam: return 0x12; - case XK_2: case XK_at: return 0x13; - case XK_3: case XK_numbersign: return 0x14; - case XK_4: case XK_dollar: return 0x15; - case XK_5: case XK_percent: return 0x17; - case XK_6: return 0x16; - case XK_7: return 0x1a; - case XK_8: return 0x1c; - case XK_9: return 0x19; - case XK_0: return 0x1d; - - case XK_grave: case XK_asciitilde: return 0x0a; - case XK_minus: case XK_underscore: return 0x1b; - case XK_equal: case XK_plus: return 0x18; - case XK_bracketleft: case XK_braceleft: return 0x21; - case XK_bracketright: case XK_braceright: return 0x1e; - case XK_backslash: case XK_bar: return 0x2a; - case XK_semicolon: case XK_colon: return 0x29; - case XK_apostrophe: case XK_quotedbl: return 0x27; - case XK_comma: case XK_less: return 0x2b; - case XK_period: case XK_greater: return 0x2f; - case XK_slash: case XK_question: return 0x2c; - - case XK_Tab: if (ctrl_down) {if (key_down) drv->suspend(); return -2;} else return 0x30; - case XK_Return: return 0x24; - case XK_space: return 0x31; - case XK_BackSpace: return 0x33; - - case XK_Delete: return 0x75; - case XK_Insert: return 0x72; - case XK_Home: case XK_Help: return 0x73; - case XK_End: return 0x77; -#ifdef __hpux - case XK_Prior: return 0x74; - case XK_Next: return 0x79; -#else - case XK_Page_Up: return 0x74; - case XK_Page_Down: return 0x79; -#endif - - case XK_Control_L: return 0x36; - case XK_Control_R: return 0x36; - case XK_Shift_L: return 0x38; - case XK_Shift_R: return 0x38; - case XK_Alt_L: return 0x37; - case XK_Alt_R: return 0x37; - case XK_Meta_L: return 0x3a; - case XK_Meta_R: return 0x3a; - case XK_Menu: return 0x32; - case XK_Caps_Lock: return 0x39; - case XK_Num_Lock: return 0x47; - - case XK_Up: return 0x3e; - case XK_Down: return 0x3d; - case XK_Left: return 0x3b; - case XK_Right: return 0x3c; - - case XK_Escape: if (ctrl_down) {if (key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - - case XK_F1: if (ctrl_down) {if (key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; - case XK_F2: return 0x78; - case XK_F3: return 0x63; - case XK_F4: return 0x76; - case XK_F5: if (ctrl_down) {if (key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; - case XK_F6: return 0x61; - case XK_F7: return 0x62; - case XK_F8: return 0x64; - case XK_F9: return 0x65; - case XK_F10: return 0x6d; - case XK_F11: return 0x67; - case XK_F12: return 0x6f; - - case XK_Print: return 0x69; - case XK_Scroll_Lock: return 0x6b; - case XK_Pause: return 0x71; - -#if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End) - case XK_KP_0: case XK_KP_Insert: return 0x52; - case XK_KP_1: case XK_KP_End: return 0x53; - case XK_KP_2: case XK_KP_Down: return 0x54; - case XK_KP_3: case XK_KP_Next: return 0x55; - case XK_KP_4: case XK_KP_Left: return 0x56; - case XK_KP_5: case XK_KP_Begin: return 0x57; - case XK_KP_6: case XK_KP_Right: return 0x58; - case XK_KP_7: case XK_KP_Home: return 0x59; - case XK_KP_8: case XK_KP_Up: return 0x5b; - case XK_KP_9: case XK_KP_Prior: return 0x5c; - case XK_KP_Decimal: case XK_KP_Delete: return 0x41; -#else - case XK_KP_0: return 0x52; - case XK_KP_1: return 0x53; - case XK_KP_2: return 0x54; - case XK_KP_3: return 0x55; - case XK_KP_4: return 0x56; - case XK_KP_5: return 0x57; - case XK_KP_6: return 0x58; - case XK_KP_7: return 0x59; - case XK_KP_8: return 0x5b; - case XK_KP_9: return 0x5c; - case XK_KP_Decimal: return 0x41; -#endif - case XK_KP_Add: return 0x45; - case XK_KP_Subtract: return 0x4e; - case XK_KP_Multiply: return 0x43; - case XK_KP_Divide: return 0x4b; - case XK_KP_Enter: return 0x4c; - case XK_KP_Equal: return 0x51; - } - return -1; -} - -static int event2keycode(XKeyEvent &ev, bool key_down) -{ - KeySym ks; - int i = 0; - - do { - ks = XLookupKeysym(&ev, i++); - int as = kc_decode(ks, key_down); - if (as >= 0) - return as; - if (as == -2) - return as; - } while (ks != NoSymbol); - - return -1; -} - - -/* - * X event handling - */ - -static void handle_events(void) -{ - for (;;) { - XEvent event; - XDisplayLock(); - - if (!XCheckMaskEvent(x_display, eventmask, &event)) { - // Handle clipboard events - if (XCheckTypedEvent(x_display, SelectionRequest, &event)) - ClipboardSelectionRequest(&event.xselectionrequest); - else if (XCheckTypedEvent(x_display, SelectionClear, &event)) - ClipboardSelectionClear(&event.xselectionclear); - - // Window "close" widget clicked - else if (XCheckTypedEvent(x_display, ClientMessage, &event)) { - if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) { - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - } - } - XDisplayUnlock(); - break; - } - - switch (event.type) { - - // Mouse button - case ButtonPress: { - unsigned int button = event.xbutton.button; - if (button < 4) - ADBMouseDown(button - 1); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.xmotion.x, event.xmotion.y); - break; - - // Mouse entered window - case EnterNotify: - if (event.xcrossing.mode != NotifyGrab && event.xcrossing.mode != NotifyUngrab) - drv->mouse_moved(event.xmotion.x, event.xmotion.y); - break; - - // Keyboard - case KeyPress: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case KeyRelease: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, false); - if (code >= 0 && code != 0x39) { // Don't propagate Caps Lock releases - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh of window - case Expose: - if (display_type == DISPLAY_WINDOW) { - const video_mode &mode = VideoMonitors[0]->get_current_mode(); -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } - else -#endif - if (frame_skip == 0) { // Dynamic refresh - int x1, y1; - for (y1=0; y1<16; y1++) - for (x1=0; x1<16; x1++) - updt_box[x1][y1] = true; - nr_boxes = 16 * 16; - } else // Static refresh - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } - break; - } - - XDisplayUnlock(); - } -} - - -/* - * Window display update - */ - -// Dynamic display update (variable frame rate for each box) -static void update_display_dynamic(int ticker, driver_window *drv) -{ - int y1, y2, y2s, y2a, i, x1, xm, xmo, ymo, yo, yi, yil, xi; - int xil = 0; - int rxm = 0, rxmo = 0; - const video_mode &mode = drv->monitor.get_current_mode(); - int bytes_per_row = mode.bytes_per_row; - int bytes_per_pixel = mode.bytes_per_row / mode.x; - int rx = mode.bytes_per_row / 16; - int ry = mode.y / 16; - int max_box; - - y2s = sm_uptd[ticker % 8]; - y2a = 8; - for (i = 0; i < 6; i++) { - if (ticker % (2 << i)) - break; - } - max_box = sm_no_boxes[i]; - - if (y2a) { - for (y1=0; y1<16; y1++) { - for (y2=y2s; y2 < ry; y2 += y2a) { - i = ((y1 * ry) + y2) * bytes_per_row; - for (x1=0; x1<16; x1++, i += rx) { - if (updt_box[x1][y1] == false) { - if (memcmp(&the_buffer_copy[i], &the_buffer[i], rx)) { - updt_box[x1][y1] = true; - nr_boxes++; - } - } - } - } - } - } - - XDisplayLock(); - if ((nr_boxes <= max_box) && (nr_boxes)) { - for (y1=0; y1<16; y1++) { - for (x1=0; x1<16; x1++) { - if (updt_box[x1][y1] == true) { - if (rxm == 0) - xm = x1; - rxm += rx; - updt_box[x1][y1] = false; - } - if (((updt_box[x1+1][y1] == false) || (x1 == 15)) && (rxm)) { - if ((rxmo != rxm) || (xmo != xm) || (yo != y1 - 1)) { - if (rxmo) { - xi = xmo * rx; - yi = ymo * ry; - xil = rxmo; - yil = (yo - ymo +1) * ry; - } - rxmo = rxm; - xmo = xm; - ymo = y1; - } - rxm = 0; - yo = y1; - } - if (xil) { - i = (yi * bytes_per_row) + xi; - for (y2=0; y2 < yil; y2++, i += bytes_per_row) - memcpy(&the_buffer_copy[i], &the_buffer[i], xil); - if (mode.depth == VDEPTH_1BIT) { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, xi * 8, yi, xi * 8, yi, xil * 8, yil, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, xi * 8, yi, xi * 8, yi, xil * 8, yil); - } else { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil); - } - xil = 0; - } - if ((x1 == 15) && (y1 == 15) && (rxmo)) { - x1--; - xi = xmo * rx; - yi = ymo * ry; - xil = rxmo; - yil = (yo - ymo +1) * ry; - rxmo = 0; - } - } - } - nr_boxes = 0; - } - XDisplayUnlock(); -} - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_window *drv) -{ - // Incremental update code - unsigned wide = 0, high = 0, x1, x2, y1, y2, i, j; - const video_mode &mode = drv->monitor.get_current_mode(); - int bytes_per_row = mode.bytes_per_row; - int bytes_per_pixel = mode.bytes_per_row / mode.x; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (j=0; j=y1; j--) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (mode.depth == VDEPTH_1BIT) { - x1 = mode.x - 1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; i<(x1>>3); i++) { - if (*p != *p2) { - x1 = i << 3; - break; - } - p++; p2++; - } - } - x2 = x1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (i=(mode.x>>3); i>(x2>>3); i--) { - p--; p2--; - if (*p != *p2) { - x2 = (i << 3) + 7; - break; - } - } - } - wide = x2 - x1 + 1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + (x1 >> 3); - memcpy(the_buffer_copy + i, the_buffer + i, wide >> 3); - } - } - - } else { - x1 = mode.x; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; ix2*bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - } - } - } - } - - // Refresh display - XDisplayLock(); - if (high && wide) { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, x1, y1, x1, y1, wide, high, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, x1, y1, x1, y1, wide, high); - } - XDisplayUnlock(); -} - - -/* - * Screen refresh functions - */ - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (x_palette_changed) { - x_palette_changed = false; - XDisplayLock(); - drv->update_palette(); - XDisplayUnlock(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); -} - -#ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(static_cast(drv)); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - XDisplayLock(); - LOCK_VOSF; - update_display_window_vosf(static_cast(drv)); - UNLOCK_VOSF; - XSync(x_display, false); // Let the server catch up - XDisplayUnlock(); - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - update_display_static(static_cast(drv)); - } -} - -static void video_refresh_window_dynamic(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (dynamic variant) - static int tick_counter = 0; - tick_counter++; - update_display_dynamic(tick_counter, static_cast(drv)); -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_DGA) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - if (frame_skip == 0) - video_refresh = video_refresh_window_dynamic; - else - video_refresh = video_refresh_window_static; - } -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Handle X events - handle_events(); - - // Handle palette changes - handle_palette_changes(); - - // Update display - video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifdef USE_PTHREADS_SERVICES -static void *redraw_func(void *arg) -{ - int fd = ConnectionNumber(x_display); - - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - int64 delay = next - GetTicks_usec(); - if (delay < -VIDEO_REFRESH_DELAY) { - - // We are lagging far behind, so we reset the delay mechanism - next = GetTicks_usec(); - - } else if (delay <= 0) { - - // Delay expired, refresh display - handle_events(); - handle_palette_changes(); - video_refresh(); - next += VIDEO_REFRESH_DELAY; - ticks++; - - } else { - - // No display refresh pending, check for X events - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 0; - timeout.tv_usec = delay; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) - handle_events(); - } - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - - redraw_thread_cancel_ack = true; - return NULL; -} -#endif diff --git a/BasiliskII/src/Windows/BasiliskII.DebugJIT.props b/BasiliskII/src/Windows/BasiliskII.DebugJIT.props deleted file mode 100644 index 124285ea9..000000000 --- a/BasiliskII/src/Windows/BasiliskII.DebugJIT.props +++ /dev/null @@ -1,14 +0,0 @@ - - - - - $(ProjectDir)Debug\ - - - - - - $(ToolsDir) - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/BasiliskII.ReleaseJIT.props b/BasiliskII/src/Windows/BasiliskII.ReleaseJIT.props deleted file mode 100644 index c67b53612..000000000 --- a/BasiliskII/src/Windows/BasiliskII.ReleaseJIT.props +++ /dev/null @@ -1,14 +0,0 @@ - - - - - $(ProjectDir)Release\ - - - - - - $(ToolsDir) - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/BasiliskII.ico b/BasiliskII/src/Windows/BasiliskII.ico deleted file mode 100755 index eb3ac0ef065e17dd4d66a244ce6c30c3f4a2c710..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2998 zcmc(gzi-?46~G@&0}=>=A}w5cgGe}%5ttqv+26s+R>U!I=OC~&WKMAd5unf^mWI>N zL8*Wo$D#!SaJ!)`+ToV`1)grWa88zH%5a56!Sz&PT{vtR8Q(>G?%F;N)0GP~oN+%?FYJx4;B z?f1p`?ZTLd6Z*+uFpxzTK^Qv3p7p-Sno1I`n(*i?5S+RW2C+wW6};JmQm9hvOQ^MQ#lQ1dXH zJ$0lRN^=o$bR3xu9H>RwT&Tm@wnTeT2)?cFNI=c1OyivO^As!+1 z*w$z+a0-yiq(5gDhwPyYq(ANT(MlA$t~8qi;;X$Z`WQHFF0-dOfK80UnGAC5_f0Ns z)BIExgW2raWUyHLV&2ZDv*y7fAIw$1{b~Mu-k8tw#ns0*Wp2)A3Xc&Crgw6oa;a5oZ)B9*Z&vM9Hkn}R~vU8?VO+e?M#0B{?D?$zE1g? z;`=_0isaU7ZFc=sN z34_7|&Mm5@BE4`*9mtqxS=F0iwu zCU*f-LDGT*1xy9G3zP-93vw6aw(YRFk(0k5e?fk2Q9=HK+7vJpFcj25+eTIF+aqD; zu5F|SCHYF&N;pdL+14rtH7MaIm4g?v?Z&BurG%vfq9mam0a!{LON>ecB`o}L5r>|X zu#{R4%c9euT|fpy4MPn>4MPn>4TBvg7)lsw7-|?w7zo3KJq$GrH4HTjgyupHLk&X> zLk&Pp{*qudjx|OZF*42>9JP(DHksU(Kgp9PPlTTsdGX?fynOjmUcY`VuU@^9w{PFd zyLa#8{rmTFets?=K75dmA3w^E|ET4U-+aUOcusZoJD?l!>`CM5u@>+Dtc%b6Zn{Ba zRuCt>RBsz8o9}tuz-xT+Su5Ro=&}yebjNjjakArXIZ2%OUW$JC*{@rv>yDOP?z+-A z=k*t*PRS^BVV)cz^BVm_|<9*cTY|xlU92PBa~>j90&Fr zeRX;|bPxUW(N?#0UR5i1a^L7rhVJRw?e_A>=>`ANQ%SFy z3cp(L-E{-+T;rm)@dNKVeK+ypb9ZmIj}=Vy?D$_V!r;G4_#;;pM_91m&{IXfQJqd& zaVrSMN8LDXjjPd?bM3E1_8Oz%vXyABx*9Zi;CBB_t^T`{mY*cOUc&NY$9nUAaZIOe z{$z*~0lFK9tu&y1DGBVX5>xrQfxcop8Xs>&>Obr< zr;3blXD47P^*IUBWz{18DSd0{z_f$*VbJ3#_Q&JE?;TgwanKks04HgBd>#Y|{|MuD z(r$UguQ`P*I|Z7?54)nRn8JghD% zESFbROZ%&{;qF$|)zL%T#-D^qL?1g$!&Rj9!Chh}7 axzyF^H27RLIv1UWJvSP^=jY&OUH=5W%Erh5 diff --git a/BasiliskII/src/Windows/BasiliskII.props b/BasiliskII/src/Windows/BasiliskII.props deleted file mode 100644 index 345f9f060..000000000 --- a/BasiliskII/src/Windows/BasiliskII.props +++ /dev/null @@ -1,14 +0,0 @@ - - - - - $(OutDir) - - - - - - $(ToolsDir) - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/BasiliskII.rc b/BasiliskII/src/Windows/BasiliskII.rc deleted file mode 100644 index ae955c535..000000000 --- a/BasiliskII/src/Windows/BasiliskII.rc +++ /dev/null @@ -1,2 +0,0 @@ -BasiliskII ICON PRELOAD "BasiliskII.ico" - diff --git a/BasiliskII/src/Windows/BasiliskII.sln b/BasiliskII/src/Windows/BasiliskII.sln deleted file mode 100644 index 1c4b7a1f9..000000000 --- a/BasiliskII/src/Windows/BasiliskII.sln +++ /dev/null @@ -1,140 +0,0 @@ - -Microsoft Visual Studio Solution File, Format Version 12.00 -# Visual Studio 14 -VisualStudioVersion = 14.0.23107.0 -MinimumVisualStudioVersion = 10.0.40219.1 -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BasiliskII", "BasiliskII.vcxproj", "{1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}" - ProjectSection(ProjectDependencies) = postProject - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} = {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} = {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "build68k", "build68k.vcxproj", "{7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}" -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencpu", "gencpu.vcxproj", "{1A9EA738-8DA7-422F-9E0D-BE92893C0E48}" - ProjectSection(ProjectDependencies) = postProject - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "gencomp", "gencomp.vcxproj", "{95933FE9-C27C-41F0-B4AF-EAAADE94FD04}" - ProjectSection(ProjectDependencies) = postProject - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} = {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} - EndProjectSection -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDLmain", "..\..\..\..\SDL-1.2.15\VisualC\SDLmain\SDLmain.vcxproj", "{DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}" -EndProject -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SDL", "..\..\..\..\SDL-1.2.15\VisualC\SDL\SDL.vcxproj", "{81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}" -EndProject -Global - GlobalSection(SolutionConfigurationPlatforms) = preSolution - Debug JIT|x64 = Debug JIT|x64 - Debug JIT|x86 = Debug JIT|x86 - Debug|x64 = Debug|x64 - Debug|x86 = Debug|x86 - Release JIT|x64 = Release JIT|x64 - Release JIT|x86 = Release JIT|x86 - Release|x64 = Release|x64 - Release|x86 = Release|x86 - EndGlobalSection - GlobalSection(ProjectConfigurationPlatforms) = postSolution - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.ActiveCfg = Debug JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x64.Build.0 = Debug JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.ActiveCfg = Debug JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug JIT|x86.Build.0 = Debug JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.ActiveCfg = Debug|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x64.Build.0 = Debug|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.ActiveCfg = Debug|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Debug|x86.Build.0 = Debug|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.ActiveCfg = Release JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x64.Build.0 = Release JIT|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.ActiveCfg = Release JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release JIT|x86.Build.0 = Release JIT|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.ActiveCfg = Release|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x64.Build.0 = Release|x64 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.ActiveCfg = Release|Win32 - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0}.Release|x86.Build.0 = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.ActiveCfg = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x64.Build.0 = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug JIT|x86.Build.0 = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.ActiveCfg = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x64.Build.0 = Debug|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.ActiveCfg = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Debug|x86.Build.0 = Debug|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.ActiveCfg = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x64.Build.0 = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.ActiveCfg = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release JIT|x86.Build.0 = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.ActiveCfg = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x64.Build.0 = Release|x64 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.ActiveCfg = Release|Win32 - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0}.Release|x86.Build.0 = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.ActiveCfg = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x64.Build.0 = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug JIT|x86.Build.0 = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.ActiveCfg = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x64.Build.0 = Debug|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.ActiveCfg = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Debug|x86.Build.0 = Debug|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.ActiveCfg = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x64.Build.0 = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.ActiveCfg = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release JIT|x86.Build.0 = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.ActiveCfg = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x64.Build.0 = Release|x64 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.ActiveCfg = Release|Win32 - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48}.Release|x86.Build.0 = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.ActiveCfg = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x64.Build.0 = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug JIT|x86.Build.0 = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.ActiveCfg = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x64.Build.0 = Debug|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.ActiveCfg = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Debug|x86.Build.0 = Debug|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.ActiveCfg = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x64.Build.0 = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.ActiveCfg = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release JIT|x86.Build.0 = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.ActiveCfg = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x64.Build.0 = Release|x64 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.ActiveCfg = Release|Win32 - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04}.Release|x86.Build.0 = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.ActiveCfg = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x64.Build.0 = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug JIT|x86.Build.0 = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.ActiveCfg = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x64.Build.0 = Debug|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.ActiveCfg = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Debug|x86.Build.0 = Debug|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.ActiveCfg = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x64.Build.0 = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.ActiveCfg = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release JIT|x86.Build.0 = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.ActiveCfg = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x64.Build.0 = Release|x64 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.ActiveCfg = Release|Win32 - {DA956FD3-E142-46F2-9DD5-C78BEBB56B7A}.Release|x86.Build.0 = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.ActiveCfg = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x64.Build.0 = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.ActiveCfg = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug JIT|x86.Build.0 = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.ActiveCfg = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x64.Build.0 = Debug|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.ActiveCfg = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Debug|x86.Build.0 = Debug|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.ActiveCfg = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x64.Build.0 = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.ActiveCfg = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release JIT|x86.Build.0 = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.ActiveCfg = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x64.Build.0 = Release|x64 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.ActiveCfg = Release|Win32 - {81CE8DAF-EBB2-4761-8E45-B71ABCCA8C68}.Release|x86.Build.0 = Release|Win32 - EndGlobalSection - GlobalSection(SolutionProperties) = preSolution - HideSolutionNode = FALSE - EndGlobalSection -EndGlobal diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj b/BasiliskII/src/Windows/BasiliskII.vcxproj deleted file mode 100644 index cd05c309f..000000000 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj +++ /dev/null @@ -1,685 +0,0 @@ - - - - - Debug JIT - Win32 - - - Debug JIT - x64 - - - Debug - Win32 - - - Debug - x64 - - - Release JIT - Win32 - - - Release JIT - x64 - - - Release - Win32 - - - Release - x64 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - true - true - true - true - - - true - true - true - true - true - true - true - true - - - true - true - true - true - - - true - true - true - true - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - {81ce8daf-ebb2-4761-8e45-b71abcca8c68} - - - {da956fd3-e142-46f2-9dd5-c78bebb56b7a} - - - - {1AAA5D96-9498-4EB5-A436-0143E2B7A0B0} - Win32Proj - BasiliskII - 8.1 - - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - true - v140_xp - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - Application - false - v140_xp - true - Unicode - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - true - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - true - - - true - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - true - - - false - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - false - - - false - $(Configuration)\$(ProjectName)\ - ClCompile - - - ClCompile - false - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - - Level3 - Disabled - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;USE_JIT;USE_JIT_FPU;JIT_DEBUG;WIN32;_DEBUG;_WINDOWS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - Level3 - - - MaxSpeed - true - true - HAVE_CONFIG_H;DIRECT_ADDRESSING;UNALIGNED_PROFITABLE;MSVC_INTRINSICS;OPTIMIZED_FLAGS;SAHF_SETO_PROFITABLE;FPU_IEEE;_CRT_SECURE_NO_WARNINGS;_CRT_NONSTDC_NO_WARNINGS;WIN32;_WINDOWS;NDEBUG;OPTIMIZED_FLAGS;USE_JIT;USE_JIT_FPU;%(PreprocessorDefinitions) - ..\include;..\uae_cpu;.;..\CrossPlatform;..\slirp;..\..\..\..\SDL-1.2.15\include - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - $(IntDir)%(RelativeDir) - - - Windows - true - true - true - WS2_32.lib;IPHlpApi.lib;%(AdditionalDependencies) - - - cd ..\uae_cpu -"$(ToolsDir)gencpu" -"$(ToolsDir)gencomp" - - - - Generating CPU emulation sources... - - - ..\uae_cpu\cpustbl.cpp;..\uae_cpu\cpustbl_nf.cpp;..\uae_cpu\cputbl.h;..\uae_cpu\cpuemu.cpp;..\uae_cpu\cpuemu_nf.cpp;..\uae_cpu\compstbl.cpp;..\uae_cpu\comptbl.h;..\uae_cpu\compemu.cpp;%(Outputs) - - - $(ToolsDir)gencpu.exe;$(ToolsDir)gencomp.exe - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj.filters b/BasiliskII/src/Windows/BasiliskII.vcxproj.filters deleted file mode 100644 index 50eae3d1a..000000000 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj.filters +++ /dev/null @@ -1,589 +0,0 @@ - - - - - {4FC737F1-C7A5-4376-A066-2A32D752A2FF} - cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx - - - {93995380-89BD-4b04-88EB-625FBE52EBFB} - h;hh;hpp;hxx;hm;inl;inc;xsd - - - {67DA6AB6-F800-4c08-8B7A-83BB121AAD01} - rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms - - - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - Source Files - - - - - Resource Files - - - - - Resource Files - - - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - Header Files - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/BasiliskIIGUI.ico b/BasiliskII/src/Windows/BasiliskIIGUI.ico deleted file mode 100755 index 67d4c55fab03db3146193a2c8fcfc69907eaabc3..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1078 zcmchWJ#vIF422(?%(zQ90##;@kt4aI_0fEslqu7ZPqGc(#SJMUkfo~K;7@qcE31@<9aF-IC#51-QI&H>nq%`<+h!WfVQh$Ucf(}0+9O}TOLWlj#9k%d?_(vS@ zhtB_uPxal<*Ed7Oev8uSQNQgbmCE;P?Qr=cz4!c0+y9GgUz_t8Uf?$88GTHN8OOs+ zyI@7VHs?NE)M(_bp)q{oDCCYUpxD>wQo&^eIyQw6C(kdq=CwL?pBy+RocOn|vgQ2( DRT%bz diff --git a/BasiliskII/src/Windows/BasiliskIIGUI.rc b/BasiliskII/src/Windows/BasiliskIIGUI.rc deleted file mode 100644 index 2a0e5586c..000000000 --- a/BasiliskII/src/Windows/BasiliskIIGUI.rc +++ /dev/null @@ -1,2 +0,0 @@ -BasiliskIIGUI ICON PRELOAD "BasiliskIIGUI.ico" - diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in deleted file mode 100755 index dfa59a60e..000000000 --- a/BasiliskII/src/Windows/Makefile.in +++ /dev/null @@ -1,236 +0,0 @@ -# Windows Makefile for Basilisk II - -## System specific configuration - -SHELL = /bin/sh - -prefix = @prefix@ -exec_prefix = @exec_prefix@ -bindir = @bindir@ -datadir = @datadir@ -mandir = @mandir@ -man1dir = $(mandir)/man1 - -KEYCODES = ../SDL/keycodes - -DESTDIR = - -SDL_CFLAGS = @SDL_CFLAGS@ -SDL_LIBS = @SDL_LIBS@ -WANT_GTK = @WANT_GTK@ -GTK_CFLAGS = @GTK_CFLAGS@ -GTK_LIBS = @GTK_LIBS@ - -SLIRP_CFLAGS = @SLIRP_CFLAGS@ -SLIRP_SRCS = \ - ../slirp/bootp.c ../slirp/ip_output.c ../slirp/tcp_input.c \ - ../slirp/cksum.c ../slirp/mbuf.c ../slirp/tcp_output.c \ - ../slirp/debug.c ../slirp/misc.c ../slirp/tcp_subr.c \ - ../slirp/if.c ../slirp/sbuf.c ../slirp/tcp_timer.c \ - ../slirp/ip_icmp.c ../slirp/slirp.c ../slirp/tftp.c \ - ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c -SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=$(OBJ_DIR)/slirp-%.o) - -LN_S = @LN_S@ -WINDRES = @WINDRES@ -CC = @CC@ -CXX = @CXX@ -CFLAGS = @CFLAGS@ $(SDL_CFLAGS) -CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform @CPUINCLUDES@ -I../slirp -DEFS = @DEFS@ @DEFINES@ -LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -lwsock32 -liphlpapi -CPUSRCS = @CPUSRCS@ - -HOST_CC = gcc -HOST_CXX = g++ -HOST_CFLAGS = -O2 -HOST_CXXFLAGS = -O2 -HOST_LDFLAGS = - -## Files -XPLATSRCS = vm_alloc.cpp vm_alloc.h sigsegv.cpp sigsegv.h video_vosf.h video_blit.cpp video_blit.h - -CDENABLESRCS = cdenable/cache.cpp cdenable/eject_nt.cpp cdenable/ntcd.cpp - -ROUTERSRCS = router/arp.cpp router/dump.cpp router/dynsockets.cpp router/ftp.cpp \ - router/icmp.cpp router/mib/interfaces.cpp router/iphelp.cpp router/ipsocket.cpp \ - router/mib/mibaccess.cpp router/router.cpp router/tcp.cpp router/udp.cpp b2ether/packet32.cpp - -SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_windows.cpp \ - sys_windows.cpp ../rom_patches.cpp ../slot_rom.cpp ../rsrc_patches.cpp \ - ../emul_op.cpp ../macos_util.cpp ../xpram.cpp xpram_windows.cpp ../timer.cpp \ - timer_windows.cpp ../adb.cpp ../serial.cpp serial_windows.cpp \ - ../ether.cpp ether_windows.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp \ - ../scsi.cpp ../dummy/scsi_dummy.cpp ../video.cpp ../SDL/video_sdl.cpp \ - video_blit.cpp ../audio.cpp ../SDL/audio_sdl.cpp clip_windows.cpp \ - ../extfs.cpp extfs_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ - vm_alloc.cpp sigsegv.cpp posix_emu.cpp util_windows.cpp \ - ../dummy/prefs_editor_dummy.cpp BasiliskII.rc \ - $(CDENABLESRCS) $(ROUTERSRCS) $(CPUSRCS) $(SLIRP_OBJS) - -UI_SRCS = ../prefs.cpp prefs_windows.cpp prefs_editor_gtk.cpp xpram_windows.cpp \ - ../prefs_items.cpp ../user_strings.cpp user_strings_windows.cpp util_windows.cpp \ - b2ether/Packet32.cpp BasiliskIIGUI.rc - -UI_APP = BasiliskIIGUI.exe - -APP = BasiliskII.exe - -PROGS = $(APP) - -ifeq ($(WANT_GTK),yes) -PROGS += $(UI_APP) -endif - -## Rules -.PHONY: modules install installdirs uninstall mostlyclean clean distclean depend dep -.SUFFIXES: -.SUFFIXES: .c .cpp .s .o .h - -all: $(PROGS) - -$(XPLATSRCS): %: ../CrossPlatform/% - $(LN_S) $< $@ - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS = $(SRCS_LIST_TO_OBJS) - -define UI_SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(UI_SRCS), \ - $(basename $(notdir $(file)))))) -endef -UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -$(APP): $(XPLATSRCS) $(OBJ_DIR) $(OBJS) - $(CXX) -o $@ $(LDFLAGS) $(OBJS) $(LIBS) $(SDL_LIBS) - -$(UI_APP): $(XPLATSRCS) $(OBJ_DIR) $(UI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) $(GTK_LIBS) -mwindows -mno-cygwin - -mostlyclean: - rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak - -clean: mostlyclean - rm -f $(XPLATSRCS) - rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h compemu.cpp compstbl.cpp comptbl.h - -distclean: clean - rm -rf $(OBJ_DIR) - rm -rf autom4te.cache - rm -f Makefile - rm -f config.cache config.log config.status config.h - -depend dep: - makedepend $(CPPFLAGS) -Y. $(SRCS) 2>/dev/null - -$(OBJ_DIR)/%.ho : %.c - $(HOST_CC) $(CPPFLAGS) $(DEFS) $(HOST_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.ho : %.cpp - $(HOST_CXX) $(CPPFLAGS) $(DEFS) $(HOST_CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/slirp-%.o : ../slirp/%.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(SLIRP_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.s - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/prefs_editor_gtk.o: prefs_editor_gtk.cpp - $(CXX) -O2 -mno-cygwin -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ - -# Windows resources -$(OBJ_DIR)/%.o: %.rc - $(WINDRES) --include-dir ../Windows -i $< -o $@ -$(OBJ_DIR)/build68k.exe: $(OBJ_DIR)/build68k.ho - $(HOST_CC) $(HOST_LDFLAGS) -o $@ $< -$(OBJ_DIR)/gencpu.exe: $(OBJ_DIR)/gencpu.ho $(OBJ_DIR)/readcpu.ho $(OBJ_DIR)/cpudefs.ho - $(HOST_CXX) $(HOST_LDFLAGS) -o $@ $(OBJ_DIR)/gencpu.ho $(OBJ_DIR)/readcpu.ho $(OBJ_DIR)/cpudefs.ho -$(OBJ_DIR)/gencomp.exe: $(OBJ_DIR)/gencomp.ho $(OBJ_DIR)/readcpu.ho $(OBJ_DIR)/cpudefs.ho - $(HOST_CXX) $(HOST_LDFLAGS) -o $@ $(OBJ_DIR)/gencomp.ho $(OBJ_DIR)/readcpu.ho $(OBJ_DIR)/cpudefs.ho - -cpudefs.cpp: $(OBJ_DIR)/build68k.exe ../uae_cpu/table68k - $(OBJ_DIR)/build68k.exe ../uae_cpu/table68k >cpudefs.cpp -cpustbl.cpp: cpuemu.cpp -cpustbl_nf.cpp: cpustbl.cpp -compstbl.cpp: compemu.cpp -cputbl.h: cpuemu.cpp -comptbl.h: compemu.cpp - -cpuemu.cpp: $(OBJ_DIR)/gencpu.exe - $(OBJ_DIR)/gencpu.exe - -compemu.cpp: $(OBJ_DIR)/gencomp.exe - $(OBJ_DIR)/gencomp.exe - -$(OBJ_DIR)/cpustbl_nf.o: cpustbl.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -DNOFLAGS -c $< -o $@ - -$(OBJ_DIR)/compemu_support.o: compemu_support.cpp comptbl.h - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/cpuemu1.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu2.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu3.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu4.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu5.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu6.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu7.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu8.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/cpuemu1_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu2_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu3_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu4_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu5_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu6_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu7_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuemu8_nf.o: cpuemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 -DNOFLAGS $(CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/compemu1.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_1 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu2.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_2 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu3.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_3 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu4.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_4 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu5.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_5 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu6.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_6 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu7.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_7 $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/compemu8.o: compemu.cpp - $(CXX) $(CPPFLAGS) $(DEFS) -DPART_8 $(CXXFLAGS) -c $< -o $@ - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/BasiliskII/src/Windows/b2ether/driver/DEBUG.H b/BasiliskII/src/Windows/b2ether/driver/DEBUG.H deleted file mode 100755 index 0a12c7370..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/DEBUG.H +++ /dev/null @@ -1,43 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -#if DBG - -#define IF_PACKETDEBUG(f) if (PacketDebugFlag & (f)) -extern ULONG PacketDebugFlag; - -#define PACKET_DEBUG_LOUD 0x00000001 // debugging info -#define PACKET_DEBUG_VERY_LOUD 0x00000002 // excessive debugging info - -#define PACKET_DEBUG_INIT 0x00000100 // init debugging info - -#define IF_LOUD(A) IF_PACKETDEBUG( PACKET_DEBUG_LOUD ) { A } -#define IF_VERY_LOUD(A) IF_PACKETDEBUG( PACKET_DEBUG_VERY_LOUD ) { A } -#define IF_INIT_LOUD(A) IF_PACKETDEBUG( PACKET_DEBUG_INIT ) { A } - -#else - -#define IF_LOUD(A) -#define IF_VERY_LOUD(A) -#define IF_INIT_LOUD(A) - -#endif diff --git a/BasiliskII/src/Windows/b2ether/driver/MAKEFILE b/BasiliskII/src/Windows/b2ether/driver/MAKEFILE deleted file mode 100755 index 9c985f57b..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/MAKEFILE +++ /dev/null @@ -1,7 +0,0 @@ -# -# DO NOT EDIT THIS FILE!!! Edit .\sources. if you want to add a new source -# file to this component. This file merely indirects to the real make file -# that is shared by all the driver components of the Windows NT DDK -# - -!INCLUDE $(NTMAKEENV)\makefile.def diff --git a/BasiliskII/src/Windows/b2ether/driver/OEMSETUP.INF b/BasiliskII/src/Windows/b2ether/driver/OEMSETUP.INF deleted file mode 100755 index 18a21ce76..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/OEMSETUP.INF +++ /dev/null @@ -1,430 +0,0 @@ -[Identification] -OptionType = NetService - -[Options] -B2ETHER - -[FileConstants] -UtilityInf = "UTILITY.INF" -subroutineinf = "SUBROUTN.INF" -SoftwareType = "service" -Exit_Code = 0 -NetEventDLL = "%SystemRoot%\System32\netevent.dll" -Manufacturer = "Microsoft" -ProductMajorVersion = "4" -ProductMinorVersion = "0" -ProductVersion = $(ProductMajorVersion)"."$(ProductMinorVersion) - -ProductSoftwareName = "B2Ether" -ProductSoftwareImagePath = "\SystemRoot\System32\drivers\B2Ether.sys" - -NetRuleSoftwareType = "B2Ether lmNetService ndisTransport" -NetRuleSoftwareClass = {"rasCapableTransport ndisTransport"} - -NetRuleSoftwareUse = "service yes yes" -NetRuleSoftwareBindForm = """B2Ether"" yes yes simple" - -ProductKeyName = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion" -ParamKeyName = $(!NTN_ServiceBase)"\"$(ProductSoftwareName)"\Parameters" - -[GeneralConstants] -from = "" -to = "" -ExitCodeOk = 0 -ExitCodeCancel = 1 -ExitCodeFatal = 2 -KeyNull = "" -MAXIMUM_ALLOWED = 33554432 -RegistryErrorIndex = NO_ERROR -KeyProduct = "" -KeyParameters = "" -TRUE = 1 -FALSE = 0 -NoTitle = 0 -ExitState = "Active" -OldVersionExisted = $(FALSE) -DriverPath = $(!STF_NTPATH)\drivers - -[date] -Now = {} ? $(!LIBHANDLE) GetSystemDate - -[Identify] -read-syms Identification -set Status = STATUS_SUCCESSFUL -set Identifier = $(OptionType) -set Media = #("Source Media Descriptions", 1, 1) -Return $(Status) $(Identifier) $(Media) - -[ReturnOptions] - set Status = STATUS_FAILED - set OptionList = {} - set OptionTextList = {} - set LanguageList = ^(LanguagesSupported, 1) - Ifcontains(i) $($0) in $(LanguageList) - goto returnoptions - else - set Status = STATUS_NOLANGUAGE - goto finish_ReturnOptions - endif -returnoptions = + - set OptionList = ^(Options, 1) - set OptionTextList = ^(OptionsText$($0), 1) - set Status = STATUS_SUCCESSFUL -finish_ReturnOptions = + - Return $(Status) $(OptionList) $(OptionTextList) - -[InstallOption] - set Option = $($1) - set SrcDir = $($2) - set AddCopy = $($3) - set DoCopy = $($4) - set DoConfig = $($5) - set LanguageList = ^(LanguagesSupported, 1) - Ifcontains(i) $($0) NOT-IN $(LanguageList) - Return STATUS_NOLANGUAGE - endif - Debug-Output "OEMSETUP.INF: STF_CWDDIR is: "$(!STF_CWDDIR) - Debug-Output "OEMSETUP.INF: STF_LANGUAGE is: "$(!STF_LANGUAGE) - set-subst LF = "\n" - read-syms GeneralConstants - read-syms FileConstants - read-syms DialogConstants$(!STF_LANGUAGE) - ifstr(i) $(!NTN_Origination) == "NCPA" - set Continue = $(OK) - endif - read-syms FileConstants$(!STF_LANGUAGE) - detect date - set-title $(FunctionTitle) - set to = Begin - set from = Begin - set CommonStatus = STATUS_SUCCESSFUL - EndWait -Begin = + - Ifstr(i) $(!NTN_InstallMode) == deinstall - set StartLabel = removeadapter - else-Ifstr(i) $(!NTN_InstallMode) == Update - set StartLabel = UpgradeSoftware - else-Ifstr(i) $(!NTN_InstallMode) == bind - set StartLabel = bindingadapter - else-Ifstr(i) $(!NTN_InstallMode) == configure - Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE - ifint $($ShellCode) != $(!SHELL_CODE_OK) - Debug-Output "OEMSETUP.INF: ShellCode error: cannot get an error string." - goto ShellCodeError - endif - set Error = $($R0) - set from = end - set to = end - goto nonfatalinfo - else - set StartLabel = installadapter - endif - set RadioDefault = 2 - set RadioIn = {$(RadioDefault)} - set from = $(fatal) - set to = $(fatal) - goto $(StartLabel) -installadapter = + - OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct - Ifstr $(KeyProduct) != $(KeyNull) - CloseRegKey $(KeyProduct) - Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+ - $(ProductVersion) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - Debug-Output "ShellCode error: cannot get an error string." - goto ShellCodeError - endif - goto end - endif - CloseRegKey $(KeyProduct) - goto installproduct -installproduct = + - StartWait - ifint $(OldVersionExisted) == $(FALSE) - Ifstr(i) $(DoCopy) == "YES" - Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR), $(SrcDir) YES - Ifint $($ShellCode) != $(!SHELL_CODE_OK) - Goto ShellCodeError - Else-Ifstr(i) $($R0) == STATUS_FAILED - Shell $(UtilityInf) RegistryErrorString "ASK_SOURCE_FAIL" - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - set Error = $($R0) - Goto fatal - Else-Ifstr(i) $($R0) == STATUS_USERCANCEL - Goto successful - Endif - Set SrcDir = $($R1) - Endif - install "Install-Option" - ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS - Shell $(UtilityInf) RegistryErrorString "UNABLE_COPY_FILE" - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - set Error = $($R0) - goto fatal - endif - set OEM_ABANDON_ON = TRUE - Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), + - $(ProductSoftwareName), + - $(ProductSoftwareName), + - $(ProductSoftwareDisplayName), $(STF_CONTEXTINFNAME), + - $(ProductSoftwareImagePath), "kernel", "TDI", {}, "",+ - $(NetEventDLL) - set RegistryErrorIndex = $($R0) - Ifstr(i) $(RegistryErrorIndex) != NO_ERROR - EndWait - CloseRegKey $($R1) - CloseRegKey $($R2) - CloseRegKey $($R3) - CloseRegKey $($R4) - CloseRegKey $($R5) - goto fatalRegistry - endif - Set SoftProductKey = $($R1) - Set SoftNetRuleKey = $($R2) - Set SoftServiceKey = $($R3) - set KeyParameters = $($R4) - Set SoftLinkageKey = $($R5) - set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+ - {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+ - {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+ - {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+ - {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+ - {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+ - {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}} - Shell $(UtilityInf), AddValueList, $(SoftProductKey), $(NewValueList) - set RegistryErrorIndex = $($R0) - Ifstr $(RegistryErrorIndex) != NO_ERROR - CloseRegKey $(SoftProductKey) - CloseRegKey $(SoftNetRuleKey) - CloseRegKey $(SoftServiceKey) - CloseRegKey $(SoftLinkageKey) - CloseRegKey $(KeyParameters) - goto fatalRegistry - endif - set NewValueList = {{type ,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)}, + - {use ,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, + - {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, + - {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}} - Shell $(UtilityInf), AddValueList, $(SoftNetRuleKey), $(NewValueList) - set RegistryErrorIndex = $($R0) - Ifstr $(RegistryErrorIndex) != NO_ERROR - CloseRegKey $(SoftProductKey) - CloseRegKey $(SoftNetRuleKey) - CloseRegKey $(SoftServiceKey) - CloseRegKey $(SoftLinkageKey) - CloseRegKey $(KeyParameters) - goto fatalRegistry - endif - Set NewValueList = {{Author,$(NoTitle),$(!REG_VT_SZ),"Lauri Pesonen"}} - Shell $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList) - Ifstr $(RegistryErrorIndex) != NO_ERROR - CloseRegKey $(SoftProductKey) - CloseRegKey $(SoftNetRuleKey) - CloseRegKey $(SoftServiceKey) - CloseRegKey $(SoftLinkageKey) - goto fatalRegistry - endif - CloseRegKey $(SoftProductKey) - CloseRegKey $(SoftNetRuleKey) - CloseRegKey $(SoftServiceKey) - CloseRegKey $(SoftLinkageKey) - endif - goto writeparameters -writeparameters = + - CloseRegKey $(KeyParameters) - EndWait - goto successful -bindingadapter =+ - set Error = "Binding: Sorry, not yet implemented." - goto fatal -removeadapter = + - Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), + - $(ProductSoftwareName) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - Debug-Output "ShellCode error" - goto ShellCodeError - endif - set RegistryErrorIndex = $($R0) - Ifstr(i) $(RegistryErrorIndex) != NO_ERROR - goto fatalregistry - endif - goto end -UpgradeSoftware = + - ifstr(i) $(ProductKeyName) == $(!NTN_RegBase) - OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct - Ifstr $(KeyProduct) != $(KeyNull) - GetRegValue $(KeyProduct),"MajorVersion", VersionInfo - set Version = *($(VersionInfo), 4) - Shell $(UtilityInf), GetInfFileNameFromRegistry, $(KeyProduct) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - Debug-Output "ShellCode error" - goto ShellCodeError - endif - set !UG_Filename = $($R0) - ifstr(i) $(!UG_Filename) != "" - install "Install-Update" - ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS - goto fatal - endif - endif - SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)} - SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)} - ifint $(Version) != $(ProductVersion) - endif - CloseRegKey $(KeyProduct) - else - goto fatalregistry - endif - endif - goto end -successful = + - goto end -warning = + - Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - ifstr(i) $($R1) == "OK" - goto $(to) - else-ifstr(i) $($R1) == "CANCEL" - goto $(from) - else - goto "end" - endif -nonfatalinfo = + - Set CommonStatus = STATUS_USERCANCEL - Set Severity = STATUS - goto nonfatalmsg -nonfatal = + - Set Severity = NONFATAL - goto nonfatalmsg -nonfatalmsg = + - ifstr(i) $(Error) == "" - Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL" - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - set Error = $($R0) - endif - Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), $(Severity), $(Error) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - ifstr(i) $($R1) == "OK" - goto $(from) - else - goto "end" - endif -fatalregistry = + - Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - set Error = $($R0) - goto fatal -fatal = + - ifstr(i) $(Error) == "" - Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL" - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - set Error = $($R0) - endif - Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error) - ifint $($ShellCode) != $(!SHELL_CODE_OK) - goto ShellCodeError - endif - goto setfailed -ShellCodeError = + - set DlgType = "MessageBox" - set STF_MB_TITLE = $(ShellCodeErrorTitle) - set STF_MB_TEXT = $(ShellCodeErrorText) - set STF_MB_TYPE = 1 - set STF_MB_ICON = 3 - set STF_MB_DEF = 1 - ui start "Error Message" - goto setfailed -setfailed = + - set CommonStatus = STATUS_FAILED - ifstr(i) $(OEM_ABANDON_ON) == TRUE - set OEM_ABANDON_ON = FALSE - goto removeadapter - endif - goto end -end = + - goto term -term = + - Return $(CommonStatus) - -[Install-Option] - set STF_VITAL = "" - ifstr(i) $(AddCopy) == "YES" - AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers - AddSectionFilesToCopyList Files-App $(SrcDir) $(!STF_WINDOWSSYSPATH) - endif - ifstr(i) $(DoCopy) == "YES" - set !STF_NCPA_FLUSH_COPYLIST = TRUE - CopyFilesInCopyList - endif - ifstr(i) $(DoConfig) == "YES" - endif - Exit - -[Install-Update] - set STF_VITAL = "" - set STF_OVERWRITE = "VERIFYSOURCEOLDER" - AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers - AddSectionFilesToCopyList Files-App $(SrcDir) $(!STF_WINDOWSSYSPATH) - AddSectionFilesToCopyList Files-Inf $(SrcDir) $(!STF_WINDOWSSYSPATH) - set !STF_NCPA_FLUSH_COPYLIST = TRUE - CopyFilesInCopyList - exit - -[Source Media Descriptions] -1 = "Windows NT Setup Disk #1" , TAGFILE = disk1 -2 = "Windows NT Setup CD-ROM Disk" , TAGFILE = disk2 - -[ProductType] -STF_PRODUCT = Winnt -STF_PLATFORM = I386 - -[Files-Inf] -2, oemsetup.inf, SIZE=1000, RENAME=$(!UG_Filename) - -[Files-B2Ether] -2,B2Ether.SYS , SIZE=999 - -[Files-App] - -[LanguagesSupported] -ENG - -[OptionsTextENG] -NDISPERF = "Basilisk II Ethernet Driver" - -[FileConstantsENG] -ProCaption = "Windows NT Setup" -ProCancel = "Cancel" -ProCancelMsg = "Windows NT Networking is not correctly installed. "+ - "Are you sure you want to cancel copying files?" -ProCancelCap = "Network Setup Message" -ProText1 = "Copying:" -ProText2 = "To:" -ProductSoftwareTitle = "Basilisk II Ethernet Driver" -ProductSoftwareDescription = "Adds ethernet capability to the Basilisk II Macintosh II emulator." -ProductSoftwareDisplayName = "Basilisk II Ethernet Driver" -FunctionTitle = $(ProductSoftwareTitle) -ShellCodeErrorTitle = "Error: "$(FunctionTitle) -ShellCodeErrorText = "Shell Code Error." - -[DialogConstantsENG] -Help = "&Help" -Exit = "Cancel" -OK = "OK" -HelpContext = "" -Continue = "Continue" -Cancel = "Cancel" diff --git a/BasiliskII/src/Windows/b2ether/driver/SOURCES b/BasiliskII/src/Windows/b2ether/driver/SOURCES deleted file mode 100755 index e7aa28661..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/SOURCES +++ /dev/null @@ -1,15 +0,0 @@ -# MYMODE must be set - -TARGETNAME=b2ether -TARGETPATH=$(BASEDIR)\lib -TARGETTYPE=DRIVER - -TARGETLIBS=$(BASEDIR)\lib\*\$(DDKBUILDENV)\ndis.lib -INCLUDES=$(BASEDIR)\inc;$(BASEDIR)\src\network\inc;..\inc - -MSC_WARNING_LEVEL=/W3 /WX /FR /FAcs /D$(MYMODE) - -SOURCES=b2ether.c \ - b2ether_openclose.c \ - b2ether_read.c \ - b2ether_write.c diff --git a/BasiliskII/src/Windows/b2ether/driver/b2ether.c b/BasiliskII/src/Windows/b2ether/driver/b2ether.c deleted file mode 100755 index 1119224de..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/b2ether.c +++ /dev/null @@ -1,556 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "stdarg.h" -#include "ntddk.h" -#include "ntiologc.h" -#include "ndis.h" -#include "ntddpack.h" -#include "b2ether.h" - -#undef DBG -#define DBG 0 -#include "debug.h" - -NTSTATUS -DriverEntry( - IN PDRIVER_OBJECT DriverObject, - IN PUNICODE_STRING RegistryPath - ); - - -NTSTATUS -PacketReadRegistry( - IN PWSTR *MacDriverName, - IN PWSTR *PacketDriverName, - IN PUNICODE_STRING RegistryPath - ); - - -NTSTATUS -PacketCreateSymbolicLink( - IN PUNICODE_STRING DeviceName, - IN BOOLEAN Create - ); - -NTSTATUS -PacketQueryRegistryRoutine( - IN PWSTR ValueName, - IN ULONG ValueType, - IN PVOID ValueData, - IN ULONG ValueLength, - IN PVOID Context, - IN PVOID EntryContext - ); - - -#if DBG -ULONG PacketDebugFlag = PACKET_DEBUG_LOUD; -#endif - - -PDEVICE_EXTENSION GlobalDeviceExtension; - - -NTSTATUS DriverEntry( - IN PDRIVER_OBJECT DriverObject, - IN PUNICODE_STRING RegistryPath -) -{ - NDIS_PROTOCOL_CHARACTERISTICS ProtocolChar; - - UNICODE_STRING MacDriverName; - UNICODE_STRING UnicodeDeviceName; - - PDEVICE_OBJECT DeviceObject = NULL; - PDEVICE_EXTENSION DeviceExtension = NULL; - - NTSTATUS Status = STATUS_SUCCESS; - NTSTATUS ErrorCode = STATUS_SUCCESS; - NDIS_STRING ProtoName = NDIS_STRING_CONST("PacketDriver"); - - ULONG DevicesCreated=0; - - PWSTR BindString; - PWSTR ExportString; - - PWSTR BindStringSave; - PWSTR ExportStringSave; - - NDIS_HANDLE NdisProtocolHandle; - - IF_LOUD(DbgPrint("\n\nPacket: DriverEntry\n");) - - RtlZeroMemory(&ProtocolChar,sizeof(NDIS_PROTOCOL_CHARACTERISTICS)); - - ProtocolChar.MajorNdisVersion = 3; - ProtocolChar.MinorNdisVersion = 0; - ProtocolChar.Reserved = 0; - ProtocolChar.OpenAdapterCompleteHandler = PacketOpenAdapterComplete; - ProtocolChar.CloseAdapterCompleteHandler = PacketCloseAdapterComplete; - ProtocolChar.SendCompleteHandler = PacketSendComplete; - ProtocolChar.TransferDataCompleteHandler = PacketTransferDataComplete; - ProtocolChar.ResetCompleteHandler = PacketResetComplete; - ProtocolChar.RequestCompleteHandler = PacketRequestComplete; - ProtocolChar.ReceiveHandler = PacketReceiveIndicate; - ProtocolChar.ReceiveCompleteHandler = PacketReceiveComplete; - ProtocolChar.StatusHandler = PacketStatus; - ProtocolChar.StatusCompleteHandler = PacketStatusComplete; - ProtocolChar.Name = ProtoName; - - NdisRegisterProtocol( - &Status, - &NdisProtocolHandle, - &ProtocolChar, - sizeof(NDIS_PROTOCOL_CHARACTERISTICS)); - - if (Status != NDIS_STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Packet: Failed to register protocol with NDIS\n");) - return Status; - } - - // - // Set up the device driver entry points. - // - - DriverObject->MajorFunction[IRP_MJ_CREATE] = PacketOpen; - DriverObject->MajorFunction[IRP_MJ_CLOSE] = PacketClose; - DriverObject->MajorFunction[IRP_MJ_READ] = PacketRead; - DriverObject->MajorFunction[IRP_MJ_WRITE] = PacketWrite; - DriverObject->MajorFunction[IRP_MJ_CLEANUP] = PacketCleanup; - DriverObject->MajorFunction[IRP_MJ_DEVICE_CONTROL] = PacketIoControl; - - DriverObject->DriverUnload = PacketUnload; - - - // - // Get the name of the Packet driver and the name of the MAC driver - // to bind to from the registry - // - - Status=PacketReadRegistry( - &BindString, - &ExportString, - RegistryPath - ); - - if (Status != STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Perf: Failed to read registry\n");) - goto RegistryError; - } - - BindStringSave = BindString; - ExportStringSave = ExportString; - - // create a device object for each entry - while (*BindString!= UNICODE_NULL && *ExportString!= UNICODE_NULL) { - - // Create a counted unicode string for both null terminated strings - RtlInitUnicodeString( - &MacDriverName, - BindString - ); - - RtlInitUnicodeString( - &UnicodeDeviceName, - ExportString - ); - - // Advance to the next string of the MULTI_SZ string - BindString += (MacDriverName.Length+sizeof(UNICODE_NULL))/sizeof(WCHAR); - - ExportString += (UnicodeDeviceName.Length+sizeof(UNICODE_NULL))/sizeof(WCHAR); - - IF_LOUD(DbgPrint("Packet: DeviceName=%ws MacName=%ws\n",UnicodeDeviceName.Buffer,MacDriverName.Buffer);) - - // Create the device object - Status = IoCreateDevice( - DriverObject, - sizeof(DEVICE_EXTENSION), - &UnicodeDeviceName, - FILE_DEVICE_PROTOCOL, - 0, - FALSE, - &DeviceObject - ); - - if (Status != STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Perf: IoCreateDevice() failed:\n");) - break; - } - - DevicesCreated++; - - DeviceObject->Flags |= DO_DIRECT_IO; - DeviceExtension = (PDEVICE_EXTENSION) DeviceObject->DeviceExtension; - DeviceExtension->DeviceObject = DeviceObject; - - // Save the the name of the MAC driver to open in the Device Extension - DeviceExtension->AdapterName=MacDriverName; - - if (DevicesCreated == 1) { - DeviceExtension->BindString = BindStringSave; - DeviceExtension->ExportString = ExportStringSave; - } - - DeviceExtension->NdisProtocolHandle=NdisProtocolHandle; - } - - if (DevicesCreated > 0) { - return STATUS_SUCCESS; - } - - ExFreePool(BindStringSave); - ExFreePool(ExportStringSave); - -RegistryError: - - NdisDeregisterProtocol( - &Status, - NdisProtocolHandle - ); - - Status=STATUS_UNSUCCESSFUL; - - return(Status); -} - - -VOID PacketUnload( IN PDRIVER_OBJECT DriverObject ) -{ - PDEVICE_OBJECT DeviceObject; - PDEVICE_OBJECT OldDeviceObject; - PDEVICE_EXTENSION DeviceExtension; - - NDIS_HANDLE NdisProtocolHandle; - NDIS_STATUS Status; - - IF_LOUD(DbgPrint("Packet: Unload\n");) - - DeviceObject = DriverObject->DeviceObject; - - while (DeviceObject != NULL) { - DeviceExtension = DeviceObject->DeviceExtension; - NdisProtocolHandle = DeviceExtension->NdisProtocolHandle; - if (DeviceExtension->BindString != NULL) { - ExFreePool(DeviceExtension->BindString); - } - if (DeviceExtension->ExportString != NULL) { - ExFreePool(DeviceExtension->ExportString); - } - OldDeviceObject=DeviceObject; - DeviceObject=DeviceObject->NextDevice; - IoDeleteDevice(OldDeviceObject); - } - - NdisDeregisterProtocol( &Status, NdisProtocolHandle ); -} - - -NTSTATUS PacketIoControl( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PLIST_ENTRY RequestListEntry; - PINTERNAL_REQUEST pRequest; - ULONG FunctionCode; - NDIS_STATUS Status; - - IF_LOUD(DbgPrint("Packet: IoControl\n");) - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - FunctionCode=IrpSp->Parameters.DeviceIoControl.IoControlCode; - - Open=IrpSp->FileObject->FsContext; - - RequestListEntry=ExInterlockedRemoveHeadList(&Open->RequestList,&Open->RequestSpinLock); - if (RequestListEntry == NULL) { - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_UNSUCCESSFUL; - } - - pRequest=CONTAINING_RECORD(RequestListEntry,INTERNAL_REQUEST,ListElement); - pRequest->Irp=Irp; - - IoMarkIrpPending(Irp); - Irp->IoStatus.Status = STATUS_PENDING; - - IF_LOUD(DbgPrint("Packet: Function code is %08lx buff size=%08lx %08lx\n",FunctionCode,IrpSp->Parameters.DeviceIoControl.InputBufferLength,IrpSp->Parameters.DeviceIoControl.OutputBufferLength);) - - if (FunctionCode == IOCTL_PROTOCOL_RESET) { - IF_LOUD(DbgPrint("Packet: IoControl - Reset request\n");) - ExInterlockedInsertTailList( - &Open->ResetIrpList, - &Irp->Tail.Overlay.ListEntry, - &Open->RequestSpinLock); - NdisReset( &Status, Open->AdapterHandle ); - - if (Status != NDIS_STATUS_PENDING) { - IF_LOUD(DbgPrint("Packet: IoControl - ResetComplte being called\n");) - PacketResetComplete( Open, Status ); - } - - } else { - // See if it is an Ndis request - PPACKET_OID_DATA OidData=Irp->AssociatedIrp.SystemBuffer; - - if (((FunctionCode == IOCTL_PROTOCOL_SET_OID) || (FunctionCode == IOCTL_PROTOCOL_QUERY_OID)) - && - (IrpSp->Parameters.DeviceIoControl.InputBufferLength == IrpSp->Parameters.DeviceIoControl.OutputBufferLength) - && - (IrpSp->Parameters.DeviceIoControl.InputBufferLength >= sizeof(PACKET_OID_DATA)) - && - (IrpSp->Parameters.DeviceIoControl.InputBufferLength >= sizeof(PACKET_OID_DATA)-1+OidData->Length)) { - - IF_LOUD(DbgPrint("Packet: IoControl: Request: Oid=%08lx, Length=%08lx\n",OidData->Oid,OidData->Length);) - - if (FunctionCode == IOCTL_PROTOCOL_SET_OID) { - pRequest->Request.RequestType=NdisRequestSetInformation; - pRequest->Request.DATA.SET_INFORMATION.Oid=OidData->Oid; - pRequest->Request.DATA.SET_INFORMATION.InformationBuffer=OidData->Data; - pRequest->Request.DATA.SET_INFORMATION.InformationBufferLength=OidData->Length; - } else { - pRequest->Request.RequestType=NdisRequestQueryInformation; - pRequest->Request.DATA.QUERY_INFORMATION.Oid=OidData->Oid; - pRequest->Request.DATA.QUERY_INFORMATION.InformationBuffer=OidData->Data; - pRequest->Request.DATA.QUERY_INFORMATION.InformationBufferLength=OidData->Length; - } - NdisRequest( - &Status, - Open->AdapterHandle, - &pRequest->Request - ); - } else { // buffer too small - Status=NDIS_STATUS_FAILURE; - pRequest->Request.DATA.SET_INFORMATION.BytesRead=0; - pRequest->Request.DATA.QUERY_INFORMATION.BytesWritten=0; - } - - if (Status != NDIS_STATUS_PENDING) { - IF_LOUD(DbgPrint("Packet: Calling RequestCompleteHandler\n");) - PacketRequestComplete( - Open, - &pRequest->Request, - Status - ); - } - } - return(STATUS_PENDING); -} - - -VOID PacketRequestComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_REQUEST NdisRequest, - IN NDIS_STATUS Status -) -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PIRP Irp; - PINTERNAL_REQUEST pRequest; - UINT FunctionCode; - - PPACKET_OID_DATA OidData; - - IF_LOUD(DbgPrint("Packet: RequestComplete\n");) - - Open= (POPEN_INSTANCE)ProtocolBindingContext; - - pRequest=CONTAINING_RECORD(NdisRequest,INTERNAL_REQUEST,Request); - Irp=pRequest->Irp; - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - FunctionCode=IrpSp->Parameters.DeviceIoControl.IoControlCode; - - OidData=Irp->AssociatedIrp.SystemBuffer; - - if (FunctionCode == IOCTL_PROTOCOL_SET_OID) { - OidData->Length=pRequest->Request.DATA.SET_INFORMATION.BytesRead; - } else { - if (FunctionCode == IOCTL_PROTOCOL_QUERY_OID) { - OidData->Length=pRequest->Request.DATA.QUERY_INFORMATION.BytesWritten; - } - } - - Irp->IoStatus.Information=IrpSp->Parameters.DeviceIoControl.InputBufferLength; - - ExInterlockedInsertTailList( - &Open->RequestList, - &pRequest->ListElement, - &Open->RequestSpinLock); - - Irp->IoStatus.Status = Status; - IoCompleteRequest(Irp, IO_NO_INCREMENT); -} - - -VOID PacketStatus( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN PVOID StatusBuffer, - IN UINT StatusBufferSize -) -{ - IF_LOUD(DbgPrint("Packet: Status Indication\n");) -} - - -VOID PacketStatusComplete( IN NDIS_HANDLE ProtocolBindingContext ) -{ - IF_LOUD(DbgPrint("Packet: StatusIndicationComplete\n");) -} - - -#if 0 -NTSTATUS PacketCreateSymbolicLink( - IN PUNICODE_STRING DeviceName, - IN BOOLEAN Create -) -{ - UNICODE_STRING UnicodeDosDeviceName; - NTSTATUS Status; - - if (DeviceName->Length < sizeof(L"\\Device\\")) { - return STATUS_UNSUCCESSFUL; - } - - RtlInitUnicodeString(&UnicodeDosDeviceName,NULL); - UnicodeDosDeviceName.MaximumLength=DeviceName->Length+sizeof(L"\\DosDevices")+sizeof(UNICODE_NULL); - UnicodeDosDeviceName.Buffer=ExAllocatePool( - NonPagedPool, - UnicodeDosDeviceName.MaximumLength - ); - if (UnicodeDosDeviceName.Buffer != NULL) { - RtlZeroMemory( UnicodeDosDeviceName.Buffer, UnicodeDosDeviceName.MaximumLength ); - RtlAppendUnicodeToString( &UnicodeDosDeviceName, L"\\DosDevices\\" ); - RtlAppendUnicodeToString( &UnicodeDosDeviceName, (DeviceName->Buffer+(sizeof("\\Device"))) ); - IF_LOUD(DbgPrint("Packet: DosDeviceName is %ws\n",UnicodeDosDeviceName.Buffer);) - if (Create) { - Status=IoCreateSymbolicLink(&UnicodeDosDeviceName,DeviceName); - } else { - Status=IoDeleteSymbolicLink(&UnicodeDosDeviceName); - } - ExFreePool(UnicodeDosDeviceName.Buffer); - } - return Status; -} -#endif - - -NTSTATUS PacketReadRegistry( - IN PWSTR *MacDriverName, - IN PWSTR *PacketDriverName, - IN PUNICODE_STRING RegistryPath -) -{ - NTSTATUS Status; - RTL_QUERY_REGISTRY_TABLE ParamTable[5]; - PWSTR Bind = L"Bind"; // LAURI: \Device\W30NT1 - PWSTR Export = L"Export"; // \Device\appletalk\W30NT1\0\0 - PWSTR Parameters = L"Parameters"; - PWSTR Linkage = L"Linkage"; - PWCHAR Path; - - Path=ExAllocatePool( PagedPool, RegistryPath->Length+sizeof(WCHAR) ); - - if (!Path) return STATUS_INSUFFICIENT_RESOURCES; - - RtlZeroMemory( Path, RegistryPath->Length+sizeof(WCHAR) ); - RtlCopyMemory( Path, RegistryPath->Buffer, RegistryPath->Length ); - - IF_LOUD(DbgPrint("Packet: Reg path is %ws\n",RegistryPath->Buffer);) - - RtlZeroMemory( ParamTable, sizeof(ParamTable) ); - - // change to the parmeters key - ParamTable[0].QueryRoutine = NULL; - ParamTable[0].Flags = RTL_QUERY_REGISTRY_SUBKEY; - ParamTable[0].Name = Parameters; - - // change to the linkage key - ParamTable[1].QueryRoutine = NULL; - ParamTable[1].Flags = RTL_QUERY_REGISTRY_SUBKEY; - ParamTable[1].Name = Linkage; - - // Get the name of the mac driver we should bind to - ParamTable[2].QueryRoutine = PacketQueryRegistryRoutine; - ParamTable[2].Flags = RTL_QUERY_REGISTRY_REQUIRED | RTL_QUERY_REGISTRY_NOEXPAND; - - ParamTable[2].Name = Bind; - ParamTable[2].EntryContext = (PVOID)MacDriverName; - ParamTable[2].DefaultType = REG_MULTI_SZ; - - // Get the name that we should use for the driver object - ParamTable[3].QueryRoutine = PacketQueryRegistryRoutine; - ParamTable[3].Flags = RTL_QUERY_REGISTRY_REQUIRED | RTL_QUERY_REGISTRY_NOEXPAND; - - ParamTable[3].Name = Export; - ParamTable[3].EntryContext = (PVOID)PacketDriverName; - ParamTable[3].DefaultType = REG_MULTI_SZ; - - Status=RtlQueryRegistryValues( - RTL_REGISTRY_ABSOLUTE, - Path, - ParamTable, - NULL, - NULL - ); - - ExFreePool(Path); - - return Status; -} - - -NTSTATUS PacketQueryRegistryRoutine( - IN PWSTR ValueName, - IN ULONG ValueType, - IN PVOID ValueData, - IN ULONG ValueLength, - IN PVOID Context, - IN PVOID EntryContext - ) - -{ - PUCHAR Buffer; - - IF_LOUD(DbgPrint("Perf: QueryRegistryRoutine\n");) - - if (ValueType != REG_MULTI_SZ) { - return STATUS_OBJECT_NAME_NOT_FOUND; - } - - Buffer=ExAllocatePool(NonPagedPool,ValueLength); - if(!Buffer) return STATUS_INSUFFICIENT_RESOURCES; - - RtlCopyMemory( Buffer, ValueData, ValueLength ); - - *((PUCHAR *)EntryContext)=Buffer; - - return STATUS_SUCCESS; -} diff --git a/BasiliskII/src/Windows/b2ether/driver/b2ether.h b/BasiliskII/src/Windows/b2ether/driver/b2ether.h deleted file mode 100755 index 50080b747..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/b2ether.h +++ /dev/null @@ -1,195 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 MAX_REQUESTS 4 - -typedef struct _INTERNAL_REQUEST { - LIST_ENTRY ListElement; - PIRP Irp; - NDIS_REQUEST Request; -} INTERNAL_REQUEST, *PINTERNAL_REQUEST; - -// Port device extension. -typedef struct _DEVICE_EXTENSION { - PDEVICE_OBJECT DeviceObject; - NDIS_HANDLE NdisProtocolHandle; - NDIS_STRING AdapterName; - PWSTR BindString; - PWSTR ExportString; -} DEVICE_EXTENSION, *PDEVICE_EXTENSION; - -typedef struct _OPEN_INSTANCE { - PDEVICE_EXTENSION DeviceExtension; - NDIS_HANDLE AdapterHandle; - NDIS_HANDLE PacketPool; - KSPIN_LOCK RcvQSpinLock; - LIST_ENTRY RcvList; - PIRP OpenCloseIrp; - KSPIN_LOCK RequestSpinLock; - LIST_ENTRY RequestList; - LIST_ENTRY ResetIrpList; - INTERNAL_REQUEST Requests[MAX_REQUESTS]; -} OPEN_INSTANCE, *POPEN_INSTANCE; - -typedef struct _PACKET_RESERVED { - LIST_ENTRY ListElement; - PIRP Irp; - PMDL pMdl; -} PACKET_RESERVED, *PPACKET_RESERVED; - - -#define ETHERNET_HEADER_LENGTH 14 -#define RESERVED(_p) ((PPACKET_RESERVED)((_p)->ProtocolReserved)) -#define TRANSMIT_PACKETS 16 - - -VOID -PacketOpenAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN NDIS_STATUS OpenErrorStatus - ); - -VOID -PacketCloseAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status - ); - - -NDIS_STATUS -PacketReceiveIndicate( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE MacReceiveContext, - IN PVOID HeaderBuffer, - IN UINT HeaderBufferSize, - IN PVOID LookAheadBuffer, - IN UINT LookaheadBufferSize, - IN UINT PacketSize - ); - -VOID -PacketReceiveComplete( - IN NDIS_HANDLE ProtocolBindingContext - ); - - -VOID -PacketRequestComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_REQUEST pRequest, - IN NDIS_STATUS Status - ); - -VOID -PacketSendComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status - ); - - -VOID -PacketResetComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status - ); - - -VOID -PacketStatus( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN PVOID StatusBuffer, - IN UINT StatusBufferSize - ); - - -VOID -PacketStatusComplete( - IN NDIS_HANDLE ProtocolBindingContext - ); - -VOID -PacketTransferDataComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET Packet, - IN NDIS_STATUS Status, - IN UINT BytesTransferred - ); - - -VOID -PacketRemoveReference( - IN PDEVICE_EXTENSION DeviceExtension - ); - - -NTSTATUS -PacketCleanup( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP FlushIrp - ); - - -NTSTATUS -PacketShutdown( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -VOID -PacketUnload( - IN PDRIVER_OBJECT DriverObject - ); - - - -NTSTATUS -PacketOpen( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketClose( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketWrite( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketRead( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketIoControl( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); diff --git a/BasiliskII/src/Windows/b2ether/driver/b2ether_openclose.c b/BasiliskII/src/Windows/b2ether/driver/b2ether_openclose.c deleted file mode 100755 index 6541993db..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/b2ether_openclose.c +++ /dev/null @@ -1,303 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "stdarg.h" -#include "ntddk.h" -#include "ntiologc.h" -#include "ndis.h" -#include "b2ether.h" - -#undef DBG -#define DBG 0 -#include "debug.h" - -static UINT Medium; -static NDIS_MEDIUM MediumArray=NdisMedium802_3; - -NTSTATUS PacketOpen( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -/* - This is the dispatch routine for create/open and close requests. - These requests complete successfully. -*/ -{ - PDEVICE_EXTENSION DeviceExtension; - - POPEN_INSTANCE Open; - - PIO_STACK_LOCATION IrpSp; - - NDIS_STATUS Status; - NDIS_STATUS ErrorStatus; - - UINT i; - - IF_LOUD(DbgPrint("Packet: OpenAdapter\n");) - - DeviceExtension = DeviceObject->DeviceExtension; - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - Open = ExAllocatePool(NonPagedPool,sizeof(OPEN_INSTANCE)); - if (Open==NULL) { - Irp->IoStatus.Status = STATUS_INSUFFICIENT_RESOURCES; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_INSUFFICIENT_RESOURCES; - } - - RtlZeroMemory( Open, sizeof(OPEN_INSTANCE) ); - - // Save or open here - IrpSp->FileObject->FsContext = Open; - Open->DeviceExtension = DeviceExtension; - Open->OpenCloseIrp = Irp; - - // Allocate a packet pool for our xmit and receive packets - NdisAllocatePacketPool( - &Status, - &Open->PacketPool, - TRANSMIT_PACKETS, - sizeof(PACKET_RESERVED)); - - if (Status != NDIS_STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Packet: Failed to allocate packet pool\n");) - ExFreePool(Open); - Irp->IoStatus.Status = STATUS_INSUFFICIENT_RESOURCES; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_INSUFFICIENT_RESOURCES; - } - - // list to hold irp's want to reset the adapter - InitializeListHead(&Open->ResetIrpList); - - // Initialize list for holding pending read requests - KeInitializeSpinLock(&Open->RcvQSpinLock); - InitializeListHead(&Open->RcvList); - - // Initialize the request list - KeInitializeSpinLock(&Open->RequestSpinLock); - InitializeListHead(&Open->RequestList); - - // link up the request stored in our open block - for ( i=0; iRequestList, - &Open->Requests[i].ListElement, - &Open->RequestSpinLock); - - } - - IoMarkIrpPending(Irp); - Irp->IoStatus.Status = STATUS_PENDING; - - // Try to open the MAC - NdisOpenAdapter( - &Status, - &ErrorStatus, - &Open->AdapterHandle, - &Medium, - &MediumArray, - 1, - DeviceExtension->NdisProtocolHandle, - Open, - &DeviceExtension->AdapterName, - 0, - NULL); - - if (Status != NDIS_STATUS_PENDING) { - PacketOpenAdapterComplete( Open, Status, NDIS_STATUS_SUCCESS ); - } - return(STATUS_PENDING); -} - - -VOID PacketOpenAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN NDIS_STATUS OpenErrorStatus -) -{ - PIRP Irp; - POPEN_INSTANCE Open; - - IF_LOUD(DbgPrint("Packet: OpenAdapterComplete\n");) - - Open = (POPEN_INSTANCE)ProtocolBindingContext; - - Irp = Open->OpenCloseIrp; - - if (Status != NDIS_STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Packet: OpenAdapterComplete-FAILURE\n");) - NdisFreePacketPool(Open->PacketPool); - ExFreePool(Open); - } - - Irp->IoStatus.Status = Status; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - - return; -} - - -NTSTATUS PacketClose( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE Open; - NDIS_STATUS Status; - PIO_STACK_LOCATION IrpSp; - - IF_LOUD(DbgPrint("Packet: CloseAdapter\n");) - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - Open = IrpSp->FileObject->FsContext; - Open->OpenCloseIrp =Irp; - - IoMarkIrpPending(Irp); - Irp->IoStatus.Status = STATUS_PENDING; - - NdisCloseAdapter( &Status, Open->AdapterHandle ); - - if (Status != NDIS_STATUS_PENDING) { - PacketCloseAdapterComplete( Open, Status ); - } - - return(STATUS_PENDING); -} - -VOID PacketCloseAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status -) -{ - POPEN_INSTANCE Open; - PIRP Irp; - - IF_LOUD(DbgPrint("Packet: CloseAdapterComplete\n");) - - Open = (POPEN_INSTANCE)ProtocolBindingContext; - Irp = Open->OpenCloseIrp; - - NdisFreePacketPool(Open->PacketPool); - ExFreePool(Open); - - Irp->IoStatus.Status = STATUS_SUCCESS; - IoCompleteRequest(Irp, IO_NO_INCREMENT); -} - - -NTSTATUS PacketCleanup( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP FlushIrp -) -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PLIST_ENTRY PacketListEntry; - PNDIS_PACKET pPacket; - NDIS_STATUS Status; - - IF_LOUD(DbgPrint("Packet: Cleanup\n");) - - IrpSp = IoGetCurrentIrpStackLocation(FlushIrp); - - Open=IrpSp->FileObject->FsContext; - - IoMarkIrpPending(FlushIrp); - FlushIrp->IoStatus.Status = STATUS_PENDING; - - // - // The open instance of the device is about to close - // We need to complete all pending Irp's - // First we complete any pending read requests - // - while ((PacketListEntry=ExInterlockedRemoveHeadList( - &Open->RcvList, - &Open->RcvQSpinLock - )) != NULL) { - - IF_LOUD(DbgPrint("Packet: CleanUp - Completeing read\n");) - - pPacket=CONTAINING_RECORD(PacketListEntry,NDIS_PACKET,ProtocolReserved); - - // complete normally - PacketTransferDataComplete( - Open, - pPacket, - NDIS_STATUS_SUCCESS, - 0 - ); - } - - // IoMarkIrpPending(FlushIrp); - // FlushIrp->IoStatus.Status = STATUS_PENDING; - - // We now place the Irp on the Reset list - ExInterlockedInsertTailList( - &Open->ResetIrpList, - &FlushIrp->Tail.Overlay.ListEntry, - &Open->RequestSpinLock); - - // Now reset the adapter, the mac driver will complete any - // pending requests we have made to it. - NdisReset( &Status, Open->AdapterHandle ); - - if (Status != NDIS_STATUS_PENDING) { - IF_LOUD(DbgPrint("Packet: Cleanup - ResetComplte being called\n");) - PacketResetComplete( Open, Status ); - } - - return(STATUS_PENDING); -} - - -VOID PacketResetComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status -) -{ - POPEN_INSTANCE Open; - PIRP Irp; - PLIST_ENTRY ResetListEntry; - - IF_LOUD(DbgPrint("Packet: PacketResetComplte\n");) - - Open = (POPEN_INSTANCE)ProtocolBindingContext; - - // remove the reset IRP from the list - ResetListEntry=ExInterlockedRemoveHeadList( - &Open->ResetIrpList, - &Open->RequestSpinLock - ); - -#if DBG - if (ResetListEntry == NULL) { - DbgBreakPoint(); - return; - } -#endif - - Irp = CONTAINING_RECORD(ResetListEntry,IRP,Tail.Overlay.ListEntry); - Irp->IoStatus.Status = STATUS_SUCCESS; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - - IF_LOUD(DbgPrint("Packet: PacketResetComplte exit\n");) -} diff --git a/BasiliskII/src/Windows/b2ether/driver/b2ether_read.c b/BasiliskII/src/Windows/b2ether/driver/b2ether_read.c deleted file mode 100755 index 87ade9a9f..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/b2ether_read.c +++ /dev/null @@ -1,238 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "stdarg.h" -#include "ntddk.h" -#include "ntiologc.h" -#include "ndis.h" -#include "b2ether.h" - -#undef DBG -#define DBG 0 -#include "debug.h" - - -NTSTATUS PacketRead( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp -) -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PNDIS_PACKET pPacket; - PMDL pMdl; - NDIS_STATUS Status; - - IF_LOUD(DbgPrint("Packet: Read\n");) - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - Open = IrpSp->FileObject->FsContext; - - if (IrpSp->Parameters.Read.Length < ETHERNET_HEADER_LENGTH) { - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_UNSUCCESSFUL; - } - - pMdl=IoAllocateMdl( - MmGetMdlVirtualAddress(Irp->MdlAddress), - MmGetMdlByteCount(Irp->MdlAddress), - FALSE, - FALSE, - NULL - ); - - if (!pMdl) { - IF_LOUD(DbgPrint("Packet: Read-Failed to allocate Mdl\n");) - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_UNSUCCESSFUL; - } - - IoBuildPartialMdl( - Irp->MdlAddress, - pMdl, - ((PUCHAR)MmGetMdlVirtualAddress(Irp->MdlAddress))+ETHERNET_HEADER_LENGTH, - 0 - ); - pMdl->Next = NULL; - - // - // Try to get a packet from our list of free ones - // - NdisAllocatePacket( &Status, &pPacket, Open->PacketPool ); - - if (Status != NDIS_STATUS_SUCCESS) { - IF_LOUD(DbgPrint("Packet: Read- No free packets\n");) - IoFreeMdl(pMdl); - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_UNSUCCESSFUL; - } - - // - // Get a pointer to the packet itself - // - RESERVED(pPacket)->Irp = Irp; - RESERVED(pPacket)->pMdl = pMdl; - - IoMarkIrpPending(Irp); - Irp->IoStatus.Status = STATUS_PENDING; - - // - // Attach our new MDL to the packet - // - NdisChainBufferAtFront(pPacket,pMdl); - - - // - // Put this packet in a list of pending reads. - // The receive indication handler will attemp to remove packets - // from this list for use in transfer data calls - // - ExInterlockedInsertTailList( - &Open->RcvList, - &RESERVED(pPacket)->ListElement, - &Open->RcvQSpinLock); - - return(STATUS_PENDING); -} - - -NDIS_STATUS -PacketReceiveIndicate ( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE MacReceiveContext, - IN PVOID HeaderBuffer, - IN UINT HeaderBufferSize, - IN PVOID LookAheadBuffer, - IN UINT LookaheadBufferSize, - IN UINT PacketSize - ) - -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PIRP Irp; - PLIST_ENTRY PacketListEntry; - PNDIS_PACKET pPacket; - ULONG SizeToTransfer; - NDIS_STATUS Status; - UINT BytesTransfered; - ULONG BufferLength; - PPACKET_RESERVED Reserved; - - IF_LOUD(DbgPrint("Packet: ReceiveIndicate\n");) - - Open = (POPEN_INSTANCE)ProtocolBindingContext; - - if (HeaderBufferSize > ETHERNET_HEADER_LENGTH) { - return NDIS_STATUS_NOT_ACCEPTED; // NDIS_STATUS_SUCCESS; - } - - // See if there are any pending read that we can satisfy - PacketListEntry=ExInterlockedRemoveHeadList( - &Open->RcvList, - &Open->RcvQSpinLock - ); - - if (PacketListEntry == NULL) { - IF_LOUD(DbgPrint("Packet: ReceiveIndicate dropped a packet\n");) - return NDIS_STATUS_NOT_ACCEPTED; - } - - Reserved=CONTAINING_RECORD(PacketListEntry,PACKET_RESERVED,ListElement); - pPacket=CONTAINING_RECORD(Reserved,NDIS_PACKET,ProtocolReserved); - - Irp=RESERVED(pPacket)->Irp; - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - // This is the length of our partial MDL - BufferLength = IrpSp->Parameters.Read.Length-ETHERNET_HEADER_LENGTH; - - SizeToTransfer = (PacketSize < BufferLength) ? PacketSize : BufferLength; - - // copy the ethernet header into the actual readbuffer - NdisMoveMappedMemory( - MmGetSystemAddressForMdl(Irp->MdlAddress), - HeaderBuffer, - HeaderBufferSize - ); - - // Call the Mac to transfer the packet - NdisTransferData( - &Status, - Open->AdapterHandle, - MacReceiveContext, - 0, - SizeToTransfer, - pPacket, - &BytesTransfered); - - if (Status != NDIS_STATUS_PENDING) { - PacketTransferDataComplete( Open, pPacket, Status, BytesTransfered ); - } - - return NDIS_STATUS_SUCCESS; -} - -VOID PacketTransferDataComplete ( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status, - IN UINT BytesTransfered -) -{ - PIO_STACK_LOCATION IrpSp; - POPEN_INSTANCE Open; - PIRP Irp; - PMDL pMdl; - - IF_LOUD(DbgPrint("Packet: TransferDataComplete\n");) - - Open = (POPEN_INSTANCE)ProtocolBindingContext; - Irp = RESERVED(pPacket)->Irp; - IrpSp = IoGetCurrentIrpStackLocation(Irp); - pMdl = RESERVED(pPacket)->pMdl; - - // Free the MDL that we allocated - IoFreeMdl(pMdl); - - // recycle the packet - NdisReinitializePacket(pPacket); - - // Put the packet on the free queue - NdisFreePacket(pPacket); - - Irp->IoStatus.Status = Status; - Irp->IoStatus.Information = BytesTransfered+ETHERNET_HEADER_LENGTH; - IoCompleteRequest(Irp, IO_NO_INCREMENT); -} - - -VOID PacketReceiveComplete( IN NDIS_HANDLE ProtocolBindingContext ) -{ -} diff --git a/BasiliskII/src/Windows/b2ether/driver/b2ether_write.c b/BasiliskII/src/Windows/b2ether/driver/b2ether_write.c deleted file mode 100755 index 4b6684ff2..000000000 --- a/BasiliskII/src/Windows/b2ether/driver/b2ether_write.c +++ /dev/null @@ -1,103 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "stdarg.h" -#include "ntddk.h" -#include "ntiologc.h" -#include "ndis.h" -#include "b2ether.h" - -#undef DBG -#define DBG 0 -#include "debug.h" - - -NTSTATUS PacketWrite( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp -) -{ - POPEN_INSTANCE Open; - PIO_STACK_LOCATION IrpSp; - PNDIS_PACKET pPacket; - - NDIS_STATUS Status; - - IF_LOUD(DbgPrint("Packet: SendAdapter\n");) - - IrpSp = IoGetCurrentIrpStackLocation(Irp); - - Open = IrpSp->FileObject->FsContext; - - // Try to get a packet from our list of free ones - NdisAllocatePacket( &Status, &pPacket, Open->PacketPool ); - if (Status != NDIS_STATUS_SUCCESS) { - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - Irp->IoStatus.Information = 0; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return STATUS_UNSUCCESSFUL; - } - - RESERVED(pPacket)->Irp=Irp; - - // Attach the writes buffer to the packet - NdisChainBufferAtFront(pPacket,Irp->MdlAddress); - - IoMarkIrpPending(Irp); - Irp->IoStatus.Status = STATUS_PENDING; - - // Call the MAC - NdisSend( &Status, Open->AdapterHandle, pPacket ); - - if (Status != NDIS_STATUS_PENDING) { - PacketSendComplete( Open, pPacket, Status ); - } - - return(STATUS_PENDING); -} - - -VOID PacketSendComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status -) -{ - PIRP Irp; - - IF_LOUD(DbgPrint("Packet: SendComplete\n");) - - Irp = RESERVED(pPacket)->Irp; - - // recyle the packet - NdisReinitializePacket(pPacket); - - // Put the packet back on the free list - NdisFreePacket(pPacket); - - Irp->IoStatus.Status = Status; - - // a known bug, but I don't need this information - Irp->IoStatus.Information = 0; - - IoCompleteRequest(Irp, IO_NO_INCREMENT); -} diff --git a/BasiliskII/src/Windows/b2ether/inc/b2ether_hl.h b/BasiliskII/src/Windows/b2ether/inc/b2ether_hl.h deleted file mode 100755 index d5e876559..000000000 --- a/BasiliskII/src/Windows/b2ether/inc/b2ether_hl.h +++ /dev/null @@ -1,115 +0,0 @@ -/* - * b2ether_hl.h - Win32 ethernet driver high-level interface - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _B2_ETHER_HL_ -#define _B2_ETHER_HL_ - - -#ifdef __cplusplus -extern "C" { -#endif - - -#define ETH_802_3_ADDRESS_LENGTH 6 -#define MAX_LINK_NAME_LENGTH 124 - -typedef struct _ADAPTER { - HANDLE hFile; - TCHAR SymbolicLink[MAX_LINK_NAME_LENGTH]; -} ADAPTER, *LPADAPTER; - -typedef struct _PACKET { - OVERLAPPED OverLapped; - PVOID Buffer; - UINT Length; - ULONG BytesReceived; - BOOL bIoComplete; - BOOL free; - struct _PACKET *next; -} PACKET, *LPPACKET; - - - -BOOLEAN StartPacketDriver( - LPCTSTR ServiceName -); - -LPADAPTER PacketOpenAdapter( - LPCTSTR AdapterName, - int16 mode -); - -VOID PacketCloseAdapter( - LPADAPTER lpAdapter -); - -LPPACKET PacketAllocatePacket( - LPADAPTER AdapterObject, - UINT Length -); - -VOID PacketFreePacket( - LPPACKET lpPacket -); - -BOOLEAN PacketSendPacket( - LPADAPTER AdapterObject, - LPPACKET lpPacket, - BOOLEAN Sync, - BOOLEAN RecyclingAllowed -); - -BOOLEAN PacketGetAddress( - LPADAPTER AdapterObject, - PUCHAR AddressBuffer, - PUINT Length -); - -BOOLEAN PacketReceivePacket( - LPADAPTER AdapterObject, - LPPACKET lpPacket, - BOOLEAN Sync -); - -BOOLEAN PacketSetFilter( LPADAPTER AdapterObject, ULONG Filter ); -BOOLEAN PacketGetMAC( LPADAPTER AdapterObject, LPBYTE address, BOOL permanent ); -BOOLEAN PacketAddMulticast( LPADAPTER AdapterObject, LPBYTE address ); -BOOLEAN PacketDelMulticast( LPADAPTER AdapterObject, LPBYTE address ); - -ULONG PacketGetAdapterNames( LPADAPTER lpAdapter, LPTSTR pStr, PULONG BufferSize ); - -// callbacks -void recycle_write_packet( LPPACKET Packet ); - -VOID CALLBACK packet_read_completion( - DWORD dwErrorCode, - DWORD dwNumberOfBytesTransfered, - LPOVERLAPPED lpOverlapped -); - - -#ifdef __cplusplus -} -#endif - - -#endif // _B2_ETHER_HL_ diff --git a/BasiliskII/src/Windows/b2ether/inc/ntddpack.h b/BasiliskII/src/Windows/b2ether/inc/ntddpack.h deleted file mode 100755 index 62af4f3f1..000000000 --- a/BasiliskII/src/Windows/b2ether/inc/ntddpack.h +++ /dev/null @@ -1,32 +0,0 @@ -// #include - -#ifndef __NTDDPACKET -#define __NTDDPACKET 1 - -// #include - -#define MAX_LINK_NAME_LENGTH 124 - -#pragma pack(1) -typedef struct _PACKET_OID_DATA { - ULONG Oid; - ULONG Length; - UCHAR Data[1]; -} ATTRIBUTE_PACKED PACKET_OID_DATA, *PPACKET_OID_DATA; -#pragma pack() - - -#define FILE_DEVICE_PROTOCOL 0x8000 - - - -#define IOCTL_PROTOCOL_SET_OID CTL_CODE(FILE_DEVICE_PROTOCOL, 0 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_QUERY_OID CTL_CODE(FILE_DEVICE_PROTOCOL, 1 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_RESET CTL_CODE(FILE_DEVICE_PROTOCOL, 2 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_READ CTL_CODE(FILE_DEVICE_PROTOCOL, 3 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_WRITE CTL_CODE(FILE_DEVICE_PROTOCOL, 4 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_MACNAME CTL_CODE(FILE_DEVICE_PROTOCOL, 5 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_SELECT_BY_NAME CTL_CODE(FILE_DEVICE_PROTOCOL, 6 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_ENUM_ADAPTERS CTL_CODE(FILE_DEVICE_PROTOCOL, 7 , METHOD_BUFFERED, FILE_ANY_ACCESS) - -#endif diff --git a/BasiliskII/src/Windows/b2ether/multiopt.h b/BasiliskII/src/Windows/b2ether/multiopt.h deleted file mode 100755 index d924a199e..000000000 --- a/BasiliskII/src/Windows/b2ether/multiopt.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * multiopt.h - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -enum { - ETHER_MULTICAST_MAC, - ETHER_MULTICAST_ALL, - ETHER_MULTICAST_PROMISCUOUS -}; diff --git a/BasiliskII/src/Windows/b2ether/nt5/B2Win2k.inf b/BasiliskII/src/Windows/b2ether/nt5/B2Win2k.inf deleted file mode 100644 index d87266102..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/B2Win2k.inf +++ /dev/null @@ -1,80 +0,0 @@ -[version] -Signature = "$Windows NT$" -Class = NetTrans -ClassGUID = {4d36e975-e325-11ce-bfc1-08002be10318} -Provider = %Msft% -DriverVer = 12/05/1999,5.00.2128 - -[Manufacturer] -%Msft%=MSFT - -[MSFT] -%B2ETHER_Desc%=Install, MS_B2ETHER - -;------------------------------------------------------------------------- -; Installation Section -;------------------------------------------------------------------------- -[Install] -AddReg=Inst_Ndi -Characteristics=0 ; Has no characterstic -CopyFiles=CpyFiles_Sys - -;------------------------------------------------------------------------- -; Ndi installation support -;------------------------------------------------------------------------- -[Inst_Ndi] -HKR,Ndi,Service,,"B2Ether" -HKR,Ndi,HelpText,,%B2ETHER_HelpText% -HKR, Ndi\Interfaces, UpperRange,, noupper -HKR,"Ndi\Interfaces","LowerRange",,"ndis5,ndis4" - -;------------------------------------------------------------------------- -; Service installation support -;------------------------------------------------------------------------- -[Install.Services] -AddService=B2Ether,,B2ETHER_Service_Inst - -[B2Ether_Service_Inst] -DisplayName = %B2ETHER_Desc% -ServiceType = 1 ;SERVICE_KERNEL_DRIVER -StartType = 2 ;SERVICE_AUTO_START -ErrorControl = 1 ;SERVICE_ERROR_NORMAL -ServiceBinary = %12%\B2Ether.sys -LoadOrderGroup = "PNP_TDI" -AddReg = AddReg_B2ETHER_Service_Inst -Description = %B2ETHER_Desc% - -[AddReg_B2ETHER_Service_Inst] -HKLM,"System\CurrentControlSet\Services\B2Ether","TextModeFlags",%REG_DWORD%,0x0001 -HKR,"Parameters","Version",,"5.00.2128" - -;------------------------------------------------------------------------- -; Support for removal of static registry settings -;------------------------------------------------------------------------- -[Install.Remove] -DelReg=Del_Static_Reg - -[Install.Remove.Services] -DelService=B2Ether - -[Del_Static_Reg] -HKLM,"System\CurrentControlSet\Services\B2Ether","TextModeFlags" - -;------------------------------------------------------------------------- -; Declare Destination Directories for file copy/deletion -;------------------------------------------------------------------------- -[DestinationDirs] -CpyFiles_Sys = 12 ; DIRID_DRIVERS - - -;------------------------------------------------------------------------- -; Files to Copy/Delete - Referenced by Install and Remove sections above -;------------------------------------------------------------------------- -[CpyFiles_Sys] -B2Ether.sys,,,2 - -[Strings] -Msft = "Microsoft" -B2ETHER_Desc = "Basilisk II Ethernet Driver" -B2ETHER_HelpText = "Adds ethernet capability to the Basilisk II Macintosh II emulator." -REG_DWORD = 0x10001 diff --git a/BasiliskII/src/Windows/b2ether/nt5/B2Win7Vista-x64.inf b/BasiliskII/src/Windows/b2ether/nt5/B2Win7Vista-x64.inf deleted file mode 100755 index f154af770..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/B2Win7Vista-x64.inf +++ /dev/null @@ -1,80 +0,0 @@ -[version] -Signature = "$Windows NT$" -Class = NetTrans -ClassGUID = {4d36e975-e325-11ce-bfc1-08002be10318} -Provider = %Msft% -DriverVer = 12/05/1999,5.00.2128 - -[Manufacturer] -%Msft%=MSFT,NTamd64 - -[MSFT.NTamd64] -%B2ETHER_Desc%=Install, MS_B2ETHER - -;------------------------------------------------------------------------- -; Installation Section -;------------------------------------------------------------------------- -[Install] -AddReg=Inst_Ndi -Characteristics=0 ; Has no characteristic -CopyFiles=CpyFiles_Sys - -;------------------------------------------------------------------------- -; Ndi installation support -;------------------------------------------------------------------------- -[Inst_Ndi] -HKR,Ndi,Service,,"B2Ether" -HKR,Ndi,HelpText,,%B2ETHER_HelpText% -HKR, Ndi\Interfaces, UpperRange,, noupper -HKR,"Ndi\Interfaces","LowerRange",,"ndis5,ndis4" - -;------------------------------------------------------------------------- -; Service installation support -;------------------------------------------------------------------------- -[Install.Services] -AddService=B2Ether,,B2ETHER_Service_Inst - -[B2Ether_Service_Inst] -DisplayName = %B2ETHER_Desc% -ServiceType = 1 ;SERVICE_KERNEL_DRIVER -StartType = 2 ;SERVICE_AUTO_START -ErrorControl = 1 ;SERVICE_ERROR_NORMAL -ServiceBinary = %12%\B2Ether64.sys -LoadOrderGroup = "PNP_TDI" -AddReg = AddReg_B2ETHER_Service_Inst -Description = %B2ETHER_Desc% - -[AddReg_B2ETHER_Service_Inst] -HKLM,"System\CurrentControlSet\Services\B2Ether","TextModeFlags",%REG_DWORD%,0x0001 -HKR,"Parameters","Version",,"5.00.2128" - -;------------------------------------------------------------------------- -; Support for removal of static registry settings -;------------------------------------------------------------------------- -[Install.Remove] -DelReg=Del_Static_Reg - -[Install.Remove.Services] -DelService=B2Ether - -[Del_Static_Reg] -HKLM,"System\CurrentControlSet\Services\B2Ether","TextModeFlags" - -;------------------------------------------------------------------------- -; Declare Destination Directories for file copy/deletion -;------------------------------------------------------------------------- -[DestinationDirs] -CpyFiles_Sys = 12 ; DIRID_DRIVERS - - -;------------------------------------------------------------------------- -; Files to Copy/Delete - Referenced by Install and Remove sections above -;------------------------------------------------------------------------- -[CpyFiles_Sys] -B2Ether64.sys,,,2 - -[Strings] -Msft = "Microsoft" -B2ETHER_Desc = "Basilisk II Ethernet Driver Test x64" -B2ETHER_HelpText = "Adds ethernet capability to the Basilisk II Macintosh II emulator." -REG_DWORD = 0x10001 diff --git a/BasiliskII/src/Windows/b2ether/nt5/MAKEFILE b/BasiliskII/src/Windows/b2ether/nt5/MAKEFILE deleted file mode 100644 index 58189757d..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/MAKEFILE +++ /dev/null @@ -1,7 +0,0 @@ -# -# DO NOT EDIT THIS FILE!!! Edit .\sources. if you want to add a new source -# file to this component. This file merely indirects to the real make file -# that is shared by all the driver components of the Windows NT DDK -# - -!INCLUDE $(NTMAKEENV)\makefile.def diff --git a/BasiliskII/src/Windows/b2ether/nt5/NTDDPACK.H b/BasiliskII/src/Windows/b2ether/nt5/NTDDPACK.H deleted file mode 100755 index 6c5e0cebe..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/NTDDPACK.H +++ /dev/null @@ -1,32 +0,0 @@ -// #include - -#ifndef __NTDDPACKET -#define __NTDDPACKET 1 - -// #include - -#define MAX_LINK_NAME_LENGTH 124 - -#pragma pack(1) -typedef struct _PACKET_OID_DATA { - ULONG Oid; - ULONG Length; - UCHAR Data[1]; -} PACKET_OID_DATA, *PPACKET_OID_DATA; -#pragma pack() - - -#define FILE_DEVICE_PROTOCOL 0x8000 - - - -#define IOCTL_PROTOCOL_SET_OID CTL_CODE(FILE_DEVICE_PROTOCOL, 0 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_QUERY_OID CTL_CODE(FILE_DEVICE_PROTOCOL, 1 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_RESET CTL_CODE(FILE_DEVICE_PROTOCOL, 2 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_READ CTL_CODE(FILE_DEVICE_PROTOCOL, 3 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_WRITE CTL_CODE(FILE_DEVICE_PROTOCOL, 4 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_MACNAME CTL_CODE(FILE_DEVICE_PROTOCOL, 5 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_PROTOCOL_SELECT_BY_NAME CTL_CODE(FILE_DEVICE_PROTOCOL, 6 , METHOD_BUFFERED, FILE_ANY_ACCESS) -#define IOCTL_ENUM_ADAPTERS CTL_CODE(FILE_DEVICE_PROTOCOL, 7 , METHOD_BUFFERED, FILE_ANY_ACCESS) - -#endif diff --git a/BasiliskII/src/Windows/b2ether/nt5/SOURCES b/BasiliskII/src/Windows/b2ether/nt5/SOURCES deleted file mode 100644 index 1e0c1acab..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/SOURCES +++ /dev/null @@ -1,17 +0,0 @@ -# MYMODE must be set - -TARGETNAME=b2ether -TARGETPATH=obj -TARGETTYPE=DRIVER - -TARGETLIBS=$(DDK_LIB_PATH)\ndis.lib -C_DEFINES=$(C_DEFINES) -DNDIS50 -INCLUDES=$(BASEDIR)\inc;$(BASEDIR)\src\network\inc;..\inc - -MSC_WARNING_LEVEL=/W3 /WX /FR /FAcs /D$(MYMODE) - -SOURCES=b2ether.c \ - b2ether_openclose.c \ - b2ether_read.c \ - b2ether_write.c \ - b2ether.rc diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether.c b/BasiliskII/src/Windows/b2ether/nt5/b2ether.c deleted file mode 100644 index ec2c69c95..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether.c +++ /dev/null @@ -1,755 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "ntddk.h" -#include "ndis.h" -#include "ntddpack.h" -#include "b2ether.h" -#include "stdio.h" - - - -NTSTATUS -DriverEntry( - IN PDRIVER_OBJECT DriverObject, - IN PUNICODE_STRING RegistryPath -) -{ - NDIS_PROTOCOL_CHARACTERISTICS protocolChar; - NTSTATUS status = STATUS_SUCCESS; - NDIS_STRING protoName = NDIS_STRING_CONST("B2ether"); - UNICODE_STRING ntDeviceName; - UNICODE_STRING win32DeviceName; - BOOLEAN fSymbolicLink = FALSE; - PDEVICE_OBJECT deviceObject; - - // DebugPrint(("\n\nDriverEntry\n")); - - Globals.DriverObject = DriverObject; - Globals.RegistryPath.MaximumLength = RegistryPath->Length + sizeof(UNICODE_NULL); - Globals.RegistryPath.Length = RegistryPath->Length; - Globals.RegistryPath.Buffer = ExAllocatePool( PagedPool, Globals.RegistryPath.MaximumLength ); - if (!Globals.RegistryPath.Buffer) { - // DebugPrint (("Couldn't allocate pool for registry path.")); - return STATUS_INSUFFICIENT_RESOURCES; - } - - RtlCopyUnicodeString(&Globals.RegistryPath, RegistryPath); - RtlInitUnicodeString(&ntDeviceName, NT_DEVICE_NAME); - - status = IoCreateDevice (DriverObject, - 0, - &ntDeviceName, - FILE_DEVICE_UNKNOWN, - 0, - FALSE, - &deviceObject); - - - if (!NT_SUCCESS (status)) { - // Either not enough memory to create a deviceobject or another - // deviceobject with the same name exits. This could happen - // if you install another instance of this device. - goto ERROR; - } - - RtlInitUnicodeString(&win32DeviceName, DOS_DEVICE_NAME); - - status = IoCreateSymbolicLink( &win32DeviceName, &ntDeviceName ); - if (!NT_SUCCESS(status)) goto ERROR; - - fSymbolicLink = TRUE; - - deviceObject->Flags |= DO_BUFFERED_IO; - Globals.ControlDeviceObject = deviceObject; - - InitializeListHead(&Globals.AdapterList); - KeInitializeSpinLock(&Globals.GlobalLock); - - NdisZeroMemory(&protocolChar,sizeof(NDIS_PROTOCOL_CHARACTERISTICS)); - - protocolChar.MajorNdisVersion = 5; - protocolChar.MinorNdisVersion = 0; - protocolChar.Name = protoName; - protocolChar.OpenAdapterCompleteHandler = PacketOpenAdapterComplete; - protocolChar.CloseAdapterCompleteHandler = PacketCloseAdapterComplete; - protocolChar.SendCompleteHandler = PacketSendComplete; - protocolChar.TransferDataCompleteHandler = PacketTransferDataComplete; - protocolChar.ResetCompleteHandler = PacketResetComplete; - protocolChar.RequestCompleteHandler = PacketRequestComplete; - protocolChar.ReceiveHandler = PacketReceiveIndicate; - protocolChar.ReceiveCompleteHandler = PacketReceiveComplete; - protocolChar.StatusHandler = PacketStatus; - protocolChar.StatusCompleteHandler = PacketStatusComplete; - protocolChar.BindAdapterHandler = PacketBindAdapter; - protocolChar.UnbindAdapterHandler = PacketUnbindAdapter; - protocolChar.UnloadHandler = NULL; - protocolChar.ReceivePacketHandler = PacketReceivePacket; - protocolChar.PnPEventHandler = PacketPNPHandler; - - NdisRegisterProtocol( - &status, - &Globals.NdisProtocolHandle, - &protocolChar, - sizeof(NDIS_PROTOCOL_CHARACTERISTICS)); - - if (status != NDIS_STATUS_SUCCESS) { - // DebugPrint(("Failed to register protocol with NDIS\n")); - status = STATUS_UNSUCCESSFUL; - goto ERROR; - } - - DriverObject->MajorFunction[IRP_MJ_CREATE] = PacketOpen; - DriverObject->MajorFunction[IRP_MJ_CLOSE] = PacketClose; - DriverObject->MajorFunction[IRP_MJ_READ] = PacketRead; - DriverObject->MajorFunction[IRP_MJ_WRITE] = PacketWrite; - DriverObject->MajorFunction[IRP_MJ_CLEANUP] = PacketCleanup; - DriverObject->MajorFunction[IRP_MJ_DEVICE_CONTROL] = PacketIoControl; - DriverObject->DriverUnload = PacketUnload; - - return(STATUS_SUCCESS); - -ERROR: - if(deviceObject) - IoDeleteDevice(deviceObject); - if(fSymbolicLink) - IoDeleteSymbolicLink(&win32DeviceName); - if(Globals.RegistryPath.Buffer) - ExFreePool(Globals.RegistryPath.Buffer); - return status; -} - - -VOID PacketUnload( IN PDRIVER_OBJECT DriverObject ) -{ - NDIS_STATUS status; - UNICODE_STRING win32DeviceName; - - // DebugPrint(("Unload Enter\n")); - - RtlInitUnicodeString(&win32DeviceName, DOS_DEVICE_NAME); - IoDeleteSymbolicLink(&win32DeviceName); - - if(Globals.ControlDeviceObject) - IoDeleteDevice(Globals.ControlDeviceObject); - - // Unbind from all the adapters. The system removes the driver code - // pages from the memory as soon as the unload returns. So you - // must wait for all the CloseAdapterCompleteHandler to finish - // before returning from the unload routine. You don't any callbacks - // to trigger after the driver is unloaded. - - while(DriverObject->DeviceObject) { - PacketUnbindAdapter(&status, DriverObject->DeviceObject->DeviceExtension,NULL); - } - - if(Globals.RegistryPath.Buffer) - ExFreePool(Globals.RegistryPath.Buffer); - - // DebugPrint(("Deregister\n")); - - NdisDeregisterProtocol( &status, Globals.NdisProtocolHandle ); - // DebugPrint(("Unload Exit\n")); -} - - - -NTSTATUS PacketIoControl( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - PIO_STACK_LOCATION irpSp; - PINTERNAL_REQUEST pRequest; - ULONG functionCode; - NDIS_STATUS status; - ULONG dataLength =0; - - // DebugPrint(("IoControl\n")); - - irpSp = IoGetCurrentIrpStackLocation(Irp); - - functionCode=irpSp->Parameters.DeviceIoControl.IoControlCode; - - if (functionCode == IOCTL_ENUM_ADAPTERS) { - // If the request is not made to the controlobject, fail the request. - - if(DeviceObject != Globals.ControlDeviceObject) { - status = STATUS_INVALID_DEVICE_REQUEST; - } else { - status = PacketGetAdapterList( - Irp->AssociatedIrp.SystemBuffer, - irpSp->Parameters.DeviceIoControl.OutputBufferLength, - &dataLength - ); - } - Irp->IoStatus.Status = status; - Irp->IoStatus.Information = dataLength; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return status; - } - - open = DeviceObject->DeviceExtension; - IoIncrement(open); - - if(!open->Bound) { - Irp->IoStatus.Status = status = STATUS_UNSUCCESSFUL; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - IoDecrement(open); - return status; - } - - // DebugPrint(("Function code is %08lx buff size=%08lx %08lx\n", - // functionCode,irpSp->Parameters.DeviceIoControl.InputBufferLength, - // irpSp->Parameters.DeviceIoControl.OutputBufferLength)); - - // Important: Since we have marked the IRP pending, we must return - // STATUS_PENDING even we happen to complete the IRP synchronously. - - IoMarkIrpPending(Irp); - - if (functionCode == IOCTL_PROTOCOL_RESET) { - // DebugPrint(("IoControl - Reset request\n")); - - // - // Since NDIS doesn't have an interface to cancel a request - // pending at miniport, we cannot set a cancel routine. - // As a result if the application that made the request - // terminates, we wait in the Cleanup routine for all pending - // NDIS requests to complete. - - ExInterlockedInsertTailList( - &open->ResetIrpList, - &Irp->Tail.Overlay.ListEntry, - &open->ResetQueueLock); - - NdisReset( &status, open->AdapterHandle ); - - if (status != NDIS_STATUS_PENDING) { - // DebugPrint(("IoControl - ResetComplete being called\n")); - PacketResetComplete( open, status ); - } - } else { - // See if it is an Ndis request - PPACKET_OID_DATA OidData=Irp->AssociatedIrp.SystemBuffer; - - pRequest = ExAllocatePool(NonPagedPool, sizeof(INTERNAL_REQUEST)); - - if(!pRequest) { - Irp->IoStatus.Status = STATUS_INSUFFICIENT_RESOURCES; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return STATUS_PENDING; - } - pRequest->Irp=Irp; - - if (((functionCode == IOCTL_PROTOCOL_SET_OID) || (functionCode == IOCTL_PROTOCOL_QUERY_OID)) - && - (irpSp->Parameters.DeviceIoControl.InputBufferLength == irpSp->Parameters.DeviceIoControl.OutputBufferLength) - && - (irpSp->Parameters.DeviceIoControl.InputBufferLength >= sizeof(PACKET_OID_DATA)) - && - (irpSp->Parameters.DeviceIoControl.InputBufferLength >= sizeof(PACKET_OID_DATA)-1+OidData->Length)) - { - // DebugPrint(("IoControl: Request: Oid=%08lx, Length=%08lx\n", OidData->Oid,OidData->Length)); - - if (functionCode == IOCTL_PROTOCOL_SET_OID) { - pRequest->Request.RequestType = NdisRequestSetInformation; - pRequest->Request.DATA.SET_INFORMATION.Oid = OidData->Oid; - pRequest->Request.DATA.SET_INFORMATION.InformationBuffer = OidData->Data; - pRequest->Request.DATA.SET_INFORMATION.InformationBufferLength = OidData->Length; - } else { - pRequest->Request.RequestType=NdisRequestQueryInformation; - pRequest->Request.DATA.QUERY_INFORMATION.Oid = OidData->Oid; - pRequest->Request.DATA.QUERY_INFORMATION.InformationBuffer = OidData->Data; - pRequest->Request.DATA.QUERY_INFORMATION.InformationBufferLength = OidData->Length; - } - NdisRequest( &status, open->AdapterHandle, &pRequest->Request ); - } else { - status=NDIS_STATUS_FAILURE; - pRequest->Request.DATA.SET_INFORMATION.BytesRead=0; - pRequest->Request.DATA.QUERY_INFORMATION.BytesWritten=0; - } - - if (status != NDIS_STATUS_PENDING) { - // DebugPrint(("Calling RequestCompleteHandler\n")); - PacketRequestComplete( open, &pRequest->Request, status ); - } - } - return STATUS_PENDING; -} - - -VOID -PacketRequestComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_REQUEST NdisRequest, - IN NDIS_STATUS Status - ) -{ - POPEN_INSTANCE open; - PIO_STACK_LOCATION irpSp; - PIRP irp; - PINTERNAL_REQUEST pRequest; - UINT functionCode; - - PPACKET_OID_DATA OidData; - - // DebugPrint(("RequestComplete\n")); - - open = (POPEN_INSTANCE)ProtocolBindingContext; - - pRequest=CONTAINING_RECORD(NdisRequest,INTERNAL_REQUEST,Request); - irp = pRequest->Irp; - - if(Status == NDIS_STATUS_SUCCESS) { - irpSp = IoGetCurrentIrpStackLocation(irp); - functionCode=irpSp->Parameters.DeviceIoControl.IoControlCode; - OidData = irp->AssociatedIrp.SystemBuffer; - if (functionCode == IOCTL_PROTOCOL_SET_OID) { - OidData->Length=pRequest->Request.DATA.SET_INFORMATION.BytesRead; - } else { - if (functionCode == IOCTL_PROTOCOL_QUERY_OID) { - OidData->Length=pRequest->Request.DATA.QUERY_INFORMATION.BytesWritten; - } - } - irp->IoStatus.Status = STATUS_SUCCESS; - irp->IoStatus.Information=irpSp->Parameters.DeviceIoControl.InputBufferLength; - } else { - irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - irp->IoStatus.Information = 0; - } - - ExFreePool(pRequest); - IoCompleteRequest(irp, IO_NO_INCREMENT); - IoDecrement(open); -} - - -VOID -PacketStatus( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN PVOID StatusBuffer, - IN UINT StatusBufferSize -) -{ - // DebugPrint(("Indication Status: %0x, StatusBufferSize: %d\n", Status, StatusBufferSize)); -} - - -VOID PacketStatusComplete( IN NDIS_HANDLE ProtocolBindingContext ) -{ - // DebugPrint(("StatusIndicationComplete\n")); -} - - -NTSTATUS -PacketGetAdapterList( - IN PVOID Buffer, - IN ULONG Length, - IN OUT PULONG DataLength -) -{ - ULONG requiredLength = 0, numOfAdapters = 0; - KIRQL oldIrql; - PLIST_ENTRY thisEntry, listHead; - POPEN_INSTANCE open; - - // DebugPrint(("Enter PacketGetAdapterList\n")); - - KeAcquireSpinLock(&Globals.GlobalLock, &oldIrql); - - // Walks the list to find out total space required for AdapterName and Symbolic Link. - - listHead = &Globals.AdapterList; - - for( thisEntry = listHead->Flink; thisEntry != listHead; thisEntry = thisEntry->Flink) { - open = CONTAINING_RECORD(thisEntry, OPEN_INSTANCE, AdapterListEntry); - requiredLength += open->AdapterName.Length + sizeof(UNICODE_NULL); - requiredLength += open->SymbolicLink.Length + sizeof(UNICODE_NULL); - numOfAdapters++; - } - - // - // We will return the data in the following format: - // numOfAdapters + One_Or_More("AdapterName\0" + "SymbolicLink\0") + UNICODE_NULL - // So let's include the numOfAdapters and UNICODE_NULL size - // to the total length. - // - - requiredLength += sizeof(ULONG) + sizeof(UNICODE_NULL); - *DataLength = requiredLength; - - if(requiredLength > Length) { - KeReleaseSpinLock(&Globals.GlobalLock, oldIrql); - return STATUS_BUFFER_TOO_SMALL; - } - - *(PULONG)Buffer = numOfAdapters; - (PCHAR)Buffer += sizeof(ULONG); - - for( thisEntry = listHead->Flink; thisEntry != listHead; thisEntry = thisEntry->Flink ) { - open = CONTAINING_RECORD(thisEntry, OPEN_INSTANCE, AdapterListEntry); - RtlCopyMemory( Buffer, open->AdapterName.Buffer, open->AdapterName.Length+sizeof(WCHAR) ); - (PCHAR)Buffer += open->AdapterName.Length+sizeof(WCHAR); - RtlCopyMemory( Buffer, open->SymbolicLink.Buffer, open->SymbolicLink.Length+sizeof(WCHAR) ); - (PCHAR)Buffer += open->SymbolicLink.Length+sizeof(WCHAR); - } - - *(PWCHAR)Buffer = UNICODE_NULL; - KeReleaseSpinLock(&Globals.GlobalLock, oldIrql); - return STATUS_SUCCESS; -} - -VOID -PacketBindAdapter( - OUT PNDIS_STATUS Status, - IN NDIS_HANDLE BindContext, - IN PNDIS_STRING DeviceName, - IN PVOID SystemSpecific1, - IN PVOID SystemSpecific2 -) -{ - NDIS_STATUS status; - UINT mediumIndex; - USHORT length; - POPEN_INSTANCE open = NULL; - UNICODE_STRING unicodeDeviceName; - PDEVICE_OBJECT deviceObject = NULL; - PWSTR symbolicLink = NULL, deviceNameStr = NULL; - NDIS_MEDIUM mediumArray = NdisMedium802_3; // Ethernet medium - - // DebugPrint(("Binding DeviceName %ws\n", DeviceName->Buffer)); - - do { - // Create a deviceobject for every adapter we bind to. - // To make a name for the deviceObject, we will append Packet_ - // to the name portion of the input DeviceName. - - unicodeDeviceName.Buffer = NULL; - length = DeviceName->Length + 7 * sizeof(WCHAR) + sizeof(UNICODE_NULL); - - deviceNameStr = ExAllocatePool(NonPagedPool, length); - if (!deviceNameStr) { - // DebugPrint(("Memory allocation for create symbolic failed\n")); - *Status = NDIS_STATUS_FAILURE; - break; - } - swprintf(deviceNameStr, L"\\Device\\B2ether_%ws", &DeviceName->Buffer[8]); - RtlInitUnicodeString(&unicodeDeviceName, deviceNameStr); - - // DebugPrint(("Exported DeviceName %ws\n", unicodeDeviceName.Buffer)); - - status = IoCreateDevice( - Globals.DriverObject, - sizeof(OPEN_INSTANCE), - &unicodeDeviceName, - FILE_DEVICE_PROTOCOL, - 0, - TRUE, // only one handle to the device at a time. - &deviceObject - ); - - if (status != STATUS_SUCCESS) { - // DebugPrint(("CreateDevice Failed: %x\n", status)); - *Status = NDIS_STATUS_FAILURE; - break; - } - - deviceObject->Flags |= DO_DIRECT_IO; - open = (POPEN_INSTANCE) deviceObject->DeviceExtension; - open->DeviceObject = deviceObject; - - // Create a symbolic link. - // We need to replace Device from \Device\Packet_{GUID} with DosDevices - // to create a symbolic link of the form \DosDevices\Packet_{GUID} - // There is a four character difference between these two - // strings. - - length = unicodeDeviceName.Length + sizeof(UNICODE_NULL) + (4 * sizeof(WCHAR)); - - symbolicLink = ExAllocatePool(NonPagedPool, length); - if (!symbolicLink) { - // DebugPrint(("Memory allocation for create symbolic failed\n")); - *Status = NDIS_STATUS_FAILURE; - break; - } - - swprintf( symbolicLink, L"\\DosDevices\\%ws", &unicodeDeviceName.Buffer[8]); - - RtlInitUnicodeString(&open->SymbolicLink,symbolicLink); - - // DebugPrint(("Symbolic Link: %ws\n", open->SymbolicLink.Buffer)); - - status = IoCreateSymbolicLink( - (PUNICODE_STRING) &open->SymbolicLink, - (PUNICODE_STRING) &unicodeDeviceName - ); - if (status != STATUS_SUCCESS) { - // DebugPrint(("Create symbolic failed\n")); - *Status = NDIS_STATUS_FAILURE; - break; - } - - ExFreePool(unicodeDeviceName.Buffer); - unicodeDeviceName.Buffer = NULL; - - NdisAllocatePacketPool( - &status, - &open->PacketPool, - TRANSMIT_PACKETS, - sizeof(PACKET_RESERVED)); - - if (status != NDIS_STATUS_SUCCESS) { - // DebugPrint(("B2ether: Failed to allocate packet pool\n")); - break; - } - - NdisInitializeEvent(&open->Event); - InitializeListHead(&open->ResetIrpList); - KeInitializeSpinLock(&open->ResetQueueLock); - KeInitializeSpinLock(&open->RcvQSpinLock); - InitializeListHead(&open->RcvList); - - NdisOpenAdapter(Status, - &status, - &open->AdapterHandle, - &mediumIndex, - &mediumArray, - sizeof(mediumArray)/sizeof(NDIS_MEDIUM), - Globals.NdisProtocolHandle, - open, - DeviceName, - 0, - NULL); - - if(*Status == NDIS_STATUS_PENDING) { - NdisWaitEvent(&open->Event, 0); - *Status = open->Status; - } - if(*Status != NDIS_STATUS_SUCCESS) { - // DebugPrint(("Failed to openAdapter\n")); - break; - } - - open->IrpCount = 0; - InterlockedExchange( (PLONG)&open->Bound, TRUE ); - NdisInitializeEvent(&open->CleanupEvent); - - NdisSetEvent(&open->CleanupEvent); - - NdisQueryAdapterInstanceName( &open->AdapterName, open->AdapterHandle ); - // DebugPrint(("Bound AdapterName %ws\n", open->AdapterName.Buffer)); - - open->Medium = mediumArray; - - InitializeListHead(&open->AdapterListEntry); - - ExInterlockedInsertTailList(&Globals.AdapterList, - &open->AdapterListEntry, - &Globals.GlobalLock); - - // Clear the DO_DEVICE_INITIALIZING flag. This is required - // if you create deviceobjects outside of DriverEntry. - // Untill you do this, application cannot send I/O request. - - deviceObject->Flags &= ~DO_DEVICE_INITIALIZING; - } while (FALSE); - - if (*Status != NDIS_STATUS_SUCCESS) { - if (open && open->PacketPool) NdisFreePacketPool(open->PacketPool); - if (deviceObject) IoDeleteDevice(deviceObject); - if(unicodeDeviceName.Buffer) ExFreePool(unicodeDeviceName.Buffer); - if(symbolicLink) { - IoDeleteSymbolicLink(&open->SymbolicLink); - ExFreePool(open->SymbolicLink.Buffer); - } - } - // DebugPrint(("Return BindAdapter :0x%x\n", *Status)); -} - - -VOID -PacketUnbindAdapter( - OUT PNDIS_STATUS Status, - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE UnbindContext -) -{ - POPEN_INSTANCE open =(POPEN_INSTANCE)ProtocolBindingContext; - KIRQL oldIrql; - - // DebugPrint(("PacketUnbindAdapter :%ws\n", open->AdapterName.Buffer)); - - if(open->AdapterHandle) { - NdisResetEvent(&open->Event); - InterlockedExchange( (PLONG) &open->Bound, FALSE ); - PacketCancelReadIrps(open->DeviceObject); - - // DebugPrint(("Waiting on CleanupEvent\n")); - NdisWaitEvent(&open->CleanupEvent, 0); - - NdisCloseAdapter(Status, open->AdapterHandle); - - // Wait for it to complete - if(*Status == NDIS_STATUS_PENDING) { - NdisWaitEvent(&open->Event, 0); - *Status = open->Status; - } else { - *Status = NDIS_STATUS_FAILURE; - // ASSERT(0); - } - - KeAcquireSpinLock(&Globals.GlobalLock, &oldIrql); - RemoveEntryList(&open->AdapterListEntry); - KeReleaseSpinLock(&Globals.GlobalLock, oldIrql); - - NdisFreePacketPool(open->PacketPool); - - NdisFreeMemory(open->AdapterName.Buffer, open->AdapterName.Length, 0); - - IoDeleteSymbolicLink(&open->SymbolicLink); - ExFreePool(open->SymbolicLink.Buffer); - - IoDeleteDevice(open->DeviceObject); - } - - // DebugPrint(("Exit PacketUnbindAdapter\n")); -} - -VOID -PacketOpenAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN NDIS_STATUS OpenErrorStatus -) -{ - POPEN_INSTANCE open = ProtocolBindingContext; - - // DebugPrint(("B2ether: OpenAdapterComplete\n")); - - open->Status = Status; - NdisSetEvent(&open->Event); -} - -VOID -PacketCloseAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status -) -{ - POPEN_INSTANCE open = ProtocolBindingContext; - - // DebugPrint(("CloseAdapterComplete\n")); - - open->Status = Status; - NdisSetEvent(&open->Event); -} - - -NDIS_STATUS -PacketPNPHandler( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNET_PNP_EVENT NetPnPEvent -) -{ - POPEN_INSTANCE open =(POPEN_INSTANCE)ProtocolBindingContext; - NDIS_STATUS Status = NDIS_STATUS_SUCCESS; - PNET_DEVICE_POWER_STATE powerState; - - // DebugPrint(("PacketPNPHandler\n")); - - powerState = (PNET_DEVICE_POWER_STATE)NetPnPEvent->Buffer; - - // This will happen when all entities in the system need to be notified - // - //if(open == NULL) - //{ - // return Status; - //} - - switch(NetPnPEvent->NetEvent) { - case NetEventSetPower : - // DebugPrint(("NetEventSetPower\n")); - switch (*powerState) { - case NetDeviceStateD0: - Status = NDIS_STATUS_SUCCESS; - break; - default: - // We can't suspend, so we ask NDIS to Unbind us by - // returning this status: - Status = NDIS_STATUS_NOT_SUPPORTED; - break; - } - break; - case NetEventQueryPower : - // DebugPrint(("NetEventQueryPower\n")); - break; - case NetEventQueryRemoveDevice : - // DebugPrint(("NetEventQueryRemoveDevice \n")); - break; - case NetEventCancelRemoveDevice : - // DebugPrint(("NetEventCancelRemoveDevice \n")); - break; - case NetEventReconfigure : - // The protocol should always succeed this event by returning NDIS_STATUS_SUCCESS - // DebugPrint(("NetEventReconfigure\n")); - break; - case NetEventBindsComplete : - // DebugPrint(("NetEventBindsComplete \n")); - break; - case NetEventPnPCapabilities : - // DebugPrint(("NetEventPnPCapabilities \n")); - case NetEventBindList: - // DebugPrint(("NetEventBindList \n")); - default: - Status = NDIS_STATUS_NOT_SUPPORTED; - break; - } - return Status; -} - - -VOID IoIncrement( IN OUT POPEN_INSTANCE Open ) -{ - LONG result = InterlockedIncrement(&Open->IrpCount); - - //DebugPrint(("IoIncrement %d\n", result)); - - // Need to clear event (when IrpCount bumps from 0 to 1) - if (result == 1) { - NdisResetEvent(&Open->CleanupEvent); - } -} - - -VOID IoDecrement ( IN OUT POPEN_INSTANCE Open ) -{ - LONG result = InterlockedDecrement(&Open->IrpCount); - - //DebugPrint(("IoDecrement %d\n", result)); - - if (result == 0) { - // Set the event when the count transition from 1 to 0. - NdisSetEvent (&Open->CleanupEvent); - } -} diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether.h b/BasiliskII/src/Windows/b2ether/nt5/b2ether.h deleted file mode 100644 index e1c729f8f..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether.h +++ /dev/null @@ -1,276 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _B2ETHER_H_ -#define _B2ETHER_H_ - -#undef ExAllocatePool -#define ExAllocatePool(a,b) ExAllocatePoolWithTag(a, b, 'te2B') - -#if DBG -#define DebugPrint(_x_) \ - DbgPrint("B2ETHER: ");\ - DbgPrint _x_; -#else -#define DebugPrint(_x_) -#endif - -#define NT_DEVICE_NAME L"\\Device\\B2ether" -#define DOS_DEVICE_NAME L"\\DosDevices\\B2ether" - -typedef struct _GLOBAL { - PDRIVER_OBJECT DriverObject; - NDIS_HANDLE NdisProtocolHandle; - UNICODE_STRING RegistryPath; - LIST_ENTRY AdapterList; - KSPIN_LOCK GlobalLock; - PDEVICE_OBJECT ControlDeviceObject; -} GLOBAL, *PGLOBAL; - -GLOBAL Globals; - -typedef struct _INTERNAL_REQUEST { - PIRP Irp; - NDIS_REQUEST Request; -} INTERNAL_REQUEST, *PINTERNAL_REQUEST; - -typedef struct _OPEN_INSTANCE { - PDEVICE_OBJECT DeviceObject; - ULONG IrpCount; - NDIS_STRING AdapterName; - NDIS_STRING SymbolicLink; - NDIS_HANDLE AdapterHandle; - NDIS_HANDLE PacketPool; - KSPIN_LOCK RcvQSpinLock; - LIST_ENTRY RcvList; - NDIS_MEDIUM Medium; - KSPIN_LOCK ResetQueueLock; - LIST_ENTRY ResetIrpList; - NDIS_STATUS Status; - NDIS_EVENT Event; - NDIS_EVENT CleanupEvent; - LIST_ENTRY AdapterListEntry; - BOOLEAN Bound; - CHAR Filler[3]; -} OPEN_INSTANCE, *POPEN_INSTANCE; - -typedef struct _PACKET_RESERVED { - LIST_ENTRY ListElement; - PIRP Irp; - PMDL pMdl; -} PACKET_RESERVED, *PPACKET_RESERVED; - - -#define ETHERNET_HEADER_LENGTH 14 -#define RESERVED(_p) ((PPACKET_RESERVED)((_p)->ProtocolReserved)) -#define TRANSMIT_PACKETS 16 - - -NTSTATUS -DriverEntry( - IN PDRIVER_OBJECT DriverObject, - IN PUNICODE_STRING RegistryPath - ); - -NTSTATUS -PacketCancelReadIrps( - IN PDEVICE_OBJECT DeviceObject -); - -NTSTATUS -PacketCleanup( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -VOID -PacketBindAdapter( - OUT PNDIS_STATUS Status, - IN NDIS_HANDLE BindContext, - IN PNDIS_STRING DeviceName, - IN PVOID SystemSpecific1, - IN PVOID SystemSpecific2 - ); -VOID -PacketUnbindAdapter( - OUT PNDIS_STATUS Status, - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE UnbindContext - ); - - -VOID -PacketOpenAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN NDIS_STATUS OpenErrorStatus - ); - -VOID -PacketCloseAdapterComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status - ); - - -NDIS_STATUS -PacketReceiveIndicate( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE MacReceiveContext, - IN PVOID HeaderBuffer, - IN UINT HeaderBufferSize, - IN PVOID LookAheadBuffer, - IN UINT LookaheadBufferSize, - IN UINT PacketSize - ); - -VOID -PacketReceiveComplete( - IN NDIS_HANDLE ProtocolBindingContext - ); - - -VOID -PacketRequestComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_REQUEST pRequest, - IN NDIS_STATUS Status - ); - -VOID -PacketSendComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status - ); - - -VOID -PacketResetComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status - ); - - -VOID -PacketStatus( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status, - IN PVOID StatusBuffer, - IN UINT StatusBufferSize - ); - - -VOID -PacketStatusComplete( - IN NDIS_HANDLE ProtocolBindingContext - ); - -VOID -PacketTransferDataComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET Packet, - IN NDIS_STATUS Status, - IN UINT BytesTransferred - ); - - -NTSTATUS -PacketShutdown( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -VOID -PacketUnload( - IN PDRIVER_OBJECT DriverObject - ); - - - -NTSTATUS -PacketOpen( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketClose( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketWrite( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketRead( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -NTSTATUS -PacketIoControl( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -VOID -PacketCancelRoutine ( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp - ); - -INT -PacketReceivePacket( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET Packet - ); - -NTSTATUS -PacketGetAdapterList( - IN PVOID Buffer, - IN ULONG Length, - IN OUT PULONG DataLength - ); - -NDIS_STATUS -PacketPNPHandler( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNET_PNP_EVENT pNetPnPEvent - ); - - -VOID -IoIncrement ( - IN OUT POPEN_INSTANCE Open - ); - -VOID -IoDecrement ( - IN OUT POPEN_INSTANCE Open - ); - -#endif //_B2ETHER_H_ diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether.rc b/BasiliskII/src/Windows/b2ether/nt5/b2ether.rc deleted file mode 100644 index 3e4e918ab..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether.rc +++ /dev/null @@ -1,10 +0,0 @@ -#include -#include - -#define VER_FILETYPE VFT_DRV -#define VER_FILESUBTYPE VFT2_DRV_NETWORK -#define VER_FILEDESCRIPTION_STR "Basilisk II Protocol Driver" -#define VER_INTERNALNAME_STR "B2ETHER.SYS" -#define VER_ORIGINALFILENAME_STR "B2ETHER.SYS" - -#include "common.ver" diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether64.sln b/BasiliskII/src/Windows/b2ether/nt5/b2ether64.sln deleted file mode 100755 index 1d2055d9d..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether64.sln +++ /dev/null @@ -1,26 +0,0 @@ - -Microsoft Visual Studio Solution File, Format Version 11.00 -# Visual Studio 2010 -Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "b2ether64", "b2ether64.vcxproj", "{F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}" -EndProject -Global - GlobalSection(SolutionConfigurationPlatforms) = preSolution - Debug|Win32 = Debug|Win32 - Debug|x64 = Debug|x64 - Release|Win32 = Release|Win32 - Release|x64 = Release|x64 - EndGlobalSection - GlobalSection(ProjectConfigurationPlatforms) = postSolution - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Debug|Win32.ActiveCfg = Debug|Win32 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Debug|Win32.Build.0 = Debug|Win32 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Debug|x64.ActiveCfg = Debug|x64 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Debug|x64.Build.0 = Debug|x64 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Release|Win32.ActiveCfg = Release|Win32 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Release|Win32.Build.0 = Release|Win32 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Release|x64.ActiveCfg = Release|x64 - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4}.Release|x64.Build.0 = Release|x64 - EndGlobalSection - GlobalSection(SolutionProperties) = preSolution - HideSolutionNode = FALSE - EndGlobalSection -EndGlobal diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether64.vcxproj b/BasiliskII/src/Windows/b2ether/nt5/b2ether64.vcxproj deleted file mode 100755 index 51fe3bc79..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether64.vcxproj +++ /dev/null @@ -1,120 +0,0 @@ - - - - - Debug - Win32 - - - Debug - x64 - - - Release - Win32 - - - Release - x64 - - - - {F7EA62B6-E0EC-4074-8A83-D0CBB1C990B4} - MakeFileProj - - - - Makefile - true - - - Makefile - false - - - Makefile - - - Makefile - - - - - - - - - - - - - call $(WDKPATH)\bin\setenv.bat $(WDKPATH) chk win7 -build - rmdir /s /q objchk_win7_x86 - rmdir /s /q objchk_win7_x86 -call $(WDKPATH)\bin\setenv.bat $(WDKPATH) chk win7 -build - objchk_win7_x86 - objchk_win7_x86 - objchk_win7_x86\i386\b2ether.sys - WIN32;_CONSOLE;_X86_;_DDK_;_DEBUG;DBG=1;$(NMakePreprocessorDefinitions) - $(WDKPATH)\inc\ddk;$(WDKPATH)\inc\api;$(WDKPATH)\inc\crt;$(NMakeIncludeSearchPath) - - - call $(WDKPATH)\bin\setenv.bat $(WDKPATH) fre win7 -build - rmdir /s /q objfre_win7_x86 - rmdir /s /q objfre_win7_x86 -call $(WDKPATH)\bin\setenv.bat $(WDKPATH) fre win7 -build - objfre_win7_x86 - objfre_win7_x86 - objfre_win7_x86\i386\b2ether.sys - WIN32;_CONSOLE;_X86_;_DDK_;_NDEBUG;DBG=0;$(NMakePreprocessorDefinitions) - $(WDKPATH)\inc\ddk;$(WDKPATH)\inc\api;$(WDKPATH)\inc\crt;$(NMakeIncludeSearchPath) - - - call $(WDKPATH)\bin\setenv.bat $(WDKPATH) chk x64 win7 -build - rmdir /s /q objchk_win7_amd64 - rmdir /s /q objchk_win7_amd64 -call $(WDKPATH)\bin\setenv.bat $(WDKPATH) chk x64 win7 -build - objchk_win7_amd64 - objchk_win7_amd64 - objchk_win7_amd64\amd64\b2ether64.sys - WIN32;_CONSOLE;_AMD64_;_DDK_;_DEBUG;DBG=1;$(NMakePreprocessorDefinitions) - $(WDKPATH)\inc\ddk;$(WDKPATH)\inc\api;$(WDKPATH)\inc\crt;$(NMakeIncludeSearchPath) - - - call $(WDKPATH)\bin\setenv.bat $(WDKPATH) fre x64 win7 -build - rmdir /s /q objfre_win7_amd64 - rmdir /s /q objfre_win7_amd64 -call $(WDKPATH)\bin\setenv.bat $(WDKPATH) fre x64 win7 -build - objfre_win7_amd64 - objfre_win7_amd64 - objfre_win7_amd64\amd64\b2ether64.sys - WIN32;_CONSOLE;_AMD64_;_DDK_;_NDEBUG;DBG=0;$(NMakePreprocessorDefinitions) - $(WDKPATH)\inc\ddk;$(WDKPATH)\inc\api;$(WDKPATH)\inc\crt;$(NMakeIncludeSearchPath) - - - - - - - - - - - - - - - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether_openclose.c b/BasiliskII/src/Windows/b2ether/nt5/b2ether_openclose.c deleted file mode 100644 index b584dbc75..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether_openclose.c +++ /dev/null @@ -1,155 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "ntddk.h" -#include "ndis.h" -#include "b2ether.h" - -NTSTATUS PacketOpen( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - NTSTATUS status = STATUS_SUCCESS; - - // DebugPrint(("OpenAdapter\n")); - - if(DeviceObject == Globals.ControlDeviceObject) { - Irp->IoStatus.Status = status; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return status; - } - - open = DeviceObject->DeviceExtension; - - // DebugPrint(("AdapterName :%ws\n", open->AdapterName.Buffer)); - - IoIncrement(open); - - if(!open->Bound) { - status = STATUS_DEVICE_NOT_READY; - } - - Irp->IoStatus.Information = 0; - Irp->IoStatus.Status = status; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return status; -} - - -NTSTATUS PacketClose( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - NTSTATUS status = STATUS_SUCCESS; - - // DebugPrint(("CloseAdapter \n")); - - if(DeviceObject == Globals.ControlDeviceObject) { - Irp->IoStatus.Status = status; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return status; - } - - open = DeviceObject->DeviceExtension; - IoIncrement(open); - Irp->IoStatus.Information = 0; - Irp->IoStatus.Status = status; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return status; -} - - -NTSTATUS PacketCleanup( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - NTSTATUS status = STATUS_SUCCESS; - - // DebugPrint(("Packet: Cleanup\n")); - - if(DeviceObject == Globals.ControlDeviceObject) { - Irp->IoStatus.Status = status; - IoCompleteRequest(Irp, IO_NO_INCREMENT); - return status; - } - - open = DeviceObject->DeviceExtension; - - IoIncrement(open); - - PacketCancelReadIrps(DeviceObject); - - // Since the current implementation of NDIS doesn't - // allow us to cancel requests pending at the - // minport, we must wait here until they complete. - - IoDecrement(open); - - NdisWaitEvent(&open->CleanupEvent, 0); - - Irp->IoStatus.Information = 0; - Irp->IoStatus.Status = status; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - return status; -} - - -VOID -PacketResetComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_STATUS Status -) -{ - POPEN_INSTANCE open; - PIRP irp; - - PLIST_ENTRY resetListEntry; - - // DebugPrint(("PacketResetComplte\n")); - - open= (POPEN_INSTANCE)ProtocolBindingContext; - - resetListEntry=ExInterlockedRemoveHeadList( - &open->ResetIrpList, - &open->ResetQueueLock - ); - -#if DBG - if (resetListEntry == NULL) { - DbgBreakPoint(); - return; - } -#endif - - irp=CONTAINING_RECORD(resetListEntry,IRP,Tail.Overlay.ListEntry); - - if(Status == NDIS_STATUS_SUCCESS) { - irp->IoStatus.Status = STATUS_SUCCESS; - } else { - irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - } - - irp->IoStatus.Information = 0; - IoCompleteRequest(irp, IO_NO_INCREMENT); - IoDecrement(open); - - // DebugPrint(("PacketResetComplte exit\n")); -} diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether_read.c b/BasiliskII/src/Windows/b2ether/nt5/b2ether_read.c deleted file mode 100644 index 3f4f100d9..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether_read.c +++ /dev/null @@ -1,418 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "ntddk.h" -#include "ndis.h" -#include "b2ether.h" - - -NTSTATUS PacketRead( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - PNDIS_PACKET pPacket; - NDIS_STATUS status; - NTSTATUS ntStatus; - PIO_STACK_LOCATION irpSp; - - // DebugPrint(("Read\n")); - - open = DeviceObject->DeviceExtension; - - IoIncrement(open); - - if(!open->Bound) { - ntStatus = STATUS_DEVICE_NOT_READY; - goto ERROR; - } - - irpSp = IoGetCurrentIrpStackLocation(Irp); - - if (irpSp->Parameters.Read.Length < ETHERNET_HEADER_LENGTH) { - ntStatus = STATUS_BUFFER_TOO_SMALL; - goto ERROR; - } - - NdisAllocatePacket( &status, &pPacket, open->PacketPool ); - if (status != NDIS_STATUS_SUCCESS) { - // DebugPrint(("Packet: Read- No free packets\n")); - ntStatus = STATUS_INSUFFICIENT_RESOURCES; - goto ERROR; - } - - RESERVED(pPacket)->Irp=Irp; - RESERVED(pPacket)->pMdl=NULL; - IoMarkIrpPending(Irp); - - IoSetCancelRoutine(Irp, PacketCancelRoutine); - - ExInterlockedInsertTailList( - &open->RcvList, - &RESERVED(pPacket)->ListElement, - &open->RcvQSpinLock); - - return STATUS_PENDING; - -ERROR: - Irp->IoStatus.Status = ntStatus; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return ntStatus; -} - - - -NDIS_STATUS -PacketReceiveIndicate ( - IN NDIS_HANDLE ProtocolBindingContext, - IN NDIS_HANDLE MacReceiveContext, - IN PVOID HeaderBuffer, - IN UINT HeaderBufferSize, - IN PVOID LookAheadBuffer, - IN UINT LookaheadBufferSize, - IN UINT PacketSize -) -{ - POPEN_INSTANCE open; - PIO_STACK_LOCATION irpSp; - PIRP irp; - PLIST_ENTRY packetListEntry; - PNDIS_PACKET pPacket; - ULONG sizeToTransfer; - NDIS_STATUS status; - UINT bytesTransfered = 0; - ULONG bufferLength; - PPACKET_RESERVED reserved; - PMDL pMdl; - - // DebugPrint(("ReceiveIndicate\n")); - - open= (POPEN_INSTANCE)ProtocolBindingContext; - - if (HeaderBufferSize > ETHERNET_HEADER_LENGTH) { - return NDIS_STATUS_SUCCESS; - } - - // See if there are any pending read that we can satisfy - packetListEntry = ExInterlockedRemoveHeadList( &open->RcvList, &open->RcvQSpinLock ); - - if (packetListEntry == NULL) { - // DebugPrint(("No pending read, dropping packets\n")); - return NDIS_STATUS_NOT_ACCEPTED; - } - - reserved = CONTAINING_RECORD(packetListEntry,PACKET_RESERVED,ListElement); - pPacket = CONTAINING_RECORD(reserved,NDIS_PACKET,ProtocolReserved); - - irp = RESERVED(pPacket)->Irp; - irpSp = IoGetCurrentIrpStackLocation(irp); - - // We don't have to worry about the situation where the IRP is cancelled - // after we remove it from the queue and before we reset the cancel - // routine because the cancel routine has been coded to cancel an IRP - // only if it's in the queue. - - IoSetCancelRoutine(irp, NULL); - - bufferLength = irpSp->Parameters.Read.Length-ETHERNET_HEADER_LENGTH; - - sizeToTransfer = (PacketSize < bufferLength) ? PacketSize : bufferLength; - - NdisMoveMappedMemory( - MmGetSystemAddressForMdlSafe(irp->MdlAddress, NormalPagePriority), - HeaderBuffer, - HeaderBufferSize - ); - - pMdl=IoAllocateMdl( - MmGetMdlVirtualAddress(irp->MdlAddress), - MmGetMdlByteCount(irp->MdlAddress), - FALSE, - FALSE, - NULL - ); - - if (pMdl == NULL) { - // DebugPrint(("Packet: Read-Failed to allocate Mdl\n")); - status = NDIS_STATUS_RESOURCES; - goto ERROR; - } - - IoBuildPartialMdl( - irp->MdlAddress, - pMdl, - ((PUCHAR)MmGetMdlVirtualAddress(irp->MdlAddress))+ETHERNET_HEADER_LENGTH, - 0 - ); - - pMdl->Next = NULL; - - RESERVED(pPacket)->pMdl=pMdl; - - NdisChainBufferAtFront(pPacket,pMdl); - - NdisTransferData( - &status, - open->AdapterHandle, - MacReceiveContext, - 0, - sizeToTransfer, - pPacket, - &bytesTransfered - ); - - if (status == NDIS_STATUS_PENDING) { - return NDIS_STATUS_SUCCESS; - } - -ERROR: - PacketTransferDataComplete( open, pPacket, status, bytesTransfered ); - return NDIS_STATUS_SUCCESS; -} - - -VOID -PacketTransferDataComplete ( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status, - IN UINT BytesTransfered -) -{ - PIO_STACK_LOCATION irpSp; - POPEN_INSTANCE open; - PIRP irp; - PMDL pMdl; - - // DebugPrint(("Packet: TransferDataComplete\n")); - - open = (POPEN_INSTANCE)ProtocolBindingContext; - irp = RESERVED(pPacket)->Irp; - irpSp = IoGetCurrentIrpStackLocation(irp); - pMdl = RESERVED(pPacket)->pMdl; - - - if(pMdl) IoFreeMdl(pMdl); - - NdisFreePacket(pPacket); - - if(Status == NDIS_STATUS_SUCCESS) { - irp->IoStatus.Status = STATUS_SUCCESS; - irp->IoStatus.Information = BytesTransfered+ETHERNET_HEADER_LENGTH; - } else { - irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - irp->IoStatus.Information = 0; - } - - // DebugPrint(("BytesTransfered:%d\n", irp->IoStatus.Information)); - - IoCompleteRequest(irp, IO_NO_INCREMENT); - IoDecrement(open); -} - -VOID PacketReceiveComplete( IN NDIS_HANDLE ProtocolBindingContext ) -{ -} - -INT -PacketReceivePacket( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET Packet -) -{ - UINT bytesTransfered = 0; - POPEN_INSTANCE open; - PIRP irp; - PNDIS_PACKET myPacket; - PLIST_ENTRY packetListEntry; - ULONG bufferLength; - PPACKET_RESERVED reserved; - PIO_STACK_LOCATION irpSp; - PMDL mdl; - PVOID startAddress; - NTSTATUS status; - - // DebugPrint(("PacketReceivePacket\n")); - - open = (POPEN_INSTANCE)ProtocolBindingContext; - - packetListEntry = ExInterlockedRemoveHeadList( - &open->RcvList, - &open->RcvQSpinLock - ); - - if (packetListEntry == NULL) { - // DebugPrint(("No pending read, dropping packets\n")); - return 0; - } - - reserved = CONTAINING_RECORD(packetListEntry,PACKET_RESERVED,ListElement); - myPacket = CONTAINING_RECORD(reserved,NDIS_PACKET,ProtocolReserved); - - irp = RESERVED(myPacket)->Irp; - irpSp = IoGetCurrentIrpStackLocation(irp); - - // We don't have to worry about the situation where the IRP is cancelled - // after we remove it from the queue and before we reset the cancel - // routine because the cancel routine has been coded to cancel an IRP - // only if it's in the queue. - - IoSetCancelRoutine(irp, NULL); - - // Following block of code locks the destination packet - // MDLs in a safe manner. This is a temporary workaround - // for NdisCopyFromPacketToPacket that currently doesn't use - // safe functions to lock pages of MDL. This is required to - // prevent system from bugchecking under low memory resources. - // - { - PVOID virtualAddress; - PNDIS_BUFFER firstBuffer, nextBuffer; - ULONG totalLength; - - NdisQueryPacket(Packet, NULL, NULL, &firstBuffer, &totalLength); - while( firstBuffer ) { - NdisQueryBufferSafe( firstBuffer, &virtualAddress, &totalLength, NormalPagePriority ); - if(!virtualAddress) { - status = STATUS_INSUFFICIENT_RESOURCES; - goto CleanExit; - } - NdisGetNextBuffer(firstBuffer, &nextBuffer); - firstBuffer = nextBuffer; - } - } - - NdisChainBufferAtFront( myPacket, irp->MdlAddress ); - bufferLength=irpSp->Parameters.Read.Length; - NdisCopyFromPacketToPacket( myPacket, 0, bufferLength, Packet, 0, &bytesTransfered ); - -CleanExit: - NdisFreePacket(myPacket); - irp->IoStatus.Status = status; - irp->IoStatus.Information = bytesTransfered; - IoCompleteRequest(irp, IO_NO_INCREMENT); - // DebugPrint(("BytesTransfered:%d\n", bytesTransfered)); - IoDecrement(open); - return 0; -} - - -VOID -PacketCancelRoutine ( - IN PDEVICE_OBJECT DeviceObject, - IN PIRP Irp -) - -{ - POPEN_INSTANCE open = DeviceObject->DeviceExtension; - KIRQL oldIrql; - PIRP irpToComplete = NULL; - PLIST_ENTRY thisEntry, listHead; - PIRP pendingIrp; - PNDIS_PACKET myPacket = NULL; - PPACKET_RESERVED reserved; - PMDL mdl; - - // Don't assume that the IRP being cancelled is in the queue. - // Only complete the IRP if it IS in the queue. - // - // Must acquire the local spinlock before releasing - // the global cancel spinlock - // - // DebugPrint(("PacketCancelRoutine\n")); - - oldIrql = Irp->CancelIrql; - - // One should not intermix KeAcquireSpinLock(AtDpcLevel) - // and ExInterlocked...List() functions on the same spinlock if the - // routines that use the lock run at IRQL > DISPATCH_LEVEL. - // After acquiring the lock using Ke function, if we got interrupted - // and entered into an ISR and tried to manipulate the list using - // ExInterlocked...List function with the same lock, we deadlock. - // In this sample we can safely do that because none of our routines - // will be called at IRQL > DISPATCH_LEVEL. - - KeAcquireSpinLockAtDpcLevel(&open->RcvQSpinLock); - IoReleaseCancelSpinLock( KeGetCurrentIrql() ); - - listHead = &open->RcvList; - for( thisEntry = listHead->Flink; thisEntry != listHead; thisEntry = thisEntry->Flink ) { - reserved=CONTAINING_RECORD(thisEntry,PACKET_RESERVED,ListElement); - myPacket=CONTAINING_RECORD(reserved,NDIS_PACKET,ProtocolReserved); - pendingIrp = RESERVED(myPacket)->Irp; - if (pendingIrp == Irp) { - RemoveEntryList(thisEntry); - irpToComplete = pendingIrp; - break; - } - } - - KeReleaseSpinLock(&open->RcvQSpinLock, oldIrql); - - if(irpToComplete) { - // DebugPrint(("Cancelling IRP\n")); - // ASSERT(myPacket); - - NdisFreePacket(myPacket); - - irpToComplete->IoStatus.Status = STATUS_CANCELLED; - irpToComplete->IoStatus.Information = 0; - IoCompleteRequest(irpToComplete, IO_NO_INCREMENT); - IoDecrement(open); - } -} - - -NTSTATUS PacketCancelReadIrps( IN PDEVICE_OBJECT DeviceObject ) -{ - POPEN_INSTANCE open = DeviceObject->DeviceExtension; - PLIST_ENTRY thisEntry; - PIRP pendingIrp; - PNDIS_PACKET myPacket = NULL; - PPACKET_RESERVED reserved; - PMDL mdl; - - // DebugPrint(("PacketCancelReadIrps\n")); - - // Walk through the RcvList and cancel all read IRPs. - - while( thisEntry = ExInterlockedRemoveHeadList( &open->RcvList, &open->RcvQSpinLock )) { - reserved=CONTAINING_RECORD(thisEntry,PACKET_RESERVED,ListElement); - myPacket=CONTAINING_RECORD(reserved,NDIS_PACKET,ProtocolReserved); - - ASSERT(myPacket); - - pendingIrp = RESERVED(myPacket)->Irp; - - NdisFreePacket(myPacket); - - // DebugPrint(("Cancelled : 0%0x\n", pendingIrp)); - - IoSetCancelRoutine(pendingIrp, NULL); - - pendingIrp->IoStatus.Information = 0; - pendingIrp->IoStatus.Status = STATUS_CANCELLED; - IoCompleteRequest(pendingIrp, IO_NO_INCREMENT); - IoDecrement(open); - } - - return STATUS_SUCCESS; -} diff --git a/BasiliskII/src/Windows/b2ether/nt5/b2ether_write.c b/BasiliskII/src/Windows/b2ether/nt5/b2ether_write.c deleted file mode 100644 index 42b1ec946..000000000 --- a/BasiliskII/src/Windows/b2ether/nt5/b2ether_write.c +++ /dev/null @@ -1,101 +0,0 @@ -/* - * b2ether driver -- derived from DDK packet driver sample - * - * Basilisk II (C) 1997-1999 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "ntddk.h" -#include "ndis.h" -#include "b2ether.h" - - -NTSTATUS PacketWrite( IN PDEVICE_OBJECT DeviceObject, IN PIRP Irp ) -{ - POPEN_INSTANCE open; - PNDIS_PACKET pPacket; - NDIS_STATUS Status; - - // DebugPrint(("SendAdapter\n")); - - open = DeviceObject->DeviceExtension; - - IoIncrement(open); - - if(!open->Bound) { - Irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return STATUS_UNSUCCESSFUL; - } - - NdisAllocatePacket( &Status, &pPacket, open->PacketPool ); - - if (Status != NDIS_STATUS_SUCCESS) { - Irp->IoStatus.Status = STATUS_INSUFFICIENT_RESOURCES; - IoCompleteRequest (Irp, IO_NO_INCREMENT); - IoDecrement(open); - return STATUS_INSUFFICIENT_RESOURCES; - } - - RESERVED(pPacket)->Irp=Irp; - - NdisChainBufferAtFront(pPacket,Irp->MdlAddress); - - // Important: Since we have marked the IRP pending, we must return - // STATUS_PENDING even we happen to complete the IRP synchronously. - - IoMarkIrpPending(Irp); - - NdisSend( &Status, open->AdapterHandle, pPacket ); - - if (Status != NDIS_STATUS_PENDING) { - PacketSendComplete( open, pPacket, Status ); - } - - return STATUS_PENDING; -} - -VOID -PacketSendComplete( - IN NDIS_HANDLE ProtocolBindingContext, - IN PNDIS_PACKET pPacket, - IN NDIS_STATUS Status -) -{ - PIRP irp; - PIO_STACK_LOCATION irpSp; - - // DebugPrint(("Packet: SendComplete :%x\n", Status)); - - irp = RESERVED(pPacket)->Irp; - irpSp = IoGetCurrentIrpStackLocation(irp); - - NdisFreePacket(pPacket); - - if(Status == NDIS_STATUS_SUCCESS) { - irp->IoStatus.Information = irpSp->Parameters.Write.Length; - irp->IoStatus.Status = STATUS_SUCCESS; - } else { - irp->IoStatus.Information = 0; - irp->IoStatus.Status = STATUS_UNSUCCESSFUL; - } - - IoCompleteRequest(irp, IO_NO_INCREMENT); - IoDecrement((POPEN_INSTANCE)ProtocolBindingContext); -} diff --git a/BasiliskII/src/Windows/b2ether/packet32.cpp b/BasiliskII/src/Windows/b2ether/packet32.cpp deleted file mode 100755 index 72efb1fe9..000000000 --- a/BasiliskII/src/Windows/b2ether/packet32.cpp +++ /dev/null @@ -1,694 +0,0 @@ -/* - * packet32.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "util_windows.h" -#include -#include -#include "cpu_emulation.h" -typedef unsigned long ULONG_PTR, *PULONG_PTR; - -// VC6 does not have this, Platform SDK has. -// In case of errors, try to comment out, the needed -// definitions are below (#ifndef _NTDDNDIS_) - -// Most people don't have the Platform SDK, so I take this one out. -// #include - -#include "inc/ntddpack.h" - -#include "ether.h" -#include "ether_defs.h" -#include "b2ether/multiopt.h" -#include "b2ether/inc/b2ether_hl.h" - - - -#ifndef _NTDDNDIS_ -#define NDIS_PACKET_TYPE_DIRECTED 0x00000001 -#define NDIS_PACKET_TYPE_MULTICAST 0x00000002 -#define NDIS_PACKET_TYPE_ALL_MULTICAST 0x00000004 -#define NDIS_PACKET_TYPE_BROADCAST 0x00000008 -#define NDIS_PACKET_TYPE_SOURCE_ROUTING 0x00000010 -#define NDIS_PACKET_TYPE_PROMISCUOUS 0x00000020 - -#define OID_802_3_PERMANENT_ADDRESS 0x01010101 -#define OID_802_3_CURRENT_ADDRESS 0x01010102 -#define OID_802_3_MULTICAST_LIST 0x01010103 - -#define OID_GEN_CURRENT_PACKET_FILTER 0x0001010E -#endif - -#define DEBUG_PACKETS 0 -#define DEBUG 0 -#include "debug.h" - -#ifdef __cplusplus -extern "C" { -#endif - -#if DEBUG -#pragma optimize("",off) -#endif - -#define MAX_MULTICAST 100 -#define MAX_MULTICAST_SZ (20*ETH_802_3_ADDRESS_LENGTH) - -static ULONG packet_filter = 0; - - -LPADAPTER PacketOpenAdapter( LPCTSTR AdapterName, int16 mode ) -{ - LPADAPTER lpAdapter; - BOOLEAN Result = TRUE; - - D(bug("Packet32: PacketOpenAdapter\n")); - - // May fail if user is not an Administrator. - StartPacketDriver( TEXT("B2ether") ); - - lpAdapter = (LPADAPTER)GlobalAllocPtr( GMEM_MOVEABLE|GMEM_ZEROINIT, sizeof(ADAPTER) ); - if (lpAdapter==NULL) { - D(bug("Packet32: PacketOpenAdapter GlobalAlloc Failed\n")); - return NULL; - } - - TCHAR device_name[256]; - _sntprintf(lpAdapter->SymbolicLink, lengthof(lpAdapter->SymbolicLink), TEXT("\\\\.\\B2ether_%s"), AdapterName ); - _sntprintf(device_name, lengthof(device_name), TEXT("\\Device\\B2ether_%s"), AdapterName ); - - // Work around one subtle NT4 bug. - DefineDosDevice( - DDD_REMOVE_DEFINITION, - &lpAdapter->SymbolicLink[4], - NULL - ); - DefineDosDevice( - DDD_RAW_TARGET_PATH, - &lpAdapter->SymbolicLink[4], - device_name - ); - - packet_filter = NDIS_PACKET_TYPE_DIRECTED | - NDIS_PACKET_TYPE_MULTICAST | - NDIS_PACKET_TYPE_BROADCAST; - - if(mode == ETHER_MULTICAST_ALL) packet_filter |= NDIS_PACKET_TYPE_ALL_MULTICAST; - if(mode == ETHER_MULTICAST_PROMISCUOUS) packet_filter |= NDIS_PACKET_TYPE_PROMISCUOUS; - - if (Result) { - lpAdapter->hFile = CreateFile(lpAdapter->SymbolicLink, - GENERIC_WRITE | GENERIC_READ, - 0, - NULL, - // (os == VER_PLATFORM_WIN32_NT) ? CREATE_ALWAYS : OPEN_EXISTING, - OPEN_EXISTING, - FILE_FLAG_OVERLAPPED, - 0 - ); - if (lpAdapter->hFile != INVALID_HANDLE_VALUE) { - if(*AdapterName && _tcscmp(AdapterName,TEXT("")) != 0) { - PacketSetFilter( lpAdapter, packet_filter ); - } - return lpAdapter; - } - } - D(bug("Packet32: PacketOpenAdapter Could not open adapter\n")); - GlobalFreePtr( lpAdapter ); - return NULL; -} - -VOID PacketCloseAdapter( LPADAPTER lpAdapter ) -{ - D(bug("Packet32: PacketCloseAdapter\n")); - - if(lpAdapter) { - if(lpAdapter->hFile) { - CloseHandle(lpAdapter->hFile); - } - GlobalFreePtr(lpAdapter); - } -} - -LPPACKET PacketAllocatePacket( LPADAPTER AdapterObject, UINT Length ) -{ - LPPACKET lpPacket; - - lpPacket = (LPPACKET)GlobalAllocPtr( GMEM_MOVEABLE|GMEM_ZEROINIT, sizeof(PACKET) ); - if(lpPacket==NULL) { - D(bug("Packet32: PacketAllocatePacket: GlobalAlloc Failed\n")); - return NULL; - } - - lpPacket->OverLapped.hEvent = CreateEvent(NULL,FALSE,FALSE,NULL); - if(!lpPacket->OverLapped.hEvent) { - D(bug("Packet32: PacketAllocatePacket: CreateEvent Failed\n")); - GlobalFreePtr(lpPacket); - return NULL; - } - - lpPacket->Buffer = GlobalAllocPtr(GMEM_MOVEABLE,2048); // 1514 - if(!lpPacket->Buffer) { - D(bug("Packet32: PacketAllocatePacket: GlobalAllocPtr Failed\n")); - if(lpPacket->OverLapped.hEvent) CloseHandle(lpPacket->OverLapped.hEvent); - GlobalFreePtr(lpPacket); - return NULL; - } - - lpPacket->OverLapped.Offset = 0; - lpPacket->OverLapped.OffsetHigh = 0; - lpPacket->Length = Length; - lpPacket->BytesReceived = 0; - lpPacket->bIoComplete = FALSE; - lpPacket->free = TRUE; - - return lpPacket; -} - -VOID PacketFreePacket( LPPACKET lpPacket ) -{ - if(lpPacket) { - if(lpPacket->Buffer) GlobalFreePtr(lpPacket->Buffer); - if(lpPacket->OverLapped.hEvent) CloseHandle(lpPacket->OverLapped.hEvent); - GlobalFreePtr(lpPacket); - } -} - -BOOLEAN PacketDeviceIoControl( - LPADAPTER lpAdapterObject, - LPPACKET lpPacket, - ULONG ulIoctl, - BOOLEAN bSync -) -{ - BOOLEAN Result; - - lpPacket->OverLapped.Offset = 0; - lpPacket->OverLapped.OffsetHigh = 0; - lpPacket->BytesReceived = 0; - - if ( !ResetEvent( lpPacket->OverLapped.hEvent ) ) { - lpPacket->bIoComplete = FALSE; - D(bug( "Packet32: PacketDeviceIoControl failed to reset event\r\n", GetLastError() )); - return FALSE; - } - - Result = DeviceIoControl( - lpAdapterObject->hFile, - ulIoctl, - lpPacket->Buffer, - lpPacket->Length, - lpPacket->Buffer, - lpPacket->Length, - &(lpPacket->BytesReceived), - &(lpPacket->OverLapped) ); - - if( !Result && bSync ) { - if (GetLastError() == ERROR_IO_PENDING) { - Result = GetOverlappedResult( lpAdapterObject->hFile, - &(lpPacket->OverLapped), - &(lpPacket->BytesReceived), - TRUE ); - } else { - D(bug( "Packet32: unsupported API call returned error 0x%x\r\n", GetLastError() )); - } - } - lpPacket->bIoComplete = Result; - return Result; -} - -VOID CALLBACK PacketSendCompletionRoutine( - DWORD dwErrorCode, - DWORD dwNumberOfBytesTransfered, - LPOVERLAPPED lpOverlapped -) -{ - LPPACKET lpPacket = CONTAINING_RECORD(lpOverlapped,PACKET,OverLapped); - -#if DEBUG_PACKETS - D(bug("PacketSendCompletionRoutine %d\n",dwNumberOfBytesTransfered)); -#endif - - lpPacket->bIoComplete = TRUE; - // lpPacket->free = TRUE; - // PacketFreePacket(lpPacket); - recycle_write_packet(lpPacket); -} - -BOOLEAN PacketSendPacket( - LPADAPTER AdapterObject, - LPPACKET lpPacket, - BOOLEAN Sync, - BOOLEAN RecyclingAllowed -) -{ - BOOLEAN Result; - -#if DEBUG_PACKETS - D(bug("Packet32: PacketSendPacket bytes=%d, sync=%d\n",lpPacket->Length,Sync)); -#endif - - lpPacket->OverLapped.Offset = 0; - lpPacket->OverLapped.OffsetHigh = 0; - lpPacket->bIoComplete = FALSE; - - if(Sync) { - Result = WriteFile( - AdapterObject->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->BytesReceived, - &lpPacket->OverLapped - ); - if(Result) { - Result = GetOverlappedResult( - AdapterObject->hFile, - &lpPacket->OverLapped, - &lpPacket->BytesReceived, - TRUE - ); - } else { - D(bug("Packet32: PacketSendPacket WriteFile failed, err=%d\n",(int)GetLastError())); - } - lpPacket->bIoComplete = TRUE; - if(RecyclingAllowed) PacketFreePacket(lpPacket); -#if DEBUG_PACKETS - D(bug("Packet32: PacketSendPacket result=%d, bytes=%d\n",(int)Result,(int)lpPacket->BytesReceived)); -#endif - } else { - // don't care about the result - Result = WriteFileEx( - AdapterObject->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->OverLapped, - PacketSendCompletionRoutine - ); -#if DEBUG_PACKETS - D(bug("Packet32: PacketSendPacket result=%d\n",(int)Result)); -#endif - if(!Result && RecyclingAllowed) { - recycle_write_packet(lpPacket); - } - } - - return Result; -} - -BOOLEAN PacketReceivePacket( - LPADAPTER AdapterObject, - LPPACKET lpPacket, - BOOLEAN Sync -) -{ - BOOLEAN Result; - - lpPacket->OverLapped.Offset=0; - lpPacket->OverLapped.OffsetHigh=0; - lpPacket->bIoComplete = FALSE; - -#if DEBUG_PACKETS - D(bug("Packet32: PacketReceivePacket\n")); -#endif - - if (Sync) { - Result = ReadFile( - AdapterObject->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->BytesReceived, - &lpPacket->OverLapped - ); - if(Result) { - Result = GetOverlappedResult( - AdapterObject->hFile, - &lpPacket->OverLapped, - &lpPacket->BytesReceived, - TRUE - ); - if(Result) - lpPacket->bIoComplete = TRUE; - else - lpPacket->free = TRUE; - } - } else { - Result = ReadFileEx( - AdapterObject->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->OverLapped, - packet_read_completion - ); - } - - if(!Result) lpPacket->BytesReceived = 0; - -#if DEBUG_PACKETS - D(bug("Packet32: PacketReceivePacket got %d bytes, result=%d\n",lpPacket->BytesReceived,(int)Result)); -#endif - - return Result; -} - -BOOLEAN PacketRequest( - LPADAPTER lpAdapterObject, - LPPACKET lpPacket, - BOOLEAN bSet -) -{ - BOOLEAN Result = FALSE; - - Result = PacketDeviceIoControl( - lpAdapterObject, - lpPacket, - (ULONG) ((bSet) ? IOCTL_PROTOCOL_SET_OID : IOCTL_PROTOCOL_QUERY_OID), - TRUE ); - - if ( lpPacket->BytesReceived == 0 ) { - D(bug( "Packet32: Ndis returned error to OID\r\n")); - Result = FALSE; - } - return Result; -} - -LPPACKET PacketQueryOid( - LPADAPTER lpAdapter, - ULONG ulOid, - ULONG ulLength -) -{ - ULONG ioctl; - LPPACKET lpPacket; - -#define pOidData ((PPACKET_OID_DATA)(lpPacket->Buffer)) - - lpPacket = PacketAllocatePacket( lpAdapter, sizeof(PACKET_OID_DATA)-1+ulLength ); - - if( lpPacket ) { - ioctl = IOCTL_PROTOCOL_QUERY_OID; - pOidData->Oid = ulOid; - pOidData->Length = ulLength; - - if (PacketRequest( lpAdapter, lpPacket, FALSE )) { - return lpPacket; - } - PacketFreePacket( lpPacket ); - } - -#undef pOidData - - return 0; -} - -BOOLEAN PacketGetMAC( LPADAPTER AdapterObject, LPBYTE address, BOOL permanent ) -{ - BOOLEAN Status; - LPPACKET lpPacket; - - lpPacket = PacketQueryOid( - AdapterObject, - permanent ? OID_802_3_PERMANENT_ADDRESS : OID_802_3_CURRENT_ADDRESS, - ETH_802_3_ADDRESS_LENGTH - ); - if(lpPacket) { - memcpy( address, - ((BYTE *)(lpPacket->Buffer)) + sizeof(PACKET_OID_DATA) - 1, - ETH_802_3_ADDRESS_LENGTH ); - PacketFreePacket( lpPacket ); - Status = TRUE; - } else { - Status = FALSE; - } - - return Status; -} - -// There are other ways to do this. - -BOOLEAN PacketAddMulticast( LPADAPTER AdapterObject, LPBYTE address ) -{ - BOOLEAN Status = FALSE; - LPBYTE p; - int i, count; - LPPACKET lpPacket; - - D(bug("PacketAddMulticast\n")); - - /* - if(packet_filter & (NDIS_PACKET_TYPE_ALL_MULTICAST|NDIS_PACKET_TYPE_PROMISCUOUS)) { - D(bug("PacketAddMulticast: already listening for all multicast\n")); - return TRUE; - } - */ - - lpPacket = PacketQueryOid( AdapterObject, OID_802_3_MULTICAST_LIST, MAX_MULTICAST_SZ ); -#define OidData ((PPACKET_OID_DATA)(lpPacket->Buffer)) - - if(lpPacket) { - count = OidData->Length / ETH_802_3_ADDRESS_LENGTH; - - D(bug("PacketAddMulticast: %d old addresses\n",count)); - - p = (LPBYTE)OidData->Data; - - for( i=0; i= MAX_MULTICAST) { - D(bug("PacketAddMulticast: too many addresses\n")); - Status = FALSE; - } else { - D(bug("PacketAddMulticast: adding a new address\n")); - - // ULONG IoCtlBufferLength = (sizeof(PACKET_OID_DATA)+ETH_802_3_ADDRESS_LENGTH*1-1); - ULONG IoCtlBufferLength = (sizeof(PACKET_OID_DATA)+ETH_802_3_ADDRESS_LENGTH*(count+1)-1); - - LPPACKET lpPacket2 = PacketAllocatePacket( AdapterObject, IoCtlBufferLength ); -#define OidData2 ((PPACKET_OID_DATA)(lpPacket2->Buffer)) - if ( lpPacket2 ) { - OidData2->Oid = OID_802_3_MULTICAST_LIST; - - // OidData2->Length = ETH_802_3_ADDRESS_LENGTH*1; - // memcpy( OidData2->Data, address, ETH_802_3_ADDRESS_LENGTH ); - - memcpy( OidData2->Data, OidData->Data, ETH_802_3_ADDRESS_LENGTH*count ); - memcpy( OidData2->Data+ETH_802_3_ADDRESS_LENGTH*count, address, ETH_802_3_ADDRESS_LENGTH ); - OidData2->Length = ETH_802_3_ADDRESS_LENGTH*(count+1); - - Status = PacketRequest( AdapterObject, lpPacket2, TRUE ); - PacketFreePacket( lpPacket2 ); - } -#undef OidData2 - } - } - PacketFreePacket( lpPacket ); - } - - #undef OidData - - // return Status; - return TRUE; -} - -// It seems that the last multicast address is never deleted. Why? -// Don't know the reason, but luckily this is not fatal. -// Hard to examine return codes. See NE2000 sources, always returns ok. - -BOOLEAN PacketDelMulticast( LPADAPTER AdapterObject, LPBYTE address ) -{ - BOOLEAN Status = FALSE; - LPBYTE p; - int i, count; - LPPACKET lpPacket, lpPacket2; - - D(bug("PacketDelMulticast\n")); - - if(packet_filter & (NDIS_PACKET_TYPE_ALL_MULTICAST|NDIS_PACKET_TYPE_PROMISCUOUS)) { - D(bug("PacketDelMulticast: already listening for all multicast\n")); - return TRUE; - } - - lpPacket = PacketQueryOid( AdapterObject, OID_802_3_MULTICAST_LIST, MAX_MULTICAST_SZ ); -#define OidData ((PPACKET_OID_DATA)(lpPacket->Buffer)) - - if(lpPacket) { - count = OidData->Length / ETH_802_3_ADDRESS_LENGTH; - - D(bug("PacketDelMulticast: %d old addresses\n",count)); - - Status = FALSE; - - p = (LPBYTE)OidData->Data; - - for( i=0; iBuffer)) - if ( lpPacket2 ) { - OidData2->Oid = OID_802_3_MULTICAST_LIST; - OidData2->Length = ETH_802_3_ADDRESS_LENGTH*(count-1); - tail_len = ETH_802_3_ADDRESS_LENGTH * (count-i-1); - if(tail_len) memmove( p, p+ETH_802_3_ADDRESS_LENGTH, tail_len ); - if(OidData2->Length) memcpy( OidData2->Data, OidData->Data, OidData2->Length ); - if(count == 1) memset( OidData2->Data, 0, ETH_802_3_ADDRESS_LENGTH ); // eh... - Status = PacketRequest( AdapterObject, lpPacket2, TRUE ); - PacketFreePacket( lpPacket2 ); - D(bug("PacketDelMulticast: PacketRequest returned status 0x%X, last error = 0x%X\n",Status,GetLastError())); - } - break; -#undef OidData2 - } - p += ETH_802_3_ADDRESS_LENGTH; - } - if( i == count ) { - D(bug("PacketDelMulticast: cannot delete, was not defined\n")); - } - PacketFreePacket( lpPacket ); -#undef OidData - } - - // return Status; - return TRUE; -} - -BOOLEAN PacketSetFilter( LPADAPTER AdapterObject, ULONG Filter ) -{ - BOOLEAN Status; - ULONG IoCtlBufferLength = (sizeof(PACKET_OID_DATA)+sizeof(ULONG)-1); - LPPACKET lpPacket; - - lpPacket = PacketAllocatePacket( AdapterObject, IoCtlBufferLength ); -#define lpOidData ((PPACKET_OID_DATA)(lpPacket->Buffer)) - - if ( lpPacket ) { - lpOidData->Oid = OID_GEN_CURRENT_PACKET_FILTER; - lpOidData->Length = sizeof(ULONG); - *((PULONG)lpOidData->Data) = Filter; - Status = PacketRequest( AdapterObject, lpPacket, TRUE ); - PacketFreePacket( lpPacket ); - } else { - Status = FALSE; - } - -#undef lpOidData - - return Status; -} - -BOOLEAN StartPacketDriver( LPCTSTR ServiceName ) -{ - BOOLEAN Status = FALSE; - - SC_HANDLE SCManagerHandle; - SC_HANDLE SCServiceHandle; - - SCManagerHandle = OpenSCManager( - NULL, - NULL, - SC_MANAGER_ALL_ACCESS); - - if(SCManagerHandle == NULL) { - D(bug("Could not open Service Control Manager\r\n")); - } else { - SCServiceHandle = OpenService(SCManagerHandle,ServiceName,SERVICE_START); - if (SCServiceHandle == NULL) { - D(bug(TEXT("Could not open service %s\r\n"),ServiceName)); - } else { - Status = StartService( SCServiceHandle, 0, NULL ); - if(!Status) { - if (GetLastError()==ERROR_SERVICE_ALREADY_RUNNING) { - Status = TRUE; - } - } - BOOL waiting = TRUE; - // loop until the service is fully started. - while (waiting) { - SERVICE_STATUS ServiceStatus; - if (QueryServiceStatus(SCServiceHandle, &ServiceStatus)) { - switch(ServiceStatus.dwCurrentState) { - case SERVICE_RUNNING: - waiting = FALSE; - Status = TRUE; - break; - case SERVICE_START_PENDING: - Sleep(500); - break; - default: - waiting = FALSE; - break; - } - } else { - waiting = FALSE; - } - } - CloseServiceHandle(SCServiceHandle); - } - CloseServiceHandle(SCManagerHandle); - } - return Status; -} - -ULONG PacketGetAdapterNames( LPADAPTER lpAdapter, LPTSTR pStr, PULONG BufferSize ) -{ - LONG Status; - - HKEY hKey; - DWORD RegType; - - Status = RegOpenKey( - HKEY_LOCAL_MACHINE, - TEXT("SYSTEM\\CurrentControlSet\\Services\\B2Ether\\Linkage"), - &hKey - ); - if( Status == ERROR_SUCCESS ) { - Status = RegQueryValueEx( - hKey, - TEXT("Export"), - NULL, - &RegType, - (LPBYTE)pStr, - BufferSize - ); - RegCloseKey(hKey); - } - - return Status; -} - -#ifdef __cplusplus -} -#endif - -#if DEBUG -#pragma optimize("",on) -#endif diff --git a/BasiliskII/src/Windows/build68k.vcxproj b/BasiliskII/src/Windows/build68k.vcxproj deleted file mode 100644 index b29e072da..000000000 --- a/BasiliskII/src/Windows/build68k.vcxproj +++ /dev/null @@ -1,156 +0,0 @@ - - - - - Debug - Win32 - - - Debug - x64 - - - Release - Win32 - - - Release - x64 - - - - {7BCEAB0D-0C62-46E1-BA1E-AF42798B67D0} - Win32Proj - build68k - 8.1 - - - - Application - true - v140 - Unicode - - - Application - true - v140 - Unicode - - - Application - false - v140 - true - Unicode - - - Application - false - v140 - true - Unicode - - - - - - - - - - - - - - - - - - - - - true - $(Configuration)\$(ProjectName)\ - - - true - - - false - $(Configuration)\$(ProjectName)\ - - - false - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/build68k.vcxproj.filters b/BasiliskII/src/Windows/build68k.vcxproj.filters deleted file mode 100644 index 65e381678..000000000 --- a/BasiliskII/src/Windows/build68k.vcxproj.filters +++ /dev/null @@ -1,22 +0,0 @@ - - - - - {4FC737F1-C7A5-4376-A066-2A32D752A2FF} - cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx - - - {93995380-89BD-4b04-88EB-625FBE52EBFB} - h;hh;hpp;hxx;hm;inl;inc;xsd - - - {67DA6AB6-F800-4c08-8B7A-83BB121AAD01} - rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms - - - - - Source Files - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/cd_defs.h b/BasiliskII/src/Windows/cd_defs.h deleted file mode 100755 index f58069e5d..000000000 --- a/BasiliskII/src/Windows/cd_defs.h +++ /dev/null @@ -1,153 +0,0 @@ -/* - * cd_defs.h - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 MAXIMUM_NUMBER_TRACKS 100 -#define MAXIMUM_CDROM_SIZE 804 - -#pragma pack(push, 1) - -typedef struct _TRACK_DATA { - UCHAR Reserved; - UCHAR Control : 4; - UCHAR Adr : 4; - UCHAR TrackNumber; - UCHAR Reserved1; - UCHAR Address[4]; -} TRACK_DATA, *PTRACK_DATA; - -typedef struct _CDROM_TOC { - UCHAR Length[2]; - UCHAR FirstTrack; - UCHAR LastTrack; - TRACK_DATA TrackData[MAXIMUM_NUMBER_TRACKS]; -} CDROM_TOC, *PCDROM_TOC; - -// #include "ntddcdrm.h" -#define IOCTL_CDROM_BASE FILE_DEVICE_CD_ROM -#define IOCTL_CDROM_UNLOAD_DRIVER CTL_CODE(IOCTL_CDROM_BASE, 0x0402, METHOD_BUFFERED, FILE_READ_ACCESS) -// -// CDROM Audio Device Control Functions -// -#define IOCTL_CDROM_READ_TOC CTL_CODE(IOCTL_CDROM_BASE, 0x0000, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_GET_CONTROL CTL_CODE(IOCTL_CDROM_BASE, 0x000D, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_PLAY_AUDIO_MSF CTL_CODE(IOCTL_CDROM_BASE, 0x0006, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_SEEK_AUDIO_MSF CTL_CODE(IOCTL_CDROM_BASE, 0x0001, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_STOP_AUDIO CTL_CODE(IOCTL_CDROM_BASE, 0x0002, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_PAUSE_AUDIO CTL_CODE(IOCTL_CDROM_BASE, 0x0003, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_RESUME_AUDIO CTL_CODE(IOCTL_CDROM_BASE, 0x0004, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_GET_VOLUME CTL_CODE(IOCTL_CDROM_BASE, 0x0005, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_SET_VOLUME CTL_CODE(IOCTL_CDROM_BASE, 0x000A, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_READ_Q_CHANNEL CTL_CODE(IOCTL_CDROM_BASE, 0x000B, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_GET_LAST_SESSION CTL_CODE(IOCTL_CDROM_BASE, 0x000E, METHOD_BUFFERED, FILE_READ_ACCESS) -#define IOCTL_CDROM_RAW_READ CTL_CODE(IOCTL_CDROM_BASE, 0x000F, METHOD_OUT_DIRECT, FILE_READ_ACCESS) -#define IOCTL_CDROM_DISK_TYPE CTL_CODE(IOCTL_CDROM_BASE, 0x0010, METHOD_BUFFERED, FILE_ANY_ACCESS) - -typedef struct _VOLUME_CONTROL { - UCHAR PortVolume[4]; -} VOLUME_CONTROL, *PVOLUME_CONTROL; - -typedef struct _CDROM_PLAY_AUDIO_MSF { - UCHAR StartingM; - UCHAR StartingS; - UCHAR StartingF; - UCHAR EndingM; - UCHAR EndingS; - UCHAR EndingF; -} CDROM_PLAY_AUDIO_MSF, *PCDROM_PLAY_AUDIO_MSF; - -typedef struct _CDROM_SEEK_AUDIO_MSF { - UCHAR M; - UCHAR S; - UCHAR F; -} CDROM_SEEK_AUDIO_MSF, *PCDROM_SEEK_AUDIO_MSF; - - -// -// CD ROM Sub-Q Channel Data Format -// - -typedef struct _SUB_Q_HEADER { - UCHAR Reserved; - UCHAR AudioStatus; - UCHAR DataLength[2]; -} SUB_Q_HEADER, *PSUB_Q_HEADER; - -typedef struct _SUB_Q_CURRENT_POSITION { - SUB_Q_HEADER Header; - UCHAR FormatCode; - UCHAR Control : 4; - UCHAR ADR : 4; - UCHAR TrackNumber; - UCHAR IndexNumber; - UCHAR AbsoluteAddress[4]; - UCHAR TrackRelativeAddress[4]; -} SUB_Q_CURRENT_POSITION, *PSUB_Q_CURRENT_POSITION; - -typedef struct _SUB_Q_MEDIA_CATALOG_NUMBER { - SUB_Q_HEADER Header; - UCHAR FormatCode; - UCHAR Reserved[3]; - UCHAR Reserved1 : 7; - UCHAR Mcval : 1; - UCHAR MediaCatalog[15]; -} SUB_Q_MEDIA_CATALOG_NUMBER, *PSUB_Q_MEDIA_CATALOG_NUMBER; - -typedef struct _SUB_Q_TRACK_ISRC { - SUB_Q_HEADER Header; - UCHAR FormatCode; - UCHAR Reserved0; - UCHAR Track; - UCHAR Reserved1; - UCHAR Reserved2 : 7; - UCHAR Tcval : 1; - UCHAR TrackIsrc[15]; -} SUB_Q_TRACK_ISRC, *PSUB_Q_TRACK_ISRC; - -typedef union _SUB_Q_CHANNEL_DATA { - SUB_Q_CURRENT_POSITION CurrentPosition; - SUB_Q_MEDIA_CATALOG_NUMBER MediaCatalog; - SUB_Q_TRACK_ISRC TrackIsrc; -} SUB_Q_CHANNEL_DATA, *PSUB_Q_CHANNEL_DATA; - -typedef enum _TRACK_MODE_TYPE { - YellowMode2, - XAForm2, - CDDA -} TRACK_MODE_TYPE, *PTRACK_MODE_TYPE; - -typedef struct __RAW_READ_INFO { - LARGE_INTEGER DiskOffset; - ULONG SectorCount; - TRACK_MODE_TYPE TrackMode; -} RAW_READ_INFO, *PRAW_READ_INFO; - -typedef struct _CDROM_SUB_Q_DATA_FORMAT { - UCHAR Format; - UCHAR Track; -} CDROM_SUB_Q_DATA_FORMAT, *PCDROM_SUB_Q_DATA_FORMAT; - -#define IOCTL_CDROM_SUB_Q_CHANNEL 0x00 -#define IOCTL_CDROM_CURRENT_POSITION 0x01 -#define IOCTL_CDROM_MEDIA_CATALOG 0x02 -#define IOCTL_CDROM_TRACK_ISRC 0x03 - -#pragma pack(pop) diff --git a/BasiliskII/src/Windows/cdenable/cache.cpp b/BasiliskII/src/Windows/cdenable/cache.cpp deleted file mode 100755 index 483f3ca1a..000000000 --- a/BasiliskII/src/Windows/cdenable/cache.cpp +++ /dev/null @@ -1,181 +0,0 @@ -/* - * cache.cpp - simple floppy/cd cache for Win32 - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 that this is particularly silly cache code - and doesn't even use hash buckets. It is sufficient - for floppies and maybe emulated cd's but that's it. -*/ - -#include "sysdeps.h" -#include "cache.h" - -#ifdef __cplusplus -extern "C" { -#endif - -#ifdef _DEBUG -#define new DEBUG_NEW -#undef THIS_FILE -static char THIS_FILE[] = __FILE__; -#endif - -void cache_clear( cachetype *cptr ) -{ - if(cptr->inited) { - cptr->res_count = 0; - memset( cptr->LRU, 0, NBLOCKS * sizeof(int) ); - } -} - -static int init( cachetype *cptr, int sector_size ) -{ - cache_clear( cptr ); - cptr->sector_size = sector_size; - cptr->blocks = (char *)VirtualAlloc( - NULL, NBLOCKS*sector_size, - MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); - cptr->block = (int *)VirtualAlloc( - NULL, NBLOCKS*sizeof(int), - MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); - cptr->LRU = (DWORD *)VirtualAlloc( - NULL, NBLOCKS*sizeof(DWORD), - MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); - return(cptr->blocks != NULL); -} - -static void final( cachetype *cptr ) -{ - if(cptr->blocks) { - VirtualFree( cptr->blocks, 0, MEM_RELEASE ); - cptr->blocks = 0; - } - if(cptr->block) { - VirtualFree( cptr->block, 0, MEM_RELEASE ); - cptr->block = 0; - } - if(cptr->LRU) { - VirtualFree( cptr->LRU, 0, MEM_RELEASE ); - cptr->LRU = 0; - } - cptr->inited = 0; -} - -void cache_init( cachetype *cptr ) -{ - cptr->inited = 0; -} - -void cache_final( cachetype *cptr ) -{ - if(cptr->inited) { - final( cptr ); - cptr->inited = 0; - } -} - -static int in_cache( cachetype *cptr, int block ) -{ - int i; - for(i=cptr->res_count-1; i>=0; i--) { - if(cptr->block[i] == block) return(i); - } - return(-1); -} - -static int get_LRU( cachetype *cptr ) -{ - int i, result = 0; - DWORD mtime = cptr->LRU[0]; - - for(i=1; iLRU[i] < mtime) { - mtime = cptr->LRU[i]; - result = i; - } - } - return(result); -} - -void cache_put( cachetype *cptr, int block, char *buf, int ss ) -{ - int inx; - - if(!cptr->inited) { - if(!init(cptr,ss)) return; - cptr->inited = 1; - } - inx = in_cache( cptr, block ); - if(inx < 0) { - if(cptr->res_count == NBLOCKS) { - inx = get_LRU( cptr ); - } else { - inx = cptr->res_count++; - } - cptr->block[inx] = block; - } - cptr->LRU[inx] = GetTickCount(); - memcpy( cptr->blocks + inx * ss, buf, ss ); -} - -int cache_get( cachetype *cptr, int block, char *buf ) -{ - int inx; - - if(!cptr->inited) return(0); - - inx = in_cache( cptr, block ); - if(inx >= 0) { - memcpy( buf, cptr->blocks + inx * cptr->sector_size, cptr->sector_size ); - return(1); - } else { - return(0); - } -} - -void cache_remove( cachetype *cptr, int block, int ss ) -{ - int inx, from; - - if(!cptr->inited) { - if(!init(cptr,ss)) return; - cptr->inited = 1; - } - inx = in_cache( cptr, block ); - if(inx >= 0) { - if(cptr->res_count > 1) { - from = cptr->res_count-1; - cptr->block[inx] = cptr->block[from]; - cptr->LRU[inx] = cptr->LRU[from]; - memcpy( - cptr->blocks + inx * cptr->sector_size, - cptr->blocks + from * cptr->sector_size, - cptr->sector_size - ); - } - cptr->res_count--; - } -} - -#ifdef __cplusplus -} // extern "C" -#endif diff --git a/BasiliskII/src/Windows/cdenable/cache.h b/BasiliskII/src/Windows/cdenable/cache.h deleted file mode 100755 index 14607bef1..000000000 --- a/BasiliskII/src/Windows/cdenable/cache.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * cache.cpp - simple floppy/cd cache for Win32 - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -#ifdef __cplusplus -extern "C" { -#endif - -#ifndef _CACHE_H_ -#define _CACHE_H_ -#define NBLOCKS 1000 - -typedef struct { - int inited; - int res_count; - int sector_size; - char *blocks; - int *block; - DWORD *LRU; -} cachetype; - -void cache_init( cachetype *cptr ); -void cache_clear( cachetype *cptr ); -void cache_final( cachetype *cptr ); -int cache_get( cachetype *cptr, int block, char *buf ); -void cache_put( cachetype *cptr, int block, char *buf, int ss ); -void cache_remove( cachetype *cptr, int block, int ss ); -#endif - -#ifdef __cplusplus -} // extern "C" -#endif diff --git a/BasiliskII/src/Windows/cdenable/cdenable.h b/BasiliskII/src/Windows/cdenable/cdenable.h deleted file mode 100755 index 26b90242d..000000000 --- a/BasiliskII/src/Windows/cdenable/cdenable.h +++ /dev/null @@ -1,60 +0,0 @@ -/* - * cdenable.h - cdenable.vxd definitions - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -// max read requests, if larger -> STATUS_INVALID_PARAMETER -#define CDENABLE_MAX_TRANSFER_SIZE (0x10000) - - -// A structure representing the instance information associated with -// a particular device -typedef struct _DEVICE_EXTENSION -{ - // not needed. - ULONG StateVariable; -} DEVICE_EXTENSION, *PDEVICE_EXTENSION; - - -// Define the various device type values. Note that values used by Microsoft -// Corporation are in the range 0-32767, and 32768-65535 are reserved for use -// by customers. -#define FILE_DEVICE_CDENABLE 0x00008301 - - -// Target NT version, internal version -#define CDENABLE_CURRENT_VERSION 0x04000100 - - -// Macro definition for defining IOCTL and FSCTL function control codes. Note -// that function codes 0-2047 are reserved for Microsoft Corporation, and -// 2048-4095 are reserved for customers. -#define CDENABLE_IOCTL_READ 0x830 -#define CDENABLE_IOCTL_GET_VERSION 0x831 - - -#define IOCTL_CDENABLE_READ CTL_CODE(FILE_DEVICE_CDENABLE, \ - CDENABLE_IOCTL_READ, \ - METHOD_BUFFERED, \ - FILE_ANY_ACCESS) -#define IOCTL_CDENABLE_GET_VERSION CTL_CODE(FILE_DEVICE_CDENABLE, \ - CDENABLE_IOCTL_GET_VERSION, \ - METHOD_BUFFERED, \ - FILE_ANY_ACCESS) diff --git a/BasiliskII/src/Windows/cdenable/eject_nt.cpp b/BasiliskII/src/Windows/cdenable/eject_nt.cpp deleted file mode 100755 index 414ce4b97..000000000 --- a/BasiliskII/src/Windows/cdenable/eject_nt.cpp +++ /dev/null @@ -1,189 +0,0 @@ -/* - * eject_nt.cpp - cd eject routines for WinNT (derived from MS samples) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" - -#include - -// Prototypes - -extern "C" { - -#include "eject_nt.h" - -LPTSTR szVolumeFormat = TEXT("\\\\.\\%c:"); -LPTSTR szRootFormat = TEXT("%c:\\"); -LPTSTR szErrorFormat = TEXT("Error %d: %s\n"); - -void ReportError(LPTSTR szMsg) -{ - // _tprintf(szErrorFormat, GetLastError(), szMsg); -} - -HANDLE OpenVolume(TCHAR cDriveLetter) -{ - HANDLE hVolume; - UINT uDriveType; - TCHAR szVolumeName[8]; - TCHAR szRootName[5]; - DWORD dwAccessFlags; - - wsprintf(szRootName, szRootFormat, cDriveLetter); - - uDriveType = GetDriveType(szRootName); - switch(uDriveType) { - case DRIVE_REMOVABLE: - dwAccessFlags = GENERIC_READ | GENERIC_WRITE; - break; - case DRIVE_CDROM: - dwAccessFlags = GENERIC_READ; - break; - default: - // _tprintf(TEXT("Cannot eject. Drive type is incorrect.\n")); - return INVALID_HANDLE_VALUE; - } - - wsprintf(szVolumeName, szVolumeFormat, cDriveLetter); - - hVolume = CreateFile( szVolumeName, - dwAccessFlags, - FILE_SHARE_READ | FILE_SHARE_WRITE, - NULL, - OPEN_EXISTING, - 0, - NULL ); - if (hVolume == INVALID_HANDLE_VALUE) - ReportError(TEXT("CreateFile")); - - return hVolume; -} - -BOOL CloseVolume(HANDLE hVolume) -{ - return CloseHandle(hVolume); -} - -#define LOCK_TIMEOUT 1000 // 1 second -#define LOCK_RETRIES 20 - -BOOL LockVolume(HANDLE hVolume) -{ - DWORD dwBytesReturned; - DWORD dwSleepAmount; - int nTryCount; - - dwSleepAmount = LOCK_TIMEOUT / LOCK_RETRIES; - - // Do this in a loop until a timeout period has expired - for (nTryCount = 0; nTryCount < LOCK_RETRIES; nTryCount++) { - if (DeviceIoControl(hVolume, - FSCTL_LOCK_VOLUME, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL)) - return TRUE; - - Sleep(dwSleepAmount); - } - - return FALSE; -} - -BOOL DismountVolume(HANDLE hVolume) -{ - DWORD dwBytesReturned; - - return DeviceIoControl( hVolume, - FSCTL_DISMOUNT_VOLUME, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL); -} - -BOOL PreventRemovalOfVolume(HANDLE hVolume, BOOL fPreventRemoval) -{ - DWORD dwBytesReturned; - PREVENT_MEDIA_REMOVAL PMRBuffer; - - PMRBuffer.PreventMediaRemoval = fPreventRemoval; - - return DeviceIoControl( hVolume, - IOCTL_STORAGE_MEDIA_REMOVAL, - &PMRBuffer, sizeof(PREVENT_MEDIA_REMOVAL), - NULL, 0, - &dwBytesReturned, - NULL); -} - -BOOL AutoEjectVolume( HANDLE hVolume, BOOL reload ) -{ - DWORD dwBytesReturned; - - return DeviceIoControl( hVolume, - reload ? IOCTL_STORAGE_LOAD_MEDIA : IOCTL_STORAGE_EJECT_MEDIA, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL); -} - -BOOL EjectVolume( TCHAR cDriveLetter, BOOL reload ) -{ - HANDLE hVolume; - - BOOL fRemoveSafely = FALSE; - BOOL fAutoEject = FALSE; - - // Open the volume. - hVolume = OpenVolume(cDriveLetter); - if (hVolume == INVALID_HANDLE_VALUE) - return FALSE; - - // Lock and dismount the volume. - if (LockVolume(hVolume) && DismountVolume(hVolume)) { - fRemoveSafely = TRUE; - - // Set prevent removal to false and eject the volume. - if (PreventRemovalOfVolume(hVolume, FALSE) && - AutoEjectVolume(hVolume,reload)) - fAutoEject = TRUE; - } - - // Close the volume so other processes can use the drive. - if (!CloseVolume(hVolume)) - return FALSE; - - /* - if (fAutoEject) - printf("Media in Drive %c has been ejected safely.\n", cDriveLetter); - else { - if (fRemoveSafely) - printf("Media in Drive %c can be safely removed.\n", cDriveLetter); - } - */ - - return TRUE; -} - -} // extern "C" diff --git a/BasiliskII/src/Windows/cdenable/eject_nt.h b/BasiliskII/src/Windows/cdenable/eject_nt.h deleted file mode 100755 index 88272cc60..000000000 --- a/BasiliskII/src/Windows/cdenable/eject_nt.h +++ /dev/null @@ -1,44 +0,0 @@ -/* - * eject_nt.cpp - cd eject routines for WinNT (derived from MS samples) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _EJECT_NT_H_ -#define _EJECT_NT_H_ - - -#ifdef __cplusplus -extern "C" { -#endif - -BOOL EjectVolume(TCHAR cDriveLetter,BOOL reload); - -HANDLE OpenVolume(TCHAR cDriveLetter); -BOOL LockVolume(HANDLE hVolume); -BOOL DismountVolume(HANDLE hVolume); -BOOL PreventRemovalOfVolume(HANDLE hVolume, BOOL fPrevent); -BOOL AutoEjectVolume(HANDLE hVolume,BOOL reload); -BOOL CloseVolume(HANDLE hVolume); - -#ifdef __cplusplus -} // extern "C" -#endif - -#endif //_EJECT_NT_H_ diff --git a/BasiliskII/src/Windows/cdenable/ntcd.cpp b/BasiliskII/src/Windows/cdenable/ntcd.cpp deleted file mode 100755 index acefb13c4..000000000 --- a/BasiliskII/src/Windows/cdenable/ntcd.cpp +++ /dev/null @@ -1,344 +0,0 @@ -/* - * ntcd.cpp - Interface to cdenable.sys driver - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" - -extern "C" { - -#include -#include -#include "ntcd.h" -#include "cdenable.h" - -static LPCTSTR sDriverShort = TEXT("cdenable"); -static LPCTSTR sDriverLong = TEXT("System32\\Drivers\\cdenable.sys"); -static LPCTSTR sCompleteName = TEXT("\\\\.\\cdenable"); - -#ifdef _DEBUG -#define new DEBUG_NEW -#undef THIS_FILE -static char THIS_FILE[] = __FILE__; -#endif - -// Start type must be SERVICE_AUTO_START or lower, in order -// it to start automatically and allow the mechanism work -// for users with no admin rights. -static BOOL InstallDriver( - IN SC_HANDLE SchSCManager, - IN LPCTSTR DriverName, - IN LPCTSTR ServiceExe -) -{ - SC_HANDLE schService; - DWORD err; - - schService = CreateService ( - SchSCManager, // SCManager database - DriverName, // name of service - DriverName, // name to display - SERVICE_ALL_ACCESS, // desired access - SERVICE_KERNEL_DRIVER, // service type - SERVICE_AUTO_START, // SERVICE_DEMAND_START, // start type - SERVICE_ERROR_NORMAL, // error control type - ServiceExe, // service's binary - NULL, // no load ordering group - NULL, // no tag identifier - NULL, // no dependencies - NULL, // LocalSystem account - NULL // no password - ); - - if (schService == NULL) { - err = GetLastError(); - if (err == ERROR_SERVICE_EXISTS) { - return TRUE; - } else { - return FALSE; - } - } - CloseServiceHandle (schService); - return TRUE; -} - -static BOOL RemoveDriver( - IN SC_HANDLE SchSCManager, - IN LPCTSTR DriverName -) -{ - SC_HANDLE schService; - BOOL ret; - - schService = OpenService (SchSCManager, - DriverName, - SERVICE_ALL_ACCESS - ); - if (schService == NULL) return FALSE; - ret = DeleteService (schService); - CloseServiceHandle (schService); - return ret; -} - -static BOOL StartDriver( - IN SC_HANDLE SchSCManager, - IN LPCTSTR DriverName -) { - SC_HANDLE schService; - BOOL ret; - DWORD err; - - schService = OpenService (SchSCManager, - DriverName, - SERVICE_ALL_ACCESS - ); - if (schService == NULL) return FALSE; - ret = StartService (schService, // service identifier - 0, // number of arguments - NULL // pointer to arguments - ); - if(ret == 0) { - err = GetLastError(); - if (err == ERROR_SERVICE_ALREADY_RUNNING) { - ret = TRUE; - } else { - ret = FALSE; - } - } - CloseServiceHandle (schService); - return ret; -} - -static BOOL StopDriver( - IN SC_HANDLE SchSCManager, - IN LPCTSTR DriverName -) -{ - SC_HANDLE schService; - BOOL ret; - SERVICE_STATUS serviceStatus; - - schService = OpenService (SchSCManager, - DriverName, - SERVICE_ALL_ACCESS - ); - if (schService == NULL) return FALSE; - ret = ControlService (schService, - SERVICE_CONTROL_STOP, - &serviceStatus - ); - CloseServiceHandle (schService); - return ret; -} - -static BOOL __cdecl start_driver( void ) -{ - SC_HANDLE schSCManager; - BOOL ret = FALSE; - - schSCManager = OpenSCManager( NULL, NULL, SC_MANAGER_ALL_ACCESS ); - if(!schSCManager) return(FALSE); - if(!InstallDriver( schSCManager, sDriverShort, sDriverLong )) { - CloseServiceHandle( schSCManager ); - return(FALSE); - } - ret = StartDriver( schSCManager, sDriverShort ); - if(!ret) { - (void)RemoveDriver( schSCManager, sDriverShort ); - } - CloseServiceHandle( schSCManager ); - return( ret ); -} - -static BOOL __cdecl stop_driver( void ) -{ - SC_HANDLE schSCManager; - BOOL ret = FALSE; - - schSCManager = OpenSCManager( NULL, NULL, SC_MANAGER_ALL_ACCESS ); - if(!schSCManager) return(FALSE); - if(StopDriver( schSCManager, sDriverShort )) ret = TRUE; - CloseServiceHandle( schSCManager ); - return( ret ); -} - -static BOOL __cdecl remove_driver( void ) -{ - SC_HANDLE schSCManager; - BOOL ret = FALSE; - - schSCManager = OpenSCManager( NULL, NULL, SC_MANAGER_ALL_ACCESS ); - if(!schSCManager) return(FALSE); - if(RemoveDriver( schSCManager, sDriverShort )) ret = TRUE; - CloseServiceHandle( schSCManager ); - return( ret ); -} - - - -// Exported stuff begins - -int CdenableSysReadCdBytes( HANDLE h, DWORD start, DWORD count, char *buf ) -{ - HANDLE hDevice; - int ret; - DWORD nb; - DWORD in_buffer[10]; - DWORD out_buffer[10]; - - ret = 0; - - in_buffer[0] = (DWORD)h; - in_buffer[1] = (DWORD)start; - in_buffer[2] = (DWORD)count; - in_buffer[3] = (DWORD)buf; - out_buffer[0] = 0; - - hDevice = CreateFile (sCompleteName, - GENERIC_READ | GENERIC_WRITE, - 0, - NULL, - OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, - NULL - ); - - if (hDevice == ((HANDLE)-1)) { - ret = 0; - } else { - if ( DeviceIoControl( hDevice, - IOCTL_CDENABLE_READ, - (LPVOID)in_buffer, 16, - (LPVOID)out_buffer, 4, - &nb, NULL ) ) - { - if(out_buffer[0] != 0) ret = count; - } - CloseHandle (hDevice); - } - - return ret; -} - -int CdenableSysReadCdSectors( HANDLE h, DWORD start, DWORD count, char *buf ) -{ - return( CdenableSysReadCdBytes( h, (start<<11), (count<<11), buf ) ); -} - -int CdenableSysWriteCdBytes( HANDLE h, DWORD start, DWORD count, char *buf ) -{ - return( 0 ); - - /* - HANDLE hDevice; - int ret; - DWORD nb; - DWORD in_buffer[10]; - DWORD out_buffer[10]; - - ret = 0; - - in_buffer[0] = (DWORD)h; - in_buffer[1] = (DWORD)start; - in_buffer[2] = (DWORD)count; - in_buffer[3] = (DWORD)buf; - out_buffer[0] = 0; - - hDevice = CreateFile (sCompleteName, - GENERIC_READ | GENERIC_WRITE, - 0, - NULL, - OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, - NULL - ); - - if (hDevice == ((HANDLE)-1)) { - ret = 0; - } else { - if ( DeviceIoControl( hDevice, - IOCTL_CDENABLE_WRITE, - (LPVOID)in_buffer, 16, - (LPVOID)out_buffer, 4, - &nb, NULL ) ) - { - if(out_buffer[0] != 0) ret = count; - } - CloseHandle (hDevice); - } - - return ret; - */ -} - -int CdenableSysWriteCdSectors( HANDLE h, DWORD start, DWORD count, char *buf ) -{ - // return( CdenableSysWriteCdBytes( h, (start<<11), (count<<11), buf ) ); - return( 0 ); -} - -BOOL CdenableSysInstallStart(void) -{ - return(start_driver()); -} - -void CdenableSysStopRemove(void) -{ - stop_driver(); - remove_driver(); -} - -DWORD CdenableSysGetVersion( void ) -{ - HANDLE hDevice; - DWORD ret; - DWORD nb; - DWORD out_buffer[10]; - - ret = 0; - out_buffer[0] = 0; - hDevice = CreateFile (sCompleteName, - GENERIC_READ | GENERIC_WRITE, - 0, - NULL, - OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, - NULL - ); - if (hDevice == ((HANDLE)-1)) { - ret = 0; - } else { - if ( DeviceIoControl( hDevice, - IOCTL_CDENABLE_GET_VERSION, - NULL, 0, - (LPVOID)out_buffer, 4, - &nb, NULL ) ) - { - ret = out_buffer[0]; - } - CloseHandle (hDevice); - } - return ret; -} - -#ifdef __cplusplus -} //extern "C" -#endif - diff --git a/BasiliskII/src/Windows/cdenable/ntcd.h b/BasiliskII/src/Windows/cdenable/ntcd.h deleted file mode 100755 index 8be3193ef..000000000 --- a/BasiliskII/src/Windows/cdenable/ntcd.h +++ /dev/null @@ -1,99 +0,0 @@ -/* - * ntcd.h - Interface to cdenable.sys driver - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - - -/* - Installs the driver, if not already installed. - Starts the driver, if not already running. - - You can either always call "CdenableSysInstallStart" when your - program fires up and "CdenableSysStopRemove" when it terminates, - or just let the installation program call "CdenableSysInstallStart" - and leave it always be present. - - I recommend the latter option. Calling "CdenableSysInstallStart" - always doesn't hurt anything, it will immediately return - with success if the service is running. - - Returns non-zero if installation/startup was succesfull, - zero if anything failed. - Returns non-zero also if the driver was already running. - - The file "cdenable.sys" must already have been copied to - the directory "System32\Drivers" -*/ - -#ifndef _NT_CD_H_ -#define _NT_CD_H_ - -#ifdef __cplusplus -extern "C" { -#endif - - -BOOL CdenableSysInstallStart(void); - - -/* - Stops and removes the driver. See above. - This must be called when new version of the driver is updated. -*/ -void CdenableSysStopRemove(void); - - -/* - HANDLE h: returned from CreateFile ( "\\\\.\\X:", GENERIC_READ, ... ); - Returns the bytes actually read (==count), 0 on failure. - NOTE: in my code, start and count are always aligned to - sector boundaries (2048 bytes). - I cannot guarantee that this works if they are not. - Max read is 64 kb. - Synchronous read, but quite fast. -*/ -int CdenableSysReadCdBytes( HANDLE h, DWORD start, DWORD count, char *buf ); - - -/* - Same as SysReadCdBytes, but "start" and "count" are in 2048 byte - sectors. -*/ -int CdenableSysReadCdSectors( HANDLE h, DWORD start, DWORD count, char *buf ); - - -/* - Ditto for writing stuff. - Not a cd of course but removable & hd media are supported now. -*/ -int CdenableSysWriteCdBytes( HANDLE h, DWORD start, DWORD count, char *buf ); -int CdenableSysWriteCdSectors( HANDLE h, DWORD start, DWORD count, char *buf ); - - -/* - Returns CDENABLE_CURRENT_VERSION (of the driver). -*/ -DWORD CdenableSysGetVersion( void ); - -#ifdef __cplusplus -} // extern "C" -#endif - -#endif //_NT_CD_H_ diff --git a/BasiliskII/src/Windows/clip_windows.cpp b/BasiliskII/src/Windows/clip_windows.cpp deleted file mode 100755 index c4ee65bc0..000000000 --- a/BasiliskII/src/Windows/clip_windows.cpp +++ /dev/null @@ -1,281 +0,0 @@ -/* - * clip_windows.cpp - Clipboard handling, Windows implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include - -#include "macos_util.h" -#include "clip.h" -#include "prefs.h" -#include "cpu_emulation.h" -#include "main.h" -#include "emul_op.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef NO_STD_NAMESPACE -using std::vector; -#endif - - -// Conversion tables -static const uint8 mac2iso[0x80] = { - 0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1, - 0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8, - 0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3, - 0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc, - 0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf, - 0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8, - 0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53, - 0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8, - 0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab, - 0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f, - 0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20, - 0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66, - 0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1, - 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4, - 0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e, - 0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20 -}; - -static const uint8 iso2mac[0x80] = { - 0xad, 0xb0, 0xe2, 0xc4, 0xe3, 0xc9, 0xa0, 0xe0, - 0xf6, 0xe4, 0xde, 0xdc, 0xce, 0xb2, 0xb3, 0xb6, - 0xb7, 0xd4, 0xd5, 0xd2, 0xd3, 0xa5, 0xd0, 0xd1, - 0xf7, 0xaa, 0xdf, 0xdd, 0xcf, 0xba, 0xfd, 0xd9, - 0xca, 0xc1, 0xa2, 0xa3, 0xdb, 0xb4, 0xbd, 0xa4, - 0xac, 0xa9, 0xbb, 0xc7, 0xc2, 0xf0, 0xa8, 0xf8, - 0xa1, 0xb1, 0xc3, 0xc5, 0xab, 0xb5, 0xa6, 0xe1, - 0xfc, 0xc6, 0xbc, 0xc8, 0xf9, 0xda, 0xd7, 0xc0, - 0xcb, 0xe7, 0xe5, 0xcc, 0x80, 0x81, 0xae, 0x82, - 0xe9, 0x83, 0xe6, 0xe8, 0xed, 0xea, 0xeb, 0xec, - 0xf5, 0x84, 0xf1, 0xee, 0xef, 0xcd, 0x85, 0xfb, - 0xaf, 0xf4, 0xf2, 0xf3, 0x86, 0xfa, 0xb8, 0xa7, - 0x88, 0x87, 0x89, 0x8b, 0x8a, 0x8c, 0xbe, 0x8d, - 0x8f, 0x8e, 0x90, 0x91, 0x93, 0x92, 0x94, 0x95, - 0xfe, 0x96, 0x98, 0x97, 0x99, 0x9b, 0x9a, 0xd6, - 0xbf, 0x9d, 0x9c, 0x9e, 0x9f, 0xff, 0xb9, 0xd8 -}; - -// Flag: Don't convert clipboard text -static bool no_clip_conversion; - -// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Windows side -static bool we_put_this_data = false; - -// Define a byte array (rewrite if it's a bottleneck) -struct ByteArray : public vector { - uint8 *data() { return &(*this)[0]; } -}; - -// Prototypes -static void do_putscrap(uint32 type, void *scrap, int32 length); -static void do_getscrap(void **handle, uint32 type, int32 offset); - -// From main_windows.cpp -extern HWND GetMainWindowHandle(void); - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %p, length %ld\n", type, scrap, length)); - if (we_put_this_data) { - we_put_this_data = false; - return; - } - if (length <= 0) - return; - - do_putscrap(type, scrap, length); -} - -static void do_putscrap(uint32 type, void *scrap, int32 length) -{ - ByteArray clip_data; - UINT uFormat = 0; - - switch (type) { - case FOURCC('T','E','X','T'): { - D(bug(" clipping TEXT\n")); - - // Convert text from Mac charset to ISO-Latin1 - uint8 *p = (uint8 *)scrap; - for (int i=0; i CR/LF - clip_data.push_back(c); - c = 10; - } - } else if (!no_clip_conversion) - c = mac2iso[c & 0x7f]; - clip_data.push_back(c); - } - clip_data.push_back(0); - uFormat = CF_TEXT; - break; - } - } - if (uFormat != CF_TEXT) // 'TEXT' only - return; - - // Transfer data to the native clipboard - HWND hMainWindow = GetMainWindowHandle(); - if (!hMainWindow ||!OpenClipboard(hMainWindow)) - return; - EmptyClipboard(); - HANDLE hData = GlobalAlloc(GMEM_DDESHARE, clip_data.size()); - if (hData) { - uint8 *data = (uint8 *)GlobalLock(hData); - memcpy(data, clip_data.data(), clip_data.size()); - GlobalUnlock(hData); - if (!SetClipboardData(uFormat, hData)) - GlobalFree(hData); - } - CloseClipboard(); -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); - - do_getscrap(handle, type, offset); -} - -static void do_getscrap(void **handle, uint32 type, int32 offset) -{ - // Get appropriate format for requested data - UINT uFormat = 0; - switch (type) { - case FOURCC('T','E','X','T'): - uFormat = CF_TEXT; - break; - } - if (uFormat != CF_TEXT) // 'TEXT' only - return; - - // Get the native clipboard data - HWND hMainWindow = GetMainWindowHandle(); - if (!hMainWindow || !OpenClipboard(hMainWindow)) - return; - HANDLE hData = GetClipboardData(uFormat); - if (hData) { - uint8 *data = (uint8 *)GlobalLock(hData); - if (data) { - uint32 length = GlobalSize(hData); - if (length) { - int32 out_length = 0; - - // Allocate space for new scrap in MacOS side - M68kRegisters r; - r.d[0] = length; - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 scrap_area = r.a[0]; - - if (scrap_area) { - switch (type) { - case FOURCC('T','E','X','T'): - D(bug(" clipping TEXT\n")); - - // Convert text from ISO-Latin1 to Mac charset - uint8 *p = Mac2HostAddr(scrap_area); - for (uint32 i = 0; i < length; i++) { - uint8 c = data[i]; - if (c < 0x80) { - if (c == 0) - break; - if (c == 13 && i < length - 1 && data[i + 1] == 10) { // CR/LF -> CR - c = 13; - i++; - } - } else if (!no_clip_conversion) - c = iso2mac[c & 0x7f]; - *p++ = c; - out_length++; - } - break; - } - - // Add new data to clipboard - static uint8 proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0xa9, 0xfc, // ZeroScrap() - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) - 0xa9, 0xfe, // PutScrap() - 0x58, 0x8f, // addq.l #4,sp - uint8(M68K_RTS >> 8), uint8(M68K_RTS) - }; - uint32 proc_area = Host2MacAddr(proc); - WriteMacInt32(proc_area + 6, out_length); - WriteMacInt32(proc_area + 12, type); - WriteMacInt32(proc_area + 18, scrap_area); - we_put_this_data = true; - Execute68k(proc_area, &r); - - // We are done with scratch memory - r.a[0] = scrap_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - } - GlobalUnlock(hData); - } - } - CloseClipboard(); -} diff --git a/BasiliskII/src/Windows/config.h b/BasiliskII/src/Windows/config.h deleted file mode 100644 index 88bd09040..000000000 --- a/BasiliskII/src/Windows/config.h +++ /dev/null @@ -1,260 +0,0 @@ -/* config.h. Generated from config.h.in by configure. */ -/* config.h.in. Generated from configure.ac by autoheader. */ - -/* Define if building universal (internal helper macro) */ -/* #undef AC_APPLE_UNIVERSAL_BUILD */ - -/* Define if using video enabled on SEGV signals. */ -#ifndef _DEBUG -#define ENABLE_VOSF 1 -#endif - -/* Define to 1 if you have the `acoshl' function. */ -#define HAVE_ACOSHL 1 - -/* Define to 1 if you have the `acosl' function. */ -#define HAVE_ACOSL 1 - -/* Define to 1 if you have the `asinhl' function. */ -#define HAVE_ASINHL 1 - -/* Define to 1 if you have the `asinl' function. */ -#define HAVE_ASINL 1 - -/* Define to 1 if you have the `atanh' function. */ -#define HAVE_ATANH 1 - -/* Define to 1 if you have the `atanhl' function. */ -#define HAVE_ATANHL 1 - -/* Define to 1 if you have the `atanl' function. */ -#define HAVE_ATANL 1 - -/* Define to 1 if the system has the type `caddr_t'. */ -/* #undef HAVE_CADDR_T */ - -/* Define to 1 if you have the `ceill' function. */ -#define HAVE_CEILL 1 - -/* Define to 1 if you have the `coshl' function. */ -#define HAVE_COSHL 1 - -/* Define to 1 if you have the `cosl' function. */ -#define HAVE_COSL 1 - -/* Define to 1 if you have the `expl' function. */ -/* #undef HAVE_EXPL */ - -/* Define to 1 if you have the `fabsl' function. */ -/* #undef HAVE_FABSL */ - -/* Define to 1 if you have the `finite' function. */ -#define HAVE_FINITE 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_FLOATINGPOINT_H */ - -/* Define to 1 if you have the `floorl' function. */ -#define HAVE_FLOORL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEE754_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEEFP_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_INTTYPES_H 1 - -/* Define to 1 if you have the `isinf' function. */ -/* #undef HAVE_ISINF */ - -/* Define to 1 if you have the `isinfl' function. */ -/* #undef HAVE_ISINFL */ - -/* Define to 1 if you have the `isnan' function. */ -#define HAVE_ISNAN 1 - -/* Define to 1 if you have the `isnanl' function. */ -/* #undef HAVE_ISNANL */ - -/* Define to 1 if you have the `isnormal' function. */ -/* #undef HAVE_ISNORMAL */ - -/* Define to 1 if the system has the type `loff_t'. */ -/* #undef HAVE_LOFF_T */ - -/* Define to 1 if you have the `log10l' function. */ -/* #undef HAVE_LOG10L */ - -/* Define to 1 if you have the `logl' function. */ -/* #undef HAVE_LOGL */ - -/* Define to 1 if you have the header file. */ -#define HAVE_MEMORY_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NAN_H */ - -/* Define to 1 if you have the `powl' function. */ -#define HAVE_POWL 1 - -/* Define to 1 if you have the `signbit' function. */ -/* #undef HAVE_SIGNBIT */ - -/* Define if we can ignore the fault (instruction skipping in SIGSEGV - handler). */ -#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - -/* Define to 1 if you have the `sinhl' function. */ -#define HAVE_SINHL 1 - -/* Define to 1 if you have the `sinl' function. */ -#define HAVE_SINL 1 - -/* Define to 1 if you have the `sqrtl' function. */ -#define HAVE_SQRTL 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDLIB_H 1 - -/* Define to 1 if you have the `strdup' function. */ -#define HAVE_STRDUP 1 - -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STRINGS_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_STRING_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TYPES_H 1 - -/* Define to 1 if you have the `tanhl' function. */ -#define HAVE_TANHL 1 - -/* Define to 1 if you have the `tanl' function. */ -#define HAVE_TANL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_UNISTD_H */ - -/* Define if your system supports Windows exceptions. */ -#define HAVE_WIN32_EXCEPTIONS 1 - -/* Define if your system has a working Win32-based memory allocator. */ -#define HAVE_WIN32_VM 1 - -/* Define to the floating point format of the host machine. */ -#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT - -/* Define to 1 if the host machine stores floating point numbers in memory - with the word containing the sign bit at the lowest address, or to 0 if it - does it the other way around. This macro should not be defined if the - ordering is the same as for multi-word integers. */ -/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ - -/* Define to 1 if your C compiler doesn't accept -c and -o together. */ -/* #undef NO_MINUS_C_MINUS_O */ - -/* Define this program name. */ -#define PACKAGE "Basilisk II" - -/* Define to the address where bug reports for this package should be sent. */ -#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" - -/* Define to the full name of this package. */ -#define PACKAGE_NAME "Basilisk II" - -/* Define to the full name and version of this package. */ -#define PACKAGE_STRING "Basilisk II 1.0" - -/* Define to the one symbol short name of this package. */ -#define PACKAGE_TARNAME "BasiliskII" - -/* Define to the home page for this package. */ -#define PACKAGE_URL "" - -/* Define to the version of this package. */ -#define PACKAGE_VERSION "1.0" - -/* The size of `double', as computed by sizeof. */ -#define SIZEOF_DOUBLE 8 - -/* The size of `float', as computed by sizeof. */ -#define SIZEOF_FLOAT 4 - -/* The size of `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of `long', as computed by sizeof. */ -#define SIZEOF_LONG 4 - -/* The size of `long double', as computed by sizeof. */ -#define SIZEOF_LONG_DOUBLE 8 - -/* The size of `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - -/* The size of `void *', as computed by sizeof. */ -#define SIZEOF_VOID_P 4 - -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - -/* Define to enble SDL support */ -#define USE_SDL 1 - -/* Define to enable SDL audio support */ -#define USE_SDL_AUDIO 1 - -/* Define to enable SDL video graphics support */ -#define USE_SDL_VIDEO 1 - -/* Define this program version. */ -#define VERSION "1.0" - -/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most - significant byte first (like Motorola and SPARC, unlike Intel). */ -#if defined AC_APPLE_UNIVERSAL_BUILD -# if defined __BIG_ENDIAN__ -# define WORDS_BIGENDIAN 1 -# endif -#else -# ifndef WORDS_BIGENDIAN -/* # undef WORDS_BIGENDIAN */ -# endif -#endif - -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `long int' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned int' if does not define. */ -/* #undef size_t */ diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac deleted file mode 100755 index fc9027047..000000000 --- a/BasiliskII/src/Windows/configure.ac +++ /dev/null @@ -1,569 +0,0 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written in 2002 by Christian Bauer et al. - -AC_INIT([Basilisk II], 1.0, [Christian.Bauer@uni-mainz.de], BasiliskII) -AC_CONFIG_SRCDIR(main_windows.cpp) -AC_CONFIG_AUX_DIR(../Unix) -AC_PREREQ(2.52) -AC_CONFIG_HEADER(config.h) - -dnl Aliases for PACKAGE and VERSION macros. -AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE_NAME", [Define this program name.]) -AC_DEFINE_UNQUOTED(VERSION, "$PACKAGE_VERSION", [Define this program version.]) - -dnl SDL options. -AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) - -dnl JIT compiler options. -AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) -AC_ARG_ENABLE(jit-debug, [ --enable-jit-debug activate native code disassemblers [default=no]], [WANT_JIT_DEBUG=$enableval], [WANT_JIT_DEBUG=no]) - -dnl FPU emulation core. -AC_ARG_ENABLE(fpe, -[ --enable-fpe=FPE specify which fpu emulator to use [default=auto]], -[ case "$enableval" in - dnl default is always ieee, if architecture has this fp format - auto) FPE_CORE_TEST_ORDER="ieee uae";; - ieee) FPE_CORE_TEST_ORDER="ieee";; - uae) FPE_CORE_TEST_ORDER="uae";; - x86) FPE_CORE_TEST_ORDER="x86";; - *) AC_MSG_ERROR([--enable-fpe takes only one of the following values: auto, x86, ieee, uae]);; - esac -], -[ FPE_CORE_TEST_ORDER="ieee uae" -]) - -dnl External packages. -AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) - -dnl Addressing modes. -AC_ARG_ENABLE(addressing, -[ --enable-addressing=AM specify the addressing mode to use [default=fastest]], -[ case "$enableval" in - direct) ADDRESSING_TEST_ORDER="direct";; - banks) ADDRESSING_TEST_ORDER="banks";; - fastest)ADDRESSING_TEST_ORDER="direct banks";; - *) AC_MSG_ERROR([--enable-addressing takes only one of the following values: fastest, direct, banks]);; - esac -], -[ ADDRESSING_TEST_ORDER="direct banks" -]) - -dnl Canonical system information. -AC_CANONICAL_HOST -AC_CANONICAL_TARGET - -dnl Target CPU type. -HAVE_I386=no -HAVE_POWERPC=no -HAVE_X86_64=no -case "$target_cpu" in - i386* | i486* | i586* | i686* | i786* ) HAVE_I386=yes;; - powerpc* ) HAVE_POWERPC=yes;; - x86_64* ) HAVE_X86_64=yes;; -esac - -dnl Checks for programs. -AC_PROG_CC -AC_PROG_CC_C_O -AC_PROG_CPP -AC_PROG_CXX -AC_PROG_MAKE_SET -AC_PROG_EGREP -AC_PROG_LN_S -AC_CHECK_TOOL(WINDRES, windres) - -dnl We use GTK+ if possible. -if [[ "x$WANT_GTK" = "xyes" ]]; then - AM_PATH_GTK_2_0(1.3.15, [], [ - AC_MSG_WARN([Could not find GTK+ 2.0, disabling user interface.]) - WANT_GTK=no - ]) -fi -AC_SUBST(WANT_GTK) - -dnl We use 64-bit file size support if possible. -AC_SYS_LARGEFILE - -dnl Checks for header files. -AC_HEADER_STDC - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_C_BIGENDIAN -AC_C_CONST -AC_C_INLINE -AC_CHECK_SIZEOF(short, 2) -AC_CHECK_SIZEOF(int, 4) -AC_CHECK_SIZEOF(long, 4) -AC_CHECK_SIZEOF(long long, 8) -AC_CHECK_SIZEOF(float, 4) -AC_CHECK_SIZEOF(double, 8) -AC_CHECK_SIZEOF(long double, 12) -AC_CHECK_SIZEOF(void *, 4) -AC_TYPE_OFF_T -AC_CHECK_TYPES(loff_t) -AC_CHECK_TYPES(caddr_t) -AC_TYPE_SIZE_T - -dnl Checks for library functions. -AC_CHECK_FUNCS(strdup strerror) - -dnl Define a macro that translates a yesno-variable into a C macro definition -dnl to be put into the config.h file -dnl $1 -- the macro to define -dnl $2 -- the value to translate -dnl $3 -- template name -AC_DEFUN([AC_TRANSLATE_DEFINE], [ - if [[ "x$2" = "xyes" -o "x$2" = "xguessing yes" ]]; then - AC_DEFINE($1, 1, $3) - fi -]) - -dnl Check that VirtualAlloc(), VirtualProtect() work -AC_CACHE_CHECK([whether VirtualProtect works], - ac_cv_VirtualProtect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_VirtualProtect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define HAVE_WIN32_VM 1 - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../Unix/vm_alloc.cpp" - ], ac_cv_VirtualProtect_works=no, rm -f core, - dnl When cross-compiling, assume it works - ac_cv_VirtualProtect_works="yes" - ) - done - AC_TRY_RUN([ - #define HAVE_WIN32_VM 1 - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../Unix/vm_alloc.cpp" - ], , ac_cv_VirtualProtect_works=no, - dnl When cross-compiling, assume it works - ac_cv_VirtualProtect_works="yes" - ) - AC_LANG_RESTORE - ] -) -if [[ "x$ac_cv_VirtualProtect_works" = "xyes" ]]; then - AC_DEFINE(HAVE_WIN32_VM, 1, [Define if your system has a working Win32-based memory allocator.]) -else - AC_MSG_ERROR([Sorry, Windows VM functions don't work as expected on your system.]) -fi - -dnl Check if Windows exceptions are supported. -AC_CACHE_CHECK([whether your system supports Windows exceptions], - ac_cv_have_win32_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_WIN32_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" - ], - ac_cv_have_win32_exceptions=yes, - ac_cv_have_win32_exceptions=no, - dnl When cross-compiling, assume it works - ac_cv_have_win32_exceptions="yes" - ) - AC_LANG_RESTORE - ] -) -if [[ "x$ac_cv_have_win32_exceptions" = "xyes" ]]; then - AC_DEFINE(HAVE_WIN32_EXCEPTIONS, 1, [Define if your system supports Windows exceptions.]) -else - AC_MSG_ERROR([Sorry, Windows exceptions don't work as expected on your system.]) -fi - -dnl Check if we can ignore the fault (instruction skipping in SIGSEGV handler) -AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], - ac_cv_have_skip_instruction, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" - ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_skip_instruction=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_SIGSEGV_SKIP_INSTRUCTION, "$ac_cv_have_skip_instruction", - [Define if we can ignore the fault (instruction skipping in SIGSEGV handler).]) - -dnl We really want VOSF (Video on SEGV Signals) screen updates acceleration -AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) - -dnl Determine the addressing mode to use -ADDRESSING_MODE="" -AC_MSG_CHECKING([for the addressing mode to use]) -for am in $ADDRESSING_TEST_ORDER; do - case $am in - direct) - dnl Direct addressing mode (constant offset) - ADDRESSING_MODE="direct" - DEFINES="$DEFINES -DDIRECT_ADDRESSING" - break - ;; - banks) - dnl Default addressing mode - ADDRESSING_MODE="memory banks" - break - ;; - *) - AC_MSG_ERROR([Internal configure.ac script error for $am addressing mode]) - esac -done -AC_MSG_RESULT($ADDRESSING_MODE) -if [[ "x$ADDRESSING_MODE" = "x" ]]; then - AC_MSG_WARN([Sorry, no suitable addressing mode in $ADDRESSING_TEST_ORDER]) - ADDRESSING_MODE="memory banks" -fi - -dnl Banked Memory Addressing mode is not supported by the JIT compiler -if [[ "x$WANT_JIT" = "xyes" -a "x$ADDRESSING_MODE" = "xmemory banks" ]]; then - AC_MSG_ERROR([Sorry, the JIT Compiler requires Direct Addressing, at least]) -fi - -dnl Check for GAS. -HAVE_GAS=no -AC_MSG_CHECKING(for GAS .p2align feature) -cat >conftest.S << EOF - .text - .p2align 5 -EOF -if $CC conftest.S -c -o conftest.o >/dev/null 2>&1 ; then HAVE_GAS=yes; fi -AC_MSG_RESULT($HAVE_GAS) - -dnl Check for GCC 2.7 or higher. -HAVE_GCC27=no -AC_MSG_CHECKING(for GCC 2.7 or higher) -AC_EGREP_CPP(xyes, -[#if __GNUC__ - 1 > 1 || __GNUC_MINOR__ - 1 > 5 - xyes -#endif -], [AC_MSG_RESULT(yes); HAVE_GCC27=yes], AC_MSG_RESULT(no)) - -dnl Check for GCC 3.0 or higher. -HAVE_GCC30=no -AC_MSG_CHECKING(for GCC 3.0 or higher) -AC_EGREP_CPP(xyes, -[#if __GNUC__ >= 3 - xyes -#endif -], [AC_MSG_RESULT(yes); HAVE_GCC30=yes], AC_MSG_RESULT(no)) - -dnl Add -fno-strict-aliasing for slirp sources -if [[ "x$HAVE_GCC30" = "xyes" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -fno-strict-aliasing" - AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], - ac_cv_gcc_no_strict_aliasing, [ - AC_TRY_COMPILE([],[], - [ac_cv_gcc_no_strict_aliasing=yes; AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing")], - [ac_cv_gcc_no_strict_aliasing=no]) - ]) - CFLAGS="$SAVED_CFLAGS" -fi - -dnl Select appropriate CPU source and REGPARAM define. -ASM_OPTIMIZATIONS=none -CPUSRCS="cpuemu1.cpp cpuemu2.cpp cpuemu3.cpp cpuemu4.cpp cpuemu5.cpp cpuemu6.cpp cpuemu7.cpp cpuemu8.cpp" - -dnl JITSRCS will be emptied later if the JIT is not available -dnl Other platforms should define their own set of noflags file variants -CAN_JIT=no -JITSRCS="compemu1.cpp compemu2.cpp compemu3.cpp compemu4.cpp compemu5.cpp compemu6.cpp compemu7.cpp compemu8.cpp" - -if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_I386" = "xyes" ]]; then - dnl i386 CPU - DEFINES="$DEFINES -DUNALIGNED_PROFITABLE -DREGPARAM=\"__attribute__((regparm(3)))\"" - if [[ "x$HAVE_GAS" = "xyes" ]]; then - ASM_OPTIMIZATIONS=i386 - DEFINES="$DEFINES -DX86_ASSEMBLY -DOPTIMIZED_FLAGS -DSAHF_SETO_PROFITABLE" - JITSRCS="cpuemu1_nf.cpp cpuemu2_nf.cpp cpuemu3_nf.cpp cpuemu4_nf.cpp cpuemu5_nf.cpp cpuemu6_nf.cpp cpuemu7_nf.cpp cpuemu8_nf.cpp $JITSRCS" - CAN_JIT=yes - fi -elif [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_X86_64" = "xyes" ]]; then - dnl x86-64 CPU - DEFINES="$DEFINES -DUNALIGNED_PROFITABLE" - if [[ "x$HAVE_GAS" = "xyes" ]]; then - ASM_OPTIMIZATIONS="x86-64" - DEFINES="$DEFINES -DX86_64_ASSEMBLY -DOPTIMIZED_FLAGS" - JITSRCS="cpuemu1_nf.cpp cpuemu2_nf.cpp cpuemu3_nf.cpp cpuemu4_nf.cpp cpuemu5_nf.cpp cpuemu6_nf.cpp cpuemu7_nf.cpp cpuemu8_nf.cpp $JITSRCS" - CAN_JIT=yes - fi -fi - -dnl Enable JIT compiler, if possible. -if [[ "x$WANT_JIT" = "xyes" -a "x$CAN_JIT" ]]; then - JITSRCS="$JITSRCS ../uae_cpu/compiler/compemu_support.cpp ../uae_cpu/compiler/compemu_fpp.cpp compstbl.o cpustbl_nf.o" - DEFINES="$DEFINES -DUSE_JIT -DUSE_JIT_FPU" - - if [[ "x$WANT_JIT_DEBUG" = "xyes" ]]; then - if [[ "x$WANT_MON" = "xyes" ]]; then - DEFINES="$DEFINES -DJIT_DEBUG=1" - else - AC_MSG_WARN([cxmon not found, ignoring --enable-jit-debug]) - WANT_JIT_DEBUG=no - fi - fi - - dnl IEEE core is the only FPU emulator to use with the JIT compiler - case $FPE_CORE_TEST_ORDER in - ieee*) ;; - *) AC_MSG_WARN([Forcing use of the IEEE FPU core, as the JIT compiler supports only this one.]) ;; - esac - FPE_CORE_TEST_ORDER="ieee" -else - WANT_JIT=no - WANT_JIT_DEBUG=no - JITSRCS="" -fi - -dnl Utility macro used by next two tests. -dnl AC_EXAMINE_OBJECT(C source code, -dnl commands examining object file, -dnl [commands to run if compile failed]): -dnl -dnl Compile the source code to an object file; then convert it into a -dnl printable representation. All unprintable characters and -dnl asterisks (*) are replaced by dots (.). All white space is -dnl deleted. Newlines (ASCII 0x10) in the input are preserved in the -dnl output, but runs of newlines are compressed to a single newline. -dnl Finally, line breaks are forcibly inserted so that no line is -dnl longer than 80 columns and the file ends with a newline. The -dnl result of all this processing is in the file conftest.dmp, which -dnl may be examined by the commands in the second argument. -dnl -AC_DEFUN([gcc_AC_EXAMINE_OBJECT], -[AC_LANG_SAVE -AC_LANG_C -dnl Next bit cribbed from AC_TRY_COMPILE. -cat > conftest.$ac_ext < conftest.dmp - $2 -ifelse($3, , , else - $3 -)dnl -fi -rm -rf conftest* -AC_LANG_RESTORE]) - -dnl Floating point format probe. -dnl The basic concept is the same as the above: grep the object -dnl file for an interesting string. We have to watch out for -dnl rounding changing the values in the object, however; this is -dnl handled by ignoring the least significant byte of the float. -dnl -dnl Does not know about VAX G-float or C4x idiosyncratic format. -dnl It does know about PDP-10 idiosyncratic format, but this is -dnl not presently supported by GCC. S/390 "binary floating point" -dnl is in fact IEEE (but maybe we should have that in EBCDIC as well -dnl as ASCII?) -dnl -AC_DEFUN([gcc_AC_C_FLOAT_FORMAT], -[AC_CACHE_CHECK(floating point format, ac_cv_c_float_format, -[gcc_AC_EXAMINE_OBJECT( -[/* This will not work unless sizeof(double) == 8. */ -extern char sizeof_double_must_be_8 [sizeof(double) == 8 ? 1 : -1]; - -/* This structure must have no internal padding. */ -struct possibility { - char prefix[8]; - double candidate; - char postfix[8]; -}; - -#define C(cand) { "\nformat:", cand, ":tamrof\n" } -struct possibility table [] = -{ - C( 3.25724264705901305206e+01), /* @@IEEEFP - IEEE 754 */ - C( 3.53802595280598432000e+18), /* D__float - VAX */ - C( 5.32201830133125317057e-19), /* D.PDP-10 - PDP-10 - the dot is 0x13a */ - C( 1.77977764695171661377e+10), /* IBMHEXFP - s/390 format, ascii */ - C(-5.22995989424860458374e+10) /* IBMHEXFP - s/390 format, EBCDIC */ -};], - [if grep 'format:.@IEEEF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.I@@PFE.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.FEEEI@.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.EFP@@I.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.__floa.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='VAX D-float' - elif grep 'format:..PDP-1.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='PDP-10' - elif grep 'format:.BMHEXF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IBM 370 hex' - else - AC_MSG_ERROR(Unknown floating point format) - fi], - [AC_MSG_ERROR(compile failed)]) -]) -# IEEE is the default format. If the float endianness isn't the same -# as the integer endianness, we have to set FLOAT_WORDS_BIG_ENDIAN -# (which is a tristate: yes, no, default). This is only an issue with -# IEEE; the other formats are only supported by a few machines each, -# all with the same endianness. -format=IEEE_FLOAT_FORMAT -fbigend= -case $ac_cv_c_float_format in - 'IEEE (big-endian)' ) - if test $ac_cv_c_bigendian = no; then - fbigend=1 - fi - ;; - 'IEEE (little-endian)' ) - if test $ac_cv_c_bigendian = yes; then - fbigend=0 - fi - ;; - 'VAX D-float' ) - format=VAX_FLOAT_FORMAT - ;; - 'PDP-10' ) - format=PDP10_FLOAT_FORMAT - ;; - 'IBM 370 hex' ) - format=IBM_FLOAT_FORMAT - ;; -esac -AC_DEFINE_UNQUOTED(HOST_FLOAT_FORMAT, $format, - [Define to the floating point format of the host machine.]) -if test -n "$fbigend"; then - AC_DEFINE_UNQUOTED(HOST_FLOAT_WORDS_BIG_ENDIAN, $fbigend, - [Define to 1 if the host machine stores floating point numbers in - memory with the word containing the sign bit at the lowest address, - or to 0 if it does it the other way around. - - This macro should not be defined if the ordering is the same as for - multi-word integers.]) -fi -]) - -dnl Select appropriate FPU source. -gcc_AC_C_FLOAT_FORMAT -AC_CHECK_HEADERS(ieee754.h ieeefp.h floatingpoint.h nan.h) - -for fpe in $FPE_CORE_TEST_ORDER; do - case $fpe in - ieee) - case $ac_cv_c_float_format in - IEEE*) - FPE_CORE="IEEE fpu core" - DEFINES="$DEFINES -DFPU_IEEE" - FPUSRCS="../uae_cpu/fpu/fpu_ieee.cpp" - dnl Math functions not mandated by C99 standard - AC_CHECK_FUNCS(isnanl isinfl) - dnl Math functions required by C99 standard, but probably not - dnl implemented everywhere. In that case, we fall back to the - dnl regular variant for doubles. - AC_CHECK_FUNCS(logl log10l expl powl fabsl sqrtl) - AC_CHECK_FUNCS(sinl cosl tanl sinhl coshl tanhl) - AC_CHECK_FUNCS(asinl acosl atanl asinhl acoshl atanhl) - AC_CHECK_FUNCS(floorl ceill) - break - ;; - esac - ;; - x86) - if [[ ":$HAVE_GCC27:$HAVE_I386:$HAVE_GAS:" = ":yes:yes:yes:" ]]; then - FPE_CORE="i387 fpu core" - DEFINES="$DEFINES -DFPU_X86" - FPUSRCS="../uae_cpu/fpu/fpu_x86.cpp" - break - fi - ;; - uae) - FPE_CORE="uae fpu core" - DEFINES="$DEFINES -DFPU_UAE" - FPUSRCS="../uae_cpu/fpu/fpu_uae.cpp" - break - ;; - *) - AC_MSG_ERROR([Internal configure.in script error for $fpe fpu core]) - ;; - esac -done -if [[ "x$FPE_CORE" = "x" ]]; then - AC_MSG_ERROR([Sorry, no suitable FPU core found in $FPE_CORE_TEST_ORDER]) -fi - -dnl Check for certain math functions -AC_CHECK_FUNCS(atanh) -AC_CHECK_FUNCS(isnan isinf finite isnormal signbit) - -dnl UAE CPU sources for all non-m68k-native architectures. -CPUINCLUDES="-I../uae_cpu" -CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" - -dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) -SDL_CFLAGS=`$sdl_config --cflags` -AC_SUBST(SDL_CFLAGS) -if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - SDL_LIBS=`$sdl_config --static-libs` - sdl_prefix=`$sdl_config --exec-prefix` - if [[ -n "$sdl_prefix" ]]; then - SDL_LIBS=`echo "$SDL_LIBS" | sed -e "s,-l\(SDLmain\|SDL\),$sdl_prefix/lib/lib\1.a,g"` - fi - SDL_LIBS="$SDL_LIBS -lwinmm" -else - SDL_LIBS=`$sdl_config --libs` -fi -AC_SUBST(SDL_LIBS) -AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) -AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) -AC_DEFINE(USE_SDL_AUDIO, 1, [Define to enable SDL audio support]) - -dnl Remove the "-g" option if set for GCC. -if [[ "x$HAVE_GCC27" = "xyes" ]]; then - CFLAGS=`echo $CFLAGS | sed -e 's/-g\b//g'` - CXXFLAGS=`echo $CXXFLAGS | sed -e 's/-g\b//g'` -fi - -dnl Generate Makefile. -AC_SUBST(DEFINES) -AC_SUBST(CPUINCLUDES) -AC_SUBST(CPUSRCS) -AC_CONFIG_FILES([Makefile]) -AC_OUTPUT - -dnl Print summary. -echo -echo Basilisk II configuration summary: -echo -echo Use JIT compiler ....................... : $WANT_JIT -echo JIT debug mode ......................... : $WANT_JIT_DEBUG -echo Floating-Point emulation core .......... : $FPE_CORE -echo Assembly optimizations ................. : $ASM_OPTIMIZATIONS -echo Addressing mode ........................ : $ADDRESSING_MODE -echo GTK user interface ..................... : $WANT_GTK -echo -echo "Configuration done. Now type \"make\" (or \"gmake\")." diff --git a/BasiliskII/src/Windows/ether_windows.cpp b/BasiliskII/src/Windows/ether_windows.cpp deleted file mode 100755 index 1f59d8305..000000000 --- a/BasiliskII/src/Windows/ether_windows.cpp +++ /dev/null @@ -1,1609 +0,0 @@ -/* - * ether_windows.cpp - Ethernet device driver - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" - -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "ether.h" -#include "ether_defs.h" -#include "b2ether/multiopt.h" -#include "b2ether/inc/b2ether_hl.h" -#include "ether_windows.h" -#include "router/router.h" -#include "util_windows.h" -#include "libslirp.h" - -// Define to let the slirp library determine the right timeout for select() -#define USE_SLIRP_TIMEOUT 1 - - -#define DEBUG 0 -#define MONITOR 0 - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -// Ethernet device types -enum { - NET_IF_B2ETHER, - NET_IF_ROUTER, - NET_IF_SLIRP, - NET_IF_TAP, - NET_IF_FAKE, -}; - -// TAP-Win32 constants -#define TAP_VERSION_MIN_MAJOR 7 -#define TAP_VERSION_MIN_MINOR 1 - -#define TAP_CONTROL_CODE(request, method) \ - CTL_CODE (FILE_DEVICE_UNKNOWN, request, method, FILE_ANY_ACCESS) - -#define TAP_IOCTL_GET_MAC TAP_CONTROL_CODE (1, METHOD_BUFFERED) -#define TAP_IOCTL_GET_VERSION TAP_CONTROL_CODE (2, METHOD_BUFFERED) -#define TAP_IOCTL_GET_MTU TAP_CONTROL_CODE (3, METHOD_BUFFERED) -#define TAP_IOCTL_GET_INFO TAP_CONTROL_CODE (4, METHOD_BUFFERED) -#define TAP_IOCTL_CONFIG_POINT_TO_POINT TAP_CONTROL_CODE (5, METHOD_BUFFERED) -#define TAP_IOCTL_SET_MEDIA_STATUS TAP_CONTROL_CODE (6, METHOD_BUFFERED) -#define TAP_IOCTL_CONFIG_DHCP_MASQ TAP_CONTROL_CODE (7, METHOD_BUFFERED) -#define TAP_IOCTL_GET_LOG_LINE TAP_CONTROL_CODE (8, METHOD_BUFFERED) -#define TAP_IOCTL_CONFIG_DHCP_SET_OPT TAP_CONTROL_CODE (9, METHOD_BUFFERED) - -#define OLD_TAP_CONTROL_CODE(request, method) \ - CTL_CODE (FILE_DEVICE_PHYSICAL_NETCARD | 8000, request, method, FILE_ANY_ACCESS) - -#define OLD_TAP_IOCTL_GET_VERSION OLD_TAP_CONTROL_CODE (3, METHOD_BUFFERED) - -// Options -bool ether_use_permanent = true; -static int16 ether_multi_mode = ETHER_MULTICAST_MAC; - -// Global variables -HANDLE ether_th; -unsigned int ether_tid; -HANDLE ether_th1; -HANDLE ether_th2; -static int net_if_type = -1; // Ethernet device type -#ifdef SHEEPSHAVER -static bool net_open = false; // Flag: initialization succeeded, network device open -uint8 ether_addr[6]; // Our Ethernet address -#endif - -// These are protected by queue_csection -// Controls transfer for read thread to feed thread -static CRITICAL_SECTION queue_csection; -typedef struct _win_queue_t { - uint8 *buf; - int sz; -} win_queue_t; -#define MAX_QUEUE_ITEMS 1024 -static win_queue_t queue[MAX_QUEUE_ITEMS]; -static int queue_head = 0; -static int queue_inx = 0; -static bool wait_request = true; - - - -// Read thread protected packet pool -static CRITICAL_SECTION fetch_csection; -// Some people use pools as large as 64. -#define PACKET_POOL_COUNT 10 -static LPPACKET packets[PACKET_POOL_COUNT]; -static bool wait_request2 = false; - - - -// Write thread packet queue -static CRITICAL_SECTION send_csection; -static LPPACKET send_queue = 0; - - -// Write thread free packet pool -static CRITICAL_SECTION wpool_csection; -static LPPACKET write_packet_pool = 0; - - - -// Try to deal with echos. Protected by fetch_csection. -// The code should be moved to the driver. No need to lift -// the echo packets to the application level. -// MAX_ECHO must be a power of two. -#define MAX_ECHO (1<<2) -static int echo_count = 0; -typedef uint8 echo_t[1514]; -static echo_t pending_packet[MAX_ECHO]; -static int pending_packet_sz[MAX_ECHO]; - - -// List of attached protocols -struct NetProtocol { - NetProtocol *next; - uint16 type; - uint32 handler; -}; - -static NetProtocol *prot_list = NULL; - - -static LPADAPTER fd = 0; -static bool thread_active = false; -static bool thread_active_1 = false; -static bool thread_active_2 = false; -static bool thread_active_3 = false; -static HANDLE int_ack = 0; -static HANDLE int_sig = 0; -static HANDLE int_sig2 = 0; -static HANDLE int_send_now = 0; - -// Prototypes -static LPADAPTER tap_open_adapter(LPCTSTR dev_name); -static void tap_close_adapter(LPADAPTER fd); -static bool tap_check_version(LPADAPTER fd); -static bool tap_set_status(LPADAPTER fd, ULONG status); -static bool tap_get_mac(LPADAPTER fd, LPBYTE addr); -static bool tap_receive_packet(LPADAPTER fd, LPPACKET lpPacket, BOOLEAN Sync); -static bool tap_send_packet(LPADAPTER fd, LPPACKET lpPacket, BOOLEAN Sync, BOOLEAN recycle); -static unsigned int WINAPI slirp_receive_func(void *arg); -static unsigned int WINAPI ether_thread_feed_int(void *arg); -static unsigned int WINAPI ether_thread_get_packets_nt(void *arg); -static unsigned int WINAPI ether_thread_write_packets(void *arg); -static void init_queue(void); -static void final_queue(void); -static bool allocate_read_packets(void); -static void free_read_packets(void); -static void free_write_packets(void); -static int16 ether_do_add_multicast(uint8 *addr); -static int16 ether_do_del_multicast(uint8 *addr); -static int16 ether_do_write(uint32 arg); -static void ether_do_interrupt(void); - - -/* - * Find protocol in list - */ - -static NetProtocol *find_protocol(uint16 type) -{ - // All 802.2 types are the same - if (type <= 1500) - type = 0; - - // Search list (we could use hashing here but there are usually only three - // handlers installed: 0x0000 for AppleTalk and 0x0800/0x0806 for TCP/IP) - NetProtocol *p = prot_list; - while (p) { - if (p->type == type) - return p; - p = p->next; - } - return NULL; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - TCHAR buf[256]; - - // Do nothing if no Ethernet device specified - const char *name = PrefsFindString("ether"); - if (name == NULL) - return false; - - ether_multi_mode = PrefsFindInt32("ethermulticastmode"); - ether_use_permanent = PrefsFindBool("etherpermanentaddress"); - - // Determine Ethernet device type - net_if_type = -1; - if (PrefsFindBool("routerenabled") || strcmp(name, "router") == 0) - net_if_type = NET_IF_ROUTER; - else if (strcmp(name, "slirp") == 0) - net_if_type = NET_IF_SLIRP; - else if (strcmp(name, "tap") == 0) - net_if_type = NET_IF_TAP; - else - net_if_type = NET_IF_B2ETHER; - - // Initialize NAT-Router - if (net_if_type == NET_IF_ROUTER) { - if (!router_init()) - net_if_type = NET_IF_FAKE; - } - - // Initialize slirp library - if (net_if_type == NET_IF_SLIRP) { - if (slirp_init() < 0) { - WarningAlert(GetString(STR_SLIRP_NO_DNS_FOUND_WARN)); - return false; - } - } - - // Open ethernet device - decltype(tstr(std::declval())) dev_name; - switch (net_if_type) { - case NET_IF_B2ETHER: - dev_name = tstr(PrefsFindString("etherguid")); - if (dev_name == NULL || strcmp(name, "b2ether") != 0) - dev_name = tstr(name); - break; - case NET_IF_TAP: - dev_name = tstr(PrefsFindString("etherguid")); - break; - } - if (net_if_type == NET_IF_B2ETHER) { - if (dev_name == NULL) { - WarningAlert("No ethernet device GUID specified. Ethernet is not available."); - goto open_error; - } - - fd = PacketOpenAdapter( dev_name.get(), ether_multi_mode ); - if (!fd) { - _sntprintf(buf, lengthof(buf), TEXT("Could not open ethernet adapter %s."), dev_name.get()); - WarningAlert(buf); - goto open_error; - } - - // Get Ethernet address - if(!PacketGetMAC(fd,ether_addr,ether_use_permanent)) { - _sntprintf(buf, lengthof(buf), TEXT("Could not get hardware address of device %s. Ethernet is not available."), dev_name.get()); - WarningAlert(buf); - goto open_error; - } - D(bug("Real ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - - const char *ether_fake_address; - ether_fake_address = PrefsFindString("etherfakeaddress"); - if(ether_fake_address && strlen(ether_fake_address) == 12) { - char sm[10]; - strcpy( sm, "0x00" ); - for( int i=0; i<6; i++ ) { - sm[2] = ether_fake_address[i*2]; - sm[3] = ether_fake_address[i*2+1]; - ether_addr[i] = (uint8)strtoul(sm,0,0); - } - D(bug("Fake ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - } - } - else if (net_if_type == NET_IF_TAP) { - if (dev_name == NULL) { - WarningAlert("No ethernet device GUID specified. Ethernet is not available."); - goto open_error; - } - - fd = tap_open_adapter(dev_name.get()); - if (!fd) { - _sntprintf(buf, lengthof(buf), TEXT("Could not open ethernet adapter %s."), dev_name.get()); - WarningAlert(buf); - goto open_error; - } - - if (!tap_check_version(fd)) { - _sntprintf(buf, lengthof(buf), TEXT("Minimal TAP-Win32 version supported is %d.%d."), TAP_VERSION_MIN_MAJOR, TAP_VERSION_MIN_MINOR); - WarningAlert(buf); - goto open_error; - } - - if (!tap_set_status(fd, true)) { - WarningAlert("Could not set media status to connected."); - goto open_error; - } - - if (!tap_get_mac(fd, ether_addr)) { - _sntprintf(buf, lengthof(buf), TEXT("Could not get hardware address of device %s. Ethernet is not available."), dev_name.get()); - WarningAlert(buf); - goto open_error; - } - D(bug("Real ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - - const char *ether_fake_address; - ether_fake_address = PrefsFindString("etherfakeaddress"); - if (ether_fake_address && strlen(ether_fake_address) == 12) { - char sm[10]; - strcpy( sm, "0x00" ); - for( int i=0; i<6; i++ ) { - sm[2] = ether_fake_address[i*2]; - sm[3] = ether_fake_address[i*2+1]; - ether_addr[i] = (uint8)strtoul(sm,0,0); - } - } -#if 1 - /* - If we bridge the underlying ethernet connection and the TAP - device altogether, we have to use a fake address. - */ - else { - ether_addr[0] = 0x52; - ether_addr[1] = 0x54; - ether_addr[2] = 0x00; - } -#endif - D(bug("Fake ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - } - else if (net_if_type == NET_IF_SLIRP) { - ether_addr[0] = 0x52; - ether_addr[1] = 0x54; - ether_addr[2] = 0x00; - ether_addr[3] = 0x12; - ether_addr[4] = 0x34; - ether_addr[5] = 0x56; - D(bug("Ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - } - else { - memcpy( ether_addr, router_mac_addr, 6 ); - D(bug("Fake ethernet address (same as router) %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - } - - // Start packet reception thread - int_ack = CreateSemaphore( 0, 0, 1, NULL); - if(!int_ack) { - WarningAlert("WARNING: Cannot create int_ack semaphore"); - goto open_error; - } - - // nonsignaled - int_sig = CreateSemaphore( 0, 0, 1, NULL); - if(!int_sig) { - WarningAlert("WARNING: Cannot create int_sig semaphore"); - goto open_error; - } - - int_sig2 = CreateSemaphore( 0, 0, 1, NULL); - if(!int_sig2) { - WarningAlert("WARNING: Cannot create int_sig2 semaphore"); - goto open_error; - } - - int_send_now = CreateSemaphore( 0, 0, 1, NULL); - if(!int_send_now) { - WarningAlert("WARNING: Cannot create int_send_now semaphore"); - goto open_error; - } - - init_queue(); - - if(!allocate_read_packets()) goto open_error; - - // No need to enter wait state if we can avoid it. - // These all terminate fast. - - InitializeCriticalSectionAndSpinCount( &fetch_csection, 5000 ); - InitializeCriticalSectionAndSpinCount( &queue_csection, 5000 ); - InitializeCriticalSectionAndSpinCount( &send_csection, 5000 ); - InitializeCriticalSectionAndSpinCount( &wpool_csection, 5000 ); - - ether_th = (HANDLE)_beginthreadex( 0, 0, ether_thread_feed_int, 0, 0, ðer_tid ); - if (!ether_th) { - D(bug("Failed to create ethernet thread\n")); - goto open_error; - } - thread_active = true; - - unsigned int dummy; - unsigned int (WINAPI *receive_func)(void *); - switch (net_if_type) { - case NET_IF_SLIRP: - receive_func = slirp_receive_func; - break; - default: - receive_func = ether_thread_get_packets_nt; - break; - } - ether_th2 = (HANDLE)_beginthreadex( 0, 0, receive_func, 0, 0, &dummy ); - ether_th1 = (HANDLE)_beginthreadex( 0, 0, ether_thread_write_packets, 0, 0, &dummy ); - - // Everything OK - return true; - - open_error: - if (thread_active) { - TerminateThread(ether_th,0); - ether_th = 0; - if (int_ack) - CloseHandle(int_ack); - int_ack = 0; - if(int_sig) - CloseHandle(int_sig); - int_sig = 0; - if(int_sig2) - CloseHandle(int_sig2); - int_sig2 = 0; - if(int_send_now) - CloseHandle(int_send_now); - int_send_now = 0; - thread_active = false; - } - if (fd) { - switch (net_if_type) { - case NET_IF_B2ETHER: - PacketCloseAdapter(fd); - break; - case NET_IF_TAP: - tap_close_adapter(fd); - break; - } - fd = 0; - } - return false; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - D(bug("EtherExit\n")); - - // Stop reception thread - thread_active = false; - - if(int_ack) ReleaseSemaphore(int_ack,1,NULL); - if(int_sig) ReleaseSemaphore(int_sig,1,NULL); - if(int_sig2) ReleaseSemaphore(int_sig2,1,NULL); - if(int_send_now) ReleaseSemaphore(int_send_now,1,NULL); - - D(bug("CancelIO if needed\n")); - if (fd && fd->hFile) - CancelIo(fd->hFile); - - // Wait max 2 secs to shut down pending io. After that, kill them. - D(bug("Wait delay\n")); - for( int i=0; i<10; i++ ) { - if(!thread_active_1 && !thread_active_2 && !thread_active_3) break; - Sleep(200); - } - - if(thread_active_1) { - D(bug("Ether killing ether_th1\n")); - if(ether_th1) TerminateThread(ether_th1,0); - thread_active_1 = false; - } - if(thread_active_2) { - D(bug("Ether killing ether_th2\n")); - if(ether_th2) TerminateThread(ether_th2,0); - thread_active_2 = false; - } - if(thread_active_3) { - D(bug("Ether killing thread\n")); - if(ether_th) TerminateThread(ether_th,0); - thread_active_3 = false; - } - - ether_th1 = 0; - ether_th2 = 0; - ether_th = 0; - - D(bug("Closing semaphores\n")); - if(int_ack) { - CloseHandle(int_ack); - int_ack = 0; - } - if(int_sig) { - CloseHandle(int_sig); - int_sig = 0; - } - if(int_sig2) { - CloseHandle(int_sig2); - int_sig2 = 0; - } - if(int_send_now) { - CloseHandle(int_send_now); - int_send_now = 0; - } - - // Close ethernet device - if (fd) { - switch (net_if_type) { - case NET_IF_B2ETHER: - PacketCloseAdapter(fd); - break; - case NET_IF_TAP: - tap_close_adapter(fd); - break; - } - fd = 0; - } - - // Remove all protocols - D(bug("Removing protocols\n")); - NetProtocol *p = prot_list; - while (p) { - NetProtocol *next = p->next; - delete p; - p = next; - } - prot_list = 0; - - D(bug("Deleting sections\n")); - DeleteCriticalSection( &fetch_csection ); - DeleteCriticalSection( &queue_csection ); - DeleteCriticalSection( &send_csection ); - DeleteCriticalSection( &wpool_csection ); - - D(bug("Freeing read packets\n")); - free_read_packets(); - - D(bug("Freeing write packets\n")); - free_write_packets(); - - D(bug("Finalizing queue\n")); - final_queue(); - - if (net_if_type == NET_IF_ROUTER) { - D(bug("Stopping router\n")); - router_final(); - } - - D(bug("EtherExit done\n")); -} - - -/* - * Glue around low-level implementation - */ - -#ifdef SHEEPSHAVER -// Error codes -enum { - eMultiErr = -91, - eLenErr = -92, - lapProtErr = -94, - excessCollsns = -95 -}; - -// Initialize ethernet -void EtherInit(void) -{ - net_open = false; - - // Do nothing if the user disabled the network - if (PrefsFindBool("nonet")) - return; - - net_open = ether_init(); -} - -// Exit ethernet -void EtherExit(void) -{ - ether_exit(); - net_open = false; -} - -// Get ethernet hardware address -void AO_get_ethernet_address(uint32 arg) -{ - uint8 *addr = Mac2HostAddr(arg); - if (net_open) - OTCopy48BitAddress(ether_addr, addr); - else { - addr[0] = 0x12; - addr[1] = 0x34; - addr[2] = 0x56; - addr[3] = 0x78; - addr[4] = 0x9a; - addr[5] = 0xbc; - } - D(bug("AO_get_ethernet_address: got address %02x%02x%02x%02x%02x%02x\n", addr[0], addr[1], addr[2], addr[3], addr[4], addr[5])); -} - -// Add multicast address -void AO_enable_multicast(uint32 addr) -{ - if (net_open) - ether_do_add_multicast(Mac2HostAddr(addr)); -} - -// Disable multicast address -void AO_disable_multicast(uint32 addr) -{ - if (net_open) - ether_do_del_multicast(Mac2HostAddr(addr)); -} - -// Transmit one packet -void AO_transmit_packet(uint32 mp) -{ - if (net_open) { - switch (ether_do_write(mp)) { - case noErr: - num_tx_packets++; - break; - case excessCollsns: - num_tx_buffer_full++; - break; - } - } -} - -// Copy packet data from message block to linear buffer -static inline int ether_arg_to_buffer(uint32 mp, uint8 *p) -{ - return ether_msgb_to_buffer(mp, p); -} - -// Ethernet interrupt -void EtherIRQ(void) -{ - D(bug("EtherIRQ\n")); - num_ether_irq++; - - OTEnterInterrupt(); - ether_do_interrupt(); - OTLeaveInterrupt(); - - // Acknowledge interrupt to reception thread - D(bug(" EtherIRQ done\n")); - ReleaseSemaphore(int_ack,1,NULL); -} -#else -// Add multicast address -int16 ether_add_multicast(uint32 pb) -{ - return ether_do_add_multicast(Mac2HostAddr(pb + eMultiAddr)); -} - -// Disable multicast address -int16 ether_del_multicast(uint32 pb) -{ - return ether_do_del_multicast(Mac2HostAddr(pb + eMultiAddr)); -} - -// Transmit one packet -int16 ether_write(uint32 wds) -{ - return ether_do_write(wds); -} - -// Copy packet data from WDS to linear buffer -static inline int ether_arg_to_buffer(uint32 wds, uint8 *p) -{ - return ether_wds_to_buffer(wds, p); -} - -// Dispatch packet to protocol handler -static void ether_dispatch_packet(uint32 packet, uint32 length) -{ - // Get packet type - uint16 type = ReadMacInt16(packet + 12); - - // Look for protocol - NetProtocol *prot = find_protocol(type); - if (prot == NULL) - return; - - // No default handler - if (prot->handler == 0) - return; - - // Copy header to RHA - Mac2Mac_memcpy(ether_data + ed_RHA, packet, 14); - D(bug(" header %08lx%04lx %08lx%04lx %04lx\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = type; // Packet type - r.d[1] = length - 14; // Remaining packet length (without header, for ReadPacket) - r.a[0] = packet + 14; // Pointer to packet (Mac address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08lx, type %08lx, length %08lx, data %08lx, rha %08lx, read_packet %08lx\n", prot->handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(prot->handler, &r); -} - -// Ethernet interrupt -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - ether_do_interrupt(); - - // Acknowledge interrupt to reception thread - D(bug(" EtherIRQ done\n")); - ReleaseSemaphore(int_ack,1,NULL); -} -#endif - - -/* - * Reset - */ - -void ether_reset(void) -{ - D(bug("EtherReset\n")); - - // Remove all protocols - NetProtocol *p = prot_list; - while (p) { - NetProtocol *next = p->next; - delete p; - p = next; - } - prot_list = NULL; -} - - -/* - * Add multicast address - */ - -static int16 ether_do_add_multicast(uint8 *addr) -{ - D(bug("ether_add_multicast\n")); - - // We wouldn't need to do this - // if(ether_multi_mode != ETHER_MULTICAST_MAC) return noErr; - - switch (net_if_type) { - case NET_IF_B2ETHER: - if (!PacketAddMulticast( fd, addr)) { - D(bug("WARNING: couldn't enable multicast address\n")); - return eMultiErr; - } - default: - D(bug("ether_add_multicast: noErr\n")); - return noErr; - } -} - - -/* - * Delete multicast address - */ - -int16 ether_do_del_multicast(uint8 *addr) -{ - D(bug("ether_del_multicast\n")); - - // We wouldn't need to do this - // if(ether_multi_mode != ETHER_MULTICAST_MAC) return noErr; - - switch (net_if_type) { - case NET_IF_B2ETHER: - if (!PacketDelMulticast( fd, addr)) { - D(bug("WARNING: couldn't disable multicast address\n")); - return eMultiErr; - } - default: - return noErr; - } -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - D(bug("ether_attach_ph type=0x%x, handler=0x%x\n",(int)type,handler)); - - // Already attached? - NetProtocol *p = find_protocol(type); - if (p != NULL) { - D(bug("ether_attach_ph: lapProtErr\n")); - return lapProtErr; - } else { - // No, create and attach - p = new NetProtocol; - p->next = prot_list; - p->type = type; - p->handler = handler; - prot_list = p; - D(bug("ether_attach_ph: noErr\n")); - return noErr; - } -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - D(bug("ether_detach_ph type=%08lx\n",(int)type)); - - NetProtocol *p = find_protocol(type); - if (p != NULL) { - NetProtocol *previous = 0; - NetProtocol *q = prot_list; - while(q) { - if (q == p) { - if(previous) { - previous->next = q->next; - } else { - prot_list = q->next; - } - delete p; - return noErr; - } - previous = q; - q = q->next; - } - } - return lapProtErr; -} - -#if MONITOR -static void dump_packet( uint8 *packet, int length ) -{ - char buf[1000], sm[10]; - - *buf = 0; - - if(length > 256) length = 256; - - for (int i=0; inext = 0; - if(send_queue) { - LPPACKET p = send_queue; - // The queue is short. It would be larger overhead to double-link it. - while(p->next) p = p->next; - p->next = Packet; - } else { - send_queue = Packet; - } - LeaveCriticalSection( &send_csection ); -} - -static LPPACKET get_send_head( void ) -{ - LPPACKET Packet = 0; - - EnterCriticalSection( &send_csection ); - if(send_queue) { - Packet = send_queue; - send_queue = send_queue->next; - } - LeaveCriticalSection( &send_csection ); - - return Packet; -} - -static int get_write_packet_pool_sz( void ) -{ - LPPACKET t = write_packet_pool; - int sz = 0; - - while(t) { - t = t->next; - sz++; - } - return(sz); -} - -static void free_write_packets( void ) -{ - LPPACKET next; - int i = 0; - while(write_packet_pool) { - next = write_packet_pool->next; - D(bug("Freeing write packet %ld\n",++i)); - PacketFreePacket(write_packet_pool); - write_packet_pool = next; - } -} - -void recycle_write_packet( LPPACKET Packet ) -{ - EnterCriticalSection( &wpool_csection ); - Packet->next = write_packet_pool; - write_packet_pool = Packet; - D(bug("Pool size after recycling = %ld\n",get_write_packet_pool_sz())); - LeaveCriticalSection( &wpool_csection ); -} - -static LPPACKET get_write_packet( UINT len ) -{ - LPPACKET Packet = 0; - - EnterCriticalSection( &wpool_csection ); - if(write_packet_pool) { - Packet = write_packet_pool; - write_packet_pool = write_packet_pool->next; - Packet->OverLapped.Offset = 0; - Packet->OverLapped.OffsetHigh = 0; - Packet->Length = len; - Packet->BytesReceived = 0; - Packet->bIoComplete = FALSE; - Packet->free = TRUE; - Packet->next = 0; - // actually an auto-reset event. - if(Packet->OverLapped.hEvent) ResetEvent(Packet->OverLapped.hEvent); - } else { - Packet = PacketAllocatePacket(fd,len); - } - - D(bug("Pool size after get wr packet = %ld\n",get_write_packet_pool_sz())); - - LeaveCriticalSection( &wpool_csection ); - - return Packet; -} - -unsigned int WINAPI ether_thread_write_packets(void *arg) -{ - LPPACKET Packet; - - thread_active_1 = true; - - D(bug("ether_thread_write_packets start\n")); - - while(thread_active) { - // must be alertable, otherwise write completion is never called - WaitForSingleObjectEx(int_send_now,INFINITE,TRUE); - while( thread_active && (Packet = get_send_head()) != 0 ) { - switch (net_if_type) { - case NET_IF_ROUTER: - if(router_write_packet((uint8 *)Packet->Buffer, Packet->Length)) { - Packet->bIoComplete = TRUE; - recycle_write_packet(Packet); - } - break; - case NET_IF_FAKE: - Packet->bIoComplete = TRUE; - recycle_write_packet(Packet); - break; - case NET_IF_B2ETHER: - if(!PacketSendPacket( fd, Packet, FALSE, TRUE )) { - // already recycled if async - } - break; - case NET_IF_TAP: - if (!tap_send_packet(fd, Packet, FALSE, TRUE)) { - // already recycled if async - } - break; - case NET_IF_SLIRP: - slirp_input((uint8 *)Packet->Buffer, Packet->Length); - Packet->bIoComplete = TRUE; - recycle_write_packet(Packet); - break; - } - } - } - - D(bug("ether_thread_write_packets exit\n")); - - thread_active_1 = false; - - return(0); -} - -static BOOL write_packet( uint8 *packet, int len ) -{ - LPPACKET Packet; - - D(bug("write_packet\n")); - - Packet = get_write_packet(len); - if(Packet) { - memcpy( Packet->Buffer, packet, len ); - - EnterCriticalSection( &fetch_csection ); - pending_packet_sz[echo_count] = min(sizeof(pending_packet),len); - memcpy( pending_packet[echo_count], packet, pending_packet_sz[echo_count] ); - echo_count = (echo_count+1) & (~(MAX_ECHO-1)); - LeaveCriticalSection( &fetch_csection ); - - insert_send_queue( Packet ); - - ReleaseSemaphore(int_send_now,1,NULL); - return(TRUE); - } else { - return(FALSE); - } -} - -static int16 ether_do_write(uint32 arg) -{ - D(bug("ether_write\n")); - - // Copy packet to buffer - uint8 packet[1514], *p = packet; - int len = ether_arg_to_buffer(arg, p); - - if(len > 1514) { - D(bug("illegal packet length: %d\n",len)); - return eLenErr; - } else { -#if MONITOR - bug("Sending Ethernet packet (%d bytes):\n",(int)len); - dump_packet( packet, len ); -#endif - } - - // Transmit packet - if (!write_packet(packet, len)) { - D(bug("WARNING: couldn't transmit packet\n")); - return excessCollsns; - } else { - // It's up to the protocol drivers to do the error checking. Even if the - // i/o completion routine returns ok, there can be errors, so there is - // no point to wait for write completion and try to make some sense of the - // possible error codes. - return noErr; - } -} - - -static void init_queue(void) -{ - queue_inx = 0; - queue_head = 0; - - for( int i=0; i 0) { - D(bug("ethernet queue full, packet dropped\n")); - } else { - if(sz > 1514) sz = 1514; - queue[queue_inx].sz = sz; - memcpy( queue[queue_inx].buf, buf, sz ); - queue_inx++; - if(queue_inx >= MAX_QUEUE_ITEMS) queue_inx = 0; - if(wait_request) { - wait_request = false; - ReleaseSemaphore(int_sig,1,NULL); - } - } - LeaveCriticalSection( &queue_csection ); -} - -static int dequeue_packet( uint8 *buf ) -{ - int sz; - - if(!thread_active) return(0); - - EnterCriticalSection( &queue_csection ); - sz = queue[queue_head].sz; - if(sz > 0) { - memcpy( buf, queue[queue_head].buf, sz ); - queue[queue_head].sz = 0; - queue_head++; - if(queue_head >= MAX_QUEUE_ITEMS) queue_head = 0; - } - LeaveCriticalSection( &queue_csection ); - return(sz); -} - -static void trigger_queue(void) -{ - EnterCriticalSection( &queue_csection ); - if( queue[queue_head].sz > 0 ) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - // of course can't wait here. - } - LeaveCriticalSection( &queue_csection ); -} - -static bool set_wait_request(void) -{ - bool result; - EnterCriticalSection( &queue_csection ); - if(queue[queue_head].sz) { - result = true; - } else { - result = false; - wait_request = true; - } - LeaveCriticalSection( &queue_csection ); - return(result); -} - - -/* - * TAP-Win32 glue - */ - -static LPADAPTER tap_open_adapter(LPCTSTR dev_name) -{ - fd = (LPADAPTER)GlobalAllocPtr(GMEM_MOVEABLE | GMEM_ZEROINIT, sizeof(*fd)); - if (fd == NULL) - return NULL; - - TCHAR dev_path[MAX_PATH]; - _sntprintf(dev_path, lengthof(dev_path), - TEXT("\\\\.\\Global\\%s.tap"), dev_name); - - HANDLE handle = CreateFile( - dev_path, - GENERIC_READ | GENERIC_WRITE, - 0, - NULL, - OPEN_EXISTING, - FILE_ATTRIBUTE_SYSTEM | FILE_FLAG_OVERLAPPED, - NULL); - if (handle == NULL || handle == INVALID_HANDLE_VALUE) - return NULL; - - fd->hFile = handle; - return fd; -} - -static void tap_close_adapter(LPADAPTER fd) -{ - if (fd) { - if (fd->hFile) { - tap_set_status(fd, false); - CloseHandle(fd->hFile); - } - GlobalFreePtr(fd); - } -} - -static bool tap_check_version(LPADAPTER fd) -{ - ULONG len; - ULONG info[3] = { 0, }; - - if (!DeviceIoControl(fd->hFile, TAP_IOCTL_GET_VERSION, - &info, sizeof(info), - &info, sizeof(info), &len, NULL) - && !DeviceIoControl(fd->hFile, OLD_TAP_IOCTL_GET_VERSION, - &info, sizeof(info), - &info, sizeof(info), &len, NULL)) - return false; - - if (info[0] > TAP_VERSION_MIN_MAJOR) - return true; - if (info[0] == TAP_VERSION_MIN_MAJOR && info[1] >= TAP_VERSION_MIN_MINOR) - return true; - - return false; -} - -static bool tap_set_status(LPADAPTER fd, ULONG status) -{ - DWORD len = 0; - return DeviceIoControl(fd->hFile, TAP_IOCTL_SET_MEDIA_STATUS, - &status, sizeof (status), - &status, sizeof (status), &len, NULL) != FALSE; -} - -static bool tap_get_mac(LPADAPTER fd, LPBYTE addr) -{ - DWORD len = 0; - return DeviceIoControl(fd->hFile, TAP_IOCTL_GET_MAC, - addr, 6, - addr, 6, &len, NULL) != FALSE; -} - -static VOID CALLBACK tap_write_completion( - DWORD dwErrorCode, - DWORD dwNumberOfBytesTransfered, - LPOVERLAPPED lpOverLapped - ) -{ - LPPACKET lpPacket = CONTAINING_RECORD(lpOverLapped, PACKET, OverLapped); - - lpPacket->bIoComplete = TRUE; - recycle_write_packet(lpPacket); -} - -static bool tap_send_packet( - LPADAPTER fd, - LPPACKET lpPacket, - BOOLEAN Sync, - BOOLEAN RecyclingAllowed) -{ - BOOLEAN Result; - - lpPacket->OverLapped.Offset = 0; - lpPacket->OverLapped.OffsetHigh = 0; - lpPacket->bIoComplete = FALSE; - - if (Sync) { - Result = WriteFile(fd->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->BytesReceived, - &lpPacket->OverLapped); - if (Result) { - GetOverlappedResult(fd->hFile, - &lpPacket->OverLapped, - &lpPacket->BytesReceived, - TRUE); - } - lpPacket->bIoComplete = TRUE; - if (RecyclingAllowed) - PacketFreePacket(lpPacket); - } - else { - Result = WriteFileEx(fd->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->OverLapped, - tap_write_completion); - - if (!Result && RecyclingAllowed) - recycle_write_packet(lpPacket); - } - - return Result != FALSE; -} - -static bool tap_receive_packet(LPADAPTER fd, LPPACKET lpPacket, BOOLEAN Sync) -{ - BOOLEAN Result; - - lpPacket->OverLapped.Offset = 0; - lpPacket->OverLapped.OffsetHigh = 0; - lpPacket->bIoComplete = FALSE; - - if (Sync) { - Result = ReadFile(fd->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->BytesReceived, - &lpPacket->OverLapped); - if (Result) { - Result = GetOverlappedResult(fd->hFile, - &lpPacket->OverLapped, - &lpPacket->BytesReceived, - TRUE); - if (Result) - lpPacket->bIoComplete = TRUE; - else - lpPacket->free = TRUE; - } - } - else { - Result = ReadFileEx(fd->hFile, - lpPacket->Buffer, - lpPacket->Length, - &lpPacket->OverLapped, - packet_read_completion); - - if (!Result) - lpPacket->BytesReceived = 0; - } - - return Result != FALSE; -} - - -/* - * SLIRP output buffer glue - */ - -int slirp_can_output(void) -{ - return 1; -} - -void slirp_output(const uint8 *packet, int len) -{ - enqueue_packet(packet, len); -} - -unsigned int WINAPI slirp_receive_func(void *arg) -{ - D(bug("slirp_receive_func\n")); - thread_active_2 = true; - - while (thread_active) { - // Wait for packets to arrive - fd_set rfds, wfds, xfds; - int nfds, ret, timeout; - - // ... in the output queue - nfds = -1; - FD_ZERO(&rfds); - FD_ZERO(&wfds); - FD_ZERO(&xfds); - timeout = slirp_select_fill(&nfds, &rfds, &wfds, &xfds); -#if ! USE_SLIRP_TIMEOUT - timeout = 10000; -#endif - if (nfds < 0) { - /* Windows does not honour the timeout if there is not - descriptor to wait for */ - Delay_usec(timeout); - ret = 0; - } - else { - struct timeval tv; - tv.tv_sec = 0; - tv.tv_usec = timeout; - ret = select(0, &rfds, &wfds, &xfds, &tv); - } - if (ret >= 0) - slirp_select_poll(&rfds, &wfds, &xfds); - } - - D(bug("slirp_receive_func exit\n")); - thread_active_2 = false; - return 0; -} - - -/* - * Packet reception threads - */ - -VOID CALLBACK packet_read_completion( - DWORD dwErrorCode, - DWORD dwNumberOfBytesTransfered, - LPOVERLAPPED lpOverlapped - ) -{ - EnterCriticalSection( &fetch_csection ); - - LPPACKET lpPacket = CONTAINING_RECORD(lpOverlapped,PACKET,OverLapped); - - D(bug("packet_read_completion bytes=%d, error code=%d\n",dwNumberOfBytesTransfered,dwErrorCode)); - - if(thread_active && !dwErrorCode) { - int count = min(dwNumberOfBytesTransfered,1514); - if(count) { - int j = echo_count; - for(int i=MAX_ECHO; i; i--) { - j--; - if(j < 0) j = MAX_ECHO-1; - if(count == pending_packet_sz[j] && - memcmp(pending_packet[j],lpPacket->Buffer,count) == 0) - { - D(bug("packet_read_completion discarding own packet.\n")); - dwNumberOfBytesTransfered = 0; - - j = (j+1) & (~(MAX_ECHO-1)); - if(j != echo_count) { - D(bug("Wow, this fix made some good after all...\n")); - } - - break; - } - } - // XXX drop packets that are not for us - if (net_if_type == NET_IF_TAP) { - if (memcmp((LPBYTE)lpPacket->Buffer, ether_addr, 6) != 0) - dwNumberOfBytesTransfered = 0; - } - if(dwNumberOfBytesTransfered) { - if(net_if_type != NET_IF_ROUTER || !router_read_packet((uint8 *)lpPacket->Buffer, dwNumberOfBytesTransfered)) { - enqueue_packet( (LPBYTE)lpPacket->Buffer, dwNumberOfBytesTransfered ); - } - } - } - } - - // actually an auto-reset event. - if(lpPacket->OverLapped.hEvent) ResetEvent(lpPacket->OverLapped.hEvent); - - lpPacket->free = TRUE; - lpPacket->bIoComplete = TRUE; - - if(wait_request2) { - wait_request2 = false; - ReleaseSemaphore(int_sig2,1,NULL); - } - - LeaveCriticalSection( &fetch_csection ); -} - -static BOOL has_no_completed_io(void) -{ - BOOL result = TRUE; - - EnterCriticalSection( &fetch_csection ); - - for( int i=0; ibIoComplete) { - result = FALSE; - break; - } - } - if(result) wait_request2 = true; - - LeaveCriticalSection( &fetch_csection ); - return(result); -} - -static bool allocate_read_packets(void) -{ - for( int i=0; ifree) { - packets[i]->free = FALSE; - BOOLEAN Result; - switch (net_if_type) { - case NET_IF_B2ETHER: - Result = PacketReceivePacket(fd, packets[i], FALSE); - break; - case NET_IF_TAP: - Result = tap_receive_packet(fd, packets[i], FALSE); - break; - } - if (Result) { - if(packets[i]->bIoComplete) { - D(bug("Early io completion...\n")); - packet_read_completion( - ERROR_SUCCESS, - packets[i]->BytesReceived, - &packets[i]->OverLapped - ); - } - } else { - packets[i]->free = TRUE; - } - } - } - } - - if(thread_active && has_no_completed_io()) { - D(bug("Waiting for int_sig2\n")); - // "problem": awakens twice in a row. Fix if you increase the pool size. - WaitForSingleObjectEx(int_sig2,INFINITE,TRUE); - } - } - - D(bug("ether_thread_get_packets_nt exit\n")); - - thread_active_2 = false; - - return 0; -} - -unsigned int WINAPI ether_thread_feed_int(void *arg) -{ - bool looping; - - thread_active_3 = true; - - D(bug("ether_thread_feed_int start\n")); - - while(thread_active) { - D(bug("Waiting for int_sig\n")); - WaitForSingleObject(int_sig,INFINITE); - // Looping this way to avoid a race condition. - D(bug("Triggering\n")); - looping = true; - while(thread_active && looping) { - trigger_queue(); - // Wait for interrupt acknowledge by EtherInterrupt() - WaitForSingleObject(int_ack,INFINITE); - if(thread_active) looping = set_wait_request(); - } - D(bug("Queue empty.\n")); - } - - D(bug("ether_thread_feed_int exit\n")); - - thread_active_3 = false; - - return 0; -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -static void ether_do_interrupt(void) -{ - // Call protocol handler for received packets - EthernetPacket ether_packet; - uint32 packet = ether_packet.addr(); - ssize_t length; - for (;;) { - - // Read packet from Ethernet device - length = dequeue_packet(Mac2HostAddr(packet)); - if (length < 14) - break; - -#if MONITOR - bug("Receiving Ethernet packet (%d bytes):\n",(int)length); - dump_packet( Mac2HostAddr(packet), length ); -#endif - - // Dispatch packet - ether_dispatch_packet(packet, length); - } -} - -#if DEBUG -#pragma optimize("",on) -#endif diff --git a/BasiliskII/src/Windows/ether_windows.h b/BasiliskII/src/Windows/ether_windows.h deleted file mode 100755 index aed670403..000000000 --- a/BasiliskII/src/Windows/ether_windows.h +++ /dev/null @@ -1,10 +0,0 @@ -#ifndef _ETHER_WINDOWS_H_ -#define _ETHER_WINDOWS_H_ - -void enqueue_packet( const uint8 *buf, int sz ); - -#ifdef SHEEPSHAVER -extern uint8 ether_addr[6]; -#endif - -#endif // _ETHER_WINDOWS_H_ diff --git a/BasiliskII/src/Windows/extfs_windows.cpp b/BasiliskII/src/Windows/extfs_windows.cpp deleted file mode 100755 index f2b8a3721..000000000 --- a/BasiliskII/src/Windows/extfs_windows.cpp +++ /dev/null @@ -1,405 +0,0 @@ -/* - * extfs_windows.cpp - MacOS file system for access native file system access, Windows specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "main.h" -#include "extfs.h" -#include "extfs_defs.h" -#include "posix_emu.h" - -#include -#include -#include -#include -#include - - -#define DEBUG 0 -#include "debug.h" - - -// Constants -#define HOST_DIRSEP_CHAR '\\' -#define HOST_DIRSEP_STR "\\" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - - -/* - * Initialization - */ - -void extfs_init(void) -{ - init_posix_emu(); -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ - final_posix_emu(); -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - int l = strlen(path); - if (l < MAX_PATH_LENGTH-1 && path[l-1] != HOST_DIRSEP_CHAR) { - path[l] = HOST_DIRSEP_CHAR; - path[l+1] = 0; - } - strncat(path, component, MAX_PATH_LENGTH-1); -} - - -/* - * Finder info and resource forks are kept in helper files - * - * Finder info: - * /path/.finf/file - * Resource fork: - * /path/.rsrc/file - * - * The .finf files store a FInfo/DInfo, followed by a FXInfo/DXInfo - * (16+16 bytes) - */ - -static void make_helper_path(const char *src, char *dest, const char *add, bool only_dir = false) -{ - dest[0] = 0; - - // Get pointer to last component of path - const char *last_part = strrchr(src, HOST_DIRSEP_CHAR); - if (last_part) - last_part++; - else - last_part = src; - - // Copy everything before - strncpy(dest, src, last_part-src); - dest[last_part-src] = 0; - - // Add additional component - strncat(dest, add, MAX_PATH_LENGTH-1); - - // Add last component - if (!only_dir) - strncat(dest, last_part, MAX_PATH_LENGTH-1); -} - -static int create_helper_dir(const char *path, const char *add) -{ - char helper_dir[MAX_PATH_LENGTH]; - make_helper_path(path, helper_dir, add, true); - if (helper_dir[strlen(helper_dir) - 1] == HOST_DIRSEP_CHAR) // Remove trailing "\" - helper_dir[strlen(helper_dir) - 1] = 0; - return mkdir(helper_dir, 0777); -} - -static int open_helper(const char *path, const char *add, int flag) -{ - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, add); - - switch (flag & (_O_RDONLY | _O_WRONLY | _O_RDWR)) { - case _O_WRONLY: - case _O_RDWR: - flag |= O_CREAT; - break; - } - - int fd = open(helper_path, flag, 0666); - if (fd < 0) { - if (/*errno == ENOENT &&*/ (flag & O_CREAT)) { - // One path component was missing, probably the helper - // directory. Try to create it and re-open the file. - int ret = create_helper_dir(path, add); - if (ret < 0) - return ret; - fd = open(helper_path, flag, 0666); - } - } - return fd; -} - -static int open_finf(const char *path, int flag) -{ - return open_helper(path, ".finf" HOST_DIRSEP_STR, flag); -} - -static int open_rsrc(const char *path, int flag) -{ - return open_helper(path, ".rsrc" HOST_DIRSEP_STR, flag); -} - - -/* - * Get/set finder info for file/directory specified by full path - */ - -struct ext2type { - const char *ext; - uint32 type; - uint32 creator; -}; - -static const ext2type e2t_translation[] = { - {".Z", FOURCC('Z','I','V','M'), FOURCC('L','Z','I','V')}, - {".gz", FOURCC('G','z','i','p'), FOURCC('G','z','i','p')}, - {".hqx", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".bin", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".pdf", FOURCC('P','D','F',' '), FOURCC('C','A','R','O')}, - {".ps", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".sit", FOURCC('S','I','T','!'), FOURCC('S','I','T','x')}, - {".tar", FOURCC('T','A','R','F'), FOURCC('T','A','R',' ')}, - {".uu", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".uue", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".zip", FOURCC('Z','I','P',' '), FOURCC('Z','I','P',' ')}, - {".8svx", FOURCC('8','S','V','X'), FOURCC('S','N','D','M')}, - {".aifc", FOURCC('A','I','F','C'), FOURCC('T','V','O','D')}, - {".aiff", FOURCC('A','I','F','F'), FOURCC('T','V','O','D')}, - {".au", FOURCC('U','L','A','W'), FOURCC('T','V','O','D')}, - {".mid", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".midi", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".mp2", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".mp3", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".wav", FOURCC('W','A','V','E'), FOURCC('T','V','O','D')}, - {".bmp", FOURCC('B','M','P','f'), FOURCC('o','g','l','e')}, - {".gif", FOURCC('G','I','F','f'), FOURCC('o','g','l','e')}, - {".lbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".ilbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".jpg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".jpeg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".pict", FOURCC('P','I','C','T'), FOURCC('o','g','l','e')}, - {".png", FOURCC('P','N','G','f'), FOURCC('o','g','l','e')}, - {".sgi", FOURCC('.','S','G','I'), FOURCC('o','g','l','e')}, - {".tga", FOURCC('T','P','I','C'), FOURCC('o','g','l','e')}, - {".tif", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".tiff", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".htm", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".html", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".txt", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".rtf", FOURCC('T','E','X','T'), FOURCC('M','S','W','D')}, - {".c", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".C", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cc", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".h", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hh", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".s", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".S", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".i", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".mpg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mpeg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mov", FOURCC('M','o','o','V'), FOURCC('T','V','O','D')}, - {".fli", FOURCC('F','L','I',' '), FOURCC('T','V','O','D')}, - {".avi", FOURCC('V','f','W',' '), FOURCC('T','V','O','D')}, - {".qxd", FOURCC('X','D','O','C'), FOURCC('X','P','R','3')}, - {".hfv", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".dsk", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".img", FOURCC('r','o','h','d'), FOURCC('d','d','s','k')}, - {NULL, 0, 0} // End marker -}; - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Read Finder info file - int fd = open_finf(path, O_RDONLY); - if (fd >= 0) { - ssize_t actual = read(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - actual += read(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); - if (actual >= SIZEOF_FInfo) - return; - } - - // No Finder info file, translate file name extension to MacOS type/creator - if (!is_dir) { - int path_len = strlen(path); - for (int i=0; e2t_translation[i].ext; i++) { - int ext_len = strlen(e2t_translation[i].ext); - if (path_len < ext_len) - continue; - if (!strcmp(path + path_len - ext_len, e2t_translation[i].ext)) { - WriteMacInt32(finfo + fdType, e2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, e2t_translation[i].creator); - break; - } - } - } -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Open Finder info file - int fd = open_finf(path, O_RDWR); - if (fd < 0) - return; - - // Write file - write(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - write(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open resource file - int fd = open_rsrc(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size - off_t size = lseek(fd, 0, SEEK_END); - - // Close file and return size - close(fd); - return size < 0 ? 0 : size; -} - -int open_rfork(const char *path, int flag) -{ - return open_rsrc(path, flag); -} - -void close_rfork(const char *path, int fd) -{ - if (fd >= 0) - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - return read(fd, buffer, length); -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - return write(fd, buffer, length); -} - - -/* - * Remove file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - // Remove helpers first, don't complain if this fails - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, ".finf" HOST_DIRSEP_STR, false); - remove(helper_path); - make_helper_path(path, helper_path, ".rsrc" HOST_DIRSEP_STR, false); - remove(helper_path); - - // Now remove file or directory (and helper directories in the directory) - if (remove(path) < 0) { - if (errno == EISDIR || errno == ENOTEMPTY) { - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".finf"); - rmdir(helper_path); - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".rsrc"); - rmdir(helper_path); - return rmdir(path) == 0; - } else - return false; - } - return true; -} - - -/* - * Rename/move file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - // Rename helpers first, don't complain if this fails - char old_helper_path[MAX_PATH_LENGTH], new_helper_path[MAX_PATH_LENGTH]; - make_helper_path(old_path, old_helper_path, ".finf" HOST_DIRSEP_STR, false); - make_helper_path(new_path, new_helper_path, ".finf" HOST_DIRSEP_STR, false); - create_helper_dir(new_path, ".finf" HOST_DIRSEP_STR); - rename(old_helper_path, new_helper_path); - make_helper_path(old_path, old_helper_path, ".rsrc" HOST_DIRSEP_STR, false); - make_helper_path(new_path, new_helper_path, ".rsrc" HOST_DIRSEP_STR, false); - create_helper_dir(new_path, ".rsrc" HOST_DIRSEP_STR); - rename(old_helper_path, new_helper_path); - - // Now rename file - return rename(old_path, new_path) == 0; -} - - -// Convert from the host OS filename encoding to MacRoman -const char *host_encoding_to_macroman(const char *filename) -{ - return filename; -} - -// Convert from MacRoman to host OS filename encoding -const char *macroman_to_host_encoding(const char *filename) -{ - return filename; -} - diff --git a/BasiliskII/src/Windows/gencomp.vcxproj b/BasiliskII/src/Windows/gencomp.vcxproj deleted file mode 100644 index b2c927015..000000000 --- a/BasiliskII/src/Windows/gencomp.vcxproj +++ /dev/null @@ -1,182 +0,0 @@ - - - - - Debug - Win32 - - - Debug - x64 - - - Release - Win32 - - - Release - x64 - - - - {95933FE9-C27C-41F0-B4AF-EAAADE94FD04} - Win32Proj - gencomp - 8.1 - - - - Application - true - v140 - Unicode - - - Application - true - v140 - Unicode - - - Application - false - v140 - true - Unicode - - - Application - false - v140 - true - Unicode - - - - - - - - - - - - - - - - - - - - - true - $(Configuration)\$(ProjectName)\ - - - true - - - false - $(Configuration)\$(ProjectName)\ - - - false - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - - - - - - - - - Document - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - Generating cpudefs.cpp... - Generating cpudefs.cpp... - Generating cpudefs.cpp... - Generating cpudefs.cpp... - ..\uae_cpu\cpudefs.cpp - ..\uae_cpu\cpudefs.cpp - ..\uae_cpu\cpudefs.cpp - ..\uae_cpu\cpudefs.cpp - $(OutDir)build68k.exe - $(OutDir)build68k.exe - $(OutDir)build68k.exe - $(OutDir)build68k.exe - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/gencomp.vcxproj.filters b/BasiliskII/src/Windows/gencomp.vcxproj.filters deleted file mode 100644 index 861ff2a33..000000000 --- a/BasiliskII/src/Windows/gencomp.vcxproj.filters +++ /dev/null @@ -1,36 +0,0 @@ - - - - - {4FC737F1-C7A5-4376-A066-2A32D752A2FF} - cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx - - - {93995380-89BD-4b04-88EB-625FBE52EBFB} - h;hh;hpp;hxx;hm;inl;inc;xsd - - - {67DA6AB6-F800-4c08-8B7A-83BB121AAD01} - rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms - - - - - Source Files - - - Source Files - - - Source Files - - - - - Header Files - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/gencpu.vcxproj b/BasiliskII/src/Windows/gencpu.vcxproj deleted file mode 100644 index c688794b9..000000000 --- a/BasiliskII/src/Windows/gencpu.vcxproj +++ /dev/null @@ -1,182 +0,0 @@ - - - - - Debug - Win32 - - - Debug - x64 - - - Release - Win32 - - - Release - x64 - - - - {1A9EA738-8DA7-422F-9E0D-BE92893C0E48} - Win32Proj - gencpu - 8.1 - - - - Application - true - v140 - Unicode - - - Application - true - v140 - Unicode - - - Application - false - v140 - true - Unicode - - - Application - false - v140 - true - Unicode - - - - - - - - - - - - - - - - - - - - - true - $(Configuration)\$(ProjectName)\ - - - true - - - false - $(Configuration)\$(ProjectName)\ - - - false - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - - - Level3 - Disabled - _CRT_SECURE_NO_WARNINGS;WIN32;_DEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - Level3 - - - MaxSpeed - true - true - _CRT_SECURE_NO_WARNINGS;WIN32;NDEBUG;_CONSOLE;%(PreprocessorDefinitions) - . - - - Console - true - true - true - - - - - - - - - - - - - Document - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - Generating cpudefs.cpp... - Generating cpudefs.cpp... - ..\uae_cpu\cpudefs.cpp - ..\uae_cpu\cpudefs.cpp - $(OutDir)build68k.exe - $(OutDir)build68k.exe - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - "$(OutDir)build68k" "%(Identity)" > ..\uae_cpu\cpudefs.cpp - Generating cpudefs.cpp... - Generating cpudefs.cpp... - ..\uae_cpu\cpudefs.cpp - ..\uae_cpu\cpudefs.cpp - $(OutDir)build68k.exe - $(OutDir)build68k.exe - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/gencpu.vcxproj.filters b/BasiliskII/src/Windows/gencpu.vcxproj.filters deleted file mode 100644 index d8db474e1..000000000 --- a/BasiliskII/src/Windows/gencpu.vcxproj.filters +++ /dev/null @@ -1,36 +0,0 @@ - - - - - {4FC737F1-C7A5-4376-A066-2A32D752A2FF} - cpp;c;cc;cxx;def;odl;idl;hpj;bat;asm;asmx - - - {93995380-89BD-4b04-88EB-625FBE52EBFB} - h;hh;hpp;hxx;hm;inl;inc;xsd - - - {67DA6AB6-F800-4c08-8B7A-83BB121AAD01} - rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe;resx;tiff;tif;png;wav;mfcribbon-ms - - - - - Source Files - - - Source Files - - - Source Files - - - - - Header Files - - - - - - \ No newline at end of file diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp deleted file mode 100755 index 7d555c98c..000000000 --- a/BasiliskII/src/Windows/main_windows.cpp +++ /dev/null @@ -1,703 +0,0 @@ -/* - * main_windows.cpp - Startup code for Windows - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include - -#include -#include -#include - -#include -typedef std::basic_string tstring; - -#include "cpu_emulation.h" -#include "sys.h" -#include "rom_patches.h" -#include "xpram.h" -#include "timer.h" -#include "video.h" -#include "cdrom.h" -#include "emul_op.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "macos_util.h" -#include "user_strings.h" -#include "version.h" -#include "main.h" -#include "vm_alloc.h" -#include "sigsegv.h" -#include "util_windows.h" - -#if USE_JIT -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp -#endif - -#ifdef ENABLE_MON -# include "mon.h" -#endif - -#define DEBUG 0 -#include "debug.h" - - -// Constants -const TCHAR ROM_FILE_NAME[] = TEXT("ROM"); -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables -HANDLE emul_thread = NULL; // Handle of MacOS emulation thread (main thread) - -static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes -static bool xpram_thread_active = false; // Flag: XPRAM watchdog installed -static volatile bool xpram_thread_cancel = false; // Flag: Cancel XPRAM thread -static SDL_Thread *xpram_thread = NULL; // XPRAM watchdog - -static bool tick_thread_active = false; // Flag: 60Hz thread installed -static volatile bool tick_thread_cancel = false; // Flag: Cancel 60Hz thread -static SDL_Thread *tick_thread; // 60Hz thread - -static SDL_mutex *intflag_lock = NULL; // Mutex to protect InterruptFlags -#define LOCK_INTFLAGS SDL_LockMutex(intflag_lock) -#define UNLOCK_INTFLAGS SDL_UnlockMutex(intflag_lock) - -#if USE_SCRATCHMEM_SUBTERFUGE -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -#endif - -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif - - -// Prototypes -static int xpram_func(void *arg); -static int tick_func(void *arg); -static void one_tick(...); - - -/* - * Ersatz functions - */ - -extern "C" { - -#ifndef HAVE_STRDUP -char *strdup(const char *s) -{ - char *n = (char *)malloc(strlen(s) + 1); - strcpy(n, s); - return n; -} -#endif - -} - - -/* - * Map memory that can be accessed from the Mac side - */ - -void *vm_acquire_mac(size_t size) -{ - return vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - - -/* - * SIGSEGV handler - */ - -static sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) -{ - const uintptr fault_address = (uintptr)sigsegv_get_fault_address(sip); -#if ENABLE_VOSF - // Handle screen fault - extern bool Screen_fault_handler(sigsegv_info_t *sip); - if (Screen_fault_handler(sip)) - return SIGSEGV_RETURN_SUCCESS; -#endif - -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - // Ignore writes to ROM - if (((uintptr)fault_address - (uintptr)ROMBaseHost) < ROMSize) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // Ignore all other faults, if requested - if (PrefsFindBool("ignoresegv")) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; -#endif - - return SIGSEGV_RETURN_FAILURE; -} - -/* - * Dump state when everything went wrong after a SEGV - */ - -static void sigsegv_dump_state(sigsegv_info_t *sip) -{ - const sigsegv_address_t fault_address = sigsegv_get_fault_address(sip); - const sigsegv_address_t fault_instruction = sigsegv_get_fault_instruction_address(sip); - fprintf(stderr, "Caught SIGSEGV at address %p", fault_address); - if (fault_instruction != SIGSEGV_INVALID_ADDRESS) - fprintf(stderr, " [IP=%p]", fault_instruction); - fprintf(stderr, "\n"); - uaecptr nextpc; - extern void m68k_dumpstate(uaecptr *nextpc); - m68k_dumpstate(&nextpc); -#if USE_JIT && JIT_DEBUG - extern void compiler_dumpstate(void); - compiler_dumpstate(); -#endif - VideoQuitFullScreen(); -#ifdef ENABLE_MON - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); - QuitEmulator(); -#endif -} - - -/* - * Main program - */ - -static void usage(const char *prg_name) -{ - printf( - "Usage: %s [OPTION...]\n" - "\nUnix options:\n" - " --config FILE\n read/write configuration from/to FILE\n" - " --display STRING\n X display to use\n" - " --break ADDRESS\n set ROM breakpoint\n" - " --rominfo\n dump ROM information\n", prg_name - ); - LoadPrefs(NULL); // read the prefs file so PrefsPrintUsage() will print the correct default values - PrefsPrintUsage(); - exit(0); -} - -int main(int argc, char **argv) -{ - char str[256]; - bool cd_boot = false; - - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - srand(unsigned(time(NULL))); - tzset(); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Parse command line arguments - for (int i=1; i i) { - k -= i; - for (int j=i+k; jm); -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ - if (mutex) - SDL_UnlockMutex(mutex->m); -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - LOCK_INTFLAGS; - InterruptFlags |= flag; - UNLOCK_INTFLAGS; -} - -void ClearInterruptFlag(uint32 flag) -{ - LOCK_INTFLAGS; - InterruptFlags &= ~flag; - UNLOCK_INTFLAGS; -} - - -/* - * XPRAM watchdog thread (saves XPRAM every minute) - */ - -static void xpram_watchdog(void) -{ - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } -} - -static int xpram_func(void *arg) -{ - while (!xpram_thread_cancel) { - for (int i=0; i<60 && !xpram_thread_cancel; i++) - Delay_usec(999999); // Only wait 1 second so we quit promptly when xpram_thread_cancel becomes true - xpram_watchdog(); - } - return 0; -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -static void one_second(void) -{ - // Pseudo Mac 1Hz interrupt, update local time - WriteMacInt32(0x20c, TimerDateTime()); - - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); -} - -static void one_tick(...) -{ - static int tick_counter = 0; - if (++tick_counter > 60) { - tick_counter = 0; - one_second(); - } - - // Trigger 60Hz interrupt - if (ROMVersion != ROM_VERSION_CLASSIC || HasMacStarted()) { - SetInterruptFlag(INTFLAG_60HZ); - TriggerInterrupt(); - } -} - -static int tick_func(void *arg) -{ - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec(); - while (!tick_thread_cancel) { - one_tick(); - next += 16625; - int64 delay = next - GetTicks_usec(); - if (delay > 0) - Delay_usec(uint32(delay)); - else if (delay < -16625) - next = GetTicks_usec(); - ticks++; - } - uint64 end = GetTicks_usec(); - D(bug("%Ld ticks in %Ld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return 0; -} - - -/* - * Get the main window handle - */ - -#ifdef USE_SDL_VIDEO -#include -HWND GetMainWindowHandle(void) -{ - SDL_SysWMinfo wmInfo; - SDL_VERSION(&wmInfo.version); - return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; -} -#endif - - -/* - * Display alert - */ - -static void display_alert(int title_id, const char *text, int flags) -{ - HWND hMainWnd = GetMainWindowHandle(); - MessageBoxA(hMainWnd, text, GetString(title_id), MB_OK | flags); -} -static void display_alert(int title_id, const wchar_t *text, int flags) -{ - HWND hMainWnd = GetMainWindowHandle(); - MessageBoxW(hMainWnd, text, GetStringW(title_id).get(), MB_OK | flags); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) - return; - - VideoQuitFullScreen(); - display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); -} -void ErrorAlert(const wchar_t *text) -{ - if (PrefsFindBool("nogui")) - return; - - VideoQuitFullScreen(); - display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) - return; - - display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONINFORMATION); -} -void WarningAlert(const wchar_t *text) -{ - if (PrefsFindBool("nogui")) - return; - - display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONINFORMATION); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return false; //!! -} diff --git a/BasiliskII/src/Windows/posix_emu.cpp b/BasiliskII/src/Windows/posix_emu.cpp deleted file mode 100755 index 518a526fc..000000000 --- a/BasiliskII/src/Windows/posix_emu.cpp +++ /dev/null @@ -1,1125 +0,0 @@ -/* - * posix_emu.cpp -- posix and virtual desktop - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -// TODO: UNC names. Customizable "Virtual Desktop" location. - -#include "sysdeps.h" -#define NO_POSIX_API_HOOK -#include "posix_emu.h" -#include "user_strings.h" -#include "util_windows.h" -#include "main.h" -#include "extfs_defs.h" -#include "prefs.h" -#include - - -#define DEBUG_EXTFS 0 - -#if DEBUG_EXTFS - -// This must be always on. -#define DEBUG 1 -#undef OutputDebugString -#define OutputDebugString extfs_log_write -extern void extfs_log_write( char *s ); -#define EXTFS_LOG_FILE_NAME "extfs.log" -#include "debug.h" - -enum { - DB_EXTFS_NONE=0, - DB_EXTFS_NORMAL, - DB_EXTFS_LOUD -}; -static int16 debug_extfs = DB_EXTFS_NONE; -static HANDLE extfs_log_file = INVALID_HANDLE_VALUE; - -static void extfs_log_open( char *path ) -{ - if(debug_extfs == DB_EXTFS_NONE) return; - - DeleteFile( path ); - extfs_log_file = CreateFile( - path, - GENERIC_READ|GENERIC_WRITE, - FILE_SHARE_READ, - NULL, - CREATE_ALWAYS, - // FILE_FLAG_WRITE_THROUGH|FILE_FLAG_NO_BUFFERING, - FILE_FLAG_WRITE_THROUGH, - NULL - ); - if( extfs_log_file == INVALID_HANDLE_VALUE ) { - ErrorAlert( "Could not create the EXTFS log file." ); - } -} - -static void extfs_log_close( void ) -{ - if(debug_extfs == DB_EXTFS_NONE) return; - - if( extfs_log_file != INVALID_HANDLE_VALUE ) { - CloseHandle( extfs_log_file ); - extfs_log_file = INVALID_HANDLE_VALUE; - } -} - -static void extfs_log_write( char *s ) -{ - DWORD bytes_written; - - // should have been checked already. - if(debug_extfs == DB_EXTFS_NONE) return; - - if( extfs_log_file != INVALID_HANDLE_VALUE ) { - - DWORD count = strlen(s); - if (0 == WriteFile(extfs_log_file, s, count, &bytes_written, NULL) || - (int)bytes_written != count) - { - extfs_log_close(); - ErrorAlert( "extfs log file write error (out of disk space?). Log closed." ); - } else { - FlushFileBuffers( extfs_log_file ); - } - } -} -#else - -#define DEBUG 0 -#include "debug.h" - -#endif // DEBUG_EXTFS - -int my_errno = 0; - -#define VIRTUAL_ROOT_ID ((HANDLE)0xFFFFFFFE) - -static LPCTSTR desktop_name = TEXT("Virtual Desktop"); -static const char *custom_icon_name = "Icon\r"; -#define my_computer GetString(STR_EXTFS_VOLUME_NAME) - -static TCHAR lb1[MAX_PATH_LENGTH]; -static TCHAR lb2[MAX_PATH_LENGTH]; - -#define MRP(path) translate(path,lb1) -#define MRP2(path) translate(path,lb2) - -#define DISABLE_ERRORS UINT prevmode = SetErrorMode(SEM_NOOPENFILEERRORBOX|SEM_FAILCRITICALERRORS) -#define RESTORE_ERRORS SetErrorMode(prevmode); - -static TCHAR host_drive_list[512]; -static TCHAR virtual_root[248]; // Not _MAX_PATH - -const uint8 my_comp_icon[2670] = { - 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x09, 0xD8, 0x00, 0x00, 0x08, 0xD8, 0x00, 0x00, 0x00, 0x96, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x02, 0x00, 0x79, 0x79, 0x79, 0x0C, 0x0C, 0x0C, 0x0C, 0x0C, 0xC0, 0xCC, 0xCC, 0xCC, - 0xCC, 0xD7, 0x97, 0x97, 0x97, 0x97, 0x97, 0xC0, 0xC0, 0xC0, 0xC0, 0xCC, 0xCC, 0xCC, 0xCC, 0xCC, - 0xCD, 0xDB, 0xD9, 0x79, 0x79, 0x7E, 0x79, 0x0C, 0xDD, 0xCD, 0xDD, 0xCD, 0xCD, 0xDC, 0xDD, 0xCD, - 0xCC, 0xED, 0xED, 0x97, 0x97, 0x97, 0x97, 0x0C, 0xE7, 0x78, 0x77, 0x97, 0x97, 0x97, 0x97, 0x97, - 0xDC, 0xED, 0xDE, 0x79, 0x79, 0x79, 0x99, 0x0C, 0xD9, 0x7E, 0x5E, 0x65, 0x5E, 0x65, 0xD9, 0x79, - 0xCD, 0xDE, 0xDD, 0x97, 0xE7, 0x9E, 0x77, 0xC0, 0x97, 0x9D, 0xCD, 0xCC, 0xC7, 0xCC, 0xE7, 0x97, - 0xCC, 0xED, 0xEE, 0x79, 0x79, 0x79, 0x7E, 0xCC, 0x57, 0xD5, 0xD7, 0xD5, 0xDD, 0x5D, 0xD9, 0x7E, - 0xCD, 0xDE, 0xDE, 0x79, 0x97, 0x97, 0x99, 0x0C, 0x87, 0xCD, 0x75, 0xC7, 0x5C, 0x7D, 0xD9, 0x79, - 0xCD, 0xDD, 0xED, 0xE7, 0x7E, 0x79, 0x77, 0xCC, 0xE7, 0xB0, 0x00, 0xC0, 0x0C, 0xCD, 0xE7, 0x97, - 0xDC, 0xED, 0xEE, 0x79, 0x97, 0x86, 0x79, 0xC0, 0xE7, 0xD0, 0x2C, 0xC1, 0xC2, 0xCD, 0xD9, 0x79, - 0xCD, 0xDE, 0xDD, 0x97, 0x99, 0x79, 0x97, 0x0C, 0xE7, 0xB0, 0xD0, 0xDC, 0xCC, 0xCD, 0xD6, 0x87, - 0xDD, 0xDE, 0xED, 0x79, 0x77, 0xE7, 0x79, 0x0C, 0x58, 0xDC, 0x0C, 0x0C, 0xCC, 0xCD, 0xE9, 0x79, - 0xCD, 0xDD, 0xD5, 0x99, 0x97, 0x99, 0x79, 0xC0, 0x87, 0xD0, 0xC0, 0xC0, 0xC0, 0xCD, 0xD7, 0xE7, - 0xDD, 0xDE, 0xD7, 0x97, 0x79, 0x77, 0xE7, 0x0C, 0xE7, 0xDD, 0xDD, 0xDD, 0xDD, 0xDD, 0x79, 0x79, - 0xCD, 0xDE, 0xD9, 0x79, 0x97, 0xE9, 0x79, 0x0C, 0x97, 0x79, 0x79, 0x79, 0x79, 0x79, 0x97, 0x97, - 0xDC, 0xED, 0xE7, 0x97, 0x79, 0x97, 0x97, 0x0C, 0xCD, 0xD7, 0xD7, 0xD7, 0xE7, 0xE7, 0x7E, 0x79, - 0xCD, 0xDE, 0x79, 0x79, 0x97, 0x7E, 0x79, 0xC0, 0xCC, 0xCC, 0x0C, 0xCC, 0x0D, 0xCC, 0xDC, 0xDC, - 0xDC, 0xED, 0x97, 0x97, 0x77, 0x99, 0x79, 0xCC, 0xCC, 0xCC, 0xDC, 0xCC, 0xDC, 0xCC, 0xCC, 0x8D, - 0xCD, 0xDE, 0x79, 0x79, 0x96, 0x77, 0x97, 0x97, 0x97, 0x90, 0xCC, 0xCD, 0xCD, 0xDD, 0xDD, 0xCC, - 0xDD, 0xD9, 0x76, 0x87, 0x97, 0x99, 0x7E, 0x7C, 0x0C, 0xCC, 0xDD, 0xDD, 0xED, 0xDE, 0xDD, 0xEE, - 0xDE, 0xD5, 0xBD, 0xDE, 0x79, 0x79, 0x9C, 0xC0, 0xCC, 0xDD, 0xDD, 0xDD, 0xDE, 0xDD, 0xED, 0xDE, - 0xDE, 0xDD, 0xDE, 0xDE, 0x79, 0x79, 0x70, 0xCD, 0xCC, 0xCC, 0xCC, 0xCC, 0xDC, 0xDD, 0xDD, 0xDD, - 0xDD, 0xDD, 0xED, 0xED, 0x97, 0x97, 0x90, 0xCC, 0x8D, 0xCC, 0xDC, 0xCD, 0xCC, 0xCC, 0xCC, 0xCC, - 0xCC, 0xEE, 0xDE, 0xDE, 0x79, 0x7E, 0x70, 0xCC, 0x88, 0xDC, 0xCC, 0xCC, 0xCD, 0xDD, 0xDD, 0xDC, - 0xCD, 0xDD, 0xED, 0xED, 0x97, 0x97, 0xEC, 0xCC, 0xCC, 0xCC, 0xDC, 0xCC, 0xCD, 0xDD, 0xED, 0xDD, - 0xDC, 0xED, 0xED, 0xEE, 0x79, 0x79, 0xDC, 0x0D, 0xCC, 0xDC, 0xCC, 0xCD, 0xCC, 0xCC, 0xCC, 0x0C, - 0xDC, 0xDE, 0xDE, 0xED, 0x97, 0xDC, 0xCC, 0xDC, 0xCD, 0xCC, 0xDC, 0xCD, 0xCC, 0xCC, 0xCD, 0xCC, - 0xCC, 0xED, 0xED, 0x79, 0xDD, 0xC0, 0xCD, 0xCC, 0xDC, 0xCD, 0xCC, 0xDC, 0xCC, 0xDC, 0xDD, 0xCD, - 0xCD, 0xED, 0x97, 0x97, 0xDD, 0xCC, 0xCC, 0x00, 0xC0, 0xDD, 0xCD, 0xCC, 0xCC, 0xCD, 0xD0, 0xDC, - 0xDD, 0xF7, 0x99, 0x79, 0x97, 0x9D, 0xDD, 0xDD, 0xCC, 0xC0, 0xCC, 0x0C, 0xDC, 0xDC, 0xCD, 0xCD, - 0xDF, 0x79, 0x77, 0x97, 0x79, 0x79, 0x79, 0x79, 0xDD, 0xDE, 0xDC, 0xCC, 0xCC, 0xC0, 0xC0, 0xDD, - 0xE9, 0x79, 0x97, 0x99, 0x97, 0xE7, 0xE7, 0x97, 0x97, 0x9D, 0x79, 0xDD, 0xDD, 0xDD, 0xCD, 0xDE, - 0x79, 0x79, 0x7E, 0x77, 0x00, 0x00, 0x04, 0x00, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0xF5, - 0xF5, 0xF5, 0xF5, 0xF5, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, - 0x2B, 0x2B, 0xF9, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0xF6, - 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF7, 0xF7, 0xF7, - 0xF7, 0xF8, 0x81, 0xFA, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, - 0xF7, 0xF8, 0x81, 0x81, 0x81, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xF8, 0xF8, 0x81, 0xFA, 0xFB, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xC2, 0xFB, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xFB, 0xC2, 0xC2, 0xC2, - 0xF7, 0xF8, 0x81, 0x81, 0xFB, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0x2B, - 0xA5, 0xC2, 0xC2, 0xFB, 0x55, 0x55, 0x55, 0x55, 0x55, 0x55, 0x55, 0x55, 0x81, 0xC2, 0xC2, 0xC2, - 0xF7, 0xF8, 0x81, 0x81, 0xFB, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0x2B, - 0xA5, 0xC2, 0xF9, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0xF9, 0xFB, 0xC2, 0xC2, 0xC2, - 0xF7, 0xF8, 0x81, 0x81, 0xFB, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0x7F, 0x7F, 0x7F, 0x7F, 0x7F, 0x7F, 0x7F, 0x7F, 0xF9, 0x81, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0xFA, 0x81, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF5, 0xF5, 0xF5, 0xF6, 0xF6, 0xF6, 0xF6, 0x2B, 0xF9, 0xFB, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0xFB, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF5, 0x0A, 0xF6, 0x2B, 0x0A, 0xF6, 0x0A, 0x2B, 0xF9, 0x81, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF5, 0xF8, 0xF6, 0x56, 0xF7, 0xF7, 0xF8, 0x2B, 0xF9, 0x81, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0xFB, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF5, 0xF6, 0xF6, 0xF6, 0xF6, 0xF6, 0x2B, 0x2B, 0xF9, 0xFB, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0xFA, 0x81, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF6, 0xF6, 0xF5, 0xF6, 0xF6, 0xF6, 0xF6, 0x2B, 0xF9, 0x81, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xF9, 0xC2, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xA5, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0xF7, 0x56, 0xF8, 0x7A, 0x7A, 0x9E, 0x9E, 0x9E, 0x9E, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xF8, 0x56, 0x81, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, - 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF7, 0xF7, 0xF8, 0xF8, - 0xF8, 0x56, 0x81, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF7, 0xF7, - 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0x56, 0xB9, 0xF8, - 0xF8, 0x56, 0x81, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xC2, 0xC2, 0xC2, 0xF6, 0x2B, 0x2B, 0xF7, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0x56, 0xF8, - 0xF8, 0x56, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, - 0xF6, 0xF6, 0x2B, 0xF8, 0x56, 0xFA, 0xF9, 0x81, 0x81, 0x81, 0xFA, 0x81, 0x81, 0x81, 0xFB, 0x81, - 0xFB, 0xFB, 0xFB, 0x81, 0xFA, 0xFA, 0xFA, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xF6, 0xF6, - 0xF6, 0xF7, 0xF8, 0xF9, 0xFA, 0xFA, 0xFA, 0xFA, 0xFA, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0xFB, - 0x81, 0xFB, 0xF9, 0xFA, 0xFA, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, 0xF7, - 0xF8, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF8, 0xF8, 0x56, 0x56, 0xF9, 0xF9, 0xF9, 0xFA, - 0xFA, 0xFA, 0xFA, 0x81, 0x81, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, 0xF7, - 0x93, 0xA0, 0xF7, 0xF7, 0xF8, 0xF7, 0xF7, 0xF8, 0xF7, 0xF7, 0xF7, 0xF7, 0x2B, 0x2B, 0x2B, 0x2B, - 0x2B, 0x2B, 0x81, 0xFB, 0x81, 0xFB, 0xFB, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, 0xF7, - 0xA0, 0xA0, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0x56, 0x56, 0xF9, 0xF9, 0xF9, 0xF8, 0xF7, - 0xF7, 0xF7, 0xFB, 0xFB, 0x81, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF5, 0x2B, 0xF7, - 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF9, 0xF9, 0xFB, 0xFB, 0xFB, 0xF8, 0xF9, - 0xF9, 0xF7, 0x81, 0xFB, 0xFB, 0x81, 0xFB, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xF8, 0x2B, 0x2B, 0x56, - 0x2B, 0x2B, 0xF9, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF8, - 0xF8, 0xF7, 0xFB, 0xFB, 0x81, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xF8, 0xF8, 0xF6, 0xF6, 0xF9, 0xF8, - 0x2B, 0xF9, 0xF8, 0x2B, 0xF9, 0x2B, 0x2B, 0xF9, 0x2B, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, - 0xF7, 0xF7, 0x81, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xF9, 0xF8, 0xF6, 0xF6, 0xF7, 0xF9, 0xF8, 0x2B, - 0xF9, 0xF8, 0xF6, 0xF9, 0xF8, 0xF6, 0xF9, 0xF8, 0xF6, 0x2B, 0xF9, 0x2B, 0xF9, 0x56, 0x2B, 0xF9, - 0x2B, 0xF9, 0xAC, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xFA, 0xF9, 0xF8, 0x2B, 0x2B, 0x2B, 0xF5, 0xF5, - 0xF5, 0xF5, 0xF9, 0xF8, 0xF6, 0xF9, 0xF8, 0xF6, 0x2B, 0xF8, 0x2B, 0xF9, 0x56, 0x2B, 0x56, 0x2B, - 0x56, 0x81, 0xAC, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xFA, 0xFA, 0xFA, 0xF9, 0xF8, - 0xF8, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF5, 0x2B, 0xF9, 0xF6, 0xF9, 0xF8, 0xF7, 0xF9, 0x2B, 0xF9, - 0x81, 0xAC, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xFA, 0xFA, 0xFA, 0xFA, 0xF9, 0xF8, 0x2B, 0x2B, 0x2B, 0x2B, 0x2B, 0xF5, 0xF5, 0xF5, 0x56, 0x81, - 0xAC, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, - 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xFA, 0xF9, 0xFA, 0xFA, 0xF9, 0xF9, 0xF8, 0xF8, 0x81, 0x81, - 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0x00, 0x00, 0x01, 0x00, 0x03, 0xFF, 0xFF, 0xE0, - 0x02, 0x00, 0x00, 0x38, 0x02, 0xFF, 0xFF, 0x3C, 0x02, 0xFF, 0xFF, 0x3C, 0x02, 0xFF, 0xFF, 0x3C, - 0x02, 0xF0, 0x0F, 0x3C, 0x02, 0xFF, 0xFF, 0x3C, 0x02, 0xFF, 0xFF, 0x7C, 0x02, 0xE0, 0x1F, 0x7C, - 0x02, 0xE0, 0x1F, 0x7C, 0x02, 0xE0, 0x1F, 0x7C, 0x02, 0xE0, 0x1F, 0x7C, 0x02, 0xE0, 0x1F, 0x78, - 0x02, 0xFF, 0xFF, 0x78, 0x02, 0xFF, 0xFF, 0x78, 0x02, 0x1F, 0xFF, 0x70, 0x02, 0x00, 0x00, 0x70, - 0x03, 0xFF, 0xFF, 0xF0, 0x00, 0x0F, 0xFF, 0xE0, 0x00, 0xFF, 0xFF, 0xFF, 0x01, 0x1F, 0xFF, 0xFF, - 0x02, 0x00, 0x3F, 0xFF, 0x02, 0x40, 0x00, 0x3F, 0x02, 0xC0, 0x7C, 0x3F, 0x02, 0x00, 0x7D, 0xBF, - 0x0F, 0x20, 0x00, 0x3F, 0x32, 0x49, 0x00, 0x3C, 0xC4, 0x92, 0x2D, 0x70, 0xE0, 0x24, 0x1A, 0xE0, - 0x1F, 0x00, 0xA5, 0xC0, 0x00, 0xFC, 0x03, 0x80, 0x00, 0x03, 0xFF, 0x00, 0x03, 0xFF, 0xFF, 0xE0, - 0x03, 0xFF, 0xFF, 0xF8, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, - 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, - 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xFC, 0x03, 0xFF, 0xFF, 0xF8, - 0x03, 0xFF, 0xFF, 0xF8, 0x03, 0xFF, 0xFF, 0xF8, 0x03, 0xFF, 0xFF, 0xF0, 0x03, 0xFF, 0xFF, 0xF0, - 0x03, 0xFF, 0xFF, 0xF0, 0x00, 0x1F, 0xFF, 0xE0, 0x01, 0xFF, 0xFF, 0xFF, 0x07, 0xFF, 0xFF, 0xFF, - 0x07, 0xFF, 0xFF, 0xFF, 0x07, 0xFF, 0xFF, 0xFF, 0x07, 0xFF, 0xFF, 0xFF, 0x07, 0xFF, 0xFF, 0xFF, - 0x0F, 0xFF, 0xFF, 0xFF, 0x3F, 0xFF, 0xFF, 0xFC, 0xFF, 0xFF, 0xFF, 0xF0, 0xFF, 0xFF, 0xFF, 0xE0, - 0x1F, 0xFF, 0xFF, 0xC0, 0x00, 0xFF, 0xFF, 0x80, 0x00, 0x03, 0xFF, 0x00, 0x00, 0x00, 0x00, 0x40, - 0x1F, 0xFC, 0x10, 0x06, 0x10, 0x06, 0x10, 0x06, 0x10, 0x06, 0x10, 0x06, 0x10, 0x06, 0x10, 0x04, - 0x1F, 0xFC, 0x0F, 0xFE, 0x0F, 0xFF, 0x18, 0x67, 0x34, 0x06, 0x69, 0x64, 0x72, 0xC8, 0x3F, 0xF0, - 0x1F, 0xFC, 0x1F, 0xFE, 0x1F, 0xFE, 0x1F, 0xFE, 0x1F, 0xFE, 0x1F, 0xFE, 0x1F, 0xFE, 0x1F, 0xFC, - 0x1F, 0xFC, 0x07, 0xFF, 0x1F, 0xFF, 0x3F, 0xFF, 0x3F, 0xFF, 0x7F, 0xFE, 0xFF, 0xFC, 0x07, 0xF8, - 0x00, 0x00, 0x00, 0x80, 0x79, 0x7C, 0x0C, 0x0C, 0xCC, 0xCC, 0xCD, 0x97, 0x97, 0x90, 0xE7, 0x97, - 0x97, 0x97, 0xDD, 0xD9, 0x79, 0x7C, 0xE7, 0xD5, 0x5E, 0x58, 0xCE, 0xD7, 0x97, 0x9C, 0xDD, 0x5D, - 0x7D, 0xB7, 0xDD, 0x59, 0x79, 0x7C, 0x9D, 0x10, 0x1D, 0xD9, 0xCE, 0xD7, 0x97, 0x9C, 0xDD, 0x0C, - 0xCC, 0xE7, 0xDD, 0xD9, 0x79, 0x7C, 0xED, 0xDD, 0xDD, 0x79, 0xCE, 0xE7, 0xE7, 0x90, 0xE7, 0x77, - 0x97, 0x97, 0xDD, 0x79, 0x79, 0x7C, 0xCC, 0xDC, 0xCD, 0xC8, 0xDD, 0x97, 0x97, 0x99, 0x7C, 0xDD, - 0xDD, 0xDE, 0xDE, 0xDE, 0x7E, 0x7C, 0xCC, 0xCC, 0xCD, 0xCD, 0xDD, 0xDE, 0x99, 0x0C, 0x8C, 0xCC, - 0xCC, 0xCC, 0xCD, 0xED, 0x77, 0xCC, 0xCC, 0xCD, 0xDD, 0xED, 0xCE, 0xDE, 0x9C, 0xCD, 0xCD, 0xCD, - 0x0D, 0xCC, 0xCE, 0xE7, 0xDC, 0xDC, 0xDC, 0xDC, 0xDC, 0xCC, 0xDE, 0x99, 0x97, 0x97, 0x9D, 0xDD, - 0xDD, 0xDE, 0xE9, 0x77, 0x00, 0x00, 0x01, 0x00, 0xC2, 0xC2, 0xC2, 0xF5, 0xF5, 0xF5, 0xF6, 0xF6, - 0xF6, 0x2B, 0x2B, 0x2B, 0xF7, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xC2, 0xC2, 0xC2, - 0xC2, 0xC2, 0xC2, 0xC2, 0xF8, 0x81, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xC2, 0x81, 0xAA, - 0xAA, 0xAA, 0xFB, 0xC2, 0xF8, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xF9, 0x7F, 0x7F, - 0x7F, 0x56, 0x81, 0xC2, 0xF8, 0x81, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xF9, 0x0A, 0xF6, - 0x0A, 0x56, 0xFB, 0xC2, 0xF8, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xF9, 0xF6, 0xF6, - 0xF6, 0x56, 0x81, 0xC2, 0x56, 0x81, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xF9, 0xF9, 0xF9, - 0xF9, 0xF9, 0xC2, 0xC2, 0xF8, 0x81, 0xFB, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0xA5, 0xC2, 0xC2, 0xC2, - 0xC2, 0xC2, 0xC2, 0xC2, 0x56, 0xFA, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0x2B, 0x2B, 0x2B, 0xF7, 0xF7, - 0xF7, 0xF7, 0xF7, 0xB9, 0x56, 0x81, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF6, 0x56, 0xF9, - 0xFA, 0xFA, 0xFB, 0xFB, 0xFB, 0x81, 0xFA, 0x81, 0xC2, 0xC2, 0xC2, 0xF6, 0xF6, 0xF7, 0x2B, 0x2B, - 0x2B, 0xF8, 0xF8, 0xF8, 0xF9, 0xFA, 0x81, 0xFB, 0xC2, 0xC2, 0xF5, 0xF7, 0x93, 0xF7, 0xF7, 0xF7, - 0xF7, 0x2B, 0x2B, 0x2B, 0x2B, 0xFB, 0x81, 0xFB, 0xC2, 0xC2, 0xF5, 0xF7, 0xF7, 0xF7, 0xF7, 0xF7, - 0xF9, 0xFB, 0xFB, 0xF9, 0xF7, 0xFB, 0x81, 0xFB, 0xC2, 0xF6, 0xF8, 0xF9, 0x2B, 0xF9, 0x2B, 0xF9, - 0xF6, 0xF8, 0x2B, 0xF8, 0xF7, 0xFB, 0xFB, 0xC2, 0xF9, 0xF7, 0xF9, 0xF7, 0xF9, 0xF7, 0xF9, 0x2B, - 0xF9, 0x2B, 0xF8, 0x2B, 0x81, 0xAC, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xC2, 0xF9, 0xF9, 0xF9, - 0xF9, 0xF9, 0xF9, 0x81, 0xAC, 0xC2, 0xC2, 0xC2, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x09, 0xD8, - 0x00, 0x00, 0x08, 0xD8, 0x00, 0x00, 0x00, 0x96, 0x02, 0x1C, 0xC1, 0xC4, 0x18, 0x9C, 0x00, 0x00, - 0x00, 0x1C, 0x00, 0x96, 0x00, 0x05, 0x69, 0x63, 0x6C, 0x34, 0x00, 0x00, 0x00, 0x32, 0x69, 0x63, - 0x6C, 0x38, 0x00, 0x00, 0x00, 0x3E, 0x49, 0x43, 0x4E, 0x23, 0x00, 0x00, 0x00, 0x4A, 0x69, 0x63, - 0x73, 0x23, 0x00, 0x00, 0x00, 0x56, 0x69, 0x63, 0x73, 0x34, 0x00, 0x00, 0x00, 0x62, 0x69, 0x63, - 0x73, 0x38, 0x00, 0x00, 0x00, 0x6E, 0xBF, 0xB9, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00, 0x02, 0x1C, - 0xE2, 0x10, 0xBF, 0xB9, 0xFF, 0xFF, 0x00, 0x00, 0x02, 0x04, 0x02, 0x1C, 0xE1, 0xAC, 0xBF, 0xB9, - 0xFF, 0xFF, 0x00, 0x00, 0x06, 0x08, 0x02, 0x1C, 0xE1, 0xA4, 0xBF, 0xB9, 0xFF, 0xFF, 0x00, 0x00, - 0x07, 0x0C, 0x02, 0x1C, 0xE1, 0xF8, 0xBF, 0xB9, 0xFF, 0xFF, 0x00, 0x00, 0x07, 0x50, 0x02, 0x1C, - 0xE1, 0xDC, 0xBF, 0xB9, 0xFF, 0xFF, 0x00, 0x00, 0x07, 0xD4, 0x02, 0x1C, 0xE1, 0xD0 -}; - -static bool use_streams[ 'Z'-'A'+1 ]; - -static bool is_ntfs_volume(LPCTSTR rootdir) -{ - bool ret = false; - TCHAR tst_file[_MAX_PATH], tst_stream[_MAX_PATH]; - _sntprintf( tst_file, lengthof(tst_file), TEXT("%sb2query.tmp"), rootdir ); - _sntprintf( tst_stream, lengthof(tst_stream), TEXT("%s:AFP_AfpInfo"), tst_file ); - if(!exists(tst_file)) { - if(create_file( tst_file, 0 )) { - if(create_file( tst_stream, 0 )) { - ret = true; - } - DeleteFile( tst_file ); - } - } - return ret; -} - - -// !!UNC -void init_posix_emu(void) -{ - if(!validate_stat_struct) { - ErrorAlert( "Invalid struct my_stat -- edit posix_emu.h" ); - QuitEmulator(); - } - -#if DEBUG_EXTFS - debug_extfs = PrefsFindInt16("debugextfs"); - - debug_extfs = DB_EXTFS_LOUD; - - if(debug_extfs != DB_EXTFS_NONE) { - extfs_log_open( EXTFS_LOG_FILE_NAME ); - } -#endif - - // We cannot use ExtFS "RootPath" because of the virtual desktop. - if(PrefsFindBool("enableextfs")) { - PrefsReplaceString("extfs", ""); - } else { - PrefsRemoveItem("extfs"); - D(bug("extfs disabled by user\n")); -#if DEBUG_EXTFS - extfs_log_close(); -#endif - return; - } - - const char *extdrives = PrefsFindString("extdrives"); - - // Set up drive list. - size_t outinx = 0; - for( TCHAR letter = TEXT('A'); letter <= TEXT('Z'); letter++ ) { - if(extdrives && !strchr(extdrives,letter)) continue; - TCHAR rootdir[20]; - _sntprintf( rootdir, lengthof(rootdir), TEXT("%c:\\"), letter ); - use_streams[ letter - 'A' ] = false; - switch(GetDriveType(rootdir)) { - case DRIVE_FIXED: - case DRIVE_REMOTE: - case DRIVE_RAMDISK: - // TODO: NTFS AFP? - // fall - case DRIVE_REMOVABLE: - case DRIVE_CDROM: - if(outinx < lengthof(host_drive_list)) { - host_drive_list[outinx] = letter; - outinx += 2; - } - } - } - - // Set up virtual desktop root. - // TODO: this should be customizable. - GetModuleFileName( NULL, virtual_root, lengthof(virtual_root) ); - TCHAR *p = _tcsrchr( virtual_root, TEXT('\\') ); - if(p) { - _tcscpy( ++p, desktop_name ); - } else { - // should never happen - _sntprintf( virtual_root, lengthof(virtual_root), TEXT("C:\\%s"), desktop_name ); - } - CreateDirectory( virtual_root, 0 ); - - // Set up an icon looking like "My Computer" - // Can be overwritten just like any other folder custom icon. - if(my_access(custom_icon_name,0) != 0) { - int fd = my_creat( custom_icon_name, 0 ); - if(fd >= 0) { - my_close(fd); - fd = open_rfork( custom_icon_name, O_RDWR|O_CREAT ); - if(fd >= 0) { - my_write( fd, my_comp_icon, sizeof(my_comp_icon) ); - my_close(fd); - static uint8 host_finfo[SIZEOF_FInfo]; - uint32 finfo = Host2MacAddr(host_finfo); - get_finfo(custom_icon_name, finfo, 0, false); - WriteMacInt16(finfo + fdFlags, kIsInvisible); - set_finfo(custom_icon_name, finfo, 0, false); - get_finfo(my_computer, finfo, 0, true); - WriteMacInt16(finfo + fdFlags, ReadMacInt16(finfo + fdFlags) | kHasCustomIcon); - set_finfo(my_computer, finfo, 0, true); - } else { - my_remove(custom_icon_name); - } - } - } -} - -void final_posix_emu(void) -{ -#if DEBUG_EXTFS - extfs_log_close(); -#endif -} - -static void charset_host2mac( char *s ) -{ - int i, len=strlen(s), code; - - for( i=len-3; i>=0; i-- ) { - if( s[i] == '%' && isxdigit(s[i+1]) && isxdigit(s[i+2]) ) { - sscanf( &s[i], "%%%02X", &code ); - memmove( &s[i], &s[i+2], strlen(&s[i+2])+1 ); - s[i] = code; - } - } -} - -static void charset_mac2host( LPTSTR s ) -{ - size_t len = _tcslen(s); - - D(bug(TEXT("charset_mac2host(%s)...\n"), s)); - - for( size_t i=len; i-->0; ) { - bool convert = false; - switch( (unsigned char)s[i] ) { - // case '\r': // handled by "default" - // case '\n': - // case '\t': - case '/': - // case '\\': // Backslash is tricky -- "s" is a full path! - // case ':': - case '*': - case '?': - case '"': - case '<': - case '>': - case '|': - case '%': - convert = true; - break; - default: - if((unsigned char)s[i] < ' ') convert = true; - break; - } - if(convert) { - TCHAR sml[10]; - _sntprintf( sml, lengthof(sml), TEXT("%%%02X"), s[i] ); - memmove( &s[i+2], &s[i], (_tcslen(&s[i])+1) * sizeof(TCHAR) ); - memmove( &s[i], sml, 3 * sizeof(TCHAR) ); - } - } - D(bug(TEXT("charset_mac2host = %s\n"), s)); -} - -static void make_mask( - TCHAR *mask, - LPCTSTR dir, - LPCTSTR a1, - LPCTSTR a2 -) -{ - _tcscpy( mask, dir ); - - size_t len = _tcslen(mask); - if( len && mask[len-1] != '\\' ) _tcscat( mask, TEXT("\\") ); - - if( a1 ) _tcscat( mask, a1 ); - if( a2 ) _tcscat( mask, a2 ); -} - -// !!UNC -static LPTSTR translate( LPCTSTR path, TCHAR *buffer ) -{ - TCHAR *l = host_drive_list; - const TCHAR *p = path; - - while(*l) { - if(_totupper(p[1]) == _totupper(*l)) break; - l += _tcslen(l) + 1; - } - - if(p[0] == TEXT('\\') && *l && (p[2] == 0 || p[2] == TEXT(':') || p[2] == TEXT('\\'))) { - p += 2; - if(*p == TEXT(':')) p++; - if(*p == TEXT('\\')) p++; - _sntprintf( buffer, MAX_PATH_LENGTH, TEXT("%c:\\%s"), *l, p ); - } else { - if(*path == TEXT('\\')) { - _sntprintf( buffer, MAX_PATH_LENGTH, TEXT("%s%s"), virtual_root, path ); - } else { - int len = _tcslen(path); - if(len == 0 || path[len-1] == TEXT('\\')) { - make_mask( buffer, virtual_root, path, tstr(my_computer).get() ); - } else { - make_mask( buffer, virtual_root, path, 0 ); - } - } - } - charset_mac2host( buffer ); - - return buffer; -} - -// helpers -static void strip_trailing_bs( LPTSTR path ) -{ - size_t len = _tcslen(path); - if(len > 0 && path[len-1] == TEXT('\\')) path[len-1] = 0; -} - -#if 0 /* defined is util_windows.cpp */ -static int exists( const char *p ) -{ - WIN32_FIND_DATA fdata; - - int result = 0; - - HANDLE h = FindFirstFile( p, &fdata ); - if(h != INVALID_HANDLE_VALUE) { - result = 1; - FindClose( h ); - } - - D(bug("exists(%s) = %d\n", p, result)); - - return result; -} -#endif - -static int is_dir( LPCTSTR p ) -{ - WIN32_FIND_DATA fdata; - - int result = 0; - - HANDLE h = FindFirstFile( p, &fdata ); - if(h != INVALID_HANDLE_VALUE) { - result = (fdata.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0; - FindClose( h ); - } - return result; -} - -static int myRemoveDirectory( LPCTSTR source ) -{ - HANDLE fh; - WIN32_FIND_DATA FindFileData; - int ok, result = 1; - TCHAR mask[_MAX_PATH]; - - D(bug(TEXT("removing folder %s\n"), source)); - - make_mask( mask, source, TEXT("*.*"), 0 ); - - fh = FindFirstFile( mask, &FindFileData ); - ok = fh != INVALID_HANDLE_VALUE; - while(ok) { - make_mask( mask, source, FindFileData.cFileName, 0 ); - D(bug(TEXT("removing item %s\n"), mask)); - int isdir = (FindFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0; - if(isdir) { - // must delete ".finf", ".rsrc" but not ".", ".." - if(_tcscmp(FindFileData.cFileName,TEXT(".")) && _tcscmp(FindFileData.cFileName,TEXT(".."))) { - result = myRemoveDirectory( mask ); - if(!result) break; - } - } else { - D(bug(TEXT("DeleteFile %s\n"), mask)); - result = DeleteFile( mask ); - if(!result) break; - } - ok = FindNextFile( fh, &FindFileData ); - } - if(fh != INVALID_HANDLE_VALUE) FindClose( fh ); - if(result) { - D(bug(TEXT("RemoveDirectory %s\n"), source)); - result = RemoveDirectory( source ); - } - return result; -} - -static void make_folders( LPCTSTR path ) -{ - TCHAR local_path[_MAX_PATH], *p; - _tcscpy( local_path, path ); - p = _tcsrchr( local_path, TEXT('\\') ); - if(p) { - *p = 0; - if(_tcslen(local_path) > 3) { - make_folders(local_path); - _tmkdir(local_path); - } - } -} - -// !!UNC -static bool is_same_drive( LPCTSTR p1, LPCTSTR p2 ) -{ - return _totupper(*p1) == _totupper(*p2); -} - -// Used when the drives are known to be different. -// Can't use MoveFileEx() etc because of the Win9x limitations. -// It would simulate CopyFile*() -- DeleteFile*() anyway -static int file_move_copy( LPCTSTR src, LPCTSTR dst, bool delete_old ) -{ - int result = 0; - my_errno = 0; - - D(bug(TEXT("file_copy %s -> %s\n"), src, dst)); - - // Fail if exists -- it's up to MacOS to move things to Trash - if(CopyFile(src,dst,TRUE)) { - if(delete_old && !DeleteFile(src)) { - result = -1; - my_errno = EACCES; - } - } else { - result = -1; - if(exists(src)) - my_errno = EACCES; - else - my_errno = ENOENT; - } - return result; -} - -static int file_move( LPCTSTR src, LPCTSTR dst ) -{ - return file_move_copy( src, dst, true ); -} - -static int file_copy( LPCTSTR src, LPCTSTR dst ) -{ - return file_move_copy( src, dst, false ); -} - -static int folder_copy( LPCTSTR folder_src, LPCTSTR folder_dst ) -{ - HANDLE fh; - WIN32_FIND_DATA FindFileData; - int ok, result = 0; - TCHAR mask[_MAX_PATH]; - - D(bug(TEXT("copying folder %s -> \n"), folder_src, folder_dst)); - - my_errno = 0; - - if(!CreateDirectory( folder_dst, 0 )) { - my_errno = EACCES; - return -1; - } - - make_mask( mask, folder_src, TEXT("*.*"), 0 ); - - fh = FindFirstFile( mask, &FindFileData ); - ok = fh != INVALID_HANDLE_VALUE; - while(ok) { - make_mask( mask, folder_src, FindFileData.cFileName, 0 ); - int isdir = (FindFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0; - TCHAR target[_MAX_PATH]; - make_mask( target, folder_dst, FindFileData.cFileName, 0 ); - D(bug(TEXT("copying item %s -> %s\n"), mask, target)); - if(isdir) { - if(_tcscmp(FindFileData.cFileName,TEXT(".")) && _tcscmp(FindFileData.cFileName,TEXT(".."))) { - result = folder_copy( mask, target ); - if(result < 0) break; - } - } else { - result = file_copy( mask, target ); - if(result < 0) break; - } - ok = FindNextFile( fh, &FindFileData ); - } - if(fh != INVALID_HANDLE_VALUE) FindClose( fh ); - return result; -} - -// dir enumeration -void closedir( struct DIR *d ) -{ - DISABLE_ERRORS; - if(d) { - if(d->h != INVALID_HANDLE_VALUE && d->h != VIRTUAL_ROOT_ID) { - FindClose( d->h ); - } - delete d; - } - RESTORE_ERRORS; -} - -static int make_dentry( struct DIR *d ) -{ - int ok = 0; - - memset( &d->de, 0, sizeof(d->de) ); - if(d->h != INVALID_HANDLE_VALUE) { - if( (d->FindFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0 && - *d->FindFileData.cFileName == TEXT('.')) - { - ok = 0; - } else { - strlcpy( d->de.d_name, d->FindFileData.cFileName, lengthof(d->de.d_name) ); - charset_host2mac( d->de.d_name ); - ok = 1; - } - } - return ok; -} - -struct dirent *readdir( struct DIR *d ) -{ - DISABLE_ERRORS; - - dirent *de = 0; - - if(d) { - if(d->h != INVALID_HANDLE_VALUE) { - if(d->h == VIRTUAL_ROOT_ID) { - make_dentry(d); - de = &d->de; - d->vname_list += _tcslen(d->vname_list) + 1; - if(*d->vname_list) { - _tcscpy( d->FindFileData.cFileName, d->vname_list ); - d->FindFileData.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY; - } else { - // Out of static drive entries. Continue with other stuff. - TCHAR mask[MAX_PATH_LENGTH]; - make_mask( mask, virtual_root, TEXT("*.*"), 0 ); - d->h = FindFirstFile( mask, &d->FindFileData ); - } - } else { - int done = 0; - do { - if(make_dentry(d)) { - de = &d->de; - done = 1; - } - if(!FindNextFile( d->h, &d->FindFileData )) { - FindClose( d->h ); - d->h = INVALID_HANDLE_VALUE; - done = 1; - } - } while(!done); - } - } - } - - if(de) { - D(bug("readdir found %s\n", de->d_name)); - } - - RESTORE_ERRORS; - - return de; -} - -struct DIR *opendir( const char *path ) -{ - DISABLE_ERRORS; - auto tpath = tstr(path); - DIR *d = new DIR; - if(d) { - memset( d, 0, sizeof(DIR) ); - if(*tpath.get() == 0) { - d->vname_list = host_drive_list; - if(d->vname_list) { - d->h = VIRTUAL_ROOT_ID; - _tcscpy( d->FindFileData.cFileName, d->vname_list ); - d->FindFileData.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY; - } else { - d->h = INVALID_HANDLE_VALUE; - } - } else { - TCHAR mask[MAX_PATH_LENGTH]; - make_mask( mask, MRP(tpath.get()), TEXT("*.*"), 0 ); - - D(bug(TEXT("opendir path=%s, mask=%s\n"), tpath.get(), mask)); - - d->h = FindFirstFile( mask, &d->FindFileData ); - if(d->h == INVALID_HANDLE_VALUE) { - delete d; - d = 0; - } - } - } - - D(bug(TEXT("opendir(%s,%s) = %08x\n"), tpath.get(), MRP(tpath.get()), d)); - - RESTORE_ERRORS; - - return d; -} - -static void dump_stat( const struct my_stat *st ) -{ - D(bug("stat: size = %ld, mode = %ld, a = %ld, m = %ld, c = %ld\n", st->st_size, st->st_mode, st->st_atime, st->st_mtime, st->st_ctime)); -} - - - -// Exported hook functions -int my_stat( const char *path, struct my_stat *st ) -{ - DISABLE_ERRORS; - - auto tpath = tstr(path); - int result; - - if(*tpath.get() == 0) { - /// virtual root - memset( st, 0, sizeof(struct my_stat) ); - st->st_mode = _S_IFDIR; - result = 0; - my_errno = 0; - } else { - result = _tstat( MRP(tpath.get()), (struct _stat *)st ); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - } - - D(bug(TEXT("stat(%s,%s) = %d\n"), tpath.get(), MRP(tpath.get()), result)); - if(result >= 0) dump_stat( st ); - RESTORE_ERRORS; - return result; -} - -int my_fstat( int fd, struct my_stat *st ) -{ - DISABLE_ERRORS; - int result = _fstat( fd, (struct _stat *)st ); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - D(bug("fstat(%d) = %d\n", fd, result)); - if(result >= 0) dump_stat( st ); - RESTORE_ERRORS; - return result; -} - -int my_open( const char *path, int mode, ... ) -{ - DISABLE_ERRORS; - int result; - auto tpath = tstr(path); - LPCTSTR p = MRP(tpath.get()); - - // Windows "open" does not handle _O_CREAT and _O_BINARY as it should - if(mode & _O_CREAT) { - if(exists(p)) { - result = _topen( p, mode & ~_O_CREAT ); - D(bug(TEXT("open-nocreat(%s,%s,%d) = %d\n"), tpath.get(), p, mode, result)); - } else { - result = _tcreat( p, _S_IWRITE|_S_IREAD ); - if(result < 0) { - make_folders(p); - result = _tcreat( p, _S_IWRITE|_S_IREAD ); - } - D(bug(TEXT("open-creat(%s,%s,%d) = %d\n"), tpath.get(), p, mode, result)); - } - } else { - result = _topen( p, mode ); - D(bug(TEXT("open(%s,%s,%d) = %d\n"), tpath.get(), p, mode, result)); - } - if(result < 0) { - my_errno = errno; - } else { - setmode(result, _O_BINARY); - my_errno = 0; - } - RESTORE_ERRORS; - return result; -} - -int my_rename( const char *old_path, const char *new_path ) -{ - DISABLE_ERRORS; - int result = -1; - auto told_path = tstr(old_path); - auto tnew_path = tstr(new_path); - LPCTSTR p_old = MRP(told_path.get()); - LPCTSTR p_new = MRP2(tnew_path.get()); - - result = my_access(old_path,0); - if(result < 0) { - // my_errno already set - } else { - if(is_same_drive(p_old,p_new)) { - result = _trename( p_old, p_new ); - if(result != 0) { // by definition, rename may also return a positive value to indicate an error - my_errno = errno; - } else { - my_errno = 0; - } - } else { - if(is_dir(p_old)) { - result = folder_copy( p_old, p_new ); - // my_errno already set - if(result >= 0) { - if(myRemoveDirectory( p_old )) { - my_errno = 0; - result = 0; - } else { - // there is no proper error code for this failure. - my_errno = EACCES; - result = -1; - } - } - } else { - result = file_move( p_old, p_new ); - // my_errno already set - } - } - } - D(bug(TEXT("rename(%s,%s,%s,%s) = %d\n"), told_path.get(), p_old, tnew_path.get(), p_new, result)); - RESTORE_ERRORS; - return result; -} - -int my_access( const char *path, int mode ) -{ - DISABLE_ERRORS; - auto tpath = tstr(path); - LPCTSTR p = MRP(tpath.get()); - WIN32_FIND_DATA fdata; - - int result; - - if(is_dir(p)) { - // access does not work for folders. - HANDLE h = FindFirstFile( p, &fdata ); - if(h != INVALID_HANDLE_VALUE) { - FindClose( h ); - if(mode == W_OK) { - if( (fdata.dwFileAttributes & FILE_ATTRIBUTE_READONLY) == 0 ) { - result = 0; - my_errno = 0; - } else { - result = -1; - my_errno = EACCES; - } - } else { - result = 0; - my_errno = 0; - } - } else { - result = -1; - my_errno = ENOENT; - } - } else { - // W_OK, F_OK are ok. - result = _taccess(p,mode); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - } - - D(bug(TEXT("access(%s,%s,%d) = %d\n"), tpath.get(), p, mode, result)); - RESTORE_ERRORS; - return result; -} - -int my_mkdir( const char *path, int mode ) -{ - DISABLE_ERRORS; - auto tpath = tstr(path); - LPTSTR p = MRP(tpath.get()); - strip_trailing_bs(p); - int result = _tmkdir( p ); - if(result < 0) { - make_folders(p); - result = _tmkdir( p ); - } - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - D(bug(TEXT("mkdir(%s,%s,%d) = %d\n"), tpath.get(), p, mode, result)); - RESTORE_ERRORS; - return result; -} - -int my_remove( const char *path ) -{ - DISABLE_ERRORS; - auto tpath = tstr(path); - LPTSTR p = MRP(tpath.get()); - strip_trailing_bs(p); - int result; - if(is_dir(p)) { - result = myRemoveDirectory( p ); - } else { - D(bug(TEXT("DeleteFile %s\n"), p)); - result = DeleteFile( p ); - } - if(result) { - result = 0; - my_errno = 0; - } else { - result = -1; - if(exists(p)) { - my_errno = EACCES; - } else { - my_errno = ENOENT; - } - } - D(bug(TEXT("remove(%s,%s) = %d\n"), tpath.get(), p, result)); - RESTORE_ERRORS; - return result; -} - -int my_creat( const char *path, int mode ) -{ - DISABLE_ERRORS; - auto tpath = tstr(path); - LPCTSTR p = MRP(tpath.get()); - int result = _tcreat( p, _S_IWRITE|_S_IREAD ); // note mode - if(result < 0) { - make_folders(p); - result = _tcreat( p, _S_IWRITE|_S_IREAD ); // note mode - } - if(result < 0) { - my_errno = errno; - } else { - setmode(result, _O_BINARY); - my_errno = 0; - } - D(bug(TEXT("creat(%s,%s,%d) = %d\n"), tpath.get(), p, mode,result)); - RESTORE_ERRORS; - return result; -} - -int my_chsize( int fd, size_t sz ) -{ - DISABLE_ERRORS; - int result = chsize(fd,sz); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - RESTORE_ERRORS; - return result; -} - -int my_close( int fd ) -{ - DISABLE_ERRORS; - int result = close(fd); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - RESTORE_ERRORS; - D(bug("close(%d) = %d\n", fd, result)); - return result; -} - -long my_lseek( int fd, long offset, int origin ) -{ - DISABLE_ERRORS; - int result = lseek( fd, offset, origin ); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - RESTORE_ERRORS; - return result; -} - -int my_read( int fd, void *buffer, unsigned int count ) -{ - DISABLE_ERRORS; - int result = read( fd, buffer, count ); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - RESTORE_ERRORS; - D(bug("read(%ld,%08x,%ld) = %d\n", fd, buffer, count, result)); - - return result; -} - -int my_write( int fd, const void *buffer, unsigned int count ) -{ - DISABLE_ERRORS; - int result = write( fd, buffer, count ); - if(result < 0) { - my_errno = errno; - } else { - my_errno = 0; - } - RESTORE_ERRORS; - D(bug("write(%ld,%08x,%ld) = %d\n", fd, buffer, count, result)); - return result; -} diff --git a/BasiliskII/src/Windows/posix_emu.h b/BasiliskII/src/Windows/posix_emu.h deleted file mode 100755 index f50775581..000000000 --- a/BasiliskII/src/Windows/posix_emu.h +++ /dev/null @@ -1,122 +0,0 @@ -/* - * posix_emu.h - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 -#include -#include -#include -#include - -#include "extfs.h" - -void init_posix_emu(void); -void final_posix_emu(void); - -typedef struct dirent { - char d_name[MAX_PATH_LENGTH]; -} dirent; - -typedef struct DIR { - HANDLE h; - WIN32_FIND_DATA FindFileData; - dirent de; - TCHAR *vname_list; -} DIR; - -// emulated -DIR *opendir( const char *path ); -void closedir( DIR *d ); -struct dirent *readdir( DIR *d ); - -// access() mode: exists? -#ifndef F_OK -#define F_OK 0 -#endif -// access() mode: can do r/w? -#ifndef W_OK -#define W_OK 6 -#endif - -// hook stat functions to create virtual desktop -// because of errno all used funcs must be hooked. -int my_stat( const char *, struct my_stat * ); -int my_fstat( int, struct my_stat * ); -int my_open( const char *, int, ... ); -int my_rename( const char *, const char * ); -int my_access( const char *, int ); -int my_mkdir( const char *path, int mode ); -int my_remove( const char * ); -int my_creat( const char *path, int mode ); -int my_creat( const char *path, int mode ); -int my_close( int fd ); -long my_lseek( int fd, long, int); -int my_read( int fd, void *, unsigned int); -int my_write( int fd, const void *, unsigned int); -int my_chsize( int fd, unsigned int size ); -int my_locking( int fd, int mode, long nbytes ); - -extern int my_errno; - -// must hook all other functions that manipulate file names -#ifndef NO_POSIX_API_HOOK -#define stat my_stat -#define fstat my_fstat -#define open my_open -#define rename my_rename -#define access my_access -#define mkdir my_mkdir -#define remove my_remove -#define creat my_creat -#define close my_close -#define lseek my_lseek -#define read my_read -#define write my_write -#define ftruncate my_chsize -#define locking my_locking - -#undef errno -#define errno my_errno -#endif //!NO_POSIX_API_HOOK - -#ifndef S_ISDIR -#define S_ISDIR(stat_mode) (((stat_mode) & _S_IFDIR) != 0) -#endif - -// can't #define "stat" unless there's a replacement for "struct stat" -struct my_stat { - _dev_t st_dev; - _ino_t st_ino; - unsigned short st_mode; - short st_nlink; - short st_uid; - short st_gid; - _dev_t st_rdev; - _off_t st_size; - time_t st_atime; - time_t st_mtime; - time_t st_ctime; -}; - -// Your compiler may have different "struct stat" -> edit "struct my_stat" -#define validate_stat_struct ( sizeof(struct my_stat) == sizeof(struct stat) ) - -#define st_crtime st_ctime diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp deleted file mode 100644 index a659c4e0c..000000000 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ /dev/null @@ -1,1769 +0,0 @@ -/* - * prefs_editor_gtk.cpp - Preferences editor, Unix implementation using GTK+ - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#include "user_strings.h" -#include "version.h" -#include "cdrom.h" -#include "xpram.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "util_windows.h" -#include "b2ether/inc/b2ether_hl.h" - - -// Global variables -static GtkWidget *win; // Preferences window -static bool start_clicked = true; // Return value of PrefsEditor() function - - -// Prototypes -static void create_volumes_pane(GtkWidget *top); -static void create_scsi_pane(GtkWidget *top); -static void create_graphics_pane(GtkWidget *top); -static void create_input_pane(GtkWidget *top); -static void create_serial_pane(GtkWidget *top); -static void create_ethernet_pane(GtkWidget *top); -static void create_memory_pane(GtkWidget *top); -static void create_jit_pane(GtkWidget *top); -static void read_settings(void); - - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -#define DISABLE_SCSI 1 -#define PROGRAM_NAME "SheepShaver" -enum { - STR_WINDOW_LAB = STR_WINDOW_CTRL, - STR_FULLSCREEN_LAB = STR_FULLSCREEN_CTRL, - STR_SERIALA_CTRL = STR_SERPORTA_CTRL, - STR_SERIALB_CTRL = STR_SERPORTB_CTRL, -}; -#else -#define DISABLE_SCSI 1 /* XXX merge code from original Basilisk II for Windows */ -#define PROGRAM_NAME "BasiliskII" -#endif - - -/* - * Utility functions - */ - -struct opt_desc { - int label_id; - GtkSignalFunc func; -}; - -struct combo_desc { - int label_id; -}; - -struct file_req_assoc { - file_req_assoc(GtkWidget *r, GtkWidget *e) : req(r), entry(e) {} - GtkWidget *req; - GtkWidget *entry; -}; - -static void cb_browse_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (char *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_entry_set_text(GTK_ENTRY(assoc->entry), file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -static void cb_browse(GtkWidget *widget, void *user_data) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_BROWSE_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(cb_browse_ok), new file_req_assoc(req, (GtkWidget *)user_data)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -static GtkWidget *make_browse_button(GtkWidget *entry) -{ - GtkWidget *button; - - button = gtk_button_new_with_label(GetString(STR_BROWSE_CTRL)); - gtk_widget_show(button); - gtk_signal_connect(GTK_OBJECT(button), "clicked", (GtkSignalFunc)cb_browse, (void *)entry); - return button; -} - -static void add_menu_item(GtkWidget *menu, const char *label, GtkSignalFunc func, gpointer data = NULL) -{ - GtkWidget *item = gtk_menu_item_new_with_label(label); - gtk_widget_show(item); - gtk_signal_connect(GTK_OBJECT(item), "activate", func, data); - gtk_menu_append(GTK_MENU(menu), item); -} - -static void add_menu_item(GtkWidget *menu, int label_id, GtkSignalFunc func) -{ - add_menu_item(menu, GetString(label_id), func, NULL); -} - -static GtkWidget *make_pane(GtkWidget *notebook, int title_id) -{ - GtkWidget *frame, *label, *box; - - frame = gtk_frame_new(NULL); - gtk_widget_show(frame); - gtk_container_border_width(GTK_CONTAINER(frame), 4); - - label = gtk_label_new(GetString(title_id)); - gtk_notebook_append_page(GTK_NOTEBOOK(notebook), frame, label); - - box = gtk_vbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_container_set_border_width(GTK_CONTAINER(box), 4); - gtk_container_add(GTK_CONTAINER(frame), box); - return box; -} - -static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *buttons) -{ - GtkWidget *bb, *button; - - bb = gtk_hbutton_box_new(); - gtk_widget_show(bb); - gtk_container_set_border_width(GTK_CONTAINER(bb), border); - gtk_button_box_set_layout(GTK_BUTTON_BOX(bb), GTK_BUTTONBOX_DEFAULT_STYLE); - gtk_button_box_set_spacing(GTK_BUTTON_BOX(bb), 4); - gtk_box_pack_start(GTK_BOX(top), bb, FALSE, FALSE, 0); - - while (buttons->label_id) { - button = gtk_button_new_with_label(GetString(buttons->label_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", buttons->func, NULL); - gtk_box_pack_start(GTK_BOX(bb), button, TRUE, TRUE, 0); - buttons++; - } - return bb; -} - -static GtkWidget *make_separator(GtkWidget *top) -{ - GtkWidget *sep = gtk_hseparator_new(); - gtk_box_pack_start(GTK_BOX(top), sep, FALSE, FALSE, 0); - gtk_widget_show(sep); - return sep; -} - -static GtkWidget *make_table(GtkWidget *top, int x, int y) -{ - GtkWidget *table = gtk_table_new(x, y, FALSE); - gtk_widget_show(table); - gtk_box_pack_start(GTK_BOX(top), table, FALSE, FALSE, 0); - return table; -} - -static GtkWidget *table_make_option_menu(GtkWidget *table, int row, int label_id, const opt_desc *options, int active) -{ - GtkWidget *label, *opt, *menu; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - return menu; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, GList *glist) -{ - GtkWidget *label, *combo; - char str[32]; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), default_value); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - return combo; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, const combo_desc *options) -{ - GList *glist = NULL; - while (options->label_id) { - glist = g_list_append(glist, (void *)GetString(options->label_id)); - options++; - } - - return table_make_combobox(table, row, label_id, default_value, glist); -} - -static GtkWidget *table_make_file_entry(GtkWidget *table, int row, int label_id, const char *prefs_item, bool only_dirs = false) -{ - GtkWidget *box, *label, *entry, *button; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_table_attach(GTK_TABLE(table), box, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - entry = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - - button = make_browse_button(entry); - gtk_box_pack_start(GTK_BOX(box), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(entry), "chooser_button", button); - return entry; -} - -static GtkWidget *make_option_menu(GtkWidget *top, int label_id, const opt_desc *options, int active) -{ - GtkWidget *box, *label, *opt, *menu; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_box_pack_start(GTK_BOX(box), opt, FALSE, FALSE, 0); - return menu; -} - -static GtkWidget *make_file_entry(GtkWidget *top, int label_id, const char *prefs_item, bool only_dirs = false) -{ - GtkWidget *box, *label, *entry; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - - entry = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - return entry; -} - -static const gchar *get_file_entry_path(GtkWidget *entry) -{ - return gtk_entry_get_text(GTK_ENTRY(entry)); -} - -static GtkWidget *make_checkbox(GtkWidget *top, int label_id, const char *prefs_item, GtkSignalFunc func) -{ - GtkWidget *button = gtk_check_button_new_with_label(GetString(label_id)); - gtk_widget_show(button); - gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(button), PrefsFindBool(prefs_item)); - gtk_signal_connect(GTK_OBJECT(button), "toggled", func, button); - gtk_box_pack_start(GTK_BOX(top), button, FALSE, FALSE, 0); - return button; -} - -static GtkWidget *make_combobox(GtkWidget *top, int label_id, const char *default_value, GList *glist) -{ - GtkWidget *box, *label, *combo; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), default_value); - gtk_box_pack_start(GTK_BOX(box), combo, TRUE, TRUE, 0); - - return combo; -} - -static GtkWidget *make_combobox(GtkWidget *top, int label_id, const char *default_value, const combo_desc *options) -{ - GList *glist = NULL; - while (options->label_id) { - glist = g_list_append(glist, (void *)GetString(options->label_id)); - options++; - } - - return make_combobox(top, label_id, default_value, glist); -} - - -/* - * Show preferences editor - * Returns true when user clicked on "Start", false otherwise - */ - -// Window closed -static gint window_closed(void) -{ - return FALSE; -} - -// Window destroyed -static void window_destroyed(void) -{ - gtk_main_quit(); -} - -// "Start" button clicked -static void cb_start(...) -{ - start_clicked = true; - read_settings(); - SavePrefs(); - gtk_widget_destroy(win); -} - -// "Zap PRAM" button clicked -static void cb_zap_pram(...) -{ - ZapPRAM(); -} - -// "Quit" button clicked -static void cb_quit(...) -{ - start_clicked = false; - gtk_widget_destroy(win); -} - -// "OK" button of "About" dialog clicked -static void dl_quit(GtkWidget *dialog) -{ - gtk_widget_destroy(dialog); -} - -// "About" button clicked -static void cb_about(...) -{ - GtkWidget *dialog; - - GtkWidget *label, *button; - - char str[512]; - sprintf(str, - PROGRAM_NAME "\nVersion %d.%d\n\n" - "Copyright (C) 1997-2008 Christian Bauer et al.\n" - "E-mail: cb@cebix.net\n" -#ifdef SHEEPSHAVER - "http://sheepshaver.cebix.net/\n\n" -#else - "http://basilisk.cebix.net/\n\n" -#endif - PROGRAM_NAME " comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - - gtk_widget_show(dialog); -} - -// Menu item descriptions -static GtkItemFactoryEntry menu_items[] = { - {(gchar *)GetString(STR_PREFS_MENU_FILE_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_START_GTK), "S", GTK_SIGNAL_FUNC(cb_start), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_ZAP_PRAM_GTK), NULL, GTK_SIGNAL_FUNC(cb_zap_pram), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_SEPL_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_QUIT_GTK), "Q", GTK_SIGNAL_FUNC(cb_quit), 0, NULL}, - {(gchar *)GetString(STR_HELP_MENU_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_HELP_ITEM_ABOUT_GTK), "H", GTK_SIGNAL_FUNC(cb_about), 0, NULL} -}; - -void PrefsMigrate(void) -{ - // Ethernet - const char *ether = PrefsFindString("ether"); - if (ether && ether[0] == '{') { - PrefsReplaceString("etherguid", ether); - PrefsReplaceString("ether", "b2ether"); - } - if (PrefsFindBool("routerenabled")) { - PrefsRemoveItem("etherguid"); - PrefsReplaceString("ether", "router"); - } -} - -bool PrefsEditor(void) -{ - // Create window - win = gtk_window_new(GTK_WINDOW_TOPLEVEL); - gtk_window_set_title(GTK_WINDOW(win), GetString(STR_PREFS_TITLE)); - gtk_signal_connect(GTK_OBJECT(win), "delete_event", GTK_SIGNAL_FUNC(window_closed), NULL); - gtk_signal_connect(GTK_OBJECT(win), "destroy", GTK_SIGNAL_FUNC(window_destroyed), NULL); - - // Create window contents - GtkWidget *box = gtk_vbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_container_add(GTK_CONTAINER(win), box); - - GtkAccelGroup *accel_group = gtk_accel_group_new(); - GtkItemFactory *item_factory = gtk_item_factory_new(GTK_TYPE_MENU_BAR, "
", accel_group); - gtk_item_factory_create_items(item_factory, sizeof(menu_items) / sizeof(menu_items[0]), menu_items, NULL); -#if GTK_CHECK_VERSION(1,3,15) - gtk_window_add_accel_group(GTK_WINDOW(win), accel_group); -#else - gtk_accel_group_attach(accel_group, GTK_OBJECT(win)); -#endif - GtkWidget *menu_bar = gtk_item_factory_get_widget(item_factory, "
"); - gtk_widget_show(menu_bar); - gtk_box_pack_start(GTK_BOX(box), menu_bar, FALSE, TRUE, 0); - - GtkWidget *notebook = gtk_notebook_new(); - gtk_widget_show(notebook); - gtk_notebook_set_tab_pos(GTK_NOTEBOOK(notebook), GTK_POS_TOP); - gtk_notebook_set_scrollable(GTK_NOTEBOOK(notebook), FALSE); - gtk_box_pack_start(GTK_BOX(box), notebook, TRUE, TRUE, 0); - - create_volumes_pane(notebook); -#ifndef DISABLE_SCSI - create_scsi_pane(notebook); -#endif - create_graphics_pane(notebook); - create_input_pane(notebook); - create_serial_pane(notebook); - create_ethernet_pane(notebook); - create_memory_pane(notebook); - create_jit_pane(notebook); - - static const opt_desc buttons[] = { - {STR_START_BUTTON, GTK_SIGNAL_FUNC(cb_start)}, - {STR_QUIT_BUTTON, GTK_SIGNAL_FUNC(cb_quit)}, - {0, NULL} - }; - make_button_box(box, 4, buttons); - - // Show window and enter main loop - gtk_widget_show(win); - gtk_main(); - return start_clicked; -} - - -/* - * "Volumes" pane - */ - -static GtkWidget *w_enableextfs, *w_extdrives, *w_cdrom_drive; -static GtkWidget *volume_list; -static int selected_volume; - -// Set sensitivity of widgets -static void set_volumes_sensitive(void) -{ - const bool enable_extfs = PrefsFindBool("enableextfs"); - gtk_widget_set_sensitive(w_extdrives, enable_extfs); - const bool no_cdrom = PrefsFindBool("nocdrom"); - gtk_widget_set_sensitive(w_cdrom_drive, !no_cdrom); -} - -// Volume in list selected -static void cl_selected(GtkWidget *list, int row, int column) -{ - selected_volume = row; -} - -// Volume selected for addition -static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_clist_append(GTK_CLIST(volume_list), &file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -// Volume selected for creation -static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - - const gchar *str = gtk_entry_get_text(GTK_ENTRY(assoc->entry)); - size_t size = atoi(str) << 20; - - int fd = _open(file, _O_WRONLY | _O_CREAT | _O_BINARY | _O_TRUNC, _S_IREAD | _S_IWRITE); - if (fd >= 0) { - if (_chsize(fd, size) == 0) - gtk_clist_append(GTK_CLIST(volume_list), &file); - _close(fd); - } - gtk_widget_destroy(GTK_WIDGET(assoc->req)); - delete assoc; -} - -// "Add Volume" button clicked -static void cb_add_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_ADD_VOLUME_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(add_volume_ok), new file_req_assoc(req, NULL)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Create Hardfile" button clicked -static void cb_create_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_CREATE_VOLUME_TITLE)); - - GtkWidget *box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - GtkWidget *label = gtk_label_new(GetString(STR_HARDFILE_SIZE_CTRL)); - gtk_widget_show(label); - GtkWidget *entry = gtk_entry_new(); - gtk_widget_show(entry); - char str[32]; - sprintf(str, "%d", 40); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(box), entry, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(GTK_FILE_SELECTION(req)->main_vbox), box, FALSE, FALSE, 0); - - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(create_volume_ok), new file_req_assoc(req, entry)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Remove Volume" button clicked -static void cb_remove_volume(...) -{ - gtk_clist_remove(GTK_CLIST(volume_list), selected_volume); -} - -// "Boot From" selected -static void mn_boot_any(...) {PrefsReplaceInt32("bootdriver", 0);} -static void mn_boot_cdrom(...) {PrefsReplaceInt32("bootdriver", CDROMRefNum);} - -// "Enable external file system" button toggled -static void tb_enableextfs(GtkWidget *widget) -{ - PrefsReplaceBool("enableextfs", GTK_TOGGLE_BUTTON(widget)->active); - set_volumes_sensitive(); -} - -// "No CD-ROM Driver" button toggled -static void tb_nocdrom(GtkWidget *widget) -{ - PrefsReplaceBool("nocdrom", GTK_TOGGLE_BUTTON(widget)->active); - set_volumes_sensitive(); -} - -// Add names of CD-ROM devices -static GList *add_cdrom_names(void) -{ - GList *glist = NULL; - - char rootdir[4] = "X:\\"; - for (char letter = 'C'; letter <= 'Z'; letter++) { - rootdir[0] = letter; - if (GetDriveType(rootdir) == DRIVE_CDROM) - glist = g_list_append(glist, strdup(rootdir)); - } - - return glist; -} - -// "Enable polling" button toggled -static void tb_pollmedia(GtkWidget *widget) -{ - PrefsReplaceBool("pollmedia", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Read settings from widgets and set preferences -static void read_volumes_settings(void) -{ - while (PrefsFindString("disk")) - PrefsRemoveItem("disk"); - - for (int i=0; irows; i++) { - char *str; - gtk_clist_get_text(GTK_CLIST(volume_list), i, 0, &str); - PrefsAddString("disk", str); - } - - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_cdrom_drive)->entry)); - if (str && strlen(str)) - PrefsReplaceString("cdrom", str); - else - PrefsRemoveItem("cdrom"); - - PrefsReplaceString("extdrives", get_file_entry_path(w_extdrives)); -} - -// Create "Volumes" pane -static void create_volumes_pane(GtkWidget *top) -{ - GtkWidget *box, *scroll, *menu; - - box = make_pane(top, STR_VOLUMES_PANE_TITLE); - - scroll = gtk_scrolled_window_new(NULL, NULL); - gtk_widget_show(scroll); - gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scroll), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - volume_list = gtk_clist_new(1); - gtk_widget_show(volume_list); - gtk_clist_set_selection_mode(GTK_CLIST(volume_list), GTK_SELECTION_SINGLE); - gtk_clist_set_shadow_type(GTK_CLIST(volume_list), GTK_SHADOW_NONE); - gtk_clist_set_reorderable(GTK_CLIST(volume_list), true); - gtk_signal_connect(GTK_OBJECT(volume_list), "select_row", GTK_SIGNAL_FUNC(cl_selected), NULL); - char *str; - int32 index = 0; - while ((str = const_cast(PrefsFindString("disk", index++))) != NULL) - gtk_clist_append(GTK_CLIST(volume_list), &str); - gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(scroll), volume_list); - gtk_box_pack_start(GTK_BOX(box), scroll, TRUE, TRUE, 0); - selected_volume = 0; - - static const opt_desc buttons[] = { - {STR_ADD_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_add_volume)}, - {STR_CREATE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_create_volume)}, - {STR_REMOVE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_remove_volume)}, - {0, NULL}, - }; - make_button_box(box, 0, buttons); - make_separator(box); - - static const opt_desc options[] = { - {STR_BOOT_ANY_LAB, GTK_SIGNAL_FUNC(mn_boot_any)}, - {STR_BOOT_CDROM_LAB, GTK_SIGNAL_FUNC(mn_boot_cdrom)}, - {0, NULL} - }; - int bootdriver = PrefsFindInt32("bootdriver"), active = 0; - switch (bootdriver) { - case 0: active = 0; break; - case CDROMRefNum: active = 1; break; - } - menu = make_option_menu(box, STR_BOOTDRIVER_CTRL, options, active); - - make_checkbox(box, STR_NOCDROM_CTRL, "nocdrom", GTK_SIGNAL_FUNC(tb_nocdrom)); - - GList *glist = add_cdrom_names(); - str = const_cast(PrefsFindString("cdrom")); - if (str == NULL) - str = ""; - w_cdrom_drive = make_combobox(box, STR_CDROM_DRIVE_CTRL, str, glist); - - make_checkbox(box, STR_POLLMEDIA_CTRL, "pollmedia", GTK_SIGNAL_FUNC(tb_pollmedia)); - - make_separator(box); - w_enableextfs = make_checkbox(box, STR_EXTFS_ENABLE_CTRL, "enableextfs", GTK_SIGNAL_FUNC(tb_enableextfs)); - w_extdrives = make_file_entry(box, STR_EXTFS_DRIVES_CTRL, "extdrives", true); - - set_volumes_sensitive(); -} - - -/* - * "JIT Compiler" pane - */ - -#ifndef SHEEPSHAVER -static GtkWidget *w_jit_fpu; -static GtkWidget *w_jit_atraps; -static GtkWidget *w_jit_cache_size; -static GtkWidget *w_jit_lazy_flush; -static GtkWidget *w_jit_follow_const_jumps; -#endif - -// Set sensitivity of widgets -static void set_jit_sensitive(void) -{ -#ifndef SHEEPSHAVER - const bool jit_enabled = PrefsFindBool("jit"); - gtk_widget_set_sensitive(w_jit_fpu, jit_enabled); - gtk_widget_set_sensitive(w_jit_cache_size, jit_enabled); - gtk_widget_set_sensitive(w_jit_lazy_flush, jit_enabled); - gtk_widget_set_sensitive(w_jit_follow_const_jumps, jit_enabled); -#endif -} - -// "Use JIT Compiler" button toggled -static void tb_jit(GtkWidget *widget) -{ - PrefsReplaceBool("jit", GTK_TOGGLE_BUTTON(widget)->active); - set_jit_sensitive(); -} - -// "Compile FPU Instructions" button toggled -#ifndef SHEEPSHAVER -static void tb_jit_fpu(GtkWidget *widget) -{ - PrefsReplaceBool("jitfpu", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// "Lazy translation cache invalidation" button toggled -#ifndef SHEEPSHAVER -static void tb_jit_lazy_flush(GtkWidget *widget) -{ - PrefsReplaceBool("jitlazyflush", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// "Translate through constant jumps (inline blocks)" button toggled -#ifndef SHEEPSHAVER -static void tb_jit_follow_const_jumps(GtkWidget *widget) -{ - PrefsReplaceBool("jitinline", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// Read settings from widgets and set preferences -static void read_jit_settings(void) -{ -#if USE_JIT - bool jit_enabled = PrefsFindBool("jit"); - if (jit_enabled) { -#ifndef SHEEPSHAVER - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_jit_cache_size)->entry)); - PrefsReplaceInt32("jitcachesize", atoi(str)); -#endif - } -#endif -} - -// "Use built-in 68k DR emulator" button toggled -#ifdef SHEEPSHAVER -static void tb_jit_68k(GtkWidget *widget) -{ - PrefsReplaceBool("jit68k", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// Create "JIT Compiler" pane -static void create_jit_pane(GtkWidget *top) -{ -#if USE_JIT - GtkWidget *box, *table, *label, *menu; - char str[32]; - - box = make_pane(top, STR_JIT_PANE_TITLE); - make_checkbox(box, STR_JIT_CTRL, "jit", GTK_SIGNAL_FUNC(tb_jit)); - -#ifndef SHEEPSHAVER - w_jit_fpu = make_checkbox(box, STR_JIT_FPU_CTRL, "jitfpu", GTK_SIGNAL_FUNC(tb_jit_fpu)); - - // Translation cache size - static const combo_desc options[] = { - STR_JIT_CACHE_SIZE_2MB_LAB, - STR_JIT_CACHE_SIZE_4MB_LAB, - STR_JIT_CACHE_SIZE_8MB_LAB, - STR_JIT_CACHE_SIZE_16MB_LAB, - 0 - }; - sprintf(str, "%d", PrefsFindInt32("jitcachesize")); - w_jit_cache_size = make_combobox(box, STR_JIT_CACHE_SIZE_CTRL, str, options); - - // Lazy translation cache invalidation - w_jit_lazy_flush = make_checkbox(box, STR_JIT_LAZY_CINV_CTRL, "jitlazyflush", GTK_SIGNAL_FUNC(tb_jit_lazy_flush)); - - // Follow constant jumps (inline basic blocks) - w_jit_follow_const_jumps = make_checkbox(box, STR_JIT_FOLLOW_CONST_JUMPS, "jitinline", GTK_SIGNAL_FUNC(tb_jit_follow_const_jumps)); -#endif - - set_jit_sensitive(); -#endif - -#ifdef SHEEPSHAVER - make_checkbox(box, STR_JIT_68K_CTRL, "jit68k", GTK_SIGNAL_FUNC(tb_jit_68k)); -#endif -} - -/* - * "SCSI" pane - */ - -static GtkWidget *w_scsi[7]; - -// Read settings from widgets and set preferences -static void read_scsi_settings(void) -{ -#ifndef DISABLE_SCSI - for (int id=0; id<7; id++) { - char prefs_name[32]; - sprintf(prefs_name, "scsi%d", id); - const char *str = get_file_entry_path(w_scsi[id]); - if (str && strlen(str)) - PrefsReplaceString(prefs_name, str); - else - PrefsRemoveItem(prefs_name); - } -#endif -} - -// Create "SCSI" pane -static void create_scsi_pane(GtkWidget *top) -{ -#ifndef DISABLE_SCSI - GtkWidget *box; - - box = make_pane(top, STR_SCSI_PANE_TITLE); - - for (int id=0; id<7; id++) { - char prefs_name[32]; - sprintf(prefs_name, "scsi%d", id); - w_scsi[id] = make_file_entry(box, STR_SCSI_ID_0 + id, prefs_name); - } -#endif -} - - -/* - * "Graphics/Sound" pane - */ - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -static GtkWidget *w_frameskip, *w_display_x, *w_display_y; -static GtkWidget *l_frameskip, *l_display_x, *l_display_y; -static int display_type; -static int dis_width, dis_height; - -// Hide/show graphics widgets -static void hide_show_graphics_widgets(void) -{ - switch (display_type) { - case DISPLAY_WINDOW: - gtk_widget_show(w_frameskip); gtk_widget_show(l_frameskip); - break; - case DISPLAY_SCREEN: - gtk_widget_hide(w_frameskip); gtk_widget_hide(l_frameskip); - break; - } -} - -// "Window" video type selected -static void mn_window(...) -{ - display_type = DISPLAY_WINDOW; - hide_show_graphics_widgets(); -} - -// "Fullscreen" video type selected -static void mn_fullscreen(...) -{ - display_type = DISPLAY_SCREEN; - hide_show_graphics_widgets(); - PrefsReplaceInt32("frameskip", 1); -} - -// "5 Hz".."60Hz" selected -static void mn_5hz(...) {PrefsReplaceInt32("frameskip", 12);} -static void mn_7hz(...) {PrefsReplaceInt32("frameskip", 8);} -static void mn_10hz(...) {PrefsReplaceInt32("frameskip", 6);} -static void mn_15hz(...) {PrefsReplaceInt32("frameskip", 4);} -static void mn_30hz(...) {PrefsReplaceInt32("frameskip", 2);} -static void mn_60hz(...) {PrefsReplaceInt32("frameskip", 1);} -static void mn_dynamic(...) {PrefsReplaceInt32("frameskip", 0);} - -// QuickDraw acceleration -#ifdef SHEEPSHAVER -static void tb_gfxaccel(GtkWidget *widget) -{ - PrefsReplaceBool("gfxaccel", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// Set sensitivity of widgets -static void set_graphics_sensitive(void) -{ - const bool sound_enabled = !PrefsFindBool("nosound"); -} - -// "Disable Sound Output" button toggled -static void tb_nosound(GtkWidget *widget) -{ - PrefsReplaceBool("nosound", GTK_TOGGLE_BUTTON(widget)->active); - set_graphics_sensitive(); -} - -// Read graphics preferences -static void parse_graphics_prefs(void) -{ - display_type = DISPLAY_WINDOW; -#ifdef SHEEPSHAVER - dis_width = 640; - dis_height = 480; -#else - dis_width = 512; - dis_height = 384; -#endif - - const char *str = PrefsFindString("screen"); - if (str) { - if (sscanf(str, "win/%d/%d", &dis_width, &dis_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) - display_type = DISPLAY_SCREEN; - } -} - -// Read settings from widgets and set preferences -static void read_graphics_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_display_x)); - dis_width = atoi(str); - - str = gtk_entry_get_text(GTK_ENTRY(w_display_y)); - dis_height = atoi(str); - - char pref[256]; - switch (display_type) { - case DISPLAY_WINDOW: - sprintf(pref, "win/%d/%d", dis_width, dis_height); - break; - case DISPLAY_SCREEN: - sprintf(pref, "dga/%d/%d", dis_width, dis_height); - break; - default: - PrefsRemoveItem("screen"); - return; - } - PrefsReplaceString("screen", pref); -} - -// Create "Graphics/Sound" pane -static void create_graphics_pane(GtkWidget *top) -{ - GtkWidget *box, *table, *label, *opt, *menu, *combo; - char str[32]; - - parse_graphics_prefs(); - - box = make_pane(top, STR_GRAPHICS_SOUND_PANE_TITLE); - table = make_table(box, 2, 5); - - label = gtk_label_new(GetString(STR_VIDEO_TYPE_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - add_menu_item(menu, STR_WINDOW_LAB, GTK_SIGNAL_FUNC(mn_window)); - add_menu_item(menu, STR_FULLSCREEN_LAB, GTK_SIGNAL_FUNC(mn_fullscreen)); - switch (display_type) { - case DISPLAY_WINDOW: - gtk_menu_set_active(GTK_MENU(menu), 0); - break; - case DISPLAY_SCREEN: - gtk_menu_set_active(GTK_MENU(menu), 1); - break; - } - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_frameskip = gtk_label_new(GetString(STR_FRAMESKIP_CTRL)); - gtk_widget_show(l_frameskip); - gtk_table_attach(GTK_TABLE(table), l_frameskip, 0, 1, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_frameskip = gtk_option_menu_new(); - gtk_widget_show(w_frameskip); - menu = gtk_menu_new(); - add_menu_item(menu, STR_REF_5HZ_LAB, GTK_SIGNAL_FUNC(mn_5hz)); - add_menu_item(menu, STR_REF_7_5HZ_LAB, GTK_SIGNAL_FUNC(mn_7hz)); - add_menu_item(menu, STR_REF_10HZ_LAB, GTK_SIGNAL_FUNC(mn_10hz)); - add_menu_item(menu, STR_REF_15HZ_LAB, GTK_SIGNAL_FUNC(mn_15hz)); - add_menu_item(menu, STR_REF_30HZ_LAB, GTK_SIGNAL_FUNC(mn_30hz)); - add_menu_item(menu, STR_REF_60HZ_LAB, GTK_SIGNAL_FUNC(mn_60hz)); - add_menu_item(menu, STR_REF_DYNAMIC_LAB, GTK_SIGNAL_FUNC(mn_dynamic)); - int frameskip = PrefsFindInt32("frameskip"); - int item = -1; - switch (frameskip) { - case 12: item = 0; break; - case 8: item = 1; break; - case 6: item = 2; break; - case 4: item = 3; break; - case 2: item = 4; break; - case 1: item = 5; break; - case 0: item = 6; break; - } - if (item >= 0) - gtk_menu_set_active(GTK_MENU(menu), item); - gtk_option_menu_set_menu(GTK_OPTION_MENU(w_frameskip), menu); - gtk_table_attach(GTK_TABLE(table), w_frameskip, 1, 2, 1, 2, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_display_x = gtk_label_new(GetString(STR_DISPLAY_X_CTRL)); - gtk_widget_show(l_display_x); - gtk_table_attach(GTK_TABLE(table), l_display_x, 0, 1, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist1 = NULL; - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_512_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_640_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_800_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_1024_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist1); - if (dis_width) - sprintf(str, "%d", dis_width); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 2, 3, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_x = GTK_COMBO(combo)->entry; - - l_display_y = gtk_label_new(GetString(STR_DISPLAY_Y_CTRL)); - gtk_widget_show(l_display_y); - gtk_table_attach(GTK_TABLE(table), l_display_y, 0, 1, 3, 4, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist2 = NULL; - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_384_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_480_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_600_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_768_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist2); - if (dis_height) - sprintf(str, "%d", dis_height); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 3, 4, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_y = GTK_COMBO(combo)->entry; - -#ifdef SHEEPSHAVER - make_checkbox(box, STR_GFXACCEL_CTRL, "gfxaccel", GTK_SIGNAL_FUNC(tb_gfxaccel)); -#endif - - make_separator(box); - make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); - - set_graphics_sensitive(); - - hide_show_graphics_widgets(); -} - - -/* - * "Input" pane - */ - -static GtkWidget *w_keycode_file; -static GtkWidget *w_mouse_wheel_lines; - -// Set sensitivity of widgets -static void set_input_sensitive(void) -{ - const bool use_keycodes = PrefsFindBool("keycodes"); - gtk_widget_set_sensitive(w_keycode_file, use_keycodes); - gtk_widget_set_sensitive(GTK_WIDGET(g_object_get_data(G_OBJECT(w_keycode_file), "chooser_button")), use_keycodes); - gtk_widget_set_sensitive(w_mouse_wheel_lines, PrefsFindInt32("mousewheelmode") == 1); -} - -// "Use Raw Keycodes" button toggled -static void tb_keycodes(GtkWidget *widget) -{ - PrefsReplaceBool("keycodes", GTK_TOGGLE_BUTTON(widget)->active); - set_input_sensitive(); -} - -// "Mouse Wheel Mode" selected -static void mn_wheel_page(...) {PrefsReplaceInt32("mousewheelmode", 0); set_input_sensitive();} -static void mn_wheel_cursor(...) {PrefsReplaceInt32("mousewheelmode", 1); set_input_sensitive();} - -// Read settings from widgets and set preferences -static void read_input_settings(void) -{ - const char *str = get_file_entry_path(w_keycode_file); - if (str && strlen(str)) - PrefsReplaceString("keycodefile", str); - else - PrefsRemoveItem("keycodefile"); - - PrefsReplaceInt32("mousewheellines", gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(w_mouse_wheel_lines))); -} - -// Create "Input" pane -static void create_input_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *menu, *label, *button; - GtkObject *adj; - - box = make_pane(top, STR_INPUT_PANE_TITLE); - - make_checkbox(box, STR_KEYCODES_CTRL, "keycodes", GTK_SIGNAL_FUNC(tb_keycodes)); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_KEYCODES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - const char *str = PrefsFindString("keycodefile"); - if (str == NULL) - str = ""; - - w_keycode_file = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(w_keycode_file), str); - gtk_widget_show(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), w_keycode_file, TRUE, TRUE, 0); - - button = make_browse_button(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(w_keycode_file), "chooser_button", button); - - make_separator(box); - - static const opt_desc options[] = { - {STR_MOUSEWHEELMODE_PAGE_LAB, GTK_SIGNAL_FUNC(mn_wheel_page)}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, GTK_SIGNAL_FUNC(mn_wheel_cursor)}, - {0, NULL} - }; - int wheelmode = PrefsFindInt32("mousewheelmode"), active = 0; - switch (wheelmode) { - case 0: active = 0; break; - case 1: active = 1; break; - } - menu = make_option_menu(box, STR_MOUSEWHEELMODE_CTRL, options, active); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_MOUSEWHEELLINES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - adj = gtk_adjustment_new(PrefsFindInt32("mousewheellines"), 1, 1000, 1, 5, 0); - w_mouse_wheel_lines = gtk_spin_button_new(GTK_ADJUSTMENT(adj), 0.0, 0); - gtk_widget_show(w_mouse_wheel_lines); - gtk_box_pack_start(GTK_BOX(hbox), w_mouse_wheel_lines, FALSE, FALSE, 0); - - set_input_sensitive(); -} - - -/* - * "Serial" pane - */ - -static GtkWidget *w_seriala, *w_portfile0; -static GtkWidget *w_serialb, *w_portfile1; - -// Set sensitivity of widgets -static void set_serial_sensitive(void) -{ - const char *str; - bool is_file; - - str = gtk_entry_get_text(GTK_ENTRY(w_seriala)); - is_file = strcmp(str, "FILE") == 0; - gtk_widget_set_sensitive(w_portfile0, is_file); - gtk_widget_set_sensitive(GTK_WIDGET(g_object_get_data(G_OBJECT(w_portfile0), "chooser_button")), is_file); - - str = gtk_entry_get_text(GTK_ENTRY(w_serialb)); - is_file = strcmp(str, "FILE") == 0; - gtk_widget_set_sensitive(w_portfile1, is_file); - gtk_widget_set_sensitive(GTK_WIDGET(g_object_get_data(G_OBJECT(w_portfile1), "chooser_button")), is_file); -} - -// Read settings from widgets and set preferences -static void read_serial_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_seriala)); - PrefsReplaceString("seriala", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_serialb)); - PrefsReplaceString("serialb", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_portfile0)); - PrefsReplaceString("portfile0", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_portfile1)); - PrefsReplaceString("portfile1", str); -} - -// Port changed in combo -static void cb_serial_port_changed(...) -{ - set_serial_sensitive(); -} - -// Add names of serial devices -static GList *add_serial_names(void) -{ - GList *glist = NULL; - - static const char *port_names[] = { - "COM1", "COM2", "COM3", "COM4", "COM5", "COM6", - "LPT1", "LPT2", "LPT3", "LPT4", "LPT5", "LPT6", - "FILE", - NULL - }; - - for (int i = 0; port_names[i] != NULL; i++) - glist = g_list_append(glist, (void *)port_names[i]); - - return glist; -} - -// Create "Serial" pane -static void create_serial_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *table, *label, *combo, *sep, *entry; - GtkObject *adj; - - box = make_pane(top, STR_SERIAL_PANE_TITLE); - table = make_table(box, 2, 5); - - GList *glist = add_serial_names(); - const char *str = PrefsFindString("seriala"); - combo = table_make_combobox(table, 0, STR_SERIALA_CTRL, str, glist); - w_seriala = GTK_COMBO(combo)->entry; - gtk_signal_connect(GTK_OBJECT(w_seriala), "changed", GTK_SIGNAL_FUNC(cb_serial_port_changed), NULL); - - w_portfile0 = table_make_file_entry(table, 1, STR_FILE_CTRL, "portfile0"); - - sep = gtk_hseparator_new(); - gtk_widget_show(sep); - gtk_table_attach(GTK_TABLE(table), sep, 0, 2, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - str = PrefsFindString("serialb"); - combo = table_make_combobox(table, 3, STR_SERIALB_CTRL, str, glist); - w_serialb = GTK_COMBO(combo)->entry; - gtk_signal_connect(GTK_OBJECT(w_serialb), "changed", GTK_SIGNAL_FUNC(cb_serial_port_changed), NULL); - - w_portfile1 = table_make_file_entry(table, 4, STR_FILE_CTRL, "portfile1"); - - set_serial_sensitive(); -} - - -/* - * "Ethernet" pane - */ - -static GtkWidget *w_ftp_port_list, *w_tcp_port_list; - -// Set sensitivity of widgets -static void set_ethernet_sensitive(void) -{ - const char *str = PrefsFindString("ether"); - - bool is_router = str && strcmp(str, "router") == 0; - gtk_widget_set_sensitive(w_ftp_port_list, is_router); - gtk_widget_set_sensitive(w_tcp_port_list, is_router); -} - -// Read settings from widgets and set preferences -static void read_ethernet_settings(void) -{ - const char *str = PrefsFindString("ether"); - - bool is_router = str && strcmp(str, "router") == 0; - if (is_router) { - str = gtk_entry_get_text(GTK_ENTRY(w_ftp_port_list)); - PrefsReplaceString("ftp_port_list", str); - str = gtk_entry_get_text(GTK_ENTRY(w_tcp_port_list)); - PrefsReplaceString("tcp_port", str); - } -} - -// Ethernet emulation type changed in menulist -static void cb_ether_changed(...) -{ - set_ethernet_sensitive(); -} - -// Ethernet option "None" selected -static void mn_ether_none(void) -{ - PrefsRemoveItem("ether"); - PrefsRemoveItem("etherguid"); -} - -// Ethernet option "Basilisk II Router" selected -static void mn_ether_router(void) -{ - PrefsReplaceString("ether", "router"); - PrefsRemoveItem("etherguid"); -} - -// Ethernet option "Basilisk II Slirp" selected -static void mn_ether_slirp(void) -{ - PrefsReplaceString("ether", "slirp"); - PrefsRemoveItem("etherguid"); -} - -// Ethernet option for Basilisk II driver selected -static void mn_ether_b2ether(GtkWidget *, const char *guid) -{ - PrefsReplaceString("ether", "b2ether"); - PrefsReplaceString("etherguid", guid); -} - -// Ethernet option for Basilisk II driver selected -static void mn_ether_tap(GtkWidget *, const char *guid) -{ - PrefsReplaceString("ether", "tap"); - PrefsReplaceString("etherguid", guid); -} - -// Create ethernet interfaces menu -static int create_ether_menu(GtkWidget *menu) -{ - int active = -1; - int n_items = 0; - const char *ether = PrefsFindString("ether"); - const char *etherguid = PrefsFindString("etherguid"); - - // No Ethernet - add_menu_item(menu, STR_NONE_LAB, (GtkSignalFunc)mn_ether_none); - if (ether == NULL) - active = n_items; - n_items++; - - // Basilisk II Router - add_menu_item(menu, "Basilisk II Router", (GtkSignalFunc)mn_ether_router); - if (ether && strcmp(ether, "router") == 0) - active = n_items; - n_items++; - - // Basilisk II Slirp - add_menu_item(menu, "Basilisk II Slirp", (GtkSignalFunc)mn_ether_slirp); - if (ether && strcmp(ether, "slirp") == 0) - active = n_items; - n_items++; - - // Basilisk II Ethernet Adapter - PacketOpenAdapter("", 0); - { - ULONG sz; - char names[1024]; - sz = sizeof(names); - if (PacketGetAdapterNames(NULL, names, &sz) == ERROR_SUCCESS) { - char *p = names; - while (*p) { - const char DEVICE_HEADER[] = "\\Device\\B2ether_"; - if (strnicmp(p, DEVICE_HEADER, sizeof(DEVICE_HEADER) - 1) == 0) { - LPADAPTER fd = PacketOpenAdapter(p + sizeof(DEVICE_HEADER) - 1, 0); - if (fd) { - char guid[256]; - sprintf(guid, "%s", p + sizeof(DEVICE_HEADER) - 1); - const char *name = ether_guid_to_name(guid); - if (name && (name = g_locale_to_utf8(name, -1, NULL, NULL, NULL))) { - add_menu_item(menu, name, (GtkSignalFunc)mn_ether_b2ether, strdup(guid)); - if (etherguid && strcmp(guid, etherguid) == 0 && - ether && strcmp(ether, "b2ether") == 0) - active = n_items; - n_items++; - } - PacketCloseAdapter(fd); - } - } - p += strlen(p) + 1; - } - } - } - PacketCloseAdapter(NULL); - - // TAP-Win32 - const char *tap_devices; - if ((tap_devices = ether_tap_devices()) != NULL) { - const char *guid = tap_devices; - while (*guid) { - const char *name = ether_guid_to_name(guid); - if (name && (name = g_locale_to_utf8(name, -1, NULL, NULL, NULL))) { - add_menu_item(menu, name, (GtkSignalFunc)mn_ether_tap, strdup(guid)); - if (etherguid && strcmp(guid, etherguid) == 0 && - ether && strcmp(ether, "tap") == 0) - active = n_items; - n_items++; - } - guid += strlen(guid) + 1; - } - free((char *)tap_devices); - } - - return active; -} - -// Create "Ethernet" pane -static void create_ethernet_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *table, *label, *sep, *entry, *opt, *menu, *item; - - box = make_pane(top, STR_NETWORK_PANE_TITLE); - table = make_table(box, 2, 5); - - label = gtk_label_new(GetString(STR_ETHERNET_IF_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - int active = create_ether_menu(menu); - if (active >= 0) - gtk_menu_set_active(GTK_MENU(menu), active); - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, 0, 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - gtk_signal_connect(GTK_OBJECT(opt), "changed", GTK_SIGNAL_FUNC(cb_ether_changed), NULL); - - sep = gtk_hseparator_new(); - gtk_widget_show(sep); - gtk_table_attach(GTK_TABLE(table), sep, 0, 2, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - label = gtk_label_new(GetString(STR_ETHER_FTP_PORT_LIST_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - entry = gtk_entry_new(); - const char *str = PrefsFindString("ftp_port_list"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_table_attach(GTK_TABLE(table), entry, 1, 2, 2, 3, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_ftp_port_list = entry; - - label = gtk_label_new(GetString(STR_ETHER_TCP_PORT_LIST_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 3, 4, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - entry = gtk_entry_new(); - str = PrefsFindString("tcp_port"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_table_attach(GTK_TABLE(table), entry, 1, 2, 3, 4, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_tcp_port_list = entry; - - set_ethernet_sensitive(); -} - - -/* - * "Memory/Misc" pane - */ - -static GtkWidget *w_ramsize; -static GtkWidget *w_rom_file; - -// Don't use CPU when idle? -static void tb_idlewait(GtkWidget *widget) -{ - PrefsReplaceBool("idlewait", GTK_TOGGLE_BUTTON(widget)->active); -} - -// "Ignore SEGV" button toggled -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION -static void tb_ignoresegv(GtkWidget *widget) -{ - PrefsReplaceBool("ignoresegv", GTK_TOGGLE_BUTTON(widget)->active); -} -#endif - -// Model ID selected -static void mn_modelid_5(...) {PrefsReplaceInt32("modelid", 5);} -static void mn_modelid_14(...) {PrefsReplaceInt32("modelid", 14);} - -// CPU/FPU type -static void mn_cpu_68020(...) {PrefsReplaceInt32("cpu", 2); PrefsReplaceBool("fpu", false);} -static void mn_cpu_68020_fpu(...) {PrefsReplaceInt32("cpu", 2); PrefsReplaceBool("fpu", true);} -static void mn_cpu_68030(...) {PrefsReplaceInt32("cpu", 3); PrefsReplaceBool("fpu", false);} -static void mn_cpu_68030_fpu(...) {PrefsReplaceInt32("cpu", 3); PrefsReplaceBool("fpu", true);} -static void mn_cpu_68040(...) {PrefsReplaceInt32("cpu", 4); PrefsReplaceBool("fpu", true);} - -// Read settings from widgets and set preferences -static void read_memory_settings(void) -{ - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_ramsize)->entry)); - PrefsReplaceInt32("ramsize", atoi(str) << 20); - - str = get_file_entry_path(w_rom_file); - if (str && strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); - -} - -// Create "Memory/Misc" pane -static void create_memory_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *table, *label, *scale, *menu; - - box = make_pane(top, STR_MEMORY_MISC_PANE_TITLE); - table = make_table(box, 2, 5); - - static const combo_desc options[] = { -#ifndef SHEEPSHAVER - STR_RAMSIZE_2MB_LAB, -#endif - STR_RAMSIZE_4MB_LAB, - STR_RAMSIZE_8MB_LAB, - STR_RAMSIZE_16MB_LAB, - STR_RAMSIZE_32MB_LAB, - STR_RAMSIZE_64MB_LAB, - STR_RAMSIZE_128MB_LAB, - STR_RAMSIZE_256MB_LAB, - STR_RAMSIZE_512MB_LAB, - STR_RAMSIZE_1024MB_LAB, - 0 - }; - char default_ramsize[16]; - sprintf(default_ramsize, "%d", PrefsFindInt32("ramsize") >> 20); - w_ramsize = table_make_combobox(table, 0, STR_RAMSIZE_CTRL, default_ramsize, options); - -#ifndef SHEEPSHAVER - static const opt_desc model_options[] = { - {STR_MODELID_5_LAB, GTK_SIGNAL_FUNC(mn_modelid_5)}, - {STR_MODELID_14_LAB, GTK_SIGNAL_FUNC(mn_modelid_14)}, - {0, NULL} - }; - int modelid = PrefsFindInt32("modelid"), active = 0; - switch (modelid) { - case 5: active = 0; break; - case 14: active = 1; break; - } - table_make_option_menu(table, 2, STR_MODELID_CTRL, model_options, active); -#endif - -#if EMULATED_68K - static const opt_desc cpu_options[] = { - {STR_CPU_68020_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020)}, - {STR_CPU_68020_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020_fpu)}, - {STR_CPU_68030_LAB, GTK_SIGNAL_FUNC(mn_cpu_68030)}, - {STR_CPU_68030_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68030_fpu)}, - {STR_CPU_68040_LAB, GTK_SIGNAL_FUNC(mn_cpu_68040)}, - {0, NULL} - }; - int cpu = PrefsFindInt32("cpu"); - bool fpu = PrefsFindBool("fpu"); - active = 0; - switch (cpu) { - case 2: active = fpu ? 1 : 0; break; - case 3: active = fpu ? 3 : 2; break; - case 4: active = 4; - } - table_make_option_menu(table, 3, STR_CPU_CTRL, cpu_options, active); -#endif - - w_rom_file = table_make_file_entry(table, 4, STR_ROM_FILE_CTRL, "rom"); - - make_checkbox(box, STR_IDLEWAIT_CTRL, "idlewait", GTK_SIGNAL_FUNC(tb_idlewait)); - -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - make_checkbox(box, STR_IGNORESEGV_CTRL, "ignoresegv", GTK_SIGNAL_FUNC(tb_ignoresegv)); -#endif -} - - -/* - * Read settings from widgets and set preferences - */ - -static void read_settings(void) -{ - read_volumes_settings(); - read_scsi_settings(); - read_graphics_settings(); - read_input_settings(); - read_serial_settings(); - read_ethernet_settings(); - read_memory_settings(); - read_jit_settings(); -} - - -/* - * Fake unused data and functions - */ - -uint8 XPRAM[XPRAM_SIZE]; -void MountVolume(void *fh) { } -void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size) { } -void recycle_write_packet(LPPACKET) { } -VOID CALLBACK packet_read_completion(DWORD, DWORD, LPOVERLAPPED) { } - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ - PrefsAddString("seriala", "COM1"); - PrefsAddString("serialb", "COM2"); -} - - -/* - * Display alerts - */ - -static void display_alert(int title_id, const char *text, int flags) -{ - MessageBox(NULL, text, GetString(title_id), MB_OK | flags); -} - -void ErrorAlert(const char *text) -{ - display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); -} - -void WarningAlert(const char *text) -{ - display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONSTOP); -} - - -/* - * Start standalone GUI - */ - -int main(int argc, char *argv[]) -{ - // Init GTK - gtk_set_locale(); - gtk_init(&argc, &argv); - - // Read preferences - PrefsInit(NULL, argc, argv); - - // Migrate preferences - PrefsMigrate(); - - // Show preferences editor - bool start = PrefsEditor(); - - // Exit preferences - PrefsExit(); - - // Transfer control to the executable - if (start) { - char path[_MAX_PATH]; - bool ok = GetModuleFileName(NULL, path, sizeof(path)) != 0; - if (ok) { - char b2_path[_MAX_PATH]; - char *p = strrchr(path, '\\'); - *++p = '\0'; - SetCurrentDirectory(path); - strcpy(b2_path, path); - strcat(b2_path, PROGRAM_NAME); - strcat(b2_path, ".exe"); - HINSTANCE h = ShellExecute(GetDesktopWindow(), "open", - b2_path, "", path, SW_SHOWNORMAL); - if ((int)h <= 32) - ok = false; - } - if (!ok) { - ErrorAlert("Coult not start " PROGRAM_NAME " executable"); - return 1; - } - } - - return 0; -} diff --git a/BasiliskII/src/Windows/prefs_windows.cpp b/BasiliskII/src/Windows/prefs_windows.cpp deleted file mode 100755 index ed837b865..000000000 --- a/BasiliskII/src/Windows/prefs_windows.cpp +++ /dev/null @@ -1,137 +0,0 @@ -/* - * prefs_windows.cpp - Preferences handling, Windows specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include - -#include -typedef std::basic_string tstring; - -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, - {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, - {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, - {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {"enableextfs", TYPE_BOOLEAN, false, "enable extfs system"}, - {"debugextfs", TYPE_BOOLEAN, false, "debug extfs system"}, - {"extdrives", TYPE_STRING, false, "define allowed extfs drives"}, - {"pollmedia", TYPE_BOOLEAN, false, "poll for new media (e.g. cd, floppy)"}, - {"etherguid", TYPE_STRING, false, "GUID of the ethernet device to use"}, - {"etherpermanentaddress", TYPE_BOOLEAN, false, "use permanent NIC address to identify itself"}, - {"ethermulticastmode", TYPE_INT32, false, "how to multicast packets"}, - {"etherfakeaddress", TYPE_STRING, false, "optional fake hardware address"}, - {"routerenabled", TYPE_BOOLEAN, false, "enable NAT/Router module"}, - {"ftp_port_list", TYPE_STRING, false, "FTP ports list"}, - {"tcp_port", TYPE_STRING, false, "TCP ports list"}, - {"portfile0", TYPE_STRING, false, "output file for serial port 0"}, - {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, - - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name and path -const TCHAR PREFS_FILE_NAME[] = TEXT("BasiliskII_prefs"); -tstring UserPrefsPath; -static tstring prefs_path; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - // Construct prefs path - if (UserPrefsPath.empty()) { - int pwd_len = GetCurrentDirectory(0, NULL); - prefs_path.resize(pwd_len); - pwd_len = GetCurrentDirectory(pwd_len, &prefs_path.front()); - prefs_path[pwd_len] = TEXT('\\'); - prefs_path += PREFS_FILE_NAME; - } else - prefs_path = UserPrefsPath; - - // Read preferences from settings file - FILE *f = _tfopen(prefs_path.c_str(), TEXT("r")); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = _tfopen(prefs_path.c_str(), TEXT("w"))) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsAddBool("keycodes", false); - PrefsReplaceBool("pollmedia", true); - PrefsReplaceBool("enableextfs", false); - PrefsReplaceString("extfs", ""); - PrefsReplaceString("extdrives", "CDEFGHIJKLMNOPQRSTUVWXYZ"); - PrefsReplaceInt32("mousewheelmode", 1); - PrefsReplaceInt32("mousewheellines", 3); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif - PrefsAddBool("idlewait", true); - PrefsReplaceBool("etherpermanentaddress", true); - PrefsReplaceInt32("ethermulticastmode", 0); - PrefsReplaceString("ftp_port_list", "21"); - PrefsReplaceString("seriala", "COM1"); - PrefsReplaceString("serialb", "COM2"); - PrefsReplaceString("portfile0", "C:\\B2TEMP0.OUT"); - PrefsReplaceString("portfile1", "C:\\B2TEMP1.OUT"); -} diff --git a/BasiliskII/src/Windows/router/arp.cpp b/BasiliskII/src/Windows/router/arp.cpp deleted file mode 100755 index 69a118792..000000000 --- a/BasiliskII/src/Windows/router/arp.cpp +++ /dev/null @@ -1,96 +0,0 @@ -/* - * arp.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "cpu_emulation.h" -#include "prefs.h" -#include "ether_windows.h" -#include "ether.h" -#include "router.h" -#include "router_types.h" -#include "iphelp.h" -#include "arp.h" -#include "icmp.h" -#include "dump.h" - - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -// ARP queries can be replied immediately. - -bool write_arp( arp_t *req, int len ) -{ - D(bug("write_arp() len=%d, htype=%d, ptype=%04x, opcode=%d, halen=%d, palen=%d\r\n",len, ntohs(req->htype), ntohs(req->ptype), ntohs(req->opcode), req->halen, req->palen)); - - start_icmp_listen(); - - bool result = false; - - if( len >= sizeof(arp_t) && - req->htype == htons(arp_hwtype_enet) && - req->ptype == htons(mac_type_ip4) && - req->opcode == htons(arp_request) && - req->halen == 6 && - req->palen == 4 - ) - { - if(memcmp( req->srcp, req->dstp, 4 ) == 0) { - // No reply. MacOS is making sure that there are no duplicate ip addresses. - // Update localhost (==Mac) ip address (needed by incoming icmp) - macos_ip_address = ntohl( *((uint32 *)&req->srcp[0]) ); - D(bug("Mac ip: %02x %02x %02x %02x\r\n", req->srcp[0], req->srcp[1], req->srcp[2], req->srcp[3])); - } else { - arp_t arp; - - D(bug("Source NIC: %02x %02x %02x %02x\r\n", req->srcp[0], req->srcp[1], req->srcp[2], req->srcp[3])); - D(bug("Dest NIC: %02x %02x %02x %02x\r\n", req->dstp[0], req->dstp[1], req->dstp[2], req->dstp[3])); - - // memcpy( arp.mac.dest, req->mac.src, 6 ); - memcpy( arp.mac.dest, ether_addr, 6 ); - memcpy( arp.mac.src, router_mac_addr, 6 ); - arp.mac.type = htons(mac_type_arp); - arp.htype = htons(arp_hwtype_enet); - arp.ptype = htons(mac_type_ip4); - arp.halen = 6; - arp.palen = 4; - arp.opcode = htons(arp_reply); - memcpy( arp.srch, router_mac_addr, 6 ); - memcpy( arp.srcp, req->dstp, 4 ); - // memcpy( arp.dsth, req->srch, 6 ); - memcpy( arp.dsth, ether_addr, 6 ); - memcpy( arp.dstp, req->srcp, 4 ); - - // Update here, too, just in case. - macos_ip_address = ntohl( *((uint32 *)&req->srcp[0]) ); - - enqueue_packet( (uint8 *)&arp, sizeof(arp) ); - } - result = true; - } - return result; -} diff --git a/BasiliskII/src/Windows/router/arp.h b/BasiliskII/src/Windows/router/arp.h deleted file mode 100755 index c44443d95..000000000 --- a/BasiliskII/src/Windows/router/arp.h +++ /dev/null @@ -1,28 +0,0 @@ -/* - * arp.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _ARP_H_ -#define _ARP_H_ - -bool write_arp( arp_t *req, int len ); - -#endif // _ARP_H_ diff --git a/BasiliskII/src/Windows/router/dump.cpp b/BasiliskII/src/Windows/router/dump.cpp deleted file mode 100755 index 4d3fe7319..000000000 --- a/BasiliskII/src/Windows/router/dump.cpp +++ /dev/null @@ -1,50 +0,0 @@ -/* - * dump.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "dump.h" - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -void dump_bytes( uint8 *packet, int length ) -{ -#if DEBUG - char buf[1000], sm[10]; - - *buf = 0; - - if(length > 256) length = 256; - - for (int i=0; i -#include "dump.h" -#include "prefs.h" -#include "ftp.h" - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - -static int m_ftp_port_count = 0; -#define MAX_FTP_PORTS 100 -static uint16 m_ftp_ports[MAX_FTP_PORTS]; - -bool ftp_is_ftp_port( uint16 port ) -{ - for( int i=0; i> 24, - (ip >> 16) & 0xFF, - (ip >> 8) & 0xFF, - ip & 0xFF, - (port >> 8) & 0xFF, - port & 0xFF, - 0x0d, 0x0a - ); - - count = strlen(buf); - - D(bug("ftp_modify_port_command: \"%s\"\r\n", buf )); -} - -// this should be robust. rather skip it than do anything dangerous. -void ftp_parse_port_command( - char *buf, - uint32 count, - uint16 &ftp_data_port, - bool is_pasv -) -{ - ftp_data_port = 0; - - if( !count ) return; - - uint8 b[100]; - uint32 ftp_ip = 0; - - // make it a c-string - if( count >= sizeof(b) ) count = sizeof(b)-1; - memcpy( b, buf, count ); - b[ count ] = 0; - - for( uint32 i=0; i 'z' ) { - b[i] = ' '; - } else { - b[i] = tolower(b[i]); - } - } - - // D(bug("FTP: \"%s\"\r\n", b )); - - char *s = (char *)b; - - while( *s == ' ' ) s++; - - if(is_pasv) { - /* - LOCAL SERVER: ..227 Entering Passive Mode (192,168,0,2,6,236). 0d 0a - */ - if( atoi(s) == 227 && strstr(s,"passive") ) { - while( *s && *s != '(' ) s++; - if( *s++ == 0 ) s = 0; - } else { - s = 0; - } - } else { - /* - LOCAL CLIENT: PORT 192,168,0,1,14,147 0d 0a - */ - if( strncmp(s,"port ",5) == 0 ) { - s += 5; - } else { - s = 0; - } - } - - if(s && *s) { - // get remote ip (used only for verification) - for( uint32 i=0; i<4; i++ ) { - while( *s == ' ' ) s++; - if(!isdigit(*s)) { - ftp_ip = 0; - break; - } - ftp_ip = (ftp_ip << 8) + atoi(s); - while( *s && *s != ',' ) s++; - if(!*s) { - ftp_ip = 0; - break; - } - s++; - } - - if(ftp_ip) { - // get local port - for( uint32 i=0; i<2; i++ ) { - while( *s == ' ' ) s++; - if(!isdigit(*s)) { - ftp_data_port = 0; - break; - } - ftp_data_port = (ftp_data_port << 8) + atoi(s); - while( *s && *s != ',' && *s != ')' ) s++; - if(!*s) - break; - else - s++; - } - } - } - if(ftp_data_port) { - D(bug("ftp_parse_port_command: \"%s\"; port is %d\r\n", b, ftp_data_port )); - } -} diff --git a/BasiliskII/src/Windows/router/ftp.h b/BasiliskII/src/Windows/router/ftp.h deleted file mode 100755 index 5dc6dfda0..000000000 --- a/BasiliskII/src/Windows/router/ftp.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * ftp.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _FTP_H_ -#define _FTP_H_ - -// Read the preferences. -void init_ftp(); - -// Compares against a list provided by the user. -bool ftp_is_ftp_port( uint16 port ); - -// Determine whether this is a ftp client PORT command or ftp server entering to passive mode. -void ftp_parse_port_command( - char *buf, - uint32 count, - uint16 &ftp_data_port, - bool is_pasv -); - -// Build a new command using ip and port. -void ftp_modify_port_command( - char *buf, - int &count, - const uint32 max_size, - const uint32 ip, - const uint16 port, - const bool is_pasv -); - -#endif // _FTP_H_ diff --git a/BasiliskII/src/Windows/router/icmp.cpp b/BasiliskII/src/Windows/router/icmp.cpp deleted file mode 100755 index d6cb0e0eb..000000000 --- a/BasiliskII/src/Windows/router/icmp.cpp +++ /dev/null @@ -1,221 +0,0 @@ -/* - * icmp.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "cpu_emulation.h" -#include "ws2tcpip.h" -#include "prefs.h" -#include "ether_windows.h" -#include "ether.h" -#include "router.h" -#include "router_types.h" -#include "dynsockets.h" -#include "ipsocket.h" -#include "iphelp.h" -#include "icmp.h" -#include "dump.h" - - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -// Saved for cleanup. -static socket_t *icmp_incoming_s = 0; - - -void stop_icmp_listen() -{ - if(icmp_incoming_s) { - delete icmp_incoming_s; - icmp_incoming_s = 0; - } -} - -void start_icmp_listen() -{ - if(!icmp_incoming_s) { - icmp_incoming_s = new socket_t(IPPROTO_ICMP); - - icmp_incoming_s->permanent = TRUE; - icmp_incoming_s->s = _socket( AF_INET, SOCK_RAW, IPPROTO_ICMP ); - - memset( &icmp_incoming_s->from, 0, icmp_incoming_s->from_len ); - icmp_incoming_s->from.sin_family = AF_INET; - - if(icmp_incoming_s->s == INVALID_SOCKET) { - D(bug("Failed to create icmp listening socket (NT/no admin?)\r\n" )); - delete icmp_incoming_s; - icmp_incoming_s = 0; - } else { - D(bug("icmp listening socket created\r\n" )); - raw_sockets_available = true; - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - if( _bind ( icmp_incoming_s->s, (const struct sockaddr *)&to, sizeof(to) ) == SOCKET_ERROR ) { - D(bug("Listening to inbound icmp failed, error code = %d\r\n", _WSAGetLastError() )); - _closesocket( icmp_incoming_s->s ); - delete icmp_incoming_s; - icmp_incoming_s = 0; - } else { - D(bug("icmp listening socket bound\r\n" )); - if(!icmp_incoming_s->b_recfrom()) { - D(bug("b_recfrom() from inbound icmp failed, error code = %d\r\n", _WSAGetLastError() )); - // _closesocket( icmp_incoming_s->s ); - // delete icmp_incoming_s; - // icmp_incoming_s = 0; - } - } - } - } -} - -void CALLBACK icmp_read_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -) -{ - D(bug("icmp_read_completion(error=0x%x, bytes_read=%d, flags=0x%x)\r\n", error, bytes_read, flags)); - - socket_t *cmpl = (socket_t *)lpOverlapped->hEvent; - - if(error == 0 && macos_ip_address != 0) { - if(bytes_read > 1460) { - D(bug("discarding oversized icmp packet, size = \r\n", bytes_read)); - } else { - int icmp_size = sizeof(mac_t) + bytes_read; - icmp_t *icmp = (icmp_t *)malloc( icmp_size ); - if(icmp) { - mac_t *mac = (mac_t *)icmp; - ip_t *ip = (ip_t *)icmp; - - memcpy( mac->dest, ether_addr, 6 ); - memcpy( mac->src, router_mac_addr, 6 ); - mac->type = htons(mac_type_ip4); - - // Copy payload (used by ICMP checksum) - memcpy( (char *)icmp + sizeof(mac_t), cmpl->buffers[0].buf, bytes_read ); - - switch( icmp->type ) { - // May need to patch the returned ip header. - case icmp_Destination_unreachable: - case icmp_Source_quench: - case icmp_Redirect: - case icmp_Time_exceeded: - case icmp_Parameter_problem: - ip_t *ip_if = (ip_t *)( (char *)icmp + sizeof(icmp_t) + sizeof(uint32) - sizeof(mac_t) ); - - // This would be needed (traceroute) - // ip_if->ident = ??; - - // Cannot fix some fields, this should be enough: - ip_if->src = htonl(macos_ip_address); - - if(ip_if->proto == ip_proto_udp) { - udp_t *udp_if = (udp_t *)ip_if; - // udp_if->src_port = ... don't know!; - } else if(ip_if->proto == ip_proto_tcp) { - tcp_t *tcp_if = (tcp_t *)ip_if; - // tcp_if->src_port = ... don't know!; - } - break; - } - - make_icmp_checksum( icmp, icmp_size ); - - // Replace the target ip address - ip->dest = htonl(macos_ip_address); - ip->ttl--; - make_ip4_checksum( ip ); - - dump_bytes( (uint8 *)icmp, icmp_size ); - - if( ip->ttl == 0 ) { - D(bug("icmp packet ttl expired\r\n")); - } else { - enqueue_packet( (uint8 *)icmp, icmp_size ); - } - free(icmp); - } - } - } - - memset( &cmpl->from, 0, cmpl->from_len ); - - if(is_router_shutting_down) { - delete cmpl; - } else if(cmpl->s == INVALID_SOCKET || !cmpl->b_recfrom()) { - // delete cmpl; - } -} - -void write_icmp( icmp_t *icmp, int len ) -{ - struct in_addr ia; - ia.s_addr = icmp->ip.dest; - D(bug("write_icmp(%s)\r\n", _inet_ntoa(ia) )); - - if(!raw_sockets_available) { - D(bug("write_icmp() cannot proceed, raw sockets not available\r\n" )); - return; - } - - if(len < sizeof(icmp_t)) { - D(bug("Too small icmp packet(%d), dropped\r\n", len)); - return; - } - - // must be updated, ttl changed - make_icmp_checksum( icmp, len ); - - SOCKET s = _socket( AF_INET, SOCK_RAW, IPPROTO_ICMP ); - if(s != INVALID_SOCKET) { - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - to.sin_addr.s_addr = icmp->ip.dest; - - char *data = (char *)icmp + sizeof(ip_t); - int dlen = len - sizeof(ip_t); - - int ttl = icmp->ip.ttl; - if(_setsockopt( s, IPPROTO_IP, IP_TTL, (const char *)&ttl, sizeof(int) ) == SOCKET_ERROR ) { - D(bug("could not set ttl to %d.\r\n", ttl)); - } else { - D(bug("ttl set to %d.\r\n", ttl)); - } - - if(SOCKET_ERROR == _sendto( s, data, dlen, 0, (struct sockaddr *)&to, sizeof(to) )) { - D(bug("Failed to send icmp via raw socket\r\n" )); - } - _closesocket(s); - } else { - D(bug("Could not create raw socket for icmp\r\n" )); - } -} diff --git a/BasiliskII/src/Windows/router/icmp.h b/BasiliskII/src/Windows/router/icmp.h deleted file mode 100755 index a3c306217..000000000 --- a/BasiliskII/src/Windows/router/icmp.h +++ /dev/null @@ -1,38 +0,0 @@ -/* - * icmp.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _ICMP_H_ -#define _ICMP_H_ - -void start_icmp_listen(); -void stop_icmp_listen(); - -void write_icmp( icmp_t *icmp, int len ); - -void CALLBACK icmp_read_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -); - -#endif // _ICMP_H_ diff --git a/BasiliskII/src/Windows/router/iphelp.cpp b/BasiliskII/src/Windows/router/iphelp.cpp deleted file mode 100755 index e77466e13..000000000 --- a/BasiliskII/src/Windows/router/iphelp.cpp +++ /dev/null @@ -1,236 +0,0 @@ -/* - * iphelp.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "cpu_emulation.h" -#include "ether_windows.h" -#include "ether.h" -#include "router.h" -#include "router_types.h" -#include "tcp.h" -#include "icmp.h" -#include "udp.h" -#include "iphelp.h" -#include "dump.h" - - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -void make_icmp_checksum( icmp_t *icmp, int len ) -{ - icmp->checksum = 0; - - uint16 sz = (len-sizeof(ip_t))/2; - uint16 *p = (uint16 *)( (uint8 *)icmp + sizeof(ip_t) ); - - uint32 sum32 = 0; - for( int i=0; ichecksum = htons((uint16)sum32); -} - -void make_tcp_checksum( tcp_t *tcp, int len ) -{ - tcp->checksum = 0; - - int tcp_len = len - sizeof(ip_t); - uint16 sz = tcp_len/2; - uint16 *p = (uint16 *)( (uint8 *)tcp + sizeof(ip_t) ); - - uint32 sum32 = 0; - for( int i=0; iip.src)); - pseudo.src_hi = HIWORD(ntohl(tcp->ip.src)); - pseudo.dest_lo = LOWORD(ntohl(tcp->ip.dest)); - pseudo.dest_hi = HIWORD(ntohl(tcp->ip.dest)); - pseudo.proto = (uint16)tcp->ip.proto; - pseudo.msg_len = tcp->header_len >> 2; - - int datalen = len - sizeof(tcp_t); - pseudo.msg_len += datalen; - - p = (uint16 *)&pseudo; - - for( int i=0; ichecksum = htons((uint16)sum32); -} - -void make_ip4_checksum( ip_t *ip ) -{ - ip->checksum = 0; - uint16 sz = ip->header_len * 2; - uint16 *p = (uint16 *)( (uint8 *)ip + sizeof(mac_t) ); - - uint32 sum32 = 0; - for( int i=0; ichecksum = htons((uint16)sum32); -} - -void make_udp_checksum( udp_t *udp ) -{ - udp->checksum = 0; - return; - - // UDP checksums are optional. - - /* - uint16 sz = ntohs(udp->msg_len) / 2; - uint16 *p = (uint16 *)( (uint8 *)udp + sizeof(ip_t) ); - - uint32 sum32 = 0; - for( int i=0; iip.src)); - pseudo.src_hi = HIWORD(ntohl(udp->ip.src)); - pseudo.dest_lo = LOWORD(ntohl(udp->ip.dest)); - pseudo.dest_hi = HIWORD(ntohl(udp->ip.dest)); - pseudo.proto = (uint16)udp->ip.proto; - pseudo.msg_len = ntohs(udp->msg_len); // ??? - - p = (uint16 *)&pseudo; - - for( i=0; ichecksum = htons((uint16)sum32); - */ -} - -void error_winsock_2_icmp( int err, ip_t *ip_err, int dlen_err ) -{ - int type = -1, code = -1, msg_size = 0; - - switch( err ) { - case WSAEHOSTUNREACH: - case WSAETIMEDOUT: - type = icmp_Destination_unreachable; - code = 1; // Host unreachable - msg_size = (ip_err->header_len << 2) + 4 + 8; // ip header + unused + 64 msg bits - break; - case WSAENETDOWN: - case WSAENETUNREACH: - type = icmp_Destination_unreachable; - code = 0; // Network unreachable - msg_size = (ip_err->header_len << 2) + 4 + 8; // ip header + unused + 64 msg bits - break; - case WSAETTLEXCEEDED: - type = icmp_Time_exceeded; - code = 0; // Transit TTL exceeded - msg_size = (ip_err->header_len << 2) + 4 + 8; // ip header + unused + 64 msg bits - break; - } - - if(type >= 0 && macos_ip_address != 0) { - D(bug("sending icmp error reply. type=%d, code=%d, msg_size=%d\r\n", type, code, msg_size)); - - int icmp_size = sizeof(icmp_t) + msg_size; - - icmp_t *icmp = (icmp_t *)malloc( icmp_size ); - if(icmp) { - mac_t *mac = (mac_t *)icmp; - ip_t *ip = (ip_t *)icmp; - - memcpy( mac->dest, ether_addr, 6 ); - memcpy( mac->src, router_mac_addr, 6 ); - mac->type = htons(mac_type_ip4); - - ip->version = 4; - ip->header_len = 5; - ip->tos = 0; - ip->total_len = htons(sizeof(icmp_t) - sizeof(mac_t) + msg_size); - - ip->ident = htons(next_ip_ident_number++); - ip->flags_n_frag_offset = 0; - ip->ttl = 128; - ip->proto = ip_proto_icmp; - ip->src = htonl(router_ip_address); - ip->dest = htonl(macos_ip_address); - make_ip4_checksum( ip ); - - icmp->type = type; - icmp->code = code; - - // zero out the unused field - memset( (char *)icmp + sizeof(icmp_t), 0, sizeof(uint32) ); - - // copy 64 bits of original message - memcpy( - (char *)icmp + sizeof(icmp_t) + sizeof(uint32), - (char *)ip_err + sizeof(mac_t), - msg_size - ); - - make_icmp_checksum( icmp, icmp_size ); - - dump_bytes( (uint8 *)icmp, icmp_size ); - - enqueue_packet( (uint8 *)icmp, icmp_size ); - free(icmp); - } - } -} diff --git a/BasiliskII/src/Windows/router/iphelp.h b/BasiliskII/src/Windows/router/iphelp.h deleted file mode 100755 index 513616da9..000000000 --- a/BasiliskII/src/Windows/router/iphelp.h +++ /dev/null @@ -1,36 +0,0 @@ -/* - * iphelp.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _IPHELP_H_ -#define _IPHELP_H_ - -// Fake ttl exceeded code. -#define WSAETTLEXCEEDED (WSABASEERR + 1999 + 17) - -void error_winsock_2_icmp( int err, ip_t *ip_err, int dlen_err ); - -void make_icmp_checksum( icmp_t *icmp, int len ); -void make_ip4_checksum( ip_t *ip ); -void make_udp_checksum( udp_t *udp ); -void make_tcp_checksum( tcp_t *tcp, int len ); - -#endif // _IPHELP_H_ diff --git a/BasiliskII/src/Windows/router/ipsocket.cpp b/BasiliskII/src/Windows/router/ipsocket.cpp deleted file mode 100755 index 21fef9a9c..000000000 --- a/BasiliskII/src/Windows/router/ipsocket.cpp +++ /dev/null @@ -1,266 +0,0 @@ -/* - * ipsocket.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "cpu_emulation.h" -#include "ws2tcpip.h" -#include "prefs.h" -#include "ether_windows.h" -#include "ether.h" -#include "router.h" -#include "router_types.h" -#include "dynsockets.h" -#include "ipsocket.h" -#include "icmp.h" -#include "tcp.h" -#include "udp.h" -#include "dump.h" - - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -socket_t::socket_t( int _proto ) -{ - s = INVALID_SOCKET; - proto = _proto; - - ip_src = ip_dest = 0; - src_port = dest_port = 0; - - memset( &overlapped, 0, sizeof(overlapped) ); - overlapped.hEvent = (HANDLE)this; - - bytes_received = 0; - flags = 0; - from_len = sizeof(struct sockaddr_in); - memset( &from, 0, sizeof(from) ); - from.sin_family = AF_INET; - - buffer_count = 1; - buffers[0].len = 1460; - buffers[0].buf = new char [buffers[0].len]; - - out_buffers[0].len = 1460; - out_buffers[0].buf = new char [out_buffers[0].len]; - - socket_ttl = GetTickCount() + 60000L; - permanent = false; -} - -socket_t::~socket_t() -{ - if(s != INVALID_SOCKET) { - _closesocket( s ); // slam! - s = INVALID_SOCKET; - } - delete [] out_buffers[0].buf; - delete [] buffers[0].buf; -} - -int socket_t::WSARecvFrom() -{ - return _WSARecvFrom( - s, - buffers, - buffer_count, - &bytes_received, - &flags, - (struct sockaddr *)&from, - &from_len, - &overlapped, - proto == IPPROTO_UDP ? udp_read_completion : icmp_read_completion - ); -} - -bool socket_t::b_recfrom() -{ - bool result; - - int ret = WSARecvFrom(); - - if(ret == SOCKET_ERROR) { - int socket_error = _WSAGetLastError(); - if(socket_error == WSA_IO_PENDING) { - D(bug("WSARecvFrom() i/o pending\r\n")); - result = true; - } else { - D(bug("_WSAGetLastError() returned %d\r\n", socket_error)); - result = false; - } - } else /*if(ret == 0) */ { - D(bug("WSARecvFrom() ok\r\n")); - // Completion routine call is already scheduled. - result = true; - } - return result; -} - -void socket_t::set_ttl( uint8 ttl ) -{ - int _ttl = ttl; // defensive programming, I know VCx - - if(_setsockopt( s, IPPROTO_IP, IP_TTL, (const char *)&_ttl, sizeof(int) ) == SOCKET_ERROR ) { - D(bug("could not set ttl to %d.\r\n", ttl)); - } else { - D(bug("ttl set to %d.\r\n", ttl)); - } -} - - -#define MAX_OPEN_SOCKETS 1024 -static socket_t *all_sockets[MAX_OPEN_SOCKETS]; -static int open_sockets = 0; - -int get_socket_index( uint16 src_port, uint16 dest_port, int proto ) -{ - int result = -1; - for( int i=0; isrc_port == src_port && cmpl->dest_port == dest_port && cmpl->proto == proto ) { - result = i; - break; - } - } - return result; -} - -int get_socket_index( uint16 src_port, int proto ) -{ - int result = -1; - for( int i=0; isrc_port == src_port && cmpl->proto == proto ) { - result = i; - break; - } - } - return result; -} - -int get_socket_index( socket_t *cmpl ) -{ - int result = -1; - for( int i=0; isrc_port, cmpl->dest_port)); - - EnterCriticalSection( &router_section ); - int i = get_socket_index( cmpl ); - if( i >= 0 ) { - delete all_sockets[i]; - all_sockets[i] = all_sockets[--open_sockets]; - } else { - D(bug("Deleted socket not in table!\r\n")); - // delete cmpl; - } - LeaveCriticalSection( &router_section ); -} - -socket_t *find_socket( uint16 src_port, uint16 dest_port, int proto ) -{ - socket_t *result = 0; - EnterCriticalSection( &router_section ); - int i = get_socket_index( src_port, dest_port, proto ); - if( i >= 0 ) { - result = all_sockets[i]; - } else { - i = get_socket_index( src_port, proto ); - if( i >= 0 ) { - delete_socket( all_sockets[i] ); - } - } - LeaveCriticalSection( &router_section ); - - D(bug("find_socket(%d,%d): %s\r\n", src_port, dest_port, result ? "found" : "not found")); - - return result; -} - -void add_socket( socket_t *cmpl ) -{ - D(bug("adding socket(%d,%d)\r\n", cmpl->src_port, cmpl->dest_port)); - - EnterCriticalSection( &router_section ); - if( open_sockets < MAX_OPEN_SOCKETS ) { - all_sockets[open_sockets++] = cmpl; - } else { - // Urgchiyuppijee! (that's finnish language, meaning "do something about this") - delete all_sockets[0]; - all_sockets[0] = cmpl; - } - LeaveCriticalSection( &router_section ); -} - -void close_old_sockets() -{ - DWORD now = GetTickCount(); - - EnterCriticalSection( &router_section ); - for( int i=open_sockets-1; i>=0; i-- ) { - socket_t *cmpl = all_sockets[i]; - if( !cmpl->permanent && now >= cmpl->socket_ttl ) { - D(bug("expiring socket(%d,%d)\r\n", cmpl->src_port, cmpl->dest_port)); - if(cmpl->s == INVALID_SOCKET) { - delete all_sockets[i]; - all_sockets[i] = all_sockets[--open_sockets]; - } else { - // read completion will deallocate - _closesocket( cmpl->s ); - } - } - } - LeaveCriticalSection( &router_section ); -} - -void close_all_sockets() -{ - D(bug("closing all(%d) sockets\r\n", open_sockets)); - - EnterCriticalSection( &router_section ); - for( int i=0; isrc_port, cmpl->dest_port)); - if(cmpl->s == INVALID_SOCKET) { - delete all_sockets[i]; - all_sockets[i] = all_sockets[--open_sockets]; - } else { - // read completion will deallocate - _closesocket( cmpl->s ); - } - } - LeaveCriticalSection( &router_section ); -} diff --git a/BasiliskII/src/Windows/router/ipsocket.h b/BasiliskII/src/Windows/router/ipsocket.h deleted file mode 100755 index 97005f129..000000000 --- a/BasiliskII/src/Windows/router/ipsocket.h +++ /dev/null @@ -1,66 +0,0 @@ -/* - * ipsocket.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _IPSOCKET_H_ -#define _IPSOCKET_H_ - -class socket_t { -public: - socket_t( int _proto ); - ~socket_t(); - bool b_recfrom(); - void set_ttl( uint8 ttl ); - -protected: - int WSARecvFrom(); - -public: - SOCKET s; // Always a valid socket - BOOL permanent; // T: a user-defined listening socket, - int proto; // udp/icmp - WSABUF buffers[1]; - WSABUF out_buffers[1]; - DWORD buffer_count; - DWORD bytes_received; - DWORD flags; - struct sockaddr_in from; - int from_len; - WSAOVERLAPPED overlapped; - uint32 ip_src; - uint32 ip_dest; - uint16 src_port; - uint16 dest_port; - DWORD socket_ttl; -}; - - -int get_socket_index( uint16 src_port, uint16 dest_port, int proto ); -int get_socket_index( uint16 src_port, int proto ); -int get_socket_index( socket_t *cmpl ); -void delete_socket( socket_t *cmpl ); -socket_t *find_socket( uint16 src_port, uint16 dest_port, int proto ); -void add_socket( socket_t *cmpl ); -void close_old_sockets(); -void close_all_sockets(); - - -#endif // _IPSOCKET_H_ diff --git a/BasiliskII/src/Windows/router/mib/interfaces.cpp b/BasiliskII/src/Windows/router/mib/interfaces.cpp deleted file mode 100755 index d89d407d1..000000000 --- a/BasiliskII/src/Windows/router/mib/interfaces.cpp +++ /dev/null @@ -1,69 +0,0 @@ -/* - * interfaces.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "interfaces.h" -#include "../dump.h" -#include "mibaccess.h" - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - -static UINT ip_array[100]; -static UINT ip_array_sz = 0; - -void init_interfaces() -{ - MibII _mibs(false); - - ip_array_sz = sizeof(ip_array) / sizeof(ip_array[0]); - - if(_mibs.Init()) { - _mibs.GetIPAddress( ip_array, ip_array_sz ); - } - - if(ip_array_sz == 0) { - ip_array_sz = 1; - ip_array[0] = 0; // localhost - } - - D(bug("init_interfaces() found %d interfaces.\r\n", ip_array_sz)); -} - -void final_interfaces() -{ - // Currently nothing to do. -} - -int get_ip_count() -{ - return ip_array_sz; -} - -uint32 get_ip_by_index( int index ) -{ - return index >= 0 && index < (int)ip_array_sz ? ip_array[index] : 0; -} diff --git a/BasiliskII/src/Windows/router/mib/interfaces.h b/BasiliskII/src/Windows/router/mib/interfaces.h deleted file mode 100755 index aeb152233..000000000 --- a/BasiliskII/src/Windows/router/mib/interfaces.h +++ /dev/null @@ -1,35 +0,0 @@ -/* - * intercafes.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _INTERFACES_H_ -#define _INTERFACES_H_ - -// A wrapper to the MibII class. Enumerates all ip interfaces -// currently in this computer. The interface list is not static. - -void init_interfaces(); -void final_interfaces(); - -int get_ip_count(); -uint32 get_ip_by_index( int index ); - -#endif // _INTERFACES_H_ diff --git a/BasiliskII/src/Windows/router/mib/mibaccess.cpp b/BasiliskII/src/Windows/router/mib/mibaccess.cpp deleted file mode 100755 index f877db9d9..000000000 --- a/BasiliskII/src/Windows/router/mib/mibaccess.cpp +++ /dev/null @@ -1,308 +0,0 @@ -/* - * MibAccess.cpp - * - * The original code by Stas Khirman modified by Lauri Pesonen, December, 2000: - * - * SnmpUtilVarBindFree(), SnmpUtilOidNCmp() and SnmpUtilOidCpy() now loaded from - * "snmpapi.dll" dynamically instead of linking statically. - * - * MibII ctor now takes a parameter whether to load Winsock or not. - * WSAStartup maintains an internal reference counter so it would have been ok - * to let it load always. - * - * Fixed a bug where the return value of LoadLibrary() was compared against - * HINSTANCE_ERROR instead of NULL. - * - * Removed some type conversion warnings by casting. - * - * Added a check in MibExtLoad ctor that the function entry points were found. - * - * Added a check in GetIPMask() and GetIPAddress() that the library was loaded - * before accessing the functions. - * - * Changed the return type of GetIPAddress() and GetIPMask() from BOOL to void - * as they always returned TRUE. - * - */ - -/************************************************************************/ -/* Copyright (C) Stas Khirman 1998. All rights reserved. */ -/* Written by Stas Khirman (staskh@rocketmail.com). */ -/* and */ -/* Raz Galili (razgalili@hotmail.com) */ -/* */ -/* Free software: no warranty; use anywhere is ok; spread the */ -/* sources; note any modifications; share variations and */ -/* derivatives (including sending to staskh@rocketmail.com). */ -/* */ -/************************************************************************/ - -/* - * MibAccess.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "main.h" -#include "mibaccess.h" -#include "../dynsockets.h" -#include "../dump.h" - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - -MibExtLoad::MibExtLoad( LPCTSTR MibDllName, LPCTSTR SnmpDllName ) -{ - m_Init = NULL; - - m_InitEx = NULL; - m_Query = NULL; - m_Trap = NULL; - - m_hInst_snmputil = NULL; - - m_SnmpUtilVarBindFree = NULL; - m_SnmpUtilOidNCmp = NULL; - m_SnmpUtilOidCpy = NULL; - - m_hInst = LoadLibrary( MibDllName ); - if(!m_hInst) { - D(bug(TEXT("MIB: library %s could not be loaded.\r\n"), MibDllName)); - return; - } - D(bug(TEXT("MIB: library %s loaded ok.\r\n"), MibDllName)); - - m_Init = (pSnmpExtensionInit)GetProcAddress(m_hInst ,"SnmpExtensionInit"); - m_InitEx= (pSnmpExtensionInitEx)GetProcAddress(m_hInst ,"SnmpExtensionInitEx"); - m_Query = (pSnmpExtensionQuery)GetProcAddress(m_hInst ,"SnmpExtensionQuery"); - m_Trap = (pSnmpExtensionTrap)GetProcAddress(m_hInst ,"SnmpExtensionTrap"); - - if( !m_Init || !m_InitEx || !m_Query || !m_Trap ) - { - D(bug(TEXT("MIB: required entry points not found in library %s.\r\n"), MibDllName)); - FreeLibrary( m_hInst ); - m_hInst = NULL; - } - - m_hInst_snmputil = LoadLibrary( SnmpDllName ); - if(!m_hInst_snmputil){ - D(bug(TEXT("MIB: library %s could not be loaded.\r\n"), SnmpDllName)); - FreeLibrary( m_hInst ); - m_hInst = NULL; - return; - } - D(bug(TEXT("MIB: library %s loaded ok.\r\n"), SnmpDllName)); - - m_SnmpUtilVarBindFree = (VOID (SNMP_FUNC_TYPE *)(SnmpVarBind *))GetProcAddress( m_hInst_snmputil, "SnmpUtilVarBindFree" ); - m_SnmpUtilOidNCmp = (SNMPAPI (SNMP_FUNC_TYPE *)(AsnObjectIdentifier *, AsnObjectIdentifier *, UINT))GetProcAddress( m_hInst_snmputil, "SnmpUtilOidNCmp" ); - m_SnmpUtilOidCpy = (SNMPAPI (SNMP_FUNC_TYPE *)(AsnObjectIdentifier *, AsnObjectIdentifier *))GetProcAddress( m_hInst_snmputil, "SnmpUtilOidCpy" ); - - if( !m_SnmpUtilVarBindFree || !m_SnmpUtilOidNCmp || !m_SnmpUtilOidCpy ) - { - D(bug(TEXT("MIB: required entry points not found in library %s.\r\n"), SnmpDllName)); - FreeLibrary( m_hInst ); - FreeLibrary( m_hInst_snmputil ); - m_hInst = NULL; - m_hInst_snmputil = NULL; - } - - #undef SNMP_FreeVarBind - #undef SNMP_oidncmp - #undef SNMP_oidcpy - - #define SNMP_FreeVarBind m_SnmpUtilVarBindFree - #define SNMP_oidncmp m_SnmpUtilOidNCmp - #define SNMP_oidcpy m_SnmpUtilOidCpy -} - -MibExtLoad::~MibExtLoad() -{ - if( m_hInst ) { - FreeLibrary( m_hInst ); - m_hInst = NULL; - } - if( m_hInst_snmputil ) { - FreeLibrary( m_hInst_snmputil ); - m_hInst_snmputil = NULL; - } -} - -BOOL MibExtLoad::Init(DWORD dwTimeZeroReference,HANDLE *hPollForTrapEvent,AsnObjectIdentifier *supportedView) -{ - if(m_hInst && m_Init) - return m_Init(dwTimeZeroReference,hPollForTrapEvent,supportedView); - return FALSE; -} -BOOL MibExtLoad::InitEx(AsnObjectIdentifier *supportedView) -{ - if(m_hInst && m_InitEx) - return m_InitEx(supportedView); - - return FALSE; -} - -BOOL MibExtLoad::Query(BYTE requestType,OUT RFC1157VarBindList *variableBindings, - AsnInteger *errorStatus,AsnInteger *errorIndex) -{ - if(m_hInst && m_Query) - return m_Query(requestType,variableBindings,errorStatus,errorIndex); - - return FALSE; -} - -BOOL MibExtLoad::Trap(AsnObjectIdentifier *enterprise, AsnInteger *genericTrap, - AsnInteger *specificTrap, AsnTimeticks *timeStamp, - RFC1157VarBindList *variableBindings) -{ - if(m_hInst && m_Trap) - return m_Trap(enterprise, genericTrap,specificTrap, timeStamp, variableBindings); - - return FALSE; -} - -MibII::MibII(bool load_winsock) : MibExtLoad(TEXT("inetmib1.dll"), TEXT("snmpapi.dll")) -{ - WSADATA wsa; - m_load_winsock = load_winsock; - if(load_winsock) { - int err = _WSAStartup( 0x0101, &wsa ); - } -} - -MibII::~MibII() -{ - if(m_load_winsock) _WSACleanup(); -} - -BOOL MibII::Init() -{ - HANDLE PollForTrapEvent; - AsnObjectIdentifier SupportedView; - - return MibExtLoad::Init(GetTickCount(),&PollForTrapEvent,&SupportedView); - -} - - -void MibII::GetIPAddress( UINT IpArray[], UINT &IpArraySize ) -{ - if(!m_hInst) { - IpArraySize = 0; - return; - } - - UINT OID_ipAdEntAddr[] = { 1, 3, 6, 1, 2, 1, 4 , 20, 1 ,1 }; - AsnObjectIdentifier MIB_ipAdEntAddr = { sizeof(OID_ipAdEntAddr)/sizeof(UINT), OID_ipAdEntAddr }; - RFC1157VarBindList varBindList; - RFC1157VarBind varBind[1]; - AsnInteger errorStatus; - AsnInteger errorIndex; - AsnObjectIdentifier MIB_NULL = {0,0}; - BOOL Exit; - int ret; - int IpCount=0; - DWORD dtmp; - - varBindList.list = varBind; - varBindList.len = 1; - varBind[0].name = MIB_NULL; - SNMP_oidcpy(&varBind[0].name,&MIB_ipAdEntAddr); - Exit = FALSE; - - IpCount=0; - while(!Exit){ - ret = Query(ASN_RFC1157_GETNEXTREQUEST,&varBindList,&errorStatus,&errorIndex); - - if(!ret) - Exit=TRUE; - else{ - ret = SNMP_oidncmp(&varBind[0].name,&MIB_ipAdEntAddr,MIB_ipAdEntAddr.idLength); - if(ret!=0){ - Exit=TRUE; - } - else{ - dtmp = *((DWORD *)varBind[0].value.asnValue.address.stream); - IpArray[IpCount] = dtmp; - IpCount++; - if(IpCount>=(int)IpArraySize) - Exit = TRUE; - } - } - } - - IpArraySize = IpCount; - - SNMP_FreeVarBind(&varBind[0]); -} - -void MibII::GetIPMask( UINT IpArray[], UINT &IpArraySize ) -{ - if(!m_hInst) { - IpArraySize = 0; - return; - } - - UINT OID_ipAdEntMask[] = { 1, 3, 6, 1, 2, 1, 4 , 20, 1 ,3 }; - AsnObjectIdentifier MIB_ipAdEntMask = { sizeof(OID_ipAdEntMask)/sizeof(UINT), OID_ipAdEntMask }; - RFC1157VarBindList varBindList; - RFC1157VarBind varBind[1]; - AsnInteger errorStatus; - AsnInteger errorIndex; - AsnObjectIdentifier MIB_NULL = {0,0}; - BOOL Exit; - int ret; - int IpCount=0; - DWORD dtmp; - - varBindList.list = varBind; - varBindList.len = 1; - varBind[0].name = MIB_NULL; - SNMP_oidcpy(&varBind[0].name,&MIB_ipAdEntMask); - Exit = FALSE; - - IpCount=0; - while(!Exit){ - ret = Query(ASN_RFC1157_GETNEXTREQUEST,&varBindList,&errorStatus,&errorIndex); - - if(!ret) - Exit=TRUE; - else{ - ret = SNMP_oidncmp(&varBind[0].name,&MIB_ipAdEntMask,MIB_ipAdEntMask.idLength); - if(ret!=0){ - Exit=TRUE; - } - else{ - dtmp = *((DWORD *)varBind[0].value.asnValue.address.stream); - IpArray[IpCount] = dtmp; - IpCount++; - if(IpCount>=(int)IpArraySize) - Exit = TRUE; - } - } - } - - IpArraySize = IpCount; - - SNMP_FreeVarBind(&varBind[0]); -} diff --git a/BasiliskII/src/Windows/router/mib/mibaccess.h b/BasiliskII/src/Windows/router/mib/mibaccess.h deleted file mode 100755 index 385f5b85b..000000000 --- a/BasiliskII/src/Windows/router/mib/mibaccess.h +++ /dev/null @@ -1,83 +0,0 @@ -////////////////////////////////////////////////////// -// FILE : MibAccess.h -// -// - -#ifndef _SNMP_ACCESS_H_ -#define _SNMP_ACCESS_H_ - -#include -#ifndef SNMP_FUNC_TYPE -#define SNMP_FUNC_TYPE WINAPI -#endif - -////////////////////////////////////////////////////////////// -// Definition of pointers to the four functions in the Mib Dll -// -typedef BOOL (WINAPI *pSnmpExtensionInit)( - IN DWORD dwTimeZeroReference, - OUT HANDLE *hPollForTrapEvent, - OUT AsnObjectIdentifier *supportedView); - -typedef BOOL (WINAPI *pSnmpExtensionTrap)( - OUT AsnObjectIdentifier *enterprise, - OUT AsnInteger *genericTrap, - OUT AsnInteger *specificTrap, - OUT AsnTimeticks *timeStamp, - OUT RFC1157VarBindList *variableBindings); - -typedef BOOL (WINAPI *pSnmpExtensionQuery)( - IN BYTE requestType, - IN OUT RFC1157VarBindList *variableBindings, - OUT AsnInteger *errorStatus, - OUT AsnInteger *errorIndex); - -typedef BOOL (WINAPI *pSnmpExtensionInitEx)(OUT AsnObjectIdentifier *supportedView); - - -class MibExtLoad -{ -public: - MibExtLoad( LPCTSTR MibDllName, LPCTSTR SnmpDllName ); - ~MibExtLoad(); - BOOL Init(DWORD dwTimeZeroReference,HANDLE *hPollForTrapEvent,AsnObjectIdentifier *supportedView); - BOOL InitEx(AsnObjectIdentifier *supportedView); - BOOL Query(BYTE requestType,OUT RFC1157VarBindList *variableBindings, - AsnInteger *errorStatus,AsnInteger *errorIndex); - - BOOL Trap(AsnObjectIdentifier *enterprise, AsnInteger *genericTrap, - AsnInteger *specificTrap, AsnTimeticks *timeStamp, - RFC1157VarBindList *variableBindings); - -public: - HINSTANCE m_hInst; - HINSTANCE m_hInst_snmputil; - -private: - pSnmpExtensionInit m_Init; - pSnmpExtensionInitEx m_InitEx; - pSnmpExtensionQuery m_Query; - pSnmpExtensionTrap m_Trap; - -public: - VOID (SNMP_FUNC_TYPE *m_SnmpUtilVarBindFree) (SnmpVarBind *); - SNMPAPI (SNMP_FUNC_TYPE *m_SnmpUtilOidNCmp) (AsnObjectIdentifier *, AsnObjectIdentifier *, UINT); - SNMPAPI (SNMP_FUNC_TYPE *m_SnmpUtilOidCpy) (AsnObjectIdentifier *, AsnObjectIdentifier *); -}; - - -class MibII: public MibExtLoad -{ -public: - MibII( bool load_winsock ); - ~MibII(); - BOOL Init(); - - void GetIPAddress(UINT IpArray[],UINT &IpArraySize); - void GetIPMask(UINT IpArray[],UINT &IpArraySize); - -protected: - bool m_load_winsock; -}; - -#endif diff --git a/BasiliskII/src/Windows/router/router.cpp b/BasiliskII/src/Windows/router/router.cpp deleted file mode 100755 index 10fe2fd76..000000000 --- a/BasiliskII/src/Windows/router/router.cpp +++ /dev/null @@ -1,201 +0,0 @@ -/* - * router.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -/* - * This could be implemented by writing three (9x,nt,2k) - * NDIS filter drivers. No thanks. - * But this is not easy either. - */ - -#include "sysdeps.h" -#include "main.h" - -#include - -#include "cpu_emulation.h" -#include "prefs.h" -#include "ether_windows.h" -#include "ether.h" -#include "router.h" -#include "router_types.h" -#include "dynsockets.h" -#include "ipsocket.h" -#include "iphelp.h" -#include "arp.h" -#include "icmp.h" -#include "udp.h" -#include "tcp.h" -#include "ftp.h" -#include "mib/interfaces.h" -#include "dump.h" - - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - - -uint16 next_ip_ident_number = 1; -uint32 macos_ip_address = 0; -const uint8 router_mac_addr[6] = { '4', '2', '6', '7', '7', '9' }; -uint32 router_ip_address = 0; -bool raw_sockets_available = false; - - - -// Protected data. -CRITICAL_SECTION router_section; -bool is_router_shutting_down = false; -static HANDLE r_handle = 0; -static unsigned int rh_tid = 0; - - -static void write_ip4( ip_t *ip, int len ) -{ - if(len < sizeof(ip_t)) { - D(bug("Too small ip packet(%d), dropped\r\n", len)); - } else { - uint8 proto = ip->proto; - - // This is a router, decrement the hop count - if( --ip->ttl == 0 ) { - // Most likely this is some Mac traceroute app - D(bug("ip packet ttl expired, proto=%d.\r\n", proto)); - error_winsock_2_icmp( WSAETTLEXCEEDED, ip, len ); - } else { - switch( proto ) { - case ip_proto_icmp: - write_icmp( (icmp_t *)ip, len ); - break; - case ip_proto_tcp: - write_tcp( (tcp_t *)ip, len ); - break; - case ip_proto_udp: - write_udp( (udp_t *)ip, len ); - break; - default: - D(bug("write_ip4() len=%d, proto=%d\r\n", len, proto)); - break; - } - } - } -} - -bool router_write_packet(uint8 *packet, int len) -{ - bool result = false; - - if( len >= 14 ) { - switch( ntohs( ((mac_t *)packet)->type ) ) { - case mac_type_ip4: - write_ip4( (ip_t *)packet, len ); - result = true; - break; - case mac_type_ip6: - D(bug("write_ip6() len=%d; unsupported.\r\n", len)); - result = true; - break; - case mac_type_arp: - result = write_arp( (arp_t *)packet, len ); - break; - } - } - return result; -} - -bool router_read_packet(uint8 *packet, int len) -{ - bool result = false; - - if( len >= 14 ) { - switch( ntohs( ((mac_t *)packet)->type ) ) { - case mac_type_ip4: - case mac_type_ip6: - case mac_type_arp: - result = true; - break; - } - } - return result; -} - -/* - This has nothing to do with TCP TIME_WAITs or CLOSE_WAITs, - the thread is needed to close down expired udp sockets. - Arguably an ugly hack, but needed since there is no way to - listen to all ports w/o writing another ndis filter driver -*/ -static unsigned int WINAPI router_expire_thread(void *arg) -{ - while(!is_router_shutting_down) { - close_old_sockets(); - Sleep(1000); - } - return 0; -} - -bool router_init(void) -{ - InitializeCriticalSection( &router_section ); - - if(dynsockets_init()) { - char me[128]; - if( _gethostname(me, sizeof(me)) == SOCKET_ERROR ) { - D(bug("gethostname() failed, error = %d\r\n", _WSAGetLastError())); - } else { - struct hostent *hent = _gethostbyname(me); - if( hent == NULL ) { - D(bug("gethostbyname() failed, error = %d\r\n", _WSAGetLastError())); - } else { - struct in_addr *ina = (struct in_addr *) *hent->h_addr_list; - router_ip_address = ntohl(ina->s_addr); - D(bug("router protocol address seems to be %s (used only in icmp error messages)\r\n", _inet_ntoa(*ina))); - } - } - is_router_shutting_down = false; - r_handle = (HANDLE)_beginthreadex( 0, 0, router_expire_thread, 0, 0, &rh_tid ); - init_interfaces(); - init_tcp(); - init_udp(); - init_ftp(); - return true; - } - - return false; -} - -void router_final(void) -{ - final_interfaces(); - stop_icmp_listen(); - close_all_sockets(); - if(r_handle) { - is_router_shutting_down = true; - WaitForSingleObject( r_handle, INFINITE ); - final_tcp(); - final_udp(); - dynsockets_final(); - } - DeleteCriticalSection( &router_section ); -} diff --git a/BasiliskII/src/Windows/router/router.h b/BasiliskII/src/Windows/router/router.h deleted file mode 100755 index 5d3e74b58..000000000 --- a/BasiliskII/src/Windows/router/router.h +++ /dev/null @@ -1,54 +0,0 @@ -/* - * router.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _ROUTER_H_ -#define _ROUTER_H_ - -extern bool is_router_shutting_down; -extern CRITICAL_SECTION router_section; - -// Increased by one for each ip packet sent to the emulated enet interface. -extern uint16 next_ip_ident_number; - -// Used by incoming icmp packets and internal icmp messages. Host byte order. -extern uint32 macos_ip_address; - -// The magic constant -extern const uint8 router_mac_addr[6]; - -// Used by internal icmp messages. Host byte order. -extern uint32 router_ip_address; - -// False under NT/Win2k if the user has no admin rights -extern bool raw_sockets_available; - - - -// Interface exposed to ether_windows module. -bool router_init(void); -void router_final(void); - -// Both of these return true if the ethernet module should drop the packet. -bool router_write_packet(uint8 *packet, int len); -bool router_read_packet(uint8 *packet, int len); - -#endif // _ROUTER_H_ diff --git a/BasiliskII/src/Windows/router/router_types.h b/BasiliskII/src/Windows/router/router_types.h deleted file mode 100755 index 9dcc8e63d..000000000 --- a/BasiliskII/src/Windows/router/router_types.h +++ /dev/null @@ -1,187 +0,0 @@ -/* - * router_types.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _ROUTER_TYPES_H_ -#define _ROUTER_TYPES_H_ - -#pragma pack(push, 1) - - -// --------------------------- MAC --------------------------- -typedef struct { - uint8 dest[6]; - uint8 src[6]; - uint16 type; -} mac_t; - -enum { - mac_type_llc_ipx_limit = 0x05DC, // <= mac_type_llc_ipx_limit -->> 802.3 MAC frame - mac_type_ip4 = 0x0800, - mac_type_arp = 0x0806, - mac_type_rarp = 0x8035, - mac_type_ip6 = 0x86DD, - mac_type_loopback = 0x9000 -}; - -// --------------------------- ARP --------------------------- -typedef struct { - mac_t mac; - uint16 htype; - uint16 ptype; - uint8 halen; - uint8 palen; - uint16 opcode; - uint8 srch[6]; // size for ethernet - uint8 srcp[4]; // size for ip - uint8 dsth[6]; // size for ethernet - uint8 dstp[4]; // size for ip -} arp_t; - -enum { - arp_request = 1, - arp_reply = 2 -}; -enum { - arp_hwtype_enet = 1 -}; - -// --------------------------- IP4 --------------------------- -typedef struct { - mac_t mac; - uint8 header_len:4; - uint8 version:4; - uint8 tos; - uint16 total_len; - uint16 ident; - uint16 flags_n_frag_offset; // foffset 0..11, flags 12..15 - uint8 ttl; - uint8 proto; - uint16 checksum; - uint32 src; - uint32 dest; - // ip options, size = 4 * header_len - 20 -} ip_t; - -// Protocol STD numbers -enum { - ip_proto_icmp = IPPROTO_ICMP, - ip_proto_tcp = IPPROTO_TCP, - ip_proto_udp = IPPROTO_UDP -}; - -// --------------------------- ICMP --------------------------- -typedef struct { - ip_t ip; - uint8 type; - uint8 code; - uint16 checksum; - // data -} icmp_t; - -enum { - icmp_Echo_reply = 0, - icmp_Destination_unreachable = 3, - icmp_Source_quench = 4, - icmp_Redirect = 5, - icmp_Echo = 8, - icmp_Router_advertisement = 9, - icmp_Router_solicitation = 10, - icmp_Time_exceeded = 11, - icmp_Parameter_problem = 12, - icmp_Time_Stamp_request = 13, - icmp_Time_Stamp_reply = 14, - icmp_Information_request_obsolete = 15, - icmp_Information_reply_obsolete = 16, - icmp_Address_mask_request = 17, - icmp_Address_mask_reply = 18, - icmp_Traceroute = 30, - icmp_Datagram_conversion_error = 31, - icmp_Mobile_host_redirect = 32, - icmp_IPv6_Where_Are_You = 33, - icmp_IPv6_I_Am_Here = 34, - icmp_Mobile_registration_request = 35, - icmp_Mobile_registration_reply = 36, - icmp_Domain_name_request = 37, - icmp_Domain_name_reply = 38, - icmp_SKIP = 39, - icmp_Photuris = 40 -}; - -// --------------------------- TCP --------------------------- -typedef struct { - ip_t ip; - uint16 src_port; - uint16 dest_port; - uint32 seq; - uint32 ack; - uint8 header_len; // note: some reserved bits - uint8 flags; // note: some reserved bits - uint16 window; - uint16 checksum; - uint16 urgent_ptr; - // options + padding: size = dataoffset*4-20 - // data -} tcp_t; - -enum { - tcp_flags_URG = 0x20, // The urgent pointer field is significant in this segment. - tcp_flags_ACK = 0x10, // The acknowledgment field is significant in this segment. - tcp_flags_PSH = 0x08, // Push function. - tcp_flags_RST = 0x04, // Resets the connection. - tcp_flags_SYN = 0x02, // Synchronizes the sequence numbers. - tcp_flags_FIN = 0x01 // No more data from sender. -}; - -enum { - tcp_state_closed, - tcp_state_listen, - tcp_state_syn_sent, - tcp_state_syn_rcvd, - tcp_state_established, - tcp_state_close_wait, - tcp_state_last_ack, - tcp_state_finwait_1, - tcp_state_finwait_2, - tcp_state_closing, - tcp_state_time_wait -}; - -// --------------------------- UDP --------------------------- -typedef struct { - ip_t ip; - uint16 src_port; - uint16 dest_port; - uint16 msg_len; - uint16 checksum; - // data -} udp_t; - -typedef struct { - uint16 src_lo, src_hi; - uint16 dest_lo, dest_hi; - uint16 proto; - uint16 msg_len; -} pseudo_ip_t; - -#pragma pack(pop) - -#endif // _ROUTER_TYPES_H_ diff --git a/BasiliskII/src/Windows/router/tcp.cpp b/BasiliskII/src/Windows/router/tcp.cpp deleted file mode 100755 index 4b0800dd7..000000000 --- a/BasiliskII/src/Windows/router/tcp.cpp +++ /dev/null @@ -1,1605 +0,0 @@ -/* - * tcp.cpp - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -/* - * Features implemented: - * state machine, flow control, sequence numbers, RST/SYN/FIN/ACK/PSH - * - * Features not implemented: - * oob data, urgent pointer, window sliding, some options - * "Half-Nagle" implementation is a bit weird (mac-router interface; winsock has it on by default) - * - * - * All possible tcp state machine transitions: - * - * CLOSED -> LISTEN passive open - * CLOSED -> SYN_SENT active open SYN-> - * - * LISTEN -> SYN_SENT send data SYN-> - * LISTEN -> SYN_RCVD ->SYN SYN+ACK-> - * - * SYN_SENT -> SYN_RCVD ->SYN SYN+ACK-> - * SYN_SENT -> ESTABLISHED ->SYN+ACK ACK-> - * SYN_SENT -> CLOSED close/timeout - * - * SYN_RCVD -> CLOSED timeout RST-> - * SYN_RCVD -> LISTEN ->RST - * SYN_RCVD -> ESTABLISHED ->ACK - * SYN_RCVD -> FINWAIT_1 close FIN-> - * - * ESTABLISHED -> FINWAIT_1 close FIN-> - * ESTABLISHED -> CLOSE_WAIT ->FIN ACK-> - * - * CLOSE_WAIT -> LAST_ACK close FIN-> - * - * LAST_ACK -> CLOSED ->ACK - * - * FINWAIT_1 -> CLOSING ->FIN ACK-> - * FINWAIT_1 -> FINWAIT_2 ->ACK - * FINWAIT_1 -> TIME_WAIT ->FIN+ACK ACK-> - * - * FINWAIT_2 -> TIME_WAIT ->FIN ACK-> - * - * CLOSING -> TIME_WAIT ->ACK - * - * TIME_WAIT -> CLOSED timeout (2*msl) - * - */ - -#include "sysdeps.h" -#include "main.h" - -#include - -#include "cpu_emulation.h" -#include "ws2tcpip.h" -#include "ether_windows.h" -#include "ether.h" -#include "prefs.h" -#include "router.h" -#include "router_types.h" -#include "dynsockets.h" -#include "iphelp.h" -#include "tcp.h" -#include "dump.h" -#include "mib/interfaces.h" -#include "ftp.h" - -#if DEBUG -#pragma optimize("",off) -#endif - -#include "debug.h" - -// If you need more, use multiple threads. -#define MAX_SOCKETS MAXIMUM_WAIT_OBJECTS - -// If true, always sends the PSH tcp flag with data. -// Otherwise only when a full buffer was received. -#define PUSH_ALWAYS 0 - -// In milliseconds. A TCP implementation should implement -// this dynamically, adapting the timeout value to match to the -// averaged packet round-trip time. -#define RESEND_TIMEOUT 750 - -// Just time out incoming connections after 5 secs if Mac has no time to reply -// No backlogs. -#define SYN_FLOOD_PROTECTION_TIMEOUT 5000 - -const int MAX_SEGMENT_SIZE = 1460; - -// Shorthands -#define ISSET(f,x) ( ((f) & (x)) != 0 ) -#define ISCLEAR(f,x) ( ((f) & (x)) == 0 ) - -// Local aliases -#define URG tcp_flags_URG -#define ACK tcp_flags_ACK -#define PSH tcp_flags_PSH -#define RST tcp_flags_RST -#define SYN tcp_flags_SYN -#define FIN tcp_flags_FIN - -// Local aliases -#define CLOSED tcp_state_closed -#define LISTEN tcp_state_listen -#define SYN_SENT tcp_state_syn_sent -#define SYN_RCVD tcp_state_syn_rcvd -#define ESTABLISHED tcp_state_established -#define CLOSE_WAIT tcp_state_close_wait -#define LAST_ACK tcp_state_last_ack -#define FINWAIT_1 tcp_state_finwait_1 -#define FINWAIT_2 tcp_state_finwait_2 -#define CLOSING tcp_state_closing -#define TIME_WAIT tcp_state_time_wait - -// For debugging only -static const char *_tcp_state_name[] = { - "CLOSED", - "LISTEN", - "SYN_SENT", - "SYN_RCVD", - "ESTABLISHED", - "CLOSE_WAIT", - "LAST_ACK", - "FINWAIT_1", - "FINWAIT_2", - "CLOSING", - "TIME_WAIT" -}; -#define STATENAME(i) _tcp_state_name[i] - -static CRITICAL_SECTION tcp_section; - -typedef struct { - SOCKET s; - int state; - - uint32 ip_src; // "source" is the mac, dest is the remote host, - uint32 ip_dest; // no matter who opened the connection. - uint16 src_port; // all in host byte order. - uint16 dest_port; - - struct sockaddr_in from; // remote host address, network byte order. - int from_len; - - // note: no true windows sliding, only one buffer. - WSABUF buffers_read[1]; // data from remote host to Mac - DWORD buffer_count_read; - DWORD bytes_received; - DWORD flags_read; - WSAOVERLAPPED overlapped_read; - - WSABUF buffers_write[1]; // data from Mac to remote host - DWORD buffer_count_write; - DWORD bytes_written; - DWORD flags_write; - WSAOVERLAPPED overlapped_write; - - bool remote_closed; // remote will not send any more data - bool accept_more_data_from_mac; // are we ready to accept more data from mac - - uint32 seq_in; // will ack this mac sequence number - uint32 seq_out; // next sequence number to mac (unless a resend is needed) - uint32 mac_ack; // mac has acked this byte count. can be used to determined when to send some more data - - uint32 bytes_to_send; // total send block size - uint32 bytes_remaining_to_send; // unsent byte count - - uint16 mac_window; // mac tcp receive window, slides according to the window principle - uint16 our_window; // not really used - uint16 mac_mss; // maximum segment size that mac reported at SYN handshaking - - // resend info - uint32 last_seq_out; // remember last packet seq number if a resend is needed - uint32 resend_timeout; // currently set t0 0.75 secs but not updated - uint32 stream_to_mac_stalled_until; // tick count indicating resend time - - DWORD time_wait; // do a graceful close after MSL*2 - DWORD msl; - - int child; - - WSAEVENT ev; // used to signal remote-initiated close and host-initiated connect. - - bool in_use; -} tcp_socket_t; - -static tcp_socket_t sockets[MAX_SOCKETS]; - -typedef struct { - SOCKET s; - uint16 port; - uint32 ip; - uint32 iface; - bool once; - int parent; - WSAEVENT ev; -} tcp_listening_socket_t; - -static tcp_listening_socket_t l_sockets[MAX_SOCKETS]; - -static void CALLBACK tcp_read_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -); - -static void CALLBACK tcp_write_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -); - -// socket utilities assume that the critical section has already been entered. -static void free_socket( const int t ) -{ - _WSAResetEvent( sockets[t].ev ); - if(sockets[t].s != INVALID_SOCKET) { - _closesocket( sockets[t].s ); - sockets[t].s = INVALID_SOCKET; - } - sockets[t].state = CLOSED; - sockets[t].stream_to_mac_stalled_until = 0; - sockets[t].in_use = false; - sockets[t].time_wait = 0; - - // if there was an attached listening socket (ftp), close it. - int lst = sockets[t].child; - if( lst >= 0 ) { - if(l_sockets[lst].s != INVALID_SOCKET) { - D(bug(" closing listening socket %d\r\n", lst)); - _closesocket( l_sockets[lst].s ); - l_sockets[lst].s = INVALID_SOCKET; - } - l_sockets[lst].port = 0; - l_sockets[lst].parent = -1; - } - sockets[t].child = -1; -} - -static int alloc_socket() -{ - static int last_allocated_socket = -1; - - int i = last_allocated_socket; - for( int j=0; j= MAX_SOCKETS ) i = 0; - if( !sockets[i].in_use ) { - D(bug("<%d> Socket allocated\r\n", i)); - - last_allocated_socket = i; - sockets[i].in_use = true; - - sockets[i].s = INVALID_SOCKET; - sockets[i].state = CLOSED; - sockets[i].remote_closed = false; - - sockets[i].accept_more_data_from_mac = false; - - sockets[i].ip_src = sockets[i].ip_dest = 0; - // sockets[i].src_port = sockets[i].dest_port = 0; - - memset( &sockets[i].overlapped_read, 0, sizeof(sockets[i].overlapped_read) ); - sockets[i].overlapped_read.hEvent = (HANDLE)i; - memset( &sockets[i].overlapped_write, 0, sizeof(sockets[i].overlapped_write) ); - sockets[i].overlapped_write.hEvent = (HANDLE)i; - - sockets[i].bytes_received = 0; - sockets[i].bytes_written = 0; - - sockets[i].flags_read = 0; - sockets[i].flags_write = 0; - - // sockets[i].from_len = sizeof(struct sockaddr_in); - // memset( &sockets[i].from, 0, sizeof(sockets[i].from) ); - // sockets[i].from.sin_family = AF_INET; - - sockets[i].buffer_count_read = 1; - sockets[i].buffers_read[0].len = MAX_SEGMENT_SIZE; - if(!sockets[i].buffers_read[0].buf) { - sockets[i].buffers_read[0].buf = new char [sockets[i].buffers_read[0].len]; - } - - sockets[i].buffer_count_write = 1; - sockets[i].buffers_write[0].len = MAX_SEGMENT_SIZE; - if(!sockets[i].buffers_write[0].buf) { - sockets[i].buffers_write[0].buf = new char [sockets[i].buffers_write[0].len]; - } - - sockets[i].mac_window = MAX_SEGMENT_SIZE; // updated for all mac datagrams - sockets[i].our_window = MAX_SEGMENT_SIZE; // should use about 8-16 kB, really - sockets[i].mac_mss = 0; // not known yet - - sockets[i].time_wait = 0; - sockets[i].msl = 5000L; // The round-trip time can be hard to estimate. - - sockets[i].seq_in = 0; - sockets[i].seq_out = 0x00000001; - sockets[i].mac_ack = 0; - sockets[i].stream_to_mac_stalled_until = 0; - - sockets[i].resend_timeout = RESEND_TIMEOUT; - - sockets[i].child = -1; - - break; - } - } - if(i == MAX_SOCKETS) { - D(bug("Out of free sockets\r\n")); - i = -1; - } - return i; -} - -static int alloc_new_socket( const uint16 src_port, const uint16 dest_port, const uint32 ip_dest ) -{ - int t = alloc_socket(); - - if(t >= 0) { - sockets[t].s = _socket( AF_INET, SOCK_STREAM, IPPROTO_TCP ); - if(sockets[t].s == INVALID_SOCKET) { - free_socket( t ); - t = -1; - } else { - sockets[t].src_port = src_port; - sockets[t].dest_port = dest_port; - - sockets[t].from_len = sizeof(sockets[t].from); - memset( &sockets[t].from, 0, sockets[t].from_len ); - sockets[t].from.sin_family = AF_INET; - sockets[t].from.sin_port = htons(dest_port); - sockets[t].from.sin_addr.s_addr = htonl(ip_dest); - - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - - if( _bind ( sockets[t].s, (const struct sockaddr *)&to, sizeof(to) ) == 0 ) { - D(bug("<%d> socket bound\r\n", t)); - } else { - if( _WSAGetLastError() == WSAEINPROGRESS ) { - D(bug("<%d> bind: a blocking call is in progress.\r\n", t)); - } else { - D(bug("<%d> bind failed with error code %d\r\n", t, _WSAGetLastError())); - } - free_socket( t ); - t = -1; - } - } - } - return t; -} - -static int get_socket_index( const uint16 src_port, const uint16 dest_port ) -{ - for( int i=0; i= 0 ) { - if( sockets[i].s == INVALID_SOCKET ) { - D(bug("find_socket reusing slot %d...\r\n", i)); - sockets[i].in_use = false; - } else { - D(bug("find_socket forcing close %d...\r\n", i)); - free_socket( i ); - } - i = -1; - } - } - - D(bug("<%d> find_socket(%d,%d): %s\r\n", i, src_port, dest_port, i>=0 ? "found" : "not found")); - - return i; -} - -static int alloc_listen_socket( const uint16 port, const uint32 ip, const uint32 iface, const bool once ) -{ - static int last_allocated_socket = -1; - - int i = last_allocated_socket; - - for( int j=0; j= MAX_SOCKETS ) i = 0; - if( l_sockets[i].port == 0 ) { - D(bug("[%d] Slot allocated for listening port %d\r\n", i, port)); - l_sockets[i].port = port; - l_sockets[i].ip = ip; - l_sockets[i].iface = iface; - l_sockets[i].once = once; - l_sockets[i].parent = -1; - last_allocated_socket = i; - _WSAResetEvent( l_sockets[i].ev ); - return i; - } - } - return -1; -} - -static void tcp_start_listen( const int i ) -{ - if( l_sockets[i].port ) { - uint32 iface = l_sockets[i].iface; - - D(bug("[%d] binding to interface 0x%08X\r\n", i, iface)); - - l_sockets[i].s = _socket( AF_INET, SOCK_STREAM, IPPROTO_TCP ); - if(l_sockets[i].s != INVALID_SOCKET) { - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - to.sin_port = htons( l_sockets[i].port ); - to.sin_addr.s_addr = htonl( iface ); - - if( _bind ( l_sockets[i].s, (const struct sockaddr *)&to, sizeof(to) ) == 0 ) - { - D(bug("[%d] socket bound to port %d on interface 0x%08X\r\n", i, l_sockets[i].port, iface)); - if( _listen( l_sockets[i].s, SOMAXCONN ) == SOCKET_ERROR ) { - D(bug("[%d] listen() failed with error code %d\r\n", i, _WSAGetLastError())); - } else { - D(bug("[%d] listening to port %d\r\n", i, l_sockets[i].port)); - _WSAResetEvent( l_sockets[i].ev ); - if( SOCKET_ERROR == _WSAEventSelect( l_sockets[i].s, l_sockets[i].ev, FD_ACCEPT ) ) { - D(bug("[%d] WSAEventSelect() failed with error code %d\r\n", i, _WSAGetLastError())); - } - } - } else { - D(bug("[%d] bind to port %d failed with error code %d\r\n", i, l_sockets[i].port, _WSAGetLastError())); - } - } else { - D(bug("[%d] could not create a socket for port %d, error = %d\r\n", i, l_sockets[i].port, _WSAGetLastError())); - } - } -} - -static void set_ttl( const int t, const uint8 ttl ) -{ - int _ttl = ttl; // defensive programming, I know VCx - - if(_setsockopt( sockets[t].s, IPPROTO_IP, IP_TTL, (const char *)&_ttl, sizeof(int) ) == SOCKET_ERROR ) { - D(bug("<%d> could not set ttl to %d, error=%d\r\n", t, ttl, _WSAGetLastError())); - } else { - D(bug("<%d> ttl set to %d.\r\n", t, ttl)); - } -} - -static void tcp_reply( const int flags, const int t ) -{ - int tcp_size = sizeof(tcp_t); - - tcp_t *tcp = (tcp_t *)malloc( tcp_size ); - if(tcp) { - memcpy( tcp->ip.mac.dest, ether_addr, 6 ); - memcpy( tcp->ip.mac.src, router_mac_addr, 6 ); - tcp->ip.mac.type = htons(mac_type_ip4); - - tcp->ip.version = 4; - tcp->ip.header_len = 5; - tcp->ip.tos = 0; - tcp->ip.total_len = htons(tcp_size - sizeof(mac_t)); - tcp->ip.ident = htons(next_ip_ident_number++); - tcp->ip.flags_n_frag_offset = 0; - tcp->ip.ttl = 128; - tcp->ip.proto = ip_proto_tcp; - tcp->ip.src = htonl(sockets[t].ip_dest); - tcp->ip.dest = htonl(sockets[t].ip_src); - make_ip4_checksum( (ip_t *)tcp ); - - D(bug("<%d> Reply: Seq=%d, Ack=%d\r\n", t, sockets[t].seq_out, sockets[t].seq_in)); - - tcp->src_port = htons(sockets[t].dest_port); - tcp->dest_port = htons(sockets[t].src_port); - tcp->seq = htonl(sockets[t].seq_out); - tcp->ack = htonl(sockets[t].seq_in); - tcp->header_len = (uint8)( 20 << 2 ); - tcp->flags = flags; - tcp->window = htons( sockets[t].our_window ); - tcp->urgent_ptr = 0; - make_tcp_checksum( tcp, tcp_size ); - - // dump_bytes( (uint8 *)tcp, tcp_size ); - - enqueue_packet( (uint8 *)tcp, tcp_size ); - free(tcp); - } -} - -static bool has_mac_read_space( const int t ) -{ - uint32 pending_bytes = sockets[t].seq_out - sockets[t].mac_ack; - uint32 mac_can_accept_bytes = sockets[t].mac_window - pending_bytes; - - D(bug("<%d> mac_can_accept_bytes = %d\r\n", t, mac_can_accept_bytes)); - - // Modified Nagle, effectively disabling window sliding (which I don't support anyway): - return pending_bytes == 0; - - // Use more of window bandwidth - // Enabling this would require that the buffers seq numbers are stored somewhere - // return mac_can_accept_bytes >= sockets[t].buffers_read[0].len; -} - -static bool b_recfrom( const int t ) -{ - bool result; - - if( !has_mac_read_space(t) ) { - D(bug("<%d> read stalled, mac cannot accept any more data\r\n", t)); - - sockets[t].stream_to_mac_stalled_until = GetTickCount() + sockets[t].resend_timeout; - return true; - } - - int ret = _WSARecv( - sockets[t].s, - sockets[t].buffers_read, - sockets[t].buffer_count_read, - &sockets[t].bytes_received, - &sockets[t].flags_read, - &sockets[t].overlapped_read, - tcp_read_completion - ); - - if(ret == SOCKET_ERROR) { - int socket_error = _WSAGetLastError(); - if(socket_error == WSA_IO_PENDING) { - D(bug("<%d> WSARecv() i/o pending\r\n", t)); - result = true; - } else { - D(bug("<%d> WSARecv() returned error %d\r\n", t, socket_error)); - result = false; - } - } else /*if(ret == 0) */ { - D(bug("<%d> WSARecv() ok\r\n", t)); - // Completion routine call is already scheduled. - result = true; - } - return result; -} - -static bool b_send( const int t ) -{ - int ret = _WSASend( - sockets[t].s, - sockets[t].buffers_write, - sockets[t].buffer_count_write, - &sockets[t].bytes_written, - sockets[t].flags_write, - &sockets[t].overlapped_write, - tcp_write_completion - ); - - bool result; - if(ret == SOCKET_ERROR) { - int socket_error = _WSAGetLastError(); - if(socket_error == WSA_IO_PENDING) { - D(bug("<%d> WSASend() i/o pending\r\n", t)); - result = true; - } else { - D(bug("<%d> WSASend() returned %d\r\n", t, socket_error)); - result = false; - } - } else /*if(ret == 0) */ { - D(bug("<%d> WSASend() ok\r\n", t)); - // Completion routine call is already scheduled. - result = true; - } - return result; -} - -static void send_buffer( const int t, const bool resending ) -{ - if(resending) { - if(sockets[t].last_seq_out == 0) { - D(bug("<%d> resend failure\r\n", t )); - return; - } - sockets[t].seq_out = sockets[t].last_seq_out; - } else { - sockets[t].last_seq_out = sockets[t].seq_out; - } - - D(bug("<%d> %s data to Mac: Seq=%d, Ack=%d\r\n", t, (resending ? "resending" : "sending"), sockets[t].seq_out, sockets[t].seq_in)); - - uint32 bytes_read = sockets[t].bytes_received; - - if( sockets[t].mac_mss && bytes_read > sockets[t].mac_mss ) { - D(bug("<%d> impossible: %d bytes to send, Mac mss is only %d\r\n", t, sockets[t].mac_mss && bytes_read, sockets[t].mac_mss)); - } - - int tcp_size = sizeof(tcp_t) + bytes_read; - - tcp_t *tcp = (tcp_t *)malloc( tcp_size ); - if(tcp) { - // Build MAC - // memcpy( tcp->ip.mac.dest, sockets[t].mac_src, 6 ); - memcpy( tcp->ip.mac.dest, ether_addr, 6 ); - memcpy( tcp->ip.mac.src, router_mac_addr, 6 ); - tcp->ip.mac.type = htons(mac_type_ip4); - - // Build IP - tcp->ip.version = 4; - tcp->ip.header_len = 5; - tcp->ip.tos = 0; - tcp->ip.total_len = htons(sizeof(tcp_t) - sizeof(mac_t) + bytes_read); // no options - tcp->ip.ident = htons(next_ip_ident_number++); - tcp->ip.flags_n_frag_offset = 0; - tcp->ip.ttl = 128; // one hop actually! - tcp->ip.proto = ip_proto_tcp; - tcp->ip.src = htonl(sockets[t].ip_dest); - tcp->ip.dest = htonl(sockets[t].ip_src); - make_ip4_checksum( (ip_t *)tcp ); - - // Copy payload (used by tcp checksum) - memcpy( (char *)tcp + sizeof(tcp_t), sockets[t].buffers_read[0].buf, bytes_read ); - - // Build tcp - tcp->src_port = htons(sockets[t].dest_port); - tcp->dest_port = htons(sockets[t].src_port); - - tcp->seq = htonl(sockets[t].seq_out); - tcp->ack = htonl(sockets[t].seq_in); - - tcp->header_len = (uint8)( 20 << 2 ); -#if PUSH_ALWAYS - tcp->flags = ACK|PSH; -#else - tcp->flags = (bytes_read == MAX_SEGMENT_SIZE) ? ACK : (ACK|PSH); -#endif - tcp->window = htons( sockets[t].our_window ); - tcp->urgent_ptr = 0; - make_tcp_checksum( tcp, tcp_size ); - - sockets[t].seq_out += bytes_read; - - // dump_bytes( (uint8 *)tcp, tcp_size ); - - enqueue_packet( (uint8 *)tcp, tcp_size ); - free(tcp); - } -} - -static void CALLBACK tcp_read_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -) -{ - EnterCriticalSection( &tcp_section ); - - const int t = (int)lpOverlapped->hEvent; - - sockets[t].bytes_received = bytes_read; - - D(bug("<%d> tcp_read_completion(error=%d, bytes_read=%d)\r\n", t, error, bytes_read)); - - D(bug("<%d> tcp_read_completion() start, old state = %s\r\n", t, STATENAME(sockets[t].state))); - - if(!sockets[t].in_use) { - D(bug("<%d> ignoring canceled read\r\n", t)); - } else { - if( error != 0 ) { - D(bug("<%d> resetting after read error\r\n", t)); - tcp_reply( RST, t ); - free_socket(t); - } else { - if(bytes_read == 0) { - _closesocket( sockets[t].s ); - sockets[t].s = INVALID_SOCKET; - } else if( bytes_read > 0) { - send_buffer( t, false ); - } - - switch( sockets[t].state ) { - case SYN_RCVD: - if( bytes_read == 0 ) { - D(bug("<%d> Closing: SYN_RCVD -> FINWAIT_1\r\n", t)); - tcp_reply( ACK|FIN, t ); - sockets[t].seq_out++; - sockets[t].state = FINWAIT_1; - } - break; - case ESTABLISHED: - if( bytes_read == 0 ) { - D(bug("<%d> Closing: ESTABLISHED -> FINWAIT_1\r\n", t)); - tcp_reply( ACK|FIN, t ); - sockets[t].seq_out++; - sockets[t].state = FINWAIT_1; - } - break; - case LISTEN: - tcp_reply( SYN, t ); - sockets[t].seq_out++; - sockets[t].state = SYN_SENT; - sockets[t].time_wait = GetTickCount() + SYN_FLOOD_PROTECTION_TIMEOUT; - D(bug("<%d> LISTEN -> SYN_SENT\r\n", t)); - break; - case CLOSE_WAIT: - if( bytes_read == 0) { - tcp_reply( ACK|FIN, t ); - sockets[t].seq_out++; - sockets[t].state = LAST_ACK; - D(bug("<%d> Closing: CLOSE_WAIT -> LAST_ACK\r\n", t)); - if(sockets[t].remote_closed) { - // Just in case that mac gets out of sync. - _closesocket(sockets[t].s); - sockets[t].s = INVALID_SOCKET; - } - } - break; - default: - break; - } - - if(!is_router_shutting_down && sockets[t].s != INVALID_SOCKET) { - if(sockets[t].state != LISTEN) { - b_recfrom(t); - } - } - } - } - - LeaveCriticalSection( &tcp_section ); -} - -static void CALLBACK tcp_write_completion( - DWORD error, - DWORD bytes_written, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -) -{ - EnterCriticalSection( &tcp_section ); - - const int t = (int)lpOverlapped->hEvent; - - sockets[t].bytes_written = bytes_written; - sockets[t].bytes_remaining_to_send -= bytes_written; - - D(bug("<%d> tcp_write_completion(error=%d, bytes_written=%d)\r\n", t, error, bytes_written)); - - if(!sockets[t].in_use) { - D(bug("<%d> ignoring canceled write\r\n", t)); - } else { - if(is_router_shutting_down || sockets[t].s == INVALID_SOCKET) { - D(bug("<%d> is not alive for sending.\r\n", t)); - } else { - if( sockets[t].bytes_remaining_to_send <= 0 ) { - D(bug("<%d> all data sent, accepting some more.\r\n", t)); - sockets[t].seq_in += sockets[t].bytes_to_send; - sockets[t].bytes_to_send = sockets[t].bytes_remaining_to_send = 0; // superfluous - tcp_reply( ACK, t ); - sockets[t].accept_more_data_from_mac = true; - } else { - D(bug("<%d> %d bytes (of %d total) remaining, sending.\r\n", t, sockets[t].bytes_remaining_to_send, sockets[t].bytes_to_send)); - sockets[t].buffers_write[0].len = sockets[t].bytes_remaining_to_send; - char *p = sockets[t].buffers_write[0].buf; - memmove( p, &p[bytes_written], sockets[t].bytes_remaining_to_send ); - if(!b_send(t)) { - } else { - } - } - } - } - - LeaveCriticalSection( &tcp_section ); -} - -static void tcp_connect_callback( const int t ) -{ - D(bug("<%d> tcp_connect_callback() start, old state = %s\r\n", t, STATENAME(sockets[t].state))); - - switch( sockets[t].state ) { - case LISTEN: - tcp_reply( SYN|ACK, t ); - sockets[t].seq_out++; - sockets[t].state = SYN_RCVD; - D(bug("<%d> Connect: LISTEN -> SYN_RCVD\r\n", t)); - break; - default: - break; - } - D(bug("<%d> tcp_connect_callback() end, new state = %s\r\n", t, STATENAME(sockets[t].state))); -} - -static void tcp_accept_callback( const int lst ) -{ - D(bug("[%d] tcp_accept_callback()\r\n", lst)); - - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - int tolen = sizeof(to); - - SOCKET s = _accept( l_sockets[lst].s, (struct sockaddr *)&to, &tolen ); - if( s == INVALID_SOCKET ) { - D(bug("[%d] connection not accepted, error code %d\r\n", lst, _WSAGetLastError())); - } else { - _WSAEventSelect( s, 0, 0 ); - - uint16 src_port = l_sockets[lst].port; - uint16 dest_port = ntohs(to.sin_port); - uint32 ip_dest = ntohl(to.sin_addr.s_addr); - - D(bug("[%d] connection accepted, local port:%d, remote %s:%d\r\n", lst, src_port, _inet_ntoa(to.sin_addr), dest_port)); - - if( l_sockets[lst].ip != 0 && l_sockets[lst].ip != ip_dest ) { - _closesocket( s ); - D(bug("[%d] authorization failure. connection closed.\r\n", lst )); - } else { - int t = alloc_new_socket( src_port, dest_port, ip_dest ); - if( t < 0 ) { - D(bug("<%d> out of slot space, connection dropped\r\n", t )); - free_socket(t); - } else { - sockets[t].s = s; - sockets[t].state = LISTEN; - sockets[t].src_port = src_port; - sockets[t].dest_port = dest_port; - sockets[t].ip_src = macos_ip_address; - sockets[t].ip_dest = ip_dest; - - sockets[t].seq_out = 0x00000001; - sockets[t].seq_in = 0; // not known yet - sockets[t].mac_ack = sockets[t].seq_out; // zero out pending bytes - - tcp_reply( SYN, t ); - sockets[t].seq_out++; - sockets[t].state = SYN_SENT; - sockets[t].time_wait = GetTickCount() + SYN_FLOOD_PROTECTION_TIMEOUT; - D(bug("<%d> Connect: LISTEN -> SYN_SENT\r\n", t)); - - _WSAResetEvent( sockets[t].ev ); - if( SOCKET_ERROR == _WSAEventSelect( sockets[t].s, sockets[t].ev, FD_CLOSE ) ) { - D(bug("<%d> WSAEventSelect() failed with error code %d\r\n", t, _WSAGetLastError())); - } - - // No data from the remote host is needed until the connection is established. - // So don't initiate read yet. - } - } - } -} - -/* - MSS is the only option I care about, and since I'm on ethernet - I already pretty much know everything needed. - - AFAIK window scaling is not in effect unless both parties specify it, - and I'm not doing it. -*/ -static void process_options( const int t, const uint8 *opt, int len, uint32 &mss ) -{ - mss = 0; - - while( len > 0 ) { - switch( *opt ) { - case 0: // End of Option List - D(bug("<%d> End of Option List\r\n", t)); - len = 0; - break; - case 1: // No-Operation - D(bug("<%d> No-Operation\r\n", t)); - len--; - opt++; - break; - case 2: // Maximum Segment Size - { - mss = ntohs( *((uint16 *)&opt[2]) ); - D(bug("<%d> Maximum Segment Size = %d\r\n", t, mss)); - len -= 4; - opt += 4; - } - break; - case 3: // Window Scale - { - int wscale = opt[2]; - D(bug("<%d> Window Scale = %d\r\n", t, (int)wscale)); - len -= 3; - opt += 3; - } - break; - case 4: // Sack-Permitted - D(bug("<%d> Sack-Permitted option is set\r\n", t)); - len -= 2; - opt += 2; - break; - case 5: // Sack - { - int sack_len = opt[1]; - int hf = (sack_len-2) / 4; - D(bug("<%d> Sack, %d half-blocks\r\n", t, hf)); - len -= sack_len; - opt += sack_len; - } - break; - case 8: // Time Stamps - { - int valve = ntohl( *((uint32 *)&opt[2]) ); - int ereply = ntohl( *((uint32 *)&opt[6]) ); - D(bug("<%d> Time Stamps, TS valve = 0x%X, TS echo reply = 0x%X\r\n", t, valve, ereply)); - len -= 10; - opt += 10; - } - break; - default: - D(bug("<%d> Unknown tcp header option 0x%02x, breaking out\r\n", t, (int)*opt)); - len = 0; - break; - } - } -} - -void write_tcp( tcp_t *tcp, int len ) -{ - if(len < sizeof(tcp_t)) { - D(bug("<%d> Too small tcp packet(%d) on unknown slot, dropped\r\n", -1, len)); - return; - } - uint16 src_port = ntohs(tcp->src_port); - uint16 dest_port = ntohs(tcp->dest_port); - - BOOL ok = true; - BOOL handle_data = false; - BOOL initiate_read = false; - - EnterCriticalSection( &tcp_section ); - - int t = find_socket( src_port, dest_port ); - - if(t < 0) { - t = alloc_new_socket( src_port, dest_port, ntohl(tcp->ip.dest) ); - ok = t >= 0; - } - - if(ok) { - D(bug("<%d> write_tcp %d bytes from port %d to port %d\r\n", t, len, src_port, dest_port)); - } else { - D(bug("<%d> FAILED write_tcp %d bytes from port %d to port %d\r\n", t, len, src_port, dest_port)); - } - - if( ok && ISSET(tcp->flags,RST) ) { - D(bug("<%d> RST set, resetting socket\r\n", t)); - if( sockets[t].s != INVALID_SOCKET ) { - D(bug("<%d> doing an extra shutdown (ie4)\r\n", t)); - _shutdown( sockets[t].s, SD_BOTH ); - } - free_socket( t ); - ok = false; - } - - if(ok) { - D(bug("<%d> State machine start = %s\r\n", t, STATENAME(sockets[t].state))); - - // always update receive window - sockets[t].mac_window = ntohs(tcp->window); - - int header_len = tcp->header_len >> 2; - int option_bytes = header_len - 20; - char *data = (char *)tcp + sizeof(tcp_t) + option_bytes; - int dlen = len - sizeof(tcp_t) - option_bytes; - - if( !ISSET(tcp->flags,ACK) ) { - D(bug("<%d> ACK not set\r\n", t)); - } - if( ISSET(tcp->flags,SYN) ) { - D(bug("<%d> SYN set\r\n", t)); - - // Note that some options are valid even if there is no SYN. - // I don't care about those however. - - uint32 new_mss; - process_options( t, (uint8 *)data - option_bytes, option_bytes, new_mss ); - if(new_mss) { - sockets[t].mac_mss = (int)new_mss; - if( new_mss < sockets[t].buffers_read[0].len ) { - sockets[t].buffers_read[0].len = new_mss; - } - D(bug("<%d> Max segment size set to %d\r\n", t, new_mss)); - } - } - if( ISSET(tcp->flags,FIN) ) { - D(bug("<%d> FIN set\r\n", t)); - } - - // The sequence number Mac expects to see next time. - sockets[t].mac_ack = ntohl(tcp->ack); - - D(bug("<%d> From Mac: Seq=%d, Ack=%d, window=%d, router Seq=%d\r\n", t, ntohl(tcp->seq), sockets[t].mac_ack, sockets[t].mac_window, sockets[t].seq_out)); - - if( sockets[t].stream_to_mac_stalled_until && - sockets[t].mac_ack == sockets[t].seq_out && - (sockets[t].state == ESTABLISHED || sockets[t].state == CLOSE_WAIT) ) - { - if( has_mac_read_space(t) ) { - initiate_read = true; - sockets[t].stream_to_mac_stalled_until = 0; - D(bug("<%d> read resumed, mac can accept more data\r\n", t)); - } - } - - switch( sockets[t].state ) { - case CLOSED: - sockets[t].src_port = src_port; - sockets[t].dest_port = dest_port; - sockets[t].ip_src = ntohl(tcp->ip.src); - sockets[t].ip_dest = ntohl(tcp->ip.dest); - - if( ISSET(tcp->flags,SYN) ) { - - sockets[t].seq_out = 0x00000001; - sockets[t].seq_in = ntohl(tcp->seq) + 1; - - _WSAResetEvent( sockets[t].ev ); - if( SOCKET_ERROR == _WSAEventSelect( sockets[t].s, sockets[t].ev, FD_CONNECT | FD_CLOSE ) ) { - D(bug("<%d> WSAEventSelect() failed with error code %d\r\n", t, _WSAGetLastError())); - } - - D(bug("<%d> connecting local port %d to remote %s:%d\r\n", t, src_port, _inet_ntoa(sockets[t].from.sin_addr), dest_port)); - - sockets[t].state = LISTEN; - if( _WSAConnect( - sockets[t].s, - (const struct sockaddr *)&sockets[t].from, - sockets[t].from_len, - NULL, NULL, - NULL, NULL - ) == SOCKET_ERROR ) - { - int connect_error = _WSAGetLastError(); - if( connect_error == WSAEWOULDBLOCK ) { - D(bug("<%d> WSAConnect() i/o pending.\r\n", t)); - } else { - D(bug("<%d> WSAConnect() failed with error %d.\r\n", t, connect_error)); - } - } else { - D(bug("<%d> WSAConnect() ok.\r\n", t)); - } - } else { - if( ISSET(tcp->flags,FIN) ) { - D(bug("<%d> No SYN but FIN on a closed socket.\r\n", t)); - free_socket(t); - } else { - D(bug("<%d> No SYN on a closed socket. resetting.\r\n", t)); - free_socket(t); - } - } - break; - case LISTEN: - // handled in connect callback - break; - case SYN_SENT: - if( ISSET(tcp->flags,SYN) && ISSET(tcp->flags,ACK) ) { - sockets[t].seq_in = ntohl(tcp->seq) + 1; - tcp_reply( ACK, t ); - sockets[t].state = ESTABLISHED; - initiate_read = true; - sockets[t].accept_more_data_from_mac = true; - sockets[t].time_wait = 0; - } else if( ISSET(tcp->flags,SYN) ) { - sockets[t].seq_in = ntohl(tcp->seq) + 1; - tcp_reply( ACK|SYN, t ); - sockets[t].seq_out++; - sockets[t].state = SYN_RCVD; - sockets[t].time_wait = 0; - } else if( ISSET(tcp->flags,ACK) ) { - // What was the bright idea here. - D(bug("<%d> State is SYN_SENT, but got only ACK from Mac??\r\n", t)); - sockets[t].state = FINWAIT_2; - sockets[t].time_wait = 0; - } - break; - case SYN_RCVD: - if( ISSET(tcp->flags,ACK) ) { - sockets[t].state = ESTABLISHED; - handle_data = true; - initiate_read = true; - sockets[t].accept_more_data_from_mac = true; - } - break; - case ESTABLISHED: - if( ISSET(tcp->flags,FIN) ) { - sockets[t].seq_in++; - tcp_reply( ACK, t ); - _shutdown( sockets[t].s, SD_SEND ); - sockets[t].state = CLOSE_WAIT; - } - handle_data = true; - break; - case CLOSE_WAIT: - // handled in tcp_read_completion - break; - case LAST_ACK: - if( ISSET(tcp->flags,ACK) ) { - D(bug("<%d> LAST_ACK received, socket closed\r\n", t)); - free_socket( t ); - } - break; - case FINWAIT_1: - if( ISSET(tcp->flags,FIN) && ISSET(tcp->flags,ACK) ) { - sockets[t].seq_in++; - tcp_reply( ACK, t ); - if(sockets[t].remote_closed) { - _closesocket(sockets[t].s); - sockets[t].s = INVALID_SOCKET; - } else { - _shutdown( sockets[t].s, SD_SEND ); - } - sockets[t].state = TIME_WAIT; - sockets[t].time_wait = GetTickCount() + 2 * sockets[t].msl; - } else if( ISSET(tcp->flags,FIN) ) { - sockets[t].seq_in++; - tcp_reply( ACK, t ); - if(sockets[t].remote_closed) { - _closesocket(sockets[t].s); - sockets[t].s = INVALID_SOCKET; - } else { - _shutdown( sockets[t].s, SD_SEND ); - } - sockets[t].state = CLOSING; - } else if( ISSET(tcp->flags,ACK) ) { - sockets[t].state = FINWAIT_2; - } - break; - case FINWAIT_2: - if( ISSET(tcp->flags,FIN) ) { - sockets[t].seq_in++; - tcp_reply( ACK, t ); - if(sockets[t].remote_closed) { - _closesocket(sockets[t].s); - sockets[t].s = INVALID_SOCKET; - } else { - _shutdown( sockets[t].s, SD_SEND ); - } - sockets[t].state = TIME_WAIT; - sockets[t].time_wait = GetTickCount() + 2 * sockets[t].msl; - } - break; - case CLOSING: - if( ISSET(tcp->flags,ACK) ) { - sockets[t].state = TIME_WAIT; - sockets[t].time_wait = GetTickCount() + 2 * sockets[t].msl; - } - break; - case TIME_WAIT: - // Catching stray packets: wait MSL * 2 seconds, -> CLOSED - // Timer already set since we might not get here at all. - // I'm using exceptionally low MSL value (5 secs). - D(bug("<%d> time wait, datagram discarded\r\n", t)); - break; - } - - // The "t" descriptor may already be freed. However, it's safe - // to peek the state value inside the critical section. - D(bug("<%d> State machine end = %s\r\n", t, STATENAME(sockets[t].state))); - - D(bug("<%d> handle_data=%d, initiate_read=%d\r\n", t, handle_data, initiate_read)); - - if( handle_data && dlen && sockets[t].accept_more_data_from_mac ) { - if( sockets[t].seq_in != ntohl(tcp->seq) ) { - D(bug("<%d> dropping duplicate datagram seq=%d, expected=%d\r\n", t, ntohl(tcp->seq), sockets[t].seq_in)); - } else { - set_ttl( t, tcp->ip.ttl ); - - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - to.sin_port = tcp->dest_port; - to.sin_addr.s_addr = tcp->ip.dest; - - D(bug("<%d> sending %d bytes to remote host\r\n", t, dlen)); - - sockets[t].accept_more_data_from_mac = false; - - if( dlen > MAX_SEGMENT_SIZE ) { - D(bug("<%d> IMPOSSIBLE: b_send() dropped %d bytes! \r\n", t, dlen-MAX_SEGMENT_SIZE)); - dlen = MAX_SEGMENT_SIZE; - } - - memcpy( sockets[t].buffers_write[0].buf, data, dlen ); - - sockets[t].buffers_write[0].len = dlen; - sockets[t].bytes_remaining_to_send = dlen; - sockets[t].bytes_to_send = dlen; - - bool send_now = false; - if( ISSET(tcp->flags,PSH) ) { - send_now = true; - } else { - // todo -- delayed send - send_now = true; - } - - if(send_now) { - - // Patch ftp server or client address if needed. - - int lst = 1; - bool is_pasv; - uint16 ftp_data_port = 0; - - if(ftp_is_ftp_port(sockets[t].src_port)) { - // Local ftp server may be entering to passive mode. - is_pasv = true; - ftp_parse_port_command( - sockets[t].buffers_write[0].buf, - dlen, - ftp_data_port, - is_pasv - ); - } else if(ftp_is_ftp_port(sockets[t].dest_port)) { - // Local ftp client may be using port command. - is_pasv = false; - ftp_parse_port_command( - sockets[t].buffers_write[0].buf, - dlen, - ftp_data_port, - is_pasv - ); - } - - if(ftp_data_port) { - D(bug("<%d> ftp %s command detected, port %d\r\n", t, (is_pasv ? "SERVER PASV REPLY" : "CLIENT PORT"), ftp_data_port )); - - // Note: for security reasons, only allow incoming connection from sockets[t].ip_dest - lst = alloc_listen_socket( ftp_data_port, sockets[t].ip_dest, 0/*iface*/, true ); - - if(lst < 0) { - D(bug("<%d> no more free slots\r\n", t)); - } else { - // First start listening (need to know the local name later) - tcp_start_listen( lst ); - - // When t is closed, lst must be closed too. - sockets[t].child = lst; - l_sockets[lst].parent = t; - - // Find out the local name - struct sockaddr_in name; - int namelen = sizeof(name); - memset( &name, 0, sizeof(name) ); - if( _getsockname( sockets[t].s, (struct sockaddr *)&name, &namelen ) == SOCKET_ERROR ) { - D(bug("_getsockname() failed, error=%d\r\n", _WSAGetLastError() )); - } - - ftp_modify_port_command( - sockets[t].buffers_write[0].buf, - dlen, - MAX_SEGMENT_SIZE, - ntohl(name.sin_addr.s_addr), - ftp_data_port, - is_pasv - ); - - sockets[t].buffers_write[0].len = dlen; - sockets[t].bytes_remaining_to_send = dlen; - // Do not change "bytes_to_send" field as it is used for ack calculation - } - } // end of ftp patch - - if(!b_send(t)) { - // on error, close the ftp data listening socket if one was created - if(lst >= 0) { - D(bug("[%d] closing listening port %d after write error\r\n", t, l_sockets[lst].port)); - _closesocket( l_sockets[lst].s ); - l_sockets[lst].s = INVALID_SOCKET; - l_sockets[lst].port = 0; - l_sockets[lst].ip = 0; - l_sockets[lst].parent = -1; - sockets[t].child = -1; - } - } - } - } - } - - if(initiate_read) { - if(!b_recfrom(t)) { - // post icmp error message - } - } - } - - LeaveCriticalSection( &tcp_section ); -} - -/* - - Dispatch remote close and connect events. - - Expire time-waits. - - Handle resend timeouts. -*/ -static unsigned int WINAPI tcp_connect_close_thread(void *arg) -{ - WSAEVENT wait_handles[MAX_SOCKETS]; - - for( int i=0; i= WAIT_OBJECT_0 && ret < WAIT_OBJECT_0 + MAX_SOCKETS ) { - const int t = ret - WAIT_OBJECT_0; - - D(bug("<%d> Event %d\r\n", t, ret)); - - if(sockets[t].in_use) { - WSANETWORKEVENTS what; - - if( _WSAEnumNetworkEvents( sockets[t].s, sockets[t].ev, &what ) != SOCKET_ERROR ) { - if( what.lNetworkEvents & FD_CONNECT ) { - if( what.iErrorCode[FD_CONNECT_BIT] == 0 ) { - D(bug("<%d> Connect ok\r\n", t)); - tcp_connect_callback(t); - } else { - D(bug("<%d> Connect error=%d\r\n", t, what.iErrorCode[FD_CONNECT_BIT])); - // Post icmp error - } - } else if( what.lNetworkEvents & FD_CLOSE ) { - if( what.iErrorCode[FD_CLOSE_BIT] == 0 ) { - D(bug("<%d> graceful close, state = %s\r\n", t, STATENAME(sockets[t].state))); - } else { - D(bug("<%d> abortive close, state = %s, code=%d\r\n", t, STATENAME(sockets[t].state), what.iErrorCode[FD_CLOSE_BIT])); - } - sockets[t].remote_closed = true; - } - } else { - int err = _WSAGetLastError(); - if( err == WSAENOTSOCK ) { - D(bug("<%d> WSAEnumNetworkEvents: socket is already closed\r\n", t)); - } else { - D(bug("<%d> WSAEnumNetworkEvents failed with error code %d, freeing slot\r\n", t, err)); - free_socket( t ); - } - } - } - _WSAResetEvent( sockets[t].ev ); - } else { - static int interval = 5; - if( !--interval ) { - for( int i=0; i= tmw ) { - if( sockets[i].state == SYN_SENT ) { - /* - A very basic SYN flood protection. Note that watching - SYN_SENT instead of SYN_RCVD, because the state codes are - from the point of view of the Mac-Router interface, not Router-Remote. - */ - D(bug("<%d> SYN_SENT time-out expired\r\n", i)); - } else { - D(bug("<%d> TIME_WAIT expired\r\n", i)); - } - free_socket( i ); - } - } else if( stl ) { - if( sockets[i].state == ESTABLISHED ) { - if( GetTickCount() >= stl ) { - D(bug("<%d> RESEND timeout expired\r\n", i)); - sockets[i].stream_to_mac_stalled_until = GetTickCount() + sockets[i].resend_timeout; - send_buffer( i, true ); - } - } else { - sockets[i].stream_to_mac_stalled_until = 0; - } - } - } - } - interval = 5; - } - } - LeaveCriticalSection( &tcp_section ); - } - return 0; -} - -static unsigned int WINAPI tcp_listen_thread(void *arg) -{ - WSAEVENT wait_handles[MAX_SOCKETS]; - - for( int i=0; i= WAIT_OBJECT_0 && ret < WAIT_OBJECT_0 + MAX_SOCKETS ) { - const int lst = ret - WAIT_OBJECT_0; - - D(bug("[%d] connection attempt to port %d\r\n", lst, l_sockets[lst].port)); - - WSANETWORKEVENTS what; - - if( _WSAEnumNetworkEvents( l_sockets[lst].s, l_sockets[lst].ev, &what ) != SOCKET_ERROR ) { - if( what.lNetworkEvents & FD_ACCEPT ) { - if( what.iErrorCode[FD_ACCEPT_BIT] == 0 ) { - D(bug("[%d] Connect ok\r\n", lst)); - tcp_accept_callback(lst); - } else { - D(bug("[%d] Connect error=%d\r\n", lst, what.iErrorCode[FD_ACCEPT_BIT])); - // Post icmp error - } - } - } - - // close on errors too - if(l_sockets[lst].once) { - D(bug("[%d] once mode: closing listening socket on port %d\r\n", lst, l_sockets[lst].port)); - if( _closesocket( l_sockets[lst].s ) == SOCKET_ERROR ) { - int err = _WSAGetLastError(); - D(bug("[%d] close error %d\r\n", lst, err)); - } - - l_sockets[lst].s = INVALID_SOCKET; - l_sockets[lst].port = 0; - l_sockets[lst].ip = 0; - - int t = l_sockets[lst].parent; - if( t >= 0 ) { - sockets[t].child = -1; - } - l_sockets[lst].parent = -1; - } - - _WSAResetEvent( l_sockets[lst].ev ); - } - LeaveCriticalSection( &tcp_section ); - } - return 0; -} - -/* - tcp_port= [,] - tcp_port=21,192.168.0.1 -*/ - -static void init_tcp_listen_ports() -{ - int32 index = 0; - const char *port_str; - while ((port_str = PrefsFindString("tcp_port", index++)) != NULL) { - uint32 iface = 0; - const char *if_str = strchr(port_str,','); - if(if_str) { - if_str++; - uint32 if_net = _inet_addr( if_str ); - if(if_net == INADDR_NONE) if_net = INADDR_ANY; - iface = ntohl( if_net ); - } - uint16 port = (uint16)strtoul( port_str, 0, 0 ); - if( port ) { - uint32 ip = 0; - bool once = false; - alloc_listen_socket( port, ip, iface, once ); - } - } -} - -static HANDLE tcp_handle = 0; -static HANDLE tcp_l_handle = 0; - -void init_tcp() -{ - InitializeCriticalSection( &tcp_section ); - - for( int i=0; ihEvent; - - // It's not easy to know whether empty upd datagrams should be passed along. doh. - if(error == 0 && bytes_read > 0) { - - if(bytes_read > 1460) { - D(bug("discarding oversized udp packet, size = \r\n", bytes_read)); - } else { - struct sockaddr_in name; - int namelen = sizeof(name); - memset( &name, 0, sizeof(name) ); - if( _getsockname( cmpl->s, (struct sockaddr *)&name, &namelen ) == SOCKET_ERROR ) { - D(bug("_getsockname() failed, error=%d\r\n", _WSAGetLastError() )); - } else { - D(bug("_getsockname(): port=%d\r\n", ntohs(name.sin_port) )); - } - - int udp_size = sizeof(udp_t) + bytes_read; - udp_t *udp = (udp_t *)malloc( udp_size ); - if(udp) { - mac_t *mac = (mac_t *)udp; - ip_t *ip = (ip_t *)udp; - - // Build MAC - // memcpy( udp->ip.mac.dest, cmpl->mac_src, 6 ); - memcpy( mac->dest, ether_addr, 6 ); - memcpy( mac->src, router_mac_addr, 6 ); - mac->type = htons(mac_type_ip4); - - // Build IP - ip->version = 4; - ip->header_len = 5; - ip->tos = 0; - ip->total_len = htons(sizeof(udp_t) - sizeof(mac_t) + bytes_read); // no options - ip->ident = htons(next_ip_ident_number++); // htons() might be a macro... but does not really matter here. - ip->flags_n_frag_offset = 0; - ip->ttl = 128; // one hop actually! - ip->proto = ip_proto_udp; - ip->src = htonl(cmpl->ip_dest); - ip->dest = htonl(cmpl->ip_src); - make_ip4_checksum( (ip_t *)udp ); - - // Copy payload (used by UDP checksum) - memcpy( (char *)udp + sizeof(udp_t), cmpl->buffers[0].buf, bytes_read ); - - // Build UDP - udp->src_port = htons(cmpl->dest_port); - udp->dest_port = htons(cmpl->src_port); - udp->msg_len = htons(sizeof(udp_t) - sizeof(ip_t) + bytes_read); // no options - make_udp_checksum( udp ); - - dump_bytes( (uint8 *)udp, udp_size ); - - enqueue_packet( (uint8 *)udp, udp_size ); - free(udp); - } - } - } - - if(!is_router_shutting_down && cmpl->s != INVALID_SOCKET && cmpl->b_recfrom()) { - cmpl->socket_ttl = GetTickCount() + 60000L; - } else { - delete_socket( cmpl ); - } -} - -void write_udp( udp_t *udp, int len ) -{ - if( len < sizeof(udp_t) ) { - D(bug("Too small udp packet(%d), dropped\r\n", len)); - return; - } - - uint16 src_port = ntohs(udp->src_port); - uint16 dest_port = ntohs(udp->dest_port); - - BOOL ok = true; - - socket_t *cmpl = find_socket( src_port, dest_port, IPPROTO_UDP ); - - BOOL old_socket_found = cmpl != 0; - - if(!cmpl) { - cmpl = new socket_t(IPPROTO_UDP); - if(cmpl) { - cmpl->s = _socket( AF_INET, SOCK_DGRAM, IPPROTO_UDP ); - if(cmpl->s == INVALID_SOCKET) { - delete cmpl; - cmpl = 0; - ok = false; - } else { - cmpl->src_port = src_port; - cmpl->dest_port = dest_port; - add_socket( cmpl ); - } - } else { - ok = false; - } - } - - if(ok) { - cmpl->src_port = src_port; - cmpl->dest_port = dest_port; - cmpl->ip_src = ntohl(udp->ip.src); - cmpl->ip_dest = ntohl(udp->ip.dest); - - struct sockaddr_in to; - memset( &to, 0, sizeof(to) ); - to.sin_family = AF_INET; - to.sin_port = udp->dest_port; - to.sin_addr.s_addr = udp->ip.dest; - - char *data = (char *)udp + sizeof(udp_t); - int dlen = len - sizeof(udp_t); - - // ttl changed, update checksum - make_udp_checksum( udp ); - - cmpl->set_ttl( udp->ip.ttl ); - - bool please_close = true; - /* - Note that broadcast messages fill fail, no setsockopt(SO_BROADCAST). - That's exactly what I want. - */ - if(SOCKET_ERROR != _sendto( cmpl->s, data, dlen, 0, (struct sockaddr *)&to, sizeof(to) )) { - if(old_socket_found) { - // This socket is not overlapped. - please_close = false; - } else { - if(cmpl->b_recfrom()) please_close = false; - } - cmpl->socket_ttl = GetTickCount() + 60000L; - } else { - int socket_error = _WSAGetLastError(); - D(bug("_sendto() completed with error %d\r\n", socket_error)); - // TODO: check this out: error_winsock_2_icmp() uses router_ip_address - // as source ip; but it's probably allright - error_winsock_2_icmp( socket_error, (ip_t *)udp, len ); - } - if(please_close) { - delete_socket(cmpl); - } - } -} - -void init_udp() -{ -} - -void final_udp() -{ -} diff --git a/BasiliskII/src/Windows/router/udp.h b/BasiliskII/src/Windows/router/udp.h deleted file mode 100755 index b9a5f8a5f..000000000 --- a/BasiliskII/src/Windows/router/udp.h +++ /dev/null @@ -1,38 +0,0 @@ -/* - * udp.h - ip router - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _UDP_H_ -#define _UDP_H_ - -void write_udp( udp_t *udp, int len ); - -void CALLBACK udp_read_completion( - DWORD error, - DWORD bytes_read, - LPWSAOVERLAPPED lpOverlapped, - DWORD flags -); - -void init_udp(); -void final_udp(); - -#endif // _UDP_H_ diff --git a/BasiliskII/src/Windows/serial_windows.cpp b/BasiliskII/src/Windows/serial_windows.cpp deleted file mode 100755 index 5a062b32b..000000000 --- a/BasiliskII/src/Windows/serial_windows.cpp +++ /dev/null @@ -1,1198 +0,0 @@ -/* - * serial_windows.cpp - Serial device driver for Win32 - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 - */ - -// TODO: serial i/o threads should have high priority. -#include "sysdeps.h" - -#include -#include - -#include "main.h" -#include "util_windows.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" -#include "cpu_emulation.h" - -// This must be always on. -#define DEBUG 1 -#undef OutputDebugString -#define OutputDebugString serial_log_write -static void serial_log_write( char *s ); -#define SERIAL_LOG_FILE_NAME TEXT("serial.log") -#include "debug.h" -#undef D -#define D(x) if(debug_serial != DB_SERIAL_NONE) (x); - - -enum { - DB_SERIAL_NONE=0, - DB_SERIAL_NORMAL, - DB_SERIAL_LOUD -}; - -static int16 debug_serial = DB_SERIAL_NONE; - -static HANDLE serial_log_file = INVALID_HANDLE_VALUE; - -static void serial_log_open( LPCTSTR path ) -{ - if(debug_serial == DB_SERIAL_NONE) return; - - DeleteFile( path ); - serial_log_file = CreateFile( - path, - GENERIC_READ|GENERIC_WRITE, - FILE_SHARE_READ, - NULL, - CREATE_ALWAYS, - FILE_FLAG_WRITE_THROUGH, - NULL - ); - if( serial_log_file == INVALID_HANDLE_VALUE ) { - ErrorAlert( "Could not create the serial log file." ); - } -} - -static void serial_log_close( void ) -{ - if(debug_serial == DB_SERIAL_NONE) return; - - if( serial_log_file != INVALID_HANDLE_VALUE ) { - CloseHandle( serial_log_file ); - serial_log_file = INVALID_HANDLE_VALUE; - } -} - -static void serial_log_write( char *s ) -{ - DWORD bytes_written; - - // should have been checked already. - if(debug_serial == DB_SERIAL_NONE) return; - - if( serial_log_file != INVALID_HANDLE_VALUE ) { - - DWORD count = strlen(s); - if (0 == WriteFile(serial_log_file, s, count, &bytes_written, NULL) || - (int)bytes_written != count) - { - serial_log_close(); - ErrorAlert( "serial log file write error (out of disk space?). Log closed." ); - } else { - FlushFileBuffers( serial_log_file ); - } - } -} - - -// Driver private variables -class XSERDPort : public SERDPort { -public: - XSERDPort(LPCTSTR dev, LPCTSTR suffix) - { - D(bug(TEXT("XSERDPort constructor %s\r\n"), dev)); - - read_pending = write_pending = false; - - if(dev) - _tcscpy( device_name, dev ); - else - *device_name = 0; - _tcsupr(device_name); - is_parallel = (_tcsncmp(device_name, TEXT("LPT"), 3) == 0); - is_file = (_tcsncmp(device_name, TEXT("FILE"), 4) == 0); - if(is_file) { - char entry_name[20]; - _snprintf( entry_name, lengthof(entry_name), "portfile%s", str(suffix).get() ); - const char *path = PrefsFindString(entry_name); - if(path) { - _tcscpy( output_file_name, tstr(path).get() ); - } else { - _tcscpy( output_file_name, TEXT("C:\\B2TEMP.OUT") ); - } - } - - is_serial = !is_parallel && !is_file; - - fd = INVALID_HANDLE_VALUE; - input_thread_active = output_thread_active = NULL; - } - - virtual ~XSERDPort() - { - D(bug("XSERDPort destructor \r\n")); - if (input_thread_active) { - D(bug("WARNING: brute TerminateThread(input)\r\n")); - TerminateThread(input_thread_active,0); - CloseHandle(input_signal); - input_thread_active = NULL; - } - if (output_thread_active) { - D(bug("WARNING: brute TerminateThread(output)\r\n")); - TerminateThread(output_thread_active,0); - CloseHandle(output_signal); - output_thread_active = NULL; - } - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - static unsigned int WINAPI input_func(void *arg); - static unsigned int WINAPI output_func(void *arg); - static int acknowledge_error(HANDLE h, bool is_read); - bool set_timeouts(int bauds, int parity_bits, int stop_bits); - - TCHAR device_name[256]; - HANDLE fd; - - bool io_killed; // Flag: KillIO called, I/O threads must not call deferred tasks - bool quitting; // Flag: Quit threads - - HANDLE input_thread_active; // Handle: Input thread installed (was a bool) - unsigned int input_thread_id; - HANDLE input_signal; // Signal for input thread: execute command - uint32 input_pb, input_dce; // Command parameters for input thread - - HANDLE output_thread_active; // Handle: Output thread installed (was a bool) - unsigned int output_thread_id; - HANDLE output_signal; // Signal for output thread: execute command - uint32 output_pb, output_dce; // Command parameters for output thread - - DCB mode; // Terminal configuration - - bool is_serial; - bool is_parallel; // true if LPTx - - bool is_file; // true if FILE - TCHAR output_file_name[256]; -}; - -/* - * Initialization - */ - -void SerialInit(void) -{ - const char *port; - - debug_serial = PrefsFindInt32("debugserial"); - - serial_log_open( SERIAL_LOG_FILE_NAME ); - - // Read serial preferences and create structs for both ports - - port = PrefsFindString("seriala"); - if(port) { - D(bug("SerialInit seriala=%s\r\n",port)); - } - the_serd_port[0] = new XSERDPort(tstr(port).get(), TEXT("0")); - - port = PrefsFindString("serialb"); - if(port) { - D(bug("SerialInit serialb=%s\r\n",port)); - } - the_serd_port[1] = new XSERDPort(tstr(port).get(), TEXT("1")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - D(bug("SerialExit\r\n")); - if(the_serd_port[0]) delete (XSERDPort *)the_serd_port[0]; - if(the_serd_port[1]) delete (XSERDPort *)the_serd_port[1]; - D(bug("SerialExit done\r\n")); - - serial_log_close(); -} - - -/* - * Open serial port - */ - -int16 XSERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (!device_name || !*device_name) - return openErr; - - D(bug(TEXT("XSERDPort::open device=%s,config=0x%X\r\n"),device_name,(int)config)); - - // Init variables - io_killed = false; - quitting = false; - - // Open port - if(is_file) { - DeleteFile( output_file_name ); - fd = CreateFile( output_file_name, - GENERIC_READ | GENERIC_WRITE, - FILE_SHARE_READ, - NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL - ); - } else { - fd = CreateFile( device_name, GENERIC_READ|GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0 ); - } - if(fd == INVALID_HANDLE_VALUE) { - goto open_error; - D(bug(TEXT("XSERDPort::open failed to open port %s\r\n"),device_name)); - } - - if(is_serial) { - // Configure port for raw mode - memset( &mode, 0, sizeof(DCB) ); - mode.DCBlength = sizeof(mode); - if(!GetCommState( fd, &mode )) - goto open_error; - - mode.fBinary = TRUE; - if(!configure(config)) { - D(bug("XSERDPort::configure failed\r\n")); - goto open_error; - } - } - - // Start input/output threads - input_signal = CreateSemaphore( 0, 0, 1, NULL); - if(!input_signal) - goto open_error; - - output_signal = CreateSemaphore( 0, 0, 1, NULL); - if(!output_signal) - goto open_error; - - D(bug("Semaphores created\r\n")); - - input_thread_active = (HANDLE)_beginthreadex( 0, 0, input_func, (LPVOID)this, 0, &input_thread_id ); - output_thread_active = (HANDLE)_beginthreadex( 0, 0, output_func, (LPVOID)this, 0, &output_thread_id ); - - if (!input_thread_active || !output_thread_active) - goto open_error; - - D(bug("Threads created, Open returns success\r\n")); - return noErr; - -open_error: - D(bug("Open cleanup after failure\r\n")); - if (input_thread_active) { - TerminateThread(input_thread_active,0); - CloseHandle(input_signal); - input_thread_active = false; - } - if (output_thread_active) { - TerminateThread(output_thread_active,0); - CloseHandle(output_signal); - output_thread_active = false; - } - if(fd != INVALID_HANDLE_VALUE) { - CloseHandle(fd); - fd = 0; - } - return openErr; -} - -/* - * Read data from port - */ - -int16 XSERDPort::prime_in(uint32 pb, uint32 dce) -{ - D(bug("XSERDPort::prime_in\r\n")); - // Send input command to input_thread - read_done = false; - read_pending = true; - input_pb = pb; - input_dce = dce; - ReleaseSemaphore(input_signal,1,NULL); - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 XSERDPort::prime_out(uint32 pb, uint32 dce) -{ - D(bug("XSERDPort::prime_out\r\n")); - // Send output command to output_thread - write_done = false; - write_pending = true; - output_pb = pb; - output_dce = dce; - ReleaseSemaphore(output_signal,1,NULL); - return 1; // Command in progress -} - - -static DWORD get_comm_output_buf_size( HANDLE h ) -{ - DWORD size = 0; - COMMPROP cp; - - if(GetCommProperties(h,&cp)) { - size = cp.dwCurrentTxQueue; - } - return size; -} - -/* - * Control calls - */ - -int16 XSERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - D(bug("XSERDPort::control code=%d\r\n",(int)code)); - switch (code) { - - case kSERDClockMIDI: - /* http://til.info.apple.com/techinfo.nsf/artnum/n2425 - A MIDI interface operates at 31.25 Kbaud (+/- 1%) [== 31400] - asynchronously, using a data format of one start bit, eight - data bits, and one stop bit. This makes a total of 10 bits - for each 320 microsecond period per serial byte. - */ - D(bug("kSERDClockMIDI setting 38400,n,8,1\n")); - return noErr; - - /* - mode.BaudRate = 38400; - mode.ByteSize = 8; - mode.StopBits = ONESTOPBIT; - mode.Parity = NOPARITY; - if(!SetCommState( fd, &mode )) { - D(bug("kSERDClockMIDI SetCommState() failed\n")); - return controlErr; - } else { - if(!set_timeouts(38400,0,2)) { - D(bug("kSERDClockMIDI set_timeouts() failed\n")); - return controlErr; - } - D(bug("kSERDClockMIDI OK\n")); - return noErr; - } - */ - - case 1: // KillIO - io_killed = true; - - if(is_serial) { - // Make sure we won't hang waiting. There is something wrong - // in how read_pending & write_pending are handled. - DWORD endtime = GetTickCount() + 1000; - while ( (read_pending || write_pending) && (GetTickCount() < endtime) ) { - Sleep(20); - } - if(read_pending || write_pending) { - D(bug("Warning (KillIO): read_pending=%d, write_pending=%d\n", read_pending, write_pending)); - read_pending = write_pending = false; - } - // | PURGE_TXABORT | PURGE_RXABORT not needed, no overlapped i/o - PurgeComm(fd,PURGE_TXCLEAR|PURGE_RXCLEAR); - FlushFileBuffers(fd); - } - io_killed = false; - D(bug("KillIO done\n")); - return noErr; - - case kSERDConfiguration: - if (configure((uint16)ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: - if(is_serial) { - - // SetupComm() wants both values, so we need to know the output size. - DWORD osize = get_comm_output_buf_size(fd); - - DWORD isize = ReadMacInt16(pb + csParam + 4) & 0xffffffc0; - - // 1k minimum - // Was this something Amiga specific -- do I need to do this? - if (isize < 1024) - isize = 1024; - - if(isize > 0 && osize > 0) { - if(SetupComm( fd, isize, osize )) { - D(bug(" buffer size is now %08lx\n", isize)); - return noErr; - } else { - D(bug(" SetupComm(%d,%d) failed, error = %08lx\n", isize, osize, GetLastError())); - } - } - } - // Always return ok. - return noErr; - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDSetBreak: - if(is_serial) { - if(!SetCommBreak(fd)) return controlErr; - } - return noErr; - - case kSERDClearBreak: - if(is_serial) { - if(!ClearCommBreak(fd)) return controlErr; - } - return noErr; - - case kSERDBaudRate: { - if (is_serial) { - uint16 rate = (uint16)ReadMacInt16(pb + csParam); - int baud_rate; - if (rate <= 50) { - rate = 50; baud_rate = CBR_110; - } else if (rate <= 75) { - rate = 75; baud_rate = CBR_110; - } else if (rate <= 110) { - rate = 110; baud_rate = CBR_110; - } else if (rate <= 134) { - rate = 134; baud_rate = CBR_110; - } else if (rate <= 150) { - rate = 150; baud_rate = CBR_110; - } else if (rate <= 200) { - rate = 200; baud_rate = CBR_300; - } else if (rate <= 300) { - rate = 300; baud_rate = CBR_300; - } else if (rate <= 600) { - rate = 600; baud_rate = CBR_600; - } else if (rate <= 1200) { - rate = 1200; baud_rate = CBR_1200; - } else if (rate <= 1800) { - rate = 1800; baud_rate = CBR_2400; - } else if (rate <= 2400) { - rate = 2400; baud_rate = CBR_2400; - } else if (rate <= 4800) { - rate = 4800; baud_rate = CBR_4800; - } else if (rate <= 9600) { - rate = 9600; baud_rate = CBR_9600; - } else if (rate <= 19200) { - rate = 19200; baud_rate = CBR_19200; - } else if (rate <= 38400) { - rate = 38400; baud_rate = CBR_38400; - } else if (rate <= 57600) { - rate = 57600; baud_rate = CBR_57600; - } else { - rate = 57600; baud_rate = CBR_57600; - } - WriteMacInt16(pb + csParam, rate); - mode.BaudRate = baud_rate; - if(!SetCommState( fd, &mode )) return controlErr; - // TODO: save parity/stop values and use here (not critical) - if(!set_timeouts(rate,0,1)) return controlErr; - } - return noErr; - } - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDMiscOptions: - if (ReadMacInt8(pb + csParam) & kOptionPreserveDTR) - mode.fDtrControl = DTR_CONTROL_ENABLE; // correct? - else - mode.fDtrControl = DTR_CONTROL_DISABLE; // correct? - if(is_serial) { - if(!SetCommState( fd, &mode )) return controlErr; - } - return noErr; - - case kSERDAssertDTR: { - if (is_serial) { - if(!EscapeCommFunction(fd,SETDTR)) return controlErr; - } - return noErr; - } - - case kSERDNegateDTR: { - if (is_serial) { - if(!EscapeCommFunction(fd,CLRDTR)) return controlErr; - } - return noErr; - } - - case kSERDSetPEChar: - case kSERDSetPEAltChar: - { - uint16 errChar = (uint16)ReadMacInt16(pb + csParam); - mode.fErrorChar = TRUE; - mode.ErrorChar = (char)errChar; - return noErr; - } - - case kSERDResetChannel: - if (is_serial) { - // | PURGE_TXABORT | PURGE_RXABORT not needed, no overlapped i/o - PurgeComm(fd,PURGE_TXCLEAR|PURGE_RXCLEAR); - FlushFileBuffers(fd); - } - return noErr; - - case kSERDAssertRTS: { - if (is_serial) { - if(!EscapeCommFunction(fd,SETRTS)) return controlErr; - } - return noErr; - } - - case kSERDNegateRTS: { - if (is_serial) { - if(!EscapeCommFunction(fd,CLRRTS)) return controlErr; - } - return noErr; - } - - case kSERD115KBaud: - if (is_serial) { - mode.BaudRate = CBR_115200; - if(!SetCommState( fd, &mode )) return controlErr; - } - return noErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (is_serial) { - mode.BaudRate = CBR_256000; - if(!SetCommState( fd, &mode )) return controlErr; - } - return noErr; - - default: - D(bug("WARNING: SerialControl(): unimplemented control code %d\r\n", code)); - return controlErr; - } -} - -/* - * Status calls - */ - -int16 XSERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - // D(bug("XSERDPort::status code=%d\r\n",(int)code)); - - DWORD error_state; - COMSTAT comstat; - - switch (code) { - case kSERDInputCount: { - uint32 num = 0; - if (is_serial) { - if(!ClearCommError(fd,&error_state,&comstat)) return statusErr; - num = comstat.cbInQue; - } - WriteMacInt32(pb + csParam, num); - return noErr; - } - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - DWORD status; - - if(is_serial) { - if(!GetCommModemStatus(fd,&status)) return statusErr; - } else { - status = MS_CTS_ON | MS_DSR_ON | MS_RLSD_ON; - D(bug("kSERDStatus: faking status for LPT port or FILE\r\n")); - } - - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - - WriteMacInt8(p + staCtsHold, status & MS_CTS_ON ? 0 : 1); - WriteMacInt8(p + staDsrHold, status & MS_DSR_ON ? 0 : 1); - - WriteMacInt8(p + staModemStatus, - (status & MS_DSR_ON ? dsrEvent : 0) - | (status & MS_RING_ON ? riEvent : 0) - | (status & MS_RLSD_ON ? dcdEvent : 0) // is this carrier detect? - | (status & MS_CTS_ON ? ctsEvent : 0)); - return noErr; - } - - default: - D(bug("WARNING: SerialStatus(): unimplemented status code %d\r\n", code)); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 XSERDPort::close() -{ - D(bug("XSERDPort::close\r\n")); - - // Kill threads - if (input_thread_active) { - quitting = true; - ReleaseSemaphore(input_signal,1,NULL); - input_thread_active = false; - CloseHandle(input_signal); - } - if (output_thread_active) { - quitting = true; - ReleaseSemaphore(output_signal,1,NULL); - output_thread_active = false; - // bugfix: was: CloseHandle(&output_signal); - CloseHandle(output_signal); - } - - // Close port - if(fd != INVALID_HANDLE_VALUE) { - CloseHandle(fd); - fd = 0; - } - return noErr; -} - -bool XSERDPort::set_timeouts( - int bauds, int parity_bits, int stop_bits ) -{ - COMMTIMEOUTS timeouts; - uint32 bytes_per_sec; - uint32 msecs_per_ch; - bool result = false; - - // Should already been checked - if (!is_serial) - return true; - - bytes_per_sec = bauds / (mode.ByteSize + parity_bits + stop_bits); - - // 75% bytes_per_sec - // bytes_per_sec = (bytes_per_sec+bytes_per_sec+bytes_per_sec) >> 2; - - // 50% bytes_per_sec - bytes_per_sec = bytes_per_sec >> 1; - - msecs_per_ch = 1000 / bytes_per_sec; - if(msecs_per_ch == 0) msecs_per_ch = 1; - - if(GetCommTimeouts(fd,&timeouts)) { - D(bug("old timeout values: %ld %ld %ld %ld %ld\r\n", - timeouts.ReadIntervalTimeout, - timeouts.ReadTotalTimeoutMultiplier, - timeouts.ReadTotalTimeoutConstant, - timeouts.WriteTotalTimeoutMultiplier, - timeouts.WriteTotalTimeoutConstant - )); - - timeouts.WriteTotalTimeoutMultiplier = msecs_per_ch; - timeouts.WriteTotalTimeoutConstant = 10; - - /* - timeouts.ReadIntervalTimeout = msecs_per_ch; - timeouts.ReadTotalTimeoutMultiplier = msecs_per_ch; - timeouts.ReadTotalTimeoutConstant = 10; - */ - - timeouts.ReadIntervalTimeout = MAXDWORD; - timeouts.ReadTotalTimeoutMultiplier = 0; - timeouts.ReadTotalTimeoutConstant = 0; - - if(!SetCommTimeouts(fd,&timeouts)) { - D(bug("SetCommTimeouts() failed in configure()\r\n")); - } else { - D(bug("new timeout values: %ld %ld %ld %ld %ld\r\n", - timeouts.ReadIntervalTimeout, - timeouts.ReadTotalTimeoutMultiplier, - timeouts.ReadTotalTimeoutConstant, - timeouts.WriteTotalTimeoutMultiplier, - timeouts.WriteTotalTimeoutConstant - )); - result = true; - } - } else { - D(bug("GetCommTimeouts() failed in set_timeouts()\r\n")); - } - return(result); -} - -/* - * Configure serial port with MacOS config word - */ - -bool XSERDPort::configure(uint16 config) -{ - D(bug("XSERDPort::configure, config=%d\r\n",(int)config)); - - if (!is_serial) - return true; - - // needed to calculate optimal timeouts - uint32 bauds = 57600; - uint32 stop_bits = 1; - uint32 parity_bits = 0; - - // Not all of these can be set here anyway. - /* - mode.fOutxCtsFlow = TRUE; - mode.fOutxDsrFlow = FALSE; - mode.fDtrControl = DTR_CONTROL_ENABLE; // DTR_CONTROL_HANDSHAKE? - mode.fDsrSensitivity = FALSE; // ??? - mode.fOutX = FALSE; - mode.fInX = FALSE; - mode.fTXContinueOnXoff = FALSE; - mode.fErrorChar = FALSE; - mode.ErrorChar = 0; - mode.fNull = FALSE; - mode.fRtsControl = 2; // ??? - mode.fAbortOnError = FALSE; - mode.XonLim = 0x800; - mode.XoffLim = 0x200; - mode.XonChar = 0x11; - mode.XoffChar = 0x13; - mode.EofChar = 0; - mode.EvtChar = '\0'; - */ - - // Set baud rate - switch (config & 0x03ff) { - // no baud1800, CBR_14400, CBR_56000, CBR_115200, CBR_128000, CBR_256000 - case baud150: mode.BaudRate = CBR_110; bauds = 110; break; - case baud300: mode.BaudRate = CBR_300; bauds = 300; break; - case baud600: mode.BaudRate = CBR_600; bauds = 600; break; - case baud1200: mode.BaudRate = CBR_1200; bauds = 1200; break; - case baud1800: return false; - case baud2400: mode.BaudRate = CBR_2400; bauds = 2400; break; - case baud4800: mode.BaudRate = CBR_4800; bauds = 4800; break; - case baud9600: mode.BaudRate = CBR_9600; bauds = 9600; break; - case baud19200: mode.BaudRate = CBR_19200; bauds = 19200; break; - case baud38400: mode.BaudRate = CBR_38400; bauds = 38400; break; - case baud57600: mode.BaudRate = CBR_57600; bauds = 57600; break; - default: - return false; - } - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - mode.StopBits = ONESTOPBIT; - stop_bits = 1; - break; - case stop15: - mode.StopBits = ONE5STOPBITS; - stop_bits = 2; - break; - case stop20: - mode.StopBits = TWOSTOPBITS; - stop_bits = 2; - break; - default: - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - mode.Parity = NOPARITY; - mode.fParity = FALSE; - parity_bits = 0; - break; - case oddParity: - mode.Parity = ODDPARITY; - mode.fParity = TRUE; - parity_bits = 1; - break; - case evenParity: - mode.Parity = EVENPARITY; - mode.fParity = TRUE; - parity_bits = 1; - break; - // No MARKPARITY, SPACEPARITY - default: - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - // No data4 - case data5: - mode.ByteSize = 5; break; - case data6: - mode.ByteSize = 6; break; - case data7: - mode.ByteSize = 7; break; - case data8: - mode.ByteSize = 8; break; - default: - return false; - } - - D(bug("Interpreted configuration: %d,%d,%d,%d\r\n", - bauds, - mode.ByteSize, - stop_bits, - parity_bits - )); - - if(!SetCommState( fd, &mode )) { - D(bug("SetCommState failed in configure()\r\n")); - return false; - } - - if(!set_timeouts(bauds,parity_bits,stop_bits)) - return false; - - return true; -} - - -/* - * Set serial handshaking - */ - -void XSERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\r\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - - if (!is_serial) - return; - - if (with_dtr) { - mode.fDtrControl = DTR_CONTROL_ENABLE; - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - mode.fOutxCtsFlow = TRUE; - else - mode.fOutxCtsFlow = FALSE; - } else { - mode.fDtrControl = DTR_CONTROL_DISABLE; - if (ReadMacInt8(s + shkFCTS)) - mode.fOutxCtsFlow = TRUE; - else - mode.fOutxCtsFlow = FALSE; - } - - // MIDI: set_handshake 00 00 f4 f5 21 00 00 00 - // shkFXOn = 0 - // shkFCTS = 0 - // shkXOn = f4 - // shkXOff = f5 - // shkErrs = 21 - // shkEvts = 0 - // shkFInX = 0 - // shkFDTR = 0 - if (ReadMacInt8(s + shkXOn) && ReadMacInt8(s + shkXOn)) { - mode.fOutX = 1; - mode.fInX = 1; - mode.XonChar = ReadMacInt8(s + shkXOn); - mode.XoffChar = ReadMacInt8(s + shkXOff); - } else { - mode.fOutX = 0; - mode.fInX = 0; - } - if (ReadMacInt8(s + shkErrs)) { - mode.ErrorChar = ReadMacInt8(s + shkErrs); - mode.fErrorChar = 1; - } else { - mode.fErrorChar = 0; - } - - (void)SetCommState( fd, &mode ); - - // D(bug(" %sware flow control\r\n", mode.c_cflag & CRTSCTS ? "hard" : "soft")); - // tcsetattr(fd, TCSANOW, &mode); -} - -/* - if mode.fAbortOnError is TRUE, ClearCommError() *MUST* be called - after any read or write errors. Otherwise no i/o will occur again - - These error codes should be translated but the Mac Device Manager - error code mnemonics are too cryptic to me. -*/ - -int XSERDPort::acknowledge_error(HANDLE h, bool is_read) -{ - DWORD error_state; - COMSTAT comstat; - int err; - - // default error code if cannot map correctly - err = is_read ? readErr : writErr; - - if(ClearCommError(h,&error_state,&comstat)) { - D(bug("A %s error 0x%X occured.\r\n", is_read ? "read" : "write", error_state)); - D(bug("There was %d bytes in input buffer and %d bytes in output buffer.\r\n",(int)comstat.cbInQue,(int)comstat.cbOutQue)); - if(error_state & CE_MODE) { - D(bug("The requested mode is not supported.\r\n")); - } else { - if(error_state & CE_BREAK) { - D(bug("The hardware detected a break condition.\r\n")); - } - if(error_state & CE_FRAME) { - D(bug("The hardware detected a framing error.\r\n")); - } - if(error_state & CE_IOE) { - D(bug("An I/O error occurred during communications with the device.\r\n")); - } - if(error_state & CE_RXOVER) { - D(bug("An input buffer overflow has occurred.\r\n")); - } - if(error_state & CE_RXPARITY) { - D(bug("The hardware detected a parity error.\r\n")); - err = badDCksum; - } - if(error_state & CE_TXFULL) { - D(bug("The application tried to transmit a character, but the output buffer was full.\r\n")); - } - - // Win95 specific errors - if(error_state & CE_OVERRUN) { - D(bug("A character-buffer overrun has occurred. The next character is lost.\r\n")); - if(!is_read) err = wrUnderrun; - } - - // Win95 parallel devices really. - if(error_state & CE_DNS) { - D(bug("A parallel device is not selected (Windows 95).\r\n")); - } - if(error_state & CE_OOP) { - D(bug("A parallel device signaled that it is out of paper (Windows 95 only).\r\n")); - err = unitEmptyErr; - } - if(error_state & CE_PTO) { - D(bug("A time-out occurred on a parallel device (Windows 95).\r\n")); - } - - } - } else { - D(bug("Failed to resume after %s operation.\r\n",is_read ? "read" : "write")); - } - return(err); -} - -#if DEBUG -static void dump_dirst_bytes( BYTE *buf, int32 actual ) -{ - if(debug_serial != DB_SERIAL_LOUD) return; - - BYTE b[256]; - int32 i, bytes = min(actual,sizeof(b)-3); - - for (i=0; idevice_name)); - - for (;;) { - - // Wait for commands - WaitForSingleObject(s->input_signal,INFINITE); - if (s->quitting) - break; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(s->input_pb + ioBuffer)); - uint32 length = ReadMacInt32(s->input_pb + ioReqCount); - D(bug("input_func waiting for %ld bytes of data...\r\n", length)); - - if(length & 0xFFFF0000) { - length &= 0x0000FFFF; - D(bug("byte count fixed to be %ld...\r\n", length)); - } - - int32 actual; - if(s->is_file) { - actual = -1; - error_code = readErr; - } else if(!ReadFile(s->fd, buf, length, (LPDWORD)&actual, 0)) { - actual = -1; - if(s->is_serial) - error_code = acknowledge_error(s->fd,true); - else - error_code = readErr; - } - D(bug(" %ld bytes received\r\n", actual)); - if(actual > 0) { - dump_dirst_bytes( (BYTE*)buf, actual ); - } - - // KillIO called? Then simply return - if (s->io_killed) { - - WriteMacInt16(s->input_pb + ioResult, abortErr); - WriteMacInt32(s->input_pb + ioActCount, 0); - s->read_pending = s->read_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(s->input_pb + ioActCount, actual); - WriteMacInt32(s->input_dt + serdtResult, noErr); - } else { - WriteMacInt32(s->input_pb + ioActCount, 0); - WriteMacInt32(s->input_dt + serdtResult, error_code); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\r\n")); - WriteMacInt32(s->input_dt + serdtDCE, s->input_dce); - s->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - - D(bug("XSERDPort::input_func terminating gracefully\r\n")); - - _endthreadex( 0 ); - - return(0); -} - - -/* - * Data output thread - */ - -unsigned int XSERDPort::output_func(void *arg) -{ - XSERDPort *s = (XSERDPort *)arg; - int error_code; - -#if 0 - SetThreadPriority( GetCurrentThread(), threads[THREAD_SERIAL_OUT].priority_running ); - SetThreadAffinityMask( GetCurrentThread(), threads[THREAD_SERIAL_OUT].affinity_mask ); - set_desktop(); -#endif - - D(bug(TEXT("XSERDPort::output_func started for device %s\r\n"),s->device_name)); - - for (;;) { - - // Wait for commands - WaitForSingleObject(s->output_signal,INFINITE); - if (s->quitting) - break; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(s->output_pb + ioBuffer)); - uint32 length = ReadMacInt32(s->output_pb + ioReqCount); - D(bug("output_func transmitting %ld bytes of data...\r\n", length)); - - if(length & 0xFFFF0000) { - length &= 0x0000FFFF; - D(bug("byte count fixed to be %ld...\r\n", length)); - } - - int32 actual; - if(!WriteFile(s->fd, buf, length, (LPDWORD)&actual, 0)) { - actual = -1; - if(s->is_serial) - error_code = acknowledge_error(s->fd,false); - else - error_code = writErr; - } - D(bug(" %ld bytes transmitted\r\n", actual)); - if(actual > 0) { - dump_dirst_bytes( (BYTE*)buf, actual ); - } - - // KillIO called? Then simply return - if (s->io_killed) { - - WriteMacInt16(s->output_pb + ioResult, abortErr); - WriteMacInt32(s->output_pb + ioActCount, 0); - s->write_pending = s->write_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(s->output_pb + ioActCount, actual); - WriteMacInt32(s->output_dt + serdtResult, noErr); - } else { - WriteMacInt32(s->output_pb + ioActCount, 0); - WriteMacInt32(s->output_dt + serdtResult, error_code); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\r\n")); - WriteMacInt32(s->output_dt + serdtDCE, s->output_dce); - s->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - - D(bug("XSERDPort::output_func terminating gracefully\r\n")); - - _endthreadex( 0 ); - - return(0); -} diff --git a/BasiliskII/src/Windows/sys_windows.cpp b/BasiliskII/src/Windows/sys_windows.cpp deleted file mode 100755 index 21e2df0e0..000000000 --- a/BasiliskII/src/Windows/sys_windows.cpp +++ /dev/null @@ -1,994 +0,0 @@ -/* - * sys_windows.cpp - System dependent routines, Windows implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include - -#include -typedef std::basic_string tstring; - -#include -using std::min; - -#include "main.h" -#include "util_windows.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "sys.h" - -#include "cd_defs.h" -#include "cdenable/ntcd.h" -#include "cdenable/cache.h" -#include "cdenable/eject_nt.h" - -#define DEBUG 0 -#include "debug.h" - - -// File handles are pointers to these structures -struct file_handle { - TCHAR *name; // Copy of device/file name - HANDLE fh; - bool is_file; // Flag: plain file or physical device? - bool is_floppy; // Flag: floppy device - bool is_cdrom; // Flag: CD-ROM device - bool read_only; // Copy of Sys_open() flag - loff_t start_byte; // Size of file header (if any) - loff_t file_size; // Size of file data (only valid if is_file is true) - cachetype cache; - bool is_media_present; -}; - -// Open file handles -struct open_file_handle { - file_handle *fh; - open_file_handle *next; -}; -static open_file_handle *open_file_handles = NULL; - -// File handle of first floppy drive (for SysMountFirstFloppy()) -static file_handle *first_floppy = NULL; - -// CD-ROM variables -static const int CD_READ_AHEAD_SECTORS = 16; -static char *sector_buffer = NULL; - -// Prototypes -static bool is_cdrom_readable(file_handle *fh); - - -/* - * Initialization - */ - -void SysInit(void) -{ - // Initialize CD-ROM driver - sector_buffer = (char *)VirtualAlloc(NULL, 8192, MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE); - CdenableSysInstallStart(); -} - - -/* - * Deinitialization - */ - -void SysExit(void) -{ - if (sector_buffer) { - VirtualFree(sector_buffer, 0, MEM_RELEASE ); - sector_buffer = NULL; - } -} - - -/* - * Manage open file handles - */ - -static void sys_add_file_handle(file_handle *fh) -{ - open_file_handle *p = new open_file_handle; - p->fh = fh; - p->next = open_file_handles; - open_file_handles = p; -} - -static void sys_remove_file_handle(file_handle *fh) -{ - open_file_handle *p = open_file_handles; - open_file_handle *q = NULL; - - while (p) { - if (p->fh == fh) { - if (q) - q->next = p->next; - else - open_file_handles = p->next; - delete p; - break; - } - q = p; - p = p->next; - } -} - - -/* - * Mount removable media now - */ - -void mount_removable_media(int media) -{ - for (open_file_handle *p = open_file_handles; p != NULL; p = p->next) { - file_handle * const fh = p->fh; - - if (fh->is_cdrom && (media & MEDIA_CD)) { - cache_clear(&fh->cache); - fh->start_byte = 0; - - if (fh->fh && fh->fh != INVALID_HANDLE_VALUE) - CloseHandle(fh->fh); - - // Re-open device - TCHAR device_name[MAX_PATH]; - _sntprintf(device_name, lengthof(device_name), TEXT("\\\\.\\%c:"), fh->name[0]); - fh->fh = CreateFile( - device_name, - GENERIC_READ, - FILE_SHARE_READ | FILE_SHARE_WRITE, - NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); - - if (fh->fh != INVALID_HANDLE_VALUE) { - fh->is_media_present = is_cdrom_readable(fh); - if (fh->is_media_present) - MountVolume(fh); - } else { - fh->is_media_present = false; - } - } - } -} - - -/* - * Account for media that has just arrived - */ - -void SysMediaArrived(void) -{ - mount_removable_media(MEDIA_REMOVABLE); -} - - -/* - * Account for media that has just been removed - */ - -void SysMediaRemoved(void) -{ -} - - -/* - * Mount first floppy disk - */ - -void SysMountFirstFloppy(void) -{ - if (first_floppy) - MountVolume(first_floppy); -} - - -/* - * This gets called when no "floppy" prefs items are found - * It scans for available floppy drives and adds appropriate prefs items - */ - -void SysAddFloppyPrefs(void) -{ -} - - -/* - * This gets called when no "disk" prefs items are found - * It scans for available HFS volumes and adds appropriate prefs items - */ - -void SysAddDiskPrefs(void) -{ -} - - -/* - * This gets called when no "cdrom" prefs items are found - * It scans for available CD-ROM drives and adds appropriate prefs items - */ - -void SysAddCDROMPrefs(void) -{ - // Don't scan for drives if nocdrom option given - if (PrefsFindBool("nocdrom")) - return; - - char rootdir[] = "C:\\"; - for (; rootdir[0] <= 'Z'; rootdir[0]++) { - if (GetDriveTypeA(rootdir) == DRIVE_CDROM) - PrefsAddString("cdrom", rootdir); - } -} - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ - PrefsAddString("seriala", "COM1"); - PrefsAddString("serialb", "COM2"); -} - - -/* - * Read CD-ROM - * Must give cd some time to settle - * Can't give too much however, would be annoying, this is difficult.. - */ - -static inline int cd_read_with_retry(file_handle *fh, ULONG LBA, int count, char *buf ) -{ - if (!fh || !fh->fh) - return 0; - - return CdenableSysReadCdBytes(fh->fh, LBA, count, buf); -} - -static int cd_read(file_handle *fh, cachetype *cptr, ULONG LBA, int count, char *buf) -{ - ULONG l1, l2, cc; - int i, c_count, got_bytes = 0, nblocks, s_inx, ss, first_block; - int ok_bytes = 0; - char *ptr, *ttptr = 0, *tmpbuf; - - if (count <= 0) - return 0; - - if (!fh || !fh->fh) - return 0; - - ss = 2048; - l1 = (LBA / ss) * ss; - l2 = ((LBA + count - 1 + ss) / ss) * ss; - cc = l2 - l1; - nblocks = cc / ss; - first_block = LBA / ss; - - ptr = buf; - s_inx = LBA - l1; - c_count = ss - s_inx; - if (c_count > count) - c_count = count; - - for (i = 0; i < nblocks; i++) { - if (!cache_get(cptr, first_block + i, sector_buffer)) - break; - - memcpy(ptr, sector_buffer + s_inx, c_count); - ok_bytes += c_count; - ptr += c_count; - s_inx = 0; - c_count = ss; - if (c_count > count - ok_bytes) - c_count = count - ok_bytes; - } - - if (i != nblocks && count != ok_bytes) { - int bytes_left = count - ok_bytes; - int blocks_left = nblocks - i; - int alignedleft; - - // NEW read ahead code: - int ahead = CD_READ_AHEAD_SECTORS; - if (blocks_left < ahead) { - nblocks += (ahead - blocks_left); - blocks_left = ahead; - } - - alignedleft = blocks_left*ss; - - tmpbuf = (char *)VirtualAlloc( - NULL, alignedleft, - MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE); - if (tmpbuf) { - got_bytes = cd_read_with_retry(fh, (first_block + i) * ss, alignedleft, tmpbuf); - if (got_bytes != alignedleft) { - // should never happen - // Yes it does ... - if (got_bytes < 0) - got_bytes = 0; - if (c_count > got_bytes) - c_count = got_bytes; - if (c_count > 0) { - ttptr = tmpbuf; - memcpy(ptr, ttptr + s_inx, c_count); - ok_bytes += c_count; - } - VirtualFree(tmpbuf, 0, MEM_RELEASE ); - return ok_bytes; - } - ttptr = tmpbuf; - for ( ; i < nblocks; i++) { - if (c_count > 0) { - memcpy(ptr, ttptr + s_inx, c_count); - ok_bytes += c_count; - ptr += c_count; - } - s_inx = 0; - c_count = ss; - if (c_count > count - ok_bytes) - c_count = count - ok_bytes; - cache_put(cptr, first_block + i, ttptr, ss); - ttptr += ss; - } - VirtualFree(tmpbuf, 0, MEM_RELEASE ); - } - } - - return ok_bytes; -} - - -/* - * Check if file handle FH represents a readable CD-ROM - */ - -static bool is_cdrom_readable(file_handle *fh) -{ - if (!fh || !fh->fh) - return false; - - cache_clear(&fh->cache); - - DWORD dummy; - bool result = (0 != DeviceIoControl( - fh->fh, - IOCTL_STORAGE_CHECK_VERIFY, - NULL, 0, - NULL, 0, - &dummy, - NULL)); - if (!result) { - const size_t n_bytes = 2048; - char *buffer = (char *)VirtualAlloc(NULL, n_bytes, MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE); - if (buffer) { - result = (cd_read_with_retry(fh, 0, n_bytes, buffer) == n_bytes); - VirtualFree(buffer, 0, MEM_RELEASE); - } - } - - return result; -} - - -/* - * Check if NAME represents a read-only file - */ - -static bool is_read_only_path(const TCHAR *name) -{ - DWORD attrib = GetFileAttributes(name); - return (attrib != INVALID_FILE_ATTRIBUTES && ((attrib & FILE_ATTRIBUTE_READONLY) != 0)); -} - - -/* - * Open file/device, create new file handle (returns NULL on error) - */ - -void *Sys_open(const char *path_name, bool read_only) -{ - file_handle * fh = NULL; - - // Parse path name and options - TCHAR name[MAX_PATH]; - tcslcpy(name, path_name, lengthof(name)); - - // Normalize floppy / cd path - int name_len = _tcslen(name); - if (name_len == 1 && _istalpha(name[0])) - _tcscat(name, TEXT(":\\")); - if (name_len > 0 && name[name_len - 1] == TEXT(':')) - _tcscat(name, TEXT("\\")); - name_len = _tcslen(name); - - D(bug(TEXT("Sys_open(%s, %s)\n"), name, read_only ? TEXT("read-only") : TEXT("read/write"))); - if (name_len > 0 && name[name_len - 1] == TEXT('\\')) { - int type = GetDriveType(name); - - if (type == DRIVE_CDROM) { - read_only = true; - TCHAR device_name[MAX_PATH]; - _sntprintf(device_name, lengthof(device_name), TEXT("\\\\.\\%c:"), name[0]); - - // Open device - HANDLE h = CreateFile( - device_name, - GENERIC_READ, - 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); - - if (h != INVALID_HANDLE_VALUE) { - fh = new file_handle; - fh->name = _tcsdup(name); - fh->fh = h; - fh->is_file = false; - fh->read_only = read_only; - fh->start_byte = 0; - fh->is_floppy = false; - fh->is_cdrom = true; - memset(&fh->cache, 0, sizeof(cachetype)); - cache_init(&fh->cache); - cache_clear(&fh->cache); - if (!PrefsFindBool("nocdrom")) - fh->is_media_present = is_cdrom_readable(fh); - } - } - } - - else { // Hard file - - // Check if write access is allowed, set read-only flag if not - if (!read_only && is_read_only_path(name)) - read_only = true; - - // Open file - HANDLE h = CreateFile( - name, - read_only ? GENERIC_READ : GENERIC_READ | GENERIC_WRITE, - 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); - - if (h == INVALID_HANDLE_VALUE && !read_only) { - // Read-write failed, try read-only - read_only = true; - h = CreateFile( - name, - GENERIC_READ, - 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); - } - - if (h != INVALID_HANDLE_VALUE) { - fh = new file_handle; - fh->name = _tcsdup(name); - fh->fh = h; - fh->is_file = true; - fh->read_only = read_only; - fh->start_byte = 0; - fh->is_floppy = false; - fh->is_cdrom = false; - - // Detect disk image file layout - loff_t size = GetFileSize(h, NULL); - DWORD bytes_read; - uint8 data[256]; - ReadFile(h, data, sizeof(data), &bytes_read, NULL); - FileDiskLayout(size, data, fh->start_byte, fh->file_size); - } - } - - if (fh) { - if (fh->is_floppy && first_floppy == NULL) - first_floppy = fh; - sys_add_file_handle(fh); - } - - return fh; -} - - -/* - * Close file/device, delete file handle - */ - -void Sys_close(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - sys_remove_file_handle(fh); - - if (fh->is_cdrom) { - cache_final(&fh->cache); - SysAllowRemoval((void *)fh); - } - if (fh->fh != NULL) { - CloseHandle(fh->fh); - fh->fh = NULL; - } - if (fh->name) - free(fh->name); - - delete fh; -} - - -/* - * Read "length" bytes from file/device, starting at "offset", to "buffer", - * returns number of bytes read (or 0) - */ - -size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - - DWORD bytes_read = 0; - - if (fh->is_file) { - // Seek to position - LONG lo = (LONG)offset; - LONG hi = (LONG)(offset >> 32); - DWORD r = SetFilePointer(fh->fh, lo, &hi, FILE_BEGIN); - if (r == INVALID_SET_FILE_POINTER && GetLastError() != NO_ERROR) - return 0; - - // Read data - if (ReadFile(fh->fh, buffer, length, &bytes_read, NULL) == 0) - bytes_read = 0; - } - else if (fh->is_cdrom) { - int bytes_left, try_bytes, got_bytes; - char *b = (char *)buffer; - bytes_left = length; - while (bytes_left) { - try_bytes = min(bytes_left, 32768); - if (fh->is_cdrom) { - got_bytes = cd_read(fh, &fh->cache, (DWORD)offset, try_bytes, b); - if (got_bytes != try_bytes && !PrefsFindBool("nocdrom")) - fh->is_media_present = is_cdrom_readable(fh); - } - b += got_bytes; - offset += got_bytes; - bytes_read += got_bytes; - bytes_left -= got_bytes; - if (got_bytes != try_bytes) - bytes_left = 0; - } - } - // TODO: other media - - return bytes_read; -} - - -/* - * Write "length" bytes from "buffer" to file/device, starting at "offset", - * returns number of bytes written (or 0) - */ - -size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - - DWORD bytes_written = 0; - - if (fh->is_file) { - // Seek to position - LONG lo = (LONG)offset; - LONG hi = (LONG)(offset >> 32); - DWORD r = SetFilePointer(fh->fh, lo, &hi, FILE_BEGIN); - if (r == INVALID_SET_FILE_POINTER && GetLastError() != NO_ERROR) - return 0; - - // Write data - if (WriteFile(fh->fh, buffer, length, &bytes_written, NULL) == 0) - bytes_written = 0; - } - // TODO: other media - - return bytes_written; -} - - -/* - * Return size of file/device (minus header) - */ - -loff_t SysGetFileSize(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return fh->file_size; - else if (fh->is_cdrom) - return 0x28A00000; // FIXME: get real CD-ROM size - else { - // TODO: other media - return 0; - } -} - - -/* - * Eject volume (if applicable) - */ - -void SysEject(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (fh->is_cdrom && fh->fh) { - fh->is_media_present = false; - // Commented out because there was some problems, but can't remember - // exactly ... need to find out - // EjectVolume(toupper(*fh->name),false); - - // Preventing is cumulative, try to make sure it's indeed released now - for (int i = 0; i < 10; i++) - PreventRemovalOfVolume(fh->fh, false); - - if (!PrefsFindBool("nocdrom")) { - DWORD dummy; - DeviceIoControl( - fh->fh, - IOCTL_STORAGE_EJECT_MEDIA, - NULL, 0, - NULL, 0, - &dummy, - NULL - ); - } - cache_clear(&fh->cache); - fh->start_byte = 0; - } - // TODO: handle floppies -} - - -/* - * Format volume (if applicable) - */ - -bool SysFormat(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - //!! - return true; -} - - -/* - * Check if file/device is read-only (this includes the read-only flag on Sys_open()) - */ - -bool SysIsReadOnly(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - return fh->read_only; -} - - -/* - * Check if the given file handle refers to a fixed or a removable disk - */ - -bool SysIsFixedDisk(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return true; - else if (fh->is_floppy || fh->is_cdrom) - return false; - else - return true; -} - - -/* - * Check if a disk is inserted in the drive (always true for files) - */ - -bool SysIsDiskInserted(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return true; - else if (fh->is_cdrom && !PrefsFindBool("nocdrom")) { - if (PrefsFindBool("pollmedia")) - fh->is_media_present = is_cdrom_readable(fh); - return fh->is_media_present; - } - else { - // TODO: other media - } - - return false; -} - - -/* - * Prevent medium removal (if applicable) - */ - -void SysPreventRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (fh->is_cdrom && fh->fh) - PreventRemovalOfVolume(fh->fh, true); -} - - -/* - * Allow medium removal (if applicable) - */ - -void SysAllowRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (fh->is_cdrom && fh->fh) - PreventRemovalOfVolume(fh->fh, false); -} - - -/* - * Read CD-ROM TOC (binary MSF format, 804 bytes max.) - */ - -bool SysCDReadTOC(void *arg, uint8 *toc) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - DWORD dummy; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_READ_TOC, - NULL, 0, - toc, min((int)sizeof(CDROM_TOC), 804), - &dummy, - NULL) != FALSE; -} - - -/* - * Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard) - */ - -bool SysCDGetPosition(void *arg, uint8 *pos) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - SUB_Q_CHANNEL_DATA q_data; - - CDROM_SUB_Q_DATA_FORMAT q_format; - q_format.Format = IOCTL_CDROM_CURRENT_POSITION; - q_format.Track = 0; // used only by ISRC reads - - DWORD dwBytesReturned = 0; - bool ok = DeviceIoControl(fh->fh, - IOCTL_CDROM_READ_Q_CHANNEL, - &q_format, sizeof(CDROM_SUB_Q_DATA_FORMAT), - &q_data, sizeof(SUB_Q_CHANNEL_DATA), - &dwBytesReturned, - NULL) != FALSE; - if (ok) - memcpy(pos, &q_data.CurrentPosition, sizeof(SUB_Q_CURRENT_POSITION)); - - return ok; -} - - -/* - * Play CD audio - */ - -bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - CDROM_PLAY_AUDIO_MSF msf; - msf.StartingM = start_m; - msf.StartingS = start_s; - msf.StartingF = start_f; - msf.EndingM = end_m; - msf.EndingS = end_s; - msf.EndingF = end_f; - - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_PLAY_AUDIO_MSF, - &msf, sizeof(CDROM_PLAY_AUDIO_MSF), - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; -} - - -/* - * Pause CD audio - */ - -bool SysCDPause(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_PAUSE_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; -} - - -/* - * Resume paused CD audio - */ - -bool SysCDResume(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_RESUME_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, NULL) != FALSE; -} - - -/* - * Stop CD audio - */ - -bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_STOP_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; -} - - -/* - * Perform CD audio fast-forward/fast-reverse operation starting from specified address - */ - -bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return false; - - CDROM_SEEK_AUDIO_MSF msf; - msf.M = start_m; - msf.S = start_s; - msf.F = start_f; - - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_SEEK_AUDIO_MSF, - &msf, sizeof(CDROM_SEEK_AUDIO_MSF), - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; -} - - -/* - * Set CD audio volume (0..255 each channel) - */ - -void SysCDSetVolume(void *arg, uint8 left, uint8 right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) - return; - - VOLUME_CONTROL vc; - vc.PortVolume[0] = left; - vc.PortVolume[1] = right; - vc.PortVolume[2] = left; - vc.PortVolume[3] = right; - - DWORD dwBytesReturned = 0; - DeviceIoControl(fh->fh, - IOCTL_CDROM_SET_VOLUME, - &vc, sizeof(VOLUME_CONTROL), - NULL, 0, - &dwBytesReturned, - NULL); -} - - -/* - * Get CD audio volume (0..255 each channel) - */ - -void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - left = right = 0; - if (!fh->fh || !fh->is_cdrom) - return; - - VOLUME_CONTROL vc; - memset(&vc, 0, sizeof(vc)); - - DWORD dwBytesReturned = 0; - if (DeviceIoControl(fh->fh, - IOCTL_CDROM_GET_VOLUME, - NULL, 0, - &vc, sizeof(VOLUME_CONTROL), - &dwBytesReturned, - NULL)) - { - left = vc.PortVolume[0]; - right = vc.PortVolume[1]; - } -} diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h deleted file mode 100755 index c1d7898f7..000000000 --- a/BasiliskII/src/Windows/sysdeps.h +++ /dev/null @@ -1,336 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for Windows - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#if !defined _MSC_VER && !defined __STDC__ -#error "Your compiler is not ANSI. Get a real one." -#endif - -#include "config.h" -#include "user_strings_windows.h" - -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - -#ifndef WIN32 -#define WIN32 -#endif - -#include -#include -#include -#include -#include -#include -#define WIN32_LEAN_AND_MEAN -#include -#include -#include - - -/* Mac and host address space are distinct */ -#ifndef REAL_ADDRESSING -#define REAL_ADDRESSING 0 -#endif -#if REAL_ADDRESSING -#error "Real Addressing mode can't work without proper kernel support" -#endif - -/* Using 68k emulator */ -#define EMULATED_68K 1 - -/* The m68k emulator uses a prefetch buffer ? */ -#define USE_PREFETCH_BUFFER 0 - -/* Mac ROM is write protected when banked memory is used */ -#if REAL_ADDRESSING || DIRECT_ADDRESSING -# define ROM_IS_WRITE_PROTECTED 0 -# define USE_SCRATCHMEM_SUBTERFUGE 1 -#else -# define ROM_IS_WRITE_PROTECTED 1 -#endif - -/* Direct Addressing requires Video on SEGV signals in plain X11 mode */ -#if DIRECT_ADDRESSING && (!ENABLE_VOSF && !USE_SDL_VIDEO) -# undef ENABLE_VOSF -# define ENABLE_VOSF 1 -#endif - -/* ExtFS is supported */ -#define SUPPORTS_EXTFS 1 - -/* POSIX data types missing from Microsoft's CRT */ -#ifdef _MSC_VER -typedef ptrdiff_t ssize_t; -#endif - -/* Data types */ -typedef unsigned char uint8; -typedef signed char int8; -#if SIZEOF_SHORT == 2 -typedef unsigned short uint16; -typedef short int16; -#elif SIZEOF_INT == 2 -typedef unsigned int uint16; -typedef int int16; -#else -#error "No 2 byte type, you lose." -#endif -#if SIZEOF_INT == 4 -typedef unsigned int uint32; -typedef int int32; -#elif SIZEOF_LONG == 4 -typedef unsigned long uint32; -typedef long int32; -#else -#error "No 4 byte type, you lose." -#endif -#if SIZEOF_LONG == 8 -typedef unsigned long uint64; -typedef long int64; -#define VAL64(a) (a ## l) -#define UVAL64(a) (a ## ul) -#elif SIZEOF_LONG_LONG == 8 -typedef unsigned long long uint64; -typedef long long int64; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -#else -#error "No 8 byte type, you lose." -#endif -#if SIZEOF_VOID_P == 4 -typedef uint32 uintptr; -typedef int32 intptr; -#elif SIZEOF_VOID_P == 8 -typedef uint64 uintptr; -typedef int64 intptr; -#else -#error "Unsupported size of pointer" -#endif - -#ifdef _WIN32 -typedef int64 loff_t; -#endif -#ifndef HAVE_CADDR_T -typedef char * caddr_t; -#endif - -#ifdef _MSC_VER -#ifdef _M_IX86 -#define __i386__ -#elif defined _M_AMD64 -#define __x86_64__ -#endif -#endif - -/* Time data type for Time Manager emulation */ -typedef int64 tm_time_t; - -/* Define codes for all the float formats that we know of. - * Though we only handle IEEE format. */ -#define UNKNOWN_FLOAT_FORMAT 0 -#define IEEE_FLOAT_FORMAT 1 -#define VAX_FLOAT_FORMAT 2 -#define IBM_FLOAT_FORMAT 3 -#define C4X_FLOAT_FORMAT 4 - -/* UAE CPU data types */ -#define uae_s8 int8 -#define uae_u8 uint8 -#define uae_s16 int16 -#define uae_u16 uint16 -#define uae_s32 int32 -#define uae_u32 uint32 -#define uae_s64 int64 -#define uae_u64 uint64 -typedef uae_u32 uaecptr; - -/* Timing functions */ -extern void timer_init(void); -extern uint64 GetTicks_usec(void); -extern void Delay_usec(uint32 usec); - -/* Spinlocks */ -#ifdef __GNUC__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - long int ret; - /* Note: the "xchg" instruction does not need a "lock" prefix */ - __asm__ __volatile__("xchgl %k0, %1" - : "=r" (ret), "=m" (*p) - : "0" (1), "m" (*p) - : "memory"); - return ret; -} -#endif /* __GNUC__ */ - -typedef volatile int spinlock_t; - -static const spinlock_t SPIN_LOCK_UNLOCKED = 0; - -#if HAVE_TEST_AND_SET -#define HAVE_SPINLOCKS 1 -static inline void spin_lock(spinlock_t *lock) -{ - while (testandset(lock)); -} - -static inline void spin_unlock(spinlock_t *lock) -{ - *lock = 0; -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return !testandset(lock); -} -#else -static inline void spin_lock(spinlock_t *lock) -{ -} - -static inline void spin_unlock(spinlock_t *lock) -{ -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return 1; -} -#endif - -#define X86_PPRO_OPT -#define HAVE_OPTIMIZED_BYTESWAP_32 -#define HAVE_OPTIMIZED_BYTESWAP_16 - -#ifdef _MSC_VER -static inline uae_u32 do_get_mem_long(uae_u32 *a) {return _byteswap_ulong(*a);} -static inline uae_u32 do_get_mem_word(uae_u16 *a) {return _byteswap_ushort(*a);} -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {*a = _byteswap_ulong(v);} -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {*a = _byteswap_ushort(v);} -static inline uae_u32 do_byteswap_32_g(uae_u32 v) {return _byteswap_ulong(v);} -static inline uae_u32 do_byteswap_16_g(uae_u32 v) {return _byteswap_ushort(v);} -#else -/* Intel x86 */ -static inline uae_u32 do_get_mem_long(uae_u32 *a) {uint32 retval; __asm__ ("bswap %0" : "=r" (retval) : "0" (*a) : "cc"); return retval;} -#ifdef X86_PPRO_OPT -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("movzwl %w1,%k0\n\tshll $16,%k0\n\tbswapl %k0\n" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#else -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("xorl %k0,%k0\n\tmovw %w1,%w0\n\trolw $8,%w0" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#endif -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {__asm__ ("bswap %0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#ifdef X86_PPRO_OPT -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("bswapl %0" : "=&r" (v) : "0" (v << 16) : "cc"); *a = v;} -#else -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("rolw $8,%0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#endif -/* bswap doesn't affect condition codes */ -static inline uae_u32 do_byteswap_32_g(uae_u32 v) {__asm__ ("bswap %0" : "=r" (v) : "0" (v)); return v;} -#ifdef X86_PPRO_OPT -static inline uae_u32 do_byteswap_16_g(uae_u32 v) {__asm__ ("bswapl %0" : "=&r" (v) : "0" (v << 16) : "cc"); return v;} -#else -static inline uae_u32 do_byteswap_16_g(uae_u32 v) {__asm__ ("rolw $8,%0" : "=r" (v) : "0" (v) : "cc"); return v;} -#endif -#endif - -#define HAVE_GET_WORD_UNSWAPPED -#define do_get_mem_word_unswapped(a) ((uae_u32)*((uae_u16 *)(a))) - -#ifndef HAVE_OPTIMIZED_BYTESWAP_32 -static inline uae_u32 do_byteswap_32_g(uae_u32 v) - { return (((v >> 24) & 0xff) | ((v >> 8) & 0xff00) | ((v & 0xff) << 24) | ((v & 0xff00) << 8)); } -#endif - -#ifndef HAVE_OPTIMIZED_BYTESWAP_16 -static inline uae_u32 do_byteswap_16_g(uae_u32 v) - { return (((v >> 8) & 0xff) | ((v & 0xff) << 8)); } -#endif - -#define do_byteswap_16_c(x) \ - ((((x) >> 8) & 0xff) | (((x) & 0xff) << 8)) - -#define do_byteswap_32_c(x) \ - ((((x) & 0xff000000) >> 24) | (((x) & 0x00ff0000) >> 8) | \ - (((x) & 0x0000ff00) << 8) | (((x) & 0x000000ff) << 24)) - -#if defined(__GNUC__) -#define do_byteswap_16(x) \ - (__extension__ \ - ({ register uint16 __v, __x = (x); \ - if (__builtin_constant_p(__x)) \ - __v = do_byteswap_16_c(__x); \ - else \ - __v = do_byteswap_16_g(__x); \ - __v; })) - -#define do_byteswap_32(x) \ - (__extension__ \ - ({ register uint32 __v, __x = (x); \ - if (__builtin_constant_p(__x)) \ - __v = do_byteswap_32_c(__x); \ - else \ - __v = do_byteswap_32_g(__x); \ - __v; })) -#else -#define do_byteswap_16(x) do_byteswap_16_g(x) -#define do_byteswap_32(x) do_byteswap_32_g(x) -#endif - -/* Byte-swapping routines */ -#if defined(__i386__) || defined(__x86_64__) -#define ntohl(x) do_byteswap_32(x) -#define ntohs(x) do_byteswap_16(x) -#define htonl(x) do_byteswap_32(x) -#define htons(x) do_byteswap_16(x) -#endif - -#define do_get_mem_byte(a) ((uae_u32)*((uae_u8 *)(a))) -#define do_put_mem_byte(a, v) (*(uae_u8 *)(a) = (v)) - -#define call_mem_get_func(func, addr) ((*func)(addr)) -#define call_mem_put_func(func, addr, v) ((*func)(addr, v)) -#define __inline__ inline -#define CPU_EMU_SIZE 0 -#undef NO_INLINE_MEMORY_ACCESS -#undef MD_HAVE_MEM_1_FUNCS -#define ENUMDECL typedef enum -#define ENUMNAME(name) name -#define write_log printf - -#if defined(X86_ASSEMBLY) || defined(X86_64_ASSEMBLY) -#define ASM_SYM(a) __asm__(a) -#else -#define ASM_SYM(a) -#endif - -#ifndef REGPARAM -# define REGPARAM -#endif -#define REGPARAM2 - -#ifdef _MSC_VER -#define ATTRIBUTE_PACKED -#endif - -#endif diff --git a/BasiliskII/src/Windows/timer_windows.cpp b/BasiliskII/src/Windows/timer_windows.cpp deleted file mode 100755 index d0aed8acb..000000000 --- a/BasiliskII/src/Windows/timer_windows.cpp +++ /dev/null @@ -1,268 +0,0 @@ -/* - * timer_windows.cpp - Time Manager emulation, Windows specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include "main.h" -#include "macos_util.h" -#include "timer.h" - -#define DEBUG 0 -#include "debug.h" - - -// Helper time functions -#define MSECS2TICKS(MSECS) (((uint64)(MSECS) * frequency) / 1000) -#define USECS2TICKS(USECS) (((uint64)(USECS) * frequency) / 1000000) -#define TICKS2USECS(TICKS) (((uint64)(TICKS) * 1000000) / frequency) - -// From main_windows.cpp -extern HANDLE emul_thread; - -// Global variables -static uint32 frequency; // CPU frequency in Hz (< 4 GHz) -static tm_time_t mac_boot_ticks; -static tm_time_t mac_1904_ticks; -static tm_time_t mac_now_diff; - - -/* - * Initialize native Windows timers - */ - -void timer_init(void) -{ - D(bug("SysTimerInit\n")); - - LARGE_INTEGER tt; - if (!QueryPerformanceFrequency(&tt)) { - ErrorAlert("No high resolution timers available\n"); - QuitEmulator(); - } - frequency = tt.LowPart; - D(bug(" frequency %d\n", frequency)); - - // mac_boot_ticks is 1.18 us since Basilisk II was started - QueryPerformanceCounter(&tt); - mac_boot_ticks = tt.QuadPart; - - // mac_1904_ticks is 1.18 us since Mac time started 1904 - mac_1904_ticks = time(NULL) * frequency; - mac_now_diff = mac_1904_ticks - mac_boot_ticks; -} - - - /* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); - LARGE_INTEGER tt; - QueryPerformanceCounter(&tt); - tt.QuadPart = TICKS2USECS(tt.QuadPart - mac_boot_ticks); - hi = tt.HighPart; - lo = tt.LowPart; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - return TimeToMacTime(time(NULL)); -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ - LARGE_INTEGER tt; - QueryPerformanceCounter(&tt); - t = tt.QuadPart + mac_now_diff; -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a + b; -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a - b; -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ - tm_time_t r = a - b; - return r < 0 ? -1 : (r > 0 ? 1 : 0); -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ - if (mactime > 0) { - // Time in milliseconds - res = MSECS2TICKS(mactime); - } else { - // Time in negative microseconds - res = USECS2TICKS(-mactime); - } -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime < 0) - return 0; - else { - uint64 t = TICKS2USECS(hosttime); - if (t > 0x7fffffff) - return int32(t / 1000); // Time in milliseconds - else - return -int32(t); // Time in negative microseconds - } -} - - -/* - * Get current value of microsecond timer - */ - -uint64 GetTicks_usec(void) -{ - LARGE_INTEGER tt; - QueryPerformanceCounter(&tt); - return TICKS2USECS(tt.QuadPart - mac_boot_ticks); -} - - -/* - * Delay by specified number of microseconds (<1 second) - */ - -void Delay_usec(uint32 usec) -{ - // FIXME: fortunately, Delay_usec() is generally used with - // millisecond resolution anyway - Sleep(usec / 1000); -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -struct idle_sentinel { - idle_sentinel(); - ~idle_sentinel(); -}; -static idle_sentinel idle_sentinel; - -static int idle_sem_ok = -1; -static HANDLE idle_sem = NULL; - -static HANDLE idle_lock = NULL; -#define LOCK_IDLE WaitForSingleObject(idle_lock, INFINITE) -#define UNLOCK_IDLE ReleaseMutex(idle_lock) - -idle_sentinel::idle_sentinel() -{ - idle_sem_ok = 1; - if ((idle_sem = CreateSemaphore(0, 0, 1, NULL)) == NULL) - idle_sem_ok = 0; - if ((idle_lock = CreateMutex(NULL, FALSE, NULL)) == NULL) - idle_sem_ok = 0; -} - -idle_sentinel::~idle_sentinel() -{ - if (idle_lock) { - ReleaseMutex(idle_lock); - CloseHandle(idle_lock); - } - if (idle_sem) { - ReleaseSemaphore(idle_sem, 1, NULL); - CloseHandle(idle_sem); - } -} - -void idle_wait(void) -{ - LOCK_IDLE; - if (idle_sem_ok > 0) { - idle_sem_ok++; - UNLOCK_IDLE; - WaitForSingleObject(idle_sem, INFINITE); - return; - } - UNLOCK_IDLE; - - // Fallback: sleep 10 ms (this should not happen though) - Delay_usec(10000); -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ - LOCK_IDLE; - if (idle_sem_ok > 1) { - idle_sem_ok--; - UNLOCK_IDLE; - ReleaseSemaphore(idle_sem, 1, NULL); - return; - } - UNLOCK_IDLE; -} diff --git a/BasiliskII/src/Windows/user_strings_windows.cpp b/BasiliskII/src/Windows/user_strings_windows.cpp deleted file mode 100755 index c22412506..000000000 --- a/BasiliskII/src/Windows/user_strings_windows.cpp +++ /dev/null @@ -1,179 +0,0 @@ -/* - * user_strings_windows.cpp - Windows-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under Unix. Basilisk II will try to unmount it."}, - {STR_EXTFS_VOLUME_NAME, "My Computer"}, - - // Purely platform-specific strings - {STR_NO_XVISUAL_ERR, "Cannot obtain appropriate X visual."}, - {STR_VOSF_INIT_ERR, "Cannot initialize Video on SEGV signals."}, - {STR_SIG_INSTALL_ERR, "Cannot install %s handler (%s)."}, - {STR_TICK_THREAD_ERR, "Cannot create 60Hz thread (%s)."}, - {STR_SLIRP_NO_DNS_FOUND_WARN, "Cannot get DNS address. Ethernet will not be available."}, - {STR_NO_AUDIO_WARN, "No audio device found, audio output will be disabled."}, - {STR_KEYCODE_FILE_WARN, "Cannot open keycode translation file %s (%s)."}, - {STR_KEYCODE_VENDOR_WARN, "Cannot find vendor '%s' in keycode translation file %s."}, - {STR_WINDOW_TITLE_GRABBED, "Basilisk II (mouse grabbed, press Ctrl-F5 to release)"}, - {STR_NO_WIN32_NT_4, "Basilisk II does not run on Windows NT versions less than 4.0"}, - - {STR_PREFS_MENU_FILE_GTK, "/_File"}, - {STR_PREFS_ITEM_START_GTK, "/File/_Start Basilisk II"}, - {STR_PREFS_ITEM_ZAP_PRAM_GTK, "/File/_Zap PRAM File"}, - {STR_PREFS_ITEM_SEPL_GTK, "/File/sepl"}, - {STR_PREFS_ITEM_QUIT_GTK, "/File/_Quit Basilisk II"}, - {STR_HELP_MENU_GTK, "/_Help"}, - {STR_HELP_ITEM_ABOUT_GTK, "/Help/_About Basilisk II"}, - - {STR_ABOUT_BUTTON, "About"}, - {STR_FILE_CTRL, "File"}, - {STR_BROWSE_TITLE, "Browse file"}, - {STR_BROWSE_CTRL, "Browse..."}, - {STR_SERIAL_PANE_TITLE, "Serial"}, - {STR_NETWORK_PANE_TITLE, "Network"}, - {STR_INPUT_PANE_TITLE, "Keyboard/Mouse"}, - {STR_KEYCODES_CTRL, "Use Raw Keycodes"}, - {STR_KEYCODE_FILE_CTRL, "Keycode Translation File"}, - {STR_MOUSEWHEELMODE_CTRL, "Mouse Wheel Function"}, - {STR_MOUSEWHEELMODE_PAGE_LAB, "Page Up/Down"}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, "Cursor Up/Down"}, - {STR_MOUSEWHEELLINES_CTRL, "Lines To Scroll"}, - {STR_POLLMEDIA_CTRL, "Try to automatically detect new removable media (enable polling)"}, - {STR_EXTFS_ENABLE_CTRL, "Enable \"My Computer\" icon on your Mac desktop (external file system)"}, - {STR_EXTFS_DRIVES_CTRL, "Mount drives"}, - {STR_ETHER_FTP_PORT_LIST_CTRL, "FTP ports"}, - {STR_ETHER_TCP_PORT_LIST_CTRL, "Server ports"}, - - {STR_IGNORESEGV_CTRL, "Ignore Illegal Memory Accesses"}, - - {-1, NULL} // End marker -}; - - -/* - * Search for main volume name - */ - -static const char *get_volume_name(void) -{ - HKEY hHelpKey; - DWORD key_type, cbData; - - static char volume[256]; - memset(volume, 0, sizeof(volume)); - - // Try Windows 2000 key first - if (ERROR_SUCCESS == RegOpenKey( - HKEY_CURRENT_USER, - TEXT("Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}"), - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - if (volume[0] == 0 && - ERROR_SUCCESS == RegOpenKey( - HKEY_CURRENT_USER, - TEXT("Software\\Classes\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}"), - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - if (volume[0] == 0 && - ERROR_SUCCESS == RegOpenKey( - HKEY_CLASSES_ROOT, - TEXT("CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}"), - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - // Fix the error that some "tweak" apps do. - if (_stricmp(volume, "%USERNAME% on %COMPUTER%") == 0) - volume[0] = '\0'; - - // No volume name found, default to "My Computer" - if (volume[0] == 0) - strcpy(volume, "My Computer"); - - return volume; -} - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First, search for platform-specific variable string - switch (num) { - case STR_EXTFS_VOLUME_NAME: - return get_volume_name(); - } - - // Next, search for platform-specific constant string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} - -/* - * Convert text to wide string, given the string number - */ -std::unique_ptr GetStringW(int num) -{ - auto str = GetString(num); - if (str == nullptr) - return nullptr; - - auto length = MultiByteToWideChar(CP_ACP, 0, str, -1, nullptr, 0); - if (length == 0) - return nullptr; - - auto p = std::unique_ptr(new wchar_t[length]); - MultiByteToWideChar(CP_ACP, 0, str, -1, p.get(), length); - return p; -} diff --git a/BasiliskII/src/Windows/user_strings_windows.h b/BasiliskII/src/Windows/user_strings_windows.h deleted file mode 100755 index ccf5ff54d..000000000 --- a/BasiliskII/src/Windows/user_strings_windows.h +++ /dev/null @@ -1,75 +0,0 @@ -/* - * user_strings_windows.h - Windows-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 USER_STRINGS_WINDOWS_H -#define USER_STRINGS_WINDOWS_H - -#ifdef __cplusplus -#if __cplusplus >= 201103L || _MSC_VER >= 1600 -#include - - // Convert text to wide string, given the string number -extern std::unique_ptr GetStringW(int num); -#endif -#endif - -enum { - STR_NO_XVISUAL_ERR = 10000, - STR_VOSF_INIT_ERR, - STR_SIG_INSTALL_ERR, - STR_TICK_THREAD_ERR, - STR_SLIRP_NO_DNS_FOUND_WARN, - STR_NO_AUDIO_WARN, - STR_KEYCODE_FILE_WARN, - STR_KEYCODE_VENDOR_WARN, - STR_WINDOW_TITLE_GRABBED, - STR_NO_WIN32_NT_4, - - STR_PREFS_MENU_FILE_GTK, - STR_PREFS_ITEM_START_GTK, - STR_PREFS_ITEM_ZAP_PRAM_GTK, - STR_PREFS_ITEM_SEPL_GTK, - STR_PREFS_ITEM_QUIT_GTK, - STR_HELP_MENU_GTK, - STR_HELP_ITEM_ABOUT_GTK, - - STR_ABOUT_BUTTON, - STR_FILE_CTRL, - STR_BROWSE_CTRL, - STR_BROWSE_TITLE, - STR_SERIAL_PANE_TITLE, - STR_NETWORK_PANE_TITLE, - STR_INPUT_PANE_TITLE, - STR_KEYCODES_CTRL, - STR_KEYCODE_FILE_CTRL, - STR_MOUSEWHEELMODE_CTRL, - STR_MOUSEWHEELMODE_PAGE_LAB, - STR_MOUSEWHEELMODE_CURSOR_LAB, - STR_MOUSEWHEELLINES_CTRL, - STR_POLLMEDIA_CTRL, - STR_EXTFS_ENABLE_CTRL, - STR_EXTFS_DRIVES_CTRL, - STR_ETHER_FTP_PORT_LIST_CTRL, - STR_ETHER_TCP_PORT_LIST_CTRL, - - STR_IGNORESEGV_CTRL, -}; - -#endif diff --git a/BasiliskII/src/Windows/util_windows.cpp b/BasiliskII/src/Windows/util_windows.cpp deleted file mode 100755 index ef29a06bd..000000000 --- a/BasiliskII/src/Windows/util_windows.cpp +++ /dev/null @@ -1,510 +0,0 @@ -/* - * util_windows.cpp - Miscellaneous utilities for Win32 - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 "sysdeps.h" -#include "util_windows.h" -#include "main.h" -#include -#include - -#include -using std::list; - -#include -using std::string; -using std::wstring; -typedef std::basic_string tstring; - -std::unique_ptr str(const wchar_t* s) -{ - auto length = WideCharToMultiByte(CP_ACP, 0, s, -1, nullptr, 0, nullptr, nullptr); - if (length == -1) - return nullptr; - - std::unique_ptr p(new char[length]); - WideCharToMultiByte(CP_ACP, 0, s, -1, p.get(), length, nullptr, nullptr); - return p; -} - -std::unique_ptr wstr(const char* s) -{ - auto length = MultiByteToWideChar(CP_ACP, 0, s, -1, nullptr, 0); - if (length == -1) - return nullptr; - - std::unique_ptr p(new wchar_t[length]); - MultiByteToWideChar(CP_ACP, 0, s, -1, p.get(), length); - return p; -} - -string to_string(const wchar_t* s) -{ - auto wlen = wcslen(s); // length without null terminator - auto len = WideCharToMultiByte(CP_ACP, 0, s, wlen, nullptr, 0, nullptr, nullptr); - if (len == -1) - return string(); - - string str(len, '\0'); - WideCharToMultiByte(CP_ACP, 0, s, wlen, &str.front(), len, nullptr, nullptr); - return str; -} - -wstring to_wstring(const char* s) -{ - auto len = strlen(s); // length without null terminator - auto wlen = MultiByteToWideChar(CP_ACP, 0, s, len, nullptr, 0); - if (len == -1) - return wstring(); - - wstring str(wlen, L'\0'); - MultiByteToWideChar(CP_ACP, 0, s, len, &str.front(), wlen); - return str; -} - -size_t strlcpy(char* dst, const char* src, size_t size) -{ - size_t length = strlen(src); - if (size-- > 0) { - if (length < size) - size = length; - memcpy(dst, src, size); - dst[size] = '\0'; - } - return length; -} - -size_t strlcpy(char* dst, const wchar_t* src, size_t size) -{ - size_t length = WideCharToMultiByte(CP_ACP, 0, src, -1, dst, size, nullptr, nullptr); - if (size > 0) { - if (length == 0) - return strlcpy(dst, str(src).get(), size); - --length; - } - return length; -} - -size_t strlcat(char* dst, const char* src, size_t size) -{ - char* end = static_cast(memchr(dst, '\0', size)); - if (end == nullptr) - return size; - size_t length = end - dst; - return length + strlcpy(end, src, size - length); -} - -size_t strlcat(char* dst, const wchar_t* src, size_t size) -{ - char* end = static_cast(memchr(dst, '\0', size)); - if (end == nullptr) - return size; - size_t length = end - dst; - return length + strlcpy(end, src, size - length); -} - -size_t wcslcpy(wchar_t* dst, const wchar_t* src, size_t size) -{ - size_t length = wcslen(src); - if (size-- > 0) { - if (length < size) - size = length; - wmemcpy(dst, src, size); - dst[size] = '\0'; - } - return length; -} - -size_t wcslcpy(wchar_t* dst, const char* src, size_t size) -{ - size_t length = MultiByteToWideChar(CP_ACP, 0, src, -1, dst, size); - if (size > 0) { - if (length == 0) - return wcslcpy(dst, wstr(src).get(), size); - --length; - } - return length; -} - -size_t wcslcat(wchar_t* dst, const wchar_t* src, size_t size) -{ - wchar_t* end = wmemchr(dst, L'\0', size); - if (end == nullptr) - return size; - size_t length = end - dst; - return length + wcslcpy(end, src, size - length); -} - -size_t wcslcat(wchar_t* dst, const char* src, size_t size) -{ - wchar_t* end = wmemchr(dst, L'\0', size); - if (end == nullptr) - return size; - size_t length = end - dst; - return length + wcslcpy(end, src, size - length); -} - -BOOL exists( const TCHAR *path ) -{ - HFILE h; - bool ret = false; - - h = _topen( path, _O_RDONLY | _O_BINARY ); - if(h != -1) { - ret = true; - _close(h); - } - return(ret); -} - -BOOL create_file( const TCHAR *path, DWORD size ) -{ - HANDLE h; - bool ok = false; - - h = CreateFile( path, - GENERIC_READ | GENERIC_WRITE, - 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL - ); - if(h != INVALID_HANDLE_VALUE) { - if(size == 0) { - ok = true; - } else if(SetFilePointer( h, size, NULL, FILE_BEGIN) != 0xFFFFFFFF) { - if(SetEndOfFile(h)) { - ok = true; - if(SetFilePointer( h, 0, NULL, FILE_BEGIN) != 0xFFFFFFFF) { - DWORD written; - DWORD zeroed_size = size; - if (zeroed_size > 1024*1024) - zeroed_size = 1024*1024; - char *b = (char *)malloc(zeroed_size); - if(b) { - memset( b, 0, zeroed_size ); - WriteFile( h, b, zeroed_size, &written, NULL ); - free(b); - } - } - } - } - CloseHandle(h); - } - if(!ok) DeleteFile(path); - return(ok); -} - -int32 get_file_size( const TCHAR *path ) -{ - HANDLE h; - DWORD size = 0; - - h = CreateFile( path, - GENERIC_READ, - 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL - ); - if(h != INVALID_HANDLE_VALUE) { - size = GetFileSize( h, NULL ); - CloseHandle(h); - } - return(size); -} - - -/* - * Thread wrappers - */ - -HANDLE create_thread(LPTHREAD_START_ROUTINE start_routine, void *arg) -{ - DWORD dwThreadId; - return CreateThread(NULL, 0, start_routine, arg, 0, &dwThreadId); -} - -void wait_thread(HANDLE thread) -{ - WaitForSingleObject(thread, INFINITE); - CloseHandle(thread); -} - -void kill_thread(HANDLE thread) -{ - TerminateThread(thread, 0); -} - - -/* - * Check that drivers are installed - */ - -bool check_drivers(void) -{ - TCHAR path[_MAX_PATH]; - GetSystemDirectory(path, lengthof(path)); - _tcscat(path, TEXT("\\drivers\\cdenable.sys")); - - if (exists(path)) { - int32 size = get_file_size(path); - if (size != 6112) { - TCHAR str[256]; - _sntprintf(str, lengthof(str), TEXT("The CD-ROM driver file \"%s\" is too old or corrupted."), path); - ErrorAlert(str); - return false; - } - } - else { - TCHAR str[256]; - _sntprintf(str, lengthof(str), TEXT("The CD-ROM driver file \"%s\" is missing."), path); - WarningAlert(str); - } - - return true; -} - - -/* - * Network control panel helpers - */ - -struct panel_reg { - tstring name; - tstring guid; -}; - -static list network_registry; -typedef list::const_iterator network_registry_iterator; - -#define NETWORK_CONNECTIONS_KEY \ - TEXT("SYSTEM\\CurrentControlSet\\Control\\Network\\{4D36E972-E325-11CE-BFC1-08002BE10318}") - -static void get_network_registry(void) -{ - LONG status; - HKEY network_connections_key; - DWORD len; - int i = 0; - - if (network_registry.size() > 0) - return; - - status = RegOpenKeyEx( - HKEY_LOCAL_MACHINE, - NETWORK_CONNECTIONS_KEY, - 0, - KEY_READ, - &network_connections_key); - - if (status != ERROR_SUCCESS) - return; - - while (true) { - TCHAR enum_name[256]; - TCHAR connection_string[256]; - HKEY connection_key; - TCHAR name_data[256]; - DWORD name_type; - const TCHAR name_string[] = TEXT("Name"); - - len = lengthof(enum_name); - status = RegEnumKeyEx( - network_connections_key, - i, - enum_name, - &len, - NULL, - NULL, - NULL, - NULL); - if (status != ERROR_SUCCESS) - break; - - _sntprintf (connection_string, lengthof(connection_string), - TEXT("%s\\%s\\Connection"), - NETWORK_CONNECTIONS_KEY, enum_name); - - status = RegOpenKeyEx( - HKEY_LOCAL_MACHINE, - connection_string, - 0, - KEY_READ, - &connection_key); - - if (status == ERROR_SUCCESS) { - len = lengthof(name_data); - status = RegQueryValueEx( - connection_key, - name_string, - NULL, - &name_type, - (BYTE *)name_data, - &len); - - if (status == ERROR_SUCCESS && name_type == REG_SZ) { - panel_reg pr; - pr.name = name_data; - pr.guid = enum_name; - network_registry.push_back(pr); - } - RegCloseKey (connection_key); - } - ++i; - } - - RegCloseKey (network_connections_key); -} - -const TCHAR *ether_name_to_guid(const TCHAR *name) -{ - get_network_registry(); - - for (network_registry_iterator it = network_registry.begin(); it != network_registry.end(); it++) { - if (_tcscmp((*it).name.c_str(), name) == 0) - return (*it).guid.c_str(); - } - - return NULL; -} - -const TCHAR *ether_guid_to_name(const TCHAR *guid) -{ - get_network_registry(); - - for (network_registry_iterator it = network_registry.begin(); it != network_registry.end(); it++) { - if (_tcscmp((*it).guid.c_str(), guid) == 0) - return (*it).name.c_str(); - } - - return NULL; -} - - -/* - * Get TAP-Win32 adapters - */ - -#define ADAPTER_KEY TEXT("SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002BE10318}") - -#define TAP_COMPONENT_ID TEXT("tap0801") - -const TCHAR *ether_tap_devices(void) -{ - HKEY adapter_key; - LONG status; - DWORD len; - int i = 0; - - status = RegOpenKeyEx( - HKEY_LOCAL_MACHINE, - ADAPTER_KEY, - 0, - KEY_READ, - &adapter_key); - - if (status != ERROR_SUCCESS) - return NULL; - - list devices; - - while (true) { - TCHAR enum_name[256]; - TCHAR unit_string[256]; - HKEY unit_key; - TCHAR component_id_string[] = TEXT("ComponentId"); - TCHAR component_id[256]; - TCHAR net_cfg_instance_id_string[] = TEXT("NetCfgInstanceId"); - TCHAR net_cfg_instance_id[256]; - DWORD data_type; - - len = lengthof(enum_name); - status = RegEnumKeyEx( - adapter_key, - i, - enum_name, - &len, - NULL, - NULL, - NULL, - NULL); - if (status != ERROR_SUCCESS) - break; - - _sntprintf (unit_string, lengthof(unit_string), TEXT("%s\\%s"), - ADAPTER_KEY, enum_name); - - status = RegOpenKeyEx( - HKEY_LOCAL_MACHINE, - unit_string, - 0, - KEY_READ, - &unit_key); - - if (status == ERROR_SUCCESS) { - len = lengthof(component_id); - status = RegQueryValueEx( - unit_key, - component_id_string, - NULL, - &data_type, - (BYTE *)component_id, - &len); - - if (status == ERROR_SUCCESS && data_type == REG_SZ) { - len = lengthof(net_cfg_instance_id); - status = RegQueryValueEx( - unit_key, - net_cfg_instance_id_string, - NULL, - &data_type, - (BYTE *)net_cfg_instance_id, - &len); - - if (status == ERROR_SUCCESS && data_type == REG_SZ) { - if (!_tcscmp (component_id, TAP_COMPONENT_ID)) - devices.push_back(net_cfg_instance_id); - } - } - RegCloseKey (unit_key); - } - ++i; - } - - RegCloseKey (adapter_key); - - if (devices.empty()) - return NULL; - - // The result is a '\0' separated list of strings - list::const_iterator it; - len = 0; - for (it = devices.begin(); it != devices.end(); it++) - len += (*it).length() + 1; - - TCHAR *names = (TCHAR *)malloc(len * sizeof(TCHAR)); - if (names) { - TCHAR *p = names; - for (it = devices.begin(); it != devices.end(); it++) { - len = (*it).length(); - _tcscpy(p, (*it).c_str()); - p[len] = '\0'; - p += len + 1; - } - } - - return names; -} diff --git a/BasiliskII/src/Windows/util_windows.h b/BasiliskII/src/Windows/util_windows.h deleted file mode 100755 index 264355586..000000000 --- a/BasiliskII/src/Windows/util_windows.h +++ /dev/null @@ -1,125 +0,0 @@ -/* - * util_windows.h - Miscellaneous utilities for Win32 - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Windows platform specific code copyright (C) Lauri Pesonen - * - * 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 _UTIL_WINDOWS_H -#define _UTIL_WINDOWS_H - -#include -#include - -BOOL exists( const TCHAR *path ); -int32 get_file_size( const TCHAR *path ); -BOOL create_file( const TCHAR *path, DWORD size ); -bool check_drivers(void); - -// Thread wrappers -extern HANDLE create_thread(LPTHREAD_START_ROUTINE start_routine, void *arg = NULL); -extern void wait_thread(HANDLE thread); -extern void kill_thread(HANDLE thread); - -// Mutex wrappers -class mutex_t { - CRITICAL_SECTION cs; - public: - mutex_t() { InitializeCriticalSection(&cs); } - ~mutex_t() { DeleteCriticalSection(&cs); } - void lock() { EnterCriticalSection(&cs); } - void unlock() { LeaveCriticalSection(&cs); } -}; - -// Network control panel helpers -extern const TCHAR *ether_name_to_guid(const TCHAR *name); -extern const TCHAR *ether_guid_to_name(const TCHAR *guid); - -// Get TAP-Win32 devices (caller free()s returned buffer) -extern const TCHAR *ether_tap_devices(void); - -// Wide string versions of commonly used functions -extern void ErrorAlert(const wchar_t *text); -extern void WarningAlert(const wchar_t *text); - -// ----------------- String conversion functions ----------------- - -// Null deleter -- does nothing. Allows returning a non-owning -// unique_ptr. This should go away if observer_ptr makes it into -// the standard. -template struct null_delete { - constexpr null_delete() noexcept = default; - template null_delete(const null_delete&) noexcept { } - void operator ()(T*) const noexcept { } -}; -template struct null_delete { - constexpr null_delete() noexcept = default; - void operator ()(T*) const noexcept { } - template void operator ()(U*) const = delete; -}; - -// Functions returning null-terminated C strings -std::unique_ptr str(const wchar_t* s); -std::unique_ptr wstr(const char* s); - -inline std::unique_ptr> str(const char* s) -{ - return std::unique_ptr>(s); -} -inline std::unique_ptr> wstr(const wchar_t* s) -{ - return std::unique_ptr>(s); -} - -#ifdef _UNICODE -#define tstr wstr -#else -#define tstr str -#endif - -// Functions returning std::strings -std::string to_string(const wchar_t* s); -std::wstring to_wstring(const char* s); -inline std::string to_string(const char* s) { return std::string(s); } -inline std::wstring to_wstring(const wchar_t* s) { return std::wstring(s); } - -#ifdef _UNICODE -#define to_tstring to_wstring -#else -#define to_tstring to_string -#endif - -// BSD strlcpy/strlcat with overloads for converting between wide and narrow strings -size_t strlcpy(char* dst, const char* src, size_t size); -size_t strlcpy(char* dst, const wchar_t* src, size_t size); -size_t strlcat(char* dst, const char* src, size_t size); -size_t strlcat(char* dst, const wchar_t* src, size_t size); -size_t wcslcpy(wchar_t* dst, const wchar_t* src, size_t size); -size_t wcslcpy(wchar_t* dst, const char* src, size_t size); -size_t wcslcat(wchar_t* dst, const wchar_t* src, size_t size); -size_t wcslcat(wchar_t* dst, const char* src, size_t size); - -#ifdef _UNICODE -#define tcslcpy wcslcpy -#define tcslcat wcslcat -#else -#define tcslcpy strlcpy -#define tcslcat strlcat -#endif - -#endif // _UTIL_WINDOWS_H diff --git a/BasiliskII/src/Windows/xpram_windows.cpp b/BasiliskII/src/Windows/xpram_windows.cpp deleted file mode 100755 index 46c45040e..000000000 --- a/BasiliskII/src/Windows/xpram_windows.cpp +++ /dev/null @@ -1,99 +0,0 @@ -/* - * xpram_windows.cpp - XPRAM handling, Windows specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -typedef std::basic_string tstring; - -#include "xpram.h" - - -// XPRAM file name and path -#if POWERPC_ROM -const TCHAR XPRAM_FILE_NAME[] = TEXT("SheepShaver_nvram.dat"); -#else -const TCHAR XPRAM_FILE_NAME[] = TEXT("BasiliskII_xpram.dat"); -#endif -static tstring xpram_path; - - -/* - * Construct XPRAM path - */ - -static void build_xpram_path(void) -{ - xpram_path.clear(); - int pwd_len = GetCurrentDirectory(0, NULL); - TCHAR *pwd = new TCHAR[pwd_len]; - if (GetCurrentDirectory(pwd_len, pwd) == pwd_len - 1) - xpram_path = tstring(pwd) + TEXT('\\'); - delete[] pwd; - xpram_path += XPRAM_FILE_NAME; -} - - -/* - * Load XPRAM from settings file - */ - -void LoadXPRAM(const char *vmdir) -{ - // Construct XPRAM path - build_xpram_path(); - - // Load XPRAM from settings file - HANDLE fh = CreateFile(xpram_path.c_str(), GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); - if (fh != INVALID_HANDLE_VALUE) { - DWORD bytesRead; - ReadFile(fh, XPRAM, XPRAM_SIZE, &bytesRead, NULL); - CloseHandle(fh); - } -} - - -/* - * Save XPRAM to settings file - */ - -void SaveXPRAM(void) -{ - HANDLE fh = CreateFile(xpram_path.c_str(), GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0); - if (fh != INVALID_HANDLE_VALUE) { - DWORD bytesWritten; - WriteFile(fh, XPRAM, XPRAM_SIZE, &bytesWritten, NULL); - CloseHandle(fh); - } -} - - -/* - * Delete PRAM file - */ - -void ZapPRAM(void) -{ - // Construct PRAM path - build_xpram_path(); - - // Delete file - DeleteFile(xpram_path.c_str()); -} diff --git a/BasiliskII/src/emul_op.cpp b/BasiliskII/src/emul_op.cpp index 0f2b59fce..549d1de01 100644 --- a/BasiliskII/src/emul_op.cpp +++ b/BasiliskII/src/emul_op.cpp @@ -42,9 +42,6 @@ #include "extfs.h" #include "emul_op.h" -#ifdef ENABLE_MON -#include "mon.h" -#endif #define DEBUG 0 #include "debug.h" @@ -69,10 +66,7 @@ void EmulOp(uint16 opcode, M68kRegisters *r) r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], r->sr); VideoQuitFullScreen(); -#ifdef ENABLE_MON - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif + QuitEmulator(); break; } @@ -574,10 +568,7 @@ void EmulOp(uint16 opcode, M68kRegisters *r) r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], r->sr); -#ifdef ENABLE_MON - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif + QuitEmulator(); break; } diff --git a/BasiliskII/src/ether.cpp b/BasiliskII/src/ether.cpp index d5471029d..e3f7e970e 100644 --- a/BasiliskII/src/ether.cpp +++ b/BasiliskII/src/ether.cpp @@ -57,11 +57,8 @@ using std::map; #define MONITOR 0 -#ifdef __BEOS__ -#define CLOSESOCKET closesocket -#else + #define CLOSESOCKET close -#endif // Global variables @@ -138,12 +135,8 @@ void EtherInit(void) // Set socket options int on = 1; -#ifdef __BEOS__ - setsockopt(udp_socket, SOL_SOCKET, SO_NONBLOCK, &on, sizeof(on)); -#else setsockopt(udp_socket, SOL_SOCKET, SO_BROADCAST, &on, sizeof(on)); ioctl(udp_socket, FIONBIO, &on); -#endif // Start thread for packet reception if (!ether_start_udp_thread(udp_socket)) { @@ -453,7 +446,6 @@ void ether_udp_read(uint32 packet, int length, struct sockaddr_in *from) * Ethernet packet allocator */ -#if SIZEOF_VOID_P != 4 || REAL_ADDRESSING == 0 static uint32 ether_packet = 0; // Ethernet packet (cached allocation) static uint32 n_ether_packets = 0; // Number of ethernet packets allocated so far (should be at most 1) @@ -485,4 +477,3 @@ EthernetPacket::~EthernetPacket() bug("WARNING: Nested allocation of ethernet packets!\n"); } } -#endif diff --git a/BasiliskII/src/extfs.cpp b/BasiliskII/src/extfs.cpp index f6ac09f12..fe421782c 100644 --- a/BasiliskII/src/extfs.cpp +++ b/BasiliskII/src/extfs.cpp @@ -43,10 +43,8 @@ #include #include -#ifndef WIN32 #include #include -#endif #if defined __APPLE__ && defined __MACH__ #include @@ -61,10 +59,6 @@ #include "extfs.h" #include "extfs_defs.h" -#ifdef WIN32 -# include "posix_emu.h" -#endif - #define DEBUG 0 #include "debug.h" @@ -1049,9 +1043,7 @@ static int16 fs_volume_mount(uint32 pb) // Init VCB WriteMacInt16(vcb + vcbSigWord, 0x4244); -#if defined(__BEOS__) || defined(WIN32) - WriteMacInt32(vcb + vcbCrDate, TimeToMacTime(root_stat.st_crtime)); -#elif defined __APPLE__ && defined __MACH__ +#if defined __APPLE__ && defined __MACH__ WriteMacInt32(vcb + vcbCrDate, get_creation_time(RootPath)); #else WriteMacInt32(vcb + vcbCrDate, 0); @@ -1114,9 +1106,7 @@ static int16 fs_get_vol_info(uint32 pb, bool hfs) // Fill in struct if (ReadMacInt32(pb + ioNamePtr)) pstrcpy((char *)Mac2HostAddr(ReadMacInt32(pb + ioNamePtr)), VOLUME_NAME); -#if defined(__BEOS__) || defined(WIN32) - WriteMacInt32(pb + ioVCrDate, TimeToMacTime(root_stat.st_crtime)); -#elif defined __APPLE__ && defined __MACH__ +#if defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioVCrDate, get_creation_time(RootPath)); #else WriteMacInt32(pb + ioVCrDate, 0); @@ -1308,9 +1298,7 @@ static int16 fs_get_file_info(uint32 pb, bool hfs, uint32 dirID) WriteMacInt8(pb + ioFlAttrib, access(full_path, W_OK) == 0 ? 0 : faLocked); WriteMacInt32(pb + ioDirID, fs_item->id); -#if defined(__BEOS__) || defined(WIN32) - WriteMacInt32(pb + ioFlCrDat, TimeToMacTime(st.st_crtime)); -#elif defined __APPLE__ && defined __MACH__ +#if defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioFlCrDat, get_creation_time(full_path)); #else WriteMacInt32(pb + ioFlCrDat, 0); @@ -1432,9 +1420,7 @@ static int16 fs_get_cat_info(uint32 pb) WriteMacInt8(pb + ioACUser, 0); WriteMacInt32(pb + ioDirID, fs_item->id); WriteMacInt32(pb + ioFlParID, fs_item->parent_id); -#if defined(__BEOS__) || defined(WIN32) - WriteMacInt32(pb + ioFlCrDat, TimeToMacTime(st.st_crtime)); -#elif defined __APPLE__ && defined __MACH__ +#if defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioFlCrDat, get_creation_time(full_path)); #else WriteMacInt32(pb + ioFlCrDat, 0); diff --git a/BasiliskII/src/include/debug.h b/BasiliskII/src/include/debug.h index 414ad3242..330d7f5b1 100644 --- a/BasiliskII/src/include/debug.h +++ b/BasiliskII/src/include/debug.h @@ -21,92 +21,10 @@ #ifndef DEBUG_H #define DEBUG_H -#if defined(WIN32) && !defined(__CYGWIN__) - -// Windows debugging goes where it's supposed to go -#include -#include -#include -#include -#include - -static inline void _cdecl vwinbug(const char *s, va_list vargs) -{ - char msg[1024], date[50], hours[50]; - struct _timeb tstruct; - - _ftime( &tstruct ); - _strtime( hours ); - _strdate( date ); - _snprintf( msg, lengthof(msg), "B2: %s %s:%03u ", date, hours, tstruct.millitm ); - - char *rest = &msg[strlen(msg)]; - _vsnprintf( rest, lengthof(msg) - (rest - msg), s, vargs ); - - OutputDebugStringA(msg); -} -static inline void _cdecl vwwinbug( const wchar_t *s, va_list vargs) -{ - wchar_t msg[1024], date[50], hours[50]; - struct _timeb tstruct; - - _ftime( &tstruct ); - _wstrtime( hours ); - _wstrdate( date ); - _snwprintf( msg, lengthof(msg), L"B2: %s %s:%03u ", date, hours, tstruct.millitm ); - - wchar_t *rest = &msg[wcslen(msg)]; - _vsnwprintf( rest, lengthof(msg) - (rest - msg), s, vargs ); - - OutputDebugStringW(msg); -} -static inline void _cdecl winbug( const char *s, ...) -{ - va_list vargs; - va_start(vargs, s); - vwinbug(s, vargs); - va_end(vargs); -} -static inline void _cdecl wwinbug(const wchar_t *s, ...) -{ - va_list vargs; - va_start(vargs, s); - vwwinbug(s, vargs); - va_end(vargs); -} - -#ifdef __cplusplus -static inline void _cdecl winbug(wchar_t *s, ...) -{ - va_list vargs; - va_start(vargs, s); - vwwinbug(s, vargs); - va_end(vargs); -} -#endif -#define bug winbug -#define wbug wwinbug - -#elif defined(AMIGA) - -// Amiga debugging info goes to serial port (or sushi) -#ifdef __cplusplus -extern "C" { -#endif -extern void kprintf(const char *, ...); -#ifdef __cplusplus -} -#endif -#define bug kprintf - -#else - // Other systems just print it to stdout #include #define bug printf -#endif - #if DEBUG #define D(x) (x); #else diff --git a/BasiliskII/src/include/ether.h b/BasiliskII/src/include/ether.h index e1e988d08..7c02e0204 100644 --- a/BasiliskII/src/include/ether.h +++ b/BasiliskII/src/include/ether.h @@ -63,17 +63,13 @@ extern uint32 ether_data; // Mac address of driver data in MacOS RAM // Ethernet packet allocator (optimized for 32-bit platforms in real addressing mode) class EthernetPacket { -#if SIZEOF_VOID_P == 4 && REAL_ADDRESSING - uint8 packet[1516]; - public: - uint32 addr(void) const { return (uint32)packet; } -#else + uint32 packet; public: EthernetPacket(); ~EthernetPacket(); uint32 addr(void) const { return packet; } -#endif + }; // Copy packet data from WDS to linear buffer (must hold at least 1514 bytes), diff --git a/BasiliskII/src/main.cpp b/BasiliskII/src/main.cpp index dcb86e9c2..2982bee75 100644 --- a/BasiliskII/src/main.cpp +++ b/BasiliskII/src/main.cpp @@ -42,20 +42,6 @@ #define DEBUG 0 #include "debug.h" -#if ENABLE_MON -#include "mon.h" - -static uint32 mon_read_byte_b2(uintptr adr) -{ - return ReadMacInt8(adr); -} - -static void mon_write_byte_b2(uintptr adr, uint32 b) -{ - WriteMacInt8(adr, b); -} -#endif - /* * Initialize everything, returns false on error @@ -192,13 +178,6 @@ bool InitAll(const char *vmdir) return false; } -#if ENABLE_MON - // Initialize mon - mon_init(); - mon_read_byte = mon_read_byte_b2; - mon_write_byte = mon_write_byte_b2; -#endif - return true; } @@ -209,10 +188,6 @@ bool InitAll(const char *vmdir) void ExitAll(void) { -#if ENABLE_MON - // Deinitialize mon - mon_exit(); -#endif // Save XPRAM XPRAMExit(); diff --git a/BasiliskII/src/native_cpu/cpu_emulation.h b/BasiliskII/src/native_cpu/cpu_emulation.h deleted file mode 100644 index 822ee0478..000000000 --- a/BasiliskII/src/native_cpu/cpu_emulation.h +++ /dev/null @@ -1,67 +0,0 @@ -/* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (native 68k version) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 CPU_EMULATION_H -#define CPU_EMULATION_H - - -/* - * Memory system - */ - -// RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) -extern uint32 RAMSize; // Size of RAM - -extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) -extern uint32 ROMSize; // Size of ROM - -// Mac memory access functions -static inline uint32 ReadMacInt32(uint32 addr) {return *(uint32 *)addr;} -static inline uint32 ReadMacInt16(uint32 addr) {return *(uint16 *)addr;} -static inline uint32 ReadMacInt8(uint32 addr) {return *(uint8 *)addr;} -static inline void WriteMacInt32(uint32 addr, uint32 l) {*(uint32 *)addr = l;} -static inline void WriteMacInt16(uint32 addr, uint32 w) {*(uint16 *)addr = w;} -static inline void WriteMacInt8(uint32 addr, uint32 b) {*(uint8 *)addr = b;} -static inline uint8 *Mac2HostAddr(uint32 addr) {return (uint8 *)addr;} -static inline uint32 Host2MacAddr(uint8 *addr) {return (uint32)addr;} -static inline void *Mac_memset(uint32 addr, int c, size_t n) {return memset(Mac2HostAddr(addr), c, n);} -static inline void *Mac2Host_memcpy(void *dest, uint32 src, size_t n) {return memcpy(dest, Mac2HostAddr(src), n);} -static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {return memcpy(Mac2HostAddr(dest), src, n);} -static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return memcpy(Mac2HostAddr(dest), Mac2HostAddr(src), n);} - - -/* - * 680x0 emulation - */ - -// 680x0 emulation functions -struct M68kRegisters; -extern void Start680x0(void); // Reset and start 680x0 -extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine -extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine - -// Interrupt functions -extern void TriggerInterrupt(void); // Trigger interrupt (InterruptFlag must be set first) -extern void TriggerNMI(void); // Trigger interrupt level 7 - -#endif diff --git a/BasiliskII/src/pict.c b/BasiliskII/src/pict.c deleted file mode 100644 index 715c8febe..000000000 --- a/BasiliskII/src/pict.c +++ /dev/null @@ -1,267 +0,0 @@ -/* - * pict.c - convert an image to PICT. - * - * Currently creates a bitmap PICT resource; vector graphics are not preserved. - * - * By Charles Srstka. - * - * Public Domain. Do with it as you wish. - * - */ - -/* - * PICT format: - * - * Size: 2 bytes - * Bounding Rect: 8 bytes - * - * This is followed by a series of opcodes. - * Each opcode is 1 byte long for a Version 1 PICT, or 2 bytes long for a Version 2 PICT. - * The ones we currently care about are: - * - * 0x0011 VersionOp: begins PICT version 2 - * 0x02ff Version: identifies PICT version 2 - * 0x0c00 HeaderOp: followed by 24 header bytes - * 4 bytes: 0xFFFFFFFF for regular v2 PICT or 0xFFFE0000 for extended v2 PICT - * 16 bytes: fixed-point bounding rectangle (or resolution, if an extended v2 PICT) - * 4 bytes: reserved - * - * 0x0001 Clip: set clipping region: followed by variable-sized region - * 0x001e DefHilite: set default highlight color - * 0x009b DirectBitsRgn: bitmap data - * pixMap: 50 bytes (PixMap) - * srcRect: 8 bytes (Rect) - * dstRect: 8 bytes (Rect) - * mode: 2 bytes (Mode) - * maskRgn: variable (Region) - * pixData: variable - * 0x00ff End of File - */ - -/* - * PixMap format: - * - * baseAddr: Ptr (4 bytes) - * rowBytes: Integer (2 bytes) - * bounds: Rect (8 bytes) - * pmVersion: Integer (2 bytes) - * packType: Integer (2 bytes) - * packSize: LongInt (4 bytes) - * hRes: Fixed (4 bytes) - * vRes: Fixed (4 bytes) - * pixelType: Integer (2 bytes) - * pixelSize: Integer (2 bytes) - * cmpCount: Integer (2 bytes) - * cmpSize: Integer (2 bytes) - * planeBytes: LongInt (4 bytes) - * pmTable: CTabHandle (4 bytes) - * pmReserved: LongInt (4 bytes) - */ - -#include -#include -#include -#include - -static ssize_t CompressUsingRLE(uint8_t *row, uint16_t uncmpLength, uint8_t *outBuf, size_t bufSize) -{ - int byteCountLength = 1 + (uncmpLength > 250); - - uint16_t cmpCursor = byteCountLength; - uint16_t cursor = 0; - - // enough to output the data uncompressed if we have to, plus the length bytes - size_t maxSize = byteCountLength + uncmpLength + (uncmpLength + 126) / 127; - - int outOfRoom = 0; - uint16_t cmpLength; - - if (row == NULL || outBuf == NULL || bufSize == 0) - return maxSize; - - while (cursor < uncmpLength) { - uint8_t byte = row[cursor++]; - uint8_t nextByte; - - if (cursor < uncmpLength && (nextByte = row[cursor]) == byte) { - int8_t matches = 1; - - while (++cursor < uncmpLength && matches < 127 && row[cursor] == byte) { - matches++; - } - - if(cmpCursor + 2 > bufSize) { - outOfRoom = 1; - break; - } - - outBuf[cmpCursor++] = -matches; - outBuf[cmpCursor++] = byte; - } else { - uint8_t literals = 0; - uint8_t i; - - while (cursor + literals + 1 < uncmpLength && literals < 127 && nextByte != (nextByte = row[cursor + literals + 1])) { - literals++; - } - - if(cmpCursor + 2 + literals > bufSize) { - outOfRoom = 1; - break; - } - - outBuf[cmpCursor++] = literals; - outBuf[cmpCursor++] = byte; - - for (i = 0; i < literals; i++) { - outBuf[cmpCursor++] = row[cursor++]; - } - } - } - - if(outOfRoom) { - // Trying to compress this just made it larger; just output the data uncompressed instead - - if(bufSize < maxSize) { - // sorry folks, don't have enough buffer - return -1; - } - - cursor = 0; - cmpCursor = byteCountLength; - - while (cursor < uncmpLength) { - uint8_t bytesToCopy = uncmpLength - cursor > 128 ? 128 : uncmpLength - cursor; - - outBuf[cmpCursor++] = bytesToCopy - 1; - memcpy(outBuf + cmpCursor, row + cursor, bytesToCopy); cmpCursor += bytesToCopy; cursor += bytesToCopy; - } - - cmpLength = cmpCursor - 1; - } - - cmpLength = cmpCursor - byteCountLength; - - if (byteCountLength == 2) { - outBuf[0] = cmpLength >> 8; - outBuf[1] = cmpLength & 0xff; - } else { - outBuf[0] = cmpLength; - } - - return cmpCursor; -} - -ssize_t ConvertRGBAToPICT(uint8_t *buf, unsigned long bufSize, uint8_t *rgbaPixels, uint16_t width, uint16_t height) -{ - unsigned long initialSize = (10 /* size + rect */ + - 6 /* initial opcodes */ + - 24 /* header */ + - 12 /* clip region */ + - 2 /* DefHilite */ + - 70 /* DirectBitsRgn - pixData - maskRgn */ + - 10 /* maskRgn */); - -#define RECT_SIZE 8 -#define REGION_SIZE 10 -#define FIXED_RECT_SIZE 16 - - char rect[RECT_SIZE] = {0, 0, 0, 0, height >> 8, height & 0xff, width >> 8, width & 0xff }; - char region[REGION_SIZE] = { 0x00, 0x0a, rect[0], rect[1], rect[2], rect[3], rect[4], rect[5], rect[6], rect[7] }; - char fixedRect[FIXED_RECT_SIZE] = { 0, 0, 0, 0, 0, 0, 0, 0, width >> 8, width & 0xff, 0, 0, height >> 8, height & 0xff, 0, 0 }; - - uint32_t hDPI = htonl(0x00480000); // 72 dpi - uint32_t vDPI = hDPI; - - uint16_t bytesPerPixel = 4; // RGBA - uint16_t bytesPerRow = width * bytesPerPixel; - - unsigned long cursor = 2; // size bytes filled in at the end - - ssize_t cmpBufSize = CompressUsingRLE(NULL, bytesPerRow, NULL, 0); - uint8_t cmpBuf[cmpBufSize]; - - uint16_t i; - - if (buf == NULL || bufSize == 0) { - // Give an upper bound for the buffer size. - - return initialSize + height * cmpBufSize + 2; - } - - if (bufSize < initialSize) { - return -1; - } - - memcpy(buf + cursor, rect, RECT_SIZE); cursor += RECT_SIZE; - - buf[cursor++] = 0x00; buf[cursor++] = 0x11; buf[cursor++] = 0x02; buf[cursor++] = 0xff; - - buf[cursor++] = 0x0c; buf[cursor++] = 0x00; - buf[cursor++] = 0xff; buf[cursor++] = 0xff; buf[cursor++] = 0xff; buf[cursor++] = 0xff; - memcpy(buf + cursor, fixedRect, FIXED_RECT_SIZE); cursor += FIXED_RECT_SIZE; - memset(buf + cursor, '\0', 4); cursor += 4; - - buf[cursor++] = 0x00; buf[cursor++] = 0x1e; - - buf[cursor++] = 0x00; buf[cursor++] = 0x01; - memcpy(buf + cursor, region, REGION_SIZE); cursor += REGION_SIZE; - - buf[cursor++] = 0x00; buf[cursor++] = 0x9b; - memset(buf + cursor, '\0', 4); cursor += 4; // I think this pointer isn't used - buf[cursor++] = (bytesPerRow >> 8) | 0x80; buf[cursor++] = bytesPerRow & 0xff; // rowBytes - memcpy(buf + cursor, rect, RECT_SIZE); cursor += RECT_SIZE; //bounds - buf[cursor++] = 0x00; buf[cursor++] = 0x00; // pmVersion - buf[cursor++] = 0x00; buf[cursor++] = 0x04; // packType - buf[cursor++] = 0x00; buf[cursor++] = 0x00; buf[cursor++] = 0x00; buf[cursor++] = 0x00; // packSize is always 0 - memcpy(buf + cursor, &hDPI, 4); cursor += 4; // hRes - memcpy(buf + cursor, &vDPI, 4); cursor += 4; // vRes - buf[cursor++] = 0x00; buf[cursor++] = 0x10; // pixelType; direct device - buf[cursor++] = 0x00; buf[cursor++] = 0x20; // pixelSize; 32 bits per pixel - buf[cursor++] = bytesPerPixel >> 8; buf[cursor++] = bytesPerPixel & 0xff; // components per pixel - buf[cursor++] = 0x00; buf[cursor++] = 0x08; // 8 bits per component - memset(buf + cursor, '\0', 4); cursor += 4; // planeBytes isn't used - memset(buf + cursor, '\0', 4); cursor += 4; // don't think we need pmTable - memset(buf + cursor, '\0', 4); cursor += 4; // reserved - - memcpy(buf + cursor, rect, RECT_SIZE); cursor += RECT_SIZE; - memcpy(buf + cursor, rect, RECT_SIZE); cursor += RECT_SIZE; - buf[cursor++] = 0x00; buf[cursor++] = 0x00; // no transfer mode - memcpy(buf + cursor, region, REGION_SIZE); cursor += REGION_SIZE; - - for (i = 0; i < height; i++) { - uint8_t row[bytesPerRow]; - ssize_t cmpLength; - uint16_t j; - - for (j = 0; j < width; j++) { - row[j] = rgbaPixels[i * bytesPerRow + j * bytesPerPixel + 3]; - row[width + j] = rgbaPixels[i * bytesPerRow + j * bytesPerPixel]; - row[width * 2 + j] = rgbaPixels[i * bytesPerRow + j * bytesPerPixel + 1]; - row[width * 3 + j] = rgbaPixels[i * bytesPerRow + j * bytesPerPixel + 2]; - } - - cmpLength = CompressUsingRLE(row, bytesPerRow, cmpBuf, cmpBufSize); - - if (cmpLength < 0 || cursor + cmpLength > bufSize) - return -1; - - memcpy(buf + cursor, cmpBuf, cmpLength); cursor += cmpLength; - } - - // Fun fact: forgetting to put 0x00ff at the end of a PICT picture causes the entire - // Classic Mac OS to crash when it tries to read it! Don't ask me how I learned this. - if (cursor + 2 > bufSize) - return -1; - - buf[cursor++] = 0x00; buf[cursor++] = 0xff; - - if(cursor > UINT16_MAX) { - buf[0] = buf[1] = 0xff; - } else { - buf[0] = cursor >> 8; - buf[1] = cursor & 0xff; - } - - return cursor; -} diff --git a/BasiliskII/src/powerrom_cpu/cpu_emulation.h b/BasiliskII/src/powerrom_cpu/cpu_emulation.h deleted file mode 100644 index dbddfbbc9..000000000 --- a/BasiliskII/src/powerrom_cpu/cpu_emulation.h +++ /dev/null @@ -1,66 +0,0 @@ -/* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (Apple PowerMac ROM 680x0 emulator version (BeOS/PPC)) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 CPU_EMULATION_H -#define CPU_EMULATION_H - - -/* - * Memory system - */ - -// RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) -extern uint32 RAMSize; // Size of RAM - -extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) -extern uint32 ROMSize; // Size of ROM - -// Mac memory access functions -static inline uint32 ReadMacInt32(uint32 addr) {return ntohl(*(uint32 *)addr);} -static inline uint32 ReadMacInt16(uint32 addr) {return ntohs(*(uint16 *)addr);} -static inline uint32 ReadMacInt8(uint32 addr) {return *(uint8 *)addr;} -static inline void WriteMacInt32(uint32 addr, uint32 l) {*(uint32 *)addr = htonl(l);} -static inline void WriteMacInt16(uint32 addr, uint32 w) {*(uint16 *)addr = htons(w);} -static inline void WriteMacInt8(uint32 addr, uint32 b) {*(uint8 *)addr = b;} -static inline uint8 *Mac2HostAddr(uint32 addr) {return (uint8 *)addr;} -static inline uint32 Host2MacAddr(uint8 *addr) {return (uint32)addr;} - - -/* - * 680x0 emulation - */ - -// Initialization -extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation -extern void Exit680x0(void); - -// 680x0 emulation functions -struct M68kRegisters; -extern void Start680x0(void); // Reset and start 680x0 -extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine -extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine - -// Interrupt functions -extern void TriggerInterrupt(void); // Trigger interrupt (InterruptFlag must be set first) - -#endif diff --git a/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp b/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp deleted file mode 100644 index d91b9049f..000000000 --- a/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp +++ /dev/null @@ -1,1367 +0,0 @@ -/* - * powerrom_cpu.cpp - Using the 680x0 emulator in PowerMac ROMs for Basilisk II - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include - -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "emul_op.h" -#include "prefs.h" -#include "timer.h" -#include "user_strings.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - -// Save FP regs in Execute68k()? -#define SAVE_FP_EXEC_68K 0 - - -// Constants -const char ROM_FILE_NAME[] = "PowerROM"; -const char KERNEL_AREA_NAME[] = "Macintosh Kernel Data"; -const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; - -const uint32 ROM_BASE = 0x40800000; // Base address of ROM -const uint32 ROM_SIZE = 0x00400000; // Size of ROM file -const uint32 ROM_AREA_SIZE = 0x00500000; // Size of ROM area - -const uint32 DR_CACHE_BASE = 0x69000000; // Address of DR cache -const uint32 DR_CACHE_SIZE = 0x80000; // Size of DR Cache - -const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack - -// PowerPC opcodes -const uint32 POWERPC_NOP = 0x60000000; -const uint32 POWERPC_ILLEGAL = 0x00000000; -const uint32 POWERPC_BLR = 0x4e800020; -const uint32 POWERPC_BCTR = 0x4e800420; - -// Extra Low Memory Globals -#define MODE_68K 0 // 68k emulator active -#define MODE_EMUL_OP 1 // Within EMUL_OP routine - -#define XLM_RESET_STACK 0x2800 // Reset stack pointer -#define XLM_KERNEL_DATA 0x2804 // Pointer to Kernel Data -#define XLM_TOC 0x2808 // TOC pointer of emulator -#define XLM_RUN_MODE 0x2810 // Current run mode, see enum above -#define XLM_68K_R25 0x2814 // Contents of the 68k emulator's r25 (which contains the interrupt level), saved upon entering EMUL_OP mode, used by Execute68k() and the USR1 signal handler -#define XLM_IRQ_NEST 0x2818 // Interrupt disable nesting counter (>0: disabled) -#define XLM_PVR 0x281c // Theoretical PVR -#define XLM_EMUL_RETURN_PROC 0x2824 // Pointer to EMUL_RETURN routine -#define XLM_EXEC_RETURN_PROC 0x2828 // Pointer to EXEC_RETURN routine -#define XLM_EMUL_OP_PROC 0x282c // Pointer to EMUL_OP routine -#define XLM_EMUL_RETURN_STACK 0x2830 // Stack pointer for EMUL_RETURN - - -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM - - -// Emulator Data -struct EmulatorData { - uint32 v[0x400]; -}; - - -// Kernel Data -struct KernelData { - uint32 v[0x400]; - EmulatorData ed; -}; - - -// Exceptions -class file_open_error {}; -class file_read_error {}; -class rom_size_error {}; - - -// Global variables -static void *TOC; // TOC pointer -static uint32 PVR; // Theoretical PVR -static int64 CPUClockSpeed; // Processor clock speed (Hz) -static int64 BusClockSpeed; // Bus clock speed (Hz) -static system_info SysInfo; // System information - -static area_id kernel_area = -1; // Kernel Data area ID -static KernelData *kernel_data = NULL; // Pointer to Kernel Data -static uint32 KernelDataAddr; // Address of Kernel Data -static EmulatorData *emulator_data = NULL; -static area_id dr_cache_area; // DR Cache area ID -static uint32 DRCacheAddr; // Address of DR Cache - -static struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) -static bool ReadyForSignals = false; // Flag: emul_thread ready to receive signals - - -// Prototypes -static void sigusr1_handler(int sig, void *arg, vregs *r); - -// From main_beos.cpp -extern int sheep_fd; // fd of sheep driver -extern thread_id emul_thread; // Emulator thread - - -/* - * Load ROM file (upper 3MB) - * - * file_open_error: Cannot open ROM file (nor use built-in ROM) - * file_read_error: Cannot read ROM file - */ - -// Decode LZSS data -static void decode_lzss(const uint8 *src, uint8 *dest, int size) -{ - char dict[0x1000]; - int run_mask = 0, dict_idx = 0xfee; - for (;;) { - if (run_mask < 0x100) { - // Start new run - if (--size < 0) - break; - run_mask = *src++ | 0xff00; - } - bool bit = run_mask & 1; - run_mask >>= 1; - if (bit) { - // Verbatim copy - if (--size < 0) - break; - int c = *src++; - dict[dict_idx++] = c; - *dest++ = c; - dict_idx &= 0xfff; - } else { - // Copy from dictionary - if (--size < 0) - break; - int idx = *src++; - if (--size < 0) - break; - int cnt = *src++; - idx |= (cnt << 4) & 0xf00; - cnt = (cnt & 0x0f) + 3; - while (cnt--) { - char c = dict[idx++]; - dict[dict_idx++] = c; - *dest++ = c; - idx &= 0xfff; - dict_idx &= 0xfff; - } - } - } -} - -static void load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("powerrom"); - - // Try to open ROM file - BFile file(rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) { - - // Failed, then ask sheep driver for ROM - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = read(sheep_fd, (void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - // Copy upper 3MB - memcpy((void *)(ROM_BASE + 0x100000), rom + 0x100000, ROM_SIZE - 0x100000); - delete[] rom; - return; - } else - throw file_open_error(); - } - - printf(GetString(STR_READING_ROM_FILE)); - - // Get file size - off_t rom_size = 0; - file.GetSize(&rom_size); - - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - // Plain ROM image, copy upper 3MB - memcpy((void *)(ROM_BASE + 0x100000), rom + 0x100000, ROM_SIZE - 0x100000); - delete[] rom; - } else { - if (strncmp((char *)rom, "", 11) == 0) { - // CHRP compressed ROM image - D(bug("CHRP ROM image\n")); - uint32 lzss_offset, lzss_size; - - char *s = strstr((char *)rom, "constant lzss-offset"); - if (s == NULL) - throw rom_size_error(); - s -= 7; - if (sscanf(s, "%06lx", &lzss_offset) != 1) - throw rom_size_error(); - s = strstr((char *)rom, "constant lzss-size"); - if (s == NULL) - throw rom_size_error(); - s -= 7; - if (sscanf(s, "%06lx", &lzss_size) != 1) - throw rom_size_error(); - D(bug("Offset of compressed data: %08lx\n", lzss_offset)); - D(bug("Size of compressed data: %08lx\n", lzss_size)); - - D(bug("Uncompressing ROM...\n")); - uint8 *decoded = new uint8[ROM_SIZE]; - decode_lzss(rom + lzss_offset, decoded, lzss_size); - memcpy((void *)(ROM_BASE + 0x100000), decoded + 0x100000, ROM_SIZE - 0x100000); - delete[] decoded; - delete[] rom; - } else if (rom_size != 4*1024*1024) - throw rom_size_error(); - else - throw file_read_error(); - } -} - - -/* - * Patch PowerMac ROM - */ - -// ROM type -enum { - ROMTYPE_TNT, - ROMTYPE_ALCHEMY, - ROMTYPE_ZANZIBAR, - ROMTYPE_GAZELLE, - ROMTYPE_NEWWORLD -}; -static int ROMType; - -// Nanokernel boot routine patches -static bool patch_nanokernel_boot(void) -{ - uint32 *lp; - int i; - - // Patch ConfigInfo - lp = (uint32 *)(ROM_BASE + 0x30d000); - lp[0x9c >> 2] = KernelDataAddr; // LA_InfoRecord - lp[0xa0 >> 2] = KernelDataAddr; // LA_KernelData - lp[0xa4 >> 2] = KernelDataAddr + 0x1000;// LA_EmulatorData - lp[0xa8 >> 2] = ROM_BASE + 0x480000; // LA_DispatchTable - lp[0xac >> 2] = ROM_BASE + 0x460000; // LA_EmulatorCode - lp[0x360 >> 2] = 0; // Physical RAM base (? on NewWorld ROM, this contains -1) - lp[0xfd8 >> 2] = ROM_BASE + 0x2a; // 68k reset vector - - // Skip SR/BAT/SDR init - if (ROMType == ROMTYPE_GAZELLE || ROMType == ROMTYPE_NEWWORLD) { - lp = (uint32 *)(ROM_BASE + 0x310000); - *lp++ = POWERPC_NOP; - *lp = 0x38000000; - } - static const uint32 sr_init_loc[] = {0x3101b0, 0x3101b0, 0x3101b0, 0x3101ec, 0x310200}; - lp = (uint32 *)(ROM_BASE + 0x310008); - *lp = 0x48000000 | (sr_init_loc[ROMType] - 8) & 0xffff; // b ROM_BASE+0x3101b0 - lp = (uint32 *)(ROM_BASE + sr_init_loc[ROMType]); - *lp++ = 0x80200000 + XLM_KERNEL_DATA; // lwz r1,(pointer to Kernel Data) - *lp++ = 0x3da0dead; // lis r13,0xdead (start of kernel memory) - *lp++ = 0x3dc00010; // lis r14,0x0010 (size of page table) - *lp = 0x3de00010; // lis r15,0x0010 (size of kernel memory) - - // Don't read PVR - static const uint32 pvr_loc[] = {0x3103b0, 0x3103b4, 0x3103b4, 0x310400, 0x310438}; - lp = (uint32 *)(ROM_BASE + pvr_loc[ROMType]); - *lp = 0x81800000 + XLM_PVR; // lwz r12,(theoretical PVR) - - // Set CPU specific data (even if ROM doesn't have support for that CPU) - lp = (uint32 *)(ROM_BASE + pvr_loc[ROMType]); - if (ntohl(lp[6]) != 0x2c0c0001) - return false; - uint32 ofs = lp[7] & 0xffff; - lp[8] = (lp[8] & 0xffff) | 0x48000000; // beq -> b - uint32 loc = (lp[8] & 0xffff) + (uint32)(lp+8) - ROM_BASE; - lp = (uint32 *)(ROM_BASE + ofs + 0x310000); - switch (PVR >> 16) { - case 1: // 601 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00010040; // Unified caches/Inst cache line size - lp[5] = 0x00400020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x01000002; // TLB total size/TLB assoc - break; - case 3: // 603 - lp[0] = 0x1000; // Page size - lp[1] = 0x2000; // Data cache size - lp[2] = 0x2000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00020002; // Inst cache assoc/Data cache assoc - lp[8] = 0x00400002; // TLB total size/TLB assoc - break; - case 4: // 604 - lp[0] = 0x1000; // Page size - lp[1] = 0x4000; // Data cache size - lp[2] = 0x4000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; -// case 5: // 740? - case 6: // 603e - case 7: // 603ev - lp[0] = 0x1000; // Page size - lp[1] = 0x4000; // Data cache size - lp[2] = 0x4000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00400002; // TLB total size/TLB assoc - break; - case 8: // 750 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; - case 9: // 604e - case 10: // 604ev5 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; -// case 11: // X704? - case 12: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; - case 13: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x01000004; // TLB total size/TLB assoc - break; -// case 50: // 821 -// case 80: // 860 - case 96: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00010020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800004; // TLB total size/TLB assoc - break; - default: - printf("WARNING: Unknown CPU type\n"); - break; - } - - // Don't set SPRG3, don't test MQ - lp = (uint32 *)(ROM_BASE + loc + 0x20); - *lp++ = POWERPC_NOP; - lp++; - *lp++ = POWERPC_NOP; - lp++; - *lp = POWERPC_NOP; - - // Don't read MSR - lp = (uint32 *)(ROM_BASE + loc + 0x40); - *lp = 0x39c00000; // li r14,0 - - // Don't write to DEC - lp = (uint32 *)(ROM_BASE + loc + 0x70); - *lp++ = POWERPC_NOP; - loc = (lp[0] & 0xffff) + (uint32)lp - ROM_BASE; - - // Don't set SPRG3 - lp = (uint32 *)(ROM_BASE + loc + 0x2c); - *lp = POWERPC_NOP; - - // Don't read PVR - static const uint32 pvr_ofs[] = {0x138, 0x138, 0x138, 0x140, 0x148}; - lp = (uint32 *)(ROM_BASE + loc + pvr_ofs[ROMType]); - *lp = 0x82e00000 + XLM_PVR; // lwz r23,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + loc + 0x170); - if (*lp == 0x7eff42a6) // NewWorld ROM - *lp = 0x82e00000 + XLM_PVR; // lwz r23,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + 0x313134); - if (*lp == 0x7e5f42a6) - *lp = 0x82400000 + XLM_PVR; // lwz r18,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + 0x3131f4); - if (*lp == 0x7e5f42a6) // NewWorld ROM - *lp = 0x82400000 + XLM_PVR; // lwz r18,(theoretical PVR) - - // Don't read SDR1 - static const uint32 sdr1_ofs[] = {0x174, 0x174, 0x174, 0x17c, 0x19c}; - lp = (uint32 *)(ROM_BASE + loc + sdr1_ofs[ROMType]); - *lp++ = 0x3d00dead; // lis r8,0xdead (pointer to page table) - *lp++ = 0x3ec0001f; // lis r22,0x001f (size of page table) - *lp = POWERPC_NOP; - - // Don't clear page table - static const uint32 pgtb_ofs[] = {0x198, 0x198, 0x198, 0x1a0, 0x1c4}; - lp = (uint32 *)(ROM_BASE + loc + pgtb_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't invalidate TLB - static const uint32 tlb_ofs[] = {0x1a0, 0x1a0, 0x1a0, 0x1a8, 0x1cc}; - lp = (uint32 *)(ROM_BASE + loc + tlb_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't create RAM descriptor table - static const uint32 desc_ofs[] = {0x350, 0x350, 0x350, 0x358, 0x37c}; - lp = (uint32 *)(ROM_BASE + loc + desc_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't load SRs and BATs - static const uint32 sr_ofs[] = {0x3d8, 0x3d8, 0x3d8, 0x3e0, 0x404}; - lp = (uint32 *)(ROM_BASE + loc + sr_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't mess with SRs - static const uint32 sr2_ofs[] = {0x312118, 0x312118, 0x312118, 0x312118, 0x3121b4}; - lp = (uint32 *)(ROM_BASE + sr2_ofs[ROMType]); - *lp = POWERPC_BLR; - - // Don't check performance monitor - static const uint32 pm_ofs[] = {0x313148, 0x313148, 0x313148, 0x313148, 0x313218}; - lp = (uint32 *)(ROM_BASE + pm_ofs[ROMType]); - while (*lp != 0x7e58eba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e78eaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e59eba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e79eaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5aeba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7aeaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5beba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7beaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5feba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7feaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5ceba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7ceaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5deba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7deaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5eeba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7eeaa6) lp++; - *lp++ = POWERPC_NOP; - - // Jump to 68k emulator - static const uint32 jump68k_ofs[] = {0x40c, 0x40c, 0x40c, 0x414, 0x438}; - lp = (uint32 *)(ROM_BASE + loc + jump68k_ofs[ROMType]); - *lp++ = 0x80610634; // lwz r3,0x0634(r1) (pointer to Emulator Data) - *lp++ = 0x8081119c; // lwz r4,0x119c(r1) (pointer to opcode table) - *lp++ = 0x80011184; // lwz r0,0x1184(r1) (pointer to emulator entry) - *lp++ = 0x7c0903a6; // mtctr r0 - *lp = POWERPC_BCTR; - return true; -} - -// 68k emulator patches -static bool patch_68k_emul(void) -{ - uint32 *lp; - uint32 base; - - // Overwrite twi instructions - static const uint32 twi_loc[] = {0x36e680, 0x36e6c0, 0x36e6c0, 0x36e6c0, 0x36e740}; - base = twi_loc[ROMType]; - lp = (uint32 *)(ROM_BASE + base); - *lp++ = 0x48000000 + 0x36f900 - base; // b 0x36f900 (Emulator start) - *lp++ = POWERPC_ILLEGAL; - *lp++ = 0x48000000 + 0x36fb00 - base - 8; // b 0x36fb00 (Reset opcode) - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - - // Set reset stack pointer - lp = (uint32 *)(ROM_BASE + base + 0xf0); - *lp++ = 0x80200000 + XLM_RESET_STACK; // lwz r1,XLM_RESET_STACK - - // Install EXEC_RETURN and EMUL_OP opcodes - lp = (uint32 *)(ROM_BASE + 0x380000 + (M68K_EXEC_RETURN << 3)); - *lp++ = 0x80000000 + XLM_EXEC_RETURN_PROC; // lwz r0,XLM_EXEC_RETURN_PROC - *lp++ = 0x4bfb6ffc; // b 0x36f800 - for (int i=0; i> 16); // lis r0,xxx - *lp++ = 0x60000000 + ((ROM_BASE + 0x46d0a4) & 0xffff); // ori r0,r0,xxx - *lp++ = 0x7c0903a6; // mtctr r0 - *lp = POWERPC_BCTR; // bctr - return true; -} - -// Nanokernel patches -static bool patch_nanokernel(void) -{ - uint32 *lp; - - // Patch 68k emulator trap routine - lp = (uint32 *)(ROM_BASE + 0x312994); // Always restore FPU state - while (*lp != 0x39260040) lp++; - lp--; - *lp = 0x48000441; // bl 0x00312dd4 - lp = (uint32 *)(ROM_BASE + 0x312dd8); // Don't modify MSR to turn on FPU - while (*lp != 0x810600e4) lp++; - lp--; - *lp++ = POWERPC_NOP; - lp += 2; - *lp++ = POWERPC_NOP; - lp++; - *lp++ = POWERPC_NOP; - *lp++ = POWERPC_NOP; - *lp = POWERPC_NOP; - - // Patch trap return routine - lp = (uint32 *)(ROM_BASE + 0x312c20); - while (*lp != 0x7d5a03a6) lp++; - *lp++ = 0x7d4903a6; // mtctr r10 - *lp++ = 0x7daff120; // mtcr r13 - *lp++ = 0x48000000 + 0x8000 - ((uint32)lp & 0xffff); // b ROM_BASE+0x318000 - uint32 xlp = (uint32)lp & 0xffff; - - lp = (uint32 *)(ROM_BASE + 0x312c50); // Replace rfi - while (*lp != 0x4c000064) lp++; - *lp = POWERPC_BCTR; - - lp = (uint32 *)(ROM_BASE + 0x318000); - *lp++ = 0x81400000 + XLM_IRQ_NEST; // lwz r10,XLM_IRQ_NEST - *lp++ = 0x394affff; // subi r10,r10,1 - *lp++ = 0x91400000 + XLM_IRQ_NEST; // stw r10,XLM_IRQ_NEST - *lp = 0x48000000 + ((xlp - 0x800c) & 0x03fffffc); // b ROM_BASE+0x312c2c - return true; -} - -static bool patch_rom(void) -{ - // Detect ROM type - if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot TNT", 8)) - ROMType = ROMTYPE_TNT; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Alchemy", 12)) - ROMType = ROMTYPE_ALCHEMY; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Zanzibar", 13)) - ROMType = ROMTYPE_ZANZIBAR; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Gazelle", 12)) - ROMType = ROMTYPE_GAZELLE; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "NewWorld", 8)) - ROMType = ROMTYPE_NEWWORLD; - else - return false; - - // Apply patches - if (!patch_nanokernel_boot()) return false; - if (!patch_68k_emul()) return false; - if (!patch_nanokernel()) return false; - - // Copy 68k emulator to 2MB boundary - memcpy((void *)(ROM_BASE + ROM_SIZE), (void *)(ROM_BASE + ROM_SIZE - 0x100000), 0x100000); - return true; -} - - -/* - * Initialize 680x0 emulation - */ - -static asm void *get_toc(void) -{ - mr r3,r2 - blr -} - -bool Init680x0(void) -{ - char str[256]; - - // Mac address space = host address space - RAMBaseMac = (uint32)RAMBaseHost; - ROMBaseMac = (uint32)ROMBaseHost; - - // Get TOC pointer - TOC = get_toc(); - - // Get system info - get_system_info(&SysInfo); - switch (SysInfo.cpu_type) { - case B_CPU_PPC_601: - PVR = 0x00010000; - break; - case B_CPU_PPC_603: - PVR = 0x00030000; - break; - case B_CPU_PPC_603e: - PVR = 0x00060000; - break; - case B_CPU_PPC_604: - PVR = 0x00040000; - break; - case B_CPU_PPC_604e: - PVR = 0x00090000; - break; - default: - PVR = 0x00040000; - break; - } - CPUClockSpeed = SysInfo.cpu_clock_speed; - BusClockSpeed = SysInfo.bus_clock_speed; - - // Delete old areas - area_id old_kernel_area = find_area(KERNEL_AREA_NAME); - if (old_kernel_area > 0) - delete_area(old_kernel_area); - area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); - if (old_dr_cache_area > 0) - delete_area(old_dr_cache_area); - - // Create area for Kernel Data - kernel_data = (KernelData *)0x68ffe000; - kernel_area = create_area(KERNEL_AREA_NAME, &kernel_data, B_EXACT_ADDRESS, 0x2000, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (kernel_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area), kernel_area); - ErrorAlert(str); - return false; - } - emulator_data = &kernel_data->ed; - KernelDataAddr = (uint32)kernel_data; - D(bug("Kernel Data area %ld at %p, Emulator Data at %p\n", kernel_area, kernel_data, emulator_data)); - - // Load PowerMac ROM (upper 3MB) - try { - load_rom(); - } catch (file_open_error) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - return false; - } catch (file_read_error) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - return false; - } catch (rom_size_error) { - ErrorAlert(STR_ROM_SIZE_ERR); - return false; - } - - // Install ROM patches - if (!patch_rom()) { - ErrorAlert("Unsupported PowerMac ROM version"); - return false; - } - - // Create area for DR Cache - DRCacheAddr = DR_CACHE_BASE; - dr_cache_area = create_area(DR_CACHE_AREA_NAME, (void **)&DRCacheAddr, B_EXACT_ADDRESS, DR_CACHE_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_cache_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_cache_area), dr_cache_area); - ErrorAlert(str); - return false; - } - D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); - - // Initialize Kernel Data - memset(kernel_data, 0, sizeof(KernelData)); - if (ROMType == ROMTYPE_NEWWORLD) { - kernel_data->v[0xc20 >> 2] = RAMSize; - kernel_data->v[0xc24 >> 2] = RAMSize; - kernel_data->v[0xc30 >> 2] = RAMSize; - kernel_data->v[0xc34 >> 2] = RAMSize; - kernel_data->v[0xc38 >> 2] = 0x00010020; - kernel_data->v[0xc3c >> 2] = 0x00200001; - kernel_data->v[0xc40 >> 2] = 0x00010000; - kernel_data->v[0xc50 >> 2] = RAMBaseMac; - kernel_data->v[0xc54 >> 2] = RAMSize; - kernel_data->v[0xf60 >> 2] = PVR; - kernel_data->v[0xf64 >> 2] = CPUClockSpeed; - kernel_data->v[0xf68 >> 2] = BusClockSpeed; - kernel_data->v[0xf6c >> 2] = CPUClockSpeed; - } else { - kernel_data->v[0xc80 >> 2] = RAMSize; - kernel_data->v[0xc84 >> 2] = RAMSize; - kernel_data->v[0xc90 >> 2] = RAMSize; - kernel_data->v[0xc94 >> 2] = RAMSize; - kernel_data->v[0xc98 >> 2] = 0x00010020; - kernel_data->v[0xc9c >> 2] = 0x00200001; - kernel_data->v[0xca0 >> 2] = 0x00010000; - kernel_data->v[0xcb0 >> 2] = RAMBaseMac; - kernel_data->v[0xcb4 >> 2] = RAMSize; - kernel_data->v[0xf80 >> 2] = PVR; - kernel_data->v[0xf84 >> 2] = CPUClockSpeed; - kernel_data->v[0xf88 >> 2] = BusClockSpeed; - kernel_data->v[0xf8c >> 2] = CPUClockSpeed; - } - - // Initialize extra low memory - memset((void *)0x2000, 0, 0x1000); - *(uint32 *)XLM_RESET_STACK = 0x2000; // Reset stack pointer - *(KernelData **)XLM_KERNEL_DATA = kernel_data;// For trap replacement routines - *(void **)XLM_TOC = TOC; // TOC pointer of emulator - *(uint32 *)XLM_PVR = PVR; // Theoretical PVR - - // Clear caches (as we loaded and patched code) - clear_caches((void *)ROM_BASE, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); - return true; -} - - -/* - * Deinitialize 680x0 emulation - */ - -void Exit680x0(void) -{ - // Delete DR Cache area - if (dr_cache_area >= 0) - delete_area(dr_cache_area); - - // Delete Kernel Data area - if (kernel_area >= 0) - delete_area(kernel_area); -} - - -/* - * Quit emulator (must only be called from main thread) - */ - -asm void QuitEmulator(void) -{ - lwz r0,XLM_EMUL_RETURN_PROC - mtlr r0 - blr -} - - -/* - * Reset and start 680x0 emulation - */ - -static asm void jump_to_rom(register uint32 entry) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - mfcr r0 - stw r0,4(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) - - // Move entry address to ctr, get pointer to Emulator Data - mtctr r3 - lwz r3,emulator_data(r2) - - // Skip over EMUL_RETURN routine and get its address - bl @1 - - - /* - * EMUL_RETURN: Returned from emulator - */ - - // Restore PowerPC registers - lwz r1,XLM_EMUL_RETURN_STACK - lwz r2,XLM_TOC - lmw r13,56(r1) - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) - - // Exiting from 68k emulator - li r0,1 - stw r0,XLM_IRQ_NEST - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Return to caller of jump_to_rom() - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - lwz r0,56+19*4+18*8+4(r1) - mtcrf 0xff,r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Save address of EMUL_RETURN routine for 68k emulator patch -@1 mflr r0 - stw r0,XLM_EMUL_RETURN_PROC - - // Skip over EXEC_RETURN routine and get its address - bl @2 - - - /* - * EXEC_RETURN: Returned from 68k routine executed with Execute68k() - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Reentering EMUL_OP mode - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Save 68k registers - lwz r4,56+19*4+18*8+12(r1) - stw r8,M68kRegisters.d[0](r4) - stw r9,M68kRegisters.d[1](r4) - stw r10,M68kRegisters.d[2](r4) - stw r11,M68kRegisters.d[3](r4) - stw r12,M68kRegisters.d[4](r4) - stw r13,M68kRegisters.d[5](r4) - stw r14,M68kRegisters.d[6](r4) - stw r15,M68kRegisters.d[7](r4) - stw r16,M68kRegisters.a[0](r4) - stw r17,M68kRegisters.a[1](r4) - stw r18,M68kRegisters.a[2](r4) - stw r19,M68kRegisters.a[3](r4) - stw r20,M68kRegisters.a[4](r4) - stw r21,M68kRegisters.a[5](r4) - stw r22,M68kRegisters.a[6](r4) - - // Restore PowerPC registers - lmw r13,56(r1) -#if SAVE_FP_EXEC_68K - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) -#endif - - // Return to caller - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Stave address of EXEC_RETURN routine for 68k emulator patch -@2 mflr r0 - stw r0,XLM_EXEC_RETURN_PROC - - // Skip over EMUL_OP routine and get its address - bl @3 - - - /* - * EMUL_OP: Execute native routine, selector in r5 (my own private mode switch) - * - * 68k registers are stored in a M68kRegisters struct on the stack - * which the native routine may read and modify - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Entering EMUL_OP mode within 68k emulator - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Create PowerPC stack frame, reserve space for M68kRegisters - mr r3,r1 - subi r1,r1,56 // Fake "caller" frame - rlwinm r1,r1,0,0,29 // Align stack - - mfcr r0 - rlwinm r0,r0,0,11,8 - stw r0,4(r1) - mfxer r0 - stw r0,16(r1) - stw r2,12(r1) - stwu r1,-(56+16*4+15*8)(r1) - lwz r2,XLM_TOC - - // Save 68k registers - stw r8,56+M68kRegisters.d[0](r1) - stw r9,56+M68kRegisters.d[1](r1) - stw r10,56+M68kRegisters.d[2](r1) - stw r11,56+M68kRegisters.d[3](r1) - stw r12,56+M68kRegisters.d[4](r1) - stw r13,56+M68kRegisters.d[5](r1) - stw r14,56+M68kRegisters.d[6](r1) - stw r15,56+M68kRegisters.d[7](r1) - stw r16,56+M68kRegisters.a[0](r1) - stw r17,56+M68kRegisters.a[1](r1) - stw r18,56+M68kRegisters.a[2](r1) - stw r19,56+M68kRegisters.a[3](r1) - stw r20,56+M68kRegisters.a[4](r1) - stw r21,56+M68kRegisters.a[5](r1) - stw r22,56+M68kRegisters.a[6](r1) - stw r3,56+M68kRegisters.a[7](r1) - stfd f0,56+16*4+0*8(r1) - stfd f1,56+16*4+1*8(r1) - stfd f2,56+16*4+2*8(r1) - stfd f3,56+16*4+3*8(r1) - stfd f4,56+16*4+4*8(r1) - stfd f5,56+16*4+5*8(r1) - stfd f6,56+16*4+6*8(r1) - stfd f7,56+16*4+7*8(r1) - mffs f0 - stfd f8,56+16*4+8*8(r1) - stfd f9,56+16*4+9*8(r1) - stfd f10,56+16*4+10*8(r1) - stfd f11,56+16*4+11*8(r1) - stfd f12,56+16*4+12*8(r1) - stfd f13,56+16*4+13*8(r1) - stfd f0,56+16*4+14*8(r1) - - // Execute native routine - mr r3,r5 - addi r4,r1,56 - bl EmulOp - - // Restore 68k registers - lwz r8,56+M68kRegisters.d[0](r1) - lwz r9,56+M68kRegisters.d[1](r1) - lwz r10,56+M68kRegisters.d[2](r1) - lwz r11,56+M68kRegisters.d[3](r1) - lwz r12,56+M68kRegisters.d[4](r1) - lwz r13,56+M68kRegisters.d[5](r1) - lwz r14,56+M68kRegisters.d[6](r1) - lwz r15,56+M68kRegisters.d[7](r1) - lwz r16,56+M68kRegisters.a[0](r1) - lwz r17,56+M68kRegisters.a[1](r1) - lwz r18,56+M68kRegisters.a[2](r1) - lwz r19,56+M68kRegisters.a[3](r1) - lwz r20,56+M68kRegisters.a[4](r1) - lwz r21,56+M68kRegisters.a[5](r1) - lwz r22,56+M68kRegisters.a[6](r1) - lwz r3,56+M68kRegisters.a[7](r1) - lfd f13,56+16*4+14*8(r1) - lfd f0,56+16*4+0*8(r1) - lfd f1,56+16*4+1*8(r1) - lfd f2,56+16*4+2*8(r1) - lfd f3,56+16*4+3*8(r1) - lfd f4,56+16*4+4*8(r1) - lfd f5,56+16*4+5*8(r1) - lfd f6,56+16*4+6*8(r1) - lfd f7,56+16*4+7*8(r1) - mtfsf 0xff,f13 - lfd f8,56+16*4+8*8(r1) - lfd f9,56+16*4+9*8(r1) - lfd f10,56+16*4+10*8(r1) - lfd f11,56+16*4+11*8(r1) - lfd f12,56+16*4+12*8(r1) - lfd f13,56+16*4+13*8(r1) - - // Delete PowerPC stack frame - lwz r2,56+16*4+15*8+12(r1) - lwz r0,56+16*4+15*8+16(r1) - mtxer r0 - lwz r0,56+16*4+15*8+4(r1) - mtcrf 0xff,r0 - mr r1,r3 - - // Reeintering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute next 68k opcode - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - - // Save address of EMUL_OP routine for 68k emulator patch -@3 mflr r0 - stw r0,XLM_EMUL_OP_PROC - - // Save stack pointer for EMUL_RETURN - stw r1,XLM_EMUL_RETURN_STACK - - // Preset registers for ROM boot routine - lis r3,0x40b0 // Pointer to ROM boot structure - ori r3,r3,0xd000 - - // 68k emulator is now active - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Jump to ROM - bctr -} - -void Start680x0(void) -{ - // Install interrupt signal handler - sigemptyset(&sigusr1_action.sa_mask); - sigusr1_action.sa_handler = (__signal_func_ptr)(sigusr1_handler); - sigusr1_action.sa_flags = 0; - sigusr1_action.sa_userdata = NULL; - sigaction(SIGUSR1, &sigusr1_action, NULL); - - // Install signal stack - set_signal_stack(malloc(SIG_STACK_SIZE), SIG_STACK_SIZE); - - // We're now ready to receive signals - ReadyForSignals = true; - - D(bug("Jumping to ROM\n")); - jump_to_rom(ROM_BASE + 0x310000); - D(bug("Returned from ROM\n")); - - // We're no longer ready to receive signals - ReadyForSignals = false; -} - - -/* - * Trigger interrupt - */ - -void TriggerInterrupt(void) -{ - idle_resume(); - if (emul_thread > 0 && ReadyForSignals) - send_signal(emul_thread, SIGUSR1); -} - -void TriggerNMI(void) -{ - //!! not implemented yet -} - - -/* - * Execute 68k subroutine - * r->a[7] and r->sr are unused! - */ - -static asm void execute_68k(register uint32 addr, register M68kRegisters *r) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stw r4,12(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) -#if SAVE_FP_EXEC_68K - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) -#endif - - // Set up registers for 68k emulator - lwz r31,XLM_KERNEL_DATA // Pointer to Kernel Data - addi r31,r31,0x1000 // points to Emulator Data - li r0,0 - mtcrf 0xff,r0 - creqv 11,11,11 // Supervisor mode - lwz r8,M68kRegisters.d[0](r4) - lwz r9,M68kRegisters.d[1](r4) - lwz r10,M68kRegisters.d[2](r4) - lwz r11,M68kRegisters.d[3](r4) - lwz r12,M68kRegisters.d[4](r4) - lwz r13,M68kRegisters.d[5](r4) - lwz r14,M68kRegisters.d[6](r4) - lwz r15,M68kRegisters.d[7](r4) - lwz r16,M68kRegisters.a[0](r4) - lwz r17,M68kRegisters.a[1](r4) - lwz r18,M68kRegisters.a[2](r4) - lwz r19,M68kRegisters.a[3](r4) - lwz r20,M68kRegisters.a[4](r4) - lwz r21,M68kRegisters.a[5](r4) - lwz r22,M68kRegisters.a[6](r4) - li r23,0 - mr r24,r3 - lwz r25,XLM_68K_R25 // MSB of SR - li r26,0 - li r28,0 // VBR - lwz r29,0x74(r31) // Pointer to opcode table - lwz r30,0x78(r31) // Address of emulator - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute 68k opcode - lha r27,0(r24) - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr -} - -void Execute68k(uint32 addr, M68kRegisters *r) -{ - uint16 proc[4] = {M68K_JSR, addr >> 16, addr & 0xffff, M68K_EXEC_RETURN}; - execute_68k((uint32)proc, r); -} - - -/* - * Execute MacOS 68k trap - * r->a[7] and r->sr are unused! - */ - -void Execute68kTrap(uint16 trap, struct M68kRegisters *r) -{ - uint16 proc[2] = {trap, M68K_EXEC_RETURN}; - execute_68k((uint32)proc, r); -} - - -/* - * USR1 handler - */ - -static void sigusr1_handler(int sig, void *arg, vregs *r) -{ - // Do nothing if interrupts are disabled - if ((*(int32 *)XLM_IRQ_NEST) > 0) - return; - - // 68k emulator active? Then trigger 68k interrupt level 1 - if (*(uint32 *)XLM_RUN_MODE == MODE_68K) { - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - r->cr |= kernel_data->v[0x674 >> 2]; - } -} diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 4a7f1a347..afb692b9e 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -92,17 +92,7 @@ void AddPrefsDefaults(void) PrefsAddBool("noclipconversion", false); PrefsAddBool("nogui", false); -#if USE_JIT - // JIT compiler specific options - PrefsAddBool("jit", true); - PrefsAddBool("jitfpu", true); - PrefsAddBool("jitdebug", false); - PrefsAddInt32("jitcachesize", 8192); - PrefsAddBool("jitlazyflush", true); - PrefsAddBool("jitinline", true); -#else PrefsAddBool("jit", false); -#endif PrefsAddInt32("keyboardtype", 5); } diff --git a/BasiliskII/src/rom_patches.cpp b/BasiliskII/src/rom_patches.cpp index db4041697..4b79f01c7 100644 --- a/BasiliskII/src/rom_patches.cpp +++ b/BasiliskII/src/rom_patches.cpp @@ -827,7 +827,7 @@ bool CheckROM(void) // Read version ROMVersion = ntohs(*(uint16 *)(ROMBaseHost + 8)); -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING // Real and direct addressing modes require a 32-bit clean ROM return ROMVersion == ROM_VERSION_32; #else @@ -1254,15 +1254,6 @@ static bool patch_rom_32(void) *wp++ = htons(0x0cea); *wp = htons(M68K_RTS); -#if REAL_ADDRESSING - // Move system zone to start of Mac RAM - wp = (uint16 *)(ROMBaseHost + 0x50a); - *wp++ = htons(HiWord(RAMBaseMac + 0x2000)); - *wp++ = htons(LoWord(RAMBaseMac + 0x2000)); - *wp++ = htons(HiWord(RAMBaseMac + 0x3800)); - *wp = htons(LoWord(RAMBaseMac + 0x3800)); -#endif - #if !ROM_IS_WRITE_PROTECTED #if defined(USE_SCRATCHMEM_SUBTERFUGE) // Set fake handle at 0x0000 to scratch memory area (so broken Mac programs won't write into Mac ROM) @@ -1277,20 +1268,6 @@ static bool patch_rom_32(void) #endif #endif -#if REAL_ADDRESSING && defined(AMIGA) - // Don't overwrite SysBase under AmigaOS - wp = (uint16 *)(ROMBaseHost + 0xccb4); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); -#endif - -#if REAL_ADDRESSING && !defined(AMIGA) - // gb-- Temporary hack to get rid of crashes in Speedometer - wp = (uint16 *)(ROMBaseHost + 0xdba2); - if (ntohs(*wp) == 0x662c) // bne.b #$2c - *wp = htons(0x602c); // bra.b #$2c -#endif - // Don't write to VIA in InitTimeMgr wp = (uint16 *)(ROMBaseHost + 0xb0e2); *wp++ = htons(0x4cdf); // movem.l (sp)+,d0-d5/a0-a4 diff --git a/BasiliskII/src/rsrc_patches.cpp b/BasiliskII/src/rsrc_patches.cpp index cdff157ee..5faeeb361 100644 --- a/BasiliskII/src/rsrc_patches.cpp +++ b/BasiliskII/src/rsrc_patches.cpp @@ -30,9 +30,6 @@ #include "audio_defs.h" #include "rsrc_patches.h" -#if ENABLE_MON -#include "mon.h" -#endif #define DEBUG 0 #include "debug.h" diff --git a/BasiliskII/src/slirp/COPYRIGHT b/BasiliskII/src/slirp/COPYRIGHT deleted file mode 100644 index b7d6568ea..000000000 --- a/BasiliskII/src/slirp/COPYRIGHT +++ /dev/null @@ -1,61 +0,0 @@ -Slirp was written by Danny Gasparovski. -Copyright (c), 1995,1996 All Rights Reserved. - -Slirp is maintained by Kelly Price - -Slirp is free software; "free" as in you don't have to pay for it, and you -are free to do whatever you want with it. I do not accept any donations, -monetary or otherwise, for Slirp. Instead, I would ask you to pass this -potential donation to your favorite charity. In fact, I encourage -*everyone* who finds Slirp useful to make a small donation to their -favorite charity (for example, GreenPeace). This is not a requirement, but -a suggestion from someone who highly values the service they provide. - -The copyright terms and conditions: - ----BEGIN--- - - Copyright (c) 1995,1996 Danny Gasparovski. All rights reserved. - - Redistribution and use in source and binary forms, with or without - modification, are permitted provided that the following conditions - are met: - 1. Redistributions of source code must retain the above copyright - notice, this list of conditions and the following disclaimer. - 2. Redistributions in binary form must reproduce the above copyright - notice, this list of conditions and the following disclaimer in the - documentation and/or other materials provided with the distribution. - - THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, - INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY - AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL - DANNY GASPAROVSKI OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, - INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT - NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, - DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY - THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT - (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF - THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. - ----END--- - -This basically means you can do anything you want with the software, except -1) call it your own, and 2) claim warranty on it. There is no warranty for -this software. None. Nada. If you lose a million dollars while using -Slirp, that's your loss not mine. So, ***USE AT YOUR OWN RISK!***. - -If these conditions cannot be met due to legal restrictions (E.g. where it -is against the law to give out Software without warranty), you must cease -using the software and delete all copies you have. - -Slirp uses code that is copyrighted by the following people/organizations: - -Juha Pirkola. -Gregory M. Christy. -The Regents of the University of California. -Carnegie Mellon University. -The Australian National University. -RSA Data Security, Inc. - -Please read the top of each source file for the details on the various -copyrights. diff --git a/BasiliskII/src/slirp/VERSION b/BasiliskII/src/slirp/VERSION deleted file mode 100644 index 353ad940d..000000000 --- a/BasiliskII/src/slirp/VERSION +++ /dev/null @@ -1 +0,0 @@ -qemu 0.9.0 (2007/02/05) diff --git a/BasiliskII/src/slirp/bootp.c b/BasiliskII/src/slirp/bootp.c deleted file mode 100644 index a51b80c95..000000000 --- a/BasiliskII/src/slirp/bootp.c +++ /dev/null @@ -1,242 +0,0 @@ -/* - * QEMU BOOTP/DHCP server - * - * Copyright (c) 2004 Fabrice Bellard - * - * 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 - * THE AUTHORS OR COPYRIGHT HOLDERS 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. - */ -#include - -/* XXX: only DHCP is supported */ - -#define NB_ADDR 16 - -#define START_ADDR 15 - -#define LEASE_TIME (24 * 3600) - -typedef struct { - uint8_t allocated; - uint8_t macaddr[6]; -} BOOTPClient; - -BOOTPClient bootp_clients[NB_ADDR]; - -static const uint8_t rfc1533_cookie[] = { RFC1533_COOKIE }; - -static BOOTPClient *get_new_addr(struct in_addr *paddr) -{ - BOOTPClient *bc; - int i; - - for(i = 0; i < NB_ADDR; i++) { - if (!bootp_clients[i].allocated) - goto found; - } - return NULL; - found: - bc = &bootp_clients[i]; - bc->allocated = 1; - paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); - return bc; -} - -static BOOTPClient *find_addr(struct in_addr *paddr, const uint8_t *macaddr) -{ - BOOTPClient *bc; - int i; - - for(i = 0; i < NB_ADDR; i++) { - if (!memcmp(macaddr, bootp_clients[i].macaddr, 6)) - goto found; - } - return NULL; - found: - bc = &bootp_clients[i]; - bc->allocated = 1; - paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); - return bc; -} - -static void dhcp_decode(const uint8_t *buf, int size, - int *pmsg_type) -{ - const uint8_t *p, *p_end; - int len, tag; - - *pmsg_type = 0; - - p = buf; - p_end = buf + size; - if (size < 5) - return; - if (memcmp(p, rfc1533_cookie, 4) != 0) - return; - p += 4; - while (p < p_end) { - tag = p[0]; - if (tag == RFC1533_PAD) { - p++; - } else if (tag == RFC1533_END) { - break; - } else { - p++; - if (p >= p_end) - break; - len = *p++; - - switch(tag) { - case RFC2132_MSG_TYPE: - if (len >= 1) - *pmsg_type = p[0]; - break; - default: - break; - } - p += len; - } - } -} - -static void bootp_reply(struct bootp_t *bp) -{ - BOOTPClient *bc; - struct mbuf *m; - struct bootp_t *rbp; - struct sockaddr_in saddr, daddr; - struct in_addr dns_addr; - int dhcp_msg_type, val; - uint8_t *q; - - /* extract exact DHCP msg type */ - dhcp_decode(bp->bp_vend, DHCP_OPT_LEN, &dhcp_msg_type); - - if (dhcp_msg_type == 0) - dhcp_msg_type = DHCPREQUEST; /* Force reply for old BOOTP clients */ - - if (dhcp_msg_type != DHCPDISCOVER && - dhcp_msg_type != DHCPREQUEST) - return; - /* XXX: this is a hack to get the client mac address */ - memcpy(client_ethaddr, bp->bp_hwaddr, 6); - - if ((m = m_get()) == NULL) - return; - m->m_data += if_maxlinkhdr; - rbp = (struct bootp_t *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - memset(rbp, 0, sizeof(struct bootp_t)); - - if (dhcp_msg_type == DHCPDISCOVER) { - new_addr: - bc = get_new_addr(&daddr.sin_addr); - if (!bc) - return; - memcpy(bc->macaddr, client_ethaddr, 6); - } else { - bc = find_addr(&daddr.sin_addr, bp->bp_hwaddr); - if (!bc) { - /* if never assigned, behaves as if it was already - assigned (windows fix because it remembers its address) */ - goto new_addr; - } - } - - saddr.sin_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_ALIAS); - saddr.sin_port = htons(BOOTP_SERVER); - - daddr.sin_port = htons(BOOTP_CLIENT); - - rbp->bp_op = BOOTP_REPLY; - rbp->bp_xid = bp->bp_xid; - rbp->bp_htype = 1; - rbp->bp_hlen = 6; - memcpy(rbp->bp_hwaddr, bp->bp_hwaddr, 6); - - rbp->bp_yiaddr = daddr.sin_addr; /* Client IP address */ - rbp->bp_siaddr = saddr.sin_addr; /* Server IP address */ - - q = rbp->bp_vend; - memcpy(q, rfc1533_cookie, 4); - q += 4; - - if (dhcp_msg_type == DHCPDISCOVER) { - *q++ = RFC2132_MSG_TYPE; - *q++ = 1; - *q++ = DHCPOFFER; - } else if (dhcp_msg_type == DHCPREQUEST) { - *q++ = RFC2132_MSG_TYPE; - *q++ = 1; - *q++ = DHCPACK; - } - - if (dhcp_msg_type == DHCPDISCOVER || - dhcp_msg_type == DHCPREQUEST) { - *q++ = RFC2132_SRV_ID; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_NETMASK; - *q++ = 4; - *q++ = 0xff; - *q++ = 0xff; - *q++ = 0xff; - *q++ = 0x00; - - *q++ = RFC1533_GATEWAY; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_DNS; - *q++ = 4; - dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); - memcpy(q, &dns_addr, 4); - q += 4; - - *q++ = RFC2132_LEASE_TIME; - *q++ = 4; - val = htonl(LEASE_TIME); - memcpy(q, &val, 4); - q += 4; - - if (*slirp_hostname) { - val = strlen(slirp_hostname); - *q++ = RFC1533_HOSTNAME; - *q++ = val; - memcpy(q, slirp_hostname, val); - q += val; - } - } - *q++ = RFC1533_END; - - m->m_len = sizeof(struct bootp_t) - - sizeof(struct ip) - sizeof(struct udphdr); - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); -} - -void bootp_input(struct mbuf *m) -{ - struct bootp_t *bp = mtod(m, struct bootp_t *); - - if (bp->bp_op == BOOTP_REQUEST) { - bootp_reply(bp); - } -} diff --git a/BasiliskII/src/slirp/bootp.h b/BasiliskII/src/slirp/bootp.h deleted file mode 100644 index 54a86ca22..000000000 --- a/BasiliskII/src/slirp/bootp.h +++ /dev/null @@ -1,121 +0,0 @@ -/* bootp/dhcp defines */ - -#define BOOTP_SERVER 67 -#define BOOTP_CLIENT 68 - -#define BOOTP_REQUEST 1 -#define BOOTP_REPLY 2 - -#define RFC1533_COOKIE 99, 130, 83, 99 -#define RFC1533_PAD 0 -#define RFC1533_NETMASK 1 -#define RFC1533_TIMEOFFSET 2 -#define RFC1533_GATEWAY 3 -#define RFC1533_TIMESERVER 4 -#define RFC1533_IEN116NS 5 -#define RFC1533_DNS 6 -#define RFC1533_LOGSERVER 7 -#define RFC1533_COOKIESERVER 8 -#define RFC1533_LPRSERVER 9 -#define RFC1533_IMPRESSSERVER 10 -#define RFC1533_RESOURCESERVER 11 -#define RFC1533_HOSTNAME 12 -#define RFC1533_BOOTFILESIZE 13 -#define RFC1533_MERITDUMPFILE 14 -#define RFC1533_DOMAINNAME 15 -#define RFC1533_SWAPSERVER 16 -#define RFC1533_ROOTPATH 17 -#define RFC1533_EXTENSIONPATH 18 -#define RFC1533_IPFORWARDING 19 -#define RFC1533_IPSOURCEROUTING 20 -#define RFC1533_IPPOLICYFILTER 21 -#define RFC1533_IPMAXREASSEMBLY 22 -#define RFC1533_IPTTL 23 -#define RFC1533_IPMTU 24 -#define RFC1533_IPMTUPLATEAU 25 -#define RFC1533_INTMTU 26 -#define RFC1533_INTLOCALSUBNETS 27 -#define RFC1533_INTBROADCAST 28 -#define RFC1533_INTICMPDISCOVER 29 -#define RFC1533_INTICMPRESPOND 30 -#define RFC1533_INTROUTEDISCOVER 31 -#define RFC1533_INTROUTESOLICIT 32 -#define RFC1533_INTSTATICROUTES 33 -#define RFC1533_LLTRAILERENCAP 34 -#define RFC1533_LLARPCACHETMO 35 -#define RFC1533_LLETHERNETENCAP 36 -#define RFC1533_TCPTTL 37 -#define RFC1533_TCPKEEPALIVETMO 38 -#define RFC1533_TCPKEEPALIVEGB 39 -#define RFC1533_NISDOMAIN 40 -#define RFC1533_NISSERVER 41 -#define RFC1533_NTPSERVER 42 -#define RFC1533_VENDOR 43 -#define RFC1533_NBNS 44 -#define RFC1533_NBDD 45 -#define RFC1533_NBNT 46 -#define RFC1533_NBSCOPE 47 -#define RFC1533_XFS 48 -#define RFC1533_XDM 49 - -#define RFC2132_REQ_ADDR 50 -#define RFC2132_LEASE_TIME 51 -#define RFC2132_MSG_TYPE 53 -#define RFC2132_SRV_ID 54 -#define RFC2132_PARAM_LIST 55 -#define RFC2132_MAX_SIZE 57 -#define RFC2132_RENEWAL_TIME 58 -#define RFC2132_REBIND_TIME 59 - -#define DHCPDISCOVER 1 -#define DHCPOFFER 2 -#define DHCPREQUEST 3 -#define DHCPACK 5 - -#define RFC1533_VENDOR_MAJOR 0 -#define RFC1533_VENDOR_MINOR 0 - -#define RFC1533_VENDOR_MAGIC 128 -#define RFC1533_VENDOR_ADDPARM 129 -#define RFC1533_VENDOR_ETHDEV 130 -#define RFC1533_VENDOR_HOWTO 132 -#define RFC1533_VENDOR_MNUOPTS 160 -#define RFC1533_VENDOR_SELECTION 176 -#define RFC1533_VENDOR_MOTD 184 -#define RFC1533_VENDOR_NUMOFMOTD 8 -#define RFC1533_VENDOR_IMG 192 -#define RFC1533_VENDOR_NUMOFIMG 16 - -#define RFC1533_END 255 -#define BOOTP_VENDOR_LEN 64 -#define DHCP_OPT_LEN 312 - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct bootp_t { - struct ip ip; - struct udphdr udp; - uint8_t bp_op; - uint8_t bp_htype; - uint8_t bp_hlen; - uint8_t bp_hops; - uint32_t bp_xid; - uint16_t bp_secs; - uint16_t unused; - struct in_addr bp_ciaddr; - struct in_addr bp_yiaddr; - struct in_addr bp_siaddr; - struct in_addr bp_giaddr; - uint8_t bp_hwaddr[16]; - uint8_t bp_sname[64]; - uint8_t bp_file[128]; - uint8_t bp_vend[DHCP_OPT_LEN]; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -void bootp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/cksum.c b/BasiliskII/src/slirp/cksum.c deleted file mode 100644 index 66d3f230a..000000000 --- a/BasiliskII/src/slirp/cksum.c +++ /dev/null @@ -1,137 +0,0 @@ -/* - * Copyright (c) 1988, 1992, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)in_cksum.c 8.1 (Berkeley) 6/10/93 - * in_cksum.c,v 1.2 1994/08/02 07:48:16 davidg Exp - */ - -#include - -/* - * Checksum routine for Internet Protocol family headers (Portable Version). - * - * This routine is very heavily used in the network - * code and should be modified for each CPU to be as fast as possible. - * - * XXX Since we will never span more than 1 mbuf, we can optimise this - */ - -#define ADDCARRY(x) (x > 65535 ? x -= 65535 : x) -#define REDUCE {l_util.l = sum; sum = l_util.s[0] + l_util.s[1]; ADDCARRY(sum);} - -int cksum(struct mbuf *m, int len) -{ - register u_int16_t *w; - register int sum = 0; - register int mlen = 0; - int byte_swapped = 0; - - union { - u_int8_t c[2]; - u_int16_t s; - } s_util; - union { - u_int16_t s[2]; - u_int32_t l; - } l_util; - - if (m->m_len == 0) - goto cont; - w = mtod(m, u_int16_t *); - - mlen = m->m_len; - - if (len < mlen) - mlen = len; - len -= mlen; - /* - * Force to even boundary. - */ - if ((1 & (long) w) && (mlen > 0)) { - REDUCE; - sum <<= 8; - s_util.c[0] = *(u_int8_t *)w; - w = (u_int16_t *)((int8_t *)w + 1); - mlen--; - byte_swapped = 1; - } - /* - * Unroll the loop to make overhead from - * branches &c small. - */ - while ((mlen -= 32) >= 0) { - sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; - sum += w[4]; sum += w[5]; sum += w[6]; sum += w[7]; - sum += w[8]; sum += w[9]; sum += w[10]; sum += w[11]; - sum += w[12]; sum += w[13]; sum += w[14]; sum += w[15]; - w += 16; - } - mlen += 32; - while ((mlen -= 8) >= 0) { - sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; - w += 4; - } - mlen += 8; - if (mlen == 0 && byte_swapped == 0) - goto cont; - REDUCE; - while ((mlen -= 2) >= 0) { - sum += *w++; - } - - if (byte_swapped) { - REDUCE; - sum <<= 8; - byte_swapped = 0; - if (mlen == -1) { - s_util.c[1] = *(u_int8_t *)w; - sum += s_util.s; - mlen = 0; - } else - - mlen = -1; - } else if (mlen == -1) - s_util.c[0] = *(u_int8_t *)w; - -cont: -#ifdef DEBUG - if (len) { - DEBUG_ERROR((dfd, "cksum: out of data\n")); - DEBUG_ERROR((dfd, " len = %d\n", len)); - } -#endif - if (mlen == -1) { - /* The last mbuf has odd # of bytes. Follow the - standard (the odd byte may be shifted left by 8 bits - or not as determined by endian-ness of the machine) */ - s_util.c[1] = 0; - sum += s_util.s; - } - REDUCE; - return (~sum & 0xffff); -} diff --git a/BasiliskII/src/slirp/ctl.h b/BasiliskII/src/slirp/ctl.h deleted file mode 100644 index 4a8576dc1..000000000 --- a/BasiliskII/src/slirp/ctl.h +++ /dev/null @@ -1,7 +0,0 @@ -#define CTL_CMD 0 -#define CTL_EXEC 1 -#define CTL_ALIAS 2 -#define CTL_DNS 3 - -#define CTL_SPECIAL "10.0.2.0" -#define CTL_LOCAL "10.0.2.15" diff --git a/BasiliskII/src/slirp/debug.c b/BasiliskII/src/slirp/debug.c deleted file mode 100644 index 916b9a8e0..000000000 --- a/BasiliskII/src/slirp/debug.c +++ /dev/null @@ -1,379 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * Portions copyright (c) 2000 Kelly Price. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -FILE *dfd = NULL; -#ifdef DEBUG -int dostats = 1; -#else -int dostats = 0; -#endif -int slirp_debug = 0; - -/* Carry over one item from main.c so that the tty's restored. - * Only done when the tty being used is /dev/tty --RedWolf */ -extern struct termios slirp_tty_settings; -extern int slirp_tty_restore; - - -void -debug_init(file, dbg) - char *file; - int dbg; -{ - /* Close the old debugging file */ - if (dfd) - fclose(dfd); - - dfd = fopen(file,"w"); - if (dfd != NULL) { -#if 0 - fprintf(dfd,"Slirp %s - Debugging Started.\n", SLIRP_VERSION); -#endif - fprintf(dfd,"Debugging Started level %i.\r\n",dbg); - fflush(dfd); - slirp_debug = dbg; - } else { - lprint("Error: Debugging file \"%s\" could not be opened: %s\r\n", - file, strerror(errno)); - } -} - -/* - * Dump a packet in the same format as tcpdump -x - */ -#ifdef DEBUG -void -dump_packet(dat, n) - void *dat; - int n; -{ - u_char *pptr = (u_char *)dat; - int j,k; - - n /= 16; - n++; - DEBUG_MISC((dfd, "PACKET DUMPED: \n")); - for(j = 0; j < n; j++) { - for(k = 0; k < 6; k++) - DEBUG_MISC((dfd, "%02x ", *pptr++)); - DEBUG_MISC((dfd, "\n")); - fflush(dfd); - } -} -#endif - -#if 0 -/* - * Statistic routines - * - * These will print statistics to the screen, the debug file (dfd), or - * a buffer, depending on "type", so that the stats can be sent over - * the link as well. - */ - -void -ttystats(ttyp) - struct ttys *ttyp; -{ - struct slirp_ifstats *is = &ttyp->ifstats; - char buff[512]; - - lprint(" \r\n"); - - if (if_comp & IF_COMPRESS) - strcpy(buff, "on"); - else if (if_comp & IF_NOCOMPRESS) - strcpy(buff, "off"); - else - strcpy(buff, "off (for now)"); - lprint("Unit %d:\r\n", ttyp->unit); - lprint(" using %s encapsulation (VJ compression is %s)\r\n", ( -#ifdef USE_PPP - ttyp->proto==PROTO_PPP?"PPP": -#endif - "SLIP"), buff); - lprint(" %d baudrate\r\n", ttyp->baud); - lprint(" interface is %s\r\n", ttyp->up?"up":"down"); - lprint(" using fd %d, guardian pid is %d\r\n", ttyp->fd, ttyp->pid); -#ifndef FULL_BOLT - lprint(" towrite is %d bytes\r\n", ttyp->towrite); -#endif - if (ttyp->zeros) - lprint(" %d zeros have been typed\r\n", ttyp->zeros); - else if (ttyp->ones) - lprint(" %d ones have been typed\r\n", ttyp->ones); - lprint("Interface stats:\r\n"); - lprint(" %6d output packets sent (%d bytes)\r\n", is->out_pkts, is->out_bytes); - lprint(" %6d output packets dropped (%d bytes)\r\n", is->out_errpkts, is->out_errbytes); - lprint(" %6d input packets received (%d bytes)\r\n", is->in_pkts, is->in_bytes); - lprint(" %6d input packets dropped (%d bytes)\r\n", is->in_errpkts, is->in_errbytes); - lprint(" %6d bad input packets\r\n", is->in_mbad); -} - -void -allttystats() -{ - struct ttys *ttyp; - - for (ttyp = ttys; ttyp; ttyp = ttyp->next) - ttystats(ttyp); -} -#endif - -void -ipstats() -{ - lprint(" \r\n"); - - lprint("IP stats:\r\n"); - lprint(" %6d total packets received (%d were unaligned)\r\n", - ipstat.ips_total, ipstat.ips_unaligned); - lprint(" %6d with incorrect version\r\n", ipstat.ips_badvers); - lprint(" %6d with bad header checksum\r\n", ipstat.ips_badsum); - lprint(" %6d with length too short (len < sizeof(iphdr))\r\n", ipstat.ips_tooshort); - lprint(" %6d with length too small (len < ip->len)\r\n", ipstat.ips_toosmall); - lprint(" %6d with bad header length\r\n", ipstat.ips_badhlen); - lprint(" %6d with bad packet length\r\n", ipstat.ips_badlen); - lprint(" %6d fragments received\r\n", ipstat.ips_fragments); - lprint(" %6d fragments dropped\r\n", ipstat.ips_fragdropped); - lprint(" %6d fragments timed out\r\n", ipstat.ips_fragtimeout); - lprint(" %6d packets reassembled ok\r\n", ipstat.ips_reassembled); - lprint(" %6d outgoing packets fragmented\r\n", ipstat.ips_fragmented); - lprint(" %6d total outgoing fragments\r\n", ipstat.ips_ofragments); - lprint(" %6d with bad protocol field\r\n", ipstat.ips_noproto); - lprint(" %6d total packets delivered\r\n", ipstat.ips_delivered); -} - -#if 0 -void -vjstats() -{ - lprint(" \r\n"); - - lprint("VJ compression stats:\r\n"); - - lprint(" %6d outbound packets (%d compressed)\r\n", - comp_s.sls_packets, comp_s.sls_compressed); - lprint(" %6d searches for connection stats (%d misses)\r\n", - comp_s.sls_searches, comp_s.sls_misses); - lprint(" %6d inbound uncompressed packets\r\n", comp_s.sls_uncompressedin); - lprint(" %6d inbound compressed packets\r\n", comp_s.sls_compressedin); - lprint(" %6d inbound unknown type packets\r\n", comp_s.sls_errorin); - lprint(" %6d inbound packets tossed due to error\r\n", comp_s.sls_tossed); -} -#endif - -void -tcpstats() -{ - lprint(" \r\n"); - - lprint("TCP stats:\r\n"); - - lprint(" %6d packets sent\r\n", tcpstat.tcps_sndtotal); - lprint(" %6d data packets (%d bytes)\r\n", - tcpstat.tcps_sndpack, tcpstat.tcps_sndbyte); - lprint(" %6d data packets retransmitted (%d bytes)\r\n", - tcpstat.tcps_sndrexmitpack, tcpstat.tcps_sndrexmitbyte); - lprint(" %6d ack-only packets (%d delayed)\r\n", - tcpstat.tcps_sndacks, tcpstat.tcps_delack); - lprint(" %6d URG only packets\r\n", tcpstat.tcps_sndurg); - lprint(" %6d window probe packets\r\n", tcpstat.tcps_sndprobe); - lprint(" %6d window update packets\r\n", tcpstat.tcps_sndwinup); - lprint(" %6d control (SYN/FIN/RST) packets\r\n", tcpstat.tcps_sndctrl); - lprint(" %6d times tcp_output did nothing\r\n", tcpstat.tcps_didnuttin); - - lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); - lprint(" %6d acks (for %d bytes)\r\n", - tcpstat.tcps_rcvackpack, tcpstat.tcps_rcvackbyte); - lprint(" %6d duplicate acks\r\n", tcpstat.tcps_rcvdupack); - lprint(" %6d acks for unsent data\r\n", tcpstat.tcps_rcvacktoomuch); - lprint(" %6d packets received in sequence (%d bytes)\r\n", - tcpstat.tcps_rcvpack, tcpstat.tcps_rcvbyte); - lprint(" %6d completely duplicate packets (%d bytes)\r\n", - tcpstat.tcps_rcvduppack, tcpstat.tcps_rcvdupbyte); - - lprint(" %6d packets with some duplicate data (%d bytes duped)\r\n", - tcpstat.tcps_rcvpartduppack, tcpstat.tcps_rcvpartdupbyte); - lprint(" %6d out-of-order packets (%d bytes)\r\n", - tcpstat.tcps_rcvoopack, tcpstat.tcps_rcvoobyte); - lprint(" %6d packets of data after window (%d bytes)\r\n", - tcpstat.tcps_rcvpackafterwin, tcpstat.tcps_rcvbyteafterwin); - lprint(" %6d window probes\r\n", tcpstat.tcps_rcvwinprobe); - lprint(" %6d window update packets\r\n", tcpstat.tcps_rcvwinupd); - lprint(" %6d packets received after close\r\n", tcpstat.tcps_rcvafterclose); - lprint(" %6d discarded for bad checksums\r\n", tcpstat.tcps_rcvbadsum); - lprint(" %6d discarded for bad header offset fields\r\n", - tcpstat.tcps_rcvbadoff); - - lprint(" %6d connection requests\r\n", tcpstat.tcps_connattempt); - lprint(" %6d connection accepts\r\n", tcpstat.tcps_accepts); - lprint(" %6d connections established (including accepts)\r\n", tcpstat.tcps_connects); - lprint(" %6d connections closed (including %d drop)\r\n", - tcpstat.tcps_closed, tcpstat.tcps_drops); - lprint(" %6d embryonic connections dropped\r\n", tcpstat.tcps_conndrops); - lprint(" %6d segments we tried to get rtt (%d succeeded)\r\n", - tcpstat.tcps_segstimed, tcpstat.tcps_rttupdated); - lprint(" %6d retransmit timeouts\r\n", tcpstat.tcps_rexmttimeo); - lprint(" %6d connections dropped by rxmt timeout\r\n", - tcpstat.tcps_timeoutdrop); - lprint(" %6d persist timeouts\r\n", tcpstat.tcps_persisttimeo); - lprint(" %6d keepalive timeouts\r\n", tcpstat.tcps_keeptimeo); - lprint(" %6d keepalive probes sent\r\n", tcpstat.tcps_keepprobe); - lprint(" %6d connections dropped by keepalive\r\n", tcpstat.tcps_keepdrops); - lprint(" %6d correct ACK header predictions\r\n", tcpstat.tcps_predack); - lprint(" %6d correct data packet header predictions\n", tcpstat.tcps_preddat); - lprint(" %6d TCP cache misses\r\n", tcpstat.tcps_socachemiss); - - -/* lprint(" Packets received too short: %d\r\n", tcpstat.tcps_rcvshort); */ -/* lprint(" Segments dropped due to PAWS: %d\r\n", tcpstat.tcps_pawsdrop); */ - -} - -void -udpstats() -{ - lprint(" \r\n"); - - lprint("UDP stats:\r\n"); - lprint(" %6d datagrams received\r\n", udpstat.udps_ipackets); - lprint(" %6d with packets shorter than header\r\n", udpstat.udps_hdrops); - lprint(" %6d with bad checksums\r\n", udpstat.udps_badsum); - lprint(" %6d with data length larger than packet\r\n", udpstat.udps_badlen); - lprint(" %6d UDP socket cache misses\r\n", udpstat.udpps_pcbcachemiss); - lprint(" %6d datagrams sent\r\n", udpstat.udps_opackets); -} - -void -icmpstats() -{ - lprint(" \r\n"); - lprint("ICMP stats:\r\n"); - lprint(" %6d ICMP packets received\r\n", icmpstat.icps_received); - lprint(" %6d were too short\r\n", icmpstat.icps_tooshort); - lprint(" %6d with bad checksums\r\n", icmpstat.icps_checksum); - lprint(" %6d with type not supported\r\n", icmpstat.icps_notsupp); - lprint(" %6d with bad type feilds\r\n", icmpstat.icps_badtype); - lprint(" %6d ICMP packets sent in reply\r\n", icmpstat.icps_reflect); -} - -void -mbufstats() -{ - struct mbuf *m; - int i; - - lprint(" \r\n"); - - lprint("Mbuf stats:\r\n"); - - lprint(" %6d mbufs allocated (%d max)\r\n", mbuf_alloced, mbuf_max); - - i = 0; - for (m = m_freelist.m_next; m != &m_freelist; m = m->m_next) - i++; - lprint(" %6d mbufs on free list\r\n", i); - - i = 0; - for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) - i++; - lprint(" %6d mbufs on used list\r\n", i); - lprint(" %6d mbufs queued as packets\r\n\r\n", if_queued); -} - -void -sockstats() -{ - char addr[INET_ADDRSTRLEN]; - char buff[256]; - int n; - struct socket *so; - - lprint(" \r\n"); - - lprint( - "Proto[state] Sock Local Address, Port Remote Address, Port RecvQ SendQ\r\n"); - - for (so = tcb.so_next; so != &tcb; so = so->so_next) { - - n = sprintf(buff, "tcp[%s]", so->so_tcpcb?tcpstates[so->so_tcpcb->t_state]:"NONE"); - while (n < 17) - buff[n++] = ' '; - buff[17] = 0; - lprint("%s %3d %15s %5d ", - buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); - lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), - so->so_rcv.sb_cc, so->so_snd.sb_cc); - } - - for (so = udb.so_next; so != &udb; so = so->so_next) { - - n = sprintf(buff, "udp[%d sec]", (so->so_expire - curtime) / 1000); - while (n < 17) - buff[n++] = ' '; - buff[17] = 0; - lprint("%s %3d %15s %5d ", - buff, so->s, - inet_ntop(AF_INET, &so->so_laddr, addr, sizeof(addr)), - ntohs(so->so_lport)); - lprint("%15s %5d %5d %5d\r\n", - inet_ntop(AF_INET, &so->so_faddr, addr, sizeof(addr)), - ntohs(so->so_fport), - so->so_rcv.sb_cc, so->so_snd.sb_cc); - } -} - -#if 0 -void -slirp_exit(exit_status) - int exit_status; -{ - struct ttys *ttyp; - - DEBUG_CALL("slirp_exit"); - DEBUG_ARG("exit_status = %d", exit_status); - - if (dostats) { - lprint_print = (int (*) _P((void *, const char *, va_list)))vfprintf; - if (!dfd) - debug_init("slirp_stats", 0xf); - lprint_arg = (char **)&dfd; - - ipstats(); - tcpstats(); - udpstats(); - icmpstats(); - mbufstats(); - sockstats(); - allttystats(); - vjstats(); - } - - for (ttyp = ttys; ttyp; ttyp = ttyp->next) - tty_detached(ttyp, 1); - - if (slirp_forked) { - /* Menendez time */ - if (kill(getppid(), SIGQUIT) < 0) - lprint("Couldn't kill parent process %ld!\n", - (long) getppid()); - } - - /* Restore the terminal if we gotta */ - if(slirp_tty_restore) - tcsetattr(0,TCSANOW, &slirp_tty_settings); /* NOW DAMMIT! */ - exit(exit_status); -} -#endif diff --git a/BasiliskII/src/slirp/debug.h b/BasiliskII/src/slirp/debug.h deleted file mode 100644 index c5d42195e..000000000 --- a/BasiliskII/src/slirp/debug.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define PRN_STDERR 1 -#define PRN_SPRINTF 2 - -extern FILE *dfd; -extern FILE *lfd; -extern int dostats; -extern int slirp_debug; - -#define DBG_CALL 0x1 -#define DBG_MISC 0x2 -#define DBG_ERROR 0x4 -#define DEBUG_DEFAULT DBG_CALL|DBG_MISC|DBG_ERROR - -#ifdef DEBUG -#define DEBUG_CALL(x) if (slirp_debug & DBG_CALL) { fprintf(dfd, "%s...\n", x); fflush(dfd); } -#define DEBUG_ARG(x, y) if (slirp_debug & DBG_CALL) { fputc(' ', dfd); fprintf(dfd, x, y); fputc('\n', dfd); fflush(dfd); } -#define DEBUG_ARGS(x) if (slirp_debug & DBG_CALL) { fprintf x ; fflush(dfd); } -#define DEBUG_MISC(x) if (slirp_debug & DBG_MISC) { fprintf x ; fflush(dfd); } -#define DEBUG_ERROR(x) if (slirp_debug & DBG_ERROR) {fprintf x ; fflush(dfd); } - - -#else - -#define DEBUG_CALL(x) -#define DEBUG_ARG(x, y) -#define DEBUG_ARGS(x) -#define DEBUG_MISC(x) -#define DEBUG_ERROR(x) - -#endif - -void debug_init(char *, int); -//void ttystats(struct ttys *); -void allttystats(void); -void ipstats(void); -void vjstats(void); -void tcpstats(void); -void udpstats(void); -void icmpstats(void); -void mbufstats(void); -void sockstats(void); -void slirp_exit(int); - diff --git a/BasiliskII/src/slirp/icmp_var.h b/BasiliskII/src/slirp/icmp_var.h deleted file mode 100644 index 9af222fb7..000000000 --- a/BasiliskII/src/slirp/icmp_var.h +++ /dev/null @@ -1,65 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)icmp_var.h 8.1 (Berkeley) 6/10/93 - * icmp_var.h,v 1.4 1995/02/16 00:27:40 wollman Exp - */ - -#ifndef _NETINET_ICMP_VAR_H_ -#define _NETINET_ICMP_VAR_H_ - -/* - * Variables related to this implementation - * of the internet control message protocol. - */ -struct icmpstat { -/* statistics related to input messages processed */ - u_long icps_received; /* #ICMP packets received */ - u_long icps_tooshort; /* packet < ICMP_MINLEN */ - u_long icps_checksum; /* bad checksum */ - u_long icps_notsupp; /* #ICMP packets not supported */ - u_long icps_badtype; /* #with bad type feild */ - u_long icps_reflect; /* number of responses */ -}; - -/* - * Names for ICMP sysctl objects - */ -#define ICMPCTL_MASKREPL 1 /* allow replies to netmask requests */ -#define ICMPCTL_STATS 2 /* statistics (read-only) */ -#define ICMPCTL_MAXID 3 - -#define ICMPCTL_NAMES { \ - { 0, 0 }, \ - { "maskrepl", CTLTYPE_INT }, \ - { "stats", CTLTYPE_STRUCT }, \ -} - -extern struct icmpstat icmpstat; - -#endif diff --git a/BasiliskII/src/slirp/if.c b/BasiliskII/src/slirp/if.c deleted file mode 100644 index 9185dcf65..000000000 --- a/BasiliskII/src/slirp/if.c +++ /dev/null @@ -1,323 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -size_t if_mtu, if_mru; -int if_comp; -int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ - -struct mbuf if_fastq; /* fast queue (for interactive data) */ -struct mbuf if_batchq; /* queue for non-interactive data */ -struct mbuf *next_m; /* Pointer to next mbuf to output */ - -#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) - -void -ifs_insque(ifm, ifmhead) - struct mbuf *ifm, *ifmhead; -{ - ifm->ifs_next = ifmhead->ifs_next; - ifmhead->ifs_next = ifm; - ifm->ifs_prev = ifmhead; - ifm->ifs_next->ifs_prev = ifm; -} - -void -ifs_remque(ifm) - struct mbuf *ifm; -{ - ifm->ifs_prev->ifs_next = ifm->ifs_next; - ifm->ifs_next->ifs_prev = ifm->ifs_prev; -} - -void -if_init() -{ -#if 0 - /* - * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, - * and 8 bytes for PPP, but need to have it on an 8byte boundary - */ -#ifdef USE_PPP - if_maxlinkhdr = 48; -#else - if_maxlinkhdr = 40; -#endif -#else - /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ - if_maxlinkhdr = 2 + 14 + 40; -#endif - if_mtu = 1500; - if_mru = 1500; - if_comp = IF_AUTOCOMP; - if_fastq.ifq_next = if_fastq.ifq_prev = &if_fastq; - if_batchq.ifq_next = if_batchq.ifq_prev = &if_batchq; - // sl_compress_init(&comp_s); - next_m = &if_batchq; -} - -#if 0 -/* - * This shouldn't be needed since the modem is blocking and - * we don't expect any signals, but what the hell.. - */ -inline int -writen(fd, bptr, n) - int fd; - char *bptr; - int n; -{ - int ret; - int total; - - /* This should succeed most of the time */ - ret = send(fd, bptr, n,0); - if (ret == n || ret <= 0) - return ret; - - /* Didn't write everything, go into the loop */ - total = ret; - while (n > total) { - ret = send(fd, bptr+total, n-total,0); - if (ret <= 0) - return ret; - total += ret; - } - return total; -} - -/* - * if_input - read() the tty, do "top level" processing (ie: check for any escapes), - * and pass onto (*ttyp->if_input) - * - * XXXXX Any zeros arriving by themselves are NOT placed into the arriving packet. - */ -#define INBUFF_SIZE 2048 /* XXX */ -void -if_input(ttyp) - struct ttys *ttyp; -{ - u_char if_inbuff[INBUFF_SIZE]; - int if_n; - - DEBUG_CALL("if_input"); - DEBUG_ARG("ttyp = %lx", (long)ttyp); - - if_n = recv(ttyp->fd, (char *)if_inbuff, INBUFF_SIZE,0); - - DEBUG_MISC((dfd, " read %d bytes\n", if_n)); - - if (if_n <= 0) { - int error = WSAGetLastError(); - if (if_n == 0 || (error != WSAEINTR && error != EAGAIN)) { - if (ttyp->up) - link_up--; - tty_detached(ttyp, 0); - } - return; - } - if (if_n == 1) { - if (*if_inbuff == '0') { - ttyp->ones = 0; - if (++ttyp->zeros >= 5) - slirp_exit(0); - return; - } - if (*if_inbuff == '1') { - ttyp->zeros = 0; - if (++ttyp->ones >= 5) - tty_detached(ttyp, 0); - return; - } - } - ttyp->ones = ttyp->zeros = 0; - - (*ttyp->if_input)(ttyp, if_inbuff, if_n); -} -#endif - -/* - * if_output: Queue packet into an output queue. - * There are 2 output queue's, if_fastq and if_batchq. - * Each output queue is a doubly linked list of double linked lists - * of mbufs, each list belonging to one "session" (socket). This - * way, we can output packets fairly by sending one packet from each - * session, instead of all the packets from one session, then all packets - * from the next session, etc. Packets on the if_fastq get absolute - * priority, but if one session hogs the link, it gets "downgraded" - * to the batchq until it runs out of packets, then it'll return - * to the fastq (eg. if the user does an ls -alR in a telnet session, - * it'll temporarily get downgraded to the batchq) - */ -void -if_output(so, ifm) - struct socket *so; - struct mbuf *ifm; -{ - struct mbuf *ifq; - int on_fastq = 1; - - DEBUG_CALL("if_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("ifm = %lx", (long)ifm); - - /* - * First remove the mbuf from m_usedlist, - * since we're gonna use m_next and m_prev ourselves - * XXX Shouldn't need this, gotta change dtom() etc. - */ - if (ifm->m_flags & M_USEDLIST) { - remque(ifm); - ifm->m_flags &= ~M_USEDLIST; - } - - /* - * See if there's already a batchq list for this session. - * This can include an interactive session, which should go on fastq, - * but gets too greedy... hence it'll be downgraded from fastq to batchq. - * We mustn't put this packet back on the fastq (or we'll send it out of order) - * XXX add cache here? - */ - for (ifq = if_batchq.ifq_prev; ifq != &if_batchq; ifq = ifq->ifq_prev) { - if (so == ifq->ifq_so) { - /* A match! */ - ifm->ifq_so = so; - ifs_insque(ifm, ifq->ifs_prev); - goto diddit; - } - } - - /* No match, check which queue to put it on */ - if (so && (so->so_iptos & IPTOS_LOWDELAY)) { - ifq = if_fastq.ifq_prev; - on_fastq = 1; - /* - * Check if this packet is a part of the last - * packet's session - */ - if (ifq->ifq_so == so) { - ifm->ifq_so = so; - ifs_insque(ifm, ifq->ifs_prev); - goto diddit; - } - } else - ifq = if_batchq.ifq_prev; - - /* Create a new doubly linked list for this session */ - ifm->ifq_so = so; - ifs_init(ifm); - insque(ifm, ifq); - -diddit: - ++if_queued; - - if (so) { - /* Update *_queued */ - so->so_queued++; - so->so_nqueued++; - /* - * Check if the interactive session should be downgraded to - * the batchq. A session is downgraded if it has queued 6 - * packets without pausing, and at least 3 of those packets - * have been sent over the link - * (XXX These are arbitrary numbers, probably not optimal..) - */ - if (on_fastq && ((so->so_nqueued >= 6) && - (so->so_nqueued - so->so_queued) >= 3)) { - - /* Remove from current queue... */ - remque(ifm->ifs_next); - - /* ...And insert in the new. That'll teach ya! */ - insque(ifm->ifs_next, &if_batchq); - } - } - -#ifndef FULL_BOLT - /* - * This prevents us from malloc()ing too many mbufs - */ - if (link_up) { - /* if_start will check towrite */ - if_start(); - } -#endif -} - -/* - * Send a packet - * We choose a packet based on it's position in the output queues; - * If there are packets on the fastq, they are sent FIFO, before - * everything else. Otherwise we choose the first packet from the - * batchq and send it. the next packet chosen will be from the session - * after this one, then the session after that one, and so on.. So, - * for example, if there are 3 ftp session's fighting for bandwidth, - * one packet will be sent from the first session, then one packet - * from the second session, then one packet from the third, then back - * to the first, etc. etc. - */ -void -if_start(void) -{ - struct mbuf *ifm, *ifqt; - - DEBUG_CALL("if_start"); - - if (if_queued == 0) - return; /* Nothing to do */ - - again: - /* check if we can really output */ - if (!slirp_can_output()) - return; - - /* - * See which queue to get next packet from - * If there's something in the fastq, select it immediately - */ - if (if_fastq.ifq_next != &if_fastq) { - ifm = if_fastq.ifq_next; - } else { - /* Nothing on fastq, see if next_m is valid */ - if (next_m != &if_batchq) - ifm = next_m; - else - ifm = if_batchq.ifq_next; - - /* Set which packet to send on next iteration */ - next_m = ifm->ifq_next; - } - /* Remove it from the queue */ - ifqt = ifm->ifq_prev; - remque(ifm); - --if_queued; - - /* If there are more packets for this session, re-queue them */ - if (ifm->ifs_next != /* ifm->ifs_prev != */ ifm) { - insque(ifm->ifs_next, ifqt); - ifs_remque(ifm); - } - - /* Update so_queued */ - if (ifm->ifq_so) { - if (--ifm->ifq_so->so_queued == 0) - /* If there's no more queued, reset nqueued */ - ifm->ifq_so->so_nqueued = 0; - } - - /* Encapsulate the packet for sending */ - if_encap((uint8_t*)ifm->m_data, ifm->m_len); - - m_free(ifm); - - if (if_queued) - goto again; -} diff --git a/BasiliskII/src/slirp/if.h b/BasiliskII/src/slirp/if.h deleted file mode 100644 index a2564ab1d..000000000 --- a/BasiliskII/src/slirp/if.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _IF_H_ -#define _IF_H_ - -#define IF_COMPRESS 0x01 /* We want compression */ -#define IF_NOCOMPRESS 0x02 /* Do not do compression */ -#define IF_AUTOCOMP 0x04 /* Autodetect (default) */ -#define IF_NOCIDCOMP 0x08 /* CID compression */ - -/* Needed for FreeBSD */ -#undef if_mtu -extern size_t if_mtu; -extern size_t if_mru; /* MTU and MRU */ -extern int if_comp; /* Flags for compression */ -extern int if_maxlinkhdr; -extern int if_queued; /* Number of packets queued so far */ -extern int if_thresh; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ - -extern struct mbuf if_fastq; /* fast queue (for interactive data) */ -extern struct mbuf if_batchq; /* queue for non-interactive data */ -extern struct mbuf *next_m; - -#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) - -/* Interface statistics */ -struct slirp_ifstats { - u_int out_pkts; /* Output packets */ - u_int out_bytes; /* Output bytes */ - u_int out_errpkts; /* Output Error Packets */ - u_int out_errbytes; /* Output Error Bytes */ - u_int in_pkts; /* Input packets */ - u_int in_bytes; /* Input bytes */ - u_int in_errpkts; /* Input Error Packets */ - u_int in_errbytes; /* Input Error Bytes */ - - u_int bytes_saved; /* Number of bytes that compression "saved" */ - /* ie: number of bytes that didn't need to be sent over the link - * because of compression */ - - u_int in_mbad; /* Bad incoming packets */ -}; - -#endif diff --git a/BasiliskII/src/slirp/ip.h b/BasiliskII/src/slirp/ip.h deleted file mode 100644 index e0c7de967..000000000 --- a/BasiliskII/src/slirp/ip.h +++ /dev/null @@ -1,333 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip.h 8.1 (Berkeley) 6/10/93 - * ip.h,v 1.3 1994/08/21 05:27:30 paul Exp - */ - -#ifndef _IP_H_ -#define _IP_H_ - -#ifdef WORDS_BIGENDIAN -# ifndef NTOHL -# define NTOHL(d) -# endif -# ifndef NTOHS -# define NTOHS(d) -# endif -# ifndef HTONL -# define HTONL(d) -# endif -# ifndef HTONS -# define HTONS(d) -# endif -#else -# ifndef NTOHL -# define NTOHL(d) ((d) = ntohl((d))) -# endif -# ifndef NTOHS -# define NTOHS(d) ((d) = ntohs((u_int16_t)(d))) -# endif -# ifndef HTONL -# define HTONL(d) ((d) = htonl((d))) -# endif -# ifndef HTONS -# define HTONS(d) ((d) = htons((u_int16_t)(d))) -# endif -#endif - -typedef u_int32_t n_long; /* long as received from the net */ - -/* - * Definitions for internet protocol version 4. - * Per RFC 791, September 1981. - */ -#define IPVERSION 4 - -/* - * Structure of an internet header, naked of options. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ip { -#ifdef WORDS_BIGENDIAN - u_char ip_v:4, /* version */ - ip_hl:4; /* header length */ -#else - u_char ip_hl:4, /* header length */ - ip_v:4; /* version */ -#endif - u_int8_t ip_tos; /* type of service */ - u_int16_t ip_len; /* total length */ - u_int16_t ip_id; /* identification */ - u_int16_t ip_off; /* fragment offset field */ -#define IP_DF 0x4000 /* don't fragment flag */ -#define IP_MF 0x2000 /* more fragments flag */ -#define IP_OFFMASK 0x1fff /* mask for fragmenting bits */ - u_int8_t ip_ttl; /* time to live */ - u_int8_t ip_p; /* protocol */ - u_int16_t ip_sum; /* checksum */ - struct in_addr ip_src,ip_dst; /* source and dest address */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -#define IP_MAXPACKET 65535 /* maximum packet size */ - -/* - * Definitions for IP type of service (ip_tos) - */ -#define IPTOS_LOWDELAY 0x10 -#define IPTOS_THROUGHPUT 0x08 -#define IPTOS_RELIABILITY 0x04 - -/* - * Definitions for options. - */ -#define IPOPT_COPIED(o) ((o)&0x80) -#define IPOPT_CLASS(o) ((o)&0x60) -#define IPOPT_NUMBER(o) ((o)&0x1f) - -#define IPOPT_CONTROL 0x00 -#define IPOPT_RESERVED1 0x20 -#define IPOPT_DEBMEAS 0x40 -#define IPOPT_RESERVED2 0x60 - -#define IPOPT_EOL 0 /* end of option list */ -#define IPOPT_NOP 1 /* no operation */ - -#define IPOPT_RR 7 /* record packet route */ -#define IPOPT_TS 68 /* timestamp */ -#define IPOPT_SECURITY 130 /* provide s,c,h,tcc */ -#define IPOPT_LSRR 131 /* loose source route */ -#define IPOPT_SATID 136 /* satnet id */ -#define IPOPT_SSRR 137 /* strict source route */ - -/* - * Offsets to fields in options other than EOL and NOP. - */ -#define IPOPT_OPTVAL 0 /* option ID */ -#define IPOPT_OLEN 1 /* option length */ -#define IPOPT_OFFSET 2 /* offset within option */ -#define IPOPT_MINOFF 4 /* min value of above */ - -/* - * Time stamp option structure. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ip_timestamp { - u_int8_t ipt_code; /* IPOPT_TS */ - u_int8_t ipt_len; /* size of structure (variable) */ - u_int8_t ipt_ptr; /* index of current entry */ -#ifdef WORDS_BIGENDIAN - u_char ipt_oflw:4, /* overflow counter */ - ipt_flg:4; /* flags, see below */ -#else - u_char ipt_flg:4, /* flags, see below */ - ipt_oflw:4; /* overflow counter */ -#endif - union ipt_timestamp { - n_long ipt_time[1]; - struct ipt_ta { - struct in_addr ipt_addr; - n_long ipt_time; - } ipt_ta[1]; - } ipt_timestamp; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -/* flag bits for ipt_flg */ -#define IPOPT_TS_TSONLY 0 /* timestamps only */ -#define IPOPT_TS_TSANDADDR 1 /* timestamps and addresses */ -#define IPOPT_TS_PRESPEC 3 /* specified modules only */ - -/* bits for security (not byte swapped) */ -#define IPOPT_SECUR_UNCLASS 0x0000 -#define IPOPT_SECUR_CONFID 0xf135 -#define IPOPT_SECUR_EFTO 0x789a -#define IPOPT_SECUR_MMMM 0xbc4d -#define IPOPT_SECUR_RESTR 0xaf13 -#define IPOPT_SECUR_SECRET 0xd788 -#define IPOPT_SECUR_TOPSECRET 0x6bc5 - -/* - * Internet implementation parameters. - */ -#define MAXTTL 255 /* maximum time to live (seconds) */ -#define IPDEFTTL 64 /* default ttl, from RFC 1340 */ -#define IPFRAGTTL 60 /* time to live for frags, slowhz */ -#define IPTTLDEC 1 /* subtracted when forwarding */ - -#define IP_MSS 576 /* default maximum segment size */ - -#ifdef HAVE_SYS_TYPES32_H /* Overcome some Solaris 2.x junk */ -#include -#else -#if SIZEOF_CHAR_P == 4 -typedef caddr_t caddr32_t; -#else -typedef u_int32_t caddr32_t; -#endif -#endif - -#if SIZEOF_CHAR_P == 4 -typedef struct ipq *ipqp_32; -typedef struct ipasfrag *ipasfragp_32; -#else -typedef caddr32_t ipqp_32; -typedef caddr32_t ipasfragp_32; -#endif - -/* - * Overlay for ip header used by other protocols (tcp, udp). - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ipovly { - caddr32_t ih_next, ih_prev; /* for protocol sequence q's */ - u_int8_t ih_x1; /* (unused) */ - u_int8_t ih_pr; /* protocol */ - u_int16_t ih_len; /* protocol length */ - struct in_addr ih_src; /* source internet address */ - struct in_addr ih_dst; /* destination internet address */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -/* - * Ip reassembly queue structure. Each fragment - * being reassembled is attached to one of these structures. - * They are timed out after ipq_ttl drops to 0, and may also - * be reclaimed if memory becomes tight. - * size 28 bytes - */ -struct ipq { - ipqp_32 next,prev; /* to other reass headers */ - u_int8_t ipq_ttl; /* time for reass q to live */ - u_int8_t ipq_p; /* protocol of this fragment */ - u_int16_t ipq_id; /* sequence id for reassembly */ - ipasfragp_32 ipq_next,ipq_prev; - /* to ip headers of fragments */ - struct in_addr ipq_src,ipq_dst; -}; - -/* - * Ip header, when holding a fragment. - * - * Note: ipf_next must be at same offset as ipq_next above - */ -struct ipasfrag { -#ifdef WORDS_BIGENDIAN - u_char ip_v:4, - ip_hl:4; -#else - u_char ip_hl:4, - ip_v:4; -#endif - /* BUG : u_int changed to u_int8_t. - * sizeof(u_int)==4 on linux 2.0 - */ - u_int8_t ipf_mff; /* XXX overlays ip_tos: use low bit - * to avoid destroying tos (PPPDTRuu); - * copied from (ip_off&IP_MF) */ - u_int16_t ip_len; - u_int16_t ip_id; - u_int16_t ip_off; - u_int8_t ip_ttl; - u_int8_t ip_p; - u_int16_t ip_sum; - ipasfragp_32 ipf_next; /* next fragment */ - ipasfragp_32 ipf_prev; /* previous fragment */ -}; - -/* - * Structure stored in mbuf in inpcb.ip_options - * and passed to ip_output when ip options are in use. - * The actual length of the options (including ipopt_dst) - * is in m_len. - */ -#define MAX_IPOPTLEN 40 - -struct ipoption { - struct in_addr ipopt_dst; /* first-hop dst if source routed */ - int8_t ipopt_list[MAX_IPOPTLEN]; /* options proper */ -}; - -/* - * Structure attached to inpcb.ip_moptions and - * passed to ip_output when IP multicast options are in use. - */ - -struct ipstat { - u_long ips_total; /* total packets received */ - u_long ips_badsum; /* checksum bad */ - u_long ips_tooshort; /* packet too short */ - u_long ips_toosmall; /* not enough data */ - u_long ips_badhlen; /* ip header length < data size */ - u_long ips_badlen; /* ip length < ip header length */ - u_long ips_fragments; /* fragments received */ - u_long ips_fragdropped; /* frags dropped (dups, out of space) */ - u_long ips_fragtimeout; /* fragments timed out */ - u_long ips_forward; /* packets forwarded */ - u_long ips_cantforward; /* packets rcvd for unreachable dest */ - u_long ips_redirectsent; /* packets forwarded on same net */ - u_long ips_noproto; /* unknown or unsupported protocol */ - u_long ips_delivered; /* datagrams delivered to upper level*/ - u_long ips_localout; /* total ip packets generated here */ - u_long ips_odropped; /* lost packets due to nobufs, etc. */ - u_long ips_reassembled; /* total packets reassembled ok */ - u_long ips_fragmented; /* datagrams successfully fragmented */ - u_long ips_ofragments; /* output fragments created */ - u_long ips_cantfrag; /* don't fragment flag was set, etc. */ - u_long ips_badoptions; /* error in option processing */ - u_long ips_noroute; /* packets discarded due to no route */ - u_long ips_badvers; /* ip version != 4 */ - u_long ips_rawout; /* total raw ip packets generated */ - u_long ips_unaligned; /* times the ip packet was not aligned */ -}; - -extern struct ipstat ipstat; -extern struct ipq ipq; /* ip reass. queue */ -extern u_int16_t ip_id; /* ip packet ctr, for ids */ -extern int ip_defttl; /* default IP ttl */ - -#endif diff --git a/BasiliskII/src/slirp/ip_icmp.c b/BasiliskII/src/slirp/ip_icmp.c deleted file mode 100644 index 75a4614a5..000000000 --- a/BasiliskII/src/slirp/ip_icmp.c +++ /dev/null @@ -1,371 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_icmp.c 8.2 (Berkeley) 1/4/94 - * ip_icmp.c,v 1.7 1995/05/30 08:09:42 rgrimes Exp - */ - -#include "slirp.h" -#include "ip_icmp.h" - -struct icmpstat icmpstat; - -/* The message sent when emulating PING */ -/* Be nice and tell them it's just a psuedo-ping packet */ -char icmp_ping_msg[] = "This is a psuedo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; - -/* list of actions for icmp_error() on RX of an icmp message */ -static int icmp_flush[19] = { -/* ECHO REPLY (0) */ 0, - 1, - 1, -/* DEST UNREACH (3) */ 1, -/* SOURCE QUENCH (4)*/ 1, -/* REDIRECT (5) */ 1, - 1, - 1, -/* ECHO (8) */ 0, -/* ROUTERADVERT (9) */ 1, -/* ROUTERSOLICIT (10) */ 1, -/* TIME EXCEEDED (11) */ 1, -/* PARAMETER PROBLEM (12) */ 1, -/* TIMESTAMP (13) */ 0, -/* TIMESTAMP REPLY (14) */ 0, -/* INFO (15) */ 0, -/* INFO REPLY (16) */ 0, -/* ADDR MASK (17) */ 0, -/* ADDR MASK REPLY (18) */ 0 -}; - -/* - * Process a received ICMP message. - */ -void -icmp_input(m, hlen) - struct mbuf *m; - int hlen; -{ - register struct icmp *icp; - register struct ip *ip=mtod(m, struct ip *); - int icmplen=ip->ip_len; - /* int code; */ - - DEBUG_CALL("icmp_input"); - DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %d", m->m_len); - - icmpstat.icps_received++; - - /* - * Locate icmp structure in mbuf, and check - * that its not corrupted and of at least minimum length. - */ - if (icmplen < ICMP_MINLEN) { /* min 8 bytes payload */ - icmpstat.icps_tooshort++; - freeit: - m_freem(m); - goto end_error; - } - - m->m_len -= hlen; - m->m_data += hlen; - icp = mtod(m, struct icmp *); - if (cksum(m, icmplen)) { - icmpstat.icps_checksum++; - goto freeit; - } - m->m_len += hlen; - m->m_data -= hlen; - - /* icmpstat.icps_inhist[icp->icmp_type]++; */ - /* code = icp->icmp_code; */ - - DEBUG_ARG("icmp_type = %d", icp->icmp_type); - switch (icp->icmp_type) { - case ICMP_ECHO: - icp->icmp_type = ICMP_ECHOREPLY; - ip->ip_len += hlen; /* since ip_input subtracts this */ - if (ip->ip_dst.s_addr == alias_addr.s_addr) { - icmp_reflect(m); - } else { - struct socket *so; - struct sockaddr_in addr; - if ((so = socreate()) == NULL) goto freeit; - if(udp_attach(so) == -1) { - DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", - errno,strerror(errno))); - sofree(so); - m_free(m); - goto end_error; - } - so->so_m = m; - so->so_faddr = ip->ip_dst; - so->so_fport = htons(7); - so->so_laddr = ip->ip_src; - so->so_lport = htons(9); - so->so_iptos = ip->ip_tos; - so->so_type = IPPROTO_ICMP; - so->so_state = SS_ISFCONNECTED; - - /* Send the packet */ - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else { - addr.sin_addr = so->so_faddr; - } - addr.sin_port = so->so_fport; - if(sendto(so->s, icmp_ping_msg, strlen(icmp_ping_msg), 0, - (struct sockaddr *)&addr, sizeof(addr)) == -1) { - DEBUG_MISC((dfd,"icmp_input udp sendto tx errno = %d-%s\n", - errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); - udp_detach(so); - } - } /* if ip->ip_dst.s_addr == alias_addr.s_addr */ - break; - case ICMP_UNREACH: - /* XXX? report error? close socket? */ - case ICMP_TIMXCEED: - case ICMP_PARAMPROB: - case ICMP_SOURCEQUENCH: - case ICMP_TSTAMP: - case ICMP_MASKREQ: - case ICMP_REDIRECT: - icmpstat.icps_notsupp++; - m_freem(m); - break; - - default: - icmpstat.icps_badtype++; - m_freem(m); - } /* swith */ - -end_error: - /* m is m_free()'d xor put in a socket xor or given to ip_send */ - return; -} - - -/* - * Send an ICMP message in response to a situation - * - * RFC 1122: 3.2.2 MUST send at least the IP header and 8 bytes of header. MAY send more (we do). - * MUST NOT change this header information. - * MUST NOT reply to a multicast/broadcast IP address. - * MUST NOT reply to a multicast/broadcast MAC address. - * MUST reply to only the first fragment. - */ -/* - * Send ICMP_UNREACH back to the source regarding msrc. - * mbuf *msrc is used as a template, but is NOT m_free()'d. - * It is reported as the bad ip packet. The header should - * be fully correct and in host byte order. - * ICMP fragmentation is illegal. All machines must accept 576 bytes in one - * packet. The maximum payload is 576-20(ip hdr)-8(icmp hdr)=548 - */ - -#define ICMP_MAXDATALEN (IP_MSS-28) -void -icmp_error(msrc, type, code, minsize, message) - struct mbuf *msrc; - u_char type; - u_char code; - int minsize; - char *message; -{ - unsigned hlen, shlen, s_ip_len; - register struct ip *ip; - register struct icmp *icp; - register struct mbuf *m; - - DEBUG_CALL("icmp_error"); - DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %d", msrc->m_len); - - if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; - - /* check msrc */ - if(!msrc) goto end_error; - ip = mtod(msrc, struct ip *); -#if DEBUG - { char bufa[INET_ADDRSTRLEN], bufb[INET_ADDRSTRLEN]; - inet_ntop(AF_INET, &ip->ip_src, bufa, sizeof(bufa)); - inet_ntop(AF_INET, &ip->ip_dst, bufb, sizeof(bufb)); - DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); - } -#endif - if(ip->ip_off & IP_OFFMASK) goto end_error; /* Only reply to fragment 0 */ - - shlen=ip->ip_hl << 2; - s_ip_len=ip->ip_len; - if(ip->ip_p == IPPROTO_ICMP) { - icp = (struct icmp *)((char *)ip + shlen); - /* - * Assume any unknown ICMP type is an error. This isn't - * specified by the RFC, but think about it.. - */ - if(icp->icmp_type>18 || icmp_flush[icp->icmp_type]) goto end_error; - } - - /* make a copy */ - if(!(m=m_get())) goto end_error; /* get mbuf */ - { u_int new_m_size; - new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; - if(new_m_size>m->m_size) m_inc(m, new_m_size); - } - memcpy(m->m_data, msrc->m_data, msrc->m_len); - m->m_len = msrc->m_len; /* copy msrc to m */ - - /* make the header of the reply packet */ - ip = mtod(m, struct ip *); - hlen= sizeof(struct ip ); /* no options in reply */ - - /* fill in icmp */ - m->m_data += hlen; - m->m_len -= hlen; - - icp = mtod(m, struct icmp *); - - if(minsize) s_ip_len=shlen+ICMP_MINLEN; /* return header+8b only */ - else if(s_ip_len>ICMP_MAXDATALEN) /* maximum size */ - s_ip_len=ICMP_MAXDATALEN; - - m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ - - /* min. size = 8+sizeof(struct ip)+8 */ - - icp->icmp_type = type; - icp->icmp_code = code; - icp->icmp_id = 0; - icp->icmp_seq = 0; - - memcpy(&icp->icmp_ip, msrc->m_data, s_ip_len); /* report the ip packet */ - HTONS(icp->icmp_ip.ip_len); - HTONS(icp->icmp_ip.ip_id); - HTONS(icp->icmp_ip.ip_off); - -#if DEBUG - if(message) { /* DEBUG : append message to ICMP packet */ - int message_len; - char *cpnt; - message_len=strlen(message); - if(message_len>ICMP_MAXDATALEN) message_len=ICMP_MAXDATALEN; - cpnt=(char *)m->m_data+m->m_len; - memcpy(cpnt, message, message_len); - m->m_len+=message_len; - } -#endif - - icp->icmp_cksum = 0; - icp->icmp_cksum = cksum(m, m->m_len); - - m->m_data -= hlen; - m->m_len += hlen; - - /* fill in ip */ - ip->ip_hl = hlen >> 2; - ip->ip_len = (u_int16_t)m->m_len; - - ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ - - ip->ip_ttl = MAXTTL; - ip->ip_p = IPPROTO_ICMP; - ip->ip_dst = ip->ip_src; /* ip adresses */ - ip->ip_src = alias_addr; - - (void ) ip_output((struct socket *)NULL, m); - - icmpstat.icps_reflect++; - -end_error: - return; -} -#undef ICMP_MAXDATALEN - -/* - * Reflect the ip packet back to the source - */ -void -icmp_reflect(m) - struct mbuf *m; -{ - register struct ip *ip = mtod(m, struct ip *); - int hlen = ip->ip_hl << 2; - int optlen = hlen - sizeof(struct ip ); - register struct icmp *icp; - - /* - * Send an icmp packet back to the ip level, - * after supplying a checksum. - */ - m->m_data += hlen; - m->m_len -= hlen; - icp = mtod(m, struct icmp *); - - icp->icmp_cksum = 0; - icp->icmp_cksum = cksum(m, ip->ip_len - hlen); - - m->m_data -= hlen; - m->m_len += hlen; - - /* fill in ip */ - if (optlen > 0) { - /* - * Strip out original options by copying rest of first - * mbuf's data back, and adjust the IP length. - */ - memmove((caddr_t)(ip + 1), (caddr_t)ip + hlen, - (unsigned )(m->m_len - hlen)); - hlen -= optlen; - ip->ip_hl = hlen >> 2; - ip->ip_len -= optlen; - m->m_len -= optlen; - } - - ip->ip_ttl = MAXTTL; - { /* swap */ - struct in_addr icmp_dst; - icmp_dst = ip->ip_dst; - ip->ip_dst = ip->ip_src; - ip->ip_src = icmp_dst; - } - - (void ) ip_output((struct socket *)NULL, m); - - icmpstat.icps_reflect++; -} diff --git a/BasiliskII/src/slirp/ip_icmp.h b/BasiliskII/src/slirp/ip_icmp.h deleted file mode 100644 index 683dc87f1..000000000 --- a/BasiliskII/src/slirp/ip_icmp.h +++ /dev/null @@ -1,168 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_icmp.h 8.1 (Berkeley) 6/10/93 - * ip_icmp.h,v 1.4 1995/05/30 08:09:43 rgrimes Exp - */ - -#ifndef _NETINET_IP_ICMP_H_ -#define _NETINET_IP_ICMP_H_ - -/* - * Interface Control Message Protocol Definitions. - * Per RFC 792, September 1981. - */ - -typedef u_int32_t n_time; - -/* - * Structure of an icmp header. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct icmp { - u_char icmp_type; /* type of message, see below */ - u_char icmp_code; /* type sub code */ - u_short icmp_cksum; /* ones complement cksum of struct */ - union { - u_char ih_pptr; /* ICMP_PARAMPROB */ - struct in_addr ih_gwaddr; /* ICMP_REDIRECT */ - struct ih_idseq { - u_short icd_id; - u_short icd_seq; - } ih_idseq; - int ih_void; - - /* ICMP_UNREACH_NEEDFRAG -- Path MTU Discovery (RFC1191) */ - struct ih_pmtu { - u_short ipm_void; - u_short ipm_nextmtu; - } ih_pmtu; - } icmp_hun; -#define icmp_pptr icmp_hun.ih_pptr -#define icmp_gwaddr icmp_hun.ih_gwaddr -#define icmp_id icmp_hun.ih_idseq.icd_id -#define icmp_seq icmp_hun.ih_idseq.icd_seq -#define icmp_void icmp_hun.ih_void -#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void -#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu - union { - struct id_ts { - n_time its_otime; - n_time its_rtime; - n_time its_ttime; - } id_ts; - struct id_ip { - struct ip idi_ip; - /* options and then 64 bits of data */ - } id_ip; - uint32_t id_mask; - char id_data[1]; - } icmp_dun; -#define icmp_otime icmp_dun.id_ts.its_otime -#define icmp_rtime icmp_dun.id_ts.its_rtime -#define icmp_ttime icmp_dun.id_ts.its_ttime -#define icmp_ip icmp_dun.id_ip.idi_ip -#define icmp_mask icmp_dun.id_mask -#define icmp_data icmp_dun.id_data -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -/* - * Lower bounds on packet lengths for various types. - * For the error advice packets must first insure that the - * packet is large enought to contain the returned ip header. - * Only then can we do the check to see if 64 bits of packet - * data have been returned, since we need to check the returned - * ip header length. - */ -#define ICMP_MINLEN 8 /* abs minimum */ -#define ICMP_TSLEN (8 + 3 * sizeof (n_time)) /* timestamp */ -#define ICMP_MASKLEN 12 /* address mask */ -#define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8) /* min */ -#define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8) - /* N.B.: must separately check that ip_hl >= 5 */ - -/* - * Definition of type and code field values. - */ -#define ICMP_ECHOREPLY 0 /* echo reply */ -#define ICMP_UNREACH 3 /* dest unreachable, codes: */ -#define ICMP_UNREACH_NET 0 /* bad net */ -#define ICMP_UNREACH_HOST 1 /* bad host */ -#define ICMP_UNREACH_PROTOCOL 2 /* bad protocol */ -#define ICMP_UNREACH_PORT 3 /* bad port */ -#define ICMP_UNREACH_NEEDFRAG 4 /* IP_DF caused drop */ -#define ICMP_UNREACH_SRCFAIL 5 /* src route failed */ -#define ICMP_UNREACH_NET_UNKNOWN 6 /* unknown net */ -#define ICMP_UNREACH_HOST_UNKNOWN 7 /* unknown host */ -#define ICMP_UNREACH_ISOLATED 8 /* src host isolated */ -#define ICMP_UNREACH_NET_PROHIB 9 /* prohibited access */ -#define ICMP_UNREACH_HOST_PROHIB 10 /* ditto */ -#define ICMP_UNREACH_TOSNET 11 /* bad tos for net */ -#define ICMP_UNREACH_TOSHOST 12 /* bad tos for host */ -#define ICMP_SOURCEQUENCH 4 /* packet lost, slow down */ -#define ICMP_REDIRECT 5 /* shorter route, codes: */ -#define ICMP_REDIRECT_NET 0 /* for network */ -#define ICMP_REDIRECT_HOST 1 /* for host */ -#define ICMP_REDIRECT_TOSNET 2 /* for tos and net */ -#define ICMP_REDIRECT_TOSHOST 3 /* for tos and host */ -#define ICMP_ECHO 8 /* echo service */ -#define ICMP_ROUTERADVERT 9 /* router advertisement */ -#define ICMP_ROUTERSOLICIT 10 /* router solicitation */ -#define ICMP_TIMXCEED 11 /* time exceeded, code: */ -#define ICMP_TIMXCEED_INTRANS 0 /* ttl==0 in transit */ -#define ICMP_TIMXCEED_REASS 1 /* ttl==0 in reass */ -#define ICMP_PARAMPROB 12 /* ip header bad */ -#define ICMP_PARAMPROB_OPTABSENT 1 /* req. opt. absent */ -#define ICMP_TSTAMP 13 /* timestamp request */ -#define ICMP_TSTAMPREPLY 14 /* timestamp reply */ -#define ICMP_IREQ 15 /* information request */ -#define ICMP_IREQREPLY 16 /* information reply */ -#define ICMP_MASKREQ 17 /* address mask request */ -#define ICMP_MASKREPLY 18 /* address mask reply */ - -#define ICMP_MAXTYPE 18 - -#define ICMP_INFOTYPE(type) \ - ((type) == ICMP_ECHOREPLY || (type) == ICMP_ECHO || \ - (type) == ICMP_ROUTERADVERT || (type) == ICMP_ROUTERSOLICIT || \ - (type) == ICMP_TSTAMP || (type) == ICMP_TSTAMPREPLY || \ - (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ - (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) - -void icmp_input(struct mbuf *, int); -void icmp_error(struct mbuf *, u_char, u_char, int, char *); -void icmp_reflect(struct mbuf *); - -#endif diff --git a/BasiliskII/src/slirp/ip_input.c b/BasiliskII/src/slirp/ip_input.c deleted file mode 100644 index d94269975..000000000 --- a/BasiliskII/src/slirp/ip_input.c +++ /dev/null @@ -1,693 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_input.c 8.2 (Berkeley) 1/4/94 - * ip_input.c,v 1.11 1994/11/16 10:17:08 jkh Exp - */ - -/* - * Changes and additions relating to SLiRP are - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include "ip_icmp.h" - -int ip_defttl; -struct ipstat ipstat; -struct ipq ipq; - -/* - * IP initialization: fill in IP protocol switch table. - * All protocols not implemented in kernel go to raw IP protocol handler. - */ -void -ip_init() -{ - ipq.next = ipq.prev = (ipqp_32)&ipq; - ip_id = tt.tv_sec & 0xffff; - udp_init(); - tcp_init(); - ip_defttl = IPDEFTTL; -} - -/* - * Ip input routine. Checksum and byte swap header. If fragmented - * try to reassemble. Process options. Pass to next level. - */ -void -ip_input(m) - struct mbuf *m; -{ - register struct ip *ip; - u_int hlen; - - DEBUG_CALL("ip_input"); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %d", m->m_len); - - ipstat.ips_total++; - - if (m->m_len < sizeof (struct ip)) { - ipstat.ips_toosmall++; - return; - } - - ip = mtod(m, struct ip *); - - if (ip->ip_v != IPVERSION) { - ipstat.ips_badvers++; - goto bad; - } - - hlen = ip->ip_hl << 2; - if (hlenm->m_len) {/* min header length */ - ipstat.ips_badhlen++; /* or packet too short */ - goto bad; - } - - /* keep ip header intact for ICMP reply - * ip->ip_sum = cksum(m, hlen); - * if (ip->ip_sum) { - */ - if(cksum(m,hlen)) { - ipstat.ips_badsum++; - goto bad; - } - - /* - * Convert fields to host representation. - */ - NTOHS(ip->ip_len); - if (ip->ip_len < hlen) { - ipstat.ips_badlen++; - goto bad; - } - NTOHS(ip->ip_id); - NTOHS(ip->ip_off); - - /* - * Check that the amount of data in the buffers - * is as at least much as the IP header would have us expect. - * Trim mbufs if longer than we expect. - * Drop packet if shorter than we expect. - */ - if (m->m_len < ip->ip_len) { - ipstat.ips_tooshort++; - goto bad; - } - /* Should drop packet if mbuf too long? hmmm... */ - if (m->m_len > ip->ip_len) - m_adj(m, ip->ip_len - m->m_len); - - /* check ip_ttl for a correct ICMP reply */ - if(ip->ip_ttl==0 || ip->ip_ttl==1) { - icmp_error(m, ICMP_TIMXCEED,ICMP_TIMXCEED_INTRANS, 0,"ttl"); - goto bad; - } - - /* - * Process options and, if not destined for us, - * ship it on. ip_dooptions returns 1 when an - * error was detected (causing an icmp message - * to be sent and the original packet to be freed). - */ -/* We do no IP options */ -/* if (hlen > sizeof (struct ip) && ip_dooptions(m)) - * goto next; - */ - /* - * If offset or IP_MF are set, must reassemble. - * Otherwise, nothing need be done. - * (We could look in the reassembly queue to see - * if the packet was previously fragmented, - * but it's not worth the time; just let them time out.) - * - * XXX This should fail, don't fragment yet - */ - if (ip->ip_off &~ IP_DF) { - register struct ipq *fp; - /* - * Look for queue of fragments - * of this datagram. - */ - for (fp = (struct ipq *) ipq.next; fp != &ipq; - fp = (struct ipq *) fp->next) - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) - goto found; - fp = 0; - found: - - /* - * Adjust ip_len to not reflect header, - * set ip_mff if more fragments are expected, - * convert offset of this to bytes. - */ - ip->ip_len -= hlen; - if (ip->ip_off & IP_MF) - ((struct ipasfrag *)ip)->ipf_mff |= 1; - else - ((struct ipasfrag *)ip)->ipf_mff &= ~1; - - ip->ip_off <<= 3; - - /* - * If datagram marked as having more fragments - * or if this is not the first fragment, - * attempt reassembly; if it succeeds, proceed. - */ - if (((struct ipasfrag *)ip)->ipf_mff & 1 || ip->ip_off) { - ipstat.ips_fragments++; - ip = ip_reass((struct ipasfrag *)ip, fp); - if (ip == 0) - return; - ipstat.ips_reassembled++; - m = dtom(ip); - } else - if (fp) - ip_freef(fp); - - } else - ip->ip_len -= hlen; - - /* - * Switch out to protocol's input routine. - */ - ipstat.ips_delivered++; - switch (ip->ip_p) { - case IPPROTO_TCP: - tcp_input(m, hlen, (struct socket *)NULL); - break; - case IPPROTO_UDP: - udp_input(m, hlen); - break; - case IPPROTO_ICMP: - icmp_input(m, hlen); - break; - default: - ipstat.ips_noproto++; - m_free(m); - } - return; -bad: - m_freem(m); - return; -} - -/* - * Take incoming datagram fragment and try to - * reassemble it into whole datagram. If a chain for - * reassembly of this datagram already exists, then it - * is given as fp; otherwise have to make a chain. - */ -struct ip * -ip_reass(ip, fp) - register struct ipasfrag *ip; - register struct ipq *fp; -{ - register struct mbuf *m = dtom(ip); - register struct ipasfrag *q; - int hlen = ip->ip_hl << 2; - int i, next; - - DEBUG_CALL("ip_reass"); - DEBUG_ARG("ip = %lx", (long)ip); - DEBUG_ARG("fp = %lx", (long)fp); - DEBUG_ARG("m = %lx", (long)m); - - /* - * Presence of header sizes in mbufs - * would confuse code below. - * Fragment m_data is concatenated. - */ - m->m_data += hlen; - m->m_len -= hlen; - - /* - * If first fragment to arrive, create a reassembly queue. - */ - if (fp == 0) { - struct mbuf *t; - if ((t = m_get()) == NULL) goto dropfrag; - fp = mtod(t, struct ipq *); - insque_32(fp, &ipq); - fp->ipq_ttl = IPFRAGTTL; - fp->ipq_p = ip->ip_p; - fp->ipq_id = ip->ip_id; - fp->ipq_next = fp->ipq_prev = (ipasfragp_32)fp; - fp->ipq_src = ((struct ip *)ip)->ip_src; - fp->ipq_dst = ((struct ip *)ip)->ip_dst; - q = (struct ipasfrag *)fp; - goto insert; - } - - /* - * Find a segment which begins after this one does. - */ - for (q = (struct ipasfrag *)fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *)q->ipf_next) - if (q->ip_off > ip->ip_off) - break; - - /* - * If there is a preceding segment, it may provide some of - * our data already. If so, drop the data from the incoming - * segment. If it provides all of our data, drop us. - */ - if (q->ipf_prev != (ipasfragp_32)fp) { - i = ((struct ipasfrag *)(q->ipf_prev))->ip_off + - ((struct ipasfrag *)(q->ipf_prev))->ip_len - ip->ip_off; - if (i > 0) { - if (i >= ip->ip_len) - goto dropfrag; - m_adj(dtom(ip), i); - ip->ip_off += i; - ip->ip_len -= i; - } - } - - /* - * While we overlap succeeding segments trim them or, - * if they are completely covered, dequeue them. - */ - while (q != (struct ipasfrag *)fp && ip->ip_off + ip->ip_len > q->ip_off) { - i = (ip->ip_off + ip->ip_len) - q->ip_off; - if (i < q->ip_len) { - q->ip_len -= i; - q->ip_off += i; - m_adj(dtom(q), i); - break; - } - q = (struct ipasfrag *) q->ipf_next; - m_freem(dtom((struct ipasfrag *) q->ipf_prev)); - ip_deq((struct ipasfrag *) q->ipf_prev); - } - -insert: - /* - * Stick new segment in its place; - * check for complete reassembly. - */ - ip_enq(ip, (struct ipasfrag *) q->ipf_prev); - next = 0; - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = (struct ipasfrag *) q->ipf_next) { - if (q->ip_off != next) - return (0); - next += q->ip_len; - } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_mff & 1) - return (0); - - /* - * Reassembly is complete; concatenate fragments. - */ - q = (struct ipasfrag *) fp->ipq_next; - m = dtom(q); - - q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag *)fp) { - struct mbuf *t; - t = dtom(q); - q = (struct ipasfrag *) q->ipf_next; - m_cat(m, t); - } - - /* - * Create header for new ip packet by - * modifying header of first packet; - * dequeue and discard fragment reassembly header. - * Make header visible. - */ - ip = (struct ipasfrag *) fp->ipq_next; - - /* - * If the fragments concatenated to an mbuf that's - * bigger than the total size of the fragment, then and - * m_ext buffer was alloced. But fp->ipq_next points to - * the old buffer (in the mbuf), so we must point ip - * into the new buffer. - */ - if (m->m_flags & M_EXT) { - int delta; - delta = (char *)ip - m->m_dat; - ip = (struct ipasfrag *)(m->m_ext + delta); - } - - /* DEBUG_ARG("ip = %lx", (long)ip); - * ip=(struct ipasfrag *)m->m_data; */ - - ip->ip_len = next; - ip->ipf_mff &= ~1; - ((struct ip *)ip)->ip_src = fp->ipq_src; - ((struct ip *)ip)->ip_dst = fp->ipq_dst; - remque_32(fp); - (void) m_free(dtom(fp)); - m = dtom(ip); - m->m_len += (ip->ip_hl << 2); - m->m_data -= (ip->ip_hl << 2); - - return ((struct ip *)ip); - -dropfrag: - ipstat.ips_fragdropped++; - m_freem(m); - return (0); -} - -/* - * Free a fragment reassembly header and all - * associated datagrams. - */ -void -ip_freef(fp) - struct ipq *fp; -{ - register struct ipasfrag *q, *p; - - for (q = (struct ipasfrag *) fp->ipq_next; q != (struct ipasfrag *)fp; - q = p) { - p = (struct ipasfrag *) q->ipf_next; - ip_deq(q); - m_freem(dtom(q)); - } - remque_32(fp); - (void) m_free(dtom(fp)); -} - -/* - * Put an ip fragment on a reassembly chain. - * Like insque, but pointers in middle of structure. - */ -void -ip_enq(p, prev) - register struct ipasfrag *p, *prev; -{ - DEBUG_CALL("ip_enq"); - DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = (ipasfragp_32) prev; - p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = (ipasfragp_32) p; - prev->ipf_next = (ipasfragp_32) p; -} - -/* - * To ip_enq as remque is to insque. - */ -void -ip_deq(p) - register struct ipasfrag *p; -{ - ((struct ipasfrag *)(p->ipf_prev))->ipf_next = p->ipf_next; - ((struct ipasfrag *)(p->ipf_next))->ipf_prev = p->ipf_prev; -} - -/* - * IP timer processing; - * if a timer expires on a reassembly - * queue, discard it. - */ -void -ip_slowtimo() -{ - register struct ipq *fp; - - DEBUG_CALL("ip_slowtimo"); - - fp = (struct ipq *) ipq.next; - if (fp == 0) - return; - - while (fp != &ipq) { - --fp->ipq_ttl; - fp = (struct ipq *) fp->next; - if (((struct ipq *)(fp->prev))->ipq_ttl == 0) { - ipstat.ips_fragtimeout++; - ip_freef((struct ipq *) fp->prev); - } - } -} - -/* - * Do option processing on a datagram, - * possibly discarding it if bad options are encountered, - * or forwarding it if source-routed. - * Returns 1 if packet has been forwarded/freed, - * 0 if the packet should be processed further. - */ - -#ifdef notdef - -int -ip_dooptions(m) - struct mbuf *m; -{ - register struct ip *ip = mtod(m, struct ip *); - register u_char *cp; - register struct ip_timestamp *ipt; - register struct in_ifaddr *ia; -/* int opt, optlen, cnt, off, code, type = ICMP_PARAMPROB, forward = 0; */ - int opt, optlen, cnt, off, code, type, forward = 0; - struct in_addr *sin, dst; -typedef u_int32_t n_time; - n_time ntime; - - dst = ip->ip_dst; - cp = (u_char *)(ip + 1); - cnt = (ip->ip_hl << 2) - sizeof (struct ip); - for (; cnt > 0; cnt -= optlen, cp += optlen) { - opt = cp[IPOPT_OPTVAL]; - if (opt == IPOPT_EOL) - break; - if (opt == IPOPT_NOP) - optlen = 1; - else { - optlen = cp[IPOPT_OLEN]; - if (optlen <= 0 || optlen > cnt) { - code = &cp[IPOPT_OLEN] - (u_char *)ip; - goto bad; - } - } - switch (opt) { - - default: - break; - - /* - * Source routing with record. - * Find interface with current destination address. - * If none on this machine then drop if strictly routed, - * or do nothing if loosely routed. - * Record interface address and bring up next address - * component. If strictly routed make sure next - * address is on directly accessible net. - */ - case IPOPT_LSRR: - case IPOPT_SSRR: - if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { - code = &cp[IPOPT_OFFSET] - (u_char *)ip; - goto bad; - } - ipaddr.sin_addr = ip->ip_dst; - ia = (struct in_ifaddr *) - ifa_ifwithaddr((struct sockaddr *)&ipaddr); - if (ia == 0) { - if (opt == IPOPT_SSRR) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_SRCFAIL; - goto bad; - } - /* - * Loose routing, and not at next destination - * yet; nothing to do except forward. - */ - break; - } - off--; / * 0 origin * / - if (off > optlen - sizeof(struct in_addr)) { - /* - * End of source route. Should be for us. - */ - save_rte(cp, ip->ip_src); - break; - } - /* - * locate outgoing interface - */ - bcopy((caddr_t)(cp + off), (caddr_t)&ipaddr.sin_addr, - sizeof(ipaddr.sin_addr)); - if (opt == IPOPT_SSRR) { -#define INA struct in_ifaddr * -#define SA struct sockaddr * - if ((ia = (INA)ifa_ifwithdstaddr((SA)&ipaddr)) == 0) - ia = (INA)ifa_ifwithnet((SA)&ipaddr); - } else - ia = ip_rtaddr(ipaddr.sin_addr); - if (ia == 0) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_SRCFAIL; - goto bad; - } - ip->ip_dst = ipaddr.sin_addr; - bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), - (caddr_t)(cp + off), sizeof(struct in_addr)); - cp[IPOPT_OFFSET] += sizeof(struct in_addr); - /* - * Let ip_intr's mcast routing check handle mcast pkts - */ - forward = !IN_MULTICAST(ntohl(ip->ip_dst.s_addr)); - break; - - case IPOPT_RR: - if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { - code = &cp[IPOPT_OFFSET] - (u_char *)ip; - goto bad; - } - /* - * If no space remains, ignore. - */ - off--; * 0 origin * - if (off > optlen - sizeof(struct in_addr)) - break; - bcopy((caddr_t)(&ip->ip_dst), (caddr_t)&ipaddr.sin_addr, - sizeof(ipaddr.sin_addr)); - /* - * locate outgoing interface; if we're the destination, - * use the incoming interface (should be same). - */ - if ((ia = (INA)ifa_ifwithaddr((SA)&ipaddr)) == 0 && - (ia = ip_rtaddr(ipaddr.sin_addr)) == 0) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_HOST; - goto bad; - } - bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), - (caddr_t)(cp + off), sizeof(struct in_addr)); - cp[IPOPT_OFFSET] += sizeof(struct in_addr); - break; - - case IPOPT_TS: - code = cp - (u_char *)ip; - ipt = (struct ip_timestamp *)cp; - if (ipt->ipt_len < 5) - goto bad; - if (ipt->ipt_ptr > ipt->ipt_len - sizeof (int32_t)) { - if (++ipt->ipt_oflw == 0) - goto bad; - break; - } - sin = (struct in_addr *)(cp + ipt->ipt_ptr - 1); - switch (ipt->ipt_flg) { - - case IPOPT_TS_TSONLY: - break; - - case IPOPT_TS_TSANDADDR: - if (ipt->ipt_ptr + sizeof(n_time) + - sizeof(struct in_addr) > ipt->ipt_len) - goto bad; - ipaddr.sin_addr = dst; - ia = (INA)ifaof_ i f p foraddr((SA)&ipaddr, - m->m_pkthdr.rcvif); - if (ia == 0) - continue; - bcopy((caddr_t)&IA_SIN(ia)->sin_addr, - (caddr_t)sin, sizeof(struct in_addr)); - ipt->ipt_ptr += sizeof(struct in_addr); - break; - - case IPOPT_TS_PRESPEC: - if (ipt->ipt_ptr + sizeof(n_time) + - sizeof(struct in_addr) > ipt->ipt_len) - goto bad; - bcopy((caddr_t)sin, (caddr_t)&ipaddr.sin_addr, - sizeof(struct in_addr)); - if (ifa_ifwithaddr((SA)&ipaddr) == 0) - continue; - ipt->ipt_ptr += sizeof(struct in_addr); - break; - - default: - goto bad; - } - ntime = iptime(); - bcopy((caddr_t)&ntime, (caddr_t)cp + ipt->ipt_ptr - 1, - sizeof(n_time)); - ipt->ipt_ptr += sizeof(n_time); - } - } - if (forward) { - ip_forward(m, 1); - return (1); - } - } - } - return (0); -bad: - /* ip->ip_len -= ip->ip_hl << 2; XXX icmp_error adds in hdr length */ - -/* Not yet */ - icmp_error(m, type, code, 0, 0); - - ipstat.ips_badoptions++; - return (1); -} - -#endif /* notdef */ - -/* - * Strip out IP options, at higher - * level protocol in the kernel. - * Second argument is buffer to which options - * will be moved, and return value is their length. - * (XXX) should be deleted; last arg currently ignored. - */ -void -ip_stripoptions(m, mopt) - register struct mbuf *m; - struct mbuf *mopt; -{ - register int i; - struct ip *ip = mtod(m, struct ip *); - register caddr_t opts; - int olen; - - olen = (ip->ip_hl<<2) - sizeof (struct ip); - opts = (caddr_t)(ip + 1); - i = m->m_len - (sizeof (struct ip) + olen); - memcpy(opts, opts + olen, (unsigned)i); - m->m_len -= olen; - - ip->ip_hl = sizeof(struct ip) >> 2; -} diff --git a/BasiliskII/src/slirp/ip_output.c b/BasiliskII/src/slirp/ip_output.c deleted file mode 100644 index fb9a94204..000000000 --- a/BasiliskII/src/slirp/ip_output.c +++ /dev/null @@ -1,202 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_output.c 8.3 (Berkeley) 1/21/94 - * ip_output.c,v 1.9 1994/11/16 10:17:10 jkh Exp - */ - -/* - * Changes and additions relating to SLiRP are - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -u_int16_t ip_id; - -/* - * IP output. The packet in mbuf chain m contains a skeletal IP - * header (with len, off, ttl, proto, tos, src, dst). - * The mbuf chain containing the packet will be freed. - * The mbuf opt, if present, will not be freed. - */ -int -ip_output(so, m0) - struct socket *so; - struct mbuf *m0; -{ - register struct ip *ip; - register struct mbuf *m = m0; - register u_int hlen = sizeof(struct ip); - u_int len, off; - int error = 0; - - DEBUG_CALL("ip_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m0 = %lx", (long)m0); - - /* We do no options */ -/* if (opt) { - * m = ip_insertoptions(m, opt, &len); - * hlen = len; - * } - */ - ip = mtod(m, struct ip *); - /* - * Fill in IP header. - */ - ip->ip_v = IPVERSION; - ip->ip_off &= IP_DF; - ip->ip_id = htons(ip_id++); - ip->ip_hl = hlen >> 2; - ipstat.ips_localout++; - - /* - * Verify that we have any chance at all of being able to queue - * the packet or packet fragments - */ - /* XXX Hmmm... */ -/* if (if_queued > if_thresh && towrite <= 0) { - * error = ENOBUFS; - * goto bad; - * } - */ - - /* - * If small enough for interface, can just send directly. - */ - if ((u_int16_t)ip->ip_len <= if_mtu) { - ip->ip_len = htons((u_int16_t)ip->ip_len); - ip->ip_off = htons((u_int16_t)ip->ip_off); - ip->ip_sum = 0; - ip->ip_sum = cksum(m, hlen); - - if_output(so, m); - goto done; - } - - /* - * Too large for interface; fragment if possible. - * Must be able to put at least 8 bytes per fragment. - */ - if (ip->ip_off & IP_DF) { - error = -1; - ipstat.ips_cantfrag++; - goto bad; - } - - len = (if_mtu - hlen) &~ 7; /* ip databytes per packet */ - if (len < 8) { - error = -1; - goto bad; - } - - { - int mhlen, firstlen = len; - struct mbuf **mnext = &m->m_nextpkt; - - /* - * Loop through length of segment after first fragment, - * make new header and copy data of each part and link onto chain. - */ - m0 = m; - mhlen = sizeof (struct ip); - for (off = hlen + len; off < ip->ip_len; off += len) { - register struct ip *mhip; - m = m_get(); - if (m == 0) { - error = -1; - ipstat.ips_odropped++; - goto sendorfree; - } - m->m_data += if_maxlinkhdr; - mhip = mtod(m, struct ip *); - *mhip = *ip; - - /* No options */ -/* if (hlen > sizeof (struct ip)) { - * mhlen = ip_optcopy(ip, mhip) + sizeof (struct ip); - * mhip->ip_hl = mhlen >> 2; - * } - */ - m->m_len = mhlen; - mhip->ip_off = ((off - hlen) >> 3) + (ip->ip_off & ~IP_MF); - if (ip->ip_off & IP_MF) - mhip->ip_off |= IP_MF; - if (off + len >= (u_int16_t)ip->ip_len) - len = (u_int16_t)ip->ip_len - off; - else - mhip->ip_off |= IP_MF; - mhip->ip_len = htons((u_int16_t)(len + mhlen)); - - if (m_copy(m, m0, off, len) < 0) { - error = -1; - goto sendorfree; - } - - mhip->ip_off = htons((u_int16_t)mhip->ip_off); - mhip->ip_sum = 0; - mhip->ip_sum = cksum(m, mhlen); - *mnext = m; - mnext = &m->m_nextpkt; - ipstat.ips_ofragments++; - } - /* - * Update first fragment by trimming what's been copied out - * and updating header, then send each fragment (in order). - */ - m = m0; - m_adj(m, hlen + firstlen - ip->ip_len); - ip->ip_len = htons((u_int16_t)m->m_len); - ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); - ip->ip_sum = 0; - ip->ip_sum = cksum(m, hlen); -sendorfree: - for (m = m0; m; m = m0) { - m0 = m->m_nextpkt; - m->m_nextpkt = 0; - if (error == 0) - if_output(so, m); - else - m_freem(m); - } - - if (error == 0) - ipstat.ips_fragmented++; - } - -done: - return (error); - -bad: - m_freem(m0); - goto done; -} diff --git a/BasiliskII/src/slirp/libslirp.h b/BasiliskII/src/slirp/libslirp.h deleted file mode 100644 index 8a1aa31e6..000000000 --- a/BasiliskII/src/slirp/libslirp.h +++ /dev/null @@ -1,41 +0,0 @@ -#ifndef _LIBSLIRP_H -#define _LIBSLIRP_H - -#ifdef _WIN32 -#include -int inet_aton(const char *cp, struct in_addr *ia); -#else -#include -#include -#endif - -#ifdef __cplusplus -extern "C" { -#endif - -int slirp_init(void); - -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds); - -void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds); - -void slirp_input(const uint8 *pkt, int pkt_len); - -/* you must provide the following functions: */ -int slirp_can_output(void); -void slirp_output(const uint8 *pkt, int pkt_len); - -int slirp_redir(int is_udp, int host_port, - struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, - int guest_port); - -extern const char *tftp_prefix; -extern char slirp_hostname[33]; - -#ifdef __cplusplus -} -#endif - -#endif diff --git a/BasiliskII/src/slirp/main.h b/BasiliskII/src/slirp/main.h deleted file mode 100644 index 181b6ae88..000000000 --- a/BasiliskII/src/slirp/main.h +++ /dev/null @@ -1,54 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifdef HAVE_SYS_SELECT_H -#include -#endif - -#define TOWRITEMAX 512 - -extern struct timeval tt; -extern int link_up; -extern int slirp_socket; -extern int slirp_socket_unit; -extern int slirp_socket_port; -extern u_int32_t slirp_socket_addr; -extern char *slirp_socket_passwd; -extern int ctty_closed; - -/* - * Get the difference in 2 times from updtim() - * Allow for wraparound times, "just in case" - * x is the greater of the 2 (current time) and y is - * what it's being compared against. - */ -#define TIME_DIFF(x,y) (x)-(y) < 0 ? ~0-(y)+(x) : (x)-(y) - -extern char *slirp_tty; -extern char *exec_shell; -extern u_int curtime; -extern fd_set *global_readfds, *global_writefds, *global_xfds; -extern struct in_addr ctl_addr; -extern struct in_addr special_addr; -extern struct in_addr alias_addr; -extern struct in_addr our_addr; -extern struct in_addr loopback_addr; -extern struct in_addr dns_addr; -extern char *username; -extern char *socket_path; -extern int towrite_max; -extern int ppp_exit; -extern int so_options; -extern int tcp_keepintvl; -extern uint8_t client_ethaddr[6]; - -#define PROTO_SLIP 0x1 -#ifdef USE_PPP -#define PROTO_PPP 0x2 -#endif - -void if_encap(const uint8_t *ip_data, int ip_data_len); diff --git a/BasiliskII/src/slirp/mbuf.c b/BasiliskII/src/slirp/mbuf.c deleted file mode 100644 index 5a16fab8b..000000000 --- a/BasiliskII/src/slirp/mbuf.c +++ /dev/null @@ -1,230 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -/* - * mbuf's in SLiRP are much simpler than the real mbufs in - * FreeBSD. They are fixed size, determined by the MTU, - * so that one whole packet can fit. Mbuf's cannot be - * chained together. If there's more data than the mbuf - * could hold, an external malloced buffer is pointed to - * by m_ext (and the data pointers) and M_EXT is set in - * the flags - */ - -#include -#include - -struct mbuf *mbutl; -char *mclrefcnt; -int mbuf_alloced = 0; -struct mbuf m_freelist, m_usedlist; -int mbuf_thresh = 30; -int mbuf_max = 0; -size_t msize; - -void m_init() -{ - m_freelist.m_next = m_freelist.m_prev = &m_freelist; - m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; - msize_init(); -} - -void msize_init() -{ - /* - * Find a nice value for msize - * XXX if_maxlinkhdr already in mtu - */ - msize = (if_mtu>if_mru?if_mtu:if_mru) + - if_maxlinkhdr + sizeof(struct m_hdr ) + 6; -} - -/* - * Get an mbuf from the free list, if there are none - * malloc one - * - * Because fragmentation can occur if we alloc new mbufs and - * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, - * which tells m_free to actually free() it - */ -struct mbuf *m_get() -{ - register struct mbuf *m; - int flags = 0; - - DEBUG_CALL("m_get"); - - if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(msize); - if (m == NULL) goto end_error; - mbuf_alloced++; - if (mbuf_alloced > mbuf_thresh) - flags = M_DOFREE; - if (mbuf_alloced > mbuf_max) - mbuf_max = mbuf_alloced; - } else { - m = m_freelist.m_next; - remque(m); - } - - /* Insert it in the used list */ - insque(m,&m_usedlist); - m->m_flags = (flags | M_USEDLIST); - - /* Initialise it */ - m->m_size = msize - sizeof(struct m_hdr); - m->m_data = m->m_dat; - m->m_len = 0; - m->m_nextpkt = 0; - m->m_prevpkt = 0; -end_error: - DEBUG_ARG("m = %lx", (long )m); - return m; -} - -void m_free(struct mbuf *m) -{ - - DEBUG_CALL("m_free"); - DEBUG_ARG("m = %lx", (long )m); - - if(m) { - /* Remove from m_usedlist */ - if (m->m_flags & M_USEDLIST) - remque(m); - - /* If it's M_EXT, free() it */ - if (m->m_flags & M_EXT) - free(m->m_ext); - - /* - * Either free() it or put it on the free list - */ - if (m->m_flags & M_DOFREE) { - free(m); - mbuf_alloced--; - } else if ((m->m_flags & M_FREELIST) == 0) { - insque(m,&m_freelist); - m->m_flags = M_FREELIST; /* Clobber other flags */ - } - } /* if(m) */ -} - -/* - * Copy data from one mbuf to the end of - * the other.. if result is too big for one mbuf, malloc() - * an M_EXT data segment - */ -void m_cat(register struct mbuf *m, register struct mbuf *n) -{ - /* - * If there's no room, realloc - */ - if (M_FREEROOM(m) < n->m_len) - m_inc(m,m->m_size+MINCSIZE); - - memcpy(m->m_data+m->m_len, n->m_data, n->m_len); - m->m_len += n->m_len; - - m_free(n); -} - - -/* make m size bytes large */ -void m_inc(struct mbuf *m, u_int size) -{ - int datasize; - - /* some compiles throw up on gotos. This one we can fake. */ - if(m->m_size>size) return; - - if (m->m_flags & M_EXT) { - datasize = m->m_data - m->m_ext; - m->m_ext = (char *)realloc(m->m_ext,size); -/* if (m->m_ext == NULL) - * return (struct mbuf *)NULL; - */ - m->m_data = m->m_ext + datasize; - } else { - char *dat; - datasize = m->m_data - m->m_dat; - dat = (char *)malloc(size); -/* if (dat == NULL) - * return (struct mbuf *)NULL; - */ - memcpy(dat, m->m_dat, m->m_size); - - m->m_ext = dat; - m->m_data = m->m_ext + datasize; - m->m_flags |= M_EXT; - } - - m->m_size = size; - -} - - - -void m_adj(struct mbuf *m, int len) -{ - if (m == NULL) - return; - if (len >= 0) { - /* Trim from head */ - m->m_data += len; - m->m_len -= len; - } else { - /* Trim from tail */ - len = -len; - m->m_len -= len; - } -} - - -/* - * Copy len bytes from m, starting off bytes into n - */ -int -m_copy(struct mbuf *n, struct mbuf *m, u_int off, u_int len) -{ - if (len > M_FREEROOM(n)) - return -1; - - memcpy((n->m_data + n->m_len), (m->m_data + off), len); - n->m_len += len; - return 0; -} - - -/* - * Given a pointer into an mbuf, return the mbuf - * XXX This is a kludge, I should eliminate the need for it - * Fortunately, it's not used often - */ -struct mbuf *dtom(void *dat) -{ - struct mbuf *m; - - DEBUG_CALL("dtom"); - DEBUG_ARG("dat = %lx", (long )dat); - - /* bug corrected for M_EXT buffers */ - for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) { - if (m->m_flags & M_EXT) { - if( (char *)dat>=m->m_ext && (char *)dat<(m->m_ext + m->m_size) ) - return m; - } else { - if( (char *)dat >= m->m_dat && (char *)dat<(m->m_dat + m->m_size) ) - return m; - } - } - - DEBUG_ERROR((dfd, "dtom failed")); - - return (struct mbuf *)0; -} - diff --git a/BasiliskII/src/slirp/mbuf.h b/BasiliskII/src/slirp/mbuf.h deleted file mode 100644 index 11b252bb6..000000000 --- a/BasiliskII/src/slirp/mbuf.h +++ /dev/null @@ -1,143 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)mbuf.h 8.3 (Berkeley) 1/21/94 - * mbuf.h,v 1.9 1994/11/14 13:54:20 bde Exp - */ - -#ifndef _MBUF_H_ -#define _MBUF_H_ - -#define m_freem m_free - - -#define MINCSIZE 4096 /* Amount to increase mbuf if too small */ - -/* - * Macros for type conversion - * mtod(m,t) - convert mbuf pointer to data pointer of correct type - * dtom(x) - convert data pointer within mbuf to mbuf pointer (XXX) - */ -#define mtod(m,t) ((t)(m)->m_data) -/* #define dtom(x) ((struct mbuf *)((int)(x) & ~(M_SIZE-1))) */ - -/* XXX About mbufs for slirp: - * Only one mbuf is ever used in a chain, for each "cell" of data. - * m_nextpkt points to the next packet, if fragmented. - * If the data is too large, the M_EXT is used, and a larger block - * is alloced. Therefore, m_free[m] must check for M_EXT and if set - * free the m_ext. This is inefficient memory-wise, but who cares. - */ - -/* XXX should union some of these! */ -/* header at beginning of each mbuf: */ -struct m_hdr { - struct mbuf *mh_next; /* Linked list of mbufs */ - struct mbuf *mh_prev; - struct mbuf *mh_nextpkt; /* Next packet in queue/record */ - struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ - int mh_flags; /* Misc flags */ - - size_t mh_size; /* Size of data */ - struct socket *mh_so; - - caddr_t mh_data; /* Location of data */ - size_t mh_len; /* Amount of data in this mbuf */ -}; - -/* - * How much room is in the mbuf, from m_data to the end of the mbuf - */ -#define M_ROOM(m) ((m->m_flags & M_EXT)? \ - (((m)->m_ext + (m)->m_size) - (m)->m_data) \ - : \ - (((m)->m_dat + (m)->m_size) - (m)->m_data)) - -/* - * How much free room there is - */ -#define M_FREEROOM(m) (M_ROOM(m) - (m)->m_len) -#define M_TRAILINGSPACE M_FREEROOM - -struct mbuf { - struct m_hdr m_hdr; - union M_dat { - char m_dat_[1]; /* ANSI don't like 0 sized arrays */ - char *m_ext_; - } M_dat; -}; - -#define m_next m_hdr.mh_next -#define m_prev m_hdr.mh_prev -#define m_nextpkt m_hdr.mh_nextpkt -#define m_prevpkt m_hdr.mh_prevpkt -#define m_flags m_hdr.mh_flags -#define m_len m_hdr.mh_len -#define m_data m_hdr.mh_data -#define m_size m_hdr.mh_size -#define m_dat M_dat.m_dat_ -#define m_ext M_dat.m_ext_ -#define m_so m_hdr.mh_so - -#define ifq_prev m_prev -#define ifq_next m_next -#define ifs_prev m_prevpkt -#define ifs_next m_nextpkt -#define ifq_so m_so - -#define M_EXT 0x01 /* m_ext points to more (malloced) data */ -#define M_FREELIST 0x02 /* mbuf is on free list */ -#define M_USEDLIST 0x04 /* XXX mbuf is on used list (for dtom()) */ -#define M_DOFREE 0x08 /* when m_free is called on the mbuf, free() - * it rather than putting it on the free list */ - -/* - * Mbuf statistics. XXX - */ - -struct mbstat { - int mbs_alloced; /* Number of mbufs allocated */ - -}; - -extern struct mbstat mbstat; -extern int mbuf_alloced; -extern struct mbuf m_freelist, m_usedlist; -extern int mbuf_max; - -void m_init(void); -void msize_init(void); -struct mbuf * m_get(void); -void m_free(struct mbuf *); -void m_cat(register struct mbuf *, register struct mbuf *); -void m_inc(struct mbuf *, u_int); -void m_adj(struct mbuf *, int); -int m_copy(struct mbuf *, struct mbuf *, u_int, u_int); -struct mbuf * dtom(void *); - -#endif diff --git a/BasiliskII/src/slirp/misc.c b/BasiliskII/src/slirp/misc.c deleted file mode 100644 index b80caf662..000000000 --- a/BasiliskII/src/slirp/misc.c +++ /dev/null @@ -1,863 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include - -u_int curtime, time_fasttimo, last_slowtimo, detach_time; -u_int detach_wait = 600000; /* 10 minutes */ - -#if 0 -int x_port = -1; -int x_display = 0; -int x_screen = 0; - -int show_x(char *buff, struct socket *inso) -{ - if (x_port < 0) { - lprint("X Redir: X not being redirected.\r\n"); - } else { - lprint("X Redir: In sh/bash/zsh/etc. type: DISPLAY=%s:%d.%d; export DISPLAY\r\n", - inet_ntoa(our_addr), x_port, x_screen); - lprint("X Redir: In csh/tcsh/etc. type: setenv DISPLAY %s:%d.%d\r\n", - inet_ntoa(our_addr), x_port, x_screen); - if (x_display) - lprint("X Redir: Redirecting to display %d\r\n", x_display); - } - - return CFG_OK; -} - - -/* - * XXX Allow more than one X redirection? - */ -void redir_x(u_int32_t inaddr, int start_port, int display, int screen) -{ - int i; - - if (x_port >= 0) { - lprint("X Redir: X already being redirected.\r\n"); - show_x(0, 0); - } else { - for (i = 6001 + (start_port-1); i <= 6100; i++) { - if (solisten(htons(i), inaddr, htons(6000 + display), 0)) { - /* Success */ - x_port = i - 6000; - x_display = display; - x_screen = screen; - show_x(0, 0); - return; - } - } - lprint("X Redir: Error: Couldn't redirect a port for X. Weird.\r\n"); - } -} -#endif - -#ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia) -{ - return inet_pton(AF_INET, cp, &ia->s_addr); -} -#endif - -/* - * Get our IP address and put it in our_addr - */ -void getouraddr() -{ - char buff[256]; - - if (gethostname(buff, sizeof(buff)) == 0) - { - struct addrinfo hints = { 0 }; - hints.ai_flags = AI_NUMERICHOST; - hints.ai_family = AF_INET; - struct addrinfo* ai; - if (getaddrinfo(buff, NULL, &hints, &ai) == 0) - { - our_addr = *(struct in_addr *)ai->ai_addr->sa_data; - freeaddrinfo(ai); - } - } - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; -} - -#if SIZEOF_CHAR_P == 8 - -struct quehead_32 { - u_int32_t qh_link; - u_int32_t qh_rlink; -}; - -inline void insque_32(void *a, void *b) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - register struct quehead_32 *head = (struct quehead_32 *) b; - element->qh_link = head->qh_link; - head->qh_link = (u_int32_t)element; - element->qh_rlink = (u_int32_t)head; - ((struct quehead_32 *)(element->qh_link))->qh_rlink - = (u_int32_t)element; -} - -inline void remque_32(void *a) -{ - register struct quehead_32 *element = (struct quehead_32 *) a; - ((struct quehead_32 *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead_32 *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = 0; -} - -#endif /* SIZEOF_CHAR_P == 8 */ - -struct quehead { - struct quehead *qh_link; - struct quehead *qh_rlink; -}; - -void insque(void *a, void *b) -{ - register struct quehead *element = (struct quehead *) a; - register struct quehead *head = (struct quehead *) b; - element->qh_link = head->qh_link; - head->qh_link = (struct quehead *)element; - element->qh_rlink = (struct quehead *)head; - ((struct quehead *)(element->qh_link))->qh_rlink - = (struct quehead *)element; -} - -void remque(void *a) -{ - register struct quehead *element = (struct quehead *) a; - ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = NULL; - /* element->qh_link = NULL; TCP FIN1 crashes if you do this. Why ? */ -} - -/* #endif */ - - -int add_exec(struct ex_list **ex_ptr, int do_pty, char *exec, int addr, int port) -{ - struct ex_list *tmp_ptr; - - /* First, check if the port is "bound" */ - for (tmp_ptr = *ex_ptr; tmp_ptr; tmp_ptr = tmp_ptr->ex_next) { - if (port == tmp_ptr->ex_fport && addr == tmp_ptr->ex_addr) - return -1; - } - - tmp_ptr = *ex_ptr; - *ex_ptr = (struct ex_list *)malloc(sizeof(struct ex_list)); - (*ex_ptr)->ex_fport = port; - (*ex_ptr)->ex_addr = addr; - (*ex_ptr)->ex_pty = do_pty; - (*ex_ptr)->ex_exec = strdup(exec); - (*ex_ptr)->ex_next = tmp_ptr; - return 0; -} - -#ifndef HAVE_STRERROR - -/* - * For systems with no strerror - */ - -extern int sys_nerr; -extern char *sys_errlist[]; - -char *strerror(int error) -{ - if (error < sys_nerr) - return sys_errlist[error]; - else - return "Unknown error."; -} - -#endif - - -#ifdef _WIN32 - -int fork_exec(struct socket *so, char *ex, int do_pty) -{ - /* not implemented */ - return 0; -} - -#else - -int slirp_openpty(int *amaster, int *aslave) -{ - register int master, slave; - -#ifdef HAVE_GRANTPT - char *ptr; - - if ((master = open("/dev/ptmx", O_RDWR)) < 0 || - grantpt(master) < 0 || - unlockpt(master) < 0 || - (ptr = ptsname(master)) == NULL) { - close(master); - return -1; - } - - if ((slave = open(ptr, O_RDWR)) < 0 || - ioctl(slave, I_PUSH, "ptem") < 0 || - ioctl(slave, I_PUSH, "ldterm") < 0 || - ioctl(slave, I_PUSH, "ttcompat") < 0) { - close(master); - close(slave); - return -1; - } - - *amaster = master; - *aslave = slave; - return 0; - -#else - - static char line[] = "/dev/ptyXX"; - register const char *cp1, *cp2; - - for (cp1 = "pqrsPQRS"; *cp1; cp1++) { - line[8] = *cp1; - for (cp2 = "0123456789abcdefghijklmnopqrstuv"; *cp2; cp2++) { - line[9] = *cp2; - if ((master = open(line, O_RDWR, 0)) == -1) { - if (errno == ENOENT) - return (-1); /* out of ptys */ - } else { - line[5] = 't'; - /* These will fail */ - (void) chown(line, getuid(), 0); - (void) chmod(line, S_IRUSR|S_IWUSR|S_IWGRP); -#ifdef HAVE_REVOKE - (void) revoke(line); -#endif - if ((slave = open(line, O_RDWR, 0)) != -1) { - *amaster = master; - *aslave = slave; - return 0; - } - (void) close(master); - line[5] = 'p'; - } - } - } - errno = ENOENT; /* out of ptys */ - return (-1); -#endif -} - -/* - * XXX This is ugly - * We create and bind a socket, then fork off to another - * process, which connects to this socket, after which we - * exec the wanted program. If something (strange) happens, - * the accept() call could block us forever. - * - * do_pty = 0 Fork/exec inetd style - * do_pty = 1 Fork/exec using slirp.telnetd - * do_ptr = 2 Fork/exec using pty - */ -int fork_exec(struct socket *so, char *ex, int do_pty) -{ - int s; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); - int opt; - int master; - char *argv[256]; -#if 0 - char buff[256]; -#endif - /* don't want to clobber the original */ - char *bptr; - char *curarg; - int c, i, ret; - - DEBUG_CALL("fork_exec"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("ex = %lx", (long)ex); - DEBUG_ARG("do_pty = %lx", (long)do_pty); - - if (do_pty == 2) { - if (slirp_openpty(&master, &s) == -1) { - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } - } else { - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_port = 0; - addr.sin_addr.s_addr = INADDR_ANY; - - if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0 || - bind(s, (struct sockaddr *)&addr, addrlen) < 0 || - listen(s, 1) < 0) { - lprint("Error: inet socket: %s\n", strerror(errno)); - closesocket(s); - - return 0; - } - } - - switch(fork()) { - case -1: - lprint("Error: fork failed: %s\n", strerror(errno)); - close(s); - if (do_pty == 2) - close(master); - return 0; - - case 0: - /* Set the DISPLAY */ - if (do_pty == 2) { - (void) close(master); -#ifdef TIOCSCTTY /* XXXXX */ - (void) setsid(); - ioctl(s, TIOCSCTTY, (char *)NULL); -#endif - } else { - getsockname(s, (struct sockaddr *)&addr, &addrlen); - close(s); - /* - * Connect to the socket - * XXX If any of these fail, we're in trouble! - */ - s = socket(AF_INET, SOCK_STREAM, 0); - addr.sin_addr = loopback_addr; - do { - ret = connect(s, (struct sockaddr *)&addr, addrlen); - } while (ret < 0 && errno == EINTR); - } - -#if 0 - if (x_port >= 0) { -#ifdef HAVE_SETENV - sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - setenv("DISPLAY", buff, 1); -#else - sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - putenv(buff); -#endif - } -#endif - dup2(s, 0); - dup2(s, 1); - dup2(s, 2); - for (s = 3; s <= 255; s++) - close(s); - - i = 0; - bptr = strdup(ex); /* No need to free() this */ - if (do_pty == 1) { - /* Setup "slirp.telnetd -x" */ - argv[i++] = "slirp.telnetd"; - argv[i++] = "-x"; - argv[i++] = bptr; - } else - do { - /* Change the string into argv[] */ - curarg = bptr; - while (*bptr != ' ' && *bptr != (char)0) - bptr++; - c = *bptr; - *bptr++ = (char)0; - argv[i++] = strdup(curarg); - } while (c); - - argv[i] = 0; - execvp(argv[0], argv); - - /* Ooops, failed, let's tell the user why */ - { - char buff[256]; - - sprintf(buff, "Error: execvp of %s failed: %s\n", - argv[0], strerror(errno)); - write(2, buff, strlen(buff)+1); - } - close(0); close(1); close(2); /* XXX */ - exit(1); - - default: - if (do_pty == 2) { - close(s); - so->s = master; - } else { - /* - * XXX this could block us... - * XXX Should set a timer here, and if accept() doesn't - * return after X seconds, declare it a failure - * The only reason this will block forever is if socket() - * of connect() fail in the child process - */ - do { - so->s = accept(s, (struct sockaddr *)&addr, &addrlen); - } while (so->s < 0 && errno == EINTR); - closesocket(s); - opt = 1; - setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - } - fd_nonblock(so->s); - - /* Append the telnet options now */ - if (so->so_m != 0 && do_pty == 1) { - sbappend(so, so->so_m); - so->so_m = 0; - } - - return 1; - } -} -#endif - -#ifndef HAVE_STRDUP -char *strdup(const char *str) -{ - char *bptr; - - bptr = (char *)malloc(strlen(str)+1); - strcpy(bptr, str); - - return bptr; -} -#endif - -#if 0 -void snooze_hup(int num) -{ - int s, ret; -#ifndef NO_UNIX_SOCKETS - struct sockaddr_un sock_un; -#endif - struct sockaddr_in sock_in; - char buff[256]; - - ret = -1; - if (slirp_socket_passwd) { - s = socket(AF_INET, SOCK_STREAM, 0); - if (s < 0) - slirp_exit(1); - sock_in.sin_family = AF_INET; - sock_in.sin_addr.s_addr = slirp_socket_addr; - sock_in.sin_port = htons(slirp_socket_port); - if (connect(s, (struct sockaddr *)&sock_in, sizeof(sock_in)) != 0) - slirp_exit(1); /* just exit...*/ - sprintf(buff, "kill %s:%d", slirp_socket_passwd, slirp_socket_unit); - write(s, buff, strlen(buff)+1); - } -#ifndef NO_UNIX_SOCKETS - else { - s = socket(AF_UNIX, SOCK_STREAM, 0); - if (s < 0) - slirp_exit(1); - sock_un.sun_family = AF_UNIX; - strcpy(sock_un.sun_path, socket_path); - if (connect(s, (struct sockaddr *)&sock_un, - sizeof(sock_un.sun_family) + sizeof(sock_un.sun_path)) != 0) - slirp_exit(1); - sprintf(buff, "kill none:%d", slirp_socket_unit); - write(s, buff, strlen(buff)+1); - } -#endif - slirp_exit(0); -} - - -void snooze() -{ - sigset_t s; - int i; - - /* Don't need our data anymore */ - /* XXX This makes SunOS barf */ -/* brk(0); */ - - /* Close all fd's */ - for (i = 255; i >= 0; i--) - close(i); - - signal(SIGQUIT, slirp_exit); - signal(SIGHUP, snooze_hup); - sigemptyset(&s); - - /* Wait for any signal */ - sigsuspend(&s); - - /* Just in case ... */ - exit(255); -} - -void relay(int s) -{ - char buf[8192]; - int n; - fd_set readfds; - struct ttys *ttyp; - - /* Don't need our data anymore */ - /* XXX This makes SunOS barf */ -/* brk(0); */ - - signal(SIGQUIT, slirp_exit); - signal(SIGHUP, slirp_exit); - signal(SIGINT, slirp_exit); - signal(SIGTERM, slirp_exit); - - /* Fudge to get term_raw and term_restore to work */ - if (NULL == (ttyp = tty_attach (0, slirp_tty))) { - lprint ("Error: tty_attach failed in misc.c:relay()\r\n"); - slirp_exit (1); - } - ttyp->fd = 0; - ttyp->flags |= TTY_CTTY; - term_raw(ttyp); - - while (1) { - FD_ZERO(&readfds); - - FD_SET(0, &readfds); - FD_SET(s, &readfds); - - n = select(s+1, &readfds, (fd_set *)0, (fd_set *)0, (struct timeval *)0); - - if (n <= 0) - slirp_exit(0); - - if (FD_ISSET(0, &readfds)) { - n = read(0, buf, 8192); - if (n <= 0) - slirp_exit(0); - n = writen(s, buf, n); - if (n <= 0) - slirp_exit(0); - } - - if (FD_ISSET(s, &readfds)) { - n = read(s, buf, 8192); - if (n <= 0) - slirp_exit(0); - n = writen(0, buf, n); - if (n <= 0) - slirp_exit(0); - } - } - - /* Just in case.... */ - exit(1); -} -#endif - -int (*lprint_print)(void *, const char *, va_list); -char *lprint_ptr, *lprint_ptr2, **lprint_arg; - -void lprint(const char *format, ...) -{ - va_list args; - - va_start(args, format); -#if 0 - /* If we're printing to an sbuf, make sure there's enough room */ - /* XXX +100? */ - if (lprint_sb) { - if ((lprint_ptr - lprint_sb->sb_wptr) >= - (lprint_sb->sb_datalen - (strlen(format) + 100))) { - int deltaw = lprint_sb->sb_wptr - lprint_sb->sb_data; - int deltar = lprint_sb->sb_rptr - lprint_sb->sb_data; - int deltap = lprint_ptr - lprint_sb->sb_data; - - lprint_sb->sb_data = (char *)realloc(lprint_sb->sb_data, - lprint_sb->sb_datalen + TCP_SNDSPACE); - - /* Adjust all values */ - lprint_sb->sb_wptr = lprint_sb->sb_data + deltaw; - lprint_sb->sb_rptr = lprint_sb->sb_data + deltar; - lprint_ptr = lprint_sb->sb_data + deltap; - - lprint_sb->sb_datalen += TCP_SNDSPACE; - } - } -#endif - if (lprint_print) - lprint_ptr += (*lprint_print)(*lprint_arg, format, args); - - /* Check if they want output to be logged to file as well */ - if (lfd) { - /* - * Remove \r's - * otherwise you'll get ^M all over the file - */ - int len = strlen(format); - char *bptr1, *bptr2; - - bptr1 = bptr2 = strdup(format); - - while (len--) { - if (*bptr1 == '\r') - memcpy(bptr1, bptr1+1, len+1); - else - bptr1++; - } - vfprintf(lfd, bptr2, args); - free(bptr2); - } - va_end(args); -} - -void add_emu(char *buff) -{ - u_int lport, fport; - u_int8_t tos = 0, emu = 0; - char buff1[256], buff2[256], buff4[128]; - char *buff3 = buff4; - struct emu_t *emup; - struct socket *so; - - if (sscanf(buff, "%256s %256s", buff2, buff1) != 2) { - lprint("Error: Bad arguments\r\n"); - return; - } - - if (sscanf(buff1, "%d:%d", &lport, &fport) != 2) { - lport = 0; - if (sscanf(buff1, "%d", &fport) != 1) { - lprint("Error: Bad first argument\r\n"); - return; - } - } - - if (sscanf(buff2, "%128[^:]:%128s", buff1, buff3) != 2) { - buff3 = 0; - if (sscanf(buff2, "%256s", buff1) != 1) { - lprint("Error: Bad second argument\r\n"); - return; - } - } - - if (buff3) { - if (strcmp(buff3, "lowdelay") == 0) - tos = IPTOS_LOWDELAY; - else if (strcmp(buff3, "throughput") == 0) - tos = IPTOS_THROUGHPUT; - else { - lprint("Error: Expecting \"lowdelay\"/\"throughput\"\r\n"); - return; - } - } - - if (strcmp(buff1, "ftp") == 0) - emu = EMU_FTP; - else if (strcmp(buff1, "irc") == 0) - emu = EMU_IRC; - else if (strcmp(buff1, "none") == 0) - emu = EMU_NONE; /* ie: no emulation */ - else { - lprint("Error: Unknown service\r\n"); - return; - } - - /* First, check that it isn't already emulated */ - for (emup = tcpemu; emup; emup = emup->next) { - if (emup->lport == lport && emup->fport == fport) { - lprint("Error: port already emulated\r\n"); - return; - } - } - - /* link it */ - emup = (struct emu_t *)malloc(sizeof (struct emu_t)); - emup->lport = (u_int16_t)lport; - emup->fport = (u_int16_t)fport; - emup->tos = tos; - emup->emu = emu; - emup->next = tcpemu; - tcpemu = emup; - - /* And finally, mark all current sessions, if any, as being emulated */ - for (so = tcb.so_next; so != &tcb; so = so->so_next) { - if ((lport && lport == ntohs(so->so_lport)) || - (fport && fport == ntohs(so->so_fport))) { - if (emu) - so->so_emu = emu; - if (tos) - so->so_iptos = tos; - } - } - - lprint("Adding emulation for %s to port %d/%d\r\n", buff1, emup->lport, emup->fport); -} - -#ifdef BAD_SPRINTF - -#undef vsprintf -#undef sprintf - -/* - * Some BSD-derived systems have a sprintf which returns char * - */ - -int vsprintf_len(char *string, const char *format, va_list args) -{ - vsprintf(string, format, args); - return strlen(string); -} - -int sprintf_len(char *string, const char *format, ...) -{ - va_list args; - va_start(args, format); - vsprintf(string, format, args); - va_end(args); - return strlen(string); -} - -#endif - -void u_sleep(int usec) -{ - struct timeval t; - fd_set fdset; - - FD_ZERO(&fdset); - - t.tv_sec = 0; - t.tv_usec = usec * 1000; - - select(0, &fdset, &fdset, &fdset, &t); -} - -/* - * Set fd blocking and non-blocking - */ - -void fd_nonblock(int fd) -{ -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 1; - - ioctlsocket(fd, FIONBIO, &opt); -#else - int opt; - - opt = fcntl(fd, F_GETFL, 0); - opt |= O_NONBLOCK; - fcntl(fd, F_SETFL, opt); -#endif -} - -void fd_block(int fd) -{ -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 0; - - ioctlsocket(fd, FIONBIO, &opt); -#else - int opt; - - opt = fcntl(fd, F_GETFL, 0); - opt &= ~O_NONBLOCK; - fcntl(fd, F_SETFL, opt); -#endif -} - - -#if 0 -/* - * invoke RSH - */ -int rsh_exec(struct socket *so, struct socket *ns, - char *user, char *host, char *args) -{ - int fd[2]; - int fd0[2]; - int s; - char buff[256]; - - DEBUG_CALL("rsh_exec"); - DEBUG_ARG("so = %lx", (long)so); - - if (pipe(fd)<0) { - lprint("Error: pipe failed: %s\n", strerror(errno)); - return 0; - } -/* #ifdef HAVE_SOCKETPAIR */ -#if 1 - if (socketpair(PF_UNIX,SOCK_STREAM,0, fd0) == -1) { - close(fd[0]); - close(fd[1]); - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } -#else - if (slirp_openpty(&fd0[0], &fd0[1]) == -1) { - close(fd[0]); - close(fd[1]); - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } -#endif - - switch(fork()) { - case -1: - lprint("Error: fork failed: %s\n", strerror(errno)); - close(fd[0]); - close(fd[1]); - close(fd0[0]); - close(fd0[1]); - return 0; - - case 0: - close(fd[0]); - close(fd0[0]); - - /* Set the DISPLAY */ - if (x_port >= 0) { -#ifdef HAVE_SETENV - sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - setenv("DISPLAY", buff, 1); -#else - sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - putenv(buff); -#endif - } - - dup2(fd0[1], 0); - dup2(fd0[1], 1); - dup2(fd[1], 2); - for (s = 3; s <= 255; s++) - close(s); - - execlp("rsh","rsh","-l", user, host, args, NULL); - - /* Ooops, failed, let's tell the user why */ - - sprintf(buff, "Error: execlp of %s failed: %s\n", - "rsh", strerror(errno)); - write(2, buff, strlen(buff)+1); - close(0); close(1); close(2); /* XXX */ - exit(1); - - default: - close(fd[1]); - close(fd0[1]); - ns->s=fd[0]; - so->s=fd0[0]; - - return 1; - } -} -#endif diff --git a/BasiliskII/src/slirp/misc.h b/BasiliskII/src/slirp/misc.h deleted file mode 100644 index 381f5f3e7..000000000 --- a/BasiliskII/src/slirp/misc.h +++ /dev/null @@ -1,87 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _MISC_H_ -#define _MISC_H_ - -struct ex_list { - int ex_pty; /* Do we want a pty? */ - int ex_addr; /* The last byte of the address */ - int ex_fport; /* Port to telnet to */ - char *ex_exec; /* Command line of what to exec */ - struct ex_list *ex_next; -}; - -extern struct ex_list *exec_list; -extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; - -extern int (*lprint_print)(void *, const char *, va_list); -extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; -extern struct sbuf *lprint_sb; - -#ifndef HAVE_STRDUP -char *strdup(const char *); -#endif - -void do_wait(int); - -#define EMU_NONE 0x0 - -/* TCP emulations */ -#define EMU_CTL 0x1 -#define EMU_FTP 0x2 -#define EMU_KSH 0x3 -#define EMU_IRC 0x4 -#define EMU_REALAUDIO 0x5 -#define EMU_RLOGIN 0x6 -#define EMU_IDENT 0x7 -#define EMU_RSH 0x8 - -#define EMU_NOCONNECT 0x10 /* Don't connect */ - -/* UDP emulations */ -#define EMU_TALK 0x1 -#define EMU_NTALK 0x2 -#define EMU_CUSEEME 0x3 - -struct tos_t { - u_int16_t lport; - u_int16_t fport; - u_int8_t tos; - u_int8_t emu; -}; - -struct emu_t { - u_int16_t lport; - u_int16_t fport; - u_int8_t tos; - u_int8_t emu; - struct emu_t *next; -}; - -extern struct emu_t *tcpemu; - -extern int x_port, x_server, x_display; - -int show_x(char *, struct socket *); -void redir_x(u_int32_t, int, int, int); -void getouraddr(void); -void slirp_insque(void *, void *); -void slirp_remque(void *); -int add_exec(struct ex_list **, int, char *, int, int); -int slirp_openpty(int *, int *); -int fork_exec(struct socket *, char *, int); -void snooze_hup(int); -void snooze(void); -void relay(int); -void add_emu(char *); -void u_sleep(int); -void fd_nonblock(int); -void fd_block(int); -int rsh_exec(struct socket *, struct socket *, char *, char *, char *); - -#endif diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c deleted file mode 100644 index 6af075e79..000000000 --- a/BasiliskII/src/slirp/sbuf.c +++ /dev/null @@ -1,183 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include - -/* Done as a macro in socket.h */ -/* int - * sbspace(struct sockbuff *sb) - * { - * return SB_DATALEN - sb->sb_cc; - * } - */ - -void sbfree(struct sbuf *sb) -{ - free(sb->sb_data); -} - -void sbdrop(struct sbuf *sb, u_int num) -{ - /* - * We can only drop how much we have - * This should never succeed - */ - if(num > sb->sb_cc) - num = sb->sb_cc; - sb->sb_cc -= num; - sb->sb_rptr += num; - if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen) - sb->sb_rptr -= sb->sb_datalen; - -} - -void sbreserve(struct sbuf *sb, size_t size) -{ - if (sb->sb_data) { - /* Already alloced, realloc if necessary */ - if (sb->sb_datalen != size) { - sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)realloc(sb->sb_data, size); - sb->sb_cc = 0; - if (sb->sb_wptr) - sb->sb_datalen = size; - else - sb->sb_datalen = 0; - } - } else { - sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)malloc(size); - sb->sb_cc = 0; - if (sb->sb_wptr) - sb->sb_datalen = size; - else - sb->sb_datalen = 0; - } -} - -/* - * Try and write() to the socket, whatever doesn't get written - * append to the buffer... for a host with a fast net connection, - * this prevents an unnecessary copy of the data - * (the socket is non-blocking, so we won't hang) - */ -void sbappend(struct socket *so, struct mbuf *m) -{ - int ret = 0; - - DEBUG_CALL("sbappend"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %d", m->m_len); - - /* Shouldn't happen, but... e.g. foreign host closes connection */ - if (m->m_len <= 0) { - m_free(m); - return; - } - - /* - * If there is urgent data, call sosendoob - * if not all was sent, sowrite will take care of the rest - * (The rest of this function is just an optimisation) - */ - if (so->so_urgc) { - sbappendsb(&so->so_rcv, m); - m_free(m); - sosendoob(so); - return; - } - - /* - * We only write if there's nothing in the buffer, - * ottherwise it'll arrive out of order, and hence corrupt - */ - if (!so->so_rcv.sb_cc) - ret = send(so->s, m->m_data, m->m_len, 0); - - if (ret <= 0) { - /* - * Nothing was written - * It's possible that the socket has closed, but - * we don't need to check because if it has closed, - * it will be detected in the normal way by soread() - */ - sbappendsb(&so->so_rcv, m); - } else if (ret != m->m_len) { - /* - * Something was written, but not everything.. - * sbappendsb the rest - */ - m->m_len -= ret; - m->m_data += ret; - sbappendsb(&so->so_rcv, m); - } /* else */ - /* Whatever happened, we free the mbuf */ - m_free(m); -} - -/* - * Copy the data from m into sb - * The caller is responsible to make sure there's enough room - */ -void sbappendsb(struct sbuf *sb, struct mbuf *m) -{ - int len, n, nn; - - len = m->m_len; - - if (sb->sb_wptr < sb->sb_rptr) { - n = sb->sb_rptr - sb->sb_wptr; - if (n > len) n = len; - memcpy(sb->sb_wptr, m->m_data, n); - } else { - /* Do the right edge first */ - n = sb->sb_data + sb->sb_datalen - sb->sb_wptr; - if (n > len) n = len; - memcpy(sb->sb_wptr, m->m_data, n); - len -= n; - if (len) { - /* Now the left edge */ - nn = sb->sb_rptr - sb->sb_data; - if (nn > len) nn = len; - memcpy(sb->sb_data,m->m_data+n,nn); - n += nn; - } - } - - sb->sb_cc += n; - sb->sb_wptr += n; - if (sb->sb_wptr >= sb->sb_data + sb->sb_datalen) - sb->sb_wptr -= sb->sb_datalen; -} - -/* - * Copy data from sbuf to a normal, straight buffer - * Don't update the sbuf rptr, this will be - * done in sbdrop when the data is acked - */ -void sbcopy(struct sbuf *sb, u_int off, u_int len, char *to) -{ - char *from; - - from = sb->sb_rptr + off; - if (from >= sb->sb_data + sb->sb_datalen) - from -= sb->sb_datalen; - - if (from < sb->sb_wptr) { - if (len > sb->sb_cc) len = sb->sb_cc; - memcpy(to,from,len); - } else { - /* re-use off */ - off = (sb->sb_data + sb->sb_datalen) - from; - if (off > len) off = len; - memcpy(to,from,off); - len -= off; - if (len) - memcpy(to+off,sb->sb_data,len); - } -} - diff --git a/BasiliskII/src/slirp/sbuf.h b/BasiliskII/src/slirp/sbuf.h deleted file mode 100644 index 04f7981c7..000000000 --- a/BasiliskII/src/slirp/sbuf.h +++ /dev/null @@ -1,33 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _SBUF_H_ -#define _SBUF_H_ - -#include - -#define sbflush(sb) sbdrop((sb),(sb)->sb_cc) -#define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) - -struct sbuf { - u_int sb_cc; /* actual chars in buffer */ - u_int sb_datalen; /* Length of data */ - char *sb_wptr; /* write pointer. points to where the next - * bytes should be written in the sbuf */ - char *sb_rptr; /* read pointer. points to where the next - * byte should be read from the sbuf */ - char *sb_data; /* Actual data */ -}; - -void sbfree(struct sbuf *); -void sbdrop(struct sbuf *, u_int); -void sbreserve(struct sbuf *, size_t); -void sbappend(struct socket *, struct mbuf *); -void sbappendsb(struct sbuf *, struct mbuf *); -void sbcopy(struct sbuf *, u_int, u_int, char *); - -#endif diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c deleted file mode 100644 index d8f2a9545..000000000 --- a/BasiliskII/src/slirp/slirp.c +++ /dev/null @@ -1,676 +0,0 @@ -#include "slirp.h" - -/* host address */ -struct in_addr our_addr; -/* host dns address */ -struct in_addr dns_addr; -/* host loopback address */ -struct in_addr loopback_addr; - -/* address for slirp virtual addresses */ -struct in_addr special_addr; -/* virtual address alias for host */ -struct in_addr alias_addr; - -const uint8_t special_ethaddr[6] = { - 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 -}; - -uint8_t client_ethaddr[6]; - -int do_slowtimo; -int link_up; -struct timeval tt; -FILE *lfd; -struct ex_list *exec_list; - -/* XXX: suppress those select globals */ -fd_set *global_readfds, *global_writefds, *global_xfds; - -char slirp_hostname[33]; - -#ifdef _WIN32 - -static int get_dns_addr(struct in_addr *pdns_addr) -{ - FIXED_INFO *FixedInfo=NULL; - ULONG BufLen; - DWORD ret; - IP_ADDR_STRING *pIPAddr; - struct in_addr tmp_addr; - - FixedInfo = (FIXED_INFO *)GlobalAlloc(GPTR, sizeof(FIXED_INFO)); - BufLen = sizeof(FIXED_INFO); - - if (ERROR_BUFFER_OVERFLOW == GetNetworkParams(FixedInfo, &BufLen)) { - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - FixedInfo = GlobalAlloc(GPTR, BufLen); - } - - if ((ret = GetNetworkParams(FixedInfo, &BufLen)) != ERROR_SUCCESS) { - printf("GetNetworkParams failed. ret = %08x\n", (u_int)ret ); - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - return -1; - } - - pIPAddr = &(FixedInfo->DnsServerList); - inet_aton(pIPAddr->IpAddress.String, &tmp_addr); - *pdns_addr = tmp_addr; -#if 0 - printf( "DNS Servers:\n" ); - printf( "DNS Addr:%s\n", pIPAddr->IpAddress.String ); - - pIPAddr = FixedInfo -> DnsServerList.Next; - while ( pIPAddr ) { - printf( "DNS Addr:%s\n", pIPAddr ->IpAddress.String ); - pIPAddr = pIPAddr ->Next; - } -#endif - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - return 0; -} - -#else - -static int get_dns_addr(struct in_addr *pdns_addr) -{ - char buff[512]; - char buff2[256]; - FILE *f; - int found = 0; - struct in_addr tmp_addr; - - f = fopen("/etc/resolv.conf", "r"); - if (!f) - return -1; - - lprint("IP address of your DNS(s): "); - while (fgets(buff, 512, f) != NULL) { - if (sscanf(buff, "nameserver%*[ \t]%256s", buff2) == 1) { - if (!inet_aton(buff2, &tmp_addr)) - continue; - if (tmp_addr.s_addr == loopback_addr.s_addr) - tmp_addr = our_addr; - /* If it's the first one, set it to dns_addr */ - if (!found) - *pdns_addr = tmp_addr; - else - lprint(", "); - if (++found > 3) { - lprint("(more)"); - break; - } else - lprint("%s", inet_ntoa(tmp_addr)); - } - } - fclose(f); - if (!found) - return -1; - return 0; -} - -#endif - -#ifdef _WIN32 -void slirp_cleanup(void) -{ - WSACleanup(); -} -#endif - -int slirp_init(void) -{ - // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); - -#ifdef _WIN32 - { - WSADATA Data; - WSAStartup(MAKEWORD(2,0), &Data); - atexit(slirp_cleanup); - } -#endif - - link_up = 1; - - if_init(); - ip_init(); - - /* Initialise mbufs *after* setting the MTU */ - m_init(); - - /* set default addresses */ - inet_aton("127.0.0.1", &loopback_addr); - - if (get_dns_addr(&dns_addr) < 0) - return -1; - - inet_aton(CTL_SPECIAL, &special_addr); - alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); - getouraddr(); - return 0; -} - -#define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) -#define CONN_CANFRCV(so) (((so)->so_state & (SS_FCANTRCVMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) -#define UPD_NFDS(x) if (nfds < (x)) nfds = (x) - -/* - * curtime kept to an accuracy of 1ms - */ -#ifdef _WIN32 -static void updtime(void) -{ - struct _timeb tb; - - _ftime(&tb); - curtime = (u_int)tb.time * (u_int)1000; - curtime += (u_int)tb.millitm; -} -#else -static void updtime(void) -{ - gettimeofday(&tt, 0); - - curtime = (u_int)tt.tv_sec * (u_int)1000; - curtime += (u_int)tt.tv_usec / (u_int)1000; - - if ((tt.tv_usec % 1000) >= 500) - curtime++; -} -#endif - -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds) -{ - struct socket *so, *so_next; - int nfds; - int timeout, tmp_time; - - /* fail safe */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; - - nfds = *pnfds; - /* - * First, TCP sockets - */ - do_slowtimo = 0; - if (link_up) { - /* - * *_slowtimo needs calling if there are IP fragments - * in the fragment queue, or there are TCP connections active - */ - do_slowtimo = ((tcb.so_next != &tcb) || - ((struct ipasfrag *)&ipq != (struct ipasfrag *)ipq.next)); - - for (so = tcb.so_next; so != &tcb; so = so_next) { - so_next = so->so_next; - - /* - * See if we need a tcp_fasttimo - */ - if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ - - /* - * NOFDREF can include still connecting to local-host, - * newly socreated() sockets etc. Don't want to select these. - */ - if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - - /* - * Set for reading sockets which are accepting - */ - if (so->so_state & SS_FACCEPTCONN) { - FD_SET(so->s, readfds); - UPD_NFDS(so->s); - continue; - } - - /* - * Set for writing sockets which are connecting - */ - if (so->so_state & SS_ISFCONNECTING) { - FD_SET(so->s, writefds); - UPD_NFDS(so->s); - continue; - } - - /* - * Set for writing if we are connected, can send more, and - * we have something to send - */ - if (CONN_CANFSEND(so) && so->so_rcv.sb_cc) { - FD_SET(so->s, writefds); - UPD_NFDS(so->s); - } - - /* - * Set for reading (and urgent data) if we are connected, can - * receive more, and we have room for it XXX /2 ? - */ - if (CONN_CANFRCV(so) && (so->so_snd.sb_cc < (so->so_snd.sb_datalen/2))) { - FD_SET(so->s, readfds); - FD_SET(so->s, xfds); - UPD_NFDS(so->s); - } - } - - /* - * UDP sockets - */ - for (so = udb.so_next; so != &udb; so = so_next) { - so_next = so->so_next; - - /* - * See if it's timed out - */ - if (so->so_expire) { - if (so->so_expire <= curtime) { - udp_detach(so); - continue; - } else - do_slowtimo = 1; /* Let socket expire */ - } - - /* - * When UDP packets are received from over the - * link, they're sendto()'d straight away, so - * no need for setting for writing - * Limit the number of packets queued by this session - * to 4. Note that even though we try and limit this - * to 4 packets, the session could have more queued - * if the packets needed to be fragmented - * (XXX <= 4 ?) - */ - if ((so->so_state & SS_ISFCONNECTED) && so->so_queued <= 4) { - FD_SET(so->s, readfds); - UPD_NFDS(so->s); - } - } - } - - /* - * Setup timeout to use minimum CPU usage, especially when idle - */ - - timeout = -1; - - /* - * If a slowtimo is needed, set timeout to 5ms from the last - * slow timeout. If a fast timeout is needed, set timeout within - * 2ms of when it was requested. - */ -# define SLOW_TIMO 5 -# define FAST_TIMO 2 - if (do_slowtimo) { - timeout = (SLOW_TIMO - (curtime - last_slowtimo)) * 1000; - if (timeout < 0) - timeout = 0; - else if (timeout > (SLOW_TIMO * 1000)) - timeout = SLOW_TIMO * 1000; - - /* Can only fasttimo if we also slowtimo */ - if (time_fasttimo) { - tmp_time = (FAST_TIMO - (curtime - time_fasttimo)) * 1000; - if (tmp_time < 0) - tmp_time = 0; - - /* Choose the smallest of the 2 */ - if (tmp_time < timeout) - timeout = tmp_time; - } - } - *pnfds = nfds; - - /* - * Adjust the timeout to make the minimum timeout - * 2ms (XXX?) to lessen the CPU load - */ - if (timeout < (FAST_TIMO * 1000)) - timeout = FAST_TIMO * 1000; - - return timeout; -} - -void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) -{ - struct socket *so, *so_next; - int ret; - - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; - - /* Update time */ - updtime(); - - /* - * See if anything has timed out - */ - if (link_up) { - if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { - tcp_fasttimo(); - time_fasttimo = 0; - } - if (do_slowtimo && ((curtime - last_slowtimo) >= SLOW_TIMO)) { - ip_slowtimo(); - tcp_slowtimo(); - last_slowtimo = curtime; - } - } - - /* - * Check sockets - */ - if (link_up) { - /* - * Check TCP sockets - */ - for (so = tcb.so_next; so != &tcb; so = so_next) { - so_next = so->so_next; - - /* - * FD_ISSET is meaningless on these sockets - * (and they can crash the program) - */ - if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - - /* - * Check for URG data - * This will soread as well, so no need to - * test for readfds below if this succeeds - */ - if (FD_ISSET(so->s, xfds)) - sorecvoob(so); - /* - * Check sockets for reading - */ - else if (FD_ISSET(so->s, readfds)) { - /* - * Check for incoming connections - */ - if (so->so_state & SS_FACCEPTCONN) { - tcp_connect(so); - continue; - } /* else */ - ret = soread(so); - - /* Output it if we read something */ - if (ret > 0) - tcp_output(sototcpcb(so)); - } - - /* - * Check sockets for writing - */ - if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, (char*)&ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } - else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ - } - - /* - * Probe a still-connecting, non-blocking socket - * to check if it's still alive - */ -#ifdef PROBE_CONN - if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0, 0); - - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } - else { - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXX */ - int error = WSAGetLastError(); - if (error == EAGAIN || error == WSAEWOULDBLOCK || - error == WSAEINPROGRESS || error == WSAENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } - else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - } /* SS_ISFCONNECTING */ -#endif - } - - /* - * Now UDP sockets. - * Incoming packets are sent straight away, they're not buffered. - * Incoming UDP data isn't buffered either. - */ - for (so = udb.so_next; so != &udb; so = so_next) { - so_next = so->so_next; - - if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } - } -} - - /* - * See if we can start outputting - */ - if (if_queued && link_up) - if_start(); - - /* clear global file descriptor sets. - * these reside on the stack in vl.c - * so they're unusable if we're not in - * slirp_select_fill or slirp_select_poll. - */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; -} - -#define ETH_ALEN 6 -#define ETH_HLEN 14 - -#define ETH_P_IP 0x0800 /* Internet Protocol packet */ -#define ETH_P_ARP 0x0806 /* Address Resolution packet */ - -#define ARPOP_REQUEST 1 /* ARP request */ -#define ARPOP_REPLY 2 /* ARP reply */ - -struct ethhdr -{ - unsigned char h_dest[ETH_ALEN]; /* destination eth addr */ - unsigned char h_source[ETH_ALEN]; /* source ether addr */ - unsigned short h_proto; /* packet type ID field */ -}; - -struct arphdr -{ - unsigned short ar_hrd; /* format of hardware address */ - unsigned short ar_pro; /* format of protocol address */ - unsigned char ar_hln; /* length of hardware address */ - unsigned char ar_pln; /* length of protocol address */ - unsigned short ar_op; /* ARP opcode (command) */ - - /* - * Ethernet looks like this : This bit is variable sized however... - */ - unsigned char ar_sha[ETH_ALEN]; /* sender hardware address */ - unsigned char ar_sip[4]; /* sender IP address */ - unsigned char ar_tha[ETH_ALEN]; /* target hardware address */ - unsigned char ar_tip[4]; /* target IP address */ -}; - -void arp_input(const uint8_t *pkt, int pkt_len) -{ - struct ethhdr *eh = (struct ethhdr *)pkt; - struct arphdr *ah = (struct arphdr *)(pkt + ETH_HLEN); - uint8_t arp_reply[ETH_HLEN + sizeof(struct arphdr)]; - struct ethhdr *reh = (struct ethhdr *)arp_reply; - struct arphdr *rah = (struct arphdr *)(arp_reply + ETH_HLEN); - int ar_op; - struct ex_list *ex_ptr; - - ar_op = ntohs(ah->ar_op); - switch(ar_op) { - case ARPOP_REQUEST: - if (!memcmp(ah->ar_tip, &special_addr, 3)) { - if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) - goto arp_ok; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_addr == ah->ar_tip[3]) - goto arp_ok; - } - return; - arp_ok: - /* XXX: make an ARP request to have the client address */ - memcpy(client_ethaddr, eh->h_source, ETH_ALEN); - - /* ARP request for alias/dns mac address */ - memcpy(reh->h_dest, pkt + ETH_ALEN, ETH_ALEN); - memcpy(reh->h_source, special_ethaddr, ETH_ALEN - 1); - reh->h_source[5] = ah->ar_tip[3]; - reh->h_proto = htons(ETH_P_ARP); - - rah->ar_hrd = htons(1); - rah->ar_pro = htons(ETH_P_IP); - rah->ar_hln = ETH_ALEN; - rah->ar_pln = 4; - rah->ar_op = htons(ARPOP_REPLY); - memcpy(rah->ar_sha, reh->h_source, ETH_ALEN); - memcpy(rah->ar_sip, ah->ar_tip, 4); - memcpy(rah->ar_tha, ah->ar_sha, ETH_ALEN); - memcpy(rah->ar_tip, ah->ar_sip, 4); - slirp_output(arp_reply, sizeof(arp_reply)); - } - break; - default: - break; - } -} - -void slirp_input(const uint8_t *pkt, int pkt_len) -{ - struct mbuf *m; - int proto; - - if (pkt_len < ETH_HLEN) - return; - - proto = (pkt[12] << 8) | pkt[13]; - switch(proto) { - case ETH_P_ARP: - arp_input(pkt, pkt_len); - break; - case ETH_P_IP: - m = m_get(); - if (!m) - return; - /* Note: we add to align the IP header */ - m->m_len = pkt_len + 2; - memcpy(m->m_data + 2, pkt, pkt_len); - - m->m_data += 2 + ETH_HLEN; - m->m_len -= 2 + ETH_HLEN; - - ip_input(m); - break; - default: - break; - } -} - -/* output the IP packet to the ethernet device */ -void if_encap(const uint8_t *ip_data, int ip_data_len) -{ - uint8_t buf[1600]; - struct ethhdr *eh = (struct ethhdr *)buf; - - if (ip_data_len + ETH_HLEN > sizeof(buf)) - return; - - memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); - memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); - /* XXX: not correct */ - eh->h_source[5] = CTL_ALIAS; - eh->h_proto = htons(ETH_P_IP); - memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); - slirp_output(buf, ip_data_len + ETH_HLEN); -} - -int slirp_redir(int is_udp, int host_port, - struct in_addr guest_addr, int guest_port) -{ - if (is_udp) { - if (!udp_listen(htons(host_port), guest_addr.s_addr, - htons(guest_port), 0)) - return -1; - } else { - if (!solisten(htons(host_port), guest_addr.s_addr, - htons(guest_port), 0)) - return -1; - } - return 0; -} - -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, - int guest_port) -{ - return add_exec(&exec_list, do_pty, (char *)args, - addr_low_byte, htons(guest_port)); -} diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h deleted file mode 100644 index b845caa77..000000000 --- a/BasiliskII/src/slirp/slirp.h +++ /dev/null @@ -1,358 +0,0 @@ -#ifndef __COMMON_H__ -#define __COMMON_H__ - -#define CONFIG_QEMU - -#define DEBUG 1 - -#ifndef CONFIG_QEMU -#include "version.h" -#endif -#include "config.h" -#include "slirp_config.h" - -#ifdef _WIN32 -# include - -typedef uint8_t u_int8_t; -typedef uint16_t u_int16_t; -typedef uint32_t u_int32_t; -typedef uint64_t u_int64_t; -typedef char *caddr_t; -typedef int socklen_t; -typedef unsigned long ioctlsockopt_t; - -# include -# include -# include -# include - -# define USE_FIONBIO 1 - -/* Basilisk II Router defines those */ -# define udp_read_completion slirp_udp_read_completion -# define write_udp slirp_write_udp -# define init_udp slirp_init_udp -# define final_udp slirp_final_udp -#else -# define WSAGetLastError() (int)(errno) -# define WSASetLastError(e) (void)(errno = (e)) -# define WSAEWOULDBLOCK EWOULDBLOCK -# define WSAEINPROGRESS EINPROGRESS -# define WSAENOTCONN ENOTCONN -# define WSAEHOSTUNREACH EHOSTUNREACH -# define WSAENETUNREACH ENETUNREACH -# define WSAECONNREFUSED ECONNREFUSED -typedef int ioctlsockopt_t; -# define ioctlsocket ioctl -# define closesocket(s) close(s) -# define O_BINARY 0 -#endif - -#include -#ifdef HAVE_SYS_BITYPES_H -# include -#endif -#ifdef HAVE_STDINT_H -# include -#endif - -#ifndef _WIN32 -#include -#endif - -#ifdef NEED_TYPEDEFS -typedef char int8_t; -typedef unsigned char u_int8_t; - -# if SIZEOF_SHORT == 2 - typedef short int16_t; - typedef unsigned short u_int16_t; -# else -# if SIZEOF_INT == 2 - typedef int int16_t; - typedef unsigned int u_int16_t; -# else - #error Cannot find a type with sizeof() == 2 -# endif -# endif - -# if SIZEOF_SHORT == 4 - typedef short int32_t; - typedef unsigned short u_int32_t; -# else -# if SIZEOF_INT == 4 - typedef int int32_t; - typedef unsigned int u_int32_t; -# else - #error Cannot find a type with sizeof() == 4 -# endif -# endif -#endif /* NEED_TYPEDEFS */ - -/* Basilisk II types glue */ -typedef u_int8_t uint8; -typedef u_int16_t uint16; -typedef u_int32_t uint32; - -#ifdef HAVE_UNISTD_H -# include -#endif - -#ifdef HAVE_STDLIB_H -# include -#endif - -#include -#include - -#ifndef HAVE_MEMMOVE -#define memmove(x, y, z) bcopy(y, x, z) -#endif - -#if TIME_WITH_SYS_TIME -# include -# include -#else -# if HAVE_SYS_TIME_H -# include -# else -# include -# endif -#endif - -#ifdef HAVE_STRING_H -# include -#else -# include -#endif - -#ifndef _WIN32 -#include -#include -#include -#endif - -#ifdef GETTIMEOFDAY_ONE_ARG -#define gettimeofday(x, y) gettimeofday(x) -#endif - -/* Systems lacking strdup() definition in . */ -#if defined(ultrix) -char *strdup(const char *); -#endif - -/* Systems lacking malloc() definition in . */ -#if defined(ultrix) || defined(hcx) -void *malloc(size_t arg); -void free(void *ptr); -#endif - -#ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia); -#endif - -#include -#ifdef _WIN32 -#include -#endif -#ifndef NO_UNIX_SOCKETS -#include -#endif -#include -#ifdef HAVE_SYS_SIGNAL_H -# include -#endif -#ifndef _WIN32 -#include -#endif - -#if defined(HAVE_SYS_IOCTL_H) -# include -#endif - -#ifdef HAVE_SYS_SELECT_H -# include -#endif - -#ifdef HAVE_SYS_WAIT_H -# include -#endif - -#ifdef HAVE_SYS_FILIO_H -# include -#endif - -#ifdef USE_PPP -#include -#endif - -#include - -#include - -/* Avoid conflicting with the libc insque() and remque(), which - have different prototypes. */ -#define insque slirp_insque -#define remque slirp_remque - -#ifdef HAVE_SYS_STROPTS_H -#include -#endif - -#include "debug.h" - -#if defined __GNUC__ -#define PACKED__ __attribute__ ((packed)) -#elif defined _MSC_VER -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET -#define PACKED__ -#elif defined __sgi -#define PRAGMA_PACK_SUPPORTED 1 -#define PACK_RESET 0 -#define PACKED__ -#else -#error "Packed attribute or pragma shall be supported" -#endif - -#include "ip.h" -#include "tcp.h" -#include "tcp_timer.h" -#include "tcp_var.h" -#include "tcpip.h" -#include "udp.h" -#include "icmp_var.h" -#include "mbuf.h" -#include "sbuf.h" -#include "socket.h" -#include "if.h" -#include "main.h" -#include "misc.h" -#include "ctl.h" -#ifdef USE_PPP -#include "ppp/pppd.h" -#include "ppp/ppp.h" -#endif - -#include "bootp.h" -#include "tftp.h" -#include "libslirp.h" - -extern struct ttys *ttys_unit[MAX_INTERFACES]; - -#ifndef NULL -#define NULL (void *)0 -#endif - -#ifndef FULL_BOLT -void if_start(void); -#else -void if_start(struct ttys *); -#endif - -#ifdef BAD_SPRINTF -# define vsprintf vsprintf_len -# define sprintf sprintf_len - extern int vsprintf_len(char *, const char *, va_list); - extern int sprintf_len(char *, const char *, ...); -#endif - -#ifdef DECLARE_SPRINTF -# ifndef BAD_SPRINTF - extern int vsprintf(char *, const char *, va_list); -# endif - extern int vfprintf(FILE *, const char *, va_list); -#endif - -#ifndef HAVE_STRERROR - extern char *strerror(int error); -#endif - -#ifndef HAVE_INDEX - char *index(const char *, int); -#endif - -#ifndef HAVE_GETHOSTID - long gethostid(void); -#endif - -void lprint(const char *, ...); - -extern int do_echo; - -#if SIZEOF_CHAR_P == 4 -# define insque_32 insque -# define remque_32 remque -#else - extern inline void insque_32(void *, void *); - extern inline void remque_32(void *); -#endif - -#ifndef _WIN32 -#include -#endif - -#define DEFAULT_BAUD 115200 - -/* cksum.c */ -int cksum(struct mbuf *m, int len); - -/* if.c */ -void if_init(void); -void if_output(struct socket *, struct mbuf *); - -/* ip_input.c */ -void ip_init(void); -void ip_input(struct mbuf *); -struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); -void ip_freef(struct ipq *); -void ip_enq(register struct ipasfrag *, register struct ipasfrag *); -void ip_deq(register struct ipasfrag *); -void ip_slowtimo(void); -void ip_stripoptions(register struct mbuf *, struct mbuf *); - -/* ip_output.c */ -int ip_output(struct socket *, struct mbuf *); - -/* tcp_input.c */ -int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); -void tcp_input(register struct mbuf *, int, struct socket *); -void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); -void tcp_xmit_timer(register struct tcpcb *, int); -u_int tcp_mss(register struct tcpcb *, u_int); - -/* tcp_output.c */ -int tcp_output(register struct tcpcb *); -void tcp_setpersist(register struct tcpcb *); - -/* tcp_subr.c */ -void tcp_init(void); -void tcp_template(struct tcpcb *); -void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); -struct tcpcb * tcp_newtcpcb(struct socket *); -struct tcpcb * tcp_close(register struct tcpcb *); -void tcp_drain(void); -void tcp_sockclosed(struct tcpcb *); -int tcp_fconnect(struct socket *); -void tcp_connect(struct socket *); -int tcp_attach(struct socket *); -u_int8_t tcp_tos(struct socket *); -int tcp_emu(struct socket *, struct mbuf *); -int tcp_ctl(struct socket *); -struct tcpcb *tcp_drop(struct tcpcb *tp, int err); - -#ifdef USE_PPP -#define MIN_MRU MINMRU -#define MAX_MRU MAXMRU -#else -#define MIN_MRU 128 -#define MAX_MRU 16384 -#endif - -#ifndef _WIN32 -#define min(x,y) ((x) < (y) ? (x) : (y)) -#define max(x,y) ((x) > (y) ? (x) : (y)) -#endif - -#endif diff --git a/BasiliskII/src/slirp/slirp_config.h b/BasiliskII/src/slirp/slirp_config.h deleted file mode 100644 index 237268fa8..000000000 --- a/BasiliskII/src/slirp/slirp_config.h +++ /dev/null @@ -1,127 +0,0 @@ -/* - * User definable configuration options - */ - -/* Undefine if you don't want talk emulation */ -#undef EMULATE_TALK - -/* Define if you want the connection to be probed */ -/* XXX Not working yet, so ignore this for now */ -#undef PROBE_CONN - -/* Define to 1 if you want KEEPALIVE timers */ -#define DO_KEEPALIVE 0 - -/* Define to MAX interfaces you expect to use at once */ -/* MAX_INTERFACES determines the max. TOTAL number of interfaces (SLIP and PPP) */ -/* MAX_PPP_INTERFACES determines max. number of PPP interfaces */ -#define MAX_INTERFACES 1 -#define MAX_PPP_INTERFACES 1 - -/* Define if you want slirp's socket in /tmp */ -/* XXXXXX Do this in ./configure */ -#undef USE_TMPSOCKET - -/* Define if you want slirp to use cfsetXspeed() on the terminal */ -#undef DO_CFSETSPEED - -/* Define this if you want slirp to write to the tty as fast as it can */ -/* This should only be set if you are using load-balancing, slirp does a */ -/* pretty good job on single modems already, and seting this will make */ -/* interactive sessions less responsive */ -/* XXXXX Talk about having fast modem as unit 0 */ -#undef FULL_BOLT - -/* - * Define if you want slirp to use less CPU - * You will notice a small lag in interactive sessions, but it's not that bad - * Things like Netscape/ftp/etc. are completely unaffected - * This is mainly for sysadmins who have many slirp users - */ -#undef USE_LOWCPU - -/*********************************************************/ -/* - * Autoconf defined configuration options - * You shouldn't need to touch any of these - */ - -/* Ignore this */ -#undef DUMMY_PPP - -/* XXX: Define according to how time.h should be included */ -#undef TIME_WITH_SYS_TIME -#define TIME_WITH_SYS_TIME 0 -#undef HAVE_SYS_TIME_H - -/* Define if your sprintf returns char * instead of int */ -#undef BAD_SPRINTF - -/* Define if you have readv */ -#undef HAVE_READV - -/* Define if iovec needs to be declared */ -#undef DECLARE_IOVEC -#ifdef _WIN32 -#define DECLARE_IOVEC -#endif - -/* Define if a declaration of sprintf/fprintf is needed */ -#undef DECLARE_SPRINTF - -/* Define if you have sys/stropts.h */ -#undef HAVE_SYS_STROPTS_H - -/* Define if you don't have u_int32_t etc. typedef'd */ -#undef NEED_TYPEDEFS -#ifdef __sun__ -#define NEED_TYPEDEFS -#endif - -/* Define to sizeof(char *) */ -#define SIZEOF_CHAR_P SIZEOF_VOID_P - -/* Define if you have random() */ -#undef HAVE_RANDOM - -/* Define if you have srandom() */ -#undef HAVE_SRANDOM - -/* Define if you have setenv */ -#undef HAVE_SETENV - -/* Define if you have index() */ -#undef HAVE_INDEX - -/* Define if you have bcmp() */ -#undef HAVE_BCMP - -/* Define if you have drand48 */ -#undef HAVE_DRAND48 - -/* Define if you have memmove */ -#define HAVE_MEMMOVE - -/* Define if you have gethostid */ -#undef HAVE_GETHOSTID - -/* Define if you DON'T have unix-domain sockets */ -#undef NO_UNIX_SOCKETS -#ifdef _WIN32 -#define NO_UNIX_SOCKETS -#endif - -/* Define if gettimeofday only takes one argument */ -#undef GETTIMEOFDAY_ONE_ARG - -/* Define if you have revoke() */ -#undef HAVE_REVOKE - -/* Define if you have the sysv method of opening pty's (/dev/ptmx, etc.) */ -#undef HAVE_GRANTPT - -/* Define if you have fchmod */ -#undef HAVE_FCHMOD - -/* Define if you have */ -#undef HAVE_SYS_TYPES32_H diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c deleted file mode 100644 index 2c0e067ea..000000000 --- a/BasiliskII/src/slirp/socket.c +++ /dev/null @@ -1,733 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include -#include "ip_icmp.h" -#include "main.h" -#ifdef __sun__ -#include -#endif - -#ifdef _WIN32 -#define IS_EAGAIN(e) ((e) == WSAEINTR || (e) == EAGAIN) -#else -#define IS_EAGAIN(e) ((e) == EAGAIN) -#endif - -void -so_init() -{ - /* Nothing yet */ -} - - -struct socket * -solookup(head, laddr, lport, faddr, fport) - struct socket *head; - struct in_addr laddr; - u_int lport; - struct in_addr faddr; - u_int fport; -{ - struct socket *so; - - for (so = head->so_next; so != head; so = so->so_next) { - if (so->so_lport == lport && - so->so_laddr.s_addr == laddr.s_addr && - so->so_faddr.s_addr == faddr.s_addr && - so->so_fport == fport) - break; - } - - if (so == head) - return (struct socket *)NULL; - return so; - -} - -/* - * Create a new socket, initialise the fields - * It is the responsibility of the caller to - * insque() it into the correct linked-list - */ -struct socket * -socreate() -{ - struct socket *so; - - so = (struct socket *)malloc(sizeof(struct socket)); - if(so) { - memset(so, 0, sizeof(struct socket)); - so->so_state = SS_NOFDREF; - so->s = -1; - } - return(so); -} - -/* - * remque and free a socket, clobber cache - */ -void -sofree(so) - struct socket *so; -{ - if (so->so_emu==EMU_RSH && so->extra) { - sofree(so->extra); - so->extra=NULL; - } - if (so == tcp_last_so) - tcp_last_so = &tcb; - else if (so == udp_last_so) - udp_last_so = &udb; - - m_free(so->so_m); - - if(so->so_next && so->so_prev) - remque(so); /* crashes if so is not in a queue */ - - free(so); -} - -/* - * Read from so's socket into sb_snd, updating all relevant sbuf fields - * NOTE: This will only be called if it is select()ed for reading, so - * a read() of 0 (or less) means it's disconnected - */ -int -soread(so) - struct socket *so; -{ - int n, nn; - u_int lss, total; - struct sbuf *sb = &so->so_snd; - u_int len = sb->sb_datalen - sb->sb_cc; - struct iovec iov[2]; - u_int mss = so->so_tcpcb->t_maxseg; - - DEBUG_CALL("soread"); - DEBUG_ARG("so = %lx", (long )so); - - /* - * No need to check if there's enough room to read. - * soread wouldn't have been called if there weren't - */ - - len = sb->sb_datalen - sb->sb_cc; - - iov[0].iov_base = sb->sb_wptr; - if (sb->sb_wptr < sb->sb_rptr) { - iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) - iov[0].iov_len = len; - if (iov[0].iov_len > mss) - iov[0].iov_len -= iov[0].iov_len%mss; - n = 1; - } else { - iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_wptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) iov[0].iov_len = len; - len -= iov[0].iov_len; - if (len) { - iov[1].iov_base = sb->sb_data; - iov[1].iov_len = sb->sb_rptr - sb->sb_data; - if(iov[1].iov_len > len) - iov[1].iov_len = len; - total = iov[0].iov_len + iov[1].iov_len; - if (total > mss) { - lss = total%mss; - if (iov[1].iov_len > lss) { - iov[1].iov_len -= lss; - n = 2; - } else { - lss -= iov[1].iov_len; - iov[0].iov_len -= lss; - n = 1; - } - } else - n = 2; - } else { - if (iov[0].iov_len > mss) - iov[0].iov_len -= iov[0].iov_len%mss; - n = 1; - } - } - -#ifdef HAVE_READV - nn = readv(so->s, (struct iovec *)iov, n); - DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); -#else - nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif - if (nn <= 0) { - int error = WSAGetLastError(); - if (nn < 0 && IS_EAGAIN(error)) - return 0; - else { - DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); - sofcantrcvmore(so); - tcp_sockclosed(sototcpcb(so)); - return -1; - } - } - -#ifndef HAVE_READV - /* - * If there was no error, try and read the second time round - * We read again if n = 2 (ie, there's another part of the buffer) - * and we read as much as we could in the first read - * We don't test for <= 0 this time, because there legitimately - * might not be any more data (since the socket is non-blocking), - * a close will be detected on next iteration. - * A return of -1 wont (shouldn't) happen, since it didn't happen above - */ - if (n == 2 && nn == iov[0].iov_len) { - int ret; - ret = recv(so->s, iov[1].iov_base, iov[1].iov_len,0); - if (ret > 0) - nn += ret; - } - - DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); -#endif - - /* Update fields */ - sb->sb_cc += nn; - sb->sb_wptr += nn; - if (sb->sb_wptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_wptr -= sb->sb_datalen; - return nn; -} - -/* - * Get urgent data - * - * When the socket is created, we set it SO_OOBINLINE, - * so when OOB data arrives, we soread() it and everything - * in the send buffer is sent as urgent data - */ -void -sorecvoob(so) - struct socket *so; -{ - struct tcpcb *tp = sototcpcb(so); - - DEBUG_CALL("sorecvoob"); - DEBUG_ARG("so = %lx", (long)so); - - /* - * We take a guess at how much urgent data has arrived. - * In most situations, when urgent data arrives, the next - * read() should get all the urgent data. This guess will - * be wrong however if more data arrives just after the - * urgent data, or the read() doesn't return all the - * urgent data. - */ - soread(so); - tp->snd_up = tp->snd_una + so->so_snd.sb_cc; - tp->t_force = 1; - tcp_output(tp); - tp->t_force = 0; -} - -/* - * Send urgent data - * There's a lot duplicated code here, but... - */ -int -sosendoob(so) - struct socket *so; -{ - struct sbuf *sb = &so->so_rcv; - char buff[2048]; /* XXX Shouldn't be sending more oob data than this */ - - int n, len; - - DEBUG_CALL("sosendoob"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("sb->sb_cc = %d", sb->sb_cc); - - if (so->so_urgc > 2048) - so->so_urgc = 2048; /* XXXX */ - - if (sb->sb_rptr < sb->sb_wptr) { - /* We can send it directly */ - n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ - so->so_urgc -= n; - - DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); - } else { - /* - * Since there's no sendv or sendtov like writev, - * we must copy all data to a linear buffer then - * send it all - */ - len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; - if (len > so->so_urgc) len = so->so_urgc; - memcpy(buff, sb->sb_rptr, len); - so->so_urgc -= len; - if (so->so_urgc) { - n = sb->sb_wptr - sb->sb_data; - if (n > so->so_urgc) n = so->so_urgc; - memcpy((buff + len), sb->sb_data, n); - so->so_urgc -= n; - len += n; - } - n = send(so->s, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ -#ifdef DEBUG - if (n != len) - DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); -#endif - DEBUG_MISC((dfd, " ---2 sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); - } - - sb->sb_cc -= n; - sb->sb_rptr += n; - if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_rptr -= sb->sb_datalen; - - return n; -} - -/* - * Write data from so_rcv to so's socket, - * updating all sbuf field as necessary - */ -int -sowrite(so) - struct socket *so; -{ - int n,nn; - struct sbuf *sb = &so->so_rcv; - u_int len = sb->sb_cc; - struct iovec iov[2]; - - DEBUG_CALL("sowrite"); - DEBUG_ARG("so = %lx", (long)so); - - if (so->so_urgc) { - sosendoob(so); - if (sb->sb_cc == 0) - return 0; - } - - /* - * No need to check if there's something to write, - * sowrite wouldn't have been called otherwise - */ - - len = sb->sb_cc; - - iov[0].iov_base = sb->sb_rptr; - if (sb->sb_rptr < sb->sb_wptr) { - iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) iov[0].iov_len = len; - n = 1; - } else { - iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; - if (iov[0].iov_len > len) iov[0].iov_len = len; - len -= iov[0].iov_len; - if (len) { - iov[1].iov_base = sb->sb_data; - iov[1].iov_len = sb->sb_wptr - sb->sb_data; - if (iov[1].iov_len > len) iov[1].iov_len = len; - n = 2; - } else - n = 1; - } - /* Check if there's urgent data to send, and if so, send it */ - -#ifdef HAVE_READV - nn = writev(so->s, (const struct iovec *)iov, n); - - DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); -#else - nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif - /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0) { - int error = WSAGetLastError(); - if (IS_EAGAIN(error)) - return 0; - } - - if (nn <= 0) { - DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", - so->so_state, errno)); - sofcantsendmore(so); - tcp_sockclosed(sototcpcb(so)); - return -1; - } - -#ifndef HAVE_READV - if (n == 2 && nn == iov[0].iov_len) { - int ret; - ret = send(so->s, iov[1].iov_base, iov[1].iov_len,0); - if (ret > 0) - nn += ret; - } - DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); -#endif - - /* Update sbuf */ - sb->sb_cc -= nn; - sb->sb_rptr += nn; - if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_rptr -= sb->sb_datalen; - - /* - * If in DRAIN mode, and there's no more data, set - * it CANTSENDMORE - */ - if ((so->so_state & SS_FWDRAIN) && sb->sb_cc == 0) - sofcantsendmore(so); - - return nn; -} - -/* - * recvfrom() a UDP socket - */ -void -sorecvfrom(so) - struct socket *so; -{ - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - - DEBUG_CALL("sorecvfrom"); - DEBUG_ARG("so = %lx", (long)so); - - if (so->so_type == IPPROTO_ICMP) { /* This is a "ping" reply */ - char buff[256]; - int len; - - len = recvfrom(so->s, buff, 256, 0, - (struct sockaddr *)&addr, &addrlen); - /* XXX Check if reply is "correct"? */ - - if(len == -1 || len == 0) { - u_char code=ICMP_UNREACH_PORT; - - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; - - DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", - errno,strerror(errno))); - icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); - } else { - icmp_reflect(so->so_m); - so->so_m = 0; /* Don't m_free() it again! */ - } - /* No need for this socket anymore, udp_detach it */ - udp_detach(so); - } else { /* A "normal" UDP packet */ - struct mbuf *m; - u_int len; - ioctlsockopt_t n; - - if (!(m = m_get())) return; - m->m_data += if_maxlinkhdr; - - /* - * XXX Shouldn't FIONREAD packets destined for port 53, - * but I don't know the max packet size for DNS lookups - */ - len = M_FREEROOM(m); - /* if (so->so_fport != htons(53)) { */ - ioctlsocket(so->s, FIONREAD, &n); - - if (n > len) { - n = (m->m_data - m->m_dat) + m->m_len + n + 1; - m_inc(m, n); - len = M_FREEROOM(m); - } - /* } */ - - m->m_len = recvfrom(so->s, m->m_data, len, 0, - (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", - m->m_len, errno,strerror(errno))); - if(m->m_len<0) { - u_char code=ICMP_UNREACH_PORT; - - int error = WSAGetLastError(); - if(error == WSAEHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(error == WSAENETUNREACH) code=ICMP_UNREACH_NET; - - DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); - icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); - m_free(m); - } else { - /* - * Hack: domain name lookup will be used the most for UDP, - * and since they'll only be used once there's no need - * for the 4 minute (or whatever) timeout... So we time them - * out much quicker (10 seconds for now...) - */ - if (so->so_expire) { - if (so->so_fport == htons(53)) - so->so_expire = curtime + SO_EXPIREFAST; - else - so->so_expire = curtime + SO_EXPIRE; - } - - /* if (m->m_len == len) { - * m_inc(m, MINCSIZE); - * m->m_len = 0; - * } - */ - - /* - * If this packet was destined for CTL_ADDR, - * make it look like that's where it came from, done by udp_output - */ - udp_output(so, m, &addr); - } /* rx error */ - } /* if ping packet */ -} - -/* - * sendto() a socket - */ -int -sosendto(so, m) - struct socket *so; - struct mbuf *m; -{ - int ret; - struct sockaddr_in addr; - - DEBUG_CALL("sosendto"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else - addr.sin_addr = so->so_faddr; - addr.sin_port = so->so_fport; - - char addrstr[INET_ADDRSTRLEN]; - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, addrstr, sizeof(addrstr)))); - - /* Don't care what port we get */ - ret = sendto(so->s, m->m_data, m->m_len, 0, - (struct sockaddr *)&addr, sizeof (struct sockaddr)); - if (ret < 0) - return -1; - - /* - * Kill the socket if there's no reply in 4 minutes, - * but only if it's an expirable socket - */ - if (so->so_expire) - so->so_expire = curtime + SO_EXPIRE; - so->so_state = SS_ISFCONNECTED; /* So that it gets select()ed */ - return 0; -} - -/* - * XXX This should really be tcp_listen - */ -struct socket * -solisten(port, laddr, lport, flags) - u_int port; - u_int32_t laddr; - u_int lport; - int flags; -{ - struct sockaddr_in addr; - struct socket *so; - int s; - socklen_t addrlen = sizeof(addr); - int opt = 1; - - DEBUG_CALL("solisten"); - DEBUG_ARG("port = %d", port); - DEBUG_ARG("laddr = %x", laddr); - DEBUG_ARG("lport = %d", lport); - DEBUG_ARG("flags = %x", flags); - - if ((so = socreate()) == NULL) { - /* free(so); Not sofree() ??? free(NULL) == NOP */ - return NULL; - } - - /* Don't tcp_attach... we don't need so_snd nor so_rcv */ - if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) { - free(so); - return NULL; - } - insque(so,&tcb); - - /* - * SS_FACCEPTONCE sockets must time out. - */ - if (flags & SS_FACCEPTONCE) - so->so_tcpcb->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT*2; - - so->so_state = (SS_FACCEPTCONN|flags); - so->so_lport = lport; /* Kept in network format */ - so->so_laddr.s_addr = laddr; /* Ditto */ - - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_addr.s_addr = INADDR_ANY; - addr.sin_port = port; - - if (((s = socket(AF_INET,SOCK_STREAM,0)) < 0) || - (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || - (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || - (listen(s,1) < 0)) { - int error = WSAGetLastError(); /* Don't clobber the real reason we failed */ - - close(s); - sofree(so); - /* Restore the real errno */ - WSASetLastError(error); - return NULL; - } - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - - getsockname(s,(struct sockaddr *)&addr,&addrlen); - so->so_fport = addr.sin_port; - if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - else - so->so_faddr = addr.sin_addr; - - so->s = s; - return so; -} - -/* - * Data is available in so_rcv - * Just write() the data to the socket - * XXX not yet... - */ -void -sorwakeup(so) - struct socket *so; -{ -/* sowrite(so); */ -/* FD_CLR(so->s,&writefds); */ -} - -/* - * Data has been freed in so_snd - * We have room for a read() if we want to - * For now, don't read, it'll be done in the main loop - */ -void -sowwakeup(so) - struct socket *so; -{ - /* Nothing, yet */ -} - -/* - * Various session state calls - * XXX Should be #define's - * The socket state stuff needs work, these often get call 2 or 3 - * times each when only 1 was needed - */ -void -soisfconnecting(so) - register struct socket *so; -{ - so->so_state &= ~(SS_NOFDREF|SS_ISFCONNECTED|SS_FCANTRCVMORE| - SS_FCANTSENDMORE|SS_FWDRAIN); - so->so_state |= SS_ISFCONNECTING; /* Clobber other states */ -} - -void -soisfconnected(so) - register struct socket *so; -{ - so->so_state &= ~(SS_ISFCONNECTING|SS_FWDRAIN|SS_NOFDREF); - so->so_state |= SS_ISFCONNECTED; /* Clobber other states */ -} - -void -sofcantrcvmore(so) - struct socket *so; -{ - if ((so->so_state & SS_NOFDREF) == 0) { - shutdown(so->s,0); - if(global_writefds) { - FD_CLR(so->s,global_writefds); - } - } - so->so_state &= ~(SS_ISFCONNECTING); - if (so->so_state & SS_FCANTSENDMORE) - so->so_state = SS_NOFDREF; /* Don't select it */ /* XXX close() here as well? */ - else - so->so_state |= SS_FCANTRCVMORE; -} - -void -sofcantsendmore(so) - struct socket *so; -{ - if ((so->so_state & SS_NOFDREF) == 0) { - shutdown(so->s,1); /* send FIN to fhost */ - if (global_readfds) { - FD_CLR(so->s,global_readfds); - } - if (global_xfds) { - FD_CLR(so->s,global_xfds); - } - } - so->so_state &= ~(SS_ISFCONNECTING); - if (so->so_state & SS_FCANTRCVMORE) - so->so_state = SS_NOFDREF; /* as above */ - else - so->so_state |= SS_FCANTSENDMORE; -} - -void -soisfdisconnected(so) - struct socket *so; -{ -/* so->so_state &= ~(SS_ISFCONNECTING|SS_ISFCONNECTED); */ -/* close(so->s); */ -/* so->so_state = SS_ISFDISCONNECTED; */ - /* - * XXX Do nothing ... ? - */ -} - -/* - * Set write drain mode - * Set CANTSENDMORE once all data has been write()n - */ -void -sofwdrain(so) - struct socket *so; -{ - if (so->so_rcv.sb_cc) - so->so_state |= SS_FWDRAIN; - else - sofcantsendmore(so); -} - diff --git a/BasiliskII/src/slirp/socket.h b/BasiliskII/src/slirp/socket.h deleted file mode 100644 index 3b0fee169..000000000 --- a/BasiliskII/src/slirp/socket.h +++ /dev/null @@ -1,104 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -/* MINE */ - -#ifndef _SLIRP_SOCKET_H_ -#define _SLIRP_SOCKET_H_ - -#define SO_EXPIRE 240000 -#define SO_EXPIREFAST 10000 - -/* - * Our socket structure - */ - -struct socket { - struct socket *so_next,*so_prev; /* For a linked list of sockets */ - - int s; /* The actual socket */ - - /* XXX union these with not-yet-used sbuf params */ - struct mbuf *so_m; /* Pointer to the original SYN packet, - * for non-blocking connect()'s, and - * PING reply's */ - struct tcpiphdr *so_ti; /* Pointer to the original ti within - * so_mconn, for non-blocking connections */ - int so_urgc; - struct in_addr so_faddr; /* foreign host table entry */ - struct in_addr so_laddr; /* local host table entry */ - u_int16_t so_fport; /* foreign port */ - u_int16_t so_lport; /* local port */ - - u_int8_t so_iptos; /* Type of service */ - u_int8_t so_emu; /* Is the socket emulated? */ - - u_char so_type; /* Type of socket, UDP or TCP */ - int so_state; /* internal state flags SS_*, below */ - - struct tcpcb *so_tcpcb; /* pointer to TCP protocol control block */ - u_int so_expire; /* When the socket will expire */ - - int so_queued; /* Number of packets queued from this socket */ - int so_nqueued; /* Number of packets queued in a row - * Used to determine when to "downgrade" a session - * from fastq to batchq */ - - struct sbuf so_rcv; /* Receive buffer */ - struct sbuf so_snd; /* Send buffer */ - void * extra; /* Extra pointer */ -}; - - -/* - * Socket state bits. (peer means the host on the Internet, - * local host means the host on the other end of the modem) - */ -#define SS_NOFDREF 0x001 /* No fd reference */ - -#define SS_ISFCONNECTING 0x002 /* Socket is connecting to peer (non-blocking connect()'s) */ -#define SS_ISFCONNECTED 0x004 /* Socket is connected to peer */ -#define SS_FCANTRCVMORE 0x008 /* Socket can't receive more from peer (for half-closes) */ -#define SS_FCANTSENDMORE 0x010 /* Socket can't send more to peer (for half-closes) */ -/* #define SS_ISFDISCONNECTED 0x020*/ /* Socket has disconnected from peer, in 2MSL state */ -#define SS_FWDRAIN 0x040 /* We received a FIN, drain data and set SS_FCANTSENDMORE */ - -#define SS_CTL 0x080 -#define SS_FACCEPTCONN 0x100 /* Socket is accepting connections from a host on the internet */ -#define SS_FACCEPTONCE 0x200 /* If set, the SS_FACCEPTCONN socket will die after one accept */ - -extern struct socket tcb; - - -#if defined(DECLARE_IOVEC) && !defined(HAVE_READV) -struct iovec { - char *iov_base; - size_t iov_len; -}; -#endif - -void so_init(void); -struct socket * solookup(struct socket *, struct in_addr, u_int, struct in_addr, u_int); -struct socket * socreate(void); -void sofree(struct socket *); -int soread(struct socket *); -void sorecvoob(struct socket *); -int sosendoob(struct socket *); -int sowrite(struct socket *); -void sorecvfrom(struct socket *); -int sosendto(struct socket *, struct mbuf *); -struct socket * solisten(u_int, u_int32_t, u_int, int); -void sorwakeup(struct socket *); -void sowwakeup(struct socket *); -void soisfconnecting(register struct socket *); -void soisfconnected(register struct socket *); -void sofcantrcvmore(struct socket *); -void sofcantsendmore(struct socket *); -void soisfdisconnected(struct socket *); -void sofwdrain(struct socket *); - -#endif /* _SOCKET_H_ */ diff --git a/BasiliskII/src/slirp/tcp.h b/BasiliskII/src/slirp/tcp.h deleted file mode 100644 index 24e7914ab..000000000 --- a/BasiliskII/src/slirp/tcp.h +++ /dev/null @@ -1,181 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp.h 8.1 (Berkeley) 6/10/93 - * tcp.h,v 1.3 1994/08/21 05:27:34 paul Exp - */ - -#ifndef _TCP_H_ -#define _TCP_H_ - -typedef u_int32_t tcp_seq; - -#define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ -#define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ - -extern size_t tcp_rcvspace; -extern size_t tcp_sndspace; -extern struct socket *tcp_last_so; - -#define TCP_SNDSPACE 8192 -#define TCP_RCVSPACE 8192 - -/* - * TCP header. - * Per RFC 793, September, 1981. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct tcphdr { - u_int16_t th_sport; /* source port */ - u_int16_t th_dport; /* destination port */ - tcp_seq th_seq; /* sequence number */ - tcp_seq th_ack; /* acknowledgement number */ -#ifdef WORDS_BIGENDIAN - u_char th_off:4, /* data offset */ - th_x2:4; /* (unused) */ -#else - u_char th_x2:4, /* (unused) */ - th_off:4; /* data offset */ -#endif - u_int8_t th_flags; -#define TH_FIN 0x01 -#define TH_SYN 0x02 -#define TH_RST 0x04 -#define TH_PUSH 0x08 -#define TH_ACK 0x10 -#define TH_URG 0x20 - u_int16_t th_win; /* window */ - u_int16_t th_sum; /* checksum */ - u_int16_t th_urp; /* urgent pointer */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -#include "tcp_var.h" - -#define TCPOPT_EOL 0 -#define TCPOPT_NOP 1 -#define TCPOPT_MAXSEG 2 -#define TCPOLEN_MAXSEG 4 -#define TCPOPT_WINDOW 3 -#define TCPOLEN_WINDOW 3 -#define TCPOPT_SACK_PERMITTED 4 /* Experimental */ -#define TCPOLEN_SACK_PERMITTED 2 -#define TCPOPT_SACK 5 /* Experimental */ -#define TCPOPT_TIMESTAMP 8 -#define TCPOLEN_TIMESTAMP 10 -#define TCPOLEN_TSTAMP_APPA (TCPOLEN_TIMESTAMP+2) /* appendix A */ - -#define TCPOPT_TSTAMP_HDR \ - (TCPOPT_NOP<<24|TCPOPT_NOP<<16|TCPOPT_TIMESTAMP<<8|TCPOLEN_TIMESTAMP) - -/* - * Default maximum segment size for TCP. - * With an IP MSS of 576, this is 536, - * but 512 is probably more convenient. - * This should be defined as MIN(512, IP_MSS - sizeof (struct tcpiphdr)). - * - * We make this 1460 because we only care about Ethernet in the qemu context. - */ -#define TCP_MSS 1460 - -#define TCP_MAXWIN 65535 /* largest value for (unscaled) window */ - -#define TCP_MAX_WINSHIFT 14 /* maximum window shift */ - -/* - * User-settable options (used with setsockopt). - * - * We don't use the system headers on unix because we have conflicting - * local structures. We can't avoid the system definitions on Windows, - * so we undefine them. - */ -#undef TCP_NODELAY -#define TCP_NODELAY 0x01 /* don't delay send to coalesce packets */ -#undef TCP_MAXSEG -/* #define TCP_MAXSEG 0x02 */ /* set maximum segment size */ - -/* - * TCP FSM state definitions. - * Per RFC793, September, 1981. - */ - -#define TCP_NSTATES 11 - -#define TCPS_CLOSED 0 /* closed */ -#define TCPS_LISTEN 1 /* listening for connection */ -#define TCPS_SYN_SENT 2 /* active, have sent syn */ -#define TCPS_SYN_RECEIVED 3 /* have send and received syn */ -/* states < TCPS_ESTABLISHED are those where connections not established */ -#define TCPS_ESTABLISHED 4 /* established */ -#define TCPS_CLOSE_WAIT 5 /* rcvd fin, waiting for close */ -/* states > TCPS_CLOSE_WAIT are those where user has closed */ -#define TCPS_FIN_WAIT_1 6 /* have closed, sent fin */ -#define TCPS_CLOSING 7 /* closed xchd FIN; await FIN ACK */ -#define TCPS_LAST_ACK 8 /* had fin and close; await FIN ACK */ -/* states > TCPS_CLOSE_WAIT && < TCPS_FIN_WAIT_2 await ACK of FIN */ -#define TCPS_FIN_WAIT_2 9 /* have closed, fin is acked */ -#define TCPS_TIME_WAIT 10 /* in 2*msl quiet wait after close */ - -#define TCPS_HAVERCVDSYN(s) ((s) >= TCPS_SYN_RECEIVED) -#define TCPS_HAVEESTABLISHED(s) ((s) >= TCPS_ESTABLISHED) -#define TCPS_HAVERCVDFIN(s) ((s) >= TCPS_TIME_WAIT) - -/* - * TCP sequence numbers are 32 bit integers operated - * on with modular arithmetic. These macros can be - * used to compare such integers. - */ -#define SEQ_LT(a,b) ((int)((a)-(b)) < 0) -#define SEQ_LEQ(a,b) ((int)((a)-(b)) <= 0) -#define SEQ_GT(a,b) ((int)((a)-(b)) > 0) -#define SEQ_GEQ(a,b) ((int)((a)-(b)) >= 0) - -/* - * Macros to initialize tcp sequence numbers for - * send and receive from initial send and receive - * sequence numbers. - */ -#define tcp_rcvseqinit(tp) \ - (tp)->rcv_adv = (tp)->rcv_nxt = (tp)->irs + 1 - -#define tcp_sendseqinit(tp) \ - (tp)->snd_una = (tp)->snd_nxt = (tp)->snd_max = (tp)->snd_up = (tp)->iss - -#define TCP_ISSINCR (125*1024) /* increment for tcp_iss each second */ - -extern tcp_seq tcp_iss; /* tcp initial send seq # */ - -extern char *tcpstates[]; - -#endif diff --git a/BasiliskII/src/slirp/tcp_input.c b/BasiliskII/src/slirp/tcp_input.c deleted file mode 100644 index 032e5378e..000000000 --- a/BasiliskII/src/slirp/tcp_input.c +++ /dev/null @@ -1,1724 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993, 1994 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_input.c 8.5 (Berkeley) 4/10/94 - * tcp_input.c,v 1.10 1994/10/13 18:36:32 wollman Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include -#include "ip_icmp.h" - -struct socket tcb; - -int tcprexmtthresh = 3; -struct socket *tcp_last_so = &tcb; - -tcp_seq tcp_iss; /* tcp initial send seq # */ - -#define TCP_PAWS_IDLE (24 * 24 * 60 * 60 * PR_SLOWHZ) - -/* for modulo comparisons of timestamps */ -#define TSTMP_LT(a,b) ((int)((a)-(b)) < 0) -#define TSTMP_GEQ(a,b) ((int)((a)-(b)) >= 0) - -/* - * Insert segment ti into reassembly queue of tcp with - * control block tp. Return TH_FIN if reassembly now includes - * a segment with FIN. The macro form does the common case inline - * (segment is the next to be received on an established connection, - * and the queue is empty), avoiding linkage into and removal - * from the queue and repetition of various conversions. - * Set DELACK for segments received in order, but ack immediately - * when segments are out of order (so fast retransmit can work). - */ -#ifdef TCP_ACK_HACK -#define TCP_REASS(tp, ti, m, so, flags) {\ - if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ - (tp)->t_state == TCPS_ESTABLISHED) {\ - if (ti->ti_flags & TH_PUSH) \ - tp->t_flags |= TF_ACKNOW; \ - else \ - tp->t_flags |= TF_DELACK; \ - (tp)->rcv_nxt += (ti)->ti_len; \ - flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ - if (so->so_emu) { \ - if (tcp_emu((so),(m))) sbappend((so), (m)); \ - } else \ - sbappend((so), (m)); \ -/* sorwakeup(so); */ \ - } else {\ - (flags) = tcp_reass((tp), (ti), (m)); \ - tp->t_flags |= TF_ACKNOW; \ - } \ -} -#else -#define TCP_REASS(tp, ti, m, so, flags) { \ - if ((ti)->ti_seq == (tp)->rcv_nxt && \ - (tp)->seg_next == (tcpiphdrp_32)(tp) && \ - (tp)->t_state == TCPS_ESTABLISHED) { \ - tp->t_flags |= TF_DELACK; \ - (tp)->rcv_nxt += (ti)->ti_len; \ - flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ - if (so->so_emu) { \ - if (tcp_emu((so),(m))) sbappend(so, (m)); \ - } else \ - sbappend((so), (m)); \ -/* sorwakeup(so); */ \ - } else { \ - (flags) = tcp_reass((tp), (ti), (m)); \ - tp->t_flags |= TF_ACKNOW; \ - } \ -} -#endif - -int -tcp_reass(register struct tcpcb *tp, register struct tcpiphdr *ti, struct mbuf *m) -{ - register struct tcpiphdr *q; - struct socket *so = tp->t_socket; - int flags; - - /* - * Call with ti==0 after become established to - * force pre-ESTABLISHED data up to user socket. - */ - if (ti == 0) - goto present; - - /* - * Find a segment which begins after this one does. - */ - for (q = (struct tcpiphdr *)tp->seg_next; q != (struct tcpiphdr *)tp; - q = (struct tcpiphdr *)q->ti_next) - if (SEQ_GT(q->ti_seq, ti->ti_seq)) - break; - - /* - * If there is a preceding segment, it may provide some of - * our data already. If so, drop the data from the incoming - * segment. If it provides all of our data, drop us. - */ - if ((struct tcpiphdr *)q->ti_prev != (struct tcpiphdr *)tp) { - register int i; - q = (struct tcpiphdr *)q->ti_prev; - /* conversion to int (in i) handles seq wraparound */ - i = q->ti_seq + q->ti_len - ti->ti_seq; - if (i > 0) { - if (i >= ti->ti_len) { - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += ti->ti_len; - m_freem(m); - /* - * Try to present any queued data - * at the left window edge to the user. - * This is needed after the 3-WHS - * completes. - */ - goto present; /* ??? */ - } - m_adj(m, i); - ti->ti_len -= i; - ti->ti_seq += i; - } - q = (struct tcpiphdr *)(q->ti_next); - } - tcpstat.tcps_rcvoopack++; - tcpstat.tcps_rcvoobyte += ti->ti_len; - REASS_MBUF(ti) = (mbufp_32) m; /* XXX */ - - /* - * While we overlap succeeding segments trim them or, - * if they are completely covered, dequeue them. - */ - while (q != (struct tcpiphdr *)tp) { - register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; - if (i <= 0) - break; - if (i < q->ti_len) { - q->ti_seq += i; - q->ti_len -= i; - m_adj((struct mbuf *) REASS_MBUF(q), i); - break; - } - q = (struct tcpiphdr *)q->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)q->ti_prev); - remque_32((void *)(q->ti_prev)); - m_freem(m); - } - - /* - * Stick new segment in its place. - */ - insque_32(ti, (void *)(q->ti_prev)); - -present: - /* - * Present data to user, advancing rcv_nxt through - * completed sequence space. - */ - if (!TCPS_HAVEESTABLISHED(tp->t_state)) - return (0); - ti = (struct tcpiphdr *) tp->seg_next; - if (ti == (struct tcpiphdr *)tp || ti->ti_seq != tp->rcv_nxt) - return (0); - if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) - return (0); - do { - tp->rcv_nxt += ti->ti_len; - flags = ti->ti_flags & TH_FIN; - remque_32(ti); - m = (struct mbuf *) REASS_MBUF(ti); /* XXX */ - ti = (struct tcpiphdr *)ti->ti_next; -/* if (so->so_state & SS_FCANTRCVMORE) */ - if (so->so_state & SS_FCANTSENDMORE) - m_freem(m); - else { - if (so->so_emu) { - if (tcp_emu(so,m)) sbappend(so, m); - } else - sbappend(so, m); - } - } while (ti != (struct tcpiphdr *)tp && ti->ti_seq == tp->rcv_nxt); -/* sorwakeup(so); */ - return (flags); -} - -/* - * TCP input routine, follows pages 65-76 of the - * protocol specification dated September, 1981 very closely. - */ -void tcp_input(register struct mbuf *m, int iphlen, struct socket *inso) -{ - struct ip save_ip, *ip; - register struct tcpiphdr *ti; - caddr_t optp = NULL; - int optlen = 0; - int len, tlen, off; - register struct tcpcb *tp = 0; - register int tiflags; - struct socket *so = 0; - int todrop; - u_int acked; - int ourfinisacked, needoutput = 0; - /* int dropsocket = 0; */ - int iss = 0; - u_long tiwin; - int ret; - /* int ts_present = 0; */ - - DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd, " m = %8lx iphlen = %2d inso = %lx\n", - (long)m, iphlen, (long)inso)); - - /* - * If called with m == 0, then we're continuing the connect - */ - if (m == NULL) { - so = inso; - - /* Re-set a few variables */ - tp = sototcpcb(so); - m = so->so_m; - so->so_m = 0; - ti = so->so_ti; - tiwin = ti->ti_win; - tiflags = ti->ti_flags; - - goto cont_conn; - } - - - tcpstat.tcps_rcvtotal++; - /* - * Get IP and TCP header together in first mbuf. - * Note: IP leaves IP header in first mbuf. - */ - ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); - } - /* XXX Check if too short */ - - - /* - * Save a copy of the IP header in case we want restore it - * for sending an ICMP error message in response. - */ - ip = mtod(m, struct ip *); - save_ip = *ip; - save_ip.ip_len += iphlen; - - /* - * Checksum extended TCP header and data. - */ - tlen = ((struct ip *)ti)->ip_len; - ti->ti_next = ti->ti_prev = 0; - ti->ti_x1 = 0; - ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip) + tlen; - /* keep checksum for ICMP reply - * ti->ti_sum = cksum(m, len); - * if (ti->ti_sum) { */ - if (cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; - } - - /* - * Check that TCP offset makes sense, - * pull out TCP options and adjust length. XXX - */ - off = ti->ti_off << 2; - if (off < sizeof(struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; - } - tlen -= off; - ti->ti_len = tlen; - if (off > sizeof(struct tcphdr)) { - optlen = off - sizeof(struct tcphdr); - optp = mtod(m, caddr_t) + sizeof(struct tcpiphdr); - - /* - * Do quick retrieval of timestamp options ("options - * prediction?"). If timestamp is the only option and it's - * formatted as recommended in RFC 1323 appendix A, we - * quickly get the values now and not bother calling - * tcp_dooptions(), etc. - */ - /* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ - } - tiflags = ti->ti_flags; - - /* - * Convert TCP protocol specific fields to host format. - */ - NTOHL(ti->ti_seq); - NTOHL(ti->ti_ack); - NTOHS(ti->ti_win); - NTOHS(ti->ti_urp); - - /* - * Drop TCP, IP headers and TCP options. - */ - m->m_data += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - - /* - * Locate pcb for segment. - */ -findso: - so = tcp_last_so; - if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { - so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); - if (so) - tcp_last_so = so; - ++tcpstat.tcps_socachemiss; - } - - /* - * If the state is CLOSED (i.e., TCB does not exist) then - * all data in the incoming segment is discarded. - * If the TCB exists but is in CLOSED state, it is embryonic, - * but should either do a listen or a connect soon. - * - * state == CLOSED means we've done socreate() but haven't - * attached it to a protocol yet... - * - * XXX If a TCB does not exist, and the TH_SYN flag is - * the only flag set, then create a session, mark it - * as if it was LISTENING, and continue... - */ - if (so == 0) { - if ((tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) != TH_SYN) - goto dropwithreset; - - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } - - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); - - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ - - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; - - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; - - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; - } - - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; - - tp = sototcpcb(so); - - /* XXX Should never fail */ - if (tp == 0) - goto dropwithreset; - if (tp->t_state == TCPS_CLOSED) - goto drop; - - /* Unscale the window into a 32-bit value. */ -/* if ((tiflags & TH_SYN) == 0) - * tiwin = ti->ti_win << tp->snd_scale; - * else - */ - tiwin = ti->ti_win; - - /* - * Segment received on connection. - * Reset idle time and keep-alive timer. - */ - tp->t_idle = 0; - if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; - else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; - - /* - * Process options if not in LISTEN state, - * else do it below (after getting remote address). - */ - if (optp && tp->t_state != TCPS_LISTEN) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ - if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN | TH_FIN | TH_RST | TH_URG | TH_ACK)) == TH_ACK && - /* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { - /* - * If last ACK falls within this segment's sequence numbers, - * record the timestamp. - */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ - if (ti->ti_len == 0) { - if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { - /* - * this is a pure ack for outstanding data. - */ - ++tcpstat.tcps_predack; - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && -SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); - acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; - sbdrop(&so->so_snd, acked); - tp->snd_una = ti->ti_ack; - m_freem(m); - - /* - * If all outstanding data are acked, stop - * retransmit timer, otherwise restart timer - * using current (possibly backed-off) value. - * If process is waiting for space, - * wakeup/selwakeup/signal. If data - * are ready to send, let tcp_output - * decide between more output or persist. - */ - if (tp->snd_una == tp->snd_max) - tp->t_timer[TCPT_REXMT] = 0; - else if (tp->t_timer[TCPT_PERSIST] == 0) - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - - /* - * There's room in so_snd, sowwakup will read() - * from the socket if we can - */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ - if (so->so_snd.sb_cc) - (void) tcp_output(tp); - - return; - } - } - else if (ti->ti_ack == tp->snd_una && - tp->seg_next == (tcpiphdrp_32)tp && - ti->ti_len <= sbspace(&so->so_rcv)) { - /* - * this is a pure, in-sequence data packet - * with nothing on the reassembly queue and - * we have enough buffer space to take it. - */ - ++tcpstat.tcps_preddat; - tp->rcv_nxt += ti->ti_len; - tcpstat.tcps_rcvpack++; - tcpstat.tcps_rcvbyte += ti->ti_len; - /* - * Add data to socket buffer. - */ - if (so->so_emu) { - if (tcp_emu(so, m)) sbappend(so, m); - } - else - sbappend(so, m); - - /* - * XXX This is called when data arrives. Later, check - * if we can actually write() to the socket - * XXX Need to check? It's be NON_BLOCKING - */ - /* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ - tp->t_flags |= TF_ACKNOW; - tcp_output(tp); - return; - } - } /* header prediction */ - /* - * Calculate amount of space in receive window, - * and then do TCP input processing. - * Receive window is amount of space in rcv queue, - * but not less than advertised window. - */ - { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); - } - - switch (tp->t_state) { - - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ - case TCPS_LISTEN: { - - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; - - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ - - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte = ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte != CTL_ALIAS && lastbyte != CTL_DNS) { -#if 0 - if (lastbyte == CTL_CMD || lastbyte == CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } - else -#endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } - } - } - if (so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if (tcp_fconnect(so) == -1) { - int error = WSAGetLastError(); - if ((error != WSAEINPROGRESS) && (error != WSAEWOULDBLOCK)) { - u_char code = ICMP_UNREACH_NET; - DEBUG_MISC((dfd, " tcp fconnect errno = %d-%s\n", - errno, strerror(errno))); - if (error == WSAECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq + 1, (tcp_seq)0, - TH_RST | TH_ACK); - } - else { - if (error == WSAEHOSTUNREACH) code = ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr) + off - sizeof(struct tcphdr); - *ip = save_ip; - icmp_error(m, ICMP_UNREACH, code, 0, strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - return; - } - } - - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - return; - - cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; - } - cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR / 2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; - } /* case TCPS_LISTEN */ - - /* - * If the state is SYN_SENT: - * if seg contains an ACK, but not for our SYN, drop the input. - * if seg contains a RST, then drop the connection. - * if seg does not contain SYN, then drop it. - * Otherwise this is an acceptable SYN segment - * initialize tp->rcv_nxt and tp->irs - * if seg contains ack then advance tp->snd_una - * if SYN has been acked change to ESTABLISHED else SYN_RCVD state - * arrange for segment to be acked (eventually) - * continue processing rest of data/controls, beginning with URG - */ - case TCPS_SYN_SENT: - if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) - goto dropwithreset; - - if (tiflags & TH_RST) { - if (tiflags & TH_ACK) - tp = tcp_drop(tp, 0); /* XXX Check t_softerror! */ - goto drop; - } - - if ((tiflags & TH_SYN) == 0) - goto drop; - if (tiflags & TH_ACK) { - tp->snd_una = ti->ti_ack; - if (SEQ_LT(tp->snd_nxt, tp->snd_una)) - tp->snd_nxt = tp->snd_una; - } - - tp->t_timer[TCPT_REXMT] = 0; - tp->irs = ti->ti_seq; - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - if (tiflags & TH_ACK && SEQ_GT(tp->snd_una, tp->iss)) { - tcpstat.tcps_connects++; - soisfconnected(so); - tp->t_state = TCPS_ESTABLISHED; - - /* Do window scaling on this connection? */ -/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == - * (TF_RCVD_SCALE|TF_REQ_SCALE)) { - * tp->snd_scale = tp->requested_s_scale; - * tp->rcv_scale = tp->request_r_scale; - * } - */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, - (struct mbuf *)0); - /* - * if we didn't have to retransmit the SYN, - * use its rtt as our initial srtt & rtt var. - */ - if (tp->t_rtt) - tcp_xmit_timer(tp, tp->t_rtt); - } - else - tp->t_state = TCPS_SYN_RECEIVED; - - trimthenstep6: - /* - * Advance ti->ti_seq to correspond to first data byte. - * If data, trim to stay within window, - * dropping FIN if necessary. - */ - ti->ti_seq++; - if (ti->ti_len > tp->rcv_wnd) { - todrop = ti->ti_len - tp->rcv_wnd; - m_adj(m, -todrop); - ti->ti_len = tp->rcv_wnd; - tiflags &= ~TH_FIN; - tcpstat.tcps_rcvpackafterwin++; - tcpstat.tcps_rcvbyteafterwin += todrop; - } - tp->snd_wl1 = ti->ti_seq - 1; - tp->rcv_up = ti->ti_seq; - goto step6; - } /* switch tp->t_state */ - /* - * States other than LISTEN or SYN_SENT. - * First check timestamp, if present. - * Then check that at least some bytes of segment are within - * receive window. If segment begins before rcv_nxt, - * drop leading data (and SYN); if nothing left, just ack. - * - * RFC 1323 PAWS: If we have a timestamp reply on this segment - * and it's less than ts_recent, drop it. - */ - /* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ - /* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ - /* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ - - todrop = tp->rcv_nxt - ti->ti_seq; - if (todrop > 0) { - if (tiflags & TH_SYN) { - tiflags &= ~TH_SYN; - ti->ti_seq++; - if (ti->ti_urp > 1) - ti->ti_urp--; - else - tiflags &= ~TH_URG; - todrop--; - } - /* - * Following if statement from Stevens, vol. 2, p. 960. - */ - if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { - /* - * Any valid FIN must be to the left of the window. - * At this point the FIN must be a duplicate or out - * of sequence; drop it. - */ - tiflags &= ~TH_FIN; - - /* - * Send an ACK to resynchronize and drop any data. - * But keep on processing for RST or ACK. - */ - tp->t_flags |= TF_ACKNOW; - todrop = ti->ti_len; - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += todrop; - } - else { - tcpstat.tcps_rcvpartduppack++; - tcpstat.tcps_rcvpartdupbyte += todrop; - } - m_adj(m, todrop); - ti->ti_seq += todrop; - ti->ti_len -= todrop; - if (ti->ti_urp > todrop) - ti->ti_urp -= todrop; - else { - tiflags &= ~TH_URG; - ti->ti_urp = 0; - } - } - /* - * If new data are received on a connection after the - * user processes are gone, then RST the other end. - */ - if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { - tp = tcp_close(tp); - tcpstat.tcps_rcvafterclose++; - goto dropwithreset; - } - - /* - * If segment ends after window, drop trailing data - * (and PUSH and FIN); if nothing left, just ACK. - */ - todrop = (ti->ti_seq + ti->ti_len) - (tp->rcv_nxt + tp->rcv_wnd); - if (todrop > 0) { - tcpstat.tcps_rcvpackafterwin++; - if (todrop >= ti->ti_len) { - tcpstat.tcps_rcvbyteafterwin += ti->ti_len; - /* - * If a new connection request is received - * while in TIME_WAIT, drop the old connection - * and start over if the sequence numbers - * are above the previous ones. - */ - if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { - iss = tp->rcv_nxt + TCP_ISSINCR; - tp = tcp_close(tp); - goto findso; - } - /* - * If window is closed can only take segments at - * window edge, and have to drop data and PUSH from - * incoming segments. Continue processing, but - * remember to ack. Otherwise, drop segment - * and ack. - */ - if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { - tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_rcvwinprobe++; - } - else - goto dropafterack; - } - else - tcpstat.tcps_rcvbyteafterwin += todrop; - m_adj(m, -todrop); - ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH | TH_FIN); - } - - /* - * If last ACK falls within this segment's sequence numbers, - * record its timestamp. - */ - /* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ - - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ - if (tiflags&TH_RST) switch (tp->t_state) { - - case TCPS_SYN_RECEIVED: - /* so->so_error = ECONNREFUSED; */ - goto close; - - case TCPS_ESTABLISHED: - case TCPS_FIN_WAIT_1: - case TCPS_FIN_WAIT_2: - case TCPS_CLOSE_WAIT: - /* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; - - case TCPS_CLOSING: - case TCPS_LAST_ACK: - case TCPS_TIME_WAIT: - tp = tcp_close(tp); - goto drop; - } - - /* - * If a SYN is in the window, then this is an - * error and we send an RST and drop the connection. - */ - if (tiflags & TH_SYN) { - tp = tcp_drop(tp, 0); - goto dropwithreset; - } - - /* - * If the ACK bit is off we drop the segment and return. - */ - if ((tiflags & TH_ACK) == 0) goto drop; - - /* - * Ack processing. - */ - switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ - case TCPS_SYN_RECEIVED: - - if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) - goto dropwithreset; - tcpstat.tcps_connects++; - tp->t_state = TCPS_ESTABLISHED; - /* - * The sent SYN is ack'ed with our sequence number +1 - * The first data byte already in the buffer will get - * lost if no correction is made. This is only needed for - * SS_CTL since the buffer is empty otherwise. - * tp->snd_una++; or: - */ - tp->snd_una = ti->ti_ack; - if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } - else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } - else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } - else { - soisfconnected(so); - } - - /* Do window scaling? */ -/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == - * (TF_RCVD_SCALE|TF_REQ_SCALE)) { - * tp->snd_scale = tp->requested_s_scale; - * tp->rcv_scale = tp->request_r_scale; - * } - */ - (void)tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); - tp->snd_wl1 = ti->ti_seq - 1; - /* Avoid ack processing; snd_una==ti_ack => dup ack */ - goto synrx_to_est; - /* fall into ... */ - - /* - * In ESTABLISHED state: drop duplicate ACKs; ACK out of range - * ACKs. If the ack is in the range - * tp->snd_una < ti->ti_ack <= tp->snd_max - * then advance tp->snd_una to ti->ti_ack and drop - * data from the retransmission queue. If this ACK reflects - * more up to date window information we update our window information. - */ - case TCPS_ESTABLISHED: - case TCPS_FIN_WAIT_1: - case TCPS_FIN_WAIT_2: - case TCPS_CLOSE_WAIT: - case TCPS_CLOSING: - case TCPS_LAST_ACK: - case TCPS_TIME_WAIT: - - if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { - if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd, " dup ack m = %lx so = %lx \n", - (long)m, (long)so)); - /* - * If we have outstanding data (other than - * a window probe), this is a completely - * duplicate ack (ie, window info didn't - * change), the ack is the biggest we've - * seen and we've seen exactly our rexmt - * threshold of them, assume a packet - * has been dropped and retransmit it. - * Kludge snd_nxt & the congestion - * window so we send only this one - * packet. - * - * We know we're losing at the current - * window size so do congestion avoidance - * (set ssthresh to half the current window - * and pull our congestion window back to - * the new ssthresh). - * - * Dup acks mean that packets have left the - * network (they're now cached at the receiver) - * so bump cwnd by the amount in the receiver - * to keep a constant cwnd packets in the - * network. - */ - if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) - tp->t_dupacks = 0; - else if (++tp->t_dupacks == tcprexmtthresh) { - tcp_seq onxt = tp->snd_nxt; - u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / - tp->t_maxseg; - - if (win < 2) - win = 2; - tp->snd_ssthresh = win * tp->t_maxseg; - tp->t_timer[TCPT_REXMT] = 0; - tp->t_rtt = 0; - tp->snd_nxt = ti->ti_ack; - tp->snd_cwnd = tp->t_maxseg; - (void)tcp_output(tp); - tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; - if (SEQ_GT(onxt, tp->snd_nxt)) - tp->snd_nxt = onxt; - goto drop; - } - else if (tp->t_dupacks > tcprexmtthresh) { - tp->snd_cwnd += tp->t_maxseg; - (void)tcp_output(tp); - goto drop; - } - } - else - tp->t_dupacks = 0; - break; - } - synrx_to_est: - /* - * If the congestion window was inflated to account - * for the other side's cached packets, retract it. - */ - if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) - tp->snd_cwnd = tp->snd_ssthresh; - tp->t_dupacks = 0; - if (SEQ_GT(ti->ti_ack, tp->snd_max)) { - tcpstat.tcps_rcvacktoomuch++; - goto dropafterack; - } - acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; - - /* - * If we have a timestamp reply, update smoothed - * round trip time. If no timestamp is present but - * transmit timer is running and timed sequence - * number was acked, update smoothed round trip time. - * Since we now have an rtt measurement, cancel the - * timer backoff (cf., Phil Karn's retransmit alg.). - * Recompute the initial retransmit timer. - */ - /* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); - - /* - * If all outstanding data is acked, stop retransmit - * timer and remember to restart (more output or persist). - * If there is more data to be acked, restart retransmit - * timer, using current (possibly backed-off) value. - */ - if (ti->ti_ack == tp->snd_max) { - tp->t_timer[TCPT_REXMT] = 0; - needoutput = 1; - } - else if (tp->t_timer[TCPT_PERSIST] == 0) - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* - * When new data is acked, open the congestion window. - * If the window gives us less than ssthresh packets - * in flight, open exponentially (maxseg per packet). - * Otherwise open linearly: maxseg per window - * (maxseg^2 / cwnd per packet). - */ - { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; - - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, (u_int32_t) (TCP_MAXWIN << tp->snd_scale)); - } - if (acked > so->so_snd.sb_cc) { - tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, so->so_snd.sb_cc); - ourfinisacked = 1; - } - else { - sbdrop(&so->so_snd, acked); - tp->snd_wnd -= acked; - ourfinisacked = 0; - } - /* - * XXX sowwakup is called when data is acked and there's room for - * for more data... it should read() the socket - */ - /* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - tp->snd_una = ti->ti_ack; - if (SEQ_LT(tp->snd_nxt, tp->snd_una)) - tp->snd_nxt = tp->snd_una; - - switch (tp->t_state) { - - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ - case TCPS_FIN_WAIT_1: - if (ourfinisacked) { - /* - * If we can't receive any more - * data, then closing user can proceed. - * Starting the timer is contrary to the - * specification, but if we don't get a FIN - * we'll hang forever. - */ - if (so->so_state & SS_FCANTRCVMORE) { - soisfdisconnected(so); - tp->t_timer[TCPT_2MSL] = tcp_maxidle; - } - tp->t_state = TCPS_FIN_WAIT_2; - } - break; - - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ - case TCPS_CLOSING: - if (ourfinisacked) { - tp->t_state = TCPS_TIME_WAIT; - tcp_canceltimers(tp); - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - soisfdisconnected(so); - } - break; - - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ - case TCPS_LAST_ACK: - if (ourfinisacked) { - tp = tcp_close(tp); - goto drop; - } - break; - - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ - case TCPS_TIME_WAIT: - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - goto dropafterack; - } - } /* switch(tp->t_state) */ - -step6: - /* - * Update window information. - * Don't look at window if no ACK: TAC's send garbage on first SYN. - */ - if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { - /* keep track of pure window updates */ - if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) - tcpstat.tcps_rcvwinupd++; - tp->snd_wnd = tiwin; - tp->snd_wl1 = ti->ti_seq; - tp->snd_wl2 = ti->ti_ack; - if (tp->snd_wnd > tp->max_sndwnd) - tp->max_sndwnd = tp->snd_wnd; - needoutput = 1; - } - - /* - * Process segments with URG. - */ - if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { - /* - * This is a kludge, but if we receive and accept - * random urgent pointers, we'll crash in - * soreceive. It's hard to imagine someone - * actually wanting to send this much urgent data. - */ - if (ti->ti_urp + so->so_rcv.sb_cc > so->so_rcv.sb_datalen) { - ti->ti_urp = 0; - tiflags &= ~TH_URG; - goto dodata; - } - /* - * If this segment advances the known urgent pointer, - * then mark the data stream. This should not happen - * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since - * a FIN has been received from the remote side. - * In these states we ignore the URG. - * - * According to RFC961 (Assigned Protocols), - * the urgent pointer points to the last octet - * of urgent data. We continue, however, - * to consider it to indicate the first octet - * of data past the urgent section as the original - * spec states (in one of two places). - */ - if (SEQ_GT(ti->ti_seq + ti->ti_urp, tp->rcv_up)) { - tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + - (tp->rcv_up - tp->rcv_nxt); /* -1; */ - tp->rcv_up = ti->ti_seq + ti->ti_urp; - - } - } - else - /* - * If no out of band data is expected, - * pull receive urgent pointer along - * with the receive window. - */ - if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; -dodata: - - /* - * Process the segment text, merging it into the TCP sequencing queue, - * and arranging for acknowledgment of receipt if necessary. - * This process logically involves adjusting tp->rcv_wnd as data - * is presented to the user (this happens in tcp_usrreq.c, - * case PRU_RCVD). If a FIN has already been received on this - * connection then we just ignore the text. - */ - if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { - TCP_REASS(tp, ti, m, so, tiflags); - /* - * Note the amount of data that peer has sent into - * our window, in order to estimate the sender's - * buffer size. - */ - len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } - else { - m_free(m); - tiflags &= ~TH_FIN; - } - - /* - * If FIN is received ACK the FIN and let the user know - * that the connection is closing. - */ - if (tiflags & TH_FIN) { - if (TCPS_HAVERCVDFIN(tp->t_state) == 0) { - /* - * If we receive a FIN we can't send more data, - * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the - * buffer. - * soread() is called on completion of shutdown() and - * will got to TCPS_LAST_ACK, and use tcp_output() - * to send the FIN. - */ - /* sofcantrcvmore(so); */ - sofwdrain(so); - - tp->t_flags |= TF_ACKNOW; - tp->rcv_nxt++; - } - switch (tp->t_state) { - - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ - case TCPS_SYN_RECEIVED: - case TCPS_ESTABLISHED: - if (so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ - case TCPS_FIN_WAIT_1: - tp->t_state = TCPS_CLOSING; - break; - - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ - case TCPS_FIN_WAIT_2: - tp->t_state = TCPS_TIME_WAIT; - tcp_canceltimers(tp); - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - soisfdisconnected(so); - break; - - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ - case TCPS_TIME_WAIT: - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - break; - } - } - - /* - * If this is a small packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * See above. - */ - /* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ - /* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ - if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { - tp->t_flags |= TF_ACKNOW; - } - - /* - * Return any desired output. - */ - if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void)tcp_output(tp); - } - return; - -dropafterack: - /* - * Generate an ACK dropping incoming segment if it occupies - * sequence space, where the ACK reflects our state. - */ - if (tiflags & TH_RST) - goto drop; - m_freem(m); - tp->t_flags |= TF_ACKNOW; - (void)tcp_output(tp); - return; - -dropwithreset: - /* reuses m if m!=NULL, m_free() unnecessary */ - if (tiflags & TH_ACK) - tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); - else { - if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq + ti->ti_len, (tcp_seq)0, - TH_RST | TH_ACK); - } - - return; - -drop: - /* - * Drop space held by incoming segment and return. - */ - m_free(m); - - return; -} - - /* , ts_present, ts_val, ts_ecr) */ -/* int *ts_present; - * u_int32_t *ts_val, *ts_ecr; - */ -void -tcp_dooptions(struct tcpcb *tp, u_char *cp, int cnt, struct tcpiphdr *ti) -{ - u_int16_t mss; - int opt, optlen; - - DEBUG_CALL("tcp_dooptions"); - DEBUG_ARGS((dfd," tp = %lx cnt=%i \n", (long )tp, cnt)); - - for (; cnt > 0; cnt -= optlen, cp += optlen) { - opt = cp[0]; - if (opt == TCPOPT_EOL) - break; - if (opt == TCPOPT_NOP) - optlen = 1; - else { - optlen = cp[1]; - if (optlen <= 0) - break; - } - switch (opt) { - - default: - continue; - - case TCPOPT_MAXSEG: - if (optlen != TCPOLEN_MAXSEG) - continue; - if (!(ti->ti_flags & TH_SYN)) - continue; - memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); - NTOHS(mss); - tcp_mss(tp, mss); /* sets t_maxseg */ - break; - -/* case TCPOPT_WINDOW: - * if (optlen != TCPOLEN_WINDOW) - * continue; - * if (!(ti->ti_flags & TH_SYN)) - * continue; - * tp->t_flags |= TF_RCVD_SCALE; - * tp->requested_s_scale = min(cp[2], TCP_MAX_WINSHIFT); - * break; - */ -/* case TCPOPT_TIMESTAMP: - * if (optlen != TCPOLEN_TIMESTAMP) - * continue; - * *ts_present = 1; - * memcpy((char *) ts_val, (char *)cp + 2, sizeof(*ts_val)); - * NTOHL(*ts_val); - * memcpy((char *) ts_ecr, (char *)cp + 6, sizeof(*ts_ecr)); - * NTOHL(*ts_ecr); - * - */ /* - * * A timestamp received in a SYN makes - * * it ok to send timestamp requests and replies. - * */ -/* if (ti->ti_flags & TH_SYN) { - * tp->t_flags |= TF_RCVD_TSTMP; - * tp->ts_recent = *ts_val; - * tp->ts_recent_age = tcp_now; - * } - */ break; - } - } -} - - -/* - * Pull out of band byte out of a segment so - * it doesn't appear in the user's data queue. - * It is still reflected in the segment length for - * sequencing purposes. - */ - -#ifdef notdef - -void tcp_pulloutofband(struct socket *so, struct tcpiphdr *ti, register struct mbuf *m) -{ - int cnt = ti->ti_urp - 1; - - while (cnt >= 0) { - if (m->m_len > cnt) { - char *cp = mtod(m, caddr_t) + cnt; - struct tcpcb *tp = sototcpcb(so); - - tp->t_iobc = *cp; - tp->t_oobflags |= TCPOOB_HAVEDATA; - memcpy(sp, cp+1, (unsigned)(m->m_len - cnt - 1)); - m->m_len--; - return; - } - cnt -= m->m_len; - m = m->m_next; /* XXX WRONG! Fix it! */ - if (m == 0) - break; - } - panic("tcp_pulloutofband"); -} - -#endif /* notdef */ - -/* - * Collect new round-trip time estimate - * and update averages and current timeout. - */ - -void tcp_xmit_timer(register struct tcpcb *tp, int rtt) -{ - register short delta; - - DEBUG_CALL("tcp_xmit_timer"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("rtt = %d", rtt); - - tcpstat.tcps_rttupdated++; - if (tp->t_srtt != 0) { - /* - * srtt is stored as fixed point with 3 bits after the - * binary point (i.e., scaled by 8). The following magic - * is equivalent to the smoothing algorithm in rfc793 with - * an alpha of .875 (srtt = rtt/8 + srtt*7/8 in fixed - * point). Adjust rtt to origin 0. - */ - delta = rtt - 1 - (tp->t_srtt >> TCP_RTT_SHIFT); - if ((tp->t_srtt += delta) <= 0) - tp->t_srtt = 1; - /* - * We accumulate a smoothed rtt variance (actually, a - * smoothed mean difference), then set the retransmit - * timer to smoothed rtt + 4 times the smoothed variance. - * rttvar is stored as fixed point with 2 bits after the - * binary point (scaled by 4). The following is - * equivalent to rfc793 smoothing with an alpha of .75 - * (rttvar = rttvar*3/4 + |delta| / 4). This replaces - * rfc793's wired-in beta. - */ - if (delta < 0) - delta = -delta; - delta -= (tp->t_rttvar >> TCP_RTTVAR_SHIFT); - if ((tp->t_rttvar += delta) <= 0) - tp->t_rttvar = 1; - } else { - /* - * No rtt measurement yet - use the unsmoothed rtt. - * Set the variance to half the rtt (so our first - * retransmit happens at 3*rtt). - */ - tp->t_srtt = rtt << TCP_RTT_SHIFT; - tp->t_rttvar = rtt << (TCP_RTTVAR_SHIFT - 1); - } - tp->t_rtt = 0; - tp->t_rxtshift = 0; - - /* - * the retransmit should happen at rtt + 4 * rttvar. - * Because of the way we do the smoothing, srtt and rttvar - * will each average +1/2 tick of bias. When we compute - * the retransmit timer, we want 1/2 tick of rounding and - * 1 extra tick because of +-1/2 tick uncertainty in the - * firing of the timer. The bias will give us exactly the - * 1.5 tick we need. But, because the bias is - * statistical, we have to test that we don't drop below - * the minimum feasible timer (which is 2 ticks). - */ - TCPT_RANGESET(tp->t_rxtcur, TCP_REXMTVAL(tp), - (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - - /* - * We received an ack for a packet that wasn't retransmitted; - * it is probably safe to discard any error indications we've - * received recently. This isn't quite right, but close enough - * for now (a route might have failed after we sent a segment, - * and the return path might not be symmetrical). - */ - tp->t_softerror = 0; -} - -/* - * Determine a reasonable value for maxseg size. - * If the route is known, check route for mtu. - * If none, use an mss that can be handled on the outgoing - * interface without forcing IP to fragment; if bigger than - * an mbuf cluster (MCLBYTES), round down to nearest multiple of MCLBYTES - * to utilize large mbufs. If no route is found, route has no mtu, - * or the destination isn't local, use a default, hopefully conservative - * size (usually 512 or the default IP max size, but no more than the mtu - * of the interface), as we can't discover anything about intervening - * gateways or networks. We also initialize the congestion/slow start - * window to be a single segment if the destination isn't local. - * While looking at the routing entry, we also initialize other path-dependent - * parameters from pre-set or cached values in the routing entry. - */ - -u_int tcp_mss(register struct tcpcb *tp, u_int offer) -{ - struct socket *so = tp->t_socket; - u_int mss; - - DEBUG_CALL("tcp_mss"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("offer = %d", offer); - - mss = min(if_mtu, if_mru) - sizeof(struct tcpiphdr); - if (offer) - mss = min(mss, offer); - mss = max(mss, 32); - if (mss < tp->t_maxseg || offer != 0) - tp->t_maxseg = mss; - - tp->snd_cwnd = mss; - - sbreserve(&so->so_snd, tcp_sndspace+((tcp_sndspace%mss)?(mss-(tcp_sndspace%mss)):0)); - sbreserve(&so->so_rcv, tcp_rcvspace+((tcp_rcvspace%mss)?(mss-(tcp_rcvspace%mss)):0)); - - DEBUG_MISC((dfd, " returning mss = %d\n", mss)); - - return mss; -} diff --git a/BasiliskII/src/slirp/tcp_output.c b/BasiliskII/src/slirp/tcp_output.c deleted file mode 100644 index 0d5c0ce5a..000000000 --- a/BasiliskII/src/slirp/tcp_output.c +++ /dev/null @@ -1,597 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_output.c 8.3 (Berkeley) 12/30/93 - * tcp_output.c,v 1.3 1994/09/15 10:36:55 davidg Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -/* - * Since this is only used in "stats socket", we give meaning - * names instead of the REAL names - */ -char *tcpstates[] = { -/* "CLOSED", "LISTEN", "SYN_SENT", "SYN_RCVD", */ - "REDIRECT", "LISTEN", "SYN_SENT", "SYN_RCVD", - "ESTABLISHED", "CLOSE_WAIT", "FIN_WAIT_1", "CLOSING", - "LAST_ACK", "FIN_WAIT_2", "TIME_WAIT", -}; - -u_char tcp_outflags[TCP_NSTATES] = { - TH_RST|TH_ACK, 0, TH_SYN, TH_SYN|TH_ACK, - TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, - TH_FIN|TH_ACK, TH_ACK, TH_ACK, -}; - - -#define MAX_TCPOPTLEN 32 /* max # bytes that go in options */ - -/* - * Tcp output routine: figure out what should be sent and send it. - */ -int tcp_output(register struct tcpcb *tp) -{ - register struct socket *so = tp->t_socket; - register u_long len, win; - int off, flags, error; - register struct mbuf *m; - register struct tcpiphdr *ti; - u_char opt[MAX_TCPOPTLEN]; - unsigned optlen, hdrlen; - int idle, sendalot; - - DEBUG_CALL("tcp_output"); - DEBUG_ARG("tp = %lx", (long )tp); - - /* - * Determine length of data that should be transmitted, - * and flags that will be used. - * If there is some data or critical controls (SYN, RST) - * to send, then transmit; otherwise, investigate further. - */ - idle = (tp->snd_max == tp->snd_una); - if (idle && tp->t_idle >= tp->t_rxtcur) - /* - * We have been idle for "a while" and no acks are - * expected to clock out any data we send -- - * slow start to get ack "clock" running again. - */ - tp->snd_cwnd = tp->t_maxseg; -again: - sendalot = 0; - off = tp->snd_nxt - tp->snd_una; - win = min(tp->snd_wnd, tp->snd_cwnd); - - flags = tcp_outflags[tp->t_state]; - - DEBUG_MISC((dfd, " --- tcp_output flags = 0x%x\n",flags)); - - /* - * If in persist timeout with window of 0, send 1 byte. - * Otherwise, if window is small but nonzero - * and timer expired, we will send what we can - * and go to transmit state. - */ - if (tp->t_force) { - if (win == 0) { - /* - * If we still have some data to send, then - * clear the FIN bit. Usually this would - * happen below when it realizes that we - * aren't sending all the data. However, - * if we have exactly 1 byte of unset data, - * then it won't clear the FIN bit below, - * and if we are in persist state, we wind - * up sending the packet without recording - * that we sent the FIN bit. - * - * We can't just blindly clear the FIN bit, - * because if we don't have any more data - * to send then the probe will be the FIN - * itself. - */ - if (off < (int)so->so_snd.sb_cc) - flags &= ~TH_FIN; - win = 1; - } else { - tp->t_timer[TCPT_PERSIST] = 0; - tp->t_rxtshift = 0; - } - } - - len = min(so->so_snd.sb_cc, win) - off; - - if (len < 0) { - /* - * If FIN has been sent but not acked, - * but we haven't been called to retransmit, - * len will be -1. Otherwise, window shrank - * after we sent into it. If window shrank to 0, - * cancel pending retransmit and pull snd_nxt - * back to (closed) window. We will enter persist - * state below. If the window didn't close completely, - * just wait for an ACK. - */ - len = 0; - if (win == 0) { - tp->t_timer[TCPT_REXMT] = 0; - tp->snd_nxt = tp->snd_una; - } - } - - if (len > tp->t_maxseg) { - len = tp->t_maxseg; - sendalot = 1; - } - if (SEQ_LT(tp->snd_nxt + len, tp->snd_una + so->so_snd.sb_cc)) - flags &= ~TH_FIN; - - win = sbspace(&so->so_rcv); - - /* - * Sender silly window avoidance. If connection is idle - * and can send all data, a maximum segment, - * at least a maximum default-size segment do it, - * or are forced, do it; otherwise don't bother. - * If peer's buffer is tiny, then send - * when window is at least half open. - * If retransmitting (possibly after persist timer forced us - * to send into a small window), then must resend. - */ - if (len) { - if (len == tp->t_maxseg) - goto send; - if ((1 || idle || tp->t_flags & TF_NODELAY) && - len + off >= so->so_snd.sb_cc) - goto send; - if (tp->t_force) - goto send; - if (len >= tp->max_sndwnd / 2 && tp->max_sndwnd > 0) - goto send; - if (SEQ_LT(tp->snd_nxt, tp->snd_max)) - goto send; - } - - /* - * Compare available window to amount of window - * known to peer (as advertised window less - * next expected input). If the difference is at least two - * max size segments, or at least 50% of the maximum possible - * window, then want to send a window update to peer. - */ - if (win > 0) { - /* - * "adv" is the amount we can increase the window, - * taking into account that we are limited by - * TCP_MAXWIN << tp->rcv_scale. - */ - u_int adv = min(win, (u_int)TCP_MAXWIN << tp->rcv_scale) - - (tp->rcv_adv - tp->rcv_nxt); - - if (adv >= (u_int)(2 * tp->t_maxseg)) - goto send; - if (2 * adv >= so->so_rcv.sb_datalen) - goto send; - } - - /* - * Send if we owe peer an ACK. - */ - if (tp->t_flags & TF_ACKNOW) - goto send; - if (flags & (TH_SYN|TH_RST)) - goto send; - if (SEQ_GT(tp->snd_up, tp->snd_una)) - goto send; - /* - * If our state indicates that FIN should be sent - * and we have not yet done so, or we're retransmitting the FIN, - * then we need to send. - */ - if (flags & TH_FIN && - ((tp->t_flags & TF_SENTFIN) == 0 || tp->snd_nxt == tp->snd_una)) - goto send; - - /* - * TCP window updates are not reliable, rather a polling protocol - * using ``persist'' packets is used to insure receipt of window - * updates. The three ``states'' for the output side are: - * idle not doing retransmits or persists - * persisting to move a small or zero window - * (re)transmitting and thereby not persisting - * - * tp->t_timer[TCPT_PERSIST] - * is set when we are in persist state. - * tp->t_force - * is set when we are called to send a persist packet. - * tp->t_timer[TCPT_REXMT] - * is set when we are retransmitting - * The output side is idle when both timers are zero. - * - * If send window is too small, there is data to transmit, and no - * retransmit or persist is pending, then go to persist state. - * If nothing happens soon, send when timer expires: - * if window is nonzero, transmit what we can, - * otherwise force out a byte. - */ - if (so->so_snd.sb_cc && tp->t_timer[TCPT_REXMT] == 0 && - tp->t_timer[TCPT_PERSIST] == 0) { - tp->t_rxtshift = 0; - tcp_setpersist(tp); - } - - /* - * No reason to send a segment, just return. - */ - tcpstat.tcps_didnuttin++; - - return (0); - -send: - /* - * Before ESTABLISHED, force sending of initial options - * unless TCP set not to do any options. - * NOTE: we assume that the IP/TCP header plus TCP options - * always fit in a single mbuf, leaving room for a maximum - * link header, i.e. - * max_linkhdr + sizeof (struct tcpiphdr) + optlen <= MHLEN - */ - optlen = 0; - hdrlen = sizeof (struct tcpiphdr); - if (flags & TH_SYN) { - tp->snd_nxt = tp->iss; - if ((tp->t_flags & TF_NOOPT) == 0) { - u_int16_t mss; - - opt[0] = TCPOPT_MAXSEG; - opt[1] = 4; - mss = htons((u_int16_t) tcp_mss(tp, 0)); - memcpy((caddr_t)(opt + 2), (caddr_t)&mss, sizeof(mss)); - optlen = 4; - -/* if ((tp->t_flags & TF_REQ_SCALE) && - * ((flags & TH_ACK) == 0 || - * (tp->t_flags & TF_RCVD_SCALE))) { - * *((u_int32_t *) (opt + optlen)) = htonl( - * TCPOPT_NOP << 24 | - * TCPOPT_WINDOW << 16 | - * TCPOLEN_WINDOW << 8 | - * tp->request_r_scale); - * optlen += 4; - * } - */ - } - } - - /* - * Send a timestamp and echo-reply if this is a SYN and our side - * wants to use timestamps (TF_REQ_TSTMP is set) or both our side - * and our peer have sent timestamps in our SYN's. - */ -/* if ((tp->t_flags & (TF_REQ_TSTMP|TF_NOOPT)) == TF_REQ_TSTMP && - * (flags & TH_RST) == 0 && - * ((flags & (TH_SYN|TH_ACK)) == TH_SYN || - * (tp->t_flags & TF_RCVD_TSTMP))) { - * u_int32_t *lp = (u_int32_t *)(opt + optlen); - * - * / * Form timestamp option as shown in appendix A of RFC 1323. * / - * *lp++ = htonl(TCPOPT_TSTAMP_HDR); - * *lp++ = htonl(tcp_now); - * *lp = htonl(tp->ts_recent); - * optlen += TCPOLEN_TSTAMP_APPA; - * } - */ - hdrlen += optlen; - - /* - * Adjust data length if insertion of options will - * bump the packet length beyond the t_maxseg length. - */ - if (len > tp->t_maxseg - optlen) { - len = tp->t_maxseg - optlen; - sendalot = 1; - } - - /* - * Grab a header mbuf, attaching a copy of data to - * be transmitted, and initialize the header from - * the template for sends on this connection. - */ - if (len) { - if (tp->t_force && len == 1) - tcpstat.tcps_sndprobe++; - else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) { - tcpstat.tcps_sndrexmitpack++; - tcpstat.tcps_sndrexmitbyte += len; - } else { - tcpstat.tcps_sndpack++; - tcpstat.tcps_sndbyte += len; - } - - m = m_get(); - if (m == NULL) { -/* error = ENOBUFS; */ - error = 1; - goto out; - } - m->m_data += if_maxlinkhdr; - m->m_len = hdrlen; - - /* - * This will always succeed, since we make sure our mbufs - * are big enough to hold one MSS packet + header + ... etc. - */ -/* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - - sbcopy(&so->so_snd, off, len, mtod(m, caddr_t) + hdrlen); - m->m_len += len; - -/* } else { - * m->m_next = m_copy(so->so_snd.sb_mb, off, (int) len); - * if (m->m_next == 0) - * len = 0; - * } - */ - /* - * If we're sending everything we've got, set PUSH. - * (This will keep happy those implementations which only - * give data to the user when a buffer fills or - * a PUSH comes in.) - */ - if (off + len == so->so_snd.sb_cc) - flags |= TH_PUSH; - } else { - if (tp->t_flags & TF_ACKNOW) - tcpstat.tcps_sndacks++; - else if (flags & (TH_SYN|TH_FIN|TH_RST)) - tcpstat.tcps_sndctrl++; - else if (SEQ_GT(tp->snd_up, tp->snd_una)) - tcpstat.tcps_sndurg++; - else - tcpstat.tcps_sndwinup++; - - m = m_get(); - if (m == NULL) { -/* error = ENOBUFS; */ - error = 1; - goto out; - } - m->m_data += if_maxlinkhdr; - m->m_len = hdrlen; - } - - ti = mtod(m, struct tcpiphdr *); - - memcpy((caddr_t)ti, &tp->t_template, sizeof (struct tcpiphdr)); - - /* - * Fill in fields, remembering maximum advertised - * window for use in delaying messages about window sizes. - * If resending a FIN, be sure not to use a new sequence number. - */ - if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && - tp->snd_nxt == tp->snd_max) - tp->snd_nxt--; - /* - * If we are doing retransmissions, then snd_nxt will - * not reflect the first unsent octet. For ACK only - * packets, we do not want the sequence number of the - * retransmitted packet, we want the sequence number - * of the next unsent octet. So, if there is no data - * (and no SYN or FIN), use snd_max instead of snd_nxt - * when filling in ti_seq. But if we are in persist - * state, snd_max might reflect one byte beyond the - * right edge of the window, so use snd_nxt in that - * case, since we know we aren't doing a retransmission. - * (retransmit and persist are mutually exclusive...) - */ - if (len || (flags & (TH_SYN|TH_FIN)) || tp->t_timer[TCPT_PERSIST]) - ti->ti_seq = htonl(tp->snd_nxt); - else - ti->ti_seq = htonl(tp->snd_max); - ti->ti_ack = htonl(tp->rcv_nxt); - if (optlen) { - memcpy((caddr_t)(ti + 1), (caddr_t)opt, optlen); - ti->ti_off = (sizeof (struct tcphdr) + optlen) >> 2; - } - ti->ti_flags = flags; - /* - * Calculate receive window. Don't shrink window, - * but avoid silly window syndrome. - */ - if (win < (so->so_rcv.sb_datalen / 4) && win < tp->t_maxseg) - win = 0; - if (win > (u_long) (TCP_MAXWIN << tp->rcv_scale)) - win = (u_long) (TCP_MAXWIN << tp->rcv_scale); - if (win < (tp->rcv_adv - tp->rcv_nxt)) - win = (tp->rcv_adv - tp->rcv_nxt); - ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); - - if (SEQ_GT(tp->snd_up, tp->snd_una)) { - ti->ti_urp = htons((u_int16_t)(tp->snd_up - ntohl(ti->ti_seq))); -#ifdef notdef - if (SEQ_GT(tp->snd_up, tp->snd_nxt)) { - ti->ti_urp = htons((u_int16_t)(tp->snd_up - tp->snd_nxt)); -#endif - ti->ti_flags |= TH_URG; - } else - /* - * If no urgent pointer to send, then we pull - * the urgent pointer to the left edge of the send window - * so that it doesn't drift into the send window on sequence - * number wraparound. - */ - tp->snd_up = tp->snd_una; /* drag it along */ - - /* - * Put TCP length in extended header, and then - * checksum extended header and data. - */ - if (len + optlen) - ti->ti_len = htons((u_int16_t)(sizeof (struct tcphdr) + - optlen + len)); - ti->ti_sum = cksum(m, (int)(hdrlen + len)); - - /* - * In transmit state, time the transmission and arrange for - * the retransmit. In persist state, just set snd_max. - */ - if (tp->t_force == 0 || tp->t_timer[TCPT_PERSIST] == 0) { - tcp_seq startseq = tp->snd_nxt; - - /* - * Advance snd_nxt over sequence space of this segment. - */ - if (flags & (TH_SYN|TH_FIN)) { - if (flags & TH_SYN) - tp->snd_nxt++; - if (flags & TH_FIN) { - tp->snd_nxt++; - tp->t_flags |= TF_SENTFIN; - } - } - tp->snd_nxt += len; - if (SEQ_GT(tp->snd_nxt, tp->snd_max)) { - tp->snd_max = tp->snd_nxt; - /* - * Time this transmission if not a retransmission and - * not currently timing anything. - */ - if (tp->t_rtt == 0) { - tp->t_rtt = 1; - tp->t_rtseq = startseq; - tcpstat.tcps_segstimed++; - } - } - - /* - * Set retransmit timer if not currently set, - * and not doing an ack or a keep-alive probe. - * Initial value for retransmit timer is smoothed - * round-trip time + 2 * round-trip time variance. - * Initialize shift counter which is used for backoff - * of retransmit time. - */ - if (tp->t_timer[TCPT_REXMT] == 0 && - tp->snd_nxt != tp->snd_una) { - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - if (tp->t_timer[TCPT_PERSIST]) { - tp->t_timer[TCPT_PERSIST] = 0; - tp->t_rxtshift = 0; - } - } - } else - if (SEQ_GT(tp->snd_nxt + len, tp->snd_max)) - tp->snd_max = tp->snd_nxt + len; - - /* - * Fill in IP length and desired time to live and - * send to IP level. There should be a better way - * to handle ttl and tos; we could keep them in - * the template, but need a way to checksum without them. - */ - m->m_len = hdrlen + len; /* XXX Needed? m_len should be correct */ - - { - - ((struct ip *)ti)->ip_len = (u_int16_t) m->m_len; - - ((struct ip *)ti)->ip_ttl = ip_defttl; - ((struct ip *)ti)->ip_tos = so->so_iptos; - -/* #if BSD >= 43 */ - /* Don't do IP options... */ -/* error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route, - * so->so_options & SO_DONTROUTE, 0); - */ - error = ip_output(so, m); - -/* #else - * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, - * so->so_options & SO_DONTROUTE); - * #endif - */ - } - if (error) { -out: -/* if (error == ENOBUFS) { - * tcp_quench(tp->t_inpcb, 0); - * return (0); - * } - */ -/* if ((error == EHOSTUNREACH || error == ENETDOWN) - * && TCPS_HAVERCVDSYN(tp->t_state)) { - * tp->t_softerror = error; - * return (0); - * } - */ - return (error); - } - tcpstat.tcps_sndtotal++; - - /* - * Data sent (as far as we can tell). - * If this advertises a larger window than any other segment, - * then remember the size of the advertised window. - * Any pending ACK has now been sent. - */ - if (win > 0 && SEQ_GT(tp->rcv_nxt+win, tp->rcv_adv)) - tp->rcv_adv = tp->rcv_nxt + win; - tp->last_ack_sent = tp->rcv_nxt; - tp->t_flags &= ~(TF_ACKNOW|TF_DELACK); - if (sendalot) - goto again; - - return (0); -} - -void tcp_setpersist(register struct tcpcb *tp) -{ - int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; - -/* if (tp->t_timer[TCPT_REXMT]) - * panic("tcp_output REXMT"); - */ - /* - * Start/restart persistence timer. - */ - TCPT_RANGESET(tp->t_timer[TCPT_PERSIST], - t * tcp_backoff[tp->t_rxtshift], - TCPTV_PERSMIN, TCPTV_PERSMAX); - if (tp->t_rxtshift < TCP_MAXRXTSHIFT) - tp->t_rxtshift++; -} diff --git a/BasiliskII/src/slirp/tcp_subr.c b/BasiliskII/src/slirp/tcp_subr.c deleted file mode 100644 index 70e04b5ee..000000000 --- a/BasiliskII/src/slirp/tcp_subr.c +++ /dev/null @@ -1,1296 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_subr.c 8.1 (Berkeley) 6/10/93 - * tcp_subr.c,v 1.5 1994/10/08 22:39:58 phk Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include - -/* patchable/settable parameters for tcp */ -int tcp_mssdflt = TCP_MSS; -int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; -int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -size_t tcp_rcvspace; /* You may want to change this */ -size_t tcp_sndspace; /* Keep small if you have an error prone link */ - -/* - * Tcp initialization - */ -void tcp_init() -{ - tcp_iss = 1; /* wrong */ - tcb.so_next = tcb.so_prev = &tcb; - - /* tcp_rcvspace = our Window we advertise to the remote */ - tcp_rcvspace = TCP_RCVSPACE; - tcp_sndspace = TCP_SNDSPACE; - - /* Make sure tcp_sndspace is at least 2*MSS */ - if (tcp_sndspace < 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr))) - tcp_sndspace = 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr)); -} - -/* - * Create template to be used to send tcp packets on a connection. - * Call after host entry created, fills - * in a skeletal tcp/ip header, minimizing the amount of work - * necessary when the connection is used. - */ -/* struct tcpiphdr * */ -void tcp_template(struct tcpcb *tp) -{ - struct socket *so = tp->t_socket; - register struct tcpiphdr *n = &tp->t_template; - - n->ti_next = n->ti_prev = 0; - n->ti_x1 = 0; - n->ti_pr = IPPROTO_TCP; - n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); - n->ti_src = so->so_faddr; - n->ti_dst = so->so_laddr; - n->ti_sport = so->so_fport; - n->ti_dport = so->so_lport; - - n->ti_seq = 0; - n->ti_ack = 0; - n->ti_x2 = 0; - n->ti_off = 5; - n->ti_flags = 0; - n->ti_win = 0; - n->ti_sum = 0; - n->ti_urp = 0; -} - -/* - * Send a single message to the TCP at address specified by - * the given TCP/IP header. If m == 0, then we make a copy - * of the tcpiphdr at ti and send directly to the addressed host. - * This is used to force keep alive messages out using the TCP - * template for a connection tp->t_template. If flags are given - * then we send a message back to the TCP which originated the - * segment ti, and discard the mbuf containing it and any other - * attached mbufs. - * - * In any case the ack and sequence number of the transmitted - * segment are as specified by the parameters. - */ -void tcp_respond(struct tcpcb *tp, register struct tcpiphdr *ti, - register struct mbuf *m, tcp_seq ack, tcp_seq seq, int flags) -{ - register int tlen; - int win = 0; - - DEBUG_CALL("tcp_respond"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("ti = %lx", (long)ti); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("ack = %u", ack); - DEBUG_ARG("seq = %u", seq); - DEBUG_ARG("flags = %x", flags); - - if (tp) - win = sbspace(&tp->t_socket->so_rcv); - if (m == 0) { - if ((m = m_get()) == NULL) - return; -#ifdef TCP_COMPAT_42 - tlen = 1; -#else - tlen = 0; -#endif - m->m_data += if_maxlinkhdr; - *mtod(m, struct tcpiphdr *) = *ti; - ti = mtod(m, struct tcpiphdr *); - flags = TH_ACK; - } else { - /* - * ti points into m so the next line is just making - * the mbuf point to ti - */ - m->m_data = (caddr_t)ti; - - m->m_len = sizeof (struct tcpiphdr); - tlen = 0; -#define xchg(a,b,type) { type t; t=a; a=b; b=t; } - xchg(ti->ti_dst.s_addr, ti->ti_src.s_addr, u_int32_t); - xchg(ti->ti_dport, ti->ti_sport, u_int16_t); -#undef xchg - } - ti->ti_len = htons((u_short)(sizeof (struct tcphdr) + tlen)); - tlen += sizeof (struct tcpiphdr); - m->m_len = tlen; - - ti->ti_next = ti->ti_prev = 0; - ti->ti_x1 = 0; - ti->ti_seq = htonl(seq); - ti->ti_ack = htonl(ack); - ti->ti_x2 = 0; - ti->ti_off = sizeof (struct tcphdr) >> 2; - ti->ti_flags = flags; - if (tp) - ti->ti_win = htons((u_int16_t) (win >> tp->rcv_scale)); - else - ti->ti_win = htons((u_int16_t)win); - ti->ti_urp = 0; - ti->ti_sum = 0; - ti->ti_sum = cksum(m, tlen); - ((struct ip *)ti)->ip_len = tlen; - - if(flags & TH_RST) - ((struct ip *)ti)->ip_ttl = MAXTTL; - else - ((struct ip *)ti)->ip_ttl = ip_defttl; - - (void) ip_output((struct socket *)0, m); -} - -/* - * Create a new TCP control block, making an - * empty reassembly queue and hooking it to the argument - * protocol control block. - */ -struct tcpcb *tcp_newtcpcb(struct socket *so) -{ - register struct tcpcb *tp; - - tp = (struct tcpcb *)malloc(sizeof(*tp)); - if (tp == NULL) - return ((struct tcpcb *)0); - - memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (tcpiphdrp_32)tp; - tp->t_maxseg = tcp_mssdflt; - - tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; - tp->t_socket = so; - - /* - * Init srtt to TCPTV_SRTTBASE (0), so we can tell that we have no - * rtt estimate. Set rttvar so that srtt + 2 * rttvar gives - * reasonable initial retransmit time. - */ - tp->t_srtt = TCPTV_SRTTBASE; - tp->t_rttvar = tcp_rttdflt * PR_SLOWHZ << 2; - tp->t_rttmin = TCPTV_MIN; - - TCPT_RANGESET(tp->t_rxtcur, - ((TCPTV_SRTTBASE >> 2) + (TCPTV_SRTTDFLT << 2)) >> 1, - TCPTV_MIN, TCPTV_REXMTMAX); - - tp->snd_cwnd = TCP_MAXWIN << TCP_MAX_WINSHIFT; - tp->snd_ssthresh = TCP_MAXWIN << TCP_MAX_WINSHIFT; - tp->t_state = TCPS_CLOSED; - - so->so_tcpcb = tp; - - return (tp); -} - -/* - * Drop a TCP connection, reporting - * the specified error. If connection is synchronized, - * then send a RST to peer. - */ -struct tcpcb *tcp_drop(struct tcpcb *tp, int err) -{ -/* tcp_drop(tp, errno) - register struct tcpcb *tp; - int errno; -{ -*/ - - DEBUG_CALL("tcp_drop"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("errno = %d", errno); - - if (TCPS_HAVERCVDSYN(tp->t_state)) { - tp->t_state = TCPS_CLOSED; - (void) tcp_output(tp); - tcpstat.tcps_drops++; - } else - tcpstat.tcps_conndrops++; -/* if (errno == ETIMEDOUT && tp->t_softerror) - * errno = tp->t_softerror; - */ -/* so->so_error = errno; */ - return (tcp_close(tp)); -} - -/* - * Close a TCP control block: - * discard all space held by the tcp - * discard internet protocol block - * wake up any sleepers - */ -struct tcpcb *tcp_close(register struct tcpcb *tp) -{ - register struct tcpiphdr *t; - struct socket *so = tp->t_socket; - register struct mbuf *m; - - DEBUG_CALL("tcp_close"); - DEBUG_ARG("tp = %lx", (long )tp); - - /* free the reassembly queue, if any */ - t = (struct tcpiphdr *) tp->seg_next; - while (t != (struct tcpiphdr *)tp) { - t = (struct tcpiphdr *)t->ti_next; - m = (struct mbuf *) REASS_MBUF((struct tcpiphdr *)t->ti_prev); - remque_32((struct tcpiphdr *) t->ti_prev); - m_freem(m); - } - /* It's static */ -/* if (tp->t_template) - * (void) m_free(dtom(tp->t_template)); - */ -/* free(tp, M_PCB); */ - free(tp); - so->so_tcpcb = 0; - soisfdisconnected(so); - /* clobber input socket cache if we're closing the cached connection */ - if (so == tcp_last_so) - tcp_last_so = &tcb; - closesocket(so->s); - sbfree(&so->so_rcv); - sbfree(&so->so_snd); - sofree(so); - tcpstat.tcps_closed++; - return ((struct tcpcb *)0); -} - -void tcp_drain() -{ - /* XXX */ -} - -/* - * When a source quench is received, close congestion window - * to one segment. We will gradually open it again as we proceed. - */ - -#ifdef notdef - -void tcp_quench(int i, int errno) -{ - struct tcpcb *tp = intotcpcb(inp); - - if (tp) - tp->snd_cwnd = tp->t_maxseg; -} - -#endif /* notdef */ - -/* - * TCP protocol interface to socket abstraction. - */ - -/* - * User issued close, and wish to trail through shutdown states: - * if never received SYN, just forget it. If got a SYN from peer, - * but haven't sent FIN, then go to FIN_WAIT_1 state to send peer a FIN. - * If already got a FIN from peer, then almost done; go to LAST_ACK - * state. In all other cases, have already sent FIN to peer (e.g. - * after PRU_SHUTDOWN), and just have to play tedious game waiting - * for peer to send FIN or not respond to keep-alives, etc. - * We can let the user exit from the close as soon as the FIN is acked. - */ -void tcp_sockclosed(struct tcpcb *tp) -{ - - DEBUG_CALL("tcp_sockclosed"); - DEBUG_ARG("tp = %lx", (long)tp); - - switch (tp->t_state) { - - case TCPS_CLOSED: - case TCPS_LISTEN: - case TCPS_SYN_SENT: - tp->t_state = TCPS_CLOSED; - tp = tcp_close(tp); - break; - - case TCPS_SYN_RECEIVED: - case TCPS_ESTABLISHED: - tp->t_state = TCPS_FIN_WAIT_1; - break; - - case TCPS_CLOSE_WAIT: - tp->t_state = TCPS_LAST_ACK; - break; - } -/* soisfdisconnecting(tp->t_socket); */ - if (tp && tp->t_state >= TCPS_FIN_WAIT_2) - soisfdisconnected(tp->t_socket); - if (tp) - tcp_output(tp); -} - -/* - * Connect to a host on the Internet - * Called by tcp_input - * Only do a connect, the tcp fields will be set in tcp_input - * return 0 if there's a result of the connect, - * else return -1 means we're still connecting - * The return value is almost always -1 since the socket is - * nonblocking. Connect returns after the SYN is sent, and does - * not wait for ACK+SYN. - */ -int tcp_fconnect(struct socket *so) -{ - int ret=0; - - DEBUG_CALL("tcp_fconnect"); - DEBUG_ARG("so = %lx", (long )so); - - if( (ret=so->s=socket(AF_INET,SOCK_STREAM,0)) >= 0) { - int opt, s=so->s; - struct sockaddr_in addr; - memset(&addr, 0, sizeof(struct sockaddr_in)); - - fd_nonblock(s); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(opt )); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(opt )); - - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else - addr.sin_addr = so->so_faddr; - addr.sin_port = so->so_fport; - - char addrstr[INET_ADDRSTRLEN]; - DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " - "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntop(AF_INET, &addr.sin_addr, - addrstr, sizeof(addrstr)))); - /* We don't care what port we get */ - ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); - - /* - * If it's not in progress, it failed, so we just return 0, - * without clearing SS_NOFDREF - */ - soisfconnecting(so); - } - - return(ret); -} - -/* - * Accept the socket and connect to the local-host - * - * We have a problem. The correct thing to do would be - * to first connect to the local-host, and only if the - * connection is accepted, then do an accept() here. - * But, a) we need to know who's trying to connect - * to the socket to be able to SYN the local-host, and - * b) we are already connected to the foreign host by - * the time it gets to accept(), so... We simply accept - * here and SYN the local-host. - */ -void tcp_connect(struct socket *inso) -{ - struct socket *so; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - struct tcpcb *tp; - int s, opt; - - DEBUG_CALL("tcp_connect"); - DEBUG_ARG("inso = %lx", (long)inso); - - /* - * If it's an SS_ACCEPTONCE socket, no need to socreate() - * another socket, just use the accept() socket. - */ - if (inso->so_state & SS_FACCEPTONCE) { - /* FACCEPTONCE already have a tcpcb */ - so = inso; - } else { - if ((so = socreate()) == NULL) { - /* If it failed, get rid of the pending connection */ - closesocket(accept(inso->s,(struct sockaddr *)&addr,&addrlen)); - return; - } - if (tcp_attach(so) < 0) { - free(so); /* NOT sofree */ - return; - } - so->so_laddr = inso->so_laddr; - so->so_lport = inso->so_lport; - } - - tcp_mss(sototcpcb(so), 0); - - if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { - tcp_close(sototcpcb(so)); /* This will sofree() as well */ - return; - } - fd_nonblock(s); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(s,IPPROTO_TCP,TCP_NODELAY,(char *)&opt,sizeof(int)); - - so->so_fport = addr.sin_port; - so->so_faddr = addr.sin_addr; - /* Translate connections from localhost to the real hostname */ - if (so->so_faddr.s_addr == 0 || so->so_faddr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - - /* Close the accept() socket, set right state */ - if (inso->so_state & SS_FACCEPTONCE) { - closesocket(so->s); /* If we only accept once, close the accept() socket */ - so->so_state = SS_NOFDREF; /* Don't select it yet, even though we have an FD */ - /* if it's not FACCEPTONCE, it's already NOFDREF */ - } - so->s = s; - - so->so_iptos = tcp_tos(so); - tp = sototcpcb(so); - - tcp_template(tp); - - /* Compute window scaling to request. */ -/* while (tp->request_r_scale < TCP_MAX_WINSHIFT && - * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) - * tp->request_r_scale++; - */ - -/* soisconnecting(so); */ /* NOFDREF used instead */ - tcpstat.tcps_connattempt++; - - tp->t_state = TCPS_SYN_SENT; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tcp_sendseqinit(tp); - tcp_output(tp); -} - -/* - * Attach a TCPCB to a socket. - */ -int tcp_attach(struct socket *so) -{ - if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) - return -1; - - insque(so, &tcb); - - return 0; -} - -/* - * Set the socket's type of service field - */ -struct tos_t tcptos[] = { - {0, 20, IPTOS_THROUGHPUT, 0}, /* ftp data */ - {21, 21, IPTOS_LOWDELAY, EMU_FTP}, /* ftp control */ - {0, 23, IPTOS_LOWDELAY, 0}, /* telnet */ - {0, 80, IPTOS_THROUGHPUT, 0}, /* WWW */ - {0, 513, IPTOS_LOWDELAY, EMU_RLOGIN|EMU_NOCONNECT}, /* rlogin */ - {0, 514, IPTOS_LOWDELAY, EMU_RSH|EMU_NOCONNECT}, /* shell */ - {0, 544, IPTOS_LOWDELAY, EMU_KSH}, /* kshell */ - {0, 543, IPTOS_LOWDELAY, 0}, /* klogin */ - {0, 6667, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC */ - {0, 6668, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC undernet */ - {0, 7070, IPTOS_LOWDELAY, EMU_REALAUDIO }, /* RealAudio control */ - {0, 113, IPTOS_LOWDELAY, EMU_IDENT }, /* identd protocol */ - {0, 0, 0, 0} -}; - -struct emu_t *tcpemu = 0; - -/* - * Return TOS according to the above table - */ -u_int8_t tcp_tos(struct socket *so) -{ - int i = 0; - struct emu_t *emup; - - while(tcptos[i].tos) { - if ((tcptos[i].fport && (ntohs(so->so_fport) == tcptos[i].fport)) || - (tcptos[i].lport && (ntohs(so->so_lport) == tcptos[i].lport))) { - so->so_emu = tcptos[i].emu; - return tcptos[i].tos; - } - i++; - } - - /* Nope, lets see if there's a user-added one */ - for (emup = tcpemu; emup; emup = emup->next) { - if ((emup->fport && (ntohs(so->so_fport) == emup->fport)) || - (emup->lport && (ntohs(so->so_lport) == emup->lport))) { - so->so_emu = emup->emu; - return emup->tos; - } - } - - return 0; -} - -int do_echo = -1; - -/* - * Emulate programs that try and connect to us - * This includes ftp (the data connection is - * initiated by the server) and IRC (DCC CHAT and - * DCC SEND) for now - * - * NOTE: It's possible to crash SLiRP by sending it - * unstandard strings to emulate... if this is a problem, - * more checks are needed here - * - * XXX Assumes the whole command came in one packet - * - * XXX Some ftp clients will have their TOS set to - * LOWDELAY and so Nagel will kick in. Because of this, - * we'll get the first letter, followed by the rest, so - * we simply scan for ORT instead of PORT... - * DCC doesn't have this problem because there's other stuff - * in the packet before the DCC command. - * - * Return 1 if the mbuf m is still valid and should be - * sbappend()ed - * - * NOTE: if you return 0 you MUST m_free() the mbuf! - */ -int tcp_emu(struct socket *so, struct mbuf *m) -{ - u_int n1, n2, n3, n4, n5, n6; - char buff[256]; - u_int32_t laddr; - u_int lport; - char *bptr; - - DEBUG_CALL("tcp_emu"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - - switch(so->so_emu) { - int x, i; - - case EMU_IDENT: - /* - * Identification protocol as per rfc-1413 - */ - - { - struct socket *tmpso; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - struct sbuf *so_rcv = &so->so_rcv; - - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m->m_data[m->m_len] = 0; /* NULL terminate */ - if (strchr(m->m_data, '\r') || strchr(m->m_data, '\n')) { - if (sscanf(so_rcv->sb_data, "%d%*[ ,]%d", &n1, &n2) == 2) { - HTONS(n1); - HTONS(n2); - /* n2 is the one on our host */ - for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_laddr.s_addr == so->so_laddr.s_addr && - tmpso->so_lport == n2 && - tmpso->so_faddr.s_addr == so->so_faddr.s_addr && - tmpso->so_fport == n1) { - if (getsockname(tmpso->s, - (struct sockaddr *)&addr, &addrlen) == 0) - n2 = ntohs(addr.sin_port); - break; - } - } - } - so_rcv->sb_cc = sprintf(so_rcv->sb_data, "%d,%d\r\n", n1, n2); - so_rcv->sb_rptr = so_rcv->sb_data; - so_rcv->sb_wptr = so_rcv->sb_data + so_rcv->sb_cc; - } - m_free(m); - return 0; - } - -#if 0 - case EMU_RLOGIN: - /* - * Rlogin emulation - * First we accumulate all the initial option negotiation, - * then fork_exec() rlogin according to the options - */ - { - int i, i2, n; - char *ptr; - char args[100]; - char term[100]; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* First check if they have a priveladged port, or too much data has arrived */ - if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || - (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - m_free(m); - return 0; - } - - /* Append the current data */ - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m_free(m); - - /* - * Check if we have all the initial options, - * and build argument list to rlogin while we're here - */ - n = 0; - ptr = so_rcv->sb_data; - args[0] = 0; - term[0] = 0; - while (ptr < so_rcv->sb_wptr) { - if (*ptr++ == 0) { - n++; - if (n == 2) { - sprintf(args, "rlogin -l %s %s", - ptr, inet_ntoa(so->so_faddr)); - } else if (n == 3) { - i2 = so_rcv->sb_wptr - ptr; - for (i = 0; i < i2; i++) { - if (ptr[i] == '/') { - ptr[i] = 0; -#ifdef HAVE_SETENV - sprintf(term, "%s", ptr); -#else - sprintf(term, "TERM=%s", ptr); -#endif - ptr[i] = '/'; - break; - } - } - } - } - } - - if (n != 4) - return 0; - - /* We have it, set our term variable and fork_exec() */ -#ifdef HAVE_SETENV - setenv("TERM", term, 1); -#else - putenv(term); -#endif - fork_exec(so, args, 2); - term[0] = 0; - so->so_emu = 0; - - /* And finally, send the client a 0 character */ - so_snd->sb_wptr[0] = 0; - so_snd->sb_wptr++; - so_snd->sb_cc++; - - return 0; - } - - case EMU_RSH: - /* - * rsh emulation - * First we accumulate all the initial option negotiation, - * then rsh_exec() rsh according to the options - */ - { - int n; - char *ptr; - char *user; - char *args; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* First check if they have a priveladged port, or too much data has arrived */ - if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || - (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - m_free(m); - return 0; - } - - /* Append the current data */ - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m_free(m); - - /* - * Check if we have all the initial options, - * and build argument list to rlogin while we're here - */ - n = 0; - ptr = so_rcv->sb_data; - user=""; - args=""; - if (so->extra==NULL) { - struct socket *ns; - struct tcpcb* tp; - int port=atoi(ptr); - if (port <= 0) return 0; - if (port > 1023 || port < 512) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - return 0; - } - if ((ns=socreate()) == NULL) - return 0; - if (tcp_attach(ns)<0) { - free(ns); - return 0; - } - - ns->so_laddr=so->so_laddr; - ns->so_lport=htons(port); - - tcp_mss(sototcpcb(ns), 0); - - ns->so_faddr=so->so_faddr; - ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ - - if (ns->so_faddr.s_addr == 0 || - ns->so_faddr.s_addr == loopback_addr.s_addr) - ns->so_faddr = alias_addr; - - ns->so_iptos = tcp_tos(ns); - tp = sototcpcb(ns); - - tcp_template(tp); - - /* Compute window scaling to request. */ - /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && - * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) - * tp->request_r_scale++; - */ - - /*soisfconnecting(ns);*/ - - tcpstat.tcps_connattempt++; - - tp->t_state = TCPS_SYN_SENT; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tcp_sendseqinit(tp); - tcp_output(tp); - so->extra=ns; - } - while (ptr < so_rcv->sb_wptr) { - if (*ptr++ == 0) { - n++; - if (n == 2) { - user=ptr; - } else if (n == 3) { - args=ptr; - } - } - } - - if (n != 4) - return 0; - - rsh_exec(so,so->extra, user, inet_ntoa(so->so_faddr), args); - so->so_emu = 0; - so->extra=NULL; - - /* And finally, send the client a 0 character */ - so_snd->sb_wptr[0] = 0; - so_snd->sb_wptr++; - so_snd->sb_cc++; - - return 0; - } - - case EMU_CTL: - { - int num; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* - * If there is binary data here, we save it in so->so_m - */ - if (!so->so_m) { - int rxlen; - char *rxdata; - rxdata=mtod(m, char *); - for (rxlen=m->m_len; rxlen; rxlen--) { - if (*rxdata++ & 0x80) { - so->so_m = m; - return 0; - } - } - } /* if(so->so_m==NULL) */ - - /* - * Append the line - */ - sbappendsb(so_rcv, m); - - /* To avoid going over the edge of the buffer, we reset it */ - if (so_snd->sb_cc == 0) - so_snd->sb_wptr = so_snd->sb_rptr = so_snd->sb_data; - - /* - * A bit of a hack: - * If the first packet we get here is 1 byte long, then it - * was done in telnet character mode, therefore we must echo - * the characters as they come. Otherwise, we echo nothing, - * because in linemode, the line is already echoed - * XXX two or more control connections won't work - */ - if (do_echo == -1) { - if (m->m_len == 1) do_echo = 1; - else do_echo = 0; - } - if (do_echo) { - sbappendsb(so_snd, m); - m_free(m); - tcp_output(sototcpcb(so)); /* XXX */ - } else - m_free(m); - - num = 0; - while (num < so->so_rcv.sb_cc) { - if (*(so->so_rcv.sb_rptr + num) == '\n' || - *(so->so_rcv.sb_rptr + num) == '\r') { - int n; - - *(so_rcv->sb_rptr + num) = 0; - if (ctl_password && !ctl_password_ok) { - /* Need a password */ - if (sscanf(so_rcv->sb_rptr, "pass %256s", buff) == 1) { - if (strcmp(buff, ctl_password) == 0) { - ctl_password_ok = 1; - n = sprintf(so_snd->sb_wptr, - "Password OK.\r\n"); - goto do_prompt; - } - } - n = sprintf(so_snd->sb_wptr, - "Error: Password required, log on with \"pass PASSWORD\"\r\n"); - goto do_prompt; - } - cfg_quitting = 0; - n = do_config(so_rcv->sb_rptr, so, PRN_SPRINTF); - if (!cfg_quitting) { - /* Register the printed data */ -do_prompt: - so_snd->sb_cc += n; - so_snd->sb_wptr += n; - /* Add prompt */ - n = sprintf(so_snd->sb_wptr, "Slirp> "); - so_snd->sb_cc += n; - so_snd->sb_wptr += n; - } - /* Drop so_rcv data */ - so_rcv->sb_cc = 0; - so_rcv->sb_wptr = so_rcv->sb_rptr = so_rcv->sb_data; - tcp_output(sototcpcb(so)); /* Send the reply */ - } - num++; - } - return 0; - } -#endif - case EMU_FTP: /* ftp */ - *(m->m_data+m->m_len) = 0; /* NULL terminate for strstr */ - if ((bptr = (char *)strstr(m->m_data, "ORT")) != NULL) { - /* - * Need to emulate the PORT command - */ - x = sscanf(bptr, "ORT %d,%d,%d,%d,%d,%d\r\n%256[^\177]", - &n1, &n2, &n3, &n4, &n5, &n6, buff); - if (x < 6) - return 1; - - laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); - lport = htons((n5 << 8) | (n6)); - - if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) - return 1; - - n6 = ntohs(so->so_fport); - - n5 = (n6 >> 8) & 0xff; - n6 &= 0xff; - - laddr = ntohl(so->so_faddr.s_addr); - - n1 = ((laddr >> 24) & 0xff); - n2 = ((laddr >> 16) & 0xff); - n3 = ((laddr >> 8) & 0xff); - n4 = (laddr & 0xff); - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); - return 1; - } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { - /* - * Need to emulate the PASV response - */ - x = sscanf(bptr, "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%256[^\177]", - &n1, &n2, &n3, &n4, &n5, &n6, buff); - if (x < 6) - return 1; - - laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); - lport = htons((n5 << 8) | (n6)); - - if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) - return 1; - - n6 = ntohs(so->so_fport); - - n5 = (n6 >> 8) & 0xff; - n6 &= 0xff; - - laddr = ntohl(so->so_faddr.s_addr); - - n1 = ((laddr >> 24) & 0xff); - n2 = ((laddr >> 16) & 0xff); - n3 = ((laddr >> 8) & 0xff); - n4 = (laddr & 0xff); - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); - - return 1; - } - - return 1; - - case EMU_KSH: - /* - * The kshell (Kerberos rsh) and shell services both pass - * a local port port number to carry signals to the server - * and stderr to the client. It is passed at the beginning - * of the connection as a NUL-terminated decimal ASCII string. - */ - so->so_emu = 0; - for (lport = 0, i = 0; i < (int) (m->m_len-1); ++i) { - if (m->m_data[i] < '0' || m->m_data[i] > '9') - return 1; /* invalid number */ - lport *= 10; - lport += m->m_data[i] - '0'; - } - if (m->m_data[m->m_len-1] == '\0' && lport != 0 && - (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) - m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; - return 1; - - case EMU_IRC: - /* - * Need to emulate DCC CHAT, DCC SEND and DCC MOVE - */ - *(m->m_data+m->m_len) = 0; /* NULL terminate the string for strstr */ - if ((bptr = (char *)strstr(m->m_data, "DCC")) == NULL) - return 1; - - /* The %256s is for the broken mIRC */ - if (sscanf(bptr, "DCC CHAT %256s %u %u", buff, &laddr, &lport) == 3) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), 1); - } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); - } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); - } - return 1; - - case EMU_REALAUDIO: - /* - * RealAudio emulation - JP. We must try to parse the incoming - * data and try to find the two characters that contain the - * port number. Then we redirect an udp port and replace the - * number with the real port we got. - * - * The 1.0 beta versions of the player are not supported - * any more. - * - * A typical packet for player version 1.0 (release version): - * - * 0000:50 4E 41 00 05 - * 0000:00 01 00 02 1B D7 00 00 67 E6 6C DC 63 00 12 50 .....×..gælÜc..P - * 0010:4E 43 4C 49 45 4E 54 20 31 30 31 20 41 4C 50 48 NCLIENT 101 ALPH - * 0020:41 6C 00 00 52 00 17 72 61 66 69 6C 65 73 2F 76 Al..R..rafiles/v - * 0030:6F 61 2F 65 6E 67 6C 69 73 68 5F 2E 72 61 79 42 oa/english_.rayB - * - * Now the port number 0x1BD7 is found at offset 0x04 of the - * Now the port number 0x1BD7 is found at offset 0x04 of the - * second packet. This time we received five bytes first and - * then the rest. You never know how many bytes you get. - * - * A typical packet for player version 2.0 (beta): - * - * 0000:50 4E 41 00 06 00 02 00 00 00 01 00 02 1B C1 00 PNA...........Á. - * 0010:00 67 75 78 F5 63 00 0A 57 69 6E 32 2E 30 2E 30 .guxõc..Win2.0.0 - * 0020:2E 35 6C 00 00 52 00 1C 72 61 66 69 6C 65 73 2F .5l..R..rafiles/ - * 0030:77 65 62 73 69 74 65 2F 32 30 72 65 6C 65 61 73 website/20releas - * 0040:65 2E 72 61 79 53 00 00 06 36 42 e.rayS...6B - * - * Port number 0x1BC1 is found at offset 0x0d. - * - * This is just a horrible switch statement. Variable ra tells - * us where we're going. - */ - - bptr = m->m_data; - while (bptr < m->m_data + m->m_len) { - u_short p; - static int ra = 0; - char ra_tbl[4]; - - ra_tbl[0] = 0x50; - ra_tbl[1] = 0x4e; - ra_tbl[2] = 0x41; - ra_tbl[3] = 0; - - switch (ra) { - case 0: - case 2: - case 3: - if (*bptr++ != ra_tbl[ra]) { - ra = 0; - continue; - } - break; - - case 1: - /* - * We may get 0x50 several times, ignore them - */ - if (*bptr == 0x50) { - ra = 1; - bptr++; - continue; - } else if (*bptr++ != ra_tbl[ra]) { - ra = 0; - continue; - } - break; - - case 4: - /* - * skip version number - */ - bptr++; - break; - - case 5: - /* - * The difference between versions 1.0 and - * 2.0 is here. For future versions of - * the player this may need to be modified. - */ - if (*(bptr + 1) == 0x02) - bptr += 8; - else - bptr += 4; - break; - - case 6: - /* This is the field containing the port - * number that RA-player is listening to. - */ - lport = (((u_char*)bptr)[0] << 8) - + ((u_char *)bptr)[1]; - if (lport < 6970) - lport += 256; /* don't know why */ - if (lport < 6970 || lport > 7170) - return 1; /* failed */ - - /* try to get udp port between 6970 - 7170 */ - for (p = 6970; p < 7071; p++) { - if (udp_listen( htons(p), - so->so_laddr.s_addr, - htons(lport), - SS_FACCEPTONCE)) { - break; - } - } - if (p == 7071) - p = 0; - *(u_char *)bptr++ = (p >> 8) & 0xff; - *(u_char *)bptr++ = p & 0xff; - ra = 0; - return 1; /* port redirected, we're done */ - break; - - default: - ra = 0; - } - ra++; - } - return 1; - - default: - /* Ooops, not emulated, won't call tcp_emu again */ - so->so_emu = 0; - return 1; - } -} - -/* - * Do misc. config of SLiRP while its running. - * Return 0 if this connections is to be closed, 1 otherwise, - * return 2 if this is a command-line connection - */ -int tcp_ctl(struct socket *so) -{ - struct sbuf *sb = &so->so_snd; - int command; - struct ex_list *ex_ptr; - int do_pty; - // struct socket *tmpso; - - DEBUG_CALL("tcp_ctl"); - DEBUG_ARG("so = %lx", (long )so); - -#if 0 - /* - * Check if they're authorised - */ - if (ctl_addr.s_addr && (ctl_addr.s_addr == -1 || (so->so_laddr.s_addr != ctl_addr.s_addr))) { - sb->sb_cc = sprintf(sb->sb_wptr,"Error: Permission denied.\r\n"); - sb->sb_wptr += sb->sb_cc; - return 0; - } -#endif - command = (ntohl(so->so_faddr.s_addr) & 0xff); - - switch(command) { - default: /* Check for exec's */ - - /* - * Check if it's pty_exec - */ - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - command == ex_ptr->ex_addr) { - do_pty = ex_ptr->ex_pty; - goto do_exec; - } - } - - /* - * Nothing bound.. - */ - /* tcp_fconnect(so); */ - - /* FALLTHROUGH */ - case CTL_ALIAS: - sb->sb_cc = sprintf(sb->sb_wptr, - "Error: No application configured.\r\n"); - sb->sb_wptr += sb->sb_cc; - return(0); - - do_exec: - DEBUG_MISC((dfd, " executing %s \n",ex_ptr->ex_exec)); - return(fork_exec(so, ex_ptr->ex_exec, do_pty)); - -#if 0 - case CTL_CMD: - for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_emu == EMU_CTL && - !(tmpso->so_tcpcb? - (tmpso->so_tcpcb->t_state & (TCPS_TIME_WAIT|TCPS_LAST_ACK)) - :0)) { - /* Ooops, control connection already active */ - sb->sb_cc = sprintf(sb->sb_wptr,"Sorry, already connected.\r\n"); - sb->sb_wptr += sb->sb_cc; - return 0; - } - } - so->so_emu = EMU_CTL; - ctl_password_ok = 0; - sb->sb_cc = sprintf(sb->sb_wptr, "Slirp command-line ready (type \"help\" for help).\r\nSlirp> "); - sb->sb_wptr += sb->sb_cc; - do_echo=-1; - return(2); -#endif - } -} diff --git a/BasiliskII/src/slirp/tcp_timer.c b/BasiliskII/src/slirp/tcp_timer.c deleted file mode 100644 index ab9aa580d..000000000 --- a/BasiliskII/src/slirp/tcp_timer.c +++ /dev/null @@ -1,322 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_timer.c 8.1 (Berkeley) 6/10/93 - * tcp_timer.c,v 1.2 1994/08/02 07:49:10 davidg Exp - */ - -#include - -int tcp_keepidle = TCPTV_KEEP_IDLE; -int tcp_keepintvl = TCPTV_KEEPINTVL; -int tcp_maxidle; -int so_options = DO_KEEPALIVE; - -struct tcpstat tcpstat; /* tcp statistics */ -u_int32_t tcp_now; /* for RFC 1323 timestamps */ - -/* - * Fast timeout routine for processing delayed acks - */ -void -tcp_fasttimo() -{ - register struct socket *so; - register struct tcpcb *tp; - - DEBUG_CALL("tcp_fasttimo"); - - so = tcb.so_next; - if (so) - for (; so != &tcb; so = so->so_next) - if ((tp = (struct tcpcb *)so->so_tcpcb) && - (tp->t_flags & TF_DELACK)) { - tp->t_flags &= ~TF_DELACK; - tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_delack++; - (void) tcp_output(tp); - } -} - -/* - * Tcp protocol timeout routine called every 500 ms. - * Updates the timers in all active tcb's and - * causes finite state machine actions if timers expire. - */ -void -tcp_slowtimo() -{ - register struct socket *ip, *ipnxt; - register struct tcpcb *tp; - register int i; - - DEBUG_CALL("tcp_slowtimo"); - - tcp_maxidle = TCPTV_KEEPCNT * tcp_keepintvl; - /* - * Search through tcb's and update active timers. - */ - ip = tcb.so_next; - if (ip == 0) - return; - for (; ip != &tcb; ip = ipnxt) { - ipnxt = ip->so_next; - tp = sototcpcb(ip); - if (tp == 0) - continue; - for (i = 0; i < TCPT_NTIMERS; i++) { - if (tp->t_timer[i] && --tp->t_timer[i] == 0) { - tcp_timers(tp,i); - if (ipnxt->so_prev != ip) - goto tpgone; - } - } - tp->t_idle++; - if (tp->t_rtt) - tp->t_rtt++; -tpgone: - ; - } - tcp_iss += TCP_ISSINCR/PR_SLOWHZ; /* increment iss */ -#ifdef TCP_COMPAT_42 - if ((int)tcp_iss < 0) - tcp_iss = 0; /* XXX */ -#endif - tcp_now++; /* for timestamps */ -} - -/* - * Cancel all timers for TCP tp. - */ -void -tcp_canceltimers(tp) - struct tcpcb *tp; -{ - register int i; - - for (i = 0; i < TCPT_NTIMERS; i++) - tp->t_timer[i] = 0; -} - -int tcp_backoff[TCP_MAXRXTSHIFT + 1] = - { 1, 2, 4, 8, 16, 32, 64, 64, 64, 64, 64, 64, 64 }; - -/* - * TCP timer processing. - */ -struct tcpcb * -tcp_timers(tp, timer) - register struct tcpcb *tp; - int timer; -{ - register int rexmt; - - DEBUG_CALL("tcp_timers"); - - switch (timer) { - - /* - * 2 MSL timeout in shutdown went off. If we're closed but - * still waiting for peer to close and connection has been idle - * too long, or if 2MSL time is up from TIME_WAIT, delete connection - * control block. Otherwise, check again in a bit. - */ - case TCPT_2MSL: - if (tp->t_state != TCPS_TIME_WAIT && - tp->t_idle <= tcp_maxidle) - tp->t_timer[TCPT_2MSL] = tcp_keepintvl; - else - tp = tcp_close(tp); - break; - - /* - * Retransmission timer went off. Message has not - * been acked within retransmit interval. Back off - * to a longer retransmit interval and retransmit one segment. - */ - case TCPT_REXMT: - - /* - * XXXXX If a packet has timed out, then remove all the queued - * packets for that session. - */ - - if (++tp->t_rxtshift > TCP_MAXRXTSHIFT) { - /* - * This is a hack to suit our terminal server here at the uni of canberra - * since they have trouble with zeroes... It usually lets them through - * unharmed, but under some conditions, it'll eat the zeros. If we - * keep retransmitting it, it'll keep eating the zeroes, so we keep - * retransmitting, and eventually the connection dies... - * (this only happens on incoming data) - * - * So, if we were gonna drop the connection from too many retransmits, - * don't... instead halve the t_maxseg, which might break up the NULLs and - * let them through - * - * *sigh* - */ - - tp->t_maxseg >>= 1; - if (tp->t_maxseg < 32) { - /* - * We tried our best, now the connection must die! - */ - tp->t_rxtshift = TCP_MAXRXTSHIFT; - tcpstat.tcps_timeoutdrop++; - tp = tcp_drop(tp, tp->t_softerror); - /* tp->t_softerror : ETIMEDOUT); */ /* XXX */ - return (tp); /* XXX */ - } - - /* - * Set rxtshift to 6, which is still at the maximum - * backoff time - */ - tp->t_rxtshift = 6; - } - tcpstat.tcps_rexmttimeo++; - rexmt = TCP_REXMTVAL(tp) * tcp_backoff[tp->t_rxtshift]; - TCPT_RANGESET(tp->t_rxtcur, rexmt, - (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* - * If losing, let the lower level know and try for - * a better route. Also, if we backed off this far, - * our srtt estimate is probably bogus. Clobber it - * so we'll take the next rtt measurement as our srtt; - * move the current srtt into rttvar to keep the current - * retransmit times until then. - */ - if (tp->t_rxtshift > TCP_MAXRXTSHIFT / 4) { -/* in_losing(tp->t_inpcb); */ - tp->t_rttvar += (tp->t_srtt >> TCP_RTT_SHIFT); - tp->t_srtt = 0; - } - tp->snd_nxt = tp->snd_una; - /* - * If timing a segment in this window, stop the timer. - */ - tp->t_rtt = 0; - /* - * Close the congestion window down to one segment - * (we'll open it by one segment for each ack we get). - * Since we probably have a window's worth of unacked - * data accumulated, this "slow start" keeps us from - * dumping all that data as back-to-back packets (which - * might overwhelm an intermediate gateway). - * - * There are two phases to the opening: Initially we - * open by one mss on each ack. This makes the window - * size increase exponentially with time. If the - * window is larger than the path can handle, this - * exponential growth results in dropped packet(s) - * almost immediately. To get more time between - * drops but still "push" the network to take advantage - * of improving conditions, we switch from exponential - * to linear window opening at some threshold size. - * For a threshold, we use half the current window - * size, truncated to a multiple of the mss. - * - * (the minimum cwnd that will give us exponential - * growth is 2 mss. We don't allow the threshold - * to go below this.) - */ - { - u_int win = min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; - if (win < 2) - win = 2; - tp->snd_cwnd = tp->t_maxseg; - tp->snd_ssthresh = win * tp->t_maxseg; - tp->t_dupacks = 0; - } - (void) tcp_output(tp); - break; - - /* - * Persistence timer into zero window. - * Force a byte to be output, if possible. - */ - case TCPT_PERSIST: - tcpstat.tcps_persisttimeo++; - tcp_setpersist(tp); - tp->t_force = 1; - (void) tcp_output(tp); - tp->t_force = 0; - break; - - /* - * Keep-alive timer went off; send something - * or drop connection if idle for too long. - */ - case TCPT_KEEP: - tcpstat.tcps_keeptimeo++; - if (tp->t_state < TCPS_ESTABLISHED) - goto dropit; - -/* if (tp->t_socket->so_options & SO_KEEPALIVE && */ - if ((so_options) && tp->t_state <= TCPS_CLOSE_WAIT) { - if (tp->t_idle >= tcp_keepidle + tcp_maxidle) - goto dropit; - /* - * Send a packet designed to force a response - * if the peer is up and reachable: - * either an ACK if the connection is still alive, - * or an RST if the peer has closed the connection - * due to timeout or reboot. - * Using sequence number tp->snd_una-1 - * causes the transmitted zero-length segment - * to lie outside the receive window; - * by the protocol spec, this requires the - * correspondent TCP to respond. - */ - tcpstat.tcps_keepprobe++; -#ifdef TCP_COMPAT_42 - /* - * The keepalive packet must have nonzero length - * to get a 4.2 host to respond. - */ - tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, - tp->rcv_nxt - 1, tp->snd_una - 1, 0); -#else - tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, - tp->rcv_nxt, tp->snd_una - 1, 0); -#endif - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; - } else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; - break; - - dropit: - tcpstat.tcps_keepdrops++; - tp = tcp_drop(tp, 0); /* ETIMEDOUT); */ - break; - } - - return (tp); -} diff --git a/BasiliskII/src/slirp/tcp_timer.h b/BasiliskII/src/slirp/tcp_timer.h deleted file mode 100644 index 73fe20894..000000000 --- a/BasiliskII/src/slirp/tcp_timer.h +++ /dev/null @@ -1,138 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_timer.h 8.1 (Berkeley) 6/10/93 - * tcp_timer.h,v 1.4 1994/08/21 05:27:38 paul Exp - */ - -#ifndef _TCP_TIMER_H_ -#define _TCP_TIMER_H_ - -/* - * Definitions of the TCP timers. These timers are counted - * down PR_SLOWHZ times a second. - */ -#define TCPT_NTIMERS 4 - -#define TCPT_REXMT 0 /* retransmit */ -#define TCPT_PERSIST 1 /* retransmit persistence */ -#define TCPT_KEEP 2 /* keep alive */ -#define TCPT_2MSL 3 /* 2*msl quiet time timer */ - -/* - * The TCPT_REXMT timer is used to force retransmissions. - * The TCP has the TCPT_REXMT timer set whenever segments - * have been sent for which ACKs are expected but not yet - * received. If an ACK is received which advances tp->snd_una, - * then the retransmit timer is cleared (if there are no more - * outstanding segments) or reset to the base value (if there - * are more ACKs expected). Whenever the retransmit timer goes off, - * we retransmit one unacknowledged segment, and do a backoff - * on the retransmit timer. - * - * The TCPT_PERSIST timer is used to keep window size information - * flowing even if the window goes shut. If all previous transmissions - * have been acknowledged (so that there are no retransmissions in progress), - * and the window is too small to bother sending anything, then we start - * the TCPT_PERSIST timer. When it expires, if the window is nonzero, - * we go to transmit state. Otherwise, at intervals send a single byte - * into the peer's window to force him to update our window information. - * We do this at most as often as TCPT_PERSMIN time intervals, - * but no more frequently than the current estimate of round-trip - * packet time. The TCPT_PERSIST timer is cleared whenever we receive - * a window update from the peer. - * - * The TCPT_KEEP timer is used to keep connections alive. If an - * connection is idle (no segments received) for TCPTV_KEEP_INIT amount of time, - * but not yet established, then we drop the connection. Once the connection - * is established, if the connection is idle for TCPTV_KEEP_IDLE time - * (and keepalives have been enabled on the socket), we begin to probe - * the connection. We force the peer to send us a segment by sending: - * - * This segment is (deliberately) outside the window, and should elicit - * an ack segment in response from the peer. If, despite the TCPT_KEEP - * initiated segments we cannot elicit a response from a peer in TCPT_MAXIDLE - * amount of time probing, then we drop the connection. - */ - -/* - * Time constants. - */ -#define TCPTV_MSL ( 5*PR_SLOWHZ) /* max seg lifetime (hah!) */ - -#define TCPTV_SRTTBASE 0 /* base roundtrip time; - if 0, no idea yet */ -#define TCPTV_SRTTDFLT ( 3*PR_SLOWHZ) /* assumed RTT if no info */ - -#define TCPTV_PERSMIN ( 5*PR_SLOWHZ) /* retransmit persistence */ -#define TCPTV_PERSMAX ( 60*PR_SLOWHZ) /* maximum persist interval */ - -#define TCPTV_KEEP_INIT ( 75*PR_SLOWHZ) /* initial connect keep alive */ -#define TCPTV_KEEP_IDLE (120*60*PR_SLOWHZ) /* dflt time before probing */ -#define TCPTV_KEEPINTVL ( 75*PR_SLOWHZ) /* default probe interval */ -#define TCPTV_KEEPCNT 8 /* max probes before drop */ - -#define TCPTV_MIN ( 1*PR_SLOWHZ) /* minimum allowable value */ -/* #define TCPTV_REXMTMAX ( 64*PR_SLOWHZ) */ /* max allowable REXMT value */ -#define TCPTV_REXMTMAX ( 12*PR_SLOWHZ) /* max allowable REXMT value */ - -#define TCP_LINGERTIME 120 /* linger at most 2 minutes */ - -#define TCP_MAXRXTSHIFT 12 /* maximum retransmits */ - - -#ifdef TCPTIMERS -char *tcptimers[] = - { "REXMT", "PERSIST", "KEEP", "2MSL" }; -#endif - -/* - * Force a time value to be in a certain range. - */ -#define TCPT_RANGESET(tv, value, tvmin, tvmax) { \ - (tv) = (value); \ - if ((tv) < (tvmin)) \ - (tv) = (tvmin); \ - else if ((tv) > (tvmax)) \ - (tv) = (tvmax); \ -} - -extern int tcp_keepidle; /* time before keepalive probes begin */ -extern int tcp_keepintvl; /* time between keepalive probes */ -extern int tcp_maxidle; /* time to drop after starting probes */ -extern int tcp_ttl; /* time to live for TCP segs */ -extern int tcp_backoff[]; - -struct tcpcb; - -void tcp_fasttimo(void); -void tcp_slowtimo(void); -void tcp_canceltimers(struct tcpcb *); -struct tcpcb * tcp_timers(register struct tcpcb *, int); - -#endif diff --git a/BasiliskII/src/slirp/tcp_var.h b/BasiliskII/src/slirp/tcp_var.h deleted file mode 100644 index c8e99ae03..000000000 --- a/BasiliskII/src/slirp/tcp_var.h +++ /dev/null @@ -1,248 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993, 1994 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_var.h 8.3 (Berkeley) 4/10/94 - * tcp_var.h,v 1.3 1994/08/21 05:27:39 paul Exp - */ - -#ifndef _TCP_VAR_H_ -#define _TCP_VAR_H_ - -#include "tcpip.h" -#include "tcp_timer.h" - -#if SIZEOF_CHAR_P == 4 - typedef struct tcpiphdr *tcpiphdrp_32; -#else - typedef u_int32_t tcpiphdrp_32; -#endif - -/* - * Tcp control block, one per tcp; fields: - */ -struct tcpcb { - tcpiphdrp_32 seg_next; /* sequencing queue */ - tcpiphdrp_32 seg_prev; - short t_state; /* state of this connection */ - short t_timer[TCPT_NTIMERS]; /* tcp timers */ - short t_rxtshift; /* log(2) of rexmt exp. backoff */ - short t_rxtcur; /* current retransmit value */ - short t_dupacks; /* consecutive dup acks recd */ - u_short t_maxseg; /* maximum segment size */ - char t_force; /* 1 if forcing out a byte */ - u_short t_flags; -#define TF_ACKNOW 0x0001 /* ack peer immediately */ -#define TF_DELACK 0x0002 /* ack, but try to delay it */ -#define TF_NODELAY 0x0004 /* don't delay packets to coalesce */ -#define TF_NOOPT 0x0008 /* don't use tcp options */ -#define TF_SENTFIN 0x0010 /* have sent FIN */ -#define TF_REQ_SCALE 0x0020 /* have/will request window scaling */ -#define TF_RCVD_SCALE 0x0040 /* other side has requested scaling */ -#define TF_REQ_TSTMP 0x0080 /* have/will request timestamps */ -#define TF_RCVD_TSTMP 0x0100 /* a timestamp was received in SYN */ -#define TF_SACK_PERMIT 0x0200 /* other side said I could SACK */ - - /* Make it static for now */ -/* struct tcpiphdr *t_template; / * skeletal packet for transmit */ - struct tcpiphdr t_template; - - struct socket *t_socket; /* back pointer to socket */ -/* - * The following fields are used as in the protocol specification. - * See RFC783, Dec. 1981, page 21. - */ -/* send sequence variables */ - tcp_seq snd_una; /* send unacknowledged */ - tcp_seq snd_nxt; /* send next */ - tcp_seq snd_up; /* send urgent pointer */ - tcp_seq snd_wl1; /* window update seg seq number */ - tcp_seq snd_wl2; /* window update seg ack number */ - tcp_seq iss; /* initial send sequence number */ - u_int32_t snd_wnd; /* send window */ -/* receive sequence variables */ - u_int32_t rcv_wnd; /* receive window */ - tcp_seq rcv_nxt; /* receive next */ - tcp_seq rcv_up; /* receive urgent pointer */ - tcp_seq irs; /* initial receive sequence number */ -/* - * Additional variables for this implementation. - */ -/* receive variables */ - tcp_seq rcv_adv; /* advertised window */ -/* retransmit variables */ - tcp_seq snd_max; /* highest sequence number sent; - * used to recognize retransmits - */ -/* congestion control (for slow start, source quench, retransmit after loss) */ - u_int32_t snd_cwnd; /* congestion-controlled window */ - u_int32_t snd_ssthresh; /* snd_cwnd size threshold for - * for slow start exponential to - * linear switch - */ -/* - * transmit timing stuff. See below for scale of srtt and rttvar. - * "Variance" is actually smoothed difference. - */ - short t_idle; /* inactivity time */ - short t_rtt; /* round trip time */ - tcp_seq t_rtseq; /* sequence number being timed */ - short t_srtt; /* smoothed round-trip time */ - short t_rttvar; /* variance in round-trip time */ - u_short t_rttmin; /* minimum rtt allowed */ - u_int32_t max_sndwnd; /* largest window peer has offered */ - -/* out-of-band data */ - char t_oobflags; /* have some */ - char t_iobc; /* input character */ -#define TCPOOB_HAVEDATA 0x01 -#define TCPOOB_HADDATA 0x02 - short t_softerror; /* possible error not yet reported */ - -/* RFC 1323 variables */ - u_char snd_scale; /* window scaling for send window */ - u_char rcv_scale; /* window scaling for recv window */ - u_char request_r_scale; /* pending window scaling */ - u_char requested_s_scale; - u_int32_t ts_recent; /* timestamp echo data */ - u_int32_t ts_recent_age; /* when last updated */ - tcp_seq last_ack_sent; - -}; - -#define sototcpcb(so) ((so)->so_tcpcb) - -/* - * The smoothed round-trip time and estimated variance - * are stored as fixed point numbers scaled by the values below. - * For convenience, these scales are also used in smoothing the average - * (smoothed = (1/scale)sample + ((scale-1)/scale)smoothed). - * With these scales, srtt has 3 bits to the right of the binary point, - * and thus an "ALPHA" of 0.875. rttvar has 2 bits to the right of the - * binary point, and is smoothed with an ALPHA of 0.75. - */ -#define TCP_RTT_SCALE 8 /* multiplier for srtt; 3 bits frac. */ -#define TCP_RTT_SHIFT 3 /* shift for srtt; 3 bits frac. */ -#define TCP_RTTVAR_SCALE 4 /* multiplier for rttvar; 2 bits */ -#define TCP_RTTVAR_SHIFT 2 /* multiplier for rttvar; 2 bits */ - -/* - * The initial retransmission should happen at rtt + 4 * rttvar. - * Because of the way we do the smoothing, srtt and rttvar - * will each average +1/2 tick of bias. When we compute - * the retransmit timer, we want 1/2 tick of rounding and - * 1 extra tick because of +-1/2 tick uncertainty in the - * firing of the timer. The bias will give us exactly the - * 1.5 tick we need. But, because the bias is - * statistical, we have to test that we don't drop below - * the minimum feasible timer (which is 2 ticks). - * This macro assumes that the value of TCP_RTTVAR_SCALE - * is the same as the multiplier for rttvar. - */ -#define TCP_REXMTVAL(tp) \ - (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) - -/* XXX - * We want to avoid doing m_pullup on incoming packets but that - * means avoiding dtom on the tcp reassembly code. That in turn means - * keeping an mbuf pointer in the reassembly queue (since we might - * have a cluster). As a quick hack, the source & destination - * port numbers (which are no longer needed once we've located the - * tcpcb) are overlayed with an mbuf pointer. - */ -#if SIZEOF_CHAR_P == 4 -typedef struct mbuf *mbufp_32; -#else -typedef u_int32_t mbufp_32; -#endif -#define REASS_MBUF(ti) (*(mbufp_32 *)&((ti)->ti_t)) - -/* - * TCP statistics. - * Many of these should be kept per connection, - * but that's inconvenient at the moment. - */ -struct tcpstat { - u_long tcps_connattempt; /* connections initiated */ - u_long tcps_accepts; /* connections accepted */ - u_long tcps_connects; /* connections established */ - u_long tcps_drops; /* connections dropped */ - u_long tcps_conndrops; /* embryonic connections dropped */ - u_long tcps_closed; /* conn. closed (includes drops) */ - u_long tcps_segstimed; /* segs where we tried to get rtt */ - u_long tcps_rttupdated; /* times we succeeded */ - u_long tcps_delack; /* delayed acks sent */ - u_long tcps_timeoutdrop; /* conn. dropped in rxmt timeout */ - u_long tcps_rexmttimeo; /* retransmit timeouts */ - u_long tcps_persisttimeo; /* persist timeouts */ - u_long tcps_keeptimeo; /* keepalive timeouts */ - u_long tcps_keepprobe; /* keepalive probes sent */ - u_long tcps_keepdrops; /* connections dropped in keepalive */ - - u_long tcps_sndtotal; /* total packets sent */ - u_long tcps_sndpack; /* data packets sent */ - u_long tcps_sndbyte; /* data bytes sent */ - u_long tcps_sndrexmitpack; /* data packets retransmitted */ - u_long tcps_sndrexmitbyte; /* data bytes retransmitted */ - u_long tcps_sndacks; /* ack-only packets sent */ - u_long tcps_sndprobe; /* window probes sent */ - u_long tcps_sndurg; /* packets sent with URG only */ - u_long tcps_sndwinup; /* window update-only packets sent */ - u_long tcps_sndctrl; /* control (SYN|FIN|RST) packets sent */ - - u_long tcps_rcvtotal; /* total packets received */ - u_long tcps_rcvpack; /* packets received in sequence */ - u_long tcps_rcvbyte; /* bytes received in sequence */ - u_long tcps_rcvbadsum; /* packets received with ccksum errs */ - u_long tcps_rcvbadoff; /* packets received with bad offset */ -/* u_long tcps_rcvshort; */ /* packets received too short */ - u_long tcps_rcvduppack; /* duplicate-only packets received */ - u_long tcps_rcvdupbyte; /* duplicate-only bytes received */ - u_long tcps_rcvpartduppack; /* packets with some duplicate data */ - u_long tcps_rcvpartdupbyte; /* dup. bytes in part-dup. packets */ - u_long tcps_rcvoopack; /* out-of-order packets received */ - u_long tcps_rcvoobyte; /* out-of-order bytes received */ - u_long tcps_rcvpackafterwin; /* packets with data after window */ - u_long tcps_rcvbyteafterwin; /* bytes rcvd after window */ - u_long tcps_rcvafterclose; /* packets rcvd after "close" */ - u_long tcps_rcvwinprobe; /* rcvd window probe packets */ - u_long tcps_rcvdupack; /* rcvd duplicate acks */ - u_long tcps_rcvacktoomuch; /* rcvd acks for unsent data */ - u_long tcps_rcvackpack; /* rcvd ack packets */ - u_long tcps_rcvackbyte; /* bytes acked by rcvd acks */ - u_long tcps_rcvwinupd; /* rcvd window update packets */ -/* u_long tcps_pawsdrop; */ /* segments dropped due to PAWS */ - u_long tcps_predack; /* times hdr predict ok for acks */ - u_long tcps_preddat; /* times hdr predict ok for data pkts */ - u_long tcps_socachemiss; /* tcp_last_so misses */ - u_long tcps_didnuttin; /* Times tcp_output didn't do anything XXX */ -}; - -extern struct tcpstat tcpstat; /* tcp statistics */ -extern u_int32_t tcp_now; /* for RFC 1323 timestamps */ - -#endif diff --git a/BasiliskII/src/slirp/tcpip.h b/BasiliskII/src/slirp/tcpip.h deleted file mode 100644 index dff5a3c96..000000000 --- a/BasiliskII/src/slirp/tcpip.h +++ /dev/null @@ -1,70 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcpip.h 8.1 (Berkeley) 6/10/93 - * tcpip.h,v 1.3 1994/08/21 05:27:40 paul Exp - */ - -#ifndef _TCPIP_H_ -#define _TCPIP_H_ - -/* - * Tcp+ip header, after ip options removed. - */ -struct tcpiphdr { - struct ipovly ti_i; /* overlaid ip structure */ - struct tcphdr ti_t; /* tcp header */ -}; -#define ti_next ti_i.ih_next -#define ti_prev ti_i.ih_prev -#define ti_x1 ti_i.ih_x1 -#define ti_pr ti_i.ih_pr -#define ti_len ti_i.ih_len -#define ti_src ti_i.ih_src -#define ti_dst ti_i.ih_dst -#define ti_sport ti_t.th_sport -#define ti_dport ti_t.th_dport -#define ti_seq ti_t.th_seq -#define ti_ack ti_t.th_ack -#define ti_x2 ti_t.th_x2 -#define ti_off ti_t.th_off -#define ti_flags ti_t.th_flags -#define ti_win ti_t.th_win -#define ti_sum ti_t.th_sum -#define ti_urp ti_t.th_urp - -/* - * Just a clean way to get to the first byte - * of the packet - */ -struct tcpiphdr_2 { - struct tcpiphdr dummy; - char first_char; -}; - -#endif diff --git a/BasiliskII/src/slirp/tftp.c b/BasiliskII/src/slirp/tftp.c deleted file mode 100644 index e656c4f06..000000000 --- a/BasiliskII/src/slirp/tftp.c +++ /dev/null @@ -1,334 +0,0 @@ -/* - * tftp.c - a simple, read-only tftp server for qemu - * - * Copyright (c) 2004 Magnus Damm - * - * 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 - * THE AUTHORS OR COPYRIGHT HOLDERS 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. - */ - -#include - -struct tftp_session { - int in_use; - char filename[TFTP_FILENAME_MAX]; - - struct in_addr client_ip; - u_int16_t client_port; - - int timestamp; -}; - -struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; - -const char *tftp_prefix; - -static void tftp_session_update(struct tftp_session *spt) -{ - spt->timestamp = curtime; - spt->in_use = 1; -} - -static void tftp_session_terminate(struct tftp_session *spt) -{ - spt->in_use = 0; -} - -static int tftp_session_allocate(struct tftp_t *tp) -{ - struct tftp_session *spt; - int k; - - for (k = 0; k < TFTP_SESSIONS_MAX; k++) { - spt = &tftp_sessions[k]; - - if (!spt->in_use) - goto found; - - /* sessions time out after 5 inactive seconds */ - if ((int)(curtime - spt->timestamp) > 5000) - goto found; - } - - return -1; - - found: - memset(spt, 0, sizeof(*spt)); - memcpy(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip)); - spt->client_port = tp->udp.uh_sport; - - tftp_session_update(spt); - - return k; -} - -static int tftp_session_find(struct tftp_t *tp) -{ - struct tftp_session *spt; - int k; - - for (k = 0; k < TFTP_SESSIONS_MAX; k++) { - spt = &tftp_sessions[k]; - - if (spt->in_use) { - if (!memcmp(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip))) { - if (spt->client_port == tp->udp.uh_sport) { - return k; - } - } - } - } - - return -1; -} - -static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, - u_int8_t *buf, int len) -{ - int fd; - int bytes_read = 0; - - fd = open(spt->filename, O_RDONLY | O_BINARY); - - if (fd < 0) { - return -1; - } - - if (len) { - lseek(fd, block_nr * 512, SEEK_SET); - - bytes_read = read(fd, buf, len); - } - - close(fd); - - return bytes_read; -} - -static int tftp_send_error(struct tftp_session *spt, - u_int16_t errorcode, const char *msg, - struct tftp_t *recv_tp) -{ - struct sockaddr_in saddr, daddr; - struct mbuf *m; - struct tftp_t *tp; - int nobytes; - - m = m_get(); - - if (!m) { - return -1; - } - - memset(m->m_data, 0, m->m_size); - - m->m_data += if_maxlinkhdr; - tp = (void *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - - tp->tp_op = htons(TFTP_ERROR); - tp->x.tp_error.tp_error_code = htons(errorcode); - strncpy((char *)tp->x.tp_error.tp_msg, msg, sizeof(tp->x.tp_error.tp_msg)); - tp->x.tp_error.tp_msg[sizeof(tp->x.tp_error.tp_msg)-1] = 0; - - saddr.sin_addr = recv_tp->ip.ip_dst; - saddr.sin_port = recv_tp->udp.uh_dport; - - daddr.sin_addr = spt->client_ip; - daddr.sin_port = spt->client_port; - - nobytes = 2; - - m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - - sizeof(struct ip) - sizeof(struct udphdr); - - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); - - tftp_session_terminate(spt); - - return 0; -} - -static int tftp_send_data(struct tftp_session *spt, - u_int16_t block_nr, - struct tftp_t *recv_tp) -{ - struct sockaddr_in saddr, daddr; - struct mbuf *m; - struct tftp_t *tp; - int nobytes; - - if (block_nr < 1) { - return -1; - } - - m = m_get(); - - if (!m) { - return -1; - } - - memset(m->m_data, 0, m->m_size); - - m->m_data += if_maxlinkhdr; - tp = (void *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - - tp->tp_op = htons(TFTP_DATA); - tp->x.tp_data.tp_block_nr = htons(block_nr); - - saddr.sin_addr = recv_tp->ip.ip_dst; - saddr.sin_port = recv_tp->udp.uh_dport; - - daddr.sin_addr = spt->client_ip; - daddr.sin_port = spt->client_port; - - nobytes = tftp_read_data(spt, block_nr - 1, tp->x.tp_data.tp_buf, 512); - - if (nobytes < 0) { - m_free(m); - - /* send "file not found" error back */ - - tftp_send_error(spt, 1, "File not found", tp); - - return -1; - } - - m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - - sizeof(struct ip) - sizeof(struct udphdr); - - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); - - if (nobytes == 512) { - tftp_session_update(spt); - } - else { - tftp_session_terminate(spt); - } - - return 0; -} - -static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) -{ - struct tftp_session *spt; - int s, k, n; - u_int8_t *src, *dst; - - s = tftp_session_allocate(tp); - - if (s < 0) { - return; - } - - spt = &tftp_sessions[s]; - - src = tp->x.tp_buf; - dst = (u_int8_t *)spt->filename; - n = pktlen - ((uint8_t *)&tp->x.tp_buf[0] - (uint8_t *)tp); - - /* get name */ - - for (k = 0; k < n; k++) { - if (k < TFTP_FILENAME_MAX) { - dst[k] = src[k]; - } - else { - return; - } - - if (src[k] == '\0') { - break; - } - } - - if (k >= n) { - return; - } - - k++; - - /* check mode */ - if ((n - k) < 6) { - return; - } - - if (memcmp(&src[k], "octet\0", 6) != 0) { - tftp_send_error(spt, 4, "Unsupported transfer mode", tp); - return; - } - - /* do sanity checks on the filename */ - - if ((spt->filename[0] != '/') - || (spt->filename[strlen(spt->filename) - 1] == '/') - || strstr(spt->filename, "/../")) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - /* only allow exported prefixes */ - - if (!tftp_prefix - || (strncmp(spt->filename, tftp_prefix, strlen(tftp_prefix)) != 0)) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - /* check if the file exists */ - - if (tftp_read_data(spt, 0, (u_int8_t *)spt->filename, 0) < 0) { - tftp_send_error(spt, 1, "File not found", tp); - return; - } - - tftp_send_data(spt, 1, tp); -} - -static void tftp_handle_ack(struct tftp_t *tp, int pktlen) -{ - int s; - - s = tftp_session_find(tp); - - if (s < 0) { - return; - } - - if (tftp_send_data(&tftp_sessions[s], - ntohs(tp->x.tp_data.tp_block_nr) + 1, - tp) < 0) { - return; - } -} - -void tftp_input(struct mbuf *m) -{ - struct tftp_t *tp = (struct tftp_t *)m->m_data; - - switch(ntohs(tp->tp_op)) { - case TFTP_RRQ: - tftp_handle_rrq(tp, m->m_len); - break; - - case TFTP_ACK: - tftp_handle_ack(tp, m->m_len); - break; - } -} diff --git a/BasiliskII/src/slirp/tftp.h b/BasiliskII/src/slirp/tftp.h deleted file mode 100644 index b150a0490..000000000 --- a/BasiliskII/src/slirp/tftp.h +++ /dev/null @@ -1,40 +0,0 @@ -/* tftp defines */ - -#define TFTP_SESSIONS_MAX 3 - -#define TFTP_SERVER 69 - -#define TFTP_RRQ 1 -#define TFTP_WRQ 2 -#define TFTP_DATA 3 -#define TFTP_ACK 4 -#define TFTP_ERROR 5 - -#define TFTP_FILENAME_MAX 512 - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct tftp_t { - struct ip ip; - struct udphdr udp; - u_int16_t tp_op; - union { - struct { - u_int16_t tp_block_nr; - u_int8_t tp_buf[512]; - } tp_data; - struct { - u_int16_t tp_error_code; - u_int8_t tp_msg[512]; - } tp_error; - u_int8_t tp_buf[512 + 2]; - } x; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -void tftp_input(struct mbuf *m); diff --git a/BasiliskII/src/slirp/udp.c b/BasiliskII/src/slirp/udp.c deleted file mode 100644 index deedb1e75..000000000 --- a/BasiliskII/src/slirp/udp.c +++ /dev/null @@ -1,672 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)udp_usrreq.c 8.4 (Berkeley) 1/21/94 - * udp_usrreq.c,v 1.4 1994/10/02 17:48:45 phk Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include -#include "ip_icmp.h" - -struct udpstat udpstat; - -struct socket udb; - -/* - * UDP protocol implementation. - * Per RFC 768, August, 1980. - */ -#ifndef COMPAT_42 -int udpcksum = 1; -#else -int udpcksum = 0; /* XXX */ -#endif - -struct socket *udp_last_so = &udb; - -void -udp_init() -{ - udb.so_next = udb.so_prev = &udb; -} -/* m->m_data points at ip packet header - * m->m_len length ip packet - * ip->ip_len length data (IPDU) - */ -void -udp_input(m, iphlen) - register struct mbuf *m; - int iphlen; -{ - register struct ip *ip; - register struct udphdr *uh; -/* struct mbuf *opts = 0;*/ - int len; - struct ip save_ip; - struct socket *so; - - DEBUG_CALL("udp_input"); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("iphlen = %d", iphlen); - - udpstat.udps_ipackets++; - - /* - * Strip IP options, if any; should skip this, - * make available to user, and use on returned packets, - * but we don't yet have a way to check the checksum - * with options still present. - */ - if(iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); - } - - /* - * Get IP and UDP header together in first mbuf. - */ - ip = mtod(m, struct ip *); - uh = (struct udphdr *)((caddr_t)ip + iphlen); - - /* - * Make mbuf data length reflect UDP length. - * If not enough data to reflect UDP length, drop. - */ - len = ntohs((u_int16_t)uh->uh_ulen); - - if (ip->ip_len != len) { - if (len > ip->ip_len) { - udpstat.udps_badlen++; - goto bad; - } - m_adj(m, len - ip->ip_len); - ip->ip_len = len; - } - - /* - * Save a copy of the IP header in case we want restore it - * for sending an ICMP error message in response. - */ - save_ip = *ip; - save_ip.ip_len+= iphlen; /* tcp_input subtracts this */ - - /* - * Checksum extended UDP header and data. - */ - if (udpcksum && uh->uh_sum) { - ((struct ipovly *)ip)->ih_next = 0; - ((struct ipovly *)ip)->ih_prev = 0; - ((struct ipovly *)ip)->ih_x1 = 0; - ((struct ipovly *)ip)->ih_len = uh->uh_ulen; - /* keep uh_sum for ICMP reply - * uh->uh_sum = cksum(m, len + sizeof (struct ip)); - * if (uh->uh_sum) { - */ - if(cksum(m, len + sizeof(struct ip))) { - udpstat.udps_badsum++; - goto bad; - } - } - - /* - * handle DHCP/BOOTP - */ - if (ntohs(uh->uh_dport) == BOOTP_SERVER) { - bootp_input(m); - goto bad; - } - - /* - * handle TFTP - */ - if (ntohs(uh->uh_dport) == TFTP_SERVER) { - tftp_input(m); - goto bad; - } - - /* - * Locate pcb for datagram. - */ - so = udp_last_so; - if (so->so_lport != uh->uh_sport || - so->so_laddr.s_addr != ip->ip_src.s_addr) { - struct socket *tmp; - - for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next) { - if (tmp->so_lport == uh->uh_sport && - tmp->so_laddr.s_addr == ip->ip_src.s_addr) { - tmp->so_faddr.s_addr = ip->ip_dst.s_addr; - tmp->so_fport = uh->uh_dport; - so = tmp; - break; - } - } - if (tmp == &udb) { - so = NULL; - } else { - udpstat.udpps_pcbcachemiss++; - udp_last_so = so; - } - } - - if (so == NULL) { - /* - * If there's no socket for this packet, - * create one - */ - if ((so = socreate()) == NULL) goto bad; - if(udp_attach(so) == -1) { - DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", - errno,strerror(errno))); - sofree(so); - goto bad; - } - - /* - * Setup fields - */ - /* udp_last_so = so; */ - so->so_laddr = ip->ip_src; - so->so_lport = uh->uh_sport; - - if ((so->so_iptos = udp_tos(so)) == 0) - so->so_iptos = ip->ip_tos; - - /* - * XXXXX Here, check if it's in udpexec_list, - * and if it is, do the fork_exec() etc. - */ - } - - so->so_faddr = ip->ip_dst; /* XXX */ - so->so_fport = uh->uh_dport; /* XXX */ - - iphlen += sizeof(struct udphdr); - m->m_len -= iphlen; - m->m_data += iphlen; - - /* - * Now we sendto() the packet. - */ - if (so->so_emu) - udp_emu(so, m); - - if(sosendto(so,m) == -1) { - m->m_len += iphlen; - m->m_data -= iphlen; - *ip=save_ip; - DEBUG_MISC((dfd,"udp tx errno = %d-%s\n",errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); - } - - m_free(so->so_m); /* used for ICMP if error on sorecvfrom */ - - /* restore the orig mbuf packet */ - m->m_len += iphlen; - m->m_data -= iphlen; - *ip=save_ip; - so->so_m=m; /* ICMP backup */ - - return; -bad: - m_freem(m); - /* if (opts) m_freem(opts); */ - return; -} - -int udp_output2(struct socket *so, struct mbuf *m, - struct sockaddr_in *saddr, struct sockaddr_in *daddr, - int iptos) -{ - register struct udpiphdr *ui; - int error = 0; - - DEBUG_CALL("udp_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("saddr = %lx", (long)saddr->sin_addr.s_addr); - DEBUG_ARG("daddr = %lx", (long)daddr->sin_addr.s_addr); - - /* - * Adjust for header - */ - m->m_data -= sizeof(struct udpiphdr); - m->m_len += sizeof(struct udpiphdr); - - /* - * Fill in mbuf with extended UDP header - * and addresses and length put into network format. - */ - ui = mtod(m, struct udpiphdr *); - ui->ui_next = ui->ui_prev = 0; - ui->ui_x1 = 0; - ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons((u_short) (m->m_len - sizeof(struct ip))); /* + sizeof (struct udphdr)); */ - /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ - ui->ui_src = saddr->sin_addr; - ui->ui_dst = daddr->sin_addr; - ui->ui_sport = saddr->sin_port; - ui->ui_dport = daddr->sin_port; - ui->ui_ulen = ui->ui_len; - - /* - * Stuff checksum and output datagram. - */ - ui->ui_sum = 0; - if (udpcksum) { - if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) - ui->ui_sum = 0xffff; - } - ((struct ip *)ui)->ip_len = (u_int16_t) m->m_len; - - ((struct ip *)ui)->ip_ttl = ip_defttl; - ((struct ip *)ui)->ip_tos = iptos; - - udpstat.udps_opackets++; - - error = ip_output(so, m); - - return (error); -} - -int udp_output(struct socket *so, struct mbuf *m, - struct sockaddr_in *addr) - -{ - struct sockaddr_in saddr, daddr; - - saddr = *addr; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - saddr.sin_addr.s_addr = so->so_faddr.s_addr; - if ((so->so_faddr.s_addr & htonl(0x000000ff)) == htonl(0xff)) - saddr.sin_addr.s_addr = alias_addr.s_addr; - } - daddr.sin_addr = so->so_laddr; - daddr.sin_port = so->so_lport; - - return udp_output2(so, m, &saddr, &daddr, so->so_iptos); -} - -int -udp_attach(so) - struct socket *so; -{ - struct sockaddr_in addr; - - if((so->s = socket(AF_INET,SOCK_DGRAM,0)) != -1) { - /* - * Here, we bind() the socket. Although not really needed - * (sendto() on an unbound socket will bind it), it's done - * here so that emulation of ytalk etc. don't have to do it - */ - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_port = 0; - addr.sin_addr.s_addr = INADDR_ANY; - if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int error = WSAGetLastError(); - closesocket(so->s); - so->s=-1; - WSASetLastError(error); - } else { - /* success, insert in queue */ - so->so_expire = curtime + SO_EXPIRE; - insque(so,&udb); - } - } - return(so->s); -} - -void -udp_detach(so) - struct socket *so; -{ - closesocket(so->s); - /* if (so->so_m) m_free(so->so_m); done by sofree */ - - sofree(so); -} - -struct tos_t udptos[] = { - {0, 53, IPTOS_LOWDELAY, 0}, /* DNS */ - {517, 517, IPTOS_LOWDELAY, EMU_TALK}, /* talk */ - {518, 518, IPTOS_LOWDELAY, EMU_NTALK}, /* ntalk */ - {0, 7648, IPTOS_LOWDELAY, EMU_CUSEEME}, /* Cu-Seeme */ - {0, 0, 0, 0} -}; - -u_int8_t -udp_tos(so) - struct socket *so; -{ - int i = 0; - - while(udptos[i].tos) { - if ((udptos[i].fport && ntohs(so->so_fport) == udptos[i].fport) || - (udptos[i].lport && ntohs(so->so_lport) == udptos[i].lport)) { - so->so_emu = udptos[i].emu; - return udptos[i].tos; - } - i++; - } - - return 0; -} - -#ifdef EMULATE_TALK -#include "talkd.h" -#endif - -/* - * Here, talk/ytalk/ntalk requests must be emulated - */ -void -udp_emu(so, m) - struct socket *so; - struct mbuf *m; -{ - struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); -#ifdef EMULATE_TALK - CTL_MSG_OLD *omsg; - CTL_MSG *nmsg; - char buff[sizeof(CTL_MSG)]; - u_char type; - -struct talk_request { - struct talk_request *next; - struct socket *udp_so; - struct socket *tcp_so; -} *req; - - static struct talk_request *req_tbl = 0; - -#endif - -struct cu_header { - uint16_t d_family; // destination family - uint16_t d_port; // destination port - uint32_t d_addr; // destination address - uint16_t s_family; // source family - uint16_t s_port; // source port - uint32_t so_addr; // source address - uint32_t seqn; // sequence number - uint16_t message; // message - uint16_t data_type; // data type - uint16_t pkt_len; // packet length -} *cu_head; - - switch(so->so_emu) { - -#ifdef EMULATE_TALK - case EMU_TALK: - case EMU_NTALK: - /* - * Talk emulation. We always change the ctl_addr to get - * some answers from the daemon. When an ANNOUNCE comes, - * we send LEAVE_INVITE to the local daemons. Also when a - * DELETE comes, we send copies to the local daemons. - */ - if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) - return; - -#define IS_OLD (so->so_emu == EMU_TALK) - -#define COPY_MSG(dest, src) { dest->type = src->type; \ - dest->id_num = src->id_num; \ - dest->pid = src->pid; \ - dest->addr = src->addr; \ - dest->ctl_addr = src->ctl_addr; \ - memcpy(&dest->l_name, &src->l_name, NAME_SIZE_OLD); \ - memcpy(&dest->r_name, &src->r_name, NAME_SIZE_OLD); \ - memcpy(&dest->r_tty, &src->r_tty, TTY_SIZE); } - -#define OTOSIN(ptr, field) ((struct sockaddr_in *)&ptr->field) -/* old_sockaddr to sockaddr_in */ - - - if (IS_OLD) { /* old talk */ - omsg = mtod(m, CTL_MSG_OLD*); - nmsg = (CTL_MSG *) buff; - type = omsg->type; - OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; - OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; - strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); - } else { /* new talk */ - omsg = (CTL_MSG_OLD *) buff; - nmsg = mtod(m, CTL_MSG *); - type = nmsg->type; - OTOSIN(nmsg, ctl_addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; - strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); - } - - if (type == LOOK_UP) - return; /* for LOOK_UP this is enough */ - - if (IS_OLD) { /* make a copy of the message */ - COPY_MSG(nmsg, omsg); - nmsg->vers = 1; - nmsg->answer = 0; - } else - COPY_MSG(omsg, nmsg); - - /* - * If if is an ANNOUNCE message, we go through the - * request table to see if a tcp port has already - * been redirected for this socket. If not, we solisten() - * a new socket and add this entry to the table. - * The port number of the tcp socket and our IP - * are put to the addr field of the message structures. - * Then a LEAVE_INVITE is sent to both local daemon - * ports, 517 and 518. This is why we have two copies - * of the message, one in old talk and one in new talk - * format. - */ - - if (type == ANNOUNCE) { - int s; - u_short temp_port; - - for(req = req_tbl; req; req = req->next) - if (so == req->udp_so) - break; /* found it */ - - if (!req) { /* no entry for so, create new */ - req = (struct talk_request *) - malloc(sizeof(struct talk_request)); - req->udp_so = so; - req->tcp_so = solisten(0, - OTOSIN(omsg, addr)->sin_addr.s_addr, - OTOSIN(omsg, addr)->sin_port, - SS_FACCEPTONCE); - req->next = req_tbl; - req_tbl = req; - } - - /* replace port number in addr field */ - addrlen = sizeof(addr); - getsockname(req->tcp_so->s, - (struct sockaddr *) &addr, - &addrlen); - OTOSIN(omsg, addr)->sin_port = addr.sin_port; - OTOSIN(omsg, addr)->sin_addr = our_addr; - OTOSIN(nmsg, addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, addr)->sin_addr = our_addr; - - /* send LEAVE_INVITEs */ - temp_port = OTOSIN(omsg, ctl_addr)->sin_port; - OTOSIN(omsg, ctl_addr)->sin_port = 0; - OTOSIN(nmsg, ctl_addr)->sin_port = 0; - omsg->type = nmsg->type = LEAVE_INVITE; - - s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); - addr.sin_addr = our_addr; - addr.sin_family = AF_INET; - addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - addr.sin_port = htons(518); - sendto(s, (char *)nmsg, sizeof(*nmsg), 0, - (struct sockaddr *) &addr, sizeof(addr)); - closesocket(s) ; - - omsg->type = nmsg->type = ANNOUNCE; - OTOSIN(omsg, ctl_addr)->sin_port = temp_port; - OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; - } - - /* - * If it is a DELETE message, we send a copy to the - * local daemons. Then we delete the entry corresponding - * to our socket from the request table. - */ - - if (type == DELETE) { - struct talk_request *temp_req, *req_next; - int s; - u_short temp_port; - - temp_port = OTOSIN(omsg, ctl_addr)->sin_port; - OTOSIN(omsg, ctl_addr)->sin_port = 0; - OTOSIN(nmsg, ctl_addr)->sin_port = 0; - - s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); - addr.sin_addr = our_addr; - addr.sin_family = AF_INET; - addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - addr.sin_port = htons(518); - sendto(s, (char *)nmsg, sizeof(*nmsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - closesocket(s); - - OTOSIN(omsg, ctl_addr)->sin_port = temp_port; - OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; - - /* delete table entry */ - if (so == req_tbl->udp_so) { - temp_req = req_tbl; - req_tbl = req_tbl->next; - free(temp_req); - } else { - temp_req = req_tbl; - for(req = req_tbl->next; req; req = req_next) { - req_next = req->next; - if (so == req->udp_so) { - temp_req->next = req_next; - free(req); - break; - } else { - temp_req = req; - } - } - } - } - - return; -#endif - - case EMU_CUSEEME: - - /* - * Cu-SeeMe emulation. - * Hopefully the packet is more that 16 bytes long. We don't - * do any other tests, just replace the address and port - * fields. - */ - if (m->m_len >= sizeof (*cu_head)) { - if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) - return; - cu_head = mtod(m, struct cu_header *); - cu_head->s_port = addr.sin_port; - cu_head->so_addr = our_addr.s_addr; - } - - return; - } -} - -struct socket * -udp_listen(port, laddr, lport, flags) - u_int port; - u_int32_t laddr; - u_int lport; - int flags; -{ - struct sockaddr_in addr; - struct socket *so; - socklen_t addrlen = sizeof(struct sockaddr_in); - int opt = 1; - - if ((so = socreate()) == NULL) { - free(so); - return NULL; - } - so->s = socket(AF_INET,SOCK_DGRAM,0); - so->so_expire = curtime + SO_EXPIRE; - insque(so,&udb); - - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_addr.s_addr = INADDR_ANY; - addr.sin_port = port; - - if (bind(so->s,(struct sockaddr *)&addr, addrlen) < 0) { - udp_detach(so); - return NULL; - } - setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); -/* setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); */ - - getsockname(so->s,(struct sockaddr *)&addr,&addrlen); - so->so_fport = addr.sin_port; - if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - else - so->so_faddr = addr.sin_addr; - - so->so_lport = lport; - so->so_laddr.s_addr = laddr; - if (flags != SS_FACCEPTONCE) - so->so_expire = 0; - - so->so_state = SS_ISFCONNECTED; - - return so; -} diff --git a/BasiliskII/src/slirp/udp.h b/BasiliskII/src/slirp/udp.h deleted file mode 100644 index 7d844efe2..000000000 --- a/BasiliskII/src/slirp/udp.h +++ /dev/null @@ -1,114 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)udp.h 8.1 (Berkeley) 6/10/93 - * udp.h,v 1.3 1994/08/21 05:27:41 paul Exp - */ - -#ifndef _UDP_H_ -#define _UDP_H_ - -#define UDP_TTL 0x60 -#define UDP_UDPDATALEN 16192 - -extern struct socket *udp_last_so; - -/* - * Udp protocol header. - * Per RFC 768, September, 1981. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct udphdr { - u_int16_t uh_sport; /* source port */ - u_int16_t uh_dport; /* destination port */ - int16_t uh_ulen; /* udp length */ - u_int16_t uh_sum; /* udp checksum */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(PACK_RESET) -#endif - -/* - * UDP kernel structures and variables. - */ -struct udpiphdr { - struct ipovly ui_i; /* overlaid ip structure */ - struct udphdr ui_u; /* udp header */ -}; -#define ui_next ui_i.ih_next -#define ui_prev ui_i.ih_prev -#define ui_x1 ui_i.ih_x1 -#define ui_pr ui_i.ih_pr -#define ui_len ui_i.ih_len -#define ui_src ui_i.ih_src -#define ui_dst ui_i.ih_dst -#define ui_sport ui_u.uh_sport -#define ui_dport ui_u.uh_dport -#define ui_ulen ui_u.uh_ulen -#define ui_sum ui_u.uh_sum - -struct udpstat { - /* input statistics: */ - u_long udps_ipackets; /* total input packets */ - u_long udps_hdrops; /* packet shorter than header */ - u_long udps_badsum; /* checksum error */ - u_long udps_badlen; /* data length larger than packet */ - u_long udps_noport; /* no socket on port */ - u_long udps_noportbcast; /* of above, arrived as broadcast */ - u_long udps_fullsock; /* not delivered, input socket full */ - u_long udpps_pcbcachemiss; /* input packets missing pcb cache */ - /* output statistics: */ - u_long udps_opackets; /* total output packets */ -}; - -/* - * Names for UDP sysctl objects - */ -#define UDPCTL_CHECKSUM 1 /* checksum UDP packets */ -#define UDPCTL_MAXID 2 - -extern struct udpstat udpstat; -extern struct socket udb; -struct mbuf; - -void udp_init(void); -void udp_input(register struct mbuf *, int); -int udp_output(struct socket *, struct mbuf *, struct sockaddr_in *); -int udp_attach(struct socket *); -void udp_detach(struct socket *); -u_int8_t udp_tos(struct socket *); -void udp_emu(struct socket *, struct mbuf *); -struct socket * udp_listen(u_int, u_int32_t, u_int, int); -int udp_output2(struct socket *so, struct mbuf *m, - struct sockaddr_in *saddr, struct sockaddr_in *daddr, - int iptos); -#endif diff --git a/BasiliskII/src/sony.cpp b/BasiliskII/src/sony.cpp index 804239b78..a8d8220d8 100644 --- a/BasiliskII/src/sony.cpp +++ b/BasiliskII/src/sony.cpp @@ -50,11 +50,7 @@ using std::vector; // Check for inserted disks by polling? -#ifdef AMIGA -#define DISK_INSERT_CHECK 1 -#else #define DISK_INSERT_CHECK 0 -#endif // Floppy disk icon diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index b29c77026..8dd7d173e 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -30,7 +30,6 @@ #include "memory.h" #include "readcpu.h" #include "newcpu.h" -#include "compiler/compemu.h" // RAM and ROM pointers @@ -41,21 +40,15 @@ uint32 ROMBaseMac; // ROM base (Mac address space) uint8 *ROMBaseHost; // ROM base (host address space) uint32 ROMSize; // Size of ROM -#if !REAL_ADDRESSING // Mac frame buffer uint8 *MacFrameBaseHost; // Frame buffer base (host address space) uint32 MacFrameSize; // Size of frame buffer int MacFrameLayout; // Frame buffer layout -#endif #if DIRECT_ADDRESSING uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent #endif -#if USE_JIT -bool UseJIT = false; -#endif - // From newcpu.cpp extern bool quit_program; @@ -66,42 +59,15 @@ extern bool quit_program; bool Init680x0(void) { -#if REAL_ADDRESSING - // Mac address space = host address space - RAMBaseMac = (uintptr)RAMBaseHost; - ROMBaseMac = (uintptr)ROMBaseHost; -#elif DIRECT_ADDRESSING +#if DIRECT_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() RAMBaseMac = 0; ROMBaseMac = Host2MacAddr(ROMBaseHost); -#else - // Initialize UAE memory banks - RAMBaseMac = 0; - switch (ROMVersion) { - case ROM_VERSION_64K: - case ROM_VERSION_PLUS: - case ROM_VERSION_CLASSIC: - ROMBaseMac = 0x00400000; - break; - case ROM_VERSION_II: - ROMBaseMac = 0x00a00000; - break; - case ROM_VERSION_32: - ROMBaseMac = 0x40800000; - break; - default: - return false; - } - memory_init(); #endif init_m68k(); -#if USE_JIT - UseJIT = compiler_use_jit(); - if (UseJIT) - compiler_init(); -#endif + return true; } @@ -112,10 +78,7 @@ bool Init680x0(void) void Exit680x0(void) { -#if USE_JIT - if (UseJIT) - compiler_exit(); -#endif + exit_m68k(); } @@ -126,9 +89,7 @@ void Exit680x0(void) void InitFrameBufferMapping(void) { -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - memory_init(); -#endif + } /* @@ -138,11 +99,7 @@ void InitFrameBufferMapping(void) void Start680x0(void) { m68k_reset(); -#if USE_JIT - if (UseJIT) - m68k_compile_execute(); - else -#endif + m68k_execute(); } diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c index 8ec3ab552..af5cac920 100644 --- a/BasiliskII/src/uae_cpu/build68k.c +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -72,15 +72,7 @@ int main(int argc, char **argv) printf ("#include \"sysdeps.h\"\n"); printf ("#include \"readcpu.h\"\n"); printf ("struct instr_def defs68k[] = {\n"); -#ifdef WIN32 - tablef = fopen(argc > 1 ? argv[1] : "table68k","r"); - if (tablef == NULL) { - fprintf(stderr, "table68k not found\n"); - exit(1); - } -#else tablef = stdin; -#endif getnextch(); while (nextch != EOF) { int cpulevel, plevel, sduse; diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp deleted file mode 100644 index f03c4f3cf..000000000 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp +++ /dev/null @@ -1,4758 +0,0 @@ -/* - * compiler/codegen_x86.cpp - IA-32 code generator - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c - * - * 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 - */ - -/* This should eventually end up in machdep/, but for now, x86 is the - only target, and it's easier this way... */ - -#include "flags_x86.h" - -/************************************************************************* - * Some basic information about the the target CPU * - *************************************************************************/ - -#define EAX_INDEX 0 -#define ECX_INDEX 1 -#define EDX_INDEX 2 -#define EBX_INDEX 3 -#define ESP_INDEX 4 -#define EBP_INDEX 5 -#define ESI_INDEX 6 -#define EDI_INDEX 7 -#if defined(__x86_64__) -#define R8_INDEX 8 -#define R9_INDEX 9 -#define R10_INDEX 10 -#define R11_INDEX 11 -#define R12_INDEX 12 -#define R13_INDEX 13 -#define R14_INDEX 14 -#define R15_INDEX 15 -#endif -/* XXX this has to match X86_Reg8H_Base + 4 */ -#define AH_INDEX (0x10+4+EAX_INDEX) -#define CH_INDEX (0x10+4+ECX_INDEX) -#define DH_INDEX (0x10+4+EDX_INDEX) -#define BH_INDEX (0x10+4+EBX_INDEX) - -/* The register in which subroutines return an integer return value */ -#define REG_RESULT EAX_INDEX - -/* The registers subroutines take their first and second argument in */ -#if defined( _MSC_VER ) && !USE_NORMAL_CALLING_CONVENTION -/* Handle the _fastcall parameters of ECX and EDX */ -#define REG_PAR1 ECX_INDEX -#define REG_PAR2 EDX_INDEX -#elif defined(__x86_64__) -#define REG_PAR1 EDI_INDEX -#define REG_PAR2 ESI_INDEX -#else -#define REG_PAR1 EAX_INDEX -#define REG_PAR2 EDX_INDEX -#endif - -#define REG_PC_PRE EAX_INDEX /* The register we use for preloading regs.pc_p */ -#if defined( _MSC_VER ) && !USE_NORMAL_CALLING_CONVENTION -#define REG_PC_TMP EAX_INDEX -#else -#define REG_PC_TMP ECX_INDEX /* Another register that is not the above */ -#endif - -#define SHIFTCOUNT_NREG ECX_INDEX /* Register that can be used for shiftcount. - -1 if any reg will do */ -#define MUL_NREG1 EAX_INDEX /* %eax will hold the low 32 bits after a 32x32 mul */ -#define MUL_NREG2 EDX_INDEX /* %edx will hold the high 32 bits */ - -#define STACK_ALIGN 16 -#define STACK_OFFSET sizeof(void *) - -uae_s8 always_used[]={4,-1}; -#if defined(__x86_64__) -uae_s8 can_byte[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; -uae_s8 can_word[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; -#else -uae_s8 can_byte[]={0,1,2,3,-1}; -uae_s8 can_word[]={0,1,2,3,5,6,7,-1}; -#endif - -#if USE_OPTIMIZED_CALLS -/* Make sure interpretive core does not use cpuopti */ -uae_u8 call_saved[]={0,0,0,1,1,1,1,1}; -#error FIXME: code not ready -#else -/* cpuopti mutate instruction handlers to assume registers are saved - by the caller */ -uae_u8 call_saved[]={0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0}; -#endif - -/* This *should* be the same as call_saved. But: - - We might not really know which registers are saved, and which aren't, - so we need to preserve some, but don't want to rely on everyone else - also saving those registers - - Special registers (such like the stack pointer) should not be "preserved" - by pushing, even though they are "saved" across function calls -*/ -#if defined(__x86_64__) -/* callee-saved registers as defined by Linux AMD64 ABI: rbx, rbp, rsp, r12 - r15 */ -/* preserve r11 because it's generally used to hold pointers to functions */ -static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,0,0,0,0,0,1,1,1,1,1}; -#else -/* callee-saved registers as defined by System V IA-32 ABI: edi, esi, ebx, ebp */ -static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,1,1}; -#endif - -/* Whether classes of instructions do or don't clobber the native flags */ -#define CLOBBER_MOV -#define CLOBBER_LEA -#define CLOBBER_CMOV -#define CLOBBER_POP -#define CLOBBER_PUSH -#define CLOBBER_SUB clobber_flags() -#define CLOBBER_SBB clobber_flags() -#define CLOBBER_CMP clobber_flags() -#define CLOBBER_ADD clobber_flags() -#define CLOBBER_ADC clobber_flags() -#define CLOBBER_AND clobber_flags() -#define CLOBBER_OR clobber_flags() -#define CLOBBER_XOR clobber_flags() - -#define CLOBBER_ROL clobber_flags() -#define CLOBBER_ROR clobber_flags() -#define CLOBBER_SHLL clobber_flags() -#define CLOBBER_SHRL clobber_flags() -#define CLOBBER_SHRA clobber_flags() -#define CLOBBER_TEST clobber_flags() -#define CLOBBER_CL16 -#define CLOBBER_CL8 -#define CLOBBER_SE32 -#define CLOBBER_SE16 -#define CLOBBER_SE8 -#define CLOBBER_ZE32 -#define CLOBBER_ZE16 -#define CLOBBER_ZE8 -#define CLOBBER_SW16 clobber_flags() -#define CLOBBER_SW32 -#define CLOBBER_SETCC -#define CLOBBER_MUL clobber_flags() -#define CLOBBER_BT clobber_flags() -#define CLOBBER_BSF clobber_flags() - -/* The older code generator is now deprecated. */ -#define USE_NEW_RTASM 1 - -#if USE_NEW_RTASM - -#if defined(__x86_64__) -#define X86_TARGET_64BIT 1 -/* The address override prefix causes a 5 cycles penalty on Intel Core - processors. Another solution would be to decompose the load in an LEA, - MOV (to zero-extend), MOV (from memory): is it better? */ -#define ADDR32 x86_emit_byte(0x67), -#else -#define ADDR32 /**/ -#endif -#define X86_FLAT_REGISTERS 0 -#define X86_OPTIMIZE_ALU 1 -#define X86_OPTIMIZE_ROTSHI 1 -#include "codegen_x86.h" - -#define x86_emit_byte(B) emit_byte(B) -#define x86_emit_word(W) emit_word(W) -#define x86_emit_long(L) emit_long(L) -#define x86_emit_quad(Q) emit_quad(Q) -#define x86_get_target() get_target() -#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) - -static void jit_fail(const char *msg, const char *file, int line, const char *function) -{ - fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", - function, file, line, msg); - abort(); -} - -LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) -{ -#if defined(__x86_64__) - PUSHQr(r); -#else - PUSHLr(r); -#endif -} -LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) -{ -#if defined(__x86_64__) - POPQr(r); -#else - POPLr(r); -#endif -} -LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) -{ -#if defined(__x86_64__) - POPQm(d, X86_NOREG, X86_NOREG, 1); -#else - POPLm(d, X86_NOREG, X86_NOREG, 1); -#endif -} -LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) -{ - BTLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) -{ - BTLrr(b, r); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) -{ - BTCLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) -{ - BTCLrr(b, r); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) -{ - BTRLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) -{ - BTRLrr(b, r); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) -{ - BTSLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) -{ - BTSLrr(b, r); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) -{ - SUBWir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) - -LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) -{ - MOVLmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) -{ - MOVLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) -{ - MOVWim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) -{ - MOVBim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) -{ - ROLBim(i, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) -{ - ROLBir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) -{ - ROLWir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) -{ - ROLLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) -{ - ROLLrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) -{ - ROLWrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) -{ - ROLBrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) -{ - SHLLrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) -{ - SHLWrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) -{ - SHLBrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) -{ - RORBir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) -{ - RORWir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) -{ - ORLmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) -{ - RORLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) -{ - RORLrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) -{ - RORWrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) -{ - RORBrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) -{ - SHRLrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) -{ - SHRWrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) -{ - SHRBrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) -{ - SARLrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) -{ - SARWrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) -{ - SARBrr(r, d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) -{ - SHLLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) -{ - SHLWir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) -{ - SHLBir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) -{ - SHRLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) -{ - SHRWir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) -{ - SHRBir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) -{ - SARLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) -{ - SARWir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) -{ - SARBir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) -{ - SAHF(); -} -LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) - -LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) -{ - CPUID(); -} -LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) - -LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) -{ - LAHF(); -} -LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) - -LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) -{ - SETCCir(cc, d); -} -LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) - -LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) -{ - SETCCim(cc, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) -{ - /* replacement using branch and mov */ - int8 *target_p = (int8 *)x86_get_target() + 1; - JCCSii(cc^1, 0); - MOVBrr(s, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); -} -LENDFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) -{ - if (have_cmov) - CMOVWrr(cc, s, d); - else { /* replacement using branch and mov */ - int8 *target_p = (int8 *)x86_get_target() + 1; - JCCSii(cc^1, 0); - MOVWrr(s, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) -{ - if (have_cmov) - CMOVLrr(cc, s, d); - else { /* replacement using branch and mov */ - int8 *target_p = (int8 *)x86_get_target() + 1; - JCCSii(cc^1, 0); - MOVLrr(s, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) - -LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) -{ - BSFLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) -{ - MOVSLQrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) -{ - MOVSWLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) -{ - MOVSBLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) -{ - MOVZWLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) -{ - MOVZBLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) -{ - IMULLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) { - write_log("Bad register in IMUL: d=%d, s=%d\n",d,s); - abort(); - } - IMULLr(s); -} -LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) { - write_log("Bad register in MUL: d=%d, s=%d\n",d,s); - abort(); - } - MULLr(s); -} -LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) -{ - abort(); /* %^$&%^$%#^ x86! */ -} -LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) -{ - MOVBrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) -{ - MOVWrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVLmr(0, baser, index, factor, d); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVWmr(0, baser, index, factor, d); -} -LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVBmr(0, baser, index, factor, d); -} -LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) -{ - ADDR32 MOVLrm(s, 0, baser, index, factor); -} -LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) -{ - ADDR32 MOVWrm(s, 0, baser, index, factor); -} -LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) -{ - ADDR32 MOVBrm(s, 0, baser, index, factor); -} -LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) -{ - ADDR32 MOVLrm(s, base, baser, index, factor); -} -LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) -{ - ADDR32 MOVWrm(s, base, baser, index, factor); -} -LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) -{ - ADDR32 MOVBrm(s, base, baser, index, factor); -} -LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVLmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVWmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVBmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) -{ - ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) -{ - if (have_cmov) - ADDR32 CMOVLmr(cond, base, X86_NOREG, index, factor, d); - else { /* replacement using branch and mov */ - int8 *target_p = (int8 *)x86_get_target() + 1; - JCCSii(cond^1, 0); - ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) -{ - if (have_cmov) - CMOVLmr(cond, mem, X86_NOREG, X86_NOREG, 1, d); - else { /* replacement using branch and mov */ - int8 *target_p = (int8 *)x86_get_target() + 1; - JCCSii(cond^1, 0); - MOVLmr(mem, X86_NOREG, X86_NOREG, 1, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) -{ - ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) -{ - ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) -{ - ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) -{ - ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVLim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVWim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVBim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) -{ - ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) -{ - ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) -{ - LEALmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) -{ - LEALmr(offset, s, index, factor, d); -} -LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) - -LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) -{ - LEALmr(0, s, index, factor, d); -} -LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) - -LOWFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) -{ - LEALmr(0, X86_NOREG, index, factor, d); -} -LENDFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) -{ - ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) -{ - ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) -{ - BSWAPLr(r); -} -LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) - -LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) -{ - ROLWir(8, r); -} -LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) -{ - MOVLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) -{ - MOVLrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) -{ - MOVWrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) - -LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) -{ - MOVWmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) -{ - MOVBrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) - -LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) -{ - MOVBmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) -{ - MOVLir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) -{ - MOVWir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) -{ - MOVBir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) - -LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) -{ - ADCLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) -{ - ADDLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) -{ - ADDWim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) -{ - ADDBim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) -{ - TESTLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) -{ - TESTLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) -{ - TESTWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) -{ - TESTBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) -{ - XORLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) -{ - ANDLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) -{ - ANDWir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) -{ - ANDLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) -{ - ANDWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) -{ - ANDBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) -{ - ORLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) -{ - ORLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) -{ - ORWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) -{ - ORBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) -{ - ADCLrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) -{ - ADCWrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) -{ - ADCBrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) -{ - ADDLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) -{ - ADDWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) -{ - ADDBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) -{ - SUBLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) -{ - SUBBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) -{ - ADDLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) -{ - ADDWir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) -{ - ADDBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) - -LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) -{ - SBBLrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) -{ - SBBWrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) -{ - SBBBrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) -{ - SUBLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) -{ - SUBWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) -{ - SUBBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) -{ - CMPLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) -{ - CMPLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) -{ - CMPWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) -{ - CMPBim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) -{ - CMPBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) -{ - CMPBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) - -LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) -{ - ADDR32 CMPLmr(offset, X86_NOREG, index, factor, d); -} -LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) -{ - XORLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) -{ - XORWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) -{ - XORBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) -{ - SUBLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) -{ - CMPLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) -{ - XCHGLrr(r2, r1); -} -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) - -LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) -{ - XCHGBrr(r2, r1); -} -LENDFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) - -LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) -{ - PUSHF(); -} -LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) - -LOWFUNC(WRITE,READ,0,raw_popfl,(void)) -{ - POPF(); -} -LENDFUNC(WRITE,READ,0,raw_popfl,(void)) - -/* Generate floating-point instructions */ -static inline void x86_fadd_m(MEMR s) -{ - FADDDm(s,X86_NOREG,X86_NOREG,1); -} - -#else - -const bool optimize_accum = true; -const bool optimize_imm8 = true; -const bool optimize_shift_once = true; - -/************************************************************************* - * Actual encoding of the instructions on the target CPU * - *************************************************************************/ - -static __inline__ int isaccum(int r) -{ - return (r == EAX_INDEX); -} - -static __inline__ int isbyte(uae_s32 x) -{ - return (x>=-128 && x<=127); -} - -static __inline__ int isword(uae_s32 x) -{ - return (x>=-32768 && x<=32767); -} - -LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) -{ - emit_byte(0x50+r); -} -LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) -{ - emit_byte(0x58+r); -} -LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) -{ - emit_byte(0x8f); - emit_byte(0x05); - emit_long(d); -} -LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xe0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xa3); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xf8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xbb); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) - - -LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xf0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xb3); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xe8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xab); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) -{ - emit_byte(0x66); - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x2d); - else { - emit_byte(0x81); - emit_byte(0xe8+d); - } - emit_word(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) - - -LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) -{ - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) -{ - emit_byte(0xc7); - emit_byte(0x05); - emit_long(d); - emit_long(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) -{ - emit_byte(0x66); - emit_byte(0xc7); - emit_byte(0x05); - emit_long(d); - emit_word(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) -{ - emit_byte(0xc6); - emit_byte(0x05); - emit_long(d); - emit_byte(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0x05); - emit_long(d); - } - else { - emit_byte(0xc0); - emit_byte(0x05); - emit_long(d); - emit_byte(i); - } -} -LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xc0+r); - } - else { - emit_byte(0xc0); - emit_byte(0xc0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xc0+r); - } - else { - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xc8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xc8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) - -// gb-- used for making an fpcr value in compemu_fpp.cpp -LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) -{ - emit_byte(0x0b); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xc8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xc8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xe0+r); - } - else { - emit_byte(0xc1); - emit_byte(0xe0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xe0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xe0+r); - } - else { - emit_byte(0xc0); - emit_byte(0xe0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xe8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xe8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xe8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xe8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xe8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xf8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xf8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xf8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xf8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xf8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) -{ - emit_byte(0x9e); -} -LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) - -LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) -{ - emit_byte(0x0f); - emit_byte(0xa2); -} -LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) - -LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) -{ - emit_byte(0x9f); -} -LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) - -LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) -{ - emit_byte(0x0f); - emit_byte(0x90+cc); - emit_byte(0xc0+d); -} -LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) - -LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) -{ - emit_byte(0x0f); - emit_byte(0x90+cc); - emit_byte(0x05); - emit_long(d); -} -LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) -{ - /* replacement using branch and mov */ - int uncc=(cc^1); - emit_byte(0x70+uncc); - emit_byte(3); /* skip next 2 bytes if not cc=true */ - emit_byte(0x88); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) -{ - if (have_cmov) { - emit_byte(0x66); - emit_byte(0x0f); - emit_byte(0x40+cc); - emit_byte(0xc0+8*d+s); - } - else { /* replacement using branch and mov */ - int uncc=(cc^1); - emit_byte(0x70+uncc); - emit_byte(3); /* skip next 3 bytes if not cc=true */ - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0xc0+8*s+d); - } -} -LENDFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) -{ - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cc); - emit_byte(0xc0+8*d+s); - } - else { /* replacement using branch and mov */ - int uncc=(cc^1); - emit_byte(0x70+uncc); - emit_byte(2); /* skip next 2 bytes if not cc=true */ - emit_byte(0x89); - emit_byte(0xc0+8*s+d); - } -} -LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) - -LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) -{ - emit_byte(0x0f); - emit_byte(0xbc); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) -{ - emit_byte(0x0f); - emit_byte(0xbf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) -{ - emit_byte(0x0f); - emit_byte(0xbe); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) -{ - emit_byte(0x0f); - emit_byte(0xb7); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) -{ - emit_byte(0x0f); - emit_byte(0xb6); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) -{ - emit_byte(0x0f); - emit_byte(0xaf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) - abort(); - emit_byte(0xf7); - emit_byte(0xea); -} -LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) { - printf("Bad register in MUL: d=%d, s=%d\n",d,s); - abort(); - } - emit_byte(0xf7); - emit_byte(0xe2); -} -LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) -{ - abort(); /* %^$&%^$%#^ x86! */ - emit_byte(0x0f); - emit_byte(0xaf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) -{ - emit_byte(0x88); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) -{ - int isebp=(baser==5)?0x40:0; - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - - emit_byte(0x8b); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x8a); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - - isebp=(baser==5)?0x40:0; - - emit_byte(0x89); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x88); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x89); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x88); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x8b); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x8a); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) -{ - int fi; - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: - fprintf(stderr,"Bad factor %d in mov_l_rm_indexed!\n",factor); - abort(); - } - emit_byte(0x8b); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) -{ - int fi; - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: - fprintf(stderr,"Bad factor %d in mov_l_rm_indexed!\n",factor); - abort(); - } - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cond); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); - } - else { /* replacement using branch and mov */ - int uncc=(cond^1); - emit_byte(0x70+uncc); - emit_byte(7); /* skip next 7 bytes if not cc=true */ - emit_byte(0x8b); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); - } -} -LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) -{ - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cond); - emit_byte(0x05+8*d); - emit_long(mem); - } - else { /* replacement using branch and mov */ - int uncc=(cond^1); - emit_byte(0x70+uncc); - emit_byte(6); /* skip next 6 bytes if not cc=true */ - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(mem); - } -} -LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x8b); - emit_byte(0x40+8*d+s); - emit_byte(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x40+8*d+s); - emit_byte(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x8a); - emit_byte(0x40+8*d+s); - emit_byte(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) -{ - emit_byte(0x8b); - emit_byte(0x80+8*d+s); - emit_long(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) -{ - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x80+8*d+s); - emit_long(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) -{ - emit_byte(0x8a); - emit_byte(0x80+8*d+s); - emit_long(offset); -} -LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0xc7); - emit_byte(0x40+d); - emit_byte(offset); - emit_long(i); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0xc7); - emit_byte(0x40+d); - emit_byte(offset); - emit_word(i); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0xc6); - emit_byte(0x40+d); - emit_byte(offset); - emit_byte(i); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - emit_byte(0x88); - emit_byte(0x40+8*s+d); - emit_byte(offset); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) -{ - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x8d); - emit_byte(0x40+8*d+s); - emit_byte(offset); - } - else { - emit_byte(0x8d); - emit_byte(0x80+8*d+s); - emit_long(offset); - } -} -LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x8d); - emit_byte(0x44+8*d); - emit_byte(0x40*fi+8*index+s); - emit_byte(offset); - } - else { - emit_byte(0x8d); - emit_byte(0x84+8*d); - emit_byte(0x40*fi+8*index+s); - emit_long(offset); - } -} -LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) - -LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) -{ - int isebp=(s==5)?0x40:0; - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x8d); - emit_byte(0x04+8*d+isebp); - emit_byte(0x40*fi+8*index+s); - if (isebp) - emit_byte(0); -} -LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) -{ - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); - } - else { - emit_byte(0x89); - emit_byte(0x80+8*s+d); - emit_long(offset); - } -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) -{ - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x80+8*s+d); - emit_long(offset); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) -{ - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x88); - emit_byte(0x40+8*s+d); - emit_byte(offset); - } - else { - emit_byte(0x88); - emit_byte(0x80+8*s+d); - emit_long(offset); - } -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) -{ - emit_byte(0x0f); - emit_byte(0xc8+r); -} -LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) - -LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(0x08); -} -LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) -{ - emit_byte(0x89); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) -{ - emit_byte(0x89); - emit_byte(0x05+8*s); - emit_long(d); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x05+8*s); - emit_long(d); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) - -LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) -{ - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) -{ - emit_byte(0x88); - emit_byte(0x05+8*(s&0xf)); /* XXX this handles %ah case (defined as 0x10+4) and others */ - emit_long(d); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) - -LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) -{ - emit_byte(0x8a); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) -{ - emit_byte(0xb8+d); - emit_long(s); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) -{ - emit_byte(0x66); - emit_byte(0xb8+d); - emit_word(s); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) -{ - emit_byte(0xb0+d); - emit_byte(s); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) - -LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) -{ - emit_byte(0x81); - emit_byte(0x15); - emit_long(d); - emit_long(s); -} -LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) -{ - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x05); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x05); - emit_long(d); - emit_long(s); - } -} -LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) -{ - emit_byte(0x66); - emit_byte(0x81); - emit_byte(0x05); - emit_long(d); - emit_word(s); -} -LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) -{ - emit_byte(0x80); - emit_byte(0x05); - emit_long(d); - emit_byte(s); -} -LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) -{ - if (optimize_accum && isaccum(d)) - emit_byte(0xa9); - else { - emit_byte(0xf7); - emit_byte(0xc0+d); - } - emit_long(i); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) -{ - emit_byte(0x85); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x85); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) -{ - emit_byte(0x84); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) -{ - emit_byte(0x81); - emit_byte(0xf0+d); - emit_long(i); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) -{ - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x25); - else { - emit_byte(0x81); - emit_byte(0xe0+d); - } - emit_long(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) -{ - emit_byte(0x66); - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x25); - else { - emit_byte(0x81); - emit_byte(0xe0+d); - } - emit_word(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) -{ - emit_byte(0x21); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x21); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) -{ - emit_byte(0x20); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) -{ - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x0d); - else { - emit_byte(0x81); - emit_byte(0xc8+d); - } - emit_long(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) -{ - emit_byte(0x09); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x09); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) -{ - emit_byte(0x08); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) -{ - emit_byte(0x11); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x11); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) -{ - emit_byte(0x10); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) -{ - emit_byte(0x01); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x01); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) -{ - emit_byte(0x00); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) -{ - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x2d); - else { - emit_byte(0x81); - emit_byte(0xe8+d); - } - emit_long(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) -{ - if (optimize_accum && isaccum(d)) - emit_byte(0x2c); - else { - emit_byte(0x80); - emit_byte(0xe8+d); - } - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) -{ - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x05); - else { - emit_byte(0x81); - emit_byte(0xc0+d); - } - emit_long(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) -{ - emit_byte(0x66); - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x05); - else { - emit_byte(0x81); - emit_byte(0xc0+d); - } - emit_word(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) -{ - if (optimize_accum && isaccum(d)) - emit_byte(0x04); - else { - emit_byte(0x80); - emit_byte(0xc0+d); - } - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) - -LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) -{ - emit_byte(0x19); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x19); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) -{ - emit_byte(0x18); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) -{ - emit_byte(0x29); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x29); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) -{ - emit_byte(0x28); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) -{ - emit_byte(0x39); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) -{ - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xf8+r); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(r)) - emit_byte(0x3d); - else { - emit_byte(0x81); - emit_byte(0xf8+r); - } - emit_long(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x39); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) -{ - emit_byte(0x80); - emit_byte(0x3d); - emit_long(d); - emit_byte(s); -} -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) -{ - if (optimize_accum && isaccum(d)) - emit_byte(0x3c); - else { - emit_byte(0x80); - emit_byte(0xf8+d); - } - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) -{ - emit_byte(0x38); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) - -LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - emit_byte(0x39); - emit_byte(0x04+8*d); - emit_byte(5+8*index+0x40*fi); - emit_long(offset); -} -LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) -{ - emit_byte(0x31); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x31); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) -{ - emit_byte(0x30); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) -{ - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x2d); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x2d); - emit_long(d); - emit_long(s); - } -} -LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) -{ - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x3d); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x3d); - emit_long(d); - emit_long(s); - } -} -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) -{ - emit_byte(0x87); - emit_byte(0xc0+8*r1+r2); -} -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) - -LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) -{ - emit_byte(0x86); - emit_byte(0xc0+8*(r1&0xf)+(r2&0xf)); /* XXX this handles upper-halves registers (e.g. %ah defined as 0x10+4) */ -} -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) - -/************************************************************************* - * FIXME: mem access modes probably wrong * - *************************************************************************/ - -LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) -{ - emit_byte(0x9c); -} -LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) - -LOWFUNC(WRITE,READ,0,raw_popfl,(void)) -{ - emit_byte(0x9d); -} -LENDFUNC(WRITE,READ,0,raw_popfl,(void)) - -/* Generate floating-point instructions */ -static inline void x86_fadd_m(MEMR s) -{ - emit_byte(0xdc); - emit_byte(0x05); - emit_long(s); -} - -#endif - -/************************************************************************* - * Unoptimizable stuff --- jump * - *************************************************************************/ - -static __inline__ void raw_call_r(R4 r) -{ -#if USE_NEW_RTASM - CALLsr(r); -#else - emit_byte(0xff); - emit_byte(0xd0+r); -#endif -} - -static __inline__ void raw_call_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) -{ -#if USE_NEW_RTASM - CALLsm(base, X86_NOREG, r, m); -#else - int mu; - switch(m) { - case 1: mu=0; break; - case 2: mu=1; break; - case 4: mu=2; break; - case 8: mu=3; break; - default: abort(); - } - emit_byte(0xff); - emit_byte(0x14); - emit_byte(0x05+8*r+0x40*mu); - emit_long(base); -#endif -} - -static __inline__ void raw_jmp_r(R4 r) -{ -#if USE_NEW_RTASM - JMPsr(r); -#else - emit_byte(0xff); - emit_byte(0xe0+r); -#endif -} - -static __inline__ void raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) -{ -#if USE_NEW_RTASM - JMPsm(base, X86_NOREG, r, m); -#else - int mu; - switch(m) { - case 1: mu=0; break; - case 2: mu=1; break; - case 4: mu=2; break; - case 8: mu=3; break; - default: abort(); - } - emit_byte(0xff); - emit_byte(0x24); - emit_byte(0x05+8*r+0x40*mu); - emit_long(base); -#endif -} - -static __inline__ void raw_jmp_m(uae_u32 base) -{ - emit_byte(0xff); - emit_byte(0x25); - emit_long(base); -} - - -static __inline__ void raw_call(uae_u32 t) -{ -#if USE_NEW_RTASM - CALLm(t); -#else - emit_byte(0xe8); - emit_long(t-(uae_u32)target-4); -#endif -} - -static __inline__ void raw_jmp(uae_u32 t) -{ -#if USE_NEW_RTASM - JMPm(t); -#else - emit_byte(0xe9); - emit_long(t-(uae_u32)target-4); -#endif -} - -static __inline__ void raw_jl(uae_u32 t) -{ - emit_byte(0x0f); - emit_byte(0x8c); - emit_long(t-(uintptr)target-4); -} - -static __inline__ void raw_jz(uae_u32 t) -{ - emit_byte(0x0f); - emit_byte(0x84); - emit_long(t-(uintptr)target-4); -} - -static __inline__ void raw_jnz(uae_u32 t) -{ - emit_byte(0x0f); - emit_byte(0x85); - emit_long(t-(uintptr)target-4); -} - -static __inline__ void raw_jnz_l_oponly(void) -{ - emit_byte(0x0f); - emit_byte(0x85); -} - -static __inline__ void raw_jcc_l_oponly(int cc) -{ - emit_byte(0x0f); - emit_byte(0x80+cc); -} - -static __inline__ void raw_jnz_b_oponly(void) -{ - emit_byte(0x75); -} - -static __inline__ void raw_jz_b_oponly(void) -{ - emit_byte(0x74); -} - -static __inline__ void raw_jcc_b_oponly(int cc) -{ - emit_byte(0x70+cc); -} - -static __inline__ void raw_jmp_l_oponly(void) -{ - emit_byte(0xe9); -} - -static __inline__ void raw_jmp_b_oponly(void) -{ - emit_byte(0xeb); -} - -static __inline__ void raw_ret(void) -{ - emit_byte(0xc3); -} - -static __inline__ void raw_nop(void) -{ - emit_byte(0x90); -} - -static __inline__ void raw_emit_nop_filler(int nbytes) -{ - /* Source: GNU Binutils 2.12.90.0.15 */ - /* Various efficient no-op patterns for aligning code labels. - Note: Don't try to assemble the instructions in the comments. - 0L and 0w are not legal. */ - static const uae_u8 f32_1[] = - {0x90}; /* nop */ - static const uae_u8 f32_2[] = - {0x89,0xf6}; /* movl %esi,%esi */ - static const uae_u8 f32_3[] = - {0x8d,0x76,0x00}; /* leal 0(%esi),%esi */ - static const uae_u8 f32_4[] = - {0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ - static const uae_u8 f32_5[] = - {0x90, /* nop */ - 0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ - static const uae_u8 f32_6[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00}; /* leal 0L(%esi),%esi */ - static const uae_u8 f32_7[] = - {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ - static const uae_u8 f32_8[] = - {0x90, /* nop */ - 0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ - static const uae_u8 f32_9[] = - {0x89,0xf6, /* movl %esi,%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uae_u8 f32_10[] = - {0x8d,0x76,0x00, /* leal 0(%esi),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uae_u8 f32_11[] = - {0x8d,0x74,0x26,0x00, /* leal 0(%esi,1),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uae_u8 f32_12[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ - 0x8d,0xbf,0x00,0x00,0x00,0x00}; /* leal 0L(%edi),%edi */ - static const uae_u8 f32_13[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uae_u8 f32_14[] = - {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00, /* leal 0L(%esi,1),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uae_u8 f32_15[] = - {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ - 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; - static const uae_u8 f32_16[] = - {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ - 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; - static const uae_u8 *const f32_patt[] = { - f32_1, f32_2, f32_3, f32_4, f32_5, f32_6, f32_7, f32_8, - f32_9, f32_10, f32_11, f32_12, f32_13, f32_14, f32_15 - }; - static const uae_u8 prefixes[4] = { 0x66, 0x66, 0x66, 0x66 }; - -#if defined(__x86_64__) - /* The recommended way to pad 64bit code is to use NOPs preceded by - maximally four 0x66 prefixes. Balance the size of nops. */ - if (nbytes == 0) - return; - - int i; - int nnops = (nbytes + 3) / 4; - int len = nbytes / nnops; - int remains = nbytes - nnops * len; - - for (i = 0; i < remains; i++) { - emit_block(prefixes, len); - raw_nop(); - } - for (; i < nnops; i++) { - emit_block(prefixes, len - 1); - raw_nop(); - } -#else - int nloops = nbytes / 16; - while (nloops-- > 0) - emit_block(f32_16, sizeof(f32_16)); - - nbytes %= 16; - if (nbytes) - emit_block(f32_patt[nbytes - 1], nbytes); -#endif -} - - -/************************************************************************* - * Flag handling, to and fro UAE flag register * - *************************************************************************/ - -static __inline__ void raw_flags_evicted(int r) -{ - //live.state[FLAGTMP].status=CLEAN; - live.state[FLAGTMP].status=INMEM; - live.state[FLAGTMP].realreg=-1; - /* We just "evicted" FLAGTMP. */ - if (live.nat[r].nholds!=1) { - /* Huh? */ - abort(); - } - live.nat[r].nholds=0; -} - -#define FLAG_NREG1_FLAGREG 0 /* Set to -1 if any register will do */ -static __inline__ void raw_flags_to_reg_FLAGREG(int r) -{ - raw_lahf(0); /* Most flags in AH */ - //raw_setcc(r,0); /* V flag in AL */ - raw_setcc_m((uintptr)live.state[FLAGTMP].mem,0); - -#if 1 /* Let's avoid those nasty partial register stalls */ - //raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,r); - raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,AH_INDEX); - raw_flags_evicted(r); -#endif -} - -#define FLAG_NREG2_FLAGREG 0 /* Set to -1 if any register will do */ -static __inline__ void raw_reg_to_flags_FLAGREG(int r) -{ - raw_cmp_b_ri(r,-127); /* set V */ - raw_sahf(0); -} - -#define FLAG_NREG3_FLAGREG 0 /* Set to -1 if any register will do */ -static __inline__ void raw_flags_set_zero_FLAGREG(int s, int tmp) -{ - raw_mov_l_rr(tmp,s); - raw_lahf(s); /* flags into ah */ - raw_and_l_ri(s,0xffffbfff); - raw_and_l_ri(tmp,0x00004000); - raw_xor_l_ri(tmp,0x00004000); - raw_or_l(s,tmp); - raw_sahf(s); -} - -static __inline__ void raw_flags_init_FLAGREG(void) { } - -#define FLAG_NREG1_FLAGSTK -1 /* Set to -1 if any register will do */ -static __inline__ void raw_flags_to_reg_FLAGSTK(int r) -{ - raw_pushfl(); - raw_pop_l_r(r); - raw_mov_l_mr((uintptr)live.state[FLAGTMP].mem,r); - raw_flags_evicted(r); -} - -#define FLAG_NREG2_FLAGSTK -1 /* Set to -1 if any register will do */ -static __inline__ void raw_reg_to_flags_FLAGSTK(int r) -{ - raw_push_l_r(r); - raw_popfl(); -} - -#define FLAG_NREG3_FLAGSTK -1 /* Set to -1 if any register will do */ -static __inline__ void raw_flags_set_zero_FLAGSTK(int s, int tmp) -{ - raw_mov_l_rr(tmp,s); - raw_pushfl(); - raw_pop_l_r(s); - raw_and_l_ri(s,0xffffffbf); - raw_and_l_ri(tmp,0x00000040); - raw_xor_l_ri(tmp,0x00000040); - raw_or_l(s,tmp); - raw_push_l_r(s); - raw_popfl(); -} - -static __inline__ void raw_flags_init_FLAGSTK(void) { } - -#if defined(__x86_64__) -/* Try to use the LAHF/SETO method on x86_64 since it is faster. - This can't be the default because some older CPUs don't support - LAHF/SAHF in long mode. */ -static int FLAG_NREG1_FLAGGEN = 0; -static __inline__ void raw_flags_to_reg_FLAGGEN(int r) -{ - if (have_lahf_lm) { - // NOTE: the interpreter uses the normal EFLAGS layout - // pushf/popf CF(0) ZF( 6) SF( 7) OF(11) - // sahf/lahf CF(8) ZF(14) SF(15) OF( 0) - assert(r == 0); - raw_setcc(r,0); /* V flag in AL */ - raw_lea_l_r_scaled(0,0,8); /* move it to its EFLAGS location */ - raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,0); - raw_lahf(0); /* most flags in AH */ - raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,AH_INDEX); - raw_flags_evicted(r); - } - else - raw_flags_to_reg_FLAGSTK(r); -} - -static int FLAG_NREG2_FLAGGEN = 0; -static __inline__ void raw_reg_to_flags_FLAGGEN(int r) -{ - if (have_lahf_lm) { - raw_xchg_b_rr(0,AH_INDEX); - raw_cmp_b_ri(r,-120); /* set V */ - raw_sahf(0); - } - else - raw_reg_to_flags_FLAGSTK(r); -} - -static int FLAG_NREG3_FLAGGEN = 0; -static __inline__ void raw_flags_set_zero_FLAGGEN(int s, int tmp) -{ - if (have_lahf_lm) - raw_flags_set_zero_FLAGREG(s, tmp); - else - raw_flags_set_zero_FLAGSTK(s, tmp); -} - -static __inline__ void raw_flags_init_FLAGGEN(void) -{ - if (have_lahf_lm) { - FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGREG; - FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGREG; - FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGREG; - } - else { - FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGSTK; - FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGSTK; - FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGSTK; - } -} -#endif - -#ifdef SAHF_SETO_PROFITABLE -#define FLAG_SUFFIX FLAGREG -#elif defined __x86_64__ -#define FLAG_SUFFIX FLAGGEN -#else -#define FLAG_SUFFIX FLAGSTK -#endif - -#define FLAG_GLUE_2(x, y) x ## _ ## y -#define FLAG_GLUE_1(x, y) FLAG_GLUE_2(x, y) -#define FLAG_GLUE(x) FLAG_GLUE_1(x, FLAG_SUFFIX) - -#define raw_flags_init FLAG_GLUE(raw_flags_init) -#define FLAG_NREG1 FLAG_GLUE(FLAG_NREG1) -#define raw_flags_to_reg FLAG_GLUE(raw_flags_to_reg) -#define FLAG_NREG2 FLAG_GLUE(FLAG_NREG2) -#define raw_reg_to_flags FLAG_GLUE(raw_reg_to_flags) -#define FLAG_NREG3 FLAG_GLUE(FLAG_NREG3) -#define raw_flags_set_zero FLAG_GLUE(raw_flags_set_zero) - -/* Apparently, there are enough instructions between flag store and - flag reload to avoid the partial memory stall */ -static __inline__ void raw_load_flagreg(uae_u32 target, uae_u32 r) -{ -#if 1 - raw_mov_l_rm(target,(uintptr)live.state[r].mem); -#else - raw_mov_b_rm(target,(uintptr)live.state[r].mem); - raw_mov_b_rm(target+4,((uintptr)live.state[r].mem)+1); -#endif -} - -/* FLAGX is byte sized, and we *do* write it at that size */ -static __inline__ void raw_load_flagx(uae_u32 target, uae_u32 r) -{ - if (live.nat[target].canbyte) - raw_mov_b_rm(target,(uintptr)live.state[r].mem); - else if (live.nat[target].canword) - raw_mov_w_rm(target,(uintptr)live.state[r].mem); - else - raw_mov_l_rm(target,(uintptr)live.state[r].mem); -} - -static __inline__ void raw_dec_sp(int off) -{ - if (off) raw_sub_l_ri(ESP_INDEX,off); -} - -static __inline__ void raw_inc_sp(int off) -{ - if (off) raw_add_l_ri(ESP_INDEX,off); -} - -/************************************************************************* - * Handling mistaken direct memory access * - *************************************************************************/ - -// gb-- I don't need that part for JIT Basilisk II -#if defined(NATMEM_OFFSET) && 0 -#include -#include - -#define SIG_READ 1 -#define SIG_WRITE 2 - -static int in_handler=0; -static uae_u8 veccode[256]; - -static void vec(int x, struct sigcontext sc) -{ - uae_u8* i=(uae_u8*)sc.eip; - uae_u32 addr=sc.cr2; - int r=-1; - int size=4; - int dir=-1; - int len=0; - int j; - - write_log("fault address is %08x at %08x\n",sc.cr2,sc.eip); - if (!canbang) - write_log("Not happy! Canbang is 0 in SIGSEGV handler!\n"); - if (in_handler) - write_log("Argh --- Am already in a handler. Shouldn't happen!\n"); - - if (canbang && i>=compiled_code && i<=current_compile_p) { - if (*i==0x66) { - i++; - size=2; - len++; - } - - switch(i[0]) { - case 0x8a: - if ((i[1]&0xc0)==0x80) { - r=(i[1]>>3)&7; - dir=SIG_READ; - size=1; - len+=6; - break; - } - break; - case 0x88: - if ((i[1]&0xc0)==0x80) { - r=(i[1]>>3)&7; - dir=SIG_WRITE; - size=1; - len+=6; - break; - } - break; - case 0x8b: - if ((i[1]&0xc0)==0x80) { - r=(i[1]>>3)&7; - dir=SIG_READ; - len+=6; - break; - } - if ((i[1]&0xc0)==0x40) { - r=(i[1]>>3)&7; - dir=SIG_READ; - len+=3; - break; - } - break; - case 0x89: - if ((i[1]&0xc0)==0x80) { - r=(i[1]>>3)&7; - dir=SIG_WRITE; - len+=6; - break; - } - if ((i[1]&0xc0)==0x40) { - r=(i[1]>>3)&7; - dir=SIG_WRITE; - len+=3; - break; - } - break; - } - } - - if (r!=-1) { - void* pr=NULL; - write_log("register was %d, direction was %d, size was %d\n",r,dir,size); - - switch(r) { - case 0: pr=&(sc.eax); break; - case 1: pr=&(sc.ecx); break; - case 2: pr=&(sc.edx); break; - case 3: pr=&(sc.ebx); break; - case 4: pr=(size>1)?NULL:(((uae_u8*)&(sc.eax))+1); break; - case 5: pr=(size>1)? - (void*)(&(sc.ebp)): - (void*)(((uae_u8*)&(sc.ecx))+1); break; - case 6: pr=(size>1)? - (void*)(&(sc.esi)): - (void*)(((uae_u8*)&(sc.edx))+1); break; - case 7: pr=(size>1)? - (void*)(&(sc.edi)): - (void*)(((uae_u8*)&(sc.ebx))+1); break; - default: abort(); - } - if (pr) { - blockinfo* bi; - - if (currprefs.comp_oldsegv) { - addr-=NATMEM_OFFSET; - - if ((addr>=0x10000000 && addr<0x40000000) || - (addr>=0x50000000)) { - write_log("Suspicious address in %x SEGV handler.\n",addr); - } - if (dir==SIG_READ) { - switch(size) { - case 1: *((uae_u8*)pr)=get_byte(addr); break; - case 2: *((uae_u16*)pr)=get_word(addr); break; - case 4: *((uae_u32*)pr)=get_long(addr); break; - default: abort(); - } - } - else { /* write */ - switch(size) { - case 1: put_byte(addr,*((uae_u8*)pr)); break; - case 2: put_word(addr,*((uae_u16*)pr)); break; - case 4: put_long(addr,*((uae_u32*)pr)); break; - default: abort(); - } - } - write_log("Handled one access!\n"); - fflush(stdout); - segvcount++; - sc.eip+=len; - } - else { - void* tmp=target; - int i; - uae_u8 vecbuf[5]; - - addr-=NATMEM_OFFSET; - - if ((addr>=0x10000000 && addr<0x40000000) || - (addr>=0x50000000)) { - write_log("Suspicious address in %x SEGV handler.\n",addr); - } - - target=(uae_u8*)sc.eip; - for (i=0;i<5;i++) - vecbuf[i]=target[i]; - emit_byte(0xe9); - emit_long((uintptr)veccode-(uintptr)target-4); - write_log("Create jump to %p\n",veccode); - - write_log("Handled one access!\n"); - fflush(stdout); - segvcount++; - - target=veccode; - - if (dir==SIG_READ) { - switch(size) { - case 1: raw_mov_b_ri(r,get_byte(addr)); break; - case 2: raw_mov_w_ri(r,get_byte(addr)); break; - case 4: raw_mov_l_ri(r,get_byte(addr)); break; - default: abort(); - } - } - else { /* write */ - switch(size) { - case 1: put_byte(addr,*((uae_u8*)pr)); break; - case 2: put_word(addr,*((uae_u16*)pr)); break; - case 4: put_long(addr,*((uae_u32*)pr)); break; - default: abort(); - } - } - for (i=0;i<5;i++) - raw_mov_b_mi(sc.eip+i,vecbuf[i]); - raw_mov_l_mi((uintptr)&in_handler,0); - emit_byte(0xe9); - emit_long(sc.eip+len-(uintptr)target-4); - in_handler=1; - target=tmp; - } - bi=active; - while (bi) { - if (bi->handler && - (uae_u8*)bi->direct_handler<=i && - (uae_u8*)bi->nexthandler>i) { - write_log("deleted trigger (%p<%p<%p) %p\n", - bi->handler, - i, - bi->nexthandler, - bi->pc_p); - invalidate_block(bi); - raise_in_cl_list(bi); - set_special(0); - return; - } - bi=bi->next; - } - /* Not found in the active list. Might be a rom routine that - is in the dormant list */ - bi=dormant; - while (bi) { - if (bi->handler && - (uae_u8*)bi->direct_handler<=i && - (uae_u8*)bi->nexthandler>i) { - write_log("deleted trigger (%p<%p<%p) %p\n", - bi->handler, - i, - bi->nexthandler, - bi->pc_p); - invalidate_block(bi); - raise_in_cl_list(bi); - set_special(0); - return; - } - bi=bi->next; - } - write_log("Huh? Could not find trigger!\n"); - return; - } - } - write_log("Can't handle access!\n"); - for (j=0;j<10;j++) { - write_log("instruction byte %2d is %02x\n",j,i[j]); - } - write_log("Please send the above info (starting at \"fault address\") to\n" - "bmeyer@csse.monash.edu.au\n" - "This shouldn't happen ;-)\n"); - fflush(stdout); - signal(SIGSEGV,SIG_DFL); /* returning here will cause a "real" SEGV */ -} -#endif - - -/************************************************************************* - * Checking for CPU features * - *************************************************************************/ - -struct cpuinfo_x86 { - uae_u8 x86; // CPU family - uae_u8 x86_vendor; // CPU vendor - uae_u8 x86_processor; // CPU canonical processor type - uae_u8 x86_brand_id; // CPU BrandID if supported, yield 0 otherwise - uae_u32 x86_hwcap; - uae_u8 x86_model; - uae_u8 x86_mask; - int cpuid_level; // Maximum supported CPUID level, -1=no CPUID - char x86_vendor_id[16]; -}; -struct cpuinfo_x86 cpuinfo; - -enum { - X86_VENDOR_INTEL = 0, - X86_VENDOR_CYRIX = 1, - X86_VENDOR_AMD = 2, - X86_VENDOR_UMC = 3, - X86_VENDOR_NEXGEN = 4, - X86_VENDOR_CENTAUR = 5, - X86_VENDOR_RISE = 6, - X86_VENDOR_TRANSMETA = 7, - X86_VENDOR_NSC = 8, - X86_VENDOR_UNKNOWN = 0xff -}; - -enum { - X86_PROCESSOR_I386, /* 80386 */ - X86_PROCESSOR_I486, /* 80486DX, 80486SX, 80486DX[24] */ - X86_PROCESSOR_PENTIUM, - X86_PROCESSOR_PENTIUMPRO, - X86_PROCESSOR_K6, - X86_PROCESSOR_ATHLON, - X86_PROCESSOR_PENTIUM4, - X86_PROCESSOR_X86_64, - X86_PROCESSOR_max -}; - -static const char * x86_processor_string_table[X86_PROCESSOR_max] = { - "80386", - "80486", - "Pentium", - "PentiumPro", - "K6", - "Athlon", - "Pentium4", - "x86-64" -}; - -static struct ptt { - const int align_loop; - const int align_loop_max_skip; - const int align_jump; - const int align_jump_max_skip; - const int align_func; -} -x86_alignments[X86_PROCESSOR_max] = { - { 4, 3, 4, 3, 4 }, - { 16, 15, 16, 15, 16 }, - { 16, 7, 16, 7, 16 }, - { 16, 15, 16, 7, 16 }, - { 32, 7, 32, 7, 32 }, - { 16, 7, 16, 7, 16 }, - { 0, 0, 0, 0, 0 }, - { 16, 7, 16, 7, 16 } -}; - -static void -x86_get_cpu_vendor(struct cpuinfo_x86 *c) -{ - char *v = c->x86_vendor_id; - - if (!strcmp(v, "GenuineIntel")) - c->x86_vendor = X86_VENDOR_INTEL; - else if (!strcmp(v, "AuthenticAMD")) - c->x86_vendor = X86_VENDOR_AMD; - else if (!strcmp(v, "CyrixInstead")) - c->x86_vendor = X86_VENDOR_CYRIX; - else if (!strcmp(v, "Geode by NSC")) - c->x86_vendor = X86_VENDOR_NSC; - else if (!strcmp(v, "UMC UMC UMC ")) - c->x86_vendor = X86_VENDOR_UMC; - else if (!strcmp(v, "CentaurHauls")) - c->x86_vendor = X86_VENDOR_CENTAUR; - else if (!strcmp(v, "NexGenDriven")) - c->x86_vendor = X86_VENDOR_NEXGEN; - else if (!strcmp(v, "RiseRiseRise")) - c->x86_vendor = X86_VENDOR_RISE; - else if (!strcmp(v, "GenuineTMx86") || - !strcmp(v, "TransmetaCPU")) - c->x86_vendor = X86_VENDOR_TRANSMETA; - else - c->x86_vendor = X86_VENDOR_UNKNOWN; -} - -static void -cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) -{ - const int CPUID_SPACE = 4096; - uae_u8* cpuid_space = (uae_u8 *)vm_acquire(CPUID_SPACE); - if (cpuid_space == VM_MAP_FAILED) - abort(); - vm_protect(cpuid_space, CPUID_SPACE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); - - static uae_u32 s_op, s_eax, s_ebx, s_ecx, s_edx; - uae_u8* tmp=get_target(); - - s_op = op; - set_target(cpuid_space); - raw_push_l_r(0); /* eax */ - raw_push_l_r(1); /* ecx */ - raw_push_l_r(2); /* edx */ - raw_push_l_r(3); /* ebx */ - raw_mov_l_rm(0,(uintptr)&s_op); - raw_cpuid(0); - raw_mov_l_mr((uintptr)&s_eax,0); - raw_mov_l_mr((uintptr)&s_ebx,3); - raw_mov_l_mr((uintptr)&s_ecx,1); - raw_mov_l_mr((uintptr)&s_edx,2); - raw_pop_l_r(3); - raw_pop_l_r(2); - raw_pop_l_r(1); - raw_pop_l_r(0); - raw_ret(); - set_target(tmp); - - ((cpuop_func*)cpuid_space)(0); - if (eax != NULL) *eax = s_eax; - if (ebx != NULL) *ebx = s_ebx; - if (ecx != NULL) *ecx = s_ecx; - if (edx != NULL) *edx = s_edx; - - vm_release(cpuid_space, CPUID_SPACE); -} - -static void -raw_init_cpu(void) -{ - struct cpuinfo_x86 *c = &cpuinfo; - - /* Defaults */ - c->x86_processor = X86_PROCESSOR_max; - c->x86_vendor = X86_VENDOR_UNKNOWN; - c->cpuid_level = -1; /* CPUID not detected */ - c->x86_model = c->x86_mask = 0; /* So far unknown... */ - c->x86_vendor_id[0] = '\0'; /* Unset */ - c->x86_hwcap = 0; - - /* Get vendor name */ - c->x86_vendor_id[12] = '\0'; - cpuid(0x00000000, - (uae_u32 *)&c->cpuid_level, - (uae_u32 *)&c->x86_vendor_id[0], - (uae_u32 *)&c->x86_vendor_id[8], - (uae_u32 *)&c->x86_vendor_id[4]); - x86_get_cpu_vendor(c); - - /* Intel-defined flags: level 0x00000001 */ - c->x86_brand_id = 0; - if ( c->cpuid_level >= 0x00000001 ) { - uae_u32 tfms, brand_id; - cpuid(0x00000001, &tfms, &brand_id, NULL, &c->x86_hwcap); - c->x86 = (tfms >> 8) & 15; - if (c->x86 == 0xf) - c->x86 += (tfms >> 20) & 0xff; /* extended family */ - c->x86_model = (tfms >> 4) & 15; - if (c->x86_model == 0xf) - c->x86_model |= (tfms >> 12) & 0xf0; /* extended model */ - c->x86_brand_id = brand_id & 0xff; - c->x86_mask = tfms & 15; - } else { - /* Have CPUID level 0 only - unheard of */ - c->x86 = 4; - } - - /* AMD-defined flags: level 0x80000001 */ - uae_u32 xlvl; - cpuid(0x80000000, &xlvl, NULL, NULL, NULL); - if ( (xlvl & 0xffff0000) == 0x80000000 ) { - if ( xlvl >= 0x80000001 ) { - uae_u32 features, extra_features; - cpuid(0x80000001, NULL, NULL, &extra_features, &features); - if (features & (1 << 29)) { - /* Assume x86-64 if long mode is supported */ - c->x86_processor = X86_PROCESSOR_X86_64; - } - if (extra_features & (1 << 0)) - have_lahf_lm = true; - } - } - - /* Canonicalize processor ID */ - switch (c->x86) { - case 3: - c->x86_processor = X86_PROCESSOR_I386; - break; - case 4: - c->x86_processor = X86_PROCESSOR_I486; - break; - case 5: - if (c->x86_vendor == X86_VENDOR_AMD) - c->x86_processor = X86_PROCESSOR_K6; - else - c->x86_processor = X86_PROCESSOR_PENTIUM; - break; - case 6: - if (c->x86_vendor == X86_VENDOR_AMD) - c->x86_processor = X86_PROCESSOR_ATHLON; - else - c->x86_processor = X86_PROCESSOR_PENTIUMPRO; - break; - case 15: - if (c->x86_processor == X86_PROCESSOR_max) { - switch (c->x86_vendor) { - case X86_VENDOR_INTEL: - c->x86_processor = X86_PROCESSOR_PENTIUM4; - break; - case X86_VENDOR_AMD: - /* Assume a 32-bit Athlon processor if not in long mode */ - c->x86_processor = X86_PROCESSOR_ATHLON; - break; - } - } - break; - } - if (c->x86_processor == X86_PROCESSOR_max) { - c->x86_processor = X86_PROCESSOR_I386; - fprintf(stderr, "Error: unknown processor type, assuming i386\n"); - fprintf(stderr, " Family : %d\n", c->x86); - fprintf(stderr, " Model : %d\n", c->x86_model); - fprintf(stderr, " Mask : %d\n", c->x86_mask); - fprintf(stderr, " Vendor : %s [%d]\n", c->x86_vendor_id, c->x86_vendor); - if (c->x86_brand_id) - fprintf(stderr, " BrandID : %02x\n", c->x86_brand_id); - } - - /* Have CMOV support? */ - have_cmov = (c->x86_hwcap & (1 << 15)) != 0; -#if defined(__x86_64__) - if (!have_cmov) { - write_log("x86-64 implementations are bound to have CMOV!\n"); - abort(); - } -#endif - - /* Can the host CPU suffer from partial register stalls? */ - have_rat_stall = (c->x86_vendor == X86_VENDOR_INTEL); -#if 1 - /* It appears that partial register writes are a bad idea even on - AMD K7 cores, even though they are not supposed to have the - dreaded rat stall. Why? Anyway, that's why we lie about it ;-) */ - if (c->x86_processor == X86_PROCESSOR_ATHLON) - have_rat_stall = true; -#endif - - /* Alignments */ - if (tune_alignment) { - align_loops = x86_alignments[c->x86_processor].align_loop; - align_jumps = x86_alignments[c->x86_processor].align_jump; - } - - write_log("Max CPUID level=%d Processor is %s [%s]\n", - c->cpuid_level, c->x86_vendor_id, - x86_processor_string_table[c->x86_processor]); - - raw_flags_init(); -} - -static bool target_check_bsf(void) -{ - bool mismatch = false; - for (int g_ZF = 0; g_ZF <= 1; g_ZF++) { - for (int g_CF = 0; g_CF <= 1; g_CF++) { - for (int g_OF = 0; g_OF <= 1; g_OF++) { - for (int g_SF = 0; g_SF <= 1; g_SF++) { - for (int value = -1; value <= 1; value++) { - unsigned long flags = (g_SF << 7) | (g_OF << 11) | (g_ZF << 6) | g_CF; - unsigned long tmp = value; -#ifdef _MSC_VER - __writeeflags(flags); - _BitScanForward(&tmp, value); - flags = __readeflags(); -#else - __asm__ __volatile__ ("push %0; popf; bsf %1,%1; pushf; pop %0" - : "+r" (flags), "+r" (tmp) : : "cc"); -#endif - int OF = (flags >> 11) & 1; - int SF = (flags >> 7) & 1; - int ZF = (flags >> 6) & 1; - int CF = flags & 1; - tmp = (value == 0); - if (ZF != tmp || SF != g_SF || OF != g_OF || CF != g_CF) - mismatch = true; - } - }}}} - if (mismatch) - write_log("Target CPU defines all flags on BSF instruction\n"); - return !mismatch; -} - - -/************************************************************************* - * FPU stuff * - *************************************************************************/ - - -static __inline__ void raw_fp_init(void) -{ - int i; - - for (i=0;i1) { - emit_byte(0x9b); - emit_byte(0xdb); - emit_byte(0xe3); - live.tos=-1; - } -#endif - while (live.tos>=1) { - emit_byte(0xde); - emit_byte(0xd9); - live.tos-=2; - } - while (live.tos>=0) { - emit_byte(0xdd); - emit_byte(0xd8); - live.tos--; - } - raw_fp_init(); -} - -static __inline__ void make_tos(int r) -{ - int p,q; - - if (live.spos[r]<0) { /* Register not yet on stack */ - emit_byte(0xd9); - emit_byte(0xe8); /* Push '1' on the stack, just to grow it */ - live.tos++; - live.spos[r]=live.tos; - live.onstack[live.tos]=r; - return; - } - /* Register is on stack */ - if (live.tos==live.spos[r]) - return; - p=live.spos[r]; - q=live.onstack[live.tos]; - - emit_byte(0xd9); - emit_byte(0xc8+live.tos-live.spos[r]); /* exchange it with top of stack */ - live.onstack[live.tos]=r; - live.spos[r]=live.tos; - live.onstack[p]=q; - live.spos[q]=p; -} - -static __inline__ void make_tos2(int r, int r2) -{ - int q; - - make_tos(r2); /* Put the reg that's supposed to end up in position2 - on top */ - - if (live.spos[r]<0) { /* Register not yet on stack */ - make_tos(r); /* This will extend the stack */ - return; - } - /* Register is on stack */ - emit_byte(0xd9); - emit_byte(0xc9); /* Move r2 into position 2 */ - - q=live.onstack[live.tos-1]; - live.onstack[live.tos]=q; - live.spos[q]=live.tos; - live.onstack[live.tos-1]=r2; - live.spos[r2]=live.tos-1; - - make_tos(r); /* And r into 1 */ -} - -static __inline__ int stackpos(int r) -{ - if (live.spos[r]<0) - abort(); - if (live.tos=0) { - /* source is on top of stack, and we already have the dest */ - int dd=stackpos(d); - emit_byte(0xdd); - emit_byte(0xd0+dd); - } - else { - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source on tos */ - tos_make(d); /* store to destination, pop if necessary */ - } -} -LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) - -LOWFUNC(NONE,READ,4,raw_fldcw_m_indexed,(R4 index, IMM base)) -{ - emit_byte(0xd9); - emit_byte(0xa8+index); - emit_long(base); -} -LENDFUNC(NONE,READ,4,raw_fldcw_m_indexed,(R4 index, IMM base)) - - -LOWFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xfa); /* take square root */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xfa); /* take square root */ - } -} -LENDFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xe1); /* take fabs */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xe1); /* take fabs */ - } -} -LENDFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xfc); /* take frndint */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xfc); /* take frndint */ - } -} -LENDFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xff); /* take cos */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xff); /* take cos */ - } -} -LENDFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xfe); /* take sin */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xfe); /* take sin */ - } -} -LENDFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) - -static const double one=1; -LOWFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) -{ - int ds; - - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - - emit_byte(0xd9); - emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ - emit_byte(0xd9); - emit_byte(0xfc); /* rndint */ - emit_byte(0xd9); - emit_byte(0xc9); /* swap top two elements */ - emit_byte(0xd8); - emit_byte(0xe1); /* subtract rounded from original */ - emit_byte(0xd9); - emit_byte(0xf0); /* f2xm1 */ - x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ - emit_byte(0xd9); - emit_byte(0xfd); /* and scale it */ - emit_byte(0xdd); - emit_byte(0xd9); /* take he rounded value off */ - tos_make(d); /* store to destination */ -} -LENDFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) -{ - int ds; - - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xea); /* fldl2e */ - emit_byte(0xde); - emit_byte(0xc9); /* fmulp --- multiply source by log2(e) */ - - emit_byte(0xd9); - emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ - emit_byte(0xd9); - emit_byte(0xfc); /* rndint */ - emit_byte(0xd9); - emit_byte(0xc9); /* swap top two elements */ - emit_byte(0xd8); - emit_byte(0xe1); /* subtract rounded from original */ - emit_byte(0xd9); - emit_byte(0xf0); /* f2xm1 */ - x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ - emit_byte(0xd9); - emit_byte(0xfd); /* and scale it */ - emit_byte(0xdd); - emit_byte(0xd9); /* take he rounded value off */ - tos_make(d); /* store to destination */ -} -LENDFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) -{ - int ds; - - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xe8); /* push '1' */ - emit_byte(0xd9); - emit_byte(0xc9); /* swap top two */ - emit_byte(0xd9); - emit_byte(0xf1); /* take 1*log2(x) */ - tos_make(d); /* store to destination */ -} -LENDFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) - - -LOWFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) -{ - int ds; - - if (d!=s) { - usereg(s); - ds=stackpos(s); - emit_byte(0xd9); - emit_byte(0xc0+ds); /* duplicate source */ - emit_byte(0xd9); - emit_byte(0xe0); /* take fchs */ - tos_make(d); /* store to destination */ - } - else { - make_tos(d); - emit_byte(0xd9); - emit_byte(0xe0); /* take fchs */ - } -} -LENDFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - if (live.spos[s]==live.tos) { - /* Source is on top of stack */ - ds=stackpos(d); - emit_byte(0xdc); - emit_byte(0xc0+ds); /* add source to dest*/ - } - else { - make_tos(d); - ds=stackpos(s); - - emit_byte(0xd8); - emit_byte(0xc0+ds); /* add source to dest*/ - } -} -LENDFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - if (live.spos[s]==live.tos) { - /* Source is on top of stack */ - ds=stackpos(d); - emit_byte(0xdc); - emit_byte(0xe8+ds); /* sub source from dest*/ - } - else { - make_tos(d); - ds=stackpos(s); - - emit_byte(0xd8); - emit_byte(0xe0+ds); /* sub src from dest */ - } -} -LENDFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - make_tos(d); - ds=stackpos(s); - - emit_byte(0xdd); - emit_byte(0xe0+ds); /* cmp dest with source*/ -} -LENDFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - if (live.spos[s]==live.tos) { - /* Source is on top of stack */ - ds=stackpos(d); - emit_byte(0xdc); - emit_byte(0xc8+ds); /* mul dest by source*/ - } - else { - make_tos(d); - ds=stackpos(s); - - emit_byte(0xd8); - emit_byte(0xc8+ds); /* mul dest by source*/ - } -} -LENDFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - if (live.spos[s]==live.tos) { - /* Source is on top of stack */ - ds=stackpos(d); - emit_byte(0xdc); - emit_byte(0xf8+ds); /* div dest by source */ - } - else { - make_tos(d); - ds=stackpos(s); - - emit_byte(0xd8); - emit_byte(0xf0+ds); /* div dest by source*/ - } -} -LENDFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - make_tos2(d,s); - ds=stackpos(s); - - if (ds!=1) { - printf("Failed horribly in raw_frem_rr! ds is %d\n",ds); - abort(); - } - emit_byte(0xd9); - emit_byte(0xf8); /* take rem from dest by source */ -} -LENDFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) - -LOWFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) -{ - int ds; - - usereg(s); - usereg(d); - - make_tos2(d,s); - ds=stackpos(s); - - if (ds!=1) { - printf("Failed horribly in raw_frem1_rr! ds is %d\n",ds); - abort(); - } - emit_byte(0xd9); - emit_byte(0xf5); /* take rem1 from dest by source */ -} -LENDFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) - - -LOWFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) -{ - make_tos(r); - emit_byte(0xd9); /* ftst */ - emit_byte(0xe4); -} -LENDFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) - -/* %eax register is clobbered if target processor doesn't support fucomi */ -#define FFLAG_NREG_CLOBBER_CONDITION !have_cmov -#define FFLAG_NREG EAX_INDEX - -static __inline__ void raw_fflags_into_flags(int r) -{ - int p; - - usereg(r); - p=stackpos(r); - - emit_byte(0xd9); - emit_byte(0xee); /* Push 0 */ - emit_byte(0xd9); - emit_byte(0xc9+p); /* swap top two around */ - if (have_cmov) { - // gb-- fucomi is for P6 cores only, not K6-2 then... - emit_byte(0xdb); - emit_byte(0xe9+p); /* fucomi them */ - } - else { - emit_byte(0xdd); - emit_byte(0xe1+p); /* fucom them */ - emit_byte(0x9b); - emit_byte(0xdf); - emit_byte(0xe0); /* fstsw ax */ - raw_sahf(0); /* sahf */ - } - emit_byte(0xdd); - emit_byte(0xd9+p); /* store value back, and get rid of 0 */ -} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h deleted file mode 100644 index 08538b7af..000000000 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h +++ /dev/null @@ -1,2565 +0,0 @@ -/******************** -*- mode: C; tab-width: 8 -*- ******************** - * - * Run-time assembler for IA-32 and AMD64 - * - ***********************************************************************/ - - -/*********************************************************************** - * - * This file is derived from CCG. - * - * Copyright 1999, 2000, 2001, 2002, 2003 Ian Piumarta - * - * Adaptations and enhancements for AMD64 support, Copyright 2003-2008 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 X86_RTASM_H -#define X86_RTASM_H - -/* NOTES - * - * o Best viewed on a 1024x768 screen with fixed-6x10 font ;-) - * - * TODO - * - * o Fix FIXMEs - * o SSE instructions - * o Optimize for cases where register numbers are not integral constants - */ - -/* --- Configuration ------------------------------------------------------- */ - -/* Define to settle a "flat" register set, i.e. different regno for - each size variant. */ -#ifndef X86_FLAT_REGISTERS -#define X86_FLAT_REGISTERS 1 -#endif - -/* Define to generate x86-64 code. */ -#ifndef X86_TARGET_64BIT -#define X86_TARGET_64BIT 0 -#endif - -/* Define to optimize ALU instructions. */ -#ifndef X86_OPTIMIZE_ALU -#define X86_OPTIMIZE_ALU 1 -#endif - -/* Define to optimize rotate/shift instructions. */ -#ifndef X86_OPTIMIZE_ROTSHI -#define X86_OPTIMIZE_ROTSHI 1 -#endif - -/* Define to optimize absolute addresses for RIP relative addressing. */ -#ifndef X86_RIP_RELATIVE_ADDR -#define X86_RIP_RELATIVE_ADDR 1 -#endif - - -/* --- Macros -------------------------------------------------------------- */ - -/* Functions used to emit code. - * - * x86_emit_byte(B) - * x86_emit_word(W) - * x86_emit_long(L) - */ - -/* Get pointer to current code - * - * x86_get_target() - */ - -/* Abort assembler, fatal failure. - * - * x86_emit_failure(MSG) - */ - -#define x86_emit_failure0(MSG) (x86_emit_failure(MSG),0) - - -/* --- Register set -------------------------------------------------------- */ - -enum { - X86_RIP = -2, -#if X86_FLAT_REGISTERS - X86_NOREG = 0, - X86_Reg8L_Base = 0x10, - X86_Reg8H_Base = 0x20, - X86_Reg16_Base = 0x30, - X86_Reg32_Base = 0x40, - X86_Reg64_Base = 0x50, - X86_RegMMX_Base = 0x60, - X86_RegXMM_Base = 0x70, - X86_RegFPU_Base = 0x80 -#else - X86_NOREG = -1, - X86_Reg8L_Base = 0, - X86_Reg8H_Base = 16, - X86_Reg16_Base = 0, - X86_Reg32_Base = 0, - X86_Reg64_Base = 0, - X86_RegMMX_Base = 0, - X86_RegXMM_Base = 0, - X86_RegFPU_Base = 0 -#endif -}; - -enum { - X86_AL = X86_Reg8L_Base, - X86_CL, X86_DL, X86_BL, - X86_SPL, X86_BPL, X86_SIL, X86_DIL, - X86_R8B, X86_R9B, X86_R10B, X86_R11B, - X86_R12B, X86_R13B, X86_R14B, X86_R15B, - X86_AH = X86_Reg8H_Base + 4, - X86_CH, X86_DH, X86_BH -}; - -enum { - X86_AX = X86_Reg16_Base, - X86_CX, X86_DX, X86_BX, - X86_SP, X86_BP, X86_SI, X86_DI, - X86_R8W, X86_R9W, X86_R10W, X86_R11W, - X86_R12W, X86_R13W, X86_R14W, X86_R15W -}; - -enum { - X86_EAX = X86_Reg32_Base, - X86_ECX, X86_EDX, X86_EBX, - X86_ESP, X86_EBP, X86_ESI, X86_EDI, - X86_R8D, X86_R9D, X86_R10D, X86_R11D, - X86_R12D, X86_R13D, X86_R14D, X86_R15D -}; - -enum { - X86_RAX = X86_Reg64_Base, - X86_RCX, X86_RDX, X86_RBX, - X86_RSP, X86_RBP, X86_RSI, X86_RDI, - X86_R8, X86_R9, X86_R10, X86_R11, - X86_R12, X86_R13, X86_R14, X86_R15 -}; - -enum { - X86_MM0 = X86_RegMMX_Base, - X86_MM1, X86_MM2, X86_MM3, - X86_MM4, X86_MM5, X86_MM6, X86_MM7, -}; - -enum { - X86_XMM0 = X86_RegXMM_Base, - X86_XMM1, X86_XMM2, X86_XMM3, - X86_XMM4, X86_XMM5, X86_XMM6, X86_XMM7, - X86_XMM8, X86_XMM9, X86_XMM10, X86_XMM11, - X86_XMM12, X86_XMM13, X86_XMM14, X86_XMM15 -}; - -enum { - X86_ST0 = X86_RegFPU_Base, - X86_ST1, X86_ST2, X86_ST3, - X86_ST4, X86_ST5, X86_ST6, X86_ST7 -}; - -/* Register control and access - * - * _r0P(R) Null register? - * _rIP(R) RIP register? - * _rXP(R) Extended register? - * - * _rC(R) Class of register (only valid if X86_FLAT_REGISTERS) - * _rR(R) Full register number - * _rN(R) Short register number for encoding - * - * _r1(R) 8-bit register ID - * _r2(R) 16-bit register ID - * _r4(R) 32-bit register ID - * _r8(R) 64-bit register ID - * _rM(R) MMX register ID - * _rX(R) XMM register ID - * _rF(R) FPU register ID - * _rA(R) Address register ID used for EA calculation - */ - -#define _rST0P(R) ((int)(R) == (int)X86_ST0) -#define _r0P(R) ((int)(R) == (int)X86_NOREG) -#define _rIP(R) (X86_TARGET_64BIT ? ((int)(R) == (int)X86_RIP) : 0) - -#if X86_FLAT_REGISTERS -#define _rC(R) ((R) & 0xf0) -#define _rR(R) ((R) & 0x0f) -#define _rN(R) ((R) & 0x07) -#define _rXP(R) (((R) > 0 && _rR(R) > 7) ? 1 : 0) -#else -#define _rN(R) ((R) & 0x07) -#define _rR(R) (int(R)) -#define _rXP(R) ((_rR(R) > 7 && _rR(R) < 16) ? 1 : 0) -#endif - -#if !defined(_ASM_SAFETY) || ! X86_FLAT_REGISTERS -#define _r1(R) _rN(R) -#define _r2(R) _rN(R) -#define _r4(R) _rN(R) -#define _r8(R) _rN(R) -#define _rA(R) _rN(R) -#define _rM(R) _rN(R) -#define _rX(R) _rN(R) -#define _rF(R) _rN(R) -#else -#define _r1(R) ( ((_rC(R) & (X86_Reg8L_Base | X86_Reg8H_Base)) != 0) ? _rN(R) : x86_emit_failure0( "8-bit register required")) -#define _r2(R) ( (_rC(R) == X86_Reg16_Base) ? _rN(R) : x86_emit_failure0("16-bit register required")) -#define _r4(R) ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("32-bit register required")) -#define _r8(R) ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("64-bit register required")) -#define _rA(R) ( X86_TARGET_64BIT ? \ - ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("not a valid 64-bit base/index expression")) : \ - ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("not a valid 32-bit base/index expression")) ) -#define _rM(R) ( (_rC(R) == X86_RegMMX_Base) ? _rN(R) : x86_emit_failure0("MMX register required")) -#define _rX(R) ( (_rC(R) == X86_RegXMM_Base) ? _rN(R) : x86_emit_failure0("SSE register required")) -#define _rF(R) ( (_rC(R) == X86_RegFPU_Base) ? _rN(R) : x86_emit_failure0("FPU register required")) -#endif - -#define _rSP() (X86_TARGET_64BIT ? (int)X86_RSP : (int)X86_ESP) -#define _r1e8lP(R) (int(R) >= X86_SPL && int(R) <= X86_DIL) -#define _rbpP(R) (_rR(R) == _rR(X86_RBP)) -#define _rspP(R) (_rR(R) == _rR(X86_RSP)) -#define _rbp13P(R) (_rN(R) == _rN(X86_RBP)) -#define _rsp12P(R) (_rN(R) == _rN(X86_RSP)) - - -/* ========================================================================= */ -/* --- UTILITY ------------------------------------------------------------- */ -/* ========================================================================= */ - -typedef signed char _sc; -typedef unsigned char _uc; -typedef signed short _ss; -typedef unsigned short _us; -typedef signed int _sl; -typedef unsigned int _ul; - -#define _UC(X) ((_uc )(unsigned long)(X)) -#define _US(X) ((_us )(unsigned long)(X)) -#define _SL(X) ((_sl )(unsigned long)(X)) -#define _UL(X) ((_ul )(unsigned long)(X)) - -#define _PUC(X) ((_uc *)(X)) -#define _PUS(X) ((_us *)(X)) -#define _PSL(X) ((_sl *)(X)) -#define _PUL(X) ((_ul *)(X)) - -#define _B(B) x86_emit_byte((B)) -#define _W(W) x86_emit_word((W)) -#define _L(L) x86_emit_long((L)) -#define _Q(Q) x86_emit_quad((Q)) - -#define _MASK(N) ((unsigned)((1<<(N)))-1) -#define _siP(N,I) (!((((unsigned)(I))^(((unsigned)(I))<<1))&~_MASK(N))) -#define _uiP(N,I) (!(((unsigned)(I))&~_MASK(N))) -#define _suiP(N,I) (_siP(N,I) | _uiP(N,I)) - -#ifndef _ASM_SAFETY -#define _ck_s(W,I) (_UL(I) & _MASK(W)) -#define _ck_u(W,I) (_UL(I) & _MASK(W)) -#define _ck_su(W,I) (_UL(I) & _MASK(W)) -#define _ck_d(W,I) (_UL(I) & _MASK(W)) -#else -#define _ck_s(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "signed integer `"#I"' too large for "#W"-bit field")) -#define _ck_u(W,I) (_uiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0("unsigned integer `"#I"' too large for "#W"-bit field")) -#define _ck_su(W,I) (_suiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "integer `"#I"' too large for "#W"-bit field")) -#define _ck_d(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "displacement `"#I"' too large for "#W"-bit field")) -#endif - -#define _s0P(I) ((I)==0) -#define _s8P(I) _siP(8,I) -#define _s16P(I) _siP(16,I) -#define _u8P(I) _uiP(8,I) -#define _u16P(I) _uiP(16,I) - -#define _su8(I) _ck_su(8,I) -#define _su16(I) _ck_su(16,I) - -#define _s1(I) _ck_s( 1,I) -#define _s2(I) _ck_s( 2,I) -#define _s3(I) _ck_s( 3,I) -#define _s4(I) _ck_s( 4,I) -#define _s5(I) _ck_s( 5,I) -#define _s6(I) _ck_s( 6,I) -#define _s7(I) _ck_s( 7,I) -#define _s8(I) _ck_s( 8,I) -#define _s9(I) _ck_s( 9,I) -#define _s10(I) _ck_s(10,I) -#define _s11(I) _ck_s(11,I) -#define _s12(I) _ck_s(12,I) -#define _s13(I) _ck_s(13,I) -#define _s14(I) _ck_s(14,I) -#define _s15(I) _ck_s(15,I) -#define _s16(I) _ck_s(16,I) -#define _s17(I) _ck_s(17,I) -#define _s18(I) _ck_s(18,I) -#define _s19(I) _ck_s(19,I) -#define _s20(I) _ck_s(20,I) -#define _s21(I) _ck_s(21,I) -#define _s22(I) _ck_s(22,I) -#define _s23(I) _ck_s(23,I) -#define _s24(I) _ck_s(24,I) -#define _s25(I) _ck_s(25,I) -#define _s26(I) _ck_s(26,I) -#define _s27(I) _ck_s(27,I) -#define _s28(I) _ck_s(28,I) -#define _s29(I) _ck_s(29,I) -#define _s30(I) _ck_s(30,I) -#define _s31(I) _ck_s(31,I) -#define _u1(I) _ck_u( 1,I) -#define _u2(I) _ck_u( 2,I) -#define _u3(I) _ck_u( 3,I) -#define _u4(I) _ck_u( 4,I) -#define _u5(I) _ck_u( 5,I) -#define _u6(I) _ck_u( 6,I) -#define _u7(I) _ck_u( 7,I) -#define _u8(I) _ck_u( 8,I) -#define _u9(I) _ck_u( 9,I) -#define _u10(I) _ck_u(10,I) -#define _u11(I) _ck_u(11,I) -#define _u12(I) _ck_u(12,I) -#define _u13(I) _ck_u(13,I) -#define _u14(I) _ck_u(14,I) -#define _u15(I) _ck_u(15,I) -#define _u16(I) _ck_u(16,I) -#define _u17(I) _ck_u(17,I) -#define _u18(I) _ck_u(18,I) -#define _u19(I) _ck_u(19,I) -#define _u20(I) _ck_u(20,I) -#define _u21(I) _ck_u(21,I) -#define _u22(I) _ck_u(22,I) -#define _u23(I) _ck_u(23,I) -#define _u24(I) _ck_u(24,I) -#define _u25(I) _ck_u(25,I) -#define _u26(I) _ck_u(26,I) -#define _u27(I) _ck_u(27,I) -#define _u28(I) _ck_u(28,I) -#define _u29(I) _ck_u(29,I) -#define _u30(I) _ck_u(30,I) -#define _u31(I) _ck_u(31,I) - -/* ========================================================================= */ -/* --- ASSEMBLER ----------------------------------------------------------- */ -/* ========================================================================= */ - -#define _b00 0 -#define _b01 1 -#define _b10 2 -#define _b11 3 - -#define _b000 0 -#define _b001 1 -#define _b010 2 -#define _b011 3 -#define _b100 4 -#define _b101 5 -#define _b110 6 -#define _b111 7 - -#define _OFF4(D) (_UL(D) - _UL(x86_get_target())) -#define _CKD8(D) _ck_d(8, ((_uc) _OFF4(D)) ) - -#define _D8(D) (_B(0), ((*(_PUC(x86_get_target())-1))= _CKD8(D))) -#define _D32(D) (_L(0), ((*(_PUL(x86_get_target())-1))= _OFF4(D))) - -#ifndef _ASM_SAFETY -# define _M(M) (M) -# define _r(R) (R) -# define _m(M) (M) -# define _s(S) (S) -# define _i(I) (I) -# define _b(B) (B) -#else -# define _M(M) (((M)>3) ? x86_emit_failure0("internal error: mod = " #M) : (M)) -# define _r(R) (((R)>7) ? x86_emit_failure0("internal error: reg = " #R) : (R)) -# define _m(M) (((M)>7) ? x86_emit_failure0("internal error: r/m = " #M) : (M)) -# define _s(S) (((S)>3) ? x86_emit_failure0("internal error: memory scale = " #S) : (S)) -# define _i(I) (((I)>7) ? x86_emit_failure0("internal error: memory index = " #I) : (I)) -# define _b(B) (((B)>7) ? x86_emit_failure0("internal error: memory base = " #B) : (B)) -#endif - -#define _Mrm(Md,R,M) _B((_M(Md)<<6)|(_r(R)<<3)|_m(M)) -#define _SIB(Sc,I, B) _B((_s(Sc)<<6)|(_i(I)<<3)|_b(B)) - -#define _SCL(S) ((((S)==1) ? _b00 : \ - (((S)==2) ? _b01 : \ - (((S)==4) ? _b10 : \ - (((S)==8) ? _b11 : x86_emit_failure0("illegal scale: " #S)))))) - - -/* --- Memory subformats - urgh! ------------------------------------------- */ - -/* _r_D() is RIP addressing mode if X86_TARGET_64BIT, use _r_DSIB() instead */ -#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((_sl)(D))) -#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((_sl)(D))) -#define _r_0B( R, B ) (_Mrm(_b00,_rN(R),_rA(B)) ) -#define _r_0BIS(R, B,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)) ) -#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((_sc)(D))) -#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((_sc)(D))) -#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((_sl)(D))) -#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((_sl)(D))) -#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((_sl)(D))) - -#define _r_DB( R, D,B ) ((_s0P(D) && (!_rbp13P(B)) ? _r_0B (R, B ) : (_s8P(D) ? _r_1B( R,D,B ) : _r_4B( R,D,B )))) -#define _r_DBIS(R, D,B,I,S) ((_s0P(D) && (!_rbp13P(B)) ? _r_0BIS(R, B,I,S) : (_s8P(D) ? _r_1BIS(R,D,B,I,S) : _r_4BIS(R,D,B,I,S)))) - -/* Use RIP-addressing in 64-bit mode, if possible */ -#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && \ - ((uintptr)x86_get_target() + 4 + (O) - (D) <= 0xffffffff)) - -#define _r_X( R, D,B,I,S,O) (_r0P(I) ? (_r0P(B) ? (!X86_TARGET_64BIT ? _r_D(R,D) : \ - (_x86_RIP_addressing_possible(D, O) ? \ - _r_D(R, (D) - ((uintptr)x86_get_target() + 4 + (O))) : \ - _r_DSIB(R,D))) : \ - (_rIP(B) ? _r_D (R,D ) : \ - (_rsp12P(B) ? _r_DBIS(R,D,_rSP(),_rSP(),1) : \ - _r_DB (R,D, B )))) : \ - (_r0P(B) ? _r_4IS (R,D, I,S) : \ - (!_rspP(I) ? _r_DBIS(R,D, B, I,S) : \ - x86_emit_failure("illegal index register: %esp")))) - - -/* --- Instruction formats ------------------------------------------------- */ - -#define _m32only(X) (! X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 64-bit mode")) -#define _m64only(X) ( X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 32-bit mode")) -#define _m64(X) ( X86_TARGET_64BIT ? X : ((void)0) ) - -/* _format Opcd ModR/M dN(rB,rI,Sc) imm... */ - -#define _d16() ( _B(0x66 ) ) -#define _O( OP ) ( _B( OP ) ) -#define _Or( OP,R ) ( _B( (OP)|_r(R)) ) -#define _OO( OP ) ( _B((OP)>>8), _B(( (OP) )&0xff) ) -#define _OOr( OP,R ) ( _B((OP)>>8), _B(( (OP)|_r(R))&0xff) ) -#define _Os( OP,B ) ( _s8P(B) ? _B(((OP)|_b10)) : _B(OP) ) -#define _sW( W ) ( _s8P(W) ? _B(W):_W(W) ) -#define _sL( L ) ( _s8P(L) ? _B(L):_L(L) ) -#define _sWO( W ) ( _s8P(W) ? 1 : 2 ) -#define _sLO( L ) ( _s8P(L) ? 1 : 4 ) -#define _O_B( OP ,B ) ( _O ( OP ) ,_B(B) ) -#define _O_W( OP ,W ) ( _O ( OP ) ,_W(W) ) -#define _O_L( OP ,L ) ( _O ( OP ) ,_L(L) ) -#define _OO_L( OP ,L ) ( _OO ( OP ) ,_L(L) ) -#define _O_D8( OP ,D ) ( _O ( OP ) ,_D8(D) ) -#define _O_D32( OP ,D ) ( _O ( OP ) ,_D32(D) ) -#define _OO_D32( OP ,D ) ( _OO ( OP ) ,_D32(D) ) -#define _Os_sW( OP ,W ) ( _Os ( OP,W) ,_sW(W) ) -#define _Os_sL( OP ,L ) ( _Os ( OP,L) ,_sL(L) ) -#define _O_W_B( OP ,W,B) ( _O ( OP ) ,_W(W),_B(B)) -#define _Or_B( OP,R ,B ) ( _Or ( OP,R) ,_B(B) ) -#define _Or_W( OP,R ,W ) ( _Or ( OP,R) ,_W(W) ) -#define _Or_L( OP,R ,L ) ( _Or ( OP,R) ,_L(L) ) -#define _Or_Q( OP,R ,Q ) ( _Or ( OP,R) ,_Q(Q) ) -#define _O_Mrm( OP ,MO,R,M ) ( _O ( OP ),_Mrm(MO,R,M ) ) -#define _OO_Mrm( OP ,MO,R,M ) ( _OO ( OP ),_Mrm(MO,R,M ) ) -#define _O_Mrm_B( OP ,MO,R,M ,B ) ( _O ( OP ),_Mrm(MO,R,M ) ,_B(B) ) -#define _O_Mrm_W( OP ,MO,R,M ,W ) ( _O ( OP ),_Mrm(MO,R,M ) ,_W(W) ) -#define _O_Mrm_L( OP ,MO,R,M ,L ) ( _O ( OP ),_Mrm(MO,R,M ) ,_L(L) ) -#define _OO_Mrm_B( OP ,MO,R,M ,B ) ( _OO ( OP ),_Mrm(MO,R,M ) ,_B(B) ) -#define _Os_Mrm_sW(OP ,MO,R,M ,W ) ( _Os ( OP,W),_Mrm(MO,R,M ),_sW(W) ) -#define _Os_Mrm_sL(OP ,MO,R,M ,L ) ( _Os ( OP,L),_Mrm(MO,R,M ),_sL(L) ) -#define _O_r_X( OP ,R ,MD,MB,MI,MS ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) -#define _OO_r_X( OP ,R ,MD,MB,MI,MS ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) -#define _O_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) -#define _O_r_X_W( OP ,R ,MD,MB,MI,MS,W ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,2) ,_W(W) ) -#define _O_r_X_L( OP ,R ,MD,MB,MI,MS,L ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,4) ,_L(L) ) -#define _OO_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) -#define _Os_r_X_sW(OP ,R ,MD,MB,MI,MS,W ) ( _Os ( OP,W),_r_X( R ,MD,MB,MI,MS,_sWO(W)),_sW(W)) -#define _Os_r_X_sL(OP ,R ,MD,MB,MI,MS,L ) ( _Os ( OP,L),_r_X( R ,MD,MB,MI,MS,_sLO(L)),_sL(L)) -#define _O_X_B( OP ,MD,MB,MI,MS,B ) ( _O_r_X_B( OP ,0 ,MD,MB,MI,MS ,B) ) -#define _O_X_W( OP ,MD,MB,MI,MS,W ) ( _O_r_X_W( OP ,0 ,MD,MB,MI,MS ,W) ) -#define _O_X_L( OP ,MD,MB,MI,MS,L ) ( _O_r_X_L( OP ,0 ,MD,MB,MI,MS ,L) ) - - -/* --- REX prefixes -------------------------------------------------------- */ - -#define _VOID() ((void)0) -#define _BIT(X) ((X) ? 1 : 0) -#define _d64(W,R,X,B) (_B(0x40|(W)<<3|(R)<<2|(X)<<1|(B))) - -#define __REXwrxb(L,W,R,X,B) ((W|R|X|B) || (L) ? _d64(W,R,X,B) : _VOID()) -#define __REXwrx_(L,W,R,X,MR) (__REXwrxb(L,W,R,X,_BIT(_rIP(MR)?0:_rXP(MR)))) -#define __REXw_x_(L,W,R,X,MR) (__REXwrx_(L,W,_BIT(_rXP(R)),X,MR)) -#define __REX_reg(RR) (__REXwrxb(0,0,0,00,_BIT(_rXP(RR)))) -#define __REX_mem(MB,MI) (__REXwrxb(0,0,0,_BIT(_rXP(MI)),_BIT(_rXP(MB)))) - -// FIXME: can't mix new (SPL,BPL,SIL,DIL) with (AH,BH,CH,DH) -#define _REXBrr(RR,MR) _m64(__REXw_x_(_r1e8lP(RR)||_r1e8lP(MR),0,RR,0,MR)) -#define _REXBmr(MB,MI,RD) _m64(__REXw_x_(_r1e8lP(RD)||_r1e8lP(MB),0,RD,_BIT(_rXP(MI)),MB)) -#define _REXBrm(RS,MB,MI) _REXBmr(MB,MI,RS) - -#define _REXBLrr(RR,MR) _m64(__REXw_x_(_r1e8lP(MR),0,RR,0,MR)) -#define _REXLrr(RR,MR) _m64(__REXw_x_(0,0,RR,0,MR)) -#define _REXLmr(MB,MI,RD) _m64(__REXw_x_(0,0,RD,_BIT(_rXP(MI)),MB)) -#define _REXLrm(RS,MB,MI) _REXLmr(MB,MI,RS) -#define _REXLr(RR) _m64(__REX_reg(RR)) -#define _REXLm(MB,MI) _m64(__REX_mem(MB,MI)) - -#define _REXQrr(RR,MR) _m64only(__REXw_x_(0,1,RR,0,MR)) -#define _REXQmr(MB,MI,RD) _m64only(__REXw_x_(0,1,RD,_BIT(_rXP(MI)),MB)) -#define _REXQrm(RS,MB,MI) _REXQmr(MB,MI,RS) -#define _REXQr(RR) _m64only(__REX_reg(RR)) -#define _REXQm(MB,MI) _m64only(__REX_mem(MB,MI)) - - -/* ========================================================================= */ -/* --- Fully-qualified intrinsic instructions ------------------------------ */ -/* ========================================================================= */ - -/* OPCODE + i = immediate operand - * + r = register operand - * + m = memory operand (disp,base,index,scale) - * + sr/sm = a star preceding a register or memory - * + 0 = top of stack register (for FPU instructions) - * - * NOTE in x86-64 mode: a memory operand with only a valid - * displacement value will lead to the expect absolute mode. If - * RIP addressing is necessary, X86_RIP shall be used as the base - * register argument. - */ - -/* --- ALU instructions ---------------------------------------------------- */ - -enum { - X86_ADD = 0, - X86_OR = 1, - X86_ADC = 2, - X86_SBB = 3, - X86_AND = 4, - X86_SUB = 5, - X86_XOR = 6, - X86_CMP = 7, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define _ALUBrr(OP,RS, RD) (_REXBrr(RS, RD), _O_Mrm (((OP) << 3) ,_b11,_r1(RS),_r1(RD) )) -#define _ALUBmr(OP, MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (((OP) << 3) + 2 ,_r1(RD) ,MD,MB,MI,MS )) -#define _ALUBrm(OP, RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (((OP) << 3) ,_r1(RS) ,MD,MB,MI,MS )) -#define _ALUBir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ - (_REXBrr(0, RD), _O_B (((OP) << 3) + 4 ,_su8(IM))) : \ - (_REXBrr(0, RD), _O_Mrm_B (0x80 ,_b11,OP ,_r1(RD) ,_su8(IM))) ) -#define _ALUBim(OP, IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0x80 ,OP ,MD,MB,MI,MS ,_su8(IM))) - -#define _ALUWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r2(RS),_r2(RD) )) -#define _ALUWmr(OP, MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r2(RD) ,MD,MB,MI,MS )) -#define _ALUWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r2(RS) ,MD,MB,MI,MS )) -#define _ALUWir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ - (_d16(), _REXLrr(0, RD), _O_W (((OP) << 3) + 5 ,_su16(IM))) : \ - (_d16(), _REXLrr(0, RD), _Os_Mrm_sW (0x81 ,_b11,OP ,_r2(RD) ,_su16(IM))) ) -#define _ALUWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _Os_r_X_sW (0x81 ,OP ,MD,MB,MI,MS ,_su16(IM))) - -#define _ALULrr(OP, RS, RD) (_REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r4(RS),_r4(RD) )) -#define _ALULmr(OP, MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r4(RD) ,MD,MB,MI,MS )) -#define _ALULrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r4(RS) ,MD,MB,MI,MS )) -#define _ALULir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ - (_REXLrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ - (_REXLrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r4(RD) ,IM )) ) -#define _ALULim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) - -#define _ALUQrr(OP, RS, RD) (_REXQrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r8(RS),_r8(RD) )) -#define _ALUQmr(OP, MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r8(RD) ,MD,MB,MI,MS )) -#define _ALUQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r8(RS) ,MD,MB,MI,MS )) -#define _ALUQir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ - (_REXQrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ - (_REXQrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r8(RD) ,IM )) ) -#define _ALUQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) - -#define ADCBrr(RS, RD) _ALUBrr(X86_ADC, RS, RD) -#define ADCBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADC, MD, MB, MI, MS, RD) -#define ADCBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADC, RS, MD, MB, MI, MS) -#define ADCBir(IM, RD) _ALUBir(X86_ADC, IM, RD) -#define ADCBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADC, IM, MD, MB, MI, MS) - -#define ADCWrr(RS, RD) _ALUWrr(X86_ADC, RS, RD) -#define ADCWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADC, MD, MB, MI, MS, RD) -#define ADCWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADC, RS, MD, MB, MI, MS) -#define ADCWir(IM, RD) _ALUWir(X86_ADC, IM, RD) -#define ADCWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADC, IM, MD, MB, MI, MS) - -#define ADCLrr(RS, RD) _ALULrr(X86_ADC, RS, RD) -#define ADCLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADC, MD, MB, MI, MS, RD) -#define ADCLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADC, RS, MD, MB, MI, MS) -#define ADCLir(IM, RD) _ALULir(X86_ADC, IM, RD) -#define ADCLim(IM, MD, MB, MI, MS) _ALULim(X86_ADC, IM, MD, MB, MI, MS) - -#define ADCQrr(RS, RD) _ALUQrr(X86_ADC, RS, RD) -#define ADCQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADC, MD, MB, MI, MS, RD) -#define ADCQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADC, RS, MD, MB, MI, MS) -#define ADCQir(IM, RD) _ALUQir(X86_ADC, IM, RD) -#define ADCQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADC, IM, MD, MB, MI, MS) - -#define ADDBrr(RS, RD) _ALUBrr(X86_ADD, RS, RD) -#define ADDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADD, MD, MB, MI, MS, RD) -#define ADDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADD, RS, MD, MB, MI, MS) -#define ADDBir(IM, RD) _ALUBir(X86_ADD, IM, RD) -#define ADDBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADD, IM, MD, MB, MI, MS) - -#define ADDWrr(RS, RD) _ALUWrr(X86_ADD, RS, RD) -#define ADDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADD, MD, MB, MI, MS, RD) -#define ADDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADD, RS, MD, MB, MI, MS) -#define ADDWir(IM, RD) _ALUWir(X86_ADD, IM, RD) -#define ADDWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADD, IM, MD, MB, MI, MS) - -#define ADDLrr(RS, RD) _ALULrr(X86_ADD, RS, RD) -#define ADDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADD, MD, MB, MI, MS, RD) -#define ADDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADD, RS, MD, MB, MI, MS) -#define ADDLir(IM, RD) _ALULir(X86_ADD, IM, RD) -#define ADDLim(IM, MD, MB, MI, MS) _ALULim(X86_ADD, IM, MD, MB, MI, MS) - -#define ADDQrr(RS, RD) _ALUQrr(X86_ADD, RS, RD) -#define ADDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADD, MD, MB, MI, MS, RD) -#define ADDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADD, RS, MD, MB, MI, MS) -#define ADDQir(IM, RD) _ALUQir(X86_ADD, IM, RD) -#define ADDQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADD, IM, MD, MB, MI, MS) - -#define ANDBrr(RS, RD) _ALUBrr(X86_AND, RS, RD) -#define ANDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_AND, MD, MB, MI, MS, RD) -#define ANDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_AND, RS, MD, MB, MI, MS) -#define ANDBir(IM, RD) _ALUBir(X86_AND, IM, RD) -#define ANDBim(IM, MD, MB, MI, MS) _ALUBim(X86_AND, IM, MD, MB, MI, MS) - -#define ANDWrr(RS, RD) _ALUWrr(X86_AND, RS, RD) -#define ANDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_AND, MD, MB, MI, MS, RD) -#define ANDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_AND, RS, MD, MB, MI, MS) -#define ANDWir(IM, RD) _ALUWir(X86_AND, IM, RD) -#define ANDWim(IM, MD, MB, MI, MS) _ALUWim(X86_AND, IM, MD, MB, MI, MS) - -#define ANDLrr(RS, RD) _ALULrr(X86_AND, RS, RD) -#define ANDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_AND, MD, MB, MI, MS, RD) -#define ANDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_AND, RS, MD, MB, MI, MS) -#define ANDLir(IM, RD) _ALULir(X86_AND, IM, RD) -#define ANDLim(IM, MD, MB, MI, MS) _ALULim(X86_AND, IM, MD, MB, MI, MS) - -#define ANDQrr(RS, RD) _ALUQrr(X86_AND, RS, RD) -#define ANDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_AND, MD, MB, MI, MS, RD) -#define ANDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_AND, RS, MD, MB, MI, MS) -#define ANDQir(IM, RD) _ALUQir(X86_AND, IM, RD) -#define ANDQim(IM, MD, MB, MI, MS) _ALUQim(X86_AND, IM, MD, MB, MI, MS) - -#define CMPBrr(RS, RD) _ALUBrr(X86_CMP, RS, RD) -#define CMPBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_CMP, MD, MB, MI, MS, RD) -#define CMPBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_CMP, RS, MD, MB, MI, MS) -#define CMPBir(IM, RD) _ALUBir(X86_CMP, IM, RD) -#define CMPBim(IM, MD, MB, MI, MS) _ALUBim(X86_CMP, IM, MD, MB, MI, MS) - -#define CMPWrr(RS, RD) _ALUWrr(X86_CMP, RS, RD) -#define CMPWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_CMP, MD, MB, MI, MS, RD) -#define CMPWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_CMP, RS, MD, MB, MI, MS) -#define CMPWir(IM, RD) _ALUWir(X86_CMP, IM, RD) -#define CMPWim(IM, MD, MB, MI, MS) _ALUWim(X86_CMP, IM, MD, MB, MI, MS) - -#define CMPLrr(RS, RD) _ALULrr(X86_CMP, RS, RD) -#define CMPLmr(MD, MB, MI, MS, RD) _ALULmr(X86_CMP, MD, MB, MI, MS, RD) -#define CMPLrm(RS, MD, MB, MI, MS) _ALULrm(X86_CMP, RS, MD, MB, MI, MS) -#define CMPLir(IM, RD) _ALULir(X86_CMP, IM, RD) -#define CMPLim(IM, MD, MB, MI, MS) _ALULim(X86_CMP, IM, MD, MB, MI, MS) - -#define CMPQrr(RS, RD) _ALUQrr(X86_CMP, RS, RD) -#define CMPQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_CMP, MD, MB, MI, MS, RD) -#define CMPQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_CMP, RS, MD, MB, MI, MS) -#define CMPQir(IM, RD) _ALUQir(X86_CMP, IM, RD) -#define CMPQim(IM, MD, MB, MI, MS) _ALUQim(X86_CMP, IM, MD, MB, MI, MS) - -#define ORBrr(RS, RD) _ALUBrr(X86_OR, RS, RD) -#define ORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_OR, MD, MB, MI, MS, RD) -#define ORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_OR, RS, MD, MB, MI, MS) -#define ORBir(IM, RD) _ALUBir(X86_OR, IM, RD) -#define ORBim(IM, MD, MB, MI, MS) _ALUBim(X86_OR, IM, MD, MB, MI, MS) - -#define ORWrr(RS, RD) _ALUWrr(X86_OR, RS, RD) -#define ORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_OR, MD, MB, MI, MS, RD) -#define ORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_OR, RS, MD, MB, MI, MS) -#define ORWir(IM, RD) _ALUWir(X86_OR, IM, RD) -#define ORWim(IM, MD, MB, MI, MS) _ALUWim(X86_OR, IM, MD, MB, MI, MS) - -#define ORLrr(RS, RD) _ALULrr(X86_OR, RS, RD) -#define ORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_OR, MD, MB, MI, MS, RD) -#define ORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_OR, RS, MD, MB, MI, MS) -#define ORLir(IM, RD) _ALULir(X86_OR, IM, RD) -#define ORLim(IM, MD, MB, MI, MS) _ALULim(X86_OR, IM, MD, MB, MI, MS) - -#define ORQrr(RS, RD) _ALUQrr(X86_OR, RS, RD) -#define ORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_OR, MD, MB, MI, MS, RD) -#define ORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_OR, RS, MD, MB, MI, MS) -#define ORQir(IM, RD) _ALUQir(X86_OR, IM, RD) -#define ORQim(IM, MD, MB, MI, MS) _ALUQim(X86_OR, IM, MD, MB, MI, MS) - -#define SBBBrr(RS, RD) _ALUBrr(X86_SBB, RS, RD) -#define SBBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SBB, MD, MB, MI, MS, RD) -#define SBBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SBB, RS, MD, MB, MI, MS) -#define SBBBir(IM, RD) _ALUBir(X86_SBB, IM, RD) -#define SBBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SBB, IM, MD, MB, MI, MS) - -#define SBBWrr(RS, RD) _ALUWrr(X86_SBB, RS, RD) -#define SBBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SBB, MD, MB, MI, MS, RD) -#define SBBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SBB, RS, MD, MB, MI, MS) -#define SBBWir(IM, RD) _ALUWir(X86_SBB, IM, RD) -#define SBBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SBB, IM, MD, MB, MI, MS) - -#define SBBLrr(RS, RD) _ALULrr(X86_SBB, RS, RD) -#define SBBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SBB, MD, MB, MI, MS, RD) -#define SBBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SBB, RS, MD, MB, MI, MS) -#define SBBLir(IM, RD) _ALULir(X86_SBB, IM, RD) -#define SBBLim(IM, MD, MB, MI, MS) _ALULim(X86_SBB, IM, MD, MB, MI, MS) - -#define SBBQrr(RS, RD) _ALUQrr(X86_SBB, RS, RD) -#define SBBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SBB, MD, MB, MI, MS, RD) -#define SBBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SBB, RS, MD, MB, MI, MS) -#define SBBQir(IM, RD) _ALUQir(X86_SBB, IM, RD) -#define SBBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SBB, IM, MD, MB, MI, MS) - -#define SUBBrr(RS, RD) _ALUBrr(X86_SUB, RS, RD) -#define SUBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SUB, MD, MB, MI, MS, RD) -#define SUBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SUB, RS, MD, MB, MI, MS) -#define SUBBir(IM, RD) _ALUBir(X86_SUB, IM, RD) -#define SUBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SUB, IM, MD, MB, MI, MS) - -#define SUBWrr(RS, RD) _ALUWrr(X86_SUB, RS, RD) -#define SUBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SUB, MD, MB, MI, MS, RD) -#define SUBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SUB, RS, MD, MB, MI, MS) -#define SUBWir(IM, RD) _ALUWir(X86_SUB, IM, RD) -#define SUBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SUB, IM, MD, MB, MI, MS) - -#define SUBLrr(RS, RD) _ALULrr(X86_SUB, RS, RD) -#define SUBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SUB, MD, MB, MI, MS, RD) -#define SUBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SUB, RS, MD, MB, MI, MS) -#define SUBLir(IM, RD) _ALULir(X86_SUB, IM, RD) -#define SUBLim(IM, MD, MB, MI, MS) _ALULim(X86_SUB, IM, MD, MB, MI, MS) - -#define SUBQrr(RS, RD) _ALUQrr(X86_SUB, RS, RD) -#define SUBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SUB, MD, MB, MI, MS, RD) -#define SUBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SUB, RS, MD, MB, MI, MS) -#define SUBQir(IM, RD) _ALUQir(X86_SUB, IM, RD) -#define SUBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SUB, IM, MD, MB, MI, MS) - -#define XORBrr(RS, RD) _ALUBrr(X86_XOR, RS, RD) -#define XORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_XOR, MD, MB, MI, MS, RD) -#define XORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_XOR, RS, MD, MB, MI, MS) -#define XORBir(IM, RD) _ALUBir(X86_XOR, IM, RD) -#define XORBim(IM, MD, MB, MI, MS) _ALUBim(X86_XOR, IM, MD, MB, MI, MS) - -#define XORWrr(RS, RD) _ALUWrr(X86_XOR, RS, RD) -#define XORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_XOR, MD, MB, MI, MS, RD) -#define XORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_XOR, RS, MD, MB, MI, MS) -#define XORWir(IM, RD) _ALUWir(X86_XOR, IM, RD) -#define XORWim(IM, MD, MB, MI, MS) _ALUWim(X86_XOR, IM, MD, MB, MI, MS) - -#define XORLrr(RS, RD) _ALULrr(X86_XOR, RS, RD) -#define XORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_XOR, MD, MB, MI, MS, RD) -#define XORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_XOR, RS, MD, MB, MI, MS) -#define XORLir(IM, RD) _ALULir(X86_XOR, IM, RD) -#define XORLim(IM, MD, MB, MI, MS) _ALULim(X86_XOR, IM, MD, MB, MI, MS) - -#define XORQrr(RS, RD) _ALUQrr(X86_XOR, RS, RD) -#define XORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_XOR, MD, MB, MI, MS, RD) -#define XORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_XOR, RS, MD, MB, MI, MS) -#define XORQir(IM, RD) _ALUQir(X86_XOR, IM, RD) -#define XORQim(IM, MD, MB, MI, MS) _ALUQim(X86_XOR, IM, MD, MB, MI, MS) - - -/* --- Shift/Rotate instructions ------------------------------------------- */ - -enum { - X86_ROL = 0, - X86_ROR = 1, - X86_RCL = 2, - X86_RCR = 3, - X86_SHL = 4, - X86_SHR = 5, - X86_SAR = 7, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define _ROTSHIBir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXBrr(0, RD), _O_Mrm (0xd0 ,_b11,OP,_r1(RD) )) : \ - (_REXBrr(0, RD), _O_Mrm_B (0xc0 ,_b11,OP,_r1(RD) ,_u8(IM))) ) -#define _ROTSHIBim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXBrm(0, MB, MI), _O_r_X (0xd0 ,OP ,MD,MB,MI,MS )) : \ - (_REXBrm(0, MB, MI), _O_r_X_B (0xc0 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) -#define _ROTSHIBrr(OP,RS,RD) (((RS) == X86_CL) ? \ - (_REXBrr(RS, RD), _O_Mrm (0xd2 ,_b11,OP,_r1(RD) )) : \ - x86_emit_failure("source register must be CL" ) ) -#define _ROTSHIBrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ - (_REXBrm(RS, MB, MI), _O_r_X (0xd2 ,OP ,MD,MB,MI,MS )) : \ - x86_emit_failure("source register must be CL" ) ) - -#define _ROTSHIWir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_d16(), _REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r2(RD) )) : \ - (_d16(), _REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r2(RD) ,_u8(IM))) ) -#define _ROTSHIWim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ - (_d16(), _REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) -#define _ROTSHIWrr(OP,RS,RD) (((RS) == X86_CL) ? \ - (_d16(), _REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r2(RD) )) : \ - x86_emit_failure("source register must be CL" ) ) -#define _ROTSHIWrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ - (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ - x86_emit_failure("source register must be CL" ) ) - -#define _ROTSHILir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r4(RD) )) : \ - (_REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r4(RD) ,_u8(IM))) ) -#define _ROTSHILim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ - (_REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) -#define _ROTSHILrr(OP,RS,RD) (((RS) == X86_CL) ? \ - (_REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r4(RD) )) : \ - x86_emit_failure("source register must be CL" ) ) -#define _ROTSHILrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ - (_REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ - x86_emit_failure("source register must be CL" ) ) - -#define _ROTSHIQir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXQrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r8(RD) )) : \ - (_REXQrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r8(RD) ,_u8(IM))) ) -#define _ROTSHIQim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ - (_REXQrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ - (_REXQrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) -#define _ROTSHIQrr(OP,RS,RD) (((RS) == X86_CL) ? \ - (_REXQrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r8(RD) )) : \ - x86_emit_failure("source register must be CL" ) ) -#define _ROTSHIQrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ - (_REXQrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ - x86_emit_failure("source register must be CL" ) ) - -#define ROLBir(IM, RD) _ROTSHIBir(X86_ROL, IM, RD) -#define ROLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROL, IM, MD, MB, MI, MS) -#define ROLBrr(RS, RD) _ROTSHIBrr(X86_ROL, RS, RD) -#define ROLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROL, RS, MD, MB, MI, MS) - -#define ROLWir(IM, RD) _ROTSHIWir(X86_ROL, IM, RD) -#define ROLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROL, IM, MD, MB, MI, MS) -#define ROLWrr(RS, RD) _ROTSHIWrr(X86_ROL, RS, RD) -#define ROLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROL, RS, MD, MB, MI, MS) - -#define ROLLir(IM, RD) _ROTSHILir(X86_ROL, IM, RD) -#define ROLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROL, IM, MD, MB, MI, MS) -#define ROLLrr(RS, RD) _ROTSHILrr(X86_ROL, RS, RD) -#define ROLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROL, RS, MD, MB, MI, MS) - -#define ROLQir(IM, RD) _ROTSHIQir(X86_ROL, IM, RD) -#define ROLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROL, IM, MD, MB, MI, MS) -#define ROLQrr(RS, RD) _ROTSHIQrr(X86_ROL, RS, RD) -#define ROLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROL, RS, MD, MB, MI, MS) - -#define RORBir(IM, RD) _ROTSHIBir(X86_ROR, IM, RD) -#define RORBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROR, IM, MD, MB, MI, MS) -#define RORBrr(RS, RD) _ROTSHIBrr(X86_ROR, RS, RD) -#define RORBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROR, RS, MD, MB, MI, MS) - -#define RORWir(IM, RD) _ROTSHIWir(X86_ROR, IM, RD) -#define RORWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROR, IM, MD, MB, MI, MS) -#define RORWrr(RS, RD) _ROTSHIWrr(X86_ROR, RS, RD) -#define RORWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROR, RS, MD, MB, MI, MS) - -#define RORLir(IM, RD) _ROTSHILir(X86_ROR, IM, RD) -#define RORLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROR, IM, MD, MB, MI, MS) -#define RORLrr(RS, RD) _ROTSHILrr(X86_ROR, RS, RD) -#define RORLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROR, RS, MD, MB, MI, MS) - -#define RORQir(IM, RD) _ROTSHIQir(X86_ROR, IM, RD) -#define RORQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROR, IM, MD, MB, MI, MS) -#define RORQrr(RS, RD) _ROTSHIQrr(X86_ROR, RS, RD) -#define RORQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROR, RS, MD, MB, MI, MS) - -#define RCLBir(IM, RD) _ROTSHIBir(X86_RCL, IM, RD) -#define RCLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCL, IM, MD, MB, MI, MS) -#define RCLBrr(RS, RD) _ROTSHIBrr(X86_RCL, RS, RD) -#define RCLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCL, RS, MD, MB, MI, MS) - -#define RCLWir(IM, RD) _ROTSHIWir(X86_RCL, IM, RD) -#define RCLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCL, IM, MD, MB, MI, MS) -#define RCLWrr(RS, RD) _ROTSHIWrr(X86_RCL, RS, RD) -#define RCLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCL, RS, MD, MB, MI, MS) - -#define RCLLir(IM, RD) _ROTSHILir(X86_RCL, IM, RD) -#define RCLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCL, IM, MD, MB, MI, MS) -#define RCLLrr(RS, RD) _ROTSHILrr(X86_RCL, RS, RD) -#define RCLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCL, RS, MD, MB, MI, MS) - -#define RCLQir(IM, RD) _ROTSHIQir(X86_RCL, IM, RD) -#define RCLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCL, IM, MD, MB, MI, MS) -#define RCLQrr(RS, RD) _ROTSHIQrr(X86_RCL, RS, RD) -#define RCLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCL, RS, MD, MB, MI, MS) - -#define RCRBir(IM, RD) _ROTSHIBir(X86_RCR, IM, RD) -#define RCRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCR, IM, MD, MB, MI, MS) -#define RCRBrr(RS, RD) _ROTSHIBrr(X86_RCR, RS, RD) -#define RCRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCR, RS, MD, MB, MI, MS) - -#define RCRWir(IM, RD) _ROTSHIWir(X86_RCR, IM, RD) -#define RCRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCR, IM, MD, MB, MI, MS) -#define RCRWrr(RS, RD) _ROTSHIWrr(X86_RCR, RS, RD) -#define RCRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCR, RS, MD, MB, MI, MS) - -#define RCRLir(IM, RD) _ROTSHILir(X86_RCR, IM, RD) -#define RCRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCR, IM, MD, MB, MI, MS) -#define RCRLrr(RS, RD) _ROTSHILrr(X86_RCR, RS, RD) -#define RCRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCR, RS, MD, MB, MI, MS) - -#define RCRQir(IM, RD) _ROTSHIQir(X86_RCR, IM, RD) -#define RCRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCR, IM, MD, MB, MI, MS) -#define RCRQrr(RS, RD) _ROTSHIQrr(X86_RCR, RS, RD) -#define RCRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCR, RS, MD, MB, MI, MS) - -#define SHLBir(IM, RD) _ROTSHIBir(X86_SHL, IM, RD) -#define SHLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHL, IM, MD, MB, MI, MS) -#define SHLBrr(RS, RD) _ROTSHIBrr(X86_SHL, RS, RD) -#define SHLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHL, RS, MD, MB, MI, MS) - -#define SHLWir(IM, RD) _ROTSHIWir(X86_SHL, IM, RD) -#define SHLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHL, IM, MD, MB, MI, MS) -#define SHLWrr(RS, RD) _ROTSHIWrr(X86_SHL, RS, RD) -#define SHLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHL, RS, MD, MB, MI, MS) - -#define SHLLir(IM, RD) _ROTSHILir(X86_SHL, IM, RD) -#define SHLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHL, IM, MD, MB, MI, MS) -#define SHLLrr(RS, RD) _ROTSHILrr(X86_SHL, RS, RD) -#define SHLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHL, RS, MD, MB, MI, MS) - -#define SHLQir(IM, RD) _ROTSHIQir(X86_SHL, IM, RD) -#define SHLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHL, IM, MD, MB, MI, MS) -#define SHLQrr(RS, RD) _ROTSHIQrr(X86_SHL, RS, RD) -#define SHLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHL, RS, MD, MB, MI, MS) - -#define SHRBir(IM, RD) _ROTSHIBir(X86_SHR, IM, RD) -#define SHRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHR, IM, MD, MB, MI, MS) -#define SHRBrr(RS, RD) _ROTSHIBrr(X86_SHR, RS, RD) -#define SHRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHR, RS, MD, MB, MI, MS) - -#define SHRWir(IM, RD) _ROTSHIWir(X86_SHR, IM, RD) -#define SHRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHR, IM, MD, MB, MI, MS) -#define SHRWrr(RS, RD) _ROTSHIWrr(X86_SHR, RS, RD) -#define SHRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHR, RS, MD, MB, MI, MS) - -#define SHRLir(IM, RD) _ROTSHILir(X86_SHR, IM, RD) -#define SHRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHR, IM, MD, MB, MI, MS) -#define SHRLrr(RS, RD) _ROTSHILrr(X86_SHR, RS, RD) -#define SHRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHR, RS, MD, MB, MI, MS) - -#define SHRQir(IM, RD) _ROTSHIQir(X86_SHR, IM, RD) -#define SHRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHR, IM, MD, MB, MI, MS) -#define SHRQrr(RS, RD) _ROTSHIQrr(X86_SHR, RS, RD) -#define SHRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHR, RS, MD, MB, MI, MS) - -#define SALBir SHLBir -#define SALBim SHLBim -#define SALBrr SHLBrr -#define SALBrm SHLBrm - -#define SALWir SHLWir -#define SALWim SHLWim -#define SALWrr SHLWrr -#define SALWrm SHLWrm - -#define SALLir SHLLir -#define SALLim SHLLim -#define SALLrr SHLLrr -#define SALLrm SHLLrm - -#define SALQir SHLQir -#define SALQim SHLQim -#define SALQrr SHLQrr -#define SALQrm SHLQrm - -#define SARBir(IM, RD) _ROTSHIBir(X86_SAR, IM, RD) -#define SARBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SAR, IM, MD, MB, MI, MS) -#define SARBrr(RS, RD) _ROTSHIBrr(X86_SAR, RS, RD) -#define SARBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SAR, RS, MD, MB, MI, MS) - -#define SARWir(IM, RD) _ROTSHIWir(X86_SAR, IM, RD) -#define SARWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SAR, IM, MD, MB, MI, MS) -#define SARWrr(RS, RD) _ROTSHIWrr(X86_SAR, RS, RD) -#define SARWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SAR, RS, MD, MB, MI, MS) - -#define SARLir(IM, RD) _ROTSHILir(X86_SAR, IM, RD) -#define SARLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SAR, IM, MD, MB, MI, MS) -#define SARLrr(RS, RD) _ROTSHILrr(X86_SAR, RS, RD) -#define SARLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SAR, RS, MD, MB, MI, MS) - -#define SARQir(IM, RD) _ROTSHIQir(X86_SAR, IM, RD) -#define SARQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SAR, IM, MD, MB, MI, MS) -#define SARQrr(RS, RD) _ROTSHIQrr(X86_SAR, RS, RD) -#define SARQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SAR, RS, MD, MB, MI, MS) - - -/* --- Bit test instructions ----------------------------------------------- */ - -enum { - X86_BT = 4, - X86_BTS = 5, - X86_BTR = 6, - X86_BTC = 7, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define _BTWir(OP, IM, RD) (_d16(), _REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r2(RD) ,_u8(IM))) -#define _BTWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) -#define _BTWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r2(RS),_r2(RD) )) -#define _BTWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r2(RS) ,MD,MB,MI,MS )) - -#define _BTLir(OP, IM, RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r4(RD) ,_u8(IM))) -#define _BTLim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) -#define _BTLrr(OP, RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r4(RS),_r4(RD) )) -#define _BTLrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r4(RS) ,MD,MB,MI,MS )) - -#define _BTQir(OP, IM, RD) (_REXQrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r8(RD) ,_u8(IM))) -#define _BTQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) -#define _BTQrr(OP, RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r8(RS),_r8(RD) )) -#define _BTQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r8(RS) ,MD,MB,MI,MS )) - -#define BTWir(IM, RD) _BTWir(X86_BT, IM, RD) -#define BTWim(IM, MD, MB, MI, MS) _BTWim(X86_BT, IM, MD, MB, MI, MS) -#define BTWrr(RS, RD) _BTWrr(X86_BT, RS, RD) -#define BTWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BT, RS, MD, MB, MI, MS) - -#define BTLir(IM, RD) _BTLir(X86_BT, IM, RD) -#define BTLim(IM, MD, MB, MI, MS) _BTLim(X86_BT, IM, MD, MB, MI, MS) -#define BTLrr(RS, RD) _BTLrr(X86_BT, RS, RD) -#define BTLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BT, RS, MD, MB, MI, MS) - -#define BTQir(IM, RD) _BTQir(X86_BT, IM, RD) -#define BTQim(IM, MD, MB, MI, MS) _BTQim(X86_BT, IM, MD, MB, MI, MS) -#define BTQrr(RS, RD) _BTQrr(X86_BT, RS, RD) -#define BTQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BT, RS, MD, MB, MI, MS) - -#define BTCWir(IM, RD) _BTWir(X86_BTC, IM, RD) -#define BTCWim(IM, MD, MB, MI, MS) _BTWim(X86_BTC, IM, MD, MB, MI, MS) -#define BTCWrr(RS, RD) _BTWrr(X86_BTC, RS, RD) -#define BTCWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTC, RS, MD, MB, MI, MS) - -#define BTCLir(IM, RD) _BTLir(X86_BTC, IM, RD) -#define BTCLim(IM, MD, MB, MI, MS) _BTLim(X86_BTC, IM, MD, MB, MI, MS) -#define BTCLrr(RS, RD) _BTLrr(X86_BTC, RS, RD) -#define BTCLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTC, RS, MD, MB, MI, MS) - -#define BTCQir(IM, RD) _BTQir(X86_BTC, IM, RD) -#define BTCQim(IM, MD, MB, MI, MS) _BTQim(X86_BTC, IM, MD, MB, MI, MS) -#define BTCQrr(RS, RD) _BTQrr(X86_BTC, RS, RD) -#define BTCQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTC, RS, MD, MB, MI, MS) - -#define BTRWir(IM, RD) _BTWir(X86_BTR, IM, RD) -#define BTRWim(IM, MD, MB, MI, MS) _BTWim(X86_BTR, IM, MD, MB, MI, MS) -#define BTRWrr(RS, RD) _BTWrr(X86_BTR, RS, RD) -#define BTRWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTR, RS, MD, MB, MI, MS) - -#define BTRLir(IM, RD) _BTLir(X86_BTR, IM, RD) -#define BTRLim(IM, MD, MB, MI, MS) _BTLim(X86_BTR, IM, MD, MB, MI, MS) -#define BTRLrr(RS, RD) _BTLrr(X86_BTR, RS, RD) -#define BTRLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTR, RS, MD, MB, MI, MS) - -#define BTRQir(IM, RD) _BTQir(X86_BTR, IM, RD) -#define BTRQim(IM, MD, MB, MI, MS) _BTQim(X86_BTR, IM, MD, MB, MI, MS) -#define BTRQrr(RS, RD) _BTQrr(X86_BTR, RS, RD) -#define BTRQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTR, RS, MD, MB, MI, MS) - -#define BTSWir(IM, RD) _BTWir(X86_BTS, IM, RD) -#define BTSWim(IM, MD, MB, MI, MS) _BTWim(X86_BTS, IM, MD, MB, MI, MS) -#define BTSWrr(RS, RD) _BTWrr(X86_BTS, RS, RD) -#define BTSWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTS, RS, MD, MB, MI, MS) - -#define BTSLir(IM, RD) _BTLir(X86_BTS, IM, RD) -#define BTSLim(IM, MD, MB, MI, MS) _BTLim(X86_BTS, IM, MD, MB, MI, MS) -#define BTSLrr(RS, RD) _BTLrr(X86_BTS, RS, RD) -#define BTSLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTS, RS, MD, MB, MI, MS) - -#define BTSQir(IM, RD) _BTQir(X86_BTS, IM, RD) -#define BTSQim(IM, MD, MB, MI, MS) _BTQim(X86_BTS, IM, MD, MB, MI, MS) -#define BTSQrr(RS, RD) _BTQrr(X86_BTS, RS, RD) -#define BTSQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTS, RS, MD, MB, MI, MS) - - -/* --- Move instructions --------------------------------------------------- */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define MOVBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x88 ,_b11,_r1(RS),_r1(RD) )) -#define MOVBmr(MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (0x8a ,_r1(RD) ,MD,MB,MI,MS )) -#define MOVBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x88 ,_r1(RS) ,MD,MB,MI,MS )) -#define MOVBir(IM, R) (_REXBrr(0, R), _Or_B (0xb0,_r1(R) ,_su8(IM))) -#define MOVBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_X_B (0xc6 ,MD,MB,MI,MS ,_su8(IM))) - -#define MOVWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r2(RS),_r2(RD) )) -#define MOVWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r2(RD) ,MD,MB,MI,MS )) -#define MOVWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r2(RS) ,MD,MB,MI,MS )) -#define MOVWir(IM, R) (_d16(), _REXLrr(0, R), _Or_W (0xb8,_r2(R) ,_su16(IM))) -#define MOVWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_X_W (0xc7 ,MD,MB,MI,MS ,_su16(IM))) - -#define MOVLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r4(RS),_r4(RD) )) -#define MOVLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r4(RD) ,MD,MB,MI,MS )) -#define MOVLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r4(RS) ,MD,MB,MI,MS )) -#define MOVLir(IM, R) (_REXLrr(0, R), _Or_L (0xb8,_r4(R) ,IM )) -#define MOVLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) - -#define MOVQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x89 ,_b11,_r8(RS),_r8(RD) )) -#define MOVQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8b ,_r8(RD) ,MD,MB,MI,MS )) -#define MOVQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x89 ,_r8(RS) ,MD,MB,MI,MS )) -#define MOVQir(IM, R) (_REXQrr(0, R), _Or_Q (0xb8,_r8(R) ,IM )) -#define MOVQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) - - -/* --- Unary and Multiply/Divide instructions ------------------------------ */ - -enum { - X86_NOT = 2, - X86_NEG = 3, - X86_MUL = 4, - X86_IMUL = 5, - X86_DIV = 6, - X86_IDIV = 7, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define _UNARYBr(OP, RS) (_REXBrr(0, RS), _O_Mrm (0xf6 ,_b11,OP ,_r1(RS) )) -#define _UNARYBm(OP, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xf6 ,OP ,MD,MB,MI,MS )) -#define _UNARYWr(OP, RS) (_d16(), _REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r2(RS) )) -#define _UNARYWm(OP, MD, MB, MI, MS) (_d16(), _REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) -#define _UNARYLr(OP, RS) (_REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r4(RS) )) -#define _UNARYLm(OP, MD, MB, MI, MS) (_REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) -#define _UNARYQr(OP, RS) (_REXQrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r8(RS) )) -#define _UNARYQm(OP, MD, MB, MI, MS) (_REXQmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) - -#define NOTBr(RS) _UNARYBr(X86_NOT, RS) -#define NOTBm(MD, MB, MI, MS) _UNARYBm(X86_NOT, MD, MB, MI, MS) -#define NOTWr(RS) _UNARYWr(X86_NOT, RS) -#define NOTWm(MD, MB, MI, MS) _UNARYWm(X86_NOT, MD, MB, MI, MS) -#define NOTLr(RS) _UNARYLr(X86_NOT, RS) -#define NOTLm(MD, MB, MI, MS) _UNARYLm(X86_NOT, MD, MB, MI, MS) -#define NOTQr(RS) _UNARYQr(X86_NOT, RS) -#define NOTQm(MD, MB, MI, MS) _UNARYQm(X86_NOT, MD, MB, MI, MS) - -#define NEGBr(RS) _UNARYBr(X86_NEG, RS) -#define NEGBm(MD, MB, MI, MS) _UNARYBm(X86_NEG, MD, MB, MI, MS) -#define NEGWr(RS) _UNARYWr(X86_NEG, RS) -#define NEGWm(MD, MB, MI, MS) _UNARYWm(X86_NEG, MD, MB, MI, MS) -#define NEGLr(RS) _UNARYLr(X86_NEG, RS) -#define NEGLm(MD, MB, MI, MS) _UNARYLm(X86_NEG, MD, MB, MI, MS) -#define NEGQr(RS) _UNARYQr(X86_NEG, RS) -#define NEGQm(MD, MB, MI, MS) _UNARYQm(X86_NEG, MD, MB, MI, MS) - -#define MULBr(RS) _UNARYBr(X86_MUL, RS) -#define MULBm(MD, MB, MI, MS) _UNARYBm(X86_MUL, MD, MB, MI, MS) -#define MULWr(RS) _UNARYWr(X86_MUL, RS) -#define MULWm(MD, MB, MI, MS) _UNARYWm(X86_MUL, MD, MB, MI, MS) -#define MULLr(RS) _UNARYLr(X86_MUL, RS) -#define MULLm(MD, MB, MI, MS) _UNARYLm(X86_MUL, MD, MB, MI, MS) -#define MULQr(RS) _UNARYQr(X86_MUL, RS) -#define MULQm(MD, MB, MI, MS) _UNARYQm(X86_MUL, MD, MB, MI, MS) - -#define IMULBr(RS) _UNARYBr(X86_IMUL, RS) -#define IMULBm(MD, MB, MI, MS) _UNARYBm(X86_IMUL, MD, MB, MI, MS) -#define IMULWr(RS) _UNARYWr(X86_IMUL, RS) -#define IMULWm(MD, MB, MI, MS) _UNARYWm(X86_IMUL, MD, MB, MI, MS) -#define IMULLr(RS) _UNARYLr(X86_IMUL, RS) -#define IMULLm(MD, MB, MI, MS) _UNARYLm(X86_IMUL, MD, MB, MI, MS) -#define IMULQr(RS) _UNARYQr(X86_IMUL, RS) -#define IMULQm(MD, MB, MI, MS) _UNARYQm(X86_IMUL, MD, MB, MI, MS) - -#define DIVBr(RS) _UNARYBr(X86_DIV, RS) -#define DIVBm(MD, MB, MI, MS) _UNARYBm(X86_DIV, MD, MB, MI, MS) -#define DIVWr(RS) _UNARYWr(X86_DIV, RS) -#define DIVWm(MD, MB, MI, MS) _UNARYWm(X86_DIV, MD, MB, MI, MS) -#define DIVLr(RS) _UNARYLr(X86_DIV, RS) -#define DIVLm(MD, MB, MI, MS) _UNARYLm(X86_DIV, MD, MB, MI, MS) -#define DIVQr(RS) _UNARYQr(X86_DIV, RS) -#define DIVQm(MD, MB, MI, MS) _UNARYQm(X86_DIV, MD, MB, MI, MS) - -#define IDIVBr(RS) _UNARYBr(X86_IDIV, RS) -#define IDIVBm(MD, MB, MI, MS) _UNARYBm(X86_IDIV, MD, MB, MI, MS) -#define IDIVWr(RS) _UNARYWr(X86_IDIV, RS) -#define IDIVWm(MD, MB, MI, MS) _UNARYWm(X86_IDIV, MD, MB, MI, MS) -#define IDIVLr(RS) _UNARYLr(X86_IDIV, RS) -#define IDIVLm(MD, MB, MI, MS) _UNARYLm(X86_IDIV, MD, MB, MI, MS) -#define IDIVQr(RS) _UNARYQr(X86_IDIV, RS) -#define IDIVQm(MD, MB, MI, MS) _UNARYQm(X86_IDIV, MD, MB, MI, MS) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define IMULWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r2(RD),_r2(RS) )) -#define IMULWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r2(RD) ,MD,MB,MI,MS )) - -#define IMULWirr(IM,RS,RD) (_d16(), _REXLrr(RS, RD), _Os_Mrm_sW (0x69 ,_b11,_r2(RS),_r2(RD) ,_su16(IM) )) -#define IMULWimr(IM,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _Os_r_X_sW (0x69 ,_r2(RD) ,MD,MB,MI,MS ,_su16(IM) )) - -#define IMULLir(IM, RD) (_REXLrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RD),_r4(RD) ,IM )) -#define IMULLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r4(RD),_r4(RS) )) -#define IMULLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r4(RD) ,MD,MB,MI,MS )) - -#define IMULQir(IM, RD) (_REXQrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RD),_r8(RD) ,IM )) -#define IMULQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r8(RD),_r8(RS) )) -#define IMULQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0faf ,_r8(RD) ,MD,MB,MI,MS )) - -#define IMULLirr(IM,RS,RD) (_REXLrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RS),_r4(RD) ,IM )) -#define IMULLimr(IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r4(RD) ,MD,MB,MI,MS ,IM )) - -#define IMULQirr(IM,RS,RD) (_REXQrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RS),_r8(RD) ,IM )) -#define IMULQimr(IM,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r8(RD) ,MD,MB,MI,MS ,IM )) - - -/* --- Control Flow related instructions ----------------------------------- */ - -enum { - X86_CC_O = 0x0, - X86_CC_NO = 0x1, - X86_CC_NAE = 0x2, - X86_CC_B = 0x2, - X86_CC_C = 0x2, - X86_CC_AE = 0x3, - X86_CC_NB = 0x3, - X86_CC_NC = 0x3, - X86_CC_E = 0x4, - X86_CC_Z = 0x4, - X86_CC_NE = 0x5, - X86_CC_NZ = 0x5, - X86_CC_BE = 0x6, - X86_CC_NA = 0x6, - X86_CC_A = 0x7, - X86_CC_NBE = 0x7, - X86_CC_S = 0x8, - X86_CC_NS = 0x9, - X86_CC_P = 0xa, - X86_CC_PE = 0xa, - X86_CC_NP = 0xb, - X86_CC_PO = 0xb, - X86_CC_L = 0xc, - X86_CC_NGE = 0xc, - X86_CC_GE = 0xd, - X86_CC_NL = 0xd, - X86_CC_LE = 0xe, - X86_CC_NG = 0xe, - X86_CC_G = 0xf, - X86_CC_NLE = 0xf, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode -#define CALLm(M) _O_D32 (0xe8 ,(int)(M) ) -#define _CALLLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r4(R) )) -#define _CALLQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r8(R) )) -#define CALLsr(R) ( X86_TARGET_64BIT ? _CALLQsr(R) : _CALLLsr(R)) -#define CALLsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b010 ,(int)(D),B,I,S )) - -// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode -#define JMPSm(M) _O_D8 (0xeb ,(int)(M) ) -#define JMPm(M) _O_D32 (0xe9 ,(int)(M) ) -#define _JMPLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r4(R) )) -#define _JMPQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r8(R) )) -#define JMPsr(R) ( X86_TARGET_64BIT ? _JMPQsr(R) : _JMPLsr(R)) -#define JMPsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b100 ,(int)(D),B,I,S )) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ -#define JCCSii(CC, D) _O_B (0x70|(CC) ,(_sc)(int)(D) ) -#define JCCSim(CC, D) _O_D8 (0x70|(CC) ,(int)(D) ) -#define JOSm(D) JCCSim(X86_CC_O, D) -#define JNOSm(D) JCCSim(X86_CC_NO, D) -#define JBSm(D) JCCSim(X86_CC_B, D) -#define JNAESm(D) JCCSim(X86_CC_NAE, D) -#define JNBSm(D) JCCSim(X86_CC_NB, D) -#define JAESm(D) JCCSim(X86_CC_AE, D) -#define JESm(D) JCCSim(X86_CC_E, D) -#define JZSm(D) JCCSim(X86_CC_Z, D) -#define JNESm(D) JCCSim(X86_CC_NE, D) -#define JNZSm(D) JCCSim(X86_CC_NZ, D) -#define JBESm(D) JCCSim(X86_CC_BE, D) -#define JNASm(D) JCCSim(X86_CC_NA, D) -#define JNBESm(D) JCCSim(X86_CC_NBE, D) -#define JASm(D) JCCSim(X86_CC_A, D) -#define JSSm(D) JCCSim(X86_CC_S, D) -#define JNSSm(D) JCCSim(X86_CC_NS, D) -#define JPSm(D) JCCSim(X86_CC_P, D) -#define JPESm(D) JCCSim(X86_CC_PE, D) -#define JNPSm(D) JCCSim(X86_CC_NP, D) -#define JPOSm(D) JCCSim(X86_CC_PO, D) -#define JLSm(D) JCCSim(X86_CC_L, D) -#define JNGESm(D) JCCSim(X86_CC_NGE, D) -#define JNLSm(D) JCCSim(X86_CC_NL, D) -#define JGESm(D) JCCSim(X86_CC_GE, D) -#define JLESm(D) JCCSim(X86_CC_LE, D) -#define JNGSm(D) JCCSim(X86_CC_NG, D) -#define JNLESm(D) JCCSim(X86_CC_NLE, D) -#define JGSm(D) JCCSim(X86_CC_G, D) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ -#define JCCii(CC, D) _OO_L (0x0f80|(CC) ,(int)(D) ) -#define JCCim(CC, D) _OO_D32 (0x0f80|(CC) ,(int)(D) ) -#define JOm(D) JCCim(X86_CC_O, D) -#define JNOm(D) JCCim(X86_CC_NO, D) -#define JBm(D) JCCim(X86_CC_B, D) -#define JNAEm(D) JCCim(X86_CC_NAE, D) -#define JNBm(D) JCCim(X86_CC_NB, D) -#define JAEm(D) JCCim(X86_CC_AE, D) -#define JEm(D) JCCim(X86_CC_E, D) -#define JZm(D) JCCim(X86_CC_Z, D) -#define JNEm(D) JCCim(X86_CC_NE, D) -#define JNZm(D) JCCim(X86_CC_NZ, D) -#define JBEm(D) JCCim(X86_CC_BE, D) -#define JNAm(D) JCCim(X86_CC_NA, D) -#define JNBEm(D) JCCim(X86_CC_NBE, D) -#define JAm(D) JCCim(X86_CC_A, D) -#define JSm(D) JCCim(X86_CC_S, D) -#define JNSm(D) JCCim(X86_CC_NS, D) -#define JPm(D) JCCim(X86_CC_P, D) -#define JPEm(D) JCCim(X86_CC_PE, D) -#define JNPm(D) JCCim(X86_CC_NP, D) -#define JPOm(D) JCCim(X86_CC_PO, D) -#define JLm(D) JCCim(X86_CC_L, D) -#define JNGEm(D) JCCim(X86_CC_NGE, D) -#define JNLm(D) JCCim(X86_CC_NL, D) -#define JGEm(D) JCCim(X86_CC_GE, D) -#define JLEm(D) JCCim(X86_CC_LE, D) -#define JNGm(D) JCCim(X86_CC_NG, D) -#define JNLEm(D) JCCim(X86_CC_NLE, D) -#define JGm(D) JCCim(X86_CC_G, D) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ -#define SETCCir(CC, RD) (_REXBrr(0, RD), _OO_Mrm (0x0f90|(CC) ,_b11,_b000,_r1(RD) )) -#define SETOr(RD) SETCCir(X86_CC_O, RD) -#define SETNOr(RD) SETCCir(X86_CC_NO, RD) -#define SETBr(RD) SETCCir(X86_CC_B, RD) -#define SETNAEr(RD) SETCCir(X86_CC_NAE, RD) -#define SETNBr(RD) SETCCir(X86_CC_NB, RD) -#define SETAEr(RD) SETCCir(X86_CC_AE, RD) -#define SETEr(RD) SETCCir(X86_CC_E, RD) -#define SETZr(RD) SETCCir(X86_CC_Z, RD) -#define SETNEr(RD) SETCCir(X86_CC_NE, RD) -#define SETNZr(RD) SETCCir(X86_CC_NZ, RD) -#define SETBEr(RD) SETCCir(X86_CC_BE, RD) -#define SETNAr(RD) SETCCir(X86_CC_NA, RD) -#define SETNBEr(RD) SETCCir(X86_CC_NBE, RD) -#define SETAr(RD) SETCCir(X86_CC_A, RD) -#define SETSr(RD) SETCCir(X86_CC_S, RD) -#define SETNSr(RD) SETCCir(X86_CC_NS, RD) -#define SETPr(RD) SETCCir(X86_CC_P, RD) -#define SETPEr(RD) SETCCir(X86_CC_PE, RD) -#define SETNPr(RD) SETCCir(X86_CC_NP, RD) -#define SETPOr(RD) SETCCir(X86_CC_PO, RD) -#define SETLr(RD) SETCCir(X86_CC_L, RD) -#define SETNGEr(RD) SETCCir(X86_CC_NGE, RD) -#define SETNLr(RD) SETCCir(X86_CC_NL, RD) -#define SETGEr(RD) SETCCir(X86_CC_GE, RD) -#define SETLEr(RD) SETCCir(X86_CC_LE, RD) -#define SETNGr(RD) SETCCir(X86_CC_NG, RD) -#define SETNLEr(RD) SETCCir(X86_CC_NLE, RD) -#define SETGr(RD) SETCCir(X86_CC_G, RD) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ -#define SETCCim(CC,MD,MB,MI,MS) (_REXBrm(0, MB, MI), _OO_r_X (0x0f90|(CC) ,_b000 ,MD,MB,MI,MS )) -#define SETOm(D, B, I, S) SETCCim(X86_CC_O, D, B, I, S) -#define SETNOm(D, B, I, S) SETCCim(X86_CC_NO, D, B, I, S) -#define SETBm(D, B, I, S) SETCCim(X86_CC_B, D, B, I, S) -#define SETNAEm(D, B, I, S) SETCCim(X86_CC_NAE, D, B, I, S) -#define SETNBm(D, B, I, S) SETCCim(X86_CC_NB, D, B, I, S) -#define SETAEm(D, B, I, S) SETCCim(X86_CC_AE, D, B, I, S) -#define SETEm(D, B, I, S) SETCCim(X86_CC_E, D, B, I, S) -#define SETZm(D, B, I, S) SETCCim(X86_CC_Z, D, B, I, S) -#define SETNEm(D, B, I, S) SETCCim(X86_CC_NE, D, B, I, S) -#define SETNZm(D, B, I, S) SETCCim(X86_CC_NZ, D, B, I, S) -#define SETBEm(D, B, I, S) SETCCim(X86_CC_BE, D, B, I, S) -#define SETNAm(D, B, I, S) SETCCim(X86_CC_NA, D, B, I, S) -#define SETNBEm(D, B, I, S) SETCCim(X86_CC_NBE, D, B, I, S) -#define SETAm(D, B, I, S) SETCCim(X86_CC_A, D, B, I, S) -#define SETSm(D, B, I, S) SETCCim(X86_CC_S, D, B, I, S) -#define SETNSm(D, B, I, S) SETCCim(X86_CC_NS, D, B, I, S) -#define SETPm(D, B, I, S) SETCCim(X86_CC_P, D, B, I, S) -#define SETPEm(D, B, I, S) SETCCim(X86_CC_PE, D, B, I, S) -#define SETNPm(D, B, I, S) SETCCim(X86_CC_NP, D, B, I, S) -#define SETPOm(D, B, I, S) SETCCim(X86_CC_PO, D, B, I, S) -#define SETLm(D, B, I, S) SETCCim(X86_CC_L, D, B, I, S) -#define SETNGEm(D, B, I, S) SETCCim(X86_CC_NGE, D, B, I, S) -#define SETNLm(D, B, I, S) SETCCim(X86_CC_NL, D, B, I, S) -#define SETGEm(D, B, I, S) SETCCim(X86_CC_GE, D, B, I, S) -#define SETLEm(D, B, I, S) SETCCim(X86_CC_LE, D, B, I, S) -#define SETNGm(D, B, I, S) SETCCim(X86_CC_NG, D, B, I, S) -#define SETNLEm(D, B, I, S) SETCCim(X86_CC_NLE, D, B, I, S) -#define SETGm(D, B, I, S) SETCCim(X86_CC_G, D, B, I, S) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ -#define CMOVWrr(CC,RS,RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r2(RD),_r2(RS) )) -#define CMOVWmr(CC,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r2(RD) ,MD,MB,MI,MS )) -#define CMOVLrr(CC,RS,RD) (_REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r4(RD),_r4(RS) )) -#define CMOVLmr(CC,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r4(RD) ,MD,MB,MI,MS )) -#define CMOVQrr(CC,RS,RD) (_REXQrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r8(RD),_r8(RS) )) -#define CMOVQmr(CC,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r8(RD) ,MD,MB,MI,MS )) - - -/* --- Push/Pop instructions ----------------------------------------------- */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define POPWr(RD) _m32only((_d16(), _Or (0x58,_r2(RD) ))) -#define POPWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) - -#define POPLr(RD) _m32only( _Or (0x58,_r4(RD) )) -#define POPLm(MD, MB, MI, MS) _m32only( _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS )) - -#define POPQr(RD) _m64only((_REXQr(RD), _Or (0x58,_r8(RD) ))) -#define POPQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) - -#define PUSHWr(RS) _m32only((_d16(), _Or (0x50,_r2(RS) ))) -#define PUSHWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0xff, ,_b110 ,MD,MB,MI,MS ))) -#define PUSHWi(IM) _m32only((_d16(), _Os_sW (0x68 ,IM ))) - -#define PUSHLr(RS) _m32only( _Or (0x50,_r4(RS) )) -#define PUSHLm(MD, MB, MI, MS) _m32only( _O_r_X (0xff ,_b110 ,MD,MB,MI,MS )) -#define PUSHLi(IM) _m32only( _Os_sL (0x68 ,IM )) - -#define PUSHQr(RS) _m64only((_REXQr(RS), _Or (0x50,_r8(RS) ))) -#define PUSHQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0xff ,_b110 ,MD,MB,MI,MS ))) -#define PUSHQi(IM) _m64only( _Os_sL (0x68 ,IM )) - -#define POPA() (_d16(), _O (0x61 )) -#define POPAD() _O (0x61 ) - -#define PUSHA() (_d16(), _O (0x60 )) -#define PUSHAD() _O (0x60 ) - -#define POPF() _O (0x9d ) -#define PUSHF() _O (0x9c ) - - -/* --- Test instructions --------------------------------------------------- */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define TESTBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x84 ,_b11,_r1(RS),_r1(RD) )) -#define TESTBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x84 ,_r1(RS) ,MD,MB,MI,MS )) -#define TESTBir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ - (_REXBrr(0, RD), _O_B (0xa8 ,_u8(IM))) : \ - (_REXBrr(0, RD), _O_Mrm_B (0xf6 ,_b11,_b000 ,_r1(RD) ,_u8(IM))) ) -#define TESTBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0xf6 ,_b000 ,MD,MB,MI,MS ,_u8(IM))) - -#define TESTWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r2(RS),_r2(RD) )) -#define TESTWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r2(RS) ,MD,MB,MI,MS )) -#define TESTWir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ - (_d16(), _REXLrr(0, RD), _O_W (0xa9 ,_u16(IM))) : \ - (_d16(), _REXLrr(0, RD), _O_Mrm_W (0xf7 ,_b11,_b000 ,_r2(RD) ,_u16(IM))) ) -#define TESTWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X_W (0xf7 ,_b000 ,MD,MB,MI,MS ,_u16(IM))) - -#define TESTLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r4(RS),_r4(RD) )) -#define TESTLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r4(RS) ,MD,MB,MI,MS )) -#define TESTLir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ - (_REXLrr(0, RD), _O_L (0xa9 ,IM )) : \ - (_REXLrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r4(RD) ,IM )) ) -#define TESTLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) - -#define TESTQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x85 ,_b11,_r8(RS),_r8(RD) )) -#define TESTQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x85 ,_r8(RS) ,MD,MB,MI,MS )) -#define TESTQir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ - (_REXQrr(0, RD), _O_L (0xa9 ,IM )) : \ - (_REXQrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r8(RD) ,IM )) ) -#define TESTQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) - - -/* --- Exchange instructions ----------------------------------------------- */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define CMPXCHGBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fb0 ,_b11,_r1(RS),_r1(RD) )) -#define CMPXCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fb0 ,_r1(RS) ,MD,MB,MI,MS )) - -#define CMPXCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r2(RS),_r2(RD) )) -#define CMPXCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r2(RS) ,MD,MB,MI,MS )) - -#define CMPXCHGLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r4(RS),_r4(RD) )) -#define CMPXCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r4(RS) ,MD,MB,MI,MS )) - -#define CMPXCHGQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r8(RS),_r8(RD) )) -#define CMPXCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r8(RS) ,MD,MB,MI,MS )) - -#define XADDBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fc0 ,_b11,_r1(RS),_r1(RD) )) -#define XADDBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fc0 ,_r1(RS) ,MD,MB,MI,MS )) - -#define XADDWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r2(RS),_r2(RD) )) -#define XADDWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r2(RS) ,MD,MB,MI,MS )) - -#define XADDLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r4(RS),_r4(RD) )) -#define XADDLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r4(RS) ,MD,MB,MI,MS )) - -#define XADDQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r8(RS),_r8(RD) )) -#define XADDQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r8(RS) ,MD,MB,MI,MS )) - -#define XCHGBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x86 ,_b11,_r1(RS),_r1(RD) )) -#define XCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x86 ,_r1(RS) ,MD,MB,MI,MS )) - -#define XCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r2(RS),_r2(RD) )) -#define XCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r2(RS) ,MD,MB,MI,MS )) - -#define XCHGLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r4(RS),_r4(RD) )) -#define XCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r4(RS) ,MD,MB,MI,MS )) - -#define XCHGQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x87 ,_b11,_r8(RS),_r8(RD) )) -#define XCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x87 ,_r8(RS) ,MD,MB,MI,MS )) - - -/* --- Increment/Decrement instructions ------------------------------------ */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define DECBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b001 ,MD,MB,MI,MS )) -#define DECBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b001 ,_r1(RD) )) - -#define DECWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) -#define DECWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x48,_r2(RD) )) : \ - (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r2(RD) ))) - -#define DECLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) -#define DECLr(RD) (! X86_TARGET_64BIT ? _Or (0x48,_r4(RD) ) : \ - (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r4(RD) ))) - -#define DECQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) -#define DECQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r8(RD) )) - -#define INCBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b000 ,MD,MB,MI,MS )) -#define INCBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b000 ,_r1(RD) )) - -#define INCWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) -#define INCWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x40,_r2(RD) )) : \ - (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r2(RD) )) ) - -#define INCLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) -#define INCLr(RD) (! X86_TARGET_64BIT ? _Or (0x40,_r4(RD) ) : \ - (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r4(RD) ))) - -#define INCQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) -#define INCQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r8(RD) )) - - -/* --- Misc instructions --------------------------------------------------- */ - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define BSFWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r2(RD),_r2(RS) )) -#define BSFWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r2(RD) ,MD,MB,MI,MS )) -#define BSRWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r2(RD),_r2(RS) )) -#define BSRWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r2(RD) ,MD,MB,MI,MS )) - -#define BSFLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r4(RD),_r4(RS) )) -#define BSFLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r4(RD) ,MD,MB,MI,MS )) -#define BSRLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r4(RD),_r4(RS) )) -#define BSRLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r4(RD) ,MD,MB,MI,MS )) - -#define BSFQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r8(RD),_r8(RS) )) -#define BSFQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r8(RD) ,MD,MB,MI,MS )) -#define BSRQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r8(RD),_r8(RS) )) -#define BSRQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r8(RD) ,MD,MB,MI,MS )) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define MOVSBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r2(RD),_r1(RS) )) -#define MOVSBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r2(RD) ,MD,MB,MI,MS )) -#define MOVZBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r2(RD),_r1(RS) )) -#define MOVZBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r2(RD) ,MD,MB,MI,MS )) - -#define MOVSBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r4(RD),_r1(RS) )) -#define MOVSBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r4(RD) ,MD,MB,MI,MS )) -#define MOVZBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r4(RD),_r1(RS) )) -#define MOVZBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r4(RD) ,MD,MB,MI,MS )) - -#define MOVSBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r8(RD),_r1(RS) )) -#define MOVSBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r8(RD) ,MD,MB,MI,MS )) -#define MOVZBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r8(RD),_r1(RS) )) -#define MOVZBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r8(RD) ,MD,MB,MI,MS )) - -#define MOVSWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r4(RD),_r2(RS) )) -#define MOVSWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r4(RD) ,MD,MB,MI,MS )) -#define MOVZWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r4(RD),_r2(RS) )) -#define MOVZWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r4(RD) ,MD,MB,MI,MS )) - -#define MOVSWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r8(RD),_r2(RS) ))) -#define MOVSWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r8(RD) ,MD,MB,MI,MS ))) -#define MOVZWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r8(RD),_r2(RS) ))) -#define MOVZWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r8(RD) ,MD,MB,MI,MS ))) - -#define MOVSLQrr(RS, RD) _m64only((_REXQrr(RD, RS), _O_Mrm (0x63 ,_b11,_r8(RD),_r4(RS) ))) -#define MOVSLQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _O_r_X (0x63 ,_r8(RD) ,MD,MB,MI,MS ))) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define LEALmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) -#define LEAQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) - -#define BSWAPLr(R) (_REXLrr(0, R), _OOr (0x0fc8,_r4(R) )) -#define BSWAPQr(R) (_REXQrr(0, R), _OOr (0x0fc8,_r8(R) )) - -#define CLC() _O (0xf8 ) -#define STC() _O (0xf9 ) -#define CMC() _O (0xf5 ) - -#define CLD() _O (0xfc ) -#define STD() _O (0xfd ) - -#define CBTW() (_d16(), _O (0x98 )) -#define CWTL() _O (0x98 ) -#define CLTQ() _m64only(_REXQrr(0, 0), _O (0x98 )) - -#define CBW CBTW -#define CWDE CWTL -#define CDQE CLTQ - -#define CWTD() (_d16(), _O (0x99 )) -#define CLTD() _O (0x99 ) -#define CQTO() _m64only(_REXQrr(0, 0), _O (0x99 )) - -#define CWD CWTD -#define CDQ CLTD -#define CQO CQTO - -#define LAHF() _O (0x9f ) -#define SAHF() _O (0x9e ) - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define CPUID() _OO (0x0fa2 ) -#define RDTSC() _OO (0xff31 ) - -#define ENTERii(W, B) _O_W_B (0xc8 ,_su16(W),_su8(B)) - -#define LEAVE() _O (0xc9 ) -#define RET() _O (0xc3 ) -#define RETi(IM) _O_W (0xc2 ,_su16(IM)) - -#define NOP() _O (0x90 ) - - -/* --- Media 64-bit instructions ------------------------------------------- */ - -enum { - X86_MMX_PABSB = 0x1c, // 2P - X86_MMX_PABSW = 0x1d, // 2P - X86_MMX_PABSD = 0x1e, // 2P - X86_MMX_PACKSSWB = 0x63, - X86_MMX_PACKSSDW = 0x6b, - X86_MMX_PACKUSWB = 0x67, - X86_MMX_PADDB = 0xfc, - X86_MMX_PADDW = 0xfd, - X86_MMX_PADDD = 0xfe, - X86_MMX_PADDQ = 0xd4, - X86_MMX_PADDSB = 0xec, - X86_MMX_PADDSW = 0xed, - X86_MMX_PADDUSB = 0xdc, - X86_MMX_PADDUSW = 0xdd, - X86_MMX_PAND = 0xdb, - X86_MMX_PANDN = 0xdf, - X86_MMX_PAVGB = 0xe0, - X86_MMX_PAVGW = 0xe3, - X86_MMX_PCMPEQB = 0x74, - X86_MMX_PCMPEQW = 0x75, - X86_MMX_PCMPEQD = 0x76, - X86_MMX_PCMPGTB = 0x64, - X86_MMX_PCMPGTW = 0x65, - X86_MMX_PCMPGTD = 0x66, - X86_MMX_PEXTRW = 0xc5, // 64, /r ib - X86_MMX_PHADDW = 0x01, // 2P - X86_MMX_PHADDD = 0x02, // 2P - X86_MMX_PHADDSW = 0x03, // 2P - X86_MMX_PHSUBW = 0x05, // 2P - X86_MMX_PHSUBD = 0x06, // 2P - X86_MMX_PHSUBSW = 0x07, // 2P - X86_MMX_PINSRW = 0xc4, // 64, /r ib - X86_MMX_PMADDUBSW = 0x04, // 2P - X86_MMX_PMADDWD = 0xf5, - X86_MMX_PMAXSW = 0xee, - X86_MMX_PMAXUB = 0xde, - X86_MMX_PMINSW = 0xea, - X86_MMX_PMINUB = 0xda, - X86_MMX_PMOVMSKB = 0xd7, // 64 - X86_MMX_PMULHRSW = 0x0b, // 2P - X86_MMX_PMULHUW = 0xe4, - X86_MMX_PMULHW = 0xe5, - X86_MMX_PMULLW = 0xd5, - X86_MMX_PMULUDQ = 0xf4, - X86_MMX_POR = 0xeb, - X86_MMX_PSADBW = 0xf6, - X86_MMX_PSHUFB = 0x00, // 2P - X86_MMX_PSHUFW = 0x70, // /r ib - X86_MMX_PSIGNB = 0x08, // 2P - X86_MMX_PSIGNW = 0x09, // 2P - X86_MMX_PSIGND = 0x0a, // 2P - X86_MMX_PSLLW = 0xf1, - X86_MMX_PSLLWi = 0x71, // /6 ib - X86_MMX_PSLLD = 0xf2, - X86_MMX_PSLLDi = 0x72, // /6 ib - X86_MMX_PSLLQ = 0xf3, - X86_MMX_PSLLQi = 0x73, // /6 ib - X86_MMX_PSRAW = 0xe1, - X86_MMX_PSRAWi = 0x71, // /4 ib - X86_MMX_PSRAD = 0xe2, - X86_MMX_PSRADi = 0x72, // /4 ib - X86_MMX_PSRLW = 0xd1, - X86_MMX_PSRLWi = 0x71, // /2 ib - X86_MMX_PSRLD = 0xd2, - X86_MMX_PSRLDi = 0x72, // /2 ib - X86_MMX_PSRLQ = 0xd3, - X86_MMX_PSRLQi = 0x73, // /2 ib - X86_MMX_PSUBB = 0xf8, - X86_MMX_PSUBW = 0xf9, - X86_MMX_PSUBD = 0xfa, - X86_MMX_PSUBQ = 0xfb, - X86_MMX_PSUBSB = 0xe8, - X86_MMX_PSUBSW = 0xe9, - X86_MMX_PSUBUSB = 0xd8, - X86_MMX_PSUBUSW = 0xd9, - X86_MMX_PUNPCKHBW = 0x68, - X86_MMX_PUNPCKHWD = 0x69, - X86_MMX_PUNPCKHDQ = 0x6a, - X86_MMX_PUNPCKLBW = 0x60, - X86_MMX_PUNPCKLWD = 0x61, - X86_MMX_PUNPCKLDQ = 0x62, - X86_MMX_PXOR = 0xef, -}; - -#define __MMXLrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) -#define __MMXLmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) -#define __MMXLrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) -#define __MMXLirr(OP,IM,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) -#define __MMXLimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) -#define __MMXQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) -#define __MMXQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) -#define __MMXQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) -#define __MMXQirr(OP,IM,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) -#define __MMXQimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) -#define __MMX1Lrr(PX,OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _B(0x0f),_OO_Mrm(((PX)<<8)|(OP) ,_b11,RDA(RD),RSA(RS) )) -#define __MMX1Lmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RDA(RD) ,MD,MB,MI,MS )) -#define __MMX1Lrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RSA(RS) ,MD,MB,MI,MS )) - -#define _MMXLrr(OP,RS,RD) __MMXLrr(OP,RS,_rM,RD,_rM) -#define _MMXLmr(OP,MD,MB,MI,MS,RD) __MMXLmr(OP,MD,MB,MI,MS,RD,_rM) -#define _MMXLrm(OP,RS,MD,MB,MI,MS) __MMXLrm(OP,RS,_rM,MD,MB,MI,MS) -#define _MMXQrr(OP,RS,RD) __MMXQrr(OP,RS,_rM,RD,_rM) -#define _MMXQmr(OP,MD,MB,MI,MS,RD) __MMXQmr(OP,MD,MB,MI,MS,RD,_rM) -#define _MMXQrm(OP,RS,MD,MB,MI,MS) __MMXQrm(OP,RS,_rM,MD,MB,MI,MS) -#define _2P_MMXLrr(OP,RS,RD) __MMX1Lrr(0x38, OP,RS,_rM,RD,_rM) -#define _2P_MMXLmr(OP,MD,MB,MI,MS,RD) __MMX1Lmr(0x38, OP,MD,MB,MI,MS,RD,_rM) -#define _2P_MMXLrm(OP,RS,MD,MB,MI,MS) __MMX1Lrm(0x38, OP,RS,_rM,MD,MB,MI,MS) - -#define MMX_MOVDMDrr(RS, RD) __MMXLrr(0x6e, RS,_r4, RD,_rM) -#define MMX_MOVQMDrr(RS, RD) __MMXQrr(0x6e, RS,_r8, RD,_rM) -#define MMX_MOVDMSrr(RS, RD) __MMXLrr(0x7e, RD,_r4, RS,_rM) -#define MMX_MOVQMSrr(RS, RD) __MMXQrr(0x7e, RD,_r8, RS,_rM) - -#define MMX_MOVDmr(MD, MB, MI, MS, RD) _MMXLmr(0x6e, MD, MB, MI, MS, RD) -#define MMX_MOVDrm(RS, MD, MB, MI, MS) _MMXLrm(0x7e, RS, MD, MB, MI, MS) -#define MMX_MOVQrr(RS, RD) _MMXLrr(0x6f, RS, RD) -#define MMX_MOVQmr(MD, MB, MI, MS, RD) _MMXLmr(0x6f, MD, MB, MI, MS, RD) -#define MMX_MOVQrm(RS, MD, MB, MI, MS) _MMXLrm(0x7f, RS, MD, MB, MI, MS) - -// Original MMX instructions -#define MMX_PACKSSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKSSWB,RS,RD) -#define MMX_PACKSSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSWB, MD, MB, MI, MS, RD) -#define MMX_PACKSSDWrr(RS, RD) _MMXLrr(X86_MMX_PACKSSDW,RS,RD) -#define MMX_PACKSSDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSDW, MD, MB, MI, MS, RD) -#define MMX_PACKUSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKUSWB,RS,RD) -#define MMX_PACKUSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKUSWB, MD, MB, MI, MS, RD) -#define MMX_PADDBrr(RS, RD) _MMXLrr(X86_MMX_PADDB,RS,RD) -#define MMX_PADDBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDB, MD, MB, MI, MS, RD) -#define MMX_PADDWrr(RS, RD) _MMXLrr(X86_MMX_PADDW,RS,RD) -#define MMX_PADDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDW, MD, MB, MI, MS, RD) -#define MMX_PADDDrr(RS, RD) _MMXLrr(X86_MMX_PADDD,RS,RD) -#define MMX_PADDDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDD, MD, MB, MI, MS, RD) -#define MMX_PADDQrr(RS, RD) _MMXLrr(X86_MMX_PADDQ,RS,RD) -#define MMX_PADDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDQ, MD, MB, MI, MS, RD) -#define MMX_PADDSBrr(RS, RD) _MMXLrr(X86_MMX_PADDSB,RS,RD) -#define MMX_PADDSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSB, MD, MB, MI, MS, RD) -#define MMX_PADDSWrr(RS, RD) _MMXLrr(X86_MMX_PADDSW,RS,RD) -#define MMX_PADDSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSW, MD, MB, MI, MS, RD) -#define MMX_PADDUSBrr(RS, RD) _MMXLrr(X86_MMX_PADDUSB,RS,RD) -#define MMX_PADDUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSB, MD, MB, MI, MS, RD) -#define MMX_PADDUSWrr(RS, RD) _MMXLrr(X86_MMX_PADDUSW,RS,RD) -#define MMX_PADDUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSW, MD, MB, MI, MS, RD) -#define MMX_PANDrr(RS, RD) _MMXLrr(X86_MMX_PAND,RS,RD) -#define MMX_PANDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAND, MD, MB, MI, MS, RD) -#define MMX_PANDNrr(RS, RD) _MMXLrr(X86_MMX_PANDN,RS,RD) -#define MMX_PANDNmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PANDN, MD, MB, MI, MS, RD) -#define MMX_PAVGBrr(RS, RD) _MMXLrr(X86_MMX_PAVGB,RS,RD) -#define MMX_PAVGBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGB, MD, MB, MI, MS, RD) -#define MMX_PAVGWrr(RS, RD) _MMXLrr(X86_MMX_PAVGW,RS,RD) -#define MMX_PAVGWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGW, MD, MB, MI, MS, RD) -#define MMX_PCMPEQBrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQB,RS,RD) -#define MMX_PCMPEQBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQB, MD, MB, MI, MS, RD) -#define MMX_PCMPEQWrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQW,RS,RD) -#define MMX_PCMPEQWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQW, MD, MB, MI, MS, RD) -#define MMX_PCMPEQDrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQD,RS,RD) -#define MMX_PCMPEQDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQD, MD, MB, MI, MS, RD) -#define MMX_PCMPGTBrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTB,RS,RD) -#define MMX_PCMPGTBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTB, MD, MB, MI, MS, RD) -#define MMX_PCMPGTWrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTW,RS,RD) -#define MMX_PCMPGTWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTW, MD, MB, MI, MS, RD) -#define MMX_PCMPGTDrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTD,RS,RD) -#define MMX_PCMPGTDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTD, MD, MB, MI, MS, RD) -#define MMX_PMADDWDrr(RS, RD) _MMXLrr(X86_MMX_PMADDWD,RS,RD) -#define MMX_PMADDWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMADDWD, MD, MB, MI, MS, RD) -#define MMX_PMAXSWrr(RS, RD) _MMXLrr(X86_MMX_PMAXSW,RS,RD) -#define MMX_PMAXSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXSW, MD, MB, MI, MS, RD) -#define MMX_PMAXUBrr(RS, RD) _MMXLrr(X86_MMX_PMAXUB,RS,RD) -#define MMX_PMAXUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXUB, MD, MB, MI, MS, RD) -#define MMX_PMINSWrr(RS, RD) _MMXLrr(X86_MMX_PMINSW,RS,RD) -#define MMX_PMINSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINSW, MD, MB, MI, MS, RD) -#define MMX_PMINUBrr(RS, RD) _MMXLrr(X86_MMX_PMINUB,RS,RD) -#define MMX_PMINUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINUB, MD, MB, MI, MS, RD) -#define MMX_PMULHUWrr(RS, RD) _MMXLrr(X86_MMX_PMULHUW,RS,RD) -#define MMX_PMULHUWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHUW, MD, MB, MI, MS, RD) -#define MMX_PMULHWrr(RS, RD) _MMXLrr(X86_MMX_PMULHW,RS,RD) -#define MMX_PMULHWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHW, MD, MB, MI, MS, RD) -#define MMX_PMULLWrr(RS, RD) _MMXLrr(X86_MMX_PMULLW,RS,RD) -#define MMX_PMULLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULLW, MD, MB, MI, MS, RD) -#define MMX_PMULUDQrr(RS, RD) _MMXLrr(X86_MMX_PMULUDQ,RS,RD) -#define MMX_PMULUDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULUDQ, MD, MB, MI, MS, RD) -#define MMX_PORrr(RS, RD) _MMXLrr(X86_MMX_POR,RS,RD) -#define MMX_PORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_POR, MD, MB, MI, MS, RD) -#define MMX_PSADBWrr(RS, RD) _MMXLrr(X86_MMX_PSADBW,RS,RD) -#define MMX_PSADBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSADBW, MD, MB, MI, MS, RD) -#define MMX_PSLLWir(IM, RD) __MMXLirr(X86_MMX_PSLLWi, IM, RD,_rM, _b110,_rN) -#define MMX_PSLLWrr(RS, RD) _MMXLrr(X86_MMX_PSLLW,RS,RD) -#define MMX_PSLLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLW, MD, MB, MI, MS, RD) -#define MMX_PSLLDir(IM, RD) __MMXLirr(X86_MMX_PSLLDi, IM, RD,_rM, _b110,_rN) -#define MMX_PSLLDrr(RS, RD) _MMXLrr(X86_MMX_PSLLD,RS,RD) -#define MMX_PSLLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLD, MD, MB, MI, MS, RD) -#define MMX_PSLLQir(IM, RD) __MMXLirr(X86_MMX_PSLLQi, IM, RD,_rM, _b110,_rN) -#define MMX_PSLLQrr(RS, RD) _MMXLrr(X86_MMX_PSLLQ,RS,RD) -#define MMX_PSLLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLQ, MD, MB, MI, MS, RD) -#define MMX_PSRAWir(IM, RD) __MMXLirr(X86_MMX_PSRAWi, IM, RD,_rM, _b100,_rN) -#define MMX_PSRAWrr(RS, RD) _MMXLrr(X86_MMX_PSRAW,RS,RD) -#define MMX_PSRAWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAW, MD, MB, MI, MS, RD) -#define MMX_PSRADir(IM, RD) __MMXLirr(X86_MMX_PSRADi, IM, RD,_rM, _b100,_rN) -#define MMX_PSRADrr(RS, RD) _MMXLrr(X86_MMX_PSRAD,RS,RD) -#define MMX_PSRADmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAD, MD, MB, MI, MS, RD) -#define MMX_PSRLWir(IM, RD) __MMXLirr(X86_MMX_PSRLWi, IM, RD,_rM, _b010,_rN) -#define MMX_PSRLWrr(RS, RD) _MMXLrr(X86_MMX_PSRLW,RS,RD) -#define MMX_PSRLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLW, MD, MB, MI, MS, RD) -#define MMX_PSRLDir(IM, RD) __MMXLirr(X86_MMX_PSRLDi, IM, RD,_rM, _b010,_rN) -#define MMX_PSRLDrr(RS, RD) _MMXLrr(X86_MMX_PSRLD,RS,RD) -#define MMX_PSRLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLD, MD, MB, MI, MS, RD) -#define MMX_PSRLQir(IM, RD) __MMXLirr(X86_MMX_PSRLQi, IM, RD,_rM, _b010,_rN) -#define MMX_PSRLQrr(RS, RD) _MMXLrr(X86_MMX_PSRLQ,RS,RD) -#define MMX_PSRLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLQ, MD, MB, MI, MS, RD) -#define MMX_PSUBBrr(RS, RD) _MMXLrr(X86_MMX_PSUBB,RS,RD) -#define MMX_PSUBBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBB, MD, MB, MI, MS, RD) -#define MMX_PSUBWrr(RS, RD) _MMXLrr(X86_MMX_PSUBW,RS,RD) -#define MMX_PSUBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBW, MD, MB, MI, MS, RD) -#define MMX_PSUBDrr(RS, RD) _MMXLrr(X86_MMX_PSUBD,RS,RD) -#define MMX_PSUBDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBD, MD, MB, MI, MS, RD) -#define MMX_PSUBQrr(RS, RD) _MMXLrr(X86_MMX_PSUBQ,RS,RD) -#define MMX_PSUBQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBQ, MD, MB, MI, MS, RD) -#define MMX_PSUBSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBSB,RS,RD) -#define MMX_PSUBSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSB, MD, MB, MI, MS, RD) -#define MMX_PSUBSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBSW,RS,RD) -#define MMX_PSUBSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSW, MD, MB, MI, MS, RD) -#define MMX_PSUBUSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSB,RS,RD) -#define MMX_PSUBUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSB, MD, MB, MI, MS, RD) -#define MMX_PSUBUSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSW,RS,RD) -#define MMX_PSUBUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSW, MD, MB, MI, MS, RD) -#define MMX_PUNPCKHBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHBW,RS,RD) -#define MMX_PUNPCKHBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHBW, MD, MB, MI, MS, RD) -#define MMX_PUNPCKHWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHWD,RS,RD) -#define MMX_PUNPCKHWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHWD, MD, MB, MI, MS, RD) -#define MMX_PUNPCKHDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHDQ,RS,RD) -#define MMX_PUNPCKHDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHDQ, MD, MB, MI, MS, RD) -#define MMX_PUNPCKLBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLBW,RS,RD) -#define MMX_PUNPCKLBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLBW, MD, MB, MI, MS, RD) -#define MMX_PUNPCKLWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLWD,RS,RD) -#define MMX_PUNPCKLWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLWD, MD, MB, MI, MS, RD) -#define MMX_PUNPCKLDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLDQ,RS,RD) -#define MMX_PUNPCKLDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLDQ, MD, MB, MI, MS, RD) -#define MMX_PXORrr(RS, RD) _MMXLrr(X86_MMX_PXOR,RS,RD) -#define MMX_PXORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PXOR, MD, MB, MI, MS, RD) - -#define MMX_PSHUFWirr(IM, RS, RD) __MMXLirr(X86_MMX_PSHUFW, IM, RS,_rM, RD,_rM) -#define MMX_PSHUFWimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PSHUFW, IM, MD, MB, MI, MS, RD,_rM) -#define MMX_PEXTRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r4) -#define MMX_PEXTRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r8) -#define MMX_PINSRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) -#define MMX_PINSRWLimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r4) -#define MMX_PINSRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) -#define MMX_PINSRWQimr(IM, MD, MB, MI, MS, RD) __MMXQimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r8) - -// Additionnal MMX instructions, brought by SSSE3 ISA -#define MMX_PABSBrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSB,RS,RD) -#define MMX_PABSBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSB, MD, MB, MI, MS, RD) -#define MMX_PABSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSW,RS,RD) -#define MMX_PABSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSW, MD, MB, MI, MS, RD) -#define MMX_PABSDrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSD,RS,RD) -#define MMX_PABSDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSD, MD, MB, MI, MS, RD) -#define MMX_PHADDWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDW,RS,RD) -#define MMX_PHADDWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDW, MD, MB, MI, MS, RD) -#define MMX_PHADDDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDD,RS,RD) -#define MMX_PHADDDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDD, MD, MB, MI, MS, RD) -#define MMX_PHADDSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDSW,RS,RD) -#define MMX_PHADDSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDSW, MD, MB, MI, MS, RD) -#define MMX_PHSUBWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBW,RS,RD) -#define MMX_PHSUBWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBW, MD, MB, MI, MS, RD) -#define MMX_PHSUBDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBD,RS,RD) -#define MMX_PHSUBDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBD, MD, MB, MI, MS, RD) -#define MMX_PHSUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBSW,RS,RD) -#define MMX_PHSUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBSW, MD, MB, MI, MS, RD) -#define MMX_PMADDUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMADDUBSW,RS,RD) -#define MMX_PMADDUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMADDUBSW, MD, MB, MI, MS, RD) -#define MMX_PMULHRSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMULHRSW,RS,RD) -#define MMX_PMULHRSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMULHRSW, MD, MB, MI, MS, RD) -#define MMX_PSHUFBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSHUFB,RS,RD) -#define MMX_PSHUFBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSHUFB, MD, MB, MI, MS, RD) -#define MMX_PSIGNBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNB,RS,RD) -#define MMX_PSIGNBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNB, MD, MB, MI, MS, RD) -#define MMX_PSIGNWrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNW,RS,RD) -#define MMX_PSIGNWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNW, MD, MB, MI, MS, RD) -#define MMX_PSIGNDrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGND,RS,RD) -#define MMX_PSIGNDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGND, MD, MB, MI, MS, RD) - -#define EMMS() _OO (0x0f77 ) - - -/* --- Media 128-bit instructions ------------------------------------------ */ - -enum { - X86_SSE_CC_EQ = 0, - X86_SSE_CC_LT = 1, - X86_SSE_CC_GT = 1, - X86_SSE_CC_LE = 2, - X86_SSE_CC_GE = 2, - X86_SSE_CC_U = 3, - X86_SSE_CC_NEQ = 4, - X86_SSE_CC_NLT = 5, - X86_SSE_CC_NGT = 5, - X86_SSE_CC_NLE = 6, - X86_SSE_CC_NGE = 6, - X86_SSE_CC_O = 7 -}; - -enum { - X86_SSE_UCOMI = 0x2e, - X86_SSE_COMI = 0x2f, - X86_SSE_CMP = 0xc2, - X86_SSE_SQRT = 0x51, - X86_SSE_RSQRT = 0x52, - X86_SSE_RCP = 0x53, - X86_SSE_AND = 0x54, - X86_SSE_ANDN = 0x55, - X86_SSE_OR = 0x56, - X86_SSE_XOR = 0x57, - X86_SSE_ADD = 0x58, - X86_SSE_MUL = 0x59, - X86_SSE_SUB = 0x5c, - X86_SSE_MIN = 0x5d, - X86_SSE_DIV = 0x5e, - X86_SSE_MAX = 0x5f, - X86_SSE_CVTDQ2PD = 0xe6, - X86_SSE_CVTDQ2PS = 0x5b, - X86_SSE_CVTPD2DQ = 0xe6, - X86_SSE_CVTPD2PI = 0x2d, - X86_SSE_CVTPD2PS = 0x5a, - X86_SSE_CVTPI2PD = 0x2a, - X86_SSE_CVTPI2PS = 0x2a, - X86_SSE_CVTPS2DQ = 0x5b, - X86_SSE_CVTPS2PD = 0x5a, - X86_SSE_CVTPS2PI = 0x2d, - X86_SSE_CVTSD2SI = 0x2d, - X86_SSE_CVTSD2SS = 0x5a, - X86_SSE_CVTSI2SD = 0x2a, - X86_SSE_CVTSI2SS = 0x2a, - X86_SSE_CVTSS2SD = 0x5a, - X86_SSE_CVTSS2SI = 0x2d, - X86_SSE_CVTTPD2PI = 0x2c, - X86_SSE_CVTTPD2DQ = 0xe6, - X86_SSE_CVTTPS2DQ = 0x5b, - X86_SSE_CVTTPS2PI = 0x2c, - X86_SSE_CVTTSD2SI = 0x2c, - X86_SSE_CVTTSS2SI = 0x2c, - X86_SSE_MOVMSK = 0x50, - X86_SSE_PACKSSDW = 0x6b, - X86_SSE_PACKSSWB = 0x63, - X86_SSE_PACKUSWB = 0x67, - X86_SSE_PADDB = 0xfc, - X86_SSE_PADDD = 0xfe, - X86_SSE_PADDQ = 0xd4, - X86_SSE_PADDSB = 0xec, - X86_SSE_PADDSW = 0xed, - X86_SSE_PADDUSB = 0xdc, - X86_SSE_PADDUSW = 0xdd, - X86_SSE_PADDW = 0xfd, - X86_SSE_PAND = 0xdb, - X86_SSE_PANDN = 0xdf, - X86_SSE_PAVGB = 0xe0, - X86_SSE_PAVGW = 0xe3, - X86_SSE_PCMPEQB = 0x74, - X86_SSE_PCMPEQD = 0x76, - X86_SSE_PCMPEQW = 0x75, - X86_SSE_PCMPGTB = 0x64, - X86_SSE_PCMPGTD = 0x66, - X86_SSE_PCMPGTW = 0x65, - X86_SSE_PMADDWD = 0xf5, - X86_SSE_PMAXSW = 0xee, - X86_SSE_PMAXUB = 0xde, - X86_SSE_PMINSW = 0xea, - X86_SSE_PMINUB = 0xda, - X86_SSE_PMOVMSKB = 0xd7, - X86_SSE_PMULHUW = 0xe4, - X86_SSE_PMULHW = 0xe5, - X86_SSE_PMULLW = 0xd5, - X86_SSE_PMULUDQ = 0xf4, - X86_SSE_POR = 0xeb, - X86_SSE_PSADBW = 0xf6, - X86_SSE_PSLLD = 0xf2, - X86_SSE_PSLLQ = 0xf3, - X86_SSE_PSLLW = 0xf1, - X86_SSE_PSRAD = 0xe2, - X86_SSE_PSRAW = 0xe1, - X86_SSE_PSRLD = 0xd2, - X86_SSE_PSRLQ = 0xd3, - X86_SSE_PSRLW = 0xd1, - X86_SSE_PSUBB = 0xf8, - X86_SSE_PSUBD = 0xfa, - X86_SSE_PSUBQ = 0xfb, - X86_SSE_PSUBSB = 0xe8, - X86_SSE_PSUBSW = 0xe9, - X86_SSE_PSUBUSB = 0xd8, - X86_SSE_PSUBUSW = 0xd9, - X86_SSE_PSUBW = 0xf9, - X86_SSE_PUNPCKHBW = 0x68, - X86_SSE_PUNPCKHDQ = 0x6a, - X86_SSE_PUNPCKHQDQ = 0x6d, - X86_SSE_PUNPCKHWD = 0x69, - X86_SSE_PUNPCKLBW = 0x60, - X86_SSE_PUNPCKLDQ = 0x62, - X86_SSE_PUNPCKLQDQ = 0x6c, - X86_SSE_PUNPCKLWD = 0x61, - X86_SSE_PXOR = 0xef, - X86_SSSE3_PSHUFB = 0x00, -}; - -/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ - -#define _SSSE3Lrr(OP1,OP2,RS,RSA,RD,RDA) (_B(0x66), _REXLrr(RD,RD), _B(0x0f), _OO_Mrm (((OP1)<<8)|(OP2) ,_b11,RDA(RD),RSA(RS) )) -#define _SSSE3Lmr(OP1,OP2,MD,MB,MI,MS,RD,RDA) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X (((OP1)<<8)|(OP2) ,RDA(RD) ,MD,MB,MI,MS )) -#define _SSSE3Lirr(OP1,OP2,IM,RS,RD) (_B(0x66), _REXLrr(RD, RS), _B(0x0f), _OO_Mrm_B (((OP1)<<8)|(OP2) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) -#define _SSSE3Limr(OP1,OP2,IM,MD,MB,MI,MS,RD) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X_B (((OP1)<<8)|(OP2) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) - -#define __SSELir(OP,MO,IM,RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0f00|(OP) ,_b11,MO ,_rX(RD) ,_u8(IM))) -#define __SSELim(OP,MO,IM,MD,MB,MI,MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0f00|(OP) ,MO ,MD,MB,MI,MS ,_u8(IM))) -#define __SSELrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) -#define __SSELmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) -#define __SSELrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) -#define __SSELirr(OP,IM,RS,RD) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) -#define __SSELimr(OP,IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X_B (0x0f00|(OP) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) - -#define __SSEQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) -#define __SSEQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) -#define __SSEQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) - -#define _SSELrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSELrr(OP, RS, RSA, RD, RDA)) -#define _SSELmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSELmr(OP, MD, MB, MI, MS, RD, RDA)) -#define _SSELrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSELrm(OP, RS, RSA, MD, MB, MI, MS)) -#define _SSELir(PX,OP,MO,IM,RD) (_B(PX), __SSELir(OP, MO, IM, RD)) -#define _SSELim(PX,OP,MO,IM,MD,MB,MI,MS) (_B(PX), __SSELim(OP, MO, IM, MD, MB, MI, MS)) -#define _SSELirr(PX,OP,IM,RS,RD) (_B(PX), __SSELirr(OP, IM, RS, RD)) -#define _SSELimr(PX,OP,IM,MD,MB,MI,MS,RD) (_B(PX), __SSELimr(OP, IM, MD, MB, MI, MS, RD)) - -#define _SSEQrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSEQrr(OP, RS, RSA, RD, RDA)) -#define _SSEQmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSEQmr(OP, MD, MB, MI, MS, RD, RDA)) -#define _SSEQrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSEQrm(OP, RS, RSA, MD, MB, MI, MS)) - -#define _SSEPSrr(OP,RS,RD) __SSELrr( OP, RS,_rX, RD,_rX) -#define _SSEPSmr(OP,MD,MB,MI,MS,RD) __SSELmr( OP, MD, MB, MI, MS, RD,_rX) -#define _SSEPSrm(OP,RS,MD,MB,MI,MS) __SSELrm( OP, RS,_rX, MD, MB, MI, MS) -#define _SSEPSirr(OP,IM,RS,RD) __SSELirr( OP, IM, RS, RD) -#define _SSEPSimr(OP,IM,MD,MB,MI,MS,RD) __SSELimr( OP, IM, MD, MB, MI, MS, RD) - -#define _SSEPDrr(OP,RS,RD) _SSELrr(0x66, OP, RS,_rX, RD,_rX) -#define _SSEPDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0x66, OP, MD, MB, MI, MS, RD,_rX) -#define _SSEPDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0x66, OP, RS,_rX, MD, MB, MI, MS) -#define _SSEPDirr(OP,IM,RS,RD) _SSELirr(0x66, OP, IM, RS, RD) -#define _SSEPDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0x66, OP, IM, MD, MB, MI, MS, RD) - -#define _SSESSrr(OP,RS,RD) _SSELrr(0xf3, OP, RS,_rX, RD,_rX) -#define _SSESSmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf3, OP, MD, MB, MI, MS, RD,_rX) -#define _SSESSrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf3, OP, RS,_rX, MD, MB, MI, MS) -#define _SSESSirr(OP,IM,RS,RD) _SSELirr(0xf3, OP, IM, RS, RD) -#define _SSESSimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf3, OP, IM, MD, MB, MI, MS, RD) - -#define _SSESDrr(OP,RS,RD) _SSELrr(0xf2, OP, RS,_rX, RD,_rX) -#define _SSESDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf2, OP, MD, MB, MI, MS, RD,_rX) -#define _SSESDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf2, OP, RS,_rX, MD, MB, MI, MS) -#define _SSESDirr(OP,IM,RS,RD) _SSELirr(0xf2, OP, IM, RS, RD) -#define _SSESDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf2, OP, IM, MD, MB, MI, MS, RD) - -#define ADDPSrr(RS, RD) _SSEPSrr(X86_SSE_ADD, RS, RD) -#define ADDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) -#define ADDPDrr(RS, RD) _SSEPDrr(X86_SSE_ADD, RS, RD) -#define ADDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) - -#define ADDSSrr(RS, RD) _SSESSrr(X86_SSE_ADD, RS, RD) -#define ADDSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) -#define ADDSDrr(RS, RD) _SSESDrr(X86_SSE_ADD, RS, RD) -#define ADDSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) - -#define ANDNPSrr(RS, RD) _SSEPSrr(X86_SSE_ANDN, RS, RD) -#define ANDNPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) -#define ANDNPDrr(RS, RD) _SSEPDrr(X86_SSE_ANDN, RS, RD) -#define ANDNPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) - -#define ANDPSrr(RS, RD) _SSEPSrr(X86_SSE_AND, RS, RD) -#define ANDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_AND, MD, MB, MI, MS, RD) -#define ANDPDrr(RS, RD) _SSEPDrr(X86_SSE_AND, RS, RD) -#define ANDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_AND, MD, MB, MI, MS, RD) - -#define CMPPSrr(IM, RS, RD) _SSEPSirr(X86_SSE_CMP, IM, RS, RD) -#define CMPPSmr(IM, MD, MB, MI, MS, RD) _SSEPSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) -#define CMPPDrr(IM, RS, RD) _SSEPDirr(X86_SSE_CMP, IM, RS, RD) -#define CMPPDmr(IM, MD, MB, MI, MS, RD) _SSEPDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) - -#define CMPSSrr(IM, RS, RD) _SSESSirr(X86_SSE_CMP, IM, RS, RD) -#define CMPSSmr(IM, MD, MB, MI, MS, RD) _SSESSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) -#define CMPSDrr(IM, RS, RD) _SSESDirr(X86_SSE_CMP, IM, RS, RD) -#define CMPSDmr(IM, MD, MB, MI, MS, RD) _SSESDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) - -#define DIVPSrr(RS, RD) _SSEPSrr(X86_SSE_DIV, RS, RD) -#define DIVPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) -#define DIVPDrr(RS, RD) _SSEPDrr(X86_SSE_DIV, RS, RD) -#define DIVPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) - -#define DIVSSrr(RS, RD) _SSESSrr(X86_SSE_DIV, RS, RD) -#define DIVSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) -#define DIVSDrr(RS, RD) _SSESDrr(X86_SSE_DIV, RS, RD) -#define DIVSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) - -#define MAXPSrr(RS, RD) _SSEPSrr(X86_SSE_MAX, RS, RD) -#define MAXPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) -#define MAXPDrr(RS, RD) _SSEPDrr(X86_SSE_MAX, RS, RD) -#define MAXPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) - -#define MAXSSrr(RS, RD) _SSESSrr(X86_SSE_MAX, RS, RD) -#define MAXSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) -#define MAXSDrr(RS, RD) _SSESDrr(X86_SSE_MAX, RS, RD) -#define MAXSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) - -#define MINPSrr(RS, RD) _SSEPSrr(X86_SSE_MIN, RS, RD) -#define MINPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) -#define MINPDrr(RS, RD) _SSEPDrr(X86_SSE_MIN, RS, RD) -#define MINPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) - -#define MINSSrr(RS, RD) _SSESSrr(X86_SSE_MIN, RS, RD) -#define MINSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) -#define MINSDrr(RS, RD) _SSESDrr(X86_SSE_MIN, RS, RD) -#define MINSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) - -#define MULPSrr(RS, RD) _SSEPSrr(X86_SSE_MUL, RS, RD) -#define MULPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) -#define MULPDrr(RS, RD) _SSEPDrr(X86_SSE_MUL, RS, RD) -#define MULPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) - -#define MULSSrr(RS, RD) _SSESSrr(X86_SSE_MUL, RS, RD) -#define MULSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) -#define MULSDrr(RS, RD) _SSESDrr(X86_SSE_MUL, RS, RD) -#define MULSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) - -#define ORPSrr(RS, RD) _SSEPSrr(X86_SSE_OR, RS, RD) -#define ORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_OR, MD, MB, MI, MS, RD) -#define ORPDrr(RS, RD) _SSEPDrr(X86_SSE_OR, RS, RD) -#define ORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_OR, MD, MB, MI, MS, RD) - -#define RCPPSrr(RS, RD) _SSEPSrr(X86_SSE_RCP, RS, RD) -#define RCPPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) -#define RCPSSrr(RS, RD) _SSESSrr(X86_SSE_RCP, RS, RD) -#define RCPSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) - -#define RSQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_RSQRT, RS, RD) -#define RSQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) -#define RSQRTSSrr(RS, RD) _SSESSrr(X86_SSE_RSQRT, RS, RD) -#define RSQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) - -#define SQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_SQRT, RS, RD) -#define SQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) -#define SQRTPDrr(RS, RD) _SSEPDrr(X86_SSE_SQRT, RS, RD) -#define SQRTPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) - -#define SQRTSSrr(RS, RD) _SSESSrr(X86_SSE_SQRT, RS, RD) -#define SQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) -#define SQRTSDrr(RS, RD) _SSESDrr(X86_SSE_SQRT, RS, RD) -#define SQRTSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) - -#define SUBPSrr(RS, RD) _SSEPSrr(X86_SSE_SUB, RS, RD) -#define SUBPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) -#define SUBPDrr(RS, RD) _SSEPDrr(X86_SSE_SUB, RS, RD) -#define SUBPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) - -#define SUBSSrr(RS, RD) _SSESSrr(X86_SSE_SUB, RS, RD) -#define SUBSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) -#define SUBSDrr(RS, RD) _SSESDrr(X86_SSE_SUB, RS, RD) -#define SUBSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) - -#define XORPSrr(RS, RD) _SSEPSrr(X86_SSE_XOR, RS, RD) -#define XORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_XOR, MD, MB, MI, MS, RD) -#define XORPDrr(RS, RD) _SSEPDrr(X86_SSE_XOR, RS, RD) -#define XORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_XOR, MD, MB, MI, MS, RD) - -#define COMISSrr(RS, RD) _SSEPSrr(X86_SSE_COMI, RS, RD) -#define COMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_COMI, MD, MB, MI, MS, RD) -#define COMISDrr(RS, RD) _SSEPDrr(X86_SSE_COMI, RS, RD) -#define COMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_COMI, MD, MB, MI, MS, RD) - -#define UCOMISSrr(RS, RD) _SSEPSrr(X86_SSE_UCOMI, RS, RD) -#define UCOMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) -#define UCOMISDrr(RS, RD) _SSEPDrr(X86_SSE_UCOMI, RS, RD) -#define UCOMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) - -#define MOVAPSrr(RS, RD) _SSEPSrr(0x28, RS, RD) -#define MOVAPSmr(MD, MB, MI, MS, RD) _SSEPSmr(0x28, MD, MB, MI, MS, RD) -#define MOVAPSrm(RS, MD, MB, MI, MS) _SSEPSrm(0x29, RS, MD, MB, MI, MS) - -#define MOVAPDrr(RS, RD) _SSEPDrr(0x28, RS, RD) -#define MOVAPDmr(MD, MB, MI, MS, RD) _SSEPDmr(0x28, MD, MB, MI, MS, RD) -#define MOVAPDrm(RS, MD, MB, MI, MS) _SSEPDrm(0x29, RS, MD, MB, MI, MS) - -#define CVTDQ2PDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTDQ2PD, RS,_rX, RD,_rX) -#define CVTDQ2PDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTDQ2PD, MD, MB, MI, MS, RD,_rX) -#define CVTDQ2PSrr(RS, RD) __SSELrr( X86_SSE_CVTDQ2PS, RS,_rX, RD,_rX) -#define CVTDQ2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTDQ2PS, MD, MB, MI, MS, RD,_rX) -#define CVTPD2DQrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTPD2DQ, RS,_rX, RD,_rX) -#define CVTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTPD2DQ, MD, MB, MI, MS, RD,_rX) -#define CVTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PI, RS,_rX, RD,_rM) -#define CVTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PI, MD, MB, MI, MS, RD,_rM) -#define CVTPD2PSrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PS, RS,_rX, RD,_rX) -#define CVTPD2PSmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PS, MD, MB, MI, MS, RD,_rX) -#define CVTPI2PDrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPI2PD, RS,_rM, RD,_rX) -#define CVTPI2PDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPI2PD, MD, MB, MI, MS, RD,_rX) -#define CVTPI2PSrr(RS, RD) __SSELrr( X86_SSE_CVTPI2PS, RS,_rM, RD,_rX) -#define CVTPI2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPI2PS, MD, MB, MI, MS, RD,_rX) -#define CVTPS2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPS2DQ, RS,_rX, RD,_rX) -#define CVTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPS2DQ, MD, MB, MI, MS, RD,_rX) -#define CVTPS2PDrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PD, RS,_rX, RD,_rX) -#define CVTPS2PDmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PD, MD, MB, MI, MS, RD,_rX) -#define CVTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PI, RS,_rX, RD,_rM) -#define CVTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PI, MD, MB, MI, MS, RD,_rM) -#define CVTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r4) -#define CVTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r4) -#define CVTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r8) -#define CVTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r8) -#define CVTSD2SSrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SS, RS,_rX, RD,_rX) -#define CVTSD2SSmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SS, MD, MB, MI, MS, RD,_rX) -#define CVTSI2SDLrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSI2SD, RS,_r4, RD,_rX) -#define CVTSI2SDLmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) -#define CVTSI2SDQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSI2SD, RS,_r8, RD,_rX) -#define CVTSI2SDQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) -#define CVTSI2SSLrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSI2SS, RS,_r4, RD,_rX) -#define CVTSI2SSLmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) -#define CVTSI2SSQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSI2SS, RS,_r8, RD,_rX) -#define CVTSI2SSQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) -#define CVTSS2SDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SD, RS,_rX, RD,_rX) -#define CVTSS2SDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SD, MD, MB, MI, MS, RD,_rX) -#define CVTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r4) -#define CVTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r4) -#define CVTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r8) -#define CVTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r8) -#define CVTTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2PI, RS,_rX, RD,_rM) -#define CVTTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2PI, MD, MB, MI, MS, RD,_rM) -#define CVTTPD2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2DQ, RS,_rX, RD,_rX) -#define CVTTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2DQ, MD, MB, MI, MS, RD,_rX) -#define CVTTPS2DQrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTPS2DQ, RS,_rX, RD,_rX) -#define CVTTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTPS2DQ, MD, MB, MI, MS, RD,_rX) -#define CVTTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTTPS2PI, RS,_rX, RD,_rM) -#define CVTTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTTPS2PI, MD, MB, MI, MS, RD,_rM) -#define CVTTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r4) -#define CVTTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r4) -#define CVTTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r8) -#define CVTTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r8) -#define CVTTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r4) -#define CVTTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r4) -#define CVTTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r8) -#define CVTTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r8) - -#define MOVDXDrr(RS, RD) _SSELrr(0x66, 0x6e, RS,_r4, RD,_rX) -#define MOVDXDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) -#define MOVQXDrr(RS, RD) _SSEQrr(0x66, 0x6e, RS,_r8, RD,_rX) -#define MOVQXDmr(MD, MB, MI, MS, RD) _SSEQmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) - -#define MOVDXSrr(RS, RD) _SSELrr(0x66, 0x7e, RD,_r4, RS,_rX) -#define MOVDXSrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) -#define MOVQXSrr(RS, RD) _SSEQrr(0x66, 0x7e, RD,_r8, RS,_rX) -#define MOVQXSrm(RS, MD, MB, MI, MS) _SSEQrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) - -#define MOVDLMrr(RS, RD) __SSELrr( 0x6e, RS,_r4, RD,_rM) -#define MOVDLMmr(MD, MB, MI, MS, RD) __SSELmr( 0x6e, MD, MB, MI, MS, RD,_rM) -#define MOVDQMrr(RS, RD) __SSEQrr( 0x6e, RS,_r8, RD,_rM) -#define MOVDQMmr(MD, MB, MI, MS, RD) __SSEQmr( 0x6e, MD, MB, MI, MS, RD,_rM) - -#define MOVDMLrr(RS, RD) __SSELrr( 0x7e, RS,_rM, RD,_r4) -#define MOVDMLrm(RS, MD, MB, MI, MS) __SSELrm( 0x7e, RS,_rM, MD, MB, MI, MS) -#define MOVDMQrr(RS, RD) __SSEQrr( 0x7e, RS,_rM, RD,_r8) -#define MOVDMQrm(RS, MD, MB, MI, MS) __SSEQrm( 0x7e, RS,_rM, MD, MB, MI, MS) - -#define MOVDQ2Qrr(RS, RD) _SSELrr(0xf2, 0xd6, RS,_rX, RD,_rM) -#define MOVMSKPSrr(RS, RD) __SSELrr( 0x50, RS,_rX, RD,_r4) -#define MOVMSKPDrr(RS, RD) _SSELrr(0x66, 0x50, RS,_rX, RD,_r4) - -#define MOVHLPSrr(RS, RD) __SSELrr( 0x12, RS,_rX, RD,_rX) -#define MOVLHPSrr(RS, RD) __SSELrr( 0x16, RS,_rX, RD,_rX) - -#define MOVDQArr(RS, RD) _SSELrr(0x66, 0x6f, RS,_rX, RD,_rX) -#define MOVDQAmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6f, MD, MB, MI, MS, RD,_rX) -#define MOVDQArm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7f, RS,_rX, MD, MB, MI, MS) - -#define MOVDQUrr(RS, RD) _SSELrr(0xf3, 0x6f, RS,_rX, RD,_rX) -#define MOVDQUmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, 0x6f, MD, MB, MI, MS, RD,_rX) -#define MOVDQUrm(RS, MD, MB, MI, MS) _SSELrm(0xf3, 0x7f, RS,_rX, MD, MB, MI, MS) - -#define MOVHPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x16, MD, MB, MI, MS, RD,_rX) -#define MOVHPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x17, RS,_rX, MD, MB, MI, MS) -#define MOVHPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x16, MD, MB, MI, MS, RD,_rX) -#define MOVHPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x17, RS,_rX, MD, MB, MI, MS) - -#define MOVLPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x12, MD, MB, MI, MS, RD,_rX) -#define MOVLPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x13, RS,_rX, MD, MB, MI, MS) -#define MOVLPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x12, MD, MB, MI, MS, RD,_rX) -#define MOVLPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x13, RS,_rX, MD, MB, MI, MS) - - -/* --- Floating-Point instructions ----------------------------------------- */ - -enum { - X86_F2XM1 = 0xd9f0, - X86_FABS = 0xd9e1, - X86_FADD = 0xd8c0, // m32fp, m64fp, sti0, st0i, pst0i - X86_FIADD = 0xda00, // m32int, m16int - X86_FBLD = 0xdf04, // mem - X86_FBSTP = 0xdf06, // mem - X86_FCHS = 0xd9e0, - X86_FCMOVB = 0xdac0, // sti0 - X86_FCMOVE = 0xdac8, // sti0 - X86_FCMOVBE = 0xdad0, // sti0 - X86_FCMOVU = 0xdad8, // sti0 - X86_FCMOVNB = 0xdbc0, // sti0 - X86_FCMOVNE = 0xdbc8, // sti0 - X86_FCMOVNBE = 0xdbd0, // sti0 - X86_FCMOVNU = 0xdbd8, // sti0 - X86_FCOM = 0xd8d2, // m32fp, m64fp, sti - X86_FCOMP = 0xd8db, // m32fp, m64fp, sti - X86_FCOMPP = 0xded9, - X86_FCOMI = 0xdbf0, // sti0 - X86_FCOMIP = 0xdff0, // sti0 - X86_FUCOMI = 0xdbe8, // sti0 - X86_FUCOMIP = 0xdfe8, // sti0 - X86_FCOS = 0xd9ff, - X86_FDECSTP = 0xd9f6, - X86_FDIV = 0xd8f6, // m32fp, m64fp, sti0, st0i, pst0i - X86_FIDIV = 0xda06, // m32int, m16int - X86_FDIVR = 0xd8ff, // m32fp, m64fp, sti0, st0i, pst0i - X86_FIDIVR = 0xda07, // m32int, m16int - X86_FFREE = 0xddc0, // sti - X86_FICOM = 0xda02, // m32int, m16int - X86_FICOMP = 0xda03, // m32int, m16int - X86_FILD = 0xdb00, // m32int, m16int - X86_FILDQ = 0xdf05, // mem - X86_FINCSTP = 0xd9f7, - X86_FIST = 0xdb02, // m32int, m16int - X86_FISTP = 0xdb03, // m32int, m16int - X86_FISTPQ = 0xdf07, // mem - X86_FISTTP = 0xdb01, // m32int, m16int - X86_FISTTPQ = 0xdd01, // mem - X86_FLD = 0xd900, // m32fp, m64fp - X86_FLDT = 0xdb05, // mem - X86_FLD1 = 0xd9e8, - X86_FLDL2T = 0xd9e9, - X86_FLDL2E = 0xd9ea, - X86_FLDPI = 0xd9eb, - X86_FLDLG2 = 0xd9ec, - X86_FLDLN2 = 0xd9ed, - X86_FLDZ = 0xd9ee, - X86_FMUL = 0xd8c9, // m32fp, m64fp, sti0, st0i, pst0i - X86_FIMUL = 0xda01, // m32int, m16int - X86_FNOP = 0xd9d0, - X86_FPATAN = 0xd9f3, - X86_FPREM = 0xd9f8, - X86_FPREM1 = 0xd9f5, - X86_FPTAN = 0xd9f2, - X86_FRNDINT = 0xd9fc, - X86_FSCALE = 0xd9fd, - X86_FSIN = 0xd9fe, - X86_FSINCOS = 0xd9fb, - X86_FSQRT = 0xd9fa, - X86_FSTS = 0xd902, // mem - X86_FSTD = 0xdd02, // mem - X86_FST = 0xddd0, // sti - X86_FSTPS = 0xd903, // mem - X86_FSTPD = 0xdd03, // mem - X86_FSTPT = 0xdb07, // mem - X86_FSTP = 0xddd8, // sti - X86_FSUB = 0xd8e4, // m32fp, m64fp, sti0, st0i, pst0i - X86_FISUB = 0xda04, // m32int, m16int - X86_FSUBR = 0xd8ed, // m32fp, m64fp, sti0, st0i, pst0i - X86_FISUBR = 0xda05, // m32int, m16int - X86_FTST = 0xd9e4, - X86_FUCOM = 0xdde0, // sti - X86_FUCOMP = 0xdde8, // sti - X86_FUCOMPP = 0xdae9, - X86_FXAM = 0xd9e5, - X86_FXCH = 0xd9c8, // sti - X86_FXTRACT = 0xd9f4, - X86_FYL2X = 0xd9f1, - X86_FYL2XP1 = 0xd9f9, -}; - -#define _FPU(OP) _OO(OP) -#define _FPUm(OP, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X((OP)>>8, (OP)&7, MD, MB, MI, MS)) -#define _FPUSm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) -#define _FPUDm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) -#define _FPULm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) -#define _FPUWm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) -#define _FPUr(OP, RR) _OOr((OP)&0xfff8, _rF(RR)) -#define _FPU0r(OP, RD) _FPUr((OP)|0x400, RD) -#define _FPUr0(OP, RS) _FPUr((OP) , RS) -#define _FPUrr(OP, RS, RD) (_rST0P(RS) ? _FPU0r(OP, RD) : (_rST0P(RD) ? _FPUr0(OP, RS) : x86_emit_failure("FPU instruction without st0"))) -#define _FPUP0r(OP, RD) _FPU0r((OP)|0x200, RD) - -#define F2XM1() _FPU(X86_F2XM1) -#define FABS() _FPU(X86_FABS) -#define FADDSm(MD, MB, MI, MS) _FPUSm(X86_FADD, MD, MB, MI, MS) -#define FADDDm(MD, MB, MI, MS) _FPUDm(X86_FADD, MD, MB, MI, MS) -#define FADDP0r(RD) _FPUP0r(X86_FADD, RD) -#define FADDrr(RS, RD) _FPUrr(X86_FADD, RS, RD) -#define FADD0r(RD) _FPU0r(X86_FADD, RD) -#define FADDr0(RS) _FPUr0(X86_FADD, RS) -#define FIADDWm(MD, MB, MI, MS) _FPUWm(X86_FIADD, MD, MB, MI, MS) -#define FIADDLm(MD, MB, MI, MS) _FPULm(X86_FIADD, MD, MB, MI, MS) -#define FBLDm(MD, MB, MI, MS) _FPUm(X86_FBLD, MD, MB, MI, MS) -#define FBSTPm(MD, MB, MI, MS) _FPUm(X86_FBSTP, MD, MB, MI, MS) -#define FCHS() _FPU(X86_FCHS) -#define FCMOVBr0(RS) _FPUr0(X86_FCMOVB, RS) -#define FCMOVEr0(RS) _FPUr0(X86_FCMOVE, RS) -#define FCMOVBEr0(RS) _FPUr0(X86_FCMOVBE, RS) -#define FCMOVUr0(RS) _FPUr0(X86_FCMOVU, RS) -#define FCMOVNBr0(RS) _FPUr0(X86_FCMOVNB, RS) -#define FCMOVNEr0(RS) _FPUr0(X86_FCMOVNE, RS) -#define FCMOVNBEr0(RS) _FPUr0(X86_FCMOVNBE, RS) -#define FCMOVNUr0(RS) _FPUr0(X86_FCMOVNU, RS) -#define FCOMSm(MD, MB, MI, MS) _FPUSm(X86_FCOM, MD, MB, MI, MS) -#define FCOMDm(MD, MB, MI, MS) _FPUDm(X86_FCOM, MD, MB, MI, MS) -#define FCOMr(RD) _FPUr(X86_FCOM, RD) -#define FCOMPSm(MD, MB, MI, MS) _FPUSm(X86_FCOMP, MD, MB, MI, MS) -#define FCOMPDm(MD, MB, MI, MS) _FPUDm(X86_FCOMP, MD, MB, MI, MS) -#define FCOMPr(RD) _FPUr(X86_FCOMP, RD) -#define FCOMPP() _FPU(X86_FCOMPP) -#define FCOMIr0(RS) _FPUr0(X86_FCOMI, RS) -#define FCOMIPr0(RS) _FPUr0(X86_FCOMIP, RS) -#define FUCOMIr0(RS) _FPUr0(X86_FUCOMI, RS) -#define FUCOMIPr0(RS) _FPUr0(X86_FUCOMIP, RS) -#define FCOS() _FPU(X86_FCOS) -#define FDECSTP() _FPU(X86_FDECSTP) -#define FDIVSm(MD, MB, MI, MS) _FPUSm(X86_FDIV, MD, MB, MI, MS) -#define FDIVDm(MD, MB, MI, MS) _FPUDm(X86_FDIV, MD, MB, MI, MS) -#define FDIVP0r(RD) _FPUP0r(X86_FDIV, RD) -#define FDIVrr(RS, RD) _FPUrr(X86_FDIV, RS, RD) -#define FDIV0r(RD) _FPU0r(X86_FDIV, RD) -#define FDIVr0(RS) _FPUr0(X86_FDIV, RS) -#define FIDIVWm(MD, MB, MI, MS) _FPUWm(X86_FIDIV, MD, MB, MI, MS) -#define FIDIVLm(MD, MB, MI, MS) _FPULm(X86_FIDIV, MD, MB, MI, MS) -#define FDIVRSm(MD, MB, MI, MS) _FPUSm(X86_FDIVR, MD, MB, MI, MS) -#define FDIVRDm(MD, MB, MI, MS) _FPUDm(X86_FDIVR, MD, MB, MI, MS) -#define FDIVRP0r(RD) _FPUP0r(X86_FDIVR, RD) -#define FDIVRrr(RS, RD) _FPUrr(X86_FDIVR, RS, RD) -#define FDIVR0r(RD) _FPU0r(X86_FDIVR, RD) -#define FDIVRr0(RS) _FPUr0(X86_FDIVR, RS) -#define FIDIVRWm(MD, MB, MI, MS) _FPUWm(X86_FIDIVR, MD, MB, MI, MS) -#define FIDIVRLm(MD, MB, MI, MS) _FPULm(X86_FIDIVR, MD, MB, MI, MS) -#define FFREEr(RD) _FPUr(X86_FFREE, RD) -#define FICOMWm(MD, MB, MI, MS) _FPUWm(X86_FICOM, MD, MB, MI, MS) -#define FICOMLm(MD, MB, MI, MS) _FPULm(X86_FICOM, MD, MB, MI, MS) -#define FICOMPWm(MD, MB, MI, MS) _FPUWm(X86_FICOMP, MD, MB, MI, MS) -#define FICOMPLm(MD, MB, MI, MS) _FPULm(X86_FICOMP, MD, MB, MI, MS) -#define FILDWm(MD, MB, MI, MS) _FPUWm(X86_FILD, MD, MB, MI, MS) -#define FILDLm(MD, MB, MI, MS) _FPULm(X86_FILD, MD, MB, MI, MS) -#define FILDQm(MD, MB, MI, MS) _FPUm(X86_FILDQ, MD, MB, MI, MS) -#define FINCSTP() _FPU(X86_FINCSTP) -#define FISTWm(MD, MB, MI, MS) _FPUWm(X86_FIST, MD, MB, MI, MS) -#define FISTLm(MD, MB, MI, MS) _FPULm(X86_FIST, MD, MB, MI, MS) -#define FISTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTP, MD, MB, MI, MS) -#define FISTPLm(MD, MB, MI, MS) _FPULm(X86_FISTP, MD, MB, MI, MS) -#define FISTPQm(MD, MB, MI, MS) _FPUm(X86_FISTPQ, MD, MB, MI, MS) -#define FISTTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTTP, MD, MB, MI, MS) -#define FISTTPLm(MD, MB, MI, MS) _FPULm(X86_FISTTP, MD, MB, MI, MS) -#define FISTTPQm(MD, MB, MI, MS) _FPUm(X86_FISTTPQ, MD, MB, MI, MS) -#define FLDSm(MD, MB, MI, MS) _FPUSm(X86_FLD, MD, MB, MI, MS) -#define FLDDm(MD, MB, MI, MS) _FPUDm(X86_FLD, MD, MB, MI, MS) -#define FLDTm(MD, MB, MI, MS) _FPUm(X86_FLDT, MD, MB, MI, MS) -#define FLD1() _FPU(X86_FLD1) -#define FLDL2T() _FPU(X86_FLDL2T) -#define FLDL2E() _FPU(X86_FLDL2E) -#define FLDPI() _FPU(X86_FLDPI) -#define FLDLG2() _FPU(X86_FLDLG2) -#define FLDLN2() _FPU(X86_FLDLN2) -#define FLDZ() _FPU(X86_FLDZ) -#define FMULSm(MD, MB, MI, MS) _FPUSm(X86_FMUL, MD, MB, MI, MS) -#define FMULDm(MD, MB, MI, MS) _FPUDm(X86_FMUL, MD, MB, MI, MS) -#define FMULP0r(RD) _FPUP0r(X86_FMUL, RD) -#define FMULrr(RS, RD) _FPUrr(X86_FMUL, RS, RD) -#define FMUL0r(RD) _FPU0r(X86_FMUL, RD) -#define FMULr0(RS) _FPUr0(X86_FMUL, RS) -#define FIMULWm(MD, MB, MI, MS) _FPUWm(X86_FIMUL, MD, MB, MI, MS) -#define FIMULLm(MD, MB, MI, MS) _FPULm(X86_FIMUL, MD, MB, MI, MS) -#define FNOP() _FPU(X86_FNOP) -#define FPATAN() _FPU(X86_FPATAN) -#define FPREM() _FPU(X86_FPREM) -#define FPREM1() _FPU(X86_FPREM1) -#define FPTAN() _FPU(X86_FPTAN) -#define FRNDINT() _FPU(X86_FRNDINT) -#define FSCALE() _FPU(X86_FSCALE) -#define FSIN() _FPU(X86_FSIN) -#define FSINCOS() _FPU(X86_FSINCOS) -#define FSQRT() _FPU(X86_FSQRT) -#define FSTSm(MD, MB, MI, MS) _FPUm(X86_FSTS, MD, MB, MI, MS) -#define FSTDm(MD, MB, MI, MS) _FPUm(X86_FSTD, MD, MB, MI, MS) -#define FSTr(RD) _FPUr(X86_FST, RD) -#define FSTPSm(MD, MB, MI, MS) _FPUm(X86_FSTPS, MD, MB, MI, MS) -#define FSTPDm(MD, MB, MI, MS) _FPUm(X86_FSTPD, MD, MB, MI, MS) -#define FSTPTm(MD, MB, MI, MS) _FPUm(X86_FSTPT, MD, MB, MI, MS) -#define FSTPr(RD) _FPUr(X86_FSTP, RD) -#define FSUBSm(MD, MB, MI, MS) _FPUSm(X86_FSUB, MD, MB, MI, MS) -#define FSUBDm(MD, MB, MI, MS) _FPUDm(X86_FSUB, MD, MB, MI, MS) -#define FSUBP0r(RD) _FPUP0r(X86_FSUB, RD) -#define FSUBrr(RS, RD) _FPUrr(X86_FSUB, RS, RD) -#define FSUB0r(RD) _FPU0r(X86_FSUB, RD) -#define FSUBr0(RS) _FPUr0(X86_FSUB, RS) -#define FISUBWm(MD, MB, MI, MS) _FPUWm(X86_FISUB, MD, MB, MI, MS) -#define FISUBLm(MD, MB, MI, MS) _FPULm(X86_FISUB, MD, MB, MI, MS) -#define FSUBRSm(MD, MB, MI, MS) _FPUSm(X86_FSUBR, MD, MB, MI, MS) -#define FSUBRDm(MD, MB, MI, MS) _FPUDm(X86_FSUBR, MD, MB, MI, MS) -#define FSUBRP0r(RD) _FPUP0r(X86_FSUBR, RD) -#define FSUBRrr(RS, RD) _FPUrr(X86_FSUBR, RS, RD) -#define FSUBR0r(RD) _FPU0r(X86_FSUBR, RD) -#define FSUBRr0(RS) _FPUr0(X86_FSUBR, RS) -#define FISUBRWm(MD, MB, MI, MS) _FPUWm(X86_FISUBR, MD, MB, MI, MS) -#define FISUBRLm(MD, MB, MI, MS) _FPULm(X86_FISUBR, MD, MB, MI, MS) -#define FTST() _FPU(X86_FTST) -#define FUCOMr(RD) _FPUr(X86_FUCOM, RD) -#define FUCOMPr(RD) _FPUr(X86_FUCOMP, RD) -#define FUCOMPP() _FPU(X86_FUCOMPP) -#define FXAM() _FPU(X86_FXAM) -#define FXCHr(RD) _FPUr(X86_FXCH, RD) -#define FXTRACT() _FPU(X86_FXTRACT) -#define FYL2X() _FPU(X86_FYL2X) -#define FYL2XP1() _FPU(X86_FYL2XP1) - -#endif /* X86_RTASM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h deleted file mode 100644 index 9a612fb21..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ /dev/null @@ -1,609 +0,0 @@ -/* - * compiler/compemu.h - Public interface and definitions - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 COMPEMU_H -#define COMPEMU_H - -#include "newcpu.h" - -#if USE_JIT - -#if defined __i386__ || defined __x86_64__ -#include "flags_x86.h" -#else -#error "Unsupported JIT compiler for this architecture" -#endif - -#if JIT_DEBUG -/* dump some information (m68k block, x86 block addresses) about the compiler state */ -extern void compiler_dumpstate(void); -#endif - -/* Now that we do block chaining, and also have linked lists on each tag, - TAGMASK can be much smaller and still do its job. Saves several megs - of memory! */ -#define TAGMASK 0x0000ffff -#define TAGSIZE (TAGMASK+1) -#define MAXRUN 1024 -#define cacheline(x) (((uintptr)x)&TAGMASK) - -extern uae_u8* start_pc_p; -extern uae_u32 start_pc; - -struct blockinfo_t; - -struct cpu_history { - uae_u16 * location; -}; - -union cacheline { - cpuop_func * handler; - blockinfo_t * bi; -}; - -/* Use new spill/reload strategy when calling external functions */ -#define USE_OPTIMIZED_CALLS 0 -#if USE_OPTIMIZED_CALLS -#error implementation in progress -#endif - -/* (gb) When on, this option can save save up to 30% compilation time - * when many lazy flushes occur (e.g. apps in MacOS 8.x). - */ -#define USE_SEPARATE_BIA 1 - -/* Use chain of checksum_info_t to compute the block checksum */ -#define USE_CHECKSUM_INFO 1 - -/* Use code inlining, aka follow-up of constant jumps */ -#define USE_INLINING 1 - -/* Inlining requires the chained checksuming information */ -#if USE_INLINING -#undef USE_CHECKSUM_INFO -#define USE_CHECKSUM_INFO 1 -#endif - -/* Does flush_icache_range() only check for blocks falling in the requested range? */ -#define LAZY_FLUSH_ICACHE_RANGE 0 - -#define USE_F_ALIAS 1 -#define USE_OFFSET 1 -#define COMP_DEBUG 1 - -#if COMP_DEBUG -#define Dif(x) if (x) -#else -#define Dif(x) if (0) -#endif - -#define SCALE 2 - -#define BYTES_PER_INST 10240 /* paranoid ;-) */ -#define LONGEST_68K_INST 16 /* The number of bytes the longest possible - 68k instruction takes */ -#define MAX_CHECKSUM_LEN 2048 /* The maximum size we calculate checksums - for. Anything larger will be flushed - unconditionally even with SOFT_FLUSH */ -#define MAX_HOLD_BI 3 /* One for the current block, and up to two - for jump targets */ - -#define INDIVIDUAL_INST 0 -#if 1 -// gb-- my format from readcpu.cpp is not the same -#define FLAG_X 0x0010 -#define FLAG_N 0x0008 -#define FLAG_Z 0x0004 -#define FLAG_V 0x0002 -#define FLAG_C 0x0001 -#else -#define FLAG_C 0x0010 -#define FLAG_V 0x0008 -#define FLAG_Z 0x0004 -#define FLAG_N 0x0002 -#define FLAG_X 0x0001 -#endif -#define FLAG_CZNV (FLAG_C | FLAG_Z | FLAG_N | FLAG_V) -#define FLAG_ZNV (FLAG_Z | FLAG_N | FLAG_V) - -#define KILLTHERAT 1 /* Set to 1 to avoid some partial_rat_stalls */ - -#if defined(__x86_64__) -#define N_REGS 16 /* really only 15, but they are numbered 0-3,5-15 */ -#else -#define N_REGS 8 /* really only 7, but they are numbered 0,1,2,3,5,6,7 */ -#endif -#define N_FREGS 6 /* That leaves us two positions on the stack to play with */ - -/* Functions exposed to newcpu, or to what was moved from newcpu.c to - * compemu_support.c */ -extern void compiler_init(void); -extern void compiler_exit(void); -extern bool compiler_use_jit(void); -extern void init_comp(void); -extern void flush(int save_regs); -extern void small_flush(int save_regs); -extern void set_target(uae_u8* t); -extern uae_u8* get_target(void); -extern void freescratch(void); -extern void build_comp(void); -extern void set_cache_state(int enabled); -extern int get_cache_state(void); -extern uae_u32 get_jitted_size(void); -extern void (*flush_icache)(int n); -extern void alloc_cache(void); -extern int check_for_cache_miss(void); - -/* JIT FPU compilation */ -extern void comp_fpp_opp (uae_u32 opcode, uae_u16 extra); -extern void comp_fbcc_opp (uae_u32 opcode); -extern void comp_fscc_opp (uae_u32 opcode, uae_u16 extra); - -extern uae_u32 needed_flags; -extern cacheline cache_tags[]; -extern uae_u8* comp_pc_p; -extern void* pushall_call_handler; - -#define VREGS 32 -#define VFREGS 16 - -#define INMEM 1 -#define CLEAN 2 -#define DIRTY 3 -#define UNDEF 4 -#define ISCONST 5 - -typedef struct { - uae_u32* mem; - uae_u32 val; - uae_u8 is_swapped; - uae_u8 status; - uae_s8 realreg; /* gb-- realreg can hold -1 */ - uae_u8 realind; /* The index in the holds[] array */ - uae_u8 needflush; - uae_u8 validsize; - uae_u8 dirtysize; - uae_u8 dummy; -} reg_status; - -typedef struct { - uae_u32* mem; - double val; - uae_u8 status; - uae_s8 realreg; /* gb-- realreg can hold -1 */ - uae_u8 realind; - uae_u8 needflush; -} freg_status; - -#define PC_P 16 -#define FLAGX 17 -#define FLAGTMP 18 -#define NEXT_HANDLER 19 -#define S1 20 -#define S2 21 -#define S3 22 -#define S4 23 -#define S5 24 -#define S6 25 -#define S7 26 -#define S8 27 -#define S9 28 -#define S10 29 -#define S11 30 -#define S12 31 - -#define FP_RESULT 8 -#define FS1 9 -#define FS2 10 -#define FS3 11 - -typedef struct { - uae_u32 touched; - uae_s8 holds[VREGS]; - uae_u8 nholds; - uae_u8 canbyte; - uae_u8 canword; - uae_u8 locked; -} n_status; - -typedef struct { - uae_u32 touched; - uae_s8 holds[VFREGS]; - uae_u8 nholds; - uae_u8 locked; -} fn_status; - -/* For flag handling */ -#define NADA 1 -#define TRASH 2 -#define VALID 3 - -/* needflush values */ -#define NF_SCRATCH 0 -#define NF_TOMEM 1 -#define NF_HANDLER 2 - -typedef struct { - /* Integer part */ - reg_status state[VREGS]; - n_status nat[N_REGS]; - uae_u32 flags_on_stack; - uae_u32 flags_in_flags; - uae_u32 flags_are_important; - /* FPU part */ - freg_status fate[VFREGS]; - fn_status fat[N_FREGS]; - - /* x86 FPU part */ - uae_s8 spos[N_FREGS]; - uae_s8 onstack[6]; - uae_s8 tos; -} bigstate; - -typedef struct { - /* Integer part */ - char virt[VREGS]; - char nat[N_REGS]; -} smallstate; - -extern bigstate live; -extern int touchcnt; - - -#define IMM uae_s32 -#define R1 uae_u32 -#define R2 uae_u32 -#define R4 uae_u32 -#define W1 uae_u32 -#define W2 uae_u32 -#define W4 uae_u32 -#define RW1 uae_u32 -#define RW2 uae_u32 -#define RW4 uae_u32 -#define MEMR uae_u32 -#define MEMW uae_u32 -#define MEMRW uae_u32 - -#define FW uae_u32 -#define FR uae_u32 -#define FRW uae_u32 - -#define MIDFUNC(nargs,func,args) void func args -#define MENDFUNC(nargs,func,args) -#define COMPCALL(func) func - -#define LOWFUNC(flags,mem,nargs,func,args) static __inline__ void func args -#define LENDFUNC(flags,mem,nargs,func,args) - -/* What we expose to the outside */ -#define DECLARE_MIDFUNC(func) extern void func -DECLARE_MIDFUNC(bt_l_ri(R4 r, IMM i)); -DECLARE_MIDFUNC(bt_l_rr(R4 r, R4 b)); -DECLARE_MIDFUNC(btc_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(btc_l_rr(RW4 r, R4 b)); -DECLARE_MIDFUNC(bts_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(bts_l_rr(RW4 r, R4 b)); -DECLARE_MIDFUNC(btr_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(btr_l_rr(RW4 r, R4 b)); -DECLARE_MIDFUNC(mov_l_rm(W4 d, IMM s)); -DECLARE_MIDFUNC(call_r(R4 r)); -DECLARE_MIDFUNC(sub_l_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(mov_l_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(mov_w_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(mov_b_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(rol_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(rol_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(rol_l_rr(RW4 d, R1 r)); -DECLARE_MIDFUNC(rol_w_rr(RW2 d, R1 r)); -DECLARE_MIDFUNC(rol_b_rr(RW1 d, R1 r)); -DECLARE_MIDFUNC(shll_l_rr(RW4 d, R1 r)); -DECLARE_MIDFUNC(shll_w_rr(RW2 d, R1 r)); -DECLARE_MIDFUNC(shll_b_rr(RW1 d, R1 r)); -DECLARE_MIDFUNC(ror_b_ri(R1 r, IMM i)); -DECLARE_MIDFUNC(ror_w_ri(R2 r, IMM i)); -DECLARE_MIDFUNC(ror_l_ri(R4 r, IMM i)); -DECLARE_MIDFUNC(ror_l_rr(R4 d, R1 r)); -DECLARE_MIDFUNC(ror_w_rr(R2 d, R1 r)); -DECLARE_MIDFUNC(ror_b_rr(R1 d, R1 r)); -DECLARE_MIDFUNC(shrl_l_rr(RW4 d, R1 r)); -DECLARE_MIDFUNC(shrl_w_rr(RW2 d, R1 r)); -DECLARE_MIDFUNC(shrl_b_rr(RW1 d, R1 r)); -DECLARE_MIDFUNC(shra_l_rr(RW4 d, R1 r)); -DECLARE_MIDFUNC(shra_w_rr(RW2 d, R1 r)); -DECLARE_MIDFUNC(shra_b_rr(RW1 d, R1 r)); -DECLARE_MIDFUNC(shll_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shll_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shll_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(shrl_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shrl_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shrl_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(shra_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shra_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shra_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(setcc(W1 d, IMM cc)); -DECLARE_MIDFUNC(setcc_m(IMM d, IMM cc)); -DECLARE_MIDFUNC(cmov_b_rr(RW1 d, R1 s, IMM cc)); -DECLARE_MIDFUNC(cmov_w_rr(RW2 d, R2 s, IMM cc)); -DECLARE_MIDFUNC(cmov_l_rr(RW4 d, R4 s, IMM cc)); -DECLARE_MIDFUNC(cmov_l_rm(RW4 d, IMM s, IMM cc)); -DECLARE_MIDFUNC(bsf_l_rr(W4 d, R4 s)); -DECLARE_MIDFUNC(pop_m(IMM d)); -DECLARE_MIDFUNC(push_m(IMM d)); -DECLARE_MIDFUNC(pop_l(W4 d)); -DECLARE_MIDFUNC(push_l_i(IMM i)); -DECLARE_MIDFUNC(push_l(R4 s)); -DECLARE_MIDFUNC(clear_16(RW4 r)); -DECLARE_MIDFUNC(clear_8(RW4 r)); -DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, R2 s)); -DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, R1 s)); -DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, R2 s)); -DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, R1 s)); -DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); -DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); -DECLARE_MIDFUNC(imul_32_32(RW4 d, R4 s)); -DECLARE_MIDFUNC(mul_32_32(RW4 d, R4 s)); -DECLARE_MIDFUNC(mov_b_rr(W1 d, R1 s)); -DECLARE_MIDFUNC(mov_w_rr(W2 d, R2 s)); -DECLARE_MIDFUNC(mov_l_rrm_indexed(W4 d,R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_w_rrm_indexed(W2 d, R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_b_rrm_indexed(W1 d, R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_mrr_indexed(R4 baser, R4 index, IMM factor, R4 s)); -DECLARE_MIDFUNC(mov_w_mrr_indexed(R4 baser, R4 index, IMM factor, R2 s)); -DECLARE_MIDFUNC(mov_b_mrr_indexed(R4 baser, R4 index, IMM factor, R1 s)); -DECLARE_MIDFUNC(mov_l_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R4 s)); -DECLARE_MIDFUNC(mov_w_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R2 s)); -DECLARE_MIDFUNC(mov_b_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R1 s)); -DECLARE_MIDFUNC(mov_l_brrm_indexed(W4 d, IMM base, R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_w_brrm_indexed(W2 d, IMM base, R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_b_brrm_indexed(W1 d, IMM base, R4 baser, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_rm_indexed(W4 d, IMM base, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_rR(W4 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_rR(W2 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_rR(W1 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_l_brR(W4 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_brR(W2 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_brR(W1 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_l_Ri(R4 d, IMM i, IMM offset)); -DECLARE_MIDFUNC(mov_w_Ri(R4 d, IMM i, IMM offset)); -DECLARE_MIDFUNC(mov_b_Ri(R4 d, IMM i, IMM offset)); -DECLARE_MIDFUNC(mov_l_Rr(R4 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_Rr(R4 d, R2 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_Rr(R4 d, R1 s, IMM offset)); -DECLARE_MIDFUNC(lea_l_brr(W4 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(lea_l_brr_indexed(W4 d, R4 s, R4 index, IMM factor, IMM offset)); -DECLARE_MIDFUNC(lea_l_rr_indexed(W4 d, R4 s, R4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_bRr(R4 d, R4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_bRr(R4 d, R2 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_bRr(R4 d, R1 s, IMM offset)); -DECLARE_MIDFUNC(bswap_32(RW4 r)); -DECLARE_MIDFUNC(bswap_16(RW2 r)); -DECLARE_MIDFUNC(mov_l_rr(W4 d, R4 s)); -DECLARE_MIDFUNC(mov_l_mr(IMM d, R4 s)); -DECLARE_MIDFUNC(mov_w_mr(IMM d, R2 s)); -DECLARE_MIDFUNC(mov_w_rm(W2 d, IMM s)); -DECLARE_MIDFUNC(mov_b_mr(IMM d, R1 s)); -DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); -DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); -DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); -DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); -DECLARE_MIDFUNC(add_l_mi(IMM d, IMM s) ); -DECLARE_MIDFUNC(add_w_mi(IMM d, IMM s) ); -DECLARE_MIDFUNC(add_b_mi(IMM d, IMM s) ); -DECLARE_MIDFUNC(test_l_ri(R4 d, IMM i)); -DECLARE_MIDFUNC(test_l_rr(R4 d, R4 s)); -DECLARE_MIDFUNC(test_w_rr(R2 d, R2 s)); -DECLARE_MIDFUNC(test_b_rr(R1 d, R1 s)); -DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(and_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(and_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(and_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(or_l_rm(RW4 d, IMM s)); -DECLARE_MIDFUNC(or_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(or_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(or_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(or_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(adc_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(adc_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(adc_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(add_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(add_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(add_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(sub_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(sub_w_ri(RW2 d, IMM i)); -DECLARE_MIDFUNC(sub_b_ri(RW1 d, IMM i)); -DECLARE_MIDFUNC(add_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(add_w_ri(RW2 d, IMM i)); -DECLARE_MIDFUNC(add_b_ri(RW1 d, IMM i)); -DECLARE_MIDFUNC(sbb_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(sbb_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(sbb_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(sub_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(sub_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(sub_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(cmp_l(R4 d, R4 s)); -DECLARE_MIDFUNC(cmp_l_ri(R4 r, IMM i)); -DECLARE_MIDFUNC(cmp_w(R2 d, R2 s)); -DECLARE_MIDFUNC(cmp_b(R1 d, R1 s)); -DECLARE_MIDFUNC(xor_l(RW4 d, R4 s)); -DECLARE_MIDFUNC(xor_w(RW2 d, R2 s)); -DECLARE_MIDFUNC(xor_b(RW1 d, R1 s)); -DECLARE_MIDFUNC(live_flags(void)); -DECLARE_MIDFUNC(dont_care_flags(void)); -DECLARE_MIDFUNC(duplicate_carry(void)); -DECLARE_MIDFUNC(restore_carry(void)); -DECLARE_MIDFUNC(start_needflags(void)); -DECLARE_MIDFUNC(end_needflags(void)); -DECLARE_MIDFUNC(make_flags_live(void)); -DECLARE_MIDFUNC(call_r_11(R4 r, W4 out1, R4 in1, IMM osize, IMM isize)); -DECLARE_MIDFUNC(call_r_02(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)); -DECLARE_MIDFUNC(forget_about(W4 r)); -DECLARE_MIDFUNC(nop(void)); - -DECLARE_MIDFUNC(f_forget_about(FW r)); -DECLARE_MIDFUNC(fmov_pi(FW r)); -DECLARE_MIDFUNC(fmov_log10_2(FW r)); -DECLARE_MIDFUNC(fmov_log2_e(FW r)); -DECLARE_MIDFUNC(fmov_loge_2(FW r)); -DECLARE_MIDFUNC(fmov_1(FW r)); -DECLARE_MIDFUNC(fmov_0(FW r)); -DECLARE_MIDFUNC(fmov_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmovi_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmovi_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmovs_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmovs_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmov_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmov_ext_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmov_ext_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmov_rr(FW d, FR s)); -DECLARE_MIDFUNC(fldcw_m_indexed(R4 index, IMM base)); -DECLARE_MIDFUNC(ftst_r(FR r)); -DECLARE_MIDFUNC(dont_care_fflags(void)); -DECLARE_MIDFUNC(fsqrt_rr(FW d, FR s)); -DECLARE_MIDFUNC(fabs_rr(FW d, FR s)); -DECLARE_MIDFUNC(frndint_rr(FW d, FR s)); -DECLARE_MIDFUNC(fsin_rr(FW d, FR s)); -DECLARE_MIDFUNC(fcos_rr(FW d, FR s)); -DECLARE_MIDFUNC(ftwotox_rr(FW d, FR s)); -DECLARE_MIDFUNC(fetox_rr(FW d, FR s)); -DECLARE_MIDFUNC(flog2_rr(FW d, FR s)); -DECLARE_MIDFUNC(fneg_rr(FW d, FR s)); -DECLARE_MIDFUNC(fadd_rr(FRW d, FR s)); -DECLARE_MIDFUNC(fsub_rr(FRW d, FR s)); -DECLARE_MIDFUNC(fmul_rr(FRW d, FR s)); -DECLARE_MIDFUNC(frem_rr(FRW d, FR s)); -DECLARE_MIDFUNC(frem1_rr(FRW d, FR s)); -DECLARE_MIDFUNC(fdiv_rr(FRW d, FR s)); -DECLARE_MIDFUNC(fcmp_rr(FR d, FR s)); -DECLARE_MIDFUNC(fflags_into_flags(W2 tmp)); -#undef DECLARE_MIDFUNC - -extern int failure; -#define FAIL(x) do { failure|=x; } while (0) - -/* Convenience functions exposed to gencomp */ -extern uae_u32 m68k_pc_offset; -extern void readbyte(int address, int dest, int tmp); -extern void readword(int address, int dest, int tmp); -extern void readlong(int address, int dest, int tmp); -extern void writebyte(int address, int source, int tmp); -extern void writeword(int address, int source, int tmp); -extern void writelong(int address, int source, int tmp); -extern void writeword_clobber(int address, int source, int tmp); -extern void writelong_clobber(int address, int source, int tmp); -extern void get_n_addr(int address, int dest, int tmp); -extern void get_n_addr_jmp(int address, int dest, int tmp); -extern void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp); -/* Set native Z flag only if register is zero */ -extern void set_zero(int r, int tmp); -extern int kill_rodent(int r); -extern void sync_m68k_pc(void); -extern uae_u32 get_const(int r); -extern int is_const(int r); -extern void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond); - -#define comp_get_ibyte(o) do_get_mem_byte((uae_u8 *)(comp_pc_p + (o) + 1)) -#define comp_get_iword(o) do_get_mem_word((uae_u16 *)(comp_pc_p + (o))) -#define comp_get_ilong(o) do_get_mem_long((uae_u32 *)(comp_pc_p + (o))) - -struct blockinfo_t; - -typedef struct dep_t { - uae_u32* jmp_off; - struct blockinfo_t* target; - struct blockinfo_t* source; - struct dep_t** prev_p; - struct dep_t* next; -} dependency; - -typedef struct checksum_info_t { - uae_u8 *start_p; - uae_u32 length; - struct checksum_info_t *next; -} checksum_info; - -typedef struct blockinfo_t { - uae_s32 count; - cpuop_func* direct_handler_to_use; - cpuop_func* handler_to_use; - /* The direct handler does not check for the correct address */ - - cpuop_func* handler; - cpuop_func* direct_handler; - - cpuop_func* direct_pen; - cpuop_func* direct_pcc; - - uae_u8* pc_p; - - uae_u32 c1; - uae_u32 c2; -#if USE_CHECKSUM_INFO - checksum_info *csi; -#else - uae_u32 len; - uae_u32 min_pcp; -#endif - - struct blockinfo_t* next_same_cl; - struct blockinfo_t** prev_same_cl_p; - struct blockinfo_t* next; - struct blockinfo_t** prev_p; - - uae_u8 optlevel; - uae_u8 needed_flags; - uae_u8 status; - uae_u8 havestate; - - dependency dep[2]; /* Holds things we depend on */ - dependency* deplist; /* List of things that depend on this */ - smallstate env; - -#if JIT_DEBUG - /* (gb) size of the compiled block (direct handler) */ - uae_u32 direct_handler_size; -#endif -} blockinfo; - -#define BI_INVALID 0 -#define BI_ACTIVE 1 -#define BI_NEED_RECOMP 2 -#define BI_NEED_CHECK 3 -#define BI_CHECKING 4 -#define BI_COMPILING 5 -#define BI_FINALIZING 6 - -void execute_normal(void); -void exec_nostats(void); -void do_nothing(void); - -#else - -static __inline__ void flush_icache(int) { } -static __inline__ void build_comp() { } - -#endif /* !USE_JIT */ - -#endif /* COMPEMU_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp deleted file mode 100644 index bb536634f..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp +++ /dev/null @@ -1,1637 +0,0 @@ -/* - * compiler/compemu_fpp.cpp - Dynamic translation of FPU instructions - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -/* - * UAE - The Un*x Amiga Emulator - * - * MC68881 emulation - * - * Copyright 1996 Herman ten Brugge - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - */ - -#include "sysdeps.h" - -#include -#include - -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "main.h" -#include "compiler/compemu.h" -#include "fpu/fpu.h" -#include "fpu/flags.h" -#include "fpu/exceptions.h" -#include "fpu/rounding.h" - -#define DEBUG 0 -#include "debug.h" - -// gb-- WARNING: get_fpcr() and set_fpcr() support is experimental -#define HANDLE_FPCR 0 - -// - IEEE-based fpu core must be used -#if defined(FPU_IEEE) -# define CAN_HANDLE_FPCR -#endif - -// - Generic rounding mode and precision modes are supported if set together -#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) -# define CAN_HANDLE_FPCR -#endif - -// - X86 rounding mode and precision modes are *not* supported but might work (?!) -#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) -# define CAN_HANDLE_FPCR -#endif - -#if HANDLE_FPCR && !defined(CAN_HANDLE_FPCR) -# warning "Can't handle FPCR, will FAIL(1) at runtime" -# undef HANDLE_FPCR -# define HANDLE_FPCR 0 -#endif - -#define STATIC_INLINE static inline -#define MAKE_FPSR(r) do { fmov_rr(FP_RESULT,r); } while (0) - -#define delay nop() ;nop() -#define delay2 nop() ;nop() - -#define UNKNOWN_EXTRA 0xFFFFFFFF -static void fpuop_illg(uae_u32 opcode, uae_u32 extra) -{ -/* - if (extra == UNKNOWN_EXTRA) - printf("FPU opcode %x, extra UNKNOWN_EXTRA\n",opcode & 0xFFFF); - else - printf("FPU opcode %x, extra %x\n",opcode & 0xFFFF,extra & 0xFFFF); -*/ - op_illg(opcode); -} - -static uae_s32 temp_fp[4]; /* To convert between FP/integer */ - -/* return register number, or -1 for failure */ -STATIC_INLINE int get_fp_value (uae_u32 opcode, uae_u16 extra) -{ - uaecptr tmppc; - uae_u16 tmp; - int size; - int mode; - int reg; - double* src; - uae_u32 ad = 0; - static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; - static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; - - if ((extra & 0x4000) == 0) { - return ((extra >> 10) & 7); - } - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - switch (mode) { - case 0: - switch (size) { - case 6: - sign_extend_8_rr(S1,reg); - mov_l_mr((uintptr)temp_fp,S1); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 4: - sign_extend_16_rr(S1,reg); - mov_l_mr((uintptr)temp_fp,S1); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 0: - mov_l_mr((uintptr)temp_fp,reg); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 1: - mov_l_mr((uintptr)temp_fp,reg); - delay2; - fmovs_rm(FS1,(uintptr)temp_fp); - return FS1; - default: - return -1; - } - return -1; /* Should be unreachable */ - case 1: - return -1; /* Genuine invalid instruction */ - default: - break; - } - /* OK, we *will* have to load something from an address. Let's make - sure we know how to handle that, or quit early --- i.e. *before* - we do any postincrement/predecrement that we may regret */ - - switch (size) { - case 3: - return -1; - case 0: - case 1: - case 2: - case 4: - case 5: - case 6: - break; - default: - return -1; - } - - switch (mode) { - case 2: - ad=S1; /* We will change it, anyway ;-) */ - mov_l_rr(ad,reg+8); - break; - case 3: - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); - break; - case 4: - ad=S1; - - lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); - mov_l_rr(ad,reg+8); - break; - case 5: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(ad,ad,off); - break; - } - case 6: - { - uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - calc_disp_ea_020(reg+8,dp,ad,S2); - break; - } - case 7: - switch (reg) { - case 0: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 1: - { - uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 2: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2) --2); - ad=S1; - mov_l_ri(ad,address+PC16off); - break; - } - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ m68k_pc_offset; - ad=S1; - // Immediate addressing mode && Operation Length == Byte -> - // Use the low-order byte of the extension word. - if (size == 6) address++; - mov_l_ri(ad,address); - m68k_pc_offset+=sz2[size]; - break; - } - default: - return -1; - } - } - - switch (size) { - case 0: - readlong(ad,S2,S3); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - case 1: - readlong(ad,S2,S3); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovs_rm(FS1,(uintptr)temp_fp); - break; - case 2: - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - delay2; - fmov_ext_rm(FS1,(uintptr)(temp_fp)); - break; - case 3: - return -1; /* Some silly "packed" stuff */ - case 4: - readword(ad,S2,S3); - sign_extend_16_rr(S2,S2); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - case 5: - readlong(ad,S2,S3); - mov_l_mr(((uintptr)temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - delay2; - fmov_rm(FS1,(uintptr)(temp_fp)); - break; - case 6: - readbyte(ad,S2,S3); - sign_extend_8_rr(S2,S2); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - default: - return -1; - } - return FS1; -} - -/* return of -1 means failure, >=0 means OK */ -STATIC_INLINE int put_fp_value (int val, uae_u32 opcode, uae_u16 extra) -{ - uae_u16 tmp; - uaecptr tmppc; - int size; - int mode; - int reg; - uae_u32 ad; - static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; - static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; - - if ((extra & 0x4000) == 0) { - const int dest_reg = (extra >> 10) & 7; - fmov_rr(dest_reg, val); - // gb-- status register is affected - MAKE_FPSR(dest_reg); - return 0; - } - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - ad = (uae_u32)-1; - switch (mode) { - case 0: - switch (size) { - case 6: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_b_rm(reg,(uintptr)temp_fp); - return 0; - case 4: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_w_rm(reg,(uintptr)temp_fp); - return 0; - case 0: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(reg,(uintptr)temp_fp); - return 0; - case 1: - fmovs_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(reg,(uintptr)temp_fp); - return 0; - default: - return -1; - } - case 1: - return -1; /* genuine invalid instruction */ - default: break; - } - - /* Let's make sure we get out *before* doing something silly if - we can't handle the size */ - switch (size) { - case 0: - case 4: - case 5: - case 6: - case 2: - case 1: - break; - case 3: - default: - return -1; - } - - switch (mode) { - case 2: - ad=S1; - mov_l_rr(ad,reg+8); - break; - case 3: - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); - break; - case 4: - ad=S1; - lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); - mov_l_rr(ad,reg+8); - break; - case 5: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_rr(ad,reg+8); - add_l_ri(ad,off); - break; - } - case 6: - { - uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - calc_disp_ea_020(reg+8,dp,ad,S2); - break; - } - case 7: - switch (reg) { - case 0: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 1: - { - uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 2: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,address+PC16off); - break; - } - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - ad=S1; - mov_l_ri(ad,address); - m68k_pc_offset+=sz2[size]; - break; - } - default: - return -1; - } - } - switch (size) { - case 0: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 1: - fmovs_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 2: - fmov_ext_mr((uintptr)temp_fp,val); - delay; - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 3: return -1; /* Packed */ - - case 4: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writeword_clobber(ad,S2,S3); - break; - case 5: - fmov_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 6: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writebyte(ad,S2,S3); - break; - default: - return -1; - } - return 0; -} - -/* return -1 for failure, or register number for success */ -STATIC_INLINE int get_fp_ad (uae_u32 opcode, uae_u32 * ad) -{ - uae_u16 tmp; - uaecptr tmppc; - int mode; - int reg; - uae_s32 off; - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - switch (mode) { - case 0: - case 1: - return -1; - case 2: - case 3: - case 4: - mov_l_rr(S1,8+reg); - return S1; - *ad = m68k_areg (regs, reg); - break; - case 5: - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - - mov_l_rr(S1,8+reg); - add_l_ri(S1,off); - return S1; - case 6: - return -1; - break; - case 7: - switch (reg) { - case 0: - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - mov_l_ri(S1,off); - return S1; - case 1: - off=comp_get_ilong((m68k_pc_offset+=4)-4); - mov_l_ri(S1,off); - return S1; - case 2: - return -1; -// *ad = m68k_getpc (); -// *ad += (uae_s32) (uae_s16) next_iword (); - off=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset; - off+=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - mov_l_ri(S1,off); - return S1; - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - *ad = get_disp_ea_020 (tmppc, tmp); - break; - default: - return -1; - } - } - abort(); -} - -void comp_fdbcc_opp (uae_u32 opcode, uae_u16 extra) -{ - FAIL(1); - return; -} - -void comp_fscc_opp (uae_u32 opcode, uae_u16 extra) -{ - uae_u32 ad; - int cc; - int reg; - -#if DEBUG_FPP - printf ("fscc_opp at %08lx\n", m68k_getpc ()); - fflush (stdout); -#endif - - - if (extra&0x20) { /* only cc from 00 to 1f are defined */ - FAIL(1); - return; - } - if ((opcode & 0x38) != 0) { /* We can only do to integer register */ - FAIL(1); - return; - } - - fflags_into_flags(S2); - reg=(opcode&7); - - mov_l_ri(S1,255); - mov_l_ri(S4,0); - switch(extra&0x0f) { /* according to fpp.c, the 0x10 bit is ignored - */ - case 0: break; /* set never */ - case 1: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,4); - cmov_l_rr(S4,S2,10); break; - case 2: cmov_l_rr(S4,S1,7); break; - case 3: cmov_l_rr(S4,S1,3); break; - case 4: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,2); - cmov_l_rr(S4,S2,10); break; - case 5: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,6); - cmov_l_rr(S4,S2,10); break; - case 6: cmov_l_rr(S4,S1,5); break; - case 7: cmov_l_rr(S4,S1,11); break; - case 8: cmov_l_rr(S4,S1,10); break; - case 9: cmov_l_rr(S4,S1,4); break; - case 10: cmov_l_rr(S4,S1,10); cmov_l_rr(S4,S1,7); break; - case 11: cmov_l_rr(S4,S1,4); cmov_l_rr(S4,S1,3); break; - case 12: cmov_l_rr(S4,S1,2); break; - case 13: cmov_l_rr(S4,S1,6); break; - case 14: cmov_l_rr(S4,S1,5); cmov_l_rr(S4,S1,10); break; - case 15: mov_l_rr(S4,S1); break; - } - - if ((opcode & 0x38) == 0) { - mov_b_rr(reg,S4); - } else { - abort(); - if (get_fp_ad (opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); - } else - put_byte (ad, cc ? 0xff : 0x00); - } -} - -void comp_ftrapcc_opp (uae_u32 opcode, uaecptr oldpc) -{ - int cc; - - FAIL(1); - return; -} - -void comp_fbcc_opp (uae_u32 opcode) -{ - uae_u32 start_68k_offset=m68k_pc_offset; - uae_u32 off; - uae_u32 v1; - uae_u32 v2; - uae_u32 nh; - int cc; - - // comp_pc_p is expected to be bound to 32-bit addresses - assert((uintptr)comp_pc_p <= 0xffffffffUL); - - if (opcode&0x20) { /* only cc from 00 to 1f are defined */ - FAIL(1); - return; - } - if ((opcode&0x40)==0) { - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - } - else { - off=comp_get_ilong((m68k_pc_offset+=4)-4); - } - mov_l_ri(S1,(uintptr) - (comp_pc_p+off-(m68k_pc_offset-start_68k_offset))); - mov_l_ri(PC_P,(uintptr)comp_pc_p); - - /* Now they are both constant. Might as well fold in m68k_pc_offset */ - add_l_ri(S1,m68k_pc_offset); - add_l_ri(PC_P,m68k_pc_offset); - m68k_pc_offset=0; - - /* according to fpp.c, the 0x10 bit is ignored - (it handles exception handling, which we don't - do, anyway ;-) */ - cc=opcode&0x0f; - v1=get_const(PC_P); - v2=get_const(S1); - fflags_into_flags(S2); - - switch(cc) { - case 0: break; /* jump never */ - case 1: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,4); - cmov_l_rr(PC_P,S2,10); break; - case 2: register_branch(v1,v2,7); break; - case 3: register_branch(v1,v2,3); break; - case 4: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,2); - cmov_l_rr(PC_P,S2,10); break; - case 5: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,6); - cmov_l_rr(PC_P,S2,10); break; - case 6: register_branch(v1,v2,5); break; - case 7: register_branch(v1,v2,11); break; - case 8: register_branch(v1,v2,10); break; - case 9: register_branch(v1,v2,4); break; - case 10: - cmov_l_rr(PC_P,S1,10); - cmov_l_rr(PC_P,S1,7); break; - case 11: - cmov_l_rr(PC_P,S1,4); - cmov_l_rr(PC_P,S1,3); break; - case 12: register_branch(v1,v2,2); break; - case 13: register_branch(v1,v2,6); break; - case 14: - cmov_l_rr(PC_P,S1,5); - cmov_l_rr(PC_P,S1,10); break; - case 15: mov_l_rr(PC_P,S1); break; - } -} - - /* Floating point conditions - The "NotANumber" part could be problematic; Howver, when NaN is - encountered, the ftst instruction sets bot N and Z to 1 on the x87, - so quite often things just fall into place. This is probably not - accurate wrt the 68k FPU, but it is *as* accurate as this was before. - However, some more thought should go into fixing this stuff up so - it accurately emulates the 68k FPU. ->==> 13) & 0x7) { - case 3: /* 2nd most common */ - if (put_fp_value ((extra >> 7)&7 , opcode, extra) < 0) { - FAIL(1); - return; - - } - return; - case 6: - case 7: - { - uae_u32 ad, list = 0; - int incr = 0; - if (extra & 0x2000) { - uae_u32 ad; - - /* FMOVEM FPP->memory */ - switch ((extra >> 11) & 3) { /* Get out early if failure */ - case 0: - case 2: - break; - case 1: - case 3: - default: - FAIL(1); return; - } - ad=get_fp_ad (opcode, &ad); - if (ad<0) { - abort(); - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 1: /* dynamic pred */ - case 3: /* dynamic postinc */ - abort(); - } - if (incr < 0) { /* Predecrement */ - for (reg = 7; reg >= 0; reg--) { - if (list & 0x80) { - fmov_ext_mr((uintptr)temp_fp,reg); - delay; - sub_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - sub_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - sub_l_ri(ad,4); - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); - } - list <<= 1; - } - } - else { /* Postincrement */ - for (reg = 0; reg < 8; reg++) { - if (list & 0x80) { - fmov_ext_mr((uintptr)temp_fp,reg); - delay; - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) - mov_l_rr((opcode & 7)+8,ad); - if ((opcode & 0x38) == 0x20) - mov_l_rr((opcode & 7)+8,ad); - } else { - /* FMOVEM memory->FPP */ - - uae_u32 ad; - switch ((extra >> 11) & 3) { /* Get out early if failure */ - case 0: - case 2: - break; - case 1: - case 3: - default: - FAIL(1); return; - } - ad=get_fp_ad (opcode, &ad); - if (ad<0) { - abort(); - m68k_setpc (m68k_getpc () - 4); - write_log("no ad\n"); - fpuop_illg (opcode,extra); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 1: /* dynamic pred */ - case 3: /* dynamic postinc */ - abort(); - } - - if (incr < 0) { - // not reached - for (reg = 7; reg >= 0; reg--) { - uae_u32 wrd1, wrd2, wrd3; - if (list & 0x80) { - sub_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - sub_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - sub_l_ri(ad,4); - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - delay2; - fmov_ext_rm(reg,(uintptr)(temp_fp)); - } - list <<= 1; - } - } - else { - for (reg = 0; reg < 8; reg++) { - uae_u32 wrd1, wrd2, wrd3; - if (list & 0x80) { - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - add_l_ri(ad,4); - delay2; - fmov_ext_rm(reg,(uintptr)(temp_fp)); - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) - mov_l_rr((opcode & 7)+8,ad); - if ((opcode & 0x38) == 0x20) - mov_l_rr((opcode & 7)+8,ad); - } - } - return; - - case 4: - case 5: /* rare */ - if ((opcode & 0x30) == 0) { - if (extra & 0x2000) { - if (extra & 0x1000) { -#if HANDLE_FPCR - mov_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_mode); - or_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_precision); -#else - FAIL(1); - return; -#endif - } - if (extra & 0x0800) { - FAIL(1); - return; - } - if (extra & 0x0400) { - mov_l_rm(opcode & 15,(uintptr)&fpu.instruction_address); - return; - } - } else { - // gb-- moved here so that we may FAIL() without generating any code - if (extra & 0x0800) { - // set_fpsr(m68k_dreg (regs, opcode & 15)); - FAIL(1); - return; - } - if (extra & 0x1000) { -#if HANDLE_FPCR -#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) - FAIL(1); - return; -#endif - mov_l_rr(S1,opcode & 15); - mov_l_rr(S2,opcode & 15); - and_l_ri(S1,FPCR_ROUNDING_PRECISION); - and_l_ri(S2,FPCR_ROUNDING_MODE); - mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); - mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); -#else - FAIL(1); - return; -#endif -// return; gb-- FMOVEM could also operate on fpiar - } - if (extra & 0x0400) { - mov_l_mr((uintptr)&fpu.instruction_address,opcode & 15); -// return; gb-- we have to process all FMOVEM bits before returning - } - return; - } - } else if ((opcode & 0x3f) == 0x3c) { - if ((extra & 0x2000) == 0) { - // gb-- moved here so that we may FAIL() without generating any code - if (extra & 0x0800) { - FAIL(1); - return; - } - if (extra & 0x1000) { - uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); -#if HANDLE_FPCR -#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) - FAIL(1); - return; -#endif -// mov_l_mi((uintptr)®s.fpcr,val); - mov_l_ri(S1,val); - mov_l_ri(S2,val); - and_l_ri(S1,FPCR_ROUNDING_PRECISION); - and_l_ri(S2,FPCR_ROUNDING_MODE); - mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); - mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); -#else - FAIL(1); - return; -#endif -// return; gb-- FMOVEM could also operate on fpiar - } - if (extra & 0x0400) { - uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); - mov_l_mi((uintptr)&fpu.instruction_address,val); -// return; gb-- we have to process all FMOVEM bits before returning - } - return; - } - FAIL(1); - return; - } else if (extra & 0x2000) { - FAIL(1); - return; - } else { - FAIL(1); - return; - } - FAIL(1); - return; - - case 0: - case 2: /* Extremely common */ - reg = (extra >> 7) & 7; - if ((extra & 0xfc00) == 0x5c00) { - switch (extra & 0x7f) { - case 0x00: - fmov_pi(reg); - break; - case 0x0b: - fmov_log10_2(reg); - break; - case 0x0c: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_e); -#else - fmov_rm(reg,(uintptr)&const_e); -#endif - break; - case 0x0d: - fmov_log2_e(reg); - break; - case 0x0e: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_log10_e); -#else - fmov_rm(reg,(uintptr)&const_log10_e); -#endif - break; - case 0x0f: - fmov_0(reg); - break; - case 0x30: - fmov_loge_2(reg); - break; - case 0x31: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_loge_10); -#else - fmov_rm(reg,(uintptr)&const_loge_10); -#endif - break; - case 0x32: - fmov_1(reg); - break; - case 0x33: - case 0x34: - case 0x35: - case 0x36: - case 0x37: - case 0x38: - case 0x39: - case 0x3a: - case 0x3b: -#if USE_LONG_DOUBLE - case 0x3c: - case 0x3d: - case 0x3e: - case 0x3f: - fmov_ext_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); -#else - fmov_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); -#endif - break; - default: - /* This is not valid, so we fail */ - FAIL(1); - return; - } - return; - } - - switch (extra & 0x7f) { - case 0x00: /* FMOVE */ - case 0x40: /* Explicit rounding. This is just a quick fix. Same - * for all other cases that have three choices */ - case 0x44: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fmov_rr(reg,src); - MAKE_FPSR (src); - break; - case 0x01: /* FINT */ - FAIL(1); - return; - dont_care_fflags(); - case 0x02: /* FSINH */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x03: /* FINTRZ */ -#if USE_X86_FPUCW - /* If we have control over the CW, we can do this */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - mov_l_ri(S1,16); /* Switch to "round to zero" mode */ - fldcw_m_indexed(S1,(uae_u32)x86_fpucw); - - frndint_rr(reg,src); - - /* restore control word */ - mov_l_rm(S1,(uintptr)®s.fpcr); - and_l_ri(S1,0x000000f0); - fldcw_m_indexed(S1,(uintptr)x86_fpucw); - - MAKE_FPSR (reg); - break; -#endif - FAIL(1); - return; - break; - case 0x04: /* FSQRT */ - case 0x41: - case 0x45: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fsqrt_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x06: /* FLOGNP1 */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x08: /* FETOXM1 */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x09: /* FTANH */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x0a: /* FATAN */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x0c: /* FASIN */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x0d: /* FATANH */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x0e: /* FSIN */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fsin_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x0f: /* FTAN */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x10: /* FETOX */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fetox_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x11: /* FTWOTOX */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - ftwotox_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x12: /* FTENTOX */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x14: /* FLOGN */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x15: /* FLOG10 */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x16: /* FLOG2 */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - flog2_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x18: /* FABS */ - case 0x58: - case 0x5c: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fabs_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x19: /* FCOSH */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x1a: /* FNEG */ - case 0x5a: - case 0x5e: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fneg_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x1c: /* FACOS */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x1d: /* FCOS */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fcos_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x1e: /* FGETEXP */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x1f: /* FGETMAN */ - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x20: /* FDIV */ - case 0x60: - case 0x64: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fdiv_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x21: /* FMOD */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - frem_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x22: /* FADD */ - case 0x62: - case 0x66: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fadd_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x23: /* FMUL */ - case 0x63: - case 0x67: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fmul_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x24: /* FSGLDIV */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fdiv_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x25: /* FREM */ - // gb-- disabled because the quotient byte must be computed - // otherwise, free rotation in ClarisWorks doesn't work. - FAIL(1); - return; - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - frem1_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x26: /* FSCALE */ - dont_care_fflags(); - FAIL(1); - return; - break; - case 0x27: /* FSGLMUL */ - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fmul_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x28: /* FSUB */ - case 0x68: - case 0x6c: - dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fsub_rr(reg,src); - MAKE_FPSR (reg); - break; - case 0x30: /* FSINCOS */ - case 0x31: - case 0x32: - case 0x33: - case 0x34: - case 0x35: - case 0x36: - case 0x37: - FAIL(1); - return; - dont_care_fflags(); - break; - case 0x38: /* FCMP */ - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fmov_rr(FP_RESULT,reg); - fsub_rr(FP_RESULT,src); /* Right way? */ - break; - case 0x3a: /* FTST */ - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ - return; - } - fmov_rr(FP_RESULT,src); - break; - default: - FAIL(1); - return; - break; - } - return; - } - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); -} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp deleted file mode 100644 index f31febced..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ /dev/null @@ -1,7129 +0,0 @@ -/* - * compiler/compemu_support.cpp - Core dynamic translation engine - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING -#error "Only Real or Direct Addressing is supported with the JIT Compiler" -#endif - -#if X86_ASSEMBLY && !SAHF_SETO_PROFITABLE -#error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" -#endif - -/* NOTE: support for AMD64 assumes translation cache and other code - * buffers are allocated into a 32-bit address space because (i) B2/JIT - * code is not 64-bit clean and (ii) it's faster to resolve branches - * that way. - */ -#if !defined(__i386__) && !defined(__x86_64__) -#error "Only IA-32 and X86-64 targets are supported with the JIT Compiler" -#endif - -#define USE_MATCH 0 - -/* kludge for Brian, so he can compile under MSVC++ */ -#define USE_NORMAL_CALLING_CONVENTION 1 && defined(_MSC_VER) - -#ifndef WIN32 -#include -#include -#include -#endif - -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "vm_alloc.h" - -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "comptbl.h" -#include "compiler/compemu.h" -#include "fpu/fpu.h" -#include "fpu/flags.h" - -#define DEBUG 1 -#include "debug.h" - -#ifdef ENABLE_MON -#include "mon.h" -#endif - -#ifndef WIN32 -#define PROFILE_COMPILE_TIME 1 -#define PROFILE_UNTRANSLATED_INSNS 1 -#endif - -#if defined(__x86_64__) && 0 -#define RECORD_REGISTER_USAGE 1 -#endif - -#ifdef WIN32 -#undef write_log -#define write_log dummy_write_log -static void dummy_write_log(const char *, ...) { } -#endif - -#if JIT_DEBUG -#undef abort -#define abort() do { \ - fprintf(stderr, "Abort in file %s at line %d\n", __FILE__, __LINE__); \ - exit(EXIT_FAILURE); \ -} while (0) -#endif - -#if RECORD_REGISTER_USAGE -static uint64 reg_count[16]; -static int reg_count_local[16]; - -static int reg_count_compare(const void *ap, const void *bp) -{ - const int a = *((int *)ap); - const int b = *((int *)bp); - return reg_count[b] - reg_count[a]; -} -#endif - -#if PROFILE_COMPILE_TIME -#include -static uae_u32 compile_count = 0; -static clock_t compile_time = 0; -static clock_t emul_start_time = 0; -static clock_t emul_end_time = 0; -#endif - -#if PROFILE_UNTRANSLATED_INSNS -const int untranslated_top_ten = 20; -static uae_u32 raw_cputbl_count[65536] = { 0, }; -static uae_u16 opcode_nums[65536]; - -static int untranslated_compfn(const void *e1, const void *e2) -{ - return raw_cputbl_count[*(const uae_u16 *)e1] < raw_cputbl_count[*(const uae_u16 *)e2]; -} -#endif - -static compop_func *compfunctbl[65536]; -static compop_func *nfcompfunctbl[65536]; -static cpuop_func *nfcpufunctbl[65536]; -uae_u8* comp_pc_p; - -// From newcpu.cpp -extern bool quit_program; - -// gb-- Extra data for Basilisk II/JIT -#if JIT_DEBUG -static bool JITDebug = false; // Enable runtime disassemblers through mon? -#else -const bool JITDebug = false; // Don't use JIT debug mode at all -#endif -#if USE_INLINING -static bool follow_const_jumps = true; // Flag: translation through constant jumps -#else -const bool follow_const_jumps = false; -#endif - -const uae_u32 MIN_CACHE_SIZE = 1024; // Minimal translation cache size (1 MB) -static uae_u32 cache_size = 0; // Size of total cache allocated for compiled blocks -static uae_u32 current_cache_size = 0; // Cache grows upwards: how much has been consumed already -static bool lazy_flush = true; // Flag: lazy translation cache invalidation -static bool avoid_fpu = true; // Flag: compile FPU instructions ? -static bool have_cmov = false; // target has CMOV instructions ? -static bool have_lahf_lm = true; // target has LAHF supported in long mode ? -static bool have_rat_stall = true; // target has partial register stalls ? -const bool tune_alignment = true; // Tune code alignments for running CPU ? -const bool tune_nop_fillers = true; // Tune no-op fillers for architecture -static bool setzflg_uses_bsf = false; // setzflg virtual instruction can use native BSF instruction correctly? -static int align_loops = 32; // Align the start of loops -static int align_jumps = 32; // Align the start of jumps -static int optcount[10] = { - 10, // How often a block has to be executed before it is translated - 0, // How often to use naive translation - 0, 0, 0, 0, - -1, -1, -1, -1 -}; - -struct op_properties { - uae_u8 use_flags; - uae_u8 set_flags; - uae_u8 is_addx; - uae_u8 cflow; -}; -static op_properties prop[65536]; - -static inline int end_block(uae_u32 opcode) -{ - return (prop[opcode].cflow & fl_end_block); -} - -static inline bool is_const_jump(uae_u32 opcode) -{ - return (prop[opcode].cflow == fl_const_jump); -} - -static inline bool may_trap(uae_u32 opcode) -{ - return (prop[opcode].cflow & fl_trap) != 0; -} - -static inline unsigned int cft_map (unsigned int f) -{ -#ifndef HAVE_GET_WORD_UNSWAPPED - return f; -#else - return ((f >> 8) & 255) | ((f & 255) << 8); -#endif -} - -uae_u8* start_pc_p; -uae_u32 start_pc; -uae_u32 current_block_pc_p; -static uintptr current_block_start_target; -uae_u32 needed_flags; -static uintptr next_pc_p; -static uintptr taken_pc_p; -static int branch_cc; -static int redo_current_block; - -int segvcount=0; -int soft_flush_count=0; -int hard_flush_count=0; -int checksum_count=0; -static uae_u8* current_compile_p=NULL; -static uae_u8* max_compile_start; -static uae_u8* compiled_code=NULL; -static uae_s32 reg_alloc_run; -const int POPALLSPACE_SIZE = 1024; /* That should be enough space */ -static uae_u8* popallspace=NULL; - -void* pushall_call_handler=NULL; -static void* popall_do_nothing=NULL; -static void* popall_exec_nostats=NULL; -static void* popall_execute_normal=NULL; -static void* popall_cache_miss=NULL; -static void* popall_recompile_block=NULL; -static void* popall_check_checksum=NULL; - -/* The 68k only ever executes from even addresses. So right now, we - * waste half the entries in this array - * UPDATE: We now use those entries to store the start of the linked - * lists that we maintain for each hash result. - */ -cacheline cache_tags[TAGSIZE]; -int letit=0; -blockinfo* hold_bi[MAX_HOLD_BI]; -blockinfo* active; -blockinfo* dormant; - -/* 68040 */ -extern struct cputbl op_smalltbl_0_nf[]; -extern struct comptbl op_smalltbl_0_comp_nf[]; -extern struct comptbl op_smalltbl_0_comp_ff[]; - -/* 68020 + 68881 */ -extern struct cputbl op_smalltbl_1_nf[]; - -/* 68020 */ -extern struct cputbl op_smalltbl_2_nf[]; - -/* 68010 */ -extern struct cputbl op_smalltbl_3_nf[]; - -/* 68000 */ -extern struct cputbl op_smalltbl_4_nf[]; - -/* 68000 slow but compatible. */ -extern struct cputbl op_smalltbl_5_nf[]; - -static void flush_icache_hard(int n); -static void flush_icache_lazy(int n); -static void flush_icache_none(int n); -void (*flush_icache)(int n) = flush_icache_none; - - - -bigstate live; -smallstate empty_ss; -smallstate default_ss; -static int optlev; - -static int writereg(int r, int size); -static void unlock2(int r); -static void setlock(int r); -static int readreg_specific(int r, int size, int spec); -static int writereg_specific(int r, int size, int spec); -static void prepare_for_call_1(void); -static void prepare_for_call_2(void); -static void align_target(uae_u32 a); - -static uae_s32 nextused[VREGS]; - -uae_u32 m68k_pc_offset; - -/* Some arithmetic ooperations can be optimized away if the operands - * are known to be constant. But that's only a good idea when the - * side effects they would have on the flags are not important. This - * variable indicates whether we need the side effects or not - */ -uae_u32 needflags=0; - -/* Flag handling is complicated. - * - * x86 instructions create flags, which quite often are exactly what we - * want. So at times, the "68k" flags are actually in the x86 flags. - * - * Then again, sometimes we do x86 instructions that clobber the x86 - * flags, but don't represent a corresponding m68k instruction. In that - * case, we have to save them. - * - * We used to save them to the stack, but now store them back directly - * into the regflags.cznv of the traditional emulation. Thus some odd - * names. - * - * So flags can be in either of two places (used to be three; boy were - * things complicated back then!); And either place can contain either - * valid flags or invalid trash (and on the stack, there was also the - * option of "nothing at all", now gone). A couple of variables keep - * track of the respective states. - * - * To make things worse, we might or might not be interested in the flags. - * by default, we are, but a call to dont_care_flags can change that - * until the next call to live_flags. If we are not, pretty much whatever - * is in the register and/or the native flags is seen as valid. - */ - -static __inline__ blockinfo* get_blockinfo(uae_u32 cl) -{ - return cache_tags[cl+1].bi; -} - -static __inline__ blockinfo* get_blockinfo_addr(void* addr) -{ - blockinfo* bi=get_blockinfo(cacheline(addr)); - - while (bi) { - if (bi->pc_p==addr) - return bi; - bi=bi->next_same_cl; - } - return NULL; -} - - -/******************************************************************* - * All sorts of list related functions for all of the lists * - *******************************************************************/ - -static __inline__ void remove_from_cl_list(blockinfo* bi) -{ - uae_u32 cl=cacheline(bi->pc_p); - - if (bi->prev_same_cl_p) - *(bi->prev_same_cl_p)=bi->next_same_cl; - if (bi->next_same_cl) - bi->next_same_cl->prev_same_cl_p=bi->prev_same_cl_p; - if (cache_tags[cl+1].bi) - cache_tags[cl].handler=cache_tags[cl+1].bi->handler_to_use; - else - cache_tags[cl].handler=(cpuop_func *)popall_execute_normal; -} - -static __inline__ void remove_from_list(blockinfo* bi) -{ - if (bi->prev_p) - *(bi->prev_p)=bi->next; - if (bi->next) - bi->next->prev_p=bi->prev_p; -} - -static __inline__ void remove_from_lists(blockinfo* bi) -{ - remove_from_list(bi); - remove_from_cl_list(bi); -} - -static __inline__ void add_to_cl_list(blockinfo* bi) -{ - uae_u32 cl=cacheline(bi->pc_p); - - if (cache_tags[cl+1].bi) - cache_tags[cl+1].bi->prev_same_cl_p=&(bi->next_same_cl); - bi->next_same_cl=cache_tags[cl+1].bi; - - cache_tags[cl+1].bi=bi; - bi->prev_same_cl_p=&(cache_tags[cl+1].bi); - - cache_tags[cl].handler=bi->handler_to_use; -} - -static __inline__ void raise_in_cl_list(blockinfo* bi) -{ - remove_from_cl_list(bi); - add_to_cl_list(bi); -} - -static __inline__ void add_to_active(blockinfo* bi) -{ - if (active) - active->prev_p=&(bi->next); - bi->next=active; - - active=bi; - bi->prev_p=&active; -} - -static __inline__ void add_to_dormant(blockinfo* bi) -{ - if (dormant) - dormant->prev_p=&(bi->next); - bi->next=dormant; - - dormant=bi; - bi->prev_p=&dormant; -} - -static __inline__ void remove_dep(dependency* d) -{ - if (d->prev_p) - *(d->prev_p)=d->next; - if (d->next) - d->next->prev_p=d->prev_p; - d->prev_p=NULL; - d->next=NULL; -} - -/* This block's code is about to be thrown away, so it no longer - depends on anything else */ -static __inline__ void remove_deps(blockinfo* bi) -{ - remove_dep(&(bi->dep[0])); - remove_dep(&(bi->dep[1])); -} - -static __inline__ void adjust_jmpdep(dependency* d, cpuop_func* a) -{ - *(d->jmp_off)=(uintptr)a-((uintptr)d->jmp_off+4); -} - -/******************************************************************** - * Soft flush handling support functions * - ********************************************************************/ - -static __inline__ void set_dhtu(blockinfo* bi, cpuop_func* dh) -{ - //write_log("bi is %p\n",bi); - if (dh!=bi->direct_handler_to_use) { - dependency* x=bi->deplist; - //write_log("bi->deplist=%p\n",bi->deplist); - while (x) { - //write_log("x is %p\n",x); - //write_log("x->next is %p\n",x->next); - //write_log("x->prev_p is %p\n",x->prev_p); - - if (x->jmp_off) { - adjust_jmpdep(x,dh); - } - x=x->next; - } - bi->direct_handler_to_use=dh; - } -} - -static __inline__ void invalidate_block(blockinfo* bi) -{ - int i; - - bi->optlevel=0; - bi->count=optcount[0]-1; - bi->handler=NULL; - bi->handler_to_use=(cpuop_func *)popall_execute_normal; - bi->direct_handler=NULL; - set_dhtu(bi,bi->direct_pen); - bi->needed_flags=0xff; - bi->status=BI_INVALID; - for (i=0;i<2;i++) { - bi->dep[i].jmp_off=NULL; - bi->dep[i].target=NULL; - } - remove_deps(bi); -} - -static __inline__ void create_jmpdep(blockinfo* bi, int i, uae_u32* jmpaddr, uae_u32 target) -{ - blockinfo* tbi=get_blockinfo_addr((void*)(uintptr)target); - - Dif(!tbi) { - write_log("Could not create jmpdep!\n"); - abort(); - } - bi->dep[i].jmp_off=jmpaddr; - bi->dep[i].source=bi; - bi->dep[i].target=tbi; - bi->dep[i].next=tbi->deplist; - if (bi->dep[i].next) - bi->dep[i].next->prev_p=&(bi->dep[i].next); - bi->dep[i].prev_p=&(tbi->deplist); - tbi->deplist=&(bi->dep[i]); -} - -static __inline__ void block_need_recompile(blockinfo * bi) -{ - uae_u32 cl = cacheline(bi->pc_p); - - set_dhtu(bi, bi->direct_pen); - bi->direct_handler = bi->direct_pen; - - bi->handler_to_use = (cpuop_func *)popall_execute_normal; - bi->handler = (cpuop_func *)popall_execute_normal; - if (bi == cache_tags[cl + 1].bi) - cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; - bi->status = BI_NEED_RECOMP; -} - -static __inline__ void mark_callers_recompile(blockinfo * bi) -{ - dependency *x = bi->deplist; - - while (x) { - dependency *next = x->next; /* This disappears when we mark for - * recompilation and thus remove the - * blocks from the lists */ - if (x->jmp_off) { - blockinfo *cbi = x->source; - - Dif(cbi->status == BI_INVALID) { - // write_log("invalid block in dependency list\n"); // FIXME? - // abort(); - } - if (cbi->status == BI_ACTIVE || cbi->status == BI_NEED_CHECK) { - block_need_recompile(cbi); - mark_callers_recompile(cbi); - } - else if (cbi->status == BI_COMPILING) { - redo_current_block = 1; - } - else if (cbi->status == BI_NEED_RECOMP) { - /* nothing */ - } - else { - //write_log("Status %d in mark_callers\n",cbi->status); // FIXME? - } - } - x = next; - } -} - -static __inline__ blockinfo* get_blockinfo_addr_new(void* addr, int setstate) -{ - blockinfo* bi=get_blockinfo_addr(addr); - int i; - - if (!bi) { - for (i=0;ipc_p=(uae_u8 *)addr; - invalidate_block(bi); - add_to_active(bi); - add_to_cl_list(bi); - - } - } - } - if (!bi) { - write_log("Looking for blockinfo, can't find free one\n"); - abort(); - } - return bi; -} - -static void prepare_block(blockinfo* bi); - -/* Managment of blockinfos. - - A blockinfo struct is allocated whenever a new block has to be - compiled. If the list of free blockinfos is empty, we allocate a new - pool of blockinfos and link the newly created blockinfos altogether - into the list of free blockinfos. Otherwise, we simply pop a structure - off the free list. - - Blockinfo are lazily deallocated, i.e. chained altogether in the - list of free blockinfos whenvever a translation cache flush (hard or - soft) request occurs. -*/ - -template< class T > -class LazyBlockAllocator -{ - enum { - kPoolSize = 1 + 4096 / sizeof(T) - }; - struct Pool { - T chunk[kPoolSize]; - Pool * next; - }; - Pool * mPools; - T * mChunks; -public: - LazyBlockAllocator() : mPools(0), mChunks(0) { } - ~LazyBlockAllocator(); - T * acquire(); - void release(T * const); -}; - -template< class T > -LazyBlockAllocator::~LazyBlockAllocator() -{ - Pool * currentPool = mPools; - while (currentPool) { - Pool * deadPool = currentPool; - currentPool = currentPool->next; - free(deadPool); - } -} - -template< class T > -T * LazyBlockAllocator::acquire() -{ - if (!mChunks) { - // There is no chunk left, allocate a new pool and link the - // chunks into the free list - Pool * newPool = (Pool *)malloc(sizeof(Pool)); - for (T * chunk = &newPool->chunk[0]; chunk < &newPool->chunk[kPoolSize]; chunk++) { - chunk->next = mChunks; - mChunks = chunk; - } - newPool->next = mPools; - mPools = newPool; - } - T * chunk = mChunks; - mChunks = chunk->next; - return chunk; -} - -template< class T > -void LazyBlockAllocator::release(T * const chunk) -{ - chunk->next = mChunks; - mChunks = chunk; -} - -template< class T > -class HardBlockAllocator -{ -public: - T * acquire() { - T * data = (T *)current_compile_p; - current_compile_p += sizeof(T); - return data; - } - - void release(T * const chunk) { - // Deallocated on invalidation - } -}; - -#if USE_SEPARATE_BIA -static LazyBlockAllocator BlockInfoAllocator; -static LazyBlockAllocator ChecksumInfoAllocator; -#else -static HardBlockAllocator BlockInfoAllocator; -static HardBlockAllocator ChecksumInfoAllocator; -#endif - -static __inline__ checksum_info *alloc_checksum_info(void) -{ - checksum_info *csi = ChecksumInfoAllocator.acquire(); - csi->next = NULL; - return csi; -} - -static __inline__ void free_checksum_info(checksum_info *csi) -{ - csi->next = NULL; - ChecksumInfoAllocator.release(csi); -} - -static __inline__ void free_checksum_info_chain(checksum_info *csi) -{ - while (csi != NULL) { - checksum_info *csi2 = csi->next; - free_checksum_info(csi); - csi = csi2; - } -} - -static __inline__ blockinfo *alloc_blockinfo(void) -{ - blockinfo *bi = BlockInfoAllocator.acquire(); -#if USE_CHECKSUM_INFO - bi->csi = NULL; -#endif - return bi; -} - -static __inline__ void free_blockinfo(blockinfo *bi) -{ -#if USE_CHECKSUM_INFO - free_checksum_info_chain(bi->csi); - bi->csi = NULL; -#endif - BlockInfoAllocator.release(bi); -} - -static __inline__ void alloc_blockinfos(void) -{ - int i; - blockinfo* bi; - - for (i=0;i>24)&0xff) | ((v>>8)&0xff00) | ((v<<8)&0xff0000) | ((v<<24)&0xff000000); -#endif -} - -/******************************************************************** - * Getting the information about the target CPU * - ********************************************************************/ - -#include "codegen_x86.cpp" - -void set_target(uae_u8* t) -{ - target=t; -} - -static __inline__ uae_u8* get_target_noopt(void) -{ - return target; -} - -__inline__ uae_u8* get_target(void) -{ - return get_target_noopt(); -} - - -/******************************************************************** - * Flags status handling. EMIT TIME! * - ********************************************************************/ - -static void bt_l_ri_noclobber(R4 r, IMM i); - -static void make_flags_live_internal(void) -{ - if (live.flags_in_flags==VALID) - return; - Dif (live.flags_on_stack==TRASH) { - write_log("Want flags, got something on stack, but it is TRASH\n"); - abort(); - } - if (live.flags_on_stack==VALID) { - int tmp; - tmp=readreg_specific(FLAGTMP,4,FLAG_NREG2); - raw_reg_to_flags(tmp); - unlock2(tmp); - - live.flags_in_flags=VALID; - return; - } - write_log("Huh? live.flags_in_flags=%d, live.flags_on_stack=%d, but need to make live\n", - live.flags_in_flags,live.flags_on_stack); - abort(); -} - -static void flags_to_stack(void) -{ - if (live.flags_on_stack==VALID) - return; - if (!live.flags_are_important) { - live.flags_on_stack=VALID; - return; - } - Dif (live.flags_in_flags!=VALID) - abort(); - else { - int tmp; - tmp=writereg_specific(FLAGTMP,4,FLAG_NREG1); - raw_flags_to_reg(tmp); - unlock2(tmp); - } - live.flags_on_stack=VALID; -} - -static __inline__ void clobber_flags(void) -{ - if (live.flags_in_flags==VALID && live.flags_on_stack!=VALID) - flags_to_stack(); - live.flags_in_flags=TRASH; -} - -/* Prepare for leaving the compiled stuff */ -static __inline__ void flush_flags(void) -{ - flags_to_stack(); - return; -} - -int touchcnt; - -/******************************************************************** - * Partial register flushing for optimized calls * - ********************************************************************/ - -struct regusage { - uae_u16 rmask; - uae_u16 wmask; -}; - -static inline void ru_set(uae_u16 *mask, int reg) -{ -#if USE_OPTIMIZED_CALLS - *mask |= 1 << reg; -#endif -} - -static inline bool ru_get(const uae_u16 *mask, int reg) -{ -#if USE_OPTIMIZED_CALLS - return (*mask & (1 << reg)); -#else - /* Default: instruction reads & write to register */ - return true; -#endif -} - -static inline void ru_set_read(regusage *ru, int reg) -{ - ru_set(&ru->rmask, reg); -} - -static inline void ru_set_write(regusage *ru, int reg) -{ - ru_set(&ru->wmask, reg); -} - -static inline bool ru_read_p(const regusage *ru, int reg) -{ - return ru_get(&ru->rmask, reg); -} - -static inline bool ru_write_p(const regusage *ru, int reg) -{ - return ru_get(&ru->wmask, reg); -} - -static void ru_fill_ea(regusage *ru, int reg, amodes mode, - wordsizes size, int write_mode) -{ - switch (mode) { - case Areg: - reg += 8; - /* fall through */ - case Dreg: - ru_set(write_mode ? &ru->wmask : &ru->rmask, reg); - break; - case Ad16: - /* skip displacment */ - m68k_pc_offset += 2; - case Aind: - case Aipi: - case Apdi: - ru_set_read(ru, reg+8); - break; - case Ad8r: - ru_set_read(ru, reg+8); - /* fall through */ - case PC8r: { - uae_u16 dp = comp_get_iword((m68k_pc_offset+=2)-2); - reg = (dp >> 12) & 15; - ru_set_read(ru, reg); - if (dp & 0x100) - m68k_pc_offset += (((dp & 0x30) >> 3) & 7) + ((dp & 3) * 2); - break; - } - case PC16: - case absw: - case imm0: - case imm1: - m68k_pc_offset += 2; - break; - case absl: - case imm2: - m68k_pc_offset += 4; - break; - case immi: - m68k_pc_offset += (size == sz_long) ? 4 : 2; - break; - } -} - -/* TODO: split into a static initialization part and a dynamic one - (instructions depending on extension words) */ -static void ru_fill(regusage *ru, uae_u32 opcode) -{ - m68k_pc_offset += 2; - - /* Default: no register is used or written to */ - ru->rmask = 0; - ru->wmask = 0; - - uae_u32 real_opcode = cft_map(opcode); - struct instr *dp = &table68k[real_opcode]; - - bool rw_dest = true; - bool handled = false; - - /* Handle some instructions specifically */ - uae_u16 ext; - switch (dp->mnemo) { - case i_BFCHG: - case i_BFCLR: - case i_BFEXTS: - case i_BFEXTU: - case i_BFFFO: - case i_BFINS: - case i_BFSET: - case i_BFTST: - ext = comp_get_iword((m68k_pc_offset+=2)-2); - if (ext & 0x800) ru_set_read(ru, (ext >> 6) & 7); - if (ext & 0x020) ru_set_read(ru, ext & 7); - ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); - if (dp->dmode == Dreg) - ru_set_read(ru, dp->dreg); - switch (dp->mnemo) { - case i_BFEXTS: - case i_BFEXTU: - case i_BFFFO: - ru_set_write(ru, (ext >> 12) & 7); - break; - case i_BFINS: - ru_set_read(ru, (ext >> 12) & 7); - /* fall through */ - case i_BFCHG: - case i_BFCLR: - case i_BSET: - if (dp->dmode == Dreg) - ru_set_write(ru, dp->dreg); - break; - } - handled = true; - rw_dest = false; - break; - - case i_BTST: - rw_dest = false; - break; - - case i_CAS: - { - ext = comp_get_iword((m68k_pc_offset+=2)-2); - int Du = ext & 7; - ru_set_read(ru, Du); - int Dc = (ext >> 6) & 7; - ru_set_read(ru, Dc); - ru_set_write(ru, Dc); - break; - } - case i_CAS2: - { - int Dc1, Dc2, Du1, Du2, Rn1, Rn2; - ext = comp_get_iword((m68k_pc_offset+=2)-2); - Rn1 = (ext >> 12) & 15; - Du1 = (ext >> 6) & 7; - Dc1 = ext & 7; - ru_set_read(ru, Rn1); - ru_set_read(ru, Du1); - ru_set_read(ru, Dc1); - ru_set_write(ru, Dc1); - ext = comp_get_iword((m68k_pc_offset+=2)-2); - Rn2 = (ext >> 12) & 15; - Du2 = (ext >> 6) & 7; - Dc2 = ext & 7; - ru_set_read(ru, Rn2); - ru_set_read(ru, Du2); - ru_set_write(ru, Dc2); - break; - } - case i_DIVL: case i_MULL: - m68k_pc_offset += 2; - break; - case i_LEA: - case i_MOVE: case i_MOVEA: case i_MOVE16: - rw_dest = false; - break; - case i_PACK: case i_UNPK: - rw_dest = false; - m68k_pc_offset += 2; - break; - case i_TRAPcc: - m68k_pc_offset += (dp->size == sz_long) ? 4 : 2; - break; - case i_RTR: - /* do nothing, just for coverage debugging */ - break; - /* TODO: handle EXG instruction */ - } - - /* Handle A-Traps better */ - if ((real_opcode & 0xf000) == 0xa000) { - handled = true; - } - - /* Handle EmulOps better */ - if ((real_opcode & 0xff00) == 0x7100) { - handled = true; - ru->rmask = 0xffff; - ru->wmask = 0; - } - - if (dp->suse && !handled) - ru_fill_ea(ru, dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); - - if (dp->duse && !handled) - ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); - - if (rw_dest) - ru->rmask |= ru->wmask; - - handled = handled || dp->suse || dp->duse; - - /* Mark all registers as used/written if the instruction may trap */ - if (may_trap(opcode)) { - handled = true; - ru->rmask = 0xffff; - ru->wmask = 0xffff; - } - - if (!handled) { - write_log("ru_fill: %04x = { %04x, %04x }\n", - real_opcode, ru->rmask, ru->wmask); - abort(); - } -} - -/******************************************************************** - * register allocation per block logging * - ********************************************************************/ - -static uae_s8 vstate[VREGS]; -static uae_s8 vwritten[VREGS]; -static uae_s8 nstate[N_REGS]; - -#define L_UNKNOWN -127 -#define L_UNAVAIL -1 -#define L_NEEDED -2 -#define L_UNNEEDED -3 - -static __inline__ void big_to_small_state(bigstate * b, smallstate * s) -{ - int i; - - for (i = 0; i < VREGS; i++) - s->virt[i] = vstate[i]; - for (i = 0; i < N_REGS; i++) - s->nat[i] = nstate[i]; -} - -static __inline__ int callers_need_recompile(bigstate * b, smallstate * s) -{ - int i; - int reverse = 0; - - for (i = 0; i < VREGS; i++) { - if (vstate[i] != L_UNNEEDED && s->virt[i] == L_UNNEEDED) - return 1; - if (vstate[i] == L_UNNEEDED && s->virt[i] != L_UNNEEDED) - reverse++; - } - for (i = 0; i < N_REGS; i++) { - if (nstate[i] >= 0 && nstate[i] != s->nat[i]) - return 1; - if (nstate[i] < 0 && s->nat[i] >= 0) - reverse++; - } - if (reverse >= 2 && USE_MATCH) - return 1; /* In this case, it might be worth recompiling the - * callers */ - return 0; -} - -static __inline__ void log_startblock(void) -{ - int i; - - for (i = 0; i < VREGS; i++) { - vstate[i] = L_UNKNOWN; - vwritten[i] = 0; - } - for (i = 0; i < N_REGS; i++) - nstate[i] = L_UNKNOWN; -} - -/* Using an n-reg for a temp variable */ -static __inline__ void log_isused(int n) -{ - if (nstate[n] == L_UNKNOWN) - nstate[n] = L_UNAVAIL; -} - -static __inline__ void log_visused(int r) -{ - if (vstate[r] == L_UNKNOWN) - vstate[r] = L_NEEDED; -} - -static __inline__ void do_load_reg(int n, int r) -{ - if (r == FLAGTMP) - raw_load_flagreg(n, r); - else if (r == FLAGX) - raw_load_flagx(n, r); - else - raw_mov_l_rm(n, (uintptr) live.state[r].mem); -} - -static __inline__ void check_load_reg(int n, int r) -{ - raw_mov_l_rm(n, (uintptr) live.state[r].mem); -} - -static __inline__ void log_vwrite(int r) -{ - vwritten[r] = 1; -} - -/* Using an n-reg to hold a v-reg */ -static __inline__ void log_isreg(int n, int r) -{ - static int count = 0; - - if (nstate[n] == L_UNKNOWN && r < 16 && !vwritten[r] && USE_MATCH) - nstate[n] = r; - else { - do_load_reg(n, r); - if (nstate[n] == L_UNKNOWN) - nstate[n] = L_UNAVAIL; - } - if (vstate[r] == L_UNKNOWN) - vstate[r] = L_NEEDED; -} - -static __inline__ void log_clobberreg(int r) -{ - if (vstate[r] == L_UNKNOWN) - vstate[r] = L_UNNEEDED; -} - -/* This ends all possibility of clever register allocation */ - -static __inline__ void log_flush(void) -{ - int i; - - for (i = 0; i < VREGS; i++) - if (vstate[i] == L_UNKNOWN) - vstate[i] = L_NEEDED; - for (i = 0; i < N_REGS; i++) - if (nstate[i] == L_UNKNOWN) - nstate[i] = L_UNAVAIL; -} - -static __inline__ void log_dump(void) -{ - int i; - - return; - - write_log("----------------------\n"); - for (i = 0; i < N_REGS; i++) { - switch (nstate[i]) { - case L_UNKNOWN: - write_log("Nat %d : UNKNOWN\n", i); - break; - case L_UNAVAIL: - write_log("Nat %d : UNAVAIL\n", i); - break; - default: - write_log("Nat %d : %d\n", i, nstate[i]); - break; - } - } - for (i = 0; i < VREGS; i++) { - if (vstate[i] == L_UNNEEDED) - write_log("Virt %d: UNNEEDED\n", i); - } -} - -/******************************************************************** - * register status handling. EMIT TIME! * - ********************************************************************/ - -static __inline__ void set_status(int r, int status) -{ - if (status == ISCONST) - log_clobberreg(r); - live.state[r].status=status; -} - -static __inline__ int isinreg(int r) -{ - return live.state[r].status==CLEAN || live.state[r].status==DIRTY; -} - -static __inline__ void adjust_nreg(int r, uae_u32 val) -{ - if (!val) - return; - raw_lea_l_brr(r,r,val); -} - -static void tomem(int r) -{ - int rr=live.state[r].realreg; - - if (isinreg(r)) { - if (live.state[r].val && live.nat[rr].nholds==1 - && !live.nat[rr].locked) { - // write_log("RemovingA offset %x from reg %d (%d) at %p\n", - // live.state[r].val,r,rr,target); - adjust_nreg(rr,live.state[r].val); - live.state[r].val=0; - live.state[r].dirtysize=4; - set_status(r,DIRTY); - } - } - - if (live.state[r].status==DIRTY) { - switch (live.state[r].dirtysize) { - case 1: raw_mov_b_mr((uintptr)live.state[r].mem,rr); break; - case 2: raw_mov_w_mr((uintptr)live.state[r].mem,rr); break; - case 4: raw_mov_l_mr((uintptr)live.state[r].mem,rr); break; - default: abort(); - } - log_vwrite(r); - set_status(r,CLEAN); - live.state[r].dirtysize=0; - } -} - -static __inline__ int isconst(int r) -{ - return live.state[r].status==ISCONST; -} - -int is_const(int r) -{ - return isconst(r); -} - -static __inline__ void writeback_const(int r) -{ - if (!isconst(r)) - return; - Dif (live.state[r].needflush==NF_HANDLER) { - write_log("Trying to write back constant NF_HANDLER!\n"); - abort(); - } - - raw_mov_l_mi((uintptr)live.state[r].mem,live.state[r].val); - log_vwrite(r); - live.state[r].val=0; - set_status(r,INMEM); -} - -static __inline__ void tomem_c(int r) -{ - if (isconst(r)) { - writeback_const(r); - } - else - tomem(r); -} - -static void evict(int r) -{ - int rr; - - if (!isinreg(r)) - return; - tomem(r); - rr=live.state[r].realreg; - - Dif (live.nat[rr].locked && - live.nat[rr].nholds==1) { - write_log("register %d in nreg %d is locked!\n",r,live.state[r].realreg); - abort(); - } - - live.nat[rr].nholds--; - if (live.nat[rr].nholds!=live.state[r].realind) { /* Was not last */ - int topreg=live.nat[rr].holds[live.nat[rr].nholds]; - int thisind=live.state[r].realind; - - live.nat[rr].holds[thisind]=topreg; - live.state[topreg].realind=thisind; - } - live.state[r].realreg=-1; - set_status(r,INMEM); -} - -static __inline__ void free_nreg(int r) -{ - int i=live.nat[r].nholds; - - while (i) { - int vr; - - --i; - vr=live.nat[r].holds[i]; - evict(vr); - } - Dif (live.nat[r].nholds!=0) { - write_log("Failed to free nreg %d, nholds is %d\n",r,live.nat[r].nholds); - abort(); - } -} - -/* Use with care! */ -static __inline__ void isclean(int r) -{ - if (!isinreg(r)) - return; - live.state[r].validsize=4; - live.state[r].dirtysize=0; - live.state[r].val=0; - set_status(r,CLEAN); -} - -static __inline__ void disassociate(int r) -{ - isclean(r); - evict(r); -} - -static __inline__ void set_const(int r, uae_u32 val) -{ - disassociate(r); - live.state[r].val=val; - set_status(r,ISCONST); -} - -static __inline__ uae_u32 get_offset(int r) -{ - return live.state[r].val; -} - -static int alloc_reg_hinted(int r, int size, int willclobber, int hint) -{ - int bestreg; - uae_s32 when; - int i; - uae_s32 badness=0; /* to shut up gcc */ - bestreg=-1; - when=2000000000; - - /* XXX use a regalloc_order table? */ - for (i=0;i0) { - free_nreg(bestreg); - } - if (isinreg(r)) { - int rr=live.state[r].realreg; - /* This will happen if we read a partially dirty register at a - bigger size */ - Dif (willclobber || live.state[r].validsize>=size) - abort(); - Dif (live.nat[rr].nholds!=1) - abort(); - if (size==4 && live.state[r].validsize==2) { - log_isused(bestreg); - log_visused(r); - raw_mov_l_rm(bestreg,(uintptr)live.state[r].mem); - raw_bswap_32(bestreg); - raw_zero_extend_16_rr(rr,rr); - raw_zero_extend_16_rr(bestreg,bestreg); - raw_bswap_32(bestreg); - raw_lea_l_brr_indexed(rr,rr,bestreg,1,0); - live.state[r].validsize=4; - live.nat[rr].touched=touchcnt++; - return rr; - } - if (live.state[r].validsize==1) { - /* Nothing yet */ - } - evict(r); - } - - if (!willclobber) { - if (live.state[r].status!=UNDEF) { - if (isconst(r)) { - raw_mov_l_ri(bestreg,live.state[r].val); - live.state[r].val=0; - live.state[r].dirtysize=4; - set_status(r,DIRTY); - log_isused(bestreg); - } - else { - log_isreg(bestreg, r); /* This will also load it! */ - live.state[r].dirtysize=0; - set_status(r,CLEAN); - } - } - else { - live.state[r].val=0; - live.state[r].dirtysize=0; - set_status(r,CLEAN); - log_isused(bestreg); - } - live.state[r].validsize=4; - } - else { /* this is the easiest way, but not optimal. FIXME! */ - /* Now it's trickier, but hopefully still OK */ - if (!isconst(r) || size==4) { - live.state[r].validsize=size; - live.state[r].dirtysize=size; - live.state[r].val=0; - set_status(r,DIRTY); - if (size == 4) { - log_clobberreg(r); - log_isused(bestreg); - } - else { - log_visused(r); - log_isused(bestreg); - } - } - else { - if (live.state[r].status!=UNDEF) - raw_mov_l_ri(bestreg,live.state[r].val); - live.state[r].val=0; - live.state[r].validsize=4; - live.state[r].dirtysize=4; - set_status(r,DIRTY); - log_isused(bestreg); - } - } - live.state[r].realreg=bestreg; - live.state[r].realind=live.nat[bestreg].nholds; - live.nat[bestreg].touched=touchcnt++; - live.nat[bestreg].holds[live.nat[bestreg].nholds]=r; - live.nat[bestreg].nholds++; - - return bestreg; -} - -static int alloc_reg(int r, int size, int willclobber) -{ - return alloc_reg_hinted(r,size,willclobber,-1); -} - -static void unlock2(int r) -{ - Dif (!live.nat[r].locked) - abort(); - live.nat[r].locked--; -} - -static void setlock(int r) -{ - live.nat[r].locked++; -} - - -static void mov_nregs(int d, int s) -{ - int ns=live.nat[s].nholds; - int nd=live.nat[d].nholds; - int i; - - if (s==d) - return; - - if (nd>0) - free_nreg(d); - - log_isused(d); - raw_mov_l_rr(d,s); - - for (i=0;i=size) { - n=live.state[r].realreg; - switch(size) { - case 1: - if (live.nat[n].canbyte || spec>=0) { - answer=n; - } - break; - case 2: - if (live.nat[n].canword || spec>=0) { - answer=n; - } - break; - case 4: - answer=n; - break; - default: abort(); - } - if (answer<0) - evict(r); - } - /* either the value was in memory to start with, or it was evicted and - is in memory now */ - if (answer<0) { - answer=alloc_reg_hinted(r,spec>=0?4:size,0,spec); - } - - if (spec>=0 && spec!=answer) { - /* Too bad */ - mov_nregs(spec,answer); - answer=spec; - } - live.nat[answer].locked++; - live.nat[answer].touched=touchcnt++; - return answer; -} - - - -static int readreg(int r, int size) -{ - return readreg_general(r,size,-1,0); -} - -static int readreg_specific(int r, int size, int spec) -{ - return readreg_general(r,size,spec,0); -} - -static int readreg_offset(int r, int size) -{ - return readreg_general(r,size,-1,1); -} - -/* writereg_general(r, size, spec) - * - * INPUT - * - r : mid-layer register - * - size : requested size (1/2/4) - * - spec : -1 if find or make a register free, otherwise specifies - * the physical register to use in any case - * - * OUTPUT - * - hard (physical, x86 here) register allocated to virtual register r - */ -static __inline__ int writereg_general(int r, int size, int spec) -{ - int n; - int answer=-1; - - record_register(r); - if (size<4) { - remove_offset(r,spec); - } - - make_exclusive(r,size,spec); - if (isinreg(r)) { - int nvsize=size>live.state[r].validsize?size:live.state[r].validsize; - int ndsize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; - n=live.state[r].realreg; - - Dif (live.nat[n].nholds!=1) - abort(); - switch(size) { - case 1: - if (live.nat[n].canbyte || spec>=0) { - live.state[r].dirtysize=ndsize; - live.state[r].validsize=nvsize; - answer=n; - } - break; - case 2: - if (live.nat[n].canword || spec>=0) { - live.state[r].dirtysize=ndsize; - live.state[r].validsize=nvsize; - answer=n; - } - break; - case 4: - live.state[r].dirtysize=ndsize; - live.state[r].validsize=nvsize; - answer=n; - break; - default: abort(); - } - if (answer<0) - evict(r); - } - /* either the value was in memory to start with, or it was evicted and - is in memory now */ - if (answer<0) { - answer=alloc_reg_hinted(r,size,1,spec); - } - if (spec>=0 && spec!=answer) { - mov_nregs(spec,answer); - answer=spec; - } - if (live.state[r].status==UNDEF) - live.state[r].validsize=4; - live.state[r].dirtysize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; - live.state[r].validsize=size>live.state[r].validsize?size:live.state[r].validsize; - - live.nat[answer].locked++; - live.nat[answer].touched=touchcnt++; - if (size==4) { - live.state[r].val=0; - } - else { - Dif (live.state[r].val) { - write_log("Problem with val\n"); - abort(); - } - } - set_status(r,DIRTY); - return answer; -} - -static int writereg(int r, int size) -{ - return writereg_general(r,size,-1); -} - -static int writereg_specific(int r, int size, int spec) -{ - return writereg_general(r,size,spec); -} - -static __inline__ int rmw_general(int r, int wsize, int rsize, int spec) -{ - int n; - int answer=-1; - - record_register(r); - if (live.state[r].status==UNDEF) { - write_log("WARNING: Unexpected read of undefined register %d\n",r); - } - remove_offset(r,spec); - make_exclusive(r,0,spec); - - Dif (wsize=rsize) { - n=live.state[r].realreg; - Dif (live.nat[n].nholds!=1) - abort(); - - switch(rsize) { - case 1: - if (live.nat[n].canbyte || spec>=0) { - answer=n; - } - break; - case 2: - if (live.nat[n].canword || spec>=0) { - answer=n; - } - break; - case 4: - answer=n; - break; - default: abort(); - } - if (answer<0) - evict(r); - } - /* either the value was in memory to start with, or it was evicted and - is in memory now */ - if (answer<0) { - answer=alloc_reg_hinted(r,spec>=0?4:rsize,0,spec); - } - - if (spec>=0 && spec!=answer) { - /* Too bad */ - mov_nregs(spec,answer); - answer=spec; - } - if (wsize>live.state[r].dirtysize) - live.state[r].dirtysize=wsize; - if (wsize>live.state[r].validsize) - live.state[r].validsize=wsize; - set_status(r,DIRTY); - - live.nat[answer].locked++; - live.nat[answer].touched=touchcnt++; - - Dif (live.state[r].val) { - write_log("Problem with val(rmw)\n"); - abort(); - } - return answer; -} - -static int rmw(int r, int wsize, int rsize) -{ - return rmw_general(r,wsize,rsize,-1); -} - -static int rmw_specific(int r, int wsize, int rsize, int spec) -{ - return rmw_general(r,wsize,rsize,spec); -} - - -/* needed for restoring the carry flag on non-P6 cores */ -static void bt_l_ri_noclobber(R4 r, IMM i) -{ - int size=4; - if (i<16) - size=2; - r=readreg(r,size); - raw_bt_l_ri(r,i); - unlock2(r); -} - -/******************************************************************** - * FPU register status handling. EMIT TIME! * - ********************************************************************/ - -static void f_tomem(int r) -{ - if (live.fate[r].status==DIRTY) { -#if USE_LONG_DOUBLE - raw_fmov_ext_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); -#else - raw_fmov_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); -#endif - live.fate[r].status=CLEAN; - } -} - -static void f_tomem_drop(int r) -{ - if (live.fate[r].status==DIRTY) { -#if USE_LONG_DOUBLE - raw_fmov_ext_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); -#else - raw_fmov_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); -#endif - live.fate[r].status=INMEM; - } -} - - -static __inline__ int f_isinreg(int r) -{ - return live.fate[r].status==CLEAN || live.fate[r].status==DIRTY; -} - -static void f_evict(int r) -{ - int rr; - - if (!f_isinreg(r)) - return; - rr=live.fate[r].realreg; - if (live.fat[rr].nholds==1) - f_tomem_drop(r); - else - f_tomem(r); - - Dif (live.fat[rr].locked && - live.fat[rr].nholds==1) { - write_log("FPU register %d in nreg %d is locked!\n",r,live.fate[r].realreg); - abort(); - } - - live.fat[rr].nholds--; - if (live.fat[rr].nholds!=live.fate[r].realind) { /* Was not last */ - int topreg=live.fat[rr].holds[live.fat[rr].nholds]; - int thisind=live.fate[r].realind; - live.fat[rr].holds[thisind]=topreg; - live.fate[topreg].realind=thisind; - } - live.fate[r].status=INMEM; - live.fate[r].realreg=-1; -} - -static __inline__ void f_free_nreg(int r) -{ - int i=live.fat[r].nholds; - - while (i) { - int vr; - - --i; - vr=live.fat[r].holds[i]; - f_evict(vr); - } - Dif (live.fat[r].nholds!=0) { - write_log("Failed to free nreg %d, nholds is %d\n",r,live.fat[r].nholds); - abort(); - } -} - - -/* Use with care! */ -static __inline__ void f_isclean(int r) -{ - if (!f_isinreg(r)) - return; - live.fate[r].status=CLEAN; -} - -static __inline__ void f_disassociate(int r) -{ - f_isclean(r); - f_evict(r); -} - - - -static int f_alloc_reg(int r, int willclobber) -{ - int bestreg; - uae_s32 when; - int i; - uae_s32 badness; - bestreg=-1; - when=2000000000; - for (i=N_FREGS;i--;) { - badness=live.fat[i].touched; - if (live.fat[i].nholds==0) - badness=0; - - if (!live.fat[i].locked && badness0) { - f_free_nreg(bestreg); - } - if (f_isinreg(r)) { - f_evict(r); - } - - if (!willclobber) { - if (live.fate[r].status!=UNDEF) { -#if USE_LONG_DOUBLE - raw_fmov_ext_rm(bestreg,(uintptr)live.fate[r].mem); -#else - raw_fmov_rm(bestreg,(uintptr)live.fate[r].mem); -#endif - } - live.fate[r].status=CLEAN; - } - else { - live.fate[r].status=DIRTY; - } - live.fate[r].realreg=bestreg; - live.fate[r].realind=live.fat[bestreg].nholds; - live.fat[bestreg].touched=touchcnt++; - live.fat[bestreg].holds[live.fat[bestreg].nholds]=r; - live.fat[bestreg].nholds++; - - return bestreg; -} - -static void f_unlock(int r) -{ - Dif (!live.fat[r].locked) - abort(); - live.fat[r].locked--; -} - -static void f_setlock(int r) -{ - live.fat[r].locked++; -} - -static __inline__ int f_readreg(int r) -{ - int n; - int answer=-1; - - if (f_isinreg(r)) { - n=live.fate[r].realreg; - answer=n; - } - /* either the value was in memory to start with, or it was evicted and - is in memory now */ - if (answer<0) - answer=f_alloc_reg(r,0); - - live.fat[answer].locked++; - live.fat[answer].touched=touchcnt++; - return answer; -} - -static __inline__ void f_make_exclusive(int r, int clobber) -{ - freg_status oldstate; - int rr=live.fate[r].realreg; - int nr; - int nind; - int ndirt=0; - int i; - - if (!f_isinreg(r)) - return; - if (live.fat[rr].nholds==1) - return; - for (i=0;i>=i; - return; - } - CLOBBER_SHRL; - r=rmw(r,4,4); - raw_shrl_l_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) - -MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRL; - r=rmw(r,2,2); - raw_shrl_w_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) - -MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRL; - r=rmw(r,1,1); - raw_shrl_b_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) - -MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,4,4); - raw_shra_l_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) - -MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,2,2); - raw_shra_w_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) - -MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,1,1); - raw_shra_b_ri(r,i); - unlock2(r); -} -MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) - -MIDFUNC(2,shra_l_rr,(RW4 d, R1 r)) -{ - if (isconst(r)) { - COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRA; - r=readreg_specific(r,1,SHIFTCOUNT_NREG); - d=rmw(d,4,4); - Dif (r!=1) { - write_log("Illegal register %d in raw_rol_b\n",r); - abort(); - } - raw_shra_l_rr(d,r) ; - unlock2(r); - unlock2(d); -} -MENDFUNC(2,shra_l_rr,(RW4 d, R1 r)) - -MIDFUNC(2,shra_w_rr,(RW2 d, R1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRA; - r=readreg_specific(r,1,SHIFTCOUNT_NREG); - d=rmw(d,2,2); - Dif (r!=1) { - write_log("Illegal register %d in raw_shra_b\n",r); - abort(); - } - raw_shra_w_rr(d,r) ; - unlock2(r); - unlock2(d); -} -MENDFUNC(2,shra_w_rr,(RW2 d, R1 r)) - -MIDFUNC(2,shra_b_rr,(RW1 d, R1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - - CLOBBER_SHRA; - r=readreg_specific(r,1,SHIFTCOUNT_NREG); - d=rmw(d,1,1); - Dif (r!=1) { - write_log("Illegal register %d in raw_shra_b\n",r); - abort(); - } - raw_shra_b_rr(d,r) ; - unlock2(r); - unlock2(d); -} -MENDFUNC(2,shra_b_rr,(RW1 d, R1 r)) - - -MIDFUNC(2,setcc,(W1 d, IMM cc)) -{ - CLOBBER_SETCC; - d=writereg(d,1); - raw_setcc(d,cc); - unlock2(d); -} -MENDFUNC(2,setcc,(W1 d, IMM cc)) - -MIDFUNC(2,setcc_m,(IMM d, IMM cc)) -{ - CLOBBER_SETCC; - raw_setcc_m(d,cc); -} -MENDFUNC(2,setcc_m,(IMM d, IMM cc)) - -MIDFUNC(3,cmov_b_rr,(RW1 d, R1 s, IMM cc)) -{ - if (d==s) - return; - CLOBBER_CMOV; - s=readreg(s,1); - d=rmw(d,1,1); - raw_cmov_b_rr(d,s,cc); - unlock2(s); - unlock2(d); -} -MENDFUNC(3,cmov_b_rr,(RW1 d, R1 s, IMM cc)) - -MIDFUNC(3,cmov_w_rr,(RW2 d, R2 s, IMM cc)) -{ - if (d==s) - return; - CLOBBER_CMOV; - s=readreg(s,2); - d=rmw(d,2,2); - raw_cmov_w_rr(d,s,cc); - unlock2(s); - unlock2(d); -} -MENDFUNC(3,cmov_w_rr,(RW2 d, R2 s, IMM cc)) - -MIDFUNC(3,cmov_l_rr,(RW4 d, R4 s, IMM cc)) -{ - if (d==s) - return; - CLOBBER_CMOV; - s=readreg(s,4); - d=rmw(d,4,4); - raw_cmov_l_rr(d,s,cc); - unlock2(s); - unlock2(d); -} -MENDFUNC(3,cmov_l_rr,(RW4 d, R4 s, IMM cc)) - -MIDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) -{ - CLOBBER_CMOV; - d=rmw(d,4,4); - raw_cmov_l_rm(d,s,cc); - unlock2(d); -} -MENDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) - -MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) -{ - CLOBBER_BSF; - s = readreg(s, 4); - d = writereg(d, 4); - raw_bsf_l_rr(d, s); - unlock2(s); - unlock2(d); -} -MENDFUNC(2,bsf_l_rr,(W4 d, W4 s)) - -/* Set the Z flag depending on the value in s. Note that the - value has to be 0 or -1 (or, more precisely, for non-zero - values, bit 14 must be set)! */ -MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) -{ - CLOBBER_BSF; - s=rmw_specific(s,4,4,FLAG_NREG3); - tmp=writereg(tmp,4); - raw_flags_set_zero(s, tmp); - unlock2(tmp); - unlock2(s); -} -MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) - -MIDFUNC(2,imul_32_32,(RW4 d, R4 s)) -{ - CLOBBER_MUL; - s=readreg(s,4); - d=rmw(d,4,4); - raw_imul_32_32(d,s); - unlock2(s); - unlock2(d); -} -MENDFUNC(2,imul_32_32,(RW4 d, R4 s)) - -MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) -{ - CLOBBER_MUL; - s=rmw_specific(s,4,4,MUL_NREG2); - d=rmw_specific(d,4,4,MUL_NREG1); - raw_imul_64_32(d,s); - unlock2(s); - unlock2(d); -} -MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) - -MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) -{ - CLOBBER_MUL; - s=rmw_specific(s,4,4,MUL_NREG2); - d=rmw_specific(d,4,4,MUL_NREG1); - raw_mul_64_32(d,s); - unlock2(s); - unlock2(d); -} -MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) - -MIDFUNC(2,mul_32_32,(RW4 d, R4 s)) -{ - CLOBBER_MUL; - s=readreg(s,4); - d=rmw(d,4,4); - raw_mul_32_32(d,s); - unlock2(s); - unlock2(d); -} -MENDFUNC(2,mul_32_32,(RW4 d, R4 s)) - -#if SIZEOF_VOID_P == 8 -MIDFUNC(2,sign_extend_32_rr,(W4 d, R2 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_s32)live.state[s].val); - return; - } - - CLOBBER_SE32; - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,4); - } - raw_sign_extend_32_rr(d,s); - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} -MENDFUNC(2,sign_extend_32_rr,(W4 d, R2 s)) -#endif - -MIDFUNC(2,sign_extend_16_rr,(W4 d, R2 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s16)live.state[s].val); - return; - } - - CLOBBER_SE16; - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,2); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,2); - } - raw_sign_extend_16_rr(d,s); - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} -MENDFUNC(2,sign_extend_16_rr,(W4 d, R2 s)) - -MIDFUNC(2,sign_extend_8_rr,(W4 d, R1 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s8)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_SE8; - if (!isrmw) { - s=readreg(s,1); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,1); - } - - raw_sign_extend_8_rr(d,s); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} -MENDFUNC(2,sign_extend_8_rr,(W4 d, R1 s)) - - -MIDFUNC(2,zero_extend_16_rr,(W4 d, R2 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_u32)(uae_u16)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_ZE16; - if (!isrmw) { - s=readreg(s,2); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,2); - } - raw_zero_extend_16_rr(d,s); - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} -MENDFUNC(2,zero_extend_16_rr,(W4 d, R2 s)) - -MIDFUNC(2,zero_extend_8_rr,(W4 d, R1 s)) -{ - int isrmw; - if (isconst(s)) { - set_const(d,(uae_u32)(uae_u8)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_ZE8; - if (!isrmw) { - s=readreg(s,1); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,1); - } - - raw_zero_extend_8_rr(d,s); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} -MENDFUNC(2,zero_extend_8_rr,(W4 d, R1 s)) - -MIDFUNC(2,mov_b_rr,(W1 d, R1 s)) -{ - if (d==s) - return; - if (isconst(s)) { - COMPCALL(mov_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - d=writereg(d,1); - raw_mov_b_rr(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,mov_b_rr,(W1 d, R1 s)) - -MIDFUNC(2,mov_w_rr,(W2 d, R2 s)) -{ - if (d==s) - return; - if (isconst(s)) { - COMPCALL(mov_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=writereg(d,2); - raw_mov_w_rr(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,mov_w_rr,(W2 d, R2 s)) - - -MIDFUNC(4,mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) -{ - CLOBBER_MOV; - baser=readreg(baser,4); - index=readreg(index,4); - d=writereg(d,4); - - raw_mov_l_rrm_indexed(d,baser,index,factor); - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) - -MIDFUNC(4,mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) -{ - CLOBBER_MOV; - baser=readreg(baser,4); - index=readreg(index,4); - d=writereg(d,2); - - raw_mov_w_rrm_indexed(d,baser,index,factor); - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) - -MIDFUNC(4,mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) -{ - CLOBBER_MOV; - baser=readreg(baser,4); - index=readreg(index,4); - d=writereg(d,1); - - raw_mov_b_rrm_indexed(d,baser,index,factor); - - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) - - -MIDFUNC(4,mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) -{ - CLOBBER_MOV; - baser=readreg(baser,4); - index=readreg(index,4); - s=readreg(s,4); - - Dif (baser==s || index==s) - abort(); - - - raw_mov_l_mrr_indexed(baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) - -MIDFUNC(4,mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) -{ - CLOBBER_MOV; - baser=readreg(baser,4); - index=readreg(index,4); - s=readreg(s,2); - - raw_mov_w_mrr_indexed(baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) - -MIDFUNC(4,mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) -{ - CLOBBER_MOV; - s=readreg(s,1); - baser=readreg(baser,4); - index=readreg(index,4); - - raw_mov_b_mrr_indexed(baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(4,mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) - - -MIDFUNC(5,mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - s=readreg(s,4); - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - - raw_mov_l_bmrr_indexed(base,baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) - -MIDFUNC(5,mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - s=readreg(s,2); - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - - raw_mov_w_bmrr_indexed(base,baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) - -MIDFUNC(5,mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - s=readreg(s,1); - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - - raw_mov_b_bmrr_indexed(base,baser,index,factor,s); - unlock2(s); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) - - - -/* Read a long from base+baser+factor*index */ -MIDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - d=writereg(d,4); - raw_mov_l_brrm_indexed(d,base,baser,index,factor); - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) - - -MIDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - remove_offset(d,-1); - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - d=writereg(d,2); - raw_mov_w_brrm_indexed(d,base,baser,index,factor); - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) - - -MIDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int basereg=baser; - int indexreg=index; - - CLOBBER_MOV; - remove_offset(d,-1); - baser=readreg_offset(baser,4); - index=readreg_offset(index,4); - base+=get_offset(basereg); - base+=factor*get_offset(indexreg); - d=writereg(d,1); - raw_mov_b_brrm_indexed(d,base,baser,index,factor); - unlock2(d); - unlock2(baser); - unlock2(index); -} -MENDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) - -/* Read a long from base+factor*index */ -MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) -{ - int indexreg=index; - - if (isconst(index)) { - COMPCALL(mov_l_rm)(d,base+factor*live.state[index].val); - return; - } - - CLOBBER_MOV; - index=readreg_offset(index,4); - base+=get_offset(indexreg)*factor; - d=writereg(d,4); - - raw_mov_l_rm_indexed(d,base,index,factor); - unlock2(index); - unlock2(d); -} -MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) - - -/* read the long at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_l_rR,(W4 d, R4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_l_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - d=writereg(d,4); - - raw_mov_l_rR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_l_rR,(W4 d, R4 s, IMM offset)) - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_rR,(W2 d, R4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_w_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - d=writereg(d,2); - - raw_mov_w_rR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_w_rR,(W2 d, R4 s, IMM offset)) - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_b_rR,(W1 d, R4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_b_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - d=writereg(d,1); - - raw_mov_b_rR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_b_rR,(W1 d, R4 s, IMM offset)) - -/* read the long at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_l_brR,(W4 d, R4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_l_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,4); - - raw_mov_l_brR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_l_brR,(W4 d, R4 s, IMM offset)) - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_brR,(W2 d, R4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_w_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - remove_offset(d,-1); - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,2); - - raw_mov_w_brR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_w_brR,(W2 d, R4 s, IMM offset)) - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_b_brR,(W1 d, R4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_b_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - remove_offset(d,-1); - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,1); - - raw_mov_b_brR(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_b_brR,(W1 d, R4 s, IMM offset)) - -MIDFUNC(3,mov_l_Ri,(R4 d, IMM i, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_l_mi)(live.state[d].val+offset,i); - return; - } - - CLOBBER_MOV; - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_l_Ri(d,i,offset); - unlock2(d); -} -MENDFUNC(3,mov_l_Ri,(R4 d, IMM i, IMM offset)) - -MIDFUNC(3,mov_w_Ri,(R4 d, IMM i, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_w_mi)(live.state[d].val+offset,i); - return; - } - - CLOBBER_MOV; - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_w_Ri(d,i,offset); - unlock2(d); -} -MENDFUNC(3,mov_w_Ri,(R4 d, IMM i, IMM offset)) - -MIDFUNC(3,mov_b_Ri,(R4 d, IMM i, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_b_mi)(live.state[d].val+offset,i); - return; - } - - CLOBBER_MOV; - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_b_Ri(d,i,offset); - unlock2(d); -} -MENDFUNC(3,mov_b_Ri,(R4 d, IMM i, IMM offset)) - - /* Warning! OFFSET is byte sized only! */ -MIDFUNC(3,mov_l_Rr,(R4 d, R4 s, IMM offset)) -{ - if (isconst(d)) { - COMPCALL(mov_l_mr)(live.state[d].val+offset,s); - return; - } - if (isconst(s)) { - COMPCALL(mov_l_Ri)(d,live.state[s].val,offset); - return; - } - - CLOBBER_MOV; - s=readreg(s,4); - d=readreg(d,4); - - raw_mov_l_Rr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_l_Rr,(R4 d, R4 s, IMM offset)) - -MIDFUNC(3,mov_w_Rr,(R4 d, R2 s, IMM offset)) -{ - if (isconst(d)) { - COMPCALL(mov_w_mr)(live.state[d].val+offset,s); - return; - } - if (isconst(s)) { - COMPCALL(mov_w_Ri)(d,(uae_u16)live.state[s].val,offset); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=readreg(d,4); - raw_mov_w_Rr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_w_Rr,(R4 d, R2 s, IMM offset)) - -MIDFUNC(3,mov_b_Rr,(R4 d, R1 s, IMM offset)) -{ - if (isconst(d)) { - COMPCALL(mov_b_mr)(live.state[d].val+offset,s); - return; - } - if (isconst(s)) { - COMPCALL(mov_b_Ri)(d,(uae_u8)live.state[s].val,offset); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - d=readreg(d,4); - raw_mov_b_Rr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_b_Rr,(R4 d, R1 s, IMM offset)) - -MIDFUNC(3,lea_l_brr,(W4 d, R4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_l_ri)(d,live.state[s].val+offset); - return; - } -#if USE_OFFSET - if (d==s) { - add_offset(d,offset); - return; - } -#endif - CLOBBER_LEA; - s=readreg(s,4); - d=writereg(d,4); - raw_lea_l_brr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,lea_l_brr,(W4 d, R4 s, IMM offset)) - -MIDFUNC(5,lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) -{ - if (!offset) { - COMPCALL(lea_l_rr_indexed)(d,s,index,factor); - return; - } - CLOBBER_LEA; - s=readreg(s,4); - index=readreg(index,4); - d=writereg(d,4); - - raw_lea_l_brr_indexed(d,s,index,factor,offset); - unlock2(d); - unlock2(index); - unlock2(s); -} -MENDFUNC(5,lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) - -MIDFUNC(4,lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) -{ - CLOBBER_LEA; - s=readreg(s,4); - index=readreg(index,4); - d=writereg(d,4); - - raw_lea_l_rr_indexed(d,s,index,factor); - unlock2(d); - unlock2(index); - unlock2(s); -} -MENDFUNC(4,lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) - -/* write d to the long at the address contained in s+offset */ -MIDFUNC(3,mov_l_bRr,(R4 d, R4 s, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_l_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,4); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - - raw_mov_l_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_l_bRr,(R4 d, R4 s, IMM offset)) - -/* write the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_bRr,(R4 d, R2 s, IMM offset)) -{ - int dreg=d; - - if (isconst(d)) { - COMPCALL(mov_w_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_w_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_w_bRr,(R4 d, R2 s, IMM offset)) - -MIDFUNC(3,mov_b_bRr,(R4 d, R1 s, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_b_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_b_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} -MENDFUNC(3,mov_b_bRr,(R4 d, R1 s, IMM offset)) - -MIDFUNC(1,bswap_32,(RW4 r)) -{ - int reg=r; - - if (isconst(r)) { - uae_u32 oldv=live.state[r].val; - live.state[r].val=reverse32(oldv); - return; - } - - CLOBBER_SW32; - r=rmw(r,4,4); - raw_bswap_32(r); - unlock2(r); -} -MENDFUNC(1,bswap_32,(RW4 r)) - -MIDFUNC(1,bswap_16,(RW2 r)) -{ - if (isconst(r)) { - uae_u32 oldv=live.state[r].val; - live.state[r].val=((oldv>>8)&0xff) | ((oldv<<8)&0xff00) | - (oldv&0xffff0000); - return; - } - - CLOBBER_SW16; - r=rmw(r,2,2); - - raw_bswap_16(r); - unlock2(r); -} -MENDFUNC(1,bswap_16,(RW2 r)) - - - -MIDFUNC(2,mov_l_rr,(W4 d, R4 s)) -{ - int olds; - - if (d==s) { /* How pointless! */ - return; - } - if (isconst(s)) { - COMPCALL(mov_l_ri)(d,live.state[s].val); - return; - } - olds=s; - disassociate(d); - s=readreg_offset(s,4); - live.state[d].realreg=s; - live.state[d].realind=live.nat[s].nholds; - live.state[d].val=live.state[olds].val; - live.state[d].validsize=4; - live.state[d].dirtysize=4; - set_status(d,DIRTY); - - live.nat[s].holds[live.nat[s].nholds]=d; - live.nat[s].nholds++; - log_clobberreg(d); - /* write_log("Added %d to nreg %d(%d), now holds %d regs\n", - d,s,live.state[d].realind,live.nat[s].nholds); */ - unlock2(s); -} -MENDFUNC(2,mov_l_rr,(W4 d, R4 s)) - -MIDFUNC(2,mov_l_mr,(IMM d, R4 s)) -{ - if (isconst(s)) { - COMPCALL(mov_l_mi)(d,live.state[s].val); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - - raw_mov_l_mr(d,s); - unlock2(s); -} -MENDFUNC(2,mov_l_mr,(IMM d, R4 s)) - - -MIDFUNC(2,mov_w_mr,(IMM d, R2 s)) -{ - if (isconst(s)) { - COMPCALL(mov_w_mi)(d,(uae_u16)live.state[s].val); - return; - } - CLOBBER_MOV; - s=readreg(s,2); - - raw_mov_w_mr(d,s); - unlock2(s); -} -MENDFUNC(2,mov_w_mr,(IMM d, R2 s)) - -MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,2); - - raw_mov_w_rm(d,s); - unlock2(d); -} -MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) - -MIDFUNC(2,mov_b_mr,(IMM d, R1 s)) -{ - if (isconst(s)) { - COMPCALL(mov_b_mi)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - - raw_mov_b_mr(d,s); - unlock2(s); -} -MENDFUNC(2,mov_b_mr,(IMM d, R1 s)) - -MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,1); - - raw_mov_b_rm(d,s); - unlock2(d); -} -MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) - -MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) -{ - set_const(d,s); - return; -} -MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) - -MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,2); - - raw_mov_w_ri(d,s); - unlock2(d); -} -MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) - -MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,1); - - raw_mov_b_ri(d,s); - unlock2(d); -} -MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) - - -MIDFUNC(2,add_l_mi,(IMM d, IMM s)) -{ - CLOBBER_ADD; - raw_add_l_mi(d,s) ; -} -MENDFUNC(2,add_l_mi,(IMM d, IMM s)) - -MIDFUNC(2,add_w_mi,(IMM d, IMM s)) -{ - CLOBBER_ADD; - raw_add_w_mi(d,s) ; -} -MENDFUNC(2,add_w_mi,(IMM d, IMM s)) - -MIDFUNC(2,add_b_mi,(IMM d, IMM s)) -{ - CLOBBER_ADD; - raw_add_b_mi(d,s) ; -} -MENDFUNC(2,add_b_mi,(IMM d, IMM s)) - - -MIDFUNC(2,test_l_ri,(R4 d, IMM i)) -{ - CLOBBER_TEST; - d=readreg(d,4); - - raw_test_l_ri(d,i); - unlock2(d); -} -MENDFUNC(2,test_l_ri,(R4 d, IMM i)) - -MIDFUNC(2,test_l_rr,(R4 d, R4 s)) -{ - CLOBBER_TEST; - d=readreg(d,4); - s=readreg(s,4); - - raw_test_l_rr(d,s);; - unlock2(d); - unlock2(s); -} -MENDFUNC(2,test_l_rr,(R4 d, R4 s)) - -MIDFUNC(2,test_w_rr,(R2 d, R2 s)) -{ - CLOBBER_TEST; - d=readreg(d,2); - s=readreg(s,2); - - raw_test_w_rr(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,test_w_rr,(R2 d, R2 s)) - -MIDFUNC(2,test_b_rr,(R1 d, R1 s)) -{ - CLOBBER_TEST; - d=readreg(d,1); - s=readreg(s,1); - - raw_test_b_rr(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,test_b_rr,(R1 d, R1 s)) - - -MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) -{ - if (isconst(d) && !needflags) { - live.state[d].val &= i; - return; - } - - CLOBBER_AND; - d=rmw(d,4,4); - - raw_and_l_ri(d,i); - unlock2(d); -} -MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) - -MIDFUNC(2,and_l,(RW4 d, R4 s)) -{ - CLOBBER_AND; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_and_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,and_l,(RW4 d, R4 s)) - -MIDFUNC(2,and_w,(RW2 d, R2 s)) -{ - CLOBBER_AND; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_and_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,and_w,(RW2 d, R2 s)) - -MIDFUNC(2,and_b,(RW1 d, R1 s)) -{ - CLOBBER_AND; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_and_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,and_b,(RW1 d, R1 s)) - -// gb-- used for making an fpcr value in compemu_fpp.cpp -MIDFUNC(2,or_l_rm,(RW4 d, IMM s)) -{ - CLOBBER_OR; - d=rmw(d,4,4); - - raw_or_l_rm(d,s); - unlock2(d); -} -MENDFUNC(2,or_l_rm,(RW4 d, IMM s)) - -MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) -{ - if (isconst(d) && !needflags) { - live.state[d].val|=i; - return; - } - CLOBBER_OR; - d=rmw(d,4,4); - - raw_or_l_ri(d,i); - unlock2(d); -} -MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) - -MIDFUNC(2,or_l,(RW4 d, R4 s)) -{ - if (isconst(d) && isconst(s) && !needflags) { - live.state[d].val|=live.state[s].val; - return; - } - CLOBBER_OR; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_or_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,or_l,(RW4 d, R4 s)) - -MIDFUNC(2,or_w,(RW2 d, R2 s)) -{ - CLOBBER_OR; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_or_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,or_w,(RW2 d, R2 s)) - -MIDFUNC(2,or_b,(RW1 d, R1 s)) -{ - CLOBBER_OR; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_or_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,or_b,(RW1 d, R1 s)) - -MIDFUNC(2,adc_l,(RW4 d, R4 s)) -{ - CLOBBER_ADC; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_adc_l(d,s); - - unlock2(d); - unlock2(s); -} -MENDFUNC(2,adc_l,(RW4 d, R4 s)) - -MIDFUNC(2,adc_w,(RW2 d, R2 s)) -{ - CLOBBER_ADC; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_adc_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,adc_w,(RW2 d, R2 s)) - -MIDFUNC(2,adc_b,(RW1 d, R1 s)) -{ - CLOBBER_ADC; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_adc_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,adc_b,(RW1 d, R1 s)) - -MIDFUNC(2,add_l,(RW4 d, R4 s)) -{ - if (isconst(s)) { - COMPCALL(add_l_ri)(d,live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_add_l(d,s); - - unlock2(d); - unlock2(s); -} -MENDFUNC(2,add_l,(RW4 d, R4 s)) - -MIDFUNC(2,add_w,(RW2 d, R2 s)) -{ - if (isconst(s)) { - COMPCALL(add_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_add_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,add_w,(RW2 d, R2 s)) - -MIDFUNC(2,add_b,(RW1 d, R1 s)) -{ - if (isconst(s)) { - COMPCALL(add_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_add_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,add_b,(RW1 d, R1 s)) - -MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(d) && !needflags) { - live.state[d].val-=i; - return; - } -#if USE_OFFSET - if (!needflags) { - add_offset(d,-i); - return; - } -#endif - - CLOBBER_SUB; - d=rmw(d,4,4); - - raw_sub_l_ri(d,i); - unlock2(d); -} -MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) - -MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_SUB; - d=rmw(d,2,2); - - raw_sub_w_ri(d,i); - unlock2(d); -} -MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) - -MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_SUB; - d=rmw(d,1,1); - - raw_sub_b_ri(d,i); - - unlock2(d); -} -MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) - -MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(d) && !needflags) { - live.state[d].val+=i; - return; - } -#if USE_OFFSET - if (!needflags) { - add_offset(d,i); - return; - } -#endif - CLOBBER_ADD; - d=rmw(d,4,4); - raw_add_l_ri(d,i); - unlock2(d); -} -MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) - -MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_ADD; - d=rmw(d,2,2); - - raw_add_w_ri(d,i); - unlock2(d); -} -MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) - -MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_ADD; - d=rmw(d,1,1); - - raw_add_b_ri(d,i); - - unlock2(d); -} -MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) - -MIDFUNC(2,sbb_l,(RW4 d, R4 s)) -{ - CLOBBER_SBB; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_sbb_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sbb_l,(RW4 d, R4 s)) - -MIDFUNC(2,sbb_w,(RW2 d, R2 s)) -{ - CLOBBER_SBB; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_sbb_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sbb_w,(RW2 d, R2 s)) - -MIDFUNC(2,sbb_b,(RW1 d, R1 s)) -{ - CLOBBER_SBB; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_sbb_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sbb_b,(RW1 d, R1 s)) - -MIDFUNC(2,sub_l,(RW4 d, R4 s)) -{ - if (isconst(s)) { - COMPCALL(sub_l_ri)(d,live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_sub_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sub_l,(RW4 d, R4 s)) - -MIDFUNC(2,sub_w,(RW2 d, R2 s)) -{ - if (isconst(s)) { - COMPCALL(sub_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_sub_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sub_w,(RW2 d, R2 s)) - -MIDFUNC(2,sub_b,(RW1 d, R1 s)) -{ - if (isconst(s)) { - COMPCALL(sub_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_sub_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,sub_b,(RW1 d, R1 s)) - -MIDFUNC(2,cmp_l,(R4 d, R4 s)) -{ - CLOBBER_CMP; - s=readreg(s,4); - d=readreg(d,4); - - raw_cmp_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,cmp_l,(R4 d, R4 s)) - -MIDFUNC(2,cmp_l_ri,(R4 r, IMM i)) -{ - CLOBBER_CMP; - r=readreg(r,4); - - raw_cmp_l_ri(r,i); - unlock2(r); -} -MENDFUNC(2,cmp_l_ri,(R4 r, IMM i)) - -MIDFUNC(2,cmp_w,(R2 d, R2 s)) -{ - CLOBBER_CMP; - s=readreg(s,2); - d=readreg(d,2); - - raw_cmp_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,cmp_w,(R2 d, R2 s)) - -MIDFUNC(2,cmp_b,(R1 d, R1 s)) -{ - CLOBBER_CMP; - s=readreg(s,1); - d=readreg(d,1); - - raw_cmp_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,cmp_b,(R1 d, R1 s)) - - -MIDFUNC(2,xor_l,(RW4 d, R4 s)) -{ - CLOBBER_XOR; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_xor_l(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,xor_l,(RW4 d, R4 s)) - -MIDFUNC(2,xor_w,(RW2 d, R2 s)) -{ - CLOBBER_XOR; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_xor_w(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,xor_w,(RW2 d, R2 s)) - -MIDFUNC(2,xor_b,(RW1 d, R1 s)) -{ - CLOBBER_XOR; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_xor_b(d,s); - unlock2(d); - unlock2(s); -} -MENDFUNC(2,xor_b,(RW1 d, R1 s)) - -MIDFUNC(5,call_r_11,(W4 out1, R4 r, R4 in1, IMM osize, IMM isize)) -{ - clobber_flags(); - remove_all_offsets(); - if (osize==4) { - if (out1!=in1 && out1!=r) { - COMPCALL(forget_about)(out1); - } - } - else { - tomem_c(out1); - } - - in1=readreg_specific(in1,isize,REG_PAR1); - r=readreg(r,4); - prepare_for_call_1(); /* This should ensure that there won't be - any need for swapping nregs in prepare_for_call_2 - */ -#if USE_NORMAL_CALLING_CONVENTION - raw_push_l_r(in1); -#endif - unlock2(in1); - unlock2(r); - - prepare_for_call_2(); - raw_call_r(r); - -#if USE_NORMAL_CALLING_CONVENTION - raw_inc_sp(4); -#endif - - - live.nat[REG_RESULT].holds[0]=out1; - live.nat[REG_RESULT].nholds=1; - live.nat[REG_RESULT].touched=touchcnt++; - - live.state[out1].realreg=REG_RESULT; - live.state[out1].realind=0; - live.state[out1].val=0; - live.state[out1].validsize=osize; - live.state[out1].dirtysize=osize; - set_status(out1,DIRTY); -} -MENDFUNC(5,call_r_11,(W4 out1, R4 r, R4 in1, IMM osize, IMM isize)) - -MIDFUNC(5,call_r_02,(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)) -{ - clobber_flags(); - remove_all_offsets(); - in1=readreg_specific(in1,isize1,REG_PAR1); - in2=readreg_specific(in2,isize2,REG_PAR2); - r=readreg(r,4); - prepare_for_call_1(); /* This should ensure that there won't be - any need for swapping nregs in prepare_for_call_2 - */ -#if USE_NORMAL_CALLING_CONVENTION - raw_push_l_r(in2); - raw_push_l_r(in1); -#endif - unlock2(r); - unlock2(in1); - unlock2(in2); - prepare_for_call_2(); - raw_call_r(r); -#if USE_NORMAL_CALLING_CONVENTION - raw_inc_sp(8); -#endif -} -MENDFUNC(5,call_r_02,(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)) - -/* forget_about() takes a mid-layer register */ -MIDFUNC(1,forget_about,(W4 r)) -{ - if (isinreg(r)) - disassociate(r); - live.state[r].val=0; - set_status(r,UNDEF); -} -MENDFUNC(1,forget_about,(W4 r)) - -MIDFUNC(0,nop,(void)) -{ - raw_nop(); -} -MENDFUNC(0,nop,(void)) - - -MIDFUNC(1,f_forget_about,(FW r)) -{ - if (f_isinreg(r)) - f_disassociate(r); - live.fate[r].status=UNDEF; -} -MENDFUNC(1,f_forget_about,(FW r)) - -MIDFUNC(1,fmov_pi,(FW r)) -{ - r=f_writereg(r); - raw_fmov_pi(r); - f_unlock(r); -} -MENDFUNC(1,fmov_pi,(FW r)) - -MIDFUNC(1,fmov_log10_2,(FW r)) -{ - r=f_writereg(r); - raw_fmov_log10_2(r); - f_unlock(r); -} -MENDFUNC(1,fmov_log10_2,(FW r)) - -MIDFUNC(1,fmov_log2_e,(FW r)) -{ - r=f_writereg(r); - raw_fmov_log2_e(r); - f_unlock(r); -} -MENDFUNC(1,fmov_log2_e,(FW r)) - -MIDFUNC(1,fmov_loge_2,(FW r)) -{ - r=f_writereg(r); - raw_fmov_loge_2(r); - f_unlock(r); -} -MENDFUNC(1,fmov_loge_2,(FW r)) - -MIDFUNC(1,fmov_1,(FW r)) -{ - r=f_writereg(r); - raw_fmov_1(r); - f_unlock(r); -} -MENDFUNC(1,fmov_1,(FW r)) - -MIDFUNC(1,fmov_0,(FW r)) -{ - r=f_writereg(r); - raw_fmov_0(r); - f_unlock(r); -} -MENDFUNC(1,fmov_0,(FW r)) - -MIDFUNC(2,fmov_rm,(FW r, MEMR m)) -{ - r=f_writereg(r); - raw_fmov_rm(r,m); - f_unlock(r); -} -MENDFUNC(2,fmov_rm,(FW r, MEMR m)) - -MIDFUNC(2,fmovi_rm,(FW r, MEMR m)) -{ - r=f_writereg(r); - raw_fmovi_rm(r,m); - f_unlock(r); -} -MENDFUNC(2,fmovi_rm,(FW r, MEMR m)) - -MIDFUNC(2,fmovi_mr,(MEMW m, FR r)) -{ - r=f_readreg(r); - raw_fmovi_mr(m,r); - f_unlock(r); -} -MENDFUNC(2,fmovi_mr,(MEMW m, FR r)) - -MIDFUNC(2,fmovs_rm,(FW r, MEMR m)) -{ - r=f_writereg(r); - raw_fmovs_rm(r,m); - f_unlock(r); -} -MENDFUNC(2,fmovs_rm,(FW r, MEMR m)) - -MIDFUNC(2,fmovs_mr,(MEMW m, FR r)) -{ - r=f_readreg(r); - raw_fmovs_mr(m,r); - f_unlock(r); -} -MENDFUNC(2,fmovs_mr,(MEMW m, FR r)) - -MIDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) -{ - r=f_readreg(r); - raw_fmov_ext_mr(m,r); - f_unlock(r); -} -MENDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) - -MIDFUNC(2,fmov_mr,(MEMW m, FR r)) -{ - r=f_readreg(r); - raw_fmov_mr(m,r); - f_unlock(r); -} -MENDFUNC(2,fmov_mr,(MEMW m, FR r)) - -MIDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) -{ - r=f_writereg(r); - raw_fmov_ext_rm(r,m); - f_unlock(r); -} -MENDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) - -MIDFUNC(2,fmov_rr,(FW d, FR s)) -{ - if (d==s) { /* How pointless! */ - return; - } -#if USE_F_ALIAS - f_disassociate(d); - s=f_readreg(s); - live.fate[d].realreg=s; - live.fate[d].realind=live.fat[s].nholds; - live.fate[d].status=DIRTY; - live.fat[s].holds[live.fat[s].nholds]=d; - live.fat[s].nholds++; - f_unlock(s); -#else - s=f_readreg(s); - d=f_writereg(d); - raw_fmov_rr(d,s); - f_unlock(s); - f_unlock(d); -#endif -} -MENDFUNC(2,fmov_rr,(FW d, FR s)) - -MIDFUNC(2,fldcw_m_indexed,(R4 index, IMM base)) -{ - index=readreg(index,4); - - raw_fldcw_m_indexed(index,base); - unlock2(index); -} -MENDFUNC(2,fldcw_m_indexed,(R4 index, IMM base)) - -MIDFUNC(1,ftst_r,(FR r)) -{ - r=f_readreg(r); - raw_ftst_r(r); - f_unlock(r); -} -MENDFUNC(1,ftst_r,(FR r)) - -MIDFUNC(0,dont_care_fflags,(void)) -{ - f_disassociate(FP_RESULT); -} -MENDFUNC(0,dont_care_fflags,(void)) - -MIDFUNC(2,fsqrt_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fsqrt_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fsqrt_rr,(FW d, FR s)) - -MIDFUNC(2,fabs_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fabs_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fabs_rr,(FW d, FR s)) - -MIDFUNC(2,fsin_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fsin_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fsin_rr,(FW d, FR s)) - -MIDFUNC(2,fcos_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fcos_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fcos_rr,(FW d, FR s)) - -MIDFUNC(2,ftwotox_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_ftwotox_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,ftwotox_rr,(FW d, FR s)) - -MIDFUNC(2,fetox_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fetox_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fetox_rr,(FW d, FR s)) - -MIDFUNC(2,frndint_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_frndint_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,frndint_rr,(FW d, FR s)) - -MIDFUNC(2,flog2_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_flog2_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,flog2_rr,(FW d, FR s)) - -MIDFUNC(2,fneg_rr,(FW d, FR s)) -{ - s=f_readreg(s); - d=f_writereg(d); - raw_fneg_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fneg_rr,(FW d, FR s)) - -MIDFUNC(2,fadd_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_fadd_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fadd_rr,(FRW d, FR s)) - -MIDFUNC(2,fsub_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_fsub_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fsub_rr,(FRW d, FR s)) - -MIDFUNC(2,fcmp_rr,(FR d, FR s)) -{ - d=f_readreg(d); - s=f_readreg(s); - raw_fcmp_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fcmp_rr,(FR d, FR s)) - -MIDFUNC(2,fdiv_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_fdiv_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fdiv_rr,(FRW d, FR s)) - -MIDFUNC(2,frem_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_frem_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,frem_rr,(FRW d, FR s)) - -MIDFUNC(2,frem1_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_frem1_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,frem1_rr,(FRW d, FR s)) - -MIDFUNC(2,fmul_rr,(FRW d, FR s)) -{ - s=f_readreg(s); - d=f_rmw(d); - raw_fmul_rr(d,s); - f_unlock(s); - f_unlock(d); -} -MENDFUNC(2,fmul_rr,(FRW d, FR s)) - -/******************************************************************** - * Support functions exposed to gencomp. CREATE time * - ********************************************************************/ - -void set_zero(int r, int tmp) -{ - if (setzflg_uses_bsf) - bsf_l_rr(r,r); - else - simulate_bsf(tmp,r); -} - -int kill_rodent(int r) -{ - return KILLTHERAT && - have_rat_stall && - (live.state[r].status==INMEM || - live.state[r].status==CLEAN || - live.state[r].status==ISCONST || - live.state[r].dirtysize==4); -} - -uae_u32 get_const(int r) -{ - Dif (!isconst(r)) { - write_log("Register %d should be constant, but isn't\n",r); - abort(); - } - return live.state[r].val; -} - -void sync_m68k_pc(void) -{ - if (m68k_pc_offset) { - add_l_ri(PC_P,m68k_pc_offset); - comp_pc_p+=m68k_pc_offset; - m68k_pc_offset=0; - } -} - -/******************************************************************** - * Scratch registers management * - ********************************************************************/ - -struct scratch_t { - uae_u32 regs[VREGS]; - fpu_register fregs[VFREGS]; -}; - -static scratch_t scratch; - -/******************************************************************** - * Support functions exposed to newcpu * - ********************************************************************/ - -static inline const char *str_on_off(bool b) -{ - return b ? "on" : "off"; -} - -void compiler_init(void) -{ - static bool initialized = false; - if (initialized) - return; - -#if JIT_DEBUG - // JIT debug mode ? - JITDebug = PrefsFindBool("jitdebug"); -#endif - write_log(" : enable runtime disassemblers : %s\n", JITDebug ? "yes" : "no"); - -#ifdef USE_JIT_FPU - // Use JIT compiler for FPU instructions ? - avoid_fpu = !PrefsFindBool("jitfpu"); -#else - // JIT FPU is always disabled - avoid_fpu = true; -#endif - write_log(" : compile FPU instructions : %s\n", !avoid_fpu ? "yes" : "no"); - - // Get size of the translation cache (in KB) - cache_size = PrefsFindInt32("jitcachesize"); - write_log(" : requested translation cache size : %d KB\n", cache_size); - - // Initialize target CPU (check for features, e.g. CMOV, rat stalls) - raw_init_cpu(); - setzflg_uses_bsf = target_check_bsf(); - write_log(" : target processor has CMOV instructions : %s\n", have_cmov ? "yes" : "no"); - write_log(" : target processor can suffer from partial register stalls : %s\n", have_rat_stall ? "yes" : "no"); - write_log(" : alignment for loops, jumps are %d, %d\n", align_loops, align_jumps); - - // Translation cache flush mechanism - lazy_flush = PrefsFindBool("jitlazyflush"); - write_log(" : lazy translation cache invalidation : %s\n", str_on_off(lazy_flush)); - flush_icache = lazy_flush ? flush_icache_lazy : flush_icache_hard; - - // Compiler features - write_log(" : register aliasing : %s\n", str_on_off(1)); - write_log(" : FP register aliasing : %s\n", str_on_off(USE_F_ALIAS)); - write_log(" : lazy constant offsetting : %s\n", str_on_off(USE_OFFSET)); -#if USE_INLINING - follow_const_jumps = PrefsFindBool("jitinline"); -#endif - write_log(" : translate through constant jumps : %s\n", str_on_off(follow_const_jumps)); - write_log(" : separate blockinfo allocation : %s\n", str_on_off(USE_SEPARATE_BIA)); - - // Build compiler tables - build_comp(); - - initialized = true; - -#if PROFILE_UNTRANSLATED_INSNS - write_log(" : gather statistics on untranslated insns count\n"); -#endif - -#if PROFILE_COMPILE_TIME - write_log(" : gather statistics on translation time\n"); - emul_start_time = clock(); -#endif -} - -void compiler_exit(void) -{ -#if PROFILE_COMPILE_TIME - emul_end_time = clock(); -#endif - - // Deallocate translation cache - if (compiled_code) { - vm_release(compiled_code, cache_size * 1024); - compiled_code = 0; - } - - // Deallocate popallspace - if (popallspace) { - vm_release(popallspace, POPALLSPACE_SIZE); - popallspace = 0; - } - -#if PROFILE_COMPILE_TIME - write_log("### Compile Block statistics\n"); - write_log("Number of calls to compile_block : %d\n", compile_count); - uae_u32 emul_time = emul_end_time - emul_start_time; - write_log("Total emulation time : %.1f sec\n", double(emul_time)/double(CLOCKS_PER_SEC)); - write_log("Total compilation time : %.1f sec (%.1f%%)\n", double(compile_time)/double(CLOCKS_PER_SEC), - 100.0*double(compile_time)/double(emul_time)); - write_log("\n"); -#endif - -#if PROFILE_UNTRANSLATED_INSNS - uae_u64 untranslated_count = 0; - for (int i = 0; i < 65536; i++) { - opcode_nums[i] = i; - untranslated_count += raw_cputbl_count[i]; - } - write_log("Sorting out untranslated instructions count...\n"); - qsort(opcode_nums, 65536, sizeof(uae_u16), untranslated_compfn); - write_log("\nRank Opc Count Name\n"); - for (int i = 0; i < untranslated_top_ten; i++) { - uae_u32 count = raw_cputbl_count[opcode_nums[i]]; - struct instr *dp; - struct mnemolookup *lookup; - if (!count) - break; - dp = table68k + opcode_nums[i]; - for (lookup = lookuptab; lookup->mnemo != dp->mnemo; lookup++) - ; - write_log("%03d: %04x %10lu %s\n", i, opcode_nums[i], count, lookup->name); - } -#endif - -#if RECORD_REGISTER_USAGE - int reg_count_ids[16]; - uint64 tot_reg_count = 0; - for (int i = 0; i < 16; i++) { - reg_count_ids[i] = i; - tot_reg_count += reg_count[i]; - } - qsort(reg_count_ids, 16, sizeof(int), reg_count_compare); - uint64 cum_reg_count = 0; - for (int i = 0; i < 16; i++) { - int r = reg_count_ids[i]; - cum_reg_count += reg_count[r]; - printf("%c%d : %16ld %2.1f%% [%2.1f]\n", r < 8 ? 'D' : 'A', r % 8, - reg_count[r], - 100.0*double(reg_count[r])/double(tot_reg_count), - 100.0*double(cum_reg_count)/double(tot_reg_count)); - } -#endif -} - -bool compiler_use_jit(void) -{ - // Check for the "jit" prefs item - if (!PrefsFindBool("jit")) - return false; - - // Don't use JIT if translation cache size is less then MIN_CACHE_SIZE KB - if (PrefsFindInt32("jitcachesize") < MIN_CACHE_SIZE) { - write_log(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); - return false; - } - - // Enable JIT for 68020+ emulation only - if (CPUType < 2) { - write_log(" : JIT is not supported in 680%d0 emulation mode, disabling.\n", CPUType); - return false; - } - - return true; -} - -void init_comp(void) -{ - int i; - uae_s8* cb=can_byte; - uae_s8* cw=can_word; - uae_s8* au=always_used; - -#if RECORD_REGISTER_USAGE - for (i=0;i<16;i++) - reg_count_local[i] = 0; -#endif - - for (i=0;i= (uintptr)ROMBaseHost) && (addr < (uintptr)ROMBaseHost + ROMSize)); -} - -static void flush_all(void) -{ - int i; - - log_flush(); - for (i=0;i0) - free_nreg(i); - - for (i=0;i0) - f_free_nreg(i); - - live.flags_in_flags=TRASH; /* Note: We assume we already rescued the - flags at the very start of the call_r - functions! */ -} - -/******************************************************************** - * Memory access and related functions, CREATE time * - ********************************************************************/ - -void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond) -{ - next_pc_p=not_taken; - taken_pc_p=taken; - branch_cc=cond; -} - - -static uae_u32 get_handler_address(uae_u32 addr) -{ - uae_u32 cl=cacheline(addr); - blockinfo* bi=get_blockinfo_addr_new((void*)(uintptr)addr,0); - return (uintptr)&(bi->direct_handler_to_use); -} - -static uae_u32 get_handler(uae_u32 addr) -{ - uae_u32 cl=cacheline(addr); - blockinfo* bi=get_blockinfo_addr_new((void*)(uintptr)addr,0); - return (uintptr)bi->direct_handler_to_use; -} - -static void load_handler(int reg, uae_u32 addr) -{ - mov_l_rm(reg,get_handler_address(addr)); -} - -/* This version assumes that it is writing *real* memory, and *will* fail - * if that assumption is wrong! No branches, no second chances, just - * straight go-for-it attitude */ - -static void writemem_real(int address, int source, int size, int tmp, int clobber) -{ - int f=tmp; - - if (clobber) - f=source; - - switch(size) { - case 1: mov_b_bRr(address,source,MEMBaseDiff); break; - case 2: mov_w_rr(f,source); bswap_16(f); mov_w_bRr(address,f,MEMBaseDiff); break; - case 4: mov_l_rr(f,source); bswap_32(f); mov_l_bRr(address,f,MEMBaseDiff); break; - } - forget_about(tmp); - forget_about(f); -} - -void writebyte(int address, int source, int tmp) -{ - writemem_real(address,source,1,tmp,0); -} - -static __inline__ void writeword_general(int address, int source, int tmp, - int clobber) -{ - writemem_real(address,source,2,tmp,clobber); -} - -void writeword_clobber(int address, int source, int tmp) -{ - writeword_general(address,source,tmp,1); -} - -void writeword(int address, int source, int tmp) -{ - writeword_general(address,source,tmp,0); -} - -static __inline__ void writelong_general(int address, int source, int tmp, - int clobber) -{ - writemem_real(address,source,4,tmp,clobber); -} - -void writelong_clobber(int address, int source, int tmp) -{ - writelong_general(address,source,tmp,1); -} - -void writelong(int address, int source, int tmp) -{ - writelong_general(address,source,tmp,0); -} - - - -/* This version assumes that it is reading *real* memory, and *will* fail - * if that assumption is wrong! No branches, no second chances, just - * straight go-for-it attitude */ - -static void readmem_real(int address, int dest, int size, int tmp) -{ - int f=tmp; - - if (size==4 && address!=dest) - f=dest; - - switch(size) { - case 1: mov_b_brR(dest,address,MEMBaseDiff); break; - case 2: mov_w_brR(dest,address,MEMBaseDiff); bswap_16(dest); break; - case 4: mov_l_brR(dest,address,MEMBaseDiff); bswap_32(dest); break; - } - forget_about(tmp); -} - -void readbyte(int address, int dest, int tmp) -{ - readmem_real(address,dest,1,tmp); -} - -void readword(int address, int dest, int tmp) -{ - readmem_real(address,dest,2,tmp); -} - -void readlong(int address, int dest, int tmp) -{ - readmem_real(address,dest,4,tmp); -} - -void get_n_addr(int address, int dest, int tmp) -{ - // a is the register containing the virtual address - // after the offset had been fetched - int a=tmp; - - // f is the register that will contain the offset - int f=tmp; - - // a == f == tmp if (address == dest) - if (address!=dest) { - a=address; - f=dest; - } - -#if REAL_ADDRESSING - mov_l_rr(dest, address); -#elif DIRECT_ADDRESSING - lea_l_brr(dest,address,MEMBaseDiff); -#endif - forget_about(tmp); -} - -void get_n_addr_jmp(int address, int dest, int tmp) -{ - /* For this, we need to get the same address as the rest of UAE - would --- otherwise we end up translating everything twice */ - get_n_addr(address,dest,tmp); -} - - -/* base is a register, but dp is an actual value. - target is a register, as is tmp */ -void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp) -{ - int reg = (dp >> 12) & 15; - int regd_shift=(dp >> 9) & 3; - - if (dp & 0x100) { - int ignorebase=(dp&0x80); - int ignorereg=(dp&0x40); - int addbase=0; - int outer=0; - - if ((dp & 0x30) == 0x20) addbase = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - if ((dp & 0x30) == 0x30) addbase = comp_get_ilong((m68k_pc_offset+=4)-4); - - if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - if ((dp & 0x3) == 0x3) outer = comp_get_ilong((m68k_pc_offset+=4)-4); - - if ((dp & 0x4) == 0) { /* add regd *before* the get_long */ - if (!ignorereg) { - if ((dp & 0x800) == 0) - sign_extend_16_rr(target,reg); - else - mov_l_rr(target,reg); - shll_l_ri(target,regd_shift); - } - else - mov_l_ri(target,0); - - /* target is now regd */ - if (!ignorebase) - add_l(target,base); - add_l_ri(target,addbase); - if (dp&0x03) readlong(target,target,tmp); - } else { /* do the getlong first, then add regd */ - if (!ignorebase) { - mov_l_rr(target,base); - add_l_ri(target,addbase); - } - else - mov_l_ri(target,addbase); - if (dp&0x03) readlong(target,target,tmp); - - if (!ignorereg) { - if ((dp & 0x800) == 0) - sign_extend_16_rr(tmp,reg); - else - mov_l_rr(tmp,reg); - shll_l_ri(tmp,regd_shift); - /* tmp is now regd */ - add_l(target,tmp); - } - } - add_l_ri(target,outer); - } - else { /* 68000 version */ - if ((dp & 0x800) == 0) { /* Sign extend */ - sign_extend_16_rr(target,reg); - lea_l_brr_indexed(target,base,target,1<= CODE_ALLOC_MAX_ATTEMPTS) - return NULL; - - return do_alloc_code(size, depth + 1); -#else - uint8 *code = (uint8 *)vm_acquire(size); - return code == VM_MAP_FAILED ? NULL : code; -#endif -} - -static inline uint8 *alloc_code(uint32 size) -{ - uint8 *ptr = do_alloc_code(size, 0); - /* allocated code must fit in 32-bit boundaries */ - assert((uintptr)ptr <= 0xffffffff); - return ptr; -} - -void alloc_cache(void) -{ - if (compiled_code) { - flush_icache_hard(6); - vm_release(compiled_code, cache_size * 1024); - compiled_code = 0; - } - - if (cache_size == 0) - return; - - while (!compiled_code && cache_size) { - if ((compiled_code = alloc_code(cache_size * 1024)) == NULL) { - compiled_code = 0; - cache_size /= 2; - } - } - vm_protect(compiled_code, cache_size * 1024, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); - - if (compiled_code) { - write_log(" : actual translation cache size : %d KB at 0x%08X\n", cache_size, compiled_code); - max_compile_start = compiled_code + cache_size*1024 - BYTES_PER_INST; - current_compile_p = compiled_code; - current_cache_size = 0; - } -} - - - -extern void op_illg_1 (uae_u32 opcode) REGPARAM; - -static void calc_checksum(blockinfo* bi, uae_u32* c1, uae_u32* c2) -{ - uae_u32 k1 = 0; - uae_u32 k2 = 0; - -#if USE_CHECKSUM_INFO - checksum_info *csi = bi->csi; - Dif(!csi) abort(); - while (csi) { - uae_s32 len = csi->length; - uintptr tmp = (uintptr)csi->start_p; -#else - uae_s32 len = bi->len; - uintptr tmp = (uintptr)bi->min_pcp; -#endif - uae_u32*pos; - - len += (tmp & 3); - tmp &= ~((uintptr)3); - pos = (uae_u32 *)tmp; - - if (len >= 0 && len <= MAX_CHECKSUM_LEN) { - while (len > 0) { - k1 += *pos; - k2 ^= *pos; - pos++; - len -= 4; - } - } - -#if USE_CHECKSUM_INFO - csi = csi->next; - } -#endif - - *c1 = k1; - *c2 = k2; -} - -#if 0 -static void show_checksum(CSI_TYPE* csi) -{ - uae_u32 k1=0; - uae_u32 k2=0; - uae_s32 len=CSI_LENGTH(csi); - uae_u32 tmp=(uintptr)CSI_STARTcsi - uae_u32* pos; - - len+=(tmp&3); - tmp&=(~3); - pos=(uae_u32*)tmp; - - if (len<0 || len>MAX_CHECKSUM_LEN) { - return; - } - else { - while (len>0) { - write_log("%08x ",*pos); - pos++; - len-=4; - } - write_log(" bla\n"); - } -} -#endif - - -int check_for_cache_miss(void) -{ - blockinfo* bi=get_blockinfo_addr(regs.pc_p); - - if (bi) { - int cl=cacheline(regs.pc_p); - if (bi!=cache_tags[cl+1].bi) { - raise_in_cl_list(bi); - return 1; - } - } - return 0; -} - - -static void recompile_block(void) -{ - /* An existing block's countdown code has expired. We need to make - sure that execute_normal doesn't refuse to recompile due to a - perceived cache miss... */ - blockinfo* bi=get_blockinfo_addr(regs.pc_p); - - Dif (!bi) - abort(); - raise_in_cl_list(bi); - execute_normal(); - return; -} -static void cache_miss(void) -{ - blockinfo* bi=get_blockinfo_addr(regs.pc_p); - uae_u32 cl=cacheline(regs.pc_p); - blockinfo* bi2=get_blockinfo(cl); - - if (!bi) { - execute_normal(); /* Compile this block now */ - return; - } - Dif (!bi2 || bi==bi2) { - write_log("Unexplained cache miss %p %p\n",bi,bi2); - abort(); - } - raise_in_cl_list(bi); - return; -} - -static int called_check_checksum(blockinfo* bi); - -static inline int block_check_checksum(blockinfo* bi) -{ - uae_u32 c1,c2; - bool isgood; - - if (bi->status!=BI_NEED_CHECK) - return 1; /* This block is in a checked state */ - - checksum_count++; - - if (bi->c1 || bi->c2) - calc_checksum(bi,&c1,&c2); - else { - c1=c2=1; /* Make sure it doesn't match */ - } - - isgood=(c1==bi->c1 && c2==bi->c2); - - if (isgood) { - /* This block is still OK. So we reactivate. Of course, that - means we have to move it into the needs-to-be-flushed list */ - bi->handler_to_use=bi->handler; - set_dhtu(bi,bi->direct_handler); - bi->status=BI_CHECKING; - isgood=called_check_checksum(bi) != 0; - } - if (isgood) { - /* write_log("reactivate %p/%p (%x %x/%x %x)\n",bi,bi->pc_p, - c1,c2,bi->c1,bi->c2);*/ - remove_from_list(bi); - add_to_active(bi); - raise_in_cl_list(bi); - bi->status=BI_ACTIVE; - } - else { - /* This block actually changed. We need to invalidate it, - and set it up to be recompiled */ - /* write_log("discard %p/%p (%x %x/%x %x)\n",bi,bi->pc_p, - c1,c2,bi->c1,bi->c2); */ - invalidate_block(bi); - raise_in_cl_list(bi); - } - return isgood; -} - -static int called_check_checksum(blockinfo* bi) -{ - dependency* x=bi->deplist; - int isgood=1; - int i; - - for (i=0;i<2 && isgood;i++) { - if (bi->dep[i].jmp_off) { - isgood=block_check_checksum(bi->dep[i].target); - } - } - return isgood; -} - -static void check_checksum(void) -{ - blockinfo* bi=get_blockinfo_addr(regs.pc_p); - uae_u32 cl=cacheline(regs.pc_p); - blockinfo* bi2=get_blockinfo(cl); - - /* These are not the droids you are looking for... */ - if (!bi) { - /* Whoever is the primary target is in a dormant state, but - calling it was accidental, and we should just compile this - new block */ - execute_normal(); - return; - } - if (bi!=bi2) { - /* The block was hit accidentally, but it does exist. Cache miss */ - cache_miss(); - return; - } - - if (!block_check_checksum(bi)) - execute_normal(); -} - -static __inline__ void match_states(blockinfo* bi) -{ - int i; - smallstate* s=&(bi->env); - - if (bi->status==BI_NEED_CHECK) { - block_check_checksum(bi); - } - if (bi->status==BI_ACTIVE || - bi->status==BI_FINALIZING) { /* Deal with the *promises* the - block makes (about not using - certain vregs) */ - for (i=0;i<16;i++) { - if (s->virt[i]==L_UNNEEDED) { - // write_log("unneeded reg %d at %p\n",i,target); - COMPCALL(forget_about)(i); // FIXME - } - } - } - flush(1); - - /* And now deal with the *demands* the block makes */ - for (i=0;inat[i]; - if (v>=0) { - // printf("Loading reg %d into %d at %p\n",v,i,target); - readreg_specific(v,4,i); - // do_load_reg(i,v); - // setlock(i); - } - } - for (i=0;inat[i]; - if (v>=0) { - unlock2(i); - } - } -} - -static __inline__ void create_popalls(void) -{ - int i,r; - - if ((popallspace = alloc_code(POPALLSPACE_SIZE)) == NULL) { - write_log("FATAL: Could not allocate popallspace!\n"); - abort(); - } - vm_protect(popallspace, POPALLSPACE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE); - - int stack_space = STACK_OFFSET; - for (i=0;idirect_pen=(cpuop_func *)get_target(); - raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); - raw_mov_l_mr((uintptr)®s.pc_p,0); - raw_jmp((uintptr)popall_execute_normal); - - align_target(align_jumps); - bi->direct_pcc=(cpuop_func *)get_target(); - raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); - raw_mov_l_mr((uintptr)®s.pc_p,0); - raw_jmp((uintptr)popall_check_checksum); - current_compile_p=get_target(); - - bi->deplist=NULL; - for (i=0;i<2;i++) { - bi->dep[i].prev_p=NULL; - bi->dep[i].next=NULL; - } - bi->env=default_ss; - bi->status=BI_INVALID; - bi->havestate=0; - //bi->env=empty_ss; -} - -// OPCODE is in big endian format, use cft_map() beforehand, if needed. -static inline void reset_compop(int opcode) -{ - compfunctbl[opcode] = NULL; - nfcompfunctbl[opcode] = NULL; -} - -static int read_opcode(const char *p) -{ - int opcode = 0; - for (int i = 0; i < 4; i++) { - int op = p[i]; - switch (op) { - case '0': case '1': case '2': case '3': case '4': - case '5': case '6': case '7': case '8': case '9': - opcode = (opcode << 4) | (op - '0'); - break; - case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': - opcode = (opcode << 4) | ((op - 'a') + 10); - break; - case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': - opcode = (opcode << 4) | ((op - 'A') + 10); - break; - default: - return -1; - } - } - return opcode; -} - -static bool merge_blacklist() -{ - const char *blacklist = PrefsFindString("jitblacklist"); - if (blacklist) { - const char *p = blacklist; - for (;;) { - if (*p == 0) - return true; - - int opcode1 = read_opcode(p); - if (opcode1 < 0) - return false; - p += 4; - - int opcode2 = opcode1; - if (*p == '-') { - p++; - opcode2 = read_opcode(p); - if (opcode2 < 0) - return false; - p += 4; - } - - if (*p == 0 || *p == ',' || *p == ';') { - write_log(" : blacklist opcodes : %04x-%04x\n", opcode1, opcode2); - for (int opcode = opcode1; opcode <= opcode2; opcode++) - reset_compop(cft_map(opcode)); - - if (*p == ',' || *p++ == ';') - continue; - - return true; - } - - return false; - } - } - return true; -} - -void build_comp(void) -{ - int i; - int jumpcount=0; - unsigned long opcode; - struct comptbl* tbl=op_smalltbl_0_comp_ff; - struct comptbl* nftbl=op_smalltbl_0_comp_nf; - int count; - unsigned int cpu_level = 0; // 68000 (default) - if (CPUType == 4) - cpu_level = 4; // 68040 with FPU - else { - if (FPUType) - cpu_level = 3; // 68020 with FPU - else if (CPUType >= 2) - cpu_level = 2; // 68020 - else if (CPUType == 1) - cpu_level = 1; - } - struct cputbl *nfctbl = ( - cpu_level == 4 ? op_smalltbl_0_nf - : cpu_level == 3 ? op_smalltbl_1_nf - : cpu_level == 2 ? op_smalltbl_2_nf - : cpu_level == 1 ? op_smalltbl_3_nf - : op_smalltbl_4_nf); - - write_log (" : building compiler function tables\n"); - - for (opcode = 0; opcode < 65536; opcode++) { - reset_compop(opcode); - nfcpufunctbl[opcode] = op_illg_1; - prop[opcode].use_flags = 0x1f; - prop[opcode].set_flags = 0x1f; - prop[opcode].cflow = fl_trap; // ILLEGAL instructions do trap - } - - for (i = 0; tbl[i].opcode < 65536; i++) { - int cflow = table68k[tbl[i].opcode].cflow; - if (follow_const_jumps && (tbl[i].specific & 16)) - cflow = fl_const_jump; - else - cflow &= ~fl_const_jump; - prop[cft_map(tbl[i].opcode)].cflow = cflow; - - int uses_fpu = tbl[i].specific & 32; - if (uses_fpu && avoid_fpu) - compfunctbl[cft_map(tbl[i].opcode)] = NULL; - else - compfunctbl[cft_map(tbl[i].opcode)] = tbl[i].handler; - } - - for (i = 0; nftbl[i].opcode < 65536; i++) { - int uses_fpu = tbl[i].specific & 32; - if (uses_fpu && avoid_fpu) - nfcompfunctbl[cft_map(nftbl[i].opcode)] = NULL; - else - nfcompfunctbl[cft_map(nftbl[i].opcode)] = nftbl[i].handler; - - nfcpufunctbl[cft_map(nftbl[i].opcode)] = nfctbl[i].handler; - } - - for (i = 0; nfctbl[i].handler; i++) { - nfcpufunctbl[cft_map(nfctbl[i].opcode)] = nfctbl[i].handler; - } - - for (opcode = 0; opcode < 65536; opcode++) { - compop_func *f; - compop_func *nff; - cpuop_func *nfcf; - int isaddx,cflow; - - if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) - continue; - - if (table68k[opcode].handler != -1) { - f = compfunctbl[cft_map(table68k[opcode].handler)]; - nff = nfcompfunctbl[cft_map(table68k[opcode].handler)]; - nfcf = nfcpufunctbl[cft_map(table68k[opcode].handler)]; - cflow = prop[cft_map(table68k[opcode].handler)].cflow; - isaddx = prop[cft_map(table68k[opcode].handler)].is_addx; - prop[cft_map(opcode)].cflow = cflow; - prop[cft_map(opcode)].is_addx = isaddx; - compfunctbl[cft_map(opcode)] = f; - nfcompfunctbl[cft_map(opcode)] = nff; - Dif (nfcf == op_illg_1) - abort(); - nfcpufunctbl[cft_map(opcode)] = nfcf; - } - prop[cft_map(opcode)].set_flags = table68k[opcode].flagdead; - prop[cft_map(opcode)].use_flags = table68k[opcode].flaglive; - /* Unconditional jumps don't evaluate condition codes, so they - * don't actually use any flags themselves */ - if (prop[cft_map(opcode)].cflow & fl_const_jump) - prop[cft_map(opcode)].use_flags = 0; - } - for (i = 0; nfctbl[i].handler != NULL; i++) { - if (nfctbl[i].specific) - nfcpufunctbl[cft_map(tbl[i].opcode)] = nfctbl[i].handler; - } - - /* Merge in blacklist */ - if (!merge_blacklist()) - write_log(" : blacklist merge failure!\n"); - - count=0; - for (opcode = 0; opcode < 65536; opcode++) { - if (compfunctbl[cft_map(opcode)]) - count++; - } - write_log(" : supposedly %d compileable opcodes!\n",count); - - /* Initialise state */ - create_popalls(); - alloc_cache(); - reset_lists(); - - for (i=0;ipc_p)].handler=(cpuop_func *)popall_execute_normal; - cache_tags[cacheline(bi->pc_p)+1].bi=NULL; - dbi=bi; bi=bi->next; - free_blockinfo(dbi); - } - bi=dormant; - while(bi) { - cache_tags[cacheline(bi->pc_p)].handler=(cpuop_func *)popall_execute_normal; - cache_tags[cacheline(bi->pc_p)+1].bi=NULL; - dbi=bi; bi=bi->next; - free_blockinfo(dbi); - } - - reset_lists(); - if (!compiled_code) - return; - current_compile_p=compiled_code; - SPCFLAGS_SET( SPCFLAG_JIT_EXEC_RETURN ); /* To get out of compiled code */ -} - - -/* "Soft flushing" --- instead of actually throwing everything away, - we simply mark everything as "needs to be checked". -*/ - -static inline void flush_icache_lazy(int n) -{ - blockinfo* bi; - blockinfo* bi2; - - soft_flush_count++; - if (!active) - return; - - bi=active; - while (bi) { - uae_u32 cl=cacheline(bi->pc_p); - if (bi->status==BI_INVALID || - bi->status==BI_NEED_RECOMP) { - if (bi==cache_tags[cl+1].bi) - cache_tags[cl].handler=(cpuop_func *)popall_execute_normal; - bi->handler_to_use=(cpuop_func *)popall_execute_normal; - set_dhtu(bi,bi->direct_pen); - bi->status=BI_INVALID; - } - else { - if (bi==cache_tags[cl+1].bi) - cache_tags[cl].handler=(cpuop_func *)popall_check_checksum; - bi->handler_to_use=(cpuop_func *)popall_check_checksum; - set_dhtu(bi,bi->direct_pcc); - bi->status=BI_NEED_CHECK; - } - bi2=bi; - bi=bi->next; - } - /* bi2 is now the last entry in the active list */ - bi2->next=dormant; - if (dormant) - dormant->prev_p=&(bi2->next); - - dormant=active; - active->prev_p=&dormant; - active=NULL; -} - -void flush_icache_range(uae_u8 *start_p, uae_u32 length) -{ - if (!active) - return; - -#if LAZY_FLUSH_ICACHE_RANGE - blockinfo *bi = active; - while (bi) { -#if USE_CHECKSUM_INFO - bool candidate = false; - for (checksum_info *csi = bi->csi; csi; csi = csi->next) { - if (((start_p - csi->start_p) < csi->length) || - ((csi->start_p - start_p) < length)) { - candidate = true; - break; - } - } -#else - // Assume system is consistent and would invalidate the right range - const bool candidate = (bi->pc_p - start_p) < length; -#endif - blockinfo *dbi = bi; - bi = bi->next; - if (candidate) { - uae_u32 cl = cacheline(dbi->pc_p); - if (dbi->status == BI_INVALID || dbi->status == BI_NEED_RECOMP) { - if (dbi == cache_tags[cl+1].bi) - cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; - dbi->handler_to_use = (cpuop_func *)popall_execute_normal; - set_dhtu(dbi, dbi->direct_pen); - dbi->status = BI_INVALID; - } - else { - if (dbi == cache_tags[cl+1].bi) - cache_tags[cl].handler = (cpuop_func *)popall_check_checksum; - dbi->handler_to_use = (cpuop_func *)popall_check_checksum; - set_dhtu(dbi, dbi->direct_pcc); - dbi->status = BI_NEED_CHECK; - } - remove_from_list(dbi); - add_to_dormant(dbi); - } - } - return; -#endif - flush_icache(-1); -} - -static void catastrophe(void) -{ - abort(); -} - -int failure; - -#define TARGET_M68K 0 -#define TARGET_POWERPC 1 -#define TARGET_X86 2 -#define TARGET_X86_64 3 -#if defined(i386) || defined(__i386__) -#define TARGET_NATIVE TARGET_X86 -#endif -#if defined(powerpc) || defined(__powerpc__) -#define TARGET_NATIVE TARGET_POWERPC -#endif -#if defined(x86_64) || defined(__x86_64__) -#define TARGET_NATIVE TARGET_X86_64 -#endif - -#ifdef ENABLE_MON -static uae_u32 mon_read_byte_jit(uintptr addr) -{ - uae_u8 *m = (uae_u8 *)addr; - return (uintptr)(*m); -} - -static void mon_write_byte_jit(uintptr addr, uae_u32 b) -{ - uae_u8 *m = (uae_u8 *)addr; - *m = b; -} -#endif - -void disasm_block(int target, uint8 * start, size_t length) -{ - if (!JITDebug) - return; - -#if defined(JIT_DEBUG) && defined(ENABLE_MON) - char disasm_str[200]; - sprintf(disasm_str, "%s $%x $%x", - target == TARGET_M68K ? "d68" : - target == TARGET_X86 ? "d86" : - target == TARGET_X86_64 ? "d8664" : - target == TARGET_POWERPC ? "d" : "x", - start, start + length - 1); - - uae_u32 (*old_mon_read_byte)(uintptr) = mon_read_byte; - void (*old_mon_write_byte)(uintptr, uae_u32) = mon_write_byte; - - mon_read_byte = mon_read_byte_jit; - mon_write_byte = mon_write_byte_jit; - - char *arg[5] = {"mon", "-m", "-r", disasm_str, NULL}; - mon(4, arg); - - mon_read_byte = old_mon_read_byte; - mon_write_byte = old_mon_write_byte; -#endif -} - -static void disasm_native_block(uint8 *start, size_t length) -{ - disasm_block(TARGET_NATIVE, start, length); -} - -static void disasm_m68k_block(uint8 *start, size_t length) -{ - disasm_block(TARGET_M68K, start, length); -} - -#ifdef HAVE_GET_WORD_UNSWAPPED -# define DO_GET_OPCODE(a) (do_get_mem_word_unswapped((uae_u16 *)(a))) -#else -# define DO_GET_OPCODE(a) (do_get_mem_word((uae_u16 *)(a))) -#endif - -#if JIT_DEBUG -static uae_u8 *last_regs_pc_p = 0; -static uae_u8 *last_compiled_block_addr = 0; - -void compiler_dumpstate(void) -{ - if (!JITDebug) - return; - - write_log("### Host addresses\n"); - write_log("MEM_BASE : %x\n", MEMBaseDiff); - write_log("PC_P : %p\n", ®s.pc_p); - write_log("SPCFLAGS : %p\n", ®s.spcflags); - write_log("D0-D7 : %p-%p\n", ®s.regs[0], ®s.regs[7]); - write_log("A0-A7 : %p-%p\n", ®s.regs[8], ®s.regs[15]); - write_log("\n"); - - write_log("### M68k processor state\n"); - m68k_dumpstate(0); - write_log("\n"); - - write_log("### Block in Mac address space\n"); - write_log("M68K block : %p\n", - (void *)(uintptr)get_virtual_address(last_regs_pc_p)); - write_log("Native block : %p (%d bytes)\n", - (void *)(uintptr)get_virtual_address(last_compiled_block_addr), - get_blockinfo_addr(last_regs_pc_p)->direct_handler_size); - write_log("\n"); -} -#endif - -static void compile_block(cpu_history* pc_hist, int blocklen) -{ - if (letit && compiled_code) { -#if PROFILE_COMPILE_TIME - compile_count++; - clock_t start_time = clock(); -#endif -#if JIT_DEBUG - bool disasm_block = false; -#endif - - /* OK, here we need to 'compile' a block */ - int i; - int r; - int was_comp=0; - uae_u8 liveflags[MAXRUN+1]; -#if USE_CHECKSUM_INFO - bool trace_in_rom = isinrom((uintptr)pc_hist[0].location); - uintptr max_pcp=(uintptr)pc_hist[blocklen - 1].location; - uintptr min_pcp=max_pcp; -#else - uintptr max_pcp=(uintptr)pc_hist[0].location; - uintptr min_pcp=max_pcp; -#endif - uae_u32 cl=cacheline(pc_hist[0].location); - void* specflags=(void*)®s.spcflags; - blockinfo* bi=NULL; - blockinfo* bi2; - int extra_len=0; - - redo_current_block=0; - if (current_compile_p>=max_compile_start) - flush_icache_hard(7); - - alloc_blockinfos(); - - bi=get_blockinfo_addr_new(pc_hist[0].location,0); - bi2=get_blockinfo(cl); - - optlev=bi->optlevel; - if (bi->status!=BI_INVALID) { - Dif (bi!=bi2) { - /* I don't think it can happen anymore. Shouldn't, in - any case. So let's make sure... */ - write_log("WOOOWOO count=%d, ol=%d %p %p\n", - bi->count,bi->optlevel,bi->handler_to_use, - cache_tags[cl].handler); - abort(); - } - - Dif (bi->count!=-1 && bi->status!=BI_NEED_RECOMP) { - write_log("bi->count=%d, bi->status=%d\n",bi->count,bi->status); - /* What the heck? We are not supposed to be here! */ - abort(); - } - } - if (bi->count==-1) { - optlev++; - while (!optcount[optlev]) - optlev++; - bi->count=optcount[optlev]-1; - } - current_block_pc_p=(uintptr)pc_hist[0].location; - - remove_deps(bi); /* We are about to create new code */ - bi->optlevel=optlev; - bi->pc_p=(uae_u8*)pc_hist[0].location; -#if USE_CHECKSUM_INFO - free_checksum_info_chain(bi->csi); - bi->csi = NULL; -#endif - - liveflags[blocklen]=0x1f; /* All flags needed afterwards */ - i=blocklen; - while (i--) { - uae_u16* currpcp=pc_hist[i].location; - uae_u32 op=DO_GET_OPCODE(currpcp); - -#if USE_CHECKSUM_INFO - trace_in_rom = trace_in_rom && isinrom((uintptr)currpcp); - if (follow_const_jumps && is_const_jump(op)) { - checksum_info *csi = alloc_checksum_info(); - csi->start_p = (uae_u8 *)min_pcp; - csi->length = max_pcp - min_pcp + LONGEST_68K_INST; - csi->next = bi->csi; - bi->csi = csi; - max_pcp = (uintptr)currpcp; - } - min_pcp = (uintptr)currpcp; -#else - if ((uintptr)currpcpmax_pcp) - max_pcp=(uintptr)currpcp; -#endif - - liveflags[i]=((liveflags[i+1]& - (~prop[op].set_flags))| - prop[op].use_flags); - if (prop[op].is_addx && (liveflags[i+1]&FLAG_Z)==0) - liveflags[i]&= ~FLAG_Z; - } - -#if USE_CHECKSUM_INFO - checksum_info *csi = alloc_checksum_info(); - csi->start_p = (uae_u8 *)min_pcp; - csi->length = max_pcp - min_pcp + LONGEST_68K_INST; - csi->next = bi->csi; - bi->csi = csi; -#endif - - bi->needed_flags=liveflags[0]; - - align_target(align_loops); - was_comp=0; - - bi->direct_handler=(cpuop_func *)get_target(); - set_dhtu(bi,bi->direct_handler); - bi->status=BI_COMPILING; - current_block_start_target=(uintptr)get_target(); - - log_startblock(); - - if (bi->count>=0) { /* Need to generate countdown code */ - raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); - raw_sub_l_mi((uintptr)&(bi->count),1); - raw_jl((uintptr)popall_recompile_block); - } - if (optlev==0) { /* No need to actually translate */ - /* Execute normally without keeping stats */ - raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); - raw_jmp((uintptr)popall_exec_nostats); - } - else { - reg_alloc_run=0; - next_pc_p=0; - taken_pc_p=0; - branch_cc=0; - - comp_pc_p=(uae_u8*)pc_hist[0].location; - init_comp(); - was_comp=1; - -#ifdef USE_CPU_EMUL_SERVICES - raw_sub_l_mi((uintptr)&emulated_ticks,blocklen); - raw_jcc_b_oponly(NATIVE_CC_GT); - uae_s8 *branchadd=(uae_s8*)get_target(); - emit_byte(0); - raw_call((uintptr)cpu_do_check_ticks); - *branchadd=(uintptr)get_target()-((uintptr)branchadd+1); -#endif - -#if JIT_DEBUG - if (JITDebug) { - raw_mov_l_mi((uintptr)&last_regs_pc_p,(uintptr)pc_hist[0].location); - raw_mov_l_mi((uintptr)&last_compiled_block_addr,current_block_start_target); - } -#endif - - for (i=0;i1) { - failure=0; - if (!was_comp) { - comp_pc_p=(uae_u8*)pc_hist[i].location; - init_comp(); - } - was_comp=1; - - comptbl[opcode](opcode); - freescratch(); - if (!(liveflags[i+1] & FLAG_CZNV)) { - /* We can forget about flags */ - dont_care_flags(); - } -#if INDIVIDUAL_INST - flush(1); - nop(); - flush(1); - was_comp=0; -#endif - } - - if (failure) { - if (was_comp) { - flush(1); - was_comp=0; - } - raw_mov_l_ri(REG_PAR1,(uae_u32)opcode); -#if USE_NORMAL_CALLING_CONVENTION - raw_push_l_r(REG_PAR1); -#endif - raw_mov_l_mi((uintptr)®s.pc_p, - (uintptr)pc_hist[i].location); - raw_call((uintptr)cputbl[opcode]); -#if PROFILE_UNTRANSLATED_INSNS - // raw_cputbl_count[] is indexed with plain opcode (in m68k order) - raw_add_l_mi((uintptr)&raw_cputbl_count[cft_map(opcode)],1); -#endif -#if USE_NORMAL_CALLING_CONVENTION - raw_inc_sp(4); -#endif - - if (i < blocklen - 1) { - uae_s8* branchadd; - - raw_mov_l_rm(0,(uintptr)specflags); - raw_test_l_rr(0,0); - raw_jz_b_oponly(); - branchadd=(uae_s8 *)get_target(); - emit_byte(0); - raw_jmp((uintptr)popall_do_nothing); - *branchadd=(uintptr)get_target()-(uintptr)branchadd-1; - } - } - } -#if 1 /* This isn't completely kosher yet; It really needs to be - be integrated into a general inter-block-dependency scheme */ - if (next_pc_p && taken_pc_p && - was_comp && taken_pc_p==current_block_pc_p) { - blockinfo* bi1=get_blockinfo_addr_new((void*)next_pc_p,0); - blockinfo* bi2=get_blockinfo_addr_new((void*)taken_pc_p,0); - uae_u8 x=bi1->needed_flags; - - if (x==0xff || 1) { /* To be on the safe side */ - uae_u16* next=(uae_u16*)next_pc_p; - uae_u32 op=DO_GET_OPCODE(next); - - x=0x1f; - x&=(~prop[op].set_flags); - x|=prop[op].use_flags; - } - - x|=bi2->needed_flags; - if (!(x & FLAG_CZNV)) { - /* We can forget about flags */ - dont_care_flags(); - extra_len+=2; /* The next instruction now is part of this - block */ - } - - } -#endif - log_flush(); - - if (next_pc_p) { /* A branch was registered */ - uintptr t1=next_pc_p; - uintptr t2=taken_pc_p; - int cc=branch_cc; - - uae_u32* branchadd; - uae_u32* tba; - bigstate tmp; - blockinfo* tbi; - - if (taken_pc_penv))) { - mark_callers_recompile(bi); - } - - big_to_small_state(&live,&(bi->env)); -#endif - -#if USE_CHECKSUM_INFO - remove_from_list(bi); - if (trace_in_rom) { - // No need to checksum that block trace on cache invalidation - free_checksum_info_chain(bi->csi); - bi->csi = NULL; - add_to_dormant(bi); - } - else { - calc_checksum(bi,&(bi->c1),&(bi->c2)); - add_to_active(bi); - } -#else - if (next_pc_p+extra_len>=max_pcp && - next_pc_p+extra_lenlen=max_pcp-min_pcp; - bi->min_pcp=min_pcp; - - remove_from_list(bi); - if (isinrom(min_pcp) && isinrom(max_pcp)) { - add_to_dormant(bi); /* No need to checksum it on cache flush. - Please don't start changing ROMs in - flight! */ - } - else { - calc_checksum(bi,&(bi->c1),&(bi->c2)); - add_to_active(bi); - } -#endif - - current_cache_size += get_target() - (uae_u8 *)current_compile_p; - -#if JIT_DEBUG - if (JITDebug) - bi->direct_handler_size = get_target() - (uae_u8 *)current_block_start_target; - - if (JITDebug && disasm_block) { - uaecptr block_addr = start_pc + ((char *)pc_hist[0].location - (char *)start_pc_p); - D(bug("M68K block @ 0x%08x (%d insns)\n", block_addr, blocklen)); - uae_u32 block_size = ((uae_u8 *)pc_hist[blocklen - 1].location - (uae_u8 *)pc_hist[0].location) + 1; - disasm_m68k_block((uae_u8 *)pc_hist[0].location, block_size); - D(bug("Compiled block @ 0x%08x\n", pc_hist[0].location)); - disasm_native_block((uae_u8 *)current_block_start_target, bi->direct_handler_size); - getchar(); - } -#endif - - log_dump(); - align_target(align_jumps); - - /* This is the non-direct handler */ - bi->handler= - bi->handler_to_use=(cpuop_func *)get_target(); - raw_cmp_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); - raw_jnz((uintptr)popall_cache_miss); - comp_pc_p=(uae_u8*)pc_hist[0].location; - - bi->status=BI_FINALIZING; - init_comp(); - match_states(bi); - flush(1); - - raw_jmp((uintptr)bi->direct_handler); - - current_compile_p=get_target(); - raise_in_cl_list(bi); - - /* We will flush soon, anyway, so let's do it now */ - if (current_compile_p>=max_compile_start) - flush_icache_hard(7); - - bi->status=BI_ACTIVE; - if (redo_current_block) - block_need_recompile(bi); - -#if PROFILE_COMPILE_TIME - compile_time += (clock() - start_time); -#endif - } - - /* Account for compilation time */ - cpu_do_check_ticks(); -} - -void do_nothing(void) -{ - /* What did you expect this to do? */ -} - -void exec_nostats(void) -{ - for (;;) { - uae_u32 opcode = GET_OPCODE; -#if FLIGHT_RECORDER - m68k_record_step(m68k_getpc()); -#endif - (*cpufunctbl[opcode])(opcode); - cpu_check_ticks(); - if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL)) { - return; /* We will deal with the spcflags in the caller */ - } - } -} - -void execute_normal(void) -{ - if (!check_for_cache_miss()) { - cpu_history pc_hist[MAXRUN]; - int blocklen = 0; -#if REAL_ADDRESSING || DIRECT_ADDRESSING - start_pc_p = regs.pc_p; - start_pc = get_virtual_address(regs.pc_p); -#else - start_pc_p = regs.pc_oldp; - start_pc = regs.pc; -#endif - for (;;) { /* Take note: This is the do-it-normal loop */ - pc_hist[blocklen++].location = (uae_u16 *)regs.pc_p; - uae_u32 opcode = GET_OPCODE; -#if FLIGHT_RECORDER - m68k_record_step(m68k_getpc()); -#endif - (*cpufunctbl[opcode])(opcode); - cpu_check_ticks(); - if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL) || blocklen>=MAXRUN) { - compile_block(pc_hist, blocklen); - return; /* We will deal with the spcflags in the caller */ - } - /* No need to check regs.spcflags, because if they were set, - we'd have ended up inside that "if" */ - } - } -} - -typedef void (*compiled_handler)(void); - -static void m68k_do_compile_execute(void) -{ - for (;;) { - ((compiled_handler)(pushall_call_handler))(); - /* Whenever we return from that, we should check spcflags */ - if (SPCFLAGS_TEST(SPCFLAG_ALL)) { - if (m68k_do_specialties ()) - return; - } - } -} - -void m68k_compile_execute (void) -{ - for (;;) { - if (quit_program) - break; - m68k_do_compile_execute(); - } -} diff --git a/BasiliskII/src/uae_cpu/compiler/flags_x86.h b/BasiliskII/src/uae_cpu/compiler/flags_x86.h deleted file mode 100644 index 4247f10a8..000000000 --- a/BasiliskII/src/uae_cpu/compiler/flags_x86.h +++ /dev/null @@ -1,47 +0,0 @@ -/* - * compiler/flags_x86.h - Native flags definitions for IA-32 - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 NATIVE_FLAGS_X86_H -#define NATIVE_FLAGS_X86_H - -/* Native integer code conditions */ -enum { - NATIVE_CC_HI = 7, - NATIVE_CC_LS = 6, - NATIVE_CC_CC = 3, - NATIVE_CC_CS = 2, - NATIVE_CC_NE = 5, - NATIVE_CC_EQ = 4, - NATIVE_CC_VC = 11, - NATIVE_CC_VS = 10, - NATIVE_CC_PL = 9, - NATIVE_CC_MI = 8, - NATIVE_CC_GE = 13, - NATIVE_CC_LT = 12, - NATIVE_CC_GT = 15, - NATIVE_CC_LE = 14 -}; - -#endif /* NATIVE_FLAGS_X86_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c deleted file mode 100644 index 2e16972d5..000000000 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ /dev/null @@ -1,3072 +0,0 @@ -/* - * compiler/gencomp.c - MC680x0 compilation generator - * - * Based on work Copyright 1995, 1996 Bernd Schmidt - * Changes for UAE-JIT Copyright 2000 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2005 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include "sysdeps.h" -#include "../readcpu.h" - -#define BOOL_TYPE "int" -#define failure global_failure=1 -#define FAILURE global_failure=1 -#define isjump global_isjump=1 -#define is_const_jump global_iscjump=1; -#define isaddx global_isaddx=1 -#define uses_cmov global_cmov=1 -#define mayfail global_mayfail=1 -#define uses_fpu global_fpu=1 - -int hack_opcode; - -static int global_failure; -static int global_isjump; -static int global_iscjump; -static int global_isaddx; -static int global_cmov; -static int long_opcode; -static int global_mayfail; -static int global_fpu; - -static char endstr[1000]; -static char lines[100000]; -static int comp_index=0; - -static int cond_codes_x86[]={-1,-1,7,6,3,2,5,4,-1,-1,9,8,13,12,15,14}; - -static void comprintf(const char* format, ...) -{ - va_list args; - - va_start(args,format); - comp_index+=vsprintf(lines+comp_index,format,args); -} - -static void com_discard(void) -{ - comp_index=0; -} - -static void com_flush(void) -{ - int i; - for (i=0;i 0); - n_braces--; - comprintf ("}"); -} - -static void -finish_braces (void) -{ - while (n_braces > 0) - close_brace (); -} - -static void -pop_braces (int to) -{ - while (n_braces > to) - close_brace (); -} - -static int -bit_size (int size) -{ - switch (size) - { - case sz_byte: - return 8; - case sz_word: - return 16; - case sz_long: - return 32; - default: - abort (); - } - return 0; -} - -static const char * -bit_mask (int size) -{ - switch (size) - { - case sz_byte: - return "0xff"; - case sz_word: - return "0xffff"; - case sz_long: - return "0xffffffff"; - default: - abort (); - } - return 0; -} - -static __inline__ void gen_update_next_handler(void) -{ - return; /* Can anything clever be done here? */ -} - -static void gen_writebyte(char* address, char* source) -{ - comprintf("\twritebyte(%s,%s,scratchie);\n",address,source); -} - -static void gen_writeword(char* address, char* source) -{ - comprintf("\twriteword(%s,%s,scratchie);\n",address,source); -} - -static void gen_writelong(char* address, char* source) -{ - comprintf("\twritelong(%s,%s,scratchie);\n",address,source); -} - -static void gen_readbyte(char* address, char* dest) -{ - comprintf("\treadbyte(%s,%s,scratchie);\n",address,dest); -} - -static void gen_readword(char* address, char* dest) -{ - comprintf("\treadword(%s,%s,scratchie);\n",address,dest); -} - -static void gen_readlong(char* address, char* dest) -{ - comprintf("\treadlong(%s,%s,scratchie);\n",address,dest); -} - - - -static const char * -gen_nextilong (void) -{ - static char buffer[80]; - - sprintf (buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)"); - insn_n_cycles += 4; - - long_opcode=1; - return buffer; -} - -static const char * -gen_nextiword (void) -{ - static char buffer[80]; - - sprintf (buffer, "comp_get_iword((m68k_pc_offset+=2)-2)"); - insn_n_cycles+=2; - - long_opcode=1; - return buffer; -} - -static const char * -gen_nextibyte (void) -{ - static char buffer[80]; - - sprintf (buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)"); - insn_n_cycles += 2; - - long_opcode=1; - return buffer; -} - -static void -swap_opcode (void) -{ - comprintf("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - comprintf("\topcode = do_byteswap_16(opcode);\n"); - comprintf("#endif\n"); -} - -static void -sync_m68k_pc (void) -{ - comprintf("\t if (m68k_pc_offset>100) sync_m68k_pc();\n"); -} - - -/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, - * the calling routine handles Apdi and Aipi modes. - * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ -static void -genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) -{ - start_brace (); - switch (mode) - { - case Dreg: /* Do we need to check dodgy here? */ - if (movem) - abort (); - if (getv == 1 || getv==2) { - /* We generate the variable even for getv==2, so we can use - it as a destination for MOVE */ - comprintf ("\tint %s=%s;\n",name,reg); - } - return; - - case Areg: - if (movem) - abort (); - if (getv == 1 || getv==2) { - /* see above */ - comprintf ("\tint %s=dodgy?scratchie++:%s+8;\n",name,reg); - if (getv==1) { - comprintf ("\tif (dodgy) \n"); - comprintf ("\t\tmov_l_rr(%s,%s+8);\n",name, reg); - } - } - return; - - case Aind: - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf ("\tif (dodgy) \n"); - comprintf ("\t\tmov_l_rr(%sa,%s+8);\n",name, reg); - break; - case Aipi: - comprintf ("\tint %sa=scratchie++;\n",name,reg); - comprintf ("\tmov_l_rr(%sa,%s+8);\n",name, reg); - break; - case Apdi: - switch (size) - { - case sz_byte: - if (movem) { - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - else { - start_brace(); - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf("\tlea_l_brr(%s+8,%s+8,(uae_s32)-areg_byteinc[%s]);\n",reg,reg,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - break; - case sz_word: - if (movem) { - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - else { - start_brace(); - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf("\tlea_l_brr(%s+8,%s+8,-2);\n",reg,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - break; - case sz_long: - if (movem) { - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - else { - start_brace(); - comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); - comprintf("\tlea_l_brr(%s+8,%s+8,-4);\n",reg,reg); - comprintf ("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - } - break; - default: - abort (); - } - break; - case Ad16: - comprintf("\tint %sa=scratchie++;\n",name); - comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); - comprintf("\tlea_l_brr(%sa,%sa,(uae_s32)(uae_s16)%s);\n",name,name,gen_nextiword()); - break; - case Ad8r: - comprintf("\tint %sa=scratchie++;\n",name); - comprintf("\tcalc_disp_ea_020(%s+8,%s,%sa,scratchie);\n", - reg,gen_nextiword(),name); - break; - - case PC16: - comprintf("\tint %sa=scratchie++;\n",name); - comprintf("\tuae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - comprintf ("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); - comprintf("\tmov_l_ri(%sa,address+PC16off);\n",name); - break; - - case PC8r: - comprintf("\tint pctmp=scratchie++;\n"); - comprintf("\tint %sa=scratchie++;\n",name); - comprintf("\tuae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - start_brace(); - comprintf("\tmov_l_ri(pctmp,address);\n"); - - comprintf("\tcalc_disp_ea_020(pctmp,%s,%sa,scratchie);\n", - gen_nextiword(),name); - break; - case absw: - comprintf ("\tint %sa = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%sa,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); - break; - case absl: - comprintf ("\tint %sa = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%sa,%s); /* absl */\n", name, gen_nextilong ()); - break; - case imm: - if (getv != 1) - abort (); - switch (size) - { - case sz_byte: - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s8)%s);\n", name, gen_nextibyte ()); - break; - case sz_word: - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); - break; - case sz_long: - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,%s);\n", name, gen_nextilong ()); - break; - default: - abort (); - } - return; - case imm0: - if (getv != 1) - abort (); - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s8)%s);\n", name, gen_nextibyte ()); - return; - case imm1: - if (getv != 1) - abort (); - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); - return; - case imm2: - if (getv != 1) - abort (); - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,%s);\n", name, gen_nextilong ()); - return; - case immi: - if (getv != 1) - abort (); - comprintf ("\tint %s = scratchie++;\n",name); - comprintf ("\tmov_l_ri(%s,%s);\n", name, reg); - return; - default: - abort (); - } - - /* We get here for all non-reg non-immediate addressing modes to - * actually fetch the value. */ - if (getv == 1) - { - char astring[80]; - sprintf(astring,"%sa",name); - switch (size) - { - case sz_byte: - insn_n_cycles += 2; - break; - case sz_word: - insn_n_cycles += 2; - break; - case sz_long: - insn_n_cycles += 4; - break; - default: - abort (); - } - start_brace (); - comprintf("\tint %s=scratchie++;\n",name); - switch (size) - { - case sz_byte: - gen_readbyte(astring,name); - break; - case sz_word: - gen_readword(astring,name); - break; - case sz_long: - gen_readlong(astring,name); - break; - default: - abort (); - } - } - - /* We now might have to fix up the register for pre-dec or post-inc - * addressing modes. */ - if (!movem) { - switch (mode) - { - case Aipi: - switch (size) - { - case sz_byte: - comprintf("\tlea_l_brr(%s+8,%s+8,areg_byteinc[%s]);\n",reg,reg,reg); - break; - case sz_word: - comprintf("\tlea_l_brr(%s+8,%s+8,2);\n",reg,reg,reg); - break; - case sz_long: - comprintf("\tlea_l_brr(%s+8,%s+8,4);\n",reg,reg); - break; - default: - abort (); - } - break; - case Apdi: - break; - default: - break; - } - } -} - -static void -genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) -{ - switch (mode) - { - case Dreg: - switch (size) - { - case sz_byte: - comprintf("\tif(%s!=%s)\n",reg,from); - comprintf ("\t\tmov_b_rr(%s,%s);\n", reg, from); - break; - case sz_word: - comprintf("\tif(%s!=%s)\n",reg,from); - comprintf ("\t\tmov_w_rr(%s,%s);\n", reg, from); - break; - case sz_long: - comprintf("\tif(%s!=%s)\n",reg,from); - comprintf ("\t\tmov_l_rr(%s,%s);\n", reg, from); - break; - default: - abort (); - } - break; - case Areg: - switch (size) - { - case sz_word: - comprintf("\tif(%s+8!=%s)\n",reg,from); - comprintf ("\t\tmov_w_rr(%s+8,%s);\n", reg, from); - break; - case sz_long: - comprintf("\tif(%s+8!=%s)\n",reg,from); - comprintf ("\t\tmov_l_rr(%s+8,%s);\n", reg, from); - break; - default: - abort (); - } - break; - - case Apdi: - case absw: - case PC16: - case PC8r: - case Ad16: - case Ad8r: - case Aipi: - case Aind: - case absl: - { - char astring[80]; - sprintf(astring,"%sa",to); - - switch (size) - { - case sz_byte: - insn_n_cycles += 2; - gen_writebyte(astring,from); - break; - case sz_word: - insn_n_cycles += 2; - gen_writeword(astring,from); - break; - case sz_long: - insn_n_cycles += 4; - gen_writelong(astring,from); - break; - default: - abort (); - } - } - break; - case imm: - case imm0: - case imm1: - case imm2: - case immi: - abort (); - break; - default: - abort (); - } -} - -static void genmov16(uae_u32 opcode, struct instr *curi) -{ - comprintf("\tint src=scratchie++;\n"); - comprintf("\tint dst=scratchie++;\n"); - - if ((opcode & 0xfff8) == 0xf620) { - /* MOVE16 (Ax)+,(Ay)+ */ - comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword()); - comprintf("\tmov_l_rr(src,8+srcreg);\n"); - comprintf("\tmov_l_rr(dst,8+dstreg);\n"); - } - else { - /* Other variants */ - genamode (curi->smode, "srcreg", curi->size, "src", 0, 2); - genamode (curi->dmode, "dstreg", curi->size, "dst", 0, 2); - comprintf("\tmov_l_rr(src,srca);\n"); - comprintf("\tmov_l_rr(dst,dsta);\n"); - } - - /* Align on 16-byte boundaries */ - comprintf("\tand_l_ri(src,~15);\n"); - comprintf("\tand_l_ri(dst,~15);\n"); - - if ((opcode & 0xfff8) == 0xf620) { - comprintf("\tif (srcreg != dstreg)\n"); - comprintf("\tadd_l_ri(srcreg+8,16);\n"); - comprintf("\tadd_l_ri(dstreg+8,16);\n"); - } - else if ((opcode & 0xfff8) == 0xf600) - comprintf("\tadd_l_ri(srcreg+8,16);\n"); - else if ((opcode & 0xfff8) == 0xf608) - comprintf("\tadd_l_ri(dstreg+8,16);\n"); - - comprintf("\tint tmp=scratchie;\n"); - comprintf("\tscratchie+=4;\n"); - - comprintf("\tget_n_addr(src,src,scratchie);\n" - "\tget_n_addr(dst,dst,scratchie);\n" - "\tmov_l_rR(tmp+0,src,0);\n" - "\tmov_l_rR(tmp+1,src,4);\n" - "\tmov_l_rR(tmp+2,src,8);\n" - "\tmov_l_rR(tmp+3,src,12);\n" - "\tmov_l_Rr(dst,tmp+0,0);\n" - "\tforget_about(tmp+0);\n" - "\tmov_l_Rr(dst,tmp+1,4);\n" - "\tforget_about(tmp+1);\n" - "\tmov_l_Rr(dst,tmp+2,8);\n" - "\tforget_about(tmp+2);\n" - "\tmov_l_Rr(dst,tmp+3,12);\n"); -} - -static void -genmovemel (uae_u16 opcode) -{ - comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); - comprintf ("\tint native=scratchie++;\n"); - comprintf ("\tint i;\n"); - comprintf ("\tsigned char offset=0;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); - comprintf("\tget_n_addr(srca,native,scratchie);\n"); - - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch(table68k[opcode].size) { - case sz_long: - comprintf("\t\t\tmov_l_rR(i,native,offset);\n" - "\t\t\tbswap_32(i);\n" - "\t\t\toffset+=4;\n"); - break; - case sz_word: - comprintf("\t\t\tmov_w_rR(i,native,offset);\n" - "\t\t\tbswap_16(i);\n" - "\t\t\tsign_extend_16_rr(i,i);\n" - "\t\t\toffset+=2;\n"); - break; - default: abort(); - } - comprintf("\t\t}\n" - "\t}"); - if (table68k[opcode].dmode == Aipi) { - comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n"); - } -} - - -static void -genmovemle (uae_u16 opcode) -{ - comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); - comprintf ("\tint native=scratchie++;\n"); - comprintf ("\tint i;\n"); - comprintf ("\tint tmp=scratchie++;\n"); - comprintf ("\tsigned char offset=0;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); - - comprintf("\tget_n_addr(srca,native,scratchie);\n"); - - if (table68k[opcode].dmode!=Apdi) { - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch(table68k[opcode].size) { - case sz_long: - comprintf("\t\t\tmov_l_rr(tmp,i);\n" - "\t\t\tbswap_32(tmp);\n" - "\t\t\tmov_l_Rr(native,tmp,offset);\n" - "\t\t\toffset+=4;\n"); - break; - case sz_word: - comprintf("\t\t\tmov_l_rr(tmp,i);\n" - "\t\t\tbswap_16(tmp);\n" - "\t\t\tmov_w_Rr(native,tmp,offset);\n" - "\t\t\toffset+=2;\n"); - break; - default: abort(); - } - } - else { /* Pre-decrement */ - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch(table68k[opcode].size) { - case sz_long: - comprintf("\t\t\toffset-=4;\n" - "\t\t\tmov_l_rr(tmp,15-i);\n" - "\t\t\tbswap_32(tmp);\n" - "\t\t\tmov_l_Rr(native,tmp,offset);\n" - ); - break; - case sz_word: - comprintf("\t\t\toffset-=2;\n" - "\t\t\tmov_l_rr(tmp,15-i);\n" - "\t\t\tbswap_16(tmp);\n" - "\t\t\tmov_w_Rr(native,tmp,offset);\n" - ); - break; - default: abort(); - } - } - - - comprintf("\t\t}\n" - "\t}"); - if (table68k[opcode].dmode == Apdi) { - comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n"); - } -} - - -static void -duplicate_carry (void) -{ - comprintf ("\tif (needed_flags&FLAG_X) duplicate_carry();\n"); -} - -typedef enum -{ - flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, - flag_addx, flag_subx, flag_zn, flag_av, flag_sv, flag_and, flag_or, - flag_eor, flag_mov -} -flagtypes; - - -static void -genflags (flagtypes type, wordsizes size, char *value, char *src, char *dst) -{ - if (noflags) { - switch(type) { - case flag_cmp: - comprintf("\tdont_care_flags();\n"); - comprintf("/* Weird --- CMP with noflags ;-) */\n"); - return; - case flag_add: - case flag_sub: - comprintf("\tdont_care_flags();\n"); - { - char* op; - switch(type) { - case flag_add: op="add"; break; - case flag_sub: op="sub"; break; - default: abort(); - } - switch (size) - { - case sz_byte: - comprintf("\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\t%s_l(%s,%s);\n",op,dst,src); - break; - } - return; - } - break; - - case flag_and: - comprintf("\tdont_care_flags();\n"); - switch (size) - { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); - comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); - comprintf("\tand_l(%s,scratchie);\n",dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tand_b(%s,%s);\n",dst,src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); - comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); - comprintf("\tand_l(%s,scratchie);\n",dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tand_w(%s,%s);\n",dst,src); - break; - case sz_long: - comprintf("\tand_l(%s,%s);\n",dst,src); - break; - } - return; - - case flag_mov: - comprintf("\tdont_care_flags();\n"); - switch (size) - { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); - comprintf("\tand_l_ri(%s,0xffffff00);\n",dst); - comprintf("\tor_l(%s,scratchie);\n",dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tmov_b_rr(%s,%s);\n",dst,src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); - comprintf("\tand_l_ri(%s,0xffff0000);\n",dst); - comprintf("\tor_l(%s,scratchie);\n",dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tmov_w_rr(%s,%s);\n",dst,src); - break; - case sz_long: - comprintf("\tmov_l_rr(%s,%s);\n",dst,src); - break; - } - return; - - case flag_or: - case flag_eor: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - char* op; - switch(type) { - case flag_or: op="or"; break; - case flag_eor: op="xor"; break; - default: abort(); - } - switch (size) - { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); - comprintf("\t%s_l(%s,scratchie);\n",op,dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); - comprintf("\t%s_l(%s,scratchie);\n",op,dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\t%s_l(%s,%s);\n",op,dst,src); - break; - } - close_brace(); - return; - } - - - case flag_addx: - case flag_subx: - comprintf("\tdont_care_flags();\n"); - { - char* op; - switch(type) { - case flag_addx: op="adc"; break; - case flag_subx: op="sbb"; break; - default: abort(); - } - comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ - switch (size) - { - case sz_byte: - comprintf("\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\t%s_l(%s,%s);\n",op,dst,src); - break; - } - return; - } - break; - default: return; - } - } - - /* Need the flags, but possibly not all of them */ - switch (type) - { - case flag_logical_noclobber: - failure; - - case flag_and: - case flag_or: - case flag_eor: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - char* op; - switch(type) { - case flag_and: op="and"; break; - case flag_or: op="or"; break; - case flag_eor: op="xor"; break; - default: abort(); - } - switch (size) - { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n",op,dst,src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - } - - case flag_mov: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - switch (size) - { - case sz_byte: - comprintf("\tif (%s!=%s) {\n",src,dst); - comprintf("\tmov_b_ri(%s,0);\n" - "\tstart_needflags();\n",dst); - comprintf("\tor_b(%s,%s);\n",dst,src); - comprintf("\t} else {\n"); - comprintf("\tmov_b_rr(%s,%s);\n",dst,src); - comprintf("\ttest_b_rr(%s,%s);\n",dst,dst); - comprintf("\t}\n"); - break; - case sz_word: - comprintf("\tif (%s!=%s) {\n",src,dst); - comprintf("\tmov_w_ri(%s,0);\n" - "\tstart_needflags();\n",dst); - comprintf("\tor_w(%s,%s);\n",dst,src); - comprintf("\t} else {\n"); - comprintf("\tmov_w_rr(%s,%s);\n",dst,src); - comprintf("\ttest_w_rr(%s,%s);\n",dst,dst); - comprintf("\t}\n"); - break; - case sz_long: - comprintf("\tif (%s!=%s) {\n",src,dst); - comprintf("\tmov_l_ri(%s,0);\n" - "\tstart_needflags();\n",dst); - comprintf("\tor_l(%s,%s);\n",dst,src); - comprintf("\t} else {\n"); - comprintf("\tmov_l_rr(%s,%s);\n",dst,src); - comprintf("\ttest_l_rr(%s,%s);\n",dst,dst); - comprintf("\t}\n"); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - } - - case flag_logical: - comprintf("\tdont_care_flags();\n"); - start_brace(); - switch (size) - { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\ttest_b_rr(%s,%s);\n",value,value); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\ttest_w_rr(%s,%s);\n",value,value); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\ttest_l_rr(%s,%s);\n",value,value); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - - - case flag_add: - case flag_sub: - case flag_cmp: - comprintf("\tdont_care_flags();\n"); - { - char* op; - switch(type) { - case flag_add: op="add"; break; - case flag_sub: op="sub"; break; - case flag_cmp: op="cmp"; break; - default: abort(); - } - switch (size) - { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n",op,dst,src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - if (type!=flag_cmp) { - duplicate_carry(); - } - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - - return; - } - - case flag_addx: - case flag_subx: - uses_cmov; - comprintf("\tdont_care_flags();\n"); - { - char* op; - switch(type) { - case flag_addx: op="adc"; break; - case flag_subx: op="sbb"; break; - default: abort(); - } - start_brace(); - comprintf("\tint zero=scratchie++;\n" - "\tint one=scratchie++;\n" - "\tif (needed_flags&FLAG_Z) {\n" - "\tmov_l_ri(zero,0);\n" - "\tmov_l_ri(one,-1);\n" - "\tmake_flags_live();\n" - "\tcmov_l_rr(zero,one,5);\n" - "\t}\n"); - comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ - switch (size) - { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n",op,dst,src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n",op,dst,src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n",op,dst,src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tif (needed_flags&FLAG_Z) {\n" - "\tcmov_l_rr(zero,one,5);\n" - "\tset_zero(zero, one);\n" /* No longer need one */ - "\tlive_flags();\n" - "\t}\n"); - comprintf("\tend_needflags();\n"); - duplicate_carry(); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - return; - } - default: - failure; - break; - } -} - -static void -force_range_for_rox (const char *var, wordsizes size) -{ - /* Could do a modulo operation here... which one is faster? */ - switch (size) - { - case sz_long: - comprintf ("\tif (%s >= 33) %s -= 33;\n", var, var); - break; - case sz_word: - comprintf ("\tif (%s >= 34) %s -= 34;\n", var, var); - comprintf ("\tif (%s >= 17) %s -= 17;\n", var, var); - break; - case sz_byte: - comprintf ("\tif (%s >= 36) %s -= 36;\n", var, var); - comprintf ("\tif (%s >= 18) %s -= 18;\n", var, var); - comprintf ("\tif (%s >= 9) %s -= 9;\n", var, var); - break; - } -} - -static const char * -cmask (wordsizes size) -{ - switch (size) - { - case sz_byte: - return "0x80"; - case sz_word: - return "0x8000"; - case sz_long: - return "0x80000000"; - default: - abort (); - } -} - -static int -source_is_imm1_8 (struct instr *i) -{ - return i->stype == 3; -} - -static int /* returns zero for success, non-zero for failure */ -gen_opcode (unsigned long int opcode) -{ - struct instr *curi = table68k + opcode; - char* ssize=NULL; - - insn_n_cycles = 2; - global_failure=0; - long_opcode=0; - global_isjump=0; - global_iscjump=0; - global_isaddx=0; - global_cmov=0; - global_fpu=0; - global_mayfail=0; - hack_opcode=opcode; - endstr[0]=0; - - start_brace (); - comprintf("\tuae_u8 scratchie=S1;\n"); - switch (curi->plev) - { - case 0: /* not privileged */ - break; - case 1: /* unprivileged only on 68000 */ - if (cpu_level == 0) - break; - if (next_cpu_level < 0) - next_cpu_level = 0; - - /* fall through */ - case 2: /* priviledged */ - failure; /* Easy ones first */ - break; - case 3: /* privileged if size == word */ - if (curi->size == sz_byte) - break; - failure; - break; - } - switch (curi->size) { - case sz_byte: ssize="b"; break; - case sz_word: ssize="w"; break; - case sz_long: ssize="l"; break; - default: abort(); - } - - switch (curi->mnemo) - { - case i_OR: - case i_AND: - case i_EOR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - switch(curi->mnemo) { - case i_OR: genflags (flag_or, curi->size, "", "src", "dst"); break; - case i_AND: genflags (flag_and, curi->size, "", "src", "dst"); break; - case i_EOR: genflags (flag_eor, curi->size, "", "src", "dst"); break; - } - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - - case i_ORSR: - case i_EORSR: - failure; - isjump; - break; - case i_ANDSR: - failure; - isjump; - break; - case i_SUB: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags (flag_sub, curi->size, "", "src", "dst"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_SUBA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; - case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; - case sz_long: comprintf("\ttmp=src;\n"); break; - default: abort(); - } - comprintf("\tsub_l(dst,tmp);\n"); - genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); - break; - case i_SUBX: - isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags (flag_subx, curi->size, "", "src", "dst"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_SBCD: - failure; - /* I don't think so! */ - break; - case i_ADD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags (flag_add, curi->size, "", "src", "dst"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_ADDA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; - case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; - case sz_long: comprintf("\ttmp=src;\n"); break; - default: abort(); - } - comprintf("\tadd_l(dst,tmp);\n"); - genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); - break; - case i_ADDX: - isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - genflags (flag_addx, curi->size, "", "src", "dst"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_ABCD: - failure; - /* No BCD maths for me.... */ - break; - case i_NEG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace (); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags (flag_sub, curi->size, "", "src", "dst"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - break; - case i_NEGX: - isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace (); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags (flag_subx, curi->size, "", "src", "dst"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - break; - - case i_NBCD: - failure; - /* Nope! */ - break; - case i_CLR: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); - start_brace(); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags (flag_logical, curi->size, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - break; - case i_NOT: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace (); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0xffffffff);\n"); - genflags (flag_eor, curi->size, "", "src", "dst"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - break; - case i_TST: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genflags (flag_logical, curi->size, "src", "", ""); - break; - case i_BCHG: - case i_BCLR: - case i_BSET: - case i_BTST: -/* failure; /* NEW: from "Ipswitch Town" release */ - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint s=scratchie++;\n" - "\tint tmp=scratchie++;\n" - "\tmov_l_rr(s,src);\n"); - if (curi->size == sz_byte) - comprintf("\tand_l_ri(s,7);\n"); - else - comprintf("\tand_l_ri(s,31);\n"); - - { - char* op; - int need_write=1; - - switch(curi->mnemo) { - case i_BCHG: op="btc"; break; - case i_BCLR: op="btr"; break; - case i_BSET: op="bts"; break; - case i_BTST: op="bt"; need_write=0; break; - default: abort(); - } - comprintf("\t%s_l_rr(dst,s);\n" /* Answer now in C */ - "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ - "\tmake_flags_live();\n" /* Get the flags back */ - "\tdont_care_flags();\n",op); - if (!noflags) { - comprintf("\tstart_needflags();\n" - "\tset_zero(s,tmp);\n" - "\tlive_flags();\n" - "\tend_needflags();\n"); - } - if (need_write) - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - } - break; - - case i_CMPM: - case i_CMP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace (); - genflags (flag_cmp, curi->size, "", "src", "dst"); - break; - case i_CMPA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmps=scratchie++;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tsign_extend_8_rr(tmps,src);\n"); break; - case sz_word: comprintf("\tsign_extend_16_rr(tmps,src);\n"); break; - case sz_long: comprintf("tmps=src;\n"); break; - default: abort(); - } - genflags (flag_cmp, sz_long, "", "tmps", "dst"); - break; - /* The next two are coded a little unconventional, but they are doing - * weird things... */ - case i_MVPRM: - isjump; - failure; - break; - case i_MVPMR: - isjump; - failure; - break; - case i_MOVE: - switch(curi->dmode) { - case Dreg: - case Areg: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genflags (flag_mov, curi->size, "", "src", "dst"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - default: /* It goes to memory, not a register */ - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); - break; - } - break; - case i_MOVEA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - - start_brace(); - comprintf("\tint tmps=scratchie++;\n"); - switch(curi->size) { - case sz_word: comprintf("\tsign_extend_16_rr(dst,src);\n"); break; - case sz_long: comprintf("\tmov_l_rr(dst,src);\n"); break; - default: abort(); - } - genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); - break; - - case i_MVSR2: - isjump; - failure; - break; - case i_MV2SR: - isjump; - failure; - break; - case i_SWAP: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\tdont_care_flags();\n"); - comprintf("\trol_l_ri(src,16);\n"); - genflags (flag_logical, sz_long, "src", "", ""); - genastore ("src", curi->smode, "srcreg", sz_long, "src"); - break; - case i_EXG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tmov_l_rr(tmp,src);\n"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - genastore ("tmp", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_EXT: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\tdont_care_flags();\n"); - start_brace (); - switch (curi->size) - { - case sz_byte: - comprintf ("\tint dst = src;\n" - "\tsign_extend_8_rr(src,src);\n"); - break; - case sz_word: - comprintf ("\tint dst = scratchie++;\n" - "\tsign_extend_8_rr(dst,src);\n"); - break; - case sz_long: - comprintf ("\tint dst = src;\n" - "\tsign_extend_16_rr(src,src);\n"); - break; - default: - abort (); - } - genflags (flag_logical, - curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src"); - break; - case i_MVMEL: - genmovemel ((uae_u16)opcode); - break; - case i_MVMLE: - genmovemle ((uae_u16)opcode); - break; - case i_TRAP: - isjump; - failure; - break; - case i_MVR2USP: - isjump; - failure; - break; - case i_MVUSP2R: - isjump; - failure; - break; - case i_RESET: - isjump; - failure; - break; - case i_NOP: - break; - case i_STOP: - isjump; - failure; - break; - case i_RTE: - isjump; - failure; - break; - case i_RTD: -/* failure; /* NEW: from "Ipswitch Town" release */ - genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); - /* offs is constant */ - comprintf("\tadd_l_ri(offs,4);\n"); - start_brace(); - comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc,newad);\n" - "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n" - "\tadd_l(15,offs);\n"); - gen_update_next_handler(); - isjump; - break; - case i_LINK: -/* failure; /* NEW: from "Ipswitch Town" release */ - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); - comprintf("\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,src,scratchie);\n" - "\tmov_l_rr(src,15);\n"); - if (curi->size==sz_word) - comprintf("\tsign_extend_16_rr(offs,offs);\n"); - comprintf("\tadd_l(15,offs);\n"); - genastore ("src", curi->smode, "srcreg", sz_long, "src"); - break; - case i_UNLK: -/* failure; /* NEW: from "Ipswitch Town" release */ - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - comprintf("\tmov_l_rr(15,src);\n" - "\treadlong(15,src,scratchie);\n" - "\tadd_l_ri(15,4);\n"); - genastore ("src", curi->smode, "srcreg", curi->size, "src"); - break; - case i_RTS: - comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc,newad);\n" - "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n" - "\tlea_l_brr(15,15,4);\n"); - gen_update_next_handler(); - isjump; - break; - case i_TRAPV: - isjump; - failure; - break; - case i_RTR: - isjump; - failure; - break; - case i_JSR: - isjump; - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - start_brace(); - comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - comprintf("\tint ret=scratchie++;\n" - "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); - comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" - "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n"); - gen_update_next_handler(); - break; - case i_JMP: - isjump; - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" - "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n"); - gen_update_next_handler(); - break; - case i_BSR: - is_const_jump; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - comprintf("\tint ret=scratchie++;\n" - "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); - comprintf("\tadd_l_ri(src,m68k_pc_offset_thisinst+2);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - comprintf("\tadd_l(PC_P,src);\n"); - - comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); - break; - case i_Bcc: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - /* That source is an immediate, so we can clobber it with abandon */ - switch(curi->size) { - case sz_byte: comprintf("\tsign_extend_8_rr(src,src);\n"); break; - case sz_word: comprintf("\tsign_extend_16_rr(src,src);\n"); break; - case sz_long: break; - } - comprintf("\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); - /* Leave the following as "add" --- it will allow it to be optimized - away due to src being a constant ;-) */ - comprintf("\tadd_l_ri(src,(uintptr)comp_pc_p);\n"); - comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n"); - /* Now they are both constant. Might as well fold in m68k_pc_offset */ - comprintf("\tadd_l_ri(src,m68k_pc_offset);\n"); - comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - - if (curi->cc>=2) { - comprintf("\tuae_u32 v1=get_const(PC_P);\n" - "\tuae_u32 v2=get_const(src);\n" - "\tregister_branch(v1,v2,%d);\n", - cond_codes_x86[curi->cc]); - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - isjump; - } - else { - is_const_jump; - } - - switch(curi->cc) { - case 0: /* Unconditional jump */ - comprintf("\tmov_l_rr(PC_P,src);\n"); - comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); - break; - case 1: break; /* This is silly! */ - case 8: failure; break; /* Work out details! FIXME */ - case 9: failure; break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - break; - default: abort(); - } - break; - case i_LEA: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); - break; - case i_PEA: - if (table68k[opcode].smode==Areg || - table68k[opcode].smode==Aind || - table68k[opcode].smode==Aipi || - table68k[opcode].smode==Apdi || - table68k[opcode].smode==Ad16 || - table68k[opcode].smode==Ad8r) - comprintf("if (srcreg==7) dodgy=1;\n"); - - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (Apdi, "7", sz_long, "dst", 2, 0); - genastore ("srca", Apdi, "7", sz_long, "dst"); - break; - case i_DBcc: - isjump; - uses_cmov; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); - - /* That offs is an immediate, so we can clobber it with abandon */ - switch(curi->size) { - case sz_word: comprintf("\tsign_extend_16_rr(offs,offs);\n"); break; - default: abort(); /* Seems this only comes in word flavour */ - } - comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); - comprintf("\tadd_l_ri(offs,(uintptr)comp_pc_p);\n"); /* New PC, - once the - offset_68k is - * also added */ - /* Let's fold in the m68k_pc_offset at this point */ - comprintf("\tadd_l_ri(offs,m68k_pc_offset);\n"); - comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - - start_brace(); - comprintf("\tint nsrc=scratchie++;\n"); - - if (curi->cc>=2) { - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - } - - if (curi->size!=sz_word) - abort(); - - - switch(curi->cc) { - case 0: /* This is an elaborate nop? */ - break; - case 1: - comprintf("\tstart_needflags();\n"); - comprintf("\tsub_w_ri(src,1);\n"); - comprintf("\t end_needflags();\n"); - start_brace(); - comprintf("\tuae_u32 v1=get_const(PC_P);\n"); - comprintf("\tuae_u32 v2=get_const(offs);\n" - "\tregister_branch(v1,v2,3);\n"); - break; - - case 8: failure; break; /* Work out details! FIXME */ - case 9: failure; break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\tmov_l_rr(nsrc,src);\n"); - comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n" - "\tmov_w_rr(src,scratchie);\n"); - comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", - cond_codes_x86[curi->cc]); - comprintf("\tcmov_l_rr(src,nsrc,%d);\n", - cond_codes_x86[curi->cc]); - /* OK, now for cc=true, we have src==nsrc and offs==PC_P, - so whether we move them around doesn't matter. However, - if cc=false, we have offs==jump_pc, and src==nsrc-1 */ - - comprintf("\t start_needflags();\n"); - comprintf("\ttest_w_rr(nsrc,nsrc);\n"); - comprintf("\t end_needflags();\n"); - comprintf("\tcmov_l_rr(PC_P,offs,5);\n"); - break; - default: abort(); - } - genastore ("src", curi->smode, "srcreg", curi->size, "src"); - gen_update_next_handler(); - break; - - case i_Scc: -/* failure; /* NEW: from "Ipswitch Town" release */ - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); - start_brace (); - comprintf ("\tint val = scratchie++;\n"); - - /* We set val to 0 if we really should use 255, and to 1 for real 0 */ - switch(curi->cc) { - case 0: /* Unconditional set */ - comprintf("\tmov_l_ri(val,0);\n"); - break; - case 1: - /* Unconditional not-set */ - comprintf("\tmov_l_ri(val,1);\n"); - break; - case 8: failure; break; /* Work out details! FIXME */ - case 9: failure; break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - /* All condition codes can be inverted by changing the LSB */ - comprintf("\tsetcc(val,%d);\n", - cond_codes_x86[curi->cc]^1); break; - default: abort(); - } - comprintf("\tsub_b_ri(val,1);\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "src"); - break; - case i_DIVU: - isjump; - failure; - break; - case i_DIVS: - isjump; - failure; - break; - case i_MULU: -/* failure; /* NEW: from "Ipswitch Town" release */ - comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); - /* To do 16x16 unsigned multiplication, we actually use - 32x32 signed, and zero-extend the registers first. - That solves the problem of MUL needing dedicated registers - on the x86 */ - comprintf("\tzero_extend_16_rr(scratchie,src);\n" - "\tzero_extend_16_rr(dst,dst);\n" - "\timul_32_32(dst,scratchie);\n"); - genflags (flag_logical, sz_long, "dst", "", ""); - genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); - break; - case i_MULS: -/* failure; /* NEW: from "Ipswitch Town" release */ - comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); - comprintf("\tsign_extend_16_rr(scratchie,src);\n" - "\tsign_extend_16_rr(dst,dst);\n" - "\timul_32_32(dst,scratchie);\n"); - genflags (flag_logical, sz_long, "dst", "", ""); - genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); - break; - case i_CHK: - isjump; - failure; - break; - - case i_CHK2: - isjump; - failure; - break; - - case i_ASR: - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { -/* failure; /* UNTESTED: NEW: from "Ipswitch Town" release */ - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint sdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(sdata,data);\n" - "\tmov_l_rr(cdata,data);\n" - "\tmov_l_rr(tmpcnt,cnt);\n"); - switch (curi->size) { - case sz_byte: comprintf("\tshra_b_ri(sdata,7);\n"); break; - case sz_word: comprintf("\tshra_w_ri(sdata,15);\n"); break; - case sz_long: comprintf("\tshra_l_ri(sdata,31);\n"); break; - default: abort(); - } - /* sdata is now the MSB propagated to all bits for the - register of specified size */ - comprintf("\tand_l_ri(tmpcnt,63);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,tmpcnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshra_w_rr(data,tmpcnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshra_l_rr(data,tmpcnt);\n" - "\thighmask=0x20;\n"); - break; - } - comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); - switch (curi->size) { - case sz_byte: comprintf("\tcmov_b_rr(data,sdata,NATIVE_CC_NE);\n"); break; - case sz_word: comprintf("\tcmov_w_rr(data,sdata,NATIVE_CC_NE);\n"); break; - case sz_long: comprintf("\tcmov_l_rr(data,sdata,NATIVE_CC_NE);\n"); break; - } - - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - /* NOTE: carry bit is cleared if shift count is zero */ - comprintf("\tmov_l_ri(scratchie,0);\n" - "\ttest_l_rr(tmpcnt,tmpcnt);\n" - "\tcmov_l_rr(sdata,scratchie,NATIVE_CC_EQ);\n" - "\tforget_about(scratchie);\n"); - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshra_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshra_l_rr(cdata,tmpcnt);\n");break; - default: abort(); - } - /* If the shift count was higher than the width, we need - to pick up the sign from original data (sdata) */ - /* NOTE: for shift count of zero, the following holds - true and cdata contains 0 so that carry bit is cleared */ - comprintf("\ttest_l_ri(tmpcnt,highmask);\n" - "\tforget_about(tmpcnt);\n" - "\tcmov_l_rr(cdata,sdata,NATIVE_CC_NE);\n"); - - /* And create the flags (preserve X flag if shift count is zero) */ - comprintf("\ttest_l_ri(cnt,63);\n" - "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint width;\n" - "\tint highshift=scratchie++;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" - "\thighmask=0x38;\n" - "\twidth=8;\n"); - break; - case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" - "\thighmask=0x30;\n" - "\twidth=16;\n"); - break; - case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" - "\thighmask=0x20;\n" - "\twidth=32;\n"); - break; - default: abort(); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(highshift,0);\n" - "mov_l_ri(scratchie,width/2);\n" - "cmov_l_rr(highshift,scratchie,5);\n"); - /* The x86 masks out bits, so we now make sure that things - really get shifted as much as planned */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; - default: abort(); - } - /* And again */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; - default: abort(); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - } - else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_word: comprintf("\tshra_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_long: comprintf("\tshra_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - default: abort(); - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - break; - - case i_ASL: -/* failure; /* NEW: from "Ipswitch Town" release */ - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - /* Except for the handling of the V flag, this is identical to - LSL. The handling of V is, uhm, unpleasant, so if it's needed, - let the normal emulation handle it. Shoulders of giants kinda - thing ;-) */ - comprintf("if (needed_flags & FLAG_V) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,5);\n"); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,4);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: abort(); - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; - default: abort(); - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,5);\n"); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,7);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,15);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,31);\n"); break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,4);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: abort(); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - } - else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); break; - case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); break; - case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); break; - default: abort(); - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - break; - - case i_LSR: -/* failure; /* NEW: from "Ipswitch Town" release */ - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,NATIVE_CC_NE);\n"); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_rr(data,tmpcnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshrl_w_rr(data,tmpcnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshrl_l_rr(data,tmpcnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("\ttest_l_ri(tmpcnt,highmask);\n" - "\rmov_l_ri(scratchie,0);\n"); - if (curi->size == sz_long) - comprintf("\tcmov_l_rr(data,scratchie,NATIVE_CC_NE);\n"); - else { - comprintf("\tcmov_l_rr(scratchie,data,NATIVE_CC_EQ);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - default: abort(); - } - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - comprintf("\tshrl_l_rr(cdata,tmpcnt);\n"); - comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); - comprintf("\tforget_about(tmpcnt);\n"); - if (curi->size != sz_long) /* scratchie is still live for LSR.L */ - comprintf("\tmov_l_ri(scratchie,0);\n"); - comprintf("\tcmov_l_rr(cdata,scratchie,NATIVE_CC_NE);\n"); - comprintf("\tforget_about(scratchie);\n"); - /* And create the flags (preserve X flag if shift count is zero) */ - comprintf("\ttest_l_ri(cnt,63);\n" - "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,4);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: abort(); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - } - else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_word: comprintf("\tshrl_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_long: comprintf("\tshrl_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - default: abort(); - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - break; - - case i_LSL: - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { -/* failure; /* UNTESTED: NEW: from "Ipswitch Town" release */ - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,NATIVE_CC_NE);\n"); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,tmpcnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,tmpcnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,tmpcnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("\ttest_l_ri(tmpcnt,highmask);\n" - "\tmov_l_ri(scratchie,0);\n"); - if (curi->size == sz_long) - comprintf("\tcmov_l_rr(data,scratchie,NATIVE_CC_NE);\n"); - else { - comprintf("\tcmov_l_rr(scratchie,data,NATIVE_CC_EQ);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - default: abort(); - } - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); - comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); - comprintf("\tforget_about(tmpcnt);\n"); - if (curi->size != sz_long) /* scratchie is still live for LSL.L */ - comprintf("\tmov_l_ri(scratchie,0);\n"); - comprintf("\tcmov_l_rr(cdata,scratchie,NATIVE_CC_NE);\n"); - comprintf("\tforget_about(scratchie);\n"); - /* And create the flags (preserve X flag if shift count is zero) */ - switch (curi->size) { - case sz_byte: comprintf("\tshrl_l_ri(cdata,7);\n"); break; - case sz_word: comprintf("\tshrl_l_ri(cdata,15);\n"); break; - case sz_long: comprintf("\tshrl_l_ri(cdata,31);\n"); break; - } - comprintf("\ttest_l_ri(cnt,63);\n" - "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: abort(); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,4);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: abort(); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - } - else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); break; - case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); break; - case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); break; - default: abort(); - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - break; - - case i_ROL: - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace (); - - switch(curi->size) { - case sz_long: comprintf("\t rol_l_rr(data,cnt);\n"); break; - case sz_word: comprintf("\t rol_w_rr(data,cnt);\n"); break; - case sz_byte: comprintf("\t rol_b_rr(data,cnt);\n"); break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - break; - - case i_ROR: - mayfail; - if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace (); - - switch(curi->size) { - case sz_long: comprintf("\t ror_l_rr(data,cnt);\n"); break; - case sz_word: comprintf("\t ror_w_rr(data,cnt);\n"); break; - case sz_byte: comprintf("\t ror_b_rr(data,cnt);\n"); break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - switch(curi->size) { - case sz_byte: comprintf("\t bt_l_ri(data,0x07);\n"); break; - case sz_word: comprintf("\t bt_l_ri(data,0x0f);\n"); break; - case sz_long: comprintf("\t bt_l_ri(data,0x1f);\n"); break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - break; - - case i_ROXL: - failure; - break; - case i_ROXR: - failure; - break; - case i_ASRW: - failure; - break; - case i_ASLW: - failure; - break; - case i_LSRW: - failure; - break; - case i_LSLW: - failure; - break; - case i_ROLW: - failure; - break; - case i_RORW: - failure; - break; - case i_ROXLW: - failure; - break; - case i_ROXRW: - failure; - break; - case i_MOVEC2: - isjump; - failure; - break; - case i_MOVE2C: - isjump; - failure; - break; - case i_CAS: - failure; - break; - case i_CAS2: - failure; - break; - case i_MOVES: /* ignore DFC and SFC because we have no MMU */ - isjump; - failure; - break; - case i_BKPT: /* only needed for hardware emulators */ - isjump; - failure; - break; - case i_CALLM: /* not present in 68030 */ - isjump; - failure; - break; - case i_RTM: /* not present in 68030 */ - isjump; - failure; - break; - case i_TRAPcc: - isjump; - failure; - break; - case i_DIVL: - isjump; - failure; - break; - case i_MULL: -/* failure; /* NEW: from "Ipswitch Town" release */ - if (!noflags) { - failure; - break; - } - comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); - comprintf("\tint r2=(extra>>12)&7;\n" - "\tint tmp=scratchie++;\n"); - - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - /* The two operands are in dst and r2 */ - comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ - "\tint r3=(extra&7);\n" - "\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ - comprintf("\tif (extra&0x0800) { \n" /* signed */ - "\t\timul_64_32(r2,r3);\n" - "\t} else { \n" - "\t\tmul_64_32(r2,r3);\n" - "\t} \n"); - /* The result is in r2/tmp, with r2 holding the lower 32 bits */ - comprintf("\t} else {\n"); /* Only want 32 bit result */ - /* operands in dst and r2, result foes into r2 */ - /* shouldn't matter whether it's signed or unsigned?!? */ - comprintf("\timul_32_32(r2,dst);\n" - "\t}\n"); - break; - - case i_BFTST: - case i_BFEXTU: - case i_BFCHG: - case i_BFEXTS: - case i_BFCLR: - case i_BFFFO: - case i_BFSET: - case i_BFINS: - failure; - break; - case i_PACK: - failure; - break; - case i_UNPK: - failure; - break; - case i_TAS: - failure; - break; - case i_FPP: - uses_fpu; -#ifdef USE_JIT_FPU - mayfail; - comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); - swap_opcode(); - comprintf("\tcomp_fpp_opp(opcode,extra);\n"); -#else - failure; -#endif - break; - case i_FBcc: - uses_fpu; -#ifdef USE_JIT_FPU - isjump; - uses_cmov; - mayfail; - swap_opcode(); - comprintf("\tcomp_fbcc_opp(opcode);\n"); -#else - isjump; - failure; -#endif - break; - case i_FDBcc: - uses_fpu; - isjump; - failure; - break; - case i_FScc: - uses_fpu; -#ifdef USE_JIT_FPU - mayfail; - uses_cmov; - comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); - swap_opcode(); - comprintf("\tcomp_fscc_opp(opcode,extra);\n"); -#else - failure; -#endif - break; - case i_FTRAPcc: - uses_fpu; - isjump; - failure; - break; - case i_FSAVE: - uses_fpu; - failure; - break; - case i_FRESTORE: - uses_fpu; - failure; - break; - - case i_CINVL: - case i_CINVP: - case i_CINVA: - isjump; /* Not really, but it's probably a good idea to stop - translating at this point */ - failure; - comprintf ("\tflush_icache();\n"); /* Differentiate a bit more? */ - break; - case i_CPUSHL: - case i_CPUSHP: - case i_CPUSHA: - isjump; /* Not really, but it's probably a good idea to stop - translating at this point */ - failure; - break; - case i_MOVE16: - genmov16(opcode, curi); - break; - - case i_EMULOP_RETURN: - isjump; - failure; - break; - - case i_EMULOP: - failure; - break; - - case i_MMUOP: - isjump; - failure; - break; - default: - abort (); - break; - } - comprintf("%s",endstr); - finish_braces (); - sync_m68k_pc (); - if (global_mayfail) - comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); - return global_failure; -} - -static void -generate_includes (FILE * f) -{ - fprintf (f, "#include \"sysdeps.h\"\n"); - fprintf (f, "#include \"m68k.h\"\n"); - fprintf (f, "#include \"memory.h\"\n"); - fprintf (f, "#include \"readcpu.h\"\n"); - fprintf (f, "#include \"newcpu.h\"\n"); - fprintf (f, "#include \"comptbl.h\"\n"); -} - -static int postfix; - -static void -generate_one_opcode (int rp, int noflags) -{ - uae_u16 smsk, dmsk; - const long int opcode = opcode_map[rp]; - const char *opcode_str; - int aborted=0; - int have_srcreg=0; - int have_dstreg=0; - - if (table68k[opcode].mnemo == i_ILLG - || table68k[opcode].clev > cpu_level) - return; - - if (table68k[opcode].handler != -1) - return; - - switch (table68k[opcode].stype) - { - case 0: - smsk = 7; - break; - case 1: - smsk = 255; - break; - case 2: - smsk = 15; - break; - case 3: - smsk = 7; - break; - case 4: - smsk = 7; - break; - case 5: - smsk = 63; - break; - case 6: - smsk = 255; - break; - case 7: - smsk = 3; - break; - default: - abort (); - } - dmsk = 7; - - next_cpu_level = -1; - if (table68k[opcode].suse - && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 - && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 - && table68k[opcode].smode != absw && table68k[opcode].smode != absl - && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16) - { - have_srcreg=1; - if (table68k[opcode].spos == -1) - { - if (((int) table68k[opcode].sreg) >= 128) - comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].sreg); - else - comprintf ("\tuae_s32 srcreg = %d;\n", (int) table68k[opcode].sreg); - } - else - { - char source[100]; - int pos = table68k[opcode].spos; - - comprintf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (smsk >> (8 - pos)) != 0) - sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); - else - sprintf (source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - comprintf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - comprintf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - comprintf ("\tuae_u32 srcreg = %s;\n", source); - - comprintf ("#else\n"); - - if (pos) - sprintf (source, "((opcode >> %d) & %d)", pos, smsk); - else - sprintf (source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - comprintf ("\tuae_s32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - comprintf ("\tuae_s32 srcreg = %s;\n", source); - - comprintf ("#endif\n"); - } - } - if (table68k[opcode].duse - /* Yes, the dmode can be imm, in case of LINK or DBcc */ - && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 - && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 - && table68k[opcode].dmode != absw && table68k[opcode].dmode != absl) - { - have_dstreg=1; - if (table68k[opcode].dpos == -1) - { - if (((int) table68k[opcode].dreg) >= 128) - comprintf ("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].dreg); - else - comprintf ("\tuae_s32 dstreg = %d;\n", (int) table68k[opcode].dreg); - } - else - { - int pos = table68k[opcode].dpos; - - comprintf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (dmsk >> (8 - pos)) != 0) - comprintf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", - pos ^ 8, dmsk); - else - comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - comprintf ("#else\n"); - - if (pos) - comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", - pos, dmsk); - else - comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - comprintf ("#endif\n"); - } - } - - if (have_srcreg && have_dstreg && - (table68k[opcode].dmode==Areg || - table68k[opcode].dmode==Aind || - table68k[opcode].dmode==Aipi || - table68k[opcode].dmode==Apdi || - table68k[opcode].dmode==Ad16 || - table68k[opcode].dmode==Ad8r) && - (table68k[opcode].smode==Areg || - table68k[opcode].smode==Aind || - table68k[opcode].smode==Aipi || - table68k[opcode].smode==Apdi || - table68k[opcode].smode==Ad16 || - table68k[opcode].smode==Ad8r) - ) { - comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n"); - } - else { - comprintf("\tuae_u32 dodgy=0;\n"); - } - comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n"); - comprintf("\tm68k_pc_offset+=2;\n"); - - opcode_str = get_instruction_string (opcode); - - aborted=gen_opcode (opcode); - { - int flags=0; - if (global_isjump) flags|=1; - if (long_opcode) flags|=2; - if (global_cmov) flags|=4; - if (global_isaddx) flags|=8; - if (global_iscjump) flags|=16; - if (global_fpu) flags|=32; - - comprintf ("}\n"); - - if (aborted) { - fprintf (stblfile, "{ NULL, 0x%08x, %ld }, /* %s */\n", flags, opcode, opcode_str); - com_discard(); - } - else { - if (noflags) { - fprintf (stblfile, "{ op_%lx_%d_comp_nf, 0x%08x, %ld }, /* %s */\n", opcode, postfix, flags, opcode, opcode_str); - fprintf (headerfile, "extern compop_func op_%lx_%d_comp_nf;\n", opcode, postfix); - printf ("void REGPARAM2 op_%lx_%d_comp_nf(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); - } - else { - fprintf (stblfile, "{ op_%lx_%d_comp_ff, 0x%08x, %ld }, /* %s */\n", opcode, postfix, flags, opcode, opcode_str); - fprintf (headerfile, "extern compop_func op_%lx_%d_comp_ff;\n", opcode, postfix); - printf ("void REGPARAM2 op_%lx_%d_comp_ff(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); - } - com_flush(); - } - } - opcode_next_clev[rp] = next_cpu_level; - opcode_last_postfix[rp] = postfix; -} - -static void -generate_func (int noflags) -{ - int i, j, rp; - - using_prefetch = 0; - using_exception_3 = 0; - for (i = 0; i < 1; i++) /* We only do one level! */ - { - cpu_level = 4 - i; - postfix = i; - - if (noflags) - fprintf (stblfile, "struct comptbl op_smalltbl_%d_comp_nf[] = {\n", postfix); - else - fprintf (stblfile, "struct comptbl op_smalltbl_%d_comp_ff[] = {\n", postfix); - - - /* sam: this is for people with low memory (eg. me :)) */ - printf ("\n" - "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " - "!defined(PART_5) && !defined(PART_6) && " - "!defined(PART_7) && !defined(PART_8)" - "\n" - "#define PART_1 1\n" - "#define PART_2 1\n" - "#define PART_3 1\n" - "#define PART_4 1\n" - "#define PART_5 1\n" - "#define PART_6 1\n" - "#define PART_7 1\n" - "#define PART_8 1\n" - "#endif\n\n"); - - rp = 0; - for (j = 1; j <= 8; ++j) - { - int k = (j * nr_cpuop_funcs) / 8; - printf ("#ifdef PART_%d\n", j); - for (; rp < k; rp++) - generate_one_opcode (rp,noflags); - printf ("#endif\n\n"); - } - - fprintf (stblfile, "{ 0, 0,65536 }};\n"); - } - -} - -int -main (int argc, char **argv) -{ - read_table68k (); - do_merges (); - - opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); - read_counts (); - - /* It would be a lot nicer to put all in one file (we'd also get rid of - * cputbl.h that way), but cpuopti can't cope. That could be fixed, but - * I don't dare to touch the 68k version. */ - - headerfile = fopen ("comptbl.h", "wb"); - stblfile = fopen ("compstbl.cpp", "wb"); - freopen ("compemu.cpp", "wb", stdout); - - generate_includes (stdout); - generate_includes (stblfile); - - printf("#include \"compiler/compemu.h\"\n"); - - noflags=0; - generate_func (noflags); - - free(opcode_map); - free(opcode_last_postfix); - free(opcode_next_clev); - free(counts); - - opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); - counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); - read_counts (); - noflags=1; - generate_func (noflags); - - free(opcode_map); - free(opcode_last_postfix); - free(opcode_next_clev); - free(counts); - - free (table68k); - fclose (stblfile); - fclose (headerfile); - fflush (stdout); - return 0; -} diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp deleted file mode 100644 index 236a2d5e7..000000000 --- a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp +++ /dev/null @@ -1,2254 +0,0 @@ -/******************** -*- mode: C; tab-width: 8 -*- ******************** - * - * Dumb and Brute Force Run-time assembler verifier for IA-32 and AMD64 - * - ***********************************************************************/ - - -/*********************************************************************** - * - * Copyright 2004-2008 Gwenole Beauchesne - * - * 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 - * - ***********************************************************************/ - -/* - * STATUS: 26M variations covering unary register based operations, - * reg/reg operations, imm/reg operations. - * - * TODO: - * - Rewrite to use internal BFD/opcodes format instead of string compares - * - Add reg/mem, imm/mem variations - */ - -#define _BSD_SOURCE 1 -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" - -static int verbose = 2; - -#define TEST_INST_ALU 1 -#define TEST_INST_FPU 1 -#define TEST_INST_MMX 1 -#define TEST_INST_SSE 1 -#if TEST_INST_ALU -#define TEST_INST_ALU_REG 1 -#define TEST_INST_ALU_REG_REG 1 -#define TEST_INST_ALU_CNT_REG 1 -#define TEST_INST_ALU_IMM_REG 1 -#define TEST_INST_ALU_MEM_REG 1 -#endif -#if TEST_INST_FPU -#define TEST_INST_FPU_UNARY 1 -#define TEST_INST_FPU_REG 1 -#define TEST_INST_FPU_MEM 1 -#endif -#if TEST_INST_MMX -#define TEST_INST_MMX_REG_REG 1 -#define TEST_INST_MMX_IMM_REG 1 -#define TEST_INST_MMX_MEM_REG 1 -#endif -#if TEST_INST_SSE -#define TEST_INST_SSE_REG 1 -#define TEST_INST_SSE_REG_REG 1 -#define TEST_INST_SSE_MEM_REG 1 -#endif - -#undef abort -#define abort() do { \ - fprintf(stderr, "ABORT: %s, line %d\n", __FILE__, __LINE__); \ - (abort)(); \ -} while (0) - -#define X86_TARGET_64BIT 1 -#define X86_FLAT_REGISTERS 0 -#define X86_OPTIMIZE_ALU 1 -#define X86_OPTIMIZE_ROTSHI 1 -#define X86_RIP_RELATIVE_ADDR 0 -#include "compiler/codegen_x86.h" - -#if X86_TARGET_64BIT -#define X86_MAX_ALU_REGS 16 -#define X86_MAX_SSE_REGS 16 -#else -#define X86_MAX_ALU_REGS 8 -#define X86_MAX_SSE_REGS 8 -#endif -#define X86_MAX_FPU_REGS 8 -#define X86_MAX_MMX_REGS 8 - -#define VALID_REG(r, b, n) (((unsigned)((r) - X86_##b)) < (n)) -#if X86_TARGET_64BIT -#define VALID_REG8(r) (VALID_REG(r, AL, 16) || VALID_REG(r, AH, 4)) -#define VALID_REG64(r) VALID_REG(r, RAX, X86_MAX_ALU_REGS) -#else -#define VALID_REG8(r) (VALID_REG(r, AL, 4) || VALID_REG(r, AH, 4)) -#define VALID_REG64(r) (0) -#endif -#define VALID_REG16(r) VALID_REG(r, AX, X86_MAX_ALU_REGS) -#define VALID_REG32(r) VALID_REG(r, EAX, X86_MAX_ALU_REGS) - -#define x86_emit_byte(B) emit_byte(B) -#define x86_emit_word(W) emit_word(W) -#define x86_emit_long(L) emit_long(L) -#define x86_emit_quad(Q) emit_quad(Q) -#define x86_get_target() get_target() -#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) - -static void jit_fail(const char *msg, const char *file, int line, const char *function) -{ - fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", - function, file, line, msg); - abort(); -} - -static uint8 *target; - -static inline void emit_byte(uint8 x) -{ - *target++ = x; -} - -static inline void emit_word(uint16 x) -{ - *((uint16 *)target) = x; - target += 2; -} - -static inline void emit_long(uint32 x) -{ - *((uint32 *)target) = x; - target += 4; -} - -static inline void emit_quad(uint64 x) -{ - *((uint64 *)target) = x; - target += 8; -} - -static inline void set_target(uint8 *t) -{ - target = t; -} - -static inline uint8 *get_target(void) -{ - return target; -} - -static uint32 mon_read_byte(uintptr addr) -{ - uint8 *m = (uint8 *)addr; - return (uint32)(*m); -} - -extern "C" { -#include "disass/dis-asm.h" - -int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) -{ - while (length--) - *to++ = mon_read_byte(from++); - return 0; -} - -void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) -{ - info->fprintf_func(info->stream, "Unknown error %d\n", status); -} - -void generic_print_address(bfd_vma addr, struct disassemble_info *info) -{ - if (addr >= UVAL64(0x100000000)) - info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); - else - info->fprintf_func(info->stream, "$%08x", (uint32)addr); -} - -int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) -{ - return 0; -} -} - -struct SFILE { - char *buffer; - char *current; -}; - -static int mon_sprintf(SFILE *f, const char *format, ...) -{ - int n; - va_list args; - va_start(args, format); - vsprintf(f->current, format, args); - f->current += n = strlen(f->current); - va_end(args); - return n; -} - -static int disass_x86(char *buf, uintptr adr) -{ - disassemble_info info; - SFILE sfile; - sfile.buffer = buf; - sfile.current = buf; - INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); - info.mach = X86_TARGET_64BIT ? bfd_mach_x86_64 : bfd_mach_i386_i386; - info.disassembler_options = "suffix"; - return print_insn_i386(adr, &info); -} - -enum { - op_disp, - op_reg, - op_base, - op_index, - op_scale, - op_imm, -}; -struct operand_t { - int32 disp; - int8 reg; - int8 base; - int8 index; - int8 scale; - int64 imm; - - void clear() { - disp = imm = 0; - reg = base = index = -1; - scale = 1; - } - - void fill(int optype, int value) { - switch (optype) { - case op_disp: disp = value; break; - case op_reg: reg = value; break; - case op_base: base = value; break; - case op_index: index = value; break; - case op_scale: scale = value; break; - case op_imm: imm = value; break; - default: abort(); - } - } -}; - -#define MAX_INSNS 1024 -#define MAX_INSN_LENGTH 16 -#define MAX_INSN_OPERANDS 3 - -struct insn_t { - char name[16]; - int n_operands; - operand_t operands[MAX_INSN_OPERANDS]; - - void clear() { - memset(name, 0, sizeof(name)); - n_operands = 0; - for (int i = 0; i < MAX_INSN_OPERANDS; i++) - operands[i].clear(); - } - - void pretty_print() { - printf("%s, %d operands\n", name, n_operands); - for (int i = 0; i < n_operands; i++) { - operand_t *op = &operands[i]; - if (op->reg != -1) - printf(" reg r%d\n", op->reg); - else { - printf(" mem 0x%08x(", op->disp); - if (op->base != -1) - printf("r%d", op->base); - printf(","); - if (op->index != -1) - printf("r%d", op->index); - printf(","); - if (op->base != -1 || op->index != -1) - printf("%d", op->scale); - printf(")\n"); - } - } - } -}; - -static inline char *find_blanks(char *p) -{ - while (*p && !isspace(*p)) - ++p; - return p; -} - -static inline char *skip_blanks(char *p) -{ - while (*p && isspace(*p)) - ++p; - return p; -} - -static int parse_reg(operand_t *op, int optype, char *buf) -{ - int reg = X86_NOREG; - int len = 0; - char *p = buf; - switch (p[0]) { - case 'a': case 'A': - len = 2; - switch (p[1]) { - case 'l': case 'L': reg = X86_AL; break; - case 'h': case 'H': reg = X86_AH; break; - case 'x': case 'X': reg = X86_AX; break; - } - break; - case 'b': case 'B': - len = 2; - switch (p[1]) { - case 'l': case 'L': reg = X86_BL; break; - case 'h': case 'H': reg = X86_BH; break; - case 'x': case 'X': reg = X86_BX; break; - case 'p': case 'P': - switch (p[2]) { -#if X86_TARGET_64BIT - case 'l': case 'L': reg = X86_BPL, ++len; break; -#endif - default: reg = X86_BP; break; - } - break; - } - break; - case 'c': case 'C': - len = 2; - switch (p[1]) { - case 'l': case 'L': reg = X86_CL; break; - case 'h': case 'H': reg = X86_CH; break; - case 'x': case 'X': reg = X86_CX; break; - } - break; - case 'd': case 'D': - len = 2; - switch (p[1]) { - case 'l': case 'L': reg = X86_DL; break; - case 'h': case 'H': reg = X86_DH; break; - case 'x': case 'X': reg = X86_DX; break; - case 'i': case 'I': - switch (p[2]) { -#if X86_TARGET_64BIT - case 'l': case 'L': reg = X86_DIL; ++len; break; -#endif - default: reg = X86_DI; break; - } - break; - } - break; - case 's': case 'S': - len = 2; - switch (p[2]) { -#if X86_TARGET_64BIT - case 'l': case 'L': - ++len; - switch (p[1]) { - case 'p': case 'P': reg = X86_SPL; break; - case 'i': case 'I': reg = X86_SIL; break; - } - break; -#endif - case '(': - if ((p[1] == 't' || p[1] == 'T') && isdigit(p[3]) && p[4] == ')') - len += 3, reg = X86_ST0 + (p[3] - '0'); - break; - default: - switch (p[1]) { - case 't': case 'T': reg = X86_ST0; break; - case 'p': case 'P': reg = X86_SP; break; - case 'i': case 'I': reg = X86_SI; break; - } - break; - } - break; - case 'e': case 'E': - len = 3; - switch (p[2]) { - case 'x': case 'X': - switch (p[1]) { - case 'a': case 'A': reg = X86_EAX; break; - case 'b': case 'B': reg = X86_EBX; break; - case 'c': case 'C': reg = X86_ECX; break; - case 'd': case 'D': reg = X86_EDX; break; - } - break; - case 'i': case 'I': - switch (p[1]) { - case 's': case 'S': reg = X86_ESI; break; - case 'd': case 'D': reg = X86_EDI; break; - } - break; - case 'p': case 'P': - switch (p[1]) { - case 'b': case 'B': reg = X86_EBP; break; - case 's': case 'S': reg = X86_ESP; break; - } - break; - } - break; -#if X86_TARGET_64BIT - case 'r': case 'R': - len = 3; - switch (p[2]) { - case 'x': case 'X': - switch (p[1]) { - case 'a': case 'A': reg = X86_RAX; break; - case 'b': case 'B': reg = X86_RBX; break; - case 'c': case 'C': reg = X86_RCX; break; - case 'd': case 'D': reg = X86_RDX; break; - } - break; - case 'i': case 'I': - switch (p[1]) { - case 's': case 'S': reg = X86_RSI; break; - case 'd': case 'D': reg = X86_RDI; break; - } - break; - case 'p': case 'P': - switch (p[1]) { - case 'b': case 'B': reg = X86_RBP; break; - case 's': case 'S': reg = X86_RSP; break; - } - break; - case 'b': case 'B': - switch (p[1]) { - case '8': reg = X86_R8B; break; - case '9': reg = X86_R9B; break; - } - break; - case 'w': case 'W': - switch (p[1]) { - case '8': reg = X86_R8W; break; - case '9': reg = X86_R9W; break; - } - break; - case 'd': case 'D': - switch (p[1]) { - case '8': reg = X86_R8D; break; - case '9': reg = X86_R9D; break; - } - break; - case '0': case '1': case '2': case '3': case '4': case '5': - if (p[1] == '1') { - const int r = p[2] - '0'; - switch (p[3]) { - case 'b': case 'B': reg = X86_R10B + r, ++len; break; - case 'w': case 'W': reg = X86_R10W + r, ++len; break; - case 'd': case 'D': reg = X86_R10D + r, ++len; break; - default: reg = X86_R10 + r; break; - } - } - break; - default: - switch (p[1]) { - case '8': reg = X86_R8, len = 2; break; - case '9': reg = X86_R9, len = 2; break; - } - break; - } - break; -#endif - case 'm': case 'M': - if ((p[1] == 'm' || p[1] == 'M') && isdigit(p[2])) - reg = X86_MM0 + (p[2] - '0'), len = 3; - break; - case 'x': case 'X': - if ((p[1] == 'm' || p[1] == 'M') && (p[2] == 'm' || p[2] == 'M')) { -#if X86_TARGET_64BIT - if (p[3] == '1' && isdigit(p[4])) - reg = X86_XMM10 + (p[4] - '0'), len = 5; - else -#endif - if (isdigit(p[3])) - reg = X86_XMM0 + (p[3] - '0'), len = 4; - } - break; - } - - if (len > 0 && reg != X86_NOREG) { - op->fill(optype, reg); - return len; - } - - return X86_NOREG; -} - -static unsigned long parse_imm(char *nptr, char **endptr, int base = 0) -{ - errno = 0; -#if X86_TARGET_64BIT - if (sizeof(unsigned long) != 8) { - unsigned long long val = strtoull(nptr, endptr, 0); - if (errno == 0) - return val; - abort(); - } -#endif - unsigned long val = strtoul(nptr, endptr, 0); - if (errno == 0) - return val; - abort(); - return 0; -} - -static int parse_mem(operand_t *op, char *buf) -{ - char *p = buf; - - if (strncmp(buf, "0x", 2) == 0) - op->disp = parse_imm(buf, &p, 16); - - if (*p == '(') { - p++; - - if (*p == '%') { - p++; - - int n = parse_reg(op, op_base, p); - if (n <= 0) - return -3; - p += n; - } - - if (*p == ',') { - p++; - - if (*p == '%') { - int n = parse_reg(op, op_index, ++p); - if (n <= 0) - return -4; - p += n; - - if (*p != ',') - return -5; - p++; - - goto do_parse_scale; - } - else if (isdigit(*p)) { - do_parse_scale: - long val = strtol(p, &p, 10); - if (val == 0 && errno == EINVAL) - abort(); - op->scale = val; - } - } - - if (*p != ')') - return -6; - p++; - } - - return p - buf; -} - -static void parse_insn(insn_t *ii, char *buf) -{ - char *p = buf; - ii->clear(); - -#if 0 - printf("BUF: %s\n", buf); -#endif - - if (strncmp(p, "rex64", 5) == 0) { - char *q = find_blanks(p); - if (verbose > 1) { - char prefix[16]; - memset(prefix, 0, sizeof(prefix)); - memcpy(prefix, p, q - p); - fprintf(stderr, "Instruction '%s', skip REX prefix '%s'\n", buf, prefix); - } - p = skip_blanks(q); - } - - if (strncmp(p, "rep", 3) == 0) { - char *q = find_blanks(p); - if (verbose > 1) { - char prefix[16]; - memset(prefix, 0, sizeof(prefix)); - memcpy(prefix, p, q - p); - fprintf(stderr, "Instruction '%s', skip REP prefix '%s'\n", buf, prefix); - } - p = skip_blanks(q); - } - - for (int i = 0; !isspace(*p); i++) - ii->name[i] = *p++; - - while (*p && isspace(*p)) - p++; - if (*p == '\0') - return; - - int n_operands = 0; - int optype = op_reg; - bool done = false; - while (!done) { - int n; - switch (*p) { - case '%': - n = parse_reg(&ii->operands[n_operands], optype, ++p); - if (n <= 0) { - fprintf(stderr, "parse_reg(%s) error %d\n", p, n); - abort(); - } - p += n; - break; - case '0': case '(': - n = parse_mem(&ii->operands[n_operands], p); - if (n <= 0) { - fprintf(stderr, "parse_mem(%s) error %d\n", p, n); - abort(); - } - p += n; - break; - case '$': { - ii->operands[n_operands].imm = parse_imm(++p, &p, 0); - break; - } - case '*': - p++; - break; - case ',': - n_operands++; - p++; - break; - case ' ': case '\t': - p++; - break; - case '\0': - done = true; - break; - default: - fprintf(stderr, "parse error> %s\n", p); - abort(); - } - } - ii->n_operands = n_operands + 1; -} - -static unsigned long n_tests, n_failures; -static unsigned long n_all_tests, n_all_failures; - -static bool check_unary(insn_t *ii, const char *name) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 0) { - fprintf(stderr, "ERROR: instruction expected 0 operand, got %d\n", ii->n_operands); - return false; - } - - return true; -} - -static bool check_reg(insn_t *ii, const char *name, int r) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 1) { - fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); - return false; - } - - int reg = ii->operands[0].reg; - - if (reg != r) { - fprintf(stderr, "ERROR: instruction expected r%d as source, got ", r); - if (reg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "r%d\n", reg); - return false; - } - - return true; -} - -static bool check_reg_reg(insn_t *ii, const char *name, int s, int d) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - int srcreg = ii->operands[0].reg; - int dstreg = ii->operands[1].reg; - - if (srcreg != s) { - fprintf(stderr, "ERROR: instruction expected r%d as source, got ", s); - if (srcreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "r%d\n", srcreg); - return false; - } - - if (dstreg != d) { - fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); - if (dstreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "r%d\n", dstreg); - return false; - } - - return true; -} - -static bool check_imm_reg(insn_t *ii, const char *name, uint32 v, int d, int mode = -1) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - uint32 imm = ii->operands[0].imm; - int dstreg = ii->operands[1].reg; - - if (mode == -1) { - char suffix = name[strlen(name) - 1]; - switch (suffix) { - case 'b': mode = 1; break; - case 'w': mode = 2; break; - case 'l': mode = 4; break; - case 'q': mode = 8; break; - } - } - switch (mode) { - case 1: v &= 0xff; break; - case 2: v &= 0xffff; break; - } - - if (imm != v) { - fprintf(stderr, "ERROR: instruction expected 0x%08x as immediate, got ", v); - if (imm == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "0x%08x\n", imm); - return false; - } - - if (dstreg != d) { - fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); - if (dstreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "%d\n", dstreg); - return false; - } - - return true; -} - -static bool do_check_mem(insn_t *ii, uint32 D, int B, int I, int S, int Mpos) -{ - operand_t *mem = &ii->operands[Mpos]; - uint32 d = mem->disp; - int b = mem->base; - int i = mem->index; - int s = mem->scale; - - if (d != D) { - fprintf(stderr, "ERROR: instruction expected 0x%08x as displacement, got 0x%08x\n", D, d); - return false; - } - - if (b != B) { - fprintf(stderr, "ERROR: instruction expected r%d as base, got r%d\n", B, b); - return false; - } - - if (i != I) { - fprintf(stderr, "ERROR: instruction expected r%d as index, got r%d\n", I, i); - return false; - } - - if (s != S) { - fprintf(stderr, "ERROR: instruction expected %d as scale factor, got %d\n", S, s); - return false; - } - - return true; -} - -static bool check_mem(insn_t *ii, const char *name, uint32 D, int B, int I, int S) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 1) { - fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); - return false; - } - - return do_check_mem(ii, D, B, I, S, 0); -} - -static bool check_mem_reg(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R, int Rpos = 1) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - if (!do_check_mem(ii, D, B, I, S, Rpos ^ 1)) - return false; - - int r = ii->operands[Rpos].reg; - - if (r != R) { - fprintf(stderr, "ERROR: instruction expected r%d as reg operand, got r%d\n", R, r); - return false; - } - - return true; -} - -static inline bool check_reg_mem(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R) -{ - return check_mem_reg(ii, name, D, B, I, S, R, 0); -} - -static void show_instruction(const char *buffer, const uint8 *bytes) -{ - if (verbose > 1) { - if (1) { - for (int j = 0; j < MAX_INSN_LENGTH; j++) - fprintf(stderr, "%02x ", bytes[j]); - fprintf(stderr, "| "); - } - fprintf(stderr, "%s\n", buffer); - } -} - -static void show_status(unsigned long n_tests) -{ -#if 1 - const unsigned long N_STEPS = 100000; - static const char cursors[] = { '-', '\\', '|', '/' }; - if ((n_tests % N_STEPS) == 0) { - printf(" %c (%d)\r", cursors[(n_tests/N_STEPS)%sizeof(cursors)], n_tests); - fflush(stdout); - } -#else - const unsigned long N_STEPS = 1000000; - if ((n_tests % N_STEPS) == 0) - printf(" ... %d\n", n_tests); -#endif -} - -int main(void) -{ - static char buffer[1024]; - static uint8 block[MAX_INSNS * MAX_INSN_LENGTH]; - static char *insns[MAX_INSNS]; - static int modes[MAX_INSNS]; - n_all_tests = n_all_failures = 0; - -#if TEST_INST_ALU_REG - printf("Testing reg forms\n"); - n_tests = n_failures = 0; - for (int r = 0; r < X86_MAX_ALU_REGS; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##r(r); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - if (VALID_REG8(r)) \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN64(INSN "q", GENOP##Q); \ -} while (0) - GENA("not", NOT); - GENA("neg", NEG); - GENA("mul", MUL); - GENA("imul", IMUL); - GENA("div", DIV); - GENA("idiv", IDIV); - GENA("dec", DEC); - GENA("inc", INC); - if (X86_TARGET_64BIT) { - GEN("callq", CALLs); - GEN("jmpq", JMPs); - GEN("pushq", PUSHQ); - GEN("popq", POPQ); - } - else { - GEN("calll", CALLs); - GEN("jmpl", JMPs); - GEN("pushl", PUSHL); - GEN("popl", POPL); - } - GEN("bswap", BSWAPL); // FIXME: disass bug? no suffix - GEN64("bswap", BSWAPQ); // FIXME: disass bug? no suffix - if (VALID_REG8(r)) { - GEN("seto", SETO); - GEN("setno", SETNO); - GEN("setb", SETB); - GEN("setae", SETAE); - GEN("sete", SETE); - GEN("setne", SETNE); - GEN("setbe", SETBE); - GEN("seta", SETA); - GEN("sets", SETS); - GEN("setns", SETNS); - GEN("setp", SETP); - GEN("setnp", SETNP); - GEN("setl", SETL); - GEN("setge", SETGE); - GEN("setle", SETLE); - GEN("setg", SETG); - } -#undef GENA -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg(&ii, insns[i], r)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_ALU_REG_REG - printf("Testing reg,reg forms\n"); - n_tests = n_failures = 0; - for (int s = 0; s < X86_MAX_ALU_REGS; s++) { - for (int d = 0; d < X86_MAX_ALU_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##rr(s, d); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) -#define GEN1(INSN, GENOP, OP) do { \ - insns[i++] = INSN; \ - GENOP##rr(OP, s, d); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - if (VALID_REG8(s) && VALID_REG8(d)) \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN64(INSN "q", GENOP##Q); \ -} while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GEN("btw", BTW); - GEN("btl", BTL); - GEN64("btq", BTQ); - GEN("btcw", BTCW); - GEN("btcl", BTCL); - GEN64("btcq", BTCQ); - GEN("btrw", BTRW); - GEN("btrl", BTRL); - GEN64("btrq", BTRQ); - GEN("btsw", BTSW); - GEN("btsl", BTSL); - GEN64("btsq", BTSQ); - GEN("imulw", IMULW); - GEN("imull", IMULL); - GEN64("imulq", IMULQ); - GEN1("cmove", CMOVW, X86_CC_Z); - GEN1("cmove", CMOVL, X86_CC_Z); - if (X86_TARGET_64BIT) - GEN1("cmove", CMOVQ, X86_CC_Z); - GENA("test", TEST); - GENA("cmpxchg", CMPXCHG); - GENA("xadd", XADD); - GENA("xchg", XCHG); - GEN("bsfw", BSFW); - GEN("bsfl", BSFL); - GEN64("bsfq", BSFQ); - GEN("bsrw", BSRW); - GEN("bsrl", BSRL); - GEN64("bsrq", BSRQ); - if (VALID_REG8(s)) { - GEN("movsbw", MOVSBW); - GEN("movsbl", MOVSBL); - GEN64("movsbq", MOVSBQ); - GEN("movzbw", MOVZBW); - GEN("movzbl", MOVZBL); - GEN64("movzbq", MOVZBQ); - } - GEN("movswl", MOVSWL); - GEN64("movswq", MOVSWQ); - GEN("movzwl", MOVZWL); - GEN64("movzwq", MOVZWQ); - GEN64("movslq", MOVSLQ); -#undef GENA -#undef GEN1 -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], s, d)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_ALU_CNT_REG - printf("Testing cl,reg forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < X86_MAX_ALU_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##rr(X86_CL, d); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - if (VALID_REG8(d)) \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN64(INSN "q", GENOP##Q); \ -} while (0) - GENA("rol", ROL); - GENA("ror", ROR); - GENA("rcl", RCL); - GENA("rcr", RCR); - GENA("shl", SHL); - GENA("shr", SHR); - GENA("sar", SAR); -#undef GENA -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], X86_CL, d)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - - static const uint32 imm_table[] = { - 0x00000000, 0x00000001, 0x00000002, 0x00000004, - 0x00000008, 0x00000010, 0x00000020, 0x00000040, - 0x00000080, 0x000000fe, 0x000000ff, 0x00000100, - 0x00000101, 0x00000102, 0xfffffffe, 0xffffffff, - 0x00000000, 0x10000000, 0x20000000, 0x30000000, - 0x40000000, 0x50000000, 0x60000000, 0x70000000, - 0x80000000, 0x90000000, 0xa0000000, 0xb0000000, - 0xc0000000, 0xd0000000, 0xe0000000, 0xf0000000, - 0xfffffffd, 0xfffffffe, 0xffffffff, 0x00000001, - 0x00000002, 0x00000003, 0x11111111, 0x22222222, - 0x33333333, 0x44444444, 0x55555555, 0x66666666, - 0x77777777, 0x88888888, 0x99999999, 0xaaaaaaaa, - 0xbbbbbbbb, 0xcccccccc, 0xdddddddd, 0xeeeeeeee, - }; - const int n_imm_tab_count = sizeof(imm_table)/sizeof(imm_table[0]); - -#if TEST_INST_ALU_IMM_REG - printf("Testing imm,reg forms\n"); - n_tests = n_failures = 0; - for (int j = 0; j < n_imm_tab_count; j++) { - const uint32 value = imm_table[j]; - for (int d = 0; d < X86_MAX_ALU_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = -1; \ - i++; GENOP##ir(value, d); \ - } while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ - } while (0) -#define GENM(INSN, GENOP, MODE) do { \ - insns[i] = INSN; \ - modes[i] = MODE; \ - i++; GENOP##ir(value, d); \ - } while (0) -#define GENM64(INSN, GENOP, MODE) do { \ - if (X86_TARGET_64BIT) \ - GENM(INSN, GENOP, MODE); \ - } while (0) -#define GENA(INSN, GENOP) do { \ - if (VALID_REG8(d)) \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN64(INSN "q", GENOP##Q); \ - } while (0) -#define GENAM(INSN, GENOP, MODE) do { \ - if (VALID_REG8(d)) \ - GENM(INSN "b", GENOP##B, MODE); \ - GENM(INSN "w", GENOP##W, MODE); \ - GENM(INSN "l", GENOP##L, MODE); \ - GENM64(INSN "q", GENOP##Q, MODE); \ - } while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GENM("btw", BTW, 1); - GENM("btl", BTL, 1); - GENM64("btq", BTQ, 1); - GENM("btcw", BTCW, 1); - GENM("btcl", BTCL, 1); - GENM64("btcq", BTCQ, 1); - GENM("btrw", BTRW, 1); - GENM("btrl", BTRL, 1); - GENM64("btrq", BTRQ, 1); - GENM("btsw", BTSW, 1); - GENM("btsl", BTSL, 1); - GENM64("btsq", BTSQ, 1); - if (value != 1) { - GENAM("rol", ROL, 1); - GENAM("ror", ROR, 1); - GENAM("rcl", RCL, 1); - GENAM("rcr", RCR, 1); - GENAM("shl", SHL, 1); - GENAM("shr", SHR, 1); - GENAM("sar", SAR, 1); - } - GENA("test", TEST); -#undef GENAM -#undef GENA -#undef GENM64 -#undef GENM -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - - static const uint32 off_table[] = { - 0x00000000, - 0x00000001, - 0x00000040, - 0x00000080, - 0x000000ff, - 0x00000100, - 0xfffffffe, - 0xffffffff, - }; - const int off_table_count = sizeof(off_table) / sizeof(off_table[0]); - -#if TEST_INST_ALU_MEM_REG - printf("Testing mem,reg forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < off_table_count; d++) { - const uint32 D = off_table[d]; - for (int B = -1; B < X86_MAX_ALU_REGS; B++) { - for (int I = -1; I < X86_MAX_ALU_REGS; I++) { - if (I == X86_RSP) - continue; - for (int S = 1; S < 16; S *= 2) { - if (I == -1 && S > 1) - continue; - for (int r = 0; r < X86_MAX_ALU_REGS; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##mr(D, B, I, S, r); \ - } while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ - } while (0) -#define GENA(INSN, GENOP) do { \ - if (VALID_REG8(r)) \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN64(INSN "q", GENOP##Q); \ - } while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GEN("imulw", IMULW); - GEN("imull", IMULL); - GEN64("imulq", IMULQ); - GEN("bsfw", BSFW); - GEN("bsfl", BSFL); - GEN64("bsfq", BSFQ); - GEN("bsrw", BSRW); - GEN("bsrl", BSRL); - GEN64("bsrq", BSRQ); - GEN("movsbw", MOVSBW); - GEN("movsbl", MOVSBL); - GEN64("movsbq", MOVSBQ); - GEN("movzbw", MOVZBW); - GEN("movzbl", MOVZBL); - GEN64("movzbq", MOVZBQ); - GEN("movswl", MOVSWL); - GEN64("movswq", MOVSWQ); - GEN("movzwl", MOVZWL); - GEN64("movzwq", MOVZWQ); - GEN64("movslq", MOVSLQ); -#undef GENA -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - show_status(n_tests); - } - if (i != last_insn) - abort(); - } - } - } - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_FPU_UNARY - printf("Testing FPU unary forms\n"); - n_tests = n_failures = 0; - { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP(); \ -} while (0) - GEN("f2xm1", F2XM1); - GEN("fabs", FABS); - GEN("fchs", FCHS); - GEN("fcompp", FCOMPP); - GEN("fcos", FCOS); - GEN("fdecstp", FDECSTP); - GEN("fincstp", FINCSTP); - GEN("fld1", FLD1); - GEN("fldl2t", FLDL2T); - GEN("fldl2e", FLDL2E); - GEN("fldpi", FLDPI); - GEN("fldlg2", FLDLG2); - GEN("fldln2", FLDLN2); - GEN("fldz", FLDZ); - GEN("fnop", FNOP); - GEN("fpatan", FPATAN); - GEN("fprem", FPREM); - GEN("fprem1", FPREM1); - GEN("fptan", FPTAN); - GEN("frndint", FRNDINT); - GEN("fscale", FSCALE); - GEN("fsin", FSIN); - GEN("fsincos", FSINCOS); - GEN("fsqrt", FSQRT); - GEN("ftst", FTST); - GEN("fucompp", FUCOMPP); - GEN("fxam", FXAM); - GEN("fxtract", FXTRACT); - GEN("fyl2x", FYL2X); - GEN("fyl2xp1", FYL2XP1); -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_unary(&ii, insns[i])) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_FPU_REG - printf("Testing FPU reg forms\n"); - n_tests = n_failures = 0; - for (int r = 0; r < X86_MAX_FPU_REGS; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GENr(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 0; \ - i++, GENOP##r(r); \ -} while (0) -#define GENr0(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 1; \ - i++, GENOP##r0(r); \ -} while (0) -#define GEN0r(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 2; \ - i++, GENOP##0r(r); \ -} while (0) - GENr("fcom", FCOM); - GENr("fcomp", FCOMP); - GENr("ffree", FFREE); - GENr("fxch", FXCH); - GENr("fst", FST); - GENr("fstp", FSTP); - GENr("fucom", FUCOM); - GENr("fucomp", FUCOMP); - GENr0("fadd", FADD); - GENr0("fcmovb", FCMOVB); - GENr0("fcmove", FCMOVE); - GENr0("fcmovbe", FCMOVBE); - GENr0("fcmovu", FCMOVU); - GENr0("fcmovnb", FCMOVNB); - GENr0("fcmovne", FCMOVNE); - GENr0("fcmovnbe", FCMOVNBE); - GENr0("fcmovnu", FCMOVNU); - GENr0("fcomi", FCOMI); - GENr0("fcomip", FCOMIP); - GENr0("fucomi", FUCOMI); - GENr0("fucomip", FUCOMIP); - GENr0("fdiv", FDIV); - GENr0("fdivr", FDIVR); - GENr0("fmul", FMUL); - GENr0("fsub", FSUB); - GENr0("fsubr", FSUBR); -#undef GEN0r -#undef GENr0 -#undef GENr - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - switch (modes[i]) { - case 0: - if (!check_reg(&ii, insns[i], r)) { - show_instruction(buffer, p); - n_failures++; - } - break; - case 1: - if (!check_reg_reg(&ii, insns[i], r, 0)) { - show_instruction(buffer, p); - n_failures++; - } - break; - case 2: - if (!check_reg_reg(&ii, insns[i], 0, r)) { - show_instruction(buffer, p); - n_failures++; - } - break; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_FPU_MEM - printf("Testing FPU mem forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < off_table_count; d++) { - const uint32 D = off_table[d]; - for (int B = -1; B < X86_MAX_ALU_REGS; B++) { - for (int I = -1; I < X86_MAX_ALU_REGS; I++) { - if (I == X86_RSP) - continue; - for (int S = 1; S < 16; S *= 2) { - if (I == -1 && S > 1) - continue; - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##m(D, B, I, S); \ -} while (0) - GEN("fadds", FADDS); - GEN("faddl", FADDD); - GEN("fiadd", FIADDW); - GEN("fiaddl", FIADDL); - GEN("fbld", FBLD); - GEN("fbstp", FBSTP); - GEN("fcoms", FCOMS); - GEN("fcoml", FCOMD); - GEN("fcomps", FCOMPS); - GEN("fcompl", FCOMPD); - GEN("fdivs", FDIVS); - GEN("fdivl", FDIVD); - GEN("fidiv", FIDIVW); - GEN("fidivl", FIDIVL); - GEN("fdivrs", FDIVRS); - GEN("fdivrl", FDIVRD); - GEN("fidivr", FIDIVRW); - GEN("fidivrl", FIDIVRL); - GEN("ficom", FICOMW); - GEN("ficoml", FICOML); - GEN("ficomp", FICOMPW); - GEN("ficompl", FICOMPL); - GEN("fild", FILDW); - GEN("fildl", FILDL); - GEN("fildll", FILDQ); - GEN("fist", FISTW); - GEN("fistl", FISTL); - GEN("fistp", FISTPW); - GEN("fistpl", FISTPL); - GEN("fistpll", FISTPQ); - GEN("fisttp", FISTTPW); - GEN("fisttpl", FISTTPL); - GEN("fisttpll", FISTTPQ); - GEN("flds", FLDS); - GEN("fldl", FLDD); - GEN("fldt", FLDT); - GEN("fmuls", FMULS); - GEN("fmull", FMULD); - GEN("fimul", FIMULW); - GEN("fimull", FIMULL); - GEN("fsts", FSTS); - GEN("fstl", FSTD); - GEN("fstps", FSTPS); - GEN("fstpl", FSTPD); - GEN("fstpt", FSTPT); - GEN("fsubs", FSUBS); - GEN("fsubl", FSUBD); - GEN("fisub", FISUBW); - GEN("fisubl", FISUBL); - GEN("fsubrs", FSUBRS); - GEN("fsubrl", FSUBRD); - GEN("fisubr", FISUBRW); - GEN("fisubrl", FISUBRL); -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_mem(&ii, insns[i], D, B, I, S)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - show_status(n_tests); - } - if (i != last_insn) - abort(); - } - } - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_MMX_REG_REG - printf("Testing MMX reg,reg forms\n"); - n_tests = n_failures = 0; - for (int s = 0; s < X86_MAX_MMX_REGS; s++) { - for (int d = 0; d < X86_MAX_MMX_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - MMX_##GENOP##rr(s, d); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) - GEN("movq", MOVQ); - GEN("packsswb", PACKSSWB); - GEN("packssdw", PACKSSDW); - GEN("packuswb", PACKUSWB); - GEN("paddb", PADDB); - GEN("paddw", PADDW); - GEN("paddd", PADDD); - GEN("paddq", PADDQ); - GEN("paddsb", PADDSB); - GEN("paddsw", PADDSW); - GEN("paddusb", PADDUSB); - GEN("paddusw", PADDUSW); - GEN("pand", PAND); - GEN("pandn", PANDN); - GEN("pavgb", PAVGB); - GEN("pavgw", PAVGW); - GEN("pcmpeqb", PCMPEQB); - GEN("pcmpeqw", PCMPEQW); - GEN("pcmpeqd", PCMPEQD); - GEN("pcmpgtb", PCMPGTB); - GEN("pcmpgtw", PCMPGTW); - GEN("pcmpgtd", PCMPGTD); - GEN("pmaddwd", PMADDWD); - GEN("pmaxsw", PMAXSW); - GEN("pmaxub", PMAXUB); - GEN("pminsw", PMINSW); - GEN("pminub", PMINUB); - GEN("pmulhuw", PMULHUW); - GEN("pmulhw", PMULHW); - GEN("pmullw", PMULLW); - GEN("pmuludq", PMULUDQ); - GEN("por", POR); - GEN("psadbw", PSADBW); - GEN("psllw", PSLLW); - GEN("pslld", PSLLD); - GEN("psllq", PSLLQ); - GEN("psraw", PSRAW); - GEN("psrad", PSRAD); - GEN("psrlw", PSRLW); - GEN("psrld", PSRLD); - GEN("psrlq", PSRLQ); - GEN("psubb", PSUBB); - GEN("psubw", PSUBW); - GEN("psubd", PSUBD); - GEN("psubq", PSUBQ); - GEN("psubsb", PSUBSB); - GEN("psubsw", PSUBSW); - GEN("psubusb", PSUBUSB); - GEN("psubusw", PSUBUSW); - GEN("punpckhbw", PUNPCKHBW); - GEN("punpckhwd", PUNPCKHWD); - GEN("punpckhdq", PUNPCKHDQ); - GEN("punpcklbw", PUNPCKLBW); - GEN("punpcklwd", PUNPCKLWD); - GEN("punpckldq", PUNPCKLDQ); - GEN("pxor", PXOR); - GEN("pabsb", PABSB); - GEN("pabsw", PABSW); - GEN("pabsd", PABSD); - GEN("phaddw", PHADDW); - GEN("phaddd", PHADDD); - GEN("phaddsw", PHADDSW); - GEN("phsubw", PHSUBW); - GEN("phsubd", PHSUBD); - GEN("phsubsw", PHSUBSW); - GEN("pmaddubsw", PMADDUBSW); - GEN("pmulhrsw", PMULHRSW); - GEN("pshufb", PSHUFB); - GEN("psignb", PSIGNB); - GEN("psignw", PSIGNW); - GEN("psignd", PSIGND); -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], s, d)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - - static const uint8 imm8_table[] = { - 0x00, 0x01, 0x02, 0x03, - 0x06, 0x07, 0x08, 0x09, - 0x0e, 0x0f, 0x10, 0x11, - 0x1e, 0x1f, 0x20, 0x21, - 0xfc, 0xfd, 0xfe, 0xff, - }; - const int n_imm8_tab_count = sizeof(imm8_table)/sizeof(imm8_table[0]); - -#if TEST_INST_MMX_IMM_REG - printf("Testing imm,reg forms\n"); - n_tests = n_failures = 0; - for (int j = 0; j < n_imm8_tab_count; j++) { - const uint8 value = imm8_table[j]; - for (int d = 0; d < X86_MAX_MMX_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 1; \ - i++; MMX_##GENOP##ir(value, d); \ -} while (0) - GEN("psllw", PSLLW); - GEN("pslld", PSLLD); - GEN("psllq", PSLLQ); - GEN("psraw", PSRAW); - GEN("psrad", PSRAD); - GEN("psrlw", PSRLW); - GEN("psrld", PSRLD); - GEN("psrlq", PSRLQ); -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_MMX_MEM_REG - printf("Testing MMX mem,reg forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < off_table_count; d++) { - const uint32 D = off_table[d]; - for (int B = -1; B < X86_MAX_ALU_REGS; B++) { - for (int I = -1; I < X86_MAX_ALU_REGS; I++) { - if (I == X86_RSP) - continue; - for (int S = 1; S < 16; S *= 2) { - if (I == -1 && S > 1) - continue; - for (int r = 0; r < X86_MAX_MMX_REGS; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define _GENrm(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 0; \ - i++; MMX_##GENOP##rm(r, D, B, I, S); \ -} while (0) -#define _GENmr(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = 1; \ - i++; MMX_##GENOP##mr(D, B, I, S, r); \ -} while (0) -#define GEN(INSN, GENOP) do { \ - _GENmr(INSN, GENOP); \ -} while (0) - _GENmr("movd", MOVD); - _GENrm("movd", MOVD); - _GENmr("movq", MOVQ); - _GENrm("movq", MOVQ); - GEN("packsswb", PACKSSWB); - GEN("packssdw", PACKSSDW); - GEN("packuswb", PACKUSWB); - GEN("paddb", PADDB); - GEN("paddw", PADDW); - GEN("paddd", PADDD); - GEN("paddq", PADDQ); - GEN("paddsb", PADDSB); - GEN("paddsw", PADDSW); - GEN("paddusb", PADDUSB); - GEN("paddusw", PADDUSW); - GEN("pand", PAND); - GEN("pandn", PANDN); - GEN("pavgb", PAVGB); - GEN("pavgw", PAVGW); - GEN("pcmpeqb", PCMPEQB); - GEN("pcmpeqw", PCMPEQW); - GEN("pcmpeqd", PCMPEQD); - GEN("pcmpgtb", PCMPGTB); - GEN("pcmpgtw", PCMPGTW); - GEN("pcmpgtd", PCMPGTD); - GEN("pmaddwd", PMADDWD); - GEN("pmaxsw", PMAXSW); - GEN("pmaxub", PMAXUB); - GEN("pminsw", PMINSW); - GEN("pminub", PMINUB); - GEN("pmulhuw", PMULHUW); - GEN("pmulhw", PMULHW); - GEN("pmullw", PMULLW); - GEN("pmuludq", PMULUDQ); - GEN("por", POR); - GEN("psadbw", PSADBW); - GEN("psllw", PSLLW); - GEN("pslld", PSLLD); - GEN("psllq", PSLLQ); - GEN("psraw", PSRAW); - GEN("psrad", PSRAD); - GEN("psrlw", PSRLW); - GEN("psrld", PSRLD); - GEN("psrlq", PSRLQ); - GEN("psubb", PSUBB); - GEN("psubw", PSUBW); - GEN("psubd", PSUBD); - GEN("psubq", PSUBQ); - GEN("psubsb", PSUBSB); - GEN("psubsw", PSUBSW); - GEN("psubusb", PSUBUSB); - GEN("psubusw", PSUBUSW); - GEN("punpckhbw", PUNPCKHBW); - GEN("punpckhwd", PUNPCKHWD); - GEN("punpckhdq", PUNPCKHDQ); - GEN("punpcklbw", PUNPCKLBW); - GEN("punpcklwd", PUNPCKLWD); - GEN("punpckldq", PUNPCKLDQ); - GEN("pxor", PXOR); - GEN("pabsb", PABSB); - GEN("pabsw", PABSW); - GEN("pabsd", PABSD); - GEN("phaddw", PHADDW); - GEN("phaddd", PHADDD); - GEN("phaddsw", PHADDSW); - GEN("phsubw", PHSUBW); - GEN("phsubd", PHSUBD); - GEN("phsubsw", PHSUBSW); - GEN("pmaddubsw", PMADDUBSW); - GEN("pmulhrsw", PMULHRSW); - GEN("pshufb", PSHUFB); - GEN("psignb", PSIGNB); - GEN("psignw", PSIGNW); - GEN("psignd", PSIGND); -#undef GEN -#undef _GENmr -#undef _GENrm - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_mem_reg(&ii, insns[i], D, B, I, S, r, modes[i])) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - show_status(n_tests); - } - if (i != last_insn) - abort(); - } - } - } - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_SSE_REG_REG - printf("Testing SSE reg,reg forms\n"); - n_tests = n_failures = 0; - for (int s = 0; s < X86_MAX_SSE_REGS; s++) { - for (int d = 0; d < X86_MAX_SSE_REGS; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##rr(s, d); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) -#define GEN1(INSN, GENOP) do { \ - GEN(INSN "s", GENOP##S); \ - GEN(INSN "d", GENOP##D); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - GEN1(INSN "s", GENOP##S); \ - GEN1(INSN "p", GENOP##P); \ -} while (0) -#define GENI(INSN, GENOP, IMM) do { \ - insns[i++] = INSN; \ - GENOP##rr(IMM, s, d); \ -} while (0) -#define GENI1(INSN, GENOP, IMM) do { \ - GENI(INSN "s", GENOP##S, IMM); \ - GENI(INSN "d", GENOP##D, IMM); \ -} while (0) -#define GENIA(INSN, GENOP, IMM) do { \ - GENI1(INSN "s", GENOP##S, IMM); \ - GENI1(INSN "p", GENOP##P, IMM); \ -} while (0) - GEN1("andp", ANDP); - GEN1("andnp", ANDNP); - GEN1("orp", ORP); - GEN1("xorp", XORP); - GENA("add", ADD); - GENA("sub", SUB); - GENA("mul", MUL); - GENA("div", DIV); - GEN1("comis", COMIS); - GEN1("ucomis", UCOMIS); - GENA("min", MIN); - GENA("max", MAX); - GEN("rcpss", RCPSS); - GEN("rcpps", RCPPS); - GEN("rsqrtss", RSQRTSS); - GEN("rsqrtps", RSQRTPS); - GENA("sqrt", SQRT); - GENIA("cmpeq", CMP, X86_SSE_CC_EQ); - GENIA("cmplt", CMP, X86_SSE_CC_LT); - GENIA("cmple", CMP, X86_SSE_CC_LE); - GENIA("cmpunord", CMP, X86_SSE_CC_U); - GENIA("cmpneq", CMP, X86_SSE_CC_NEQ); - GENIA("cmpnlt", CMP, X86_SSE_CC_NLT); - GENIA("cmpnle", CMP, X86_SSE_CC_NLE); - GENIA("cmpord", CMP, X86_SSE_CC_O); - GEN1("movap", MOVAP); - GEN("movdqa", MOVDQA); - GEN("movdqu", MOVDQU); - GEN("movd", MOVDXD); - GEN64("movd", MOVQXD); // FIXME: disass bug? "movq" expected - GEN("movd", MOVDXS); - GEN64("movd", MOVQXS); // FIXME: disass bug? "movq" expected - GEN("cvtdq2pd", CVTDQ2PD); - GEN("cvtdq2ps", CVTDQ2PS); - GEN("cvtpd2dq", CVTPD2DQ); - GEN("cvtpd2ps", CVTPD2PS); - GEN("cvtps2dq", CVTPS2DQ); - GEN("cvtps2pd", CVTPS2PD); - GEN("cvtsd2si", CVTSD2SIL); - GEN64("cvtsd2siq", CVTSD2SIQ); - GEN("cvtsd2ss", CVTSD2SS); - GEN("cvtsi2sd", CVTSI2SDL); - GEN64("cvtsi2sdq", CVTSI2SDQ); - GEN("cvtsi2ss", CVTSI2SSL); - GEN64("cvtsi2ssq", CVTSI2SSQ); - GEN("cvtss2sd", CVTSS2SD); - GEN("cvtss2si", CVTSS2SIL); - GEN64("cvtss2siq", CVTSS2SIQ); - GEN("cvttpd2dq", CVTTPD2DQ); - GEN("cvttps2dq", CVTTPS2DQ); - GEN("cvttsd2si", CVTTSD2SIL); - GEN64("cvttsd2siq", CVTTSD2SIQ); - GEN("cvttss2si", CVTTSS2SIL); - GEN64("cvttss2siq", CVTTSS2SIQ); - if (s < 8) { - // MMX source register - GEN("cvtpi2pd", CVTPI2PD); - GEN("cvtpi2ps", CVTPI2PS); - } - if (d < 8) { - // MMX dest register - GEN("cvtpd2pi", CVTPD2PI); - GEN("cvtps2pi", CVTPS2PI); - GEN("cvttpd2pi", CVTTPD2PI); - GEN("cvttps2pi", CVTTPS2PI); - } -#undef GENIA -#undef GENI1 -#undef GENI -#undef GENA -#undef GEN1 -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], s, d)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - -#if TEST_INST_SSE_MEM_REG - printf("Testing SSE mem,reg forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < off_table_count; d++) { - const uint32 D = off_table[d]; - for (int B = -1; B < X86_MAX_ALU_REGS; B++) { - for (int I = -1; I < X86_MAX_ALU_REGS; I++) { - if (I == X86_RSP) - continue; - for (int S = 1; S < 16; S *= 2) { - if (I == -1 && S > 1) - continue; - for (int r = 0; r < X86_MAX_SSE_REGS; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##mr(D, B, I, S, r); \ -} while (0) -#define GEN64(INSN, GENOP) do { \ - if (X86_TARGET_64BIT) \ - GEN(INSN, GENOP); \ -} while (0) -#define GEN1(INSN, GENOP) do { \ - GEN(INSN "s", GENOP##S); \ - GEN(INSN "d", GENOP##D); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - GEN1(INSN "s", GENOP##S); \ - GEN1(INSN "p", GENOP##P); \ -} while (0) -#define GENI(INSN, GENOP, IMM) do { \ - insns[i++] = INSN; \ - GENOP##mr(IMM, D, B, I, S, r); \ -} while (0) -#define GENI1(INSN, GENOP, IMM) do { \ - GENI(INSN "s", GENOP##S, IMM); \ - GENI(INSN "d", GENOP##D, IMM); \ -} while (0) -#define GENIA(INSN, GENOP, IMM) do { \ - GENI1(INSN "s", GENOP##S, IMM); \ - GENI1(INSN "p", GENOP##P, IMM); \ -} while (0) - GEN1("andp", ANDP); - GEN1("andnp", ANDNP); - GEN1("orp", ORP); - GEN1("xorp", XORP); - GENA("add", ADD); - GENA("sub", SUB); - GENA("mul", MUL); - GENA("div", DIV); - GEN1("comis", COMIS); - GEN1("ucomis", UCOMIS); - GENA("min", MIN); - GENA("max", MAX); - GEN("rcpss", RCPSS); - GEN("rcpps", RCPPS); - GEN("rsqrtss", RSQRTSS); - GEN("rsqrtps", RSQRTPS); - GENA("sqrt", SQRT); - GENIA("cmpeq", CMP, X86_SSE_CC_EQ); - GENIA("cmplt", CMP, X86_SSE_CC_LT); - GENIA("cmple", CMP, X86_SSE_CC_LE); - GENIA("cmpunord", CMP, X86_SSE_CC_U); - GENIA("cmpneq", CMP, X86_SSE_CC_NEQ); - GENIA("cmpnlt", CMP, X86_SSE_CC_NLT); - GENIA("cmpnle", CMP, X86_SSE_CC_NLE); - GENIA("cmpord", CMP, X86_SSE_CC_O); - GEN1("movap", MOVAP); - GEN("movdqa", MOVDQA); - GEN("movdqu", MOVDQU); -#if 0 - // FIXME: extraneous REX bits generated - GEN("movd", MOVDXD); - GEN64("movd", MOVQXD); // FIXME: disass bug? "movq" expected -#endif - GEN("cvtdq2pd", CVTDQ2PD); - GEN("cvtdq2ps", CVTDQ2PS); - GEN("cvtpd2dq", CVTPD2DQ); - GEN("cvtpd2ps", CVTPD2PS); - GEN("cvtps2dq", CVTPS2DQ); - GEN("cvtps2pd", CVTPS2PD); - GEN("cvtsd2si", CVTSD2SIL); - GEN64("cvtsd2siq", CVTSD2SIQ); - GEN("cvtsd2ss", CVTSD2SS); - GEN("cvtsi2sd", CVTSI2SDL); - GEN64("cvtsi2sdq", CVTSI2SDQ); - GEN("cvtsi2ss", CVTSI2SSL); - GEN64("cvtsi2ssq", CVTSI2SSQ); - GEN("cvtss2sd", CVTSS2SD); - GEN("cvtss2si", CVTSS2SIL); - GEN64("cvtss2siq", CVTSS2SIQ); - GEN("cvttpd2dq", CVTTPD2DQ); - GEN("cvttps2dq", CVTTPS2DQ); - GEN("cvttsd2si", CVTTSD2SIL); - GEN64("cvttsd2siq", CVTTSD2SIQ); - GEN("cvttss2si", CVTTSS2SIL); - GEN64("cvttss2siq", CVTTSS2SIQ); - if (r < 8) { - // MMX dest register - GEN("cvtpd2pi", CVTPD2PI); - GEN("cvtps2pi", CVTPS2PI); - GEN("cvttpd2pi", CVTTPD2PI); - GEN("cvttps2pi", CVTTPS2PI); - } -#undef GENIA -#undef GENI1 -#undef GENI -#undef GENA -#undef GEN1 -#undef GEN64 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { - show_instruction(buffer, p); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - show_status(n_tests); - } - if (i != last_insn) - abort(); - } - } - } - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; -#endif - - printf("\n"); - printf("All %ld tests run, %ld failures\n", n_all_tests, n_all_failures); -} diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index cd588ec10..809959c9b 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -37,14 +37,6 @@ extern uint32 ROMBaseMac; // ROM base (Mac address space) extern uint8 *ROMBaseHost; // ROM base (host address space) extern uint32 ROMSize; // Size of ROM -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING -// If we are not using real or direct addressing, the Mac frame buffer gets -// mapped to this location. The memory must be allocated by VideoInit(). -// If multiple monitors are used, they must share the frame buffer -const uint32 MacFrameBaseMac = 0xa0000000; -extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) -extern uint32 MacFrameSize; // Size of frame buffer -#endif extern int MacFrameLayout; // Frame buffer layout (see defines below) // Possible frame buffer layouts @@ -82,13 +74,6 @@ extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType extern void Exit680x0(void); extern void InitFrameBufferMapping(void); -// 680x0 dynamic recompilation activation flag -#if USE_JIT -extern bool UseJIT; -#else -const bool UseJIT = false; -#endif - // 680x0 emulation functions struct M68kRegisters; extern void Start680x0(void); // Reset and start 680x0 diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h index 7c0c5b748..5983e15ee 100644 --- a/BasiliskII/src/uae_cpu/fpu/flags.h +++ b/BasiliskII/src/uae_cpu/fpu/flags.h @@ -66,12 +66,6 @@ # define FPU_USE_LAZY_FLAGS #endif -/* JIT Compilation for FPU only works with lazy evaluation of FPU flags */ -#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) && defined(USE_JIT_FPU) -# undef FPU_USE_GENERIC_FLAGS -# define FPU_USE_LAZY_FLAGS -#endif - #ifdef FPU_IMPLEMENTATION /* -------------------------------------------------------------------------- */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp deleted file mode 100644 index f5a1aeb49..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ /dev/null @@ -1,2152 +0,0 @@ -/* - * fpu/fpu_ieee.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 - */ - -/* - * Following fixes by Lauri Pesonen, July 1999: - * - * FMOVEM list handling: - * The lookup tables did not work correctly, rewritten. - * FINT: - * (int) cast does not work, fixed. - * Further, now honors the FPU fpcr rounding modes. - * FINTRZ: - * (int) cast cannot be used, fixed. - * FGETEXP: - * Input argument value 0 returned erroneous value. - * FMOD: - * (int) cast cannot be used. Replaced by proper rounding. - * Quotient byte handling was missing. - * FREM: - * (int) cast cannot be used. Replaced by proper rounding. - * Quotient byte handling was missing. - * FSCALE: - * Input argument value 0 was not handled correctly. - * FMOVEM Control Registers to/from address FPU registers An: - * A bug caused the code never been called. - * FMOVEM Control Registers pre-decrement: - * Moving of control regs from memory to FPP was not handled properly, - * if not all of the three FPU registers were moved. - * Condition code "Not Greater Than or Equal": - * Returned erroneous value. - * FSINCOS: - * Cosine must be loaded first if same register. - * FMOVECR: - * Status register was not updated (yes, this affects it). - * FMOVE -> reg: - * Status register was not updated (yes, this affects it). - * FMOVE reg -> reg: - * Status register was not updated. - * FDBcc: - * The loop termination condition was wrong. - * Possible leak from int16 to int32 fixed. - * get_fp_value: - * Immediate addressing mode && Operation Length == Byte -> - * Use the low-order byte of the extension word. - * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was - * written to them. - * - * Other: - * - Optimized single/double/extended to/from conversion functions. - * Huge speed boost, but not (necessarily) portable to other systems. - * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 - * - Optimized versions of FSCALE, FGETEXP, FGETMAN - * - Conversion routines now handle NaN and infinity better. - * - Some constants precalculated. Not all compilers can optimize the - * expressions previously used. - * - * TODO: - * - Floating point exceptions. - * - More Infinity/NaN/overflow/underflow checking. - * - FPU instruction_address (only needed when exceptions are implemented) - * - Should be written in assembly to support long doubles. - * - Precision rounding single/double - */ - -#include "sysdeps.h" -#include -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "main.h" -#define FPU_IMPLEMENTATION -#include "fpu/fpu.h" -#include "fpu/fpu_ieee.h" - -/* Global FPU context */ -fpu_t fpu; - -/* -------------------------------------------------------------------------- */ -/* --- Scopes Definition --- */ -/* -------------------------------------------------------------------------- */ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- Native Support --- */ -/* -------------------------------------------------------------------------- */ - -#include "fpu/mathlib.h" -#include "fpu/flags.h" -#include "fpu/exceptions.h" -#include "fpu/rounding.h" -#include "fpu/impl.h" - -#include "fpu/mathlib.cpp" -#include "fpu/flags.cpp" -#include "fpu/exceptions.cpp" -#include "fpu/rounding.cpp" - -/* -------------------------------------------------------------------------- */ -/* --- Debugging --- */ -/* -------------------------------------------------------------------------- */ - -PUBLIC void FFPU fpu_dump_registers(void) -{ - for (int i = 0; i < 8; i++){ - printf ("FP%d: %g ", i, fpu_get_register(i)); - if ((i & 3) == 3) - printf ("\n"); - } -} - -PUBLIC void FFPU fpu_dump_flags(void) -{ - printf ("N=%d Z=%d I=%d NAN=%d\n", - (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, - (get_fpsr() & FPSR_CCB_ZERO)!= 0, - (get_fpsr() & FPSR_CCB_INFINITY) != 0, - (get_fpsr() & FPSR_CCB_NAN) != 0); -} - -PRIVATE void FFPU dump_registers(const char * str) -{ -#if FPU_DEBUG && FPU_DUMP_REGISTERS - char temp_str[512]; - - sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", - str, - fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), - fpu_get_register(3), fpu_get_register(4), fpu_get_register(5), - fpu_get_register(6), fpu_get_register(7) ); - - fpu_debug((temp_str)); -#endif -} - -PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) -{ -#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES - char temp_buf1[256], temp_buf2[10]; - int bytes = sizeof(temp_buf1)/3-1-3; - if (actual < bytes) - bytes = actual; - - temp_buf1[0] = 0; - for (int i = 0; i < bytes; i++) { - sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); - strcat(temp_buf1, temp_buf2); - } - - strcat(temp_buf1, "\n"); - fpu_debug((temp_buf1)); -#endif -} - -// Quotient Byte is loaded with the sign and least significant -// seven bits of the quotient. -PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) -{ - uae_u32 lsb = (uae_u32)fp_fabs(quotient) & 0x7f; - FPU fpsr.quotient = sign | (lsb << 16); -} - -// to_single -PRIVATE inline fpu_register FFPU make_single(uae_u32 value) -{ -#if 1 - // Use a single, otherwise some checks for NaN, Inf, Zero would have to - // be performed - fpu_single result = 0; // = 0 to workaround a compiler bug on SPARC - fp_declare_init_shape(srp, result, single); - srp->ieee.negative = (value >> 31) & 1; - srp->ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; - srp->ieee.mantissa = value & 0x007fffff; - fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); - return result; -#elif 0 /* Original code */ - if ((value & 0x7fffffff) == 0) - return (0.0); - - fpu_register result; - uae_u32 * p = (uae_u32 *)&result; - - uae_u32 sign = (value & 0x80000000); - uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - - p[FLO] = value << 29; - p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); - - fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); - - return(result); -#endif -} - -// from_single -PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) -{ -#if 1 - fpu_single input = (fpu_single) src; - fp_declare_init_shape(sip, input, single); - uae_u32 result = (sip->ieee.negative << 31) - | (sip->ieee.exponent << 23) - | sip->ieee.mantissa; - fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); - return result; -#elif 0 /* Original code */ - if (src == 0.0) - return 0; - - uae_u32 result; - uae_u32 *p = (uae_u32 *)&src; - - uae_u32 sign = (p[FHI] & 0x80000000); - uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; - - if(exp + 127 < 1023) { - exp = 0; - } else if(exp > 1023 + 127) { - exp = 255; - } else { - exp = exp + 127 - 1023; - } - - result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); - - fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); - - return (result); -#endif -} - -// to_exten -PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - // is it zero? - if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) - return 0.0; - - fpu_register result; -#if USE_QUAD_DOUBLE - // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { - make_nan(result); - return result; - } - // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { - if ((wrd1 & 0x80000000) == 0) - make_inf_positive(result); - else - make_inf_negative(result); - return result; - } - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp->ieee.mantissa3 = 0; -#elif USE_LONG_DOUBLE - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = wrd2; - srp->ieee.mantissa1 = wrd3; -#else - uae_u32 sgn = (wrd1 >> 31) & 1; - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - - // the explicit integer bit is not set, must normalize - if ((wrd2 & 0x80000000) == 0) { - fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); - if (wrd2 | wrd3) { - // mantissa, not fraction. - uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; - while (exp > 0 && (man & UVAL64(0x8000000000000000)) == 0) { - man <<= 1; - exp--; - } - wrd2 = (uae_u32)(man >> 32); - wrd3 = (uae_u32)(man & 0xFFFFFFFF); - } - else if (exp != 0x7fff) // zero - exp = FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; - } - - if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) - exp = 0; - else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) - exp = FP_DOUBLE_EXP_MAX; - else - exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - - fp_declare_init_shape(srp, result, double); - srp->ieee.negative = sgn; - srp->ieee.exponent = exp; - // drop the explicit integer bit - srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); -#endif - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); - return result; -} - -/* - Would be so much easier with full size floats :( - ... this is so vague. -*/ -// make_extended_no_normalize -PRIVATE inline void FFPU make_extended_no_normalize( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result -) -{ - // is it zero? - if ((wrd1 && 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { - make_zero_positive(result); - return; - } - // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { - make_nan(result); - return; - } -#if USE_QUAD_DOUBLE - // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { - if ((wrd1 & 0x80000000) == 0) - make_inf_positive(result); - else - make_inf_negative(result); - return; - } - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp->ieee.mantissa3 = 0; -#elif USE_LONG_DOUBLE - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = wrd2; - srp->ieee.mantissa1 = wrd3; -#else - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) - exp = 0; - else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) - exp = FP_DOUBLE_EXP_MAX; - else - exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - - fp_declare_init_shape(srp, result, double); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = exp; - // drop the explicit integer bit - srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); -#endif - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); -} - -// from_exten -PRIVATE inline void FFPU extract_extended(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -) -{ - if (src == 0.0) { - *wrd1 = *wrd2 = *wrd3 = 0; - return; - } -#if USE_QUAD_DOUBLE - // FIXME: deal with denormals? - fp_declare_init_shape(srp, src, extended); - *wrd1 = (srp->ieee.negative << 31) | (srp->ieee.exponent << 16); - // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 15) | ((srp->ieee.mantissa1 & 0xfffe0000) >> 17); - *wrd3 = (srp->ieee.mantissa1 << 15) | ((srp->ieee.mantissa2 & 0xfffe0000) >> 17); -#elif USE_LONG_DOUBLE - uae_u32 *p = (uae_u32 *)&src; -#ifdef WORDS_BIGENDIAN - *wrd1 = p[0]; - *wrd2 = p[1]; - *wrd3 = p[2]; -#else - *wrd3 = p[0]; - *wrd2 = p[1]; - *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; -#endif -#else - fp_declare_init_shape(srp, src, double); - fpu_debug(("extract_extended (%d,%d,%X,%X)\n", - srp->ieee.negative , srp->ieee.exponent, - srp->ieee.mantissa0, srp->ieee.mantissa1)); - - uae_u32 exp = srp->ieee.exponent; - - if (exp == FP_DOUBLE_EXP_MAX) - exp = FP_EXTENDED_EXP_MAX; - else - exp += FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; - - *wrd1 = (srp->ieee.negative << 31) | (exp << 16); - // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 11) | ((srp->ieee.mantissa1 & 0xffe00000) >> 21); - *wrd3 = srp->ieee.mantissa1 << 11; -#endif - fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); -} - -// to_double -PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) -{ - union { - fpu_double value; - uae_u32 parts[2]; - } dest; -#ifdef WORDS_BIGENDIAN - dest.parts[0] = wrd1; - dest.parts[1] = wrd2; -#else - dest.parts[0] = wrd2; - dest.parts[1] = wrd1; -#endif - fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,dest.value)); - return (fpu_register)(dest.value); -} - -// from_double -PRIVATE inline void FFPU extract_double(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2 -) -{ - union { - fpu_double value; - uae_u32 parts[2]; - } dest; - dest.value = (fpu_double)src; -#ifdef WORDS_BIGENDIAN - *wrd1 = dest.parts[0]; - *wrd2 = dest.parts[1]; -#else - *wrd2 = dest.parts[0]; - *wrd1 = dest.parts[1]; -#endif - fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); -} - -// to_pack -PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - fpu_double d; - char *cp; - char str[100]; - - cp = str; - if (wrd1 & 0x80000000) - *cp++ = '-'; - *cp++ = (char)((wrd1 & 0xf) + '0'); - *cp++ = '.'; - *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); - *cp++ = 'E'; - if (wrd1 & 0x40000000) - *cp++ = '-'; - *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); - *cp = 0; - sscanf(str, "%le", &d); - - fpu_debug(("make_packed str = %s\n",str)); - - fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); - return d; -} - -// from_pack -PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) -{ - int i; - int t; - char *cp; - char str[100]; - - sprintf(str, "%.16e", src); - - fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); - - cp = str; - *wrd1 = *wrd2 = *wrd3 = 0; - if (*cp == '-') { - cp++; - *wrd1 = 0x80000000; - } - if (*cp == '+') - cp++; - *wrd1 |= (*cp++ - '0'); - if (*cp == '.') - cp++; - for (i = 0; i < 8; i++) { - *wrd2 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd2 |= *cp++ - '0'; - } - for (i = 0; i < 8; i++) { - *wrd3 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd3 |= *cp++ - '0'; - } - if (*cp == 'e' || *cp == 'E') { - cp++; - if (*cp == '-') { - cp++; - *wrd1 |= 0x40000000; - } - if (*cp == '+') - cp++; - t = 0; - for (i = 0; i < 3; i++) { - if (*cp >= '0' && *cp <= '9') - t = (t << 4) | (*cp++ - '0'); - } - *wrd1 |= t << 16; - } - - fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); -} - -PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) -{ - uaecptr tmppc; - uae_u16 tmp; - int size; - int mode; - int reg; - uae_u32 ad = 0; - static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); - // dump_first_bytes( regs.pc_p-4, 16 ); - - if ((extra & 0x4000) == 0) { - src = FPU registers[(extra >> 10) & 7]; - return 1; - } - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - - fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); - - switch (mode) { - case 0: - switch (size) { - case 6: - src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); - break; - case 4: - src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); - break; - case 0: - src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); - break; - case 1: - src = make_single(m68k_dreg (regs, reg)); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - // Immediate addressing mode && Operation Length == Byte -> - // Use the low-order byte of the extension word. - if(size == 6) ad++; - break; - default: - return 0; - } - } - - fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); - fpu_debug(("get_fp_value ad=%X\n",ad)); - fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - dump_first_bytes( get_real_address(ad)-64, 64 ); - dump_first_bytes( get_real_address(ad), 64 ); - - switch (size) { - case 0: - src = (fpu_register) (uae_s32) get_long (ad); - break; - case 1: - src = make_single(get_long (ad)); - break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - src = make_extended(wrd1, wrd2, wrd3); - break; - } - case 3: { - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - src = make_packed(wrd1, wrd2, wrd3); - break; - } - case 4: - src = (fpu_register) (uae_s16) get_word(ad); - break; - case 5: { - uae_u32 wrd1, wrd2; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - src = make_double(wrd1, wrd2); - break; - } - case 6: - src = (fpu_register) (uae_s8) get_byte(ad); - break; - default: - return 0; - } - - // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); - return 1; -} - -/* Convert the FP value to integer according to the current m68k rounding mode */ -PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) -{ - fpu_register result; - switch (get_fpcr() & 0x30) { - case FPCR_ROUND_ZERO: - result = fp_round_to_zero(src); - break; - case FPCR_ROUND_MINF: - result = fp_round_to_minus_infinity(src); - break; - case FPCR_ROUND_NEAR: - result = fp_round_to_nearest(src); - break; - case FPCR_ROUND_PINF: - result = fp_round_to_plus_infinity(src); - break; - default: - result = src; /* should never be reached */ - break; - } - return (uae_s32)result; -} - -PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) -{ - uae_u16 tmp; - uaecptr tmppc; - int size; - int mode; - int reg; - uae_u32 ad; - static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); - - if ((extra & 0x4000) == 0) { - int dest_reg = (extra >> 10) & 7; - FPU registers[dest_reg] = value; - make_fpsr(FPU registers[dest_reg]); - return 1; - } - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - ad = 0xffffffff; - switch (mode) { - case 0: - switch (size) { - case 6: - m68k_dreg (regs, reg) = ((toint(value) & 0xff) - | (m68k_dreg (regs, reg) & ~0xff)); - break; - case 4: - m68k_dreg (regs, reg) = ((toint(value) & 0xffff) - | (m68k_dreg (regs, reg) & ~0xffff)); - break; - case 0: - m68k_dreg (regs, reg) = toint(value); - break; - case 1: - m68k_dreg (regs, reg) = extract_single(value); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - break; - default: - return 0; - } - } - switch (size) { - case 0: - put_long (ad, toint(value)); - break; - case 1: - put_long (ad, extract_single(value)); - break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - extract_extended(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - break; - } - case 3: { - uae_u32 wrd1, wrd2, wrd3; - extract_packed(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - break; - } - case 4: - put_word(ad, (uae_s16) toint(value)); - break; - case 5: { - uae_u32 wrd1, wrd2; - extract_double(value, &wrd1, &wrd2); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - break; - } - case 6: - put_byte(ad, (uae_s8) toint(value)); - break; - default: - return 0; - } - return 1; -} - -PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) -{ - uae_u16 tmp; - uaecptr tmppc; - int mode; - int reg; - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - switch (mode) { - case 0: - case 1: - return 0; - case 2: - *ad = m68k_areg (regs, reg); - break; - case 3: - *ad = m68k_areg (regs, reg); - break; - case 4: - *ad = m68k_areg (regs, reg); - break; - case 5: - *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - *ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - *ad = next_ilong(); - break; - case 2: - *ad = m68k_getpc (); - *ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - *ad = get_disp_ea_020 (tmppc, tmp); - break; - default: - return 0; - } - } - return 1; -} - -#if FPU_DEBUG -# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) -#else -# define CONDRET(s,x) return (x) -#endif - -PRIVATE inline int FFPU fpp_cond(int condition) -{ - int N = (FPU result < 0.0); - int Z = (FPU result == 0.0); - int NaN = isnan(FPU result); - - if (NaN) - N = Z = 0; - - switch (condition) { - case 0x00: CONDRET("False",0); - case 0x01: CONDRET("Equal",Z); - case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); - case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); - case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); - case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); - case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); - case 0x07: CONDRET("Ordered",!NaN); - case 0x08: CONDRET("Unordered",NaN); - case 0x09: CONDRET("Unordered or Equal",NaN || Z); - case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); - case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); - case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); - case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); - case 0x0e: CONDRET("Not Equal",!Z); - case 0x0f: CONDRET("True",1); - case 0x10: CONDRET("Signaling False",0); - case 0x11: CONDRET("Signaling Equal",Z); - case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); - case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); - case 0x14: CONDRET("Less Than",N && !(NaN || Z)); - case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); - case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); - case 0x17: CONDRET("Greater, Less or Equal",!NaN); - case 0x18: CONDRET("Not Greater, Less or Equal",NaN); - case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); - case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); - case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); - case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); - case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); - case 0x1e: CONDRET("Signaling Not Equal",!Z); - case 0x1f: CONDRET("Signaling True",1); - default: CONDRET("",-1); - } -} - -void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) -{ - fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - uaecptr pc = (uae_u32) m68k_getpc (); - uae_s32 disp = (uae_s32) (uae_s16) next_iword(); - int cc = fpp_cond(extra & 0x3f); - if (cc == -1) { - m68k_setpc (pc - 4); - op_illg (opcode); - } else if (!cc) { - int reg = opcode & 0x7; - - // this may have leaked. - /* - m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) - | ((m68k_dreg (regs, reg) - 1) & 0xffff)); - */ - m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) - | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); - - - // condition reversed. - // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) - if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) - m68k_setpc (pc + disp); - } -} - -void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) -{ - fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - uae_u32 ad; - int cc = fpp_cond(extra & 0x3f); - if (cc == -1) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - else if ((opcode & 0x38) == 0) { - m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | - (cc ? 0xff : 0x00); - } - else if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - else - put_byte(ad, cc ? 0xff : 0x00); -} - -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) -{ - fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); - - int cc = fpp_cond(opcode & 0x3f); - if (cc == -1) { - m68k_setpc (oldpc); - op_illg (opcode); - } - if (cc) - Exception(7, oldpc - 2); -} - -// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) -void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) -{ - fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); - - int cc = fpp_cond(opcode & 0x3f); - if (cc == -1) { - m68k_setpc (pc); - op_illg (opcode); - } - else if (cc) { - if ((opcode & 0x40) == 0) - extra = (uae_s32) (uae_s16) extra; - m68k_setpc (pc + extra); - } -} - -// FSAVE has no post-increment -// 0x1f180000 == IDLE state frame, coprocessor version number 1F -void FFPU fpuop_save(uae_u32 opcode) -{ - fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); - - uae_u32 ad; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - int i; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - if (CPUType == 4) { - // Put 4 byte 68040 IDLE frame. - if (incr < 0) { - ad -= 4; - put_long (ad, 0x41000000); - } - else { - put_long (ad, 0x41000000); - ad += 4; - } - } else { - // Put 28 byte 68881 IDLE frame. - if (incr < 0) { - fpu_debug(("fsave_opp pre-decrement\n")); - ad -= 4; - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - for (i = 0; i < 5; i++) { - ad -= 4; - put_long (ad, 0x00000000); - } - ad -= 4; - put_long (ad, 0x1f180000); // IDLE, vers 1f - } - else { - put_long (ad, 0x1f180000); // IDLE, vers 1f - ad += 4; - for (i = 0; i < 5; i++) { - put_long (ad, 0x00000000); - ad += 4; - } - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - ad += 4; - } - } - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - fpu_debug(("PROBLEM: fsave_opp post-increment\n")); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; - fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); - } -} - -// FRESTORE has no pre-decrement -void FFPU fpuop_restore(uae_u32 opcode) -{ - fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); - - uae_u32 ad; - uae_u32 d; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - if (CPUType == 4) { - // 68040 - if (incr < 0) { - fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); - ad -= 44; - } - else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad -= 92; - } - } - } - else { - d = get_long (ad); - fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); - ad += 4; - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); - ad += 44; - } - else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad += 92; - } - } - } - } - else { - // 68881 - if (incr < 0) { - fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { - if ((d & 0x00ff0000) == 0x00180000) - ad -= 6 * 4; - else if ((d & 0x00ff0000) == 0x00380000) - ad -= 14 * 4; - else if ((d & 0x00ff0000) == 0x00b40000) - ad -= 45 * 4; - } - } - else { - d = get_long (ad); - fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); - ad += 4; - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0x00180000) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - ad += 6 * 4; - } - else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? - ad += 14 * 4; - fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad += 45 * 4; - } - } - } - } - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; - fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); - } -} - -void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) -{ - int reg; - fpu_register src; - - fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, - m68k_getpc () - 4)); - - dump_registers( "START"); - - switch ((extra >> 13) & 0x7) { - case 3: - fpu_debug(("FMOVE -> \n")); - if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - dump_registers( "END "); - return; - case 4: - case 5: - if ((opcode & 0x38) == 0) { - if (extra & 0x2000) { // dr bit - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; - fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); - } - if (extra & 0x0800) { - m68k_dreg (regs, opcode & 7) = get_fpsr(); - fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); - } - if (extra & 0x0400) { - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); - } - } - else { - if (extra & 0x1000) { - set_fpcr( m68k_dreg (regs, opcode & 7) ); - fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( m68k_dreg (regs, opcode & 7) ); - fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = m68k_dreg (regs, opcode & 7); - fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); - } - } -// } else if ((opcode & 0x38) == 1) { - } - else if ((opcode & 0x38) == 8) { - if (extra & 0x2000) { // dr bit - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; - fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); - } - if (extra & 0x0800) { - m68k_areg (regs, opcode & 7) = get_fpsr(); - fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); - } - if (extra & 0x0400) { - m68k_areg (regs, opcode & 7) = FPU instruction_address; - fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); - } - } else { - if (extra & 0x1000) { - set_fpcr( m68k_areg (regs, opcode & 7) ); - fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( m68k_areg (regs, opcode & 7) ); - fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = m68k_areg (regs, opcode & 7); - fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); - } - } - } - else if ((opcode & 0x3f) == 0x3c) { - if ((extra & 0x2000) == 0) { - if (extra & 0x1000) { - set_fpcr( next_ilong() ); - fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( next_ilong() ); - fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = next_ilong(); - fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); - } - } - } - else if (extra & 0x2000) { - /* FMOVEM FPP->memory */ - uae_u32 ad; - int incr = 0; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - if ((opcode & 0x38) == 0x20) { - if (extra & 0x1000) - incr += 4; - if (extra & 0x0800) - incr += 4; - if (extra & 0x0400) - incr += 4; - } - ad -= incr; - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - put_long (ad, get_fpcr() & 0xFFFF); - fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); - ad += 4; - } - if (extra & 0x0800) { - put_long (ad, get_fpsr()); - fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); - ad += 4; - } - if (extra & 0x0400) { - put_long (ad, FPU instruction_address); - fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); - ad += 4; - } - ad -= incr; - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - else { - /* FMOVEM memory->FPP */ - uae_u32 ad; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - - // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; - int incr = 0; - if((opcode & 0x38) == 0x20) { - if (extra & 0x1000) - incr += 4; - if (extra & 0x0800) - incr += 4; - if (extra & 0x0400) - incr += 4; - ad = ad - incr; - } - - if (extra & 0x1000) { - set_fpcr( get_long (ad) ); - fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); - ad += 4; - } - if (extra & 0x0800) { - set_fpsr( get_long (ad) ); - fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); - ad += 4; - } - if (extra & 0x0400) { - FPU instruction_address = get_long (ad); - fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); - ad += 4; - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? -// m68k_areg (regs, opcode & 7) = ad - 12; - m68k_areg (regs, opcode & 7) = ad - incr; - } - dump_registers( "END "); - return; - case 6: - case 7: { - uae_u32 ad, list = 0; - int incr = 0; - if (extra & 0x2000) { - /* FMOVEM FPP->memory */ - fpu_debug(("FMOVEM FPP->memory\n")); - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 1: /* dynamic pred */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 3: /* dynamic postinc */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = 1; - break; - } - - if (incr < 0) { - for(reg=7; reg>=0; reg--) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - } - else { - for(reg=0; reg<8; reg++) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - else { - /* FMOVEM memory->FPP */ - fpu_debug(("FMOVEM memory->FPP\n")); - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); - list = extra & 0xff; - incr = -1; - break; - case 1: /* dynamic pred */ - fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 3: /* dynamic postinc */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = 1; - break; - } - - /**/ - if (incr < 0) { - // not reached - for(reg=7; reg>=0; reg--) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); - make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); - } - list <<= 1; - } - } - else { - for(reg=0; reg<8; reg++) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); - make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - dump_registers( "END "); - return; - } - case 0: - case 2: - reg = (extra >> 7) & 7; - if ((extra & 0xfc00) == 0x5c00) { - fpu_debug(("FMOVECR memory->FPP\n")); - switch (extra & 0x7f) { - case 0x00: - // FPU registers[reg] = 4.0 * atan(1.0); - FPU registers[reg] = 3.1415926535897932384626433832795; - fpu_debug(("FP const: Pi\n")); - break; - case 0x0b: - // FPU registers[reg] = log10 (2.0); - FPU registers[reg] = 0.30102999566398119521373889472449; - fpu_debug(("FP const: Log 10 (2)\n")); - break; - case 0x0c: - // FPU registers[reg] = exp (1.0); - FPU registers[reg] = 2.7182818284590452353602874713527; - fpu_debug(("FP const: e\n")); - break; - case 0x0d: - // FPU registers[reg] = log (exp (1.0)) / log (2.0); - FPU registers[reg] = 1.4426950408889634073599246810019; - fpu_debug(("FP const: Log 2 (e)\n")); - break; - case 0x0e: - // FPU registers[reg] = log (exp (1.0)) / log (10.0); - FPU registers[reg] = 0.43429448190325182765112891891661; - fpu_debug(("FP const: Log 10 (e)\n")); - break; - case 0x0f: - FPU registers[reg] = 0.0; - fpu_debug(("FP const: zero\n")); - break; - case 0x30: - // FPU registers[reg] = log (2.0); - FPU registers[reg] = 0.69314718055994530941723212145818; - fpu_debug(("FP const: ln(2)\n")); - break; - case 0x31: - // FPU registers[reg] = log (10.0); - FPU registers[reg] = 2.3025850929940456840179914546844; - fpu_debug(("FP const: ln(10)\n")); - break; - case 0x32: - // ?? - FPU registers[reg] = 1.0e0; - fpu_debug(("FP const: 1.0e0\n")); - break; - case 0x33: - FPU registers[reg] = 1.0e1; - fpu_debug(("FP const: 1.0e1\n")); - break; - case 0x34: - FPU registers[reg] = 1.0e2; - fpu_debug(("FP const: 1.0e2\n")); - break; - case 0x35: - FPU registers[reg] = 1.0e4; - fpu_debug(("FP const: 1.0e4\n")); - break; - case 0x36: - FPU registers[reg] = 1.0e8; - fpu_debug(("FP const: 1.0e8\n")); - break; - case 0x37: - FPU registers[reg] = 1.0e16; - fpu_debug(("FP const: 1.0e16\n")); - break; - case 0x38: - FPU registers[reg] = 1.0e32; - fpu_debug(("FP const: 1.0e32\n")); - break; - case 0x39: - FPU registers[reg] = 1.0e64; - fpu_debug(("FP const: 1.0e64\n")); - break; - case 0x3a: - FPU registers[reg] = 1.0e128; - fpu_debug(("FP const: 1.0e128\n")); - break; - case 0x3b: - FPU registers[reg] = 1.0e256; - fpu_debug(("FP const: 1.0e256\n")); - break; -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - case 0x3c: - FPU registers[reg] = 1.0e512L; - fpu_debug(("FP const: 1.0e512\n")); - break; - case 0x3d: - FPU registers[reg] = 1.0e1024L; - fpu_debug(("FP const: 1.0e1024\n")); - break; - case 0x3e: - FPU registers[reg] = 1.0e2048L; - fpu_debug(("FP const: 1.0e2048\n")); - break; - case 0x3f: - FPU registers[reg] = 1.0e4096L; - fpu_debug(("FP const: 1.0e4096\n")); -#endif - break; - default: - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - break; - } - // these *do* affect the status reg - make_fpsr(FPU registers[reg]); - dump_registers( "END "); - return; - } - - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); - - if (FPU is_integral) { - // 68040-specific operations - switch (extra & 0x7f) { - case 0x40: /* FSMOVE */ - fpu_debug(("FSMOVE %.04f\n",(double)src)); - FPU registers[reg] = (float)src; - make_fpsr(FPU registers[reg]); - break; - case 0x44: /* FDMOVE */ - fpu_debug(("FDMOVE %.04f\n",(double)src)); - FPU registers[reg] = (double)src; - make_fpsr(FPU registers[reg]); - break; - case 0x41: /* FSSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = (float)fp_sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x45: /* FDSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = (double)fp_sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x58: /* FSABS */ - fpu_debug(("FSABS %.04f\n",(double)src)); - FPU registers[reg] = (float)fp_fabs(src); - make_fpsr(FPU registers[reg]); - break; - case 0x5c: /* FDABS */ - fpu_debug(("FDABS %.04f\n",(double)src)); - FPU registers[reg] = (double)fp_fabs(src); - make_fpsr(FPU registers[reg]); - break; - case 0x5a: /* FSNEG */ - fpu_debug(("FSNEG %.04f\n",(double)src)); - FPU registers[reg] = (float)-src; - make_fpsr(FPU registers[reg]); - break; - case 0x5e: /* FDNEG */ - fpu_debug(("FDNEG %.04f\n",(double)src)); - FPU registers[reg] = (double)-src; - make_fpsr(FPU registers[reg]); - break; - case 0x60: /* FSDIV */ - fpu_debug(("FSDIV %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] / src); - make_fpsr(FPU registers[reg]); - break; - case 0x64: /* FDDIV */ - fpu_debug(("FDDIV %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] / src); - make_fpsr(FPU registers[reg]); - break; - case 0x62: /* FSADD */ - fpu_debug(("FSADD %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] + src); - make_fpsr(FPU registers[reg]); - break; - case 0x66: /* FDADD */ - fpu_debug(("FDADD %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] + src); - make_fpsr(FPU registers[reg]); - break; - case 0x68: /* FSSUB */ - fpu_debug(("FSSUB %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] - src); - make_fpsr(FPU registers[reg]); - break; - case 0x6c: /* FDSUB */ - fpu_debug(("FDSUB %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] - src); - make_fpsr(FPU registers[reg]); - break; - case 0x63: /* FSMUL */ - case 0x67: /* FDMUL */ - fpu_debug(("FMUL %.04f\n",(double)src)); - get_dest_flags(FPU registers[reg]); - get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { - if ((extra & 0x7f) == 0x63) - FPU registers[reg] = (float)(FPU registers[reg] * src); - else - FPU registers[reg] = (double)(FPU registers[reg] * src); - } - else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); - } - else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } - } - else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } - } - make_fpsr(FPU registers[reg]); - break; - default: - // Continue decode-execute 6888x instructions below - goto process_6888x_instructions; - } - fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); - dump_registers( "END "); - return; - } - - process_6888x_instructions: - switch (extra & 0x7f) { - case 0x00: /* FMOVE */ - fpu_debug(("FMOVE %.04f\n",(double)src)); - FPU registers[reg] = src; - make_fpsr(FPU registers[reg]); - break; - case 0x01: /* FINT */ - fpu_debug(("FINT %.04f\n",(double)src)); - FPU registers[reg] = toint(src); - make_fpsr(FPU registers[reg]); - break; - case 0x02: /* FSINH */ - fpu_debug(("FSINH %.04f\n",(double)src)); - FPU registers[reg] = fp_sinh (src); - make_fpsr(FPU registers[reg]); - break; - case 0x03: /* FINTRZ */ - fpu_debug(("FINTRZ %.04f\n",(double)src)); - FPU registers[reg] = fp_round_to_zero(src); - make_fpsr(FPU registers[reg]); - break; - case 0x04: /* FSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = fp_sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x06: /* FLOGNP1 */ - fpu_debug(("FLOGNP1 %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src + 1.0); - make_fpsr(FPU registers[reg]); - break; - case 0x08: /* FETOXM1 */ - fpu_debug(("FETOXM1 %.04f\n",(double)src)); - FPU registers[reg] = fp_exp (src) - 1.0; - make_fpsr(FPU registers[reg]); - break; - case 0x09: /* FTANH */ - fpu_debug(("FTANH %.04f\n",(double)src)); - FPU registers[reg] = fp_tanh (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0a: /* FATAN */ - fpu_debug(("FATAN %.04f\n",(double)src)); - FPU registers[reg] = fp_atan (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0c: /* FASIN */ - fpu_debug(("FASIN %.04f\n",(double)src)); - FPU registers[reg] = fp_asin (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0d: /* FATANH */ - fpu_debug(("FATANH %.04f\n",(double)src)); - FPU registers[reg] = fp_atanh (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0e: /* FSIN */ - fpu_debug(("FSIN %.04f\n",(double)src)); - FPU registers[reg] = fp_sin (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0f: /* FTAN */ - fpu_debug(("FTAN %.04f\n",(double)src)); - FPU registers[reg] = fp_tan (src); - make_fpsr(FPU registers[reg]); - break; - case 0x10: /* FETOX */ - fpu_debug(("FETOX %.04f\n",(double)src)); - FPU registers[reg] = fp_exp (src); - make_fpsr(FPU registers[reg]); - break; - case 0x11: /* FTWOTOX */ - fpu_debug(("FTWOTOX %.04f\n",(double)src)); - FPU registers[reg] = fp_pow(2.0, src); - make_fpsr(FPU registers[reg]); - break; - case 0x12: /* FTENTOX */ - fpu_debug(("FTENTOX %.04f\n",(double)src)); - FPU registers[reg] = fp_pow(10.0, src); - make_fpsr(FPU registers[reg]); - break; - case 0x14: /* FLOGN */ - fpu_debug(("FLOGN %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src); - make_fpsr(FPU registers[reg]); - break; - case 0x15: /* FLOG10 */ - fpu_debug(("FLOG10 %.04f\n",(double)src)); - FPU registers[reg] = fp_log10 (src); - make_fpsr(FPU registers[reg]); - break; - case 0x16: /* FLOG2 */ - fpu_debug(("FLOG2 %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src) / fp_log (2.0); - make_fpsr(FPU registers[reg]); - break; - case 0x18: /* FABS */ - fpu_debug(("FABS %.04f\n",(double)src)); - FPU registers[reg] = fp_fabs(src); - make_fpsr(FPU registers[reg]); - break; - case 0x19: /* FCOSH */ - fpu_debug(("FCOSH %.04f\n",(double)src)); - FPU registers[reg] = fp_cosh(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1a: /* FNEG */ - fpu_debug(("FNEG %.04f\n",(double)src)); - FPU registers[reg] = -src; - make_fpsr(FPU registers[reg]); - break; - case 0x1c: /* FACOS */ - fpu_debug(("FACOS %.04f\n",(double)src)); - FPU registers[reg] = fp_acos(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1d: /* FCOS */ - fpu_debug(("FCOS %.04f\n",(double)src)); - FPU registers[reg] = fp_cos(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1e: /* FGETEXP */ - fpu_debug(("FGETEXP %.04f\n",(double)src)); - if( isinf(src) ) { - make_nan( FPU registers[reg] ); - } - else { - FPU registers[reg] = fast_fgetexp( src ); - } - make_fpsr(FPU registers[reg]); - break; - case 0x1f: /* FGETMAN */ - fpu_debug(("FGETMAN %.04f\n",(double)src)); - if( src == 0 ) { - FPU registers[reg] = 0; - } - else if( isinf(src) ) { - make_nan( FPU registers[reg] ); - } - else { - FPU registers[reg] = src; - fast_remove_exponent( FPU registers[reg] ); - } - make_fpsr(FPU registers[reg]); - break; - case 0x20: /* FDIV */ - fpu_debug(("FDIV %.04f\n",(double)src)); - FPU registers[reg] /= src; - make_fpsr(FPU registers[reg]); - break; - case 0x21: /* FMOD */ - fpu_debug(("FMOD %.04f\n",(double)src)); - // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; - { - fpu_register quot = fp_round_to_zero(FPU registers[reg] / src); - uae_u32 sign = get_quotient_sign(FPU registers[reg],src); - FPU registers[reg] = FPU registers[reg] - quot * src; - make_fpsr(FPU registers[reg]); - make_quotient(quot, sign); - } - break; - case 0x23: /* FMUL */ - fpu_debug(("FMUL %.04f\n",(double)src)); - get_dest_flags(FPU registers[reg]); - get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { - FPU registers[reg] *= src; - } - else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); - } - else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } - } - else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } - } - make_fpsr(FPU registers[reg]); - break; - case 0x24: /* FSGLDIV */ - fpu_debug(("FSGLDIV %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] / src); - make_fpsr(FPU registers[reg]); - break; - case 0x25: /* FREM */ - fpu_debug(("FREM %.04f\n",(double)src)); - // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; - { - fpu_register quot = fp_round_to_nearest(FPU registers[reg] / src); - uae_u32 sign = get_quotient_sign(FPU registers[reg],src); - FPU registers[reg] = FPU registers[reg] - quot * src; - make_fpsr(FPU registers[reg]); - make_quotient(quot,sign); - } - break; - - case 0x26: /* FSCALE */ - fpu_debug(("FSCALE %.04f\n",(double)src)); - // TODO: overflow flags - get_dest_flags(FPU registers[reg]); - get_source_flags(src); - if (fl_source.in_range && fl_dest.in_range) { - // When the absolute value of the source operand is >= 2^14, - // an overflow or underflow always results. - // Here (int) cast is okay. - int scale_factor = (int)fp_round_to_zero(src); -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, FPU registers[reg], extended); - sxp->ieee.exponent += scale_factor; -#else - fp_declare_init_shape(sxp, FPU registers[reg], double); - uae_u32 exp = sxp->ieee.exponent + scale_factor; - if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) - exp = 0; - else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) - exp = FP_DOUBLE_EXP_MAX; - else - exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - sxp->ieee.exponent = exp; -#endif - } - else if (fl_source.infinity) { - // Returns NaN for any Infinity source - make_nan( FPU registers[reg] ); - } - make_fpsr(FPU registers[reg]); - break; - case 0x27: /* FSGLMUL */ - fpu_debug(("FSGLMUL %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] * src); - make_fpsr(FPU registers[reg]); - break; - case 0x28: /* FSUB */ - fpu_debug(("FSUB %.04f\n",(double)src)); - FPU registers[reg] -= src; - make_fpsr(FPU registers[reg]); - break; - case 0x22: /* FADD */ - fpu_debug(("FADD %.04f\n",(double)src)); - FPU registers[reg] += src; - make_fpsr(FPU registers[reg]); - break; - case 0x30: /* FSINCOS */ - case 0x31: - case 0x32: - case 0x33: - case 0x34: - case 0x35: - case 0x36: - case 0x37: - fpu_debug(("FSINCOS %.04f\n",(double)src)); - // Cosine must be calculated first if same register - FPU registers[extra & 7] = fp_cos(src); - FPU registers[reg] = fp_sin (src); - // Set FPU fpsr according to the sine result - make_fpsr(FPU registers[reg]); - break; - case 0x38: /* FCMP */ - fpu_debug(("FCMP %.04f\n",(double)src)); - set_fpsr(0); - make_fpsr(FPU registers[reg] - src); - break; - case 0x3a: /* FTST */ - fpu_debug(("FTST %.04f\n",(double)src)); - set_fpsr(0); - make_fpsr(src); - break; - default: - fpu_debug(("ILLEGAL F OP %X\n",opcode)); - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - break; - } - fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); - dump_registers( "END "); - return; - } - - fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); -} - -/* -------------------------- Initialization -------------------------- */ - -PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 - -PUBLIC void FFPU fpu_init (bool integral_68040) -{ - fpu_debug(("fpu_init\n")); - - static bool initialized_lookup_tables = false; - if (!initialized_lookup_tables) { - fpu_init_native_fflags(); - fpu_init_native_exceptions(); - fpu_init_native_accrued_exceptions(); - initialized_lookup_tables = true; - } - - FPU is_integral = integral_68040; - FPU instruction_address = 0; - FPU fpsr.quotient = 0; - set_fpcr(0); - set_fpsr(0); - -#if defined(FPU_USE_X86_ROUNDING) - // Initial state after boot, reset and frestore(null frame) - x86_control_word = CW_INITIAL; -#elif defined(USE_X87_ASSEMBLY) - volatile unsigned short int cw; - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - cw &= ~0x0300; cw |= 0x0300; // CW_PC_EXTENDED - cw &= ~0x0C00; cw |= 0x0000; // CW_RC_NEAR - __asm__ __volatile__("fldcw %0" : : "m" (cw)); -#endif - - FPU result = 1; - - for (int i = 0; i < 8; i++) - make_nan(FPU registers[i]); -} - -PUBLIC void FFPU fpu_exit (void) -{ - fpu_debug(("fpu_exit\n")); -} - -PUBLIC void FFPU fpu_reset (void) -{ - fpu_debug(("fpu_reset\n")); - fpu_exit(); - fpu_init(FPU is_integral); -} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h deleted file mode 100644 index 895019569..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h +++ /dev/null @@ -1,149 +0,0 @@ -/* - * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_IEEE_H -#define FPU_IEEE_H - -/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -// Lauri-- full words to avoid partial register stalls. -struct double_flags { - uae_u32 in_range; - uae_u32 zero; - uae_u32 infinity; - uae_u32 nan; - uae_u32 negative; -}; -PRIVATE double_flags fl_source; -PRIVATE double_flags fl_dest; -PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); -PRIVATE inline void FFPU get_source_flags(fpu_register const & r); - -PRIVATE inline void FFPU make_nan(fpu_register & r); -PRIVATE inline void FFPU make_zero_positive(fpu_register & r); -PRIVATE inline void FFPU make_zero_negative(fpu_register & r); -PRIVATE inline void FFPU make_inf_positive(fpu_register & r); -PRIVATE inline void FFPU make_inf_negative(fpu_register & r); - -PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); -PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); - -// May be optimized for particular processors -#ifndef FPU_USE_NATIVE_FLAGS -PRIVATE inline void FFPU make_fpsr(fpu_register const & r); -#endif - -// Normalize to range 1..2 -PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); - -// The sign of the quotient is the exclusive-OR of the sign bits -// of the source and destination operands. -PRIVATE inline uae_u32 FFPU get_quotient_sign( - fpu_register const & ra, fpu_register const & rb -); - -// Quotient Byte is loaded with the sign and least significant -// seven bits of the quotient. -PRIVATE inline void FFPU make_quotient( - fpu_register const & quotient, uae_u32 sign -); - -// to_single -PRIVATE inline fpu_register FFPU make_single( - uae_u32 value -); - -// from_single -PRIVATE inline uae_u32 FFPU extract_single( - fpu_register const & src -); - -// to_exten -PRIVATE inline fpu_register FFPU make_extended( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 -); - -/* - Would be so much easier with full size floats :( - ... this is so vague. -*/ -// to_exten_no_normalize -PRIVATE inline void FFPU make_extended_no_normalize( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result -); - -// from_exten -PRIVATE inline void FFPU extract_extended(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -); - -// to_double -PRIVATE inline fpu_register FFPU make_double( - uae_u32 wrd1, uae_u32 wrd2 -); - -// from_double -PRIVATE inline void FFPU extract_double(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2 -); - -PRIVATE inline fpu_register FFPU make_packed( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 -); - -PRIVATE inline void FFPU extract_packed( - fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -); - -PRIVATE inline int FFPU get_fp_value( - uae_u32 opcode, uae_u16 extra, fpu_register & src -); - -PRIVATE inline int FFPU put_fp_value( - uae_u32 opcode, uae_u16 extra, fpu_register const & value -); - -PRIVATE inline int FFPU get_fp_ad( - uae_u32 opcode, uae_u32 * ad -); - -PRIVATE inline int FFPU fpp_cond( - int condition -); - -#endif /* FPU_IEEE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp deleted file mode 100644 index 70e590860..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp +++ /dev/null @@ -1,6126 +0,0 @@ -/* - * fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Based on UAE FPU, original copyright 1996 Herman ten Brugge, - * rewritten for x86 by Lauri Pesonen 1999-2000, - * accomodated to GCC's Extended Asm syntax by Gwenole Beauchesne 2000. - * - * 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 - * - * - * Interface - * Almost the same as original. Please see the comments in "fpu.h". - * - * - * Why assembly? - * The reason is not really speed, but to get infinities, - * NANs and flags finally working. - * - * - * How to maintain Mac and x86 FPU flags -- plan B - * - * regs.piar is not updated. - * - * regs.FPU fpcr always contains the real 68881/68040 control word. - * - * regs.FPU fpsr is not kept up-to-date, for efficiency reasons. - * Most of the FPU commands update this in a way or another, but it is not - * read nearly that often. Therefore, three host-specific words hold the - * status byte and exception byte ("x86_status_word"), accrued exception - * byte ("x86_status_word_accrued") and the quotient byte ("FPU fpsr.quotient"), - * as explained below. - * - * CONDITION CODE - QUOTIENT - EXCEPTION STATUS - ACCRUED EXCEPTION - * CONDITION CODE (N,Z,I,NAN) - * - updated after each opcode, if needed. - * - x86 assembly opcodes call FXAM and store the status word to - * "x86_status_word". - * - When regs.FPU fpsr is actually used, the value of "x86_status_word" - * is translated. - * QUOTIENT BYTE - * - Updated by frem, fmod, frestore(null frame) - * - Stored in "FPU fpsr.quotient" in correct bit position, combined when - * regs.FPU fpsr is actually used. - * EXCEPTION STATUS (BSUN,SNAN,OPERR,OVFL,UNFL,DZ,INEX2,INEX1) - * - updated after each opcode, if needed. - * - Saved in x86 form in "x86_status_word". - * - When regs.FPU fpsr is actually used, the value of "x86_status_word" - * is translated. - * - Only fcc_op can set BSUN - * ACCRUED EXCEPTION (ACCR_IOP,ACCR_OVFL,ACCR_UNFL,ACCR_DZ,ACCR_INEX) - * - updated after each opcode, if needed. - * - Logically OR'ed in x86 form to "x86_status_word_accrued". - * - When regs.FPU fpsr is actually used, the value of - * "x86_status_word_accrued" is translated. - * - * When "x86_status_word" and "x86_status_word_accrued" are stored, - * all pending x86 FPU exceptions are cleared, if there are any. - * - * Writing to "regs.FPU fpsr" reverse-maps to x86 status/exception values and - * stores the values in "x86_status_word", "x86_status_word_accrued" - * and "FPU fpsr.quotient". - * - * So, "x86_status_word" and "x86_status_word_accrued" are not in - * correct bit positions and have x86 values, but "FPU fpsr.quotient" is at - * correct position. - * - * Note that it does not matter that the reverse-mapping is not exact - * (both SW_IE and SW_DE are mapped to ACCR_IOP, but ACCR_IOP maps to - * SW_IE only), the MacOS always sees the correct exception bits. - * - * Also note the usage of the fake BSUN flag SW_FAKE_BSUN. If you change - * the x86 FPU code, you must make sure that you don't generate any FPU - * stack faults. - * - * - * x86 co-processor initialization: - * - * Bit Code Use - * 0 IM Invalid operation exception mask 1 Disabled - * 1 DM Denormalized operand exception mask 1 Disabled - * 2 ZM Zerodivide exception mask 1 Disabled - * 3 OM Overflow exception mask 1 Disabled - * 4 UM Underflow exception mask 1 Disabled - * 5 PM Precision exception mask 1 Disabled - * 6 - - - - - * 7 IEM Interrupt enable mask 0 Enabled - * 8 PC Precision control\ 1 - 64 bits - * 9 PC Precision control/ 1 / - * 10 RC Rounding control\ 0 - Nearest even - * 11 RC Rounding control/ 0 / - * 12 IC Infinity control 1 Affine - * 13 - - - - - * 14 - - - - - * 15 - - - - - * - * - * TODO: - * - Exceptions are not implemented. - * - All tbyte variables should be aligned to 16-byte boundaries. - * (for best efficiency). - * - FTRAPcc code looks like broken. - * - If USE_3_BIT_QUOTIENT is 0, exceptions should be checked after - * float -> int rounding (frem,fmod). - * - The speed can be greatly improved. Do this only after you are sure - * that there are no major bugs. - * - Support for big-endian byte order (but all assembly code needs to - * be rewritten anyway) - * I have some non-portable code like *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; - * Sorry about that, you need to change these. I could do it myself, but better - * not, I would have no way to test them out. - * I tried to mark all spots with a comment TODO_BIGENDIAN. - * - to_double() may need renormalization code. Or then again, maybe not. - * - Signaling NANs should be handled better. The current mapping of - * signaling nan exception to denormalized operand exception is only - * based on the idea that the (possible) handler sees that "something - * seriously wrong" and takes the same action. Should not really get (m)any - * of those since normalization is handled on to_exten() - * - */ - -#include -#include -#include -#include - -#include "sysdeps.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#define FPU_IMPLEMENTATION -#include "fpu/fpu.h" -#include "fpu/fpu_x86.h" -#include "fpu/fpu_x86_asm.h" - -/* Global FPU context */ -fpu_t fpu; - -/* -------------------------------------------------------------------------- */ -/* --- Native Support --- */ -/* -------------------------------------------------------------------------- */ - -#include "fpu/flags.h" -#include "fpu/exceptions.h" -#include "fpu/rounding.h" -#include "fpu/impl.h" - -#include "fpu/flags.cpp" -#include "fpu/exceptions.cpp" -#include "fpu/rounding.cpp" - -/* -------------------------------------------------------------------------- */ -/* --- Scopes Definition --- */ -/* -------------------------------------------------------------------------- */ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* ---------------------------- Compatibility ---------------------------- */ - -#define BYTE uint8 -#define WORD uint16 -#define DWORD uint32 -#define min(a, b) (((a) < (b)) ? (a) : (b)) - -/* ---------------------------- Configuration ---------------------------- */ - -/* -If USE_3_BIT_QUOTIENT is set to 1, FREM and FMOD use a faster version -with only 3 quotient bits (those provided by the x86 FPU). If set to 0, -they calculate the same 7 bits that m68k does. It seems (as for now) that -3 bits suffice for all Mac programs I have tried. - -If you decide that you need all 7 bits (USE_3_BIT_QUOTIENT is 0), -consider checking the host exception flags after FISTP (search for -"TODO:Quotient". The result may be too large to fit into a dword. -*/ -/* -gb-- I only tested the following configurations: - USE_3_BIT_QUOTIENT 1 -- still changes to apply if no 3-bit quotient - FPU_DEBUG 1 or 0 - USE_CONSISTENCY_CHECKING 0 - I3_ON_ILLEGAL_FPU_OP 0 -- and this won't change - I3_ON_FTRAPCC 0 -- and this won't change -*/ -#define USE_3_BIT_QUOTIENT 1 - -//#define FPU_DEBUG 0 -- now defined in "fpu/fpu.h" -#define USE_CONSISTENCY_CHECKING 0 - -#define I3_ON_ILLEGAL_FPU_OP 0 -#define I3_ON_FTRAPCC 0 - -/* ---------------------------- Debugging ---------------------------- */ - -PUBLIC void FFPU fpu_dump_registers(void) -{ - for (int i = 0; i < 8; i++){ - printf ("FP%d: %g ", i, fpu_get_register(i)); - if ((i & 3) == 3) - printf ("\n"); - } -} - -PUBLIC void FFPU fpu_dump_flags(void) -{ - printf ("N=%d Z=%d I=%d NAN=%d\n", - (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, - (get_fpsr() & FPSR_CCB_ZERO)!= 0, - (get_fpsr() & FPSR_CCB_INFINITY) != 0, - (get_fpsr() & FPSR_CCB_NAN) != 0); -} - -#include "debug.h" - -#if FPU_DEBUG -#undef __inline__ -#define __inline__ - -PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual) -{ - char bb[10]; - int32 i, bytes = min(actual,100); - - *b = 0; - for (i=0; i= 10) _ix = 0; - - sprintf( _s[_ix], "%.04f", (float)f ); - return( _s[_ix] ); -} - -PUBLIC void FFPU dump_registers(const char *s) -{ - char b[512]; - - sprintf( - b, - "%s: %s, %s, %s, %s, %s, %s, %s, %s\r\n", - s, - etos(FPU registers[0]), - etos(FPU registers[1]), - etos(FPU registers[2]), - etos(FPU registers[3]), - etos(FPU registers[4]), - etos(FPU registers[5]), - etos(FPU registers[6]), - etos(FPU registers[7]) - ); - D(bug((char*)b)); -} - -#else - -PUBLIC void FFPU dump_registers(const char *) -{ -} - -PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) -{ -} - -#endif - - -/* ---------------------------- FPU consistency ---------------------------- */ - -#if USE_CONSISTENCY_CHECKING -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) -{ -/* _asm { - FNSTSW checked_sw_atstart - } */ - __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_atstart)); -} - -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name) -{ - uae_u16 checked_sw_atend; -// _asm FNSTSW checked_sw_atend - __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_attend)); - char msg[256]; - - // Check for FPU stack overflows/underflows. - if( (checked_sw_atend & 0x3800) != (checked_sw_atstart & 0x3800) ) { - wsprintf( - msg, - "FPU stack leak at %s, %X, %X\r\n", - name, - (int)(checked_sw_atstart & 0x3800) >> 11, - (int)(checked_sw_atend & 0x3800) >> 11 - ); - OutputDebugString(msg); - } - - // Observe status mapping. - /* - if(checked_sw_atstart != 0x400 || checked_sw_atend != 0x400) { - wsprintf( - msg, "Op %s, x86_status_word before=%X, x86_status_word after=%X\r\n", - name, (int)checked_sw_atstart, (int)checked_sw_atend - ); - OutputDebugString(msg); - } - */ -} -#else -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) -{ -} - -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *) -{ -} -#endif - - -/* ---------------------------- Status byte ---------------------------- */ - -// Map x86 FXAM codes -> m68k fpu status byte -#define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) -#define SW_Z (SW_C3) -#define SW_I (SW_C0|SW_C2) -#define SW_NAN (SW_C0) -#define SW_FINITE (SW_C2) -#define SW_EMPTY_REGISTER (SW_C0|SW_C3) -#define SW_DENORMAL (SW_C2|SW_C3) -#define SW_UNSUPPORTED (0) -#define SW_N (SW_C1) - -// Initial state after boot, reset and frestore(null frame) -#define SW_INITIAL SW_FINITE - - -/* ---------------------------- Status functions ---------------------------- */ - -PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN () -{ - if( (x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN ) { - x86_status_word |= SW_FAKE_BSUN; - x86_status_word_accrued |= SW_IE; - } -} - -PRIVATE void __inline__ FFPU build_ex_status () -{ - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } -} - -// TODO_BIGENDIAN; all of these. -/* ---------------------------- Type functions ---------------------------- */ - -/* -When the FPU creates a NAN, the NAN always contains the same bit pattern -in the mantissa. All bits of the mantissa are ones for any precision. -When the user creates a NAN, any nonzero bit pattern can be stored in the mantissa. -*/ -PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f) -{ - // Make it non-signaling. - uae_u8 * p = (uae_u8 *) &f; - memset( p, 0xFF, sizeof(fpu_register) - 1 ); - p[9] = 0x7F; -} - -/* -For single- and double-precision infinities the fraction is a zero. -For extended-precision infinities, the mantissa’s MSB, the explicit -integer bit, can be either one or zero. -*/ -PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f) -{ - uae_u8 * p = (uae_u8 *) &f; - if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { - if ((*((uae_u32 *)&p[0]) == 0) && - ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) == 0)) - return(1); - } - return(0); -} - -PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f) -{ - uae_u8 * p = (uae_u8 *) &f; - if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { - if ((*((uae_u32 *)&p[0]) == 0) && - ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) != 0)) - return(1); - } - return(0); -} - -PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f) -{ - uae_u8 * p = (uae_u8 *) &f; - return *((uae_u32 *)p) == 0 && - *((uae_u32 *)&p[4]) == 0 && - ( *((uae_u16 *)&p[8]) & 0x7FFF ) == 0; -} - -PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f) -{ - uae_u8 * p = (uae_u8 *) &f; - memset( p, 0, sizeof(fpu_register)-2 ); - *((uae_u16 *)&p[8]) = 0x7FFF; -} - -PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f) -{ - uae_u8 * p = (uae_u8 *) &f; - memset( p, 0, sizeof(fpu_register)-2 ); - *((uae_u16 *)&p[8]) = 0xFFFF; -} - -PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) -{ - uae_u32 * const p = (uae_u32 *) &f; - memset( p, 0, sizeof(fpu_register) ); -} - -PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) -{ - uae_u32 * const p = (uae_u32 *) &f; - memset( p, 0, sizeof(fpu_register) ); - *((uae_u32 *)&p[4]) = 0x80000000; -} - -PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) -{ - uae_u8 * p = (uae_u8 *) &f; - return( (p[9] & 0x80) != 0 ); -} - - -/* ---------------------------- Conversions ---------------------------- */ - -PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - -/* _asm { - MOV ESI, [f] - FILD DWORD PTR [x] - FSTP TBYTE PTR [ESI] - } */ - - __asm__ __volatile__("fildl %1\n\tfstpt %0" : "=m" (f) : "m" (x)); - D(bug("signed_to_extended (%X) = %s\r\n",(int)x,etos(f))); - FPU_CONSISTENCY_CHECK_STOP("signed_to_extended"); -} - -PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - volatile uae_s32 tmp; - volatile WORD sw_temp; - -/* _asm { - MOV EDI, [f] - FLD TBYTE PTR [EDI] - FISTP DWORD PTR tmp - FNSTSW sw_temp - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fistpl %0\n" - "fnstsw %1\n" - : "=m" (tmp), "=m" (sw_temp) - : "m" (f) - ); - - if(sw_temp & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. - x86_status_word |= SW_IE; - x86_status_word_accrued |= SW_IE; - // Setting the value to zero might not be the right way to go, - // but I'll leave it like this for now. - tmp = 0; - } - if(sw_temp & SW_PE) { - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - } - - D(bug("extended_to_signed_32 (%s) = %X\r\n",etos(f),(int)tmp)); - FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_32"); - return tmp; -} - -PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - volatile uae_s16 tmp; - volatile WORD sw_temp; - -/* _asm { - MOV EDI, [f] - FLD TBYTE PTR [EDI] - FISTP WORD PTR tmp - FNSTSW sw_temp - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fistp %0\n" - "fnstsw %1\n" - : "=m" (tmp), "=m" (sw_temp) - : "m" (f) - ); - - if(sw_temp & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. - x86_status_word |= SW_IE; - x86_status_word_accrued |= SW_IE; - tmp = 0; - } - if(sw_temp & SW_PE) { - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - } - - D(bug("extended_to_signed_16 (%s) = %X\r\n",etos(f),(int)tmp)); - FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_16"); - return tmp; -} - -PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - volatile uae_s16 tmp; - volatile WORD sw_temp; - -/* _asm { - MOV EDI, [f] - FLD TBYTE PTR [EDI] - FISTP WORD PTR tmp - FNSTSW sw_temp - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fistp %0\n" - "fnstsw %1\n" - : "=m" (tmp), "=m" (sw_temp) - : "m" (f) - ); - - if(sw_temp & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. - x86_status_word |= SW_IE; - x86_status_word_accrued |= SW_IE; - tmp = 0; - } - if(sw_temp & SW_PE) { - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - } - - if(tmp > 127 || tmp < -128) { // OPERR - x86_status_word |= SW_IE; - x86_status_word_accrued |= SW_IE; - } - - D(bug("extended_to_signed_8 (%s) = %X\r\n",etos(f),(int)tmp)); - FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_8"); - return (uae_s8)tmp; -} - -PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - -/* _asm { - MOV EDI, [f] - FLD QWORD PTR [x] - FSTP TBYTE PTR [EDI] - } */ - - __asm__ __volatile__( - "fldl %1\n" - "fstpt %0\n" - : "=m" (f) - : "m" (x) - ); - - FPU_CONSISTENCY_CHECK_STOP("double_to_extended"); -} - -PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - double result; - -/* _asm { - MOV ESI, [f] - FLD TBYTE PTR [ESI] - FSTP QWORD PTR result - } */ - - __asm__ __volatile__( - "fldt %1\n" - "fstpl %0\n" - : "=m" (result) - : "m" (f) - ); - - FPU_CONSISTENCY_CHECK_STOP("extended_to_double"); - return result; -} - -PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [f] - FLD DWORD PTR src - FSTP TBYTE PTR [ESI] - } */ - - __asm__ __volatile__( - "flds %1\n" - "fstpt %0\n" - : "=m" (f) - : "m" (src) - ); - - D(bug("to_single (%X) = %s\r\n",src,etos(f))); - FPU_CONSISTENCY_CHECK_STOP("to_single"); -} - -// TODO_BIGENDIAN -PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - uae_u32 *p = (uae_u32 *)&f; - - uae_u32 sign = (wrd1 & 0x80000000) >> 16; - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - p[0] = wrd3; - p[1] = wrd2; - *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); - - D(bug("to_exten_no_normalize (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); - FPU_CONSISTENCY_CHECK_STOP("to_exten_no_normalize"); -} - -PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - uae_u32 *p = (uae_u32 *)&f; - - uae_u32 sign = (wrd1 & 0x80000000) >> 16; - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - - // The explicit integer bit is not set, must normalize. - // Don't do it for zeroes, infinities or nans. - if( (wrd2 & 0x80000000) == 0 && exp != 0 && exp != 0x7FFF ) { - D(bug("to_exten denormalized mantissa (%X,%X,%X)\r\n",wrd1,wrd2,wrd3)); - if( wrd2 | wrd3 ) { - // mantissa, not fraction. - uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; - while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { - man <<= 1; - exp--; - } - wrd2 = (uae_u32)( man >> 32 ); - wrd3 = (uae_u32)( man & 0xFFFFFFFF ); - if( exp == 0 || (wrd2 & 0x80000000) == 0 ) { - // underflow - wrd2 = wrd3 = exp = 0; - sign = 0; - } - } else { - if(exp != 0x7FFF && exp != 0) { - // Make a non-signaling nan. - exp = 0x7FFF; - sign = 0; - wrd2 = 0x80000000; - } - } - } - - p[0] = wrd3; - p[1] = wrd2; - *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); - - D(bug("to_exten (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); - FPU_CONSISTENCY_CHECK_STOP("to_exten"); -} - -PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - - // gb-- make GCC happy - union { - uae_u64 q; - uae_u32 l[2]; - } src; - - // Should renormalize if needed. I'm not sure that x86 and m68k FPU's - // do it the sama way. This should be extremely rare however. - // to_exten() is often called with denormalized values. - - src.l[0] = wrd2; - src.l[1] = wrd1; - -/* _asm { - FLD QWORD PTR src - MOV EDI, [f] - FSTP TBYTE PTR [EDI] - } */ - - __asm__ __volatile__( - "fldl %1\n" - "fstpt %0\n" - : "=m" (f) - : "m" (src.q) - ); - - D(bug("to_double (%X,%X) = %s\r\n",wrd1,wrd2,etos(f))); - FPU_CONSISTENCY_CHECK_STOP("to_double"); -} - -PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) -{ - FPU_CONSISTENCY_CHECK_START(); - volatile uae_u32 dest; - volatile WORD sw_temp; - -/* _asm { - MOV EDI, [f] - FLD TBYTE PTR [EDI] - FSTP DWORD PTR dest - FNSTSW sw_temp - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fstps %0\n" - "fnstsw %1\n" - : "=m" (dest), "=m" (sw_temp) - : "m" (f) - ); - - sw_temp &= SW_EXCEPTION_MASK; - if(sw_temp) { -// _asm FNCLEX - asm("fnclex"); - x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; - x86_status_word_accrued |= sw_temp; - } - - D(bug("from_single (%s) = %X\r\n",etos(f),dest)); - FPU_CONSISTENCY_CHECK_STOP("from_single"); - return dest; -} - -// TODO_BIGENDIAN -PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) -{ - FPU_CONSISTENCY_CHECK_START(); - uae_u32 *p = (uae_u32 *)&f; - *wrd3 = p[0]; - *wrd2 = p[1]; - *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; - - D(bug("from_exten (%s) = %X,%X,%X\r\n",etos(f),*wrd1,*wrd2,*wrd3)); - FPU_CONSISTENCY_CHECK_STOP("from_exten"); -} - -PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) -{ - FPU_CONSISTENCY_CHECK_START(); - volatile uae_u32 dest[2]; - volatile WORD sw_temp; - -/* _asm { - MOV EDI, [f] - FLD TBYTE PTR [EDI] - FSTP QWORD PTR dest - FNSTSW sw_temp - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fstpl %0\n" - "fnstsw %1\n" - : "=m" (dest), "=m" (sw_temp) - : "m" (f) - ); - - sw_temp &= SW_EXCEPTION_MASK; - if(sw_temp) { -// _asm FNCLEX - asm("fnclex"); - x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; - x86_status_word_accrued |= sw_temp; - } - - // TODO: There is a partial memory stall, nothing happens until FSTP retires. - // On PIII, could use MMX move w/o any penalty. - *wrd2 = dest[0]; - *wrd1 = dest[1]; - - D(bug("from_double (%s) = %X,%X\r\n",etos(f),dest[1],dest[0])); - FPU_CONSISTENCY_CHECK_STOP("from_double"); -} - -PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fmove"); -} - -/* -PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FSTP TBYTE PTR [EDI] - } - FPU_CONSISTENCY_CHECK_STOP("do_fmove_no_status"); -} -*/ - - -/* ---------------------------- Operations ---------------------------- */ - -PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FRNDINT - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "frndint\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fint"); -} - -PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - WORD cw_temp; - -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FSTCW cw_temp - and cw_temp, ~X86_ROUNDING_MODE - or cw_temp, CW_RC_ZERO - FLDCW cw_temp - FLD TBYTE PTR [ESI] - FRNDINT - FXAM - FNSTSW x86_status_word - FLDCW x86_control_word - FSTP TBYTE PTR [EDI] - } */ - - __asm__ __volatile__( - "fstcw %0\n" - "andl $(~X86_ROUNDING_MODE), %0\n" - "orl $CW_RC_ZERO, %0\n" - "fldcw %0\n" - "fldt %3\n" - "frndint\n" - "fxam \n" - "fnstsw %1\n" - "fldcw %4\n" - "fstpt %2\n" - : "+m" (cw_temp), "=m" (x86_status_word), "=m" (dest) - : "m" (src), "m" (x86_control_word) - ); - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fintrz"); -} - -PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FSQRT - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - - __asm__ __volatile__( - "fldt %2\n" - "fsqrt \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsqrt"); -} - -PRIVATE void FFPU do_ftst ( fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - FLD TBYTE PTR [ESI] - FXAM - FNSTSW x86_status_word - FSTP ST(0) - } */ - - __asm__ __volatile__( - "fldt %1\n" - "fxam \n" - "fnstsw %0\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word) - : "m" (src) - ); - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_ftst"); -} - -// These functions are calculated in 53 bits accuracy only. -// Exception checking is not complete. -PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = sinh(x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fsinh"); -} - -PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = log (x + 1.0); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_flognp1"); -} - -PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = exp (x) - 1.0; - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fetoxm1"); -} - -PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = tanh (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_ftanh"); -} - -PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = atan (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fatan"); -} - -PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = asin (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fasin"); -} - -PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = log ((1 + x) / (1 - x)) / 2; - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fatanh"); -} - -PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = exp (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fetox"); -} - -PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = pow(2.0, x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_ftwotox"); -} - -PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = pow(10.0, x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_ftentox"); -} - -PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = log (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_flogn"); -} - -PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = log10 (x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_flog10"); -} - -PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = log (x) / log (2.0); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_flog2"); -} - -PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = acos(x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_facos"); -} - -PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - double x, y; - x = extended_to_double( src ); - y = cosh(x); - double_to_extended( y, dest ); - do_ftst( dest ); - FPU_CONSISTENCY_CHECK_STOP("do_fcosh"); -} - -PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FSIN - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fsin \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsin"); -} - -// TODO: Should check for out-of-range condition (partial tangent) -PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FPTAN - FSTP ST(0) ; pop 1.0 (the 8087/287 compatibility thing) - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fptan \n" - "fstp %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE - SW_UE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_ftan"); -} - -PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FABS - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fabs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fabs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fabs"); -} - -PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FCHS - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fchs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fchs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fneg"); -} - -PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FCOS - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fcos \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fcos"); -} - -PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FXTRACT - FSTP ST(0) ; pop mantissa - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fxtract\n" - "fstp %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fgetexp"); -} - -PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FXTRACT - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) ; pop exponent - } */ - __asm__ __volatile__( - "fldt %2\n" - "fxtract\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fgetman"); -} - -PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fdiv %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdiv"); -} - -// The sign of the quotient is the exclusive-OR of the sign bits -// of the source and destination operands. -// Quotient Byte is loaded with the sign and least significant -// seven bits of the quotient. - -PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - - volatile uint16 status; - uae_u32 quot; -#if !USE_3_BIT_QUOTIENT - WORD cw_temp; -#endif - - uae_u8 * dest_p = (uae_u8 *)&dest; - uae_u8 * src_p = (uae_u8 *)&src; - uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; - -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - -#if !USE_3_BIT_QUOTIENT - MOV CX, x86_control_word - AND CX, ~X86_ROUNDING_MODE - OR CX, CW_RC_ZERO - MOV cw_temp, CX - FLDCW cw_temp - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FABS - FISTP DWORD PTR quot - FSTP ST(0) - FLDCW x86_control_word - // TODO:Quotient - // Should clear any possible exceptions here -#endif - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - -// loop until the remainder is not partial any more. -partial_loop: - FPREM - FNSTSW status - TEST status, SW_C2 - JNE partial_loop - - - FXAM - FNSTSW x86_status_word - - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - -#if !USE_3_BIT_QUOTIENT - - __asm__ __volatile__( - "movl %6, %%ecx\n" // %6: x86_control_word (read) - "andl $(~X86_ROUNDING_MODE), %%ecx\n" - "orl $CW_RC_ZERO, %%ecx\n" - "movl %%ecx, %0\n" // %0: cw_temp (read/write) - "fldcw %0\n" - "fldt %5\n" - "fldt %4\n" - "fdiv %%st(1), %%st(0)\n" - "fabs \n" - "fistpl %1\n" // %1: quot (read/write) - "fstp %%st(0)\n" - "fldcw %6\n" - "fldt %5\n" - "fldt %4\n" - "0:\n" // partial_loop - "fprem \n" - "fnstsw %2\n" // %2: status (read/write) - "testl $SW_C2, %2\n" - "jne 0b\n" - "fxam \n" - "fnstsw %3\n" // %3: x86_status_word (write) - "fstpt %4\n" - "fstp %%st(0)\n" - : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) - : "m" (src), "m" (x86_control_word) - : "ecx" - ); - -#else - - __asm__ __volatile__( - "fldt %3\n" - "fldt %2\n" - "0:\n" // partial_loop - "fprem \n" - "fnstsw %0\n" // %0: status (read/write) - "testl $SW_C2, %0\n" - "jne 0b\n" - "fxam \n" - "fnstsw %1\n" // %1: x86_status_word (write) - "fstpt %2\n" - "fstp %%st(0)\n" - : "+m" (status), "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - -#endif - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); - x86_status_word_accrued |= x86_status_word; - } - -#if USE_3_BIT_QUOTIENT - // SW_C1 Set to least significant bit of quotient (Q0). - // SW_C3 Set to bit 1 (Q1) of the quotient. - // SW_C0 Set to bit 2 (Q2) of the quotient. - quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); - FPU fpsr.quotient = (sign | quot) << 16; -#else - FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; -#endif - - FPU_CONSISTENCY_CHECK_STOP("do_fmod"); -} - -PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - - volatile uint16 status; - uae_u32 quot; -#if !USE_3_BIT_QUOTIENT - WORD cw_temp; -#endif - - uae_u8 * dest_p = (uae_u8 *)&dest; - uae_u8 * src_p = (uae_u8 *)&src; - uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; - -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - -#if !USE_3_BIT_QUOTIENT - MOV CX, x86_control_word - AND CX, ~X86_ROUNDING_MODE - OR CX, CW_RC_NEAR - MOV cw_temp, CX - FLDCW cw_temp - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FABS - FISTP DWORD PTR quot - FSTP ST(0) - FLDCW x86_control_word - // TODO:Quotient - // Should clear any possible exceptions here -#endif - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - -// loop until the remainder is not partial any more. -partial_loop: - FPREM1 - FNSTSW status - TEST status, SW_C2 - JNE partial_loop - - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - -#if !USE_3_BIT_QUOTIENT - - __asm__ __volatile__( - "movl %6, %%ecx\n" // %6: x86_control_word (read) - "andl $(~X86_ROUNDING_MODE), %%ecx\n" - "orl $CW_RC_NEAR, %%ecx\n" - "movl %%ecx, %0\n" // %0: cw_temp (read/write) - "fldcw %0\n" - "fldt %5\n" - "fldt %4\n" - "fdiv %%st(1), %%st(0)\n" - "fabs \n" - "fistpl %1\n" // %1: quot (read/write) - "fstp %%st(0)\n" - "fldcw %6\n" - "fldt %5\n" - "fldt %4\n" - "0:\n" // partial_loop - "fprem1 \n" - "fnstsw %2\n" // %2: status (read/write) - "testl $SW_C2, %2\n" - "jne 0b\n" - "fxam \n" - "fnstsw %3\n" // %3: x86_status_word (write) - "fstpt %4\n" - "fstp %%st(0)\n" - : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) - : "m" (src), "m" (x86_control_word) - : "ecx" - ); - -#else - - __asm__ __volatile__( - "fldt %3\n" - "fldt %2\n" - "0:\n" // partial_loop - "fprem1 \n" - "fnstsw %0\n" // %0: status (read/write) - "testl $SW_C2, %0\n" - "jne 0b\n" - "fxam \n" - "fnstsw %1\n" // %1: x86_status_word (write) - "fstpt %2\n" - "fstp %%st(0)\n" - : "+m" (status), "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - -#endif - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); - x86_status_word_accrued |= x86_status_word; - } - -#if USE_3_BIT_QUOTIENT - // SW_C1 Set to least significant bit of quotient (Q0). - // SW_C3 Set to bit 1 (Q1) of the quotient. - // SW_C0 Set to bit 2 (Q2) of the quotient. - quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); - FPU fpsr.quotient = (sign | quot) << 16; -#else - FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; -#endif - - FPU_CONSISTENCY_CHECK_STOP("do_frem"); -} - -// Faster versions. The current rounding mode is already correct. -#if !USE_3_BIT_QUOTIENT -PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - - volatile uint16 status; - uae_u32 quot; - - uae_u8 * dest_p = (uae_u8 *)&dest; - uae_u8 * src_p = (uae_u8 *)&src; - uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; - - _asm { - MOV ESI, [src] - MOV EDI, [dest] - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FABS - FISTP DWORD PTR quot - FSTP ST(0) - // TODO:Quotient - // Should clear any possible exceptions here - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - -// loop until the remainder is not partial any more. -partial_loop: - FPREM - FNSTSW status - TEST status, SW_C2 - JNE partial_loop - - FXAM - FNSTSW x86_status_word - - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } - if(x86_status_word & SW_EXCEPTION_MASK) { - _asm FNCLEX - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); - x86_status_word_accrued |= x86_status_word; - } - FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; - FPU_CONSISTENCY_CHECK_STOP("do_fmod_dont_set_cw"); -} - -PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - - volatile uint16 status; - uae_u32 quot; - - uae_u8 * dest_p = (uae_u8 *)&dest; - uae_u8 * src_p = (uae_u8 *)&src; - uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; - - _asm { - MOV ESI, [src] - MOV EDI, [dest] - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FABS - FISTP DWORD PTR quot - FSTP ST(0) - // TODO:Quotient - // Should clear any possible exceptions here - - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - -// loop until the remainder is not partial any more. -partial_loop: - FPREM1 - FNSTSW status - TEST status, SW_C2 - JNE partial_loop - - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } - if(x86_status_word & SW_EXCEPTION_MASK) { - _asm FNCLEX - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); - x86_status_word_accrued |= x86_status_word; - } - FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; - FPU_CONSISTENCY_CHECK_STOP("do_frem_dont_set_cw"); -} -#endif //USE_3_BIT_QUOTIENT - -PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FADD - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fadd \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fadd"); -} - -PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FMUL - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fmul \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fmul"); -} - -PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - WORD cw_temp; -/* _asm { - FSTCW cw_temp - and cw_temp, ~X86_ROUNDING_PRECISION - or cw_temp, PRECISION_CONTROL_SINGLE - FLDCW cw_temp - - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FDIV ST(0),ST(1) - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - FLDCW x86_control_word - } */ - __asm__ __volatile__( - "fstcw %0\n" - "andl $(~X86_ROUNDING_PRECISION), %0\n" - "orl $PRECISION_CONTROL_SINGLE, %0\n" - "fldcw %0\n" - "fldt %3\n" - "fldt %2\n" - "fdiv %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %1\n" - "fstpt %2\n" - "fstp %%st(0)\n" - "fldcw %4\n" - : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) - : "m" (src), "m" (x86_control_word) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsgldiv"); -} - -PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FSCALE - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fscale \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_UE - SW_OE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fscale"); -} - -PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - WORD cw_temp; - -/* _asm { - FSTCW cw_temp - and cw_temp, ~X86_ROUNDING_PRECISION - or cw_temp, PRECISION_CONTROL_SINGLE - FLDCW cw_temp - - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FMUL - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - - FLDCW x86_control_word - } */ - __asm__ __volatile__( - "fstcw %0\n" - "andl $(~X86_ROUNDING_PRECISION), %0\n" - "orl $PRECISION_CONTROL_SINGLE, %0\n" - "fldcw %0\n" - "fldt %3\n" - "fldt %2\n" - "fmul \n" - "fxam \n" - "fnstsw %1\n" - "fstpt %2\n" - "fldcw %4\n" - : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) - : "m" (src), "m" (x86_status_word) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsglmul"); -} - -PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FSUB ST(0),ST(1) - FXAM - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fsub %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsub"); -} - -PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest_cos] - FLD TBYTE PTR [ESI] - FSINCOS - FSTP TBYTE PTR [EDI] - FXAM - MOV EDI, [dest_sin] - FNSTSW x86_status_word - FSTP TBYTE PTR [EDI] - FSTP ST(0) - } */ - __asm__ __volatile__( - "fldt %3\n" - "fsincos\n" - "fstpt %1\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %2\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "=m" (dest_cos), "=m" (dest_sin) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsincos"); -} - -PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - MOV ESI, [src] - MOV EDI, [dest] - FLD TBYTE PTR [ESI] - FLD TBYTE PTR [EDI] - FSUB ST(0),ST(1) - FXAM - FNSTSW x86_status_word - FSTP ST(0) - FSTP ST(0) - } */ - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fsub %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstp %%st(0)\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word) - : "m" (dest), "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fcmp"); -} - -// More or less original. Should be reviewed. -PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - FPU_CONSISTENCY_CHECK_START(); - - double d; - char *cp; - char str[100]; - - cp = str; - if (wrd1 & 0x80000000) - *cp++ = '-'; - *cp++ = (char)((wrd1 & 0xf) + '0'); - *cp++ = '.'; - *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); - *cp++ = 'E'; - if (wrd1 & 0x40000000) - *cp++ = '-'; - *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); - *cp = 0; - sscanf(str, "%le", &d); - - D(bug("to_pack str = %s\r\n",str)); - - D(bug("to_pack(%X,%X,%X) = %.04f\r\n",wrd1,wrd2,wrd3,(float)d)); - - FPU_CONSISTENCY_CHECK_STOP("to_pack"); - - return d; -} - -// More or less original. Should be reviewed. -PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) -{ - FPU_CONSISTENCY_CHECK_START(); - - int i; - int t; - char *cp; - char str[100]; - int exponent_digit_count = 0; - - sprintf(str, "%.16e", src); - - D(bug("from_pack(%.04f,%s)\r\n",(float)src,str)); - - cp = str; - *wrd1 = *wrd2 = *wrd3 = 0; - if (*cp == '-') { - cp++; - *wrd1 = 0x80000000; - } - if (*cp == '+') - cp++; - *wrd1 |= (*cp++ - '0'); - if (*cp == '.') - cp++; - for (i = 0; i < 8; i++) { - *wrd2 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd2 |= *cp++ - '0'; - } - for (i = 0; i < 8; i++) { - *wrd3 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd3 |= *cp++ - '0'; - } - if (*cp == 'e' || *cp == 'E') { - cp++; - if (*cp == '-') { - cp++; - *wrd1 |= 0x40000000; - } - if (*cp == '+') - cp++; - t = 0; - for (i = 0; i < 3; i++) { - if (*cp >= '0' && *cp <= '9') { - t = (t << 4) | (*cp++ - '0'); - exponent_digit_count++; - } - } - *wrd1 |= t << 16; - } - - D(bug("from_pack(%.04f) = %X,%X,%X\r\n",(float)src,*wrd1,*wrd2,*wrd3)); - - WORD sw_temp; -// _asm FNSTSW sw_temp - __asm__ __volatile__("fnstsw %0" : "=m" (sw_temp)); - if(sw_temp & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - if(sw_temp & SW_PE) { - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - } - - /* - OPERR is set if the k-factor > + 17 or the magnitude of - the decimal exponent exceeds three digits; - cleared otherwise. - */ - if(exponent_digit_count > 3) { - x86_status_word |= SW_IE; - x86_status_word_accrued |= SW_IE; - } - - FPU_CONSISTENCY_CHECK_STOP("from_pack"); -} - -PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) -{ - static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // D(bug("get_fp_value(%X,%X)\r\n",(int)opcode,(int)extra)); - // dump_first_bytes( regs.pc_p-4, 16 ); - - if ((extra & 0x4000) == 0) { - memcpy( &src, &FPU registers[(extra >> 10) & 7], sizeof(fpu_register) ); -// do_fmove_no_status( src, FPU registers[(extra >> 10) & 7] ); - return 1; - } - - int mode = (opcode >> 3) & 7; - int reg = opcode & 7; - int size = (extra >> 10) & 7; - uae_u32 ad = 0; - - // D(bug("get_fp_value mode=%d, reg=%d, size=%d\r\n",(int)mode,(int)reg,(int)size)); - - switch ((uae_u8)mode) { - case 0: - switch ((uae_u8)size) { - case 6: - signed_to_extended( (uae_s32)(uae_s8) m68k_dreg (regs, reg), src ); - break; - case 4: - signed_to_extended( (uae_s32)(uae_s16) m68k_dreg (regs, reg), src ); - break; - case 0: - signed_to_extended( (uae_s32) m68k_dreg (regs, reg), src ); - break; - case 1: - to_single( m68k_dreg (regs, reg), src ); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch ((uae_u8)reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: { - uaecptr tmppc = m68k_getpc (); - uae_u16 tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - } - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - - /* - +0000 000004 FSCALE.B #$01,FP2 | F23C 5926 0001 - F23C 1111001000111100 - 5926 0101100100100110 - 0001 0000000000000001 - mode = 7 - reg = 4 - size = 6 - */ - // Immediate addressing mode && Operation Length == Byte -> - // Use the low-order byte of the extension word. - - if(size == 6) ad++; - - // May be faster on a PII(I), sz2[size] is already in register - // ad += sz2[size] - sz1[size]; - - break; - default: - return 0; - } - } - - switch ((uae_u8)size) { - case 0: - signed_to_extended( (uae_s32) get_long (ad), src ); - break; - case 1: - to_single( get_long (ad), src ); - break; - - case 2:{ - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - to_exten( wrd1, wrd2, wrd3, src ); - } - break; - case 3:{ - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - double_to_extended( to_pack(wrd1, wrd2, wrd3), src ); - } - break; - case 4: - signed_to_extended( (uae_s32)(uae_s16) get_word(ad), src ); - break; - case 5:{ - uae_u32 wrd1, wrd2; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - to_double(wrd1, wrd2, src); - } - break; - case 6: - signed_to_extended( (uae_s32)(uae_s8) get_byte(ad), src ); - break; - default: - return 0; - } - - // D(bug("get_fp_value result = %.04f\r\n",(float)src)); - - return 1; -} - -PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) -{ - static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // D(bug("put_fp_value(%.04f,%X,%X)\r\n",(float)value,(int)opcode,(int)extra)); - - if ((extra & 0x4000) == 0) { - int dest_reg = (extra >> 10) & 7; - do_fmove( FPU registers[dest_reg], value ); - build_ex_status(); - return 1; - } - - int mode = (opcode >> 3) & 7; - int reg = opcode & 7; - int size = (extra >> 10) & 7; - uae_u32 ad = 0xffffffff; - - // Clear exception status - x86_status_word &= ~SW_EXCEPTION_MASK; - - switch ((uae_u8)mode) { - case 0: - switch ((uae_u8)size) { - case 6: - *((uae_u8 *)&m68k_dreg(regs, reg)) = extended_to_signed_8(value); - break; - case 4: - // TODO_BIGENDIAN - *((uae_u16 *)&m68k_dreg(regs, reg)) = extended_to_signed_16(value); - break; - case 0: - m68k_dreg (regs, reg) = extended_to_signed_32(value); - break; - case 1: - m68k_dreg (regs, reg) = from_single(value); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch ((uae_u8)reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: { - uaecptr tmppc = m68k_getpc (); - uae_u16 tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - } - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - break; - default: - return 0; - } - } - switch ((uae_u8)size) { - case 0: - put_long (ad, (uae_s32) extended_to_signed_32(value)); - break; - case 1: - put_long (ad, from_single(value)); - break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - from_exten(value, &wrd1, &wrd2, &wrd3); - - x86_status_word &= ~SW_EXCEPTION_MASK; - if(wrd3) { // TODO: not correct! Just a "smart" guess. - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - } - break; - case 3: { - uae_u32 wrd1, wrd2, wrd3; - from_pack(extended_to_double(value), &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - } - break; - case 4: - put_word(ad, extended_to_signed_16(value)); - break; - case 5:{ - uae_u32 wrd1, wrd2; - from_double(value, &wrd1, &wrd2); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - } - break; - case 6: - put_byte(ad, extended_to_signed_8(value)); - - break; - default: - return 0; - } - return 1; -} - -PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) -{ - int mode = (opcode >> 3) & 7; - int reg = opcode & 7; - switch ( (uae_u8)mode ) { - case 0: - case 1: - if( (opcode & 0xFF00) == 0xF300 ) { - // fsave, frestore - m68k_setpc (m68k_getpc () - 2); - } else { - m68k_setpc (m68k_getpc () - 4); - } - op_illg (opcode); - dump_registers( "END "); - return 0; - case 2: - *ad = m68k_areg (regs, reg); - break; - case 3: - *ad = m68k_areg (regs, reg); - break; - case 4: - *ad = m68k_areg (regs, reg); - break; - case 5: - *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch ( (uae_u8)reg ) { - case 0: - *ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - *ad = next_ilong(); - break; - case 2: - *ad = m68k_getpc (); - *ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: { - uaecptr tmppc = m68k_getpc (); - uae_u16 tmp = (uae_u16)next_iword(); - *ad = get_disp_ea_020 (tmppc, tmp); - } - break; - default: - if( (opcode & 0xFF00) == 0xF300 ) { - // fsave, frestore - m68k_setpc (m68k_getpc () - 2); - } else { - m68k_setpc (m68k_getpc () - 4); - } - op_illg (opcode); - dump_registers( "END "); - return 0; - } - } - return 1; -} - -#if FPU_DEBUG -#define CONDRET(s,x) D(bug("fpp_cond %s = %d\r\n",s,(uint32)(x))); return (x) -#else -#define CONDRET(s,x) return (x) -#endif - -PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) -{ - -#define N (x86_status_word & SW_N) -#define Z ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_Z) -#define I ((x86_status_word & (SW_Z_I_NAN_MASK)) == (SW_I)) -#define NotANumber ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN) - - switch (condition) { - // Common Tests, no BSUN - case 0x01: - CONDRET("Equal",Z); - case 0x0e: - CONDRET("Not Equal",!Z); - - // IEEE Nonaware Tests, BSUN - case 0x12: - SET_BSUN_ON_NAN(); - CONDRET("Greater Than",!(NotANumber || Z || N)); - case 0x1d: - SET_BSUN_ON_NAN(); - CONDRET("Not Greater Than",NotANumber || Z || N); - case 0x13: - SET_BSUN_ON_NAN(); - CONDRET("Greater Than or Equal",Z || !(NotANumber || N)); - case 0x1c: - SET_BSUN_ON_NAN(); - CONDRET("Not Greater Than or Equal",!Z && (NotANumber || N)); - case 0x14: - SET_BSUN_ON_NAN(); - CONDRET("Less Than",N && !(NotANumber || Z)); - case 0x1b: - SET_BSUN_ON_NAN(); - CONDRET("Not Less Than",NotANumber || Z || !N); - case 0x15: - SET_BSUN_ON_NAN(); - CONDRET("Less Than or Equal",Z || (N && !NotANumber)); - case 0x1a: - SET_BSUN_ON_NAN(); - CONDRET("Not Less Than or Equal",NotANumber || !(N || Z)); - case 0x16: - SET_BSUN_ON_NAN(); - CONDRET("Greater or Less Than",!(NotANumber || Z)); - case 0x19: - SET_BSUN_ON_NAN(); - CONDRET("Not Greater or Less Than",NotANumber || Z); - case 0x17: - CONDRET("Greater, Less or Equal",!NotANumber); - case 0x18: - SET_BSUN_ON_NAN(); - CONDRET("Not Greater, Less or Equal",NotANumber); - - // IEEE Aware Tests, no BSUN - case 0x02: - CONDRET("Ordered Greater Than",!(NotANumber || Z || N)); - case 0x0d: - CONDRET("Unordered or Less or Equal",NotANumber || Z || N); - case 0x03: - CONDRET("Ordered Greater Than or Equal",Z || !(NotANumber || N)); - case 0x0c: - CONDRET("Unordered or Less Than",NotANumber || (N && !Z)); - case 0x04: - CONDRET("Ordered Less Than",N && !(NotANumber || Z)); - case 0x0b: - CONDRET("Unordered or Greater or Equal",NotANumber || Z || !N); - case 0x05: - CONDRET("Ordered Less Than or Equal",Z || (N && !NotANumber)); - case 0x0a: - CONDRET("Unordered or Greater Than",NotANumber || !(N || Z)); - case 0x06: - CONDRET("Ordered Greater or Less Than",!(NotANumber || Z)); - case 0x09: - CONDRET("Unordered or Equal",NotANumber || Z); - case 0x07: - CONDRET("Ordered",!NotANumber); - case 0x08: - CONDRET("Unordered",NotANumber); - - // Miscellaneous Tests, no BSUN - case 0x00: - CONDRET("False",0); - case 0x0f: - CONDRET("True",1); - - // Miscellaneous Tests, BSUN - case 0x10: - SET_BSUN_ON_NAN(); - CONDRET("Signaling False",0); - case 0x1f: - SET_BSUN_ON_NAN(); - CONDRET("Signaling True",1); - case 0x11: - SET_BSUN_ON_NAN(); - CONDRET("Signaling Equal",Z); - case 0x1e: - SET_BSUN_ON_NAN(); - CONDRET("Signaling Not Equal",!Z); - } - CONDRET("",-1); - -#undef N -#undef Z -#undef I -#undef NotANumber - -} - -PUBLIC void REGPARAM2 FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) -{ - uaecptr pc = (uae_u32) m68k_getpc (); - uae_s32 disp = (uae_s32) (uae_s16) next_iword(); - int cc; - - D(bug("fdbcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - cc = fpp_cond(opcode, extra & 0x3f); - if (cc < 0) { - m68k_setpc (pc - 4); - op_illg (opcode); - } else if (!cc) { - int reg = opcode & 0x7; - - // TODO_BIGENDIAN - uae_u16 newv = (uae_u16)(m68k_dreg (regs, reg) & 0xffff) - 1; - *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; - - if (newv != 0xffff) - m68k_setpc (pc + disp); - } -} - -PUBLIC void REGPARAM2 FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) -{ - uae_u32 ad; - int cc; - - D(bug("fscc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - cc = fpp_cond(opcode, extra & 0x3f); - if (cc < 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } else if ((opcode & 0x38) == 0) { - // TODO_BIGENDIAN - m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | - (cc ? 0xff : 0x00); - } else { - if (get_fp_ad(opcode, &ad)) { - put_byte(ad, cc ? 0xff : 0x00); - } - } -} - -PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) -{ - int cc; - - D(bug("ftrapcc_opp %X at %08lx\r\n", (uae_u32)opcode, m68k_getpc ())); - -#if I3_ON_FTRAPCC -#error "FIXME: _asm int 3" - _asm int 3 -#endif - - // This must be broken. - cc = fpp_cond(opcode, opcode & 0x3f); - - if (cc < 0) { - m68k_setpc (oldpc); - op_illg (opcode); - } else if (cc) - Exception(7, oldpc - 2); -} - -// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) -PUBLIC void REGPARAM2 FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) -{ - int cc; - - D(bug("fbcc_opp %X, %X at %08lx, jumpto=%X\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); - - cc = fpp_cond(opcode, opcode & 0x3f); - if (cc < 0) { - m68k_setpc (pc); - op_illg (opcode); - } else if (cc) { - if ((opcode & 0x40) == 0) - extra = (uae_s32) (uae_s16) extra; - m68k_setpc (pc + extra); - } -} - -// FSAVE has no post-increment -// 0x1f180000 == IDLE state frame, coprocessor version number 1F -PUBLIC void REGPARAM2 FFPU fpuop_save(uae_u32 opcode) -{ - uae_u32 ad; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - int i; - - D(bug("fsave_opp at %08lx\r\n", m68k_getpc ())); - - if (get_fp_ad(opcode, &ad)) { - if (FPU is_integral) { - // Put 4 byte 68040 IDLE frame. - if (incr < 0) { - ad -= 4; - put_long (ad, 0x41000000); - } else { - put_long (ad, 0x41000000); - ad += 4; - } - } else { - // Put 28 byte 68881 IDLE frame. - if (incr < 0) { - D(bug("fsave_opp pre-decrement\r\n")); - ad -= 4; - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - for (i = 0; i < 5; i++) { - ad -= 4; - put_long (ad, 0x00000000); - } - ad -= 4; - put_long (ad, 0x1f180000); // IDLE, vers 1f - } else { - put_long (ad, 0x1f180000); // IDLE, vers 1f - ad += 4; - for (i = 0; i < 5; i++) { - put_long (ad, 0x00000000); - ad += 4; - } - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - ad += 4; - } - } - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - D(bug("PROBLEM: fsave_opp post-increment\r\n")); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; - D(bug("fsave_opp pre-decrement %X -> A%d\r\n",ad,opcode & 7)); - } - } -} - -PRIVATE void FFPU do_null_frestore () -{ - // A null-restore operation sets FP7-FP0 positive, nonsignaling NANs. - for( int i=0; i<8; i++ ) { - MAKE_NAN( FPU registers[i] ); - } - - FPU instruction_address = 0; - set_fpcr(0); - set_fpsr(0); - - x86_status_word = SW_INITIAL; - x86_status_word_accrued = 0; - FPU fpsr.quotient = 0; - - x86_control_word = CW_INITIAL; -/* _asm FLDCW x86_control_word - _asm FNCLEX */ - __asm__ __volatile__("fldcw %0\n\tfnclex" : : "m" (x86_control_word)); -} - -// FSAVE has no pre-decrement -PUBLIC void REGPARAM2 FFPU fpuop_restore(uae_u32 opcode) -{ - uae_u32 ad; - uae_u32 d; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - - D(bug("frestore_opp at %08lx\r\n", m68k_getpc ())); - - if (get_fp_ad(opcode, &ad)) { - if (FPU is_integral) { - // 68040 - if (incr < 0) { - D(bug("PROBLEM: frestore_opp incr < 0\r\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) == 0) { // NULL - D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); - do_null_frestore(); - } else if ((d & 0x00ff0000) == 0) { // IDLE - D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); - } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); - ad -= 44; - } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); - ad -= 92; - } else { - D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); - } - } else { - d = get_long (ad); - D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); - ad += 4; - if ((d & 0xff000000) == 0) { // NULL - D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); - do_null_frestore(); - } else if ((d & 0x00ff0000) == 0) { // IDLE - D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); - } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); - ad += 44; - } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); - ad += 92; - } else { - D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); - } - } - } else { - // 68881 - if (incr < 0) { - D(bug("PROBLEM: frestore_opp incr < 0\r\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) == 0) { // NULL - do_null_frestore(); - } else if ((d & 0x00ff0000) == 0x00180000) { - ad -= 6 * 4; - } else if ((d & 0x00ff0000) == 0x00380000) { - ad -= 14 * 4; - } else if ((d & 0x00ff0000) == 0x00b40000) { - ad -= 45 * 4; - } - } else { - d = get_long (ad); - D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); - ad += 4; - if ((d & 0xff000000) == 0) { // NULL - D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); - do_null_frestore(); - } else if ((d & 0x00ff0000) == 0x00180000) { // IDLE - D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); - ad += 6 * 4; - } else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? - ad += 14 * 4; - D(bug("PROBLEM: frestore_opp found UNIMP? frame at %X\r\n",ad-4)); - } else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY - D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); - ad += 45 * 4; - } else { - D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); - } - } - } - - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; - D(bug("frestore_opp post-increment %X -> A%d\r\n",ad,opcode & 7)); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - D(bug("PROBLEM: frestore_opp pre-decrement\r\n")); - } - } -} - - -/* ---------------------------- Old-style interface ---------------------------- */ - -// #ifndef OPTIMIZED_8BIT_MEMORY_ACCESS -PUBLIC void REGPARAM2 FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) -{ - uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); - (*fpufunctbl[mask])(opcode,extra); -} -// #endif - - -/* ---------------------------- Illegal ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("ILLEGAL F OP 2 %X\r\n",opcode)); - -#if I3_ON_ILLEGAL_FPU_OP -#error "FIXME: asm int 3" - _asm int 3 -#endif - - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); -} - - -/* ---------------------------- FPP -> ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVE -> \r\n")); - - if (put_fp_value (FPU registers[(extra >> 7) & 7], opcode, extra) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - - /* - Needed (among other things) by some Pack5/Elems68k transcendental - functions, they require the ACCR_INEX flag after a "MOVE.D, Dreg". - However, now put_fp_value() is responsible of clearing the exceptions - and merging statuses. - */ - - /* - WORD sw_temp; - _asm FNSTSW sw_temp - if(sw_temp & SW_PE) { - _asm FNCLEX - x86_status_word |= SW_PE; - x86_status_word_accrued |= SW_PE; - } - */ - - dump_registers( "END "); -} - - -/* ---------------------------- CONTROL REGS -> Dreg ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM control(none) -> D%d\r\n", opcode & 7)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpsr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpcr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpsr(); - D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpsr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); - m68k_dreg (regs, opcode & 7) = get_fpsr(); - D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - - -/* ---------------------------- Dreg -> CONTROL REGS ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM D%d -> control(none)\r\n", opcode & 7)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - FPU instruction_address = m68k_dreg (regs, opcode & 7); - D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpsr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpsr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - FPU instruction_address = m68k_dreg (regs, opcode & 7); - D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - FPU instruction_address = m68k_dreg (regs, opcode & 7); - D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - set_fpsr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - set_fpsr( m68k_dreg (regs, opcode & 7) ); - D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - FPU instruction_address = m68k_dreg (regs, opcode & 7); - D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - - -/* ---------------------------- CONTROL REGS -> Areg ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM control(none) -> A%d\r\n", opcode & 7)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); - m68k_areg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpsr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpcr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpsr(); - D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); - m68k_areg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); - m68k_areg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpsr(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpcr(); - D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); - m68k_areg (regs, opcode & 7) = get_fpsr(); - D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); - m68k_areg (regs, opcode & 7) = FPU instruction_address; - dump_registers( "END "); -} - - -/* ---------------------------- Areg -> CONTROL REGS ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM A%d -> control(none)\r\n", opcode & 7)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - FPU instruction_address = m68k_areg (regs, opcode & 7); - D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpsr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpsr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - FPU instruction_address = m68k_areg (regs, opcode & 7); - D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - FPU instruction_address = m68k_areg (regs, opcode & 7); - D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - set_fpsr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) -{ - set_fpcr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); - set_fpsr( m68k_areg (regs, opcode & 7) ); - D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); - FPU instruction_address = m68k_areg (regs, opcode & 7); - D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); - dump_registers( "END "); -} - - -/* ---------------------------- CONTROL REGS -> --MEMORY---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM Control regs (none) -> mem\r\n" )); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - put_long (ad, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 12; - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - put_long (ad+8, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - - -/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM Control regs (none) -> mem\r\n" )); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - m68k_areg (regs, opcode & 7) = ad+8; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - m68k_areg (regs, opcode & 7) = ad+8; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - dump_registers( "END "); - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - m68k_areg (regs, opcode & 7) = ad+8; - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - put_long (ad+8, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); - m68k_areg (regs, opcode & 7) = ad+12; - dump_registers( "END "); - } -} - - -/* ---------------------------- CONTROL REGS -> MEMORY ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM Control regs (none) -> mem\r\n" )); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - put_long (ad, get_fpcr()); - D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); - put_long (ad+4, get_fpsr()); - D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); - put_long (ad+8, FPU instruction_address); - D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); - dump_registers( "END "); - } -} - - -/* ---------------------------- --MEMORY -> CONTROL REGS ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM --Mem -> control(none)\r\n")); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - FPU instruction_address = get_long (ad); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 4; - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 8; - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - ad -= 12; - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - FPU instruction_address = get_long (ad+8); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - - -/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM Mem++ -> control(none)\r\n")); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - FPU instruction_address = get_long (ad); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad+8; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - m68k_areg (regs, opcode & 7) = ad+4; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad+8; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - m68k_areg (regs, opcode & 7) = ad+8; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - FPU instruction_address = get_long (ad+8); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); - m68k_areg (regs, opcode & 7) = ad+12; - dump_registers( "END "); - } -} - - -/* ---------------------------- MEMORY -> CONTROL REGS ---------------------------- */ -/* ---------------------------- and ---------------------------- */ -/* ---------------------------- IMMEDIATE -> CONTROL REGS ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVEM Mem -> control(none)\r\n")); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - FPU instruction_address = next_ilong(); - D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - FPU instruction_address = get_long (ad); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpsr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpsr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); - FPU instruction_address = next_ilong(); - D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpsr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpcr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpcr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); - FPU instruction_address = next_ilong(); - D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - FPU instruction_address = get_long (ad+4); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpcr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); - set_fpsr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - } - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) -{ - if ((opcode & 0x3f) == 0x3c) { - set_fpcr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); - set_fpsr( next_ilong() ); - D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); - FPU instruction_address = next_ilong(); - D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); - } else { - uae_u32 ad; - if (get_fp_ad(opcode, &ad)) { - set_fpcr( get_long (ad) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); - set_fpsr( get_long (ad+4) ); - D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); - FPU instruction_address = get_long (ad+8); - D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); - } - } - dump_registers( "END "); -} - - -/* ---------------------------- FMOVEM MEMORY -> FPP ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM memory->FPP\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); - } - list <<= 1; - } - dump_registers( "END "); - } -} - - -/* ---------------------------- FPP -> FMOVEM MEMORY ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=7; reg>=0; reg-- ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = extra & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - m68k_areg (regs, opcode & 7) = ad; - dump_registers( "END "); - } -} -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) -{ - uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - D(bug("FMOVEM FPP->memory\r\n")); - if (get_fp_ad(opcode, &ad)) { - for( int reg=0; reg<8; reg++ ) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - dump_registers( "END "); - } -} - - -/* ---------------------------- FMOVEM CONSTANT ROM -> FPP ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: Pi\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_pi, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: Log 10 (2)\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_lg2, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: e\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_e, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: Log 2 (e)\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_l2e, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: Log 10 (e)\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_log_10_e, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: zero\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_z, sizeof(fpu_register) ); - x86_status_word = SW_Z; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: ln(2)\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_ln2, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: ln(10)\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_ln_10, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e0\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1, sizeof(fpu_register) ); - x86_status_word = SW_FINITE; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e1\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e1, sizeof(fpu_register) ); - x86_status_word = SW_FINITE; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e2\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e2, sizeof(fpu_register) ); - x86_status_word = SW_FINITE; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e4\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e4, sizeof(fpu_register) ); - x86_status_word = SW_FINITE; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e8\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e8, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; // Is it really FPSR_EXCEPTION_INEX2? - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e16\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e16, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e32\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e32, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e64\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e64, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e128\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e128, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e256\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e256, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e512\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e512, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e1024\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e1024, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e2048\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e2048, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ) -{ - D(bug("FMOVECR memory->FPP FP const: 1.0e4096\r\n")); - memcpy( &FPU registers[(extra>>7) & 7], &const_1e4096, sizeof(fpu_register) ); - x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; - dump_registers( "END "); -} - - -/* ---------------------------- ALU ---------------------------- */ - -PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FMOVE %s\r\n",etos(src))); - do_fmove( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FINT %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); - do_fint( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSINH %s\r\n",etos(src))); - do_fsinh( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FINTRZ %s\r\n",etos(src))); - do_fintrz( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSQRT %s\r\n",etos(src))); - do_fsqrt( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FLOGNP1 %s\r\n",etos(src))); - do_flognp1( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FETOXM1 %s\r\n",etos(src))); - do_fetoxm1( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FTANH %s\r\n",etos(src))); - do_ftanh( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FATAN %s\r\n",etos(src))); - do_fatan( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FASIN %s\r\n",etos(src))); - do_fasin( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FATANH %s\r\n",etos(src))); - do_fatanh( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSIN %s\r\n",etos(src))); - do_fsin( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FTAN %s\r\n",etos(src))); - do_ftan( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FETOX %s\r\n",etos(src))); - do_fetox( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FTWOTOX %s\r\n",etos(src))); - do_ftwotox( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FTENTOX %s\r\n",etos(src))); - do_ftentox( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FLOGN %s\r\n",etos(src))); - do_flogn( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FLOG10 %s\r\n",etos(src))); - do_flog10( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FLOG2 %s\r\n",etos(src))); - do_flog2( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FABS %s\r\n",etos(src))); - do_fabs( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FCOSH %s\r\n",etos(src))); - do_fcosh( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FNEG %s\r\n",etos(src))); - do_fneg( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FACOS %s\r\n",etos(src))); - do_facos( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FCOS %s\r\n",etos(src))); - do_fcos( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FGETEXP %s\r\n",etos(src))); - - if( IS_INFINITY(src) ) { - MAKE_NAN( FPU registers[reg] ); - do_ftst( FPU registers[reg] ); - x86_status_word |= SW_IE; - } else { - do_fgetexp( FPU registers[reg], src ); - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FGETMAN %s\r\n",etos(src))); - if( IS_INFINITY(src) ) { - MAKE_NAN( FPU registers[reg] ); - do_ftst( FPU registers[reg] ); - x86_status_word |= SW_IE; - } else { - do_fgetman( FPU registers[reg], src ); - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDIV %s\r\n",etos(src))); - do_fdiv( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FMOD %s\r\n",etos(src))); - -#if USE_3_BIT_QUOTIENT - do_fmod( FPU registers[reg], src ); -#else - if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_ZERO ) { - do_fmod_dont_set_cw( FPU registers[reg], src ); - } else { - do_fmod( FPU registers[reg], src ); - } -#endif - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FREM %s\r\n",etos(src))); -#if USE_3_BIT_QUOTIENT - do_frem( FPU registers[reg], src ); -#else - if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_NEAR ) { - do_frem_dont_set_cw( FPU registers[reg], src ); - } else { - do_frem( FPU registers[reg], src ); - } -#endif - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FADD %s\r\n",etos(src))); - do_fadd( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FMUL %s\r\n",etos(src))); - do_fmul( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSGLDIV %s\r\n",etos(src))); - do_fsgldiv( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSCALE %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); - if( IS_INFINITY(FPU registers[reg]) ) { - MAKE_NAN( FPU registers[reg] ); - do_ftst( FPU registers[reg] ); - x86_status_word |= SW_IE; - } else { - // When the absolute value of the source operand is >= 2^14, - // an overflow or underflow always results. - do_fscale( FPU registers[reg], src ); - } - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSGLMUL %s\r\n",etos(src))); - do_fsglmul( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSUB %s\r\n",etos(src))); - do_fsub( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSINCOS %s\r\n",etos(src))); - do_fsincos( FPU registers[reg], FPU registers[extra & 7], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FCMP %s\r\n",etos(src))); - - if( IS_INFINITY(src) ) { - if( IS_NEGATIVE(src) ) { - if( IS_INFINITY(FPU registers[reg]) && IS_NEGATIVE(FPU registers[reg]) ) { - x86_status_word = SW_Z | SW_N; - D(bug("-INF FCMP -INF -> NZ\r\n")); - } else { - x86_status_word = SW_FINITE; - D(bug("X FCMP -INF -> None\r\n")); - } - } else { - if( IS_INFINITY(FPU registers[reg]) && !IS_NEGATIVE(FPU registers[reg]) ) { - x86_status_word = SW_Z; - D(bug("+INF FCMP +INF -> Z\r\n")); - } else { - x86_status_word = SW_N; - D(bug("X FCMP +INF -> N\r\n")); - } - } - } else if( IS_INFINITY(FPU registers[reg]) ) { - if( IS_NEGATIVE(FPU registers[reg]) ) { - x86_status_word = SW_N; - D(bug("-INF FCMP X -> Negative\r\n")); - } else { - x86_status_word = SW_FINITE; - D(bug("+INF FCMP X -> None\r\n")); - } - } else { - do_fcmp( FPU registers[reg], src ); - } - - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FTST %s\r\n",etos(src))); - do_ftst( src ); - build_ex_status(); - dump_registers( "END "); -} - - - -/* ---------------------------- SETUP TABLES ---------------------------- */ - -PRIVATE void FFPU build_fpp_opp_lookup_table () -{ - for( uae_u32 opcode=0; opcode<=0x38; opcode+=8 ) { - for( uae_u32 extra=0; extra<65536; extra++ ) { - uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); - fpufunctbl[mask] = & FFPU fpuop_illg; - - switch ((extra >> 13) & 0x7) { - case 3: - fpufunctbl[mask] = & FFPU fpuop_fmove_2_ea; - break; - case 4: - case 5: - if ((opcode & 0x38) == 0) { - if (extra & 0x2000) { // dr bit - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Dreg; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Dreg; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Dreg; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Dreg; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg; - break; - } - } else { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_none; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpiar; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar; - break; - } - } - } else if ((opcode & 0x38) == 8) { - if (extra & 0x2000) { // dr bit - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Areg; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Areg; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Areg; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Areg; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Areg; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Areg; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Areg; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg; - break; - } - } else { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_none; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpiar; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr_fpiar; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpiar; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar; - break; - } - } - } else if (extra & 0x2000) { - if ((opcode & 0x38) == 0x20) { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_predecrement; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_predecrement; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_predecrement; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_predecrement; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement; - break; - } - } else if ((opcode & 0x38) == 0x18) { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_postincrement; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_postincrement; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_postincrement; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_postincrement; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement; - break; - } - } else { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem; - break; - } - } - } else { - if ((opcode & 0x38) == 0x20) { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_predecrement; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_predecrement; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_predecrement; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_predecrement; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement; - break; - } - } else if ((opcode & 0x38) == 0x18) { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_postincrement; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_postincrement; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_postincrement; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_postincrement; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement; - break; - } - } else { - switch( extra & 0x1C00 ) { - case 0x0000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_2_Mem; - break; - case 0x0400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem; - break; - case 0x0800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem; - break; - case 0x0C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem; - break; - case 0x1000: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem; - break; - case 0x1400: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem; - break; - case 0x1800: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem; - break; - case 0x1C00: - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem; - break; - } - } - break; - case 6: - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred; - break; - case 1: /* dynamic pred */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred; - break; - case 2: /* static postinc */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc; - break; - case 3: /* dynamic postinc */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc; - break; - } - break; - case 7: - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred; - break; - case 1: /* dynamic pred */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred; - break; - case 2: /* static postinc */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc; - break; - case 3: /* dynamic postinc */ - if ((opcode & 0x38) == 0x18) // post-increment? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement; - else if ((opcode & 0x38) == 0x20) // pre-decrement? - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement; - else - fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc; - break; - } - break; - case 0: - case 2: - if ((extra & 0xfc00) == 0x5c00) { - switch (extra & 0x7f) { - case 0x00: - fpufunctbl[mask] = & FFPU fpuop_do_fldpi; - break; - case 0x0b: - fpufunctbl[mask] = & FFPU fpuop_do_fldlg2; - break; - case 0x0c: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_e; - break; - case 0x0d: - fpufunctbl[mask] = & FFPU fpuop_do_fldl2e; - break; - case 0x0e: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_log_10_e; - break; - case 0x0f: - fpufunctbl[mask] = & FFPU fpuop_do_fldz; - break; - case 0x30: - fpufunctbl[mask] = & FFPU fpuop_do_fldln2; - break; - case 0x31: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_ln_10; - break; - case 0x32: - fpufunctbl[mask] = & FFPU fpuop_do_fld1; - break; - case 0x33: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1; - break; - case 0x34: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2; - break; - case 0x35: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4; - break; - case 0x36: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e8; - break; - case 0x37: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e16; - break; - case 0x38: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e32; - break; - case 0x39: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e64; - break; - case 0x3a: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e128; - break; - case 0x3b: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e256; - break; - case 0x3c: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e512; - break; - case 0x3d: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1024; - break; - case 0x3e: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2048; - break; - case 0x3f: - fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4096; - break; - } - break; - } - - switch (extra & 0x7f) { - case 0x00: - fpufunctbl[mask] = & FFPU fpuop_do_fmove; - break; - case 0x01: - fpufunctbl[mask] = & FFPU fpuop_do_fint; - break; - case 0x02: - fpufunctbl[mask] = & FFPU fpuop_do_fsinh; - break; - case 0x03: - fpufunctbl[mask] = & FFPU fpuop_do_fintrz; - break; - case 0x04: - fpufunctbl[mask] = & FFPU fpuop_do_fsqrt; - break; - case 0x06: - fpufunctbl[mask] = & FFPU fpuop_do_flognp1; - break; - case 0x08: - fpufunctbl[mask] = & FFPU fpuop_do_fetoxm1; - break; - case 0x09: - fpufunctbl[mask] = & FFPU fpuop_do_ftanh; - break; - case 0x0a: - fpufunctbl[mask] = & FFPU fpuop_do_fatan; - break; - case 0x0c: - fpufunctbl[mask] = & FFPU fpuop_do_fasin; - break; - case 0x0d: - fpufunctbl[mask] = & FFPU fpuop_do_fatanh; - break; - case 0x0e: - fpufunctbl[mask] = & FFPU fpuop_do_fsin; - break; - case 0x0f: - fpufunctbl[mask] = & FFPU fpuop_do_ftan; - break; - case 0x10: - fpufunctbl[mask] = & FFPU fpuop_do_fetox; - break; - case 0x11: - fpufunctbl[mask] = & FFPU fpuop_do_ftwotox; - break; - case 0x12: - fpufunctbl[mask] = & FFPU fpuop_do_ftentox; - break; - case 0x14: - fpufunctbl[mask] = & FFPU fpuop_do_flogn; - break; - case 0x15: - fpufunctbl[mask] = & FFPU fpuop_do_flog10; - break; - case 0x16: - fpufunctbl[mask] = & FFPU fpuop_do_flog2; - break; - case 0x18: - fpufunctbl[mask] = & FFPU fpuop_do_fabs; - break; - case 0x19: - fpufunctbl[mask] = & FFPU fpuop_do_fcosh; - break; - case 0x1a: - fpufunctbl[mask] = & FFPU fpuop_do_fneg; - break; - case 0x1c: - fpufunctbl[mask] = & FFPU fpuop_do_facos; - break; - case 0x1d: - fpufunctbl[mask] = & FFPU fpuop_do_fcos; - break; - case 0x1e: - fpufunctbl[mask] = & FFPU fpuop_do_fgetexp; - break; - case 0x1f: - fpufunctbl[mask] = & FFPU fpuop_do_fgetman; - break; - case 0x20: - fpufunctbl[mask] = & FFPU fpuop_do_fdiv; - break; - case 0x21: - fpufunctbl[mask] = & FFPU fpuop_do_fmod; - break; - case 0x22: - fpufunctbl[mask] = & FFPU fpuop_do_fadd; - break; - case 0x23: - fpufunctbl[mask] = & FFPU fpuop_do_fmul; - break; - case 0x24: - fpufunctbl[mask] = & FFPU fpuop_do_fsgldiv; - break; - case 0x25: - fpufunctbl[mask] = & FFPU fpuop_do_frem; - break; - case 0x26: - fpufunctbl[mask] = & FFPU fpuop_do_fscale; - break; - case 0x27: - fpufunctbl[mask] = & FFPU fpuop_do_fsglmul; - break; - case 0x28: - fpufunctbl[mask] = & FFPU fpuop_do_fsub; - break; - case 0x30: - case 0x31: - case 0x32: - case 0x33: - case 0x34: - case 0x35: - case 0x36: - case 0x37: - fpufunctbl[mask] = & FFPU fpuop_do_fsincos; - break; - case 0x38: - fpufunctbl[mask] = & FFPU fpuop_do_fcmp; - break; - case 0x3a: - fpufunctbl[mask] = & FFPU fpuop_do_ftst; - break; - } - } - } - } - } -} - -/* ---------------------------- CONSTANTS ---------------------------- */ - -PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ) -{ - FPU_CONSISTENCY_CHECK_START(); - if(mult == 1) { -/* _asm { - MOV ESI, [f] - FLD QWORD PTR [value] - FSTP TBYTE PTR [ESI] - } */ - __asm__ __volatile__( - "fldl %1\n" - "fstpt %0\n" - : "=m" (f) - : "m" (value) - ); - } else { -/* _asm { - MOV ESI, [f] - FILD DWORD PTR [mult] - FLD QWORD PTR [value] - FMUL - FSTP TBYTE PTR [ESI] - } */ - __asm__ __volatile__( - "fildl %2\n" - "fldl %1\n" - "fmul \n" - "fstpt %0\n" - : "=m" (f) - : "m" (value), "m" (mult) - ); - } - D(bug("set_constant (%s,%.04f) = %s\r\n",name,(float)value,etos(f))); - FPU_CONSISTENCY_CHECK_STOP( mult==1 ? "set_constant(mult==1)" : "set_constant(mult>1)" ); -} - -PRIVATE void FFPU do_fldpi ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLDPI - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldpi \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fldpi"); -} - -PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLDLG2 - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldlg2 \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fldlg2"); -} - -PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLDL2E - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldl2e \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fldl2e"); -} - -PRIVATE void FFPU do_fldz ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLDZ - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldz \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fldz"); -} - -PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLDLN2 - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fldln2 \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fldln2"); -} - -PRIVATE void FFPU do_fld1 ( fpu_register & dest ) -{ - FPU_CONSISTENCY_CHECK_START(); -/* _asm { - FLD1 - FXAM - FNSTSW x86_status_word - MOV EDI, [dest] - FSTP TBYTE PTR [EDI] - } */ - __asm__ __volatile__( - "fld1 \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fld1"); -} - - -/* ---------------------------- MAIN INIT ---------------------------- */ - -#ifdef HAVE_SIGACTION -// Mega hackaround-that-happens-to-work: the following way to handle -// SIGFPE just happens to make the "fsave" below in fpu_init() *NOT* -// to abort with a floating point exception. However, we never -// actually reach sigfpe_handler(). -static void sigfpe_handler(int code, siginfo_t *sip, void *) -{ - if (code == SIGFPE && sip->si_code == FPE_FLTINV) { - fprintf(stderr, "Invalid floating point operation\n"); - abort(); - } -} -#endif - -PUBLIC void FFPU fpu_init( bool integral_68040 ) -{ - static bool done_first_time_initialization = false; - if (!done_first_time_initialization) { - fpu_init_native_fflags(); - fpu_init_native_exceptions(); - fpu_init_native_accrued_exceptions(); -#ifdef HAVE_SIGACTION - struct sigaction fpe_sa; - sigemptyset(&fpe_sa.sa_mask); - fpe_sa.sa_sigaction = sigfpe_handler; - fpe_sa.sa_flags = SA_SIGINFO; - sigaction(SIGFPE, &fpe_sa, 0); -#endif - done_first_time_initialization = true; - } - - __asm__ __volatile__("fsave %0" : "=m" (m_fpu_state_original)); - - FPU is_integral = integral_68040; - FPU instruction_address = 0; - set_fpcr(0); - set_fpsr(0); - - x86_control_word = CW_INITIAL; - x86_status_word = SW_INITIAL; - x86_status_word_accrued = 0; - FPU fpsr.quotient = 0; - - for( int i=0; i<8; i++ ) { - MAKE_NAN( FPU registers[i] ); - } - - build_fpp_opp_lookup_table(); - - __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); - - do_fldpi( const_pi ); - do_fldlg2( const_lg2 ); - do_fldl2e( const_l2e ); - do_fldz( const_z ); - do_fldln2( const_ln2 ); - do_fld1( const_1 ); - - set_constant( const_e, "e", exp (1.0), 1 ); - set_constant( const_log_10_e, "Log 10 (e)", log (exp (1.0)) / log (10.0), 1 ); - set_constant( const_ln_10, "ln(10)", log (10.0), 1 ); - set_constant( const_1e1, "1.0e1", 1.0e1, 1 ); - set_constant( const_1e2, "1.0e2", 1.0e2, 1 ); - set_constant( const_1e4, "1.0e4", 1.0e4, 1 ); - set_constant( const_1e8, "1.0e8", 1.0e8, 1 ); - set_constant( const_1e16, "1.0e16", 1.0e16, 1 ); - set_constant( const_1e32, "1.0e32", 1.0e32, 1 ); - set_constant( const_1e64, "1.0e64", 1.0e64, 1 ) ; - set_constant( const_1e128, "1.0e128", 1.0e128, 1 ); - set_constant( const_1e256, "1.0e256", 1.0e256, 1 ); - set_constant( const_1e512, "1.0e512", 1.0e256, 10 ); - set_constant( const_1e1024, "1.0e1024", 1.0e256, 100 ); - set_constant( const_1e2048, "1.0e2048", 1.0e256, 1000 ); - set_constant( const_1e4096, "1.0e4096", 1.0e256, 10000 ); - - // Just in case. - __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); -} - -PUBLIC void FFPU fpu_exit( void ) -{ - __asm__ __volatile__("frstor %0" : : "m" (m_fpu_state_original)); -} - -PUBLIC void FFPU fpu_reset( void ) -{ - fpu_exit(); - fpu_init(FPU is_integral); -} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h deleted file mode 100644 index 96f1d9598..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h +++ /dev/null @@ -1,361 +0,0 @@ -/* - * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_X86_H -#define FPU_X86_H - -/* NOTE: this file shall be included from fpu/fpu_x86.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -// Status word -PRIVATE uae_u32 x86_status_word; -PRIVATE uae_u32 x86_status_word_accrued; - -// FPU jump table -typedef void REGPARAM2 ( *fpuop_func )( uae_u32, uae_u32 ); -PRIVATE fpuop_func fpufunctbl[65536]; - -// FPU consistency -PRIVATE uae_u32 checked_sw_atstart; - -// FMOVECR constants supported byt x86 FPU -PRIVATE fpu_register const_pi; -PRIVATE fpu_register const_lg2; -PRIVATE fpu_register const_l2e; -PRIVATE fpu_register const_z; -PRIVATE fpu_register const_ln2; -PRIVATE fpu_register const_1; - -// FMOVECR constants not not suported by x86 FPU -PRIVATE fpu_register const_e; -PRIVATE fpu_register const_log_10_e; -PRIVATE fpu_register const_ln_10; -PRIVATE fpu_register const_1e1; -PRIVATE fpu_register const_1e2; -PRIVATE fpu_register const_1e4; -PRIVATE fpu_register const_1e8; -PRIVATE fpu_register const_1e16; -PRIVATE fpu_register const_1e32; -PRIVATE fpu_register const_1e64; -PRIVATE fpu_register const_1e128; -PRIVATE fpu_register const_1e256; -PRIVATE fpu_register const_1e512; -PRIVATE fpu_register const_1e1024; -PRIVATE fpu_register const_1e2048; -PRIVATE fpu_register const_1e4096; - -// Saved host FPU state -PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 - -/* -------------------------------------------------------------------------- */ -/* --- Methods --- */ -/* -------------------------------------------------------------------------- */ - -// Debug support functions -PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual); -PRIVATE char * FFPU etos(fpu_register const & e) REGPARAM; - -// FPU consistency -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void); -PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name); - -// Get special floating-point value class -PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); - -// Make a special floating-point value -PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); - -// Conversion from extended floating-point values -PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) REGPARAM; -PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) REGPARAM; -PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) REGPARAM; -PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) REGPARAM; -PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) REGPARAM; -PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) REGPARAM; -PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) REGPARAM; -PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) REGPARAM; - -// Conversion to extended floating-point values -PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) REGPARAM; -PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) REGPARAM; -PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) REGPARAM; -PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; -PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; -PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) REGPARAM; -PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) REGPARAM; - -// Atomic floating-point arithmetic operations -PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_ftst ( fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) REGPARAM; -PRIVATE void FFPU do_fldpi ( fpu_register & dest ) REGPARAM; -PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) REGPARAM; -PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) REGPARAM; -PRIVATE void FFPU do_fldz ( fpu_register & dest ) REGPARAM; -PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) REGPARAM; -PRIVATE void FFPU do_fld1 ( fpu_register & dest ) REGPARAM; - -// Instructions handlers -PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ); - -// Get & Put floating-point values -PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) REGPARAM; -PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) REGPARAM; -PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) REGPARAM; - -// Floating-point condition-based instruction handlers -PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) REGPARAM; - -// Misc functions -PRIVATE void __inline__ FFPU set_host_fpu_control_word (); -PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN (); -PRIVATE void __inline__ FFPU build_ex_status (); -PRIVATE void FFPU do_null_frestore (); -PRIVATE void FFPU build_fpp_opp_lookup_table (); -PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ); - -#endif /* FPU_X86_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h deleted file mode 100644 index ecdecfbc9..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h +++ /dev/null @@ -1,72 +0,0 @@ -#define DEFINE_X86_MACRO(name, value) \ - asm(".local " #name "\n\t" #name " = " #value) - -DEFINE_X86_MACRO(BSUN, 0x00008000); -DEFINE_X86_MACRO(SNAN, 0x00004000); -DEFINE_X86_MACRO(OPERR, 0x00002000); -DEFINE_X86_MACRO(OVFL, 0x00001000); -DEFINE_X86_MACRO(UNFL, 0x00000800); -DEFINE_X86_MACRO(DZ, 0x00000400); -DEFINE_X86_MACRO(INEX2, 0x00000200); -DEFINE_X86_MACRO(INEX1, 0x00000100); -DEFINE_X86_MACRO(ACCR_IOP, 0x80); -DEFINE_X86_MACRO(ACCR_OVFL, 0x40); -DEFINE_X86_MACRO(ACCR_UNFL, 0x20); -DEFINE_X86_MACRO(ACCR_DZ, 0x10); -DEFINE_X86_MACRO(ACCR_INEX, 0x08); -DEFINE_X86_MACRO(ROUND_CONTROL_MASK, 0x30); -DEFINE_X86_MACRO(ROUND_TO_NEAREST, 0); -DEFINE_X86_MACRO(ROUND_TO_ZERO, 0x10); -DEFINE_X86_MACRO(ROUND_TO_NEGATIVE_INFINITY, 0x20); -DEFINE_X86_MACRO(ROUND_TO_POSITIVE_INFINITY, 0x30); -DEFINE_X86_MACRO(PRECISION_CONTROL_MASK, 0xC0); -DEFINE_X86_MACRO(PRECISION_CONTROL_EXTENDED, 0); -DEFINE_X86_MACRO(PRECISION_CONTROL_DOUBLE, 0x80); -DEFINE_X86_MACRO(PRECISION_CONTROL_SINGLE, 0x40); -DEFINE_X86_MACRO(PRECISION_CONTROL_UNDEFINED, 0xC0); -DEFINE_X86_MACRO(CW_RESET, 0x0040); -DEFINE_X86_MACRO(CW_FINIT, 0x037F); -DEFINE_X86_MACRO(SW_RESET, 0x0000); -DEFINE_X86_MACRO(SW_FINIT, 0x0000); -DEFINE_X86_MACRO(TW_RESET, 0x5555); -DEFINE_X86_MACRO(TW_FINIT, 0x0FFF); -DEFINE_X86_MACRO(CW_X, 0x1000); -DEFINE_X86_MACRO(CW_RC_ZERO, 0x0C00); -DEFINE_X86_MACRO(CW_RC_UP, 0x0800); -DEFINE_X86_MACRO(CW_RC_DOWN, 0x0400); -DEFINE_X86_MACRO(CW_RC_NEAR, 0x0000); -DEFINE_X86_MACRO(CW_PC_EXTENDED, 0x0300); -DEFINE_X86_MACRO(CW_PC_DOUBLE, 0x0200); -DEFINE_X86_MACRO(CW_PC_RESERVED, 0x0100); -DEFINE_X86_MACRO(CW_PC_SINGLE, 0x0000); -DEFINE_X86_MACRO(CW_PM, 0x0020); -DEFINE_X86_MACRO(CW_UM, 0x0010); -DEFINE_X86_MACRO(CW_OM, 0x0008); -DEFINE_X86_MACRO(CW_ZM, 0x0004); -DEFINE_X86_MACRO(CW_DM, 0x0002); -DEFINE_X86_MACRO(CW_IM, 0x0001); -DEFINE_X86_MACRO(SW_B, 0x8000); -DEFINE_X86_MACRO(SW_C3, 0x4000); -DEFINE_X86_MACRO(SW_TOP_7, 0x3800); -DEFINE_X86_MACRO(SW_TOP_6, 0x3000); -DEFINE_X86_MACRO(SW_TOP_5, 0x2800); -DEFINE_X86_MACRO(SW_TOP_4, 0x2000); -DEFINE_X86_MACRO(SW_TOP_3, 0x1800); -DEFINE_X86_MACRO(SW_TOP_2, 0x1000); -DEFINE_X86_MACRO(SW_TOP_1, 0x0800); -DEFINE_X86_MACRO(SW_TOP_0, 0x0000); -DEFINE_X86_MACRO(SW_C2, 0x0400); -DEFINE_X86_MACRO(SW_C1, 0x0200); -DEFINE_X86_MACRO(SW_C0, 0x0100); -DEFINE_X86_MACRO(SW_ES, 0x0080); -DEFINE_X86_MACRO(SW_SF, 0x0040); -DEFINE_X86_MACRO(SW_PE, 0x0020); -DEFINE_X86_MACRO(SW_UE, 0x0010); -DEFINE_X86_MACRO(SW_OE, 0x0008); -DEFINE_X86_MACRO(SW_ZE, 0x0004); -DEFINE_X86_MACRO(SW_DE, 0x0002); -DEFINE_X86_MACRO(SW_IE, 0x0001); -DEFINE_X86_MACRO(X86_ROUNDING_MODE, 0x0C00); -DEFINE_X86_MACRO(X86_ROUNDING_PRECISION, 0x0300); - -#undef DEFINE_X86_MACRO diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h index 2363af56d..755c43d9b 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.h +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -49,12 +49,6 @@ // Use ISO C99 extended-precision math functions (glibc 2.1+) #define FPU_USE_ISO_C99 1 -// NOTE: this is irrelevant on Win32 platforms since the MS libraries -// don't support extended-precision floating-point computations -#if defined(WIN32) && USE_LONG_DOUBLE -#undef FPU_USE_ISO_C99 -#endif - // Use faster implementation of math functions, but this could cause // some incorrect results (?) #ifdef _MSC_VER diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 1653adab9..3030258f7 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -2188,15 +2188,13 @@ static void gen_opcode (unsigned long int opcode) case i_CINVP: case i_CINVA: /* gb-- srcreg now contains the cache field */ - printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 30 + ((opcode >> 3) & 3)); + break; case i_CPUSHL: case i_CPUSHP: case i_CPUSHA: /* gb-- srcreg now contains the cache field */ - printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 40 + ((opcode >> 3) & 3)); + break; case i_MOVE16: if ((opcode & 0xfff8) == 0xf620) { @@ -2262,7 +2260,6 @@ static void generate_includes (FILE * f) fprintf (f, "#include \"memory.h\"\n"); fprintf (f, "#include \"readcpu.h\"\n"); fprintf (f, "#include \"newcpu.h\"\n"); - fprintf (f, "#include \"compiler/compemu.h\"\n"); fprintf (f, "#include \"fpu/fpu.h\"\n"); fprintf (f, "#include \"cputbl.h\"\n"); @@ -2541,18 +2538,5 @@ int main (int argc, char **argv) fclose (stblfile); fflush (out); - /* For build systems (IDEs mainly) that don't make it easy to compile the - * same file twice with different settings. */ - stblfile = fopen ("cpustbl_nf.cpp", "w"); - out = freopen ("cpuemu_nf.cpp", "w", stdout); - - fprintf (stblfile, "#define NOFLAGS\n"); - fprintf (stblfile, "#include \"cpustbl.cpp\"\n"); - fclose (stblfile); - - printf ("#define NOFLAGS\n"); - printf ("#include \"cpuemu.cpp\"\n"); - fflush (out); - return 0; } diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp deleted file mode 100644 index 676a24369..000000000 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ /dev/null @@ -1,585 +0,0 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * Memory management - * - * (c) 1995 Bernd Schmidt - * - * 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 -#include - -#include "sysdeps.h" - -#include "cpu_emulation.h" -#include "main.h" -#include "video.h" - -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" - -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - -static bool illegal_mem = false; - -#ifdef SAVE_MEMORY_BANKS -addrbank *mem_banks[65536]; -#else -addrbank mem_banks[65536]; -#endif - -#ifdef WORDS_BIGENDIAN -# define swap_words(X) (X) -#else -# define swap_words(X) (((X) >> 16) | ((X) << 16)) -#endif - -#ifdef NO_INLINE_MEMORY_ACCESS -uae_u32 longget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).lget, addr); -} -uae_u32 wordget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).wget, addr); -} -uae_u32 byteget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).bget, addr); -} -void longput (uaecptr addr, uae_u32 l) -{ - call_mem_put_func (get_mem_bank (addr).lput, addr, l); -} -void wordput (uaecptr addr, uae_u32 w) -{ - call_mem_put_func (get_mem_bank (addr).wput, addr, w); -} -void byteput (uaecptr addr, uae_u32 b) -{ - call_mem_put_func (get_mem_bank (addr).bput, addr, b); -} -#endif - -/* A dummy bank that only contains zeros */ - -static uae_u32 REGPARAM2 dummy_lget (uaecptr) REGPARAM; -static uae_u32 REGPARAM2 dummy_wget (uaecptr) REGPARAM; -static uae_u32 REGPARAM2 dummy_bget (uaecptr) REGPARAM; -static void REGPARAM2 dummy_lput (uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 dummy_wput (uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 dummy_bput (uaecptr, uae_u32) REGPARAM; - -uae_u32 REGPARAM2 dummy_lget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal lget at %08lx\n", addr); - - return 0; -} - -uae_u32 REGPARAM2 dummy_wget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal wget at %08lx\n", addr); - - return 0; -} - -uae_u32 REGPARAM2 dummy_bget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal bget at %08lx\n", addr); - - return 0; -} - -void REGPARAM2 dummy_lput (uaecptr addr, uae_u32 l) -{ - if (illegal_mem) - write_log ("Illegal lput at %08lx\n", addr); -} -void REGPARAM2 dummy_wput (uaecptr addr, uae_u32 w) -{ - if (illegal_mem) - write_log ("Illegal wput at %08lx\n", addr); -} -void REGPARAM2 dummy_bput (uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal bput at %08lx\n", addr); -} - -/* Mac RAM (32 bit addressing) */ - -static uae_u32 REGPARAM2 ram_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram_bget(uaecptr) REGPARAM; -static void REGPARAM2 ram_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) REGPARAM; - -static uintptr RAMBaseDiff; // RAMBaseHost - RAMBaseMac - -uae_u32 REGPARAM2 ram_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 ram_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 ram_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(RAMBaseDiff + addr); -} - -void REGPARAM2 ram_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + addr); - do_put_mem_long(m, l); -} - -void REGPARAM2 ram_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + addr); - do_put_mem_word(m, w); -} - -void REGPARAM2 ram_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(RAMBaseDiff + addr) = b; -} - -uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) -{ - return (uae_u8 *)(RAMBaseDiff + addr); -} - -/* Mac RAM (24 bit addressing) */ - -static uae_u32 REGPARAM2 ram24_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram24_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram24_bget(uaecptr) REGPARAM; -static void REGPARAM2 ram24_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram24_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram24_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) REGPARAM; - -uae_u32 REGPARAM2 ram24_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 ram24_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 ram24_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); -} - -void REGPARAM2 ram24_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_long(m, l); -} - -void REGPARAM2 ram24_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_word(m, w); -} - -void REGPARAM2 ram24_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; -} - -uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) -{ - return (uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); -} - -/* Mac ROM (32 bit addressing) */ - -static uae_u32 REGPARAM2 rom_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom_bget(uaecptr) REGPARAM; -static void REGPARAM2 rom_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 rom_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 rom_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) REGPARAM; - -static uintptr ROMBaseDiff; // ROMBaseHost - ROMBaseMac - -uae_u32 REGPARAM2 rom_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(ROMBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 rom_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(ROMBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 rom_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(ROMBaseDiff + addr); -} - -void REGPARAM2 rom_lput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM lput at %08lx\n", addr); -} - -void REGPARAM2 rom_wput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM wput at %08lx\n", addr); -} - -void REGPARAM2 rom_bput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM bput at %08lx\n", addr); -} - -uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) -{ - return (uae_u8 *)(ROMBaseDiff + addr); -} - -/* Mac ROM (24 bit addressing) */ - -static uae_u32 REGPARAM2 rom24_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom24_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom24_bget(uaecptr) REGPARAM; -static uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) REGPARAM; - -uae_u32 REGPARAM2 rom24_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(ROMBaseDiff + (addr & 0xffffff)); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 rom24_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(ROMBaseDiff + (addr & 0xffffff)); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 rom24_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); -} - -uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) -{ - return (uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); -} - -/* Frame buffer */ - -static uae_u32 REGPARAM2 frame_direct_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_direct_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_direct_bget(uaecptr) REGPARAM; -static void REGPARAM2 frame_direct_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_direct_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_direct_bput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_555_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_host_555_wget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_555_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_host_555_wput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_565_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_host_565_wget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_565_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_host_565_wput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_888_lget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_888_lput(uaecptr, uae_u32) REGPARAM; - -static uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) REGPARAM; - -static uintptr FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac - -uae_u32 REGPARAM2 frame_direct_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 frame_direct_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 frame_direct_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(FrameBaseDiff + addr); -} - -void REGPARAM2 frame_direct_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - do_put_mem_long(m, l); -} - -void REGPARAM2 frame_direct_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - do_put_mem_word(m, w); -} - -void REGPARAM2 frame_direct_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(FrameBaseDiff + addr) = b; -} - -uae_u32 REGPARAM2 frame_host_555_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = *m; - return swap_words(l); -} - -uae_u32 REGPARAM2 frame_host_555_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - return *m; -} - -void REGPARAM2 frame_host_555_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - *m = swap_words(l); -} - -void REGPARAM2 frame_host_555_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - *m = w; -} - -uae_u32 REGPARAM2 frame_host_565_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = *m; - l = (l & 0x001f001f) | ((l >> 1) & 0x7fe07fe0); - return swap_words(l); -} - -uae_u32 REGPARAM2 frame_host_565_wget(uaecptr addr) -{ - uae_u16 *m, w; - m = (uae_u16 *)(FrameBaseDiff + addr); - w = *m; - return (w & 0x1f) | ((w >> 1) & 0x7fe0); -} - -void REGPARAM2 frame_host_565_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = (l & 0x001f001f) | ((l << 1) & 0xffc0ffc0); - *m = swap_words(l); -} - -void REGPARAM2 frame_host_565_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - *m = (w & 0x1f) | ((w << 1) & 0xffc0); -} - -uae_u32 REGPARAM2 frame_host_888_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - return *m; -} - -void REGPARAM2 frame_host_888_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(MacFrameBaseHost + addr - MacFrameBaseMac); - *m = l; -} - -uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) -{ - return (uae_u8 *)(FrameBaseDiff + addr); -} - -/* Default memory access functions */ - -uae_u8 *REGPARAM2 default_xlate (uaecptr a) -{ - write_log("Your Mac program just did something terribly stupid\n"); - return NULL; -} - -/* Address banks */ - -addrbank dummy_bank = { - dummy_lget, dummy_wget, dummy_bget, - dummy_lput, dummy_wput, dummy_bput, - default_xlate -}; - -addrbank ram_bank = { - ram_lget, ram_wget, ram_bget, - ram_lput, ram_wput, ram_bput, - ram_xlate -}; - -addrbank ram24_bank = { - ram24_lget, ram24_wget, ram24_bget, - ram24_lput, ram24_wput, ram24_bput, - ram24_xlate -}; - -addrbank rom_bank = { - rom_lget, rom_wget, rom_bget, - rom_lput, rom_wput, rom_bput, - rom_xlate -}; - -addrbank rom24_bank = { - rom24_lget, rom24_wget, rom24_bget, - rom_lput, rom_wput, rom_bput, - rom24_xlate -}; - -addrbank frame_direct_bank = { - frame_direct_lget, frame_direct_wget, frame_direct_bget, - frame_direct_lput, frame_direct_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_555_bank = { - frame_host_555_lget, frame_host_555_wget, frame_direct_bget, - frame_host_555_lput, frame_host_555_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_565_bank = { - frame_host_565_lget, frame_host_565_wget, frame_direct_bget, - frame_host_565_lput, frame_host_565_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_888_bank = { - frame_host_888_lget, frame_direct_wget, frame_direct_bget, - frame_host_888_lput, frame_direct_wput, frame_direct_bput, - frame_xlate -}; - -void memory_init(void) -{ - for(long i=0; i<65536; i++) - put_mem_bank(i<<16, &dummy_bank); - - // Limit RAM size to not overlap ROM - uint32 ram_size = RAMSize > ROMBaseMac ? ROMBaseMac : RAMSize; - - RAMBaseDiff = (uintptr)RAMBaseHost - (uintptr)RAMBaseMac; - ROMBaseDiff = (uintptr)ROMBaseHost - (uintptr)ROMBaseMac; - FrameBaseDiff = (uintptr)MacFrameBaseHost - (uintptr)MacFrameBaseMac; - - // Map RAM and ROM - if (TwentyFourBitAddressing) { - map_banks(&ram24_bank, RAMBaseMac >> 16, ram_size >> 16); - map_banks(&rom24_bank, ROMBaseMac >> 16, ROMSize >> 16); - } else { - map_banks(&ram_bank, RAMBaseMac >> 16, ram_size >> 16); - map_banks(&rom_bank, ROMBaseMac >> 16, ROMSize >> 16); - } - - // Map frame buffer - switch (MacFrameLayout) { - case FLAYOUT_DIRECT: - map_banks(&frame_direct_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_555: - map_banks(&frame_host_555_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_565: - map_banks(&frame_host_565_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_888: - map_banks(&frame_host_888_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - } -} - -void map_banks(addrbank *bank, int start, int size) -{ - int bnr; - unsigned long int hioffs = 0, endhioffs = 0x100; - - if (start >= 0x100) { - for (bnr = start; bnr < start + size; bnr++) - put_mem_bank (bnr << 16, bank); - return; - } - if (TwentyFourBitAddressing) endhioffs = 0x10000; - for (hioffs = 0; hioffs < endhioffs; hioffs += 0x100) - for (bnr = start; bnr < start+size; bnr++) - put_mem_bank((bnr + hioffs) << 16, bank); -} - -#endif /* !REAL_ADDRESSING && !DIRECT_ADDRESSING */ - diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 75a6303ba..670c2ee75 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -23,107 +23,11 @@ #ifndef UAE_MEMORY_H #define UAE_MEMORY_H -#if !DIRECT_ADDRESSING && !REAL_ADDRESSING - -/* Enabling this adds one additional native memory reference per 68k memory - * access, but saves one shift (on the x86). Enabling this is probably - * better for the cache. My favourite benchmark (PP2) doesn't show a - * difference, so I leave this enabled. */ - -#if 1 || defined SAVE_MEMORY -#define SAVE_MEMORY_BANKS -#endif - -typedef uae_u32 (REGPARAM2 *mem_get_func)(uaecptr) REGPARAM; -typedef void (REGPARAM2 *mem_put_func)(uaecptr, uae_u32) REGPARAM; -typedef uae_u8 *(REGPARAM2 *xlate_func)(uaecptr) REGPARAM; - -#undef DIRECT_MEMFUNCS_SUCCESSFUL - -#ifndef CAN_MAP_MEMORY -#undef USE_COMPILER -#endif - -#if defined(USE_COMPILER) && !defined(USE_MAPPED_MEMORY) -#define USE_MAPPED_MEMORY -#endif - -typedef struct { - /* These ones should be self-explanatory... */ - mem_get_func lget, wget, bget; - mem_put_func lput, wput, bput; - /* Use xlateaddr to translate an Amiga address to a uae_u8 * that can - * be used to address memory without calling the wget/wput functions. - * This doesn't work for all memory banks, so this function may call - * abort(). */ - xlate_func xlateaddr; -} addrbank; - -extern uae_u8 filesysory[65536]; - -extern addrbank ram_bank; // Mac RAM -extern addrbank rom_bank; // Mac ROM -extern addrbank frame_bank; // Frame buffer - -/* Default memory access functions */ - -extern uae_u8 *REGPARAM2 default_xlate(uaecptr addr) REGPARAM; - -#define bankindex(addr) (((uaecptr)(addr)) >> 16) - -#ifdef SAVE_MEMORY_BANKS -extern addrbank *mem_banks[65536]; -#define get_mem_bank(addr) (*mem_banks[bankindex(addr)]) -#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = (b)) -#else -extern addrbank mem_banks[65536]; -#define get_mem_bank(addr) (mem_banks[bankindex(addr)]) -#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = *(b)) -#endif - -extern void memory_init(void); -extern void map_banks(addrbank *bank, int first, int count); - -#ifndef NO_INLINE_MEMORY_ACCESS - -#define longget(addr) (call_mem_get_func(get_mem_bank(addr).lget, addr)) -#define wordget(addr) (call_mem_get_func(get_mem_bank(addr).wget, addr)) -#define byteget(addr) (call_mem_get_func(get_mem_bank(addr).bget, addr)) -#define longput(addr,l) (call_mem_put_func(get_mem_bank(addr).lput, addr, l)) -#define wordput(addr,w) (call_mem_put_func(get_mem_bank(addr).wput, addr, w)) -#define byteput(addr,b) (call_mem_put_func(get_mem_bank(addr).bput, addr, b)) - -#else - -extern uae_u32 longget(uaecptr addr); -extern uae_u32 wordget(uaecptr addr); -extern uae_u32 byteget(uaecptr addr); -extern void longput(uaecptr addr, uae_u32 l); -extern void wordput(uaecptr addr, uae_u32 w); -extern void byteput(uaecptr addr, uae_u32 b); - -#endif - -#ifndef MD_HAVE_MEM_1_FUNCS - -#define longget_1 longget -#define wordget_1 wordget -#define byteget_1 byteget -#define longput_1 longput -#define wordput_1 wordput -#define byteput_1 byteput - -#endif - -#endif /* !DIRECT_ADDRESSING && !REAL_ADDRESSING */ - -#if REAL_ADDRESSING -const uintptr MEMBaseDiff = 0; -#elif DIRECT_ADDRESSING +#if DIRECT_ADDRESSING extern uintptr MEMBaseDiff; #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { return (uae_u8 *)MEMBaseDiff + addr; @@ -170,38 +74,7 @@ static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) { return do_get_virtual_address(addr); } -#else -static __inline__ uae_u32 get_long(uaecptr addr) -{ - return longget_1(addr); -} -static __inline__ uae_u32 get_word(uaecptr addr) -{ - return wordget_1(addr); -} -static __inline__ uae_u32 get_byte(uaecptr addr) -{ - return byteget_1(addr); -} -static __inline__ void put_long(uaecptr addr, uae_u32 l) -{ - longput_1(addr, l); -} -static __inline__ void put_word(uaecptr addr, uae_u32 w) -{ - wordput_1(addr, w); -} -static __inline__ void put_byte(uaecptr addr, uae_u32 b) -{ - byteput_1(addr, b); -} -static __inline__ uae_u8 *get_real_address(uaecptr addr) -{ - return get_mem_bank(addr).xlateaddr(addr); -} -/* gb-- deliberately not implemented since it shall not be used... */ -extern uae_u32 get_virtual_address(uae_u8 *addr); -#endif /* DIRECT_ADDRESSING || REAL_ADDRESSING */ +#endif /* DIRECT_ADDRESSING */ #endif /* MEMORY_H */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index 4e45817bf..a88ebf5ea 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -36,17 +36,12 @@ extern int intlev(void); // From baisilisk_glue.cpp #include "memory.h" #include "readcpu.h" #include "newcpu.h" -#include "compiler/compemu.h" #include "fpu/fpu.h" #if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) B2_mutex *spcflags_lock = NULL; #endif -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif bool quit_program = false; struct flag_struct regflags; @@ -122,20 +117,12 @@ static void dump_log(void) #else fprintf(f, " | "); #endif -#if ENABLE_MON - disass_68k(f, pc); -#endif + } fclose(f); } #endif -#if ENABLE_MON -static void dump_regs(void) -{ - m68k_dumpstate(NULL); -} -#endif #define COUNT_INSTRS 0 @@ -308,7 +295,7 @@ static int backup_pointer = 0; static long int m68kpc_offset; int lastint_no; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING #define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) #define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) #define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) @@ -860,16 +847,7 @@ int m68k_move2c (int regno, uae_u32 *regp) case 1: regs.dfc = *regp & 7; break; case 2: cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); -#if USE_JIT - if (CPUType < 4) { - set_cache_state(cacr&1); - if (*regp & 0x08) - flush_icache(1); - } - else { - set_cache_state(cacr&0x8000); - } -#endif + break; case 3: tc = *regp & 0xc000; break; case 4: itt0 = *regp & 0xffffe364; break; @@ -1209,17 +1187,6 @@ void m68k_reset (void) memset(log, 0, sizeof(log)); #endif -#if ENABLE_MON - static bool first_time = true; - if (first_time) { - first_time = false; - mon_add_command("regs", dump_regs, "regs Dump m68k emulator registers\n"); -#if FLIGHT_RECORDER - // Install "log" command in mon - mon_add_command("log", dump_log, "log Dump m68k emulation log\n"); -#endif - } -#endif } void m68k_emulop_return(void) @@ -1263,9 +1230,6 @@ void REGPARAM2 op_illg (uae_u32 opcode) } write_log ("Illegal instruction: %04x at %08lx\n", opcode, pc); -#if USE_JIT && JIT_DEBUG - compiler_dumpstate(); -#endif Exception (4,0); return; @@ -1323,18 +1287,7 @@ static void do_trace (void) int m68k_do_specialties (void) { -#if USE_JIT - // Block was compiled - SPCFLAGS_CLEAR( SPCFLAG_JIT_END_COMPILE ); - - // Retain the request to get out of compiled code until - // we reached the toplevel execution, i.e. the one that - // can compile then run compiled code. This also means - // we processed all (nested) EmulOps - if ((m68k_execute_depth == 0) && SPCFLAGS_TEST( SPCFLAG_JIT_EXEC_RETURN )) - SPCFLAGS_CLEAR( SPCFLAG_JIT_EXEC_RETURN ); -#endif - + if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { Exception (9,last_trace_ad); } @@ -1389,17 +1342,13 @@ void m68k_do_execute (void) void m68k_execute (void) { -#if USE_JIT - ++m68k_execute_depth; -#endif + for (;;) { if (quit_program) break; m68k_do_execute(); } -#if USE_JIT - --m68k_execute_depth; -#endif + } static void m68k_verify (uaecptr addr, uaecptr *nextpc) diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index 1d07c36b8..a15d79d80 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -63,16 +63,6 @@ struct cputbl { extern cpuop_func *cpufunctbl[65536] ASM_SYM("cpufunctbl"); -#if USE_JIT -typedef void compop_func (uae_u32) REGPARAM; - -struct comptbl { - compop_func *handler; - uae_u32 specific; - uae_u32 opcode; -}; -#endif - extern void REGPARAM2 op_illg (uae_u32) REGPARAM; typedef char flagtype; @@ -200,7 +190,7 @@ static __inline__ uae_u32 next_ilong (void) static __inline__ void m68k_setpc (uaecptr newpc) { -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING regs.pc_p = get_real_address(newpc); #else regs.pc_p = regs.pc_oldp = get_real_address(newpc); @@ -210,7 +200,7 @@ static __inline__ void m68k_setpc (uaecptr newpc) static __inline__ uaecptr m68k_getpc (void) { -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING return get_virtual_address(regs.pc_p); #else return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); @@ -300,9 +290,7 @@ extern void m68k_record_step(uaecptr) REGPARAM; #endif extern void m68k_do_execute(void); extern void m68k_execute(void); -#if USE_JIT -extern void m68k_compile_execute(void); -#endif + #ifdef USE_CPU_EMUL_SERVICES extern int32 emulated_ticks; extern void cpu_do_check_ticks(void); diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h index 3c3fc0322..494f4fccc 100644 --- a/BasiliskII/src/uae_cpu/spcflags.h +++ b/BasiliskII/src/uae_cpu/spcflags.h @@ -32,14 +32,10 @@ enum { SPCFLAG_TRACE = 0x08, SPCFLAG_DOTRACE = 0x10, SPCFLAG_DOINT = 0x20, -#if USE_JIT - SPCFLAG_JIT_END_COMPILE = 0x40, - SPCFLAG_JIT_EXEC_RETURN = 0x80, -#else + SPCFLAG_JIT_END_COMPILE = 0, SPCFLAG_JIT_EXEC_RETURN = 0, -#endif - + SPCFLAG_ALL = SPCFLAG_STOP | SPCFLAG_INT | SPCFLAG_BRK diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index f4861825e..81614a249 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -33,11 +33,7 @@ #include "sysdeps.h" #include "user_strings.h" -#ifdef __BEOS__ -#define ELLIPSIS "\xE2\x80\xA6" -#else #define ELLIPSIS "..." -#endif // Common string definitions From 76d285a6f2e0080082c09d4c670c6d85401d71e4 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 15 Apr 2018 15:59:59 -0500 Subject: [PATCH 205/534] Convert buildsystem to CMake --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 7 +- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 7 +- BasiliskII/src/Unix/CMakeLists.txt | 94 + BasiliskII/src/Unix/Makefile.in | 145 -- BasiliskII/src/Unix/acinclude.m4 | 28 - BasiliskII/src/Unix/autogen.sh | 61 - BasiliskII/src/Unix/config.guess | 1409 ----------- BasiliskII/src/Unix/config.sub | 1469 ------------ BasiliskII/src/Unix/configure.ac | 953 -------- BasiliskII/src/Unix/cpr.sh | 59 - BasiliskII/src/Unix/install-sh | 251 -- BasiliskII/src/Unix/m4/egrep.m4 | 13 - BasiliskII/src/Unix/m4/esd.m4 | 194 -- BasiliskII/src/Unix/m4/gettext.m4 | 2576 --------------------- BasiliskII/src/Unix/m4/gtk-2.0.m4 | 196 -- BasiliskII/src/Unix/m4/gtk.m4 | 194 -- BasiliskII/src/Unix/mkinstalldirs | 99 - BasiliskII/src/Unix/sysdeps.h | 540 ++++- BasiliskII/src/Unix/tunconfig | 102 - BasiliskII/src/uae_cpu/fpu/types.h | 24 - 20 files changed, 550 insertions(+), 7871 deletions(-) create mode 100644 BasiliskII/src/Unix/CMakeLists.txt delete mode 100644 BasiliskII/src/Unix/Makefile.in delete mode 100644 BasiliskII/src/Unix/acinclude.m4 delete mode 100755 BasiliskII/src/Unix/autogen.sh delete mode 100755 BasiliskII/src/Unix/config.guess delete mode 100755 BasiliskII/src/Unix/config.sub delete mode 100644 BasiliskII/src/Unix/configure.ac delete mode 100755 BasiliskII/src/Unix/cpr.sh delete mode 100755 BasiliskII/src/Unix/install-sh delete mode 100644 BasiliskII/src/Unix/m4/egrep.m4 delete mode 100644 BasiliskII/src/Unix/m4/esd.m4 delete mode 100644 BasiliskII/src/Unix/m4/gettext.m4 delete mode 100644 BasiliskII/src/Unix/m4/gtk-2.0.m4 delete mode 100644 BasiliskII/src/Unix/m4/gtk.m4 delete mode 100755 BasiliskII/src/Unix/mkinstalldirs delete mode 100755 BasiliskII/src/Unix/tunconfig diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index 41a5d04e5..13c498b7f 100644 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -27,14 +27,13 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +#define NEED_CONFIG_H_ONLY +#include "sysdeps.h" + #ifdef HAVE_UNISTD_H #include #endif -#ifdef HAVE_CONFIG_H -#include "config.h" -#endif - #include #include #include diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 0dde455c8..d529337ff 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -19,13 +19,10 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ -#ifdef HAVE_CONFIG_H -#include "config.h" -#endif +#define NEED_CONFIG_H_ONLY +#include "sysdeps.h" -#ifdef HAVE_FCNTL_H #include -#endif #include #include diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt new file mode 100644 index 000000000..0d3f9b9d1 --- /dev/null +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -0,0 +1,94 @@ +cmake_minimum_required(VERSION 3.0.0) +project(BasiliskII) + + +find_package(SDL REQUIRED) +find_library(COREFOUNDATION_LIBRARY CoreFoundation) +find_library(IOKIT_LIBRARY IOKit) +include_directories(../include . ../CrossPlatform ../uae_cpu ${SDL_INCLUDE_DIR}) + +add_executable(build68k ../uae_cpu/build68k.c) + +add_custom_command(OUTPUT cpudefs.cpp + COMMAND build68k < ${CMAKE_CURRENT_SOURCE_DIR}/../uae_cpu/table68k > cpudefs.cpp + DEPENDS ${CMAKE_CURRENT_SOURCE_DIR}/../uae_cpu/table68k build68k) + +add_executable(gencpu ../uae_cpu/gencpu.c ../uae_cpu/readcpu.cpp cpudefs.cpp) + +add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp COMMAND gencpu DEPENDS gencpu) + +set(BasiliskII_SRCS + ../main.cpp + ../prefs.cpp + ../prefs_items.cpp + sys_unix.cpp + ../rom_patches.cpp + ../slot_rom.cpp + ../rsrc_patches.cpp + ../emul_op.cpp + ../macos_util.cpp + ../xpram.cpp + xpram_unix.cpp + ../timer.cpp + timer_unix.cpp + ../adb.cpp + ../serial.cpp + ../ether.cpp + ../sony.cpp + ../disk.cpp + ../cdrom.cpp + ../scsi.cpp + ../video.cpp + ../audio.cpp + ../extfs.cpp + ../user_strings.cpp + user_strings_unix.cpp + rpc_unix.cpp + # XPLAT_SRCS + ../CrossPlatform/vm_alloc.cpp + ../CrossPlatform/sigsegv.cpp + ../CrossPlatform/video_blit.cpp + #SYSSRC + #SDL USE_SDL USE_SDL_VIDEO USE_SDL_AUDIO + #video src + ../SDL/video_sdl.cpp + #EXTFSSRC + extfs_unix.cpp + #Serial src + ../dummy/serial_dummy.cpp + #ether src + ../dummy/ether_dummy.cpp + #scsi src + ../dummy/scsi_dummy.cpp + #audio src + ../SDL/audio_sdl.cpp + #sem src: posix_sem.cpp + #ui src + ../dummy/prefs_editor_dummy.cpp + #extra sys + Darwin/sys_darwin.cpp + main_unix.cpp + prefs_unix.cpp + ../dummy/clip_dummy.cpp + + #CPU srcs + #add define -DFPU_UAE + ../uae_cpu/basilisk_glue.cpp + ../uae_cpu/newcpu.cpp + ../uae_cpu/readcpu.cpp + ../uae_cpu/fpu/fpu_uae.cpp + cpustbl.cpp + cpudefs.cpp + cpuemu.cpp + #addressing mode =direct -DDIRECT_ADDRESSING + #includes +) + +add_executable(BasiliskII ${BasiliskII_SRCS}) + +set_source_files_properties(${BasiliskII_SRCS} + PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DFPU_UAE -DDATADIR=\\\".\\\"") + +target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) + +#keycodes -> ../SDL/keycodes diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in deleted file mode 100644 index 389e8eed1..000000000 --- a/BasiliskII/src/Unix/Makefile.in +++ /dev/null @@ -1,145 +0,0 @@ -# Unix makefile for Basilisk II - -## System specific configuration -@SET_MAKE@ -SHELL = /bin/sh - -prefix = @prefix@ -exec_prefix = @exec_prefix@ -bindir = @bindir@ -datadir = @datadir@ -mandir = @mandir@ -man1dir = $(mandir)/man1 - -KEYCODES = @KEYCODES@ - -DESTDIR = - -CC = @CC@ -CXX = @CXX@ -CFLAGS = @CFLAGS@ -CXXFLAGS = @CXXFLAGS@ -CPUINCLUDES_FLAGS=@CPUINCLUDES@ -CPUINCLUDES_FLAGS:=$(CPUINCLUDES_FLAGS:-I%=-I@top_srcdir@/%) -CPPFLAGS = @CPPFLAGS@ -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -DEFS = @DEFS@ @DEFINES@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" -LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -SYSSRCS = @SYSSRCS@ -CPUSRCS = @CPUSRCS@ -BLESS = @BLESS@ -EXEEXT = @EXEEXT@ -INSTALL = @INSTALL@ -INSTALL_PROGRAM = @INSTALL_PROGRAM@ -INSTALL_DATA = @INSTALL_DATA@ - -XPLAT_SRCS = ../CrossPlatform/vm_alloc.cpp ../CrossPlatform/sigsegv.cpp ../CrossPlatform/video_blit.cpp - -## Files -SRCS = ../main.cpp ../prefs.cpp ../prefs_items.cpp \ - sys_unix.cpp ../rom_patches.cpp ../slot_rom.cpp ../rsrc_patches.cpp \ - ../emul_op.cpp ../macos_util.cpp ../xpram.cpp xpram_unix.cpp ../timer.cpp \ - timer_unix.cpp ../adb.cpp ../serial.cpp ../ether.cpp \ - ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../video.cpp \ - ../audio.cpp ../extfs.cpp \ - ../user_strings.cpp user_strings_unix.cpp rpc_unix.cpp \ - $(XPLAT_SRCS) $(SYSSRCS) $(CPUSRCS) -APP_FLAVOR ?= -ifneq ($(APP_FLAVOR),) - CURR_APP_FLAVOR := -$(APP_FLAVOR) -else - CURR_APP_FLAVOR := -endif -APP_BASENAME = BasiliskII -APP = $(APP_BASENAME)$(CURR_APP_FLAVOR) - -PROGS = $(APP)$(EXEEXT) - -## Rules -.PHONY: install installdirs uninstall mostlyclean clean distclean depend dep -.SUFFIXES: -.SUFFIXES: .c .cpp .s .o .h - -all: $(PROGS) - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS := $(SRCS_LIST_TO_OBJS) -SRCS := $(SRCS:%=@top_srcdir@/%) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -## Documentation files - -$(APP)$(EXEEXT): $(OBJ_DIR) $(OBJS) - $(CXX) -o $@ $(LDFLAGS) $(OBJS) $(LIBS) - $(BLESS) $(APP)$(EXEEXT) - -install: $(PROGS) installdirs - $(INSTALL_PROGRAM) $(APP)$(EXEEXT) $(DESTDIR)$(bindir)/$(APP)$(EXEEXT) - -$(INSTALL_DATA) @top_srcdir@/$(APP_BASENAME).1 $(DESTDIR)$(man1dir)/$(APP).1 - $(INSTALL_DATA) @top_srcdir@/$(KEYCODES) $(DESTDIR)$(datadir)/$(APP)/keycodes - $(INSTALL_DATA) @top_srcdir@/fbdevices $(DESTDIR)$(datadir)/$(APP)/fbdevices - $(INSTALL_DATA) @top_srcdir@/tunconfig $(DESTDIR)$(datadir)/$(APP)/tunconfig - -installdirs: - $(SHELL) @top_srcdir@/mkinstalldirs $(DESTDIR)$(bindir) $(DESTDIR)$(man1dir) $(DESTDIR)$(datadir)/$(APP) - -uninstall: - rm -f $(DESTDIR)$(bindir)/$(APP)$(EXEEXT) - rm -f $(DESTDIR)$(man1dir)/$(APP).1 - rm -f $(DESTDIR)$(datadir)/$(APP)/keycodes - rm -f $(DESTDIR)$(datadir)/$(APP)/fbdevices - rm -f $(DESTDIR)$(datadir)/$(APP)/tunconfig - rmdir $(DESTDIR)$(datadir)/$(APP) - -mostlyclean: - rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak - -clean: mostlyclean - rm -f cpuemu.cpp cpudefs.cpp cputmp*.s cpufast*.s cpustbl.cpp cputbl.h - -distclean: clean - rm -rf $(OBJ_DIR) - rm -rf autom4te.cache - rm -f Makefile - rm -f config.cache config.log config.status config.h - rm -f Darwin/lowmem Darwin/pagezero - -depend dep: - makedepend $(CPPFLAGS) -Y. $(SRCS) 2>/dev/null - -$(OBJ_DIR)/%.o : %.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.m - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.mm - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.s - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ - -$(OBJ_DIR)/build68k$(EXEEXT): $(OBJ_DIR)/build68k.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/build68k$(EXEEXT) $(OBJ_DIR)/build68k.o -$(OBJ_DIR)/gencpu$(EXEEXT): $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o - $(CXX) $(LDFLAGS) -o $(OBJ_DIR)/gencpu$(EXEEXT) $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o - -cpudefs.cpp: $(OBJ_DIR)/build68k$(EXEEXT) @top_srcdir@/../uae_cpu/table68k - $(OBJ_DIR)/build68k$(EXEEXT) <@top_srcdir@/../uae_cpu/table68k >cpudefs.cpp -cpustbl.cpp: cpuemu.cpp -cputbl.h: cpuemu.cpp - -cpuemu.cpp: $(OBJ_DIR)/gencpu$(EXEEXT) - $(OBJ_DIR)/gencpu$(EXEEXT) - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/BasiliskII/src/Unix/acinclude.m4 b/BasiliskII/src/Unix/acinclude.m4 deleted file mode 100644 index cd5479ec5..000000000 --- a/BasiliskII/src/Unix/acinclude.m4 +++ /dev/null @@ -1,28 +0,0 @@ -dnl Additional macros for Basilisk II - - -dnl Check for libgnomeui -dnl B2_PATH_GNOMEUI([ACTION-IF-FOUND [, ACTION-IF-NOT-FOUND]]) -dnl Test to see if libgnomeui is installed, and define GNOMEUI_CFLAGS, LIBS -AC_DEFUN([B2_PATH_GNOMEUI], -[dnl -dnl Get the cflags and libraries from the gnome-config script -dnl -AC_ARG_WITH(gnome-config, -[ --with-gnome-config=GNOME_CONFIG Location of gnome-config], -GNOME_CONFIG="$withval") - -AC_PATH_PROG(GNOME_CONFIG, gnome-config, no) -AC_MSG_CHECKING(for libgnomeui) -if test "$GNOME_CONFIG" = "no"; then - AC_MSG_RESULT(no) - ifelse([$2], , :, [$2]) -else - AC_MSG_RESULT(yes) - GNOMEUI_CFLAGS=`$GNOME_CONFIG --cflags gnomeui` - GNOMEUI_LIBS=`$GNOME_CONFIG --libs gnomeui` - ifelse([$1], , :, [$1]) -fi -AC_SUBST(GNOMEUI_CFLAGS) -AC_SUBST(GNOMEUI_LIBS) -]) diff --git a/BasiliskII/src/Unix/autogen.sh b/BasiliskII/src/Unix/autogen.sh deleted file mode 100755 index e77a310b6..000000000 --- a/BasiliskII/src/Unix/autogen.sh +++ /dev/null @@ -1,61 +0,0 @@ -#! /bin/sh -# Run this to generate all the initial makefiles, etc. -# This was lifted from the Gimp, and adapted slightly by -# Christian Bauer. - -DIE=0 - -PROG="Basilisk II" - -# Check how echo works in this /bin/sh -case `echo -n` in --n) _echo_n= _echo_c='\c';; -*) _echo_n=-n _echo_c=;; -esac - -(autoconf --version) < /dev/null > /dev/null 2>&1 || { - echo - echo "You must have autoconf installed to compile $PROG." - echo "Download the appropriate package for your distribution," - echo "or get the source tarball at ftp://ftp.gnu.org/pub/gnu/" - DIE=1 -} - -(aclocal --version) < /dev/null > /dev/null 2>&1 || { - echo - echo "**Error**: Missing aclocal. The version of automake" - echo "installed doesn't appear recent enough." - echo "Get ftp://ftp.gnu.org/pub/gnu/automake-1.3.tar.gz" - echo "(or a newer version if it is available)" - DIE=1 -} - -if test "$DIE" -eq 1; then - exit 1 -fi - -if test -z "$ACLOCAL_FLAGS"; then - ACLOCAL_FLAGS="-I `aclocal --print-ac-dir` -I `dirname $0`/m4" -fi - -aclocalinclude="$ACLOCAL_FLAGS"; \ -(echo $_echo_n " + Running aclocal: $_echo_c"; \ - aclocal $aclocalinclude; \ - echo "done.") && \ -(echo $_echo_n " + Running autoheader: $_echo_c"; \ - autoheader; \ - echo "done.") && \ -(echo $_echo_n " + Running autoconf: $_echo_c"; \ - autoconf; \ - echo "done.") - -rm -f config.cache - -if [ x"$NO_CONFIGURE" = "x" ]; then - echo " + Running 'configure $@':" - if [ -z "$*" ]; then - echo " ** If you wish to pass arguments to ./configure, please" - echo " ** specify them on the command line." - fi - ./configure "$@" -fi diff --git a/BasiliskII/src/Unix/config.guess b/BasiliskII/src/Unix/config.guess deleted file mode 100755 index 78f6b92cd..000000000 --- a/BasiliskII/src/Unix/config.guess +++ /dev/null @@ -1,1409 +0,0 @@ -#! /bin/sh -# Attempt to guess a canonical system name. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. - -timestamp='2003-01-10' - -# This file 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. -# -# As a special exception to the GNU General Public License, if you -# distribute this file as part of a program that contains a -# configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. - -# Originally written by Per Bothner . -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. -# -# This script attempts to guess a canonical system name similar to -# config.sub. If it succeeds, it prints the system name on stdout, and -# exits with 0. Otherwise, it exits with 1. -# -# The plan is that this can be called by configure scripts if you -# don't specify an explicit build system type. - -me=`echo "$0" | sed -e 's,.*/,,'` - -usage="\ -Usage: $0 [OPTION] - -Output the configuration name of the system \`$me' is run on. - -Operation modes: - -h, --help print this help, then exit - -t, --time-stamp print date of last modification, then exit - -v, --version print version number, then exit - -Report bugs and patches to ." - -version="\ -GNU config.guess ($timestamp) - -Originally written by Per Bothner. -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. - -This is free software; see the source for copying conditions. There is NO -warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." - -help=" -Try \`$me --help' for more information." - -# Parse command line -while test $# -gt 0 ; do - case $1 in - --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; - --version | -v ) - echo "$version" ; exit 0 ;; - --help | --h* | -h ) - echo "$usage"; exit 0 ;; - -- ) # Stop option processing - shift; break ;; - - ) # Use stdin as input. - break ;; - -* ) - echo "$me: invalid option $1$help" >&2 - exit 1 ;; - * ) - break ;; - esac -done - -if test $# != 0; then - echo "$me: too many arguments$help" >&2 - exit 1 -fi - -trap 'exit 1' 1 2 15 - -# CC_FOR_BUILD -- compiler used by this script. Note that the use of a -# compiler to aid in system detection is discouraged as it requires -# temporary files to be created and, as you can see below, it is a -# headache to deal with in a portable fashion. - -# Historically, `CC_FOR_BUILD' used to be named `HOST_CC'. We still -# use `HOST_CC' if defined, but it is deprecated. - -# Portable tmp directory creation inspired by the Autoconf team. - -set_cc_for_build=' -trap "exitcode=\$?; (rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null) && exit \$exitcode" 0 ; -trap "rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null; exit 1" 1 2 13 15 ; -: ${TMPDIR=/tmp} ; - { tmp=`(umask 077 && mktemp -d -q "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || - { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir $tmp) ; } || - { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } ; -dummy=$tmp/dummy ; -tmpfiles="$dummy.c $dummy.o $dummy.rel $dummy" ; -case $CC_FOR_BUILD,$HOST_CC,$CC in - ,,) echo "int x;" > $dummy.c ; - for c in cc gcc c89 c99 ; do - if ($c -c -o $dummy.o $dummy.c) >/dev/null 2>&1 ; then - CC_FOR_BUILD="$c"; break ; - fi ; - done ; - if test x"$CC_FOR_BUILD" = x ; then - CC_FOR_BUILD=no_compiler_found ; - fi - ;; - ,,*) CC_FOR_BUILD=$CC ;; - ,*,*) CC_FOR_BUILD=$HOST_CC ;; -esac ;' - -# This is needed to find uname on a Pyramid OSx when run in the BSD universe. -# (ghazi@noc.rutgers.edu 1994-08-24) -if (test -f /.attbin/uname) >/dev/null 2>&1 ; then - PATH=$PATH:/.attbin ; export PATH -fi - -UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown -UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown -UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown -UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown - -# Note: order is significant - the case branches are not exclusive. - -case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in - *:NetBSD:*:*) - # NetBSD (nbsd) targets should (where applicable) match one or - # more of the tupples: *-*-netbsdelf*, *-*-netbsdaout*, - # *-*-netbsdecoff* and *-*-netbsd*. For targets that recently - # switched to ELF, *-*-netbsd* would select the old - # object file format. This provides both forward - # compatibility and a consistent mechanism for selecting the - # object file format. - # - # Note: NetBSD doesn't particularly care about the vendor - # portion of the name. We always set it to "unknown". - sysctl="sysctl -n hw.machine_arch" - UNAME_MACHINE_ARCH=`(/sbin/$sysctl 2>/dev/null || \ - /usr/sbin/$sysctl 2>/dev/null || echo unknown)` - case "${UNAME_MACHINE_ARCH}" in - armeb) machine=armeb-unknown ;; - arm*) machine=arm-unknown ;; - sh3el) machine=shl-unknown ;; - sh3eb) machine=sh-unknown ;; - *) machine=${UNAME_MACHINE_ARCH}-unknown ;; - esac - # The Operating System including object format, if it has switched - # to ELF recently, or will in the future. - case "${UNAME_MACHINE_ARCH}" in - arm*|i386|m68k|ns32k|sh3*|sparc|vax) - eval $set_cc_for_build - if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \ - | grep __ELF__ >/dev/null - then - # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout). - # Return netbsd for either. FIX? - os=netbsd - else - os=netbsdelf - fi - ;; - *) - os=netbsd - ;; - esac - # The OS release - # Debian GNU/NetBSD machines have a different userland, and - # thus, need a distinct triplet. However, they do not need - # kernel version information, so it can be replaced with a - # suitable tag, in the style of linux-gnu. - case "${UNAME_VERSION}" in - Debian*) - release='-gnu' - ;; - *) - release=`echo ${UNAME_RELEASE}|sed -e 's/[-_].*/\./'` - ;; - esac - # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: - # contains redundant information, the shorter form: - # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used. - echo "${machine}-${os}${release}" - exit 0 ;; - amiga:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - arc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - hp300:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mac68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - macppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme88k:OpenBSD:*:*) - echo m88k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvmeppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - pmax:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sgi:OpenBSD:*:*) - echo mipseb-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sun3:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - wgrisc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - *:OpenBSD:*:*) - echo ${UNAME_MACHINE}-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - *:MicroBSD:*:*) - echo ${UNAME_MACHINE}-unknown-microbsd${UNAME_RELEASE} - exit 0 ;; - alpha:OSF1:*:*) - if test $UNAME_RELEASE = "V4.0"; then - UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` - fi - # A Vn.n version is a released version. - # A Tn.n version is a released field test version. - # A Xn.n version is an unreleased experimental baselevel. - # 1.2 uses "1.2" for uname -r. - eval $set_cc_for_build - cat <$dummy.s - .data -\$Lformat: - .byte 37,100,45,37,120,10,0 # "%d-%x\n" - - .text - .globl main - .align 4 - .ent main -main: - .frame \$30,16,\$26,0 - ldgp \$29,0(\$27) - .prologue 1 - .long 0x47e03d80 # implver \$0 - lda \$2,-1 - .long 0x47e20c21 # amask \$2,\$1 - lda \$16,\$Lformat - mov \$0,\$17 - not \$1,\$18 - jsr \$26,printf - ldgp \$29,0(\$26) - mov 0,\$16 - jsr \$26,exit - .end main -EOF - $CC_FOR_BUILD -o $dummy $dummy.s 2>/dev/null - if test "$?" = 0 ; then - case `$dummy` in - 0-0) - UNAME_MACHINE="alpha" - ;; - 1-0) - UNAME_MACHINE="alphaev5" - ;; - 1-1) - UNAME_MACHINE="alphaev56" - ;; - 1-101) - UNAME_MACHINE="alphapca56" - ;; - 2-303) - UNAME_MACHINE="alphaev6" - ;; - 2-307) - UNAME_MACHINE="alphaev67" - ;; - 2-1307) - UNAME_MACHINE="alphaev68" - ;; - 3-1307) - UNAME_MACHINE="alphaev7" - ;; - esac - fi - echo ${UNAME_MACHINE}-dec-osf`echo ${UNAME_RELEASE} | sed -e 's/^[VTX]//' | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - exit 0 ;; - Alpha\ *:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # Should we change UNAME_MACHINE based on the output of uname instead - # of the specific Alpha model? - echo alpha-pc-interix - exit 0 ;; - 21064:Windows_NT:50:3) - echo alpha-dec-winnt3.5 - exit 0 ;; - Amiga*:UNIX_System_V:4.0:*) - echo m68k-unknown-sysv4 - exit 0;; - *:[Aa]miga[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-amigaos - exit 0 ;; - *:[Mm]orph[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-morphos - exit 0 ;; - *:OS/390:*:*) - echo i370-ibm-openedition - exit 0 ;; - arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*) - echo arm-acorn-riscix${UNAME_RELEASE} - exit 0;; - SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*) - echo hppa1.1-hitachi-hiuxmpp - exit 0;; - Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) - # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. - if test "`(/bin/universe) 2>/dev/null`" = att ; then - echo pyramid-pyramid-sysv3 - else - echo pyramid-pyramid-bsd - fi - exit 0 ;; - NILE*:*:*:dcosx) - echo pyramid-pyramid-svr4 - exit 0 ;; - DRS?6000:UNIX_SV:4.2*:7*) - case `/usr/bin/uname -p` in - sparc) echo sparc-icl-nx7 && exit 0 ;; - esac ;; - sun4H:SunOS:5.*:*) - echo sparc-hal-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) - echo sparc-sun-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - i86pc:SunOS:5.*:*) - echo i386-pc-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - sun4*:SunOS:6*:*) - # According to config.sub, this is the proper way to canonicalize - # SunOS6. Hard to guess exactly what SunOS6 will be like, but - # it's likely to be more like Solaris than SunOS4. - echo sparc-sun-solaris3`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - sun4*:SunOS:*:*) - case "`/usr/bin/arch -k`" in - Series*|S4*) - UNAME_RELEASE=`uname -v` - ;; - esac - # Japanese Language versions have a version number like `4.1.3-JL'. - echo sparc-sun-sunos`echo ${UNAME_RELEASE}|sed -e 's/-/_/'` - exit 0 ;; - sun3*:SunOS:*:*) - echo m68k-sun-sunos${UNAME_RELEASE} - exit 0 ;; - sun*:*:4.2BSD:*) - UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` - test "x${UNAME_RELEASE}" = "x" && UNAME_RELEASE=3 - case "`/bin/arch`" in - sun3) - echo m68k-sun-sunos${UNAME_RELEASE} - ;; - sun4) - echo sparc-sun-sunos${UNAME_RELEASE} - ;; - esac - exit 0 ;; - aushp:SunOS:*:*) - echo sparc-auspex-sunos${UNAME_RELEASE} - exit 0 ;; - # The situation for MiNT is a little confusing. The machine name - # can be virtually everything (everything which is not - # "atarist" or "atariste" at least should have a processor - # > m68000). The system name ranges from "MiNT" over "FreeMiNT" - # to the lowercase version "mint" (or "freemint"). Finally - # the system name "TOS" denotes a system which is actually not - # MiNT. But MiNT is downward compatible to TOS, so this should - # be no problem. - atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; - atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; - *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; - milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*) - echo m68k-milan-mint${UNAME_RELEASE} - exit 0 ;; - hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*) - echo m68k-hades-mint${UNAME_RELEASE} - exit 0 ;; - *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*) - echo m68k-unknown-mint${UNAME_RELEASE} - exit 0 ;; - powerpc:machten:*:*) - echo powerpc-apple-machten${UNAME_RELEASE} - exit 0 ;; - RISC*:Mach:*:*) - echo mips-dec-mach_bsd4.3 - exit 0 ;; - RISC*:ULTRIX:*:*) - echo mips-dec-ultrix${UNAME_RELEASE} - exit 0 ;; - VAX*:ULTRIX*:*:*) - echo vax-dec-ultrix${UNAME_RELEASE} - exit 0 ;; - 2020:CLIX:*:* | 2430:CLIX:*:*) - echo clipper-intergraph-clix${UNAME_RELEASE} - exit 0 ;; - mips:*:*:UMIPS | mips:*:*:RISCos) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c -#ifdef __cplusplus -#include /* for printf() prototype */ - int main (int argc, char *argv[]) { -#else - int main (argc, argv) int argc; char *argv[]; { -#endif - #if defined (host_mips) && defined (MIPSEB) - #if defined (SYSTYPE_SYSV) - printf ("mips-mips-riscos%ssysv\n", argv[1]); exit (0); - #endif - #if defined (SYSTYPE_SVR4) - printf ("mips-mips-riscos%ssvr4\n", argv[1]); exit (0); - #endif - #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD) - printf ("mips-mips-riscos%sbsd\n", argv[1]); exit (0); - #endif - #endif - exit (-1); - } -EOF - $CC_FOR_BUILD -o $dummy $dummy.c \ - && $dummy `echo "${UNAME_RELEASE}" | sed -n 's/\([0-9]*\).*/\1/p'` \ - && exit 0 - echo mips-mips-riscos${UNAME_RELEASE} - exit 0 ;; - Motorola:PowerMAX_OS:*:*) - echo powerpc-motorola-powermax - exit 0 ;; - Motorola:*:4.3:PL8-*) - echo powerpc-harris-powermax - exit 0 ;; - Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*) - echo powerpc-harris-powermax - exit 0 ;; - Night_Hawk:Power_UNIX:*:*) - echo powerpc-harris-powerunix - exit 0 ;; - m88k:CX/UX:7*:*) - echo m88k-harris-cxux7 - exit 0 ;; - m88k:*:4*:R4*) - echo m88k-motorola-sysv4 - exit 0 ;; - m88k:*:3*:R3*) - echo m88k-motorola-sysv3 - exit 0 ;; - AViiON:dgux:*:*) - # DG/UX returns AViiON for all architectures - UNAME_PROCESSOR=`/usr/bin/uname -p` - if [ $UNAME_PROCESSOR = mc88100 ] || [ $UNAME_PROCESSOR = mc88110 ] - then - if [ ${TARGET_BINARY_INTERFACE}x = m88kdguxelfx ] || \ - [ ${TARGET_BINARY_INTERFACE}x = x ] - then - echo m88k-dg-dgux${UNAME_RELEASE} - else - echo m88k-dg-dguxbcs${UNAME_RELEASE} - fi - else - echo i586-dg-dgux${UNAME_RELEASE} - fi - exit 0 ;; - M88*:DolphinOS:*:*) # DolphinOS (SVR3) - echo m88k-dolphin-sysv3 - exit 0 ;; - M88*:*:R3*:*) - # Delta 88k system running SVR3 - echo m88k-motorola-sysv3 - exit 0 ;; - XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3) - echo m88k-tektronix-sysv3 - exit 0 ;; - Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD) - echo m68k-tektronix-bsd - exit 0 ;; - *:IRIX*:*:*) - echo mips-sgi-irix`echo ${UNAME_RELEASE}|sed -e 's/-/_/g'` - exit 0 ;; - ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. - echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id - exit 0 ;; # Note that: echo "'`uname -s`'" gives 'AIX ' - i*86:AIX:*:*) - echo i386-ibm-aix - exit 0 ;; - ia64:AIX:*:*) - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` - else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} - fi - echo ${UNAME_MACHINE}-ibm-aix${IBM_REV} - exit 0 ;; - *:AIX:2:3) - if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - - main() - { - if (!__power_pc()) - exit(1); - puts("powerpc-ibm-aix3.2.5"); - exit(0); - } -EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 - echo rs6000-ibm-aix3.2.5 - elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then - echo rs6000-ibm-aix3.2.4 - else - echo rs6000-ibm-aix3.2 - fi - exit 0 ;; - *:AIX:*:[45]) - IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` - if /usr/sbin/lsattr -El ${IBM_CPU_ID} | grep ' POWER' >/dev/null 2>&1; then - IBM_ARCH=rs6000 - else - IBM_ARCH=powerpc - fi - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` - else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} - fi - echo ${IBM_ARCH}-ibm-aix${IBM_REV} - exit 0 ;; - *:AIX:*:*) - echo rs6000-ibm-aix - exit 0 ;; - ibmrt:4.4BSD:*|romp-ibm:BSD:*) - echo romp-ibm-bsd4.4 - exit 0 ;; - ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and - echo romp-ibm-bsd${UNAME_RELEASE} # 4.3 with uname added to - exit 0 ;; # report: romp-ibm BSD 4.3 - *:BOSX:*:*) - echo rs6000-bull-bosx - exit 0 ;; - DPX/2?00:B.O.S.:*:*) - echo m68k-bull-sysv3 - exit 0 ;; - 9000/[34]??:4.3bsd:1.*:*) - echo m68k-hp-bsd - exit 0 ;; - hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*) - echo m68k-hp-bsd4.4 - exit 0 ;; - 9000/[34678]??:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - case "${UNAME_MACHINE}" in - 9000/31? ) HP_ARCH=m68000 ;; - 9000/[34]?? ) HP_ARCH=m68k ;; - 9000/[678][0-9][0-9]) - if [ -x /usr/bin/getconf ]; then - sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` - sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` - case "${sc_cpu_version}" in - 523) HP_ARCH="hppa1.0" ;; # CPU_PA_RISC1_0 - 528) HP_ARCH="hppa1.1" ;; # CPU_PA_RISC1_1 - 532) # CPU_PA_RISC2_0 - case "${sc_kernel_bits}" in - 32) HP_ARCH="hppa2.0n" ;; - 64) HP_ARCH="hppa2.0w" ;; - '') HP_ARCH="hppa2.0" ;; # HP-UX 10.20 - esac ;; - esac - fi - if [ "${HP_ARCH}" = "" ]; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - - #define _HPUX_SOURCE - #include - #include - - int main () - { - #if defined(_SC_KERNEL_BITS) - long bits = sysconf(_SC_KERNEL_BITS); - #endif - long cpu = sysconf (_SC_CPU_VERSION); - - switch (cpu) - { - case CPU_PA_RISC1_0: puts ("hppa1.0"); break; - case CPU_PA_RISC1_1: puts ("hppa1.1"); break; - case CPU_PA_RISC2_0: - #if defined(_SC_KERNEL_BITS) - switch (bits) - { - case 64: puts ("hppa2.0w"); break; - case 32: puts ("hppa2.0n"); break; - default: puts ("hppa2.0"); break; - } break; - #else /* !defined(_SC_KERNEL_BITS) */ - puts ("hppa2.0"); break; - #endif - default: puts ("hppa1.0"); break; - } - exit (0); - } -EOF - (CCOPTS= $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null) && HP_ARCH=`$dummy` - test -z "$HP_ARCH" && HP_ARCH=hppa - fi ;; - esac - if [ ${HP_ARCH} = "hppa2.0w" ] - then - # avoid double evaluation of $set_cc_for_build - test -n "$CC_FOR_BUILD" || eval $set_cc_for_build - if echo __LP64__ | (CCOPTS= $CC_FOR_BUILD -E -) | grep __LP64__ >/dev/null - then - HP_ARCH="hppa2.0w" - else - HP_ARCH="hppa64" - fi - fi - echo ${HP_ARCH}-hp-hpux${HPUX_REV} - exit 0 ;; - ia64:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - echo ia64-hp-hpux${HPUX_REV} - exit 0 ;; - 3050*:HI-UX:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - int - main () - { - long cpu = sysconf (_SC_CPU_VERSION); - /* The order matters, because CPU_IS_HP_MC68K erroneously returns - true for CPU_PA_RISC1_0. CPU_IS_PA_RISC returns correct - results, however. */ - if (CPU_IS_PA_RISC (cpu)) - { - switch (cpu) - { - case CPU_PA_RISC1_0: puts ("hppa1.0-hitachi-hiuxwe2"); break; - case CPU_PA_RISC1_1: puts ("hppa1.1-hitachi-hiuxwe2"); break; - case CPU_PA_RISC2_0: puts ("hppa2.0-hitachi-hiuxwe2"); break; - default: puts ("hppa-hitachi-hiuxwe2"); break; - } - } - else if (CPU_IS_HP_MC68K (cpu)) - puts ("m68k-hitachi-hiuxwe2"); - else puts ("unknown-hitachi-hiuxwe2"); - exit (0); - } -EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 - echo unknown-hitachi-hiuxwe2 - exit 0 ;; - 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:* ) - echo hppa1.1-hp-bsd - exit 0 ;; - 9000/8??:4.3bsd:*:*) - echo hppa1.0-hp-bsd - exit 0 ;; - *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*) - echo hppa1.0-hp-mpeix - exit 0 ;; - hp7??:OSF1:*:* | hp8?[79]:OSF1:*:* ) - echo hppa1.1-hp-osf - exit 0 ;; - hp8??:OSF1:*:*) - echo hppa1.0-hp-osf - exit 0 ;; - i*86:OSF1:*:*) - if [ -x /usr/sbin/sysversion ] ; then - echo ${UNAME_MACHINE}-unknown-osf1mk - else - echo ${UNAME_MACHINE}-unknown-osf1 - fi - exit 0 ;; - parisc*:Lites*:*:*) - echo hppa1.1-hp-lites - exit 0 ;; - C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*) - echo c1-convex-bsd - exit 0 ;; - C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*) - if getsysinfo -f scalar_acc - then echo c32-convex-bsd - else echo c2-convex-bsd - fi - exit 0 ;; - C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*) - echo c34-convex-bsd - exit 0 ;; - C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*) - echo c38-convex-bsd - exit 0 ;; - C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*) - echo c4-convex-bsd - exit 0 ;; - CRAY*Y-MP:*:*:*) - echo ymp-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; - CRAY*[A-Z]90:*:*:*) - echo ${UNAME_MACHINE}-cray-unicos${UNAME_RELEASE} \ - | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \ - -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \ - -e 's/\.[^.]*$/.X/' - exit 0 ;; - CRAY*TS:*:*:*) - echo t90-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; - CRAY*T3E:*:*:*) - echo alphaev5-cray-unicosmk${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; - CRAY*SV1:*:*:*) - echo sv1-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; - *:UNICOS/mp:*:*) - echo nv1-cray-unicosmp${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; - F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) - FUJITSU_PROC=`uname -m | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'` - FUJITSU_REL=`echo ${UNAME_RELEASE} | sed -e 's/ /_/'` - echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" - exit 0 ;; - i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) - echo ${UNAME_MACHINE}-pc-bsdi${UNAME_RELEASE} - exit 0 ;; - sparc*:BSD/OS:*:*) - echo sparc-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; - *:BSD/OS:*:*) - echo ${UNAME_MACHINE}-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; - *:FreeBSD:*:*) - # Determine whether the default compiler uses glibc. - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #if __GLIBC__ >= 2 - LIBC=gnu - #else - LIBC= - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - echo ${UNAME_MACHINE}-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`${LIBC:+-$LIBC} - exit 0 ;; - i*:CYGWIN*:*) - echo ${UNAME_MACHINE}-pc-cygwin - exit 0 ;; - i*:MINGW*:*) - echo ${UNAME_MACHINE}-pc-mingw32 - exit 0 ;; - i*:PW*:*) - echo ${UNAME_MACHINE}-pc-pw32 - exit 0 ;; - x86:Interix*:3*) - echo i586-pc-interix3 - exit 0 ;; - [345]86:Windows_95:* | [345]86:Windows_98:* | [345]86:Windows_NT:*) - echo i${UNAME_MACHINE}-pc-mks - exit 0 ;; - i*:Windows_NT*:* | Pentium*:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # It also conflicts with pre-2.0 versions of AT&T UWIN. Should we - # UNAME_MACHINE based on the output of uname instead of i386? - echo i586-pc-interix - exit 0 ;; - i*:UWIN*:*) - echo ${UNAME_MACHINE}-pc-uwin - exit 0 ;; - p*:CYGWIN*:*) - echo powerpcle-unknown-cygwin - exit 0 ;; - prep*:SunOS:5.*:*) - echo powerpcle-unknown-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - *:GNU:*:*) - echo `echo ${UNAME_MACHINE}|sed -e 's,[-/].*$,,'`-unknown-gnu`echo ${UNAME_RELEASE}|sed -e 's,/.*$,,'` - exit 0 ;; - i*86:Minix:*:*) - echo ${UNAME_MACHINE}-pc-minix - exit 0 ;; - arm*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - ia64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - m68*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - mips:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #undef CPU - #undef mips - #undef mipsel - #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mipsel - #else - #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips - #else - CPU= - #endif - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 - ;; - mips64:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #undef CPU - #undef mips64 - #undef mips64el - #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mips64el - #else - #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips64 - #else - CPU= - #endif - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 - ;; - ppc:Linux:*:*) - echo powerpc-unknown-linux-gnu - exit 0 ;; - ppc64:Linux:*:*) - echo powerpc64-unknown-linux-gnu - exit 0 ;; - alpha:Linux:*:*) - case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in - EV5) UNAME_MACHINE=alphaev5 ;; - EV56) UNAME_MACHINE=alphaev56 ;; - PCA56) UNAME_MACHINE=alphapca56 ;; - PCA57) UNAME_MACHINE=alphapca56 ;; - EV6) UNAME_MACHINE=alphaev6 ;; - EV67) UNAME_MACHINE=alphaev67 ;; - EV68*) UNAME_MACHINE=alphaev68 ;; - esac - objdump --private-headers /bin/sh | grep ld.so.1 >/dev/null - if test "$?" = 0 ; then LIBC="libc1" ; else LIBC="" ; fi - echo ${UNAME_MACHINE}-unknown-linux-gnu${LIBC} - exit 0 ;; - parisc:Linux:*:* | hppa:Linux:*:*) - # Look for CPU level - case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in - PA7*) echo hppa1.1-unknown-linux-gnu ;; - PA8*) echo hppa2.0-unknown-linux-gnu ;; - *) echo hppa-unknown-linux-gnu ;; - esac - exit 0 ;; - parisc64:Linux:*:* | hppa64:Linux:*:*) - echo hppa64-unknown-linux-gnu - exit 0 ;; - s390:Linux:*:* | s390x:Linux:*:*) - echo ${UNAME_MACHINE}-ibm-linux - exit 0 ;; - sh*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - sparc:Linux:*:* | sparc64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - x86_64:Linux:*:*) - echo x86_64-unknown-linux-gnu - exit 0 ;; - i*86:Linux:*:*) - # The BFD linker knows what the default object file format is, so - # first see if it will tell us. cd to the root directory to prevent - # problems with other programs or directories called `ld' in the path. - # Set LC_ALL=C to ensure ld outputs messages in English. - ld_supported_targets=`cd /; LC_ALL=C ld --help 2>&1 \ - | sed -ne '/supported targets:/!d - s/[ ][ ]*/ /g - s/.*supported targets: *// - s/ .*// - p'` - case "$ld_supported_targets" in - elf32-i386) - TENTATIVE="${UNAME_MACHINE}-pc-linux-gnu" - ;; - a.out-i386-linux) - echo "${UNAME_MACHINE}-pc-linux-gnuaout" - exit 0 ;; - coff-i386) - echo "${UNAME_MACHINE}-pc-linux-gnucoff" - exit 0 ;; - "") - # Either a pre-BFD a.out linker (linux-gnuoldld) or - # one that does not give us useful --help. - echo "${UNAME_MACHINE}-pc-linux-gnuoldld" - exit 0 ;; - esac - # Determine whether the default compiler is a.out or elf - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #ifdef __ELF__ - # ifdef __GLIBC__ - # if __GLIBC__ >= 2 - LIBC=gnu - # else - LIBC=gnulibc1 - # endif - # else - LIBC=gnulibc1 - # endif - #else - #ifdef __INTEL_COMPILER - LIBC=gnu - #else - LIBC=gnuaout - #endif - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - test x"${LIBC}" != x && echo "${UNAME_MACHINE}-pc-linux-${LIBC}" && exit 0 - test x"${TENTATIVE}" != x && echo "${TENTATIVE}" && exit 0 - ;; - i*86:DYNIX/ptx:4*:*) - # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there. - # earlier versions are messed up and put the nodename in both - # sysname and nodename. - echo i386-sequent-sysv4 - exit 0 ;; - i*86:UNIX_SV:4.2MP:2.*) - # Unixware is an offshoot of SVR4, but it has its own version - # number series starting with 2... - # I am not positive that other SVR4 systems won't match this, - # I just have to hope. -- rms. - # Use sysv4.2uw... so that sysv4* matches it. - echo ${UNAME_MACHINE}-pc-sysv4.2uw${UNAME_VERSION} - exit 0 ;; - i*86:OS/2:*:*) - # If we were able to find `uname', then EMX Unix compatibility - # is probably installed. - echo ${UNAME_MACHINE}-pc-os2-emx - exit 0 ;; - i*86:XTS-300:*:STOP) - echo ${UNAME_MACHINE}-unknown-stop - exit 0 ;; - i*86:atheos:*:*) - echo ${UNAME_MACHINE}-unknown-atheos - exit 0 ;; - i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.0*:*) - echo i386-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - i*86:*DOS:*:*) - echo ${UNAME_MACHINE}-pc-msdosdjgpp - exit 0 ;; - i*86:*:4.*:* | i*86:SYSTEM_V:4.*:*) - UNAME_REL=`echo ${UNAME_RELEASE} | sed 's/\/MP$//'` - if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then - echo ${UNAME_MACHINE}-univel-sysv${UNAME_REL} - else - echo ${UNAME_MACHINE}-pc-sysv${UNAME_REL} - fi - exit 0 ;; - i*86:*:5:[78]*) - case `/bin/uname -X | grep "^Machine"` in - *486*) UNAME_MACHINE=i486 ;; - *Pentium) UNAME_MACHINE=i586 ;; - *Pent*|*Celeron) UNAME_MACHINE=i686 ;; - esac - echo ${UNAME_MACHINE}-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION} - exit 0 ;; - i*86:*:3.2:*) - if test -f /usr/options/cb.name; then - UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then - UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` - (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 - (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \ - && UNAME_MACHINE=i586 - (/bin/uname -X|grep '^Machine.*Pent *II' >/dev/null) \ - && UNAME_MACHINE=i686 - (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \ - && UNAME_MACHINE=i686 - echo ${UNAME_MACHINE}-pc-sco$UNAME_REL - else - echo ${UNAME_MACHINE}-pc-sysv32 - fi - exit 0 ;; - pc:*:*:*) - # Left here for compatibility: - # uname -m prints for DJGPP always 'pc', but it prints nothing about - # the processor, so we play safe by assuming i386. - echo i386-pc-msdosdjgpp - exit 0 ;; - Intel:Mach:3*:*) - echo i386-pc-mach3 - exit 0 ;; - paragon:*:*:*) - echo i860-intel-osf1 - exit 0 ;; - i860:*:4.*:*) # i860-SVR4 - if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then - echo i860-stardent-sysv${UNAME_RELEASE} # Stardent Vistra i860-SVR4 - else # Add other i860-SVR4 vendors below as they are discovered. - echo i860-unknown-sysv${UNAME_RELEASE} # Unknown i860-SVR4 - fi - exit 0 ;; - mini*:CTIX:SYS*5:*) - # "miniframe" - echo m68010-convergent-sysv - exit 0 ;; - mc68k:UNIX:SYSTEM5:3.51m) - echo m68k-convergent-sysv - exit 0 ;; - M680?0:D-NIX:5.3:*) - echo m68k-diab-dnix - exit 0 ;; - M68*:*:R3V[567]*:*) - test -r /sysV68 && echo 'm68k-motorola-sysv' && exit 0 ;; - 3[34]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0) - OS_REL='' - test -r /etc/.relid \ - && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` - /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4.3${OS_REL} && exit 0 - /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ - && echo i586-ncr-sysv4.3${OS_REL} && exit 0 ;; - 3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*) - /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4 && exit 0 ;; - m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*) - echo m68k-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - mc68030:UNIX_System_V:4.*:*) - echo m68k-atari-sysv4 - exit 0 ;; - TSUNAMI:LynxOS:2.*:*) - echo sparc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - rs6000:LynxOS:2.*:*) - echo rs6000-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.0*:*) - echo powerpc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - SM[BE]S:UNIX_SV:*:*) - echo mips-dde-sysv${UNAME_RELEASE} - exit 0 ;; - RM*:ReliantUNIX-*:*:*) - echo mips-sni-sysv4 - exit 0 ;; - RM*:SINIX-*:*:*) - echo mips-sni-sysv4 - exit 0 ;; - *:SINIX-*:*:*) - if uname -p 2>/dev/null >/dev/null ; then - UNAME_MACHINE=`(uname -p) 2>/dev/null` - echo ${UNAME_MACHINE}-sni-sysv4 - else - echo ns32k-sni-sysv - fi - exit 0 ;; - PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort - # says - echo i586-unisys-sysv4 - exit 0 ;; - *:UNIX_System_V:4*:FTX*) - # From Gerald Hewes . - # How about differentiating between stratus architectures? -djm - echo hppa1.1-stratus-sysv4 - exit 0 ;; - *:*:*:FTX*) - # From seanf@swdc.stratus.com. - echo i860-stratus-sysv4 - exit 0 ;; - *:VOS:*:*) - # From Paul.Green@stratus.com. - echo hppa1.1-stratus-vos - exit 0 ;; - mc68*:A/UX:*:*) - echo m68k-apple-aux${UNAME_RELEASE} - exit 0 ;; - news*:NEWS-OS:6*:*) - echo mips-sony-newsos6 - exit 0 ;; - R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) - if [ -d /usr/nec ]; then - echo mips-nec-sysv${UNAME_RELEASE} - else - echo mips-unknown-sysv${UNAME_RELEASE} - fi - exit 0 ;; - BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only. - echo powerpc-be-beos - exit 0 ;; - BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only. - echo powerpc-apple-beos - exit 0 ;; - BePC:BeOS:*:*) # BeOS running on Intel PC compatible. - echo i586-pc-beos - exit 0 ;; - SX-4:SUPER-UX:*:*) - echo sx4-nec-superux${UNAME_RELEASE} - exit 0 ;; - SX-5:SUPER-UX:*:*) - echo sx5-nec-superux${UNAME_RELEASE} - exit 0 ;; - SX-6:SUPER-UX:*:*) - echo sx6-nec-superux${UNAME_RELEASE} - exit 0 ;; - Power*:Rhapsody:*:*) - echo powerpc-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; - *:Rhapsody:*:*) - echo ${UNAME_MACHINE}-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; - *:Darwin:*:*) - case `uname -p` in - *86) UNAME_PROCESSOR=i686 ;; - powerpc) UNAME_PROCESSOR=powerpc ;; - esac - echo ${UNAME_PROCESSOR}-apple-darwin${UNAME_RELEASE} - exit 0 ;; - *:procnto*:*:* | *:QNX:[0123456789]*:*) - UNAME_PROCESSOR=`uname -p` - if test "$UNAME_PROCESSOR" = "x86"; then - UNAME_PROCESSOR=i386 - UNAME_MACHINE=pc - fi - echo ${UNAME_PROCESSOR}-${UNAME_MACHINE}-nto-qnx${UNAME_RELEASE} - exit 0 ;; - *:QNX:*:4*) - echo i386-pc-qnx - exit 0 ;; - NSR-[DGKLNPTVW]:NONSTOP_KERNEL:*:*) - echo nsr-tandem-nsk${UNAME_RELEASE} - exit 0 ;; - *:NonStop-UX:*:*) - echo mips-compaq-nonstopux - exit 0 ;; - BS2000:POSIX*:*:*) - echo bs2000-siemens-sysv - exit 0 ;; - DS/*:UNIX_System_V:*:*) - echo ${UNAME_MACHINE}-${UNAME_SYSTEM}-${UNAME_RELEASE} - exit 0 ;; - *:Plan9:*:*) - # "uname -m" is not consistent, so use $cputype instead. 386 - # is converted to i386 for consistency with other x86 - # operating systems. - if test "$cputype" = "386"; then - UNAME_MACHINE=i386 - else - UNAME_MACHINE="$cputype" - fi - echo ${UNAME_MACHINE}-unknown-plan9 - exit 0 ;; - *:TOPS-10:*:*) - echo pdp10-unknown-tops10 - exit 0 ;; - *:TENEX:*:*) - echo pdp10-unknown-tenex - exit 0 ;; - KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*) - echo pdp10-dec-tops20 - exit 0 ;; - XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*) - echo pdp10-xkl-tops20 - exit 0 ;; - *:TOPS-20:*:*) - echo pdp10-unknown-tops20 - exit 0 ;; - *:ITS:*:*) - echo pdp10-unknown-its - exit 0 ;; -esac - -#echo '(No uname command or uname output not recognized.)' 1>&2 -#echo "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" 1>&2 - -eval $set_cc_for_build -cat >$dummy.c < -# include -#endif -main () -{ -#if defined (sony) -#if defined (MIPSEB) - /* BFD wants "bsd" instead of "newsos". Perhaps BFD should be changed, - I don't know.... */ - printf ("mips-sony-bsd\n"); exit (0); -#else -#include - printf ("m68k-sony-newsos%s\n", -#ifdef NEWSOS4 - "4" -#else - "" -#endif - ); exit (0); -#endif -#endif - -#if defined (__arm) && defined (__acorn) && defined (__unix) - printf ("arm-acorn-riscix"); exit (0); -#endif - -#if defined (hp300) && !defined (hpux) - printf ("m68k-hp-bsd\n"); exit (0); -#endif - -#if defined (NeXT) -#if !defined (__ARCHITECTURE__) -#define __ARCHITECTURE__ "m68k" -#endif - int version; - version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`; - if (version < 4) - printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version); - else - printf ("%s-next-openstep%d\n", __ARCHITECTURE__, version); - exit (0); -#endif - -#if defined (MULTIMAX) || defined (n16) -#if defined (UMAXV) - printf ("ns32k-encore-sysv\n"); exit (0); -#else -#if defined (CMU) - printf ("ns32k-encore-mach\n"); exit (0); -#else - printf ("ns32k-encore-bsd\n"); exit (0); -#endif -#endif -#endif - -#if defined (__386BSD__) - printf ("i386-pc-bsd\n"); exit (0); -#endif - -#if defined (sequent) -#if defined (i386) - printf ("i386-sequent-dynix\n"); exit (0); -#endif -#if defined (ns32000) - printf ("ns32k-sequent-dynix\n"); exit (0); -#endif -#endif - -#if defined (_SEQUENT_) - struct utsname un; - - uname(&un); - - if (strncmp(un.version, "V2", 2) == 0) { - printf ("i386-sequent-ptx2\n"); exit (0); - } - if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ - printf ("i386-sequent-ptx1\n"); exit (0); - } - printf ("i386-sequent-ptx\n"); exit (0); - -#endif - -#if defined (vax) -# if !defined (ultrix) -# include -# if defined (BSD) -# if BSD == 43 - printf ("vax-dec-bsd4.3\n"); exit (0); -# else -# if BSD == 199006 - printf ("vax-dec-bsd4.3reno\n"); exit (0); -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# endif -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# else - printf ("vax-dec-ultrix\n"); exit (0); -# endif -#endif - -#if defined (alliant) && defined (i860) - printf ("i860-alliant-bsd\n"); exit (0); -#endif - - exit (1); -} -EOF - -$CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null && $dummy && exit 0 - -# Apollos put the system type in the environment. - -test -d /usr/apollo && { echo ${ISP}-apollo-${SYSTYPE}; exit 0; } - -# Convex versions that predate uname can use getsysinfo(1) - -if [ -x /usr/convex/getsysinfo ] -then - case `getsysinfo -f cpu_type` in - c1*) - echo c1-convex-bsd - exit 0 ;; - c2*) - if getsysinfo -f scalar_acc - then echo c32-convex-bsd - else echo c2-convex-bsd - fi - exit 0 ;; - c34*) - echo c34-convex-bsd - exit 0 ;; - c38*) - echo c38-convex-bsd - exit 0 ;; - c4*) - echo c4-convex-bsd - exit 0 ;; - esac -fi - -cat >&2 < in order to provide the needed -information to handle your system. - -config.guess timestamp = $timestamp - -uname -m = `(uname -m) 2>/dev/null || echo unknown` -uname -r = `(uname -r) 2>/dev/null || echo unknown` -uname -s = `(uname -s) 2>/dev/null || echo unknown` -uname -v = `(uname -v) 2>/dev/null || echo unknown` - -/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null` -/bin/uname -X = `(/bin/uname -X) 2>/dev/null` - -hostinfo = `(hostinfo) 2>/dev/null` -/bin/universe = `(/bin/universe) 2>/dev/null` -/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null` -/bin/arch = `(/bin/arch) 2>/dev/null` -/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` -/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` - -UNAME_MACHINE = ${UNAME_MACHINE} -UNAME_RELEASE = ${UNAME_RELEASE} -UNAME_SYSTEM = ${UNAME_SYSTEM} -UNAME_VERSION = ${UNAME_VERSION} -EOF - -exit 1 - -# Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) -# time-stamp-start: "timestamp='" -# time-stamp-format: "%:y-%02m-%02d" -# time-stamp-end: "'" -# End: diff --git a/BasiliskII/src/Unix/config.sub b/BasiliskII/src/Unix/config.sub deleted file mode 100755 index d6d67c3fd..000000000 --- a/BasiliskII/src/Unix/config.sub +++ /dev/null @@ -1,1469 +0,0 @@ -#! /bin/sh -# Configuration validation subroutine script. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. - -timestamp='2003-01-03' - -# This file is (in principle) common to ALL GNU software. -# The presence of a machine in this file suggests that SOME GNU software -# can handle that machine. It does not imply ALL GNU software can. -# -# This file 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. - -# As a special exception to the GNU General Public License, if you -# distribute this file as part of a program that contains a -# configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. - -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. -# -# Configuration subroutine to validate and canonicalize a configuration type. -# Supply the specified configuration type as an argument. -# If it is invalid, we print an error message on stderr and exit with code 1. -# Otherwise, we print the canonical config type on stdout and succeed. - -# This file is supposed to be the same for all GNU packages -# and recognize all the CPU types, system types and aliases -# that are meaningful with *any* GNU software. -# Each package is responsible for reporting which valid configurations -# it does not support. The user should be able to distinguish -# a failure to support a valid configuration from a meaningless -# configuration. - -# The goal of this file is to map all the various variations of a given -# machine specification into a single specification in the form: -# CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM -# or in some cases, the newer four-part form: -# CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM -# It is wrong to echo any other type of specification. - -me=`echo "$0" | sed -e 's,.*/,,'` - -usage="\ -Usage: $0 [OPTION] CPU-MFR-OPSYS - $0 [OPTION] ALIAS - -Canonicalize a configuration name. - -Operation modes: - -h, --help print this help, then exit - -t, --time-stamp print date of last modification, then exit - -v, --version print version number, then exit - -Report bugs and patches to ." - -version="\ -GNU config.sub ($timestamp) - -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. - -This is free software; see the source for copying conditions. There is NO -warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." - -help=" -Try \`$me --help' for more information." - -# Parse command line -while test $# -gt 0 ; do - case $1 in - --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; - --version | -v ) - echo "$version" ; exit 0 ;; - --help | --h* | -h ) - echo "$usage"; exit 0 ;; - -- ) # Stop option processing - shift; break ;; - - ) # Use stdin as input. - break ;; - -* ) - echo "$me: invalid option $1$help" - exit 1 ;; - - *local*) - # First pass through any local machine types. - echo $1 - exit 0;; - - * ) - break ;; - esac -done - -case $# in - 0) echo "$me: missing argument$help" >&2 - exit 1;; - 1) ;; - *) echo "$me: too many arguments$help" >&2 - exit 1;; -esac - -# Separate what the user gave into CPU-COMPANY and OS or KERNEL-OS (if any). -# Here we must recognize all the valid KERNEL-OS combinations. -maybe_os=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\2/'` -case $maybe_os in - nto-qnx* | linux-gnu* | freebsd*-gnu* | netbsd*-gnu* | storm-chaos* | os2-emx* | rtmk-nova*) - os=-$maybe_os - basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'` - ;; - *) - basic_machine=`echo $1 | sed 's/-[^-]*$//'` - if [ $basic_machine != $1 ] - then os=`echo $1 | sed 's/.*-/-/'` - else os=; fi - ;; -esac - -### Let's recognize common machines as not being operating systems so -### that things like config.sub decstation-3100 work. We also -### recognize some manufacturers as not being operating systems, so we -### can provide default operating systems below. -case $os in - -sun*os*) - # Prevent following clause from handling this invalid input. - ;; - -dec* | -mips* | -sequent* | -encore* | -pc532* | -sgi* | -sony* | \ - -att* | -7300* | -3300* | -delta* | -motorola* | -sun[234]* | \ - -unicom* | -ibm* | -next | -hp | -isi* | -apollo | -altos* | \ - -convergent* | -ncr* | -news | -32* | -3600* | -3100* | -hitachi* |\ - -c[123]* | -convex* | -sun | -crds | -omron* | -dg | -ultra | -tti* | \ - -harris | -dolphin | -highlevel | -gould | -cbm | -ns | -masscomp | \ - -apple | -axis) - os= - basic_machine=$1 - ;; - -sim | -cisco | -oki | -wec | -winbond) - os= - basic_machine=$1 - ;; - -scout) - ;; - -wrs) - os=-vxworks - basic_machine=$1 - ;; - -chorusos*) - os=-chorusos - basic_machine=$1 - ;; - -chorusrdb) - os=-chorusrdb - basic_machine=$1 - ;; - -hiux*) - os=-hiuxwe2 - ;; - -sco5) - os=-sco3.2v5 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -sco4) - os=-sco3.2v4 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -sco3.2.[4-9]*) - os=`echo $os | sed -e 's/sco3.2./sco3.2v/'` - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -sco3.2v[4-9]*) - # Don't forget version if it is 3.2v4 or newer. - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -sco*) - os=-sco3.2v2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -udk*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -isc) - os=-isc2.2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -clix*) - basic_machine=clipper-intergraph - ;; - -isc*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` - ;; - -lynx*) - os=-lynxos - ;; - -ptx*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-sequent/'` - ;; - -windowsnt*) - os=`echo $os | sed -e 's/windowsnt/winnt/'` - ;; - -psos*) - os=-psos - ;; - -mint | -mint[0-9]*) - basic_machine=m68k-atari - os=-mint - ;; -esac - -# Decode aliases for certain CPU-COMPANY combinations. -case $basic_machine in - # Recognize the basic CPU types without company name. - # Some are omitted here because they have special meanings below. - 1750a | 580 \ - | a29k \ - | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] | alphapca5[67] \ - | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] | alpha64pca5[67] \ - | arc | arm | arm[bl]e | arme[lb] | armv[2345] | armv[345][lb] | avr \ - | clipper \ - | d10v | d30v | dlx | dsp16xx \ - | fr30 | frv \ - | h8300 | h8500 | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ - | i370 | i860 | i960 | ia64 \ - | ip2k \ - | m32r | m68000 | m68k | m88k | mcore \ - | mips | mipsbe | mipseb | mipsel | mipsle \ - | mips16 \ - | mips64 | mips64el \ - | mips64vr | mips64vrel \ - | mips64orion | mips64orionel \ - | mips64vr4100 | mips64vr4100el \ - | mips64vr4300 | mips64vr4300el \ - | mips64vr5000 | mips64vr5000el \ - | mipsisa32 | mipsisa32el \ - | mipsisa32r2 | mipsisa32r2el \ - | mipsisa64 | mipsisa64el \ - | mipsisa64sb1 | mipsisa64sb1el \ - | mipsisa64sr71k | mipsisa64sr71kel \ - | mipstx39 | mipstx39el \ - | mn10200 | mn10300 \ - | msp430 \ - | ns16k | ns32k \ - | openrisc | or32 \ - | pdp10 | pdp11 | pj | pjl \ - | powerpc | powerpc64 | powerpc64le | powerpcle | ppcbe \ - | pyramid \ - | s390 | s390x \ - | sh | sh[1234] | sh3e | sh[34]eb | shbe | shle | sh[1234]le | sh3ele \ - | sh64 | sh64le \ - | sparc | sparc64 | sparc86x | sparclet | sparclite | sparcv9 | sparcv9b \ - | strongarm \ - | tahoe | thumb | tic80 | tron \ - | v850 | v850e \ - | we32k \ - | x86 | xscale | xstormy16 | xtensa \ - | z8k) - basic_machine=$basic_machine-unknown - ;; - m6811 | m68hc11 | m6812 | m68hc12) - # Motorola 68HC11/12. - basic_machine=$basic_machine-unknown - os=-none - ;; - m88110 | m680[12346]0 | m683?2 | m68360 | m5200 | v70 | w65 | z8k) - ;; - - # We use `pc' rather than `unknown' - # because (1) that's what they normally are, and - # (2) the word "unknown" tends to confuse beginning users. - i*86 | x86_64) - basic_machine=$basic_machine-pc - ;; - # Object if more than one company name word. - *-*-*) - echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 - exit 1 - ;; - # Recognize the basic CPU types with company name. - 580-* \ - | a29k-* \ - | alpha-* | alphaev[4-8]-* | alphaev56-* | alphaev6[78]-* \ - | alpha64-* | alpha64ev[4-8]-* | alpha64ev56-* | alpha64ev6[78]-* \ - | alphapca5[67]-* | alpha64pca5[67]-* | arc-* \ - | arm-* | armbe-* | armle-* | armeb-* | armv*-* \ - | avr-* \ - | bs2000-* \ - | c[123]* | c30-* | [cjt]90-* | c4x-* | c54x-* \ - | clipper-* | cydra-* \ - | d10v-* | d30v-* | dlx-* \ - | elxsi-* \ - | f30[01]-* | f700-* | fr30-* | frv-* | fx80-* \ - | h8300-* | h8500-* \ - | hppa-* | hppa1.[01]-* | hppa2.0-* | hppa2.0[nw]-* | hppa64-* \ - | i*86-* | i860-* | i960-* | ia64-* \ - | ip2k-* \ - | m32r-* \ - | m68000-* | m680[012346]0-* | m68360-* | m683?2-* | m68k-* \ - | m88110-* | m88k-* | mcore-* \ - | mips-* | mipsbe-* | mipseb-* | mipsel-* | mipsle-* \ - | mips16-* \ - | mips64-* | mips64el-* \ - | mips64vr-* | mips64vrel-* \ - | mips64orion-* | mips64orionel-* \ - | mips64vr4100-* | mips64vr4100el-* \ - | mips64vr4300-* | mips64vr4300el-* \ - | mips64vr5000-* | mips64vr5000el-* \ - | mipsisa32-* | mipsisa32el-* \ - | mipsisa32r2-* | mipsisa32r2el-* \ - | mipsisa64-* | mipsisa64el-* \ - | mipsisa64sb1-* | mipsisa64sb1el-* \ - | mipsisa64sr71k-* | mipsisa64sr71kel-* \ - | mipstx39-* | mipstx39el-* \ - | msp430-* \ - | none-* | np1-* | nv1-* | ns16k-* | ns32k-* \ - | orion-* \ - | pdp10-* | pdp11-* | pj-* | pjl-* | pn-* | power-* \ - | powerpc-* | powerpc64-* | powerpc64le-* | powerpcle-* | ppcbe-* \ - | pyramid-* \ - | romp-* | rs6000-* \ - | s390-* | s390x-* \ - | sh-* | sh[1234]-* | sh3e-* | sh[34]eb-* | shbe-* \ - | shle-* | sh[1234]le-* | sh3ele-* | sh64-* | sh64le-* \ - | sparc-* | sparc64-* | sparc86x-* | sparclet-* | sparclite-* \ - | sparcv9-* | sparcv9b-* | strongarm-* | sv1-* | sx?-* \ - | tahoe-* | thumb-* | tic30-* | tic4x-* | tic54x-* | tic80-* | tron-* \ - | v850-* | v850e-* | vax-* \ - | we32k-* \ - | x86-* | x86_64-* | xps100-* | xscale-* | xstormy16-* \ - | xtensa-* \ - | ymp-* \ - | z8k-*) - ;; - # Recognize the various machine names and aliases which stand - # for a CPU type and a company and sometimes even an OS. - 386bsd) - basic_machine=i386-unknown - os=-bsd - ;; - 3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc) - basic_machine=m68000-att - ;; - 3b*) - basic_machine=we32k-att - ;; - a29khif) - basic_machine=a29k-amd - os=-udi - ;; - adobe68k) - basic_machine=m68010-adobe - os=-scout - ;; - alliant | fx80) - basic_machine=fx80-alliant - ;; - altos | altos3068) - basic_machine=m68k-altos - ;; - am29k) - basic_machine=a29k-none - os=-bsd - ;; - amdahl) - basic_machine=580-amdahl - os=-sysv - ;; - amiga | amiga-*) - basic_machine=m68k-unknown - ;; - amigaos | amigados) - basic_machine=m68k-unknown - os=-amigaos - ;; - amigaunix | amix) - basic_machine=m68k-unknown - os=-sysv4 - ;; - apollo68) - basic_machine=m68k-apollo - os=-sysv - ;; - apollo68bsd) - basic_machine=m68k-apollo - os=-bsd - ;; - aux) - basic_machine=m68k-apple - os=-aux - ;; - balance) - basic_machine=ns32k-sequent - os=-dynix - ;; - c90) - basic_machine=c90-cray - os=-unicos - ;; - convex-c1) - basic_machine=c1-convex - os=-bsd - ;; - convex-c2) - basic_machine=c2-convex - os=-bsd - ;; - convex-c32) - basic_machine=c32-convex - os=-bsd - ;; - convex-c34) - basic_machine=c34-convex - os=-bsd - ;; - convex-c38) - basic_machine=c38-convex - os=-bsd - ;; - cray | j90) - basic_machine=j90-cray - os=-unicos - ;; - crds | unos) - basic_machine=m68k-crds - ;; - cris | cris-* | etrax*) - basic_machine=cris-axis - ;; - da30 | da30-*) - basic_machine=m68k-da30 - ;; - decstation | decstation-3100 | pmax | pmax-* | pmin | dec3100 | decstatn) - basic_machine=mips-dec - ;; - decsystem10* | dec10*) - basic_machine=pdp10-dec - os=-tops10 - ;; - decsystem20* | dec20*) - basic_machine=pdp10-dec - os=-tops20 - ;; - delta | 3300 | motorola-3300 | motorola-delta \ - | 3300-motorola | delta-motorola) - basic_machine=m68k-motorola - ;; - delta88) - basic_machine=m88k-motorola - os=-sysv3 - ;; - dpx20 | dpx20-*) - basic_machine=rs6000-bull - os=-bosx - ;; - dpx2* | dpx2*-bull) - basic_machine=m68k-bull - os=-sysv3 - ;; - ebmon29k) - basic_machine=a29k-amd - os=-ebmon - ;; - elxsi) - basic_machine=elxsi-elxsi - os=-bsd - ;; - encore | umax | mmax) - basic_machine=ns32k-encore - ;; - es1800 | OSE68k | ose68k | ose | OSE) - basic_machine=m68k-ericsson - os=-ose - ;; - fx2800) - basic_machine=i860-alliant - ;; - genix) - basic_machine=ns32k-ns - ;; - gmicro) - basic_machine=tron-gmicro - os=-sysv - ;; - go32) - basic_machine=i386-pc - os=-go32 - ;; - h3050r* | hiux*) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - h8300hms) - basic_machine=h8300-hitachi - os=-hms - ;; - h8300xray) - basic_machine=h8300-hitachi - os=-xray - ;; - h8500hms) - basic_machine=h8500-hitachi - os=-hms - ;; - harris) - basic_machine=m88k-harris - os=-sysv3 - ;; - hp300-*) - basic_machine=m68k-hp - ;; - hp300bsd) - basic_machine=m68k-hp - os=-bsd - ;; - hp300hpux) - basic_machine=m68k-hp - os=-hpux - ;; - hp3k9[0-9][0-9] | hp9[0-9][0-9]) - basic_machine=hppa1.0-hp - ;; - hp9k2[0-9][0-9] | hp9k31[0-9]) - basic_machine=m68000-hp - ;; - hp9k3[2-9][0-9]) - basic_machine=m68k-hp - ;; - hp9k6[0-9][0-9] | hp6[0-9][0-9]) - basic_machine=hppa1.0-hp - ;; - hp9k7[0-79][0-9] | hp7[0-79][0-9]) - basic_machine=hppa1.1-hp - ;; - hp9k78[0-9] | hp78[0-9]) - # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp - ;; - hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893) - # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp - ;; - hp9k8[0-9][13679] | hp8[0-9][13679]) - basic_machine=hppa1.1-hp - ;; - hp9k8[0-9][0-9] | hp8[0-9][0-9]) - basic_machine=hppa1.0-hp - ;; - hppa-next) - os=-nextstep3 - ;; - hppaosf) - basic_machine=hppa1.1-hp - os=-osf - ;; - hppro) - basic_machine=hppa1.1-hp - os=-proelf - ;; - i370-ibm* | ibm*) - basic_machine=i370-ibm - ;; -# I'm not sure what "Sysv32" means. Should this be sysv3.2? - i*86v32) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv32 - ;; - i*86v4*) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv4 - ;; - i*86v) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv - ;; - i*86sol2) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-solaris2 - ;; - i386mach) - basic_machine=i386-mach - os=-mach - ;; - i386-vsta | vsta) - basic_machine=i386-unknown - os=-vsta - ;; - iris | iris4d) - basic_machine=mips-sgi - case $os in - -irix*) - ;; - *) - os=-irix4 - ;; - esac - ;; - isi68 | isi) - basic_machine=m68k-isi - os=-sysv - ;; - m88k-omron*) - basic_machine=m88k-omron - ;; - magnum | m3230) - basic_machine=mips-mips - os=-sysv - ;; - merlin) - basic_machine=ns32k-utek - os=-sysv - ;; - mingw32) - basic_machine=i386-pc - os=-mingw32 - ;; - miniframe) - basic_machine=m68000-convergent - ;; - *mint | -mint[0-9]* | *MiNT | *MiNT[0-9]*) - basic_machine=m68k-atari - os=-mint - ;; - mips3*-*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'` - ;; - mips3*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`-unknown - ;; - mmix*) - basic_machine=mmix-knuth - os=-mmixware - ;; - monitor) - basic_machine=m68k-rom68k - os=-coff - ;; - morphos) - basic_machine=powerpc-unknown - os=-morphos - ;; - msdos) - basic_machine=i386-pc - os=-msdos - ;; - mvs) - basic_machine=i370-ibm - os=-mvs - ;; - ncr3000) - basic_machine=i486-ncr - os=-sysv4 - ;; - netbsd386) - basic_machine=i386-unknown - os=-netbsd - ;; - netwinder) - basic_machine=armv4l-rebel - os=-linux - ;; - news | news700 | news800 | news900) - basic_machine=m68k-sony - os=-newsos - ;; - news1000) - basic_machine=m68030-sony - os=-newsos - ;; - news-3600 | risc-news) - basic_machine=mips-sony - os=-newsos - ;; - necv70) - basic_machine=v70-nec - os=-sysv - ;; - next | m*-next ) - basic_machine=m68k-next - case $os in - -nextstep* ) - ;; - -ns2*) - os=-nextstep2 - ;; - *) - os=-nextstep3 - ;; - esac - ;; - nh3000) - basic_machine=m68k-harris - os=-cxux - ;; - nh[45]000) - basic_machine=m88k-harris - os=-cxux - ;; - nindy960) - basic_machine=i960-intel - os=-nindy - ;; - mon960) - basic_machine=i960-intel - os=-mon960 - ;; - nonstopux) - basic_machine=mips-compaq - os=-nonstopux - ;; - np1) - basic_machine=np1-gould - ;; - nv1) - basic_machine=nv1-cray - os=-unicosmp - ;; - nsr-tandem) - basic_machine=nsr-tandem - ;; - op50n-* | op60c-*) - basic_machine=hppa1.1-oki - os=-proelf - ;; - or32 | or32-*) - basic_machine=or32-unknown - os=-coff - ;; - OSE68000 | ose68000) - basic_machine=m68000-ericsson - os=-ose - ;; - os68k) - basic_machine=m68k-none - os=-os68k - ;; - pa-hitachi) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - paragon) - basic_machine=i860-intel - os=-osf - ;; - pbd) - basic_machine=sparc-tti - ;; - pbb) - basic_machine=m68k-tti - ;; - pc532 | pc532-*) - basic_machine=ns32k-pc532 - ;; - pentium | p5 | k5 | k6 | nexgen | viac3) - basic_machine=i586-pc - ;; - pentiumpro | p6 | 6x86 | athlon | athlon_*) - basic_machine=i686-pc - ;; - pentiumii | pentium2) - basic_machine=i686-pc - ;; - pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*) - basic_machine=i586-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pentiumpro-* | p6-* | 6x86-* | athlon-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pentiumii-* | pentium2-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pn) - basic_machine=pn-gould - ;; - power) basic_machine=power-ibm - ;; - ppc) basic_machine=powerpc-unknown - ;; - ppc-*) basic_machine=powerpc-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - ppcle | powerpclittle | ppc-le | powerpc-little) - basic_machine=powerpcle-unknown - ;; - ppcle-* | powerpclittle-*) - basic_machine=powerpcle-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - ppc64) basic_machine=powerpc64-unknown - ;; - ppc64-*) basic_machine=powerpc64-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - ppc64le | powerpc64little | ppc64-le | powerpc64-little) - basic_machine=powerpc64le-unknown - ;; - ppc64le-* | powerpc64little-*) - basic_machine=powerpc64le-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - ps2) - basic_machine=i386-ibm - ;; - pw32) - basic_machine=i586-unknown - os=-pw32 - ;; - rom68k) - basic_machine=m68k-rom68k - os=-coff - ;; - rm[46]00) - basic_machine=mips-siemens - ;; - rtpc | rtpc-*) - basic_machine=romp-ibm - ;; - sa29200) - basic_machine=a29k-amd - os=-udi - ;; - sb1) - basic_machine=mipsisa64sb1-unknown - ;; - sb1el) - basic_machine=mipsisa64sb1el-unknown - ;; - sequent) - basic_machine=i386-sequent - ;; - sh) - basic_machine=sh-hitachi - os=-hms - ;; - sparclite-wrs | simso-wrs) - basic_machine=sparclite-wrs - os=-vxworks - ;; - sps7) - basic_machine=m68k-bull - os=-sysv2 - ;; - spur) - basic_machine=spur-unknown - ;; - st2000) - basic_machine=m68k-tandem - ;; - stratus) - basic_machine=i860-stratus - os=-sysv4 - ;; - sun2) - basic_machine=m68000-sun - ;; - sun2os3) - basic_machine=m68000-sun - os=-sunos3 - ;; - sun2os4) - basic_machine=m68000-sun - os=-sunos4 - ;; - sun3os3) - basic_machine=m68k-sun - os=-sunos3 - ;; - sun3os4) - basic_machine=m68k-sun - os=-sunos4 - ;; - sun4os3) - basic_machine=sparc-sun - os=-sunos3 - ;; - sun4os4) - basic_machine=sparc-sun - os=-sunos4 - ;; - sun4sol2) - basic_machine=sparc-sun - os=-solaris2 - ;; - sun3 | sun3-*) - basic_machine=m68k-sun - ;; - sun4) - basic_machine=sparc-sun - ;; - sun386 | sun386i | roadrunner) - basic_machine=i386-sun - ;; - sv1) - basic_machine=sv1-cray - os=-unicos - ;; - symmetry) - basic_machine=i386-sequent - os=-dynix - ;; - t3e) - basic_machine=alphaev5-cray - os=-unicos - ;; - t90) - basic_machine=t90-cray - os=-unicos - ;; - tic4x | c4x*) - basic_machine=tic4x-unknown - os=-coff - ;; - tic54x | c54x*) - basic_machine=tic54x-unknown - os=-coff - ;; - tx39) - basic_machine=mipstx39-unknown - ;; - tx39el) - basic_machine=mipstx39el-unknown - ;; - toad1) - basic_machine=pdp10-xkl - os=-tops20 - ;; - tower | tower-32) - basic_machine=m68k-ncr - ;; - udi29k) - basic_machine=a29k-amd - os=-udi - ;; - ultra3) - basic_machine=a29k-nyu - os=-sym1 - ;; - v810 | necv810) - basic_machine=v810-nec - os=-none - ;; - vaxv) - basic_machine=vax-dec - os=-sysv - ;; - vms) - basic_machine=vax-dec - os=-vms - ;; - vpp*|vx|vx-*) - basic_machine=f301-fujitsu - ;; - vxworks960) - basic_machine=i960-wrs - os=-vxworks - ;; - vxworks68) - basic_machine=m68k-wrs - os=-vxworks - ;; - vxworks29k) - basic_machine=a29k-wrs - os=-vxworks - ;; - w65*) - basic_machine=w65-wdc - os=-none - ;; - w89k-*) - basic_machine=hppa1.1-winbond - os=-proelf - ;; - xps | xps100) - basic_machine=xps100-honeywell - ;; - ymp) - basic_machine=ymp-cray - os=-unicos - ;; - z8k-*-coff) - basic_machine=z8k-unknown - os=-sim - ;; - none) - basic_machine=none-none - os=-none - ;; - -# Here we handle the default manufacturer of certain CPU types. It is in -# some cases the only manufacturer, in others, it is the most popular. - w89k) - basic_machine=hppa1.1-winbond - ;; - op50n) - basic_machine=hppa1.1-oki - ;; - op60c) - basic_machine=hppa1.1-oki - ;; - romp) - basic_machine=romp-ibm - ;; - rs6000) - basic_machine=rs6000-ibm - ;; - vax) - basic_machine=vax-dec - ;; - pdp10) - # there are many clones, so DEC is not a safe bet - basic_machine=pdp10-unknown - ;; - pdp11) - basic_machine=pdp11-dec - ;; - we32k) - basic_machine=we32k-att - ;; - sh3 | sh4 | sh3eb | sh4eb | sh[1234]le | sh3ele) - basic_machine=sh-unknown - ;; - sh64) - basic_machine=sh64-unknown - ;; - sparc | sparcv9 | sparcv9b) - basic_machine=sparc-sun - ;; - cydra) - basic_machine=cydra-cydrome - ;; - orion) - basic_machine=orion-highlevel - ;; - orion105) - basic_machine=clipper-highlevel - ;; - mac | mpw | mac-mpw) - basic_machine=m68k-apple - ;; - pmac | pmac-mpw) - basic_machine=powerpc-apple - ;; - *-unknown) - # Make sure to match an already-canonicalized machine name. - ;; - *) - echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 - exit 1 - ;; -esac - -# Here we canonicalize certain aliases for manufacturers. -case $basic_machine in - *-digital*) - basic_machine=`echo $basic_machine | sed 's/digital.*/dec/'` - ;; - *-commodore*) - basic_machine=`echo $basic_machine | sed 's/commodore.*/cbm/'` - ;; - *) - ;; -esac - -# Decode manufacturer-specific aliases for certain operating systems. - -if [ x"$os" != x"" ] -then -case $os in - # First match some system type aliases - # that might get confused with valid system types. - # -solaris* is a basic system type, with this one exception. - -solaris1 | -solaris1.*) - os=`echo $os | sed -e 's|solaris1|sunos4|'` - ;; - -solaris) - os=-solaris2 - ;; - -svr4*) - os=-sysv4 - ;; - -unixware*) - os=-sysv4.2uw - ;; - -gnu/linux*) - os=`echo $os | sed -e 's|gnu/linux|linux-gnu|'` - ;; - # First accept the basic system types. - # The portable systems comes first. - # Each alternative MUST END IN A *, to match a version number. - # -sysv* is not here because it comes later, after sysvr4. - -gnu* | -bsd* | -mach* | -minix* | -genix* | -ultrix* | -irix* \ - | -*vms* | -sco* | -esix* | -isc* | -aix* | -sunos | -sunos[34]*\ - | -hpux* | -unos* | -osf* | -luna* | -dgux* | -solaris* | -sym* \ - | -amigaos* | -amigados* | -msdos* | -newsos* | -unicos* | -aof* \ - | -aos* \ - | -nindy* | -vxsim* | -vxworks* | -ebmon* | -hms* | -mvs* \ - | -clix* | -riscos* | -uniplus* | -iris* | -rtu* | -xenix* \ - | -hiux* | -386bsd* | -netbsd* | -openbsd* | -freebsd* | -riscix* \ - | -lynxos* | -bosx* | -nextstep* | -cxux* | -aout* | -elf* | -oabi* \ - | -ptx* | -coff* | -ecoff* | -winnt* | -domain* | -vsta* \ - | -udi* | -eabi* | -lites* | -ieee* | -go32* | -aux* \ - | -chorusos* | -chorusrdb* \ - | -cygwin* | -pe* | -psos* | -moss* | -proelf* | -rtems* \ - | -mingw32* | -linux-gnu* | -uxpv* | -beos* | -mpeix* | -udk* \ - | -interix* | -uwin* | -mks* | -rhapsody* | -darwin* | -opened* \ - | -openstep* | -oskit* | -conix* | -pw32* | -nonstopux* \ - | -storm-chaos* | -tops10* | -tenex* | -tops20* | -its* \ - | -os2* | -vos* | -palmos* | -uclinux* | -nucleus* \ - | -morphos* | -superux* | -rtmk* | -rtmk-nova* | -windiss* \ - | -powermax* | -dnix* | -microbsd*) - # Remember, each alternative MUST END IN *, to match a version number. - ;; - -qnx*) - case $basic_machine in - x86-* | i*86-*) - ;; - *) - os=-nto$os - ;; - esac - ;; - -nto-qnx*) - ;; - -nto*) - os=`echo $os | sed -e 's|nto|nto-qnx|'` - ;; - -sim | -es1800* | -hms* | -xray | -os68k* | -none* | -v88r* \ - | -windows* | -osx | -abug | -netware* | -os9* | -beos* \ - | -macos* | -mpw* | -magic* | -mmixware* | -mon960* | -lnews*) - ;; - -mac*) - os=`echo $os | sed -e 's|mac|macos|'` - ;; - -linux*) - os=`echo $os | sed -e 's|linux|linux-gnu|'` - ;; - -sunos5*) - os=`echo $os | sed -e 's|sunos5|solaris2|'` - ;; - -sunos6*) - os=`echo $os | sed -e 's|sunos6|solaris3|'` - ;; - -opened*) - os=-openedition - ;; - -wince*) - os=-wince - ;; - -osfrose*) - os=-osfrose - ;; - -osf*) - os=-osf - ;; - -utek*) - os=-bsd - ;; - -dynix*) - os=-bsd - ;; - -acis*) - os=-aos - ;; - -atheos*) - os=-atheos - ;; - -386bsd) - os=-bsd - ;; - -ctix* | -uts*) - os=-sysv - ;; - -nova*) - os=-rtmk-nova - ;; - -ns2 ) - os=-nextstep2 - ;; - -nsk*) - os=-nsk - ;; - # Preserve the version number of sinix5. - -sinix5.*) - os=`echo $os | sed -e 's|sinix|sysv|'` - ;; - -sinix*) - os=-sysv4 - ;; - -triton*) - os=-sysv3 - ;; - -oss*) - os=-sysv3 - ;; - -svr4) - os=-sysv4 - ;; - -svr3) - os=-sysv3 - ;; - -sysvr4) - os=-sysv4 - ;; - # This must come after -sysvr4. - -sysv*) - ;; - -ose*) - os=-ose - ;; - -es1800*) - os=-ose - ;; - -xenix) - os=-xenix - ;; - -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) - os=-mint - ;; - -none) - ;; - *) - # Get rid of the `-' at the beginning of $os. - os=`echo $os | sed 's/[^-]*-//'` - echo Invalid configuration \`$1\': system \`$os\' not recognized 1>&2 - exit 1 - ;; -esac -else - -# Here we handle the default operating systems that come with various machines. -# The value should be what the vendor currently ships out the door with their -# machine or put another way, the most popular os provided with the machine. - -# Note that if you're going to try to match "-MANUFACTURER" here (say, -# "-sun"), then you have to tell the case statement up towards the top -# that MANUFACTURER isn't an operating system. Otherwise, code above -# will signal an error saying that MANUFACTURER isn't an operating -# system, and we'll never get to this point. - -case $basic_machine in - *-acorn) - os=-riscix1.2 - ;; - arm*-rebel) - os=-linux - ;; - arm*-semi) - os=-aout - ;; - # This must come before the *-dec entry. - pdp10-*) - os=-tops20 - ;; - pdp11-*) - os=-none - ;; - *-dec | vax-*) - os=-ultrix4.2 - ;; - m68*-apollo) - os=-domain - ;; - i386-sun) - os=-sunos4.0.2 - ;; - m68000-sun) - os=-sunos3 - # This also exists in the configure program, but was not the - # default. - # os=-sunos4 - ;; - m68*-cisco) - os=-aout - ;; - mips*-cisco) - os=-elf - ;; - mips*-*) - os=-elf - ;; - or32-*) - os=-coff - ;; - *-tti) # must be before sparc entry or we get the wrong os. - os=-sysv3 - ;; - sparc-* | *-sun) - os=-sunos4.1.1 - ;; - *-be) - os=-beos - ;; - *-ibm) - os=-aix - ;; - *-wec) - os=-proelf - ;; - *-winbond) - os=-proelf - ;; - *-oki) - os=-proelf - ;; - *-hp) - os=-hpux - ;; - *-hitachi) - os=-hiux - ;; - i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent) - os=-sysv - ;; - *-cbm) - os=-amigaos - ;; - *-dg) - os=-dgux - ;; - *-dolphin) - os=-sysv3 - ;; - m68k-ccur) - os=-rtu - ;; - m88k-omron*) - os=-luna - ;; - *-next ) - os=-nextstep - ;; - *-sequent) - os=-ptx - ;; - *-crds) - os=-unos - ;; - *-ns) - os=-genix - ;; - i370-*) - os=-mvs - ;; - *-next) - os=-nextstep3 - ;; - *-gould) - os=-sysv - ;; - *-highlevel) - os=-bsd - ;; - *-encore) - os=-bsd - ;; - *-sgi) - os=-irix - ;; - *-siemens) - os=-sysv4 - ;; - *-masscomp) - os=-rtu - ;; - f30[01]-fujitsu | f700-fujitsu) - os=-uxpv - ;; - *-rom68k) - os=-coff - ;; - *-*bug) - os=-coff - ;; - *-apple) - os=-macos - ;; - *-atari*) - os=-mint - ;; - *) - os=-none - ;; -esac -fi - -# Here we handle the case where we know the os, and the CPU type, but not the -# manufacturer. We pick the logical manufacturer. -vendor=unknown -case $basic_machine in - *-unknown) - case $os in - -riscix*) - vendor=acorn - ;; - -sunos*) - vendor=sun - ;; - -aix*) - vendor=ibm - ;; - -beos*) - vendor=be - ;; - -hpux*) - vendor=hp - ;; - -mpeix*) - vendor=hp - ;; - -hiux*) - vendor=hitachi - ;; - -unos*) - vendor=crds - ;; - -dgux*) - vendor=dg - ;; - -luna*) - vendor=omron - ;; - -genix*) - vendor=ns - ;; - -mvs* | -opened*) - vendor=ibm - ;; - -ptx*) - vendor=sequent - ;; - -vxsim* | -vxworks* | -windiss*) - vendor=wrs - ;; - -aux*) - vendor=apple - ;; - -hms*) - vendor=hitachi - ;; - -mpw* | -macos*) - vendor=apple - ;; - -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) - vendor=atari - ;; - -vos*) - vendor=stratus - ;; - esac - basic_machine=`echo $basic_machine | sed "s/unknown/$vendor/"` - ;; -esac - -echo $basic_machine$os -exit 0 - -# Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) -# time-stamp-start: "timestamp='" -# time-stamp-format: "%:y-%02m-%02d" -# time-stamp-end: "'" -# End: diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac deleted file mode 100644 index ffba2f414..000000000 --- a/BasiliskII/src/Unix/configure.ac +++ /dev/null @@ -1,953 +0,0 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written in 2002 by Christian Bauer et al. - -AC_INIT([Basilisk II], 1.0, [Christian.Bauer@uni-mainz.de], BasiliskII) -AC_CONFIG_SRCDIR(main_unix.cpp) -AC_PREREQ(2.52) -AC_CONFIG_HEADER(config.h) - -AC_USE_SYSTEM_EXTENSIONS - -dnl Aliases for PACKAGE and VERSION macros. -AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE_NAME", [Define this program name.]) -AC_DEFINE_UNQUOTED(VERSION, "$PACKAGE_VERSION", [Define this program version.]) - -dnl Some systems do not put corefiles in the currect directory, avoid saving -dnl cores for the configure tests since some are intended to dump core. -ulimit -c 0 - -dnl Video options. -AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) - -dnl SDL options. -AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) -AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=no]) -AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) - -dnl FPU emulation core. -AC_ARG_ENABLE(fpe, -[ --enable-fpe=FPE specify which fpu emulator to use [default=auto]], -[ case "$enableval" in - dnl default is always ieee, if architecture has this fp format - uae) FPE_CORE_TEST_ORDER="uae";; - *) AC_MSG_ERROR([--enable-fpe takes only one of the following values: auto, x86, ieee, uae]);; - esac -], -[ FPE_CORE_TEST_ORDER="ieee uae" -]) - -dnl Addressing modes. -AC_ARG_ENABLE(addressing, -[ --enable-addressing=AM specify the addressing mode to use [default=fastest]], -[ case "$enableval" in - real) ADDRESSING_TEST_ORDER="real";; - direct) ADDRESSING_TEST_ORDER="direct";; - banks) ADDRESSING_TEST_ORDER="banks";; - fastest)ADDRESSING_TEST_ORDER="direct banks";; - *) AC_MSG_ERROR([--enable-addressing takes only one of the following values: fastest, real, direct, banks]);; - esac -], -[ ADDRESSING_TEST_ORDER="direct banks" -]) - -dnl Canonical system information. -AC_CANONICAL_HOST -AC_CANONICAL_TARGET - -dnl Target OS type (target is host if not cross-compiling). -case "$target_os" in - darwin*) OS_TYPE=darwin;; - *) OS_TYPE=`echo $target_os | sed -e 's/-/_/g' | sed -e 's/\./_/g'`;; -esac -DEFINES="$DEFINES -DOS_$OS_TYPE" - -dnl Target CPU type. -HAVE_I386=no -HAVE_X86_64=no -case "$target_cpu" in - i386* | i486* | i586* | i686* | i786* ) HAVE_I386=yes;; - x86_64* | amd64* ) HAVE_X86_64=yes;; -esac - -dnl Check if we should really be assuming x86_64 even if we detected HAVE_I386 above. -if [[ "x$HAVE_I386" = "xyes" ]]; then - AC_TRY_RUN([ - int main(void) { - #if defined(__x86_64__) - return 0; - #else - return 1; - #endif - } - ], [ - HAVE_I386=no - HAVE_X86_64=yes - ]) -fi - -dnl Checks for programs. -AC_PROG_CC -AC_PROG_CC_C_O -AC_PROG_CPP -AC_PROG_CXX -AC_PROG_MAKE_SET -AC_PROG_INSTALL -AC_PROG_EGREP - -dnl Checks for libraries. -AC_CHECK_LIB(posix4, sem_init) -AC_CHECK_LIB(rt, timer_create) -AC_CHECK_LIB(rt, shm_open) -AC_CHECK_LIB(m, cos) - - -dnl Do we need SDL? -WANT_SDL=no -if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then - WANT_SDL=yes - SDL_SUPPORT="$SDL_SUPPORT video" -fi -if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then - WANT_SDL=yes - SDL_SUPPORT="$SDL_SUPPORT audio" -fi -if [[ "x$WANT_SDL" = "xyes" ]]; then - - AC_PATH_PROG(sdl_config, "sdl-config") - if [[ -n "$sdl_config" ]]; then - case $target_os in - *) - sdl_cflags=`$sdl_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl_libs=`$sdl_config --static-libs` - else - sdl_libs=`$sdl_config --libs` - fi - ;; - esac - CFLAGS="$CFLAGS $sdl_cflags" - CXXFLAGS="$CXXFLAGS $sdl_cflags" - LIBS="$LIBS $sdl_libs" - else - WANT_SDL=no - fi - - SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` -else - SDL_SUPPORT="none" -fi - -dnl We want pthreads. Try libpthread first, then PTL. -HAVE_PTHREADS=yes -AC_CHECK_LIB(pthread, pthread_create, , [ - AC_CHECK_LIB(PTL, pthread_create, , [ - HAVE_PTHREADS=no - ]) -]) -if [[ "x$HAVE_PTHREADS" = "xyes" ]]; then - AC_DEFINE(HAVE_PTHREADS, 1, [Define if pthreads are available.]) -fi -AC_CHECK_FUNCS(pthread_cond_init) -AC_CHECK_FUNCS(pthread_cancel pthread_testcancel) -AC_CHECK_FUNCS(pthread_mutexattr_setprotocol) -AC_CHECK_FUNCS(pthread_mutexattr_settype) -AC_CHECK_FUNCS(pthread_mutexattr_setpshared) - -dnl If POSIX.4 semaphores are not available, we emulate them with pthread mutexes. -SEMSRC= -AC_CHECK_FUNCS(sem_init, , [ - if test "x$HAVE_PTHREADS" = "xyes"; then - SEMSRC=posix_sem.cpp - fi -]) - -UISRCS=../dummy/prefs_editor_dummy.cpp - -dnl We use 64-bit file size support if possible. -AC_SYS_LARGEFILE - -dnl Checks for header files. -AC_HEADER_STDC -AC_CHECK_HEADERS(stdlib.h stdint.h) -AC_CHECK_HEADERS(unistd.h fcntl.h sys/types.h sys/time.h sys/mman.h mach/mach.h) -AC_CHECK_HEADERS(readline.h history.h readline/readline.h readline/history.h) -AC_CHECK_HEADERS(sys/socket.h sys/ioctl.h sys/filio.h sys/bitypes.h sys/wait.h) -AC_CHECK_HEADERS(sys/poll.h sys/select.h) -AC_CHECK_HEADERS(arpa/inet.h) -AC_CHECK_HEADERS(AvailabilityMacros.h) -AC_CHECK_HEADERS(IOKit/storage/IOBlockStorageDevice.h) -AC_CHECK_HEADERS(sys/stropts.h stropts.h) - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_C_BIGENDIAN -AC_C_CONST -AC_C_INLINE -AC_CHECK_SIZEOF(short, 2) -AC_CHECK_SIZEOF(int, 4) -AC_CHECK_SIZEOF(long, 4) -AC_CHECK_SIZEOF(long long, 8) -AC_CHECK_SIZEOF(float, 4) -AC_CHECK_SIZEOF(double, 8) -AC_CHECK_SIZEOF(long double, 12) -AC_CHECK_SIZEOF(void *, 4) -AC_TYPE_OFF_T -AC_CHECK_TYPES(loff_t) -AC_CHECK_TYPES(caddr_t) -AC_TYPE_SIZE_T -AC_TYPE_SIGNAL -AC_HEADER_TIME -AC_STRUCT_TM - -dnl Check whether sys/socket.h defines type socklen_t. -dnl (extracted from ac-archive/Miscellaneous) -AC_CACHE_CHECK([for socklen_t], - ac_cv_type_socklen_t, [ - AC_TRY_COMPILE([ - #include - #include - ], [socklen_t len = 42; return 0;], - ac_cv_type_socklen_t=yes, ac_cv_type_socklen_t=no, - dnl When cross-compiling, do not assume anything. - ac_cv_type_socklen_t="guessing no" - ) -]) -if [[ "x$ac_cv_type_socklen_t" != "xyes" ]]; then - AC_DEFINE(socklen_t, int, [Define to 'int' if doesn't define.]) -fi - -dnl Checks for library functions. -AC_CHECK_FUNCS(strdup strerror cfmakeraw) -AC_CHECK_FUNCS(clock_gettime timer_create) -AC_CHECK_FUNCS(sigaction signal) -AC_CHECK_FUNCS(mmap mprotect munmap) -AC_CHECK_FUNCS(vm_allocate vm_deallocate vm_protect) -AC_CHECK_FUNCS(poll inet_aton) - -dnl Darwin seems to define mach_task_self() instead of task_self(). -AC_CHECK_FUNCS(mach_task_self task_self) - -dnl Check for systems where POSIX-style non-blocking I/O (O_NONBLOCK) -dnl doesn't work or is unimplemented. On these systems (mostly older -dnl ones), use the old BSD-style FIONBIO approach instead. [tcl.m4] -AC_CACHE_CHECK([FIONBIO vs. O_NONBLOCK for non-blocking I/O], - ac_cv_nonblocking_io, [ - case "$host" in - *-*-osf*) - ac_cv_nonblocking_io=FIONBIO - ;; - *-*-sunos4*) - ac_cv_nonblocking_io=FIONBIO - ;; - *-*-ultrix*) - ac_cv_nonblocking_io=FIONBIO - ;; - *) - ac_cv_nonblocking_io=O_NONBLOCK - ;; - esac -]) -if [[ "$ac_cv_nonblocking_io" = "FIONBIO" ]]; then - AC_DEFINE(USE_FIONBIO, 1, [Define if BSD-style non-blocking I/O is to be used]) -fi - -dnl Check whether compiler supports byte bit-fields -AC_CACHE_CHECK([whether compiler supports byte bit-fields], - ac_cv_have_byte_bitfields, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - struct A { - unsigned char b1:4; - unsigned char b2:4; - unsigned char c; - unsigned short s; - unsigned char a[4]; - }; - - int main(void) { - A a; - return ! (sizeof(A) == 8 && &a.c == ((unsigned char *)&a + 1)); - }], - [ac_cv_have_byte_bitfields=yes], - [ac_cv_have_byte_bitfields=no], - dnl When cross-compiling, assume only GCC supports this - [if [[ "$GCC" = "yes" ]]; then - ac_cv_have_byte_bitfields="guessing yes" - else - ac_cv_have_byte_bitfields="guessing no" - fi] - ) - AC_LANG_RESTORE -]) - -dnl AC_CHECK_FRAMEWORK($1=NAME, $2=INCLUDES) -AC_DEFUN([AC_CHECK_FRAMEWORK], [ - AS_VAR_PUSHDEF([ac_Framework], [ac_cv_framework_$1])dnl - AC_CACHE_CHECK([whether compiler supports framework $1], - ac_Framework, [ - saved_LIBS="$LIBS" - LIBS="$LIBS -framework $1" - AC_TRY_LINK( - [$2], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); LIBS="$saved_LIBS"] - ) - ]) - AS_IF([test AS_VAR_GET(ac_Framework) = yes], - [AC_DEFINE(AS_TR_CPP(HAVE_FRAMEWORK_$1), 1, [Define if framework $1 is available.])] - ) - AS_VAR_POPDEF([ac_Framework])dnl -]) - -dnl Check for some MacOS X frameworks -AC_CHECK_FRAMEWORK(AppKit, []) -AC_CHECK_FRAMEWORK(Carbon, [#include ]) -AC_CHECK_FRAMEWORK(IOKit, [#include ]) -AC_CHECK_FRAMEWORK(CoreFoundation, [#include ]) - -dnl Select system-dependant source files. -SERIALSRC=../dummy/serial_dummy.cpp -ETHERSRC=../dummy/ether_dummy.cpp -SCSISRC=../dummy/scsi_dummy.cpp -AUDIOSRC=../dummy/audio_dummy.cpp -EXTFSSRC=extfs_unix.cpp -EXTRASYSSRCS= -case "$target_os" in -darwin*) - if [[ "x$ac_cv_framework_IOKit" = "xyes" -a "x$ac_cv_framework_CoreFoundation" = "xyes" ]]; then - EXTRASYSSRCS="Darwin/sys_darwin.cpp" - fi - ;; -esac - -EXTRASYSSRCS="$EXTRASYSSRCS main_unix.cpp prefs_unix.cpp" - -dnl SDL overrides -if [[ "x$WANT_SDL" = "xyes" ]]; then - AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) -fi -if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then - AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) - VIDEOSRCS="../SDL/video_sdl.cpp" - KEYCODES="../SDL/keycodes" - case "$target_os" in - *) - EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" - ;; - esac -fi -if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then - AC_DEFINE(USE_SDL_AUDIO, 1, [Define to enable SDL audio support]) - AUDIOSRC="../SDL/audio_sdl.cpp" -fi - -if [[ "x$HAVE_PTHREADS" = "xno" ]]; then - dnl Serial, ethernet and audio support needs pthreads - AC_MSG_WARN([You don't have pthreads, disabling serial, ethernet and audio support.]) - SERIALSRC=../dummy/serial_dummy.cpp - ETHERSRC=../dummy/ether_dummy.cpp - AUDIOSRC=../dummy/audio_dummy.cpp -fi -SYSSRCS="$VIDEOSRCS $EXTFSSRC $SERIALSRC $ETHERSRC $SCSISRC $AUDIOSRC $SEMSRC $UISRCS $EXTRASYSSRCS" - -dnl Define a macro that translates a yesno-variable into a C macro definition -dnl to be put into the config.h file -dnl $1 -- the macro to define -dnl $2 -- the value to translate -dnl $3 -- template name -AC_DEFUN([AC_TRANSLATE_DEFINE], [ - if [[ "x$2" = "xyes" -o "x$2" = "xguessing yes" ]]; then - AC_DEFINE($1, 1, $3) - fi -]) - -dnl Check that the host supports TUN/TAP devices -AC_CACHE_CHECK([whether TUN/TAP is supported], - ac_cv_tun_tap_support, [ - AC_TRY_COMPILE([ - #if defined(HAVE_NET_IF_H) && defined(HAVE_NET_IF_TUN_H) - #include - #include - #endif - ], [ - struct ifreq ifr; - memset(&ifr, 0, sizeof(ifr)); - ifr.ifr_flags = IFF_TAP | IFF_NO_PI; - ], - ac_cv_tun_tap_support=yes, ac_cv_tun_tap_support=no - ) -]) -AC_TRANSLATE_DEFINE(ENABLE_TUNTAP, "$ac_cv_tun_tap_support", - [Define if your system supports TUN/TAP devices.]) - -dnl Various checks if the system supports vm_allocate() and the like functions. -have_mach_vm=no -if [[ "x$ac_cv_func_vm_allocate" = "xyes" -a "x$ac_cv_func_vm_deallocate" = "xyes" -a \ - "x$ac_cv_func_vm_protect" = "xyes" ]]; then - have_mach_vm=yes -fi -AC_TRANSLATE_DEFINE(HAVE_MACH_VM, "$have_mach_vm", - [Define if your system has a working vm_allocate()-based memory allocator.]) - -dnl Check that vm_allocate(), vm_protect() work -if [[ "x$have_mach_vm" = "xyes" ]]; then - -AC_CACHE_CHECK([whether vm_protect works], - ac_cv_vm_protect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_vm_protect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_vm_protect_works=no, rm -f core, - dnl When cross-compiling, do not assume anything - ac_cv_vm_protect_works="guessing no" - ) - done - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../CrossPlatform/vm_alloc.cpp" - ], , ac_cv_vm_protect_works=no, - dnl When cross-compiling, do not assume anything - ac_cv_vm_protect_works="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Remove support for vm_allocate() if vm_protect() does not work -if [[ "x$have_mach_vm" = "xyes" ]]; then - case $ac_cv_vm_protect_works in - *yes) have_mach_vm=yes;; - *no) have_mach_vm=no;; - esac -fi -AC_TRANSLATE_DEFINE(HAVE_MACH_VM, "$have_mach_vm", - [Define if your system has a working vm_allocate()-based memory allocator.]) - -fi dnl HAVE_MACH_VM - -dnl Various checks if the system supports mmap() and the like functions. -dnl ... and Mach memory allocators are not supported -have_mmap_vm=no -if [[ "x$ac_cv_func_mmap" = "xyes" -a "x$ac_cv_func_munmap" = "xyes" -a \ - "x$ac_cv_func_mprotect" = "xyes" ]]; then - if [[ "x$have_mach_vm" = "xno" ]]; then - have_mmap_vm=yes - fi -fi -AC_TRANSLATE_DEFINE(HAVE_MMAP_VM, "$have_mmap_vm", - [Define if your system has a working mmap()-based memory allocator.]) - -dnl Check that mmap() and associated functions work. -if [[ "x$have_mmap_vm" = "xyes" ]]; then - -dnl Check if we have a working anonymous mmap() -AC_CACHE_CHECK([whether mmap supports MAP_ANON], - ac_cv_mmap_anon, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_MMAP_ANON - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_MMAP_ANON - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mmap_anon=yes, ac_cv_mmap_anon=no, - dnl When cross-compiling, do not assume anything. - ac_cv_mmap_anon="guessing no" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_MMAP_ANON, "$ac_cv_mmap_anon", - [Define if defines MAP_ANON and mmap()'ing with MAP_ANON works.]) - -AC_CACHE_CHECK([whether mmap supports MAP_ANONYMOUS], - ac_cv_mmap_anonymous, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_MMAP_ANONYMOUS - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_MMAP_ANON - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mmap_anonymous=yes, ac_cv_mmap_anonymous=no, - dnl When cross-compiling, do not assume anything. - ac_cv_mmap_anonymous="guessing no" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_MMAP_ANONYMOUS, "$ac_cv_mmap_anonymous", - [Define if defines MAP_ANONYMOUS and mmap()'ing with MAP_ANONYMOUS works.]) - -AC_CACHE_CHECK([whether mprotect works], - ac_cv_mprotect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_mprotect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mprotect_works=no, rm -f core, - dnl When cross-compiling, do not assume anything - ac_cv_mprotect_works="guessing no" - ) - done - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../CrossPlatform/vm_alloc.cpp" - ], , ac_cv_mprotect_works=no, - dnl When cross-compiling, do not assume anything - ac_cv_mprotect_works="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Remove support for mmap() if mprotect() does not work -if [[ "x$have_mmap_vm" = "xyes" ]]; then - case $ac_cv_mprotect_works in - *yes) have_mmap_vm=yes;; - *no) have_mmap_vm=no;; - esac -fi -AC_TRANSLATE_DEFINE(HAVE_MMAP_VM, $have_mmap_vm, - [Define if your system has a working mmap()-based memory allocator.]) - -fi dnl HAVE_MMAP_VM - -dnl Check if we can modify the __PAGEZERO segment for use as Low Memory -AC_CACHE_CHECK([whether __PAGEZERO can be Low Memory area 0x0000-0x2000], - ac_cv_pagezero_hack, [ - ac_cv_pagezero_hack=no - if AC_TRY_COMMAND([Darwin/testlmem.sh 0x2000]); then - ac_cv_pagezero_hack=yes - dnl might as well skip the test for mmap-able low memory - ac_cv_can_map_lm=no - fi -]) -AC_TRANSLATE_DEFINE(PAGEZERO_HACK, "$ac_cv_pagezero_hack", - [Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this system.]) - -dnl Check if we can mmap 0x2000 bytes from 0x0000 -AC_CACHE_CHECK([whether we can map Low Memory area 0x0000-0x2000], - ac_cv_can_map_lm, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include "../CrossPlatform/vm_alloc.cpp" - int main(void) { /* returns 0 if we could map the lowmem globals */ - volatile char * lm = 0; - if (vm_init() < 0) exit(1); - if (vm_acquire_fixed(0, 0x2000) < 0) exit(1); - lm[0] = 'z'; - if (vm_release((char *)lm, 0x2000) < 0) exit(1); - vm_exit(); exit(0); - } - ], ac_cv_can_map_lm=yes, ac_cv_can_map_lm=no, - dnl When cross-compiling, do not assume anything. - ac_cv_can_map_lm="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Check signal handlers need to be reinstalled -AC_CACHE_CHECK([whether signal handlers need to be reinstalled], - ac_cv_signal_need_reinstall, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include - #ifdef HAVE_UNISTD_H - #include - #endif - #include - static int handled_signal = 0; - RETSIGTYPE sigusr1_handler(int) { handled_signal++; } - int main(void) { /* returns 0 if signals need not to be reinstalled */ - signal(SIGUSR1, sigusr1_handler); raise(SIGUSR1); raise(SIGUSR1); - exit(handled_signal == 2); - } - ], ac_cv_signal_need_reinstall=yes, ac_cv_signal_need_reinstall=no, - dnl When cross-compiling, do not assume anything. - ac_cv_signal_need_reinstall="guessing yes" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(SIGNAL_NEED_REINSTALL, "$ac_cv_signal_need_reinstall", - [Define if your system requires signals to be reinstalled.]) - -dnl Check if sigaction handlers need to be reinstalled -AC_CACHE_CHECK([whether sigaction handlers need to be reinstalled], - ac_cv_sigaction_need_reinstall, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include - #ifdef HAVE_UNISTD_H - #include - #endif - #include - static int handled_signal = 0; - RETSIGTYPE sigusr1_handler(int) { handled_signal++; } - typedef RETSIGTYPE (*signal_handler)(int); - static signal_handler mysignal(int sig, signal_handler handler) { - struct sigaction old_sa; - struct sigaction new_sa; - new_sa.sa_handler = handler; - return ((sigaction(sig,&new_sa,&old_sa) < 0) ? SIG_IGN : old_sa.sa_handler); - } - int main(void) { /* returns 0 if signals need not to be reinstalled */ - mysignal(SIGUSR1, sigusr1_handler); raise(SIGUSR1); raise(SIGUSR1); - exit(handled_signal == 2); - } - ], ac_cv_sigaction_need_reinstall=yes, ac_cv_sigaction_need_reinstall=no, - dnl When cross-compiling, do not assume anything. - ac_cv_sigaction_need_reinstall="guessing yes" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(SIGACTION_NEED_REINSTALL, "$ac_cv_sigaction_need_reinstall", - [Define if your system requires sigactions to be reinstalled.]) - -dnl Check if Mach exceptions supported. -AC_CACHE_CHECK([whether your system supports Mach exceptions], - ac_cv_have_mach_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_UNISTD_H 1 - #define HAVE_MACH_VM 1 - #define HAVE_MACH_TASK_SELF 1 - #define HAVE_MACH_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=mach - ac_cv_have_mach_exceptions=yes - ], - ac_cv_have_mach_exceptions=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_mach_exceptions=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_MACH_EXCEPTIONS, "$ac_cv_have_mach_exceptions", - [Define if your system supports Mach exceptions.]) - -dnl Otherwise, check if extended signals are supported with . -if [[ -z "$sigsegv_recovery" ]]; then - AC_CACHE_CHECK([whether your system supports extended signal handlers via asm], - ac_cv_have_asm_extended_signals, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #ifdef HAVE_UNISTD_H - #include - #endif - #define HAVE_ASM_UCONTEXT 1 - #define HAVE_SIGINFO_T 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=siginfo - ac_cv_have_asm_extended_signals=yes - ], - ac_cv_have_asm_extended_signals=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_asm_extended_signals=no - ) - AC_LANG_RESTORE - ] - ) - AC_TRANSLATE_DEFINE(HAVE_ASM_UCONTEXT, "$ac_cv_have_asm_extended_signals", - [Define if your system has header.]) - AC_TRANSLATE_DEFINE(HAVE_SIGINFO_T, "$ac_cv_have_asm_extended_signals", - [Define if your system supports extended signals.]) -fi - -if [[ -z "$sigsegv_recovery" ]]; then - AC_CACHE_CHECK([whether your system supports extended signal handlers], - ac_cv_have_extended_signals, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #ifdef HAVE_UNISTD_H - #include - #endif - #define HAVE_SIGINFO_T 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=siginfo - ac_cv_have_extended_signals=yes - ], - ac_cv_have_extended_signals=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_extended_signals=no - ) - AC_LANG_RESTORE - ] - ) - AC_TRANSLATE_DEFINE(HAVE_SIGINFO_T, "$ac_cv_have_extended_signals", - [Define if your system supports extended signals.]) -fi - -dnl Otherwise, check for subterfuges. -if [[ -z "$sigsegv_recovery" ]]; then - AC_CACHE_CHECK([whether we then have a subterfuge for your system], - ac_cv_have_sigcontext_hack, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGCONTEXT_SUBTERFUGE 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=sigcontext - ac_cv_have_sigcontext_hack=yes - ], - ac_cv_have_sigcontext_hack=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_sigcontext_hack=no - ) - AC_LANG_RESTORE - ]) - AC_TRANSLATE_DEFINE(HAVE_SIGCONTEXT_SUBTERFUGE, "$ac_cv_have_sigcontext_hack", - [Define if we know a hack to replace siginfo_t->si_addr member.]) -fi - -dnl Check if we can ignore the fault (instruction skipping in SIGSEGV handler) -AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], - ac_cv_have_skip_instruction, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_skip_instruction=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_SIGSEGV_SKIP_INSTRUCTION, "$ac_cv_have_skip_instruction", - [Define if we can ignore the fault (instruction skipping in SIGSEGV handler).]) - -dnl Can we do Video on SEGV Signals ? -CAN_VOSF=no -if [[ -n "$sigsegv_recovery" ]]; then - CAN_VOSF=yes -fi - -dnl A dummy program that returns always true -AC_PATH_PROG([BLESS], "true") - -dnl Check for linker script support -case $target_os:$target_cpu in -darwin*:*) LINKER_SCRIPT_FLAGS="-Wl,-seg1addr,0x78048000";; -esac -if [[ -n "$LINKER_SCRIPT_FLAGS" ]]; then - AC_CACHE_CHECK([whether linker script is usable], - ac_cv_linker_script_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - saved_LDFLAGS="$LDFLAGS" - LDFLAGS="$LDFLAGS $LINKER_SCRIPT_FLAGS" - AC_TRY_RUN( - [int main() {if ((char *)&main < (char *)0x70000000) return 1;}], - [ac_cv_linker_script_works=yes], - [ac_cv_linker_script_works=no], - dnl When cross-compiling, assume it works - [ac_cv_linker_script_works="guessing yes"] - ) - AC_LANG_RESTORE - if [[ "$ac_cv_linker_script_works" = "no" ]]; then - LDFLAGS="$saved_LDFLAGS" - LINKER_SCRIPT_FLAGS="" - fi - ]) -fi -AC_TRANSLATE_DEFINE(HAVE_LINKER_SCRIPT, "$ac_cv_linker_script_works", - [Define if there is a linker script to relocate the executable above 0x70000000.]) - -dnl Determine the addressing mode to use - -ADDRESSING_MODE="" -AC_MSG_CHECKING([for the addressing mode to use]) -for am in $ADDRESSING_TEST_ORDER; do - case $am in - real) - dnl Requires ability to mmap() Low Memory globals - if [[ "x$ac_cv_can_map_lm$ac_cv_pagezero_hack" = "xnono" ]]; then - continue - fi - dnl Requires VOSF screen updates - if [[ "x$CAN_VOSF" = "xno" ]]; then - continue - fi - dnl Real addressing will probably work. - ADDRESSING_MODE="real" - WANT_VOSF=yes dnl we can use VOSF and we need it actually - DEFINES="$DEFINES -DREAL_ADDRESSING" - if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then - BLESS=Darwin/lowmem - LDFLAGS="$LDFLAGS -pagezero_size 0x2000" - fi - break - ;; - direct) - dnl Requires VOSF screen updates - if [[ "x$CAN_VOSF" = "xyes" ]]; then - ADDRESSING_MODE="direct" - WANT_VOSF=yes dnl we can use VOSF and we need it actually - DEFINES="$DEFINES -DDIRECT_ADDRESSING" - break - fi - ;; - banks) - dnl Default addressing mode - ADDRESSING_MODE="memory banks" - break - ;; - *) - AC_MSG_ERROR([Internal configure.in script error for $am addressing mode]) - esac -done -AC_MSG_RESULT($ADDRESSING_MODE) -if [[ "x$ADDRESSING_MODE" = "x" ]]; then - AC_MSG_WARN([Sorry, no suitable addressing mode in $ADDRESSING_TEST_ORDER]) - ADDRESSING_MODE="memory banks" -fi - -dnl Enable VOSF screen updates with this feature is requested and feasible -if [[ "x$WANT_VOSF" = "xyes" -a "x$CAN_VOSF" = "xyes" ]]; then - AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) -else - WANT_VOSF=no -fi - -dnl Check for GCC 2.7 or higher. -HAVE_GCC27=no -AC_MSG_CHECKING(for GCC 2.7 or higher) -AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ - 1 > 1 || __GNUC_MINOR__ - 1 > 5) - # error gcc < 2.7 - #endif - ]])], - [AC_MSG_RESULT(yes); HAVE_GCC27=yes], - [AC_MSG_RESULT(no)]) - -dnl Check for GCC 3.0 or higher. -HAVE_GCC30=no -AC_MSG_CHECKING(for GCC 3.0 or higher) -AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ >= 3) - # error gcc < 3 - #endif - ]])], - [AC_MSG_RESULT(yes); HAVE_GCC30=yes], - [AC_MSG_RESULT(no)]) - -dnl Check for ICC. -AC_MSG_CHECKING(for ICC) -HAVE_ICC=no -if $CXX -V -v 2>&1 | grep -q "Intel(R) C++ Compiler"; then - HAVE_ICC=yes -fi -AC_MSG_RESULT($HAVE_ICC) - -dnl Set "-fomit-frame-pointer" on i386 GCC 2.7 or higher. -dnl Also set "-fno-exceptions" for C++ because exception handling requires -dnl the frame pointer. -if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_I386" = "xyes" ]]; then - CFLAGS="$CFLAGS -fomit-frame-pointer" - CXXFLAGS="$CXXFLAGS -fomit-frame-pointer -fno-exceptions" -fi - - -dnl Add -mdynamic-no-pic for MacOS X (XXX icc10 will support MacOS X) -if [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -mdynamic-no-pic" - AC_CACHE_CHECK([whether the compiler supports -mdynamic-no-pic], - ac_cv_gcc_mdynamic_no_pic, [ - AC_TRY_COMPILE([],[],[ac_cv_gcc_mdynamic_no_pic=yes],[ac_cv_gcc_mdynamic_no_pic=no]) - ]) - if [[ "x$ac_cv_gcc_mdynamic_no_pic" = "xyes" ]]; then - CXXFLAGS="$CXXFLAGS -mdynamic-no-pic" - else - CFLAGS="$SAVED_CFLAGS" - fi -fi - -dnl Select appropriate CPU source and REGPARAM define. -CPUSRCS="cpuemu.cpp" - -dnl Select appropriate FPU source. -AC_CHECK_HEADERS(ieee754.h ieeefp.h floatingpoint.h nan.h) - -for fpe in $FPE_CORE_TEST_ORDER; do - case $fpe in - uae) - FPE_CORE="uae fpu core" - DEFINES="$DEFINES -DFPU_UAE" - FPUSRCS="../uae_cpu/fpu/fpu_uae.cpp" - break - ;; - *) - AC_MSG_ERROR([Internal configure.in script error for $fpe fpu core]) - ;; - esac -done -if [[ "x$FPE_CORE" = "x" ]]; then - AC_MSG_ERROR([Sorry, no suitable FPU core found in $FPE_CORE_TEST_ORDER]) -fi - -dnl Check for certain math functions -AC_CHECK_FUNCS(atanh) -AC_CHECK_FUNCS(isnan isinf finite isnormal signbit) - -dnl UAE CPU sources for all non-m68k-native architectures. -CPUINCLUDES="-I../uae_cpu" -CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS" - -dnl Generate Makefile. -AC_SUBST(DEFINES) -AC_SUBST(SYSSRCS) -AC_SUBST(CPUINCLUDES) -AC_SUBST(CPUSRCS) -AC_SUBST(BLESS) -AC_SUBST(KEYCODES) -AC_CONFIG_FILES([Makefile]) -AC_OUTPUT - -dnl Print summary. -echo -echo Basilisk II configuration summary: -echo -echo SDL support ............................ : $SDL_SUPPORT -echo Enable video on SEGV signals ........... : $WANT_VOSF -echo Floating-Point emulation core .......... : $FPE_CORE -echo Addressing mode ........................ : $ADDRESSING_MODE -echo Bad memory access recovery type ........ : $sigsegv_recovery -echo -echo "Configuration done. Now type \"make\" (or \"gmake\")." diff --git a/BasiliskII/src/Unix/cpr.sh b/BasiliskII/src/Unix/cpr.sh deleted file mode 100755 index 662238942..000000000 --- a/BasiliskII/src/Unix/cpr.sh +++ /dev/null @@ -1,59 +0,0 @@ -#!/bin/sh -# A script to copy recursively ignoring detritus. -# I based this off of a script I had that copied over ssh. -# source can be a file or directory. -# Mike Sliczniak 2009 - -# Don't copy resource forks or extended attributes on Mac OS X 10.4. -COPY_EXTENDED_ATTRIBUTES_DISABLE=true; export COPY_EXTENDED_ATTRIBUTES_DISABLE - -# Don't copy resource forks or extended attributes on Mac OS X 10.5. -COPYFILE_DISABLE=true; export COPYFILE_DISABLE - -case $# in - 2) - ;; - *) - echo "Usage: cpr source destdir" >&2 - exit 2 - ;; -esac - -# dir and base names of the source -d=`dirname "$1"` || exit -b=`basename "$1"` || exit - -# handle relative and absolute destination dirs -case "$2" in - /*) - p=$2 - ;; - *) - p="$PWD"/"$2" - ;; -esac - -# cd into the source dir -cd "$d" || exit - -# This is only for Mac OS X, but some systems do not have gtar, find -# sometimes lacks -f, and other systems use test -a. - -# List all interesting files for tar to copy: -# The first clause skips directories used for revision control. -# The second clause ignores detritus files from revision control and OSs. -# The third clause ignores ._ style files created by Mac OS X on file systems -# that do not have native resource forks or extended attributes. It checks to -# see that the file it is associated with exists. -find -f "$b" \( \! \( -type d \( \ - -name CVS -o -name RCS -o -name SCCS -o -name .git -o -name .svn \ -\) -prune \) \) \ -\ -\( \! \( -type f \( \ - -name .DS_Store -o -name Thumbs.db -o -name .cvsignore -o -name .gitignore \ -\) \) \) \ -\ -\( \! \( \ - -type f -name '._*' -execdir /bin/sh -c \ - 'f=`echo "$1" | sed "s:^\._:./:"`; [ -e "$f" ]' /bin/sh '{}' \; \ -\) \) -print0 | tar -c -f - --null -T - --no-recursion | tar -x -C "$p" -f - diff --git a/BasiliskII/src/Unix/install-sh b/BasiliskII/src/Unix/install-sh deleted file mode 100755 index 11870f1b0..000000000 --- a/BasiliskII/src/Unix/install-sh +++ /dev/null @@ -1,251 +0,0 @@ -#!/bin/sh -# -# install - install a program, script, or datafile -# This comes from X11R5 (mit/util/scripts/install.sh). -# -# Copyright 1991 by the Massachusetts Institute of Technology -# -# 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 M.I.T. not be used in advertising or -# publicity pertaining to distribution of the software without specific, -# written prior permission. M.I.T. makes no representations about the -# suitability of this software for any purpose. It is provided "as is" -# without express or implied warranty. -# -# Calling this script install-sh is preferred over install.sh, to prevent -# `make' implicit rules from creating a file called install from it -# when there is no Makefile. -# -# This script is compatible with the BSD install script, but was written -# from scratch. It can only install one file at a time, a restriction -# shared with many OS's install programs. - - -# set DOITPROG to echo to test this script - -# Don't use :- since 4.3BSD and earlier shells don't like it. -doit="${DOITPROG-}" - - -# put in absolute paths if you don't have them in your path; or use env. vars. - -mvprog="${MVPROG-mv}" -cpprog="${CPPROG-cp}" -chmodprog="${CHMODPROG-chmod}" -chownprog="${CHOWNPROG-chown}" -chgrpprog="${CHGRPPROG-chgrp}" -stripprog="${STRIPPROG-strip}" -rmprog="${RMPROG-rm}" -mkdirprog="${MKDIRPROG-mkdir}" - -transformbasename="" -transform_arg="" -instcmd="$mvprog" -chmodcmd="$chmodprog 0755" -chowncmd="" -chgrpcmd="" -stripcmd="" -rmcmd="$rmprog -f" -mvcmd="$mvprog" -src="" -dst="" -dir_arg="" - -while [ x"$1" != x ]; do - case $1 in - -c) instcmd="$cpprog" - shift - continue;; - - -d) dir_arg=true - shift - continue;; - - -m) chmodcmd="$chmodprog $2" - shift - shift - continue;; - - -o) chowncmd="$chownprog $2" - shift - shift - continue;; - - -g) chgrpcmd="$chgrpprog $2" - shift - shift - continue;; - - -s) stripcmd="$stripprog" - shift - continue;; - - -t=*) transformarg=`echo $1 | sed 's/-t=//'` - shift - continue;; - - -b=*) transformbasename=`echo $1 | sed 's/-b=//'` - shift - continue;; - - *) if [ x"$src" = x ] - then - src=$1 - else - # this colon is to work around a 386BSD /bin/sh bug - : - dst=$1 - fi - shift - continue;; - esac -done - -if [ x"$src" = x ] -then - echo "install: no input file specified" - exit 1 -else - : -fi - -if [ x"$dir_arg" != x ]; then - dst=$src - src="" - - if [ -d $dst ]; then - instcmd=: - chmodcmd="" - else - instcmd=$mkdirprog - fi -else - -# Waiting for this to be detected by the "$instcmd $src $dsttmp" command -# might cause directories to be created, which would be especially bad -# if $src (and thus $dsttmp) contains '*'. - - if [ -f "$src" ] || [ -d "$src" ] - then - : - else - echo "install: $src does not exist" - exit 1 - fi - - if [ x"$dst" = x ] - then - echo "install: no destination specified" - exit 1 - else - : - fi - -# If destination is a directory, append the input filename; if your system -# does not like double slashes in filenames, you may need to add some logic - - if [ -d $dst ] - then - dst="$dst"/`basename $src` - else - : - fi -fi - -## this sed command emulates the dirname command -dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'` - -# Make sure that the destination directory exists. -# this part is taken from Noah Friedman's mkinstalldirs script - -# Skip lots of stat calls in the usual case. -if [ ! -d "$dstdir" ]; then -defaultIFS=' - ' -IFS="${IFS-${defaultIFS}}" - -oIFS="${IFS}" -# Some sh's can't handle IFS=/ for some reason. -IFS='%' -set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'` -IFS="${oIFS}" - -pathcomp='' - -while [ $# -ne 0 ] ; do - pathcomp="${pathcomp}${1}" - shift - - if [ ! -d "${pathcomp}" ] ; - then - $mkdirprog "${pathcomp}" - else - : - fi - - pathcomp="${pathcomp}/" -done -fi - -if [ x"$dir_arg" != x ] -then - $doit $instcmd $dst && - - if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else : ; fi && - if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else : ; fi && - if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else : ; fi && - if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else : ; fi -else - -# If we're going to rename the final executable, determine the name now. - - if [ x"$transformarg" = x ] - then - dstfile=`basename $dst` - else - dstfile=`basename $dst $transformbasename | - sed $transformarg`$transformbasename - fi - -# don't allow the sed command to completely eliminate the filename - - if [ x"$dstfile" = x ] - then - dstfile=`basename $dst` - else - : - fi - -# Make a temp file name in the proper directory. - - dsttmp=$dstdir/#inst.$$# - -# Move or copy the file name to the temp name - - $doit $instcmd $src $dsttmp && - - trap "rm -f ${dsttmp}" 0 && - -# and set any options; do chmod last to preserve setuid bits - -# If any of these fail, we abort the whole thing. If we want to -# ignore errors from any of these, just make sure not to ignore -# errors from the above "$doit $instcmd $src $dsttmp" command. - - if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else :;fi && - if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else :;fi && - if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else :;fi && - if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else :;fi && - -# Now rename the file to the real destination. - - $doit $rmcmd -f $dstdir/$dstfile && - $doit $mvcmd $dsttmp $dstdir/$dstfile - -fi && - - -exit 0 diff --git a/BasiliskII/src/Unix/m4/egrep.m4 b/BasiliskII/src/Unix/m4/egrep.m4 deleted file mode 100644 index 051d7f5ad..000000000 --- a/BasiliskII/src/Unix/m4/egrep.m4 +++ /dev/null @@ -1,13 +0,0 @@ -# AC_PROG_EGREP -# ------------- -# This is predefined starting with Autoconf 2.54, so this conditional -# definition can be removed once we require Autoconf 2.54 or later. -m4_ifndef([AC_PROG_EGREP], [AC_DEFUN([AC_PROG_EGREP], -[AC_CACHE_CHECK([for egrep], [ac_cv_prog_egrep], - [if echo a | (grep -E '(a|b)') >/dev/null 2>&1 - then ac_cv_prog_egrep='grep -E' - else ac_cv_prog_egrep='egrep' - fi]) - EGREP=$ac_cv_prog_egrep - AC_SUBST([EGREP]) -])]) diff --git a/BasiliskII/src/Unix/m4/esd.m4 b/BasiliskII/src/Unix/m4/esd.m4 deleted file mode 100644 index 24666c962..000000000 --- a/BasiliskII/src/Unix/m4/esd.m4 +++ /dev/null @@ -1,194 +0,0 @@ -# Configure paths for ESD -# Manish Singh 98-9-30 -# stolen back from Frank Belew -# stolen from Manish Singh -# Shamelessly stolen from Owen Taylor - -dnl AM_PATH_ESD([MINIMUM-VERSION, [ACTION-IF-FOUND [, ACTION-IF-NOT-FOUND]]]) -dnl Test for ESD, and define ESD_CFLAGS and ESD_LIBS -dnl -AC_DEFUN([AM_PATH_ESD], -[dnl -dnl Get the cflags and libraries from the esd-config script -dnl -AC_ARG_WITH(esd-prefix,[ --with-esd-prefix=PFX Prefix where ESD is installed (optional)], - esd_prefix="$withval", esd_prefix="") -AC_ARG_WITH(esd-exec-prefix,[ --with-esd-exec-prefix=PFX Exec prefix where ESD is installed (optional)], - esd_exec_prefix="$withval", esd_exec_prefix="") -AC_ARG_ENABLE(esdtest, [ --disable-esdtest Do not try to compile and run a test ESD program], - , enable_esdtest=yes) - - if test x$esd_exec_prefix != x ; then - esd_args="$esd_args --exec-prefix=$esd_exec_prefix" - if test x${ESD_CONFIG+set} != xset ; then - ESD_CONFIG=$esd_exec_prefix/bin/esd-config - fi - fi - if test x$esd_prefix != x ; then - esd_args="$esd_args --prefix=$esd_prefix" - if test x${ESD_CONFIG+set} != xset ; then - ESD_CONFIG=$esd_prefix/bin/esd-config - fi - fi - - AC_PATH_PROG(ESD_CONFIG, esd-config, no) - min_esd_version=ifelse([$1], ,0.2.7,$1) - AC_MSG_CHECKING(for ESD - version >= $min_esd_version) - no_esd="" - if test "$ESD_CONFIG" = "no" ; then - no_esd=yes - else - AC_LANG_SAVE - AC_LANG_C - ESD_CFLAGS=`$ESD_CONFIG $esdconf_args --cflags` - ESD_LIBS=`$ESD_CONFIG $esdconf_args --libs` - - esd_major_version=`$ESD_CONFIG $esd_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\1/'` - esd_minor_version=`$ESD_CONFIG $esd_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\2/'` - esd_micro_version=`$ESD_CONFIG $esd_config_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\3/'` - if test "x$enable_esdtest" = "xyes" ; then - ac_save_CFLAGS="$CFLAGS" - ac_save_LIBS="$LIBS" - CFLAGS="$CFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" -dnl -dnl Now check if the installed ESD is sufficiently new. (Also sanity -dnl checks the results of esd-config to some extent -dnl - rm -f conf.esdtest - AC_TRY_RUN([ -#include -#include -#include -#include - -char* -my_strdup (char *str) -{ - char *new_str; - - if (str) - { - new_str = malloc ((strlen (str) + 1) * sizeof(char)); - strcpy (new_str, str); - } - else - new_str = NULL; - - return new_str; -} - -int main () -{ - int major, minor, micro; - char *tmp_version; - - system ("touch conf.esdtest"); - - /* HP/UX 9 (%@#!) writes to sscanf strings */ - tmp_version = my_strdup("$min_esd_version"); - if (sscanf(tmp_version, "%d.%d.%d", &major, &minor, µ) != 3) { - printf("%s, bad version string\n", "$min_esd_version"); - exit(1); - } - - if (($esd_major_version > major) || - (($esd_major_version == major) && ($esd_minor_version > minor)) || - (($esd_major_version == major) && ($esd_minor_version == minor) && ($esd_micro_version >= micro))) - { - return 0; - } - else - { - printf("\n*** 'esd-config --version' returned %d.%d.%d, but the minimum version\n", $esd_major_version, $esd_minor_version, $esd_micro_version); - printf("*** of ESD required is %d.%d.%d. If esd-config is correct, then it is\n", major, minor, micro); - printf("*** best to upgrade to the required version.\n"); - printf("*** If esd-config was wrong, set the environment variable ESD_CONFIG\n"); - printf("*** to point to the correct copy of esd-config, and remove the file\n"); - printf("*** config.cache before re-running configure\n"); - return 1; - } -} - -],, no_esd=yes,[echo $ac_n "cross compiling; assumed OK... $ac_c"]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - AC_LANG_RESTORE - fi - fi - if test "x$no_esd" = x ; then - AC_MSG_RESULT(yes) - ifelse([$2], , :, [$2]) - else - AC_MSG_RESULT(no) - if test "$ESD_CONFIG" = "no" ; then - echo "*** The esd-config script installed by ESD could not be found" - echo "*** If ESD was installed in PREFIX, make sure PREFIX/bin is in" - echo "*** your path, or set the ESD_CONFIG environment variable to the" - echo "*** full path to esd-config." - else - if test -f conf.esdtest ; then - : - else - echo "*** Could not run ESD test program, checking why..." - CFLAGS="$CFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" - AC_LANG_SAVE - AC_LANG_C - AC_TRY_LINK([ -#include -#include -], [ return 0; ], - [ echo "*** The test program compiled, but did not run. This usually means" - echo "*** that the run-time linker is not finding ESD or finding the wrong" - echo "*** version of ESD. If it is not finding ESD, you'll need to set your" - echo "*** LD_LIBRARY_PATH environment variable, or edit /etc/ld.so.conf to point" - echo "*** to the installed location Also, make sure you have run ldconfig if that" - echo "*** is required on your system" - echo "***" - echo "*** If you have an old version installed, it is best to remove it, although" - echo "*** you may also be able to get things to work by modifying LD_LIBRARY_PATH"], - [ echo "*** The test program failed to compile or link. See the file config.log for the" - echo "*** exact error that occured. This usually means ESD was incorrectly installed" - echo "*** or that you have moved ESD since it was installed. In the latter case, you" - echo "*** may want to edit the esd-config script: $ESD_CONFIG" ]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - AC_LANG_RESTORE - fi - fi - ESD_CFLAGS="" - ESD_LIBS="" - ifelse([$3], , :, [$3]) - fi - AC_SUBST(ESD_CFLAGS) - AC_SUBST(ESD_LIBS) - rm -f conf.esdtest -]) - -dnl AM_ESD_SUPPORTS_MULTIPLE_RECORD([ACTION-IF-SUPPORTS [, ACTION-IF-NOT-SUPPORTS]]) -dnl Test, whether esd supports multiple recording clients (version >=0.2.21) -dnl -AC_DEFUN([AM_ESD_SUPPORTS_MULTIPLE_RECORD], -[dnl - AC_MSG_NOTICE([whether installed esd version supports multiple recording clients]) - ac_save_ESD_CFLAGS="$ESD_CFLAGS" - ac_save_ESD_LIBS="$ESD_LIBS" - AM_PATH_ESD(0.2.21, - ifelse([$1], , [ - AM_CONDITIONAL(ESD_SUPPORTS_MULTIPLE_RECORD, true) - AC_DEFINE(ESD_SUPPORTS_MULTIPLE_RECORD, 1, - [Define if you have esound with support of multiple recording clients.])], - [$1]), - ifelse([$2], , [AM_CONDITIONAL(ESD_SUPPORTS_MULTIPLE_RECORD, false)], [$2]) - if test "x$ac_save_ESD_CFLAGS" != x ; then - ESD_CFLAGS="$ac_save_ESD_CFLAGS" - fi - if test "x$ac_save_ESD_LIBS" != x ; then - ESD_LIBS="$ac_save_ESD_LIBS" - fi - ) -]) diff --git a/BasiliskII/src/Unix/m4/gettext.m4 b/BasiliskII/src/Unix/m4/gettext.m4 deleted file mode 100644 index fbc5b5ba3..000000000 --- a/BasiliskII/src/Unix/m4/gettext.m4 +++ /dev/null @@ -1,2576 +0,0 @@ -# codeset.m4 serial AM1 (gettext-0.10.40) -dnl Copyright (C) 2000-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -AC_DEFUN([AM_LANGINFO_CODESET], -[ - AC_CACHE_CHECK([for nl_langinfo and CODESET], am_cv_langinfo_codeset, - [AC_TRY_LINK([#include ], - [char* cs = nl_langinfo(CODESET);], - am_cv_langinfo_codeset=yes, - am_cv_langinfo_codeset=no) - ]) - if test $am_cv_langinfo_codeset = yes; then - AC_DEFINE(HAVE_LANGINFO_CODESET, 1, - [Define if you have and nl_langinfo(CODESET).]) - fi -]) -# gettext.m4 serial 28 (gettext-0.13) -dnl Copyright (C) 1995-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. -dnl -dnl This file can can be used in projects which are not available under -dnl the GNU General Public License or the GNU Library General Public -dnl License but which still want to provide support for the GNU gettext -dnl functionality. -dnl Please note that the actual code of the GNU gettext library is covered -dnl by the GNU Library General Public License, and the rest of the GNU -dnl gettext package package is covered by the GNU General Public License. -dnl They are *not* in the public domain. - -dnl Authors: -dnl Ulrich Drepper , 1995-2000. -dnl Bruno Haible , 2000-2003. - -dnl Macro to add for using GNU gettext. - -dnl Usage: AM_GNU_GETTEXT([INTLSYMBOL], [NEEDSYMBOL], [INTLDIR]). -dnl INTLSYMBOL can be one of 'external', 'no-libtool', 'use-libtool'. The -dnl default (if it is not specified or empty) is 'no-libtool'. -dnl INTLSYMBOL should be 'external' for packages with no intl directory, -dnl and 'no-libtool' or 'use-libtool' for packages with an intl directory. -dnl If INTLSYMBOL is 'use-libtool', then a libtool library -dnl $(top_builddir)/intl/libintl.la will be created (shared and/or static, -dnl depending on --{enable,disable}-{shared,static} and on the presence of -dnl AM-DISABLE-SHARED). If INTLSYMBOL is 'no-libtool', a static library -dnl $(top_builddir)/intl/libintl.a will be created. -dnl If NEEDSYMBOL is specified and is 'need-ngettext', then GNU gettext -dnl implementations (in libc or libintl) without the ngettext() function -dnl will be ignored. If NEEDSYMBOL is specified and is -dnl 'need-formatstring-macros', then GNU gettext implementations that don't -dnl support the ISO C 99 formatstring macros will be ignored. -dnl INTLDIR is used to find the intl libraries. If empty, -dnl the value `$(top_builddir)/intl/' is used. -dnl -dnl The result of the configuration is one of three cases: -dnl 1) GNU gettext, as included in the intl subdirectory, will be compiled -dnl and used. -dnl Catalog format: GNU --> install in $(datadir) -dnl Catalog extension: .mo after installation, .gmo in source tree -dnl 2) GNU gettext has been found in the system's C library. -dnl Catalog format: GNU --> install in $(datadir) -dnl Catalog extension: .mo after installation, .gmo in source tree -dnl 3) No internationalization, always use English msgid. -dnl Catalog format: none -dnl Catalog extension: none -dnl If INTLSYMBOL is 'external', only cases 2 and 3 can occur. -dnl The use of .gmo is historical (it was needed to avoid overwriting the -dnl GNU format catalogs when building on a platform with an X/Open gettext), -dnl but we keep it in order not to force irrelevant filename changes on the -dnl maintainers. -dnl -AC_DEFUN([AM_GNU_GETTEXT], -[ - dnl Argument checking. - ifelse([$1], [], , [ifelse([$1], [external], , [ifelse([$1], [no-libtool], , [ifelse([$1], [use-libtool], , - [errprint([ERROR: invalid first argument to AM_GNU_GETTEXT -])])])])]) - ifelse([$2], [], , [ifelse([$2], [need-ngettext], , [ifelse([$2], [need-formatstring-macros], , - [errprint([ERROR: invalid second argument to AM_GNU_GETTEXT -])])])]) - define(gt_included_intl, ifelse([$1], [external], [no], [yes])) - define(gt_libtool_suffix_prefix, ifelse([$1], [use-libtool], [l], [])) - - AC_REQUIRE([AM_PO_SUBDIRS])dnl - ifelse(gt_included_intl, yes, [ - AC_REQUIRE([AM_INTL_SUBDIR])dnl - ]) - - dnl Prerequisites of AC_LIB_LINKFLAGS_BODY. - AC_REQUIRE([AC_LIB_PREPARE_PREFIX]) - AC_REQUIRE([AC_LIB_RPATH]) - - dnl Sometimes libintl requires libiconv, so first search for libiconv. - dnl Ideally we would do this search only after the - dnl if test "$USE_NLS" = "yes"; then - dnl if test "$gt_cv_func_gnugettext_libc" != "yes"; then - dnl tests. But if configure.in invokes AM_ICONV after AM_GNU_GETTEXT - dnl the configure script would need to contain the same shell code - dnl again, outside any 'if'. There are two solutions: - dnl - Invoke AM_ICONV_LINKFLAGS_BODY here, outside any 'if'. - dnl - Control the expansions in more detail using AC_PROVIDE_IFELSE. - dnl Since AC_PROVIDE_IFELSE is only in autoconf >= 2.52 and not - dnl documented, we avoid it. - ifelse(gt_included_intl, yes, , [ - AC_REQUIRE([AM_ICONV_LINKFLAGS_BODY]) - ]) - - dnl Set USE_NLS. - AM_NLS - - ifelse(gt_included_intl, yes, [ - BUILD_INCLUDED_LIBINTL=no - USE_INCLUDED_LIBINTL=no - ]) - LIBINTL= - LTLIBINTL= - POSUB= - - dnl If we use NLS figure out what method - if test "$USE_NLS" = "yes"; then - gt_use_preinstalled_gnugettext=no - ifelse(gt_included_intl, yes, [ - AC_MSG_CHECKING([whether included gettext is requested]) - AC_ARG_WITH(included-gettext, - [ --with-included-gettext use the GNU gettext library included here], - nls_cv_force_use_gnu_gettext=$withval, - nls_cv_force_use_gnu_gettext=no) - AC_MSG_RESULT($nls_cv_force_use_gnu_gettext) - - nls_cv_use_gnu_gettext="$nls_cv_force_use_gnu_gettext" - if test "$nls_cv_force_use_gnu_gettext" != "yes"; then - ]) - dnl User does not insist on using GNU NLS library. Figure out what - dnl to use. If GNU gettext is available we use this. Else we have - dnl to fall back to GNU NLS library. - - dnl Add a version number to the cache macros. - define([gt_api_version], ifelse([$2], [need-formatstring-macros], 3, ifelse([$2], [need-ngettext], 2, 1))) - define([gt_cv_func_gnugettext_libc], [gt_cv_func_gnugettext]gt_api_version[_libc]) - define([gt_cv_func_gnugettext_libintl], [gt_cv_func_gnugettext]gt_api_version[_libintl]) - - AC_CACHE_CHECK([for GNU gettext in libc], gt_cv_func_gnugettext_libc, - [AC_TRY_LINK([#include -]ifelse([$2], [need-formatstring-macros], -[#ifndef __GNU_GETTEXT_SUPPORTED_REVISION -#define __GNU_GETTEXT_SUPPORTED_REVISION(major) ((major) == 0 ? 0 : -1) -#endif -changequote(,)dnl -typedef int array [2 * (__GNU_GETTEXT_SUPPORTED_REVISION(0) >= 1) - 1]; -changequote([,])dnl -], [])[extern int _nl_msg_cat_cntr; -extern int *_nl_domain_bindings;], - [bindtextdomain ("", ""); -return (int) gettext ("")]ifelse([$2], [need-ngettext], [ + (int) ngettext ("", "", 0)], [])[ + _nl_msg_cat_cntr + *_nl_domain_bindings], - gt_cv_func_gnugettext_libc=yes, - gt_cv_func_gnugettext_libc=no)]) - - if test "$gt_cv_func_gnugettext_libc" != "yes"; then - dnl Sometimes libintl requires libiconv, so first search for libiconv. - ifelse(gt_included_intl, yes, , [ - AM_ICONV_LINK - ]) - dnl Search for libintl and define LIBINTL, LTLIBINTL and INCINTL - dnl accordingly. Don't use AC_LIB_LINKFLAGS_BODY([intl],[iconv]) - dnl because that would add "-liconv" to LIBINTL and LTLIBINTL - dnl even if libiconv doesn't exist. - AC_LIB_LINKFLAGS_BODY([intl]) - AC_CACHE_CHECK([for GNU gettext in libintl], - gt_cv_func_gnugettext_libintl, - [gt_save_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS $INCINTL" - gt_save_LIBS="$LIBS" - LIBS="$LIBS $LIBINTL" - dnl Now see whether libintl exists and does not depend on libiconv. - AC_TRY_LINK([#include -]ifelse([$2], [need-formatstring-macros], -[#ifndef __GNU_GETTEXT_SUPPORTED_REVISION -#define __GNU_GETTEXT_SUPPORTED_REVISION(major) ((major) == 0 ? 0 : -1) -#endif -changequote(,)dnl -typedef int array [2 * (__GNU_GETTEXT_SUPPORTED_REVISION(0) >= 1) - 1]; -changequote([,])dnl -], [])[extern int _nl_msg_cat_cntr; -extern -#ifdef __cplusplus -"C" -#endif -const char *_nl_expand_alias ();], - [bindtextdomain ("", ""); -return (int) gettext ("")]ifelse([$2], [need-ngettext], [ + (int) ngettext ("", "", 0)], [])[ + _nl_msg_cat_cntr + *_nl_expand_alias (0)], - gt_cv_func_gnugettext_libintl=yes, - gt_cv_func_gnugettext_libintl=no) - dnl Now see whether libintl exists and depends on libiconv. - if test "$gt_cv_func_gnugettext_libintl" != yes && test -n "$LIBICONV"; then - LIBS="$LIBS $LIBICONV" - AC_TRY_LINK([#include -]ifelse([$2], [need-formatstring-macros], -[#ifndef __GNU_GETTEXT_SUPPORTED_REVISION -#define __GNU_GETTEXT_SUPPORTED_REVISION(major) ((major) == 0 ? 0 : -1) -#endif -changequote(,)dnl -typedef int array [2 * (__GNU_GETTEXT_SUPPORTED_REVISION(0) >= 1) - 1]; -changequote([,])dnl -], [])[extern int _nl_msg_cat_cntr; -extern -#ifdef __cplusplus -"C" -#endif -const char *_nl_expand_alias ();], - [bindtextdomain ("", ""); -return (int) gettext ("")]ifelse([$2], [need-ngettext], [ + (int) ngettext ("", "", 0)], [])[ + _nl_msg_cat_cntr + *_nl_expand_alias (0)], - [LIBINTL="$LIBINTL $LIBICONV" - LTLIBINTL="$LTLIBINTL $LTLIBICONV" - gt_cv_func_gnugettext_libintl=yes - ]) - fi - CPPFLAGS="$gt_save_CPPFLAGS" - LIBS="$gt_save_LIBS"]) - fi - - dnl If an already present or preinstalled GNU gettext() is found, - dnl use it. But if this macro is used in GNU gettext, and GNU - dnl gettext is already preinstalled in libintl, we update this - dnl libintl. (Cf. the install rule in intl/Makefile.in.) - if test "$gt_cv_func_gnugettext_libc" = "yes" \ - || { test "$gt_cv_func_gnugettext_libintl" = "yes" \ - && test "$PACKAGE" != gettext-runtime \ - && test "$PACKAGE" != gettext-tools; }; then - gt_use_preinstalled_gnugettext=yes - else - dnl Reset the values set by searching for libintl. - LIBINTL= - LTLIBINTL= - INCINTL= - fi - - ifelse(gt_included_intl, yes, [ - if test "$gt_use_preinstalled_gnugettext" != "yes"; then - dnl GNU gettext is not found in the C library. - dnl Fall back on included GNU gettext library. - nls_cv_use_gnu_gettext=yes - fi - fi - - if test "$nls_cv_use_gnu_gettext" = "yes"; then - dnl Mark actions used to generate GNU NLS library. - BUILD_INCLUDED_LIBINTL=yes - USE_INCLUDED_LIBINTL=yes - LIBINTL="ifelse([$3],[],\${top_builddir}/intl,[$3])/libintl.[]gt_libtool_suffix_prefix[]a $LIBICONV" - LTLIBINTL="ifelse([$3],[],\${top_builddir}/intl,[$3])/libintl.[]gt_libtool_suffix_prefix[]a $LTLIBICONV" - LIBS=`echo " $LIBS " | sed -e 's/ -lintl / /' -e 's/^ //' -e 's/ $//'` - fi - - if test "$gt_use_preinstalled_gnugettext" = "yes" \ - || test "$nls_cv_use_gnu_gettext" = "yes"; then - dnl Mark actions to use GNU gettext tools. - CATOBJEXT=.gmo - fi - ]) - - if test "$gt_use_preinstalled_gnugettext" = "yes" \ - || test "$nls_cv_use_gnu_gettext" = "yes"; then - AC_DEFINE(ENABLE_NLS, 1, - [Define to 1 if translation of program messages to the user's native language - is requested.]) - else - USE_NLS=no - fi - fi - - AC_MSG_CHECKING([whether to use NLS]) - AC_MSG_RESULT([$USE_NLS]) - if test "$USE_NLS" = "yes"; then - AC_MSG_CHECKING([where the gettext function comes from]) - if test "$gt_use_preinstalled_gnugettext" = "yes"; then - if test "$gt_cv_func_gnugettext_libintl" = "yes"; then - gt_source="external libintl" - else - gt_source="libc" - fi - else - gt_source="included intl directory" - fi - AC_MSG_RESULT([$gt_source]) - fi - - if test "$USE_NLS" = "yes"; then - - if test "$gt_use_preinstalled_gnugettext" = "yes"; then - if test "$gt_cv_func_gnugettext_libintl" = "yes"; then - AC_MSG_CHECKING([how to link with libintl]) - AC_MSG_RESULT([$LIBINTL]) - AC_LIB_APPENDTOVAR([CPPFLAGS], [$INCINTL]) - fi - - dnl For backward compatibility. Some packages may be using this. - AC_DEFINE(HAVE_GETTEXT, 1, - [Define if the GNU gettext() function is already present or preinstalled.]) - AC_DEFINE(HAVE_DCGETTEXT, 1, - [Define if the GNU dcgettext() function is already present or preinstalled.]) - fi - - dnl We need to process the po/ directory. - POSUB=po - fi - - ifelse(gt_included_intl, yes, [ - dnl If this is used in GNU gettext we have to set BUILD_INCLUDED_LIBINTL - dnl to 'yes' because some of the testsuite requires it. - if test "$PACKAGE" = gettext-runtime || test "$PACKAGE" = gettext-tools; then - BUILD_INCLUDED_LIBINTL=yes - fi - - dnl Make all variables we use known to autoconf. - AC_SUBST(BUILD_INCLUDED_LIBINTL) - AC_SUBST(USE_INCLUDED_LIBINTL) - AC_SUBST(CATOBJEXT) - - dnl For backward compatibility. Some configure.ins may be using this. - nls_cv_header_intl= - nls_cv_header_libgt= - - dnl For backward compatibility. Some Makefiles may be using this. - DATADIRNAME=share - AC_SUBST(DATADIRNAME) - - dnl For backward compatibility. Some Makefiles may be using this. - INSTOBJEXT=.mo - AC_SUBST(INSTOBJEXT) - - dnl For backward compatibility. Some Makefiles may be using this. - GENCAT=gencat - AC_SUBST(GENCAT) - - dnl For backward compatibility. Some Makefiles may be using this. - if test "$USE_INCLUDED_LIBINTL" = yes; then - INTLOBJS="\$(GETTOBJS)" - fi - AC_SUBST(INTLOBJS) - - dnl Enable libtool support if the surrounding package wishes it. - INTL_LIBTOOL_SUFFIX_PREFIX=gt_libtool_suffix_prefix - AC_SUBST(INTL_LIBTOOL_SUFFIX_PREFIX) - ]) - - dnl For backward compatibility. Some Makefiles may be using this. - INTLLIBS="$LIBINTL" - AC_SUBST(INTLLIBS) - - dnl Make all documented variables known to autoconf. - AC_SUBST(LIBINTL) - AC_SUBST(LTLIBINTL) - AC_SUBST(POSUB) -]) - - -dnl Checks for all prerequisites of the intl subdirectory, -dnl except for INTL_LIBTOOL_SUFFIX_PREFIX (and possibly LIBTOOL), INTLOBJS, -dnl USE_INCLUDED_LIBINTL, BUILD_INCLUDED_LIBINTL. -AC_DEFUN([AM_INTL_SUBDIR], -[ - AC_REQUIRE([AC_PROG_INSTALL])dnl - AC_REQUIRE([AM_MKINSTALLDIRS])dnl - AC_REQUIRE([AC_PROG_CC])dnl - AC_REQUIRE([AC_CANONICAL_HOST])dnl - AC_REQUIRE([AC_PROG_RANLIB])dnl - AC_REQUIRE([AC_ISC_POSIX])dnl - AC_REQUIRE([AC_HEADER_STDC])dnl - AC_REQUIRE([AC_C_CONST])dnl - AC_REQUIRE([bh_C_SIGNED])dnl - AC_REQUIRE([AC_C_INLINE])dnl - AC_REQUIRE([AC_TYPE_OFF_T])dnl - AC_REQUIRE([AC_TYPE_SIZE_T])dnl - AC_REQUIRE([jm_AC_TYPE_LONG_LONG])dnl - AC_REQUIRE([gt_TYPE_LONGDOUBLE])dnl - AC_REQUIRE([gt_TYPE_WCHAR_T])dnl - AC_REQUIRE([gt_TYPE_WINT_T])dnl - AC_REQUIRE([jm_AC_HEADER_INTTYPES_H]) - AC_REQUIRE([jm_AC_HEADER_STDINT_H]) - AC_REQUIRE([gt_TYPE_INTMAX_T]) - AC_REQUIRE([gt_PRINTF_POSIX]) - AC_REQUIRE([AC_FUNC_ALLOCA])dnl - AC_REQUIRE([AC_FUNC_MMAP])dnl - AC_REQUIRE([jm_GLIBC21])dnl - AC_REQUIRE([gt_INTDIV0])dnl - AC_REQUIRE([jm_AC_TYPE_UINTMAX_T])dnl - AC_REQUIRE([gt_HEADER_INTTYPES_H])dnl - AC_REQUIRE([gt_INTTYPES_PRI])dnl - AC_REQUIRE([gl_XSIZE])dnl - - AC_CHECK_TYPE([ptrdiff_t], , - [AC_DEFINE([ptrdiff_t], [long], - [Define as the type of the result of subtracting two pointers, if the system doesn't define it.]) - ]) - AC_CHECK_HEADERS([argz.h limits.h locale.h nl_types.h malloc.h stddef.h \ -stdlib.h string.h unistd.h sys/param.h]) - AC_CHECK_FUNCS([asprintf fwprintf getcwd getegid geteuid getgid getuid \ -mempcpy munmap putenv setenv setlocale snprintf stpcpy strcasecmp strdup \ -strtoul tsearch wcslen __argz_count __argz_stringify __argz_next \ -__fsetlocking]) - - dnl Use the _snprintf function only if it is declared (because on NetBSD it - dnl is defined as a weak alias of snprintf; we prefer to use the latter). - gt_CHECK_DECL(_snprintf, [#include ]) - gt_CHECK_DECL(_snwprintf, [#include ]) - - dnl Use the *_unlocked functions only if they are declared. - dnl (because some of them were defined without being declared in Solaris - dnl 2.5.1 but were removed in Solaris 2.6, whereas we want binaries built - dnl on Solaris 2.5.1 to run on Solaris 2.6). - dnl Don't use AC_CHECK_DECLS because it isn't supported in autoconf-2.13. - gt_CHECK_DECL(feof_unlocked, [#include ]) - gt_CHECK_DECL(fgets_unlocked, [#include ]) - gt_CHECK_DECL(getc_unlocked, [#include ]) - - case $gt_cv_func_printf_posix in - *yes) HAVE_POSIX_PRINTF=1 ;; - *) HAVE_POSIX_PRINTF=0 ;; - esac - AC_SUBST([HAVE_POSIX_PRINTF]) - if test "$ac_cv_func_asprintf" = yes; then - HAVE_ASPRINTF=1 - else - HAVE_ASPRINTF=0 - fi - AC_SUBST([HAVE_ASPRINTF]) - if test "$ac_cv_func_snprintf" = yes; then - HAVE_SNPRINTF=1 - else - HAVE_SNPRINTF=0 - fi - AC_SUBST([HAVE_SNPRINTF]) - if test "$ac_cv_func_wprintf" = yes; then - HAVE_WPRINTF=1 - else - HAVE_WPRINTF=0 - fi - AC_SUBST([HAVE_WPRINTF]) - - AM_ICONV - AM_LANGINFO_CODESET - if test $ac_cv_header_locale_h = yes; then - AM_LC_MESSAGES - fi - - dnl intl/plural.c is generated from intl/plural.y. It requires bison, - dnl because plural.y uses bison specific features. It requires at least - dnl bison-1.26 because earlier versions generate a plural.c that doesn't - dnl compile. - dnl bison is only needed for the maintainer (who touches plural.y). But in - dnl order to avoid separate Makefiles or --enable-maintainer-mode, we put - dnl the rule in general Makefile. Now, some people carelessly touch the - dnl files or have a broken "make" program, hence the plural.c rule will - dnl sometimes fire. To avoid an error, defines BISON to ":" if it is not - dnl present or too old. - AC_CHECK_PROGS([INTLBISON], [bison]) - if test -z "$INTLBISON"; then - ac_verc_fail=yes - else - dnl Found it, now check the version. - AC_MSG_CHECKING([version of bison]) -changequote(<<,>>)dnl - ac_prog_version=`$INTLBISON --version 2>&1 | sed -n 's/^.*GNU Bison.* \([0-9]*\.[0-9.]*\).*$/\1/p'` - case $ac_prog_version in - '') ac_prog_version="v. ?.??, bad"; ac_verc_fail=yes;; - 1.2[6-9]* | 1.[3-9][0-9]* | [2-9].*) -changequote([,])dnl - ac_prog_version="$ac_prog_version, ok"; ac_verc_fail=no;; - *) ac_prog_version="$ac_prog_version, bad"; ac_verc_fail=yes;; - esac - AC_MSG_RESULT([$ac_prog_version]) - fi - if test $ac_verc_fail = yes; then - INTLBISON=: - fi -]) - - -dnl gt_CHECK_DECL(FUNC, INCLUDES) -dnl Check whether a function is declared. -AC_DEFUN([gt_CHECK_DECL], -[ - AC_CACHE_CHECK([whether $1 is declared], ac_cv_have_decl_$1, - [AC_TRY_COMPILE([$2], [ -#ifndef $1 - char *p = (char *) $1; -#endif -], ac_cv_have_decl_$1=yes, ac_cv_have_decl_$1=no)]) - if test $ac_cv_have_decl_$1 = yes; then - gt_value=1 - else - gt_value=0 - fi - AC_DEFINE_UNQUOTED([HAVE_DECL_]translit($1, [a-z], [A-Z]), [$gt_value], - [Define to 1 if you have the declaration of `$1', and to 0 if you don't.]) -]) - - -dnl Usage: AM_GNU_GETTEXT_VERSION([gettext-version]) -AC_DEFUN([AM_GNU_GETTEXT_VERSION], []) -# glibc21.m4 serial 2 (fileutils-4.1.3, gettext-0.10.40) -dnl Copyright (C) 2000-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -# Test for the GNU C Library, version 2.1 or newer. -# From Bruno Haible. - -AC_DEFUN([jm_GLIBC21], - [ - AC_CACHE_CHECK(whether we are using the GNU C Library 2.1 or newer, - ac_cv_gnu_library_2_1, - [AC_EGREP_CPP([Lucky GNU user], - [ -#include -#ifdef __GNU_LIBRARY__ - #if (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 1) || (__GLIBC__ > 2) - Lucky GNU user - #endif -#endif - ], - ac_cv_gnu_library_2_1=yes, - ac_cv_gnu_library_2_1=no) - ] - ) - AC_SUBST(GLIBC21) - GLIBC21="$ac_cv_gnu_library_2_1" - ] -) -# iconv.m4 serial AM4 (gettext-0.11.3) -dnl Copyright (C) 2000-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -AC_DEFUN([AM_ICONV_LINKFLAGS_BODY], -[ - dnl Prerequisites of AC_LIB_LINKFLAGS_BODY. - AC_REQUIRE([AC_LIB_PREPARE_PREFIX]) - AC_REQUIRE([AC_LIB_RPATH]) - - dnl Search for libiconv and define LIBICONV, LTLIBICONV and INCICONV - dnl accordingly. - AC_LIB_LINKFLAGS_BODY([iconv]) -]) - -AC_DEFUN([AM_ICONV_LINK], -[ - dnl Some systems have iconv in libc, some have it in libiconv (OSF/1 and - dnl those with the standalone portable GNU libiconv installed). - - dnl Search for libiconv and define LIBICONV, LTLIBICONV and INCICONV - dnl accordingly. - AC_REQUIRE([AM_ICONV_LINKFLAGS_BODY]) - - dnl Add $INCICONV to CPPFLAGS before performing the following checks, - dnl because if the user has installed libiconv and not disabled its use - dnl via --without-libiconv-prefix, he wants to use it. The first - dnl AC_TRY_LINK will then fail, the second AC_TRY_LINK will succeed. - am_save_CPPFLAGS="$CPPFLAGS" - AC_LIB_APPENDTOVAR([CPPFLAGS], [$INCICONV]) - - AC_CACHE_CHECK(for iconv, am_cv_func_iconv, [ - am_cv_func_iconv="no, consider installing GNU libiconv" - am_cv_lib_iconv=no - AC_TRY_LINK([#include -#include ], - [iconv_t cd = iconv_open("",""); - iconv(cd,NULL,NULL,NULL,NULL); - iconv_close(cd);], - am_cv_func_iconv=yes) - if test "$am_cv_func_iconv" != yes; then - am_save_LIBS="$LIBS" - LIBS="$LIBS $LIBICONV" - AC_TRY_LINK([#include -#include ], - [iconv_t cd = iconv_open("",""); - iconv(cd,NULL,NULL,NULL,NULL); - iconv_close(cd);], - am_cv_lib_iconv=yes - am_cv_func_iconv=yes) - LIBS="$am_save_LIBS" - fi - ]) - if test "$am_cv_func_iconv" = yes; then - AC_DEFINE(HAVE_ICONV, 1, [Define if you have the iconv() function.]) - fi - if test "$am_cv_lib_iconv" = yes; then - AC_MSG_CHECKING([how to link with libiconv]) - AC_MSG_RESULT([$LIBICONV]) - else - dnl If $LIBICONV didn't lead to a usable library, we don't need $INCICONV - dnl either. - CPPFLAGS="$am_save_CPPFLAGS" - LIBICONV= - LTLIBICONV= - fi - AC_SUBST(LIBICONV) - AC_SUBST(LTLIBICONV) -]) - -AC_DEFUN([AM_ICONV], -[ - AM_ICONV_LINK - if test "$am_cv_func_iconv" = yes; then - AC_MSG_CHECKING([for iconv declaration]) - AC_CACHE_VAL(am_cv_proto_iconv, [ - AC_TRY_COMPILE([ -#include -#include -extern -#ifdef __cplusplus -"C" -#endif -#if defined(__STDC__) || defined(__cplusplus) -size_t iconv (iconv_t cd, char * *inbuf, size_t *inbytesleft, char * *outbuf, size_t *outbytesleft); -#else -size_t iconv(); -#endif -], [], am_cv_proto_iconv_arg1="", am_cv_proto_iconv_arg1="const") - am_cv_proto_iconv="extern size_t iconv (iconv_t cd, $am_cv_proto_iconv_arg1 char * *inbuf, size_t *inbytesleft, char * *outbuf, size_t *outbytesleft);"]) - am_cv_proto_iconv=`echo "[$]am_cv_proto_iconv" | tr -s ' ' | sed -e 's/( /(/'` - AC_MSG_RESULT([$]{ac_t:- - }[$]am_cv_proto_iconv) - AC_DEFINE_UNQUOTED(ICONV_CONST, $am_cv_proto_iconv_arg1, - [Define as const if the declaration of iconv() needs const.]) - fi -]) -# intdiv0.m4 serial 1 (gettext-0.11.3) -dnl Copyright (C) 2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -AC_DEFUN([gt_INTDIV0], -[ - AC_REQUIRE([AC_PROG_CC])dnl - AC_REQUIRE([AC_CANONICAL_HOST])dnl - - AC_CACHE_CHECK([whether integer division by zero raises SIGFPE], - gt_cv_int_divbyzero_sigfpe, - [ - AC_TRY_RUN([ -#include -#include - -static void -#ifdef __cplusplus -sigfpe_handler (int sig) -#else -sigfpe_handler (sig) int sig; -#endif -{ - /* Exit with code 0 if SIGFPE, with code 1 if any other signal. */ - exit (sig != SIGFPE); -} - -int x = 1; -int y = 0; -int z; -int nan; - -int main () -{ - signal (SIGFPE, sigfpe_handler); -/* IRIX and AIX (when "xlc -qcheck" is used) yield signal SIGTRAP. */ -#if (defined (__sgi) || defined (_AIX)) && defined (SIGTRAP) - signal (SIGTRAP, sigfpe_handler); -#endif -/* Linux/SPARC yields signal SIGILL. */ -#if defined (__sparc__) && defined (__linux__) - signal (SIGILL, sigfpe_handler); -#endif - - z = x / y; - nan = y / y; - exit (1); -} -], gt_cv_int_divbyzero_sigfpe=yes, gt_cv_int_divbyzero_sigfpe=no, - [ - # Guess based on the CPU. - case "$host_cpu" in - alpha* | i[34567]86 | m68k | s390*) - gt_cv_int_divbyzero_sigfpe="guessing yes";; - *) - gt_cv_int_divbyzero_sigfpe="guessing no";; - esac - ]) - ]) - case "$gt_cv_int_divbyzero_sigfpe" in - *yes) value=1;; - *) value=0;; - esac - AC_DEFINE_UNQUOTED(INTDIV0_RAISES_SIGFPE, $value, - [Define if integer division by zero raises signal SIGFPE.]) -]) -# intmax.m4 serial 1 (gettext-0.12) -dnl Copyright (C) 2002-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. -dnl Test whether the system has the 'intmax_t' type, but don't attempt to -dnl find a replacement if it is lacking. - -AC_DEFUN([gt_TYPE_INTMAX_T], -[ - AC_REQUIRE([jm_AC_HEADER_INTTYPES_H]) - AC_REQUIRE([jm_AC_HEADER_STDINT_H]) - AC_CACHE_CHECK(for intmax_t, gt_cv_c_intmax_t, - [AC_TRY_COMPILE([ -#include -#include -#if HAVE_STDINT_H_WITH_UINTMAX -#include -#endif -#if HAVE_INTTYPES_H_WITH_UINTMAX -#include -#endif -], [intmax_t x = -1;], gt_cv_c_intmax_t=yes, gt_cv_c_intmax_t=no)]) - if test $gt_cv_c_intmax_t = yes; then - AC_DEFINE(HAVE_INTMAX_T, 1, - [Define if you have the 'intmax_t' type in or .]) - fi -]) -# inttypes-pri.m4 serial 1 (gettext-0.11.4) -dnl Copyright (C) 1997-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -# Define PRI_MACROS_BROKEN if exists and defines the PRI* -# macros to non-string values. This is the case on AIX 4.3.3. - -AC_DEFUN([gt_INTTYPES_PRI], -[ - AC_REQUIRE([gt_HEADER_INTTYPES_H]) - if test $gt_cv_header_inttypes_h = yes; then - AC_CACHE_CHECK([whether the inttypes.h PRIxNN macros are broken], - gt_cv_inttypes_pri_broken, - [ - AC_TRY_COMPILE([#include -#ifdef PRId32 -char *p = PRId32; -#endif -], [], gt_cv_inttypes_pri_broken=no, gt_cv_inttypes_pri_broken=yes) - ]) - fi - if test "$gt_cv_inttypes_pri_broken" = yes; then - AC_DEFINE_UNQUOTED(PRI_MACROS_BROKEN, 1, - [Define if exists and defines unusable PRI* macros.]) - fi -]) -# inttypes.m4 serial 1 (gettext-0.11.4) -dnl Copyright (C) 1997-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -# Define HAVE_INTTYPES_H if exists and doesn't clash with -# . - -AC_DEFUN([gt_HEADER_INTTYPES_H], -[ - AC_CACHE_CHECK([for inttypes.h], gt_cv_header_inttypes_h, - [ - AC_TRY_COMPILE( - [#include -#include ], - [], gt_cv_header_inttypes_h=yes, gt_cv_header_inttypes_h=no) - ]) - if test $gt_cv_header_inttypes_h = yes; then - AC_DEFINE_UNQUOTED(HAVE_INTTYPES_H, 1, - [Define if exists and doesn't clash with .]) - fi -]) -# inttypes_h.m4 serial 5 (gettext-0.12) -dnl Copyright (C) 1997-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -# Define HAVE_INTTYPES_H_WITH_UINTMAX if exists, -# doesn't clash with , and declares uintmax_t. - -AC_DEFUN([jm_AC_HEADER_INTTYPES_H], -[ - AC_CACHE_CHECK([for inttypes.h], jm_ac_cv_header_inttypes_h, - [AC_TRY_COMPILE( - [#include -#include ], - [uintmax_t i = (uintmax_t) -1;], - jm_ac_cv_header_inttypes_h=yes, - jm_ac_cv_header_inttypes_h=no)]) - if test $jm_ac_cv_header_inttypes_h = yes; then - AC_DEFINE_UNQUOTED(HAVE_INTTYPES_H_WITH_UINTMAX, 1, - [Define if exists, doesn't clash with , - and declares uintmax_t. ]) - fi -]) -# lcmessage.m4 serial 3 (gettext-0.11.3) -dnl Copyright (C) 1995-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. -dnl -dnl This file can can be used in projects which are not available under -dnl the GNU General Public License or the GNU Library General Public -dnl License but which still want to provide support for the GNU gettext -dnl functionality. -dnl Please note that the actual code of the GNU gettext library is covered -dnl by the GNU Library General Public License, and the rest of the GNU -dnl gettext package package is covered by the GNU General Public License. -dnl They are *not* in the public domain. - -dnl Authors: -dnl Ulrich Drepper , 1995. - -# Check whether LC_MESSAGES is available in . - -AC_DEFUN([AM_LC_MESSAGES], -[ - AC_CACHE_CHECK([for LC_MESSAGES], am_cv_val_LC_MESSAGES, - [AC_TRY_LINK([#include ], [return LC_MESSAGES], - am_cv_val_LC_MESSAGES=yes, am_cv_val_LC_MESSAGES=no)]) - if test $am_cv_val_LC_MESSAGES = yes; then - AC_DEFINE(HAVE_LC_MESSAGES, 1, - [Define if your file defines LC_MESSAGES.]) - fi -]) -# longdouble.m4 serial 1 (gettext-0.12) -dnl Copyright (C) 2002-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. -dnl Test whether the compiler supports the 'long double' type. -dnl Prerequisite: AC_PROG_CC - -AC_DEFUN([gt_TYPE_LONGDOUBLE], -[ - AC_CACHE_CHECK([for long double], gt_cv_c_long_double, - [if test "$GCC" = yes; then - gt_cv_c_long_double=yes - else - AC_TRY_COMPILE([ - /* The Stardent Vistra knows sizeof(long double), but does not support it. */ - long double foo = 0.0; - /* On Ultrix 4.3 cc, long double is 4 and double is 8. */ - int array [2*(sizeof(long double) >= sizeof(double)) - 1]; - ], , - gt_cv_c_long_double=yes, gt_cv_c_long_double=no) - fi]) - if test $gt_cv_c_long_double = yes; then - AC_DEFINE(HAVE_LONG_DOUBLE, 1, [Define if you have the 'long double' type.]) - fi -]) -# longlong.m4 serial 4 -dnl Copyright (C) 1999-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -# Define HAVE_LONG_LONG if 'long long' works. - -AC_DEFUN([jm_AC_TYPE_LONG_LONG], -[ - AC_CACHE_CHECK([for long long], ac_cv_type_long_long, - [AC_TRY_LINK([long long ll = 1LL; int i = 63;], - [long long llmax = (long long) -1; - return ll << i | ll >> i | llmax / ll | llmax % ll;], - ac_cv_type_long_long=yes, - ac_cv_type_long_long=no)]) - if test $ac_cv_type_long_long = yes; then - AC_DEFINE(HAVE_LONG_LONG, 1, - [Define if you have the 'long long' type.]) - fi -]) -# nls.m4 serial 1 (gettext-0.12) -dnl Copyright (C) 1995-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. -dnl -dnl This file can can be used in projects which are not available under -dnl the GNU General Public License or the GNU Library General Public -dnl License but which still want to provide support for the GNU gettext -dnl functionality. -dnl Please note that the actual code of the GNU gettext library is covered -dnl by the GNU Library General Public License, and the rest of the GNU -dnl gettext package package is covered by the GNU General Public License. -dnl They are *not* in the public domain. - -dnl Authors: -dnl Ulrich Drepper , 1995-2000. -dnl Bruno Haible , 2000-2003. - -AC_DEFUN([AM_NLS], -[ - AC_MSG_CHECKING([whether NLS is requested]) - dnl Default is enabled NLS - AC_ARG_ENABLE(nls, - [ --disable-nls do not use Native Language Support], - USE_NLS=$enableval, USE_NLS=yes) - AC_MSG_RESULT($USE_NLS) - AC_SUBST(USE_NLS) -]) - -AC_DEFUN([AM_MKINSTALLDIRS], -[ - dnl If the AC_CONFIG_AUX_DIR macro for autoconf is used we possibly - dnl find the mkinstalldirs script in another subdir but $(top_srcdir). - dnl Try to locate it. - MKINSTALLDIRS= - if test -n "$ac_aux_dir"; then - case "$ac_aux_dir" in - /*) MKINSTALLDIRS="$ac_aux_dir/mkinstalldirs" ;; - *) MKINSTALLDIRS="\$(top_builddir)/$ac_aux_dir/mkinstalldirs" ;; - esac - fi - if test -z "$MKINSTALLDIRS"; then - MKINSTALLDIRS="\$(top_srcdir)/mkinstalldirs" - fi - AC_SUBST(MKINSTALLDIRS) -]) -# po.m4 serial 3 (gettext-0.14) -dnl Copyright (C) 1995-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. -dnl -dnl This file can can be used in projects which are not available under -dnl the GNU General Public License or the GNU Library General Public -dnl License but which still want to provide support for the GNU gettext -dnl functionality. -dnl Please note that the actual code of the GNU gettext library is covered -dnl by the GNU Library General Public License, and the rest of the GNU -dnl gettext package package is covered by the GNU General Public License. -dnl They are *not* in the public domain. - -dnl Authors: -dnl Ulrich Drepper , 1995-2000. -dnl Bruno Haible , 2000-2003. - -dnl Checks for all prerequisites of the po subdirectory. -AC_DEFUN([AM_PO_SUBDIRS], -[ - AC_REQUIRE([AC_PROG_MAKE_SET])dnl - AC_REQUIRE([AC_PROG_INSTALL])dnl - AC_REQUIRE([AM_MKINSTALLDIRS])dnl - AC_REQUIRE([AM_NLS])dnl - - dnl Perform the following tests also if --disable-nls has been given, - dnl because they are needed for "make dist" to work. - - dnl Search for GNU msgfmt in the PATH. - dnl The first test excludes Solaris msgfmt and early GNU msgfmt versions. - dnl The second test excludes FreeBSD msgfmt. - AM_PATH_PROG_WITH_TEST(MSGFMT, msgfmt, - [$ac_dir/$ac_word --statistics /dev/null >/dev/null 2>&1 && - (if $ac_dir/$ac_word --statistics /dev/null 2>&1 >/dev/null | grep usage >/dev/null; then exit 1; else exit 0; fi)], - :) - AC_PATH_PROG(GMSGFMT, gmsgfmt, $MSGFMT) - - dnl Search for GNU xgettext 0.12 or newer in the PATH. - dnl The first test excludes Solaris xgettext and early GNU xgettext versions. - dnl The second test excludes FreeBSD xgettext. - AM_PATH_PROG_WITH_TEST(XGETTEXT, xgettext, - [$ac_dir/$ac_word --omit-header --copyright-holder= --msgid-bugs-address= /dev/null >/dev/null 2>&1 && - (if $ac_dir/$ac_word --omit-header --copyright-holder= --msgid-bugs-address= /dev/null 2>&1 >/dev/null | grep usage >/dev/null; then exit 1; else exit 0; fi)], - :) - dnl Remove leftover from FreeBSD xgettext call. - rm -f messages.po - - dnl Search for GNU msgmerge 0.11 or newer in the PATH. - AM_PATH_PROG_WITH_TEST(MSGMERGE, msgmerge, - [$ac_dir/$ac_word --update -q /dev/null /dev/null >/dev/null 2>&1], :) - - dnl This could go away some day; the PATH_PROG_WITH_TEST already does it. - dnl Test whether we really found GNU msgfmt. - if test "$GMSGFMT" != ":"; then - dnl If it is no GNU msgfmt we define it as : so that the - dnl Makefiles still can work. - if $GMSGFMT --statistics /dev/null >/dev/null 2>&1 && - (if $GMSGFMT --statistics /dev/null 2>&1 >/dev/null | grep usage >/dev/null; then exit 1; else exit 0; fi); then - : ; - else - GMSGFMT=`echo "$GMSGFMT" | sed -e 's,^.*/,,'` - AC_MSG_RESULT( - [found $GMSGFMT program is not GNU msgfmt; ignore it]) - GMSGFMT=":" - fi - fi - - dnl This could go away some day; the PATH_PROG_WITH_TEST already does it. - dnl Test whether we really found GNU xgettext. - if test "$XGETTEXT" != ":"; then - dnl If it is no GNU xgettext we define it as : so that the - dnl Makefiles still can work. - if $XGETTEXT --omit-header --copyright-holder= --msgid-bugs-address= /dev/null >/dev/null 2>&1 && - (if $XGETTEXT --omit-header --copyright-holder= --msgid-bugs-address= /dev/null 2>&1 >/dev/null | grep usage >/dev/null; then exit 1; else exit 0; fi); then - : ; - else - AC_MSG_RESULT( - [found xgettext program is not GNU xgettext; ignore it]) - XGETTEXT=":" - fi - dnl Remove leftover from FreeBSD xgettext call. - rm -f messages.po - fi - - AC_OUTPUT_COMMANDS([ - for ac_file in $CONFIG_FILES; do - # Support "outfile[:infile[:infile...]]" - case "$ac_file" in - *:*) ac_file=`echo "$ac_file"|sed 's%:.*%%'` ;; - esac - # PO directories have a Makefile.in generated from Makefile.in.in. - case "$ac_file" in */Makefile.in) - # Adjust a relative srcdir. - ac_dir=`echo "$ac_file"|sed 's%/[^/][^/]*$%%'` - ac_dir_suffix="/`echo "$ac_dir"|sed 's%^\./%%'`" - ac_dots=`echo "$ac_dir_suffix"|sed 's%/[^/]*%../%g'` - # In autoconf-2.13 it is called $ac_given_srcdir. - # In autoconf-2.50 it is called $srcdir. - test -n "$ac_given_srcdir" || ac_given_srcdir="$srcdir" - case "$ac_given_srcdir" in - .) top_srcdir=`echo $ac_dots|sed 's%/$%%'` ;; - /*) top_srcdir="$ac_given_srcdir" ;; - *) top_srcdir="$ac_dots$ac_given_srcdir" ;; - esac - if test -f "$ac_given_srcdir/$ac_dir/POTFILES.in"; then - rm -f "$ac_dir/POTFILES" - test -n "$as_me" && echo "$as_me: creating $ac_dir/POTFILES" || echo "creating $ac_dir/POTFILES" - cat "$ac_given_srcdir/$ac_dir/POTFILES.in" | sed -e "/^#/d" -e "/^[ ]*\$/d" -e "s,.*, $top_srcdir/& \\\\," | sed -e "\$s/\(.*\) \\\\/\1/" > "$ac_dir/POTFILES" - POMAKEFILEDEPS="POTFILES.in" - # ALL_LINGUAS, POFILES, UPDATEPOFILES, DUMMYPOFILES, GMOFILES depend - # on $ac_dir but don't depend on user-specified configuration - # parameters. - if test -f "$ac_given_srcdir/$ac_dir/LINGUAS"; then - # The LINGUAS file contains the set of available languages. - if test -n "$OBSOLETE_ALL_LINGUAS"; then - test -n "$as_me" && echo "$as_me: setting ALL_LINGUAS in configure.in is obsolete" || echo "setting ALL_LINGUAS in configure.in is obsolete" - fi - ALL_LINGUAS_=`sed -e "/^#/d" "$ac_given_srcdir/$ac_dir/LINGUAS"` - # Hide the ALL_LINGUAS assigment from automake. - eval 'ALL_LINGUAS''=$ALL_LINGUAS_' - POMAKEFILEDEPS="$POMAKEFILEDEPS LINGUAS" - else - # The set of available languages was given in configure.in. - eval 'ALL_LINGUAS''=$OBSOLETE_ALL_LINGUAS' - fi - # Compute POFILES - # as $(foreach lang, $(ALL_LINGUAS), $(srcdir)/$(lang).po) - # Compute UPDATEPOFILES - # as $(foreach lang, $(ALL_LINGUAS), $(lang).po-update) - # Compute DUMMYPOFILES - # as $(foreach lang, $(ALL_LINGUAS), $(lang).nop) - # Compute GMOFILES - # as $(foreach lang, $(ALL_LINGUAS), $(srcdir)/$(lang).gmo) - case "$ac_given_srcdir" in - .) srcdirpre= ;; - *) srcdirpre='$(srcdir)/' ;; - esac - POFILES= - UPDATEPOFILES= - DUMMYPOFILES= - GMOFILES= - for lang in $ALL_LINGUAS; do - POFILES="$POFILES $srcdirpre$lang.po" - UPDATEPOFILES="$UPDATEPOFILES $lang.po-update" - DUMMYPOFILES="$DUMMYPOFILES $lang.nop" - GMOFILES="$GMOFILES $srcdirpre$lang.gmo" - done - # CATALOGS depends on both $ac_dir and the user's LINGUAS - # environment variable. - INST_LINGUAS= - if test -n "$ALL_LINGUAS"; then - for presentlang in $ALL_LINGUAS; do - useit=no - if test "%UNSET%" != "$LINGUAS"; then - desiredlanguages="$LINGUAS" - else - desiredlanguages="$ALL_LINGUAS" - fi - for desiredlang in $desiredlanguages; do - # Use the presentlang catalog if desiredlang is - # a. equal to presentlang, or - # b. a variant of presentlang (because in this case, - # presentlang can be used as a fallback for messages - # which are not translated in the desiredlang catalog). - case "$desiredlang" in - "$presentlang"*) useit=yes;; - esac - done - if test $useit = yes; then - INST_LINGUAS="$INST_LINGUAS $presentlang" - fi - done - fi - CATALOGS= - if test -n "$INST_LINGUAS"; then - for lang in $INST_LINGUAS; do - CATALOGS="$CATALOGS $lang.gmo" - done - fi - test -n "$as_me" && echo "$as_me: creating $ac_dir/Makefile" || echo "creating $ac_dir/Makefile" - sed -e "/^POTFILES =/r $ac_dir/POTFILES" -e "/^# Makevars/r $ac_given_srcdir/$ac_dir/Makevars" -e "s|@POFILES@|$POFILES|g" -e "s|@UPDATEPOFILES@|$UPDATEPOFILES|g" -e "s|@DUMMYPOFILES@|$DUMMYPOFILES|g" -e "s|@GMOFILES@|$GMOFILES|g" -e "s|@CATALOGS@|$CATALOGS|g" -e "s|@POMAKEFILEDEPS@|$POMAKEFILEDEPS|g" "$ac_dir/Makefile.in" > "$ac_dir/Makefile" - for f in "$ac_given_srcdir/$ac_dir"/Rules-*; do - if test -f "$f"; then - case "$f" in - *.orig | *.bak | *~) ;; - *) cat "$f" >> "$ac_dir/Makefile" ;; - esac - fi - done - fi - ;; - esac - done], - [# Capture the value of obsolete ALL_LINGUAS because we need it to compute - # POFILES, UPDATEPOFILES, DUMMYPOFILES, GMOFILES, CATALOGS. But hide it - # from automake. - eval 'OBSOLETE_ALL_LINGUAS''="$ALL_LINGUAS"' - # Capture the value of LINGUAS because we need it to compute CATALOGS. - LINGUAS="${LINGUAS-%UNSET%}" - ]) -]) - -dnl Postprocesses a Makefile in a directory containing PO files. -AC_DEFUN([AM_POSTPROCESS_PO_MAKEFILE], -[ - # When this code is run, in config.status, two variables have already been - # set: - # - OBSOLETE_ALL_LINGUAS is the value of LINGUAS set in configure.in, - # - LINGUAS is the value of the environment variable LINGUAS at configure - # time. - -changequote(,)dnl - # Adjust a relative srcdir. - ac_dir=`echo "$ac_file"|sed 's%/[^/][^/]*$%%'` - ac_dir_suffix="/`echo "$ac_dir"|sed 's%^\./%%'`" - ac_dots=`echo "$ac_dir_suffix"|sed 's%/[^/]*%../%g'` - # In autoconf-2.13 it is called $ac_given_srcdir. - # In autoconf-2.50 it is called $srcdir. - test -n "$ac_given_srcdir" || ac_given_srcdir="$srcdir" - case "$ac_given_srcdir" in - .) top_srcdir=`echo $ac_dots|sed 's%/$%%'` ;; - /*) top_srcdir="$ac_given_srcdir" ;; - *) top_srcdir="$ac_dots$ac_given_srcdir" ;; - esac - - # Find a way to echo strings without interpreting backslash. - if test "X`(echo '\t') 2>/dev/null`" = 'X\t'; then - gt_echo='echo' - else - if test "X`(printf '%s\n' '\t') 2>/dev/null`" = 'X\t'; then - gt_echo='printf %s\n' - else - echo_func () { - cat < "$ac_file.tmp" - if grep -l '@TCLCATALOGS@' "$ac_file" > /dev/null; then - # Add dependencies that cannot be formulated as a simple suffix rule. - for lang in $ALL_LINGUAS; do - frobbedlang=`echo $lang | sed -e 's/\..*$//' -e 'y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/'` - cat >> "$ac_file.tmp" < /dev/null; then - # Add dependencies that cannot be formulated as a simple suffix rule. - for lang in $ALL_LINGUAS; do - frobbedlang=`echo $lang | sed -e 's/_/-/g'` - cat >> "$ac_file.tmp" <> "$ac_file.tmp" < -#include -/* The string "%2$d %1$d", with dollar characters protected from the shell's - dollar expansion (possibly an autoconf bug). */ -static char format[] = { '%', '2', '$', 'd', ' ', '%', '1', '$', 'd', '\0' }; -static char buf[100]; -int main () -{ - sprintf (buf, format, 33, 55); - return (strcmp (buf, "55 33") != 0); -}], gt_cv_func_printf_posix=yes, gt_cv_func_printf_posix=no, - [ - AC_EGREP_CPP(notposix, [ -#if defined __NetBSD__ || defined _MSC_VER || defined __MINGW32__ || defined __CYGWIN__ - notposix -#endif - ], gt_cv_func_printf_posix="guessing no", - gt_cv_func_printf_posix="guessing yes") - ]) - ]) - case $gt_cv_func_printf_posix in - *yes) - AC_DEFINE(HAVE_POSIX_PRINTF, 1, - [Define if your printf() function supports format strings with positions.]) - ;; - esac -]) -# progtest.m4 serial 3 (gettext-0.12) -dnl Copyright (C) 1996-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. -dnl -dnl This file can can be used in projects which are not available under -dnl the GNU General Public License or the GNU Library General Public -dnl License but which still want to provide support for the GNU gettext -dnl functionality. -dnl Please note that the actual code of the GNU gettext library is covered -dnl by the GNU Library General Public License, and the rest of the GNU -dnl gettext package package is covered by the GNU General Public License. -dnl They are *not* in the public domain. - -dnl Authors: -dnl Ulrich Drepper , 1996. - -# Search path for a program which passes the given test. - -dnl AM_PATH_PROG_WITH_TEST(VARIABLE, PROG-TO-CHECK-FOR, -dnl TEST-PERFORMED-ON-FOUND_PROGRAM [, VALUE-IF-NOT-FOUND [, PATH]]) -AC_DEFUN([AM_PATH_PROG_WITH_TEST], -[ -# Prepare PATH_SEPARATOR. -# The user is always right. -if test "${PATH_SEPARATOR+set}" != set; then - echo "#! /bin/sh" >conf$$.sh - echo "exit 0" >>conf$$.sh - chmod +x conf$$.sh - if (PATH="/nonexistent;."; conf$$.sh) >/dev/null 2>&1; then - PATH_SEPARATOR=';' - else - PATH_SEPARATOR=: - fi - rm -f conf$$.sh -fi - -# Find out how to test for executable files. Don't use a zero-byte file, -# as systems may use methods other than mode bits to determine executability. -cat >conf$$.file <<_ASEOF -#! /bin/sh -exit 0 -_ASEOF -chmod +x conf$$.file -if test -x conf$$.file >/dev/null 2>&1; then - ac_executable_p="test -x" -else - ac_executable_p="test -f" -fi -rm -f conf$$.file - -# Extract the first word of "$2", so it can be a program name with args. -set dummy $2; ac_word=[$]2 -AC_MSG_CHECKING([for $ac_word]) -AC_CACHE_VAL(ac_cv_path_$1, -[case "[$]$1" in - [[\\/]]* | ?:[[\\/]]*) - ac_cv_path_$1="[$]$1" # Let the user override the test with a path. - ;; - *) - ac_save_IFS="$IFS"; IFS=$PATH_SEPARATOR - for ac_dir in ifelse([$5], , $PATH, [$5]); do - IFS="$ac_save_IFS" - test -z "$ac_dir" && ac_dir=. - for ac_exec_ext in '' $ac_executable_extensions; do - if $ac_executable_p "$ac_dir/$ac_word$ac_exec_ext"; then - if [$3]; then - ac_cv_path_$1="$ac_dir/$ac_word$ac_exec_ext" - break 2 - fi - fi - done - done - IFS="$ac_save_IFS" -dnl If no 4th arg is given, leave the cache variable unset, -dnl so AC_PATH_PROGS will keep looking. -ifelse([$4], , , [ test -z "[$]ac_cv_path_$1" && ac_cv_path_$1="$4" -])dnl - ;; -esac])dnl -$1="$ac_cv_path_$1" -if test ifelse([$4], , [-n "[$]$1"], ["[$]$1" != "$4"]); then - AC_MSG_RESULT([$]$1) -else - AC_MSG_RESULT(no) -fi -AC_SUBST($1)dnl -]) -# signed.m4 serial 1 (gettext-0.10.40) -dnl Copyright (C) 2001-2002 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -AC_DEFUN([bh_C_SIGNED], -[ - AC_CACHE_CHECK([for signed], bh_cv_c_signed, - [AC_TRY_COMPILE(, [signed char x;], bh_cv_c_signed=yes, bh_cv_c_signed=no)]) - if test $bh_cv_c_signed = no; then - AC_DEFINE(signed, , - [Define to empty if the C compiler doesn't support this keyword.]) - fi -]) -# size_max.m4 serial 2 -dnl Copyright (C) 2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -AC_DEFUN([gl_SIZE_MAX], -[ - AC_CHECK_HEADERS(stdint.h) - dnl First test whether the system already has SIZE_MAX. - AC_MSG_CHECKING([for SIZE_MAX]) - result= - AC_EGREP_CPP([Found it], [ -#include -#if HAVE_STDINT_H -#include -#endif -#ifdef SIZE_MAX -Found it -#endif -], result=yes) - if test -z "$result"; then - dnl Define it ourselves. Here we assume that the type 'size_t' is not wider - dnl than the type 'unsigned long'. - dnl The _AC_COMPUTE_INT macro works up to LONG_MAX, since it uses 'expr', - dnl which is guaranteed to work from LONG_MIN to LONG_MAX. - _AC_COMPUTE_INT([~(size_t)0 / 10], res_hi, - [#include ], result=?) - _AC_COMPUTE_INT([~(size_t)0 % 10], res_lo, - [#include ], result=?) - _AC_COMPUTE_INT([sizeof (size_t) <= sizeof (unsigned int)], fits_in_uint, - [#include ], result=?) - if test "$fits_in_uint" = 1; then - dnl Even though SIZE_MAX fits in an unsigned int, it must be of type - dnl 'unsigned long' if the type 'size_t' is the same as 'unsigned long'. - AC_TRY_COMPILE([#include - extern size_t foo; - extern unsigned long foo; - ], [], fits_in_uint=0) - fi - if test -z "$result"; then - if test "$fits_in_uint" = 1; then - result="$res_hi$res_lo"U - else - result="$res_hi$res_lo"UL - fi - else - dnl Shouldn't happen, but who knows... - result='~(size_t)0' - fi - fi - AC_MSG_RESULT([$result]) - if test "$result" != yes; then - AC_DEFINE_UNQUOTED([SIZE_MAX], [$result], - [Define as the maximum value of type 'size_t', if the system doesn't define it.]) - fi -]) -# stdint_h.m4 serial 3 (gettext-0.12) -dnl Copyright (C) 1997-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -# Define HAVE_STDINT_H_WITH_UINTMAX if exists, -# doesn't clash with , and declares uintmax_t. - -AC_DEFUN([jm_AC_HEADER_STDINT_H], -[ - AC_CACHE_CHECK([for stdint.h], jm_ac_cv_header_stdint_h, - [AC_TRY_COMPILE( - [#include -#include ], - [uintmax_t i = (uintmax_t) -1;], - jm_ac_cv_header_stdint_h=yes, - jm_ac_cv_header_stdint_h=no)]) - if test $jm_ac_cv_header_stdint_h = yes; then - AC_DEFINE_UNQUOTED(HAVE_STDINT_H_WITH_UINTMAX, 1, - [Define if exists, doesn't clash with , - and declares uintmax_t. ]) - fi -]) -# uintmax_t.m4 serial 7 (gettext-0.12) -dnl Copyright (C) 1997-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -AC_PREREQ(2.13) - -# Define uintmax_t to 'unsigned long' or 'unsigned long long' -# if it is not already defined in or . - -AC_DEFUN([jm_AC_TYPE_UINTMAX_T], -[ - AC_REQUIRE([jm_AC_HEADER_INTTYPES_H]) - AC_REQUIRE([jm_AC_HEADER_STDINT_H]) - if test $jm_ac_cv_header_inttypes_h = no && test $jm_ac_cv_header_stdint_h = no; then - AC_REQUIRE([jm_AC_TYPE_UNSIGNED_LONG_LONG]) - test $ac_cv_type_unsigned_long_long = yes \ - && ac_type='unsigned long long' \ - || ac_type='unsigned long' - AC_DEFINE_UNQUOTED(uintmax_t, $ac_type, - [Define to unsigned long or unsigned long long - if and don't define.]) - else - AC_DEFINE(HAVE_UINTMAX_T, 1, - [Define if you have the 'uintmax_t' type in or .]) - fi -]) -# ulonglong.m4 serial 3 -dnl Copyright (C) 1999-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Paul Eggert. - -# Define HAVE_UNSIGNED_LONG_LONG if 'unsigned long long' works. - -AC_DEFUN([jm_AC_TYPE_UNSIGNED_LONG_LONG], -[ - AC_CACHE_CHECK([for unsigned long long], ac_cv_type_unsigned_long_long, - [AC_TRY_LINK([unsigned long long ull = 1ULL; int i = 63;], - [unsigned long long ullmax = (unsigned long long) -1; - return ull << i | ull >> i | ullmax / ull | ullmax % ull;], - ac_cv_type_unsigned_long_long=yes, - ac_cv_type_unsigned_long_long=no)]) - if test $ac_cv_type_unsigned_long_long = yes; then - AC_DEFINE(HAVE_UNSIGNED_LONG_LONG, 1, - [Define if you have the 'unsigned long long' type.]) - fi -]) -# wchar_t.m4 serial 1 (gettext-0.12) -dnl Copyright (C) 2002-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. -dnl Test whether has the 'wchar_t' type. -dnl Prerequisite: AC_PROG_CC - -AC_DEFUN([gt_TYPE_WCHAR_T], -[ - AC_CACHE_CHECK([for wchar_t], gt_cv_c_wchar_t, - [AC_TRY_COMPILE([#include - wchar_t foo = (wchar_t)'\0';], , - gt_cv_c_wchar_t=yes, gt_cv_c_wchar_t=no)]) - if test $gt_cv_c_wchar_t = yes; then - AC_DEFINE(HAVE_WCHAR_T, 1, [Define if you have the 'wchar_t' type.]) - fi -]) -# wint_t.m4 serial 1 (gettext-0.12) -dnl Copyright (C) 2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. -dnl Test whether has the 'wint_t' type. -dnl Prerequisite: AC_PROG_CC - -AC_DEFUN([gt_TYPE_WINT_T], -[ - AC_CACHE_CHECK([for wint_t], gt_cv_c_wint_t, - [AC_TRY_COMPILE([#include - wint_t foo = (wchar_t)'\0';], , - gt_cv_c_wint_t=yes, gt_cv_c_wint_t=no)]) - if test $gt_cv_c_wint_t = yes; then - AC_DEFINE(HAVE_WINT_T, 1, [Define if you have the 'wint_t' type.]) - fi -]) -# xsize.m4 serial 2 -dnl Copyright (C) 2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -AC_DEFUN([gl_XSIZE], -[ - dnl Prerequisites of lib/xsize.h. - AC_REQUIRE([gl_SIZE_MAX]) - AC_CHECK_HEADERS(stdint.h) -]) -# lib-link.m4 serial 4 (gettext-0.12) -dnl Copyright (C) 2001-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -dnl AC_LIB_LINKFLAGS(name [, dependencies]) searches for libname and -dnl the libraries corresponding to explicit and implicit dependencies. -dnl Sets and AC_SUBSTs the LIB${NAME} and LTLIB${NAME} variables and -dnl augments the CPPFLAGS variable. -AC_DEFUN([AC_LIB_LINKFLAGS], -[ - AC_REQUIRE([AC_LIB_PREPARE_PREFIX]) - AC_REQUIRE([AC_LIB_RPATH]) - define([Name],[translit([$1],[./-], [___])]) - define([NAME],[translit([$1],[abcdefghijklmnopqrstuvwxyz./-], - [ABCDEFGHIJKLMNOPQRSTUVWXYZ___])]) - AC_CACHE_CHECK([how to link with lib[]$1], [ac_cv_lib[]Name[]_libs], [ - AC_LIB_LINKFLAGS_BODY([$1], [$2]) - ac_cv_lib[]Name[]_libs="$LIB[]NAME" - ac_cv_lib[]Name[]_ltlibs="$LTLIB[]NAME" - ac_cv_lib[]Name[]_cppflags="$INC[]NAME" - ]) - LIB[]NAME="$ac_cv_lib[]Name[]_libs" - LTLIB[]NAME="$ac_cv_lib[]Name[]_ltlibs" - INC[]NAME="$ac_cv_lib[]Name[]_cppflags" - AC_LIB_APPENDTOVAR([CPPFLAGS], [$INC]NAME) - AC_SUBST([LIB]NAME) - AC_SUBST([LTLIB]NAME) - dnl Also set HAVE_LIB[]NAME so that AC_LIB_HAVE_LINKFLAGS can reuse the - dnl results of this search when this library appears as a dependency. - HAVE_LIB[]NAME=yes - undefine([Name]) - undefine([NAME]) -]) - -dnl AC_LIB_HAVE_LINKFLAGS(name, dependencies, includes, testcode) -dnl searches for libname and the libraries corresponding to explicit and -dnl implicit dependencies, together with the specified include files and -dnl the ability to compile and link the specified testcode. If found, it -dnl sets and AC_SUBSTs HAVE_LIB${NAME}=yes and the LIB${NAME} and -dnl LTLIB${NAME} variables and augments the CPPFLAGS variable, and -dnl #defines HAVE_LIB${NAME} to 1. Otherwise, it sets and AC_SUBSTs -dnl HAVE_LIB${NAME}=no and LIB${NAME} and LTLIB${NAME} to empty. -AC_DEFUN([AC_LIB_HAVE_LINKFLAGS], -[ - AC_REQUIRE([AC_LIB_PREPARE_PREFIX]) - AC_REQUIRE([AC_LIB_RPATH]) - define([Name],[translit([$1],[./-], [___])]) - define([NAME],[translit([$1],[abcdefghijklmnopqrstuvwxyz./-], - [ABCDEFGHIJKLMNOPQRSTUVWXYZ___])]) - - dnl Search for lib[]Name and define LIB[]NAME, LTLIB[]NAME and INC[]NAME - dnl accordingly. - AC_LIB_LINKFLAGS_BODY([$1], [$2]) - - dnl Add $INC[]NAME to CPPFLAGS before performing the following checks, - dnl because if the user has installed lib[]Name and not disabled its use - dnl via --without-lib[]Name-prefix, he wants to use it. - ac_save_CPPFLAGS="$CPPFLAGS" - AC_LIB_APPENDTOVAR([CPPFLAGS], [$INC]NAME) - - AC_CACHE_CHECK([for lib[]$1], [ac_cv_lib[]Name], [ - ac_save_LIBS="$LIBS" - LIBS="$LIBS $LIB[]NAME" - AC_TRY_LINK([$3], [$4], [ac_cv_lib[]Name=yes], [ac_cv_lib[]Name=no]) - LIBS="$ac_save_LIBS" - ]) - if test "$ac_cv_lib[]Name" = yes; then - HAVE_LIB[]NAME=yes - AC_DEFINE([HAVE_LIB]NAME, 1, [Define if you have the $1 library.]) - AC_MSG_CHECKING([how to link with lib[]$1]) - AC_MSG_RESULT([$LIB[]NAME]) - else - HAVE_LIB[]NAME=no - dnl If $LIB[]NAME didn't lead to a usable library, we don't need - dnl $INC[]NAME either. - CPPFLAGS="$ac_save_CPPFLAGS" - LIB[]NAME= - LTLIB[]NAME= - fi - AC_SUBST([HAVE_LIB]NAME) - AC_SUBST([LIB]NAME) - AC_SUBST([LTLIB]NAME) - undefine([Name]) - undefine([NAME]) -]) - -dnl Determine the platform dependent parameters needed to use rpath: -dnl libext, shlibext, hardcode_libdir_flag_spec, hardcode_libdir_separator, -dnl hardcode_direct, hardcode_minus_L. -AC_DEFUN([AC_LIB_RPATH], -[ - AC_REQUIRE([AC_PROG_CC]) dnl we use $CC, $GCC, $LDFLAGS - AC_REQUIRE([AC_LIB_PROG_LD]) dnl we use $LD, $with_gnu_ld - AC_REQUIRE([AC_CANONICAL_HOST]) dnl we use $host - AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT]) dnl we use $ac_aux_dir - AC_CACHE_CHECK([for shared library run path origin], acl_cv_rpath, [ - CC="$CC" GCC="$GCC" LDFLAGS="$LDFLAGS" LD="$LD" with_gnu_ld="$with_gnu_ld" \ - ${CONFIG_SHELL-/bin/sh} "$ac_aux_dir/config.rpath" "$host" > conftest.sh - . ./conftest.sh - rm -f ./conftest.sh - acl_cv_rpath=done - ]) - wl="$acl_cv_wl" - libext="$acl_cv_libext" - shlibext="$acl_cv_shlibext" - hardcode_libdir_flag_spec="$acl_cv_hardcode_libdir_flag_spec" - hardcode_libdir_separator="$acl_cv_hardcode_libdir_separator" - hardcode_direct="$acl_cv_hardcode_direct" - hardcode_minus_L="$acl_cv_hardcode_minus_L" - dnl Determine whether the user wants rpath handling at all. - AC_ARG_ENABLE(rpath, - [ --disable-rpath do not hardcode runtime library paths], - :, enable_rpath=yes) -]) - -dnl AC_LIB_LINKFLAGS_BODY(name [, dependencies]) searches for libname and -dnl the libraries corresponding to explicit and implicit dependencies. -dnl Sets the LIB${NAME}, LTLIB${NAME} and INC${NAME} variables. -AC_DEFUN([AC_LIB_LINKFLAGS_BODY], -[ - define([NAME],[translit([$1],[abcdefghijklmnopqrstuvwxyz./-], - [ABCDEFGHIJKLMNOPQRSTUVWXYZ___])]) - dnl By default, look in $includedir and $libdir. - use_additional=yes - AC_LIB_WITH_FINAL_PREFIX([ - eval additional_includedir=\"$includedir\" - eval additional_libdir=\"$libdir\" - ]) - AC_LIB_ARG_WITH([lib$1-prefix], -[ --with-lib$1-prefix[=DIR] search for lib$1 in DIR/include and DIR/lib - --without-lib$1-prefix don't search for lib$1 in includedir and libdir], -[ - if test "X$withval" = "Xno"; then - use_additional=no - else - if test "X$withval" = "X"; then - AC_LIB_WITH_FINAL_PREFIX([ - eval additional_includedir=\"$includedir\" - eval additional_libdir=\"$libdir\" - ]) - else - additional_includedir="$withval/include" - additional_libdir="$withval/lib" - fi - fi -]) - dnl Search the library and its dependencies in $additional_libdir and - dnl $LDFLAGS. Using breadth-first-seach. - LIB[]NAME= - LTLIB[]NAME= - INC[]NAME= - rpathdirs= - ltrpathdirs= - names_already_handled= - names_next_round='$1 $2' - while test -n "$names_next_round"; do - names_this_round="$names_next_round" - names_next_round= - for name in $names_this_round; do - already_handled= - for n in $names_already_handled; do - if test "$n" = "$name"; then - already_handled=yes - break - fi - done - if test -z "$already_handled"; then - names_already_handled="$names_already_handled $name" - dnl See if it was already located by an earlier AC_LIB_LINKFLAGS - dnl or AC_LIB_HAVE_LINKFLAGS call. - uppername=`echo "$name" | sed -e 'y|abcdefghijklmnopqrstuvwxyz./-|ABCDEFGHIJKLMNOPQRSTUVWXYZ___|'` - eval value=\"\$HAVE_LIB$uppername\" - if test -n "$value"; then - if test "$value" = yes; then - eval value=\"\$LIB$uppername\" - test -z "$value" || LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$value" - eval value=\"\$LTLIB$uppername\" - test -z "$value" || LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }$value" - else - dnl An earlier call to AC_LIB_HAVE_LINKFLAGS has determined - dnl that this library doesn't exist. So just drop it. - : - fi - else - dnl Search the library lib$name in $additional_libdir and $LDFLAGS - dnl and the already constructed $LIBNAME/$LTLIBNAME. - found_dir= - found_la= - found_so= - found_a= - if test $use_additional = yes; then - if test -n "$shlibext" && test -f "$additional_libdir/lib$name.$shlibext"; then - found_dir="$additional_libdir" - found_so="$additional_libdir/lib$name.$shlibext" - if test -f "$additional_libdir/lib$name.la"; then - found_la="$additional_libdir/lib$name.la" - fi - else - if test -f "$additional_libdir/lib$name.$libext"; then - found_dir="$additional_libdir" - found_a="$additional_libdir/lib$name.$libext" - if test -f "$additional_libdir/lib$name.la"; then - found_la="$additional_libdir/lib$name.la" - fi - fi - fi - fi - if test "X$found_dir" = "X"; then - for x in $LDFLAGS $LTLIB[]NAME; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - case "$x" in - -L*) - dir=`echo "X$x" | sed -e 's/^X-L//'` - if test -n "$shlibext" && test -f "$dir/lib$name.$shlibext"; then - found_dir="$dir" - found_so="$dir/lib$name.$shlibext" - if test -f "$dir/lib$name.la"; then - found_la="$dir/lib$name.la" - fi - else - if test -f "$dir/lib$name.$libext"; then - found_dir="$dir" - found_a="$dir/lib$name.$libext" - if test -f "$dir/lib$name.la"; then - found_la="$dir/lib$name.la" - fi - fi - fi - ;; - esac - if test "X$found_dir" != "X"; then - break - fi - done - fi - if test "X$found_dir" != "X"; then - dnl Found the library. - LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-L$found_dir -l$name" - if test "X$found_so" != "X"; then - dnl Linking with a shared library. We attempt to hardcode its - dnl directory into the executable's runpath, unless it's the - dnl standard /usr/lib. - if test "$enable_rpath" = no || test "X$found_dir" = "X/usr/lib"; then - dnl No hardcoding is needed. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so" - else - dnl Use an explicit option to hardcode DIR into the resulting - dnl binary. - dnl Potentially add DIR to ltrpathdirs. - dnl The ltrpathdirs will be appended to $LTLIBNAME at the end. - haveit= - for x in $ltrpathdirs; do - if test "X$x" = "X$found_dir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - ltrpathdirs="$ltrpathdirs $found_dir" - fi - dnl The hardcoding into $LIBNAME is system dependent. - if test "$hardcode_direct" = yes; then - dnl Using DIR/libNAME.so during linking hardcodes DIR into the - dnl resulting binary. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so" - else - if test -n "$hardcode_libdir_flag_spec" && test "$hardcode_minus_L" = no; then - dnl Use an explicit option to hardcode DIR into the resulting - dnl binary. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so" - dnl Potentially add DIR to rpathdirs. - dnl The rpathdirs will be appended to $LIBNAME at the end. - haveit= - for x in $rpathdirs; do - if test "X$x" = "X$found_dir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - rpathdirs="$rpathdirs $found_dir" - fi - else - dnl Rely on "-L$found_dir". - dnl But don't add it if it's already contained in the LDFLAGS - dnl or the already constructed $LIBNAME - haveit= - for x in $LDFLAGS $LIB[]NAME; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-L$found_dir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$found_dir" - fi - if test "$hardcode_minus_L" != no; then - dnl FIXME: Not sure whether we should use - dnl "-L$found_dir -l$name" or "-L$found_dir $found_so" - dnl here. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_so" - else - dnl We cannot use $hardcode_runpath_var and LD_RUN_PATH - dnl here, because this doesn't fit in flags passed to the - dnl compiler. So give up. No hardcoding. This affects only - dnl very old systems. - dnl FIXME: Not sure whether we should use - dnl "-L$found_dir -l$name" or "-L$found_dir $found_so" - dnl here. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-l$name" - fi - fi - fi - fi - else - if test "X$found_a" != "X"; then - dnl Linking with a static library. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$found_a" - else - dnl We shouldn't come here, but anyway it's good to have a - dnl fallback. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$found_dir -l$name" - fi - fi - dnl Assume the include files are nearby. - additional_includedir= - case "$found_dir" in - */lib | */lib/) - basedir=`echo "X$found_dir" | sed -e 's,^X,,' -e 's,/lib/*$,,'` - additional_includedir="$basedir/include" - ;; - esac - if test "X$additional_includedir" != "X"; then - dnl Potentially add $additional_includedir to $INCNAME. - dnl But don't add it - dnl 1. if it's the standard /usr/include, - dnl 2. if it's /usr/local/include and we are using GCC on Linux, - dnl 3. if it's already present in $CPPFLAGS or the already - dnl constructed $INCNAME, - dnl 4. if it doesn't exist as a directory. - if test "X$additional_includedir" != "X/usr/include"; then - haveit= - if test "X$additional_includedir" = "X/usr/local/include"; then - if test -n "$GCC"; then - case $host_os in - linux*) haveit=yes;; - esac - fi - fi - if test -z "$haveit"; then - for x in $CPPFLAGS $INC[]NAME; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-I$additional_includedir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - if test -d "$additional_includedir"; then - dnl Really add $additional_includedir to $INCNAME. - INC[]NAME="${INC[]NAME}${INC[]NAME:+ }-I$additional_includedir" - fi - fi - fi - fi - fi - dnl Look for dependencies. - if test -n "$found_la"; then - dnl Read the .la file. It defines the variables - dnl dlname, library_names, old_library, dependency_libs, current, - dnl age, revision, installed, dlopen, dlpreopen, libdir. - save_libdir="$libdir" - case "$found_la" in - */* | *\\*) . "$found_la" ;; - *) . "./$found_la" ;; - esac - libdir="$save_libdir" - dnl We use only dependency_libs. - for dep in $dependency_libs; do - case "$dep" in - -L*) - additional_libdir=`echo "X$dep" | sed -e 's/^X-L//'` - dnl Potentially add $additional_libdir to $LIBNAME and $LTLIBNAME. - dnl But don't add it - dnl 1. if it's the standard /usr/lib, - dnl 2. if it's /usr/local/lib and we are using GCC on Linux, - dnl 3. if it's already present in $LDFLAGS or the already - dnl constructed $LIBNAME, - dnl 4. if it doesn't exist as a directory. - if test "X$additional_libdir" != "X/usr/lib"; then - haveit= - if test "X$additional_libdir" = "X/usr/local/lib"; then - if test -n "$GCC"; then - case $host_os in - linux*) haveit=yes;; - esac - fi - fi - if test -z "$haveit"; then - haveit= - for x in $LDFLAGS $LIB[]NAME; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-L$additional_libdir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - if test -d "$additional_libdir"; then - dnl Really add $additional_libdir to $LIBNAME. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-L$additional_libdir" - fi - fi - haveit= - for x in $LDFLAGS $LTLIB[]NAME; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-L$additional_libdir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - if test -d "$additional_libdir"; then - dnl Really add $additional_libdir to $LTLIBNAME. - LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-L$additional_libdir" - fi - fi - fi - fi - ;; - -R*) - dir=`echo "X$dep" | sed -e 's/^X-R//'` - if test "$enable_rpath" != no; then - dnl Potentially add DIR to rpathdirs. - dnl The rpathdirs will be appended to $LIBNAME at the end. - haveit= - for x in $rpathdirs; do - if test "X$x" = "X$dir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - rpathdirs="$rpathdirs $dir" - fi - dnl Potentially add DIR to ltrpathdirs. - dnl The ltrpathdirs will be appended to $LTLIBNAME at the end. - haveit= - for x in $ltrpathdirs; do - if test "X$x" = "X$dir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - ltrpathdirs="$ltrpathdirs $dir" - fi - fi - ;; - -l*) - dnl Handle this in the next round. - names_next_round="$names_next_round "`echo "X$dep" | sed -e 's/^X-l//'` - ;; - *.la) - dnl Handle this in the next round. Throw away the .la's - dnl directory; it is already contained in a preceding -L - dnl option. - names_next_round="$names_next_round "`echo "X$dep" | sed -e 's,^X.*/,,' -e 's,^lib,,' -e 's,\.la$,,'` - ;; - *) - dnl Most likely an immediate library name. - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$dep" - LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }$dep" - ;; - esac - done - fi - else - dnl Didn't find the library; assume it is in the system directories - dnl known to the linker and runtime loader. (All the system - dnl directories known to the linker should also be known to the - dnl runtime loader, otherwise the system is severely misconfigured.) - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }-l$name" - LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-l$name" - fi - fi - fi - done - done - if test "X$rpathdirs" != "X"; then - if test -n "$hardcode_libdir_separator"; then - dnl Weird platform: only the last -rpath option counts, the user must - dnl pass all path elements in one option. We can arrange that for a - dnl single library, but not when more than one $LIBNAMEs are used. - alldirs= - for found_dir in $rpathdirs; do - alldirs="${alldirs}${alldirs:+$hardcode_libdir_separator}$found_dir" - done - dnl Note: hardcode_libdir_flag_spec uses $libdir and $wl. - acl_save_libdir="$libdir" - libdir="$alldirs" - eval flag=\"$hardcode_libdir_flag_spec\" - libdir="$acl_save_libdir" - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$flag" - else - dnl The -rpath options are cumulative. - for found_dir in $rpathdirs; do - acl_save_libdir="$libdir" - libdir="$found_dir" - eval flag=\"$hardcode_libdir_flag_spec\" - libdir="$acl_save_libdir" - LIB[]NAME="${LIB[]NAME}${LIB[]NAME:+ }$flag" - done - fi - fi - if test "X$ltrpathdirs" != "X"; then - dnl When using libtool, the option that works for both libraries and - dnl executables is -R. The -R options are cumulative. - for found_dir in $ltrpathdirs; do - LTLIB[]NAME="${LTLIB[]NAME}${LTLIB[]NAME:+ }-R$found_dir" - done - fi -]) - -dnl AC_LIB_APPENDTOVAR(VAR, CONTENTS) appends the elements of CONTENTS to VAR, -dnl unless already present in VAR. -dnl Works only for CPPFLAGS, not for LIB* variables because that sometimes -dnl contains two or three consecutive elements that belong together. -AC_DEFUN([AC_LIB_APPENDTOVAR], -[ - for element in [$2]; do - haveit= - for x in $[$1]; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X$element"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - [$1]="${[$1]}${[$1]:+ }$element" - fi - done -]) -# lib-prefix.m4 serial 3 (gettext-0.13) -dnl Copyright (C) 2001-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl From Bruno Haible. - -dnl AC_LIB_ARG_WITH is synonymous to AC_ARG_WITH in autoconf-2.13, and -dnl similar to AC_ARG_WITH in autoconf 2.52...2.57 except that is doesn't -dnl require excessive bracketing. -ifdef([AC_HELP_STRING], -[AC_DEFUN([AC_LIB_ARG_WITH], [AC_ARG_WITH([$1],[[$2]],[$3],[$4])])], -[AC_DEFUN([AC_][LIB_ARG_WITH], [AC_ARG_WITH([$1],[$2],[$3],[$4])])]) - -dnl AC_LIB_PREFIX adds to the CPPFLAGS and LDFLAGS the flags that are needed -dnl to access previously installed libraries. The basic assumption is that -dnl a user will want packages to use other packages he previously installed -dnl with the same --prefix option. -dnl This macro is not needed if only AC_LIB_LINKFLAGS is used to locate -dnl libraries, but is otherwise very convenient. -AC_DEFUN([AC_LIB_PREFIX], -[ - AC_BEFORE([$0], [AC_LIB_LINKFLAGS]) - AC_REQUIRE([AC_PROG_CC]) - AC_REQUIRE([AC_CANONICAL_HOST]) - AC_REQUIRE([AC_LIB_PREPARE_PREFIX]) - dnl By default, look in $includedir and $libdir. - use_additional=yes - AC_LIB_WITH_FINAL_PREFIX([ - eval additional_includedir=\"$includedir\" - eval additional_libdir=\"$libdir\" - ]) - AC_LIB_ARG_WITH([lib-prefix], -[ --with-lib-prefix[=DIR] search for libraries in DIR/include and DIR/lib - --without-lib-prefix don't search for libraries in includedir and libdir], -[ - if test "X$withval" = "Xno"; then - use_additional=no - else - if test "X$withval" = "X"; then - AC_LIB_WITH_FINAL_PREFIX([ - eval additional_includedir=\"$includedir\" - eval additional_libdir=\"$libdir\" - ]) - else - additional_includedir="$withval/include" - additional_libdir="$withval/lib" - fi - fi -]) - if test $use_additional = yes; then - dnl Potentially add $additional_includedir to $CPPFLAGS. - dnl But don't add it - dnl 1. if it's the standard /usr/include, - dnl 2. if it's already present in $CPPFLAGS, - dnl 3. if it's /usr/local/include and we are using GCC on Linux, - dnl 4. if it doesn't exist as a directory. - if test "X$additional_includedir" != "X/usr/include"; then - haveit= - for x in $CPPFLAGS; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-I$additional_includedir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - if test "X$additional_includedir" = "X/usr/local/include"; then - if test -n "$GCC"; then - case $host_os in - linux*) haveit=yes;; - esac - fi - fi - if test -z "$haveit"; then - if test -d "$additional_includedir"; then - dnl Really add $additional_includedir to $CPPFLAGS. - CPPFLAGS="${CPPFLAGS}${CPPFLAGS:+ }-I$additional_includedir" - fi - fi - fi - fi - dnl Potentially add $additional_libdir to $LDFLAGS. - dnl But don't add it - dnl 1. if it's the standard /usr/lib, - dnl 2. if it's already present in $LDFLAGS, - dnl 3. if it's /usr/local/lib and we are using GCC on Linux, - dnl 4. if it doesn't exist as a directory. - if test "X$additional_libdir" != "X/usr/lib"; then - haveit= - for x in $LDFLAGS; do - AC_LIB_WITH_FINAL_PREFIX([eval x=\"$x\"]) - if test "X$x" = "X-L$additional_libdir"; then - haveit=yes - break - fi - done - if test -z "$haveit"; then - if test "X$additional_libdir" = "X/usr/local/lib"; then - if test -n "$GCC"; then - case $host_os in - linux*) haveit=yes;; - esac - fi - fi - if test -z "$haveit"; then - if test -d "$additional_libdir"; then - dnl Really add $additional_libdir to $LDFLAGS. - LDFLAGS="${LDFLAGS}${LDFLAGS:+ }-L$additional_libdir" - fi - fi - fi - fi - fi -]) - -dnl AC_LIB_PREPARE_PREFIX creates variables acl_final_prefix, -dnl acl_final_exec_prefix, containing the values to which $prefix and -dnl $exec_prefix will expand at the end of the configure script. -AC_DEFUN([AC_LIB_PREPARE_PREFIX], -[ - dnl Unfortunately, prefix and exec_prefix get only finally determined - dnl at the end of configure. - if test "X$prefix" = "XNONE"; then - acl_final_prefix="$ac_default_prefix" - else - acl_final_prefix="$prefix" - fi - if test "X$exec_prefix" = "XNONE"; then - acl_final_exec_prefix='${prefix}' - else - acl_final_exec_prefix="$exec_prefix" - fi - acl_save_prefix="$prefix" - prefix="$acl_final_prefix" - eval acl_final_exec_prefix=\"$acl_final_exec_prefix\" - prefix="$acl_save_prefix" -]) - -dnl AC_LIB_WITH_FINAL_PREFIX([statement]) evaluates statement, with the -dnl variables prefix and exec_prefix bound to the values they will have -dnl at the end of the configure script. -AC_DEFUN([AC_LIB_WITH_FINAL_PREFIX], -[ - acl_save_prefix="$prefix" - prefix="$acl_final_prefix" - acl_save_exec_prefix="$exec_prefix" - exec_prefix="$acl_final_exec_prefix" - $1 - exec_prefix="$acl_save_exec_prefix" - prefix="$acl_save_prefix" -]) -# lib-ld.m4 serial 3 (gettext-0.13) -dnl Copyright (C) 1996-2003 Free Software Foundation, Inc. -dnl This file is free software, distributed under the terms of the GNU -dnl General Public License. As a special exception to the GNU General -dnl Public License, this file may be distributed as part of a program -dnl that contains a configuration script generated by Autoconf, under -dnl the same distribution terms as the rest of that program. - -dnl Subroutines of libtool.m4, -dnl with replacements s/AC_/AC_LIB/ and s/lt_cv/acl_cv/ to avoid collision -dnl with libtool.m4. - -dnl From libtool-1.4. Sets the variable with_gnu_ld to yes or no. -AC_DEFUN([AC_LIB_PROG_LD_GNU], -[AC_CACHE_CHECK([if the linker ($LD) is GNU ld], acl_cv_prog_gnu_ld, -[# I'd rather use --version here, but apparently some GNU ld's only accept -v. -case `$LD -v 2>&1 conf$$.sh - echo "exit 0" >>conf$$.sh - chmod +x conf$$.sh - if (PATH="/nonexistent;."; conf$$.sh) >/dev/null 2>&1; then - PATH_SEPARATOR=';' - else - PATH_SEPARATOR=: - fi - rm -f conf$$.sh -fi -ac_prog=ld -if test "$GCC" = yes; then - # Check if gcc -print-prog-name=ld gives a path. - AC_MSG_CHECKING([for ld used by GCC]) - case $host in - *-*-mingw*) - # gcc leaves a trailing carriage return which upsets mingw - ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;; - *) - ac_prog=`($CC -print-prog-name=ld) 2>&5` ;; - esac - case $ac_prog in - # Accept absolute paths. - [[\\/]* | [A-Za-z]:[\\/]*)] - [re_direlt='/[^/][^/]*/\.\./'] - # Canonicalize the path of ld - ac_prog=`echo $ac_prog| sed 's%\\\\%/%g'` - while echo $ac_prog | grep "$re_direlt" > /dev/null 2>&1; do - ac_prog=`echo $ac_prog| sed "s%$re_direlt%/%"` - done - test -z "$LD" && LD="$ac_prog" - ;; - "") - # If it fails, then pretend we aren't using GCC. - ac_prog=ld - ;; - *) - # If it is relative, then search for the first ld in PATH. - with_gnu_ld=unknown - ;; - esac -elif test "$with_gnu_ld" = yes; then - AC_MSG_CHECKING([for GNU ld]) -else - AC_MSG_CHECKING([for non-GNU ld]) -fi -AC_CACHE_VAL(acl_cv_path_LD, -[if test -z "$LD"; then - IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS="${IFS}${PATH_SEPARATOR-:}" - for ac_dir in $PATH; do - test -z "$ac_dir" && ac_dir=. - if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then - acl_cv_path_LD="$ac_dir/$ac_prog" - # Check to see if the program is GNU ld. I'd rather use --version, - # but apparently some GNU ld's only accept -v. - # Break only if it was the GNU/non-GNU ld that we prefer. - case `"$acl_cv_path_LD" -v 2>&1 < /dev/null` in - *GNU* | *'with BFD'*) - test "$with_gnu_ld" != no && break ;; - *) - test "$with_gnu_ld" != yes && break ;; - esac - fi - done - IFS="$ac_save_ifs" -else - acl_cv_path_LD="$LD" # Let the user override the test with a path. -fi]) -LD="$acl_cv_path_LD" -if test -n "$LD"; then - AC_MSG_RESULT($LD) -else - AC_MSG_RESULT(no) -fi -test -z "$LD" && AC_MSG_ERROR([no acceptable ld found in \$PATH]) -AC_LIB_PROG_LD_GNU -]) diff --git a/BasiliskII/src/Unix/m4/gtk-2.0.m4 b/BasiliskII/src/Unix/m4/gtk-2.0.m4 deleted file mode 100644 index 3deba01be..000000000 --- a/BasiliskII/src/Unix/m4/gtk-2.0.m4 +++ /dev/null @@ -1,196 +0,0 @@ -# Configure paths for GTK+ -# Owen Taylor 1997-2001 - -dnl AM_PATH_GTK_2_0([MINIMUM-VERSION, [ACTION-IF-FOUND [, ACTION-IF-NOT-FOUND [, MODULES]]]]) -dnl Test for GTK+, and define GTK_CFLAGS and GTK_LIBS, if gthread is specified in MODULES, -dnl pass to pkg-config -dnl -AC_DEFUN([AM_PATH_GTK_2_0], -[dnl -dnl Get the cflags and libraries from pkg-config -dnl -AC_ARG_ENABLE(gtktest, [ --disable-gtktest do not try to compile and run a test GTK+ program], - , enable_gtktest=yes) - - pkg_config_args=gtk+-2.0 - for module in . $4 - do - case "$module" in - gthread) - pkg_config_args="$pkg_config_args gthread-2.0" - ;; - esac - done - - no_gtk="" - - AC_PATH_PROG(PKG_CONFIG, pkg-config, no) - - if test x$PKG_CONFIG != xno ; then - if pkg-config --atleast-pkgconfig-version 0.7 ; then - : - else - echo "*** pkg-config too old; version 0.7 or better required." - no_gtk=yes - PKG_CONFIG=no - fi - else - no_gtk=yes - fi - - min_gtk_version=ifelse([$1], ,2.0.0,$1) - AC_MSG_CHECKING(for GTK+ - version >= $min_gtk_version) - - if test x$PKG_CONFIG != xno ; then - ## don't try to run the test against uninstalled libtool libs - if $PKG_CONFIG --uninstalled $pkg_config_args; then - echo "Will use uninstalled version of GTK+ found in PKG_CONFIG_PATH" - enable_gtktest=no - fi - - if $PKG_CONFIG --atleast-version $min_gtk_version $pkg_config_args; then - : - else - no_gtk=yes - fi - fi - - if test x"$no_gtk" = x ; then - GTK_CFLAGS=`$PKG_CONFIG $pkg_config_args --cflags` - GTK_LIBS=`$PKG_CONFIG $pkg_config_args --libs` - gtk_config_major_version=`$PKG_CONFIG --modversion gtk+-2.0 | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\1/'` - gtk_config_minor_version=`$PKG_CONFIG --modversion gtk+-2.0 | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\2/'` - gtk_config_micro_version=`$PKG_CONFIG --modversion gtk+-2.0 | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\3/'` - if test "x$enable_gtktest" = "xyes" ; then - ac_save_CFLAGS="$CFLAGS" - ac_save_LIBS="$LIBS" - CFLAGS="$CFLAGS $GTK_CFLAGS" - LIBS="$GTK_LIBS $LIBS" -dnl -dnl Now check if the installed GTK+ is sufficiently new. (Also sanity -dnl checks the results of pkg-config to some extent) -dnl - rm -f conf.gtktest - AC_TRY_RUN([ -#include -#include -#include - -int -main () -{ - int major, minor, micro; - char *tmp_version; - - system ("touch conf.gtktest"); - - /* HP/UX 9 (%@#!) writes to sscanf strings */ - tmp_version = g_strdup("$min_gtk_version"); - if (sscanf(tmp_version, "%d.%d.%d", &major, &minor, µ) != 3) { - printf("%s, bad version string\n", "$min_gtk_version"); - exit(1); - } - - if ((gtk_major_version != $gtk_config_major_version) || - (gtk_minor_version != $gtk_config_minor_version) || - (gtk_micro_version != $gtk_config_micro_version)) - { - printf("\n*** 'pkg-config --modversion gtk+-2.0' returned %d.%d.%d, but GTK+ (%d.%d.%d)\n", - $gtk_config_major_version, $gtk_config_minor_version, $gtk_config_micro_version, - gtk_major_version, gtk_minor_version, gtk_micro_version); - printf ("*** was found! If pkg-config was correct, then it is best\n"); - printf ("*** to remove the old version of GTK+. You may also be able to fix the error\n"); - printf("*** by modifying your LD_LIBRARY_PATH enviroment variable, or by editing\n"); - printf("*** /etc/ld.so.conf. Make sure you have run ldconfig if that is\n"); - printf("*** required on your system.\n"); - printf("*** If pkg-config was wrong, set the environment variable PKG_CONFIG_PATH\n"); - printf("*** to point to the correct configuration files\n"); - } - else if ((gtk_major_version != GTK_MAJOR_VERSION) || - (gtk_minor_version != GTK_MINOR_VERSION) || - (gtk_micro_version != GTK_MICRO_VERSION)) - { - printf("*** GTK+ header files (version %d.%d.%d) do not match\n", - GTK_MAJOR_VERSION, GTK_MINOR_VERSION, GTK_MICRO_VERSION); - printf("*** library (version %d.%d.%d)\n", - gtk_major_version, gtk_minor_version, gtk_micro_version); - } - else - { - if ((gtk_major_version > major) || - ((gtk_major_version == major) && (gtk_minor_version > minor)) || - ((gtk_major_version == major) && (gtk_minor_version == minor) && (gtk_micro_version >= micro))) - { - return 0; - } - else - { - printf("\n*** An old version of GTK+ (%d.%d.%d) was found.\n", - gtk_major_version, gtk_minor_version, gtk_micro_version); - printf("*** You need a version of GTK+ newer than %d.%d.%d. The latest version of\n", - major, minor, micro); - printf("*** GTK+ is always available from ftp://ftp.gtk.org.\n"); - printf("***\n"); - printf("*** If you have already installed a sufficiently new version, this error\n"); - printf("*** probably means that the wrong copy of the pkg-config shell script is\n"); - printf("*** being found. The easiest way to fix this is to remove the old version\n"); - printf("*** of GTK+, but you can also set the PKG_CONFIG environment to point to the\n"); - printf("*** correct copy of pkg-config. (In this case, you will have to\n"); - printf("*** modify your LD_LIBRARY_PATH enviroment variable, or edit /etc/ld.so.conf\n"); - printf("*** so that the correct libraries are found at run-time))\n"); - } - } - return 1; -} -],, no_gtk=yes,[echo $ac_n "cross compiling; assumed OK... $ac_c"]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - fi - fi - if test "x$no_gtk" = x ; then - AC_MSG_RESULT(yes (version $gtk_config_major_version.$gtk_config_minor_version.$gtk_config_micro_version)) - ifelse([$2], , :, [$2]) - else - AC_MSG_RESULT(no) - if test "$PKG_CONFIG" = "no" ; then - echo "*** A new enough version of pkg-config was not found." - echo "*** See http://pkgconfig.sourceforge.net" - else - if test -f conf.gtktest ; then - : - else - echo "*** Could not run GTK+ test program, checking why..." - ac_save_CFLAGS="$CFLAGS" - ac_save_LIBS="$LIBS" - CFLAGS="$CFLAGS $GTK_CFLAGS" - LIBS="$LIBS $GTK_LIBS" - AC_TRY_LINK([ -#include -#include -], [ return ((gtk_major_version) || (gtk_minor_version) || (gtk_micro_version)); ], - [ echo "*** The test program compiled, but did not run. This usually means" - echo "*** that the run-time linker is not finding GTK+ or finding the wrong" - echo "*** version of GTK+. If it is not finding GTK+, you'll need to set your" - echo "*** LD_LIBRARY_PATH environment variable, or edit /etc/ld.so.conf to point" - echo "*** to the installed location Also, make sure you have run ldconfig if that" - echo "*** is required on your system" - echo "***" - echo "*** If you have an old version installed, it is best to remove it, although" - echo "*** you may also be able to get things to work by modifying LD_LIBRARY_PATH" ], - [ echo "*** The test program failed to compile or link. See the file config.log for the" - echo "*** exact error that occured. This usually means GTK+ is incorrectly installed."]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - fi - fi - GTK_CFLAGS="" - GTK_LIBS="" - ifelse([$3], , :, [$3]) - fi - AC_SUBST(GTK_CFLAGS) - AC_SUBST(GTK_LIBS) - rm -f conf.gtktest -]) diff --git a/BasiliskII/src/Unix/m4/gtk.m4 b/BasiliskII/src/Unix/m4/gtk.m4 deleted file mode 100644 index f2dd47219..000000000 --- a/BasiliskII/src/Unix/m4/gtk.m4 +++ /dev/null @@ -1,194 +0,0 @@ -# Configure paths for GTK+ -# Owen Taylor 97-11-3 - -dnl AM_PATH_GTK([MINIMUM-VERSION, [ACTION-IF-FOUND [, ACTION-IF-NOT-FOUND [, MODULES]]]]) -dnl Test for GTK, and define GTK_CFLAGS and GTK_LIBS -dnl -AC_DEFUN([AM_PATH_GTK], -[dnl -dnl Get the cflags and libraries from the gtk-config script -dnl -AC_ARG_WITH(gtk-prefix,[ --with-gtk-prefix=PFX Prefix where GTK is installed (optional)], - gtk_config_prefix="$withval", gtk_config_prefix="") -AC_ARG_WITH(gtk-exec-prefix,[ --with-gtk-exec-prefix=PFX Exec prefix where GTK is installed (optional)], - gtk_config_exec_prefix="$withval", gtk_config_exec_prefix="") -AC_ARG_ENABLE(gtktest, [ --disable-gtktest Do not try to compile and run a test GTK program], - , enable_gtktest=yes) - - for module in . $4 - do - case "$module" in - gthread) - gtk_config_args="$gtk_config_args gthread" - ;; - esac - done - - if test x$gtk_config_exec_prefix != x ; then - gtk_config_args="$gtk_config_args --exec-prefix=$gtk_config_exec_prefix" - if test x${GTK_CONFIG+set} != xset ; then - GTK_CONFIG=$gtk_config_exec_prefix/bin/gtk-config - fi - fi - if test x$gtk_config_prefix != x ; then - gtk_config_args="$gtk_config_args --prefix=$gtk_config_prefix" - if test x${GTK_CONFIG+set} != xset ; then - GTK_CONFIG=$gtk_config_prefix/bin/gtk-config - fi - fi - - AC_PATH_PROG(GTK_CONFIG, gtk-config, no) - min_gtk_version=ifelse([$1], ,0.99.7,$1) - AC_MSG_CHECKING(for GTK - version >= $min_gtk_version) - no_gtk="" - if test "$GTK_CONFIG" = "no" ; then - no_gtk=yes - else - GTK_CFLAGS=`$GTK_CONFIG $gtk_config_args --cflags` - GTK_LIBS=`$GTK_CONFIG $gtk_config_args --libs` - gtk_config_major_version=`$GTK_CONFIG $gtk_config_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\1/'` - gtk_config_minor_version=`$GTK_CONFIG $gtk_config_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\2/'` - gtk_config_micro_version=`$GTK_CONFIG $gtk_config_args --version | \ - sed 's/\([[0-9]]*\).\([[0-9]]*\).\([[0-9]]*\)/\3/'` - if test "x$enable_gtktest" = "xyes" ; then - ac_save_CFLAGS="$CFLAGS" - ac_save_LIBS="$LIBS" - CFLAGS="$CFLAGS $GTK_CFLAGS" - LIBS="$GTK_LIBS $LIBS" -dnl -dnl Now check if the installed GTK is sufficiently new. (Also sanity -dnl checks the results of gtk-config to some extent -dnl - rm -f conf.gtktest - AC_TRY_RUN([ -#include -#include -#include - -int -main () -{ - int major, minor, micro; - char *tmp_version; - - system ("touch conf.gtktest"); - - /* HP/UX 9 (%@#!) writes to sscanf strings */ - tmp_version = g_strdup("$min_gtk_version"); - if (sscanf(tmp_version, "%d.%d.%d", &major, &minor, µ) != 3) { - printf("%s, bad version string\n", "$min_gtk_version"); - exit(1); - } - - if ((gtk_major_version != $gtk_config_major_version) || - (gtk_minor_version != $gtk_config_minor_version) || - (gtk_micro_version != $gtk_config_micro_version)) - { - printf("\n*** 'gtk-config --version' returned %d.%d.%d, but GTK+ (%d.%d.%d)\n", - $gtk_config_major_version, $gtk_config_minor_version, $gtk_config_micro_version, - gtk_major_version, gtk_minor_version, gtk_micro_version); - printf ("*** was found! If gtk-config was correct, then it is best\n"); - printf ("*** to remove the old version of GTK+. You may also be able to fix the error\n"); - printf("*** by modifying your LD_LIBRARY_PATH enviroment variable, or by editing\n"); - printf("*** /etc/ld.so.conf. Make sure you have run ldconfig if that is\n"); - printf("*** required on your system.\n"); - printf("*** If gtk-config was wrong, set the environment variable GTK_CONFIG\n"); - printf("*** to point to the correct copy of gtk-config, and remove the file config.cache\n"); - printf("*** before re-running configure\n"); - } -#if defined (GTK_MAJOR_VERSION) && defined (GTK_MINOR_VERSION) && defined (GTK_MICRO_VERSION) - else if ((gtk_major_version != GTK_MAJOR_VERSION) || - (gtk_minor_version != GTK_MINOR_VERSION) || - (gtk_micro_version != GTK_MICRO_VERSION)) - { - printf("*** GTK+ header files (version %d.%d.%d) do not match\n", - GTK_MAJOR_VERSION, GTK_MINOR_VERSION, GTK_MICRO_VERSION); - printf("*** library (version %d.%d.%d)\n", - gtk_major_version, gtk_minor_version, gtk_micro_version); - } -#endif /* defined (GTK_MAJOR_VERSION) ... */ - else - { - if ((gtk_major_version > major) || - ((gtk_major_version == major) && (gtk_minor_version > minor)) || - ((gtk_major_version == major) && (gtk_minor_version == minor) && (gtk_micro_version >= micro))) - { - return 0; - } - else - { - printf("\n*** An old version of GTK+ (%d.%d.%d) was found.\n", - gtk_major_version, gtk_minor_version, gtk_micro_version); - printf("*** You need a version of GTK+ newer than %d.%d.%d. The latest version of\n", - major, minor, micro); - printf("*** GTK+ is always available from ftp://ftp.gtk.org.\n"); - printf("***\n"); - printf("*** If you have already installed a sufficiently new version, this error\n"); - printf("*** probably means that the wrong copy of the gtk-config shell script is\n"); - printf("*** being found. The easiest way to fix this is to remove the old version\n"); - printf("*** of GTK+, but you can also set the GTK_CONFIG environment to point to the\n"); - printf("*** correct copy of gtk-config. (In this case, you will have to\n"); - printf("*** modify your LD_LIBRARY_PATH enviroment variable, or edit /etc/ld.so.conf\n"); - printf("*** so that the correct libraries are found at run-time))\n"); - } - } - return 1; -} -],, no_gtk=yes,[echo $ac_n "cross compiling; assumed OK... $ac_c"]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - fi - fi - if test "x$no_gtk" = x ; then - AC_MSG_RESULT(yes) - ifelse([$2], , :, [$2]) - else - AC_MSG_RESULT(no) - if test "$GTK_CONFIG" = "no" ; then - echo "*** The gtk-config script installed by GTK could not be found" - echo "*** If GTK was installed in PREFIX, make sure PREFIX/bin is in" - echo "*** your path, or set the GTK_CONFIG environment variable to the" - echo "*** full path to gtk-config." - else - if test -f conf.gtktest ; then - : - else - echo "*** Could not run GTK test program, checking why..." - CFLAGS="$CFLAGS $GTK_CFLAGS" - LIBS="$LIBS $GTK_LIBS" - AC_TRY_LINK([ -#include -#include -], [ return ((gtk_major_version) || (gtk_minor_version) || (gtk_micro_version)); ], - [ echo "*** The test program compiled, but did not run. This usually means" - echo "*** that the run-time linker is not finding GTK or finding the wrong" - echo "*** version of GTK. If it is not finding GTK, you'll need to set your" - echo "*** LD_LIBRARY_PATH environment variable, or edit /etc/ld.so.conf to point" - echo "*** to the installed location Also, make sure you have run ldconfig if that" - echo "*** is required on your system" - echo "***" - echo "*** If you have an old version installed, it is best to remove it, although" - echo "*** you may also be able to get things to work by modifying LD_LIBRARY_PATH" - echo "***" - echo "*** If you have a RedHat 5.0 system, you should remove the GTK package that" - echo "*** came with the system with the command" - echo "***" - echo "*** rpm --erase --nodeps gtk gtk-devel" ], - [ echo "*** The test program failed to compile or link. See the file config.log for the" - echo "*** exact error that occured. This usually means GTK was incorrectly installed" - echo "*** or that you have moved GTK since it was installed. In the latter case, you" - echo "*** may want to edit the gtk-config script: $GTK_CONFIG" ]) - CFLAGS="$ac_save_CFLAGS" - LIBS="$ac_save_LIBS" - fi - fi - GTK_CFLAGS="" - GTK_LIBS="" - ifelse([$3], , :, [$3]) - fi - AC_SUBST(GTK_CFLAGS) - AC_SUBST(GTK_LIBS) - rm -f conf.gtktest -]) diff --git a/BasiliskII/src/Unix/mkinstalldirs b/BasiliskII/src/Unix/mkinstalldirs deleted file mode 100755 index 8ab885ec9..000000000 --- a/BasiliskII/src/Unix/mkinstalldirs +++ /dev/null @@ -1,99 +0,0 @@ -#! /bin/sh -# mkinstalldirs --- make directory hierarchy -# Author: Noah Friedman -# Created: 1993-05-16 -# Public domain - -errstatus=0 -dirmode="" - -usage="\ -Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..." - -# process command line arguments -while test $# -gt 0 ; do - case "${1}" in - -h | --help | --h* ) # -h for help - echo "${usage}" 1>&2; exit 0 ;; - -m ) # -m PERM arg - shift - test $# -eq 0 && { echo "${usage}" 1>&2; exit 1; } - dirmode="${1}" - shift ;; - -- ) shift; break ;; # stop option processing - -* ) echo "${usage}" 1>&2; exit 1 ;; # unknown option - * ) break ;; # first non-opt arg - esac -done - -for file -do - if test -d "$file"; then - shift - else - break - fi -done - -case $# in -0) exit 0 ;; -esac - -case $dirmode in -'') - if mkdir -p -- . 2>/dev/null; then - echo "mkdir -p -- $*" - exec mkdir -p -- "$@" - fi ;; -*) - if mkdir -m "$dirmode" -p -- . 2>/dev/null; then - echo "mkdir -m $dirmode -p -- $*" - exec mkdir -m "$dirmode" -p -- "$@" - fi ;; -esac - -for file -do - set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` - shift - - pathcomp= - for d - do - pathcomp="$pathcomp$d" - case "$pathcomp" in - -* ) pathcomp=./$pathcomp ;; - esac - - if test ! -d "$pathcomp"; then - echo "mkdir $pathcomp" - - mkdir "$pathcomp" || lasterr=$? - - if test ! -d "$pathcomp"; then - errstatus=$lasterr - else - if test ! -z "$dirmode"; then - echo "chmod $dirmode $pathcomp" - - lasterr="" - chmod "$dirmode" "$pathcomp" || lasterr=$? - - if test ! -z "$lasterr"; then - errstatus=$lasterr - fi - fi - fi - fi - - pathcomp="$pathcomp/" - done -done - -exit $errstatus - -# Local Variables: -# mode: shell-script -# sh-indentation: 3 -# End: -# mkinstalldirs ends here diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 285b5e63e..8dd77b1d5 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -21,17 +21,449 @@ #ifndef SYSDEPS_H #define SYSDEPS_H -#ifndef __STDC__ -#error "Your compiler is not ANSI. Get a real one." + + + +#if 1 +//Too lazy to port the checks to cmake right now +/* config.h. Generated from config.h.in by configure. */ +/* config.h.in. Generated from configure.ac by autoheader. */ + +/* Define if building universal (internal helper macro) */ +/* #undef AC_APPLE_UNIVERSAL_BUILD */ + +/* Define if your system supports TUN/TAP devices. */ +/* #undef ENABLE_TUNTAP */ + +/* Define if using video enabled on SEGV signals. */ +#define ENABLE_VOSF 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_ARPA_INET_H 1 + +/* Define if your system has header. */ +/* #undef HAVE_ASM_UCONTEXT */ + +/* Define to 1 if you have the `atanh' function. */ +#define HAVE_ATANH 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_AVAILABILITYMACROS_H 1 + +/* Define to 1 if the system has the type `caddr_t'. */ +#define HAVE_CADDR_T 1 + +/* Define to 1 if you have the `cfmakeraw' function. */ +#define HAVE_CFMAKERAW 1 + +/* Define to 1 if you have the `clock_gettime' function. */ +#define HAVE_CLOCK_GETTIME 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FCNTL_H 1 + +/* Define to 1 if you have the `finite' function. */ +#define HAVE_FINITE 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_FLOATINGPOINT_H */ + +/* Define if framework AppKit is available. */ +#define HAVE_FRAMEWORK_APPKIT 1 + +/* Define if framework Carbon is available. */ +#define HAVE_FRAMEWORK_CARBON 1 + +/* Define if framework CoreFoundation is available. */ +#define HAVE_FRAMEWORK_COREFOUNDATION 1 + +/* Define if framework IOKit is available. */ +#define HAVE_FRAMEWORK_IOKIT 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_HISTORY_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_IEEE754_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_IEEEFP_H */ + +/* Define to 1 if you have the `inet_aton' function. */ +#define HAVE_INET_ATON 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_INTTYPES_H 1 + +/* Define to 1 if you have the header + file. */ +#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 + +/* Define to 1 if you have the `isinf' function. */ +#define HAVE_ISINF 1 + +/* Define to 1 if you have the `isnan' function. */ +#define HAVE_ISNAN 1 + +/* Define to 1 if you have the `isnormal' function. */ +/* #undef HAVE_ISNORMAL */ + +/* Define to 1 if you have the `m' library (-lm). */ +#define HAVE_LIBM 1 + +/* Define to 1 if you have the `posix4' library (-lposix4). */ +/* #undef HAVE_LIBPOSIX4 */ + +/* Define to 1 if you have the `pthread' library (-lpthread). */ +#define HAVE_LIBPTHREAD 1 + +/* Define to 1 if you have the `PTL' library (-lPTL). */ +/* #undef HAVE_LIBPTL */ + +/* Define to 1 if you have the `rt' library (-lrt). */ +/* #undef HAVE_LIBRT */ + +/* Define if there is a linker script to relocate the executable above + 0x70000000. */ +/* #undef HAVE_LINKER_SCRIPT */ + +/* Define to 1 if the system has the type `loff_t'. */ +/* #undef HAVE_LOFF_T */ + +/* Define if your system supports Mach exceptions. */ +#define HAVE_MACH_EXCEPTIONS 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_MACH_H 1 + +/* Define to 1 if you have the `mach_task_self' function. */ +#define HAVE_MACH_TASK_SELF 1 + +/* Define if your system has a working vm_allocate()-based memory allocator. + */ +#define HAVE_MACH_VM 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MEMORY_H 1 + +/* Define to 1 if you have the `mmap' function. */ +#define HAVE_MMAP 1 + +/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. + */ +/* #undef HAVE_MMAP_ANON */ + +/* Define if defines MAP_ANONYMOUS and mmap()'ing with + MAP_ANONYMOUS works. */ +/* #undef HAVE_MMAP_ANONYMOUS */ + +/* Define if your system has a working mmap()-based memory allocator. */ +/* #undef HAVE_MMAP_VM */ + +/* Define to 1 if you have the `mprotect' function. */ +#define HAVE_MPROTECT 1 + +/* Define to 1 if you have the `munmap' function. */ +#define HAVE_MUNMAP 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_NAN_H */ + +/* Define to 1 if you have the `poll' function. */ +#define HAVE_POLL 1 + +/* Define if pthreads are available. */ +#define HAVE_PTHREADS 1 + +/* Define to 1 if you have the `pthread_cancel' function. */ +#define HAVE_PTHREAD_CANCEL 1 + +/* Define to 1 if you have the `pthread_cond_init' function. */ +#define HAVE_PTHREAD_COND_INIT 1 + +/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 + +/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 + +/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 + +/* Define to 1 if you have the `pthread_testcancel' function. */ +#define HAVE_PTHREAD_TESTCANCEL 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_READLINE_HISTORY_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_READLINE_READLINE_H 1 + +/* Define to 1 if you have the `sem_init' function. */ +#define HAVE_SEM_INIT 1 + +/* Define to 1 if you have the `sigaction' function. */ +#define HAVE_SIGACTION 1 + +/* Define if we know a hack to replace siginfo_t->si_addr member. */ +/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ + +/* Define if your system supports extended signals. */ +/* #undef HAVE_SIGINFO_T */ + +/* Define to 1 if you have the `signal' function. */ +#define HAVE_SIGNAL 1 + +/* Define to 1 if you have the `signbit' function. */ +/* #undef HAVE_SIGNBIT */ + +/* Define if we can ignore the fault (instruction skipping in SIGSEGV + handler). */ +#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDINT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDLIB_H 1 + +/* Define to 1 if you have the `strdup' function. */ +#define HAVE_STRDUP 1 + +/* Define to 1 if you have the `strerror' function. */ +#define HAVE_STRERROR 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRINGS_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRING_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STROPTS_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BITYPES_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_FILIO_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_IOCTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_MMAN_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_POLL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SELECT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SOCKET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_STAT_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_STROPTS_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TIME_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TYPES_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_WAIT_H 1 + +/* Define to 1 if you have the `task_self' function. */ +/* #undef HAVE_TASK_SELF */ + +/* Define to 1 if you have the `timer_create' function. */ +/* #undef HAVE_TIMER_CREATE */ + +/* Define to 1 if you have the header file. */ +#define HAVE_UNISTD_H 1 + +/* Define to 1 if you have the `vm_allocate' function. */ +#define HAVE_VM_ALLOCATE 1 + +/* Define to 1 if you have the `vm_deallocate' function. */ +#define HAVE_VM_DEALLOCATE 1 + +/* Define to 1 if you have the `vm_protect' function. */ +#define HAVE_VM_PROTECT 1 + +/* Define to 1 if your C compiler doesn't accept -c and -o together. */ +/* #undef NO_MINUS_C_MINUS_O */ + +/* Define this program name. */ +#define PACKAGE "Basilisk II" + +/* Define to the address where bug reports for this package should be sent. */ +#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" + +/* Define to the full name of this package. */ +#define PACKAGE_NAME "Basilisk II" + +/* Define to the full name and version of this package. */ +#define PACKAGE_STRING "Basilisk II 1.0" + +/* Define to the one symbol short name of this package. */ +#define PACKAGE_TARNAME "BasiliskII" + +/* Define to the home page for this package. */ +#define PACKAGE_URL "" + +/* Define to the version of this package. */ +#define PACKAGE_VERSION "1.0" + +/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this + system. */ +/* #undef PAGEZERO_HACK */ + +/* Define as the return type of signal handlers (`int' or `void'). */ +#define RETSIGTYPE void + +/* Define if your system requires sigactions to be reinstalled. */ +/* #undef SIGACTION_NEED_REINSTALL */ + +/* Define if your system requires signals to be reinstalled. */ +/* #undef SIGNAL_NEED_REINSTALL */ + +/* The size of `double', as computed by sizeof. */ +#define SIZEOF_DOUBLE 8 + +/* The size of `float', as computed by sizeof. */ +#define SIZEOF_FLOAT 4 + +/* The size of `int', as computed by sizeof. */ +#define SIZEOF_INT 4 + +/* The size of `long', as computed by sizeof. */ +#define SIZEOF_LONG 8 + +/* The size of `long double', as computed by sizeof. */ +#define SIZEOF_LONG_DOUBLE 16 + +/* The size of `long long', as computed by sizeof. */ +#define SIZEOF_LONG_LONG 8 + +/* The size of `short', as computed by sizeof. */ +#define SIZEOF_SHORT 2 + +/* The size of `void *', as computed by sizeof. */ +#define SIZEOF_VOID_P 8 + +/* Define to 1 if you have the ANSI C header files. */ +#define STDC_HEADERS 1 + +/* Define to 1 if you can safely include both and . */ +#define TIME_WITH_SYS_TIME 1 + +/* Define to 1 if your declares `struct tm'. */ +/* #undef TM_IN_SYS_TIME */ + +/* Define if BSD-style non-blocking I/O is to be used */ +/* #undef USE_FIONBIO */ + +/* Define to enble SDL support */ +#define USE_SDL 1 + +/* Define to enable SDL audio support */ +#define USE_SDL_AUDIO 1 + +/* Define to enable SDL video graphics support */ +#define USE_SDL_VIDEO 1 + +/* Enable extensions on AIX 3, Interix. */ +#ifndef _ALL_SOURCE +# define _ALL_SOURCE 1 +#endif +/* Enable GNU extensions on systems that have them. */ +#ifndef _GNU_SOURCE +# define _GNU_SOURCE 1 +#endif +/* Enable threading extensions on Solaris. */ +#ifndef _POSIX_PTHREAD_SEMANTICS +# define _POSIX_PTHREAD_SEMANTICS 1 +#endif +/* Enable extensions on HP NonStop. */ +#ifndef _TANDEM_SOURCE +# define _TANDEM_SOURCE 1 +#endif +/* Enable general extensions on Solaris. */ +#ifndef __EXTENSIONS__ +# define __EXTENSIONS__ 1 #endif -#include "config.h" -#include "user_strings_unix.h" -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." +/* Define this program version. */ +#define VERSION "1.0" + +/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most + significant byte first (like Motorola and SPARC, unlike Intel). */ +#if defined AC_APPLE_UNIVERSAL_BUILD +# if defined __BIG_ENDIAN__ +# define WORDS_BIGENDIAN 1 +# endif +#else +# ifndef WORDS_BIGENDIAN +/* # undef WORDS_BIGENDIAN */ +# endif +#endif + +/* Enable large inode numbers on Mac OS X 10.5. */ +#ifndef _DARWIN_USE_64_BIT_INODE +# define _DARWIN_USE_64_BIT_INODE 1 #endif +/* Number of bits in a file offset, on hosts where this is settable. */ +/* #undef _FILE_OFFSET_BITS */ + +/* Define for large files, on AIX-style hosts. */ +/* #undef _LARGE_FILES */ + +/* Define to 1 if on MINIX. */ +/* #undef _MINIX */ + +/* Define to 2 if the system does not provide POSIX.1 features except with + this defined. */ +/* #undef _POSIX_1_SOURCE */ + +/* Define to 1 if you need to in order for `stat' and other things to work. */ +/* #undef _POSIX_SOURCE */ + +/* Define to empty if `const' does not conform to ANSI C. */ +/* #undef const */ + +/* Define to `__inline__' or `__inline' if that's what the C compiler + calls it, or to nothing if 'inline' is not supported under any name. */ +#ifndef __cplusplus +/* #undef inline */ +#endif + +/* Define to `long int' if does not define. */ +/* #undef off_t */ + +/* Define to `unsigned int' if does not define. */ +/* #undef size_t */ + +/* Define to 'int' if doesn't define. */ +/* #undef socklen_t */ +#else +#include "config.h" +#endif +//Checks end +#ifndef NEED_CONFIG_H_ONLY + +#include "user_strings_unix.h" + #ifdef HAVE_UNISTD_H # include # include @@ -42,6 +474,7 @@ #include #include #include +#include #ifdef HAVE_PTHREADS # include @@ -96,54 +529,21 @@ /* Data types */ -typedef unsigned char uint8; -typedef signed char int8; -#if SIZEOF_SHORT == 2 -typedef unsigned short uint16; -typedef short int16; -#elif SIZEOF_INT == 2 -typedef unsigned int uint16; -typedef int int16; -#else -#error "No 2 byte type, you lose." -#endif -#if SIZEOF_INT == 4 -typedef unsigned int uint32; -typedef int int32; -#elif SIZEOF_LONG == 4 -typedef unsigned long uint32; -typedef long int32; -#else -#error "No 4 byte type, you lose." -#endif -#if SIZEOF_LONG == 8 -#ifndef _UINT64 -typedef unsigned long uint64; -#define _UINT64 -#endif -typedef long int64; -#define VAL64(a) (a ## l) -#define UVAL64(a) (a ## ul) -#elif SIZEOF_LONG_LONG == 8 +typedef uint8_t uint8; +typedef int8_t int8; +typedef uint16_t uint16; +typedef int16_t int16; +typedef uint32_t uint32; +typedef int32_t int32; +typedef uint64_t uint64; +typedef int64_t int64; #ifndef _UINT64 -typedef unsigned long long uint64; #define _UINT64 #endif -typedef long long int64; #define VAL64(a) (a ## LL) #define UVAL64(a) (a ## uLL) -#else -#error "No 8 byte type, you lose." -#endif -#if SIZEOF_VOID_P == 4 -typedef uint32 uintptr; -typedef int32 intptr; -#elif SIZEOF_VOID_P == 8 -typedef uint64 uintptr; -typedef int64 intptr; -#else -#error "Unsupported size of pointer" -#endif +typedef uintptr_t uintptr; +typedef intptr_t intptr; #ifndef HAVE_LOFF_T typedef off_t loff_t; @@ -231,44 +631,6 @@ void Set_pthread_attr(pthread_attr_t *attr, int priority); #endif /* UAE CPU defines */ -#ifdef WORDS_BIGENDIAN - -#ifdef CPU_CAN_ACCESS_UNALIGNED - -/* Big-endian CPUs which can do unaligned accesses */ -static inline uae_u32 do_get_mem_long(uae_u32 *a) {return *a;} -static inline uae_u32 do_get_mem_word(uae_u16 *a) {return *a;} -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {*a = v;} -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {*a = v;} - -#else /* CPU_CAN_ACCESS_UNALIGNED */ - -#ifdef sgi -/* The SGI MIPSPro compilers can do unaligned accesses given enough hints. - * They will automatically inline these routines. */ -#ifdef __cplusplus -extern "C" { /* only the C compiler does unaligned accesses */ -#endif -extern uae_u32 do_get_mem_long(uae_u32 *a); -extern uae_u32 do_get_mem_word(uae_u16 *a); -extern void do_put_mem_long(uae_u32 *a, uae_u32 v); -extern void do_put_mem_word(uae_u16 *a, uae_u32 v); -#ifdef __cplusplus -} -#endif - -#else /* sgi */ - -/* Big-endian CPUs which can not do unaligned accesses (this is not the most efficient way to do this...) */ -static inline uae_u32 do_get_mem_long(uae_u32 *a) {uint8 *b = (uint8 *)a; return (b[0] << 24) | (b[1] << 16) | (b[2] << 8) | b[3];} -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint8 *b = (uint8 *)a; return (b[0] << 8) | b[1];} -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {uint8 *b = (uint8 *)a; b[0] = v >> 24; b[1] = v >> 16; b[2] = v >> 8; b[3] = v;} -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {uint8 *b = (uint8 *)a; b[0] = v >> 8; b[1] = v;} -#endif /* sgi */ - -#endif /* CPU_CAN_ACCESS_UNALIGNED */ - -#else /* WORDS_BIGENDIAN */ #if defined(__i386__) || defined(__x86_64__) @@ -316,8 +678,6 @@ static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {uint8 *b = (uint8 *)a #endif /* CPU_CAN_ACCESS_UNALIGNED */ -#endif /* WORDS_BIGENDIAN */ - #ifndef HAVE_OPTIMIZED_BYTESWAP_32 static inline uae_u32 do_byteswap_32(uae_u32 v) { return (((v >> 24) & 0xff) | ((v >> 8) & 0xff00) | ((v & 0xff) << 24) | ((v & 0xff00) << 8)); } @@ -352,4 +712,6 @@ static inline uae_u32 do_byteswap_16(uae_u32 v) #endif #define REGPARAM2 +#endif /* NEED_CONFIG_H_ONLY */ + #endif diff --git a/BasiliskII/src/Unix/tunconfig b/BasiliskII/src/Unix/tunconfig deleted file mode 100755 index c2ec8fb32..000000000 --- a/BasiliskII/src/Unix/tunconfig +++ /dev/null @@ -1,102 +0,0 @@ -#!/bin/bash -########################################################################### -# Configuration of the tunN devices for usage with Basilisk II. -# (derived MOL tunconfig script) -# -# This script should be named /usr/share/BasiliskII/tunconfig (unless -# the default name has been changed with the 'etherconfig' keyword). -# -# Usage: tunconfig iface up|down -# -# If the linux box is configured as a firewall, the rules below might -# need some adjustments. -# -# The IP Tunnel driver requires IP forwarding to be enabled. Run as root: -# -# echo 1 >/proc/sys/net/ipv4/ip_forward -# -########################################################################### - -SUDO=/usr/bin/sudo -IFCONFIG=/sbin/ifconfig -IPTABLES=/sbin/iptables - -######################################################### - -[[ "x$1" = "x-n" ]] && { - DONT_EXECUTE=yes - shift 1 -} - -TUN_DEV=$1 -ACTION=$2 - -TUN_NUM=`echo $TUN_DEV | sed s/[^0-9]//g` -NET_NUM=`expr 40 + $TUN_NUM` -TUN_NET=172.20.$NET_NUM.0/24 -TUN_HOST=172.20.$NET_NUM.1 - -######################################################### -# Misc Checks -######################################################### - -[[ $# = 2 ]] || { - echo "Usage: tunconfig [-n] iface up|down" - exit 2 -} - -[[ "`id -u`" = "0" ]] && { - echo "---> $SUDO not necessary." 1>&2 - SUDO="" -} - -[[ -x $IPTABLES ]] || { - echo "---> $IPTABLES not found." 1>&2 - exit 1 -} - -if [ -n "$SUDO" ]; then - $SUDO -l | grep -q "NOPASSWD: $IFCONFIG" || { - echo "---> Missing sudo NOPASSWD: $IFCONFIG." 1>&2 - exit 1 - } - $SUDO -l | grep -q "NOPASSWD: $IPTABLES" || { - echo "---> Missing sudo NOPASSWD: $IPTABLES." 1>&2 - exit 1 - } - IFCONFIG="$SUDO $IFCONFIG" - IPTABLES="$SUDO $IPTABLES" -fi - -[[ "x$DONT_EXECUTE" = "xyes" ]] && exit 0 - -$IPTABLES -L -n -t nat > /dev/null || exit 1 - -######################################################### -# Remove old (possibly stale) ruleset -######################################################### - -{ - $IPTABLES -t nat -D POSTROUTING -s $TUN_NET -d ! $TUN_NET -j MASQUERADE -} >& /dev/null - -######################################################### -# Bring down interface -######################################################### - -[[ "$ACTION" = down ]] && { - $IFCONFIG $TUN_DEV down -} - -######################################################### -# Configure interface -######################################################### - -[[ "$ACTION" = up ]] && { - $IFCONFIG $TUN_DEV $TUN_HOST - - # masquerade the tun network - $IPTABLES -t nat -A POSTROUTING -s $TUN_NET -d ! $TUN_NET -j MASQUERADE -} - -exit 0 diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h index c0a641925..5f7080483 100644 --- a/BasiliskII/src/uae_cpu/fpu/types.h +++ b/BasiliskII/src/uae_cpu/fpu/types.h @@ -41,22 +41,10 @@ #if defined(FPU_UAE) /* 4-byte floats */ -#if SIZEOF_FLOAT == 4 typedef float uae_f32; -#elif SIZEOF_DOUBLE == 4 -typedef double uae_f32; -#else -#error "No 4 byte float type, you lose." -#endif /* 8-byte floats */ -#if SIZEOF_DOUBLE == 8 typedef double uae_f64; -#elif SIZEOF_LONG_DOUBLE == 8 -typedef long double uae_f64; -#else -#error "No 8 byte float type, you lose." -#endif /* Original UAE FPU registers are only 8 bytes long */ typedef uae_f64 fpu_register; @@ -71,22 +59,10 @@ typedef uae_f32 fpu_single; #elif defined(FPU_X86) /* 4-byte floats */ -#if SIZEOF_FLOAT == 4 typedef float uae_f32; -#elif SIZEOF_DOUBLE == 4 -typedef double uae_f32; -#else -#error "No 4 byte float type, you lose." -#endif /* 8-byte floats */ -#if SIZEOF_DOUBLE == 8 -typedef float uae_f64; -#elif SIZEOF_LONG_DOUBLE == 8 typedef double uae_f64; -#else -#error "No 8 byte float type, you lose." -#endif /* At least 10-byte floats are required */ #if SIZEOF_LONG_DOUBLE >= 10 From 023251dee1fcd948b1d78640474cc9d74f03ae45 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 15 Apr 2018 16:00:38 -0500 Subject: [PATCH 206/534] Get rid of cxmon and SheepShaver (focus is on BasiliskII) --- SheepShaver/COPYING | 340 - SheepShaver/Makefile | 104 - SheepShaver/NEWS | 105 - SheepShaver/doc/BeOS/acknowledgements.html | 24 - SheepShaver/doc/BeOS/contact.html | 47 - SheepShaver/doc/BeOS/graphics.gif | Bin 8854 -> 0 bytes SheepShaver/doc/BeOS/history.html | 59 - SheepShaver/doc/BeOS/icon.gif | Bin 2011 -> 0 bytes SheepShaver/doc/BeOS/iconsmall.gif | Bin 1297 -> 0 bytes SheepShaver/doc/BeOS/index.html | 28 - SheepShaver/doc/BeOS/installation.html | 25 - SheepShaver/doc/BeOS/introduction.html | 45 - SheepShaver/doc/BeOS/memory.gif | Bin 5510 -> 0 bytes SheepShaver/doc/BeOS/quickstart.html | 38 - SheepShaver/doc/BeOS/serial.gif | Bin 4844 -> 0 bytes SheepShaver/doc/BeOS/settings.html | 127 - SheepShaver/doc/BeOS/troubleshooting.html | 79 - SheepShaver/doc/BeOS/using.html | 76 - SheepShaver/doc/BeOS/volumes.gif | Bin 7456 -> 0 bytes SheepShaver/doc/Linux/acknowledgements.html | 24 - SheepShaver/doc/Linux/contact.html | 47 - SheepShaver/doc/Linux/graphics.gif | Bin 5480 -> 0 bytes SheepShaver/doc/Linux/history.html | 25 - SheepShaver/doc/Linux/icon.gif | Bin 2011 -> 0 bytes SheepShaver/doc/Linux/iconsmall.gif | Bin 1297 -> 0 bytes SheepShaver/doc/Linux/index.html | 28 - SheepShaver/doc/Linux/installation.html | 25 - SheepShaver/doc/Linux/introduction.html | 44 - SheepShaver/doc/Linux/memory.gif | Bin 5697 -> 0 bytes SheepShaver/doc/Linux/quickstart.html | 39 - SheepShaver/doc/Linux/serial.gif | Bin 5325 -> 0 bytes SheepShaver/doc/Linux/settings.html | 117 - SheepShaver/doc/Linux/troubleshooting.html | 65 - SheepShaver/doc/Linux/using.html | 113 - SheepShaver/doc/Linux/volumes.gif | Bin 7705 -> 0 bytes SheepShaver/doc/PowerPC-Testsuite.txt | 28 - .../src/BeOS/CreatePCIDrivers/Ethernet.cpp | 256 - .../src/BeOS/CreatePCIDrivers/Makefile | 25 - .../src/BeOS/CreatePCIDrivers/Video.cpp | 78 - .../src/BeOS/CreatePCIDrivers/hexconv.cpp | 34 - SheepShaver/src/BeOS/Makefile | 117 - SheepShaver/src/BeOS/NetPeek/Makefile | 110 - SheepShaver/src/BeOS/NetPeek/NetPeek.cpp | 49 - SheepShaver/src/BeOS/SaveROM/Makefile | 110 - SheepShaver/src/BeOS/SaveROM/README | 8 - SheepShaver/src/BeOS/SaveROM/SaveROM.cpp | 128 - SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc | Bin 4323 -> 0 bytes SheepShaver/src/BeOS/SheepDriver | 1 - SheepShaver/src/BeOS/SheepNet | 1 - SheepShaver/src/BeOS/SheepShaver.rsrc | Bin 4247 -> 0 bytes SheepShaver/src/BeOS/about_window_beos.cpp | 289 - SheepShaver/src/BeOS/audio_beos.cpp | 1 - SheepShaver/src/BeOS/clip_beos.cpp | 374 -- SheepShaver/src/BeOS/ether_beos.cpp | 400 -- SheepShaver/src/BeOS/extfs_beos.cpp | 1 - SheepShaver/src/BeOS/main_beos.cpp | 2015 ------ SheepShaver/src/BeOS/prefs_beos.cpp | 112 - SheepShaver/src/BeOS/prefs_editor_beos.cpp | 877 --- SheepShaver/src/BeOS/scsi_beos.cpp | 1 - SheepShaver/src/BeOS/serial_beos.cpp | 1 - SheepShaver/src/BeOS/sys_beos.cpp | 1 - SheepShaver/src/BeOS/sysdeps.h | 74 - SheepShaver/src/BeOS/timer_beos.cpp | 1 - SheepShaver/src/BeOS/user_strings_beos.cpp | 73 - SheepShaver/src/BeOS/user_strings_beos.h | 37 - SheepShaver/src/BeOS/video_beos.cpp | 787 --- SheepShaver/src/BeOS/video_screen.h | 262 - SheepShaver/src/BeOS/video_window.h | 523 -- SheepShaver/src/BeOS/xpram_beos.cpp | 1 - SheepShaver/src/CrossPlatform/sigsegv.cpp | 1 - SheepShaver/src/CrossPlatform/sigsegv.h | 1 - SheepShaver/src/CrossPlatform/video_blit.cpp | 1 - SheepShaver/src/CrossPlatform/video_blit.h | 1 - SheepShaver/src/CrossPlatform/video_vosf.h | 1 - SheepShaver/src/CrossPlatform/vm_alloc.cpp | 1 - SheepShaver/src/CrossPlatform/vm_alloc.h | 1 - .../src/EthernetDriver/.finf/Ethernet.mcp | Bin 32 -> 0 bytes .../src/EthernetDriver/.finf/ethernet.ndrv | Bin 32 -> 0 bytes .../src/EthernetDriver/.rsrc/ethernet.ndrv | Bin 398 -> 0 bytes .../Ethernet Data/.finf/CWSettingsMacOS.stg | Bin 32 -> 0 bytes .../.finf/PPC Debug MacOS Toolbox | Bin 32 -> 0 bytes .../.finf/PPC Final MacOS Toolbox | Bin 32 -> 0 bytes .../Ethernet Data/CWSettingsMacOS.stg | Bin 4344 -> 0 bytes .../.finf/TargetDataMacOS.tdt | Bin 32 -> 0 bytes .../.rsrc/TargetDataMacOS.tdt | Bin 286 -> 0 bytes .../TargetDataMacOS.tdt | Bin 46180 -> 0 bytes .../.finf/TargetDataMacOS.tdt | Bin 32 -> 0 bytes .../.rsrc/TargetDataMacOS.tdt | Bin 286 -> 0 bytes .../TargetDataMacOS.tdt | Bin 46304 -> 0 bytes SheepShaver/src/EthernetDriver/Ethernet.cpp | 308 - SheepShaver/src/EthernetDriver/Ethernet.mcp | Bin 103293 -> 0 bytes .../src/EthernetDriver/cpu_emulation.h | 1 - SheepShaver/src/EthernetDriver/debug.h | 1 - SheepShaver/src/EthernetDriver/ether.cpp | 1738 ------ SheepShaver/src/EthernetDriver/ether.h | 113 - SheepShaver/src/EthernetDriver/ether_defs.h | 552 -- SheepShaver/src/EthernetDriver/ethernet.ndrv | Bin 11780 -> 0 bytes SheepShaver/src/EthernetDriver/macos_util.cpp | 1 - SheepShaver/src/EthernetDriver/macos_util.h | 1 - SheepShaver/src/EthernetDriver/sysdeps.h | 1 - SheepShaver/src/EthernetDriver/xlowmem.h | 64 - SheepShaver/src/EthernetDriverFull.i | 737 --- SheepShaver/src/EthernetDriverStub.i | 43 - SheepShaver/src/MacOSX/.gitignore | 7 - SheepShaver/src/MacOSX/AudioBackEnd.cpp | 1 - SheepShaver/src/MacOSX/AudioBackEnd.h | 1 - SheepShaver/src/MacOSX/AudioDevice.cpp | 1 - SheepShaver/src/MacOSX/AudioDevice.h | 1 - SheepShaver/src/MacOSX/Info.plist.in | 56 - .../src/MacOSX/Launcher/AppController.h | 30 - .../src/MacOSX/Launcher/AppController.mm | 44 - SheepShaver/src/MacOSX/Launcher/DiskType.h | 23 - SheepShaver/src/MacOSX/Launcher/DiskType.m | 35 - .../Launcher/English.lproj/InfoPlist.strings | Bin 276 -> 0 bytes .../English.lproj/MainMenu.nib/classes.nib | 32 - .../English.lproj/MainMenu.nib/info.nib | 18 - .../MainMenu.nib/keyedobjects.nib | Bin 12048 -> 0 bytes .../VMListWindow.nib/designable.nib | 713 --- .../VMListWindow.nib/keyedobjects.nib | Bin 8475 -> 0 bytes .../VMSettingsWindow.nib/designable.nib | 4438 ------------- .../VMSettingsWindow.nib/keyedobjects.nib | Bin 43067 -> 0 bytes SheepShaver/src/MacOSX/Launcher/Info.plist | 28 - .../src/MacOSX/Launcher/LauncherPrefix.h | 42 - .../project.pbxproj | 399 -- .../src/MacOSX/Launcher/VMListController.h | 49 - .../src/MacOSX/Launcher/VMListController.mm | 390 -- .../MacOSX/Launcher/VMSettingsController.h | 87 - .../MacOSX/Launcher/VMSettingsController.mm | 480 -- SheepShaver/src/MacOSX/Launcher/main.m | 26 - SheepShaver/src/MacOSX/MacOSX_sound_if.cpp | 1 - SheepShaver/src/MacOSX/MacOSX_sound_if.h | 1 - .../English.lproj/InfoPlist.strings | Bin 216 -> 0 bytes .../English.lproj/MainMenu.nib/classes.nib | 50 - .../English.lproj/MainMenu.nib/info.nib | 23 - .../MainMenu.nib/keyedobjects.nib | Bin 39269 -> 0 bytes SheepShaver/src/MacOSX/PrefsEditor/Info.plist | 28 - .../src/MacOSX/PrefsEditor/PrefsEditor.h | 70 - .../src/MacOSX/PrefsEditor/PrefsEditor.mm | 347 -- .../project.pbxproj | 309 - SheepShaver/src/MacOSX/PrefsEditor/main.m | 26 - .../English.lproj/InfoPlist.strings | Bin 90 -> 0 bytes .../English.lproj/MainMenu.nib/classes.nib | 103 - .../English.lproj/MainMenu.nib/info.nib | 16 - .../MainMenu.nib/keyedobjects.nib | Bin 31674 -> 0 bytes SheepShaver/src/MacOSX/SheepShaver.icns | Bin 59840 -> 0 bytes .../SheepShaver.xcodeproj/project.pbxproj | 2445 -------- SheepShaver/src/MacOSX/XcodeBuildHowTo.txt | 26 - SheepShaver/src/MacOSX/audio_macosx.cpp | 1 - SheepShaver/src/MacOSX/autorelease.h | 1 - SheepShaver/src/MacOSX/clip_macosx.cpp | 1 - SheepShaver/src/MacOSX/clip_macosx64.mm | 1 - .../src/MacOSX/config/config-macosx-ppc_32.h | 513 -- .../src/MacOSX/config/config-macosx-x86_32.h | 527 -- .../src/MacOSX/config/config-macosx-x86_64.h | 527 -- SheepShaver/src/MacOSX/config/config.h | 9 - SheepShaver/src/MacOSX/extfs_macosx.cpp | 1 - SheepShaver/src/MacOSX/macos_util_macosx.h | 1 - SheepShaver/src/MacOSX/prefs_macosx.mm | 131 - SheepShaver/src/MacOSX/sys_darwin.cpp | 1 - SheepShaver/src/MacOSX/utils_macosx.h | 1 - SheepShaver/src/MacOSX/utils_macosx.mm | 1 - SheepShaver/src/SDL | 1 - SheepShaver/src/Unix/.gitignore | 25 - SheepShaver/src/Unix/Darwin/.gitignore | 3 - SheepShaver/src/Unix/Darwin/lowmem.c | 1 - SheepShaver/src/Unix/Darwin/mkstandalone | 1 - SheepShaver/src/Unix/Darwin/pagezero.c | 1 - SheepShaver/src/Unix/Darwin/testlmem.sh | 1 - SheepShaver/src/Unix/Irix/audio_irix.cpp | 1 - SheepShaver/src/Unix/Linux/NetDriver | 1 - SheepShaver/src/Unix/Linux/scsi_linux.cpp | 1 - SheepShaver/src/Unix/Linux/sheepthreads.c | 445 -- SheepShaver/src/Unix/Makefile.in | 260 - SheepShaver/src/Unix/NetBSD/sheepthreads.c | 462 -- SheepShaver/src/Unix/SheepShaver.1 | 29 - SheepShaver/src/Unix/about_window_unix.cpp | 30 - SheepShaver/src/Unix/audio_oss_esd.cpp | 1 - SheepShaver/src/Unix/autogen.sh | 61 - SheepShaver/src/Unix/bincue_unix.cpp | 1 - SheepShaver/src/Unix/bincue_unix.h | 1 - SheepShaver/src/Unix/clip_unix.cpp | 1 - SheepShaver/src/Unix/config.guess | 1 - SheepShaver/src/Unix/config.sub | 1 - SheepShaver/src/Unix/configure.ac | 1687 ----- SheepShaver/src/Unix/cpr.sh | 1 - SheepShaver/src/Unix/disk_sparsebundle.cpp | 1 - SheepShaver/src/Unix/disk_unix.h | 1 - SheepShaver/src/Unix/ether_unix.cpp | 1 - SheepShaver/src/Unix/extfs_unix.cpp | 1 - SheepShaver/src/Unix/install-sh | 238 - SheepShaver/src/Unix/keycodes | 1 - SheepShaver/src/Unix/ldscripts | 1 - SheepShaver/src/Unix/m4 | 1 - SheepShaver/src/Unix/main_unix.cpp | 2292 ------- SheepShaver/src/Unix/mkinstalldirs | 40 - SheepShaver/src/Unix/paranoia.cpp | 346 -- SheepShaver/src/Unix/posix_sem.cpp | 1 - SheepShaver/src/Unix/ppc_asm.S | 932 --- SheepShaver/src/Unix/ppc_asm.tmpl | 156 - SheepShaver/src/Unix/prefs_editor_gtk.cpp | 1594 ----- SheepShaver/src/Unix/prefs_unix.cpp | 140 - SheepShaver/src/Unix/rpc.h | 1 - SheepShaver/src/Unix/rpc_unix.cpp | 1 - SheepShaver/src/Unix/semaphore.h | 1 - SheepShaver/src/Unix/serial_unix.cpp | 1 - SheepShaver/src/Unix/sigregs.h | 128 - SheepShaver/src/Unix/sshpty.c | 1 - SheepShaver/src/Unix/sshpty.h | 1 - SheepShaver/src/Unix/strlcpy.c | 1 - SheepShaver/src/Unix/strlcpy.h | 1 - SheepShaver/src/Unix/sys_unix.cpp | 1 - SheepShaver/src/Unix/sysdeps.h | 491 -- SheepShaver/src/Unix/timer_unix.cpp | 1 - SheepShaver/src/Unix/tinyxml2.cpp | 1 - SheepShaver/src/Unix/tinyxml2.h | 1 - SheepShaver/src/Unix/tunconfig | 1 - SheepShaver/src/Unix/user_strings_unix.cpp | 117 - SheepShaver/src/Unix/user_strings_unix.h | 86 - SheepShaver/src/Unix/vhd_unix.cpp | 1 - SheepShaver/src/Unix/video_x.cpp | 2584 -------- SheepShaver/src/Unix/xpram_unix.cpp | 1 - SheepShaver/src/VideoDriverStub.i | 24 - SheepShaver/src/Windows/Makefile.in | 221 - SheepShaver/src/Windows/SheepShaver.ico | Bin 2238 -> 0 bytes SheepShaver/src/Windows/SheepShaver.rc | 1 - SheepShaver/src/Windows/SheepShaverGUI.ico | Bin 1078 -> 0 bytes SheepShaver/src/Windows/SheepShaverGUI.rc | 2 - .../src/Windows/about_window_windows.cpp | 30 - SheepShaver/src/Windows/b2ether | 1 - SheepShaver/src/Windows/cd_defs.h | 1 - SheepShaver/src/Windows/cdenable | 1 - SheepShaver/src/Windows/clip_windows.cpp | 1 - SheepShaver/src/Windows/configure.ac | 266 - SheepShaver/src/Windows/ether_windows.cpp | 1 - SheepShaver/src/Windows/ether_windows.h | 1 - SheepShaver/src/Windows/extfs_windows.cpp | 1 - SheepShaver/src/Windows/kernel_windows.cpp | 1 - SheepShaver/src/Windows/kernel_windows.h | 1 - SheepShaver/src/Windows/main_windows.cpp | 828 --- SheepShaver/src/Windows/posix_emu.cpp | 1 - SheepShaver/src/Windows/posix_emu.h | 1 - SheepShaver/src/Windows/prefs_editor_gtk.cpp | 1 - SheepShaver/src/Windows/prefs_windows.cpp | 146 - SheepShaver/src/Windows/router | 1 - SheepShaver/src/Windows/serial_windows.cpp | 1 - SheepShaver/src/Windows/sys_windows.cpp | 1 - SheepShaver/src/Windows/sysdeps.h | 400 -- SheepShaver/src/Windows/timer_windows.cpp | 1 - .../src/Windows/user_strings_windows.cpp | 166 - .../src/Windows/user_strings_windows.h | 72 - SheepShaver/src/Windows/util_windows.cpp | 1 - SheepShaver/src/Windows/util_windows.h | 1 - SheepShaver/src/Windows/xpram_windows.cpp | 1 - SheepShaver/src/adb.cpp | 1 - SheepShaver/src/audio.cpp | 1 - SheepShaver/src/cdrom.cpp | 1 - SheepShaver/src/disk.cpp | 1 - SheepShaver/src/dummy/audio_dummy.cpp | 1 - SheepShaver/src/dummy/clip_dummy.cpp | 1 - SheepShaver/src/dummy/ether_dummy.cpp | 92 - SheepShaver/src/dummy/prefs_dummy.cpp | 38 - SheepShaver/src/dummy/prefs_editor_dummy.cpp | 1 - SheepShaver/src/dummy/scsi_dummy.cpp | 1 - SheepShaver/src/dummy/serial_dummy.cpp | 1 - SheepShaver/src/emul_op.cpp | 496 -- SheepShaver/src/emul_ppc/emul_ppc.cpp | 1661 ----- SheepShaver/src/ether.cpp | 1738 ------ SheepShaver/src/extfs.cpp | 1 - SheepShaver/src/gfxaccel.cpp | 461 -- SheepShaver/src/include/about_window.h | 26 - SheepShaver/src/include/adb.h | 1 - SheepShaver/src/include/audio.h | 1 - SheepShaver/src/include/audio_defs.h | 1 - SheepShaver/src/include/cdrom.h | 1 - SheepShaver/src/include/clip.h | 1 - SheepShaver/src/include/cpu_emulation.h | 123 - SheepShaver/src/include/debug.h | 1 - SheepShaver/src/include/disk.h | 1 - SheepShaver/src/include/emul_op.h | 113 - SheepShaver/src/include/ether.h | 101 - SheepShaver/src/include/ether_defs.h | 563 -- SheepShaver/src/include/extfs.h | 1 - SheepShaver/src/include/extfs_defs.h | 1 - SheepShaver/src/include/macos_util.h | 376 -- SheepShaver/src/include/main.h | 80 - SheepShaver/src/include/name_registry.h | 27 - SheepShaver/src/include/pict.h | 1 - SheepShaver/src/include/prefs.h | 1 - SheepShaver/src/include/prefs_editor.h | 30 - SheepShaver/src/include/rom_patches.h | 42 - SheepShaver/src/include/rsrc_patches.h | 28 - SheepShaver/src/include/scsi.h | 1 - SheepShaver/src/include/serial.h | 1 - SheepShaver/src/include/serial_defs.h | 1 - SheepShaver/src/include/sony.h | 1 - SheepShaver/src/include/sys.h | 1 - SheepShaver/src/include/thunks.h | 222 - SheepShaver/src/include/timer.h | 1 - SheepShaver/src/include/user_strings.h | 194 - SheepShaver/src/include/version.h | 27 - SheepShaver/src/include/video.h | 162 - SheepShaver/src/include/video_defs.h | 413 -- SheepShaver/src/include/xlowmem.h | 66 - SheepShaver/src/include/xpram.h | 1 - SheepShaver/src/kpx_cpu/dis-asm.h | 483 -- SheepShaver/src/kpx_cpu/include/a.out-defs.h | 443 -- .../src/kpx_cpu/include/basic-blockinfo.hpp | 118 - SheepShaver/src/kpx_cpu/include/basic-cpu.hpp | 89 - .../src/kpx_cpu/include/basic-plugin.hpp | 29 - .../src/kpx_cpu/include/block-alloc.hpp | 126 - SheepShaver/src/kpx_cpu/include/elf-defs.h | 2360 ------- SheepShaver/src/kpx_cpu/include/nvmemfun.hpp | 167 - .../src/kpx_cpu/include/task-plugin.hpp | 53 - SheepShaver/src/kpx_cpu/ppc-dis.c | 5489 ----------------- SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 1235 ---- .../src/kpx_cpu/src/cpu/block-cache.hpp | 277 - .../src/cpu/jit/amd64/dyngen-target-exec.h | 94 - .../src/cpu/jit/amd64/jit-target-cache.hpp | 1 - .../src/cpu/jit/amd64/jit-target-codegen.hpp | 108 - .../kpx_cpu/src/cpu/jit/basic-dyngen-ops.cpp | 481 -- .../src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp | 183 - .../src/kpx_cpu/src/cpu/jit/basic-dyngen.hpp | 374 -- .../src/kpx_cpu/src/cpu/jit/cxxdemangle.cpp | 4495 -------------- .../src/kpx_cpu/src/cpu/jit/cxxdemangle.h | 55 - .../src/cpu/jit/dummy/jit-target-cache.hpp | 28 - .../src/kpx_cpu/src/cpu/jit/dyngen-exec.h | 182 - SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c | 3027 --------- .../src/kpx_cpu/src/cpu/jit/jit-cache.cpp | 149 - .../src/kpx_cpu/src/cpu/jit/jit-cache.hpp | 126 - .../src/kpx_cpu/src/cpu/jit/jit-codegen.hpp | 39 - .../src/kpx_cpu/src/cpu/jit/jit-config.hpp | 62 - .../kpx_cpu/src/cpu/jit/jit-target-dispatch.h | 70 - .../src/cpu/jit/mips/dyngen-target-exec.h | 45 - .../src/cpu/jit/mips/jit-target-cache.hpp | 34 - .../src/cpu/jit/ppc/dyngen-target-exec.h | 71 - .../src/cpu/jit/ppc/jit-target-cache.hpp | 44 - .../src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h | 1 - .../src/cpu/jit/x86/dyngen-target-exec.h | 55 - .../src/cpu/jit/x86/jit-target-cache.hpp | 1 - .../src/cpu/jit/x86/jit-target-codegen.hpp | 760 --- .../src/kpx_cpu/src/cpu/ppc/genexec.pl | 52 - .../src/kpx_cpu/src/cpu/ppc/ppc-bitfields.hpp | 229 - .../src/kpx_cpu/src/cpu/ppc/ppc-blockinfo.hpp | 84 - .../src/kpx_cpu/src/cpu/ppc/ppc-config.hpp | 150 - .../src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp | 825 --- .../src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp | 514 -- .../src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp | 1869 ------ .../kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp | 1769 ------ .../src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp | 313 - .../src/kpx_cpu/src/cpu/ppc/ppc-dyngen.hpp | 260 - .../src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp | 1787 ------ .../src/kpx_cpu/src/cpu/ppc/ppc-execute.hpp | 380 -- .../kpx_cpu/src/cpu/ppc/ppc-instructions.hpp | 366 -- .../src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp | 942 --- .../src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp | 106 - .../src/kpx_cpu/src/cpu/ppc/ppc-operands.hpp | 591 -- .../kpx_cpu/src/cpu/ppc/ppc-operations.hpp | 405 -- .../src/kpx_cpu/src/cpu/ppc/ppc-registers.hpp | 251 - .../src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp | 1589 ----- SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp | 66 - SheepShaver/src/kpx_cpu/src/cpu/vm.hpp | 298 - .../src/kpx_cpu/src/mathlib/ieeefp-i386.cpp | 111 - .../src/kpx_cpu/src/mathlib/ieeefp-i386.hpp | 58 - .../src/kpx_cpu/src/mathlib/ieeefp-mips.hpp | 58 - .../src/kpx_cpu/src/mathlib/ieeefp.cpp | 29 - .../src/kpx_cpu/src/mathlib/ieeefp.hpp | 123 - .../src/kpx_cpu/src/mathlib/mathlib-i386.cpp | 38 - .../src/kpx_cpu/src/mathlib/mathlib-i386.hpp | 52 - .../src/kpx_cpu/src/mathlib/mathlib-ppc.hpp | 63 - .../kpx_cpu/src/mathlib/mathlib-x86_64.hpp | 33 - .../src/kpx_cpu/src/mathlib/mathlib.cpp | 228 - .../src/kpx_cpu/src/mathlib/mathlib.hpp | 339 - .../src/kpx_cpu/src/test/test-powerpc.cpp | 2242 ------- .../src/kpx_cpu/src/utils/utils-cpuinfo.cpp | 151 - .../src/kpx_cpu/src/utils/utils-cpuinfo.hpp | 51 - .../src/kpx_cpu/src/utils/utils-sentinel.hpp | 47 - SheepShaver/src/macos_util.cpp | 354 -- SheepShaver/src/main.cpp | 326 - SheepShaver/src/name_registry.cpp | 368 -- SheepShaver/src/pict.c | 1 - SheepShaver/src/prefs.cpp | 1 - SheepShaver/src/prefs_items.cpp | 95 - SheepShaver/src/rom_patches.cpp | 2499 -------- SheepShaver/src/rsrc_patches.cpp | 1051 ---- SheepShaver/src/scsi.cpp | 1 - SheepShaver/src/serial.cpp | 315 - SheepShaver/src/slirp | 1 - SheepShaver/src/sony.cpp | 1 - SheepShaver/src/thunks.cpp | 406 -- SheepShaver/src/timer.cpp | 677 -- SheepShaver/src/user_strings.cpp | 186 - SheepShaver/src/video.cpp | 1097 ---- SheepShaver/src/xpram.cpp | 1 - cxmon/.gitignore | 26 - cxmon/AUTHORS | 8 - cxmon/COPYING | 340 - cxmon/ChangeLog | 20 - cxmon/INSTALL | 182 - cxmon/Makefile.am | 17 - cxmon/README | 437 -- cxmon/bootstrap | 2 - cxmon/configure.ac | 47 - cxmon/cxmon.1 | 56 - cxmon/cxmon.spec.in | 42 - cxmon/src/Makefile.am | 10 - cxmon/src/disass/Makefile.am | 8 - cxmon/src/disass/ansidecl.h | 295 - cxmon/src/disass/bfd.h | 66 - cxmon/src/disass/dis-asm.h | 315 - cxmon/src/disass/floatformat.c | 401 -- cxmon/src/disass/floatformat.h | 111 - cxmon/src/disass/i386-dis.c | 4146 ------------- cxmon/src/disass/m68k-dis.c | 1248 ---- cxmon/src/disass/m68k-opc.c | 2066 ------- cxmon/src/disass/m68k.h | 315 - cxmon/src/disass/opintl.h | 34 - cxmon/src/main.cpp | 118 - cxmon/src/mon.cpp | 1255 ---- cxmon/src/mon.h | 100 - cxmon/src/mon_6502.cpp | 232 - cxmon/src/mon_atraps.h | 1212 ---- cxmon/src/mon_cmd.cpp | 669 -- cxmon/src/mon_cmd.h | 46 - cxmon/src/mon_disass.cpp | 204 - cxmon/src/mon_disass.h | 30 - cxmon/src/mon_lowmem.cpp | 579 -- cxmon/src/mon_lowmem.h | 32 - cxmon/src/mon_ppc.cpp | 1129 ---- cxmon/src/mon_z80.cpp | 604 -- cxmon/src/sysdeps.h | 96 - 430 files changed, 107195 deletions(-) delete mode 100644 SheepShaver/COPYING delete mode 100644 SheepShaver/Makefile delete mode 100644 SheepShaver/NEWS delete mode 100644 SheepShaver/doc/BeOS/acknowledgements.html delete mode 100644 SheepShaver/doc/BeOS/contact.html delete mode 100644 SheepShaver/doc/BeOS/graphics.gif delete mode 100644 SheepShaver/doc/BeOS/history.html delete mode 100644 SheepShaver/doc/BeOS/icon.gif delete mode 100644 SheepShaver/doc/BeOS/iconsmall.gif delete mode 100644 SheepShaver/doc/BeOS/index.html delete mode 100644 SheepShaver/doc/BeOS/installation.html delete mode 100644 SheepShaver/doc/BeOS/introduction.html delete mode 100644 SheepShaver/doc/BeOS/memory.gif delete mode 100644 SheepShaver/doc/BeOS/quickstart.html delete mode 100644 SheepShaver/doc/BeOS/serial.gif delete mode 100644 SheepShaver/doc/BeOS/settings.html delete mode 100644 SheepShaver/doc/BeOS/troubleshooting.html delete mode 100644 SheepShaver/doc/BeOS/using.html delete mode 100644 SheepShaver/doc/BeOS/volumes.gif delete mode 100644 SheepShaver/doc/Linux/acknowledgements.html delete mode 100644 SheepShaver/doc/Linux/contact.html delete mode 100644 SheepShaver/doc/Linux/graphics.gif delete mode 100644 SheepShaver/doc/Linux/history.html delete mode 100644 SheepShaver/doc/Linux/icon.gif delete mode 100644 SheepShaver/doc/Linux/iconsmall.gif delete mode 100644 SheepShaver/doc/Linux/index.html delete mode 100644 SheepShaver/doc/Linux/installation.html delete mode 100644 SheepShaver/doc/Linux/introduction.html delete mode 100644 SheepShaver/doc/Linux/memory.gif delete mode 100644 SheepShaver/doc/Linux/quickstart.html delete mode 100644 SheepShaver/doc/Linux/serial.gif delete mode 100644 SheepShaver/doc/Linux/settings.html delete mode 100644 SheepShaver/doc/Linux/troubleshooting.html delete mode 100644 SheepShaver/doc/Linux/using.html delete mode 100644 SheepShaver/doc/Linux/volumes.gif delete mode 100644 SheepShaver/doc/PowerPC-Testsuite.txt delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Makefile delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp delete mode 100644 SheepShaver/src/BeOS/Makefile delete mode 100644 SheepShaver/src/BeOS/NetPeek/Makefile delete mode 100644 SheepShaver/src/BeOS/NetPeek/NetPeek.cpp delete mode 100644 SheepShaver/src/BeOS/SaveROM/Makefile delete mode 100644 SheepShaver/src/BeOS/SaveROM/README delete mode 100644 SheepShaver/src/BeOS/SaveROM/SaveROM.cpp delete mode 100644 SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc delete mode 120000 SheepShaver/src/BeOS/SheepDriver delete mode 120000 SheepShaver/src/BeOS/SheepNet delete mode 100644 SheepShaver/src/BeOS/SheepShaver.rsrc delete mode 100644 SheepShaver/src/BeOS/about_window_beos.cpp delete mode 120000 SheepShaver/src/BeOS/audio_beos.cpp delete mode 100644 SheepShaver/src/BeOS/clip_beos.cpp delete mode 100644 SheepShaver/src/BeOS/ether_beos.cpp delete mode 120000 SheepShaver/src/BeOS/extfs_beos.cpp delete mode 100644 SheepShaver/src/BeOS/main_beos.cpp delete mode 100644 SheepShaver/src/BeOS/prefs_beos.cpp delete mode 100644 SheepShaver/src/BeOS/prefs_editor_beos.cpp delete mode 120000 SheepShaver/src/BeOS/scsi_beos.cpp delete mode 120000 SheepShaver/src/BeOS/serial_beos.cpp delete mode 120000 SheepShaver/src/BeOS/sys_beos.cpp delete mode 100644 SheepShaver/src/BeOS/sysdeps.h delete mode 120000 SheepShaver/src/BeOS/timer_beos.cpp delete mode 100644 SheepShaver/src/BeOS/user_strings_beos.cpp delete mode 100644 SheepShaver/src/BeOS/user_strings_beos.h delete mode 100644 SheepShaver/src/BeOS/video_beos.cpp delete mode 100644 SheepShaver/src/BeOS/video_screen.h delete mode 100644 SheepShaver/src/BeOS/video_window.h delete mode 120000 SheepShaver/src/BeOS/xpram_beos.cpp delete mode 120000 SheepShaver/src/CrossPlatform/sigsegv.cpp delete mode 120000 SheepShaver/src/CrossPlatform/sigsegv.h delete mode 120000 SheepShaver/src/CrossPlatform/video_blit.cpp delete mode 120000 SheepShaver/src/CrossPlatform/video_blit.h delete mode 120000 SheepShaver/src/CrossPlatform/video_vosf.h delete mode 120000 SheepShaver/src/CrossPlatform/vm_alloc.cpp delete mode 120000 SheepShaver/src/CrossPlatform/vm_alloc.h delete mode 100644 SheepShaver/src/EthernetDriver/.finf/Ethernet.mcp delete mode 100644 SheepShaver/src/EthernetDriver/.finf/ethernet.ndrv delete mode 100644 SheepShaver/src/EthernetDriver/.rsrc/ethernet.ndrv delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/.finf/CWSettingsMacOS.stg delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Debug MacOS Toolbox delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Final MacOS Toolbox delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/CWSettingsMacOS.stg delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.finf/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.rsrc/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.finf/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.rsrc/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/TargetDataMacOS.tdt delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet.cpp delete mode 100644 SheepShaver/src/EthernetDriver/Ethernet.mcp delete mode 100644 SheepShaver/src/EthernetDriver/cpu_emulation.h delete mode 100644 SheepShaver/src/EthernetDriver/debug.h delete mode 100644 SheepShaver/src/EthernetDriver/ether.cpp delete mode 100644 SheepShaver/src/EthernetDriver/ether.h delete mode 100644 SheepShaver/src/EthernetDriver/ether_defs.h delete mode 100644 SheepShaver/src/EthernetDriver/ethernet.ndrv delete mode 100644 SheepShaver/src/EthernetDriver/macos_util.cpp delete mode 100644 SheepShaver/src/EthernetDriver/macos_util.h delete mode 100644 SheepShaver/src/EthernetDriver/sysdeps.h delete mode 100644 SheepShaver/src/EthernetDriver/xlowmem.h delete mode 100644 SheepShaver/src/EthernetDriverFull.i delete mode 100644 SheepShaver/src/EthernetDriverStub.i delete mode 100644 SheepShaver/src/MacOSX/.gitignore delete mode 120000 SheepShaver/src/MacOSX/AudioBackEnd.cpp delete mode 120000 SheepShaver/src/MacOSX/AudioBackEnd.h delete mode 120000 SheepShaver/src/MacOSX/AudioDevice.cpp delete mode 120000 SheepShaver/src/MacOSX/AudioDevice.h delete mode 100644 SheepShaver/src/MacOSX/Info.plist.in delete mode 100644 SheepShaver/src/MacOSX/Launcher/AppController.h delete mode 100644 SheepShaver/src/MacOSX/Launcher/AppController.mm delete mode 100755 SheepShaver/src/MacOSX/Launcher/DiskType.h delete mode 100755 SheepShaver/src/MacOSX/Launcher/DiskType.m delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/InfoPlist.strings delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/classes.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/info.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/keyedobjects.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/designable.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/keyedobjects.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib delete mode 100755 SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib delete mode 100644 SheepShaver/src/MacOSX/Launcher/Info.plist delete mode 100644 SheepShaver/src/MacOSX/Launcher/LauncherPrefix.h delete mode 100644 SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj delete mode 100644 SheepShaver/src/MacOSX/Launcher/VMListController.h delete mode 100644 SheepShaver/src/MacOSX/Launcher/VMListController.mm delete mode 100755 SheepShaver/src/MacOSX/Launcher/VMSettingsController.h delete mode 100755 SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm delete mode 100644 SheepShaver/src/MacOSX/Launcher/main.m delete mode 120000 SheepShaver/src/MacOSX/MacOSX_sound_if.cpp delete mode 120000 SheepShaver/src/MacOSX/MacOSX_sound_if.h delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/English.lproj/InfoPlist.strings delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/classes.nib delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/info.nib delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/keyedobjects.nib delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/Info.plist delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.h delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/main.m delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/InfoPlist.strings delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/classes.nib delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/info.nib delete mode 100644 SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/keyedobjects.nib delete mode 100644 SheepShaver/src/MacOSX/SheepShaver.icns delete mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.pbxproj delete mode 100644 SheepShaver/src/MacOSX/XcodeBuildHowTo.txt delete mode 120000 SheepShaver/src/MacOSX/audio_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/autorelease.h delete mode 120000 SheepShaver/src/MacOSX/clip_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/clip_macosx64.mm delete mode 100644 SheepShaver/src/MacOSX/config/config-macosx-ppc_32.h delete mode 100644 SheepShaver/src/MacOSX/config/config-macosx-x86_32.h delete mode 100644 SheepShaver/src/MacOSX/config/config-macosx-x86_64.h delete mode 100644 SheepShaver/src/MacOSX/config/config.h delete mode 120000 SheepShaver/src/MacOSX/extfs_macosx.cpp delete mode 120000 SheepShaver/src/MacOSX/macos_util_macosx.h delete mode 100644 SheepShaver/src/MacOSX/prefs_macosx.mm delete mode 120000 SheepShaver/src/MacOSX/sys_darwin.cpp delete mode 120000 SheepShaver/src/MacOSX/utils_macosx.h delete mode 120000 SheepShaver/src/MacOSX/utils_macosx.mm delete mode 120000 SheepShaver/src/SDL delete mode 100644 SheepShaver/src/Unix/.gitignore delete mode 100644 SheepShaver/src/Unix/Darwin/.gitignore delete mode 120000 SheepShaver/src/Unix/Darwin/lowmem.c delete mode 120000 SheepShaver/src/Unix/Darwin/mkstandalone delete mode 120000 SheepShaver/src/Unix/Darwin/pagezero.c delete mode 120000 SheepShaver/src/Unix/Darwin/testlmem.sh delete mode 120000 SheepShaver/src/Unix/Irix/audio_irix.cpp delete mode 120000 SheepShaver/src/Unix/Linux/NetDriver delete mode 120000 SheepShaver/src/Unix/Linux/scsi_linux.cpp delete mode 100644 SheepShaver/src/Unix/Linux/sheepthreads.c delete mode 100644 SheepShaver/src/Unix/Makefile.in delete mode 100644 SheepShaver/src/Unix/NetBSD/sheepthreads.c delete mode 100644 SheepShaver/src/Unix/SheepShaver.1 delete mode 100644 SheepShaver/src/Unix/about_window_unix.cpp delete mode 120000 SheepShaver/src/Unix/audio_oss_esd.cpp delete mode 100755 SheepShaver/src/Unix/autogen.sh delete mode 120000 SheepShaver/src/Unix/bincue_unix.cpp delete mode 120000 SheepShaver/src/Unix/bincue_unix.h delete mode 120000 SheepShaver/src/Unix/clip_unix.cpp delete mode 120000 SheepShaver/src/Unix/config.guess delete mode 120000 SheepShaver/src/Unix/config.sub delete mode 100644 SheepShaver/src/Unix/configure.ac delete mode 120000 SheepShaver/src/Unix/cpr.sh delete mode 120000 SheepShaver/src/Unix/disk_sparsebundle.cpp delete mode 120000 SheepShaver/src/Unix/disk_unix.h delete mode 120000 SheepShaver/src/Unix/ether_unix.cpp delete mode 120000 SheepShaver/src/Unix/extfs_unix.cpp delete mode 100755 SheepShaver/src/Unix/install-sh delete mode 120000 SheepShaver/src/Unix/keycodes delete mode 120000 SheepShaver/src/Unix/ldscripts delete mode 120000 SheepShaver/src/Unix/m4 delete mode 100644 SheepShaver/src/Unix/main_unix.cpp delete mode 100755 SheepShaver/src/Unix/mkinstalldirs delete mode 100644 SheepShaver/src/Unix/paranoia.cpp delete mode 120000 SheepShaver/src/Unix/posix_sem.cpp delete mode 100644 SheepShaver/src/Unix/ppc_asm.S delete mode 100644 SheepShaver/src/Unix/ppc_asm.tmpl delete mode 100644 SheepShaver/src/Unix/prefs_editor_gtk.cpp delete mode 100644 SheepShaver/src/Unix/prefs_unix.cpp delete mode 120000 SheepShaver/src/Unix/rpc.h delete mode 120000 SheepShaver/src/Unix/rpc_unix.cpp delete mode 120000 SheepShaver/src/Unix/semaphore.h delete mode 120000 SheepShaver/src/Unix/serial_unix.cpp delete mode 100644 SheepShaver/src/Unix/sigregs.h delete mode 120000 SheepShaver/src/Unix/sshpty.c delete mode 120000 SheepShaver/src/Unix/sshpty.h delete mode 120000 SheepShaver/src/Unix/strlcpy.c delete mode 120000 SheepShaver/src/Unix/strlcpy.h delete mode 120000 SheepShaver/src/Unix/sys_unix.cpp delete mode 100644 SheepShaver/src/Unix/sysdeps.h delete mode 120000 SheepShaver/src/Unix/timer_unix.cpp delete mode 120000 SheepShaver/src/Unix/tinyxml2.cpp delete mode 120000 SheepShaver/src/Unix/tinyxml2.h delete mode 120000 SheepShaver/src/Unix/tunconfig delete mode 100644 SheepShaver/src/Unix/user_strings_unix.cpp delete mode 100644 SheepShaver/src/Unix/user_strings_unix.h delete mode 120000 SheepShaver/src/Unix/vhd_unix.cpp delete mode 100644 SheepShaver/src/Unix/video_x.cpp delete mode 120000 SheepShaver/src/Unix/xpram_unix.cpp delete mode 100644 SheepShaver/src/VideoDriverStub.i delete mode 100755 SheepShaver/src/Windows/Makefile.in delete mode 100755 SheepShaver/src/Windows/SheepShaver.ico delete mode 100755 SheepShaver/src/Windows/SheepShaver.rc delete mode 100755 SheepShaver/src/Windows/SheepShaverGUI.ico delete mode 100644 SheepShaver/src/Windows/SheepShaverGUI.rc delete mode 100755 SheepShaver/src/Windows/about_window_windows.cpp delete mode 120000 SheepShaver/src/Windows/b2ether delete mode 120000 SheepShaver/src/Windows/cd_defs.h delete mode 120000 SheepShaver/src/Windows/cdenable delete mode 120000 SheepShaver/src/Windows/clip_windows.cpp delete mode 100755 SheepShaver/src/Windows/configure.ac delete mode 120000 SheepShaver/src/Windows/ether_windows.cpp delete mode 120000 SheepShaver/src/Windows/ether_windows.h delete mode 120000 SheepShaver/src/Windows/extfs_windows.cpp delete mode 120000 SheepShaver/src/Windows/kernel_windows.cpp delete mode 120000 SheepShaver/src/Windows/kernel_windows.h delete mode 100755 SheepShaver/src/Windows/main_windows.cpp delete mode 120000 SheepShaver/src/Windows/posix_emu.cpp delete mode 120000 SheepShaver/src/Windows/posix_emu.h delete mode 120000 SheepShaver/src/Windows/prefs_editor_gtk.cpp delete mode 100755 SheepShaver/src/Windows/prefs_windows.cpp delete mode 120000 SheepShaver/src/Windows/router delete mode 120000 SheepShaver/src/Windows/serial_windows.cpp delete mode 120000 SheepShaver/src/Windows/sys_windows.cpp delete mode 100755 SheepShaver/src/Windows/sysdeps.h delete mode 120000 SheepShaver/src/Windows/timer_windows.cpp delete mode 100755 SheepShaver/src/Windows/user_strings_windows.cpp delete mode 100755 SheepShaver/src/Windows/user_strings_windows.h delete mode 120000 SheepShaver/src/Windows/util_windows.cpp delete mode 120000 SheepShaver/src/Windows/util_windows.h delete mode 120000 SheepShaver/src/Windows/xpram_windows.cpp delete mode 120000 SheepShaver/src/adb.cpp delete mode 120000 SheepShaver/src/audio.cpp delete mode 120000 SheepShaver/src/cdrom.cpp delete mode 120000 SheepShaver/src/disk.cpp delete mode 120000 SheepShaver/src/dummy/audio_dummy.cpp delete mode 120000 SheepShaver/src/dummy/clip_dummy.cpp delete mode 100644 SheepShaver/src/dummy/ether_dummy.cpp delete mode 100644 SheepShaver/src/dummy/prefs_dummy.cpp delete mode 120000 SheepShaver/src/dummy/prefs_editor_dummy.cpp delete mode 120000 SheepShaver/src/dummy/scsi_dummy.cpp delete mode 120000 SheepShaver/src/dummy/serial_dummy.cpp delete mode 100644 SheepShaver/src/emul_op.cpp delete mode 100644 SheepShaver/src/emul_ppc/emul_ppc.cpp delete mode 100644 SheepShaver/src/ether.cpp delete mode 120000 SheepShaver/src/extfs.cpp delete mode 100644 SheepShaver/src/gfxaccel.cpp delete mode 100644 SheepShaver/src/include/about_window.h delete mode 120000 SheepShaver/src/include/adb.h delete mode 120000 SheepShaver/src/include/audio.h delete mode 120000 SheepShaver/src/include/audio_defs.h delete mode 120000 SheepShaver/src/include/cdrom.h delete mode 120000 SheepShaver/src/include/clip.h delete mode 100644 SheepShaver/src/include/cpu_emulation.h delete mode 120000 SheepShaver/src/include/debug.h delete mode 120000 SheepShaver/src/include/disk.h delete mode 100644 SheepShaver/src/include/emul_op.h delete mode 100644 SheepShaver/src/include/ether.h delete mode 100644 SheepShaver/src/include/ether_defs.h delete mode 120000 SheepShaver/src/include/extfs.h delete mode 120000 SheepShaver/src/include/extfs_defs.h delete mode 100644 SheepShaver/src/include/macos_util.h delete mode 100644 SheepShaver/src/include/main.h delete mode 100644 SheepShaver/src/include/name_registry.h delete mode 120000 SheepShaver/src/include/pict.h delete mode 120000 SheepShaver/src/include/prefs.h delete mode 100644 SheepShaver/src/include/prefs_editor.h delete mode 100644 SheepShaver/src/include/rom_patches.h delete mode 100644 SheepShaver/src/include/rsrc_patches.h delete mode 120000 SheepShaver/src/include/scsi.h delete mode 120000 SheepShaver/src/include/serial.h delete mode 120000 SheepShaver/src/include/serial_defs.h delete mode 120000 SheepShaver/src/include/sony.h delete mode 120000 SheepShaver/src/include/sys.h delete mode 100644 SheepShaver/src/include/thunks.h delete mode 120000 SheepShaver/src/include/timer.h delete mode 100644 SheepShaver/src/include/user_strings.h delete mode 100644 SheepShaver/src/include/version.h delete mode 100644 SheepShaver/src/include/video.h delete mode 100644 SheepShaver/src/include/video_defs.h delete mode 100644 SheepShaver/src/include/xlowmem.h delete mode 120000 SheepShaver/src/include/xpram.h delete mode 100644 SheepShaver/src/kpx_cpu/dis-asm.h delete mode 100644 SheepShaver/src/kpx_cpu/include/a.out-defs.h delete mode 100644 SheepShaver/src/kpx_cpu/include/basic-blockinfo.hpp delete mode 100644 SheepShaver/src/kpx_cpu/include/basic-cpu.hpp delete mode 100644 SheepShaver/src/kpx_cpu/include/basic-plugin.hpp delete mode 100644 SheepShaver/src/kpx_cpu/include/block-alloc.hpp delete mode 100644 SheepShaver/src/kpx_cpu/include/elf-defs.h delete mode 100644 SheepShaver/src/kpx_cpu/include/nvmemfun.hpp delete mode 100644 SheepShaver/src/kpx_cpu/include/task-plugin.hpp delete mode 100644 SheepShaver/src/kpx_cpu/ppc-dis.c delete mode 100644 SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/block-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/dyngen-target-exec.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-codegen.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen-ops.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/dummy/jit-target-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/jit-codegen.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/jit-config.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/jit-target-dispatch.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/mips/dyngen-target-exec.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/mips/jit-target-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/dyngen-target-exec.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/jit-target-cache.hpp delete mode 120000 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/dyngen-target-exec.h delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-cache.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-codegen.hpp delete mode 100755 SheepShaver/src/kpx_cpu/src/cpu/ppc/genexec.pl delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-bitfields.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-blockinfo.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-config.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operands.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-registers.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/cpu/vm.hpp delete mode 100755 SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.cpp delete mode 100755 SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-mips.hpp delete mode 100755 SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.cpp delete mode 100755 SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib-ppc.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib-x86_64.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/mathlib/mathlib.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/test/test-powerpc.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.cpp delete mode 100644 SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.hpp delete mode 100644 SheepShaver/src/kpx_cpu/src/utils/utils-sentinel.hpp delete mode 100644 SheepShaver/src/macos_util.cpp delete mode 100644 SheepShaver/src/main.cpp delete mode 100644 SheepShaver/src/name_registry.cpp delete mode 120000 SheepShaver/src/pict.c delete mode 120000 SheepShaver/src/prefs.cpp delete mode 100644 SheepShaver/src/prefs_items.cpp delete mode 100644 SheepShaver/src/rom_patches.cpp delete mode 100644 SheepShaver/src/rsrc_patches.cpp delete mode 120000 SheepShaver/src/scsi.cpp delete mode 100644 SheepShaver/src/serial.cpp delete mode 120000 SheepShaver/src/slirp delete mode 120000 SheepShaver/src/sony.cpp delete mode 100644 SheepShaver/src/thunks.cpp delete mode 100644 SheepShaver/src/timer.cpp delete mode 100644 SheepShaver/src/user_strings.cpp delete mode 100644 SheepShaver/src/video.cpp delete mode 120000 SheepShaver/src/xpram.cpp delete mode 100644 cxmon/.gitignore delete mode 100644 cxmon/AUTHORS delete mode 100644 cxmon/COPYING delete mode 100644 cxmon/ChangeLog delete mode 100644 cxmon/INSTALL delete mode 100644 cxmon/Makefile.am delete mode 100644 cxmon/README delete mode 100755 cxmon/bootstrap delete mode 100644 cxmon/configure.ac delete mode 100644 cxmon/cxmon.1 delete mode 100644 cxmon/cxmon.spec.in delete mode 100644 cxmon/src/Makefile.am delete mode 100644 cxmon/src/disass/Makefile.am delete mode 100644 cxmon/src/disass/ansidecl.h delete mode 100644 cxmon/src/disass/bfd.h delete mode 100644 cxmon/src/disass/dis-asm.h delete mode 100644 cxmon/src/disass/floatformat.c delete mode 100644 cxmon/src/disass/floatformat.h delete mode 100644 cxmon/src/disass/i386-dis.c delete mode 100644 cxmon/src/disass/m68k-dis.c delete mode 100644 cxmon/src/disass/m68k-opc.c delete mode 100644 cxmon/src/disass/m68k.h delete mode 100644 cxmon/src/disass/opintl.h delete mode 100644 cxmon/src/main.cpp delete mode 100644 cxmon/src/mon.cpp delete mode 100644 cxmon/src/mon.h delete mode 100644 cxmon/src/mon_6502.cpp delete mode 100644 cxmon/src/mon_atraps.h delete mode 100644 cxmon/src/mon_cmd.cpp delete mode 100644 cxmon/src/mon_cmd.h delete mode 100644 cxmon/src/mon_disass.cpp delete mode 100644 cxmon/src/mon_disass.h delete mode 100644 cxmon/src/mon_lowmem.cpp delete mode 100644 cxmon/src/mon_lowmem.h delete mode 100644 cxmon/src/mon_ppc.cpp delete mode 100644 cxmon/src/mon_z80.cpp delete mode 100644 cxmon/src/sysdeps.h diff --git a/SheepShaver/COPYING b/SheepShaver/COPYING deleted file mode 100644 index 60549be51..000000000 --- a/SheepShaver/COPYING +++ /dev/null @@ -1,340 +0,0 @@ - GNU GENERAL PUBLIC LICENSE - Version 2, June 1991 - - Copyright (C) 1989, 1991 Free Software Foundation, Inc. - 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - Everyone is permitted to copy and distribute verbatim copies - of this license document, but changing it is not allowed. - - Preamble - - The licenses for most software are designed to take away your -freedom to share and change it. By contrast, the GNU General Public -License is intended to guarantee your freedom to share and change free -software--to make sure the software is free for all its users. This -General Public License applies to most of the Free Software -Foundation's software and to any other program whose authors commit to -using it. (Some other Free Software Foundation software is covered by -the GNU Library General Public License instead.) You can apply it to -your programs, too. - - When we speak of free software, we are referring to freedom, not -price. Our General Public Licenses are designed to make sure that you -have the freedom to distribute copies of free software (and charge for -this service if you wish), that you receive source code or can get it -if you want it, that you can change the software or use pieces of it -in new free programs; and that you know you can do these things. - - To protect your rights, we need to make restrictions that forbid -anyone to deny you these rights or to ask you to surrender the rights. -These restrictions translate to certain responsibilities for you if you -distribute copies of the software, or if you modify it. - - For example, if you distribute copies of such a program, whether -gratis or for a fee, you must give the recipients all the rights that -you have. You must make sure that they, too, receive or can get the -source code. And you must show them these terms so they know their -rights. - - We protect your rights with two steps: (1) copyright the software, and -(2) offer you this license which gives you legal permission to copy, -distribute and/or modify the software. - - Also, for each author's protection and ours, we want to make certain -that everyone understands that there is no warranty for this free -software. If the software is modified by someone else and passed on, we -want its recipients to know that what they have is not the original, so -that any problems introduced by others will not reflect on the original -authors' reputations. - - Finally, any free program is threatened constantly by software -patents. We wish to avoid the danger that redistributors of a free -program will individually obtain patent licenses, in effect making the -program proprietary. To prevent this, we have made it clear that any -patent must be licensed for everyone's free use or not licensed at all. - - The precise terms and conditions for copying, distribution and -modification follow. - - GNU GENERAL PUBLIC LICENSE - TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION - - 0. This License applies to any program or other work which contains -a notice placed by the copyright holder saying it may be distributed -under the terms of this General Public License. The "Program", below, -refers to any such program or work, and a "work based on the Program" -means either the Program or any derivative work under copyright law: -that is to say, a work containing the Program or a portion of it, -either verbatim or with modifications and/or translated into another -language. (Hereinafter, translation is included without limitation in -the term "modification".) Each licensee is addressed as "you". - -Activities other than copying, distribution and modification are not -covered by this License; they are outside its scope. The act of -running the Program is not restricted, and the output from the Program -is covered only if its contents constitute a work based on the -Program (independent of having been made by running the Program). -Whether that is true depends on what the Program does. - - 1. You may copy and distribute verbatim copies of the Program's -source code as you receive it, in any medium, provided that you -conspicuously and appropriately publish on each copy an appropriate -copyright notice and disclaimer of warranty; keep intact all the -notices that refer to this License and to the absence of any warranty; -and give any other recipients of the Program a copy of this License -along with the Program. - -You may charge a fee for the physical act of transferring a copy, and -you may at your option offer warranty protection in exchange for a fee. - - 2. You may modify your copy or copies of the Program or any portion -of it, thus forming a work based on the Program, and copy and -distribute such modifications or work under the terms of Section 1 -above, provided that you also meet all of these conditions: - - a) You must cause the modified files to carry prominent notices - stating that you changed the files and the date of any change. - - b) You must cause any work that you distribute or publish, that in - whole or in part contains or is derived from the Program or any - part thereof, to be licensed as a whole at no charge to all third - parties under the terms of this License. - - c) If the modified program normally reads commands interactively - when run, you must cause it, when started running for such - interactive use in the most ordinary way, to print or display an - announcement including an appropriate copyright notice and a - notice that there is no warranty (or else, saying that you provide - a warranty) and that users may redistribute the program under - these conditions, and telling the user how to view a copy of this - License. (Exception: if the Program itself is interactive but - does not normally print such an announcement, your work based on - the Program is not required to print an announcement.) - -These requirements apply to the modified work as a whole. If -identifiable sections of that work are not derived from the Program, -and can be reasonably considered independent and separate works in -themselves, then this License, and its terms, do not apply to those -sections when you distribute them as separate works. But when you -distribute the same sections as part of a whole which is a work based -on the Program, the distribution of the whole must be on the terms of -this License, whose permissions for other licensees extend to the -entire whole, and thus to each and every part regardless of who wrote it. - -Thus, it is not the intent of this section to claim rights or contest -your rights to work written entirely by you; rather, the intent is to -exercise the right to control the distribution of derivative or -collective works based on the Program. - -In addition, mere aggregation of another work not based on the Program -with the Program (or with a work based on the Program) on a volume of -a storage or distribution medium does not bring the other work under -the scope of this License. - - 3. You may copy and distribute the Program (or a work based on it, -under Section 2) in object code or executable form under the terms of -Sections 1 and 2 above provided that you also do one of the following: - - a) Accompany it with the complete corresponding machine-readable - source code, which must be distributed under the terms of Sections - 1 and 2 above on a medium customarily used for software interchange; or, - - b) Accompany it with a written offer, valid for at least three - years, to give any third party, for a charge no more than your - cost of physically performing source distribution, a complete - machine-readable copy of the corresponding source code, to be - distributed under the terms of Sections 1 and 2 above on a medium - customarily used for software interchange; or, - - c) Accompany it with the information you received as to the offer - to distribute corresponding source code. (This alternative is - allowed only for noncommercial distribution and only if you - received the program in object code or executable form with such - an offer, in accord with Subsection b above.) - -The source code for a work means the preferred form of the work for -making modifications to it. For an executable work, complete source -code means all the source code for all modules it contains, plus any -associated interface definition files, plus the scripts used to -control compilation and installation of the executable. However, as a -special exception, the source code distributed need not include -anything that is normally distributed (in either source or binary -form) with the major components (compiler, kernel, and so on) of the -operating system on which the executable runs, unless that component -itself accompanies the executable. - -If distribution of executable or object code is made by offering -access to copy from a designated place, then offering equivalent -access to copy the source code from the same place counts as -distribution of the source code, even though third parties are not -compelled to copy the source along with the object code. - - 4. You may not copy, modify, sublicense, or distribute the Program -except as expressly provided under this License. Any attempt -otherwise to copy, modify, sublicense or distribute the Program is -void, and will automatically terminate your rights under this License. -However, parties who have received copies, or rights, from you under -this License will not have their licenses terminated so long as such -parties remain in full compliance. - - 5. You are not required to accept this License, since you have not -signed it. However, nothing else grants you permission to modify or -distribute the Program or its derivative works. These actions are -prohibited by law if you do not accept this License. Therefore, by -modifying or distributing the Program (or any work based on the -Program), you indicate your acceptance of this License to do so, and -all its terms and conditions for copying, distributing or modifying -the Program or works based on it. - - 6. Each time you redistribute the Program (or any work based on the -Program), the recipient automatically receives a license from the -original licensor to copy, distribute or modify the Program subject to -these terms and conditions. You may not impose any further -restrictions on the recipients' exercise of the rights granted herein. -You are not responsible for enforcing compliance by third parties to -this License. - - 7. If, as a consequence of a court judgment or allegation of patent -infringement or for any other reason (not limited to patent issues), -conditions are imposed on you (whether by court order, agreement or -otherwise) that contradict the conditions of this License, they do not -excuse you from the conditions of this License. If you cannot -distribute so as to satisfy simultaneously your obligations under this -License and any other pertinent obligations, then as a consequence you -may not distribute the Program at all. For example, if a patent -license would not permit royalty-free redistribution of the Program by -all those who receive copies directly or indirectly through you, then -the only way you could satisfy both it and this License would be to -refrain entirely from distribution of the Program. - -If any portion of this section is held invalid or unenforceable under -any particular circumstance, the balance of the section is intended to -apply and the section as a whole is intended to apply in other -circumstances. - -It is not the purpose of this section to induce you to infringe any -patents or other property right claims or to contest validity of any -such claims; this section has the sole purpose of protecting the -integrity of the free software distribution system, which is -implemented by public license practices. Many people have made -generous contributions to the wide range of software distributed -through that system in reliance on consistent application of that -system; it is up to the author/donor to decide if he or she is willing -to distribute software through any other system and a licensee cannot -impose that choice. - -This section is intended to make thoroughly clear what is believed to -be a consequence of the rest of this License. - - 8. If the distribution and/or use of the Program is restricted in -certain countries either by patents or by copyrighted interfaces, the -original copyright holder who places the Program under this License -may add an explicit geographical distribution limitation excluding -those countries, so that distribution is permitted only in or among -countries not thus excluded. In such case, this License incorporates -the limitation as if written in the body of this License. - - 9. The Free Software Foundation may publish revised and/or new versions -of the General Public License from time to time. Such new versions will -be similar in spirit to the present version, but may differ in detail to -address new problems or concerns. - -Each version is given a distinguishing version number. If the Program -specifies a version number of this License which applies to it and "any -later version", you have the option of following the terms and conditions -either of that version or of any later version published by the Free -Software Foundation. If the Program does not specify a version number of -this License, you may choose any version ever published by the Free Software -Foundation. - - 10. If you wish to incorporate parts of the Program into other free -programs whose distribution conditions are different, write to the author -to ask for permission. For software which is copyrighted by the Free -Software Foundation, write to the Free Software Foundation; we sometimes -make exceptions for this. Our decision will be guided by the two goals -of preserving the free status of all derivatives of our free software and -of promoting the sharing and reuse of software generally. - - NO WARRANTY - - 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY -FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN -OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES -PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED -OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF -MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS -TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE -PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, -REPAIR OR CORRECTION. - - 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING -WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR -REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, -INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING -OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED -TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY -YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER -PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE -POSSIBILITY OF SUCH DAMAGES. - - END OF TERMS AND CONDITIONS - - How to Apply These Terms to Your New Programs - - If you develop a new program, and you want it to be of the greatest -possible use to the public, the best way to achieve this is to make it -free software which everyone can redistribute and change under these terms. - - To do so, attach the following notices to the program. It is safest -to attach them to the start of each source file to most effectively -convey the exclusion of warranty; and each file should have at least -the "copyright" line and a pointer to where the full notice is found. - - - Copyright (C) 19yy - - 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 - - -Also add information on how to contact you by electronic and paper mail. - -If the program is interactive, make it output a short notice like this -when it starts in an interactive mode: - - Gnomovision version 69, Copyright (C) 19yy name of author - Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. - This is free software, and you are welcome to redistribute it - under certain conditions; type `show c' for details. - -The hypothetical commands `show w' and `show c' should show the appropriate -parts of the General Public License. Of course, the commands you use may -be called something other than `show w' and `show c'; they could even be -mouse-clicks or menu items--whatever suits your program. - -You should also get your employer (if you work as a programmer) or your -school, if any, to sign a "copyright disclaimer" for the program, if -necessary. Here is a sample; alter the names: - - Yoyodyne, Inc., hereby disclaims all copyright interest in the program - `Gnomovision' (which makes passes at compilers) written by James Hacker. - - , 1 April 1989 - Ty Coon, President of Vice - -This General Public License does not permit incorporating your program into -proprietary programs. If your program is a subroutine library, you may -consider it more useful to permit linking proprietary applications with the -library. If this is what you want to do, use the GNU Library General -Public License instead of this License. diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile deleted file mode 100644 index 2fec37a17..000000000 --- a/SheepShaver/Makefile +++ /dev/null @@ -1,104 +0,0 @@ -# Makefile for creating SheepShaver distributions -# Written in 1999 by Christian Bauer - -VERSION := 2.3 -VERNAME := SheepShaver-$(VERSION) -CVSDATE := $(shell date "+%Y%m%d") - -SRCARCHIVE := $(VERNAME)-$(CVSDATE).tar.gz - -TMPDIR := $(shell date +/tmp/build%m%s) -ISODATE := $(shell date "+%Y-%m-%d %H:%M") -DOCS := NEWS -SRCS := src - -# Where Basilisk II directory can be found -B2_TOPDIR := ../BasiliskII - -default: help - -help: - @echo "This top-level Makefile is for creating SheepShaver distributions." - @echo "The following targets are available:" - @echo " tarball source tarball ($(SRCARCHIVE))" - @echo " links create links to Basilisk II sources" - -clean: - -rm -f $(SRCARCHIVE) - -# -# Source tarball -# -tarball: $(SRCARCHIVE) - -$(SRCARCHIVE): $(SRCS) $(DOCS) - -rm -rf $(TMPDIR) - mkdir $(TMPDIR) - cd $(TMPDIR); cvs export -D "$(ISODATE)" BasiliskII SheepShaver - cd $(TMPDIR)/SheepShaver/src/Unix && mkdir Darwin - cd $(TMPDIR)/SheepShaver && make links - cd $(TMPDIR)/SheepShaver/src/Unix && NO_CONFIGURE=1 ./autogen.sh - cd $(TMPDIR)/SheepShaver/src/Windows && NO_CONFIGURE=1 ../Unix/autogen.sh - rm $(TMPDIR)/SheepShaver/Makefile - cp -aL $(TMPDIR)/SheepShaver $(TMPDIR)/$(VERNAME) - cd $(TMPDIR); tar cfz $@ $(VERNAME) - mv $(TMPDIR)/$@ . - rm -rf $(TMPDIR) - -# -# Links to Basilisk II sources -# -links: - @list='adb.cpp audio.cpp cdrom.cpp disk.cpp extfs.cpp pict.c \ - prefs.cpp scsi.cpp sony.cpp xpram.cpp \ - include/adb.h include/audio.h include/audio_defs.h \ - include/cdrom.h include/clip.h include/debug.h include/disk.h \ - include/extfs.h include/extfs_defs.h include/pict.h \ - include/prefs.h include/scsi.h include/serial.h \ - include/serial_defs.h include/sony.h include/sys.h \ - include/timer.h include/xpram.h \ - BeOS/audio_beos.cpp BeOS/extfs_beos.cpp BeOS/scsi_beos.cpp \ - BeOS/serial_beos.cpp BeOS/sys_beos.cpp BeOS/timer_beos.cpp \ - BeOS/xpram_beos.cpp BeOS/SheepDriver BeOS/SheepNet \ - CrossPlatform/sigsegv.h CrossPlatform/sigsegv.cpp CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ - CrossPlatform/video_vosf.h CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ - Unix/audio_oss_esd.cpp Unix/bincue_unix.cpp Unix/bincue_unix.h \ - Unix/vhd_unix.cpp \ - Unix/extfs_unix.cpp Unix/serial_unix.cpp \ - Unix/sshpty.h Unix/sshpty.c Unix/strlcpy.h Unix/strlcpy.c \ - Unix/sys_unix.cpp Unix/timer_unix.cpp Unix/xpram_unix.cpp \ - Unix/semaphore.h Unix/posix_sem.cpp Unix/config.sub Unix/config.guess Unix/m4 \ - Unix/keycodes Unix/tunconfig Unix/clip_unix.cpp Unix/Irix/audio_irix.cpp \ - Unix/Linux/scsi_linux.cpp Unix/Linux/NetDriver Unix/ether_unix.cpp \ - Unix/rpc.h Unix/rpc_unix.cpp Unix/ldscripts \ - Unix/tinyxml2.h Unix/tinyxml2.cpp Unix/disk_unix.h \ - Unix/disk_sparsebundle.cpp Unix/Darwin/mkstandalone \ - Unix/Darwin/lowmem.c Unix/Darwin/pagezero.c Unix/Darwin/testlmem.sh \ - dummy/audio_dummy.cpp dummy/clip_dummy.cpp dummy/serial_dummy.cpp \ - dummy/prefs_editor_dummy.cpp dummy/scsi_dummy.cpp SDL slirp \ - MacOSX/sys_darwin.cpp MacOSX/clip_macosx.cpp MacOSX/clip_macosx64.mm \ - MacOSX/macos_util_macosx.h Unix/cpr.sh \ - MacOSX/extfs_macosx.cpp Windows/clip_windows.cpp \ - MacOSX/MacOSX_sound_if.cpp MacOSX/MacOSX_sound_if.h \ - MacOSX/AudioBackEnd.cpp MacOSX/AudioBackEnd.h \ - MacOSX/AudioDevice.cpp MacOSX/AudioDevice.h MacOSX/audio_macosx.cpp \ - MacOSX/utils_macosx.mm MacOSX/utils_macosx.h \ - Windows/cd_defs.h Windows/cdenable Windows/extfs_windows.cpp \ - Windows/posix_emu.cpp Windows/posix_emu.h Windows/sys_windows.cpp \ - Windows/timer_windows.cpp Windows/util_windows.cpp \ - Windows/util_windows.h Windows/xpram_windows.cpp \ - Windows/kernel_windows.h Windows/kernel_windows.cpp \ - Windows/serial_windows.cpp Windows/router Windows/b2ether \ - Windows/ether_windows.h Windows/ether_windows.cpp \ - Windows/serial_windows.cpp Windows/prefs_editor_gtk.cpp \ - uae_cpu/compiler/codegen_x86.h'; \ - PREFIX="../"; case $(B2_TOPDIR) in /*) PREFIX="";; esac; \ - for i in $$list; do \ - if test "$$i" != "\\"; then \ - echo $$i; o=$$i; \ - case $$i in *codegen_x86.h) o=kpx_cpu/src/cpu/jit/x86/codegen_x86.h;; esac; \ - SUB=`echo $$o | sed 's;[^/]*/;../;g' | sed 's;[^/]*$$;;'` ;\ - ln -sf "$$PREFIX$$SUB$(B2_TOPDIR)/src/$$i" src/$$o; \ - fi; \ - done; \ - ln -sf ../../../../../SheepShaver/src/Unix/config.h $(B2_TOPDIR)/src/Unix/Linux/NetDriver/config.h diff --git a/SheepShaver/NEWS b/SheepShaver/NEWS deleted file mode 100644 index 42719c15a..000000000 --- a/SheepShaver/NEWS +++ /dev/null @@ -1,105 +0,0 @@ -SheepShaver NEWS -- history of user-visible changes. 2006-05-14 -Copyright (C) 1997-2006 Christian Bauer and Marc Hellwig - -Version 2.3 (snapshot) - 14.May.2006 -* Handle up to 1 GB of Mac memory -* Improve SLiRP network emulation performance -* Fix Native QuickDraw acceleration -* Fix a crash during MacOS 9 installation -* Fix a crash in the AppleShare extension -* Fix support for MacOS 7.5.3 Revision 2.2 -* Fix gigantic window dimensions on first boot -* Fix extfs volume name to "Unix" (Toshimitsu Tanaka) -* Fix unaligned accesses in SLiRP network emulation (Brian J. Johnson) -* Initial port to IRIX/mips -* MacOS X: - o Port to MacOS X for Intel, including the JIT - o Add a primitive graphical preferences editor - o Add support for run-time CD-ROM auto-detection - o Fix clipboard (copy/paste of text from/to the host OS) - o Fix extfs to preserve native folder attributes - o Fix extfs to handle file/folder creation times - o Fix SLiRP network emulation (workaround MacOS X bugs) - o Improve overall performance on PowerPC (by a factor 2) -* Windows: - o Add SLiRP network emulation ("ether slirp") - o Add TAP-Win32 network emulation ("ether tap") - o Fix CD-ROM auto-detection ("pollmedia" now works) - o Fix idle sleep ("idlewait" now works) - o Fix native cursor to be updated as soon as MacOS modified it - o Improve GUI for network configuration - -Version 2.3 (snapshot) - 30.Nov.2005 -* Add fullscreen DGA mode via fbdev in Linux -* Add "screen" prefs item a-la Basilisk II -* Add missing lvsl/lvsr instructions in AltiVec emulation (Adobe FrameMaker) -* Add support for old toolchain (gcc "2.96", glibc 2.2) -* Add user-space network emulation ("ether slirp" in prefs file) -* Add Ethernet and Serial support to Windows -* Add GTK+2 based GUI to Windows -* Add initial port to Darwin/x86 with JIT -* Improve portability of FPU emulation code to non C99 capable systems -* Improve interrupt processing in emulated mode -* Improve idle wait on Linux platforms -* Properly fail to load MacOS < 8.1 with NewWorld ROMs -* Fix native execution in Linux/PowerPC -* Fix PowerPC test-and-set implementation (fix clipboard) -* Fix Ethernet support in Linux, avoid hangs -* Fix occasional hangs during interrupt processing -* Fix High Resolution Timing code for Linux -* Fix support for 4+ GB hard disk images -* Fix SDL/x11 native cursor acceleration -* Fix sheep_net driver to properly work with Linux kernels up to 2.6.11 - -Version 2.3 (snapshot) - 21.Mar.2005 -* Implement high-precision timings on POSIX systems -* Add other SDL keysym translations -* Add some SSE2 optimizations to the AltiVec emulation core -* Add port to FreeBSD 5.3 and NetBSD 2.0 systems (x86 tested) -* Add initial port to Windows with SDL graphics -* Fix interrupt handling, registers are now fully preserved -* Fix support for native execution on recent Linux/PPC systems -* Fix support for Gossamer ROMs (PowerMac G3 Beige) -* Fix crash in Apple Personal Diagnostics on MacOS 9 -* Fix crash in Power Management on MacOS 9 - -Version 2.3 (snapshot) - 07.Jul.2004 -* Add support for MacOS 9.0.4 -* Add native port to MacOS X with SDL graphics -* Fix timebase emulation. UpTime() is now more accurate -* Fix hardware cursor acceleration in X11 -* Fix 'r' and key mappings for Apple X11 servers -* Fix video thread cancellation on MacOS X -* Fix detection of PowerPC 750FX and 970 processors - -Version 2.3 (snapshot) - 09.Jun.2004 -* Improve generic JIT engine to reach around 1/8-th of native speeds -* Improve 68k audio processing with "reentrant" JIT generated code -* Add Native QuickDraw acceleration for BitBlt (srcCopy) and FillRect -* Add TUN/TAP device support on Linux systems -* Add run-time depth switching. Support at least 1-bpp screens -* Add "idlewait" option to pause SheepShaver when MacOS is idle -* Fix ethernet support on little endian and 64-bit systems -* Fix initialization of NVRAM on first-time use - -Version 2.3 (snapshot) - 25.Feb.2004 -* Improved generic JIT, FPU instructions are now translated -* Add AltiVec emulation, emulated CPU is now a PowerPC 7400 (G4) -* Add initial port to MacOS X with an X11 server - -Version 2.3 (snapshot) - 14.Jan.2004 -* Fix several CPU emulation bugs, extended testsuite -* Fix FPU emulation, "scrollbar" & Graphing Calculator bugs are gone -* Add support for 64-bit platforms, more precisely AMD64 with JIT -* Add support for copy-paste of text on Unix/X11 systems -* Add support for wheel mice -* Better support for PowerMac PCI ROMs with more generic patches -* Better support for audio output (with pre-G3 PowerMac PCI ROMs) -* Improve native Linux/PPC port - -Version 2.3 (snapshot) - 25.Nov.2003 -* Initial public release with PowerPC CPU emulator for testing - -Version 2.2 (release) - 04.Feb.2002 -* Source released under GPL -* Integrated code from Basilisk II diff --git a/SheepShaver/doc/BeOS/acknowledgements.html b/SheepShaver/doc/BeOS/acknowledgements.html deleted file mode 100644 index 204e8d207..000000000 --- a/SheepShaver/doc/BeOS/acknowledgements.html +++ /dev/null @@ -1,24 +0,0 @@ - - -Acknowledgements - - - -

Acknowledgements

- -The following persons/companies deserve special thanks from us as they -made a significant contribution to the development of SheepShaver: - -

-

- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/contact.html b/SheepShaver/doc/BeOS/contact.html deleted file mode 100644 index b4c000750..000000000 --- a/SheepShaver/doc/BeOS/contact.html +++ /dev/null @@ -1,47 +0,0 @@ - - -Contact Information - - - -

Contact Information and Copyright

- -SheepShaver was brought to you by - - -

SheepShaver WWW Site:

-
-www.sheepshaver.com
-
- -

EMail:

-
-Christian.Bauer@uni-mainz.de
-
- -

License

- -

SheepShaver is available under the terms of the GNU General Public License. -See the file "COPYING" that is included in the distribution for details. - -

© Copyright 1997-2004 Christian Bauer and Marc Hellwig - -

Names of hardware and software items mentioned in this manual and -in program texts are in most cases registered trade marks of the respective -companies and not marked as such. So the lack of such a note may not be -used as an indication that these names are free. - -

SheepShaver is not designed, intended, or authorized for use as a component -in systems intended for surgical implant within the body, or other applications intended -to support or sustain life, or for any other application in which the failure of SheepShaver -could create a situation where personal injury or death may occur (so-called "killer application"). - -

-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/graphics.gif b/SheepShaver/doc/BeOS/graphics.gif deleted file mode 100644 index 10a33553808ea9b69dd054448f4fe53f5cb227ee..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 8854 zcmV;HB5B=6Nk%w1VVeO{0mJ|R|NsC0|7QRHGymg8|H}aXuM_C#=-AlU%a{Pbz`(e; zxS*h*n3$NDm;jh&0Emc)fPjE_cz9-J0AOHXSXfv41ejEjAQkdcy;k%kSIn3(Lsq@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQhriDRYJ)83GB%B&c~Ab0r215)`6TDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!4V+z2c&8)CuV5jGB*&(JNjyd`I6%q}1JGw#Wx~94 zG-2GT$JDab;C7}lw=k8-g}6&eaU|b97XWQ`7(xwP zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnIG~Vg zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#C@!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJip%Id7N)@tjmxaO+suDtf@>#xA78Y=^uK49#z$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7AxxmmzHbpx#*^=?z-%@>+ZY69x!aN3>aYV zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDGZQ0zfCN z^wLbPEHt@9d#V8gn=+t*s8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(wFY(19l>r_AylFJ$K-FbGmijS6h8R1Q-Z@Q{;lD zjrixFhc34NxGuw8GzL^tmpSL0?=3m&f&Wdx+@jZRd+3Uv&3f6dM~*h^St~$+1`*tD z{PAq(E_LIUPhIuoT1Wpo<_ajVIpL5aul@E)E8pqh*dM*A1zD5td+&eqef8knx9>jB z-e>Ij`}EhZa{RwqP`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ zjRFz%Wjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9J&^1u|OH$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!EI`dq z<&>9dy&T?J`&xo(fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)CIdAq6?wQ$ckI(P6Ls56jp;qe>&K&q!=eiZ$1;EVi=UhgxAT``OxSHnJ%S?P`lo+VT?FsD^FrZfiQ&(+;b* z$9?N#XWM1lCbzmH3GQ>}kd5n(cc9xnF;T)Bj4x!hyn%)7dXMyuTC5ku0Hy$a@7vDw z*7m)tNVba={ND%XSicqCs(_o$Vh@kFr4x?sg;TNN7XBmulrKmpI4&UtUO4Igh>ntfoQt zDs_NjdBLo`70C4_vcuN10heS3uSThrb}m$F11 zGsse|QI;08@6QB#*yX%*vcp_=r1jlj2`u8gVmO(6?cLTW%U#LYb)kMQdfR^va_LPN z^SeC&1`54Xkq=(%g}3+NN5$SD_m;SKRo_3w8{6+{ZMn1UvezxwT*>1;Rh`eK*X4@3 z8BgH&ixm9ngEe;5H{Dc!D_-=8E8@VG6~idj{DYs2S);o)du?YK-y1*t$VDBR$ETa= zmw&P5<6PWF58vEe-#58y-<@xNY1_5z2x8;+6s}g+w_V;(OWntg5e(cA5srPk9bJ`FBpZ=)DMDaN2D~0z13HZB|X{Y zVqGSA9u`_0mUzCii@w-bm)D9a!-v#{g_UTDw75+FMO&LFeArcVxz&3xC3|KAKD}sk zK9yD9cw?bQQG*|yxC3LzDKAx$@ph0aDLAOLg)Z4`Fo|Xg@B=l;emA+3HQAFsS&~2*l;=2< zMA?c)d6asXluF5kOxcu9_>@q2gi<+`L0FalR@s7BsYM*5G+miAUkPa^d4|N6g*Ql( zC1aL0h?XRymNm$h9kZ2Gg?$N@k*ShCv=dHs69J^BmmEnvq^B`qsFHB$F@vcCF*!4b znFEOlGjjQKfpdOY2YhK2JezYlo``b<)K67KPuSF!3dx3RxLta8bGay(p~;Y=8B0R< zdlY$^z!HX+$c~u!J%6cFuNi(wSWMxTn0X~)C8c(OLy{p@Tb{_7firpwcAWiqR#*p` z>==j*S&K7gcjcEcve}N)$#c$`bvI>>s*;`3xth>eRfGdy)>(7ANr=4(YG)@si+2Fl zH(|`wjpAc_9{G53HFUiQp1Lxambj4r+r?jQ*LNHPpw3vEtR+6_SyB$yjI%g~py+*6 z=b-O2mVFp=i8qa~H%{89kLKxJ)rn%%F_+F+WQHk=v-ytAbbIkgkSeF53#p)(^?5G3 zWB!RMhdGNhx=_^gQ#Y!63>b+_hmxc+ebZN5fW?n=`J)J?O#+5s+1ENV7o{hIpb<)) z&lym#i7{AuiDPJs4eE^{sG3cyn zt0qaS4p^8#RB$KgGsxvR5>O^7rGwG_VQ}{FIxUiPHVFNQj=9(C$%ceD~S5ES#npt+}r4VYjSo4i{YMwr|s?q7UgVmj0*HbV{w%W?9Qlq$X z>RO)np_Z4lmWz+`x3rr3oFB8JD@scIIfpNrqpae&Gis^?3ba~x%r4_ohu^GQs zyP$Y0y`*a@U7NrE9@ejg%DflaxX`T6x4syn!~HMC;l!Pb|aj>chOLgtbbRn~JaZs)bv8mO%5E zuKAC^La@MuzGi2qX3Vz{d#`KEux(7m>}kctS}M;}m%So47j>BC?K zpVhglf+)ZLAR4vw+q|hP$b*ZU={dHCteuJ6USPYt>dCl2T%=fBO&_^mAx58+*P)K{ zospM|a4V!WCbt%Rbk%#p?KOM#ySRiKpwf(43|!57%eu&$&9+HZA;!(mY-9%f!s8%3r3>yJfSFBre^A}ip+@jX}|cKsNlS)vzN@}jHWWG&ph{|an;Y2 zY)(pCb+02}e)PV*+mquGf3AD%Eb(e+KU}GjeRy@oM969mj+AJpF*(bd%ksz zn5JFQx_#HZo!5|^q0lRJSG`PC`p0`5Hz4b=$sMCC8_5hz$;Exa&pp+^G<0l@c2G?# zkUZ6rjI(XM-KuiQ+LXykw#oK4RIzJ}mwPp%EY3)6qJV76gDTQoO3P?X-$%xESI5f# z`7NlDYPn%M()dlg!CkS-#M5V6w0Tp^a|^O<>&(2h(Xv~4;@waz9pKa~xYk_K*xb~r zJEk4J(#{*u6*_+@ZJ{1q#ol|sQ>)He!_N5UUET%H?JeKEOQj>)SGks_T@?wYNb|M*B>6z zt-QTMZqlY2z4d$H_LSkbb<{)y`AZknZNEBHBdM-D(Zq+6~r+-l?WK!Jl5|rB~hmogR*& zTk71);vhWbTm8oBYQiU7GjsjLcb-LjE!@ib*9;rjdzR}}RM;w+*u{>**xECij@i$) z?98rg&i?Gg7VXk*M%2DToNY7NZtI}UX~Hh8TAbQmEbeQG>j&Pm+}X``95gF6+d3tg zs;*l}Cd)HR>nfZwx9-Mxz1s2A+N}5QrtYF43z_n$Io#Bmf5qeVj_O@q*4iELl*sTd z+sxTr$Pl0JwmH-eZ}Cv>>Oc(ZSx#P>JXPQA$(XgdoWq>&Ew!+Vwr3#{}g6-dyH9zu}78 z%^nWYjvnHWKH>|%?+Yx>Njok3fG2V@>MdPYSb4RONWQBX#mrpy+xnB>^ zJu3ATj_KTe&?Y{Qt1jd{{@V$z(1WkiKyUVQtUJ78<-9}DC|%xIW~G!0VPD2el^*v~ zul2@#<^&9}YQFVsF1UWLqxK%>S(Ckre)^y`#RXqf;fn z)QJB1G9UW$-ROUNiI3|TW|dpOt^;cWf}~# zjg0*U&iKGS{j%Qc>F?L;U&G%%MZ1pRF#NqV6aVP${z1Rn2}JDwhzSCRIFhA#qN%zn zfcwJkI@7f+wy}QmeLbldfWu=VBr;S(AG7IvLZi|twQ9X$o50ku*iELE*)h3nKBLp> zwP=g#8ix-sO3c3F^ZGr%Pja8YeJS}B8Xh7hDjoou2+Gl&*ey~rDO_S^Vpg7LdR}sx ze0qkCG?qLf5tg#jC``b{%1%s%zRu3pa^B*`>Mov=q|U9XXdEA#XdEn?F*F}MMkGU zTNVKWvm^@}ile0tUI}gl2O>+->|hypJAO%f<`3gBjrh#}c#J`jgvEr%1pX_@>|_>s zBIp%M!EfWtYR4#S(-zR@%b-P(MbJlLpHP9zFeGG#&7jnvRjox-w@z8qfjIJUB$E=x z%B28dF8!Leqr`W$G$g@Fkg8X!b+OotCMS-nFf*tD<+*R>z$DVT(d_9pAXa5*;Z9qc z)Eeb!8ZZn#2`#LYvE|+x2CJ4SXDps&oFjdard(#p#J2sILax)btw&zTi_`Clotg=2 zuz<~XOn}sYE4@q8Af3uA_eCYx*mP`_wM4FVeKawe(_2yO3vG5gVc1&BnnjD4Btf1v zgX|r|+gJ&OgGEC=th_u;j`+p%Ls@&5Kt@%8;bk@d(OX@ymRV`kotIjDwmFDWb!45> z7;_U^8-Hw=lClu_Y;gO(NEp?8&N z9ddUDkP_xMWNZ9oailVFWhUd24?dw=e30bSik6~W_?al$uxHW%7EoD*li(SZ9W`Q- z$yS749(7!pgthr07gzRG$Ci6?`KFdIsBWnx`bH!Wyfrp}v9Vh^5Y&tFF7|!K#S$ zl+Y=!!xCF86TTYysx7AMi>!ZrZ z`PdoKu-NV~;k-cjju63VLFE&M#bV9wW)I|s$78O)> zX%<~=2QVbC4f)PY;aV9_{9S!#B{vO9G>SA?I>ok*&8`dC)nn z9AelFH{($1jV&3*oh2P)l17uJhQ^xFOW19%g)AEiv~l5+Wgvez zM@d{={xMm!flxYk((g};u6o=H@~n4-b|25O*`pON@xEV*up!;iMJ1-i; zb81GNy3;%~DX=(fN}VMh_?$T5267X8kEmLuG6Nnk4|hX{1z9n|L}(9JA-sd5wzrE& z{RxKrBA~y5wL(37>O7kQ)edzy!w#Cug*O}`5qFisl@&3GN`%!BLAb;xLXl5Rv|$vh zXvH7aYE(7U+7-nyEg#w9i_)6^7OetdtE`PcSY7nNwtAt)LbMSVZ)BFZ#)U;QYVm_q zGzRB>kMwxQMA|g*#=8C0%{+~y-p#I;!2tsCaC>xKf6U3a-mynD z%gdiJ0oRz|O%4ppOkOkpOZmCe!4jJoqNI30YRg#m^PkKZraMELJ#eB?1Y4Vs?fwI{ z{Sb$Dkip9Eh9^&Tk)Wpty5~R<@=WLfP^4Z$Q#7G@Qt1`-In_&8U8WQ}n9eSm1sRHB zz(=xo!U#sT1m^qR$3BLf&mU!d7Z{C)Px?7EmHjK_VoC~7xpuCUJB<>DtjfVGdN8Iz zTB9PP8bJ-xsgh3^Autyxf(AB8mNd)YD;cQRA7E98gk3CMD{(?aeD)Byl<8(;nbmg4 z(1fXlWM)-Z+GcWUj(y1CM0!};J38Wwr+qDNdpm{E4%WBA9j+Eyi$vlgH@TQiXaN_h z+~-2q1i+PTbgN7M*y*xBjMm+560xg-IOc-8;vJ%QXVcm7qSuJVbz+~QN{w{t(wieV zED!jB9W)B;vgs{idH<%@uLxGFr6GtkEGdj6Wi7w^6>fh!@n7imQkV$Y&SA4dBY#fj zC19b0etL2i@&t6juWfL9SJ_l}whSoxvFBHg0-&DBB?&4LaEvyh;^paA#499mMIKBf zW(a4iuTdxbMA2b~cFk-Y#&Keptm6@{*SRJ3+ghF>rr$J112;zTQvNqL`*cml`LOad zOhOkM-}KB+hB9-vn9J|#^l+eLwzS>}s_mIPlvfX#8jj{8ew>sz?ui02U zX32STh3G{8D{;~DUG1t6#q*uow*v5Rf&V!|%G%i8_NBDV?Qd_%+u$B|D8x%radp7$E$P49a7 z<02n9$x9A#j(7aIA8$j*4bbnG%Oc_^PdQ#-4s$20oDm_PfXRFAbCL7h05hlg)qZaD zqf1=>;m%IMz#-1_*g`$(Qs)!{faVe*`3{N;U+d8aFW^n>?2S4 zUF)463PfMYX+ZTsT=-qz{sG|o`JDFI0QdP`@g1M|(yV+ zC7=QP-wP_=622b3W(tx{@xqg; z7s4SSq8}hOq8{GhJoKRo{NV~tVhuhbB--5=ZlcI3;tViiD01Q;dg2d&qA6nk+$gR< zDY9b8Nnt96;VQ;r#ku0r8KCB|f(_E5DpD67?BVuZBGV-v10Z8ED&sOTV>3GAGeToD zcH%E$q5(wXHDY5nYU40YU@`7u#MvCo$y_B8VmQ7W&UxdiwA?M~o%vB?2-O}twj(*d zW3;8CbRk?m>f=7TV?8cQ&M|^H3M4)HW2^vVLBiWXA|$&hSWYukw&_n7d${v3gu7|WlIXl4V)iTnGRFJNhEL2mk;8 diff --git a/SheepShaver/doc/BeOS/history.html b/SheepShaver/doc/BeOS/history.html deleted file mode 100644 index 8d016a739..000000000 --- a/SheepShaver/doc/BeOS/history.html +++ /dev/null @@ -1,59 +0,0 @@ - - -Revision History - - - -

SheepShaver Revision History

- -

V2.2 (04-Feb-2002)

-
    -
  • Integrated code from Basilisk II -
  • Source released under GPL -
- -

V2.1 (31-Mar-2001)

-
    -
  • Support for MacOS 8.5 and 8.6 -
  • Support for G3 ROMs -
  • It's possible to select which video modes are to be used by MacOS -
  • SheepShaver will not use up all CPU time when "nothing" is running -
  • More stable networking -
  • 16 and 32 bit window modes -
  • Small bug fixes -
- -

V2.0 (20-Jan-1999)

-
    -
  • "BeOS" icon on the Mac desktop to access files on BeOS volumes from Mac applications. -
  • Handling of removable media (i.e. automatic detection of disk insertion) -
  • More flexible parallel port selection on BeBox -
  • Greatly improved Time Manager (higher accuracy) -
  • Fixed "audio lags" -
  • Option to ignore illegal memory accesses -
  • Adapted for (and requires) BeOS R4 -
  • MacOS 7.5.5/7.6/7.6.1 run better on some systems -
  • Small bug fixes -
- -

V1.1 (13-Jul-1998)

-
    -
  • Support for more machine types (esp. PowerMac 4400) -
  • Corrected time zone handling -
  • Volume list in preferences handles dropped volumes and files -
  • BeBox: 16/24 bit modes have correct colors with a Millennium II -
  • Video/SetEntries didn't set last palette entry -
  • Mac programs trying to use the (non-existant) SCSI Manager shouldn't crash any longer -
- -

V1.0 (18-May-1998)

-
    -
  • Initial release -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/icon.gif b/SheepShaver/doc/BeOS/icon.gif deleted file mode 100644 index 51368b117dcc38bde6f0ac4457387bad5fd31efa..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2011 zcmaJ=X;@QN8a`ma0F_2r3>syr9YKRdt|&{30R{<-bXXM(#fag`B9wN_V^q{=A+nS) zsfZV0#voXrBBWwjq{C8V8oAmAiW&hU$f^ipfwK6(o$vCizvetio}BZ2@B6*)d+zn~ z-{b0bh=+J+7SW5zWU^Q+Hk)l@V`Fb`@8sm<>gvkl@%VgxP*6}rM1)W%jEjp)NlB4N zBvPp~BO^mDmlFh`R4U8L%2X;|kNQ7=9l#h_~&oxl?|H}kMQ4~pkNRlE*3MVOyq!2+- z1Vs`QK~OkBVFZP6ioz)prwE+FaSFpJ1W1e`F$ySfjKVMq0fy!P5Ol#YfdGbZ5~$%z zk_1V@1|vyCchP%-AaR1k2okzrHk1jR#BmbCNd!8e6(b3Z#4!@XNCXOKfuIN^z)T$Y z2?Xu5R-gku_zws~OQ6|d;RJyZ&_z3eVX((>0s|blg27P32pl6Yj6lOOM7yU8U=ch4 zKZbAwwrSxs9@K#xMEj$)0v+%H0jK~`P=^Cp7>*;FgLVSLV2@!qTm?m;<#g#>FsjN7 ze!wS$NT))p0RVVKba=FL5C?cr2SUIx42Nkz2YiSYNaq4|IDm!d`=PUdxPcZNf(Yn? zXM-Zqa_SH>j2zfQz+Iu`oah9h6MFgwh`9o2M@W?i-#R zic7x%^t*tVP&4B2RmzsHm}XlzOr@cy==DG&aQ87d8f;)d}O`ax5d5+ zmSaSjy0a+YoMZTxj7;aD_B`&vrR?}a!}qTmgztQW&0Ci<*+gX&99V;ZCKXNIro zUx}_mv&SxUWQBW5obpD4+sd(8U5{6`|Pg#`jX8>{Fac7IeC4C*4yGZGV_lkcxjp&WfAFXJ(c~kUE;ak3$_VG zO3O`lB3+u|d+qx%*Ie!he5O7t)uy`WB!^}0OS8Rcp87`3AwK#+C8EbOUzO|(=sZ$< zWv}I(flH!24lPHf%DZ%zk0z&-Twx1?I?fkvA1p~TKQK3tA9_IktwG}5@*B#eb!$fo z4?Z>ul`e|Ph+WO))@6wFdjTFoewti<>^!DY;RHgAey7hB+_vXsW6Yg$F=foLdePM*x!$6%ppr4(*sW=> zV3}7Xc^#Nf+U-1%nC!VRcwSl>65=u0V2EX{_47OH+kQ&+u4rIq zXPVV7DNcp?_~me&o5Xs;NZ;{&Y3vrmeg=B5VaKNGl{-!es~@_(c^&kt>0+<5@57mH zdFQ&7K6>8tmrqu5IL2rAFEHOm{k6M}omu#@a(DRU z|K8nL8u@mGv~i&ZV=f`p`o%-iv)n{A_3DVnUu~{`c-SFOkFvet>R)x%BED}$NN^im7Uc>;BI}E)Gt^X6-P!)J4+j7_sV6a_ti!lzWIs!y(ZnM@L%sW zH~9IOYFR5>D|F9n#JSOr_F4x%@RL0rzMCgBxqu4!KE$Zr<}ItTKFfV!GIPjr>lT## zUY8v@slDlNz9aidJ>m6g-|CtEAUi<`&-@wN*W#D2WB;*9uwm@@&l#^LL!y2(H5sa7 z)%R;WSZ+|`ltE>Hf ze^XOab8~Yb5a{ge4242Mh;TR@iA18&==k_}EEbE$PrG%0~ z38A=9Oeo??aV5DDTyd@#SAw2&Q9n$(VSHJ-e0AK-9 zh~of@aZVaTD?u~t8RHm*Qncc(_Jyg>*Wd>_VWM_Lvq1s0k~U8(2RYP(9f&|Nnxh-w zfJd63_62bqV3D4W_5yYT779TEdAJ)&(u(V_87+S;6POjP_@o^~DpbPG6=jg3D^Ujn zR=8*v00a~e)f)8V^)N7R+#OY@zX1I$kOi>^a?7LPiB{Y@cRV`ers@2`w|z$NdKVSu zRr)zusO5s2V#@MZSOtSoH9>iRo|bV zekHGGdGe0Azx4dlm1MOi-BxxafA6$sXM2nJla!EA*N;l3hOp zJwvy8{hJo|RP=w*ej~c^P*0bq>w3mV-mT87Gsh24Wj%R!WJ_l3Vn*ceO}?LPDYL&! z6wHsf4h*;58aGugpNsnUcMY3%E?qh}ai_JSyZ6nz*LDwG8@<1olCG0irOo93Pf$`zLPS zun~xEtHSRbi8rRR3R1L0OEq;8>8ab8se(l_z z`a$1~Zx6Ow2QJQeDtDw^+HLaJ8^OlWd(|JC;tNliPj4?af)719mRDxoVl;R%il3{! Kyw<#mUj7$_>qdM4 diff --git a/SheepShaver/doc/BeOS/index.html b/SheepShaver/doc/BeOS/index.html deleted file mode 100644 index 523283335..000000000 --- a/SheepShaver/doc/BeOS/index.html +++ /dev/null @@ -1,28 +0,0 @@ - - -The SheepShaver User's Guide - - - -

SheepShaver V2.2 Installation and User's Guide (BeOS)

- -

Contents

- - - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/installation.html b/SheepShaver/doc/BeOS/installation.html deleted file mode 100644 index 105d9c8f7..000000000 --- a/SheepShaver/doc/BeOS/installation.html +++ /dev/null @@ -1,25 +0,0 @@ - - -Installation - - - -

Installation

- -You need BeOS/PowerPC R4. R3 or earlier versions will not work. - -
    -
  1. Unpack the SheepShaver package (if you are reading this, you probably have already done this) -
  2. On a BeBox, you need a copy of a PCI PowerMac ROM (4MB) in a file -called "ROM" in the same folder SheepShaver is in (but you can select a different -location in the settings window). SheepShaver can also use the "Mac OS ROM" file -that comes with MacOS 8.5/8.6 (look in the System Folder on your MacOS CD). In -order to legally use SheepShaver, you have to own the ROM the image file was taken from. -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/introduction.html b/SheepShaver/doc/BeOS/introduction.html deleted file mode 100644 index f33567870..000000000 --- a/SheepShaver/doc/BeOS/introduction.html +++ /dev/null @@ -1,45 +0,0 @@ - - -Introduction - - - -

Introduction

- -SheepShaver is a MacOS run-time environment for BeOS that allows you -to run MacOS applications at native speed inside the BeOS multitasking -environment on PowerPC-based BeOS systems. This means that both BeOS -and MacOS applications can run at the same time and data can be exchanged -between them. - -

SheepShaver is neither a MacOS replacement nor an emulator. It runs an -unmodified PowerPC MacOS under control of the BeOS at full speed without -any kind of emulation. So it also uses the MacOS 68k emulator to run 68k -applications. In this way, SheepShaver is comparable to the "Blue Box" of -Apple's Rhapsody operating system. - -

Some of SheepShaver's features:

- -
    -
  • Compatibility: SheepShaver runs MacOS 7.5.2 thru 8.6 with all system - extensions like AppleGuide, AppleScript, QuickTime, QuickTime VR, - QuickDraw 3D, Open Transport, PPP, Language Kits, ColorSync, etc. -
  • Graphics: The MacOS user interface is displayed in a BeOS window or - full-screen (with QuickDraw acceleration) in resolutions up to - 1600x1200 in 24 bit. -
  • Sound: CD-quality stereo sound output -
  • Networking: SheepShaver supports Internet and LAN networking via - Ethernet and PPP with all Open Transport compatible MacOS applications. -
  • Volumes: Any HFS or HFS+ volume can be used with SheepShaver (this - includes Zip/Jaz/SyQuest drives etc.). It also features a built-in - CD-ROM driver and a driver for HD floppy disks. -
  • Data Exchange: You can access BeOS files from the MacOS via a "BeOS" - icon on the Mac desktop and copy and paste text between BeOS and MacOS -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/memory.gif b/SheepShaver/doc/BeOS/memory.gif deleted file mode 100644 index 9867b003e7f6922b967f969903d0154343e986f2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5510 zcmV;16?y7MNk%w1VVeO{0mJ|R|NsC0|7QRHGymg8|H}aXuM_C#=-AlU%a{Pj$jHFJ zz__@$u&}V8prDwTn3$LVm}UTwkdTOoh=72AczAebnEz&G0AOHXSXfv41ejEjAQkdcy;k%kYKn3(L&u@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQ_@mDRagl83GH(EU0-Ib0r5478IgXDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!51egKc&8)CuV5jGB*&(JNjye3KtRfn1JGw#Wx~94 zG-2GT$JDa*;C7}lw=k8-g}6&eaU|b97XWQ`7(x$R zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnK%kIo zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#z8!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJrs%Id7N)@tjmxaO+suDtf@>#xA78mj}EN?`1<$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7Ava+mzHbpx#*^=?z-%@>+ZY69x!aN4j5qX zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDqy90zfCN z^wLbPEHt@9d+LD$n>yfus8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(wFh<2O~ElnA5b^nZ5M9%;k>>r_AylFJ$K-FbGmijS6h7m1sn)|Q{;lD zjrixFhc34NxGuw8GzU~umpSL0?=3m&f&Y!c+@jZRd+3Uv&3f6dM~*h^SucQr2Nc|H z{PAq(E_LIUPhIuoT1Wpo<_j#aIpL5aul@E)E8pqh*dM*A23eEud+&eqef8knx9>jB z-e>Ij`}EhZa{Rw)P`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ z4FeJNWjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9KsH1~OXI$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!G(gQy z<&>9dy&T?J`&xo}fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)X+~bB!3JukjhbVhw%Mr}ZM#xyy2O(vm8&f+YSGR5)u5D@$VT<5 zUT-LLZJNZW(s=7L8k>`1jrARm&20Cfme|dXw)UQ_Y*%?( zzfJD8QG44tWMjG49m#N`8;j~@x4bd!?um&q-t*2ku1ELod$&s808iSv?LE?E2mIhX z8~CpAjWu$f%9y_#vrn-p+sFdb%PL0r`!FhTY$}&=rBXPz8D7nY-VCcT9dUyL`el<# z&YynPIO3dlPo%+jp*Rm{$m_lEf1eGjCGFo#9j;St;uo<%FB>)gW6NcN%G_`@m#fy2 zu5(g}Jl#GY6=@F}Sq^`gr3(f7cS(!!9Up)LU3U7@3kP^l5TSe~X$9fI9?*1bB` z?2+whK4Xq}rqMjXucJKYimYA8_q>p$`Yw)FI#7r=uH)RzJ@k+qc)V$u^rh$7P!GT5 zs1)4DuCF`ngU@`AT^-(bZ@%;|_I!UYfBM)DR`riR?(BPiSKF8T_s8#Mx?}zNLxj!T{}| zi1&hrzSfDpCW3BAf(92lnusrW2!PuIgoB7UikJZZuK0?s2z;nWZ=tw_N7gnJkc+yw zi@7L^v)DAMIEpjpg1?w;fv9||Sd8=+jMk=%|Hq8o=Zxu_bp1sXfW0QUzs^akq2uNPtqq zko%QUte278lQoOiPYYI(<#du3riJlXO(gkwf#-QBiI3SNVC}?AH`$UT7Lji_k)VQm zuSJeIsgu;vQtPNqG=-E9Ns0Yti`|%%`X-S7R*8LBnU&JFm0ZbuUip=!7nWkVc4S$W zGIy3}iEwJUmI2q6Zh4h5DUxvsaBx|d@&=b2gqOyqmlyDtfEk!xz?Wy_mpqV-gh@q) z*#RA31B|IDq~wcthkB-xOb%x;6_=RnH<$7!Oo##1Z3TAkj zxpm(4I(Zjj7FnOYMO^%eWT2N#OF3KrbMsqwvs?n&oSYeip81@i`Iy_Ko$zU%dMBM3 z7FmJCOz7D;KiNA2re80YHUkA*J8F=b}vC>SGz{oH=ld_#~Nq26H9Dq^uc$QaON~`8}u=OAv>V zx{{?ILugTIX9=2&()0sgx@rbOwc*w&_UI!1I_r(blZcxt9_ z+Ki&ImwUQIekquOS(Sn6KS+uLhZ`qLqnRjEa0hDT;nNSbo5sc2ugKH+&pP ze22xH9amdA_o{g%Vl@SY$Mcl~raoQ-)*?fHXv^ zoDu7eX)`z{D^1}upkJ3?yZ5X;HKQ7Pt5iuU3lMBJu&A}lKz=!sLCZsWNv1^`M0%RE zf(o$J$h3Cqv_K2BQ?#`IR9i$=+dz@HwOre^DkPxp{X4Yzo=36!^c8@RX7w^D1UcEI|z)cvqT$AP-%O6r*ac#nr(BrnR~itu(?wzh;d4qfrELNS8?-+ zWrt(BsC&C&pt@mOiBo&5<7klC`m8nURUa~VgWrWqAWmYr);yvJL; zLXf<1!@Hm+ULq!*i@sH(z6h+q5PSm+ELjdrMFJeb);qz= zJ4HR4wD-%obeTj8fWajE!K;gmt$VdqEVKta!&)T6Hhe%hoWuXK z!#r$1KK#S<6U0L7Y&BfOPDI2=oQg-h#7U&YPJBF29L2_X!V;OQR7^xuoW-KE#axVR zAk48}+(2GD#)nhJX3R=WoW?P{#%xT(_?yCS3_xf+$6-^)c1(+5?6`T1sBYZHejLYG z49GqF$Amn@hJ46IEXVsdgM7-y)5)w1Gp_u~Dih1Hj54%b%b}LZQ;W;yX3D(mNxuBccO1;ZtjDR0 ztBqXDYOKqKtIU#2%+73T&>YQ5bIa5$XVZMmKV!|>tbN(s%?bC-;QYzVJkGsb&gKlv z=$y{Oyw2=w%)2|4o%_!FcFa3V&+x3g6^zfoD9-#WOaA=Ne-_XJO>6F4(9e9(2wlkv zz0l#@&<;(`dz`-!y=Men(Hg_e7=0=lz0n{!(Q@q3vwYDa?adHf(j$G+C~eCmz0!u( z(k=~tFdft7r_wb2F&%x=2sP6>-I_ez)8_QkK)ov5NVi6P)JUDwO1;!f-PBI~)KDGO zZY#C_Lk&N?Th%+GT3D@1^1RjEbJbowNnjn;gEZD;&DB(T)>hrsYQ5HJ-PUEs)^Huy zZ_QRxeb<2b&#H9+UMoVY_RD*{01z|S1k=Iz9N2`N*Z^bL^o-c{g4a!bFN|H6kj>P! z;@B6U*qZ&=_A=RSnc17I*ni!?a?MtPZ2*}KC!p=wYnj?#GTIbe+97w^uKg8~wc4<) zjkOIDw@oXUZ2&b8+7ENvot@j(=-R^VFugr1za8Ak%`n7m0IZFc$o6wV-t|2&=dCLL z^j$Ct;0y|2FCGvu1)ebXZQRnR-v-kF&d>n+a^MH9F#Vk>|4lF+FyIbO;08|N?JeC3 z?u-mhFb)pkCEhO+j^N?#+uDs#-0j>LKH&G_3;?VTs>P;{Kehe~>N{u*PIRG z0KVZ~J^?iDSx(toelS6901A)+IbP&o?%`rC+g9h~1~cb5?&Sp@=qZlm1(V?K zZRQ1Y;!oFw=lkU6050J6k^u#-<{qHwY;FLa?&ct#=udty4t@;(8?NSe zp6P~u=#q}!V{YmD&EFr6-{>0W30Kr3vmP*ruH}jz?Eb>*4;SlYUh2kv z?6n@^%J}2Wt}n=bGs=$IxIXRtGVE|(?Ao3$)m|zW{_Xq1?QtpX_;Ue|rj*)|jdJr3vh4g>Sfy7m6pm95m04eik$@JW5y*PiYLW9!}Q*a~0R1Ru(Q z-Pa%#@t&;J1|QXW&E#|KFCpYlwE@+==LEwt}4Kl3zS z^EQ9;k`hWKyz@LC3GepuH8U*WGW0}W^hSU5NT2jdzw}Js^vja*P#^URQa|-nU-edB I^&tQNJBtH3EC2ui diff --git a/SheepShaver/doc/BeOS/quickstart.html b/SheepShaver/doc/BeOS/quickstart.html deleted file mode 100644 index 62f9be15c..000000000 --- a/SheepShaver/doc/BeOS/quickstart.html +++ /dev/null @@ -1,38 +0,0 @@ - - -Quick Start - - - -

Quick Start

- -The following is a step-by-step guide that shows you how to get SheepShaver -up and running in the quickest possible way. We assume that you are running -on a PowerMac that already has MacOS installed on a partition of your hard drive -and that you have booted into BeOS. - -

-

    -
  1. Double-click the SheepShaver icon. The "SheepShaver Settings" window will appear. -
  2. Click on "Start". SheepShaver will try to detect on which partition MacOS is installed and should then start booting MacOS. -
  3. If this is the first time you start SheepShaver you will be asked if you want your -network configuration to be modified to enable Ethernet networking under SheepShaver. -If you want to use Ethernet with SheepShaver you should press "OK" (this will change the -file /boot/home/config/settings/network; a backup of the the original file will -be stored in network.orig). -
  4. To quit SheepShaver, select "Shutdown" from the Finder's "Special" menu. -
- -

One word of caution:

- -Volumes which are used by SheepShaver must not also be mounted under BeOS -while SheepShaver is running. You will lose data and corrupt the -volume if you do this! Don't press the "Mount all disks now" button in the -BeOS "Disk Mount Settings" window while SheepShaver is running! - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/serial.gif b/SheepShaver/doc/BeOS/serial.gif deleted file mode 100644 index b491d769dea310cfd695607bf91ca7b1749fd6cf..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4844 zcmV41ejEjAQkdcy;k%kSIn3(Lpp@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQhriDRYJ)83GB%B&c~Ab0vlh5)`6TDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!4V+z2c&8)CuV5jGB*&(JNjyd`I6%q}1JGw#Wx~94 zG-2GT$JDaT;C7}lw=k8-g}6&eaU|b97XWQ`7{Ux( zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnIG~Vg zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#C@!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJip%Id7N)@tjmxaO+suDtf@>#xA78Y=^uK49#z$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7AxxmmzHbpx#*^=?z-%@>+ZY69x!aN3>aYV zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDGZQ0zfCN z^wLbPEHt@9dzt|Qn=+7rs8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(bq00M9l>r_AylFJ$K-FbGmijS6h8R1Q-Z@Q{;lD zjrixFhc34NxGuw8GzL^tmpSL0?=3m&f&Wdx+@jZRd+3Uv&3f6dM~*h^St~$61`*tD z{PAq(E_LIUPhIuoT1Wpo<_ajVIpL5aul@E)E8pqh*dM*A1zD5td+&eqef8knx9>jB z-e>Ij`}EhZa{RwqP`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ zjRFz%Wjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9J&^1u|OH$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!EI`dq z<&>9dy&T?J`&xo#fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)X+|EX8GX1;ckI(PGxgd=9X3@1&D9#4D61`Pyji!p)RUZaC12GZ zIHc>n@K)8&;U0sy#KE0yfUA4pC)4=Glcw-=Gu(X`@0iF({(?-drh?3b)k%l z>|_htE3n%gz;m~5S_gk(wXdCLK)<)tM-_JkOV7I+mTN)fyL6D5?z^siyxt-|fzEe+ zr-na#s-gb!x5vD5knJmh6Z~Di>z(qz0=sBce*n7A7kUW&Jm_yO`ck$%>ZUKci-Bz8 zr!G12*{t&TDu1)fXW660*K+H-`MuEhUeTlv`r_M{a*j3q`u@(o;)9QJovYmX;1B=r zOJB*0o8SBBPk+M2&-){5uU;!8Vf^Kfvc%WF+ok4t0yu#G1XzFucz_33fBg3`{`YYg zr*8|Wexvhl+DCp7c!9gpfI^3X9B3;VxP9DHLkHJ^c1C{=SbhXYFa}40^S6E#*nS}Q zaQnxC9rJ+}7=rJIG2cgnHE4nxxINvcgEPp38e@Yn*l;;`F*`_vMd*Vd7)&;YbM6## zQCM`r5`?Ukg{-oKOekkgc!M-|bVzr43&waCgN1NMD_q!x7Gs10S9JH(Q#FM*Q`I|M zr(#}rg_qYij+0r(pi)Fthl4eQY#1zVSZ!38cZTIS_$7ItB{fmlR|dp1Zd67Jrks8T@964AU)R74H zkxYk>5h;>iM3P1GYc@cSC~0jfnRYy|T~R?<%~*_(C|x+|OfQK`1<8z^$dYzMN&(f7 zy*P^6M2YU$lP&j?E-5%dsVPM1Wsap}K1Esod{}nBs5gJeWqo*+Ub$OLsWdTJeKR?g z++|H#BaGICcd`XtxrK>@2WCn+mZ7$f|3@kYca~b%V!+j0j;K*$`CzXFi!`-d-DsDH z=agu+mped{&yza5!%SotJ*r;W0Sw5v0 zjn8M52QX!w$#xUyaX)C5k9m@_=|p8oH>jnXyQxIIxl=z7oY6L%#wl^gnVkK$oXjb2 z&iS0{7M;>bZq!+w-gceX36qSuoh+xF-pOp>8J@;Ap5%E(=6RlDl%DFDlHJ*!(D|P5 zIi2!3pVnEQ_L-gdnV;PGnYYQG%f_Dn018C{I-tC{p9Wf<2%4bixu6WXo(}q;?&+UT zD4}9hpcWcL7@DC!w4ofjLmv8}4iusy%0MJqq6l=NC<;I-x}yHmqAprLFdC!pGov)x zJ~n!z+moX@>T40&qeR4`K#Fa(>301%q)8;CNGdu?x}?Weq`-HiPO70lI;A68rB-U9 zSem6Nx}{voqF(x?FB+y|Dx+jtrZsw|Xo{n1x~4nYrf%w^6bgoM3Z`=^rFHs0O`4}o zv!{H@aZt*B-hh(V#s(Ndn`joBuq{Sp|p&F~kld87bf2^9TeY&f>3aGP6 zfu)+MzsjV(TCA^jtjJ26!D^cox~#0EtkC*&uL_*g`g78Ht$UWO+A1@++O1w#t>B7l z;ySL;TCV2WZs?k>q_(c?N^kD^u09#B^4hEPTCc$RDbI$ln8vOA>M`H?uecJh0_%bP zTCh!cuLvut&1$5ky0Fwrs(A^qBzLeBYls$mv7o518tbhY+p)^{u^>B4B0I7JTe2o= zupFDRy1KF~dzTUmnlI~nG5eo03$qOyr4M_vwC1ur+k-y)vl~OOLQ8!?TeRU?v(JjO zwTQAzODaT*v{75MQ!BLpRr|A7%d=T~vs*i}UHh_M%d%mcvSVwqWjnHG3$kh3v1_Zb zZF{kAOR;eav2(kyb&IffTd;X6uzUNjeao+Zi?0y5kc3;fhI_b(o4AU*xQyGlj{CTf z8@ZA@xdiBxPrEa!b-B7EtVXH1gG8&ITV|Xax(@`pqzg);d%A98x~jXm&f2;*lew_# zF|s?m9Fw_}o4W}qu&Oly0QtKeG=jF;y9$tk#tSej$gjkEyv)ll$&0VcYcIMxz4!9G z&pExiTPx8!0nN+2-20EhJCNVoy(xHb+iL)D^1arZoZOqfv~s>-AzA7hzWLa`U?IQn z%eod;yar&uWV892=0P|a&1yTre3h#7<1a zMoh&?T*JG`!~)~QP>ja?GQ~)2zC4UjK3oF^)5ZAW3w^ z#itU(K>Wr3mka@Re94=9!VkQ}pUlNjoB$QD$D{npZQRJO%T{p=!UQwO2C&DMT*So8 z#)>?{W30mIXvP7f#+8i7tX#|u?8c7l%UT@BlPtvcQUOKG${FCzu519}49kBk%i4S} zPJ9es%*wdj&B?6H*4)db0?E#d!}~(R%p8vQTrlHnyrz6JZwyVpjL$B-%zzBc2K_Gq zT`H)&(Eg&&2@TOX%*Y8m(Dppb6s<23jm`?a(Hw2j6@1P0T+krRFCFd4>3q`o($HLl z(Q*7U2#wA%JjaO_kz8-TfO_t&qO`B+6&VxZ7^hPuF>1n z1M}2z<4U~1d({|p)S8OBNuAWZJJ7a!YG57K8&kVvjWK3@)=V_kYJG-m-PTw5)^PoG zyX4b$eb;!M*LuCzF%U|?_Sb+N*rPy!b4@eD0xpQ1*owW_jNRCd{n(Hl*^<31U0vCh Sec70u*_yrCoISlE0029JP30i~ diff --git a/SheepShaver/doc/BeOS/settings.html b/SheepShaver/doc/BeOS/settings.html deleted file mode 100644 index 7c05c2a91..000000000 --- a/SheepShaver/doc/BeOS/settings.html +++ /dev/null @@ -1,127 +0,0 @@ - - -Setting up SheepShaver - - - -

Setting up SheepShaver

- -In the "SheepShaver Settings" window that pops up when you double-click on -the SheepShaver icon, you can configure certain features of SheepShaver. -When you click on "Start", the current settings are saved to disk and will be -available next time you start SheepShaver. - -

The settings are divided into four groups: Volumes, Graphics/Sound, Serial/Network and Memory/Misc. - -

Volumes

- - - -

The main part of the volumes pane is a list that contains all volumes to be mounted -by SheepShaver. If this list is empty, SheepShaver will try to detect and mount all HFS partitions -it can find. CD-ROM drives are always automatically detected and used. - -

SheepShaver can use HFS partitions, whole HFS formatted drives, and it can also -emulate hard disks in single BeOS files ("hardfiles"). - -

To add a Mac volume to the list, mount it on the BeOS side, click on "Add...", go to the "Disks" -level in the topmost popup menu of the file panel, click once on the volume you want and -click on "Add". A line beginning with "/dev/disk/" should then appear in the volume list. -After adding volumes to the list, you should unmount them on the BeOS side again.To remove -a Mac volume, select it in the list and click on "Remove". - -

You can create a new, empty hardfile by clicking on "Create...". Enter the file -name and the size of the hardfile and click on "Create". The hardfile will be created (this may -take some seconds) and added to the volume list. The so-created hardfile will have to be -formatted under MacOS before you can store something in it. If you start up SheepShaver, -the Finder will display a message about an "unreadable" volume being found and give you the -option to format it. - -

Double-clicking on an entry in the volume list will add or remove a "*" in front of the -device name. Volumes marked with a "*" are read-only for the MacOS under SheepShaver. - -

SheepShaver will show a "BeOS" disk icon on the Mac desktop that allows access to BeOS -files from Mac applications. In "BeOS Root" you specify which BeOS directory will -be at the root of this virtual "BeOS" disk. You can enter a path name here or drag and drop a -Tracker folder onto it. The default setting of "/boot" means that the "BeOS" icon in the MacOS -Finder will correspond to your BeOS boot volume. If you want to access files on other BeOS -volumes, you should enter "/" here. The "BeOS" disk will then contain folders for each BeOS -volume (among other things). The MacOS will create files and folders like "Desktop", "Trash", -"OpenFolderListDF" etc. in the directory you specify as "BeOS Root". If they annoy you, you -can delete them. - -

To boot from CD-ROM, set the "Boot From" setting to "CD-ROM". -The "Disable CD-ROM Driver" box is used to disable SheepShaver's built-in CD-ROM driver. -This is currently of not much use and you should leave the box unselected. - -

Graphics/Sound

- - - -

WIth "Window Refresh Rate" you can set the refresh rate of the MacOS window. -Higher rates mean faster screen updates and less "sluggish" behaviour, but also require more CPU time. - -

The "QuickDraw Acceleration" box should always be enabled. It allows for faster graphics in -full-screen modes. But if your machine uses the "IXMicro" BeOS video driver, you have to disable the -QuickDraw acceleration or full-screen modes won't work (this is because of BeOS bug #981112-032247). - -

The main part of the window is occupied by a list of checkboxes that allows you to select -which graphics modes are available for displaying the MacOS desktop. You can, for -example, disable the modes that your monitor or graphics card can't display, or disable the -window modes when you want to run some Mac programs in full-screen mode that would otherwise -erroneously switch to a window mode. The actual mode to be used is selected in the "Monitors" -control panel under MacOS. - -

The "Disable Sound Output" box allows you to disable all sound output by SheepShaver. -This is useful if the sound takes too much CPU time on your machine or to get rid of warning -messages if SheepShaver can't use your audio hardware. - -

Serial/Network

- - - -

You can select to which ports the MacOS modem and printer ports are redirected. -This doesn't make much sense on a PowerMac, but on a BeBox you can assign the modem -and printer ports to any of the four serial ports (or com3/com4) or even parallel ports of -the BeBox (useful for printing if you have Mac drivers for parallel printers, like the PowerPrint -package from www.gdt.com). - -

If you don't want SheepShaver's Ethernet support to be enabled for some reason, you -can use the "Disable Ethernet" checkbox to disable it (this will also get rid of the annoying -"no network hardware" messages if your Mac is not equipped with Ethernet). - -

Memory/Misc

- - - -

With "MacOS RAM Size" you select how much RAM will be available to the MacOS -(and all MacOS applications running under it). SheepShaver uses the BeOS virtual memory system, -so you can select more RAM than you physically have in your machine. The MacOS virtual memory -system is not available under SheepShaver (i.e. if you have 32MB of RAM in your computer and -select 64MB to be used for MacOS in the SheepShaver settings, MacOS will behave as if it's running on -a computer that has 64MB of RAM but no virtual memory). - -

The "Ignore Illegal Memory Accesses" option is there to make some broken Mac -programs work that access addresses where there is no RAM or ROM. With this option unchecked, -SheepShaver will in this case display an error message and quit. When the option is activated, -SheepShaver will try to continue as if the illegal access never happened (writes are ignored, reads -return 0). This may or may not make the program work (when a program performs an illegal access, -it is most likely that something else went wrong). When a Mac program behaves strangely or hangs, -you can quit SheepShaver, uncheck this option and retry. If you get an "illegal access" message, -you will know that something is broken. - -

If the "Don't Use CPU When Idle" option is enabled, SheepShaver will try to reduce -CPU usage to a minimum when the MacOS is doing "nothing" but waiting for user input. This doesn't -work with all programs and it may confuse the timing of some games but in general you should -leave it enabled. - -

"ROM File" specifies the path name of the Mac ROM file to be used. If it is left -blank, SheepShaver expects the ROM file to be called "ROM" and be in the same directory as -the SheepShaver application. - -

-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/troubleshooting.html b/SheepShaver/doc/BeOS/troubleshooting.html deleted file mode 100644 index b46aa5855..000000000 --- a/SheepShaver/doc/BeOS/troubleshooting.html +++ /dev/null @@ -1,79 +0,0 @@ - - -Troubleshooting - - - -

Troubleshooting

- -

SheepShaver doesn't boot

- -SheepShaver should boot all MacOS versions >=7.5.2, except MacOS X. However, -your mileage may vary. If it doesn't boot, try again with extensions disabled -(by pressing the shift key) and then remove some of these extensions: -"MacOS Licensing Extension", Speed Doubler, 68k FPU extensions and MacsBug. - -

The colors are wrong in 16 or 32 bit graphics modes

- -If you're running SheepShaver on a BeBox, the only graphics modes that have -the right colors are the 8 bit modes (this is actually a hardware problem -and has to do with frame buffers being little-endian on the BeBox), unless -you are using a Matrox Milennium I/II. -

You should also be aware that not all graphics cards support 16 bit modes -under BeOS (especially S3 cards don't). Check the BeOS "Screen" preferences -application to see if your card does. - -

SheepShaver appears to be very slow

- -
    -
  • Don't use the window modes, the fullscreen modes are much faster. -
  • If you nevertheless want (or have) to use a window mode, you should set the -color depth in MacOS to the same as the BeOS workspace you are running SheepShaver on -(e.g. if you are on a 16-bit workspace, set the color depth in MacOS to "Thousands"). -Also, set the window refresh rate to a low value (high values like 30Hz will make SheepShaver -(and BeOS) slower, not faster!). -
- -

Full-screen mode doesn't work

- -If your machine uses the "IXMicro" BeOS video driver (TwinTurbo cards), you -will have to disable the "QuickDraw Acceleration" in the "Video" pane of the -SheepShaver settings. - -

Ethernet doesn't work

- -
    -
  • Is the Ethernet set up under BeOS? Ethernet will not work in SheepShaver if you didn't set it up in the BeOS "Network" preferences. -
  • If you're using TCP/IP on the MacOS side, you have to set up different IP addresses for the BeOS and for the MacOS. -
  • Try disabling AppleTalk in the BeOS Network preferences (there might be conflicts between BeOS AppleTalk and SheepShaver networking). -
- -

SheepShaver crashes, but yesterday it worked

- -Try the "Zap PRAM File" item in the main menu of the SheepShaver preferences editor. -When you are using a ROM file and switching to a different ROM version, you have -to zap the PRAM file or SheepShaver might behave very weird. - -

Known incompatibilities

- -
    -
  • MacOS programs or drivers which access Mac hardware directly are not supported by SheepShaver. -
  • Speed Doubler, RAM Doubler, 68k FPU emulators and similar programs don't run under SheepShaver. -
  • MacsBug is not compatible with SheepShaver. -
  • If you want to run RealPC on a BeBox, you have to disable one CPU in the "Pulse" application or it will crash. -
- -

Known bugs

- -
    -
  • The QuickTime 2.5 Cinepak codec crashes the emulator. -
  • Programs that use InputSprockets crash the emulator when in window mode. -
  • The mouse cursor hotspot in window mode is not correct. -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/using.html b/SheepShaver/doc/BeOS/using.html deleted file mode 100644 index 8f9395bcf..000000000 --- a/SheepShaver/doc/BeOS/using.html +++ /dev/null @@ -1,76 +0,0 @@ - - -Using SheepShaver - - - -

Using SheepShaver

- -

Changing the display mode

- -SheepShaver can display the MacOS user interface in a BeOS window or full-screen -(much faster) in several resolutions and color depths. You select the display mode -as usual under MacOS in the "Monitors" control panel (under System 7.x, click on "Options"). -The "75Hz" modes are full-screen modes, the "60Hz" modes are window modes -(this doesn't mean that the video refresh rate is 75 or 60Hz in the respective modes; -the rate displayed has no meaning; it's simply there to distinguish full screen modes -from window modes). - -

Window mode

- -The SheepShaver window has a menu at the bottom that allows you to change the -graphics refresh rate and to mount floppy disks (see below). The window refresh is -disabled as long as the "Scroll Lock" key is pressed (the graphics output is then frozen). - -

Full-screen mode

- -The full-screen mode uses a whole BeOS workspace for displaying the MacOS user -interface. You can switch workspaces with Command-F1/F2/F3/etc. Please note that -the MacOS (and all MacOS applications) will be suspended when you switch to a different -workspace. It will only be resumed when you go back to the SheepShaver workspace. - -

Networking

- -SheepShaver only supports Ethernet networking (and PPP via the serial -ports). If there are multiple Ethernet cards installed, only the first -card will be used. The Ethernet support is implemented at the data-link -level. This implies that the "Mac" and the "Be" side must have two different -network addresses. - -

Using floppy disks

- -Floppy disks are not automatically detected when they are inserted. They have to be -mounted explicitly. After inserting a floppy disk, select the "Mount Floppy" item in the -"SheepShaver" menu (when running in window mode), or press Ctrl-F1 (when running in -full-screen mode). BeBox users should note that floppy disks also have to be unmounted -under MacOS before ejecting them from the drive. - -

Accessing BeOS files

- -SheepShaver will display a "BeOS" disk icon on the Mac desktop that allows you -to access any BeOS files/folders which are in the directory specified as "BeOS Root" -in the "Volumes" pane of the SheepShaver settings. You can open and save files on the -"BeOS" disk from Mac applications, copy, move or rename files from the Finder etc. -Putting files/folder to the trash may however not always work. SheepShaver translates -some BeOS file types to MacOS types and vice versa, so e.g. JPEG and PDF files will -show up the correct icons in the Finder. To store Mac resources and other additional -data, SheepShaver uses the following BeOS file attributes: - -
    -
  • MACOS:RFORK contains the complete Mac resource fork of the file -
  • MACOS:HFS_FLAGS contains Finder flags -
  • MACOS:CREATOR contains the MacOS creator application ID -
- -

Copying text via the clipboard

- -SheepShaver tries to keep the BeOS and MacOS clipboards synchronized. That means, -when you copy a piece of text under BeOS, you can paste it into a MacOS application -and vice versa. - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/BeOS/volumes.gif b/SheepShaver/doc/BeOS/volumes.gif deleted file mode 100644 index 857dd0a21e5144e9ab9a4de2309c827b8c3193ed..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 7456 zcmcJ~1y>Uc!+_yY0)mK03y7eAq;wF(|xF*-&HjM3elgV9Kb z`_B6#zUv3v=iCa4U&O>sGjKFE7Pn{QUg*`1nvN z0EI$zb#*m2H^brZ($do0+}zav0i;?0LPJCS{QNvTJgls&EGz&fCMLSNx@u}_Kp;?7 zR#r?*Oi&QO!NI}I%uGv5OHNJ>_RWF^~wE2D<%fQN=`{lOOJi&8DVmyFS}NPxJ37m&>w9|p zkj9O;gG0kZU1Q@DL>CQj$w0V{z17~_RQFVUayzAu(M?0lA=Fwc+tC+ z5mC^7W6|O~Gtk6UYZu6DiRPRw;-<4RH`BJB3p-vPq(V?&X2K|zp=zFG?Bkt&ro``1 zrGDzl79W*mhcxi#A)ZB_+TBFVw_DMaf@~We<>LKnGm60m3ye$f^w*m187^i25kzS% z`BcjG5-R)R9jvMVIn;3p0$$Gs>E+u*ImaZ-fEil;AP$DR*=puJ+Z9Gq5UaeJEjBLG zw^v6fM4P7&)|Uog@4@hu!UypxhD)&O?Dn*M3;hpgL*t&eJ17Twy~4icFY4bk?|~NH z%cbpjUu)!eWEVg8eHXaH@NH9i7Mo{oX=oJ}yeQAEs!QUG3RPmU*fV9VJhEIit8)^` z0wr!=tw&21vy*#Ml0g)W(8{^-E*9z`;5Z7yq$HOAf-RYibXJ6u{1mlASQC$FTMFZ; zNAR;F%@?$&Kh1&jSz~O|Q%Kb*pX{%K;+y|NXNkE552o8)(di1b;!Ch+N6#yAWF5%v z%w})j?w8sx3bF3ziP`W_nq3isVL@W6E#LKJ>xhNX~cc}Rfx^s5ixYd-%+XSL%~{s=LUbr{-d$Gm;ka@3f0LCNnK2;DezoQf77wEouYhg zaye@NIl7!%{jO3s+bKe>gJ)7wd9`TE$0O2hcK`JgKH`gP0333X4q3IkKDu7>BfP(w zYCl)uUJE9yy4j5MmiAa~UyKr|wm<|nN)nm)iV`QO+INdvu&Rlpqf+ee_LpUNZ^T_K zWjy!N{k|2VTj)dB3Wu+3{hd!FVr~8nrJXPVyPtCM1gxFQ-VSTaka(R2e(A|=I_ys) z3pfqp7)~S7ME#*IwsXvf<&ated*~NWgT;pP$RMa5rn}P+S<-y+5MVD0{aGkbIiDgz zOe|FVEKDsjpRxql$4T$+LFtl5-9#ip>wFerl9*1@14If?*hN|>7tq@UBZXVfqUNnx z8PGt5TvKeEh1+leQ`ozH={x=y=tBYX8ZAnWelqemcd|^78|N2^!8kIE9t&exJ?G6} zd}q(wYM}u!5KC8rEuQ%_8!@+`JP%$*JrgIy{Ofe(c|xT3&NT2Arpy|dy zH=q#-d7E16?5U({^gO9oh*3c4TB&rRR%bwYQ6T20veB0*hY?r(5Beb$R;?${uJqi- zVq$It7z7S}iLR#h82wrH5@-8jX0Mc{g4p*YV`+=2Zgl|WK^>jZct5)fz_k4|{~NHx zu!}M4SAqHt<+Ro6A2^1Ln*WY=#aThanaf4%&4s`lOAPzx3+?7-E;?9RmEQFi*ya1>RBt_#wOZsoMt><=o-OmF)}V9RArLF7_i}-Wc$17N;5-F zH7CxBKsLML3QFyJy^y&~`zqhegYt*Sq#45~zG}8e<6XZ+nO?6L`=f*v zi^LjUeAiZ8tXW%E=SS$QH#?tp5}6;xF~9fn+wUBjjP$FTs1I^*8fU}47*~IWwwnGuoYNK*foXvc zS;o?JyZ+U~(<+C-GWYR1ewTHPBX%~VTyYaJh0U-K1IL*AWisyThP<$2_XE`xikFM< zKS#%2gk-CNFWFd+Mo!i@^jGhXo4Q~;^KMhF>qMQ`P0yI-gCrT|NMf3%b{|i}n~v6A zJ{PM=Mx8}_KWs5SZ$T-5oTF(-w!qUjah0g^WW>YHhmh};>d^{GBrqKQv6fND=--rI z8-N$A)FYQG+&?zj&_LDJ$rO7o0PXs|T1+brE%`+%wZZ0lKChbSQS3#P_v3*Hd&+b_ z=rT<~YVC7-;Y7>_QI`64Vh5T}&?s_9i_-LwV(C5kMfCO4%pZ7E^O6-eqgO;XS@?c5 z4;wFIf=I|^4r5D_rV2Xz20peQvVWB9YUprcy=f**F2u?$8>KRcAZntR=THTK%)y2<$Z?M;Vd z<1gs(5aU08_FsTdD6q@B7vdMM;Q0g&7|?P1Pee*r$7K}af_1(A^XjVe{L(#Jz>D7t{~x5D6X z#Ss$)iv^fk1!#o^I>iNO=m!7bfH(pnb~l0UH~7h-K_tK+GN6@CNRWuA-ngazJ0JuX z7|KHQ`w{JZN#*@}&pi_8C&m%BNP}Y}<{Kv#u-oLtQyReF5%w4DoxA4^91nzegnJUX zdFci{*9DP6EX)G~cKUyjq-$fY3Wpd{ZJ^JB7$(4>DwE#4k&z zkQJn-Gy?7CizJFv3H=pT5*ZreTjUYG+>D=464DRxgq9lrYW6IucP|trDAx5-g-7q} z`jhB>Xa0^bdH5o_xJIc#0h?4{sA2675j08#L>ixNgdyl!WPmSZ@CM>akX^f)kL;p zkc=)*&KA$apfHW#H1`~EMt4glR3I}WEhQ@~lW;C&7@Q>)5K;n8YHx{~UC1Ka%v9IO zJax@fEX`c?%#LMA+Gxpm(U6rJmVHW0xlZi1DegMC;J8bdb9ejV@2%^lVzxgKcV|lu z{$LJ9G3O90dYqO+u$U|7l>09&7hBtqo3x)x?M3?d6M!vCxh9S{PfVbp&+m=RdqtnM z1I}Yf&kw-Kqvy=456kDIFDUBDe;1zqPBCrzeSw4*(OXPDWqN@mePO_O!Gd_k$JX>u z>4pBXh2uX9l)?&t<%JrU=R%kQ{)M~_;(X24BGazIFMEX!X_+4ei_FRij26QeJ&V|% z7Md>>v#1xz4`x`?=ho~MyN454rYD+6qC*zkiE&+W6<^CMI-eHx zV=CJ8U{=XUn^(m;}7Ucj?yY?7Auw|DrU<|n(hi)Br10}3&ySU^Er)snUtBSC$*dDBY^r{L-uQJsuz2}6}V5*-Cl@PsxKSjXtVWrQMN^iuA zU+Cw~)0NFjl-)h8p*ueB*RanDUb;hr9OubXoyz4j8>n)YUSu+|}(vqLfH=0G%8+h0Fer=i= zNHPqI@kncOKr}IhH~JoA3E9*JXB34k)srvQmE6_6K4^#;%8Yo`z_-|x;+?_0AD`}B zNW9e2CElb9Pl&W>^m$cLxRjoD(0KE-2`1TEdC(dMYw&`#hHy1CM6_JfHV1lFws^zq z5cTb^(%rclJ-FI_!w}KlZABU3wp=aMUt7LKG>;FZ+vulHAHZf|^~o9SDPav`ip@1k z%~6~k`HCGshT6~vZTql}Ev5S2wANk(Lf^dg{2-+o+?glYupZHV4@<4K>CoUp++-Nx zMYc8Bbdu?}VK)$6&fuR=>=x?e)Z{!fm=w5$YdY`g9)zN)vIw%Y8-_eWw?F-=&ZYfd;&!b*56?`aXaI1k&{<^1VR| zM<3GSy}rFqntLYFJguLqtz}le-;4oeoY`++KoH=A3Q$J*MWP~y1$-i_%)L89wNZd^ zRC0wtxGgHBZGbmnAZd6YmsB9e03P?yg-{yE%N%6d8Yo{LWbGNOVi+n=t|>a~PH02b z91ddPnL}-v{D|eDT&W@6`)a<(!LH1~PM_hH%;CXh)Stt;-bf^p8-<4Rzm4Ues~8+! z?wjrhuqBMtGT=ZS`kZiZMuz#vq*^8_{&@MINFB*mBS+3FMmCp6e~{w5T^}JQ$6Xs9 zT6z#zco;>u@$Vb7A8_|yF`yP0#!r1lPBO>V83wUFeYcS#xR2vhP+#gTGD5$Jv*Cf4 zD*~h|6UXZ#?-+4s6edr7094S4cPdDNqjo}QJFyCqqE_HnC)3Fr(_f{L{7~c}!}Rya2`nAs z3~*)e&9m_{?r|U^4WTSlePq)9acb+ZZ=qtwK5JT%an74(j^SwLa=AZW(p-fHNu@H$ zy)qRB1xQ5ADpwACj~vso8?}t$Co^1-QJE8t>a#qW@@k*g<(W~;Lis-%=&>1WB3=05 zGtGH4Nxm{;khS1vIQPTHV|RFlQw7)H5V{cQ-!jtIEWKFQzCg)1Lp#!!b2LHyd1mN{ ztcwR}%-Ao)Gm966`f0c_`Y@jpxiV|GSm?9Z$nE-jWX0cSWm{#j9=iJBXr-QXRdh*b zt8z84V&%MYVcKvF%&;QJ&~zQOrfa+UZ>0~ww9Zkmwl=h8d-y3P3TVIl3416#EJ6Z* z#CLtgO<-fN(dfKE`w!o-ZH;`nSDj&#MP^f+bn~t6CI@JfEqjxDbyHfZ&zGS`fVYS6 z--e*?mL%RRQPh@{y`ThWN}6dqnQcXgd;5zF=s%_=g^umn^DX(&ZM6<=P}R1&(N4d> zj){q;hvJ4y*LVeMQao(3a=c0vHz>0Tq~Xx8^&hWDt8>Ck=^P0TGj z+9w^jt0k~&BKSo^Bmuny!Ys?|&)O5j*<)6!2>u+eQgj?nyfa%*>?|oV-Ja2tNI=h# z?bG-j#a10HM4uiTo#;EB{D@x6=>XquW2%m2blg-0k)~s0N7;armSZh={Q;m0=i>NO z8*p}_wA&ZI@1hMU&QvCBN2bP#qwU66aE+qSJF#Iq7=*N%GFM^ma0^2{z zJ6r_#T>zAKoT_ZKnZADSIHz!sV;;W9RlAh>b*YKH)F3;?LddR+9nfaKu5@^>sOmpx z#9T@IxT5^VZ)m$~-}%$}^)<49$6__lO;yMdD;reD~x*W+$vU#Wg5u-#UuZl!>BHapJtv&EchEb1H1Le0Svc(>!`;BGgU zuGbHZyLTR+&$f6^bJbq-oTQJtia(j5W`}nH*#|EEh zwV;Kx#lPx{Tg-EOqK#NxA*Q%~Wr`O#%p7#=LVtV&eq-PAlr7GSkQ?#PZoGLhwwITR z59+LO66bg3D6S*&Xtpz`D%!;-Bqn+G{KZQu8oH#^;(TUUd=)(pAISmfSv);1zuaee z1w|!7Y%Ft8HV0cAr^*jHVM5_MxRjwe#M2vUt{(I4U8Qdn+DgtPCM_c?=aC7lQx=|= zcR*j?)PiX5M0~979~j~fj0y(3MVX911vhul`v*rS3u~9xw*?8)Fm=o|*C)9^!WV4c zN*zr;hwP41;mi*%evY8wx3Hy-8x{JFD;!KI9$&~3{h4i-b#s)c+5Vj=GEwokFgB4Y z&ZCtkW=A>aqknMuLhqJDrh*iXTC3~(fNZ(EFG*Ml%RQCYEP)R*m}wL>1@*bfMj>Iu zZ$7U^KlwUy4g5y1L5m?wzB0WGQlQO4e@azVp_fssyd}RASM%fDRTy&s_iMwzvF1t^ zx+8KPcjB!XA00kQYs%`~2a=nxbz#fV&)7C(vmIo{bt4I-`#H&RVAcC!y|`BpH_M5e;WT>7n4b`>hbc{Y;y2Rp{X=6kYh`5L=WHNp?ch_?OSGk1qX^Ub%4k02@ z7~JmE&CPr6jTw7*ZNs87A>t-9(pyK*RyX~4IGJT`?i);Ueopl(gint|;*YcHUKc_> z{;PDbn0eWIX@ZoBAW$Xg(KLAsP5F3o8)J{t8;9Qjfp5P1;4kCCEU-!wax)Q$vw|=o zID~XRo8-C#5XS?jqDoIz4^`wN;<9k%+5oUL5~|s z^^KV{DHU-A<^8Rzn}_58cH+6_dVF|`LuW4bg?*66CpChF?}?Zo`e&Z^hl@Ae<3ut5 z_g)7#jl365C4JcTGg_w$?7}E_Q{U`mT<8Qdxw9ANG{KRD!ypbqBE9o?xY{xh3GM`^`9cnb0k~>_vwEp=(VwqjzcrIjlBo6HaVd2V=#^{4A%47Ve;{uTsdtKL zR>q$Q1}kT{#t|pzqXhHlRDOb{m;;5_K9I?(*x4s!5UR7O`-U|Hltr4cA=ogeecojL zI?Xpr=F7_-qhIAtvm7Hzq}~v;LXQ%19`XA{&u)uziFvXJ2&`l$gw%p~DSvO6?S1CS zQws%sGa@V6lcy2?&*XbzfzPy+f}HhN_h6yI_xrnw>ggIuRf$DBZu?56^qOg-iN$=v z$qSC@npww*CDNDss`CEy-}1=ZN}zA|)oaL!pK>RaskmV@^XRq8KuP6V4H&JObgfGJ lB$(kPMyH!zyCyoR!rZ)EZX#W~p(?4;&h0>7iy9vw`G5Dj1)~4} diff --git a/SheepShaver/doc/Linux/acknowledgements.html b/SheepShaver/doc/Linux/acknowledgements.html deleted file mode 100644 index 5d8c9fd6e..000000000 --- a/SheepShaver/doc/Linux/acknowledgements.html +++ /dev/null @@ -1,24 +0,0 @@ - - -Acknowledgements - - - -

Acknowledgements

- -The following persons/companies deserve special thanks from us as they -made a significant contribution to the development of SheepShaver: - -

-

- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/contact.html b/SheepShaver/doc/Linux/contact.html deleted file mode 100644 index f8a640e17..000000000 --- a/SheepShaver/doc/Linux/contact.html +++ /dev/null @@ -1,47 +0,0 @@ - - -Contact Information - - - -

Contact Information and Copyright

- -SheepShaver was brought to you by - - -

SheepShaver WWW Site:

-
-www.sheepshaver.com
-
- -

EMail:

-
-sheep@sheepshaver.com
-
- -

License

- -

SheepShaver is available under the terms of the GNU General Public License. -See the file "COPYING" that is included in the distribution for details. - -

© Copyright 1997-2004 Christian Bauer and Marc Hellwig - -

Names of hardware and software items mentioned in this manual and -in program texts are in most cases registered trade marks of the respective -companies and not marked as such. So the lack of such a note may not be -used as an indication that these names are free. - -

SheepShaver is not designed, intended, or authorized for use as a component -in systems intended for surgical implant within the body, or other applications intended -to support or sustain life, or for any other application in which the failure of SheepShaver -could create a situation where personal injury or death may occur (so-called "killer application"). - -

-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/graphics.gif b/SheepShaver/doc/Linux/graphics.gif deleted file mode 100644 index 267a4f9e23bfbc42241480af5595afebb54cecb1..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5480 zcmajhWm^+~7QpeTfFo3z5rWb&Km=)|Q$RtG(J7;bf^;{dV>F{*Bw~zqB z-~0Vf%l|Zi1pK4Hf9m?DvVTJU9{?os@7V&7e=p+i{Qt@J{{Yz9{xy@oQ~D>Ve-aS^ z{3Foc0RWr-4DfH@|Be5*3kpC2U>C@uQCHX#4y55X8?Gzri>BnzvI7Su3hlnN)IV98Q2!whGeV^aa~gWfaG6-0q>&Ty325a<)7H-CXmzMcjYzf`MFU6m5C< z*KVs{AI%bVULI>}fR2X{7m&$8Zl}yv z#Nf_(xSO(&Ql@>}k1yGF7ptFp$HJJsf6aA=le6h|w(hSDBLplbI@=C6r%Ij`=yplJ zohiAM*=%7J-x|Cs?M7gG{-N{yaBH^8GMH7yQRe5`XuCFpU z3I>o!T7^!M`Y?q8i_0HSQP7`Rg^%s>K!UNVTRE_gpS+l&8v{YBaF*VUZ}Jn3YRC|# zAow?D4r+|4E_2)Yhk&L~u zmaH5F#Upw`x5|>$!W`C8HJCK4BbQ!#e{&bq$8BWO#{XA@Cbt`(wsTkwsjeXxu;%r#kPw)H_)4hAaAKXRl%@5eAw$*D4 zZQ}hQukeec@=ZPID;wRbb;-3dR2MgM5*r%G(Xu?a@JqfUV#~C1bwfpn>iY?aX^RN^ z&hL-9^g{w}@i$%edVsgl)ed#k$h|&FbqZAXXzg}gKL}cl@gx6?{W-uK4L%r-(jVI! z>Z8*>z=Gf4F*$)@_=7RA4ww2NdX(AWgsk!(_de-U@X^%Jb^JlG3QtXAtwdkIPUtgr z!6u~IX8h3{1R7{LFLJx)c+mi0Mx|N}lzJ){ra77}a zw_(&^Ep5P!+;d~DU|#JaGNZGUsWf3ZaC{L3)IlBz+l-V%niOl#mR$o#P2t5e2?Tc) zPB+N5Ow0bOyP2SheUbf`C-2y4QLT^pu6H#+H}x~8`pQP-*8=({#&Nns*2+ZqMi89s_yp8*ZdX4AMConoI0e?;0lYGIS=;^nbGS~4&e%SjVgasDj}N5}8huc4)njq!1~ z#RhVudeZU8sO{ufNIm7H<*!w{|wsC%*N8*2;n(;`!M#3 zf;VJ~^hqd_Msu8>pI((j;x zrf}&vdZ?ghGQ^|Hgc2O@KVOoxOEf5d5Xq2@Rm2{87FrHzAqy&f>}`B(0^R-Zjc+lGOS6 z5O!hIs>r)efP%{kVblkld<>1uH?cHX9R0KA4SArp<3TAqc;e}^Ai!#{sj`^6G~~C; z>=KrSLJtpm*5}+2T+`)Vnjsl_wS_2fG8$c47)%Nhi?4Bk`lntI+K9NXszv~_t3;~Z zB$V_KmT!WY%@*%U@N~n-O-;y6m!wbIrijTeymsV&XqEACFKOPu?A-WzGc2O}SjZ<+ zskhyVL40YR)O%pnv}BAcEOzUc{0Et@MJnr^#A(8T2y!~gpk%Onwy<~0>v-D|cJ;ug{hLd}>FU!Dz}d@gW~*8a}Ud@jU8RG*rOWSDt-Jn|y3J`JV4 z&To2-g-q0Ew2Z9_`Jazkl{@M9I+!&5qSSio!a=nL*$B!1L@;hKgGM97`gPZVY8|A| z-0U;^^D(!{?`wuxw{^CZm@lT_x{bvQ;|^#n-IPe6Sg9%hw(4}URsFzG(i1sl-S<de0frhD*A1oFeT=hL95rX%zD>`TTIOOTqA9>C#+CHP4x4A zZ)SA=d2U497G937^+UVr9@Fbw%QY2-cDFKDg*>MD41!@(w_*OlVfBS}9MJ(fb?kf2 zXW2-ln$1#yoVoTphnvD*9VfTBpB)>_G%A187LBx zCSsF};A0J9RPFt|P|Jr6m72E`B|i!7cQ=z|)kwtZsn zi*(_SS+T(%I7);A`Sm|uyy$#-l3j7NyIFU+9Q=@Q*7y9wK7uV^Ltg&Z%=@5W%*U%Z zfB8Q&JcM(G+Ut|sEZ2u0TdocZT(3`qU1>sY4hM*-nq-R^5T6B(qXNh!L++e~NUDTT z<0Pmcq3hnEAb1c{Yv|5mDC<_x15nt$L>Q+=Ft<pOYE{STm%>HhR{`Fm@qme42~`A)x$Lc9-&FA-E7mD1 z(VkTOP_v6B8?PIPWiA9-6>&@;roA#WQ?XCwJx3^%rz%oeYbu(Fh;Vg#n(ZIk(Aq1q zW>`o$D)vXF(b~~!IV$R;DC&)*iP&4R8Q5~Crb#Z)oV`}i|AtV=&H!?!UDGJ2@L6-& z*}89As$(p`R5pfumUMHpx(Z4h+=?TwX?z@Q@2h0KV>J6zM(r{pJkR~mRjf?c@YNl%4|l?ED^74q%n;QsiL|FL&zhm zA5CUTn5=}hT+ySfdnDEf_T#9Hd1UZ<-sRp{|I7I%5L-6dbcDO>zjAR zkuu$uhv$$97Sv2D0ERpyiAYzFN*!c6ZVZu#QjPnb4sMi^5=O=Qf5n@ zVkLAyrIw z{b-cSwQbA!qsz~zVu|(L{oLKbQ1IK>7bZ^kU2@o5f2gW7`kHaRt(s=bv(g!LD;`3* z)$Hqpw|j=DsJ$V~Jp?fMdCpb%(6V{Qvibh^Zm&?_zq9Kz__t;HLyCpJWT-{kc?$Wl z?;j`^I>GYDoL%kIHtnETHU7NYFoh%KeGiU%IZSQb965e()oya~9iVb!s|t_MB`qGU zP$B&T7)!kln(0x$d!;!$Ne;GhMuii0s`*}A9i>*i(rj;}?>$q>+0y>zD%I@`t>DB5hYOd`ZFw>&zaSjLH45^n@4UVi@)8Gvthy5tE)>^;1UIG>)R%5NDS0;Wx zg2`|~o%fxSwx=IUhtqqComdwecbaD?_X~_OfBlhOVBp`_ujFgS)!D`oK3Px2>D&pGX5n2Im{JlPPjgzqzI8C*c)#B<7|J}Q*!Bb*gE>{{FKQ2Z~80<5~5n7yDM+2QPZ`j%m>rIr<*x!?;)%lT!7sW@btD zkDU^4_8!(=__bZ|0-1~dpELqsq8#A*7a zHTqRu`eb+NG+0DL@%@>0{qn#8(!+iO*?N6&xe-gRF}}fcY(NVc{_@WN!Dhe?tY<#f z55@O6YDYMm4LS?Wv7tbg!KW1iA^1*z_r6Gq{xE`U zggi zsXcD1Jt-tHdFG;jqCI>G9=Z54$@F>B0z3t{GfDCV1XW&t;dtGyre!{s;Nlf=A;b&5f(yDz3y3Z0q_)7a z&N68aT=D8l>i(>qY*d1{!wXpF6WHv$-q({|zKXoBB3)nq=*%XB=iPj|LgXq>LGu-u Uze4t5g<^T-ZlVK - -Revision History - - - -

SheepShaver Revision History

- -

V2.2 (04-Feb-2002)

-
    -
  • Integrated code from Basilisk II -
  • Source released under GPL -
- -

V2.1 (31-Mar-2001)

-
    -
  • Initial Linux PPC release -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/icon.gif b/SheepShaver/doc/Linux/icon.gif deleted file mode 100644 index 51368b117dcc38bde6f0ac4457387bad5fd31efa..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2011 zcmaJ=X;@QN8a`ma0F_2r3>syr9YKRdt|&{30R{<-bXXM(#fag`B9wN_V^q{=A+nS) zsfZV0#voXrBBWwjq{C8V8oAmAiW&hU$f^ipfwK6(o$vCizvetio}BZ2@B6*)d+zn~ z-{b0bh=+J+7SW5zWU^Q+Hk)l@V`Fb`@8sm<>gvkl@%VgxP*6}rM1)W%jEjp)NlB4N zBvPp~BO^mDmlFh`R4U8L%2X;|kNQ7=9l#h_~&oxl?|H}kMQ4~pkNRlE*3MVOyq!2+- z1Vs`QK~OkBVFZP6ioz)prwE+FaSFpJ1W1e`F$ySfjKVMq0fy!P5Ol#YfdGbZ5~$%z zk_1V@1|vyCchP%-AaR1k2okzrHk1jR#BmbCNd!8e6(b3Z#4!@XNCXOKfuIN^z)T$Y z2?Xu5R-gku_zws~OQ6|d;RJyZ&_z3eVX((>0s|blg27P32pl6Yj6lOOM7yU8U=ch4 zKZbAwwrSxs9@K#xMEj$)0v+%H0jK~`P=^Cp7>*;FgLVSLV2@!qTm?m;<#g#>FsjN7 ze!wS$NT))p0RVVKba=FL5C?cr2SUIx42Nkz2YiSYNaq4|IDm!d`=PUdxPcZNf(Yn? zXM-Zqa_SH>j2zfQz+Iu`oah9h6MFgwh`9o2M@W?i-#R zic7x%^t*tVP&4B2RmzsHm}XlzOr@cy==DG&aQ87d8f;)d}O`ax5d5+ zmSaSjy0a+YoMZTxj7;aD_B`&vrR?}a!}qTmgztQW&0Ci<*+gX&99V;ZCKXNIro zUx}_mv&SxUWQBW5obpD4+sd(8U5{6`|Pg#`jX8>{Fac7IeC4C*4yGZGV_lkcxjp&WfAFXJ(c~kUE;ak3$_VG zO3O`lB3+u|d+qx%*Ie!he5O7t)uy`WB!^}0OS8Rcp87`3AwK#+C8EbOUzO|(=sZ$< zWv}I(flH!24lPHf%DZ%zk0z&-Twx1?I?fkvA1p~TKQK3tA9_IktwG}5@*B#eb!$fo z4?Z>ul`e|Ph+WO))@6wFdjTFoewti<>^!DY;RHgAey7hB+_vXsW6Yg$F=foLdePM*x!$6%ppr4(*sW=> zV3}7Xc^#Nf+U-1%nC!VRcwSl>65=u0V2EX{_47OH+kQ&+u4rIq zXPVV7DNcp?_~me&o5Xs;NZ;{&Y3vrmeg=B5VaKNGl{-!es~@_(c^&kt>0+<5@57mH zdFQ&7K6>8tmrqu5IL2rAFEHOm{k6M}omu#@a(DRU z|K8nL8u@mGv~i&ZV=f`p`o%-iv)n{A_3DVnUu~{`c-SFOkFvet>R)x%BED}$NN^im7Uc>;BI}E)Gt^X6-P!)J4+j7_sV6a_ti!lzWIs!y(ZnM@L%sW zH~9IOYFR5>D|F9n#JSOr_F4x%@RL0rzMCgBxqu4!KE$Zr<}ItTKFfV!GIPjr>lT## zUY8v@slDlNz9aidJ>m6g-|CtEAUi<`&-@wN*W#D2WB;*9uwm@@&l#^LL!y2(H5sa7 z)%R;WSZ+|`ltE>Hf ze^XOab8~Yb5a{ge4242Mh;TR@iA18&==k_}EEbE$PrG%0~ z38A=9Oeo??aV5DDTyd@#SAw2&Q9n$(VSHJ-e0AK-9 zh~of@aZVaTD?u~t8RHm*Qncc(_Jyg>*Wd>_VWM_Lvq1s0k~U8(2RYP(9f&|Nnxh-w zfJd63_62bqV3D4W_5yYT779TEdAJ)&(u(V_87+S;6POjP_@o^~DpbPG6=jg3D^Ujn zR=8*v00a~e)f)8V^)N7R+#OY@zX1I$kOi>^a?7LPiB{Y@cRV`ers@2`w|z$NdKVSu zRr)zusO5s2V#@MZSOtSoH9>iRo|bV zekHGGdGe0Azx4dlm1MOi-BxxafA6$sXM2nJla!EA*N;l3hOp zJwvy8{hJo|RP=w*ej~c^P*0bq>w3mV-mT87Gsh24Wj%R!WJ_l3Vn*ceO}?LPDYL&! z6wHsf4h*;58aGugpNsnUcMY3%E?qh}ai_JSyZ6nz*LDwG8@<1olCG0irOo93Pf$`zLPS zun~xEtHSRbi8rRR3R1L0OEq;8>8ab8se(l_z z`a$1~Zx6Ow2QJQeDtDw^+HLaJ8^OlWd(|JC;tNliPj4?af)719mRDxoVl;R%il3{! Kyw<#mUj7$_>qdM4 diff --git a/SheepShaver/doc/Linux/index.html b/SheepShaver/doc/Linux/index.html deleted file mode 100644 index 3fb408d04..000000000 --- a/SheepShaver/doc/Linux/index.html +++ /dev/null @@ -1,28 +0,0 @@ - - -The SheepShaver User's Guide - - - -

SheepShaver V2.2 Installation and User's Guide (Linux)

- -

Contents

- - - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/installation.html b/SheepShaver/doc/Linux/installation.html deleted file mode 100644 index 75f588fc8..000000000 --- a/SheepShaver/doc/Linux/installation.html +++ /dev/null @@ -1,25 +0,0 @@ - - -Installation - - - -

Installation

- -You need at least a 2.2.x kernel, glibc 2.1 and GTK+ 1.2. Earlier versions will not work. - -
    -
  1. Unpack the SheepShaver archive (if you are reading this, you probably have already done this) -
  2. Even when running on a PowerMac, you need a copy of a PCI PowerMac ROM (4MB) in -a file called "ROM" in the same folder SheepShaver is in (but you can select a different location -in the settings window). SheepShaver can also use the "Mac OS ROM" file that comes with -MacOS 8.5/8.6 (look in the System Folder on your MacOS CD). In order to legally use SheepShaver, -you have to own the ROM the image file was taken from. -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/introduction.html b/SheepShaver/doc/Linux/introduction.html deleted file mode 100644 index 42d78a4eb..000000000 --- a/SheepShaver/doc/Linux/introduction.html +++ /dev/null @@ -1,44 +0,0 @@ - - -Introduction - - - -

Introduction

- -SheepShaver is a MacOS run-time environment for Linux that allows you -to run MacOS applications at native speed inside the Linux multitasking -environment on PowerPC-based Linux systems. This means that both Linux -and MacOS applications can run at the same time and data can be exchanged -between them. - -

SheepShaver is neither a MacOS replacement nor an emulator. It runs an -unmodified PowerPC MacOS under control of Linux at full speed without any -kind of emulation. So it also uses the MacOS 68k emulator to run 68k -applications. In this way, SheepShaver is comparable to the "Blue Box" of -Apple's Rhapsody operating system. - -

Some of SheepShaver's features:

- -
    -
  • Compatibility: SheepShaver runs MacOS 7.5.2 thru 8.6 with all system - extensions like AppleGuide, AppleScript, QuickTime, QuickTime VR, - QuickDraw 3D, Open Transport, PPP, Language Kits, ColorSync, etc. -
  • Graphics: The MacOS user interface is displayed in an X11 window or - full-screen (requires DGA) -
  • Sound: CD-quality stereo sound output -
  • Networking: SheepShaver supports Internet and LAN networking via - Ethernet and PPP with all Open Transport compatible MacOS applications. -
  • Volumes: Any HFS or HFS+ volume can be used with SheepShaver (this - includes Zip/Jaz/SyQuest drives etc.). It also features a built-in - CD-ROM driver and a driver for HD floppy disks. -
  • Data Exchange: You can access Linux files from the MacOS via a "Linux" - icon on the Mac desktop and copy and paste text between Linux and MacOS -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/memory.gif b/SheepShaver/doc/Linux/memory.gif deleted file mode 100644 index f09a46076f5524ad6585b455fffd104826784efa..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5697 zcmajecRUn;|HpAjWkhA3z1JC;$5~~B>}(=*arUZg$v$M9v&oFJ!&!%uy~#Lx?<2~} zD(?IH{-5vf`FQ>Jc|6|#ebk<-N`q}OZ#}tnMnHi7e?ai~eDK2ne=sj^KX~{O|3*zwne8Pw3PkUegyX~zL~1_C?XO;$iO>(RFQT%{u=C%{#N;W z=F`wiZ2$4HUY-$P*-LW12k)Tr&M2VmSHea6kA$f zG2a04Kf3HC6CNzJI^JCzZ1}Y#OW@~&RxYSo?SxSYyc%k(Uhhrd)XdgG*K7`^i90O~ zp;6G`k9Q_W<JAaD)VcnlD*NusGVf6lqZ3`u1)oE!wT<=2& zSdFxxkGDq)G;?$?GVbFAw^Qq1Es&vuHdH+Dth%i&7st4XGOHjK*&W%v^}!t7Z>?8< z&I_BTDRO*Q{&tLo%moqLm9`H4PU6E5Oq^e2{op?BxpnB!KCfxez%yKi%ePrChRE7L zz#5FHV{7#ZwpKOkBf|&SsuSmF)k__YXrI?GmZFIK=+5eyMaSB7K!J<+63jeKa;bxZIJ+sJUza>GpQo>#6ex0Z&tA8J*?s(q|TY>fr+viY9W- z!^0wgj=8FpUi`(c%r7$$-RyJQ#Z^6c;E(cCdcTaaE+K{m$Fh^%A79(<3hY&N(K_u_ z_gy<~)(nAu?4d?g1@>#P#!mZnGj?VB^$T9j6_phA8C(8e$4i%zaO3troA$<`Wsd7d zCaxZ6%L|)02|s(c=D(+dt}e->r_AoVcfo6|^3eheX!PZegU*NXm%^2u!HkF90BHGA z*J0(XySK3scBGG1afaLF;8AB@GLzCko{wpM>6ci3&gX@RC3AgZgM4MDM->88d&PtD zYCu#{=4)_Ck5+2$VaL&jg%hlyiO}N2tKxnn*4TUh_jJ2W#rynrv-_vB_J0IGoixb( z(|NkD%Ggf*AAPdN*ipRavdzb8H0mcDqtk)(EZ z-jWQh1iw#xi@Dg&6_`e^UhI@-Dm1NC^uD_MQ8Vq@>`uL0+58jDsTM;Q zK6W&F5KE$~Jk<u%7uJNEjNXKdPdCG4mwBBR<`+hchRjtK(&SI%5?& zFYRmzdRO7ym>Y>4`R46Wxx*DYp6l}m(?R%yU;a9Ovn0OZ>GguXujdf1PFJ@H9Rz2- z{jOo|nL?V_EesgSy(`t%Uc1u$nC*TZu^MqlRV@*ZBz^l`RT0A4Vs2hp@PMvgNM&9c zj!%qBgThQnxnSiW0u)A0f%nMoWFdS6RM=yG5Ic@2I(NVQ@!^`Gf_ewg{4m<|MBSdP zFF=nXC&G~}R1#sI595Lu*jUcaLGnk3@z%$j zdre{NY@he!EasA<2)&px6?x%|GBh3oNnA#XKNH@G(I<(h^lOMA5yegh?WFbDM1&d% zwtuL&@@^08lcKOp;VhPm&rM`l5`__kBFV2b>VgOJ1eHjLXRyX$Xwi&%ZP`TDSr}#_*eN++;R7Q+ybf(SBVW@h zszn@cdBeot|6=gmkkjcwW{)HKr*)5OVJNiD7ceuM-S9rC&A*X1+x_7`=>1WrE)?b&aIp*rh|OE zto!YPtdrdQn?!cyXlmy!@e<8pzUk)5q>9kk0xJ`JtL_nU6!fjLanzB&*ckY{P){N=xMd|_DB=3>q$0JM)Izo0|w9O~;Ue@9)JEn7jx5T8M zVBya@&)`Wv^?VpUE4}-x*Zf}Pz5U=xcHwaG=uV->{5!NIvn_k=D_ighu&dA6V~WJQK546_Hx@$N**;09^~6)nI1u|8Td zEbA~sanJtwgqg5+)G>;J<%m?pkJUmRU$1(6)!mUooK0;P{3uJl+HhG0ays3^6Lhcw z$S1E6;>vjJbUe$#yJb)8y^_p!U9qFolh43rsju*_cIomh(2Gbf+#9c*NPcN02~enr z`!r)pJ^oDTE(vq!&>vNPVnc1ghu#EMKa!DJ`FY<*8Sq(heIf<&MpEU=K` zqL6BX5Mg^+5kP2-c&NmT49F)Gi3pXEmKB@{g?5ELJqIgEhh-RqshWb-)4~v_Fs(jm zo%678s&IX2X+zWSz_;P1K2qk5;qNEHU!8-j0TB-35pR4zc0LhShzQ3SNz=&)G6@HF zds$EE$eP;@6PzY^h^dz;n@_P>`jnZoQNZsB>vxk(LF)2b1(C~~umHTYk9{{R)dOZv z>4m0c`)Ep!&y^2JrbvjyeoSfA*F*HP((Fb_%k z83a{U-~EMS6MS1tqAj4!GEV=MIJFs^))x*)hclqzTg8;52XHp} zL=JEwmsui@Zz5lMA`qP@IGZSZk;t?2MqUabK|-L`^F|tBrR|Xmc~Z$ zQL+ZyLR6HyyW8UTGYFtwg|o=Ul3wMaJLO52&EfA9krNfrhQ$F*>g9W7Rf%MsQHb^% z4pA)QxIS&?8J*r62s$c*v5owRC>_Yos+GjD!NKai zs6{J@b%{g99WU$KcFBrk8DG(#O{p`fR5Nwah#7oT(sNMuCw|02diEk%vE^CP&*#}l zk{tCZORfmTxsvSj9XcugoWHX<%!V{%^tpsGxkP>s9gpIJBx3J0<=&smrMS#}NSbF8 zkxSqZ^;$LW?*tUy6#!t6VaTwHCCX>kkY@GsXz^n7I#mVbd#P|h&9>ij%1CniiG8M4 z+nMJ3S|lbyRiGta(CVR+mG8kK<`KKbE>6hV+Fl?gleeo#zFS|Qp&=>GP*@Sl_sFl% zG^5bGsn9~^;k9~Uok67aob+p%q8NiBJB@s+j3OjwB+VF`n}!3F5_x+(uI zWrO%>5m&j4r+lv11z{mqzMDX(#GiW{-5Rc}XW|*2;yi><;>H3g$_m=)GAVP;r->Z- zm*us$oUc+1>wp0sT?}8_#WyY=h*0sTA)RV#N-$ex_w6NAIC$O}zyC>F`rZ7?i?atq zr9l+Z!6cj-Ua0|UkP0UvT|HhGq@Vgvwddgf8+5<->f_g6(ZFLF&mdm@wDD@Sj?$Bi zGSXev$J@vT4a3x3VFa+`F_~Vl$yX=5Ba`?`=48i`ts0a_CdveYYRX`GT80vr(hAY9 zRTL2LDy&u2EK&c%tJ7RtMX2qZ5&p!dE}%2QoKe7HzOHH`pj6qwItJ7NE%PH}ys~jJ zh;%9z6*=qpz^~yBa8!3@Z1C`}utNGOI~hKQx~33{4;rg0Dp#{4LYXP6j3R+3xTg^x zlvhc@;9jFhlV?C?%^LxU5`C`hclpNN?0VZSF<&a%MFFpsD6T}g-xN1(tMGJ8d$04< zf1?hp*6{oj&9S}Z#_QLhvFt;_28NHS1|TS%9Ge>&-=ZST>+RF(Mt^{; zWHEXI&C4f-Q)HmYX3XPA%qTw9e>qKf<7MlXe=9Dtb+@^7Z@%^CpVkA$Z%4A$7-+tI7h@K6MqAqLtQyPP$rB zCmZI<^b~;{`!WI9G2QIuok|8hgWf&EbloU{R(m-~0lD6@7rkBqZ$-0u>1evr2YV?( zdp|OQ&4rplw2ES9CM@8B4?gpqxLXbEExnbG#8%bBHoe6fSDg-` z-NqxnKm-Fw&)hmsouiwbQJ{fkV>R25##Vp+5@%=EmoD|jF4V>S?SuWF{}yc_B_R4k zrEBU|`i!|9=*iMbYq6U5c0+G98!AehYR9;y%Uw|LVaRFVI`0P#&JS=Vu2U~puu_Y~ zrxE;?`|wcDmjKVR6i?fh#vP5v0mFf$wTxGvck$xt!ZB8vI*cwzmx zU|{X_Uc+PNdLBHcUA$skl(|PLwpbW5QG=aOSnL1?jwuFWB$-E_k@InW#->YPJ%_L& zf!Lt?lS)F9c&*8ZT`XnnWJJLv-|%DtDb{-N#VckMB(V2&;1p-_l%sZ^^Ws#V@l@pf z>3hzTV%pR8LeoBrlU@}Q{@PQ4+Snj+l%MSENLWqAA28U}WH1vskU z-CpF}!7Tq}UYavqCR_qs#WI~#EW@j#B-%{caez=G`g6;b`wH~90tNaJ0F{pErlko! zHfl(Fm?M_>6D2{?1MhDWEWx!W@t5+T`t$cd6zHn^HyR?dUvD$RD z1g~Cg;xh}P`Si4Pi8T(!&H}piVdWG1M!nibO10b&WPS8_!%}ihUtyC-VdL)gW>nrL zhJ5pt&Xz69mXX4iqbtDf)f9)$6N%BnJ7a5iT(^nXV@9vG5=9rOt|I9Ig!cC_{S^y) tJRUe$B};TG4mXC2b7k>Q%t?B+lX6W%CXUN!-N{ - -Quick Start - - - -

Quick Start

- -The following is a step-by-step guide that shows you how to get SheepShaver -up and running in the quickest possible way. We assume that you are running -on a PowerMac that already has MacOS installed on a partition of your hard drive -and that you have booted into Linux. - -

-

    -
  1. Start the "SheepShaver" program. The "SheepShaver Settings" window will appear. -
  2. Click on "Start". SheepShaver will try to detect on which partition MacOS is installed and should then start booting MacOS. -
  3. To quit SheepShaver, select "Shutdown" from the Finder's "Special" menu. -
- -When SheepShaver hangs or crashes in fullscreen mode, pressing Ctrl-Esc should -quit it and restore the display. - -

In fullscreen mode, press Ctrl-Tab to suspend SheepShaver and return to the -normal X11 destop. Press space inside the "SheepShaver suspended" window to -reactivate it. - -

One word of caution:

- -Volumes which are used by SheepShaver must not also be mounted under Linux -while SheepShaver is running. You will lose data and corrupt the -volume if you do this! - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/serial.gif b/SheepShaver/doc/Linux/serial.gif deleted file mode 100644 index 49ca90f95d9d0525684991a2611d9fecb741dc77..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5325 zcma*m=Q|sU!^Uy6wd!;!O^mkou1)OPn;uk+D79zpO_kVUZ;2KWu}AD3i5Z(B6sKy| zsI7|1bN&8+<2;}1`|^H!t81!(q~5_u6-a-PkP!cy4Uu?5!bIYYjgb&liX1MjXH0Hyb=6Akig;po(&27-;2Ca@QrN#1Bs2zzh-tLr5j1zNLZNU zh5$Dr`G4U5-{yZ`cu7el`Ax~BQCrXhp`_&n57rjqVji$**-{o1^(6pAofik|5Ch52 zmE)N-(ZxgQ9KZQVNF%hOsQGR1K0Ng$y1B&bznyYvRmNd2As1hUj{kX8sF8keNppQu z7p0e}rK*La!&jKpJ1^lIE8ZmVnzj`yHC3AC8BUiZmN!*>ZI%fBei3u`#c;Xh@%GYi z^Zr|Tl8l0tV?^x=E|!+>?MO@A>Ocyc_9vZI^!jj)sLS$5YrVth$2;xRa_2E=)1{dQ zzhgMX^WakEIAf8^XM1y%`swj*jQ&5rU?6v&>20N_$Kp zZe=&UWlC%d+t%$H&5es1? zNw^ ziVGWWow*)se1LWA(~{_-cw8M}$+;mHfN&FCjx|dX|6aP9%0s`2@ZiEa7NvrUNLN#o zqa7C0d&0MnDQXdpt7#ex8t#ULYa z`lUzFO?1XY-_3W@)PL_}wufrxl)wkkJ)3uIPB>ezsR)JhIX>RNJNQUS{JNiyX5L@& z{Y4BVH21f5+AS)KSp04G7PF!Hj`(sGWM96N-@LrfaPOtP7lt#&I$7b9>DmOQizJ3>m`#TOsMEpnHQDa%rI;iuM$z#~O-o7Uzhe?fWU$g^IjO z8m7gsVlunD8GD2(BDjlFwhRWb@l~}^LSVw()+|K>J8C&F^_a624zc$9N2EJs!h;wx zt;`Kf{afmADJ>&infYC;=}R%a$NJMMYNn}{HF@s{8yqUzIuDJlSFHiQv#Mv5tCD(n z>-{WxoWwTXRceyv_W@`yT#LOLlsLyVJ=IYC8RHtl&B;VF%XrbHOcWJ9HDpR3cb zpmHa4;L9dyY62Z~E6nEb9h-6oRUU~u znw6W6a;$1Nm$mQGJtt*U?sX3g-rKR9XCT1O8wFfVE6msNgnnsye%!Fj89QHQNsc4e zw|aicbLUv%@67s77I@;ewJE{Mm@AL&u4SUglQTu@dg7L=Ys{m}DPqL^CbS&C(HTks zJ;>3NH@d5Ud59Tc_|@W$+_5mlc5WCL^Ad-t*!3>wu-B`Nv!QN!U66zW)n9F229)hx}1r(`Mdgb5ukL5|8H6T2q?2oAdG3sl)$VtBnV_{#E;tLg!mMC0jK_8pjc6#P~hF#6fA=yqWM9E16gGyh8pIiHPW|4CgOD!YGx+HNS`%1;*lm zrV!Cd`e>2~v7ySNJ7e%8x$>~>la1`xJI#;k4bIv!)U)stDPCJLE8CIL| zAVsp}gK~i@XIhv|h_mUT&-HW#AjY8R4YS*FuZ)Br@hvMCkW3y zv13)%-x@-<-38OpP+PYW<#L@!^|nCUTvruy8FjrkX{)z1Rp)$`c23FLXMXXhcewp2 z`b^OY@p+*)Lvg%Uoy@Xp^AC1@T0W|&JM@lsP4Jzgu3z1katFR#S1X3q=lu?hN9oB; z>!P1s$HKbiiUj{u{@s0H)GmL9Ecvr1S#`Or&OkiJxi=i96CE}b!p5d*u3>fEe}sb- zu7>-A0>>22PX{jkB!4E#{`^dQt*%-8D=dgD>^4D|Jm4c^`bTOFVH(26zm7jXXc2k@ z3cqa_PVXrEhe8_&3S}gOW0dWl2S~7jBHU>GqLe`VcG3!V5qBQhH5!6=`z+;s{jBVy z#I}qIArbCuhJ1|?DTc2(RfCo8M9Lu{b)rG{)*+dP_Y>+3rBaQg3aOwFBPm~?xJD#z z6i~$uAdWOj^o~+=gnTQC)W=0;q=KXlBS$7cpws(qEk@A~V@$Xs1!4otV}ZHpwBk{Q z#wGwCP_&F=v`%EST0mr)awks{k;%_Qk5 zsnwmVr0td@w>ry>^P~ex68!0-6O-hV!KCw?WYUeKLqako3jDklEXtB%@Xn+q^R3^z z6nIpMBQmA_&f|7*6SDr~Ym?OLJ1L5XU`-YiVPTFBuT5%Z-cHdeEc%+=2P#CYr|#Q4 zehyU7RaD^ON!wR7zYw+LJW4$y&d@f|$r~u9(*I8Hk4l}#$uUq_kf>N{44JE^n(-f6 z@KKo`Og}a{P*|CfkFlfG)3iKCWN7|=lZ~X8r^>MAd80H0{;HgDyX-OX*evArlaszT zvQ*}tRPu;BWG+xppEnIjLIGjudD+)J z2~B~pmRwkKDQ7jMGFd4M1B7Fx;Jv2sekT~qER4F>245yK66eOLrjc)(Ej$Sk3%w7|kJf__^RkXJ}= zRLCSP&UjHM%oag6`JBVd&cUnbR+{~3VbNV|(dtUk12V)H76eMkPOMG$noCEfT$5=K zq0pw&=;dyE<{FTO7`H7}iZ5O)j3rSjo}1*BUA0lPE3TM)#?s4VwBR;0#Q-Zp`lHl; zG&nLV@k|`525)%1cp`STQOJT~oW(f2VExqR#dzH0GEA=G6vW_g;&e3R(%qzJ{GFp* zA|S}Qc(b1+tw}|JD5mArrg#*{wwbHHqekr+ucb!D&f|qlE-wxBao%ZCPmnByER;2n zI!5HFxoO1?t#DO7M0vL<#v7r;$OEG0_>85!K67fo=}Ud_EKz1kF>Q_q;V6PrDY7`A zN7^Z?AL;+gM>CDJ7(?MmQqdOA0k!ws$zt6v3D|3`lolx~^hdns^?OuQY-RS8*srZq zj@S!g`Yv5vNQM-JRBv8XAJ3x@{54E3>a1;qa!s#!00I<5Nv+%!$>l)E@zDj^ZP$Yp1?Tz-^@eF8-L6dP=GiC=3 zWd|faQZ*-1`y2Yy;|tL_M=UN3O#H#YaVU0-7V5xLji6Qj<4kkTxj-7mgjR7%Xf9Qe zbW&!o@0V;?jAt7TYM5Z)ggcZQ!+b2vDhL<(HZTD~bR%vP?SQTS@vuQL{Vq#$ z-DcDKDQKRCmXdb!a~YAKug}@d(Fv1r1(Ge4WXL;mrmT4gc_{;#XJ> z8JgC6T82rhI?n2&H(O#UT9dz*MmV6XT-d^-9ph#jQp=yB*D9b3ZO?p~2u|L`3Eo-3 zmCEWIvt`!0!>zUzYz;1s<5(wqSQ7!=^ugRS{xTwDz_0zQ=j3H^TJW=sOWQfvvyjV# zapG5xCB~L(`?fW6;nm^Li#nl>E^25uKNv^8*&`joE4YaBDZ;vC;a-A8WWl}s z-n|;TT3Q{wq`^48%38f$oUUx&xpAK{P4O$)UITcaCV%gnImFwmK69piMd^N9eq3c< zx8q2!mF!2i#X9%hF3&421=)W8-M&D0U$ARmsBB-@Zf|%;F9g~f1@4WZ>5U^U;u0!x ziC|nZ4K8&Nn-0Zhg0b2B*xaig*ho)4yyvrPPoZoNf~E(#h(SRyWnfGN4W??byQZ?c z4&049>1+xaZh;TCbqseb4(FbS`;G{(FpNZqjP%lQ_lJxGrj6j?Xex8@E?1}_Q(W{V zF!n3<3%}$fG#(DByW2Qgsu4fVWauRdxw4B{2EPIYjM?UlLQO`KQlkQ4F$XljVUrCSwsG9i$=gWt70^B=z1T1zH!#$Q&(!G|D@ic*Qtr zWE)FoVI;i-(#V`t6PS*poOrAYWb2I9jxzKznbHWIx(lBY8Jzel6u?{+^ehw@GA$`v z#U)>LTbM9o>c${CIwKxB8~t#0;N67D=&X5ui_7S&kk;9fYB4{^FH_w*4_}&}TosIGUMP}VD7IKA O30 - -Setting up SheepShaver - - - -

Setting up SheepShaver

- -In the "SheepShaver Settings" window that pops up when you start SheepShaver, -you can configure certain features of SheepShaver. When you click on "Start", -the current settings are saved to disk and will be available next time you start -SheepShaver. - -

The settings are divided into four groups: Volumes, Graphics/Sound, Serial/Network and Memory/Misc. - -

Volumes

- - - -

The main part of the volumes pane is a list that contains all volumes to be mounted -by SheepShaver. If this list is empty, SheepShaver will try to detect and mount all -HFS partitions it can find. A CD-ROM drive is always automatically detected and used. - -

SheepShaver can use HFS partitions, whole HFS formatted drives, and it can also -emulate hard disks in single Linux files ("hardfiles"). - -

To add a Mac volume to the list, click on "Add...", go to the "/dev" directory -in the file panel, click once on the partition you want and click on "OK". The selected -partition device name should then appear in the volume list. After adding volumes to -the list, you should unmount them on the Linux side. To remove a Mac volume, select it -in the list and click on "Remove". - -

You can create a new, empty hardfile by clicking on "Create...". Enter the file -name and the size of the hardfile and click on "Create". The hardfile will be created (this may -take some seconds) and added to the volume list. The so-created hardfile will have to be -formatted under MacOS before you can store something in it. If you start up SheepShaver, -the Finder will display a message about an "unreadable" volume being found and give you the -option to format it. - -

Double-clicking on an entry in the volume list will add or remove a "*" in front of the -device name. Volumes marked with a "*" are read-only for the MacOS under SheepShaver. - -

SheepShaver will show a "Linux" disk icon on the Mac desktop that allows access to Linux -files from Mac applications. In "Linux Root" you specify which Linux directory will -be at the root of this virtual "Linux" disk. The default setting of "/" means that the -"Linux" icon in the MacOS Finder will correspond to your Linux root directory. The MacOS -will try to create files and folders like "Desktop", "Trash", "OpenFolderListDF" etc. -in the directory you specify as "Linux Root" (provided that you have access rights -to that directory). If they annoy you, you can delete them. - -

To boot from CD-ROM, set the "Boot From" setting to "CD-ROM". -The "Disable CD-ROM Driver" box is used to disable SheepShaver's built-in CD-ROM driver. -This is currently of not much use and you should leave the box unselected. - -

Graphics/Sound

- - - -

With "Window Refresh Rate" you can set the refresh rate of the MacOS window. -Higher rates mean faster screen updates and less "sluggish" behaviour, but also require more CPU time. - -

The "Enabled Video Modes" controls allow you to select which graphics modes -are available for displaying the MacOS desktop. You can, for example, disable the window modes -when you want to run some Mac programs in full-screen mode that would otherwise erroneously -switch to a window mode. If your X server doesn't support DGA you should disable the Fullscreen -mode. The actual mode to be used is selected in the "Monitors" control panel under MacOS. The -color depth is always that of the X11 screen and cannot be changed. - -

The "Disable Sound Output" box allows you to disable all sound output by SheepShaver. -This is useful if the sound takes too much CPU time on your machine or to get rid of warning -messages if SheepShaver can't use your audio hardware. - -

Serial/Network

- - - -

You can select to which devices the MacOS modem and printer ports are redirected. -You can assign them to any serial ports you have (/dev/ttyS*), or even to parallel -ports (/dev/lp*, useful for printing if you have Mac drivers for parallel printers, -like the PowerPrint package from www.gdt.com). - -

With "Ethernet Interface" you select which Ethernet card is to be used for -networking. It can either be the name of a real Ethernet card (e.g. "eth0") or of an ethertap -interface (e.g. "tap0"). Using a real Ethernet card requires the "sheep_net" driver to be installed -and accessible. See Using SheepShaver for more -information about setting up networking. - -

Memory/Misc

- - - -

With "MacOS RAM Size" you select how much RAM will be available to the MacOS -(and all MacOS applications running under it). SheepShaver uses the Linux virtual memory system, -so you can select more RAM than you physically have in your machine. The MacOS virtual memory -system is not available under SheepShaver (i.e. if you have 32MB of RAM in your computer and -select 64MB to be used for MacOS in the SheepShaver settings, MacOS will behave as if it's running on -a computer that has 64MB of RAM but no virtual memory). - -

"ROM File" specifies the path name of the Mac ROM file to be used. If it is left -blank, SheepShaver expects the ROM file to be called "ROM" and be in the same directory as -the SheepShaver application. - -

The "Ignore Illegal Memory Accesses" option is there to make some broken Mac -programs work that access addresses where there is no RAM or ROM. With this option unchecked, -SheepShaver will in this case display an error message and quit. When the option is activated, -SheepShaver will try to continue as if the illegal access never happened (writes are ignored, reads -return 0). This may or may not make the program work (when a program performs an illegal access, -it is most likely that something else went wrong). When a Mac program behaves strangely or hangs, -you can quit SheepShaver, uncheck this option and retry. If you get an "illegal access" message, -you will know that something is broken. - -

-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/troubleshooting.html b/SheepShaver/doc/Linux/troubleshooting.html deleted file mode 100644 index 4dc3e2933..000000000 --- a/SheepShaver/doc/Linux/troubleshooting.html +++ /dev/null @@ -1,65 +0,0 @@ - - -Troubleshooting - - - -

Troubleshooting

- -

SheepShaver doesn't boot

- -SheepShaver should boot all MacOS versions >=7.5.2, except MacOS X. However, -your mileage may vary. If it doesn't boot, try again with extensions disabled -(by pressing the shift key) and then remove some of these extensions: -"MacOS Licensing Extension", Speed Doubler, 68k FPU extensions and MacsBug. - -

The colors are wrong in 16 or 32 bit graphics modes

- -If you're running SheepShaver on a something other than a PowerMac, it may be -that 16 or 32 bit graphics modes show false colors due to the frame buffer being -little-endian. Apart from patching the X server, there's unfortunately nothing -that you or SheepShaver can do about this. - -

Full-screen mode doesn't work

- -Some X servers on Linux PPC don't support DGA and full-screen mode cannot be used -with these (in this case, you should disable it in the "Graphics" settings). If you -are seeing a message like "cannot map /dev/kmem (permission denied)", you have to -either run SheepShaver as root (not recommended) or give yourself appropriate access -rights to /dev/kmem if you can login as root. - -

Ethernet doesn't work

- -
    -
  • You have to either install the sheep_net driver or configure the ethertap device in the Linux kernel to use Ethernet. See Using SheepShaver for more information. -
  • If you're using TCP/IP on the MacOS side, you have to set up different IP addresses for Linux and for the MacOS. -
- -

SheepShaver crashes, but yesterday it worked

- -Try the "Zap PRAM File" item in the main menu of the SheepShaver preferences editor. -When you are using a ROM file and switching to a different ROM version, you have -to zap the PRAM file or SheepShaver might behave very weird. - -

Known incompatibilities

- -
    -
  • MacOS programs or drivers which access Mac hardware directly are not supported by SheepShaver. -
  • Speed Doubler, RAM Doubler, 68k FPU emulators and similar programs don't run under SheepShaver. -
  • MacsBug is not compatible with SheepShaver. -
- -

Known bugs

- -
    -
  • The QuickTime 2.5 Cinepak codec crashes the emulator. -
  • Programs that use InputSprockets crash the emulator when in window mode. -
  • The mouse cursor hotspot in window mode is not correct. -
- -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/using.html b/SheepShaver/doc/Linux/using.html deleted file mode 100644 index 9fbceec56..000000000 --- a/SheepShaver/doc/Linux/using.html +++ /dev/null @@ -1,113 +0,0 @@ - - -Using SheepShaver - - - -

Using SheepShaver

- -

Changing the display mode

- -SheepShaver can display the MacOS user interface in an X11 window or full-screen -(much faster). You select the display mode as usual under MacOS in the "Monitors" -control panel (under System 7.x, click on "Options"). The "75Hz" modes are full-screen -modes, the "60Hz" modes are window modes (this doesn't mean that the video refresh -rate is 75 or 60Hz in the respective modes; the rate displayed has no meaning; it's -simply there to distinguish full screen modes from window modes). - -

Full-screen mode

- -The full-screen mode uses the whole X11 screen for displaying the MacOS user interface. -You can temporarily switch back to the X11 desktop by pressing Ctrl-Tab. The MacOS (and -all MacOS applications) will now be suspended. You can resume SheepShaver by activating -the "SheepShaver suspended" window and pressing the space key. Using full-screen mode -requires a DGA capable X server. - -

Networking

- -There are three approaches to networking with SheepShaver: - -
    -
  1. Direct access to an Ethernet card via the "sheep_net" driver. -In this case, the "ethernet card description" must be the name -of a real Ethernet card, e.g. "eth0". It also requires the "sheep_net" -driver to be installed and accessible. This approach will allow you -to run all networking protocols under MacOS (TCP/IP, AppleTalk, IPX -etc.) but there is no connection between Linux networking and MacOS -networking. MacOS will only be able to talk to other machines on -the Ethernet, but not to other networks that your Linux box routes -(e.g. a second Ethernet or a PPP connection to the Internet). - -
  2. Putting SheepShaver on a virtual Ethernet via the "ethertap" device. -In this case, the "ethernet card description" must be the name -of an ethertap interface, e.g. "tap0". It also requires that you -configure your kernel to enable routing and the ethertap device: -under "Networking options", enable "Kernel/User netlink socket" and -"Netlink device emulation", under "Network device support", activate -"Ethertap network tap". You also have to modify devices/net/ethertap.c -a bit before compiling the new kernel: - -
      -
    • insert #define CONFIG_ETHERTAP_MC 1 near the top (after the #include lines) -
    • comment out the line dev->flags|=IFF_NOARP; in ethertap_probe() -
    - -

    -Next, see /usr/src/linux/Documentation/networking/ethertap.txt for -information on how to set up /dev/tap* device nodes and activate the -ethertap interface. Under MacOS, select an IP address that is on the -virtual network and set the default gateway to the IP address of the -ethertap interface. This approach will let you access all networks -that your Linux box has access to (especially, if your Linux box has -a dial-up Internet connection and is configured for IP masquerading, -you can access the Internet from MacOS). The drawback is that you -can only use network protocols that Linux can route, so you have to -install and configure netatalk if you want to use AppleTalk. Here is -an example /etc/atalk/atalkd.conf for a LAN: - -

    -eth0 -seed -phase 2 -net 1 -addr 1.47 -zone "Ethernet"
-tap0 -seed -phase 2 -net 2 -addr 2.47 -zone "Sheepnet"
-
    - -(the "47" is an arbitrary node number). This will set up a zone -"Ethernet" (net 1) for the Ethernet and a zone "Sheepnet" (net 2) -for the internal network connection of the ethertap interface. -MacOS should automatically recognize the nets and zones upon startup. -If you are in an existing AppleTalk network, you should contact -your network administrator about the nets and zones you can use -(instead of the ones given in the example above). - -
  3. Networking protocols for serial connections (PPP and SLIP, for example) -can be used provided that you have the appropriate MacOS system components -installed (e.g. Open Transport/PPP). -
- -

Using floppy disks

- -Floppy disks are not automatically detected when they are inserted. They have to be -mounted explicitly: after inserting a floppy disk, press Ctrl-F1. - -

Accessing Linux files

- -SheepShaver will display a "Linux" disk icon on the Mac desktop that allows you -to access any Linux files which are in the directory specified as "Linux Root" -in the "Volumes" pane of the SheepShaver settings. You can open and save files on the -"Linux" disk from Mac applications, copy, move or rename files from the Finder etc. -SheepShaver translates some file name extensions to MacOS types and vice versa, -so e.g. *.jpg and *.pdf files will show the correct icons in the Finder. MacOS -resources and Finder attributes are stored in hidden .rsrc and -.finf directories. - -

Copying text via the clipboard

- -SheepShaver tries to keep the Linux and MacOS clipboards synchronized. That means, -when you copy a piece of text under Linux, you can paste it into a MacOS application -and vice versa. - -
-
-SheepShaver User's Guide -
- - diff --git a/SheepShaver/doc/Linux/volumes.gif b/SheepShaver/doc/Linux/volumes.gif deleted file mode 100644 index 676248b7acd71ad6e381e0c209561415e925aeca..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 7705 zcmZ|TRag^%8pd%DQIrr+knTFyp~lG0rR1`GzH$LQ`Z>5`BR>F&;*=iDAS zzvqAT-M=@Vl#C=VpK%(p5b`w=65{_dMIins4g}(#Mv)NzR*H@IHz*R~pRS*C{G8?I zOh0GzUr?mcf9ics>vL+KQ~I2|=Rlu_1cm;SDH8Ob5}y%UhJ>T?Te)lizJb$f(<0l9#Rx21w^2{W-%RfWvqrPKoCzH07$jy zSekIq-PFMOic+?80@l*N#a@><2&Xjz&jI<+mKbqa_}8MXE>-lW;P4Xij8zDKUoq`u1=DGfWD>l+&bN7uDfV0F9Unh7EDm3dQ3S;Ay88*V zp%z7hBJ*|-p8j+WD9FpORw_jJ^N$x-^dgw{OKPUAnZ*eS1LASA?L4hgk8dLujq34j z4#ZT+iVv!WzwFyqlAkv106dFcvG{e7@uV0oy6qp<{|#k6lJWPMDo$vR#Ak7u%&0qT zIO%0RZn>CFQ*Ig?q0Jw?s)mp_M~$w5atm3aF=G~cxVuQ^6P`9El0x( zmzoMlH)U$6)3E`|SwBrOiApcA9f@8o8A=K3AYC8J`S9!RpAO9|hRyIHiUs-eG2z!s zrDOOq-g={ZCPU}3qCAHelZM$P`x27(vU)?^5_&t+dhUnZzS7st_S3q(O5>JR`K4F$ zkU}~N1`Cvqt3}tDk-CK)gVOVMGXVr){gMm9RNPqd;l0>uATiKmHH2{aX5D`*hG)@I zY8kT5!GJ})2z2-5wGHwk<6lE`*fm;u92dJ!2wXp2?pO4&HG3KhJe(dZY8T!gwOk+F zA9uWFe>nN|(c$5=pT7LzY?#OIYj<%}Y0Z9*r^n`xxFWERy)fCXJ>*wFra?QtXHc$P zzzFzT3{uCd%X=j;G@m|iAq?nr1H06>hllI$pa+uoSkoVpg!Zv}znU;-z4#aoosWs} z@2kv6NmR@Ito_^Dlq&uwRs-d1KRl453z{9A5Z|f5a;r18=8e zS0s-2ei98S`Jxqj1npY|&X^s-X88d?lwM*0(NOi*G!B_kz{q$J52 zMtyiQQQc9f9!4%fpB5?mSxmH*d@j)lX9suFX^f+qB5^D{q$}mfHH|~ReXYOm=w$eCh@49JvrZdqe!xt|nSwF(CpN4rLS#lj|5Txy*u5 z&(4<14Rsa*Kh=yUOI8GM9PY+P%aWRd>?Wuu3r`@qyfj22nnOB) zg>_W0AK3csR+?}`?NwdFkJ7F!>v??1OY=s|GRM_R9i(4iooYc-J5_FrS z1n+57)Pu&^5jM@7A>F%5#m4qSh+CiBa^k_2)l@5~%h1sB75tz@O3h7DXu=oWFqji{A$r#a12by9<;KKY8l3#t3Zj9>UnOx<7LQ2DYY;%BOcalc>t8#nL`d6e~oGchC??+Nqtj;fP=Qc2L?zEL81sVJG7&>_Uk z^?PU}Pb^_lJ@sw=I1q~g)-7j*>oq@VGE!4O*syyS7@f&K6&G=5O3c`0DfzpA3db8I zO$TW^jGT(=om7pc209&&>QpVnuas(Kwy7xh$h2@g^}xa=b!-$^mzYgNzpZ^g-{ewM zQ~xM~tf`VHVo+sFL5QO3-0V+|?{1vRBIPjoW>GpL8t2m+J`IthWiVxZ~|?7E=8BiyQzDhm&6A2x}wP6ZnU)(A8ULOze4#zkVL3}Q6)ODUe2 zedZk7K!m{MjHpIZjW}85DPG#%RVbSE{@mhbza4QAJ+G?>*`SwdbW>k;PSdO2Q3XUs zxaBD1X$o)o^wW=Ivt8zGRI|y3VNU*7bFJ)OWN_i2r_6YYElBoZP#$RdGGKp|A(oeM zK@+7ncys|rtP|aT@EQ!bJ+s!CO!di>{pKPXUOMx08$lqj)|ZiR++dOx^u1*@_Vdkg zmg??;-cJE@+}p1Djr|DAff)&hG0!?PHZc3(d_JygtI)?(+St|u%kTHiS@W0WGgx)* zWB1GVPuCsq+D^j0Kdc!x`z9PUoT<(!fqgIXx+Sm9@`Vbv)*VTOxyJcH;>yR$%98LZ zF2rS@ANl@})ZNB+A@8pi4_D2I$CKFhhwbl(Ek?b^8^gbk=VOSu!}hkzE;bZue=0Hm z3lsknkkI`{>$7-uogRP7HGdCW<6C7X$14BTNg_>VV|0h}xaS|&Dks1p_jUY0#AnYxFW(Fz}Y3ex?YT=w9N|VLMeD+<3VO?|YW$}i#_U+A&k=!NJ684Sdrs<&>8>0(RJ}|;EBYW*8R}~cubBAsIr~Ti!5VM{~a3n zvd*YRE2_>T>J2{YL{H?0eg@P^ERYgYTn|&Qy7mj?=&l=0eRY0M)VH%?!JvxhT#;xu zikL{$=;S2r4iBwatLWb;F`!ze)$phdEnpU&&ch$WW`Za4L!o>LAL;zv(dKFkh8k|3yv`?Gt6~Un$k!Yt4F4ao% z=1W-=O;+p$U6_MCWm2LGKZf3ht9T|y@+r`4muGb#S|(%>6s4hwy)Yu6WOI0k4WeEWSWKuCZK1&t>A?5hD1q@tX)S`1P@LK)7`AWOo_^x7k!h8Y7L_a)eL@9r6~B2*&xGsmh!} zSM#PhJ#UK~2Y`7!4->7ECFeXBw{aN z&p{(ka4*;HMQ$QZu4byPP!lBL7U~2;)sNIah7cKZ%ZyA!uocnk3`#|OAxoKtSDeEI zE^VYz^Q!|yqyi;W2#6^fL^uHkucD&2s$cd%Wt5Rw1=c*XFyUI8Ze^M(j$%1f ziLt(7kt#L8KY@}>MeK=1<%2kymp=3pG!k7t+tvBxDz@)~16z72S@URI3Q7p30*pjU z3ihC_3`9%2rFPaO8(w9uFUnXV%a#YD4(`epPyJ5#%ZDh-FTBbFeM}Seve51-(>F3IVC7XC6{oKVBN1u@Zuls9pz7$vY8ttUN9!tIwd#Zb z89ot*bWum%p-hldWvQ$*7jgEUMwO@lDFd^;B09`?p1S%1U~pe+L|kVgP-kjGAfj74 zB2s7FTxVNc_lc&Od7{o)px$*KU^S$C4vcgaFi z*#drPa#ImAKD%;rolSFjT5}VzcO`T4D=}9*e^(A157|x^+j>to;})f`7Rvk<%hw+q zl3l81n%nkue$uya2DHiqxNvaLa@D(-BCb7y>lK0ZKgOCBdAD14%|85XR#aG3+-7de z4s*Lu^P)RzEtq+4U9X@b()!1Sy~D=UKfhH4$8+Di1D@ZmY}^5V?e%u}-z_LR$) z&JIWV);B*p30u5M!kQ519Ww$7zV5E}@!w79U4D#rY>0b3*!*x+My8W@V=U>Ebix$k z_;}9j!usIC5#41r({(1^&CT=CN6B69+C_A=oxB80N%G$B+WpsllXOdSHBS#|%P(%1 z*81k2m%~jO@;#KvKVmiIWutq3)ixPHd#%4ZtK&4-AM{%1)H{D=!8-4C``PCK?Ry>Y z(`B)*z}VN9rO!W_sBKj}0HZueuW%L7oga3P6R}uaLRUKK_01amW?`GuL?t99+9}o+ z##URZb>zA#S!=MSX(D`7! z7s+tf*I}}^^=;Apy+4N!QtJoh^M@CQfzaXK2c>64mS`p;C{<+}0VC)+Bj=qX*lQ!x z$fJL4$v20UCJu`57+|@O)le|6*B3(0A3sIxhQpRE>MaHB+AtiwzVFKVV z0~2bEE+TU@s?-)yS`VV3e#$0XK(S`xp>}BYIas# z4*iJ_uyA1z)m!~3u5=MkG&M#$3zqah3<|`e!IL_3j#n&j{v1@gLn`Z6RL$ApF5%)K z1jcV!CA6GrBW}b^ss7k5P3ntU*u?z7Qy53}nHGH%Q5P&}7>DtJs31nK&FrRKOD8<+ zV2sYTM)-8Pf)X;V>2duP1E*u_<73zz2aG5PX=cCiLVC=C{>5lZ%xJ1l?&PB1R_fwy{o-(`@95*=#>b^V zWxr{krP=hQ`PQYTTu1?e5N5)f`0MNP#$zuz4oYibZTl{8b7}dAG``6r{$v-tcM$cm zQaiE-`$iBLzZv&Xx&jaM877Er#gDC}_?v6|7tI%YIDF;!@$U$Txf!%<)U@n=$xzHe zemxXlA-y)OO$J}=EoiPn7)#rzQ%I226ooQHdr67VutbQoW;N$ zqY_>!qvv);Q`ut&ZDPJa-XJ7f^ZTJKhs7j4x*?OXri8^Py{s++-0)K0q$t~zvB$=I zTKPh@RizToXCJ>TxZ>Y9hC025i@b%ty7l&S<$-nE#9$k$&LtVQ?PZYq;b}>Cf8C92 zC$Np>)Mx9f@8Tswp}zsp>kN2p^&4B@sZY>XKe{X}He%k_ezjP8H`8+$vuJs}Xa|~+ zmQj|S^^|o~wUhgll&82P*0>ilx3?#|TVW5WdaAi*;i$FW_wj^-fII1LlA9G%>V5Y} zywbW2AUy`F*%^BSWc#h((!!1w=pzrt6c5G?l81qNO}>ZTjR%nBgQcUxn2f_Pz`>tU zhK;AgEiB0D=wW%=QOWXA3UI5iaI1*znC#8b71r`i*|F2W@ucEPC)+YoCin$ne+sy` z=X+uVIU(oX?btjyX9IKH9`!Asd~is@&V-<6?u@pbl6*hTY&#@m-=jKCB+Z1s&peZ8 zJi}#AVMDYh0I_yM%T8Wq?w@`;ryod*Cp+yZJHH)0*P=`HYTLH(J$-!Iu2H=B)M)qt za$y*A4ge-7mM4^JZ>bz7%a!j&d0yVLt*T9K>$4vTyt^vfKIeINL2h_54ZJcw#;Gbi zB*;7p#<+HFydujyUu9kTEx4~s)fgyr6TH%ZrE(LVc@ueDr#g1^le{b}xJMHImK>wn z)$r<_SMA59TL~~!eCRgon1FC^F_rud-cEq$byswp3HCdpbGXiHzbnqXt1`ULeRspG zQaKdCyY5LK@10#!4rRN#uN^ZhJw8hDJF8?*hrV8 zTp;MOQiC7=dfqoIU!ULJPDH$duRn~kKkk2jcrW|d8}SI7dVq940y!PK{T1e|QwSEV&XiSOEM*Xx`TW$bD)<|wY!9HiNHJ5; z=S9-|pMA{=;~pTb?sUl*OmD2rd|~=fx8Y@ieV*)Ok$#Cltv%|WnPbC_0MvJMdb20S zzasG1Efxt*g!|%Yzr*$B&Nj+EnQF8~XzndHWJ|=->CayPrV7=){~UnM|BMxzkHHc8 z3s-iF#kwDV9`f1P|LqKUM{n@;!oJZ>U_07w@z!N$Ja4~D*QF8M!Xffq)9(Dt{baQ# zmfrB&!&T;=z3N8uNj-N>zlzg4j6t`>DM z+g?y7I*Pt!t~n9KK>g}Szwv4>MzFQ*&hnRERYH__NezWEdZ085PKn<#3hg%%$(JXY z7%o#zQe@u4j@>Ezi2#um(F>;DR1-BPaeTu>#$G=y*EceF31$<63^pXnU(k>{PBRJB zFI3QxennTwleAtqDSTOQby1+u$DN?25}8sI4=8fQ8EiQa{+usl^HW7BAd3WT03oaz z^c(AQr?|_o)Yu2r5gz8+3l;h6sOl^}pIh^(lT4w!24`S$mOghu^sHDW1THlG087vSD|Cy ze0jA{Ur{?cC(y}#t>-#vuF>ff#iF@XePA?5=doYQBj`3Wc{S(V14^DvyThB+bGk$Y zQy9NqF3BA)QMp;QMt{OnD=bL-kuT2fcC-=*HXAYy7jsiGan_f;QBpU&sFqCEp!=|i zqwq+dAgUXxf{y1jox%mwq~#i9(j1+jkCXVq&ktJSCLE*Dz6u}9M`vYNM~K-yY482< z0uQL=k~e8sh8enOS-CC|iWd zov5y13D((Js?O*0IO!%bu**>|kG-UC9-C0Akc+wVn(_C=kr8sRtbJNU4Ut5L`1B&a z(;U7dnxHni!I1vgk;I~BB#CBPsBUu6vb#9L7ErRw~OW+M;{TX{geU`jx>vpE-}S8 z3hxInI)i8cF!FAK9%(l71QJFV?Yjt>9V_QVqFowoGR7p1US$x`Z5WP;f2bb|O)}mb zEj_cRj2h4uOwvh9WPkh4R1%g<3)s{$XiQQ9(ojoM#Iu?{RSetgso-LC(lPsa4jK_j zCDph}v$+El^>bj5r#sk9P9u(4uYc<9@YdJr0fmG_+>}-MjZZu(!#2~O(?G)8g6DHm znsx7^j`cPrFWxBnVp&4z_|R0R3Bi`m;n|q_13c9HB@xbvR3B00B!g;{<8?N&$?@O} zsya9z-yWEAB#hM7OBK4MmM^dg`0jHz8F`eDH_F%lJ;qB7Mu(R@s= 4.0.1 is used. The more accurate engine is enabled with ''PPC_ENABLE_FPU_EXCEPTIONS''. - -===== Features ===== - - * Self-contained. No guest OS nor any complicated run-time environment is required. Your CPU emulator simply needs to support a special opcode (''0x18000000'', OP=6) that terminates execution of the current basic block. - - * Supports several CPU cores: SheepShaver, [[http://microlib.org/projects/ppc750sim/|Microlib PPC 750 Simulator]], [[http://model3emu.sourceforge.net/|Sega Model 3 Arcade Emulator]], [[http://www.qemu.org/|QEMU]]. - - * Supports the AltiVec ISA. - - * Generates more than 2 million tests with specific values to trigger condition codes changes, unspecified results (matches a PowerPC 7410, aka my Powerbook G4). - -===== Downloads ===== - - * The primary source is available in SheepShaver CVS. - - * It is recommended that you first run the tester on a native PowerPC platform to generate a results file. For reference, here is the [[this>projects/ppctester/files/ppc-testresults.dat.bz2|PowerPC Emulator Tester results file]] I use for SheepShaver. This was generated with AltiVec tests enabled. This is for revision 1.30+ of the file. md5sum is: ''3e29432abb6e21e625a2eef8cf2f0840''. - -===== Links ===== - - * [[http://www.valgrind.org/|Valgrind]] contains an interesting testsuite for the VEX. - * [[http://perso.magic.fr/l_indien/qemu-ppc/|Qemu-PPC]] contains part of the original ALU tests used in VEX. \ No newline at end of file diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp deleted file mode 100644 index c6c0fbf47..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp +++ /dev/null @@ -1,256 +0,0 @@ -/* - * Ethernet.cpp - SheepShaver ethernet PCI driver stub - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include -#include "xlowmem.h" -#include "ether_defs.h" - - -/* - * Driver Description structure - */ - -struct DriverDescription { - uint32 driverDescSignature; - uint32 driverDescVersion; - char nameInfoStr[32]; - uint32 version; - uint32 driverRuntime; - char driverName[32]; - uint32 driverDescReserved[8]; - uint32 nServices; - uint32 serviceCategory; - uint32 serviceType; - uint32 serviceVersion; -}; - -#pragma export on -DriverDescription TheDriverDescription = { - 'mtej', - 0, - "\pSheepShaver Ethernet", - 0x01008000, // V1.0.0final - 4, // kDriverIsUnderExpertControl - "\penet", - 0, 0, 0, 0, 0, 0, 0, 0, - 1, - 'otan', - 0x000a0b01, // Ethernet, Framing: Ethernet/EthernetIPX/802.2, IsDLPI - 0x01000000, // V1.0.0 -}; -#pragma export off - - -/* - * install_info and related structures - */ - -static int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds); -static int ether_close(queue_t *rdq, int flag, void *creds); -static int ether_wput(queue_t *q, msgb *mp); -static int ether_wsrv(queue_t *q); -static int ether_rput(queue_t *q, msgb *mp); -static int ether_rsrv(queue_t *q); - -struct ot_module_info { - uint16 mi_idnum; - char *mi_idname; - int32 mi_minpsz; // Minimum packet size - int32 mi_maxpsz; // Maximum packet size - uint32 mi_hiwat; // Queue hi-water mark - uint32 mi_lowat; // Queue lo-water mark -}; - -static ot_module_info module_information = { - kEnetModuleID, - "SheepShaver Ethernet", - 0, - kEnetTSDU, - 6000, - 5000 -}; - -typedef int (*putp_t)(queue_t *, msgb *); -typedef int (*srvp_t)(queue_t *); -typedef int (*openp_t)(queue_t *, void *, int, int, void *); -typedef int (*closep_t)(queue_t *, int, void *); - -struct qinit { - putp_t qi_putp; - srvp_t qi_srvp; - openp_t qi_qopen; - closep_t qi_qclose; - void *qi_qadmin; - struct ot_module_info *qi_minfo; - void *qi_mstat; -}; - -static qinit read_side = { - NULL, - ether_rsrv, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -static qinit write_side = { - ether_wput, - NULL, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -struct streamtab { - struct qinit *st_rdinit; - struct qinit *st_wrinit; - struct qinit *st_muxrinit; - struct qinit *st_muxwinit; -}; - -static streamtab the_streamtab = { - &read_side, - &write_side, - NULL, - NULL -}; - -struct install_info { - struct streamtab *install_str; - uint32 install_flags; - uint32 install_sqlvl; - char *install_buddy; - void *ref_load; - uint32 ref_count; -}; - -enum { - kOTModIsDriver = 0x00000001, - kOTModUpperIsDLPI = 0x00002000, - SQLVL_MODULE = 3, -}; - -static install_info the_install_info = { - &the_streamtab, - kOTModIsDriver /*| kOTModUpperIsDLPI */, - SQLVL_MODULE, - NULL, - NULL, - 0 -}; - - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern uint32 ValidateHardware(void *theID); -extern install_info* GetOTInstallInfo(); -extern uint8 InitStreamModule(void *theID); -extern void TerminateStreamModule(void); -#pragma export off -} - - -/* - * Validate that our hardware is available (always available) - */ - -uint32 ValidateHardware(void *theID) -{ - return 0; -} - - -/* - * Return pointer to install_info structure - */ - -install_info *GetOTInstallInfo(void) -{ - return &the_install_info; -} - - -/* - * Init module - */ - -asm uint8 InitStreamModule(register void *theID) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_INIT - mtctr r0 - bctr -} - - -/* - * Terminate module - */ - -asm void TerminateStreamModule(void) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_TERM - mtctr r0 - bctr -} - - -/* - * DLPI functions - */ - -static asm int ether_open(register queue_t *rdq, register void *dev, register int flag, register int sflag, register void *creds) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_OPEN - mtctr r0 - bctr -} - -static asm int ether_close(register queue_t *rdq, register int flag, register void *creds) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_CLOSE - mtctr r0 - bctr -} - -static asm int ether_wput(register queue_t *q, register msgb *mp) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_WPUT - mtctr r0 - bctr -} - -static asm int ether_rsrv(register queue_t *q) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_RSRV - mtctr r0 - bctr -} diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile b/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile deleted file mode 100644 index f9f12eee4..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile +++ /dev/null @@ -1,25 +0,0 @@ -all: ../../EthernetDriverStub.i ../../VideoDriverStub.i - -clean: - -rm *.o hexconv Ethernet Video - -../../EthernetDriverStub.i: Ethernet hexconv - hexconv $< $@ - -../../VideoDriverStub.i: Video hexconv - hexconv $< $@ - -hexconv: hexconv.cpp - mwcc -o hexconv hexconv.cpp - -Ethernet.o: Ethernet.cpp - mwcc -I.. -I../../include -o $@ -c $< - -Video.o: Video.cpp - mwcc -I.. -I../../include -o $@ -c $< - -Ethernet: Ethernet.o - mwldppc -xms -export pragma -nostdentry -nostdlib -o $@ $< - -Video: Video.o - mwldppc -xms -export pragma -nostdentry -nostdlib -o $@ $< diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp deleted file mode 100644 index 1e1c9b244..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp +++ /dev/null @@ -1,78 +0,0 @@ -/* - * Video.cpp - SheepShaver video PCI driver stub - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "xlowmem.h" - - -/* - * Driver Description structure - */ - -struct DriverDescription { - uint32 driverDescSignature; - uint32 driverDescVersion; - char nameInfoStr[32]; - uint32 version; - uint32 driverRuntime; - char driverName[32]; - uint32 driverDescReserved[8]; - uint32 nServices; - uint32 serviceCategory; - uint32 serviceType; - uint32 serviceVersion; -}; - -#pragma export on -struct DriverDescription TheDriverDescription = { - 'mtej', - 0, - "\pvideo", - 0x01008000, // V1.0.0final - 6, // kDriverIsUnderExpertControl, kDriverIsOpenedUponLoad - "\pDisplay_Video_Apple_Sheep", - 0, 0, 0, 0, 0, 0, 0, 0, - 1, - 'ndrv', - 'vido', - 0x01000000, // V1.0.0 -}; -#pragma export off - - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern int16 DoDriverIO(void *spaceID, void *commandID, void *commandContents, uint32 commandCode, uint32 commandKind); -#pragma export off -} - - -/* - * Do driver IO - */ - -asm int16 DoDriverIO(void *spaceID, void *commandID, void *commandContents, uint32 commandCode, uint32 commandKind) -{ - lwz r2,XLM_TOC - lwz r0,XLM_VIDEO_DOIO - mtctr r0 - bctr -} diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp deleted file mode 100644 index 59a0a3e09..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp +++ /dev/null @@ -1,34 +0,0 @@ -#include - -int main(int argc, char **argv) -{ - if (argc != 3) { - printf("Usage: %s \n", argv[0]); - return 0; - } - - FILE *fin = fopen(argv[1], "rb"); - if (fin == NULL) { - printf("Can't open '%s' for reading\n", argv[1]); - return 0; - } - - FILE *fout = fopen(argv[2], "w"); - if (fout == NULL) { - printf("Can't open '%s' for writing\n", argv[2]); - return 0; - } - - unsigned char buf[16]; - while (!feof(fin)) { - fprintf(fout, "\t"); - int actual = fread(buf, 1, 16, fin); - for (int i=0; i@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= ../main.cpp main_beos.cpp ../prefs.cpp ../prefs_items.cpp prefs_beos.cpp \ - prefs_editor_beos.cpp sys_beos.cpp ../rom_patches.cpp ../rsrc_patches.cpp \ - ../emul_op.cpp ../name_registry.cpp ../macos_util.cpp ../timer.cpp \ - timer_beos.cpp ../xpram.cpp xpram_beos.cpp ../adb.cpp clip_beos.cpp \ - ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp scsi_beos.cpp \ - ../video.cpp video_beos.cpp ../audio.cpp audio_beos.cpp ../ether.cpp \ - ether_beos.cpp ../serial.cpp serial_beos.cpp ../extfs.cpp extfs_beos.cpp \ - about_window_beos.cpp ../user_strings.cpp user_strings_beos.cpp ../thunks.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= SheepShaver.rsrc - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= be tracker game media translation textencoding device GL - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../include SheepDriver SheepNet - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = -prefix BeHeaders - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/NetPeek/Makefile b/SheepShaver/src/BeOS/NetPeek/Makefile deleted file mode 100644 index 233c7e5fd..000000000 --- a/SheepShaver/src/BeOS/NetPeek/Makefile +++ /dev/null @@ -1,110 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= NetPeek - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= NetPeek.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../ ../../include ../NetAddOn - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp b/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp deleted file mode 100644 index ccf5629a9..000000000 --- a/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp +++ /dev/null @@ -1,49 +0,0 @@ -/* - * NetPeek.cpp - Utility program for monitoring SheepNet add-on - */ - -#include "sysdeps.h" -#include "sheep_net.h" - -#include - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer - -int main(void) -{ - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - printf("Can't find packet buffer\n"); - return 10; - } - if ((buffer_area = clone_area("local packet buffer", &net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - printf("Can't clone packet buffer\n"); - return 10; - } - - uint8 *p = net_buffer_ptr->ether_addr; - printf("Ethernet address : %02x %02x %02x %02x %02x %02x\n", p[0], p[1], p[2], p[3], p[4], p[5]); - printf("read_sem : %d\n", net_buffer_ptr->read_sem); - printf("read_ofs : %d\n", net_buffer_ptr->read_ofs); - printf("read_packet_size : %d\n", net_buffer_ptr->read_packet_size); - printf("read_packet_count : %d\n", net_buffer_ptr->read_packet_count); - printf("write_sem : %d\n", net_buffer_ptr->write_sem); - printf("write_ofs : %d\n", net_buffer_ptr->write_ofs); - printf("write_packet_size : %d\n", net_buffer_ptr->write_packet_size); - printf("write_packet_count: %d\n", net_buffer_ptr->write_packet_count); - - printf("\nRead packets:\n"); - for (int i=0; iread[i]; - printf("cmd : %08lx\n", p->cmd); - printf("length: %d\n", p->length); - } - printf("\nWrite packets:\n"); - for (int i=0; iwrite[i]; - printf("cmd : %08lx\n", p->cmd); - printf("length: %d\n", p->length); - } - return 0; -} diff --git a/SheepShaver/src/BeOS/SaveROM/Makefile b/SheepShaver/src/BeOS/SaveROM/Makefile deleted file mode 100644 index cba232e1a..000000000 --- a/SheepShaver/src/BeOS/SaveROM/Makefile +++ /dev/null @@ -1,110 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= SaveROM - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= SaveROM.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= SaveROM.rsrc - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= be - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
-# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../ ../../include ../NetAddOn - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/SaveROM/README b/SheepShaver/src/BeOS/SaveROM/README deleted file mode 100644 index 37214b340..000000000 --- a/SheepShaver/src/BeOS/SaveROM/README +++ /dev/null @@ -1,8 +0,0 @@ -"SaveROM" is a program that allows you to save the ROM of -a PowerMac running under BeOS to a file. - -1. Copy "sheep_driver" to ~/config/add-ons/kernel/drivers. -2. Double-click the "SaveROM" icon. - -This will create a file called "ROM" which should be 4MB -in size. diff --git a/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp b/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp deleted file mode 100644 index 5796ad5d2..000000000 --- a/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp +++ /dev/null @@ -1,128 +0,0 @@ -/* - * SaveROM - Save Mac ROM to file - * - * Copyright (C) 1998-2004 Christian Bauer - * - * 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 -#include -#include - -#include -#include - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-SaveROM"; -const char ROM_FILE_NAME[] = "ROM"; - -// Global variables -static uint8 buf[0x400000]; - -// Application object -class SaveROM : public BApplication { -public: - SaveROM() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - } - virtual void ReadyToRun(void); -}; - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - SaveROM *the_app = new SaveROM(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Display error alert - */ - -static void ErrorAlert(const char *text) -{ - BAlert *alert = new BAlert("SaveROM Error", text, "Quit", NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display OK alert - */ - -static void InfoAlert(const char *text) -{ - BAlert *alert = new BAlert("SaveROM Message", text, "Quit", NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Main program - */ - -void SaveROM::ReadyToRun(void) -{ - int fd = open("/dev/sheep", 0); - if (fd < 0) { - ErrorAlert("Cannot open '/dev/sheep'."); - goto done; - } - - if (read(fd, buf, 0x400000) != 0x400000) { - ErrorAlert("Cannot read ROM."); - close(fd); - goto done; - } - - FILE *f = fopen(ROM_FILE_NAME, "wb"); - if (f == NULL) { - ErrorAlert("Cannot open ROM file."); - close(fd); - goto done; - } - - if (fwrite(buf, 1, 0x400000, f) != 0x400000) { - ErrorAlert("Cannot write ROM."); - fclose(f); - close(fd); - goto done; - } - - InfoAlert("ROM saved."); - - fclose(f); - close(fd); -done: - PostMessage(B_QUIT_REQUESTED); -} diff --git a/SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc b/SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc deleted file mode 100644 index a61919ba80a170f7ce863bf1ad107b503bfc093d..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4323 zcmeHJzfV(96h6f&rP24E(N+frH8D6QW?ns-6xt+7^FW7WT>UY0}-HVCQy(3rt zn>hVvJNZ83w3D0s5Rv~eBL7oF{%2gJO0i(alx@S-quaErI*MKyc5>5*x50OwMdZJT z$bS`)|E7U|PWonzY{R#%tGi>0;l%5r}tv*2g^iobY&t+cS@Q$4o6e5-HKUno~HUTNK*Di-)c^gjl+ zkMf_H%YE6tEL-~SJyXW`f_E12x1ilD#UTT}sLKuO)+AO1Y`M z86@CTx;2BvkqsELc^4%vVNeW*M!99uSC^+GL@q89kCT8I z#b8wWA|O!VTNdtCqe34Ms|TOy@H}t>kE8IE579&+KRkie$2>#M^^u}CP#Ey0b94FO z;zW=q9LY*6)_5~(XmWBCI{cdRDPZ)XSqM9`-#4?%nOTr}u>bP2 z!|3_Xr}Zy>JZXP}lZ7{<)35&eE|9=ca$>@jrPD)QZDjqh2rcIqF!>jk!NLe_rS(z|5;$w|?bZI$ZLZFFPmG z_?Opj)7(yTJMDpK5BxtpAn(!-i{h)SX=r{E@D*CREsDH{ueYga8LH`Kv)2_Ip9|1* zAu?N{H#BTpWrE4Lp<9534DHHPdfv~VZ4RHPqdmShVbQR1GxcceMx&wmfuTJyGZ$@N zx8Vb+m&g(269g{z@e;u+A*0g&rSbs}#LoL6B~=u~%s|B#aRomPf*>YK#VWp59Hhwa zB4Wb%;L@C+%%PHeo5V8}IlLCH<(n%o;bs1vyY zvc4tkYA+$&!np9y>zxO7wUauD>!39je}|6<=^rQ_%+rp69iDS+`~{anAoY<32vT}W zuDLem)H1kvhy-gXJ4m>+v&=DQg(p4|j~!(|=S&P&l0g4NDD*8YFfqi}Xck_g?wloaMkdy>tbcIubgmNmjvgZtc<(~xJCZOBj z-3(U_Ukq1AgJ+Sfe4L#3Ux|iCgTwvdvuHS4*}ir2+m8!2Wlu9uWT4x*`-rM^WDN`7 zZES|OySKx~>rXm&Hy@QZF*8QankiTh-)D6@-H>sl_phK~Vm -#include -#include -#include - -#include "about_window.h" -#include "video.h" -#include "version.h" -#include "user_strings.h" - - -// About window dimensions -static const BRect about_frame = BRect(0, 0, 383, 99); - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; - -// SheepShaver icon -static const uint8 sheep_icon[] = { - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0xda, 0x15, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x16, 0xff, 0x00, 0x00, 0x00, 0x16, 0xda, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, - 0x00, 0x1d, 0xda, 0x1e, 0x1e, 0x1e, 0xda, 0x16, 0x00, 0x00, 0x16, 0xda, 0x16, 0xda, 0x08, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x00, 0x0b, 0xff, 0xff, 0x11, 0x00, 0xda, - 0x1d, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0x16, 0x00, 0x00, 0x0c, 0xff, 0xff, 0xff, - 0xff, 0x0b, 0x00, 0x00, 0x16, 0x16, 0x00, 0x12, 0xfd, 0x1d, 0x0b, 0x00, 0x00, 0x1d, 0xfd, 0x1d, - 0xfd, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x3f, 0xda, 0x3f, 0xda, 0x15, 0x00, 0xff, 0xff, 0xff, - 0x16, 0x00, 0x17, 0x16, 0x00, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x16, 0x0f, 0x0b, 0x1d, - 0x1e, 0xfd, 0x1e, 0xda, 0x1e, 0xda, 0x3f, 0xda, 0x3f, 0xda, 0x1d, 0x5a, 0x15, 0xff, 0xff, 0xff, - 0x05, 0x17, 0x16, 0x00, 0x12, 0x1d, 0x00, 0x1d, 0xfd, 0x00, 0xfd, 0x00, 0x00, 0x16, 0x0b, 0x00, - 0x00, 0x0e, 0x1d, 0x3f, 0xda, 0x3f, 0xda, 0x1d, 0xda, 0x1b, 0x5a, 0x1b, 0x0f, 0x1d, 0xff, 0xff, - 0xff, 0x05, 0x00, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x00, 0x0f, 0x14, 0x14, - 0x16, 0x00, 0x15, 0xfd, 0x1d, 0xda, 0x1b, 0xda, 0x1b, 0x5a, 0x1b, 0x5a, 0x0f, 0x14, 0xff, 0xff, - 0xff, 0xff, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x12, 0x00, 0x16, 0x00, 0x0f, - 0x00, 0x1b, 0xfd, 0x1e, 0xfd, 0x1b, 0xda, 0x1b, 0x5a, 0x1b, 0x5a, 0x1b, 0x5a, 0x14, 0xff, 0xff, - 0xff, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x12, 0x00, 0x16, 0x1b, 0x16, 0x0e, - 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0x5a, 0x18, 0x00, 0x00, 0x5a, 0x1b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0xfd, 0x14, 0xfd, 0x14, 0xfd, 0x1d, 0xfd, 0x12, 0x00, 0x16, 0xfd, 0x1b, 0xfd, 0x1b, - 0xfd, 0x1b, 0xfd, 0x1e, 0xfd, 0x1b, 0x5a, 0x18, 0x5a, 0x00, 0x00, 0x1b, 0x9b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0x0f, 0xfd, 0x1d, 0xfd, 0x0f, 0xfd, 0x12, 0x00, 0x16, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, - 0x1b, 0xfd, 0x18, 0xfd, 0x1b, 0xf9, 0x18, 0x5a, 0x00, 0x12, 0x00, 0x9b, 0x1b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0xfd, 0x0a, 0x0a, 0x0a, 0xfd, 0x10, 0x00, 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, 0x18, - 0xfd, 0x15, 0xfa, 0x15, 0xf9, 0x18, 0x15, 0x00, 0x12, 0x9b, 0x00, 0x1b, 0x9b, 0x00, 0x15, 0x15, - 0xff, 0xff, 0x00, 0xfd, 0x1d, 0xfd, 0x1d, 0x00, 0x16, 0x00, 0x1b, 0xfd, 0x1b, 0xfd, 0x15, 0xfd, - 0x15, 0xfa, 0x15, 0xf9, 0x15, 0x16, 0x00, 0x0f, 0x9b, 0x12, 0x00, 0x9b, 0x1b, 0x00, 0x15, 0x15, - 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0xfa, 0x1d, 0x00, 0xfa, 0x1e, 0x00, 0x1e, 0xfa, 0x15, - 0xfa, 0x15, 0x16, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x9b, 0x00, 0x00, 0x00, 0x12, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x1d, 0xf9, 0x00, 0x3f, 0xfa, 0x00, 0xfa, 0x1b, 0x00, - 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x12, 0x15, 0x15, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0xf9, 0x1d, 0x00, 0xf9, 0x1b, 0x00, 0x1b, 0xf9, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x1d, 0xf9, 0x00, 0x3f, 0xf9, 0x00, 0xf9, 0x1b, 0x00, - 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x16, 0x1d, 0x00, 0xf9, 0x1b, 0x00, 0x1b, 0xf9, 0x00, - 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x00, 0x16, 0xf9, 0x00, 0x1b, 0x16, 0x00, - 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x00, 0x00, 0x00, 0x00, 0x12, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x16, 0x00, 0x16, 0x00, 0x16, - 0x15, 0x15, 0x15, 0x15, 0x00, 0x00, 0x15, 0x00, 0x0a, 0x19, 0x0a, 0x00, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x12, 0x00, 0x00, 0x00, 0x16, 0xff, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x0a, 0x00, 0x15, 0x00, 0x19, 0x1c, 0x18, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00, - 0x0f, 0xff, 0xff, 0xff, 0x00, 0x18, 0x11, 0x00, 0x15, 0x00, 0x1c, 0x18, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0x00, 0x00, 0x0b, 0x0b, - 0x00, 0x00, 0x0f, 0xff, 0x12, 0x00, 0x18, 0x19, 0x00, 0x15, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0x00, 0x14, 0x1e, 0xfd, 0x01, 0xfd, 0x14, - 0xfa, 0xf9, 0x00, 0xff, 0xff, 0x00, 0x0a, 0x19, 0x1c, 0x00, 0x18, 0x1c, 0x00, 0x00, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0xfd, 0x1e, 0xf9, 0x1e, 0xfa, 0x1e, 0xf9, - 0x14, 0xfa, 0x00, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x0a, 0x1c, 0x00, 0x18, 0x00, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0x1e, 0xf9, 0x14, 0xfa, 0x1e, 0xf9, 0x1e, - 0xfd, 0x1e, 0x00, 0x15, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x00, 0x00, 0x18, 0x00, 0x1c, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0xfd, 0x1e, 0xfd, 0x14, 0xfd, 0x1e, 0xfd, - 0x1e, 0x01, 0x00, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x1c, 0x00, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0xfa, 0x01, 0xf9, 0x1e, 0xf9, 0x14, - 0x14, 0x00, 0x0f, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x0f, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, - 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff -}; - - -// View class -class AboutViewT : public BView { -public: - AboutViewT(BRect r) : BView(r, "", B_FOLLOW_NONE, B_WILL_DRAW) {} - - virtual void Draw(BRect update) - { - char str[256]; - sprintf(str, GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - - SetFont(be_bold_font); - SetDrawingMode(B_OP_OVER); - MovePenTo(20, 20); - DrawString(str); - SetFont(be_plain_font); - MovePenTo(20, 40); - DrawString(GetString(STR_ABOUT_TEXT2)); - MovePenTo(20, 60); - DrawString(B_UTF8_COPYRIGHT "1997-2008 Christian Bauer and Marc Hellwig"); - } - - virtual void MouseDown(BPoint point) - { - Window()->PostMessage(B_QUIT_REQUESTED); - } -}; - - -// 3D view class -class AboutView3D : public BGLView { -public: - AboutView3D(BRect r) : BGLView(r, "", B_FOLLOW_NONE, 0, BGL_RGB | BGL_DOUBLE) - { - rot_x = rot_y = 0; - - if (!VideoSnapshot(64, 64, texture)) { - uint8 *p = texture; - const uint8 *q = sheep_icon; - const color_map *cm = system_colors(); - for (int i=0; i<32*32; i++) { - uint8 red = cm->color_list[*q].red; - uint8 green = cm->color_list[*q].green; - uint8 blue = cm->color_list[*q++].blue; - p[0] = p[3] = p[64*3] = p[65*3] = red; - p[1] = p[4] = p[64*3+1] = p[65*3+1] = green; - p[2] = p[5] = p[64*3+2] = p[65*3+2] = blue; - p += 6; - if ((i & 31) == 31) - p += 64*3; - } - } - } - - virtual void AttachedToWindow(void) - { - BGLView::AttachedToWindow(); - LockGL(); - - glDisable(GL_DEPTH_TEST); - glDepthMask(GL_FALSE); - - glShadeModel(GL_SMOOTH); - - glMatrixMode(GL_PROJECTION); - glLoadIdentity(); - gluPerspective(30, 1, 0.5, 20); - - glMatrixMode(GL_MODELVIEW); - glLoadIdentity(); - - GLfloat light_color[4] = {1, 1, 1, 1}; - GLfloat light_dir[4] = {1, 2, 1.5, 1}; - glLightfv(GL_LIGHT0, GL_DIFFUSE, light_color); - glLightfv(GL_LIGHT0, GL_POSITION, light_dir); - glEnable(GL_LIGHT0); - glEnable(GL_LIGHTING); - - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT); - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); - glTexImage2D(GL_TEXTURE_2D, 0, 4, 64, 64, 0, GL_RGB, GL_UNSIGNED_BYTE, texture); - glEnable(GL_TEXTURE_2D); - - UnlockGL(); - - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "OpenGL Animation", B_NORMAL_PRIORITY, this); - resume_thread(tick_thread); - } - - virtual void DetachedFromWindow(void) - { - status_t l; - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - - BGLView::DetachedFromWindow(); - } - - virtual void Draw(BRect update) - { - LockGL(); - glClear(GL_COLOR_BUFFER_BIT); - glBegin(GL_QUADS); - glNormal3d(0, 0, 1); - glTexCoord2f(0, 0); - glVertex3d(-1, 1, 0); - glTexCoord2f(1, 0); - glVertex3d(1, 1, 0); - glTexCoord2f(1, 1); - glVertex3d(1, -1, 0); - glTexCoord2f(0, 1); - glVertex3d(-1, -1, 0); - glEnd(); - SwapBuffers(); - UnlockGL(); - } - - static status_t tick_func(void *arg) - { - AboutView3D *obj = (AboutView3D *)arg; - while (obj->tick_thread_active) { - obj->rot_x += 2; - obj->rot_y += 2; - obj->LockGL(); - glMatrixMode(GL_MODELVIEW); - glLoadIdentity(); - glTranslatef(0, 0, -5); - glRotatef(obj->rot_x, 1, 0, 0); - glRotatef(obj->rot_y, 0, 1, 0); - obj->UnlockGL(); - if (obj->LockLooperWithTimeout(20000) == B_OK) { - obj->Draw(obj->Bounds()); - obj->UnlockLooper(); - } - snooze(16667); - } - return 0; - } - -private: - thread_id tick_thread; - bool tick_thread_active; - - float rot_x, rot_y; - uint8 texture[64*64*3]; -}; - - -// Window class -class AboutWindowT : public BWindow { -public: - AboutWindowT() : BWindow(about_frame, NULL, B_MODAL_WINDOW_LOOK, B_FLOATING_APP_WINDOW_FEEL, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_WILL_ACCEPT_FIRST_CLICK) - { - Lock(); - MoveTo(100, 100); - BRect r = Bounds(); - r.right = 100; - AboutView3D *view_3d = new AboutView3D(r); - AddChild(view_3d); - r = Bounds(); - r.left = 100; - AboutViewT *view = new AboutViewT(r); - AddChild(view); - view->SetHighColor(0, 0, 0); - view->SetViewColor(fill_color); - view->MakeFocus(); - Unlock(); - Show(); - } -}; - - -/* - * Open "About" window - */ - -void OpenAboutWindow(void) -{ - new AboutWindowT; -} diff --git a/SheepShaver/src/BeOS/audio_beos.cpp b/SheepShaver/src/BeOS/audio_beos.cpp deleted file mode 120000 index ce433abbb..000000000 --- a/SheepShaver/src/BeOS/audio_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/audio_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/clip_beos.cpp b/SheepShaver/src/BeOS/clip_beos.cpp deleted file mode 100644 index 953ed8040..000000000 --- a/SheepShaver/src/BeOS/clip_beos.cpp +++ /dev/null @@ -1,374 +0,0 @@ -/* - * clip_beos.cpp - Clipboard handling, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - -#include "clip.h" -#include "main.h" -#include "cpu_emulation.h" -#include "emul_op.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static bool we_put_this_data = false; // Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Be side -static BTranslatorRoster *roster; -static float input_cap = 0; -static translator_info input_info; -static float output_cap = 0; -static translator_id output_trans = 0; - - -/* - * Clipboard manager thread (for calling clipboard functions; this is not safe - * under R4 when running on the MacOS stack in kernel space) - */ - -// Message constants -const uint32 MSG_QUIT_CLIP_MANAGER = 'quit'; -const uint32 MSG_PUT_TEXT = 'ptxt'; - -static thread_id cm_thread = -1; -static sem_id cm_done_sem = -1; - -// Argument passing -static void *cm_scrap; -static int32 cm_length; - -static status_t clip_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Clipboard manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_CLIP_MANAGER: - return 0; - - case MSG_PUT_TEXT: - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - - // Convert text from Mac charset to UTF-8 - int32 dest_length = cm_length * 3; - int32 state = 0; - char *inbuf = new char[cm_length]; - memcpy(inbuf, cm_scrap, cm_length); // Copy to user space - char *outbuf = new char[dest_length]; - if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, inbuf, &cm_length, outbuf, &dest_length, &state) == B_OK) { - for (int i=0; iAddData("text/plain", B_MIME_TYPE, outbuf, dest_length); - be_clipboard->Commit(); - } else { - D(bug(" text conversion failed\n")); - } - delete[] outbuf; - delete[] inbuf; - be_clipboard->Unlock(); - } - break; - } - - // Acknowledge - release_sem(cm_done_sem); - } -} - - -/* - * Initialize clipboard - */ - -void ClipInit(void) -{ - // check if there is a translator that can handle the pict datatype - roster = BTranslatorRoster::Default(); - int32 num_translators, i,j; - translator_id *translators; - const char *translator_name, *trans_info; - int32 translator_version; - const translation_format *t_formats; - long t_num; - - roster->GetAllTranslators(&translators, &num_translators); - for (i=0;iGetTranslatorInfo(translators[i], &translator_name, - &trans_info, &translator_version); - D(bug("found translator %s: %s (%.2f)\n", translator_name, trans_info, - translator_version/100.)); - // does this translator support the pict datatype ? - roster->GetInputFormats(translators[i], &t_formats,&t_num); - //printf(" supports %d input formats \n",t_num); - for (j=0;jinput_cap) { - input_info.type = t_formats[j].type; - input_info.group = t_formats[j].group; - input_info.quality = t_formats[j].quality; - input_info.capability = t_formats[j].capability; - strcpy(input_info.MIME,t_formats[j].MIME); - strcpy(input_info.name,t_formats[j].name); - input_info.translator=translators[i]; - input_cap = t_formats[j].capability; - } - D(bug("matching input translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n", - t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type, - t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group, - t_formats[j].quality, - t_formats[j].capability,t_formats[j].MIME, - t_formats[j].name)); - } - - } - roster->GetOutputFormats(translators[i], &t_formats,&t_num); - //printf("and %d output formats \n",t_num); - for (j=0;joutput_cap) { - output_trans = translators[i]; - output_cap = t_formats[j].capability; - } - D(bug("matching output translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n", - t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type, - t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group, - t_formats[j].quality, - t_formats[j].capability,t_formats[j].MIME, - t_formats[j].name)); - } - } - } - delete [] translators; // clean up our droppings - - // Start clipboard manager thread - cm_done_sem = create_sem(0, "Clipboard Manager Done"); - cm_thread = spawn_thread(clip_manager, "Clipboard Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(cm_thread); -} - - -/* - * Deinitialize clipboard - */ - -void ClipExit(void) -{ - // Stop clipboard manager - if (cm_thread > 0) { - status_t l; - send_data(cm_thread, MSG_QUIT_CLIP_MANAGER, NULL, 0); - while (wait_for_thread(cm_thread, &l) == B_INTERRUPTED) ; - } - - // Delete semaphores - delete_sem(cm_done_sem); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %p, length %ld\n", type, scrap, length)); - if (we_put_this_data) { - we_put_this_data = false; - return; - } - if (length <= 0) - return; - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - cm_scrap = scrap; - cm_length = length; - while (send_data(cm_thread, MSG_PUT_TEXT, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(cm_done_sem) == B_INTERRUPTED) ; - break; - - case 'PICT': - D(bug(" clipping PICT\n")); - //!! this has to be converted to use the Clipboard Manager -#if 0 - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - // Waaaah! This crashes! - if (input_cap > 0) { // if there is an converter for PICT datatype convert data to bitmap. - BMemoryIO *in_buffer = new BMemoryIO(scrap, length); - BMallocIO *out_buffer = new BMallocIO(); - status_t result=roster->Translate(in_buffer,&input_info,NULL,out_buffer,B_TRANSLATOR_BITMAP); - clipper->AddData("image/x-be-bitmap", B_MIME_TYPE, out_buffer->Buffer(), out_buffer->BufferLength()); - D(bug("conversion result:%08x buffer_size:%d\n",result,out_buffer->BufferLength())); - delete in_buffer; - delete out_buffer; - } - clipper->AddData("image/pict", B_MIME_TYPE, scrap, length); - be_clipboard->Commit(); - be_clipboard->Unlock(); - } -#endif - break; - } -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - M68kRegisters r; - D(bug("GetScrap handle %p, type %08lx, offset %ld\n", handle, type, offset)); - return; //!! GetScrap is currently broken (should use Clipboard Manager) - //!! replace with clipboard notification in BeOS R4.1 - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - if (be_clipboard->Lock()) { - BMessage *clipper = be_clipboard->Data(); - char *clip; - ssize_t length; - - // Check if we already copied this data - if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE)) - return; - bigtime_t cookie = system_time(); - clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); - - // No, is there text in it? - if (clipper->FindData("text/plain", B_MIME_TYPE, &clip, &length) == B_OK) { - D(bug(" text/plain found\n")); - - // Convert text from UTF-8 to Mac charset - int32 src_length = length; - int32 dest_length = length; - int32 state = 0; - char *outbuf = new char[dest_length]; - if (convert_from_utf8(B_MAC_ROMAN_CONVERSION, clip, &src_length, outbuf, &dest_length, &state) == B_OK) { - for (int i=0; iCommit(); - be_clipboard->Unlock(); - } - break; - - case 'PICT': - D(bug(" clipping PICT\n")); - if (be_clipboard->Lock()) { - BMessage *clipper = be_clipboard->Data(); - char *clip; - ssize_t length; - - // Check if we already copied this data - if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE)) - return; - bigtime_t cookie = system_time(); - clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); - - static uint16 proc2[] = { - 0x598f, // subq.l #4,sp - 0xa9fc, // ZeroScrap() - 0x2f3c, 0, 0, // move.l #length,-(sp) - 0x2f3c, 'PI', 'CT', // move.l #'PICT',-(sp) - 0x2f3c, 0, 0, // move.l #buf,-(sp) - 0xa9fe, // PutScrap() - 0x588f, // addq.l #4,sp - M68K_RTS - }; - - // No, is there a pict ? - if (clipper->FindData("image/pict", B_MIME_TYPE, &clip, &length) == B_OK ) { - D(bug(" image/pict found\n")); - - // Add pict to Mac clipboard - *(int32 *)(proc2 + 3) = length; - *(char **)(proc2 + 9) = clip; - we_put_this_data = true; - Execute68k((uint32)proc2, &r); -#if 0 - // No, is there a bitmap ? - } else if (clipper->FindData("image/x-be-bitmap", B_MIME_TYPE, &clip, &length) == B_OK || output_cap > 0) { - D(bug(" image/x-be-bitmap found\nstarting conversion to PICT\n")); - - BMemoryIO *in_buffer = new BMemoryIO(clip, length); - BMallocIO *out_buffer = new BMallocIO(); - status_t result=roster->Translate(output_trans,in_buffer,NULL,out_buffer,'PICT'); - D(bug("result of conversion:%08x buffer_size:%d\n",result,out_buffer->BufferLength())); - - // Add pict to Mac clipboard - *(int32 *)(proc2 + 3) = out_buffer->BufferLength(); - *(char **)(proc2 + 9) = (char *)out_buffer->Buffer(); - we_put_this_data = true; - Execute68k(proc2, &r); - - delete in_buffer; - delete out_buffer; -#endif - } - be_clipboard->Commit(); - be_clipboard->Unlock(); - } - break; - } -} diff --git a/SheepShaver/src/BeOS/ether_beos.cpp b/SheepShaver/src/BeOS/ether_beos.cpp deleted file mode 100644 index 740f9638d..000000000 --- a/SheepShaver/src/BeOS/ether_beos.cpp +++ /dev/null @@ -1,400 +0,0 @@ -/* - * ether_beos.cpp - SheepShaver Ethernet Device Driver (DLPI), BeOS specific stuff - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" -#include "ether.h" -#include "ether_defs.h" -#include "prefs.h" -#include "xlowmem.h" -#include "main.h" -#include "user_strings.h" -#include "sheep_net.h" - -#define DEBUG 0 -#include "debug.h" - -#define STATISTICS 0 -#define MONITOR 0 - - -// Global variables -static thread_id read_thread; // Packet receiver thread -static bool ether_thread_active = true; // Flag for quitting the receiver thread - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer -static sem_id read_sem, write_sem; // Semaphores to trigger packet reading/writing -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer - -static bool net_open = false; // Flag: initialization succeeded, network device open - - -// Prototypes -static status_t AO_receive_thread(void *data); - - -/* - * Initialize ethernet - */ - -void EtherInit(void) -{ - // Do nothing if the user disabled the network - if (PrefsFindBool("nonet")) - return; - - // find net-server team -i_wanna_try_that_again: - bool found_add_on = false; - team_info t_info; - int32 t_cookie = 0; - image_info i_info; - int32 i_cookie = 0; - while (get_next_team_info(&t_cookie, &t_info) == B_NO_ERROR) { - if (strstr(t_info.args,"net_server")!=NULL) { - // check if sheep_net add-on is loaded - while (get_next_image_info(t_info.team,&i_cookie,&i_info) == B_NO_ERROR) { - if (strstr(i_info.name,"sheep_net")!=NULL) { - found_add_on = true; - break; - } - } - } - if (found_add_on) break; - } - if (!found_add_on) { - - // Search for sheep_net in network config file - char str[1024]; - bool sheep_net_found = false; - FILE *fin = fopen("/boot/home/config/settings/network", "r"); - while (!feof(fin)) { - fgets(str, 1024, fin); - if (strstr(str, "PROTOCOLS")) - if (strstr(str, "sheep_net")) - sheep_net_found = true; - } - fclose(fin); - - // It was found, so something else must be wrong - if (sheep_net_found) { - WarningAlert(GetString(STR_NO_NET_ADDON_WARN)); - return; - } - - // Not found, inform the user - if (!ChoiceAlert(GetString(STR_NET_CONFIG_MODIFY_WARN), GetString(STR_OK_BUTTON), GetString(STR_CANCEL_BUTTON))) - return; - - // Change the network config file and restart the network - fin = fopen("/boot/home/config/settings/network", "r"); - FILE *fout = fopen("/boot/home/config/settings/network.2", "w"); - bool global_found = false; - bool modified = false; - while (!feof(fin)) { - str[0] = 0; - fgets(str, 1024, fin); - if (!global_found && strstr(str, "GLOBAL:")) { - global_found = true; - } else if (global_found && !modified && strstr(str, "PROTOCOLS")) { - str[strlen(str)-1] = 0; - strcat(str, " sheep_net\n"); - modified = true; - } else if (global_found && !modified && strlen(str) > 2 && str[strlen(str) - 2] == ':') { - fputs("\tPROTOCOLS = sheep_net\n", fout); - modified = true; - } - fputs(str, fout); - } - if (!modified) - fputs("\tPROTOCOLS = sheep_net\n", fout); - fclose(fout); - fclose(fin); - remove("/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network", "/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network.2", "/boot/home/config/settings/network"); - - app_info ai; - if (be_roster->GetAppInfo("application/x-vnd.Be-NETS", &ai) == B_OK) { - BMessenger msg(NULL, ai.team); - if (msg.IsValid()) { - while (be_roster->IsRunning("application/x-vnd.Be-NETS")) { - msg.SendMessage(B_QUIT_REQUESTED); - snooze(500000); - } - } - } - BPath path; - find_directory(B_BEOS_BOOT_DIRECTORY, &path); - path.Append("Netscript"); - char *argv[3] = {"/bin/sh", (char *)path.Path(), NULL}; - thread_id net_server = load_image(2, argv, environ); - resume_thread(net_server); - status_t l; - wait_for_thread(net_server, &l); - goto i_wanna_try_that_again; - } - - // Set up communications with add-on - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - WarningAlert(GetString(STR_NET_ADDON_INIT_FAILED)); - return; - } - if ((buffer_area = clone_area("local packet buffer", &net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - D(bug("EtherInit: couldn't clone packet area\n")); - WarningAlert(GetString(STR_NET_ADDON_CLONE_FAILED)); - return; - } - if ((read_sem = create_sem(0, "ether read")) < B_NO_ERROR) { - printf("FATAL: can't create Ethernet semaphore\n"); - return; - } - net_buffer_ptr->read_sem = read_sem; - write_sem = net_buffer_ptr->write_sem; - read_thread = spawn_thread(AO_receive_thread, "ether read", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - for (int i=0; iwrite[i].cmd = IN_USE | (ACTIVATE_SHEEP_NET << 8); - rd_pos = wr_pos = 0; - release_sem(write_sem); - - // Everything OK - net_open = true; -} - - -/* - * Exit ethernet - */ - -void EtherExit(void) -{ - if (net_open) { - - // Close communications with add-on - for (int i=0; iwrite[i].cmd = IN_USE | (DEACTIVATE_SHEEP_NET << 8); - release_sem(write_sem); - - // Quit receiver thread - ether_thread_active = false; - status_t result; - release_sem(read_sem); - while (wait_for_thread(read_thread, &result) == B_INTERRUPTED) ; - - delete_sem(read_sem); - delete_area(buffer_area); - } - -#if STATISTICS - // Show statistics - printf("%ld messages put on write queue\n", num_wput); - printf("%ld error acks\n", num_error_acks); - printf("%ld packets transmitted (%ld raw, %ld normal)\n", num_tx_packets, num_tx_raw_packets, num_tx_normal_packets); - printf("%ld tx packets dropped because buffer full\n", num_tx_buffer_full); - printf("%ld packets received\n", num_rx_packets); - printf("%ld packets passed upstream (%ld Fast Path, %ld normal)\n", num_rx_fastpath + num_unitdata_ind, num_rx_fastpath, num_unitdata_ind); - printf("EtherIRQ called %ld times\n", num_ether_irq); - printf("%ld rx packets dropped due to low memory\n", num_rx_no_mem); - printf("%ld rx packets dropped because no stream found\n", num_rx_dropped); - printf("%ld rx packets dropped because stream not ready\n", num_rx_stream_not_ready); - printf("%ld rx packets dropped because no memory for unitdata_ind\n", num_rx_no_unitdata_mem); -#endif -} - - -/* - * Ask add-on for ethernet hardware address - */ - -void AO_get_ethernet_address(uint32 arg) -{ - uint8 *addr = Mac2HostAddr(arg); - if (net_open) { - OTCopy48BitAddress(net_buffer_ptr->ether_addr, addr); - } else { - addr[0] = 0x12; - addr[1] = 0x34; - addr[2] = 0x56; - addr[3] = 0x78; - addr[4] = 0x9a; - addr[5] = 0xbc; - } - D(bug("AO_get_ethernet_address: got address %02x%02x%02x%02x%02x%02x\n", addr[0], addr[1], addr[2], addr[3], addr[4], addr[5])); -} - - -/* - * Tell add-on to enable multicast address - */ - -void AO_enable_multicast(uint32 addr) -{ - D(bug("AO_enable_multicast\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't enable multicast address\n")); - } else { - Mac2host_memcpy(p->data, addr, 6); - p->length = 6; - p->cmd = IN_USE | (ADD_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - } -} - - -/* - * Tell add-on to disable multicast address - */ - -void AO_disable_multicast(uint32 addr) -{ - D(bug("AO_disable_multicast\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't enable multicast address\n")); - } else { - Mac2host_memcpy(p->data, addr, 6); - p->length = 6; - p->cmd = IN_USE | (REMOVE_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - D(bug("WARNING: couldn't disable multicast address\n")); - } -} - - -/* - * Tell add-on to transmit one packet - */ - -void AO_transmit_packet(uint32 mp_arg) -{ - D(bug("AO_transmit_packet\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't transmit packet (buffer full)\n")); - num_tx_buffer_full++; - } else { - D(bug(" write packet pos %d\n", i)); - num_tx_packets++; - - // Copy packet to buffer - uint8 *start; - uint8 *bp = start = p->data; - mblk_t *mp = Mac2HostAddr(mp_arg); - while (mp) { - uint32 size = mp->b_wptr - mp->b_rptr; - memcpy(bp, mp->b_rptr, size); - bp += size; - mp = mp->b_cont; - } - -#if MONITOR - bug("Sending Ethernet packet:\n"); - for (int i=0; i<(uint32)(bp - start); i++) { - bug("%02lx ", start[i]); - } - bug("\n"); -#endif - - // Notify add-on - p->length = (uint32)(bp - start); - p->cmd = IN_USE | (SHEEP_PACKET << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - } -} - - -/* - * Packet reception thread - */ - -static status_t AO_receive_thread(void *data) -{ - while (ether_thread_active) { - if (net_buffer_ptr->read[rd_pos].cmd & IN_USE) { - if (ether_driver_opened) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } - acquire_sem_etc(read_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Ethernet interrupt - */ - -void EtherIRQ(void) -{ - D(bug("EtherIRQ\n")); - num_ether_irq++; - OTEnterInterrupt(); - - // Send received packets to OpenTransport - net_packet *p = &net_buffer_ptr->read[rd_pos]; - while (p->cmd & IN_USE) { - if ((p->cmd >> 8) == SHEEP_PACKET) { - num_rx_packets++; - D(bug(" read packet pos %d\n", i)); - uint32 size = p->length; - -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; idata[i]); - } - bug("\n"); -#endif - - // Wrap packet in message block - //!! maybe use esballoc() - mblk_t *mp; - if ((mp = allocb(size, 0)) != NULL) { - D(bug(" packet data at %p\n", (void *)mp->b_rptr)); - memcpy(mp->b_rptr, p->data, size); - mp->b_wptr += size; - ether_packet_received(mp); - } else { - D(bug("WARNING: Cannot allocate mblk for received packet\n")); - num_rx_no_mem++; - } - } - p->cmd = 0; // Free packet - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - p = &net_buffer_ptr->read[rd_pos]; - } - OTLeaveInterrupt(); -} diff --git a/SheepShaver/src/BeOS/extfs_beos.cpp b/SheepShaver/src/BeOS/extfs_beos.cpp deleted file mode 120000 index e7cec3dcd..000000000 --- a/SheepShaver/src/BeOS/extfs_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/extfs_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/main_beos.cpp b/SheepShaver/src/BeOS/main_beos.cpp deleted file mode 100644 index 551cd5180..000000000 --- a/SheepShaver/src/BeOS/main_beos.cpp +++ /dev/null @@ -1,2015 +0,0 @@ -/* - * main_beos.cpp - Emulation core, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - * SheepShaver uses three run-time environments, reflected by the value of XLM_RUN_MODE. - * The two modes which are also present in the original MacOS, are: - * MODE_68K - 68k emulator is active - * MODE_NATIVE - 68k emulator is inactive - * In the original MacOS, these two modes have different memory mappings and exception - * tables. Under SheepShaver, the only difference is the handling of interrupts (see below). - * SheepShaver extends the 68k emulator with special opcodes (EMUL_OP) to perform faster - * mode switches when patching 68k routines with PowerPC code and adds a third run mode: - * MODE_EMUL_OP - 68k emulator active, but native register usage - * - * Switches between MODE_68K and MODE_NATIVE are only done with the Mixed Mode Manager - * (via nanokernel patches). The switch from MODE_68K to MODE_EMUL_OP occurs when executin - * one of the EMUL_OP 68k opcodes. When the opcode routine is done, it returns to MODE_68K. - * - * The Execute68k() routine allows EMUL_OP routines to execute 68k subroutines. It switches - * from MODE_EMUL_OP back to MODE_68K, so it must not be used by native routines (executing - * in MODE_NATIVE) nor by any other thread than the emul_thread (because the 68k emulator - * is not reentrant). When the 68k subroutine returns, it switches back to MODE_EMUL_OP. - * It is OK for a 68k routine called with Execute68k() to contain an EMUL_OP opcode. - * - * The handling of interrupts depends on the current run mode: - * MODE_68K - The USR1 signal handler sets one bit in the processor's CR. The 68k emulator - * will then execute the 68k interrupt routine when fetching the next instruction. - * MODE_NATIVE - The USR1 signal handler switches back to the original stack (signals run - * on a separate signal stack) and enters the External Interrupt routine in the - * nanokernel. - * MODE_EMUL_OP - The USR1 signal handler directly executes the 68k interrupt routine - * with Execute68k(). Before doing this, it must first check the current 68k interrupt - * level which is stored in XLM_68K_R25. This variable is set to the current level - * when entering EMUL_OP mode. Execute68k() also uses it to restore the level so that - * Execute68k()'d routines will run at the same interrupt level as the EMUL_OP routine - * it was called from. - */ - -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "video.h" -#include "sys.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "user_strings.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - -// Enable Execute68k() safety checks? -#define SAFE_EXEC_68K 0 - -// Save FP regs in Execute68k()? -#define SAVE_FP_EXEC_68K 0 - -// Interrupts in EMUL_OP mode? -#define INTERRUPTS_IN_EMUL_OP_MODE 1 - -// Interrupts in native mode? -#define INTERRUPTS_IN_NATIVE_MODE 1 - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-SheepShaver"; -const char ROM_FILE_NAME[] = "ROM"; -const char ROM_FILE_NAME2[] = "Mac OS ROM"; -const char KERNEL_AREA_NAME[] = "Macintosh Kernel Data"; -const char KERNEL_AREA2_NAME[] = "Macintosh Kernel Data 2"; -const char RAM_AREA_NAME[] = "Macintosh RAM"; -const char ROM_AREA_NAME[] = "Macintosh ROM"; -const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; -const char DR_EMULATOR_AREA_NAME[] = "Macintosh DR Emulator"; -const char SHEEP_AREA_NAME[] = "SheepShaver Virtual Stack"; - -const uintptr ROM_BASE = 0x40800000; // Base address of ROM - -const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack - -const uint32 MSG_START = 'strt'; // Emulator start message - - -// Application object -class SheepShaver : public BApplication { -public: - SheepShaver() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - - // Initialize other variables - sheep_fd = -1; - emulator_data = NULL; - kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = dr_emulator_area = -1; - emul_thread = nvram_thread = tick_thread = -1; - ReadyForSignals = false; - AllowQuitting = true; - NVRAMThreadActive = true; - TickThreadActive = true; - memset(last_xpram, 0, XPRAM_SIZE); - } - virtual void ReadyToRun(void); - virtual void MessageReceived(BMessage *msg); - void StartEmulator(void); - virtual bool QuitRequested(void); - virtual void Quit(void); - - thread_id emul_thread; // Emulator thread - thread_id nvram_thread; // NVRAM watchdog thread - thread_id tick_thread; // 60Hz thread - - KernelData *kernel_data; // Pointer to Kernel Data - EmulatorData *emulator_data; - - bool ReadyForSignals; // Flag: emul_thread ready to receive signals - bool AllowQuitting; // Flag: Alt-Q quitting allowed - bool NVRAMThreadActive; // nvram_thread will exit when this is false - bool TickThreadActive; // tick_thread will exit when this is false - - uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes - -private: - static status_t emul_func(void *arg); - static status_t nvram_func(void *arg); - static status_t tick_func(void *arg); - static void sigusr1_invoc(int sig, void *arg, vregs *r); - void sigusr1_handler(vregs *r); - static void sigsegv_invoc(int sig, void *arg, vregs *r); - static void sigill_invoc(int sig, void *arg, vregs *r); - void jump_to_rom(uint32 entry); - - void init_rom(void); - void load_rom(void); - - int sheep_fd; // FD of sheep driver - - area_id kernel_area; // Kernel Data area ID - area_id kernel_area2; // Alternate Kernel Data area ID - area_id rom_area; // ROM area ID - area_id ram_area; // RAM area ID - area_id dr_cache_area; // DR Cache area ID - area_id dr_emulator_area; // DR Emulator area ID - - struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) - struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) - struct sigaction sigill_action; // Illegal instruction exception signal (of emulator thread) - - // Exceptions - class area_error {}; - class file_open_error {}; - class file_read_error {}; - class rom_size_error {}; -}; - - -// Global variables -SheepShaver *the_app; // Pointer to application object -#if !EMULATED_PPC -void *TOC; // TOC pointer -#endif -uint32 RAMBase; // Base address of Mac RAM -uint32 RAMSize; // Size of Mac RAM -uint32 ROMBase; // Base address of Mac ROM -uint32 KernelDataAddr; // Address of Kernel Data -uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM -uint32 DRCacheAddr; // Address of DR Cache -uint32 DREmulatorAddr; // Address of DR Emulator -uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -system_info SysInfo; // System information -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) - -static void *sig_stack = NULL; // Stack for signal handlers -static void *extra_stack = NULL; // Stack for SIGSEGV inside interrupt handler -uint32 SheepMem::page_size; // Size of a native page -uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros -uintptr SheepMem::base; // Address of SheepShaver data -uintptr SheepMem::proc; // Bottom address of SheepShave procedures -uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) -static area_id SheepMemArea; // SheepShaver data area ID - - -// Prototypes -static void sigsegv_handler(vregs *r); -static void sigill_handler(vregs *r); - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - tzset(); - the_app = new SheepShaver(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Run application - */ - -#if !EMULATED_PPC -static asm void *get_toc(void) -{ - mr r3,r2 - blr -} -#endif - -void SheepShaver::ReadyToRun(void) -{ - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - -#if !EMULATED_PPC - // Get TOC pointer - TOC = get_toc(); -#endif - - // Get system info - get_system_info(&SysInfo); - switch (SysInfo.cpu_type) { - case B_CPU_PPC_601: - PVR = 0x00010000; - break; - case B_CPU_PPC_603: - PVR = 0x00030000; - break; - case B_CPU_PPC_603e: - PVR = 0x00060000; - break; - case B_CPU_PPC_604: - PVR = 0x00040000; - break; - case B_CPU_PPC_604e: - PVR = 0x00090000; - break; - case B_CPU_PPC_750: - PVR = 0x00080000; - break; - default: - PVR = 0x00040000; - break; - } - CPUClockSpeed = SysInfo.cpu_clock_speed; - BusClockSpeed = SysInfo.bus_clock_speed; - TimebaseSpeed = BusClockSpeed / 4; - - // Delete old areas - area_id old_kernel_area = find_area(KERNEL_AREA_NAME); - if (old_kernel_area > 0) - delete_area(old_kernel_area); - area_id old_kernel2_area = find_area(KERNEL_AREA2_NAME); - if (old_kernel2_area > 0) - delete_area(old_kernel2_area); - area_id old_ram_area = find_area(RAM_AREA_NAME); - if (old_ram_area > 0) - delete_area(old_ram_area); - area_id old_rom_area = find_area(ROM_AREA_NAME); - if (old_rom_area > 0) - delete_area(old_rom_area); - area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); - if (old_dr_cache_area > 0) - delete_area(old_dr_cache_area); - area_id old_dr_emulator_area = find_area(DR_EMULATOR_AREA_NAME); - if (old_dr_emulator_area > 0) - delete_area(old_dr_emulator_area); - - // Read preferences - int argc = 0; - char **argv = NULL; - PrefsInit(NULL, argc, argv); - - // Init system routines - SysInit(); - - // Test amount of RAM available for areas - if (SysInfo.max_pages * B_PAGE_SIZE < 16 * 1024 * 1024) { - ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Show preferences editor (or start emulator directly) - if (!PrefsFindBool("nogui")) - PrefsEditor(MSG_START); - else - PostMessage(MSG_START); -} - - -/* - * Message received - */ - -void SheepShaver::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_START: - StartEmulator(); - break; - default: - BApplication::MessageReceived(msg); - } -} - - -/* - * Start emulator - */ - -void SheepShaver::StartEmulator(void) -{ - char str[256]; - - // Open sheep driver and remap low memory - sheep_fd = open("/dev/sheep", 0); - if (sheep_fd < 0) { - sprintf(str, GetString(STR_NO_SHEEP_DRIVER_ERR), strerror(sheep_fd), sheep_fd); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - status_t res = ioctl(sheep_fd, SHEEP_UP); - if (res < 0) { - sprintf(str, GetString(STR_SHEEP_UP_ERR), strerror(res), res); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create areas for Kernel Data - kernel_data = (KernelData *)KERNEL_DATA_BASE; - kernel_area = create_area(KERNEL_AREA_NAME, &kernel_data, B_EXACT_ADDRESS, KERNEL_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (kernel_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area), kernel_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - emulator_data = &kernel_data->ed; - KernelDataAddr = (uint32)kernel_data; - D(bug("Kernel Data area %ld at %p, Emulator Data at %p\n", kernel_area, kernel_data, emulator_data)); - - void *kernel_data2 = (void *)KERNEL_DATA2_BASE; - kernel_area2 = clone_area(KERNEL_AREA2_NAME, &kernel_data2, B_EXACT_ADDRESS, B_READ_AREA | B_WRITE_AREA, kernel_area); - if (kernel_area2 < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area2), kernel_area2); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("Kernel Data 2 area %ld at %p\n", kernel_area2, kernel_data2)); - - // Create area for SheepShaver data - if (!SheepMem::Init()) { - sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR), strerror(SheepMemArea), SheepMemArea); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 8*1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; - } - - RAMBase = 0x10000000; - ram_area = create_area(RAM_AREA_NAME, (void **)&RAMBase, B_BASE_ADDRESS, RAMSize, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (ram_area < 0) { - sprintf(str, GetString(STR_NO_RAM_AREA_ERR), strerror(ram_area), ram_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - RAMBaseHost = (uint8 *)RAMBase; - D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); - - // Create area and load Mac ROM - try { - init_rom(); - } catch (area_error) { - ErrorAlert(GetString(STR_NO_ROM_AREA_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_open_error) { - ErrorAlert(GetString(STR_NO_ROM_FILE_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_read_error) { - ErrorAlert(GetString(STR_ROM_FILE_READ_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (rom_size_error) { - ErrorAlert(GetString(STR_ROM_SIZE_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create area for DR Cache - DRCacheAddr = DR_CACHE_BASE; - dr_cache_area = create_area(DR_CACHE_AREA_NAME, (void **)&DRCacheAddr, B_EXACT_ADDRESS, DR_CACHE_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_cache_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_cache_area), dr_cache_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); - - // Create area for DR Emulator - DREmulatorAddr = DR_EMULATOR_BASE; - dr_emulator_area = create_area(DR_EMULATOR_AREA_NAME, (void **)&DREmulatorAddr, B_EXACT_ADDRESS, DR_EMULATOR_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_emulator_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_emulator_area), dr_emulator_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("DR Emulator area %ld at %p\n", dr_emulator_area, DREmulatorAddr)); - - // Initialize everything - if (!InitAll(NULL)) { - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("Initialization complete\n")); - - // Clear caches (as we loaded and patched code) and write protect ROM -#if !EMULATED_PPC - clear_caches(ROMBaseHost, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); -#endif - set_area_protection(rom_area, B_READ_AREA); - - // Initialize extra low memory - D(bug("Initializing extra Low Memory...\n")); - WriteMacInt32(XLM_SHEEP_OBJ, (uint32)this); // Pointer to SheepShaver object - D(bug("Extra Low Memory initialized\n")); - - // Disallow quitting with Alt-Q from now on - AllowQuitting = false; - - // Start 60Hz interrupt - tick_thread = spawn_thread(tick_func, "60Hz", B_URGENT_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Start NVRAM watchdog thread - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - nvram_thread = spawn_thread(nvram_func, "NVRAM Watchdog", B_LOW_PRIORITY, this); - resume_thread(nvram_thread); - - // Start emulator thread - emul_thread = spawn_thread(emul_func, "MacOS", B_NORMAL_PRIORITY, this); - resume_thread(emul_thread); -} - - -/* - * Quit requested - */ - -bool SheepShaver::QuitRequested(void) -{ - if (AllowQuitting) - return BApplication::QuitRequested(); - else - return false; -} - -void SheepShaver::Quit(void) -{ - status_t l; - - // Stop 60Hz interrupt - if (tick_thread > 0) { - TickThreadActive = false; - wait_for_thread(tick_thread, &l); - } - - // Stop NVRAM watchdog - if (nvram_thread > 0) { - status_t l; - NVRAMThreadActive = false; - suspend_thread(nvram_thread); // Wake thread up from snooze() - snooze(1000); - resume_thread(nvram_thread); - while (wait_for_thread(nvram_thread, &l) == B_INTERRUPTED) ; - } - - // Wait for emulator thread to finish - if (emul_thread > 0) - wait_for_thread(emul_thread, &l); - - // Deinitialize everything - ExitAll(); - - // Delete SheepShaver globals - SheepMem::Exit(); - - // Delete DR Emulator area - if (dr_emulator_area >= 0) - delete_area(dr_emulator_area); - - // Delete DR Cache area - if (dr_cache_area >= 0) - delete_area(dr_cache_area); - - // Delete ROM area - if (rom_area >= 0) - delete_area(rom_area); - - // Delete RAM area - if (ram_area >= 0) - delete_area(ram_area); - - // Delete Kernel Data area2 - if (kernel_area2 >= 0) - delete_area(kernel_area2); - if (kernel_area >= 0) - delete_area(kernel_area); - - // Unmap low memory and close sheep driver - if (sheep_fd >= 0) { - ioctl(sheep_fd, SHEEP_DOWN); - close(sheep_fd); - } - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - - BApplication::Quit(); -} - - -/* - * Create area for ROM (sets rom_area) and load ROM file - * - * area_error : Cannot create area - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void SheepShaver::init_rom(void) -{ - // Size of a native page - page_size = B_PAGE_SIZE; - - // Create area for ROM - ROMBase = ROM_BASE; - rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBase, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (rom_area < 0) - throw area_error(); - ROMBaseHost = (uint8 *)ROMBase; - D(bug("ROM area %ld at %p\n", rom_area, rom_addr)); - - // Load ROM - load_rom(); -} - - -/* - * Load ROM file - * - * file_open_error: Cannot open ROM file (nor use built-in ROM) - * file_read_error: Cannot read ROM file - */ - -void SheepShaver::load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Try to open ROM file - BFile file(rom_path && *rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) { - - // Failed, then ask memory_mess driver for ROM - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = read(sheep_fd, (void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - memcpy(ROMBaseHost, rom, ROM_SIZE); - delete[] rom; - return; - } else - throw file_open_error(); - } - - printf(GetString(STR_READING_ROM_FILE)); - - // Get file size - off_t rom_size = 0; - file.GetSize(&rom_size); - - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, ROM_SIZE); - - // Decode Mac ROM - if (!DecodeROM(rom, actual)) { - if (rom_size != 4*1024*1024) - throw rom_size_error(); - else - throw file_read_error(); - } - delete[] rom; -} - - -/* - * Emulator thread function - */ - -status_t SheepShaver::emul_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - - // Install interrupt signal handler - sigemptyset(&obj->sigusr1_action.sa_mask); - obj->sigusr1_action.sa_handler = (__signal_func_ptr)(obj->sigusr1_invoc); - obj->sigusr1_action.sa_flags = 0; - obj->sigusr1_action.sa_userdata = arg; - sigaction(SIGUSR1, &obj->sigusr1_action, NULL); - - // Install data access signal handler - sigemptyset(&obj->sigsegv_action.sa_mask); - obj->sigsegv_action.sa_handler = (__signal_func_ptr)(obj->sigsegv_invoc); - obj->sigsegv_action.sa_flags = 0; - obj->sigsegv_action.sa_userdata = arg; - sigaction(SIGSEGV, &obj->sigsegv_action, NULL); - -#if !EMULATED_PPC - // Install illegal instruction signal handler - sigemptyset(&obj->sigill_action.sa_mask); - obj->sigill_action.sa_handler = (__signal_func_ptr)(obj->sigill_invoc); - obj->sigill_action.sa_flags = 0; - obj->sigill_action.sa_userdata = arg; - sigaction(SIGILL, &obj->sigill_action, NULL); -#endif - - // Exceptions will send signals - disable_debugger(true); - - // Install signal stack - sig_stack = malloc(SIG_STACK_SIZE); - extra_stack = malloc(SIG_STACK_SIZE); - set_signal_stack(sig_stack, SIG_STACK_SIZE); - - // We're now ready to receive signals - obj->ReadyForSignals = true; - - // Jump to ROM boot routine - D(bug("Jumping to ROM\n")); - obj->jump_to_rom(ROMBase + 0x310000); - D(bug("Returned from ROM\n")); - - // We're no longer ready to receive signals - obj->ReadyForSignals = false; - obj->AllowQuitting = true; - - // Quit program - be_app->PostMessage(B_QUIT_REQUESTED); - return 0; -} - - -/* - * Jump into Mac ROM, start 680x0 emulator - * (also contains other EMUL_RETURN and EMUL_OP routines) - */ - -#if EMULATED_PPC -extern void emul_ppc(uint32 start); -extern void init_emul_ppc(void); -void SheepShaver::jump_to_rom(uint32 entry) -{ - init_emul_ppc(); - emul_ppc(entry); -} -#else -asm void SheepShaver::jump_to_rom(register uint32 entry) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - mfcr r0 - stw r0,4(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) - - // Move entry address to ctr, get pointer to Emulator Data - mtctr r4 - lwz r4,SheepShaver.emulator_data(r3) - - // Skip over EMUL_RETURN routine and get its address - bl @1 - - - /* - * EMUL_RETURN: Returned from emulator - */ - - // Restore PowerPC registers - lwz r1,XLM_EMUL_RETURN_STACK - lwz r2,XLM_TOC - lmw r13,56(r1) - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) - - // Exiting from 68k emulator - li r0,1 - stw r0,XLM_IRQ_NEST - li r0,MODE_NATIVE - stw r0,XLM_RUN_MODE - - // Return to caller of jump_to_rom() - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - lwz r0,56+19*4+18*8+4(r1) - mtcrf 0xff,r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Save address of EMUL_RETURN routine for 68k emulator patch -@1 mflr r0 - stw r0,XLM_EMUL_RETURN_PROC - - // Skip over EXEC_RETURN routine and get its address - bl @2 - - - /* - * EXEC_RETURN: Returned from 68k routine executed with Execute68k() - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Reentering EMUL_OP mode - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Save 68k registers - lwz r4,56+19*4+18*8+12(r1) - stw r8,M68kRegisters.d[0](r4) - stw r9,M68kRegisters.d[1](r4) - stw r10,M68kRegisters.d[2](r4) - stw r11,M68kRegisters.d[3](r4) - stw r12,M68kRegisters.d[4](r4) - stw r13,M68kRegisters.d[5](r4) - stw r14,M68kRegisters.d[6](r4) - stw r15,M68kRegisters.d[7](r4) - stw r16,M68kRegisters.a[0](r4) - stw r17,M68kRegisters.a[1](r4) - stw r18,M68kRegisters.a[2](r4) - stw r19,M68kRegisters.a[3](r4) - stw r20,M68kRegisters.a[4](r4) - stw r21,M68kRegisters.a[5](r4) - stw r22,M68kRegisters.a[6](r4) - - // Restore PowerPC registers - lmw r13,56(r1) -#if SAVE_FP_EXEC_68K - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) -#endif - - // Return to caller - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Stave address of EXEC_RETURN routine for 68k emulator patch -@2 mflr r0 - stw r0,XLM_EXEC_RETURN_PROC - - // Skip over EMUL_BREAK/EMUL_OP routine and get its address - bl @3 - - - /* - * EMUL_BREAK/EMUL_OP: Execute native routine, selector in r5 (my own private mode switch) - * - * 68k registers are stored in a M68kRegisters struct on the stack - * which the native routine may read and modify - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Entering EMUL_OP mode within 68k emulator - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Create PowerPC stack frame, reserve space for M68kRegisters - mr r3,r1 - subi r1,r1,56 // Fake "caller" frame - rlwinm r1,r1,0,0,29 // Align stack - - mfcr r0 - rlwinm r0,r0,0,11,8 - stw r0,4(r1) - mfxer r0 - stw r0,16(r1) - stw r2,12(r1) - stwu r1,-(56+16*4+15*8)(r1) - lwz r2,XLM_TOC - - // Save 68k registers - stw r8,56+M68kRegisters.d[0](r1) - stw r9,56+M68kRegisters.d[1](r1) - stw r10,56+M68kRegisters.d[2](r1) - stw r11,56+M68kRegisters.d[3](r1) - stw r12,56+M68kRegisters.d[4](r1) - stw r13,56+M68kRegisters.d[5](r1) - stw r14,56+M68kRegisters.d[6](r1) - stw r15,56+M68kRegisters.d[7](r1) - stw r16,56+M68kRegisters.a[0](r1) - stw r17,56+M68kRegisters.a[1](r1) - stw r18,56+M68kRegisters.a[2](r1) - stw r19,56+M68kRegisters.a[3](r1) - stw r20,56+M68kRegisters.a[4](r1) - stw r21,56+M68kRegisters.a[5](r1) - stw r22,56+M68kRegisters.a[6](r1) - stw r3,56+M68kRegisters.a[7](r1) - stfd f0,56+16*4+0*8(r1) - stfd f1,56+16*4+1*8(r1) - stfd f2,56+16*4+2*8(r1) - stfd f3,56+16*4+3*8(r1) - stfd f4,56+16*4+4*8(r1) - stfd f5,56+16*4+5*8(r1) - stfd f6,56+16*4+6*8(r1) - stfd f7,56+16*4+7*8(r1) - mffs f0 - stfd f8,56+16*4+8*8(r1) - stfd f9,56+16*4+9*8(r1) - stfd f10,56+16*4+10*8(r1) - stfd f11,56+16*4+11*8(r1) - stfd f12,56+16*4+12*8(r1) - stfd f13,56+16*4+13*8(r1) - stfd f0,56+16*4+14*8(r1) - - // Execute native routine - addi r3,r1,56 - mr r4,r24 - bl EmulOp - - // Restore 68k registers - lwz r8,56+M68kRegisters.d[0](r1) - lwz r9,56+M68kRegisters.d[1](r1) - lwz r10,56+M68kRegisters.d[2](r1) - lwz r11,56+M68kRegisters.d[3](r1) - lwz r12,56+M68kRegisters.d[4](r1) - lwz r13,56+M68kRegisters.d[5](r1) - lwz r14,56+M68kRegisters.d[6](r1) - lwz r15,56+M68kRegisters.d[7](r1) - lwz r16,56+M68kRegisters.a[0](r1) - lwz r17,56+M68kRegisters.a[1](r1) - lwz r18,56+M68kRegisters.a[2](r1) - lwz r19,56+M68kRegisters.a[3](r1) - lwz r20,56+M68kRegisters.a[4](r1) - lwz r21,56+M68kRegisters.a[5](r1) - lwz r22,56+M68kRegisters.a[6](r1) - lwz r3,56+M68kRegisters.a[7](r1) - lfd f13,56+16*4+14*8(r1) - lfd f0,56+16*4+0*8(r1) - lfd f1,56+16*4+1*8(r1) - lfd f2,56+16*4+2*8(r1) - lfd f3,56+16*4+3*8(r1) - lfd f4,56+16*4+4*8(r1) - lfd f5,56+16*4+5*8(r1) - lfd f6,56+16*4+6*8(r1) - lfd f7,56+16*4+7*8(r1) - mtfsf 0xff,f13 - lfd f8,56+16*4+8*8(r1) - lfd f9,56+16*4+9*8(r1) - lfd f10,56+16*4+10*8(r1) - lfd f11,56+16*4+11*8(r1) - lfd f12,56+16*4+12*8(r1) - lfd f13,56+16*4+13*8(r1) - - // Delete PowerPC stack frame - lwz r2,56+16*4+15*8+12(r1) - lwz r0,56+16*4+15*8+16(r1) - mtxer r0 - lwz r0,56+16*4+15*8+4(r1) - mtcrf 0xff,r0 - mr r1,r3 - - // Reeintering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute next 68k opcode - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - - // Save address of EMUL_BREAK/EMUL_OP routine for 68k emulator patch -@3 mflr r0 - stw r0,XLM_EMUL_OP_PROC - - // Save stack pointer for EMUL_RETURN - stw r1,XLM_EMUL_RETURN_STACK - - // Preset registers for ROM boot routine - lis r3,0x40b0 // Pointer to ROM boot structure - ori r3,r3,0xd000 - - // 68k emulator is now active - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Jump to ROM - bctr -} -#endif - - -#if !EMULATED_PPC -/* - * Execute 68k subroutine (must be ended with RTS) - * This must only be called by the emul_thread when in EMUL_OP mode - * r->a[7] is unused, the routine runs on the caller's stack - */ - -#if SAFE_EXEC_68K -void execute_68k(uint32 pc, M68kRegisters *r); - -void Execute68k(uint32 pc, M68kRegisters *r) -{ - if (*(uint32 *)XLM_RUN_MODE != MODE_EMUL_OP) - printf("FATAL: Execute68k() not called from EMUL_OP mode\n"); - if (find_thread(NULL) != the_app->emul_thread) - printf("FATAL: Execute68k() not called from emul_thread\n"); - execute_68k(pc, r); -} - -asm void execute_68k(register uint32 pc, register M68kRegisters *r) -#else -asm void Execute68k(register uint32 pc, register M68kRegisters *r) -#endif -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stw r4,12(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) -#if SAVE_FP_EXEC_68K - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) -#endif - - // Set up registers for 68k emulator - lwz r31,XLM_KERNEL_DATA // Pointer to Kernel Data - addi r31,r31,0x1000 - li r0,0 - mtcrf 0xff,r0 - creqv 11,11,11 // Supervisor mode - lwz r8,M68kRegisters.d[0](r4) - lwz r9,M68kRegisters.d[1](r4) - lwz r10,M68kRegisters.d[2](r4) - lwz r11,M68kRegisters.d[3](r4) - lwz r12,M68kRegisters.d[4](r4) - lwz r13,M68kRegisters.d[5](r4) - lwz r14,M68kRegisters.d[6](r4) - lwz r15,M68kRegisters.d[7](r4) - lwz r16,M68kRegisters.a[0](r4) - lwz r17,M68kRegisters.a[1](r4) - lwz r18,M68kRegisters.a[2](r4) - lwz r19,M68kRegisters.a[3](r4) - lwz r20,M68kRegisters.a[4](r4) - lwz r21,M68kRegisters.a[5](r4) - lwz r22,M68kRegisters.a[6](r4) - li r23,0 - mr r24,r3 - lwz r25,XLM_68K_R25 // MSB of SR - li r26,0 - li r28,0 // VBR - lwz r29,0x74(r31) // Pointer to opcode table - lwz r30,0x78(r31) // Address of emulator - - // Push return address (points to EXEC_RETURN opcode) on stack - li r0,XLM_EXEC_RETURN_OPCODE - stwu r0,-4(r1) - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute 68k opcode - lha r27,0(r24) - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr -} - - -/* - * Execute 68k A-Trap from EMUL_OP routine - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68kTrap(uint16 trap, M68kRegisters *r) -{ - uint16 proc[2] = {trap, M68K_RTS}; - Execute68k((uint32)proc, r); -} - - -/* - * Quit emulator (must only be called from main thread) - */ - -asm void QuitEmulator(void) -{ - lwz r0,XLM_EMUL_RETURN_PROC - mtlr r0 - blr -} -#endif - - -/* - * Dump 68k registers - */ - -void Dump68kRegs(M68kRegisters *r) -{ - // Display 68k registers - for (int i=0; i<8; i++) { - printf("d%d: %08lx", i, r->d[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } - for (int i=0; i<8; i++) { - printf("a%d: %08lx", i, r->a[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } -} - - -/* - * Make code executable - */ - -void MakeExecutable(int dummy, uint32 start, uint32 length) -{ - if ((start >= ROMBase) && (start < (ROMBase + ROM_SIZE))) - return; - clear_caches((void *)start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); -} - - -/* - * NVRAM watchdog thread (saves NVRAM every minute) - */ - -status_t SheepShaver::nvram_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - - while (obj->NVRAMThreadActive) { - snooze(60*1000000); - if (memcmp(obj->last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(obj->last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - return 0; -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -status_t SheepShaver::tick_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - int tick_counter = 0; - bigtime_t current = system_time(); - - while (obj->TickThreadActive) { - - // Wait - current += 16625; - snooze_until(current, B_SYSTEM_TIMEBASE); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - } - - // 60Hz interrupt - if (ReadMacInt32(XLM_IRQ_NEST) == 0) { - SetInterruptFlag(INTFLAG_VIA); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Trigger signal USR1 from another thread - */ - -void TriggerInterrupt(void) -{ - idle_resume(); -#if 0 - WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); -#else - if (the_app->emul_thread > 0 && the_app->ReadyForSignals) - send_signal(the_app->emul_thread, SIGUSR1); -#endif -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Set/clear interrupt flags (must be done atomically!) - */ - -volatile uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - atomic_or((int32 *)&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - atomic_and((int32 *)&InterruptFlags, ~flag); -} - - -/* - * Disable interrupts - */ - -void DisableInterrupt(void) -{ - atomic_add((int32 *)XLM_IRQ_NEST, 1); -} - - -/* - * Enable interrupts - */ - -void EnableInterrupt(void) -{ - atomic_add((int32 *)XLM_IRQ_NEST, -1); -} - - -/* - * USR1 handler - */ - -void SheepShaver::sigusr1_invoc(int sig, void *arg, vregs *r) -{ - ((SheepShaver *)arg)->sigusr1_handler(r); -} - -#if !EMULATED_PPC -static asm void ppc_interrupt(register uint32 entry) -{ - fralloc - - // Get address of return routine - bl @1 - - // Return routine - frfree - blr - -@1 - // Prepare registers for nanokernel interrupt routine - mtctr r1 - lwz r1,XLM_KERNEL_DATA - stw r6,0x018(r1) - mfctr r6 - stw r6,0x004(r1) - lwz r6,0x65c(r1) - stw r7,0x13c(r6) - stw r8,0x144(r6) - stw r9,0x14c(r6) - stw r10,0x154(r6) - stw r11,0x15c(r6) - stw r12,0x164(r6) - stw r13,0x16c(r6) - - mflr r10 - mfcr r13 - lwz r7,0x660(r1) - mflr r12 - rlwimi. r7,r7,8,0,0 - li r11,0 - ori r11,r11,0xf072 // MSR (SRR1) - mtcrf 0x70,r11 - li r8,0 - - // Enter nanokernel - mtlr r3 - blr -} -#endif - -void SheepShaver::sigusr1_handler(vregs *r) -{ - // Do nothing if interrupts are disabled - if ((*(int32 *)XLM_IRQ_NEST) > 0) - return; - - // Interrupt action depends on current run mode - switch (*(uint32 *)XLM_RUN_MODE) { - case MODE_68K: - // 68k emulator active, trigger 68k interrupt level 1 - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - r->cr |= kernel_data->v[0x674 >> 2]; - break; - -#if INTERRUPTS_IN_NATIVE_MODE - case MODE_NATIVE: - // 68k emulator inactive, in nanokernel? - if (r->r1 != KernelDataAddr) { - // No, prepare for 68k interrupt level 1 - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - *(uint32 *)(kernel_data->v[0x658 >> 2] + 0xdc) |= kernel_data->v[0x674 >> 2]; - - // Execute nanokernel interrupt routine (this will activate the 68k emulator) - atomic_add((int32 *)XLM_IRQ_NEST, 1); - if (ROMType == ROMTYPE_NEWWORLD) - ppc_interrupt(ROMBase + 0x312b1c); - else - ppc_interrupt(ROMBase + 0x312a3c); - } - break; -#endif - -#if INTERRUPTS_IN_EMUL_OP_MODE - case MODE_EMUL_OP: - // 68k emulator active, within EMUL_OP routine, execute 68k interrupt routine directly when interrupt level is 0 - if ((*(uint32 *)XLM_68K_R25 & 7) == 0) { - - // Set extra stack for SIGSEGV handler - set_signal_stack(extra_stack, SIG_STACK_SIZE); -#if 1 - // Execute full 68k interrupt routine - M68kRegisters r; - uint32 old_r25 = *(uint32 *)XLM_68K_R25; // Save interrupt level - *(uint32 *)XLM_68K_R25 = 0x21; // Execute with interrupt level 1 - static const uint16 proc[] = { - 0x3f3c, 0x0000, // move.w #$0000,-(sp) (fake format word) - 0x487a, 0x000a, // pea @1(pc) (return address) - 0x40e7, // move sr,-(sp) (saved SR) - 0x2078, 0x0064, // move.l $64,a0 - 0x4ed0, // jmp (a0) - M68K_RTS // @1 - }; - Execute68k((uint32)proc, &r); - *(uint32 *)XLM_68K_R25 = old_r25; // Restore interrupt level -#else - // Only update cursor - if (HasMacStarted()) { - if (InterruptFlags & INTFLAG_VIA) { - ClearInterruptFlag(INTFLAG_VIA); - ADBInterrupt(); - ExecuteNative(NATIVE_VIDEO_VBL); - } - } -#endif - // Reset normal signal stack - set_signal_stack(sig_stack, SIG_STACK_SIZE); - } - break; -#endif - } -} - - -/* - * SIGSEGV handler - */ - -static uint32 segv_r[32]; - -#if !EMULATED_PPC -asm void SheepShaver::sigsegv_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigsegv_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} -#endif - -static void sigsegv_handler(vregs *r) -{ - char str[256]; - - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Fault in Mac ROM or RAM? - bool mac_fault = (r->pc >= ROMBase) && (r->pc < (ROMBase + ROM_AREA_SIZE)) || (r->pc >= RAMBase) && (r->pc < (RAMBase + RAMSize)); - if (mac_fault) { - - // "VM settings" during MacOS 8 installation - if (r->pc == ROMBase + 0x488160 && segv_r[20] == 0xf8000000) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8.5 installation - } else if (r->pc == ROMBase + 0x488140 && segv_r[16] == 0xf8000000) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8 serial drivers on startup - } else if (r->pc == ROMBase + 0x48e080 && (segv_r[8] == 0xf3012002 || segv_r[8] == 0xf3012000)) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8.1 serial drivers on startup - } else if (r->pc == ROMBase + 0x48c5e0 && (segv_r[20] == 0xf3012002 || segv_r[20] == 0xf3012000)) { - r->pc += 4; - goto rti; - } else if (r->pc == ROMBase + 0x4a10a0 && (segv_r[20] == 0xf3012002 || segv_r[20] == 0xf3012000)) { - r->pc += 4; - goto rti; - } - } - - // Analyze opcode - enum { - TYPE_UNKNOWN, - TYPE_LOAD, - TYPE_STORE - } transfer_type = TYPE_UNKNOWN; - enum { - SIZE_UNKNOWN, - SIZE_BYTE, - SIZE_HALFWORD, - SIZE_WORD - } transfer_size = SIZE_UNKNOWN; - enum { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX - } addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - } - - // Calculate effective address - uint32 addr = 0; - switch (addr_mode) { - case MODE_X: - case MODE_UX: - if (ra == 0) - addr = segv_r[rb]; - else - addr = segv_r[ra] + segv_r[rb]; - break; - case MODE_NORM: - case MODE_U: - if (ra == 0) - addr = (int32)(int16)imm; - else - addr = segv_r[ra] + (int32)(int16)imm; - break; - default: - break; - } - - // Ignore ROM writes - if (transfer_type == TYPE_STORE && addr >= ROMBase && addr < ROMBase + ROM_SIZE) { - D(bug("WARNING: %s write access to ROM at %p, pc %p\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc)); - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - r->pc += 4; - goto rti; - } - - // Fault in Mac ROM or RAM? - if (mac_fault) { - - // Ignore illegal memory accesses? - if (PrefsFindBool("ignoresegv")) { - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - if (transfer_type == TYPE_LOAD) - segv_r[rd] = 0; - r->pc += 4; - goto rti; - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE) - sprintf(str, GetString(STR_MEM_ACCESS_ERR), transfer_size == SIZE_BYTE ? "byte" : transfer_size == SIZE_HALFWORD ? "halfword" : "word", transfer_type == TYPE_LOAD ? GetString(STR_MEM_ACCESS_READ) : GetString(STR_MEM_ACCESS_WRITE), addr, r->pc, segv_r[24], segv_r[1]); - else - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc, segv_r[24], segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger - sprintf(str, "SIGSEGV\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - VideoQuitFullScreen(); - disable_debugger(false); - debugger(str); - exit(1); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} - - -/* - * SIGILL handler - */ - -#if !EMULATED_PPC -asm void SheepShaver::sigill_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigill_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} -#endif - -static void sigill_handler(vregs *r) -{ - char str[256]; - - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Fault in Mac ROM or RAM? - bool mac_fault = (r->pc >= ROMBase) && (r->pc < (ROMBase + ROM_AREA_SIZE)) || (r->pc >= RAMBase) && (r->pc < (RAMBase + RAMSize)); - if (mac_fault) { - - switch (primop) { - case 9: // POWER instructions - case 22: -power_inst: sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc, segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - - case 31: - switch (exop) { - case 83: // mfmsr - segv_r[rd] = 0xf072; - r->pc += 4; - goto rti; - - case 210: // mtsr - case 242: // mtsrin - case 306: // tlbie - r->pc += 4; - goto rti; - - case 339: { // mfspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc += 4; - goto rti; - case 25: // SDR1 - segv_r[rd] = 0xdead001f; - r->pc += 4; - goto rti; - case 287: // PVR - segv_r[rd] = PVR; - r->pc += 4; - goto rti; - } - break; - } - - case 467: { // mtspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 275: // SPRG3 - case 528: // IBAT0U - case 529: // IBAT0L - case 530: // IBAT1U - case 531: // IBAT1L - case 532: // IBAT2U - case 533: // IBAT2L - case 534: // IBAT3U - case 535: // IBAT3L - case 536: // DBAT0U - case 537: // DBAT0L - case 538: // DBAT1U - case 539: // DBAT1L - case 540: // DBAT2U - case 541: // DBAT2L - case 542: // DBAT3U - case 543: // DBAT3L - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc += 4; - goto rti; - } - break; - } - - case 29: case 107: case 152: case 153: // POWER instructions - case 184: case 216: case 217: case 248: - case 264: case 277: case 331: case 360: - case 363: case 488: case 531: case 537: - case 541: case 664: case 665: case 696: - case 728: case 729: case 760: case 920: - case 921: case 952: - goto power_inst; - } - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc, segv_r[24], segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger - sprintf(str, "SIGILL\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - VideoQuitFullScreen(); - disable_debugger(false); - debugger(str); - exit(1); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} - - -/* - * Helpers to share 32-bit addressable data with MacOS - */ - -bool SheepMem::Init(void) -{ - // Delete old area - area_id old_sheep_area = find_area(SHEEP_AREA_NAME); - if (old_sheep_area > 0) - delete_area(old_sheep_area); - - // Create area for SheepShaver data - proc = base = 0x60000000; - SheepMemArea = create_area(SHEEP_AREA_NAME, (void **)&base, B_BASE_ADDRESS, size, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (SheepMemArea < 0) - return false; - - // Create read-only area with all bits set to 0 - static const uint8 const_zero_page[4096] = {0,}; - zero_page = const_zero_page; - - D(bug("SheepShaver area %ld at %p\n", SheepMemArea, base)); - data = base + size; - return true; -} - -void SheepMem::Exit(void) -{ - if (SheepMemArea >= 0) - delete_area(SheepMemArea); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_ERROR_PREFIX), text); - VideoQuitFullScreen(); - BAlert *alert = new BAlert(GetString(STR_ERROR_ALERT_TITLE), str, GetString(STR_QUIT_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, pos, neg, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - return alert->Go() == 0; -} diff --git a/SheepShaver/src/BeOS/prefs_beos.cpp b/SheepShaver/src/BeOS/prefs_beos.cpp deleted file mode 100644 index cad4a8882..000000000 --- a/SheepShaver/src/BeOS/prefs_beos.cpp +++ /dev/null @@ -1,112 +0,0 @@ -/* - * prefs_beos.cpp - Preferences handling, BeOS specific things - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include -#include -#include - -#include "sysdeps.h" -#include "prefs.h" -#include "main.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"bitbang", TYPE_BOOLEAN, false, "draw Mac desktop directly on screen in window mode"}, - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Preferences file name and path -const char PREFS_FILE_NAME[] = "SheepShaver_prefs"; -static BPath prefs_path; - -// Modification date of prefs file -time_t PrefsFileDate = 0; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - // Construct prefs path - find_directory(B_USER_SETTINGS_DIRECTORY, &prefs_path, true); - prefs_path.Append(PREFS_FILE_NAME); - - // Read preferences from settings file - FILE *f = fopen(prefs_path.Path(), "r"); - if (f == NULL) // Not found in settings directory, look in app directory - f = fopen(PREFS_FILE_NAME, "r"); - if (f != NULL) { - LoadPrefsFromStream(f); - - struct stat s; - fstat(fileno(f), &s); - PrefsFileDate = s.st_ctime; - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - PrefsFileDate = real_time_clock(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.Path(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "/boot"); - PrefsAddInt32("windowmodes", - B_8_BIT_640x480 | B_15_BIT_640x480 | B_32_BIT_640x480 | - B_8_BIT_800x600 | B_15_BIT_800x600 | B_32_BIT_800x600 - ); - PrefsAddInt32("screenmodes", - B_8_BIT_640x480 | B_15_BIT_640x480 | B_32_BIT_640x480 | - B_8_BIT_800x600 | B_15_BIT_800x600 | B_32_BIT_800x600 | - B_8_BIT_1024x768 | B_15_BIT_1024x768 - ); - PrefsAddBool("bitbang", false); - PrefsAddBool("idlewait", true); -} diff --git a/SheepShaver/src/BeOS/prefs_editor_beos.cpp b/SheepShaver/src/BeOS/prefs_editor_beos.cpp deleted file mode 100644 index 847700c22..000000000 --- a/SheepShaver/src/BeOS/prefs_editor_beos.cpp +++ /dev/null @@ -1,877 +0,0 @@ -/* - * prefs_editor_beos.cpp - Preferences editor, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include -#include -#include -#include - -#include "prefs_editor.h" -#include "prefs.h" -#include "main.h" -#include "cdrom.h" -#include "xpram.h" -#include "about_window.h" -#include "user_strings.h" - - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; -const rgb_color slider_fill_color = {102, 152, 255, 0}; - - -// Window messages -const uint32 MSG_OK = 'okok'; // "Start" clicked -const uint32 MSG_CANCEL = 'cncl'; // "Quit" clicked -const uint32 MSG_ZAP_PRAM = 'zprm'; - -const int NUM_PANES = 4; - -const uint32 MSG_VOLUME_SELECTED = 'volu'; // "Volumes" pane -const uint32 MSG_VOLUME_INVOKED = 'voli'; -const uint32 MSG_ADD_VOLUME = 'addv'; -const uint32 MSG_CREATE_VOLUME = 'crev'; -const uint32 MSG_REMOVE_VOLUME = 'remv'; -const uint32 MSG_ADD_VOLUME_PANEL = 'advp'; -const uint32 MSG_CREATE_VOLUME_PANEL = 'crvp'; -const uint32 MSG_DEVICE_NAME = 'devn'; -const uint32 MSG_BOOT_ANY = 'bany'; -const uint32 MSG_BOOT_CDROM = 'bcdr'; -const uint32 MSG_NOCDROM = 'nocd'; - -const uint32 MSG_REF_5HZ = ' 5Hz'; // "Graphics" pane -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_GFXACCEL = 'gfac'; -const uint32 MSG_WINDOW_MODE = 'wmod'; -const uint32 MSG_SCREEN_MODE = 'smod'; -const uint32 MSG_NOSOUND = 'nosn'; - -const uint32 MSG_SER_A = 'sera'; // "Serial"/"Network" pane -const uint32 MSG_SER_B = 'serb'; -const uint32 MSG_NONET = 'noet'; - -const uint32 MSG_RAMSIZE = 'rmsz'; // "Memory" pane -const uint32 MSG_IGNORESEGV = 'isgv'; -const uint32 MSG_IDLEWAIT = 'idlw'; - - -// RAM size slider class -class RAMSlider : public BSlider { -public: - RAMSlider(BRect frame, const char *name, const char *label, BMessage *message, - int32 minValue, int32 maxValue, thumb_style thumbType = B_BLOCK_THUMB, - uint32 resizingMode = B_FOLLOW_LEFT | - B_FOLLOW_TOP, - uint32 flags = B_NAVIGABLE | B_WILL_DRAW | - B_FRAME_EVENTS) : BSlider(frame, name, label, message, minValue, maxValue, thumbType, resizingMode, flags) - { - update_text = (char *)malloc(256); - } - - virtual ~RAMSlider() - { - if (update_text) - free(update_text); - } - - virtual char *UpdateText(void) const - { - if (update_text) { - sprintf(update_text, GetString(STR_RAMSIZE_FMT), Value()); - } - return update_text; - } - -private: - char *update_text; -}; - - -// Volumes list view class -class VolumeListView : public BListView { -public: - VolumeListView(BRect frame, const char *name, list_view_type type = B_SINGLE_SELECTION_LIST, uint32 resizeMask = B_FOLLOW_LEFT | B_FOLLOW_TOP, uint32 flags = B_WILL_DRAW | B_FRAME_EVENTS | B_NAVIGABLE) - : BListView(frame, name, type, resizeMask, flags) - {} - - // Handle dropped files and volumes - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - BMessage msg2(MSG_ADD_VOLUME_PANEL); - entry_ref ref; - for (int i=0; msg->FindRef("refs", i, &ref) == B_NO_ERROR; i++) - msg2.AddRef("refs", &ref); - Window()->PostMessage(&msg2); - } else - BListView::MessageReceived(msg); - } -}; - - -// Number-entry BTextControl -class NumberControl : public BTextControl { -public: - NumberControl(BRect frame, float divider, const char *name, const char *label, long value, BMessage *message) - : BTextControl(frame, name, label, NULL, message, B_FOLLOW_LEFT | B_FOLLOW_TOP, B_WILL_DRAW | B_NAVIGABLE) - { - SetDivider(divider); - for (int c=0; c<256; c++) - if (!isdigit(c) && c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - SetValue(value); - } - - // Set integer value - void SetValue(long value) - { - char str[32]; - sprintf(str, "%ld", value); - SetText(str); - } - - // Get integer value - long Value(void) - { - return atol(Text()); - } -}; - - -// Path-entry BTextControl -class PathControl : public BTextControl { -public: - PathControl(bool dir_ctrl_, BRect frame, const char *name, const char *label, const char *text, BMessage *message) : BTextControl(frame, name, label, text, message), dir_ctrl(dir_ctrl_) - { - for (int c=0; c<' '; c++) - if (c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - } - - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - entry_ref the_ref; - BEntry the_entry; - - // Look for dropped refs - if (msg->FindRef("refs", &the_ref) == B_NO_ERROR) { - if (the_entry.SetTo(&the_ref) == B_NO_ERROR && (dir_ctrl&& the_entry.IsDirectory() || !dir_ctrl && the_entry.IsFile())) { - BPath the_path; - the_entry.GetPath(&the_path); - SetText(the_path.Path()); - } - } else - BTextControl::MessageReceived(msg); - - MakeFocus(); - } else - BTextControl::MessageReceived(msg); - } - -private: - bool dir_ctrl; -}; - - -// Preferences window class -class PrefsWindow : public BWindow { -public: - PrefsWindow(uint32 msg); - virtual ~PrefsWindow(); - virtual void MessageReceived(BMessage *msg); - -private: - BView *create_volumes_pane(void); - BView *create_graphics_pane(void); - BView *create_serial_pane(void); - BView *create_memory_pane(void); - - uint32 ok_message; - bool send_quit_on_close; - - BMessenger this_messenger; - BView *top; - BRect top_frame; - BTabView *pane_tabs; - BView *panes[NUM_PANES]; - int current_pane; - - VolumeListView *volume_list; - BCheckBox *nocdrom_checkbox; - BCheckBox *gfxaccel_checkbox; - BCheckBox *nosound_checkbox; - BCheckBox *nonet_checkbox; - BCheckBox *ignoresegv_checkbox; - BCheckBox *idlewait_checkbox; - RAMSlider *ramsize_slider; - PathControl *extfs_control; - PathControl *rom_control; - - BFilePanel *add_volume_panel; - BFilePanel *create_volume_panel; - - uint32 max_ramsize; // In MB -}; - - -/* - * Show preferences editor - * When the user clicks on "OK", the message given as parameter is sent - * to the application; if he clicks on "Quit", B_QUIT_REQUESTED is sent - */ - -void PrefsEditor(uint32 msg) -{ - new PrefsWindow(msg); -} - - -/* - * Preferences window constructor - */ - -PrefsWindow::PrefsWindow(uint32 msg) : BWindow(BRect(0, 0, 400, 289), GetString(STR_PREFS_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_ASYNCHRONOUS_CONTROLS), this_messenger(this) -{ - int i; - ok_message = msg; - send_quit_on_close = true; - - // Move window to right position - Lock(); - MoveTo(80, 80); - - // Set up menus - BMenuBar *bar = new BMenuBar(Bounds(), "menu"); - BMenu *menu = new BMenu(GetString(STR_PREFS_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ABOUT), new BMessage(B_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_START), new BMessage(MSG_OK))); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ZAP_PRAM), new BMessage(MSG_ZAP_PRAM))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_QUIT), new BMessage(MSG_CANCEL), 'Q')); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Bounds().bottom + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Light gray background - BRect b = Bounds(); - top = new BView(BRect(0, mbar_height, b.right, b.bottom), "top", B_FOLLOW_NONE, B_WILL_DRAW); - AddChild(top); - top->SetViewColor(fill_color); - top_frame = top->Bounds(); - - // Create panes - panes[0] = create_volumes_pane(); - panes[1] = create_graphics_pane(); - panes[2] = create_serial_pane(); - panes[3] = create_memory_pane(); - - // Prefs item tab view - pane_tabs = new BTabView(BRect(10, 10, top_frame.right-10, top_frame.bottom-50), "items", B_WIDTH_FROM_LABEL); - for (i=0; iAddTab(panes[i]); - top->AddChild(pane_tabs); - - volume_list->Select(0); - - // Create volume file panels - add_volume_panel = new BFilePanel(B_OPEN_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_ADD_VOLUME_PANEL)); - add_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_ADD_VOLUME_PANEL_BUTTON)); - add_volume_panel->Window()->SetTitle(GetString(STR_ADD_VOLUME_TITLE)); - create_volume_panel = new BFilePanel(B_SAVE_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_CREATE_VOLUME_PANEL)); - create_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_CREATE_VOLUME_PANEL_BUTTON)); - create_volume_panel->Window()->SetTitle(GetString(STR_CREATE_VOLUME_TITLE)); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - background->FindView("PoseView")->ResizeBy(0, -30); - background->FindView("VScrollBar")->ResizeBy(0, -30); - background->FindView("CountVw")->MoveBy(0, -30); - BView *v = background->FindView("HScrollBar"); - if (v) - v->MoveBy(0, -30); - else { - i = 0; - while ((v = background->ChildAt(i++)) != NULL) { - if (v->Name() == NULL || v->Name()[0] == 0) { - v->MoveBy(0, -30); // unnamed horizontal scroll bar - break; - } - } - } - BView *filename = background->FindView("text view"); - BRect fnr(filename->Frame()); - fnr.OffsetBy(0, -30); - NumberControl *nc = new NumberControl(fnr, 80, "hardfile_size", GetString(STR_HARDFILE_SIZE_CTRL), 40, NULL); - background->AddChild(nc); - create_volume_panel->Window()->Unlock(); - - // "Start" button - BButton *button = new BButton(BRect(20, top_frame.bottom-35, 90, top_frame.bottom-10), "start", GetString(STR_START_BUTTON), new BMessage(MSG_OK)); - top->AddChild(button); - SetDefaultButton(button); - - // "Quit" button - top->AddChild(new BButton(BRect(top_frame.right-90, top_frame.bottom-35, top_frame.right-20, top_frame.bottom-10), "cancel", GetString(STR_QUIT_BUTTON), new BMessage(MSG_CANCEL))); - - Unlock(); - Show(); -} - - -/* - * Preferences window destructor - */ - -PrefsWindow::~PrefsWindow() -{ - delete add_volume_panel; - if (send_quit_on_close) - be_app->PostMessage(B_QUIT_REQUESTED); -} - - -/* - * Create "Volumes" pane - */ - -BView *PrefsWindow::create_volumes_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_VOLUMES_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *str; - int32 index = 0; - volume_list = new VolumeListView(BRect(15, 10, pane->Bounds().right-30, 108), "volumes"); - while ((str = PrefsFindString("disk", index++)) != NULL) - volume_list->AddItem(new BStringItem(str)); - volume_list->SetSelectionMessage(new BMessage(MSG_VOLUME_SELECTED)); - volume_list->SetInvocationMessage(new BMessage(MSG_VOLUME_INVOKED)); - pane->AddChild(new BScrollView("volumes_border", volume_list, B_FOLLOW_LEFT | B_FOLLOW_TOP, 0, false, true)); - - pane->AddChild(new BButton(BRect(10, 113, pane->Bounds().right/3, 133), "add_volume", GetString(STR_ADD_VOLUME_BUTTON), new BMessage(MSG_ADD_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right/3, 113, pane->Bounds().right*2/3, 133), "create_volume", GetString(STR_CREATE_VOLUME_BUTTON), new BMessage(MSG_CREATE_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right*2/3, 113, pane->Bounds().right-11, 133), "remove_volume", GetString(STR_REMOVE_VOLUME_BUTTON), new BMessage(MSG_REMOVE_VOLUME))); - - extfs_control = new PathControl(true, BRect(10, 145, right, 160), "extfs", GetString(STR_EXTFS_CTRL), PrefsFindString("extfs"), NULL); - extfs_control->SetDivider(90); - pane->AddChild(extfs_control); - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 165, right, 180), "bootdriver", GetString(STR_BOOTDRIVER_CTRL), menu); - menu_field->SetDivider(90); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_ANY_LAB), new BMessage(MSG_BOOT_ANY))); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_CDROM_LAB), new BMessage(MSG_BOOT_CDROM))); - pane->AddChild(menu_field); - int16 i16 = PrefsFindInt32("bootdriver"); - BMenuItem *item; - if (i16 == 0) { - if ((item = menu->FindItem(GetString(STR_BOOT_ANY_LAB))) != NULL) - item->SetMarked(true); - } else if (i16 == CDROMRefNum) { - if ((item = menu->FindItem(GetString(STR_BOOT_CDROM_LAB))) != NULL) - item->SetMarked(true); - } - - nocdrom_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nocdrom", GetString(STR_NOCDROM_CTRL), new BMessage(MSG_NOCDROM)); - pane->AddChild(nocdrom_checkbox); - nocdrom_checkbox->SetValue(PrefsFindBool("nocdrom") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Graphics/Sound" pane - */ - -struct video_mode_box { - uint32 mode; - int mode_string_id, bit_string_id; - float left, top; - BCheckBox *box; -}; - -const int NUM_WINDOW_MODES = 6; -const int NUM_SCREEN_MODES = 18; - -static video_mode_box window_mode_boxes[NUM_SCREEN_MODES] = { - {B_8_BIT_640x480, STR_W_640x480_CTRL, STR_8_BIT_CTRL, 140, 48, NULL}, - {B_15_BIT_640x480, STR_W_640x480_CTRL, STR_16_BIT_CTRL, 220, 48, NULL}, - {B_32_BIT_640x480, STR_W_640x480_CTRL, STR_32_BIT_CTRL, 300, 48, NULL}, - {B_8_BIT_800x600, STR_W_800x600_CTRL, STR_8_BIT_CTRL, 140, 65, NULL}, - {B_15_BIT_800x600, STR_W_800x600_CTRL, STR_16_BIT_CTRL, 220, 65, NULL}, - {B_32_BIT_800x600, STR_W_800x600_CTRL, STR_32_BIT_CTRL, 300, 65, NULL}, -}; - -static video_mode_box screen_mode_boxes[NUM_SCREEN_MODES] = { - {B_8_BIT_640x480, STR_640x480_CTRL, STR_8_BIT_CTRL, 140, 82, NULL}, - {B_15_BIT_640x480, STR_640x480_CTRL, STR_16_BIT_CTRL, 220, 82, NULL}, - {B_32_BIT_640x480, STR_640x480_CTRL, STR_32_BIT_CTRL, 300, 82, NULL}, - {B_8_BIT_800x600, STR_800x600_CTRL, STR_8_BIT_CTRL, 140, 99, NULL}, - {B_15_BIT_800x600, STR_800x600_CTRL, STR_16_BIT_CTRL, 220, 99, NULL}, - {B_32_BIT_800x600, STR_800x600_CTRL, STR_32_BIT_CTRL, 300, 99, NULL}, - {B_8_BIT_1024x768, STR_1024x768_CTRL, STR_8_BIT_CTRL, 140, 116, NULL}, - {B_15_BIT_1024x768, STR_1024x768_CTRL, STR_16_BIT_CTRL, 220, 116, NULL}, - {B_32_BIT_1024x768, STR_1024x768_CTRL, STR_32_BIT_CTRL, 300, 116, NULL}, - {B_8_BIT_1152x900, STR_1152x900_CTRL, STR_8_BIT_CTRL, 140, 133, NULL}, - {B_15_BIT_1152x900, STR_1152x900_CTRL, STR_16_BIT_CTRL, 220, 133, NULL}, - {B_32_BIT_1152x900, STR_1152x900_CTRL, STR_32_BIT_CTRL, 300, 133, NULL}, - {B_8_BIT_1280x1024, STR_1280x1024_CTRL, STR_8_BIT_CTRL, 140, 150, NULL}, - {B_15_BIT_1280x1024, STR_1280x1024_CTRL, STR_16_BIT_CTRL, 220, 150, NULL}, - {B_32_BIT_1280x1024, STR_1280x1024_CTRL, STR_32_BIT_CTRL, 300, 150, NULL}, - {B_8_BIT_1600x1200, STR_1600x1200_CTRL, STR_8_BIT_CTRL, 140, 167, NULL}, - {B_15_BIT_1600x1200, STR_1600x1200_CTRL, STR_16_BIT_CTRL, 220, 167, NULL}, - {B_32_BIT_1600x1200, STR_1600x1200_CTRL, STR_32_BIT_CTRL, 300, 167, NULL} -}; - -BView *PrefsWindow::create_graphics_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_GRAPHICS_SOUND_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 5, right, 20), "frameskip", GetString(STR_FRAMESKIP_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - pane->AddChild(menu_field); - int32 i32 = PrefsFindInt32("frameskip"); - BMenuItem *item; - if (i32 == 12) { - if ((item = menu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 8) { - if ((item = menu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 6) { - if ((item = menu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 4) { - if ((item = menu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 2) { - if ((item = menu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } - - gfxaccel_checkbox = new BCheckBox(BRect(10, 25, right, 40), "gfxaccel", GetString(STR_GFXACCEL_CTRL), new BMessage(MSG_GFXACCEL)); - pane->AddChild(gfxaccel_checkbox); - gfxaccel_checkbox->SetValue(PrefsFindBool("gfxaccel") ? B_CONTROL_ON : B_CONTROL_OFF); - - uint32 window_modes = PrefsFindInt32("windowmodes"); - for (int i=0; ibit_string_id == STR_8_BIT_CTRL) { - BStringView *text = new BStringView(BRect(10, p->top, 120, p->top + 15), "", GetString(p->mode_string_id)); - pane->AddChild(text); - } - p->box = new BCheckBox(BRect(p->left, p->top, p->left + 80, p->top + 15), "", GetString(p->bit_string_id), new BMessage(MSG_WINDOW_MODE)); - pane->AddChild(p->box); - p->box->SetValue(window_modes & p->mode ? B_CONTROL_ON : B_CONTROL_OFF); - } - uint32 screen_modes = PrefsFindInt32("screenmodes"); - for (int i=0; ibit_string_id == STR_8_BIT_CTRL) { - BStringView *text = new BStringView(BRect(10, p->top, 120, p->top + 15), "", GetString(p->mode_string_id)); - pane->AddChild(text); - } - p->box = new BCheckBox(BRect(p->left, p->top, p->left + 80, p->top + 15), "", GetString(p->bit_string_id), new BMessage(MSG_SCREEN_MODE)); - pane->AddChild(p->box); - p->box->SetValue(screen_modes & p->mode ? B_CONTROL_ON : B_CONTROL_OFF); - } - - nosound_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nosound", GetString(STR_NOSOUND_CTRL), new BMessage(MSG_NOSOUND)); - pane->AddChild(nosound_checkbox); - nosound_checkbox->SetValue(PrefsFindBool("nosound") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Serial/Network" pane - */ - -static void add_serial_names(BPopUpMenu *menu, uint32 msg) -{ - BSerialPort *port = new BSerialPort; - char name[B_PATH_NAME_LENGTH]; - for (int i=0; iCountDevices(); i++) { - port->GetDeviceName(i, name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - if (SysInfo.platform_type == B_BEBOX_PLATFORM) { - BDirectory dir; - BEntry entry; - dir.SetTo("/dev/parallel"); - if (dir.InitCheck() == B_NO_ERROR) { - dir.Rewind(); - while (dir.GetNextEntry(&entry) >= 0) { - if (!entry.IsDirectory()) { - entry.GetName(name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - } - } - } - delete port; -} - -static void set_serial_label(BPopUpMenu *menu, const char *prefs_name) -{ - const char *str; - BMenuItem *item; - if ((str = PrefsFindString(prefs_name)) != NULL) - if ((item = menu->FindItem(str)) != NULL) - item->SetMarked(true); -} - -BView *PrefsWindow::create_serial_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_SERIAL_NETWORK_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu_a = new BPopUpMenu(""); - add_serial_names(menu_a, MSG_SER_A); - menu_field = new BMenuField(BRect(10, 5, right, 20), "seriala", GetString(STR_SERPORTA_CTRL), menu_a); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_a, "seriala"); - - BPopUpMenu *menu_b = new BPopUpMenu(""); - add_serial_names(menu_b, MSG_SER_B); - menu_field = new BMenuField(BRect(10, 26, right, 41), "serialb", GetString(STR_SERPORTB_CTRL), menu_b); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_b, "serialb"); - - nonet_checkbox = new BCheckBox(BRect(10, 47, right, 62), "nonet", GetString(STR_NONET_CTRL), new BMessage(MSG_NONET)); - pane->AddChild(nonet_checkbox); - nonet_checkbox->SetValue(PrefsFindBool("nonet") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Memory/Misc" pane - */ - -BView *PrefsWindow::create_memory_pane(void) -{ - char str[256], str2[256]; - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_MEMORY_MISC_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BEntry entry("/boot/var/swap"); - off_t swap_space; - if (entry.GetSize(&swap_space) == B_NO_ERROR) - max_ramsize = swap_space / (1024 * 1024) - 8; - else - max_ramsize = SysInfo.max_pages * B_PAGE_SIZE / (1024 * 1024) - 8; - - int32 value = PrefsFindInt32("ramsize") / (1024 * 1024); - - ramsize_slider = new RAMSlider(BRect(10, 5, right, 55), "ramsize", GetString(STR_RAMSIZE_SLIDER), new BMessage(MSG_RAMSIZE), 8, max_ramsize, B_TRIANGLE_THUMB); - ramsize_slider->SetValue(value); - ramsize_slider->UseFillColor(true, &slider_fill_color); - sprintf(str, GetString(STR_RAMSIZE_FMT), 8); - sprintf(str2, GetString(STR_RAMSIZE_FMT), max_ramsize); - ramsize_slider->SetLimitLabels(str, str2); - pane->AddChild(ramsize_slider); - - ignoresegv_checkbox = new BCheckBox(BRect(10, 60, right, 75), "ignoresegv", GetString(STR_IGNORESEGV_CTRL), new BMessage(MSG_IGNORESEGV)); - pane->AddChild(ignoresegv_checkbox); - ignoresegv_checkbox->SetValue(PrefsFindBool("ignoresegv") ? B_CONTROL_ON : B_CONTROL_OFF); - - idlewait_checkbox = new BCheckBox(BRect(10, 80, right, 95), "idlewait", GetString(STR_IDLEWAIT_CTRL), new BMessage(MSG_IDLEWAIT)); - pane->AddChild(idlewait_checkbox); - idlewait_checkbox->SetValue(PrefsFindBool("idlewait") ? B_CONTROL_ON : B_CONTROL_OFF); - - rom_control = new PathControl(false, BRect(10, 100, right, 115), "rom", GetString(STR_ROM_FILE_CTRL), PrefsFindString("rom"), NULL); - rom_control->SetDivider(117); - pane->AddChild(rom_control); - - return pane; -} - - -/* - * Message from controls/menus received - */ - -void PrefsWindow::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_OK: // "Start" button clicked - PrefsReplaceString("extfs", extfs_control->Text()); - const char *str = rom_control->Text(); - if (strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); - SavePrefs(); - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(ok_message); - break; - - case MSG_CANCEL: // "Quit" button clicked - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(B_QUIT_REQUESTED); - break; - - case B_ABOUT_REQUESTED: // "About" menu item selected - OpenAboutWindow(); - break; - - case MSG_ZAP_PRAM: // "Zap PRAM File" menu item selected - ZapPRAM(); - break; - - case MSG_VOLUME_INVOKED: { // Double-clicked on volume name, toggle read-only flag - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - const char *str = PrefsFindString("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - char newstr[256]; - if (str[0] == '*') - strcpy(newstr, str+1); - else { - strcpy(newstr, "*"); - strcat(newstr, str); - } - PrefsReplaceString("disk", newstr, selected); - volume_list->AddItem(new BStringItem(newstr), selected); - volume_list->Select(selected); - } - break; - } - - case MSG_ADD_VOLUME: - add_volume_panel->Show(); - break; - - case MSG_CREATE_VOLUME: - create_volume_panel->Show(); - break; - - case MSG_ADD_VOLUME_PANEL: { - entry_ref ref; - if (msg->FindRef("refs", &ref) == B_NO_ERROR) { - BEntry entry(&ref, true); - BPath path; - entry.GetPath(&path); - if (entry.IsFile()) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else if (entry.IsDirectory()) { - BVolume volume; - if (path.Path()[0] == '/' && strchr(path.Path()+1, '/') == NULL && entry.GetVolume(&volume) == B_NO_ERROR) { - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (volume.Device() == info.dev) { - PrefsAddString("disk", info.device_name); - volume_list->AddItem(new BStringItem(info.device_name)); - } - } - } - } - } - break; - } - - case MSG_CREATE_VOLUME_PANEL: { - entry_ref dir; - if (msg->FindRef("directory", &dir) == B_NO_ERROR) { - BEntry entry(&dir, true); - BPath path; - entry.GetPath(&path); - path.Append(msg->FindString("name")); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - NumberControl *v = (NumberControl *)background->FindView("hardfile_size"); - int size = v->Value(); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", path.Path(), size); - int ret = system(cmd); - if (ret == 0) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else { - sprintf(cmd, GetString(STR_CREATE_VOLUME_WARN), strerror(ret)); - WarningAlert(cmd); - } - } - break; - } - - case MSG_REMOVE_VOLUME: { - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - PrefsRemoveItem("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - volume_list->Select(selected); - } - break; - } - - case MSG_BOOT_ANY: - PrefsReplaceInt32("bootdriver", 0); - break; - - case MSG_BOOT_CDROM: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - - case MSG_NOCDROM: - PrefsReplaceBool("nocdrom", nocdrom_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_GFXACCEL: - PrefsReplaceBool("gfxaccel", gfxaccel_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_NOSOUND: - PrefsReplaceBool("nosound", nosound_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_WINDOW_MODE: { - BCheckBox *source = NULL; - msg->FindPointer("source", &source); - if (source == NULL) - break; - for (int i=0; ibox == source) { - if (p->box->Value() == B_CONTROL_ON) - PrefsReplaceInt32("windowmodes", PrefsFindInt32("windowmodes") | p->mode); - else - PrefsReplaceInt32("windowmodes", PrefsFindInt32("windowmodes") & ~(p->mode)); - break; - } - } - break; - } - - case MSG_SCREEN_MODE: { - BCheckBox *source = NULL; - msg->FindPointer("source", &source); - if (source == NULL) - break; - for (int i=0; ibox == source) { - if (p->box->Value() == B_CONTROL_ON) - PrefsReplaceInt32("screenmodes", PrefsFindInt32("screenmodes") | p->mode); - else - PrefsReplaceInt32("screenmodes", PrefsFindInt32("screenmodes") & ~(p->mode)); - break; - } - } - break; - } - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", 2); - break; - - case MSG_SER_A: { - BMenuItem *source = NULL; - msg->FindPointer("source", &source); - if (source) - PrefsReplaceString("seriala", source->Label()); - break; - } - - case MSG_SER_B: { - BMenuItem *source = NULL; - msg->FindPointer("source", &source); - if (source) - PrefsReplaceString("serialb", source->Label()); - break; - } - - case MSG_NONET: - PrefsReplaceBool("nonet", nonet_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_IGNORESEGV: - PrefsReplaceBool("ignoresegv", ignoresegv_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_IDLEWAIT: - PrefsReplaceBool("idlewait", idlewait_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_RAMSIZE: - PrefsReplaceInt32("ramsize", ramsize_slider->Value() * 1024 * 1024); - break; - - default: - BWindow::MessageReceived(msg); - } -} diff --git a/SheepShaver/src/BeOS/scsi_beos.cpp b/SheepShaver/src/BeOS/scsi_beos.cpp deleted file mode 120000 index c495dce0c..000000000 --- a/SheepShaver/src/BeOS/scsi_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/scsi_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/serial_beos.cpp b/SheepShaver/src/BeOS/serial_beos.cpp deleted file mode 120000 index 2231c6d0a..000000000 --- a/SheepShaver/src/BeOS/serial_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/serial_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/sys_beos.cpp b/SheepShaver/src/BeOS/sys_beos.cpp deleted file mode 120000 index 4e238dac8..000000000 --- a/SheepShaver/src/BeOS/sys_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/sys_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/sysdeps.h b/SheepShaver/src/BeOS/sysdeps.h deleted file mode 100644 index 6a7861a59..000000000 --- a/SheepShaver/src/BeOS/sysdeps.h +++ /dev/null @@ -1,74 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for BeOS - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -// Do we have std namespace? -#ifdef __POWERPC__ -#define NO_STD_NAMESPACE -#endif - -#include -#include -#include - -#include "user_strings_beos.h" - -// Are we using a PPC emulator or the real thing? -#ifdef __POWERPC__ -#define EMULATED_PPC 0 -#define WORDS_BIGENDIAN 1 -#define SYSTEM_CLOBBERS_R2 1 -#else -#define EMULATED_PPC 1 -#undef WORDS_BIGENDIAN -#endif - -// High precision timing -#define PRECISE_TIMING 1 -#define PRECISE_TIMING_BEOS 1 - -#define POWERPC_ROM 1 - -// Time data type for Time Manager emulation -typedef bigtime_t tm_time_t; - -// 64 bit file offsets -typedef off_t loff_t; - -// Data types -typedef uint32 uintptr; -typedef int32 intptr; - -// Timing functions -extern void Delay_usec(uint32 usec); - -// Macro for calling MacOS routines -#define CallMacOS(type, proc) (*(type)proc)() -#define CallMacOS1(type, proc, arg1) (*(type)proc)(arg1) -#define CallMacOS2(type, proc, arg1, arg2) (*(type)proc)(arg1, arg2) -#define CallMacOS3(type, proc, arg1, arg2, arg3) (*(type)proc)(arg1, arg2, arg3) -#define CallMacOS4(type, proc, arg1, arg2, arg3, arg4) (*(type)proc)(arg1, arg2, arg3, arg4) -#define CallMacOS5(type, proc, arg1, arg2, arg3, arg4, arg5) (*(type)proc)(arg1, arg2, arg3, arg4, arg5) -#define CallMacOS6(type, proc, arg1, arg2, arg3, arg4, arg5, arg6) (*(type)proc)(arg1, arg2, arg3, arg4, arg5, arg6) -#define CallMacOS7(type, proc, arg1, arg2, arg3, arg4, arg5, arg6, arg7) (*(type)proc)(arg1, arg2, arg3, arg4, arg5, arg6, arg7) - -#endif diff --git a/SheepShaver/src/BeOS/timer_beos.cpp b/SheepShaver/src/BeOS/timer_beos.cpp deleted file mode 120000 index 0d9e80149..000000000 --- a/SheepShaver/src/BeOS/timer_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/timer_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/user_strings_beos.cpp b/SheepShaver/src/BeOS/user_strings_beos.cpp deleted file mode 100644 index 0f7b13673..000000000 --- a/SheepShaver/src/BeOS/user_strings_beos.cpp +++ /dev/null @@ -1,73 +0,0 @@ -/* - * user_strings_beos.cpp - Localizable strings, BeOS specific strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under BeOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "BeOS Root"}, - {STR_EXTFS_NAME, "BeOS Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "BeOS"}, - - // Purely platform-specific strings - {STR_NO_SHEEP_DRIVER_ERR, "Cannot open /dev/sheep: %s (%08x). SheepShaver is not properly installed."}, - {STR_NO_RAM_AREA_ERR, "Not enough memory to create RAM area: %s (%08x)."}, - {STR_NO_ROM_AREA_ERR, "Not enough memory to create ROM area."}, - {STR_NO_SHEEP_MEM_AREA_ERR, "Not enough memory to create SheepShaver area."}, - {STR_SHEEP_UP_ERR, "Cannot allocate Low Memory Globals: %s (%08x)."}, - {STR_NO_NET_ADDON_WARN, "The SheepShaver net server add-on cannot be found. Ethernet will not be available."}, - {STR_NET_CONFIG_MODIFY_WARN, "To enable Ethernet networking for SheepShaver, your network configuration has to be modified and the network restarted. Do you want this to be done now (selecting \"Cancel\" will disable Ethernet under SheepShaver)?."}, - {STR_NET_ADDON_INIT_FAILED, "SheepShaver net server add-on found\nbut there seems to be no network hardware.\nPlease check your network preferences."}, - {STR_NET_ADDON_CLONE_FAILED, "Cloning of the network transfer area failed."}, - {STR_NO_SHEEP_MEM_AREA_ERR, "Cannot create SheepShaver Globals area: %s (%08x)."}, - {STR_NO_DR_CACHE_AREA_ERR, "Cannot create DR Cache area: %s (%08x)."}, - {STR_NO_DR_EMULATOR_AREA_ERR, "Cannot create DR Emulator area: %s (%08x)."}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/SheepShaver/src/BeOS/user_strings_beos.h b/SheepShaver/src/BeOS/user_strings_beos.h deleted file mode 100644 index b82481104..000000000 --- a/SheepShaver/src/BeOS/user_strings_beos.h +++ /dev/null @@ -1,37 +0,0 @@ -/* - * user_strings_beos.h - BeOS-specific localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 USER_STRINGS_BEOS_H -#define USER_STRINGS_BEOS_H - -enum { - STR_NO_SHEEP_DRIVER_ERR = 10000, - STR_NO_ROM_AREA_ERR, - STR_SHEEP_UP_ERR, - STR_NO_NET_ADDON_WARN, - STR_NET_CONFIG_MODIFY_WARN, - STR_NET_ADDON_INIT_FAILED, - STR_NET_ADDON_CLONE_FAILED, - STR_NO_SHEEP_MEM_AREA_ERR, - STR_NO_DR_CACHE_AREA_ERR, - STR_NO_DR_EMULATOR_AREA_ERR -}; - -#endif diff --git a/SheepShaver/src/BeOS/video_beos.cpp b/SheepShaver/src/BeOS/video_beos.cpp deleted file mode 100644 index aa4f24966..000000000 --- a/SheepShaver/src/BeOS/video_beos.cpp +++ /dev/null @@ -1,787 +0,0 @@ -/* - * video_beos.cpp - Video/graphics emulation, BeOS specific things - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" - -#include "video.h" -#include "video_defs.h" -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "version.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static sem_id video_lock = -1; // Protection during mode changes -static sem_id mac_os_lock = -1; // This is used to stop the MacOS thread when the SheepShaver workspace is switched out - -// Prototypes -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter); - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - - -#include "video_window.h" -#include "video_screen.h" - - -/* - * Display manager thread (for opening and closing windows and screens; - * this is not safe under R4 when running on the MacOS stack in kernel - * space) - */ - -// Message constants -const uint32 MSG_OPEN_WINDOW = 'owin'; -const uint32 MSG_CLOSE_WINDOW = 'cwin'; -const uint32 MSG_OPEN_SCREEN = 'oscr'; -const uint32 MSG_CLOSE_SCREEN = 'cscr'; -const uint32 MSG_QUIT_DISPLAY_MANAGER = 'quit'; - -static thread_id dm_thread = -1; -static sem_id dm_done_sem = -1; - -static status_t display_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Display manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_DISPLAY_MANAGER: - return 0; - - case MSG_OPEN_WINDOW: - D(bug("Opening window\n")); - the_window = new MacWindow(BRect(0, 0, VModes[cur_mode].viXsize-1, VModes[cur_mode].viYsize-1)); - D(bug("Opened\n")); - break; - - case MSG_CLOSE_WINDOW: - if (the_window != NULL) { - D(bug("Posting quit to window\n")); - the_window->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_window) - snooze(200000); - D(bug("Window closed\n")); - } - break; - - case MSG_OPEN_SCREEN: { - D(bug("Opening screen\n")); - long scr_mode = 0; - switch (VModes[cur_mode].viAppleMode) { - case APPLE_8_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_8_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_8_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_8_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_8_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_8_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_8_BIT_1600x1200; - break; - } - break; - case APPLE_16_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_15_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_15_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_15_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_15_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_15_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_15_BIT_1600x1200; - break; - } - break; - case APPLE_32_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_32_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_32_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_32_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_32_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_32_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_32_BIT_1600x1200; - break; - } - break; - } - the_screen = new MacScreen(GetString(STR_WINDOW_TITLE), scr_mode); - D(bug("Opened, error %08lx\n", screen_error)); - if (screen_error != B_NO_ERROR) { - D(bug("Error, posting quit to screen\n")); - the_screen->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_screen) - snooze(200000); - D(bug("Screen closed\n")); - break; - } - - // Wait for video mem access - D(bug("Showing screen\n")); - the_screen->Show(); - D(bug("Shown, waiting for frame buffer access\n")); - while (!drawing_enable) - snooze(200000); - D(bug("Access granted\n")); - break; - } - - case MSG_CLOSE_SCREEN: - if (the_screen != NULL) { - D(bug("Posting quit to screen\n")); - the_screen->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_screen) - snooze(200000); - D(bug("Screen closed\n")); - } - break; - } - - // Acknowledge - release_sem(dm_done_sem); - } -} - - -/* - * Open display (window or screen) - */ - -static void open_display(void) -{ - D(bug("entering open_display()\n")); - display_type = VModes[cur_mode].viType; - if (display_type == DIS_SCREEN) { - while (send_data(dm_thread, MSG_OPEN_SCREEN, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } else if (display_type == DIS_WINDOW) { - while (send_data(dm_thread, MSG_OPEN_WINDOW, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } - D(bug("exiting open_display()\n")); -} - - -/* - * Close display - */ - -static void close_display(void) -{ - D(bug("entering close_display()\n")); - if (display_type == DIS_SCREEN) { - while (send_data(dm_thread, MSG_CLOSE_SCREEN, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } else if (display_type == DIS_WINDOW) { - while (send_data(dm_thread, MSG_CLOSE_WINDOW, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } - D(bug("exiting close_display()\n")); -} - - -/* - * Initialization - */ - -static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, long apple_mode, long apple_id, int type) -{ - if (allow & test) { - p->viType = type; - switch (apple_id) { - case APPLE_W_640x480: - case APPLE_640x480: - p->viXsize = 640; - p->viYsize = 480; - break; - case APPLE_W_800x600: - case APPLE_800x600: - p->viXsize = 800; - p->viYsize = 600; - break; - case APPLE_1024x768: - p->viXsize = 1024; - p->viYsize = 768; - break; - case APPLE_1152x900: - p->viXsize = 1152; - p->viYsize = 900; - break; - case APPLE_1280x1024: - p->viXsize = 1280; - p->viYsize = 1024; - break; - case APPLE_1600x1200: - p->viXsize = 1600; - p->viYsize = 1200; - break; - } - switch (apple_mode) { - case APPLE_8_BIT: - p->viRowBytes = p->viXsize; - break; - case APPLE_16_BIT: - p->viRowBytes = p->viXsize * 2; - break; - case APPLE_32_BIT: - p->viRowBytes = p->viXsize * 4; - break; - } - p->viAppleMode = apple_mode; - p->viAppleID = apple_id; - p++; - } -} - -bool VideoInit(void) -{ - // Init variables, create semaphores - private_data = NULL; - cur_mode = 0; // Window 640x480 - video_lock = create_sem(1, "Video Lock"); - mac_os_lock = create_sem(0, "MacOS Frame Buffer Lock"); - dm_done_sem = create_sem(0, "Display Manager Done"); - - // Construct video mode table - VideoInfo *p = VModes; - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - if (window_modes == 0 && screen_modes == 0) - window_modes |= B_8_BIT_640x480 | B_8_BIT_800x600; // Allow at least 640x480 and 800x600 window modes - add_mode(p, window_modes, B_8_BIT_640x480, APPLE_8_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_8_BIT_800x600, APPLE_8_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, window_modes, B_15_BIT_640x480, APPLE_16_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_15_BIT_800x600, APPLE_16_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, window_modes, B_32_BIT_640x480, APPLE_32_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_32_BIT_800x600, APPLE_32_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, screen_modes, B_8_BIT_640x480, APPLE_8_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_800x600, APPLE_8_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1024x768, APPLE_8_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1152x900, APPLE_8_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1280x1024, APPLE_8_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1600x1200, APPLE_8_BIT, APPLE_1600x1200, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_640x480, APPLE_16_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_800x600, APPLE_16_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1024x768, APPLE_16_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1152x900, APPLE_16_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1280x1024, APPLE_16_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1600x1200, APPLE_16_BIT, APPLE_1600x1200, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_640x480, APPLE_32_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_800x600, APPLE_32_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1024x768, APPLE_32_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1152x900, APPLE_32_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1280x1024, APPLE_32_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1600x1200, APPLE_32_BIT, APPLE_1600x1200, DIS_SCREEN); - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; - - // Start display manager thread - dm_thread = spawn_thread(display_manager, "Display Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(dm_thread); - - // Open window/screen - open_display(); - if (display_type == DIS_SCREEN && the_screen == NULL) { - char str[256]; - sprintf(str, GetString(STR_FULL_SCREEN_ERR), strerror(screen_error), screen_error); - ErrorAlert(str); - return false; - } - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - if (dm_thread >= 0) { - - // Close display - acquire_sem(video_lock); - close_display(); - if (private_data != NULL) { - delete private_data->gammaTable; - delete private_data; - } - - // Stop display manager - status_t l; - send_data(dm_thread, MSG_QUIT_DISPLAY_MANAGER, NULL, 0); - while (wait_for_thread(dm_thread, &l) == B_INTERRUPTED) ; - } - - // Delete semaphores - delete_sem(video_lock); - delete_sem(mac_os_lock); - delete_sem(dm_done_sem); -} - - -/* - * Close screen in full-screen mode - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DIS_SCREEN) { - acquire_sem(video_lock); - close_display(); - release_sem(video_lock); - } -} - - -/* - * Execute video VBL routine - */ - -void VideoVBL(void) -{ - release_sem(mac_os_lock); - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); - while (acquire_sem(mac_os_lock) == B_INTERRUPTED) ; -} - - -/* - * Filter function for receiving mouse and keyboard events - */ - -#define MENU_IS_POWER 0 - -// Be -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0xff, 0x35, 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, // inv Esc F1 F2 F3 F4 F5 F6 - 0x62, 0x64, 0x65, 0x6d, 0x67, 0x6f, 0x69, 0x6b, // F7 F8 F9 F10 F11 F12 F13 F14 - 0x71, 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, // F15 ` 1 2 3 4 5 6 - 0x1a, 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x33, 0x72, // 7 8 9 0 - = BSP INS - 0x73, 0x74, 0x47, 0x4b, 0x43, 0x4e, 0x30, 0x0c, // HOM PUP NUM / * - TAB Q - 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, 0x1f, // W E R T Y U I O - 0x23, 0x21, 0x1e, 0x2a, 0x75, 0x77, 0x79, 0x59, // P [ ] \ DEL END PDN 7 - 0x5b, 0x5c, 0x45, 0x39, 0x00, 0x01, 0x02, 0x03, // 8 9 + CAP A S D F - 0x05, 0x04, 0x26, 0x28, 0x25, 0x29, 0x27, 0x24, // G H J K L ; ' RET - 0x56, 0x57, 0x58, 0x38, 0x06, 0x07, 0x08, 0x09, // 4 5 6 SHL Z X C V - 0x0b, 0x2d, 0x2e, 0x2b, 0x2f, 0x2c, 0x38, 0x3e, // B N M , . / SHR CUP - 0x53, 0x54, 0x55, 0x4c, 0x36, 0x37, 0x31, 0x37, // 1 2 3 ENT CTL ALT SPC ALT - 0x36, 0x3b, 0x3d, 0x3c, 0x52, 0x41, 0x3a, 0x3a, // CTR CLF CDN CRT 0 . CMD CMD -#if MENU_IS_POWER - 0x7f, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#else - 0x32, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static const uint8 modifier2mac[0x20] = { -#if MENU_IS_POWER - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x7f, // SHF CMD inv CAP F14 NUM OPT MNU -#else - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x32, // SHF CMD CTR CAP F14 NUM OPT MNU -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter) -{ -// msg->PrintToStream(); - switch (msg->what) { - case B_KEY_DOWN: - case B_KEY_UP: { - uint32 be_code = msg->FindInt32("key") & 0xff; - uint32 mac_code = keycode2mac[be_code]; - - // Intercept Ctrl-F1 (mount floppy disk shortcut) - uint32 mods = msg->FindInt32("modifiers"); - if (be_code == 0x02 && (mods & B_CONTROL_KEY)) - SysMountVolume("/dev/disk/floppy/raw"); - - if (mac_code == 0xff) - return B_DISPATCH_MESSAGE; - if (msg->what == B_KEY_DOWN) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - return B_SKIP_MESSAGE; - } - - case B_MODIFIERS_CHANGED: { - uint32 mods = msg->FindInt32("modifiers"); - uint32 old_mods = msg->FindInt32("be:old_modifiers"); - uint32 changed = mods ^ old_mods; - uint32 mask = 1; - for (int i=0; i<32; i++, mask<<=1) - if (changed & mask) { - uint32 mac_code = modifier2mac[i]; - if (mac_code == 0xff) - continue; - if (mods & mask) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - } - return B_SKIP_MESSAGE; - } - - case B_MOUSE_MOVED: { - BPoint point; - msg->FindPoint("where", &point); - ADBMouseMoved(int(point.x), int(point.y)); - return B_DISPATCH_MESSAGE; // Otherwise BitmapView::MouseMoved() wouldn't be called - } - - case B_MOUSE_DOWN: { - uint32 buttons = msg->FindInt32("buttons"); - if (buttons & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (buttons & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (buttons & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - return B_SKIP_MESSAGE; - } - - case B_MOUSE_UP: // B_MOUSE_UP means "all buttons released" - ADBMouseUp(0); - ADBMouseUp(1); - ADBMouseUp(2); - return B_SKIP_MESSAGE; - - default: - return B_DISPATCH_MESSAGE; - } -} - - -/* - * Install graphics acceleration - */ - -// Rectangle blitting -static void accl_bitblt(accl_params *p) -{ - D(bug("accl_bitblt\n")); - - // Get blitting parameters - int16 src_X = p->src_rect[1] - p->src_bounds[1]; - int16 src_Y = p->src_rect[0] - p->src_bounds[0]; - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 width = p->dest_rect[3] - p->dest_rect[1] - 1; - int16 height = p->dest_rect[2] - p->dest_rect[0] - 1; - D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y)); - D(bug(" width %d, height %d\n", width, height)); - - // And perform the blit - bitblt_hook(src_X, src_Y, dest_X, dest_Y, width, height); -} - -static bool accl_bitblt_hook(accl_params *p) -{ - D(bug("accl_draw_hook %p\n", p)); - - // Check if we can accelerate this bitblt - if (p->src_base_addr == screen_base && p->dest_base_addr == screen_base && - display_type == DIS_SCREEN && bitblt_hook != NULL && - ((uint32 *)p)[0x18 >> 2] + ((uint32 *)p)[0x128 >> 2] == 0 && - ((uint32 *)p)[0x130 >> 2] == 0 && - p->transfer_mode == 0 && - p->src_row_bytes > 0 && ((uint32 *)p)[0x15c >> 2] > 0) { - - // Yes, set function pointer - p->draw_proc = (uint32)accl_bitblt; - return true; - } - return false; -} - -// Rectangle filling/inversion -static void accl_fillrect8(accl_params *p) -{ - D(bug("accl_fillrect8\n")); - - // Get filling parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - uint8 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - // And perform the fill - fillrect8_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color); -} - -static void accl_fillrect32(accl_params *p) -{ - D(bug("accl_fillrect32\n")); - - // Get filling parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - uint32 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - // And perform the fill - fillrect32_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color); -} - -static void accl_invrect(accl_params *p) -{ - D(bug("accl_invrect\n")); - - // Get inversion parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - //!!?? pen_mode == 14 - - // And perform the inversion - invrect_hook(dest_X, dest_Y, dest_X_max, dest_Y_max); -} - -static bool accl_fillrect_hook(accl_params *p) -{ - D(bug("accl_fillrect_hook %p\n", p)); - - // Check if we can accelerate this fillrect - if (p->dest_base_addr == screen_base && ((uint32 *)p)[0x284 >> 2] != 0 && display_type == DIS_SCREEN) { - if (p->transfer_mode == 8) { - // Fill - if (p->dest_pixel_size == 8 && fillrect8_hook != NULL) { - p->draw_proc = (uint32)accl_fillrect8; - return true; - } else if (p->dest_pixel_size == 32 && fillrect32_hook != NULL) { - p->draw_proc = (uint32)accl_fillrect32; - return true; - } - } else if (p->transfer_mode == 10 && invrect_hook != NULL) { - // Invert - p->draw_proc = (uint32)accl_invrect; - return true; - } - } - return false; -} - -// Dummy for testing -/* -static void do_nothing(accl_params *p) {} -static bool accl_foobar_hook(accl_params *p) -{ - printf("accl_foobar_hook %p\n", p); - printf(" src_base_addr %p, dest_base_addr %p\n", p->src_base_addr, p->dest_base_addr); - printf(" src_row_bytes %d, dest_row_bytes %d\n", p->src_row_bytes, p->dest_row_bytes); - printf(" src_pixel_size %d, dest_pixel_size %d\n", p->src_pixel_size, p->dest_pixel_size); - printf(" src_bounds (%d,%d,%d,%d), dest_bounds (%d,%d,%d,%d)\n", p->src_bounds[0], p->src_bounds[1], p->src_bounds[2], p->src_bounds[3], p->dest_bounds[0], p->dest_bounds[1], p->dest_bounds[2], p->dest_bounds[3]); - printf(" src_rect (%d,%d,%d,%d), dest_rect (%d,%d,%d,%d)\n", p->src_rect[0], p->src_rect[1], p->src_rect[2], p->src_rect[3], p->dest_rect[0], p->dest_rect[1], p->dest_rect[2], p->dest_rect[3]); - printf(" transfer mode %d\n", p->transfer_mode); - printf(" pen mode %d\n", p->pen_mode); - printf(" fore_pen %08x, back_pen %08x\n", p->fore_pen, p->back_pen); - printf(" val1 %08x, val2 %08x\n", ((uint32 *)p)[0x18 >> 2], ((uint32 *)p)[0x128 >> 2]); - printf(" val3 %08x\n", ((uint32 *)p)[0x130 >> 2]); - printf(" val4 %08x\n", ((uint32 *)p)[0x15c >> 2]); - printf(" val5 %08x\n", ((uint32 *)p)[0x160 >> 2]); - printf(" val6 %08x\n", ((uint32 *)p)[0x1b4 >> 2]); - printf(" val7 %08x\n", ((uint32 *)p)[0x284 >> 2]); - p->draw_proc = (uint32)do_nothing; - return true; -} -static struct accl_hook_info foobar_hook_info = {(uint32)accl_foobar_hook, (uint32)accl_sync_hook, 6}; -*/ - -// Wait for graphics operation to finish -static bool accl_sync_hook(void *arg) -{ - D(bug("accl_sync_hook %p\n", arg)); - if (sync_hook != NULL) - sync_hook(); - return true; -} - -static struct accl_hook_info bitblt_hook_info = {(uint32)accl_bitblt_hook, (uint32)accl_sync_hook, ACCL_BITBLT}; -static struct accl_hook_info fillrect_hook_info = {(uint32)accl_fillrect_hook, (uint32)accl_sync_hook, ACCL_FILLRECT}; - -void VideoInstallAccel(void) -{ - // Install acceleration hooks - if (PrefsFindBool("gfxaccel")) { - D(bug("Video: Installing acceleration hooks\n")); - NQDMisc(6, (uintptr)&bitblt_hook_info); - NQDMisc(6, (uintptr)&fillrect_hook_info); - } -} - - -/* - * Change video mode - */ - -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - while (acquire_sem(video_lock) == B_INTERRUPTED) ; - DisableInterrupt(); - - /* close old display */ - close_display(); - - /* open new display */ - cur_mode = i; - open_display(); - - /* opening the screen failed? Then bail out */ - if (display_type == DIS_SCREEN && the_screen == NULL) { - release_sem(video_lock); - ErrorAlert(GetString(STR_FULL_SCREEN_ERR)); - QuitEmulator(); - } - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - EnableInterrupt(); - release_sem(video_lock); - return noErr; - } - } - return paramErr; -} - - -/* - * Set color palette - */ - -void video_set_palette(void) -{ - if (display_type == DIS_SCREEN && the_screen != NULL) - the_screen->palette_changed = true; - else { // remap colors to BeOS-Palette - BScreen screen; - for (int i=0;i<256;i++) - remap_mac_be[i]=screen.IndexForColor(mac_pal[i].red,mac_pal[i].green,mac_pal[i].blue); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -bool video_can_change_cursor(void) -{ - return (display_type != DIS_SCREEN); -} - - -/* - * Set cursor image for window - */ - -void video_set_cursor(void) -{ - the_window->cursor_changed = true; // Inform window (don't set cursor directly because this may run at interrupt (i.e. signal handler) time) -} - - -/* - * Record dirty area from NQD - */ - -void video_set_dirty_area(int x, int y, int w, int h) -{ -} diff --git a/SheepShaver/src/BeOS/video_screen.h b/SheepShaver/src/BeOS/video_screen.h deleted file mode 100644 index a3b5f2683..000000000 --- a/SheepShaver/src/BeOS/video_screen.h +++ /dev/null @@ -1,262 +0,0 @@ -/* - * video_screen.h - Full screen video modes - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - */ - - -static bool drawing_enable = false; // This flag indicated if the access to the screen is allowed -static int page_num; // Index of the currently displayed buffer - - -// Blitter functions -typedef void (*bitblt_ptr)(int32, int32, int32, int32, int32, int32); -static bitblt_ptr bitblt_hook; -typedef void (*fillrect8_ptr)(int32, int32, int32, int32, uint8); -static fillrect8_ptr fillrect8_hook; -typedef void (*fillrect32_ptr)(int32, int32, int32, int32, uint32); -static fillrect32_ptr fillrect32_hook; -typedef void (*invrect_ptr)(int32, int32, int32, int32); -static invrect_ptr invrect_hook; -typedef void (*sync_ptr)(void); -static sync_ptr sync_hook; - - -class MacScreen : public BWindowScreen { -public: - MacScreen(const char *name, uint32 space); - virtual ~MacScreen(); - virtual void Quit(void); - virtual void ScreenConnected(bool active); - - bool palette_changed; - -private: - static status_t tick_func(void *arg); - - BView *view; // Main view for GetMouse() - - uint8 *frame_backup; // Frame buffer backup when switching from/to different workspace - bool quitting; // Flag for ScreenConnected: We are quitting, don't pause emulator thread - bool first; // Flag for ScreenConnected: This is the first time we become active - - thread_id tick_thread; - bool tick_thread_active; -}; - - -// Pointer to our screen -static MacScreen *the_screen = NULL; - -// Error code from BWindowScreen constructor -static status_t screen_error; - -// to enable debugger mode. -#define SCREEN_DEBUG false - - -/* - * Screen constructor - */ - -MacScreen::MacScreen(const char *name, uint32 space) : BWindowScreen(name, space, &screen_error, SCREEN_DEBUG), tick_thread(-1) -{ - D(bug("Screen constructor\n")); - - // Set all variables - frame_backup = NULL; - palette_changed = false; - quitting = false; - first = true; - drawing_enable = false; - ADBSetRelMouseMode(true); - - // Create view to poll the mouse - view = new BView (BRect(0,0,VModes[cur_mode].viXsize-1,VModes[cur_mode].viYsize-1),NULL,B_FOLLOW_NONE,0); - AddChild(view); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Polling sucks...", B_DISPLAY_PRIORITY, this); - RegisterThread(tick_thread); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - AddCommonFilter(filter); - D(bug("Screen constructor done\n")); -} - - -/* - * Screen destructor - */ - -MacScreen::~MacScreen() -{ - D(bug("Screen destructor, quitting tick thread\n")); - - // Stop 60Hz interrupt - if (tick_thread > 0) { - status_t l; - tick_thread_active = false; - while (wait_for_thread(tick_thread, &l) == B_INTERRUPTED) ; - } - D(bug("tick thread quit\n")); - - // Tell the emulator that we're done - the_screen = NULL; - D(bug("Screen destructor done\n")); -} - - -/* - * Screen closed - */ - -void MacScreen::Quit(void) -{ - // Tell ScreenConnected() that we are quitting - quitting = true; - D(bug("MacScreen::Quit(), disconnecting\n")); - Disconnect(); - D(bug("disconnected\n")); - BWindowScreen::Quit(); -} - - -/* - * Screen connected/disconnected - */ - -void MacScreen::ScreenConnected(bool active) -{ - D(bug("ScreenConnected(%d)\n", active)); - graphics_card_info *info = CardInfo(); - D(bug(" card_info %p\n", info)); - - if (active) { - - // Read graphics parameters - D(bug(" active\n")); - screen_base = (uint32)info->frame_buffer; - D(bug(" screen_base %p\n", screen_base)); - VModes[cur_mode].viRowBytes = info->bytes_per_row; - D(bug(" xmod %d\n", info->bytes_per_row)); - - // Get acceleration functions - if (PrefsFindBool("gfxaccel")) { - bitblt_hook = (bitblt_ptr)CardHookAt(7); - D(bug(" bitblt_hook %p\n", bitblt_hook)); - fillrect8_hook = (fillrect8_ptr)CardHookAt(5); - D(bug(" fillrect8_hook %p\n", fillrect8_hook)); - fillrect32_hook = (fillrect32_ptr)CardHookAt(6); - D(bug(" fillrect32_hook %p\n", fillrect32_hook)); - invrect_hook = (invrect_ptr)CardHookAt(11); - D(bug(" invrect_hook %p\n", invrect_hook)); - sync_hook = (sync_ptr)CardHookAt(10); - D(bug(" sync_hook %p\n", sync_hook)); - } else { - bitblt_hook = NULL; - fillrect8_hook = NULL; - fillrect32_hook = NULL; - invrect_hook = NULL; - sync_hook = NULL; - } - - // The first time we got the screen, we need to init the Window - if (first) { - D(bug(" first time\n")); - first = false; - page_num = 0; // current display : page 0 - } else { // we get our screen back - D(bug(" not first time\n")); - // copy from backup bitmap to framebuffer - memcpy((void *)screen_base, frame_backup, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - // delete backup bitmap - delete[] frame_backup; - frame_backup = NULL; - // restore palette - if (info->bits_per_pixel == 8) - SetColorList(mac_pal); - // restart emul thread - release_sem(mac_os_lock); - } - - // allow the drawing in the frame buffer - D(bug(" enabling frame buffer access\n")); - drawing_enable = true; - video_activated = true; - - } else { - - drawing_enable = false; // stop drawing. - video_activated = false; - if (!quitting) { - // stop emul thread - acquire_sem(mac_os_lock); - // create bitmap and store frame buffer into - frame_backup = new uint8[VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize]; - memcpy(frame_backup, (void *)screen_base, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - } - } - D(bug("ScreenConnected() done\n")); -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacScreen::tick_func(void *arg) -{ - MacScreen *obj = (MacScreen *)arg; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Workspace activated? Then poll the mouse and change the palette if needed - if (video_activated) { - BPoint pt; - uint32 button = 0; - if (obj->LockWithTimeout(200000) == B_OK) { - if (obj->palette_changed) { - obj->palette_changed = false; - obj->SetColorList(mac_pal); - } - obj->view->GetMouse(&pt, &button); - obj->Unlock(); - set_mouse_position(320, 240); - ADBMouseMoved(int(pt.x) - 320, int(pt.y) - 240); - if (button & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (!(button & B_PRIMARY_MOUSE_BUTTON)) - ADBMouseUp(0); - if (button & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (!(button & B_SECONDARY_MOUSE_BUTTON)) - ADBMouseUp(1); - if (button & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - if (!(button & B_TERTIARY_MOUSE_BUTTON)) - ADBMouseUp(2); - } - } - } - return 0; -} diff --git a/SheepShaver/src/BeOS/video_window.h b/SheepShaver/src/BeOS/video_window.h deleted file mode 100644 index 60c4e1bf6..000000000 --- a/SheepShaver/src/BeOS/video_window.h +++ /dev/null @@ -1,523 +0,0 @@ -/* - * video_window.h - Window video modes - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - - -// Messages -static const uint32 MSG_REDRAW = 'draw'; -static const uint32 MSG_ABOUT_REQUESTED = B_ABOUT_REQUESTED; -static const uint32 MSG_REF_5HZ = ' 5Hz'; -static const uint32 MSG_REF_7_5HZ = ' 7Hz'; -static const uint32 MSG_REF_10HZ = '10Hz'; -static const uint32 MSG_REF_15HZ = '15Hz'; -static const uint32 MSG_REF_30HZ = '30Hz'; -static const uint32 MSG_REF_60HZ = '60Hz'; -static const uint32 MSG_MOUNT = 'moun'; - -static bool mouse_in_view; // Flag: Mouse pointer within bitmap view - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - - -/* - * A simple view class for blitting a bitmap on the screen - */ - -class BitmapView : public BView { -public: - BitmapView(BRect frame, BBitmap *bitmap) : BView(frame, "bitmap", B_FOLLOW_NONE, B_WILL_DRAW) - { - the_bitmap = bitmap; - } - virtual void Draw(BRect update) - { - if (the_bitmap) - DrawBitmap(the_bitmap, update, update); - } - virtual void MouseMoved(BPoint point, uint32 transit, const BMessage *message); - -private: - BBitmap *the_bitmap; -}; - - -/* - * Window class - */ - -class MacWindow : public BDirectWindow { -public: - MacWindow(BRect frame); - virtual ~MacWindow(); - virtual void MessageReceived(BMessage *msg); - virtual void DirectConnected(direct_buffer_info *info); - virtual void WindowActivated(bool active); - - int32 frame_skip; - bool cursor_changed; // Flag: set new cursor image in tick function - -private: - static status_t tick_func(void *arg); - - BitmapView *main_view; - BBitmap *the_bitmap; - uint8 *the_buffer; - - uint32 old_scroll_lock_state; - - thread_id tick_thread; - bool tick_thread_active; - - bool supports_direct_mode; - bool bit_bang; - sem_id drawing_sem; - - color_space mode; - void *bits; - int32 bytes_per_row; - color_space pixel_format; - bool unclipped; -}; - - -// Pointer to our window -static MacWindow *the_window = NULL; - - -/* - * Window constructor - */ - -MacWindow::MacWindow(BRect frame) : BDirectWindow(frame, GetString(STR_WINDOW_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_CLOSABLE | B_NOT_ZOOMABLE) -{ - D(bug("Window constructor\n")); - supports_direct_mode = SupportsWindowMode(); - cursor_changed = false; - bit_bang = supports_direct_mode && PrefsFindBool("bitbang"); - - // Move window to right position - Lock(); - MoveTo(80, 60); - - // Allocate bitmap - { - BScreen scr(this); - mode = B_COLOR_8_BIT; - switch (VModes[cur_mode].viAppleMode) { - case APPLE_8_BIT: - mode = B_COLOR_8_BIT; - bit_bang = false; - break; - case APPLE_16_BIT: - mode = B_RGB_16_BIT; - if (scr.ColorSpace() != B_RGB15_BIG && scr.ColorSpace() != B_RGBA15_BIG) - bit_bang = false; - break; - case APPLE_32_BIT: - mode = B_RGB_32_BIT; - if (scr.ColorSpace() != B_RGB32_BIG && scr.ColorSpace() != B_RGBA32_BIG) - bit_bang = false; - break; - } - } - if (bit_bang) { - the_bitmap = NULL; - the_buffer = NULL; - } else { - the_bitmap = new BBitmap(frame, mode); - the_buffer = new uint8[VModes[cur_mode].viRowBytes * (VModes[cur_mode].viYsize + 2)]; // ("height + 2" for safety) - screen_base = (uint32)the_buffer; - } - - // Create bitmap view - main_view = new BitmapView(frame, the_bitmap); - AddChild(main_view); - main_view->MakeFocus(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - - // Set up menus - BRect bounds = Bounds(); - bounds.OffsetBy(0, bounds.IntegerHeight() + 1); - BMenuItem *item; - BMenuBar *bar = new BMenuBar(bounds, "menu"); - BMenu *menu = new BMenu(GetString(STR_WINDOW_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_WINDOW_ITEM_ABOUT), new BMessage(MSG_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - BMenu *submenu = new BMenu(GetString(STR_WINDOW_ITEM_REFRESH)); - submenu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_60HZ_LAB), new BMessage(MSG_REF_60HZ))); - submenu->SetRadioMode(true); - if (frame_skip == 12) { - if ((item = submenu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 8) { - if ((item = submenu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 6) { - if ((item = submenu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 4) { - if ((item = submenu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 2) { - if ((item = submenu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 1) { - if ((item = submenu->FindItem(GetString(STR_REF_60HZ_LAB))) != NULL) - item->SetMarked(true); - } - menu->AddItem(submenu); - submenu = new BMenu(GetString(STR_WINDOW_ITEM_MOUNT)); - SysCreateVolumeMenu(submenu, MSG_MOUNT); - menu->AddItem(submenu); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Frame().IntegerHeight() + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Set mouse mode and scroll lock state - ADBSetRelMouseMode(false); - mouse_in_view = true; - old_scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (old_scroll_lock_state) - SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - SetTitle(GetString(STR_WINDOW_TITLE)); - - // Clear Mac cursor image - memset(MacCursor + 4, 0, 64); - - // Keep window aligned to 8-byte frame buffer boundaries for faster blitting - SetWindowAlignment(B_BYTE_ALIGNMENT, 8); - - // Create drawing semaphore (for direct mode) - drawing_sem = create_sem(0, "direct frame buffer access"); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Window Redraw", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - main_view->AddFilter(filter); - - // Show window - Unlock(); - Show(); - Sync(); - D(bug("Window constructor done\n")); -} - - -/* - * Window destructor - */ - -MacWindow::~MacWindow() -{ - // Restore cursor - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - - // Hide window - D(bug("Window destructor, hiding window\n")); - Hide(); - Sync(); - - // Stop 60Hz interrupt - D(bug("Quitting tick thread\n")); - status_t l; - tick_thread_active = false; - delete_sem(drawing_sem); - while (wait_for_thread(tick_thread, &l) == B_INTERRUPTED) ; - D(bug("tick thread quit\n")); - - // dispose allocated memory - delete the_bitmap; - delete[] the_buffer; - - // Tell emulator that we're done - the_window = NULL; - D(bug("Window destructor done\n")); -} - - -/* - * Window connected/disconnected - */ - -void MacWindow::DirectConnected(direct_buffer_info *info) -{ - D(bug("DirectConnected, state %d\n", info->buffer_state)); - switch (info->buffer_state & B_DIRECT_MODE_MASK) { - case B_DIRECT_STOP: - acquire_sem(drawing_sem); - break; - case B_DIRECT_MODIFY: - acquire_sem(drawing_sem); - case B_DIRECT_START: - bits = (void *)((uint8 *)info->bits + info->window_bounds.top * info->bytes_per_row + info->window_bounds.left * info->bits_per_pixel / 8); - bytes_per_row = info->bytes_per_row; - pixel_format = info->pixel_format; - unclipped = false; - if (info->clip_list_count == 1) - if (memcmp(&info->clip_bounds, &info->window_bounds, sizeof(clipping_rect)) == 0) - unclipped = true; - if (bit_bang) { - screen_base = (uint32)bits; - VModes[cur_mode].viRowBytes = bytes_per_row; - } - release_sem(drawing_sem); - break; - } - D(bug("DirectConnected done\n")); -} - - -/* - * Handles redraw messages - */ - -void MacWindow::MessageReceived(BMessage *msg) -{ - BMessage *msg2; - - switch (msg->what) { - case MSG_REDRAW: { - - // Prevent backlog of messages - MessageQueue()->Lock(); - while ((msg2 = MessageQueue()->FindMessage(MSG_REDRAW, 0)) != NULL) { - MessageQueue()->RemoveMessage(msg2); - delete msg2; - } - MessageQueue()->Unlock(); - - // Convert Mac screen buffer to BeOS palette and blit - uint32 length = VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize; - if (mode == B_COLOR_8_BIT) { - // Palette conversion - uint8 *source = the_buffer - 1; - uint8 *dest = (uint8 *)the_bitmap->Bits() - 1; - for (int i=0; iBits() - 1; - for (int i=0; iBits() - 1; - for (int i=0; iDrawBitmapAsync(the_bitmap, update_rect, update_rect); - break; - } - - case MSG_ABOUT_REQUESTED: - OpenAboutWindow(); - break; - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", frame_skip = 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", frame_skip = 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", frame_skip = 2); - break; - - case MSG_REF_60HZ: - PrefsReplaceInt32("frameskip", frame_skip = 1); - break; - - case MSG_MOUNT: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - SysMountVolume(source->Label()); - break; - } - - default: - BDirectWindow::MessageReceived(msg); - } -} - - -/* - * Window activated/deactivated - */ - -void MacWindow::WindowActivated(bool active) -{ - video_activated = active; - if (active) - frame_skip = PrefsFindInt32("frameskip"); - else - frame_skip = 12; // 5Hz in background - BDirectWindow::WindowActivated(active); -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacWindow::tick_func(void *arg) -{ - MacWindow *obj = (MacWindow *)arg; - static int tick_counter = 0; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Refresh window - if (!obj->bit_bang) - tick_counter++; - if (tick_counter >= obj->frame_skip) { - tick_counter = 0; - - // Window title is determined by Scroll Lock state - uint32 scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (scroll_lock_state != obj->old_scroll_lock_state) { - if (scroll_lock_state) - obj->SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - obj->SetTitle(GetString(STR_WINDOW_TITLE)); - obj->old_scroll_lock_state = scroll_lock_state; - } - - // Refresh display unless Scroll Lock is down - if (!scroll_lock_state) { - - // If direct frame buffer access is supported and the content area is completely visible, - // convert the Mac screen buffer directly. Otherwise, send a message to the window to do - // it into a bitmap - if (obj->supports_direct_mode) { - if (acquire_sem_etc(obj->drawing_sem, 1, B_TIMEOUT, 200000) == B_NO_ERROR) { - if (obj->unclipped && obj->mode == B_COLOR_8_BIT && obj->pixel_format == B_CMAP8) { - uint8 *source = obj->the_buffer - 1; - uint8 *dest = (uint8 *)obj->bits; - uint32 bytes_per_row = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yunclipped && obj->mode == B_RGB_16_BIT && (obj->pixel_format == B_RGB15_BIG || obj->pixel_format == B_RGBA15_BIG)) { - uint8 *source = obj->the_buffer; - uint8 *dest = (uint8 *)obj->bits; - uint32 sbpr = VModes[cur_mode].viRowBytes; - uint32 dbpr = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yunclipped && obj->mode == B_RGB_32_BIT && (obj->pixel_format == B_RGB32_BIG || obj->pixel_format == B_RGBA32_BIG)) { - uint8 *source = obj->the_buffer; - uint8 *dest = (uint8 *)obj->bits; - uint32 sbpr = VModes[cur_mode].viRowBytes; - uint32 dbpr = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yPostMessage(MSG_REDRAW); - release_sem(obj->drawing_sem); - } - } else - obj->PostMessage(MSG_REDRAW); - } - } - - // Set new cursor image if desired - if (obj->cursor_changed) { - if (mouse_in_view) - be_app->SetCursor(MacCursor); - obj->cursor_changed = false; - } - } - return 0; -} - - -/* - * Mouse moved - */ - -void BitmapView::MouseMoved(BPoint point, uint32 transit, const BMessage *message) -{ - switch (transit) { - case B_ENTERED_VIEW: - mouse_in_view = true; - be_app->SetCursor(MacCursor); - break; - case B_EXITED_VIEW: - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - break; - } -} diff --git a/SheepShaver/src/BeOS/xpram_beos.cpp b/SheepShaver/src/BeOS/xpram_beos.cpp deleted file mode 120000 index e5d7f9658..000000000 --- a/SheepShaver/src/BeOS/xpram_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/xpram_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp deleted file mode 120000 index a41f4a068..000000000 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/sigsegv.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/sigsegv.h b/SheepShaver/src/CrossPlatform/sigsegv.h deleted file mode 120000 index 213fb61d8..000000000 --- a/SheepShaver/src/CrossPlatform/sigsegv.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/sigsegv.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_blit.cpp b/SheepShaver/src/CrossPlatform/video_blit.cpp deleted file mode 120000 index 15297235c..000000000 --- a/SheepShaver/src/CrossPlatform/video_blit.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_blit.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_blit.h b/SheepShaver/src/CrossPlatform/video_blit.h deleted file mode 120000 index 7fe63598f..000000000 --- a/SheepShaver/src/CrossPlatform/video_blit.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_blit.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h deleted file mode 120000 index 4c552311a..000000000 --- a/SheepShaver/src/CrossPlatform/video_vosf.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_vosf.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.cpp b/SheepShaver/src/CrossPlatform/vm_alloc.cpp deleted file mode 120000 index cc80e1bc2..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.h b/SheepShaver/src/CrossPlatform/vm_alloc.h deleted file mode 120000 index ef65a5618..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.h \ No newline at end of file diff --git a/SheepShaver/src/EthernetDriver/.finf/Ethernet.mcp b/SheepShaver/src/EthernetDriver/.finf/Ethernet.mcp deleted file mode 100644 index 07b9b6a81ae87b1e58a60cacb95bb48fc00bd657..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 XcmebE4JdLB_jF}sU}#_j66gQ`Qp5uY diff --git a/SheepShaver/src/EthernetDriver/.finf/ethernet.ndrv b/SheepShaver/src/EthernetDriver/.finf/ethernet.ndrv deleted file mode 100644 index f58fce9b794bfb4a4fe810ef7c7136631e5979df..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 WcmXTU$VsvX0!9WP023ev0ssI_8v>{R diff --git a/SheepShaver/src/EthernetDriver/.rsrc/ethernet.ndrv b/SheepShaver/src/EthernetDriver/.rsrc/ethernet.ndrv deleted file mode 100644 index 63653eda90f5d8e837d4382137fe949f517a6ea2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 398 zcmZQzU}RumV2lA0AZ!H0BMn3#c^DKJ=zy`HydW7}5Xi?=Yr&gZl95`Jms+Bimr_&) lQGy6txx~E(7>a;8WkBJaoK}<$WOFev{QnO!T`p<94gfd$5i0-y diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/CWSettingsMacOS.stg b/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/CWSettingsMacOS.stg deleted file mode 100644 index 2c25cdbdb1112cee1ca86ec8cff8942b51e4be7c..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 RcmWG>aSU+|_jF~z0RTd#0#*P3 diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Debug MacOS Toolbox b/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Debug MacOS Toolbox deleted file mode 100644 index 4e4e4935707a596987ec1cc32e3d0d587dbe4f04..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 KcmZQzzz+ZbAOHaX diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Final MacOS Toolbox b/SheepShaver/src/EthernetDriver/Ethernet Data/.finf/PPC Final MacOS Toolbox deleted file mode 100644 index 4e4e4935707a596987ec1cc32e3d0d587dbe4f04..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 KcmZQzzz+ZbAOHaX diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/CWSettingsMacOS.stg b/SheepShaver/src/EthernetDriver/Ethernet Data/CWSettingsMacOS.stg deleted file mode 100644 index 7848ef0bfd9293284e5d924000b90d76e0b1cf39..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4344 zcmeHK&o9J46n^d2mJlR}#Hlyp;OruiEH+}X*C5i#Xz#nBG-4J_`pDuG8fyVwB%NX8< zv`f$}(q4kjN?WO)F_7}jobo&{=PB1ei}<}>JbxCRb@|&Ywa)AiH6Pv3YpjnrX|!}L zaBec^Oun>Gl=oAV@YIt6s^MI7ol7 zn6oCtN>sIyQ@MgOe8t<2hG3G7UQUmvlJ2V$P#HJ8M>zkw}l eKoc>Iy~O`E4_wyX9ZhsyX1wj<(g%)ui|7Rrv4Twi diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.finf/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.finf/TargetDataMacOS.tdt deleted file mode 100644 index 2c25cdbdb1112cee1ca86ec8cff8942b51e4be7c..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 RcmWG>aSU+|_jF~z0RTd#0#*P3 diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.rsrc/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/.rsrc/TargetDataMacOS.tdt deleted file mode 100644 index 7c9986b9e0bcfb616df3c616ba39e2f18aa1a8a6..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 286 ecmZQzU}RtbV<5%AAO|K#6oJG4G7NJ6{{sLh?E-lK diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Debug MacOS Toolbox/TargetDataMacOS.tdt deleted file mode 100644 index 48fe5d703923e17c899a20b29a62202c67d6bb8b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 46180 zcmeHQeQ;dWb-!3JR2|uge=>HDlRQ+O9BiMS}Zvd7_e5mPtuyz?y~!2 z3x~!FIN%T`5!9J6#K4A_)PMtO>rR+917e!AX`9Zd?M$08OweR9V5Y$MkNnX;Jh;De z@7dkAlJ>pz?z1AKJ<@yU-gD1A=iYPAd-vnreJ>P`M}-hxA+&WuykQFQ=20PhzXWZQ z=Fxx@v<5?M?RrNr*=Lw~Q_u`%6XpmG1RC`wqi3*BXG_3tJ@KKaVOT!U@~TFW92ff1}+{r zLClC2)!jB|CI(IYwrJ3%Vad%J<6+}=BUV(9g@-)0|Hd|3)}}}*m`WJ~J$8m6nYTyd zJ;A8nmVk>!&_K3QTOzTC99U2`9XFOP{aknh$@p$Kg{|&D^KJI&&N8;71{|6T1xXl5 z^AVIjRlGRcjeX8u*BOazr)G6<&Y^~z9ot^=wB1&`{=`sHixXq>P{=@Q;{tRr1~HfH z9>na>qWBeo`g|m;tKLDP`;dg=ObNEBx1uCp9 z1767CO~8vd+zGsx!v}yb;P46HB^>@w;H4b?9GGMQJXE&jGAKN4z%?Ak*iNkA@Dbn( zIs6a67jgI#;FT)u{UhLuIeZK7mpI%Hyo$r$2fl>Ee+x``0N($>=~5XKUMky{RoHhm z@MRp{27Eb(6Tnw+_%QI59447MhkpaST7~D4J=Soz0r)Bo?*t|tRdC+|&^5t+BCjX%6Y>x8 z3-SjY2em)7JGVDN(*!M%9(~(DBAzsL41>hhU^E(!$MidlXhO7h>O5vd3L*g`85QXC zY5ajPgy?ESXKc-lv57U>Z1x+;m|@n161WZwipk(WFceSi8Z;wO8Qm5$jbv{yWS}f! z{f<~)*(QLTY?UE|B= z?{~cS!9*KOj+5PdWH))OOl7ypd8(AE1*#UPTA*ryss*YRs9KgkL0+GTe`&-V81jdnWRNb81>Y4w$UbHLtPDytPO1IqgBhQrv1f=`l5 z*>E@~Nj(F$Zs07W1di#t#*(R|!yTi9!aA^Yb9!AUiXYY#XLh4~NP6AANTRqFjN>cx z1M)XD7r43MuHrYS%eMpqEq3K_Bdr@kwj>;G#x5u#J*}-RTb)E%_6EZ^PTW(cw+32n zn>r;=bwy8SV^dz@`3ZGHY}?j5btmbqfzIqU=(6n=Xo>eY>8Uim8v>@akLu~SEpox; z^C>u;(kV+ReIf1{YF~TVt&`Pr!wpjuGe>eykNs`kJw3L!TDsS|WH;A^ph4l za7w4VvVBrUpPd{x(!%kO{RGJcCEbuQU1P~qf7G#`v;3^6>^nB?&vr768+u4b9U93= zS0(8I&RiF_m*U1agf!IQ8M~wL?2BTX+RdqT=h^8iu5@?Z!dBMO<|}Bq;s6Nm#v4?&Xjq(8~!HiGmGZ! zc#Yhqjk@LSY7_hf(N(tsCX)*(Z9TiQ&t@R3Fs;;>8mriI=kDo6w3I$pvFkZ3W1@=n zlsG1;SdZ;cCBIf)xgJ|ZuC-6tIPV(>q`%p&{8#P=xiOLLNX1P(B|ZZx(+_g>!JAX< zuhhy@vtv9vNtOCr8p5-B?CuEe>6xyvq~m=@zCpB@ZA%&BNxLQS9%CCIB}R(7hAH?; z(GzLewsnfE1tiN}ha#R`z&>Rpf=vihCRm7W^m8Px&S8s{8}*TTrt6tW6fc>x0oUr| z@NCAl_KEkpJfyj_Cq3xm_NFUG!W&yV%##sa61FHE--zLe`n*5@47jVse* zU!mOCtK$0DPF-BITZv=vit95pWNFq(LD%dy1J|d^@weRErPR4tneCI;bAJ6Gujl;w zK~7IJG(B^2o3&?ha@YKNz+RDSdhncL(#2^ZRH`QpS?4r|Ez_^9dh9IcW_|3M$UQw# z+YYGUs~!1IZsc09AU#Jd45;>r+HPPgkW+~sho|IDduN=|sb;c1dmnQ8U0gq>2cTtN1L?u4)wt`D%V6P zbrbir?K4fJZ2P(Pej{pIp@|io5KnV_I`*@Ysyh4Xh)U}ttFs7i)WLrhsurkPV9r^< zgLkXVFX8z?*B9|;j$Zx?F7nNHpb1IJu`>v#Y9PZFg<;kr%m$+7snoqgwFfXUX zwfG|T$;okH-;=aYscXVT%9BQgvvTtLmag=JTmVjXPJ>&?scc_TPL9K?a!?-IeMeMy zS)K~_6_Fgb_6@nYFUV=_uhe}qmF}qykbwYo4r^*9m&akvtknH7b#Cmtp`jAqLnwAW zyg=-K_n53GQ7Hb6hE}n>+_&zqB!%dEadx2e?QO`KTJkPT+hxh8(L34mF$#HKS8>KW z<8({1g3_0;kkBvgmr^F3SE%8nSYnx9Ont{zwzLREP;<^!m|?cXmRc+1l@anc3#`9h zPZ_2eiS?!Qi2M$$5!QQ?@c}&^4eM*<77V>580#Ah_8DvRL@;JV_3PI!U3yidS6{tr zS6qHVeO)4Hgw!YAuR}^K6dep3`WkDatHV$7173)j>LKmKZ9*&!NBOGN@-8TCW2UxyZLByYRg5!mimn$JSXfam98T-0c$ zX401;p#^PRdvKi)KNG(OJ)>o;bQ}JY;{Ckj4PEsDK5`~csjY|hC|Xl_z#Z&KhoIj= zf!-rxG@olj7Ya2jj!&RO3;hN>lCnAHktpX8VX3?Hn@4lnr5__#7+z}e$Oa+0LAgvE z#2=E;_VR1z-1e6W0JZ%(p{;~nRL&7q6RlRuUK684=@QZt>p?#*)@g5PZ;5*Cly*w^ zwKJY>(cnpV5@V#m zUnI0ka%3qolOj#NhrzrPfxhiZ-;YJ@sEz5+E)!ba#+!bNSQflH&pvP<8v*uqesFJ( zHQxSC&xXDa_Mc6ySgBKb+e`b;H1}P+e(%{BoLG3(@?$pp|i$^l-~Z%*N^T$yZ`Lo8g}0Gw3)G#&O3I2X74O=WGK2DzEVFMaRZ|f@GR{;$t8r%V4^${F zkWXlfn}>|hpc(9mmbV=v*YnZcK?1q5JCN;1mgmb@-s9VRkK|6lzJOAy-{1KHHkyk? z_SCI+QQ8+zl(yxIS7tX$yh=U|lRJWX;zN2<^VS`=(~pPT)KQf+gDrr;dKIRy07ltQ8U?`~s$&mP9edcjNHw)W3uttODj81Ka)p|z*{c?q*%t7kc(gOH zBzWc%bJ;T|&1J)H;W&jXb(w$u{CAmW|2vR*_U}$-R($-k%!*Im@_5INd%XXe&aC*~ zS{#oed<3)%__0vQuycPpu{RN_M>MnIY^}MJLKJQo7TSZ)iF*>`V(~{O#XS#SfN;I# z85I^tmYxPHVJd@H?8L&R5MKwW2bci$`O`6>tva4PeDi#MnUXzeJJNU#fmPCrPU3i9 zlAnPrg4_~J>QKX|=bD57u2=Yv(+c0r^qad?{41P(6Q^(D^i4G?eIxU2V0!(CqSuWn zd?V+(A&WWRb@eL!+HuBAzlP;p)2--NalSRDReViA;nmEyn)B(*eM+ANH&C1m{a|JkIer$73UkFQzLz!1)J+iboR)KQzXe^X+E7 z-OLy1R_PIr_h(eR->-1rIO8;9UE$tQ#@&pC!o~<=rW-XX9%g#jui~L``8?uKh|3eI zSM;7S#%ab(4>CQ-`MWbJ{lQ^{lieKG6@Gx@_cPzl(~7<`t?+$JznA&C5{ll*_-i97 zzGGP74$jw6uj1PS3J=yOY_dF)(^I30{{3;rOn;W~_jICf7T-;)^zWQz98mZW<8O2N z(=6v{ze@jBM&W~;@2OE0e@ZC)B=Q;hkaYcWQ`JU5N{4X;K|CrNX@vHbTjvr%r zKN?l^9}P3^W?au$DE#sm;|${f;~Is3m|$GbnDb>uR6LVr9AK;~{L*R0ql||ccQa=G zmze)W=6{j-Uu6ClC4VAHS3h0tu^S#OOH#q+r-75VJ=Kl$&|D;~gPjLK1LdAc|@t?}L zpPmD^h=BMd{_YU(YfJF73y=M9FSs9lNkBfXuz93SwwepD^4i9>rsiw)Yn!%oYyk>v zYwWmoE>t{QN9S?UA|69za}dsrClK=D`5hi_DUbo2vY5$!!lVk%Mm$&$$UfGR9>~J- zGKtv=RzIC*(QV~9m#{~c`CM`o<3*VZij6%(j^HPbtbG(-e0SU3TUwjzn!B1EvrolP zP==`(sJJW1@Jj0adaR^7qTv=oj&39BLY|~G(Yx_ zAw*It0g_Ie5eQ#^gJyLUm-y|^)}jp0UypbJ(AJ77%xw!`s5i&Iss8q-r+{0*R z_JcWH`>RoVwEw*QLdb`JSBv|WkAtR(`<60ZK8z^V+!l&~lsVxIFpEI<5-IwqL98i%O9RVC;o-lB;C8{L?iW3Jd9jDf==sxMgQn)pz|DI9eNyJjiP^b0Ccss zC~C2ZLLLu73l8_7?&kJAu=sirJg*>nBZA*DvD$y!<3wjLU!V zry#(e2#!6A6WigvcM-mvsGy(3=?W$PE|ghZK~&KH1E-CO-bn=Pv?X}OhZC276NPmg zfLBNl`@_GJ->xPq=r`lU<*Ao#B+25Ht-voT`LDqy;wq+(!*AIRjbvMD55TJpF diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.finf/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.finf/TargetDataMacOS.tdt deleted file mode 100644 index 2c25cdbdb1112cee1ca86ec8cff8942b51e4be7c..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 32 RcmWG>aSU+|_jF~z0RTd#0#*P3 diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.rsrc/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/.rsrc/TargetDataMacOS.tdt deleted file mode 100644 index 7c9986b9e0bcfb616df3c616ba39e2f18aa1a8a6..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 286 ecmZQzU}RtbV<5%AAO|K#6oJG4G7NJ6{{sLh?E-lK diff --git a/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/TargetDataMacOS.tdt b/SheepShaver/src/EthernetDriver/Ethernet Data/PPC Final MacOS Toolbox/TargetDataMacOS.tdt deleted file mode 100644 index cdb3ae7c538a7cb15e14bbe16d1b473ea3eb2c97..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 46304 zcmeHQ3t$w-dEPsngv86dY%u1rU~FUqhXTeSt{*2P@s!XR$wd@Wbaz^$!>7CR-N^_- zgG^`>+r*)<-71DUYHeJCWt$|V!HG+8lBOheQc^$a;Mj4R1luj4q;V4GQIqeVnZ1Wj zH+#BUsc_nn{{3hF`S<^4{`qI;v2(k=P$-}%N|B=2$`$45^NMn0ilR79g0|RZw*m1` z=ke7ysEwXTs}@tMJu#1-Fif!9U8OGf2R#8*SORwQhB|L*2z5k!n%WrAw5XDasnX}u zqEXfDiM3^Bs@A+6t*u%_UDpwe`P;RO(nKXRXt9_-*qT}3a(_TWZo^?I*Rl?Ophd0e zj72<|MaA>Rb!W`lI;}kv(^STuk*TsH7FrNvo|KsfmfpSt#;6JfgPJeq4+S&luBsy% z3$?3jwC&qMkroNx!m4@mAhA6R%S1Bju3~KNh!&27sNOhkECMB&8k8z+6pb0QBV>Od2HK)dMRtQKkA7_wRW$}FeGzDAml|O zs1L(M{iq0#2#SjD`^EuasGu0cNSBCo4~F@9npilals_X8J;`18OeB7O#V1drRs0+)*T zV&F0nUk^M|#P(a zQN+&zPvY^SD}gT;@tc9K5b-wP$s+zRFvg1%ioS#cU4u~ceH^B;s8U3EyNbshbAYFb z_$uJ(A|3{wA>t1K&lGWzsfzd;z_WO~nCvlI#FqkJE#e!2Nrx58w*dJ*`6u}+`8Cx6 z`6Brs`6{&s@^SKi@-Vaw+QXqpOvNxrS>_1@LZP6#QVWEYy7j6UGa>~iZY>f}(CO3o z17irKsS2HO^3@odB%jvA+O$Yei#dH^v;&RKShU^a3q?0~#QXtvx+)mcB3nE@4S7)( z-VyZQtwo}qz(SlxJQ2SZUDy!o@W#)E$S{@~%L2p40(1|gK=(Gi|EK$u-v3{RINkp! zd;p;L|4R_p`+w?7MgOnVAujrVWfS6}|5yBoi~e8Pin!?i73#x9|F3)uanb)P`w$oX zKVpR$$Tn17sspkO*-f_v*@xVa%acBgvKZH{Pu0fKA*vN5Zp#+s%^E|I&z@pGfj z7;9kevlo2KU+kAn?&*6Cbl3spU#!jtQBM){Q2)$qIEZ>2&_iPYR(DZ!QFZPH)h3$H zSMNCe!@f31KPS66$Zo8y^k=v9Yb=Uo0m}lG1uP3#7O*T}S-`S@WdX|qd0K!5;`%%* zPfTLE%Gd2o*0%dp6{LQA=ZX%i$hP?&IM=l_^$P#w=1>bwn&=ID!Ys*W> zEWjV(&X)0F^N3AxwoDx-mh71& zoGqn21#c2OW#Ypp+W9DUs}+2qtpZvWNLYY8zn^{Y35G(CS##?`ui=4}uUHweHWbth zE-I?4b4Lt#@=kU^0zJ2P`sAYUgObLE24BP8+OT zwIXRBM&VF(a)d~`?;i_Rporg zrv2$grZGbg>2RWwjCAFb?iLq2Lvkr*j6+C+6MGB{jVI5FG__fzItSV5NDm+DvsX3< zt!b#N(8l`1ag1lQHkS20-C#Oq)JGZV>4N*QzGDdbs6lRCtRXeyn9V(%G3R;6;u+p> zpSRO*nsW*RoVVw$XNczQLwXPNL=0MUPF0d}5xZwxZ1d?1Uce@eDY;KSVde43W*uy; zFY$Z)bP-DSdgQ~i`1~gC^2n#3ChCzYGEL9LHlNP1eg-_B&QVVne3bch*w-fW?0oAd zp{LO1)BQB^BoeBHUc-?wWV2pK@9@YdKqRES=fmiNe$t2eygfq;>c>!hNCTX==d6d+ zUM%x=GyIK}r-0_|c#YoTMQYO9<@)#uPAA`nkWNme)O)w;&t@PjH7(mSK30))$M5MG zv}8Y4k@Xx&W1_tEWH~0vTaR?8l2|LxUyoFgY4y{h4f+NG=5NxK|NQ+RJ|>cmRLs*|pqk0H*^Kd+-6D98 zvm}rbEh@T(e)zJ{4KS$!623xGmC=b&! zRL@KTc*&k5m{uNxXEUbNPsmH}5z83N(8JeRo9G3JnRZCcFSKVSb=4aT_j|!EZS|7f zsM(D1>aw_Jn4%|({a&W%$zs2kDSE7RWj=}RTPiJRRwWdW)v)e_uKAnrd#pf>B&c$-9 zpM;*l^@D_-!S#c4K~Q&0%x&>tsDL z%b8goSrwV5Cm`*BQodS}_~b~u22;}G)YJ&CpMZ1&TZ)`~^cXxPH`+U6lujjM<=J+p z(eL_FjgZ4xp*`Or6By0?%^1fsJwrA3Z`m%L{hL-EsTTALCd?a|-3-XA=^#dL$=Q}9F_KS4Q*OLTA;oK>~r2F&WB<@E2(nIi=*UQ9#)((yio}M zRHr^$nY= zJP~gwxEWs~-3&q`6m?3+8HHmBv941>C1QgF{rfnDQ$(vId0D^)w`lkHgLw(L)Gwy? zvF<024Q4T#A>0~6rCT_wv5obNG~I9plxCz4{I@kTT?S&)lAA$cYk5QU+ZyW`soIoO z3)!?ERzE)J5_R%35w;MP`!nBgQtr~D`L4N>L|&djd^ScyCA^1F+4#{{6h~~Bj1|-C zioWKz>jKf!j^kjfd zX>UH;BSsbKsIFbn`R#POE}rSbWRO}uq?lnK0)wJ z68Lgp3Rj44EYP>EiBAs{Com(wB!~QgaDVwFI{5=(@(05G<(KI6U2ejC^NTi8jP_G} z(q3NDiFQ$rw(wcNR{$>qejaM|jt0yHQ~}Ulyb-{s08atF1vnFG^%VoI0aOD%4A=?S z4}cusYk=RNtxX4fDAc;)ynv;^;NRc|YyzAG!~k6Yw8;%UfL_3J07^>+l97Bai?<2h z7l3~N8w@y9230K*2}RV9&({%&Xf5itw)A^gyiE!DyM8^*H*U{34?iutW7jYB#!Zwl z`Jca>ERSiyNaE=;$_+(mCj75>Nt5FG+#$tfb8-B@9L4pZTX7u(JyObX)k==bPbscX zA5dIlk+$mu$G2jXHC7qnK!ZcaLCv1LhzI>1LT3&%Na|SO{4Pi;REi+FL;XKz4V7n~*wE&I=VE(1zA3-mY49XGr3CDR`akhr z4;N3>yP|a7fl~C^pOBizfxoUK(Ju`&3kAb(efy_isxqg7*qsY=x~@6T1J8st_E4;`$H3jj zx?%tpuu%);{6=kg08%Yh%L1341!yJI-gnI@Q!!pY)hET-GwK(;Hf6-#$@CkW>^=lW z({!7%i?1dr8=vXIIjsTNZ|ij{x4jfr2)k}!>jI_9#wQ+S{5yHN>)vw3RaBw49(xaD z^u`;XIRVVBcU3G^T*pr;u5HH{27NTr-;Ag4$Ep>je;&HAa)mHf*?5F7Upjc5jd?ac z^+h64=sDJMzGwWIw*kF9`rC@jaDZojFS%TxP#Gi6kmVbJl^`|1t6qmxm^bwfNUgRh)8Btm`a@6QCV=o&we!|2_ zmtQe?%9T^Enl^pLOm)`mtLI#E?cDO~uAeu5fpcNS2No^9VabgjT>7D#{^;ggZoSRr z@%r$Bq}De7);k03!BF_F2wv!R_qNXMJ2r0m@SkpO&Yb>{oqzVxU0wI={@9*B|BH`* z;@^h^KnlZQa^>_wDN%8t?ey^-UZ8gqJ^adQRmJ2hjQz#kBHQ38%ML z%x$t)To1SoFdz4~3V@UDa|Zwq>3n({(a&)oJKZ1b;sN)>_S1Si>6%ydYm#WMf%c3pNubeL9b>n_=n~?1~%xL%&ZYQh0~K$)vee_0=_V)w$J`jg>&|RaK31he5gH zMNEEH6(^=d%KBM1;iC&;qi?8>L?0&ti{PMRL3R-)RTu-=u^_-7lM4?N!V)rxIXT$k z;_10|X1?TWWN|yovy3C#G~^{EJNj-0+4U|;)a}FZ$hGxrE9+{UHBB|LD>J60K>J`+0A^6Et%`j|Mel=l6#&68hYkR>gtpr_lp+^S5U{f9;yZ1`Rg9X; zfuz%>2Ew#sr%0SLeEi(C7cN|Q1c+cOr}Xw{tk2t5%0Mq7dO+vocr@rXq6bsy zV?cKZIYmE9q>U&3E-ojTKH(5}hz>c)^oigfqqN7iKyT4I2{|h0;E!#=ds|cJTuy9D zIF&w2=WpplC;rlKMB7r<`z&9RWJ+dX0kLEgr$2fgBr!)QM-Nmyj?=FqI`uvX3#Ng8 z5~m-f5is>q2#YHe`e7D!_X17j{I48GTjDbKJW`Uy^nknaj|##KJq6nzjyZU5T|?~+_w*hkz9_=kN8BQg8m2&qd9#Z*>e(6 zL4N{=Z*%(b1&E71y7z|>Kfvjyn-Qlyun2om?h$7>-9x%)Pb|WNSeUj6JA9eSHHDFt zhf$7_Q;h$~-+m1=agW{qCius4IhC{$F_rTlIG6B~w{8JVjGrEZf7wO;pI-qw{E5Or zva7Je&btt&Hj8ku0*4t~{@U+SoT#9$#bFVrFL?oR(Y6nEAujU2hHRw*5Ds?ZApGH_ z`w^c-RM5YGgUC-aeN%EaQ9&o4d6dhqco*@jiK-}1Y=Yl%JM^w`f -#include "xlowmem.h" -#include "ether_defs.h" - - -// Macro for tail-calling native code from assembly functions -#define ASM_TAIL_CALL_NATIVE(NAME) \ - lwz r0,XLM_##NAME(r0) ;\ - lwz r2,XLM_TOC(r0) ;\ - mtctr r0 ;\ - bctr - -// Macro for calling native code from assembly functions -#define ASM_CALL_NATIVE(NAME) \ - mflr r0 ;\ - stw r2,12(r1) ;\ - stw r0,8(r1) ;\ - stwu r1,-64(r1) ;\ - lwz r0,XLM_##NAME(r0) ;\ - lwz r2,XLM_TOC(r0) ;\ - mtlr r0 ;\ - blrl ;\ - lwz r0,64+8(r1) ;\ - lwz r2,64+12(r1) ;\ - mtlr r0 ;\ - addi r1,r1,64 ;\ - blr - - -/* - * Driver Description structure - */ - -struct DriverDescription { - uint32 driverDescSignature; - uint32 driverDescVersion; - char nameInfoStr[32]; - uint32 version; - uint32 driverRuntime; - char driverName[32]; - uint32 driverDescReserved[8]; - uint32 nServices; - uint32 serviceCategory; - uint32 serviceType; - uint32 serviceVersion; -}; - -#pragma export on -DriverDescription TheDriverDescription = { - 'mtej', - 0, - "\pSheepShaver Ethernet", - 0x01008000, // V1.0.0final - 4, // kDriverIsUnderExpertControl - "\penet", - 0, 0, 0, 0, 0, 0, 0, 0, - 1, - 'otan', - 0x000a0b01, // Ethernet, Framing: Ethernet/EthernetIPX/802.2, IsDLPI - 0x01000000, // V1.0.0 -}; -#pragma export off - - -/* - * install_info and related structures - */ - -#ifdef BUILD_ETHER_FULL_DRIVER -#define ETHERDECL extern -#else -#define ETHERDECL static -#endif - -ETHERDECL int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds); -ETHERDECL int ether_close(queue_t *rdq, int flag, void *creds); -ETHERDECL int ether_wput(queue_t *q, msgb *mp); -ETHERDECL int ether_wsrv(queue_t *q); -ETHERDECL int ether_rput(queue_t *q, msgb *mp); -ETHERDECL int ether_rsrv(queue_t *q); - -struct ot_module_info { - uint16 mi_idnum; - char *mi_idname; - int32 mi_minpsz; // Minimum packet size - int32 mi_maxpsz; // Maximum packet size - uint32 mi_hiwat; // Queue hi-water mark - uint32 mi_lowat; // Queue lo-water mark -}; - -static ot_module_info module_information = { - kEnetModuleID, - "SheepShaver Ethernet", - 0, - kEnetTSDU, - 6000, - 5000 -}; - -typedef int (*putp_t)(queue_t *, msgb *); -typedef int (*srvp_t)(queue_t *); -typedef int (*openp_t)(queue_t *, void *, int, int, void *); -typedef int (*closep_t)(queue_t *, int, void *); - -struct qinit { - putp_t qi_putp; - srvp_t qi_srvp; - openp_t qi_qopen; - closep_t qi_qclose; - void *qi_qadmin; - struct ot_module_info *qi_minfo; - void *qi_mstat; -}; - -static qinit read_side = { - NULL, - ether_rsrv, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -static qinit write_side = { - ether_wput, - NULL, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -struct streamtab { - struct qinit *st_rdinit; - struct qinit *st_wrinit; - struct qinit *st_muxrinit; - struct qinit *st_muxwinit; -}; - -static streamtab the_streamtab = { - &read_side, - &write_side, - NULL, - NULL -}; - -struct install_info { - struct streamtab *install_str; - uint32 install_flags; - uint32 install_sqlvl; - char *install_buddy; - void *ref_load; - uint32 ref_count; -}; - -enum { - kOTModIsDriver = 0x00000001, - kOTModUpperIsDLPI = 0x00002000, - SQLVL_MODULE = 3, -}; - -static install_info the_install_info = { - &the_streamtab, - kOTModIsDriver /*| kOTModUpperIsDLPI */, - SQLVL_MODULE, - NULL, - NULL, - 0 -}; - - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern uint32 ValidateHardware(void *theID); -extern install_info* GetOTInstallInfo(); -extern uint8 InitStreamModule(void *theID); -extern void TerminateStreamModule(void); -#pragma export off -} - - -/* - * Validate that our hardware is available (always available) - */ - -uint32 ValidateHardware(void *theID) -{ - return 0; -} - - -/* - * Return pointer to install_info structure - */ - -install_info *GetOTInstallInfo(void) -{ - return &the_install_info; -} - -/* - * Init module - */ - -#ifdef BUILD_ETHER_FULL_DRIVER -asm bool NativeInitStreamModule(register void *theID) -{ - ASM_CALL_NATIVE(ETHER_INIT) -} -#else -asm uint8 InitStreamModule(register void *theID) -{ - ASM_TAIL_CALL_NATIVE(ETHER_INIT) -} -#endif - - -/* - * Terminate module - */ - -#ifdef BUILD_ETHER_FULL_DRIVER -asm void NativeTerminateStreamModule(void) -{ - ASM_CALL_NATIVE(ETHER_TERM) -} -#else -asm void TerminateStreamModule(void) -{ - ASM_TAIL_CALL_NATIVE(ETHER_TERM) -} -#endif - - -/* - * DLPI functions - */ - -#ifndef BUILD_ETHER_FULL_DRIVER -static asm int ether_open(register queue_t *rdq, register void *dev, register int flag, register int sflag, register void *creds) -{ - ASM_TAIL_CALL_NATIVE(ETHER_OPEN) -} - -static asm int ether_close(register queue_t *rdq, register int flag, register void *creds) -{ - ASM_TAIL_CALL_NATIVE(ETHER_CLOSE) -} - -static asm int ether_wput(register queue_t *q, register msgb *mp) -{ - ASM_TAIL_CALL_NATIVE(ETHER_WPUT) -} - -static asm int ether_rsrv(register queue_t *q) -{ - ASM_TAIL_CALL_NATIVE(ETHER_RSRV) -} -#endif - - -/* - * Hooks to add-on low-level functions - */ - -asm void AO_get_ethernet_address(register uint32) -{ - ASM_CALL_NATIVE(ETHER_AO_GET_HWADDR) -} - -asm void AO_enable_multicast(register uint32 addr) -{ - ASM_CALL_NATIVE(ETHER_AO_ADD_MULTI) -} - -asm void AO_disable_multicast(register uint32 addr) -{ - ASM_CALL_NATIVE(ETHER_AO_DEL_MULTI) -} - -asm void AO_transmit_packet(register uint32 mp) -{ - ASM_CALL_NATIVE(ETHER_AO_SEND_PACKET) -} diff --git a/SheepShaver/src/EthernetDriver/Ethernet.mcp b/SheepShaver/src/EthernetDriver/Ethernet.mcp deleted file mode 100644 index 6e14f02ef295d82326ff6262c91b74de8ce5dc08..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 103293 zcmeI52Y?mT)yHSvF5BouP%J!9K?HUe1q4K88?d-5D~m!bk!AM*3)`|qu|zi}8Z|{t zOroi#_rz2alNe$&F{W9Pn3y8AG-LftVv6DWoqO-RH}l?<2W*V6bK%VW&$(yL+>__08h_dDq8{?+p$Sh?SMq;A6KTR* z@fA7eB;6MK5b!||$(D9aR?xB+kxwaj`tD`$v6*!+=eif%43=XsqJ1{`RB1i9i_M{e zz?ZN&OhLC-{1A9L`5^QHc!qU^O)n+H zu17+o1jkrMLC1iRwT`yz3);bz;F+`+*~BT}Sr93)feo@Bqdc(D|2la&M2i#mkyjLc<@s~Ke+E}37T&W{Tm(EH zlRpcd1U?QT6^M@G6|@TK$QKy=YVw5!pHD7!Cly@H<^<}q9Qe*o52EUJ7+Dt0?6q}TSR?)5Gn+^UE`4)qJMZVSGKa;l` z{8#dA2ERnUUE^Z0e}}>NoF(-m70+VRrJz+Te%)=b_*##_(uc3nc)#4*)Osz^Zj%^- zR2$e92q=V-2{zCKmD$cX$6j{gDCEXKW1(@-c(kI^)@sE{gIE=hE0JT_|MVvWknG(r zS;gh!9=sc@&dQJ`!`cKHdoJ58B01X;Qe~3XJ|e+^U~@(}BE2K6D$#Q02;p%3QHKiV zRAX1SoZnK@(bCtK>MOsf-Sn@LQ=7Buo06-m&a7gmkV6WT3boP3f-ieCTeX0Ct7~Ji z;fn&gE!8oJvzr|Ul~O|QhWDFQx^~SPGeT%h1uNH{VTKs1u(-K< zptm*EM^V9w`i45JHOA!QOg`2nZ;z=ut+_tg(7vg+rMF!jX1R(JqZ?aVJ*Bo$GJa`o zYSX}$n7J zk}*S!D`Sp~M>5{a_%7GQ`H+nJa?RuVB-c7M?#ne~H8dNN@oElqBy=n^36imX6;ua_ z?}>MnLGz#rXgVZmG$iAfjQcXi%h)d03>iCR{Fm`g#=q@QEhN_pX^mWKW$c&h?-WSJ zei(HDlXW|KI=XvPy?bVo z`jkGbJhemOBu>N50y4BmrOb3kW?1{05?nUq!nE&6>H>{uDeoTW4^g*V%H&!j8^5xkcmN)@T|a~kKcI)y1Nd?gUjT+M2=-4^@daT2?6+4` zt*cx5+FO(B_`~L=?j6a-fsX!mYejo+Uw^VWwWTxF)o(4;^IIOLCF?tTx_kSRix!`1 zH8!nx?^d^TbaZ!jC0C_7daTCv$(o9qIdin&`eai}Uu#Q;+FP5t$ZD!v;XTw{gGGzC zTT4xKz-nqu9b4Peb!=*?vAnewj;ngIo34V{F;$Q~sH(5i+EBA*MY??1zTsysey{(qI58m9;nxYz3V@v;5l{Yse*A8^`w|AyQiNmTX_w3D? zli8O?jO85}6&O0XqUD$c?G=mLW~UVxofM{7HRWm1^W36zf=`LpdMm2dSxXyJy<1Yr zHQdKI?S`$|oz)j+*RhIetN+=X>(`vILC&A9r{*~AcTVN*bIRORu$Fo&TU%Fs#!5VC zdzK4i_`U~-RzF3;*AI4`2%xrDLp|$tSdMO-K7j9gK(21BNVU+b$>*fGN9S^M&w1)3 ztd%XDDR~1SS<~HheyW!zG}ela)DGT6NcHq~^BldeyVt62?;~72tVaA*JJK=7wP)PT z@u3V;`?vIYnkPH@;kl<}5^TPFkzdi?#i)=g@5iTIS&~&fJss_>E&c7?T@w7}Q9s&T zkM^_v4zSb}wylh`Xs+6Yuz`D}*e3RBbDHQk+^-CavPq3MIuX>=pqm8F^{k<)Hmg=xA{3SylW9dPgcJ*)!r%_`#@3C}g zMeCY4MOUiBs$ZL2)5EaVei2e;WKADs_S1(+y~P_>rnnA%t2n%k1>e&}|?|$#{;cA$; z-BvAsL(KMz&fA|p;-=lZKP7)kjnibza$y+d@ZG^nMZQkTkZ|J}+RudvsEJBhP;N->F zB4{L329-diW{Zx}%#E}@WDmFLo|IY?);6r%(7L_7P3FVvo4Hq&%Wpz$^U*8Pkx849 zZ9&!@vU(P@H2Yq|dl#)`Jog`d0@?Q@ell72DY=iOmU`}8{8Y$IrE{whR9@@8{Rk2= z_gO*3&h3d`dDcBtut@p_$ya1WBaQLx5YNq*-?8!@p*+dy;bBf-c~}#af-@U^57q;f zc5;0)=y!_jd%_TzP&3F~URZ}pd1Qx*P)LVLvD|n1)=|pL_ZtD_nfp^e0na_FpTPR| zuC>xeb6e{tvSab0P$NirNc*JNX@kl23yux#ec2AebG3+o7m1K?m*VhX7m2V?m-3K6 zm*U_scS=Ki!V&Scm{aK3%iA4N8XDdifdH>o0)C+_1tEbg#lc~nE)A}>e@M%LQ2{M7 z;o@@!%b`A@+3&#ZoupAr`zET_-ydn@Bx=v|ei`-$08+!l# z;TNP?64^nTRqPX_SrR!xnpK`1q*=vTLF!YQ9i%=Y8SD5Ix_ULMG&e|n1>D}6Esze< ztb*(y%_`0cQoqvRYP*6o>pLU`^X|5pkIV{*N*+H6h zaCVSp73T(NmOxgJ`jiH?C@V-^e@LayenFZgksYL2#XdorC6N=PS>@S5npKs1bA!}Z!0oNs0_h;lD##Aftm3R7^(zgowkt@p4)hJuEE%65^_K`~ zc2SJ|cmg<_c1u!-DOS9i&+YX9sCkac+=i31kJSPibI_f`gPlDnXQyLPaj)<>yoI?LzmD124%?Jc|s}k@FQYi=tQYj7&(sXHX zwf%!s4vY#?kqHk{mqbXjgM(BZA0DKRNMNV=2dQ&duw6oeR1OXaQYj7%QV|FaQl~Vq zMZrPpJPeJxGtJ0_1Z+kqJZv*^VZob`3JKwiP;el7WkSN)E9h%YuZX`dWMo1EJX1^ zB|`Z{mq_LlT`sxE+9MnA7&GHrB9mADh+stjh)C{pUGKS~`VSpJkB2gfJkh1?>%2LL zPv*o`u7oF|a*MNLDObW9MY-jk_{lAHM~;7~r%(JvOmFxXI(E)2&5Dp9fwXt|2Qv5^z9|Dh<}e{WJ2R1TP(oqTw;E)ktq&| zkc^Oaj^H@SNQOsCj$CBzgCobKD?EO@f)V}WA4^^pQT-PZR~bc-(S??X>xNb)a*@#` zLit3O$VEq&NJU1M2t`GgBNG{2j$ladIU-@bBQkkJS4J$8%zLr%o-3;V(2<#s1t|)NE{>0gE0G9^C@Bt) zC6Ne=A}J4vA1Mxw9H%s-PaF~7-f#;2?JT9C5t0!I@Gd3b7Zp+v5)V=w6$v5}9s@3k zkoqAN;P>kIaF2IH0i%hsryCg#DCtl}& zkD-na_i0BY(7K{M*QcGsg6$sS({gZ#PiLk|<})?**^$?)Gcx+)wonoGUlW4VC>j6O zWX|RMWg$pO)-&=TG53@5Fd5%I$<)UE)Z9;v3>{Gx6qyJMib#|N(=uTeObhXLVNiYZ zu%M`kvY;aqVnIj5zs8JMA-0p!K&we%u)Wfy!RPh&GC45RIwBBk7pK(MB2J-yoy1bX zek7%VwvfVLTck^a&+BgsIWW`~A`ol~r_|RLPN7pLY~%M0YtB_SNX~QZ4HC+}0td-? zufsu7o~vU&j3A+`VI)Y*J(z^aM6_MhIBiolRV&VVE`~V+OOTvrUH90mjummac3@kxHSp!Run0sIe zlZj}%dti|O^jSqCXJ84E^9(FOLfHdLkeqj536k;*EI~rTcl;?##xt;l3AzSrKYPic zj=uz{$$GjFE|!j%K(Wk>#jir1fh9(4xkxifoJ2W- ziY52J5_nRSML2@!a%L=k{i4cUGnN3E%)k;<7tg>FB$PF<1c|u^mN1!!wz~%wX{TS? zvL8SO$$18rAffDmB}mRYumnkY29_WpF^}UjNoEf$5pt1clH;QsL1glB1QCpI1QBs& zEPnl>%FVzcI6x*dumlNt29_Y9tbrv+%ssG#$wai>J+SaV*t@=0&Riu|!ZVoU7H1D5 zxf0$1B)8l%bmSJh2MzyHkC*t17#sN)I&qX+nl(5C38ekqM?engLODm{NW3k@C}(Uban#Z{V%miu7u9 zVYRC5ZuMMe{mv*YtlQC=Vnw^|E?GrSmbeq8evR;}o}ZkzdVUgOj_m6B$pu!=uPrhp zTm2GApa3m++W+? zLjD|7(x$L2Kb=(y>|nX2N^lvFpXO3Ob2{<@EptBnQHFm#c=V3`(e=oD5j^I6S(4ha z?+1@fb)@(yE&Kn#<4{AL6Y>*X;|*R2o}kZ_ke?ZwSl^%Gr^OPl1yAbl?x_O54}4In zs)L^&O56dS+}%}0-4c(0r?hGQOW=c9t(5Z?91cEYM}HaiC^#8BwXI|&#}>%XeI1(W zuce*^mxB+J#X!Ly0w3N#vXM3xdcGWZN;qeb70eH(;#>O zct%%SstqhZmv*Eq*a8;&9Fca4VZ@_g zevVcAK~~1H=4*c_l5-xX{h??z_;~FPMY62d0__h)qJN?8qoPlM7wLX4lD;@W`$N$# z@M6Q?4PK)Cq4)^!Qtc1LvRv7T+8>I~1uxS+P<#>iB!h1RpRCVSd>i-_?GMGj0x#G8 zQ2Z}&m9~G0{3Kkp_J_p+xkr(Ed>JRWMN@{!sED zc$M~tk{7}C+8;`#FIH=RD3w?^Rr^D!{1jh<_J>mWDZEDLI>P3S_=?v4 zWGz_w;!2sAfhF$VD2q^oZvqszebNg z3HU8~{24F)_*RHCUi4q9$Di@<0$-=cpYdM+U$4iX@jnH>O^-k0p9a5Ok3SP6E^g4{ z&xCUDJM@?^p#l6(J+xseufZRLNRtw5KBS;EX*T(X4aPsz&ySXg#!xuYz%;0a6i{FqY{ejIV6toT+N&ZQL7m$C-V6m-?DWrogVDlLTt%Ke}{#k=} zl7G(NC&q$%P9UsKSUvXT7j21~!(X0WvT8wUT7{F?@gUwupCgAXUa-QYTMu@UKD>Fb?> zz;9#o9R;m}rCxU!{B!c}8vGCPJ2gH;u0eMhTtogngHz<+H&|lrZiA(s(q_^jB72X5 z)*(-jOT9@`3)uWfL2K$v@*f*4`hQ|@3%U3=Y3k){?p4s5`eAa3E7DZ4!TkzaQ^l_y zFnBll&on-CI=Qrsbg1b6g@V?hqW?jIrT&ank`DbKn_nqt9V+&I$Y9~gIY@`T$mTZ+ zT8B*`|EXT?f8?yFOmOQ<0EE~KWXq9^1m2-0r^t~zlU7L5z-NNvUx^9>j*i| zvl>q;CV$T0Ipoh9+(a(d8`87^HZLe>O?w~tUkw&t`5J4fLgTZ+wu095E5HeZ z83XJBgYg%;&|vCfkI;C=3~-UbbzrdtX+{cMV(``AQiB;w>@tJ#O?#xl*ux&B@sX3j zGQN50(gAKkGe2Bqc08ceo^dD-l=s!&3qow|b8$2H@;|1yHQ^C^=ZU-j~z6w0u;E#i` zsidRnNBc;F@nu_LfHV{P*+(0EELg@1(#(4BEQ7azk1_Zf@N9!cKgUR#c^6pxRWLDR z&((NVF?gQANpQKr#Ijvsa4Wdd;48qiQ_?Kaf1JUhANxw0CG}sR@i8O73k}8|HhnDV zn3KRK7<>+RvB4LEml*s3@KS^C0H0{E)PI@Av+*e#U6N+gKKo>Y*Mez-q}k_#mn&$^ zz6o4q@VCI#1~VqvH5wm_@7uKoV^_P*;70HYgFC@14ZZ=q%HXeo=^IJM{u;d6;N4(+ zLed=k#m4^>rhPVg72W_o&EN~bYYe^~++^?w54lXV8;3-%cX zQ+NAJgWJIC4SqeCb4!~0KJcpyz8!p)!M_2YZSX(9^qHi2#E^Zi!Pwh=wZWqQJcHj1 z-e|DYzs2AO!J7>J7Z^X2RDKkg;}yoncFN%G;LQfV4ZOwRuYkR%R_vbY$>8@Gd@}gG2IHsp`wYGs z{C&7X1Qzvx3&5e}F%z@d<~6KV)z%_`?R{r}jq-#(p;SlXSx8!5=gD0r1BS zei8f$jTavb#zvABSA#!gFmYgi+F)#Ef5zaif~l*d#Seo&r}2^mnDa?mG6Q^z!7IRD zFj(sOMT6-d`%4Dj3jVUezXpHB;QxR*pQNRt6FG%fgTH1lF=v0>VEV_t&ERi=zhUsB z;BRVtViA}!Nhel-Z#Q@?7@w1L;`!j63R)-9SN3-dz7u?h!HBvpyO{l(y|V8#wfRc{18 zZScpy&lpTU+vt^4MP2OYG*&;8^Sr@H`2T0{3NY=IRNVpotHC#b|7I|8VE^4h4-(&Ohqgi6A@QY7s0-?bdZ5=py-*+24-G){ zvCK1Mej)P;nNP?yO0G?EO|ox>Bv#)GeGvK(^kL{m=snO!ppQZl10RPz0eun@U;8xl z8Hj6!Tr1=nA=d`ECdjo?t_N}*knvxQ`_=St4O9!&K_^315HVt{gjPW(LCc|fXf<>y z)BrU?r$K9=Cg^l%Ez}IHgNOE62rYxKsfDdAY;9p{3!7Tl z)VdkM*6MlRyU4MXdftbv)$=`Ut)Ay$YxVpNTdU`F*jhcGqrcSiHSDUMr!ju0=X2Ow zJxBW*`PU)(L_MFojr<$XH=%Dqw?p5Cc0%8Q?ts1v-3ifu)}_#8&>-|W=pyK~(B;tU zp*KJmLYF{SKvzOKvSVZp~IlVp^Z=r zv4cXJPUTOg;Ph zEBOj&CA12vhh{>vpktuf&posgC;{~Kxabhp()V85b+|UL^OE znA5W9H<_2nJ*C`B$~~mamE`_W?i=NPQRWzOuPFD3GUt)|L%A=M`$4%6l>0xKpUAzj z-2cgapUkmjjwAPda=$0{5OVJz^CY=%koyI>50U!}xnHn%Lf?VD%5h>Z{6_9aWKJgc z3NlBMd7jLVU&LC~`1Ex?ElpTOr*-qOM_4LoY;5Wc6Ue7* zIYR5|Hmoae4VUJdignG+t-b9%{egl?Pftf+xfC?6Ps-O2fii=XsLx2kE`%eKr1F-5 zKrK?Rx@v8*zEkGkDPJosM@H${(!N>bgHk?v);6!L2|7Ms{ze3cv?sRqcLv)zx>h_C z(e>HJw^$+K^r&=Lh=kG88EWRxmNc7J5O}kMntN5A_6^HjU{>-8yl*lM7cpSk<4rD zr}|4bHZ`p9FUfH8(zCv%Hgm+@p^Y52rh0WU>gdL%^^xsrYUth+r6;Oi5*Asr7L{H?LMYYR!p5a)K7~~V3 zsHF7tsV@wpL_^Elx?97iN1;dS!i{7@b*1dv+7UU9u{J>Dc-YrJFeG}Uh2 z=D_mqa1Hs4^P-`gr^S(t3pv$BQ&zr@ohEwpOhT=i$G^xP*>Px#bu5A=j8%3IINJy#8|&mPZJ1N02ykjf8xTDRskSB=#3 zN}H>?BQ6)y9M*2i<-0i>YSu*FyNgVEb{Jrz{d~?F&?>H!dp73{)FU>3x#qn2^p~p7 zD`?KkN@2$zmz0Hx0-l~tIfdl*TtB>K(>CWW2339%&XvHw%;Ba-%s?%Up0II6JvY>M z<&k>wyrM+v3B3?xo)Sds300K0ecDp{{NP!Q;GxefqV1f%qJ&-t_C!z5KG`Q-pYGl^ z$LIDocdl?@$4B+oAO|~o!aO>EJwtV+jEoDl#9&z4Rl9mqA%7*{CH(fTwW&TcbOb1C zZ>X;hC`z+kPq_mltewZx=>q~lKI51iS|0wVA1j~wC_O{aHvFX^kL!hctKXwU-XMz8zFFYB^ZNQ*WZ|;^T~cp<{qIg6pZS$wfyUSwjpo{sL`6#w?5ZuQ(Z%VFiI9Vtr=-;;x5*#p7?1FP%T9S{wP8xdPzZ!J)4 ztEthx%#YN(;D0$eDB0V_AK=IFeb*HI=bm-l-5r~{cO><%y}F)w$rBp=mq~k&&$S?H zIUhIgB>(Rw+x2WH!57!O(X0ObchCBY*FI@h&6?V}S;<+oRqLwAn(AxT&3eVxdI&36 zh!^Z@O7I0YUx^GslDZV|@#1M~POECHE3ey7=dX0Ru=z|=ZJbUN_9;7iIAmlY4E(1MWbVU&LQb9&o)IH)u~Sz%7s857+Fe zn*CQko=fh(efQs}`3SBMa*>ErfCWnAc?33+0>y#surL}d< zy|k-T^@V#s#(Qpo|K&4UQ(Ie}l8luPGi&5C&{SXfww9c~y`5Fxlx$poR+BnLMOmr( zvLd-=U@!mroQ^JW(Zbq>l^a^Ox3|epXs&POb@5{DUX<-)`k()Wd<3hmrTVw3KaG}m zwe_B#`v6I7F;pKD?2);=k9=j}r^Fr|A0!;D1qs!+X2jNtdX5Ey2@L-J1cs6 zyW0j@`}-=kwQaAMUp~Kr7oqwpT6)?mhUT2FBrP}3u6o9{W;9nWv+l${2UXo>KX{As zKf8s+{*L}!<+L-_DE}*&w#?GJcMGqgY}F2{w0f43x+=}FS6A4h&fHmR)$gpZq-^F_ z(`5Bi zoikZUPG%Oz!~HmUEx<@w?AXP1MSSJ`Va8QCZwutQVhYEYfj?N*eW;d_tAyv860a^3 z@PfaxUA($XKI{C%tIN0pEsY03L-mEMD2-Q_5i9IX+Q>oi>N2waRq(1g@#->j<^)@3 z55KPpc|@kZ|7eZ;jwE#T6o~+R zl%AJ+t{PCEJ)Wxu=ouu`oH=h;&qvuOqvw@2SM`o1*?X8JUR@^JD6W0ioHxLO;?-qb z=E{K^4QD7;RE$@b$uX~skshG}*Q{`^aG@81%-wyoo=`=3*C$?G#&?aQ^c5~%UB>0* z88`@3SMG>~=<&mNb(xIWa**o|BqZX8aNV;5adnxY`L-~pZ(_#&V}W=LlKrQzUdc6$ z*C2T%_fA~5m&F3{`VVO{5Bv2WUcS{9)G`fe!w+kq-g}Jgk@f*)j}fw)LFvL6#1_ym z3deScEf8BE+yV!sL#04}O6%;)9d!7iap{3>f#Lpnmle-34s;ja`}R2l<=$(EkBlua z94rveF@{4g?`0c@{Tw6gIx+#HZZRLbHtX4lwa$`tNLe(-tf6|QDPM2Ox0?M8X8%>z zXeED^*+0+Z8_hSkn@!%rXT_2>sl{_FtJTQ08GR|0yO(Hi*W7kJp7LO&Gv34&h%FFX zVE9_VwO~Q%>gw)+uC}V6?-kQagUL&0EMz9@3h!oFjP>=W)piYZgul`}d@UTee7IS_ zJ^vVPZI9cVu|UwAG$RqC*aEQyVhao(3%KvWb6f4VfLQR=)IGlPu)r(?tJd9(r?t7p zjXALe_Qe9hfw(VP<74+f3plG^ibu#uE6-TvPtrw@JggPoND6K1*3CP?`X{dR<6+qy znlwafG!9K=VlA-+Vhil|7LZ4qPAZ&#rByip6J}Qy_kO;|r#z_^_n!8Z9?F}XVF z+*k^_^N^E4qbCo!@yH#Vk#lBQ-qUkl`Rn^@@{p4WS3d2?S8gQwW(S-%V_C6e|?U>v{f4WEm!t( zhl#RhYU8K*>0R2JRC4Nh5PRaGPd~g%?ER#r-c>=*-!4hpI()tub&X;n0I7xkb5Kys_mP?o0&sw)`U9RfsD5ESb z=kPqa=-;gT3$?eH_Nq##lZb9Pr%Lv9qTkV{eiA2LmQl(*TwdcJa(Rt^$c;mL1|hsS+3&5XcmL^mUeAP*0i*4 zO)afWZ5r6Z4>EV8lGSx}wbeD%b+wcUMv?Wx{m^M!r=*LJ#V z9pl&n`)YwY*yYylq&xaOTcr7z>v7@|DlC zm09IYg_SGDsjqyFJ!GepJI6{c$Gi7qJTw-Fzw)Vi#RcAkVi}FAB zS3cr@@mD^3_?3^m#TDNn4NauRT4D>t7TC`%5Z@u~=N%YVKeoWoS-^7#6t9CYbcP*5 zP4OL)>kestybi*u^%WKNq!w0Wo_k4!+z*wk>bAzo{;W-v(-db9)inJ|F%egYY}N{OitR@d@E~dHMD+>>mTa-OE4h0a;X9>o53Yrp#`V zb)~d^H^1yNQbDcX%`d(!quojrY=*Ug`aeF_(J_HUv7ZhonJ@3OP0p|9U6 zI9=K>P1k7@=e5dvdQ+RNg7>@wJWumSvm$n3z2+}`R%A54xI**CpH6<1 z<`+!_FE#uD@-odoXA1a4!@rFDZJPfMky)ns6XdJu)rz0EM?S$hN%M;@Ay0Pp_esBG zW_NZS{W8Mp?Ca&#KNNhvaN(cL#@Oef=fD>T*RrO3j*YR; z6zP*4!ev2?7v6_*U_w@ST2i@yjM@zUoI8zgX;3qW$W$FY>fx3Hzkt zjci6KzWsB2+cth%CiXG%)eZ2g*(a5q!^X%zhi}<6ifxr`B{%Z7u7H24;rFEF6Eil# zN0+2B@n<9dN$PCN`AFpturd1odK3IJ6x*6}Jo!{r&xT)r7XHPWf8)c9CmS^X8NM8| zMK9?CC%~Vi_>EWn3I1y}|D)9Fh;f=f4xRR;nm?xzT&(%W;(PXGnqMOJ(0Ura*$jVB z^NVjG*Z$D>_K(7Uo#vMscj7zt+cdv?kX(-s4G+Ew{@XSGr=<*o#%@cB;NM{6v6VGL*WZ2| zzKQpFe}QlO>I`gPn|QzPAozM5XgnI-wu$%qJ`R7IuFv;2!k2y}6+h2L`*Y)aPlJD} zVq5n!{u_U8+38_M@#lue8o}St{Dve}3x>_}?;oDK~z2J2tj&H~f3R#-Fb#0DoKacil^_{kd@ob+dPB ze#t0ut*7ChbKrkR^B<8uHU9kV0q`A)Z=Y~5x$c*SyT$(B)$))2ja>V4<6LZI->KzG zv4`W&=Zc=Yw0ubux$)=ESHb_D=0A1}x$);0rCr}weEXyla^ufWJ_Y}7!(UEr{JHo! z_&-p5t7IyfH=aU_*gsW#dwglepJ&OKBmF^oVigDzIlw&+u=&2>yQz z9~no!`APV@72hhIl;O`y(nig;XVoze)YsFS)(*h8Re?RX5&k*Ko;R)eFnoQ0J^zzw zJvSZkX872PWY7OfM$c#P;Y6Y4pKw%0Pw6A@=>w5pB;$l`*G;e61fMZf(i7X*==v;r z;C%SSifx}neG0XoEZRbhCnVlTPYl9OsCq8Cjj=O #define bug printf #endif /* DEBUG_H */ \ No newline at end of file diff --git a/SheepShaver/src/EthernetDriver/ether.cpp b/SheepShaver/src/EthernetDriver/ether.cpp deleted file mode 100644 index 7382ad4fa..000000000 --- a/SheepShaver/src/EthernetDriver/ether.cpp +++ /dev/null @@ -1,1738 +0,0 @@ -/* - * ether.cpp - SheepShaver Ethernet Device Driver (DLPI) - * - * SheepShaver (C) 1997-2005 Marc Hellwig and Christian Bauer - * - * 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 - */ - -/* - * TODO - * - 802.2 TEST/XID - * - MIB statistics - */ - -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "ether.h" -#include "ether_defs.h" -#include "macos_util.h" - -#define DEBUG 0 -#include "debug.h" - -// Packet types -enum { - kPktDIX = 0, - kPkt8022SAP = 1, - kPkt8022GroupSAP = 2, - kPkt8022SNAP = 3, - kPktIPX = 4, - kPktUnknown = 5 -}; - - -/* - * Stream private data structure - */ - -static const int kGroupSAPMapSize = 128/32; // Number of 32-bit values we need for 128 bits -static const int kGSshift = 6; -static const int kGSmask = 0x1F; - -struct multicast_node { - nw_multicast_node_p next; - uint8 addr[kEnetPhysicalAddressLength]; -}; - -struct DLPIStream { - void SetGroupSAP(uint8 sap) - { - group_sap[sap >> kGSshift] |= (1L << ((sap >> 1) & kGSmask)); - } - - void ClearGroupSAP(uint8 sap) - { - group_sap[sap >> kGSshift] &= ~(1L << ((sap >> 1) & kGSmask)); - } - - void ClearAllGroupSAPs(void) - { - for (int i=0; i> kGSshift] & (1L << ((sap >> 1) & kGSmask)); - } - - void AddMulticast(uint8 *addr) - { - multicast_node *n = (multicast_node *)Mac2HostAddr(Mac_sysalloc(sizeof(multicast_node))); - memcpy(n->addr, addr, kEnetPhysicalAddressLength); - n->next = multicast_list; - multicast_list = n; - } - - void RemoveMulticast(uint8 *addr) - { - multicast_node *p = multicast_list; - while (p) { - if (memcmp(addr, p->addr, kEnetPhysicalAddressLength) == 0) - goto found; - p = p->next; - } - return; - found: - multicast_node *q = (multicast_node *)&multicast_list; - while (q) { - if (q->next == p) { - q->next = p->next; - Mac_sysfree(Host2MacAddr((uint8 *)p)); - return; - } - q = q->next; - } - } - - uint8 *IsMulticastRegistered(uint8 *addr) - { - multicast_node *n = multicast_list; - while (n) { - if (memcmp(addr, n->addr, kEnetPhysicalAddressLength) == 0) - return n->addr; - n = n->next; - } - return NULL; - } - - nw_uint32 minor_num; // Minor device number of this stream - nw_uint32 dlpi_state; // DLPI state of this stream - nw_uint32 flags; // Flags - nw_uint16 dlsap; // SAP bound to this stream - nw_bool framing_8022; // Using 802.2 framing? This is only used to report the MAC type for DL_INFO_ACK and can be set with an ioctl() call - nw_bool raw_mode; // Using raw mode? Header is treated as data - nw_queue_p rdq; // Read queue for this stream - nw_uint32 group_sap[kGroupSAPMapSize]; // Map of bound group SAPs - uint8 snap[k8022SNAPLength]; // SNAP bound to this stream - nw_multicast_node_p multicast_list; // List of enabled multicast addresses -}; - -// Hack to make DLPIStream list initialization early to NULL (do we really need this?) -struct DLPIStreamInit { - DLPIStreamInit(nw_DLPIStream_p *dlpi_stream_p) { *dlpi_stream_p = NULL; } -}; - -// Stream flags -enum { - kSnapStream = 0x00000001, - kAcceptMulticasts = 0x00000002, - kAcceptAll8022Packets = 0x00000004, - kFastPathMode = 0x00000008 -}; - -// List of opened streams (used internally by OpenTransport) -static nw_DLPIStream_p dlpi_stream_list; -static DLPIStreamInit dlpi_stream_init(&dlpi_stream_list); - -// Are we open? -bool ether_driver_opened = false; - -// Our ethernet hardware address -static uint8 hardware_address[6] = {0, 0, 0, 0, 0, 0}; - -// Statistics -int32 num_wput = 0; -int32 num_error_acks = 0; -int32 num_tx_packets = 0; -int32 num_tx_raw_packets = 0; -int32 num_tx_normal_packets = 0; -int32 num_tx_buffer_full = 0; -int32 num_rx_packets = 0; -int32 num_ether_irq = 0; -int32 num_unitdata_ind = 0; -int32 num_rx_fastpath = 0; -int32 num_rx_no_mem = 0; -int32 num_rx_dropped = 0; -int32 num_rx_stream_not_ready = 0; -int32 num_rx_no_unitdata_mem = 0; - - -// Function pointers of imported functions -typedef mblk_t *(*allocb_ptr)(size_t size, int pri); -static uint32 allocb_tvect = 0; -mblk_t *allocb(size_t arg1, int arg2) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS2(allocb_ptr, allocb_tvect, arg1, arg2)); -} -typedef void (*freeb_ptr)(mblk_t *); -static uint32 freeb_tvect = 0; -static inline void freeb(mblk_t *arg1) -{ - CallMacOS1(freeb_ptr, freeb_tvect, arg1); -} -typedef int16 (*freemsg_ptr)(mblk_t *); -static uint32 freemsg_tvect = 0; -static inline int16 freemsg(mblk_t *arg1) -{ - return (int16)CallMacOS1(freemsg_ptr, freemsg_tvect, arg1); -} -typedef mblk_t *(*copyb_ptr)(mblk_t *); -static uint32 copyb_tvect = 0; -static inline mblk_t *copyb(mblk_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(copyb_ptr, copyb_tvect, arg1)); -} -typedef mblk_t *(*dupmsg_ptr)(mblk_t *); -static uint32 dupmsg_tvect = 0; -static inline mblk_t *dupmsg(mblk_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(dupmsg_ptr, dupmsg_tvect, arg1)); -} -typedef mblk_t *(*getq_ptr)(queue_t *); -static uint32 getq_tvect = 0; -static inline mblk_t *getq(queue_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(getq_ptr, getq_tvect, arg1)); -} -typedef int (*putq_ptr)(queue_t *, mblk_t *); -static uint32 putq_tvect = 0; -static inline int putq(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(putq_ptr, putq_tvect, arg1, arg2); -} -typedef int (*putnext_ptr)(queue_t *, mblk_t *); -static uint32 putnext_tvect = 0; -static inline int putnext(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(putnext_ptr, putnext_tvect, arg1, arg2); -} -typedef int (*putnextctl1_ptr)(queue_t *, int type, int c); -static uint32 putnextctl1_tvect = 0; -static inline int putnextctl1(queue_t *arg1, int arg2, int arg3) -{ - return (int)CallMacOS3(putnextctl1_ptr, putnextctl1_tvect, arg1, arg2, arg3); -} -typedef int (*canputnext_ptr)(queue_t *); -static uint32 canputnext_tvect = 0; -static inline int canputnext(queue_t *arg1) -{ - return (int)CallMacOS1(canputnext_ptr, canputnext_tvect, arg1); -} -typedef int (*qreply_ptr)(queue_t *, mblk_t *); -static uint32 qreply_tvect = 0; -static inline int qreply(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(qreply_ptr, qreply_tvect, arg1, arg2); -} -typedef void (*flushq_ptr)(queue_t *, int flag); -static uint32 flushq_tvect = 0; -static inline void flushq(queue_t *arg1, int arg2) -{ - CallMacOS2(flushq_ptr, flushq_tvect, arg1, arg2); -} -typedef int (*msgdsize_ptr)(const mblk_t *); -static uint32 msgdsize_tvect = 0; -static inline int msgdsize(const mblk_t *arg1) -{ - return (int)CallMacOS1(msgdsize_ptr, msgdsize_tvect, arg1); -} -typedef void (*otenterint_ptr)(void); -static uint32 otenterint_tvect = 0; -void OTEnterInterrupt(void) -{ - CallMacOS(otenterint_ptr, otenterint_tvect); -} -typedef void (*otleaveint_ptr)(void); -static uint32 otleaveint_tvect = 0; -void OTLeaveInterrupt(void) -{ - CallMacOS(otleaveint_ptr, otleaveint_tvect); -} -typedef int (*mi_open_comm_ptr)(DLPIStream **mi_opp_orig, size_t size, queue_t *q, void *dev, int flag, int sflag, void *credp); -static uint32 mi_open_comm_tvect = 0; -static inline int mi_open_comm(DLPIStream **arg1, size_t arg2, queue_t *arg3, void *arg4, int arg5, int arg6, void *arg7) -{ - return (int)CallMacOS7(mi_open_comm_ptr, mi_open_comm_tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7); -} -typedef int (*mi_close_comm_ptr)(DLPIStream **mi_opp_orig, queue_t *q); -static uint32 mi_close_comm_tvect = 0; -static inline int mi_close_comm(DLPIStream **arg1, queue_t *arg2) -{ - return (int)CallMacOS2(mi_close_comm_ptr, mi_close_comm_tvect, arg1, arg2); -} -typedef DLPIStream *(*mi_next_ptr_ptr)(DLPIStream *); -static uint32 mi_next_ptr_tvect = 0; -static inline DLPIStream *mi_next_ptr(DLPIStream *arg1) -{ - return (DLPIStream *)Mac2HostAddr((uint32)CallMacOS1(mi_next_ptr_ptr, mi_next_ptr_tvect, arg1)); -} -#ifdef USE_ETHER_FULL_DRIVER -typedef void (*ether_dispatch_packet_ptr)(uint32 p, uint32 size); -static uint32 ether_dispatch_packet_tvect = 0; -#endif - -// Prototypes -static void ether_ioctl(DLPIStream *the_stream, queue_t* q, mblk_t* mp); -static void ether_flush(queue_t* q, mblk_t* mp); -static mblk_t *build_tx_packet_header(DLPIStream *the_stream, mblk_t *mp, bool fast_path); -static void transmit_packet(mblk_t *mp); -static void DLPI_error_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim, uint32 err, uint32 uerr); -static void DLPI_ok_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim); -static void DLPI_info(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_phys_addr(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_subs_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_subs_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_enable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_disable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_unit_data(DLPIStream *the_stream, queue_t *q, mblk_t *mp); - - -/* - * Initialize ethernet stream module - */ - -static uint8 InitStreamModuleImpl(void *theID) -{ - D(bug("InitStreamModule\n")); - - // Don't re-open if already open - if (ether_driver_opened) - return true; - ether_driver_opened = false; - - // Import functions from OTKernelLib - allocb_tvect = FindLibSymbol("\013OTKernelLib", "\006allocb"); - D(bug("allocb TVECT at %08lx\n", allocb_tvect)); - if (allocb_tvect == 0) - return false; - freeb_tvect = FindLibSymbol("\013OTKernelLib", "\005freeb"); - D(bug("freeb TVECT at %08lx\n", freeb_tvect)); - if (freeb_tvect == 0) - return false; - freemsg_tvect = FindLibSymbol("\013OTKernelLib", "\007freemsg"); - D(bug("freemsg TVECT at %08lx\n", freemsg_tvect)); - if (freemsg_tvect == 0) - return false; - copyb_tvect = FindLibSymbol("\013OTKernelLib", "\005copyb"); - D(bug("copyb TVECT at %08lx\n", copyb_tvect)); - if (copyb_tvect == 0) - return false; - dupmsg_tvect = FindLibSymbol("\013OTKernelLib", "\006dupmsg"); - D(bug("dupmsg TVECT at %08lx\n", dupmsg_tvect)); - if (dupmsg_tvect == 0) - return false; - getq_tvect = FindLibSymbol("\013OTKernelLib", "\004getq"); - D(bug("getq TVECT at %08lx\n", getq_tvect)); - if (getq_tvect == 0) - return false; - putq_tvect = FindLibSymbol("\013OTKernelLib", "\004putq"); - D(bug("putq TVECT at %08lx\n", putq_tvect)); - if (putq_tvect == 0) - return false; - putnext_tvect = FindLibSymbol("\013OTKernelLib", "\007putnext"); - D(bug("putnext TVECT at %08lx\n", putnext_tvect)); - if (putnext_tvect == 0) - return false; - putnextctl1_tvect = FindLibSymbol("\013OTKernelLib", "\013putnextctl1"); - D(bug("putnextctl1 TVECT at %08lx\n", putnextctl1_tvect)); - if (putnextctl1_tvect == 0) - return false; - canputnext_tvect = FindLibSymbol("\013OTKernelLib", "\012canputnext"); - D(bug("canputnext TVECT at %08lx\n", canputnext_tvect)); - if (canputnext_tvect == 0) - return false; - qreply_tvect = FindLibSymbol("\013OTKernelLib", "\006qreply"); - D(bug("qreply TVECT at %08lx\n", qreply_tvect)); - if (qreply_tvect == 0) - return false; - flushq_tvect = FindLibSymbol("\013OTKernelLib", "\006flushq"); - D(bug("flushq TVECT at %08lx\n", flushq_tvect)); - if (flushq_tvect == 0) - return false; - msgdsize_tvect = FindLibSymbol("\013OTKernelLib", "\010msgdsize"); - D(bug("msgdsize TVECT at %08lx\n", msgdsize_tvect)); - if (msgdsize_tvect == 0) - return false; - otenterint_tvect = FindLibSymbol("\017OTKernelUtilLib", "\020OTEnterInterrupt"); - D(bug("OTEnterInterrupt TVECT at %08lx\n", otenterint_tvect)); - if (otenterint_tvect == 0) - return false; - otleaveint_tvect = FindLibSymbol("\017OTKernelUtilLib", "\020OTLeaveInterrupt"); - D(bug("OTLeaveInterrupt TVECT at %08lx\n", otleaveint_tvect)); - if (otleaveint_tvect == 0) - return false; - mi_open_comm_tvect = FindLibSymbol("\013OTKernelLib", "\014mi_open_comm"); - D(bug("mi_open_comm TVECT at %08lx\n", mi_open_comm_tvect)); - if (mi_open_comm_tvect == 0) - return false; - mi_close_comm_tvect = FindLibSymbol("\013OTKernelLib", "\015mi_close_comm"); - D(bug("mi_close_comm TVECT at %08lx\n", mi_close_comm_tvect)); - if (mi_close_comm_tvect == 0) - return false; - mi_next_ptr_tvect = FindLibSymbol("\013OTKernelLib", "\013mi_next_ptr"); - D(bug("mi_next_ptr TVECT at %08lx\n", mi_next_ptr_tvect)); - if (mi_next_ptr_tvect == 0) - return false; - -#ifndef USE_ETHER_FULL_DRIVER - // Initialize stream list (which might be leftover) - dlpi_stream_list = NULL; - - // Ask add-on for ethernet hardware address - AO_get_ethernet_address(Host2MacAddr(hardware_address)); -#endif - - // Yes, we're open - ether_driver_opened = true; - return true; -} - -uint8 InitStreamModule(void *theID) -{ - // Common initialization code - bool net_open = InitStreamModuleImpl(theID); - - // Call InitStreamModule() in native side -#ifdef BUILD_ETHER_FULL_DRIVER - extern bool NativeInitStreamModule(void *); - if (!NativeInitStreamModule((void *)ether_dispatch_packet)) - net_open = false; -#endif - - // Import functions from the Ethernet driver -#ifdef USE_ETHER_FULL_DRIVER - ether_dispatch_packet_tvect = (uintptr)theID; - D(bug("ether_dispatch_packet TVECT at %08lx\n", ether_dispatch_packet_tvect)); - if (ether_dispatch_packet_tvect == 0) - net_open = false; -#endif - - return net_open; -} - - -/* - * Terminate ethernet stream module - */ - -static void TerminateStreamModuleImpl(void) -{ - D(bug("TerminateStreamModule\n")); - -#ifndef USE_ETHER_FULL_DRIVER - // This happens sometimes. I don't know why. - if (dlpi_stream_list != NULL) - printf("FATAL: TerminateStreamModule() called, but streams still open\n"); -#endif - - // Sorry, we're closed - ether_driver_opened = false; -} - -void TerminateStreamModule(void) -{ - // Common termination code - TerminateStreamModuleImpl(); - - // Call TerminateStreamModule() in native side -#ifdef BUILD_ETHER_FULL_DRIVER - extern void NativeTerminateStreamModule(void); - NativeTerminateStreamModule(); -#endif -} - - -/* - * Open new stream - */ - -int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds) -{ - D(bug("ether_open(%p,%p,%d,%d,%p)\n", rdq, dev, flag, sflag, creds)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_open(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // If we're being reopened, just return - if (rdq->q_ptr != NULL) - return 0; - - // Allocate DLPIStream structure - int err = mi_open_comm((DLPIStream **)&dlpi_stream_list, sizeof(DLPIStream), rdq, dev, flag, sflag, creds); - if (err) - return err; - DLPIStream *the_stream = (DLPIStream *)rdq->q_ptr; - the_stream->rdq = rdq; - the_stream->dlpi_state = DL_UNBOUND; - the_stream->flags = 0; - the_stream->dlsap = 0; - the_stream->framing_8022 = false; - the_stream->raw_mode = false; - the_stream->multicast_list = NULL; - return 0; -} - - -/* - * Close stream - */ - -int ether_close(queue_t *rdq, int flag, void *creds) -{ - D(bug("ether_close(%p,%d,%p)\n", rdq, flag, creds)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_close(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // Get stream - DLPIStream *the_stream = (DLPIStream *)rdq->q_ptr; - - // Don't close if never opened - if (the_stream == NULL) - return 0; - - // Disable all registered multicast addresses - while (the_stream->multicast_list) { - AO_disable_multicast(Host2MacAddr(the_stream->multicast_list->addr)); - the_stream->RemoveMulticast(the_stream->multicast_list->addr); - } - the_stream->multicast_list = NULL; - - // Delete the DLPIStream - return mi_close_comm((DLPIStream **)&dlpi_stream_list, rdq); -} - - -/* - * Put something on the write queue - */ - -int ether_wput(queue_t *q, mblk_t *mp) -{ - D(bug("ether_wput(%p,%p)\n", q, mp)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_wput(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // Get stream - DLPIStream *the_stream = (DLPIStream *)q->q_ptr; - if (the_stream == NULL) - return MAC_ENXIO; - - D(bug(" db_type %d\n", (int)mp->b_datap->db_type)); - switch (mp->b_datap->db_type) { - - case M_DATA: - // Transmit raw packet - D(bug(" raw packet\n")); - num_tx_raw_packets++; - transmit_packet(mp); - break; - - case M_PROTO: - case M_PCPROTO: { - union DL_primitives *dlp = (union DL_primitives *)(void *)mp->b_rptr; - uint32 prim = dlp->dl_primitive; - D(bug(" dl_primitive %d\n", prim)); - switch (prim) { - case DL_UNITDATA_REQ: - // Transmit normal packet - num_tx_normal_packets++; - DLPI_unit_data(the_stream, q, mp); - break; - - case DL_INFO_REQ: - DLPI_info(the_stream, q, mp); - break; - - case DL_PHYS_ADDR_REQ: - DLPI_phys_addr(the_stream, q, mp); - break; - - case DL_BIND_REQ: - DLPI_bind(the_stream, q, mp); - break; - - case DL_UNBIND_REQ: - DLPI_unbind(the_stream, q, mp); - break; - - case DL_SUBS_BIND_REQ: - DLPI_subs_bind(the_stream, q, mp); - break; - - case DL_SUBS_UNBIND_REQ: - DLPI_subs_unbind(the_stream, q, mp); - break; - - case DL_ENABMULTI_REQ: - DLPI_enable_multi(the_stream, q, mp); - break; - - case DL_DISABMULTI_REQ: - DLPI_disable_multi(the_stream, q, mp); - break; - - default: - D(bug("WARNING: ether_wsrv(): Unknown primitive\n")); - DLPI_error_ack(the_stream, q, mp, prim, DL_NOTSUPPORTED, 0); - break; - } - break; - } - - case M_IOCTL: - ether_ioctl(the_stream, q, mp); - break; - - case M_FLUSH: - ether_flush(q, mp); - break; - - default: - D(bug("WARNING: ether_wput(): Unknown message type\n")); - freemsg(mp); - break; - } - num_wput++; - return 0; -} - - -/* - * Dequeue and process messages from the read queue - */ - -int ether_rsrv(queue_t *q) -{ - mblk_t *mp; - while ((mp = getq(q)) != NULL) { - if (canputnext(q)) - putnext(q, mp); - else { - freemsg(mp); - flushq(q, FLUSHDATA); - break; - } - } - return 0; -} - - -/* - * Handle ioctl calls - */ - -static void ether_ioctl(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - struct iocblk *ioc = (struct iocblk *)(void *)mp->b_rptr; - D(bug(" ether_ioctl(%p,%p) cmd %d\n", q, mp, (int)ioc->ioc_cmd)); - - switch (ioc->ioc_cmd) { - - case I_OTSetFramingType: { // Toggles what the general info primitive returns for dl_mac_type in dl_info_ack_t structure - mblk_t *info_mp = mp->b_cont; - if (info_mp == NULL || ((info_mp->b_wptr - info_mp->b_rptr) != sizeof(uint32))) { - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - uint32 framing_type = ntohl(*(uint32 *)(void *)info_mp->b_rptr); - D(bug(" I_OTSetFramingType type %d\n", framing_type)); - if (framing_type != kOTGetFramingValue) - the_stream->framing_8022 = (framing_type == kOTFraming8022); - mp->b_cont = NULL; - freemsg(info_mp); - if (the_stream->framing_8022) - ioc->ioc_rval = kOTFraming8022; - else - ioc->ioc_rval = kOTFramingEthernet; - goto ioctl_ok; - } - - case DL_IOC_HDR_INFO: { // Special Mentat call, for fast transmits - D(bug(" DL_IOC_HDR_INFO\n")); - mblk_t *info_mp = mp->b_cont; - - // Copy DL_UNITDATA_REQ block - mblk_t *unitdata_mp = copyb(info_mp); - if (unitdata_mp == NULL) { - ioc->ioc_error = MAC_ENOMEM; - goto ioctl_error; - } - unitdata_mp->b_datap->db_type = M_PROTO; - - // Construct header (converts DL_UNITDATA_REQ -> M_DATA) - mblk_t *header_mp = build_tx_packet_header(the_stream, unitdata_mp, true); - - if (header_mp == NULL) { - // Could not allocate a message block large enough - ioc->ioc_error = MAC_ENOMEM; - goto ioctl_error; - } - - // Attach header block at the end - mp->b_cont->b_cont = header_mp; - the_stream->flags |= kFastPathMode; - goto ioctl_ok; - } - - case I_OTSetRawMode: { - mblk_t *info_mp = mp->b_cont; - dl_recv_control_t *dlrc; - if (info_mp == NULL || ((info_mp->b_wptr - info_mp->b_rptr) != sizeof(dlrc->dl_primitive))) { - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - dlrc = (dl_recv_control_t *)(void *)info_mp->b_rptr; - D(bug(" I_OTSetRawMode primitive %d\n", (int)dlrc->dl_primitive)); - the_stream->raw_mode = true; - goto ioctl_ok; - } - - default: - D(bug("WARNING: Unknown ether_ioctl() call\n")); - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - -ioctl_ok: - ioc->ioc_count = 0; - for (mblk_t *mp1 = mp; (mp1 = mp1->b_cont) != NULL;) - ioc->ioc_count += mp1->b_wptr - mp1->b_rptr; - ioc->ioc_error = 0; - mp->b_datap->db_type = M_IOCACK; - qreply(q, mp); - return; - -ioctl_error: - mp->b_datap->db_type = M_IOCNAK; - qreply(q, mp); - return; -} - - -/* - * Flush call, send it up to the read side of the stream - */ - -static void ether_flush(queue_t* q, mblk_t* mp) -{ - D(bug(" ether_flush(%p,%p)\n", q, mp)); - - uint8 *rptr = mp->b_rptr; - if (*rptr & FLUSHW) - flushq(q, FLUSHALL); - if (*rptr & FLUSHR) { - flushq(RD(q), FLUSHALL); - *rptr &= ~FLUSHW; - qreply(q, mp); - } else - freemsg(mp); -} - - -/* - * Classify packet into the different types of protocols - */ - -static uint16 classify_packet_type(uint16 primarySAP, uint16 secondarySAP) -{ - if (primarySAP >= kMinDIXSAP) - return kPktDIX; - - if ((primarySAP == kIPXSAP) && (secondarySAP == kIPXSAP)) - return kPktIPX; - - if (primarySAP == kSNAPSAP) - return kPkt8022SNAP; - - if (primarySAP <= k8022GlobalSAP) - return kPkt8022SAP; - - return kPktUnknown; -} - - -/* - * Check if the address is a multicast, broadcast or standard address - */ - -static int32 get_address_type(uint8 *addr) -{ - if (addr[0] & 1) { // Multicast/broadcast flag - if (OTIs48BitBroadcastAddress(addr)) - return keaBroadcast; - else - return keaMulticast; - } else - return keaStandardAddress; -} - - -/* - * Reuse a message block, make room for more data - */ - -static mblk_t *reuse_message_block(mblk_t *mp, uint16 needed_size) -{ - mblk_t *nmp; - - if ((mp->b_datap->db_ref == 1) && ((mp->b_datap->db_lim - mp->b_datap->db_base) >= needed_size)) { - mp->b_datap->db_type = M_DATA; - mp->b_rptr = mp->b_datap->db_base; - mp->b_wptr = mp->b_datap->db_base + needed_size; - } else { - nmp = mp->b_cont; // Grab the M_DATA blocks - mp->b_cont = NULL; // Detach the M_(PC)PROTO - freemsg(mp); // Free the M_(PC)PROTO - mp = nmp; // Point to the M_DATA blocks - - // Try to get space on the first M_DATA block - if (mp && (mp->b_datap->db_ref == 1) && ((mp->b_rptr - mp->b_datap->db_base) >= needed_size)) - mp->b_rptr -= needed_size; - else { - // Try to allocate a new message - if ((nmp = allocb(needed_size, BPRI_HI)) == NULL) { - // Could not get a new message block so lets forget about the message altogether - freemsg(mp); // Free the original M_DATA portion of the message - mp = NULL; // Indicates the reuse failed - } else { - nmp->b_cont = mp; // Attach the new message block as the head - nmp->b_wptr += needed_size; - mp = nmp; - } - } - } - - return mp; -} - - -/* - * Built header for packet to be transmitted (convert DL_UNITDATA_REQ -> M_DATA) - * The passed-in message has the header info in the first message block and the data - * in the following blocks - */ - -static mblk_t *build_tx_packet_header(DLPIStream *the_stream, mblk_t *mp, bool fast_path) -{ - // Only handle unit_data requests - dl_unitdata_req_t *req = (dl_unitdata_req_t *)(void *)mp->b_rptr; - if (req->dl_primitive != DL_UNITDATA_REQ) { - freemsg(mp); - return NULL; - } - - // Extract destination address and its length - uint8 *destAddrOrig = ((uint8 *)req) + req->dl_dest_addr_offset; - uint32 destAddrLen = req->dl_dest_addr_length; - uint8 ctrl = 0x03; - - // Extract DLSAP - uint16 dlsap; - switch (destAddrLen) { - case kEnetPhysicalAddressLength: - dlsap = the_stream->dlsap; - break; - case kEnetAndSAPAddressLength: - dlsap = ntohs(*(uint16 *)(destAddrOrig + kEnetPhysicalAddressLength)); - break; - case kEnetPhysicalAddressLength + k8022DLSAPLength + k8022SNAPLength: // SNAP SAP - dlsap = ntohs(*(uint16 *)(destAddrOrig + kEnetPhysicalAddressLength)); - break; - default: - dlsap = the_stream->dlsap; - break; - } - - // Extract data size (excluding header info) and packet type - uint16 datasize = msgdsize(mp); - uint16 packetType = classify_packet_type(the_stream->dlsap, dlsap); - - // Calculate header size and protocol type/size field - uint16 hdrsize, proto; - switch (packetType) { - case kPktDIX: - hdrsize = kEnetPacketHeaderLength; - proto = dlsap; - break; - case kPkt8022SAP: - hdrsize = kEnetPacketHeaderLength + k8022BasicHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize + k8022BasicHeaderLength; - break; - case kPkt8022SNAP: - hdrsize = kEnetPacketHeaderLength + k8022SNAPHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize + k8022SNAPHeaderLength; - break; - case kPktIPX: - hdrsize = kEnetPacketHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize; - break; - default: - hdrsize = kEnetPacketHeaderLength; - proto = dlsap; - break; - } - - // We need to copy the dest address info in the message before we can reuse it - uint8 destAddrCopy[kMaxBoundAddrLength]; - memcpy(destAddrCopy, destAddrOrig, destAddrLen); - - // Resize header info in message block - if ((mp = reuse_message_block(mp, hdrsize)) == NULL) - return NULL; - struct T8022FullPacketHeader *packetHeader = (struct T8022FullPacketHeader *)(void *)mp->b_rptr; - - // Set protocol type/size field - packetHeader->fEnetPart.fProto = proto; - - // Set destination ethernet address - OTCopy48BitAddress(destAddrCopy, packetHeader->fEnetPart.fDestAddr); - - // Set other header fields - switch (packetType) { - case kPkt8022SAP: - packetHeader->f8022Part.fDSAP = (uint8)dlsap; - packetHeader->f8022Part.fSSAP = (uint8)the_stream->dlsap; - packetHeader->f8022Part.fCtrl = ctrl; - break; - case kPkt8022SNAP: { - uint8 *snapStart; - packetHeader->f8022Part.fDSAP = (uint8)dlsap; - packetHeader->f8022Part.fSSAP = (uint8)the_stream->dlsap; - packetHeader->f8022Part.fCtrl = ctrl; - if (destAddrLen >= kEnetAndSAPAddressLength + k8022SNAPLength) - snapStart = destAddrCopy + kEnetAndSAPAddressLength; - else - snapStart = the_stream->snap; - OTCopy8022SNAP(snapStart, packetHeader->f8022Part.fSNAP); - break; - } - } - - // Return updated message - return mp; -} - - -/* - * Transmit packet - */ - -static void transmit_packet(mblk_t *mp) -{ - EnetPacketHeader *enetHeader = (EnetPacketHeader *)(void *)mp->b_rptr; - - // Fill in length in 802.3 packets - if (enetHeader->fProto == 0) - enetHeader->fProto = msgdsize(mp) - sizeof(EnetPacketHeader); - - // Fill in ethernet source address - OTCopy48BitAddress(hardware_address, enetHeader->fSourceAddr); - - // Tell add-on to transmit packet - AO_transmit_packet(Host2MacAddr((uint8 *)mp)); - freemsg(mp); -} - - -/* - * Handle incoming packet (one stream), construct DL_UNITDATA_IND message - */ - -static void handle_received_packet(DLPIStream *the_stream, mblk_t *mp, uint16 packet_type, int32 dest_addr_type) -{ - // Find address and header length - uint32 addr_len; - uint32 header_len; - switch (packet_type) { - case kPkt8022SAP: - addr_len = kEnetAndSAPAddressLength; - header_len = kEnetPacketHeaderLength + k8022BasicHeaderLength; - break; - case kPkt8022SNAP: - addr_len = kEnetAndSAPAddressLength + k8022SNAPLength; - header_len = kEnetPacketHeaderLength + k8022SNAPHeaderLength; - break; - default: // DIX and IPX - addr_len = kEnetAndSAPAddressLength; - header_len = kEnetPacketHeaderLength; - break; - } - - // In Fast Path mode, don't send DL_UNITDATA_IND messages for unicast packets - if ((the_stream->flags & kFastPathMode) && dest_addr_type == keaStandardAddress) { - if (the_stream->raw_mode == false) - mp->b_rptr += header_len; - num_rx_fastpath++; - putq(the_stream->rdq, mp); - return; - } - - // Allocate the dl_unitdata_ind_t message - mblk_t *nmp; - if ((nmp = allocb(sizeof(dl_unitdata_ind_t) + 2*addr_len, BPRI_HI)) == NULL) { - freemsg(mp); - num_rx_no_unitdata_mem++; - return; - } - - // Set message type - nmp->b_datap->db_type = M_PROTO; - dl_unitdata_ind_t *ind = (dl_unitdata_ind_t*)(void *)nmp->b_rptr; - ind->dl_primitive = DL_UNITDATA_IND; - nmp->b_wptr += (sizeof(dl_unitdata_ind_t) + 2*addr_len); - - // Link M_DATA block - nmp->b_cont = mp; - - // Set address fields - ind->dl_dest_addr_length = addr_len; - ind->dl_dest_addr_offset = sizeof(dl_unitdata_ind_t); - ind->dl_src_addr_length = addr_len; - ind->dl_src_addr_offset = sizeof(dl_unitdata_ind_t) + addr_len; - - // Set address type - ind->dl_group_address = dest_addr_type; - - // Set address fields - T8022FullPacketHeader *packetHeader = (T8022FullPacketHeader *)(void *)mp->b_rptr; - T8022AddressStruct *destAddr = ((T8022AddressStruct*)(nmp->b_rptr + ind->dl_dest_addr_offset)); - T8022AddressStruct *srcAddr = ((T8022AddressStruct*)(nmp->b_rptr + ind->dl_src_addr_offset)); - - OTCopy48BitAddress(packetHeader->fEnetPart.fDestAddr, destAddr->fHWAddr); - OTCopy48BitAddress(packetHeader->fEnetPart.fSourceAddr, srcAddr->fHWAddr); - - destAddr->fSAP = packetHeader->f8022Part.fDSAP; - srcAddr->fSAP = packetHeader->f8022Part.fSSAP; - - if (packet_type == kPkt8022SNAP) { - OTCopy8022SNAP(packetHeader->f8022Part.fSNAP, destAddr->fSNAP); - OTCopy8022SNAP(packetHeader->f8022Part.fSNAP, srcAddr->fSNAP); - } - - // "Hide" the ethernet and protocol header(s) - if (the_stream->raw_mode == false) - mp->b_rptr += header_len; - - // Pass message up the stream - num_unitdata_ind++; - putq(the_stream->rdq, nmp); - return; -} - - -/* - * Packet received, distribute it to the streams that want it - */ - -void ether_packet_received(mblk_t *mp) -{ - // Extract address and types - EnetPacketHeader *pkt = (EnetPacketHeader *)(void *)mp->b_rptr; - T8022FullPacketHeader *fullpkt = (T8022FullPacketHeader *)pkt; - uint16 sourceSAP, destSAP; - destSAP = fullpkt->fEnetPart.fProto; - if (destSAP >= kMinDIXSAP) { - // Classic ethernet - sourceSAP = destSAP; - } else { - destSAP = fullpkt->f8022Part.fDSAP; - sourceSAP = fullpkt->f8022Part.fSSAP; - } - uint16 packetType = classify_packet_type(sourceSAP, destSAP); - int32 destAddressType = get_address_type(pkt->fDestAddr); - - // Look which streams want it - DLPIStream *the_stream, *found_stream = NULL; - uint16 found_packetType = 0; - int32 found_destAddressType = 0; - for (the_stream = dlpi_stream_list; the_stream != NULL; the_stream = mi_next_ptr(the_stream)) { - - // Don't send to unbound streams - if (the_stream->dlpi_state == DL_UNBOUND) - continue; - - // Does this stream want all 802.2 packets? - if ((the_stream->flags & kAcceptAll8022Packets) && (destSAP <= 0xff)) - goto type_found; - - // No, check SAP/SNAP - if (destSAP == the_stream->dlsap) { - if (the_stream->flags & kSnapStream) { - // Check SNAPs if necessary - uint8 sum = fullpkt->f8022Part.fSNAP[0] ^ the_stream->snap[0]; - sum |= fullpkt->f8022Part.fSNAP[1] ^ the_stream->snap[1]; - sum |= fullpkt->f8022Part.fSNAP[2] ^ the_stream->snap[2]; - sum |= fullpkt->f8022Part.fSNAP[3] ^ the_stream->snap[3]; - sum |= fullpkt->f8022Part.fSNAP[4] ^ the_stream->snap[4]; - if (sum == 0) - goto type_found; - } else { - // No SNAP, found a match since saps match - goto type_found; - } - } else { - // Check for an 802.3 Group/Global (odd) - if (((packetType == kPkt8022SAP) || (packetType == kPkt8022SNAP)) && (destSAP & 1) && the_stream->TestGroupSAP(destSAP)) - goto type_found; - } - - // No stream for this SAP/SNAP found - continue; - -type_found: - // If it's a multicast packet, it must be in the stream's multicast list - if ((destAddressType == keaMulticast) && (the_stream->flags & kAcceptMulticasts) && (!the_stream->IsMulticastRegistered(pkt->fDestAddr))) - continue; - - // Send packet to stream - // found_stream keeps a pointer to the previously found stream, so that only the last - // stream gets the original message, the other ones get duplicates - if (found_stream) - handle_received_packet(found_stream, dupmsg(mp), found_packetType, found_destAddressType); - found_stream = the_stream; - found_packetType = packetType; - found_destAddressType = destAddressType; - } - - // Send original message to last found stream - if (found_stream) - handle_received_packet(found_stream, mp, found_packetType, found_destAddressType); - else { - freemsg(mp); // Nobody wants it *snief* - num_rx_dropped++; - } -} - -void ether_dispatch_packet(uint32 p, uint32 size) -{ -#ifdef USE_ETHER_FULL_DRIVER - // Call handler from the Ethernet driver - D(bug("ether_dispatch_packet\n")); - D(bug(" packet data at %p, %d bytes\n", p, size)); - CallMacOS2(ether_dispatch_packet_ptr, ether_dispatch_packet_tvect, p, size); -#else - // Wrap packet in message block - num_rx_packets++; - mblk_t *mp; - if ((mp = allocb(size, 0)) != NULL) { - D(bug(" packet data at %p\n", (void *)mp->b_rptr)); - Mac2Host_memcpy(mp->b_rptr, p, size); - mp->b_wptr += size; - ether_packet_received(mp); - } else { - D(bug("WARNING: Cannot allocate mblk for received packet\n")); - num_rx_no_mem++; - } -#endif -} - - -/* - * Build and send an error acknowledge - */ - -static void DLPI_error_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim, uint32 err, uint32 uerr) -{ - D(bug(" DLPI_error_ack(%p,%p) prim %d, err %d, uerr %d\n", the_stream, ack_mp, prim, err, uerr)); - num_error_acks++; - - if (ack_mp != NULL) - freemsg(ack_mp); - if ((ack_mp = allocb(sizeof(dl_error_ack_t), BPRI_HI)) == NULL) - return; - - ack_mp->b_datap->db_type = M_PCPROTO; - dl_error_ack_t *errp = (dl_error_ack_t *)(void *)ack_mp->b_wptr; - errp->dl_primitive = DL_ERROR_ACK; - errp->dl_error_primitive = prim; - errp->dl_errno = err; - errp->dl_unix_errno = uerr; - ack_mp->b_wptr += sizeof(dl_error_ack_t); - qreply(q, ack_mp); -} - - -/* - * Build and send an OK acknowledge - */ - -static void DLPI_ok_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim) -{ - if (ack_mp->b_datap->db_ref != 1) { - // Message already in use, create a new one - freemsg(ack_mp); - if ((ack_mp = allocb(sizeof(dl_error_ack_t), BPRI_HI)) == NULL) - return; - } else { - // Message free - if (ack_mp->b_cont != NULL) { - freemsg(ack_mp->b_cont); - ack_mp->b_cont = NULL; - } - } - - ack_mp->b_datap->db_type = M_PCPROTO; - dl_ok_ack_t *ackp = (dl_ok_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_OK_ACK; - ackp->dl_correct_primitive = prim; - ack_mp->b_wptr = ack_mp->b_rptr + sizeof(dl_ok_ack_t); - qreply(q, ack_mp); -} - - -/* - * Handle DL_INFO_REQ (report general information) - */ - -static void DLPI_info(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_info(%p)\n", the_stream)); - uint32 saplen = 0; - uint32 addrlen = kEnetPhysicalAddressLength; - uint32 bcastlen = kEnetPhysicalAddressLength; - uint32 hdrlen = kEnetPacketHeaderLength; - - // Calculate header length - if (the_stream->dlpi_state != DL_UNBOUND) { - saplen = (the_stream->flags & kSnapStream) ? k8022DLSAPLength+k8022SNAPLength : k8022DLSAPLength; - if (the_stream->dlsap == kSNAPSAP) - hdrlen = kEnetPacketHeaderLength + k8022SNAPHeaderLength; // SNAP address - else if ((the_stream->dlsap <= kMax8022SAP) || (the_stream->dlsap == kIPXSAP)) - hdrlen = kEnetPacketHeaderLength + k8022BasicHeaderLength; // SAP or IPX - else - hdrlen = kEnetPacketHeaderLength; // Basic Ethernet - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_info_ack_t) + addrlen + saplen + bcastlen, BPRI_LO)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_INFO_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_info_ack_t *ackp = (dl_info_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_INFO_ACK; - - // Info/version fields - ackp->dl_service_mode = DL_CLDLS; - ackp->dl_provider_style = DL_STYLE1; - ackp->dl_version = DL_VERSION_2; - ackp->dl_current_state = the_stream->dlpi_state; - ackp->dl_mac_type = the_stream->framing_8022 ? DL_CSMACD : DL_ETHER; - ackp->dl_reserved = 0; - ackp->dl_qos_length = 0; - ackp->dl_qos_offset = (uint32)DL_UNKNOWN; - ackp->dl_qos_range_length = 0; - ackp->dl_qos_range_offset = (uint32)DL_UNKNOWN; - ackp->dl_growth = 0; - ackp->dl_min_sdu = 1; - ackp->dl_max_sdu = kEnetTSDU - hdrlen; - - // Address fields - ackp->dl_sap_length = -saplen; // Negative to indicate sap follows physical address - ackp->dl_addr_length = addrlen + saplen; - ackp->dl_addr_offset = sizeof(dl_info_ack_t); - T8022AddressStruct *boundAddr = ((T8022AddressStruct *)(ack_mp->b_rptr + ackp->dl_addr_offset)); - OTCopy48BitAddress(hardware_address, boundAddr->fHWAddr); - if (saplen) { - boundAddr->fSAP = the_stream->dlsap; - if (the_stream->flags & kSnapStream) - OTCopy8022SNAP(the_stream->snap, boundAddr->fSNAP); - } - ackp->dl_brdcst_addr_length = bcastlen; - ackp->dl_brdcst_addr_offset = sizeof(dl_info_ack_t) + addrlen + saplen; - OTSet48BitBroadcastAddress(ack_mp->b_rptr + ackp->dl_brdcst_addr_offset); - - // Advance write pointer - ack_mp->b_wptr += sizeof(dl_info_ack_t) + addrlen + saplen + bcastlen; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_PHYS_ADDR_REQ (report physical address) - */ - -static void DLPI_phys_addr(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_phys_addr(%p,%p)\n", the_stream, mp)); - dl_phys_addr_req_t *req = (dl_phys_addr_req_t *)(void *)mp->b_rptr; - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_phys_addr_ack_t) + kEnetPhysicalAddressLength, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_PHYS_ADDR_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_phys_addr_ack_t *ackp = (dl_phys_addr_ack_t *)(void *)ack_mp->b_wptr; - ackp->dl_primitive = DL_PHYS_ADDR_ACK; - - // Fill in address - ackp->dl_addr_length = kEnetPhysicalAddressLength; - ackp->dl_addr_offset = sizeof(dl_phys_addr_ack_t); - ack_mp->b_wptr += sizeof(dl_phys_addr_ack_t) + kEnetPhysicalAddressLength; - if (req->dl_addr_type == DL_CURR_PHYS_ADDR || req->dl_addr_type == DL_FACT_PHYS_ADDR) - OTCopy48BitAddress(hardware_address, ack_mp->b_rptr + ackp->dl_addr_offset); - else { - DLPI_error_ack(the_stream, q, mp, DL_PHYS_ADDR_REQ, DL_BADPRIM, 0); - return; - } - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_BIND_REQ (bind a stream) - */ - -static void DLPI_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_bind_req_t *req = (dl_bind_req_t *)(void *)mp->b_rptr; - uint32 sap = req->dl_sap; - D(bug(" DLPI_bind(%p,%p) SAP %04x\n", the_stream, mp, sap)); - - // Stream must be unbound - if (the_stream->dlpi_state != DL_UNBOUND) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_OUTSTATE, 0); - return; - } - - // We only support connectionless data link services - if (req->dl_service_mode != DL_CLDLS || req->dl_max_conind != 0) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_UNSUPPORTED, 0); - return; - } - - // Don't bind to 802.2 group saps, can't check 802.2 global sap (0xFF) - // because it looks like IPX - if ((sap <= kMax8022SAP) && (sap & 1)) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_BADADDR, 0); - return; - } - - if (classify_packet_type(sap, sap) == kPktUnknown) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_BADADDR, 0); - return; - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_bind_ack_t) + kEnetAndSAPAddressLength, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_bind_ack_t *ackp = (dl_bind_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_BIND_ACK; - - // Fill in other fields - ackp->dl_sap = sap; - ackp->dl_addr_length = kEnetAndSAPAddressLength; - ackp->dl_addr_offset = sizeof(dl_bind_ack_t); - ackp->dl_max_conind = 0; - ackp->dl_xidtest_flg = 0; - - T8022AddressStruct *addrInfo = (T8022AddressStruct *)(ack_mp->b_rptr + sizeof(dl_bind_ack_t)); - OTCopy48BitAddress(hardware_address, addrInfo->fHWAddr); - addrInfo->fSAP = sap; - - // Must move b_wptr past the address info data - ack_mp->b_wptr = ack_mp->b_rptr + sizeof(dl_bind_ack_t) + kEnetAndSAPAddressLength; - - // Set group SAP if necessary - the_stream->ClearAllGroupSAPs(); - if (sap <= kMax8022SAP) - the_stream->SetGroupSAP(k8022GlobalSAP); - - // The stream is now bound and idle - the_stream->dlpi_state = DL_IDLE; - the_stream->dlsap = sap; - the_stream->flags &= ~kSnapStream; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_UNBIND_REQ (unbind a stream) - */ - -static void DLPI_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_unbind(%p,%p)\n", the_stream, mp)); - - // Stream must be bound and idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_UNBIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Stream is now unbound - the_stream->dlpi_state = DL_UNBOUND; - the_stream->dlsap = 0; - - // Flush all pending outbound messages - flushq(q, FLUSHDATA); - - // Flush all inbound messages pending on the stream - flushq(RD(q), FLUSHDATA); - putnextctl1(RD(q), M_FLUSH, FLUSHRW); - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_UNBIND_REQ); - return; -} - - -/* - * Handle DL_SUBS_BIND_REQ (register 802.2 SAP group addresses and SNAPs) - */ - -static void DLPI_subs_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_subs_bind_req_t *req = (dl_subs_bind_req_t *)(void *)mp->b_rptr; - uint8 *sap = ((uint8 *)req) + req->dl_subs_sap_offset; - int32 length = req->dl_subs_sap_length; - uint16 theSap = ntohs(*((uint16 *)sap)); - int32 error = 0; - D(bug(" DLPI_subs_bind(%p,%p) SAP %02x%02x%02x%02x%02x\n", the_stream, mp, sap[0], sap[1], sap[2], sap[3], sap[4])); - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Check if address is valid - switch (req->dl_subs_bind_class) { - case DL_PEER_BIND: // Bind a group address - if (the_stream->dlsap <= kMax8022SAP) { - if ((theSap & 1) && (length == sizeof(theSap))) - the_stream->SetGroupSAP(theSap); - else - if (theSap == 0x0000) // special case to receive all 802.2 packets - the_stream->flags |= kAcceptAll8022Packets; - else - error = DL_BADADDR; - } else - error = DL_UNSUPPORTED; - break; - - case DL_HIERARCHICAL_BIND: // Bind an additional SNAP - if (the_stream->dlsap == kSNAPSAP) { - if (the_stream->flags & kSnapStream) - error = DL_TOOMANY; // only one SNAP binding allowed - else { - OTCopy8022SNAP(sap, the_stream->snap); - the_stream->flags |= kSnapStream; - } - } else - error = DL_BADADDR; - break; - - default: - error = DL_UNSUPPORTED; - break; - } - if (error) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, error, 0); - return; - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_subs_bind_ack_t) + length, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_subs_bind_ack_t *ackp = (dl_subs_bind_ack_t *)(void *)ack_mp->b_wptr; - memset(ackp, 0, sizeof(dl_subs_bind_ack_t) + length); - ackp->dl_primitive = DL_SUBS_BIND_ACK; - - // Fill in other fields - ackp->dl_subs_sap_length = length; - ackp->dl_subs_sap_offset = length ? sizeof(dl_subs_bind_ack_t) : 0; - ack_mp->b_wptr += sizeof(dl_subs_bind_ack_t); - if (length) - memcpy(ack_mp->b_wptr, sap, length); - ack_mp->b_wptr += length; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_SUBS_UNBIND_REQ (unregister 802.2 SAP group addresses and snaps) - */ - -static void DLPI_subs_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_subs_unbind_req_t *req = (dl_subs_unbind_req_t *)(void *)mp->b_rptr; - uint8 *sap = ((uint8 *)req) + req->dl_subs_sap_offset; - int32 length = req->dl_subs_sap_length; - int32 error = 0; - D(bug(" DLPI_subs_unbind(%p,%p) SAP %02x%02x%02x%02x%02x\n", the_stream, mp, sap[0], sap[1], sap[2], sap[3], sap[4])); - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Check if we are unbinding from an address we are bound to - if (length == k8022SAPLength) { - if ((*sap & 1) && (*sap != kIPXSAP)) { - if (the_stream->dlsap <= kMax8022SAP) - the_stream->ClearGroupSAP(*sap); - else - error = DL_UNSUPPORTED; - } else - error = DL_BADADDR; - } else if (length == k8022SNAPLength) { - if (the_stream->dlsap == kSNAPSAP) { - if (the_stream->flags & kSnapStream) { - if (memcmp(the_stream->snap, sap, length) != 0) - error = DL_BADADDR; - } else - error = DL_BADADDR; - } else - error = DL_UNSUPPORTED; - } - if (error) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ, error, 0); - return; - } - - // Stream is no longer bound to SNAP - the_stream->flags &= ~kSnapStream; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ); - return; -} - - -/* - * Handles DL_ENABMULTI_REQ (enable multicast address) - */ - -static void DLPI_enable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_enabmulti_req_t* req = (dl_enabmulti_req_t*)(void *)mp->b_rptr; - uint8 *reqaddr = (uint8 *)(mp->b_rptr + req->dl_addr_offset); - D(bug(" DLPI_enable_multi(%p,%p) addr %02x%02x%02x%02x%02x%02x\n", the_stream, mp, reqaddr[0], reqaddr[1], reqaddr[2], reqaddr[3], reqaddr[4], reqaddr[5])); - - // Address must be a multicast address - if (get_address_type(reqaddr) != keaMulticast) { - DLPI_error_ack(the_stream, q, mp, DL_ENABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Address already in multicast list? - if (the_stream->IsMulticastRegistered(reqaddr)) { - DLPI_error_ack(the_stream, q, mp, DL_ENABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Tell add-on to enable multicast address - AO_enable_multicast(Host2MacAddr((uint8 *)reqaddr)); - - // Add new address to multicast list - uint8 *addr = Mac2HostAddr(Mac_sysalloc(kEnetPhysicalAddressLength)); - OTCopy48BitAddress(reqaddr, addr); - the_stream->AddMulticast(addr); - - // On receive now check multicast packets - the_stream->flags |= kAcceptMulticasts; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_ENABMULTI_REQ); - return; -} - - -/* - * Handles DL_DISABMULTI_REQ (disable multicast address) - */ - -static void DLPI_disable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_disabmulti_req_t *req = (dl_disabmulti_req_t*)(void *)mp->b_rptr; - uint8 *reqaddr = (uint8 *)(mp->b_rptr + req->dl_addr_offset); - D(bug(" DLPI_disable_multi(%p,%p) addr %02x%02x%02x%02x%02x%02x\n", the_stream, mp, reqaddr[0], reqaddr[1], reqaddr[2], reqaddr[3], reqaddr[4], reqaddr[5])); - - // Address must be a multicast address - if (get_address_type(reqaddr) != keaMulticast) { - DLPI_error_ack(the_stream, q, mp, DL_DISABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Find address in multicast list - uint8 *addr = the_stream->IsMulticastRegistered(reqaddr); - if (addr == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_DISABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Found, then remove - the_stream->RemoveMulticast(addr); - Mac_sysfree(Host2MacAddr(addr)); - - // Tell add-on to disable multicast address - AO_disable_multicast(Host2MacAddr((uint8 *)reqaddr)); - - // No longer check multicast packets if no multicast addresses are registered - if (the_stream->multicast_list == NULL) - the_stream->flags &= ~kAcceptMulticasts; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_DISABMULTI_REQ); - return; -} - - -/* - * Handle DL_UNITDATA_REQ (transmit packet) - */ - -static void DLPI_unit_data(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_unit_data(%p,%p)\n", the_stream, mp)); - dl_unitdata_req_t *req = (dl_unitdata_req_t *)(void *)mp->b_rptr; - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - - // Not idle, send error response - dl_uderror_ind_t *errp; - mblk_t *bp; - - int i = sizeof(dl_uderror_ind_t) + req->dl_dest_addr_length; - if ((bp = allocb(i, BPRI_HI)) == NULL) { - freemsg(mp); - return; - } - bp->b_datap->db_type = M_PROTO; - errp = (dl_uderror_ind_t *)(void *)bp->b_wptr; - errp->dl_primitive = DL_UDERROR_IND; - errp->dl_errno = DL_OUTSTATE; - errp->dl_unix_errno = 0; - errp->dl_dest_addr_length = req->dl_dest_addr_length; - errp->dl_dest_addr_offset = sizeof(dl_uderror_ind_t); - bp->b_wptr += sizeof(dl_uderror_ind_t); - memcpy((uint8 *)bp->b_wptr, ((uint8 *)req) + req->dl_dest_addr_offset, req->dl_dest_addr_length); - bp->b_wptr += req->dl_dest_addr_length; - qreply(q, bp); - - freemsg(mp); - return; - } - - // Build packet header and transmit packet - if ((mp = build_tx_packet_header(the_stream, mp, false)) != NULL) - transmit_packet(mp); -} - - -/* - * Ethernet packet allocator - */ - -#if SIZEOF_VOID_P != 4 || REAL_ADDRESSING == 0 -static uint32 ether_packet = 0; // Ethernet packet (cached allocation) -static uint32 n_ether_packets = 0; // Number of ethernet packets allocated so far (should be at most 1) - -EthernetPacket::EthernetPacket() -{ - ++n_ether_packets; - if (ether_packet && n_ether_packets == 1) - packet = ether_packet; - else { - packet = Mac_sysalloc(1516); - assert(packet != 0); - Mac_memset(packet, 0, 1516); - if (ether_packet == 0) - ether_packet = packet; - } -} - -EthernetPacket::~EthernetPacket() -{ - --n_ether_packets; - if (packet != ether_packet) - Mac_sysfree(packet); - if (n_ether_packets > 0) { - bug("WARNING: Nested allocation of ethernet packets!\n"); - } -} -#endif diff --git a/SheepShaver/src/EthernetDriver/ether.h b/SheepShaver/src/EthernetDriver/ether.h deleted file mode 100644 index 7ea2c8813..000000000 --- a/SheepShaver/src/EthernetDriver/ether.h +++ /dev/null @@ -1,113 +0,0 @@ -/* - * ether.h - SheepShaver Ethernet Device Driver - * - * SheepShaver (C) 1997-2005 Marc Hellwig and Christian Bauer - * - * 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 ETHER_H -#define ETHER_H - -struct queue; -struct msgb; -typedef struct queue queue_t; -typedef struct msgb mblk_t; - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern uint32 ValidateHardware(void *theID); -struct install_info; -extern install_info* GetOTInstallInfo(); -extern uint8 InitStreamModule(void *theID); -extern void TerminateStreamModule(void); -#pragma export off -} - -extern bool NativeInitStreamModule(void *); -extern void NativeTerminateStreamModule(void); - -extern int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds); -extern int ether_close(queue_t *rdq, int flag, void *creds); -extern int ether_wput(queue_t *q, mblk_t *mp); -extern int ether_rsrv(queue_t *q); - -// System specific and internal functions/data -extern void EtherInit(void); -extern void EtherExit(void); - -extern void EtherIRQ(void); - -extern void AO_get_ethernet_address(uint32 addr); -extern void AO_enable_multicast(uint32 addr); -extern void AO_disable_multicast(uint32 addr); -extern void AO_transmit_packet(uint32 mp); - -extern mblk_t *allocb(size_t size, int pri); -extern void OTEnterInterrupt(void); -extern void OTLeaveInterrupt(void); - -extern void ether_dispatch_packet(uint32 p, uint32 length); -extern void ether_packet_received(mblk_t *mp); - -extern bool ether_driver_opened; - -// Ethernet packet allocator (optimized for 32-bit platforms in real addressing mode) -class EthernetPacket { -#if SIZEOF_VOID_P == 4 && REAL_ADDRESSING - uint8 packet[1516]; - public: - uint32 addr(void) const { return (uint32)packet; } -#else - uint32 packet; - public: - EthernetPacket(); - ~EthernetPacket(); - uint32 addr(void) const { return packet; } -#endif -}; - -// Copy packet data from message block to linear buffer (must hold at -// least 1514 bytes), returns packet length -static inline int ether_msgb_to_buffer(uint32 mp, uint8 *p) -{ - int len = 0; - while (mp) { - uint32 size = ReadMacInt32(mp + 16) - ReadMacInt32(mp + 12); - Mac2Host_memcpy(p, ReadMacInt32(mp + 12), size); - len += size; - p += size; - mp = ReadMacInt32(mp + 8); - } - return len; -} - -extern int32 num_wput; -extern int32 num_error_acks; -extern int32 num_tx_packets; -extern int32 num_tx_raw_packets; -extern int32 num_tx_normal_packets; -extern int32 num_tx_buffer_full; -extern int32 num_rx_packets; -extern int32 num_ether_irq; -extern int32 num_unitdata_ind; -extern int32 num_rx_fastpath; -extern int32 num_rx_no_mem; -extern int32 num_rx_dropped; -extern int32 num_rx_stream_not_ready; -extern int32 num_rx_no_unitdata_mem; - -#endif diff --git a/SheepShaver/src/EthernetDriver/ether_defs.h b/SheepShaver/src/EthernetDriver/ether_defs.h deleted file mode 100644 index 72bb58ed9..000000000 --- a/SheepShaver/src/EthernetDriver/ether_defs.h +++ /dev/null @@ -1,552 +0,0 @@ -/* - * ether_defs.h - Definitions for DLPI Ethernet Driver - * - * SheepShaver (C) 1997-2005 Marc Hellwig and Christian Bauer - * - * 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 ETHER_DEFS_H -#define ETHER_DEFS_H - - -#if __MWERKS__ && __POWERPC__ -#ifndef PRAGMA_ALIGN_SUPPORTED -#define PRAGMA_ALIGN_SUPPORTED 1 -#endif -#define PACKED__ -#else -#define PACKED__ __attribute__ ((packed)) -#endif - - -/* - * Macros - */ - -// Get pointer to the read queue, assumes 'q' is a write queue ptr -#define RD(q) (&q[-1]) - -// Get pointer to the write queue, assumes 'q' is a read queue ptr -#define WR(q) (&q[1]) - -#define OTCompare48BitAddresses(p1, p2) \ - (*(const uint32*)((const uint8*)(p1)) == *(const uint32*)((const uint8*)(p2)) && \ - *(const uint16*)(((const uint8*)(p1))+4) == *(const uint16*)(((const uint8*)(p2))+4) ) - -#define OTCopy48BitAddress(p1, p2) \ - (*(uint32*)((uint8*)(p2)) = *(const uint32*)((const uint8*)(p1)), \ - *(uint16*)(((uint8*)(p2))+4) = *(const uint16*)(((const uint8*)(p1))+4) ) - -#define OTClear48BitAddress(p1) \ - (*(uint32*)((uint8*)(p1)) = 0, \ - *(uint16*)(((uint8*)(p1))+4) = 0 ) - -#define OTCompare8022SNAP(p1, p2) \ - (*(const uint32*)((const uint8*)(p1)) == *(const uint32*)((const uint8*)(p2)) && \ - *(((const uint8*)(p1))+4) == *(((const uint8*)(p2))+4) ) - -#define OTCopy8022SNAP(p1, p2) \ - (*(uint32*)((uint8*)(p2)) = *(const uint32*)((const uint8*)(p1)), \ - *(((uint8*)(p2))+4) = *(((const uint8*)(p1))+4) ) - -#define OTIs48BitBroadcastAddress(p1) \ - (*(uint32*)((uint8*)(p1)) == 0xffffffff && \ - *(uint16*)(((uint8*)(p1))+4) == 0xffff ) - -#define OTSet48BitBroadcastAddress(p1) \ - (*(uint32*)((uint8*)(p1)) = 0xffffffff, \ - *(uint16*)(((uint8*)(p1))+4) = 0xffff ) - -#define OTIs48BitZeroAddress(p1) \ - (*(uint32*)((uint8*)(p1)) == 0 && \ - *(uint16*)(((uint8*)(p1))+4) == 0 ) - - -/* - * Constants - */ - -enum { - // Address and packet lengths - kEnetPhysicalAddressLength = 6, - k8022SAPLength = 1, - k8022DLSAPLength = 2, - k8022SNAPLength = 5, - kMaxBoundAddrLength = 6 + 2 + 5, // addr/SAP/SNAP - kEnetAndSAPAddressLength = kEnetPhysicalAddressLength + k8022DLSAPLength, - kEnetPacketHeaderLength = (2 * kEnetPhysicalAddressLength) + k8022DLSAPLength, - k8022BasicHeaderLength = 3, // SSAP/DSAP/Control - k8022SNAPHeaderLength = k8022SNAPLength + k8022BasicHeaderLength, - kMinDIXSAP = 1501, - kEnetTSDU = 1514, - - // Special addresses - kSNAPSAP = 0xaa, - kMax8022SAP = 0xfe, - k8022GlobalSAP = 0xff, - kIPXSAP = 0xff, - - // DLPI interface states - DL_UNBOUND = 0, - - // Message types - M_DATA = 0, - M_PROTO = 1, - M_IOCTL = 14, - M_IOCACK = 129, - M_IOCNAK = 130, - M_PCPROTO = 131, // priority message - M_FLUSH = 134, - FLUSHDATA = 0, - FLUSHALL = 1, - FLUSHR = 1, - FLUSHW = 2, - FLUSHRW = 3, - - // DLPI primitives - DL_INFO_REQ = 0, - DL_BIND_REQ = 1, - DL_PEER_BIND = 1, - DL_HIERARCHICAL_BIND = 2, - DL_UNBIND_REQ = 2, - DL_INFO_ACK = 3, - DL_BIND_ACK = 4, - DL_ERROR_ACK = 5, - DL_OK_ACK = 6, - DL_UNITDATA_REQ = 7, - DL_UNITDATA_IND = 8, - DL_UDERROR_IND = 9, - DL_SUBS_UNBIND_REQ = 21, - DL_SUBS_BIND_REQ = 27, - DL_SUBS_BIND_ACK = 28, - DL_ENABMULTI_REQ = 29, - DL_DISABMULTI_REQ = 30, - DL_PHYS_ADDR_REQ = 49, - DL_PHYS_ADDR_ACK = 50, - DL_FACT_PHYS_ADDR = 1, - DL_CURR_PHYS_ADDR = 2, - - // DLPI states - DL_IDLE = 3, - - // DLPI error codes - DL_BADADDR = 1, // improper address format - DL_OUTSTATE = 3, // improper state - DL_SYSERR = 4, // UNIX system error - DL_UNSUPPORTED = 7, // service unsupported - DL_BADPRIM = 9, // primitive unknown - DL_NOTSUPPORTED = 18, // primitive not implemented - DL_TOOMANY = 19, // limit exceeded - - // errnos - MAC_ENXIO = 6, - MAC_ENOMEM = 12, - MAC_EINVAL = 22, - - // Various DLPI constants - DL_CLDLS = 2, // connectionless data link service - DL_STYLE1 = 0x500, - DL_VERSION_2 = 2, - DL_CSMACD = 0, - DL_ETHER = 4, - DL_UNKNOWN = -1, - - // ioctl() codes - I_OTSetFramingType = (('O' << 8) | 2), - kOTGetFramingValue = -1, - kOTFramingEthernet = 1, - kOTFramingEthernetIPX = 2, - kOTFramingEthernet8023 = 4, - kOTFraming8022 = 8, - I_OTSetRawMode = (('O' << 8) | 3), - DL_IOC_HDR_INFO = (('l' << 8) | 10), - - // Buffer allocation priority - BPRI_LO = 1, - BPRI_HI = 3, - - // Misc constants - kEnetModuleID = 7101 -}; - -enum EAddrType { - keaStandardAddress = 0, - keaMulticast, - keaBroadcast, - keaBadAddress -}; - - -/* - * Data member wrappers - */ - -// Forward declarations -struct datab; -struct msgb; -struct queue; -struct multicast_node; -struct DLPIStream; - -// Optimize for 32-bit big endian targets -#if defined(WORDS_BIGENDIAN) && (SIZEOF_VOID_P == 4) - -// Predefined member types -typedef int8 nw_int8; -typedef int16 nw_int16; -typedef int32 nw_int32; -typedef uint8 nw_uint8; -typedef uint16 nw_uint16; -typedef uint32 nw_uint32; -typedef int nw_bool; -typedef uint8 * nw_uint8_p; -typedef void * nw_void_p; -typedef datab * nw_datab_p; -typedef msgb * nw_msgb_p; -typedef queue * nw_queue_p; -typedef multicast_node *nw_multicast_node_p; -typedef DLPIStream * nw_DLPIStream_p; - -#else - -// Big-endian memory accessor -template< int nbytes > -struct nw_memory_helper; - -template<> -struct nw_memory_helper<1> { - static inline uint8 load(void *ptr) { return *((uint8 *)ptr); } - static inline void store(void *ptr, uint8 val) { *((uint8 *)ptr) = val; } -}; - -template<> -struct nw_memory_helper<2> { - static inline uint16 load(void *ptr) { return ntohs(*((uint16 *)ptr)); } - static inline void store(void *ptr, uint16 val) { *((uint16 *)ptr) = htons(val); } -}; - -template<> -struct nw_memory_helper<4> { - static inline uint32 load(void *ptr) { return ntohl(*((uint32 *)ptr)); } - static inline void store(void *ptr, uint32 val) { *((uint32 *)ptr) = htonl(val); } -}; - -// Scalar data member wrapper (specialise for pointer member types?) -template< class type, class public_type > -class nw_scalar_member_helper { - uint8 _pad[sizeof(type)]; -public: - operator public_type () const { - return (public_type)(uintptr)nw_memory_helper::load((void *)this); - } - public_type operator -> () const { - return this->operator public_type (); - } - nw_scalar_member_helper & operator = (public_type val) { - nw_memory_helper::store((void *)this, (type)(uintptr)val); - return *this; - } - nw_scalar_member_helper & operator += (int val) { - *this = *this + val; - return *this; - } - nw_scalar_member_helper & operator -= (int val) { - *this = *this - val; - return *this; - } - nw_scalar_member_helper & operator &= (int val) { - *this = *this & val; - return *this; - } - nw_scalar_member_helper & operator |= (int val) { - *this = *this | val; - return *this; - } -}; - -// Predefined member types -typedef nw_scalar_member_helper nw_int8; -typedef nw_scalar_member_helper nw_int16; -typedef nw_scalar_member_helper nw_int32; -typedef nw_scalar_member_helper nw_uint8; -typedef nw_scalar_member_helper nw_uint16; -typedef nw_scalar_member_helper nw_uint32; -typedef nw_scalar_member_helper nw_bool; -typedef nw_scalar_member_helper nw_uint8_p; -typedef nw_scalar_member_helper nw_void_p; -typedef nw_scalar_member_helper nw_datab_p; -typedef nw_scalar_member_helper nw_msgb_p; -typedef nw_scalar_member_helper nw_queue_p; -typedef nw_scalar_member_helper nw_multicast_node_p; -typedef nw_scalar_member_helper nw_DLPIStream_p; - -#endif - - -/* - * Structures - */ - -// Data block -struct datab { - nw_datab_p db_freep; - nw_uint8_p db_base; - nw_uint8_p db_lim; - nw_uint8 db_ref; - nw_uint8 db_type; - // ... -}; - -// Message block -struct msgb { - nw_msgb_p b_next; - nw_msgb_p b_prev; - nw_msgb_p b_cont; - nw_uint8_p b_rptr; - nw_uint8_p b_wptr; - nw_datab_p b_datap; - // ... -}; - -// Queue (full structure required because of size) -struct queue { - nw_void_p q_qinfo; - nw_msgb_p q_first; - nw_msgb_p q_last; - nw_queue_p q_next; - nw_queue_p q_link; - nw_DLPIStream_p q_ptr; - nw_uint32 q_count; - nw_int32 q_minpsz; - nw_int32 q_maxpsz; - nw_uint32 q_hiwat; - nw_uint32 q_lowat; - nw_void_p q_bandp; - nw_uint16 q_flag; - nw_uint8 q_nband; - uint8 _q_pad1[1]; - nw_void_p q_osx; - nw_queue_p q_ffcp; - nw_queue_p q_bfcp; -}; -typedef struct queue queue_t; - -// M_IOCTL parameters -struct iocblk { - nw_int32 ioc_cmd; - nw_void_p ioc_cr; - nw_uint32 ioc_id; - nw_uint32 ioc_count; - nw_int32 ioc_error; - nw_int32 ioc_rval; - int32 _ioc_filler[4]; -}; - -// Priority specification -struct dl_priority_t { - nw_int32 dl_min, dl_max; -}; - -// DPLI primitives -struct dl_info_req_t { - nw_uint32 dl_primitive; // DL_INFO_REQ -}; - -struct dl_info_ack_t { - nw_uint32 dl_primitive; // DL_INFO_ACK - nw_uint32 dl_max_sdu; - nw_uint32 dl_min_sdu; - nw_uint32 dl_addr_length; - nw_uint32 dl_mac_type; - nw_uint32 dl_reserved; - nw_uint32 dl_current_state; - nw_int32 dl_sap_length; - nw_uint32 dl_service_mode; - nw_uint32 dl_qos_length; - nw_uint32 dl_qos_offset; - nw_uint32 dl_qos_range_length; - nw_uint32 dl_qos_range_offset; - nw_uint32 dl_provider_style; - nw_uint32 dl_addr_offset; - nw_uint32 dl_version; - nw_uint32 dl_brdcst_addr_length; - nw_uint32 dl_brdcst_addr_offset; - nw_uint32 dl_growth; -}; - -struct dl_bind_req_t { - nw_uint32 dl_primitive; // DL_BIND_REQ - nw_uint32 dl_sap; - nw_uint32 dl_max_conind; - nw_uint16 dl_service_mode; - nw_uint16 dl_conn_mgmt; - nw_uint32 dl_xidtest_flg; -}; - -struct dl_bind_ack_t { - nw_uint32 dl_primitive; // DL_BIND_ACK - nw_uint32 dl_sap; - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; - nw_uint32 dl_max_conind; - nw_uint32 dl_xidtest_flg; -}; - -struct dl_error_ack_t { - nw_uint32 dl_primitive; // DL_ERROR_ACK - nw_uint32 dl_error_primitive; - nw_uint32 dl_errno; - nw_uint32 dl_unix_errno; -}; - -struct dl_ok_ack_t { - nw_uint32 dl_primitive; // DL_ERROR_ACK - nw_uint32 dl_correct_primitive; -}; - -struct dl_unitdata_req_t { - nw_uint32 dl_primitive; // DL_UNITDATA_REQ - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - dl_priority_t dl_priority; -}; - -struct dl_unitdata_ind_t { - nw_uint32 dl_primitive; // DL_UNITDATA_IND - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - nw_uint32 dl_src_addr_length; - nw_uint32 dl_src_addr_offset; - nw_uint32 dl_group_address; -}; - -struct dl_uderror_ind_t { - nw_uint32 dl_primitive; // DL_UDERROR_IND - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - nw_uint32 dl_unix_errno; - nw_uint32 dl_errno; -}; - -struct dl_subs_bind_req_t { - nw_uint32 dl_primitive; // DL_SUBS_BIND_REQ - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; - nw_uint32 dl_subs_bind_class; -}; - -struct dl_subs_bind_ack_t { - nw_uint32 dl_primitive; // DL_SUBS_BIND_ACK - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; -}; - -struct dl_subs_unbind_req_t { - nw_uint32 dl_primitive; // DL_SUBS_UNBIND_REQ - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; -}; - -struct dl_enabmulti_req_t { - nw_uint32 dl_primitive; // DL_ENABMULTI_REQ - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -struct dl_disabmulti_req_t { - nw_uint32 dl_primitive; // DL_DISABMULTI_REQ - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -struct dl_phys_addr_req_t { - nw_uint32 dl_primitive; // DL_PHYS_ADDR_REQ - nw_uint32 dl_addr_type; -}; - -struct dl_phys_addr_ack_t { - nw_uint32 dl_primitive; // DL_PHYS_ADDR_ACK - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -// Parameters for I_OTSetRawMode/kOTSetRecvMode ioctl() -struct dl_recv_control_t { - nw_uint32 dl_primitive; - nw_uint32 dl_flags; - nw_uint32 dl_truncation_length; -}; - -union DL_primitives { - nw_uint32 dl_primitive; - dl_info_req_t info_req; - dl_info_ack_t info_ack; - dl_bind_req_t bind_req; - dl_bind_ack_t bind_ack; - dl_error_ack_t error_ack; - dl_ok_ack_t ok_ack; - dl_unitdata_req_t unitdata_req; - dl_unitdata_ind_t unitdata_ind; - dl_uderror_ind_t uderror_ind; - dl_subs_bind_req_t subs_bind_req; - dl_subs_bind_ack_t subs_bind_ack; - dl_subs_unbind_req_t subs_unbind_req; - dl_enabmulti_req_t enabmulti_req; - dl_disabmulti_req_t disabmulti_req; - dl_phys_addr_req_t phys_addr_req; - dl_phys_addr_ack_t phys_addr_ack; -}; - -#ifdef PRAGMA_ALIGN_SUPPORTED -#pragma options align=mac68k -#endif - -// Packet headers -struct EnetPacketHeader { - uint8 fDestAddr[6]; - uint8 fSourceAddr[6]; - nw_uint16 fProto; -} PACKED__; - -struct T8022Header { - uint8 fDSAP; - uint8 fSSAP; - uint8 fCtrl; -} PACKED__; - -struct T8022SNAPHeader { - uint8 fDSAP; - uint8 fSSAP; - uint8 fCtrl; - uint8 fSNAP[k8022SNAPLength]; -} PACKED__; - -struct T8022FullPacketHeader { - EnetPacketHeader fEnetPart; - T8022SNAPHeader f8022Part; -} PACKED__; - -struct T8022AddressStruct { - uint8 fHWAddr[6]; - nw_uint16 fSAP; - uint8 fSNAP[k8022SNAPLength]; -} PACKED__; - -#ifdef PRAGMA_ALIGN_SUPPORTED -#pragma options align=reset -#endif - -#endif diff --git a/SheepShaver/src/EthernetDriver/ethernet.ndrv b/SheepShaver/src/EthernetDriver/ethernet.ndrv deleted file mode 100644 index 02eed8b3dcb9d381caebfc70ef1d7e81740c7458..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 11780 zcmb_i4RBOdmOk&NI~{1Ckp>zPpgY8|m6iz_s~!Y1i9|O{Kym4r;1;X-Ya}}%iJ=)9 ze9$knK&;i7wqV>if;Iwb?dVpfbgEeS3lc`HVXE8}s~klL0>UU&1Io-GVtT)G-+P^= z4TH61r(W*Qx%b?2&;Pye{kUyapgpo=N&Cw7Mk12_=h@D+C2cu6{_!~R z18@YM@puAweu$?6PmRDvG?EAX*m2iQM$J90`~%V)s>I)2;_2*st7697)@Y<-Nqu8v zUULK8)za4Zvww+nw9&nhl?$RB3s)^S`{uX(JW^F3t*3vAL>Dft?}#*Ect?H5D!Qk+ zwQ1q1WesgDRMot^y={2}^C%qYSk~NHAB`-Gc0}rz&2MX3(Gm$SjZ}3s|2)!B6A?`T?yb&0@nQo$3I6g(=8 zeQ-T__x6+LmyeO>zy5zf1VUW0iaBL zmZv3W|Nd?1i!8&kPaIVCf_$v(O}W9+i5_DLQ3x`wTt{x`l~hggQVnfwo!k~b_+=~! zcr_K(CxJVtz;MlR=#wijW+jgSyb|zBIdDJVYb|&H@QXQcUSp#LmjFM1HC*Zk{1+xX za02jiIq+VX4Kav9{zzA2yvLUlOqgkE=&T z3{c5~$BU=brk#0Z`v^?S{PuUI&kOqX0<7hrjITg?kVW^a)f8y9=-!ps1G*=PJ$3Q= zpl1gjU27y2{Q7O;V=65hAQgT7_(|;HIa09)?AiamwFhtF7_ykjj3eETaTVHDDn(fW zbVyEsjLuhpXN3mFu-;)WSZ8tsW4t_u{a_G%n194rL#3uZrVZvveErE-auSs?@4(MJ znD;99VCtaQ@1PFy-nBO&vu4Q8^0Pv2$Y`?me;l-1`f$??*j>F~#WjYHz9+_3hJQ#siIRwoY+d$^q%Y>(cGc5<*iW)0fLVB0$h?e@X;xLeV#8*Go~ z@e2mqK3>1VZfpH?!%WDjn%uuaf6(qn{e3(>#G5~&^gwnO^&QjT^9r|WFQ`{o*NpWR zZ;*l7x}B}p`wyfq34LB$kg-AFng?7T#QQjY72eOf0-pQO*Ux?N(_eG{;}}=WYsOEB z_RXlj%W&u}Xf14J+R%5_!jli1Uj_YpS|&#lXtqL95ZOIoUcZ7okEk?Ee_ER?6k{nlnOwZrYAUES(8u~|;c)>E)`yNkf35l} z7<-;+!1&R66YpE#ahq$>S))(*BPpIZ$^4SKVGGryM65W$^x0$gFrH)+)-NO%MCt-f z?9-~h`yMGKXe$(SX6>Eo&`RwGJl|ML-fo3PVBbezKg)p2&wUuT&K{EmpMNd?V&`M}bMWbFGCJ9lI7RL* z$UaPYds#+U=Uv9jysM@O-&in~Un#@1t?6D1c7kCx4VZtq8*P)$35P(Zup3iHCqy!I z4H0|6DhfBM@|b1GqpB_HJ^iSHToA|U0&0JwHLs?SpTYO_o?NYK?=vPn)Jmx zEPG%-V)>cz2ROIESl_0TpdI@Joxt&h7deWDr#d`>~(Hrr#WQA-qa0Ppu_)yy`vd`I~LwHPE9;Bm>VA?AuUhUxWC^ zagSnXvkzN@b_?1i@dw_El_8Fz-W2i?p*|XLcbQ-CX@NF@l<)+#9Pla&J}wJh0=Ub9 z7h7<|Wb#?_S>A5O&+Eh=I~j{dK8k7eoMVk&&-{+72bu22P5*A%1?FsKAHw^1tr+`7 zTE;m^N}}04$i0BS9rSwumryeA>UdwMFG9WW*(w?d{Zg1O-Ay#A8~z*pv+e#M_?!(B z_E=997~|5`BHx1?vEFFtpNhF-Exm{#uWsKhbimAMGWG&rQ}zk+aq~W)CvlM6smVfj z;qycsJIp?$n#NXYO8Sc)z&IB183MZNOidvbeZy+f7iI`uHOG#%b#bU%p77frNS|VT z4F9)Uu0L833r!$d-vYh-_;y<_Q{a^*cr_uzt02ZPul(4r2ln79>!s1C`%oW&`Z(0x zR{ux?`U;;i6L_k@W8O~%`n(*&Q1>9NxP|?oL{4>z^Fi$4RCZovJj*)mMgAd$YEQam zYp~I>IpmAaVVynyq-CdOJ^&rT*a_M?^#j-xX^5?6K8l!l5HX>jBrOFw8RXNZkgxkw z92fe=!uPpF8)pO2 zR?)sTug>Zb_@5zpHKrM|UkZJz+bv{l>f63Rx=;8Y_$^D<4A!;n``A{@xMH45$^Gy9 zXk^z~8pV27lm6;)9rqdR7xhAg+kZ;j1*0-Zs!a_Hu>DKT@XL;9iG)CV!k=xVtGt*)i=k0ofeyArV#=>U= ze5`(^fZ-+jp<6_sej525!(Vci>n96h;fI|+!Wt#e+g+h?;vC>csbKw=Lt};iOKGdA zP+#twt~aJwmy__d9LvI1PB3rXtidx8^GSQkK1YptlFv~X>(NGwbC$0TJXkja4tuo7 zX^wC#Gx=t>D$lpi5gR`PX=o4M`!iRa_ z!^L?KboA%Yan1V(J74GAkp0%oBJ~pcE`6XZwr0wlL7JK^KaekYn{`$hbwR6xT;NYY z>)o&?rnLh3iC62T1mxo2nA3d_IY|WPbjWejc2YMTgg=14;6C^l5A2t5BKI7{_YXs! zT_Ix1_&0G5;<4XJqIfA_vXnFEQkI&rB6DOMhcptSkjP zH)y1#11ZEm%g$+@;e)S5zG&r@T+d7S;PatBhyfx$#axaVe7+ul4{+OgEc!XFxEOcY z$KWgcjhUN$_6&TE;6q$F7>gIfHtv2e2APr8Pb$ufgt0XI4Y_}3$LsE8dL z%gr1m$b8~B0a`eQvLE!K9>O?Rmyb%2Tez{Vb2j*rRB$gdiT+vZ2W@@nH2VYeRf#oF z>ZhgY$bm&0GFSCO%5=mQGj~O4>W}*b>w(}W@~mna!S5o>IFgmOkoDVNnLaDx349Lg zbJ;q1u@2pajBfzX6x$~xa34~WK6~2A(TX{4+d2uk%ovo}72KatkFnp0kI>&jdo%4r`Er{oF@R-jT3G6>YuGAh2CTc#yOKUFVCEJ`Olaa z#(8J}_fP)XUZFcSZpj*h^QTl&dl0b}@ddf#&TySLLps>M2pL_C+n)C%cybAH@w1F; z(q~4%mQ7n^xn4cTvc<~}U``+I{!ClMJqXJjG`sYCTgKX@1pcYiw_>; z9Kj|sD2Wm}rLb>DU489C;N*M+IX>Ffc{2ZfA#2{xPR_lD4d&BB$QmLcJ0970M{EnW z4Ol)AcSp!Od*O#NGXCmL@MaO{;k#qP{fgSd`6ccVswsb4**ADU$ae~WnP;~AC(%C2 zb@XijE(PP>;k%qHo05^E{VJoIIrpeoO8o5nU*C&(gdC1zDCn~9l~bLZkFt(J4ngoM z0a?V)-sVjm7y8HhC>Y$wr4`VpJ%-EFRqRv88KD=xTtdlrMz5y|1dMfZQP|YU63B-2 zIvDOdGYdK;>AQ=(;ogA(+#MF`b;#KaB?enB#Qa#eSN##jdSUB)7o{dqqQ4F_;2s7% z?58}G3#@fGwrD)o@||wL#{ga;^rry1Bz$dm0oo=$$-?Kc@VOXY2zRpBi$C57J%GNj zF7Uoh8~S@E@V#C3Aau`wK8f?l$#3*kmObRm0Y1wf{yrD;lEy071597UE(3QTxWh_3 zfV>EJaF=`<{3!HK#=zBx4|S5bm(!s>A@ptf5Ox9G1rFACcX9%GK&O}6tQ&kU1|0PU z`dKf;84Gpj4)O%&S16B&{oMEmjLVw|UHR5|;VON$a+b3GjDGYOr!D<>%hZp~JlOMF zxAENs>&95@*Yab3WBb1tazPhxchI$gU!Dk`RE2v|j%%}1(0Pvk(2Za?ab{N7z`0_} zM6b{Z=mBy<)(3vKz`9TeI#||=P_pb705|)sY737kd)!r8vM<*AZjY^T%!z3_g|OeR ztalrHX65;Oj^&cyUFC(QSpGH3rs8K{Z`hM5_rE@lvBd`P=h)p?;X}}0lm6SFzqpqD zWyep%hpS=(Vy1!IEWTa#@|g_zX#_O$JBnQ2JPCZZeDlQ%pzBEDvN(%`c%JsWeGbWU zWX>VbdyMnJhA5H7*#rCKcQfpRf_Sd82K)bZlcxRv0@c-NI z+OJEzoiBiQm(`D$w2YL}ZJTXY%{26#FaHVN{Y=ugkjweCB(3+!e!D)>D<(!!|Kj0}uW>#5fnm z%{C+n=T&LJQ16`W{fN72e+M zYv452!kvO-47C=vd)4;Aq3B83*7qgz> z3?4<@jXa6qOC)V)I&HldJpYf@vGqkeBw~E1Ylr!+OLrh|01&o=_p=K2Oa3~v1@6ay z|M$R;do0ApciFbG-{oK!B|CAJ--a{C0V+{FW|e^a6`xD znL5Vr|IzQdMn7GnU%f`Z`x^b8q57F_`!^ByW$Wad)PD7xdQ?5DexROGuc+tMi&B+? zOT2y|c)E2F8m5PTAmn5Zhs2OTe!CtjUI_xZRd?pu-ZWEY_%BJKe(Plx-49|VxyZHlK@s(}I ziuS0)UGpMf++f$O?q$snwY5iDA8Kq{woIBn0?o!2d`WAzL&MQ#!X9dmc1Zs6dn&_~ z^Je*n{KPhRv%e7xh%|-#4J)Gl<>KqxMbLKLIae>U5*)nF6s5>DZ=GD?YQZ #include #include #define DEBUG 0 #include "debug.h" /* * Find symbol in shared library (using CFM) * lib and sym must be Pascal strings! */ typedef OpaqueCFragConnectionID * ConnectionID; typedef unsigned char SymClass; static uint32 FindLibSymbol(Str63 lib, Str255 sym) { ConnectionID conn_id = 0; Ptr main_addr = NULL; Str255 err = ""; Ptr sym_addr = NULL; SymClass sym_class = 0; int16 res; res = GetSharedLibrary(lib, FOURCC('p','w','p','c'), 1, &conn_id, &main_addr, err); D(bug(" GetSharedLibrary: ret %d, connection ID %ld, main %p\n", res, conn_id, main_addr)); if (res) return NULL; res = FindSymbol(conn_id, sym, &sym_addr, &sym_class); D(bug(" FindSymbol: ret %d, sym_addr %p, sym_class %ld\n", res, sym_addr, sym_class));//!!?? CloseConnection(&conn_id); if (res) return NULL; else return (uint32)sym_addr; } uint32 FindLibSymbol(char *lib_name, char *sym_name) { Str63 lib; memcpy(&lib[0], lib_name, lib_name[0]+1); Str255 sym; memcpy(&sym[0], sym_name, sym_name[0]+1); return FindLibSymbol(lib, sym); } /* * Memory allocators in MacOS system heap zone */ uint32 Mac_sysalloc(uint32 size) { return (uint32)NewPtrSys(size); } void Mac_sysfree(uint32 addr) { DisposePtr((char *)addr); } /* * Glue for calling MacOS routines */ #define prolog ;\ mflr r0 ;\ stw r0,8(r1) ;\ stw r2,12(r1) ;\ stwu r1,-64(r1) ;\ lwz r0,0(r3) ;\ lwz r2,4(r3) ;\ mtctr r0 #define epilog ;\ bctrl ;\ lwz r0,64+8(r1) ;\ lwz r2,64+12(r1);\ mtlr r0 ;\ addi r1,r1,64 ;\ blr asm uint32 call_macos(register uint32 tvect) { prolog epilog } asm uint32 call_macos1(register uint32 tvect, register uint32 arg1) { prolog mr r3,r4 epilog } asm uint32 call_macos2(register uint32 tvect, register uint32 arg1, register uint32 arg2) { prolog mr r3,r4 mr r4,r5 epilog } asm uint32 call_macos3(register uint32 tvect, register uint32 arg1, register uint32 arg2, register uint32 arg3) { prolog mr r3,r4 mr r4,r5 mr r5,r6 epilog } asm uint32 call_macos4(register uint32 tvect, register uint32 arg1, register uint32 arg2, register uint32 arg3, register uint32 arg4) { prolog mr r3,r4 mr r4,r5 mr r5,r6 mr r6,r7 epilog } asm uint32 call_macos5(register uint32 tvect, register uint32 arg1, register uint32 arg2, register uint32 arg3, register uint32 arg4, register uint32 arg5) { prolog mr r3,r4 mr r4,r5 mr r5,r6 mr r6,r7 mr r7,r8 epilog } asm uint32 call_macos6(register uint32 tvect, register uint32 arg1, register uint32 arg2, register uint32 arg3, register uint32 arg4, register uint32 arg5, register uint32 arg6) { prolog mr r3,r4 mr r4,r5 mr r5,r6 mr r6,r7 mr r7,r8 mr r8,r9 epilog } asm uint32 call_macos7(register uint32 tvect, register uint32 arg1, register uint32 arg2, register uint32 arg3, register uint32 arg4, register uint32 arg5, register uint32 arg6, register uint32 arg7) { prolog mr r3,r4 mr r4,r5 mr r5,r6 mr r6,r7 mr r7,r8 mr r8,r9 mr r9,r10 epilog } /* * Some standard C library implementations */ extern "C" void *memcpy(void *dest, const void *src, size_t n); void *memcpy(void *dest, const void *src, size_t n) { BlockMoveData(src, dest, n); return dest; } extern "C" void *memset(void *s, int c, size_t n); void *memset(void *s, int c, size_t n) { if (c == 0) BlockZero(s, n); else { char *p = (char *)s; n++; while (--n) *p++ = c; } return s; } extern "C" int memcmp(const void *s1, const void *s2, size_t n); int memcmp(const void *s1, const void *s2, size_t n) { const unsigned char *d = (const unsigned char *)s1; const unsigned char *s = (const unsigned char *)s2; n++; while (--n) { int r; if (r = (*d - *s)) return r; ++d; ++s; } return 0; } extern "C" int printf(const char *format, ...); int printf(const char *format, ...) { return 0; } \ No newline at end of file diff --git a/SheepShaver/src/EthernetDriver/macos_util.h b/SheepShaver/src/EthernetDriver/macos_util.h deleted file mode 100644 index 20cc5ec4c..000000000 --- a/SheepShaver/src/EthernetDriver/macos_util.h +++ /dev/null @@ -1 +0,0 @@ -#ifndef MACOS_UTIL_H #define MACOS_UTIL_H // Macro for calling MacOS routines #define CallMacOS(type, tvect) call_macos((uintptr)tvect) #define CallMacOS1(type, tvect, arg1) call_macos1((uintptr)tvect, (uintptr)arg1) #define CallMacOS2(type, tvect, arg1, arg2) call_macos2((uintptr)tvect, (uintptr)arg1, (uintptr)arg2) #define CallMacOS3(type, tvect, arg1, arg2, arg3) call_macos3((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3) #define CallMacOS4(type, tvect, arg1, arg2, arg3, arg4) call_macos4((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4) #define CallMacOS5(type, tvect, arg1, arg2, arg3, arg4, arg5) call_macos5((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5) #define CallMacOS6(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6) call_macos6((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6) #define CallMacOS7(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7) call_macos7((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6, (uintptr)arg7) #ifdef __cplusplus extern "C" { #endif extern uint32 call_macos(uint32 tvect); extern uint32 call_macos1(uint32 tvect, uint32 arg1); extern uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2); extern uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3); extern uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4); extern uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5); extern uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6); extern uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7); #ifdef __cplusplus } #endif // Construct four-character-code from string #define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) extern uint32 FindLibSymbol(char *lib, char *sym); // Find symbol in shared library extern uint32 Mac_sysalloc(uint32 size); // Allocate block in MacOS system heap zone extern void Mac_sysfree(uint32 addr); // Release block occupied by the nonrelocatable block p #endif /* MACOS_UTIL_H */ \ No newline at end of file diff --git a/SheepShaver/src/EthernetDriver/sysdeps.h b/SheepShaver/src/EthernetDriver/sysdeps.h deleted file mode 100644 index ffd90e061..000000000 --- a/SheepShaver/src/EthernetDriver/sysdeps.h +++ /dev/null @@ -1 +0,0 @@ -#ifndef SYSDEPS_H #define SYSDEPS_H #include #define SIZEOF_VOID_P 4 #define WORDS_BIGENDIAN 1 #define REAL_ADDRESSING 1 /* Define to build the Ethernet driver completly in MacOS space */ #define BUILD_ETHER_FULL_DRIVER 1 #define ntohl(x) ((uint32)(x)) #define ntohs(x) ((uint16)(x)) #define assert(expr) typedef int bool; typedef signed char int8; typedef signed short int16; typedef signed int int32; typedef unsigned char uint8; typedef unsigned short uint16; typedef unsigned int uint32; typedef uint32 uintptr; #endif /* SYSDEPS_H */ \ No newline at end of file diff --git a/SheepShaver/src/EthernetDriver/xlowmem.h b/SheepShaver/src/EthernetDriver/xlowmem.h deleted file mode 100644 index a37282b39..000000000 --- a/SheepShaver/src/EthernetDriver/xlowmem.h +++ /dev/null @@ -1,64 +0,0 @@ -/* - * xlowmem.h - Definitions for extra Low Memory globals (0x2800..) - * - * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig - * - * 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 XLOWMEM_H -#define XLOWMEM_H - -// Modes for XLM_RUN_MODE -#define MODE_68K 0 // 68k emulator active -#define MODE_NATIVE 1 // Switched to native mode -#define MODE_EMUL_OP 2 // 68k emulator active, within EMUL_OP routine - -#define XLM_SIGNATURE 0x2800 // SheepShaver signature -#define XLM_KERNEL_DATA 0x2804 // Pointer to Kernel Data -#define XLM_TOC 0x2808 // TOC pointer of emulator -#define XLM_SHEEP_OBJ 0x280c // Pointer to SheepShaver object -#define XLM_RUN_MODE 0x2810 // Current run mode, see enum above -#define XLM_68K_R25 0x2814 // Contents of the 68k emulator's r25 (which contains the interrupt level), saved upon entering EMUL_OP mode, used by Execute68k() and the USR1 signal handler -#define XLM_IRQ_NEST 0x2818 // Interrupt disable nesting counter (>0: disabled) -#define XLM_PVR 0x281c // Theoretical PVR -#define XLM_BUS_CLOCK 0x2820 // Bus clock speed in Hz (for DriverServicesLib patch) -#define XLM_EMUL_RETURN_PROC 0x2824 // Pointer to EMUL_RETURN routine -#define XLM_EXEC_RETURN_PROC 0x2828 // Pointer to EXEC_RETURN routine -#define XLM_EMUL_OP_PROC 0x282c // Pointer to EMUL_OP routine -#define XLM_EMUL_RETURN_STACK 0x2830 // Stack pointer for EMUL_RETURN -#define XLM_RES_LIB_TOC 0x2834 // TOC pointer of Resources library -#define XLM_GET_RESOURCE 0x2838 // Pointer to native GetResource() routine -#define XLM_GET_1_RESOURCE 0x283c // Pointer to native Get1Resource() routine -#define XLM_GET_IND_RESOURCE 0x2840 // Pointer to native GetIndResource() routine -#define XLM_GET_1_IND_RESOURCE 0x2844 // Pointer to native Get1IndResource() routine -#define XLM_R_GET_RESOURCE 0x2848 // Pointer to native RGetResource() routine -#define XLM_EXEC_RETURN_OPCODE 0x284c // EXEC_RETURN opcode for Execute68k() -#define XLM_ZERO_PAGE 0x2850 // Pointer to read-only page with all bits set to 0 -#define XLM_R13 0x2854 // Pointer to .sdata section (Linux) - -#define XLM_ETHER_AO_GET_HWADDR 0x28b0 // Pointer to ethernet A0_get_ethernet_address() function -#define XLM_ETHER_AO_ADD_MULTI 0x28b4 // Pointer to ethernet A0_enable_multicast() function -#define XLM_ETHER_AO_DEL_MULTI 0x28b8 // Pointer to ethernet A0_disable_multicast() function -#define XLM_ETHER_AO_SEND_PACKET 0x28bc // Pointer to ethernet A0_transmit_packet() function -#define XLM_ETHER_INIT 0x28c0 // Pointer to ethernet InitStreamModule() function -#define XLM_ETHER_TERM 0x28c4 // Pointer to ethernet TerminateStreamModule() function -#define XLM_ETHER_OPEN 0x28c8 // Pointer to ethernet ether_open() function -#define XLM_ETHER_CLOSE 0x28cc // Pointer to ethernet ether_close() function -#define XLM_ETHER_WPUT 0x28d0 // Pointer to ethernet ether_wput() function -#define XLM_ETHER_RSRV 0x28d4 // Pointer to ethernet ether_rsrv() function -#define XLM_VIDEO_DOIO 0x28d8 // Pointer to video DoDriverIO() function - -#endif diff --git a/SheepShaver/src/EthernetDriverFull.i b/SheepShaver/src/EthernetDriverFull.i deleted file mode 100644 index 80df63955..000000000 --- a/SheepShaver/src/EthernetDriverFull.i +++ /dev/null @@ -1,737 +0,0 @@ - 0x4a, 0x6f, 0x79, 0x21, 0x70, 0x65, 0x66, 0x66, 0x70, 0x77, 0x70, 0x63, 0x00, 0x00, 0x00, 0x01, - 0xd1, 0x9b, 0x81, 0x7e, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x03, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x28, 0xa4, 0x00, 0x00, 0x28, 0xa4, 0x00, 0x00, 0x28, 0xa4, 0x00, 0x00, 0x02, 0x20, - 0x00, 0x04, 0x04, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x08, - 0x00, 0x00, 0x04, 0xd8, 0x00, 0x00, 0x03, 0x34, 0x00, 0x00, 0x2a, 0xd0, 0x02, 0x01, 0x04, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x01, 0x96, 0x00, 0x00, 0x00, 0x80, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x74, 0x00, 0x00, 0x00, 0x90, 0x00, 0x00, 0x01, 0x40, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x02, 0x00, 0x00, 0x0d, 0x02, 0x00, 0x00, 0x17, 0x02, 0x00, 0x00, 0x21, 0x02, 0x00, 0x00, 0x2f, - 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x4b, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0e, - 0x00, 0x00, 0x00, 0x00, 0x4a, 0x05, 0x42, 0x27, 0x80, 0x4b, 0x46, 0x08, 0x09, 0xc1, 0x01, 0x43, - 0x00, 0x41, 0x00, 0x41, 0x00, 0x42, 0x00, 0x41, 0x00, 0x42, 0x00, 0x81, 0x81, 0xc7, 0x40, 0x31, - 0x49, 0x6e, 0x74, 0x65, 0x72, 0x66, 0x61, 0x63, 0x65, 0x4c, 0x69, 0x62, 0x00, 0x42, 0x6c, 0x6f, - 0x63, 0x6b, 0x5a, 0x65, 0x72, 0x6f, 0x00, 0x4e, 0x65, 0x77, 0x50, 0x74, 0x72, 0x53, 0x79, 0x73, - 0x00, 0x42, 0x6c, 0x6f, 0x63, 0x6b, 0x4d, 0x6f, 0x76, 0x65, 0x44, 0x61, 0x74, 0x61, 0x00, 0x47, - 0x65, 0x74, 0x53, 0x68, 0x61, 0x72, 0x65, 0x64, 0x4c, 0x69, 0x62, 0x72, 0x61, 0x72, 0x79, 0x00, - 0x46, 0x69, 0x6e, 0x64, 0x53, 0x79, 0x6d, 0x62, 0x6f, 0x6c, 0x00, 0x44, 0x69, 0x73, 0x70, 0x6f, - 0x73, 0x65, 0x50, 0x74, 0x72, 0x00, 0x54, 0x65, 0x72, 0x6d, 0x69, 0x6e, 0x61, 0x74, 0x65, 0x53, - 0x74, 0x72, 0x65, 0x61, 0x6d, 0x4d, 0x6f, 0x64, 0x75, 0x6c, 0x65, 0x54, 0x68, 0x65, 0x44, 0x72, - 0x69, 0x76, 0x65, 0x72, 0x44, 0x65, 0x73, 0x63, 0x72, 0x69, 0x70, 0x74, 0x69, 0x6f, 0x6e, 0x49, - 0x6e, 0x69, 0x74, 0x53, 0x74, 0x72, 0x65, 0x61, 0x6d, 0x4d, 0x6f, 0x64, 0x75, 0x6c, 0x65, 0x47, - 0x65, 0x74, 0x4f, 0x54, 0x49, 0x6e, 0x73, 0x74, 0x61, 0x6c, 0x6c, 0x49, 0x6e, 0x66, 0x6f, 0x56, - 0x61, 0x6c, 0x69, 0x64, 0x61, 0x74, 0x65, 0x48, 0x61, 0x72, 0x64, 0x77, 0x61, 0x72, 0x65, 0x00, - 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, 0x00, 0x02, 0x00, 0x04, 0x00, 0x03, 0x00, 0x04, 0x00, 0x04, - 0x00, 0x15, 0x5e, 0x85, 0x00, 0x14, 0xbd, 0xe0, 0x00, 0x10, 0x8f, 0x84, 0x00, 0x10, 0xae, 0x97, - 0x00, 0x10, 0x4e, 0x3c, 0x02, 0x00, 0x00, 0x56, 0x00, 0x00, 0x01, 0x34, 0x00, 0x01, 0x01, 0x00, - 0x00, 0x6b, 0x00, 0x00, 0x01, 0x4c, 0x00, 0x01, 0x02, 0x00, 0x00, 0x7f, 0x00, 0x00, 0x01, 0x3c, - 0x00, 0x01, 0x02, 0x00, 0x00, 0x8f, 0x00, 0x00, 0x01, 0x04, 0x00, 0x01, 0x02, 0x00, 0x00, 0x9f, - 0x00, 0x00, 0x01, 0x0c, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x38, 0x60, 0x00, 0x00, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x38, 0x62, 0x02, 0x44, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xc0, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xc4, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xb0, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xb4, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xb8, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x41, 0x00, 0x0c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x00, 0x28, 0xbc, 0x80, 0x40, 0x28, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, - 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, - 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x85, 0x23, 0x78, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x60, 0x1b, 0x78, - 0x7c, 0x04, 0x03, 0x78, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x62, 0x00, 0xfc, 0x48, 0x00, 0x23, 0xd5, - 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x3b, 0xe2, 0x05, 0x00, 0x3b, 0xa2, 0x02, 0xde, - 0x3b, 0xc2, 0x02, 0x62, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x1f, 0x00, 0x00, - 0x2c, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x01, 0x48, 0x00, 0x02, 0x68, - 0x38, 0x00, 0x00, 0x00, 0x38, 0x82, 0x02, 0x6f, 0x7f, 0xc3, 0xf3, 0x78, 0x90, 0x1f, 0x00, 0x00, - 0x48, 0x00, 0x22, 0x61, 0x90, 0x62, 0x00, 0xfc, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x02, 0x40, 0x38, 0x82, 0x02, 0x77, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x22, 0x41, 0x90, 0x62, 0x00, 0xf8, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x02, 0x20, 0x38, 0x82, 0x02, 0x7e, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x22, 0x21, 0x90, 0x62, 0x00, 0xf4, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x02, 0x00, 0x38, 0x82, 0x02, 0x87, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x22, 0x01, 0x90, 0x62, 0x00, 0xf0, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0xe0, 0x38, 0x82, 0x02, 0x8e, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0xe1, 0x90, 0x62, 0x00, 0xec, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0xc0, 0x38, 0x82, 0x02, 0x96, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0xc1, 0x90, 0x62, 0x00, 0xe8, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0xa0, 0x38, 0x82, 0x02, 0x9c, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0xa1, 0x90, 0x62, 0x00, 0xe4, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0x80, 0x38, 0x82, 0x02, 0xa2, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0x81, 0x90, 0x62, 0x00, 0xe0, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0x60, 0x38, 0x82, 0x02, 0xab, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0x61, 0x90, 0x62, 0x00, 0xdc, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0x40, 0x38, 0x82, 0x02, 0xb8, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0x41, 0x90, 0x62, 0x00, 0xd8, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0x20, 0x38, 0x82, 0x02, 0xc4, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0x21, 0x90, 0x62, 0x00, 0xd4, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0x00, 0x38, 0x82, 0x02, 0xcc, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x21, 0x01, 0x90, 0x62, 0x00, 0xd0, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0xe0, 0x38, 0x82, 0x02, 0xd4, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x20, 0xe1, 0x90, 0x62, 0x00, 0xcc, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0xc0, 0x38, 0x82, 0x02, 0xef, 0x7f, 0xa3, 0xeb, 0x78, - 0x48, 0x00, 0x20, 0xc1, 0x90, 0x62, 0x00, 0xc8, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0xa0, 0x38, 0x82, 0x03, 0x01, 0x7f, 0xa3, 0xeb, 0x78, - 0x48, 0x00, 0x20, 0xa1, 0x90, 0x62, 0x00, 0xc4, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x80, 0x38, 0x82, 0x03, 0x13, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x20, 0x81, 0x90, 0x62, 0x00, 0xc0, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x60, 0x38, 0x82, 0x03, 0x21, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x20, 0x61, 0x90, 0x62, 0x00, 0xbc, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x40, 0x38, 0x82, 0x03, 0x30, 0x7f, 0xc3, 0xf3, 0x78, - 0x48, 0x00, 0x20, 0x41, 0x90, 0x62, 0x00, 0xb8, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x20, 0x38, 0x00, 0x00, 0x00, 0x38, 0x62, 0x02, 0x5c, - 0x90, 0x02, 0x01, 0x00, 0x4b, 0xff, 0xfc, 0x0d, 0x38, 0x00, 0x00, 0x01, 0x38, 0x60, 0x00, 0x01, - 0x90, 0x1f, 0x00, 0x00, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0xa1, 0xff, 0xf4, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x93, 0xe1, 0xff, 0xfc, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, - 0x4b, 0xff, 0xfd, 0x41, 0x54, 0x7f, 0x06, 0x3e, 0x80, 0x62, 0x00, 0x40, 0x4b, 0xff, 0xfb, 0x25, - 0x2c, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x08, 0x3b, 0xe0, 0x00, 0x00, 0x57, 0xe3, 0x06, 0x3e, - 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, 0x83, 0xe1, 0xff, 0xfc, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x02, 0x01, 0x00, - 0x28, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x0c, 0x38, 0x62, 0x03, 0x3d, 0x48, 0x00, 0x22, 0xa5, - 0x38, 0x62, 0x05, 0x00, 0x38, 0x00, 0x00, 0x00, 0x90, 0x03, 0x00, 0x00, 0x80, 0x01, 0x00, 0x48, - 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x4b, 0xff, 0xff, 0xb5, - 0x4b, 0xff, 0xfa, 0xf1, 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x93, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7f, 0x1b, 0x78, 0x7c, 0xc9, 0x33, 0x78, - 0x39, 0x02, 0x05, 0x00, 0x7c, 0xea, 0x3b, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, - 0x80, 0x08, 0x00, 0x00, 0x2c, 0x00, 0x00, 0x00, 0x40, 0x82, 0x00, 0x14, 0x38, 0x62, 0x03, 0x7c, - 0x48, 0x00, 0x22, 0x21, 0x38, 0x60, 0x00, 0x06, 0x48, 0x00, 0x00, 0x68, 0x80, 0x1f, 0x00, 0x14, - 0x28, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x54, - 0x80, 0x62, 0x00, 0xc0, 0x7c, 0x87, 0x23, 0x78, 0x7c, 0xa8, 0x2b, 0x78, 0x7f, 0xe6, 0xfb, 0x78, - 0x38, 0x82, 0x01, 0x00, 0x38, 0xa0, 0x00, 0x38, 0x48, 0x00, 0x20, 0x89, 0x2c, 0x03, 0x00, 0x00, - 0x41, 0x82, 0x00, 0x08, 0x48, 0x00, 0x00, 0x2c, 0x80, 0x9f, 0x00, 0x14, 0x38, 0x00, 0x00, 0x00, - 0x38, 0x60, 0x00, 0x00, 0x93, 0xe4, 0x00, 0x18, 0x90, 0x04, 0x00, 0x04, 0x90, 0x04, 0x00, 0x08, - 0xb0, 0x04, 0x00, 0x0c, 0x90, 0x04, 0x00, 0x10, 0x90, 0x04, 0x00, 0x14, 0x90, 0x04, 0x00, 0x34, - 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x83, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7c, 0x1b, 0x78, 0x38, 0x82, 0x05, 0x00, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x04, 0x00, 0x00, 0x2c, 0x00, 0x00, 0x00, - 0x40, 0x82, 0x00, 0x14, 0x38, 0x62, 0x03, 0xad, 0x48, 0x00, 0x21, 0x69, 0x38, 0x60, 0x00, 0x06, - 0x48, 0x00, 0x00, 0xb8, 0x83, 0xbc, 0x00, 0x14, 0x28, 0x1d, 0x00, 0x00, 0x40, 0x82, 0x00, 0x88, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0xa4, 0x48, 0x00, 0x00, 0x7c, 0x38, 0x63, 0x00, 0x04, - 0x4b, 0xff, 0xfa, 0xb1, 0x83, 0xdd, 0x00, 0x34, 0x3b, 0xfe, 0x00, 0x04, 0x48, 0x00, 0x00, 0x20, - 0x7f, 0xe3, 0xfb, 0x78, 0x38, 0x9e, 0x00, 0x04, 0x38, 0xa0, 0x00, 0x06, 0x48, 0x00, 0x20, 0xd5, - 0x2c, 0x03, 0x00, 0x00, 0x41, 0x82, 0x00, 0x14, 0x83, 0xde, 0x00, 0x00, 0x28, 0x1e, 0x00, 0x00, - 0x40, 0x82, 0xff, 0xe0, 0x48, 0x00, 0x00, 0x40, 0x38, 0x9d, 0x00, 0x34, 0x48, 0x00, 0x00, 0x30, - 0x60, 0x00, 0x00, 0x00, 0x80, 0x04, 0x00, 0x00, 0x7c, 0x00, 0xf0, 0x40, 0x40, 0x82, 0x00, 0x1c, - 0x80, 0x1e, 0x00, 0x00, 0x7f, 0xc3, 0xf3, 0x78, 0x90, 0x04, 0x00, 0x00, 0x48, 0x00, 0x1e, 0x65, - 0x48, 0x00, 0x00, 0x14, 0x60, 0x00, 0x00, 0x00, 0x7c, 0x04, 0x03, 0x78, 0x28, 0x04, 0x00, 0x00, - 0x40, 0x82, 0xff, 0xd4, 0x80, 0x7d, 0x00, 0x34, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0xff, 0x80, - 0x38, 0x00, 0x00, 0x00, 0x7f, 0x85, 0xe3, 0x78, 0x90, 0x1d, 0x00, 0x34, 0x38, 0x82, 0x01, 0x00, - 0x80, 0x62, 0x00, 0xbc, 0x48, 0x00, 0x1e, 0xad, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, - 0xbb, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x38, 0xc2, 0x05, 0x00, 0x7c, 0x69, 0x1b, 0x78, 0x7c, 0x85, 0x23, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x06, 0x00, 0x00, 0x2c, 0x00, 0x00, 0x00, - 0x40, 0x82, 0x00, 0x14, 0x38, 0x62, 0x03, 0xdf, 0x48, 0x00, 0x20, 0x69, 0x38, 0x60, 0x00, 0x06, - 0x48, 0x00, 0x01, 0x8c, 0x81, 0x09, 0x00, 0x14, 0x28, 0x08, 0x00, 0x00, 0x40, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x06, 0x48, 0x00, 0x01, 0x78, 0x80, 0xc5, 0x00, 0x14, 0x88, 0x06, 0x00, 0x0d, - 0x2c, 0x00, 0x00, 0x0e, 0x41, 0x82, 0x01, 0x30, 0x40, 0x80, 0x00, 0x1c, 0x2c, 0x00, 0x00, 0x01, - 0x41, 0x82, 0x00, 0x48, 0x40, 0x80, 0x01, 0x38, 0x2c, 0x00, 0x00, 0x00, 0x40, 0x80, 0x00, 0x20, - 0x48, 0x00, 0x01, 0x2c, 0x2c, 0x00, 0x00, 0x86, 0x41, 0x82, 0x01, 0x1c, 0x40, 0x80, 0x01, 0x20, - 0x2c, 0x00, 0x00, 0x83, 0x41, 0x82, 0x00, 0x24, 0x48, 0x00, 0x01, 0x14, 0x38, 0xc2, 0x04, 0xf4, - 0x7c, 0xa3, 0x2b, 0x78, 0x80, 0x86, 0x00, 0x00, 0x38, 0x04, 0x00, 0x01, 0x90, 0x06, 0x00, 0x00, - 0x48, 0x00, 0x08, 0x31, 0x48, 0x00, 0x01, 0x04, 0x80, 0x65, 0x00, 0x0c, 0x80, 0xc3, 0x00, 0x00, - 0x28, 0x06, 0x00, 0x31, 0x41, 0x81, 0x00, 0xb8, 0x38, 0x62, 0x04, 0x10, 0x54, 0xc0, 0x10, 0x3a, - 0x7c, 0x63, 0x00, 0x2e, 0x7c, 0x69, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, 0x38, 0xe2, 0x04, 0xf0, - 0x7d, 0x03, 0x43, 0x78, 0x7d, 0x24, 0x4b, 0x78, 0x80, 0xc7, 0x00, 0x00, 0x38, 0x06, 0x00, 0x01, - 0x90, 0x07, 0x00, 0x00, 0x48, 0x00, 0x1a, 0xad, 0x48, 0x00, 0x00, 0xc0, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x0e, 0x8d, 0x48, 0x00, 0x00, 0xb0, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x10, 0x8d, 0x48, 0x00, 0x00, 0xa0, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x11, 0x9d, 0x48, 0x00, 0x00, 0x90, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x13, 0x7d, 0x48, 0x00, 0x00, 0x80, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x14, 0x1d, 0x48, 0x00, 0x00, 0x70, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x16, 0x2d, 0x48, 0x00, 0x00, 0x60, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x17, 0x7d, 0x48, 0x00, 0x00, 0x50, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x18, 0xad, 0x48, 0x00, 0x00, 0x40, 0x7d, 0x03, 0x43, 0x78, - 0x7d, 0x24, 0x4b, 0x78, 0x38, 0xe0, 0x00, 0x12, 0x39, 0x00, 0x00, 0x00, 0x48, 0x00, 0x0c, 0x95, - 0x48, 0x00, 0x00, 0x28, 0x7d, 0x03, 0x43, 0x78, 0x7d, 0x24, 0x4b, 0x78, 0x48, 0x00, 0x00, 0xd5, - 0x48, 0x00, 0x00, 0x18, 0x48, 0x00, 0x02, 0xcd, 0x48, 0x00, 0x00, 0x10, 0x80, 0x62, 0x00, 0xf4, - 0x7c, 0xa4, 0x2b, 0x78, 0x48, 0x00, 0x1c, 0x9d, 0x38, 0xa2, 0x04, 0xfc, 0x38, 0x60, 0x00, 0x00, - 0x80, 0x85, 0x00, 0x00, 0x38, 0x04, 0x00, 0x01, 0x90, 0x05, 0x00, 0x00, 0x80, 0x01, 0x00, 0x48, - 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0xc1, 0xff, 0xf8, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7e, 0x1b, 0x78, 0x90, 0x01, 0x00, 0x08, - 0x94, 0x21, 0xff, 0xc0, 0x48, 0x00, 0x00, 0x4c, 0x80, 0x62, 0x00, 0xd8, 0x7f, 0xc4, 0xf3, 0x78, - 0x48, 0x00, 0x1c, 0x51, 0x28, 0x03, 0x00, 0x00, 0x41, 0x82, 0x00, 0x18, 0x80, 0x62, 0x00, 0xe0, - 0x7f, 0xc4, 0xf3, 0x78, 0x7f, 0xe5, 0xfb, 0x78, 0x48, 0x00, 0x1c, 0x89, 0x48, 0x00, 0x00, 0x24, - 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xe4, 0xfb, 0x78, 0x48, 0x00, 0x1c, 0x29, 0x80, 0x62, 0x00, 0xd0, - 0x7f, 0xc4, 0xf3, 0x78, 0x38, 0xa0, 0x00, 0x00, 0x48, 0x00, 0x1c, 0x69, 0x48, 0x00, 0x00, 0x18, - 0x80, 0x62, 0x00, 0xe8, 0x7f, 0xc4, 0xf3, 0x78, 0x48, 0x00, 0x1c, 0x09, 0x7c, 0x7f, 0x1b, 0x79, - 0x40, 0x82, 0xff, 0xa8, 0x38, 0x60, 0x00, 0x00, 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, - 0x7c, 0x08, 0x03, 0xa6, 0xbb, 0xc1, 0xff, 0xf8, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0xbe, 0x2b, 0x78, 0x7c, 0x7c, 0x1b, 0x78, - 0x7c, 0x9d, 0x23, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x83, 0xe5, 0x00, 0x0c, - 0x80, 0x1f, 0x00, 0x00, 0x2c, 0x00, 0x4f, 0x03, 0x41, 0x82, 0x01, 0x04, 0x40, 0x80, 0x00, 0x10, - 0x2c, 0x00, 0x4f, 0x02, 0x40, 0x80, 0x00, 0x14, 0x48, 0x00, 0x01, 0x2c, 0x2c, 0x00, 0x6c, 0x0a, - 0x41, 0x82, 0x00, 0x88, 0x48, 0x00, 0x01, 0x20, 0x80, 0x9e, 0x00, 0x08, 0x28, 0x04, 0x00, 0x00, - 0x41, 0x82, 0x00, 0x18, 0x80, 0x64, 0x00, 0x0c, 0x80, 0x04, 0x00, 0x10, 0x7c, 0x03, 0x00, 0x50, - 0x28, 0x00, 0x00, 0x04, 0x41, 0x82, 0x00, 0x10, 0x38, 0x00, 0x00, 0x16, 0x90, 0x1f, 0x00, 0x10, - 0x48, 0x00, 0x01, 0x5c, 0x80, 0x63, 0x00, 0x00, 0x3c, 0x03, 0x00, 0x01, 0x28, 0x00, 0xff, 0xff, - 0x41, 0x82, 0x00, 0x14, 0x20, 0x03, 0x00, 0x08, 0x7c, 0x00, 0x00, 0x34, 0x54, 0x00, 0xd9, 0x7e, - 0x90, 0x1c, 0x00, 0x10, 0x38, 0x00, 0x00, 0x00, 0x90, 0x1e, 0x00, 0x08, 0x80, 0x62, 0x00, 0xf4, - 0x48, 0x00, 0x1b, 0x41, 0x80, 0x1c, 0x00, 0x10, 0x2c, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x10, - 0x38, 0x00, 0x00, 0x08, 0x90, 0x1f, 0x00, 0x14, 0x48, 0x00, 0x00, 0xb8, 0x38, 0x00, 0x00, 0x01, - 0x90, 0x1f, 0x00, 0x14, 0x48, 0x00, 0x00, 0xac, 0x80, 0x62, 0x00, 0xf0, 0x80, 0x9e, 0x00, 0x08, - 0x48, 0x00, 0x1b, 0x11, 0x7c, 0x64, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x10, 0x38, 0x00, 0x00, 0x0c, - 0x90, 0x1f, 0x00, 0x10, 0x48, 0x00, 0x00, 0xe8, 0x80, 0xc4, 0x00, 0x14, 0x38, 0x00, 0x00, 0x01, - 0x7f, 0x83, 0xe3, 0x78, 0x38, 0xa0, 0x00, 0x01, 0x98, 0x06, 0x00, 0x0d, 0x48, 0x00, 0x03, 0x65, - 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x10, 0x38, 0x00, 0x00, 0x0c, 0x90, 0x1f, 0x00, 0x10, - 0x48, 0x00, 0x00, 0xbc, 0x80, 0x9e, 0x00, 0x08, 0x90, 0x64, 0x00, 0x08, 0x80, 0x1c, 0x00, 0x08, - 0x60, 0x00, 0x00, 0x08, 0x90, 0x1c, 0x00, 0x08, 0x48, 0x00, 0x00, 0x48, 0x80, 0x9e, 0x00, 0x08, - 0x28, 0x04, 0x00, 0x00, 0x41, 0x82, 0x00, 0x18, 0x80, 0x64, 0x00, 0x0c, 0x80, 0x04, 0x00, 0x10, - 0x7c, 0x03, 0x00, 0x50, 0x28, 0x00, 0x00, 0x04, 0x41, 0x82, 0x00, 0x10, 0x38, 0x00, 0x00, 0x16, - 0x90, 0x1f, 0x00, 0x10, 0x48, 0x00, 0x00, 0x78, 0x38, 0x00, 0x00, 0x01, 0x90, 0x1c, 0x00, 0x14, - 0x48, 0x00, 0x00, 0x10, 0x38, 0x00, 0x00, 0x16, 0x90, 0x1f, 0x00, 0x10, 0x48, 0x00, 0x00, 0x60, - 0x38, 0x00, 0x00, 0x00, 0x7f, 0xc5, 0xf3, 0x78, 0x90, 0x1f, 0x00, 0x0c, 0x48, 0x00, 0x00, 0x1c, - 0x80, 0x65, 0x00, 0x0c, 0x80, 0x05, 0x00, 0x10, 0x80, 0x9f, 0x00, 0x0c, 0x7c, 0x03, 0x00, 0x50, - 0x7c, 0x04, 0x02, 0x14, 0x90, 0x1f, 0x00, 0x0c, 0x80, 0xa5, 0x00, 0x08, 0x28, 0x05, 0x00, 0x00, - 0x40, 0x82, 0xff, 0xe0, 0x38, 0x60, 0x00, 0x00, 0x38, 0x00, 0x00, 0x81, 0x90, 0x7f, 0x00, 0x10, - 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, 0x80, 0x7e, 0x00, 0x14, 0x98, 0x03, 0x00, 0x0d, - 0x80, 0x62, 0x00, 0xd4, 0x48, 0x00, 0x1a, 0x6d, 0x48, 0x00, 0x00, 0x20, 0x80, 0x7e, 0x00, 0x14, - 0x38, 0x00, 0x00, 0x82, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, 0x98, 0x03, 0x00, 0x0d, - 0x80, 0x62, 0x00, 0xd4, 0x48, 0x00, 0x1a, 0x4d, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, - 0xbb, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x9e, 0x23, 0x78, 0x7c, 0x7d, 0x1b, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x83, 0xe4, 0x00, 0x0c, 0x88, 0x1f, 0x00, 0x00, - 0x54, 0x00, 0x07, 0xbd, 0x41, 0x82, 0x00, 0x14, 0x80, 0x62, 0x00, 0xd0, 0x7f, 0xa4, 0xeb, 0x78, - 0x38, 0xa0, 0x00, 0x01, 0x48, 0x00, 0x19, 0xfd, 0x88, 0x1f, 0x00, 0x00, 0x54, 0x00, 0x07, 0xff, - 0x41, 0x82, 0x00, 0x34, 0x80, 0x62, 0x00, 0xd0, 0x38, 0x9d, 0xff, 0xc0, 0x38, 0xa0, 0x00, 0x01, - 0x48, 0x00, 0x19, 0xe1, 0x88, 0x1f, 0x00, 0x00, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, - 0x54, 0x00, 0x07, 0xfa, 0x98, 0x1f, 0x00, 0x00, 0x80, 0x62, 0x00, 0xd4, 0x48, 0x00, 0x19, 0xc5, - 0x48, 0x00, 0x00, 0x10, 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xc4, 0xf3, 0x78, 0x48, 0x00, 0x19, 0x65, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x54, 0x63, 0x04, 0x3e, 0x2c, 0x03, 0x05, 0xdd, 0x41, 0x80, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x00, - 0x4e, 0x80, 0x00, 0x20, 0x2c, 0x03, 0x00, 0xff, 0x40, 0x82, 0x00, 0x18, 0x54, 0x80, 0x04, 0x3e, - 0x2c, 0x00, 0x00, 0xff, 0x40, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x04, 0x4e, 0x80, 0x00, 0x20, - 0x2c, 0x03, 0x00, 0xaa, 0x40, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x03, 0x4e, 0x80, 0x00, 0x20, - 0x2c, 0x03, 0x00, 0xff, 0x38, 0x60, 0x00, 0x05, 0x4d, 0x81, 0x00, 0x20, 0x38, 0x60, 0x00, 0x01, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x88, 0x03, 0x00, 0x00, 0x54, 0x00, 0x07, 0xff, 0x41, 0x82, 0x00, 0x30, 0x80, 0x83, 0x00, 0x00, - 0x3c, 0x04, 0x00, 0x01, 0x28, 0x00, 0xff, 0xff, 0x40, 0x82, 0x00, 0x18, 0xa0, 0x03, 0x00, 0x04, - 0x28, 0x00, 0xff, 0xff, 0x40, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x02, 0x4e, 0x80, 0x00, 0x20, - 0x38, 0x60, 0x00, 0x01, 0x4e, 0x80, 0x00, 0x20, 0x38, 0x60, 0x00, 0x00, 0x4e, 0x80, 0x00, 0x20, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7f, 0x1b, 0x78, 0x7c, 0x9d, 0x23, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0xa3, 0x00, 0x14, 0x88, 0x05, 0x00, 0x0c, - 0x28, 0x00, 0x00, 0x01, 0x40, 0x82, 0x00, 0x44, 0x80, 0x65, 0x00, 0x04, 0x57, 0xa4, 0x04, 0x3e, - 0x80, 0x05, 0x00, 0x08, 0x7c, 0x03, 0x00, 0x50, 0x7c, 0x00, 0x20, 0x00, 0x41, 0x80, 0x00, 0x2c, - 0x38, 0x00, 0x00, 0x00, 0x98, 0x05, 0x00, 0x0d, 0x80, 0x7f, 0x00, 0x14, 0x80, 0x03, 0x00, 0x04, - 0x90, 0x1f, 0x00, 0x0c, 0x80, 0x7f, 0x00, 0x14, 0x80, 0x03, 0x00, 0x04, 0x7c, 0x00, 0x22, 0x14, - 0x90, 0x1f, 0x00, 0x10, 0x48, 0x00, 0x00, 0x9c, 0x83, 0xdf, 0x00, 0x08, 0x38, 0x00, 0x00, 0x00, - 0x7f, 0xe4, 0xfb, 0x78, 0x90, 0x1f, 0x00, 0x08, 0x80, 0x62, 0x00, 0xf4, 0x48, 0x00, 0x18, 0x25, - 0x28, 0x1e, 0x00, 0x00, 0x7f, 0xdf, 0xf3, 0x78, 0x41, 0x82, 0x00, 0x38, 0x80, 0x7e, 0x00, 0x14, - 0x88, 0x03, 0x00, 0x0c, 0x28, 0x00, 0x00, 0x01, 0x40, 0x82, 0x00, 0x28, 0x80, 0x63, 0x00, 0x04, - 0x57, 0xa0, 0x04, 0x3e, 0x80, 0x9e, 0x00, 0x0c, 0x7c, 0x63, 0x20, 0x50, 0x7c, 0x03, 0x00, 0x00, - 0x41, 0x80, 0x00, 0x10, 0x7c, 0x00, 0x20, 0x50, 0x90, 0x1e, 0x00, 0x0c, 0x48, 0x00, 0x00, 0x44, - 0x57, 0xbe, 0x04, 0x3e, 0x38, 0x80, 0x00, 0x03, 0x7f, 0xc3, 0xf3, 0x78, 0x4b, 0xff, 0xf4, 0x35, - 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x18, 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xe4, 0xfb, 0x78, - 0x48, 0x00, 0x17, 0xc1, 0x3b, 0xe0, 0x00, 0x00, 0x48, 0x00, 0x00, 0x18, 0x93, 0xe3, 0x00, 0x08, - 0x7c, 0x7f, 0x1b, 0x78, 0x80, 0x03, 0x00, 0x10, 0x7c, 0x00, 0xf2, 0x14, 0x90, 0x03, 0x00, 0x10, - 0x7f, 0xe3, 0xfb, 0x78, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0x7c, 0x08, 0x03, 0xa6, - 0xbb, 0xa1, 0xff, 0xf4, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x01, 0xff, 0xe0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7e, 0x1b, 0x78, 0x7c, 0x9f, 0x23, 0x78, - 0x7c, 0xb8, 0x2b, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0x90, 0x80, 0x64, 0x00, 0x0c, - 0x80, 0x03, 0x00, 0x00, 0x28, 0x00, 0x00, 0x07, 0x41, 0x82, 0x00, 0x14, 0x80, 0x62, 0x00, 0xf4, - 0x48, 0x00, 0x17, 0x51, 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x01, 0xc4, 0x83, 0x63, 0x00, 0x04, - 0x80, 0x03, 0x00, 0x08, 0x2c, 0x1b, 0x00, 0x08, 0x7f, 0x83, 0x02, 0x14, 0x41, 0x82, 0x00, 0x28, - 0x40, 0x80, 0x00, 0x10, 0x2c, 0x1b, 0x00, 0x06, 0x41, 0x82, 0x00, 0x14, 0x48, 0x00, 0x00, 0x28, - 0x2c, 0x1b, 0x00, 0x0d, 0x41, 0x82, 0x00, 0x18, 0x48, 0x00, 0x00, 0x1c, 0xa3, 0x5e, 0x00, 0x0c, - 0x48, 0x00, 0x00, 0x18, 0xa3, 0x5c, 0x00, 0x06, 0x48, 0x00, 0x00, 0x10, 0xa3, 0x5c, 0x00, 0x06, - 0x48, 0x00, 0x00, 0x08, 0xa3, 0x5e, 0x00, 0x0c, 0x80, 0x62, 0x00, 0xcc, 0x7f, 0xe4, 0xfb, 0x78, - 0x48, 0x00, 0x16, 0xf1, 0x54, 0x79, 0x04, 0x3e, 0xa0, 0x7e, 0x00, 0x0c, 0x7f, 0x44, 0xd3, 0x78, - 0x4b, 0xff, 0xfd, 0xa1, 0x54, 0x7d, 0x04, 0x3e, 0x2c, 0x1d, 0x00, 0x02, 0x41, 0x82, 0x00, 0x8c, - 0x40, 0x80, 0x00, 0x14, 0x2c, 0x1d, 0x00, 0x00, 0x41, 0x82, 0x00, 0x1c, 0x40, 0x80, 0x00, 0x24, - 0x48, 0x00, 0x00, 0x78, 0x2c, 0x1d, 0x00, 0x04, 0x41, 0x82, 0x00, 0x58, 0x40, 0x80, 0x00, 0x6c, - 0x48, 0x00, 0x00, 0x30, 0x7f, 0x59, 0xd3, 0x78, 0x3b, 0x00, 0x00, 0x0e, 0x48, 0x00, 0x00, 0x64, - 0x2c, 0x18, 0x00, 0x00, 0x3b, 0x00, 0x00, 0x11, 0x41, 0x82, 0x00, 0x0c, 0x3b, 0x20, 0x00, 0x00, - 0x48, 0x00, 0x00, 0x50, 0x38, 0x19, 0x00, 0x03, 0x54, 0x19, 0x04, 0x3e, 0x48, 0x00, 0x00, 0x44, - 0x2c, 0x18, 0x00, 0x00, 0x3b, 0x00, 0x00, 0x16, 0x41, 0x82, 0x00, 0x0c, 0x3b, 0x20, 0x00, 0x00, - 0x48, 0x00, 0x00, 0x30, 0x38, 0x19, 0x00, 0x08, 0x54, 0x19, 0x04, 0x3e, 0x48, 0x00, 0x00, 0x24, - 0x2c, 0x18, 0x00, 0x00, 0x3b, 0x00, 0x00, 0x0e, 0x41, 0x82, 0x00, 0x18, 0x3b, 0x20, 0x00, 0x00, - 0x48, 0x00, 0x00, 0x10, 0x48, 0x00, 0x00, 0x0c, 0x3b, 0x00, 0x00, 0x0e, 0x7f, 0x59, 0xd3, 0x78, - 0x7f, 0x84, 0xe3, 0x78, 0x7f, 0x65, 0xdb, 0x78, 0x38, 0x61, 0x00, 0x38, 0x48, 0x00, 0x17, 0x85, - 0x7f, 0xe3, 0xfb, 0x78, 0x7f, 0x04, 0xc3, 0x78, 0x4b, 0xff, 0xfd, 0x89, 0x7c, 0x7f, 0x1b, 0x79, - 0x40, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x94, 0x80, 0x9f, 0x00, 0x0c, - 0x2c, 0x1d, 0x00, 0x02, 0xb3, 0x24, 0x00, 0x0c, 0x80, 0x01, 0x00, 0x38, 0x90, 0x04, 0x00, 0x00, - 0xa0, 0x01, 0x00, 0x3c, 0xb0, 0x04, 0x00, 0x04, 0x41, 0x82, 0x00, 0x70, 0x40, 0x80, 0x00, 0x10, - 0x2c, 0x1d, 0x00, 0x01, 0x40, 0x80, 0x00, 0x14, 0x48, 0x00, 0x00, 0x60, 0x2c, 0x1d, 0x00, 0x04, - 0x40, 0x80, 0x00, 0x58, 0x48, 0x00, 0x00, 0x1c, 0x9b, 0x44, 0x00, 0x0e, 0x38, 0x00, 0x00, 0x03, - 0xa0, 0x7e, 0x00, 0x0c, 0x98, 0x64, 0x00, 0x0f, 0x98, 0x04, 0x00, 0x10, 0x48, 0x00, 0x00, 0x3c, - 0x9b, 0x44, 0x00, 0x0e, 0x38, 0x00, 0x00, 0x03, 0x28, 0x1b, 0x00, 0x0d, 0xa0, 0x7e, 0x00, 0x0c, - 0x98, 0x64, 0x00, 0x0f, 0x98, 0x04, 0x00, 0x10, 0x41, 0x80, 0x00, 0x0c, 0x38, 0x61, 0x00, 0x40, - 0x48, 0x00, 0x00, 0x08, 0x38, 0x7e, 0x00, 0x2c, 0x80, 0x03, 0x00, 0x00, 0x90, 0x04, 0x00, 0x11, - 0x88, 0x03, 0x00, 0x04, 0x98, 0x04, 0x00, 0x15, 0x7f, 0xe3, 0xfb, 0x78, 0x80, 0x01, 0x00, 0x78, - 0x38, 0x21, 0x00, 0x70, 0xbb, 0x01, 0xff, 0xe0, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7d, 0x1b, 0x78, 0x3b, 0xe2, 0x02, 0x5c, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x83, 0xc3, 0x00, 0x0c, 0xa0, 0x1e, 0x00, 0x0c, - 0x28, 0x00, 0x00, 0x00, 0x40, 0x82, 0x00, 0x18, 0x80, 0x62, 0x00, 0xcc, 0x7f, 0xa4, 0xeb, 0x78, - 0x48, 0x00, 0x15, 0x41, 0x38, 0x03, 0xff, 0xf2, 0xb0, 0x1e, 0x00, 0x0c, 0x80, 0x1f, 0x00, 0x00, - 0x7f, 0xa3, 0xeb, 0x78, 0x90, 0x1e, 0x00, 0x06, 0xa0, 0x1f, 0x00, 0x04, 0xb0, 0x1e, 0x00, 0x0a, - 0x4b, 0xff, 0xf1, 0x31, 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xa4, 0xeb, 0x78, 0x48, 0x00, 0x15, 0x15, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x21, 0xff, 0xe4, 0x7c, 0x08, 0x02, 0xa6, 0x54, 0xb9, 0x04, 0x3e, 0x7c, 0x7b, 0x1b, 0x78, - 0x2c, 0x19, 0x00, 0x02, 0x7c, 0x9c, 0x23, 0x78, 0x7c, 0xdd, 0x33, 0x78, 0x90, 0x01, 0x00, 0x08, - 0x94, 0x21, 0xff, 0xa0, 0x41, 0x82, 0x00, 0x38, 0x40, 0x80, 0x00, 0x10, 0x2c, 0x19, 0x00, 0x01, - 0x40, 0x80, 0x00, 0x14, 0x48, 0x00, 0x00, 0x28, 0x2c, 0x19, 0x00, 0x04, 0x40, 0x80, 0x00, 0x20, - 0x48, 0x00, 0x00, 0x10, 0x3b, 0xe0, 0x00, 0x08, 0x3b, 0xc0, 0x00, 0x11, 0x48, 0x00, 0x00, 0x18, - 0x3b, 0xe0, 0x00, 0x0d, 0x3b, 0xc0, 0x00, 0x16, 0x48, 0x00, 0x00, 0x0c, 0x3b, 0xe0, 0x00, 0x08, - 0x3b, 0xc0, 0x00, 0x0e, 0x80, 0x1b, 0x00, 0x08, 0x54, 0x00, 0x07, 0x39, 0x41, 0x82, 0x00, 0x48, - 0x2c, 0x1d, 0x00, 0x00, 0x40, 0x82, 0x00, 0x40, 0x80, 0x1b, 0x00, 0x14, 0x2c, 0x00, 0x00, 0x00, - 0x40, 0x82, 0x00, 0x10, 0x80, 0x1c, 0x00, 0x0c, 0x7c, 0x00, 0xf2, 0x14, 0x90, 0x1c, 0x00, 0x0c, - 0x38, 0xc2, 0x04, 0xe4, 0x7f, 0x85, 0xe3, 0x78, 0x80, 0x62, 0x00, 0xe4, 0x80, 0x86, 0x00, 0x00, - 0x38, 0x04, 0x00, 0x01, 0x90, 0x06, 0x00, 0x00, 0x80, 0x9b, 0x00, 0x18, 0x48, 0x00, 0x14, 0x95, - 0x48, 0x00, 0x01, 0x2c, 0x57, 0xe3, 0x08, 0x3c, 0x38, 0x80, 0x00, 0x03, 0x3b, 0x43, 0x00, 0x18, - 0x7f, 0x43, 0xd3, 0x78, 0x4b, 0xff, 0xf0, 0x8d, 0x28, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x24, - 0x80, 0x62, 0x00, 0xf4, 0x7f, 0x84, 0xe3, 0x78, 0x48, 0x00, 0x14, 0x19, 0x38, 0x82, 0x04, 0xd8, - 0x80, 0x64, 0x00, 0x00, 0x38, 0x03, 0x00, 0x01, 0x90, 0x04, 0x00, 0x00, 0x48, 0x00, 0x00, 0xf0, - 0x80, 0xc3, 0x00, 0x14, 0x38, 0xe0, 0x00, 0x01, 0x38, 0xa0, 0x00, 0x08, 0x38, 0x80, 0x00, 0x18, - 0x38, 0x1f, 0x00, 0x18, 0x98, 0xe6, 0x00, 0x0d, 0x2c, 0x19, 0x00, 0x03, 0x80, 0xe3, 0x00, 0x0c, - 0x90, 0xa7, 0x00, 0x00, 0x80, 0xa3, 0x00, 0x10, 0x7c, 0xa5, 0xd2, 0x14, 0x90, 0xa3, 0x00, 0x10, - 0x93, 0x83, 0x00, 0x08, 0x93, 0xe7, 0x00, 0x04, 0x90, 0x87, 0x00, 0x08, 0x93, 0xe7, 0x00, 0x0c, - 0x90, 0x07, 0x00, 0x10, 0x93, 0xa7, 0x00, 0x14, 0x81, 0x1c, 0x00, 0x0c, 0x80, 0xc3, 0x00, 0x0c, - 0x80, 0xa7, 0x00, 0x08, 0x80, 0x87, 0x00, 0x10, 0x80, 0x08, 0x00, 0x00, 0x7c, 0xa6, 0x2a, 0x14, - 0x7c, 0x86, 0x22, 0x14, 0x90, 0x05, 0x00, 0x00, 0xa0, 0x08, 0x00, 0x04, 0xb0, 0x05, 0x00, 0x04, - 0x80, 0x08, 0x00, 0x06, 0x90, 0x04, 0x00, 0x00, 0xa0, 0x08, 0x00, 0x0a, 0xb0, 0x04, 0x00, 0x04, - 0x88, 0x08, 0x00, 0x0e, 0xb0, 0x05, 0x00, 0x06, 0x88, 0x08, 0x00, 0x0f, 0xb0, 0x04, 0x00, 0x06, - 0x40, 0x82, 0x00, 0x24, 0x80, 0x08, 0x00, 0x11, 0x90, 0x05, 0x00, 0x08, 0x88, 0x08, 0x00, 0x15, - 0x98, 0x05, 0x00, 0x0c, 0x80, 0x08, 0x00, 0x11, 0x90, 0x04, 0x00, 0x08, 0x88, 0x08, 0x00, 0x15, - 0x98, 0x04, 0x00, 0x0c, 0x80, 0x1b, 0x00, 0x14, 0x2c, 0x00, 0x00, 0x00, 0x40, 0x82, 0x00, 0x10, - 0x80, 0x1c, 0x00, 0x0c, 0x7c, 0x00, 0xf2, 0x14, 0x90, 0x1c, 0x00, 0x0c, 0x38, 0xc2, 0x04, 0xe8, - 0x7c, 0x65, 0x1b, 0x78, 0x80, 0x62, 0x00, 0xe4, 0x80, 0x86, 0x00, 0x00, 0x38, 0x04, 0x00, 0x01, - 0x90, 0x06, 0x00, 0x00, 0x80, 0x9b, 0x00, 0x18, 0x48, 0x00, 0x13, 0x69, 0x80, 0x01, 0x00, 0x68, - 0x38, 0x21, 0x00, 0x60, 0xbb, 0x21, 0xff, 0xe4, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, - 0xbe, 0x21, 0xff, 0xc4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7f, 0x1b, 0x78, 0x90, 0x01, 0x00, 0x08, - 0x94, 0x21, 0xff, 0x80, 0x83, 0xc3, 0x00, 0x0c, 0xa3, 0xbe, 0x00, 0x0c, 0x2c, 0x1d, 0x05, 0xdd, - 0x41, 0x80, 0x00, 0x0c, 0x7f, 0xa3, 0xeb, 0x78, 0x48, 0x00, 0x00, 0x0c, 0x8b, 0xbe, 0x00, 0x0e, - 0x88, 0x7e, 0x00, 0x0f, 0x7f, 0xa4, 0xeb, 0x78, 0x4b, 0xff, 0xf9, 0x89, 0x7c, 0x60, 0x1b, 0x78, - 0x7f, 0xc3, 0xf3, 0x78, 0x7c, 0x1c, 0x03, 0x78, 0x4b, 0xff, 0xf9, 0xd9, 0x83, 0x42, 0x01, 0x00, - 0x38, 0x80, 0x00, 0x01, 0x57, 0xa0, 0xfe, 0xfe, 0x7c, 0x7b, 0x1b, 0x78, 0x7f, 0xf2, 0xfb, 0x78, - 0x57, 0x96, 0x04, 0x3e, 0x57, 0xb5, 0x07, 0xfe, 0x7c, 0x94, 0x00, 0x30, 0x57, 0xb3, 0xe7, 0x3a, - 0x3b, 0x20, 0x00, 0x00, 0x3b, 0x00, 0x00, 0x00, 0x3a, 0xe0, 0x00, 0x00, 0x48, 0x00, 0x01, 0x6c, - 0x80, 0x1a, 0x00, 0x04, 0x28, 0x00, 0x00, 0x00, 0x41, 0x82, 0x01, 0x50, 0x80, 0x1a, 0x00, 0x08, - 0x54, 0x03, 0x07, 0x7b, 0x41, 0x82, 0x00, 0x10, 0x57, 0xa3, 0x04, 0x3e, 0x28, 0x03, 0x00, 0xff, - 0x40, 0x81, 0x00, 0xac, 0xa0, 0x7a, 0x00, 0x0c, 0x57, 0xa4, 0x04, 0x3e, 0x7c, 0x04, 0x18, 0x40, - 0x40, 0x82, 0x00, 0x74, 0x54, 0x03, 0x07, 0xff, 0x41, 0x82, 0x00, 0x94, 0x88, 0xde, 0x00, 0x11, - 0x88, 0x9a, 0x00, 0x2c, 0x88, 0xbe, 0x00, 0x12, 0x7c, 0xc4, 0x22, 0x78, 0x88, 0x7a, 0x00, 0x2d, - 0x54, 0x87, 0x06, 0x3e, 0x88, 0x9e, 0x00, 0x13, 0x7c, 0xa5, 0x1a, 0x78, 0x88, 0x7a, 0x00, 0x2e, - 0x7c, 0xe7, 0x2b, 0x78, 0x88, 0xde, 0x00, 0x14, 0x88, 0xba, 0x00, 0x2f, 0x7c, 0x83, 0x1a, 0x78, - 0x54, 0xe7, 0x06, 0x3e, 0x88, 0x9e, 0x00, 0x15, 0x7c, 0xe7, 0x1b, 0x78, 0x88, 0x7a, 0x00, 0x30, - 0x7c, 0xc5, 0x2a, 0x78, 0x54, 0xe7, 0x06, 0x3e, 0x7c, 0xe5, 0x2b, 0x78, 0x7c, 0x83, 0x1a, 0x78, - 0x54, 0xa7, 0x06, 0x3e, 0x7c, 0xe3, 0x1b, 0x78, 0x54, 0x67, 0x06, 0x3f, 0x41, 0x82, 0x00, 0x30, - 0x48, 0x00, 0x00, 0xb8, 0x2c, 0x16, 0x00, 0x01, 0x41, 0x82, 0x00, 0x0c, 0x2c, 0x16, 0x00, 0x03, - 0x40, 0x82, 0x00, 0xa8, 0x2c, 0x15, 0x00, 0x00, 0x41, 0x82, 0x00, 0xa0, 0x38, 0x7a, 0x00, 0x1c, - 0x7c, 0x73, 0x18, 0x2e, 0x7c, 0x63, 0xa0, 0x39, 0x41, 0x82, 0x00, 0x90, 0x2c, 0x1b, 0x00, 0x01, - 0x40, 0x82, 0x00, 0x54, 0x54, 0x00, 0x07, 0xbd, 0x41, 0x82, 0x00, 0x4c, 0x82, 0x3a, 0x00, 0x34, - 0x48, 0x00, 0x00, 0x30, 0x60, 0x00, 0x00, 0x00, 0x7f, 0xc3, 0xf3, 0x78, 0x38, 0x91, 0x00, 0x04, - 0x38, 0xa0, 0x00, 0x06, 0x48, 0x00, 0x13, 0x8d, 0x2c, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x10, - 0x38, 0x11, 0x00, 0x04, 0x48, 0x00, 0x00, 0x18, 0x60, 0x00, 0x00, 0x00, 0x82, 0x31, 0x00, 0x00, - 0x28, 0x11, 0x00, 0x00, 0x40, 0x82, 0xff, 0xd4, 0x38, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, - 0x41, 0x82, 0x00, 0x38, 0x28, 0x19, 0x00, 0x00, 0x41, 0x82, 0x00, 0x24, 0x80, 0x62, 0x00, 0xec, - 0x7e, 0x44, 0x93, 0x78, 0x48, 0x00, 0x11, 0x4d, 0x7c, 0x64, 0x1b, 0x78, 0x7f, 0x23, 0xcb, 0x78, - 0x7f, 0x05, 0xc3, 0x78, 0x7e, 0xe6, 0xbb, 0x78, 0x4b, 0xff, 0xfc, 0x49, 0x7f, 0x59, 0xd3, 0x78, - 0x7f, 0x98, 0xe3, 0x78, 0x7f, 0x77, 0xdb, 0x78, 0x80, 0x62, 0x00, 0xb8, 0x7f, 0x44, 0xd3, 0x78, - 0x48, 0x00, 0x11, 0x21, 0x7c, 0x7a, 0x1b, 0x78, 0x28, 0x1a, 0x00, 0x00, 0x40, 0x82, 0xfe, 0x94, - 0x28, 0x19, 0x00, 0x00, 0x41, 0x82, 0x00, 0x1c, 0x7f, 0x23, 0xcb, 0x78, 0x7f, 0xe4, 0xfb, 0x78, - 0x7f, 0x05, 0xc3, 0x78, 0x7e, 0xe6, 0xbb, 0x78, 0x4b, 0xff, 0xfc, 0x09, 0x48, 0x00, 0x00, 0x20, - 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xe4, 0xfb, 0x78, 0x48, 0x00, 0x10, 0xe9, 0x38, 0x82, 0x04, 0xdc, - 0x80, 0x64, 0x00, 0x00, 0x38, 0x03, 0x00, 0x01, 0x90, 0x04, 0x00, 0x00, 0x80, 0x01, 0x00, 0x88, - 0x38, 0x21, 0x00, 0x80, 0xba, 0x21, 0xff, 0xc4, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x9f, 0x23, 0x78, 0x7c, 0x7d, 0x1b, 0x78, - 0x38, 0xc2, 0x04, 0xec, 0x38, 0x80, 0x00, 0x00, 0x7f, 0xe3, 0xfb, 0x78, 0x90, 0x01, 0x00, 0x08, - 0x94, 0x21, 0xff, 0xb0, 0x80, 0xa6, 0x00, 0x00, 0x38, 0x05, 0x00, 0x01, 0x90, 0x06, 0x00, 0x00, - 0x4b, 0xff, 0xec, 0xf1, 0x7c, 0x7e, 0x1b, 0x79, 0x41, 0x82, 0x00, 0x2c, 0x80, 0x7e, 0x00, 0x0c, - 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xe5, 0xfb, 0x78, 0x48, 0x00, 0x11, 0xc9, 0x80, 0x1e, 0x00, 0x10, - 0x7f, 0xc3, 0xf3, 0x78, 0x7c, 0x00, 0xfa, 0x14, 0x90, 0x1e, 0x00, 0x10, 0x4b, 0xff, 0xfd, 0x65, - 0x48, 0x00, 0x00, 0x14, 0x38, 0x82, 0x04, 0xe0, 0x80, 0x64, 0x00, 0x00, 0x38, 0x03, 0x00, 0x01, - 0x90, 0x04, 0x00, 0x00, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0xa1, 0xff, 0xf4, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x28, 0x05, 0x00, 0x00, 0x7c, 0x9c, 0x23, 0x78, - 0x39, 0x22, 0x04, 0xf8, 0x7c, 0xdd, 0x33, 0x78, 0x7c, 0xfe, 0x3b, 0x78, 0x7d, 0x1f, 0x43, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x69, 0x00, 0x00, 0x38, 0x03, 0x00, 0x01, - 0x90, 0x09, 0x00, 0x00, 0x41, 0x82, 0x00, 0x10, 0x80, 0x62, 0x00, 0xf4, 0x7c, 0xa4, 0x2b, 0x78, - 0x48, 0x00, 0x0f, 0xf1, 0x38, 0x60, 0x00, 0x10, 0x38, 0x80, 0x00, 0x03, 0x4b, 0xff, 0xec, 0x45, - 0x7c, 0x65, 0x1b, 0x79, 0x41, 0x82, 0x00, 0x40, 0x80, 0x65, 0x00, 0x14, 0x38, 0xc0, 0x00, 0x83, - 0x38, 0x00, 0x00, 0x05, 0x7f, 0x84, 0xe3, 0x78, 0x98, 0xc3, 0x00, 0x0d, 0x80, 0x65, 0x00, 0x10, - 0x90, 0x03, 0x00, 0x00, 0x93, 0xa3, 0x00, 0x04, 0x93, 0xc3, 0x00, 0x08, 0x93, 0xe3, 0x00, 0x0c, - 0x80, 0x65, 0x00, 0x10, 0x38, 0x03, 0x00, 0x10, 0x90, 0x05, 0x00, 0x10, 0x80, 0x62, 0x00, 0xd4, - 0x48, 0x00, 0x0f, 0xf1, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x81, 0xff, 0xf0, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0xa1, 0xff, 0xf4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0xbe, 0x2b, 0x78, 0x7c, 0x9d, 0x23, 0x78, - 0x7c, 0xdf, 0x33, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x65, 0x00, 0x14, - 0x88, 0x03, 0x00, 0x0c, 0x28, 0x00, 0x00, 0x01, 0x41, 0x82, 0x00, 0x28, 0x80, 0x62, 0x00, 0xf4, - 0x7f, 0xc4, 0xf3, 0x78, 0x48, 0x00, 0x0f, 0x4d, 0x38, 0x60, 0x00, 0x10, 0x38, 0x80, 0x00, 0x03, - 0x4b, 0xff, 0xeb, 0xa1, 0x7c, 0x7e, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x24, 0x48, 0x00, 0x00, 0x58, - 0x80, 0x9e, 0x00, 0x08, 0x28, 0x04, 0x00, 0x00, 0x41, 0x82, 0x00, 0x14, 0x80, 0x62, 0x00, 0xf4, - 0x48, 0x00, 0x0f, 0x21, 0x38, 0x00, 0x00, 0x00, 0x90, 0x1e, 0x00, 0x08, 0x80, 0x7e, 0x00, 0x14, - 0x38, 0xc0, 0x00, 0x83, 0x38, 0x00, 0x00, 0x06, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, - 0x98, 0xc3, 0x00, 0x0d, 0x80, 0x7e, 0x00, 0x0c, 0x90, 0x03, 0x00, 0x00, 0x93, 0xe3, 0x00, 0x04, - 0x80, 0x7e, 0x00, 0x0c, 0x38, 0x03, 0x00, 0x08, 0x90, 0x1e, 0x00, 0x10, 0x80, 0x62, 0x00, 0xd4, - 0x48, 0x00, 0x0f, 0x31, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0xa1, 0xff, 0xf4, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x01, 0xff, 0xe0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x78, 0x1b, 0x78, 0x7c, 0x99, 0x23, 0x78, - 0x3b, 0xe2, 0x02, 0x5c, 0x7c, 0xba, 0x2b, 0x78, 0x3b, 0xa0, 0x00, 0x00, 0x3b, 0x80, 0x00, 0x0e, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xa0, 0x80, 0x03, 0x00, 0x04, 0x28, 0x00, 0x00, 0x00, - 0x41, 0x82, 0x00, 0x4c, 0x80, 0x18, 0x00, 0x08, 0x38, 0x60, 0x00, 0x02, 0x54, 0x00, 0x07, 0xff, - 0x41, 0x82, 0x00, 0x08, 0x38, 0x60, 0x00, 0x07, 0xa0, 0x18, 0x00, 0x0c, 0x7c, 0x7d, 0x1b, 0x78, - 0x2c, 0x00, 0x00, 0xaa, 0x40, 0x82, 0x00, 0x0c, 0x3b, 0x80, 0x00, 0x16, 0x48, 0x00, 0x00, 0x20, - 0x2c, 0x00, 0x00, 0xfe, 0x40, 0x81, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0xff, 0x40, 0x82, 0x00, 0x0c, - 0x3b, 0x80, 0x00, 0x11, 0x48, 0x00, 0x00, 0x08, 0x3b, 0x80, 0x00, 0x0e, 0x3b, 0xdd, 0x00, 0x58, - 0x38, 0x80, 0x00, 0x01, 0x7f, 0xc3, 0xf3, 0x78, 0x4b, 0xff, 0xea, 0x99, 0x7c, 0x7b, 0x1b, 0x79, - 0x40, 0x82, 0x00, 0x24, 0x7f, 0x03, 0xc3, 0x78, 0x7f, 0x24, 0xcb, 0x78, 0x7f, 0x45, 0xd3, 0x78, - 0x38, 0xc0, 0x00, 0x00, 0x38, 0xe0, 0x00, 0x04, 0x39, 0x00, 0x00, 0x0c, 0x4b, 0xff, 0xfd, 0xe5, - 0x48, 0x00, 0x01, 0x44, 0x80, 0x7b, 0x00, 0x14, 0x38, 0x80, 0x00, 0x83, 0x38, 0xc0, 0x00, 0x03, - 0x38, 0xa0, 0x00, 0x02, 0x38, 0x00, 0x05, 0x00, 0x98, 0x83, 0x00, 0x0d, 0x38, 0x80, 0x00, 0x04, - 0x80, 0x7b, 0x00, 0x0c, 0x90, 0xc3, 0x00, 0x00, 0x90, 0xa3, 0x00, 0x20, 0x90, 0x03, 0x00, 0x34, - 0x90, 0xa3, 0x00, 0x3c, 0x80, 0x18, 0x00, 0x04, 0x90, 0x03, 0x00, 0x18, 0x80, 0x18, 0x00, 0x10, - 0x2c, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x08, 0x38, 0x80, 0x00, 0x00, 0x7c, 0x80, 0x07, 0x34, - 0x39, 0x20, 0x00, 0x00, 0x90, 0x03, 0x00, 0x10, 0x39, 0x00, 0xff, 0xff, 0x38, 0xe0, 0x00, 0x01, - 0x20, 0xdc, 0x05, 0xea, 0x7c, 0xbd, 0x00, 0xd0, 0x38, 0x9d, 0x00, 0x06, 0x38, 0x00, 0x00, 0x4c, - 0x91, 0x23, 0x00, 0x14, 0x28, 0x1d, 0x00, 0x00, 0x91, 0x23, 0x00, 0x24, 0x91, 0x03, 0x00, 0x28, - 0x91, 0x23, 0x00, 0x2c, 0x91, 0x03, 0x00, 0x30, 0x91, 0x23, 0x00, 0x48, 0x90, 0xe3, 0x00, 0x08, - 0x90, 0xc3, 0x00, 0x04, 0x90, 0xa3, 0x00, 0x1c, 0x90, 0x83, 0x00, 0x0c, 0x90, 0x03, 0x00, 0x38, - 0x80, 0xbb, 0x00, 0x0c, 0x80, 0x83, 0x00, 0x38, 0x80, 0x1f, 0x00, 0x00, 0x7c, 0x85, 0x22, 0x14, - 0x90, 0x04, 0x00, 0x00, 0xa0, 0x1f, 0x00, 0x04, 0xb0, 0x04, 0x00, 0x04, 0x41, 0x82, 0x00, 0x28, - 0xa0, 0x18, 0x00, 0x0c, 0xb0, 0x04, 0x00, 0x06, 0x80, 0x18, 0x00, 0x08, 0x54, 0x00, 0x07, 0xff, - 0x41, 0x82, 0x00, 0x14, 0x80, 0x18, 0x00, 0x2c, 0x90, 0x04, 0x00, 0x08, 0x88, 0x18, 0x00, 0x30, - 0x98, 0x04, 0x00, 0x0c, 0x38, 0x00, 0x00, 0x06, 0x3c, 0x80, 0x00, 0x01, 0x90, 0x03, 0x00, 0x40, - 0x38, 0x1d, 0x00, 0x52, 0x38, 0xe0, 0xff, 0xff, 0x38, 0xc4, 0xff, 0xff, 0x7f, 0x44, 0xd3, 0x78, - 0x90, 0x03, 0x00, 0x44, 0x80, 0xbb, 0x00, 0x0c, 0x80, 0x03, 0x00, 0x44, 0x7c, 0xe5, 0x01, 0x2e, - 0x80, 0x63, 0x00, 0x44, 0x80, 0xbb, 0x00, 0x0c, 0x38, 0x03, 0x00, 0x04, 0x7c, 0xc5, 0x03, 0x2e, - 0x80, 0x1b, 0x00, 0x10, 0x7c, 0x00, 0xf2, 0x14, 0x90, 0x1b, 0x00, 0x10, 0x80, 0x62, 0x00, 0xf4, - 0x48, 0x00, 0x0c, 0xe1, 0x80, 0x62, 0x00, 0xd4, 0x7f, 0x24, 0xcb, 0x78, 0x7f, 0x65, 0xdb, 0x78, - 0x48, 0x00, 0x0d, 0x21, 0x80, 0x01, 0x00, 0x68, 0x38, 0x21, 0x00, 0x60, 0xbb, 0x01, 0xff, 0xe0, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7a, 0x1b, 0x78, 0x7c, 0x9d, 0x23, 0x78, - 0x3b, 0x82, 0x02, 0x5c, 0x7c, 0xbe, 0x2b, 0x78, 0x38, 0x60, 0x00, 0x12, 0x38, 0x80, 0x00, 0x03, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x83, 0x65, 0x00, 0x0c, 0x4b, 0xff, 0xe8, 0xe5, - 0x7c, 0x7f, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0xa4, 0xeb, 0x78, - 0x7f, 0xc5, 0xf3, 0x78, 0x38, 0xc0, 0x00, 0x31, 0x38, 0xe0, 0x00, 0x04, 0x39, 0x00, 0x00, 0x0c, - 0x4b, 0xff, 0xfc, 0x31, 0x48, 0x00, 0x00, 0xb0, 0x80, 0xbf, 0x00, 0x14, 0x38, 0xc0, 0x00, 0x83, - 0x38, 0x80, 0x00, 0x32, 0x38, 0x60, 0x00, 0x06, 0x38, 0x00, 0x00, 0x0c, 0x98, 0xc5, 0x00, 0x0d, - 0x80, 0xbf, 0x00, 0x10, 0x90, 0x85, 0x00, 0x00, 0x90, 0x65, 0x00, 0x04, 0x90, 0x05, 0x00, 0x08, - 0x80, 0x7f, 0x00, 0x10, 0x38, 0x03, 0x00, 0x12, 0x90, 0x1f, 0x00, 0x10, 0x80, 0x1b, 0x00, 0x04, - 0x28, 0x00, 0x00, 0x02, 0x41, 0x82, 0x00, 0x0c, 0x28, 0x00, 0x00, 0x01, 0x40, 0x82, 0x00, 0x2c, - 0x80, 0x9c, 0x00, 0x00, 0x80, 0x7f, 0x00, 0x0c, 0x80, 0x05, 0x00, 0x08, 0x7c, 0x83, 0x01, 0x2e, - 0x80, 0x65, 0x00, 0x08, 0xa0, 0xbc, 0x00, 0x04, 0x80, 0x9f, 0x00, 0x0c, 0x38, 0x03, 0x00, 0x04, - 0x7c, 0xa4, 0x03, 0x2e, 0x48, 0x00, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0xa4, 0xeb, 0x78, - 0x7f, 0xc5, 0xf3, 0x78, 0x38, 0xc0, 0x00, 0x31, 0x38, 0xe0, 0x00, 0x09, 0x39, 0x00, 0x00, 0x00, - 0x4b, 0xff, 0xfb, 0xa1, 0x48, 0x00, 0x00, 0x20, 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xc4, 0xf3, 0x78, - 0x48, 0x00, 0x0b, 0xc1, 0x80, 0x62, 0x00, 0xd4, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xe5, 0xfb, 0x78, - 0x48, 0x00, 0x0c, 0x01, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x41, 0xff, 0xe8, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7a, 0x1b, 0x78, 0x7c, 0xbc, 0x2b, 0x78, - 0x3b, 0xe2, 0x02, 0x5c, 0x7c, 0x9b, 0x23, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, - 0x80, 0x03, 0x00, 0x04, 0x80, 0xc5, 0x00, 0x0c, 0x28, 0x00, 0x00, 0x00, 0x83, 0xc6, 0x00, 0x04, - 0x41, 0x82, 0x00, 0x18, 0x38, 0xc0, 0x00, 0x01, 0x38, 0xe0, 0x00, 0x03, 0x39, 0x00, 0x00, 0x00, - 0x4b, 0xff, 0xfb, 0x21, 0x48, 0x00, 0x01, 0x8c, 0xa0, 0x06, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0x02, - 0x40, 0x82, 0x00, 0x10, 0x80, 0x06, 0x00, 0x08, 0x28, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x24, - 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x01, - 0x38, 0xe0, 0x00, 0x07, 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xfa, 0xe9, 0x48, 0x00, 0x01, 0x54, - 0x28, 0x1e, 0x00, 0xfe, 0x41, 0x81, 0x00, 0x20, 0x57, 0xc0, 0x07, 0xff, 0x41, 0x82, 0x00, 0x18, - 0x38, 0xc0, 0x00, 0x01, 0x38, 0xe0, 0x00, 0x01, 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xfa, 0xc5, - 0x48, 0x00, 0x01, 0x30, 0x57, 0xc3, 0x04, 0x3e, 0x7c, 0x64, 0x1b, 0x78, 0x4b, 0xff, 0xf1, 0xa5, - 0x54, 0x60, 0x04, 0x3e, 0x2c, 0x00, 0x00, 0x05, 0x40, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, - 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x01, 0x38, 0xe0, 0x00, 0x01, - 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xfa, 0x8d, 0x48, 0x00, 0x00, 0xf8, 0x38, 0x60, 0x00, 0x20, - 0x38, 0x80, 0x00, 0x03, 0x4b, 0xff, 0xe7, 0x0d, 0x7c, 0x7d, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x24, - 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x01, - 0x38, 0xe0, 0x00, 0x04, 0x39, 0x00, 0x00, 0x0c, 0x4b, 0xff, 0xfa, 0x59, 0x48, 0x00, 0x00, 0xc4, - 0x80, 0x7d, 0x00, 0x14, 0x38, 0x80, 0x00, 0x83, 0x38, 0x00, 0x00, 0x04, 0x38, 0xe0, 0x00, 0x04, - 0x38, 0xc0, 0x00, 0x08, 0x7c, 0x09, 0x03, 0xa6, 0x98, 0x83, 0x00, 0x0d, 0x38, 0xa0, 0x00, 0x00, - 0x38, 0x80, 0x00, 0x18, 0x7c, 0xa3, 0x2b, 0x78, 0x81, 0x1d, 0x00, 0x0c, 0x90, 0xe8, 0x00, 0x00, - 0x93, 0xc8, 0x00, 0x04, 0x90, 0xc8, 0x00, 0x08, 0x90, 0x88, 0x00, 0x0c, 0x90, 0xa8, 0x00, 0x10, - 0x90, 0xa8, 0x00, 0x14, 0x80, 0x9d, 0x00, 0x0c, 0x80, 0x1f, 0x00, 0x00, 0x90, 0x04, 0x00, 0x18, - 0xa0, 0x1f, 0x00, 0x04, 0xb0, 0x04, 0x00, 0x1c, 0xb3, 0xc4, 0x00, 0x1e, 0x80, 0x9d, 0x00, 0x0c, - 0x38, 0x04, 0x00, 0x20, 0x90, 0x1d, 0x00, 0x10, 0x38, 0x03, 0x00, 0x1c, 0x38, 0x63, 0x00, 0x04, - 0x7c, 0xba, 0x01, 0x2e, 0x42, 0x00, 0xff, 0xf4, 0x28, 0x1e, 0x00, 0xfe, 0x41, 0x81, 0x00, 0x10, - 0x80, 0x1a, 0x00, 0x28, 0x64, 0x00, 0x80, 0x00, 0x90, 0x1a, 0x00, 0x28, 0x38, 0x00, 0x00, 0x03, - 0x7f, 0x84, 0xe3, 0x78, 0x90, 0x1a, 0x00, 0x04, 0xb3, 0xda, 0x00, 0x0c, 0x80, 0x1a, 0x00, 0x08, - 0x54, 0x00, 0x00, 0x3c, 0x90, 0x1a, 0x00, 0x08, 0x80, 0x62, 0x00, 0xf4, 0x48, 0x00, 0x09, 0xd5, - 0x80, 0x62, 0x00, 0xd4, 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0xa5, 0xeb, 0x78, 0x48, 0x00, 0x0a, 0x15, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7c, 0x1b, 0x78, 0x7c, 0x9d, 0x23, 0x78, - 0x7c, 0xbe, 0x2b, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x03, 0x00, 0x04, - 0x28, 0x00, 0x00, 0x03, 0x41, 0x82, 0x00, 0x18, 0x38, 0xc0, 0x00, 0x02, 0x38, 0xe0, 0x00, 0x03, - 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf9, 0x3d, 0x48, 0x00, 0x00, 0x58, 0x38, 0x00, 0x00, 0x00, - 0x38, 0xa0, 0x00, 0x00, 0x90, 0x1c, 0x00, 0x04, 0xb0, 0x1c, 0x00, 0x0c, 0x80, 0x62, 0x00, 0xd0, - 0x48, 0x00, 0x09, 0xa1, 0x3b, 0xfd, 0xff, 0xc0, 0x80, 0x62, 0x00, 0xd0, 0x38, 0xa0, 0x00, 0x00, - 0x7f, 0xe4, 0xfb, 0x78, 0x48, 0x00, 0x09, 0x8d, 0x80, 0x62, 0x00, 0xdc, 0x7f, 0xe4, 0xfb, 0x78, - 0x38, 0xa0, 0x00, 0x86, 0x38, 0xc0, 0x00, 0x03, 0x48, 0x00, 0x09, 0xc9, 0x7f, 0x83, 0xe3, 0x78, - 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, 0x38, 0xc0, 0x00, 0x02, 0x4b, 0xff, 0xf9, 0x95, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x21, 0xff, 0xe4, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0xbd, 0x2b, 0x78, 0x7c, 0x7b, 0x1b, 0x78, - 0x7c, 0x9c, 0x23, 0x78, 0x38, 0xe0, 0x00, 0x00, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xa0, - 0x81, 0x05, 0x00, 0x0c, 0x80, 0x03, 0x00, 0x04, 0x80, 0xc8, 0x00, 0x04, 0x28, 0x00, 0x00, 0x03, - 0x83, 0xc8, 0x00, 0x08, 0x7f, 0xe8, 0x32, 0x14, 0xa0, 0xdf, 0x00, 0x00, 0x41, 0x82, 0x00, 0x18, - 0x38, 0xc0, 0x00, 0x1b, 0x38, 0xe0, 0x00, 0x03, 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf8, 0x75, - 0x48, 0x00, 0x01, 0xbc, 0x80, 0x08, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0x02, 0x41, 0x82, 0x00, 0x7c, - 0x40, 0x80, 0x00, 0xc0, 0x2c, 0x00, 0x00, 0x01, 0x40, 0x80, 0x00, 0x08, 0x48, 0x00, 0x00, 0xb4, - 0xa0, 0x1b, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0xfe, 0x41, 0x81, 0x00, 0x58, 0x54, 0xc0, 0x07, 0xff, - 0x41, 0x82, 0x00, 0x30, 0x28, 0x1e, 0x00, 0x02, 0x40, 0x82, 0x00, 0x28, 0x54, 0xc4, 0xe7, 0x3a, - 0x38, 0x60, 0x00, 0x01, 0x7c, 0xbb, 0x22, 0x14, 0x54, 0xc0, 0xfe, 0xfe, 0x80, 0x85, 0x00, 0x1c, - 0x7c, 0x60, 0x00, 0x30, 0x7c, 0x80, 0x03, 0x78, 0x90, 0x05, 0x00, 0x1c, 0x48, 0x00, 0x00, 0x78, - 0x54, 0xc0, 0x04, 0x3f, 0x40, 0x82, 0x00, 0x14, 0x80, 0x1b, 0x00, 0x08, 0x60, 0x00, 0x00, 0x04, - 0x90, 0x1b, 0x00, 0x08, 0x48, 0x00, 0x00, 0x60, 0x38, 0xe0, 0x00, 0x01, 0x48, 0x00, 0x00, 0x58, - 0x38, 0xe0, 0x00, 0x07, 0x48, 0x00, 0x00, 0x50, 0xa0, 0x1b, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0xaa, - 0x40, 0x82, 0x00, 0x38, 0x80, 0x1b, 0x00, 0x08, 0x54, 0x00, 0x07, 0xff, 0x41, 0x82, 0x00, 0x0c, - 0x38, 0xe0, 0x00, 0x13, 0x48, 0x00, 0x00, 0x30, 0x80, 0x1f, 0x00, 0x00, 0x90, 0x1b, 0x00, 0x2c, - 0x88, 0x1f, 0x00, 0x04, 0x98, 0x1b, 0x00, 0x30, 0x80, 0x1b, 0x00, 0x08, 0x60, 0x00, 0x00, 0x01, - 0x90, 0x1b, 0x00, 0x08, 0x48, 0x00, 0x00, 0x10, 0x38, 0xe0, 0x00, 0x01, 0x48, 0x00, 0x00, 0x08, - 0x38, 0xe0, 0x00, 0x07, 0x2c, 0x07, 0x00, 0x00, 0x41, 0x82, 0x00, 0x20, 0x7f, 0x63, 0xdb, 0x78, - 0x7f, 0x84, 0xe3, 0x78, 0x7f, 0xa5, 0xeb, 0x78, 0x38, 0xc0, 0x00, 0x1b, 0x39, 0x00, 0x00, 0x00, - 0x4b, 0xff, 0xf7, 0x81, 0x48, 0x00, 0x00, 0xc8, 0x3b, 0x5e, 0x00, 0x0c, 0x38, 0x80, 0x00, 0x03, - 0x7f, 0x43, 0xd3, 0x78, 0x4b, 0xff, 0xe3, 0xfd, 0x7c, 0x79, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x24, - 0x7f, 0x63, 0xdb, 0x78, 0x7f, 0x84, 0xe3, 0x78, 0x7f, 0xa5, 0xeb, 0x78, 0x38, 0xc0, 0x00, 0x1b, - 0x38, 0xe0, 0x00, 0x04, 0x39, 0x00, 0x00, 0x0c, 0x4b, 0xff, 0xf7, 0x49, 0x48, 0x00, 0x00, 0x90, - 0x80, 0x79, 0x00, 0x14, 0x38, 0x00, 0x00, 0x83, 0x7f, 0x45, 0xd3, 0x78, 0x38, 0x80, 0x00, 0x00, - 0x98, 0x03, 0x00, 0x0d, 0x83, 0x59, 0x00, 0x10, 0x7f, 0x43, 0xd3, 0x78, 0x48, 0x00, 0x08, 0xe5, - 0x38, 0x60, 0x00, 0x1c, 0x20, 0x1e, 0x00, 0x00, 0x90, 0x7a, 0x00, 0x00, 0x7c, 0x60, 0x01, 0x10, - 0x38, 0x00, 0x00, 0x0c, 0x7c, 0x00, 0x18, 0x38, 0x2c, 0x1e, 0x00, 0x00, 0x93, 0xda, 0x00, 0x08, - 0x90, 0x1a, 0x00, 0x04, 0x80, 0x79, 0x00, 0x10, 0x38, 0x03, 0x00, 0x0c, 0x90, 0x19, 0x00, 0x10, - 0x41, 0x82, 0x00, 0x14, 0x80, 0x79, 0x00, 0x10, 0x7f, 0xe4, 0xfb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, - 0x48, 0x00, 0x08, 0x61, 0x80, 0x19, 0x00, 0x10, 0x7f, 0xa4, 0xeb, 0x78, 0x7c, 0x00, 0xf2, 0x14, - 0x90, 0x19, 0x00, 0x10, 0x80, 0x62, 0x00, 0xf4, 0x48, 0x00, 0x06, 0xf9, 0x80, 0x62, 0x00, 0xd4, - 0x7f, 0x84, 0xe3, 0x78, 0x7f, 0x25, 0xcb, 0x78, 0x48, 0x00, 0x07, 0x39, 0x80, 0x01, 0x00, 0x68, - 0x38, 0x21, 0x00, 0x60, 0xbb, 0x21, 0xff, 0xe4, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7c, 0x1b, 0x78, 0x7c, 0xbe, 0x2b, 0x78, - 0x7c, 0x9d, 0x23, 0x78, 0x3b, 0xe0, 0x00, 0x00, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, - 0x80, 0xe5, 0x00, 0x0c, 0x80, 0x03, 0x00, 0x04, 0x80, 0xc7, 0x00, 0x04, 0x28, 0x00, 0x00, 0x03, - 0x81, 0x07, 0x00, 0x08, 0x7c, 0xc7, 0x32, 0x14, 0x41, 0x82, 0x00, 0x18, 0x38, 0xc0, 0x00, 0x15, - 0x38, 0xe0, 0x00, 0x03, 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf6, 0x59, 0x48, 0x00, 0x00, 0xf4, - 0x2c, 0x08, 0x00, 0x01, 0x40, 0x82, 0x00, 0x58, 0x88, 0x86, 0x00, 0x00, 0x54, 0x80, 0x07, 0xff, - 0x41, 0x82, 0x00, 0x44, 0x28, 0x04, 0x00, 0xff, 0x41, 0x82, 0x00, 0x3c, 0xa0, 0x1c, 0x00, 0x0c, - 0x2c, 0x00, 0x00, 0xfe, 0x41, 0x81, 0x00, 0x28, 0x54, 0x83, 0xe7, 0x3a, 0x54, 0x80, 0xfe, 0xfe, - 0x7c, 0x9c, 0x1a, 0x14, 0x38, 0x60, 0x00, 0x01, 0x7c, 0x60, 0x00, 0x30, 0x80, 0x64, 0x00, 0x1c, - 0x7c, 0x60, 0x00, 0x78, 0x90, 0x04, 0x00, 0x1c, 0x48, 0x00, 0x00, 0x60, 0x3b, 0xe0, 0x00, 0x07, - 0x48, 0x00, 0x00, 0x58, 0x3b, 0xe0, 0x00, 0x01, 0x48, 0x00, 0x00, 0x50, 0x2c, 0x08, 0x00, 0x05, - 0x40, 0x82, 0x00, 0x48, 0xa0, 0x1c, 0x00, 0x0c, 0x2c, 0x00, 0x00, 0xaa, 0x40, 0x82, 0x00, 0x38, - 0x80, 0x1c, 0x00, 0x08, 0x54, 0x00, 0x07, 0xff, 0x41, 0x82, 0x00, 0x24, 0x7c, 0xc4, 0x33, 0x78, - 0x7d, 0x05, 0x43, 0x78, 0x38, 0x7c, 0x00, 0x2c, 0x48, 0x00, 0x07, 0xf9, 0x2c, 0x03, 0x00, 0x00, - 0x41, 0x82, 0x00, 0x18, 0x3b, 0xe0, 0x00, 0x01, 0x48, 0x00, 0x00, 0x10, 0x3b, 0xe0, 0x00, 0x01, - 0x48, 0x00, 0x00, 0x08, 0x3b, 0xe0, 0x00, 0x07, 0x2c, 0x1f, 0x00, 0x00, 0x41, 0x82, 0x00, 0x24, - 0x7f, 0x83, 0xe3, 0x78, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, 0x7f, 0xe7, 0xfb, 0x78, - 0x38, 0xc0, 0x00, 0x15, 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf5, 0x89, 0x48, 0x00, 0x00, 0x24, - 0x80, 0x1c, 0x00, 0x08, 0x7f, 0x83, 0xe3, 0x78, 0x7f, 0xa4, 0xeb, 0x78, 0x7f, 0xc5, 0xf3, 0x78, - 0x38, 0xc0, 0x00, 0x15, 0x54, 0x00, 0x00, 0x3c, 0x90, 0x1c, 0x00, 0x08, 0x4b, 0xff, 0xf6, 0x15, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7a, 0x1b, 0x78, 0x7c, 0xbc, 0x2b, 0x78, - 0x7c, 0x9b, 0x23, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x65, 0x00, 0x0c, - 0x80, 0x03, 0x00, 0x08, 0x7f, 0xa3, 0x02, 0x14, 0x7f, 0xa3, 0xeb, 0x78, 0x4b, 0xff, 0xec, 0x65, - 0x2c, 0x03, 0x00, 0x01, 0x41, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, - 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1d, 0x38, 0xe0, 0x00, 0x01, 0x39, 0x00, 0x00, 0x00, - 0x4b, 0xff, 0xf4, 0xf1, 0x48, 0x00, 0x00, 0xd4, 0x83, 0xfa, 0x00, 0x34, 0x48, 0x00, 0x00, 0x2c, - 0x7f, 0xa3, 0xeb, 0x78, 0x38, 0x9f, 0x00, 0x04, 0x38, 0xa0, 0x00, 0x06, 0x48, 0x00, 0x07, 0x05, - 0x2c, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x10, 0x38, 0x1f, 0x00, 0x04, 0x48, 0x00, 0x00, 0x18, - 0x60, 0x00, 0x00, 0x00, 0x83, 0xff, 0x00, 0x00, 0x28, 0x1f, 0x00, 0x00, 0x40, 0x82, 0xff, 0xd4, - 0x38, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, - 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1d, 0x38, 0xe0, 0x00, 0x01, - 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf4, 0x8d, 0x48, 0x00, 0x00, 0x70, 0x7f, 0xa3, 0xeb, 0x78, - 0x4b, 0xff, 0xe0, 0x21, 0x38, 0x60, 0x00, 0x06, 0x48, 0x00, 0x04, 0x49, 0x80, 0x1d, 0x00, 0x00, - 0x7c, 0x7e, 0x1b, 0x78, 0x38, 0x60, 0x00, 0x0c, 0x90, 0x1e, 0x00, 0x00, 0xa0, 0x1d, 0x00, 0x04, - 0xb0, 0x1e, 0x00, 0x04, 0x48, 0x00, 0x04, 0x2d, 0x7c, 0x7f, 0x1b, 0x78, 0x7f, 0xc4, 0xf3, 0x78, - 0x38, 0x7f, 0x00, 0x04, 0x38, 0xa0, 0x00, 0x06, 0x48, 0x00, 0x05, 0xc9, 0x80, 0x1a, 0x00, 0x34, - 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1d, - 0x90, 0x1f, 0x00, 0x00, 0x93, 0xfa, 0x00, 0x34, 0x80, 0x1a, 0x00, 0x08, 0x60, 0x00, 0x00, 0x02, - 0x90, 0x1a, 0x00, 0x08, 0x4b, 0xff, 0xf4, 0xcd, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, - 0xbb, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x41, 0xff, 0xe8, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x7a, 0x1b, 0x78, 0x7c, 0xbc, 0x2b, 0x78, - 0x7c, 0x9b, 0x23, 0x78, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x65, 0x00, 0x0c, - 0x80, 0x03, 0x00, 0x08, 0x7f, 0xa3, 0x02, 0x14, 0x7f, 0xa3, 0xeb, 0x78, 0x4b, 0xff, 0xeb, 0x25, - 0x2c, 0x03, 0x00, 0x01, 0x41, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, - 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1e, 0x38, 0xe0, 0x00, 0x01, 0x39, 0x00, 0x00, 0x00, - 0x4b, 0xff, 0xf3, 0xb1, 0x48, 0x00, 0x01, 0x10, 0x83, 0xfa, 0x00, 0x34, 0x48, 0x00, 0x00, 0x2c, - 0x7f, 0xa3, 0xeb, 0x78, 0x38, 0x9f, 0x00, 0x04, 0x38, 0xa0, 0x00, 0x06, 0x48, 0x00, 0x05, 0xc5, - 0x2c, 0x03, 0x00, 0x00, 0x40, 0x82, 0x00, 0x10, 0x3b, 0xff, 0x00, 0x04, 0x48, 0x00, 0x00, 0x18, - 0x60, 0x00, 0x00, 0x00, 0x83, 0xff, 0x00, 0x00, 0x28, 0x1f, 0x00, 0x00, 0x40, 0x82, 0xff, 0xd4, - 0x3b, 0xe0, 0x00, 0x00, 0x28, 0x1f, 0x00, 0x00, 0x40, 0x82, 0x00, 0x24, 0x7f, 0x43, 0xd3, 0x78, - 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1e, 0x38, 0xe0, 0x00, 0x01, - 0x39, 0x00, 0x00, 0x00, 0x4b, 0xff, 0xf3, 0x4d, 0x48, 0x00, 0x00, 0xac, 0x83, 0xda, 0x00, 0x34, - 0x48, 0x00, 0x00, 0x20, 0x7f, 0xe3, 0xfb, 0x78, 0x38, 0x9e, 0x00, 0x04, 0x38, 0xa0, 0x00, 0x06, - 0x48, 0x00, 0x05, 0x61, 0x2c, 0x03, 0x00, 0x00, 0x41, 0x82, 0x00, 0x14, 0x83, 0xde, 0x00, 0x00, - 0x28, 0x1e, 0x00, 0x00, 0x40, 0x82, 0xff, 0xe0, 0x48, 0x00, 0x00, 0x40, 0x38, 0x9a, 0x00, 0x34, - 0x48, 0x00, 0x00, 0x30, 0x60, 0x00, 0x00, 0x00, 0x80, 0x04, 0x00, 0x00, 0x7c, 0x00, 0xf0, 0x40, - 0x40, 0x82, 0x00, 0x1c, 0x80, 0x1e, 0x00, 0x00, 0x7f, 0xc3, 0xf3, 0x78, 0x90, 0x04, 0x00, 0x00, - 0x48, 0x00, 0x02, 0xf1, 0x48, 0x00, 0x00, 0x14, 0x60, 0x00, 0x00, 0x00, 0x7c, 0x04, 0x03, 0x78, - 0x28, 0x04, 0x00, 0x00, 0x40, 0x82, 0xff, 0xd4, 0x7f, 0xe3, 0xfb, 0x78, 0x48, 0x00, 0x02, 0xd5, - 0x7f, 0xa3, 0xeb, 0x78, 0x4b, 0xff, 0xde, 0xbd, 0x80, 0x1a, 0x00, 0x34, 0x28, 0x00, 0x00, 0x00, - 0x40, 0x82, 0x00, 0x10, 0x80, 0x1a, 0x00, 0x08, 0x54, 0x00, 0x07, 0xfa, 0x90, 0x1a, 0x00, 0x08, - 0x7f, 0x43, 0xd3, 0x78, 0x7f, 0x64, 0xdb, 0x78, 0x7f, 0x85, 0xe3, 0x78, 0x38, 0xc0, 0x00, 0x1e, - 0x4b, 0xff, 0xf3, 0x51, 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x41, 0xff, 0xe8, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xbf, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0xbf, 0x2b, 0x78, 0x7c, 0x9e, 0x23, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xb0, 0x80, 0x03, 0x00, 0x04, 0x83, 0xa5, 0x00, 0x0c, - 0x28, 0x00, 0x00, 0x03, 0x41, 0x82, 0x00, 0xb4, 0x80, 0x7d, 0x00, 0x04, 0x38, 0x80, 0x00, 0x03, - 0x38, 0x63, 0x00, 0x14, 0x4b, 0xff, 0xde, 0xdd, 0x7c, 0x7c, 0x1b, 0x79, 0x40, 0x82, 0x00, 0x14, - 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xe4, 0xfb, 0x78, 0x48, 0x00, 0x02, 0x69, 0x48, 0x00, 0x00, 0xa4, - 0x80, 0xdc, 0x00, 0x14, 0x38, 0x00, 0x00, 0x01, 0x38, 0xa0, 0x00, 0x09, 0x38, 0x80, 0x00, 0x03, - 0x38, 0x60, 0x00, 0x00, 0x98, 0x06, 0x00, 0x0d, 0x38, 0x00, 0x00, 0x14, 0x80, 0xdc, 0x00, 0x10, - 0x90, 0xa6, 0x00, 0x00, 0x90, 0x86, 0x00, 0x10, 0x90, 0x66, 0x00, 0x0c, 0x80, 0x7d, 0x00, 0x04, - 0x90, 0x66, 0x00, 0x04, 0x90, 0x06, 0x00, 0x08, 0x80, 0x7c, 0x00, 0x10, 0x38, 0x03, 0x00, 0x14, - 0x90, 0x1c, 0x00, 0x10, 0x80, 0x1d, 0x00, 0x08, 0x80, 0x7c, 0x00, 0x10, 0x80, 0xbd, 0x00, 0x04, - 0x7c, 0x9d, 0x02, 0x14, 0x48, 0x00, 0x03, 0x5d, 0x80, 0x7c, 0x00, 0x10, 0x7f, 0xc4, 0xf3, 0x78, - 0x7f, 0x85, 0xe3, 0x78, 0x80, 0x1d, 0x00, 0x04, 0x7c, 0x03, 0x02, 0x14, 0x90, 0x1c, 0x00, 0x10, - 0x80, 0x62, 0x00, 0xd4, 0x48, 0x00, 0x02, 0x3d, 0x80, 0x62, 0x00, 0xf4, 0x7f, 0xe4, 0xfb, 0x78, - 0x48, 0x00, 0x01, 0xe1, 0x48, 0x00, 0x00, 0x1c, 0x7f, 0xe4, 0xfb, 0x78, 0x38, 0xa0, 0x00, 0x00, - 0x4b, 0xff, 0xea, 0x51, 0x28, 0x03, 0x00, 0x00, 0x41, 0x82, 0x00, 0x08, 0x4b, 0xff, 0xec, 0x55, - 0x80, 0x01, 0x00, 0x58, 0x38, 0x21, 0x00, 0x50, 0xbb, 0x81, 0xff, 0xf0, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x93, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x02, 0xa6, 0x38, 0xa0, 0x00, 0x00, 0x7c, 0x9f, 0x23, 0x78, - 0x38, 0xc2, 0x05, 0x04, 0x90, 0x01, 0x00, 0x08, 0x38, 0x00, 0x00, 0x20, 0x38, 0x86, 0xff, 0xf8, - 0x7c, 0x09, 0x03, 0xa6, 0x94, 0x21, 0xfe, 0xb0, 0x90, 0xa1, 0x00, 0x44, 0x90, 0xa1, 0x00, 0x40, - 0x38, 0xa1, 0x00, 0x40, 0x60, 0x00, 0x00, 0x00, 0x84, 0x04, 0x00, 0x08, 0x94, 0x05, 0x00, 0x08, - 0x80, 0x04, 0x00, 0x04, 0x90, 0x05, 0x00, 0x04, 0x42, 0x00, 0xff, 0xf0, 0x38, 0x00, 0x00, 0x00, - 0x3c, 0x80, 0x70, 0x77, 0x90, 0x01, 0x00, 0x3c, 0x38, 0xc1, 0x00, 0x44, 0x38, 0xe1, 0x00, 0x40, - 0x98, 0x01, 0x00, 0x38, 0x38, 0x84, 0x70, 0x63, 0x39, 0x01, 0x00, 0x48, 0x38, 0xa0, 0x00, 0x01, - 0x48, 0x00, 0x04, 0x05, 0x80, 0x41, 0x00, 0x14, 0x7c, 0x60, 0x07, 0x35, 0x41, 0x82, 0x00, 0x0c, - 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x30, 0x80, 0x61, 0x00, 0x44, 0x7f, 0xe4, 0xfb, 0x78, - 0x38, 0xa1, 0x00, 0x3c, 0x38, 0xc1, 0x00, 0x38, 0x48, 0x00, 0x03, 0xf5, 0x80, 0x41, 0x00, 0x14, - 0x7c, 0x60, 0x07, 0x35, 0x41, 0x82, 0x00, 0x0c, 0x38, 0x60, 0x00, 0x00, 0x48, 0x00, 0x00, 0x08, - 0x80, 0x61, 0x00, 0x3c, 0x80, 0x01, 0x01, 0x58, 0x38, 0x21, 0x01, 0x50, 0x83, 0xe1, 0xff, 0xfc, - 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x93, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x02, 0xa6, 0x7c, 0x9f, 0x23, 0x78, 0x7c, 0x64, 0x1b, 0x78, - 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xfe, 0x80, 0x88, 0x03, 0x00, 0x00, 0x38, 0x61, 0x00, 0x38, - 0x7c, 0x05, 0x07, 0x74, 0x38, 0xa5, 0x00, 0x01, 0x48, 0x00, 0x01, 0xf9, 0x88, 0x1f, 0x00, 0x00, - 0x7f, 0xe4, 0xfb, 0x78, 0x38, 0x61, 0x00, 0x78, 0x7c, 0x05, 0x07, 0x74, 0x38, 0xa5, 0x00, 0x01, - 0x48, 0x00, 0x01, 0xe1, 0x38, 0x61, 0x00, 0x38, 0x38, 0x81, 0x00, 0x78, 0x4b, 0xff, 0xfe, 0xe5, - 0x80, 0x01, 0x01, 0x88, 0x38, 0x21, 0x01, 0x80, 0x83, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x48, 0x00, 0x03, 0x11, - 0x80, 0x41, 0x00, 0x14, 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, 0x48, 0x00, 0x02, 0x99, - 0x80, 0x41, 0x00, 0x14, 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, - 0x90, 0x41, 0x00, 0x0c, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x03, 0x00, 0x00, 0x80, 0x43, 0x00, 0x04, - 0x7c, 0x09, 0x03, 0xa6, 0x7c, 0x83, 0x23, 0x78, 0x4e, 0x80, 0x04, 0x21, 0x80, 0x01, 0x00, 0x48, - 0x80, 0x41, 0x00, 0x4c, 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, - 0x80, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, - 0x90, 0x41, 0x00, 0x0c, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x03, 0x00, 0x00, 0x80, 0x43, 0x00, 0x04, - 0x7c, 0x09, 0x03, 0xa6, 0x7c, 0x83, 0x23, 0x78, 0x7c, 0xa4, 0x2b, 0x78, 0x4e, 0x80, 0x04, 0x21, - 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, 0x7c, 0x08, 0x03, 0xa6, 0x38, 0x21, 0x00, 0x40, - 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x03, 0xa6, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, - 0x90, 0x41, 0x00, 0x0c, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x03, 0x00, 0x00, 0x80, 0x43, 0x00, 0x04, - 0x7c, 0x09, 0x03, 0xa6, 0x7c, 0x83, 0x23, 0x78, 0x7c, 0xa4, 0x2b, 0x78, 0x7c, 0xc5, 0x33, 0x78, - 0x4e, 0x80, 0x04, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, 0x7c, 0x08, 0x03, 0xa6, - 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x03, 0xa6, - 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x02, 0xa6, 0x90, 0x01, 0x00, 0x08, - 0x90, 0x41, 0x00, 0x0c, 0x94, 0x21, 0xff, 0xc0, 0x80, 0x03, 0x00, 0x00, 0x80, 0x43, 0x00, 0x04, - 0x7c, 0x09, 0x03, 0xa6, 0x7c, 0x83, 0x23, 0x78, 0x7c, 0xa4, 0x2b, 0x78, 0x7c, 0xc5, 0x33, 0x78, - 0x7c, 0xe6, 0x3b, 0x78, 0x7d, 0x07, 0x43, 0x78, 0x7d, 0x28, 0x4b, 0x78, 0x7d, 0x49, 0x53, 0x78, - 0x4e, 0x80, 0x04, 0x21, 0x80, 0x01, 0x00, 0x48, 0x80, 0x41, 0x00, 0x4c, 0x7c, 0x08, 0x03, 0xa6, - 0x38, 0x21, 0x00, 0x40, 0x4e, 0x80, 0x00, 0x20, 0x80, 0x01, 0x00, 0x08, 0x7c, 0x08, 0x03, 0xa6, - 0x7c, 0x08, 0x02, 0xa6, 0x93, 0xe1, 0xff, 0xfc, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, - 0x7c, 0x7f, 0x1b, 0x78, 0x7c, 0x83, 0x23, 0x78, 0x7f, 0xe4, 0xfb, 0x78, 0x48, 0x00, 0x01, 0x21, - 0x80, 0x41, 0x00, 0x14, 0x7f, 0xe3, 0xfb, 0x78, 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, - 0x83, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x03, 0xa6, 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, - 0x7c, 0x08, 0x02, 0xa6, 0x93, 0xe1, 0xff, 0xfc, 0x90, 0x01, 0x00, 0x08, 0x94, 0x21, 0xff, 0xc0, - 0x7c, 0x7f, 0x1b, 0x78, 0x2c, 0x04, 0x00, 0x00, 0x40, 0x82, 0x00, 0x14, 0x7c, 0xa4, 0x2b, 0x78, - 0x48, 0x00, 0x00, 0xf5, 0x80, 0x41, 0x00, 0x14, 0x48, 0x00, 0x00, 0x24, 0x38, 0xa5, 0x00, 0x01, - 0x7c, 0x80, 0x07, 0x74, 0x48, 0x00, 0x00, 0x0c, 0x98, 0x03, 0x00, 0x00, 0x38, 0x63, 0x00, 0x01, - 0x38, 0xa5, 0xff, 0xff, 0x28, 0x05, 0x00, 0x00, 0x40, 0x82, 0xff, 0xf0, 0x7f, 0xe3, 0xfb, 0x78, - 0x80, 0x01, 0x00, 0x48, 0x38, 0x21, 0x00, 0x40, 0x83, 0xe1, 0xff, 0xfc, 0x7c, 0x08, 0x03, 0xa6, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x38, 0xc5, 0x00, 0x01, 0x48, 0x00, 0x00, 0x2c, 0x88, 0xa4, 0x00, 0x00, 0x88, 0x03, 0x00, 0x00, - 0x7c, 0x05, 0x00, 0x50, 0x2c, 0x00, 0x00, 0x00, 0x41, 0x82, 0x00, 0x10, 0x7c, 0x03, 0x03, 0x78, - 0x4e, 0x80, 0x00, 0x20, 0x60, 0x00, 0x00, 0x00, 0x38, 0x63, 0x00, 0x01, 0x38, 0x84, 0x00, 0x01, - 0x38, 0xc6, 0xff, 0xff, 0x28, 0x06, 0x00, 0x00, 0x40, 0x82, 0xff, 0xd0, 0x38, 0x60, 0x00, 0x00, - 0x4e, 0x80, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x90, 0x81, 0x00, 0x1c, 0x90, 0xa1, 0x00, 0x20, 0x90, 0xc1, 0x00, 0x24, 0x90, 0xe1, 0x00, 0x28, - 0x91, 0x01, 0x00, 0x2c, 0x91, 0x21, 0x00, 0x30, 0x91, 0x41, 0x00, 0x34, 0x38, 0x60, 0x00, 0x00, - 0x4e, 0x80, 0x00, 0x20, 0x81, 0x82, 0x00, 0x14, 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, - 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, 0x81, 0x82, 0x00, 0x08, - 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, - 0x4e, 0x80, 0x04, 0x20, 0x81, 0x82, 0x00, 0x00, 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, - 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, 0x81, 0x82, 0x00, 0x04, - 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, - 0x4e, 0x80, 0x04, 0x20, 0x81, 0x82, 0x00, 0x0c, 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, - 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, 0x81, 0x82, 0x00, 0x10, - 0x90, 0x41, 0x00, 0x14, 0x80, 0x0c, 0x00, 0x00, 0x80, 0x4c, 0x00, 0x04, 0x7c, 0x09, 0x03, 0xa6, - 0x4e, 0x80, 0x04, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x1a, 0x22, 0x04, 0xf8, 0x82, 0x02, 0x27, 0x04, 0xe0, 0x04, 0xec, 0x04, 0xdc, 0x04, 0xe8, 0x04, - 0xd8, 0x04, 0xe4, 0x04, 0xfc, 0x04, 0xf0, 0x04, 0xf4, 0x01, 0x44, 0x05, 0x00, 0x02, 0x44, 0x04, - 0x10, 0x03, 0xdf, 0x03, 0xad, 0x03, 0x7c, 0x03, 0x3d, 0x02, 0x5c, 0x03, 0x30, 0x03, 0x21, 0x03, - 0x13, 0x03, 0x01, 0x02, 0xef, 0x02, 0xde, 0x02, 0xd4, 0x02, 0xcc, 0x02, 0xc4, 0x02, 0xb8, 0x02, - 0xab, 0x02, 0xa2, 0x02, 0x9c, 0x02, 0x96, 0x02, 0x8e, 0x02, 0x87, 0x02, 0x7e, 0x02, 0x77, 0x02, - 0x6f, 0x02, 0x62, 0x05, 0x04, 0x00, 0x4d, 0x21, 0x10, 0x0e, 0x22, 0x09, 0x30, 0x86, 0x02, 0x05, - 0x07, 0x60, 0x06, 0x60, 0x05, 0xa0, 0x05, 0x70, 0x04, 0xe0, 0x22, 0x14, 0xe0, 0x04, 0x24, 0x6d, - 0x74, 0x65, 0x6a, 0x04, 0x35, 0x14, 0x53, 0x68, 0x65, 0x65, 0x70, 0x53, 0x68, 0x61, 0x76, 0x65, - 0x72, 0x20, 0x45, 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, 0x0b, 0x21, 0x01, 0x01, 0x21, 0x80, - 0x04, 0x26, 0x04, 0x04, 0x65, 0x6e, 0x65, 0x74, 0x00, 0x3e, 0x25, 0x01, 0x6f, 0x74, 0x61, 0x6e, - 0x01, 0x24, 0x0a, 0x0b, 0x01, 0x01, 0x03, 0x34, 0x53, 0x68, 0x65, 0x65, 0x70, 0x53, 0x68, 0x61, - 0x76, 0x65, 0x72, 0x20, 0x45, 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, 0x04, 0x22, 0x1b, 0xbd, - 0x04, 0x22, 0x01, 0xcc, 0x06, 0x22, 0x05, 0xea, 0x02, 0x22, 0x17, 0x70, 0x02, 0x22, 0x13, 0x88, - 0x06, 0x22, 0x01, 0x14, 0x02, 0x22, 0x01, 0x2c, 0x02, 0x22, 0x01, 0x24, 0x86, 0x02, 0x02, 0x01, - 0xe4, 0x01, 0x1c, 0x22, 0x01, 0x2c, 0x02, 0x22, 0x01, 0x24, 0x86, 0x02, 0x01, 0x01, 0xe4, 0x22, - 0x01, 0xfc, 0x02, 0x22, 0x02, 0x18, 0x0a, 0x22, 0x02, 0x34, 0x03, 0x21, 0x01, 0x03, 0x21, 0x03, - 0x12, 0x2c, 0x0b, 0x4f, 0x54, 0x4b, 0x65, 0x72, 0x6e, 0x65, 0x6c, 0x4c, 0x69, 0x62, 0x01, 0x27, - 0x06, 0x61, 0x6c, 0x6c, 0x6f, 0x63, 0x62, 0x01, 0x26, 0x05, 0x66, 0x72, 0x65, 0x65, 0x62, 0x01, - 0x28, 0x07, 0x66, 0x72, 0x65, 0x65, 0x6d, 0x73, 0x67, 0x01, 0x26, 0x05, 0x63, 0x6f, 0x70, 0x79, - 0x62, 0x01, 0x27, 0x06, 0x64, 0x75, 0x70, 0x6d, 0x73, 0x67, 0x01, 0x25, 0x04, 0x67, 0x65, 0x74, - 0x71, 0x01, 0x25, 0x04, 0x70, 0x75, 0x74, 0x71, 0x01, 0x28, 0x07, 0x70, 0x75, 0x74, 0x6e, 0x65, - 0x78, 0x74, 0x01, 0x2c, 0x0b, 0x70, 0x75, 0x74, 0x6e, 0x65, 0x78, 0x74, 0x63, 0x74, 0x6c, 0x31, - 0x01, 0x2b, 0x0a, 0x63, 0x61, 0x6e, 0x70, 0x75, 0x74, 0x6e, 0x65, 0x78, 0x74, 0x01, 0x27, 0x06, - 0x71, 0x72, 0x65, 0x70, 0x6c, 0x79, 0x01, 0x27, 0x06, 0x66, 0x6c, 0x75, 0x73, 0x68, 0x71, 0x01, - 0x29, 0x08, 0x6d, 0x73, 0x67, 0x64, 0x73, 0x69, 0x7a, 0x65, 0x01, 0x30, 0x0f, 0x4f, 0x54, 0x4b, - 0x65, 0x72, 0x6e, 0x65, 0x6c, 0x55, 0x74, 0x69, 0x6c, 0x4c, 0x69, 0x62, 0x01, 0x31, 0x10, 0x4f, - 0x54, 0x45, 0x6e, 0x74, 0x65, 0x72, 0x49, 0x6e, 0x74, 0x65, 0x72, 0x72, 0x75, 0x70, 0x74, 0x01, - 0x31, 0x10, 0x4f, 0x54, 0x4c, 0x65, 0x61, 0x76, 0x65, 0x49, 0x6e, 0x74, 0x65, 0x72, 0x72, 0x75, - 0x70, 0x74, 0x01, 0x2d, 0x0c, 0x6d, 0x69, 0x5f, 0x6f, 0x70, 0x65, 0x6e, 0x5f, 0x63, 0x6f, 0x6d, - 0x6d, 0x01, 0x2e, 0x0d, 0x6d, 0x69, 0x5f, 0x63, 0x6c, 0x6f, 0x73, 0x65, 0x5f, 0x63, 0x6f, 0x6d, - 0x6d, 0x01, 0x2c, 0x0b, 0x6d, 0x69, 0x5f, 0x6e, 0x65, 0x78, 0x74, 0x5f, 0x70, 0x74, 0x72, 0x01, - 0x20, 0x3e, 0x46, 0x41, 0x54, 0x41, 0x4c, 0x3a, 0x20, 0x54, 0x65, 0x72, 0x6d, 0x69, 0x6e, 0x61, - 0x74, 0x65, 0x53, 0x74, 0x72, 0x65, 0x61, 0x6d, 0x4d, 0x6f, 0x64, 0x75, 0x6c, 0x65, 0x28, 0x29, - 0x20, 0x63, 0x61, 0x6c, 0x6c, 0x65, 0x64, 0x2c, 0x20, 0x62, 0x75, 0x74, 0x20, 0x73, 0x74, 0x72, - 0x65, 0x61, 0x6d, 0x73, 0x20, 0x73, 0x74, 0x69, 0x6c, 0x6c, 0x20, 0x6f, 0x70, 0x65, 0x6e, 0x0a, - 0x01, 0x20, 0x30, 0x46, 0x41, 0x54, 0x41, 0x4c, 0x3a, 0x20, 0x65, 0x74, 0x68, 0x65, 0x72, 0x5f, - 0x6f, 0x70, 0x65, 0x6e, 0x28, 0x29, 0x3a, 0x20, 0x45, 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, - 0x20, 0x64, 0x72, 0x69, 0x76, 0x65, 0x72, 0x20, 0x6e, 0x6f, 0x74, 0x20, 0x6f, 0x70, 0x65, 0x6e, - 0x65, 0x64, 0x0a, 0x01, 0x20, 0x31, 0x46, 0x41, 0x54, 0x41, 0x4c, 0x3a, 0x20, 0x65, 0x74, 0x68, - 0x65, 0x72, 0x5f, 0x63, 0x6c, 0x6f, 0x73, 0x65, 0x28, 0x29, 0x3a, 0x20, 0x45, 0x74, 0x68, 0x65, - 0x72, 0x6e, 0x65, 0x74, 0x20, 0x64, 0x72, 0x69, 0x76, 0x65, 0x72, 0x20, 0x6e, 0x6f, 0x74, 0x20, - 0x6f, 0x70, 0x65, 0x6e, 0x65, 0x64, 0x0a, 0x01, 0x20, 0x30, 0x46, 0x41, 0x54, 0x41, 0x4c, 0x3a, - 0x20, 0x65, 0x74, 0x68, 0x65, 0x72, 0x5f, 0x77, 0x70, 0x75, 0x74, 0x28, 0x29, 0x3a, 0x20, 0x45, - 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, 0x20, 0x64, 0x72, 0x69, 0x76, 0x65, 0x72, 0x20, 0x6e, - 0x6f, 0x74, 0x20, 0x6f, 0x70, 0x65, 0x6e, 0x65, 0x64, 0x0a, 0x03, 0x22, 0x08, 0x4c, 0x82, 0x02, - 0x30, 0x08, 0x6c, 0x08, 0x7c, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0x2c, 0x08, - 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, - 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0x9c, 0x08, 0xcc, 0x08, 0xcc, 0x08, - 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0x8c, 0x08, 0xcc, 0x08, 0xac, 0x08, 0xbc, 0x08, 0xcc, 0x08, - 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, - 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, 0xcc, 0x08, - 0xcc, 0x22, 0x08, 0x5c, diff --git a/SheepShaver/src/EthernetDriverStub.i b/SheepShaver/src/EthernetDriverStub.i deleted file mode 100644 index fa381407d..000000000 --- a/SheepShaver/src/EthernetDriverStub.i +++ /dev/null @@ -1,43 +0,0 @@ - 0x4a, 0x6f, 0x79, 0x21, 0x70, 0x65, 0x66, 0x66, 0x70, 0x77, 0x70, 0x63, 0x00, 0x00, 0x00, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x03, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x01, 0x90, - 0x00, 0x04, 0x04, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x58, - 0x00, 0x00, 0x01, 0x54, 0x00, 0x00, 0x00, 0xaa, 0x00, 0x00, 0x02, 0x00, 0x02, 0x01, 0x04, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x01, 0x0a, 0x00, 0x00, 0x00, 0x80, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x44, 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0xb4, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x05, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0a, - 0x00, 0x00, 0x00, 0x00, 0x42, 0x00, 0x46, 0x07, 0x09, 0xc1, 0x01, 0x43, 0x00, 0x41, 0x00, 0x41, - 0x00, 0x42, 0x00, 0x41, 0x00, 0x42, 0x00, 0x81, 0x54, 0x65, 0x72, 0x6d, 0x69, 0x6e, 0x61, 0x74, - 0x65, 0x53, 0x74, 0x72, 0x65, 0x61, 0x6d, 0x4d, 0x6f, 0x64, 0x75, 0x6c, 0x65, 0x54, 0x68, 0x65, - 0x44, 0x72, 0x69, 0x76, 0x65, 0x72, 0x44, 0x65, 0x73, 0x63, 0x72, 0x69, 0x70, 0x74, 0x69, 0x6f, - 0x6e, 0x49, 0x6e, 0x69, 0x74, 0x53, 0x74, 0x72, 0x65, 0x61, 0x6d, 0x4d, 0x6f, 0x64, 0x75, 0x6c, - 0x65, 0x47, 0x65, 0x74, 0x4f, 0x54, 0x49, 0x6e, 0x73, 0x74, 0x61, 0x6c, 0x6c, 0x49, 0x6e, 0x66, - 0x6f, 0x56, 0x61, 0x6c, 0x69, 0x64, 0x61, 0x74, 0x65, 0x48, 0x61, 0x72, 0x64, 0x77, 0x61, 0x72, - 0x65, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, 0x00, 0x02, 0x00, 0x04, 0x00, 0x03, - 0x00, 0x04, 0x00, 0x04, 0x00, 0x15, 0x5e, 0x85, 0x00, 0x14, 0xbd, 0xe0, 0x00, 0x10, 0x8f, 0x84, - 0x00, 0x10, 0xae, 0x97, 0x00, 0x10, 0x4e, 0x3c, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x01, 0x01, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x44, 0x00, 0x01, 0x02, 0x00, 0x00, 0x29, - 0x00, 0x00, 0x00, 0x0c, 0x00, 0x01, 0x02, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x14, 0x00, 0x01, - 0x02, 0x00, 0x00, 0x49, 0x00, 0x00, 0x00, 0x1c, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x38, 0x60, 0x00, 0x00, 0x4e, 0x80, 0x00, 0x20, 0x38, 0x62, 0x01, 0x3c, 0x4e, 0x80, 0x00, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xc0, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xc4, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xc8, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xcc, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xd0, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xd4, 0x7c, 0x09, 0x03, 0xa6, 0x4e, 0x80, 0x04, 0x20, - 0x02, 0x22, 0x01, 0x3c, 0x03, 0x21, 0x20, 0x86, 0x02, 0x02, 0x00, 0x10, 0x00, 0x08, 0x09, 0x21, - 0x50, 0x86, 0x02, 0x02, 0x00, 0x60, 0x00, 0x30, 0x01, 0x21, 0x40, 0x04, 0x24, 0x6d, 0x74, 0x65, - 0x6a, 0x04, 0x35, 0x14, 0x53, 0x68, 0x65, 0x65, 0x70, 0x53, 0x68, 0x61, 0x76, 0x65, 0x72, 0x20, - 0x45, 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, 0x0b, 0x21, 0x01, 0x01, 0x21, 0x80, 0x04, 0x26, - 0x04, 0x04, 0x65, 0x6e, 0x65, 0x74, 0x00, 0x3e, 0x25, 0x01, 0x6f, 0x74, 0x61, 0x6e, 0x01, 0x24, - 0x0a, 0x0b, 0x01, 0x01, 0x03, 0x34, 0x53, 0x68, 0x65, 0x65, 0x70, 0x53, 0x68, 0x61, 0x76, 0x65, - 0x72, 0x20, 0x45, 0x74, 0x68, 0x65, 0x72, 0x6e, 0x65, 0x74, 0x04, 0x22, 0x1b, 0xbd, 0x05, 0x21, - 0xc4, 0x06, 0x22, 0x05, 0xea, 0x02, 0x22, 0x17, 0x70, 0x02, 0x22, 0x13, 0x88, 0x07, 0x21, 0x2c, - 0x03, 0x21, 0x34, 0x03, 0x21, 0x3c, 0x86, 0x02, 0x02, 0x00, 0xdc, 0x00, 0x24, 0x01, 0x21, 0x34, - 0x03, 0x21, 0x3c, 0x86, 0x02, 0x01, 0x00, 0xdc, 0x01, 0x21, 0xf4, 0x02, 0x22, 0x01, 0x10, 0x0a, - 0x22, 0x01, 0x2c, 0x03, 0x21, 0x01, 0x03, 0x21, 0x03, 0x0c, diff --git a/SheepShaver/src/MacOSX/.gitignore b/SheepShaver/src/MacOSX/.gitignore deleted file mode 100644 index 687d4ec09..000000000 --- a/SheepShaver/src/MacOSX/.gitignore +++ /dev/null @@ -1,7 +0,0 @@ -# Xcode build files -build/* -SheepShaver.xcodeproj/*.mode1v3 -SheepShaver.xcodeproj/*.pbxuser - -# autoconf build generated Info.plist file -Info.plist diff --git a/SheepShaver/src/MacOSX/AudioBackEnd.cpp b/SheepShaver/src/MacOSX/AudioBackEnd.cpp deleted file mode 120000 index d0d8a5caa..000000000 --- a/SheepShaver/src/MacOSX/AudioBackEnd.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioBackEnd.h b/SheepShaver/src/MacOSX/AudioBackEnd.h deleted file mode 120000 index e4f493db5..000000000 --- a/SheepShaver/src/MacOSX/AudioBackEnd.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioBackEnd.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioDevice.cpp b/SheepShaver/src/MacOSX/AudioDevice.cpp deleted file mode 120000 index b56f3a4ca..000000000 --- a/SheepShaver/src/MacOSX/AudioDevice.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioDevice.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/AudioDevice.h b/SheepShaver/src/MacOSX/AudioDevice.h deleted file mode 120000 index 7892391b1..000000000 --- a/SheepShaver/src/MacOSX/AudioDevice.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/AudioDevice.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in deleted file mode 100644 index 1324ba8b6..000000000 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ /dev/null @@ -1,56 +0,0 @@ - - - - - CFBundleDevelopmentRegion - English - CFBundleExecutable - SheepShaver - CFBundleInfoDictionaryVersion - 6.0 - CFBundlePackageType - APPL - CFBundleSignature - ???? - CFBundleVersion - @PACKAGE_VERSION@ - CFBundleShortVersionString - @PACKAGE_VERSION@ - CFBundleIconFile - SheepShaver.icns - CSResourcesFileMapped - - CFBundleDocumentTypes - - - CFBundleTypeExtensions - - sheepvm - - CFBundleTypeIconFile - SheepShaver.icns - CFBundleTypeName - SheepShaver VM - CFBundleTypeRole - Editor - LSTypeIsPackage - - - - LSArchitecturePriority - - i386 - x86_64 - ppc - - LSMinimumSystemVersionByArchitecture - - i386 - 10.4.0 - x86_64 - 10.6.0 - ppc - 10.4.0 - - - diff --git a/SheepShaver/src/MacOSX/Launcher/AppController.h b/SheepShaver/src/MacOSX/Launcher/AppController.h deleted file mode 100644 index bbe989fb2..000000000 --- a/SheepShaver/src/MacOSX/Launcher/AppController.h +++ /dev/null @@ -1,30 +0,0 @@ -/* - * AppController.h - Cocoa SheepShaver launcher for Mac OS X - * - * Copyright (C) 2009 Alexei Svitkine - * - * 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 - */ - -#import - -@interface AppController : NSObject { -} - -- (void) awakeFromNib; - -- (IBAction) openVirtualMachinesList: (id) sender; - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/AppController.mm b/SheepShaver/src/MacOSX/Launcher/AppController.mm deleted file mode 100644 index 46e862ce3..000000000 --- a/SheepShaver/src/MacOSX/Launcher/AppController.mm +++ /dev/null @@ -1,44 +0,0 @@ -/* - * AppController.mm - Cocoa SheepShaver launcher for Mac OS X - * - * Copyright (C) 2009 Alexei Svitkine - * - * 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 - */ - -#import "AppController.h" -#import "VMListController.h" - -@implementation AppController - -- (void) awakeFromNib -{ - [self openVirtualMachinesList:self]; - [NSApp setDelegate:self]; -} - -- (IBAction) openVirtualMachinesList: (id) sender -{ - [[VMListController sharedInstance] showWindow:sender]; -} - -- (BOOL) applicationShouldHandleReopen: (NSApplication *) app hasVisibleWindows: (BOOL) hasVisible -{ - if (!hasVisible) - [self openVirtualMachinesList:self]; - return YES; -} - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/DiskType.h b/SheepShaver/src/MacOSX/Launcher/DiskType.h deleted file mode 100755 index 8f74d8a0d..000000000 --- a/SheepShaver/src/MacOSX/Launcher/DiskType.h +++ /dev/null @@ -1,23 +0,0 @@ -// -// DiskType.h -// SheepShaver -// -// Created by maximilian on 01.02.14. -// Copyright 2014 __MyCompanyName__. All rights reserved. -// - -#import - - -@interface DiskType : NSObject { - NSString* _path; - BOOL _isCDROM; -} - --(NSString*)path; --(BOOL)isCDROM; - --(void)setPath:(NSString*)thePath; --(void)setIsCDROM:(BOOL)cdrom; - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/DiskType.m b/SheepShaver/src/MacOSX/Launcher/DiskType.m deleted file mode 100755 index ec21d4586..000000000 --- a/SheepShaver/src/MacOSX/Launcher/DiskType.m +++ /dev/null @@ -1,35 +0,0 @@ -// -// DiskType.m -// SheepShaver -// -// Created by maximilian on 01.02.14. -// Copyright 2014 __MyCompanyName__. All rights reserved. -// - -#import "DiskType.h" - - -@implementation DiskType --(NSString*)path -{ - return _path; -} --(BOOL)isCDROM -{ - return _isCDROM; -} - --(void)setPath:(NSString*)thePath -{ - _path = [thePath copy]; -} --(void)setIsCDROM:(BOOL)cdrom -{ - _isCDROM=cdrom; -} - --(NSString*)description { - return [NSString stringWithFormat:@"DiskType, path:%@ isCDROM:%@", _path, _isCDROM]; -} - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/InfoPlist.strings b/SheepShaver/src/MacOSX/Launcher/English.lproj/InfoPlist.strings deleted file mode 100755 index f1842244c9c07de454abd8747d5422b605935efe..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 276 zcmW-cF%E)25Ji9ODK?Z8dH`dg7HXmv5<4115CQ@LQStEVW3tK2?BAL9XMf+Bd^zn^ zD^{dZxjssCMSGH4btttevLmO&9k-Nvs>b>|Jx~j}2kY`R(}Z(Wpsjk{;Z{2F9>I-t zVJguYLc>H0|EA0s3pgGxnW-Z;w^^qZxwn0sDdT - - - - IBClasses - - - CLASS - FirstResponder - LANGUAGE - ObjC - SUPERCLASS - NSObject - - - ACTIONS - - openVirtualMachinesList - id - - CLASS - AppController - LANGUAGE - ObjC - SUPERCLASS - NSObject - - - IBVersion - 1 - - diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/info.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/info.nib deleted file mode 100755 index d1a1a5e6b..000000000 --- a/SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/info.nib +++ /dev/null @@ -1,18 +0,0 @@ - - - - - IBFramework Version - 677 - IBLastKnownRelativeProjectPath - ../SheepShaverLauncher.xcodeproj - IBOldestOS - 4 - IBOpenObjects - - IBSystem Version - 9J61 - targetFramework - IBCocoaFramework - - diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/MainMenu.nib/keyedobjects.nib deleted file mode 100755 index 0e197efef29fe489df10acfa8a1ddcc725f4d37a..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 12048 zcmcI~d3+Pa`|!-}Y??cpZ0_{PX2VgC`@Si6!2+e_K5A$K6xyaVEl?1d1w0V}QIJcZ z2*@QOB40!<0Ra&a5fK#>6cM}+L`3BGY?9Ix%je@C?@LLtJ3I5-=gf{SF31m;Hg5b8 z!iYgEB8WpOq(Ryt{z<`-aDJ#L+g}YLRkSRTwvi!It}#(7AG^r#7Hf!d(Xs4MD*dZ7o=cvOsLqQ}t_ z=t=Ypnuq42g=jH)0WCwz(JJ&3+Jv^ESJ5`~8u}mFkKRE?&{1>@oj_;M$LK8j3|&H3 z(6{I+x`uv2f1n%aPxLotaROFj4c1~KwqZMVU?)z*687U-xHhhbo8YFn8E%f-;LbP= zcfs9p58M;?!C5#P55z<9LpXp(<6Jxz7vT^t#uITFei%>3kKh@2HlBl@#&huk`~qH% zSKt@%O1uVd#INA3_*J|O@4#>2J$NsE8y~~(;^X)|d^9OT>naUzo#hO?rT)EgJ*2|`{ z^-ycJ0dovSTC%O!PHZo@N@oYMgV+?f%3&X3N3%=W(?m}U#7InpCuU+H02J%AdZhNuy0Jg9HhfKaG(kUzH|5Dt&*o7FGsVBkUF zh%0qf#)IKOfr7FijJWz{rRC-Z!{PkV`33o<<^A&WV$Wc0*HBRrcqjO6czEBezJbDE zSb+oAJxbtaa;Rj2GAjyEc`^*}0RZI^9z+)04^a$us6?6BBUDtH5hx0b4VL8aeBZ1= z`9M!WaBzN6UTAWZ?ie4H;2bs3t)LwWXoFKqfr=4PTA~XmBja4URK|K4kER;>5mm`p zCu0LWBjblCq6zf0j00x8M8?JsK^09=Gt?XyjWDM$LOIGR4_cyDs5M||7%nZzFB(e; zke^lzfiE|p24Fto(q8CK~V-4znI-*VyJ!F)X27tw^2$Ugxv+iC* z8I8h8LtQFR7u0DK5KQzxN>8SS_ z)Eo6doj@p+h=ZjA0c)@{x-tXxrAxN*9@G!@N112<%0k&_AR2@QqakQ08it0W5ojbD zg>ukCD1b(zT$G1`Xbc*Q#-V(wrB0em{j@G^NSo5uv;*xzd(ysi03A$6&;Sk633MVY zqf_Z4bQXP_&Y|<^bEkpk38(-Sq9PPhL=Y+~$qf$foAqE|bg+OrsE*pt!JLVx1cgy4 zDnpadWHbepqp4^bdKgVdkDwWdA{mxs=a&`)b9i$kS9G6PmOm*Yl$Q|*PXKv@ahzGPNms3e7=Jqq(5R z0l{#D&4^7|C{N8meFSsVEC5p1alzaPg@KX@QSB{2&sLyk6|(`)h?+qqka*yWr~=Iz znWfMZVJWLLP#TPaS%Q{Uprxo22&9tS9NtkJEEy9jDO3pVA1DeIq($7lZFI>B^x_)y zB3h~7wt-{ij|Q(TEeRFebzWd7I;zBpP)U_WE6^HHpo=Db@-GFJqjjLZ^)dBr1Q~m1 zVnnj;D!Fb!uYfFf(p{q>((q;#2MY?o-!j{c%2mWudEfRUfWJLvMk(kGv=g-4Ef_A% zFN*jh5W&zCD%C{Bn`k$BD@MjXAVai3yhYR(p~b5Jo`?=aw0sa9LWjXJB1&6L-=!z$ zd&7I>=LNm}O2%}woHM)$x0b%c> z2k8DB-qJ;hYu>bi0&i)^+oJ?D-XBaeP*M^o8XHV6ij3SN_8-uX5kWViO==?JmpC#M zK{t+(;T@7SE;Ly|1>!3!QUnOs_YvP;=oa8;MqAZ{;UBme^VXdBwT22_|w)3CWxPk^c|Z5P!NM4#Se zg~f{0q8K0@WRB0_lX8ParNNTBW9db)^p;i<48&n|V-H~MNYiS%WIF)aJ|-8%*3xP32*`R6I|k*Kl$Hewycq$g`-_5M?}N}MWIh;6w7452 z*9S*}-ecjVKq&*9q2eG&DzdP0ow6*B#q@|r^}CNp;S8XtZ>6U20HCQq&5Y`b$3aMz z`H*<>ytOmO+;t~B7!Ls^v*@6jSR4)jN5n}jn+}Xh4Z?D1=9KK*vUuu(cnp9VLWkD` zDj)5}L0kLOnUIFOw-I#gEb%^DXB7H5qMK;H*W5h}?GmPBF+*oq|GNPfmk@iOrGm2}m>t_7iR zFmv+A7?Y9PI7F*)1t2P*#Wf*X3y9Xm5N!ZNMKlyaR9F>WHsdXT=q=D%!w~3{%Q%eN@#}!GgqGHXac5k}R8nL(CQf$_@2;K^y@9ZIXsFDaU0w_YP;zN# z?AU^!;z;>LWsoZ(i88VRqIw+m{rCW2pG3=R!hQ(&JsfA9lj)SGb!HC;=7lnc4J?75 zdu-z*{r~_nbQ+yr6UfuRP<*m|xH8Xzyds%2PG|#_Ob|!w=lDE;oSYfLg$hT+Oi{V6g2)ht1Bg%4c{M;})My%`iE@h+yO>L# ziE!)Ahl;%zD)IvOQ{viKh-+;jZ!3n^6I#9SJ)Xr_BEfUPeS#-r2Skn-BFcCG)w6VA z1eKmofOI`D9IQ%nUZ^3xN{NygtX7XPBI5&I82UVYp(bu>0g~D=Buda&L>EU;c)=(# z%krzmjLeC{Ad40%bzLx8pE3=ZMr)WxOyfv{6zgl!piU`=k~;Dm>1~*%Of&l7R=x$( z9G_%b;v48MrVY~;&t%%;ARf$gVmf06htV5MH;{b~yd9{vFul=5yckvBx_ATAAF`hw zuV%9GJiH%mWQHJ$)6qF}9A85}Fgf^hRD@eGxlA6~huzFrW*l7xZcqVM(TuL48zEe7 zf;^B#H`6V&ImGA`x()RECiwpIbOGH>>(Q}LDtD!Y^bN?bZ6FG*gOE3gy6M|gPy0c2 zR|^cb5j_Mxpo9GTDqT*!P$|4mk9~@a%=qdZ5;FmnXKA=(lEB%-EK0Gto%z`SO(LQDoEL%rkiZSS=Ylmb7OD5&RZbv+) zOPOWNa^Q45-9TSfSb+|oSzN`{YPw_<_)(71EJs%>?bCndO7Z$C((C=lWs%rZwXFGn zTo#EjRm=V>Hl(;-)iQ6T5ROrj-90bAa)*Fm#b6^`<>T-ay@;mGD_3!V5&uVl?;4W zrNy7=lC|KoMd&zV!HQ4mz^4|_Hb7sEh&G}v)e!vyh}_VRM*FAc^nXJtJJ6W*vkYCb zh9M9!wu5iGXvu%%{9fVThakKGZ>}PU$zvTrP$ASCQG%A!J=scmQAvzPamCfNASMYm zg_1$h-L%RXKDuNb4&xh4TXc@;gj+#adICaKDg>!sqrli>dvA)ZD@$NMjC}yg^n>@K zk6{~Eqpt`l#SBGNvZn#!HdYJn@D8UUgcEg8(kwTEt zSh#)z?zX{wJ@_b)mczGlr_4GA-^=OpN)DGR9JZ{=wLnX?YzuUC#$llQjsFkXmboY2 zHU}M#1j;?7<_Dl96dx`yu{hGbZe#2g2 zzh$qo*Vyma@7W*NAK9PSpV?p7U)kT--`VTzAM6eGPxdDJ7ki8So4w8c!`>l?V8RfV z5W*1^Gl{5)hG>b7eoW8OPv|-NDgBIoPS4W|^b7hWy+|+7ujtqGGW~{Lq2JQ0^cww+ zeoud(KhmG*&-54iEB%fBPOsBH=neWOy-EL~x9H#WHvNa*kuj1nmND#(voaiYtL<^CtM+12 zM<~GSguVSH7bzX0wc4y`=8cEl6q?AmDgWv*Q-|KABZn8`X4cqV16iiHInd9?<7zfM z@~p0s4dcgKR422tnFe6hg;taYLykE35uru*4pT$C4P`*(UIZK5UX%_cQV_Ppy{PWL zD|!@e(Zag6XmmG)n-#f1`!4)^5+Ac6Wv&21%HmERI z&2eJ;t1ujIkr6wtKBP3uFv}JPF@jAw#eng62dZ&5FWxenR8m$qPVfLEUcwPCgt2%Q zVwP0hRpLR!qA%%6KU`IL-6QTgU5Uz>aDp`^nt#wZrQ55_KyaGXPwDyK>?#KjM)@ef zbVAum_XnQ#5Ojc#Hj+(bGuc93AzR6-WE**nY$vai9pnwNll+hDB5#u2?QliesX}kO%9Sn&UpSj8kP?Psa6S z{D6!b$he`58_Bq_jGM@~sf?S+xVem5$hf79TgkY!jN8b#t&H2rxV?-!$hf17JIT1S zjMHS?MaEra+)c*aW!yu?J!RZW#_2NdE#p2ieo)34GVUwmelqSa<4hS3ka3obvt>L` z#)D)$SjIzSJXFTRWISBPBV;^M#-n6-F=j9S4xhz8#y`)$%OB=9^RxI7d|UoFf0TcP ze~*8GKftfz=kWW@cmcnJpU-dL>+n-~2mdU;fPb0a&Clca@!R<)_|^Pa-pSW8;}`f$ zehzEN`5KN@fG|t{7d{I zehvR3zut`J^UL`o{Hy#4K8fGKx8XPO0^d4fO(=s)gI+pjSzNa&zvX&HuAyG$(z)Ih zT<^$+PI{N^AlU6k%7` z-=KWb!+Rwy;a!lyB%jP8bIDS&91M6hnC^No+D%}vuY#fO026%^%yTao<{>c155Uwe zfSFx|_eQS6n<095^TP{ocC>+aHTrPb+)!>DH;tRk&Epnu&vMJS3T`X6gWJpP=WcSh zxZB(v6;`n-PL-h2sB|iW%A_)@1eHzYP`OkdRgx-2C8{JRfeDU8;Umy-@wUda-(mdYSqy^L1iM)weWOji`|{wKR1!4{G{q`fCPgvNeM=Lo~xQ z<22(nlQrdohNGHfnZj_GtEL4rmT)KGB@he5d(a^N$v387+YYU^toXd7vpXxnPDv=3=VYxA^Yw2y0_)Xve))y~r{&@R-j(pG3+(yr5P({9)9 z)gITL(4N$u(*CObUHgajPwijYzqSA9EIO;Mxh_rDRo7kDQ#VdGURR(i(iQ7Ubfvnf zx`%bMbn|u3>Ymdr((Tmk((Tsm(e2Y6&>hqr)xE3xKzC91mF}|citegjtJmv|dR}kQ zTlIE*Lw#d?8+|){2Yny?7=2h@rk|`Y*T1M=rLWMxq+h3hS-(-gS-(@iOaG4ksQz93 zd-@;rKk0wb|E9mLzoEaWzpcMxAO^ERFxU(ZLu*4@LwiFL7QVH0cOOiq*AaEXm@~}%%*EysbE$cfd5U?e`C;=s^8)i4^Q-39%&(i@Fn?w~ zZ~nr3(fpP9viXYns)ex-i_PM&xGWw^lBJ`iv!#oro27@Pm!-F5q$S5P-V(Mv*7gj^vgj1}^Q2|}R|5+({^VY#qQ z*eYxjwhKFiox(0*x3EXpCww4$D10P*EPNuI7rqy+3pcFD%2+vTf|a-0tR1ZnT8CPP zTSr<)Ss$_nthv^pb*y#1^;zq4)n{V4?+ilxp+iTlzJ77C#J8U~*`@r_0?X2xf+a=pA+ilw&JGQfS&Yob`*mZV; z-DEf01$%pYM|)>`n!T&No4tp|5>I?Az_1+b`I^v|qA+ZU4spt^Jz)d;4|!KMv$baA+Jlhr!X((c010(azDq z(b3V_(Z$itQRoOcCOX27GRI^`xnr7Rx?`qej$^K4zT;WPGRF$XOO7p$t&X=GdmZ~7 zZ#xb--fgjHW~bn^IUP=y)8kBX)^;{>HgUFhc64@jc5!xd_Hc%r z6P;manRBwU+&RrT-8sWK$N8Ldk#mD{lXHu6t8<%kyK{$gr*oHcxAUm;7w2!z>&_d_ zo6cL#+s->K>@v9QE|1Ias_k0ndfv6zwZyf|wZgU1wc54Dwbr%XwZXN?wZ*m7wavBN zwZpa3wac~Jwa2y3b-;Ddb=Y;pb%8j=*G1P?uFI|~ zuB)!^TtB#ea{c1^&2`;%!*$bj%XQnWa;x2w-R16S?&7E%L*)z-YsONFdlb$)Axt@8R1)hbT=RJ!(OFYXwD?BSb zt37KxYdz~d8$6plTRdAm+dQv(c6#3Q?D6dP9Q3^7IqEs?dEax&^O5IDqAJmnSSzt( zVxPp(iA9OeB)*XNR^t1KpC*2j_-m3TDKV*KQf^Wx>4l`7NuMYElyo~;lUzHwO>+0- z5y=yh=Ok}Tek=Kd%JJUN`Ocm>k4a7!b6S0}tLTn|r5!;C!#7<(G*j4N<_7u~_K4OO0Ps|jv z#DU^qai}<494Y3A0Wnt$ietrmae`PVhQx_tSS%AKi{;`pak@A|l*L)%qvGS@lj0n4 zt~gIzATAW27Z;05#AV_NaizFgTqCX(*NYp(P2v`DtGG?vF76O_io3+!;vR9IctAWT z9u|*?$He2}N8-o6X}(8%vTwHUaoc2Y+vP3k7~lzK}UQhzB+8YB&s zMo2l*XelU-lO{+-Qn6Gbl}eMODbiHwVd)WxN;9R|(qqyS(o@pY(lgS0=~?MHX_2%< zS|+WKR!Xa-HPTvXy|h8vByEwlO53FE(hg~-v`gA8?UD9NZ%c=ycci1zyV42iq;yI; zEuE3hO6R1{r1R1j(naYj>9X{r^t1G<^t<$j^r!Tf^tbenANd(S=TGo!{5rqEZ}OY{ ug5TzM_+5UV-|w&GZ|HCAZ{lz3Z}0Em@8R!*BL5gB`pd=cqjw1Thy5Q=ZbjMv diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/designable.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/designable.nib deleted file mode 100755 index c71e47bac..000000000 --- a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/designable.nib +++ /dev/null @@ -1,713 +0,0 @@ - - - - 1050 - 9J61 - 677 - 949.46 - 353.00 - - YES - - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - - - YES - - YES - - - YES - - - - YES - - VMListController - - - FirstResponder - - - NSApplication - - - 15 - 2 - {{196, 309}, {412, 201}} - 536870912 - SheepShaver Virtual Machines - NSWindow - - {3.40282e+38, 3.40282e+38} - {412, 201} - - - 256 - - YES - - - 274 - - YES - - - 2304 - - YES - - - 256 - {374, 94} - - YES - - - 256 - {{375, 0}, {16, 17}} - - - YES - - 3.710000e+02 - 4.000000e+01 - 1.000000e+03 - - 75628032 - 0 - - - LucidaGrande - 1.100000e+01 - 3100 - - - 3 - MC4zMzMzMzI5OQA - - - 6 - System - headerTextColor - - 3 - MAA - - - - - 337772096 - 2048 - - LucidaGrande - 1.300000e+01 - 1044 - - - - 6 - System - controlBackgroundColor - - 3 - MC42NjY2NjY2OQA - - - - 6 - System - controlTextColor - - - - - - - 3.000000e+00 - 2.000000e+00 - - 3 - MQA - - - 6 - System - gridColor - - 3 - MC41AA - - - 1.700000e+01 - 316669952 - 2 - 4 - 15 - 0 - YES - - - {{1, 1}, {355, 94}} - - - - - 4 - - - - 256 - {{356, 1}, {15, 94}} - - - _doScroller: - 3.947369e-01 - - - - 256 - {{-100, -100}, {374, 15}} - - YES - 1 - - _doScroller: - 9.904762e-01 - - - {{20, 60}, {372, 96}} - - - 146 - - - - QSAAAEEgAABBmAAAQZgAAA - - - - 293 - {{302, 12}, {96, 32}} - - YES - - 604110336 - 134217728 - Launch - - - -2038284033 - 129 - - - 200 - 25 - - - - - 293 - {{206, 12}, {96, 32}} - - YES - - 604110336 - 134217728 - Settings... - - - -2038284033 - 129 - - - 200 - 25 - - - - - 293 - {{14, 12}, {96, 32}} - - YES - - 67239424 - 134217728 - New... - - - -2038284033 - 129 - - - 200 - 25 - - - - - 268 - {{17, 164}, {147, 17}} - - YES - - 68288064 - 272630784 - Virtual Machine List: - - - - 6 - System - controlColor - - - - - - - - 293 - {{110, 12}, {96, 32}} - - YES - - 67239424 - 134217728 - Import... - - - -2038284033 - 129 - - - 200 - 25 - - - - {412, 201} - - - {{0, 0}, {1680, 1028}} - {412, 223} - {3.40282e+38, 3.40282e+38} - - - - - YES - - - delegate - - - - 46 - - - - newVirtualMachine: - - - - 48 - - - - importVirtualMachine: - - - - 49 - - - - editVirtualMachineSettings: - - - - 50 - - - - vmList - - - - 51 - - - - window - - - - 52 - - - - launchVirtualMachine: - - - - 53 - - - - importButton - - - - 54 - - - - launchButton - - - - 55 - - - - newButton - - - - 56 - - - - settingsButton - - - - 57 - - - - - YES - - 0 - - YES - - - - - - -2 - - - RmlsZSdzIE93bmVyA - - - -1 - - - First Responder - - - -3 - - - Application - - - 1 - - - YES - - - - - - 2 - - - YES - - - - - - - - - - - 13 - - - YES - - - - - - - - 14 - - - YES - - - - - - 15 - - - - - 16 - - - - - 17 - - - YES - - - - - - 21 - - - YES - - - - - - 22 - - - - - 23 - - - YES - - - - - - 24 - - - - - 25 - - - YES - - - - - - 26 - - - - - 18 - - - - - 31 - - - YES - - - - - - 32 - - - - - 43 - - - YES - - - - - - 44 - - - - - - - YES - - YES - -1.IBPluginDependency - -2.IBPluginDependency - -3.IBPluginDependency - 1.IBEditorWindowLastContentRect - 1.IBWindowTemplateEditedContentRect - 1.NSWindowTemplate.visibleAtLaunch - 1.WindowOrigin - 1.editorWindowContentRectSynchronizationRect - 1.windowTemplate.hasMinSize - 1.windowTemplate.minSize - 13.IBPluginDependency - 13.ImportedFromIB2 - 14.IBPluginDependency - 14.ImportedFromIB2 - 15.IBPluginDependency - 15.IBShouldRemoveOnLegacySave - 16.IBPluginDependency - 16.IBShouldRemoveOnLegacySave - 17.IBPluginDependency - 17.ImportedFromIB2 - 18.IBPluginDependency - 18.IBShouldRemoveOnLegacySave - 2.IBPluginDependency - 21.IBPluginDependency - 22.IBPluginDependency - 23.IBPluginDependency - 24.IBPluginDependency - 25.IBPluginDependency - 26.IBPluginDependency - 31.IBPluginDependency - 32.IBPluginDependency - 43.IBPluginDependency - 44.IBPluginDependency - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{308, 569}, {412, 201}} - {{308, 569}, {412, 201}} - - {196, 240} - {{357, 418}, {480, 270}} - - {412, 201} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - - - YES - - YES - - - YES - - - - - YES - - YES - - - YES - - - - 57 - - - - YES - - VMListController - NSWindowController - - YES - - YES - deleteVirtualMachine: - editVirtualMachineSettings: - importVirtualMachine: - launchVirtualMachine: - newVirtualMachine: - - - YES - id - id - id - id - id - - - - YES - - YES - importButton - launchButton - newButton - settingsButton - vmList - - - YES - NSButton - NSButton - NSButton - NSButton - NSTableView - - - - IBProjectSource - VMListController.h - - - - - 0 - ../SheepShaverLauncher.xcodeproj - 3 - - diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMListWindow.nib/keyedobjects.nib deleted file mode 100755 index 23a3b0ba362478e433d32016b175d4ea49491895..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 8475 zcmbVR2Y6J)+WuzF_Il3lo|BvdNMfkcQfQ$_LJ2h?kPtd?NtR?~lMTC@1PH+q+f}fk z*ib}@1yn%nV)@l;;iA_oU_-H8MMXsAVxh?Y%{jY}SpMgK?(&eGGiTL71V@8*zP%Ivf)|YolL>p#y3C5~w!`L;WOLYFlp{hjO2jt52 z{{k!6=8hlP*XXPcCW4Gqir$j4iJ>K->cZrtZQ?F)f(vqB01Sj-FdRn0Jg9_=APDoJ z3g0!r61Wa-hK+C^yaKPnKVT313--h3a1_3WU*K0bMJO>7H}McJ@sV_rNxG3`VD`E&>!K?~>@T0|$(NpwC9(FL@YE~jhggY+T#Fx^JC(;f5? zx|2RiAES@cC+L&(Df%>hhVG)z(&y;&^ac77eT9A{I7p4)6kLK^@CaT(6eO4>_yoTY z5M)6S(u8zD6*QrP&{60loF{Y^GRT!erf|NH1+#@NLRX=O&`an$txJ7lB=WK712=fU z3nED113v^n1_ja}9aPYu19XH=a2|Aq49JA@Aq%=dSLg=ap$GJY3!oSDhCa|2`ayO@ zN!iqBG*Qu|DiVyx=a!UBHsS#t9@jlTiuZ@&6~Rbj2z%6$vcjsWP&^) zD0_x2Ww)@WS&&`A%xn$2l`-}t17=~%*;C?BcH7(Nfn3Og{-~d>6UWa?Oh8B##gi}* z5pyCIjYLARw_y+rhI|+@!!UFxKFes-X1BJ|b5Jut4(J%&zU@VM-@h|}%Mwc>q2geC zAs=suLF04C`dZA*Dw&hbVRl~z05Au0F&mpFQqjxiGN=^OTUv7R2lmd$%g%4@ozc=i zC%1P-Zgx&;?*SCLm?%>=| zue`x1>D)u>taAe2g=+Le2o^vM(qb)y;bK?_5vapfR9BHl-PBOLAzEJ@ilHOR8s|5m z9(<`L-HfTM;kLqdSz|*e#z!y@o6Wou0X7qxvy5O^1TmIJT0&cF|{Hpj%hhu0t{nf1zZM~!xeBPTm^qae5J4wR>3MYKE!By@F540OC*Ro?&bRyHH%sq{*UKh(6N)--h4# zUm`wK$jt^bAM>Tux`AbHL^La51@;bR!w%?%ZGknqac@CIZbeltLCtT6J76u`33tId zRAN2$tivd&GK`6>(a|an0$U@;j*3R2F|^PiHc&J%zhnm%z_oi~S0J_WW|n;qtYd+X z#Q?5(Kbr3W*aBPOL3jurhHbiQx8wRd;1NWy6CQ=f5a<)|Bs>LA!!xi8o<%&*q0^to zr!c&TskRDU#&r98rPvwq#DX<77~W;k##oge)J4%)Nwj`av?>@ul;s9;J^Fbj)Wo8V z_0>A^O3{aO7KtF&l`m-sm4zahLgzk?_W2>Z0gKq^u!Wg)2=DS0`$9 z3P&l8b@hdfiD)bo4=?2?cxGXO{BhQ}P`IX+C+L{^AaZOqdV6dvoC1P-1O9Y2F_Ff~ z`7mPzq~eZ$p{cGW%9lEV6q*Zl#79&W)9^{UotWlV0n8Tc0&ZYI-R9eih&j!GoW`yHc$B+%>JA~t*r(jzX5M< zf;Zux@D>c6TiMotSQoh+IlxqsrUGLx4~%_Gdly6E9e5YsgZJSBH~=5QM{p26hEL#A zScl#i7Ybr(k3#!n`slXDG#`z7D&B=nB(PL3a-ZJB<#g-m+0u`7$SP>g*7aoFvkFEV z8fO(;UtshF-i3c7hAr>~dTFQ4hs-+*;v8LT7g#Lh3>hl~6GKf*Ei4;+V|;Ab=rXC?gNB@anqfxZgs zoK?`x0LjjiTpj03YOD%Z2gk;O$Z>|jPr%6ya1w^%R9?gPqU6)?8=N6Ph#tV0mpocS z++?-kM2KaI!o=*pdHj=`pAWhiA`sICVuGPKN=LjOJotE;Scny6*@=TViHjS6=Q+p7 zi3lwpiPrEZmdUz`7S@GjRg^7>Cqi||$hEq+&f1_YGKpo5%ucTCCxOi*KxCqjG#IKU zr|z+H&eqwT%P9(nBGudls92%CE8-8RIsZzz?n|O_*Ab0$fc2yktRtOCMv^v>dwC%E z0-3)Ru)fGnJy<}p0qfnyAtVcaB3-%VFF0#?Q=q*)dZ0ae5*KRSi(SC7up(C(8V!ixScBqZI+=krAWUXqdk*GGc`#NJN?^l?30$+3vvhp|i;u{L zvV7#YAxz8~@&2fJ41H=4*Z|I3I)Npz%&Dx7ri$(m!+;l&;ARp`DTB~b@3Ckmp)Esj zShU)~TR>_MAeJZ{Vk8M;xJWqL>PU|6IGLd%QCnL2? zJh1)?Q*K04HX5enn&H3ks8!MIvQQ#{`-ynpzJ323&K9z@9h`}5QW6dp>Kq=mW~CBwB>^c2Xb=J#*k8}Q z{=AKQhxg8v-6VUzOgfNP$g2pVnd~MRK9i&~_Ea_n0hIW}0u!<}hVJjq6&d`HIHWzd za1KGi*K!v08R9i?Djuz+x=Hn%H8jsgzJk1!}^3lf~4EDLgt9$5;;X z3k}RMW2276Xi{)~D8j1oj$j(ALbbxW%1PfQkBkN-QwMc!q)zJM+Q_(F3eQg#82sW_ zCD9m?i_vR5o`d1Rb6jUCu^K$XQMO=aeW=;Ua@`0tK;?~8HY5jh8Iv3F7|!n;elLkD zl%Sf9xPXNbNkpfb-yv?hbOM*oz@-at>4kHQ;l}E1N3FwA-EdR@N7Yp{)$wpX_nt4? zNPFwc7BM{ab_i966YUpGvBi*c(>yq>kmjOT%B*bBjA}gH)S&Orjo^Zt=wMy&1jacV zZPQ+EJ9&!{=7lJ48cJ-OV|eS2$~5Ar(KxCIM>WrjCu!`D;|g)y1RQ6@aZ4(i^(!Ym z=x8x5VXfOlKNKPjG~rh64*fV@3j62`@+`VDj;DhaWGm*)2e1+al(3O#yK(wK-OV)C z!b;KEBI}OlR|3|58NmbL%|Etbhql#>236OdIw!g z@1%Fpb@Xn!p58+@(2aBx-AwPL_tE?519S`B$}VLq*k$Z;b_KhVUB&*!u4dP;m24He zmR-lLXE(4L*=lwZyLnDgI1=g}&zRhd2jfbyt3f9jJ^ruDo}QIrR#^f~T$RE1vl%^- zp_RG~GFTf&1&rXx;B`5phf%(HX%|ecGp$Vt3wj!Uux4%o>4PVo6M2X7#?Fo)fvXFO@V2HC*{o|ss@KOYgH)*M@C|*poGtW8Pa}1GK=O=#fR@mU=rVc@y#=#5Vi`B3(p9}4MHd*eq+;7=pdDilRdd2V)@MKwW`)EYaeSrYmPO~I>0)}I>b86dZD$zI?_7YT5O$cooX$&-e-N? zy4QNhddg3Wp~@XcFFFyUtrI(53^6OPqELnFR<6z7uxIW*Vu2h-)-Mwf6V@ZeUJT3 z`&;(+?Fa1twjZ${b+{bqjx0wX#}G%6W1^$jG1)Q2QRbNDsBqLc>K%=a2|8l?#`ahUd}$we$E`{VCMwqbmvUx z9B0Vc;Jn;jBpjt`}Udy54aebRBjbaeePLyRB}!+v#?@ z)7)L$-Q2z0{oNznD}dh$-Bq9-}{;O zu=gkL8O+S{#V%quv4_|bbG45+Mr;xni%Z32;&QwsSRq~~ZWDKiJH^MuC&VYkr^Q|3 zUdbfcC8y+;ypkmOC0Xhy4VOkph0-W#j5JOfFHMw+r3KPe(kkgX=>}=FbhC7ev{t%H zdQ93a?UCM;-jd#yK9;_cj!9>H8NTyj(eeL_+ciJ!bU4DD`4{@@{89fRf84*)f3ttBf2aRN|6c!o|GWP8{RjMC_`mZX54ZxI0-XbyfviB+ z!0wZM}AX&OMY8EAb%u(EFY17l20lo#iI06 za+Ew}fHFwQSB5IXl@UszGD;bvj8(=f6P03RvNA;}Q>H2Nl#7&=%C*Y%%8klR${OWX z<#uJQa+h+qa*wi6*{s~BJfLh<9#Xa`JCvQuF6BApYvr(VL^-Pbpd3?^i}B_ z(s!l5o_-+xX!b2_i>W%6h>YeIG>c{G*>gVbg>LK-O^{{$G zJ*xho9#fC2KdZm0C)LyH8I5RyX4b5lU2|$~&8tb8Uz4>oP1QPRowUwcrk163)w*jv zwO(2ut)G^o - - - 1050 - 10K549 - 851 - 1038.36 - 461.00 - - com.apple.InterfaceBuilder.CocoaPlugin - 851 - - - YES - - - - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - - - PluginDependencyRecalculationVersion - - - - YES - - VMSettingsController - - - FirstResponder - - - NSApplication - - - - 256 - - YES - - - 256 - {{145, 20}, {43, 22}} - - YES - - -1804468671 - 71304192 - 40 - - LucidaGrande - 13 - 1044 - - - YES - - 6 - System - textBackgroundColor - - 3 - MQA - - - - 6 - System - textColor - - 3 - MAA - - - - - - - 256 - {{193, 17}, {19, 27}} - - 1 - YES - - 917024 - 0 - - 1 - 40 - 1 - 10000 - 1 - YES - YES - - - - - 256 - {{17, 22}, {114, 17}} - - YES - - 67239424 - 272629760 - Volume Size (MB) - - - - 6 - System - controlColor - - 3 - MC42NjY2NjY2NjY3AA - - - - 6 - System - controlTextColor - - - - - - {229, 62} - - NSView - NSResponder - - - 13 - 2 - {{217, 242}, {580, 460}} - 1886912512 - Virtual Machine Settings - - NSWindow - - - View - - {1.79769e+308, 1.79769e+308} - {580, 460} - - - 256 - - YES - - - 274 - {{13, 59}, {554, 395}} - - - YES - - 1 - - - 256 - - YES - - - 258 - {{95, 50}, {327, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 258 - {{95, 78}, {327, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 256 - {{14, 52}, {77, 17}} - - YES - - 67239424 - 71303168 - Unix Root: - - - - - - - - - 256 - {{20, 80}, {71, 17}} - - YES - - 67239424 - 71303168 - ROM File: - - - - - - - - - 274 - - YES - - - 256 - - YES - - - 292 - {{10, 5}, {82, 32}} - - YES - - 67239424 - 134217728 - Add... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 293 - {{211, 5}, {94, 32}} - - YES - - 67239424 - 134217728 - Create... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 289 - {{417, 5}, {90, 32}} - - YES - - 67239424 - 134217728 - Remove - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 274 - - YES - - - 2304 - - YES - - - 256 - {468, 136} - - YES - - - 256 - {468, 17} - - - - - - 256 - {{469, 0}, {16, 17}} - - - - YES - - pathCol - 371 - 40 - 1000 - - 75628096 - 2048 - File - - LucidaGrande - 11 - 3100 - - - 3 - MC4zMzMzMzI5OQA - - - 6 - System - headerTextColor - - - - - 337772096 - 2048 - - - - 6 - System - controlBackgroundColor - - - - - - - - isCDROMcol - 64 - 10 - 3.4028234663852886e+38 - - 75628096 - 2048 - CDROM - - - 6 - System - headerColor - - - - - - 67239424 - 0 - - - - 1215058431 - 2 - - NSImage - NSSwitch - - - NSSwitch - - - - 200 - 25 - - 3 - YES - YES - - - - 3 - 2 - - - 6 - System - gridColor - - 3 - MC41AA - - - 17 - 312475648 - - - 2 - 4 - 15 - 0 - YES - 0 - - - {{1, 17}, {468, 136}} - - - - - 4 - - - - 256 - {{469, 17}, {15, 136}} - - - _doScroller: - 0.99350649350649356 - - - - -2147483392 - {{-100, -100}, {374, 15}} - - 1 - - _doScroller: - 0.99047620000000003 - - - - 2304 - - YES - - - {{1, 0}, {468, 17}} - - - - - 4 - - - - {{16, 42}, {485, 154}} - - - 18 - - - - - - QSAAAEEgAABBmAAAQZgAAA - - - {{2, 2}, {518, 209}} - - - - {{6, 123}, {522, 226}} - - {0, 0} - - 67239424 - 0 - Volumes - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 256 - {{14, 22}, {77, 17}} - - YES - - 67239424 - 71303168 - Boot From: - - - - - - - - - 256 - {{95, 18}, {94, 26}} - - YES - - 343014976 - 272630784 - Any - - - YES - - - 5 - YES - - YES - Any - CD-ROM - - - - - 274 - {13, 42} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - LucidaGrande - 12 - 16 - - - 3 - MC4zMzMzMzI5OQA - - - - - 338820672 - 1024 - CD-ROM - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 256 - {{390, 22}, {129, 18}} - - YES - - 67239424 - 0 - Disable CD-ROM - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{355, 17}, {22, 28}} - - YES - - -2146566624 - 0 - - 19 - 4 - 1024 - 1 - YES - - - - - 256 - {{309, 20}, {41, 22}} - - YES - - -1804468671 - 71304192 - 64 - - - YES - - - - - - - 256 - {{200, 20}, {104, 19}} - - YES - - 67239424 - 71303168 - RAM Size (MB): - - - - - - - - - 289 - {{425, 72}, {98, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 289 - {{425, 44}, {98, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - {{10, 33}, {534, 349}} - - - Setup - - - - - 2 - - - 256 - - YES - - - 266 - - YES - - - 256 - - YES - - - 270 - {{125, 20}, {218, 18}} - - YES - - -2080244224 - 0 - Enable QuickDraw Acceleration - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{206, 132}, {143, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - LucidaGrande - 13 - 16 - - - - - - 400 - 75 - - - Window - - 1048576 - 2147483647 - 1 - - NSImage - NSMenuCheckmark - - - NSImage - NSMenuMixedState - - _popUpItemAction: - 1 - - - YES - - - OtherViews - - - YES - - - - Fullscreen - - 1048576 - 2147483647 - - - _popUpItemAction: - 2 - - - - - 3 - YES - YES - 1 - - - - - 266 - {{206, 104}, {143, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - - - - - 400 - 75 - - - 30 Hz - - 1048576 - 2147483647 - 1 - - - _popUpItemAction: - - - YES - - - OtherViews - - - YES - - - 5 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 7.5 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 10 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 15 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - - 60 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - Dynamic - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 4 - 3 - YES - YES - 1 - - - - - 268 - {{118, 80}, {86, 17}} - - YES - - 67239424 - 71303168 - Width: - - - - - - - - - 268 - {{118, 52}, {86, 17}} - - YES - - 67239424 - 71303168 - Height: - - - - - - - - - 266 - {{209, 76}, {140, 26}} - - YES - - 343014976 - 272630784 - 800 - - - YES - - - 5 - YES - - YES - 512 - 640 - 800 - 1024 - Maximum - - - - - 274 - {13, 105} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - - 3 - MC4zMzMzMzI5OQA - - - - - 1412562496 - 1024 - 800 - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 266 - {{209, 48}, {140, 26}} - - YES - - 343014976 - 272630784 - 600 - - - YES - - - 5 - YES - - YES - 384 - 480 - 600 - 768 - Maximum - - - - - 274 - {13, 105} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - - 3 - MC4zMzMzMzI5OQA - - - - - 1412562496 - 1024 - 600 - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 268 - {{118, 136}, {86, 19}} - - YES - - 67239424 - 71303168 - Video Type: - - - - - - - - - 268 - {{112, 108}, {92, 19}} - - YES - - 67239424 - 71303168 - Refresh Rate: - - - - - - - - {{2, 2}, {518, 177}} - - - - {{6, 155}, {522, 194}} - - {0, 0} - - 67239424 - 0 - Video Settings - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 264 - {{15, 96}, {172, 18}} - - YES - - 67239424 - 0 - Disable Audio Output - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{118, 59}, {379, 22}} - - YES - - -1804468671 - 272630784 - /dev/dsp - - - YES - - - - - - - 266 - {{118, 29}, {379, 22}} - - YES - - -1804468671 - 272630784 - /dev/mixer - - - YES - - - - - - - 264 - {{14, 61}, {99, 17}} - - YES - - 67239424 - 71303168 - Output Device: - - - - - - - - - 264 - {{14, 31}, {99, 17}} - - YES - - 67239424 - 71303168 - Mixer Device: - - - - - - - - {{2, 2}, {518, 134}} - - - - {{6, 0}, {522, 151}} - - {0, 0} - - 67239424 - 0 - Audio Settings - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - {{10, 33}, {534, 349}} - - Audio / Video - - - - - Item 4 - - - 256 - - YES - - - 266 - - YES - - - 256 - - YES - - - 256 - {{13, 75}, {130, 17}} - - YES - - 70385217 - 71304192 - Modem Port Device: - - - - - - - - - 256 - {{18, 43}, {125, 17}} - - YES - - 70385217 - 71304192 - Printer Port Device: - - - - - - - - - 256 - {{18, 13}, {126, 17}} - - YES - - 70385217 - 71304192 - Ethernet Interface: - - - - - - - - - 266 - {{146, 73}, {351, 22}} - - YES - - -1804468671 - 4195328 - - - - YES - - - - - - - 266 - {{146, 41}, {351, 22}} - - YES - - -1804468671 - 4195328 - - - - YES - - - - - - - 266 - {{146, 10}, {351, 22}} - - YES - - -1804468671 - 4195328 - slirp - - - YES - - - - - - {{2, 2}, {518, 106}} - - - - {{6, 4}, {522, 123}} - - {0, 0} - - 67239424 - 0 - Serial/Network - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 256 - {{15, 51}, {150, 18}} - - YES - - -2080244224 - 0 - Enable JIT Compiler - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{15, 11}, {333, 18}} - - YES - - 67239424 - 0 - Enable built-in 68k DR Emulator (EXPERIMENTAL) - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{15, 31}, {236, 18}} - - YES - - 67239424 - 0 - Allow Emulated CPU to Idle - - - 1211912703 - 2 - - - - 200 - 25 - - - - - 265 - {{269, 51}, {220, 18}} - - YES - - 67239424 - 0 - Ignore Illegal Instructions - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 265 - {{269, 31}, {220, 18}} - - YES - - 67239424 - 0 - Ignore Illegal Memory Accesses - - - 1211912703 - 2 - - - - - 200 - 25 - - - - {{2, 2}, {518, 77}} - - - - {{6, 255}, {522, 94}} - - {0, 0} - - 67239424 - 0 - CPU Options - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 256 - {{22, 70}, {142, 18}} - - YES - - 67239424 - 0 - Use Raw Keycodes: - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{170, 69}, {239, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 256 - {{14, 43}, {151, 17}} - - YES - - 67239424 - 71303168 - Mouse Wheel Function: - - - - - - - - - 256 - {{66, 15}, {99, 17}} - - YES - - 67239424 - 71303168 - Lines to Scroll: - - - - - - - - - 256 - {{170, 13}, {29, 22}} - - YES - - -1804468671 - 272630784 - 3 - - - YES - - - - - - - 256 - {{167, 37}, {163, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - - - - - 400 - 75 - - - Page Up/Down - - 1048576 - 2147483647 - 1 - - - _popUpItemAction: - - - YES - - - OtherViews - - - YES - - - - Cursor Up/Down - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 3 - YES - YES - 1 - - - - - 256 - {{204, 10}, {19, 27}} - - YES - - 917024 - 0 - - 59 - 1 - YES - YES - - - - - 289 - {{411, 63}, {96, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 129 - - - 200 - 25 - - - - {{2, 2}, {518, 103}} - - - - {{6, 131}, {522, 120}} - - {0, 0} - - 67239424 - 0 - Mouse/Keyboard - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - {{10, 33}, {534, 349}} - - Miscellaneous - - - - - - - 0 - YES - YES - - YES - - - - - - 289 - {{374, 20}, {96, 32}} - - YES - - 67239424 - 134217728 - Cancel - - - -2038284033 - 129 - - - 200 - 25 - - - - - 289 - {{470, 20}, {96, 32}} - - YES - - 67239424 - 134217728 - Save - - - -2038284033 - 129 - - - 200 - 25 - - - - {580, 460} - - - {{0, 0}, {1440, 878}} - {580, 482} - {1.79769e+308, 1.79769e+308} - - - - 268 - - YES - - - 268 - {{18, 18}, {85, 18}} - - YES - - 67239424 - 0 - Is CDROM - - - 1211912703 - 2 - - - - - 200 - 25 - - - - {121, 54} - - NSView - - - - - YES - - - takeIntValueFrom: - - - - 282 - - - - initialFirstResponder - - - - 283 - - - - takeIntValueFrom: - - - - 291 - - - - takeIntValueFrom: - - - - 310 - - - - takeIntValueFrom: - - - - 311 - - - - takeIntValueFrom: - - - - 313 - - - - takeIntValueFrom: - - - - 314 - - - - window - - - - 318 - - - - bootFrom - - - - 319 - - - - disableCdrom - - - - 320 - - - - disableSound - - - - 321 - - - - dontUseCPUWhenIdle - - - - 322 - - - - enable68kDREmulator - - - - 323 - - - - enableJIT - - - - 324 - - - - unixRoot - - - - 325 - - - - romFile - - - - 326 - - - - browseForROMFileClicked: - - - - 327 - - - - addDisk: - - - - 328 - - - - createDisk: - - - - 329 - - - - removeDisk: - - - - 330 - - - - useRawKeyCodesClicked: - - - - 331 - - - - rawKeyCodes - - - - 332 - - - - useRawKeyCodes - - - - 333 - - - - modemPort - - - - 334 - - - - mouseWheel - - - - 335 - - - - printerPort - - - - 336 - - - - ramSize - - - - 337 - - - - ramSizeStepper - - - - 338 - - - - mixDevice - - - - 339 - - - - outDevice - - - - 340 - - - - qdAccel - - - - 341 - - - - height - - - - 342 - - - - width - - - - 343 - - - - videoType - - - - 344 - - - - refreshRate - - - - 345 - - - - scrollLines - - - - 346 - - - - scrollLinesStepper - - - - 347 - - - - ignoreIllegalMemoryAccesses - - - - 348 - - - - ethernetInterface - - - - 349 - - - - diskSaveSizeField - - - - 351 - - - - diskSaveSize - - - - 353 - - - - delegate - - - - 355 - - - - disks - - - - 368 - - - - browseForUnixRootClicked: - - - - 369 - - - - ignoreIllegalInstructions - - - - 372 - - - - saveChanges: - - - - 373 - - - - cancelEdit: - - - - 374 - - - - browseForKeyCodesFileClicked: - - - - 378 - - - - browseRawKeyCodesButton - - - - 379 - - - - isCDROM - - - - 383 - - - - isCDROMcheckbox - - - - 384 - - - - - YES - - 0 - - YES - - - - - - -2 - - - File's Owner - - - -1 - - - First Responder - - - -3 - - - Application - - - 141 - - - YES - - - - - - DiskSize - - - 142 - - - YES - - - - PrefsWindow - - - 143 - - - YES - - - - - - - - 144 - - - YES - - - - - - - - 145 - - - YES - - - - - - 147 - - - YES - - - - - - 148 - - - YES - - - - - - - 157 - - - YES - - - - - - - - - - - - - - 230 - - - YES - - - - - - - - - - - - - - - - - - 231 - - - YES - - - - - - 232 - - - YES - - - - - - 233 - - - YES - - - - - - 234 - - - YES - - - - - - 235 - - - YES - - - - - - 236 - - - YES - - - - - - 237 - - - YES - - - - - - 238 - - - YES - - - - - - 239 - - - YES - - - - - - 240 - - - YES - - - - - - - - - 241 - - - YES - - - - - - 242 - - - YES - - - - - - 243 - - - - - 244 - - - - - 245 - - - YES - - - - - - 246 - - - YES - - - - - - 247 - - - YES - - - - - - 248 - - - YES - - - - - - - - - 249 - - - - - 250 - - - - - 251 - - - YES - - - - - - - 252 - - - YES - - - - - - 253 - - - - - 254 - - - - - 255 - - - - - 256 - - - - - 257 - - - - - 258 - - - - - 259 - - - - - 260 - - - - - 261 - - - - - 262 - - - - - 263 - - - - - 264 - - - - - 265 - - - - - 266 - - - YES - - - - - - 267 - - - YES - - - - - - 268 - - - YES - - - - - - 269 - - - - - 270 - - - - - 271 - - - - - 358 - - - YES - - - - - - 359 - - - YES - - - - - - - - 360 - - - YES - - - - - - 361 - - - - - 362 - - - YES - - - - - - 363 - - - - - 364 - - - YES - - - - - - 365 - - - - - 195 - - - YES - - - - - - - - - - 192 - - - YES - - - - - - 370 - - - YES - - - - - - 190 - - - YES - - - - - - 193 - - - YES - - - - - - 191 - - - YES - - - - - - 228 - - - - - 226 - - - - - 229 - - - - - 371 - - - - - 227 - - - - - 194 - - - YES - - - - - - - - - - - 214 - - - YES - - - - - - 225 - - - - - 215 - - - YES - - - - - - 224 - - - - - 216 - - - YES - - - - - - 223 - - - - - 217 - - - YES - - - - - - 222 - - - - - 218 - - - YES - - - - - - 221 - - - - - 219 - - - YES - - - - - - 220 - - - - - 203 - - - YES - - - - - - - - - - - - - 196 - - - YES - - - - - - 197 - - - YES - - - - - - 198 - - - YES - - - - - - 199 - - - YES - - - - - - 200 - - - YES - - - - - - 201 - - - YES - - - - - - 202 - - - YES - - - - - - 204 - - - - - 205 - - - YES - - - - - - 206 - - - YES - - - - - - - 207 - - - - - 208 - - - - - 209 - - - - - 210 - - - - - 211 - - - - - 212 - - - - - 213 - - - - - 150 - - - YES - - - - - - - - - - 158 - - - YES - - - - - - 161 - - - YES - - - - - - 164 - - - YES - - - - - - 159 - - - YES - - - - - - 160 - - - YES - - - - - - 169 - - - - - 170 - - - - - 165 - - - - - 168 - - - - - 171 - - - - - 153 - - - YES - - - - - - 182 - - - - - 151 - - - YES - - - - - - 184 - - - YES - - - - - - 185 - - - YES - - - - - - - 187 - - - - - 186 - - - - - 156 - - - YES - - - - - - 172 - - - YES - - - - - - 173 - - - YES - - - - - - - - - - - - 179 - - - - - 178 - - - - - 177 - - - - - 176 - - - - - 175 - - - - - 174 - - - - - 152 - - - YES - - - - - - 183 - - - - - 162 - - - YES - - - - - - 167 - - - - - 154 - - - YES - - - - - - 181 - - - - - 149 - - - YES - - - - - - 188 - - - - - 155 - - - YES - - - - - - 180 - - - - - 163 - - - YES - - - - - - 166 - - - - - 375 - - - - - 376 - - - YES - - - - - - 377 - - - - - 380 - - - YES - - - - IsCDROM - - - 381 - - - YES - - - - - - 382 - - - - - 388 - - - YES - - - - - - 390 - - - - - 391 - - - - - - - YES - - YES - -3.IBPluginDependency - 141.IBEditorWindowLastContentRect - 141.IBPluginDependency - 141.ImportedFromIB2 - 142.IBEditorWindowLastContentRect - 142.IBPluginDependency - 142.IBWindowTemplateEditedContentRect - 142.ImportedFromIB2 - 142.NSWindowTemplate.visibleAtLaunch - 142.windowTemplate.hasMinSize - 142.windowTemplate.minSize - 143.IBPluginDependency - 143.ImportedFromIB2 - 144.IBPluginDependency - 144.ImportedFromIB2 - 145.IBPluginDependency - 145.ImportedFromIB2 - 147.IBPluginDependency - 147.ImportedFromIB2 - 148.IBPluginDependency - 148.ImportedFromIB2 - 149.IBPluginDependency - 149.ImportedFromIB2 - 150.IBPluginDependency - 150.ImportedFromIB2 - 151.IBPluginDependency - 151.ImportedFromIB2 - 152.IBPluginDependency - 152.ImportedFromIB2 - 153.IBPluginDependency - 153.ImportedFromIB2 - 154.IBPluginDependency - 154.ImportedFromIB2 - 155.IBPluginDependency - 155.ImportedFromIB2 - 156.IBPluginDependency - 156.ImportedFromIB2 - 157.IBPluginDependency - 157.ImportedFromIB2 - 158.IBPluginDependency - 158.ImportedFromIB2 - 159.IBPluginDependency - 159.ImportedFromIB2 - 160.IBPluginDependency - 160.ImportedFromIB2 - 161.IBPluginDependency - 161.ImportedFromIB2 - 162.IBPluginDependency - 162.ImportedFromIB2 - 163.IBPluginDependency - 163.ImportedFromIB2 - 164.IBPluginDependency - 164.ImportedFromIB2 - 165.IBPluginDependency - 166.IBPluginDependency - 167.IBPluginDependency - 168.IBPluginDependency - 169.IBPluginDependency - 170.IBPluginDependency - 171.IBPluginDependency - 172.IBPluginDependency - 173.IBEditorWindowLastContentRect - 173.IBPluginDependency - 173.ImportedFromIB2 - 174.IBPluginDependency - 174.ImportedFromIB2 - 175.IBPluginDependency - 175.ImportedFromIB2 - 176.IBPluginDependency - 176.ImportedFromIB2 - 177.IBPluginDependency - 177.ImportedFromIB2 - 178.IBPluginDependency - 178.ImportedFromIB2 - 179.IBPluginDependency - 179.ImportedFromIB2 - 180.IBPluginDependency - 181.IBPluginDependency - 182.IBPluginDependency - 183.IBPluginDependency - 184.IBPluginDependency - 185.IBEditorWindowLastContentRect - 185.IBPluginDependency - 185.ImportedFromIB2 - 186.IBPluginDependency - 186.ImportedFromIB2 - 187.IBPluginDependency - 187.ImportedFromIB2 - 188.IBPluginDependency - 190.IBPluginDependency - 190.ImportedFromIB2 - 191.IBPluginDependency - 191.ImportedFromIB2 - 192.IBPluginDependency - 192.ImportedFromIB2 - 193.IBPluginDependency - 193.ImportedFromIB2 - 194.IBPluginDependency - 194.ImportedFromIB2 - 195.IBPluginDependency - 195.ImportedFromIB2 - 196.IBPluginDependency - 196.ImportedFromIB2 - 197.IBPluginDependency - 197.ImportedFromIB2 - 198.IBPluginDependency - 198.ImportedFromIB2 - 199.IBPluginDependency - 199.ImportedFromIB2 - 200.IBPluginDependency - 200.ImportedFromIB2 - 201.IBPluginDependency - 201.ImportedFromIB2 - 202.IBPluginDependency - 202.ImportedFromIB2 - 203.IBPluginDependency - 203.ImportedFromIB2 - 204.IBPluginDependency - 205.IBPluginDependency - 206.IBPluginDependency - 206.ImportedFromIB2 - 207.IBPluginDependency - 207.ImportedFromIB2 - 208.IBPluginDependency - 208.ImportedFromIB2 - 209.IBPluginDependency - 210.IBPluginDependency - 211.IBPluginDependency - 212.IBPluginDependency - 213.IBPluginDependency - 214.IBPluginDependency - 214.ImportedFromIB2 - 215.IBPluginDependency - 215.ImportedFromIB2 - 216.IBPluginDependency - 216.ImportedFromIB2 - 217.IBPluginDependency - 217.ImportedFromIB2 - 218.IBPluginDependency - 218.ImportedFromIB2 - 219.IBPluginDependency - 219.ImportedFromIB2 - 220.IBPluginDependency - 221.IBPluginDependency - 222.IBPluginDependency - 223.IBPluginDependency - 224.IBPluginDependency - 225.IBPluginDependency - 226.IBPluginDependency - 227.IBPluginDependency - 228.IBPluginDependency - 229.IBPluginDependency - 230.IBPluginDependency - 230.ImportedFromIB2 - 231.IBPluginDependency - 231.ImportedFromIB2 - 232.IBPluginDependency - 232.ImportedFromIB2 - 233.IBPluginDependency - 233.ImportedFromIB2 - 234.IBPluginDependency - 234.ImportedFromIB2 - 235.IBPluginDependency - 235.ImportedFromIB2 - 236.IBPluginDependency - 236.ImportedFromIB2 - 237.IBPluginDependency - 237.ImportedFromIB2 - 238.IBPluginDependency - 238.ImportedFromIB2 - 239.IBPluginDependency - 239.ImportedFromIB2 - 240.IBPluginDependency - 240.ImportedFromIB2 - 241.IBPluginDependency - 241.ImportedFromIB2 - 242.IBPluginDependency - 242.ImportedFromIB2 - 243.IBPluginDependency - 244.IBPluginDependency - 245.IBPluginDependency - 245.ImportedFromIB2 - 246.IBPluginDependency - 246.ImportedFromIB2 - 247.IBPluginDependency - 247.ImportedFromIB2 - 248.IBPluginDependency - 248.ImportedFromIB2 - 249.IBPluginDependency - 249.IBShouldRemoveOnLegacySave - 250.IBPluginDependency - 250.IBShouldRemoveOnLegacySave - 251.IBPluginDependency - 251.ImportedFromIB2 - 252.IBPluginDependency - 252.ImportedFromIB2 - 253.IBPluginDependency - 253.IBShouldRemoveOnLegacySave - 254.IBPluginDependency - 255.IBPluginDependency - 256.IBPluginDependency - 257.IBPluginDependency - 258.IBPluginDependency - 259.IBPluginDependency - 260.IBPluginDependency - 261.IBPluginDependency - 262.IBPluginDependency - 263.IBPluginDependency - 264.IBPluginDependency - 265.IBPluginDependency - 266.IBPluginDependency - 266.ImportedFromIB2 - 267.IBPluginDependency - 267.ImportedFromIB2 - 268.IBPluginDependency - 268.ImportedFromIB2 - 269.IBPluginDependency - 270.IBPluginDependency - 271.IBPluginDependency - 358.IBPluginDependency - 359.IBPluginDependency - 360.IBPluginDependency - 361.IBPluginDependency - 362.IBPluginDependency - 363.IBPluginDependency - 364.IBPluginDependency - 364.ImportedFromIB2 - 365.IBPluginDependency - 370.IBPluginDependency - 370.ImportedFromIB2 - 371.IBPluginDependency - 375.IBPluginDependency - 375.ImportedFromIB2 - 376.IBPluginDependency - 377.IBPluginDependency - 380.IBEditorWindowLastContentRect - 380.IBPluginDependency - 381.IBPluginDependency - 382.IBPluginDependency - 388.IBPluginDependency - 390.IBPluginDependency - 391.IBPluginDependency - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - {{899, 941}, {229, 62}} - com.apple.InterfaceBuilder.CocoaPlugin - - {{739, 322}, {580, 460}} - com.apple.InterfaceBuilder.CocoaPlugin - {{739, 322}, {580, 460}} - - - - {580, 460} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{601, 517}, {143, 143}} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{196, 720}, {138, 43}} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{705, 948}, {121, 54}} - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - - - YES - - - YES - - - - - YES - - - YES - - - - 391 - - - - YES - - VMSettingsController - NSWindowController - - YES - - YES - addDisk: - browseForKeyCodesFileClicked: - browseForROMFileClicked: - browseForUnixRootClicked: - cancelEdit: - createDisk: - removeDisk: - saveChanges: - useRawKeyCodesClicked: - - - YES - id - id - id - id - id - id - id - id - id - - - - YES - - YES - addDisk: - browseForKeyCodesFileClicked: - browseForROMFileClicked: - browseForUnixRootClicked: - cancelEdit: - createDisk: - removeDisk: - saveChanges: - useRawKeyCodesClicked: - - - YES - - addDisk: - id - - - browseForKeyCodesFileClicked: - id - - - browseForROMFileClicked: - id - - - browseForUnixRootClicked: - id - - - cancelEdit: - id - - - createDisk: - id - - - removeDisk: - id - - - saveChanges: - id - - - useRawKeyCodesClicked: - id - - - - - YES - - YES - bootFrom - browseRawKeyCodesButton - disableCdrom - disableSound - diskSaveSize - diskSaveSizeField - disks - dontUseCPUWhenIdle - enable68kDREmulator - enableJIT - ethernetInterface - height - ignoreIllegalInstructions - ignoreIllegalMemoryAccesses - isCDROM - isCDROMcheckbox - mixDevice - modemPort - mouseWheel - outDevice - printerPort - qdAccel - ramSize - ramSizeStepper - rawKeyCodes - refreshRate - romFile - scrollLines - scrollLinesStepper - unixRoot - useRawKeyCodes - videoType - width - - - YES - NSComboBox - NSButton - NSButton - NSButton - NSView - NSTextField - NSTableView - NSButton - NSButton - NSButton - NSTextField - NSComboBox - NSButton - NSButton - NSView - NSButton - NSTextField - NSTextField - NSPopUpButton - NSTextField - NSTextField - NSButton - NSTextField - NSStepper - NSTextField - NSPopUpButton - NSTextField - NSTextField - NSStepper - NSTextField - NSButton - NSPopUpButton - NSComboBox - - - - YES - - YES - bootFrom - browseRawKeyCodesButton - disableCdrom - disableSound - diskSaveSize - diskSaveSizeField - disks - dontUseCPUWhenIdle - enable68kDREmulator - enableJIT - ethernetInterface - height - ignoreIllegalInstructions - ignoreIllegalMemoryAccesses - isCDROM - isCDROMcheckbox - mixDevice - modemPort - mouseWheel - outDevice - printerPort - qdAccel - ramSize - ramSizeStepper - rawKeyCodes - refreshRate - romFile - scrollLines - scrollLinesStepper - unixRoot - useRawKeyCodes - videoType - width - - - YES - - bootFrom - NSComboBox - - - browseRawKeyCodesButton - NSButton - - - disableCdrom - NSButton - - - disableSound - NSButton - - - diskSaveSize - NSView - - - diskSaveSizeField - NSTextField - - - disks - NSTableView - - - dontUseCPUWhenIdle - NSButton - - - enable68kDREmulator - NSButton - - - enableJIT - NSButton - - - ethernetInterface - NSTextField - - - height - NSComboBox - - - ignoreIllegalInstructions - NSButton - - - ignoreIllegalMemoryAccesses - NSButton - - - isCDROM - NSView - - - isCDROMcheckbox - NSButton - - - mixDevice - NSTextField - - - modemPort - NSTextField - - - mouseWheel - NSPopUpButton - - - outDevice - NSTextField - - - printerPort - NSTextField - - - qdAccel - NSButton - - - ramSize - NSTextField - - - ramSizeStepper - NSStepper - - - rawKeyCodes - NSTextField - - - refreshRate - NSPopUpButton - - - romFile - NSTextField - - - scrollLines - NSTextField - - - scrollLinesStepper - NSStepper - - - unixRoot - NSTextField - - - useRawKeyCodes - NSButton - - - videoType - NSPopUpButton - - - width - NSComboBox - - - - - IBProjectSource - Launcher/VMSettingsController.h - - - - - 0 - IBCocoaFramework - - com.apple.InterfaceBuilder.CocoaPlugin.macosx - - - - com.apple.InterfaceBuilder.CocoaPlugin.macosx - - - - com.apple.InterfaceBuilder.CocoaPlugin.InterfaceBuilder3 - - - YES - ../../SheepShaver.xcodeproj - 3 - - YES - - YES - NSMenuCheckmark - NSMenuMixedState - NSSwitch - - - YES - {9, 8} - {7, 2} - {15, 15} - - - - diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib deleted file mode 100755 index b27171c4a97d2a2cd2d63e32abc20b9d5d0c5c32..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 43067 zcmbq+2YeL8_xP0E+j6u^?4N zrHUwu9Z_sx0R#aR>X=$G# zj0mDgLNaohEzFj~noRapR2G$$4r@|2?iOD`Rpsy|`4t5dir{i?ld7`vaD?Zq*kIC6 zk%Clo6-q}Lr~~SVu0>tZ6f_IniynkK525GLHnbDHirzr)qYu!B=o9ogI)o0Rqv$v~ zfqp;=_QHqZNOTc5!&l*S+zxlb*Ww;H8|UC$JQR<_V{id3#N+V8TeLg;XCm? z_LR*K8WOkxpE=8(DMZnB1K zCC`&r$Zqm3`G9;%ek4DUljIL_fn206s?ad%rI9p>CefDkN}562(hjsE;6kCj=nb?V z9Y}}KvGgWdOiO4ft)w&Pt#lrpPZ!Wd^g;R%T}#)|C+V~FdHOPag}y^~(|75I^mF

X^=En%8`aiH%a+Y zsZ=JFOV!Z&HtBY0fpoX@kn}M8S}r{zJt3`>)=3+rjnYff4(Vm-b?IH{J?T^FGwBQI zYv~*5oQz~DN6GPWf}A3!%1z{^ax=N5+*(eTuaU2nuampVz2zI^e)2$hm^@rAkPBs> ze2ZKmSIRTx+vM5u0{L$FA^Bl>xx7MtN`6}2DnBo8lXu8($#2Ua${)#}%7^7I{{k}+_l2>v}?WV8P_J)i>{YkZ@Auc?RM>T?Q$I3-bOuC!8GD_1FLN;{>C(pBlEbXWQ)1C>F_Smh>Vf>Na1 zqD(}JV!?+icPjTP4=4{Qk0@)Eb;^^PB^w zx>bEueNBB`eM|jN{Yd>p{Z#!-J)j;`52=UMFV*Af3H5vRC-o2YPxYdDNmDgV3)dpF zL@i0XQoBlPuVraHwBA}Dt*S7{MrdO+pLVlWtWDBx)hz99?S5^k_L%m#woZFe z+oWyQUeb1GZ)tC9A7~$H`?UkwLG26eEA4CTgmy~%Lp!fax~v3Rpfqkg^KQy-}3>Z5g^ezRVtm+MpYY5MK@Y<+=#x4u+=KwqXms6Vc+ z&{yft>6`VJ^d0)k`kVS&`aAkQ{d4^*{RjO={j~mveqO)ecDWU|>ek%MZMq}fQAlw| zyW`!B-A&x-?hJQl_ciXm?i=80KlhF9{_bq|AopPRQ1>wRX!jU*fxFN>!Cm4mbyvEl zx@Wp?ch7d;<(}tW=)Tu|zk8|sVfW+i)$TR!r`_w_8{M1S+uSdN4G0??mJ>E4>=(}* zBgIHH8W~p@jg2NoQ=^&D+-PC6G_EvS8Lf@0j5fyAMw*dsWEgFYOrxFA-pDdK7#)pH zMrY$1<67f7<9efu(bec?bT@h!J&j&QZ=;XV*SNvxXWVG?H?oZZ#z13`G1$m4a*ZKI zo-x!IW(+q*7$c2Q#%N=VG1j=r$T!9r1xBIaGj2A<8xxEo;}&D0QEZeLrAC=iZcH*N zj7p=*s5T}WQ;ey`G-J9k!?@L$Y20SaGAx4|w;QvKJB&MxImTS$E@PfC-&kPWZQNrl zH10JP8TT2BjU~qY#!}+}W0~=w@sRPbvD|pXc+_~zc-&ZFJYlRfRvD{}HO5+Fo$;jc zl<~B&-gw4%)_Bg?U~Dut8JmqQ##ZBbW4p1#JD26KTsDN|v7u}j8_q_sk!%zj&Bm~? z>?W4a#<2oc$b9T(Hl9sjMeG(fkrlHNR?5m)Ih({PSS71s)oe1G!ltrmY&x64Ze=ss zZEO~^7-zS$+3XH>C!53Ovb)$kHlHnEce8ugLUu1(#O`B@*%Ed?Tgo0_%h-eLA@(p^ z&K_Zpvd7rtYz2FQtz@g%YPN>0W$W0J>?!s%ThE?h&$8#(2DXuHVw>3(wv|24wy_u3 zcJ?BBiS1x7vsc(o_9}agz0TfXZ?d=8+iVwmhwWzXviH~?_CEW7eaJpyAG5t|ANz!T z%06SCv;FJ?AwI zeq+D0)9erSCp*LbVt=!<>>qZHoo5%=MRv(VCN_ylP05r^m#LVlshPUzHp5JhX_#J< znWhf=oRMZGvff}PGs3~fOnxht|CAt!|LaoQLnCzUc1qHs! z%A#>a#YI)q1{4)m_VZ1v9LrdCPF@jQF7^#ADlIIVQaL(1XMkfzI1RknIo*r%D=U4K zdHKcFzRHo=IlU_KOMFwxDkkP-=L{|@s~XGVLiF!6hwl83i|$52=Pm#%8LS4nk5kI2i_=d`Jdab^QaQPWlZl*uY#~mH_W}CbpsP_D z;J}`g=**HVI+jJ|_0REDRTY(vuY|#?D$0tBeHHsqTa<~~q4p!3nU+HHVa``y$F;f!$|x*ky5zq%?P z77_qig|0(gP}Y#_9Qffp*$s8Kk~Xlms0ZqadZFH^59*6g5-s6Wa^1JFP;2n|L# zC>ISud1xpahK8dNXe1hiMx!xkEV>Ehqj9JJ6(S$H8I4C1P!YNXO+>}01eKyPRE{R0 z3RH=zP&JxtX;vqzhc(C=W>r~}t!36@)@ti%Ym>Fx`q28+I%<7oeP{j5vBa^?v6tg0 zjuSXe<+v%w-8t^VaW=;}91r7o496uL-_A)NPHy1jMotEBGKiDGoaAtl%Sj$5!#Eki z$tX@nb25gLn>ZQAN#Un}v#DqrnvQ0mThUCEIy5`y#{6-n$dpd%p>Swv>ZKx9z~C#$I%M(1X_t!q19*&473)lLrYyr~{JmM>@^0T>Mmpqsibe}7b8u$(v>t0q|Rsq-sq?VUe zRKcS?e8s-;`BlEL%!D5m`BN&pmnh|^1=cq zTd@|ibj@mSMdWlXohIny1+*Q#h+aZF(97r*SWUs(@SmKb={{Jko9#JU;g;FB%azFf zXG)QyZmcdSD$MU)kq?XNaN=v|b$Ck1oR#P`l=T^U6Z(D&y^VIEchGM1E_x5`5yB0y zSzI<=3?h&!W+}c4{E6>5<@p6ZAT4JGkyeZq#avc&Ue2^iK=oJ_Q3bfEH_=aEptsRS zFvwoC51t)5p{UAd#W30}9XYUliarbUxe|Ta5V(T?+!vM@EzXJu5mewvvfRKr1dnjU zis_aH{R*Mf4Si)Ltpo!42C$o$*S*J8g9r3?hWr+N2ZGKon7UR}p^{Q?yEEA+VZ7qtoaQV8=hv8T1!0#^1n(|Dbc|Ji34` zqD$b5A~X*ZOtFMz?1Jwqnu~Sp#$nK6E-YPce#LlS6=2!sQ?Z`5z5>)%my~v`t}3hW zRTfPL$(>U*tr+g5*km<+ytraZh5q@K6MMn>l$G9C24p;zH4dUvpg_B6kT~)86PumW z7pNS>N^!ARPw20YuW0-P0m|UADb9Bw?c9KnNW9Fz_NYJ^f&(3hpoiWSMTItXzzn0;fXUZUsfOESR7lX3TomLL&q8QXHNTE~{hcj%YFl4p1+F3^9 zE)Jn1t5M@FZJqBCm*C&Nn=Hh<@I<<1Wj5}jI=8GVtQ2k7jP$mxQ!_JW`Y8j4TS-sg z2&?fII0{FD>Ed)7JbaRofLa>CuhGw+_0gz@j zZQSKvXNHZtH1SWNNzK>&ATu8Yc^Pg?%eA;UP+AMz679jQaO-f1Uqn_j>q;xyYGJj6 zx#BkXYMchE*`~6p0!Fu*540HoXW+KB91ZAZ`|c{ZoN2539Q$`2`GY&)j*g&d;XuV$ z5aZ!%teAdjZQ6=|867)1oQ+u`E_Y!!_1o2{50X>Hme5Q$X*{p5_<$r-5#-(p+R-OEbG zmDvLd6}A>n#KpKogrx-j!P2gKAGo-tEl`f%ZUn6R^Z9BcJVilf=XW5{@y_%~*HW+GkT7@6R%kd-lQT!Nw9It@?t;DnOYP1or z#p`S-InY;8R90A2V2jns`ND4OR$Wz9R_Zr_B7`6X84q@(PpqG?X>6_nAExJ|>LPdq zE;)vjzbmj`@~6Ra1@)7`;=(0-5!u3Z&h1?;g$t2tb%Fm~518s|F>qn|@NN|#v3+gY zwDF6U_4pZBXQv-Q4y*Bc{49R%-&kTJ-URx>d1MXV7+85w9pmiI2j@=#$h(&n`YN49 z!K?Q?-e#}fK&xj+6B)mRccA(B6}&*0$ePv5>g`yz-GpTe{61qw+m2~qlxB#9NzdqL zTdFgU1g{K!Q>+bs3uKM6I&b4$_#KeFVs+lbd+;{=fxSW>xxyf}c|ziv?I7e~Q}R&+zAXKdcb&pRNCe zVP@TE^|NjO6=HV`ILw(+R8=s+VTnWdu*2TAKNomxB|e0*glaf~kK$v%QTC&DX9KM4 zdR=^jkAqbgSQ@*fqv}`UZ(uyyf~8XK&{YBQ?9@$hVF89pOJ zh~)Odc89nXxsA*MTsSc*VUesRw>hSa;KhkK`ICKOkRWM9W|JhF7ps9<2^gHg?Q9b> zxbZwP-){VXHN_%FS!_ceklaHS*7||uUcV=J1{nM=^fy^V?jwuI67T}|0GTZ%58%CI z8F>&bBoCA2H|cL3UH+kWPL@UjAdD-eM&-V0t8CIAB|loyCi*?QdXKou92i`zgM&fTsh zRU-P`C(ssFeku#+c$+nq;}fS`pMx)eT+aZ;x~3vze;$PY!iVFhIo@oC=`z~` ztJ!KH9Sl^#@($DeOnwqHw_&2mXziI+dV?76$T%w3#+>%l%QCT>^ zT}%~ObHE3lXU($I2zTd+wo(Y*&QP@EHTKdqDEauww|D(;WavKz6eHn zC)lpP@Jeh}ali}sq-$w3je*HJ{wR2(jU4c%_$6cOL!rVCG#SmMsRBo|F>OMdqP?^k zZI0%`iubMTSy*H{dz!V_#@fQhy-!}cbPT3a6C<$hY20O?GdFESQDyfY5cVo)fH~TV zwx(D4F_&J0xqJPXTQtOeuKx7f!}RyqZs~ni^hjs&_Qe0yT&A69XL?P*?!qfzZnn8h zdj{EE#WmJ&7nqsf?y|{`_NIM+!fU+JHMDO)$pv2?A_RM7kT9qHX|^rQAGIC~VTaPe zG>7KWA$S4J)vSlDsyA2gg!- zmQ)vmUsssgec+JPsm{?^!9tsoHbTVLK zs)LCY))O_DsF_~6Jw1r-IMe(0<(^4zqq73bO=r_d{^hh&GrNtGz(^fe zT~u6kRZ(eb`wkORdkpr^x~w9#MbBXadk*f~zh`!C*Be`ccjB`%9?-1EUl)6yojvpPcHkn4h5h%LKTMa?M`~uif-dyWe2tj7 zZ9U%s4oI-;_awkoGy4et>~H9sn+m~@au8k>!<`AjrQm5jP1oDg+Gwp0HLVSFBi%$d zlV)_2W<6^?XFX$L9UOpX>XP<0Anon+MfmLCB-SQv%_eP)6SwUer)LU+wpBvgb`ZX} zjH^I*(pTwgbbTmS0SQ-O1Hc(@6^2w67gdylGWJzXfFOmh%8p~)47r8i8SbI)+cSK} z+8kT~P4{WmR_l3di~B+PSIpOc4k8ujCXxN{^wZ=vN@6zoGBb6C&6Mu-eHf>jgWl<4@{r1JGZ#lRBH7 zq)z*^G{1_ZC#|G4^c4LK`Z!Jhu(n$-THCCbtQ|RRJ7nf$c1X*~YTscf#FC3js!RUQ z*$BYRIeH$Qr#0CKx>v#yk*Fj|GTkdIP)U{7V(`eh>QQWQObQ>9obPKp;1b}3P_-Uei) zS#Jc{0Zkk=W;Ll%ZuRuPl#DJ)DNX=fYU~8S-vkvV0^o0nCbcHnOClq;l4d&)6&%W`oj85bkYrm{M*BX+-ZK!C|HwSEZ&=V9qfJWo0*9TS<2U#*iOvjM7+Sl2j!wucZ09YL5gM1imwu3b1i8Ch`U&loewKcbeuYV#l75p8 zNT)&R{E0S7e}S%?i_S~`p!0V4V_=2vW?w~xudrv~c#&D{?<=hqwHsja*8UJ_CrAi) zEe56(fjLM>iFS5A1nk~Q@qkDNiHqP!+adSLoGQB{1In}@t6w%{U|D66sH|cA98;|8 z#V+A4NNfm~v5WPabqdh*yJnrXn28r@8pjZL4=TZsE=rf`)LJm+S1~dH6>|vvDNC{} zeJ8u1b|730eeTB0mtvw*iI-%Yafl z*bc}Dw1GMGF9iuzT2ug;ckl)K19=wOt>C%bBFK4JXTuSL(A#P2Pgu);tS;fRAT4hF zW&QDq91Q^Ja*P}+i%4?-!eMYExZn;YJUf<{tXSxT zu-r%P3yT}n)mphvZ4zumNm+HJ4}3abaS&_E{bk#=9xoahX36mD=YQAA@;&lGxkf9?OJu)R zmTj#Z%75fILI77|)Fk;m$U)Ub1rtRbnr+X38)=sm4xLme4468U^r-xpGs}36qeEs; z<(2X(G+$mrn%Nmtj$=5Eb#kcVoE$17x7!Lg%AZoYyq_qqm!FZJl^+YWFe0VIah!l6 zurh<&XF}qoq+Uc{-Y&oBfSkf{VrYfuaO>pkdru0c0e9q3vxSQDcSlh1JZ{X z;N62S;3SP|QbyVGE>Kn%<=yg&@_X_gk|%#)uY*-5*#mGi?y|`7RvLE!AuRrhWRJf< zX^ejs{xnT6C-0T_Ig@F^p{$@`{ek?sydTe#4+1C811h_M&4_!O;FF|Kvd1jpJsapgk#{0-pF?I%e}k zbBK1&wM|H$WLFe2oOwmC7^MWo;G3YQEucpF`c-?VV5$Usj*B_xEy zn{nI|@pYFU;MyVW|8Fyx=qe5xpaKS{;<)SO z2k0`i$F$P?lA?l8#5fWx^$K6*gu!4|2T29jbk__=D)i>KM@WI}n&q<4eAn$YI;1DZ zy@Ws}Ajj-F9MB=6N<7QGY39h?b^MKc8{F@-_Q6tEPf=>`g0{M&XUH7|| zI^Y7e^bH}zTo1V(#`9c{_(kpw9QU(bBS+){py@*7rrR!@NKRkI=X5>cTIpKlT6#G^ zIlfVh9}u~N+K#NWYte5kD)j~DFKodjei3mmgdnfx=xogr0M~g66t5xLzZ9^~)Jx=*C_8TYk+3epe8%4b__K zZPzXb=Aj(th9-&kTzh~dKBysyAsi|zLy$x}C;a?xB=L#sQy__5m&3G>>bW(D9#&mi zG*#>n3MS#Bu44|oqdA6}od#uquH&u~faCA%GC+<&42*Pe426IWj=_Y;a!{Q4zZ4_6 zes=xh`ZW-NasBQ(=0spze}#&`a6C%DRb%Iw;Pa+JU0fkz0*J%v62|H+SKLY%UZEJ$Z>|f9 ziRLO1XrmHkD{ng%5Yj8>c${?#pys#$jGw|<&)lz`l>|`FhaJzGTvy*GRFafrum{d7 z5wf8Wp`w*0a)bhAz|DRMSSVC(v8 z0iLU3Dw!|^j*ILlK?q3OD_MAN5S-TnoY!+a@$zuqGNKo3$OA6)`AS1UHGFbWp|4ET z(g)Fk(o^Z>&;sYUG!!k|p!5S;=x--hI4^S zt1=T>%mt)yJk>6&m?DxU@Vh2!!tt~kv){HcoqY)ckLf_dR!!oBW2jo0(lB+R%!WX) zatFsVE|WV^<|@N*sxn_$pxiBTC(1(Tca}g~8ppT(U(zSaB6Lx?&q<#sOYQUt$1|P$ z3CFhu==#CB2^3}deLGoIL30DCc@>!G=Ux*z9`y?YbFb7ExsJFs=&shavQj)64poxRpDyeu*!Ti+yIlt`S~AZDBRIkB~LFI( zN-6|+a=~Qg_+Ad%2JkYDUxST+u(XK~2I2TEj(2nXeu#{as;U~AuexiDr$rp!=L9(X z_B8Ce6m^^J?6uDVG6-40shVoI8ljx4Tfr%H5p=W|z;YPXDjqQeY^GFUG<6CEO`@6v z(4^Erb3eyR>q8?FdL3*7DGLHbp`mH2HdC7`=R-mB0AMHp&2UIRr3$OQ(-HM*HLbSp zPEAL5su`lfT5YRlqKj%fwLSSt?Et`af(?lC@m{o0y;i+Wy&l*P_Nxf(2!bFNwn|o( z=T|rdzun3zU^|z%Wyig3`4C7Qh=L;#YZoD1=wiUlH&^a76# zZ2+^S4zyvv<6mH3Enr^-D0W~U-n{|}!^JL_0Qh%Z2K)u;-2nc=8t~V0yv_z6whZ|( z58!7Cx$J-sYw%y-->)uJA5fP8_zwa2%hf?P_>cb!_)iJ&pA_U_7mwu)hRo4qUjX)1 z0DFL_)`Cd|b*bNwAD|TXQBgArrJ|dmR8(kxA&k}M1mVuNKS}efQy+Q|w#ahyqx!rpw(VW(>NfQSvO#?jK0DNxMKvuj5^QNI0Pf>> zBgY%8S&gqh`QC?(u5Z=RF0$o#lc=+`%}={T)d|{)?H{7Fc;=|Fg=L_F?b8jMy>IFp z>YD&g;NlwfjX=d9#Cb%aZher@d36^6v>QI}IY8NVz*P^X&wDf;ZpUBRe@%(yGevwGwfJJJ3GuR z(ztmu0Om9(%C57WR6PO`^C<4Cenlm;)h_1e_!aAFj(1vft%#vc6@O(=Esgq}*b14N z)&`7p@z1}fTm3=(5q4{UfL*Qr;D8c})qhcc1;Ko(Mr*vz@f-EEhR|UUUjfu!UWc7g z|5E=}E{4(?ZwifS8=IiRx`Fyi6-nYyI!wbFLGv}K2Aa1y-c<)0z-5M5YbVQ*ZpTyr z=?!*8Xu9Us!c-axo_9d02jCeqxNHB~EfFDMiqfJ1rda>pHICoq_&ouW*nb#^nq`VC zQVoEdaHv zwKM=ZqXy&;IQ}ps$eDHu;C}(RgVs^&q;&?6ueCvzZIHYF3&!*N3B zIxNvvsEm)rSdZKO6zSRu8>=}OJn z0Tgtp;aK_FIIVzy%(S~E631XuAAr6ygn$c2cYu++NE?q9YelG)HjxtwriHM#L4JMV zmrq(LL?`G$e8#SbJpE-zbE?Le(kkgbwF3-01?|r^SNhm5I6diN3gOGrswl8T9Xv?$* zwK<^}6)d$Q0Y-(;4|t@V8Upczwi1S4?FZr;j*o``!m+?F55!a2)7pA%ZYUs502Ts3 z40VoX2m!@b?RkLW1wRzuar}J{6d<&0R0u^WEIomXkV5Na?G$J$lsi zW%OVt8v$|9DqknN3a*YyOwS5vSTX5#wz*}i!1RuwVe9EW?GU=C9majNBSE_FH=+A} z7rGBTfmCPa0Z%zd3u?#fYr+5GqwnxZn~xxuY4g!9+OIYrU9xiO^3flh0JjF52<>;^ zBVe|i03V$J>ka=PXG?3ef3$NJeycr@)yT{J3DXfQaZo8 z*xs(K=m<%IkQ}4CbVXOSe?l$ISr|94G-I6ov8hf8NJB!=O+6f7iS)yAj^pzUVQ~sU zFAqzc9!M+S+VjFP|kwDdLeIn7DqKkSn+*fZ= zOC$sXkq{z?WQ?;nI0S|0ZR%6VW%bZ#r<1E4a%&*<^-R5;-o94qx93FR#AOxdiJ(Sm zW{~LDJE6t;HK>(-9VZZ?^oxF?`iV#H3JMKM|3~6QoInHvwzD+-54zQR(@kmz0H7b* ztGB~@_5OOcpj#4WJtOFrC_?@VfZ%U@E#2yah5X-SJrfu@&q`XW57me1!=+c{33NRt zVVp2dBCYR5WzPBr#H)|hZ=##@aUfYX0jv-)GDKyN*wp-tBkw_TXW1;C-WIfbXzCrW zPtc3>p|#YT?%&GHi5EZ!Pz)rupd=5lDJp^jgwqhD3cV6Qs`i6qauQw-B+x*awv~}C zOtjD-P1k4Wx9a{tsSvxhAVmO5YC(z|=u|2F2T*tFa{#Ej{6Ix<65S9eCv%yeaXG!H z-=iroK21;m77nNthYBjOha;3AP6L-Cz+tx4=WrN!B@H<2A>gow zfx{jN;;;n4VTm?}<@hR!@{6y|_Em|K{(@w%zOp`t{TD5-p}96KKjo+8_4+e5EjO}6 zASZ~HlR3E}h?X}BTF$i|3efUakim2zokX*xj#3_M=Xo6VY`trJWP5yd6q2Klz&HWK zX9Ve^5b8*O1@N#F@bFp?9vTZgG!b|hDK>u%D7TLx3`WAP|0@#S#q(?=eBejINBYM$ z64I?}>LQ^TCmBIV_*5vOdDb-nBpk4ko^&0P_vwf9!>*;$0oMjR8xodKQp8CMPFjmZ zH|XvGR_BI%^o@QT&(ptkvhAcLCs)?Xwu2?^=Oa<`7n+ZL(tp-}(GS&N81h}%P~l62yvvmIi$BW4g`x8=JXSaCe>j(`B+L9>Eq z4C#P6ux5(#kpC6dYu(qmuXlH`VePIQwPEe;?(;9O0=U-(V9gaL9t34v?A3zNokE0; z_9mLNc2LOD}nXjZ=>^fcP9)Pm)rr2k)24(2nxhPdx z4?7JAl+!?tZdjrJIK<#KBOnK2w}BuxWISfWvKEy>J$`<1ucC^|+EXZNo^g+L--J?K z$2iI6q`&BRI83i@nF9nI3nuysov5GN=e`+wwNHT(NjiuK!hghZt#Aw!+#G-TW1wKH zTcGY`sXf*}5L6(rAp2I8KhX!8%|7SD4jcsocZ+MOYeV3HzVJ+)oAP5a>=Xvbp|@yA z=+wOl3828uM7SS(a~4WfCHv+OG3VWot#gh+g46yW?;+A2fmsJXb|*YGzSa)Wlah_h(y zb_3ybje_8zZh`Yvz@!uifP-pA1>brCsO5-#3#w6o@kSQd3@7%s*MW8&v^#3I%NOmg z9aRa$-hD!T>3FDj3GVP&09Upf76@?Phocm0P$m*rB5xH6XIoGzs3`%X&mvamu`H?P zu|V-_FuHAJ=icsybuHS!mco7x?tWRH0|^Tc@yU<5lSq>5ghohXdB1X=W}_wgajm~f zU3**)lhZDRu6H$2j<}l3r^q+%cK8RnQCq3z$uBDX4#bcs|+Q(>3+WFYhUea~s2l=et zPPw3+qm%SQBpLteY5{fs+w{ZQ^ZIbt4C#P6P#>lomFK|84qc^@+PyAI{z?56_EhcA z=Fo+54j9&p^l*jXGh_o~WOw4(TC{da`$xHGofM%RG9Ii^$mYPQJ+}y+Af2sIP(~%f ztZ+tEt%lnv*EO&$4Pr}U!P|husqlaB&vt>% zAlP#tB3Q(L_#T`rGQrN@6j|U=F0~feu}te-D6)l}gwKO@Bm9;3MODHVATU5cSpd(E zkivz4Uq|bA5xz03A8m00VXWP7cpLyxYVCm(3zP>7Pf6r_|FIqyCQ5-d1Zs7K3*XbW zn7#*78$_kBn^xG~(Y0cS!E8AFXfK4jpnlRWXnq4WuJsndsx`33!}g<^f;SCCO&p)L zX4#?2`4%YD_rTw`BLlAqGH!#e4jW{Fn3({9$FAk@8V|^IgCS%KfAoD=?n-eSs-NJ) zhWZKq06mCO_2KG3luA<2eB}u7xQ?lmBtZ@Pd^%FusULzff#*ZIdnuVOpQYR7v&v2= zKm7>^;wU~tA&hn!0$!ce9;eHq+EdUcY3zLB_+1h#{)kKw3fAj4c?Bm?09T>v?@68FU4X0VC`mj1M0g0Dq7 z71~0T6fjV0@HPlA2vLB7aK2!(gYb-K0A!UY{73QC`po8nLw3LS+EfQLS!k0b+=obZ zm;hmxfDfq1=9(oI*zZ8upV&|WNJ+piq$zX(i3egGu)jAI!KOoS0qCri&1*pVK(;`E z;%aBX&xgPlg4^H($O4$tqCe6UWWZp1cBkQ@X#cIfiaM{KKkmlNE2rMxq=;0B>R4up3o!TqZ6Amx2@uj>j`mhM#6 zyN-b~^`C;<<{=Q=Ai)36f?FRd=g@^haO2rRbSo!-S9jJE+(2sMLke!O83kl_Xu-YS z7Txs(H^^)ux<#lQG<863Lv_M`h;AXblmAO}gU}WX0MVh#iSF-(XD+x8gm)ScxRBe9 zquTfXAi5oX6Ovod@c*~yw)sy10WKKfyb#txcmwYV#sNNfua4;MlLJdb)F^E~cZ;d#Qd(zD95 z+Ox*9*0av@q~|Hm)1LL7XFSh(p7U(*Z1imMZ1!yNZ1p_v+2(n{v)%Ke=Oxb$&&!@y zJUczFdS3Iq?s>!Wrspls+n!yXcRag2?|RPhtP9||u!AT{DKq{%` zWHKjHIGM`HG)|^-GJ}&_Iho1HZJdDcwK(CN+|CIImOD7P6W-*+$y`og73P6*;A8vXPTboPapq!pT-np66s6Cogca zof9xkU*cp3CogmI3MV@`d6kpbIC-6uH#m8dleai|o0DCfyu-B$H^z0e9FmZaI6_8`#Axj4~EefoPhW}%*mIW9O2|BC&xGxHj%G6 z`G%9@oSfhUr1^K8e9y@boczeiPn`VB$uFGz%E?JiPI2-ZC%?7F1R%h^=MI+Y)*3()vtE;{G68~m z*HT;9<(Hc)pTuVL0Z)5815(5ok7>&x(m1+ycPmo5V~zJbX#Z_9(1*ZeTorW zjDxYoX}$Kz{i!Vi2VImE!#z`M0Z(;cvbXrvyJl}kgKLokt1Bl2$hw6Sf2!Bi-uDI9 z;zRL3P2YjHTKMCLz6v1NAfO#u2tXcQhmJ%f3HnbBT2dfsdu|Rootz#tiEGfKKR4ZS zlyH}uSEde_0%ukZ_iqcjDjg2x*=cH51T@xMs+6T zmjJ;BYPB5N*Etk#WKc_3DqCU%#nqv&Yl2$TNR$8ZXfk-*S^XBZhZ(@N2%92;uU#cx zNn#IPFT)J2!-MF@*&GQMW9txeZDB6ls!K;Th-=nh!9pdIT8{BAm@NyhN*_`CRQ;Zv zdO|T^5VZsjhJnl8+U0HmhhDWDU598#)pjf?RF*X_)zI>92ZkATi zgNUJa>kmvcKIlf>b1mRzLW3Cw3-AVWYFA&wbqk#D-ZD?f?yE9_SFbGy>0k=D{P|G; z$(5IHS?}znmce5Py;Mt1j`R>T1>xzSd5dkga4DvaAgzTR0>^cDxrSCpiqmH*9rA$X z3<9yCUL6yJ$`(Q&G^AYn{0lfU$X5Zk6Y4BEL~@#JWYmUSMkcZ^r?!DIknM4z&XqUn$ffXyy}a$tv$0m4o}%k9?`|EqK# zZA&G8MJ$X{cdhG`oCqlFrK%(KVfe;%5F6UI8S0nGp#AF1`ZB878OSj>{2RGp_^4pQ z4II$|*W-icAL!6|>j2!WE2ctd+N7Xf9k#4X8;$BrFO+2+%;ta(ZyhZm$fPbi*BaY^ zjXIr&RA-<8>QJZOz-d(nkN@Q&MAxY^!k2>Q(*{L zZ@`KT@d8&G3ZB~9X6Pi?8GP^on;htQBfN)4tIL}w{MbQa1Y z1HojoQ{A*QOr)Wbug_VR6+l2e33cenZ(H~+fxwWCX&WfnvdP}RSFF}uaoEZBS)f59 zXMYf!!0X5pze`gqyIYR(?-2Cs`^(BfSjdKsTHVSy7_YAH(%^PoYcPlm{9#W60s}=W z0zV))Q2PS{1dzviSDql3ARpZexuIQ<5gMedm$`bk`m1XL`4i=#o8jb!NqQyf>1vK{ zkt)$J2)vtUG&xODv@|IXWy48RJG9-TG3txADFoikI35jve9%tFjkSYt{9p*$kI?^; z4k+hPFI9tW^s~`Ts1n}Um@kb~^B~-Q4lPkBBolsz(E45Q2FU&r*P^8_QI$9X*3|;_ zhO|Nnnu#Vt65&_kb6r7~=;3gj+z@!rNRF!s93MCcm1}cgcU>kbrR$}RaQf{?IOCzh zwTCQ|=b&QgRmjSHLz494Xe88;9fUyX9OWVu?7Rg*)_!uDbR8-}H^|u#?B6FnO_G%p z?j$r%J_Wh91==_?l%_(WpdTvJheNXBy!@heFJ$H(BR`-quBPw~%3OVz>tT77ItfjN z(`jx*16_(XSGxqe?uTptsIm)Q$AQMl`%w=l9)I55&b1W^o^w#ODxnFk8IS`^f{<&3 zewcJs2fB{Y$p|9z5GjW=)a`IIDFQ`WapaQYB*O5MxZ`ACG?zZXXg|M z+C#txvH?*d9t%l~do2jO-zN?`fT(1)c#EZY@nw$4Ks{=QDx)Ln;d* zP$TSsKSWoHILU)^gWnY~V+i;674Ol6BO<0l8Vp{tDN=8{AQcGN6p=AZ5GgxxtZyqj z%lH};Vf`qgyXDpe$hVOJ)?|?|5aHBDaE2t{27+6iEqDarf^^G|cH~$RsYBUXX1}^K zQY2ND*g@)JkaiIn7m>E>ZlA2v$AXX-EJi<(c7z>j1Qx9syiXLe4gk#8cEon9{SMJH zb{?gzNUjVM@p2e!Kh$VL7#z;&5ZS=x99|2GcZ+w3io%HFBGWiaz(gi;Jw>>k9VQ>Uhg9Becr|1CEokJOT7EEm^uFbN+q=vAj(4~BUGIC|J>K`dA9z3X ze&qewyVtwV`-%5c?`Pi6z5Bffya&Bscn^6Gd%yG^@gDUa^M2+1+WU?7xc7wjTkm(? z@4Y{GfAs$3{n`7A_gC*p?2L5s&VSU*RtRK6P^=H{^02{~#vB8`woT{8^oa&sqISu2~!>Pfkms7^6 z$!R#J5u8SH8pUZer!kzyavH~JJf{hqCUTm@X)>oNoThTxh|?=LZOmyCPMdPtjML_v zw&1iSr&n^?iqqDdUd3q}POs)Pjni~aGdOL_X(p%bIBm~q7N;FJ?Z{~-PCIjY4X4*~ zdL5_NbJ~T|uAFw`v^%FgIPJ-4FHU=N+K1D=oZi4`KTdDtv_GfWoDSf0Ag6;kg*oPM zn#<`BPV+b&%IPpphjTiD(~+Ex;&e2pV>lhl=}nyGb2^UG0!|A#^>KPLr{g)Dz-bYu zw{SX<(_&6bI4$M0jMH*XCvjTAX(gvsoK|x>nbRqpPUUnOr_(u|!Rf7>&gAqqPG@my zamqQpozvNz-ofdeoX+8NE~j^KI*-%&oG#$>ZcgvvbRnnra=M7q`#4?9=@L%w=X5Ej z4{*AS(+4?yh|`BTUC!wvoIc9wW1K$D=?YGt;B+OYt2kZF=^9Sga=MPwCpmqJ)2BHU zEz@T>eU{VbINiYMMou?zx|!20oNndxc}}-+`U0ohIen4SmpB};PG9Eq6;5|@`YNZd zar!!^Z*cl1r*CokHmAEdeTUQCoW9HHdz|j!^nFf0;PgXIKY}-b!>Pg7!OO(Y!K=QP z!|S~l!t2Q|nplB%h+i=A023FOn3}jTJ7(e;Y=enAnfO){4}^D%zhvU!CcXn|vrSyW zUNiA%w%)`NTWeyEiO0el#J8LHMiVEPIFG#wFXOT|I>OnZ(D8Wot%+x`&rLiC-cJ55 z`_05%;1%O=`Y@b-G1A17O+3uRJ=r%Z*SX&dFJXVu#BO$>W5d5?-7Lv2})x|zvVQowdI8wJ^JW)tTJoJMLkGn>O<27S9Zuk04@C0%JY z6Yq9}BPXDY$yeC50uFhY?5o&oUTL-(-M5?nMcswa(!xlE7q(x4TEUyXJE800^n~Bk zYt%foNS&h2gMG)3sN2L=T&g?dO`DQ30jucQ_Iovv|+GuZHxx#Y|W=l&?ai7 z+9a(?n+&_cZq;UKT)RWNM|((Hu05)4h0R5~VNcI7?S%HLj&)s+(qr^ky^-Dqb`x~g zd+5FN4f-a1i~hX+g8rhuLw`koRexQ7Q-523M}Jq}qko`(r0>-~(Ld7}Fp&B*bo#ak+H->W1mhRS20-E7&=kDds zc8?O(fbJsqM0bgMq5DDi3imqq7Wd2U58eCS2i#w{54(@JzjA-$KH>f@ObYXcg@;9j z#fBw>C5NSkH4f_(RvC6@*nMGZ!?uL&3HvoWEmZe&c<~{Z)1RwYZMt1jS{2Gm}J~x+-EE?9xxs^o-o!LPa01f zn~ax?ca4vY1Kuoe7w?VU31A{@1SP%S`xPiq52(Z|K%w0*j!-V#q56e09yvaWhGn9*0Oa#(=W0ez(%hDGyQE+lbH!Xa_!7+<_%^)v%fjO z9AxI0qfDPU-YhroF&CTnn-7=|nh%?gm}|@p<|cEqxx@Ux{M7u?{M9^V{%)Q#FNEvi zVd1gijl$c7cL~o8zd5`ze0uof;j6>fg+CR(KK$A64dI)@H-~Qxe>Z$j_y^%1h3^gj zG5oLavk^)Ji-?P87I9TX`-mP9eIv$1+!Qe`qA=p-i1LV;5wjxhh*%b}B4SI#YZ0GB z9F6!P;#9=>NI5bxG9|K2War3kk^Lg`A`2o*Bd15sj=Vc^Rpir=FGju>`F`Ywksn9y zi#!>5D)RTpKO)aWo{c;gc_At~DlRH9DkbWQsHRaZqPj#)ikcI3f7H`aFGqbC^<~u2 zsN+$;MExH1N7R|9zoY(%Iv;g08by=nuxL+obadnB*3liKyF~Ym9vnS7dP?+N(etD4 zj$RnOD0)-$=IE`_+oHEe?}&aS`qk*yqrZrWh-nm)8Ph(db4-_*ZZSP#dd2jKxgqAp znCzH=F@s}rV+vx*V`jzhnAtIR#@rM0K+NMYn`2&xc`fGsm=9wG+cUOz>#8B=%VB*RjWAzm5Gq_EKC}TvA+0T%)+gaZTfHh|7x`7B?bpRNUCO{J4TR zU)=b(qPU8G3n;XT|gQ+40NccgKGg z|5g02@n;jHgs=oNAv_@=Au%C2p?N}DLPkR8gdPcl6GkQ!B}`73nJ_0|QNr?sH3_>C z-br{jVNb#b2_GlyOZYV5^Mqd$y@`>Dafu0uNr@?mjS?FtHcjl1*gtVV;-JKw#36~} z5{nb76K_vkkoaKYQ;F*npH1A5xGC}N#Lp8CBz}>2IPpkQ*QA`Jo03YB%91LQs*)xr zO--7fbZgRWNpq9tB`r=`mh@24@}x(T9#2}4^idn1WMiik#9TrGLuEl<_IkQ|6{DNm-h*Eajn; zM^YY3c_L+X%DR;QSJQp}H&w8000-Ga1VJ`7qghSTq)F54q-mRGG_%=h(u8w3=}AsX zcWEg(;fx?W@PJG~h9FD!lBpmvMD{34hU|?fAc8DkKkxf_f4Q%J;=Zo$>a2BH8?rWK z9mqPAbtLOX*2AnSnM0XN z`I54LvWT*nvYfJwvV*dVvY+x3rJZt)a)a_0M*L0X7bNsH3rv?khk+7#Lh+EUtb+Dh6g+8Wx=w8ONc zwBxjsv@^7`wDYvzY0qdcXs>8*Xz%GA=|ku?x`Xba2k9YtB|S<9=%eT{I!sT{Kcg?8 zucL3EZ=!FZZ>681x6{wjFVKIXU!ng>zfOOZotG`nmSwB6wb{Dt;%t4kA={K)mTk?p zXOGXGlf5!~RrZ?fb=e!Tk7XavKAC+wyFL4S_QmW=+0PhU2A@&DP%_jEEknmBX6P9P zhKW(eurfeKH3MagXW$HyF@dp^v5c{T@eN}&V;y4yV-w>D<2d6Kqn&Y{@eAV$;{|gl zlg?x_bC^74E>p-9F~v*?Q^~Y5qfCG~iWy_V%nWk^b0YIU%qh%i%<0UT%(cu7%+1WL z%pJ_{n0uHPSbbR^vj(w-vqrG8SX36B#bB{m999mC$I4}iSW1?fWn`II7M6|WV3o7H ztRSnB6=NM_9bz439b=tfonoC~on>8RU1Qy6J!L&-yJ!tY3wq#g>7Ry*yU_DJIs!;VRjvRDtjh-Hv0?qJobF{LiP&wH|$mHZR{QF1MCOv zC+w%}=j<2km+ZgUZ`g0y?>YTAgE<@ym&4}>IC&f!$IfwbTpSO_&k1ruoF>kC&PL8w z&MwaPoIRYqoPC@FoS!&9bB=J1aUSM$%^8$4BxhL8h@7k(RgOAGo1@Dq&MD0?=9qK9 zoCP_Ha+cHgj9JW4YtFX)eYkxEbyO?m6xS?iKD0?k(;e?mg}U?j!DR z+~2uRxzD+8d0lyZcv(CukIrN8SUfq;%(L)pJO{6wSHr92)$%%W1pgGjoqwKxk^eNeFt5 z^bqtC^cKhkR)I$l5hMgHf{ft5f@y+Tf;ob@f-eON1d9Yq1Xwx3ib&O3JwX* z3T_B)3GN8)3H}y#6?PZ)6!sQo3B^K{&>*x3Jwl%l5F)~AVZE?X*ev`?xJ0-@_>FM2 zaIJ8?aHDXmaJz7)@Mqx_;T_>);Zx!3ygqru@^bQ|d73;!o+l5;tIk97#^(`v6Y?hJ zEzet#w<>RK-uk>vd0XE>ej! zq6$$+6cGWUQKBkQT!e^7(JIkq(RR^J(f6V~qP?PhqWz+SqSK-@d{rSQCP<}W+k`Lr3^4s!L`Q!76 z{7n9e{FV8u^Vj8X$lsj*ZT`0W9r>s7U*x~f|3}hY(n~TxGD4CiVN0YEqr@z+N*t1M zNsXjd(jaM;v`E?{DM?x~SF&63ljNx6xa5@NjO483yySx97s(yTUy@gnHZL}hO$ta6X|=RPib)CS4C!p? zTe zE$<`mCm$r|%H49GJS30EN6JUZV{%wtEw7Q+%Uk4Aua&!$mzCF*Hrh0X(L)dTcu5CliC_>owh;Sq8+PEX(wtIXjf>rYjwsE7QQZgr|Y2Wr0b&Vrt7KeuN$b#(y?_pI=)Vz6Y9h|l}@WG(iQ8h zIIKGRLqP1a4-eXg6STcBI6TdCWqJFYvUJEyy#`$czI_p9!n?t$*1?xpVU zqAo=_MS>zxk)%jgq$pAqX^ON(x*~T`um~xtE~+j1*QzgCU-Vtk;iC4U>qQTXI~DgW z<`gT7^~J8@NO41Pb8&0&xZ-p%UYseOSUkCSYVpkCImPpe=NE4)K3#mN_)77e;wQy_ z6u&4LP?A-mD$$k{mFPO2?F9rMpTGl%6TQR{FH`ouQkdyP=n% zkD;HTzhR(ZuwkfSgn?q98+e9XL!Keu;54`mK10wDHbf180Wyp>)EZh1;|ys7ZXgZI z4J!<*3~LP=44Vz#8nzpD8crHJ8@n2N83!1L7>5}@HByXpBh$z><`{WKu~B8z7`4Wz zainpSvC5b*RvT-K^~OfyWaD1rKI0+dDdRcg1>+^-72`GIP2+9jUE_V@GvgcMJL7v( zmWg7bo0uk!iD$|+<(b4Lvng%DOcPAgOtVaLO!G|hO^ZxROiNA6O)E|7P1{X7O}k9{ zO$SYzhAc36I~T(VrXT({h`+_BuVJg_{ncD6FCIaYyHWR+N@ zR=HJaRa-6AYU^lgowd>0Y;Co+SyR@u^$Y7U>j`VS^@{a|^_KOn^}h9?^*8J9)~D9z z*0)_BPKVp!a|9h>N7Mm0AP4NoI3_qIIi@(KI;J~jI%Yf8IZim* z9Ty#!9ltuRJ8n8|JMKDubM|!ha`tidbM|)*bPje7b&8xWr{5WNMxCG&a#lIxPQ=;Z z{MtPnAzD|GNCU@{8qH%deN;EWcBJulzyz8&`K%PuF0V z)n#)zU9NxS=zuHainst5+`K}$Vov!a)Ke&E$ z9dP~R`q_2O-ND_(-P8S{yRZ9W_W<`m_h2{6UE^}E`<>?lPZv)&Pft&8Pan?+PmYJ@QFvUQk)E-hlxMt$@J#Sb z@=W&3@T~N#_N?=4^lbKQ_3ZKN^&IjX@f`P@@^@;) zJ?lO1edO!z>*4F|`^eYNH^4X0H`piiIelJVg|E^#(g*q=UzIQJ8}D1_TjX2fTjpEg zTjg8hTjx9IyX$-8`@{F#_m}UL@3rr(@4bJ3pX)F3NBpDwRsOg?=^yQ{^{4$){8Rl4 z{HOhA{O9}^{FnS!{n!1s{CE8i{Ez)F{4f2l{ci(Z0^I^12L=QN1_lR)28IVj0dt@# zkPOrW>H>{{=0Hn;3``Hq3@izp4_pXb3S0?X3)~Fc3EU4n3Oors4ZIG#4g3@A80;DB z9UKv)1nEI$kQ3wubAx$7anKQT2HinlFc1s{D}&KsOK@IrQE+K+MQ~McO>kXsLvT~@ zaPV&MUhrY?x8U!=XTd*%e^q=~ky|0IkX0xvG!=yvMHM9#r4@mS+KNdPD=OAhtgqNu zv87^b#rBGyD%vZ~Rotq08|oSA9~u#2hJ+z!s66Be`9l?<%1|@}hM-U?v_7;kv^BIR zv_Et(bSQKrbUbu2bUM@?Iv2VUdKY>h?ilVI?iTJD?j8Op+%L=t2g9N8$Z#TD6Rrz4 zgqy>y;kIxpoDO5*3E}DC)#0t-v*D}ZKf*7;ZlR4giOMBfxRs6wnTw2Yvyr0M~#Uz%Ae|@BnxOJOTay zo&zs{m%wY_E$|-f2zCOyf<3@qU>~p_*dH7S4hDyUBfu<>24;gykOT5S0hkAh!2(bQ zDnSjX14}>yXaX&u4RnAm&r<>HDEp12sVQ)U>k^n7)XK>z=_~w z@W0^a;7o81I1gL^eg!T8mw_w6Rp4511GpL73hn{-g8RYK;3e=HcprQO4Tgq7BcLpZ z1~DKO#DTa_E+mA+Pyr-^l#m)K{CAwU6f!|&kPUJ|F31Z7pb!*+00@GrpafJ6)j;)7 z6Ep@I3#Fj(5Dt;h1ZWa88JY@x4$Xw-Ky#t_&?0CFv=mwaeFLq5)UGsSxC7h?{qAHz@Jr|@(5FZgfx z4g5adG2S`eE#4#EE8ZvGFWx^sFg_$cJf0P&#jOyXSPV&Zb**Tjv)?Zmyr!^CfiKN8OqecAUdQ3F(78diZ~D#;za^T2#Fv70wFMhAfu5w zq!Af|j73t&c!WSEAd`?O$TVaIG8>tT%tsa>OOR#AN@O*%4%vuoLAD_~k?)ZokbTHO ztRu7kPj@Mt(=0Auo_u$Q$H+vSYGyvRkre^221`WdG#A zWLA=vWF*;1ZZbESm&{K}lZvD|S(q$NmL^R}OVXY!PkNI6WJR(vIWjpaS(QvA ztCQ1{yOVd4Ppf-X52%(`msJDRjn#9icUB*-zFqx(G;4Hd^n}qXMjsq~Vf1e`AJlwW zBdRH_3D?xsOs)C4=KGq{HGkIjtsPOzs@44KL?&ye*KV!dU3<9pYTfWUVO?omWnDwv z)Vk$$C+e=&-LLzneqcSjzM#Ii9;k1vpI^VR{)hUz^^fZRX~=32H@F*+2C`vE!w(JZ z4Zk(~+1Rm>+vsnE8pkzGYh2a1ukl3Vlg4*V!zfWX{nB)+>7V9d z&C+I|xv_b1^S0*Q&9BFFAHy7@8Uu_;jF~oO`Iy~fE{%E9GOR`0Vri*tX=z#5vbp7Y z%ipbCTP3ZI)={m^t+QJvK zYD#KqYI4IQl6{Md>I5WurML9~Gh^RD#M-1*$@|s17YbOHm_gMlGlvb)qiRiw4jT z8bJYc6dFTe6hTL$b!a2njJBfVP!z>b5}klfLZ_h9&>84#bS^p{U5I{#EnSTmZgO zNtdQgX-nFkE>C;X{&X-MPDj%~8cM_IM7lcNoNmSXVEwQG*dS~uHUgtybc~5{Fdinr zM3@AVVM97*afSEBX=D=K-7Ykq^EP??TguxhsjmGM*Mr;f=7E58{F#?-_O~R&N z)36!XY-}zzA6tYi!IohwvDMf*Y$LV>+lKALzQ=yR_F)IHpRuFZ3G6g>7Q295!meW1 zv0K<(>;d)|`yG3Ry}({!Z?N}xN4zuM4eyD6i1)?&;{)*__;5T6r{N5ojdSr_JP*&u zrMLoD61^y+z5MPWh#aG~~@U{2`d^5fk-+_OJ@458#LJBlvOr6yA=X$A7`E;Mee* z_#ON{{s@19KgIvVU*fOvcSHxG6Va9ELG&g*B0eTQAqEq}h))SBkxj6O9D+{>2{BPX z$O#ppC5i|=VI;~38{s6}gpUXkVIoR^M2v_N2vJSc67@tQ(M+@uV~KGDN{lB6B13#e z{D=52@i{S*m`%(jz9beBi;1Pga$+U1npj6{B(@M+i5QnxSWy8Fq%7;b#OH zQ6@iAkdbAS8Fi*GQ - - - - CFBundleDevelopmentRegion - English - CFBundleExecutable - ${EXECUTABLE_NAME} - CFBundleIconFile - SheepShaver.icns - CFBundleIdentifier - net.sourceforge.SheepShaverLauncher - CFBundleInfoDictionaryVersion - 6.0 - CFBundleName - SheepShaver - CFBundlePackageType - APPL - CFBundleSignature - ???? - CFBundleVersion - 2.3 - NSMainNibFile - MainMenu - NSPrincipalClass - NSApplication - - diff --git a/SheepShaver/src/MacOSX/Launcher/LauncherPrefix.h b/SheepShaver/src/MacOSX/Launcher/LauncherPrefix.h deleted file mode 100644 index 992c034d6..000000000 --- a/SheepShaver/src/MacOSX/Launcher/LauncherPrefix.h +++ /dev/null @@ -1,42 +0,0 @@ -/* - * LauncherPrefix.h - * - * Copyright (C) 2010 Alexei Svitkine - * - * 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 LAUNCHERPREFIX_H -#define LAUNCHERPREFIX_H - -#define CONFIG_H -#define STDC_HEADERS -#define SIZEOF_DOUBLE 8 -#define SIZEOF_FLOAT 4 -#define SIZEOF_INT 4 -#define SIZEOF_LONG_LONG 8 -#define SIZEOF_SHORT 2 - -#ifdef __LP64__ -#define SIZEOF_VOID_P 8 -#define SIZEOF_LONG 8 -#else -#define SIZEOF_VOID_P 4 -#define SIZEOF_LONG 4 -#endif - -#define loff_t off_t - -#endif /* LAUNCHERPREFIX_H */ diff --git a/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj deleted file mode 100644 index fe382f61e..000000000 --- a/SheepShaver/src/MacOSX/Launcher/SheepShaverLauncher.xcodeproj/project.pbxproj +++ /dev/null @@ -1,399 +0,0 @@ -// !$*UTF8*$! -{ - archiveVersion = 1; - classes = { - }; - objectVersion = 46; - objects = { - -/* Begin PBXBuildFile section */ - 084186B10B3A0515004B1F63 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 084186B00B3A0515004B1F63 /* VMSettingsController.mm */; }; - 088EBBB61B41AEBB0066D352 /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = 088EBBB51B41AEBB0066D352 /* DiskType.m */; }; - 08AAB16D102614D5007E1230 /* SheepShaver.icns in Resources */ = {isa = PBXBuildFile; fileRef = 08AAB16C102614D5007E1230 /* SheepShaver.icns */; }; - 08AAB1B310261691007E1230 /* SheepShaver in Copy SheepShaver */ = {isa = PBXBuildFile; fileRef = 08AAB1B11026168B007E1230 /* SheepShaver */; }; - 08B5FAFD102497FA0047FD1B /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 08B5FAFB102497FA0047FD1B /* VMSettingsWindow.nib */; }; - 08B5FB01102498B00047FD1B /* VMListWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 08B5FAFF102498B00047FD1B /* VMListWindow.nib */; }; - 08B5FB221024FE320047FD1B /* AppController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 08B5FB211024FE320047FD1B /* AppController.mm */; }; - 08DC90BD0B67074C00799A45 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90BC0B67074C00799A45 /* prefs_items.cpp */; }; - 08DC90BF0B67075D00799A45 /* prefs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */; }; - 08DC90C10B67077300799A45 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90C00B67077300799A45 /* prefs.cpp */; }; - 08F4D174102601C500C6436D /* VMListController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 08F4D173102601C500C6436D /* VMListController.mm */; }; - 8D11072A0486CEB800E47090 /* MainMenu.nib in Resources */ = {isa = PBXBuildFile; fileRef = 29B97318FDCFA39411CA2CEA /* MainMenu.nib */; }; - 8D11072B0486CEB800E47090 /* InfoPlist.strings in Resources */ = {isa = PBXBuildFile; fileRef = 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */; }; - 8D11072D0486CEB800E47090 /* main.m in Sources */ = {isa = PBXBuildFile; fileRef = 29B97316FDCFA39411CA2CEA /* main.m */; settings = {ATTRIBUTES = (); }; }; - 8D11072F0486CEB800E47090 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */; }; -/* End PBXBuildFile section */ - -/* Begin PBXCopyFilesBuildPhase section */ - 08AAB19E1026164C007E1230 /* Copy SheepShaver */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = ""; - dstSubfolderSpec = 6; - files = ( - 08AAB1B310261691007E1230 /* SheepShaver in Copy SheepShaver */, - ); - name = "Copy SheepShaver"; - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXCopyFilesBuildPhase section */ - -/* Begin PBXFileReference section */ - 084186AF0B3A0515004B1F63 /* VMSettingsController.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; path = VMSettingsController.h; sourceTree = ""; }; - 084186B00B3A0515004B1F63 /* VMSettingsController.mm */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.objcpp; path = VMSettingsController.mm; sourceTree = ""; }; - 085339D612C9874400345D35 /* LauncherPrefix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = LauncherPrefix.h; sourceTree = SOURCE_ROOT; }; - 088EBB6F1B41ABDA0066D352 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = config.h; path = ../config/config.h; sourceTree = SOURCE_ROOT; }; - 088EBB701B41ABE40066D352 /* config-macosx-ppc_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = "config-macosx-ppc_32.h"; path = "../config/config-macosx-ppc_32.h"; sourceTree = SOURCE_ROOT; }; - 088EBB711B41ABE40066D352 /* config-macosx-x86_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = "config-macosx-x86_32.h"; path = "../config/config-macosx-x86_32.h"; sourceTree = SOURCE_ROOT; }; - 088EBB721B41ABE40066D352 /* config-macosx-x86_64.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = "config-macosx-x86_64.h"; path = "../config/config-macosx-x86_64.h"; sourceTree = SOURCE_ROOT; }; - 088EBBB41B41AEBB0066D352 /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = SOURCE_ROOT; }; - 088EBBB51B41AEBB0066D352 /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = SOURCE_ROOT; }; - 089C165DFE840E0CC02AAC07 /* English */ = {isa = PBXFileReference; fileEncoding = 10; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; - 08AAB16C102614D5007E1230 /* SheepShaver.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; name = SheepShaver.icns; path = ../SheepShaver.icns; sourceTree = SOURCE_ROOT; }; - 08AAB1B11026168B007E1230 /* SheepShaver */ = {isa = PBXFileReference; lastKnownFileType = "compiled.mach-o.executable"; name = SheepShaver; path = ../../Unix/SheepShaver; sourceTree = SOURCE_ROOT; }; - 08B5FAFC102497FA0047FD1B /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMSettingsWindow.nib; sourceTree = ""; }; - 08B5FB00102498B00047FD1B /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMListWindow.nib; sourceTree = ""; }; - 08B5FB201024FE320047FD1B /* AppController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AppController.h; sourceTree = ""; }; - 08B5FB211024FE320047FD1B /* AppController.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = AppController.mm; sourceTree = ""; }; - 08DC90BC0B67074C00799A45 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../../prefs_items.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_unix.cpp; path = ../../Unix/prefs_unix.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90C00B67077300799A45 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../../prefs.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90C20B67078300799A45 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = prefs.h; path = ../../include/prefs.h; sourceTree = SOURCE_ROOT; }; - 08DC90C40B67079800799A45 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = sys.h; path = ../../include/sys.h; sourceTree = SOURCE_ROOT; }; - 08DC90C50B6707AC00799A45 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = user_strings_unix.h; path = ../../Unix/user_strings_unix.h; sourceTree = SOURCE_ROOT; }; - 08DC90C70B6707BE00799A45 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = sysdeps.h; path = ../../Unix/sysdeps.h; sourceTree = SOURCE_ROOT; }; - 08F4D172102601C500C6436D /* VMListController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = VMListController.h; sourceTree = ""; }; - 08F4D173102601C500C6436D /* VMListController.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = VMListController.mm; sourceTree = ""; }; - 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; - 13E42FB307B3F0F600E4EEF1 /* CoreData.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreData.framework; path = /System/Library/Frameworks/CoreData.framework; sourceTree = ""; }; - 29B97316FDCFA39411CA2CEA /* main.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = main.m; sourceTree = ""; }; - 29B97319FDCFA39411CA2CEA /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/MainMenu.nib; sourceTree = ""; }; - 29B97324FDCFA39411CA2CEA /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = /System/Library/Frameworks/AppKit.framework; sourceTree = ""; }; - 29B97325FDCFA39411CA2CEA /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = /System/Library/Frameworks/Foundation.framework; sourceTree = ""; }; - 8D1107310486CEB800E47090 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist; path = Info.plist; sourceTree = ""; }; - 8D1107320486CEB800E47090 /* SheepShaverLauncher.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaverLauncher.app; sourceTree = BUILT_PRODUCTS_DIR; }; -/* End PBXFileReference section */ - -/* Begin PBXFrameworksBuildPhase section */ - 8D11072E0486CEB800E47090 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072F0486CEB800E47090 /* Cocoa.framework in Frameworks */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXFrameworksBuildPhase section */ - -/* Begin PBXGroup section */ - 080E96DDFE201D6D7F000001 /* Classes */ = { - isa = PBXGroup; - children = ( - ); - name = Classes; - sourceTree = ""; - }; - 1058C7A0FEA54F0111CA2CBB /* Linked Frameworks */ = { - isa = PBXGroup; - children = ( - 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */, - ); - name = "Linked Frameworks"; - sourceTree = ""; - }; - 1058C7A2FEA54F0111CA2CBB /* Other Frameworks */ = { - isa = PBXGroup; - children = ( - 29B97324FDCFA39411CA2CEA /* AppKit.framework */, - 13E42FB307B3F0F600E4EEF1 /* CoreData.framework */, - 29B97325FDCFA39411CA2CEA /* Foundation.framework */, - ); - name = "Other Frameworks"; - sourceTree = ""; - }; - 19C28FACFE9D520D11CA2CBB /* Products */ = { - isa = PBXGroup; - children = ( - 8D1107320486CEB800E47090 /* SheepShaverLauncher.app */, - ); - name = Products; - sourceTree = ""; - }; - 29B97314FDCFA39411CA2CEA /* SheepShaverLauncher */ = { - isa = PBXGroup; - children = ( - 085339D612C9874400345D35 /* LauncherPrefix.h */, - 08DC90C20B67078300799A45 /* prefs.h */, - 08DC90C40B67079800799A45 /* sys.h */, - 08DC90C50B6707AC00799A45 /* user_strings_unix.h */, - 088EBB6F1B41ABDA0066D352 /* config.h */, - 088EBB701B41ABE40066D352 /* config-macosx-ppc_32.h */, - 088EBB711B41ABE40066D352 /* config-macosx-x86_32.h */, - 088EBB721B41ABE40066D352 /* config-macosx-x86_64.h */, - 08DC90C70B6707BE00799A45 /* sysdeps.h */, - 08DC90BC0B67074C00799A45 /* prefs_items.cpp */, - 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */, - 08DC90C00B67077300799A45 /* prefs.cpp */, - 080E96DDFE201D6D7F000001 /* Classes */, - 29B97315FDCFA39411CA2CEA /* Other Sources */, - 29B97317FDCFA39411CA2CEA /* Resources */, - 29B97323FDCFA39411CA2CEA /* Frameworks */, - 19C28FACFE9D520D11CA2CBB /* Products */, - 08B5FB201024FE320047FD1B /* AppController.h */, - 08B5FB211024FE320047FD1B /* AppController.mm */, - 088EBBB41B41AEBB0066D352 /* DiskType.h */, - 088EBBB51B41AEBB0066D352 /* DiskType.m */, - 084186AF0B3A0515004B1F63 /* VMSettingsController.h */, - 084186B00B3A0515004B1F63 /* VMSettingsController.mm */, - 08F4D172102601C500C6436D /* VMListController.h */, - 08F4D173102601C500C6436D /* VMListController.mm */, - ); - name = SheepShaverLauncher; - sourceTree = ""; - }; - 29B97315FDCFA39411CA2CEA /* Other Sources */ = { - isa = PBXGroup; - children = ( - 29B97316FDCFA39411CA2CEA /* main.m */, - ); - name = "Other Sources"; - sourceTree = ""; - }; - 29B97317FDCFA39411CA2CEA /* Resources */ = { - isa = PBXGroup; - children = ( - 08AAB1B11026168B007E1230 /* SheepShaver */, - 08AAB16C102614D5007E1230 /* SheepShaver.icns */, - 8D1107310486CEB800E47090 /* Info.plist */, - 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */, - 29B97318FDCFA39411CA2CEA /* MainMenu.nib */, - 08B5FAFB102497FA0047FD1B /* VMSettingsWindow.nib */, - 08B5FAFF102498B00047FD1B /* VMListWindow.nib */, - ); - name = Resources; - sourceTree = ""; - }; - 29B97323FDCFA39411CA2CEA /* Frameworks */ = { - isa = PBXGroup; - children = ( - 1058C7A0FEA54F0111CA2CBB /* Linked Frameworks */, - 1058C7A2FEA54F0111CA2CBB /* Other Frameworks */, - ); - name = Frameworks; - sourceTree = ""; - }; -/* End PBXGroup section */ - -/* Begin PBXNativeTarget section */ - 8D1107260486CEB800E47090 /* SheepShaver Launcher */ = { - isa = PBXNativeTarget; - buildConfigurationList = C01FCF4A08A954540054247B /* Build configuration list for PBXNativeTarget "SheepShaver Launcher" */; - buildPhases = ( - 8D1107290486CEB800E47090 /* Resources */, - 8D11072C0486CEB800E47090 /* Sources */, - 8D11072E0486CEB800E47090 /* Frameworks */, - 08AAB19E1026164C007E1230 /* Copy SheepShaver */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = "SheepShaver Launcher"; - productInstallPath = "$(HOME)/Applications"; - productName = SheepShaverLauncher; - productReference = 8D1107320486CEB800E47090 /* SheepShaverLauncher.app */; - productType = "com.apple.product-type.application"; - }; -/* End PBXNativeTarget section */ - -/* Begin PBXProject section */ - 29B97313FDCFA39411CA2CEA /* Project object */ = { - isa = PBXProject; - buildConfigurationList = C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverLauncher" */; - compatibilityVersion = "Xcode 3.2"; - developmentRegion = English; - hasScannedForEncodings = 1; - knownRegions = ( - English, - Japanese, - French, - German, - ); - mainGroup = 29B97314FDCFA39411CA2CEA /* SheepShaverLauncher */; - projectDirPath = ""; - projectRoot = ""; - targets = ( - 8D1107260486CEB800E47090 /* SheepShaver Launcher */, - ); - }; -/* End PBXProject section */ - -/* Begin PBXResourcesBuildPhase section */ - 8D1107290486CEB800E47090 /* Resources */ = { - isa = PBXResourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072A0486CEB800E47090 /* MainMenu.nib in Resources */, - 8D11072B0486CEB800E47090 /* InfoPlist.strings in Resources */, - 08B5FAFD102497FA0047FD1B /* VMSettingsWindow.nib in Resources */, - 08B5FB01102498B00047FD1B /* VMListWindow.nib in Resources */, - 08AAB16D102614D5007E1230 /* SheepShaver.icns in Resources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXResourcesBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 8D11072C0486CEB800E47090 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072D0486CEB800E47090 /* main.m in Sources */, - 084186B10B3A0515004B1F63 /* VMSettingsController.mm in Sources */, - 08DC90BD0B67074C00799A45 /* prefs_items.cpp in Sources */, - 08DC90BF0B67075D00799A45 /* prefs_unix.cpp in Sources */, - 08DC90C10B67077300799A45 /* prefs.cpp in Sources */, - 08B5FB221024FE320047FD1B /* AppController.mm in Sources */, - 08F4D174102601C500C6436D /* VMListController.mm in Sources */, - 088EBBB61B41AEBB0066D352 /* DiskType.m in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXVariantGroup section */ - 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */ = { - isa = PBXVariantGroup; - children = ( - 089C165DFE840E0CC02AAC07 /* English */, - ); - name = InfoPlist.strings; - sourceTree = ""; - }; - 08B5FAFB102497FA0047FD1B /* VMSettingsWindow.nib */ = { - isa = PBXVariantGroup; - children = ( - 08B5FAFC102497FA0047FD1B /* English */, - ); - name = VMSettingsWindow.nib; - sourceTree = ""; - }; - 08B5FAFF102498B00047FD1B /* VMListWindow.nib */ = { - isa = PBXVariantGroup; - children = ( - 08B5FB00102498B00047FD1B /* English */, - ); - name = VMListWindow.nib; - sourceTree = ""; - }; - 29B97318FDCFA39411CA2CEA /* MainMenu.nib */ = { - isa = PBXVariantGroup; - children = ( - 29B97319FDCFA39411CA2CEA /* English */, - ); - name = MainMenu.nib; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - C01FCF4B08A954540054247B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - PREFS_EDITOR, - STANDALONE_PREFS, - ); - GCC_VERSION = 4.0; - INFOPLIST_FILE = Info.plist; - INSTALL_PATH = "$(HOME)/Applications"; - OTHER_CFLAGS = "$(inherited)"; - PRODUCT_NAME = SheepShaverLauncher; - WRAPPER_EXTENSION = app; - ZERO_LINK = YES; - }; - name = Debug; - }; - C01FCF4C08A954540054247B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_GENERATE_DEBUGGING_SYMBOLS = YES; - GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; - GCC_MODEL_TUNING = G5; - GCC_PREPROCESSOR_DEFINITIONS = ( - PREFS_EDITOR, - STANDALONE_PREFS, - ); - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - INFOPLIST_FILE = Info.plist; - INSTALL_PATH = "$(HOME)/Applications"; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; - OTHER_CFLAGS = "$(inherited)"; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = SheepShaverLauncher; - "SDKROOT[arch=x86_64]" = macosx10.6; - WRAPPER_EXTENSION = app; - }; - name = Release; - }; - C01FCF4F08A954540054247B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - GCC_WARN_ABOUT_RETURN_TYPE = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - PREBINDING = NO; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - C01FCF5008A954540054247B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - GCC_PREFIX_HEADER = LauncherPrefix.h; - GCC_VERSION = 4.0; - GCC_WARN_ABOUT_RETURN_TYPE = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - PREBINDING = NO; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - C01FCF4A08A954540054247B /* Build configuration list for PBXNativeTarget "SheepShaver Launcher" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - C01FCF4B08A954540054247B /* Debug */, - C01FCF4C08A954540054247B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverLauncher" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - C01FCF4F08A954540054247B /* Debug */, - C01FCF5008A954540054247B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 29B97313FDCFA39411CA2CEA /* Project object */; -} diff --git a/SheepShaver/src/MacOSX/Launcher/VMListController.h b/SheepShaver/src/MacOSX/Launcher/VMListController.h deleted file mode 100644 index 70b453d94..000000000 --- a/SheepShaver/src/MacOSX/Launcher/VMListController.h +++ /dev/null @@ -1,49 +0,0 @@ -/* - * VMListController.h - SheepShaver VM manager in Cocoa on Mac OS X - * - * Copyright (C) 2009 Alexei Svitkine - * - * 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 - */ - -#import - -@interface VMListController : NSWindowController -#if __MAC_OS_X_VERSION_MAX_ALLOWED >= 1060 - -#endif -{ - IBOutlet NSTableView *vmList; - IBOutlet NSButton *newButton; - IBOutlet NSButton *importButton; - IBOutlet NSButton *settingsButton; - IBOutlet NSButton *launchButton; - NSMutableDictionary *tasks; - NSMutableArray *vmArray; - NSString *vmBeingDragged; -} - -+ (id) sharedInstance; - -- (id) init; -- (void) awakeFromNib; - -- (IBAction) newVirtualMachine: (id) sender; -- (IBAction) importVirtualMachine: (id) sender; -- (IBAction) editVirtualMachineSettings: (id) sender; -- (IBAction) launchVirtualMachine: (id) sender; -- (IBAction) deleteVirtualMachine: (id) sender; - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/VMListController.mm b/SheepShaver/src/MacOSX/Launcher/VMListController.mm deleted file mode 100644 index d5b48ab36..000000000 --- a/SheepShaver/src/MacOSX/Launcher/VMListController.mm +++ /dev/null @@ -1,390 +0,0 @@ -/* - * VMListController.mm - SheepShaver VM manager in Cocoa on Mac OS X - * - * Copyright (C) 2009 Alexei Svitkine - * - * 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 - */ - -#import "VMListController.h" -#import "VMSettingsController.h" - -// NSInteger was added in 10.5 SDK. -#if MAC_OS_X_VERSION_MIN_REQUIRED < 1050 - #if __LP64__ || NS_BUILD_32_LIKE_64 - typedef long NSInteger; - #else - typedef int NSInteger; - #endif -#endif - -/* - -TODO: - -Drag VM from Finder to import -When choosing things like rom file and keycode files - have a checkbox to copy -selected file into the bundle. -Copy path! - - */ - -@interface NSObject (TableViewContextMenu) -- (NSMenu *) tableView: (NSTableView *) tableView menuForEvent: (NSEvent *) event; -@end - -@implementation NSTableView (ContextMenu) -- (NSMenu *) menuForEvent: (NSEvent *) event -{ - if ([[self delegate] respondsToSelector:@selector(tableView:menuForEvent:)]) - return [[self delegate] tableView:self menuForEvent:event]; - return nil; -} -@end - -#define VM_DRAG_TYPE @"sheepvm" - -@implementation VMListController - -+ (id) sharedInstance -{ - static VMListController *_sharedInstance = nil; - if (!_sharedInstance) { - _sharedInstance = [[VMListController allocWithZone:[self zone]] init]; - } - return _sharedInstance; -} - -- (id) init -{ - self = [super initWithWindowNibName:@"VMListWindow"]; - - NSArray *vms = [[NSUserDefaults standardUserDefaults] stringArrayForKey:@"vm_list"]; - vmArray = [[NSMutableArray alloc] initWithCapacity:[vms count]]; - [vmArray addObjectsFromArray:vms]; - - tasks = [[NSMutableDictionary alloc] init]; - - [[NSNotificationCenter defaultCenter] addObserver:self - selector:@selector(onTaskTerminated:) - name:NSTaskDidTerminateNotification - object:nil]; - - return self; -} - -- (void) awakeFromNib -{ - [[[vmList tableColumns] objectAtIndex:0] setEditable:YES]; - [vmList setDataSource: self]; - [vmList setDelegate: self]; - [vmList reloadData]; - [vmList registerForDraggedTypes:[NSArray arrayWithObjects:VM_DRAG_TYPE, nil]]; -} - -- (void) _showNotFoundAlert -{ - NSAlert *alert = [[[NSAlert alloc] init] autorelease]; - [alert setMessageText:@"The virtual machine cannot be found."]; - [alert setAlertStyle:NSWarningAlertStyle]; - [alert beginSheetModalForWindow:[self window] - modalDelegate:self - didEndSelector:nil - contextInfo:nil]; -} - -- (void) reloadDataAndSave -{ - [vmList reloadData]; - [[NSUserDefaults standardUserDefaults] setObject:vmArray forKey:@"vm_list"]; -} - -- (void) keyDown: (NSEvent *) event -{ - if ([event type] == NSKeyDown && [[event characters] length] > 0) { - unichar key = [[event characters] characterAtIndex:0]; - if (key == NSDeleteFunctionKey || key == NSDeleteCharacter) { - [self deleteVirtualMachine:self]; - } - } -} - -- (NSInteger) numberOfRowsInTableView: (NSTableView *) table -{ - return [vmArray count]; -} - -- (id) tableView: (NSTableView *) table objectValueForTableColumn: (NSTableColumn *) c row: (NSInteger) r -{ - return [[[vmArray objectAtIndex: r] lastPathComponent] stringByDeletingPathExtension]; -} - -- (void) tableView: (NSTableView *) table setObjectValue: (id) value forTableColumn: (NSTableColumn *) c row: (NSInteger) r -{ - NSString *currentPath = [vmArray objectAtIndex: r]; - NSString *newPath = [[NSString stringWithFormat:@"%@/%@.sheepvm", - [currentPath stringByDeletingLastPathComponent], value] retain]; - if (![currentPath isEqual:newPath]) { - if ([[NSFileManager defaultManager] fileExistsAtPath:currentPath]) { - NSFileManager *manager = [NSFileManager defaultManager]; - if ([manager movePath: currentPath toPath: newPath handler:nil]) { - [vmArray replaceObjectAtIndex: r withObject: newPath]; - [currentPath release]; - } - } else { - [self _showNotFoundAlert]; - } - } -} - -- (void) tableViewSelectionDidChange: (NSNotification *) notification -{ - if ([vmList selectedRow] >= 0) { - [settingsButton setEnabled:YES]; - [launchButton setEnabled:YES]; - } else { - [settingsButton setEnabled:NO]; - [launchButton setEnabled:NO]; - } -} - -- (BOOL) tableView: (NSTableView *) table writeRowsWithIndexes: (NSIndexSet *) rows toPasteboard: (NSPasteboard *) pboard -{ - vmBeingDragged = [vmArray objectAtIndex:[rows firstIndex]]; - [pboard declareTypes:[NSArray arrayWithObject:VM_DRAG_TYPE] owner:self]; - [pboard setString:VM_DRAG_TYPE forType:VM_DRAG_TYPE]; - return YES; -} - -- (NSDragOperation) tableView: (NSTableView *) table validateDrop: (id ) info proposedRow: (NSInteger) row proposedDropOperation: (NSTableViewDropOperation) op -{ - if (op == NSTableViewDropAbove && row != -1) { - return NSDragOperationPrivate; - } else { - return NSDragOperationNone; - } -} - -- (BOOL) tableView: (NSTableView *) table acceptDrop: (id ) info row: (NSInteger) row dropOperation: (NSTableViewDropOperation) op -{ - if ([[[info draggingPasteboard] availableTypeFromArray:[NSArray arrayWithObject:VM_DRAG_TYPE]] isEqualToString:VM_DRAG_TYPE]) { - [vmList deselectAll:nil]; - int index = [vmArray indexOfObject:vmBeingDragged]; - if (index != row) { - [vmArray insertObject:vmBeingDragged atIndex:row]; - if (row <= index) { - index += 1; - } else { - row -= 1; - } - [vmArray removeObjectAtIndex: index]; - } - [self reloadDataAndSave]; - [vmList selectRow:row byExtendingSelection:NO]; - return YES; - } - - return NO; -} - -- (NSMenu *) tableView: (NSTableView *) table menuForEvent: (NSEvent *) event -{ - NSMenu *menu = nil; - int row = [table rowAtPoint:[table convertPoint:[event locationInWindow] fromView:nil]]; - if (row >= 0) { - [table selectRow:row byExtendingSelection:NO]; - menu = [[[NSMenu alloc] initWithTitle: @"Contextual Menu"] autorelease]; - [menu addItemWithTitle: @"Launch Virtual Machine" - action: @selector(launchVirtualMachine:) keyEquivalent: @""]; - [menu addItemWithTitle: @"Edit VM Settings..." - action: @selector(editVirtualMachineSettings:) keyEquivalent: @""]; - [menu addItemWithTitle: @"Reveal VM in Finder" - action: @selector(revealVirtualMachineInFinder:) keyEquivalent: @""]; - [menu addItemWithTitle: @"Remove VM from List" - action: @selector(deleteVirtualMachine:) keyEquivalent: @""]; - } - return menu; -} - -- (NSString *) tableView: (NSTableView *) table toolTipForCell: (NSCell *) cell rect: (NSRectPointer) rect - tableColumn: (NSTableColumn *) c row: (NSInteger) r mouseLocation: (NSPoint) loc -{ - return [vmArray objectAtIndex: r]; -} - -- (IBAction) newVirtualMachine: (id) sender -{ - [vmList abortEditing]; - NSSavePanel *save = [NSSavePanel savePanel]; - [save setMessage: @"New SheepShaver Virtual Machine:"]; - [save setRequiredFileType: @"sheepvm"]; - [save setCanSelectHiddenExtension: YES]; - [save setExtensionHidden: NO]; - [save beginSheetForDirectory: nil - file: @"New.sheepvm" - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_newVirtualMachineDone: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (IBAction) _newVirtualMachineDone: (NSSavePanel *) save returnCode: (int) returnCode contextInfo: (void *) contextInfo -{ - if (returnCode == NSOKButton) { - NSFileManager *manager = [NSFileManager defaultManager]; - [manager createDirectoryAtPath:[save filename] attributes:nil]; - [manager createFileAtPath:[[save filename] stringByAppendingPathComponent:@"prefs"] contents:nil attributes:nil]; - [vmArray addObject:[save filename]]; - [vmList reloadData]; - [vmList selectRow:([vmArray count] - 1) byExtendingSelection:NO]; - [[VMSettingsController sharedInstance] editSettingsForNewVM:[save filename] sender:self]; - if ([[VMSettingsController sharedInstance] cancelWasClicked]) { - [manager removeFileAtPath:[save filename] handler:nil]; - [vmArray removeObjectAtIndex:([vmArray count] - 1)]; - } - [self reloadDataAndSave]; - } -} - -- (IBAction) importVirtualMachine: (id) sender -{ - [vmList abortEditing]; - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setMessage:@"Import SheepShaver Virtual Machine:"]; - [open setResolvesAliases:YES]; - // Curiously, bundles are treated as "files" not "directories" by NSOpenPanel. - [open setCanChooseDirectories:NO]; - [open setCanChooseFiles:YES]; - [open setAllowsMultipleSelection:NO]; - [open beginSheetForDirectory: nil - file: nil - types: [NSArray arrayWithObject:@"sheepvm"] - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_importVirtualMachineDone: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _importVirtualMachineDone: (NSOpenPanel *) open returnCode: (int) returnCode contextInfo: (void *) contextInfo -{ - if (returnCode == NSOKButton) { - [vmArray addObject:[open filename]]; - [self reloadDataAndSave]; - } -} - -- (IBAction) editVirtualMachineSettings: (id) sender -{ - [vmList abortEditing]; - int selectedRow = [vmList selectedRow]; - if (selectedRow >= 0) { - NSString *path = [vmArray objectAtIndex:selectedRow]; - if ([tasks objectForKey:path]) { - NSAlert *alert = [[[NSAlert alloc] init] autorelease]; - [alert setMessageText:@"Cannot edit virtual machine settings while it's running."]; - [alert setAlertStyle:NSWarningAlertStyle]; - [alert beginSheetModalForWindow:[self window] - modalDelegate:self - didEndSelector:nil - contextInfo:nil]; - } else if ([[NSFileManager defaultManager] fileExistsAtPath:path]) { - [[VMSettingsController sharedInstance] editSettingsFor:path sender:sender]; - } else { - [self _showNotFoundAlert]; - } - } -} - -- (IBAction) launchVirtualMachine: (id) sender -{ - [vmList abortEditing]; - int selectedRow = [vmList selectedRow]; - if (selectedRow >= 0) { - NSString *path = [vmArray objectAtIndex:selectedRow]; - if ([tasks objectForKey:path]) { - NSAlert *alert = [[[NSAlert alloc] init] autorelease]; - [alert setMessageText:@"The selected virtual machine is already running."]; - [alert setAlertStyle:NSWarningAlertStyle]; - [alert beginSheetModalForWindow:[self window] - modalDelegate:self - didEndSelector:nil - contextInfo:nil]; - } else if ([[NSFileManager defaultManager] fileExistsAtPath:path]) { - NSTask *sheep = [[NSTask alloc] init]; - [sheep setLaunchPath:[[NSBundle mainBundle] pathForAuxiliaryExecutable:@"SheepShaver"]]; - [sheep setArguments:[NSArray arrayWithObject:path]]; - [sheep launch]; - [tasks setObject:sheep forKey:path]; - } else { - [self _showNotFoundAlert]; - } - } -} - -- (void) onTaskTerminated: (NSNotification *) notification -{ - NSArray *paths = [tasks allKeys]; - NSEnumerator *enumerator = [paths objectEnumerator]; - NSString *path; - while ((path = [enumerator nextObject])) { - NSTask *task = [tasks objectForKey:path]; - if (![task isRunning]) { - [tasks removeObjectForKey:path]; - [task release]; - } - } -} - -- (IBAction) deleteVirtualMachine: (id) sender -{ - [vmList abortEditing]; - int selectedRow = [vmList selectedRow]; - if (selectedRow >= 0) { - NSAlert *alert = [[[NSAlert alloc] init] autorelease]; - [alert setMessageText:@"Do you wish to remove the selected virtual machine from the list?"]; - [alert addButtonWithTitle:@"Remove"]; - [alert addButtonWithTitle:@"Cancel"]; - [alert setAlertStyle:NSWarningAlertStyle]; - [alert beginSheetModalForWindow:[self window] - modalDelegate:self - didEndSelector:@selector(_deleteVirtualMachineDone: returnCode: contextInfo:) - contextInfo:nil]; - } -} - -- (void) _deleteVirtualMachineDone: (NSAlert *) alert returnCode: (int) returnCode contextInfo: (void *) contextInfo -{ - if (returnCode == NSAlertFirstButtonReturn) { - [vmArray removeObjectAtIndex:[vmList selectedRow]]; - [vmList deselectAll:self]; - [self reloadDataAndSave]; - } -} - -- (IBAction) revealVirtualMachineInFinder: (id) sender -{ - [vmList abortEditing]; - int selectedRow = [vmList selectedRow]; - if (selectedRow >= 0) { - NSString *path = [vmArray objectAtIndex:selectedRow]; - if ([[NSFileManager defaultManager] fileExistsAtPath:path]) { - [[NSWorkspace sharedWorkspace] selectFile: path inFileViewerRootedAtPath: @""]; - } else { - [self _showNotFoundAlert]; - } - } -} - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.h b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.h deleted file mode 100755 index d8b4ed5aa..000000000 --- a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.h +++ /dev/null @@ -1,87 +0,0 @@ -/* - * VMSettingsController.h - Preferences editing in Cocoa on Mac OS X - * - * Copyright (C) 2006-2009 Alexei Svitkine - * - * 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 - */ - -#import - -@interface VMSettingsController : NSWindowController -#if __MAC_OS_X_VERSION_MAX_ALLOWED >= 1060 - -#endif -{ - BOOL cancelWasClicked; - - IBOutlet NSView *diskSaveSize; - IBOutlet NSTextField *diskSaveSizeField; - NSMutableArray *diskArray; - IBOutlet NSView *isCDROM; - IBOutlet NSButton *isCDROMcheckbox; - // Setup - IBOutlet NSTableView *disks; - IBOutlet NSComboBox *bootFrom; - IBOutlet NSButton *disableCdrom; - IBOutlet NSTextField *ramSize; - IBOutlet NSStepper *ramSizeStepper; - IBOutlet NSTextField *romFile; - IBOutlet NSTextField *unixRoot; - // Audio/Video - IBOutlet NSPopUpButton *videoType; - IBOutlet NSPopUpButton *refreshRate; - IBOutlet NSComboBox *width; - IBOutlet NSComboBox *height; - IBOutlet NSButton *qdAccel; - IBOutlet NSButton *disableSound; - IBOutlet NSTextField *outDevice; - IBOutlet NSTextField *mixDevice; - // Keyboard/Mouse - IBOutlet NSButton *useRawKeyCodes; - IBOutlet NSTextField *rawKeyCodes; - IBOutlet NSButton *browseRawKeyCodesButton; - IBOutlet NSPopUpButton *mouseWheel; - IBOutlet NSTextField *scrollLines; - IBOutlet NSStepper *scrollLinesStepper; - // CPU/Misc - IBOutlet NSButton *ignoreIllegalMemoryAccesses; - IBOutlet NSButton *ignoreIllegalInstructions; - IBOutlet NSButton *dontUseCPUWhenIdle; - IBOutlet NSButton *enableJIT; - IBOutlet NSButton *enable68kDREmulator; - IBOutlet NSTextField *modemPort; - IBOutlet NSTextField *printerPort; - IBOutlet NSTextField *ethernetInterface; -} - -+ (id) sharedInstance; -- (id) init; -- (void) setupGUI; -- (void) editSettingsFor: (NSString *) vmdir sender: (id) sender; -- (void) editSettingsForNewVM: (NSString *) vmdir sender: (id) sender; -- (IBAction) addDisk: (id) sender; -- (IBAction) removeDisk: (id) sender; -- (IBAction) createDisk: (id) sender; -- (IBAction) useRawKeyCodesClicked: (id) sender; -- (IBAction) browseForROMFileClicked: (id) sender; -- (IBAction) browseForUnixRootClicked: (id) sender; -- (IBAction) browseForKeyCodesFileClicked: (id) sender; -- (void) cancelEdit: (id) sender; -- (void) saveChanges: (id) sender; -- (BOOL) cancelWasClicked; -- (void) dealloc; - -@end diff --git a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm deleted file mode 100755 index 9a5ddf9cc..000000000 --- a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm +++ /dev/null @@ -1,480 +0,0 @@ -/* - * VMSettingsController.mm - Preferences editing in Cocoa on Mac OS X - * - * Copyright (C) 2006-2010 Alexei Svitkine - * - * 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 - */ - -#import "sysdeps.h" -#import "prefs.h" - -// The _UINT64 define is needed to guard against a typedef mismatch with Snow Leopard headers. -#define _UINT64 - -#import "VMSettingsController.h" - -#import "DiskType.h" - -#include - -// NSInteger was added in 10.5 SDK. -#if MAC_OS_X_VERSION_MIN_REQUIRED < 1050 - #if __LP64__ || NS_BUILD_32_LIKE_64 - typedef long NSInteger; - #else - typedef int NSInteger; - #endif -#endif - -const int CDROMRefNum = -62; // RefNum of driver - -#ifdef STANDALONE_PREFS -void prefs_init() -{ -} - -void prefs_exit() -{ -} -#endif - -@implementation VMSettingsController - -+ (id) sharedInstance -{ - static VMSettingsController *_sharedInstance = nil; - if (!_sharedInstance) { - _sharedInstance = [[VMSettingsController allocWithZone:[self zone]] init]; - } - return _sharedInstance; -} - -- (id) init -{ - self = [super initWithWindowNibName:@"VMSettingsWindow"]; - - cancelWasClicked = NO; - - return self; -} - -- (NSInteger) numberOfRowsInTableView: (NSTableView *) table -{ - return [diskArray count]; -} - -- (id) tableView: (NSTableView *) table objectValueForTableColumn: (NSTableColumn *) col row: (NSInteger) row -{ - DiskType *d = (DiskType*)[diskArray objectAtIndex:row]; - - if ([[col identifier] isEqualTo:@"isCDROMcol"]) { - return [NSString stringWithFormat:@"%d", [d isCDROM]]; - } - - return [d path]; -} - -- (void) tableView: (NSTableView *) table setObjectValue: (id) object forTableColumn: (NSTableColumn *) tableColumn row: (NSInteger) row -{ - if ([[tableColumn identifier] isEqual:@"isCDROMcol"]) { - DiskType *d = (DiskType*)[diskArray objectAtIndex:row]; - [d setIsCDROM:![d isCDROM]]; - } -} - -static NSString *getStringFromPrefs(const char *key) -{ - const char *value = PrefsFindString(key); - if (value == NULL) - return @""; - return [NSString stringWithUTF8String: value]; -} - -- (void) setupGUI -{ - diskArray = [[NSMutableArray alloc] init]; - - const char *dsk; - int index = 0; - while ((dsk = PrefsFindString("disk", index++)) != NULL) { - DiskType *disk = [[DiskType alloc] init]; - [disk setPath:[NSString stringWithUTF8String: dsk ]]; - [disk setIsCDROM:NO]; - - [diskArray addObject:disk]; - } - - /* Fetch all CDROMs */ - index = 0; - while ((dsk = PrefsFindString("cdrom", index++)) != NULL) { - DiskType *disk = [[DiskType alloc] init]; - [disk setPath:[NSString stringWithUTF8String: dsk ]]; - [disk setIsCDROM:YES]; - - [diskArray addObject:disk]; - } - - [disks setDataSource: self]; - [disks reloadData]; - - int bootdriver = PrefsFindInt32("bootdriver"), active = 0; - switch (bootdriver) { - case 0: active = 0; break; - case CDROMRefNum: active = 1; break; - } - [bootFrom selectItemAtIndex: active ]; - - [romFile setStringValue: getStringFromPrefs("rom") ]; - [unixRoot setStringValue: getStringFromPrefs("extfs") ]; - [disableCdrom setIntValue: PrefsFindBool("nocdrom") ]; - [ramSize setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; - [ramSizeStepper setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; - - int display_type = 0; - int dis_width = 640; - int dis_height = 480; - - const char *str = PrefsFindString("screen"); - if (str != NULL) { - if (sscanf(str, "win/%d/%d", &dis_width, &dis_height) == 2) - display_type = 0; - else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) - display_type = 1; - } - - [videoType selectItemAtIndex: display_type ]; - [width setIntValue: dis_width ]; - [height setIntValue: dis_height ]; - - int frameskip = PrefsFindInt32("frameskip"); - int item = -1; - switch (frameskip) { - case 12: item = 0; break; - case 8: item = 1; break; - case 6: item = 2; break; - case 4: item = 3; break; - case 2: item = 4; break; - case 1: item = 5; break; - case 0: item = 6; break; - } - if (item >= 0) - [refreshRate selectItemAtIndex: item ]; - - [qdAccel setIntValue: PrefsFindBool("gfxaccel") ]; - - [disableSound setIntValue: PrefsFindBool("nosound") ]; - [outDevice setStringValue: getStringFromPrefs("dsp") ]; - [mixDevice setStringValue: getStringFromPrefs("mixer") ]; - - [useRawKeyCodes setIntValue: PrefsFindBool("keycodes") ]; - [rawKeyCodes setStringValue: getStringFromPrefs("keycodefile") ]; - [rawKeyCodes setEnabled:[useRawKeyCodes intValue]]; - [browseRawKeyCodesButton setEnabled:[useRawKeyCodes intValue]]; - - int wheelmode = PrefsFindInt32("mousewheelmode"), wheel = 0; - switch (wheelmode) { - case 0: wheel = 0; break; - case 1: wheel = 1; break; - } - [mouseWheel selectItemAtIndex: wheel ]; - - [scrollLines setIntValue: PrefsFindInt32("mousewheellines") ]; - [scrollLinesStepper setIntValue: PrefsFindInt32("mousewheellines") ]; - - [ignoreIllegalMemoryAccesses setIntValue: PrefsFindBool("ignoresegv") ]; - [ignoreIllegalInstructions setIntValue: PrefsFindBool("ignoreillegal") ]; - [dontUseCPUWhenIdle setIntValue: PrefsFindBool("idlewait") ]; - [enableJIT setIntValue: PrefsFindBool("jit") ]; - [enable68kDREmulator setIntValue: PrefsFindBool("jit68k") ]; - - [modemPort setStringValue: getStringFromPrefs("seriala") ]; - [printerPort setStringValue: getStringFromPrefs("serialb") ]; - [ethernetInterface setStringValue: getStringFromPrefs("ether") ]; -} - -- (void) editSettingsFor: (NSString *) vmdir sender: (id) sender -{ - chdir([vmdir fileSystemRepresentation]); - AddPrefsDefaults(); - AddPlatformPrefsDefaults(); - LoadPrefs([vmdir fileSystemRepresentation]); - NSWindow *window = [self window]; - [self setupGUI]; - [NSApp runModalForWindow:window]; -} - -- (void) editSettingsForNewVM: (NSString *) vmdir sender: (id) sender -{ - chdir([vmdir fileSystemRepresentation]); - AddPrefsDefaults(); - AddPlatformPrefsDefaults(); - LoadPrefs([vmdir fileSystemRepresentation]); - PrefsReplaceString("screen", "win/800/600"); - PrefsReplaceString("extfs", ""); - PrefsReplaceString("ether", "slirp"); - PrefsReplaceInt32("ramsize", 64 << 20); - PrefsReplaceInt32("frameskip", 2); - PrefsReplaceBool("jit", true); - NSWindow *window = [self window]; - [self setupGUI]; - [NSApp runModalForWindow:window]; -} - -static NSString *makeRelativeIfNecessary(NSString *path) -{ - char cwd[1024], filename[1024]; - int cwdlen; - strlcpy(filename, [path fileSystemRepresentation], sizeof(filename)); - getcwd(cwd, sizeof(cwd)); - cwdlen = strlen(cwd); - if (!strncmp(cwd, filename, cwdlen)) { - if (cwdlen >= 0 && cwd[cwdlen-1] != '/') - cwdlen++; - return [NSString stringWithUTF8String: filename + cwdlen]; - } - return path; -} - -- (IBAction) addDisk: (id) sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setCanChooseDirectories:YES]; - [open setAccessoryView:isCDROM]; - [open setAllowsMultipleSelection:NO]; - [open setTreatsFilePackagesAsDirectories:YES]; - [open beginSheetForDirectory: [[NSFileManager defaultManager] currentDirectoryPath] - file: @"Unknown" - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_addDiskEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _addDiskEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - DiskType *d = [[DiskType alloc] init]; - [d setPath:makeRelativeIfNecessary([open filename])]; - - [d setIsCDROM:([isCDROMcheckbox state] == NSOnState)]; - - [diskArray addObject: d]; - [disks reloadData]; - } -} - -- (IBAction) removeDisk: (id) sender -{ - int selectedRow = [disks selectedRow]; - if (selectedRow >= 0) { - [diskArray removeObjectAtIndex: selectedRow]; - [disks reloadData]; - } -} - -- (IBAction) createDisk: (id) sender -{ - NSSavePanel *save = [NSSavePanel savePanel]; - [save setAccessoryView: diskSaveSize]; - [save setTreatsFilePackagesAsDirectories:YES]; - [save beginSheetForDirectory: [[NSFileManager defaultManager] currentDirectoryPath] - file: @"New.dsk" - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_createDiskEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _createDiskEnd: (NSSavePanel *) save returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - int size = [diskSaveSizeField intValue]; - if (size >= 0 && size <= 10000) { - char cmd[1024]; - snprintf(cmd, sizeof(cmd), "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", [[save filename] UTF8String], [diskSaveSizeField intValue]); - int ret = system(cmd); - if (ret == 0) { - DiskType *d = [[DiskType alloc] init]; - [d setPath:makeRelativeIfNecessary([save filename])]; - [d setIsCDROM:NO]; - - [diskArray addObject: d]; - [disks reloadData]; - } - } - } - [(NSData *)theContextInfo release]; -} - -- (IBAction) useRawKeyCodesClicked: (id) sender -{ - [rawKeyCodes setEnabled:[useRawKeyCodes intValue]]; - [browseRawKeyCodesButton setEnabled:[useRawKeyCodes intValue]]; -} - -- (IBAction) browseForROMFileClicked: (id) sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setCanChooseDirectories:NO]; - [open setAllowsMultipleSelection:NO]; - [open setTreatsFilePackagesAsDirectories:YES]; - [open beginSheetForDirectory: @"" - file: [romFile stringValue] - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_browseForROMFileEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _browseForROMFileEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - [romFile setStringValue: makeRelativeIfNecessary([open filename])]; - } -} - -- (IBAction) browseForUnixRootClicked: (id) sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setCanChooseDirectories:YES]; - [open setCanChooseFiles:NO]; - [open setAllowsMultipleSelection:NO]; - [open beginSheetForDirectory: @"" - file: [unixRoot stringValue] - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_browseForUnixRootEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _browseForUnixRootEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - [unixRoot setStringValue: makeRelativeIfNecessary([open filename])]; - } -} - -- (IBAction) browseForKeyCodesFileClicked: (id) sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setCanChooseDirectories:NO]; - [open setAllowsMultipleSelection:NO]; - [open setTreatsFilePackagesAsDirectories:YES]; - [open beginSheetForDirectory: @"" - file: [unixRoot stringValue] - modalForWindow: [self window] - modalDelegate: self - didEndSelector: @selector(_browseForKeyCodesFileEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _browseForKeyCodesFileEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - [rawKeyCodes setStringValue: makeRelativeIfNecessary([open filename])]; - } -} - -- (void) cancelEdit: (id) sender -{ -#ifdef STANDALONE_PREFS - PrefsExit(); -#endif - [[self window] close]; - [NSApp stopModal]; - cancelWasClicked = YES; -} - -- (void) saveChanges: (id) sender -{ - // Remove all disks - while (PrefsFindString("disk")) - PrefsRemoveItem("disk"); - // Remove all cdroms - while (PrefsFindString("cdrom")) - PrefsRemoveItem("cdrom"); - - - // Write all disks - for (int i = 0; i < [diskArray count]; i++) { - DiskType *d = [diskArray objectAtIndex:i]; - PrefsAddString([d isCDROM] ? "cdrom" : "disk", [[d path] UTF8String]); - } - - PrefsReplaceInt32("bootdriver", ([bootFrom indexOfSelectedItem] == 1 ? CDROMRefNum : 0)); - PrefsReplaceString("rom", [[romFile stringValue] UTF8String]); - PrefsReplaceString("extfs", [[unixRoot stringValue] UTF8String]); - PrefsReplaceBool("nocdrom", [disableCdrom intValue]); - PrefsReplaceInt32("ramsize", [ramSize intValue] << 20); - - char pref[256]; - snprintf(pref, sizeof(pref), "%s/%d/%d", [videoType indexOfSelectedItem] == 0 ? "win" : "dga", [width intValue], [height intValue]); - PrefsReplaceString("screen", pref); - - int rate = 8; - switch ([refreshRate indexOfSelectedItem]) { - case 0: rate = 12; break; - case 1: rate = 8; break; - case 2: rate = 6; break; - case 3: rate = 4; break; - case 4: rate = 2; break; - case 5: rate = 1; break; - case 6: rate = 0; break; - } - PrefsReplaceInt32("frameskip", rate); - PrefsReplaceBool("gfxaccel", [qdAccel intValue]); - - PrefsReplaceBool("nosound", [disableSound intValue]); - PrefsReplaceString("dsp", [[outDevice stringValue] UTF8String]); - PrefsReplaceString("mixer", [[mixDevice stringValue] UTF8String]); - - PrefsReplaceBool("keycodes", [useRawKeyCodes intValue]); - PrefsReplaceString("keycodefile", [[rawKeyCodes stringValue] UTF8String]); - - PrefsReplaceInt32("mousewheelmode", [mouseWheel indexOfSelectedItem]); - PrefsReplaceInt32("mousewheellines", [scrollLines intValue]); - - PrefsReplaceBool("ignoresegv", [ignoreIllegalMemoryAccesses intValue]); - PrefsReplaceBool("ignoreillegal", [ignoreIllegalInstructions intValue]); - PrefsReplaceBool("idlewait", [dontUseCPUWhenIdle intValue]); - PrefsReplaceBool("jit", [enableJIT intValue]); - PrefsReplaceBool("jit68k", [enable68kDREmulator intValue]); - - PrefsReplaceString("seriala", [[modemPort stringValue] UTF8String]); - PrefsReplaceString("serialb", [[printerPort stringValue] UTF8String]); - PrefsReplaceString("ether", [[ethernetInterface stringValue] UTF8String]); - SavePrefs(); -#ifdef STANDALONE_PREFS - PrefsExit(); -#endif - - [[self window] close]; - [NSApp stopModal]; - cancelWasClicked = NO; -} - -- (BOOL) cancelWasClicked -{ - return cancelWasClicked; -} - -- (void) dealloc -{ - [super dealloc]; -} - -@end - diff --git a/SheepShaver/src/MacOSX/Launcher/main.m b/SheepShaver/src/MacOSX/Launcher/main.m deleted file mode 100644 index 88f92937d..000000000 --- a/SheepShaver/src/MacOSX/Launcher/main.m +++ /dev/null @@ -1,26 +0,0 @@ -/* - * main.m - Cocoa SheepShaver launcher for Mac OS X - * - * Copyright (C) 2006-2009 Alexei Svitkine - * - * 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 - */ - -#import - -int main(int argc, char *argv[]) -{ - return NSApplicationMain(argc, (const char **) argv); -} diff --git a/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp b/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp deleted file mode 120000 index da209f873..000000000 --- a/SheepShaver/src/MacOSX/MacOSX_sound_if.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/MacOSX_sound_if.h b/SheepShaver/src/MacOSX/MacOSX_sound_if.h deleted file mode 120000 index 63bcdb278..000000000 --- a/SheepShaver/src/MacOSX/MacOSX_sound_if.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/InfoPlist.strings b/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/InfoPlist.strings deleted file mode 100644 index 4e36ad6e3d71e03ba045089894ea15f9a30b450a..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 216 zcmZvWO%A~T5JunHDVi?3P_eKP3$Y;)3q3*6(v-Go5!}cn@zS+SGC$vZ^D^I0Ohmw% znms9J3SML!)b7@nPNk-@2G-oXa?0(8G`+v$s#@xP_O6JSfw3WB$&HKLimm%pZpzN9 qjD>{8i&p-TQ_q;m3IA^1ZpMs^iQT*>Jfsv(iJunUm*z?>WXcagJtnyT diff --git a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/classes.nib b/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/classes.nib deleted file mode 100644 index ddaaa18e8..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/classes.nib +++ /dev/null @@ -1,50 +0,0 @@ -{ - IBClasses = ( - {CLASS = FirstResponder; LANGUAGE = ObjC; SUPERCLASS = NSObject; }, - { - ACTIONS = { - addDisk = id; - browseForROMFileClicked = id; - createDisk = id; - removeDisk = id; - useRawKeyCodesClicked = id; - }; - CLASS = PrefsEditor; - LANGUAGE = ObjC; - OUTLETS = { - bootFrom = NSComboBox; - disableCdrom = NSButton; - disableSound = NSButton; - diskSaveSize = NSView; - diskSaveSizeField = NSTextField; - disks = NSTableView; - dontUseCPUWhenIdle = NSButton; - enable68kDREmulator = NSButton; - enableJIT = NSButton; - ethernetInterface = NSTextField; - height = NSComboBox; - ignoreIllegalMemoryAccesses = NSButton; - mixDevice = NSTextField; - modemPort = NSTextField; - mouseWheel = NSPopUpButton; - outDevice = NSTextField; - printerPort = NSTextField; - qdAccel = NSButton; - ramSize = NSTextField; - ramSizeStepper = NSStepper; - rawKeyCodes = NSTextField; - refreshRate = NSPopUpButton; - romFile = NSTextField; - scrollLines = NSTextField; - scrollLinesStepper = NSStepper; - unixRoot = NSTextField; - useRawKeyCodes = NSButton; - videoType = NSPopUpButton; - width = NSComboBox; - window = NSWindow; - }; - SUPERCLASS = NSObject; - } - ); - IBVersion = 1; -} \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/info.nib b/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/info.nib deleted file mode 100644 index b92e86214..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/info.nib +++ /dev/null @@ -1,23 +0,0 @@ - - - - - IBDocumentLocation - 135 142 356 240 0 0 1680 1028 - IBEditorPositions - - 29 - 132 352 305 44 0 0 1680 1028 - 342 - 715 652 249 104 0 0 1680 1028 - - IBFramework Version - 446.1 - IBOpenObjects - - 29 - - IBSystem Version - 8R2218 - - diff --git a/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/PrefsEditor/English.lproj/MainMenu.nib/keyedobjects.nib deleted file mode 100644 index 20efaaf1d540bbe1b9e3a1f47807916e3497353e..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 39269 zcmbS!2VfM%_y3gL+ughD?OqybB$tAK(o%o~3xp;hErf&sff$kl0%@dBMRw>2Vh0pZ zsuc^0y&`r&l%gPAR1g(KL=g-BH?w!i(fs=V0SQ-T=e?Qt=Dp8*^JaHcb$MBBUAuO> z5Jm)1Bq13&kb;~;Q;KU!#+FU=)fA+_uiCPz%E2jhRn-M4RinoFO6qEhOrwA9O};6< z(rkajP=x2M`V6T^8_~OK8@pL)ab2;6pY}*u$b~{sDr%3iP#4q<^+Y$J5>$$OXe=6! zYSAQg8(NI+MQhPh=xOv8+KfI#AEB-2bMyt;gASlW=xg*1I*xuor_nj|C#G1!E*yd* za3qe!aX0~|;AXfLZjCc=d)yQE!2|ISJQ5e-T3m-G;;DE#o{i_=+wo$2Ctiw|;Z=Aw zUW+&3SMUdTEB+QA!{6f{@K5+O!9*oGF-Zi8B+(?1Tt%9bt4SM@PBKVG(urJ4ZXmr$ zA954vPx9gaA*6r|Cxv7rDIzzM(PRu6M=D4isVBFP>0~yULza?d@UxOUh+O0u_}NIF zNAt*AU6(Q$M62dS&nUFs+0z^8+x!O{q6G`t!kRm1NI(p308O_~kA=SYj;_Z`v_X{oeIS}i>) zJtl3Go|RsfUXk9Gwn!gIA4@x=ozj=mKItpzsB}X5Uiw8kEuEA8l!;7br|goO$WgKv zekaOFa8t?+UpRT2}d6PM4WHUtTQV zDc=n(@0VA}tK~=K$K+?^jq*$K%ko?DX8B`UAa9ko$-Cs;@|W`W@)`LL`5*Z_DRLl( z!=X4dN0_6DBhJwjK8bgvIGQ<{JK8wfIx-zujxLUDM<2&cjzNxG$8blXqr_3_sBly| zCOd9%%ycYt-0ir>vBI&^vCgsHvBB}AW0T`~$7_z)9q%~ab!>C&a_n{-aD46f#_^-$ zB=r817(4F3{rBHk;=_V znNlH{N~Kb*)GN2bs~O5%Wgab17AtoscPV!(_bB%&_bJPi70TDjcgoMo8Ra+ScjcV& zk4jWcb*j4RQKQs2wW%7fCaTTVHfp+>p|)2u)$7&nY7e!S+E2|>^VK10fjUAhg;zdx zv^rj`QESyYb+S4`ou$rJ=cx15Me053z3P4HGIfQzR$ZsAS07b3sL!dJ)aTWg)YsH4 z>O1PY>Idppb*H*Z-L39X_p3+MW9o7BJM{-jN^7pQ&{}EfT87qM%hI}N-L)QCPwhtSCT)WqFLHJZN9cZyG^@8yIZ?QyH{JPtQtSY)9o~z z;m!zWj5F5hbtXEma<+E1cXn`I=j`U}?(FOA=j;zZxy}OTNT<&^+F9YOM5oX%&MIe( zvlhOY3_sJIGo7=X^PLNvi=B5k?{(hie89OJK3@et>z$7~pKw0o+~|D4`J(eR=j+b5 zom-qAI6riL;@s{kbd7e6ca_6Wg?6`Vf@_9rzUvOxovyoF_q*1>=WAV$x*m5u>3Yib zg6j>}o30OCTV0>JK6CAb*5$6RTpz*j?_Iyb?=!C7LmVMSNK{Cot2`trBqgL(NPBqI zKBPm)b&?FPdW75<(m!NC$iR?6A&2w==LAx&f2Qxycf#*o`fmMm{R@4M_;j!SC26Ve zqr3F|=#+kd7UN&hDRM+VpdZu^iBERwU+G8nuk~;BWBPG)Qa_=8um7N*#J9lvpW(Vw zQfugMul|dETK^S#KcoMq|E`~fKK_8&JEfn~|AbFJ)A#6q>3_pFyYzqb^ZM`F-OdSa zL@Ve{H-=t!LEDqi=6iI?P23bdl}I_=g>P}oZU<2MLf;FteswDpT1u_mD*S)a?R2}~ z)17cd2z;lzO?R04TjOQp72{RoHRE;T4YJsH(|F6+Y`kr3G2SuWHQqDcH$E^vG(Ivu zHntkuj8Ba1#;3+-#tvhrvCG(Pd~SSU>@oHlUmE+2{l)>~pmE4JY#cGZGL9Nw8{Zh; z8pn*|#&^aE<9p)=^n~%Fankt7_}MsR{9>Foel^Y*zZt(9XN^CMbH<;>U&i0YKgM|z znb;&IH6>Fv9j0Qcre-=#ml+-!_5dY(rjWznbBs98EeLwP0e^S z!StGmW|Em~rkKsltIXzR3$vwpwRw%%%4}`6G25E$%v3YYOgA&k_GSmOqnT-DnVrmQ z&FjqT%^S?lW*0Nt>}qy1yPG}Cp5~2aFSEDV$GpkxYxXnyn*+>&W{x??%rys_d1k&j z#4Ip}n#0WDW}!L49BCGrH=D)gC|qrpn5CxA9Bqy<$C_p4ICH#NZdRC;W|diOPB3fC zTC>iqHz%5t%*o~ybE-Mbyv3Yu-fGS;Et8ou%~|GbbB;ORTxc%NOR20cFF$04A|1Jr zflTB5#z zpth);fII_i_>*5;Uhe}C6x}~JyQIWdTU$1&th}slO1G-YN`OaIH8w!%R$g3N>#Ma} z59^;hpschOKvV7T{<-~&D}3Vhi2k|$X8fB=yX4o{9TeIf1ZbQ6bMwo9aJg?tS!HR} zq}u$H5>AhIXtM#RjlUD5?5p6Ne*`wMCKvG^#9+@F;BZn^&3L$`XH{igzv9Z`F}|9i z(4TK|9W>1EpF60ks*aKGnbe-qQH+)_@&lvAOzOyJsiiO}li{}*`H_*Qnbg5@SjdC# zu*eRW|1^}2GGH3S&^d#aY|$O41ANsHWde~lwRJURm1BT-b~T{XlHxiTjV0|sozS)D zI&^)3Jy>7uF#AO%^syFQk8VJng`oP?*A>Imc_dYt5I)DW%$kgs4wb=`lA78 zAj(05P%avb@}PA-8iESYP&5n;M}=qv8i|U~&8QfSDl$F&b8Y$M)=eq*^((F&FZj1V z>snkg9%cdNqhDENZrM~H%!mEW;Ig{%#&=>GK|k#827wB~o7|EbpRba?;nx>W=GQm0 z$uILwf{%v`?pa3)E>w;xP$hg;1q*Hhs)6~o>a@FHm0VkzOoc%c<@9q!=Pe8m(*&OY3cCyS*wX=J!8TUUbZ&cLs-a% zu*mXQMZ5h2;B#^Zs)xUKqZ%s|MrT-02S$7!nz#WiK}*pxbU%6kEk`TRO7tLl2(3b^ ztuQOaYGI{X?X5}HH0y3_rM1R-*m~S5`U0kU3e3qmv>rNt7%hUokHLIAfi|Egf$JWX zeD#!qxNP=ejNN?Y<-nE43fDXsS;-Gf2O;x%vqQ(s+GQwNFw z7Ol=#S?4!ybv0GxeD=8k0j|UZgJw6pPP1aH1gnV^X@zN4QrLO;bMJ(IvO~=-63S`2 z3%!lD09WszchP(3ee?kgj;{^)k6R)b^JvjyQuaWEtSBqmBZU|CtuHAnExxg)7?jU8 z9v`D=Ye2I)??&6uCulqR6uSHj?La%xF0>oeGcX|WKkt}x$OoBQU0lMKZa0XI%d5r+ z>(|tZGaXi}6`!9wr51Fm$PBB4iMVKbcA~vNC=z{%_6ZV0#+KFjx~3wNTJbhh2hp}Q zz|RFt9Y#lNrmRHE%V`YdT?;BScgua??E$cbIPUCv&>gs%I6pc zl3l{>F@Iyz{Slpf7@b5vp`SUXMVv!yEDfK<6Gxd3gO11%dC_2snkH@{Z? zA#|^q28wr8qvB)4HEV-ptS>o^RDTdl0Npo`bQLQD#k@IMID5TT)Y zm1UE?+<^w^4{m~^{Gw`OwdSHKEU_mmSX#I#m)1?~+H|o0WP#X%IzfkVVuQTf@lL>v z`MYUYT$dYl3;(FE5u;AyqfT!eb(UD-9aH~()Tv;Ef=8VJ#wTg$paK27J-Cw zs@gKHfLzVEBjkz*nl)hb=vtpJ5`$r()>apT_o?G6&9)xgWI(H~Rg-ydRtGW8T5Ez; zqgoxUiNgHi8^QeI?(ja?{NkIyv_63QgZa$_W7^)T@|$0rgC?%SgK#b$jPtB4tBcjc z>T`*C#ogiWFh0Gw5RZVqJ6fGItFv`2EOSt*cHlp`N@b?C@}`6NJb-V;#kTpxqi_i> zh57NJ=kaLt0v-cKbT%FbB+GFHuEbTi8i%3txJFD4pt>Ft>dPh;m&3q8?A)o<`D!Y` zq4ll+_y%66Ykgf^Ri!X+X+>se|J;GTnzE|WvXb6lVQb(@n6IEVqT4`|?!NNkDZq13 zxBjWEwXO#pZ(?0%WkE0!Ellp*nO)9XH<%w-%|lg$P=0o4X`41}gxkjyW%|J!o`ff_ z$CL3C+uCq}3l6zRM}XyMd?zdoo`!E(k8cUs88Fs%gNqbe%(&&B@mXTVv-ym7Ei%LT zGS2i*c~-{%p7Ob3$`^o)FPd_zyBKpfkopZ)^P$~pd@#=!4)Jnq-Q#C#iD0WIXX{46 zR(cwkF`)@rpc4N}6YdvmtpLTln62J|tzMvtz*hbsUq#hK@L7Pi>}d}y!ga6!*Q53L zVf+Zb7QTEGKPIMa1AY=e1*-Zqeg<#A&*JAmBRKW~vzVsW6b@)~M8h#xR3*Z&}2F`=OoAKN5^A3I&zlY!F>-t7vCE-=~suKTNFR|f^ z)elx>AFIDrX!SQGtJI?*3#J5sJpPcc_s#HC5yXmk8~y}uM-})}{25@Q>1YauXa(=Y zyYO!OIsO7{{d&9yzXN7!1O5{4Lo@IJcy$OL24i&ue}#|YuK@%+0Z6!iu2@hdpvK(c z1BxF~R$4b!1bDz_eMMzaOYSxsh6*8%ve~?aWJx) z;xS`*`>Ohy5)m!*tg7i-RZ?6IxcpL*fh!ZPaAp6hN^voWtXox0rLV>>U;(W;CISXH zLth?15Jv^!VR2b$+t`IiR6|SEULWzXV69-YyJZp$m zVC7rQtzn@O`v*{=A9fOr!%h;Cl-&;c;P^5m&JVFZP#v$ z6{BhJ>|)|b6B4zaL^VP}L)OMgHt;feor z@u(;WVBjVsxdEk&u(^oz1B{CRtIbRc(sB)Hi8_NF5lq+$WPf)JX|Rw&cFn==M&hyU7Pj+EK4%+uMgv2NmjsR2sj$h z2HOFH%5mKjirTTgU-`&&jy94`OY2~_tRdrU< zkbG{4e6<15kL9B8*UsCnO=dgsC$&Kb#*^}Oq}(Q-2cDv8@?VuQ46>Nqfo7AtAQ>1L`9{pg)ty(;3|$aRJT-_IC$XRp(Xrg&ksU5V>81+{YMzI3R+y z)=bTmtr=h>ZndUq)->zR(C`WWbji)GoFYs!xgSkjLmnW@Ez4q7QGU1Xtsx3HWJYio zOR~vB+{uE2U57ujoh(^^caqM2H#^$zXv@heGK;JsYsorrwfo2#e26?kX2I_1Eb=%$ zN;Z%u@!RBS&_d3l?G&xW)^uxDQnrPVfT25XwvcAcvhIM7r(3hZE6ug$ScM)OS}-jY zbTqvKI2%9$t z?tqWprLf$~Mwj_&;Je-F~U-*o;0STgW?p*RjZIYAv*G zvxWuXwnhi?p>QBuld`+m4#YGAYe4u9D?SjEHl$x{^UhTR4E*Qh3%`M%2@!B;cq&+U z2|>6}7ch&qvGN<9FUh_~$i83`Dk6(+RTZPE8r-UFqYjXR>&d}@+kqJnjbOQPcWO5| zOpZK4js)ilxNYTqU13#z!&fCPB*(?-xQD~#dxZ%}<0w8g!-fqa90wC}kjGBs`^!g9 z;F*6UCt+dy3^}p_TtR*b#7}4*2f0->6~*NuPy(<0fVBj)`#$UL&|cT&Kp9@aMwMc2I&MDWwu18quL3vD{iA`lAl2tf30;4MH?K zE)uQmg>f0vLtT7wsZQNuav#*J)z(A8^kk#~XiM!NqLDOidSGt%QV-fhLunZB5RRUw z5s=oKfgU7lX%vm7F*KIOp?RUm z+~rOr{#dJ$yO{P%*uDA3o80+l`<*??c$%<|CfMO3NG-R{R}C531`VT$G-*9e3OGt| z!u}SQ8~;^&{AdGhDaOB+oBVZR{OKLR75Vd;8UHJ-N!vocRb-cFx<9+L-de-gmefT; zgHk(Oj&!D<^tFQYBb@Z3f^=F3py$srW%=Q7U_tYYYEYJmW<#1c*xft^>D{D}gR=X1 zIePcD=-0L7~ZtKre+FXmj&zVe?+0QKaWCb4qAOl6#A5i zLZ5_eGY^it*1!(cMZvKk$g>~m=>iAv^l^G7_&ECujvvJ0&gckVWN=P|p{BzjOhmKj z2s#q-=Pxikz$*G2Z6hzzVmb2$n+LG1M9XQ#8d?#+sr(x54=?Vz8oI8bwR9|W^rB@j+~0Z$dP-~9zo3&) z8#)D2MGz@4+|QpWqPL)lPn#y4PH&|%s6`o_NoUd7bPkHRqtS#17 z>nrO|>pa7hVTEBA!$2mC;U)~XVmO=O9t`)kiUNWBCD}B32k=)5aHxRZP4A)i;%;;a z&!$rX7{*)I5SG}4pf%io`M&sK8k-+A3`Vfra75MwQReb@pOHbvt zAtOud_)MGDk(&oUf=uNmxdVvs5)4Pz6Nx_3fZ^T-47b@z0-WK^FDvy`c|i_!5ZGRb z=B)TDkMYTdF+M{#(r00eo5UF35o7$&df)m$wcZVk@kKtyP4GTwjJJX)UWYMmfxquv zc8u);%E-sqQD|wp7-Cxb<%YNghWKv75I=??egvyAyS}vSisQS;GVn3cZG3Uk?etSI zl5LuG#QMYr&6zx11>rH^>s0=l145p*D2D9dC|pW+LQTVHx*M{Ek>~~bIogD8M$ghO za0%T*_tGzMIo(J1(*x){+D8x3!}JK60m}F_tl=5-80IPYe!j|jZmr=zuKYF*6dQRp zzS170WBA5}$SKz5)&Ue0;4u&OxOrm^aQTJeA_(59CI#}e)^-8KW@rD?CDg&wf;+6w ztmYnkr*#-|gHSUFD*q{Lg_$=sfE;^shHT{lau5jG4`Vz@f1*FrQ}h>lnslbWg0`L^ z*)Xo(=~)=zAM_kLPd}x9(|_RIdEmESC8WSA%Ss^CAvT=?S<-%0r5v?^VGv`1|3xwx zOvZpp;WuF-0&T&q^(&j~D;1wZ2r;;LjI|?l2J9?_LTLfAc3QgtGkjuwZtb=9?4)3Y zBrJhCNZeHiX0z7%(mG`A%eS{c{jfn&IBc+XbDSV%j<@bM)>ksVqPS*!piziu^o89B zumW!+81jq3Q&i2-Iu}DQc#}fut~GQQ>MW*E3P+j42GotU^E|cwy=wSHJ?-I)0WxdvT!nPnuU+RI4F5X3rWh7I^psQmXalP4lE@h$-riDZ`d@PY;CuWS>J+^9M-_Re*@Yc zq}G8+zd)@?wv=TnwbYYOyOhC|TIvh^92b-RwNSV30_xTu)NP=30#xk#{EltfdwWf7 zka|GWd1&IpQohtlDv*Xs!=&NX55Uq-)-To>>ny}Qmx?~XgH#m6fe$$NF^GecgE_H( zySgms>MFSU=b)=k<)ya!AD7n#T|NaaKOJ=WuX(Bei~97S%V)vmzXe_XdtUngqCPL^ z^4sC^KY}hlm)C(`emVWS+s0VZeM0~K;u!01TmLdRv}x}TT)?xW{@1`oT0z;xflEWE z@(*AJ5v7C&q7=aWm8ISR^>x+tb(iB1f@+R_rAIi241*a?W*FN%@-2u|*v#jyhNq|g zbzfh4lFo#_#J;`_fEgy%c|gDgZA*O<+m_Z=UylCse)=4g0DVc&mu>XN>1X{{@^8>t z7n64YdII{x1pNvy-8Glv;5|PFAKDzKf&)z?eKI-pPP4aTI3~XGUaz#B&JIT53_Ah0 zf#*F%IXhUi#cmf3HnHM9|j-+T!%H{uB8_bk2q3-GCXbq!HXd)chOu zZ~fH2v#Fbcx<`zj2Oenv(|H%tjRcSkX+e9_<8p*$2Olt*DQh<2C`h$29PM`syrijvt#O%< z@cd87HrdUSZL*1G%b|2Wps4wFvW=(67*2%xsaOk8dkkQAc-_RhGq*!VI}ydm(P-j& zIYy3^T@mhT#{V;h}gY4(pvhTp~bwc)?FO~fQA^SxE+23Hx{`&um?0JzzP=b@; z4p)#pPmF`>lOM8W-&L5PZVe^~w&J&U~|E1N!fJ-zKh6Vx5Tb1P}M9n$hDlgpZ+ z4SwQJ+r*&+0Q@f000it`)_<|P^7C}zg~WS7VgStkAm3=%Rvzme1o7Er$wT^@Cx7HO zZSs8pnJ|2lADZx}GF8w|6FWHn6`IKJ(M65WME($f@w@;uVYn|(SlnO-flva)bE%Oz z^<^dFdBLQY*HA+>fvE8vVTa3Y?X@LGl+VR+NOWM1SSFpg@X_{;l;IvZ=^9i+{$No7$B8?RrR&Lwh-)&sw%E24H#OnqxLU3 z7>6@3T8Hj%I}F^-;ju?MA~4!f41@hBhS84nkJb?mqjh-r2SKAfARlnV@X>+<;9t?@ zM++&yhS8>V5F2CmXj35>bxF#};f2vAHIBBFkG2GsXSacQ-T~FTfb8OQ(?xEA56^M6 zy<8lv17jL37R(rdQ!`-RVV_>W1MGUS7e>jeaI!Fm}BdT4|BFuN4j+o$(n zFKm-kLmA!0NLFxpou5ls%C?@36I?gd%F+v_Nb^YFNQJ~Z;KuU1A7eW-LFUg!P$LVUT&KE`v+ii55FtL z0IC`WkPboyo1B);fjLa`zm&=GjUF`HF+@ImS?0k9SHlvwS&tEQ-+oSgrCzQabyeQp zrRBcMv03D26BOI#v_`NACF=fpPPaFT)5MDW&)QHXAGs{6um{C(9T+2<+4$aLDxqk| z+Z(E{#uS%(`$1-_W{NPN{G`bhv!#xzhLu|5sCCrAN}Xu0)QN#{+{G|B{X1c$P718l zDSV|ugGm<@Lpr8|>HNxJ@zpw6*hnywi~VNSF$*#bj@gbmj=7F`j`@xS3{PQrI>U_N zISkKdc;O}Gk&cP*cQKz=w7~&vOcMX53a>a#ctyTX+fg{B)O5bcuI!Q>OC1o4IUaB< zx9e^hz6ChoJ29zH0FGcg22z%g`14hG2UgY8`J&w@F!U_yB6JA5D=w7h3;`i!-Z3o+{bF1ff>X+MgaGU}+ zce>Hd-NW77-Qd)7p|ZEQylsD99Y4o)kyF1&m)D0kP=v-wU=R0(QSz+W`M=}g+w0kM{SU( zN%M4xf(eJ<2PhWjW3;?ZuJB^P2Vvu{17~ zf0KmLQ$BW~Bp7}e;5LXNC;f6-Ag}`6uGk(Jem@G?eTEnF5n_0MGG%*dFe-zINQ!-!4vy=JCD4tJNa(FUd0iXwcJ;^i5 zz(3FDGyIf4p|6aSr~(-4Y3mTf&lC=X0)B5^b=&S$lPWJx>?;#s4@b#YYJo3?H(nu? zZ*!nb3Zf658R$QI0sZGjcB`+c1<>Xvb~y>~bT1T+DB#m=Av_PYBMiSFgb#&%T==%F z;KJuRD2hj*bVQjSC>@c%Qx?)_NRtE#M?_V~kecG^TA0^O$zA$cqVB_5r9m#U7GlKm z;z}PxDq=H9xsw*Jqs4YnpD?1Z@B~5(K9LBZ3;=_jYVVNAu|qpv$}$X&FmfE6mIVPt z%(V128SrtM?;38{g5KC=$jTCB=^ACJze>k{{?b=b4agRX$YEbgxnFr;t@41f9ChaV zg#M$azB(@Q`RdFD~~9TDvv3TD^DmJlqZ#^ zl&6(vl#R->%5%yl<$2`=t`B>SiY*Ri_wkw}1pD8<(oysm{xAM92g|bK4t9+^KQ}!zdl!MA4<*;%@`HJDq z41d7zR)%*lyocfa48s!omf;f&|IF|ihR-p4o)L)=jS+*9a7LmSiDx8TmkuHq%V5AQteHrP`$UsI0F*2Bud`1cw8OBHI4gG9xn?na#)@jNHY@J&fGP$Wlh`XJk1eD;ar+k=2Z>Wn?`gk1+BW zBTq2$q*b&Nia#QiZ`$rzrZ^Dm62~56rmkr!C zjOM&@OvMa;EC%u66$YV7d_^}5;v=y?1!DlH+m)Z9_CkomjX7-4SAsgiNf6b=IW~%+ z(zKuDpT1|i>-?d};L5K2cU}Be=WXlq@Q&WJEt6;CU zyRR0?L+n%FgyAm)V>>Tptc75#B`|i4%^2{sn=|(L1wvKZs_lTeG)7)v5awo(e{MqIHVBB}gM5Mx@d+B<3yN{PqC}uJ2a3}p$HIH@HfT<2I|Yw^ z7|<=`biWaFzq%}4P!`xgR*M^Ca+H%4``4fsf@qL(RdSPUQ%Bdw9*y;LD=c|RS-ONC4!5A;GGQwf8hjA zbAovTi{ZF%4xC-&i+Tyl%&+Dj1oeME^bgs~KSck(U8(;Eq5oA4{r}GUKg;_cJjhpC zm19>Ss}G~hJg5Sy3hMna=p6tD7*DXVe_pBgr=a&|8hZbW_x?BUeVAP!!3C33Y!BfD zSZB53j6Hl9MCfH8^eQ8i6C&tJgx&x`Zv_Yu41@>~!^nd>WaQZ85bAp{4A>VB9>#~z z`^Stx?gM(4uhjb|(7UKBV)zF}9K3f$^xmzidP+`-J%G=l_Y!y?#QR?8eIFxk(Yy1~ z-VX?!ItaZV7Q7P|BO$zZo%bFvreA|jfd@Lmb?U1!l#8n2_G#ttw+ssQ#(1yFfpTrG z1Sf=L=jQZAxJOBCz*Gbj{6}EsCq}{qGv<|;`30EywSgHAXC{<0Gg1^Ld2_1)i-BXw zxz?t64rPuk;U!CfFM>w@HxN9}NE1OY;tB*c(y(y(=p!5LW6XsVy~VZOp;h%>`#f-b zUDcQ|{6rem+*j5EG8FX16~J95|ClwWa!dVU$ zjtdfi79mls2_qkH0eqO(t-Pw%mosUE-|36D4FuzWAONLAK``MGf~v40T4KYPxjuOV zW6tO2Eb4qiO2vN-eYS)?uVJK_=rj3}K5aOowQ1~g3nM9kJ_ir0s;VgT^U7a0blU;C z&1B>n(QWg+7o#M4M(ZSI=USMZ>-p?pz-%oTY02m3>frgwhWY8n$bLRQ2YjffP|Q+L z%+U~*`APSLTh$1S^cSfGB-9JI0Qd+2El8;KmAU8#Tnyk`Ai$NtMH|jVTh7H$-ZePy z$#pqn0=?!zuR|DtjcVvM?aI9lgI)_oudqy^*L2=%2Jdx*=oMVk#4^yXoErl@kAj{7 z$HKlS^xW~vJ&%E&%S6w>2lSlDd(PrLgD2wo4%-4kpzj6f2#4e=OLKeyB2_?S0wa*o z2O`&9B5}W9>VU*VPC^j4o)fsiCgAB)Ur{ZBcwtb1NX|IG6#PJ%ucm=;?@IsSpKLh4 z+@KcIf%XhWU_TRRXJ0~_Yp^;%n+ddM3))syY}ygRF?j*Ac>5K@fd{WR)0&eH z^?t%bW!DZYFD|R(#}muj2fHG)Ls`og7pRMamKo#4c@H%C^&>@c8s4e z=-c?(h8Egl?X+?XL!8@_kuq2&R#riAX(^Q6jc-(FX!Hj(0(nBC@w`!&;ZPh4W4xpt z1bVPX%-g}%^ZQm0m=Jz$|H5{tw^J5usf<+lIiCbJqiRwEU-A*B%N`w=4*18#US!6W ziG3sgwvoMSWZ${W*El5ku+w8-TER$d;L^}i@UCF0U|$SUla+j5tdZD3XA}Dhn8$ki zilIJn?;zN(Y;1PO+0<@U#>k{V$6}(EyTiTf@Tg*a|TkJ0p|Nc@2uer33zwi|1 zzok!|y_`vQ`ZRF-h!G1WPP38*Wx##wJaxt6A;zy0={0WQ8Wq&p%sCLIISIIBWR{rb z>5VdI?#vTn7MnoU51Yc>3W**NGllk@} z^NKsW;7*h*Tsc$i9Oo>&AX7~iaFRSzZ65+|Jnl4fS{lzcLm{8=3C?Qggmumdc9sy5 zbM|>Uezu2Ox$(Jhr?QL8uoFT+^pFK+_)fkM*ECEAddN8yzIxCCD}FcsYGuP$Fc&lI znS$B4H=y92U<%^yM-3Nfi=A`0*%AwW30z>Q1sw13F}^k8OE|O{2}LHb!2|m{-T3|v zoTx7u?<;N8M)|1oNt;2K!*w=;BQLzBfr9+C^EtaM%*@07QA06Np!3Ft$DJ?R4Ig3T zQM=)=3SRFbc3K+S9do{Ew}Zhx?(YzeGQf>a#BNAq!|$B$+6`gg8|;RVX$xw4vBQSh z_!u+?Y!aCFr?~1o4!7$VC62_w{X5`bG=~d;>9CjBr>@~oo427^=zgt_dY;af_tO#1 zJyO29Q2vTecg&}?I8Xjo8$vDlw0w{*(ypOP=mLC7Z6Osn3+W8UTx|v&iB@Z+P@26I zt;D%t-p@j9(jw=duf?Tg?(GwLMy7`;uYMax}r^j61gSAw&-79tIIB}3(F5n85>qs-OPbv2#kYK6P2 zuc9UL5%qu?svLJ^$ls`@V;J;g&Ll0<)!Wra zJ}zas`k{xE6H+JjC&wJvJ*=0aUHNF0s{n6SKenE=QXxoSBto2y%Y`F=mvY1UUzRV8Y=V5ucrukotO!3^)RAOxOkLGGIYy5%PbLEs&&^KiSo zyDiwy0{{08Y;0H_MnLD6@q0UNuzq1Aff48e5+2~hu4DK^Zu;<776cfe3Negq6o>Ty zNo@sDTW5Hl0KNDMqsyzGP2j|2zd_+!glcKE`}lB`Zgo)ipsQYuyJnf;P4;+Wx~+r~ ztH8-Y*fAnJ7a_<7sw{Z}@$x0EG0g+9w03DUBrbQ|M$fqx+0oE0Mqc63(5rmh<#0F98c5cRh9CZa zCEWYohiV}*ZuOsdxsdv0C1DT1Rp43?7=mjxTm}MUgL<62|iqKnV}6KLWps|fZB;1)cA4)_VJ{{#2`hf4~9D$mvWILV+x zMy|K$X|9JZ%g%iW@y)RJLC_5F^}TBWJ@e!GrCh&3ej5A&dDsW9TpvL$mfKzb*(ldG z&@!GTinfXh`ax{U$=T|*1B$aLe`LHP$p>|=^zE$$l3 zcVcW=|Jo?)vv5CA^;LDbtDiba{a9V7&Cue(8zi_|xst&Gfr$Z&!3`Oh1+chaJ;5qs zFjX)wu=EZ#Ob0gg0X<%F}j+5#<-cet)b?Px7%v=Pt_JMb8t0!0DgFH$<95>3AF{#4h5cP zxLQGL;1@=8D|`>*g4XaYaNZpdPA7gnytDY#u0GKB0mnq(wutTreipfU<2-c=xJ-}8 zzq$B9wj3x-CmX@Ha{r&hKbd5`01g~VB}fbYHrN007C2r15_hp%xg(w`TJlw4_Xc0_ z`|XPBz?K6_c~)#v=kSd%?z(yR@c9N_gvq@>D8f|kEIfkJc8l;1VbyPhSI|G~^F!-N zq6P0Yz}yCY!LA141k8-+9O$bJUxC@$D7xcl=LbKDgJAyzOVDqQ040+wFpdCuegHti zhwFl~_0W4E^aZ@|X7CDD5k!N)Fz=Lq1Rk1qNse+h0o?$PIe>z|!fxarzs}(tjN^o@ zhKIQtPL#g`fxe0d(|K^1HQJS|#mfhjJZCddIVK;$ryO&jgr_$Yq%TMHc(Y?7S|NX{ zE(b;0MCYmpQQZoYJxad!#x=+S3k!*`MB0cKB(@4D7H|k#ktZj zbiaI<&UYn%(w=tARG5P>sGX2JyLax@zab{q0$_!AB*@8$LlZ{sumI3P|C2{-d|K+(AE!;s$r>jYAp z%du-0I4_*aVKQz4hM(&afNX%mI|W$m$hBu7SJvemRf1Ol>;_h_C)|JfEJy2Ld_eb3 z@skw*qsewqa=0Y`I2EoVfKvgKx8R@@v^oNAstUqy1-KbB>25fp4hH;XIJW#6SF~q@ z7Y57xKFVeWYHb->etwqx2HJRQKtl^)dQb zy-XjckJrof3cXUV(yR3edW~MI*Xi~8M17JzS)Za$)u-vV=+pIE^%-#QZl=%FXX&%` zIr?0Eo<3h+px>r1)EDWu>x=a}^gH#t^t<(Y^n3OD^dd)%W>6`TD^%wLP^_TRQ^;h&) z_1E;*^*8i4^|$oR`rG;z{T=;X{XPAC{R90&{UiNjeJfo5i4N%GBqKjD@-ri+7y(%W z0{E4YGmL=y{+*GtjQqjKIYz*7|Ha7PjKKE6c}5YVm{Gzg+@C~ZRA$t{sKThqsK%(1 zQ5T~jjOvWK88sL+8TBw4%4is);fzKw8p&uAMxz*wW;BM;SVrR*ZOUjoqX~?98BJs~ ziP2<6Qy6W==v9n1XS4;QEg8L<(Q6oO#b|3r+c4Ue(RPfcGMdI{I-?nk!gB^XFba8JB?ZIeIMsH-a7o)uy?ZfCzjP_-; zAEW&l9l+>7MspY)#Aq&~gBi_ZG@sESj219Dl+j^~4rjEG(GiS}6#W-53Z+aZg6`~) z24RnV1A{b(9Qdw=$oHhB2enD%wPE08`8^s^gTKgt`)zgsg8OI( zZyHAAZ&c44HS)$Ys)3=U3zFD>hhNx{c74hlLw!@w{Tfo?Z9|_>RUCAEhXS7S=1I9= zx{VW@3Zo6sf-5f=duk&~7fb_x(?G7{;8ge%d|ifMr}2*d!R&MlVl6Z1&J;j8xLH;s z1fs zqFtlBqkQh_rwvi|%KMdv}Nu8jIaur%64OO0j*yz0S zK7fo3P^ozWK*R%%*~%v8pIRwo$L7ihmDgM@sNdYJ7Aha0mCCcKsXpOs<|?3blrO2} zEL0DmS>WQAx!g)EosQ~xPHQbsXz^0Z{@fcvcIgi8$Gh-SN^ox+JyGuev%p&d)N9Ri zJrJ}bKuX~K!OoX+*VqSq^9wwm1*vGr0qg(|4|ooG0IZP5{VjK|j|g8qNECh^;FXx* zK}k4Aq6NGXlvG1LjYo7&o(GqpJQF-Ksk4BI0UV`G6D6PPc`yjIqPzezUqphH9J=vh z&(}CWRe5bF6p{k4JqxKfveW`x2jK_6!yNA3A>sjyD#}g)_RZ$bdjmils7fUhd4ldS z0UXu};0idR53fJvxila*jAIVK5D#$_!{ZsS$M!h^Ks0$`uuxiMZ&3c%nU28E{p zFSc@E0664bM(z^$2|VEIP(8{ER{?lHWh+nD0ThBX+%k?(A-oTR(p3&x}D-8;s6I7bDx~YIHNY8$FDk#*IcVqqot=xXI{i^fUS!1B`)2jxor{H3l1b zM!qq`C@_W^!;IlZp)tZ3X%rbZ8^y*bqr@mRe8y;Fj4{?IGsYR?jdG*Hs5GjKYGZ;? zW7HaTM!hl7m}E>grWjL=X~r$abmLZI20T`U88eMp#%yDbG1r)9%r_Pow;2nKMaJ#M zV&e|uPU9})ZsQ)~UgJJviLumJX54Q)U@SLQ7%Pnjjfad?#%g1YvDR2;tT!Gu9x)y@ z9y1;{o-j5TPa01dPaDq|8;xg;=ZsCp^TrFti;Vgh9nI(%M#nN*#^^Xk$1_^aXa%E{ zj8-vP&FBP1YZ$F%w2skwMkg{liP6c7PGNK^qth6@h0*DZ-pc36cQAS3A3dM~5*F}j4&rHn3P^nOMk zV01a7D;QnL=!1+t#ONwUS2MbX(Y1`OV{|>E4>S4*qmMHB7^9Cf`UImJ7=4n_rx<;j z(PtRl$mp|-KF8=LMxST&1x8`uFERQuqpvXfDxk45Tl0~J;LZ$j2>n5Yev6e^jk)cF?yWQ?-)J7==Y5N!03;Ro@DeV zMt^4X6r;Z|dYaK+89l@3Z;bxV=vhYpVDucLe=_5 zl7mU`AS{(h8k3w%axp1{Njj6jDV#|WOp0Vu6DCD5DVj+!Op0Yv z9Fv+dDV|9QO!6`*kx5BRN@h|DlbSK@?|b{-sJW_hsFgI(rf4_3_6<|F1= zcpTh==5`O(%qKj!hsiwnIu9o1&mMfc2M_V!dGMsQy=IOF-{8U39z54v?!l!Ve47bG zTAPc_yF9qN`Iq^Y2Vd{O8Rp#{+}C`{eAV1#KJUT(%u^oR-#lo34Ns=qX>Rl21?H3H zGakIigHz3|9^BJ|OFX!Pd4~tzYJOsVY(DG3`5sI?*x|ty=5Bb9-J|9==9lIsc(mLy zbBPBRnxA{{4D)xhxd#vMVC=yQ&DTA6y1CZ8--DCP%^p0)gDnqkZyqoo^WaSDJ5na90oZnXkc<`No<1J$S77Av_#!wfT+Y4^PC~;K2pvOb=E)c$WFM2M;x0Ha{~TFprv<9t@I_%})g~H0O%!z5RMY z5HK_s1>QiW&%DFDbB%eYxD9*nuJ&`#_&t^3=6um88MQ*GaL}bMJk%^7m7>w`=+3XS z)>>z6I6P)^vNjtYsQDB;HuDoG>p2RK#yszghT4F1=k@U5%Nw12;Ng`6;lY>r&Y{ji zc=%q>XEcijLRgneE8T{*6qt|jnD%V%A0xju32a~*g6;yNFqg+zoj35gDg3yBZ$ z!lNsjg|rB{I;3q#T1W;wuCgqoCS+R3^pLqB3qx)Xc`)R$kXJ*tguEN_e#l25TSIn- z>KOMq-2BAI=^yfp6e>;Tt%OI3r31R#u2+m)E!2C4` z%HP)y!^153qb!fZV=Unzmio`|*venwft6?VbM7YYMEBM1RCl_&y}P43(|xV`dUt1c zfqT09F850JBkpJ2Z@IU+_qzAF54aDxkGPMzzjl8MPWxB)Z{UjE;Bw=^wKfB{dNsJt zF5n`EfwQXw_q70A)a~G&?gH2J063Y~;X#xiz#}NP!UHG2gvUpof=5T5F@A^VvbaqT zEVVdT)g9qcjs4&ejHBU^iqqktiFd-vd)nLxn!U+~J6dB%9kJmWnTo+{4-&qU8O&m7MKo)w-4J*zxxJWqRG^L*g> z$aBbZ#BTxgTf=+M~ErlIkn-q57bPNBm?M}!uI7KfIE`a;KqP6%BS`gG{# z&~2e#gnkoxI`r?*^IL*H5jREjix?7dbHu2K84)aER>Yi$xe@atZi`qQ@p;6ah%Y1d zM;wee9Pw4e*Ad@G{2K9FWb?@Ok=c=bBJ(3lB7Ko#BFiGjM^;2uMNWvUjjWHH6nR_Z zJ&_MYu84dva#iG-$d4m;M;?m&F7o@xA0vN?JQaC5@=WCKk$*(~75PsSrHQjiNE3IH zp-pO=+|guplP8;OZE`G1i;9d&ifR*eeN@+|?oqv?Zi?y~l@pa4RS-2SsxWF~)Xh<& zqDrGGqHc|{qGm?Tj#?hIF6zmsSEJsEdOzyJsE?zLNBtU&qeG&@qZ6X9j&2p*COSPj zGrCiB=jiO{kAB4#MsHPQ)6$5 zWwEnjABcS<_LI+NZir5AL7o${n<3CX-w0&rtwV^nkF_)ZhCFg!lome z-rRIl)6%A+n~rT-+w{(+cQ?Ja>5`^Po8I4adDBfze~g#oW8z!IcZ|=9zc&8*_#5K8 z#CMJF9^W&*SA6gIo8tS$4~ox^FN!aXA00n7eq8*7_z&WD$A1yOH-2CI;rQ?3PsINa ze=`2(_+R3GjsGqFZ2YOsD$il^m5YMNuMU|P5L_NWU?z+ zPd1W0$)U;N$&txzlLsf~Cl@3SOD;?vnOu}yoIEr75FR#-@x*sY{uj zG9zVK%EpveQZ}b-NqINrgOra_j;8#Wawg^Xls{7bO!+(Id^6mPHq)AgHfz$XS+g6O zb!pbMS@&i)HtXH&re^(`jcj&vvr)}_|F5RAeskhrpmlLrY=I($(o$%$@nqxK&Bk}) zw(;yvluTwP8!|&iaHqJtyStX+QgjQ&i)(Qy@L)%AtL3>5}AMGve9qm8bN7^Ua7kV9f z0lhiBCA}5BEB$9Woz9@M=vsOuy%)U?y&ru5eGq*JeJXtseF^;?A&Kk;^!CKDRz}n3^!Fs@Y#CpPd#(K_r!Ft7R#;#;%**P}G z&a(+N#qP!K!|ul(z#hmR$sW!AmHiug7kdwTANv6N5c@FuDEmD7BKs2i3i~$uG5aa| z4W}-rKBpn4F{gmjjMIWs$Wd@gIb|F*N6XQ3$~i`knd9J4oZg(ioc^4FoWY!-oZ*}i zoN=7(oE@Bd@W=5d@F(-9@Tc)-@;C5L z^Uw0n^Dpu*^RMx5@Sh5r2$~9-3kn6T1Z@QE1U!LL;1+lUK0#1WDF6lC1%m}c1;Yg+ z1)~IG1mgwE1xE$P1+{{cg42R?f(wG{g8u{`1)q!S6xS`TU)-qpr{ZvNRdJ*^UYsaS z6{m}l;%sq`Vyrk{Ocf6*9#cHNcvA7y;u*!Wi{}tB@vS2w6grP$^UkbwYzMD@28PAt5A%y@h>+Glg@6^Mnh8i-k*t>x3JG zyM=p&H-)!_cZK(a4~36}PehGH1)^r6mZCyYYf)PfUj&N~QH>}kLPdEIA?hXSE9xg2 zC>kspE*dYIC7LT*AX+S1CR!<4Em|+yEZQz^E-nHR2uOo#LzF>*AZ@+v2~) z_rwn*^(74@jU`Pb%_J=(tt3o|MPidUBrb_Z;+F&^-6ex1LnXr{BPF9GV2|-qOC(snW&L zUD7?${nCTd!_s5Y6VgAV*QK|lcck~E52P<-&1HqMHnMiI?_}T0ew1~U(PRu6TgHiotOBa?dE?ru>ymVFR+S2u< z8%xh9>na;4zk+1S7Rpx2Zt8mtY*X3RvR}(~mhCFrQ?|eCQrY{m4`rXqzNqS|8mJnn zI;%=lWh#wIuQI3rm06WgjZlqJjZuwLO;Al%O;Jr#ZB}hl?NIGf?N;qo9Z+3SeNop@ z*Hbr8H&Pd|CA5A~a0L>uH5Y2GSNX=-?Sj_^>Zp}W; zLCs;!5zR48t>&J#K-)~)LR+Y9t!=Aqr|qDXXyw{ctxBubYPAL}s2!jkq#dFirX8Uj ztsSdfsy(3nU3*k}LR+gnsXeWIsB5BYs%x%mscWrkt81@g>5Mvy&aQLm+&YiWugmGC z>Za>v>SpWa=@#l1>6Yl0=?>}+>yGJab${qi>CWh$=%sqOzErQ$YxFw3UJvNadaK^1 z_vr)rVfqpJ(fYCa@%l;nDf(&pnfhh=mHO5Cb^4w9L;Az|Q~GoIi~7s@tA_f9Muq}I zGeZkQD?=MYTSEs!k-=av8Y~98!C`P2Jcb&>IKyni9K(FW3d1VHYQql00mBKyZNq=% z4a&Qgv&#kL`f^*jr#w~;mFLPomVW{20u6x1KvSRv&DbAb84B48=70$2^K12zI%fbGCvqsS;R%8gp1-e@x>jNOe{BW@gPoMT*RTw`2s++;j!ykNX! zykfj&ykWd$d}I7=5A)1nP*m*OU*X3!|XPD z%>grRrp$fJ{mcW*gUmzB)6EOa`^*Q-XU*r$f0?hCubV$x>R1|Dnpm1zT38A#tt~%T zx>ytzi^XPfS}H6)3u)1P>W8EhG98E% z^2qYa+SJ;?+R6HZ^(U*&T5dI2EmphLX?0s8*0?okg{+9R#!6WGSo>K=S;tx@SSMSz zShrh$v+lC)weGhbv>vmbu%5GCv0k%2vOcx`V|`_7V{2#o&eqBHgRP6LtF6e!v*(g7JD3i(gXa)9gbuAk z@31*49iRhoWF4p@@0jYC;h621>zMCY=veI7=eXr~=6Ko!gu{oV%RYoHw0! zoPRs-J0Ch9JO6QhbTx4`bG3A}cF9~Nt}>U}rE?ivfXn0ZyMnGt7vzFnLtGPFlU>tX zGhKUJ`(1}zhh4{9CtQEHF1jwc?ztYip17X7+qm1gzjJqT|KRT8?&=n}g>JQ5=Pq}f z+*vp3&btYBFLxhzKle2E4EIv^3ioRFI`=8}8TWbjMfYX*RrhuGOZV%FHWghex>e9C zm=%@^dxfi_qQX}Zs0dYH75R!06*DVlSInzeSh1vHZN>VEO%;18PE?$$xKi=bQ`b}9 z)5ufcY3^y~De^Eq91q_k^ptvR9*4*6@p=NDs0a1*^bnq2p1z);o~fSco>`u`o&}!u zo_(H!p2MDFo?6cZ&wbBB&lAsc&r8n-Z!>QTZ!7P&-uB*~y%Mk7Tk2JLwO+F~?5*-f zy$Ns1oAVCx4)G56j`WW4&hW1EuJNw-Zt`yR?)27rPkK*#&v`F+pLsuj)uz_>eTAfa zt$ba5Kl_S&EFae=@)>+apT%eQIekH2wXepP^Y!%MzCpf8zNx+$zS+LHzLmb;e7k&m zeFuEM`)YmHd^de}eD{10{SE!?{T=PP)~Kk4u7@8_TF zU*ccxU*%ux-{3#(Kj**bzwE!_zvjQ`e;249XcQ<2Gz+v0v<|cla0B5$WuPh$4Zr~; zFd{HIFfK4LFexx4Fg>t7a4v8m@K@k+;9B5j;8x&H;9lT;uprnxSQu;*Y!@sFvVz>8 zASendgZdy4GzV=#M=%rY5yXOckO)%2KEcVsEx~QUUxU8|cL(7j7SBgxO(UxHv2hmxoPZYuFKXhZEsc7!GH` zJ;EcxGsAPj^TUh6OT$~jzlV>8PlQi~PlvCCpM_t9Ux(j@-&fYJY+Ko(vQy;`l|NN- zD^-=+N<*cw(oz|%L@V=^WM%KlzLnD}7gTMp+EKN$YERYvszX&rs*Y9FR-LRmU3ISN zLe-_JD^=I3ZdTo?`n&2u)#IvXRWGVuRlTYDx9Y#Dk5ym5I$(XU5m*2=16zWvz&2o8 zuszrj>30kS|Y$Ona>1eAlNpbFH22G9taK^y1!S&!Ka0|E{ z{0-aPRM%jpQOdBSRy< zL`Fr%M8-#^L>5QZMAk<(MYcqCN6tkqMlMILMQ%p!MD9f%MxI2TM_xw$7kL})6lF#^ zQC?IK6-LETX;c;sMk~L9v$1G0nu?~QgQ7#CE268TYoqI<8>5?}Tcg{eH=?(re@7og zA4Q);pGE(PzKVW`HH)>3wT^uoYai

l$OnI5A#K6HCS57!s?A^@yRdp0RvvW^7Ju zUTi^ZQEW+US!{W1OYB=!+7I(tN6F^_VMrHUE}Py zG_Hs%rfWW0C0Z@hneV0>_VSbSZ4V|+_|dwfTHXMA^jZ~Q>~ar{~Q zMf`RAP5j^Z`}l|W=S00kvqXzT`-C7NN=OrmgfgK{=n~}#Q^J~XB-{ya!k-wJ7?K#4 z_$4tSF)A@8F)lGa@oQpdVs~P1VqfAw;!xsn;z;73#H+-c#Jj|QiI0iT$#0VNl8uwC zl5LXTCySD-BsVEYijvZ#JQ+`RPo|SdvL@Lhi6(m{iR6Ifh~)U>q~z4(jO483!Q|oO zv1D!XWb)7CndG_T#pKQ8?d0R+>*U+y`{c*um+p1C7k2-?JFPpbyC`Kz*;0;_JLOIJ zQ=wF4Dw2w&k|`(!r!rp!bGcN{6p^A*eNz2X15-m%!&1MbMyAH3#-%2vCa0#QW~OGR z=B5^;7NwS?mZestR;SjbHl{YGwxxEYcBb~E_N5M{4yTT#YE!3DXHw@=f2A&`uBC3K zZl~_1?x!B5o}`|oUZh^9-lpECKBPWD-$3=C22f+D0BR1kgjz#wq4rQm=zHi#=qIQf zM1vR*3*tfoNC-(F8B_u(AvL6f${`bEg&dF@@*CunN|~ z2G|IjVH@m(D_|cSgu^fhN8tqA9ZtgtoP|-iCyc`++#Bu(4}^!n!{L$eXm~6<9-ahG zfv3Z>;JNU8coDo5UJkE>*TC!Hjqql8E4&^44c-Osf%m}&;luDTxE4MIpMlT87vanB zHTWic2Yyn0rTTjHt?Ikg_p2XOKdt_!`c?It>UY&2sy`!jkorg?qyTA-6e4YqcF1?g z_sEY(SA>Qz5H`X?iV-m)LrRb`M1$xN05Kyr#EDcOJ|u`#A`v8xbVt$%f@BdC$s;7v z8|jA(M1~;4k&(z4WIQqnnTpInW+U^Eg~$?QIkE~_i)=tPBioQ2$S!0rasc@qIf|S> zP9mp~bI3*HGI9;MiQGZ%ArFx!$aCZ+@;~HXodDE$1)c)cQa2j z?=v52>ejTZ=}^|-Q&yv{vDEl$qBZdvq^72(Z_VhM=`{;#*4AvV`Mu_B&Gnkc zHUHLp%ob$7%hIyNSxwfK4P>EgK07!&E;}hZJ3BYKI=dr#B>QLfboN~KTK0POR`yYD zY;JsRQf_K)Ms9X)Zf-$tac)^|MQ(L&U2bD;OKy8^M{Z|scWz(qK<@Y4(cJM|ZSGX= zOzwQ{V(wDzO72?jX6{bzUhYBeaqemEpWLh5o7}tHhumkh4q6{=gchL9(L%H}+7|7A zc0xO&UC?eQ4P~Hgl#2>bAu2)TXbD<|YEV52pk~yDI?;-+Myw!OiAK;EnnWSA8qJ_t z6h(WY1lkMji}ptcp+nK(=ty)7Iv$;fPC=)kGtoKdJai$t1YM4F*?S?*ccBh#>AKmE5XVz4W`Ec%#7JEC+5bySO5!Ql~@Fe zW8JYdhG1C?#qt=5^}_mM1F*r^Fl+=i8XJdA#HL`=v02z$Yyq|iTZ*l~R%7e1jo21! zJGKMch3&=mV~4QA*fFdYJBj^?oyD%^2jmCmhvi4)N9V`oC+4T*r{`zo=jIpW7w4Dd zSLWB`*XK9ox8{G%@67MX@6R8~AITrj|B?SQe>Q(1e<^=8eT;C zx8p9{gZuFiUWG^T1pal0jA!s3IELdmh4;bxDy zDZT<?)gKa3y4Yw=U~8T>r{7k&l5j^D!X;`i}K_*48J{1yHN ze}{j-KNEF``a~n5fM`w>5^acf#COE^#E(Q*f<`b1Ho+r`2{9ofN{BK-L+A;BFcUVy zNmLL%B1lvc5h6}>C(;B$WC@hW6C}}_=tm4Bh7iMvk;E8cJTZxwO3WZ;6Z43L#1djT zv5HtrY#=rh+lU>+E@CfnfcTv_N}M205~qoC#6{vVagDf1+#&7}4~ZwlbK)iOns`gR zCq59L$#2MdU(c}{lTFDMWFgsxY)5t=JCU8qAIYD{ZX}H?B3UGdw z9cdr|(nMNG2k9m~q@N6tm1KmBkqI(IrpaouhRl%|iIXJRi|j-8BL|X$$zkL#oUA2J zl7EtC$@Ao2A zHdH&R1J#N8f%=K+M$st-#iF>BfD%#?N=7NDQc6W>DLqwA87T{8qnwnR@=!i1NQJ2? zDniAmBn440m7#i27?r0;su$Il8bA%AhET((U#OAPXlfiak(x|RrKVFesX5d - - - - CFBundleDevelopmentRegion - English - CFBundleExecutable - ${EXECUTABLE_NAME} - CFBundleIconFile - - CFBundleIdentifier - net.sourceforge.SheepShaverPrefs - CFBundleInfoDictionaryVersion - 6.0 - CFBundleName - ${PRODUCT_NAME} - CFBundlePackageType - APPL - CFBundleSignature - ???? - CFBundleVersion - 1.0.1 - NSMainNibFile - MainMenu - NSPrincipalClass - NSApplication - - diff --git a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.h b/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.h deleted file mode 100644 index a69834bd6..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.h +++ /dev/null @@ -1,70 +0,0 @@ -/* - * PrefsEditor.h - Preferences editing in Cocoa on Mac OS X - * - * Copyright (C) 2006-2007 Alexei Svitkine - * - * 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 - */ - -#import - -@interface PrefsEditor : NSObject -{ - IBOutlet NSWindow *window; - IBOutlet NSView *diskSaveSize; - IBOutlet NSTextField *diskSaveSizeField; - NSMutableArray *diskArray; - - // Setup - IBOutlet NSTableView *disks; - IBOutlet NSComboBox *bootFrom; - IBOutlet NSButton *disableCdrom; - IBOutlet NSTextField *ramSize; - IBOutlet NSStepper *ramSizeStepper; - IBOutlet NSTextField *romFile; - IBOutlet NSTextField *unixRoot; - // Audio/Video - IBOutlet NSPopUpButton *videoType; - IBOutlet NSPopUpButton *refreshRate; - IBOutlet NSComboBox *width; - IBOutlet NSComboBox *height; - IBOutlet NSButton *qdAccel; - IBOutlet NSButton *disableSound; - IBOutlet NSTextField *outDevice; - IBOutlet NSTextField *mixDevice; - // Keyboard/Mouse - IBOutlet NSButton *useRawKeyCodes; - IBOutlet NSTextField *rawKeyCodes; - IBOutlet NSPopUpButton *mouseWheel; - IBOutlet NSTextField *scrollLines; - IBOutlet NSStepper *scrollLinesStepper; - // CPU/Misc - IBOutlet NSButton *ignoreIllegalMemoryAccesses; - IBOutlet NSButton *dontUseCPUWhenIdle; - IBOutlet NSButton *enableJIT; - IBOutlet NSButton *enable68kDREmulator; - IBOutlet NSTextField *modemPort; - IBOutlet NSTextField *printerPort; - IBOutlet NSTextField *ethernetInterface; -} -- (id) init; -- (IBAction) addDisk:(id)sender; -- (IBAction) removeDisk:(id)sender; -- (IBAction) createDisk:(id)sender; -- (IBAction) useRawKeyCodesClicked:(id)sender; -- (IBAction) browseForROMFileClicked:(id)sender; -- (void) windowWillClose: (NSNotification *) aNotification; -- (void) dealloc; -@end diff --git a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm b/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm deleted file mode 100644 index 29b48305f..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/PrefsEditor.mm +++ /dev/null @@ -1,347 +0,0 @@ -/* - * PrefsEditor.m - Preferences editing in Cocoa on Mac OS X - * - * Copyright (C) 2006-2007 Alexei Svitkine - * - * 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 - */ - -#import "PrefsEditor.h" - -#import "sysdeps.h" -#import "prefs.h" - -const int CDROMRefNum = -62; // RefNum of driver - -#ifdef STANDALONE_PREFS -void prefs_init() -{ -} - -void prefs_exit() -{ -} -#endif - -@implementation PrefsEditor - -- (id) init -{ - self = [super init]; - -#ifdef STANDALONE_PREFS - AddPrefsDefaults(); - AddPlatformPrefsDefaults(); - - // Load preferences from settings file - LoadPrefs(NULL); - chdir([[[NSBundle mainBundle] bundlePath] UTF8String]); - chdir(".."); -#endif - - return self; -} - -- (int)numberOfRowsInTableView:(NSTableView *)aTable -{ - return [diskArray count]; -} - -- (id)tableView:(NSTableView *)aTable objectValueForTableColumn:(NSTableColumn *)aCol row:(int)aRow -{ - return [diskArray objectAtIndex: aRow]; -} - -NSString *getStringFromPrefs(const char *key) -{ - const char *value = PrefsFindString(key); - if (value == NULL) - return @""; - return [NSString stringWithCString: value]; -} - -- (void) awakeFromNib -{ - diskArray = [[NSMutableArray alloc] init]; - - const char *dsk; - int index = 0; - while ((dsk = PrefsFindString("disk", index++)) != NULL) - [diskArray addObject: [NSString stringWithCString: dsk ]]; - - [disks setDataSource: self]; - [disks reloadData]; - - int bootdriver = PrefsFindInt32("bootdriver"), active = 0; - switch (bootdriver) { - case 0: active = 0; break; - case CDROMRefNum: active = 1; break; - } - [bootFrom selectItemAtIndex: active ]; - - [romFile setStringValue: getStringFromPrefs("rom") ]; - [unixRoot setStringValue: getStringFromPrefs("extfs") ]; - [disableCdrom setIntValue: PrefsFindBool("nocdrom") ]; - [ramSize setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; - [ramSizeStepper setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; - - int display_type = 0; - int dis_width = 640; - int dis_height = 480; - - const char *str = PrefsFindString("screen"); - if (str != NULL) { - if (sscanf(str, "win/%d/%d", &dis_width, &dis_height) == 2) - display_type = 0; - else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) - display_type = 1; - } - - [videoType selectItemAtIndex: display_type ]; - [width setIntValue: dis_width ]; - [height setIntValue: dis_height ]; - - int frameskip = PrefsFindInt32("frameskip"); - int item = -1; - switch (frameskip) { - case 12: item = 0; break; - case 8: item = 1; break; - case 6: item = 2; break; - case 4: item = 3; break; - case 2: item = 4; break; - case 1: item = 5; break; - case 0: item = 6; break; - } - if (item >= 0) - [refreshRate selectItemAtIndex: item ]; - - [qdAccel setIntValue: PrefsFindBool("gfxaccel") ]; - - [disableSound setIntValue: PrefsFindBool("nosound") ]; - [outDevice setStringValue: getStringFromPrefs("dsp") ]; - [mixDevice setStringValue: getStringFromPrefs("mixer") ]; - - [useRawKeyCodes setIntValue: PrefsFindBool("keycodes") ]; - [rawKeyCodes setStringValue: getStringFromPrefs("keycodefile") ]; - [rawKeyCodes setEnabled:[useRawKeyCodes intValue]]; - - int wheelmode = PrefsFindInt32("mousewheelmode"), wheel = 0; - switch (wheelmode) { - case 0: wheel = 0; break; - case 1: wheel = 1; break; - } - [mouseWheel selectItemAtIndex: wheel ]; - - [scrollLines setIntValue: PrefsFindInt32("mousewheellines") ]; - [scrollLinesStepper setIntValue: PrefsFindInt32("mousewheellines") ]; - - [ignoreIllegalMemoryAccesses setIntValue: PrefsFindBool("ignoresegv") ]; - [dontUseCPUWhenIdle setIntValue: PrefsFindBool("idlewait") ]; - [enableJIT setIntValue: PrefsFindBool("jit") ]; - [enable68kDREmulator setIntValue: PrefsFindBool("jit68k") ]; - - [modemPort setStringValue: getStringFromPrefs("seriala") ]; - [printerPort setStringValue: getStringFromPrefs("serialb") ]; - [ethernetInterface setStringValue: getStringFromPrefs("ether") ]; -} - -- (IBAction) addDisk:(id)sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - [open setCanChooseDirectories:NO]; - [open setAllowsMultipleSelection:NO]; - [open beginSheetForDirectory: @"" - file: @"Unknown" - modalForWindow: window - modalDelegate: self - didEndSelector: @selector(_addDiskEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _addDiskEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - char cwd[1024], filename[1024]; - int cwdlen; - strlcpy(filename, [[open filename] UTF8String], sizeof(filename)); - getcwd(cwd, sizeof(cwd)); - cwdlen = strlen(cwd); - if (!strncmp(cwd, filename, cwdlen)) { - if (cwdlen >= 0 && cwd[cwdlen-1] != '/') - cwdlen++; - [diskArray addObject: [NSString stringWithCString: filename + cwdlen ]]; - } else { - [diskArray addObject: [open filename]]; - } - [disks reloadData]; - } - [(NSData *)theContextInfo release]; -} - -- (IBAction) removeDisk:(id)sender -{ - int selectedRow = [disks selectedRow]; - if (selectedRow >= 0) { - [diskArray removeObjectAtIndex: selectedRow]; - [disks reloadData]; - } -} - -- (IBAction) createDisk:(id)sender -{ - NSSavePanel *save = [NSSavePanel savePanel]; - [save setAccessoryView: diskSaveSize]; - [save beginSheetForDirectory: @"" - file: @"New.dsk" - modalForWindow: window - modalDelegate: self - didEndSelector: @selector(_createDiskEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _createDiskEnd: (NSSavePanel *) save returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - int size = [diskSaveSizeField intValue]; - if (size >= 0 && size <= 10000) { - char cmd[1024]; - snprintf(cmd, sizeof(cmd), "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", [[save filename] UTF8String], [diskSaveSizeField intValue]); - int ret = system(cmd); - if (ret == 0) { - char cwd[1024], filename[1024]; - int cwdlen; - strlcpy(filename, [[save filename] UTF8String], sizeof(filename)); - getcwd(cwd, sizeof(cwd)); - cwdlen = strlen(cwd); - if (!strncmp(cwd, filename, cwdlen)) { - if (cwdlen >= 0 && cwd[cwdlen-1] != '/') - cwdlen++; - [diskArray addObject: [NSString stringWithCString: filename + cwdlen ]]; - } else { - [diskArray addObject: [save filename]]; - } - [disks reloadData]; - } - } - } - [(NSData *)theContextInfo release]; -} - -- (IBAction) useRawKeyCodesClicked:(id)sender -{ - [rawKeyCodes setEnabled:[useRawKeyCodes intValue]]; -} - -- (IBAction) browseForROMFileClicked:(id)sender -{ - NSOpenPanel *open = [NSOpenPanel openPanel]; - NSString *dir = @""; - NSString *file = [romFile stringValue]; - [open setCanChooseDirectories:NO]; - [open setAllowsMultipleSelection:NO]; - [open beginSheetForDirectory: dir - file: file - modalForWindow: window - modalDelegate: self - didEndSelector: @selector(_browseForROMFileEnd: returnCode: contextInfo:) - contextInfo: nil]; -} - -- (void) _browseForROMFileEnd: (NSOpenPanel *) open returnCode: (int) theReturnCode contextInfo: (void *) theContextInfo -{ - if (theReturnCode == NSOKButton) { - char cwd[1024], filename[1024]; - int cwdlen; - strlcpy(filename, [[open filename] UTF8String], sizeof(filename)); - getcwd(cwd, sizeof(cwd)); - cwdlen = strlen(cwd); - if (!strncmp(cwd, filename, cwdlen)) { - if (cwdlen >= 0 && cwd[cwdlen-1] != '/') - cwdlen++; - [romFile setStringValue: [NSString stringWithCString: filename + cwdlen ]]; - } else { - [romFile setStringValue: [open filename]]; - } - } - [(NSData *)theContextInfo release]; -} - -- (void) windowWillClose: (NSNotification *) aNotification; -{ - while (PrefsFindString("disk")) - PrefsRemoveItem("disk"); - - for (int i = 0; i < [diskArray count]; i++) { - PrefsAddString("disk", [[diskArray objectAtIndex:i] UTF8String]); - } - PrefsReplaceInt32("bootdriver", ([bootFrom indexOfSelectedItem] == 1 ? CDROMRefNum : 0)); - PrefsReplaceString("rom", [[romFile stringValue] UTF8String]); - PrefsReplaceString("extfs", [[unixRoot stringValue] UTF8String]); - PrefsReplaceBool("nocdrom", [disableCdrom intValue]); - PrefsReplaceInt32("ramsize", [ramSize intValue] << 20); - - char pref[256]; - snprintf(pref, sizeof(pref), "%s/%d/%d", [videoType indexOfSelectedItem] == 0 ? "win" : "dga", [width intValue], [height intValue]); - PrefsReplaceString("screen", pref); - - int rate = 8; - switch ([refreshRate indexOfSelectedItem]) { - case 0: rate = 12; break; - case 1: rate = 8; break; - case 2: rate = 6; break; - case 3: rate = 4; break; - case 4: rate = 2; break; - case 5: rate = 1; break; - case 6: rate = 0; break; - } - PrefsReplaceInt32("frameskip", rate); - PrefsReplaceBool("gfxaccel", [qdAccel intValue]); - - PrefsReplaceBool("nosound", [disableSound intValue]); - PrefsReplaceString("dsp", [[outDevice stringValue] UTF8String]); - PrefsReplaceString("mixer", [[mixDevice stringValue] UTF8String]); - - PrefsReplaceBool("keycodes", [useRawKeyCodes intValue]); - PrefsReplaceString("keycodefile", [[rawKeyCodes stringValue] UTF8String]); - - PrefsReplaceInt32("mousewheelmode", [mouseWheel indexOfSelectedItem]); - PrefsReplaceInt32("mousewheellines", [scrollLines intValue]); - - PrefsReplaceBool("ignoresegv", [ignoreIllegalMemoryAccesses intValue]); - PrefsReplaceBool("idlewait", [dontUseCPUWhenIdle intValue]); - PrefsReplaceBool("jit", [enableJIT intValue]); - PrefsReplaceBool("jit68k", [enable68kDREmulator intValue]); - - PrefsReplaceString("seriala", [[modemPort stringValue] UTF8String]); - PrefsReplaceString("serialb", [[printerPort stringValue] UTF8String]); - PrefsReplaceString("ether", [[ethernetInterface stringValue] UTF8String]); - - SavePrefs(); - -#ifdef STANDALONE_PREFS - PrefsExit(); - exit(0); -#else - [NSApp stopModal]; -#endif -} - -- (void) dealloc -{ - [super dealloc]; -} - -@end - diff --git a/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj deleted file mode 100644 index 92ed7a0ef..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/SheepShaverPrefs.xcodeproj/project.pbxproj +++ /dev/null @@ -1,309 +0,0 @@ -// !$*UTF8*$! -{ - archiveVersion = 1; - classes = { - }; - objectVersion = 42; - objects = { - -/* Begin PBXBuildFile section */ - 084186B10B3A0515004B1F63 /* PrefsEditor.mm in Sources */ = {isa = PBXBuildFile; fileRef = 084186B00B3A0515004B1F63 /* PrefsEditor.mm */; }; - 08DC90BD0B67074C00799A45 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90BC0B67074C00799A45 /* prefs_items.cpp */; }; - 08DC90BF0B67075D00799A45 /* prefs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */; }; - 08DC90C10B67077300799A45 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 08DC90C00B67077300799A45 /* prefs.cpp */; }; - 8D11072A0486CEB800E47090 /* MainMenu.nib in Resources */ = {isa = PBXBuildFile; fileRef = 29B97318FDCFA39411CA2CEA /* MainMenu.nib */; }; - 8D11072B0486CEB800E47090 /* InfoPlist.strings in Resources */ = {isa = PBXBuildFile; fileRef = 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */; }; - 8D11072D0486CEB800E47090 /* main.m in Sources */ = {isa = PBXBuildFile; fileRef = 29B97316FDCFA39411CA2CEA /* main.m */; settings = {ATTRIBUTES = (); }; }; - 8D11072F0486CEB800E47090 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */; }; -/* End PBXBuildFile section */ - -/* Begin PBXFileReference section */ - 084186AF0B3A0515004B1F63 /* PrefsEditor.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; path = PrefsEditor.h; sourceTree = ""; }; - 084186B00B3A0515004B1F63 /* PrefsEditor.mm */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.objcpp; path = PrefsEditor.mm; sourceTree = ""; }; - 089C165DFE840E0CC02AAC07 /* English */ = {isa = PBXFileReference; fileEncoding = 10; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; - 08DC90BC0B67074C00799A45 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../../prefs_items.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_unix.cpp; path = ../../Unix/prefs_unix.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90C00B67077300799A45 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../../prefs.cpp; sourceTree = SOURCE_ROOT; }; - 08DC90C20B67078300799A45 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = prefs.h; path = ../../include/prefs.h; sourceTree = SOURCE_ROOT; }; - 08DC90C40B67079800799A45 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = sys.h; path = ../../include/sys.h; sourceTree = SOURCE_ROOT; }; - 08DC90C50B6707AC00799A45 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = user_strings_unix.h; path = ../../Unix/user_strings_unix.h; sourceTree = SOURCE_ROOT; }; - 08DC90C60B6707B400799A45 /* config.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = config.h; path = ../../Unix/config.h; sourceTree = SOURCE_ROOT; }; - 08DC90C70B6707BE00799A45 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 30; lastKnownFileType = sourcecode.c.h; name = sysdeps.h; path = ../../Unix/sysdeps.h; sourceTree = SOURCE_ROOT; }; - 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; - 13E42FB307B3F0F600E4EEF1 /* CoreData.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreData.framework; path = /System/Library/Frameworks/CoreData.framework; sourceTree = ""; }; - 29B97316FDCFA39411CA2CEA /* main.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = main.m; sourceTree = ""; }; - 29B97319FDCFA39411CA2CEA /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/MainMenu.nib; sourceTree = ""; }; - 29B97324FDCFA39411CA2CEA /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = /System/Library/Frameworks/AppKit.framework; sourceTree = ""; }; - 29B97325FDCFA39411CA2CEA /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = /System/Library/Frameworks/Foundation.framework; sourceTree = ""; }; - 32CA4F630368D1EE00C91783 /* SheepShaverPrefs_Prefix.pch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SheepShaverPrefs_Prefix.pch; sourceTree = ""; }; - 8D1107310486CEB800E47090 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist; path = Info.plist; sourceTree = ""; }; - 8D1107320486CEB800E47090 /* SheepShaverPrefs.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaverPrefs.app; sourceTree = BUILT_PRODUCTS_DIR; }; -/* End PBXFileReference section */ - -/* Begin PBXFrameworksBuildPhase section */ - 8D11072E0486CEB800E47090 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072F0486CEB800E47090 /* Cocoa.framework in Frameworks */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXFrameworksBuildPhase section */ - -/* Begin PBXGroup section */ - 080E96DDFE201D6D7F000001 /* Classes */ = { - isa = PBXGroup; - children = ( - ); - name = Classes; - sourceTree = ""; - }; - 1058C7A0FEA54F0111CA2CBB /* Linked Frameworks */ = { - isa = PBXGroup; - children = ( - 1058C7A1FEA54F0111CA2CBB /* Cocoa.framework */, - ); - name = "Linked Frameworks"; - sourceTree = ""; - }; - 1058C7A2FEA54F0111CA2CBB /* Other Frameworks */ = { - isa = PBXGroup; - children = ( - 29B97324FDCFA39411CA2CEA /* AppKit.framework */, - 13E42FB307B3F0F600E4EEF1 /* CoreData.framework */, - 29B97325FDCFA39411CA2CEA /* Foundation.framework */, - ); - name = "Other Frameworks"; - sourceTree = ""; - }; - 19C28FACFE9D520D11CA2CBB /* Products */ = { - isa = PBXGroup; - children = ( - 8D1107320486CEB800E47090 /* SheepShaverPrefs.app */, - ); - name = Products; - sourceTree = ""; - }; - 29B97314FDCFA39411CA2CEA /* SheepShaverPrefs */ = { - isa = PBXGroup; - children = ( - 08DC90C20B67078300799A45 /* prefs.h */, - 08DC90C40B67079800799A45 /* sys.h */, - 08DC90C50B6707AC00799A45 /* user_strings_unix.h */, - 08DC90C60B6707B400799A45 /* config.h */, - 08DC90C70B6707BE00799A45 /* sysdeps.h */, - 08DC90BC0B67074C00799A45 /* prefs_items.cpp */, - 08DC90BE0B67075D00799A45 /* prefs_unix.cpp */, - 08DC90C00B67077300799A45 /* prefs.cpp */, - 080E96DDFE201D6D7F000001 /* Classes */, - 29B97315FDCFA39411CA2CEA /* Other Sources */, - 29B97317FDCFA39411CA2CEA /* Resources */, - 29B97323FDCFA39411CA2CEA /* Frameworks */, - 19C28FACFE9D520D11CA2CBB /* Products */, - 084186AF0B3A0515004B1F63 /* PrefsEditor.h */, - 084186B00B3A0515004B1F63 /* PrefsEditor.mm */, - ); - name = SheepShaverPrefs; - sourceTree = ""; - }; - 29B97315FDCFA39411CA2CEA /* Other Sources */ = { - isa = PBXGroup; - children = ( - 32CA4F630368D1EE00C91783 /* SheepShaverPrefs_Prefix.pch */, - 29B97316FDCFA39411CA2CEA /* main.m */, - ); - name = "Other Sources"; - sourceTree = ""; - }; - 29B97317FDCFA39411CA2CEA /* Resources */ = { - isa = PBXGroup; - children = ( - 8D1107310486CEB800E47090 /* Info.plist */, - 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */, - 29B97318FDCFA39411CA2CEA /* MainMenu.nib */, - ); - name = Resources; - sourceTree = ""; - }; - 29B97323FDCFA39411CA2CEA /* Frameworks */ = { - isa = PBXGroup; - children = ( - 1058C7A0FEA54F0111CA2CBB /* Linked Frameworks */, - 1058C7A2FEA54F0111CA2CBB /* Other Frameworks */, - ); - name = Frameworks; - sourceTree = ""; - }; -/* End PBXGroup section */ - -/* Begin PBXNativeTarget section */ - 8D1107260486CEB800E47090 /* SheepShaverPrefs */ = { - isa = PBXNativeTarget; - buildConfigurationList = C01FCF4A08A954540054247B /* Build configuration list for PBXNativeTarget "SheepShaverPrefs" */; - buildPhases = ( - 8D1107290486CEB800E47090 /* Resources */, - 8D11072C0486CEB800E47090 /* Sources */, - 8D11072E0486CEB800E47090 /* Frameworks */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = SheepShaverPrefs; - productInstallPath = "$(HOME)/Applications"; - productName = SheepShaverPrefs; - productReference = 8D1107320486CEB800E47090 /* SheepShaverPrefs.app */; - productType = "com.apple.product-type.application"; - }; -/* End PBXNativeTarget section */ - -/* Begin PBXProject section */ - 29B97313FDCFA39411CA2CEA /* Project object */ = { - isa = PBXProject; - buildConfigurationList = C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverPrefs" */; - hasScannedForEncodings = 1; - mainGroup = 29B97314FDCFA39411CA2CEA /* SheepShaverPrefs */; - projectDirPath = ""; - targets = ( - 8D1107260486CEB800E47090 /* SheepShaverPrefs */, - ); - }; -/* End PBXProject section */ - -/* Begin PBXResourcesBuildPhase section */ - 8D1107290486CEB800E47090 /* Resources */ = { - isa = PBXResourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072A0486CEB800E47090 /* MainMenu.nib in Resources */, - 8D11072B0486CEB800E47090 /* InfoPlist.strings in Resources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXResourcesBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 8D11072C0486CEB800E47090 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 8D11072D0486CEB800E47090 /* main.m in Sources */, - 084186B10B3A0515004B1F63 /* PrefsEditor.mm in Sources */, - 08DC90BD0B67074C00799A45 /* prefs_items.cpp in Sources */, - 08DC90BF0B67075D00799A45 /* prefs_unix.cpp in Sources */, - 08DC90C10B67077300799A45 /* prefs.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXVariantGroup section */ - 089C165CFE840E0CC02AAC07 /* InfoPlist.strings */ = { - isa = PBXVariantGroup; - children = ( - 089C165DFE840E0CC02AAC07 /* English */, - ); - name = InfoPlist.strings; - sourceTree = ""; - }; - 29B97318FDCFA39411CA2CEA /* MainMenu.nib */ = { - isa = PBXVariantGroup; - children = ( - 29B97319FDCFA39411CA2CEA /* English */, - ); - name = MainMenu.nib; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - C01FCF4B08A954540054247B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - PREFS_EDITOR, - STANDALONE_PREFS, - ); - INFOPLIST_FILE = Info.plist; - INSTALL_PATH = "$(HOME)/Applications"; - OTHER_CFLAGS = "$(inherited)"; - PRODUCT_NAME = SheepShaverPrefs; - WRAPPER_EXTENSION = app; - ZERO_LINK = YES; - }; - name = Debug; - }; - C01FCF4C08A954540054247B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ARCHS = ( - ppc, - i386, - ); - GCC_GENERATE_DEBUGGING_SYMBOLS = NO; - GCC_INPUT_FILETYPE = sourcecode.cpp.objcpp; - GCC_MODEL_TUNING = G5; - GCC_PREPROCESSOR_DEFINITIONS = ( - PREFS_EDITOR, - STANDALONE_PREFS, - ); - INFOPLIST_FILE = Info.plist; - INSTALL_PATH = "$(HOME)/Applications"; - OTHER_CFLAGS = "$(inherited)"; - PRODUCT_NAME = SheepShaverPrefs; - WRAPPER_EXTENSION = app; - }; - name = Release; - }; - C01FCF4F08A954540054247B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - GCC_WARN_ABOUT_RETURN_TYPE = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - PREBINDING = NO; - SDKROOT = /Developer/SDKs/MacOSX10.4u.sdk; - }; - name = Debug; - }; - C01FCF5008A954540054247B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - GCC_WARN_ABOUT_RETURN_TYPE = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - PREBINDING = NO; - SDKROOT = /Developer/SDKs/MacOSX10.4u.sdk; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - C01FCF4A08A954540054247B /* Build configuration list for PBXNativeTarget "SheepShaverPrefs" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - C01FCF4B08A954540054247B /* Debug */, - C01FCF4C08A954540054247B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - C01FCF4E08A954540054247B /* Build configuration list for PBXProject "SheepShaverPrefs" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - C01FCF4F08A954540054247B /* Debug */, - C01FCF5008A954540054247B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 29B97313FDCFA39411CA2CEA /* Project object */; -} diff --git a/SheepShaver/src/MacOSX/PrefsEditor/main.m b/SheepShaver/src/MacOSX/PrefsEditor/main.m deleted file mode 100644 index 07ccbdbe2..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/main.m +++ /dev/null @@ -1,26 +0,0 @@ -/* - * main.m - Preferences editing in Cocoa on Mac OS X - * - * Copyright (C) 2006-2007 Alexei Svitkine - * - * 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 - */ - -#import - -int main(int argc, char *argv[]) -{ - return NSApplicationMain(argc, (const char **) argv); -} diff --git a/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/InfoPlist.strings b/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/InfoPlist.strings deleted file mode 100644 index 74d3187406a26213f9d2bcbfa9662776e5535127..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 90 zcmW-XK?;B%6a{DPDO|hIa|B%?G9i+TjKB_GJ>2~HZiT(X<$)+ - - - - IBClasses - - - ACTIONS - - addDisk - id - browseForROMFileClicked - id - createDisk - id - removeDisk - id - useRawKeyCodesClicked - id - - CLASS - PrefsEditor - LANGUAGE - ObjC - OUTLETS - - bootFrom - NSComboBox - disableCdrom - NSButton - disableSound - NSButton - diskSaveSize - NSView - diskSaveSizeField - NSTextField - disks - NSTableView - dontUseCPUWhenIdle - NSButton - enable68kDREmulator - NSButton - enableJIT - NSButton - ethernetInterface - NSTextField - height - NSComboBox - ignoreIllegalMemoryAccesses - NSButton - mixDevice - NSTextField - modemPort - NSTextField - mouseWheel - NSPopUpButton - outDevice - NSTextField - printerPort - NSTextField - qdAccel - NSButton - ramSize - NSTextField - ramSizeStepper - NSStepper - rawKeyCodes - NSTextField - refreshRate - NSPopUpButton - romFile - NSTextField - scrollLines - NSTextField - scrollLinesStepper - NSStepper - unixRoot - NSTextField - useRawKeyCodes - NSButton - videoType - NSPopUpButton - width - NSComboBox - window - NSWindow - - SUPERCLASS - NSObject - - - CLASS - FirstResponder - LANGUAGE - ObjC - SUPERCLASS - NSObject - - - IBVersion - 1 - - diff --git a/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/info.nib b/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/info.nib deleted file mode 100644 index 33a60200f..000000000 --- a/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/info.nib +++ /dev/null @@ -1,16 +0,0 @@ - - - - - IBFramework Version - 629 - IBOldestOS - 5 - IBOpenObjects - - IBSystem Version - 9D34 - targetFramework - IBCocoaFramework - - diff --git a/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/PrefsEditor/standalone_nib/English.lproj/MainMenu.nib/keyedobjects.nib deleted file mode 100644 index 3d6ff6f1c3cf3b57922e9a3ad9cc143eaee9824c..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 31674 zcmbrn2VfM%_c*>YyVv$EAm;lav}5KtWV`uNJI` zC`AxO5s;2_5f#OPqNs@Qf3uqlmwC|yVAJqNEVXT|4h(vH)lo*lD2Ej1 zL`gU6YT9Z9RIRl)Rh3#MSn9GnUfQZ-m5iFvFa{=`NoKN`TqchxV#=6_%yi~y<~inh zW+U?=^BS|Ad51Z`e9RnWjxi^hOUz~F3+8L)8uJ75Bl9!!EAu<^2XhA@q(nWCJ#s_7 zNRL8M7>Y(l6pK<&Cdxups5csb2BP7p7S$mO8i5{R)M!5ZK8>Db)}!_4CA1a2iQYy# z&^~kkeT+UuN6-m$5}iSxqx0wzx`Mt$U!&{j7xV}E6TN~lX0a06V`uDw!*Do`#4$J) z$Khn0g|l%vHsLDV8~4He;d3yq#>21$H{db29goH1@MJs#KZfVxd3Zj47QcvJ!Y|{k z_;vg?eiwg?58?CpOMDf7k8k2%@g4j(i&>WCSvBjxI+e&uyyPs>^OE3JBNLeozFhaE@Yo)SFr2Y&FqWptL$s+4)$GkC%cP%pZ$bA$bQNm zVNbJX*w5MX>;?7`dzt-${f529UT1$~e`9a4f3tTv87Jo)I7iNnb7$0C2>ga}kz5>? z!liK;=nR+7m2u@pbp4-B` z$!+I$a=Wk20A|DdT0{GJjcsELavIi;zXi zqGU0$SXq)R8?JL?d9or|sjQc*N;XV3TsB(P1b3TdEwah7nQ-;EY(9KGEn5tqOJr-| zbDivE_NtK}NG zqufdEDff~G$OGl!@(6jXJWie^&z2X9_GN`+40pm0}sDEt)xib#b)k)p^}AjNP+t>O{I zXhn;nRWV61T`@!Pq~a;XT*X4gvx?^w%M~jW8x@-rTNSS=wkvik_9#A598erle5N?9 zIHS0vxUBeI@uT8*#b2^W#T~_6C9BlPBDsl5J7o{0R;g1uC>@nfN>`B?Ek zCzNxQ^OOsf&ng!ymnc^%S1H#kHz;3JzNCCj`MUCL<#y#x*el9gG=lK`-#rzU}DZh+g&adEC@~imO{2G2O zzm8weZ{RoboA}NA7XC&4CH`gp6@DxKD*qb)I{ya$CjS<{jencp&cDO&;NRun<9G7A z_}%;-{(XKgzmNZb-_L)@f5ac)KjuH-5AvV#hxo(%5&kp&D1VGU&Y$2<@~7}?{AvCS z|2cn_KgXZvFYp)nFZiqK2KBG%-_*C%zpMXH|Ea#M{!4vF{kQtA`ksc-APv^A8crkA z$TbR$QlrxF8ns5FvD5U>*lV;JoyI}qsBzLbYg{z08aIu*#zW(&@zQu}d^Elqy~a=D zuL;luYIO{gYJ6RwHSL~5cm(V7^IL1Wa!YT`8UngmUvCP|a5NztTg(lqIs z3{9pcOOvh1(d26KH2InWO`)bpQ>-b`lxoT}$pkUMOb8RogfZbv1QW?bG0{v+UsF}Drlz*Ofwc`at*t{$ zRTYw<0!!2?nxtHM-_qK*rlH*ecic@?*|oKn*4Fyr^$qoH6DsQKI-bG1xlN6YVCBI6 zwGJ{>nQF#ZT4_IUUC;tw#x=E!rmdtN>63vl9&|u2;eq(VKMmB;cT)>(SU`ql$H4VHfOjde}qB)B`~VeQWKA#l@S2f(nF@ofObUnAc09_ zl3=8$*0z@V#*qRCQ^;-xC!)57BI_8F!lW{3OnQHb3YOM^(nTZmv6e|^GMG$}7Uk`2 zH89O8v6ud)s?G~(vQj_UOwJl6hshiYfV8)^HI0!T0-lO-?%y?#kzzcywq|i?oDvT1^g-HS-=re*oC+HkO7YMpU&=&-KPtcD9-5}@} zf_^3F7D0aybeo_%1l=W=As7?P5e&3b63i21V1cs~K)-5CR09pced3Gc(}L z$C#PSgs37V4~Lp=jSg)e6`kP(j=oXAwqA6H%y7pPckG&=#7a}rkr730B9F8OPHn1GG;lmf?3I| zVpapJYhljonR%3t0WJ|HxGrw2ZLy58G`0aZh$7OjrKXw6Z+Xpl@jGA%M6|7?si7}` z0IfRTHo}+e_O_-LOS7e>4K&wXy;LbM4%zrND&xE5on|cG)|fFxro3W%)88cA_8|ZyO`a~9_D>!FS8FA zXFs6wqiU_rRFzXxJ9=bGQ+s1wZc{^33*d}`1*oL71`0PfwX}&1^IB@gwcc+H;PwWN z5npn=2S3j~dN*6p3vPmw;4J7Iv{@W5gLh>t<=9V{gUqMQA?7f1g!v43s;YjX1^!Si z1gteeB%|OOkQF9jU2xHHPJ_$ZYwPQ33R`M`AthWMXHKkPPB5A9D%G(kq32V~Y32;` zIdhgd$DC&_Fc*PyMVKg!>4d79Yicc&UFa7&AY}!JX&RbFib~K+@YKo$55c`})r8hI z%b04dV;jut{zSzWkHb)>nJX~NRpu)gqTi_cHjCh;WpfM=)=&lc4RdM@K$F=OsP6!% z>&!*LOYjwZ1or{7>jyf#A$aA)bae9zb8{VYQ{pXAEGd!;>Mad*_gU&U=GJ=VmX)PC z2qCrsLbcV5wiGwEiCkaM(ljPT0`E`e_FCpP^B2|C&Vc#);T_xuf2dV#Y5|Qb-Ic!D zDw?~@J%)fL2^D%iph*yB<{%EqC~qPx1c4?97D7})&?y@=@B~sZ3y~UWn7K$L%oaWn zeh{7%K<|M3#~EXRePbo|1x_|50sA6thXz=Rbdm-@4w4Q)PRJR+0UZEj5NAonyuMMq z49JS<;2`^etf!^RfGlmty`HLWas{xzfjp5{C+vPgm=F%Ii-5%@fG`Z*8PS?w zR}Tc~4s0BXM+qoV1U61E2)zZP5UUal-SjO=M;XjqNy)Yex2mU=-eD(r_=UEyoBWv0$ zB8!@vn)@`DLCzr$Zh(CP6MgFNMeYH6c9O05Rfb0Ys0)wK4tw6uYX(NI+jTDif} zBE&d2J$g4wr~(xd2gr*N5>;B6kggKqtKyPk9*`^4uS2d91b1*BY9;kf#YGgb4krK& z7Sh(EA*cjZqhY8_C(w8_ z0Zl}S@NWv_DW;-nfIxz#qZx2#CVCvcJ%MJUIp|4fH5bhTZP>e}Wu&DIly7gzngn%2<;pv{^Z%bEa#BFeKH8o;^iJ)zlB1+=LJo$X5PVw(k=frbXE z1>yC6^>uBdL^m05)IO$BGJLJ|6KU6N6B>Y?ZV$dyWT_uHikenRUkL&rsOTS1MGi1a zt}R?h)(@T*w$w`orCRIt58#WigVqr_LxP7o??0~FT>FIz;2C80S;-^>{Vu6sh8Z8uZ&Z0$3 z5A+;*9=(7Tqa|o5T88p~9xKpFvxfYoL#Nt*k%`jEU!+?h(OAYu)9R|O+ z4vb~}h5}?9OQBX+K4ux&1eg#z;g~9xyuMeLZOf^6bPPlir~$oR|L*%V|LMN%n|ekwXY!^ z1Gs3lHWm$S6TC`eqGIWfF*#YXL})vDXFYo7zAXY@L8R3E$xB|^j{7bKdY9P)9KH{k z(H^QO9Gnaw(0ZW+#5r9@{ek!{VvP1P=h26v7?%m9RE%9Z#Q2}hFFGg!n;`vIfjxu{ zuR(`Jcg%*Jx(;>}20JDWW)>>I7LT;Ds4Xf^3to9KQSl6Dls2ozl9*aDr06U!Qx5E5ZPa&^ zD0EU+SJ78%(N~i3b`s5WMSEL=1r%L}?Y1>8*TA@Z2gap87?&a4ZOHdv@P0%;i8kbW zVE{Oi1BF2zf2UL%sD41TBP1(JmU|sKXv3x|?y-mi(K)iS7V9 zTtoLd?c!kIh5inVWEa6-v9yh{v@}}UL{&8ce6`NGFjG+^mSY7t9#KNIFtXcRunO~7 zjlrd0=3$jEOc){52*cr`%UrOQS%@95BQqCkg~i}_>=Tv>i^0hQqZkvR7rl-o@H%2) z5*MhbVOQ*i-LVJul$>Ym#Vp6(*a!QfJJ=6$B>Qjx4unrR4#puk6uJVn*8qAJA}|Y3 zMD(3Sm29@O)Hl`D*NRgcTSJvWPJ3HhQ={nb8b!|Oe6x5Ax;;Wz}T@5439Q zMk!`CP$~_lQ%W(jA$%DjJR*#?hA(kIhS=C-k)4ciZ2xb~Dg-00z-C;Ddr2x>464O|p;>4Yn!pthM*yT$jjL~~9VH>OFYdPn z_oF^GqyjE~+=`bAVPzQ7v3v`&+jSke^#iMY&DE-t`_Y=kmi48}$iEqxE^c^!a1j z8*0D_*N5cyH|O^%F3&gh&Mu?UZV~ez&@8W)wUNzCVV(={LYQfkFrA3@^tk@JhT2uf}WeTD%Ug#~biQVC7ACGu{GXC^=Idc?$53EtbY!;LrhU zOHX>&gYF0auwQRck96J_6MLQS(^sGo_!!hj6V-_HIyJ4}j)*b6bVv03sCz=&*EiDk zz@!uau}fhVL5B(0-Nzi7$1{vDQOJ!&S%Q;JJf}PIPyFVG4Xq-0TNp$7@BX|$vlB~;$48C=I6O(4}0AggxkG9m=yg^a%vG9}dBQVb#l`u;s z+_1uQkirB)W&M6cNP7tn$4Buod>m`>Nqh>QhPd@EK8w$RbUr1_7Z!m*Iw%|wE<;!y zDqIz=brTFxUN7OxHu5@GnAb&KljB9b8UMfJm6~CE)J9&Z8GZ`n^NX!9W@1l$uppbzK= zJyj50-81k7S*F7md{%HD+~Em|!Q4ZjWaX^F2FmAz=et0eEGn`@a8LdPO11|;dAt+K z7XZpd0AR0*a(zL4gN47q%wV0E9;`F-80$j$i*;q)Sa;?L)&pp>p7mnASs&Jy)dL_` zSujTkV-*MyIC(S>10fP+m0DDg(%z8CYHh9o8KALLPE!lS5VRS*P%&aetEEj^8W3MG zH?`K& z0kz8pC==Ji!iNJ+O)$#13YMutV8ub{J?T6+4`*1u7R= za~R+bw2Dd@2rS*p9@9pH+P>Bn;HT~u_6qN79fXY)T5YzTVZ`4T;4l2b<9CHkRx*wd z($=!IFvuWb6WrhZxs+04M~l4Jz>Wd9qSz+3nSGRPVO!ZYG>we{cB<`6*5@_VQpTY? zStv@9utC@%yrboW%{mn$Y=O{hgLSkCz(j1Du;r505z-rw*Z{o>sSS3rl-v+?@+>r# zog$_+#-RypEy%z$R)Ey&Jaz^m?4xJ~Gnah~Lcck<004giJ;}}nROB{+hu=a05$zDo z4RqQZnAvs*hdnTLPnGbJ@S;jE!L6+USq4V@889g}5m+!We#(iCgd(geuyfgYVvg$- z;boCuV-vybh#`rnqd+lu=K+3%jskVj0I_pJr*3SvAo)(hFx05xkNGJgX+&)0=FsfW;! z1ZOueN7zj?8V~B|#6_p^vW-C@9PgqU8OS2DuXJR)-lAc${U|X5(V6VBM&j0V|1S1* z8i})S0nfLw+i4{3*Aa=o4J^M!r=*IQzOL_d_u2PQ-g;yc*U}IP)F(ACRuXhzbvL_b z9lJ-uDveni>YFKX&j8zureXuE(hjV-7nn1O-OqjqOz{z1eGF^}F;OijKw!fS!Y<)G zVW+SmAoKIwp~C{A9;*ELziM+(B(L+s)8>|twU0w7qQgM>&RfaG=s z;y8qE5*VjC2HztM{?luJ>BYg_Cryep#DHF*pPjQd00iI;NX9Qt!bURSC9#vo&a&s$ zvF9XgbjrQN?4U_$Mw@olk>)m7IrAd3b*=P{l%WOF3M*k!OKMxG3)OcLKoc{i8;?;7 z%e>EC6?yDy(fd9CJoa(FzBH#NMK2v|73_C{S9y#+CMqdL{OMS%V83U7SjYY#4G(Lk zV6VEVVd{FYKeNA3H7sWJ{e(}2LtQMa6tevfKY;xcEbPfn3ws!t@1PJrFbAx^o~};t z4~&cAImF@4aeE7&2}irQJh7t7V@RNg{a;yZd`ikpfZ*E>Bcm@B*#4qQ;VGegs{KB1?oF6lf z3*Z82;ul&4qj|z9;VAs0IZpUyKG{1OG$Q3RMC%dr{f@~s}z$HrAL{L{3g!A1JiQN>FRnv4XD_V1YoV}Fu z>qz%eY(79+%yUItaVKp@2ww2^?ywRa8*F#(+|XXUjltEg8)Ou zg68w|5+(I{Ewu9S0SK8lxPjcDP6+*kuY|9y5E`jZWRTcCnR>$i?EZ4Y0hY6!Z2t|w za8-yO+AF(UPopb+NO?}^gRBqed4wC?Irs?STj4wF;IVWC%8(@b-Za|!KlnaeE7u0# zoa^HId@o!Fpso$bX@OOPZZ4UW<)aRk7}CYX!_cuwAZyYC8ib4bF)k4v#8F7BGBXt% z7JPscI3nB-px|NbDX^-~Gh4YC%qeCH_ZT-5VWh&hxY=L|I^rtfrtmZPva=yf_@&a& z2kJN4n?>Wz&E@8;;pSPBx>TdmsI7aK&!9N5%SF)9Z?G%|9TC)CX|%$$m{x&kxh33E zZW*_nTfwd5R&lGjHQZWm9k(7ua2vTz+-Bi-;T}N{(|Qw>Oi(&O*#zYiR7_AgL6rpc z5n>1$MNk7l&Hok`#L>8bdzpKM_2pg#T1s(29QOu*_K9#u_)97L0nWQY_|ppDHY(3= z2!C4F@xa^UmM{yscbU1|5`gOi;kNL*XdA7zB-Q{Pks&Tw46-LpN~HHYOqPN2Xadlx zo1{xdgWF4u2KRwzH2wyoaTk0Eec$>zOOqZD4^<>1#pIWb`S{;+J;;3ub3JS`*Q0c< z1aSnhN`e?VU4kI@E=KR%2|C}SaKm=OOJTyF!-SU#_h`Nu3y`I=v7XY5W2`(#XPhW9 zXRJ73W9&ao__8?RD|EsH$%NMlk`K*pudDyZ`F2+caojcTTkboU-8=-Vt^|1z1d~#! z1cPL_lYkbnpbMztqSw?YQ5X6J?kDaB%_c*NLdqw<$NkJK<9^|8a=+57GWQ$y=59f^ z)6pI7PwqCF&i%zfoX*|lmO+`pJZ7E@v)g5?jH}jqKxW3$*iQMM7KuP^C%XYMg0$pC zbg5xovT2+(Xas-A+E{!jrCwSrb@_EP#SH7SeV}HJ_C-xFZ3kKt+BoqmJ>m#R5XfdQ}Dye>&IK_#4q6C^sX5RJ&Lmf+7aYLP!9(N z3Il|}4%47`g&=!^bTAu&9KqrNq&_lVnO^1xv6~f_tps@x1haSPE9K2>(!{bL0rJ8G zX+?z7H*!Z=YDbT$X&G(XDqL#iAm)c@D-lQ$ESP9@GhIlhbg^A=l0|bruK~`<>_Df? zC~yNS=&A|Th+;Aga$>T0>aN_CC5psxJ@;^Yi`Y)>g6%9^V8w`=FxUnU?gI;;n6p*P zKZ^QTmdpLNhWm{I0tGL!d|AN;S%Iw3x_}^3N-PDqzm5R;HY@fz;|y7`tYm|%mp`ZfCV#Tt-6c>qfY~P-#4Wdxz-k$Xri+BN zrUZ+jBncAdfG$ZW^i(MPz<8*DxBPAR{^4|RkW~QJTWsi1Eqeq(zSvjf%z*oJ@Fytn zK0l6;0gC|-_9Q5%Z(>xuzG$KiQ_xGw32j2!Mp?UTkZhc6yljGOqHGdD!6JBJ1Vs`A zb}W{lgtHH25enF}E`U8|1uLWrSfRb?@c-P&>@JwNnbm_&|C-&cA+1RC*m#n?Sb?GI(Pr|?V@>-W(wpn{g?9xk8 zzq|>JHDl^)ACLyj%ifi}XO#wF1VJeTrFIGfUAQsCOTs{n41L4`(#$xH^{(g5pAqOT88 z{=Y6Y$xZ@9EAOYS3Cg0dKwXe`|L8i)*yy^}<_FLO09=$^vIQWApj;6EC^<7w0FwXf z_+P{Lt8B;5qvL18_yfi9$AF=EAd;Xc_(>+^(P^<3paAr2p$Gva6Ow5BV3abM)Up5P zP(lWobZ)gZlpv^x4xSIegoJv1o@H!(t>uAWf{uSr&e&q0grHJ!eDJI2_{slec)0?G zUvq!>GCF**5I=-ku9klpU2ZSe+Kz4_sKPpX8a)}oNd@|gi1_E(%UxmkwfBcN)8Wg7 zc(A}w$@H*U%YEfE9pA}#y$Gu6GOm=v`CsD(!?^42kK3D$TPei%lS-2w92mvRqvbK3 z1NSDVFG2mpfjjH(5+siMPxW^YnTYjw@+1IcJ+oh)3R9|(r^6@As1HqD5Y(SS)rX(~ zV0DJj^hH8kOotVa=R)0^JWrk^FOV0a8iEEwbAkpDD2Pj~iZ>XmASKk>5Mzw{KPENg ztU)ni5(Bn~pS~{6Ojz&cWaeSj#?EAk`JMvXxwM}P*hkOHowOKMsQdH7W^dgKA zptOUaRtje`q$eud>uX2TN_DZ81FA~JT@gd1h%Z`-bh{-GpICEqRI!%UO!WdwpI5JU)?Eleh8t^jm@ zhM*S-+DZ__o7)74D|QI#e+i^vHwGjP{ZrB9U@@>pQ`AKH396XB&G?E68CUgm<<7nNJAqFC5Y3-hVlXPO7 zm{u^x{6j1)KTl(6`9&#~o+iNDgrVh4?X8w*2*-vu)wI;nSm(dx4mzg%mHca%@->?& zUzeu*I6*UE%G0GO&#+GUM>^%}1kJFW^4l=wn=s|KfeLiW;IWd2O&JnZol`a@h^ahu(^ZB6>(x(3VtlodsgBAE46gx+Ty^u5G5n+VznjI)3;jxeBuZxqqMH_)Q< zd#sSQK@q2jS0pGB6-nqCLC+Ed;l(n7RuQyT=--W$2nr_^=?W;U2Lmh?P7<_;py!}; zQd%4WzdKRXaE4e)$%pB8MJ}z3P!urx6mjSttjTc(amNg#E1#z*c~*#raLn(h4%K&-hdvY? zjfy5)Fjf<^Mg)WU`m|bA$`u;_Q?;rhv1_#|aKuCEWGFvORZO!Tbsa(LyNoJn)&DqZ zQuk4z=)wD8TFjaQ6>B9$I(O*pf69R>o~BAnu|QH{o2e4pGPDXxN^2UTO_nyg@AW_E zvBiodbh1o`9)s}rWm_F#G)QZ^&`ATp-#_7S% z)Pj7pb`uFOCT}QSRJ_y)Ab4M|67-q~py+->jAiU7S*8n3{~B=8S}FOi`vD)U-~$+2 zA7lb?*mo6TG%n%=hJAyeH?4SyrIB5dB#QC>UWugG2V?HO?|8jMhkTuifU{^}_5Glf zu0dY_Rch4mba%l-NDeAKwM76}!|fs@5N^^U9z(pSpOXJQ+*BL~K=#}RgZ zp!Yj-a*96{x5b>?UV`=wHbV`!zE5*>Ueh?(H!Y4x)3qH|2#PM!)+oMFViB$n9-2F& zP$=cLP$<<_81{F8;lrW1?JccPq1rJXMC7ftP-#}vXaS#0%+V_Cxf$zV?M>WzI`DpN zrf9OjOi6j7I9h?71az4)aFS8nEn`duN6BMSY*bu~G0A8Nr$TM>MXCZ(IxAh)C|x>= zojXcXEn}LYY}V4hu48{#XJsriRq3Jhq`L?SI!Vw`!5^wc07IQSl4Uxj4>L!pSNc%~ zQusI!!h1Fro1xg4IDGw0zWj94GV(}5BxCY*d#j6B;bsvk8_NFRC zj8-1zRZ!m@-%_>!4oBSAWM5MZekp1)sZi$rQv3kegbq9b`58%UCMYMaQ%;n`hL*31 z2NlrO7CPh6RZ!1NSMhCU>;W?t=!{R&8UFxlA+{~Wy}35cxy{i0aoW6@Hvg&Lqjj{F zzoD}U-TJ~tD4!CyzJO2q^B`D;0l9+YYnN>ou;VmRxc~?fO8dD9yWYoigA6Z#7B4`H z>9oafeaDH1P;?H2!sR=m!3qk?i?qe>Lm{36Q~MC=bIYOSI@;2kw)}GtRCLp%0L=;5 zbjS$MYzvI2rmg-0m)3?UJ2t;}HWw!vseDzOD7bBZL#MPDv-?Eld!f^9bnG3p*LwrU z(701Hie37W?^M1=`=aqThEuCty3PhF)oMpu>TGweaLb_Qy|iZqyoT8UW9e!*O|x`% z3}SW<8XbT+^`vcNLp$)?eKshZTLBFZ)83M4ONCWL#B8}uhulhNcY?M{r|nb&n%di> zOs-8MsOOASo`q4j&^GEml%=|e<59doc^RHRB}^yS4zx^tBUBC7G!)dgwBA39BbuptY)M~E$fSsH0cD#yqtRFCjMs*Zn zqApbVs{#lP+^QYGtyjcx0wc&0u@>^&a-}D1mW!YTD)JqQZGpWlNQt%AhVF4+WT8n*-wXQQ~Ks=oLD z6l5QTQ2!LS8P)|^?kES^f_p=L2rq#A!AYeDw@x+=PXG_99d;-j=T<0vlvt4@-=;{E z??G|gGPX@Np1UjGOI3Ft8mj&(fLr1!K;T&}R8xE2pVr4@i#0QI!M_1XxhBjOKzBna zO#;n{H3;*?0-706>~mQF_q-TTgZ#zCNKkPQd=p`o06M^17(kWLFfn@uIkXr+?(eW= zVgpp@V1FnqS_TZS5srZN6jwFvpp*nkjp$CrKOq?gvH;{fD4Li`g2HH04qUci;HE`l zZO<_RXX2o>V%83V{cW_ULm_Mt*G3_|wgapLr4pQ%qnakj2o4a90$8B>HFQ(Bm4c5+ z6ol%d@8NWV*)kSNo8qtvjNkWg5B@Q;6+kPX)++i$Rt;&!IC=%tI)E_S1}%KK<+5sM z|2@!V0an5Dn{cHCcYe0DJ-y5L0vD(d92Fz=1cgjX>6qLSNcZ_dzZgapN09G@{$Nb{ z4vY@{(qB$MacmTD3(L$_`oL<`03Z!a)ecBupol&OcMRe`xVszf1_3GH8PEqXZICW$ zO;-@;B7=a%GAVy}X#hN)4n^zG@)@{X48PEW^(DA3U>Itc5CjD3=#V1&9vxr!ou(); zT)@*~9fOJZ_lKqwG8kvKI0PN$SGci3WEeX-#xW}$E{k;NElCo$mJyVmu-`^5OZ;Dw z1Xzm1r@1xkbKT_#(z`Y?#4Tl`BpCusZiXE_r$iY738K=Y^uQ;r(!=;l@}u+t3F?p^ zp!XiD{3u7r_gdwL3J!?SQNS6TMU?}c8LC35gdd@`TH zr}AlhI-kL3@>zT~pTp|0Ka71cwqFMsPU6 z5d=pP3>rI{;244p1RDvCB{+`Yc!CoMhS?<%oJ?>E!KnnN5u8qN2EmyGXAzt&zqsOK?Ae`x88X z;DH1WB6u*tLkJ#9a5cfh2(BS`IKj09*AZ+Xcm%;C2_8joJ;9F+M6a0|h$1h)~~PViWQ#}Pc9;0Xjzgo+k%x49n5zx5%obO^f}^|ThLzE&@84G4KK z7YR+gp>7ivQY_>2v{FeQ(q(N0o;!8vLRzN{9nj$_MH>5cTn!ON?I>BNubJCneMu@E zf=@zbiW=cbg&4Z=vPO=MrzxMz*!;ip6mSv`jBW^CLk`;!xOJA@O529 zhsQx;;g*Dxe@;+CLpK}9Y~%j>bEVY|U1rr;Yzwa&dp9-fJ5d=Tmc2&kyC5?{-zB7f z0QRos#PHbpfk{Jc1l)JD0kxyB1n!2}%=F*)LqlWFE?Dcb90*TcyFBgO;0I6KyF9U3 z!wl_9c_L=%X-#L0%-uaJY+rF#;;iuE~g&#wz) z4@opb8~-kC9+niRor|1ovnmuixMRR%&TYGaS%S-iKaNo-YAK8=^`Q0b&5DeVPE^w_}rkVQ9u$NoOJ`Vdjqx^*Gs{Vg%j*tyH2j+zs= zZ%atAat`jLJUH}!+{_LyKLjDh!8EE0Zq-+egH3yo_q9PJEwh8Sy3ECp0C&17fX)rH zq5WwfPg4?LT5RC7in(nO8T8^|GgQ~)W*3f*wen%t#pf<<;^2^nE=cU2y@uhs37|wv z;44v`Q0>$W;T^NL<*bf(x)0Vp!32YOc9r%n7Q^a0QCD`A^~;yGU%nQ-s+kXli%boi zQaO%!6kTK5Yy!uTjM+ALWCk;hG=PNjFNf10k{N+8({ewIlwZFeNHRm%NT#_L$_Qwn0gw1*gHn(#} zA>gzLHkm=9!`#eFfQY}z8g?>OOobu|&fpvh!A)PLT?#>&TFHrK2L5XpN>AFPXKBJ| znGOQ@QLbI1QaE-~2<#e~(xW=DMhZ~d;grsfDD@5mCD^HJpgNrG?LEJo_WT zmA~psg6OXkdUU9-0PbuLn^+f)C^#=7u^(OUZ^%nJu>X+0nt6x!XRlll!P5rw1 z4fUJqx76FzZ>zVf-%;;SzpH*vy;HqQy<5FU{l0pydY}3O^?vn->W|b1)E}!qQ6E%) zsy?JXtUjXtOnp>+OnqE^LVZ$wN_|>=M*X?^tooe#y!wLrqWY5hvib}474?_utLm@R zU#q`SUsHdp{!V>e{k{4J^^fYG)Hl>WtAA17BzPLZ0>MB($hplR7}5YU34Wa5Sp+{p z@N9zT5Da0(Qv}Z?cpky?34WU3X9!+E@Ir#0C3q3R&k_7Q!7mWJnBXM@FC};x!OIC= zLGVg~R}s9L;57sT(bf^Xp5P4xZzOmV!J7%*Lhy?OzeMoM1iwP?R)Sw8_%(uGC-@D5 z-z4}gg0~U;Ho@Boeuv;41iwr0dj#(!co)ID3Eo5S`vmVLcpt$Z5WJt@4+;K=-~$AI zOze@5_8f{zh=oZu4#pCtGc!KVp6L-6MWpC$Ml!RHCSK=4I^ zL7YI3eL?UQg1;pAD#2e7{58Sf5PXf`Zwda6;Ohi`Pw)=}|48sp1m7U|XM#a;0lmKx z{2Rfy2>zX5keWXUzD@971m7X}Z-VaYh|I(pR+8a7FUHiNCy!KD+ zWgY6TLlHV;(4j#(6r)2Ub*QKI7aiht$WHsU4hcFmM~8-LPw3EG?PuCkI;7B{eLAGq zp)BopI;7E|KpiU3eyP2qL;2ccI^?fCqeB@wq|_k~?Oh#uREJm{s?#Bh4mE3!=+I#8 zMI9>B{;fl`Iy6ChL5Fg5=t&)#q(gZ+WYVFDI)rs-iVn$iC{c$Zbtq1IPKO@Tp)~DH z9jeixA=;y2WgF~8`CEHQ`?>Zj?Q!jG9pbdNbSPVURfmS_P?HWlr9%U?hjl1khZ1y1 zuKh;)s}4P`J*h+ebV#j3Nc*D>P1B*-I@G8`W3*>=XrA`84#8%fzB)v7C|8GO=+Foq znx#X-bZDjyRp?N;4%O?>WbMy7^n~^|9ZJ{U)1g%DA38Kuhpa_28aN=pYMnHbZLE_9 zM1tBa*cGB7n(1pa)5W6`i*uy2o#|P4j1rFi_Gg0O{}z$LWHNbR8hSG$pkh*xAB6Mt zKbLH;V5RKPYY}eo_1eC*R*z z{Hdz@JC@;e4^gk;9QXx2xUZb+8Myl#nqg7*6O{zy#t*Um_IMqbe6gZcDhU#(EY}He$ z`Kkq~MXDE6OI0gWt5xe%8&z9WFRNZvy`kEsdPnu1YPV{yYQO4$>Y(bd>Zt03>a^;t z>VoP=)g4~O+wu0ij(6mpc_XAh${@)x7*ZH5kg6C9X^M$rf%X z{Z;-3e@CrSJE{HE(dsmHwmMf`rY=|aRrgm9R1Z?usmFlweFBu~GEkSVfg z_6O|0vj4{ZTl?$wKiL0he?u$NDzqxCM%zOhqOH+3Xs2oyYFBFC*1n_NrQM_5tNlRx zq4t3G6YW9mA?*=R2FJ9gwAZyiXn)fF400*g+3R#VFP)E0uk+Uh>VkA(x+tAdm!iwn zmFNcOYIN`E_Un%5es+*M=pE7=`Z?4&G&@XinC>vo;bn*S91b{q;_#`%VTaQWpF5m$ zIPdV4!#55$9DZ^5&Ea>4KOAm5+;O<;$T(t0&e6`%)lu*0@7U8Z*wO4*?bzTr!I3yV z<+#*wgX3$CuRFf!xXp39L96xnD?0DVrhT|`ezdGJ>{KN6K6YC^%k~_INxjXqg z1v&*e#X7}1WjmEP^>M0qn&ULz=^3YmPK%tLcUt1K)M>fX>rQVvZFAc0w8QDR(`BbC zPCq*R?sUhQclLGma}IFs=^X5AaL#bfa?W?|?_A^D=uDjFI4^Qu=lrts4(I*OpE{p( zKJR?fg>#X+C|!6LjZ3IYxJ#r>kyWDkUT-{wgUAUHx1GT$5cJ zT_1B@?7GSIUDrddmt22v{l)cH*ITZCxZZZX<9gSPal>w$o660>&E3u4Ezm8}Ex|3< zt<0^T+c39!w~20(-KM$;ZqwaXx~+Cw>$cu)quVC8EpGeV?zr>r8uuRVT6YI`CwCWj zH+K(rFLyup9QO+Mq3*-nhr8FgH@LUEPj#Q+{+#I~ard7+um|TM z_fUH99>E@=9^oF59?>2#9!8H+k7kb+k2a679^*YGdQ9?|;xWzR36I4dOFfo*tn^sz zvCCtR$6k*QJU;aJ$m3&=E1sU7-k!dmex3oIJw1axLp{Si2Ya@7&hVV+Im>gl=Tn|L zJwNe0?fI4GPo95!@m@||L0&0dd0u9(US55?`g;xZs`je!s`VP-HOgzW*BGx^UaP&f zc)jHHme<=}?|B{dI_`DS>$KNduP?p6^19~rowuiVn0K!CAnzgG!@P%k*Ljcd9_3x{ zJ=(j$yU}}`_XO|B-c!A2dC&G<_v_wodT;aI?!CkNwD;%U z=e#d?U-G`}eZ~7PAH9#iPoPhbPl!*LPqNkIBdE)61vIr;pDVpLsq{`z-Kz z*5^5&7krlctn}IJv&(0X&t9Jod_MF!?sLQE7oT5!Zu$J-^QX^WzK*_ez6ribzA3(G zz8St*z9qiXd}sSE@?Gous_zcpPkqn&p7*`zd)fDj@0Y$``F`X3t?zZ;Uwv=+{^|Rd zp3}?q_IjP(QSYpG)yL@*^hx>@eVRU9pQ-Pwe^NhJKVSchexZJm{(1dk{aXD?`d9P^ z^@sFF^hfo_^(XYF^gsCd`vv+1`Gxp}`9=6e`NjAp`epg$_%-=W@_Wqh8NcOzEB#jc zt@T^)x6yC2-+O+${Py_m^*iWy$nS*TDZev*XZ`N^tNb1Pz5RXt{rm&`d-@0ahxteN zNBPJ2C;O-RXZUCN&-Y*E|BC;s{;&JL?f;Jd4*&Q3clq!3f8T$f|9=0&{%8EZ^}p`_ zga1zf@&Nk)w}7C4=m0}NTtGrVRY0GBegVS*h6jue7!xoj;HiLl0Z#`k2zWMNeZaGI5O68ri-4PfPJ!-$o`K$hzJY#$0f9k*A%Vug)WCwk!GV^* z#=r@IO9IygZV22IxFztVz*hoa4SXl?v%m|1UkCmic&Ddd&w!pidj|Im?HS%PvS&ii zUOgY_+1hh*&)Gd!_1xU^)t;a9JlgZeo;P~_((~7zw|f2#|*#~(C1qDS1#Rv5Y z>K)WKsDIGFpg}=Hg4%)ZonEqTrI?ir~uNs^EdaZw0>{{7&$@!8?O@2k!~q z8~j1={@{;-KMp<^d?@%x@R{H*g1-#@I`~?MF2o_kDa0kjEyN?lD51Y6f!7eNXXO>A!K^UVN zh1!SeLLEcHLyJO7Ld!x;q2|!a(5lde(7B=WL!Sv<7`iC*`Ow9on?m=8eiZs~=)urK zp@&013;j0CCrlsa9~KxE6c!Q|78Vhf5SAI19X2qmHEeR&)UcUhv%+SFJr%Y-Y-`wS zVQ+-J74~-6J7MpJ?F`!&_G#GBuuEZogxwCi6LvS83CH2Ga7DN_+#x(ZJTW{uJS{vk zJSRLqyePah+!S6J-aEWs_<-=i;nm^8!=Ddd9KJMsdHBlkRpD#G*M)Bg-xU5@_#5Hd z!ncPX3O^ElH2iq@$?)$ZA|o;*$|6h=Ga_b2%!-&3F*jmf#4`~K zBNj!x5V1O9ZN!F%%@MmI_C)NB*dOsx#Knl;Bb_2$BHbcABfTT_k!?t5jirlK5|CnvB;mIP?RRhCn`27JE|zEGOAZp@2I{}1EK~;RY%oC)kTer8WmL^ z)ezMb)fP1~YF5OTS4PP3*HvC|?W%$F0jI7bY=xlT|dK!I#j7yCxjH`@mjT?-cjV~ErH=Z+IG=5>cYW&*xt?_%~PsU%2f5iI5 z2F3=*hQ&t2M#Ju*_}HY_jM$N}kHn6NZH{e;ZI2xvJ1KT*>|?Pn$G#f-M(noO?XmC1 z?uvas_Ji0@W512P9{WS=jo6#9zsBB*)5aCYmBy9FRm4@sRmJs<>mN5Lt|e}M+%s_t z%k;~nCi;$7oC;yvTN;}hZs#Se+E zjvpRh7e6w7RQx0H?ePoZpN)SmesTP=_~r2{(lff-juf+%I83!k~nq3BwX<6D$d>2~Q_1NO(5k`Gh42OB0qSyp?b&;Y`BW zgbN9m60Rg%O}L(@OymL~~-V#6F4r5(g#@POM8Li8B&sCO(n) zWa3ka^Aa~Devx=J@$1BEiPsZ9=HuWT#};WRGO8WS`{Vl@C#FtLot8>cA4{E;Iwy5*>eHzUQWvE@pZaO) z;ndGkkEfnWJ)L?s^?d5Z)Gt!MOZ`6er_^846lr{#Ce1$0AuTj5H*Hwj@U*(Lk!kg5 z4QZ3oo=BUMwma?pw0&tGrhT0DN!p>bBWXv|PNZE(yOee%?W?rgX@95POULQ5bg%S; z^s4ke>HX3NrVmc9P9L2y_^jqnFq~A`zlYTdY$zU^N z8OjWwjMR+ujLeLjjQos(jG~O1jOQ|5$XJrGEMrB+>WsA+8#4A~{E=}x<4(rCOq|JP z$}^Rje5NMTIny=MBhxFhXJ&9_TxMcsN@jXyR%UKye&+DZy37%o^_dNsV=|jEXJu~6 zd^vM#=4+X6W^T)TC-dFR&oY0={3-M2%wIEq&-^3vc9ug{Y*u_$Vpd94T2^LOc2@ta z_N;MP6S5{}P0JFpre`h5dN*rl*6ysmSs!G5l=X4erK~$yce9ynHd~&p$W~?hXBTD{ zXP0J|XIEtR%C5@pliiZtmOVCmLiXhBDcRGqU&!8>y*vB;?0wn$vkzo{oP99+O7>ql zZaE$~UOB!wemQ|Tu{l{eIXTriH9568BXa6<9?5CQnVGXIXHU-FoDXt7%sG&AFy~Ot zXE|TyGPyXH%T?s^x$0cI+~C}@TvM(&w^wfO+&dgKM=73LM^mFAi9%z0ILeey=-&CHvX zHz#jy-qU%{~^eAvG@GnRy$S)XPFuI_*U`D}H1cSp{y28-HzJ>h@2NVu3v=ojgoKg6A;S+^V7S1c2U$~%fOW~2iqlL!{ zPZgdiJXd(W@M7T?g})U3T6nAQkHWu-6h&@D9!1_ozD52;Aw|hWsYMw@Sw*=;6-C2} zh8NWpjVP)w8e250Xm-(4Me~ZDDOysrtY~e~hN8_yFBN@U^l8!IqN7D8icS`tDY{Xt zD|Re)E_N&SDE2P)EjAXX73UY5iU$>sDxOe0sd#F!P&}jf`QlB*TZ&&U-dg;6@s8qy z#fOTI6dx@k$?TFROXiiVEqSwKTgmp49VI(UJ}x<1a=zqJ$rmM8OMWV4N^vPy zswm}414`pc6H1dyQ%f^Si%JKS4k{f|T3tH4^wHAkrH_@)DxF>WRO#ZjwW|citwx(=d*@m)BWiOV!S+>9Iqq2|74wfA%yI6L)>`K|yvTw?M zDu)w%%Vp(?a=zTRJf_@O9$%hVo>HDy-lx1@`M~la<<;fQMwmvKMw`Z%noTXHcGEc11k+^GG}Cm`Ow%mWY}1pbxu&O0 z3r&kmFPN5?mYY_Y)|l3rHkdY>UNpU8dd>8v>21>v(|e{}ruR+zOdpyKm=2l_n~s`} zn@*Zen?5(4GhH-YHeE4YHGOTmX1Z?r(e$(FSJUsN+on6FdlhhgT!p+sRiUY{uh3OE zRk&8TS9n(VRQOc{Rs>gsRYX?AR2VDbD-tVGD$*;mDsn5zDohoX6$2}(D@Ij}HtWs) z=0J0hIm8@pjxn6u5f=6rLZx!7E4Hkr-lUgqBBzUBeuLFOUm zYIBXb);z*oZys%iVnXwy=2mmNdAxa|d9rz`SuoEq&os|6&o)14o@<_Oe#X4eyvY25 zd5L+Md8K)cd7XKKd6RjI`DOD~^K0fe%-hV{&F`9bn)jIZnfIGNGJkA7Xg+NI%zVsz z!hFhn#(dU%-h9b?#eCKLjroT8X61^?)s^ciH&kw}e6jMC%2z92uY9ZW?aFs5->ckR zxwmqEf zi(GQ27QXM-`+NI*zOVQD^?EyXa;MzJnwBxQVOE>X7}jDOorcpG(=fxyVNAzu3|X$Z z0u*&<%P(Pv{N(U;qq$IntU0BftR?++YC$!DvW@F)$t`K{`x>nJ^nN zAq(chd{_ueU>U4{Tv!RKU=6H;JlFu6U<(w&HYkFfup5eD9~^)~Py$EcIGlu2a2C$P zMJR)ExDL1A4phQJsDh_ZBWp{486X2?kPMcMWiuHfTgx^wTt>(!*-N6#lsR&Z%$M6` ziM%53IqNt>oxPnY&MfC5XP)znv&t3higbZ%ifgfJgR8)G!gbg6+}+R};U4au=+1U8 zbLYGFxX*j)c!E9cJl#A=9?LVulj&LLS?Ag1+2^_Hsr34LL%f~5BfY8KbZ?F~-@Dg) z##>=^uoA3fi>!2OiIr>Zuu84VR<-?_-QMnJC)&!+uygFK_AYymU2Gq+OY9?dseRh_ zkMElArmwG!nZIC!?7JkViZPWN9=;# zu?P0Vc6FigT^9Ek!Yy3s;J!qJ$DX*doi;3Q1PsW=1Q#}9B0X5&0ufQxY{ zF2@y^iz{&zuEw>v9`i6Cf56RHfQ7gfw__3R#NAkod+|3sh==hA9>e2!5>Me7{0sla z%XkH^;tj08J6MSi@i9KZ=c<2LJ6 zdcFQ$Z`7N0f&Ni%*FWi>^)LEYy0_2><1Knt7r|aqdeL`n`jFa(l#ohowS>Z zX&)V+LsUXX={TLFQ*@Tj(?u$ya=K2p=r-M>`}Bya=m|Ze8m`U$9KeAb#KGK{n{o?o z#i1O=Z8?&oIGSU)6L;lUj^lXl!wEc)hwv~?hB`)J~zRtJ!Hs9s@{E(~oDc6`aF znP}6|bTQq{yQY`vZTgx1W{??ThMOca!Z?g&d+X=1Y786q_#*49Eh1kO02#oI7`< zE9pv>KZx5`Y|y=T?#!H-bIzPIXXdZ*jDr8GA>`}rGYT~02_a9DfeN1Q6o2_SypmVm zQr;TUsq9pKrQAK@^RC{{&`f!ZkOBX_kSMfjJsIdVYqgv@!Dw*lU3nU{$aUQx|wTIB$-XXg%%@cb?ns^?E!Sjh5(bX1mJc^|;+0 zlR=|#60KHK&|!7CO!+F)bd{MS!?jwkMys{EoLa5f&XJ)7+76AzZ8by6Tr$*}Z7fh( z&G|Wb8a+ucsnl*VJx}G-7Ls8eyEYbdZPIRfoOYW* z+D)rUl_%+@Q>&UjJG;L1WO`Fwj&a<2Bb{ljvpXjv)gUV{NS@mjdL4LlI6cpqZ zn2g$d75t_O-OSC^V?y#{akA{?;_{iudAw9@2Ov{2xgFcfz%0Am2&g z+6XOZA^$Mq1{qRvgG}?@Q1G5x3jS=Tg7@(XzGWKWTa@ts9x|;F8`H1!XUs%f7Qe~_ zTv`PTFqaTw)4_ij`!;?N8E7LOp7X}@HbShtji0WEcN`h1BE&#=5ATKF4&DoI3ku0t zNVQpsf%oJSDCWU8!ut;1Tu8>*h}}xlJ-kf|mQHxz0iPb;%8^l7P}b;$f&}Dgg}T&W zDEYx2-p#u-9*&I5W~E&`(VEOwXpx6^!LOUwn&*44mjIV|Gcun?J8Xs* zL%cks0+D%Sh?x+h)oivxDrR>H4I|dM=0TWhF7jt~bA&SwwwkS&KA()RiMfHNkZ3j= z1PR93pm|ovIRKKt;u{x`ktk#MwLvZrl$GQ=@*uO3g917-I3H3R9{XZ45WK0TkPLR{ ziJ7?V3kflCWLQ23ObZ;bJBfJ#843zz^78S}CBBfvje5q?b(wc7~VZHlDbMmw;@l_Rg+ zPKOC(nJcf|4%F^kC@ZhsPSoxk1Idxs?%aTOJLR<7=^;+gZkW&nYd2(e5~qxIJ1{q7 z4$^Mtcck6U5bbt?b~}Q#+X>nY$=%X!P`v)pZj)fUO&(*1oOYW$@J6uRCVU^R-9};r zNl@Dzrrky??J|nC+vEw-Zj;yOF*=Q+?KXN%ZmD)dK`#^)ZMVr~!eJq5ccCc-YKDTs zU~rkd@KVt20@Q7&NeeG+SO#Ah-9*rBHR`qrEVmIXHw+?|$!;M zftuB1278CPtu~MX)a@cN)I$guZb%mlx0LbZCJ34Azbii0T?{vH$YN1Q;06r%3}pWaRhPM#zkUe;-fCfTx8-rSLh;|2gM2RDdy< z@YzY`tby2T4pt<7;w|4Id}2HYQQaKLr&4k+O_$um`VjsoC7&aNdol+vl24!x3EKmo zjSy5q3MZyuvF$_wp<)XJTA#xwQR1h9zX_ky;1i-n{u|-*#+**LhiDT&rwN}5_Bn#T z1pyL%{)70bfHL&wE`KOzWcV}V-!al1^_OZg2x3@0Zy|Adtu|k+ttJEYyfuG0EOtR? zp|HWcU|_zD*BeQi*QGT(As4L9Y1OKHwO$4PjBb-bTS^ka4Qn98^>%n6RD>D+5GzD? zE>OcYjCAsLeo;R?h^THb?kFz{ub`W0IG1%kMt5rFsxmX)VCcsJ($usaB9uAmovF{;!WXp0x? z@8AnN3cUji4w%k7lC8Ew?FPFS8=xgTFf!kk5ADg(VExz(h;$+Fc4@61SV1smbL1X) z0SthDE{N=NwVZjh6+%g;nBoTJL0txjVFo*mBv<40avch92j{uhC^*}ng`ZLyJ3Bm15U$7N$jeu8u6VcI3=6fulR_`&9*iNd z*Q1$>HS;bL4|9BIi^D)vR^ICti9UC$^cid3uM?5W=|zLHG^pEcxSk zP&yz7T}L+9K{iRZG~|F|C|ND%?`D-gL92>x?EP1Ha}mbEy&fH9V8c&HV;C0SWhtq8z#v=!hk7VAuN(WQ*OPl`X?%@$R0xP+l7UptbMLa;e<7VRFxIG7EUKZoQSU8KMPtH5R;3QH9EL$XQs^a8a;UqX^V7O2T8D|}MIXj$?} zzQK{74HOJ{Fs`gFSRBcQL@QL}cG`({2^s1z>$R#}uuyjQTrzyRJ}(cXQs8mf379g4 zT?=MMV}~~dcGSFl;&wW)oWck-a$sSGY3&5w*d0!&7sRJuNbYxo_0xm7(@uvVKns>I z*F-@22D3v`paLsFrt23Fg%g&D;!QBF^zks-IQ||2hCz!>c58^k>0ShSKuk{20)j~~ z;R0SU8IljdRROebK8c65BqxkeCqK6%4n{jL5ZbF(7v>Mh&eL!O12h_aF&U*LW``GO z;20PF5fy0KAQuXVBZKTJ;?~S3qnxlXgw#Zu+IW(0o=4(Qr8I6R0yTM@MD6Ub>s`1J z;&c|o=c+M_%a~7c)%jXjG`ct6gdKwBy3D3LqBVdTDxiD9>eAb=_mexH44SS5A-xSt zP;hZAAaQmRXryXx{$N$U#%Ol9-X?`E;#~ye4cDX!%>zLjoJ)w*326$b6H+_FoRFh{ zIiUg#Iw9aWIw6%>Ww3)Vm=kii(Fr;2Fi3}39Zsv=8RmovoF13c>!$x8a)+!kPH3p; zgsg6_SLY_Kx$Za@(CoqqIo)1p0SFB?m7KONosiq%b;Gudqr(HMi6(SHc7w4?9|Vms+1w^O ztkA{egX~81L3yUGeGum*cFsB&a;xn6=`naAqtyXA45KPHwM#GLbU3U=^g^jQU3wv> z(_uqPQvjAgKfOyY<0b|d&3F&J_f!3jn2LnenqpKsUai@}gq?~U$Wde&V216#B-QfszL%<88!(*~JO~ybd zWOR5L$0aEALJ7BX9bIv_2qHmgacH>m-J0dA;3OY(58MuQ=f z27)1z0fQl=4Q|+KH^R=Q$_$fEbVFJ-yi(^-HUSkAmscHCDTF4$Ob_` z1Hdj2kE?TK+|N)U2%;1UNrFra1cM=}_fe_-M!ZiVi-Gd8<01BiI5?vB!5GMt7cb2A z5<^2EVQ?fu>@XwkY`CtXu**8lG;Nm79T_MhdqXt3d<0h z5LzItgCPaN^Fs>DBfeyh^eR(Ak^$dJ9^qCdza*37RxBoyKcvEt$Djhi?}Vq2_5?Rb zE`LaYF6)O3!PQ7g1izq9VfiIZijY4dfk^pexXU$!LPI@{Q|`w68o zGbK5BvV&`cq_aO(DxcWh*yt)NE!98DDIuv*30usKJl|GZU0s^Y5t*dzmblK2_V(5@ zrHu(^THD(@IxUu4XLXHc_RUrWB4q#*Q6zb>=Ch%7iKAy1E@57R%Wm z>y(M(1`;x+qONZH)wZ@{nL@_)x{VuGrIeC{lvNuy*0ozKjml#70QhKSjG4At5^38S z8&BG|Yv_@TOc=$DaZQ(+o3Gr~ zS<*VM`F!3pjg4P^0^HBZ$oOHyrAwD@b#~sq#`y|cINyY8w>vxAQ8bTbW@boObNqv< zs!gpte`)5k&(6FAbyJ2EE90_XnmKd!6`f_mwaR77iXT-ffAnR0yRV_X{$R)L+qZxo zR(adk(&ED_(BaxMuDK2!s$U!6T=omEyz=H1p1*ww*#osxwiJ`NVZV6pxtYy6%T(X8 z`SV{-qAEzUAs3-mV4~dh;#O1}0G$>Q^%^0jVpqXU=>nTc=b^G3)A*-+MSEW&CTiXD>Y5*m&AmUvGc;x#ymls8de( z;m%X1PJh+d*z`5fxhau=l+JCgv+xGjnRLtN^2e(x zO~&%K=grgoVdl&?k6*m_b&CukK|+*qiMK&znp@l2zFt#WT7C_PZA?U|j9I&N>y}Ma z%YPCo4JH*FNHufbc;k=%`rLD`xPX{fZpiq1#V4|YD6QJI@0!?}Cl^0BX3WEtTef^y zCXS_X85vV-)SBSf`5M#}bsMi}XqV~c%+W&UUbffQ?>l(t(9ve@D(6k`p^+7al+d@^ zpn*3NzrnHh&CQ!F)`|-2HSTtih0D!-%D8rI<%Uh0${wO4YW|M;dfODyG{OLC0#}Fw z7q93TvX|A=ta%AW+XOCy%S?FqkA;PcPksG$b31pV5JwfCf%3Wx^lvtvI@S2i?c3kL zwPC^R*@jb?uD5UxX8)*)$&QY$)u%6Btj`Ge2j*KhT?=`;V)ts?0DDibnxTYX0ig=Eh5x8h#kU zRQI>vx`C;-WiZ)wAX7VT-o$GI zbW(r#tFO-9gifBH)$mV0`q9+%l$6l}2uc6!^ywzxeaFFI)o~v?dh{3!LY$F|cy-R4 zxyI$omn||F7Oz;fYW{uq+%tYPPBOsM$;gnA#cT8YH{O_CSyQvQt=JNGe)@wCj*ruk z>`0^V+oKH)N593{3Q(Q##v5;~)|Ka0e1KyY`d*47jX6ImJ|;%#)e9uwT3ueguC-rC z=3ab$`t%>c`r5#;0XYiZ3M?AFEe=l6oR(rN>uM9;=(-vF8?+rItwYE4<$ z0?;?qrDYRGkIs7at+!qs4>P%HyM5MB&bW@BgLS=}=@d6Y0>D%9N$IuIo3V#goXrnPoDyF4rJ-KXmG!!W7E&#)*ClkcG>Npec9Of)oGgV$|{3l zm9NrGI+uwLgDox9_?x68pBZ^IM5wK;o^= z-MeeQ&!uz9#2VB9(TyJf?4pR|!MPB33!QsjTi$Rb5$noPx>~(dUir#wb?S_D{ zZ4Bix2-XKY-XQe#6y@*^XndK#^_^aCkGITDeQlH~WG`x`Pc9(Qit}W`}gliXyE)1+nlWBS+qg zjx>bFvyg7m>+|O?^#t_EvvmIaW!~GjeW6nQN}@j!;(`=A0%Mj*^%U5HhyQc->_31B zRfedPKp5@oe1Ir3fuc{u=U4^H1jz)>p0QIH<)AGO9k=~U7+Gy}U%KQue)Q;Z&!tOl zBe4E#OG^{j;{TkOo<13uPeSDja%=^2_|>(xHt+u3yZ3wB+ODA}B(@mkJKjJ&rj*s0 z$MkKSC4p&|`%m2O3JbX3z4#|U@ts{=Qo?18961p^suu=rhGti*g|EK)Z}-y~i{G`0 z!$vC0E3l0A@s+kVcD=gmlTYeal$OrDZ^VeKg=J;co^bxsz9zA?zFb)Np(>@jH1)v4 z_uiWY?iHtK%$KuikyMsanpZy7)n;M%d*5$n%=mNDwQHX0aAiWGdODLrp|VknSB!Sp ztcl5l$uv}!(&w5Dfti+cUOjQ-$O%i4 z$#GP&oU$;Z5Eh>lkMHIhxu&FDFmcA=jegYiczXKdE?9tTOJn%q8W0u`>C`rz{rqOmuym#*PE-vXHd(t7&Di3Srcx6_b##2;qQE?iPt zy0p@4uCnN>jg}`&Z_1_}J6oh#lpL5=-1wVVxfMOxbJby9z@4cQZ+t zfJyxIz;UoJjBIOfS$H+>!p7?Ar4Q;Dw~DJ3HJi9vqa|DDLx@Ch(FA9aQs0pNN%4s| z1q|5YM}h4%f)Sq_D)tlOdA9x z!J)-^E|kAoTZz4`jHE-clp43Isp;Ie61~2e7Akif+wCn^uU^<#f;}z4o>p3NP|hi9 zw`}?3Y+&Tc$r+2|oMBT96yJ2Y1Up)3nIsg40DDUlbsN&&G1ozdgT->SwiG+MrKhFN zOrhIB<-6+ZYt!hi6;5*mm4u)kW0d1yFftC(UdEZ1p~ZkbmNPBau3d)>uSwUd#ElJD zxg0C*XW=+NO~ z($XgWdH(#;qp(tUtJ0FqHrQ}o7FYfTjHdf<}g5H3QshGgU!#Xc5xTeip)b+ z{*Bxo&YAGV`s(Us;H-aqc7r93Mm^v`shX5nCZL`mAF%(7FKHY0?5T%&$f=#UFoAsO zUD4|hh=0=7tM=3mApC1pX|krxk|Hf;C^W;8)9 z=)8XITFV(-W75GlX3Y3a7TrRf1nRU5R)&O*-~f4l&g-wMvnU(%52mF(25byev&|BR z5#Wpw;O1y(C>Bkv-oCxAgzgwJKH!|GPl^KjI$N(__d(<1u<^ehqZ>AL%&+MTjWWVw zIWrk&X4Td2m6ntgPE1RCP)~XB@CQ40?hxY=K@zPS-g~d~`#NPDvUAMObic^{*%&(e zqRar3xEMmc@1>?b0-@fPO&d0tz+RwQ=pW|Baj9|1IIlsOUVm@JilR~Qy|Q7y&^@QX zExats6pMw$$HX%-8 z@wo?e$}F72YOh!VU0H#b%+U%u9*Ys}g8(1;O}nk*JnDO`C*{hRsmo;|yF?cDjn z!=Qg4hjlx4?pzPrKX4ol9;ljf3+%^eLwWi87wC+&>4Et82b$Qzk&cfO{7R$FlEFq6 zS{NKnIMYLJ?u50Ho#OIqF=xg5?{B_HHw@1{`M?8Dp6%>x zg*CPhn_FAkVEdT0Hyfjn?>$MaYOUCJxF=!HL>|aSY?8+n$@3x;l{2B=mfYlZd@8l4cY#O1GIWnE^4P% zQ~!@#UIzdIwzL*{WlMIHKrxLllF^pEaT6vw~6bf58Uxol)z$G#O zFCd?7t(~1Xo6kJf*4Eysv&12vGgFGG!T&!W?%cUyQflf$%b@pg0K~qEbNn@ zWuD-QkjIn&pf7-00)`?eq;2g`GjiBfR$Q8l=70FuapNAvS|3VHowNa{{D4!guuS#W zEb1@gVkmc6WQJm?g)J*ZTP@6+(S0VO5+hr2%&CKeF=%T0w&L1kTxr00hoD!$*&N`(2M=?}D=dj@c;qxuxpA#og0_OB0u1)~ zj!l~|A#0GN-p=;owq)E>#|a1y2Z66SXpFd0-~u%eXj=nXE63l%6XN5CC|Jd%mN*Q1 zk+lhwrTB)cz5^8|pmkg_8kEt6Tuj8_da{=4=xqerv?g7sB?QC7AD^D~)2hdH;uE5Fw`@`6$z-631siA4oh!M&+ z(Y%3*12@Kls=JR+XL5A8&XD+~a>R&?S8;JeYy)KxgskW~Fj_TPlCEfBo}#2?7@gZ7 zSQIG)Pp8OC){Rb7!ZO&at1BuhEn*dvClIDCGgnt*glb}wmDO~zGP^>Dp~`A;FxIw# z|Ddy($Qcq42KDDjXmXY(C*BVLAZ&8YCNvpP5e^jyxz<<`Zu^lv%S#iNmeY1^x{O8( z@}cTOY-K^xYp@Z=WbQUvT6_}xV1)b2K8hcFEG;dS;Rk&Je(*8a?EPT5h#&L`<`uVa zcf$-;zz>EeZTE%Z2Yo(2eh{azJ2$RhzZ|fKkdaQx{rEwj&yOEWDcii+whK3=gp3qQ z=Eo2Ee181k<~T-0_wmP7Qvg5c zOJXs^6MLGPzT8?{`;ij>gwBs@Yd0Xy1p*1g9U_3RYy(Xz{|q9T7k>H60t68Hf&hf) z4gj#I832UMfU?`O86!e5NWvar0$xA867(!nH z!w^ob<@OZTa|fm#_R#u{TyAN(e1y{R?AxcVUIMLL?|iPNau)51%=A?n_v(S!oo|g+3W{ z;jcp_#Wr%Hp$nywWRhc79DnYL6)RR%p|b?eh9es9Jk7qs8fIMMt4^cD?OK z9r}8MI-D9n9R?3YW=QwDjvsF*U$LURAqaZdPegl*Kb#uCA3}GJ2Bg{0bnaYJ!~Xrw z0}TydRF#)kA&+%_5TcJe|I5AvA>Q&ZiDn#aIB=lhsLRzLQbp>k-|}M+eSL^QM8}Bo zbnT~CCRe-~-}GY;`-5a(V-PPK1X%)Ck2-^8DsZ>(%{L1v+|t+A7(|4E3p7I{iu$w% z&Rkgbt^f!0y@v69B;(6KrEG1Ft&U?b6$yhVCsQ1=DBG25`i*F@?~lUvbsu98PadFR z-TPiy+1fh0{UbwBQHg^N-LewEAkO#A!u6ZJh9I_scyXXsZr!%cGC4hc?C4RWCM>4r zV(TLU2GMuNFo-D1vTY&;aa0kt$sz`^U#a#n2C*G5)q-HRY}@wU7+A={RfhLI{rvNF zu$Tq7Jla=fA7c=YTBumJti?rapgQ)WhK5g{fBNZZ2~w)CWW<(=*ppuVd!)F6L77%%T zi9tj|QE%V24W(-M-l$Rc!NLk+5EG_7{q(aR22`rgp@3+Qzu2*TI~8mIgE)B7lqpYt z?#B-M`j>EDVGw;M!R^(5@x`7`sVzqN-uEZH{*Qp~ld@XCAo}_agJ}C=|NecS?bz`N zU=UY4K*jr~|21ve6GLDRN1|H-29eUmMc-aw5ZCXfl9gf*_0#Bx#hrXMdIelw|IlPW zwO(NmFWc6y->`G{ZpWtq3}WUiyLzV2Hk6!Vn+EMJt3MCNUV|JwpZ$PJ9A&3H}n%;Dm(K z^mIQA5tpQU4ny?$1Q;SpY|>yU4DpUt8w5lA7J|Dyh|a|ArPyGIJ|BZ2ram-j(t~jT z90`FT`V>Jh#0!TH9QX*f`eTD3CZ2Bf`4|kbFqIq3k;E_*qECQ|VN8N?B0{91pb&jB zD8$}ZAm9ea?SWAI5ba*(5rAI7_l_7G4d)U64O@sJ4AJL{21E1-)unxO;J_h>?olFR zw;Vip=*s{M5oZSvF(5Y^vR$QDcMk7;=&acO8bz8$5@$AK{yPNRuHTXbcqPNDDApX z0mC8ov{(+#I1z~GmWW=yxhVAzBqCKkL?YVVOw`D&v~X^rkVAlozAzx7w0psl_4ybO zv8Sa%frz;MwHKBPu&DyAFDQy9A`sCR21LY-v5#OXBO5Fw``ecEKxFIL>w!1(?)}!745&NW$J_REB`VNQ) z*Z|>cumK>VFIFI8uZl(kBGMMb07QgMP7#QBZx|49KCK1EM;ACmUlSw|T$$<|NDskU%#ui9TT>!Ei~^jc0bA5N=;O%oMYTlMY-_6vB;2n8Z6# z zWa0_m~4FHJah=LVb*uTv57E~6yTduY@#n5o0!6-0X8vBkt%~t1V1U@ zHKo`@HVX-X9*W};u!&t|DEGxjfhN+yg3v@?RA?gAeS{_=WeQD{x!dS#;TbgXy3C!I z4+kak;h;qN)k%!v{Gi0}r0sktC=vd0`&sc&!yr&19|}t3d3jJGFQU`@phWsbSmB^2 z8e{<|F_uhQ`Cfn$`Cft&`JRIkdtP)olSTlP$oC~Ek;yOsO62{M5tq zmEn?Pctmy$!6o(&%{4P3oq_1EP-z~9fw1JT+l^Ob@3N3H5WiSmTKeueueUqEM4rpd zj&u~_R0kF5k_mugSyEB4WCChZLhwn58QHJQnx#Ma_1E3QCGuV15>dQGc#0q(SrGaV zbQ)q$af$szG#r;$34eUkF*PGY%Hi)VUbAK~fDn@K>rO%EBKmQOP0g1tUxd9KhBEB} zm&nWD5?wGvEe?orB|5cu``*3V7Z(-Hg8leNha-Ma_1=5yPsNH$-iG5L1Sy=g9pbelWg`Xt9A3C zvJ<5pEiUOWavFYu4}Yp+p6-q7y}!@0yi? zE1NS(hpTmUWD!b-tt>8a@2rAL|2zq{0EEQ7h}(ehxCu3sDA zDB~<%QG``!7h%v=er&hb0X8rcn3%S4@7_gAVb?e*gl`Fq;RApMV>RrHw*E|9TY}5pBiCNkO3;qlK-hhKnC z((KgK?4?yzOCNz&F5{}Xbr}qp_~!qeIrF!PfSr)&mHt?QW2v_ab_GUS`@JqoH%R7%P-GdKxbmo(c8adadLwa#x{%ELPW=79s#GuNDU*l&lS=jS zCJ8u^|2dN`E@O>@FJ<6$ESy||h$1{GaUh@zf3WZT`F%g2*ZRrH$rFtMu`XM`VZ$mQ zJ75%I6yqpHksHAcPfmS-s+3~b@ZtBQNid4II$c8I5Fu5c0Vnd{*@*0nM7Ht8h9;F8 zEDtJA@Vo#{M2V?}OTmeKU!Nb9hzGmlpISgc;4wLmZ##5oE8@tu9y+uQJkdjNNDrRy z5Ma7+I3mw8RAS~YRjPj)7LH2f1ytfBJTeE@Iq|P6AlK7BIdNjgKP>84{a3&UG zhj3;!!ynqy@wB273wb~Iu$#Gsp2yNufc)_?phMc%FintQolrqI=rDrJ5~!?U=81F} z)UbP*{Q$!~5cBz!RJLg-&=7zjFBC^3_OWob1RY0mQp6D+hA^a?Pxw7Pdeou#MIWi) z1k=E}M&a;78W70r{BJo$;3*3u}e;E!_ zxp6FISM$nYZ9DB*bOKl>#yWo zLtJB>H#R^!>YV;C)*`KaS#!Vunp3MnoM{?OB?j0cv#|Ne&khYsz7^|O-nAw$wj zDl5z3o7r!TA3b{H0O3?c9p4?`AfL^SnOisyc8gD5xUm0+nVCO?IsM)Yg(73``SbOU zjvhT8&N|d4iPd)lHYhIL!558j1r1liq*Hk|wMR&iVYEg^2G*2 zNjZJSVS@Yh`+pL2mLcB-VvzSE262UfE#R_+VD^mHkh2W=2#CQuP$4_ZaMV1iKzo+V zn^(Lr&~;=*#p$rq4Ee~ALBK|drx}hipvJ?gv}3c@35P z1E2~8RDtm~#^D1-hM#2!ZZHfl$R-&fctLSE0$#A|3{lTAq+%B|g&w;3Xx>GOx)ceAT z^sJGr2|X*_2c^UY^g&HMtKu$wfdf5bULTZV3fNym;4Xc}fj$ss52|3)>9q$H^s>lb z5B*+tq=&@={qJD~y)1T@KI1?y8QH_)jQU;s+d~HSve;ezGY<5Ukv%NVsQNuErXJLS#Nnq0CHtlbCI5F%zwc!bqfABq-=!ZTzhc(<80(Yp zUwRuenV^i)8t8q{Yq^K;B0`E>)~?gSE9yh72KpSHS3X~8YIwP>QbKD8eh!ol zPLK2y$RF!nq?%}YpqA+Q*xNw-w-Y9ODqbmaTH^ds{|`X<2FXm`>QvE9eYf2=JUW%@2Qn$leTPaj(@ZBgX= zJJbKa9s0H9!_xx3iv2+c)n3Qdjp zEJs*Oi&!S=i@y%~*ovslWG}_O%3WBN?p*^l#Z)ekJ?t)~@?n_*)r7s0O9*5SyOYb_ zby}dBuJb~UK=!b^n97G`3ads)2+PJ2~*>dnkj*72c&U!-2@`>T~{Mg~2W8f_PZ|;L`F>(d!H@6Fo1!4bC6SQ}jB6Ylxor juYo>mVQ{-6J+a( \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#include \\\"basic-dyngen-ops-x86_64.hpp\\\"\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#elif defined(__i386__)\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#include \\\"basic-dyngen-ops-x86_32.hpp\\\"\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#else\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"\t#error Unknown platform\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\necho \"#endif\" >> \"${SRCROOT}/../Unix/basic-dyngen-ops.hpp\"\n"; - }; - 0873A66914AB8A40004F12B7 /* Run dyngen */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - "$(BUILT_PRODUCTS_DIR)/dyngen", - "$(OBJECT_FILE_DIR)-$(CURRENT_VARIANT)/i386/ppc-dyngen-ops.o", - "$(OBJECT_FILE_DIR)-$(CURRENT_VARIANT)/x86_64/ppc-dyngen-ops.o", - ); - name = "Run dyngen"; - outputPaths = ( - "$(SRCROOT)/../Unix/ppc-dyngen-ops-x86_32.hpp", - "$(SRCROOT)/../Unix/ppc-dyngen-ops-x86_64.hpp", - "$(SRCROOT)/../Unix/ppc-dyngen-ops.hpp", - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "arch -x86_64 \"${BUILT_PRODUCTS_DIR}/dyngen\" -o \"${SRCROOT}/../Unix/ppc-dyngen-ops-x86_64.hpp\" \"${OBJECT_FILE_DIR}-${CURRENT_VARIANT}/x86_64/ppc-dyngen-ops.o\"\narch -i386 \"${BUILT_PRODUCTS_DIR}/dyngen\" -o \"${SRCROOT}/../Unix/ppc-dyngen-ops-x86_32.hpp\" \"${OBJECT_FILE_DIR}-${CURRENT_VARIANT}/i386/ppc-dyngen-ops.o\"\n\necho \"#if defined(__x86_64__)\" > \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#include \\\"ppc-dyngen-ops-x86_64.hpp\\\"\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#elif defined(__i386__)\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#include \\\"ppc-dyngen-ops-x86_32.hpp\\\"\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#else\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"\t#error Unknown platform\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\necho \"#endif\" >> \"${SRCROOT}/../Unix/ppc-dyngen-ops.hpp\"\n"; - }; - 0873A67214AB8AE9004F12B7 /* Run genexec */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - "$(SRCROOT)/../kpx_cpu/src/cpu/ppc/ppc-decode.cpp", - "$(SRCROOT)/../kpx_cpu/src/cpu/ppc/genexec.pl", - ); - name = "Run genexec"; - outputPaths = ( - "$(SRCROOT)/../Unix/ppc-execute-impl.cpp", - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "gcc -E \"-I${SRCROOT}/config\" \"-I${SRCROOT}/../include\" \"-I${SRCROOT}/../kpx_cpu/include\" \"-I${SRCROOT}/../kpx_cpu/src\" \"-I${SRCROOT}/../Unix\" -DUSE_JIT -DGENEXEC \"${SRCROOT}/../kpx_cpu/src/cpu/ppc/ppc-decode.cpp\" | perl \"${SRCROOT}/../kpx_cpu/src/cpu/ppc/genexec.pl\" > \"${SRCROOT}/../Unix/ppc-execute-impl.cpp\"\n"; - }; - 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Preprocess Info.plist"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.4/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; - }; - 08CD43CF14B7BD01009CA2A2 /* Change SDL load path */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Change SDL load path"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "install_name_tool -change @rpath/SDL.framework/Versions/A/SDL @executable_path/../Frameworks/SDL.framework/Versions/A/SDL \"${BUILT_PRODUCTS_DIR}/${EXECUTABLE_PATH}\"\n"; - }; -/* End PBXShellScriptBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 082AC24F14AA59B600071F5E /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 082AC26214AA59F000071F5E /* lowmem.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0846E49714B124DE00574779 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, - 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, - 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, - 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, - 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, - 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, - 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, - 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, - 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, - 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, - 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, - 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, - 08163340158C125800C449F9 /* ppc-dis.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0846E52514B129EE00574779 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0846E52B14B12A0800574779 /* ppc_asm.S in Sources */, - 0846E55314B12B0D00574779 /* paranoia.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0856CCBE14A99E1C000B1711 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, - 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, - 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */, - 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, - 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, - 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, - 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, - 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, - 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */, - 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, - 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, - 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, - 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, - 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, - 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, - 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, - 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, - 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, - 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, - 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, - 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */, - 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */, - 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, - 0856D06714A99EF1000B1711 /* bootp.c in Sources */, - 0856D06814A99EF1000B1711 /* cksum.c in Sources */, - 0856D06A14A99EF1000B1711 /* debug.c in Sources */, - 0856D06B14A99EF1000B1711 /* if.c in Sources */, - 0856D06C14A99EF1000B1711 /* ip_icmp.c in Sources */, - 0856D06D14A99EF1000B1711 /* ip_input.c in Sources */, - 0856D06E14A99EF1000B1711 /* ip_output.c in Sources */, - 0856D06F14A99EF1000B1711 /* mbuf.c in Sources */, - 0856D07014A99EF1000B1711 /* misc.c in Sources */, - 0856D07114A99EF1000B1711 /* sbuf.c in Sources */, - 0856D07214A99EF1000B1711 /* slirp.c in Sources */, - 0856D07314A99EF1000B1711 /* socket.c in Sources */, - 0856D07414A99EF1000B1711 /* tcp_input.c in Sources */, - 0856D07514A99EF1000B1711 /* tcp_output.c in Sources */, - 0856D07614A99EF1000B1711 /* tcp_subr.c in Sources */, - 0856D07714A99EF1000B1711 /* tcp_timer.c in Sources */, - 0856D07814A99EF1000B1711 /* tftp.c in Sources */, - 0856D07914A99EF1000B1711 /* udp.c in Sources */, - 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, - 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, - 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, - 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, - 0856D08714A99EF1000B1711 /* bincue_unix.cpp in Sources */, - 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, - 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, - 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */, - 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */, - 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */, - 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */, - 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */, - 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, - 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, - 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, - 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, - 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, - 0856D11814A99EF1000B1711 /* video.cpp in Sources */, - 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, - 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */, - 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */, - 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */, - 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */, - 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */, - A7B1921418C35D4700791D8D /* DiskType.m in Sources */, - 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */, - 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */, - 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A52F14AAF05A004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A54214AAF18E004F12B7 /* cxxdemangle.cpp in Sources */, - 0873A54314AAF18E004F12B7 /* dyngen.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A5C214AB8038004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A5D614AB80CA004F12B7 /* basic-dyngen-ops.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0873A5C914AB806D004F12B7 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0873A5D814AB80E3004F12B7 /* ppc-dyngen-ops.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0885A51E1593E3B6005C4F7B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 08C99DA11593E79F00898E41 /* clip_macosx.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0885A52D1593E47F005C4F7B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 08D93A16159FE174003B04EC /* clip_macosx64.mm in Sources */, - 0879BD5E15A88F7600DC277D /* pict.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXTargetDependency section */ - 082AC26814AA5A4800071F5E /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 082AC25114AA59B600071F5E /* lowmem */; - targetProxy = 082AC26714AA5A4800071F5E /* PBXContainerItemProxy */; - }; - 0846E4A714B1253500574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0846E49914B124DE00574779 /* kpx_cpu */; - targetProxy = 0846E4A614B1253500574779 /* PBXContainerItemProxy */; - }; - 0846E4C614B126B600574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A5CB14AB806D004F12B7 /* ppc-dyngen-ops */; - targetProxy = 0846E4C514B126B600574779 /* PBXContainerItemProxy */; - }; - 0846E4C814B126B800574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A67314AB8AE9004F12B7 /* ppc-execute-impl */; - targetProxy = 0846E4C714B126B800574779 /* PBXContainerItemProxy */; - }; - 0846E52E14B12A2E00574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0846E52714B129EE00574779 /* ppc_asm */; - targetProxy = 0846E52D14B12A2E00574779 /* PBXContainerItemProxy */; - }; - 0873A60314AB83CC004F12B7 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A5C414AB8038004F12B7 /* basic-dyngen-ops */; - targetProxy = 0873A60214AB83CC004F12B7 /* PBXContainerItemProxy */; - }; - 0873A62714AB869A004F12B7 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0873A53114AAF05A004F12B7 /* dyngen */; - targetProxy = 0873A62614AB869A004F12B7 /* PBXContainerItemProxy */; - }; - 0885A53A1593E4BC005C4F7B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0885A5201593E3B6005C4F7B /* clip */; - targetProxy = 0885A5391593E4BC005C4F7B /* PBXContainerItemProxy */; - }; - 0885A53C1593E4BC005C4F7B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0885A52B1593E47F005C4F7B /* clip64 */; - targetProxy = 0885A53B1593E4BC005C4F7B /* PBXContainerItemProxy */; - }; -/* End PBXTargetDependency section */ - -/* Begin PBXVariantGroup section */ - 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */ = { - isa = PBXVariantGroup; - children = ( - 0856D30814A9A704000B1711 /* English */, - ); - name = VMSettingsWindow.nib; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - 082AC25414AA59B700071F5E /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 082AC25514AA59B700071F5E /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0846E49B14B124DF00574779 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = ""; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = kpx_cpu; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - }; - name = Debug; - }; - 0846E49C14B124DF00574779 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_AUTO_VECTORIZATION = YES; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_SSE3_EXTENSIONS = YES; - GCC_ENABLE_SUPPLEMENTAL_SSE3_INSTRUCTIONS = YES; - GCC_MODEL_TUNING = ""; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.6; - PREBINDING = NO; - PRODUCT_NAME = kpx_cpu; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0846E52914B129EF00574779 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ppc; - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = __ASSEMBLY__; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../Unix, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = ppc_asm; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0846E52A14B129EF00574779 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ppc; - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PREPROCESSOR_DEFINITIONS = __ASSEMBLY__; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../Unix, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRODUCT_NAME = ppc_asm; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0856CCAF14A99DE0000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - }; - name = Debug; - }; - 0856CCB014A99DE0000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = YES; - }; - name = Release; - }; - 0856CCC514A99E1C000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_VERSION = 4.0; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.4; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip", - ); - "OTHER_LDFLAGS[arch=ppc]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lppc_asm", - "-lclip", - ); - "OTHER_LDFLAGS[arch=x86_64]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip64", - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = SheepShaver; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - WARNING_LDFLAGS = ""; - }; - name = Debug; - }; - 0856CCC614A99E1C000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - DEAD_CODE_STRIPPING = NO; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_AUTO_VECTORIZATION = YES; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SSE3_EXTENSIONS = YES; - GCC_ENABLE_SUPPLEMENTAL_SSE3_INSTRUCTIONS = YES; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INFOPLIST_EXPAND_BUILD_SETTINGS = NO; - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.4; - "MACOSX_DEPLOYMENT_TARGET[arch=x86_64]" = 10.5; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip", - ); - "OTHER_LDFLAGS[arch=ppc]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lppc_asm", - "-lclip", - ); - "OTHER_LDFLAGS[arch=x86_64]" = ( - "-pagezero_size", - 0x3000, - "-Wl,-seg1addr,0x78048000", - "-lkpx_cpu", - "-lclip64", - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = SheepShaver; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A53414AAF05A004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_CFLAGS = "-mdynamic-no-pic"; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = dyngen; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A53514AAF05A004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - INSTALL_PATH = /usr/local/bin; - OTHER_LDFLAGS = ""; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = dyngen; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A5C614AB8038004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 2; - GCC_PRECOMPILE_PREFIX_HEADER = ""; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - USE_JIT, - HAVE_CONFIG_H, - _REENTRANT, - _THREAD_SAFE, - "_GNU_SOURCE=1", - ); - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "basic-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A5C714AB8038004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "basic-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A5CD14AB806E004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 2; - GCC_PRECOMPILE_PREFIX_HEADER = ""; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = "ppc-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0873A5CE14AB806E004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - i386, - x86_64, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = YES; - GCC_PREFIX_HEADER = ""; - GCC_VERSION = 4.0; - "GCC_VERSION[arch=x86_64]" = 4.2; - HEADER_SEARCH_PATHS = ( - ../kpx_cpu/src, - ../kpx_cpu/include, - ); - INSTALL_PATH = /usr/local/lib; - OTHER_CFLAGS = ( - "-mdynamic-no-pic", - "-fomit-frame-pointer", - "-fno-align-functions", - "-finline-functions", - "-finline-limit=10000", - "-fno-exceptions", - "-g0", - "-fno-reorder-blocks", - "-fno-optimize-sibling-calls", - ); - OTHER_LDFLAGS = ( - "-framework", - Foundation, - "-framework", - AppKit, - ); - PREBINDING = NO; - PRODUCT_NAME = "ppc-dyngen-ops"; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - "SDKROOT[arch=x86_64]" = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0873A67414AB8AE9004F12B7 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_OPTIMIZATION_LEVEL = 0; - PRODUCT_NAME = "ppc-execute-impl"; - }; - name = Debug; - }; - 0873A67514AB8AE9004F12B7 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - PRODUCT_NAME = "ppc-execute-impl"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0885A5221593E3B6005C4F7B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - ); - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - }; - name = Debug; - }; - 0885A5231593E3B6005C4F7B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = ( - ppc, - i386, - ); - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.4u.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; - 0885A5321593E47F005C4F7B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1)"; - ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1 = x86_64; - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip64; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.5.sdk"; - }; - name = Debug; - }; - 0885A5331593E47F005C4F7B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1)"; - ARCHS_STANDARD_64_BIT_PRE_XCODE_3_1 = x86_64; - COPY_PHASE_STRIP = YES; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_MODEL_TUNING = G5; - GCC_VERSION = 4.0; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ); - INSTALL_PATH = /usr/local/lib; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = clip64; - SDKROOT = "$(DEVELOPER_SDK_DIR)/MacOSX10.6.sdk"; - ZERO_LINK = NO; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - 082AC25714AA59DB00071F5E /* Build configuration list for PBXNativeTarget "lowmem" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 082AC25414AA59B700071F5E /* Debug */, - 082AC25514AA59B700071F5E /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0846E49B14B124DF00574779 /* Debug */, - 0846E49C14B124DF00574779 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0846E52C14B12A2600574779 /* Build configuration list for PBXNativeTarget "ppc_asm" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0846E52914B129EF00574779 /* Debug */, - 0846E52A14B129EF00574779 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCAF14A99DE0000B1711 /* Debug */, - 0856CCB014A99DE0000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCC514A99E1C000B1711 /* Debug */, - 0856CCC614A99E1C000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A53E14AAF076004F12B7 /* Build configuration list for PBXNativeTarget "dyngen" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A53414AAF05A004F12B7 /* Debug */, - 0873A53514AAF05A004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A5D314AB8099004F12B7 /* Build configuration list for PBXNativeTarget "basic-dyngen-ops" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A5C614AB8038004F12B7 /* Debug */, - 0873A5C714AB8038004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A5D414AB8099004F12B7 /* Build configuration list for PBXNativeTarget "ppc-dyngen-ops" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A5CD14AB806E004F12B7 /* Debug */, - 0873A5CE14AB806E004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0873A67B14AB8AEC004F12B7 /* Build configuration list for PBXAggregateTarget "ppc-execute-impl" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0873A67414AB8AE9004F12B7 /* Debug */, - 0873A67514AB8AE9004F12B7 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0885A5241593E450005C4F7B /* Build configuration list for PBXNativeTarget "clip" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0885A5221593E3B6005C4F7B /* Debug */, - 0885A5231593E3B6005C4F7B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0885A5311593E47F005C4F7B /* Build configuration list for PBXNativeTarget "clip64" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0885A5321593E47F005C4F7B /* Debug */, - 0885A5331593E47F005C4F7B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 0856CCAE14A99DE0000B1711 /* Project object */; -} diff --git a/SheepShaver/src/MacOSX/XcodeBuildHowTo.txt b/SheepShaver/src/MacOSX/XcodeBuildHowTo.txt deleted file mode 100644 index 2a8899ba2..000000000 --- a/SheepShaver/src/MacOSX/XcodeBuildHowTo.txt +++ /dev/null @@ -1,26 +0,0 @@ -The Xcode SheepShaver project makes it easier to build SheepShaver as a -Universal Binary (with 3 architectures: i386, x86_64 and ppc). - -This is an optional build system that does not affect the existing -autogen/configure based build system, which is still fully supported. -The Xcode project will build SheepShaver with configuration -"--enable-sdl-audio --enable-sdl-video --disable-vosf". - -The Xcode project lives in has been tested to work on Snow Leopard -64-bit with Xcode 3.2.6 and the 10.4 SDK installed. It may not work -under newer versions of Xcode or Mac OS X. - -To use it, you need the following: - -1. A complete 'macemu' git checkout of SheepShaver and BasiliskII. -2. SDL installed as a framework in /Library/Frameworks/SDL.framework. -3. You do not need to run autogen.sh / configure to use the Xcode -project. If you've done so already, you should remove or temporarily -move/rename src/Unix/config.h, as the presence of that file currently -conflicts with the Xcode build and will cause errors in Xcode. - -With the above all set, you should be able to launch the Xcode project -and build SheepShaver, resulting in a UB build containing SDL as a -private framework in the bundle. The result will be located in either -SheepShaver/src/MacOSX/build/Debug or SheepShaver/src/MacOSX/build/Release -directories, depending if you do a Debug or Release build. diff --git a/SheepShaver/src/MacOSX/audio_macosx.cpp b/SheepShaver/src/MacOSX/audio_macosx.cpp deleted file mode 120000 index 418b23c57..000000000 --- a/SheepShaver/src/MacOSX/audio_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/audio_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/autorelease.h b/SheepShaver/src/MacOSX/autorelease.h deleted file mode 120000 index 154cdeada..000000000 --- a/SheepShaver/src/MacOSX/autorelease.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/autorelease.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/clip_macosx.cpp b/SheepShaver/src/MacOSX/clip_macosx.cpp deleted file mode 120000 index 7f731e4d3..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/clip_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm deleted file mode 120000 index 18640812d..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx64.mm +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/clip_macosx64.mm \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/config/config-macosx-ppc_32.h b/SheepShaver/src/MacOSX/config/config-macosx-ppc_32.h deleted file mode 100644 index 93c2dde3e..000000000 --- a/SheepShaver/src/MacOSX/config/config-macosx-ppc_32.h +++ /dev/null @@ -1,513 +0,0 @@ -/* config.h. Generated by configure. */ -/* config.h.in. Generated from configure.ac by autoheader. */ - -#ifndef CONFIG_H -#define CONFIG_H - - -/* Define if using a PowerPC CPU emulator. */ -/* #undef EMULATED_PPC */ - -/* Define to enable dyngen engine */ -/* #undef ENABLE_DYNGEN */ - -/* Define is using ESD. */ -/* #undef ENABLE_ESD */ - -/* Define if using Linux fbdev extension. */ -/* #undef ENABLE_FBDEV_DGA */ - -/* Define if using GTK. */ -/* #undef ENABLE_GTK */ - -/* Define if using "mon". */ -/* #undef ENABLE_MON */ - -/* Define if your system supports TUN/TAP devices. */ -/* #undef ENABLE_TUNTAP */ - -/* Define if using video enabled on SEGV signals. */ -/* #undef ENABLE_VOSF */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_DGA */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_VIDMODE */ - -/* Define to 1 if you have the header file. */ -#define HAVE_ARPA_INET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_AVAILABILITYMACROS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_BYTESWAP_H */ - -/* Define to 1 if you have the `ceil' function. */ -#define HAVE_CEIL 1 - -/* Define to 1 if you have the `ceilf' function. */ -#define HAVE_CEILF 1 - -/* Define to 1 if you have the `cfmakeraw' function. */ -#define HAVE_CFMAKERAW 1 - -/* Define to 1 if you have the `clock_gettime' function. */ -/* #undef HAVE_CLOCK_GETTIME */ - -/* Define to 1 if you have the `clock_nanosleep' function. */ -/* #undef HAVE_CLOCK_NANOSLEEP */ - -/* Define if you have /dev/ptmx. */ -/* #undef HAVE_DEV_PTMX */ - -/* Define if you have /dev/ptc. */ -/* #undef HAVE_DEV_PTS_AND_PTC */ - -/* Define to 1 if you have the header file. */ -#define HAVE_DIRENT_H 1 - -/* Define to 1 if you have the `exp2' function. */ -#define HAVE_EXP2 1 - -/* Define to 1 if you have the `exp2f' function. */ -#define HAVE_EXP2F 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FCNTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FENV_H 1 - -/* Define to 1 if you have the `floor' function. */ -#define HAVE_FLOOR 1 - -/* Define to 1 if you have the `floorf' function. */ -#define HAVE_FLOORF 1 - -/* Define if framework AppKit is available. */ -#define HAVE_FRAMEWORK_APPKIT 1 - -/* Define if framework AudioToolbox is available. */ -#define HAVE_FRAMEWORK_AUDIOTOOLBOX 1 - -/* Define if framework AudioUnit is available. */ -#define HAVE_FRAMEWORK_AUDIOUNIT 1 - -/* Define if framework Carbon is available. */ -#define HAVE_FRAMEWORK_CARBON 1 - -/* Define if framework CoreAudio is available. */ -#define HAVE_FRAMEWORK_COREAUDIO 1 - -/* Define if framework CoreFoundation is available. */ -#define HAVE_FRAMEWORK_COREFOUNDATION 1 - -/* Define if framework IOKit is available. */ -#define HAVE_FRAMEWORK_IOKIT 1 - -/* Define if framework SDL is available. */ -/* #undef HAVE_FRAMEWORK_SDL */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_HISTORY_H */ - -/* Define to 1 if you have the `inet_aton' function. */ -#define HAVE_INET_ATON 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_INTTYPES_H */ - -/* Define to 1 if you have the header - file. */ -#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 - -/* Define to 1 if you have the `curses' library (-lcurses). */ -/* #undef HAVE_LIBCURSES */ - -/* Define to 1 if you have the `c_r' library (-lc_r). */ -/* #undef HAVE_LIBC_R */ - -/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ -/* #undef HAVE_LIBHCURSES */ - -/* Define to 1 if you have the `m' library (-lm). */ -#define HAVE_LIBM 1 - -/* Define to 1 if you have the `ncurses' library (-lncurses). */ -/* #undef HAVE_LIBNCURSES */ - -/* Define to 1 if you have the `posix4' library (-lposix4). */ -/* #undef HAVE_LIBPOSIX4 */ - -/* Define to 1 if you have the `pthread' library (-lpthread). */ -#define HAVE_LIBPTHREAD 1 - -/* Define to 1 if you have the `PTL' library (-lPTL). */ -/* #undef HAVE_LIBPTL */ - -/* Define to 1 if you have the `readline' library (-lreadline). */ -/* #undef HAVE_LIBREADLINE */ - -/* Define to 1 if you have the `termcap' library (-ltermcap). */ -/* #undef HAVE_LIBTERMCAP */ - -/* Define to 1 if you have the `terminfo' library (-lterminfo). */ -/* #undef HAVE_LIBTERMINFO */ - -/* Define to 1 if you have the `termlib' library (-ltermlib). */ -/* #undef HAVE_LIBTERMLIB */ - -/* Define to 1 if you have the `vhd' library (-lvhd). */ -/* #undef HAVE_LIBVHD */ - -/* Define if there is a linker script to relocate the executable above - 0x70000000. */ -#define HAVE_LINKER_SCRIPT 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_TUN_H */ - -/* Define to 1 if you have the `log2' function. */ -#define HAVE_LOG2 1 - -/* Define to 1 if you have the `log2f' function. */ -#define HAVE_LOG2F 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LOGIN_H */ - -/* Define if your system supports Mach exceptions. */ -#define HAVE_MACH_EXCEPTIONS 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_MACH_INIT_H 1 - -/* Define to 1 if you have the `mach_task_self' function. */ -#define HAVE_MACH_TASK_SELF 1 - -/* Define if your system has a working vm_allocate()-based memory allocator. - */ -#define HAVE_MACH_VM 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_VM_MAP_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MALLOC_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MEMORY_H */ - -/* Define to 1 if you have the `mmap' function. */ -#define HAVE_MMAP 1 - -/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. - */ -/* #undef HAVE_MMAP_ANON */ - -/* Define if defines MAP_ANONYMOUS and mmap()'ing with - MAP_ANONYMOUS works. */ -/* #undef HAVE_MMAP_ANONYMOUS */ - -/* Define if your system has a working mmap()-based memory allocator. */ -/* #undef HAVE_MMAP_VM */ - -/* Define to 1 if you have the `mprotect' function. */ -#define HAVE_MPROTECT 1 - -/* Define to 1 if you have the `munmap' function. */ -#define HAVE_MUNMAP 1 - -/* Define to 1 if you have the `nanosleep' function. */ -#define HAVE_NANOSLEEP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_NET_IF_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NET_IF_TUN_H */ - -/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for - sshpty.c). */ -/* #undef HAVE_NEWS4 */ - -/* Define to 1 if you have the `poll' function. */ -#define HAVE_POLL 1 - -/* Define if pthreads are available. */ -#define HAVE_PTHREADS 1 - -/* Define to 1 if you have the `pthread_cancel' function. */ -#define HAVE_PTHREAD_CANCEL 1 - -/* Define to 1 if you have the `pthread_cond_init' function. */ -#define HAVE_PTHREAD_COND_INIT 1 - -/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 - -/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 - -/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 - -/* Define to 1 if you have the `pthread_testcancel' function. */ -#define HAVE_PTHREAD_TESTCANCEL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_PTY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_HISTORY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_READLINE_H */ - -/* Define to 1 if you have the `round' function. */ -#define HAVE_ROUND 1 - -/* Define to 1 if you have the `roundf' function. */ -#define HAVE_ROUNDF 1 - -/* Define to 1 if you have the `sem_init' function. */ -#define HAVE_SEM_INIT 1 - -/* Define to 1 if you have the `sigaction' function. */ -#define HAVE_SIGACTION 1 - -/* Define if we know a hack to replace siginfo_t->si_addr member. */ -/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ - -/* Define if your system support extended signals. */ -/* #undef HAVE_SIGINFO_T */ - -/* Define to 1 if you have the `signal' function. */ -#define HAVE_SIGNAL 1 - -/* Define if sa_restorer is available in struct sigaction. */ -/* #undef HAVE_SIGNAL_SA_RESTORER */ - -/* Define if we can ignore the fault (instruction skipping in SIGSEGV - handler). */ -#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - -/* Define if slirp library is supported */ -#define HAVE_SLIRP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STDLIB_H */ - -/* Define to 1 if you have the `strdup' function. */ -#define HAVE_STRDUP 1 - -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STRINGS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STRING_H */ - -/* Define to 1 if you have the `strlcpy' function. */ -#define HAVE_STRLCPY 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BITYPES_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BSDTTY_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_FILIO_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_IOCTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_MMAN_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_POLL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SELECT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SOCKET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TIME_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_TYPES_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_WAIT_H 1 - -/* Define to 1 if you have the `task_self' function. */ -/* #undef HAVE_TASK_SELF */ - -/* Define to 1 if you have the `trunc' function. */ -#define HAVE_TRUNC 1 - -/* Define to 1 if you have the `truncf' function. */ -#define HAVE_TRUNCF 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UNISTD_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UTIL_H 1 - -/* Define to 1 if you have the `vhangup' function. */ -/* #undef HAVE_VHANGUP */ - -/* Define to 1 if you have the `vm_allocate' function. */ -#define HAVE_VM_ALLOCATE 1 - -/* Define to 1 if you have the `vm_deallocate' function. */ -#define HAVE_VM_DEALLOCATE 1 - -/* Define to 1 if you have the `vm_protect' function. */ -#define HAVE_VM_PROTECT 1 - -/* Define if your system supports Windows exceptions. */ -/* #undef HAVE_WIN32_EXCEPTIONS */ - -/* Define to 1 if you have the `_getpty' function. */ -/* #undef HAVE__GETPTY */ - -/* Define to the floating point format of the host machine. */ -#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT - -/* Define to 1 if the host machine stores floating point numbers in memory - with the word containing the sign bit at the lowest address, or to 0 if it - does it the other way around. This macro should not be defined if the - ordering is the same as for multi-word integers. */ -/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ - -/* Define constant offset for Mac address translation */ -/* #undef NATMEM_OFFSET */ - -/* Define to the address where bug reports for this package should be sent. */ -#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" - -/* Define to the full name of this package. */ -#define PACKAGE_NAME "SheepShaver" - -/* Define to the full name and version of this package. */ -#define PACKAGE_STRING "SheepShaver 2.4" - -/* Define to the one symbol short name of this package. */ -#define PACKAGE_TARNAME "SheepShaver" - -/* Define to the version of this package. */ -#define PACKAGE_VERSION "2.4" - -/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this - system. */ -#define PAGEZERO_HACK 1 - -/* Define as the return type of signal handlers (`int' or `void'). */ -#define RETSIGTYPE void - -/* Define if your system requires sigactions to be reinstalled. */ -/* #undef SIGACTION_NEED_REINSTALL */ - -/* Define if your system requires signals to be reinstalled. */ -/* #undef SIGNAL_NEED_REINSTALL */ - -/* The size of a `double', as computed by sizeof. */ -#define SIZEOF_DOUBLE 8 - -/* The size of a `float', as computed by sizeof. */ -#define SIZEOF_FLOAT 4 - -/* The size of a `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of a `long', as computed by sizeof. */ -#define SIZEOF_LONG 4 - -/* The size of a `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of a `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - -/* The size of a `void *', as computed by sizeof. */ -#define SIZEOF_VOID_P 4 - -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - -/* Define to 1 if you can safely include both and . */ -#define TIME_WITH_SYS_TIME 1 - -/* Define to 1 if your declares `struct tm'. */ -/* #undef TM_IN_SYS_TIME */ - -/* Define if BSD-style non-blocking I/O is to be used */ -/* #undef USE_FIONBIO */ - -/* Define to enble SDL support. */ -#define USE_SDL 1 - -/* Define to enable SDL audio support */ -#define USE_SDL_AUDIO 1 - -/* Define to enable SDL video graphics support. */ -#define USE_SDL_VIDEO 1 - -/* Define to 1 if your processor stores words with the most significant byte - first (like Motorola and SPARC, unlike Intel and VAX). */ -#define WORDS_BIGENDIAN 1 - -/* Define to 1 if the X Window System is missing or not being used. */ -/* #undef X_DISPLAY_MISSING */ - -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `off_t' if does not define. */ -#define loff_t off_t - -/* Define to `long' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned' if does not define. */ -/* #undef size_t */ - -/* Define to 'int' if doesn't define. */ -/* #undef socklen_t */ - -#endif /* CONFIG_H */ - diff --git a/SheepShaver/src/MacOSX/config/config-macosx-x86_32.h b/SheepShaver/src/MacOSX/config/config-macosx-x86_32.h deleted file mode 100644 index 030f42a76..000000000 --- a/SheepShaver/src/MacOSX/config/config-macosx-x86_32.h +++ /dev/null @@ -1,527 +0,0 @@ -/* config.h. Generated from config.h.in by configure. */ -/* config.h.in. Generated from configure.ac by autoheader. */ - -#ifndef CONFIG_H -#define CONFIG_H - - -/* Define if building universal (internal helper macro) */ -/* #undef AC_APPLE_UNIVERSAL_BUILD */ - -/* Define if using a PowerPC CPU emulator. */ -#define EMULATED_PPC 1 - -/* Define to enable dyngen engine */ -#define ENABLE_DYNGEN 1 - -/* Define is using ESD. */ -/* #undef ENABLE_ESD */ - -/* Define if using Linux fbdev extension. */ -/* #undef ENABLE_FBDEV_DGA */ - -/* Define if using GTK. */ -/* #undef ENABLE_GTK */ - -/* Define if using "mon". */ -/* #undef ENABLE_MON */ - -/* Define if your system supports TUN/TAP devices. */ -/* #undef ENABLE_TUNTAP */ - -/* Define if using video enabled on SEGV signals. */ -/* #undef ENABLE_VOSF */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_DGA */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_VIDMODE */ - -/* Define to 1 if you have the header file. */ -#define HAVE_ARPA_INET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_AVAILABILITYMACROS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_BYTESWAP_H */ - -/* Define to 1 if you have the `ceil' function. */ -#define HAVE_CEIL 1 - -/* Define to 1 if you have the `ceilf' function. */ -#define HAVE_CEILF 1 - -/* Define to 1 if you have the `cfmakeraw' function. */ -#define HAVE_CFMAKERAW 1 - -/* Define to 1 if you have the `clock_gettime' function. */ -/* #undef HAVE_CLOCK_GETTIME */ - -/* Define to 1 if you have the `clock_nanosleep' function. */ -/* #undef HAVE_CLOCK_NANOSLEEP */ - -/* Define if you have /dev/ptmx. */ -/* #undef HAVE_DEV_PTMX */ - -/* Define if you have /dev/ptc. */ -/* #undef HAVE_DEV_PTS_AND_PTC */ - -/* Define to 1 if you have the header file. */ -#define HAVE_DIRENT_H 1 - -/* Define to 1 if you have the `exp2' function. */ -#define HAVE_EXP2 1 - -/* Define to 1 if you have the `exp2f' function. */ -#define HAVE_EXP2F 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FCNTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FENV_H 1 - -/* Define to 1 if you have the `floor' function. */ -#define HAVE_FLOOR 1 - -/* Define to 1 if you have the `floorf' function. */ -#define HAVE_FLOORF 1 - -/* Define if framework AppKit is available. */ -#define HAVE_FRAMEWORK_APPKIT 1 - -/* Define if framework AudioToolbox is available. */ -#define HAVE_FRAMEWORK_AUDIOTOOLBOX 1 - -/* Define if framework AudioUnit is available. */ -#define HAVE_FRAMEWORK_AUDIOUNIT 1 - -/* Define if framework Carbon is available. */ -#define HAVE_FRAMEWORK_CARBON 1 - -/* Define if framework CoreAudio is available. */ -#define HAVE_FRAMEWORK_COREAUDIO 1 - -/* Define if framework CoreFoundation is available. */ -#define HAVE_FRAMEWORK_COREFOUNDATION 1 - -/* Define if framework IOKit is available. */ -#define HAVE_FRAMEWORK_IOKIT 1 - -/* Define if framework SDL is available. */ -/* #undef HAVE_FRAMEWORK_SDL */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_HISTORY_H */ - -/* Define to 1 if you have the `inet_aton' function. */ -#define HAVE_INET_ATON 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_INTTYPES_H */ - -/* Define to 1 if you have the header - file. */ -#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 - -/* Define to 1 if you have the `curses' library (-lcurses). */ -/* #undef HAVE_LIBCURSES */ - -/* Define to 1 if you have the `c_r' library (-lc_r). */ -/* #undef HAVE_LIBC_R */ - -/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ -/* #undef HAVE_LIBHCURSES */ - -/* Define to 1 if you have the `m' library (-lm). */ -#define HAVE_LIBM 1 - -/* Define to 1 if you have the `ncurses' library (-lncurses). */ -/* #undef HAVE_LIBNCURSES */ - -/* Define to 1 if you have the `posix4' library (-lposix4). */ -/* #undef HAVE_LIBPOSIX4 */ - -/* Define to 1 if you have the `pthread' library (-lpthread). */ -#define HAVE_LIBPTHREAD 1 - -/* Define to 1 if you have the `PTL' library (-lPTL). */ -/* #undef HAVE_LIBPTL */ - -/* Define to 1 if you have the `readline' library (-lreadline). */ -/* #undef HAVE_LIBREADLINE */ - -/* Define to 1 if you have the `termcap' library (-ltermcap). */ -/* #undef HAVE_LIBTERMCAP */ - -/* Define to 1 if you have the `terminfo' library (-lterminfo). */ -/* #undef HAVE_LIBTERMINFO */ - -/* Define to 1 if you have the `termlib' library (-ltermlib). */ -/* #undef HAVE_LIBTERMLIB */ - -/* Define to 1 if you have the `vhd' library (-lvhd). */ -/* #undef HAVE_LIBVHD */ - -/* Define if there is a linker script to relocate the executable above - 0x70000000. */ -#define HAVE_LINKER_SCRIPT 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_TUN_H */ - -/* Define to 1 if you have the `log2' function. */ -#define HAVE_LOG2 1 - -/* Define to 1 if you have the `log2f' function. */ -#define HAVE_LOG2F 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LOGIN_H */ - -/* Define if your system supports Mach exceptions. */ -#define HAVE_MACH_EXCEPTIONS 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_MACH_INIT_H 1 - -/* Define to 1 if you have the `mach_task_self' function. */ -#define HAVE_MACH_TASK_SELF 1 - -/* Define if your system has a working vm_allocate()-based memory allocator. - */ -#define HAVE_MACH_VM 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_VM_MAP_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MALLOC_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MEMORY_H */ - -/* Define to 1 if you have the `mmap' function. */ -#define HAVE_MMAP 1 - -/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. - */ -/* #undef HAVE_MMAP_ANON */ - -/* Define if defines MAP_ANONYMOUS and mmap()'ing with - MAP_ANONYMOUS works. */ -/* #undef HAVE_MMAP_ANONYMOUS */ - -/* Define if your system has a working mmap()-based memory allocator. */ -/* #undef HAVE_MMAP_VM */ - -/* Define to 1 if you have the `mprotect' function. */ -#define HAVE_MPROTECT 1 - -/* Define to 1 if you have the `munmap' function. */ -#define HAVE_MUNMAP 1 - -/* Define to 1 if you have the `nanosleep' function. */ -#define HAVE_NANOSLEEP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_NET_IF_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NET_IF_TUN_H */ - -/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for - sshpty.c). */ -/* #undef HAVE_NEWS4 */ - -/* Define to 1 if you have the `poll' function. */ -#define HAVE_POLL 1 - -/* Define if pthreads are available. */ -#define HAVE_PTHREADS 1 - -/* Define to 1 if you have the `pthread_cancel' function. */ -#define HAVE_PTHREAD_CANCEL 1 - -/* Define to 1 if you have the `pthread_cond_init' function. */ -#define HAVE_PTHREAD_COND_INIT 1 - -/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 - -/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 - -/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 - -/* Define to 1 if you have the `pthread_testcancel' function. */ -#define HAVE_PTHREAD_TESTCANCEL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_PTY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_HISTORY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_READLINE_H */ - -/* Define to 1 if you have the `round' function. */ -#define HAVE_ROUND 1 - -/* Define to 1 if you have the `roundf' function. */ -#define HAVE_ROUNDF 1 - -/* Define to 1 if you have the `sem_init' function. */ -#define HAVE_SEM_INIT 1 - -/* Define to 1 if you have the `sigaction' function. */ -#define HAVE_SIGACTION 1 - -/* Define if we know a hack to replace siginfo_t->si_addr member. */ -/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ - -/* Define if your system support extended signals. */ -/* #undef HAVE_SIGINFO_T */ - -/* Define to 1 if you have the `signal' function. */ -#define HAVE_SIGNAL 1 - -/* Define if sa_restorer is available in struct sigaction. */ -/* #undef HAVE_SIGNAL_SA_RESTORER */ - -/* Define if we can ignore the fault (instruction skipping in SIGSEGV - handler). */ -#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - -/* Define if slirp library is supported */ -#define HAVE_SLIRP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STDLIB_H */ - -/* Define to 1 if you have the `strdup' function. */ -#define HAVE_STRDUP 1 - -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STRINGS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STRING_H */ - -/* Define to 1 if you have the `strlcpy' function. */ -#define HAVE_STRLCPY 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BITYPES_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BSDTTY_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_FILIO_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_IOCTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_MMAN_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_POLL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SELECT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SOCKET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TIME_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_TYPES_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_WAIT_H 1 - -/* Define to 1 if you have the `task_self' function. */ -/* #undef HAVE_TASK_SELF */ - -/* Define to 1 if you have the `trunc' function. */ -#define HAVE_TRUNC 1 - -/* Define to 1 if you have the `truncf' function. */ -#define HAVE_TRUNCF 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UNISTD_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UTIL_H 1 - -/* Define to 1 if you have the `vhangup' function. */ -/* #undef HAVE_VHANGUP */ - -/* Define to 1 if you have the `vm_allocate' function. */ -#define HAVE_VM_ALLOCATE 1 - -/* Define to 1 if you have the `vm_deallocate' function. */ -#define HAVE_VM_DEALLOCATE 1 - -/* Define to 1 if you have the `vm_protect' function. */ -#define HAVE_VM_PROTECT 1 - -/* Define if your system supports Windows exceptions. */ -/* #undef HAVE_WIN32_EXCEPTIONS */ - -/* Define to 1 if you have the `_getpty' function. */ -/* #undef HAVE__GETPTY */ - -/* Define to the floating point format of the host machine. */ -#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT - -/* Define to 1 if the host machine stores floating point numbers in memory - with the word containing the sign bit at the lowest address, or to 0 if it - does it the other way around. This macro should not be defined if the - ordering is the same as for multi-word integers. */ -/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ - -/* Define constant offset for Mac address translation */ -/* #undef NATMEM_OFFSET */ - -/* Define to the address where bug reports for this package should be sent. */ -#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" - -/* Define to the full name of this package. */ -#define PACKAGE_NAME "SheepShaver" - -/* Define to the full name and version of this package. */ -#define PACKAGE_STRING "SheepShaver 2.4" - -/* Define to the one symbol short name of this package. */ -#define PACKAGE_TARNAME "SheepShaver" - -/* Define to the home page for this package. */ -#define PACKAGE_URL "" - -/* Define to the version of this package. */ -#define PACKAGE_VERSION "2.4" - -/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this - system. */ -#define PAGEZERO_HACK 1 - -/* Define as the return type of signal handlers (`int' or `void'). */ -#define RETSIGTYPE void - -/* Define if your system requires sigactions to be reinstalled. */ -/* #undef SIGACTION_NEED_REINSTALL */ - -/* Define if your system requires signals to be reinstalled. */ -/* #undef SIGNAL_NEED_REINSTALL */ - -/* The size of `double', as computed by sizeof. */ -#define SIZEOF_DOUBLE 8 - -/* The size of `float', as computed by sizeof. */ -#define SIZEOF_FLOAT 4 - -/* The size of `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of `long', as computed by sizeof. */ -#define SIZEOF_LONG 4 - -/* The size of `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - -/* The size of `void *', as computed by sizeof. */ -#define SIZEOF_VOID_P 4 - -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - -/* Define to 1 if you can safely include both and . */ -#define TIME_WITH_SYS_TIME 1 - -/* Define to 1 if your declares `struct tm'. */ -/* #undef TM_IN_SYS_TIME */ - -/* Define if BSD-style non-blocking I/O is to be used */ -/* #undef USE_FIONBIO */ - -/* Define to enble SDL support. */ -#define USE_SDL 1 - -/* Define to enable SDL audio support */ -#define USE_SDL_AUDIO 1 - -/* Define to enable SDL video graphics support. */ -#define USE_SDL_VIDEO 1 - -/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most - significant byte first (like Motorola and SPARC, unlike Intel). */ -#if defined AC_APPLE_UNIVERSAL_BUILD -# if defined __BIG_ENDIAN__ -# define WORDS_BIGENDIAN 1 -# endif -#else -# ifndef WORDS_BIGENDIAN -/* # undef WORDS_BIGENDIAN */ -# endif -#endif - -/* Define to 1 if the X Window System is missing or not being used. */ -/* #undef X_DISPLAY_MISSING */ - -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `off_t' if does not define. */ -#define loff_t off_t - -/* Define to `long int' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned int' if does not define. */ -/* #undef size_t */ - -/* Define to 'int' if doesn't define. */ -/* #undef socklen_t */ - -#endif /* CONFIG_H */ - diff --git a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h b/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h deleted file mode 100644 index 760e64503..000000000 --- a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h +++ /dev/null @@ -1,527 +0,0 @@ -/* config.h. Generated from config.h.in by configure. */ -/* config.h.in. Generated from configure.ac by autoheader. */ - -#ifndef CONFIG_H -#define CONFIG_H - - -/* Define if building universal (internal helper macro) */ -/* #undef AC_APPLE_UNIVERSAL_BUILD */ - -/* Define if using a PowerPC CPU emulator. */ -#define EMULATED_PPC 1 - -/* Define to enable dyngen engine */ -#define ENABLE_DYNGEN 1 - -/* Define is using ESD. */ -/* #undef ENABLE_ESD */ - -/* Define if using Linux fbdev extension. */ -/* #undef ENABLE_FBDEV_DGA */ - -/* Define if using GTK. */ -/* #undef ENABLE_GTK */ - -/* Define if using "mon". */ -/* #undef ENABLE_MON */ - -/* Define if your system supports TUN/TAP devices. */ -/* #undef ENABLE_TUNTAP */ - -/* Define if using video enabled on SEGV signals. */ -/* #undef ENABLE_VOSF */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_DGA */ - -/* Define if using XFree86 DGA extension. */ -/* #undef ENABLE_XF86_VIDMODE */ - -/* Define to 1 if you have the header file. */ -#define HAVE_ARPA_INET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_AVAILABILITYMACROS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_BYTESWAP_H */ - -/* Define to 1 if you have the `ceil' function. */ -#define HAVE_CEIL 1 - -/* Define to 1 if you have the `ceilf' function. */ -#define HAVE_CEILF 1 - -/* Define to 1 if you have the `cfmakeraw' function. */ -#define HAVE_CFMAKERAW 1 - -/* Define to 1 if you have the `clock_gettime' function. */ -/* #undef HAVE_CLOCK_GETTIME */ - -/* Define to 1 if you have the `clock_nanosleep' function. */ -/* #undef HAVE_CLOCK_NANOSLEEP */ - -/* Define if you have /dev/ptmx. */ -/* #undef HAVE_DEV_PTMX */ - -/* Define if you have /dev/ptc. */ -/* #undef HAVE_DEV_PTS_AND_PTC */ - -/* Define to 1 if you have the header file. */ -#define HAVE_DIRENT_H 1 - -/* Define to 1 if you have the `exp2' function. */ -#define HAVE_EXP2 1 - -/* Define to 1 if you have the `exp2f' function. */ -#define HAVE_EXP2F 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FCNTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_FENV_H 1 - -/* Define to 1 if you have the `floor' function. */ -#define HAVE_FLOOR 1 - -/* Define to 1 if you have the `floorf' function. */ -#define HAVE_FLOORF 1 - -/* Define if framework AppKit is available. */ -#define HAVE_FRAMEWORK_APPKIT 1 - -/* Define if framework AudioToolbox is available. */ -#define HAVE_FRAMEWORK_AUDIOTOOLBOX 1 - -/* Define if framework AudioUnit is available. */ -#define HAVE_FRAMEWORK_AUDIOUNIT 1 - -/* Define if framework Carbon is available. */ -#define HAVE_FRAMEWORK_CARBON 1 - -/* Define if framework CoreAudio is available. */ -#define HAVE_FRAMEWORK_COREAUDIO 1 - -/* Define if framework CoreFoundation is available. */ -#define HAVE_FRAMEWORK_COREFOUNDATION 1 - -/* Define if framework IOKit is available. */ -#define HAVE_FRAMEWORK_IOKIT 1 - -/* Define if framework SDL is available. */ -/* #undef HAVE_FRAMEWORK_SDL */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_HISTORY_H */ - -/* Define to 1 if you have the `inet_aton' function. */ -#define HAVE_INET_ATON 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_INTTYPES_H */ - -/* Define to 1 if you have the header - file. */ -#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 - -/* Define to 1 if you have the `curses' library (-lcurses). */ -/* #undef HAVE_LIBCURSES */ - -/* Define to 1 if you have the `c_r' library (-lc_r). */ -/* #undef HAVE_LIBC_R */ - -/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ -/* #undef HAVE_LIBHCURSES */ - -/* Define to 1 if you have the `m' library (-lm). */ -#define HAVE_LIBM 1 - -/* Define to 1 if you have the `ncurses' library (-lncurses). */ -/* #undef HAVE_LIBNCURSES */ - -/* Define to 1 if you have the `posix4' library (-lposix4). */ -/* #undef HAVE_LIBPOSIX4 */ - -/* Define to 1 if you have the `pthread' library (-lpthread). */ -#define HAVE_LIBPTHREAD 1 - -/* Define to 1 if you have the `PTL' library (-lPTL). */ -/* #undef HAVE_LIBPTL */ - -/* Define to 1 if you have the `readline' library (-lreadline). */ -/* #undef HAVE_LIBREADLINE */ - -/* Define to 1 if you have the `termcap' library (-ltermcap). */ -/* #undef HAVE_LIBTERMCAP */ - -/* Define to 1 if you have the `terminfo' library (-lterminfo). */ -/* #undef HAVE_LIBTERMINFO */ - -/* Define to 1 if you have the `termlib' library (-ltermlib). */ -/* #undef HAVE_LIBTERMLIB */ - -/* Define to 1 if you have the `vhd' library (-lvhd). */ -/* #undef HAVE_LIBVHD */ - -/* Define if there is a linker script to relocate the executable above - 0x70000000. */ -#define HAVE_LINKER_SCRIPT 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LINUX_IF_TUN_H */ - -/* Define to 1 if you have the `log2' function. */ -#define HAVE_LOG2 1 - -/* Define to 1 if you have the `log2f' function. */ -#define HAVE_LOG2F 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_LOGIN_H */ - -/* Define if your system supports Mach exceptions. */ -#define HAVE_MACH_EXCEPTIONS 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_MACH_INIT_H 1 - -/* Define to 1 if you have the `mach_task_self' function. */ -#define HAVE_MACH_TASK_SELF 1 - -/* Define if your system has a working vm_allocate()-based memory allocator. - */ -#define HAVE_MACH_VM 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_VM_MAP_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MALLOC_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_MEMORY_H */ - -/* Define to 1 if you have the `mmap' function. */ -#define HAVE_MMAP 1 - -/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. - */ -/* #undef HAVE_MMAP_ANON */ - -/* Define if defines MAP_ANONYMOUS and mmap()'ing with - MAP_ANONYMOUS works. */ -/* #undef HAVE_MMAP_ANONYMOUS */ - -/* Define if your system has a working mmap()-based memory allocator. */ -/* #undef HAVE_MMAP_VM */ - -/* Define to 1 if you have the `mprotect' function. */ -#define HAVE_MPROTECT 1 - -/* Define to 1 if you have the `munmap' function. */ -#define HAVE_MUNMAP 1 - -/* Define to 1 if you have the `nanosleep' function. */ -#define HAVE_NANOSLEEP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_NET_IF_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NET_IF_TUN_H */ - -/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for - sshpty.c). */ -/* #undef HAVE_NEWS4 */ - -/* Define to 1 if you have the `poll' function. */ -#define HAVE_POLL 1 - -/* Define if pthreads are available. */ -#define HAVE_PTHREADS 1 - -/* Define to 1 if you have the `pthread_cancel' function. */ -#define HAVE_PTHREAD_CANCEL 1 - -/* Define to 1 if you have the `pthread_cond_init' function. */ -#define HAVE_PTHREAD_COND_INIT 1 - -/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 - -/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 - -/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 - -/* Define to 1 if you have the `pthread_testcancel' function. */ -#define HAVE_PTHREAD_TESTCANCEL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_PTY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_HISTORY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_READLINE_H */ - -/* Define to 1 if you have the `round' function. */ -#define HAVE_ROUND 1 - -/* Define to 1 if you have the `roundf' function. */ -#define HAVE_ROUNDF 1 - -/* Define to 1 if you have the `sem_init' function. */ -#define HAVE_SEM_INIT 1 - -/* Define to 1 if you have the `sigaction' function. */ -#define HAVE_SIGACTION 1 - -/* Define if we know a hack to replace siginfo_t->si_addr member. */ -/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ - -/* Define if your system support extended signals. */ -/* #undef HAVE_SIGINFO_T */ - -/* Define to 1 if you have the `signal' function. */ -#define HAVE_SIGNAL 1 - -/* Define if sa_restorer is available in struct sigaction. */ -/* #undef HAVE_SIGNAL_SA_RESTORER */ - -/* Define if we can ignore the fault (instruction skipping in SIGSEGV - handler). */ -#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - -/* Define if slirp library is supported */ -#define HAVE_SLIRP 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STDLIB_H */ - -/* Define to 1 if you have the `strdup' function. */ -#define HAVE_STRDUP 1 - -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STRINGS_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STRING_H */ - -/* Define to 1 if you have the `strlcpy' function. */ -#define HAVE_STRLCPY 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BITYPES_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BSDTTY_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_FILIO_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_IOCTL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_MMAN_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_POLL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SELECT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SOCKET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TIME_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_TYPES_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_WAIT_H 1 - -/* Define to 1 if you have the `task_self' function. */ -/* #undef HAVE_TASK_SELF */ - -/* Define to 1 if you have the `trunc' function. */ -#define HAVE_TRUNC 1 - -/* Define to 1 if you have the `truncf' function. */ -#define HAVE_TRUNCF 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UNISTD_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_UTIL_H 1 - -/* Define to 1 if you have the `vhangup' function. */ -/* #undef HAVE_VHANGUP */ - -/* Define to 1 if you have the `vm_allocate' function. */ -#define HAVE_VM_ALLOCATE 1 - -/* Define to 1 if you have the `vm_deallocate' function. */ -#define HAVE_VM_DEALLOCATE 1 - -/* Define to 1 if you have the `vm_protect' function. */ -#define HAVE_VM_PROTECT 1 - -/* Define if your system supports Windows exceptions. */ -/* #undef HAVE_WIN32_EXCEPTIONS */ - -/* Define to 1 if you have the `_getpty' function. */ -/* #undef HAVE__GETPTY */ - -/* Define to the floating point format of the host machine. */ -#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT - -/* Define to 1 if the host machine stores floating point numbers in memory - with the word containing the sign bit at the lowest address, or to 0 if it - does it the other way around. This macro should not be defined if the - ordering is the same as for multi-word integers. */ -/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ - -/* Define constant offset for Mac address translation */ -/* #undef NATMEM_OFFSET */ - -/* Define to the address where bug reports for this package should be sent. */ -#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" - -/* Define to the full name of this package. */ -#define PACKAGE_NAME "SheepShaver" - -/* Define to the full name and version of this package. */ -#define PACKAGE_STRING "SheepShaver 2.4" - -/* Define to the one symbol short name of this package. */ -#define PACKAGE_TARNAME "SheepShaver" - -/* Define to the home page for this package. */ -#define PACKAGE_URL "" - -/* Define to the version of this package. */ -#define PACKAGE_VERSION "2.4" - -/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this - system. */ -#define PAGEZERO_HACK 1 - -/* Define as the return type of signal handlers (`int' or `void'). */ -#define RETSIGTYPE void - -/* Define if your system requires sigactions to be reinstalled. */ -/* #undef SIGACTION_NEED_REINSTALL */ - -/* Define if your system requires signals to be reinstalled. */ -/* #undef SIGNAL_NEED_REINSTALL */ - -/* The size of `double', as computed by sizeof. */ -#define SIZEOF_DOUBLE 8 - -/* The size of `float', as computed by sizeof. */ -#define SIZEOF_FLOAT 4 - -/* The size of `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of `long', as computed by sizeof. */ -#define SIZEOF_LONG 8 - -/* The size of `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - -/* The size of `void *', as computed by sizeof. */ -#define SIZEOF_VOID_P 8 - -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - -/* Define to 1 if you can safely include both and . */ -#define TIME_WITH_SYS_TIME 1 - -/* Define to 1 if your declares `struct tm'. */ -/* #undef TM_IN_SYS_TIME */ - -/* Define if BSD-style non-blocking I/O is to be used */ -/* #undef USE_FIONBIO */ - -/* Define to enble SDL support. */ -#define USE_SDL 1 - -/* Define to enable SDL audio support */ -#define USE_SDL_AUDIO 1 - -/* Define to enable SDL video graphics support. */ -#define USE_SDL_VIDEO 1 - -/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most - significant byte first (like Motorola and SPARC, unlike Intel). */ -#if defined AC_APPLE_UNIVERSAL_BUILD -# if defined __BIG_ENDIAN__ -# define WORDS_BIGENDIAN 1 -# endif -#else -# ifndef WORDS_BIGENDIAN -/* # undef WORDS_BIGENDIAN */ -# endif -#endif - -/* Define to 1 if the X Window System is missing or not being used. */ -/* #undef X_DISPLAY_MISSING */ - -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `off_t' if does not define. */ -#define loff_t off_t - -/* Define to `long int' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned int' if does not define. */ -/* #undef size_t */ - -/* Define to 'int' if doesn't define. */ -/* #undef socklen_t */ - -#endif /* CONFIG_H */ - diff --git a/SheepShaver/src/MacOSX/config/config.h b/SheepShaver/src/MacOSX/config/config.h deleted file mode 100644 index bb5a07813..000000000 --- a/SheepShaver/src/MacOSX/config/config.h +++ /dev/null @@ -1,9 +0,0 @@ -#if defined(__x86_64__) - #include "config-macosx-x86_64.h" -#elif defined(__i386__) - #include "config-macosx-x86_32.h" -#elif defined(__ppc__) - #include "config-macosx-ppc_32.h" -#else - #error Unknown platform -#endif \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/extfs_macosx.cpp b/SheepShaver/src/MacOSX/extfs_macosx.cpp deleted file mode 120000 index 1afcd4b17..000000000 --- a/SheepShaver/src/MacOSX/extfs_macosx.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/extfs_macosx.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/macos_util_macosx.h b/SheepShaver/src/MacOSX/macos_util_macosx.h deleted file mode 120000 index cef14874a..000000000 --- a/SheepShaver/src/MacOSX/macos_util_macosx.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/macos_util_macosx.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/prefs_macosx.mm b/SheepShaver/src/MacOSX/prefs_macosx.mm deleted file mode 100644 index e8b779242..000000000 --- a/SheepShaver/src/MacOSX/prefs_macosx.mm +++ /dev/null @@ -1,131 +0,0 @@ -/* - * $Id$ - * - * prefs_macosx.mm - Enables access to SheepShaver preferences while - * SheepShaver is running (on Mac OS X). - * - * Copyright (C) 2007 Alexei Svitkine - * - * 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 "sysdeps.h" - -// The _UINT64 define is needed to guard against a typedef mismatch with Snow Leopard headers. -#define _UINT64 - -#include -#include "VMSettingsController.h" - - -@interface SheepShaverMain : NSObject -{ - NSArray *nibObjects; - NSWindow *prefsWindow; -} -@end - -@implementation SheepShaverMain - - -- (NSArray*) loadPrefsNibFile -{ - NSNib *nib = [[NSNib alloc] initWithNibNamed:@"VMSettingsWindow" bundle:nil]; - NSArray *objects = nil; - - if (![nib instantiateNibWithOwner:[VMSettingsController sharedInstance] topLevelObjects:&objects]) { - NSLog(@"Could not load Prefs NIB file!\n"); - return nil; - } - - NSLog(@"%d objects loaded\n", [objects count]); - - // Release the raw nib data. - [nib release]; - - // Release the top-level objects so that they are just owned by the array. - [objects makeObjectsPerformSelector:@selector(release)]; - - prefsWindow = nil; - for (int i = 0; i < [objects count]; i++) { - NSObject *object = [objects objectAtIndex:i]; - NSLog(@"Got %@", object); - - if ([object isKindOfClass:[NSWindow class]]) { - prefsWindow = (NSWindow *) object; - break; - } - } - - if (prefsWindow == nil) { - NSLog(@"Could not find NSWindow in Prefs NIB file!\n"); - return nil; - } - - return objects; -} - - -- (void) openPreferences:(id)sender -{ - NSAutoreleasePool *pool; - - if (nibObjects == nil) { - nibObjects = [self loadPrefsNibFile]; - if (nibObjects == nil) - return; - [nibObjects retain]; - } - - pool = [[NSAutoreleasePool alloc] init]; - [[VMSettingsController sharedInstance] setupGUI]; - [NSApp runModalForWindow:prefsWindow]; - [pool release]; -} - -@end - -/* - * Initialization - */ - -void prefs_init(void) -{ - NSAutoreleasePool *pool; - NSMenu *appMenu; - NSMenuItem *menuItem; - - pool = [[NSAutoreleasePool alloc] init]; - - appMenu = [[[NSApp mainMenu] itemAtIndex:0] submenu]; - menuItem = [[NSMenuItem alloc] initWithTitle:@"Preferences..." action:@selector(openPreferences:) keyEquivalent:@","]; - [appMenu insertItem:menuItem atIndex:2]; - [appMenu insertItem:[NSMenuItem separatorItem] atIndex:3]; - [menuItem release]; - - [NSApp setDelegate:[[SheepShaverMain alloc] init]]; - - [pool release]; -} - - -/* - * Deinitialization - */ - -void prefs_exit(void) -{ -} diff --git a/SheepShaver/src/MacOSX/sys_darwin.cpp b/SheepShaver/src/MacOSX/sys_darwin.cpp deleted file mode 120000 index 28b803182..000000000 --- a/SheepShaver/src/MacOSX/sys_darwin.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/sys_darwin.cpp \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/utils_macosx.h b/SheepShaver/src/MacOSX/utils_macosx.h deleted file mode 120000 index c8777733a..000000000 --- a/SheepShaver/src/MacOSX/utils_macosx.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/utils_macosx.h \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/utils_macosx.mm b/SheepShaver/src/MacOSX/utils_macosx.mm deleted file mode 120000 index 190649582..000000000 --- a/SheepShaver/src/MacOSX/utils_macosx.mm +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/utils_macosx.mm \ No newline at end of file diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL deleted file mode 120000 index 48cb61ebe..000000000 --- a/SheepShaver/src/SDL +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/SDL \ No newline at end of file diff --git a/SheepShaver/src/Unix/.gitignore b/SheepShaver/src/Unix/.gitignore deleted file mode 100644 index 0461f22ec..000000000 --- a/SheepShaver/src/Unix/.gitignore +++ /dev/null @@ -1,25 +0,0 @@ -# Object files -obj/* -SheepShaver - -# Autotools generated files -Makefile -aclocal.m4 -autom4te.cache/* -config.h -config.h.in -config.log -config.status -configure - -# Generated files for CPU emulation -basic-dyngen-ops.hpp -ppc-dyngen-ops.hpp -ppc-execute-impl.cpp -dyngen - -# Generated files from the Xcode build -basic-dyngen-ops-x86_32.hpp -basic-dyngen-ops-x86_64.hpp -ppc-dyngen-ops-x86_32.hpp -ppc-dyngen-ops-x86_64.hpp diff --git a/SheepShaver/src/Unix/Darwin/.gitignore b/SheepShaver/src/Unix/Darwin/.gitignore deleted file mode 100644 index 0535c4673..000000000 --- a/SheepShaver/src/Unix/Darwin/.gitignore +++ /dev/null @@ -1,3 +0,0 @@ -# Darwin built utils -lowmem -pagezero diff --git a/SheepShaver/src/Unix/Darwin/lowmem.c b/SheepShaver/src/Unix/Darwin/lowmem.c deleted file mode 120000 index 7e0a359c7..000000000 --- a/SheepShaver/src/Unix/Darwin/lowmem.c +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/lowmem.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/mkstandalone b/SheepShaver/src/Unix/Darwin/mkstandalone deleted file mode 120000 index acfe13f68..000000000 --- a/SheepShaver/src/Unix/Darwin/mkstandalone +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/mkstandalone \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/pagezero.c b/SheepShaver/src/Unix/Darwin/pagezero.c deleted file mode 120000 index ae53c8154..000000000 --- a/SheepShaver/src/Unix/Darwin/pagezero.c +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/pagezero.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/Darwin/testlmem.sh b/SheepShaver/src/Unix/Darwin/testlmem.sh deleted file mode 120000 index 1137ef898..000000000 --- a/SheepShaver/src/Unix/Darwin/testlmem.sh +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Darwin/testlmem.sh \ No newline at end of file diff --git a/SheepShaver/src/Unix/Irix/audio_irix.cpp b/SheepShaver/src/Unix/Irix/audio_irix.cpp deleted file mode 120000 index 2e7ef88f4..000000000 --- a/SheepShaver/src/Unix/Irix/audio_irix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Irix/audio_irix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/Linux/NetDriver b/SheepShaver/src/Unix/Linux/NetDriver deleted file mode 120000 index 6e756eb33..000000000 --- a/SheepShaver/src/Unix/Linux/NetDriver +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Linux/NetDriver \ No newline at end of file diff --git a/SheepShaver/src/Unix/Linux/scsi_linux.cpp b/SheepShaver/src/Unix/Linux/scsi_linux.cpp deleted file mode 120000 index 9ebba5fdf..000000000 --- a/SheepShaver/src/Unix/Linux/scsi_linux.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Linux/scsi_linux.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/Linux/sheepthreads.c b/SheepShaver/src/Unix/Linux/sheepthreads.c deleted file mode 100644 index a286d0675..000000000 --- a/SheepShaver/src/Unix/Linux/sheepthreads.c +++ /dev/null @@ -1,445 +0,0 @@ -/* - * sheepthreads.c - Minimal pthreads implementation (libpthreads doesn't - * like nonstandard stacks) - * - * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - pthread_cancel() kills the thread immediately - * - Semaphores are VERY restricted: the only supported use is to have one - * thread sem_wait() on the semaphore while other threads sem_post() it - * (i.e. to use the semaphore as a signal) - */ - -#include -#include -#include -#include -#include -#include -#include - - -/* Thread stack size */ -#define STACK_SIZE 65536 - -/* From asm_linux.S */ -extern int atomic_add(int *var, int add); -extern int atomic_and(int *var, int and); -extern int atomic_or(int *var, int or); -extern int test_and_set(int *var, int val); - -/* Linux kernel calls */ -extern int __clone(int (*fn)(void *), void *, int, void *); - -/* libc no longer provides struct _pthread_fastlock in pthread.h */ -struct fastlock { - int status; - int spinlock; -}; - -typedef struct { - struct fastlock sem_lock; - int sem_value; - int sem_waiting; -} sem_t; - -#define SEM_VALUE_MAX 64 - -/* Wait for "clone" children only (Linux 2.4+ specific) */ -#ifndef __WCLONE -#define __WCLONE 0 -#endif - - -/* - * Return pthread ID of self - */ - -pthread_t pthread_self(void) -{ - return getpid(); -} - - -/* - * Test whether two pthread IDs are equal - */ - -int pthread_equal(pthread_t t1, pthread_t t2) -{ - return t1 == t2; -} - - -/* - * Send signal to thread - */ - -int pthread_kill(pthread_t thread, int sig) -{ - if (kill(thread, sig) == -1) - return errno; - else - return 0; -} - - -/* - * Create pthread - */ - -struct new_thread { - void *(*fn)(void *); - void *arg; -}; - -static int start_thread(void *arg) -{ - struct new_thread *nt = (struct new_thread *)arg; - nt->fn(nt->arg); - return 0; -} - -int pthread_create(pthread_t *thread, const pthread_attr_t *attr, void *(*start_routine)(void *), void *arg) -{ - struct new_thread *nt; - void *stack; - int pid; - - nt = (struct new_thread *)malloc(sizeof(struct new_thread)); - nt->fn = start_routine; - nt->arg = arg; - stack = malloc(STACK_SIZE); - - pid = __clone(start_thread, (char *)stack + STACK_SIZE - 16, CLONE_VM | CLONE_FS | CLONE_FILES, nt); - if (pid == -1) { - free(stack); - free(nt); - return errno; - } else { - *thread = pid; - return 0; - } -} - - -/* - * Join pthread - */ - -int pthread_join(pthread_t thread, void **ret) -{ - do { - if (waitpid(thread, NULL, __WCLONE) >= 0); - break; - } while (errno == EINTR); - if (ret) - *ret = NULL; - return 0; -} - - -/* - * Cancel thread - */ - -int pthread_cancel(pthread_t thread) -{ - kill(thread, SIGINT); - return 0; -} - - -/* - * Test for cancellation - */ - -void pthread_testcancel(void) -{ -} - - -/* - * Spinlocks - */ - -/* For multiprocessor systems, we want to ensure all memory accesses - are completed before we reset a lock. On other systems, we still - need to make sure that the compiler has flushed everything to memory. */ -#define MEMORY_BARRIER() __asm__ __volatile__ ("sync" : : : "memory") - -static void fastlock_init(struct fastlock *lock) -{ - lock->status = 0; - lock->spinlock = 0; -} - -static int fastlock_try_acquire(struct fastlock *lock) -{ - int res = EBUSY; - if (test_and_set(&lock->spinlock, 1) == 0) { - if (lock->status == 0) { - lock->status = 1; - MEMORY_BARRIER(); - res = 0; - } - lock->spinlock = 0; - } - return res; -} - -static void fastlock_acquire(struct fastlock *lock) -{ - MEMORY_BARRIER(); - while (test_and_set(&lock->spinlock, 1)) - usleep(0); -} - -static void fastlock_release(struct fastlock *lock) -{ - MEMORY_BARRIER(); - lock->spinlock = 0; - __asm__ __volatile__ ("" : "=m" (lock->spinlock) : "m" (lock->spinlock)); -} - - -/* - * Initialize mutex - */ - -int pthread_mutex_init(pthread_mutex_t *mutex, const pthread_mutexattr_t *mutex_attr) -{ - fastlock_init((struct fastlock *)mutex); - return 0; -} - - -/* - * Destroy mutex - */ - -int pthread_mutex_destroy(pthread_mutex_t *mutex) -{ - return (((struct fastlock *)mutex)->status != 0) ? EBUSY : 0; -} - - -/* - * Lock mutex - */ - -int pthread_mutex_lock(pthread_mutex_t *mutex) -{ - fastlock_acquire((struct fastlock *)mutex); - return 0; -} - - -/* - * Try to lock mutex - */ - -int pthread_mutex_trylock(pthread_mutex_t *mutex) -{ - return fastlock_try_acquire((struct fastlock *)mutex); -} - - -/* - * Unlock mutex - */ - -int pthread_mutex_unlock(pthread_mutex_t *mutex) -{ - fastlock_release((struct fastlock *)mutex); - return 0; -} - - -/* - * Create mutex attribute - */ - -int pthread_mutexattr_init(pthread_mutexattr_t *attr) -{ - return 0; -} - - -/* - * Destroy mutex attribute - */ - -int pthread_mutexattr_destroy(pthread_mutexattr_t *attr) -{ - return 0; -} - - -/* - * Init semaphore - */ - -int sem_init(sem_t *sem, int pshared, unsigned int value) -{ - if (sem == NULL || value > SEM_VALUE_MAX) { - errno = EINVAL; - return -1; - } - if (pshared) { - errno = ENOSYS; - return -1; - } - fastlock_init(&sem->sem_lock); - sem->sem_value = value; - sem->sem_waiting = 0; - return 0; -} - - -/* - * Delete remaphore - */ - -int sem_destroy(sem_t *sem) -{ - if (sem == NULL) { - errno = EINVAL; - return -1; - } - if (sem->sem_waiting) { - errno = EBUSY; - return -1; - } - sem->sem_value = 0; - sem->sem_waiting = 0; - return 0; -} - - -/* - * Wait on semaphore - */ - -int sem_wait(sem_t *sem) -{ - if (sem == NULL) { - errno = EINVAL; - return -1; - } - fastlock_acquire(&sem->sem_lock); - if (sem->sem_value > 0) { - sem->sem_value--; - fastlock_release(&sem->sem_lock); - return 0; - } - sem->sem_waiting++; - while (sem->sem_value == 0) { - fastlock_release(&sem->sem_lock); - usleep(0); - fastlock_acquire(&sem->sem_lock); - } - sem->sem_value--; - fastlock_release(&sem->sem_lock); - return 0; -} - - -/* - * Post semaphore - */ - -int sem_post(sem_t *sem) -{ - if (sem == NULL) { - errno = EINVAL; - return -1; - } - fastlock_acquire(&sem->sem_lock); - if (sem->sem_waiting) - sem->sem_waiting--; - else { - if (sem->sem_value >= SEM_VALUE_MAX) { - errno = ERANGE; - fastlock_release(&sem->sem_lock); - return -1; - } - } - sem->sem_value++; - fastlock_release(&sem->sem_lock); - return 0; -} - - -/* - * Simple producer/consumer test program - */ - -#ifdef TEST -#include - -static sem_t p_sem, c_sem; -static int data = 0; - -static void *producer_func(void *arg) -{ - int i, n = (int)arg; - for (i = 0; i < n; i++) { - sem_wait(&p_sem); - data++; - sem_post(&c_sem); - } - return NULL; -} - -static void *consumer_func(void *arg) -{ - int i, n = (int)arg; - for (i = 0; i < n; i++) { - sem_wait(&c_sem); - printf("data: %d\n", data); - sem_post(&p_sem); - } - sleep(1); // for testing pthread_join() - return NULL; -} - -int main(void) -{ - pthread_t producer_thread, consumer_thread; - static const int N = 5; - - if (sem_init(&c_sem, 0, 0) < 0) - return 1; - if (sem_init(&p_sem, 0, 1) < 0) - return 2; - if (pthread_create(&producer_thread, NULL, producer_func, (void *)N) != 0) - return 3; - if (pthread_create(&consumer_thread, NULL, consumer_func, (void *)N) != 0) - return 4; - pthread_join(producer_thread, NULL); - pthread_join(consumer_thread, NULL); - sem_destroy(&p_sem); - sem_destroy(&c_sem); - if (data != N) - return 5; - return 0; -} -#endif \ No newline at end of file diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in deleted file mode 100644 index b2c3b892c..000000000 --- a/SheepShaver/src/Unix/Makefile.in +++ /dev/null @@ -1,260 +0,0 @@ -# Unix makefile for SheepShaver - -## System specific configuration -@SET_MAKE@ -SHELL = /bin/sh - -prefix = @prefix@ -exec_prefix = @exec_prefix@ -bindir = @bindir@ -datadir = @datadir@ -mandir = @mandir@ -man1dir = $(mandir)/man1 - -DESTDIR = - -CC = @CC@ -CXX = @CXX@ -CFLAGS = @CFLAGS@ -CXXFLAGS = @CXXFLAGS@ -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform -I../slirp -DEFS = @DEFS@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" -LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -SYSSRCS = @SYSSRCS@ -CPUSRCS = @CPUSRCS@ -MONSRCS = @MONSRCS@ -PERL = @PERL@ -USE_DYNGEN = @USE_DYNGEN@ -DYNGENSRCS = @DYNGENSRCS@ -DYNGEN_CC = @DYNGEN_CC@ -DYNGEN_CFLAGS = @DYNGEN_CFLAGS@ -DYNGEN_CXXFLAGS = @DYNGEN_CXXFLAGS@ -DYNGEN_OP_FLAGS = @DYNGEN_OP_FLAGS@ -BLESS = @BLESS@ -EXEEXT = @EXEEXT@ -KEYCODES = @KEYCODES@ -INSTALL = @INSTALL@ -INSTALL_PROGRAM = @INSTALL_PROGRAM@ -INSTALL_DATA = @INSTALL_DATA@ - -SLIRP_CFLAGS = @SLIRP_CFLAGS@ -SLIRP_SRCS = @SLIRP_SRCS@ -SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=obj/%.o) - -STANDALONE_GUI = @STANDALONE_GUI@ -GUI_CFLAGS = @GUI_CFLAGS@ -GUI_LIBS = @GUI_LIBS@ -GUI_SRCS = ../prefs.cpp prefs_unix.cpp prefs_editor_gtk.cpp ../prefs_items.cpp \ - ../user_strings.cpp user_strings_unix.cpp xpram_unix.cpp sys_unix.cpp rpc_unix.cpp \ - ../dummy/prefs_dummy.cpp - -XPLAT_SRCS = ../CrossPlatform/vm_alloc.cpp ../CrossPlatform/sigsegv.cpp ../CrossPlatform/video_blit.cpp - -# Append disassembler to dyngen, if available -ifneq (:no,$(MONSRCS):$(USE_DYNGEN)) -DYNGENSRCS += $(filter %i386-dis.c,$(MONSRCS)) -endif - -## Files -SRCS = ../main.cpp main_unix.cpp ../prefs.cpp ../prefs_items.cpp prefs_unix.cpp sys_unix.cpp \ - ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ - ../macos_util.cpp ../timer.cpp timer_unix.cpp ../xpram.cpp xpram_unix.cpp \ - ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp \ - ../gfxaccel.cpp ../video.cpp ../audio.cpp ../ether.cpp ../thunks.cpp \ - ../serial.cpp ../extfs.cpp disk_sparsebundle.cpp tinyxml2.cpp \ - about_window_unix.cpp ../user_strings.cpp user_strings_unix.cpp rpc_unix.cpp \ - sshpty.c strlcpy.c $(XPLAT_SRCS) $(SYSSRCS) $(CPUSRCS) $(MONSRCS) $(SLIRP_SRCS) -APP = SheepShaver -APP_EXE = $(APP)$(EXEEXT) -APP_APP = $(APP).app - -PROGS = $(APP_EXE) -ifeq ($(STANDALONE_GUI),yes) -GUI_APP = SheepShaverGUI -GUI_APP_EXE = $(GUI_APP)$(EXEEXT) -GUI_APP_APP = $(GUI_APP).app -PROGS += $(GUI_APP_EXE) -else -CXXFLAGS += $(GUI_CFLAGS) -LIBS += $(GUI_LIBS) -endif - -## Rules -.PHONY: modules install uninstall clean distclean depend dep -.SUFFIXES: -.SUFFIXES: .c .cpp .S .o .h - -all: $(PROGS) - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS = $(SRCS_LIST_TO_OBJS) - -define GUI_SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .guio, $(foreach file, $(GUI_SRCS), \ - $(basename $(notdir $(file)))))) -endef -GUI_OBJS = $(GUI_SRCS_LIST_TO_OBJS) - -define DYNGENSRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .dgo, $(foreach file, $(DYNGENSRCS), \ - $(basename $(notdir $(file)))))) -endef -DYNGENOBJS = $(DYNGENSRCS_LIST_TO_OBJS) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -$(APP_EXE): $(OBJ_DIR) $(OBJS) - $(CXX) -o $@ $(LDFLAGS) $(OBJS) $(LIBS) - $(BLESS) $(APP_EXE) - -$(GUI_APP_EXE): $(OBJ_DIR) $(GUI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(GUI_OBJS) $(GUI_LIBS) - -$(APP)_app: $(APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns - rm -rf $(APP_APP)/Contents - mkdir -p $(APP_APP)/Contents - ./cpr.sh ../MacOSX/Info.plist $(APP_APP)/Contents/ - echo -n 'APPL????' > $(APP_APP)/Contents/PkgInfo - mkdir -p $(APP_APP)/Contents/MacOS - ./cpr.sh $(APP) $(APP_APP)/Contents/MacOS/ - strip -x $(APP_APP)/Contents/MacOS/$(APP) - mkdir -p $(APP_APP)/Contents/Resources - mkdir -p $(APP_APP)/Contents/Resources/English.lproj - ./cpr.sh ../MacOSX/Launcher/English.lproj/VMSettingsWindow.nib $(APP_APP)/Contents/Resources/English.lproj - ./cpr.sh ../MacOSX/SheepShaver.icns $(APP_APP)/Contents/Resources/ - -$(GUI_APP)_app: $(GUI_APP) ../MacOSX/Info.plist ../MacOSX/$(APP).icns - rm -rf $(GUI_APP_APP)/Contents - mkdir -p $(GUI_APP_APP)/Contents - sed -e "s/$(APP)/$(GUI_APP)/" < ../MacOSX/Info.plist > $(GUI_APP_APP)/Contents/Info.plist - echo -n 'APPL????' > $(GUI_APP_APP)/Contents/PkgInfo - mkdir -p $(GUI_APP_APP)/Contents/MacOS - ./cpr.sh $(GUI_APP) $(GUI_APP_APP)/Contents/MacOS/ - strip -x $(GUI_APP_APP)/Contents/MacOS/$(GUI_APP) - mkdir -p $(GUI_APP_APP)/Contents/Resources - ./cpr.sh ../MacOSX/$(APP).icns $(GUI_APP_APP)/Contents/Resources/$(GUI_APP).icns - -modules: - cd Linux/NetDriver; make - -install: $(PROGS) installdirs - $(INSTALL_PROGRAM) $(APP_EXE) $(DESTDIR)$(bindir)/$(APP_EXE) - if test -f "$(GUI_APP_EXE)"; then \ - $(INSTALL_PROGRAM) $(GUI_APP_EXE) $(DESTDIR)$(bindir)/$(GUI_APP_EXE); \ - fi - -$(INSTALL_DATA) $(APP).1 $(DESTDIR)$(man1dir)/$(APP).1 - $(INSTALL_DATA) $(KEYCODES) $(DESTDIR)$(datadir)/$(APP)/keycodes - $(INSTALL_DATA) tunconfig $(DESTDIR)$(datadir)/$(APP)/tunconfig - chmod 755 $(DESTDIR)$(datadir)/$(APP)/tunconfig - -installdirs: - $(SHELL) mkinstalldirs $(DESTDIR)$(bindir) $(DESTDIR)$(man1dir) $(DESTDIR)$(datadir)/$(APP) - -uninstall: - rm -f $(DESTDIR)$(bindir)/$(APP_EXE) - rm -f $(DESTDIR)$(bindir)/$(GUI_APP_EXE) - rm -f $(DESTDIR)$(man1dir)/$(APP).1 - rm -f $(DESTDIR)$(datadir)/$(APP)/keycodes - rm -f $(DESTDIR)$(datadir)/$(APP)/tunconfig - rmdir $(DESTDIR)$(datadir)/$(APP) - -clean: - rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak ppc-execute-impl.cpp - rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc_asm.out.s - rm -rf $(APP_APP) $(GUI_APP_APP) - -distclean: clean - rm -rf $(OBJ_DIR) - rm -f Makefile - rm -f config.cache config.log config.status config.h - rm -f ../MacOSX/Info.plist - -depend dep: - makedepend $(CPPFLAGS) -Y. $(SRCS) 2>/dev/null - -$(OBJ_DIR)/SDLMain.o : SDLMain.m - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : ../slirp/%.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(SLIRP_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/DiskType.o : DiskType.m - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.mm - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.S - $(CPP) $(CPPFLAGS) -D__ASSEMBLY__ $< -o $*.out.s - $(AS) $(ASFLAGS) -o $@ $*.out.s - rm $*.out.s -$(OBJ_DIR)/%.guio : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(GUI_CFLAGS) -DSTANDALONE_GUI -c $< -o $@ - -# Kheperix CPU emulator -kpxsrcdir = ../kpx_cpu/src -GENEXECPL = $(kpxsrcdir)/cpu/ppc/genexec.pl -DYNGEN = dyngen$(EXEEXT) - -ifeq ($(USE_DYNGEN),yes) -DYNGENDEPS = basic-dyngen-ops.hpp ppc-dyngen-ops.hpp - -# Only GCC is supported for generating synthetic opcodes -$(DYNGEN): $(DYNGENOBJS) - $(DYNGEN_CC) -o $@ $(LDFLAGS) $(DYNGENOBJS) - -$(OBJ_DIR)/%.dgo : %.c - $(DYNGEN_CC) -xc $(CPPFLAGS) $(DEFS) $(DYNGEN_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.dgo : %.cpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(DYNGEN_CXXFLAGS) -c $< -o $@ - -$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp -$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(DYNGEN_CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< - -$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp -$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(DYNGEN_CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< - -$(OBJ_DIR)/sheepshaver_glue.o $(OBJ_DIR)/ppc-cpu.o $(OBJ_DIR)/ppc-decode.o $(OBJ_DIR)/ppc-translate.o $(OBJ_DIR)/ppc-jit.o: basic-dyngen-ops.hpp ppc-dyngen-ops.hpp -endif - -$(OBJ_DIR)/ppc-execute.o: ppc-execute-impl.cpp -ppc-execute-impl.cpp: $(kpxsrcdir)/cpu/ppc/ppc-decode.cpp $(GENEXECPL) $(DYNGENDEPS) - $(CPP) $(CPPFLAGS) -DGENEXEC $< | $(PERL) $(GENEXECPL) > $@ - -# PowerPC CPU tester -TESTSRCS_ = mathlib/ieeefp.cpp mathlib/mathlib.cpp cpu/ppc/ppc-cpu.cpp cpu/ppc/ppc-decode.cpp cpu/ppc/ppc-execute.cpp cpu/ppc/ppc-translate.cpp test/test-powerpc.cpp $(MONSRCS) vm_alloc.cpp utils/utils-cpuinfo.cpp -ifeq ($(USE_DYNGEN),yes) -TESTSRCS_ += cpu/jit/jit-cache.cpp cpu/jit/basic-dyngen.cpp cpu/ppc/ppc-dyngen.cpp cpu/ppc/ppc-jit.cpp -endif -TESTSRCS = $(TESTSRCS_:%.cpp=$(kpxsrcdir)/%.cpp) - -define TESTSRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(TESTSRCS), \ - $(basename $(notdir $(file)))))) -endef -TESTOBJS = $(TESTSRCS_LIST_TO_OBJS) - -$(OBJ_DIR)/test-powerpc.o: $(kpxsrcdir)/test/test-powerpc.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -DEMU_KHEPERIX -c $< -o $@ - -test-powerpc$(EXEEXT): $(TESTOBJS) - $(CXX) -o $@ $(LDFLAGS) $(TESTOBJS) $(LIBS) - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/SheepShaver/src/Unix/NetBSD/sheepthreads.c b/SheepShaver/src/Unix/NetBSD/sheepthreads.c deleted file mode 100644 index 404a692f1..000000000 --- a/SheepShaver/src/Unix/NetBSD/sheepthreads.c +++ /dev/null @@ -1,462 +0,0 @@ -/* - * sheepthreads.c - Minimal pthreads implementation (libpthread doesn't - * like sigaltstack) - * - * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - pthread_cancel() kills the thread immediately - * - Semaphores are VERY restricted: the only supported use is to have one - * thread sem_wait() on the semaphore while other threads sem_post() it - * (i.e. to use the semaphore as a signal) - */ - -#include -#include -#include -#include -#include -#include -#include -#include -#include - - -/* Thread descriptor */ -struct __pthread_st { - unsigned int tid; -}; - -/* Thread stack size */ -#define STACK_SIZE 65536 - -/* From asm_linux.S */ -extern int atomic_add(int *var, int add); -extern int atomic_and(int *var, int and); -extern int atomic_or(int *var, int or); -extern int test_and_set(int *var, int val); - -/* Linux kernel calls */ -extern int __clone(int (*fn)(void *), void *, int, void *); - -/* struct sem_t */ -struct _sem_st { -#define SEM_MAGIC 0x09fa4012 - unsigned int sem_magic; - struct { - int status; - int spinlock; - } sem_lock; - int sem_value; - pid_t sem_waiting; -}; - -/* Wait for "clone" children only (Linux 2.4+ specific) */ -#ifndef __WCLONE -#define __WCLONE 0 -#endif - - -/* - * Return pthread ID of self - */ - -pthread_t pthread_self(void) -{ - static struct __pthread_st self_st; - static pthread_t self = NULL; - if (self == NULL) { - self = &self_st; - self->tid = getpid(); - } - return self; -} - - -/* - * Test whether two pthread IDs are equal - */ - -int pthread_equal(pthread_t t1, pthread_t t2) -{ - return t1 == t2; -} - - -/* - * Send signal to thread - */ - -int pthread_kill(pthread_t thread, int sig) -{ - if (kill(thread->tid, sig) == -1) - return errno; - else - return 0; -} - - -/* - * Create pthread - */ - -struct new_thread { - void *(*fn)(void *); - void *arg; -}; - -static int start_thread(void *arg) -{ - struct new_thread *nt = (struct new_thread *)arg; - nt->fn(nt->arg); - return 0; -} - -int pthread_create(pthread_t *thread, const pthread_attr_t *attr, void *(*start_routine)(void *), void *arg) -{ - struct new_thread *nt; - void *stack; - int pid; - - nt = (struct new_thread *)malloc(sizeof(struct new_thread)); - nt->fn = start_routine; - nt->arg = arg; - stack = malloc(STACK_SIZE); - - pid = __clone(start_thread, (char *)stack + STACK_SIZE - 16, CLONE_VM | CLONE_FS | CLONE_FILES, nt); - if (pid == -1) { - free(stack); - free(nt); - return errno; - } else { - *thread = malloc(sizeof(**thread)); - if (*thread == NULL) - return -1; - (*thread)->tid = pid; - return 0; - } -} - - -/* - * Join pthread - */ - -int pthread_join(pthread_t thread, void **ret) -{ - do { - if (waitpid(thread->tid, NULL, __WCLONE) >= 0); - break; - } while (errno == EINTR); - if (ret) - *ret = NULL; - return 0; -} - - -/* - * Cancel thread - */ - -int pthread_cancel(pthread_t thread) -{ - kill(thread->tid, SIGINT); - thread->tid = (unsigned int)-1; - free(thread); - return 0; -} - - -/* - * Test for cancellation - */ - -void pthread_testcancel(void) -{ -} - - -/* - * Spinlocks - */ - -static int try_acquire_spinlock(int *lock) -{ - return test_and_set(lock, 1) == 0; -} - -static void acquire_spinlock(volatile int *lock) -{ - do { - while (*lock) ; - } while (test_and_set((int *)lock, 1) != 0); -} - -static void release_spinlock(int *lock) -{ - *lock = 0; -} - - -/* - * Initialize mutex - */ - -int pthread_mutex_init(pthread_mutex_t *mutex, const pthread_mutexattr_t *mutex_attr) -{ - mutex->ptm_magic = _PT_MUTEX_MAGIC; - mutex->ptm_lock = 0; - mutex->ptm_owner = NULL; - return 0; -} - - -/* - * Destroy mutex - */ - -int pthread_mutex_destroy(pthread_mutex_t *mutex) -{ - if (mutex->ptm_magic != _PT_MUTEX_MAGIC) - return EINVAL; - if (mutex->ptm_lock != 0) - return EBUSY; - - mutex->ptm_magic = _PT_MUTEX_DEAD; - return 0; -} - - -/* - * Lock mutex - */ - -int pthread_mutex_lock(pthread_mutex_t *mutex) -{ - if (mutex->ptm_magic != _PT_MUTEX_MAGIC) - return EINVAL; - - acquire_spinlock(&mutex->ptm_lock); - return 0; -} - - -/* - * Try to lock mutex - */ - -int pthread_mutex_trylock(pthread_mutex_t *mutex) -{ - if (mutex->ptm_magic != _PT_MUTEX_MAGIC) - return EINVAL; - - if (!try_acquire_spinlock(&mutex->ptm_lock)) - return EBUSY; - return 0; -} - - -/* - * Unlock mutex - */ - -int pthread_mutex_unlock(pthread_mutex_t *mutex) -{ - if (mutex->ptm_magic != _PT_MUTEX_MAGIC) - return EINVAL; - - release_spinlock(&mutex->ptm_lock); - return 0; -} - - -/* - * Create mutex attribute - */ - -int pthread_mutexattr_init(pthread_mutexattr_t *attr) -{ - attr->ptma_magic = _PT_MUTEXATTR_MAGIC; - return 0; -} - - -/* - * Destroy mutex attribute - */ - -int pthread_mutexattr_destroy(pthread_mutexattr_t *attr) -{ - if (attr->ptma_magic != _PT_MUTEXATTR_MAGIC) - return EINVAL; - return 0; -} - - -/* - * Init semaphore - */ - -int sem_init(sem_t *psem, int pshared, unsigned int value) -{ - sem_t sem = malloc(sizeof(*sem)); - if (sem == NULL) { - errno = ENOSPC; - return 0; - } - *psem = sem; - sem->sem_magic = SEM_MAGIC; - sem->sem_lock.status = 0; - sem->sem_lock.spinlock = 0; - sem->sem_value = value; - sem->sem_waiting = 0; - return 0; -} - - -/* - * Delete remaphore - */ - -int sem_destroy(sem_t *sem) -{ - if (sem == NULL || *sem == NULL || (*sem)->sem_magic != SEM_MAGIC) { - errno = EINVAL; - return -1; - } - - free(*sem); - return 0; -} - - -/* - * Wait on semaphore - */ - -void null_handler(int sig) -{ -} - -int sem_wait(sem_t *psem) -{ - sem_t sem; - if (psem == NULL || (sem = *psem) == NULL || sem->sem_magic != SEM_MAGIC) { - errno = EINVAL; - return -1; - } - acquire_spinlock(&sem->sem_lock.spinlock); - if (sem->sem_value > 0) - atomic_add(&sem->sem_value, -1); - else { - sigset_t mask; - if (!sem->sem_lock.status) { - struct sigaction sa; - sem->sem_lock.status = SIGUSR2; - sa.sa_handler = null_handler; - sa.sa_flags = SA_RESTART; - sigemptyset(&sa.sa_mask); - sigaction(sem->sem_lock.status, &sa, NULL); - } - sem->sem_waiting = getpid(); - sigemptyset(&mask); - sigsuspend(&mask); - sem->sem_waiting = 0; - } - release_spinlock(&sem->sem_lock.spinlock); - return 0; -} - - -/* - * Post semaphore - */ - -int sem_post(sem_t *psem) -{ - sem_t sem; - if (psem == NULL || (sem = *psem) == NULL || sem->sem_magic != SEM_MAGIC) { - errno = EINVAL; - return -1; - } - acquire_spinlock(&sem->sem_lock.spinlock); - if (sem->sem_waiting == 0) - atomic_add(&sem->sem_value, 1); - else - kill(sem->sem_waiting, sem->sem_lock.status); - release_spinlock(&sem->sem_lock.spinlock); - return 0; -} - - -/* - * Simple producer/consumer test program - */ - -#ifdef TEST -#include - -static sem_t p_sem, c_sem; -static int data = 0; - -static void *producer_func(void *arg) -{ - int i, n = (int)arg; - for (i = 0; i < n; i++) { - sem_wait(&p_sem); - data++; - sem_post(&c_sem); - } - return NULL; -} - -static void *consumer_func(void *arg) -{ - int i, n = (int)arg; - for (i = 0; i < n; i++) { - sem_wait(&c_sem); - printf("data: %d\n", data); - sem_post(&p_sem); - } - sleep(1); // for testing pthread_join() - return NULL; -} - -int main(void) -{ - pthread_t producer_thread, consumer_thread; - static const int N = 5; - - if (sem_init(&c_sem, 0, 0) < 0) - return 1; - if (sem_init(&p_sem, 0, 1) < 0) - return 2; - if (pthread_create(&producer_thread, NULL, producer_func, (void *)N) != 0) - return 3; - if (pthread_create(&consumer_thread, NULL, consumer_func, (void *)N) != 0) - return 4; - pthread_join(producer_thread, NULL); - pthread_join(consumer_thread, NULL); - sem_destroy(&p_sem); - sem_destroy(&c_sem); - if (data != N) - return 5; - return 0; -} -#endif diff --git a/SheepShaver/src/Unix/SheepShaver.1 b/SheepShaver/src/Unix/SheepShaver.1 deleted file mode 100644 index 12358963d..000000000 --- a/SheepShaver/src/Unix/SheepShaver.1 +++ /dev/null @@ -1,29 +0,0 @@ -.TH SheepShaver 1 "April, 2000" -.SH NAME -SheepShaver \- Macintosh emulator -.SH SYNOPSIS -.B SheepShaver -[\-display -.IR display-name ] -.SH DESCRIPTION -.B SheepShaver -is a Macintosh emulator for PowerPC-based Linux systems. -For more information, see the included documentation. -.SH OPTIONS -.TP -.BI "\-display " display-name -specifies the display to use; see -.BR X (1) -.SH FILES -.TP -.I ~/.sheepshaver_prefs -User-specific configuration file. -.TP -.I ~/.sheeshaver_nvram -Contents of Mac non-volatile RAM. -.SH SEE ALSO -http://www.sheepshaver.com/ (Official SheepShaver homepage) -.SH AUTHORS -Christian Bauer -.br -Marc Hellwig diff --git a/SheepShaver/src/Unix/about_window_unix.cpp b/SheepShaver/src/Unix/about_window_unix.cpp deleted file mode 100644 index 3d4127fdd..000000000 --- a/SheepShaver/src/Unix/about_window_unix.cpp +++ /dev/null @@ -1,30 +0,0 @@ -/* - * about_window_unix.cpp - "About" window, Unix implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "about_window.h" - - -/* - * Open "About" window - */ - -void OpenAboutWindow(void) -{ -} diff --git a/SheepShaver/src/Unix/audio_oss_esd.cpp b/SheepShaver/src/Unix/audio_oss_esd.cpp deleted file mode 120000 index acf070c11..000000000 --- a/SheepShaver/src/Unix/audio_oss_esd.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/audio_oss_esd.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/autogen.sh b/SheepShaver/src/Unix/autogen.sh deleted file mode 100755 index f6b732ad8..000000000 --- a/SheepShaver/src/Unix/autogen.sh +++ /dev/null @@ -1,61 +0,0 @@ -#! /bin/sh -# Run this to generate all the initial makefiles, etc. -# This was lifted from the Gimp, and adapted slightly by -# Christian Bauer. - -DIE=0 - -PROG="SheepShaver" - -# Check how echo works in this /bin/sh -case `echo -n` in --n) _echo_n= _echo_c='\c';; -*) _echo_n=-n _echo_c=;; -esac - -(autoconf --version) < /dev/null > /dev/null 2>&1 || { - echo - echo "You must have autoconf installed to compile $PROG." - echo "Download the appropriate package for your distribution," - echo "or get the source tarball at ftp://ftp.gnu.org/pub/gnu/" - DIE=1 -} - -(aclocal --version) < /dev/null > /dev/null 2>&1 || { - echo - echo "**Error**: Missing aclocal. The version of automake" - echo "installed doesn't appear recent enough." - echo "Get ftp://ftp.gnu.org/pub/gnu/automake-1.3.tar.gz" - echo "(or a newer version if it is available)" - DIE=1 -} - -if test "$DIE" -eq 1; then - exit 1 -fi - -if test -z "$ACLOCAL_FLAGS"; then - ACLOCAL_FLAGS="-I `aclocal --print-ac-dir` -I m4" -fi - -aclocalinclude="$ACLOCAL_FLAGS"; \ -(echo $_echo_n " + Running aclocal: $_echo_c"; \ - aclocal $aclocalinclude; \ - echo "done.") && \ -(echo $_echo_n " + Running autoheader: $_echo_c"; \ - autoheader; \ - echo "done.") && \ -(echo $_echo_n " + Running autoconf: $_echo_c"; \ - autoconf; \ - echo "done.") - -rm -f config.cache - -if [ x"$NO_CONFIGURE" = "x" ]; then - echo " + Running 'configure $@':" - if [ -z "$*" ]; then - echo " ** If you wish to pass arguments to ./configure, please" - echo " ** specify them on the command line." - fi - ./configure "$@" -fi diff --git a/SheepShaver/src/Unix/bincue_unix.cpp b/SheepShaver/src/Unix/bincue_unix.cpp deleted file mode 120000 index f9ed574d0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/bincue_unix.h b/SheepShaver/src/Unix/bincue_unix.h deleted file mode 120000 index 9c7e8c5c0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/clip_unix.cpp b/SheepShaver/src/Unix/clip_unix.cpp deleted file mode 120000 index bd5316ecb..000000000 --- a/SheepShaver/src/Unix/clip_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/clip_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/config.guess b/SheepShaver/src/Unix/config.guess deleted file mode 120000 index d7e5917cc..000000000 --- a/SheepShaver/src/Unix/config.guess +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/config.guess \ No newline at end of file diff --git a/SheepShaver/src/Unix/config.sub b/SheepShaver/src/Unix/config.sub deleted file mode 120000 index 5458c713b..000000000 --- a/SheepShaver/src/Unix/config.sub +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/config.sub \ No newline at end of file diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac deleted file mode 100644 index 11e4c10a5..000000000 --- a/SheepShaver/src/Unix/configure.ac +++ /dev/null @@ -1,1687 +0,0 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written in 2002 by Christian Bauer - -AC_INIT([SheepShaver], 2.4, [Christian.Bauer@uni-mainz.de], SheepShaver) -AC_CONFIG_SRCDIR(main_unix.cpp) -AC_PREREQ(2.52) -AC_CONFIG_HEADER(config.h) -AH_TOP( -#ifndef CONFIG_H -#define CONFIG_H -) -AH_BOTTOM( -#endif /* CONFIG_H */ -) - -dnl Canonical system information. -AC_CANONICAL_HOST -AC_CANONICAL_TARGET - -dnl Some systems do not put corefiles in the currect directory, avoid saving -dnl cores for the configure tests since some are intended to dump core. -ulimit -c 0 - -dnl Invite Cygwin users to build within the Windows/ directory -case $target_os in -*cygwin* | *mingw32*) - AC_MSG_ERROR([You can only build the Windows version from its directory, Cygwin/X11 is not supported.]) - ;; -esac - -dnl Options. -AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) -AC_ARG_ENABLE(ppc-emulator, [ --enable-ppc-emulator use the selected PowerPC emulator [default=auto]], [WANT_EMULATED_PPC=$enableval], [WANT_EMULATED_PPC=auto]) -AC_ARG_ENABLE(fbdev-dga, [ --enable-fbdev-dga use direct frame buffer access via /dev/fb0 [default=yes]], [WANT_FBDEV_DGA=$enableval], [WANT_FBDEV_DGA=yes]) -AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) -AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) -AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) -AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI prefs editor [default=no]], [WANT_STANDALONE_GUI=$enableval], [WANT_STANDALONE_GUI=no]) -AC_ARG_WITH(esd, [ --with-esd support ESD for sound under Linux/FreeBSD [default=yes]], [WANT_ESD=$withval], [WANT_ESD=yes]) -AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], - [case "$withval" in - gtk1) WANT_GTK="gtk";; - gtk|gtk2) WANT_GTK="$withval";; - yes) WANT_GTK="gtk2 gtk";; - *) WANT_GTK="no";; - esac], - [WANT_GTK="gtk2 gtk"]) -AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=yes]) -AC_ARG_WITH(dgcc, [ --with-dgcc=COMPILER use C++ COMPILER to compile synthetic opcodes], [DYNGEN_CC=$withval]) - -AC_ARG_WITH(bincue, - AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) - -AC_ARG_WITH(libvhd, - AS_HELP_STRING([--with-libvhd], [Enable VHD disk images])) - - -dnl Addressing mode -AC_ARG_ENABLE(addressing, - [ --enable-addressing=AM set the addressing mode to use [default=real]], - [case "$enableval" in - real) WANT_ADDRESSING_MODE="real";; - direct) WANT_ADDRESSING_MODE="direct";; - direct,0x*) WANT_ADDRESSING_MODE="direct"; NATMEM_OFFSET=`echo "$enableval" | sed -n '/direct,\(0[[xX]][[0-9A-Fa-f]]*\([[UuLl]]\{1,2\}\)\?\)$/s//\1/p'`;; - esac], - [WANT_ADDRESSING_MODE="real"] -) - -dnl SDL options. -AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) -AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=no]) -AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) -AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) -AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) - -dnl Checks for programs. -AC_PROG_CC -AC_PROG_CPP -AC_PROG_CXX -AC_PROG_MAKE_SET -AC_PROG_INSTALL -AC_PROG_EGREP -AC_PATH_PROGS(FILE, [file false]) -AC_PATH_PROG(PERL, [perl]) - -dnl Check for PowerPC target CPU. -HAVE_PPC=no -AC_MSG_CHECKING(for PowerPC target CPU) -AC_EGREP_CPP(yes, -[ -#ifdef __powerpc__ - yes -#endif -#ifdef __ppc__ - yes -#endif -], [AC_MSG_RESULT(yes); HAVE_PPC=yes], AC_MSG_RESULT(no)) - -dnl We use native CPU if possible. -EMULATED_PPC=yes -case $WANT_EMULATED_PPC in - auto) [[ "x$HAVE_PPC" = "xyes" ]] && EMULATED_PPC=no;; - no) EMULATED_PPC=no;; -esac -if [[ "x$EMULATED_PPC" = "xyes" ]]; then - AC_DEFINE(EMULATED_PPC, 1, [Define if using a PowerPC CPU emulator.]) -fi - -dnl We use mon if possible. -MONSRCS= -case "x$WANT_MON" in -x/* | x.*) - mon_srcdir=$WANT_MON - WANT_MON=yes - ;; -xyes) - mon_srcdir=../../../mon/src - ;; -esac -if [[ "x$WANT_MON" = "xyes" ]]; then - AC_MSG_CHECKING(for mon) - if grep mon_init $mon_srcdir/mon.h >/dev/null 2>/dev/null; then - AC_MSG_RESULT(yes) - AC_DEFINE(ENABLE_MON, 1, [Define if using "mon".]) - MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c $mon_srcdir/disass/mips-dis.c $mon_srcdir/disass/mips-opc.c $mon_srcdir/disass/mips16-opc.c" - CXXFLAGS="$CXXFLAGS -I$mon_srcdir -I$mon_srcdir/disass" - AC_CHECK_LIB(ncurses, tgetent, , - [AC_CHECK_LIB(termcap, tgetent, , - [AC_CHECK_LIB(termlib, tgetent, , - [AC_CHECK_LIB(terminfo, tgetent, , - [AC_CHECK_LIB(Hcurses, tgetent, , - [AC_CHECK_LIB(curses, tgetent)])])])])]) - AC_CHECK_LIB(readline, readline) - AC_CHECK_HEADERS(readline.h history.h readline/readline.h readline/history.h) - else - AC_MSG_RESULT(no) - AC_MSG_WARN([Could not find mon, ignoring --with-mon.]) - WANT_MON=no - fi -fi -AC_SUBST(MONSRCS) - -dnl Checks for libraries. -AC_CHECK_LIB(posix4, sem_init) -AC_CHECK_LIB(m, cos) - -dnl AC_CHECK_SDLFRAMEWORK($1=NAME, $2=INCLUDES) -dnl AC_TRY_LINK uses main() but SDL needs main to take args, -dnl therefore main is undefined with #undef. -dnl Framework can be in an custom location. -AC_DEFUN([AC_CHECK_SDLFRAMEWORK], [ - AS_VAR_PUSHDEF([ac_Framework], [ac_cv_framework_$1]) - AC_CACHE_CHECK([whether compiler supports framework $1], - ac_Framework, [ - saved_LIBS="$LIBS" - LIBS="$LIBS -framework $1" - if [[ "x$SDL_FRAMEWORK" != "x/Library/Frameworks" ]]; then - if [[ "x$SDL_FRAMEWORK" != "x/System/Library/Frameworks" ]]; then - LIBS="$saved_LIBS -F$SDL_FRAMEWORK -framework $1" - fi - fi - saved_CPPFLAGS="$CPPFLAGS" - CPPFLAGS="$CPPFLAGS -I$SDL_FRAMEWORK/SDL.framework/Headers" - AC_TRY_LINK( - [$2 -#undef main], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); -LIBS="$saved_LIBS"; CPPFLAGS="$saved_CPPFLAGS"] - ) - ]) - AS_IF([test AS_VAR_GET(ac_Framework) = yes], - [AC_DEFINE(AS_TR_CPP(HAVE_FRAMEWORK_$1), 1, [Define if framework $1 is available.])] - ) - AS_VAR_POPDEF([ac_Framework]) -]) - -dnl Do we need SDL? -WANT_SDL=no -if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then - WANT_SDL=yes - WANT_XF86_DGA=no - WANT_XF86_VIDMODE=no - WANT_FBDEV_DGA=no - SDL_SUPPORT="$SDL_SUPPORT video" -fi -if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then - WANT_SDL=yes - SDL_SUPPORT="$SDL_SUPPORT audio" -fi -if [[ "x$WANT_SDL" = "xyes" ]]; then - if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ]) - else - ac_cv_framework_SDL=no - fi - if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - AC_PATH_PROG(sdl_config, "sdl-config") - if [[ -n "$sdl_config" ]]; then - sdl_cflags=`$sdl_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl_libs=`$sdl_config --static-libs` - else - sdl_libs=`$sdl_config --libs` - fi - CFLAGS="$CFLAGS $sdl_cflags" - CXXFLAGS="$CXXFLAGS $sdl_cflags" - LIBS="$LIBS $sdl_libs" - else - WANT_SDL=no - WANT_SDL_VIDEO=no - WANT_SDL_AUDIO=no - fi - fi - SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` -else - SDL_SUPPORT="none" -fi - -dnl We need X11, if not using SDL. -if [[ "x$WANT_SDL_VIDEO" != "xyes" ]]; then - AC_PATH_XTRA - if [[ "x$no_x" = "xyes" ]]; then - AC_MSG_ERROR([You need X11 to run SheepShaver.]) - fi - CFLAGS="$CFLAGS $X_CFLAGS" - CXXFLAGS="$CXXFLAGS $X_CFLAGS" - LIBS="$LIBS $X_PRE_LIBS $X_LIBS -lX11 -lXext $X_EXTRA_LIBS" -fi - - - -dnl We need pthreads on non-PowerPC systems. Try libpthread first, then libc_r (FreeBSD), then PTL. -HAVE_PTHREADS=yes -case $EMULATED_PPC:$target_os in -no:linux*|no:netbsd*) - dnl We do have our own pthread_cancel() implementation - AC_DEFINE(HAVE_PTHREAD_CANCEL, 1, [Define if you have the pthread_cancel function.]) - ;; -*:*) - AC_CHECK_LIB(pthread, pthread_create, , [ - AC_CHECK_LIB(c_r, pthread_create, , [ - AC_CHECK_LIB(PTL, pthread_create, , [ - dnl XXX remove when no pthreads case is merged - AC_MSG_ERROR([You need pthreads to run SheepShaver.]) - HAVE_PTHREADS=no - ]) - ]) - ]) - AC_CHECK_FUNCS(pthread_cancel) - AC_CHECK_FUNCS(pthread_cond_init pthread_testcancel) - AC_CHECK_FUNCS(pthread_mutexattr_setprotocol) - AC_CHECK_FUNCS(pthread_mutexattr_settype) - AC_CHECK_FUNCS(pthread_mutexattr_setpshared) - dnl If POSIX.4 semaphores are not available, we emulate them with pthread mutexes. - SEMSRC= - AC_CHECK_FUNCS(sem_init, , [ - if test "x$HAVE_PTHREADS" = "xyes"; then - SEMSRC=posix_sem.cpp - fi - ]) - ;; -esac -if [[ "x$HAVE_PTHREADS" = "xyes" ]]; then - AC_DEFINE(HAVE_PTHREADS, 1, [Define if pthreads are available.]) -fi - -dnl We use FBDev DGA if possible. -if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_CHECK_HEADER(linux/fb.h, [ - AC_DEFINE(ENABLE_FBDEV_DGA, 1, [Define if using Linux fbdev extension.]) - ], [ - AC_MSG_WARN([Could not find Linux FBDev extension, ignoring --enable-fbdev-dga.]) - WANT_FBDEV_DGA=no - ]) -fi - -dnl We use XFree86 DGA if possible. -if [[ "x$WANT_XF86_DGA" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86dga, XF86DGAQueryExtension, [ - AC_DEFINE(ENABLE_XF86_DGA, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86dga" - ], [ - AC_MSG_WARN([Could not find XFree86 DGA extension, ignoring --enable-xf86-dga.]) - WANT_XF86_DGA=no - ]) -fi - -dnl We use XFree86 VidMode if possible. -if [[ "x$WANT_XF86_VIDMODE" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86vm, XF86VidModeQueryExtension, [ - AC_DEFINE(ENABLE_XF86_VIDMODE, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86vm" - ], [ - AC_MSG_WARN([Could not find XFree86 VidMode extension, ignoring --enable-xf86-vidmode.]) - WANT_XF86_VIDMODE=no - ]) -fi - -dnl We use GTK+ if possible. -UISRCS=../dummy/prefs_editor_dummy.cpp -case "x$WANT_GTK" in -xgtk2*) - WANT_GTK=no - AM_PATH_GTK_2_0(1.3.15, [ - GUI_CFLAGS="$GTK_CFLAGS" - GUI_LIBS="$GTK_LIBS" - WANT_GTK=gtk2 - ], [ - case "x${WANT_GTK}x" in - *gtkx) - AC_MSG_WARN([Could not find GTK+ 2.0, trying with GTK+ 1.2.]) - WANT_GTK=gtk - ;; - *) - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) - WANT_GTK=no - ;; - esac - ]) - ;; -esac -if [[ "x$WANT_GTK" = "xgtk" ]]; then - WANT_GTK=no - AM_PATH_GTK(1.2.0, [ - GUI_CFLAGS="$GTK_CFLAGS" - GUI_LIBS="$GTK_LIBS" - WANT_GTK=gtk - ], [ - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) - ]) -fi -if [[ "x$WANT_GTK" != "xno" -a "x$WANT_STANDALONE_GUI" = "xno" ]]; then - AC_DEFINE(ENABLE_GTK, 1, [Define if using GTK.]) - UISRCS=prefs_editor_gtk.cpp -fi -AC_SUBST(GUI_CFLAGS) -AC_SUBST(GUI_LIBS) - -dnl Build external GUI if requested. -if [[ "$WANT_STANDALONE_GUI" != "yes" ]]; then - WANT_STANDALONE_GUI=no -fi -if [[ "$WANT_GTK" = "no" ]]; then - WANT_STANDALONE_GUI=no -fi -AC_SUBST(STANDALONE_GUI, [$WANT_STANDALONE_GUI]) - -dnl We use ESD if possible. -if [[ "x$WANT_ESD" = "xyes" ]]; then - WANT_ESD=no - AM_PATH_ESD(0.2.8, [ - AC_DEFINE(ENABLE_ESD, 1, [Define is using ESD.]) - CFLAGS="$CFLAGS $ESD_CFLAGS" - CXXFLAGS="$CXXFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" - WANT_ESD=yes - ], [ - AC_MSG_WARN([Could not find ESD, disabling ESD support.]) - ]) -fi - -dnl We use 64-bit file size support if possible. -AC_SYS_LARGEFILE - -dnl Checks for header files. -AC_HEADER_STDC -AC_HEADER_SYS_WAIT -AC_CHECK_HEADERS(malloc.h stdint.h) -AC_CHECK_HEADERS(mach/vm_map.h mach/mach_init.h sys/mman.h) -AC_CHECK_HEADERS(unistd.h fcntl.h byteswap.h dirent.h) -AC_CHECK_HEADERS(sys/socket.h sys/ioctl.h sys/filio.h sys/bitypes.h sys/wait.h) -AC_CHECK_HEADERS(sys/time.h sys/poll.h sys/select.h arpa/inet.h) -AC_CHECK_HEADERS(netinet/in.h linux/if.h linux/if_tun.h net/if.h net/if_tun.h, [], [], [ -#ifdef HAVE_SYS_TYPES_H -#include -#endif -#ifdef HAVE_SYS_SOCKET_H -#include -#endif -]) -AC_CHECK_HEADERS(AvailabilityMacros.h) -AC_CHECK_HEADERS(IOKit/storage/IOBlockStorageDevice.h) -AC_CHECK_HEADERS(fenv.h) -AC_CHECK_HEADERS(sys/stropts.h stropts.h) - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_C_BIGENDIAN -AC_C_CONST -AC_C_INLINE -AC_CHECK_SIZEOF(short, 2) -AC_CHECK_SIZEOF(int, 4) -AC_CHECK_SIZEOF(long, 4) -AC_CHECK_SIZEOF(long long, 8) -AC_CHECK_SIZEOF(float, 4) -AC_CHECK_SIZEOF(double, 8) -AC_CHECK_SIZEOF(void *, 4) -AC_TYPE_OFF_T -AC_CHECK_TYPE(loff_t, off_t) -AC_TYPE_SIZE_T -AC_TYPE_SIGNAL -AC_HEADER_TIME -AC_STRUCT_TM - -dnl Check whether sys/socket.h defines type socklen_t. -dnl (extracted from ac-archive/Miscellaneous) -AC_CACHE_CHECK([for socklen_t], - ac_cv_type_socklen_t, [ - AC_TRY_COMPILE([ - #include - #include - ], [socklen_t len = 42; return 0;], - ac_cv_type_socklen_t=yes, ac_cv_type_socklen_t=no, - dnl When cross-compiling, do not assume anything. - ac_cv_type_socklen_t="guessing no" - ) -]) -if [[ "x$ac_cv_type_socklen_t" != "xyes" ]]; then - AC_DEFINE(socklen_t, int, [Define to 'int' if doesn't define.]) -fi - -dnl Check whether struct sigaction has sa_restorer member. -AC_CACHE_CHECK([whether struct sigaction has sa_restorer], - ac_cv_signal_sa_restorer, [ - AC_TRY_COMPILE([ - #include - ], [struct sigaction sa; sa.sa_restorer = 0;], - ac_cv_signal_sa_restorer=yes, ac_cv_signal_sa_restorer=no, - dnl When cross-compiling, do not assume anything. - ac_cv_signal_sa_restorer=no - ) -]) -if [[ "x$ac_cv_signal_sa_restorer" = "xyes" ]]; then - AC_DEFINE(HAVE_SIGNAL_SA_RESTORER, 1, [Define if sa_restorer is available in struct sigaction.]) -fi - -dnl Checks for library functions. -AC_CHECK_FUNCS(strdup strerror strlcpy cfmakeraw) -AC_CHECK_FUNCS(nanosleep) -AC_CHECK_FUNCS(sigaction signal) -AC_CHECK_FUNCS(mmap mprotect munmap) -AC_CHECK_FUNCS(vm_allocate vm_deallocate vm_protect) -AC_CHECK_FUNCS(exp2f log2f exp2 log2) -AC_CHECK_FUNCS(floorf roundf ceilf truncf floor round ceil trunc) -AC_CHECK_FUNCS(poll inet_aton) - -dnl Darwin seems to define mach_task_self() instead of task_self(). -AC_CHECK_FUNCS(mach_task_self task_self) - -dnl We need clock_gettime() for better performance but it may drag -dnl libpthread in, which we don't want for native ppc mode -case $EMULATED_PPC:$target_os in -no:linux*) - ;; -*:*) - AC_SEARCH_LIBS(clock_gettime, [rt posix4]) - AC_CHECK_FUNCS(clock_gettime clock_nanosleep) - ;; -esac - -dnl Check for headers and functions related to pty support (sshpty.c) -dnl From openssh-3.2.2p1 configure.ac -AC_CHECK_HEADERS(strings.h login.h sys/bsdtty.h sys/stat.h util.h pty.h) -AC_CHECK_FUNCS(_getpty vhangup strlcpy) - -case "$host" in -*-*-hpux10.26) - disable_ptmx_check=yes - ;; -*-*-linux*) - no_dev_ptmx=1 - ;; -mips-sony-bsd|mips-sony-newsos4) - AC_DEFINE(HAVE_NEWS4, 1, [Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for sshpty.c).]) - ;; -*-*-sco3.2v4*) - no_dev_ptmx=1 - ;; -*-*-sco3.2v5*) - no_dev_ptmx=1 - ;; -*-*-cygwin*) - no_dev_ptmx=1 - ;; -*-*-darwin*) - no_dev_ptmx=1 - ;; -*-*-freebsd*) - no_dev_ptmx=1 - ;; -esac - -if test -z "$no_dev_ptmx" ; then - if test "x$disable_ptmx_check" != "xyes" ; then - AC_CHECK_FILE([/dev/ptmx], - [ - AC_DEFINE_UNQUOTED(HAVE_DEV_PTMX, 1, [Define if you have /dev/ptmx.]) - have_dev_ptmx=1 - ] - ) - fi -fi -AC_CHECK_FILE([/dev/ptc], - [ - AC_DEFINE_UNQUOTED(HAVE_DEV_PTS_AND_PTC, 1, [Define if you have /dev/ptc.]) - have_dev_ptc=1 - ] -) -dnl (end of code from openssh-3.2.2p1 configure.ac) - -dnl Check for systems where POSIX-style non-blocking I/O (O_NONBLOCK) -dnl doesn't work or is unimplemented. On these systems (mostly older -dnl ones), use the old BSD-style FIONBIO approach instead. [tcl.m4] -AC_CACHE_CHECK([FIONBIO vs. O_NONBLOCK for non-blocking I/O], - ac_cv_nonblocking_io, [ - case "$host" in - *-*-osf*) - ac_cv_nonblocking_io=FIONBIO - ;; - *-*-sunos4*) - ac_cv_nonblocking_io=FIONBIO - ;; - *-*-ultrix*) - ac_cv_nonblocking_io=FIONBIO - ;; - *) - ac_cv_nonblocking_io=O_NONBLOCK - ;; - esac -]) -if [[ "$ac_cv_nonblocking_io" = "FIONBIO" ]]; then - AC_DEFINE(USE_FIONBIO, 1, [Define if BSD-style non-blocking I/O is to be used]) -fi - -dnl Check whether compiler supports byte bit-fields -AC_CACHE_CHECK([whether compiler supports byte bit-fields], - ac_cv_have_byte_bitfields, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - struct A { - unsigned char b1:4; - unsigned char b2:4; - unsigned char c; - unsigned short s; - unsigned char a[4]; - }; - - int main(void) { - A a; - return ! (sizeof(A) == 8 && &a.c == ((unsigned char *)&a + 1)); - }], - [ac_cv_have_byte_bitfields=yes], - [ac_cv_have_byte_bitfields=no], - dnl When cross-compiling, assume only GCC supports this - [if [[ "$GCC" = "yes" ]]; then - ac_cv_have_byte_bitfields="guessing yes" - else - ac_cv_have_byte_bitfields="guessing no" - fi] - ) - AC_LANG_RESTORE -]) - -dnl AC_CHECK_FRAMEWORK($1=NAME, $2=INCLUDES) -AC_DEFUN([AC_CHECK_FRAMEWORK], [ - AS_VAR_PUSHDEF([ac_Framework], [ac_cv_framework_$1])dnl - AC_CACHE_CHECK([whether compiler supports framework $1], - ac_Framework, [ - saved_LIBS="$LIBS" - LIBS="$LIBS -framework $1" - AC_TRY_LINK( - [$2], [], - [AS_VAR_SET(ac_Framework, yes)], [AS_VAR_SET(ac_Framework, no); LIBS="$saved_LIBS"] - ) - ]) - AS_IF([test AS_VAR_GET(ac_Framework) = yes], - [AC_DEFINE(AS_TR_CPP(HAVE_FRAMEWORK_$1), 1, [Define if framework $1 is available.])] - ) - AS_VAR_POPDEF([ac_Framework])dnl -]) - -dnl Check for some MacOS X frameworks -AC_CHECK_FRAMEWORK(Carbon, [#include ]) -AC_CHECK_FRAMEWORK(IOKit, [#include ]) -AC_CHECK_FRAMEWORK(CoreFoundation, [#include ]) -AC_CHECK_FRAMEWORK(CoreAudio, [#include ]) -AC_CHECK_FRAMEWORK(AudioUnit, [#include ]) -AC_CHECK_FRAMEWORK(AudioToolbox, [#include ]) -AC_CHECK_FRAMEWORK(AppKit, []) - -dnl Select system-dependant sources. -SERIALSRC=serial_unix.cpp -ETHERSRC=../dummy/ether_dummy.cpp -SCSISRC=../dummy/scsi_dummy.cpp -AUDIOSRC=../dummy/audio_dummy.cpp -PREFSSRC=../dummy/prefs_dummy.cpp -EXTFSSRC=extfs_unix.cpp -EXTRASYSSRCS= -case "$target_os" in -linux*) - ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp - SCSISRC=Linux/scsi_linux.cpp - if [[ "x$EMULATED_PPC" = "xno" ]]; then - EXTRASYSSRCS="paranoia.cpp Linux/sheepthreads.c ppc_asm.S" - fi - ;; -freebsd*) - ETHERSRC=ether_unix.cpp - ;; -netbsd*) - ETHERSRC=ether_unix.cpp - if [[ "x$EMULATED_PPC" = "xno" ]]; then - EXTRASYSSRCS="paranoia.cpp NetBSD/sheepthreads.c ppc_asm.S" - fi - ;; -darwin*) - ETHERSRC=ether_unix.cpp - if [[ "x$EMULATED_PPC" = "xno" ]]; then - EXTRASYSSRCS="paranoia.cpp ppc_asm.S" - fi - if [[ "x$ac_cv_framework_IOKit" = "xyes" -a "x$ac_cv_framework_CoreFoundation" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/sys_darwin.cpp" - fi - if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then - EXTFSSRC=../MacOSX/extfs_macosx.cpp - if [[ "x$ac_cv_framework_AppKit" = "xyes" -a "x$WANT_GTK" = "xno" ]]; then - PREFSSRC="../MacOSX/prefs_macosx.mm ../MacOSX/Launcher/VMSettingsController.mm ../MacOSX/Launcher/DiskType.m" - CPPFLAGS="$CPPFLAGS -I../MacOSX/Launcher" - fi - fi - if [[ "x$WANT_ESD" = "xno" -a "x$ac_cv_framework_CoreAudio" = "xyes" -a "x$WANT_SDL_AUDIO" = "xno" ]]; then - AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" - OSX_CORE_AUDIO="-DOSX_CORE_AUDIO" - fi - ;; -irix*) - AUDIOSRC=Irix/audio_irix.cpp - LIBS="$LIBS -laudio" - WANT_ESD=no - - dnl Check if our compiler supports -IPA (MIPSPro) - HAVE_IPA=no - ocflags="$CFLAGS" - CFLAGS=`echo " $CFLAGS -IPA" | sed -e "s/ -g //g"` - AC_MSG_CHECKING(if "-IPA" works) - dnl Do a test compile of an empty function - AC_TRY_COMPILE([#if defined __GNUC__ - # error GCC does not support IPA yet - #endif],, [AC_MSG_RESULT(yes); HAVE_IPA=yes], AC_MSG_RESULT(no)) - CFLAGS="$ocflags" - ;; -esac - -dnl BINCUE -AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) -AS_IF([test "x$have_bincue" = "xyes" ], [ - if [[ "xOSX_CORE_AUDIO" = "xno" -a "x$WANT_SDL_AUDIO"="xno" ]]; then - AC_MSG_ERROR([You need SDL or OSX Core Audio to use BINCUE support.]) - else - CPPFLAGS="$CPPFLAGS -DBINCUE $OSX_CORE_AUDIO" - fi -]) - -dnl LIBVHD -AS_IF([test "x$with_libvhd" = "xyes" ], [have_libvhd=yes], [have_libvhd=no]) -AS_IF([test "x$have_libvhd" = "xyes" ], [ - CPPFLAGS="$CPPFLAGS -DHAVE_LIBVHD" - LIBS="$LIBS -lvhd" - case $target_os in - linux*) - LIBS="$LIBS -luuid" - esac - AC_CHECK_LIB(vhd, vhd_open) - AC_CHECK_LIB(vhd, vhd_io_read) - AC_CHECK_LIB(vhd, vhd_io_write) - AC_CHECK_LIB(vhd, vhd_close) -]) - - - - -dnl Is the slirp library supported? -case "$ac_cv_have_byte_bitfields" in -yes|"guessing yes") - CAN_SLIRP=yes - ETHERSRC=ether_unix.cpp - ;; -esac -if [[ -n "$CAN_SLIRP" ]]; then - AC_DEFINE(HAVE_SLIRP, 1, [Define if slirp library is supported]) - SLIRP_SRCS="\ - ../slirp/bootp.c ../slirp/ip_output.c ../slirp/tcp_input.c \ - ../slirp/cksum.c ../slirp/mbuf.c ../slirp/tcp_output.c \ - ../slirp/debug.c ../slirp/misc.c ../slirp/tcp_subr.c \ - ../slirp/if.c ../slirp/sbuf.c ../slirp/tcp_timer.c \ - ../slirp/ip_icmp.c ../slirp/slirp.c ../slirp/tftp.c \ - ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c" -fi -AC_SUBST(SLIRP_SRCS) - -dnl SDL overrides -if [[ "x$WANT_SDL" = "xyes" ]]; then - AC_DEFINE(USE_SDL, 1, [Define to enble SDL support.]) - if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../SDL/SDLMain.m" - fi -fi -if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then - AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support.]) - VIDEOSRCS="../SDL/video_sdl.cpp" - KEYCODES="../SDL/keycodes" - if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then - AC_MSG_CHECKING([whether __LP64__ is defined]) - AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if !defined(__LP64__) - # error __LP64__ not defined - #endif - ]])], - [AC_MSG_RESULT(yes); LP64_DEFINED=yes], - [AC_MSG_RESULT(no)]) - if [[ "x$LP64_DEFINED" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx64.mm ../pict.c" - else - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/clip_macosx.cpp" - fi - EXTRASYSSRCS="$EXTRASYSSRCS ../MacOSX/utils_macosx.mm" - CPPFLAGS="$CPPFLAGS -I../MacOSX" - else - EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" - fi -else - VIDEOSRCS="video_x.cpp" - KEYCODES="keycodes" - EXTRASYSSRCS="$EXTRASYSSRCS clip_unix.cpp" -fi -if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then - AC_DEFINE(USE_SDL_AUDIO, 1, [Define to enable SDL audio support]) - AUDIOSRC="../SDL/audio_sdl.cpp" -fi - -dnl BINCUE overrides - -if [[ "x$have_bincue" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS bincue_unix.cpp" -fi - -dnl libvhd overrides - -if [[ "x$have_libvhd" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS vhd_unix.cpp" -fi - - -SYSSRCS="$VIDEOSRCS $EXTFSSRC $PREFSSRC $SERIALSRC $ETHERSRC $SCSISRC $AUDIOSRC $SEMSRC $UISRCS $EXTRASYSSRCS" - -dnl Define a macro that translates a yesno-variable into a C macro definition -dnl to be put into the config.h file -dnl $1 -- the macro to define -dnl $2 -- the value to translate -dnl $3 -- template name -AC_DEFUN([AC_TRANSLATE_DEFINE], [ - if [[ "x$2" = "xyes" -o "x$2" = "xguessing yes" ]]; then - AC_DEFINE($1, 1, $3) - fi -]) - -dnl Check that the host supports TUN/TAP devices -AC_CACHE_CHECK([whether TUN/TAP is supported], - ac_cv_tun_tap_support, [ - AC_TRY_COMPILE([ - #if defined(HAVE_NETINET_IN_H) - #include - #endif - #if defined(HAVE_LINUX_IF_H) && defined(HAVE_LINUX_IF_TUN_H) - #include - #include - #endif - #if defined(HAVE_NET_IF_H) && defined(HAVE_NET_IF_TUN_H) - #include - #include - #endif - ], [ - struct ifreq ifr; - memset(&ifr, 0, sizeof(ifr)); - ifr.ifr_flags = IFF_TAP | IFF_NO_PI; - ], - ac_cv_tun_tap_support=yes, ac_cv_tun_tap_support=no - ) -]) -AC_TRANSLATE_DEFINE(ENABLE_TUNTAP, "$ac_cv_tun_tap_support", - [Define if your system supports TUN/TAP devices.]) - -dnl Various checks if the system supports vm_allocate() and the like functions. -have_mach_vm=no -if [[ "x$ac_cv_func_vm_allocate" = "xyes" -a "x$ac_cv_func_vm_deallocate" = "xyes" -a \ - "x$ac_cv_func_vm_protect" = "xyes" ]]; then - have_mach_vm=yes -fi -AC_TRANSLATE_DEFINE(HAVE_MACH_VM, "$have_mach_vm", - [Define if your system has a working vm_allocate()-based memory allocator.]) - -dnl Check that vm_allocate(), vm_protect() work -if [[ "x$have_mach_vm" = "xyes" ]]; then - -AC_CACHE_CHECK([whether vm_protect works], - ac_cv_vm_protect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_vm_protect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_vm_protect_works=no, rm -f core, - dnl When cross-compiling, do not assume anything - ac_cv_vm_protect_works="guessing no" - ) - done - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../CrossPlatform/vm_alloc.cpp" - ], , ac_cv_vm_protect_works=no, - dnl When cross-compiling, do not assume anything - ac_cv_vm_protect_works="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Remove support for vm_allocate() if vm_protect() does not work -if [[ "x$have_mach_vm" = "xyes" ]]; then - case $ac_cv_vm_protect_works in - *yes) have_mach_vm=yes;; - *no) have_mach_vm=no;; - esac -fi -AC_TRANSLATE_DEFINE(HAVE_MACH_VM, "$have_mach_vm", - [Define if your system has a working vm_allocate()-based memory allocator.]) - -fi dnl HAVE_MACH_VM - -dnl Various checks if the system supports mmap() and the like functions. -dnl ... and Mach memory allocators are not supported -have_mmap_vm=no -if [[ "x$ac_cv_func_mmap" = "xyes" -a "x$ac_cv_func_munmap" = "xyes" -a \ - "x$ac_cv_func_mprotect" = "xyes" ]]; then - if [[ "x$have_mach_vm" = "xno" ]]; then - have_mmap_vm=yes - fi -fi -AC_TRANSLATE_DEFINE(HAVE_MMAP_VM, "$have_mmap_vm", - [Define if your system has a working mmap()-based memory allocator.]) - -dnl Check that mmap() and associated functions work. -if [[ "x$have_mmap_vm" = "xyes" ]]; then - -dnl Check if we have a working anonymous mmap() -AC_CACHE_CHECK([whether mmap supports MAP_ANON], - ac_cv_mmap_anon, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_MMAP_ANON - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_MMAP_ANON - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mmap_anon=yes, ac_cv_mmap_anon=no, - dnl When cross-compiling, do not assume anything. - ac_cv_mmap_anon="guessing no" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_MMAP_ANON, "$ac_cv_mmap_anon", - [Define if defines MAP_ANON and mmap()'ing with MAP_ANON works.]) - -AC_CACHE_CHECK([whether mmap supports MAP_ANONYMOUS], - ac_cv_mmap_anonymous, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_MMAP_ANONYMOUS - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_MMAP_ANON - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mmap_anonymous=yes, ac_cv_mmap_anonymous=no, - dnl When cross-compiling, do not assume anything. - ac_cv_mmap_anonymous="guessing no" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_MMAP_ANONYMOUS, "$ac_cv_mmap_anonymous", - [Define if defines MAP_ANONYMOUS and mmap()'ing with MAP_ANONYMOUS works.]) - -AC_CACHE_CHECK([whether mprotect works], - ac_cv_mprotect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_mprotect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../CrossPlatform/vm_alloc.cpp" - ], ac_cv_mprotect_works=no, rm -f core, - dnl When cross-compiling, do not assume anything - ac_cv_mprotect_works="guessing no" - ) - done - AC_TRY_RUN([ - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../CrossPlatform/vm_alloc.cpp" - ], , ac_cv_mprotect_works=no, - dnl When cross-compiling, do not assume anything - ac_cv_mprotect_works="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Remove support for mmap() if mprotect() does not work -if [[ "x$have_mmap_vm" = "xyes" ]]; then - case $ac_cv_mprotect_works in - *yes) have_mmap_vm=yes;; - *no) have_mmap_vm=no;; - esac -fi -AC_TRANSLATE_DEFINE(HAVE_MMAP_VM, $have_mmap_vm, - [Define if your system has a working mmap()-based memory allocator.]) - -fi dnl HAVE_MMAP_VM - -dnl Check if we can disable position-independent code -AC_CACHE_CHECK([how to disable position-independent code], - ac_cv_no_pie, [ - ac_cv_no_pie='-Wl,-no_pie' - saved_LDFLAGS="$LDFLAGS" - LDFLAGS="$LDFLAGS $ac_cv_no_pie" - AC_TRY_LINK(,,,[ac_cv_no_pie="cannot"]) - if [[ "$ac_cv_no_pie" = "cannot" ]]; then - LDFLAGS="$saved_LDFLAGS" - fi -]) - -dnl Check if we can modify the __PAGEZERO segment for use as Low Memory -AC_CACHE_CHECK([whether __PAGEZERO can be Low Memory area 0x0000-0x3000], - ac_cv_pagezero_hack, [ - ac_cv_pagezero_hack=no - if AC_TRY_COMMAND([Darwin/testlmem.sh 0x3000]); then - ac_cv_pagezero_hack=yes - dnl might as well skip the test for mmap-able low memory - ac_cv_can_map_lm=no - fi -]) -AC_TRANSLATE_DEFINE(PAGEZERO_HACK, "$ac_cv_pagezero_hack", - [Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this system.]) - -dnl Check if we can mmap 0x3000 bytes from 0x0000 -AC_CACHE_CHECK([whether we can map Low Memory area 0x0000-0x3000], - ac_cv_can_map_lm, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include "../CrossPlatform/vm_alloc.cpp" - int main(void) { /* returns 0 if we could map the lowmem globals */ - volatile char * lm = 0; - if (vm_init() < 0) exit(1); - if (vm_acquire_fixed(0, 0x2000) < 0) exit(1); - lm[0] = 'z'; - if (vm_release((char *)lm, 0x2000) < 0) exit(1); - vm_exit(); exit(0); - } - ], ac_cv_can_map_lm=yes, ac_cv_can_map_lm=no, - dnl When cross-compiling, do not assume anything. - ac_cv_can_map_lm="guessing no" - ) - AC_LANG_RESTORE - ] -) - -dnl Check signal handlers need to be reinstalled -AC_CACHE_CHECK([whether signal handlers need to be reinstalled], - ac_cv_signal_need_reinstall, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include - #ifdef HAVE_UNISTD_H - #include - #endif - #include - static int handled_signal = 0; - RETSIGTYPE sigusr1_handler(int) { handled_signal++; } - int main(void) { /* returns 0 if signals need not to be reinstalled */ - signal(SIGUSR1, sigusr1_handler); raise(SIGUSR1); raise(SIGUSR1); - exit(handled_signal == 2); - } - ], ac_cv_signal_need_reinstall=yes, ac_cv_signal_need_reinstall=no, - dnl When cross-compiling, do not assume anything. - ac_cv_signal_need_reinstall="guessing yes" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(SIGNAL_NEED_REINSTALL, "$ac_cv_signal_need_reinstall", - [Define if your system requires signals to be reinstalled.]) - -dnl Check if sigaction handlers need to be reinstalled -AC_CACHE_CHECK([whether sigaction handlers need to be reinstalled], - ac_cv_sigaction_need_reinstall, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include - #ifdef HAVE_UNISTD_H - #include - #endif - #include - static int handled_signal = 0; - RETSIGTYPE sigusr1_handler(int) { handled_signal++; } - typedef RETSIGTYPE (*signal_handler)(int); - static signal_handler mysignal(int sig, signal_handler handler) { - struct sigaction old_sa; - struct sigaction new_sa; - new_sa.sa_handler = handler; - return ((sigaction(sig,&new_sa,&old_sa) < 0) ? SIG_IGN : old_sa.sa_handler); - } - int main(void) { /* returns 0 if signals need not to be reinstalled */ - mysignal(SIGUSR1, sigusr1_handler); raise(SIGUSR1); raise(SIGUSR1); - exit(handled_signal == 2); - } - ], ac_cv_sigaction_need_reinstall=yes, ac_cv_sigaction_need_reinstall=no, - dnl When cross-compiling, do not assume anything. - ac_cv_sigaction_need_reinstall="guessing yes" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(SIGACTION_NEED_REINSTALL, "$ac_cv_sigaction_need_reinstall", - [Define if your system requires sigactions to be reinstalled.]) - -dnl Check if Mach exceptions supported. -AC_CACHE_CHECK([whether your system supports Mach exceptions], - ac_cv_have_mach_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_MACH_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], - ac_cv_have_mach_exceptions=yes, - ac_cv_have_mach_exceptions=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_mach_exceptions=no - ) - AC_LANG_RESTORE - ] -) -if [[ "$ac_cv_have_mach_exceptions" = "yes" ]]; then - sigsegv_recovery=mach -fi -AC_TRANSLATE_DEFINE(HAVE_MACH_EXCEPTIONS, "$ac_cv_have_mach_exceptions", - [Define if your system supports Mach exceptions.]) - -dnl Check if Windows exceptions are supported. -AC_CACHE_CHECK([whether your system supports Windows exceptions], - ac_cv_have_win32_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_WIN32_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], [ - sigsegv_recovery=win32 - ac_cv_have_win32_exceptions=yes - ], - ac_cv_have_win32_exceptions=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_win32_exceptions=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_WIN32_EXCEPTIONS, "$ac_cv_have_win32_exceptions", - [Define if your system supports Windows exceptions.]) - -dnl Otherwise, check if extended signals are supported. -if [[ -z "$sigsegv_recovery" ]]; then - AC_CACHE_CHECK([whether your system supports extended signal handlers], - ac_cv_have_extended_signals, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGINFO_T 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], - ac_cv_have_extended_signals=yes, - ac_cv_have_extended_signals=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_extended_signals=no - ) - AC_LANG_RESTORE - ] - ) - if [[ "$ac_cv_have_extended_signals" = "yes" ]]; then - sigsegv_recovery=siginfo - fi - AC_TRANSLATE_DEFINE(HAVE_SIGINFO_T, "$ac_cv_have_extended_signals", - [Define if your system support extended signals.]) -fi - -dnl Otherwise, check for subterfuges. -if [[ -z "$sigsegv_recovery" ]]; then - AC_CACHE_CHECK([whether we then have a subterfuge for your system], - ac_cv_have_sigcontext_hack, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGCONTEXT_SUBTERFUGE 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], - ac_cv_have_sigcontext_hack=yes, - ac_cv_have_sigcontext_hack=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_sigcontext_hack=no - ) - AC_LANG_RESTORE - ]) - if [[ "$ac_cv_have_sigcontext_hack" = "yes" ]]; then - sigsegv_recovery=sigcontext - fi - AC_TRANSLATE_DEFINE(HAVE_SIGCONTEXT_SUBTERFUGE, "$ac_cv_have_sigcontext_hack", - [Define if we know a hack to replace siginfo_t->si_addr member.]) -fi - -dnl Check if we can ignore the fault (instruction skipping in SIGSEGV handler) -AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], - ac_cv_have_skip_instruction, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../CrossPlatform/vm_alloc.cpp" - #include "../CrossPlatform/sigsegv.cpp" - ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, - dnl When cross-compiling, do not assume anything. - ac_cv_have_skip_instruction=no - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_SIGSEGV_SKIP_INSTRUCTION, "$ac_cv_have_skip_instruction", - [Define if we can ignore the fault (instruction skipping in SIGSEGV handler).]) - -dnl Can we do Video on SEGV Signals ? -CAN_VOSF=no -if [[ -n "$sigsegv_recovery" ]]; then - CAN_VOSF=yes -fi - -dnl Enable VOSF screen updates with this feature is requested and feasible -if [[ "x$WANT_VOSF" = "xyes" -a "x$CAN_VOSF" = "xyes" ]]; then - AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) -else - WANT_VOSF=no -fi - -dnl Check addressing mode to use -AC_MSG_CHECKING([for addressing mode to use]) -if [[ "$EMULATED_PPC" != "yes" ]]; then - if [[ "$WANT_ADDRESSING_MODE" != "real" ]]; then - AC_MSG_WARN([Running in native PowerPC mode, force use of Real Addressing.]) - WANT_ADDRESSING_MODE="real" - fi -fi -if [[ "$WANT_ADDRESSING_MODE" = "direct" ]]; then - if [[ -n "$NATMEM_OFFSET" ]]; then - NATMEM_OFFSET_DEF="-DNATMEM_OFFSET=$NATMEM_OFFSET" - fi - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - cat confdefs.h > conftest.$ac_ext - cat >> conftest.$ac_ext << EOF -#include -#include -#include "../CrossPlatform/vm_alloc.cpp" - -int main(void) -{ - if (vm_init() < 0) - return 1; - - static const struct { - unsigned long base; - unsigned int size; - } ranges[[]] = { - { 0x00000000, 0x0003000 }, - { 0x10000000, 0x2000000 }, - { 0x40800000, 0x0400000 }, - { 0x68070000, 0x0010000 }, - { 0x69000000, 0x0080000 }, - { 0x68ffe000, 0x0002000 }, - { 0x5fffe000, 0x0002000 }, - { 0x60000000, 0x0040000 }, - }; - const int n_ranges = sizeof(ranges)/ sizeof(ranges[[0]]); - -#ifdef NATMEM_OFFSET - unsigned long ofs = NATMEM_OFFSET; -#else - for (unsigned long ofs = 0x10000000; ofs <= 0x90000000; ofs += 0x10000000) -#endif - for (int i = 0; i < n_ranges; i++) { - char *m = (char *)(ranges[[i]].base + ofs); - if (vm_acquire_fixed(m, ranges[[i]].size) != 0) - break; - memset(m, 0, ranges[[i]].size); - vm_release(m, ranges[[i]].size); - if (i == n_ranges - 1) { - if (sizeof(void *) == 8 && ofs > 0xffffffff) - printf("0x%lxul\n", ofs); - else - printf("0x%08x\n", ofs); - return 0; - } - } - - vm_exit(); - return 1; -} -EOF - doit='$CXX conftest.$ac_ext -o conftest.$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS $LIBS $NATMEM_OFFSET_DEF >& AS_MESSAGE_LOG_FD' - if AC_TRY_EVAL(doit); then - NATMEM_OFFSET=`./conftest.$ac_exeext` - else - NATMEM_OFFSET= - fi - rm -f conftest* - AC_LANG_RESTORE - - if [[ -z "$NATMEM_OFFSET" ]]; then - AC_MSG_ERROR([could not determine a sensible NATMEM_OFFSET value]) - else - WANT_ADDRESSING_MODE="direct,$NATMEM_OFFSET" - AC_DEFINE_UNQUOTED(NATMEM_OFFSET, $NATMEM_OFFSET, - [Define constant offset for Mac address translation]) - fi -fi -AC_MSG_RESULT($WANT_ADDRESSING_MODE) - -dnl Utility macro used by next two tests. -dnl AC_EXAMINE_OBJECT(C source code, -dnl commands examining object file, -dnl [commands to run if compile failed]): -dnl -dnl Compile the source code to an object file; then convert it into a -dnl printable representation. All unprintable characters and -dnl asterisks (*) are replaced by dots (.). All white space is -dnl deleted. Newlines (ASCII 0x10) in the input are preserved in the -dnl output, but runs of newlines are compressed to a single newline. -dnl Finally, line breaks are forcibly inserted so that no line is -dnl longer than 80 columns and the file ends with a newline. The -dnl result of all this processing is in the file conftest.dmp, which -dnl may be examined by the commands in the second argument. -dnl -AC_DEFUN([gcc_AC_EXAMINE_OBJECT], -[AC_LANG_SAVE -AC_LANG_C -dnl Next bit cribbed from AC_TRY_COMPILE. -cat > conftest.$ac_ext < conftest.dmp - $2 -ifelse($3, , , else - $3 -)dnl -fi -rm -rf conftest* -AC_LANG_RESTORE]) - -dnl Floating point format probe. -dnl The basic concept is the same as the above: grep the object -dnl file for an interesting string. We have to watch out for -dnl rounding changing the values in the object, however; this is -dnl handled by ignoring the least significant byte of the float. -dnl -dnl Does not know about VAX G-float or C4x idiosyncratic format. -dnl It does know about PDP-10 idiosyncratic format, but this is -dnl not presently supported by GCC. S/390 "binary floating point" -dnl is in fact IEEE (but maybe we should have that in EBCDIC as well -dnl as ASCII?) -dnl -AC_DEFUN([gcc_AC_C_FLOAT_FORMAT], -[AC_CACHE_CHECK(floating point format, ac_cv_c_float_format, -[gcc_AC_EXAMINE_OBJECT( -[/* This will not work unless sizeof(double) == 8. */ -extern char sizeof_double_must_be_8 [sizeof(double) == 8 ? 1 : -1]; - -/* This structure must have no internal padding. */ -struct possibility { - char prefix[8]; - double candidate; - char postfix[8]; -}; - -#define C(cand) { "\nformat:", cand, ":tamrof\n" } -struct possibility table [] = -{ - C( 3.25724264705901305206e+01), /* @@IEEEFP - IEEE 754 */ - C( 3.53802595280598432000e+18), /* D__float - VAX */ - C( 5.32201830133125317057e-19), /* D.PDP-10 - PDP-10 - the dot is 0x13a */ - C( 1.77977764695171661377e+10), /* IBMHEXFP - s/390 format, ascii */ - C(-5.22995989424860458374e+10) /* IBMHEXFP - s/390 format, EBCDIC */ -};], - [if grep 'format:.@IEEEF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.I@@PFE.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (big-endian)' - elif grep 'format:.FEEEI@.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.EFP@@I.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IEEE (little-endian)' - elif grep 'format:.__floa.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='VAX D-float' - elif grep 'format:..PDP-1.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='PDP-10' - elif grep 'format:.BMHEXF.:tamrof' conftest.dmp >/dev/null 2>&1; then - ac_cv_c_float_format='IBM 370 hex' - else - AC_MSG_ERROR(Unknown floating point format) - fi], - [AC_MSG_ERROR(compile failed)]) -]) -# IEEE is the default format. If the float endianness isn't the same -# as the integer endianness, we have to set FLOAT_WORDS_BIG_ENDIAN -# (which is a tristate: yes, no, default). This is only an issue with -# IEEE; the other formats are only supported by a few machines each, -# all with the same endianness. -format=IEEE_FLOAT_FORMAT -fbigend= -case $ac_cv_c_float_format in - 'IEEE (big-endian)' ) - if test $ac_cv_c_bigendian = no; then - fbigend=1 - fi - ;; - 'IEEE (little-endian)' ) - if test $ac_cv_c_bigendian = yes; then - fbigend=0 - fi - ;; - 'VAX D-float' ) - format=VAX_FLOAT_FORMAT - ;; - 'PDP-10' ) - format=PDP10_FLOAT_FORMAT - ;; - 'IBM 370 hex' ) - format=IBM_FLOAT_FORMAT - ;; -esac -AC_DEFINE_UNQUOTED(HOST_FLOAT_FORMAT, $format, - [Define to the floating point format of the host machine.]) -if test -n "$fbigend"; then - AC_DEFINE_UNQUOTED(HOST_FLOAT_WORDS_BIG_ENDIAN, $fbigend, - [Define to 1 if the host machine stores floating point numbers in - memory with the word containing the sign bit at the lowest address, - or to 0 if it does it the other way around. - - This macro should not be defined if the ordering is the same as for - multi-word integers.]) -fi -]) - -dnl Check for host float format -gcc_AC_C_FLOAT_FORMAT - -dnl Platform specific binary postprocessor -AC_PATH_PROG(BLESS, "true") -if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then - BLESS=Darwin/lowmem - LDFLAGS="$LDFLAGS -pagezero_size 0x3000" -fi - -dnl Check for GCC 2.7 or higher. -HAVE_GCC27=no -AC_MSG_CHECKING(for GCC 2.7 or higher) -AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ - 1 > 1 || __GNUC_MINOR__ - 1 > 5) - # error gcc < 2.7 - typedef syntax error; - #endif - ]])], - [AC_MSG_RESULT(yes); HAVE_GCC27=yes], - [AC_MSG_RESULT(no)]) - -dnl Check for GCC 3.0 or higher. -HAVE_GCC30=no -AC_MSG_CHECKING(for GCC 3.0 or higher) -AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ >= 3) - # error gcc < 3 - typedef syntax error; - #endif - ]])], - [AC_MSG_RESULT(yes); HAVE_GCC30=yes], - [AC_MSG_RESULT(no)]) - -dnl Check for ICC. -AC_MSG_CHECKING(for ICC) -HAVE_ICC=no -if $CXX -V -v 2>&1 | grep -q "Intel(R) C++ Compiler"; then - HAVE_ICC=yes -fi -AC_MSG_RESULT($HAVE_ICC) - -dnl Determine the generated object format -AC_CACHE_CHECK([the format of compiler generated objects], - ac_cv_object_format, [ - echo 'int i;' > conftest.$ac_ext - ac_cv_object_format=no - if AC_TRY_EVAL(ac_compile); then - case `/usr/bin/file conftest.$ac_objext` in - *"ELF"*) - ac_cv_object_format=elf - ;; - *"Mach-O"*) - ac_cv_object_format=mach - ;; - *) - ac_cv_object_format=unknown - ;; - esac - fi - rm -rf conftest* -]) - -dnl Add -fno-strict-aliasing for slirp sources -if [[ "x$HAVE_GCC30" = "xyes" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -fno-strict-aliasing" - AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], - ac_cv_gcc_no_strict_aliasing, [ - AC_TRY_COMPILE([],[],[ac_cv_gcc_no_strict_aliasing=yes],[ac_cv_gcc_no_strict_aliasing=no]) - ]) - if [[ "x$ac_cv_gcc_no_strict_aliasing" = "xyes" ]]; then - AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing") - fi - CFLAGS="$SAVED_CFLAGS" -fi - -dnl Add -mdynamic-no-pic for MacOS X (XXX icc10 will support MacOS X) -if [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -mdynamic-no-pic" - AC_CACHE_CHECK([whether the compiler supports -mdynamic-no-pic], - ac_cv_gcc_mdynamic_no_pic, [ - AC_TRY_COMPILE([],[],[ac_cv_gcc_mdynamic_no_pic=yes],[ac_cv_gcc_mdynamic_no_pic=no]) - ]) - if [[ "x$ac_cv_gcc_mdynamic_no_pic" = "xyes" ]]; then - CXXFLAGS="$CXXFLAGS -mdynamic-no-pic" - else - CFLAGS="$SAVED_CFLAGS" - fi -fi - -dnl CPU emulator sources -if [[ "x$EMULATED_PPC" = "xyes" ]]; then - CPUSRCS="\ - ../kpx_cpu/src/mathlib/ieeefp.cpp \ - ../kpx_cpu/src/mathlib/mathlib.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-cpu.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-decode.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-execute.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-translate.cpp \ - ../kpx_cpu/src/utils/utils-cpuinfo.cpp" - CPPFLAGS="$CPPFLAGS -I../kpx_cpu/include -I../kpx_cpu/src" - - dnl Enable JIT compiler, if possible - if [[ "x$WANT_JIT" = "xyes" ]]; then - AC_CACHE_CHECK([whether dyngen can be used], - ac_cv_use_dyngen, [ - case $host_cpu:$ac_cv_object_format in - powerpc:elf) - ac_cv_use_dyngen=yes - ;; - x86_64:elf) - ac_cv_use_dyngen=yes - ;; - i?86:elf) - ac_cv_use_dyngen=yes - ;; - mips:elf) - ac_cv_use_dyngen=yes - ;; - powerpc:mach) - ac_cv_use_dyngen=yes - ;; - x86_64:mach) - ac_cv_use_dyngen=yes - ;; - i?86:mach) - ac_cv_use_dyngen=yes - ;; - *:*) - ac_cv_use_dyngen=no - ;; - esac - dnl Check for a suitable synthetic opcodes compiler (icc is faking itself as gcc 3.2.2) - if [[ -z "$DYNGEN_CC" ]]; then - if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then - DYNGEN_CC=$CXX - else - for p in /usr/bin /usr/local/bin /usr/freeware/bin; do - gxx="$p/g++" - if [[ -x "$gxx" ]]; then - DYNGEN_CC="$gxx" - fi - done - fi - fi - if [[ -z "$DYNGEN_CC" ]]; then - ac_cv_use_dyngen=no - fi - ]) - if [[ "x$ac_cv_use_dyngen" = "xyes" ]]; then - case $host_cpu in - i?86) - DYNGEN_OP_FLAGS="-fomit-frame-pointer" - ;; - mips) - DYNGEN_OP_FLAGS="-fno-delayed-branch -mno-abicalls" - ;; - powerpc) - if [[ "x$ac_cv_object_format" = "xmach" ]]; then - DYNGEN_OP_FLAGS="-mdynamic-no-pic" - fi - ;; - esac - have_dyngen_gcc3=no - case "x`$DYNGEN_CC -dumpversion`" in - x[12].*) ;; - x*) have_dyngen_gcc3=yes ;; - esac - if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-align-functions" - else - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -malign-functions=0" - fi - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -finline-functions -finline-limit=10000 -fno-exceptions -g0" - if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls" - fi - if [[ "x$DYNGEN_CC" != "x$CXX" ]]; then - DYNGEN_CFLAGS="-O2 $CFLAGS" - DYNGEN_CXXFLAGS="-O2 $CXXFLAGS" - else - DYNGEN_CFLAGS="\$(CFLAGS)" - DYNGEN_CXXFLAGS="\$(CXXFLAGS)" - fi - else - WANT_JIT=no - fi - AC_TRANSLATE_DEFINE(ENABLE_DYNGEN, $ac_cv_use_dyngen, [Define to enable dyngen engine]) - if [[ "x$WANT_JIT" = "xyes" ]]; then - DYNGENSRCS="\ - ../kpx_cpu/src/cpu/jit/dyngen.c \ - ../kpx_cpu/src/cpu/jit/cxxdemangle.cpp" - CPUSRCS="\ - ../kpx_cpu/src/cpu/jit/jit-cache.cpp \ - ../kpx_cpu/src/cpu/jit/basic-dyngen.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-jit.cpp $CPUSRCS" - fi - fi - CPUSRCS="$CPUSRCS ../kpx_cpu/sheepshaver_glue.cpp ../kpx_cpu/ppc-dis.c" -else - WANT_JIT=no -fi -if [[ "x$WANT_JIT" = "xyes" ]]; then - CPPFLAGS="$CPPFLAGS -DUSE_JIT" -fi - -dnl Higher level optimizations with MIPSPro compilers are possible -if [[ "x$HAVE_IPA" = "xyes" ]]; then - CFLAGS="`echo $CFLAGS | sed -e 's/-g//g'` -O3 -OPT:Olimit=0 -IPA" - CXXFLAGS="`echo $CXXFLAGS | sed -e 's/-g//g'` -O3 -OPT:Olimit=0 -IPA" - CXXFLAGS="-LANG:std $CXXFLAGS" - LDFLAGS="$LDFLAGS -O3 -OPT:Olimit=0 -IPA" -fi - -dnl Check for linker script support -case $target_os:$target_cpu in -linux*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; -linux*:x86_64) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-x86_64.ld";; -linux*:powerpc) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-ppc.ld";; -netbsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; -freebsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/freebsd-i386.ld";; -darwin*:*) LINKER_SCRIPT_FLAGS="-Wl,-seg1addr,0x78048000";; -esac -if [[ -n "$LINKER_SCRIPT_FLAGS" ]]; then - AC_CACHE_CHECK([whether linker script is usable], - ac_cv_linker_script_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - saved_LDFLAGS="$LDFLAGS" - LDFLAGS="$LDFLAGS $LINKER_SCRIPT_FLAGS" - AC_TRY_RUN( - [int main() {if ((char *)&main < (char *)0x70000000) return 1;}], - [ac_cv_linker_script_works=yes], - [ac_cv_linker_script_works=no], - dnl When cross-compiling, assume it works - [ac_cv_linker_script_works="guessing yes"] - ) - AC_LANG_RESTORE - if [[ "$ac_cv_linker_script_works" = "no" ]]; then - LDFLAGS="$saved_LDFLAGS" - LINKER_SCRIPT_FLAGS="" - fi - ]) -fi -AC_TRANSLATE_DEFINE(HAVE_LINKER_SCRIPT, "$ac_cv_linker_script_works", - [Define if there is a linker script to relocate the executable above 0x70000000.]) - -dnl Generate Makefile. -AC_SUBST(PERL) -AC_SUBST(USE_DYNGEN, [$ac_cv_use_dyngen]) -AC_SUBST(DYNGENSRCS) -AC_SUBST(DYNGEN_CC) -AC_SUBST(DYNGEN_CFLAGS) -AC_SUBST(DYNGEN_CXXFLAGS) -AC_SUBST(DYNGEN_OP_FLAGS) -AC_SUBST(SYSSRCS) -AC_SUBST(CPUSRCS) -AC_SUBST(BLESS) -AC_SUBST(KEYCODES) -AC_OUTPUT([ -Makefile -../MacOSX/Info.plist -]) - -dnl Print summary. -echo -echo SheepShaver configuration summary: -echo -echo SDL support ...................... : $SDL_SUPPORT -echo BINCUE support ................... : $have_bincue -echo LIBVHD support ................... : $have_libvhd -echo FBDev DGA support ................ : $WANT_FBDEV_DGA -echo XFree86 DGA support .............. : $WANT_XF86_DGA -echo XFree86 VidMode support .......... : $WANT_XF86_VIDMODE -echo Using PowerPC emulator ........... : $EMULATED_PPC -echo Enable JIT compiler .............. : $WANT_JIT -echo Enable video on SEGV signals ..... : $WANT_VOSF -echo ESD sound support ................ : $WANT_ESD -echo GTK user interface ............... : $WANT_GTK -echo mon debugger support ............. : $WANT_MON -echo Addressing mode .................. : $WANT_ADDRESSING_MODE -echo Bad memory access recovery type .. : $sigsegv_recovery -echo -echo "Configuration done. Now type \"make\"." diff --git a/SheepShaver/src/Unix/cpr.sh b/SheepShaver/src/Unix/cpr.sh deleted file mode 120000 index 29f13000d..000000000 --- a/SheepShaver/src/Unix/cpr.sh +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/cpr.sh \ No newline at end of file diff --git a/SheepShaver/src/Unix/disk_sparsebundle.cpp b/SheepShaver/src/Unix/disk_sparsebundle.cpp deleted file mode 120000 index 7e368ca75..000000000 --- a/SheepShaver/src/Unix/disk_sparsebundle.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/disk_sparsebundle.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/disk_unix.h b/SheepShaver/src/Unix/disk_unix.h deleted file mode 120000 index 87d10dfda..000000000 --- a/SheepShaver/src/Unix/disk_unix.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/disk_unix.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/ether_unix.cpp b/SheepShaver/src/Unix/ether_unix.cpp deleted file mode 120000 index b2a75d72b..000000000 --- a/SheepShaver/src/Unix/ether_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/ether_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/extfs_unix.cpp b/SheepShaver/src/Unix/extfs_unix.cpp deleted file mode 120000 index 6a67ad612..000000000 --- a/SheepShaver/src/Unix/extfs_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/extfs_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/install-sh b/SheepShaver/src/Unix/install-sh deleted file mode 100755 index 89fc9b098..000000000 --- a/SheepShaver/src/Unix/install-sh +++ /dev/null @@ -1,238 +0,0 @@ -#! /bin/sh -# -# install - install a program, script, or datafile -# This comes from X11R5. -# -# Calling this script install-sh is preferred over install.sh, to prevent -# `make' implicit rules from creating a file called install from it -# when there is no Makefile. -# -# This script is compatible with the BSD install script, but was written -# from scratch. -# - - -# set DOITPROG to echo to test this script - -# Don't use :- since 4.3BSD and earlier shells don't like it. -doit="${DOITPROG-}" - - -# put in absolute paths if you don't have them in your path; or use env. vars. - -mvprog="${MVPROG-mv}" -cpprog="${CPPROG-cp}" -chmodprog="${CHMODPROG-chmod}" -chownprog="${CHOWNPROG-chown}" -chgrpprog="${CHGRPPROG-chgrp}" -stripprog="${STRIPPROG-strip}" -rmprog="${RMPROG-rm}" -mkdirprog="${MKDIRPROG-mkdir}" - -tranformbasename="" -transform_arg="" -instcmd="$mvprog" -chmodcmd="$chmodprog 0755" -chowncmd="" -chgrpcmd="" -stripcmd="" -rmcmd="$rmprog -f" -mvcmd="$mvprog" -src="" -dst="" -dir_arg="" - -while [ x"$1" != x ]; do - case $1 in - -c) instcmd="$cpprog" - shift - continue;; - - -d) dir_arg=true - shift - continue;; - - -m) chmodcmd="$chmodprog $2" - shift - shift - continue;; - - -o) chowncmd="$chownprog $2" - shift - shift - continue;; - - -g) chgrpcmd="$chgrpprog $2" - shift - shift - continue;; - - -s) stripcmd="$stripprog" - shift - continue;; - - -t=*) transformarg=`echo $1 | sed 's/-t=//'` - shift - continue;; - - -b=*) transformbasename=`echo $1 | sed 's/-b=//'` - shift - continue;; - - *) if [ x"$src" = x ] - then - src=$1 - else - # this colon is to work around a 386BSD /bin/sh bug - : - dst=$1 - fi - shift - continue;; - esac -done - -if [ x"$src" = x ] -then - echo "install: no input file specified" - exit 1 -else - true -fi - -if [ x"$dir_arg" != x ]; then - dst=$src - src="" - - if [ -d $dst ]; then - instcmd=: - else - instcmd=mkdir - fi -else - -# Waiting for this to be detected by the "$instcmd $src $dsttmp" command -# might cause directories to be created, which would be especially bad -# if $src (and thus $dsttmp) contains '*'. - - if [ -f $src -o -d $src ] - then - true - else - echo "install: $src does not exist" - exit 1 - fi - - if [ x"$dst" = x ] - then - echo "install: no destination specified" - exit 1 - else - true - fi - -# If destination is a directory, append the input filename; if your system -# does not like double slashes in filenames, you may need to add some logic - - if [ -d $dst ] - then - dst="$dst"/`basename $src` - else - true - fi -fi - -## this sed command emulates the dirname command -dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'` - -# Make sure that the destination directory exists. -# this part is taken from Noah Friedman's mkinstalldirs script - -# Skip lots of stat calls in the usual case. -if [ ! -d "$dstdir" ]; then -defaultIFS=' -' -IFS="${IFS-${defaultIFS}}" - -oIFS="${IFS}" -# Some sh's can't handle IFS=/ for some reason. -IFS='%' -set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'` -IFS="${oIFS}" - -pathcomp='' - -while [ $# -ne 0 ] ; do - pathcomp="${pathcomp}${1}" - shift - - if [ ! -d "${pathcomp}" ] ; - then - $mkdirprog "${pathcomp}" - else - true - fi - - pathcomp="${pathcomp}/" -done -fi - -if [ x"$dir_arg" != x ] -then - $doit $instcmd $dst && - - if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else true ; fi && - if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else true ; fi && - if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else true ; fi && - if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else true ; fi -else - -# If we're going to rename the final executable, determine the name now. - - if [ x"$transformarg" = x ] - then - dstfile=`basename $dst` - else - dstfile=`basename $dst $transformbasename | - sed $transformarg`$transformbasename - fi - -# don't allow the sed command to completely eliminate the filename - - if [ x"$dstfile" = x ] - then - dstfile=`basename $dst` - else - true - fi - -# Make a temp file name in the proper directory. - - dsttmp=$dstdir/#inst.$$# - -# Move or copy the file name to the temp name - - $doit $instcmd $src $dsttmp && - - trap "rm -f ${dsttmp}" 0 && - -# and set any options; do chmod last to preserve setuid bits - -# If any of these fail, we abort the whole thing. If we want to -# ignore errors from any of these, just make sure not to ignore -# errors from the above "$doit $instcmd $src $dsttmp" command. - - if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else true;fi && - if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else true;fi && - if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else true;fi && - if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else true;fi && - -# Now rename the file to the real destination. - - $doit $rmcmd -f $dstdir/$dstfile && - $doit $mvcmd $dsttmp $dstdir/$dstfile - -fi && - - -exit 0 diff --git a/SheepShaver/src/Unix/keycodes b/SheepShaver/src/Unix/keycodes deleted file mode 120000 index da89edcf9..000000000 --- a/SheepShaver/src/Unix/keycodes +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/keycodes \ No newline at end of file diff --git a/SheepShaver/src/Unix/ldscripts b/SheepShaver/src/Unix/ldscripts deleted file mode 120000 index 396260839..000000000 --- a/SheepShaver/src/Unix/ldscripts +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/ldscripts \ No newline at end of file diff --git a/SheepShaver/src/Unix/m4 b/SheepShaver/src/Unix/m4 deleted file mode 120000 index a20fe8400..000000000 --- a/SheepShaver/src/Unix/m4 +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/m4 \ No newline at end of file diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp deleted file mode 100644 index 3d0ee43ec..000000000 --- a/SheepShaver/src/Unix/main_unix.cpp +++ /dev/null @@ -1,2292 +0,0 @@ -/* - * main_unix.cpp - Emulation core, Unix implementation - * - * SheepShaver (C) Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - * See main_beos.cpp for a description of the three operating modes. - * - * In addition to that, we have to handle the fact that the MacOS ABI - * is slightly different from the SysV ABI used by Linux: - * - Stack frames are different (e.g. LR is stored in 8(r1) under - * MacOS, but in 4(r1) under Linux) - * - There is a pointer to Thread Local Storage (TLS) under Linux with - * recent enough glibc. This is r2 in 32-bit mode and r13 in - * 64-bit mode (PowerOpen/AIX ABI) - * - r13 is used as a small data pointer under Linux (but appearently - * it is not used this way? To be sure, we specify -msdata=none - * in the Makefile) - * - There are no TVECTs under Linux; function pointers point - * directly to the function code - * The Execute*() functions have to account for this. Additionally, we - * cannot simply call MacOS functions by getting their TVECT and jumping - * to it. Such calls are done via the call_macos*() functions in - * asm_linux.S that create a MacOS stack frame, load the TOC pointer - * and put the arguments into the right registers. - * - * As on the BeOS, we have to specify an alternate signal stack because - * interrupts (and, under Linux, Low Memory accesses) may occur when r1 - * is pointing to the Kernel Data or to Low Memory. There is one - * problem, however, due to the alternate signal stack being global to - * all signal handlers. Consider the following scenario: - * - The main thread is executing some native PPC MacOS code in - * MODE_NATIVE, running on the MacOS stack (somewhere in the Mac RAM). - * - A SIGUSR2 interrupt occurs. The kernel switches to the signal - * stack and starts executing the SIGUSR2 signal handler. - * - The signal handler sees the MODE_NATIVE and calls ppc_interrupt() - * to handle a native interrupt. - * - ppc_interrupt() sets r1 to point to the Kernel Data and jumps to - * the nanokernel. - * - The nanokernel accesses a Low Memory global (most likely one of - * the XLMs), a SIGSEGV occurs. - * - The kernel sees that r1 does not point to the signal stack and - * switches to the signal stack again, thus overwriting the data that - * the SIGUSR2 handler put there. - * The same problem arises when calling ExecutePPC() inside the MODE_EMUL_OP - * interrupt handler. - * - * The solution is to set the signal stack to a second, "extra" stack - * inside the SIGUSR2 handler before entering the Nanokernel or calling - * ExecutePPC (or any function that might cause a mode switch). The signal - * stack is restored before exiting the SIGUSR2 handler. - * - * Note that POSIX standard says you can't modify the alternate - * signal stack while the process is executing on it. There is a - * hackaround though: we install a trampoline SIGUSR2 handler that - * sets up an alternate stack itself and calls the real handler. - * Then, when we call sigaltstack() there, we no longer get an EPERM, - * i.e. it now works. - * - * TODO: - * check if SIGSEGV handler works for all registers (including FP!) - */ - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "video.h" -#include "sys.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "user_strings.h" -#include "vm_alloc.h" -#include "sigsegv.h" -#include "sigregs.h" -#include "rpc.h" - -#define DEBUG 0 -#include "debug.h" - - -#ifdef HAVE_DIRENT_H -#include -#endif - -#ifdef USE_SDL -#include -#endif - -#ifndef USE_SDL_VIDEO -#include -#endif - -#ifdef ENABLE_GTK -#include -#endif - -#ifdef ENABLE_XF86_DGA -#include -#include -#include -#endif - -#ifdef ENABLE_MON -#include "mon.h" -#endif - - -// Enable emulation of unaligned lmw/stmw? -#define EMULATE_UNALIGNED_LOADSTORE_MULTIPLE 1 - -// Enable Execute68k() safety checks? -#define SAFE_EXEC_68K 0 - -// Interrupts in EMUL_OP mode? -#define INTERRUPTS_IN_EMUL_OP_MODE 1 - -// Interrupts in native mode? -#define INTERRUPTS_IN_NATIVE_MODE 1 - - -// Constants -const char ROM_FILE_NAME[] = "ROM"; -const char ROM_FILE_NAME2[] = "Mac OS ROM"; - -#if !REAL_ADDRESSING -// FIXME: needs to be >= 0x04000000 -const uintptr RAM_BASE = 0x10000000; // Base address of RAM -#endif -const uintptr ROM_BASE = 0x40800000; // Base address of ROM -#if REAL_ADDRESSING -const uint32 ROM_ALIGNMENT = 0x100000; // ROM must be aligned to a 1MB boundary -#endif -const uint32 SIG_STACK_SIZE = 0x10000; // Size of signal stack - - -// Global variables (exported) -#if !EMULATED_PPC -void *TOC = NULL; // Pointer to Thread Local Storage (r2) -void *R13 = NULL; // Pointer to .sdata section (r13 under Linux) -#endif -uint32 RAMBase; // Base address of Mac RAM -uint32 RAMSize; // Size of Mac RAM -uint32 ROMBase; // Base address of Mac ROM -uint32 KernelDataAddr; // Address of Kernel Data -uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM -uint32 DRCacheAddr; // Address of DR Cache -uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) - - -// Global variables -#ifndef USE_SDL_VIDEO -char *x_display_name = NULL; // X11 display name -Display *x_display = NULL; // X11 display handle -#ifdef X11_LOCK_TYPE -X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock -#endif -#endif - -static int zero_fd = 0; // FD of /dev/zero -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -static bool rom_area_mapped = false; // Flag: Mac ROM mmap()ped -static bool ram_area_mapped = false; // Flag: Mac RAM mmap()ped -static bool dr_cache_area_mapped = false; // Flag: Mac DR Cache mmap()ped -static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped -static KernelData *kernel_data; // Pointer to Kernel Data -static EmulatorData *emulator_data; - -static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes - -static bool nvram_thread_active = false; // Flag: NVRAM watchdog installed -static volatile bool nvram_thread_cancel; // Flag: Cancel NVRAM thread -static pthread_t nvram_thread; // NVRAM watchdog -static bool tick_thread_active = false; // Flag: MacOS thread installed -static volatile bool tick_thread_cancel; // Flag: Cancel 60Hz thread -static pthread_t tick_thread; // 60Hz thread -static pthread_t emul_thread; // MacOS thread - -static bool ready_for_signals = false; // Handler installed, signals can be sent - -#if EMULATED_PPC -static uintptr sig_stack = 0; // Stack for PowerPC interrupt routine -#else -static struct sigaction sigusr2_action; // Interrupt signal (of emulator thread) -static struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) -static struct sigaction sigill_action; // Illegal instruction signal (of emulator thread) -static stack_t sig_stack; // Stack for signal handlers -static stack_t extra_stack; // Stack for SIGSEGV inside interrupt handler -static bool emul_thread_fatal = false; // Flag: MacOS thread crashed, tick thread shall dump debug output -static sigregs sigsegv_regs; // Register dump when crashed -static const char *crash_reason = NULL; // Reason of the crash (SIGSEGV, SIGBUS, SIGILL) -#endif - -static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI -static const char *gui_connection_path = NULL; // GUI connection identifier - -uint32 SheepMem::page_size; // Size of a native page -uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros -uintptr SheepMem::base = 0x60000000; // Address of SheepShaver data -uintptr SheepMem::proc; // Bottom address of SheepShave procedures -uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) - - -// Prototypes -static bool kernel_data_init(void); -static bool shm_map_address(int kernel_area, uint32 addr); -static void Quit(void); -static void *emul_func(void *arg); -static void *nvram_func(void *arg); -static void *tick_func(void *arg); -#if EMULATED_PPC -extern void emul_ppc(uint32 start); -extern void init_emul_ppc(void); -extern void exit_emul_ppc(void); -sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip); -#else -extern "C" void sigusr2_handler_init(int sig, siginfo_t *sip, void *scp); -extern "C" void sigusr2_handler(int sig, siginfo_t *sip, void *scp); -static void sigsegv_handler(int sig, siginfo_t *sip, void *scp); -static void sigill_handler(int sig, siginfo_t *sip, void *scp); -#endif - - -// From asm_linux.S -#if !EMULATED_PPC -extern "C" void *get_sp(void); -extern "C" void *get_r2(void); -extern "C" void set_r2(void *); -extern "C" void *get_r13(void); -extern "C" void set_r13(void *); -extern "C" void flush_icache_range(uint32 start, uint32 end); -extern "C" void jump_to_rom(uint32 entry, uint32 context); -extern "C" void quit_emulator(void); -extern "C" void execute_68k(uint32 pc, M68kRegisters *r); -extern "C" void ppc_interrupt(uint32 entry, uint32 kernel_data); -extern "C" int atomic_add(int *var, int v); -extern "C" int atomic_and(int *var, int v); -extern "C" int atomic_or(int *var, int v); -extern void paranoia_check(void); -#endif - - -#if EMULATED_PPC -/* - * Return signal stack base - */ - -uintptr SignalStackBase(void) -{ - return sig_stack + SIG_STACK_SIZE; -} - - -/* - * Atomic operations - */ - -#if HAVE_SPINLOCKS -static spinlock_t atomic_ops_lock = SPIN_LOCK_UNLOCKED; -#else -#define spin_lock(LOCK) -#define spin_unlock(LOCK) -#endif - -int atomic_add(int *var, int v) -{ - spin_lock(&atomic_ops_lock); - int ret = *var; - *var += v; - spin_unlock(&atomic_ops_lock); - return ret; -} - -int atomic_and(int *var, int v) -{ - spin_lock(&atomic_ops_lock); - int ret = *var; - *var &= v; - spin_unlock(&atomic_ops_lock); - return ret; -} - -int atomic_or(int *var, int v) -{ - spin_lock(&atomic_ops_lock); - int ret = *var; - *var |= v; - spin_unlock(&atomic_ops_lock); - return ret; -} -#endif - - -/* - * Memory management helpers - */ - -static inline uint8 *vm_mac_acquire(uint32 size) -{ - return (uint8 *)vm_acquire(size); -} - -static inline int vm_mac_acquire_fixed(uint32 addr, uint32 size) -{ - return vm_acquire_fixed(Mac2HostAddr(addr), size); -} - -static inline int vm_mac_release(uint32 addr, uint32 size) -{ - return vm_release(Mac2HostAddr(addr), size); -} - - -/* - * Main program - */ - -static void usage(const char *prg_name) -{ - printf("Usage: %s [OPTION...]\n", prg_name); - printf("\nUnix options:\n"); - printf(" --display STRING\n X display to use\n"); - PrefsPrintUsage(); - exit(0); -} - -static bool valid_vmdir(const char *path) -{ - const int suffix_len = sizeof(".sheepvm") - 1; - int len = strlen(path); - if (len && path[len - 1] == '/') // to support both ".sheepvm" and ".sheepvm/" - len--; - if (len > suffix_len && !strncmp(path + len - suffix_len, ".sheepvm", suffix_len)) { - struct stat d; - if (!stat(path, &d) && S_ISDIR(d.st_mode)) { - return true; - } - } - return false; -} - -static void get_system_info(void) -{ -#if !EMULATED_PPC - FILE *proc_file; -#endif - - PVR = 0x00040000; // Default: 604 - CPUClockSpeed = 100000000; // Default: 100MHz - BusClockSpeed = 100000000; // Default: 100MHz - TimebaseSpeed = 25000000; // Default: 25MHz - -#if EMULATED_PPC - PVR = 0x000c0000; // Default: 7400 (with AltiVec) -#elif defined(__APPLE__) && defined(__MACH__) - proc_file = popen("ioreg -c IOPlatformDevice", "r"); - if (proc_file) { - char line[256]; - bool powerpc_node = false; - while (fgets(line, sizeof(line) - 1, proc_file)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len - 1] = 0; - - // Parse line - if (strstr(line, "o PowerPC,")) - powerpc_node = true; - else if (powerpc_node) { - uint32 value; - char head[256]; - if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2) - PVR = value; - else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2) - CPUClockSpeed = value; - else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2) - BusClockSpeed = value; - else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2) - TimebaseSpeed = value; - else if (strchr(line, '}')) - powerpc_node = false; - } - } - fclose(proc_file); - } else { - char str[256]; - sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno)); - WarningAlert(str); - } -#else - proc_file = fopen("/proc/cpuinfo", "r"); - if (proc_file) { - // CPU specs from Linux kernel - // TODO: make it more generic with features (e.g. AltiVec) and - // cache information and friends for NameRegistry - static const struct { - uint32 pvr_mask; - uint32 pvr_value; - const char *cpu_name; - } - cpu_specs[] = { - { 0xffff0000, 0x00010000, "601" }, - { 0xffff0000, 0x00030000, "603" }, - { 0xffff0000, 0x00060000, "603e" }, - { 0xffff0000, 0x00070000, "603ev" }, - { 0xffff0000, 0x00040000, "604" }, - { 0xfffff000, 0x00090000, "604e" }, - { 0xffff0000, 0x00090000, "604r" }, - { 0xffff0000, 0x000a0000, "604ev" }, - { 0xffffffff, 0x00084202, "740/750" }, - { 0xfffff000, 0x00083000, "745/755" }, - { 0xfffffff0, 0x00080100, "750CX" }, - { 0xfffffff0, 0x00082200, "750CX" }, - { 0xfffffff0, 0x00082210, "750CXe" }, - { 0xffffff00, 0x70000100, "750FX" }, - { 0xffffffff, 0x70000200, "750FX" }, - { 0xffff0000, 0x70000000, "750FX" }, - { 0xffff0000, 0x70020000, "750GX" }, - { 0xffff0000, 0x00080000, "740/750" }, - { 0xffffffff, 0x000c1101, "7400 (1.1)" }, - { 0xffff0000, 0x000c0000, "7400" }, - { 0xffff0000, 0x800c0000, "7410" }, - { 0xffffffff, 0x80000200, "7450" }, - { 0xffffffff, 0x80000201, "7450" }, - { 0xffff0000, 0x80000000, "7450" }, - { 0xffffff00, 0x80010100, "7455" }, - { 0xffffffff, 0x80010200, "7455" }, - { 0xffff0000, 0x80010000, "7455" }, - { 0xffff0000, 0x80020000, "7457" }, - { 0xffff0000, 0x80030000, "7447A" }, - { 0xffff0000, 0x80040000, "7448" }, - { 0x7fff0000, 0x00810000, "82xx" }, - { 0x7fff0000, 0x00820000, "8280" }, - { 0xffff0000, 0x00400000, "Power3 (630)" }, - { 0xffff0000, 0x00410000, "Power3 (630+)" }, - { 0xffff0000, 0x00360000, "I-star" }, - { 0xffff0000, 0x00370000, "S-star" }, - { 0xffff0000, 0x00350000, "Power4" }, - { 0xffff0000, 0x00390000, "PPC970" }, - { 0xffff0000, 0x003c0000, "PPC970FX" }, - { 0xffff0000, 0x00440000, "PPC970MP" }, - { 0xffff0000, 0x003a0000, "POWER5 (gr)" }, - { 0xffff0000, 0x003b0000, "POWER5+ (gs)" }, - { 0xffff0000, 0x003e0000, "POWER6" }, - { 0xffff0000, 0x00700000, "Cell Broadband Engine" }, - { 0x7fff0000, 0x00900000, "PA6T" }, - { 0, 0, 0 } - }; - - char line[256]; - while(fgets(line, 255, proc_file)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Parse line - int i; - float f; - char value[256]; - if (sscanf(line, "cpu : %[^,]", value) == 1) { - // Search by name - const char *cpu_name = NULL; - for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) { - if (strcmp(cpu_specs[i].cpu_name, value) == 0) { - cpu_name = cpu_specs[i].cpu_name; - PVR = cpu_specs[i].pvr_value; - break; - } - } - if (cpu_name == NULL) - printf("WARNING: Unknown CPU type '%s', assuming 604\n", value); - else - printf("Found a PowerPC %s processor\n", cpu_name); - } - if (sscanf(line, "clock : %fMHz", &f) == 1) - CPUClockSpeed = BusClockSpeed = ((int64)f) * 1000000; - else if (sscanf(line, "clock : %dMHz", &i) == 1) - CPUClockSpeed = BusClockSpeed = i * 1000000; - } - fclose(proc_file); - } else { - char str[256]; - sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno)); - WarningAlert(str); - } - - // Get actual bus frequency - proc_file = fopen("/proc/device-tree/clock-frequency", "r"); - if (proc_file) { - union { uint8 b[4]; uint32 l; } value; - if (fread(value.b, sizeof(value), 1, proc_file) == 1) - BusClockSpeed = value.l; - fclose(proc_file); - } - - // Get actual timebase frequency - TimebaseSpeed = BusClockSpeed / 4; - DIR *cpus_dir; - if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) { - struct dirent *cpu_entry; - while ((cpu_entry = readdir(cpus_dir)) != NULL) { - if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) { - char timebase_freq_node[256]; - sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name); - proc_file = fopen(timebase_freq_node, "r"); - if (proc_file) { - union { uint8 b[4]; uint32 l; } value; - if (fread(value.b, sizeof(value), 1, proc_file) == 1) - TimebaseSpeed = value.l; - fclose(proc_file); - } - } - } - closedir(cpus_dir); - } -#endif - - // Remap any newer G4/G5 processor to plain G4 for compatibility - switch (PVR >> 16) { - case 0x8000: // 7450 - case 0x8001: // 7455 - case 0x8002: // 7457 - case 0x8003: // 7447A - case 0x8004: // 7448 - case 0x0039: // 970 - case 0x003c: // 970FX - case 0x0044: // 970MP - PVR = 0x000c0000; // 7400 - break; - } - D(bug("PVR: %08x (assumed)\n", PVR)); -} - -static bool load_mac_rom(void) -{ - uint32 rom_size, actual; - uint8 *rom_tmp; - const char *rom_path = PrefsFindString("rom"); - int rom_fd = open(rom_path && *rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY); - if (rom_fd < 0) { - rom_fd = open(ROM_FILE_NAME2, O_RDONLY); - if (rom_fd < 0) { - ErrorAlert(GetString(STR_NO_ROM_FILE_ERR)); - return false; - } - } - printf("%s", GetString(STR_READING_ROM_FILE)); - rom_size = lseek(rom_fd, 0, SEEK_END); - lseek(rom_fd, 0, SEEK_SET); - rom_tmp = new uint8[ROM_SIZE]; - actual = read(rom_fd, (void *)rom_tmp, ROM_SIZE); - close(rom_fd); - - // Decode Mac ROM - if (!DecodeROM(rom_tmp, actual)) { - if (rom_size != 4*1024*1024) { - ErrorAlert(GetString(STR_ROM_SIZE_ERR)); - return false; - } else { - ErrorAlert(GetString(STR_ROM_FILE_READ_ERR)); - return false; - } - } - delete[] rom_tmp; - return true; -} - -static bool install_signal_handlers(void) -{ - char str[256]; -#if !EMULATED_PPC - // Create and install stacks for signal handlers - sig_stack.ss_sp = malloc(SIG_STACK_SIZE); - D(bug("Signal stack at %p\n", sig_stack.ss_sp)); - if (sig_stack.ss_sp == NULL) { - ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR)); - return false; - } - sig_stack.ss_flags = 0; - sig_stack.ss_size = SIG_STACK_SIZE; - if (sigaltstack(&sig_stack, NULL) < 0) { - sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno)); - ErrorAlert(str); - return false; - } - extra_stack.ss_sp = malloc(SIG_STACK_SIZE); - D(bug("Extra stack at %p\n", extra_stack.ss_sp)); - if (extra_stack.ss_sp == NULL) { - ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR)); - return false; - } - extra_stack.ss_flags = 0; - extra_stack.ss_size = SIG_STACK_SIZE; - - // Install SIGSEGV and SIGBUS handlers - sigemptyset(&sigsegv_action.sa_mask); // Block interrupts during SEGV handling - sigaddset(&sigsegv_action.sa_mask, SIGUSR2); - sigsegv_action.sa_sigaction = sigsegv_handler; - sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO; -#ifdef HAVE_SIGNAL_SA_RESTORER - sigsegv_action.sa_restorer = NULL; -#endif - if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno)); - ErrorAlert(str); - return false; - } - if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGBUS", strerror(errno)); - ErrorAlert(str); - return false; - } -#else - // Install SIGSEGV handler for CPU emulator - if (!sigsegv_install_handler(sigsegv_handler)) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno)); - ErrorAlert(str); - return false; - } -#endif - return true; -} - -#ifdef USE_SDL -static bool init_sdl() -{ - int sdl_flags = 0; -#ifdef USE_SDL_VIDEO - sdl_flags |= SDL_INIT_VIDEO; -#endif -#ifdef USE_SDL_AUDIO - sdl_flags |= SDL_INIT_AUDIO; -#endif - assert(sdl_flags != 0); - -#ifdef USE_SDL_VIDEO - // Don't let SDL block the screensaver - setenv("SDL_VIDEO_ALLOW_SCREENSAVER", "1", true); - - // Make SDL pass through command-clicks and option-clicks unaltered - setenv("SDL_HAS3BUTTONMOUSE", "1", true); -#endif - - if (SDL_Init(sdl_flags) == -1) { - char str[256]; - sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError()); - ErrorAlert(str); - return false; - } - atexit(SDL_Quit); - - // Don't let SDL catch SIGINT and SIGTERM signals - signal(SIGINT, SIG_DFL); - signal(SIGTERM, SIG_DFL); - return true; -} -#endif - -int main(int argc, char **argv) -{ - char str[256]; - bool memory_mapped_from_zero, ram_rom_areas_contiguous; - const char *vmdir = NULL; - - // Initialize variables - RAMBase = 0; - tzset(); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - -#if !EMULATED_PPC -#ifdef SYSTEM_CLOBBERS_R2 - // Get TOC pointer - TOC = get_r2(); -#endif -#ifdef SYSTEM_CLOBBERS_R13 - // Get r13 register - R13 = get_r13(); -#endif -#endif - - // Parse command line arguments - for (int i=1; i i) { - k -= i; - for (int j=i+k; jed; - KernelDataAddr = KERNEL_DATA_BASE; - D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE)); - D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed))); - - // Create area for DR Cache - if (vm_mac_acquire_fixed(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) { - sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - dr_emulator_area_mapped = true; - if (vm_mac_acquire_fixed(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) { - sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - dr_cache_area_mapped = true; -#if !EMULATED_PPC - if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) { - sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } -#endif - DRCacheAddr = DR_CACHE_BASE; - D(bug("DR Cache at %p\n", DRCacheAddr)); - - // Create area for SheepShaver data - if (!SheepMem::Init()) { - sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize"); - if (RAMSize < 8*1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; - } - memory_mapped_from_zero = false; - ram_rom_areas_contiguous = false; -#if REAL_ADDRESSING && HAVE_LINKER_SCRIPT - if (vm_mac_acquire_fixed(0, RAMSize) == 0) { - D(bug("Could allocate RAM from 0x0000\n")); - RAMBase = 0; - RAMBaseHost = Mac2HostAddr(RAMBase); - memory_mapped_from_zero = true; - } -#endif - if (!memory_mapped_from_zero) { -#ifndef PAGEZERO_HACK - // Create Low Memory area (0x0000..0x3000) - if (vm_mac_acquire_fixed(0, 0x3000) < 0) { - sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - lm_area_mapped = true; -#endif -#if REAL_ADDRESSING - // Allocate RAM at any address. Since ROM must be higher than RAM, allocate the RAM - // and ROM areas contiguously, plus a little extra to allow for ROM address alignment. - RAMBaseHost = vm_mac_acquire(RAMSize + ROM_AREA_SIZE + ROM_ALIGNMENT); - if (RAMBaseHost == VM_MAP_FAILED) { - sprintf(str, GetString(STR_RAM_ROM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - RAMBase = Host2MacAddr(RAMBaseHost); - ROMBase = (RAMBase + RAMSize + ROM_ALIGNMENT -1) & -ROM_ALIGNMENT; - ROMBaseHost = Mac2HostAddr(ROMBase); - ram_rom_areas_contiguous = true; -#else - if (vm_mac_acquire_fixed(RAM_BASE, RAMSize) < 0) { - sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - RAMBase = RAM_BASE; - RAMBaseHost = Mac2HostAddr(RAMBase); -#endif - } -#if !EMULATED_PPC - if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) { - sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } -#endif - ram_area_mapped = true; - D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase)); - - if (RAMBase > KernelDataAddr) { - ErrorAlert(GetString(STR_RAM_AREA_TOO_HIGH_ERR)); - goto quit; - } - - // Create area for Mac ROM - if (!ram_rom_areas_contiguous) { - if (vm_mac_acquire_fixed(ROM_BASE, ROM_AREA_SIZE) < 0) { - sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - ROMBase = ROM_BASE; - ROMBaseHost = Mac2HostAddr(ROMBase); - } -#if !EMULATED_PPC - if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) { - sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } -#endif - rom_area_mapped = true; - D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROMBase)); - - if (RAMBase > ROMBase) { - ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR)); - goto quit; - } - - // Load Mac ROM - if (!load_mac_rom()) - goto quit; - - // Initialize everything - if (!InitAll(vmdir)) - goto quit; - D(bug("Initialization complete\n")); - - // Clear caches (as we loaded and patched code) and write protect ROM -#if !EMULATED_PPC - flush_icache_range(ROMBase, ROMBase + ROM_AREA_SIZE); -#endif - vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE); - - // Start 60Hz thread - tick_thread_cancel = false; - tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0); - D(bug("Tick thread installed (%ld)\n", tick_thread)); - - // Start NVRAM watchdog thread - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - nvram_thread_cancel = false; - nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0); - D(bug("NVRAM thread installed (%ld)\n", nvram_thread)); - -#if !EMULATED_PPC - // Install SIGILL handler - sigemptyset(&sigill_action.sa_mask); // Block interrupts during ILL handling - sigaddset(&sigill_action.sa_mask, SIGUSR2); - sigill_action.sa_sigaction = sigill_handler; - sigill_action.sa_flags = SA_ONSTACK | SA_SIGINFO; -#ifdef HAVE_SIGNAL_SA_RESTORER - sigill_action.sa_restorer = NULL; -#endif - if (sigaction(SIGILL, &sigill_action, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGILL", strerror(errno)); - ErrorAlert(str); - goto quit; - } -#endif - -#if !EMULATED_PPC - // Install interrupt signal handler - sigemptyset(&sigusr2_action.sa_mask); - sigusr2_action.sa_sigaction = sigusr2_handler_init; - sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO; -#ifdef HAVE_SIGNAL_SA_RESTORER - sigusr2_action.sa_restorer = NULL; -#endif - if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGUSR2", strerror(errno)); - ErrorAlert(str); - goto quit; - } -#endif - - // Get my thread ID and execute MacOS thread function - emul_thread = pthread_self(); - D(bug("MacOS thread is %ld\n", emul_thread)); - emul_func(NULL); - -quit: - Quit(); - return 0; -} - - -/* - * Cleanup and quit - */ - -static void Quit(void) -{ -#if EMULATED_PPC - // Exit PowerPC emulation - exit_emul_ppc(); -#endif - - // Stop 60Hz thread - if (tick_thread_active) { - tick_thread_cancel = true; - pthread_cancel(tick_thread); - pthread_join(tick_thread, NULL); - } - - // Stop NVRAM watchdog thread - if (nvram_thread_active) { - nvram_thread_cancel = true; - pthread_cancel(nvram_thread); - pthread_join(nvram_thread, NULL); - } - -#if !EMULATED_PPC - // Uninstall SIGSEGV and SIGBUS handlers - sigemptyset(&sigsegv_action.sa_mask); - sigsegv_action.sa_handler = SIG_DFL; - sigsegv_action.sa_flags = 0; - sigaction(SIGSEGV, &sigsegv_action, NULL); - sigaction(SIGBUS, &sigsegv_action, NULL); - - // Uninstall SIGILL handler - sigemptyset(&sigill_action.sa_mask); - sigill_action.sa_handler = SIG_DFL; - sigill_action.sa_flags = 0; - sigaction(SIGILL, &sigill_action, NULL); - - // Delete stacks for signal handlers - if (sig_stack.ss_sp) - free(sig_stack.ss_sp); - if (extra_stack.ss_sp) - free(extra_stack.ss_sp); -#endif - - // Deinitialize everything - ExitAll(); - - // Delete SheepShaver globals - SheepMem::Exit(); - - // Delete RAM area - if (ram_area_mapped) - vm_mac_release(RAMBase, RAMSize); - - // Delete ROM area - if (rom_area_mapped) - vm_mac_release(ROMBase, ROM_AREA_SIZE); - - // Delete DR cache areas - if (dr_emulator_area_mapped) - vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE); - if (dr_cache_area_mapped) - vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE); - - // Delete Low Memory area - if (lm_area_mapped) - vm_mac_release(0, 0x3000); - - // Close /dev/zero - if (zero_fd > 0) - close(zero_fd); - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - -#ifdef ENABLE_MON - // Exit mon - mon_exit(); -#endif - - // Close X11 server connection -#ifndef USE_SDL_VIDEO - if (x_display) - XCloseDisplay(x_display); -#endif - - // Notify GUI we are about to leave - if (gui_connection) { - if (rpc_method_invoke(gui_connection, RPC_METHOD_EXIT, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) - rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID); - } - - exit(0); -} - - -/* - * Initialize Kernel Data segments - */ - -static bool kernel_data_init(void) -{ - int error_string = STR_KD_SHMGET_ERR; - uint32 kernel_area_size = (KERNEL_AREA_SIZE + SHMLBA - 1) & -SHMLBA; - int kernel_area = shmget(IPC_PRIVATE, kernel_area_size, 0600); - if (kernel_area != -1) { - bool mapped = - shm_map_address(kernel_area, KERNEL_DATA_BASE & -SHMLBA) && - shm_map_address(kernel_area, KERNEL_DATA2_BASE & -SHMLBA); - - // Mark the shared memory segment for removal. This is safe to do - // because the deletion is not performed while the memory is still - // mapped and so will only be done once the process exits. - shmctl(kernel_area, IPC_RMID, NULL); - if (mapped) - return true; - - error_string = STR_KD_SHMAT_ERR; - } - - char str[256]; - sprintf(str, GetString(error_string), strerror(errno)); - ErrorAlert(str); - return false; -} - - -/* - * Maps the memory identified by kernel_area at the specified addr - */ - -static bool shm_map_address(int kernel_area, uint32 addr) -{ - void *kernel_addr = Mac2HostAddr(addr); - return shmat(kernel_area, kernel_addr, 0) == kernel_addr; -} - - -/* - * Jump into Mac ROM, start 680x0 emulator - */ - -#if EMULATED_PPC -void jump_to_rom(uint32 entry) -{ - init_emul_ppc(); - emul_ppc(entry); -} -#endif - - -/* - * Emulator thread function - */ - -static void *emul_func(void *arg) -{ - // We're now ready to receive signals - ready_for_signals = true; - - // Decrease priority, so more time-critical things like audio will work better - nice(1); - - // Jump to ROM boot routine - D(bug("Jumping to ROM\n")); -#if EMULATED_PPC - jump_to_rom(ROMBase + 0x310000); -#else - jump_to_rom(ROMBase + 0x310000, (uint32)emulator_data); -#endif - D(bug("Returned from ROM\n")); - - // We're no longer ready to receive signals - ready_for_signals = false; - return NULL; -} - - -#if !EMULATED_PPC -/* - * Execute 68k subroutine (must be ended with RTS) - * This must only be called by the emul_thread when in EMUL_OP mode - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68k(uint32 pc, M68kRegisters *r) -{ -#if SAFE_EXEC_68K - if (ReadMacInt32(XLM_RUN_MODE) != MODE_EMUL_OP) - printf("FATAL: Execute68k() not called from EMUL_OP mode\n"); - if (!pthread_equal(pthread_self(), emul_thread)) - printf("FATAL: Execute68k() not called from emul_thread\n"); -#endif - execute_68k(pc, r); -} - - -/* - * Execute 68k A-Trap from EMUL_OP routine - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68kTrap(uint16 trap, M68kRegisters *r) -{ - uint16 proc[2] = {trap, M68K_RTS}; - Execute68k((uint32)proc, r); -} -#endif - - -/* - * Quit emulator (cause return from jump_to_rom) - */ - -void QuitEmulator(void) -{ -#if EMULATED_PPC - Quit(); -#else - quit_emulator(); -#endif -} - - -/* - * Dump 68k registers - */ - -void Dump68kRegs(M68kRegisters *r) -{ - // Display 68k registers - for (int i=0; i<8; i++) { - printf("d%d: %08x", i, r->d[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } - for (int i=0; i<8; i++) { - printf("a%d: %08x", i, r->a[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } -} - - -/* - * Make code executable - */ - -void MakeExecutable(int dummy, uint32 start, uint32 length) -{ - if ((start >= ROMBase) && (start < (ROMBase + ROM_SIZE))) - return; -#if EMULATED_PPC - FlushCodeCache(start, start + length); -#else - flush_icache_range(start, start + length); -#endif -} - - -/* - * NVRAM watchdog thread (saves NVRAM every minute) - */ - -static void nvram_watchdog(void) -{ - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } -} - -static void *nvram_func(void *arg) -{ - while (!nvram_thread_cancel) { - for (int i=0; i<60 && !nvram_thread_cancel; i++) - Delay_usec(999999); // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true - nvram_watchdog(); - } - return NULL; -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -static void *tick_func(void *arg) -{ - int tick_counter = 0; - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec(); - - while (!tick_thread_cancel) { - - // Wait - next += 16625; - int64 delay = next - GetTicks_usec(); - if (delay > 0) - Delay_usec(delay); - else if (delay < -16625) - next = GetTicks_usec(); - ticks++; - -#if !EMULATED_PPC - // Did we crash? - if (emul_thread_fatal) { - - // Yes, dump registers - sigregs *r = &sigsegv_regs; - char str[256]; - if (crash_reason == NULL) - crash_reason = "SIGSEGV"; - sprintf(str, "%s\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx \n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - crash_reason, - r->nip, r->link, r->ctr, r->msr, - r->xer, r->ccr, - r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3], - r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7], - r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11], - r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15], - r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19], - r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23], - r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27], - r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]); - printf(str); - VideoQuitFullScreen(); - -#ifdef ENABLE_MON - // Start up mon in real-mode - printf("Welcome to the sheep factory.\n"); - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif - return NULL; - } -#endif - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - } - - // Trigger 60Hz interrupt - if (ReadMacInt32(XLM_IRQ_NEST) == 0) { - SetInterruptFlag(INTFLAG_VIA); - TriggerInterrupt(); - } - } - - uint64 end = GetTicks_usec(); - D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return NULL; -} - - -/* - * Pthread configuration - */ - -void Set_pthread_attr(pthread_attr_t *attr, int priority) -{ -#ifdef HAVE_PTHREADS - pthread_attr_init(attr); -#if defined(_POSIX_THREAD_PRIORITY_SCHEDULING) - // Some of these only work for superuser - if (geteuid() == 0) { - pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED); - pthread_attr_setschedpolicy(attr, SCHED_FIFO); - struct sched_param fifo_param; - fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) + - sched_get_priority_max(SCHED_FIFO)) / 2 + - priority); - pthread_attr_setschedparam(attr, &fifo_param); - } - if (pthread_attr_setscope(attr, PTHREAD_SCOPE_SYSTEM) != 0) { -#ifdef PTHREAD_SCOPE_BOUND_NP - // If system scope is not available (eg. we're not running - // with CAP_SCHED_MGT capability on an SGI box), try bound - // scope. It exposes pthread scheduling to the kernel, - // without setting realtime priority. - pthread_attr_setscope(attr, PTHREAD_SCOPE_BOUND_NP); -#endif - } -#endif -#endif -} - - -/* - * Mutexes - */ - -#ifdef HAVE_PTHREADS - -struct B2_mutex { - B2_mutex() { - pthread_mutexattr_t attr; - pthread_mutexattr_init(&attr); - // Initialize the mutex for priority inheritance -- - // required for accurate timing. -#if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__) - pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT); -#endif -#if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL) - pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_NORMAL); -#endif -#ifdef HAVE_PTHREAD_MUTEXATTR_SETPSHARED - pthread_mutexattr_setpshared(&attr, PTHREAD_PROCESS_PRIVATE); -#endif - pthread_mutex_init(&m, &attr); - pthread_mutexattr_destroy(&attr); - } - ~B2_mutex() { - pthread_mutex_trylock(&m); // Make sure it's locked before - pthread_mutex_unlock(&m); // unlocking it. - pthread_mutex_destroy(&m); - } - pthread_mutex_t m; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ - pthread_mutex_lock(&mutex->m); -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ - pthread_mutex_unlock(&mutex->m); -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - -#else - -struct B2_mutex { - int dummy; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - -#endif - - -/* - * Trigger signal USR2 from another thread - */ - -#if !EMULATED_PPC -void TriggerInterrupt(void) -{ - if (ready_for_signals) { - idle_resume(); - pthread_kill(emul_thread, SIGUSR2); - } -} -#endif - - -/* - * Interrupt flags (must be handled atomically!) - */ - -volatile uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - atomic_or((int *)&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - atomic_and((int *)&InterruptFlags, ~flag); -} - - -/* - * Disable interrupts - */ - -void DisableInterrupt(void) -{ -#if EMULATED_PPC - WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1); -#else - atomic_add((int *)XLM_IRQ_NEST, 1); -#endif -} - - -/* - * Enable interrupts - */ - -void EnableInterrupt(void) -{ -#if EMULATED_PPC - WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1); -#else - atomic_add((int *)XLM_IRQ_NEST, -1); -#endif -} - - -/* - * USR2 handler - */ - -#if !EMULATED_PPC -void sigusr2_handler(int sig, siginfo_t *sip, void *scp) -{ - machine_regs *r = MACHINE_REGISTERS(scp); - -#ifdef SYSTEM_CLOBBERS_R2 - // Restore pointer to Thread Local Storage - set_r2(TOC); -#endif -#ifdef SYSTEM_CLOBBERS_R13 - // Restore pointer to .sdata section - set_r13(R13); -#endif - -#ifdef USE_SDL_VIDEO - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); -#endif - - // Do nothing if interrupts are disabled - if (*(int32 *)XLM_IRQ_NEST > 0) - return; - - // Disable MacOS stack sniffer - WriteMacInt32(0x110, 0); - - // Interrupt action depends on current run mode - switch (ReadMacInt32(XLM_RUN_MODE)) { - case MODE_68K: - // 68k emulator active, trigger 68k interrupt level 1 - WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1); - r->cr() |= ntohl(kernel_data->v[0x674 >> 2]); - break; - -#if INTERRUPTS_IN_NATIVE_MODE - case MODE_NATIVE: - // 68k emulator inactive, in nanokernel? - if (r->gpr(1) != KernelDataAddr) { - - // Set extra stack for SIGSEGV handler - sigaltstack(&extra_stack, NULL); - - // Prepare for 68k interrupt level 1 - WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1); - WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2])); - - // Execute nanokernel interrupt routine (this will activate the 68k emulator) - DisableInterrupt(); - if (ROMType == ROMTYPE_NEWWORLD) - ppc_interrupt(ROMBase + 0x312b1c, KernelDataAddr); - else - ppc_interrupt(ROMBase + 0x312a3c, KernelDataAddr); - - // Reset normal stack - sigaltstack(&sig_stack, NULL); - } - break; -#endif - -#if INTERRUPTS_IN_EMUL_OP_MODE - case MODE_EMUL_OP: - // 68k emulator active, within EMUL_OP routine, execute 68k interrupt routine directly when interrupt level is 0 - if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) { - - // Set extra stack for SIGSEGV handler - sigaltstack(&extra_stack, NULL); -#if 1 - // Execute full 68k interrupt routine - M68kRegisters r; - uint32 old_r25 = ReadMacInt32(XLM_68K_R25); // Save interrupt level - WriteMacInt32(XLM_68K_R25, 0x21); // Execute with interrupt level 1 - static const uint16 proc[] = { - 0x3f3c, 0x0000, // move.w #$0000,-(sp) (fake format word) - 0x487a, 0x000a, // pea @1(pc) (return address) - 0x40e7, // move sr,-(sp) (saved SR) - 0x2078, 0x0064, // move.l $64,a0 - 0x4ed0, // jmp (a0) - M68K_RTS // @1 - }; - Execute68k((uint32)proc, &r); - WriteMacInt32(XLM_68K_R25, old_r25); // Restore interrupt level -#else - // Only update cursor - if (HasMacStarted()) { - if (InterruptFlags & INTFLAG_VIA) { - ClearInterruptFlag(INTFLAG_VIA); - ADBInterrupt(); - ExecuteNative(NATIVE_VIDEO_VBL); - } - } -#endif - // Reset normal stack - sigaltstack(&sig_stack, NULL); - } - break; -#endif - } -} -#endif - - -/* - * SIGSEGV handler - */ - -#if !EMULATED_PPC -static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) -{ - machine_regs *r = MACHINE_REGISTERS(scp); - - // Get effective address - uint32 addr = r->dar(); - -#ifdef SYSTEM_CLOBBERS_R2 - // Restore pointer to Thread Local Storage - set_r2(TOC); -#endif -#ifdef SYSTEM_CLOBBERS_R13 - // Restore pointer to .sdata section - set_r13(R13); -#endif - -#if ENABLE_VOSF - // Handle screen fault -#if SIGSEGV_CHECK_VERSION(1,0,0) - sigsegv_info_t si; - si.addr = (sigsegv_address_t)addr; - si.pc = (sigsegv_address_t)r->pc(); -#endif - extern bool Screen_fault_handler(sigsegv_info_t *sip); - if (Screen_fault_handler(&si)) - return; -#endif - - // Fault in Mac ROM or RAM or DR Cache? - bool mac_fault = (r->pc() >= ROMBase) && (r->pc() < (ROMBase + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize)) || (r->pc() >= DR_CACHE_BASE && r->pc() < (DR_CACHE_BASE + DR_CACHE_SIZE)); - if (mac_fault) { - - // "VM settings" during MacOS 8 installation - if (r->pc() == ROMBase + 0x488160 && r->gpr(20) == 0xf8000000) { - r->pc() += 4; - r->gpr(8) = 0; - return; - - // MacOS 8.5 installation - } else if (r->pc() == ROMBase + 0x488140 && r->gpr(16) == 0xf8000000) { - r->pc() += 4; - r->gpr(8) = 0; - return; - - // MacOS 8 serial drivers on startup - } else if (r->pc() == ROMBase + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) { - r->pc() += 4; - r->gpr(8) = 0; - return; - - // MacOS 8.1 serial drivers on startup - } else if (r->pc() == ROMBase + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) { - r->pc() += 4; - return; - } else if (r->pc() == ROMBase + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) { - r->pc() += 4; - return; - - // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM) - } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) { - r->pc() += 4; - return; - } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) { - r->pc() += 4; - return; - } - - // Get opcode and divide into fields - uint32 opcode = *((uint32 *)r->pc()); - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - int32 imm = (int16)(opcode & 0xffff); - - // Analyze opcode - enum { - TYPE_UNKNOWN, - TYPE_LOAD, - TYPE_STORE - } transfer_type = TYPE_UNKNOWN; - enum { - SIZE_UNKNOWN, - SIZE_BYTE, - SIZE_HALFWORD, - SIZE_WORD - } transfer_size = SIZE_UNKNOWN; - enum { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX - } addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; -#if EMULATE_UNALIGNED_LOADSTORE_MULTIPLE - case 46: // lmw - if ((addr % 4) != 0) { - uint32 ea = addr; - D(bug("WARNING: unaligned lmw to EA=%08x from IP=%08x\n", ea, r->pc())); - for (int i = rd; i <= 31; i++) { - r->gpr(i) = ReadMacInt32(ea); - ea += 4; - } - r->pc() += 4; - goto rti; - } - break; - case 47: // stmw - if ((addr % 4) != 0) { - uint32 ea = addr; - D(bug("WARNING: unaligned stmw to EA=%08x from IP=%08x\n", ea, r->pc())); - for (int i = rd; i <= 31; i++) { - WriteMacInt32(ea, r->gpr(i)); - ea += 4; - } - r->pc() += 4; - goto rti; - } - break; -#endif - } - - // Ignore ROM writes (including to the zero page, which is read-only) - if (transfer_type == TYPE_STORE && - ((addr >= ROMBase && addr < ROMBase + ROM_SIZE) || - (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) { -// D(bug("WARNING: %s write access to ROM at %08lx, pc %08lx\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc())); - if (addr_mode == MODE_U || addr_mode == MODE_UX) - r->gpr(ra) = addr; - r->pc() += 4; - goto rti; - } - - // Ignore illegal memory accesses? - if (PrefsFindBool("ignoresegv")) { - if (addr_mode == MODE_U || addr_mode == MODE_UX) - r->gpr(ra) = addr; - if (transfer_type == TYPE_LOAD) - r->gpr(rd) = 0; - r->pc() += 4; - goto rti; - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - char str[256]; - if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE) - sprintf(str, GetString(STR_MEM_ACCESS_ERR), transfer_size == SIZE_BYTE ? "byte" : transfer_size == SIZE_HALFWORD ? "halfword" : "word", transfer_type == TYPE_LOAD ? GetString(STR_MEM_ACCESS_READ) : GetString(STR_MEM_ACCESS_WRITE), addr, r->pc(), r->gpr(24), r->gpr(1)); - else - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger (sort of...) - crash_reason = (sig == SIGBUS) ? "SIGBUS" : "SIGSEGV"; - if (!ready_for_signals) { - printf("%s\n"); - printf(" sigcontext %p, machine_regs %p\n", scp, r); - printf( - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx \n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - crash_reason, - r->pc(), r->lr(), r->ctr(), r->msr(), - r->xer(), r->cr(), - r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3), - r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7), - r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11), - r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15), - r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19), - r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23), - r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27), - r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31)); - exit(1); - QuitEmulator(); - return; - } else { - // We crashed. Save registers, tell tick thread and loop forever - build_sigregs(&sigsegv_regs, r); - emul_thread_fatal = true; - for (;;) ; - } -rti:; -} - - -/* - * SIGILL handler - */ - -static void sigill_handler(int sig, siginfo_t *sip, void *scp) -{ - machine_regs *r = MACHINE_REGISTERS(scp); - char str[256]; - -#ifdef SYSTEM_CLOBBERS_R2 - // Restore pointer to Thread Local Storage - set_r2(TOC); -#endif -#ifdef SYSTEM_CLOBBERS_R13 - // Restore pointer to .sdata section - set_r13(R13); -#endif - - // Fault in Mac ROM or RAM? - bool mac_fault = (r->pc() >= ROMBase) && (r->pc() < (ROMBase + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize)); - if (mac_fault) { - - // Get opcode and divide into fields - uint32 opcode = *((uint32 *)r->pc()); - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - int32 imm = (int16)(opcode & 0xffff); - - switch (primop) { - case 9: // POWER instructions - case 22: -power_inst: sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc(), r->gpr(1), opcode); - ErrorAlert(str); - QuitEmulator(); - return; - - case 31: - switch (exop) { - case 83: // mfmsr - r->gpr(rd) = 0xf072; - r->pc() += 4; - goto rti; - - case 210: // mtsr - case 242: // mtsrin - case 306: // tlbie - r->pc() += 4; - goto rti; - - case 339: { // mfspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc() += 4; - goto rti; - case 25: // SDR1 - r->gpr(rd) = 0xdead001f; - r->pc() += 4; - goto rti; - case 287: // PVR - r->gpr(rd) = PVR; - r->pc() += 4; - goto rti; - } - break; - } - - case 467: { // mtspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 275: // SPRG3 - case 528: // IBAT0U - case 529: // IBAT0L - case 530: // IBAT1U - case 531: // IBAT1L - case 532: // IBAT2U - case 533: // IBAT2L - case 534: // IBAT3U - case 535: // IBAT3L - case 536: // DBAT0U - case 537: // DBAT0L - case 538: // DBAT1U - case 539: // DBAT1L - case 540: // DBAT2U - case 541: // DBAT2L - case 542: // DBAT3U - case 543: // DBAT3L - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc() += 4; - goto rti; - } - break; - } - - case 29: case 107: case 152: case 153: // POWER instructions - case 184: case 216: case 217: case 248: - case 264: case 277: case 331: case 360: - case 363: case 488: case 531: case 537: - case 541: case 664: case 665: case 696: - case 728: case 729: case 760: case 920: - case 921: case 952: - goto power_inst; - } - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger (sort of...) - crash_reason = "SIGILL"; - if (!ready_for_signals) { - printf("%s\n"); - printf(" sigcontext %p, machine_regs %p\n", scp, r); - printf( - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx \n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - crash_reason, - r->pc(), r->lr(), r->ctr(), r->msr(), - r->xer(), r->cr(), - r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3), - r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7), - r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11), - r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15), - r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19), - r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23), - r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27), - r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31)); - exit(1); - QuitEmulator(); - return; - } else { - // We crashed. Save registers, tell tick thread and loop forever - build_sigregs(&sigsegv_regs, r); - emul_thread_fatal = true; - for (;;) ; - } -rti:; -} -#endif - - -/* - * Helpers to share 32-bit addressable data with MacOS - */ - -bool SheepMem::Init(void) -{ - // Size of a native page - page_size = getpagesize(); - - // Allocate SheepShaver globals - proc = base; - if (vm_mac_acquire_fixed(base, size) < 0) - return false; - - // Allocate page with all bits set to 0, right in the middle - // This is also used to catch undesired overlaps between proc and data areas - zero_page = proc + (size / 2); - Mac_memset(zero_page, 0, page_size); - if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0) - return false; - -#if EMULATED_PPC - // Allocate alternate stack for PowerPC interrupt routine - sig_stack = base + size; - if (vm_mac_acquire_fixed(sig_stack, SIG_STACK_SIZE) < 0) - return false; -#endif - - data = base + size; - return true; -} - -void SheepMem::Exit(void) -{ - if (data) { - // Delete SheepShaver globals - vm_mac_release(base, size); - -#if EMULATED_PPC - // Delete alternate stack for PowerPC interrupt routine - vm_mac_release(sig_stack, SIG_STACK_SIZE); -#endif - } -} - - -/* - * Display alert - */ - -#ifdef ENABLE_GTK -static void dl_destroyed(void) -{ - gtk_main_quit(); -} - -static void dl_quit(GtkWidget *dialog) -{ - gtk_widget_destroy(dialog); -} - -void display_alert(int title_id, int prefix_id, int button_id, const char *text) -{ - char str[256]; - sprintf(str, GetString(prefix_id), text); - - GtkWidget *dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); - - GtkWidget *label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); - - gtk_main(); -} -#endif - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (gui_connection) { - if (rpc_method_invoke(gui_connection, RPC_METHOD_ERROR_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR && - rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) - return; - } -#if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - VideoQuitFullScreen(); - display_alert(STR_ERROR_ALERT_TITLE, STR_GUI_ERROR_PREFIX, STR_QUIT_BUTTON, text); -#else - printf(GetString(STR_SHELL_ERROR_PREFIX), text); -#endif -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (gui_connection) { - if (rpc_method_invoke(gui_connection, RPC_METHOD_WARNING_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR && - rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) - return; - } -#if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - display_alert(STR_WARNING_ALERT_TITLE, STR_GUI_WARNING_PREFIX, STR_OK_BUTTON, text); -#else - printf(GetString(STR_SHELL_WARNING_PREFIX), text); -#endif -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return false; //!! -} diff --git a/SheepShaver/src/Unix/mkinstalldirs b/SheepShaver/src/Unix/mkinstalldirs deleted file mode 100755 index 6b3b5fc5d..000000000 --- a/SheepShaver/src/Unix/mkinstalldirs +++ /dev/null @@ -1,40 +0,0 @@ -#! /bin/sh -# mkinstalldirs --- make directory hierarchy -# Author: Noah Friedman -# Created: 1993-05-16 -# Public domain - -# $Id$ - -errstatus=0 - -for file -do - set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` - shift - - pathcomp= - for d - do - pathcomp="$pathcomp$d" - case "$pathcomp" in - -* ) pathcomp=./$pathcomp ;; - esac - - if test ! -d "$pathcomp"; then - echo "mkdir $pathcomp" - - mkdir "$pathcomp" || lasterr=$? - - if test ! -d "$pathcomp"; then - errstatus=$lasterr - fi - fi - - pathcomp="$pathcomp/" - done -done - -exit $errstatus - -# mkinstalldirs ends here diff --git a/SheepShaver/src/Unix/paranoia.cpp b/SheepShaver/src/Unix/paranoia.cpp deleted file mode 100644 index da18ad1e4..000000000 --- a/SheepShaver/src/Unix/paranoia.cpp +++ /dev/null @@ -1,346 +0,0 @@ -/* - * paranoia.cpp - Check undocumented features of the underlying - * kernel that SheepShaver relies upon - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * TODO - * - Check for nested signal handlers vs. sigaltstack() - */ - -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "sigregs.h" -#include "main.h" -#include "user_strings.h" - -#define DEBUG 1 -#include "debug.h" - - -// Constants -const uint32 SIG_STACK_SIZE = 0x10000; // Size of signal stack - -// Prototypes -extern "C" void *get_sp(void); -extern "C" void *get_r2(void); -extern "C" void set_r2(void *); -extern "C" void *get_r13(void); -extern "C" void set_r13(void *); -extern void paranoia_check(void); -static void sigusr2_handler(int sig, siginfo_t *sip, void *scp); -static void *tick_func(void *); -static void *emul_func(void *); - -// Global variables -static void *sig_stack = NULL; - -static int err = 0; -static void *sig_sp = NULL; -static void *sig_r5 = NULL; -static int sig_sc_signal = 0; -static void *sig_sc_regs = NULL; -static uint32 sig_r2 = 0; - -static pthread_t tick_thread; -static pthread_t emul_thread; -static volatile uint32 tick_thread_ready = 0; -static volatile uint32 emul_thread_regs[32] = { 0, }; -static volatile uint32 &emul_thread_ready = emul_thread_regs[0]; - - -void paranoia_check(void) -{ - char str[256]; - - printf("Paranoia checks...\n"); - - // Create and install stack for signal handler - sig_stack = malloc(SIG_STACK_SIZE); - if (sig_stack == NULL) { - ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR)); - exit(1); - } - - stack_t old_stack; - stack_t new_stack; - new_stack.ss_sp = (char *)sig_stack; - new_stack.ss_flags = 0; - new_stack.ss_size = SIG_STACK_SIZE; - if (sigaltstack(&new_stack, &old_stack) < 0) { - sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno)); - ErrorAlert(str); - exit(1); - } - - // Install SIGUSR2 signal handler - static struct sigaction old_action; - static struct sigaction sigusr2_action; - sigemptyset(&sigusr2_action.sa_mask); - sigusr2_action.sa_sigaction = sigusr2_handler; - sigusr2_action.sa_flags = SA_SIGINFO | SA_ONSTACK | SA_RESTART; - if (sigaction(SIGUSR2, &sigusr2_action, &old_action) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGUSR2", strerror(errno)); - ErrorAlert(str); - exit(1); - } - - // Start tick thread that will trigger only one SIGUSR2 - pthread_create(&tick_thread, NULL, tick_func, NULL); - - // Get my thread ID and execute MacOS thread function - emul_thread = pthread_self(); - emul_func(NULL); - - // Check error code - switch (err) { - case 1: - printf("FATAL: sigaltstack() doesn't seem to work (sp in signal handler was %p, expected %p..%p)\n", sig_sp, sig_stack, (uintptr)sig_stack + SIG_STACK_SIZE); - break; - case 2: - printf("FATAL: r5 in signal handler (%p) doesn't point to stack\n", sig_r5); - break; - case 3: - printf("FATAL: machine registers in signal handler (%p) doesn't point to stack\n", sig_sc_regs); - break; - case 4: - printf("FATAL: register file in signal handler is corrupted\n"); - break; - } - if (err) { - printf("Maybe you need a different kernel?\n"); - exit(1); - } - - // Clean up - printf("...passed\n"); - sigaction(SIGUSR2, &old_action, NULL); - sigaltstack(&old_stack, NULL); - free(sig_stack); -} - -static void *tick_func(void *) -{ - tick_thread_ready = true; - - // Wait for emul thread to initialize - D(bug("[tick_thread] waiting for emul thread to initialize\n")); - while (!emul_thread_ready) - usleep(0); - - // Trigger interrupt and terminate - D(bug("[tick_thread] trigger interrupt\n")); - pthread_kill(emul_thread, SIGUSR2); - return NULL; -} - -static void *emul_func(void *) -{ - // Wait for tick thread to initialize - D(bug("[emul_thread] waiting for tick thread to initialize\n")); - while (!tick_thread_ready) - usleep(0); - - // Fill in register and wait for an interrupt from the tick thread - D(bug("[emul_thread] filling in registers and waiting for interrupt\n")); -#if defined(__APPLE__) && defined(__MACH__) -#define REG(n) "r" #n -#else -#define REG(n) #n -#endif - asm volatile ("stw " REG(2) ",2*4(%0)\n" - "mr " REG(2) ",%0\n" -#define SAVE_REG(n) \ - "stw " REG(n) "," #n "*4(" REG(2) ")\n" \ - "addi " REG(n) "," REG(2) ","#n"\n" - SAVE_REG(1) - SAVE_REG(3) - SAVE_REG(4) - SAVE_REG(5) - SAVE_REG(6) - SAVE_REG(7) - SAVE_REG(8) - SAVE_REG(9) - SAVE_REG(10) - SAVE_REG(11) - SAVE_REG(12) - SAVE_REG(13) - SAVE_REG(14) - SAVE_REG(15) - SAVE_REG(16) - SAVE_REG(17) - SAVE_REG(18) - SAVE_REG(19) - SAVE_REG(20) - SAVE_REG(21) - SAVE_REG(22) - SAVE_REG(23) - SAVE_REG(24) - SAVE_REG(25) - SAVE_REG(26) - SAVE_REG(27) - SAVE_REG(28) - SAVE_REG(29) - SAVE_REG(30) - SAVE_REG(31) -#undef SAVE_REG - " li " REG(0) ",1\n" - " stw " REG(0) ",0(" REG(2) ")\n" // regs[0] == emul_thread_ready - "0: lwz " REG(0) ",0(" REG(2) ")\n" - " cmpi 0," REG(0) ",0\n" - " bne+ 0b\n" -#define LOAD_REG(n) \ - "lwz " REG(n) "," #n "*4(" REG(2) ")\n" - LOAD_REG(1) - LOAD_REG(3) - LOAD_REG(4) - LOAD_REG(5) - LOAD_REG(6) - LOAD_REG(7) - LOAD_REG(8) - LOAD_REG(9) - LOAD_REG(10) - LOAD_REG(11) - LOAD_REG(12) - LOAD_REG(13) - LOAD_REG(14) - LOAD_REG(15) - LOAD_REG(16) - LOAD_REG(17) - LOAD_REG(18) - LOAD_REG(19) - LOAD_REG(20) - LOAD_REG(21) - LOAD_REG(22) - LOAD_REG(23) - LOAD_REG(24) - LOAD_REG(25) - LOAD_REG(26) - LOAD_REG(27) - LOAD_REG(28) - LOAD_REG(29) - LOAD_REG(30) - LOAD_REG(31) - LOAD_REG(2) -#undef LOAD_REG - : : "r" ((uintptr)&emul_thread_regs[0]) : "r0"); -#undef REG -} - - -void sigusr2_handler(int sig, siginfo_t *sip, void *scp) -{ - machine_regs *r = MACHINE_REGISTERS(scp); - -#ifdef SYSTEM_CLOBBERS_R2 - // Restore pointer to Thread Local Storage - set_r2(TOC); -#endif - -#ifdef SYSTEM_CLOBBERS_R13 - // Restore pointer to .sdata section - set_r13(R13); -#endif - - ucontext_t *ucp = (ucontext_t *)scp; - D(bug("SIGUSR2 caught\n")); - - // Check whether sigaltstack works - sig_sp = get_sp(); - if (sig_sp < sig_stack || sig_sp >= ((uint8 *)sig_stack + SIG_STACK_SIZE)) { - err = 1; - goto ret; - } - - // Check whether r5 points to info on the stack - sig_r5 = ucp; - if (sig_r5 < sig_stack || sig_r5 >= ((uint8 *)sig_stack + SIG_STACK_SIZE)) { - err = 2; - goto ret; - } - - // Check whether context regs points to info on the stack - sig_sc_regs = &r->gpr(0); - if (sig_sc_regs < sig_stack || sig_sc_regs >= ((uint8 *)sig_stack + SIG_STACK_SIZE)) { - err = 3; - goto ret; - } - - // Check whether registers still hold the values we set them to - for (int n = 0; n < 32; n++) { - uint32 expected = (uintptr)&emul_thread_regs[0]; - if (n == 0) - expected = 1; - else if (n != 2) - expected += n; - if (r->gpr(n) != expected) { - D(bug("Register corruption: r%d was %08x, expected %08x\n", n, r->gpr(n), expected)); - err = 4; - goto ret; - } - } - - ret: - // Tell emul_func() to exit - emul_thread_ready = false; -} - - -#ifdef TEST -void *TOC; -void *R13; - -extern "C" void EmulOp(void *r, uint32 pc, int selector); -void EmulOp(void *r, uint32 pc, int selector) -{ -} - -extern "C" void check_load_invoc(uint32 type, int16 id, uint32 h); -void check_load_invoc(uint32 type, int16 id, uint32 h) -{ -} - -void ErrorAlert(const char *text) -{ - printf(GetString(STR_SHELL_ERROR_PREFIX), text); -} - -int main(void) -{ -#ifdef SYSTEM_CLOBBERS_R2 - // Get TOC pointer - TOC = get_r2(); -#endif - -#ifdef SYSTEM_CLOBBERS_R13 - // Get r13 register - R13 = get_r13(); -#endif - - // Check some things - paranoia_check(); -} -#endif diff --git a/SheepShaver/src/Unix/posix_sem.cpp b/SheepShaver/src/Unix/posix_sem.cpp deleted file mode 120000 index f530e6dbb..000000000 --- a/SheepShaver/src/Unix/posix_sem.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/posix_sem.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/ppc_asm.S b/SheepShaver/src/Unix/ppc_asm.S deleted file mode 100644 index 8c1dfedeb..000000000 --- a/SheepShaver/src/Unix/ppc_asm.S +++ /dev/null @@ -1,932 +0,0 @@ -/* - * asm_linux.S - Assembly routines - * - * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig - * - * 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 -#include - -#define SAVE_FP_EXEC_68K 1 - - -/* - * void *get_sp(void) - Get stack pointer - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_sp) -C_SYMBOL_NAME(get_sp): - mr r3,r1 - blr - - -/* - * void *get_r2(void) - Get r2 - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_r2) -C_SYMBOL_NAME(get_r2): - mr r3,r2 - blr - - -/* - * void set_r2(void *val {r3}) - Set r2 - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(set_r2) -C_SYMBOL_NAME(set_r2): - mr r2,r3 - blr - - -/* - * void *get_r13(void) - Get r13 (small data pointer under Linux) - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_r13) -C_SYMBOL_NAME(get_r13): - mr r3,r13 - blr - -/* - * void set_r13(void *val {r3}) - Set r13 (small data pointer under Linux) - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(set_r13) -C_SYMBOL_NAME(set_r13): - mr r13,r3 - blr - - -/* - * void flush_icache_range(void *start {r3}, void *end {r3}) - Flush D and I cache - */ - -CACHE_LINE_SIZE = 32 -LG_CACHE_LINE_SIZE = 5 - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(flush_icache_range) -C_SYMBOL_NAME(flush_icache_range): - li r5,CACHE_LINE_SIZE-1 - andc r3,r3,r5 - subf r4,r3,r4 - add r4,r4,r5 - srwi. r4,r4,LG_CACHE_LINE_SIZE - beqlr - mtctr r4 - mr r6,r3 -1: dcbst 0,r3 - addi r3,r3,CACHE_LINE_SIZE - bdnz 1b - sync /* wait for dcbst's to get to ram */ - mtctr r4 -2: icbi 0,r6 - addi r6,r6,CACHE_LINE_SIZE - bdnz 2b - sync - isync - blr - - -/* - * long atomic_add(long *var{r3}, long add{r4}) - Atomic add operation - * long atomic_and(long *var{r3}, long and{r4}) - Atomic and operation - * long atomic_or(long *var{r3}, long or{r4}) - Atomic or operation - * int test_and_set(int *var{r3}, int val{r4}) - Atomic test-and-set - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(atomic_add) -C_SYMBOL_NAME(atomic_add): -0: dcbf 0,r3 - sync - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - isync - lwarx r5,0,r3 - add r0,r4,r5 - stwcx. r0,0,r3 - bne- 0b - mr r3,r5 - isync - blr - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(atomic_and) -C_SYMBOL_NAME(atomic_and): -0: dcbf 0,r3 - sync - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - isync - lwarx r5,0,r3 - and r0,r4,r5 - stwcx. r0,0,r3 - bne- 0b - mr r3,r5 - isync - blr - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(atomic_or) -C_SYMBOL_NAME(atomic_or): -0: dcbf 0,r3 - sync - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - isync - lwarx r5,0,r3 - or r0,r4,r5 - stwcx. r0,0,r3 - bne- 0b - mr r3,r5 - isync - blr - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(test_and_set) -C_SYMBOL_NAME(test_and_set): -0: dcbf 0,r3 - sync - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - ori r0,r0,1 - isync - lwarx r5,0,r3 - cmpi 0,r5,0x0000 - bne 1f - stwcx. r4,0,r3 - bne- 0b -1: isync - mr r3,r5 - blr - - -/* - * void quit_emulator(void) - Jump to XLM_EMUL_RETURN_PROC - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(quit_emulator) -C_SYMBOL_NAME(quit_emulator): - lwz r0,XLM_EMUL_RETURN_PROC(0) - mtlr r0 - blr - - -/* - * void jump_to_rom(uint32 entry {r3}, uint32 emulator_data {r4}) - Jump to Mac ROM - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(jump_to_rom) -C_SYMBOL_NAME(jump_to_rom): - // Create stack frame - mflr r0 - stw r0,4(r1) - stwu r1,-(20+19*4+18*8)(r1) // maintain 16 byte alignment - - // Save PowerPC registers - stmw r13,20(r1) - stfd f14,20+19*4+0*8(r1) - stfd f15,20+19*4+1*8(r1) - stfd f16,20+19*4+2*8(r1) - stfd f17,20+19*4+3*8(r1) - stfd f18,20+19*4+4*8(r1) - stfd f19,20+19*4+5*8(r1) - stfd f20,20+19*4+6*8(r1) - stfd f21,20+19*4+7*8(r1) - stfd f22,20+19*4+8*8(r1) - stfd f23,20+19*4+9*8(r1) - stfd f24,20+19*4+10*8(r1) - stfd f25,20+19*4+11*8(r1) - stfd f26,20+19*4+12*8(r1) - stfd f27,20+19*4+13*8(r1) - stfd f28,20+19*4+14*8(r1) - stfd f29,20+19*4+15*8(r1) - stfd f30,20+19*4+16*8(r1) - stfd f31,20+19*4+17*8(r1) - - // Move entry address to ctr - mtctr r3 - - // Skip over EMUL_RETURN routine and get its address - bl 1f - - - /* - * EMUL_RETURN: Returned from emulator - */ - - // Restore PowerPC registers - lwz r1,XLM_EMUL_RETURN_STACK(0) - RESTORE_SYSTEM_R2 - lmw r13,20(r1) - lfd f14,20+19*4+0*8(r1) - lfd f15,20+19*4+1*8(r1) - lfd f16,20+19*4+2*8(r1) - lfd f17,20+19*4+3*8(r1) - lfd f18,20+19*4+4*8(r1) - lfd f19,20+19*4+5*8(r1) - lfd f20,20+19*4+6*8(r1) - lfd f21,20+19*4+7*8(r1) - lfd f22,20+19*4+8*8(r1) - lfd f23,20+19*4+9*8(r1) - lfd f24,20+19*4+10*8(r1) - lfd f25,20+19*4+11*8(r1) - lfd f26,20+19*4+12*8(r1) - lfd f27,20+19*4+13*8(r1) - lfd f28,20+19*4+14*8(r1) - lfd f29,20+19*4+15*8(r1) - lfd f30,20+19*4+16*8(r1) - lfd f31,20+19*4+17*8(r1) - - // Exiting from 68k emulator - li r0,1 - stw r0,XLM_IRQ_NEST(0) - li r0,MODE_NATIVE - stw r0,XLM_RUN_MODE(0) - - // Return to caller of jump_to_rom() - lwz r0,20+19*4+18*8+4(r1) - mtlr r0 - addi r1,r1,20+19*4+18*8 - blr - - - // Save address of EMUL_RETURN routine for 68k emulator patch -1: mflr r0 - stw r0,XLM_EMUL_RETURN_PROC(0) - - // Skip over EXEC_RETURN routine and get its address - bl 2f - - - /* - * EXEC_RETURN: Returned from 68k routine executed with Execute68k() - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25(0) - - // Reentering EMUL_OP mode - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE(0) - - // Save 68k registers - lwz r4,48(r1) // Pointer to M68kRegisters - stw r8,0*4(r4) // d[0]...d[7] - stw r9,1*4(r4) - stw r10,2*4(r4) - stw r11,3*4(r4) - stw r12,4*4(r4) - stw r13,5*4(r4) - stw r14,6*4(r4) - stw r15,7*4(r4) - stw r16,8*4(r4) // a[0]..a[6] - stw r17,9*4(r4) - stw r18,10*4(r4) - stw r19,11*4(r4) - stw r20,12*4(r4) - stw r21,13*4(r4) - stw r22,14*4(r4) - - // Restore PowerPC registers - lmw r13,56(r1) -#if SAVE_FP_EXEC_68K - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) -#endif - - // Return to caller - lwz r0,52(r1) - mtcrf 0xff,r0 - lwz r0,56+19*4+18*8+4(r1) - mtlr r0 - addi r1,r1,56+19*4+18*8 - RESTORE_SYSTEM_R2 - RESTORE_SYSTEM_R13 - blr - - - // Save address of EXEC_RETURN routine for 68k emulator patch -2: mflr r0 - stw r0,XLM_EXEC_RETURN_PROC(0) - - // Skip over EMUL_BREAK/EMUL_OP routine and get its address - bl 3f - - - /* - * EMUL_BREAK/EMUL_OP: Execute native routine, selector in r5 (my own private mode switch) - * - * 68k registers are stored in a M68kRegisters struct on the stack - * which the native routine may read and modify - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25(0) - - // Entering EMUL_OP mode within 68k emulator - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE(0) - - // Create PowerPC stack frame, reserve space for M68kRegisters - mr r3,r1 - subi r1,r1,64 // Fake "caller" frame - rlwinm r1,r1,0,0,27 // Align stack - - mfcr r0 - rlwinm r0,r0,0,11,8 - stw r0,4(r1) - mfxer r0 - stw r0,16(r1) - stw r2,12(r1) - stwu r1,-(56+16*4+15*8)(r1) - - // Save 68k registers (M68kRegisters) - stw r8,56+0*4(r1) // d[0]..d[7] - stw r9,56+1*4(r1) - stw r10,56+2*4(r1) - stw r11,56+3*4(r1) - stw r12,56+4*4(r1) - stw r13,56+5*4(r1) - stw r14,56+6*4(r1) - stw r15,56+7*4(r1) - stw r16,56+8*4(r1) // a[0]..a[7] - stw r17,56+9*4(r1) - stw r18,56+10*4(r1) - stw r19,56+11*4(r1) - stw r20,56+12*4(r1) - stw r21,56+13*4(r1) - stw r22,56+14*4(r1) - stw r3,56+15*4(r1) - stfd f0,56+16*4+0*8(r1) - stfd f1,56+16*4+1*8(r1) - stfd f2,56+16*4+2*8(r1) - stfd f3,56+16*4+3*8(r1) - stfd f4,56+16*4+4*8(r1) - stfd f5,56+16*4+5*8(r1) - stfd f6,56+16*4+6*8(r1) - stfd f7,56+16*4+7*8(r1) - mffs f0 - stfd f8,56+16*4+8*8(r1) - stfd f9,56+16*4+9*8(r1) - stfd f10,56+16*4+10*8(r1) - stfd f11,56+16*4+11*8(r1) - stfd f12,56+16*4+12*8(r1) - stfd f13,56+16*4+13*8(r1) - stfd f0,56+16*4+14*8(r1) - - // Execute native routine - RESTORE_SYSTEM_R2 - RESTORE_SYSTEM_R13 - addi r3,r1,56 - mr r4,r24 - bl C_SYMBOL_NAME(EmulOp) - - // Restore 68k registers (M68kRegisters) - lwz r8,56+0*4(r1) // d[0]..d[7] - lwz r9,56+1*4(r1) - lwz r10,56+2*4(r1) - lwz r11,56+3*4(r1) - lwz r12,56+4*4(r1) - lwz r13,56+5*4(r1) - lwz r14,56+6*4(r1) - lwz r15,56+7*4(r1) - lwz r16,56+8*4(r1) // a[0]..a[7] - lwz r17,56+9*4(r1) - lwz r18,56+10*4(r1) - lwz r19,56+11*4(r1) - lwz r20,56+12*4(r1) - lwz r21,56+13*4(r1) - lwz r22,56+14*4(r1) - lwz r3,56+15*4(r1) - lfd f13,56+16*4+14*8(r1) - lfd f0,56+16*4+0*8(r1) - lfd f1,56+16*4+1*8(r1) - lfd f2,56+16*4+2*8(r1) - lfd f3,56+16*4+3*8(r1) - lfd f4,56+16*4+4*8(r1) - lfd f5,56+16*4+5*8(r1) - lfd f6,56+16*4+6*8(r1) - lfd f7,56+16*4+7*8(r1) - mtfsf 0xff,f13 - lfd f8,56+16*4+8*8(r1) - lfd f9,56+16*4+9*8(r1) - lfd f10,56+16*4+10*8(r1) - lfd f11,56+16*4+11*8(r1) - lfd f12,56+16*4+12*8(r1) - lfd f13,56+16*4+13*8(r1) - - // Delete PowerPC stack frame - lwz r2,56+16*4+15*8+12(r1) - lwz r0,56+16*4+15*8+16(r1) - mtxer r0 - lwz r0,56+16*4+15*8+4(r1) - mtcrf 0xff,r0 - mr r1,r3 - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE(0) - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute next 68k opcode - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - - // Save address of EMUL_BREAK/EMUL_OP routine for 68k emulator patch -3: mflr r0 - stw r0,XLM_EMUL_OP_PROC(0) - - // Save stack pointer for EMUL_RETURN - stw r1,XLM_EMUL_RETURN_STACK(0) - - // Preset registers for ROM boot routine - lis r3,ASM_HA16(C_SYMBOL_NAME(ROMBase)) // Pointer to ROM boot structure: - lwz r3,ASM_LO16(C_SYMBOL_NAME(ROMBase))(r3) // r3 = ROMBase + 0x30d000 - addis r3,r3,ASM_HA16(0x30d000) - addi r3,r3,ASM_LO16(0x30d000) - - // 68k emulator is now active - li r0,MODE_68K - stw r0,XLM_RUN_MODE(0) - - // Jump to ROM - bctr - - -/* - * void execute_68k(uint32 pc {r3}, M68kRegisters *r {r4}) - Execute 68k routine - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(execute_68k) -C_SYMBOL_NAME(execute_68k): - // Create MacOS stack frame - mflr r0 - stw r0,4(r1) - stwu r1,-(56+19*4+18*8)(r1) - mfcr r0 - stw r4,48(r1) // save pointer to M68kRegisters for EXEC_RETURN - stw r0,52(r1) // save CR - - // Save PowerPC registers - stmw r13,56(r1) -#if SAVE_FP_EXEC_68K - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) -#endif - - // Set up registers for 68k emulator - lwz r31,XLM_KERNEL_DATA(0) // Pointer to Kernel Data - addi r31,r31,0x1000 - li r0,0 - mtcrf 0xff,r0 - creqv 11,11,11 // Supervisor mode - lwz r8,0*4(r4) // d[0]..d[7] - lwz r9,1*4(r4) - lwz r10,2*4(r4) - lwz r11,3*4(r4) - lwz r12,4*4(r4) - lwz r13,5*4(r4) - lwz r14,6*4(r4) - lwz r15,7*4(r4) - lwz r16,8*4(r4) // a[0]..a[6] - lwz r17,9*4(r4) - lwz r18,10*4(r4) - lwz r19,11*4(r4) - lwz r20,12*4(r4) - lwz r21,13*4(r4) - lwz r22,14*4(r4) - li r23,0 - mr r24,r3 - lwz r25,XLM_68K_R25(0) // MSB of SR - li r26,0 - li r28,0 // VBR - lwz r29,0x74(r31) // Pointer to opcode table - lwz r30,0x78(r31) // Address of emulator - - // Push return address (points to EXEC_RETURN opcode) on stack - li r0,XLM_EXEC_RETURN_OPCODE - stwu r0,-4(r1) - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE(0) - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute 68k opcode - lha r27,0(r24) - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - -/* - * uint32 call_macos1(uint32 tvect{r3}, uint32 arg1{r4}) ... - Call MacOS routines - */ - -ASM_MACRO_START prolog - mflr r0 - stw r0,4(r1) - stwu r1,-64(r1) -ASM_MACRO_END - -ASM_MACRO_START epilog - lwz r0,64+4(r1) - mtlr r0 - addi r1,r1,64 - RESTORE_SYSTEM_R2 - RESTORE_SYSTEM_R13 - blr -ASM_MACRO_END - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos) -C_SYMBOL_NAME(call_macos): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos1) -C_SYMBOL_NAME(call_macos1): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos2) -C_SYMBOL_NAME(call_macos2): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos3) -C_SYMBOL_NAME(call_macos3): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - mr r5,r6 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos4) -C_SYMBOL_NAME(call_macos4): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - mr r5,r6 - mr r6,r7 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos5) -C_SYMBOL_NAME(call_macos5): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - mr r5,r6 - mr r6,r7 - mr r7,r8 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos6) -C_SYMBOL_NAME(call_macos6): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - mr r5,r6 - mr r6,r7 - mr r7,r8 - mr r8,r9 - bctrl - epilog - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(call_macos7) -C_SYMBOL_NAME(call_macos7): - prolog - lwz r0,0(r3) // Get routine address - lwz r2,4(r3) // Load TOC pointer - mtctr r0 - mr r3,r4 - mr r4,r5 - mr r5,r6 - mr r6,r7 - mr r7,r8 - mr r8,r9 - mr r9,r10 - bctrl - epilog - - -/* - * Native resource manager patches - */ - -ASM_MACRO_START do_get_resource ASM_MACRO_ARG0_DEF - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,ASM_MACRO_ARG0(0) - lwz r2,XLM_RES_LIB_TOC(0) - mtctr r0 - bctrl - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - RESTORE_SYSTEM_R2 - RESTORE_SYSTEM_R13 - lwz r3,56(r1) - lha r4,56+6(r1) - lwz r5,56+8(r1) - bl C_SYMBOL_NAME(check_load_invoc) - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -ASM_MACRO_END - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_resource) -C_SYMBOL_NAME(get_resource): - do_get_resource XLM_GET_RESOURCE - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_1_resource) -C_SYMBOL_NAME(get_1_resource): - do_get_resource XLM_GET_1_RESOURCE - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_ind_resource) -C_SYMBOL_NAME(get_ind_resource): - do_get_resource XLM_GET_IND_RESOURCE - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_1_ind_resource) -C_SYMBOL_NAME(get_1_ind_resource): - do_get_resource XLM_GET_1_IND_RESOURCE - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(r_get_resource) -C_SYMBOL_NAME(r_get_resource): - do_get_resource XLM_R_GET_RESOURCE - -ASM_MACRO_START do_get_named_resource ASM_MACRO_ARG0_DEF - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,ASM_MACRO_ARG0(0) - lwz r2,XLM_RES_LIB_TOC(0) - mtctr r0 - bctrl - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - RESTORE_SYSTEM_R2 - RESTORE_SYSTEM_R13 - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl C_SYMBOL_NAME(named_check_load_invoc) - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -ASM_MACRO_END - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_named_resource) -C_SYMBOL_NAME(get_named_resource): - do_get_named_resource XLM_GET_NAMED_RESOURCE - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_1_named_resource) -C_SYMBOL_NAME(get_1_named_resource): - do_get_named_resource XLM_GET_1_NAMED_RESOURCE - - -/* - * void ppc_interrupt(uint32 entry{r3}, uint32 kernel_data{r4}) - Execute PPC interrupt - */ - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(ppc_interrupt) -C_SYMBOL_NAME(ppc_interrupt): - mflr r0 - stw r0,4(r1) - stwu r1,-64(r1) - - // Get address of return routine - bl 1f - - // Return routine - lwz r0,64+4(r1) - mtlr r0 - addi r1,r1,64 - blr - - // Prepare registers for nanokernel interrupt routine -1: mtctr r1 - mr r1,r4 - stw r6,0x018(r1) - mfctr r6 - stw r6,0x004(r1) - lwz r6,0x65c(r1) - stw r7,0x13c(r6) - stw r8,0x144(r6) - stw r9,0x14c(r6) - stw r10,0x154(r6) - stw r11,0x15c(r6) - stw r12,0x164(r6) - stw r13,0x16c(r6) - - mflr r10 - mfcr r13 - lwz r7,0x660(r1) - mflr r12 - rlwimi. r7,r7,8,0,0 - li r11,0 - ori r11,r11,0xf072 // MSR (SRR1) - mtcrf 0x70,r11 - li r8,0 - - // Enter nanokernel - mtlr r3 - blr - - -/* - * Define signal handlers with alternate stack initialization magic - */ - -#define SIG_STACK_SIZE 0x10000 - -ASM_MACRO_START do_define_signal_handler \ - ASM_MACRO_ARG0_DEF /* name */ \ - ASM_MACRO_ARG1_DEF /* stack */ \ - ASM_MACRO_ARG2_DEF /* stack id */ \ - ASM_MACRO_ARG3_DEF /* signal handler */ - - // Alternate stack lower base for this signal handler - .lcomm ASM_MACRO_ARG1,SIG_STACK_SIZE,ASM_ALIGN_2(4) - ASM_TYPE(ASM_MACRO_ARG1,@object) - - // Represents the current nest level for this signal handler - // Note that in SheepShaver, SIGUSR2 signals are blocked while - // handling other signals so, it's unlikely we ever get a nest - // level greater than 1 - .lcomm ASM_MACRO_ARG2,4,ASM_ALIGN_2(2) - ASM_TYPE(ASM_MACRO_ARG2,@object) - - ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(ASM_MACRO_ARG0) -C_SYMBOL_NAME(ASM_MACRO_ARG0): - // Preserve args in scratch registers - mflr r14 - mr r15,r3 - mr r16,r4 - mr r17,r5 - mr r18,r1 - - // Atomically increase stack_id - lis r19,ASM_HA16(ASM_MACRO_ARG2) - la r19,ASM_LO16(ASM_MACRO_ARG2)(r19) - li r4,1 - mr r3,r19 - bl C_SYMBOL_NAME(atomic_add) - cmpwi r3,0 - bne- 1f - - // ID was 0, we can use the local stack - lis r9,ASM_HA16(ASM_MACRO_ARG1) - lis r3,(SIG_STACK_SIZE>>16) - la r9,ASM_LO16(ASM_MACRO_ARG1)(r9) - addi r3,r3,((SIG_STACK_SIZE&0xffff)-64) - add r1,r9,r3 - -1: // Invoke signal handler - stwu r1,-16(r1) - mr r3,r15 - mr r4,r16 - mr r5,r17 - bl C_SYMBOL_NAME(ASM_MACRO_ARG3) - addi r1,r1,16 - - // Atomically decrease stack id - mr r3,r19 - li r4,-1 - bl C_SYMBOL_NAME(atomic_add) - - // Restore kernel stack and return - mtlr r14 - mr r1,r18 - blr -ASM_MACRO_END - -#define DEFINE_SIGNAL_HANDLER(NAME) \ - do_define_signal_handler \ - NAME##_handler_init ASM_MACRO_ARG_SEP \ - NAME##_stack ASM_MACRO_ARG_SEP \ - NAME##_stack_id ASM_MACRO_ARG_SEP \ - NAME##_handler - -DEFINE_SIGNAL_HANDLER(sigusr2) diff --git a/SheepShaver/src/Unix/ppc_asm.tmpl b/SheepShaver/src/Unix/ppc_asm.tmpl deleted file mode 100644 index 75c038600..000000000 --- a/SheepShaver/src/Unix/ppc_asm.tmpl +++ /dev/null @@ -1,156 +0,0 @@ -/* Define usage of "reserved" registers */ -#if defined(__linux__) -#define SYSTEM_CLOBBERS_R2 1 /* Pointer to Thread Local Storage */ -#define SYSTEM_CLOBBERS_R13 1 /* Pointer to .sdata section */ -#endif - -#ifdef __ASSEMBLY__ -/* Helper macros */ -#ifdef SYSTEM_CLOBBERS_R2 -#define RESTORE_SYSTEM_R2 lwz r2,XLM_TOC(0) -#define SAVE_SYSTEM_R2 stw r2,XLM_TOC(0) -#else -#define RESTORE_SYSTEM_R2 -#define SAVE_SYSTEM_R2 -#endif -#ifdef SYSTEM_CLOBBERS_R13 -#define RESTORE_SYSTEM_R13 lwz r13,XLM_R13(0) -#define SAVE_SYSTEM_R13 stw r13,XLM_R13(0) -#else -#define RESTORE_SYSTEM_R13 -#define SAVE_SYSTEM_R13 -#endif - -/* Helper macros */ -#define xglue(x, y) x ## y -#define glue(x, y) xglue(x, y) - -/* Apple assembler perticularities */ -#if (defined(__APPLE__) && defined(__MACH__)) -#define C_SYMBOL_NAME(NAME) glue(_, NAME) -#define ASM_TYPE(NAME, TYPE) /* nothing */ -#define ASM_ALIGN_2(EXP) EXP -#define ASM_HA16(VAR) ha16(VAR) -#define ASM_LO16(VAR) lo16(VAR) -#define ASM_MACRO_END .endmacro -#define ASM_MACRO_ARG_SEP , -#define ASM_MACRO_ARG0_DEF /* nothing! */ -#define ASM_MACRO_ARG0 $0 -#define ASM_MACRO_ARG1_DEF /* nothing! */ -#define ASM_MACRO_ARG1 $1 -#define ASM_MACRO_ARG2_DEF /* nothing! */ -#define ASM_MACRO_ARG2 $2 -#define ASM_MACRO_ARG3_DEF /* nothing! */ -#define ASM_MACRO_ARG3 $3 -#endif - -/* Defaults for GNU assembler */ -#ifndef ASM_TYPE -#define ASM_TYPE(NAME, TYPE) .type NAME, TYPE -#endif -#ifndef ASM_ALIGN_2 -#define ASM_ALIGN_2(EXP) (1 << (EXP)) -#endif -#ifndef ASM_HA16 -#define ASM_HA16(VAR) VAR@ha -#endif -#ifndef ASM_LO16 -#define ASM_LO16(VAR) VAR@l -#endif -#ifndef ASM_MACRO_START -#define ASM_MACRO_START .macro -#endif -#ifndef ASM_MACRO_END -#define ASM_MACRO_END .endm -#endif -#ifndef ASM_MACRO_ARG_SEP -#define ASM_MACRO_ARG_SEP -#endif -#ifndef ASM_MACRO_ARG0_DEF -#define ASM_MACRO_ARG0_DEF __asm_macro_arg0 -#define ASM_MACRO_ARG0 \__asm_macro_arg0 -#define ASM_MACRO_ARG1_DEF , __asm_macro_arg1 -#define ASM_MACRO_ARG1 \__asm_macro_arg1 -#define ASM_MACRO_ARG2_DEF , __asm_macro_arg2 -#define ASM_MACRO_ARG2 \__asm_macro_arg2 -#define ASM_MACRO_ARG3_DEF , __asm_macro_arg3 -#define ASM_MACRO_ARG3 \__asm_macro_arg3 -#endif -#ifndef C_SYMBOL_NAME -#define C_SYMBOL_NAME(NAME) NAME -#endif -#ifndef ASM_GLOBAL_DIRECTIVE -#define ASM_GLOBAL_DIRECTIVE .globl -#endif - -/* Register names */ -#if defined(__linux__) || defined(__NetBSD__) -#define r0 0 -#define r1 1 -#define r2 2 -#define r3 3 -#define r4 4 -#define r5 5 -#define r6 6 -#define r7 7 -#define r8 8 -#define r9 9 -#define r10 10 -#define r11 11 -#define r12 12 -#define r13 13 -#define r14 14 -#define r15 15 -#define r16 16 -#define r17 17 -#define r18 18 -#define r19 19 -#define r20 20 -#define r21 21 -#define r22 22 -#define r23 23 -#define r24 24 -#define r25 25 -#define r26 26 -#define r27 27 -#define r28 28 -#define r29 29 -#define r30 30 -#define r31 31 -#endif - -#if defined(__linux__) || defined(__NetBSD__) -#define f0 0 -#define f1 1 -#define f2 2 -#define f3 3 -#define f4 4 -#define f5 5 -#define f6 6 -#define f7 7 -#define f8 8 -#define f9 9 -#define f10 10 -#define f11 11 -#define f12 12 -#define f13 13 -#define f14 14 -#define f15 15 -#define f16 16 -#define f17 17 -#define f18 18 -#define f19 19 -#define f20 20 -#define f21 21 -#define f22 22 -#define f23 23 -#define f24 24 -#define f25 25 -#define f26 26 -#define f27 27 -#define f28 28 -#define f29 29 -#define f30 30 -#define f31 31 -#endif -#endif diff --git a/SheepShaver/src/Unix/prefs_editor_gtk.cpp b/SheepShaver/src/Unix/prefs_editor_gtk.cpp deleted file mode 100644 index b092e8241..000000000 --- a/SheepShaver/src/Unix/prefs_editor_gtk.cpp +++ /dev/null @@ -1,1594 +0,0 @@ -/* - * prefs_editor_linux.cpp - Preferences editor, Linux implementation using GTK+ - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include - -#include "user_strings.h" -#include "version.h" -#include "cdrom.h" -#include "xpram.h" -#include "prefs.h" -#include "prefs_editor.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static GtkWidget *win; // Preferences window -static bool start_clicked = false; // Return value of PrefsEditor() function -static int screen_width, screen_height; // Screen dimensions - - -// Prototypes -static void create_volumes_pane(GtkWidget *top); -static void create_graphics_pane(GtkWidget *top); -static void create_input_pane(GtkWidget *top); -static void create_serial_pane(GtkWidget *top); -static void create_memory_pane(GtkWidget *top); -static void create_jit_pane(GtkWidget *top); -static void read_settings(void); - - -/* - * Utility functions - */ - -#if ! GLIB_CHECK_VERSION(2,0,0) -#define G_OBJECT(obj) GTK_OBJECT(obj) -#define g_object_get_data(obj, key) gtk_object_get_data((obj), (key)) -#define g_object_set_data(obj, key, data) gtk_object_set_data((obj), (key), (data)) -#endif - -struct opt_desc { - int label_id; - GtkSignalFunc func; -}; - -struct combo_desc { - int label_id; -}; - -struct file_req_assoc { - file_req_assoc(GtkWidget *r, GtkWidget *e) : req(r), entry(e) {} - GtkWidget *req; - GtkWidget *entry; -}; - -static void cb_browse_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (char *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_entry_set_text(GTK_ENTRY(assoc->entry), file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -static void cb_browse(GtkWidget *widget, void *user_data) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_BROWSE_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(cb_browse_ok), new file_req_assoc(req, (GtkWidget *)user_data)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -static GtkWidget *make_browse_button(GtkWidget *entry) -{ - GtkWidget *button; - - button = gtk_button_new_with_label(GetString(STR_BROWSE_CTRL)); - gtk_widget_show(button); - gtk_signal_connect(GTK_OBJECT(button), "clicked", (GtkSignalFunc)cb_browse, (void *)entry); - return button; -} - -static void add_menu_item(GtkWidget *menu, int label_id, GtkSignalFunc func) -{ - GtkWidget *item = gtk_menu_item_new_with_label(GetString(label_id)); - gtk_widget_show(item); - gtk_signal_connect(GTK_OBJECT(item), "activate", func, NULL); - gtk_menu_append(GTK_MENU(menu), item); -} - -static GtkWidget *make_pane(GtkWidget *notebook, int title_id) -{ - GtkWidget *frame, *label, *box; - - frame = gtk_frame_new(NULL); - gtk_container_border_width(GTK_CONTAINER(frame), 4); - - box = gtk_vbox_new(FALSE, 4); - gtk_container_set_border_width(GTK_CONTAINER(box), 4); - gtk_container_add(GTK_CONTAINER(frame), box); - - gtk_widget_show_all(frame); - - label = gtk_label_new(GetString(title_id)); - gtk_notebook_append_page(GTK_NOTEBOOK(notebook), frame, label); - return box; -} - -static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *buttons) -{ - GtkWidget *bb, *button; - - bb = gtk_hbutton_box_new(); - gtk_widget_show(bb); - gtk_container_set_border_width(GTK_CONTAINER(bb), border); - gtk_button_box_set_layout(GTK_BUTTON_BOX(bb), GTK_BUTTONBOX_DEFAULT_STYLE); - gtk_button_box_set_spacing(GTK_BUTTON_BOX(bb), 4); - gtk_box_pack_start(GTK_BOX(top), bb, FALSE, FALSE, 0); - - while (buttons->label_id) { - button = gtk_button_new_with_label(GetString(buttons->label_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", buttons->func, NULL); - gtk_box_pack_start(GTK_BOX(bb), button, TRUE, TRUE, 0); - buttons++; - } - return bb; -} - -static GtkWidget *make_separator(GtkWidget *top) -{ - GtkWidget *sep = gtk_hseparator_new(); - gtk_box_pack_start(GTK_BOX(top), sep, FALSE, FALSE, 0); - gtk_widget_show(sep); - return sep; -} - -static GtkWidget *make_table(GtkWidget *top, int x, int y) -{ - GtkWidget *table = gtk_table_new(x, y, FALSE); - gtk_widget_show(table); - gtk_box_pack_start(GTK_BOX(top), table, FALSE, FALSE, 0); - return table; -} - -static GtkWidget *table_make_option_menu(GtkWidget *table, int row, int label_id, const opt_desc *options, int active) -{ - GtkWidget *label, *opt, *menu; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - return menu; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, GList *glist) -{ - GtkWidget *label, *combo; - char str[32]; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), default_value); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - return combo; -} - -static GtkWidget *table_make_combobox(GtkWidget *table, int row, int label_id, const char *default_value, const combo_desc *options) -{ - GList *glist = NULL; - while (options->label_id) { - glist = g_list_append(glist, (void *)GetString(options->label_id)); - options++; - } - - return table_make_combobox(table, row, label_id, default_value, glist); -} - -static GtkWidget *table_make_file_entry(GtkWidget *table, int row, int label_id, const char *prefs_item, bool only_dirs = false) -{ - GtkWidget *box, *label, *entry, *button; - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, row, row + 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_table_attach(GTK_TABLE(table), box, 1, 2, row, row + 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - - entry = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_widget_show(entry); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - - button = make_browse_button(entry); - gtk_box_pack_start(GTK_BOX(box), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(entry), "chooser_button", button); - return entry; -} - -static GtkWidget *make_option_menu(GtkWidget *top, int label_id, const opt_desc *options, int active) -{ - GtkWidget *box, *label, *opt, *menu; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - - while (options->label_id) { - add_menu_item(menu, options->label_id, options->func); - options++; - } - gtk_menu_set_active(GTK_MENU(menu), active); - - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_box_pack_start(GTK_BOX(box), opt, FALSE, FALSE, 0); - return menu; -} - -static GtkWidget *make_entry(GtkWidget *top, int label_id, const char *prefs_item) -{ - GtkWidget *box, *label, *entry; - - box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_box_pack_start(GTK_BOX(top), box, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(label_id)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - - entry = gtk_entry_new(); - gtk_widget_show(entry); - const char *str = PrefsFindString(prefs_item); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); - return entry; -} - -static const gchar *get_file_entry_path(GtkWidget *entry) -{ - return gtk_entry_get_text(GTK_ENTRY(entry)); -} - -static GtkWidget *make_checkbox(GtkWidget *top, int label_id, const char *prefs_item, GtkSignalFunc func) -{ - GtkWidget *button = gtk_check_button_new_with_label(GetString(label_id)); - gtk_widget_show(button); - gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(button), PrefsFindBool(prefs_item)); - gtk_signal_connect(GTK_OBJECT(button), "toggled", func, button); - gtk_box_pack_start(GTK_BOX(top), button, FALSE, FALSE, 0); - return button; -} - -static GtkWidget *make_checkbox(GtkWidget *top, int label_id, bool active, GtkSignalFunc func) -{ - GtkWidget *button = gtk_check_button_new_with_label(GetString(label_id)); - gtk_widget_show(button); - gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(button), active); - gtk_signal_connect(GTK_OBJECT(button), "toggled", func, button); - gtk_box_pack_start(GTK_BOX(top), button, FALSE, FALSE, 0); - return button; -} - - -/* - * Show preferences editor - * Returns true when user clicked on "Start", false otherwise - */ - -// Window closed -static gint window_closed(void) -{ - return FALSE; -} - -// Window destroyed -static void window_destroyed(void) -{ - gtk_main_quit(); -} - -// "Start" button clicked -static void cb_start(...) -{ - start_clicked = true; - read_settings(); - SavePrefs(); - gtk_widget_destroy(win); -} - -// "Quit" button clicked -static void cb_quit(...) -{ - start_clicked = false; - gtk_widget_destroy(win); -} - -// "OK" button of "About" dialog clicked -static void dl_quit(GtkWidget *dialog) -{ - gtk_widget_destroy(dialog); -} - -// "About" selected -static void mn_about(...) -{ - GtkWidget *dialog, *label, *button; - - char str[512]; - sprintf(str, - "SheepShaver\nVersion %d.%d\n\n" - "Copyright (C) 1997-2008 Christian Bauer and Marc Hellwig\n" - "E-mail: cb@cebix.net\n" - "http://sheepshaver.cebix.net/\n\n" - "SheepShaver comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); -} - -// "Zap NVRAM" selected -static void mn_zap_pram(...) -{ - ZapPRAM(); -} - -// Menu item descriptions -static GtkItemFactoryEntry menu_items[] = { - {(gchar *)GetString(STR_PREFS_MENU_FILE_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_START_GTK), "S", GTK_SIGNAL_FUNC(cb_start), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_ZAP_PRAM_GTK), NULL, GTK_SIGNAL_FUNC(mn_zap_pram), 0, NULL}, - {(gchar *)GetString(STR_PREFS_ITEM_SEPL_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_PREFS_ITEM_QUIT_GTK), "Q", GTK_SIGNAL_FUNC(cb_quit), 0, NULL}, - {(gchar *)GetString(STR_HELP_MENU_GTK), NULL, NULL, 0, ""}, - {(gchar *)GetString(STR_HELP_ITEM_ABOUT_GTK), NULL, GTK_SIGNAL_FUNC(mn_about), 0, NULL} -}; - -bool PrefsEditor(void) -{ - // Get screen dimensions - screen_width = gdk_screen_width(); - screen_height = gdk_screen_height(); - - // Create window - win = gtk_window_new(GTK_WINDOW_TOPLEVEL); - gtk_window_set_title(GTK_WINDOW(win), GetString(STR_PREFS_TITLE)); - gtk_signal_connect(GTK_OBJECT(win), "delete_event", GTK_SIGNAL_FUNC(window_closed), NULL); - gtk_signal_connect(GTK_OBJECT(win), "destroy", GTK_SIGNAL_FUNC(window_destroyed), NULL); - - // Create window contents - GtkWidget *box = gtk_vbox_new(FALSE, 4); - gtk_widget_show(box); - gtk_container_add(GTK_CONTAINER(win), box); - - GtkAccelGroup *accel_group = gtk_accel_group_new(); - GtkItemFactory *item_factory = gtk_item_factory_new(GTK_TYPE_MENU_BAR, "

", accel_group); - gtk_item_factory_create_items(item_factory, sizeof(menu_items) / sizeof(menu_items[0]), menu_items, NULL); -#if GTK_CHECK_VERSION(1,3,15) - gtk_window_add_accel_group(GTK_WINDOW(win), accel_group); -#else - gtk_accel_group_attach(accel_group, GTK_OBJECT(win)); -#endif - GtkWidget *menu_bar = gtk_item_factory_get_widget(item_factory, "
"); - gtk_widget_show(menu_bar); - gtk_box_pack_start(GTK_BOX(box), menu_bar, FALSE, TRUE, 0); - - GtkWidget *notebook = gtk_notebook_new(); - gtk_notebook_set_tab_pos(GTK_NOTEBOOK(notebook), GTK_POS_TOP); - gtk_notebook_set_scrollable(GTK_NOTEBOOK(notebook), FALSE); - gtk_box_pack_start(GTK_BOX(box), notebook, TRUE, TRUE, 0); - gtk_widget_realize(notebook); - - create_volumes_pane(notebook); - create_graphics_pane(notebook); - create_input_pane(notebook); - create_serial_pane(notebook); - create_memory_pane(notebook); - create_jit_pane(notebook); - gtk_widget_show(notebook); - - static const opt_desc buttons[] = { - {STR_START_BUTTON, GTK_SIGNAL_FUNC(cb_start)}, - {STR_QUIT_BUTTON, GTK_SIGNAL_FUNC(cb_quit)}, - {0, NULL} - }; - make_button_box(box, 4, buttons); - - // Show window and enter main loop - gtk_widget_show(win); - gtk_main(); - return start_clicked; -} - - -/* - * "Volumes" pane - */ - -static GtkWidget *volume_list, *w_extfs; -static int selected_volume; - -// Volume in list selected -static void cl_selected(GtkWidget *list, int row, int column) -{ - selected_volume = row; -} - -// Volume selected for addition -static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - gtk_clist_append(GTK_CLIST(volume_list), &file); - gtk_widget_destroy(assoc->req); - delete assoc; -} - -// Volume selected for creation -static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ - gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); - - const gchar *str = gtk_entry_get_text(GTK_ENTRY(assoc->entry)); - int size = atoi(str); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", file, size); - int ret = system(cmd); - if (ret == 0) - gtk_clist_append(GTK_CLIST(volume_list), &file); - gtk_widget_destroy(GTK_WIDGET(assoc->req)); - delete assoc; -} - -// "Add Volume" button clicked -static void cb_add_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_ADD_VOLUME_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(add_volume_ok), new file_req_assoc(req, NULL)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Create Hardfile" button clicked -static void cb_create_volume(...) -{ - GtkWidget *req = gtk_file_selection_new(GetString(STR_CREATE_VOLUME_TITLE)); - - GtkWidget *box = gtk_hbox_new(FALSE, 4); - gtk_widget_show(box); - GtkWidget *label = gtk_label_new(GetString(STR_HARDFILE_SIZE_CTRL)); - gtk_widget_show(label); - GtkWidget *entry = gtk_entry_new(); - gtk_widget_show(entry); - char str[32]; - sprintf(str, "%d", 40); - gtk_entry_set_text(GTK_ENTRY(entry), str); - gtk_box_pack_start(GTK_BOX(box), label, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(box), entry, FALSE, FALSE, 0); - gtk_box_pack_start(GTK_BOX(GTK_FILE_SELECTION(req)->main_vbox), box, FALSE, FALSE, 0); - - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(create_volume_ok), new file_req_assoc(req, entry)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_widget_show(req); -} - -// "Remove Volume" button clicked -static void cb_remove_volume(...) -{ - gtk_clist_remove(GTK_CLIST(volume_list), selected_volume); -} - -// "Boot From" selected -static void mn_boot_any(...) {PrefsReplaceInt32("bootdriver", 0);} -static void mn_boot_cdrom(...) {PrefsReplaceInt32("bootdriver", CDROMRefNum);} - -// "No CD-ROM Driver" button toggled -static void tb_nocdrom(GtkWidget *widget) -{ - PrefsReplaceBool("nocdrom", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Read settings from widgets and set preferences -static void read_volumes_settings(void) -{ - while (PrefsFindString("disk")) - PrefsRemoveItem("disk"); - - for (int i=0; irows; i++) { - char *str; - gtk_clist_get_text(GTK_CLIST(volume_list), i, 0, &str); - PrefsAddString("disk", str); - } - - PrefsReplaceString("extfs", gtk_entry_get_text(GTK_ENTRY(w_extfs))); -} - -// Create "Volumes" pane -static void create_volumes_pane(GtkWidget *top) -{ - GtkWidget *box, *scroll, *menu; - - box = make_pane(top, STR_VOLUMES_PANE_TITLE); - - scroll = gtk_scrolled_window_new(NULL, NULL); - gtk_widget_show(scroll); - gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scroll), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - volume_list = gtk_clist_new(1); - gtk_widget_show(volume_list); - gtk_clist_set_selection_mode(GTK_CLIST(volume_list), GTK_SELECTION_SINGLE); - gtk_clist_set_shadow_type(GTK_CLIST(volume_list), GTK_SHADOW_NONE); - gtk_clist_set_reorderable(GTK_CLIST(volume_list), true); - gtk_signal_connect(GTK_OBJECT(volume_list), "select_row", GTK_SIGNAL_FUNC(cl_selected), NULL); - char *str; - int32 index = 0; - while ((str = (char *)PrefsFindString("disk", index++)) != NULL) - gtk_clist_append(GTK_CLIST(volume_list), &str); - gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(scroll), volume_list); - gtk_box_pack_start(GTK_BOX(box), scroll, TRUE, TRUE, 0); - selected_volume = 0; - - static const opt_desc buttons[] = { - {STR_ADD_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_add_volume)}, - {STR_CREATE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_create_volume)}, - {STR_REMOVE_VOLUME_BUTTON, GTK_SIGNAL_FUNC(cb_remove_volume)}, - {0, NULL}, - }; - make_button_box(box, 0, buttons); - make_separator(box); - - w_extfs = make_entry(box, STR_EXTFS_CTRL, "extfs"); - - static const opt_desc options[] = { - {STR_BOOT_ANY_LAB, GTK_SIGNAL_FUNC(mn_boot_any)}, - {STR_BOOT_CDROM_LAB, GTK_SIGNAL_FUNC(mn_boot_cdrom)}, - {0, NULL} - }; - int bootdriver = PrefsFindInt32("bootdriver"), active = 0; - switch (bootdriver) { - case 0: active = 0; break; - case CDROMRefNum: active = 1; break; - } - menu = make_option_menu(box, STR_BOOTDRIVER_CTRL, options, active); - - make_checkbox(box, STR_NOCDROM_CTRL, "nocdrom", GTK_SIGNAL_FUNC(tb_nocdrom)); -} - - -/* - * "JIT Compiler" pane - */ - -// Are we running a JIT capable CPU? -static bool is_jit_capable(void) -{ -#if USE_JIT - return true; -#elif defined __APPLE__ && defined __MACH__ - // XXX run-time detect so that we can use a PPC GUI prefs editor - static char cpu[10]; - if (cpu[0] == 0) { - FILE *fp = popen("uname -p", "r"); - if (fp == NULL) - return false; - fgets(cpu, sizeof(cpu) - 1, fp); - fclose(fp); - } - if (cpu[0] == 'i' && cpu[2] == '8' && cpu[3] == '6') // XXX assuming i?86 - return true; -#endif - return false; -} - -// Set sensitivity of widgets -static void set_jit_sensitive(void) -{ - const bool jit_enabled = PrefsFindBool("jit"); -} - -// "Use JIT Compiler" button toggled -static void tb_jit(GtkWidget *widget) -{ - PrefsReplaceBool("jit", GTK_TOGGLE_BUTTON(widget)->active); - set_jit_sensitive(); -} - -// Read settings from widgets and set preferences -static void read_jit_settings(void) -{ - bool jit_enabled = is_jit_capable() && PrefsFindBool("jit"); -} - -// "Use built-in 68k DR emulator" button toggled -static void tb_jit_68k(GtkWidget *widget) -{ - PrefsReplaceBool("jit68k", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Create "JIT Compiler" pane -static void create_jit_pane(GtkWidget *top) -{ - GtkWidget *box, *table, *label, *menu; - char str[32]; - - box = make_pane(top, STR_JIT_PANE_TITLE); - - if (is_jit_capable()) { - make_checkbox(box, STR_JIT_CTRL, "jit", GTK_SIGNAL_FUNC(tb_jit)); - set_jit_sensitive(); - } - - make_checkbox(box, STR_JIT_68K_CTRL, "jit68k", GTK_SIGNAL_FUNC(tb_jit_68k)); -} - - -/* - * "Graphics/Sound" pane - */ - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -static GtkWidget *w_frameskip, *w_display_x, *w_display_y; -static GtkWidget *l_frameskip, *l_display_x, *l_display_y; -static int display_type; -static int dis_width, dis_height; -static bool is_fbdev_dga_mode = false; - -static GtkWidget *w_dspdevice_file, *w_mixerdevice_file; - -// Hide/show graphics widgets -static void hide_show_graphics_widgets(void) -{ - switch (display_type) { - case DISPLAY_WINDOW: - gtk_widget_show(w_frameskip); gtk_widget_show(l_frameskip); - break; - case DISPLAY_SCREEN: - gtk_widget_hide(w_frameskip); gtk_widget_hide(l_frameskip); - break; - } -} - -// "Window" video type selected -static void mn_window(...) -{ - display_type = DISPLAY_WINDOW; - hide_show_graphics_widgets(); -} - -// "Fullscreen" video type selected -static void mn_fullscreen(...) -{ - display_type = DISPLAY_SCREEN; - hide_show_graphics_widgets(); -} - -// "5 Hz".."60Hz" selected -static void mn_5hz(...) {PrefsReplaceInt32("frameskip", 12);} -static void mn_7hz(...) {PrefsReplaceInt32("frameskip", 8);} -static void mn_10hz(...) {PrefsReplaceInt32("frameskip", 6);} -static void mn_15hz(...) {PrefsReplaceInt32("frameskip", 4);} -static void mn_30hz(...) {PrefsReplaceInt32("frameskip", 2);} -static void mn_60hz(...) {PrefsReplaceInt32("frameskip", 1);} - -// QuickDraw acceleration -static void tb_gfxaccel(GtkWidget *widget) -{ - PrefsReplaceBool("gfxaccel", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Set sensitivity of widgets -static void set_graphics_sensitive(void) -{ - const bool sound_enabled = !PrefsFindBool("nosound"); - gtk_widget_set_sensitive(w_dspdevice_file, sound_enabled); - gtk_widget_set_sensitive(w_mixerdevice_file, sound_enabled); -} - -// "Disable Sound Output" button toggled -static void tb_nosound(GtkWidget *widget) -{ - PrefsReplaceBool("nosound", GTK_TOGGLE_BUTTON(widget)->active); - set_graphics_sensitive(); -} - -// Read and convert graphics preferences -static void parse_graphics_prefs(void) -{ - display_type = DISPLAY_WINDOW; - dis_width = 640; - dis_height = 480; - - const char *str = PrefsFindString("screen"); - if (str) { - if (sscanf(str, "win/%d/%d", &dis_width, &dis_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) - display_type = DISPLAY_SCREEN; -#ifdef ENABLE_FBDEV_DGA - else if (sscanf(str, "fbdev/%d/%d", &dis_width, &dis_height) == 2) { - is_fbdev_dga_mode = true; - display_type = DISPLAY_SCREEN; - } -#endif - } - else { - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - if (screen_modes) { - display_type = DISPLAY_SCREEN; - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (modes[i].width <= screen_width && modes[i].height <= screen_height) { - dis_width = modes[i].width; - dis_height = modes[i].height; - } - } - } - } - else if (window_modes) { - display_type = DISPLAY_WINDOW; - if (window_modes & 1) - dis_width = 640, dis_height = 480; - if (window_modes & 2) - dis_width = 800, dis_height = 600; - } - } - if (dis_width == screen_width) - dis_width = 0; - if (dis_height == screen_height) - dis_height = 0; -} - -// Read settings from widgets and set preferences -static void read_graphics_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_display_x)); - dis_width = atoi(str); - - str = gtk_entry_get_text(GTK_ENTRY(w_display_y)); - dis_height = atoi(str); - - char pref[256]; - bool use_screen_mode = true; - switch (display_type) { - case DISPLAY_WINDOW: - sprintf(pref, "win/%d/%d", dis_width, dis_height); - break; - case DISPLAY_SCREEN: - sprintf(pref, "dga/%d/%d", dis_width, dis_height); - break; - default: - use_screen_mode = false; - PrefsRemoveItem("screen"); - return; - } - if (use_screen_mode) { - PrefsReplaceString("screen", pref); - // Old prefs are now migrated - PrefsRemoveItem("windowmodes"); - PrefsRemoveItem("screenmodes"); - } - - PrefsReplaceString("dsp", get_file_entry_path(w_dspdevice_file)); - PrefsReplaceString("mixer", get_file_entry_path(w_mixerdevice_file)); -} - -// Create "Graphics/Sound" pane -static void create_graphics_pane(GtkWidget *top) -{ - GtkWidget *box, *table, *label, *opt, *menu, *combo; - char str[32]; - - parse_graphics_prefs(); - - box = make_pane(top, STR_GRAPHICS_SOUND_PANE_TITLE); - table = make_table(box, 2, 4); - - label = gtk_label_new(GetString(STR_VIDEO_TYPE_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - opt = gtk_option_menu_new(); - gtk_widget_show(opt); - menu = gtk_menu_new(); - add_menu_item(menu, STR_WINDOW_CTRL, GTK_SIGNAL_FUNC(mn_window)); - add_menu_item(menu, STR_FULLSCREEN_CTRL, GTK_SIGNAL_FUNC(mn_fullscreen)); - switch (display_type) { - case DISPLAY_WINDOW: - gtk_menu_set_active(GTK_MENU(menu), 0); - break; - case DISPLAY_SCREEN: - gtk_menu_set_active(GTK_MENU(menu), 1); - break; - } - gtk_option_menu_set_menu(GTK_OPTION_MENU(opt), menu); - gtk_table_attach(GTK_TABLE(table), opt, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_frameskip = gtk_label_new(GetString(STR_FRAMESKIP_CTRL)); - gtk_widget_show(l_frameskip); - gtk_table_attach(GTK_TABLE(table), l_frameskip, 0, 1, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_frameskip = gtk_option_menu_new(); - gtk_widget_show(w_frameskip); - menu = gtk_menu_new(); - add_menu_item(menu, STR_REF_5HZ_LAB, GTK_SIGNAL_FUNC(mn_5hz)); - add_menu_item(menu, STR_REF_7_5HZ_LAB, GTK_SIGNAL_FUNC(mn_7hz)); - add_menu_item(menu, STR_REF_10HZ_LAB, GTK_SIGNAL_FUNC(mn_10hz)); - add_menu_item(menu, STR_REF_15HZ_LAB, GTK_SIGNAL_FUNC(mn_15hz)); - add_menu_item(menu, STR_REF_30HZ_LAB, GTK_SIGNAL_FUNC(mn_30hz)); - add_menu_item(menu, STR_REF_60HZ_LAB, GTK_SIGNAL_FUNC(mn_60hz)); - int frameskip = PrefsFindInt32("frameskip"); - int item = -1; - switch (frameskip) { - case 12: item = 0; break; - case 8: item = 1; break; - case 6: item = 2; break; - case 4: item = 3; break; - case 2: item = 4; break; - case 1: item = 5; break; - case 0: item = 5; break; - } - if (item >= 0) - gtk_menu_set_active(GTK_MENU(menu), item); - gtk_option_menu_set_menu(GTK_OPTION_MENU(w_frameskip), menu); - gtk_table_attach(GTK_TABLE(table), w_frameskip, 1, 2, 1, 2, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - - l_display_x = gtk_label_new(GetString(STR_DISPLAY_X_CTRL)); - gtk_widget_show(l_display_x); - gtk_table_attach(GTK_TABLE(table), l_display_x, 0, 1, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist1 = NULL; - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_512_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_640_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_800_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_1024_LAB)); - glist1 = g_list_append(glist1, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist1); - if (dis_width) - sprintf(str, "%d", dis_width); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 2, 3, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_x = GTK_COMBO(combo)->entry; - - l_display_y = gtk_label_new(GetString(STR_DISPLAY_Y_CTRL)); - gtk_widget_show(l_display_y); - gtk_table_attach(GTK_TABLE(table), l_display_y, 0, 1, 3, 4, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - GList *glist2 = NULL; - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_384_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_480_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_600_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_768_LAB)); - glist2 = g_list_append(glist2, (void *)GetString(STR_SIZE_MAX_LAB)); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist2); - if (dis_height) - sprintf(str, "%d", dis_height); - else - strcpy(str, GetString(STR_SIZE_MAX_LAB)); - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 3, 4, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); - w_display_y = GTK_COMBO(combo)->entry; - - make_checkbox(box, STR_GFXACCEL_CTRL, PrefsFindBool("gfxaccel"), GTK_SIGNAL_FUNC(tb_gfxaccel)); - - make_separator(box); - make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); - w_dspdevice_file = make_entry(box, STR_DSPDEVICE_FILE_CTRL, "dsp"); - w_mixerdevice_file = make_entry(box, STR_MIXERDEVICE_FILE_CTRL, "mixer"); - - set_graphics_sensitive(); - - hide_show_graphics_widgets(); -} - - -/* - * "Input" pane - */ - -static GtkWidget *w_keycode_file; -static GtkWidget *w_mouse_wheel_lines; - -// Set sensitivity of widgets -static void set_input_sensitive(void) -{ - const bool use_keycodes = PrefsFindBool("keycodes"); - gtk_widget_set_sensitive(w_keycode_file, use_keycodes); - gtk_widget_set_sensitive(GTK_WIDGET(g_object_get_data(G_OBJECT(w_keycode_file), "chooser_button")), use_keycodes); - gtk_widget_set_sensitive(w_mouse_wheel_lines, PrefsFindInt32("mousewheelmode") == 1); -} - -// "Use Raw Keycodes" button toggled -static void tb_keycodes(GtkWidget *widget) -{ - PrefsReplaceBool("keycodes", GTK_TOGGLE_BUTTON(widget)->active); - set_input_sensitive(); -} - -// "Mouse Wheel Mode" selected -static void mn_wheel_page(...) {PrefsReplaceInt32("mousewheelmode", 0); set_input_sensitive();} -static void mn_wheel_cursor(...) {PrefsReplaceInt32("mousewheelmode", 1); set_input_sensitive();} - -// Read settings from widgets and set preferences -static void read_input_settings(void) -{ - const char *str = get_file_entry_path(w_keycode_file); - if (str && strlen(str)) - PrefsReplaceString("keycodefile", str); - else - PrefsRemoveItem("keycodefile"); - - PrefsReplaceInt32("mousewheellines", gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(w_mouse_wheel_lines))); -} - -// Create "Input" pane -static void create_input_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *menu, *label, *button; - GtkObject *adj; - - box = make_pane(top, STR_INPUT_PANE_TITLE); - - make_checkbox(box, STR_KEYCODES_CTRL, "keycodes", GTK_SIGNAL_FUNC(tb_keycodes)); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_KEYCODES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - const char *str = PrefsFindString("keycodefile"); - if (str == NULL) - str = ""; - - w_keycode_file = gtk_entry_new(); - gtk_entry_set_text(GTK_ENTRY(w_keycode_file), str); - gtk_widget_show(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), w_keycode_file, TRUE, TRUE, 0); - - button = make_browse_button(w_keycode_file); - gtk_box_pack_start(GTK_BOX(hbox), button, FALSE, FALSE, 0); - g_object_set_data(G_OBJECT(w_keycode_file), "chooser_button", button); - - make_separator(box); - - static const opt_desc options[] = { - {STR_MOUSEWHEELMODE_PAGE_LAB, GTK_SIGNAL_FUNC(mn_wheel_page)}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, GTK_SIGNAL_FUNC(mn_wheel_cursor)}, - {0, NULL} - }; - int wheelmode = PrefsFindInt32("mousewheelmode"), active = 0; - switch (wheelmode) { - case 0: active = 0; break; - case 1: active = 1; break; - } - menu = make_option_menu(box, STR_MOUSEWHEELMODE_CTRL, options, active); - - hbox = gtk_hbox_new(FALSE, 4); - gtk_widget_show(hbox); - gtk_box_pack_start(GTK_BOX(box), hbox, FALSE, FALSE, 0); - - label = gtk_label_new(GetString(STR_MOUSEWHEELLINES_CTRL)); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0); - - adj = gtk_adjustment_new(PrefsFindInt32("mousewheellines"), 1, 1000, 1, 5, 0); - w_mouse_wheel_lines = gtk_spin_button_new(GTK_ADJUSTMENT(adj), 0.0, 0); - gtk_widget_show(w_mouse_wheel_lines); - gtk_box_pack_start(GTK_BOX(hbox), w_mouse_wheel_lines, FALSE, FALSE, 0); - - set_input_sensitive(); -} - - -/* - * "Serial/Network" pane - */ - -static GtkWidget *w_seriala, *w_serialb, *w_ether; - -// Read settings from widgets and set preferences -static void read_serial_settings(void) -{ - const char *str; - - str = gtk_entry_get_text(GTK_ENTRY(w_seriala)); - PrefsReplaceString("seriala", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_serialb)); - PrefsReplaceString("serialb", str); - - str = gtk_entry_get_text(GTK_ENTRY(w_ether)); - if (str && strlen(str)) - PrefsReplaceString("ether", str); - else - PrefsRemoveItem("ether"); -} - -// Add names of serial devices -static gint gl_str_cmp(gconstpointer a, gconstpointer b) -{ - return strcmp((char *)a, (char *)b); -} - -static GList *add_serial_names(void) -{ - GList *glist = NULL; - - // Search /dev for ttyS* and lp* - DIR *d = opendir("/dev"); - if (d) { - struct dirent *de; - while ((de = readdir(d)) != NULL) { -#if defined(__linux__) - if (strncmp(de->d_name, "ttyS", 4) == 0 || strncmp(de->d_name, "lp", 2) == 0) { -#elif defined(__FreeBSD__) - if (strncmp(de->d_name, "cuaa", 4) == 0 || strncmp(de->d_name, "lpt", 3) == 0) { -#elif defined(__NetBSD__) - if (strncmp(de->d_name, "tty0", 4) == 0 || strncmp(de->d_name, "lpt", 3) == 0) { -#elif defined(sgi) - if (strncmp(de->d_name, "ttyf", 4) == 0 || strncmp(de->d_name, "plp", 3) == 0) { -#else - if (false) { -#endif - char *str = new char[64]; - sprintf(str, "/dev/%s", de->d_name); - glist = g_list_append(glist, str); - } - } - closedir(d); - } - if (glist) - g_list_sort(glist, gl_str_cmp); - else - glist = g_list_append(glist, (void *)""); - return glist; -} - -// Add names of ethernet interfaces -static GList *add_ether_names(void) -{ - GList *glist = NULL; - - // Get list of all Ethernet interfaces - int s = socket(PF_INET, SOCK_DGRAM, 0); - if (s >= 0) { - char inbuf[8192]; - struct ifconf ifc; - ifc.ifc_len = sizeof(inbuf); - ifc.ifc_buf = inbuf; - if (ioctl(s, SIOCGIFCONF, &ifc) == 0) { - struct ifreq req, *ifr = ifc.ifc_req; - for (int i=0; iifr_name, 63); - glist = g_list_append(glist, str); - } - } - } - close(s); - } -#ifdef HAVE_SLIRP - static char s_slirp[] = "slirp"; - glist = g_list_append(glist, s_slirp); -#endif - if (glist) - g_list_sort(glist, gl_str_cmp); - else - glist = g_list_append(glist, (void *)""); - return glist; -} - -// Create "Serial/Network" pane -static void create_serial_pane(GtkWidget *top) -{ - GtkWidget *box, *table, *label, *combo; - GList *glist = add_serial_names(); - - box = make_pane(top, STR_SERIAL_NETWORK_PANE_TITLE); - table = make_table(box, 2, 3); - - label = gtk_label_new(GetString(STR_SERPORTA_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - const char *str = PrefsFindString("seriala"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 0, 1, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_seriala = GTK_COMBO(combo)->entry; - - label = gtk_label_new(GetString(STR_SERPORTB_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - str = PrefsFindString("serialb"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 1, 2, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_serialb = GTK_COMBO(combo)->entry; - - label = gtk_label_new(GetString(STR_ETHERNET_IF_CTRL)); - gtk_widget_show(label); - gtk_table_attach(GTK_TABLE(table), label, 0, 1, 2, 3, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - glist = add_ether_names(); - combo = gtk_combo_new(); - gtk_widget_show(combo); - gtk_combo_set_popdown_strings(GTK_COMBO(combo), glist); - str = PrefsFindString("ether"); - if (str == NULL) - str = ""; - gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), str); - gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 2, 3, (GtkAttachOptions)(GTK_FILL | GTK_EXPAND), (GtkAttachOptions)0, 4, 4); - w_ether = GTK_COMBO(combo)->entry; -} - - -/* - * "Memory/Misc" pane - */ - -static GtkWidget *w_ramsize; -static GtkWidget *w_rom_file; - -// Don't use CPU when idle? -static void tb_idlewait(GtkWidget *widget) -{ - PrefsReplaceBool("idlewait", GTK_TOGGLE_BUTTON(widget)->active); -} - -// "Ignore SEGV" button toggled -static void tb_ignoresegv(GtkWidget *widget) -{ - PrefsReplaceBool("ignoresegv", GTK_TOGGLE_BUTTON(widget)->active); -} - -// Read settings from widgets and set preferences -static void read_memory_settings(void) -{ - const char *str = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(w_ramsize)->entry)); - PrefsReplaceInt32("ramsize", atoi(str) << 20); - - str = gtk_entry_get_text(GTK_ENTRY(w_rom_file)); - if (str && strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); -} - -// Create "Memory/Misc" pane -static void create_memory_pane(GtkWidget *top) -{ - GtkWidget *box, *hbox, *table, *label, *menu; - - box = make_pane(top, STR_MEMORY_MISC_PANE_TITLE); - table = make_table(box, 2, 5); - - static const combo_desc options[] = { - STR_RAMSIZE_4MB_LAB, - STR_RAMSIZE_8MB_LAB, - STR_RAMSIZE_16MB_LAB, - STR_RAMSIZE_32MB_LAB, - STR_RAMSIZE_64MB_LAB, - STR_RAMSIZE_128MB_LAB, - STR_RAMSIZE_256MB_LAB, - STR_RAMSIZE_512MB_LAB, - STR_RAMSIZE_1024MB_LAB, - 0 - }; - char default_ramsize[16]; - sprintf(default_ramsize, "%d", PrefsFindInt32("ramsize") >> 20); - w_ramsize = table_make_combobox(table, 0, STR_RAMSIZE_CTRL, default_ramsize, options); - - w_rom_file = table_make_file_entry(table, 1, STR_ROM_FILE_CTRL, "rom"); - - make_checkbox(box, STR_IGNORESEGV_CTRL, "ignoresegv", GTK_SIGNAL_FUNC(tb_ignoresegv)); - make_checkbox(box, STR_IDLEWAIT_CTRL, "idlewait", GTK_SIGNAL_FUNC(tb_idlewait)); -} - - -/* - * Read settings from widgets and set preferences - */ - -static void read_settings(void) -{ - read_volumes_settings(); - read_graphics_settings(); - read_input_settings(); - read_serial_settings(); - read_memory_settings(); - read_jit_settings(); -} - - -#ifdef STANDALONE_GUI -#include -#include -#include "rpc.h" - -/* - * Fake unused data and functions - */ - -uint8 XPRAM[XPRAM_SIZE]; -void MountVolume(void *fh) { } -void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size) { } - -#if defined __APPLE__ && defined __MACH__ -void DarwinSysInit(void) { } -void DarwinSysExit(void) { } -void DarwinAddFloppyPrefs(void) { } -void DarwinAddSerialPrefs(void) { } -bool DarwinCDReadTOC(char *, uint8 *) { } -#endif - - -/* - * Display alert - */ - -static void dl_destroyed(void) -{ - gtk_main_quit(); -} - -static void display_alert(int title_id, int prefix_id, int button_id, const char *text) -{ - char str[256]; - sprintf(str, GetString(prefix_id), text); - - GtkWidget *dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); - - GtkWidget *label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); - - gtk_main(); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - display_alert(STR_ERROR_ALERT_TITLE, STR_GUI_ERROR_PREFIX, STR_QUIT_BUTTON, text); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - display_alert(STR_WARNING_ALERT_TITLE, STR_GUI_WARNING_PREFIX, STR_OK_BUTTON, text); -} - - -/* - * RPC handlers - */ - -static GMainLoop *g_gui_loop; - -static int handle_ErrorAlert(rpc_connection_t *connection) -{ - D(bug("handle_ErrorAlert\n")); - - int error; - char *str; - if ((error = rpc_method_get_args(connection, RPC_TYPE_STRING, &str, RPC_TYPE_INVALID)) < 0) - return error; - - ErrorAlert(str); - free(str); - return RPC_ERROR_NO_ERROR; -} - -static int handle_WarningAlert(rpc_connection_t *connection) -{ - D(bug("handle_WarningAlert\n")); - - int error; - char *str; - if ((error = rpc_method_get_args(connection, RPC_TYPE_STRING, &str, RPC_TYPE_INVALID)) < 0) - return error; - - WarningAlert(str); - free(str); - return RPC_ERROR_NO_ERROR; -} - -static int handle_Exit(rpc_connection_t *connection) -{ - D(bug("handle_Exit\n")); - - g_main_quit(g_gui_loop); - return RPC_ERROR_NO_ERROR; -} - - -/* - * SIGCHLD handler - */ - -static char g_app_path[PATH_MAX]; -static rpc_connection_t *g_gui_connection = NULL; - -static void sigchld_handler(int sig, siginfo_t *sip, void *) -{ - D(bug("Child %d exitted with status = %x\n", sip->si_pid, sip->si_status)); - - // XXX perform a new wait because sip->si_status is sometimes not - // the exit _value_ on MacOS X but rather the usual status field - // from waitpid() -- we could arrange this code in some other way... - int status; - if (waitpid(sip->si_pid, &status, 0) < 0) - status = sip->si_status; - if (WIFEXITED(status)) - status = WEXITSTATUS(status); - if (status & 0x80) - status |= -1 ^0xff; - - if (status < 0) { // negative -> execlp/-errno - char str[256]; - sprintf(str, GetString(STR_NO_B2_EXE_FOUND), g_app_path, strerror(-status)); - ErrorAlert(str); - status = 1; - } - - if (status != 0) { - if (g_gui_connection) - rpc_exit(g_gui_connection); - exit(status); - } -} - - -/* - * Start standalone GUI - */ - -int main(int argc, char *argv[]) -{ - // Init GTK - gtk_set_locale(); - gtk_init(&argc, &argv); - - // Read preferences - PrefsInit(0, argc, argv); - - // Show preferences editor - bool start = PrefsEditor(); - - // Exit preferences - PrefsExit(); - - // Transfer control to the executable - if (start) { - char gui_connection_path[64]; - sprintf(gui_connection_path, "/org/SheepShaver/GUI/%d", getpid()); - - // Catch exits from the child process - struct sigaction sigchld_sa, old_sigchld_sa; - sigemptyset(&sigchld_sa.sa_mask); - sigchld_sa.sa_sigaction = sigchld_handler; - sigchld_sa.sa_flags = SA_NOCLDSTOP | SA_SIGINFO; - if (sigaction(SIGCHLD, &sigchld_sa, &old_sigchld_sa) < 0) { - char str[256]; - sprintf(str, GetString(STR_SIG_INSTALL_ERR), SIGCHLD, strerror(errno)); - ErrorAlert(str); - return 1; - } - - // Search and run the SheepShaver executable - char *p; - strcpy(g_app_path, argv[0]); - if ((p = strstr(g_app_path, "SheepShaverGUI.app/Contents/MacOS")) != NULL) { - strcpy(p, "SheepShaver.app/Contents/MacOS/SheepShaver"); - if (access(g_app_path, X_OK) < 0) { - char str[256]; - sprintf(str, GetString(STR_NO_B2_EXE_FOUND), g_app_path, strerror(errno)); - WarningAlert(str); - strcpy(g_app_path, "/Applications/SheepShaver.app/Contents/MacOS/SheepShaver"); - } - } else { - p = strrchr(g_app_path, '/'); - p = p ? p + 1 : g_app_path; - strcpy(p, "SheepShaver"); - } - - int pid = fork(); - if (pid == 0) { - D(bug("Trying to execute %s\n", g_app_path)); - execlp(g_app_path, g_app_path, "--gui-connection", gui_connection_path, (char *)NULL); -#ifdef _POSIX_PRIORITY_SCHEDULING - // XXX get a chance to run the parent process so that to not confuse/upset GTK... - sched_yield(); -#endif - _exit(-errno); - } - - // Establish a connection to Basilisk II - if ((g_gui_connection = rpc_init_server(gui_connection_path)) == NULL) { - printf("ERROR: failed to initialize GUI-side RPC server connection\n"); - return 1; - } - static const rpc_method_descriptor_t vtable[] = { - { RPC_METHOD_ERROR_ALERT, handle_ErrorAlert }, - { RPC_METHOD_WARNING_ALERT, handle_WarningAlert }, - { RPC_METHOD_EXIT, handle_Exit } - }; - if (rpc_method_add_callbacks(g_gui_connection, vtable, sizeof(vtable) / sizeof(vtable[0])) < 0) { - printf("ERROR: failed to setup GUI method callbacks\n"); - return 1; - } - int socket; - if ((socket = rpc_listen_socket(g_gui_connection)) < 0) { - printf("ERROR: failed to initialize RPC server thread\n"); - return 1; - } - - g_gui_loop = g_main_new(TRUE); - while (g_main_is_running(g_gui_loop)) { - - // Process a few events pending - const int N_EVENTS_DISPATCH = 10; - for (int i = 0; i < N_EVENTS_DISPATCH; i++) { - if (!g_main_iteration(FALSE)) - break; - } - - // Check for RPC events (100 ms timeout) - int ret = rpc_wait_dispatch(g_gui_connection, 100000); - if (ret == 0) - continue; - if (ret < 0) - break; - rpc_dispatch(g_gui_connection); - } - - rpc_exit(g_gui_connection); - return 0; - } - - return 0; -} -#endif diff --git a/SheepShaver/src/Unix/prefs_unix.cpp b/SheepShaver/src/Unix/prefs_unix.cpp deleted file mode 100644 index 7f89a107b..000000000 --- a/SheepShaver/src/Unix/prefs_unix.cpp +++ /dev/null @@ -1,140 +0,0 @@ -/* - * prefs_unix.cpp - Preferences handling, Unix specific things - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include -#include - -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"ether", TYPE_STRING, false, "device name of Mac ethernet adapter"}, - {"etherconfig", TYPE_STRING, false, "path of network config script"}, - {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, - {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, - {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, - {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, - {"dsp", TYPE_STRING, false, "audio output (dsp) device name"}, - {"mixer", TYPE_STRING, false, "audio mixer device name"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name and path -const char PREFS_FILE_NAME[] = ".sheepshaver_prefs"; -static char prefs_path[1024]; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - if (vmdir) { - snprintf(prefs_path, sizeof(prefs_path), "%s/prefs", vmdir); - FILE *prefs = fopen(prefs_path, "r"); - if (!prefs) { - printf("No file at %s found.\n", prefs_path); - exit(1); - } - LoadPrefsFromStream(prefs); - fclose(prefs); - return; - } - - // Construct prefs path - prefs_path[0] = 0; - char *home = getenv("HOME"); - if (home != NULL && strlen(home) < 1000) { - strncpy(prefs_path, home, 1000); - strcat(prefs_path, "/"); - } - strcat(prefs_path, PREFS_FILE_NAME); - - // Read preferences from settings file - FILE *f = fopen(prefs_path, "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path, "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsAddBool("keycodes", false); - PrefsReplaceString("extfs", "/"); - PrefsReplaceInt32("mousewheelmode", 1); - PrefsReplaceInt32("mousewheellines", 3); -#ifdef __linux__ - if (access("/dev/sound/dsp", F_OK) == 0) { - PrefsReplaceString("dsp", "/dev/sound/dsp"); - } else { - PrefsReplaceString("dsp", "/dev/dsp"); - } - if (access("/dev/sound/mixer", F_OK) == 0) { - PrefsReplaceString("mixer", "/dev/sound/mixer"); - } else { - PrefsReplaceString("mixer", "/dev/mixer"); - } -#else - PrefsReplaceString("dsp", "/dev/dsp"); - PrefsReplaceString("mixer", "/dev/mixer"); -#endif -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif - PrefsAddBool("idlewait", true); -} diff --git a/SheepShaver/src/Unix/rpc.h b/SheepShaver/src/Unix/rpc.h deleted file mode 120000 index 98cf8a087..000000000 --- a/SheepShaver/src/Unix/rpc.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/rpc.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/rpc_unix.cpp b/SheepShaver/src/Unix/rpc_unix.cpp deleted file mode 120000 index a960f0b78..000000000 --- a/SheepShaver/src/Unix/rpc_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/rpc_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/semaphore.h b/SheepShaver/src/Unix/semaphore.h deleted file mode 120000 index 9e87a545e..000000000 --- a/SheepShaver/src/Unix/semaphore.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/semaphore.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/serial_unix.cpp b/SheepShaver/src/Unix/serial_unix.cpp deleted file mode 120000 index ccda34be7..000000000 --- a/SheepShaver/src/Unix/serial_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/serial_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/sigregs.h b/SheepShaver/src/Unix/sigregs.h deleted file mode 100644 index 44fd91172..000000000 --- a/SheepShaver/src/Unix/sigregs.h +++ /dev/null @@ -1,128 +0,0 @@ -/* - * sigregs.h - Extract machine registers from a signal frame - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 SIGREGS_H -#define SIGREGS_H - -#ifndef EMULATED_PPC - -// Common representation of machine registers -struct sigregs { - uint32 nip; - uint32 link; - uint32 ctr; - uint32 msr; - uint32 xer; - uint32 ccr; - uint32 gpr[32]; -}; - -// Extract machine registers from Linux signal frame -#if defined(__linux__) -#include -#define MACHINE_REGISTERS(scp) ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext.regs)) - -struct machine_regs : public pt_regs -{ - u_long & cr() { return pt_regs::ccr; } - uint32 cr() const { return pt_regs::ccr; } - uint32 lr() const { return pt_regs::link; } - uint32 ctr() const { return pt_regs::ctr; } - uint32 xer() const { return pt_regs::xer; } - uint32 msr() const { return pt_regs::msr; } - uint32 dar() const { return pt_regs::dar; } - u_long & pc() { return pt_regs::nip; } - uint32 pc() const { return pt_regs::nip; } - u_long & gpr(int i) { return pt_regs::gpr[i]; } - uint32 gpr(int i) const { return pt_regs::gpr[i]; } -}; -#endif - -// Extract machine registers from NetBSD signal frame -#if defined(__NetBSD__) -#include -#define MACHINE_REGISTERS(scp) ((machine_regs *)&(((ucontext_t *)scp)->uc_mcontext)) - -struct machine_regs : public mcontext_t -{ - long & cr() { return __gregs[_REG_CR]; } - uint32 cr() const { return __gregs[_REG_CR]; } - uint32 lr() const { return __gregs[_REG_LR]; } - uint32 ctr() const { return __gregs[_REG_CTR]; } - uint32 xer() const { return __gregs[_REG_XER]; } - uint32 msr() const { return __gregs[_REG_MSR]; } - uint32 dar() const { return (uint32)(((siginfo_t *)(((unsigned long)this) - offsetof(ucontext_t, uc_mcontext))) - 1)->si_addr; } /* HACK */ - long & pc() { return __gregs[_REG_PC]; } - uint32 pc() const { return __gregs[_REG_PC]; } - long & gpr(int i) { return __gregs[_REG_R0 + i]; } - uint32 gpr(int i) const { return __gregs[_REG_R0 + i]; } -}; -#endif - -// Extract machine registers from Darwin signal frame -#if defined(__APPLE__) && defined(__MACH__) -#include - -#define MACHINE_REGISTERS(scp) ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext)) - -#if __DARWIN_UNIX03 -#define __(x) __CONCAT(__,x) -#else -#define __(x) x -#endif - -#include - -#if __DARWIN_UNIX03 -struct machine_regs : public __darwin_mcontext -#else -struct machine_regs : public mcontext -#endif -{ - uint32 & cr() { return __(ss).__(cr); } - uint32 cr() const { return __(ss).__(cr); } - uint32 lr() const { return __(ss).__(lr); } - uint32 ctr() const { return __(ss).__(ctr); } - uint32 xer() const { return __(ss).__(xer); } - uint32 msr() const { return __(ss).__(srr1); } - uint32 dar() const { return __(es).__(dar); } - uint32 & pc() { return __(ss).__(srr0); } - uint32 pc() const { return __(ss).__(srr0); } - uint32 & gpr(int i) { return (&__(ss).__(r0))[i]; } - uint32 gpr(int i) const { return (&__(ss).__(r0))[i]; } -}; -#endif - -// Convert system-dependent machine registers to generic sigregs -static void build_sigregs(sigregs *srp, machine_regs *mrp) -{ - srp->nip = mrp->pc(); - srp->link = mrp->lr(); - srp->ctr = mrp->ctr(); - srp->msr = mrp->msr(); - srp->xer = mrp->xer(); - srp->ccr = mrp->cr(); - for (int i = 0; i < 32; i++) - srp->gpr[i] = mrp->gpr(i); -} - -#endif - -#endif /* SIGREGS_H */ diff --git a/SheepShaver/src/Unix/sshpty.c b/SheepShaver/src/Unix/sshpty.c deleted file mode 120000 index ffaa2bfcb..000000000 --- a/SheepShaver/src/Unix/sshpty.c +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sshpty.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/sshpty.h b/SheepShaver/src/Unix/sshpty.h deleted file mode 120000 index 9132736af..000000000 --- a/SheepShaver/src/Unix/sshpty.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sshpty.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/strlcpy.c b/SheepShaver/src/Unix/strlcpy.c deleted file mode 120000 index 59e61670f..000000000 --- a/SheepShaver/src/Unix/strlcpy.c +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/strlcpy.c \ No newline at end of file diff --git a/SheepShaver/src/Unix/strlcpy.h b/SheepShaver/src/Unix/strlcpy.h deleted file mode 120000 index 1c551aacf..000000000 --- a/SheepShaver/src/Unix/strlcpy.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/strlcpy.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/sys_unix.cpp b/SheepShaver/src/Unix/sys_unix.cpp deleted file mode 120000 index e5769e8d6..000000000 --- a/SheepShaver/src/Unix/sys_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/sys_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/sysdeps.h b/SheepShaver/src/Unix/sysdeps.h deleted file mode 100644 index 0099527b3..000000000 --- a/SheepShaver/src/Unix/sysdeps.h +++ /dev/null @@ -1,491 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for Linux - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#ifndef __STDC__ -#error "Your compiler is not ANSI. Get a real one." -#endif - -#include "config.h" -#include "user_strings_unix.h" - -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - -#ifdef HAVE_UNISTD_H -# include -# include -#endif - -#include -#include -#include -#include -#include -#include -#include - -#ifdef HAVE_PTHREADS -# include -#endif - -#ifdef HAVE_FCNTL_H -# include -#endif - -#ifdef TIME_WITH_SYS_TIME -# include -# include -#else -# ifdef HAVE_SYS_TIME_H -# include -# else -# include -# endif -#endif - -#ifdef __MACH__ -#include -#endif - -// Fix offsetof() on FreeBSD and GCC >= 3.4 -#if defined(__FreeBSD__) && defined(__cplusplus) && __GNUC__ < 4 -#undef offsetof -/* The cast to "char &" below avoids problems with user-defined - "operator &", which can appear in a POD type. */ -#define offsetof(TYPE, MEMBER) \ - (__offsetof__ (reinterpret_cast \ - (&reinterpret_cast \ - (static_cast (0)->MEMBER)))) -#endif - -// Define for external components -#define SHEEPSHAVER 1 - -// Always use Real Addressing mode on native architectures -// Otherwise, use Direct Addressing mode if NATMEM_OFFSET is set -#if !defined(EMULATED_PPC) -#define REAL_ADDRESSING 1 -#include "ppc_asm.tmpl" -#elif defined(NATMEM_OFFSET) -#define DIRECT_ADDRESSING 1 -#else -#define REAL_ADDRESSING 1 -#endif - -// Always use the complete non-stubs Ethernet driver -#define USE_ETHER_FULL_DRIVER 1 - -#define POWERPC_ROM 1 - -#if EMULATED_PPC -// Mac ROM is write protected when banked memory is used -#if REAL_ADDRESSING || DIRECT_ADDRESSING -# define ROM_IS_WRITE_PROTECTED 0 -# define USE_SCRATCHMEM_SUBTERFUGE 1 -#else -# define ROM_IS_WRITE_PROTECTED 1 -#endif -// Configure PowerPC emulator -#define PPC_REENTRANT_JIT 1 -#define PPC_CHECK_INTERRUPTS 1 -#define PPC_DECODE_CACHE 1 -#define PPC_FLIGHT_RECORDER 1 -#define PPC_PROFILE_COMPILE_TIME 0 -#define PPC_PROFILE_GENERIC_CALLS 0 -#define PPC_PROFILE_REGS_USE 0 -#define KPX_MAX_CPUS 1 -#if ENABLE_DYNGEN -#define PPC_ENABLE_JIT 1 -#endif -#if defined(__i386__) || defined(__x86_64__) -#define DYNGEN_ASM_OPTS 1 -#endif -#else -// Mac ROM is write protected -#define ROM_IS_WRITE_PROTECTED 1 -#define USE_SCRATCHMEM_SUBTERFUGE 0 -#endif - -// Data types -typedef unsigned char uint8; -typedef signed char int8; -#if SIZEOF_SHORT == 2 -typedef unsigned short uint16; -typedef short int16; -#elif SIZEOF_INT == 2 -typedef unsigned int uint16; -typedef int int16; -#else -#error "No 2 byte type, you lose." -#endif -#if SIZEOF_INT == 4 -typedef unsigned int uint32; -typedef int int32; -#elif SIZEOF_LONG == 4 -typedef unsigned long uint32; -typedef long int32; -#else -#error "No 4 byte type, you lose." -#endif -#if SIZEOF_LONG == 8 -typedef unsigned long uint64; -typedef long int64; -#define VAL64(a) (a ## l) -#define UVAL64(a) (a ## ul) -#elif SIZEOF_LONG_LONG == 8 -typedef unsigned long long uint64; -typedef long long int64; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -#else -#error "No 8 byte type, you lose." -#endif -#if SIZEOF_VOID_P == 4 -typedef uint32 uintptr; -typedef int32 intptr; -#elif SIZEOF_VOID_P == 8 -typedef uint64 uintptr; -typedef int64 intptr; -#else -#error "Unsupported size of pointer" -#endif - -// Define if the host processor supports fast unaligned load/stores -#if defined __i386__ || defined __x86_64__ -#define UNALIGNED_PROFITABLE 1 -#endif - - -/** - * Helper functions to byteswap data - **/ - -#if defined(__GNUC__) -#if defined(__x86_64__) || defined(__i386__) -// Linux/AMD64 currently has no asm optimized bswap_32() in -#define opt_bswap_32 do_opt_bswap_32 -static inline uint32 do_opt_bswap_32(uint32 x) -{ - uint32 v; - __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x)); - return v; -} -#endif -#endif - -#ifdef HAVE_BYTESWAP_H -#include -#endif - -#ifdef opt_bswap_16 -#undef bswap_16 -#define bswap_16 opt_bswap_16 -#endif -#ifndef bswap_16 -#define bswap_16 generic_bswap_16 -#endif - -static inline uint16 generic_bswap_16(uint16 x) -{ - return ((x & 0xff) << 8) | ((x >> 8) & 0xff); -} - -#ifdef opt_bswap_32 -#undef bswap_32 -#define bswap_32 opt_bswap_32 -#endif -#ifndef bswap_32 -#define bswap_32 generic_bswap_32 -#endif - -static inline uint32 generic_bswap_32(uint32 x) -{ - return (((x & 0xff000000) >> 24) | - ((x & 0x00ff0000) >> 8) | - ((x & 0x0000ff00) << 8) | - ((x & 0x000000ff) << 24) ); -} - -#if defined(__i386__) -#define opt_bswap_64 do_opt_bswap_64 -static inline uint64 do_opt_bswap_64(uint64 x) -{ - return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32)); -} -#endif - -#ifdef opt_bswap_64 -#undef bswap_64 -#define bswap_64 opt_bswap_64 -#endif -#ifndef bswap_64 -#define bswap_64 generic_bswap_64 -#endif - -static inline uint64 generic_bswap_64(uint64 x) -{ - return (((x & UVAL64(0xff00000000000000)) >> 56) | - ((x & UVAL64(0x00ff000000000000)) >> 40) | - ((x & UVAL64(0x0000ff0000000000)) >> 24) | - ((x & UVAL64(0x000000ff00000000)) >> 8) | - ((x & UVAL64(0x00000000ff000000)) << 8) | - ((x & UVAL64(0x0000000000ff0000)) << 24) | - ((x & UVAL64(0x000000000000ff00)) << 40) | - ((x & UVAL64(0x00000000000000ff)) << 56) ); -} - -#ifdef WORDS_BIGENDIAN -static inline uint16 tswap16(uint16 x) { return x; } -static inline uint32 tswap32(uint32 x) { return x; } -static inline uint64 tswap64(uint64 x) { return x; } -#else -static inline uint16 tswap16(uint16 x) { return bswap_16(x); } -static inline uint32 tswap32(uint32 x) { return bswap_32(x); } -static inline uint64 tswap64(uint64 x) { return bswap_64(x); } -#endif - -// spin locks -#ifdef __GNUC__ - -#if defined(__powerpc__) || defined(__ppc__) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - __asm__ __volatile__("0: lwarx %0,0,%1\n" - " xor. %0,%3,%0\n" - " bne 1f\n" - " stwcx. %2,0,%1\n" - " bne- 0b\n" - "1: " - : "=&r" (ret) - : "r" (p), "r" (1), "r" (0) - : "cr0", "memory"); - return ret; -} -#endif - -#if defined(__i386__) || defined(__x86_64__) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - long int ret; - /* Note: the "xchg" instruction does not need a "lock" prefix */ - __asm__ __volatile__("xchgl %k0, %1" - : "=r" (ret), "=m" (*p) - : "0" (1), "m" (*p) - : "memory"); - return ret; -} -#endif - -#ifdef __s390__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - - __asm__ __volatile__("0: cs %0,%1,0(%2)\n" - " jl 0b" - : "=&d" (ret) - : "r" (1), "a" (p), "0" (*p) - : "cc", "memory" ); - return ret; -} -#endif - -#ifdef __alpha__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - unsigned long one; - - __asm__ __volatile__("0: mov 1,%2\n" - " ldl_l %0,%1\n" - " stl_c %2,%1\n" - " beq %2,1f\n" - ".subsection 2\n" - "1: br 0b\n" - ".previous" - : "=r" (ret), "=m" (*p), "=r" (one) - : "m" (*p)); - return ret; -} -#endif - -#ifdef __sparc__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - - __asm__ __volatile__("ldstub [%1], %0" - : "=r" (ret) - : "r" (p) - : "memory"); - - return (ret ? 1 : 0); -} -#endif - -#ifdef __arm__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - register unsigned int ret; - __asm__ __volatile__("swp %0, %1, [%2]" - : "=r"(ret) - : "0"(1), "r"(p)); - - return ret; -} -#endif - -#endif /* __GNUC__ */ - -typedef volatile int spinlock_t; - -static const spinlock_t SPIN_LOCK_UNLOCKED = 0; - -#if defined(HAVE_TEST_AND_SET) && defined(HAVE_PTHREADS) -// There is nothing to lock if we are not in an multithreaded environment -#define HAVE_SPINLOCKS 1 -static inline void spin_lock(spinlock_t *lock) -{ - while (testandset(lock)); -} - -static inline void spin_unlock(spinlock_t *lock) -{ - *lock = 0; -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return !testandset(lock); -} -#else -static inline void spin_lock(spinlock_t *lock) -{ -} - -static inline void spin_unlock(spinlock_t *lock) -{ -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return 1; -} -#endif - -// Time data type for Time Manager emulation -#ifdef HAVE_CLOCK_GETTIME -typedef struct timespec tm_time_t; -#elif defined(__MACH__) -typedef mach_timespec_t tm_time_t; -#else -typedef struct timeval tm_time_t; -#endif - -/* Define codes for all the float formats that we know of. - * Though we only handle IEEE format. */ -#define UNKNOWN_FLOAT_FORMAT 0 -#define IEEE_FLOAT_FORMAT 1 -#define VAX_FLOAT_FORMAT 2 -#define IBM_FLOAT_FORMAT 3 -#define C4X_FLOAT_FORMAT 4 - -// High-precision timing -#if defined(HAVE_PTHREADS) && defined(HAVE_CLOCK_NANOSLEEP) -#define PRECISE_TIMING 1 -#define PRECISE_TIMING_POSIX 1 -#elif defined(HAVE_PTHREADS) && defined(__MACH__) -#define PRECISE_TIMING 1 -#define PRECISE_TIMING_MACH 1 -#endif - -// Timing functions -extern uint64 GetTicks_usec(void); -extern void Delay_usec(uint32 usec); - -#ifdef HAVE_PTHREADS -// Setup pthread attributes -extern void Set_pthread_attr(pthread_attr_t *attr, int priority); -#endif - -// Various definitions -typedef struct rgb_color { - uint8 red; - uint8 green; - uint8 blue; - uint8 alpha; -} rgb_color; - -// X11 display fast locks -#if defined(HAVE_PTHREADS) -#define X11_LOCK_TYPE pthread_mutex_t -#define X11_LOCK_INIT PTHREAD_MUTEX_INITIALIZER -#define XDisplayLock() pthread_mutex_lock(&x_display_lock); -#define XDisplayUnlock() pthread_mutex_unlock(&x_display_lock); -#elif defined(HAVE_SPINLOCKS) -#define X11_LOCK_TYPE spinlock_t -#define X11_LOCK_INIT SPIN_LOCK_UNLOCKED -#define XDisplayLock() spin_lock(&x_display_lock) -#define XDisplayUnlock() spin_unlock(&x_display_lock) -#else -#define XDisplayLock() -#define XDisplayUnlock() -#endif -#ifdef X11_LOCK_TYPE -extern X11_LOCK_TYPE x_display_lock; -#endif - -// Macro for calling MacOS routines -#define CallMacOS(type, tvect) call_macos((uintptr)tvect) -#define CallMacOS1(type, tvect, arg1) call_macos1((uintptr)tvect, (uintptr)arg1) -#define CallMacOS2(type, tvect, arg1, arg2) call_macos2((uintptr)tvect, (uintptr)arg1, (uintptr)arg2) -#define CallMacOS3(type, tvect, arg1, arg2, arg3) call_macos3((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3) -#define CallMacOS4(type, tvect, arg1, arg2, arg3, arg4) call_macos4((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4) -#define CallMacOS5(type, tvect, arg1, arg2, arg3, arg4, arg5) call_macos5((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5) -#define CallMacOS6(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6) call_macos6((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6) -#define CallMacOS7(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7) call_macos7((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6, (uintptr)arg7) - -#ifdef __cplusplus -extern "C" { -#endif -extern uint32 call_macos(uint32 tvect); -extern uint32 call_macos1(uint32 tvect, uint32 arg1); -extern uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2); -extern uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3); -extern uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4); -extern uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5); -extern uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6); -extern uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7); -#ifdef __cplusplus -} -#endif - -#endif diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp deleted file mode 120000 index db93bbd33..000000000 --- a/SheepShaver/src/Unix/timer_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/timer_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/tinyxml2.cpp b/SheepShaver/src/Unix/tinyxml2.cpp deleted file mode 120000 index 0609bdc8f..000000000 --- a/SheepShaver/src/Unix/tinyxml2.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tinyxml2.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/tinyxml2.h b/SheepShaver/src/Unix/tinyxml2.h deleted file mode 120000 index d90c30e29..000000000 --- a/SheepShaver/src/Unix/tinyxml2.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tinyxml2.h \ No newline at end of file diff --git a/SheepShaver/src/Unix/tunconfig b/SheepShaver/src/Unix/tunconfig deleted file mode 120000 index 615f7fe9e..000000000 --- a/SheepShaver/src/Unix/tunconfig +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/tunconfig \ No newline at end of file diff --git a/SheepShaver/src/Unix/user_strings_unix.cpp b/SheepShaver/src/Unix/user_strings_unix.cpp deleted file mode 100644 index 5a3b21f53..000000000 --- a/SheepShaver/src/Unix/user_strings_unix.cpp +++ /dev/null @@ -1,117 +0,0 @@ -/* - * user_strings_unix.cpp - Localizable strings, Unix specific strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under Linux. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "Unix Root"}, - {STR_EXTFS_NAME, "Unix Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "Unix"}, - - // Purely platform-specific strings - {STR_NO_DEV_ZERO_ERR, "Cannot open /dev/zero: %s."}, - {STR_LOW_MEM_MMAP_ERR, "Cannot map Low Memory Globals: %s."}, - {STR_KD_SHMGET_ERR, "Cannot create SHM segment for Kernel Data: %s."}, - {STR_KD_SHMAT_ERR, "Cannot map first Kernel Data area: %s."}, - {STR_KD2_SHMAT_ERR, "Cannot map second Kernel Data area: %s."}, - {STR_ROM_MMAP_ERR, "Cannot map ROM: %s."}, - {STR_RAM_MMAP_ERR, "Cannot map RAM: %s."}, - {STR_RAM_ROM_MMAP_ERR, "Cannot map area for RAM and ROM: %s."}, - {STR_RAM_AREA_TOO_HIGH_ERR, "Cannot map usable RAM area. Try to decrease the MacOS RAM size."}, - {STR_DR_CACHE_MMAP_ERR, "Cannot map DR Cache: %s."}, - {STR_DR_EMULATOR_MMAP_ERR, "Cannot map DR Emulator: %s."}, - {STR_SHEEP_MEM_MMAP_ERR, "Cannot map SheepShaver Data area: %s."}, - {STR_SIGALTSTACK_ERR, "Cannot install alternate signal stack (%s). It seems that you need a newer kernel."}, - {STR_SIG_INSTALL_ERR, "Cannot install %s handler (%s)."}, - {STR_NO_XSERVER_ERR, "Cannot connect to X server %s."}, - {STR_NO_XVISUAL_ERR, "Cannot obtain appropriate X visual."}, - {STR_UNSUPP_DEPTH_ERR, "Unsupported color depth of screen."}, - {STR_PROC_CPUINFO_WARN, "Cannot open /proc/cpuinfo (%s). Assuming 100MHz PowerPC 604."}, - {STR_BLOCKING_NET_SOCKET_WARN, "Cannot set non-blocking I/O to net socket (%s). Ethernet will not be available."}, - {STR_NO_SHEEP_NET_DRIVER_WARN, "Cannot open %s (%s). Ethernet will not be available."}, - {STR_SHEEP_NET_ATTACH_WARN, "Cannot attach to Ethernet card (%s). Ethernet will not be available."}, - {STR_TUN_TAP_CONFIG_WARN, "Cannot configure TUN/TAP device (%s). Ethernet will not be available."}, - {STR_SLIRP_NO_DNS_FOUND_WARN, "Cannot get DNS address. Ethernet will not be available."}, - {STR_NO_AUDIO_DEV_WARN, "Cannot open %s (%s). Audio output will be disabled."}, - {STR_NO_AUDIO_WARN, "No audio device found, audio output will be disabled."}, - {STR_NO_ESD_WARN, "Cannot open ESD connection. Audio output will be disabled."}, - {STR_AUDIO_FORMAT_WARN, "/dev/dsp doesn't support signed 16 bit format. Audio output will be disabled."}, - {STR_SCSI_DEVICE_OPEN_WARN, "Cannot open %s (%s). SCSI Manager access to this device will be disabled."}, - {STR_SCSI_DEVICE_NOT_SCSI_WARN, "%s doesn't seem to comply to the Generic SCSI API. SCSI Manager access to this device will be disabled."}, - {STR_KEYCODE_FILE_WARN, "Cannot open keycode translation file %s (%s)."}, - {STR_KEYCODE_VENDOR_WARN, "Cannot find vendor '%s' in keycode translation file %s."}, - {STR_PREFS_MENU_FILE_GTK, "/_File"}, - {STR_PREFS_ITEM_START_GTK, "/File/_Start SheepShaver"}, - {STR_PREFS_ITEM_ZAP_PRAM_GTK, "/File/_Zap PRAM File"}, - {STR_PREFS_ITEM_SEPL_GTK, "/File/sepl"}, - {STR_PREFS_ITEM_QUIT_GTK, "/File/_Quit SheepShaver"}, - {STR_HELP_MENU_GTK, "/_Help"}, - {STR_HELP_ITEM_ABOUT_GTK, "/Help/_About SheepShaver"}, - {STR_DSPDEVICE_FILE_CTRL, "Audio Output Device"}, - {STR_MIXERDEVICE_FILE_CTRL, "Audio Mixer Device"}, - {STR_BROWSE_TITLE, "Browse file"}, - {STR_BROWSE_CTRL, "Browse..."}, - {STR_INPUT_PANE_TITLE, "Keyboard/Mouse"}, - {STR_KEYCODES_CTRL, "Use Raw Keycodes"}, - {STR_KEYCODE_FILE_CTRL, "Keycode Translation File"}, - {STR_MOUSEWHEELMODE_CTRL, "Mouse Wheel Function"}, - {STR_MOUSEWHEELMODE_PAGE_LAB, "Page Up/Down"}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, "Cursor Up/Down"}, - {STR_MOUSEWHEELLINES_CTRL, "Lines To Scroll"}, - {STR_SUSPEND_WINDOW_TITLE, "SheepShaver suspended. Press Space to reactivate."}, - {STR_VOSF_INIT_ERR, "Cannot initialize Video on SEGV signals."}, - - {STR_OPEN_WINDOW_ERR, "Cannot open Mac window."}, - {STR_WINDOW_TITLE_GRABBED, "SheepShaver (mouse grabbed, press Ctrl-F5 to release)"}, - - {STR_NO_B2_EXE_FOUND, "Could not start %s (%s)."}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/SheepShaver/src/Unix/user_strings_unix.h b/SheepShaver/src/Unix/user_strings_unix.h deleted file mode 100644 index be9ea0bb8..000000000 --- a/SheepShaver/src/Unix/user_strings_unix.h +++ /dev/null @@ -1,86 +0,0 @@ -/* - * user_strings_unix.h - Unix-specific localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 USER_STRINGS_LINUX_H -#define USER_STRINGS_LINUX_H - -enum { - STR_NO_DEV_ZERO_ERR = 10000, - STR_LOW_MEM_MMAP_ERR, - STR_KD_SHMGET_ERR, - STR_KD_SHMAT_ERR, - STR_KD2_SHMAT_ERR, - STR_ROM_MMAP_ERR, - STR_RAM_MMAP_ERR, - STR_RAM_ROM_MMAP_ERR, - STR_RAM_AREA_TOO_HIGH_ERR, - STR_DR_CACHE_MMAP_ERR, - STR_DR_EMULATOR_MMAP_ERR, - STR_SHEEP_MEM_MMAP_ERR, - STR_SIGALTSTACK_ERR, - STR_SIG_INSTALL_ERR, - STR_NO_XSERVER_ERR, - STR_NO_XVISUAL_ERR, - STR_UNSUPP_DEPTH_ERR, - STR_VOSF_INIT_ERR, - - STR_PROC_CPUINFO_WARN, - STR_BLOCKING_NET_SOCKET_WARN, - STR_NO_SHEEP_NET_DRIVER_WARN, - STR_SHEEP_NET_ATTACH_WARN, - STR_TUN_TAP_CONFIG_WARN, - STR_SLIRP_NO_DNS_FOUND_WARN, - STR_NO_AUDIO_DEV_WARN, - STR_NO_AUDIO_WARN, - STR_NO_ESD_WARN, - STR_AUDIO_FORMAT_WARN, - STR_SCSI_DEVICE_OPEN_WARN, - STR_SCSI_DEVICE_NOT_SCSI_WARN, - STR_KEYCODE_FILE_WARN, - STR_KEYCODE_VENDOR_WARN, - - STR_PREFS_MENU_FILE_GTK, - STR_PREFS_ITEM_START_GTK, - STR_PREFS_ITEM_ZAP_PRAM_GTK, - STR_PREFS_ITEM_SEPL_GTK, - STR_PREFS_ITEM_QUIT_GTK, - STR_HELP_MENU_GTK, - STR_HELP_ITEM_ABOUT_GTK, - STR_SUSPEND_WINDOW_TITLE, - STR_DSPDEVICE_FILE_CTRL, - STR_MIXERDEVICE_FILE_CTRL, - - STR_BROWSE_CTRL, - STR_BROWSE_TITLE, - STR_INPUT_PANE_TITLE, - STR_KEYCODES_CTRL, - STR_KEYCODE_FILE_CTRL, - STR_MOUSEWHEELMODE_CTRL, - STR_MOUSEWHEELMODE_PAGE_LAB, - STR_MOUSEWHEELMODE_CURSOR_LAB, - STR_MOUSEWHEELLINES_CTRL, - - STR_OPEN_WINDOW_ERR, - STR_WINDOW_TITLE_GRABBED, - - STR_NO_B2_EXE_FOUND -}; - -#endif diff --git a/SheepShaver/src/Unix/vhd_unix.cpp b/SheepShaver/src/Unix/vhd_unix.cpp deleted file mode 120000 index a0c73d90d..000000000 --- a/SheepShaver/src/Unix/vhd_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/vhd_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/video_x.cpp b/SheepShaver/src/Unix/video_x.cpp deleted file mode 100644 index f73747402..000000000 --- a/SheepShaver/src/Unix/video_x.cpp +++ /dev/null @@ -1,2584 +0,0 @@ -/* - * video_x.cpp - Video/graphics emulation, X11 specific stuff - * - * SheepShaver (C) Marc Hellwig and Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include - -#ifdef ENABLE_FBDEV_DGA -# include -# include -#endif - -#ifdef ENABLE_XF86_DGA -# include -#endif - -#ifdef ENABLE_XF86_VIDMODE -# include -#endif - -#ifdef ENABLE_FBDEV_DGA -# include -#endif - -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef NO_STD_NAMESPACE -using std::sort; -#endif - - -// Constants -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -static const bool hw_mac_cursor_accl = true; // Flag: Enable MacOS to X11 copy of cursor? - -// Global variables -static int32 frame_skip; -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; -static bool redraw_thread_active = false; // Flag: Redraw thread installed -static pthread_attr_t redraw_thread_attr; // Redraw thread attributes -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static pthread_t redraw_thread; // Redraw thread - -static volatile bool thread_stop_req = false; -static sem_t thread_stop_ack; -static sem_t thread_resume_req; - -static bool local_X11; // Flag: X server running on local machine? -static bool has_dga = false; // Flag: Video DGA capable -static bool has_vidmode = false; // Flag: VidMode extension available - -#ifdef ENABLE_VOSF -static bool use_vosf = true; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool palette_changed = false; // Flag: Palette changed, redraw thread must update palette -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static volatile bool quit_full_screen_ack = false; // Acknowledge for quit_full_screen -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread - -static bool emul_suspended = false; // Flag: emulator suspended -static Window suspend_win; // "Suspend" window -static void *fb_save = NULL; // Saved frame buffer for suspend -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// X11 variables -static int screen; // Screen number -static int xdepth; // Depth of X screen -static int depth; // Depth of Mac frame buffer -static Window rootwin, the_win; // Root window and our window -static int num_depths = 0; // Number of available X depths -static int *avail_depths = NULL; // List of available X depths -static VisualFormat visualFormat; -static XVisualInfo visualInfo; -static Visual *vis; -static int color_class; -static int rshift, rloss, gshift, gloss, bshift, bloss; // Pixel format of DirectColor/TrueColor modes -static Colormap cmap[2]; // Two colormaps (DGA) for 8-bit mode -static XColor x_palette[256]; // Color palette to be used as CLUT and gamma table -static int orig_accel_numer, orig_accel_denom, orig_threshold; // Original mouse acceleration - -static XColor black, white; -static unsigned long black_pixel, white_pixel; -static int eventmask; -static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask; -static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask; - -// Variables for window mode -static GC the_gc; -static XImage *img = NULL; -static XShmSegmentInfo shminfo; -static XImage *cursor_image, *cursor_mask_image; -static Pixmap cursor_map, cursor_mask_map; -static Cursor mac_cursor; -static GC cursor_gc, cursor_mask_gc; -static bool cursor_changed = false; // Flag: Cursor changed, window_func must update cursor -static bool have_shm = false; // Flag: SHM present and usable -static uint8 *the_buffer = NULL; // Pointer to Mac frame buffer -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer -static uint32 the_buffer_size; // Size of allocated the_buffer - -// Variables for DGA mode -static bool is_fbdev_dga_mode = false; // Flag: Use FBDev DGA mode? -static int current_dga_cmap; - -#ifdef ENABLE_FBDEV_DGA -static int fb_dev_fd = -1; // Handle to fb device name -static struct fb_fix_screeninfo fb_finfo; // Fixed info -static struct fb_var_screeninfo fb_vinfo; // Variable info -static struct fb_var_screeninfo fb_orig_vinfo; // Variable info to restore later -static struct fb_cmap fb_oldcmap; // Colormap to restore later -#endif - -#ifdef ENABLE_XF86_VIDMODE -// Variables for XF86 VidMode support -static XF86VidModeModeInfo **x_video_modes; // Array of all available modes -static int num_x_video_modes; -#endif - -// Mutex to protect palette -#if defined(HAVE_PTHREADS) -static pthread_mutex_t x_palette_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_PALETTE pthread_mutex_lock(&x_palette_lock) -#define UNLOCK_PALETTE pthread_mutex_unlock(&x_palette_lock) -#elif defined(HAVE_SPINLOCKS) -static spinlock_t x_palette_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_PALETTE spin_lock(&x_palette_lock) -#define UNLOCK_PALETTE spin_unlock(&x_palette_lock) -#else -#define LOCK_PALETTE -#define UNLOCK_PALETTE -#endif - -// Mutex to protect frame buffer -#if defined(HAVE_PTHREADS) -static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock); -#define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock); -#elif defined(HAVE_SPINLOCKS) -static spinlock_t frame_buffer_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_FRAME_BUFFER spin_lock(&frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER spin_unlock(&frame_buffer_lock) -#else -#define LOCK_FRAME_BUFFER -#define UNLOCK_FRAME_BUFFER -#endif - - -// Prototypes -static void *redraw_func(void *arg); - - -// From main_unix.cpp -extern char *x_display_name; -extern Display *x_display; - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - -// From clip_unix.cpp -extern void ClipboardSelectionClear(XSelectionClearEvent *); -extern void ClipboardSelectionRequest(XSelectionRequestEvent *); - - -// Video acceleration through SIGSEGV -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - - -/* - * Utility functions - */ - -// Get current video mode -static inline int get_current_mode(void) -{ - return VModes[cur_mode].viAppleMode; -} - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case APPLE_1_BIT: return 2; - case APPLE_2_BIT: return 4; - case APPLE_4_BIT: return 16; - case APPLE_8_BIT: return 256; - case APPLE_16_BIT: return 32; - case APPLE_32_BIT: return 256; - default: return 0; - } -} - -// Return bits per pixel for requested depth -static inline int bytes_per_pixel(int depth) -{ - int bpp; - switch (depth) { - case 8: - bpp = 1; - break; - case 15: case 16: - bpp = 2; - break; - case 24: case 32: - bpp = 4; - break; - default: - abort(); - } - return bpp; -} - -// Map video_mode depth ID to numerical depth value -static inline int depth_of_video_mode(int mode) -{ - int depth; - switch (mode) { - case APPLE_1_BIT: - depth = 1; - break; - case APPLE_2_BIT: - depth = 2; - break; - case APPLE_4_BIT: - depth = 4; - break; - case APPLE_8_BIT: - depth = 8; - break; - case APPLE_16_BIT: - depth = 16; - break; - case APPLE_32_BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map RGB color to pixel value (this only works in TrueColor/DirectColor visuals) -static inline uint32 map_rgb(uint8 red, uint8 green, uint8 blue) -{ - return ((red >> rloss) << rshift) | ((green >> gloss) << gshift) | ((blue >> bloss) << bshift); -} - - -// Do we have a visual for handling the specified Mac depth? If so, set the -// global variables "xdepth", "visualInfo", "vis" and "color_class". -static bool find_visual_for_depth(int depth) -{ - D(bug("have_visual_for_depth(%d)\n", depth_of_video_mode(depth))); - - // 1-bit works always and uses default visual - if (depth == APPLE_1_BIT) { - vis = DefaultVisual(x_display, screen); - visualInfo.visualid = XVisualIDFromVisual(vis); - int num = 0; - XVisualInfo *vi = XGetVisualInfo(x_display, VisualIDMask, &visualInfo, &num); - visualInfo = vi[0]; - XFree(vi); - xdepth = visualInfo.depth; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d\n", visualInfo.visualid, xdepth)); - return true; - } - - // Calculate minimum and maximum supported X depth - int min_depth = 1, max_depth = 32; - switch (depth) { -#ifdef ENABLE_VOSF - case APPLE_2_BIT: - case APPLE_4_BIT: // VOSF blitters can convert 2/4/8-bit -> 8/16/32-bit - case APPLE_8_BIT: - min_depth = 8; - max_depth = 32; - break; -#else - case APPLE_2_BIT: - case APPLE_4_BIT: // 2/4-bit requires VOSF blitters - return false; - case APPLE_8_BIT: // 8-bit without VOSF requires an 8-bit visual - min_depth = 8; - max_depth = 8; - break; -#endif - case APPLE_16_BIT: // 16-bit requires a 15/16-bit visual - min_depth = 15; - max_depth = 16; - break; - case APPLE_32_BIT: // 32-bit requires a 24/32-bit visual - min_depth = 24; - max_depth = 32; - break; - } - D(bug(" minimum required X depth is %d, maximum supported X depth is %d\n", min_depth, max_depth)); - - // Try to find a visual for one of the color depths - bool visual_found = false; - for (int i=0; i max_depth) - continue; - - // Determine best color class for this depth - switch (xdepth) { - case 1: // Try StaticGray or StaticColor - if (XMatchVisualInfo(x_display, screen, xdepth, StaticGray, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, StaticColor, &visualInfo)) - visual_found = true; - break; - case 8: // Need PseudoColor - if (XMatchVisualInfo(x_display, screen, xdepth, PseudoColor, &visualInfo)) - visual_found = true; - break; - case 15: - case 16: - case 24: - case 32: // Try DirectColor first, as this will allow gamma correction - if (XMatchVisualInfo(x_display, screen, xdepth, DirectColor, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo)) - visual_found = true; - break; - default: - D(bug(" not a supported depth\n")); - break; - } - } - if (!visual_found) - return false; - - // Visual was found - vis = visualInfo.visual; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d, class ", visualInfo.visualid, xdepth)); -#if DEBUG - switch (color_class) { - case StaticGray: D(bug("StaticGray\n")); break; - case GrayScale: D(bug("GrayScale\n")); break; - case StaticColor: D(bug("StaticColor\n")); break; - case PseudoColor: D(bug("PseudoColor\n")); break; - case TrueColor: D(bug("TrueColor\n")); break; - case DirectColor: D(bug("DirectColor\n")); break; - } -#endif - return true; -} - - -/* - * Open display (window or fullscreen) - */ - -// Set window name and class -static void set_window_name(Window w, int name) -{ - const char *str = GetString(name); - XStoreName(x_display, w, str); - XSetIconName(x_display, w, str); - - XClassHint *hints; - hints = XAllocClassHint(); - if (hints) { - hints->res_name = "SheepShaver"; - hints->res_class = "SheepShaver"; - XSetClassHint(x_display, w, hints); - XFree(hints); - } -} - -// Set window input focus flag -static void set_window_focus(Window w) -{ - XWMHints *hints = XAllocWMHints(); - if (hints) { - hints->input = True; - hints->initial_state = NormalState; - hints->flags = InputHint | StateHint; - XSetWMHints(x_display, w, hints); - XFree(hints); - } -} - -// Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget) -static Atom WM_DELETE_WINDOW = (Atom)0; -static void set_window_delete_protocol(Window w) -{ - WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false); - XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1); -} - -// Wait until window is mapped/unmapped -static void wait_mapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != MapNotify) || (e.xmap.event != w)); -} - -static void wait_unmapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != UnmapNotify) || (e.xmap.event != w)); -} - -// Disable mouse acceleration -static void disable_mouse_accel(void) -{ - XChangePointerControl(x_display, True, False, 1, 1, 0); -} - -// Restore mouse acceleration to original value -static void restore_mouse_accel(void) -{ - XChangePointerControl(x_display, True, True, orig_accel_numer, orig_accel_denom, orig_threshold); -} - -// Trap SHM errors -static bool shm_error = false; -static int (*old_error_handler)(Display *, XErrorEvent *); - -static int error_handler(Display *d, XErrorEvent *e) -{ - if (e->error_code == BadAccess) { - shm_error = true; - return 0; - } else - return old_error_handler(d, e); -} - -// Open window -static bool open_window(int width, int height) -{ - int aligned_width = (width + 15) & ~15; - int aligned_height = (height + 15) & ~15; - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = win_eventmask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.border_pixel = 0; - wattr.backing_store = NotUseful; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWBackingStore | CWColormap, &wattr); - - // Set window name/class - set_window_name(the_win, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(the_win); - - // Set delete protocol property - set_window_delete_protocol(the_win); - - // Make window unresizable - XSizeHints *hints; - if ((hints = XAllocSizeHints()) != NULL) { - hints->min_width = width; - hints->max_width = width; - hints->min_height = height; - hints->max_height = height; - hints->flags = PMinSize | PMaxSize; - XSetWMNormalHints(x_display, the_win, hints); - XFree((char *)hints); - } - - // Show window - XMapWindow(x_display, the_win); - wait_mapped(the_win); - - // 1-bit mode is big-endian; if the X server is little-endian, we can't - // use SHM because that doesn't allow changing the image byte order - bool need_msb_image = (depth == 1 && XImageByteOrder(x_display) == LSBFirst); - - // Try to create and attach SHM image - have_shm = false; - if (local_X11 && !need_msb_image && XShmQueryExtension(x_display)) { - - // Create SHM image ("height + 2" for safety) - img = XShmCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height); - shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777); - D(bug(" shm image created\n")); - the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0); - shminfo.shmaddr = img->data = (char *)the_buffer_copy; - shminfo.readOnly = False; - - // Try to attach SHM image, catching errors - shm_error = false; - old_error_handler = XSetErrorHandler(error_handler); - XShmAttach(x_display, &shminfo); - XSync(x_display, false); - XSetErrorHandler(old_error_handler); - if (shm_error) { - shmdt(shminfo.shmaddr); - XDestroyImage(img); - shminfo.shmid = -1; - } else { - have_shm = true; - shmctl(shminfo.shmid, IPC_RMID, 0); - } - D(bug(" shm image attached\n")); - } - - // Create normal X image if SHM doesn't work ("height + 2" for safety) - if (!have_shm) { - int bytes_per_row = depth == 1 ? aligned_width/8 : TrivialBytesPerRow(aligned_width, DepthModeForPixelDepth(xdepth)); - the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row); - img = XCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row); - D(bug(" X image created\n")); - } - - // 1-Bit mode is big-endian - if (need_msb_image) { - img->byte_order = MSBFirst; - img->bitmap_bit_order = MSBFirst; - } - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer_copy; - the_buffer_size = page_extend((aligned_height + 2) * img->bytes_per_line); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#else - // Allocate memory for frame buffer - the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); -#endif - screen_base = Host2MacAddr(the_buffer); - - // Create GC - the_gc = XCreateGC(x_display, the_win, 0, 0); - XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes); - - // Create cursor - if (hw_mac_cursor_accl) { - cursor_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 4, 16, 16, 16, 2); - cursor_image->byte_order = MSBFirst; - cursor_image->bitmap_bit_order = MSBFirst; - cursor_mask_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 36, 16, 16, 16, 2); - cursor_mask_image->byte_order = MSBFirst; - cursor_mask_image->bitmap_bit_order = MSBFirst; - cursor_map = XCreatePixmap(x_display, the_win, 16, 16, 1); - cursor_mask_map = XCreatePixmap(x_display, the_win, 16, 16, 1); - cursor_gc = XCreateGC(x_display, cursor_map, 0, 0); - cursor_mask_gc = XCreateGC(x_display, cursor_mask_map, 0, 0); - mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, 0, 0); - cursor_changed = false; - } - - // Create no_cursor - else { - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, the_win, 1, 1, 1), - XCreatePixmap(x_display, the_win, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, the_win, mac_cursor); - } - - // Init blitting routines - bool native_byte_order; -#ifdef WORDS_BIGENDIAN - native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif -#ifdef ENABLE_VOSF - Screen_blitter_init(visualFormat, native_byte_order, depth); -#endif - - // Set bytes per row - XSync(x_display, false); - return true; -} - -// Open FBDev DGA display -static bool open_fbdev_dga(int width, int height) -{ -#ifdef ENABLE_FBDEV_DGA -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = -1; - for (int i = 0; i < num_x_video_modes; i++) { - if (x_video_modes[i]->hdisplay == width && x_video_modes[i]->vdisplay == height) { - best = i; - break; - } - }; - assert(best != -1); - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - D(bug("[fbdev] VideoMode %d: %d x %d @ %d\n", best, - x_video_modes[best]->hdisplay, x_video_modes[best]->vdisplay, - 1000 * x_video_modes[best]->dotclock / (x_video_modes[best]->htotal * x_video_modes[best]->vtotal))); - } -#endif - - if (ioctl(fb_dev_fd, FBIOGET_FSCREENINFO, &fb_finfo) != 0) { - D(bug("[fbdev] Can't get FSCREENINFO: %s\n", strerror(errno))); - return false; - } - D(bug("[fbdev] Device ID: %s\n", fb_finfo.id)); - D(bug("[fbdev] smem_start: %p [%d bytes]\n", fb_finfo.smem_start, fb_finfo.smem_len)); - - int fb_type = fb_finfo.type; - const char *fb_type_str = NULL; - switch (fb_type) { - case FB_TYPE_PACKED_PIXELS: fb_type_str = "Packed Pixels"; break; - case FB_TYPE_PLANES: fb_type_str = "Non interleaved planes"; break; - case FB_TYPE_INTERLEAVED_PLANES: fb_type_str = "Interleaved planes"; break; - case FB_TYPE_TEXT: fb_type_str = "Text/attributes"; break; - case FB_TYPE_VGA_PLANES: fb_type_str = "EGA/VGA planes"; break; - default: fb_type_str = ""; break; - } - D(bug("[fbdev] type: %s\n", fb_type_str)); - - if (fb_type != FB_TYPE_PACKED_PIXELS) { - D(bug("[fbdev] type '%s' not supported\n", fb_type_str)); - return false; - } - - int fb_visual = fb_finfo.visual; - const char *fb_visual_str; - switch (fb_visual) { - case FB_VISUAL_MONO01: fb_visual_str = "Monochrome 1=Black 0=White"; break; - case FB_VISUAL_MONO10: fb_visual_str = "Monochrome 1=While 0=Black"; break; - case FB_VISUAL_TRUECOLOR: fb_visual_str = "True color"; break; - case FB_VISUAL_PSEUDOCOLOR: fb_visual_str = "Pseudo color (like atari)"; break; - case FB_VISUAL_DIRECTCOLOR: fb_visual_str = "Direct color"; break; - case FB_VISUAL_STATIC_PSEUDOCOLOR: fb_visual_str = "Pseudo color readonly"; break; - default: fb_visual_str = ""; break; - } - D(bug("[fbdev] visual: %s\n", fb_visual_str)); - - if (fb_visual != FB_VISUAL_TRUECOLOR && fb_visual != FB_VISUAL_DIRECTCOLOR) { - D(bug("[fbdev] visual '%s' not supported\n", fb_visual_str)); - return false; - } - - // Map frame buffer - the_buffer = (uint8 *)mmap(NULL, fb_finfo.smem_len, PROT_READ | PROT_WRITE, MAP_SHARED, fb_dev_fd, 0); - if (the_buffer == MAP_FAILED) { - D(bug("[fbdev] Can't mmap /dev/fb0: %s\n", strerror(errno))); - return false; - } - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, DefaultVisual(x_display, screen), - CWEventMask | CWOverrideRedirect, &wattr); - - // Show window - XMapRaised(x_display, the_win); - wait_mapped(the_win); - - // Grab mouse and keyboard - XGrabKeyboard(x_display, the_win, True, - GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, the_win, True, - PointerMotionMask | ButtonPressMask | ButtonReleaseMask, - GrabModeAsync, GrabModeAsync, the_win, None, CurrentTime); - disable_mouse_accel(); - - // Create no_cursor - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, the_win, 1, 1, 1), - XCreatePixmap(x_display, the_win, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, the_win, mac_cursor); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((width + 7) & ~7, DepthModeForPixelDepth(depth)); -#if ENABLE_VOSF - // Extract current screen color masks (we are in True Color mode) - VisualFormat visualFormat; - visualFormat.depth = xdepth = DefaultDepth(x_display, screen); - XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo); - assert(visualFormat.depth == visualInfo.depth); - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - D(bug("[fbdev] %d bpp, (%08x,%08x,%08x)\n", - visualFormat.depth, - visualFormat.Rmask, visualFormat.Gmask, visualFormat.Bmask)); - D(bug("[fbdev] Mac depth %d bpp\n", depth)); - - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw -#ifdef WORDS_BIGENDIAN - const bool native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - const bool native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif - Screen_blitter_init(visualFormat, native_byte_order, depth); - - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - use_vosf = true; - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#endif - - // Set frame buffer base - D(bug("the_buffer = %p, use_vosf = %d\n", the_buffer, use_vosf)); - screen_base = Host2MacAddr(the_buffer); - VModes[cur_mode].viRowBytes = bytes_per_row; - return true; -#else - ErrorAlert("SheepShaver has been compiled with DGA support disabled."); - return false; -#endif -} - -// Open XF86 DGA display (!! should use X11 VidMode extensions to set mode) -static bool open_xf86_dga(int width, int height) -{ - if (is_fbdev_dga_mode) - return false; - -#ifdef ENABLE_XF86_DGA - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWOverrideRedirect | - (color_class == DirectColor ? CWColormap : 0), &wattr); - - // Show window - XMapRaised(x_display, the_win); - wait_mapped(the_win); - -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = 0; - for (int i=1; ihdisplay >= width && x_video_modes[i]->vdisplay >= height && - x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) { - best = i; - } - } - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - } -#endif - - // Establish direct screen connection - XMoveResizeWindow(x_display, the_win, 0, 0, width, height); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - - int v_width, v_bank, v_size; - XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size); - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - XF86DGASetVidPage(x_display, screen, 0); - - // Set colormap - if (!IsDirectMode(get_current_mode())) { - XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]); - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } - XSync(x_display, false); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, DepthModeForPixelDepth(depth)); -#if ENABLE_VOSF - bool native_byte_order; -#ifdef WORDS_BIGENDIAN - native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, native_byte_order, depth); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - D(bug("the_buffer = %p, use_vosf = %d\n", the_buffer, use_vosf)); - screen_base = Host2MacAddr(the_buffer); - VModes[cur_mode].viRowBytes = bytes_per_row; - return true; -#else - ErrorAlert("SheepShaver has been compiled with DGA support disabled."); - return false; -#endif -} - -// Open DGA display -static bool open_dga(int width, int height) -{ - bool display_open; - - display_open = open_xf86_dga(width, height); -#ifdef ENABLE_FBDEV_DGA - // Try to fallback to FBDev DGA mode - if (!display_open) { - is_fbdev_dga_mode = true; - display_open = open_fbdev_dga(width, height); - } -#endif - - // Common DGA display initialization - if (display_open) { - - // Fake image to get display bounds in the refresh function - if ((img = (XImage *)malloc(sizeof(*img))) == NULL) - return false; - img->width = DisplayWidth(x_display, screen); - img->height = DisplayHeight(x_display, screen); - img->depth = is_fbdev_dga_mode ? xdepth : depth; - img->bytes_per_line = TrivialBytesPerRow(img->width, DepthModeForPixelDepth(img->depth)); - } - - return display_open; -} - -static bool open_display(void) -{ - D(bug("open_display()\n")); - const VideoInfo &mode = VModes[cur_mode]; - - // Get original mouse acceleration - XGetPointerControl(x_display, &orig_accel_numer, &orig_accel_denom, &orig_threshold); - - // Find best available X visual - if (!find_visual_for_depth(mode.viAppleMode)) { - ErrorAlert(GetString(STR_NO_XVISUAL_ERR)); - return false; - } - - // Build up visualFormat structure - visualFormat.fullscreen = (display_type == DIS_SCREEN); - visualFormat.depth = visualInfo.depth; - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - - // Create color maps - if (color_class == PseudoColor || color_class == DirectColor) { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll); - } else { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocNone); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocNone); - } - - // Find pixel format of direct modes - if (color_class == DirectColor || color_class == TrueColor) { - rshift = gshift = bshift = 0; - rloss = gloss = bloss = 8; - uint32 mask; - for (mask=vis->red_mask; !(mask&1); mask>>=1) - ++rshift; - for (; mask&1; mask>>=1) - --rloss; - for (mask=vis->green_mask; !(mask&1); mask>>=1) - ++gshift; - for (; mask&1; mask>>=1) - --gloss; - for (mask=vis->blue_mask; !(mask&1); mask>>=1) - ++bshift; - for (; mask&1; mask>>=1) - --bloss; - } - - // Preset palette pixel values for CLUT or gamma table - if (color_class == DirectColor) { - int num = vis->map_entries; - for (int i=0; imap_entries : 256); - for (int i=0; i16/32 expand map - if (!IsDirectMode(get_current_mode()) && xdepth > 8) - for (int i=0; i<256; i++) - ExpandMap[i] = map_rgb(i, i, i); -#endif - - // Create display of requested type - display_type = mode.viType; - depth = depth_of_video_mode(mode.viAppleMode); - - bool display_open; - switch (display_type) { - case DIS_SCREEN: - display_open = open_dga(VModes[cur_mode].viXsize, VModes[cur_mode].viYsize); - break; - case DIS_WINDOW: - display_open = open_window(VModes[cur_mode].viXsize, VModes[cur_mode].viYsize); - break; - default: - display_open = false; - break; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Initialize the VOSF system - LOCK_VOSF; - if (!video_vosf_init()) { - ErrorAlert(GetString(STR_VOSF_INIT_ERR)); - UNLOCK_VOSF; - return false; - } - UNLOCK_VOSF; - } -#endif - - // Zero screen buffers, viRowBytes is initialized at this stage - if (display_open) { - memset(the_buffer, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - } - return display_open; -} - - -/* - * Close display - */ - -// Close window -static void close_window(void) -{ - if (have_shm) { - XShmDetach(x_display, &shminfo); -#ifdef ENABLE_VOSF - the_host_buffer = NULL; // don't free() in driver_base dtor -#else - the_buffer_copy = NULL; // don't free() in driver_base dtor -#endif - } - if (img) { - if (!have_shm) - img->data = NULL; - XDestroyImage(img); - } - if (have_shm) { - shmdt(shminfo.shmaddr); - shmctl(shminfo.shmid, IPC_RMID, 0); - } - if (the_gc) - XFreeGC(x_display, the_gc); - - XFlush(x_display); - XSync(x_display, false); -} - -// Close FBDev mode -static void close_fbdev_dga(void) -{ -#ifdef ENABLE_FBDEV_DGA - uint8 *fb_base; - if (!use_vosf) - fb_base = the_buffer; -#ifdef ENABLE_VOSF - else - fb_base = the_host_buffer; -#endif - munmap(fb_base, fb_finfo.smem_len); -#endif -} - -// Close XF86 DGA mode -static void close_xf86_dga(void) -{ -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, 0); -#endif -} - -// Close DGA mode -static void close_dga(void) -{ - if (is_fbdev_dga_mode) - close_fbdev_dga(); - else - close_xf86_dga(); - - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]); -#endif - - // Release fake image (it's not a normal XImage!) - free(img); - img = NULL; - - if (!use_vosf) { - // don't free() the screen buffer in driver_base dtor - the_buffer = NULL; - } -#ifdef ENABLE_VOSF - else { - // don't free() the screen buffer in driver_base dtor - the_host_buffer = NULL; - } -#endif -} - -static void close_display(void) -{ - if (display_type == DIS_SCREEN) - close_dga(); - else if (display_type == DIS_WINDOW) - close_window(); - - // Close window - if (the_win) { - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XDestroyWindow(x_display, the_win); - } - - // Free colormaps - if (cmap[0]) { - XFreeColormap(x_display, cmap[0]); - cmap[0] = 0; - } - if (cmap[1]) { - XFreeColormap(x_display, cmap[1]); - cmap[1] = 0; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - // the_buffer shall always be mapped through vm_acquire() so that we can vm_protect() it at will - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release(the_buffer, the_buffer_size); - the_buffer = NULL; - } - if (the_host_buffer) { - D(bug(" freeing the_host_buffer at %p\n", the_host_buffer)); - free(the_host_buffer); - the_host_buffer = NULL; - } - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#endif - - // Restore mouse acceleration - restore_mouse_accel(); -} - - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - const char *vendor = ServerVendor(x_display); - // Force use of MacX mappings on MacOS X with Apple's X server - int dummy; - if (XQueryExtension(x_display, "Apple-DRI", &dummy, &dummy, &dummy)) - vendor = "MacX"; - bool vendor_found = false; - char line[256]; - while (fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (vendor_found) { - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code; - else - break; - } else { - // Search for vendor string - if (strstr(vendor, line) == vendor) - vendor_found = true; - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = vendor_found; - - // Vendor not found? Then display warning - if (!vendor_found) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - } -} - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - int apple_id; - if (xsize < 800) - apple_id = APPLE_640x480; - else if (xsize < 1024) - apple_id = APPLE_800x600; - else if (xsize < 1152) - apple_id = APPLE_1024x768; - else if (xsize < 1280) { - if (ysize < 900) - apple_id = APPLE_1152x768; - else - apple_id = APPLE_1152x900; - } - else if (xsize < 1600) - apple_id = APPLE_1280x1024; - else - apple_id = APPLE_1600x1200; - return apple_id; -} - -// Find mode in list of supported modes -static int find_mode(int apple_mode, int apple_id, int type) -{ - for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) { - if (p->viType == type && p->viAppleID == apple_id && p->viAppleMode == apple_mode) - return p - VModes; - } - return -1; -} - -// Add custom video mode -static void add_custom_mode(VideoInfo *&p, int type, uint32 x, uint32 y, int apple_mode, int apple_id) -{ - p->viType = type; - p->viXsize = x; - p->viYsize = y; - p->viRowBytes = TrivialBytesPerRow(p->viXsize, apple_mode); - p->viAppleMode = apple_mode; - p->viAppleID = apple_id; - p++; -} - -// Add mode to list of supported modes -static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, int apple_mode, int apple_id, int type) -{ - if (allow & test) { - uint32 x = 0, y = 0; - switch (apple_id) { - case APPLE_W_640x480: - case APPLE_640x480: - x = 640; - y = 480; - break; - case APPLE_W_800x600: - case APPLE_800x600: - x = 800; - y = 600; - break; - case APPLE_1024x768: - x = 1024; - y = 768; - break; - case APPLE_1152x768: - x = 1152; - y = 768; - break; - case APPLE_1152x900: - x = 1152; - y = 900; - break; - case APPLE_1280x1024: - x = 1280; - y = 1024; - break; - case APPLE_1600x1200: - x = 1600; - y = 1200; - break; - } - add_custom_mode(p, type, x, y, apple_mode, apple_id); - } -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(VideoInfo *&p, int window_modes, int mode) -{ - add_mode(p, window_modes, 1, mode, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, 2, mode, APPLE_W_800x600, DIS_WINDOW); -} - -static bool has_mode(int x, int y) -{ -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) { - for (int i=0; ihdisplay == x && x_video_modes[i]->vdisplay == y) - return true; - return false; - } -#endif - return DisplayWidth(x_display, screen) >= x && DisplayHeight(x_display, screen) >= y; -} - -bool VideoInit(void) -{ -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Check if X server runs on local machine - local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "/", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0); - - // Init keycode translation - keycode_init(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Read mouse wheel prefs - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Init variables - private_data = NULL; - video_activated = true; - - // Find screen and root window - screen = XDefaultScreen(x_display); - rootwin = XRootWindow(x_display, screen); - - // Get sorted list of available depths - avail_depths = XListDepths(x_display, screen, &num_depths); - if (avail_depths == NULL) { - ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR)); - return false; - } - sort(avail_depths, avail_depths + num_depths); - - // Get screen depth - xdepth = DefaultDepth(x_display, screen); - -#ifdef ENABLE_XF86_DGA - // DGA available? - int event_base, error_base; - is_fbdev_dga_mode = false; - if (local_X11 && XF86DGAQueryExtension(x_display, &event_base, &error_base)) { - int dga_flags = 0; - XF86DGAQueryDirectVideo(x_display, screen, &dga_flags); - has_dga = dga_flags & XF86DGADirectPresent; -#if defined(__linux__) - // Check r/w permission on /dev/mem for DGA mode to work - if (has_dga && access("/dev/mem", R_OK | W_OK) != 0) - has_dga = false; -#endif - } else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_VIDMODE - // VidMode available? - int vm_event_base, vm_error_base; - has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base); - if (has_vidmode) { - int vm_major_version, vm_minor_version; - XF86VidModeQueryVersion(x_display, &vm_major_version, &vm_minor_version); - D(bug("VidMode extension %d.%d available\n", vm_major_version, vm_minor_version)); - XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes); - } -#endif - -#ifdef ENABLE_FBDEV_DGA - // FBDev available? - bool has_fbdev_dga = false; - if (local_X11) { - if ((fb_dev_fd = open("/dev/fb0", O_RDWR)) > 0) { - if (ioctl(fb_dev_fd, FBIOGET_VSCREENINFO, &fb_vinfo) != 0) - close(fb_dev_fd); - else { - has_fbdev_dga = true; - if (!has_dga) { - // Fallback to FBDev DGA mode if XF86 DGA is not possible - has_dga = true; - is_fbdev_dga_mode = true; - } - fb_orig_vinfo = fb_vinfo; - D(bug("Frame buffer device initial resolution: %dx%dx%d\n", fb_vinfo.xres, fb_vinfo.yres, fb_vinfo.bits_per_pixel)); - } - } - } -#endif - - // Find black and white colors - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black); - XAllocColor(x_display, DefaultColormap(x_display, screen), &black); - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white); - XAllocColor(x_display, DefaultColormap(x_display, screen), &white); - black_pixel = BlackPixel(x_display, screen); - white_pixel = WhitePixel(x_display, screen); - - // Mac screen depth follows X depth (for now) - int default_mode = APPLE_8_BIT; - switch (DefaultDepth(x_display, screen)) { - case 1: - default_mode = APPLE_1_BIT; - break; - case 8: - default_mode = APPLE_8_BIT; - break; - case 15: case 16: - default_mode = APPLE_16_BIT; - break; - case 24: case 32: - default_mode = APPLE_32_BIT; - break; - } - - // Get screen mode from preferences - const char *mode_str = PrefsFindString("screen"); - int default_width = 640, default_height = 480; - if (mode_str) { - display_type = DIS_INVALID; - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DIS_WINDOW; -#ifdef ENABLE_XF86_DGA - else if (has_dga && sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DIS_SCREEN; -#endif -#ifdef ENABLE_FBDEV_DGA - else if (has_fbdev_dga && sscanf(mode_str, "fbdev/%d/%d", &default_width, &default_height) == 2) { - is_fbdev_dga_mode = true; - display_type = DIS_SCREEN; - } -#endif - if (display_type == DIS_INVALID) { - D(bug("Invalid screen mode specified, defaulting to old modes selection\n")); - mode_str = NULL; - } - else { - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); - } - } - - // Construct video mode table - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - if (!has_dga) - screen_modes = 0; - if (mode_str) - window_modes = screen_modes = 0; - else if (window_modes == 0 && screen_modes == 0) - window_modes |= 3; // Allow at least 640x480 and 800x600 window modes - - VideoInfo *p = VModes; - if (mode_str) { - if (display_type == DIS_WINDOW) { - for (unsigned int d = APPLE_1_BIT; d <= APPLE_32_BIT; d++) { - if (find_visual_for_depth(d)) { - if (default_width > 640 && default_height > 480) - add_mode(p, 3, 1, d, APPLE_W_640x480, DIS_WINDOW); - if (default_width > 800 && default_height > 600) - add_mode(p, 3, 2, d, APPLE_W_800x600, DIS_WINDOW); - add_custom_mode(p, display_type, default_width, default_height, d, APPLE_CUSTOM); - } - } -#ifdef ENABLE_VOSF - } else if (display_type == DIS_SCREEN && is_fbdev_dga_mode) { - for (unsigned int d = APPLE_1_BIT; d <= default_mode; d++) - if (find_visual_for_depth(d)) - add_custom_mode(p, display_type, default_width, default_height, d, APPLE_CUSTOM); -#endif - } else - add_custom_mode(p, display_type, default_width, default_height, default_mode, APPLE_CUSTOM); - - // Add extra VidMode capable modes - if (display_type == DIS_SCREEN) { - struct { - int w; - int h; - int apple_id; - } - video_modes[] = { - { 640, 480, APPLE_640x480 }, - { 800, 600, APPLE_800x600 }, - { 1024, 768, APPLE_1024x768 }, - { 1152, 768, APPLE_1152x768 }, - { 1152, 900, APPLE_1152x900 }, - { 1280, 1024, APPLE_1280x1024 }, - { 1600, 1200, APPLE_1600x1200 }, - { 0, } - }; - - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (w >= default_width || h >= default_height) - continue; - if (has_mode(w, h)) { -#ifdef ENABLE_VOSF - if (is_fbdev_dga_mode) { - for (unsigned int d = APPLE_1_BIT; d <= default_mode; d++) - if (find_visual_for_depth(d)) - add_custom_mode(p, display_type, w, h, d, video_modes[i].apple_id); - } else -#endif - add_custom_mode(p, display_type, w, h, default_mode, video_modes[i].apple_id); - } - } - } - } else if (window_modes) { - for (unsigned int d = APPLE_1_BIT; d <= APPLE_32_BIT; d++) - if (find_visual_for_depth(d)) - add_window_modes(p, window_modes, d); - } else if (has_vidmode) { - if (has_mode(640, 480)) - add_mode(p, screen_modes, 1, default_mode, APPLE_640x480, DIS_SCREEN); - if (has_mode(800, 600)) - add_mode(p, screen_modes, 2, default_mode, APPLE_800x600, DIS_SCREEN); - if (has_mode(1024, 768)) - add_mode(p, screen_modes, 4, default_mode, APPLE_1024x768, DIS_SCREEN); - if (has_mode(1152, 768)) - add_mode(p, screen_modes, 64, default_mode, APPLE_1152x768, DIS_SCREEN); - if (has_mode(1152, 900)) - add_mode(p, screen_modes, 8, default_mode, APPLE_1152x900, DIS_SCREEN); - if (has_mode(1280, 1024)) - add_mode(p, screen_modes, 16, default_mode, APPLE_1280x1024, DIS_SCREEN); - if (has_mode(1600, 1200)) - add_mode(p, screen_modes, 32, default_mode, APPLE_1600x1200, DIS_SCREEN); - } else if (screen_modes) { - int xsize = DisplayWidth(x_display, screen); - int ysize = DisplayHeight(x_display, screen); - int apple_id = find_apple_resolution(xsize, ysize); - p->viType = DIS_SCREEN; - p->viRowBytes = 0; - p->viXsize = xsize; - p->viYsize = ysize; - p->viAppleMode = default_mode; - p->viAppleID = apple_id; - p++; - } - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; - - // Find default mode (window 640x480) - cur_mode = -1; - if (has_dga && screen_modes) { - int screen_width = DisplayWidth(x_display, screen); - int screen_height = DisplayHeight(x_display, screen); - int apple_id = find_apple_resolution(screen_width, screen_height); - if (apple_id != -1) - cur_mode = find_mode(default_mode, apple_id, DIS_SCREEN); - } else if (has_dga && mode_str) - cur_mode = find_mode(default_mode, APPLE_CUSTOM, DIS_SCREEN); - - if (cur_mode == -1) { - // pick up first windowed mode available - for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) { - if (p->viType == DIS_WINDOW && p->viAppleMode == default_mode) { - cur_mode = p - VModes; - break; - } - } - } - assert(cur_mode != -1); - -#if DEBUG - D(bug("Available video modes:\n")); - for (p = VModes; p->viType != DIS_INVALID; p++) { - int bits = depth_of_video_mode(p->viAppleMode); - D(bug(" %dx%d (ID %02x), %d colors\n", p->viXsize, p->viYsize, p->viAppleID, 1 << bits)); - } -#endif - - // Open window/screen - if (!open_display()) { - ErrorAlert(GetString(STR_OPEN_WINDOW_ERR)); - return false; - } - -#if 0 - // Ignore errors from now on - XSetErrorHandler(ignore_errors); -#endif - - // Lock down frame buffer - XSync(x_display, false); - LOCK_FRAME_BUFFER; - - // Start periodic thread - XSync(x_display, false); - if (sem_init(&thread_stop_ack, 0, 0) < 0) - return false; - if (sem_init(&thread_resume_req, 0, 0) < 0) - return false; - Set_pthread_attr(&redraw_thread_attr, 0); - redraw_thread_cancel = false; - redraw_thread_active = (pthread_create(&redraw_thread, &redraw_thread_attr, redraw_func, NULL) == 0); - D(bug("Redraw thread installed (%ld)\n", redraw_thread)); - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Stop redraw thread - if (redraw_thread_active) { - redraw_thread_cancel = true; - pthread_cancel(redraw_thread); - pthread_join(redraw_thread, NULL); - sem_destroy(&thread_stop_ack); - sem_destroy(&thread_resume_req); - redraw_thread_active = false; - } - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - XSync(x_display, false); - D(bug(" frame buffer unlocked\n")); - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Close window and server connection - if (x_display != NULL) { - XSync(x_display, false); - close_display(); - XFlush(x_display); - XSync(x_display, false); - } - -#ifdef ENABLE_FBDEV_DGA - // Close framebuffer device - if (fb_dev_fd >= 0) { - close(fb_dev_fd); - fb_dev_fd = -1; - } -#endif -} - - -/* - * Suspend/resume emulator - */ - -static void suspend_emul(void) -{ - if (display_type == DIS_SCREEN) { - // Release ctrl key - ADBKeyUp(0x36); - ctrl_down = false; - - // Lock frame buffer (this will stop the MacOS thread) - LOCK_FRAME_BUFFER; - - // Save frame buffer - fb_save = malloc(VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - if (fb_save) - Mac2Host_memcpy(fb_save, screen_base, VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - - // Close full screen display -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); -#endif - restore_mouse_accel(); - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XSync(x_display, false); - - // Open "suspend" window - XSetWindowAttributes wattr; - wattr.event_mask = KeyPressMask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.backing_store = Always; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - - suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBackingStore | CWColormap, &wattr); - set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE); - set_window_focus(suspend_win); - XMapWindow(x_display, suspend_win); - emul_suspended = true; - } -} - -static void resume_emul(void) -{ - // Close "suspend" window - XDestroyWindow(x_display, suspend_win); - XSync(x_display, false); - - // Reopen full screen display - XMapRaised(x_display, the_win); - wait_mapped(the_win); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - Window w = is_fbdev_dga_mode ? the_win : rootwin; - XGrabKeyboard(x_display, w, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, w, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, is_fbdev_dga_mode ? w : None, None, CurrentTime); - disable_mouse_accel(); -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) { - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - } -#endif - XSync(x_display, false); - - // the_buffer already contains the data to restore. i.e. since a temporary - // frame buffer is used when VOSF is actually used, fb_save is therefore - // not necessary. -#ifdef ENABLE_VOSF - if (use_vosf) { - LOCK_VOSF; - PFLAG_SET_ALL; - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - UNLOCK_VOSF; - } -#endif - - // Restore frame buffer - if (fb_save) { -#ifdef ENABLE_VOSF - // Don't copy fb_save to the temporary frame buffer in VOSF mode - if (!use_vosf) -#endif - Host2Mac_memcpy(screen_base, fb_save, VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - free(fb_save); - fb_save = NULL; - } - - // Unlock frame buffer (and continue MacOS thread) - UNLOCK_FRAME_BUFFER; - emul_suspended = false; -} - - -/* - * Close screen in full-screen mode - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DIS_SCREEN) { - quit_full_screen = true; - while (!quit_full_screen_ack) ; - } -} - - -/* - * X11 event handling - */ - -// Translate key event to Mac keycode -static int kc_decode(KeySym ks) -{ - switch (ks) { - case XK_A: case XK_a: return 0x00; - case XK_B: case XK_b: return 0x0b; - case XK_C: case XK_c: return 0x08; - case XK_D: case XK_d: return 0x02; - case XK_E: case XK_e: return 0x0e; - case XK_F: case XK_f: return 0x03; - case XK_G: case XK_g: return 0x05; - case XK_H: case XK_h: return 0x04; - case XK_I: case XK_i: return 0x22; - case XK_J: case XK_j: return 0x26; - case XK_K: case XK_k: return 0x28; - case XK_L: case XK_l: return 0x25; - case XK_M: case XK_m: return 0x2e; - case XK_N: case XK_n: return 0x2d; - case XK_O: case XK_o: return 0x1f; - case XK_P: case XK_p: return 0x23; - case XK_Q: case XK_q: return 0x0c; - case XK_R: case XK_r: return 0x0f; - case XK_S: case XK_s: return 0x01; - case XK_T: case XK_t: return 0x11; - case XK_U: case XK_u: return 0x20; - case XK_V: case XK_v: return 0x09; - case XK_W: case XK_w: return 0x0d; - case XK_X: case XK_x: return 0x07; - case XK_Y: case XK_y: return 0x10; - case XK_Z: case XK_z: return 0x06; - - case XK_1: case XK_exclam: return 0x12; - case XK_2: case XK_at: return 0x13; - case XK_3: case XK_numbersign: return 0x14; - case XK_4: case XK_dollar: return 0x15; - case XK_5: case XK_percent: return 0x17; - case XK_6: return 0x16; - case XK_7: return 0x1a; - case XK_8: return 0x1c; - case XK_9: return 0x19; - case XK_0: return 0x1d; - - case XK_grave: case XK_asciitilde: return 0x0a; - case XK_minus: case XK_underscore: return 0x1b; - case XK_equal: case XK_plus: return 0x18; - case XK_bracketleft: case XK_braceleft: return 0x21; - case XK_bracketright: case XK_braceright: return 0x1e; - case XK_backslash: case XK_bar: return 0x2a; - case XK_semicolon: case XK_colon: return 0x29; - case XK_apostrophe: case XK_quotedbl: return 0x27; - case XK_comma: case XK_less: return 0x2b; - case XK_period: case XK_greater: return 0x2f; - case XK_slash: case XK_question: return 0x2c; - - case XK_Tab: if (ctrl_down) {suspend_emul(); return -1;} else return 0x30; - case XK_Return: return 0x24; - case XK_space: return 0x31; - case XK_BackSpace: return 0x33; - - case XK_Delete: return 0x75; - case XK_Insert: return 0x72; - case XK_Home: case XK_Help: return 0x73; - case XK_End: return 0x77; -#ifdef __hpux - case XK_Prior: return 0x74; - case XK_Next: return 0x79; -#else - case XK_Page_Up: return 0x74; - case XK_Page_Down: return 0x79; -#endif - - case XK_Control_L: return 0x36; - case XK_Control_R: return 0x36; - case XK_Shift_L: return 0x38; - case XK_Shift_R: return 0x38; - case XK_Alt_L: return 0x37; - case XK_Alt_R: return 0x37; - case XK_Meta_L: return 0x3a; - case XK_Meta_R: return 0x3a; - case XK_Menu: return 0x32; - case XK_Caps_Lock: return 0x39; - case XK_Num_Lock: return 0x47; - - case XK_Up: return 0x3e; - case XK_Down: return 0x3d; - case XK_Left: return 0x3b; - case XK_Right: return 0x3c; - - case XK_Escape: if (ctrl_down) {quit_full_screen = true; emerg_quit = true; return -1;} else return 0x35; - - case XK_F1: if (ctrl_down) {SysMountFirstFloppy(); return -1;} else return 0x7a; - case XK_F2: return 0x78; - case XK_F3: return 0x63; - case XK_F4: return 0x76; - case XK_F5: return 0x60; - case XK_F6: return 0x61; - case XK_F7: return 0x62; - case XK_F8: return 0x64; - case XK_F9: return 0x65; - case XK_F10: return 0x6d; - case XK_F11: return 0x67; - case XK_F12: return 0x6f; - - case XK_Print: return 0x69; - case XK_Scroll_Lock: return 0x6b; - case XK_Pause: return 0x71; - -#if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End) - case XK_KP_0: case XK_KP_Insert: return 0x52; - case XK_KP_1: case XK_KP_End: return 0x53; - case XK_KP_2: case XK_KP_Down: return 0x54; - case XK_KP_3: case XK_KP_Next: return 0x55; - case XK_KP_4: case XK_KP_Left: return 0x56; - case XK_KP_5: case XK_KP_Begin: return 0x57; - case XK_KP_6: case XK_KP_Right: return 0x58; - case XK_KP_7: case XK_KP_Home: return 0x59; - case XK_KP_8: case XK_KP_Up: return 0x5b; - case XK_KP_9: case XK_KP_Prior: return 0x5c; - case XK_KP_Decimal: case XK_KP_Delete: return 0x41; -#else - case XK_KP_0: return 0x52; - case XK_KP_1: return 0x53; - case XK_KP_2: return 0x54; - case XK_KP_3: return 0x55; - case XK_KP_4: return 0x56; - case XK_KP_5: return 0x57; - case XK_KP_6: return 0x58; - case XK_KP_7: return 0x59; - case XK_KP_8: return 0x5b; - case XK_KP_9: return 0x5c; - case XK_KP_Decimal: return 0x41; -#endif - case XK_KP_Add: return 0x45; - case XK_KP_Subtract: return 0x4e; - case XK_KP_Multiply: return 0x43; - case XK_KP_Divide: return 0x4b; - case XK_KP_Enter: return 0x4c; - case XK_KP_Equal: return 0x51; - } - return -1; -} - -static int event2keycode(XKeyEvent &ev, bool key_down) -{ - KeySym ks; - int i = 0; - - do { - ks = XLookupKeysym(&ev, i++); - int as = kc_decode(ks); - if (as >= 0) - return as; - if (as == -2) - return as; - } while (ks != NoSymbol); - - return -1; -} - -static void handle_events(void) -{ - // Handle events - for (;;) { - XEvent event; - - XDisplayLock(); - if (!XCheckMaskEvent(x_display, eventmask, &event)) { - // Handle clipboard events - if (XCheckTypedEvent(x_display, SelectionRequest, &event)) - ClipboardSelectionRequest(&event.xselectionrequest); - else if (XCheckTypedEvent(x_display, SelectionClear, &event)) - ClipboardSelectionClear(&event.xselectionclear); - - // Window "close" widget clicked - else if (XCheckTypedEvent(x_display, ClientMessage, &event)) { - if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) { - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - } - } - - XDisplayUnlock(); - break; - } - XDisplayUnlock(); - - switch (event.type) { - // Mouse button - case ButtonPress: { - unsigned int button = ((XButtonEvent *)&event)->button; - if (button < 4) - ADBMouseDown(button - 1); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; ibutton; - if (button < 4) - ADBMouseUp(button - 1); - break; - } - - // Mouse entered window - case EnterNotify: - if (event.xcrossing.mode != NotifyGrab && event.xcrossing.mode != NotifyUngrab) - ADBMouseMoved(event.xmotion.x, event.xmotion.y); - break; - - // Mouse moved - case MotionNotify: - ADBMouseMoved(event.xmotion.x, event.xmotion.y); - break; - - // Keyboard - case KeyPress: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - resume_emul(); // Space wakes us up - } - } - break; - } - case KeyRelease: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, false); - if (code >= 0 && code != 0x39) { // Don't propagate Caps Lock releases - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh - case Expose: -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - UNLOCK_VOSF; - } - else -#endif - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - break; - } - } -} - - -/* - * Execute video VBL routine - */ - -void VideoVBL(void) -{ - if (emerg_quit) - QuitEmulator(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} - - -/* - * Change video mode - */ - -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - thread_stop_req = true; - sem_wait(&thread_stop_ack); - thread_stop_req = false; - DisableInterrupt(); - - /* close old display */ - close_display(); - - /* open new display */ - cur_mode = i; - bool ok = open_display(); - - /* opening the screen failed? Then bail out */ - if (!ok) { - ErrorAlert(GetString(STR_FULL_SCREEN_ERR)); - QuitEmulator(); - } - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - EnableInterrupt(); - sem_post(&thread_resume_req); - return noErr; - } - } - return paramErr; -} - - -/* - * Set color palette - */ - -void video_set_palette(void) -{ - LOCK_PALETTE; - - // Convert colors to XColor array - int mode = get_current_mode(); - int num_in = palette_size(mode); - int num_out = 256; - bool stretch = false; - if (IsDirectMode(mode)) { - // If X is in 565 mode we have to stretch the gamma table from 32 to 64 entries - num_out = vis->map_entries; - stretch = true; - } - XColor *p = x_palette; - for (int i=0; ired = mac_pal[c].red * 0x0101; - p->green = mac_pal[c].green * 0x0101; - p->blue = mac_pal[c].blue * 0x0101; - p++; - } - -#ifdef ENABLE_VOSF - // Recalculate pixel color expansion map - if (!IsDirectMode(mode) && xdepth > 8) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = map_rgb(mac_pal[c].red, mac_pal[c].green, mac_pal[c].blue); - } - - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - if (display_type == DIS_SCREEN) - PFLAG_SET_VERY_DIRTY; - UNLOCK_VOSF; - } -#endif - - // Tell redraw thread to change palette - palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -bool video_can_change_cursor(void) -{ - return hw_mac_cursor_accl && (display_type != DIS_SCREEN); -} - - -/* - * Set cursor image for window - */ - -void video_set_cursor(void) -{ - cursor_changed = true; -} - - -/* - * Thread for window refresh, event handling and other periodic actions - */ - -static void update_display(void) -{ - // Incremental update code - int wide = 0, high = 0, x1, x2, y1, y2, i, j; - int bytes_per_row = VModes[cur_mode].viRowBytes; - int bytes_per_pixel = VModes[cur_mode].viRowBytes / VModes[cur_mode].viXsize; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (j=0; j=y1; j--) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (depth == 1) { - x1 = VModes[cur_mode].viXsize; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; i<(x1>>3); i++) { - if (*p != *p2) { - x1 = i << 3; - break; - } - p++; - p2++; - } - } - x2 = x1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (i=(VModes[cur_mode].viXsize>>3); i>(x2>>3); i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i << 3; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + (x1 >> 3); - memcpy(&the_buffer_copy[i], &the_buffer[i], wide >> 3); - } - } - - } else { - x1 = VModes[cur_mode].viXsize; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; ix2; i--) { - p -= bytes_per_pixel; - p2 -= bytes_per_pixel; - if (memcmp(p, p2, bytes_per_pixel)) { - x2 = i; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + x1 * bytes_per_pixel; - memcpy(&the_buffer_copy[i], &the_buffer[i], bytes_per_pixel * wide); - } - } - } - } - - // Refresh display - if (high && wide) { - XDisplayLock(); - if (have_shm) - XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high, 0); - else - XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high); - XDisplayUnlock(); - } -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -static void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (palette_changed && !emul_suspended) { - palette_changed = false; - - int mode = get_current_mode(); - if (color_class == PseudoColor || color_class == DirectColor) { - int num = vis->map_entries; - bool set_clut = true; - if (!IsDirectMode(mode) && color_class == DirectColor) { - if (display_type == DIS_WINDOW) - set_clut = false; // Indexed mode on true color screen, don't set CLUT - } - - if (set_clut) { - XDisplayLock(); - XStoreColors(x_display, cmap[0], x_palette, num); - XStoreColors(x_display, cmap[1], x_palette, num); - XSync(x_display, false); - XDisplayUnlock(); - } - } - -#ifdef ENABLE_XF86_DGA - if (display_type == DIS_SCREEN && !is_fbdev_dga_mode) { - current_dga_cmap ^= 1; - if (!IsDirectMode(mode) && cmap[current_dga_cmap]) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } -#endif - } - - UNLOCK_PALETTE; -} - -static void *redraw_func(void *arg) -{ - int fd = ConnectionNumber(x_display); - - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - sem_post(&thread_stop_ack); - sem_wait(&thread_resume_req); - } - - int64 delay = next - GetTicks_usec(); - if (delay < -VIDEO_REFRESH_DELAY) { - - // We are lagging far behind, so we reset the delay mechanism - next = GetTicks_usec(); - - } else if (delay <= 0) { - - // Delay expired, refresh display - next += VIDEO_REFRESH_DELAY; - ticks++; - - // Handle X11 events - handle_events(); - - // Quit DGA mode if requested - if (quit_full_screen) { - quit_full_screen = false; - if (display_type == DIS_SCREEN) { - XDisplayLock(); -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XDestroyWindow(x_display, the_win); -#endif - XSync(x_display, false); - XDisplayUnlock(); - quit_full_screen_ack = true; - return NULL; - } - } - - // Refresh display and set cursor image in window mode - static int tick_counter = 0; - if (display_type == DIS_WINDOW) { - tick_counter++; - if (tick_counter >= frame_skip) { - tick_counter = 0; - - // Update display -#ifdef ENABLE_VOSF - if (use_vosf) { - XDisplayLock(); - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(); - UNLOCK_VOSF; - XSync(x_display, false); // Let the server catch up - } - XDisplayUnlock(); - } - else -#endif - update_display(); - - // Set new cursor image if it was changed - if (hw_mac_cursor_accl && cursor_changed) { - cursor_changed = false; - uint8 *x_data = (uint8 *)cursor_image->data; - uint8 *x_mask = (uint8 *)cursor_mask_image->data; - for (int i = 0; i < 32; i++) { - x_mask[i] = MacCursor[4 + i] | MacCursor[36 + i]; - x_data[i] = MacCursor[4 + i]; - } - XDisplayLock(); - XFreeCursor(x_display, mac_cursor); - XPutImage(x_display, cursor_map, cursor_gc, cursor_image, 0, 0, 0, 0, 16, 16); - XPutImage(x_display, cursor_mask_map, cursor_mask_gc, cursor_mask_image, 0, 0, 0, 0, 16, 16); - mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, MacCursor[2], MacCursor[3]); - XDefineCursor(x_display, the_win, mac_cursor); - XDisplayUnlock(); - } - } - } -#ifdef ENABLE_VOSF - else if (use_vosf) { - // Update display (VOSF variant) - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(); - UNLOCK_VOSF; - } - } - } -#endif - - // Set new palette if it was changed - handle_palette_changes(); - - } else { - - // No display refresh pending, check for X events - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 0; - timeout.tv_usec = delay; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) - handle_events(); - } - } - return NULL; -} - - -/* - * Record dirty area from NQD - */ - -void video_set_dirty_area(int x, int y, int w, int h) -{ - VideoInfo const & mode = VModes[cur_mode]; - const int screen_width = VIDEO_MODE_X; - const int screen_height = VIDEO_MODE_Y; - const int bytes_per_row = VIDEO_MODE_ROW_BYTES; - -#ifdef ENABLE_VOSF - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} diff --git a/SheepShaver/src/Unix/xpram_unix.cpp b/SheepShaver/src/Unix/xpram_unix.cpp deleted file mode 120000 index 12e37c986..000000000 --- a/SheepShaver/src/Unix/xpram_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/xpram_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/VideoDriverStub.i b/SheepShaver/src/VideoDriverStub.i deleted file mode 100644 index ad2ed6300..000000000 --- a/SheepShaver/src/VideoDriverStub.i +++ /dev/null @@ -1,24 +0,0 @@ - 0x4a, 0x6f, 0x79, 0x21, 0x70, 0x65, 0x66, 0x66, 0x70, 0x77, 0x70, 0x63, 0x00, 0x00, 0x00, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x03, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x01, 0x10, - 0x00, 0x04, 0x04, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x8c, - 0x00, 0x00, 0x00, 0x88, 0x00, 0x00, 0x00, 0x3f, 0x00, 0x00, 0x01, 0x40, 0x02, 0x01, 0x04, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x8c, 0x00, 0x00, 0x00, 0x80, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x44, 0x00, 0x00, 0x00, 0x48, 0x00, 0x00, 0x00, 0x68, - 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x02, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x54, 0x68, 0x65, 0x44, 0x72, 0x69, 0x76, 0x65, - 0x72, 0x44, 0x65, 0x73, 0x63, 0x72, 0x69, 0x70, 0x74, 0x69, 0x6f, 0x6e, 0x44, 0x6f, 0x44, 0x72, - 0x69, 0x76, 0x65, 0x72, 0x49, 0x4f, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x04, 0x00, 0x01, - 0x00, 0x14, 0xbd, 0xe0, 0x00, 0x0a, 0xd1, 0xfd, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x01, 0x02, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x90, 0x61, 0x00, 0x18, 0x90, 0x81, 0x00, 0x1c, 0x90, 0xa1, 0x00, 0x20, 0x90, 0xc1, 0x00, 0x24, - 0x90, 0xe1, 0x00, 0x28, 0x80, 0x40, 0x28, 0x08, 0x80, 0x00, 0x28, 0xd8, 0x7c, 0x09, 0x03, 0xa6, - 0x4e, 0x80, 0x04, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x08, 0x24, 0x6d, 0x74, 0x65, 0x6a, 0x04, 0x26, 0x05, 0x76, 0x69, 0x64, 0x65, 0x6f, 0x1a, 0x21, - 0x01, 0x01, 0x21, 0x80, 0x04, 0x3b, 0x06, 0x19, 0x44, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x5f, - 0x56, 0x69, 0x64, 0x65, 0x6f, 0x5f, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x5f, 0x53, 0x68, 0x65, 0x65, - 0x70, 0x00, 0x29, 0x2a, 0x01, 0x6e, 0x64, 0x72, 0x76, 0x76, 0x69, 0x64, 0x6f, 0x01, 0x03, diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in deleted file mode 100755 index edd28f596..000000000 --- a/SheepShaver/src/Windows/Makefile.in +++ /dev/null @@ -1,221 +0,0 @@ -# Windows Makefile for SheepShaver - -## System specific configuration -@SET_MAKE@ -SHELL = /bin/sh - -prefix = @prefix@ -exec_prefix = @exec_prefix@ -bindir = @bindir@ -datadir = @datadir@ -mandir = @mandir@ -man1dir = $(mandir)/man1 - -DESTDIR = - -SDL_CFLAGS = @SDL_CFLAGS@ -SDL_LIBS = @SDL_LIBS@ -WANT_GTK = @WANT_GTK@ -GTK_CFLAGS = @GTK_CFLAGS@ -GTK_LIBS = @GTK_LIBS@ - -SLIRP_CFLAGS = @SLIRP_CFLAGS@ -SLIRP_SRCS = \ - ../slirp/bootp.c ../slirp/ip_output.c ../slirp/tcp_input.c \ - ../slirp/cksum.c ../slirp/mbuf.c ../slirp/tcp_output.c \ - ../slirp/debug.c ../slirp/misc.c ../slirp/tcp_subr.c \ - ../slirp/if.c ../slirp/sbuf.c ../slirp/tcp_timer.c \ - ../slirp/ip_icmp.c ../slirp/slirp.c ../slirp/tftp.c \ - ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c -SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=$(OBJ_DIR)/slirp-%.o) - -LN_S = @LN_S@ -WINDRES = @WINDRES@ -CC = @CC@ -CXX = @CXX@ -CFLAGS = @CFLAGS@ $(SDL_CFLAGS) -CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp -DEFS = @DEFS@ -LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -lwsock32 -liphlpapi -CPUSRCS = @CPUSRCS@ -PERL = @PERL@ - -USE_DYNGEN = @USE_DYNGEN@ -DYNGENSRCS = @DYNGENSRCS@ -DYNGEN_CC = $(CXX) -DYNGEN_OP_FLAGS = @DYNGEN_OP_FLAGS@ - -HOST_CC = gcc -HOST_CXX = g++ -HOST_CFLAGS = -O2 -HOST_CXXFLAGS = -O2 -HOST_LDFLAGS = - -## Files -UNIXSRCS = vm_alloc.cpp vm_alloc.h sigsegv.cpp sigsegv.h video_vosf.h video_blit.cpp video_blit.h - -ROUTERSRCS = router/arp.cpp router/dump.cpp router/dynsockets.cpp router/ftp.cpp \ - router/icmp.cpp router/mib/interfaces.cpp router/iphelp.cpp router/ipsocket.cpp \ - router/mib/mibaccess.cpp router/router.cpp router/tcp.cpp router/udp.cpp b2ether/packet32.cpp - -SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_windows.cpp \ - sys_windows.cpp cdenable/cache.cpp cdenable/eject_nt.cpp cdenable/ntcd.cpp \ - ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ - ../macos_util.cpp ../timer.cpp timer_windows.cpp ../xpram.cpp xpram_windows.cpp \ - ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ - ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp video_blit.cpp \ - ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ - ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ - about_window_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ - ../dummy/prefs_editor_dummy.cpp clip_windows.cpp util_windows.cpp kernel_windows.cpp \ - vm_alloc.cpp sigsegv.cpp posix_emu.cpp SheepShaver.rc \ - $(CPUSRCS) $(ROUTERSRCS) $(SLIRP_OBJS) - -UI_SRCS = ../prefs.cpp prefs_windows.cpp prefs_editor_gtk.cpp xpram_windows.cpp \ - ../prefs_items.cpp ../user_strings.cpp user_strings_windows.cpp util_windows.cpp \ - b2ether/packet32.cpp SheepShaverGUI.rc - -UI_APP = SheepShaverGUI.exe - -APP = SheepShaver.exe - -PROGS = $(APP) - -ifeq ($(WANT_GTK),yes) -PROGS += $(UI_APP) -endif - -## Rules -.PHONY: clean distclean -.SUFFIXES: -.SUFFIXES: .c .cpp .S .o .h - -all: $(PROGS) - -$(UNIXSRCS): %: ../Unix/% - $(LN_S) $< $@ - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS = $(SRCS_LIST_TO_OBJS) - -define UI_SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(UI_SRCS), \ - $(basename $(notdir $(file)))))) -endef -UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) - -define DYNGENSRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .ho, $(foreach file, $(DYNGENSRCS), \ - $(basename $(notdir $(file)))))) -endef -DYNGENOBJS = $(DYNGENSRCS_LIST_TO_OBJS) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -$(APP): $(UNIXSRCS) $(OBJ_DIR) $(OBJS) - $(CXX) -o $(APP) $(LDFLAGS) $(OBJS) $(LIBS) $(SDL_LIBS) - -$(UI_APP): $(UNIXSRCS) $(OBJ_DIR) $(UI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) $(GTK_LIBS) -mwindows -mno-cygwin - -mostlyclean: - rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak - -clean: mostlyclean - rm -f $(UNIXSRCS) - rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc-execute-impl.cpp - -distclean: clean - rm -rf $(OBJ_DIR) - rm -rf autom4te.cache - rm -f Makefile - rm -f config.cache config.log config.status config.h - -depend dep: - makedepend $(CPPFLAGS) -Y. $(SRCS) 2>/dev/null - -$(OBJ_DIR)/%.ho : %.c - $(HOST_CC) $(CPPFLAGS) $(DEFS) $(HOST_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.ho : %.cpp - $(HOST_CXX) $(CPPFLAGS) $(DEFS) $(HOST_CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/slirp-%.o : ../slirp/%.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) $(SLIRP_CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.c - $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.mm - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.S - $(CPP) $(CPPFLAGS) -D__ASSEMBLY__ $< -o $*.out.s - $(AS) $(ASFLAGS) -o $@ $*.out.s - rm $*.out.s -$(OBJ_DIR)/prefs_editor_gtk.o: prefs_editor_gtk.cpp - $(CXX) -O2 -mno-cygwin -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ - -# Windows resources -$(OBJ_DIR)/%.o: %.rc - $(WINDRES) --include-dir ../Windows -i $< -o $@ - -# Kheperix CPU emulator -kpxsrcdir = ../kpx_cpu/src -GENEXECPL = $(kpxsrcdir)/cpu/ppc/genexec.pl -DYNGEN = dyngen.exe - -ifeq ($(USE_DYNGEN),yes) -DYNGENDEPS = basic-dyngen-ops.hpp ppc-dyngen-ops.hpp - -$(DYNGEN): $(DYNGENOBJS) - $(HOST_CXX) -o $@ $(LDFLAGS) $(DYNGENOBJS) - -$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp -$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< - -$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp -$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< - -$(OBJ_DIR)/sheepshaver_glue.o $(OBJ_DIR)/ppc-cpu.o $(OBJ_DIR)/ppc-decode.o $(OBJ_DIR)/ppc-translate.o $(OBJ_DIR)/ppc-jit.o: basic-dyngen-ops.hpp ppc-dyngen-ops.hpp -endif - -$(OBJ_DIR)/ppc-execute.o: ppc-execute-impl.cpp -ppc-execute-impl.cpp: $(kpxsrcdir)/cpu/ppc/ppc-decode.cpp $(GENEXECPL) $(DYNGENDEPS) - $(CPP) $(CPPFLAGS) -DGENEXEC $< | $(PERL) $(GENEXECPL) > $@ - -# PowerPC CPU tester -TESTSRCS_ = mathlib/ieeefp.cpp mathlib/mathlib.cpp cpu/ppc/ppc-cpu.cpp cpu/ppc/ppc-decode.cpp cpu/ppc/ppc-execute.cpp cpu/ppc/ppc-translate.cpp test/test-powerpc.cpp $(MONSRCS) vm_alloc.cpp utils/utils-cpuinfo.cpp -ifeq ($(USE_DYNGEN),yes) -TESTSRCS_ += cpu/jit/jit-cache.cpp cpu/jit/basic-dyngen.cpp cpu/ppc/ppc-dyngen.cpp cpu/ppc/ppc-jit.cpp -endif -TESTSRCS = $(TESTSRCS_:%.cpp=$(kpxsrcdir)/%.cpp) - -define TESTSRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(TESTSRCS), \ - $(basename $(notdir $(file)))))) -endef -TESTOBJS = $(TESTSRCS_LIST_TO_OBJS) - -$(OBJ_DIR)/test-powerpc.o: $(kpxsrcdir)/test/test-powerpc.cpp - $(HOST_CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -DEMU_KHEPERIX -c $< -o $@ - -test-powerpc.exe: $(TESTOBJS) - $(HOST_CXX) -o $@ $(LDFLAGS) $(TESTOBJS) -mconsole - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/SheepShaver/src/Windows/SheepShaver.ico b/SheepShaver/src/Windows/SheepShaver.ico deleted file mode 100755 index 40c862d2ca7b612cd1215d47bbd65f17e5a4faf8..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2238 zcmc(fF-+@L7==%UCqC==5a-543^Qe|YkEej)CQM)iQ zBBcW(%7oPRiIEXUvfS^t<0Q08x7zw_bME>7bMLi@)ZyIO5!bG6x>77@7m#!SrvK~c ztdwrItIf?#B}qb`9qsP!YHx2(`}_MkI5^PZ;h~O>j&yu{tdo-yot~cR?CebE=jXb( zxX@%W(dFf(LI}FPzShmnjc#vmb$55C`}=!6JUr;}@lj7tPkMfS*2~L_USD7J_V%WV zY5WDh!*B32`~cs>5qt|dsCNFzeG0$APjCVMa9YFvU~_?vRRvQ`A%F)5f~pGW0X?7x zbSntx9^IpRbdT=QJ-S18=nmbXJ9I}$r6~mP-~f}AXlkWX@*#i+2MFloLjVsBXoOBa z1n}U%8dX#BA%F)5g36N*0X#Thg8a?R@&ox0z=H#tppy^wPCYo_4|MV&fCmTGtP12q z01pmi{P=}wkOv+dusO_w_hk8=dH@kcz2KJRv*!D*bY$8K2{pcJ4Id$28vp7C@l>Wm3cXUyrac9!`tmM<n42);`&KFhPU32^P3ynX`9HpnL%%@z5OD`h0>TEX&h3&?$ulr zXDU*qg+`5GZOk5(F;bXiv@n=$Wm2)MAFVrDOI<(LJY^oVFb@-0^e}CnX`U;e59dRh z>qxrdhJ)-fD>IgsmT5UGF%(#$tG=#Md%r4sy?@|; z&ZJC>WURX0md0l>z_K#rWje-S_4U#%zx>7wY5cM2fk7Il^$yF17Y0SlgZf!IwsS!J z2Q3YX1_RzenavtQ#Q2BLvHBSnmAoQ8kB`}CHkx4>r%_f_u`nz;#L-5^2Rh3!U>VoD zOG!+NGULJKVZ)7KxcUHWPdBRSlW5!+a-^?TFR*=zg(1&pjK;Hg)@}9G-CA+P{7Yk5 WMXVglC(YKTuvFI`?C0lyKK=%pC1gMV diff --git a/SheepShaver/src/Windows/SheepShaver.rc b/SheepShaver/src/Windows/SheepShaver.rc deleted file mode 100755 index b7e5281d5..000000000 --- a/SheepShaver/src/Windows/SheepShaver.rc +++ /dev/null @@ -1 +0,0 @@ -SheepShaver ICON PRELOAD "SheepShaver.ico" diff --git a/SheepShaver/src/Windows/SheepShaverGUI.ico b/SheepShaver/src/Windows/SheepShaverGUI.ico deleted file mode 100755 index 67d4c55fab03db3146193a2c8fcfc69907eaabc3..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1078 zcmchWJ#vIF422(?%(zQ90##;@kt4aI_0fEslqu7ZPqGc(#SJMUkfo~K;7@qcE31@<9aF-IC#51-QI&H>nq%`<+h!WfVQh$Ucf(}0+9O}TOLWlj#9k%d?_(vS@ zhtB_uPxal<*Ed7Oev8uSQNQgbmCE;P?Qr=cz4!c0+y9GgUz_t8Uf?$88GTHN8OOs+ zyI@7VHs?NE)M(_bp)q{oDCCYUpxD>wQo&^eIyQw6C(kdq=CwL?pBy+RocOn|vgQ2( DRT%bz diff --git a/SheepShaver/src/Windows/SheepShaverGUI.rc b/SheepShaver/src/Windows/SheepShaverGUI.rc deleted file mode 100644 index db7ed5487..000000000 --- a/SheepShaver/src/Windows/SheepShaverGUI.rc +++ /dev/null @@ -1,2 +0,0 @@ -SheepShaverGUI ICON PRELOAD "SheepShaverGUI.ico" - diff --git a/SheepShaver/src/Windows/about_window_windows.cpp b/SheepShaver/src/Windows/about_window_windows.cpp deleted file mode 100755 index 4527aad5a..000000000 --- a/SheepShaver/src/Windows/about_window_windows.cpp +++ /dev/null @@ -1,30 +0,0 @@ -/* - * about_window_windows.cpp - "About" window, Windows implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "about_window.h" - - -/* - * Open "About" window - */ - -void OpenAboutWindow(void) -{ -} diff --git a/SheepShaver/src/Windows/b2ether b/SheepShaver/src/Windows/b2ether deleted file mode 120000 index cf8fd89bb..000000000 --- a/SheepShaver/src/Windows/b2ether +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/b2ether \ No newline at end of file diff --git a/SheepShaver/src/Windows/cd_defs.h b/SheepShaver/src/Windows/cd_defs.h deleted file mode 120000 index fdaec5bdd..000000000 --- a/SheepShaver/src/Windows/cd_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/cd_defs.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/cdenable b/SheepShaver/src/Windows/cdenable deleted file mode 120000 index 3b36f98ca..000000000 --- a/SheepShaver/src/Windows/cdenable +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/cdenable \ No newline at end of file diff --git a/SheepShaver/src/Windows/clip_windows.cpp b/SheepShaver/src/Windows/clip_windows.cpp deleted file mode 120000 index 2669ccc95..000000000 --- a/SheepShaver/src/Windows/clip_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/clip_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac deleted file mode 100755 index dcb4bfe03..000000000 --- a/SheepShaver/src/Windows/configure.ac +++ /dev/null @@ -1,266 +0,0 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written in 2002 by Christian Bauer - -AC_INIT([SheepShaver], 2.3, [Christian.Bauer@uni-mainz.de], SheepShaver) -AC_CONFIG_SRCDIR(main_windows.cpp) -AC_CONFIG_AUX_DIR(../Unix) -AC_PREREQ(2.52) -AC_CONFIG_HEADER(config.h) - -dnl Canonical system information. -AC_CANONICAL_HOST -AC_CANONICAL_TARGET - -dnl Options. -AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) -AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) - -dnl Checks for programs. -AC_PROG_CC -AC_PROG_CPP -AC_PROG_CXX -AC_PROG_MAKE_SET -AC_PROG_EGREP -AC_PROG_LN_S -AC_PATH_PROG(PERL, [perl]) -AC_CHECK_TOOL(WINDRES, windres) - -dnl We use GTK+ if possible. -if [[ "x$WANT_GTK" = "xyes" ]]; then - AM_PATH_GTK_2_0(1.3.15, [], [ - AC_MSG_WARN([Could not find GTK+ 2.0, disabling user interface.]) - WANT_GTK=no - ]) -fi -AC_SUBST(WANT_GTK) - -dnl We use 64-bit file size support if possible. -AC_SYS_LARGEFILE - -dnl Checks for header files. -AC_HEADER_STDC - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_C_BIGENDIAN -AC_C_CONST -AC_C_INLINE -AC_CHECK_SIZEOF(short, 2) -AC_CHECK_SIZEOF(int, 4) -AC_CHECK_SIZEOF(long, 4) -AC_CHECK_SIZEOF(long long, 8) -AC_CHECK_SIZEOF(float, 4) -AC_CHECK_SIZEOF(double, 8) -AC_CHECK_SIZEOF(void *, 4) -AC_TYPE_OFF_T -AC_CHECK_TYPES(loff_t) -AC_TYPE_SIZE_T - -dnl Checks for library functions. -AC_CHECK_FUNCS(strdup strerror) -AC_CHECK_FUNCS(exp2f log2f exp2 log2) -AC_CHECK_FUNCS(floorf roundf ceilf truncf) -AC_CHECK_FUNCS(floor round ceil trunc) - -dnl Define a macro that translates a yesno-variable into a C macro definition -dnl to be put into the config.h file -dnl $1 -- the macro to define -dnl $2 -- the value to translate -dnl $3 -- template name -AC_DEFUN([AC_TRANSLATE_DEFINE], [ - if [[ "x$2" = "xyes" -o "x$2" = "xguessing yes" ]]; then - AC_DEFINE($1, 1, $3) - fi -]) - -dnl Check that VirtualAlloc(), VirtualProtect() work -AC_CACHE_CHECK([whether VirtualProtect works], - ac_cv_VirtualProtect_works, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - ac_cv_VirtualProtect_works=yes - dnl First the tests that should segfault - for test_def in NONE_READ NONE_WRITE READ_WRITE; do - AC_TRY_RUN([ - #define HAVE_WIN32_VM 1 - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_$test_def - #include "../Unix/vm_alloc.cpp" - ], ac_cv_VirtualProtect_works=no, rm -f core, - dnl When cross-compiling, assume it works - ac_cv_VirtualProtect_works="yes" - ) - done - AC_TRY_RUN([ - #define HAVE_WIN32_VM 1 - #define CONFIGURE_TEST_VM_MAP - #define TEST_VM_PROT_RDWR_WRITE - #include "../Unix/vm_alloc.cpp" - ], , ac_cv_VirtualProtect_works=no, - dnl When cross-compiling, assume it works - ac_cv_VirtualProtect_works="yes" - ) - AC_LANG_RESTORE - ] -) -if [[ "x$ac_cv_VirtualProtect_works" = "xyes" ]]; then - AC_DEFINE(HAVE_WIN32_VM, 1, [Define if your system has a working Win32-based memory allocator.]) -else - AC_MSG_ERROR([Sorry, Windows VM functions don't work as expected on your system.]) -fi - -dnl Check if Windows exceptions are supported. -AC_CACHE_CHECK([whether your system supports Windows exceptions], - ac_cv_have_win32_exceptions, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_WIN32_EXCEPTIONS 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" - ], - ac_cv_have_win32_exceptions=yes, - ac_cv_have_win32_exceptions=no, - dnl When cross-compiling, assume it works - ac_cv_have_win32_exceptions="yes" - ) - AC_LANG_RESTORE - ] -) -if [[ "x$ac_cv_have_win32_exceptions" = "xyes" ]]; then - AC_DEFINE(HAVE_WIN32_EXCEPTIONS, 1, [Define if your system supports Windows exceptions.]) -else - AC_MSG_ERROR([Sorry, Windows exceptions don't work as expected on your system.]) -fi - -dnl Check if we can ignore the fault (instruction skipping in SIGSEGV handler) -AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], - ac_cv_have_skip_instruction, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" - ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, - dnl When cross-compiling, assume it works - ac_cv_have_skip_instruction="yes" - ) - AC_LANG_RESTORE - ] -) -AC_TRANSLATE_DEFINE(HAVE_SIGSEGV_SKIP_INSTRUCTION, "$ac_cv_have_skip_instruction", - [Define if we can ignore the fault (instruction skipping in SIGSEGV handler).]) - -dnl We really want VOSF (Video on SEGV Signals) screen updates acceleration -AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) - -dnl Check for GCC 2.7 or higher. -HAVE_GCC27=no -AC_MSG_CHECKING(for GCC 2.7 or higher) -AC_EGREP_CPP(xyes, -[#if __GNUC__ - 1 > 1 || __GNUC_MINOR__ - 1 > 5 - xyes -#endif -], [AC_MSG_RESULT(yes); HAVE_GCC27=yes], AC_MSG_RESULT(no)) - -dnl Check for GCC 3.0 or higher. -HAVE_GCC30=no -AC_MSG_CHECKING(for GCC 3.0 or higher) -AC_EGREP_CPP(xyes, -[#if __GNUC__ >= 3 - xyes -#endif -], [AC_MSG_RESULT(yes); HAVE_GCC30=yes], AC_MSG_RESULT(no)) - -dnl Add -fno-strict-aliasing for slirp sources -if [[ "x$HAVE_GCC30" = "xyes" ]]; then - SAVED_CFLAGS="$CFLAGS" - CFLAGS="$CFLAGS -fno-strict-aliasing" - AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], - ac_cv_gcc_no_strict_aliasing, [ - AC_TRY_COMPILE([],[], - [ac_cv_gcc_no_strict_aliasing=yes; AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing")], - [ac_cv_gcc_no_strict_aliasing=no]) - ]) - CFLAGS="$SAVED_CFLAGS" -fi - -dnl CPU emulator sources -CPUSRCS="\ - ../kpx_cpu/src/mathlib/ieeefp.cpp \ - ../kpx_cpu/src/mathlib/mathlib.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-cpu.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-decode.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-execute.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-translate.cpp \ - ../kpx_cpu/src/utils/utils-cpuinfo.cpp" -CPPFLAGS="$CPPFLAGS -I../kpx_cpu/include -I../kpx_cpu/src" - -dnl Enable JIT compiler, if possible -USE_DYNGEN="no" -if [[ "x$WANT_JIT" = "xyes" ]]; then - case $host_cpu in - i?86) - DYNGEN_OP_FLAGS="-fomit-frame-pointer -mpreferred-stack-boundary=2" - if [[ "x$HAVE_GCC30" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -falign-functions=0" - else - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -malign-functions=0" - fi - ;; - esac - USE_DYNGEN="yes" - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -finline-limit=10000 -g0" - if [[ "x$HAVE_GCC30" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls" - fi - AC_DEFINE(ENABLE_DYNGEN, 1, [Define to enable dyngen engine]) - DYNGENSRCS="\ - ../kpx_cpu/src/cpu/jit/dyngen.c \ - ../kpx_cpu/src/cpu/jit/cxxdemangle.cpp" - CPUSRCS="\ - ../kpx_cpu/src/cpu/jit/jit-cache.cpp \ - ../kpx_cpu/src/cpu/jit/basic-dyngen.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp \ - ../kpx_cpu/src/cpu/ppc/ppc-jit.cpp $CPUSRCS" - CPPFLAGS="$CPPFLAGS -DUSE_JIT" -fi -CPUSRCS="$CPUSRCS ../kpx_cpu/sheepshaver_glue.cpp ../kpx_cpu/ppc-dis.c" - -dnl Use the dummy prefs file. -CPUSRCS="$CPUSRCS ../dummy/prefs_dummy.cpp" - -dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) -SDL_CFLAGS=`$sdl_config --cflags` -AC_SUBST(SDL_CFLAGS) -SDL_LIBS=`$sdl_config --libs` -AC_SUBST(SDL_LIBS) -AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) -AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) -AC_DEFINE(USE_SDL_AUDIO, 1, [Define to enable SDL audio support]) - -dnl Remove the "-g" option if set for GCC. -if [[ "x$HAVE_GCC27" = "xyes" ]]; then - CFLAGS=`echo $CFLAGS | sed -e 's/-g\b//g'` - CXXFLAGS=`echo $CXXFLAGS | sed -e 's/-g\b//g'` -fi - -dnl Generate Makefile. -AC_SUBST(PERL) -AC_SUBST(USE_DYNGEN) -AC_SUBST(DYNGENSRCS) -AC_SUBST(DYNGEN_OP_FLAGS) -AC_SUBST(CPUSRCS) -AC_OUTPUT([Makefile]) - -dnl Print summary. -echo -echo SheepShaver configuration summary: -echo -echo Enable JIT compiler .............. : $WANT_JIT -echo GTK user interface ............... : $WANT_GTK -echo -echo "Configuration done. Now type \"make\"." diff --git a/SheepShaver/src/Windows/ether_windows.cpp b/SheepShaver/src/Windows/ether_windows.cpp deleted file mode 120000 index 445951886..000000000 --- a/SheepShaver/src/Windows/ether_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/ether_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/ether_windows.h b/SheepShaver/src/Windows/ether_windows.h deleted file mode 120000 index 6659d3c9b..000000000 --- a/SheepShaver/src/Windows/ether_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/ether_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/extfs_windows.cpp b/SheepShaver/src/Windows/extfs_windows.cpp deleted file mode 120000 index 26d851b35..000000000 --- a/SheepShaver/src/Windows/extfs_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/extfs_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/kernel_windows.cpp b/SheepShaver/src/Windows/kernel_windows.cpp deleted file mode 120000 index d9c12cdc5..000000000 --- a/SheepShaver/src/Windows/kernel_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/kernel_windows.h b/SheepShaver/src/Windows/kernel_windows.h deleted file mode 120000 index 10e68cebd..000000000 --- a/SheepShaver/src/Windows/kernel_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp deleted file mode 100755 index 2d63d76b8..000000000 --- a/SheepShaver/src/Windows/main_windows.cpp +++ /dev/null @@ -1,828 +0,0 @@ -/* - * main_windows.cpp - Emulation core, Windows implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include -#include - -#include - -#include "sysdeps.h" -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "video.h" -#include "sys.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "user_strings.h" -#include "vm_alloc.h" -#include "sigsegv.h" -#include "util_windows.h" -#include "kernel_windows.h" - -#define DEBUG 0 -#include "debug.h" - -#ifdef ENABLE_MON -#include "mon.h" -#endif - - -// Constants -const char ROM_FILE_NAME[] = "ROM"; -const char ROM_FILE_NAME2[] = "Mac OS ROM"; - -const uintptr ROM_BASE = 0x40800000; // Base address of ROM - -const uint32 SIG_STACK_SIZE = 0x10000; // Size of signal stack - - -// Global variables (exported) -uint32 RAMBase; // Base address of Mac RAM -uint32 RAMSize; // Size of Mac RAM -uint32 ROMBase; // Base address of Mac ROM -uint32 KernelDataAddr; // Address of Kernel Data -uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM -uint32 DRCacheAddr; // Address of DR Cache -uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) -DWORD win_os; // Windows OS id -DWORD win_os_major; // Windows OS version major - - -// Global variables -static int kernel_area = -1; // SHM ID of Kernel Data area -static bool rom_area_mapped = false; // Flag: Mac ROM mmap()ped -static bool ram_area_mapped = false; // Flag: Mac RAM mmap()ped -static bool dr_cache_area_mapped = false; // Flag: Mac DR Cache mmap()ped -static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped -static KernelData *kernel_data; // Pointer to Kernel Data -static EmulatorData *emulator_data; - -static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes -static bool nvram_thread_active = false; // Flag: NVRAM watchdog installed -static volatile bool nvram_thread_cancel; // Flag: Cancel NVRAM thread -static HANDLE nvram_thread = NULL; // NVRAM watchdog -static bool tick_thread_active = false; // Flag: MacOS thread installed -static volatile bool tick_thread_cancel; // Flag: Cancel 60Hz thread -static HANDLE tick_thread = NULL; // 60Hz thread -static HANDLE emul_thread = NULL; // MacOS thread -static uintptr sig_stack = 0; // Stack for PowerPC interrupt routine - -uint32 SheepMem::page_size; // Size of a native page -uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros -uintptr SheepMem::base = 0x60000000; // Address of SheepShaver data -uintptr SheepMem::proc; // Bottom address of SheepShave procedures -uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) - - -// Prototypes -static bool kernel_data_init(void); -static void kernel_data_exit(void); -static void Quit(void); -static DWORD WINAPI nvram_func(void *arg); -static DWORD WINAPI tick_func(void *arg); - -static void jump_to_rom(uint32 entry); -extern void emul_ppc(uint32 start); -extern void init_emul_ppc(void); -extern void exit_emul_ppc(void); -sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip); - - -/* - * Return signal stack base - */ - -uintptr SignalStackBase(void) -{ - return sig_stack + SIG_STACK_SIZE; -} - - -/* - * Memory management helpers - */ - -static inline int vm_mac_acquire(uint32 addr, uint32 size) -{ - return vm_acquire_fixed(Mac2HostAddr(addr), size); -} - -static inline int vm_mac_release(uint32 addr, uint32 size) -{ - return vm_release(Mac2HostAddr(addr), size); -} - - -/* - * Main program - */ - -static void usage(const char *prg_name) -{ - printf("Usage: %s [OPTION...]\n", prg_name); - printf("\nUnix options:\n"); - printf(" --display STRING\n X display to use\n"); - PrefsPrintUsage(); - exit(0); -} - -int main(int argc, char **argv) -{ - char str[256]; - int16 i16; - HANDLE rom_fh; - const char *rom_path; - uint32 rom_size; - DWORD actual; - uint8 *rom_tmp; - - // Initialize variables - RAMBase = 0; - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Read preferences - PrefsInit(NULL, argc, argv); - - // Parse command line arguments - for (int i=1; i= 4.0 - OSVERSIONINFO osvi; - ZeroMemory(&osvi, sizeof(OSVERSIONINFO)); - osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); - if (!GetVersionEx(&osvi)) { - ErrorAlert("Could not determine OS type"); - QuitEmulator(); - } - win_os = osvi.dwPlatformId; - win_os_major = osvi.dwMajorVersion; - if (win_os != VER_PLATFORM_WIN32_NT || win_os_major < 4) { - ErrorAlert(GetString(STR_NO_WIN32_NT_4)); - QuitEmulator(); - } - - // Check that drivers are installed - if (!check_drivers()) - QuitEmulator(); - - // Load win32 libraries - KernelInit(); - - // FIXME: default to DIB driver - if (getenv("SDL_VIDEODRIVER") == NULL) - putenv("SDL_VIDEODRIVER=windib"); - - // Initialize SDL system - int sdl_flags = 0; -#ifdef USE_SDL_VIDEO - sdl_flags |= SDL_INIT_VIDEO; -#endif -#ifdef USE_SDL_AUDIO - sdl_flags |= SDL_INIT_AUDIO; -#endif - assert(sdl_flags != 0); - if (SDL_Init(sdl_flags) == -1) { - char str[256]; - sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError()); - ErrorAlert(str); - goto quit; - } - atexit(SDL_Quit); - -#ifdef ENABLE_MON - // Initialize mon - mon_init(); -#endif - - // Install SIGSEGV handler for CPU emulator - if (!sigsegv_install_handler(sigsegv_handler)) { - sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - - // Initialize VM system - vm_init(); - - // Get system info - PVR = 0x00040000; // Default: 604 - CPUClockSpeed = 100000000; // Default: 100MHz - BusClockSpeed = 100000000; // Default: 100MHz - TimebaseSpeed = 25000000; // Default: 25MHz - PVR = 0x000c0000; // Default: 7400 (with AltiVec) - D(bug("PVR: %08x (assumed)\n", PVR)); - - // Init system routines - SysInit(); - - // Show preferences editor - if (!PrefsFindBool("nogui")) - if (!PrefsEditor()) - goto quit; - - // Create areas for Kernel Data - if (!kernel_data_init()) - goto quit; - kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE); - emulator_data = &kernel_data->ed; - KernelDataAddr = KERNEL_DATA_BASE; - D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE)); - D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed))); - - // Create area for DR Cache - if (vm_mac_acquire(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) { - sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - dr_emulator_area_mapped = true; - if (vm_mac_acquire(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) { - sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - dr_cache_area_mapped = true; - DRCacheAddr = (uint32)Mac2HostAddr(DR_CACHE_BASE); - D(bug("DR Cache at %p (%08x)\n", DRCacheAddr, DR_CACHE_BASE)); - - // Create area for SheepShaver data - if (!SheepMem::Init()) { - sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - - // Create area for Mac ROM - if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) { - sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - ROMBase = ROM_BASE; - ROMBaseHost = Mac2HostAddr(ROMBase); - rom_area_mapped = true; - D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROMBase)); - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize"); - if (RAMSize < 8*1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; - } - RAMBase = 0; - if (vm_mac_acquire(RAMBase, RAMSize) < 0) { - sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - RAMBaseHost = Mac2HostAddr(RAMBase); - ram_area_mapped = true; - D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase)); - - if (RAMBase > ROMBase) { - ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR)); - goto quit; - } - - // Load Mac ROM - rom_path = PrefsFindString("rom"); - rom_fh = CreateFile(rom_path && *rom_path ? rom_path : ROM_FILE_NAME, - GENERIC_READ, 0, NULL, OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, NULL); - - if (rom_fh == INVALID_HANDLE_VALUE) { - rom_fh = CreateFile(ROM_FILE_NAME2, - GENERIC_READ, 0, NULL, OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, NULL); - - if (rom_fh == INVALID_HANDLE_VALUE) { - ErrorAlert(GetString(STR_NO_ROM_FILE_ERR)); - goto quit; - } - } - printf(GetString(STR_READING_ROM_FILE)); - rom_size = GetFileSize(rom_fh, NULL); - rom_tmp = new uint8[ROM_SIZE]; - ReadFile(rom_fh, (void *)rom_tmp, ROM_SIZE, &actual, NULL); - CloseHandle(rom_fh); - - // Decode Mac ROM - if (!DecodeROM(rom_tmp, actual)) { - if (rom_size != 4*1024*1024) { - ErrorAlert(GetString(STR_ROM_SIZE_ERR)); - goto quit; - } else { - ErrorAlert(GetString(STR_ROM_FILE_READ_ERR)); - goto quit; - } - } - delete[] rom_tmp; - - // Initialize native timers - timer_init(); - - // Initialize everything - if (!InitAll(NULL)) - goto quit; - D(bug("Initialization complete\n")); - - // Write protect ROM - vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ); - - // Start 60Hz thread - tick_thread_cancel = false; - tick_thread_active = ((tick_thread = create_thread(tick_func)) != NULL); - SetThreadPriority(tick_thread, THREAD_PRIORITY_ABOVE_NORMAL); - D(bug("Tick thread installed (%ld)\n", tick_thread)); - - // Start NVRAM watchdog thread - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - nvram_thread_cancel = false; - nvram_thread_active = ((nvram_thread = create_thread(nvram_func, NULL)) != NULL); - SetThreadPriority(nvram_thread, THREAD_PRIORITY_BELOW_NORMAL); - D(bug("NVRAM thread installed (%ld)\n", nvram_thread)); - - // Get my thread ID and jump to ROM boot routine - emul_thread = GetCurrentThread(); - D(bug("Jumping to ROM\n")); - jump_to_rom(ROMBase + 0x310000); - D(bug("Returned from ROM\n")); - -quit: - Quit(); - return 0; -} - - -/* - * Cleanup and quit - */ - -static void Quit(void) -{ - // Exit PowerPC emulation - exit_emul_ppc(); - - // Stop 60Hz thread - if (tick_thread_active) { - tick_thread_cancel = true; - wait_thread(tick_thread); - } - - // Stop NVRAM watchdog thread - if (nvram_thread_active) { - nvram_thread_cancel = true; - wait_thread(nvram_thread); - } - - // Deinitialize everything - ExitAll(); - - // Delete SheepShaver globals - SheepMem::Exit(); - - // Delete RAM area - if (ram_area_mapped) - vm_mac_release(RAMBase, RAMSize); - - // Delete ROM area - if (rom_area_mapped) - vm_mac_release(ROMBase, ROM_AREA_SIZE); - - // Delete DR cache areas - if (dr_emulator_area_mapped) - vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE); - if (dr_cache_area_mapped) - vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE); - - // Delete Kernel Data area - kernel_data_exit(); - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - - // Release win32 libraries - KernelExit(); - -#ifdef ENABLE_MON - // Exit mon - mon_exit(); -#endif - - exit(0); -} - - -/* - * Initialize Kernel Data segments - */ - -static HANDLE kernel_handle; // Shared memory handle for Kernel Data -static DWORD allocation_granule; // Minimum size of allocateable are (64K) -static DWORD kernel_area_size; // Size of Kernel Data area - -static bool kernel_data_init(void) -{ - char str[256]; - SYSTEM_INFO si; - GetSystemInfo(&si); - allocation_granule = si.dwAllocationGranularity; - kernel_area_size = (KERNEL_AREA_SIZE + allocation_granule - 1) & -allocation_granule; - - char rcs[10]; - LPVOID kernel_addr; - kernel_handle = CreateFileMapping(INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE, 0, kernel_area_size, NULL); - if (kernel_handle == NULL) { - sprintf(rcs, "%d", GetLastError()); - sprintf(str, GetString(STR_KD_SHMGET_ERR), rcs); - ErrorAlert(str); - return false; - } - kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule); - if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) { - sprintf(rcs, "%d", GetLastError()); - sprintf(str, GetString(STR_KD_SHMAT_ERR), rcs); - ErrorAlert(str); - return false; - } - kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule); - if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) { - sprintf(rcs, "%d", GetLastError()); - sprintf(str, GetString(STR_KD2_SHMAT_ERR), rcs); - ErrorAlert(str); - return false; - } - return true; -} - - -/* - * Deallocate Kernel Data segments - */ - -static void kernel_data_exit(void) -{ - if (kernel_handle) { - UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule)); - UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule)); - CloseHandle(kernel_handle); - } -} - - -/* - * Jump into Mac ROM, start 680x0 emulator - */ - -void jump_to_rom(uint32 entry) -{ - init_emul_ppc(); - emul_ppc(entry); -} - - -/* - * Quit emulator (cause return from jump_to_rom) - */ - -void QuitEmulator(void) -{ - Quit(); -} - - -/* - * Pause/resume emulator - */ - -void PauseEmulator(void) -{ - SuspendThread(emul_thread); -} - -void ResumeEmulator(void) -{ - ResumeThread(emul_thread); -} - - -/* - * Dump 68k registers - */ - -void Dump68kRegs(M68kRegisters *r) -{ - // Display 68k registers - for (int i=0; i<8; i++) { - printf("d%d: %08x", i, r->d[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } - for (int i=0; i<8; i++) { - printf("a%d: %08x", i, r->a[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } -} - - -/* - * Make code executable - */ - -void MakeExecutable(int dummy, uint32 start, uint32 length) -{ - if ((start >= ROMBase) && (start < (ROMBase + ROM_SIZE))) - return; - FlushCodeCache(start, start + length); -} - - -/* - * NVRAM watchdog thread (saves NVRAM every minute) - */ - -static void nvram_watchdog(void) -{ - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } -} - -static DWORD nvram_func(void *arg) -{ - while (!nvram_thread_cancel) { - for (int i=0; i<60 && !nvram_thread_cancel; i++) - Delay_usec(999999); // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true - nvram_watchdog(); - } - return 0; -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -static DWORD tick_func(void *arg) -{ - int tick_counter = 0; - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec(); - - while (!tick_thread_cancel) { - - // Wait - next += 16625; - int64 delay = next - GetTicks_usec(); - if (delay > 0) - Delay_usec(delay); - else if (delay < -16625) - next = GetTicks_usec(); - ticks++; - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - } - - // Trigger 60Hz interrupt - if (ReadMacInt32(XLM_IRQ_NEST) == 0) { - SetInterruptFlag(INTFLAG_VIA); - TriggerInterrupt(); - } - } - - uint64 end = GetTicks_usec(); - D(bug("%lu ticks in %lu usec = %f ticks/sec\n", (unsigned long)ticks, (unsigned long)(end - start), ticks * 1000000.0 / (end - start))); - return 0; -} - - -/* - * Mutexes - */ - -struct B2_mutex { - mutex_t m; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ - mutex->m.lock(); -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ - mutex->m.unlock(); -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -volatile uint32 InterruptFlags = 0; -static mutex_t intflags_mutex; - -void SetInterruptFlag(uint32 flag) -{ - intflags_mutex.lock(); - InterruptFlags |= flag; - intflags_mutex.unlock(); -} - -void ClearInterruptFlag(uint32 flag) -{ - intflags_mutex.lock(); - InterruptFlags &= ~flag; - intflags_mutex.unlock(); -} - - -/* - * Disable interrupts - */ - -void DisableInterrupt(void) -{ - WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1); -} - - -/* - * Enable interrupts - */ - -void EnableInterrupt(void) -{ - WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1); -} - - -/* - * Helpers to share 32-bit addressable data with MacOS - */ - -bool SheepMem::Init(void) -{ - // Size of a native page - page_size = vm_get_page_size(); - - // Allocate SheepShaver globals - proc = base; - if (vm_mac_acquire(base, size) < 0) - return false; - - // Allocate page with all bits set to 0, right in the middle - // This is also used to catch undesired overlaps between proc and data areas - zero_page = proc + (size / 2); - Mac_memset(zero_page, 0, page_size); - if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0) - return false; - - // Allocate alternate stack for PowerPC interrupt routine - sig_stack = base + size; - if (vm_mac_acquire(sig_stack, SIG_STACK_SIZE) < 0) - return false; - - data = base + size; - return true; -} - -void SheepMem::Exit(void) -{ - if (data) { - // Delete SheepShaver globals - vm_mac_release(base, size); - - // Delete alternate stack for PowerPC interrupt routine - vm_mac_release(sig_stack, SIG_STACK_SIZE); - } -} - - -/* - * Get the main window handle - */ - -#ifdef USE_SDL_VIDEO -#include -HWND GetMainWindowHandle(void) -{ - SDL_SysWMinfo wmInfo; - SDL_VERSION(&wmInfo.version); - return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; -} -#endif - - -/* - * Display alert - */ - -static void display_alert(int title_id, const char *text, int flags) -{ - HWND hMainWnd = GetMainWindowHandle(); - MessageBox(hMainWnd, text, GetString(title_id), MB_OK | flags); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) - return; - - VideoQuitFullScreen(); - display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) - return; - - display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONINFORMATION); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return false; //!! -} diff --git a/SheepShaver/src/Windows/posix_emu.cpp b/SheepShaver/src/Windows/posix_emu.cpp deleted file mode 120000 index 336f134f6..000000000 --- a/SheepShaver/src/Windows/posix_emu.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/posix_emu.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/posix_emu.h b/SheepShaver/src/Windows/posix_emu.h deleted file mode 120000 index 6fd82b8ba..000000000 --- a/SheepShaver/src/Windows/posix_emu.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/posix_emu.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/prefs_editor_gtk.cpp b/SheepShaver/src/Windows/prefs_editor_gtk.cpp deleted file mode 120000 index b94e76156..000000000 --- a/SheepShaver/src/Windows/prefs_editor_gtk.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/prefs_editor_gtk.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp deleted file mode 100755 index 3f83b045d..000000000 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ /dev/null @@ -1,146 +0,0 @@ -/* - * prefs_windows.cpp - Preferences handling, Windows specific stuff - * - * SheepShaver (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include - -#include -using std::string; - -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"ether", TYPE_STRING, false, "device name of Mac ethernet adapter"}, - {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, - {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, - {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, - {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, - {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, - {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, - {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, - {"enableextfs", TYPE_BOOLEAN, false, "enable extfs system"}, - {"debugextfs", TYPE_BOOLEAN, false, "debug extfs system"}, - {"extdrives", TYPE_STRING, false, "define allowed extfs drives"}, - {"pollmedia", TYPE_BOOLEAN, false, "poll for new media (e.g. cd, floppy)"}, - {"etherguid", TYPE_STRING, false, "GUID of the ethernet device to use"}, - {"etherpermanentaddress", TYPE_BOOLEAN, false, "use permanent NIC address to identify itself"}, - {"ethermulticastmode", TYPE_INT32, false, "how to multicast packets"}, - {"etherfakeaddress", TYPE_STRING, false, "optional fake hardware address"}, - {"routerenabled", TYPE_BOOLEAN, false, "enable NAT/Router module"}, - {"ftp_port_list", TYPE_STRING, false, "FTP ports list"}, - {"tcp_port", TYPE_STRING, false, "TCP ports list"}, - {"portfile0", TYPE_STRING, false, "output file for serial port 0"}, - {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, - - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name and path -const char PREFS_FILE_NAME[] = "SheepShaver_prefs"; -string UserPrefsPath; -static string prefs_path; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - // Construct prefs path - if (UserPrefsPath.empty()) { - int pwd_len = GetCurrentDirectory(0, NULL); - char *pwd = new char[pwd_len]; - if (GetCurrentDirectory(pwd_len, pwd) == pwd_len - 1) - prefs_path = string(pwd) + '\\'; - delete[] pwd; - prefs_path += PREFS_FILE_NAME; - } else - prefs_path = UserPrefsPath; - - // Read preferences from settings file - FILE *f = fopen(prefs_path.c_str(), "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.c_str(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsAddBool("keycodes", false); - PrefsReplaceBool("pollmedia", true); - PrefsReplaceBool("enableextfs", false); - PrefsReplaceString("extfs", ""); - PrefsReplaceString("extdrives", "CDEFGHIJKLMNOPQRSTUVWXYZ"); - PrefsReplaceInt32("mousewheelmode", 1); - PrefsReplaceInt32("mousewheellines", 3); - PrefsAddInt32("windowmodes", 3); - PrefsAddInt32("screenmodes", 0x3f); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif - PrefsAddBool("idlewait", true); - PrefsReplaceBool("etherpermanentaddress", true); - PrefsReplaceInt32("ethermulticastmode", 0); - PrefsReplaceBool("routerenabled", false); - PrefsReplaceString("ftp_port_list", "21"); - PrefsReplaceString("seriala", "COM1"); - PrefsReplaceString("serialb", "COM2"); - PrefsReplaceString("portfile0", "C:\\B2TEMP0.OUT"); - PrefsReplaceString("portfile1", "C:\\B2TEMP1.OUT"); -} diff --git a/SheepShaver/src/Windows/router b/SheepShaver/src/Windows/router deleted file mode 120000 index e8619d55c..000000000 --- a/SheepShaver/src/Windows/router +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/router \ No newline at end of file diff --git a/SheepShaver/src/Windows/serial_windows.cpp b/SheepShaver/src/Windows/serial_windows.cpp deleted file mode 120000 index 88454f92b..000000000 --- a/SheepShaver/src/Windows/serial_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/serial_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/sys_windows.cpp b/SheepShaver/src/Windows/sys_windows.cpp deleted file mode 120000 index 3eacbe88b..000000000 --- a/SheepShaver/src/Windows/sys_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/sys_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h deleted file mode 100755 index f5aaee125..000000000 --- a/SheepShaver/src/Windows/sysdeps.h +++ /dev/null @@ -1,400 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for Windows - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#ifndef __STDC__ -#error "Your compiler is not ANSI. Get a real one." -#endif - -#include "config.h" -#include "user_strings_windows.h" - -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - -#include -#include -#include -#include -#include -#include -#ifdef __WIN32__ -#include -#endif -#include - - -// Define for external components -#define SHEEPSHAVER 1 -#define POWERPC_ROM 1 -#define EMULATED_PPC 1 -#define CONFIG_WIN32 1 - -// Use Direct Addressing mode -#define DIRECT_ADDRESSING 1 -#define NATMEM_OFFSET 0x11000000 - -// Always use the complete (non-stubs based) Ethernet driver -#if DIRECT_ADDRESSING -#define USE_ETHER_FULL_DRIVER 1 -#endif - -// Mac ROM is write protected when banked memory is used -#if REAL_ADDRESSING || DIRECT_ADDRESSING -# define ROM_IS_WRITE_PROTECTED 0 -# define USE_SCRATCHMEM_SUBTERFUGE 1 -#else -# define ROM_IS_WRITE_PROTECTED 1 -#endif -// Configure PowerPC emulator -#define PPC_REENTRANT_JIT 1 -#define PPC_CHECK_INTERRUPTS 1 -#define PPC_DECODE_CACHE 1 -#define PPC_FLIGHT_RECORDER 1 -#define PPC_PROFILE_COMPILE_TIME 0 -#define PPC_PROFILE_GENERIC_CALLS 0 -#define KPX_MAX_CPUS 1 -#if ENABLE_DYNGEN -#define PPC_ENABLE_JIT 1 -#endif -#if defined(__i386__) -#define DYNGEN_ASM_OPTS 1 -#endif - -// Data types -typedef unsigned char uint8; -typedef signed char int8; -#if SIZEOF_SHORT == 2 -typedef unsigned short uint16; -typedef short int16; -#elif SIZEOF_INT == 2 -typedef unsigned int uint16; -typedef int int16; -#else -#error "No 2 byte type, you lose." -#endif -#if SIZEOF_INT == 4 -typedef unsigned int uint32; -typedef int int32; -#elif SIZEOF_LONG == 4 -typedef unsigned long uint32; -typedef long int32; -#else -#error "No 4 byte type, you lose." -#endif -#if SIZEOF_LONG == 8 -typedef unsigned long uint64; -typedef long int64; -#define VAL64(a) (a ## l) -#define UVAL64(a) (a ## ul) -#elif SIZEOF_LONG_LONG == 8 -typedef unsigned long long uint64; -typedef long long int64; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -#else -#error "No 8 byte type, you lose." -#endif -#if SIZEOF_VOID_P == 4 -typedef uint32 uintptr; -typedef int32 intptr; -#elif SIZEOF_VOID_P == 8 -typedef uint64 uintptr; -typedef int64 intptr; -#else -#error "Unsupported size of pointer" -#endif - -// Define if the host processor supports fast unaligned load/stores -#if defined __i386__ || defined __x86_64__ -#define UNALIGNED_PROFITABLE 1 -#endif - - -/** - * Helper functions to byteswap data - **/ - -#if defined(__GNUC__) -#if defined(__x86_64__) || defined(__i386__) -// Linux/AMD64 currently has no asm optimized bswap_32() in -#define opt_bswap_32 do_opt_bswap_32 -static inline uint32 do_opt_bswap_32(uint32 x) -{ - uint32 v; - __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x)); - return v; -} -#endif -#endif - -#ifdef opt_bswap_16 -#undef bswap_16 -#define bswap_16 opt_bswap_16 -#endif -#ifndef bswap_16 -#define bswap_16 generic_bswap_16 -#endif - -static inline uint16 generic_bswap_16(uint16 x) -{ - return ((x & 0xff) << 8) | ((x >> 8) & 0xff); -} - -#ifdef opt_bswap_32 -#undef bswap_32 -#define bswap_32 opt_bswap_32 -#endif -#ifndef bswap_32 -#define bswap_32 generic_bswap_32 -#endif - -static inline uint32 generic_bswap_32(uint32 x) -{ - return (((x & 0xff000000) >> 24) | - ((x & 0x00ff0000) >> 8) | - ((x & 0x0000ff00) << 8) | - ((x & 0x000000ff) << 24) ); -} - -#if defined(__i386__) -#define opt_bswap_64 do_opt_bswap_64 -static inline uint64 do_opt_bswap_64(uint64 x) -{ - return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32)); -} -#endif - -#ifdef opt_bswap_64 -#undef bswap_64 -#define bswap_64 opt_bswap_64 -#endif -#ifndef bswap_64 -#define bswap_64 generic_bswap_64 -#endif - -static inline uint64 generic_bswap_64(uint64 x) -{ - return (((x & UVAL64(0xff00000000000000)) >> 56) | - ((x & UVAL64(0x00ff000000000000)) >> 40) | - ((x & UVAL64(0x0000ff0000000000)) >> 24) | - ((x & UVAL64(0x000000ff00000000)) >> 8) | - ((x & UVAL64(0x00000000ff000000)) << 8) | - ((x & UVAL64(0x0000000000ff0000)) << 24) | - ((x & UVAL64(0x000000000000ff00)) << 40) | - ((x & UVAL64(0x00000000000000ff)) << 56) ); -} - -#ifdef WORDS_BIGENDIAN -static inline uint16 tswap16(uint16 x) { return x; } -static inline uint32 tswap32(uint32 x) { return x; } -static inline uint64 tswap64(uint64 x) { return x; } -#else -static inline uint16 tswap16(uint16 x) { return bswap_16(x); } -static inline uint32 tswap32(uint32 x) { return bswap_32(x); } -static inline uint64 tswap64(uint64 x) { return bswap_64(x); } -#endif - -#define do_byteswap_16_g bswap_16 -#define do_byteswap_16_c(x) \ - ((((x) >> 8) & 0xff) | (((x) & 0xff) << 8)) - -#define do_byteswap_32_g bswap_32 -#define do_byteswap_32_c(x) \ - ((((x) & 0xff000000) >> 24) | (((x) & 0x00ff0000) >> 8) | \ - (((x) & 0x0000ff00) << 8) | (((x) & 0x000000ff) << 24)) - -#if defined(__GNUC__) -#define do_byteswap_16(x) \ - (__extension__ \ - ({ register uint16 __v, __x = (x); \ - if (__builtin_constant_p(__x)) \ - __v = do_byteswap_16_c(__x); \ - else \ - __v = do_byteswap_16_g(__x); \ - __v; })) - -#define do_byteswap_32(x) \ - (__extension__ \ - ({ register uint32 __v, __x = (x); \ - if (__builtin_constant_p(__x)) \ - __v = do_byteswap_32_c(__x); \ - else \ - __v = do_byteswap_32_g(__x); \ - __v; })) -#else -#define do_byteswap_16(x) do_byteswap_16_g(x) -#define do_byteswap_32(x) do_byteswap_32_g(x) -#endif - -#if defined(__i386__) || defined(__x86_64__) -#define ntohl(x) do_byteswap_32(x) -#define ntohs(x) do_byteswap_16(x) -#define htonl(x) do_byteswap_32(x) -#define htons(x) do_byteswap_16(x) -#endif - - -/* - * Spin locks - */ - -#ifdef __GNUC__ - -#if defined(__powerpc__) || defined(__ppc__) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - __asm__ __volatile__("0: lwarx %0,0,%1\n" - " xor. %0,%3,%0\n" - " bne 1f\n" - " stwcx. %2,0,%1\n" - " bne- 0b\n" - "1: " - : "=&r" (ret) - : "r" (p), "r" (1), "r" (0) - : "cr0", "memory"); - return ret; -} -#endif - -#if defined(__i386__) || defined(__x86_64__) -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - long int ret; - /* Note: the "xchg" instruction does not need a "lock" prefix */ - __asm__ __volatile__("xchgl %k0, %1" - : "=r" (ret), "=m" (*p) - : "0" (1), "m" (*p) - : "memory"); - return ret; -} -#endif - -#ifdef __alpha__ -#define HAVE_TEST_AND_SET 1 -static inline int testandset(volatile int *p) -{ - int ret; - unsigned long one; - - __asm__ __volatile__("0: mov 1,%2\n" - " ldl_l %0,%1\n" - " stl_c %2,%1\n" - " beq %2,1f\n" - ".subsection 2\n" - "1: br 0b\n" - ".previous" - : "=r" (ret), "=m" (*p), "=r" (one) - : "m" (*p)); - return ret; -} -#endif - -#endif /* __GNUC__ */ - -typedef volatile int spinlock_t; - -static const spinlock_t SPIN_LOCK_UNLOCKED = 0; - -#if HAVE_TEST_AND_SET -#define HAVE_SPINLOCKS 1 -static inline void spin_lock(spinlock_t *lock) -{ - while (testandset(lock)); -} - -static inline void spin_unlock(spinlock_t *lock) -{ - *lock = 0; -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return !testandset(lock); -} -#else -static inline void spin_lock(spinlock_t *lock) -{ -} - -static inline void spin_unlock(spinlock_t *lock) -{ -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return 1; -} -#endif - -// Time data type for Time Manager emulation -typedef int64 tm_time_t; - -// Timing functions -extern void timer_init(void); -extern uint64 GetTicks_usec(void); -extern void Delay_usec(uint32 usec); - -// Various definitions -typedef struct rgb_color { - uint8 red; - uint8 green; - uint8 blue; - uint8 alpha; -} rgb_color; - -// Macro for calling MacOS routines -#define CallMacOS(type, tvect) call_macos((uintptr)tvect) -#define CallMacOS1(type, tvect, arg1) call_macos1((uintptr)tvect, (uintptr)arg1) -#define CallMacOS2(type, tvect, arg1, arg2) call_macos2((uintptr)tvect, (uintptr)arg1, (uintptr)arg2) -#define CallMacOS3(type, tvect, arg1, arg2, arg3) call_macos3((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3) -#define CallMacOS4(type, tvect, arg1, arg2, arg3, arg4) call_macos4((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4) -#define CallMacOS5(type, tvect, arg1, arg2, arg3, arg4, arg5) call_macos5((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5) -#define CallMacOS6(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6) call_macos6((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6) -#define CallMacOS7(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7) call_macos7((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6, (uintptr)arg7) - -#ifdef __cplusplus -extern "C" { -#endif -extern uint32 call_macos(uint32 tvect); -extern uint32 call_macos1(uint32 tvect, uint32 arg1); -extern uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2); -extern uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3); -extern uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4); -extern uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5); -extern uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6); -extern uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7); -#ifdef __cplusplus -} -#endif - -// Misc platform specific definitions -#ifdef __WIN32__ -typedef int64 loff_t; -#endif -#define ATTRIBUTE_PACKED __attribute__((__packed__)) - -#endif diff --git a/SheepShaver/src/Windows/timer_windows.cpp b/SheepShaver/src/Windows/timer_windows.cpp deleted file mode 120000 index b43201a94..000000000 --- a/SheepShaver/src/Windows/timer_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/timer_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/user_strings_windows.cpp b/SheepShaver/src/Windows/user_strings_windows.cpp deleted file mode 100755 index 92555c8f1..000000000 --- a/SheepShaver/src/Windows/user_strings_windows.cpp +++ /dev/null @@ -1,166 +0,0 @@ -/* - * user_strings_windows.cpp - Localizable strings, Windows specific strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_EXTFS_VOLUME_NAME, "My Computer"}, - - // Purely platform-specific strings - {STR_LOW_MEM_MMAP_ERR, "Cannot map Low Memory Globals: %s."}, - {STR_KD_SHMGET_ERR, "Cannot create SHM segment for Kernel Data: %s."}, - {STR_KD_SHMAT_ERR, "Cannot map first Kernel Data area: %s."}, - {STR_KD2_SHMAT_ERR, "Cannot map second Kernel Data area: %s."}, - {STR_ROM_MMAP_ERR, "Cannot map ROM: %s."}, - {STR_RAM_MMAP_ERR, "Cannot map RAM: %s."}, - {STR_DR_CACHE_MMAP_ERR, "Cannot map DR Cache: %s."}, - {STR_DR_EMULATOR_MMAP_ERR, "Cannot map DR Emulator: %s."}, - {STR_SHEEP_MEM_MMAP_ERR, "Cannot map SheepShaver Data area: %s."}, - {STR_NO_XVISUAL_ERR, "Cannot obtain appropriate X visual."}, - {STR_SLIRP_NO_DNS_FOUND_WARN, "Cannot get DNS address. Ethernet will not be available."}, - {STR_NO_AUDIO_WARN, "No audio device found, audio output will be disabled."}, - {STR_KEYCODE_FILE_WARN, "Cannot open keycode translation file %s (%s)."}, - {STR_KEYCODE_VENDOR_WARN, "Cannot find vendor '%s' in keycode translation file %s."}, - {STR_VOSF_INIT_ERR, "Cannot initialize Video on SEGV signals."}, - - {STR_OPEN_WINDOW_ERR, "Cannot open Mac window."}, - {STR_WINDOW_TITLE_GRABBED, "SheepShaver (mouse grabbed, press Ctrl-F5 to release)"}, - {STR_NO_WIN32_NT_4, "SheepShaver does not run on Windows NT versions less than 4.0"}, - - {STR_PREFS_MENU_FILE_GTK, "/_File"}, - {STR_PREFS_ITEM_START_GTK, "/File/_Start SheepShaver"}, - {STR_PREFS_ITEM_ZAP_PRAM_GTK, "/File/_Zap PRAM File"}, - {STR_PREFS_ITEM_SEPL_GTK, "/File/sepl"}, - {STR_PREFS_ITEM_QUIT_GTK, "/File/_Quit SheepShaver"}, - {STR_HELP_MENU_GTK, "/_Help"}, - {STR_HELP_ITEM_ABOUT_GTK, "/Help/_About SheepShaver"}, - - {STR_FILE_CTRL, "File"}, - {STR_BROWSE_TITLE, "Browse file"}, - {STR_BROWSE_CTRL, "Browse..."}, - {STR_SERIAL_PANE_TITLE, "Serial"}, - {STR_NETWORK_PANE_TITLE, "Network"}, - {STR_INPUT_PANE_TITLE, "Keyboard/Mouse"}, - {STR_KEYCODES_CTRL, "Use Raw Keycodes"}, - {STR_KEYCODE_FILE_CTRL, "Keycode Translation File"}, - {STR_MOUSEWHEELMODE_CTRL, "Mouse Wheel Function"}, - {STR_MOUSEWHEELMODE_PAGE_LAB, "Page Up/Down"}, - {STR_MOUSEWHEELMODE_CURSOR_LAB, "Cursor Up/Down"}, - {STR_MOUSEWHEELLINES_CTRL, "Lines To Scroll"}, - {STR_POLLMEDIA_CTRL, "Try to automatically detect new removable media (enable polling)"}, - {STR_EXTFS_ENABLE_CTRL, "Enable \"My Computer\" icon on your Mac desktop (external file system)"}, - {STR_EXTFS_DRIVES_CTRL, "Mount drives"}, - {STR_ETHER_FTP_PORT_LIST_CTRL, "FTP ports"}, - {STR_ETHER_TCP_PORT_LIST_CTRL, "Server ports"}, - - {-1, NULL} // End marker -}; - - -/* - * Search for main volume name - */ - -static const char *get_volume_name(void) -{ - HKEY hHelpKey; - DWORD key_type, cbData; - - static char volume[256]; - memset(volume, 0, sizeof(volume)); - - // Try Windows 2000 key first - if (ERROR_SUCCESS == RegOpenKey( - HKEY_CURRENT_USER, - "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}", - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - if (volume[0] == 0 && - ERROR_SUCCESS == RegOpenKey( - HKEY_CURRENT_USER, - "Software\\Classes\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}", - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - if (volume[0] == 0 && - ERROR_SUCCESS == RegOpenKey( - HKEY_CLASSES_ROOT, - "CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}", - &hHelpKey)) - { - cbData = sizeof(volume); - RegQueryValueEx( hHelpKey, 0, NULL, &key_type, (unsigned char *)volume, &cbData ); - RegCloseKey(hHelpKey); - } - - // Fix the error that some "tweak" apps do. - if (stricmp(volume, "%USERNAME% on %COMPUTER%") == 0) - volume[0] = '\0'; - - // No volume name found, default to "My Computer" - if (volume[0] == 0) - strcpy(volume, "My Computer"); - - return volume; -} - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First, search for platform-specific variable string - switch (num) { - case STR_EXTFS_VOLUME_NAME: - return get_volume_name(); - } - - // Next, search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/SheepShaver/src/Windows/user_strings_windows.h b/SheepShaver/src/Windows/user_strings_windows.h deleted file mode 100755 index 7980c5f79..000000000 --- a/SheepShaver/src/Windows/user_strings_windows.h +++ /dev/null @@ -1,72 +0,0 @@ -/* - * user_strings_windows.h - Windows-specific localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 USER_STRINGS_WINDOWS_H -#define USER_STRINGS_WINDOWS_H - -enum { - STR_LOW_MEM_MMAP_ERR = 10000, - STR_KD_SHMGET_ERR, - STR_KD_SHMAT_ERR, - STR_KD2_SHMAT_ERR, - STR_ROM_MMAP_ERR, - STR_RAM_MMAP_ERR, - STR_DR_CACHE_MMAP_ERR, - STR_DR_EMULATOR_MMAP_ERR, - STR_SHEEP_MEM_MMAP_ERR, - STR_SIGSEGV_INSTALL_ERR, - STR_NO_XVISUAL_ERR, - STR_VOSF_INIT_ERR, - STR_SLIRP_NO_DNS_FOUND_WARN, - STR_NO_AUDIO_WARN, - STR_KEYCODE_FILE_WARN, - STR_KEYCODE_VENDOR_WARN, - STR_OPEN_WINDOW_ERR, - STR_WINDOW_TITLE_GRABBED, - STR_NO_WIN32_NT_4, - - STR_PREFS_MENU_FILE_GTK, - STR_PREFS_ITEM_START_GTK, - STR_PREFS_ITEM_ZAP_PRAM_GTK, - STR_PREFS_ITEM_SEPL_GTK, - STR_PREFS_ITEM_QUIT_GTK, - STR_HELP_MENU_GTK, - STR_HELP_ITEM_ABOUT_GTK, - - STR_FILE_CTRL, - STR_BROWSE_CTRL, - STR_BROWSE_TITLE, - STR_SERIAL_PANE_TITLE, - STR_NETWORK_PANE_TITLE, - STR_INPUT_PANE_TITLE, - STR_KEYCODES_CTRL, - STR_KEYCODE_FILE_CTRL, - STR_MOUSEWHEELMODE_CTRL, - STR_MOUSEWHEELMODE_PAGE_LAB, - STR_MOUSEWHEELMODE_CURSOR_LAB, - STR_MOUSEWHEELLINES_CTRL, - STR_POLLMEDIA_CTRL, - STR_EXTFS_ENABLE_CTRL, - STR_EXTFS_DRIVES_CTRL, - STR_ETHER_FTP_PORT_LIST_CTRL, - STR_ETHER_TCP_PORT_LIST_CTRL, -}; - -#endif diff --git a/SheepShaver/src/Windows/util_windows.cpp b/SheepShaver/src/Windows/util_windows.cpp deleted file mode 120000 index 748109814..000000000 --- a/SheepShaver/src/Windows/util_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/util_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/util_windows.h b/SheepShaver/src/Windows/util_windows.h deleted file mode 120000 index f875032de..000000000 --- a/SheepShaver/src/Windows/util_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/util_windows.h \ No newline at end of file diff --git a/SheepShaver/src/Windows/xpram_windows.cpp b/SheepShaver/src/Windows/xpram_windows.cpp deleted file mode 120000 index 4c317a379..000000000 --- a/SheepShaver/src/Windows/xpram_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/xpram_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 120000 index 1cc36b981..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/adb.cpp \ No newline at end of file diff --git a/SheepShaver/src/audio.cpp b/SheepShaver/src/audio.cpp deleted file mode 120000 index 3cc4fd954..000000000 --- a/SheepShaver/src/audio.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/audio.cpp \ No newline at end of file diff --git a/SheepShaver/src/cdrom.cpp b/SheepShaver/src/cdrom.cpp deleted file mode 120000 index d97cd44d2..000000000 --- a/SheepShaver/src/cdrom.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/cdrom.cpp \ No newline at end of file diff --git a/SheepShaver/src/disk.cpp b/SheepShaver/src/disk.cpp deleted file mode 120000 index f994afaa8..000000000 --- a/SheepShaver/src/disk.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/disk.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/audio_dummy.cpp b/SheepShaver/src/dummy/audio_dummy.cpp deleted file mode 120000 index 6c3904ced..000000000 --- a/SheepShaver/src/dummy/audio_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/audio_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/clip_dummy.cpp b/SheepShaver/src/dummy/clip_dummy.cpp deleted file mode 120000 index d5f484223..000000000 --- a/SheepShaver/src/dummy/clip_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/clip_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/ether_dummy.cpp b/SheepShaver/src/dummy/ether_dummy.cpp deleted file mode 100644 index 5046b051c..000000000 --- a/SheepShaver/src/dummy/ether_dummy.cpp +++ /dev/null @@ -1,92 +0,0 @@ -/* - * ether_dummy.cpp - Ethernet device driver, dummy implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include "cpu_emulation.h" -#include "main.h" -#include "ether.h" -#include "ether_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -/* - * Init ethernet - */ - -void EtherInit(void) -{ -} - - -/* - * Exit ethernet - */ - -void EtherExit(void) -{ -} - - -/* - * Get ethernet hardware address - */ - -void AO_get_ethernet_address(uint32 addr) -{ -} - - -/* - * Enable multicast address - */ - -void AO_enable_multicast(uint32 addr) -{ -} - - -/* - * Disable multicast address - */ - -void AO_disable_multicast(uint32 addr) -{ -} - - -/* - * Transmit one packet - */ - -void AO_transmit_packet(uint32 mp) -{ -} - - -/* - * Ethernet interrupt - */ - -void EtherIRQ(void) -{ -} diff --git a/SheepShaver/src/dummy/prefs_dummy.cpp b/SheepShaver/src/dummy/prefs_dummy.cpp deleted file mode 100644 index d51409b56..000000000 --- a/SheepShaver/src/dummy/prefs_dummy.cpp +++ /dev/null @@ -1,38 +0,0 @@ -/* - * prefs_dummy.cpp - Dummy implementation of prefs_init() and prefs_exit(). - * - * Copyright (C) 2007 Alexei Svitkine - * - * 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 "sysdeps.h" - -/* - * Initialization - */ - -void prefs_init(void) -{ -} - -/* - * Exit Deinitialization - */ - -void prefs_exit(void) -{ -} - diff --git a/SheepShaver/src/dummy/prefs_editor_dummy.cpp b/SheepShaver/src/dummy/prefs_editor_dummy.cpp deleted file mode 120000 index 66b5d5593..000000000 --- a/SheepShaver/src/dummy/prefs_editor_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/prefs_editor_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/scsi_dummy.cpp b/SheepShaver/src/dummy/scsi_dummy.cpp deleted file mode 120000 index ae9682105..000000000 --- a/SheepShaver/src/dummy/scsi_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/scsi_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/dummy/serial_dummy.cpp b/SheepShaver/src/dummy/serial_dummy.cpp deleted file mode 120000 index 26af78ab0..000000000 --- a/SheepShaver/src/dummy/serial_dummy.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/dummy/serial_dummy.cpp \ No newline at end of file diff --git a/SheepShaver/src/emul_op.cpp b/SheepShaver/src/emul_op.cpp deleted file mode 100644 index 9e01554d5..000000000 --- a/SheepShaver/src/emul_op.cpp +++ /dev/null @@ -1,496 +0,0 @@ -/* - * emul_op.cpp - 68k opcodes for ROM patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - -#include "sysdeps.h" -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "cpu_emulation.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "scsi.h" -#include "video.h" -#include "audio.h" -#include "ether.h" -#include "serial.h" -#include "clip.h" -#include "extfs.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "rsrc_patches.h" -#include "name_registry.h" -#include "user_strings.h" -#include "emul_op.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// TVector of MakeExecutable -static uint32 MakeExecutableTvec; - - -/* - * Execute EMUL_OP opcode (called by 68k emulator) - */ - -void EmulOp(M68kRegisters *r, uint32 pc, int selector) -{ - D(bug("EmulOp %04x at %08x\n", selector, pc)); - switch (selector) { - case OP_BREAK: // Breakpoint - printf("*** Breakpoint\n"); - Dump68kRegs(r); - break; - - case OP_XPRAM1: { // Read/write from/to XPRam - uint32 len = r->d[3]; - uint8 *adr = Mac2HostAddr(r->a[3]); - D(bug("XPRAMReadWrite d3: %08lx, a3: %p\n", len, adr)); - int ofs = len & 0xffff; - len >>= 16; - if (len & 0x8000) { - len &= 0x7fff; - for (uint32 i=0; id[1] = XPRAM[(r->d[1] & 0xff) + 0x1300]; - break; - - case OP_XPRAM3: // Write to XPRam - XPRAM[(r->d[1] & 0xff) + 0x1300] = r->d[2]; - break; - - case OP_NVRAM1: { // Read from NVRAM - int ofs = r->d[0]; - r->d[0] = XPRAM[ofs & 0x1fff]; - bool localtalk = !(XPRAM[0x13e0] || XPRAM[0x13e1]); // LocalTalk enabled? - switch (ofs) { - case 0x13e0: // Disable LocalTalk (use EtherTalk instead) - if (localtalk) - r->d[0] = 0x00; - break; - case 0x13e1: - if (localtalk) - r->d[0] = 0x01; - break; - case 0x13e2: - if (localtalk) - r->d[0] = 0x00; - break; - case 0x13e3: - if (localtalk) - r->d[0] = 0x0a; - break; - } - break; - } - - case OP_NVRAM2: // Write to NVRAM - XPRAM[r->d[0] & 0x1fff] = r->d[1]; - break; - - case OP_NVRAM3: // Read/write from/to NVRAM - if (r->d[3]) { - r->d[0] = XPRAM[(r->d[4] + 0x1300) & 0x1fff]; - } else { - XPRAM[(r->d[4] + 0x1300) & 0x1fff] = r->d[5]; - r->d[0] = 0; - } - break; - - case OP_FIX_MEMTOP: // Fixes MemTop in BootGlobs during startup - D(bug("Fix MemTop\n")); - WriteMacInt32(BootGlobsAddr - 20, RAMBase + RAMSize); // MemTop - r->a[6] = RAMBase + RAMSize; - break; - - case OP_FIX_MEMSIZE: { // Fixes physical/logical RAM size during startup - D(bug("Fix MemSize\n")); - uint32 diff = ReadMacInt32(0x1ef8) - ReadMacInt32(0x1ef4); - WriteMacInt32(0x1ef8, RAMSize); // Physical RAM size - WriteMacInt32(0x1ef4, RAMSize - diff); // Logical RAM size - break; - } - - case OP_FIX_BOOTSTACK: // Fixes boot stack pointer in boot 3 resource - D(bug("Fix BootStack\n")); - r->a[1] = r->a[7] = RAMBase + RAMSize * 3 / 4; - break; - - case OP_SONY_OPEN: // Floppy driver functions - r->d[0] = SonyOpen(r->a[0], r->a[1]); - break; - case OP_SONY_PRIME: - r->d[0] = SonyPrime(r->a[0], r->a[1]); - break; - case OP_SONY_CONTROL: - r->d[0] = SonyControl(r->a[0], r->a[1]); - break; - case OP_SONY_STATUS: - r->d[0] = SonyStatus(r->a[0], r->a[1]); - break; - - case OP_DISK_OPEN: // Disk driver functions - r->d[0] = DiskOpen(r->a[0], r->a[1]); - break; - case OP_DISK_PRIME: - r->d[0] = DiskPrime(r->a[0], r->a[1]); - break; - case OP_DISK_CONTROL: - r->d[0] = DiskControl(r->a[0], r->a[1]); - break; - case OP_DISK_STATUS: - r->d[0] = DiskStatus(r->a[0], r->a[1]); - break; - - case OP_CDROM_OPEN: // CD-ROM driver functions - r->d[0] = CDROMOpen(r->a[0], r->a[1]); - break; - case OP_CDROM_PRIME: - r->d[0] = CDROMPrime(r->a[0], r->a[1]); - break; - case OP_CDROM_CONTROL: - r->d[0] = CDROMControl(r->a[0], r->a[1]); - break; - case OP_CDROM_STATUS: - r->d[0] = CDROMStatus(r->a[0], r->a[1]); - break; - - case OP_AUDIO_DISPATCH: // Audio component functions - r->d[0] = AudioDispatch(r->a[3], r->a[4]); - break; - - case OP_SOUNDIN_OPEN: // Sound input driver functions - r->d[0] = SoundInOpen(r->a[0], r->a[1]); - break; - case OP_SOUNDIN_PRIME: - r->d[0] = SoundInPrime(r->a[0], r->a[1]); - break; - case OP_SOUNDIN_CONTROL: - r->d[0] = SoundInControl(r->a[0], r->a[1]); - break; - case OP_SOUNDIN_STATUS: - r->d[0] = SoundInStatus(r->a[0], r->a[1]); - break; - case OP_SOUNDIN_CLOSE: - r->d[0] = SoundInClose(r->a[0], r->a[1]); - break; - - case OP_ADBOP: // ADBOp() replacement - ADBOp(r->d[0], Mac2HostAddr(ReadMacInt32(r->a[0]))); - break; - - case OP_INSTIME: // InsTime() replacement - r->d[0] = InsTime(r->a[0], r->d[1]); - break; - case OP_RMVTIME: // RmvTime() replacement - r->d[0] = RmvTime(r->a[0]); - break; - case OP_PRIMETIME: // PrimeTime() replacement - r->d[0] = PrimeTime(r->a[0], r->d[0]); - break; - - case OP_MICROSECONDS: // Microseconds() replacement - Microseconds(r->a[0], r->d[0]); - break; - - case OP_ZERO_SCRAP: // ZeroScrap() patch - ZeroScrap(); - break; - - case OP_PUT_SCRAP: // PutScrap() patch - PutScrap(ReadMacInt32(r->a[7] + 8), Mac2HostAddr(ReadMacInt32(r->a[7] + 4)), ReadMacInt32(r->a[7] + 12)); - break; - - case OP_GET_SCRAP: // GetScrap() patch - GetScrap((void **)Mac2HostAddr(ReadMacInt32(r->a[7] + 4)), ReadMacInt32(r->a[7] + 8), ReadMacInt32(r->a[7] + 12)); - break; - - case OP_DEBUG_STR: // DebugStr() shows warning message - if (PrefsFindBool("nogui")) { - uint8 *pstr = Mac2HostAddr(ReadMacInt32(r->a[7] + 4)); - char str[256]; - int i; - for (i=0; i> 8, M68K_EMUL_OP_DEBUG_STR & 0xFF, - 0x4e, 0x74, // rtd #4 - 0x00, 0x04 - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc); - WriteMacInt32(0x1dfc, proc); - break; - } - - case OP_NAME_REGISTRY: // Patch Name Registry and initialize CallUniversalProc - r->d[0] = (uint32)-1; - PatchNameRegistry(); - InitCallUniversalProc(); - break; - - case OP_RESET: // Early in MacOS reset - D(bug("*** RESET ***\n")); - TimerReset(); - MacOSUtilReset(); - AudioReset(); - - // Enable DR emulator (disabled for now) - if (PrefsFindBool("jit68k") && 0) { - D(bug("DR activated\n")); - WriteMacInt32(KernelDataAddr + 0x17a0, 3); // Prepare for DR emulator activation - WriteMacInt32(KernelDataAddr + 0x17c0, DR_CACHE_BASE); - WriteMacInt32(KernelDataAddr + 0x17c4, DR_CACHE_SIZE); - WriteMacInt32(KernelDataAddr + 0x1b04, DR_CACHE_BASE); - WriteMacInt32(KernelDataAddr + 0x1b00, DR_EMULATOR_BASE); - memcpy((void *)DR_EMULATOR_BASE, (void *)(ROMBase + 0x370000), DR_EMULATOR_SIZE); - MakeExecutable(0, DR_EMULATOR_BASE, DR_EMULATOR_SIZE); - } - break; - - case OP_IRQ: // Level 1 interrupt - WriteMacInt16(ReadMacInt32(KernelDataAddr + 0x67c), 0); // Clear interrupt - r->d[0] = 0; - if (HasMacStarted()) { - if (InterruptFlags & INTFLAG_VIA) { - ClearInterruptFlag(INTFLAG_VIA); -#if !PRECISE_TIMING - TimerInterrupt(); -#endif - ExecuteNative(NATIVE_VIDEO_VBL); - - static int tick_counter = 0; - if (++tick_counter >= 60) { - tick_counter = 0; - SonyInterrupt(); - DiskInterrupt(); - CDROMInterrupt(); - } - - r->d[0] = 1; // Flag: 68k interrupt routine executes VBLTasks etc. - } - if (InterruptFlags & INTFLAG_SERIAL) { - ClearInterruptFlag(INTFLAG_SERIAL); - SerialInterrupt(); - } - if (InterruptFlags & INTFLAG_ETHER) { - ClearInterruptFlag(INTFLAG_ETHER); - ExecuteNative(NATIVE_ETHER_IRQ); - } - if (InterruptFlags & INTFLAG_TIMER) { - ClearInterruptFlag(INTFLAG_TIMER); - TimerInterrupt(); - } - if (InterruptFlags & INTFLAG_AUDIO) { - ClearInterruptFlag(INTFLAG_AUDIO); - AudioInterrupt(); - } - if (InterruptFlags & INTFLAG_ADB) { - ClearInterruptFlag(INTFLAG_ADB); - ADBInterrupt(); - } - } else - r->d[0] = 1; - break; - - case OP_SCSI_DISPATCH: { // SCSIDispatch() replacement - uint32 ret = ReadMacInt32(r->a[7]); - uint16 sel = ReadMacInt16(r->a[7] + 4); - r->a[7] += 6; -// D(bug("SCSIDispatch(%d)\n", sel)); - int stack; - switch (sel) { - case 0: // SCSIReset - WriteMacInt16(r->a[7], SCSIReset()); - stack = 0; - break; - case 1: // SCSIGet - WriteMacInt16(r->a[7], SCSIGet()); - stack = 0; - break; - case 2: // SCSISelect - case 11: // SCSISelAtn - WriteMacInt16(r->a[7] + 2, SCSISelect(ReadMacInt8(r->a[7] + 1))); - stack = 2; - break; - case 3: // SCSICmd - WriteMacInt16(r->a[7] + 6, SCSICmd(ReadMacInt16(r->a[7]), Mac2HostAddr(ReadMacInt32(r->a[7] + 2)))); - stack = 6; - break; - case 4: // SCSIComplete - WriteMacInt16(r->a[7] + 12, SCSIComplete(ReadMacInt32(r->a[7]), ReadMacInt32(r->a[7] + 4), ReadMacInt32(r->a[7] + 8))); - stack = 12; - break; - case 5: // SCSIRead - case 8: // SCSIRBlind - WriteMacInt16(r->a[7] + 4, SCSIRead(ReadMacInt32(r->a[7]))); - stack = 4; - break; - case 6: // SCSIWrite - case 9: // SCSIWBlind - WriteMacInt16(r->a[7] + 4, SCSIWrite(ReadMacInt32(r->a[7]))); - stack = 4; - break; - case 10: // SCSIStat - WriteMacInt16(r->a[7], SCSIStat()); - stack = 0; - break; - case 12: // SCSIMsgIn - WriteMacInt16(r->a[7] + 4, 0); - stack = 4; - break; - case 13: // SCSIMsgOut - WriteMacInt16(r->a[7] + 2, 0); - stack = 2; - break; - case 14: // SCSIMgrBusy - WriteMacInt16(r->a[7], SCSIMgrBusy()); - stack = 0; - break; - default: - printf("FATAL: SCSIDispatch: illegal selector\n"); - stack = 0; - //!! SysError(12) - } - r->a[0] = ret; - r->a[7] += stack; - break; - } - - case OP_SCSI_ATOMIC: // SCSIAtomic() replacement - D(bug("SCSIAtomic\n")); - r->d[0] = (uint32)-7887; - break; - - case OP_CHECK_SYSV: { // Check we are not using MacOS < 8.1 with a NewWorld ROM - r->a[1] = r->d[1]; - r->a[0] = ReadMacInt32(r->d[1]); - uint32 sysv = ReadMacInt16(r->a[0]); - D(bug("Detected MacOS version %d.%d.%d\n", (sysv >> 8) & 0xf, (sysv >> 4) & 0xf, sysv & 0xf)); - if (ROMType == ROMTYPE_NEWWORLD && sysv < 0x0801) - r->d[1] = 0; - break; - } - - case OP_NTRB_17_PATCH: - r->a[2] = ReadMacInt32(r->a[7]); - r->a[7] += 4; - if (ReadMacInt16(r->a[2] + 6) == 17) - PatchNativeResourceManager(); - break; - - case OP_NTRB_17_PATCH2: - r->a[7] += 8; - PatchNativeResourceManager(); - break; - - case OP_NTRB_17_PATCH3: - r->a[2] = ReadMacInt32(r->a[7]); - r->a[7] += 4; - D(bug("%d %d\n", ReadMacInt16(r->a[2]), ReadMacInt16(r->a[2] + 6))); - if (ReadMacInt16(r->a[2]) == 11 && ReadMacInt16(r->a[2] + 6) == 17) - PatchNativeResourceManager(); - break; - - case OP_NTRB_17_PATCH4: - r->d[0] = ReadMacInt16(r->a[7]); - r->a[7] += 2; - D(bug("%d %d\n", ReadMacInt16(r->a[2]), ReadMacInt16(r->a[2] + 6))); - if (ReadMacInt16(r->a[2]) == 11 && ReadMacInt16(r->a[2] + 6) == 17) - PatchNativeResourceManager(); - break; - - case OP_CHECKLOAD: { // vCheckLoad() patch - uint32 type = ReadMacInt32(r->a[7]); - r->a[7] += 4; - int16 id = ReadMacInt16(r->a[2]); - if (r->a[0] == 0) - break; - uint32 adr = ReadMacInt32(r->a[0]); - if (adr == 0) - break; - uint16 *p = (uint16 *)Mac2HostAddr(adr); - uint32 size = ReadMacInt32(adr - 8) & 0xffffff; - CheckLoad(type, id, p, size); - break; - } - - case OP_EXTFS_COMM: // External file system routines - WriteMacInt16(r->a[7] + 14, ExtFSComm(ReadMacInt16(r->a[7] + 12), ReadMacInt32(r->a[7] + 8), ReadMacInt32(r->a[7] + 4))); - break; - - case OP_EXTFS_HFS: - WriteMacInt16(r->a[7] + 20, ExtFSHFS(ReadMacInt32(r->a[7] + 16), ReadMacInt16(r->a[7] + 14), ReadMacInt32(r->a[7] + 10), ReadMacInt32(r->a[7] + 6), ReadMacInt16(r->a[7] + 4))); - break; - - case OP_IDLE_TIME: - // Sleep if no events pending - if (ReadMacInt32(0x14c) == 0) - idle_wait(); - r->a[0] = ReadMacInt32(0x2b6); - break; - - case OP_IDLE_TIME_2: - // Sleep if no events pending - if (ReadMacInt32(0x14c) == 0) - idle_wait(); - r->d[0] = (uint32)-2; - break; - - default: - printf("FATAL: EMUL_OP called with bogus selector %08x\n", selector); - QuitEmulator(); - break; - } -} diff --git a/SheepShaver/src/emul_ppc/emul_ppc.cpp b/SheepShaver/src/emul_ppc/emul_ppc.cpp deleted file mode 100644 index 10584d727..000000000 --- a/SheepShaver/src/emul_ppc/emul_ppc.cpp +++ /dev/null @@ -1,1661 +0,0 @@ -/* - * emul_ppc.cpp - PowerPC processor emulation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* -TODO: -addme -addmeo -addze -addzeo -dcbst -dcbt -dcbtst -divwuo -fabs -fadd -fadds -fcmpo -fcmpu -fctiw -fctiwz -fdiv -fdivs -fmadd -fmadds -fmr -fmsub -fmsubs -fmul -fmuls -fnabs -fneg -fnmadd -fnmadds -fnmsub -fnmsubs -fres -frsp -frsqrte -fsel -fsqrt -fsqrts -fsub -fsubs -lfdu -lfdux -lfdx -lfs -lfsu -lfsux -lfsx -lhbrx -lwbrx -mcrfs -mcrxr -mtfsb0 -mtfsb1 -mtfsfi -mulhwu -mullwo -nego -sc -stfdu -stfdux -stfdx -stfs -stfsu -stfsux -stfsx -sthbrx -stwbrx -subfo -subfme -subfmeo -subfze -subfzeo -tw -twi - -CHECK: -crxor -creqv - */ - -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "xlowmem.h" -#include "emul_op.h" - -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -#define DEBUG 1 -#include "debug.h" - -#define FLIGHT_RECORDER 1 - - -// PowerPC user mode registers -uint32 r[32]; -double fr[32]; -uint32 lr, ctr; -uint32 cr, xer; -uint32 fpscr; -uint32 pc; - -// Convert 8-bit field mask (e.g. mtcrf) to bit mask -static uint32 field2mask[256]; - - -/* - * Flight recorder - */ - -#if FLIGHT_RECORDER -struct rec_step { - uint32 r[32]; - double fr[32]; - uint32 lr, ctr; - uint32 cr, xer; - uint32 fpscr; - uint32 pc; - uint32 opcode; -}; - -const int LOG_SIZE = 8192; -static rec_step log[LOG_SIZE]; -static int log_ptr = 0; - -static void record_step(uint32 opcode) -{ - for (int i=0; i<32; i++) { - log[log_ptr].r[i] = r[i]; - log[log_ptr].fr[i] = fr[i]; - } - log[log_ptr].lr = lr; - log[log_ptr].ctr = ctr; - log[log_ptr].cr = cr; - log[log_ptr].xer = xer; - log[log_ptr].fpscr = fpscr; - log[log_ptr].pc = pc; - log[log_ptr].opcode = opcode; - log_ptr++; - if (log_ptr == LOG_SIZE) - log_ptr = 0; -} - -static void dump_log(void) -{ - FILE *f = fopen("log", "w"); - if (f == NULL) - return; - for (int i=0; i> 4) & 0x0f000000); -} - - -/* - * Convert mask begin/end to mask - */ - -static uint32 mbme2mask(uint32 op) -{ - uint32 mb = (op >> 6) & 0x1f; - uint32 me = (op >> 1) & 0x1f; - uint32 m = 0; - uint32 i; - - if (mb <= me) - for (i=mb; i<=me; i++) - m |= 0x80000000 >> i; - else { - for (i=0; i<=me; i++) - m |= 0x80000000 >> i; - for (i=mb; i<=31; i++) - m |= 0x80000000 >> i; - } - return m; -} - - -/* - * Emulate instruction with primary opcode = 19 - */ - -static void emul19(uint32 op) -{ - uint32 exop = (op >> 1) & 0x3ff; - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - switch (exop) { - - case 0: { // mcrf - uint32 crfd = 0x1c - (rd & 0x1c); - uint32 crfa = 0x1c - (ra & 0x1c); - uint32 crf = (cr >> crfa) & 0xf; - cr = (cr & ~(0xf << crfd)) | (crf << crfd); - break; - } - - case 16: { // bclr - uint32 oldpc = pc; - if (!(rd & 4)) { - ctr--; - if (rd & 2) { - if (ctr) - goto blr_nobranch; - } else { - if (!ctr) - goto blr_nobranch; - } - } - if (!(rd & 0x10)) { - if (rd & 8) { - if (!(cr & (0x80000000 >> ra))) - goto blr_nobranch; - } else { - if (cr & (0x80000000 >> ra)) - goto blr_nobranch; - } - } - pc = lr & 0xfffffffc; -blr_nobranch: - if (op & 1) - lr = oldpc; - break; - } - - case 33: // crnor - if ((cr & (0x80000000 >> ra)) || ((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr &= ~(0x80000000 >> rd); - else - cr |= 0x80000000 >> rd; - break; - - case 129: // crandc - if ((cr & (0x80000000 >> ra)) && !((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr |= 0x80000000 >> rd; - else - cr &= ~(0x80000000 >> rd); - break; - - case 150: // isync - break; - - case 193: { // crxor - uint32 mask = 0x80000000 >> rd; - cr = (((((cr >> (31 - ra)) ^ (cr >> (31 - ((op >> 11) & 0x1f)))) & 1) << (31 - rd)) & mask) | (cr & ~mask); - break; - } - - case 225: // crnand - if ((cr & (0x80000000 >> ra)) && ((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr &= ~(0x80000000 >> rd); - else - cr |= 0x80000000 >> rd; - break; - - case 257: // crand - if ((cr & (0x80000000 >> ra)) && ((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr |= 0x80000000 >> rd; - else - cr &= ~(0x80000000 >> rd); - break; - - case 289: { // creqv - uint32 mask = 0x80000000 >> rd; - cr = (((~((cr >> (31 - ra)) ^ (cr >> (31 - ((op >> 11) & 0x1f)))) & 1) << (31 - rd)) & mask) | (cr & ~mask); - break; - } - - case 417: // crorc - if ((cr & (0x80000000 >> ra)) || !((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr |= 0x80000000 >> rd; - else - cr &= ~(0x80000000 >> rd); - break; - - case 449: // cror - if ((cr & (0x80000000 >> ra)) || ((cr & (0x80000000 >> ((op >> 11) & 0x1f))))) - cr |= 0x80000000 >> rd; - else - cr &= ~(0x80000000 >> rd); - break; - - case 528: { // bcctr - if (op & 1) - lr = pc; - if (!(rd & 4)) { - ctr--; - if (rd & 2) { - if (ctr) - goto bctr_nobranch; - } else { - if (!ctr) - goto bctr_nobranch; - } - } - if (!(rd & 0x10)) { - if (rd & 8) { - if (!(cr & (0x80000000 >> ra))) - goto bctr_nobranch; - } else { - if (cr & (0x80000000 >> ra)) - goto bctr_nobranch; - } - } - pc = ctr & 0xfffffffc; -bctr_nobranch: - break; - } - - default: - printf("Illegal 19 opcode %08x (exop %d) at %08x\n", op, exop, pc-4); - dump(); - break; - } -} - - -/* - * Emulate instruction with primary opcode = 31 - */ - -static void emul31(uint32 op) -{ - uint32 exop = (op >> 1) & 0x3ff; - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 rb = (op >> 11) & 0x1f; - switch (exop) { - - case 0: { // cmpw - uint32 crfd = 0x1c - (rd & 0x1c); - uint8 crf = 0; - if (r[ra] == r[rb]) - crf |= 2; - else if ((int32)r[ra] < (int32)r[rb]) - crf |= 8; - else - crf |= 4; - if (xer & 0x80000000) - crf |= 1; - cr = (cr & ~(0xf << crfd)) | (crf << crfd); - break; - } - - case 8: { // subfc - uint64 tmp = (uint64)r[rb] - (uint64)r[ra]; - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer &= ~0x20000000; - else - xer |= 0x20000000; - if (op & 1) - record(r[rd]); - break; - } - - case 10: { // addc - uint64 tmp = (uint64)r[ra] + (uint64)r[rb]; - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer |= 0x20000000; - else - xer &= ~0x20000000; - if (op & 1) - record(r[rd]); - break; - } - - case 19: // mfcr - r[rd] = cr; - break; - - case 20: // lwarx - r[rd] = ReadMacInt32(r[rb] + (ra ? r[ra] : 0)); - //!! set reservation bit - break; - - case 23: // lwzx - r[rd] = ReadMacInt32(r[rb] + (ra ? r[ra] : 0)); - break; - - case 24: // slw - r[ra] = r[rd] << (r[rb] & 0x3f); - if (op & 1) - record(r[ra]); - break; - - case 26: { // cntlzw - uint32 mask = 0x80000000; - for (int i=0; i<32; i++, mask>>=1) { - if (r[rd] & mask) { - r[ra] = i; - goto cntlzw_done; - } - } - r[ra] = 32; -cntlzw_done:if (op & 1) - record(r[ra]); - break; - } - - case 28: // and - r[ra] = r[rd] & r[rb]; - if (op & 1) - record(r[ra]); - break; - - case 32: { // cmplw - uint32 crfd = 0x1c - (rd & 0x1c); - uint8 crf = 0; - if (r[ra] == r[rb]) - crf |= 2; - else if (r[ra] < r[rb]) - crf |= 8; - else - crf |= 4; - if (xer & 0x80000000) - crf |= 1; - cr = (cr & ~(0xf << crfd)) | (crf << crfd); - break; - } - - case 40: // subf - r[rd] = r[rb] - r[ra]; - if (op & 1) - record(r[rd]); - break; - - case 55: // lwzux - r[ra] += r[rb]; - r[rd] = ReadMacInt32(r[ra]); - break; - - case 60: // andc - r[ra] = r[rd] & ~r[rb]; - if (op & 1) - record(r[ra]); - break; - - case 75: // mulhw - r[rd] = ((int64)(int32)r[ra] * (int32)r[rb]) >> 32; - if (op & 1) - record(r[rd]); - break; - - case 86: // dcbf - break; - - case 87: // lbzx - r[rd] = ReadMacInt8(r[rb] + (ra ? r[ra] : 0)); - break; - - case 104: // neg - if (r[ra] == 0x80000000) - r[rd] = 0x80000000; - else - r[rd] = -(int32)r[ra]; - if (op & 1) - record(r[rd]); - break; - - case 119: // lbzux - r[ra] += r[rb]; - r[rd] = ReadMacInt8(r[ra]); - break; - - case 124: // nor - r[ra] = ~(r[rd] | r[rb]); - if (op & 1) - record(r[ra]); - break; - - case 136: { // subfe - uint64 tmp = (uint64)r[rb] - (uint64)r[ra]; - if (!(xer & 0x20000000)) - tmp--; - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer &= ~0x20000000; - else - xer |= 0x20000000; - if (op & 1) - record(r[rd]); - break; - } - - case 138: { // adde - uint64 tmp = (uint64)r[ra] + (uint64)r[rb]; - if (xer & 0x20000000) - tmp++; - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer |= 0x20000000; - else - xer &= ~0x20000000; - if (op & 1) - record(r[rd]); - break; - } - - case 144: { // mtcrf - uint32 mask = field2mask[(op >> 12) & 0xff]; - cr = (r[rd] & mask) | (cr & ~mask); - break; - } - - case 150: // stwcx - //!! check reserved bit - WriteMacInt32(r[rb] + (ra ? r[ra] : 0), r[rd]); - record(0); - break; - - case 151: // stwx - WriteMacInt32(r[rb] + (ra ? r[ra] : 0), r[rd]); - break; - - case 183: // stwux - r[ra] += r[rb]; - WriteMacInt32(r[ra], r[rd]); - break; - - case 215: // stbx - WriteMacInt8(r[rb] + (ra ? r[ra] : 0), r[rd]); - break; - - case 235: // mullw - r[rd] = (int32)r[ra] * (int32)r[rb]; - if (op & 1) - record(r[rd]); - break; - - case 247: // stbux - r[ra] += r[rb]; - WriteMacInt8(r[ra], r[rd]); - break; - - case 266: // add - r[rd] = r[ra] + r[rb]; - if (op & 1) - record(r[rd]); - break; - - case 279: // lhzx - r[rd] = ReadMacInt16(r[rb] + (ra ? r[ra] : 0)); - break; - - case 284: // eqv - r[ra] = ~(r[rd] ^ r[rb]); - if (op & 1) - record(r[ra]); - break; - - case 311: // lhzux - r[ra] += r[rb]; - r[rd] = ReadMacInt16(r[ra]); - break; - - case 316: // xor - r[ra] = r[rd] ^ r[rb]; - if (op & 1) - record(r[ra]); - break; - - case 339: { // mfspr - uint32 spr = ra | (rb << 5); - switch (spr) { - case 1: r[rd] = xer; break; - case 8: r[rd] = lr; break; - case 9: r[rd] = ctr; break; - default: - printf("Illegal mfspr opcode %08x at %08x\n", op, pc-4); - dump(); - } - break; - } - - case 343: // lhax - r[rd] = (int32)(int16)ReadMacInt16(r[rb] + (ra ? r[ra] : 0)); - break; - - case 371: // mftb - r[rd] = 0; //!! - break; - - case 375: // lhaux - r[ra] += r[rb]; - r[rd] = (int32)(int16)ReadMacInt16(r[ra]); - break; - - case 407: // sthx - WriteMacInt16(r[rb] + (ra ? r[ra] : 0), r[rd]); - break; - - case 412: // orc - r[ra] = r[rd] | ~r[rb]; - if (op & 1) - record(r[ra]); - break; - - case 439: // sthux - r[ra] += r[rb]; - WriteMacInt16(r[ra], r[rd]); - break; - - case 444: // or - r[ra] = r[rd] | r[rb]; - if (op & 1) - record(r[ra]); - break; - - case 459: // divwu - if (r[rb]) - r[rd] = r[ra] / r[rb]; - if (op & 1) - record(r[rd]); - break; - - case 467: { // mtspr - uint32 spr = ra | (rb << 5); - switch (spr) { - case 1: xer = r[rd] & 0xe000007f; break; - case 8: lr = r[rd]; break; - case 9: ctr = r[rd]; break; - default: - printf("Illegal mtspr opcode %08x at %08x\n", op, pc-4); - dump(); - } - break; - } - - case 476: // nand - r[ra] = ~(r[rd] & r[rb]); - if (op & 1) - record(r[ra]); - break; - - case 491: // divw - if (r[rb]) - r[rd] = (int32)r[ra] / (int32)r[rb]; - if (op & 1) - record(r[rd]); - break; - - case 520: { // subfco - uint64 tmp = (uint64)r[rb] - (uint64)r[ra]; - uint32 ov = (r[ra] ^ r[rb]) & ((uint32)tmp ^ r[rb]); - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer &= ~0x20000000; - else - xer |= 0x20000000; - if (ov & 0x80000000) - xer |= 0xc0000000; - else - xer &= ~0x40000000; - if (op & 1) - record(r[rd]); - break; - } - - case 522: { // addco - uint64 tmp = (uint64)r[ra] + (uint64)r[rb]; - uint32 ov = (r[ra] ^ (uint32)tmp) & (r[rb] ^ (uint32)tmp); - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer |= 0x20000000; - else - xer &= ~0x20000000; - if (ov & 0x80000000) - xer |= 0xc0000000; - else - xer &= ~0x40000000; - if (op & 1) - record(r[rd]); - break; - } - - case 533: { // lswx - uint32 addr = r[rb] + (ra ? r[ra] : 0); - int nb = xer & 0x7f; - int reg = rd; - for (int i=0; i> (r[rb] & 0x3f); - if (op & 1) - record(r[ra]); - break; - - case 597: { // lswi - uint32 addr = ra ? r[ra] : 0; - int nb = rb ? rb : 32; - int reg = rd; - for (int i=0; i> shift)); - shift -= 8; - if ((i & 3) == 3) { - shift = 24; - reg = (reg + 1) & 0x1f; - } - } - break; - } - - case 725: { // stswi - uint32 addr = ra ? r[ra] : 0; - int nb = rb ? rb : 32; - int reg = rd; - int shift = 24; - for (int i=0; i> shift)); - shift -= 8; - if ((i & 3) == 3) { - shift = 24; - reg = (reg + 1) & 0x1f; - } - } - break; - } - - case 778: { // addo - uint32 tmp = r[ra] + r[rb]; - uint32 ov = (r[ra] ^ tmp) & (r[rb] ^ tmp); - r[rd] = tmp; - if (ov & 0x80000000) - xer |= 0xc0000000; - else - xer &= ~0x40000000; - if (op & 1) - record(r[rd]); - break; - } - - case 792: { // sraw - uint32 sh = r[rb] & 0x3f; - uint32 mask = ~(0xffffffff << sh); - if ((r[rd] & 0x80000000) && (r[rd] & mask)) - xer |= 0x20000000; - else - xer &= ~0x20000000; - r[ra] = (int32)r[rd] >> sh; - if (op & 1) - record(r[ra]); - break; - } - - case 824: { // srawi - uint32 mask = ~(0xffffffff << rb); - if ((r[rd] & 0x80000000) && (r[rd] & mask)) - xer |= 0x20000000; - else - xer &= ~0x20000000; - r[ra] = (int32)r[rd] >> rb; - if (op & 1) - record(r[ra]); - break; - } - - case 854: // eieio - break; - - case 922: // extsh - r[ra] = (int32)(int16)r[rd]; - if (op & 1) - record(r[ra]); - break; - - case 954: // extsb - r[ra] = (int32)(int8)r[rd]; - if (op & 1) - record(r[ra]); - break; - - case 982: // icbi - break; - - case 1003: // divwo - if (r[rb] == 0 || (r[ra] == 0x80000000 && r[rb] == 0xffffffff)) - xer |= 0xc0000000; - else { - r[rd] = (int32)r[ra] / (int32)r[rb]; - xer &= ~0x40000000; - } - if (op & 1) - record(r[rd]); - break; - -#if 0 - case 1014: // dcbz - memset(r[rb] + (ra ? r[ra] : 0), 0, 32); - break; -#endif - - default: - printf("Illegal 31 opcode %08x (exop %d) at %08x\n", op, exop, pc-4); - dump(); - break; - } -} - - -/* - * Emulate instruction with primary opcode = 59 - */ - -static void emul59(uint32 op) -{ - uint32 exop = (op >> 1) & 0x3ff; - switch (exop) { - default: - printf("Illegal 59 opcode %08x (exop %d) at %08x\n", op, exop, pc-4); - dump(); - break; - } -} - - -/* - * Emulate instruction with primary opcode = 63 - */ - -static void emul63(uint32 op) -{ - uint32 exop = (op >> 1) & 0x3ff; - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 rb = (op >> 11) & 0x1f; - switch (exop) { - - case 583: // mffs - fr[rd] = (double)(uint64)fpscr; - if (op & 1) - record1(); - break; - - case 711: // mtfsf - //!! - if (op & 1) - record1(); - break; - - default: - printf("Illegal 63 opcode %08x (exop %d) at %08x\n", op, exop, pc-4); - dump(); - break; - } -} - - -/* - * Emulation loop - */ - -void emul_ppc(uint32 start) -{ - pc = start; -//uint32 old_val = 0; - for (;;) { -//uint32 val = ReadMacInt32(0x68fff778); -//if (val != old_val) { -// printf("insn at %08lx changed %08lx->%08lx\n", pc-4, old_val, val); -// old_val = val; -//} - uint32 op = ReadMacInt32(pc); -#if FLIGHT_RECORDER - record_step(op); -#endif -// printf("%08lx at %08lx\n", op, pc); - uint32 primop = op >> 26; - pc += 4; - switch (primop) { - - case 6: // SheepShaver extensions - printf("Extended opcode %08x at %08x (68k pc %08x)\n", op, pc-4, r[24]); - switch (op & 0x3f) { - case 0: // EMUL_RETURN - QuitEmulator(); - break; - - case 1: // EXEC_RETURN - //!! - dump(); - break; - - default: { // EMUL_OP - M68kRegisters r68; - WriteMacInt32(XLM_68K_R25, r[25]); - WriteMacInt32(XLM_RUN_MODE, MODE_EMUL_OP); - for (int i=0; i<8; i++) - r68.d[i] = r[8 + i]; - for (int i=0; i<7; i++) - r68.a[i] = r[16 + i]; - r68.a[7] = r[1]; - EmulOp(&r68, r[24], (op & 0x3f) - 2); - for (int i=0; i<8; i++) - r[8 + i] = r68.d[i]; - for (int i=0; i<7; i++) - r[16 + i] = r68.a[i]; - r[1] = r68.a[7]; - WriteMacInt32(XLM_RUN_MODE, MODE_68K); - break; - } - } - break; - - case 7: { // mulli - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = (int32)r[ra] * (int32)(int16)(op & 0xffff); - break; - } - - case 8: { // subfic - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint64 tmp = (uint32)(int32)(int16)(op & 0xffff) - (uint64)r[ra]; - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer &= ~0x20000000; - else - xer |= 0x20000000; - break; - } - - case 10: { // cmpli - uint32 crfd = 0x1c - ((op >> 21) & 0x1c); - uint32 ra = (op >> 16) & 0x1f; - uint32 val = (op & 0xffff); - uint8 crf = 0; - if (r[ra] == val) - crf |= 2; - else if (r[ra] < val) - crf |= 8; - else - crf |= 4; - if (xer & 0x80000000) - crf |= 1; - cr = (cr & ~(0xf << crfd)) | (crf << crfd); - break; - } - - case 11: { // cmpi - uint32 crfd = 0x1c - ((op >> 21) & 0x1c); - uint32 ra = (op >> 16) & 0x1f; - int32 val = (int32)(int16)(op & 0xffff); - uint8 crf = 0; - if ((int32)r[ra] == val) - crf |= 2; - else if ((int32)r[ra] < val) - crf |= 8; - else - crf |= 4; - if (xer & 0x80000000) - crf |= 1; - cr = (cr & ~(0xf << crfd)) | (crf << crfd); - break; - } - - case 12: { // addic - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint64 tmp = (uint64)r[ra] + (uint32)(int32)(int16)(op & 0xffff); - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer |= 0x20000000; - else - xer &= ~0x20000000; - break; - } - - case 13: { // addic. - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint64 tmp = (uint64)r[ra] + (uint32)(int32)(int16)(op & 0xffff); - r[rd] = tmp; - if (tmp & 0x100000000LL) - xer |= 0x20000000; - else - xer &= ~0x20000000; - record(r[rd]); - break; - } - - case 14: { // addi - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = (ra ? r[ra] : 0) + (int32)(int16)(op & 0xffff); - break; - } - - case 15: { // addis - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = (ra ? r[ra] : 0) + (op << 16); - break; - } - - case 16: { // bc - uint32 bo = (op >> 21) & 0x1f; - uint32 bi = (op >> 16) & 0x1f; - if (op & 1) - lr = pc; - if (!(bo & 4)) { - ctr--; - if (bo & 2) { - if (ctr) - goto bc_nobranch; - } else { - if (!ctr) - goto bc_nobranch; - } - } - if (!(bo & 0x10)) { - if (bo & 8) { - if (!(cr & (0x80000000 >> bi))) - goto bc_nobranch; - } else { - if (cr & (0x80000000 >> bi)) - goto bc_nobranch; - } - } - if (op & 2) - pc = (int32)(int16)(op & 0xfffc); - else - pc += (int32)(int16)(op & 0xfffc) - 4; -bc_nobranch: - break; - } - - case 18: { // b - int32 target = op & 0x03fffffc; - if (target & 0x02000000) - target |= 0xfc000000; - if (op & 1) - lr = pc; - if (op & 2) - pc = target; - else - pc += target - 4; - break; - } - - case 19: - emul19(op); - break; - - case 20: { // rlwimi - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 sh = (op >> 11) & 0x1f; - uint32 mask = mbme2mask(op); - r[ra] = (((r[rs] << sh) | (r[rs] >> (32-sh))) & mask) | (r[ra] & ~mask); - if (op & 1) - record(r[ra]); - break; - } - - case 21: { // rlwinm - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 sh = (op >> 11) & 0x1f; - r[ra] = ((r[rs] << sh) | (r[rs] >> (32-sh))) & mbme2mask(op); - if (op & 1) - record(r[ra]); - break; - } - - case 23: { // rlwnm - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 sh = r[(op >> 11) & 0x1f] & 0x1f; - r[ra] = ((r[rs] << sh) | (r[rs] >> (32-sh))) & mbme2mask(op); - if (op & 1) - record(r[ra]); - break; - } - - case 24: { // ori - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] | (op & 0xffff); - break; - } - - case 25: { // oris - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] | (op << 16); - break; - } - - case 26: { // xori - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] ^ (op & 0xffff); - break; - } - - case 27: { // xoris - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] ^ (op << 16); - break; - } - - case 28: { // andi. - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] & (op & 0xffff); - record(r[ra]); - break; - } - - case 29: { // andis. - uint32 rs = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] = r[rs] & (op << 16); - record(r[ra]); - break; - } - - case 31: - emul31(op); - break; - - case 32: { // lwz - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = ReadMacInt32(int16(op & 0xffff) + (ra ? r[ra] : 0)); - break; - } - - case 33: { // lwzu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - r[rd] = ReadMacInt32(r[ra]); - break; - } - - case 34: { // lbz - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = ReadMacInt8(int16(op & 0xffff) + (ra ? r[ra] : 0)); - break; - } - - case 35: { // lbzu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - r[rd] = ReadMacInt8(r[ra]); - break; - } - - case 36: { // stw - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - WriteMacInt32(int16(op & 0xffff) + (ra ? r[ra] : 0), r[rd]); - break; - } - - case 37: { // stwu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - WriteMacInt32(r[ra], r[rd]); - break; - } - - case 38: { // stb - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - WriteMacInt8(int16(op & 0xffff) + (ra ? r[ra] : 0), r[rd]); - break; - } - - case 39: { // stbu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - WriteMacInt8(r[ra], r[rd]); - break; - } - - case 40: { // lhz - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = ReadMacInt16(int16(op & 0xffff) + (ra ? r[ra] : 0)); - break; - } - - case 41: { // lhzu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - r[rd] = ReadMacInt16(r[ra]); - break; - } - - case 42: { // lha - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[rd] = (int32)(int16)ReadMacInt16(int16(op & 0xffff) + (ra ? r[ra] : 0)); - break; - } - - case 43: { // lhau - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - r[rd] = (int32)(int16)ReadMacInt16(r[ra]); - break; - } - - case 44: { // sth - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - WriteMacInt16(int16(op & 0xffff) + (ra ? r[ra] : 0), r[rd]); - break; - } - - case 45: { // sthu - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - r[ra] += int16(op & 0xffff); - WriteMacInt16(r[ra], r[rd]); - break; - } - - case 46: { // lmw - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 addr = int16(op & 0xffff) + (ra ? r[ra] : 0); - while (rd <= 31) { - r[rd] = ReadMacInt32(addr); - rd++; - addr += 4; - } - break; - } - - case 47: { // stmw - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - uint32 addr = int16(op & 0xffff) + (ra ? r[ra] : 0); - while (rd <= 31) { - WriteMacInt32(addr, r[rd]); - rd++; - addr += 4; - } - break; - } - - case 50: { // lfd - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - fr[rd] = (double)ReadMacInt64(int16(op & 0xffff) + (ra ? r[ra] : 0)); - break; - } - - case 54: { // stfd - uint32 rd = (op >> 21) & 0x1f; - uint32 ra = (op >> 16) & 0x1f; - WriteMacInt64(int16(op & 0xffff) + (ra ? r[ra] : 0), (uint64)fr[rd]); - break; - } - - case 59: - emul59(op); - break; - - case 63: - emul63(op); - break; - - default: - printf("Illegal opcode %08x at %08x\n", op, pc-4); - dump(); - break; - } - } -} - - -static struct sigaction sigsegv_action; - -static void sigsegv_handler(int sig) -{ - printf("SIGSEGV\n"); - dump(); -} - -void init_emul_ppc(void) -{ - // Init field2mask - for (int i=0; i<256; i++) { - uint32 mask = 0; - if (i & 0x01) mask |= 0x0000000f; - if (i & 0x02) mask |= 0x000000f0; - if (i & 0x04) mask |= 0x00000f00; - if (i & 0x08) mask |= 0x0000f000; - if (i & 0x10) mask |= 0x000f0000; - if (i & 0x20) mask |= 0x00f00000; - if (i & 0x40) mask |= 0x0f000000; - if (i & 0x80) mask |= 0xf0000000; - field2mask[i] = mask; - } - - // Init registers - for (int i=0; i<32; i++) { - r[i] = 0; - fr[i] = 0.0; - } - lr = ctr = 0; - cr = xer = 0; - fpscr = 0; - - r[3] = ROMBase + 0x30d000; - - // Install SIGSEGV handler - sigemptyset(&sigsegv_action.sa_mask); - sigsegv_action.sa_handler = (__sighandler_t)sigsegv_handler; - sigsegv_action.sa_flags = 0; - sigsegv_action.sa_restorer = NULL; - sigaction(SIGSEGV, &sigsegv_action, NULL); - -#if FLIGHT_RECORDER && ENABLE_MON - // Install "log" command in mon - mon_add_command("log", dump_log, "log Dump PowerPC emulation log\n"); -#endif -} - - -/* - * Execute 68k subroutine (must be ended with EXEC_RETURN) - * This must only be called by the emul_thread when in EMUL_OP mode - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68k(uint32 pc, M68kRegisters *r) -{ - printf("ERROR: Execute68k() unimplemented\n"); - QuitEmulator(); -} - - -/* - * Execute 68k A-Trap from EMUL_OP routine - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68kTrap(uint16 trap, M68kRegisters *r) -{ - printf("ERROR: Execute68kTrap() unimplemented\n"); - QuitEmulator(); -} - - -/* - * Call MacOS PPC code - */ - -uint32 call_macos(uint32 tvect) -{ - printf("ERROR: call_macos() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos1(uint32 tvect, uint32 arg1) -{ - printf("ERROR: call_macos1() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2) -{ - printf("ERROR: call_macos2() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3) -{ - printf("ERROR: call_macos3() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4) -{ - printf("ERROR: call_macos4() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5) -{ - printf("ERROR: call_macos5() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6) -{ - printf("ERROR: call_macos6() unimplemented\n"); - QuitEmulator(); - return 0; -} - -uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7) -{ - printf("ERROR: call_macos7() unimplemented\n"); - QuitEmulator(); - return 0; -} - - -/* - * Atomic operations - */ - -extern int atomic_add(int *var, int v) -{ - int ret = *var; - *var += v; - return ret; -} - -extern int atomic_and(int *var, int v) -{ - int ret = *var; - *var &= v; - return ret; -} - -extern int atomic_or(int *var, int v) -{ - int ret = *var; - *var |= v; - return ret; -} - - -extern "C" void get_resource(void); -extern "C" void get_1_resource(void); -extern "C" void get_ind_resource(void); -extern "C" void get_1_ind_resource(void); -extern "C" void r_get_resource(void); - -void get_resource(void) -{ - printf("ERROR: get_resource() unimplemented\n"); - QuitEmulator(); -} - -void get_1_resource(void) -{ - printf("ERROR: get_1_resource() unimplemented\n"); - QuitEmulator(); -} - -void get_ind_resource(void) -{ - printf("ERROR: get_ind_resource() unimplemented\n"); - QuitEmulator(); -} - -void get_1_ind_resource(void) -{ - printf("ERROR: get_1_ind_resource() unimplemented\n"); - QuitEmulator(); -} - -void r_get_resource(void) -{ - printf("ERROR: r_get_resource() unimplemented\n"); - QuitEmulator(); -} diff --git a/SheepShaver/src/ether.cpp b/SheepShaver/src/ether.cpp deleted file mode 100644 index 2a1e53c70..000000000 --- a/SheepShaver/src/ether.cpp +++ /dev/null @@ -1,1738 +0,0 @@ -/* - * ether.cpp - SheepShaver Ethernet Device Driver (DLPI) - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - */ - -/* - * TODO - * - 802.2 TEST/XID - * - MIB statistics - */ - -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "ether.h" -#include "ether_defs.h" -#include "macos_util.h" - -#define DEBUG 0 -#include "debug.h" - -// Packet types -enum { - kPktDIX = 0, - kPkt8022SAP = 1, - kPkt8022GroupSAP = 2, - kPkt8022SNAP = 3, - kPktIPX = 4, - kPktUnknown = 5 -}; - - -/* - * Stream private data structure - */ - -static const int kGroupSAPMapSize = 128/32; // Number of 32-bit values we need for 128 bits -static const int kGSshift = 6; -static const int kGSmask = 0x1F; - -struct multicast_node { - nw_multicast_node_p next; - uint8 addr[kEnetPhysicalAddressLength]; -}; - -struct DLPIStream { - void SetGroupSAP(uint8 sap) - { - group_sap[sap >> kGSshift] |= (1L << ((sap >> 1) & kGSmask)); - } - - void ClearGroupSAP(uint8 sap) - { - group_sap[sap >> kGSshift] &= ~(1L << ((sap >> 1) & kGSmask)); - } - - void ClearAllGroupSAPs(void) - { - for (int i=0; i> kGSshift] & (1L << ((sap >> 1) & kGSmask)); - } - - void AddMulticast(uint8 *addr) - { - multicast_node *n = (multicast_node *)Mac2HostAddr(Mac_sysalloc(sizeof(multicast_node))); - memcpy(n->addr, addr, kEnetPhysicalAddressLength); - n->next = multicast_list; - multicast_list = n; - } - - void RemoveMulticast(uint8 *addr) - { - multicast_node *p = multicast_list; - while (p) { - if (memcmp(addr, p->addr, kEnetPhysicalAddressLength) == 0) - goto found; - p = p->next; - } - return; - found: - multicast_node *q = (multicast_node *)&multicast_list; - while (q) { - if (q->next == p) { - q->next = p->next; - Mac_sysfree(Host2MacAddr((uint8 *)p)); - return; - } - q = q->next; - } - } - - uint8 *IsMulticastRegistered(uint8 *addr) - { - multicast_node *n = multicast_list; - while (n) { - if (memcmp(addr, n->addr, kEnetPhysicalAddressLength) == 0) - return n->addr; - n = n->next; - } - return NULL; - } - - nw_uint32 minor_num; // Minor device number of this stream - nw_uint32 dlpi_state; // DLPI state of this stream - nw_uint32 flags; // Flags - nw_uint16 dlsap; // SAP bound to this stream - nw_bool framing_8022; // Using 802.2 framing? This is only used to report the MAC type for DL_INFO_ACK and can be set with an ioctl() call - nw_bool raw_mode; // Using raw mode? Header is treated as data - nw_queue_p rdq; // Read queue for this stream - nw_uint32 group_sap[kGroupSAPMapSize]; // Map of bound group SAPs - uint8 snap[k8022SNAPLength]; // SNAP bound to this stream - nw_multicast_node_p multicast_list; // List of enabled multicast addresses -}; - -// Hack to make DLPIStream list initialization early to NULL (do we really need this?) -struct DLPIStreamInit { - DLPIStreamInit(nw_DLPIStream_p *dlpi_stream_p) { *dlpi_stream_p = NULL; } -}; - -// Stream flags -enum { - kSnapStream = 0x00000001, - kAcceptMulticasts = 0x00000002, - kAcceptAll8022Packets = 0x00000004, - kFastPathMode = 0x00000008 -}; - -// List of opened streams (used internally by OpenTransport) -static nw_DLPIStream_p dlpi_stream_list; -static DLPIStreamInit dlpi_stream_init(&dlpi_stream_list); - -// Are we open? -bool ether_driver_opened = false; - -// Our ethernet hardware address -static uint8 hardware_address[6] = {0, 0, 0, 0, 0, 0}; - -// Statistics -int32 num_wput = 0; -int32 num_error_acks = 0; -int32 num_tx_packets = 0; -int32 num_tx_raw_packets = 0; -int32 num_tx_normal_packets = 0; -int32 num_tx_buffer_full = 0; -int32 num_rx_packets = 0; -int32 num_ether_irq = 0; -int32 num_unitdata_ind = 0; -int32 num_rx_fastpath = 0; -int32 num_rx_no_mem = 0; -int32 num_rx_dropped = 0; -int32 num_rx_stream_not_ready = 0; -int32 num_rx_no_unitdata_mem = 0; - - -// Function pointers of imported functions -typedef mblk_t *(*allocb_ptr)(size_t size, int pri); -static uint32 allocb_tvect = 0; -mblk_t *allocb(size_t arg1, int arg2) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS2(allocb_ptr, allocb_tvect, arg1, arg2)); -} -typedef void (*freeb_ptr)(mblk_t *); -static uint32 freeb_tvect = 0; -static inline void freeb(mblk_t *arg1) -{ - CallMacOS1(freeb_ptr, freeb_tvect, arg1); -} -typedef int16 (*freemsg_ptr)(mblk_t *); -static uint32 freemsg_tvect = 0; -static inline int16 freemsg(mblk_t *arg1) -{ - return (int16)CallMacOS1(freemsg_ptr, freemsg_tvect, arg1); -} -typedef mblk_t *(*copyb_ptr)(mblk_t *); -static uint32 copyb_tvect = 0; -static inline mblk_t *copyb(mblk_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(copyb_ptr, copyb_tvect, arg1)); -} -typedef mblk_t *(*dupmsg_ptr)(mblk_t *); -static uint32 dupmsg_tvect = 0; -static inline mblk_t *dupmsg(mblk_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(dupmsg_ptr, dupmsg_tvect, arg1)); -} -typedef mblk_t *(*getq_ptr)(queue_t *); -static uint32 getq_tvect = 0; -static inline mblk_t *getq(queue_t *arg1) -{ - return (mblk_t *)Mac2HostAddr((uint32)CallMacOS1(getq_ptr, getq_tvect, arg1)); -} -typedef int (*putq_ptr)(queue_t *, mblk_t *); -static uint32 putq_tvect = 0; -static inline int putq(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(putq_ptr, putq_tvect, arg1, arg2); -} -typedef int (*putnext_ptr)(queue_t *, mblk_t *); -static uint32 putnext_tvect = 0; -static inline int putnext(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(putnext_ptr, putnext_tvect, arg1, arg2); -} -typedef int (*putnextctl1_ptr)(queue_t *, int type, int c); -static uint32 putnextctl1_tvect = 0; -static inline int putnextctl1(queue_t *arg1, int arg2, int arg3) -{ - return (int)CallMacOS3(putnextctl1_ptr, putnextctl1_tvect, arg1, arg2, arg3); -} -typedef int (*canputnext_ptr)(queue_t *); -static uint32 canputnext_tvect = 0; -static inline int canputnext(queue_t *arg1) -{ - return (int)CallMacOS1(canputnext_ptr, canputnext_tvect, arg1); -} -typedef int (*qreply_ptr)(queue_t *, mblk_t *); -static uint32 qreply_tvect = 0; -static inline int qreply(queue_t *arg1, mblk_t *arg2) -{ - return (int)CallMacOS2(qreply_ptr, qreply_tvect, arg1, arg2); -} -typedef void (*flushq_ptr)(queue_t *, int flag); -static uint32 flushq_tvect = 0; -static inline void flushq(queue_t *arg1, int arg2) -{ - CallMacOS2(flushq_ptr, flushq_tvect, arg1, arg2); -} -typedef int (*msgdsize_ptr)(const mblk_t *); -static uint32 msgdsize_tvect = 0; -static inline int msgdsize(const mblk_t *arg1) -{ - return (int)CallMacOS1(msgdsize_ptr, msgdsize_tvect, arg1); -} -typedef void (*otenterint_ptr)(void); -static uint32 otenterint_tvect = 0; -void OTEnterInterrupt(void) -{ - CallMacOS(otenterint_ptr, otenterint_tvect); -} -typedef void (*otleaveint_ptr)(void); -static uint32 otleaveint_tvect = 0; -void OTLeaveInterrupt(void) -{ - CallMacOS(otleaveint_ptr, otleaveint_tvect); -} -typedef int (*mi_open_comm_ptr)(DLPIStream **mi_opp_orig, size_t size, queue_t *q, void *dev, int flag, int sflag, void *credp); -static uint32 mi_open_comm_tvect = 0; -static inline int mi_open_comm(DLPIStream **arg1, size_t arg2, queue_t *arg3, void *arg4, int arg5, int arg6, void *arg7) -{ - return (int)CallMacOS7(mi_open_comm_ptr, mi_open_comm_tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7); -} -typedef int (*mi_close_comm_ptr)(DLPIStream **mi_opp_orig, queue_t *q); -static uint32 mi_close_comm_tvect = 0; -static inline int mi_close_comm(DLPIStream **arg1, queue_t *arg2) -{ - return (int)CallMacOS2(mi_close_comm_ptr, mi_close_comm_tvect, arg1, arg2); -} -typedef DLPIStream *(*mi_next_ptr_ptr)(DLPIStream *); -static uint32 mi_next_ptr_tvect = 0; -static inline DLPIStream *mi_next_ptr(DLPIStream *arg1) -{ - return (DLPIStream *)Mac2HostAddr((uint32)CallMacOS1(mi_next_ptr_ptr, mi_next_ptr_tvect, arg1)); -} -#ifdef USE_ETHER_FULL_DRIVER -typedef void (*ether_dispatch_packet_ptr)(uint32 p, uint32 size); -static uint32 ether_dispatch_packet_tvect = 0; -#endif - -// Prototypes -static void ether_ioctl(DLPIStream *the_stream, queue_t* q, mblk_t* mp); -static void ether_flush(queue_t* q, mblk_t* mp); -static mblk_t *build_tx_packet_header(DLPIStream *the_stream, mblk_t *mp, bool fast_path); -static void transmit_packet(mblk_t *mp); -static void DLPI_error_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim, uint32 err, uint32 uerr); -static void DLPI_ok_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim); -static void DLPI_info(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_phys_addr(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_subs_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_subs_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_enable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_disable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp); -static void DLPI_unit_data(DLPIStream *the_stream, queue_t *q, mblk_t *mp); - - -/* - * Initialize ethernet stream module - */ - -static uint8 InitStreamModuleImpl(void *theID) -{ - D(bug("InitStreamModule\n")); - - // Don't re-open if already open - if (ether_driver_opened) - return true; - ether_driver_opened = false; - - // Import functions from OTKernelLib - allocb_tvect = FindLibSymbol("\013OTKernelLib", "\006allocb"); - D(bug("allocb TVECT at %08lx\n", allocb_tvect)); - if (allocb_tvect == 0) - return false; - freeb_tvect = FindLibSymbol("\013OTKernelLib", "\005freeb"); - D(bug("freeb TVECT at %08lx\n", freeb_tvect)); - if (freeb_tvect == 0) - return false; - freemsg_tvect = FindLibSymbol("\013OTKernelLib", "\007freemsg"); - D(bug("freemsg TVECT at %08lx\n", freemsg_tvect)); - if (freemsg_tvect == 0) - return false; - copyb_tvect = FindLibSymbol("\013OTKernelLib", "\005copyb"); - D(bug("copyb TVECT at %08lx\n", copyb_tvect)); - if (copyb_tvect == 0) - return false; - dupmsg_tvect = FindLibSymbol("\013OTKernelLib", "\006dupmsg"); - D(bug("dupmsg TVECT at %08lx\n", dupmsg_tvect)); - if (dupmsg_tvect == 0) - return false; - getq_tvect = FindLibSymbol("\013OTKernelLib", "\004getq"); - D(bug("getq TVECT at %08lx\n", getq_tvect)); - if (getq_tvect == 0) - return false; - putq_tvect = FindLibSymbol("\013OTKernelLib", "\004putq"); - D(bug("putq TVECT at %08lx\n", putq_tvect)); - if (putq_tvect == 0) - return false; - putnext_tvect = FindLibSymbol("\013OTKernelLib", "\007putnext"); - D(bug("putnext TVECT at %08lx\n", putnext_tvect)); - if (putnext_tvect == 0) - return false; - putnextctl1_tvect = FindLibSymbol("\013OTKernelLib", "\013putnextctl1"); - D(bug("putnextctl1 TVECT at %08lx\n", putnextctl1_tvect)); - if (putnextctl1_tvect == 0) - return false; - canputnext_tvect = FindLibSymbol("\013OTKernelLib", "\012canputnext"); - D(bug("canputnext TVECT at %08lx\n", canputnext_tvect)); - if (canputnext_tvect == 0) - return false; - qreply_tvect = FindLibSymbol("\013OTKernelLib", "\006qreply"); - D(bug("qreply TVECT at %08lx\n", qreply_tvect)); - if (qreply_tvect == 0) - return false; - flushq_tvect = FindLibSymbol("\013OTKernelLib", "\006flushq"); - D(bug("flushq TVECT at %08lx\n", flushq_tvect)); - if (flushq_tvect == 0) - return false; - msgdsize_tvect = FindLibSymbol("\013OTKernelLib", "\010msgdsize"); - D(bug("msgdsize TVECT at %08lx\n", msgdsize_tvect)); - if (msgdsize_tvect == 0) - return false; - otenterint_tvect = FindLibSymbol("\017OTKernelUtilLib", "\020OTEnterInterrupt"); - D(bug("OTEnterInterrupt TVECT at %08lx\n", otenterint_tvect)); - if (otenterint_tvect == 0) - return false; - otleaveint_tvect = FindLibSymbol("\017OTKernelUtilLib", "\020OTLeaveInterrupt"); - D(bug("OTLeaveInterrupt TVECT at %08lx\n", otleaveint_tvect)); - if (otleaveint_tvect == 0) - return false; - mi_open_comm_tvect = FindLibSymbol("\013OTKernelLib", "\014mi_open_comm"); - D(bug("mi_open_comm TVECT at %08lx\n", mi_open_comm_tvect)); - if (mi_open_comm_tvect == 0) - return false; - mi_close_comm_tvect = FindLibSymbol("\013OTKernelLib", "\015mi_close_comm"); - D(bug("mi_close_comm TVECT at %08lx\n", mi_close_comm_tvect)); - if (mi_close_comm_tvect == 0) - return false; - mi_next_ptr_tvect = FindLibSymbol("\013OTKernelLib", "\013mi_next_ptr"); - D(bug("mi_next_ptr TVECT at %08lx\n", mi_next_ptr_tvect)); - if (mi_next_ptr_tvect == 0) - return false; - -#ifndef USE_ETHER_FULL_DRIVER - // Initialize stream list (which might be leftover) - dlpi_stream_list = NULL; - - // Ask add-on for ethernet hardware address - AO_get_ethernet_address(Host2MacAddr(hardware_address)); -#endif - - // Yes, we're open - ether_driver_opened = true; - return true; -} - -uint8 InitStreamModule(void *theID) -{ - // Common initialization code - bool net_open = InitStreamModuleImpl(theID); - - // Call InitStreamModule() in native side -#ifdef BUILD_ETHER_FULL_DRIVER - extern bool NativeInitStreamModule(void *); - if (!NativeInitStreamModule((void *)ether_dispatch_packet)) - net_open = false; -#endif - - // Import functions from the Ethernet driver -#ifdef USE_ETHER_FULL_DRIVER - ether_dispatch_packet_tvect = (uintptr)theID; - D(bug("ether_dispatch_packet TVECT at %08lx\n", ether_dispatch_packet_tvect)); - if (ether_dispatch_packet_tvect == 0) - net_open = false; -#endif - - return net_open; -} - - -/* - * Terminate ethernet stream module - */ - -static void TerminateStreamModuleImpl(void) -{ - D(bug("TerminateStreamModule\n")); - -#ifndef USE_ETHER_FULL_DRIVER - // This happens sometimes. I don't know why. - if (dlpi_stream_list != NULL) - printf("FATAL: TerminateStreamModule() called, but streams still open\n"); -#endif - - // Sorry, we're closed - ether_driver_opened = false; -} - -void TerminateStreamModule(void) -{ - // Common termination code - TerminateStreamModuleImpl(); - - // Call TerminateStreamModule() in native side -#ifdef BUILD_ETHER_FULL_DRIVER - extern void NativeTerminateStreamModule(void); - NativeTerminateStreamModule(); -#endif -} - - -/* - * Open new stream - */ - -int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds) -{ - D(bug("ether_open(%p,%p,%d,%d,%p)\n", rdq, dev, flag, sflag, creds)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_open(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // If we're being reopened, just return - if (rdq->q_ptr != NULL) - return 0; - - // Allocate DLPIStream structure - int err = mi_open_comm((DLPIStream **)&dlpi_stream_list, sizeof(DLPIStream), rdq, dev, flag, sflag, creds); - if (err) - return err; - DLPIStream *the_stream = (DLPIStream *)rdq->q_ptr; - the_stream->rdq = rdq; - the_stream->dlpi_state = DL_UNBOUND; - the_stream->flags = 0; - the_stream->dlsap = 0; - the_stream->framing_8022 = false; - the_stream->raw_mode = false; - the_stream->multicast_list = NULL; - return 0; -} - - -/* - * Close stream - */ - -int ether_close(queue_t *rdq, int flag, void *creds) -{ - D(bug("ether_close(%p,%d,%p)\n", rdq, flag, creds)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_close(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // Get stream - DLPIStream *the_stream = (DLPIStream *)rdq->q_ptr; - - // Don't close if never opened - if (the_stream == NULL) - return 0; - - // Disable all registered multicast addresses - while (the_stream->multicast_list) { - AO_disable_multicast(Host2MacAddr(the_stream->multicast_list->addr)); - the_stream->RemoveMulticast(the_stream->multicast_list->addr); - } - the_stream->multicast_list = NULL; - - // Delete the DLPIStream - return mi_close_comm((DLPIStream **)&dlpi_stream_list, rdq); -} - - -/* - * Put something on the write queue - */ - -int ether_wput(queue_t *q, mblk_t *mp) -{ - D(bug("ether_wput(%p,%p)\n", q, mp)); - - // Return if driver was closed - if (!ether_driver_opened) { - printf("FATAL: ether_wput(): Ethernet driver not opened\n"); - return MAC_ENXIO; - } - - // Get stream - DLPIStream *the_stream = (DLPIStream *)q->q_ptr; - if (the_stream == NULL) - return MAC_ENXIO; - - D(bug(" db_type %d\n", (int)mp->b_datap->db_type)); - switch (mp->b_datap->db_type) { - - case M_DATA: - // Transmit raw packet - D(bug(" raw packet\n")); - num_tx_raw_packets++; - transmit_packet(mp); - break; - - case M_PROTO: - case M_PCPROTO: { - union DL_primitives *dlp = (union DL_primitives *)(void *)mp->b_rptr; - uint32 prim = dlp->dl_primitive; - D(bug(" dl_primitive %d\n", prim)); - switch (prim) { - case DL_UNITDATA_REQ: - // Transmit normal packet - num_tx_normal_packets++; - DLPI_unit_data(the_stream, q, mp); - break; - - case DL_INFO_REQ: - DLPI_info(the_stream, q, mp); - break; - - case DL_PHYS_ADDR_REQ: - DLPI_phys_addr(the_stream, q, mp); - break; - - case DL_BIND_REQ: - DLPI_bind(the_stream, q, mp); - break; - - case DL_UNBIND_REQ: - DLPI_unbind(the_stream, q, mp); - break; - - case DL_SUBS_BIND_REQ: - DLPI_subs_bind(the_stream, q, mp); - break; - - case DL_SUBS_UNBIND_REQ: - DLPI_subs_unbind(the_stream, q, mp); - break; - - case DL_ENABMULTI_REQ: - DLPI_enable_multi(the_stream, q, mp); - break; - - case DL_DISABMULTI_REQ: - DLPI_disable_multi(the_stream, q, mp); - break; - - default: - D(bug("WARNING: ether_wsrv(): Unknown primitive\n")); - DLPI_error_ack(the_stream, q, mp, prim, DL_NOTSUPPORTED, 0); - break; - } - break; - } - - case M_IOCTL: - ether_ioctl(the_stream, q, mp); - break; - - case M_FLUSH: - ether_flush(q, mp); - break; - - default: - D(bug("WARNING: ether_wput(): Unknown message type\n")); - freemsg(mp); - break; - } - num_wput++; - return 0; -} - - -/* - * Dequeue and process messages from the read queue - */ - -int ether_rsrv(queue_t *q) -{ - mblk_t *mp; - while ((mp = getq(q)) != NULL) { - if (canputnext(q)) - putnext(q, mp); - else { - freemsg(mp); - flushq(q, FLUSHDATA); - break; - } - } - return 0; -} - - -/* - * Handle ioctl calls - */ - -static void ether_ioctl(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - struct iocblk *ioc = (struct iocblk *)(void *)mp->b_rptr; - D(bug(" ether_ioctl(%p,%p) cmd %d\n", q, mp, (int)ioc->ioc_cmd)); - - switch (ioc->ioc_cmd) { - - case I_OTSetFramingType: { // Toggles what the general info primitive returns for dl_mac_type in dl_info_ack_t structure - mblk_t *info_mp = mp->b_cont; - if (info_mp == NULL || ((info_mp->b_wptr - info_mp->b_rptr) != sizeof(uint32))) { - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - uint32 framing_type = ntohl(*(uint32 *)(void *)info_mp->b_rptr); - D(bug(" I_OTSetFramingType type %d\n", framing_type)); - if (framing_type != kOTGetFramingValue) - the_stream->framing_8022 = (framing_type == kOTFraming8022); - mp->b_cont = NULL; - freemsg(info_mp); - if (the_stream->framing_8022) - ioc->ioc_rval = kOTFraming8022; - else - ioc->ioc_rval = kOTFramingEthernet; - goto ioctl_ok; - } - - case DL_IOC_HDR_INFO: { // Special Mentat call, for fast transmits - D(bug(" DL_IOC_HDR_INFO\n")); - mblk_t *info_mp = mp->b_cont; - - // Copy DL_UNITDATA_REQ block - mblk_t *unitdata_mp = copyb(info_mp); - if (unitdata_mp == NULL) { - ioc->ioc_error = MAC_ENOMEM; - goto ioctl_error; - } - unitdata_mp->b_datap->db_type = M_PROTO; - - // Construct header (converts DL_UNITDATA_REQ -> M_DATA) - mblk_t *header_mp = build_tx_packet_header(the_stream, unitdata_mp, true); - - if (header_mp == NULL) { - // Could not allocate a message block large enough - ioc->ioc_error = MAC_ENOMEM; - goto ioctl_error; - } - - // Attach header block at the end - mp->b_cont->b_cont = header_mp; - the_stream->flags |= kFastPathMode; - goto ioctl_ok; - } - - case I_OTSetRawMode: { - mblk_t *info_mp = mp->b_cont; - dl_recv_control_t *dlrc; - if (info_mp == NULL || ((info_mp->b_wptr - info_mp->b_rptr) != sizeof(dlrc->dl_primitive))) { - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - dlrc = (dl_recv_control_t *)(void *)info_mp->b_rptr; - D(bug(" I_OTSetRawMode primitive %d\n", (int)dlrc->dl_primitive)); - the_stream->raw_mode = true; - goto ioctl_ok; - } - - default: - D(bug("WARNING: Unknown ether_ioctl() call\n")); - ioc->ioc_error = MAC_EINVAL; - goto ioctl_error; - } - -ioctl_ok: - ioc->ioc_count = 0; - for (mblk_t *mp1 = mp; (mp1 = mp1->b_cont) != NULL;) - ioc->ioc_count += mp1->b_wptr - mp1->b_rptr; - ioc->ioc_error = 0; - mp->b_datap->db_type = M_IOCACK; - qreply(q, mp); - return; - -ioctl_error: - mp->b_datap->db_type = M_IOCNAK; - qreply(q, mp); - return; -} - - -/* - * Flush call, send it up to the read side of the stream - */ - -static void ether_flush(queue_t* q, mblk_t* mp) -{ - D(bug(" ether_flush(%p,%p)\n", q, mp)); - - uint8 *rptr = mp->b_rptr; - if (*rptr & FLUSHW) - flushq(q, FLUSHALL); - if (*rptr & FLUSHR) { - flushq(RD(q), FLUSHALL); - *rptr &= ~FLUSHW; - qreply(q, mp); - } else - freemsg(mp); -} - - -/* - * Classify packet into the different types of protocols - */ - -static uint16 classify_packet_type(uint16 primarySAP, uint16 secondarySAP) -{ - if (primarySAP >= kMinDIXSAP) - return kPktDIX; - - if ((primarySAP == kIPXSAP) && (secondarySAP == kIPXSAP)) - return kPktIPX; - - if (primarySAP == kSNAPSAP) - return kPkt8022SNAP; - - if (primarySAP <= k8022GlobalSAP) - return kPkt8022SAP; - - return kPktUnknown; -} - - -/* - * Check if the address is a multicast, broadcast or standard address - */ - -static int32 get_address_type(uint8 *addr) -{ - if (addr[0] & 1) { // Multicast/broadcast flag - if (OTIs48BitBroadcastAddress(addr)) - return keaBroadcast; - else - return keaMulticast; - } else - return keaStandardAddress; -} - - -/* - * Reuse a message block, make room for more data - */ - -static mblk_t *reuse_message_block(mblk_t *mp, uint16 needed_size) -{ - mblk_t *nmp; - - if ((mp->b_datap->db_ref == 1) && ((mp->b_datap->db_lim - mp->b_datap->db_base) >= needed_size)) { - mp->b_datap->db_type = M_DATA; - mp->b_rptr = mp->b_datap->db_base; - mp->b_wptr = mp->b_datap->db_base + needed_size; - } else { - nmp = mp->b_cont; // Grab the M_DATA blocks - mp->b_cont = NULL; // Detach the M_(PC)PROTO - freemsg(mp); // Free the M_(PC)PROTO - mp = nmp; // Point to the M_DATA blocks - - // Try to get space on the first M_DATA block - if (mp && (mp->b_datap->db_ref == 1) && ((mp->b_rptr - mp->b_datap->db_base) >= needed_size)) - mp->b_rptr -= needed_size; - else { - // Try to allocate a new message - if ((nmp = allocb(needed_size, BPRI_HI)) == NULL) { - // Could not get a new message block so lets forget about the message altogether - freemsg(mp); // Free the original M_DATA portion of the message - mp = NULL; // Indicates the reuse failed - } else { - nmp->b_cont = mp; // Attach the new message block as the head - nmp->b_wptr += needed_size; - mp = nmp; - } - } - } - - return mp; -} - - -/* - * Built header for packet to be transmitted (convert DL_UNITDATA_REQ -> M_DATA) - * The passed-in message has the header info in the first message block and the data - * in the following blocks - */ - -static mblk_t *build_tx_packet_header(DLPIStream *the_stream, mblk_t *mp, bool fast_path) -{ - // Only handle unit_data requests - dl_unitdata_req_t *req = (dl_unitdata_req_t *)(void *)mp->b_rptr; - if (req->dl_primitive != DL_UNITDATA_REQ) { - freemsg(mp); - return NULL; - } - - // Extract destination address and its length - uint8 *destAddrOrig = ((uint8 *)req) + req->dl_dest_addr_offset; - uint32 destAddrLen = req->dl_dest_addr_length; - uint8 ctrl = 0x03; - - // Extract DLSAP - uint16 dlsap; - switch (destAddrLen) { - case kEnetPhysicalAddressLength: - dlsap = the_stream->dlsap; - break; - case kEnetAndSAPAddressLength: - dlsap = ntohs(*(uint16 *)(destAddrOrig + kEnetPhysicalAddressLength)); - break; - case kEnetPhysicalAddressLength + k8022DLSAPLength + k8022SNAPLength: // SNAP SAP - dlsap = ntohs(*(uint16 *)(destAddrOrig + kEnetPhysicalAddressLength)); - break; - default: - dlsap = the_stream->dlsap; - break; - } - - // Extract data size (excluding header info) and packet type - uint16 datasize = msgdsize(mp); - uint16 packetType = classify_packet_type(the_stream->dlsap, dlsap); - - // Calculate header size and protocol type/size field - uint16 hdrsize, proto; - switch (packetType) { - case kPktDIX: - hdrsize = kEnetPacketHeaderLength; - proto = dlsap; - break; - case kPkt8022SAP: - hdrsize = kEnetPacketHeaderLength + k8022BasicHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize + k8022BasicHeaderLength; - break; - case kPkt8022SNAP: - hdrsize = kEnetPacketHeaderLength + k8022SNAPHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize + k8022SNAPHeaderLength; - break; - case kPktIPX: - hdrsize = kEnetPacketHeaderLength; - if (fast_path) - proto = 0; - else - proto = datasize; - break; - default: - hdrsize = kEnetPacketHeaderLength; - proto = dlsap; - break; - } - - // We need to copy the dest address info in the message before we can reuse it - uint8 destAddrCopy[kMaxBoundAddrLength]; - memcpy(destAddrCopy, destAddrOrig, destAddrLen); - - // Resize header info in message block - if ((mp = reuse_message_block(mp, hdrsize)) == NULL) - return NULL; - struct T8022FullPacketHeader *packetHeader = (struct T8022FullPacketHeader *)(void *)mp->b_rptr; - - // Set protocol type/size field - packetHeader->fEnetPart.fProto = proto; - - // Set destination ethernet address - OTCopy48BitAddress(destAddrCopy, packetHeader->fEnetPart.fDestAddr); - - // Set other header fields - switch (packetType) { - case kPkt8022SAP: - packetHeader->f8022Part.fDSAP = (uint8)dlsap; - packetHeader->f8022Part.fSSAP = (uint8)the_stream->dlsap; - packetHeader->f8022Part.fCtrl = ctrl; - break; - case kPkt8022SNAP: { - uint8 *snapStart; - packetHeader->f8022Part.fDSAP = (uint8)dlsap; - packetHeader->f8022Part.fSSAP = (uint8)the_stream->dlsap; - packetHeader->f8022Part.fCtrl = ctrl; - if (destAddrLen >= kEnetAndSAPAddressLength + k8022SNAPLength) - snapStart = destAddrCopy + kEnetAndSAPAddressLength; - else - snapStart = the_stream->snap; - OTCopy8022SNAP(snapStart, packetHeader->f8022Part.fSNAP); - break; - } - } - - // Return updated message - return mp; -} - - -/* - * Transmit packet - */ - -static void transmit_packet(mblk_t *mp) -{ - EnetPacketHeader *enetHeader = (EnetPacketHeader *)(void *)mp->b_rptr; - - // Fill in length in 802.3 packets - if (enetHeader->fProto == 0) - enetHeader->fProto = msgdsize(mp) - sizeof(EnetPacketHeader); - - // Fill in ethernet source address - OTCopy48BitAddress(hardware_address, enetHeader->fSourceAddr); - - // Tell add-on to transmit packet - AO_transmit_packet(Host2MacAddr((uint8 *)mp)); - freemsg(mp); -} - - -/* - * Handle incoming packet (one stream), construct DL_UNITDATA_IND message - */ - -static void handle_received_packet(DLPIStream *the_stream, mblk_t *mp, uint16 packet_type, int32 dest_addr_type) -{ - // Find address and header length - uint32 addr_len; - uint32 header_len; - switch (packet_type) { - case kPkt8022SAP: - addr_len = kEnetAndSAPAddressLength; - header_len = kEnetPacketHeaderLength + k8022BasicHeaderLength; - break; - case kPkt8022SNAP: - addr_len = kEnetAndSAPAddressLength + k8022SNAPLength; - header_len = kEnetPacketHeaderLength + k8022SNAPHeaderLength; - break; - default: // DIX and IPX - addr_len = kEnetAndSAPAddressLength; - header_len = kEnetPacketHeaderLength; - break; - } - - // In Fast Path mode, don't send DL_UNITDATA_IND messages for unicast packets - if ((the_stream->flags & kFastPathMode) && dest_addr_type == keaStandardAddress) { - if (the_stream->raw_mode == false) - mp->b_rptr += header_len; - num_rx_fastpath++; - putq(the_stream->rdq, mp); - return; - } - - // Allocate the dl_unitdata_ind_t message - mblk_t *nmp; - if ((nmp = allocb(sizeof(dl_unitdata_ind_t) + 2*addr_len, BPRI_HI)) == NULL) { - freemsg(mp); - num_rx_no_unitdata_mem++; - return; - } - - // Set message type - nmp->b_datap->db_type = M_PROTO; - dl_unitdata_ind_t *ind = (dl_unitdata_ind_t*)(void *)nmp->b_rptr; - ind->dl_primitive = DL_UNITDATA_IND; - nmp->b_wptr += (sizeof(dl_unitdata_ind_t) + 2*addr_len); - - // Link M_DATA block - nmp->b_cont = mp; - - // Set address fields - ind->dl_dest_addr_length = addr_len; - ind->dl_dest_addr_offset = sizeof(dl_unitdata_ind_t); - ind->dl_src_addr_length = addr_len; - ind->dl_src_addr_offset = sizeof(dl_unitdata_ind_t) + addr_len; - - // Set address type - ind->dl_group_address = dest_addr_type; - - // Set address fields - T8022FullPacketHeader *packetHeader = (T8022FullPacketHeader *)(void *)mp->b_rptr; - T8022AddressStruct *destAddr = ((T8022AddressStruct*)(nmp->b_rptr + ind->dl_dest_addr_offset)); - T8022AddressStruct *srcAddr = ((T8022AddressStruct*)(nmp->b_rptr + ind->dl_src_addr_offset)); - - OTCopy48BitAddress(packetHeader->fEnetPart.fDestAddr, destAddr->fHWAddr); - OTCopy48BitAddress(packetHeader->fEnetPart.fSourceAddr, srcAddr->fHWAddr); - - destAddr->fSAP = packetHeader->f8022Part.fDSAP; - srcAddr->fSAP = packetHeader->f8022Part.fSSAP; - - if (packet_type == kPkt8022SNAP) { - OTCopy8022SNAP(packetHeader->f8022Part.fSNAP, destAddr->fSNAP); - OTCopy8022SNAP(packetHeader->f8022Part.fSNAP, srcAddr->fSNAP); - } - - // "Hide" the ethernet and protocol header(s) - if (the_stream->raw_mode == false) - mp->b_rptr += header_len; - - // Pass message up the stream - num_unitdata_ind++; - putq(the_stream->rdq, nmp); - return; -} - - -/* - * Packet received, distribute it to the streams that want it - */ - -void ether_packet_received(mblk_t *mp) -{ - // Extract address and types - EnetPacketHeader *pkt = (EnetPacketHeader *)(void *)mp->b_rptr; - T8022FullPacketHeader *fullpkt = (T8022FullPacketHeader *)pkt; - uint16 sourceSAP, destSAP; - destSAP = fullpkt->fEnetPart.fProto; - if (destSAP >= kMinDIXSAP) { - // Classic ethernet - sourceSAP = destSAP; - } else { - destSAP = fullpkt->f8022Part.fDSAP; - sourceSAP = fullpkt->f8022Part.fSSAP; - } - uint16 packetType = classify_packet_type(sourceSAP, destSAP); - int32 destAddressType = get_address_type(pkt->fDestAddr); - - // Look which streams want it - DLPIStream *the_stream, *found_stream = NULL; - uint16 found_packetType = 0; - int32 found_destAddressType = 0; - for (the_stream = dlpi_stream_list; the_stream != NULL; the_stream = mi_next_ptr(the_stream)) { - - // Don't send to unbound streams - if (the_stream->dlpi_state == DL_UNBOUND) - continue; - - // Does this stream want all 802.2 packets? - if ((the_stream->flags & kAcceptAll8022Packets) && (destSAP <= 0xff)) - goto type_found; - - // No, check SAP/SNAP - if (destSAP == the_stream->dlsap) { - if (the_stream->flags & kSnapStream) { - // Check SNAPs if necessary - uint8 sum = fullpkt->f8022Part.fSNAP[0] ^ the_stream->snap[0]; - sum |= fullpkt->f8022Part.fSNAP[1] ^ the_stream->snap[1]; - sum |= fullpkt->f8022Part.fSNAP[2] ^ the_stream->snap[2]; - sum |= fullpkt->f8022Part.fSNAP[3] ^ the_stream->snap[3]; - sum |= fullpkt->f8022Part.fSNAP[4] ^ the_stream->snap[4]; - if (sum == 0) - goto type_found; - } else { - // No SNAP, found a match since saps match - goto type_found; - } - } else { - // Check for an 802.3 Group/Global (odd) - if (((packetType == kPkt8022SAP) || (packetType == kPkt8022SNAP)) && (destSAP & 1) && the_stream->TestGroupSAP(destSAP)) - goto type_found; - } - - // No stream for this SAP/SNAP found - continue; - -type_found: - // If it's a multicast packet, it must be in the stream's multicast list - if ((destAddressType == keaMulticast) && (the_stream->flags & kAcceptMulticasts) && (!the_stream->IsMulticastRegistered(pkt->fDestAddr))) - continue; - - // Send packet to stream - // found_stream keeps a pointer to the previously found stream, so that only the last - // stream gets the original message, the other ones get duplicates - if (found_stream) - handle_received_packet(found_stream, dupmsg(mp), found_packetType, found_destAddressType); - found_stream = the_stream; - found_packetType = packetType; - found_destAddressType = destAddressType; - } - - // Send original message to last found stream - if (found_stream) - handle_received_packet(found_stream, mp, found_packetType, found_destAddressType); - else { - freemsg(mp); // Nobody wants it *snief* - num_rx_dropped++; - } -} - -void ether_dispatch_packet(uint32 p, uint32 size) -{ -#ifdef USE_ETHER_FULL_DRIVER - // Call handler from the Ethernet driver - D(bug("ether_dispatch_packet\n")); - D(bug(" packet data at %p, %d bytes\n", p, size)); - CallMacOS2(ether_dispatch_packet_ptr, ether_dispatch_packet_tvect, p, size); -#else - // Wrap packet in message block - num_rx_packets++; - mblk_t *mp; - if ((mp = allocb(size, 0)) != NULL) { - D(bug(" packet data at %p\n", (void *)mp->b_rptr)); - Mac2Host_memcpy(mp->b_rptr, p, size); - mp->b_wptr += size; - ether_packet_received(mp); - } else { - D(bug("WARNING: Cannot allocate mblk for received packet\n")); - num_rx_no_mem++; - } -#endif -} - - -/* - * Build and send an error acknowledge - */ - -static void DLPI_error_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim, uint32 err, uint32 uerr) -{ - D(bug(" DLPI_error_ack(%p,%p) prim %d, err %d, uerr %d\n", the_stream, ack_mp, prim, err, uerr)); - num_error_acks++; - - if (ack_mp != NULL) - freemsg(ack_mp); - if ((ack_mp = allocb(sizeof(dl_error_ack_t), BPRI_HI)) == NULL) - return; - - ack_mp->b_datap->db_type = M_PCPROTO; - dl_error_ack_t *errp = (dl_error_ack_t *)(void *)ack_mp->b_wptr; - errp->dl_primitive = DL_ERROR_ACK; - errp->dl_error_primitive = prim; - errp->dl_errno = err; - errp->dl_unix_errno = uerr; - ack_mp->b_wptr += sizeof(dl_error_ack_t); - qreply(q, ack_mp); -} - - -/* - * Build and send an OK acknowledge - */ - -static void DLPI_ok_ack(DLPIStream *the_stream, queue_t *q, mblk_t *ack_mp, uint32 prim) -{ - if (ack_mp->b_datap->db_ref != 1) { - // Message already in use, create a new one - freemsg(ack_mp); - if ((ack_mp = allocb(sizeof(dl_error_ack_t), BPRI_HI)) == NULL) - return; - } else { - // Message free - if (ack_mp->b_cont != NULL) { - freemsg(ack_mp->b_cont); - ack_mp->b_cont = NULL; - } - } - - ack_mp->b_datap->db_type = M_PCPROTO; - dl_ok_ack_t *ackp = (dl_ok_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_OK_ACK; - ackp->dl_correct_primitive = prim; - ack_mp->b_wptr = ack_mp->b_rptr + sizeof(dl_ok_ack_t); - qreply(q, ack_mp); -} - - -/* - * Handle DL_INFO_REQ (report general information) - */ - -static void DLPI_info(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_info(%p)\n", the_stream)); - uint32 saplen = 0; - uint32 addrlen = kEnetPhysicalAddressLength; - uint32 bcastlen = kEnetPhysicalAddressLength; - uint32 hdrlen = kEnetPacketHeaderLength; - - // Calculate header length - if (the_stream->dlpi_state != DL_UNBOUND) { - saplen = (the_stream->flags & kSnapStream) ? k8022DLSAPLength+k8022SNAPLength : k8022DLSAPLength; - if (the_stream->dlsap == kSNAPSAP) - hdrlen = kEnetPacketHeaderLength + k8022SNAPHeaderLength; // SNAP address - else if ((the_stream->dlsap <= kMax8022SAP) || (the_stream->dlsap == kIPXSAP)) - hdrlen = kEnetPacketHeaderLength + k8022BasicHeaderLength; // SAP or IPX - else - hdrlen = kEnetPacketHeaderLength; // Basic Ethernet - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_info_ack_t) + addrlen + saplen + bcastlen, BPRI_LO)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_INFO_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_info_ack_t *ackp = (dl_info_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_INFO_ACK; - - // Info/version fields - ackp->dl_service_mode = DL_CLDLS; - ackp->dl_provider_style = DL_STYLE1; - ackp->dl_version = DL_VERSION_2; - ackp->dl_current_state = the_stream->dlpi_state; - ackp->dl_mac_type = the_stream->framing_8022 ? DL_CSMACD : DL_ETHER; - ackp->dl_reserved = 0; - ackp->dl_qos_length = 0; - ackp->dl_qos_offset = (uint32)DL_UNKNOWN; - ackp->dl_qos_range_length = 0; - ackp->dl_qos_range_offset = (uint32)DL_UNKNOWN; - ackp->dl_growth = 0; - ackp->dl_min_sdu = 1; - ackp->dl_max_sdu = kEnetTSDU - hdrlen; - - // Address fields - ackp->dl_sap_length = -saplen; // Negative to indicate sap follows physical address - ackp->dl_addr_length = addrlen + saplen; - ackp->dl_addr_offset = sizeof(dl_info_ack_t); - T8022AddressStruct *boundAddr = ((T8022AddressStruct *)(ack_mp->b_rptr + ackp->dl_addr_offset)); - OTCopy48BitAddress(hardware_address, boundAddr->fHWAddr); - if (saplen) { - boundAddr->fSAP = the_stream->dlsap; - if (the_stream->flags & kSnapStream) - OTCopy8022SNAP(the_stream->snap, boundAddr->fSNAP); - } - ackp->dl_brdcst_addr_length = bcastlen; - ackp->dl_brdcst_addr_offset = sizeof(dl_info_ack_t) + addrlen + saplen; - OTSet48BitBroadcastAddress(ack_mp->b_rptr + ackp->dl_brdcst_addr_offset); - - // Advance write pointer - ack_mp->b_wptr += sizeof(dl_info_ack_t) + addrlen + saplen + bcastlen; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_PHYS_ADDR_REQ (report physical address) - */ - -static void DLPI_phys_addr(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_phys_addr(%p,%p)\n", the_stream, mp)); - dl_phys_addr_req_t *req = (dl_phys_addr_req_t *)(void *)mp->b_rptr; - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_phys_addr_ack_t) + kEnetPhysicalAddressLength, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_PHYS_ADDR_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_phys_addr_ack_t *ackp = (dl_phys_addr_ack_t *)(void *)ack_mp->b_wptr; - ackp->dl_primitive = DL_PHYS_ADDR_ACK; - - // Fill in address - ackp->dl_addr_length = kEnetPhysicalAddressLength; - ackp->dl_addr_offset = sizeof(dl_phys_addr_ack_t); - ack_mp->b_wptr += sizeof(dl_phys_addr_ack_t) + kEnetPhysicalAddressLength; - if (req->dl_addr_type == DL_CURR_PHYS_ADDR || req->dl_addr_type == DL_FACT_PHYS_ADDR) - OTCopy48BitAddress(hardware_address, ack_mp->b_rptr + ackp->dl_addr_offset); - else { - DLPI_error_ack(the_stream, q, mp, DL_PHYS_ADDR_REQ, DL_BADPRIM, 0); - return; - } - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_BIND_REQ (bind a stream) - */ - -static void DLPI_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_bind_req_t *req = (dl_bind_req_t *)(void *)mp->b_rptr; - uint32 sap = req->dl_sap; - D(bug(" DLPI_bind(%p,%p) SAP %04x\n", the_stream, mp, sap)); - - // Stream must be unbound - if (the_stream->dlpi_state != DL_UNBOUND) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_OUTSTATE, 0); - return; - } - - // We only support connectionless data link services - if (req->dl_service_mode != DL_CLDLS || req->dl_max_conind != 0) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_UNSUPPORTED, 0); - return; - } - - // Don't bind to 802.2 group saps, can't check 802.2 global sap (0xFF) - // because it looks like IPX - if ((sap <= kMax8022SAP) && (sap & 1)) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_BADADDR, 0); - return; - } - - if (classify_packet_type(sap, sap) == kPktUnknown) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_BADADDR, 0); - return; - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_bind_ack_t) + kEnetAndSAPAddressLength, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_BIND_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_bind_ack_t *ackp = (dl_bind_ack_t *)(void *)ack_mp->b_rptr; - ackp->dl_primitive = DL_BIND_ACK; - - // Fill in other fields - ackp->dl_sap = sap; - ackp->dl_addr_length = kEnetAndSAPAddressLength; - ackp->dl_addr_offset = sizeof(dl_bind_ack_t); - ackp->dl_max_conind = 0; - ackp->dl_xidtest_flg = 0; - - T8022AddressStruct *addrInfo = (T8022AddressStruct *)(ack_mp->b_rptr + sizeof(dl_bind_ack_t)); - OTCopy48BitAddress(hardware_address, addrInfo->fHWAddr); - addrInfo->fSAP = sap; - - // Must move b_wptr past the address info data - ack_mp->b_wptr = ack_mp->b_rptr + sizeof(dl_bind_ack_t) + kEnetAndSAPAddressLength; - - // Set group SAP if necessary - the_stream->ClearAllGroupSAPs(); - if (sap <= kMax8022SAP) - the_stream->SetGroupSAP(k8022GlobalSAP); - - // The stream is now bound and idle - the_stream->dlpi_state = DL_IDLE; - the_stream->dlsap = sap; - the_stream->flags &= ~kSnapStream; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_UNBIND_REQ (unbind a stream) - */ - -static void DLPI_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_unbind(%p,%p)\n", the_stream, mp)); - - // Stream must be bound and idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_UNBIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Stream is now unbound - the_stream->dlpi_state = DL_UNBOUND; - the_stream->dlsap = 0; - - // Flush all pending outbound messages - flushq(q, FLUSHDATA); - - // Flush all inbound messages pending on the stream - flushq(RD(q), FLUSHDATA); - putnextctl1(RD(q), M_FLUSH, FLUSHRW); - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_UNBIND_REQ); - return; -} - - -/* - * Handle DL_SUBS_BIND_REQ (register 802.2 SAP group addresses and SNAPs) - */ - -static void DLPI_subs_bind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_subs_bind_req_t *req = (dl_subs_bind_req_t *)(void *)mp->b_rptr; - uint8 *sap = ((uint8 *)req) + req->dl_subs_sap_offset; - int32 length = req->dl_subs_sap_length; - uint16 theSap = ntohs(*((uint16 *)sap)); - int32 error = 0; - D(bug(" DLPI_subs_bind(%p,%p) SAP %02x%02x%02x%02x%02x\n", the_stream, mp, sap[0], sap[1], sap[2], sap[3], sap[4])); - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Check if address is valid - switch (req->dl_subs_bind_class) { - case DL_PEER_BIND: // Bind a group address - if (the_stream->dlsap <= kMax8022SAP) { - if ((theSap & 1) && (length == sizeof(theSap))) - the_stream->SetGroupSAP(theSap); - else - if (theSap == 0x0000) // special case to receive all 802.2 packets - the_stream->flags |= kAcceptAll8022Packets; - else - error = DL_BADADDR; - } else - error = DL_UNSUPPORTED; - break; - - case DL_HIERARCHICAL_BIND: // Bind an additional SNAP - if (the_stream->dlsap == kSNAPSAP) { - if (the_stream->flags & kSnapStream) - error = DL_TOOMANY; // only one SNAP binding allowed - else { - OTCopy8022SNAP(sap, the_stream->snap); - the_stream->flags |= kSnapStream; - } - } else - error = DL_BADADDR; - break; - - default: - error = DL_UNSUPPORTED; - break; - } - if (error) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, error, 0); - return; - } - - // Allocate message block for reply - mblk_t *ack_mp; - if ((ack_mp = allocb(sizeof(dl_subs_bind_ack_t) + length, BPRI_HI)) == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_BIND_REQ, DL_SYSERR, MAC_ENOMEM); - return; - } - - // Set up message type - ack_mp->b_datap->db_type = M_PCPROTO; - dl_subs_bind_ack_t *ackp = (dl_subs_bind_ack_t *)(void *)ack_mp->b_wptr; - memset(ackp, 0, sizeof(dl_subs_bind_ack_t) + length); - ackp->dl_primitive = DL_SUBS_BIND_ACK; - - // Fill in other fields - ackp->dl_subs_sap_length = length; - ackp->dl_subs_sap_offset = length ? sizeof(dl_subs_bind_ack_t) : 0; - ack_mp->b_wptr += sizeof(dl_subs_bind_ack_t); - if (length) - memcpy(ack_mp->b_wptr, sap, length); - ack_mp->b_wptr += length; - - // Free request - freemsg(mp); - - // Send reply - qreply(q, ack_mp); - return; -} - - -/* - * Handle DL_SUBS_UNBIND_REQ (unregister 802.2 SAP group addresses and snaps) - */ - -static void DLPI_subs_unbind(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_subs_unbind_req_t *req = (dl_subs_unbind_req_t *)(void *)mp->b_rptr; - uint8 *sap = ((uint8 *)req) + req->dl_subs_sap_offset; - int32 length = req->dl_subs_sap_length; - int32 error = 0; - D(bug(" DLPI_subs_unbind(%p,%p) SAP %02x%02x%02x%02x%02x\n", the_stream, mp, sap[0], sap[1], sap[2], sap[3], sap[4])); - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ, DL_OUTSTATE, 0); - return; - } - - // Check if we are unbinding from an address we are bound to - if (length == k8022SAPLength) { - if ((*sap & 1) && (*sap != kIPXSAP)) { - if (the_stream->dlsap <= kMax8022SAP) - the_stream->ClearGroupSAP(*sap); - else - error = DL_UNSUPPORTED; - } else - error = DL_BADADDR; - } else if (length == k8022SNAPLength) { - if (the_stream->dlsap == kSNAPSAP) { - if (the_stream->flags & kSnapStream) { - if (memcmp(the_stream->snap, sap, length) != 0) - error = DL_BADADDR; - } else - error = DL_BADADDR; - } else - error = DL_UNSUPPORTED; - } - if (error) { - DLPI_error_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ, error, 0); - return; - } - - // Stream is no longer bound to SNAP - the_stream->flags &= ~kSnapStream; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_SUBS_UNBIND_REQ); - return; -} - - -/* - * Handles DL_ENABMULTI_REQ (enable multicast address) - */ - -static void DLPI_enable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_enabmulti_req_t* req = (dl_enabmulti_req_t*)(void *)mp->b_rptr; - uint8 *reqaddr = (uint8 *)(mp->b_rptr + req->dl_addr_offset); - D(bug(" DLPI_enable_multi(%p,%p) addr %02x%02x%02x%02x%02x%02x\n", the_stream, mp, reqaddr[0], reqaddr[1], reqaddr[2], reqaddr[3], reqaddr[4], reqaddr[5])); - - // Address must be a multicast address - if (get_address_type(reqaddr) != keaMulticast) { - DLPI_error_ack(the_stream, q, mp, DL_ENABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Address already in multicast list? - if (the_stream->IsMulticastRegistered(reqaddr)) { - DLPI_error_ack(the_stream, q, mp, DL_ENABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Tell add-on to enable multicast address - AO_enable_multicast(Host2MacAddr((uint8 *)reqaddr)); - - // Add new address to multicast list - uint8 *addr = Mac2HostAddr(Mac_sysalloc(kEnetPhysicalAddressLength)); - OTCopy48BitAddress(reqaddr, addr); - the_stream->AddMulticast(addr); - - // On receive now check multicast packets - the_stream->flags |= kAcceptMulticasts; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_ENABMULTI_REQ); - return; -} - - -/* - * Handles DL_DISABMULTI_REQ (disable multicast address) - */ - -static void DLPI_disable_multi(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - dl_disabmulti_req_t *req = (dl_disabmulti_req_t*)(void *)mp->b_rptr; - uint8 *reqaddr = (uint8 *)(mp->b_rptr + req->dl_addr_offset); - D(bug(" DLPI_disable_multi(%p,%p) addr %02x%02x%02x%02x%02x%02x\n", the_stream, mp, reqaddr[0], reqaddr[1], reqaddr[2], reqaddr[3], reqaddr[4], reqaddr[5])); - - // Address must be a multicast address - if (get_address_type(reqaddr) != keaMulticast) { - DLPI_error_ack(the_stream, q, mp, DL_DISABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Find address in multicast list - uint8 *addr = the_stream->IsMulticastRegistered(reqaddr); - if (addr == NULL) { - DLPI_error_ack(the_stream, q, mp, DL_DISABMULTI_REQ, DL_BADADDR, 0); - return; - } - - // Found, then remove - the_stream->RemoveMulticast(addr); - Mac_sysfree(Host2MacAddr(addr)); - - // Tell add-on to disable multicast address - AO_disable_multicast(Host2MacAddr((uint8 *)reqaddr)); - - // No longer check multicast packets if no multicast addresses are registered - if (the_stream->multicast_list == NULL) - the_stream->flags &= ~kAcceptMulticasts; - - // Send reply - DLPI_ok_ack(the_stream, q, mp, DL_DISABMULTI_REQ); - return; -} - - -/* - * Handle DL_UNITDATA_REQ (transmit packet) - */ - -static void DLPI_unit_data(DLPIStream *the_stream, queue_t *q, mblk_t *mp) -{ - D(bug(" DLPI_unit_data(%p,%p)\n", the_stream, mp)); - dl_unitdata_req_t *req = (dl_unitdata_req_t *)(void *)mp->b_rptr; - - // Stream must be idle - if (the_stream->dlpi_state != DL_IDLE) { - - // Not idle, send error response - dl_uderror_ind_t *errp; - mblk_t *bp; - - int i = sizeof(dl_uderror_ind_t) + req->dl_dest_addr_length; - if ((bp = allocb(i, BPRI_HI)) == NULL) { - freemsg(mp); - return; - } - bp->b_datap->db_type = M_PROTO; - errp = (dl_uderror_ind_t *)(void *)bp->b_wptr; - errp->dl_primitive = DL_UDERROR_IND; - errp->dl_errno = DL_OUTSTATE; - errp->dl_unix_errno = 0; - errp->dl_dest_addr_length = req->dl_dest_addr_length; - errp->dl_dest_addr_offset = sizeof(dl_uderror_ind_t); - bp->b_wptr += sizeof(dl_uderror_ind_t); - memcpy((uint8 *)bp->b_wptr, ((uint8 *)req) + req->dl_dest_addr_offset, req->dl_dest_addr_length); - bp->b_wptr += req->dl_dest_addr_length; - qreply(q, bp); - - freemsg(mp); - return; - } - - // Build packet header and transmit packet - if ((mp = build_tx_packet_header(the_stream, mp, false)) != NULL) - transmit_packet(mp); -} - - -/* - * Ethernet packet allocator - */ - -#if SIZEOF_VOID_P != 4 || REAL_ADDRESSING == 0 -static uint32 ether_packet = 0; // Ethernet packet (cached allocation) -static uint32 n_ether_packets = 0; // Number of ethernet packets allocated so far (should be at most 1) - -EthernetPacket::EthernetPacket() -{ - ++n_ether_packets; - if (ether_packet && n_ether_packets == 1) - packet = ether_packet; - else { - packet = Mac_sysalloc(1516); - assert(packet != 0); - Mac_memset(packet, 0, 1516); - if (ether_packet == 0) - ether_packet = packet; - } -} - -EthernetPacket::~EthernetPacket() -{ - --n_ether_packets; - if (packet != ether_packet) - Mac_sysfree(packet); - if (n_ether_packets > 0) { - bug("WARNING: Nested allocation of ethernet packets!\n"); - } -} -#endif diff --git a/SheepShaver/src/extfs.cpp b/SheepShaver/src/extfs.cpp deleted file mode 120000 index 623147243..000000000 --- a/SheepShaver/src/extfs.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/extfs.cpp \ No newline at end of file diff --git a/SheepShaver/src/gfxaccel.cpp b/SheepShaver/src/gfxaccel.cpp deleted file mode 100644 index ed65e5d83..000000000 --- a/SheepShaver/src/gfxaccel.cpp +++ /dev/null @@ -1,461 +0,0 @@ -/* - * gfxaccel.cpp - Generic Native QuickDraw acceleration - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" - -#include "prefs.h" -#include "video.h" -#include "video_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -/* - * Utility functions - */ - -// Return bytes per pixel for requested depth -static inline int bytes_per_pixel(int depth) -{ - int bpp; - switch (depth) { - case 8: - bpp = 1; - break; - case 15: case 16: - bpp = 2; - break; - case 24: case 32: - bpp = 4; - break; - default: - abort(); - } - return bpp; -} - -// Pass-through dirty areas to redraw functions -static inline void NQD_set_dirty_area(uint32 p) -{ - if (ReadMacInt32(p + acclDestBaseAddr) == screen_base) { - int16 x = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2); - int16 y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0); - int16 w = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2); - int16 h = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0); - video_set_dirty_area(x, y, w, h); - } -} - - -/* - * Rectangle inversion - */ - -template< int bpp > -static inline void do_invrect(uint8 *dest, uint32 length) -{ -#define INVERT_1(PTR, OFS) ((uint8 *)(PTR))[OFS] = ~((uint8 *)(PTR))[OFS] -#define INVERT_2(PTR, OFS) ((uint16 *)(PTR))[OFS] = ~((uint16 *)(PTR))[OFS] -#define INVERT_4(PTR, OFS) ((uint32 *)(PTR))[OFS] = ~((uint32 *)(PTR))[OFS] -#define INVERT_8(PTR, OFS) ((uint64 *)(PTR))[OFS] = ~((uint64 *)(PTR))[OFS] - -#ifndef UNALIGNED_PROFITABLE - // Align on 16-bit boundaries - if (bpp < 16 && (((uintptr)dest) & 1)) { - INVERT_1(dest, 0); - dest += 1; length -= 1; - } - - // Align on 32-bit boundaries - if (bpp < 32 && (((uintptr)dest) & 2)) { - INVERT_2(dest, 0); - dest += 2; length -= 2; - } -#endif - - // Invert 8-byte words - if (length >= 8) { - const int r = (length / 8) % 8; - dest += r * 8; - - int n = ((length / 8) + 7) / 8; - switch (r) { - case 0: do { - dest += 64; - INVERT_8(dest, -8); - case 7: INVERT_8(dest, -7); - case 6: INVERT_8(dest, -6); - case 5: INVERT_8(dest, -5); - case 4: INVERT_8(dest, -4); - case 3: INVERT_8(dest, -3); - case 2: INVERT_8(dest, -2); - case 1: INVERT_8(dest, -1); - } while (--n > 0); - } - } - - // 32-bit cell to invert? - if (length & 4) { - INVERT_4(dest, 0); - if (bpp <= 16) - dest += 4; - } - - // 16-bit cell to invert? - if (bpp <= 16 && (length & 2)) { - INVERT_2(dest, 0); - if (bpp <= 8) - dest += 2; - } - - // 8-bit cell to invert? - if (bpp <= 8 && (length & 1)) - INVERT_1(dest, 0); - -#undef INVERT_1 -#undef INVERT_2 -#undef INVERT_4 -#undef INVERT_8 -} - -void NQD_invrect(uint32 p) -{ - D(bug("accl_invrect %08x\n", p)); - - // Get inversion parameters - int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2); - int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0); - int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2); - int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0); - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" width %d, height %d, bytes_per_row %d\n", width, height, (int32)ReadMacInt32(p + acclDestRowBytes))); - - //!!?? pen_mode == 14 - - // And perform the inversion - const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize)); - const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes); - uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp)); - width *= bpp; - switch (bpp) { - case 1: - for (int i = 0; i < height; i++) { - do_invrect<8>(dest, width); - dest += dest_row_bytes; - } - break; - case 2: - for (int i = 0; i < height; i++) { - do_invrect<16>(dest, width); - dest += dest_row_bytes; - } - break; - case 4: - for (int i = 0; i < height; i++) { - do_invrect<32>(dest, width); - dest += dest_row_bytes; - } - break; - } -} - - -/* - * Rectangle filling - */ - -template< int bpp > -static inline void do_fillrect(uint8 *dest, uint32 color, uint32 length) -{ -#define FILL_1(PTR, OFS, VAL) ((uint8 *)(PTR))[OFS] = (VAL) -#define FILL_2(PTR, OFS, VAL) ((uint16 *)(PTR))[OFS] = (VAL) -#define FILL_4(PTR, OFS, VAL) ((uint32 *)(PTR))[OFS] = (VAL) -#define FILL_8(PTR, OFS, VAL) ((uint64 *)(PTR))[OFS] = (VAL) - -#ifndef UNALIGNED_PROFITABLE - // Align on 16-bit boundaries - if (bpp < 16 && (((uintptr)dest) & 1)) { - FILL_1(dest, 0, color); - dest += 1; length -= 1; - } - - // Align on 32-bit boundaries - if (bpp < 32 && (((uintptr)dest) & 2)) { - FILL_2(dest, 0, color); - dest += 2; length -= 2; - } -#endif - - // Fill 8-byte words - if (length >= 8) { - const uint64 c = (((uint64)color) << 32) | color; - const int r = (length / 8) % 8; - dest += r * 8; - - int n = ((length / 8) + 7) / 8; - switch (r) { - case 0: do { - dest += 64; - FILL_8(dest, -8, c); - case 7: FILL_8(dest, -7, c); - case 6: FILL_8(dest, -6, c); - case 5: FILL_8(dest, -5, c); - case 4: FILL_8(dest, -4, c); - case 3: FILL_8(dest, -3, c); - case 2: FILL_8(dest, -2, c); - case 1: FILL_8(dest, -1, c); - } while (--n > 0); - } - } - - // 32-bit cell to fill? - if (length & 4) { - FILL_4(dest, 0, color); - if (bpp <= 16) - dest += 4; - } - - // 16-bit cell to fill? - if (bpp <= 16 && (length & 2)) { - FILL_2(dest, 0, color); - if (bpp <= 8) - dest += 2; - } - - // 8-bit cell to fill? - if (bpp <= 8 && (length & 1)) - FILL_1(dest, 0, color); - -#undef FILL_1 -#undef FILL_2 -#undef FILL_4 -#undef FILL_8 -} - -void NQD_fillrect(uint32 p) -{ - D(bug("accl_fillrect %08x\n", p)); - - // Get filling parameters - int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2); - int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0); - int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2); - int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0); - uint32 color = htonl(ReadMacInt32(p + acclPenMode) == 8 ? ReadMacInt32(p + acclForePen) : ReadMacInt32(p + acclBackPen)); - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" width %d, height %d\n", width, height)); - D(bug(" bytes_per_row %d color %08x\n", (int32)ReadMacInt32(p + acclDestRowBytes), color)); - - // And perform the fill - const int bpp = bytes_per_pixel(ReadMacInt32(p + acclDestPixelSize)); - const int dest_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes); - uint8 *dest = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dest_row_bytes) + (dest_X * bpp)); - width *= bpp; - switch (bpp) { - case 1: - for (int i = 0; i < height; i++) { - memset(dest, color, width); - dest += dest_row_bytes; - } - break; - case 2: - for (int i = 0; i < height; i++) { - do_fillrect<16>(dest, color, width); - dest += dest_row_bytes; - } - break; - case 4: - for (int i = 0; i < height; i++) { - do_fillrect<32>(dest, color, width); - dest += dest_row_bytes; - } - break; - } -} - -bool NQD_fillrect_hook(uint32 p) -{ - D(bug("accl_fillrect_hook %08x\n", p)); - NQD_set_dirty_area(p); - - // Check if we can accelerate this fillrect - if (ReadMacInt32(p + 0x284) != 0 && ReadMacInt32(p + acclDestPixelSize) >= 8) { - const int transfer_mode = ReadMacInt32(p + acclTransferMode); - if (transfer_mode == 8) { - // Fill - WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_FILLRECT)); - return true; - } - else if (transfer_mode == 10) { - // Invert - WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_INVRECT)); - return true; - } - } - return false; -} - - -/* - * Isomorphic rectangle blitting - */ - -void NQD_bitblt(uint32 p) -{ - D(bug("accl_bitblt %08x\n", p)); - - // Get blitting parameters - int16 src_X = (int16)ReadMacInt16(p + acclSrcRect + 2) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 2); - int16 src_Y = (int16)ReadMacInt16(p + acclSrcRect + 0) - (int16)ReadMacInt16(p + acclSrcBoundsRect + 0); - int16 dest_X = (int16)ReadMacInt16(p + acclDestRect + 2) - (int16)ReadMacInt16(p + acclDestBoundsRect + 2); - int16 dest_Y = (int16)ReadMacInt16(p + acclDestRect + 0) - (int16)ReadMacInt16(p + acclDestBoundsRect + 0); - int16 width = (int16)ReadMacInt16(p + acclDestRect + 6) - (int16)ReadMacInt16(p + acclDestRect + 2); - int16 height = (int16)ReadMacInt16(p + acclDestRect + 4) - (int16)ReadMacInt16(p + acclDestRect + 0); - D(bug(" src addr %08x, dest addr %08x\n", ReadMacInt32(p + acclSrcBaseAddr), ReadMacInt32(p + acclDestBaseAddr))); - D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y)); - D(bug(" width %d, height %d\n", width, height)); - - // And perform the blit - const int bpp = bytes_per_pixel(ReadMacInt32(p + acclSrcPixelSize)); - width *= bpp; - if ((int32)ReadMacInt32(p + acclSrcRowBytes) > 0) { - const int src_row_bytes = (int32)ReadMacInt32(p + acclSrcRowBytes); - const int dst_row_bytes = (int32)ReadMacInt32(p + acclDestRowBytes); - uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + (src_Y * src_row_bytes) + (src_X * bpp)); - uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + (dest_Y * dst_row_bytes) + (dest_X * bpp)); - for (int i = 0; i < height; i++) { - memmove(dst, src, width); - src += src_row_bytes; - dst += dst_row_bytes; - } - } - else { - const int src_row_bytes = -(int32)ReadMacInt32(p + acclSrcRowBytes); - const int dst_row_bytes = -(int32)ReadMacInt32(p + acclDestRowBytes); - uint8 *src = Mac2HostAddr(ReadMacInt32(p + acclSrcBaseAddr) + ((src_Y + height - 1) * src_row_bytes) + (src_X * bpp)); - uint8 *dst = Mac2HostAddr(ReadMacInt32(p + acclDestBaseAddr) + ((dest_Y + height - 1) * dst_row_bytes) + (dest_X * bpp)); - for (int i = height - 1; i >= 0; i--) { - memmove(dst, src, width); - src -= src_row_bytes; - dst -= dst_row_bytes; - } - } -} - -/* - BitBlt transfer modes: - 0 : srcCopy - 1 : srcOr - 2 : srcXor - 3 : srcBic - 4 : notSrcCopy - 5 : notSrcOr - 6 : notSrcXor - 7 : notSrcBic - 32 : blend - 33 : addPin - 34 : addOver - 35 : subPin - 36 : transparent - 37 : adMax - 38 : subOver - 39 : adMin - 50 : hilite -*/ - -bool NQD_bitblt_hook(uint32 p) -{ - D(bug("accl_draw_hook %08x\n", p)); - NQD_set_dirty_area(p); - - // Check if we can accelerate this bitblt - if (ReadMacInt32(p + 0x018) + ReadMacInt32(p + 0x128) == 0 && - ReadMacInt32(p + 0x130) == 0 && - ReadMacInt32(p + acclSrcPixelSize) >= 8 && - ReadMacInt32(p + acclSrcPixelSize) == ReadMacInt32(p + acclDestPixelSize) && - (int32)(ReadMacInt32(p + acclSrcRowBytes) ^ ReadMacInt32(p + acclDestRowBytes)) >= 0 && // same sign? - ReadMacInt32(p + acclTransferMode) == 0 && // srcCopy? - (int32)ReadMacInt32(p + 0x15c) > 0) { - - // Yes, set function pointer - WriteMacInt32(p + acclDrawProc, NativeTVECT(NATIVE_NQD_BITBLT)); - return true; - } - return false; -} - -// Unknown hook -bool NQD_unknown_hook(uint32 arg) -{ - D(bug("accl_unknown_hook %08x\n", arg)); - NQD_set_dirty_area(arg); - - return false; -} - -// Wait for graphics operation to finish -bool NQD_sync_hook(uint32 arg) -{ - D(bug("accl_sync_hook %08x\n", arg)); - return true; -} - - -/* - * Install Native QuickDraw acceleration hooks - */ - -void VideoInstallAccel(void) -{ - // Install acceleration hooks - if (PrefsFindBool("gfxaccel")) { - D(bug("Video: Installing acceleration hooks\n")); - uint32 base; - - SheepVar bitblt_hook_info(sizeof(accl_hook_info)); - base = bitblt_hook_info.addr(); - WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_BITBLT_HOOK)); - WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK)); - WriteMacInt32(base + 8, ACCL_BITBLT); - NQDMisc(6, bitblt_hook_info.addr()); - - SheepVar fillrect_hook_info(sizeof(accl_hook_info)); - base = fillrect_hook_info.addr(); - WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_FILLRECT_HOOK)); - WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK)); - WriteMacInt32(base + 8, ACCL_FILLRECT); - NQDMisc(6, fillrect_hook_info.addr()); - - for (int op = 0; op < 8; op++) { - switch (op) { - case ACCL_BITBLT: - case ACCL_FILLRECT: - continue; - } - SheepVar unknown_hook_info(sizeof(accl_hook_info)); - base = unknown_hook_info.addr(); - WriteMacInt32(base + 0, NativeTVECT(NATIVE_NQD_UNKNOWN_HOOK)); - WriteMacInt32(base + 4, NativeTVECT(NATIVE_NQD_SYNC_HOOK)); - WriteMacInt32(base + 8, op); - NQDMisc(6, unknown_hook_info.addr()); - } - } -} diff --git a/SheepShaver/src/include/about_window.h b/SheepShaver/src/include/about_window.h deleted file mode 100644 index 6c2d8d82e..000000000 --- a/SheepShaver/src/include/about_window.h +++ /dev/null @@ -1,26 +0,0 @@ -/* - * about_window.h - "About" window - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 ABOUT_WINDOW_H -#define ABOUT_WINDOW_H - -extern void OpenAboutWindow(void); - -#endif diff --git a/SheepShaver/src/include/adb.h b/SheepShaver/src/include/adb.h deleted file mode 120000 index e65ef4a46..000000000 --- a/SheepShaver/src/include/adb.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/adb.h \ No newline at end of file diff --git a/SheepShaver/src/include/audio.h b/SheepShaver/src/include/audio.h deleted file mode 120000 index 73ebba7e2..000000000 --- a/SheepShaver/src/include/audio.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/audio.h \ No newline at end of file diff --git a/SheepShaver/src/include/audio_defs.h b/SheepShaver/src/include/audio_defs.h deleted file mode 120000 index 04523f257..000000000 --- a/SheepShaver/src/include/audio_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/audio_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/cdrom.h b/SheepShaver/src/include/cdrom.h deleted file mode 120000 index d7300f7af..000000000 --- a/SheepShaver/src/include/cdrom.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/cdrom.h \ No newline at end of file diff --git a/SheepShaver/src/include/clip.h b/SheepShaver/src/include/clip.h deleted file mode 120000 index 23f10c020..000000000 --- a/SheepShaver/src/include/clip.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/clip.h \ No newline at end of file diff --git a/SheepShaver/src/include/cpu_emulation.h b/SheepShaver/src/include/cpu_emulation.h deleted file mode 100644 index aa4b7a701..000000000 --- a/SheepShaver/src/include/cpu_emulation.h +++ /dev/null @@ -1,123 +0,0 @@ -/* - * cpu_emulation.h - Definitions for CPU emulation and Mac memory access - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 CPU_EMULATION_H -#define CPU_EMULATION_H - - -/* - * Memory system - */ - -// Constants -const uint32 ROM_SIZE = 0x400000; // Size of ROM file -const uint32 ROM_AREA_SIZE = 0x500000; // Size of ROM area -const uintptr DR_EMULATOR_BASE = 0x68070000; // Address of DR emulator code -const uint32 DR_EMULATOR_SIZE = 0x10000; // Size of DR emulator code -const uintptr DR_CACHE_BASE = 0x69000000; // Address of DR cache -const uint32 DR_CACHE_SIZE = 0x80000; // Size of DR Cache - -const uintptr KERNEL_DATA_BASE = 0x68ffe000; // Address of Kernel Data -const uintptr KERNEL_DATA2_BASE = 0x5fffe000; // Alternate address of Kernel Data -const uint32 KERNEL_AREA_SIZE = 0x2000; // Size of Kernel Data area - -// MacOS 68k Emulator Data -struct EmulatorData { - uint32 v[0x400]; -}; - -// MacOS Kernel Data -struct KernelData { - uint32 v[0x400]; - EmulatorData ed; -}; - -// RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBase; // Base address of Mac RAM -extern uint32 RAMSize; // Size address of Mac RAM -extern uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) - -extern uint32 ROMBase; // Base address of Mac ROM -extern uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) - -// Mac memory access functions -#if EMULATED_PPC -#include "cpu/vm.hpp" -static inline uint32 ReadMacInt8(uint32 addr) {return vm_read_memory_1(addr);} -static inline void WriteMacInt8(uint32 addr, uint32 v) {vm_write_memory_1(addr, v);} -static inline uint32 ReadMacInt16(uint32 addr) {return vm_read_memory_2(addr);} -static inline void WriteMacInt16(uint32 addr, uint32 v) {vm_write_memory_2(addr, v);} -static inline uint32 ReadMacInt32(uint32 addr) {return vm_read_memory_4(addr);} -static inline void WriteMacInt32(uint32 addr, uint32 v) {vm_write_memory_4(addr, v);} -static inline uint64 ReadMacInt64(uint32 addr) {return vm_read_memory_8(addr);} -static inline void WriteMacInt64(uint32 addr, uint64 v) {vm_write_memory_8(addr, v);} -static inline uint32 Host2MacAddr(uint8 *addr) {return vm_do_get_virtual_address(addr);} -static inline uint8 *Mac2HostAddr(uint32 addr) {return vm_do_get_real_address(addr);} -static inline void *Mac_memset(uint32 addr, int c, size_t n) {return vm_memset(addr, c, n);} -static inline void *Mac2Host_memcpy(void *dest, uint32 src, size_t n) {return vm_memcpy(dest, src, n);} -static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {return vm_memcpy(dest, src, n);} -static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return vm_memcpy(dest, src, n);} -#else -static inline uint32 ReadMacInt8(uint32 addr) {return *(uint8 *)addr;} -static inline void WriteMacInt8(uint32 addr, uint32 b) {*(uint8 *)addr = b;} -static inline uint32 ReadMacInt16(uint32 addr) {return *(uint16 *)addr;} -static inline uint32 ReadMacInt32(uint32 addr) {return *(uint32 *)addr;} -static inline uint64 ReadMacInt64(uint32 addr) {return *(uint64 *)addr;} -static inline void WriteMacInt16(uint32 addr, uint32 w) {*(uint16 *)addr = w;} -static inline void WriteMacInt32(uint32 addr, uint32 l) {*(uint32 *)addr = l;} -static inline void WriteMacInt64(uint32 addr, uint64 ll) {*(uint64 *)addr = ll;} -static inline uint32 Host2MacAddr(uint8 *addr) {return (uint32)addr;} -static inline uint8 *Mac2HostAddr(uint32 addr) {return (uint8 *)addr;} -static inline void *Mac_memset(uint32 addr, int c, size_t n) {return memset(Mac2HostAddr(addr), c, n);} -static inline void *Mac2Host_memcpy(void *dest, uint32 src, size_t n) {return memcpy(dest, Mac2HostAddr(src), n);} -static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {return memcpy(Mac2HostAddr(dest), src, n);} -static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return memcpy(Mac2HostAddr(dest), Mac2HostAddr(src), n);} -#endif - - -/* - * 680x0 and PPC emulation - */ - -// 68k procedure helper to write a big endian 16-bit word -#ifdef WORDS_BIGENDIAN -#define PW(W) W -#else -#define PW(X) ((((X) >> 8) & 0xff) | (((X) & 0xff) << 8)) -#endif - -// PowerPC procedure helper to write a big-endian 32-bit word -#ifdef WORDS_BIGENDIAN -#define PL(X) X -#else -#define PL(X) \ - ((((X) & 0xff000000) >> 24) | (((X) & 0x00ff0000) >> 8) | \ - (((X) & 0x0000ff00) << 8) | (((X) & 0x000000ff) << 24)) -#endif - -struct M68kRegisters; -extern void Execute68k(uint32, M68kRegisters *r); // Execute 68k subroutine from EMUL_OP routine, must be ended with RTS -extern void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute 68k A-Trap from EMUL_OP routine -#if EMULATED_PPC -extern void FlushCodeCache(uintptr start, uintptr end); // Invalidate emulator caches -#endif -extern void ExecuteNative(int selector); // Execute native code from EMUL_OP routine (real mode switch) - -#endif diff --git a/SheepShaver/src/include/debug.h b/SheepShaver/src/include/debug.h deleted file mode 120000 index 6a0dd40c7..000000000 --- a/SheepShaver/src/include/debug.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/debug.h \ No newline at end of file diff --git a/SheepShaver/src/include/disk.h b/SheepShaver/src/include/disk.h deleted file mode 120000 index d785c55dc..000000000 --- a/SheepShaver/src/include/disk.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/disk.h \ No newline at end of file diff --git a/SheepShaver/src/include/emul_op.h b/SheepShaver/src/include/emul_op.h deleted file mode 100644 index 9f9a323ed..000000000 --- a/SheepShaver/src/include/emul_op.h +++ /dev/null @@ -1,113 +0,0 @@ -/* - * emul_op.h - 68k opcodes for ROM patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 EMUL_OP_H -#define EMUL_OP_H - -// PowerPC opcodes -const uint32 POWERPC_NOP = 0x60000000; -const uint32 POWERPC_ILLEGAL = 0x00000000; -const uint32 POWERPC_BLR = 0x4e800020; -const uint32 POWERPC_BCTR = 0x4e800420; -const uint32 POWERPC_EMUL_OP = 0x18000000; // Base opcode for EMUL_OP opcodes (only used with PPC emulation) - -// 68k opcodes -const uint16 M68K_ILLEGAL = 0x4afc; -const uint16 M68K_NOP = 0x4e71; -const uint16 M68K_RTS = 0x4e75; -const uint16 M68K_RTD = 0x4e74; -const uint16 M68K_JMP = 0x4ef9; -const uint16 M68K_JMP_A0 = 0x4ed0; -const uint16 M68K_JSR = 0x4eb9; -const uint16 M68K_JSR_A0 = 0x4e90; -enum { // Selectors for EMUL_OP opcodes - OP_BREAK, OP_XPRAM1, OP_XPRAM2, OP_XPRAM3, OP_NVRAM1, OP_NVRAM2, OP_NVRAM3, - OP_FIX_MEMTOP, OP_FIX_MEMSIZE, OP_FIX_BOOTSTACK, - OP_SONY_OPEN, OP_SONY_PRIME, OP_SONY_CONTROL, OP_SONY_STATUS, - OP_DISK_OPEN, OP_DISK_PRIME, OP_DISK_CONTROL, OP_DISK_STATUS, - OP_CDROM_OPEN, OP_CDROM_PRIME, OP_CDROM_CONTROL, OP_CDROM_STATUS, - OP_AUDIO_DISPATCH, OP_SOUNDIN_OPEN, OP_SOUNDIN_PRIME, OP_SOUNDIN_CONTROL, OP_SOUNDIN_STATUS, OP_SOUNDIN_CLOSE, - OP_ADBOP, OP_INSTIME, OP_RMVTIME, OP_PRIMETIME, OP_MICROSECONDS, OP_ZERO_SCRAP, OP_PUT_SCRAP, OP_GET_SCRAP, - OP_DEBUG_STR, OP_INSTALL_DRIVERS, OP_NAME_REGISTRY, OP_RESET, OP_IRQ, - OP_SCSI_DISPATCH, OP_SCSI_ATOMIC, - OP_CHECK_SYSV, OP_NTRB_17_PATCH, OP_NTRB_17_PATCH2, OP_NTRB_17_PATCH3, OP_NTRB_17_PATCH4, OP_CHECKLOAD, - OP_EXTFS_COMM, OP_EXTFS_HFS, OP_IDLE_TIME, OP_IDLE_TIME_2, - OP_MAX -}; -const uint16 M68K_EMUL_RETURN = 0xfe40; // Extended opcodes -const uint16 M68K_EXEC_RETURN = 0xfe41; -const uint16 M68K_EXEC_NATIVE = 0xfe42; -const uint16 M68K_EMUL_BREAK = 0xfe43; -const uint16 M68K_EMUL_OP_XPRAM1 = M68K_EMUL_BREAK + OP_XPRAM1; -const uint16 M68K_EMUL_OP_XPRAM2 = M68K_EMUL_BREAK + OP_XPRAM2; -const uint16 M68K_EMUL_OP_XPRAM3 = M68K_EMUL_BREAK + OP_XPRAM3; -const uint16 M68K_EMUL_OP_NVRAM1 = M68K_EMUL_BREAK + OP_NVRAM1; -const uint16 M68K_EMUL_OP_NVRAM2 = M68K_EMUL_BREAK + OP_NVRAM2; -const uint16 M68K_EMUL_OP_NVRAM3 = M68K_EMUL_BREAK + OP_NVRAM3; -const uint16 M68K_EMUL_OP_FIX_MEMTOP = M68K_EMUL_BREAK + OP_FIX_MEMTOP; -const uint16 M68K_EMUL_OP_FIX_MEMSIZE = M68K_EMUL_BREAK + OP_FIX_MEMSIZE; -const uint16 M68K_EMUL_OP_FIX_BOOTSTACK = M68K_EMUL_BREAK + OP_FIX_BOOTSTACK; -const uint16 M68K_EMUL_OP_SONY_OPEN = M68K_EMUL_BREAK + OP_SONY_OPEN; -const uint16 M68K_EMUL_OP_SONY_PRIME = M68K_EMUL_BREAK + OP_SONY_PRIME; -const uint16 M68K_EMUL_OP_SONY_CONTROL = M68K_EMUL_BREAK + OP_SONY_CONTROL; -const uint16 M68K_EMUL_OP_SONY_STATUS = M68K_EMUL_BREAK + OP_SONY_STATUS; -const uint16 M68K_EMUL_OP_DISK_OPEN = M68K_EMUL_BREAK + OP_DISK_OPEN; -const uint16 M68K_EMUL_OP_DISK_PRIME = M68K_EMUL_BREAK + OP_DISK_PRIME; -const uint16 M68K_EMUL_OP_DISK_CONTROL = M68K_EMUL_BREAK + OP_DISK_CONTROL; -const uint16 M68K_EMUL_OP_DISK_STATUS = M68K_EMUL_BREAK + OP_DISK_STATUS; -const uint16 M68K_EMUL_OP_CDROM_OPEN = M68K_EMUL_BREAK + OP_CDROM_OPEN; -const uint16 M68K_EMUL_OP_CDROM_PRIME = M68K_EMUL_BREAK + OP_CDROM_PRIME; -const uint16 M68K_EMUL_OP_CDROM_CONTROL = M68K_EMUL_BREAK + OP_CDROM_CONTROL; -const uint16 M68K_EMUL_OP_CDROM_STATUS = M68K_EMUL_BREAK + OP_CDROM_STATUS; -const uint16 M68K_EMUL_OP_AUDIO_DISPATCH = M68K_EMUL_BREAK + OP_AUDIO_DISPATCH; -const uint16 M68K_EMUL_OP_SOUNDIN_OPEN = M68K_EMUL_BREAK + OP_SOUNDIN_OPEN; -const uint16 M68K_EMUL_OP_SOUNDIN_CLOSE = M68K_EMUL_BREAK + OP_SOUNDIN_CLOSE; -const uint16 M68K_EMUL_OP_SOUNDIN_PRIME = M68K_EMUL_BREAK + OP_SOUNDIN_PRIME; -const uint16 M68K_EMUL_OP_SOUNDIN_CONTROL = M68K_EMUL_BREAK + OP_SOUNDIN_CONTROL; -const uint16 M68K_EMUL_OP_SOUNDIN_STATUS = M68K_EMUL_BREAK + OP_SOUNDIN_STATUS; -const uint16 M68K_EMUL_OP_ADBOP = M68K_EMUL_BREAK + OP_ADBOP; -const uint16 M68K_EMUL_OP_INSTIME = M68K_EMUL_BREAK + OP_INSTIME; -const uint16 M68K_EMUL_OP_RMVTIME = M68K_EMUL_BREAK + OP_RMVTIME; -const uint16 M68K_EMUL_OP_PRIMETIME = M68K_EMUL_BREAK + OP_PRIMETIME; -const uint16 M68K_EMUL_OP_MICROSECONDS = M68K_EMUL_BREAK + OP_MICROSECONDS; -const uint16 M68K_EMUL_OP_ZERO_SCRAP = M68K_EMUL_BREAK + OP_ZERO_SCRAP; -const uint16 M68K_EMUL_OP_PUT_SCRAP = M68K_EMUL_BREAK + OP_PUT_SCRAP; -const uint16 M68K_EMUL_OP_GET_SCRAP = M68K_EMUL_BREAK + OP_GET_SCRAP; -const uint16 M68K_EMUL_OP_DEBUG_STR = M68K_EMUL_BREAK + OP_DEBUG_STR; -const uint16 M68K_EMUL_OP_INSTALL_DRIVERS = M68K_EMUL_BREAK + OP_INSTALL_DRIVERS; -const uint16 M68K_EMUL_OP_NAME_REGISTRY = M68K_EMUL_BREAK + OP_NAME_REGISTRY; -const uint16 M68K_EMUL_OP_RESET = M68K_EMUL_BREAK + OP_RESET; -const uint16 M68K_EMUL_OP_IRQ = M68K_EMUL_BREAK + OP_IRQ; -const uint16 M68K_EMUL_OP_SCSI_DISPATCH = M68K_EMUL_BREAK + OP_SCSI_DISPATCH; -const uint16 M68K_EMUL_OP_SCSI_ATOMIC = M68K_EMUL_BREAK + OP_SCSI_ATOMIC; -const uint16 M68K_EMUL_OP_CHECK_SYSV = M68K_EMUL_BREAK + OP_CHECK_SYSV; -const uint16 M68K_EMUL_OP_NTRB_17_PATCH = M68K_EMUL_BREAK + OP_NTRB_17_PATCH; -const uint16 M68K_EMUL_OP_NTRB_17_PATCH2 = M68K_EMUL_BREAK + OP_NTRB_17_PATCH2; -const uint16 M68K_EMUL_OP_NTRB_17_PATCH3 = M68K_EMUL_BREAK + OP_NTRB_17_PATCH3; -const uint16 M68K_EMUL_OP_NTRB_17_PATCH4 = M68K_EMUL_BREAK + OP_NTRB_17_PATCH4; -const uint16 M68K_EMUL_OP_CHECKLOAD = M68K_EMUL_BREAK + OP_CHECKLOAD; -const uint16 M68K_EMUL_OP_EXTFS_COMM = M68K_EMUL_BREAK + OP_EXTFS_COMM; -const uint16 M68K_EMUL_OP_EXTFS_HFS = M68K_EMUL_BREAK + OP_EXTFS_HFS; -const uint16 M68K_EMUL_OP_IDLE_TIME = M68K_EMUL_BREAK + OP_IDLE_TIME; -const uint16 M68K_EMUL_OP_IDLE_TIME_2 = M68K_EMUL_BREAK + OP_IDLE_TIME_2; - -extern "C" void EmulOp(M68kRegisters *r, uint32 pc, int selector); - -#endif diff --git a/SheepShaver/src/include/ether.h b/SheepShaver/src/include/ether.h deleted file mode 100644 index b46a08e62..000000000 --- a/SheepShaver/src/include/ether.h +++ /dev/null @@ -1,101 +0,0 @@ -/* - * ether.h - SheepShaver Ethernet Device Driver - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 ETHER_H -#define ETHER_H - -struct queue; -struct msgb; -typedef struct queue queue_t; -typedef struct msgb mblk_t; - -extern uint8 InitStreamModule(void *theID); -extern void TerminateStreamModule(void); -extern int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds); -extern int ether_close(queue_t *rdq, int flag, void *creds); -extern int ether_wput(queue_t *q, mblk_t *mp); -extern int ether_rsrv(queue_t *q); - -// System specific and internal functions/data -extern void EtherInit(void); -extern void EtherExit(void); - -extern void EtherIRQ(void); - -extern void AO_get_ethernet_address(uint32 addr); -extern void AO_enable_multicast(uint32 addr); -extern void AO_disable_multicast(uint32 addr); -extern void AO_transmit_packet(uint32 mp); - -extern mblk_t *allocb(size_t size, int pri); -extern void OTEnterInterrupt(void); -extern void OTLeaveInterrupt(void); - -extern void ether_dispatch_packet(uint32 p, uint32 length); -extern void ether_packet_received(mblk_t *mp); - -extern bool ether_driver_opened; - -// Ethernet packet allocator (optimized for 32-bit platforms in real addressing mode) -class EthernetPacket { -#if SIZEOF_VOID_P == 4 && REAL_ADDRESSING - uint8 packet[1516]; - public: - uint32 addr(void) const { return (uint32)packet; } -#else - uint32 packet; - public: - EthernetPacket(); - ~EthernetPacket(); - uint32 addr(void) const { return packet; } -#endif -}; - -// Copy packet data from message block to linear buffer (must hold at -// least 1514 bytes), returns packet length -static inline int ether_msgb_to_buffer(uint32 mp, uint8 *p) -{ - int len = 0; - while (mp) { - uint32 size = ReadMacInt32(mp + 16) - ReadMacInt32(mp + 12); - Mac2Host_memcpy(p, ReadMacInt32(mp + 12), size); - len += size; - p += size; - mp = ReadMacInt32(mp + 8); - } - return len; -} - -extern int32 num_wput; -extern int32 num_error_acks; -extern int32 num_tx_packets; -extern int32 num_tx_raw_packets; -extern int32 num_tx_normal_packets; -extern int32 num_tx_buffer_full; -extern int32 num_rx_packets; -extern int32 num_ether_irq; -extern int32 num_unitdata_ind; -extern int32 num_rx_fastpath; -extern int32 num_rx_no_mem; -extern int32 num_rx_dropped; -extern int32 num_rx_stream_not_ready; -extern int32 num_rx_no_unitdata_mem; - -#endif diff --git a/SheepShaver/src/include/ether_defs.h b/SheepShaver/src/include/ether_defs.h deleted file mode 100644 index 390aee4cb..000000000 --- a/SheepShaver/src/include/ether_defs.h +++ /dev/null @@ -1,563 +0,0 @@ -/* - * ether_defs.h - Definitions for DLPI Ethernet Driver - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 ETHER_DEFS_H -#define ETHER_DEFS_H - - -#if __MWERKS__ && __POWERPC__ -#define PRAGMA_ALIGN_SUPPORTED 1 -#define PACKED__ -#elif defined __GNUC__ -#define PACKED__ __attribute__ ((packed)) -#elif defined __sgi -#define PRAGMA_PACK_SUPPORTED 1 -#define PACKED__ -#else -#error "Packed attribute or pragma shall be supported" -#endif - - -/* - * Macros - */ - -// Get pointer to the read queue, assumes 'q' is a write queue ptr -#define RD(q) (&q[-1]) - -// Get pointer to the write queue, assumes 'q' is a read queue ptr -#define WR(q) (&q[1]) - -#define OTCompare48BitAddresses(p1, p2) \ - (*(const uint32*)((const uint8*)(p1)) == *(const uint32*)((const uint8*)(p2)) && \ - *(const uint16*)(((const uint8*)(p1))+4) == *(const uint16*)(((const uint8*)(p2))+4) ) - -#define OTCopy48BitAddress(p1, p2) \ - (*(uint32*)((uint8*)(p2)) = *(const uint32*)((const uint8*)(p1)), \ - *(uint16*)(((uint8*)(p2))+4) = *(const uint16*)(((const uint8*)(p1))+4) ) - -#define OTClear48BitAddress(p1) \ - (*(uint32*)((uint8*)(p1)) = 0, \ - *(uint16*)(((uint8*)(p1))+4) = 0 ) - -#define OTCompare8022SNAP(p1, p2) \ - (*(const uint32*)((const uint8*)(p1)) == *(const uint32*)((const uint8*)(p2)) && \ - *(((const uint8*)(p1))+4) == *(((const uint8*)(p2))+4) ) - -#define OTCopy8022SNAP(p1, p2) \ - (*(uint32*)((uint8*)(p2)) = *(const uint32*)((const uint8*)(p1)), \ - *(((uint8*)(p2))+4) = *(((const uint8*)(p1))+4) ) - -#define OTIs48BitBroadcastAddress(p1) \ - (*(uint32*)((uint8*)(p1)) == 0xffffffff && \ - *(uint16*)(((uint8*)(p1))+4) == 0xffff ) - -#define OTSet48BitBroadcastAddress(p1) \ - (*(uint32*)((uint8*)(p1)) = 0xffffffff, \ - *(uint16*)(((uint8*)(p1))+4) = 0xffff ) - -#define OTIs48BitZeroAddress(p1) \ - (*(uint32*)((uint8*)(p1)) == 0 && \ - *(uint16*)(((uint8*)(p1))+4) == 0 ) - - -/* - * Constants - */ - -enum { - // Address and packet lengths - kEnetPhysicalAddressLength = 6, - k8022SAPLength = 1, - k8022DLSAPLength = 2, - k8022SNAPLength = 5, - kMaxBoundAddrLength = 6 + 2 + 5, // addr/SAP/SNAP - kEnetAndSAPAddressLength = kEnetPhysicalAddressLength + k8022DLSAPLength, - kEnetPacketHeaderLength = (2 * kEnetPhysicalAddressLength) + k8022DLSAPLength, - k8022BasicHeaderLength = 3, // SSAP/DSAP/Control - k8022SNAPHeaderLength = k8022SNAPLength + k8022BasicHeaderLength, - kMinDIXSAP = 1501, - kEnetTSDU = 1514, - - // Special addresses - kSNAPSAP = 0xaa, - kMax8022SAP = 0xfe, - k8022GlobalSAP = 0xff, - kIPXSAP = 0xff, - - // DLPI interface states - DL_UNBOUND = 0, - - // Message types - M_DATA = 0, - M_PROTO = 1, - M_IOCTL = 14, - M_IOCACK = 129, - M_IOCNAK = 130, - M_PCPROTO = 131, // priority message - M_FLUSH = 134, - FLUSHDATA = 0, - FLUSHALL = 1, - FLUSHR = 1, - FLUSHW = 2, - FLUSHRW = 3, - - // DLPI primitives - DL_INFO_REQ = 0, - DL_BIND_REQ = 1, - DL_PEER_BIND = 1, - DL_HIERARCHICAL_BIND = 2, - DL_UNBIND_REQ = 2, - DL_INFO_ACK = 3, - DL_BIND_ACK = 4, - DL_ERROR_ACK = 5, - DL_OK_ACK = 6, - DL_UNITDATA_REQ = 7, - DL_UNITDATA_IND = 8, - DL_UDERROR_IND = 9, - DL_SUBS_UNBIND_REQ = 21, - DL_SUBS_BIND_REQ = 27, - DL_SUBS_BIND_ACK = 28, - DL_ENABMULTI_REQ = 29, - DL_DISABMULTI_REQ = 30, - DL_PHYS_ADDR_REQ = 49, - DL_PHYS_ADDR_ACK = 50, - DL_FACT_PHYS_ADDR = 1, - DL_CURR_PHYS_ADDR = 2, - - // DLPI states - DL_IDLE = 3, - - // DLPI error codes - DL_BADADDR = 1, // improper address format - DL_OUTSTATE = 3, // improper state - DL_SYSERR = 4, // UNIX system error - DL_UNSUPPORTED = 7, // service unsupported - DL_BADPRIM = 9, // primitive unknown - DL_NOTSUPPORTED = 18, // primitive not implemented - DL_TOOMANY = 19, // limit exceeded - - // errnos - MAC_ENXIO = 6, - MAC_ENOMEM = 12, - MAC_EINVAL = 22, - - // Various DLPI constants - DL_CLDLS = 2, // connectionless data link service - DL_STYLE1 = 0x500, - DL_VERSION_2 = 2, - DL_CSMACD = 0, - DL_ETHER = 4, - DL_UNKNOWN = -1, - - // ioctl() codes - I_OTSetFramingType = (('O' << 8) | 2), - kOTGetFramingValue = -1, - kOTFramingEthernet = 1, - kOTFramingEthernetIPX = 2, - kOTFramingEthernet8023 = 4, - kOTFraming8022 = 8, - I_OTSetRawMode = (('O' << 8) | 3), - DL_IOC_HDR_INFO = (('l' << 8) | 10), - - // Buffer allocation priority - BPRI_LO = 1, - BPRI_HI = 3, - - // Misc constants - kEnetModuleID = 7101 -}; - -enum EAddrType { - keaStandardAddress = 0, - keaMulticast, - keaBroadcast, - keaBadAddress -}; - - -/* - * Data member wrappers - */ - -// Forward declarations -struct datab; -struct msgb; -struct queue; -struct multicast_node; -struct DLPIStream; - -// Optimize for 32-bit big endian targets -#if defined(WORDS_BIGENDIAN) && (SIZEOF_VOID_P == 4) - -// Predefined member types -typedef int8 nw_int8; -typedef int16 nw_int16; -typedef int32 nw_int32; -typedef uint8 nw_uint8; -typedef uint16 nw_uint16; -typedef uint32 nw_uint32; -typedef int nw_bool; -typedef uint8 * nw_uint8_p; -typedef void * nw_void_p; -typedef datab * nw_datab_p; -typedef msgb * nw_msgb_p; -typedef queue * nw_queue_p; -typedef multicast_node *nw_multicast_node_p; -typedef DLPIStream * nw_DLPIStream_p; - -#else - -// Big-endian memory accessor -template< int nbytes > -struct nw_memory_helper; - -template<> -struct nw_memory_helper<1> { - static inline uint8 load(void *ptr) { return *((uint8 *)ptr); } - static inline void store(void *ptr, uint8 val) { *((uint8 *)ptr) = val; } -}; - -template<> -struct nw_memory_helper<2> { - static inline uint16 load(void *ptr) { return ntohs(*((uint16 *)ptr)); } - static inline void store(void *ptr, uint16 val) { *((uint16 *)ptr) = htons(val); } -}; - -template<> -struct nw_memory_helper<4> { - static inline uint32 load(void *ptr) { return ntohl(*((uint32 *)ptr)); } - static inline void store(void *ptr, uint32 val) { *((uint32 *)ptr) = htonl(val); } -}; - -// Scalar data member wrapper (specialise for pointer member types?) -template< class type, class public_type > -class nw_scalar_member_helper { - uint8 _pad[sizeof(type)]; -public: - operator public_type () const { - return (public_type)(uintptr)nw_memory_helper::load((void *)this); - } - public_type operator -> () const { - return this->operator public_type (); - } - nw_scalar_member_helper & operator = (public_type val) { - nw_memory_helper::store((void *)this, (type)(uintptr)val); - return *this; - } - nw_scalar_member_helper & operator += (int val) { - *this = *this + val; - return *this; - } - nw_scalar_member_helper & operator -= (int val) { - *this = *this - val; - return *this; - } - nw_scalar_member_helper & operator &= (int val) { - *this = *this & val; - return *this; - } - nw_scalar_member_helper & operator |= (int val) { - *this = *this | val; - return *this; - } -}; - -// Predefined member types -typedef nw_scalar_member_helper nw_int8; -typedef nw_scalar_member_helper nw_int16; -typedef nw_scalar_member_helper nw_int32; -typedef nw_scalar_member_helper nw_uint8; -typedef nw_scalar_member_helper nw_uint16; -typedef nw_scalar_member_helper nw_uint32; -typedef nw_scalar_member_helper nw_bool; -typedef nw_scalar_member_helper nw_uint8_p; -typedef nw_scalar_member_helper nw_void_p; -typedef nw_scalar_member_helper nw_datab_p; -typedef nw_scalar_member_helper nw_msgb_p; -typedef nw_scalar_member_helper nw_queue_p; -typedef nw_scalar_member_helper nw_multicast_node_p; -typedef nw_scalar_member_helper nw_DLPIStream_p; - -#endif - - -/* - * Structures - */ - -// Data block -struct datab { - nw_datab_p db_freep; - nw_uint8_p db_base; - nw_uint8_p db_lim; - nw_uint8 db_ref; - nw_uint8 db_type; - // ... -}; - -// Message block -struct msgb { - nw_msgb_p b_next; - nw_msgb_p b_prev; - nw_msgb_p b_cont; - nw_uint8_p b_rptr; - nw_uint8_p b_wptr; - nw_datab_p b_datap; - // ... -}; - -// Queue (full structure required because of size) -struct queue { - nw_void_p q_qinfo; - nw_msgb_p q_first; - nw_msgb_p q_last; - nw_queue_p q_next; - nw_queue_p q_link; - nw_DLPIStream_p q_ptr; - nw_uint32 q_count; - nw_int32 q_minpsz; - nw_int32 q_maxpsz; - nw_uint32 q_hiwat; - nw_uint32 q_lowat; - nw_void_p q_bandp; - nw_uint16 q_flag; - nw_uint8 q_nband; - uint8 _q_pad1[1]; - nw_void_p q_osx; - nw_queue_p q_ffcp; - nw_queue_p q_bfcp; -}; -typedef struct queue queue_t; - -// M_IOCTL parameters -struct iocblk { - nw_int32 ioc_cmd; - nw_void_p ioc_cr; - nw_uint32 ioc_id; - nw_uint32 ioc_count; - nw_int32 ioc_error; - nw_int32 ioc_rval; - int32 _ioc_filler[4]; -}; - -// Priority specification -struct dl_priority_t { - nw_int32 dl_min, dl_max; -}; - -// DPLI primitives -struct dl_info_req_t { - nw_uint32 dl_primitive; // DL_INFO_REQ -}; - -struct dl_info_ack_t { - nw_uint32 dl_primitive; // DL_INFO_ACK - nw_uint32 dl_max_sdu; - nw_uint32 dl_min_sdu; - nw_uint32 dl_addr_length; - nw_uint32 dl_mac_type; - nw_uint32 dl_reserved; - nw_uint32 dl_current_state; - nw_int32 dl_sap_length; - nw_uint32 dl_service_mode; - nw_uint32 dl_qos_length; - nw_uint32 dl_qos_offset; - nw_uint32 dl_qos_range_length; - nw_uint32 dl_qos_range_offset; - nw_uint32 dl_provider_style; - nw_uint32 dl_addr_offset; - nw_uint32 dl_version; - nw_uint32 dl_brdcst_addr_length; - nw_uint32 dl_brdcst_addr_offset; - nw_uint32 dl_growth; -}; - -struct dl_bind_req_t { - nw_uint32 dl_primitive; // DL_BIND_REQ - nw_uint32 dl_sap; - nw_uint32 dl_max_conind; - nw_uint16 dl_service_mode; - nw_uint16 dl_conn_mgmt; - nw_uint32 dl_xidtest_flg; -}; - -struct dl_bind_ack_t { - nw_uint32 dl_primitive; // DL_BIND_ACK - nw_uint32 dl_sap; - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; - nw_uint32 dl_max_conind; - nw_uint32 dl_xidtest_flg; -}; - -struct dl_error_ack_t { - nw_uint32 dl_primitive; // DL_ERROR_ACK - nw_uint32 dl_error_primitive; - nw_uint32 dl_errno; - nw_uint32 dl_unix_errno; -}; - -struct dl_ok_ack_t { - nw_uint32 dl_primitive; // DL_ERROR_ACK - nw_uint32 dl_correct_primitive; -}; - -struct dl_unitdata_req_t { - nw_uint32 dl_primitive; // DL_UNITDATA_REQ - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - dl_priority_t dl_priority; -}; - -struct dl_unitdata_ind_t { - nw_uint32 dl_primitive; // DL_UNITDATA_IND - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - nw_uint32 dl_src_addr_length; - nw_uint32 dl_src_addr_offset; - nw_uint32 dl_group_address; -}; - -struct dl_uderror_ind_t { - nw_uint32 dl_primitive; // DL_UDERROR_IND - nw_uint32 dl_dest_addr_length; - nw_uint32 dl_dest_addr_offset; - nw_uint32 dl_unix_errno; - nw_uint32 dl_errno; -}; - -struct dl_subs_bind_req_t { - nw_uint32 dl_primitive; // DL_SUBS_BIND_REQ - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; - nw_uint32 dl_subs_bind_class; -}; - -struct dl_subs_bind_ack_t { - nw_uint32 dl_primitive; // DL_SUBS_BIND_ACK - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; -}; - -struct dl_subs_unbind_req_t { - nw_uint32 dl_primitive; // DL_SUBS_UNBIND_REQ - nw_uint32 dl_subs_sap_offset; - nw_uint32 dl_subs_sap_length; -}; - -struct dl_enabmulti_req_t { - nw_uint32 dl_primitive; // DL_ENABMULTI_REQ - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -struct dl_disabmulti_req_t { - nw_uint32 dl_primitive; // DL_DISABMULTI_REQ - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -struct dl_phys_addr_req_t { - nw_uint32 dl_primitive; // DL_PHYS_ADDR_REQ - nw_uint32 dl_addr_type; -}; - -struct dl_phys_addr_ack_t { - nw_uint32 dl_primitive; // DL_PHYS_ADDR_ACK - nw_uint32 dl_addr_length; - nw_uint32 dl_addr_offset; -}; - -// Parameters for I_OTSetRawMode/kOTSetRecvMode ioctl() -struct dl_recv_control_t { - nw_uint32 dl_primitive; - nw_uint32 dl_flags; - nw_uint32 dl_truncation_length; -}; - -union DL_primitives { - nw_uint32 dl_primitive; - dl_info_req_t info_req; - dl_info_ack_t info_ack; - dl_bind_req_t bind_req; - dl_bind_ack_t bind_ack; - dl_error_ack_t error_ack; - dl_ok_ack_t ok_ack; - dl_unitdata_req_t unitdata_req; - dl_unitdata_ind_t unitdata_ind; - dl_uderror_ind_t uderror_ind; - dl_subs_bind_req_t subs_bind_req; - dl_subs_bind_ack_t subs_bind_ack; - dl_subs_unbind_req_t subs_unbind_req; - dl_enabmulti_req_t enabmulti_req; - dl_disabmulti_req_t disabmulti_req; - dl_phys_addr_req_t phys_addr_req; - dl_phys_addr_ack_t phys_addr_ack; -}; - -#ifdef PRAGMA_ALIGN_SUPPORTED -#pragma options align=mac68k -#endif - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -// Packet headers -struct EnetPacketHeader { - uint8 fDestAddr[6]; - uint8 fSourceAddr[6]; - nw_uint16 fProto; -} PACKED__; - -struct T8022Header { - uint8 fDSAP; - uint8 fSSAP; - uint8 fCtrl; -} PACKED__; - -struct T8022SNAPHeader { - uint8 fDSAP; - uint8 fSSAP; - uint8 fCtrl; - uint8 fSNAP[k8022SNAPLength]; -} PACKED__; - -struct T8022FullPacketHeader { - EnetPacketHeader fEnetPart; - T8022SNAPHeader f8022Part; -} PACKED__; - -struct T8022AddressStruct { - uint8 fHWAddr[6]; - nw_uint16 fSAP; - uint8 fSNAP[k8022SNAPLength]; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -#ifdef PRAGMA_ALIGN_SUPPORTED -#pragma options align=reset -#endif - -#endif diff --git a/SheepShaver/src/include/extfs.h b/SheepShaver/src/include/extfs.h deleted file mode 120000 index a86e2538e..000000000 --- a/SheepShaver/src/include/extfs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/extfs.h \ No newline at end of file diff --git a/SheepShaver/src/include/extfs_defs.h b/SheepShaver/src/include/extfs_defs.h deleted file mode 120000 index 0970ce1f5..000000000 --- a/SheepShaver/src/include/extfs_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/extfs_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/macos_util.h b/SheepShaver/src/include/macos_util.h deleted file mode 100644 index 0b8e3eeec..000000000 --- a/SheepShaver/src/include/macos_util.h +++ /dev/null @@ -1,376 +0,0 @@ -/* - * macos_util.h - MacOS definitions/utility functions - * - * SheepShaver (C) Christian Bauer and Marc Hellwig - * - * 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 MACOS_UTIL_H -#define MACOS_UTIL_H - -#include "cpu_emulation.h" -#include "thunks.h" -#include - - -/* - * General definitions - */ - -struct Point { - int16 v; - int16 h; -}; - -struct Rect { - int16 top; - int16 left; - int16 bottom; - int16 right; -}; - - -/* - * Queues - */ - -enum { // Queue types - dummyType = 0, - vType = 1, - ioQType = 2, - drvQType = 3, - evType = 4, - fsQType = 5, - sIQType = 6, - dtQType = 7, - nmType = 8 -}; - -enum { // QElem struct - qLink = 0, - qType = 4, - qData = 6 -}; - -enum { // QHdr struct - qFlags = 0, - qHead = 2, - qTail = 6 -}; - - -/* - * Definitions for Deferred Task Manager - */ - -enum { // DeferredTask struct - dtFlags = 6, - dtAddr = 8, - dtParam = 12, - dtReserved = 16 -}; - - -/* - * Definitions for Device Manager - */ - -// Error codes -enum { - noErr = 0, - controlErr = -17, /* I/O System Errors */ - statusErr = -18, /* I/O System Errors */ - readErr = -19, /* I/O System Errors */ - writErr = -20, /* I/O System Errors */ - badUnitErr = -21, /* I/O System Errors */ - unitEmptyErr = -22, /* I/O System Errors */ - openErr = -23, /* I/O System Errors */ - closErr = -24, /* I/O System Errors */ - abortErr = -27, /* IO call aborted by KillIO */ - notOpenErr = -28, /* Driver not open */ - dskFulErr = -34, /* disk full */ - nsvErr = -35, /* no such volume */ - ioErr = -36, /* I/O error (bummers) */ - bdNamErr = -37, /* bad name */ - fnOpnErr = -38, /* file not open */ - eofErr = -39, /* End-of-file encountered */ - posErr = -40, /* tried to position to before start of file (r/w) */ - tmfoErr = -42, /* too many files open */ - fnfErr = -43, /* file not found */ - wPrErr = -44, /* diskette is write protected. */ - fLckdErr = -45, /* file is locked */ - fBsyErr = -47, /* file busy, dir not empty */ - dupFNErr = -48, /* duplicate filename already exists */ - paramErr = -50, /* error in user parameter list */ - rfNumErr = -51, /* bad ioRefNum */ - permErr = -54, /* permission error */ - nsDrvErr = -56, /* no such driver number */ - extFSErr = -58, /* external file system */ - noDriveErr = -64, /* drive not installed */ - offLinErr = -65, /* r/w requested for an off-line drive */ - noNybErr = -66, /* couldn't find 5 nybbles in 200 tries */ - noAdrMkErr = -67, /* couldn't find valid addr mark */ - dataVerErr = -68, /* read verify compare failed */ - badCksmErr = -69, /* addr mark checksum didn't check */ - badBtSlpErr = -70, /* bad addr mark bit slip nibbles */ - noDtaMkErr = -71, /* couldn't find a data mark header */ - badDCksum = -72, /* bad data mark checksum */ - badDBtSlp = -73, /* bad data mark bit slip nibbles */ - wrUnderrun = -74, /* write underrun occurred */ - cantStepErr = -75, /* step handshake failed */ - tk0BadErr = -76, /* track 0 detect doesn't change */ - initIWMErr = -77, /* unable to initialize IWM */ - twoSideErr = -78, /* tried to read 2nd side on a 1-sided drive */ - spdAdjErr = -79, /* unable to correctly adjust disk speed */ - seekErr = -80, /* track number wrong on address mark */ - sectNFErr = -81, /* sector number never found on a track */ - fmt1Err = -82, /* can't find sector 0 after track format */ - fmt2Err = -83, /* can't get enough sync */ - verErr = -84, /* track failed to verify */ - memFullErr = -108, - dirNFErr = -120 /* directory not found */ -}; - -// Misc constants -enum { - goodbye = -1, /* heap being reinitialized */ - - ioInProgress = 1, /* predefined value of ioResult while I/O is pending */ - aRdCmd = 2, /* low byte of ioTrap for Read calls */ - aWrCmd = 3, /* low byte of ioTrap for Write calls */ - asyncTrpBit = 10, /* trap word modifier */ - noQueueBit = 9, /* trap word modifier */ - - dReadEnable = 0, /* set if driver responds to read requests */ - dWritEnable = 1, /* set if driver responds to write requests */ - dCtlEnable = 2, /* set if driver responds to control requests */ - dStatEnable = 3, /* set if driver responds to status requests */ - dNeedGoodBye = 4, /* set if driver needs time for performing periodic tasks */ - dNeedTime = 5, /* set if driver needs time for performing periodic tasks */ - dNeedLock = 6, /* set if driver must be locked in memory as soon as it is opened */ - - dOpened = 5, /* driver is open */ - dRAMBased = 6, /* dCtlDriver is a handle (1) or pointer (0) */ - drvrActive = 7, /* driver is currently processing a request */ - - rdVerify = 64, - - fsCurPerm = 0, // Whatever is currently allowed - fsRdPerm = 1, // Exclusive read - fsWrPerm = 2, // Exclusive write - fsRdWrPerm = 3, // Exclusive read/write - fsRdWrShPerm = 4, // Shared read/write - - fsAtMark = 0, // At current mark - fsFromStart = 1, // Set mark rel to BOF - fsFromLEOF = 2, // Set mark rel to logical EOF - fsFromMark = 3, // Set mark rel to current mark - - sony = 0, - hard20 = 1 -}; - -enum { /* Large Volume Constants */ - kWidePosOffsetBit = 8, - kMaximumBlocksIn4GB = 0x007FFFFF -}; - -enum { // IOParam struct - ioTrap = 6, - ioCmdAddr = 8, - ioCompletion = 12, - ioResult = 16, - ioNamePtr = 18, - ioVRefNum = 22, - ioRefNum = 24, - ioVersNum = 26, - ioPermssn = 27, - ioMisc = 28, - ioBuffer = 32, - ioReqCount = 36, - ioActCount = 40, - ioPosMode = 44, - ioPosOffset = 46, - ioWPosOffset = 46, // Wide positioning offset when ioPosMode has kWidePosOffsetBit set - SIZEOF_IOParam = 50 -}; - -enum { // CntrlParam struct - csCode = 26, - csParam = 28 -}; - -enum { // DrvSts struct - dsTrack = 0, - dsWriteProt = 2, - dsDiskInPlace = 3, - dsInstalled = 4, - dsSides = 5, - dsQLink = 6, - dsQType = 10, - dsQDrive = 12, - dsQRefNum = 14, - dsQFSID = 16, - dsTwoSideFmt = 18, - dsNewIntf = 19, - dsDiskErrs = 20, - dsMFMDrive = 22, - dsMFMDisk = 23, - dsTwoMegFmt = 24 -}; - -enum { // DrvSts2 struct - dsDriveSize = 18, - dsDriveS1 = 20, - dsDriveType = 22, - dsDriveManf = 24, - dsDriveChar = 26, - dsDriveMisc = 28, - SIZEOF_DrvSts = 30 -}; - -enum { // DCtlEntry struct - dCtlDriver = 0, - dCtlFlags = 4, - dCtlQHdr = 6, - dCtlPosition = 16, - dCtlStorage = 20, - dCtlRefNum = 24, - dCtlCurTicks = 26, - dCtlWindow = 30, - dCtlDelay = 34, - dCtlEMask = 36, - dCtlMenu = 38, - dCtlSlot = 40, - dCtlSlotId = 41, - dCtlDevBase = 42, - dCtlOwner = 46, - dCtlExtDev = 50, - dCtlFillByte = 51, - dCtlNodeID = 52 -}; - - -/* - * Definitions for native Device Manager - */ - -// Registry EntryID -struct RegEntryID { - uint32 contents[4]; -}; - -// Command codes -enum { - kOpenCommand = 0, - kCloseCommand = 1, - kReadCommand = 2, - kWriteCommand = 3, - kControlCommand = 4, - kStatusCommand = 5, - kKillIOCommand = 6, - kInitializeCommand = 7, /* init driver and device*/ - kFinalizeCommand = 8, /* shutdown driver and device*/ - kReplaceCommand = 9, /* replace an old driver*/ - kSupersededCommand = 10, /* prepare to be replaced by a new driver*/ - kSuspendCommand = 11, /* prepare driver to go to sleep*/ - kResumeCommand = 12 /* wake up sleeping driver*/ -}; - -// Command kinds -enum { - kSynchronousIOCommandKind = 0x00000001, - kAsynchronousIOCommandKind = 0x00000002, - kImmediateIOCommandKind = 0x00000004 -}; - - -/* - * Definitions for Mixed Mode Manager - */ - -typedef uint32 ProcInfoType; -typedef int8 ISAType; -typedef uint16 RoutineFlagsType; -typedef uint32 ProcPtr; -typedef uint8 RDFlagsType; - -struct RoutineRecord { - ProcInfoType procInfo; /* calling conventions */ - int8 reserved1; /* Must be 0 */ - ISAType ISA; /* Instruction Set Architecture */ - RoutineFlagsType routineFlags; /* Flags for each routine */ - ProcPtr procDescriptor; /* Where is the thing weÕre calling? */ - uint32 reserved2; /* Must be 0 */ - uint32 selector; /* For dispatched routines, the selector */ -}; - -struct RoutineDescriptor { - uint16 goMixedModeTrap; /* Our A-Trap */ - int8 version; /* Current Routine Descriptor version */ - RDFlagsType routineDescriptorFlags; /* Routine Descriptor Flags */ - uint32 reserved1; /* Unused, must be zero */ - uint8 reserved2; /* Unused, must be zero */ - uint8 selectorInfo; /* If a dispatched routine, calling convention, else 0 */ - uint16 routineCount; /* Number of routines in this RD */ - RoutineRecord routineRecords[1]; /* The individual routines */ -}; - -struct SheepRoutineDescriptor - : public SheepVar -{ - SheepRoutineDescriptor(ProcInfoType procInfo, uint32 procedure) - : SheepVar(sizeof(RoutineDescriptor)) - { - const uintptr desc = addr(); - Mac_memset(desc, 0, sizeof(RoutineDescriptor)); - WriteMacInt16(desc + offsetof(RoutineDescriptor, goMixedModeTrap), 0xAAFE); - WriteMacInt8 (desc + offsetof(RoutineDescriptor, version), 7); - WriteMacInt32(desc + offsetof(RoutineDescriptor, routineRecords) + offsetof(RoutineRecord, procInfo), procInfo); - WriteMacInt8 (desc + offsetof(RoutineDescriptor, routineRecords) + offsetof(RoutineRecord, ISA), 1); - WriteMacInt16(desc + offsetof(RoutineDescriptor, routineRecords) + offsetof(RoutineRecord, routineFlags), 0 | 0 | 4); - WriteMacInt32(desc + offsetof(RoutineDescriptor, routineRecords) + offsetof(RoutineRecord, procDescriptor), procedure); - } -}; - - -// Functions -extern void MacOSUtilReset(void); -extern void Enqueue(uint32 elem, uint32 list); // Enqueue QElem to list -extern int FindFreeDriveNumber(int num); // Find first free drive number, starting at "num" -extern void MountVolume(void *fh); // Mount volume with given file handle (see sys.h) -extern void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size); // Calculate disk image file layout given file size and first 256 data bytes -extern uint32 FindLibSymbol(const char *lib, const char *sym); // Find symbol in shared library -extern void InitCallUniversalProc(void); // Init CallUniversalProc() -extern long CallUniversalProc(void *upp, uint32 info); // CallUniversalProc() -extern uint32 TimeToMacTime(time_t t); // Convert time_t value to MacOS time -extern uint32 Mac_sysalloc(uint32 size); // Allocate block in MacOS system heap zone -extern void Mac_sysfree(uint32 addr); // Release block occupied by the nonrelocatable block p - -// Construct four-character-code from string -#define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) - -// Emulator identification codes (4 and 2 characters) -const uint32 EMULATOR_ID_4 = 0x62616168; // 'baah' -const uint16 EMULATOR_ID_2 = 0x6261; // 'ba' - -// Test if basic MacOS initializations (of the ROM) are done -static inline bool HasMacStarted(void) -{ - return ReadMacInt32(0xcfc) == FOURCC('W','L','S','C'); // Mac warm start flag -} - -#endif diff --git a/SheepShaver/src/include/main.h b/SheepShaver/src/include/main.h deleted file mode 100644 index e595c04a5..000000000 --- a/SheepShaver/src/include/main.h +++ /dev/null @@ -1,80 +0,0 @@ -/* - * main.h - Emulation core - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 MAIN_H -#define MAIN_H - -// Global variables -extern void *TOC; // TOC pointer -extern void *R13; // r13 register -extern uint32 KernelDataAddr; // Address of Kernel Data -extern uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM -extern uint32 PVR; // Theoretical PVR -extern int64 CPUClockSpeed; // Processor clock speed (Hz) -extern int64 BusClockSpeed; // Bus clock speed (Hz) -extern int64 TimebaseSpeed; // Timebase clock speed (Hz) - -#ifdef __BEOS__ -extern system_info SysInfo; // System information -#endif - -// 68k register structure (for Execute68k()) -struct M68kRegisters { - uint32 d[8]; - uint32 a[8]; -}; - - -// Functions -extern bool InitAll(const char *vmdir); -extern void ExitAll(void); -extern void Dump68kRegs(M68kRegisters *r); // Dump 68k registers -extern void MakeExecutable(int dummy, uint32 start, uint32 length); // Make code executable -extern void PatchAfterStartup(void); // Patches after system startup -extern void QuitEmulator(void); // Quit emulator (must only be called from main thread) -extern void ErrorAlert(const char *text); // Display error alert -extern void WarningAlert(const char *text); // Display warning alert -extern bool ChoiceAlert(const char *text, const char *pos, const char *neg); // Display choice alert - -// Mutexes (non-recursive) -struct B2_mutex; -extern B2_mutex *B2_create_mutex(void); -extern void B2_lock_mutex(B2_mutex *mutex); -extern void B2_unlock_mutex(B2_mutex *mutex); -extern void B2_delete_mutex(B2_mutex *mutex); - -// Interrupt flags -enum { - INTFLAG_VIA = 1, // 60.15Hz VBL - INTFLAG_SERIAL = 2, // Serial driver - INTFLAG_ETHER = 4, // Ethernet driver - INTFLAG_AUDIO = 16, // Audio block read - INTFLAG_TIMER = 32, // Time Manager - INTFLAG_ADB = 64 // ADB -}; - -extern volatile uint32 InterruptFlags; // Currently pending interrupts -extern void SetInterruptFlag(uint32); -extern void ClearInterruptFlag(uint32); -extern void TriggerInterrupt(void); // Trigger SIGUSR1 interrupt in emulator thread -extern void DisableInterrupt(void); // Disable SIGUSR1 interrupt (can be nested) -extern void EnableInterrupt(void); // Enable SIGUSR1 interrupt (can be nested) - -#endif diff --git a/SheepShaver/src/include/name_registry.h b/SheepShaver/src/include/name_registry.h deleted file mode 100644 index ef7cbbfec..000000000 --- a/SheepShaver/src/include/name_registry.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * name_registry.h - Name Registry handling - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 NAME_REGISTRY_H -#define NAME_REGISTRY_H - -extern void DoPatchNameRegistry(void); -extern void PatchNameRegistry(void); - -#endif diff --git a/SheepShaver/src/include/pict.h b/SheepShaver/src/include/pict.h deleted file mode 120000 index 6e5a0b71c..000000000 --- a/SheepShaver/src/include/pict.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/pict.h \ No newline at end of file diff --git a/SheepShaver/src/include/prefs.h b/SheepShaver/src/include/prefs.h deleted file mode 120000 index 64a7ae513..000000000 --- a/SheepShaver/src/include/prefs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/prefs.h \ No newline at end of file diff --git a/SheepShaver/src/include/prefs_editor.h b/SheepShaver/src/include/prefs_editor.h deleted file mode 100644 index 68b0326d8..000000000 --- a/SheepShaver/src/include/prefs_editor.h +++ /dev/null @@ -1,30 +0,0 @@ -/* - * prefs_editor.h - Preferences editor - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 PREFS_EDITOR_H -#define PREFS_EDITOR_H - -#ifdef __BEOS__ -extern void PrefsEditor(uint32 msg); -#else -extern bool PrefsEditor(void); -#endif - -#endif diff --git a/SheepShaver/src/include/rom_patches.h b/SheepShaver/src/include/rom_patches.h deleted file mode 100644 index c263606a0..000000000 --- a/SheepShaver/src/include/rom_patches.h +++ /dev/null @@ -1,42 +0,0 @@ -/* - * rom_patches.h - ROM patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 ROM_PATCHES_H -#define ROM_PATCHES_H - -// ROM types -enum { - ROMTYPE_TNT, - ROMTYPE_ALCHEMY, - ROMTYPE_ZANZIBAR, - ROMTYPE_GAZELLE, - ROMTYPE_GOSSAMER, - ROMTYPE_NEWWORLD -}; -extern int ROMType; - -extern bool DecodeROM(uint8 *data, uint32 size); -extern bool PatchROM(void); -extern void InstallDrivers(void); - -extern void AddSifter(uint32 type, int16 id); -extern bool FindSifter(uint32 type, int16 id); - -#endif diff --git a/SheepShaver/src/include/rsrc_patches.h b/SheepShaver/src/include/rsrc_patches.h deleted file mode 100644 index 2f367e124..000000000 --- a/SheepShaver/src/include/rsrc_patches.h +++ /dev/null @@ -1,28 +0,0 @@ -/* - * rsrc_patches.h - Resource patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 RSRC_PATCHES_H -#define RSRC_PATCHES_H - -extern void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size); -extern void CheckLoad(uint32 type, const char *name, uint16 *p, uint32 size); -extern void PatchNativeResourceManager(void); - -#endif diff --git a/SheepShaver/src/include/scsi.h b/SheepShaver/src/include/scsi.h deleted file mode 120000 index b5aa39cc2..000000000 --- a/SheepShaver/src/include/scsi.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/scsi.h \ No newline at end of file diff --git a/SheepShaver/src/include/serial.h b/SheepShaver/src/include/serial.h deleted file mode 120000 index 42183f367..000000000 --- a/SheepShaver/src/include/serial.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/serial.h \ No newline at end of file diff --git a/SheepShaver/src/include/serial_defs.h b/SheepShaver/src/include/serial_defs.h deleted file mode 120000 index 1765fd106..000000000 --- a/SheepShaver/src/include/serial_defs.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/serial_defs.h \ No newline at end of file diff --git a/SheepShaver/src/include/sony.h b/SheepShaver/src/include/sony.h deleted file mode 120000 index d9eb31446..000000000 --- a/SheepShaver/src/include/sony.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/sony.h \ No newline at end of file diff --git a/SheepShaver/src/include/sys.h b/SheepShaver/src/include/sys.h deleted file mode 120000 index 5581536a0..000000000 --- a/SheepShaver/src/include/sys.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/sys.h \ No newline at end of file diff --git a/SheepShaver/src/include/thunks.h b/SheepShaver/src/include/thunks.h deleted file mode 100644 index e1280f391..000000000 --- a/SheepShaver/src/include/thunks.h +++ /dev/null @@ -1,222 +0,0 @@ -/* - * thunks.h - Thunks to share data and code with MacOS - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 THUNKS_H -#define THUNKS_H - -#include "cpu_emulation.h" - -/* - * Native function invocation - */ - -enum { - NATIVE_PATCH_NAME_REGISTRY, - NATIVE_VIDEO_INSTALL_ACCEL, - NATIVE_VIDEO_VBL, - NATIVE_VIDEO_DO_DRIVER_IO, - NATIVE_ETHER_AO_GET_HWADDR, - NATIVE_ETHER_AO_ADD_MULTI, - NATIVE_ETHER_AO_DEL_MULTI, - NATIVE_ETHER_AO_SEND_PACKET, - NATIVE_ETHER_IRQ, - NATIVE_ETHER_INIT, - NATIVE_ETHER_TERM, - NATIVE_ETHER_OPEN, - NATIVE_ETHER_CLOSE, - NATIVE_ETHER_WPUT, - NATIVE_ETHER_RSRV, - NATIVE_SERIAL_NOTHING, - NATIVE_SERIAL_OPEN, - NATIVE_SERIAL_PRIME_IN, - NATIVE_SERIAL_PRIME_OUT, - NATIVE_SERIAL_CONTROL, - NATIVE_SERIAL_STATUS, - NATIVE_SERIAL_CLOSE, - NATIVE_GET_RESOURCE, - NATIVE_GET_1_RESOURCE, - NATIVE_GET_IND_RESOURCE, - NATIVE_GET_1_IND_RESOURCE, - NATIVE_R_GET_RESOURCE, - NATIVE_MAKE_EXECUTABLE, - NATIVE_CHECK_LOAD_INVOC, - NATIVE_NQD_SYNC_HOOK, - NATIVE_NQD_BITBLT_HOOK, - NATIVE_NQD_FILLRECT_HOOK, - NATIVE_NQD_UNKNOWN_HOOK, - NATIVE_NQD_BITBLT, - NATIVE_NQD_INVRECT, - NATIVE_NQD_FILLRECT, - NATIVE_NAMED_CHECK_LOAD_INVOC, - NATIVE_GET_NAMED_RESOURCE, - NATIVE_GET_1_NAMED_RESOURCE, - NATIVE_OP_MAX -}; - -// Initialize the thunks system -extern bool ThunksInit(void); - -// Exit the thunks system -extern void ThunksExit(void); - -// Return the fake PowerPC opcode to handle specified native code -#if EMULATED_PPC -extern uint32 NativeOpcode(int selector); -#endif - -// Return the native function descriptor (TVECT) -extern uint32 NativeTVECT(int selector); - -// Return the native function address -extern uint32 NativeFunction(int selector); - -// Return the routine descriptor address of the native function -extern uint32 NativeRoutineDescriptor(int selector); - - -/* - * Helpers to share 32-bit addressable data with MacOS - * - * There are two distinct allocatable regions: - * - * - The Data region is used to share data between MacOS and - * SheepShaver. This is stack-like allocation since it is - * meant to only hold temporary data which dies at the end - * of the current function scope. - * - * - The Procedure region is used to hold permanent M68K or - * PowerPC code to assist native routine implementations. - * - * - The Procedure region grows up whereas the Data region - * grows down. They may intersect into the ZeroPage, which - * is a read-only page with all bits set to zero. In practise, - * the intersection is unlikely since the Procedure region is - * static and the Data region is meant to be small (< 256 KB). - */ - -class SheepMem { - static uint32 align(uint32 size); -protected: - static uint32 page_size; - static uintptr zero_page; - static uintptr base; - static uintptr data; - static uintptr proc; - static const uint32 size = 0x80000; // 512 KB -public: - static bool Init(void); - static void Exit(void); - static uint32 PageSize(); - static uint32 ZeroPage(); - static uint32 Reserve(uint32 size); - static void Release(uint32 size); - static uint32 ReserveProc(uint32 size); - friend class SheepVar; -}; - -inline uint32 SheepMem::align(uint32 size) -{ - // Align on 4 bytes boundaries - return (size + 3) & -4; -} - -inline uint32 SheepMem::PageSize() -{ - return page_size; -} - -inline uint32 SheepMem::ZeroPage() -{ - return zero_page; -} - -inline uint32 SheepMem::Reserve(uint32 size) -{ - data -= align(size); - assert(data >= proc); - return data; -} - -inline void SheepMem::Release(uint32 size) -{ - data += align(size); -} - -inline uint32 SheepMem::ReserveProc(uint32 size) -{ - uint32 mproc = proc; - proc += align(size); - assert(proc < data); - return mproc; -} - -static inline uint32 SheepProc(const uint8 *proc, uint32 proc_size) -{ - uint32 mac_proc = SheepMem::ReserveProc(proc_size); - Host2Mac_memcpy(mac_proc, proc, proc_size); - return mac_proc; -} - -#define BUILD_SHEEPSHAVER_PROCEDURE(PROC) \ - static uint32 PROC = 0; \ - if (PROC == 0) \ - PROC = SheepProc(PROC##_template, sizeof(PROC##_template)) - -class SheepVar -{ - uint32 m_base; - uint32 m_size; -public: - SheepVar(uint32 requested_size); - ~SheepVar() { SheepMem::Release(m_size); } - uint32 addr() const { return m_base; } -}; - -inline SheepVar::SheepVar(uint32 requested_size) -{ - m_size = SheepMem::align(requested_size); - m_base = SheepMem::Reserve(m_size); -} - -// TODO: optimize for 32-bit platforms - -template< int requested_size > -struct SheepArray : public SheepVar -{ - SheepArray() : SheepVar(requested_size) { } -}; - -struct SheepVar32 : public SheepVar -{ - SheepVar32() : SheepVar(4) { } - SheepVar32(uint32 value) : SheepVar(4) { set_value(value); } - uint32 value() const { return ReadMacInt32(addr()); } - void set_value(uint32 v) { WriteMacInt32(addr(), v); } -}; - -struct SheepString : public SheepVar -{ - SheepString(const char *str) : SheepVar(strlen(str) + 1) - { if (str) strcpy(value(), str); else WriteMacInt8(addr(), 0); } - char *value() const - { return (char *)Mac2HostAddr(addr()); } -}; - -#endif diff --git a/SheepShaver/src/include/timer.h b/SheepShaver/src/include/timer.h deleted file mode 120000 index a7ee23e94..000000000 --- a/SheepShaver/src/include/timer.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/timer.h \ No newline at end of file diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h deleted file mode 100644 index 12ea12ebc..000000000 --- a/SheepShaver/src/include/user_strings.h +++ /dev/null @@ -1,194 +0,0 @@ -/* - * user_strings.h - Localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 USER_STRINGS_H -#define USER_STRINGS_H - -// Common string numbers -enum { - // General messages - STR_ABOUT_TEXT1 = 0, - STR_ABOUT_TEXT2, - STR_READING_ROM_FILE, - STR_SHELL_ERROR_PREFIX, - STR_GUI_ERROR_PREFIX, - STR_ERROR_ALERT_TITLE, - STR_SHELL_WARNING_PREFIX, - STR_GUI_WARNING_PREFIX, - STR_WARNING_ALERT_TITLE, - STR_NOTICE_ALERT_TITLE, - STR_ABOUT_TITLE, - STR_OK_BUTTON, - STR_START_BUTTON, - STR_QUIT_BUTTON, - STR_CANCEL_BUTTON, - STR_IGNORE_BUTTON, - - // Error messages - STR_NOT_ENOUGH_MEMORY_ERR = 1000, - STR_NO_KERNEL_DATA_ERR, - STR_NO_RAM_AREA_ERR, - STR_NO_ROM_FILE_ERR, - STR_RAM_HIGHER_THAN_ROM_ERR, - STR_ROM_FILE_READ_ERR, - STR_ROM_SIZE_ERR, - STR_UNSUPPORTED_ROM_TYPE_ERR, - STR_POWER_INSTRUCTION_ERR, - STR_MEM_ACCESS_ERR, - STR_MEM_ACCESS_READ, - STR_MEM_ACCESS_WRITE, - STR_UNKNOWN_SEGV_ERR, - STR_NO_NAME_REGISTRY_ERR, - STR_FULL_SCREEN_ERR, - STR_SCSI_BUFFER_ERR, - STR_SCSI_SG_FULL_ERR, - - // Warning messages - STR_SMALL_RAM_WARN = 2000, - STR_VOLUME_IS_MOUNTED_WARN, - STR_CANNOT_UNMOUNT_WARN, - STR_CREATE_VOLUME_WARN, - - // Preferences window - STR_PREFS_TITLE = 3000, - STR_PREFS_MENU = 3020, - STR_PREFS_ITEM_ABOUT, - STR_PREFS_ITEM_START, - STR_PREFS_ITEM_ZAP_PRAM, - STR_PREFS_ITEM_QUIT, - - STR_NONE_LAB = 3100, - - // Volumes pane - STR_VOLUMES_PANE_TITLE = 3200, - STR_ADD_VOLUME_BUTTON, - STR_CREATE_VOLUME_BUTTON, - STR_REMOVE_VOLUME_BUTTON, - STR_ADD_VOLUME_PANEL_BUTTON, - STR_CREATE_VOLUME_PANEL_BUTTON, - STR_CDROM_DRIVE_CTRL, - STR_BOOTDRIVER_CTRL, - STR_BOOT_ANY_LAB, - STR_BOOT_CDROM_LAB, - STR_NOCDROM_CTRL, - STR_EXTFS_CTRL, - STR_ADD_VOLUME_TITLE, - STR_CREATE_VOLUME_TITLE, - STR_HARDFILE_SIZE_CTRL, - - // Graphics pane - STR_GRAPHICS_SOUND_PANE_TITLE = 3300, - STR_FRAMESKIP_CTRL, - STR_REF_5HZ_LAB, - STR_REF_7_5HZ_LAB, - STR_REF_10HZ_LAB, - STR_REF_15HZ_LAB, - STR_REF_30HZ_LAB, - STR_REF_60HZ_LAB, - STR_REF_DYNAMIC_LAB, - STR_GFXACCEL_CTRL, - STR_8_BIT_CTRL, - STR_16_BIT_CTRL, - STR_32_BIT_CTRL, - STR_W_640x480_CTRL, - STR_W_800x600_CTRL, - STR_640x480_CTRL, - STR_800x600_CTRL, - STR_1024x768_CTRL, - STR_1152x768_CTRL, - STR_1152x900_CTRL, - STR_1280x1024_CTRL, - STR_1600x1200_CTRL, - STR_VIDEO_MODE_CTRL, - STR_FULLSCREEN_CTRL, - STR_WINDOW_CTRL, - STR_VIDEO_TYPE_CTRL, - STR_DISPLAY_X_CTRL, - STR_DISPLAY_Y_CTRL, - STR_SIZE_384_LAB, - STR_SIZE_480_LAB, - STR_SIZE_512_LAB, - STR_SIZE_600_LAB, - STR_SIZE_640_LAB, - STR_SIZE_768_LAB, - STR_SIZE_800_LAB, - STR_SIZE_1024_LAB, - STR_SIZE_MAX_LAB, - STR_NOSOUND_CTRL, - - // Serial/Network pane - STR_SERIAL_NETWORK_PANE_TITLE = 3400, - STR_SERPORTA_CTRL, - STR_SERPORTB_CTRL, - STR_NONET_CTRL, - STR_ETHERNET_IF_CTRL, - - // Memory/Misc pane - STR_MEMORY_MISC_PANE_TITLE = 3500, - STR_RAMSIZE_CTRL, - STR_RAMSIZE_4MB_LAB, - STR_RAMSIZE_8MB_LAB, - STR_RAMSIZE_16MB_LAB, - STR_RAMSIZE_32MB_LAB, - STR_RAMSIZE_64MB_LAB, - STR_RAMSIZE_128MB_LAB, - STR_RAMSIZE_256MB_LAB, - STR_RAMSIZE_512MB_LAB, - STR_RAMSIZE_1024MB_LAB, - STR_RAMSIZE_SLIDER, - STR_RAMSIZE_FMT, - STR_IGNORESEGV_CTRL, - STR_IDLEWAIT_CTRL, - STR_ROM_FILE_CTRL, - - // JIT Compiler pane - STR_JIT_PANE_TITLE = 3700, - STR_JIT_CTRL, - STR_JIT_68K_CTRL, - - // Mac window - STR_WINDOW_TITLE = 4000, - STR_WINDOW_TITLE_FROZEN, - STR_WINDOW_MENU = 4050, - STR_WINDOW_ITEM_ABOUT, - STR_WINDOW_ITEM_REFRESH, - STR_WINDOW_ITEM_MOUNT, - - // Audio - STR_SOUND_IN_NAME = 6000, - - // External file system - STR_EXTFS_NAME = 7000, - STR_EXTFS_VOLUME_NAME -}; - -// Common and platform-specific string definitions -struct user_string_def { - int num; - const char *str; -}; - -extern user_string_def common_strings[]; -extern user_string_def platform_strings[]; - -// Fetch pointer to string, given the string number -extern const char *GetString(int num); - -#endif diff --git a/SheepShaver/src/include/version.h b/SheepShaver/src/include/version.h deleted file mode 100644 index 78a3837fa..000000000 --- a/SheepShaver/src/include/version.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * version.h - Version information - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 VERSION_H -#define VERSION_H - -const int VERSION_MAJOR = 2; -const int VERSION_MINOR = 4; - -#endif diff --git a/SheepShaver/src/include/video.h b/SheepShaver/src/include/video.h deleted file mode 100644 index 3b82203ef..000000000 --- a/SheepShaver/src/include/video.h +++ /dev/null @@ -1,162 +0,0 @@ -/* - * video.h - Video/graphics emulation - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 VIDEO_H -#define VIDEO_H - -extern bool VideoActivated(void); -extern bool VideoSnapshot(int xsize, int ysize, uint8 *p); - -extern int16 VideoDoDriverIO(uint32 spaceID, uint32 commandID, uint32 commandContents, uint32 commandCode, uint32 commandKind); - -// System specific and internal functions/data -struct VideoInfo { - int viType; // Screen/Window - uint32 viRowBytes; // width of each row in memory - uint16 viXsize,viYsize; // Window - uint32 viAppleMode; // Screen Color Depth - uint32 viAppleID; // Screen DisplayID -}; - -extern struct VideoInfo VModes[]; // List of available video modes - -enum { // viAppleMode - APPLE_1_BIT = 0x80, - APPLE_2_BIT, - APPLE_4_BIT, - APPLE_8_BIT, - APPLE_16_BIT, - APPLE_32_BIT -}; - -// 1, 2, 4 and 8 bit depths use a color palette -inline bool IsDirectMode(int mode) -{ - return mode == APPLE_16_BIT || mode == APPLE_32_BIT; -} - -// Return the depth code that corresponds to the specified bits-per-pixel value -inline int DepthModeForPixelDepth(int depth) -{ - switch (depth) { - case 1: return APPLE_1_BIT; - case 2: return APPLE_2_BIT; - case 4: return APPLE_4_BIT; - case 8: return APPLE_8_BIT; - case 15: case 16: return APPLE_16_BIT; - case 24: case 32: return APPLE_32_BIT; - default: return APPLE_1_BIT; - } -} - -// Return a bytes-per-row value (assuming no padding) for the specified depth and pixel width -inline uint32 TrivialBytesPerRow(uint32 width, int mode) -{ - switch (mode) { - case APPLE_1_BIT: return width / 8; - case APPLE_2_BIT: return width / 4; - case APPLE_4_BIT: return width / 2; - case APPLE_8_BIT: return width; - case APPLE_16_BIT: return width * 2; - case APPLE_32_BIT: return width * 4; - default: return width; - } -} - -enum { // viAppleID - APPLE_640x480 = 0x81, - APPLE_W_640x480, - APPLE_800x600, - APPLE_W_800x600, - APPLE_1024x768, - APPLE_1152x768, - APPLE_1152x900, - APPLE_1280x1024, - APPLE_1600x1200, - APPLE_CUSTOM, - APPLE_ID_MIN = APPLE_640x480, - APPLE_ID_MAX = APPLE_CUSTOM -}; - -enum { // Display type - DIS_INVALID, - DIS_SCREEN, - DIS_WINDOW -}; - -extern bool video_activated; // Flag: video display activated, mouse and keyboard data valid -extern uint32 screen_base; // Frame buffer base address -extern int cur_mode; // Number of current video mode (index in VModes array) -extern int display_type; // Current display type (see above) -extern rgb_color mac_pal[256]; -extern uint8 remap_mac_be[256]; -extern uint8 MacCursor[68]; - -struct VidLocals{ - uint16 saveMode; - uint32 saveData; - uint16 savePage; - uint32 saveBaseAddr; - uint32 gammaTable; // Mac address of gamma tble - uint32 maxGammaTableSize; // Biggest gamma table allocated - uint32 saveVidParms; - bool luminanceMapping; // Luminance mapping on/off - bool cursorHardware; // True if using hardware cursor - int32 cursorX; // Hardware cursor state - int32 cursorY; - uint32 cursorVisible; - uint32 cursorSet; - bool cursorHotFlag; - uint8 cursorHotX; - uint8 cursorHotY; - uint32 vslServiceID; // VSL interrupt service ID - bool interruptsEnabled; // VBL interrupts on/off - uint32 regEntryID; // Mac address of the service owner -}; - -extern VidLocals *private_data; // Pointer to driver local variables (there is only one display, so this is ok) - -extern bool VideoInit(void); -extern void VideoExit(void); -extern void VideoVBL(void); -extern void VideoInstallAccel(void); -extern void VideoQuitFullScreen(void); - -extern void video_set_palette(void); -extern void video_set_cursor(void); -extern bool video_can_change_cursor(void); -extern int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr); -extern void video_set_dirty_area(int x, int y, int w, int h); - -extern int16 VSLDoInterruptService(uint32 arg1); -extern void NQDMisc(uint32 arg1, uintptr arg2); - -// Native QuickDraw acceleration callbacks -extern bool NQD_sync_hook(uint32); -extern bool NQD_bitblt_hook(uint32); -extern bool NQD_fillrect_hook(uint32); -extern bool NQD_unknown_hook(uint32); -extern void NQD_bitblt(uint32); -extern void NQD_invrect(uint32); -extern void NQD_fillrect(uint32); - -extern bool keyfile_valid; - -#endif diff --git a/SheepShaver/src/include/video_defs.h b/SheepShaver/src/include/video_defs.h deleted file mode 100644 index ef9e2824c..000000000 --- a/SheepShaver/src/include/video_defs.h +++ /dev/null @@ -1,413 +0,0 @@ -/* - * video_defs.h - MacOS types and structures for video - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 VIDEO_DEFS_H -#define VIDEO_DEFS_H - -#include "macos_util.h" -#include - - -/* - * Definitions for Display Manager - */ - -/* csMode values describing pixel depth in VDSwitchInfo */ -enum { - firstVidMode=128, // first depth mode, representing lowest supported - // pixel depth - secondVidMode, thirdVidMode, fourthVidMode, fifthVidMode, sixthVidMode - // following modes represent pixel depths in ascending - // order -}; - -/* csDisplayType values in VDDisplayConnectInfoRec */ -enum { - kUnknownConnect=1, // reserved - kPanelTFTConnect, // fixed-in-place LCS (TFT, aka "active matrix") panels - kFixedModeCRTConnect, // very limited displays - kMultiModeCRT1Connect, // 12" optional, 13" default, 16" required - kMultiModeCRT2Connect, // 12" optional, 13" req., 16" def., 19" req. - kMultiModeCRT3Connect, // 12" optional, 13" req., 16" req., 19" req.,21" def. - kMultiModeCRT4Connect, // expansion to large multimode (not yet implemented) - kModelessConnect, // expansion to modeless model (not yet implemented) - kFullPageConnect, // 640x818 (to get 8bpp in 512K case) and - // 640x870 (nothing else supported) - kVGAConnect, // 640x480 VGA default -- nothing else req. - kNTSCConnect, // NTSC ST(default), FF, STconv, FFconv - kPALConnect, // PAL ST(default), FF, STconv, FFconv - kHRConnect, // 640x400 (to get 8bpp in 256K case) and - // 640x480 (nothing else supported) - kPanelFSTNConnect // fixed-in-place LCD FSTN (aka "supertwist") panels -}; - -/* csConnectFlags values in VDDisplayConnectInfoRec */ -enum { - kAllModesValid=0, // all display modes not deleted by PrimaryInit code - // are optional - kAllModesSafe, // all display modes not deleted by PrimaryInit code - // are required; is you set this bit, set the - // kAllModesValid bit, too - kHasDirectConnect=3, // for future expansions, setting this bit means that - // your driver can talk directly to the display - // (e.g. there is a serial data link via sense lines) - kIsMonoDev, // this display does not support color - kUncertainConnect // there may not be a display; Monitors control panel - // makes the user confirm some operations--like moving - // the menu bar-- when this bit is set -}; - -/* csTimingFormat value in VDTimingInfoRec */ -#define kDeclROMtables FOURCC('d','e','c','l') // use information in this record instead of looking - // in the decl. ROM for timing info; used for patching - // existing card without updating declaration ROM - -/* csTimingData values in VDTimingInfoRec */ -enum { - timingUnknown = 0, // unknown timing - timingApple_512x384_60hz = 130, /* 512x384 (60 Hz) Rubik timing. */ - timingApple_560x384_60hz = 135, /* 560x384 (60 Hz) Rubik-560 timing. */ - timingApple_640x480_67hz = 140, /* 640x480 (67 Hz) HR timing. */ - timingApple_640x400_67hz = 145, /* 640x400 (67 Hz) HR-400 timing. */ - timingVESA_640x480_60hz = 150, /* 640x480 (60 Hz) VGA timing. */ - timingVESA_640x480_72hz = 152, /* 640x480 (72 Hz) VGA timing. */ - timingVESA_640x480_75hz = 154, /* 640x480 (75 Hz) VGA timing. */ - timingVESA_640x480_85hz = 158, /* 640x480 (85 Hz) VGA timing. */ - timingGTF_640x480_120hz = 159, /* 640x480 (120 Hz) VESA Generalized Timing Formula */ - timingApple_640x870_75hz = 160, /* 640x870 (75 Hz) FPD timing.*/ - timingApple_640x818_75hz = 165, /* 640x818 (75 Hz) FPD-818 timing.*/ - timingApple_832x624_75hz = 170, /* 832x624 (75 Hz) GoldFish timing.*/ - timingVESA_800x600_56hz = 180, /* 800x600 (56 Hz) SVGA timing. */ - timingVESA_800x600_60hz = 182, /* 800x600 (60 Hz) SVGA timing. */ - timingVESA_800x600_72hz = 184, /* 800x600 (72 Hz) SVGA timing. */ - timingVESA_800x600_75hz = 186, /* 800x600 (75 Hz) SVGA timing. */ - timingVESA_800x600_85hz = 188, /* 800x600 (85 Hz) SVGA timing. */ - timingVESA_1024x768_60hz = 190, /* 1024x768 (60 Hz) VESA 1K-60Hz timing. */ - timingVESA_1024x768_70hz = 200, /* 1024x768 (70 Hz) VESA 1K-70Hz timing. */ - timingVESA_1024x768_75hz = 204, /* 1024x768 (75 Hz) VESA 1K-75Hz timing (very similar to timingApple_1024x768_75hz). */ - timingVESA_1024x768_85hz = 208, /* 1024x768 (85 Hz) VESA timing. */ - timingApple_1024x768_75hz = 210, /* 1024x768 (75 Hz) Apple 19" RGB. */ - timingApple_1152x870_75hz = 220, /* 1152x870 (75 Hz) Apple 21" RGB. */ - timingVESA_1280x960_75hz = 250, /* 1280x960 (75 Hz) */ - timingVESA_1280x960_60hz = 252, /* 1280x960 (60 Hz) */ - timingVESA_1280x960_85hz = 254, /* 1280x960 (85 Hz) */ - timingVESA_1280x1024_60hz = 260, /* 1280x1024 (60 Hz) */ - timingVESA_1280x1024_75hz = 262, /* 1280x1024 (75 Hz) */ - timingVESA_1280x1024_85hz = 268, /* 1280x1024 (85 Hz) */ - timingVESA_1600x1200_60hz = 280, /* 1600x1200 (60 Hz) VESA proposed timing. */ - timingVESA_1600x1200_65hz = 282, /* 1600x1200 (65 Hz) VESA proposed timing. */ - timingVESA_1600x1200_70hz = 284, /* 1600x1200 (70 Hz) VESA proposed timing. */ - timingVESA_1600x1200_75hz = 286, /* 1600x1200 (75 Hz) VESA proposed timing. */ - timingVESA_1600x1200_80hz = 288, /* 1600x1200 (80 Hz) VESA proposed timing (pixel clock is 216 Mhz dot clock). */ - timingSMPTE240M_60hz = 400, /* 60Hz V, 33.75KHz H, interlaced timing, 16:9 aspect, typical resolution of 1920x1035. */ - timingFilmRate_48hz = 410 /* 48Hz V, 25.20KHz H, non-interlaced timing, typical resolution of 640x480. */ -}; - -/* csTimingFlags values in VDTimingInfoRec */ -enum { - kModeValid=0, // this display mode is optional - kModeSafe, // this display mode is required; if you set this - // bit, you should also set the kModeValid bit - kModeDefault, // this display mode is the default for the attached - // display; if you set this bit, you should also set - // the kModeSafe and kModeValid bits - kShowModeNow, // show this mode in Monitors control panel; useful - // for SVGA modes - kModeNotResize, - kModeRequiresPan -}; - -/* code for Display Manager control request */ -enum { - cscReset=0, - cscKillIO, - cscSetMode, - cscSetEntries, - cscSetGamma, - cscGrayPage, - cscGrayScreen=5, - cscSetGray, - cscSetInterrupt, - cscDirectSetEntries, - cscSetDefaultMode, - cscSwitchMode, // switch to another display mode - cscSetSync, - cscSavePreferredConfiguration=16, - cscSetHardwareCursor=22, - cscDrawHardwareCursor, - cscSetConvolution, - cscSetPowerState, - cscPrivateControlCall, // Takes a VDPrivateSelectorDataRec - cscSetMultiConnect, // From a GDI point of view, this call should be implemented completely in the HAL and not at all in the core. - cscSetClutBehavior, // Takes a VDClutBehavior - cscUnusedCall=127 // This call used to expend the scrn resource. Its imbedded data contains more control info -}; - -/* Constants for the GetNextResolution call */ - -enum { - kDisplayModeIDCurrent = 0x00, /* Reference the Current DisplayModeID */ - kDisplayModeIDInvalid = (long)0xFFFFFFFF, /* A bogus DisplayModeID in all cases */ - kDisplayModeIDFindFirstResolution = (long)0xFFFFFFFE, /* Used in cscGetNextResolution to reset iterator */ - kDisplayModeIDNoMoreResolutions = (long)0xFFFFFFFD /* Used in cscGetNextResolution to indicate End Of List */ -}; - -/* codes for Display Manager status requests */ -enum { - cscGetMode=2, - cscGetEntries, - cscGetPageCnt, - cscGetPages=4, // This is what C&D 2 calls it. - cscGetPageBase, - cscGetBaseAddr=5, // This is what C&D 2 calls it. - cscGetGray, - cscGetInterrupt, - cscGetGamma, - cscGetDefaultMode, - cscGetCurMode, // save the current display mode - cscGetSync, - cscGetConnection, // return information about display capabilities of - // connected display - cscGetModeTiming, // return scan timings data for a display mode - cscGetModeBaseAddress, // Return base address information about a particular mode - cscGetScanProc, // QuickTime scan chasing routine - cscGetPreferredConfiguration, - cscGetNextResolution, - cscGetVideoParameters, - cscGetGammaInfoList =20, - cscRetrieveGammaTable, - cscSupportsHardwareCursor, - cscGetHardwareCursorDrawState, - cscGetConvolution, - cscGetPowerState, - cscPrivateStatusCall, // Takes a VDPrivateSelectorDataRec - cscGetDDCBlock, // Takes a VDDDCBlockRec - cscGetMultiConnect, // From a GDI point of view, this call should be implemented completely in the HAL and not at all in the core. - cscGetClutBehavior // Takes a VDClutBehavior -}; - -enum { // VDSwitchInfo struct - csMode = 0, - csData = 2, - csPage = 6, - csBaseAddr = 8 -}; - -enum { // VDSetEntry struct - csTable = 0, // Pointer to ColorSpec[] - csStart = 4, - csCount = 6 -}; - -enum { // VDGammaRecord - csGTable = 0 -}; - -enum { // ColorSpec table entry - csValue = 0, - csRed = 2, - csGreen = 4, - csBlue = 6 -}; - -enum { // VDVideoParametersInfo struct - csDisplayModeID = 0, - csDepthMode = 4, - csVPBlockPtr = 6, - csPageCount = 10, - csDeviceType = 14 -}; - -enum { // VPBlock struct - vpBaseOffset = 0, - vpRowBytes = 4, - vpBounds = 6, - vpVersion = 14, - vpPackType = 16, - vpPackSize = 18, - vpHRes = 22, - vpVRes = 26, - vpPixelType = 30, - vpPixelSize = 32, - vpCmpCount = 34, - vpCmpSize = 36, - vpPlaneBytes = 38 -}; - -enum { // VDDisplayConnectInfo struct - csDisplayType = 0, - csConnectTaggedType = 2, - csConnectTaggedData = 3, - csConnectFlags = 4, - csDisplayComponent = 8, - csConnectReserved = 12 -}; - -enum { // VDTimingInfo struct - csTimingMode = 0, - csTimingReserved = 4, - csTimingFormat = 8, - csTimingData = 12, - csTimingFlags = 16 -}; - -enum { // VDResolutionInfo struct - csPreviousDisplayModeID = 0, - csRIDisplayModeID = 4, - csHorizontalPixels = 8, - csVerticalLines = 12, - csRefreshRate = 16, - csMaxDepthMode = 20, - csResolutionFlags = 22 -}; - -enum { // VDDrawHardwareCursor/VDHardwareCursorDrawState struct - csCursorX = 0, - csCursorY = 4, - csCursorVisible = 8, - csCursorSet = 12 -}; - -enum { // struct GammaTbl - gVersion = 0, - gType = 2, - gFormulaSize = 4, - gChanCnt = 6, - gDataCnt = 8, - gDataWidth = 10, - gFormulaData = 12, // variable size - SIZEOF_GammaTbl = 12 -}; - -enum { - kCursorImageMajorVersion = 0x0001, - kCursorImageMinorVersion = 0x0000 -}; - -enum { // CursorImage struct - ciMajorVersion = 0, - ciMinorVersion = 2, - ciCursorPixMap = 4, // Handle to PixMap - ciCursorBitMask = 8 // Handle to BitMap -}; - - -/* - * Structures for graphics acceleration - */ - -typedef uint32 CTabHandle; - -// Parameter block passed to acceleration hooks -struct accl_params { - uint32 unknown0[3]; - - uint32 transfer_mode; - uint32 pen_mode; - - uint32 unknown1[2]; - - uint32 fore_pen; - uint32 back_pen; - - uint32 unknown2[3]; - - uint32 src_base_addr; - int32 src_row_bytes; - int16 src_bounds[4]; - uint32 src_unknown1; - uint32 src_pixel_type; - uint32 src_pixel_size; - uint32 src_cmp_count; - uint32 src_cmp_size; - CTabHandle src_pm_table; - uint32 src_unknown2; - uint32 src_unknown3; - uint32 src_unknown4; - - uint32 dest_base_addr; - int32 dest_row_bytes; - int16 dest_bounds[4]; - uint32 dest_unknown1; - uint32 dest_pixel_type; - uint32 dest_pixel_size; - uint32 dest_cmp_count; - uint32 dest_cmp_size; - CTabHandle dest_pm_table; - uint32 dest_unknown2; - uint32 dest_unknown3; - uint32 dest_unknown4; - - uint32 unknown3[13]; - - int16 src_rect[4]; - int16 dest_rect[4]; - - uint32 unknown4[38]; - - uint32 draw_proc; - // Argument for accl_sync_hook at offset 0x4f8 -}; - -enum { - acclTransferMode = offsetof(accl_params, transfer_mode), - acclPenMode = offsetof(accl_params, pen_mode), - acclForePen = offsetof(accl_params, fore_pen), - acclBackPen = offsetof(accl_params, back_pen), - acclSrcBaseAddr = offsetof(accl_params, src_base_addr), - acclSrcRowBytes = offsetof(accl_params, src_row_bytes), - acclSrcBoundsRect = offsetof(accl_params, src_bounds), - acclSrcPixelType = offsetof(accl_params, src_pixel_type), - acclSrcPixelSize = offsetof(accl_params, src_pixel_size), - acclSrcCmpCount = offsetof(accl_params, src_cmp_count), - acclSrcCmpSize = offsetof(accl_params, src_cmp_size), - acclSrcPMTable = offsetof(accl_params, src_pm_table), - acclDestBaseAddr = offsetof(accl_params, dest_base_addr), - acclDestRowBytes = offsetof(accl_params, dest_row_bytes), - acclDestBoundsRect = offsetof(accl_params, dest_bounds), - acclDestPixelType = offsetof(accl_params, dest_pixel_type), - acclDestPixelSize = offsetof(accl_params, dest_pixel_size), - acclDestCmpCount = offsetof(accl_params, dest_cmp_count), - acclDestCmpSize = offsetof(accl_params, dest_cmp_size), - acclDestPMTable = offsetof(accl_params, dest_pm_table), - acclSrcRect = offsetof(accl_params, src_rect), - acclDestRect = offsetof(accl_params, dest_rect), - acclDrawProc = offsetof(accl_params, draw_proc) -}; - -// Hook info for NQDMisc -struct accl_hook_info { - uint32 draw_func; - uint32 sync_func; - uint32 code; -}; - -// Hook function index -enum { - ACCL_BITBLT, - ACCL_BLTMASK, - ACCL_FILLRECT, - ACCL_FILLMASK - // 4: bitblt - // 5: lines - // 6: fill -}; - -#endif diff --git a/SheepShaver/src/include/xlowmem.h b/SheepShaver/src/include/xlowmem.h deleted file mode 100644 index c986d73d4..000000000 --- a/SheepShaver/src/include/xlowmem.h +++ /dev/null @@ -1,66 +0,0 @@ -/* - * xlowmem.h - Definitions for extra Low Memory globals (0x2800..) - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 XLOWMEM_H -#define XLOWMEM_H - -// Modes for XLM_RUN_MODE -#define MODE_68K 0 // 68k emulator active -#define MODE_NATIVE 1 // Switched to native mode -#define MODE_EMUL_OP 2 // 68k emulator active, within EMUL_OP routine - -#define XLM_SIGNATURE 0x2800 // SheepShaver signature -#define XLM_KERNEL_DATA 0x2804 // Pointer to Kernel Data -#define XLM_TOC 0x2808 // TOC pointer of emulator -#define XLM_SHEEP_OBJ 0x280c // Pointer to SheepShaver object -#define XLM_RUN_MODE 0x2810 // Current run mode, see enum above -#define XLM_68K_R25 0x2814 // Contents of the 68k emulator's r25 (which contains the interrupt level), saved upon entering EMUL_OP mode, used by Execute68k() and the USR1 signal handler -#define XLM_IRQ_NEST 0x2818 // Interrupt disable nesting counter (>0: disabled) -#define XLM_PVR 0x281c // Theoretical PVR -#define XLM_BUS_CLOCK 0x2820 // Bus clock speed in Hz (for DriverServicesLib patch) -#define XLM_EMUL_RETURN_PROC 0x2824 // Pointer to EMUL_RETURN routine -#define XLM_EXEC_RETURN_PROC 0x2828 // Pointer to EXEC_RETURN routine -#define XLM_EMUL_OP_PROC 0x282c // Pointer to EMUL_OP routine -#define XLM_EMUL_RETURN_STACK 0x2830 // Stack pointer for EMUL_RETURN -#define XLM_RES_LIB_TOC 0x2834 // TOC pointer of Resources library -#define XLM_GET_RESOURCE 0x2838 // Pointer to native GetResource() routine -#define XLM_GET_1_RESOURCE 0x283c // Pointer to native Get1Resource() routine -#define XLM_GET_IND_RESOURCE 0x2840 // Pointer to native GetIndResource() routine -#define XLM_GET_1_IND_RESOURCE 0x2844 // Pointer to native Get1IndResource() routine -#define XLM_R_GET_RESOURCE 0x2848 // Pointer to native RGetResource() routine -#define XLM_EXEC_RETURN_OPCODE 0x284c // EXEC_RETURN opcode for Execute68k() -#define XLM_ZERO_PAGE 0x2850 // Pointer to read-only page with all bits set to 0 -#define XLM_R13 0x2854 // Pointer to .sdata section (Linux) -#define XLM_GET_NAMED_RESOURCE 0x2858 // Pointer to native GetNamedResource() routine -#define XLM_GET_1_NAMED_RESOURCE 0x285c // Pointer to native Get1NamedResource() routine - -#define XLM_ETHER_AO_GET_HWADDR 0x28b0 // Pointer to ethernet A0_get_ethernet_address() function -#define XLM_ETHER_AO_ADD_MULTI 0x28b4 // Pointer to ethernet A0_enable_multicast() function -#define XLM_ETHER_AO_DEL_MULTI 0x28b8 // Pointer to ethernet A0_disable_multicast() function -#define XLM_ETHER_AO_SEND_PACKET 0x28bc // Pointer to ethernet A0_transmit_packet() function -#define XLM_ETHER_INIT 0x28c0 // Pointer to ethernet InitStreamModule() function -#define XLM_ETHER_TERM 0x28c4 // Pointer to ethernet TerminateStreamModule() function -#define XLM_ETHER_OPEN 0x28c8 // Pointer to ethernet ether_open() function -#define XLM_ETHER_CLOSE 0x28cc // Pointer to ethernet ether_close() function -#define XLM_ETHER_WPUT 0x28d0 // Pointer to ethernet ether_wput() function -#define XLM_ETHER_RSRV 0x28d4 // Pointer to ethernet ether_rsrv() function -#define XLM_VIDEO_DOIO 0x28d8 // Pointer to video DoDriverIO() function - -#endif diff --git a/SheepShaver/src/include/xpram.h b/SheepShaver/src/include/xpram.h deleted file mode 120000 index 382aa791e..000000000 --- a/SheepShaver/src/include/xpram.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/include/xpram.h \ No newline at end of file diff --git a/SheepShaver/src/kpx_cpu/dis-asm.h b/SheepShaver/src/kpx_cpu/dis-asm.h deleted file mode 100644 index 639ace1a4..000000000 --- a/SheepShaver/src/kpx_cpu/dis-asm.h +++ /dev/null @@ -1,483 +0,0 @@ -/* Interface between the opcode library and its callers. - Written by Cygnus Support, 1993. - - The opcode library (libopcodes.a) provides instruction decoders for - a large variety of instruction sets, callable with an identical - interface, for making instruction-processing programs more independent - of the instruction set being processed. */ - -#ifndef DIS_ASM_H -#define DIS_ASM_H - -#include -#include - -typedef int (*fprintf_function)(FILE *f, const char *fmt, ...); - -typedef void *PTR; -typedef uint64_t bfd_vma; -typedef int64_t bfd_signed_vma; -typedef uint8_t bfd_byte; -#define sprintf_vma(s,x) sprintf (s, "%0" PRIx64, x) -#define snprintf_vma(s,ss,x) snprintf (s, ss, "%0" PRIx64, x) - -#define BFD64 - -enum bfd_flavour { - bfd_target_unknown_flavour, - bfd_target_aout_flavour, - bfd_target_coff_flavour, - bfd_target_ecoff_flavour, - bfd_target_elf_flavour, - bfd_target_ieee_flavour, - bfd_target_nlm_flavour, - bfd_target_oasys_flavour, - bfd_target_tekhex_flavour, - bfd_target_srec_flavour, - bfd_target_ihex_flavour, - bfd_target_som_flavour, - bfd_target_os9k_flavour, - bfd_target_versados_flavour, - bfd_target_msdos_flavour, - bfd_target_evax_flavour -}; - -enum bfd_endian { BFD_ENDIAN_BIG, BFD_ENDIAN_LITTLE, BFD_ENDIAN_UNKNOWN }; - -enum bfd_architecture -{ - bfd_arch_unknown, /* File arch not known */ - bfd_arch_obscure, /* Arch known, not one of these */ - bfd_arch_m68k, /* Motorola 68xxx */ -#define bfd_mach_m68000 1 -#define bfd_mach_m68008 2 -#define bfd_mach_m68010 3 -#define bfd_mach_m68020 4 -#define bfd_mach_m68030 5 -#define bfd_mach_m68040 6 -#define bfd_mach_m68060 7 -#define bfd_mach_cpu32 8 -#define bfd_mach_mcf5200 9 -#define bfd_mach_mcf5206e 10 -#define bfd_mach_mcf5307 11 -#define bfd_mach_mcf5407 12 -#define bfd_mach_mcf528x 13 -#define bfd_mach_mcfv4e 14 -#define bfd_mach_mcf521x 15 -#define bfd_mach_mcf5249 16 -#define bfd_mach_mcf547x 17 -#define bfd_mach_mcf548x 18 - bfd_arch_vax, /* DEC Vax */ - bfd_arch_i960, /* Intel 960 */ - /* The order of the following is important. - lower number indicates a machine type that - only accepts a subset of the instructions - available to machines with higher numbers. - The exception is the "ca", which is - incompatible with all other machines except - "core". */ - -#define bfd_mach_i960_core 1 -#define bfd_mach_i960_ka_sa 2 -#define bfd_mach_i960_kb_sb 3 -#define bfd_mach_i960_mc 4 -#define bfd_mach_i960_xa 5 -#define bfd_mach_i960_ca 6 -#define bfd_mach_i960_jx 7 -#define bfd_mach_i960_hx 8 - - bfd_arch_a29k, /* AMD 29000 */ - bfd_arch_sparc, /* SPARC */ -#define bfd_mach_sparc 1 -/* The difference between v8plus and v9 is that v9 is a true 64 bit env. */ -#define bfd_mach_sparc_sparclet 2 -#define bfd_mach_sparc_sparclite 3 -#define bfd_mach_sparc_v8plus 4 -#define bfd_mach_sparc_v8plusa 5 /* with ultrasparc add'ns. */ -#define bfd_mach_sparc_sparclite_le 6 -#define bfd_mach_sparc_v9 7 -#define bfd_mach_sparc_v9a 8 /* with ultrasparc add'ns. */ -#define bfd_mach_sparc_v8plusb 9 /* with cheetah add'ns. */ -#define bfd_mach_sparc_v9b 10 /* with cheetah add'ns. */ -/* Nonzero if MACH has the v9 instruction set. */ -#define bfd_mach_sparc_v9_p(mach) \ - ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \ - && (mach) != bfd_mach_sparc_sparclite_le) - bfd_arch_mips, /* MIPS Rxxxx */ -#define bfd_mach_mips3000 3000 -#define bfd_mach_mips3900 3900 -#define bfd_mach_mips4000 4000 -#define bfd_mach_mips4010 4010 -#define bfd_mach_mips4100 4100 -#define bfd_mach_mips4300 4300 -#define bfd_mach_mips4400 4400 -#define bfd_mach_mips4600 4600 -#define bfd_mach_mips4650 4650 -#define bfd_mach_mips5000 5000 -#define bfd_mach_mips6000 6000 -#define bfd_mach_mips8000 8000 -#define bfd_mach_mips10000 10000 -#define bfd_mach_mips16 16 - bfd_arch_i386, /* Intel 386 */ -#define bfd_mach_i386_i386 0 -#define bfd_mach_i386_i8086 1 -#define bfd_mach_i386_i386_intel_syntax 2 -#define bfd_mach_x86_64 3 -#define bfd_mach_x86_64_intel_syntax 4 - bfd_arch_we32k, /* AT&T WE32xxx */ - bfd_arch_tahoe, /* CCI/Harris Tahoe */ - bfd_arch_i860, /* Intel 860 */ - bfd_arch_romp, /* IBM ROMP PC/RT */ - bfd_arch_alliant, /* Alliant */ - bfd_arch_convex, /* Convex */ - bfd_arch_m88k, /* Motorola 88xxx */ - bfd_arch_pyramid, /* Pyramid Technology */ - bfd_arch_h8300, /* Hitachi H8/300 */ -#define bfd_mach_h8300 1 -#define bfd_mach_h8300h 2 -#define bfd_mach_h8300s 3 - bfd_arch_powerpc, /* PowerPC */ -#define bfd_mach_ppc 0 -#define bfd_mach_ppc64 1 -#define bfd_mach_ppc_403 403 -#define bfd_mach_ppc_403gc 4030 -#define bfd_mach_ppc_e500 500 -#define bfd_mach_ppc_505 505 -#define bfd_mach_ppc_601 601 -#define bfd_mach_ppc_602 602 -#define bfd_mach_ppc_603 603 -#define bfd_mach_ppc_ec603e 6031 -#define bfd_mach_ppc_604 604 -#define bfd_mach_ppc_620 620 -#define bfd_mach_ppc_630 630 -#define bfd_mach_ppc_750 750 -#define bfd_mach_ppc_860 860 -#define bfd_mach_ppc_a35 35 -#define bfd_mach_ppc_rs64ii 642 -#define bfd_mach_ppc_rs64iii 643 -#define bfd_mach_ppc_7400 7400 - bfd_arch_rs6000, /* IBM RS/6000 */ - bfd_arch_hppa, /* HP PA RISC */ -#define bfd_mach_hppa10 10 -#define bfd_mach_hppa11 11 -#define bfd_mach_hppa20 20 -#define bfd_mach_hppa20w 25 - bfd_arch_d10v, /* Mitsubishi D10V */ - bfd_arch_z8k, /* Zilog Z8000 */ -#define bfd_mach_z8001 1 -#define bfd_mach_z8002 2 - bfd_arch_h8500, /* Hitachi H8/500 */ - bfd_arch_sh, /* Hitachi SH */ -#define bfd_mach_sh 1 -#define bfd_mach_sh2 0x20 -#define bfd_mach_sh_dsp 0x2d -#define bfd_mach_sh2a 0x2a -#define bfd_mach_sh2a_nofpu 0x2b -#define bfd_mach_sh2e 0x2e -#define bfd_mach_sh3 0x30 -#define bfd_mach_sh3_nommu 0x31 -#define bfd_mach_sh3_dsp 0x3d -#define bfd_mach_sh3e 0x3e -#define bfd_mach_sh4 0x40 -#define bfd_mach_sh4_nofpu 0x41 -#define bfd_mach_sh4_nommu_nofpu 0x42 -#define bfd_mach_sh4a 0x4a -#define bfd_mach_sh4a_nofpu 0x4b -#define bfd_mach_sh4al_dsp 0x4d -#define bfd_mach_sh5 0x50 - bfd_arch_alpha, /* Dec Alpha */ -#define bfd_mach_alpha 1 -#define bfd_mach_alpha_ev4 0x10 -#define bfd_mach_alpha_ev5 0x20 -#define bfd_mach_alpha_ev6 0x30 - bfd_arch_arm, /* Advanced Risc Machines ARM */ -#define bfd_mach_arm_unknown 0 -#define bfd_mach_arm_2 1 -#define bfd_mach_arm_2a 2 -#define bfd_mach_arm_3 3 -#define bfd_mach_arm_3M 4 -#define bfd_mach_arm_4 5 -#define bfd_mach_arm_4T 6 -#define bfd_mach_arm_5 7 -#define bfd_mach_arm_5T 8 -#define bfd_mach_arm_5TE 9 -#define bfd_mach_arm_XScale 10 -#define bfd_mach_arm_ep9312 11 -#define bfd_mach_arm_iWMMXt 12 -#define bfd_mach_arm_iWMMXt2 13 - bfd_arch_ns32k, /* National Semiconductors ns32000 */ - bfd_arch_w65, /* WDC 65816 */ - bfd_arch_tic30, /* Texas Instruments TMS320C30 */ - bfd_arch_v850, /* NEC V850 */ -#define bfd_mach_v850 0 - bfd_arch_arc, /* Argonaut RISC Core */ -#define bfd_mach_arc_base 0 - bfd_arch_m32r, /* Mitsubishi M32R/D */ -#define bfd_mach_m32r 0 /* backwards compatibility */ - bfd_arch_mn10200, /* Matsushita MN10200 */ - bfd_arch_mn10300, /* Matsushita MN10300 */ - bfd_arch_cris, /* Axis CRIS */ -#define bfd_mach_cris_v0_v10 255 -#define bfd_mach_cris_v32 32 -#define bfd_mach_cris_v10_v32 1032 - bfd_arch_microblaze, /* Xilinx MicroBlaze. */ - bfd_arch_ia64, /* HP/Intel ia64 */ -#define bfd_mach_ia64_elf64 64 -#define bfd_mach_ia64_elf32 32 - bfd_arch_last - }; -#define bfd_mach_s390_31 31 -#define bfd_mach_s390_64 64 - -typedef struct symbol_cache_entry -{ - const char *name; - union - { - PTR p; - bfd_vma i; - } udata; -} asymbol; - -enum dis_insn_type { - dis_noninsn, /* Not a valid instruction */ - dis_nonbranch, /* Not a branch instruction */ - dis_branch, /* Unconditional branch */ - dis_condbranch, /* Conditional branch */ - dis_jsr, /* Jump to subroutine */ - dis_condjsr, /* Conditional jump to subroutine */ - dis_dref, /* Data reference instruction */ - dis_dref2 /* Two data references in instruction */ -}; - -/* This struct is passed into the instruction decoding routine, - and is passed back out into each callback. The various fields are used - for conveying information from your main routine into your callbacks, - for passing information into the instruction decoders (such as the - addresses of the callback functions), or for passing information - back from the instruction decoders to their callers. - - It must be initialized before it is first passed; this can be done - by hand, or using one of the initialization macros below. */ - -typedef struct disassemble_info { - fprintf_function fprintf_func; - FILE *stream; - PTR application_data; - - /* Target description. We could replace this with a pointer to the bfd, - but that would require one. There currently isn't any such requirement - so to avoid introducing one we record these explicitly. */ - /* The bfd_flavour. This can be bfd_target_unknown_flavour. */ - enum bfd_flavour flavour; - /* The bfd_arch value. */ - enum bfd_architecture arch; - /* The bfd_mach value. */ - unsigned long mach; - /* Endianness (for bi-endian cpus). Mono-endian cpus can ignore this. */ - enum bfd_endian endian; - - /* An array of pointers to symbols either at the location being disassembled - or at the start of the function being disassembled. The array is sorted - so that the first symbol is intended to be the one used. The others are - present for any misc. purposes. This is not set reliably, but if it is - not NULL, it is correct. */ - asymbol **symbols; - /* Number of symbols in array. */ - int num_symbols; - - /* For use by the disassembler. - The top 16 bits are reserved for public use (and are documented here). - The bottom 16 bits are for the internal use of the disassembler. */ - unsigned long flags; -#define INSN_HAS_RELOC 0x80000000 - PTR private_data; - - /* Function used to get bytes to disassemble. MEMADDR is the - address of the stuff to be disassembled, MYADDR is the address to - put the bytes in, and LENGTH is the number of bytes to read. - INFO is a pointer to this struct. - Returns an errno value or 0 for success. */ - int (*read_memory_func) - (bfd_vma memaddr, bfd_byte *myaddr, int length, - struct disassemble_info *info); - - /* Function which should be called if we get an error that we can't - recover from. STATUS is the errno value from read_memory_func and - MEMADDR is the address that we were trying to read. INFO is a - pointer to this struct. */ - void (*memory_error_func) - (int status, bfd_vma memaddr, struct disassemble_info *info); - - /* Function called to print ADDR. */ - void (*print_address_func) - (bfd_vma addr, struct disassemble_info *info); - - /* Function called to determine if there is a symbol at the given ADDR. - If there is, the function returns 1, otherwise it returns 0. - This is used by ports which support an overlay manager where - the overlay number is held in the top part of an address. In - some circumstances we want to include the overlay number in the - address, (normally because there is a symbol associated with - that address), but sometimes we want to mask out the overlay bits. */ - int (* symbol_at_address_func) - (bfd_vma addr, struct disassemble_info * info); - - /* These are for buffer_read_memory. */ - bfd_byte *buffer; - bfd_vma buffer_vma; - int buffer_length; - - /* This variable may be set by the instruction decoder. It suggests - the number of bytes objdump should display on a single line. If - the instruction decoder sets this, it should always set it to - the same value in order to get reasonable looking output. */ - int bytes_per_line; - - /* the next two variables control the way objdump displays the raw data */ - /* For example, if bytes_per_line is 8 and bytes_per_chunk is 4, the */ - /* output will look like this: - 00: 00000000 00000000 - with the chunks displayed according to "display_endian". */ - int bytes_per_chunk; - enum bfd_endian display_endian; - - /* Results from instruction decoders. Not all decoders yet support - this information. This info is set each time an instruction is - decoded, and is only valid for the last such instruction. - - To determine whether this decoder supports this information, set - insn_info_valid to 0, decode an instruction, then check it. */ - - char insn_info_valid; /* Branch info has been set. */ - char branch_delay_insns; /* How many sequential insn's will run before - a branch takes effect. (0 = normal) */ - char data_size; /* Size of data reference in insn, in bytes */ - enum dis_insn_type insn_type; /* Type of instruction */ - bfd_vma target; /* Target address of branch or dref, if known; - zero if unknown. */ - bfd_vma target2; /* Second target address for dref2 */ - - /* Command line options specific to the target disassembler. */ - char * disassembler_options; - -} disassemble_info; - - -/* Standard disassemblers. Disassemble one instruction at the given - target address. Return number of bytes processed. */ -typedef int (*disassembler_ftype) (bfd_vma, disassemble_info *); - -int print_insn_tci(bfd_vma, disassemble_info*); -int print_insn_big_mips (bfd_vma, disassemble_info*); -int print_insn_little_mips (bfd_vma, disassemble_info*); -int print_insn_i386 (bfd_vma, disassemble_info*); -int print_insn_m68k (bfd_vma, disassemble_info*); -int print_insn_z8001 (bfd_vma, disassemble_info*); -int print_insn_z8002 (bfd_vma, disassemble_info*); -int print_insn_h8300 (bfd_vma, disassemble_info*); -int print_insn_h8300h (bfd_vma, disassemble_info*); -int print_insn_h8300s (bfd_vma, disassemble_info*); -int print_insn_h8500 (bfd_vma, disassemble_info*); -int print_insn_alpha (bfd_vma, disassemble_info*); -disassembler_ftype arc_get_disassembler (int, int); -int print_insn_arm (bfd_vma, disassemble_info*); -int print_insn_sparc (bfd_vma, disassemble_info*); -int print_insn_big_a29k (bfd_vma, disassemble_info*); -int print_insn_little_a29k (bfd_vma, disassemble_info*); -int print_insn_i960 (bfd_vma, disassemble_info*); -int print_insn_sh (bfd_vma, disassemble_info*); -int print_insn_shl (bfd_vma, disassemble_info*); -int print_insn_hppa (bfd_vma, disassemble_info*); -int print_insn_m32r (bfd_vma, disassemble_info*); -int print_insn_m88k (bfd_vma, disassemble_info*); -int print_insn_mn10200 (bfd_vma, disassemble_info*); -int print_insn_mn10300 (bfd_vma, disassemble_info*); -int print_insn_ns32k (bfd_vma, disassemble_info*); -int print_insn_big_powerpc (bfd_vma, disassemble_info*); -int print_insn_little_powerpc (bfd_vma, disassemble_info*); -int print_insn_rs6000 (bfd_vma, disassemble_info*); -int print_insn_w65 (bfd_vma, disassemble_info*); -int print_insn_d10v (bfd_vma, disassemble_info*); -int print_insn_v850 (bfd_vma, disassemble_info*); -int print_insn_tic30 (bfd_vma, disassemble_info*); -int print_insn_ppc (bfd_vma, disassemble_info*); -int print_insn_s390 (bfd_vma, disassemble_info*); -int print_insn_crisv32 (bfd_vma, disassemble_info*); -int print_insn_crisv10 (bfd_vma, disassemble_info*); -int print_insn_microblaze (bfd_vma, disassemble_info*); -int print_insn_ia64 (bfd_vma, disassemble_info*); - -#if 0 -/* Fetch the disassembler for a given BFD, if that support is available. */ -disassembler_ftype disassembler(bfd *); -#endif - - -/* This block of definitions is for particular callers who read instructions - into a buffer before calling the instruction decoder. */ - -/* Here is a function which callers may wish to use for read_memory_func. - It gets bytes from a buffer. */ -int buffer_read_memory(bfd_vma, bfd_byte *, int, struct disassemble_info *); - -/* This function goes with buffer_read_memory. - It prints a message using info->fprintf_func and info->stream. */ -void perror_memory(int, bfd_vma, struct disassemble_info *); - - -/* Just print the address in hex. This is included for completeness even - though both GDB and objdump provide their own (to print symbolic - addresses). */ -void generic_print_address(bfd_vma, struct disassemble_info *); - -/* Always true. */ -int generic_symbol_at_address(bfd_vma, struct disassemble_info *); - -/* Macro to initialize a disassemble_info struct. This should be called - by all applications creating such a struct. */ -#define INIT_DISASSEMBLE_INFO(INFO, STREAM, FPRINTF_FUNC) \ - (INFO).flavour = bfd_target_unknown_flavour, \ - (INFO).arch = bfd_arch_unknown, \ - (INFO).mach = 0, \ - (INFO).endian = BFD_ENDIAN_UNKNOWN, \ - INIT_DISASSEMBLE_INFO_NO_ARCH(INFO, STREAM, FPRINTF_FUNC) - -/* Call this macro to initialize only the internal variables for the - disassembler. Architecture dependent things such as byte order, or machine - variant are not touched by this macro. This makes things much easier for - GDB which must initialize these things separately. */ - -#define INIT_DISASSEMBLE_INFO_NO_ARCH(INFO, STREAM, FPRINTF_FUNC) \ - (INFO).fprintf_func = (FPRINTF_FUNC), \ - (INFO).stream = (STREAM), \ - (INFO).symbols = NULL, \ - (INFO).num_symbols = 0, \ - (INFO).private_data = NULL, \ - (INFO).buffer = NULL, \ - (INFO).buffer_vma = 0, \ - (INFO).buffer_length = 0, \ - (INFO).read_memory_func = buffer_read_memory, \ - (INFO).memory_error_func = perror_memory, \ - (INFO).print_address_func = generic_print_address, \ - (INFO).symbol_at_address_func = generic_symbol_at_address, \ - (INFO).flags = 0, \ - (INFO).bytes_per_line = 0, \ - (INFO).bytes_per_chunk = 0, \ - (INFO).display_endian = BFD_ENDIAN_UNKNOWN, \ - (INFO).disassembler_options = NULL, \ - (INFO).insn_info_valid = 0 - -#define _(x) x -#define ATTRIBUTE_UNUSED __attribute__((unused)) - -/* from libbfd */ - -bfd_vma bfd_getl64 (const bfd_byte *addr); -bfd_vma bfd_getl32 (const bfd_byte *addr); -bfd_vma bfd_getb32 (const bfd_byte *addr); -bfd_vma bfd_getl16 (const bfd_byte *addr); -bfd_vma bfd_getb16 (const bfd_byte *addr); -typedef int bfd_boolean; - -#endif /* ! defined (DIS_ASM_H) */ diff --git a/SheepShaver/src/kpx_cpu/include/a.out-defs.h b/SheepShaver/src/kpx_cpu/include/a.out-defs.h deleted file mode 100644 index d876677ae..000000000 --- a/SheepShaver/src/kpx_cpu/include/a.out-defs.h +++ /dev/null @@ -1,443 +0,0 @@ -/* a.out.h - - Copyright 1997, 1998, 1999, 2001 Red Hat, Inc. - -This file is part of Cygwin. - -This software is a copyrighted work licensed under the terms of the -Cygwin license. Please consult the file "CYGWIN_LICENSE" for -details. */ - -#ifndef _A_OUT_H_ -#define _A_OUT_H_ - -#ifdef __cplusplus -extern "C" { -#endif -#define COFF_IMAGE_WITH_PE -#define COFF_LONG_SECTION_NAMES - -/*** coff information for Intel 386/486. */ - - -/********************** FILE HEADER **********************/ - -struct external_filehdr { - int16_t f_magic; /* magic number */ - int16_t f_nscns; /* number of sections */ - uint32_t f_timdat; /* time & date stamp */ - uint32_t f_symptr; /* file pointer to symtab */ - uint32_t f_nsyms; /* number of symtab entries */ - int16_t f_opthdr; /* sizeof(optional hdr) */ - int16_t f_flags; /* flags */ -}; - -/* Bits for f_flags: - * F_RELFLG relocation info stripped from file - * F_EXEC file is executable (no unresolved external references) - * F_LNNO line numbers stripped from file - * F_LSYMS local symbols stripped from file - * F_AR32WR file has byte ordering of an AR32WR machine (e.g. vax) - */ - -#define F_RELFLG (0x0001) -#define F_EXEC (0x0002) -#define F_LNNO (0x0004) -#define F_LSYMS (0x0008) - - - -#define I386MAGIC 0x14c -#define I386PTXMAGIC 0x154 -#define I386AIXMAGIC 0x175 - -/* This is Lynx's all-platform magic number for executables. */ - -#define LYNXCOFFMAGIC 0415 - -#define I386BADMAG(x) (((x).f_magic != I386MAGIC) \ - && (x).f_magic != I386AIXMAGIC \ - && (x).f_magic != I386PTXMAGIC \ - && (x).f_magic != LYNXCOFFMAGIC) - -#define FILHDR struct external_filehdr -#define FILHSZ 20 - - -/********************** AOUT "OPTIONAL HEADER"= - **********************/ - - -typedef struct -{ - uint16_t magic; /* type of file */ - uint16_t vstamp; /* version stamp */ - uint32_t tsize; /* text size in bytes, padded to FW bdry*/ - uint32_t dsize; /* initialized data " " */ - uint32_t bsize; /* uninitialized data " " */ - uint32_t entry; /* entry pt. */ - uint32_t text_start; /* base of text used for this file */ - uint32_t data_start; /* base of data used for this file= - */ -} -AOUTHDR; - -#define AOUTSZ 28 -#define AOUTHDRSZ 28 - -#define OMAGIC 0404 /* object files, eg as output */ -#define ZMAGIC 0413 /* demand load format, eg normal ld output */ -#define STMAGIC 0401 /* target shlib */ -#define SHMAGIC 0443 /* host shlib */ - - -/* define some NT default values */ -/* #define NT_IMAGE_BASE 0x400000 moved to internal.h */ -#define NT_SECTION_ALIGNMENT 0x1000 -#define NT_FILE_ALIGNMENT 0x200 -#define NT_DEF_RESERVE 0x100000 -#define NT_DEF_COMMIT 0x1000 - -/********************** SECTION HEADER **********************/ - - -struct external_scnhdr { - char s_name[8]; /* section name */ - uint32_t s_paddr; /* physical address, offset - of last addr in scn */ - uint32_t s_vaddr; /* virtual address */ - uint32_t s_size; /* section size */ - uint32_t s_scnptr; /* file ptr to raw data for section */ - uint32_t s_relptr; /* file ptr to relocation */ - uint32_t s_lnnoptr; /* file ptr to line numbers */ - uint16_t s_nreloc; /* number of relocation entries */ - uint16_t s_nlnno; /* number of line number entries*/ - uint32_t s_flags; /* flags */ -}; - -#define SCNHDR struct external_scnhdr -#define SCNHSZ 40 - -/* - * names of "special" sections - */ -#define _TEXT ".text" -#define _DATA ".data" -#define _BSS ".bss" -#define _COMMENT ".comment" -#define _LIB ".lib" - -/********************** LINE NUMBERS **********************/ - -/* 1 line number entry for every "breakpointable" source line in a section. - * Line numbers are grouped on a per function basis; first entry in a function - * grouping will have l_lnno = 0 and in place of physical address will be the - * symbol table index of the function name. - */ -struct external_lineno { - union { - uint32_t l_symndx; /* function name symbol index, iff l_lnno 0 */ - uint32_t l_paddr; /* (physical) address of line number */ - } l_addr; - uint16_t l_lnno; /* line number */ -}; - -#define LINENO struct external_lineno -#define LINESZ 6 - -/********************** SYMBOLS **********************/ - -#define E_SYMNMLEN 8 /* # characters in a symbol name */ -#define E_FILNMLEN 14 /* # characters in a file name */ -#define E_DIMNUM 4 /* # array dimensions in auxiliary entry */ - -struct external_syment -{ - union { - char e_name[E_SYMNMLEN]; - struct { - uint32_t e_zeroes; - uint32_t e_offset; - } e; - } e; - uint32_t e_value; - uint16_t e_scnum; - uint16_t e_type; - char e_sclass[1]; - char e_numaux[1]; -} __attribute__((packed)); - -#ifndef _WIN32 -#define N_BTMASK (0xf) -#define N_TMASK (0x30) -#define N_BTSHFT (4) -#define N_TSHIFT (2) -#endif - -union external_auxent { - struct { - uint32_t x_tagndx; /* str, un, or enum tag indx */ - union { - struct { - uint16_t x_lnno; /* declaration line number */ - uint16_t x_size; /* str/union/array size */ - } x_lnsz; - uint32_t x_fsize; /* size of function */ - } x_misc; - union { - struct { /* if ISFCN, tag, or .bb */ - uint32_t x_lnnoptr; /* ptr to fcn line # */ - uint32_t x_endndx; /* entry ndx past block end */ - } x_fcn; - struct { /* if ISARY, up to 4 dimen. */ - char x_dimen[E_DIMNUM][2]; - } x_ary; - } x_fcnary; - uint16_t x_tvndx; /* tv index */ - } x_sym; - - union { - char x_fname[E_FILNMLEN]; - struct { - uint32_t x_zeroes; - uint32_t x_offset; - } x_n; - } x_file; - - struct { - uint32_t x_scnlen; /* section length */ - uint16_t x_nreloc; /* # relocation entries */ - uint16_t x_nlinno; /* # line numbers */ - uint32_t x_checksum; /* section COMDAT checksum */ - uint16_t x_associated;/* COMDAT associated section index */ - char x_comdat[1]; /* COMDAT selection number */ - } x_scn; - - struct { - uint32_t x_tvfill; /* tv fill value */ - uint16_t x_tvlen; /* length of .tv */ - char x_tvran[2][2]; /* tv range */ - } x_tv; /* info about .tv section (in auxent of symbol .tv)) */ - -}; - -#define SYMENT struct external_syment -#define SYMESZ 18 -#define AUXENT union external_auxent -#define AUXESZ 18 - -#define _ETEXT "etext" - -/********************** RELOCATION DIRECTIVES **********************/ - -struct external_reloc { - char r_vaddr[4]; - char r_symndx[4]; - char r_type[2]; -}; - -#define RELOC struct external_reloc -#define RELSZ 10 - -/* end of coff/i386.h */ - -/* PE COFF header information */ - -#ifndef _PE_H -#define _PE_H - -/* NT specific file attributes */ -#ifndef _WIN32 -#define IMAGE_FILE_RELOCS_STRIPPED 0x0001 -#define IMAGE_FILE_EXECUTABLE_IMAGE 0x0002 -#define IMAGE_FILE_LINE_NUMS_STRIPPED 0x0004 -#define IMAGE_FILE_LOCAL_SYMS_STRIPPED 0x0008 -#define IMAGE_FILE_BYTES_REVERSED_LO 0x0080 -#define IMAGE_FILE_32BIT_MACHINE 0x0100 -#define IMAGE_FILE_DEBUG_STRIPPED 0x0200 -#define IMAGE_FILE_SYSTEM 0x1000 -#define IMAGE_FILE_DLL 0x2000 -#define IMAGE_FILE_BYTES_REVERSED_HI 0x8000 -#endif - -/* additional flags to be set for section headers to allow the NT loader to - read and write to the section data (to replace the addresses of data in - dlls for one thing); also to execute the section in .text's case= - */ -#ifndef _WIN32 -#define IMAGE_SCN_MEM_DISCARDABLE 0x02000000 -#define IMAGE_SCN_MEM_EXECUTE 0x20000000 -#define IMAGE_SCN_MEM_READ 0x40000000 -#define IMAGE_SCN_MEM_WRITE 0x80000000 -#endif - -/* - * Section characteristics added for ppc-nt - */ - -#ifndef _WIN32 -#define IMAGE_SCN_TYPE_NO_PAD 0x00000008 /* Reserved. */ - -#define IMAGE_SCN_CNT_CODE 0x00000020 /* Section contains code. */ -#define IMAGE_SCN_CNT_INITIALIZED_DATA 0x00000040 /* Section contains initialized data. */ -#define IMAGE_SCN_CNT_UNINITIALIZED_DATA 0x00000080 /* Section contains uninitialized data. */ - -#define IMAGE_SCN_LNK_OTHER 0x00000100 /* Reserved. */ -#define IMAGE_SCN_LNK_INFO 0x00000200 /* Section contains comments or some other type of information. */ -#define IMAGE_SCN_LNK_REMOVE 0x00000800 /* Section contents will not become part of image. */ -#define IMAGE_SCN_LNK_COMDAT 0x00001000 /* Section contents comdat. */ - -#define IMAGE_SCN_MEM_FARDATA 0x00008000 - -#define IMAGE_SCN_MEM_PURGEABLE 0x00020000 -#define IMAGE_SCN_MEM_16BIT 0x00020000 -#define IMAGE_SCN_MEM_LOCKED 0x00040000 -#define IMAGE_SCN_MEM_PRELOAD 0x00080000 - -#define IMAGE_SCN_ALIGN_1BYTES 0x00100000 -#define IMAGE_SCN_ALIGN_2BYTES 0x00200000 -#define IMAGE_SCN_ALIGN_4BYTES 0x00300000 -#define IMAGE_SCN_ALIGN_8BYTES 0x00400000 -#define IMAGE_SCN_ALIGN_16BYTES 0x00500000 /* Default alignment if no others are specified. */ -#define IMAGE_SCN_ALIGN_32BYTES 0x00600000 -#define IMAGE_SCN_ALIGN_64BYTES 0x00700000 - - -#define IMAGE_SCN_LNK_NRELOC_OVFL 0x01000000 /* Section contains extended relocations. */ -#define IMAGE_SCN_MEM_NOT_CACHED 0x04000000 /* Section is not cachable. */ -#define IMAGE_SCN_MEM_NOT_PAGED 0x08000000 /* Section is not pageable. */ -#define IMAGE_SCN_MEM_SHARED 0x10000000 /* Section is shareable. */ -#endif - -/* COMDAT selection codes. */ - -#ifndef _WIN32 -#define IMAGE_COMDAT_SELECT_NODUPLICATES (1) /* Warn if duplicates. */ -#define IMAGE_COMDAT_SELECT_ANY (2) /* No warning. */ -#define IMAGE_COMDAT_SELECT_SAME_SIZE (3) /* Warn if different size. */ -#define IMAGE_COMDAT_SELECT_EXACT_MATCH (4) /* Warn if different. */ -#define IMAGE_COMDAT_SELECT_ASSOCIATIVE (5) /* Base on other section. */ -#endif - -/* Magic values that are true for all dos/nt implementations */ -#define DOSMAGIC 0x5a4d -#define NT_SIGNATURE 0x00004550 - -/* NT allows long filenames, we want to accommodate this. This may break - some of the bfd functions */ -#undef FILNMLEN -#define FILNMLEN 18 /* # characters in a file name */ - - -#ifdef COFF_IMAGE_WITH_PE -/* The filehdr is only weired in images */ - -#undef FILHDR -struct external_PE_filehdr -{ - /* DOS header fields */ - uint16_t e_magic; /* Magic number, 0x5a4d */ - uint16_t e_cblp; /* Bytes on last page of file, 0x90 */ - uint16_t e_cp; /* Pages in file, 0x3 */ - uint16_t e_crlc; /* Relocations, 0x0 */ - uint16_t e_cparhdr; /* Size of header in paragraphs, 0x4 */ - uint16_t e_minalloc; /* Minimum extra paragraphs needed, 0x0 */ - uint16_t e_maxalloc; /* Maximum extra paragraphs needed, 0xFFFF */ - uint16_t e_ss; /* Initial (relative) SS value, 0x0 */ - uint16_t e_sp; /* Initial SP value, 0xb8 */ - uint16_t e_csum; /* Checksum, 0x0 */ - uint16_t e_ip; /* Initial IP value, 0x0 */ - uint16_t e_cs; /* Initial (relative) CS value, 0x0 */ - uint16_t e_lfarlc; /* File address of relocation table, 0x40 */ - uint16_t e_ovno; /* Overlay number, 0x0 */ - char e_res[4][2]; /* Reserved words, all 0x0 */ - uint16_t e_oemid; /* OEM identifier (for e_oeminfo), 0x0 */ - uint16_t e_oeminfo; /* OEM information; e_oemid specific, 0x0 */ - char e_res2[10][2]; /* Reserved words, all 0x0 */ - uint32_t e_lfanew; /* File address of new exe header, 0x80 */ - char dos_message[16][4]; /* other stuff, always follow DOS header */ - unsigned int nt_signature; /* required NT signature, 0x4550 */ - - /* From standard header */ - - uint16_t f_magic; /* magic number */ - uint16_t f_nscns; /* number of sections */ - uint32_t f_timdat; /* time & date stamp */ - uint32_t f_symptr; /* file pointer to symtab */ - uint32_t f_nsyms; /* number of symtab entries */ - uint16_t f_opthdr; /* sizeof(optional hdr) */ - uint16_t f_flags; /* flags */ -}; - - -#define FILHDR struct external_PE_filehdr -#undef FILHSZ -#define FILHSZ 152 - -#endif - -typedef struct -{ - uint16_t magic; /* type of file */ - uint16_t vstamp; /* version stamp */ - uint32_t tsize; /* text size in bytes, padded to FW bdry*/ - uint32_t dsize; /* initialized data " " */ - uint32_t bsize; /* uninitialized data " " */ - uint32_t entry; /* entry pt. */ - uint32_t text_start; /* base of text used for this file */ - uint32_t data_start; /* base of all data used for this file */ - - /* NT extra fields; see internal.h for descriptions */ - uint32_t ImageBase; - uint32_t SectionAlignment; - uint32_t FileAlignment; - uint16_t MajorOperatingSystemVersion; - uint16_t MinorOperatingSystemVersion; - uint16_t MajorImageVersion; - uint16_t MinorImageVersion; - uint16_t MajorSubsystemVersion; - uint16_t MinorSubsystemVersion; - char Reserved1[4]; - uint32_t SizeOfImage; - uint32_t SizeOfHeaders; - uint32_t CheckSum; - uint16_t Subsystem; - uint16_t DllCharacteristics; - uint32_t SizeOfStackReserve; - uint32_t SizeOfStackCommit; - uint32_t SizeOfHeapReserve; - uint32_t SizeOfHeapCommit; - uint32_t LoaderFlags; - uint32_t NumberOfRvaAndSizes; - /* IMAGE_DATA_DIRECTORY DataDirectory[IMAGE_NUMBEROF_DIRECTORY_ENTRIES]; */ - char DataDirectory[16][2][4]; /* 16 entries, 2 elements/entry, 4 chars */ - -} PEAOUTHDR; - - -#undef AOUTSZ -#define AOUTSZ (AOUTHDRSZ + 196) - -#undef E_FILNMLEN -#define E_FILNMLEN 18 /* # characters in a file name */ -#endif - -/* end of coff/pe.h */ - -#define DT_NON (0) /* no derived type */ -#define DT_PTR (1) /* pointer */ -#define DT_FCN (2) /* function */ -#define DT_ARY (3) /* array */ - -#ifndef _WIN32 -#define ISPTR(x) (((x) & N_TMASK) == (DT_PTR << N_BTSHFT)) -#define ISFCN(x) (((x) & N_TMASK) == (DT_FCN << N_BTSHFT)) -#define ISARY(x) (((x) & N_TMASK) == (DT_ARY << N_BTSHFT)) -#endif - -#ifdef __cplusplus -} -#endif - -#endif /* _A_OUT_H_ */ - diff --git a/SheepShaver/src/kpx_cpu/include/basic-blockinfo.hpp b/SheepShaver/src/kpx_cpu/include/basic-blockinfo.hpp deleted file mode 100644 index e33996719..000000000 --- a/SheepShaver/src/kpx_cpu/include/basic-blockinfo.hpp +++ /dev/null @@ -1,118 +0,0 @@ -/* - * basic-blockinfo.hpp - PowerPC basic block information - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 BASIC_BLOCKINFO_H -#define BASIC_BLOCKINFO_H - -struct basic_block_info -{ - typedef basic_block_info block_info; - static const int MAX_TARGETS = 2; - - struct dependency - { - block_info * source; - block_info * target; - dependency * next; - dependency ** prev_p; - }; - - uintptr pc; - uintptr end_pc; - int32 count; - uint32 size; - uint32 c1; - uint32 c2; - - // List of blocks we depend on - dependency dep[MAX_TARGETS]; - - // List of blocks that depends on this block - dependency * deplist; - - void init(uintptr start_pc); - void remove_dep(dependency *d); - void remove_deps(); - void create_jmpdep(block_info *tbi, int i); - void maybe_create_jmpdep(block_info *tbi); - bool intersect(uintptr start, uintptr end); -}; - -inline void -basic_block_info::init(uintptr start_pc) -{ - pc = start_pc; - deplist = NULL; - for (int i = 0; i < MAX_TARGETS; i++) { - dep[i].source = NULL; - dep[i].target = NULL; - dep[i].next = NULL; - dep[i].prev_p = NULL; - } -} - -inline void -basic_block_info::remove_dep(dependency *d) -{ - if (d->prev_p) - *(d->prev_p) = d->next; - if (d->next) - d->next->prev_p = d->prev_p; - d->prev_p = NULL; - d->next = NULL; -} - -inline void -basic_block_info::remove_deps() -{ - for (int i = 0; i < MAX_TARGETS; i++) - remove_dep(&dep[i]); -} - -inline void -basic_block_info::create_jmpdep(block_info *tbi, int i) -{ - dep[i].source = this; - dep[i].target = tbi; - dep[i].next = tbi->deplist; - if (dep[i].next) - dep[i].next->prev_p = &(dep[i].next); - dep[i].prev_p = &(tbi->deplist); - tbi->deplist = &(dep[i]); -} - -inline void -basic_block_info::maybe_create_jmpdep(block_info *tbi) -{ - for (int i = 0; i < MAX_TARGETS && dep[i].target != tbi; i++) { - if (dep[i].source == NULL) { - create_jmpdep(tbi, i); - break; - } - } -} - -inline bool -basic_block_info::intersect(uintptr start, uintptr end) -{ - return (pc >= start && pc < end) || (end_pc >= start && end_pc < end); -} - -#endif /* BASIC_BLOCKINFO_H */ diff --git a/SheepShaver/src/kpx_cpu/include/basic-cpu.hpp b/SheepShaver/src/kpx_cpu/include/basic-cpu.hpp deleted file mode 100644 index 568ddb0bf..000000000 --- a/SheepShaver/src/kpx_cpu/include/basic-cpu.hpp +++ /dev/null @@ -1,89 +0,0 @@ -/* - * basic-cpu.hpp - Basic CPU definitions - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 BASIC_CPU_H -#define BASIC_CPU_H - -#include "sysdeps.h" -#include -#include "task-plugin.hpp" - -/** - * Generic register value - **/ - -union any_register -{ - uint32 i; - uint64 j; - float f; - double d; - - // Explicit casts may be required to use those constructors - any_register(uint32 v = 0) : i(v) { } - any_register(uint64 v) : j(v) { } - any_register(float v) : f(v) { } - any_register(double v) : d(v) { } -}; - -/** - * Basic CPU model - **/ - -struct basic_cpu - : public task_plugin -{ - // Basic register set - struct registers - { - enum { - PC = -1, // Program Counter - SP = -2, // Stack Pointer - }; - }; - - // Constructor & destructor - basic_cpu(task_struct * parent_task); - virtual ~basic_cpu(); - - // Execute code at current address - virtual void execute() = 0; - - // Set VALUE to register ID - virtual void set_register(int id, any_register const & value) = 0; - - // Get register ID - virtual any_register get_register(int id) = 0; - - // Start emulation, returns exit status - int run(); - - // Stop emulation - void exit(int status); - -private: - jmp_buf env; - int exit_status; -}; - -// Alias basic register set -typedef basic_cpu::registers basic_registers; - -#endif /* BASIC_CPU_H */ diff --git a/SheepShaver/src/kpx_cpu/include/basic-plugin.hpp b/SheepShaver/src/kpx_cpu/include/basic-plugin.hpp deleted file mode 100644 index 77da79f28..000000000 --- a/SheepShaver/src/kpx_cpu/include/basic-plugin.hpp +++ /dev/null @@ -1,29 +0,0 @@ -/* - * basic-plugin.hpp - Basic plugin definition - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 BASIC_PLUGIN_H -#define BASIC_PLUGIN_H - -struct basic_plugin -{ - virtual ~basic_plugin() { } -}; - -#endif /* BASIC_PLUGIN_H */ diff --git a/SheepShaver/src/kpx_cpu/include/block-alloc.hpp b/SheepShaver/src/kpx_cpu/include/block-alloc.hpp deleted file mode 100644 index 70217e406..000000000 --- a/SheepShaver/src/kpx_cpu/include/block-alloc.hpp +++ /dev/null @@ -1,126 +0,0 @@ -/* - * block_alloc.hpp - Memory allocation in blocks - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 BLOCK_ALLOC_H -#define BLOCK_ALLOC_H - -/** - * Slow memory allocator - * - * Each time a DATA item is requested (resp. released), the block - * is immediately allocated (resp. free'd). - **/ - -template< class data > -struct slow_allocator -{ - data * acquire() const { return new data; } - void release(data * const x) const { delete x; } -}; - -/** - * Lazy memory allocator - * - * Allocate a big memory block, typically larger than a page, - * that contains up to POOL_COUNT data items of type DATA. - **/ - -template< class data > -class lazy_allocator -{ - static const int pool_size = 4096; - static const int pool_count = 1 + pool_size / sizeof(data); - - struct chunk - { - data value; - chunk * next; - }; - - struct pool - { - chunk chunks[pool_count]; - pool * next; - }; - - pool * pools; - chunk * chunks; - -public: - lazy_allocator() : pools(0), chunks(0) { } - ~lazy_allocator(); - data * acquire(); - void release(data * const); -}; - -template< class data > -lazy_allocator::~lazy_allocator() -{ - pool * p = pools; - while (p) { - pool * d = p; - p = p->next; - delete d; - } -} - -template< class data > -data * lazy_allocator::acquire() -{ - if (!chunks) { - // There is no chunk left, allocate a new pool and link the - // chunks into the free list - pool * p = new pool; - for (chunk * c = &p->chunks[0]; c < &p->chunks[pool_count]; c++) { - c->next = chunks; - chunks = c; - } - p->next = pools; - pools = p; - } - chunk * c = chunks; - chunks = c->next; - return &c->value; -} - -template< class data > -void lazy_allocator::release(data * const d) -{ - chunk *c = (chunk *)d; - c->next = chunks; - chunks = c; -} - -/** - * Helper memory allocator - **/ - -template< class data_type, template< class > class allocator_type = lazy_allocator > -class allocator_helper -{ - static allocator_type allocator; -public: - static inline void *allocate() - { return allocator.acquire(); } - static inline void deallocate(void * p) - { allocator.release((data_type *)p); } -}; - -#endif /* BLOCK_ALLOC_H */ diff --git a/SheepShaver/src/kpx_cpu/include/elf-defs.h b/SheepShaver/src/kpx_cpu/include/elf-defs.h deleted file mode 100644 index 8fe6b053a..000000000 --- a/SheepShaver/src/kpx_cpu/include/elf-defs.h +++ /dev/null @@ -1,2360 +0,0 @@ -/* This file defines standard ELF types, structures, and macros. - Copyright (C) 1995-1999, 2000, 2001, 2002 Free Software Foundation, Inc. - This file is part of the GNU C Library. - - The GNU C Library is free software; you can redistribute it and/or - modify it under the terms of the GNU Lesser General Public - License as published by the Free Software Foundation; either - version 2.1 of the License, or (at your option) any later version. - - The GNU C Library 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 - Lesser General Public License for more details. - - You should have received a copy of the GNU Lesser General Public - License along with the GNU C Library; if not, write to the Free - Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA - 02111-1307 USA. */ - -#ifndef ELF_DEFS_H -#define ELF_DEFS_H 1 - -/* Standard ELF types. */ - -/* Type for a 16-bit quantity. */ -typedef uint16 Elf32_Half; -typedef uint16 Elf64_Half; - -/* Types for signed and unsigned 32-bit quantities. */ -typedef uint32 Elf32_Word; -typedef int32 Elf32_Sword; -typedef uint32 Elf64_Word; -typedef int32 Elf64_Sword; - -/* Types for signed and unsigned 64-bit quantities. */ -typedef uint64 Elf32_Xword; -typedef int64 Elf32_Sxword; -typedef uint64 Elf64_Xword; -typedef int64 Elf64_Sxword; - -/* Type of addresses. */ -typedef uint32 Elf32_Addr; -typedef uint64 Elf64_Addr; - -/* Type of file offsets. */ -typedef uint32 Elf32_Off; -typedef uint64 Elf64_Off; - -/* Type for section indices, which are 16-bit quantities. */ -typedef uint16 Elf32_Section; -typedef uint16 Elf64_Section; - -/* Type for version symbol information. */ -typedef Elf32_Half Elf32_Versym; -typedef Elf64_Half Elf64_Versym; - - -/* The ELF file header. This appears at the start of every ELF file. */ - -#define EI_NIDENT (16) - -typedef struct -{ - unsigned char e_ident[EI_NIDENT]; /* Magic number and other info */ - Elf32_Half e_type; /* Object file type */ - Elf32_Half e_machine; /* Architecture */ - Elf32_Word e_version; /* Object file version */ - Elf32_Addr e_entry; /* Entry point virtual address */ - Elf32_Off e_phoff; /* Program header table file offset */ - Elf32_Off e_shoff; /* Section header table file offset */ - Elf32_Word e_flags; /* Processor-specific flags */ - Elf32_Half e_ehsize; /* ELF header size in bytes */ - Elf32_Half e_phentsize; /* Program header table entry size */ - Elf32_Half e_phnum; /* Program header table entry count */ - Elf32_Half e_shentsize; /* Section header table entry size */ - Elf32_Half e_shnum; /* Section header table entry count */ - Elf32_Half e_shstrndx; /* Section header string table index */ -} Elf32_Ehdr; - -typedef struct -{ - unsigned char e_ident[EI_NIDENT]; /* Magic number and other info */ - Elf64_Half e_type; /* Object file type */ - Elf64_Half e_machine; /* Architecture */ - Elf64_Word e_version; /* Object file version */ - Elf64_Addr e_entry; /* Entry point virtual address */ - Elf64_Off e_phoff; /* Program header table file offset */ - Elf64_Off e_shoff; /* Section header table file offset */ - Elf64_Word e_flags; /* Processor-specific flags */ - Elf64_Half e_ehsize; /* ELF header size in bytes */ - Elf64_Half e_phentsize; /* Program header table entry size */ - Elf64_Half e_phnum; /* Program header table entry count */ - Elf64_Half e_shentsize; /* Section header table entry size */ - Elf64_Half e_shnum; /* Section header table entry count */ - Elf64_Half e_shstrndx; /* Section header string table index */ -} Elf64_Ehdr; - -/* Fields in the e_ident array. The EI_* macros are indices into the - array. The macros under each EI_* macro are the values the byte - may have. */ - -#define EI_MAG0 0 /* File identification byte 0 index */ -#define ELFMAG0 0x7f /* Magic number byte 0 */ - -#define EI_MAG1 1 /* File identification byte 1 index */ -#define ELFMAG1 'E' /* Magic number byte 1 */ - -#define EI_MAG2 2 /* File identification byte 2 index */ -#define ELFMAG2 'L' /* Magic number byte 2 */ - -#define EI_MAG3 3 /* File identification byte 3 index */ -#define ELFMAG3 'F' /* Magic number byte 3 */ - -/* Conglomeration of the identification bytes, for easy testing as a word. */ -#define ELFMAG "\177ELF" -#define SELFMAG 4 - -#define EI_CLASS 4 /* File class byte index */ -#define ELFCLASSNONE 0 /* Invalid class */ -#define ELFCLASS32 1 /* 32-bit objects */ -#define ELFCLASS64 2 /* 64-bit objects */ -#define ELFCLASSNUM 3 - -#define EI_DATA 5 /* Data encoding byte index */ -#define ELFDATANONE 0 /* Invalid data encoding */ -#define ELFDATA2LSB 1 /* 2's complement, little endian */ -#define ELFDATA2MSB 2 /* 2's complement, big endian */ -#define ELFDATANUM 3 - -#define EI_VERSION 6 /* File version byte index */ - /* Value must be EV_CURRENT */ - -#define EI_OSABI 7 /* OS ABI identification */ -#define ELFOSABI_NONE 0 /* UNIX System V ABI */ -#define ELFOSABI_SYSV 0 /* Alias. */ -#define ELFOSABI_HPUX 1 /* HP-UX */ -#define ELFOSABI_NETBSD 2 /* NetBSD. */ -#define ELFOSABI_LINUX 3 /* Linux. */ -#define ELFOSABI_SOLARIS 6 /* Sun Solaris. */ -#define ELFOSABI_AIX 7 /* IBM AIX. */ -#define ELFOSABI_IRIX 8 /* SGI Irix. */ -#define ELFOSABI_FREEBSD 9 /* FreeBSD. */ -#define ELFOSABI_TRU64 10 /* Compaq TRU64 UNIX. */ -#define ELFOSABI_MODESTO 11 /* Novell Modesto. */ -#define ELFOSABI_OPENBSD 12 /* OpenBSD. */ -#define ELFOSABI_ARM 97 /* ARM */ -#define ELFOSABI_STANDALONE 255 /* Standalone (embedded) application */ - -#define EI_ABIVERSION 8 /* ABI version */ - -#define EI_PAD 9 /* Byte index of padding bytes */ - -/* Legal values for e_type (object file type). */ - -#define ET_NONE 0 /* No file type */ -#define ET_REL 1 /* Relocatable file */ -#define ET_EXEC 2 /* Executable file */ -#define ET_DYN 3 /* Shared object file */ -#define ET_CORE 4 /* Core file */ -#define ET_NUM 5 /* Number of defined types */ -#define ET_LOOS 0xfe00 /* OS-specific range start */ -#define ET_HIOS 0xfeff /* OS-specific range end */ -#define ET_LOPROC 0xff00 /* Processor-specific range start */ -#define ET_HIPROC 0xffff /* Processor-specific range end */ - -/* Legal values for e_machine (architecture). */ - -#define EM_NONE 0 /* No machine */ -#define EM_M32 1 /* AT&T WE 32100 */ -#define EM_SPARC 2 /* SUN SPARC */ -#define EM_386 3 /* Intel 80386 */ -#define EM_68K 4 /* Motorola m68k family */ -#define EM_88K 5 /* Motorola m88k family */ -#define EM_486 6 /* Perhaps disused */ -#define EM_860 7 /* Intel 80860 */ -#define EM_MIPS 8 /* MIPS R3000 big-endian */ -#define EM_S370 9 /* IBM System/370 */ -#define EM_MIPS_RS3_LE 10 /* MIPS R3000 little-endian */ - -#define EM_PARISC 15 /* HPPA */ -#define EM_VPP500 17 /* Fujitsu VPP500 */ -#define EM_SPARC32PLUS 18 /* Sun's "v8plus" */ -#define EM_960 19 /* Intel 80960 */ -#define EM_PPC 20 /* PowerPC */ -#define EM_PPC64 21 /* PowerPC 64-bit */ -#define EM_S390 22 /* IBM S390 */ - -#define EM_V800 36 /* NEC V800 series */ -#define EM_FR20 37 /* Fujitsu FR20 */ -#define EM_RH32 38 /* TRW RH-32 */ -#define EM_RCE 39 /* Motorola RCE */ -#define EM_ARM 40 /* ARM */ -#define EM_FAKE_ALPHA 41 /* Digital Alpha */ -#define EM_SH 42 /* Hitachi SH */ -#define EM_SPARCV9 43 /* SPARC v9 64-bit */ -#define EM_TRICORE 44 /* Siemens Tricore */ -#define EM_ARC 45 /* Argonaut RISC Core */ -#define EM_H8_300 46 /* Hitachi H8/300 */ -#define EM_H8_300H 47 /* Hitachi H8/300H */ -#define EM_H8S 48 /* Hitachi H8S */ -#define EM_H8_500 49 /* Hitachi H8/500 */ -#define EM_IA_64 50 /* Intel Merced */ -#define EM_MIPS_X 51 /* Stanford MIPS-X */ -#define EM_COLDFIRE 52 /* Motorola Coldfire */ -#define EM_68HC12 53 /* Motorola M68HC12 */ -#define EM_MMA 54 /* Fujitsu MMA Multimedia Accelerator*/ -#define EM_PCP 55 /* Siemens PCP */ -#define EM_NCPU 56 /* Sony nCPU embeeded RISC */ -#define EM_NDR1 57 /* Denso NDR1 microprocessor */ -#define EM_STARCORE 58 /* Motorola Start*Core processor */ -#define EM_ME16 59 /* Toyota ME16 processor */ -#define EM_ST100 60 /* STMicroelectronic ST100 processor */ -#define EM_TINYJ 61 /* Advanced Logic Corp. Tinyj emb.fam*/ -#define EM_X86_64 62 /* AMD x86-64 architecture */ -#define EM_PDSP 63 /* Sony DSP Processor */ - -#define EM_FX66 66 /* Siemens FX66 microcontroller */ -#define EM_ST9PLUS 67 /* STMicroelectronics ST9+ 8/16 mc */ -#define EM_ST7 68 /* STmicroelectronics ST7 8 bit mc */ -#define EM_68HC16 69 /* Motorola MC68HC16 microcontroller */ -#define EM_68HC11 70 /* Motorola MC68HC11 microcontroller */ -#define EM_68HC08 71 /* Motorola MC68HC08 microcontroller */ -#define EM_68HC05 72 /* Motorola MC68HC05 microcontroller */ -#define EM_SVX 73 /* Silicon Graphics SVx */ -#define EM_ST19 74 /* STMicroelectronics ST19 8 bit mc */ -#define EM_VAX 75 /* Digital VAX */ -#define EM_CRIS 76 /* Axis Communications 32-bit embedded processor */ -#define EM_JAVELIN 77 /* Infineon Technologies 32-bit embedded processor */ -#define EM_FIREPATH 78 /* Element 14 64-bit DSP Processor */ -#define EM_ZSP 79 /* LSI Logic 16-bit DSP Processor */ -#define EM_MMIX 80 /* Donald Knuth's educational 64-bit processor */ -#define EM_HUANY 81 /* Harvard University machine-independent object files */ -#define EM_PRISM 82 /* SiTera Prism */ -#define EM_AVR 83 /* Atmel AVR 8-bit microcontroller */ -#define EM_FR30 84 /* Fujitsu FR30 */ -#define EM_D10V 85 /* Mitsubishi D10V */ -#define EM_D30V 86 /* Mitsubishi D30V */ -#define EM_V850 87 /* NEC v850 */ -#define EM_M32R 88 /* Mitsubishi M32R */ -#define EM_MN10300 89 /* Matsushita MN10300 */ -#define EM_MN10200 90 /* Matsushita MN10200 */ -#define EM_PJ 91 /* picoJava */ -#define EM_OPENRISC 92 /* OpenRISC 32-bit embedded processor */ -#define EM_ARC_A5 93 /* ARC Cores Tangent-A5 */ -#define EM_XTENSA 94 /* Tensilica Xtensa Architecture */ -#define EM_NUM 95 - -/* If it is necessary to assign new unofficial EM_* values, please - pick large random numbers (0x8523, 0xa7f2, etc.) to minimize the - chances of collision with official or non-GNU unofficial values. */ - -#define EM_ALPHA 0x9026 - -/* Legal values for e_version (version). */ - -#define EV_NONE 0 /* Invalid ELF version */ -#define EV_CURRENT 1 /* Current version */ -#define EV_NUM 2 - -/* Section header. */ - -typedef struct -{ - Elf32_Word sh_name; /* Section name (string tbl index) */ - Elf32_Word sh_type; /* Section type */ - Elf32_Word sh_flags; /* Section flags */ - Elf32_Addr sh_addr; /* Section virtual addr at execution */ - Elf32_Off sh_offset; /* Section file offset */ - Elf32_Word sh_size; /* Section size in bytes */ - Elf32_Word sh_link; /* Link to another section */ - Elf32_Word sh_info; /* Additional section information */ - Elf32_Word sh_addralign; /* Section alignment */ - Elf32_Word sh_entsize; /* Entry size if section holds table */ -} Elf32_Shdr; - -typedef struct -{ - Elf64_Word sh_name; /* Section name (string tbl index) */ - Elf64_Word sh_type; /* Section type */ - Elf64_Xword sh_flags; /* Section flags */ - Elf64_Addr sh_addr; /* Section virtual addr at execution */ - Elf64_Off sh_offset; /* Section file offset */ - Elf64_Xword sh_size; /* Section size in bytes */ - Elf64_Word sh_link; /* Link to another section */ - Elf64_Word sh_info; /* Additional section information */ - Elf64_Xword sh_addralign; /* Section alignment */ - Elf64_Xword sh_entsize; /* Entry size if section holds table */ -} Elf64_Shdr; - -/* Special section indices. */ - -#define SHN_UNDEF 0 /* Undefined section */ -#define SHN_LORESERVE 0xff00 /* Start of reserved indices */ -#define SHN_LOPROC 0xff00 /* Start of processor-specific */ -#define SHN_HIPROC 0xff1f /* End of processor-specific */ -#define SHN_LOOS 0xff20 /* Start of OS-specific */ -#define SHN_HIOS 0xff3f /* End of OS-specific */ -#define SHN_ABS 0xfff1 /* Associated symbol is absolute */ -#define SHN_COMMON 0xfff2 /* Associated symbol is common */ -#define SHN_XINDEX 0xffff /* Index is in extra table. */ -#define SHN_HIRESERVE 0xffff /* End of reserved indices */ - -/* Legal values for sh_type (section type). */ - -#define SHT_NULL 0 /* Section header table entry unused */ -#define SHT_PROGBITS 1 /* Program data */ -#define SHT_SYMTAB 2 /* Symbol table */ -#define SHT_STRTAB 3 /* String table */ -#define SHT_RELA 4 /* Relocation entries with addends */ -#define SHT_HASH 5 /* Symbol hash table */ -#define SHT_DYNAMIC 6 /* Dynamic linking information */ -#define SHT_NOTE 7 /* Notes */ -#define SHT_NOBITS 8 /* Program space with no data (bss) */ -#define SHT_REL 9 /* Relocation entries, no addends */ -#define SHT_SHLIB 10 /* Reserved */ -#define SHT_DYNSYM 11 /* Dynamic linker symbol table */ -#define SHT_INIT_ARRAY 14 /* Array of constructors */ -#define SHT_FINI_ARRAY 15 /* Array of destructors */ -#define SHT_PREINIT_ARRAY 16 /* Array of pre-constructors */ -#define SHT_GROUP 17 /* Section group */ -#define SHT_SYMTAB_SHNDX 18 /* Extended section indeces */ -#define SHT_NUM 19 /* Number of defined types. */ -#define SHT_LOOS 0x60000000 /* Start OS-specific */ -#define SHT_GNU_LIBLIST 0x6ffffff7 /* Prelink library list */ -#define SHT_CHECKSUM 0x6ffffff8 /* Checksum for DSO content. */ -#define SHT_LOSUNW 0x6ffffffa /* Sun-specific low bound. */ -#define SHT_SUNW_move 0x6ffffffa -#define SHT_SUNW_COMDAT 0x6ffffffb -#define SHT_SUNW_syminfo 0x6ffffffc -#define SHT_GNU_verdef 0x6ffffffd /* Version definition section. */ -#define SHT_GNU_verneed 0x6ffffffe /* Version needs section. */ -#define SHT_GNU_versym 0x6fffffff /* Version symbol table. */ -#define SHT_HISUNW 0x6fffffff /* Sun-specific high bound. */ -#define SHT_HIOS 0x6fffffff /* End OS-specific type */ -#define SHT_LOPROC 0x70000000 /* Start of processor-specific */ -#define SHT_HIPROC 0x7fffffff /* End of processor-specific */ -#define SHT_LOUSER 0x80000000 /* Start of application-specific */ -#define SHT_HIUSER 0x8fffffff /* End of application-specific */ - -/* Legal values for sh_flags (section flags). */ - -#define SHF_WRITE (1 << 0) /* Writable */ -#define SHF_ALLOC (1 << 1) /* Occupies memory during execution */ -#define SHF_EXECINSTR (1 << 2) /* Executable */ -#define SHF_MERGE (1 << 4) /* Might be merged */ -#define SHF_STRINGS (1 << 5) /* Contains nul-terminated strings */ -#define SHF_INFO_LINK (1 << 6) /* `sh_info' contains SHT index */ -#define SHF_LINK_ORDER (1 << 7) /* Preserve order after combining */ -#define SHF_OS_NONCONFORMING (1 << 8) /* Non-standard OS specific handling - required */ -#define SHF_GROUP (1 << 9) /* Section is member of a group. */ -#define SHF_TLS (1 << 10) /* Section hold thread-local data. */ -#define SHF_MASKOS 0x0ff00000 /* OS-specific. */ -#define SHF_MASKPROC 0xf0000000 /* Processor-specific */ - -/* Section group handling. */ -#define GRP_COMDAT 0x1 /* Mark group as COMDAT. */ - -/* Symbol table entry. */ - -typedef struct -{ - Elf32_Word st_name; /* Symbol name (string tbl index) */ - Elf32_Addr st_value; /* Symbol value */ - Elf32_Word st_size; /* Symbol size */ - unsigned char st_info; /* Symbol type and binding */ - unsigned char st_other; /* Symbol visibility */ - Elf32_Section st_shndx; /* Section index */ -} Elf32_Sym; - -typedef struct -{ - Elf64_Word st_name; /* Symbol name (string tbl index) */ - unsigned char st_info; /* Symbol type and binding */ - unsigned char st_other; /* Symbol visibility */ - Elf64_Section st_shndx; /* Section index */ - Elf64_Addr st_value; /* Symbol value */ - Elf64_Xword st_size; /* Symbol size */ -} Elf64_Sym; - -/* The syminfo section if available contains additional information about - every dynamic symbol. */ - -typedef struct -{ - Elf32_Half si_boundto; /* Direct bindings, symbol bound to */ - Elf32_Half si_flags; /* Per symbol flags */ -} Elf32_Syminfo; - -typedef struct -{ - Elf64_Half si_boundto; /* Direct bindings, symbol bound to */ - Elf64_Half si_flags; /* Per symbol flags */ -} Elf64_Syminfo; - -/* Possible values for si_boundto. */ -#define SYMINFO_BT_SELF 0xffff /* Symbol bound to self */ -#define SYMINFO_BT_PARENT 0xfffe /* Symbol bound to parent */ -#define SYMINFO_BT_LOWRESERVE 0xff00 /* Beginning of reserved entries */ - -/* Possible bitmasks for si_flags. */ -#define SYMINFO_FLG_DIRECT 0x0001 /* Direct bound symbol */ -#define SYMINFO_FLG_PASSTHRU 0x0002 /* Pass-thru symbol for translator */ -#define SYMINFO_FLG_COPY 0x0004 /* Symbol is a copy-reloc */ -#define SYMINFO_FLG_LAZYLOAD 0x0008 /* Symbol bound to object to be lazy - loaded */ -/* Syminfo version values. */ -#define SYMINFO_NONE 0 -#define SYMINFO_CURRENT 1 -#define SYMINFO_NUM 2 - - -/* How to extract and insert information held in the st_info field. */ - -#define ELF32_ST_BIND(val) (((unsigned char) (val)) >> 4) -#define ELF32_ST_TYPE(val) ((val) & 0xf) -#define ELF32_ST_INFO(bind, type) (((bind) << 4) + ((type) & 0xf)) - -/* Both Elf32_Sym and Elf64_Sym use the same one-byte st_info field. */ -#define ELF64_ST_BIND(val) ELF32_ST_BIND (val) -#define ELF64_ST_TYPE(val) ELF32_ST_TYPE (val) -#define ELF64_ST_INFO(bind, type) ELF32_ST_INFO ((bind), (type)) - -/* Legal values for ST_BIND subfield of st_info (symbol binding). */ - -#define STB_LOCAL 0 /* Local symbol */ -#define STB_GLOBAL 1 /* Global symbol */ -#define STB_WEAK 2 /* Weak symbol */ -#define STB_NUM 3 /* Number of defined types. */ -#define STB_LOOS 10 /* Start of OS-specific */ -#define STB_HIOS 12 /* End of OS-specific */ -#define STB_LOPROC 13 /* Start of processor-specific */ -#define STB_HIPROC 15 /* End of processor-specific */ - -/* Legal values for ST_TYPE subfield of st_info (symbol type). */ - -#define STT_NOTYPE 0 /* Symbol type is unspecified */ -#define STT_OBJECT 1 /* Symbol is a data object */ -#define STT_FUNC 2 /* Symbol is a code object */ -#define STT_SECTION 3 /* Symbol associated with a section */ -#define STT_FILE 4 /* Symbol's name is file name */ -#define STT_COMMON 5 /* Symbol is a common data object */ -#define STT_TLS 6 /* Symbol is thread-local data object*/ -#define STT_NUM 7 /* Number of defined types. */ -#define STT_LOOS 10 /* Start of OS-specific */ -#define STT_HIOS 12 /* End of OS-specific */ -#define STT_LOPROC 13 /* Start of processor-specific */ -#define STT_HIPROC 15 /* End of processor-specific */ - - -/* Symbol table indices are found in the hash buckets and chain table - of a symbol hash table section. This special index value indicates - the end of a chain, meaning no further symbols are found in that bucket. */ - -#define STN_UNDEF 0 /* End of a chain. */ - - -/* How to extract and insert information held in the st_other field. */ - -#define ELF32_ST_VISIBILITY(o) ((o) & 0x03) - -/* For ELF64 the definitions are the same. */ -#define ELF64_ST_VISIBILITY(o) ELF32_ST_VISIBILITY (o) - -/* Symbol visibility specification encoded in the st_other field. */ -#define STV_DEFAULT 0 /* Default symbol visibility rules */ -#define STV_INTERNAL 1 /* Processor specific hidden class */ -#define STV_HIDDEN 2 /* Sym unavailable in other modules */ -#define STV_PROTECTED 3 /* Not preemptible, not exported */ - - -/* Relocation table entry without addend (in section of type SHT_REL). */ - -typedef struct -{ - Elf32_Addr r_offset; /* Address */ - Elf32_Word r_info; /* Relocation type and symbol index */ -} Elf32_Rel; - -/* I have seen two different definitions of the Elf64_Rel and - Elf64_Rela structures, so we'll leave them out until Novell (or - whoever) gets their act together. */ -/* The following, at least, is used on Sparc v9, MIPS, and Alpha. */ - -typedef struct -{ - Elf64_Addr r_offset; /* Address */ - Elf64_Xword r_info; /* Relocation type and symbol index */ -} Elf64_Rel; - -/* Relocation table entry with addend (in section of type SHT_RELA). */ - -typedef struct -{ - Elf32_Addr r_offset; /* Address */ - Elf32_Word r_info; /* Relocation type and symbol index */ - Elf32_Sword r_addend; /* Addend */ -} Elf32_Rela; - -typedef struct -{ - Elf64_Addr r_offset; /* Address */ - Elf64_Xword r_info; /* Relocation type and symbol index */ - Elf64_Sxword r_addend; /* Addend */ -} Elf64_Rela; - -/* How to extract and insert information held in the r_info field. */ - -#define ELF32_R_SYM(val) ((val) >> 8) -#define ELF32_R_TYPE(val) ((val) & 0xff) -#define ELF32_R_INFO(sym, type) (((sym) << 8) + ((type) & 0xff)) - -#define ELF64_R_SYM(i) ((i) >> 32) -#define ELF64_R_TYPE(i) ((i) & 0xffffffff) -#define ELF64_R_INFO(sym,type) ((((Elf64_Xword) (sym)) << 32) + (type)) - -/* Program segment header. */ - -typedef struct -{ - Elf32_Word p_type; /* Segment type */ - Elf32_Off p_offset; /* Segment file offset */ - Elf32_Addr p_vaddr; /* Segment virtual address */ - Elf32_Addr p_paddr; /* Segment physical address */ - Elf32_Word p_filesz; /* Segment size in file */ - Elf32_Word p_memsz; /* Segment size in memory */ - Elf32_Word p_flags; /* Segment flags */ - Elf32_Word p_align; /* Segment alignment */ -} Elf32_Phdr; - -typedef struct -{ - Elf64_Word p_type; /* Segment type */ - Elf64_Word p_flags; /* Segment flags */ - Elf64_Off p_offset; /* Segment file offset */ - Elf64_Addr p_vaddr; /* Segment virtual address */ - Elf64_Addr p_paddr; /* Segment physical address */ - Elf64_Xword p_filesz; /* Segment size in file */ - Elf64_Xword p_memsz; /* Segment size in memory */ - Elf64_Xword p_align; /* Segment alignment */ -} Elf64_Phdr; - -/* Legal values for p_type (segment type). */ - -#define PT_NULL 0 /* Program header table entry unused */ -#define PT_LOAD 1 /* Loadable program segment */ -#define PT_DYNAMIC 2 /* Dynamic linking information */ -#define PT_INTERP 3 /* Program interpreter */ -#define PT_NOTE 4 /* Auxiliary information */ -#define PT_SHLIB 5 /* Reserved */ -#define PT_PHDR 6 /* Entry for header table itself */ -#define PT_TLS 7 /* Thread-local storage segment */ -#define PT_NUM 8 /* Number of defined types */ -#define PT_LOOS 0x60000000 /* Start of OS-specific */ -#define PT_GNU_EH_FRAME 0x6474e550 /* GCC .eh_frame_hdr segment */ -#define PT_LOSUNW 0x6ffffffa -#define PT_SUNWBSS 0x6ffffffa /* Sun Specific segment */ -#define PT_SUNWSTACK 0x6ffffffb /* Stack segment */ -#define PT_HISUNW 0x6fffffff -#define PT_HIOS 0x6fffffff /* End of OS-specific */ -#define PT_LOPROC 0x70000000 /* Start of processor-specific */ -#define PT_HIPROC 0x7fffffff /* End of processor-specific */ - -/* Legal values for p_flags (segment flags). */ - -#define PF_X (1 << 0) /* Segment is executable */ -#define PF_W (1 << 1) /* Segment is writable */ -#define PF_R (1 << 2) /* Segment is readable */ -#define PF_MASKOS 0x0ff00000 /* OS-specific */ -#define PF_MASKPROC 0xf0000000 /* Processor-specific */ - -/* Legal values for note segment descriptor types for core files. */ - -#define NT_PRSTATUS 1 /* Contains copy of prstatus struct */ -#define NT_FPREGSET 2 /* Contains copy of fpregset struct */ -#define NT_PRPSINFO 3 /* Contains copy of prpsinfo struct */ -#define NT_PRXREG 4 /* Contains copy of prxregset struct */ -#define NT_TASKSTRUCT 4 /* Contains copy of task structure */ -#define NT_PLATFORM 5 /* String from sysinfo(SI_PLATFORM) */ -#define NT_AUXV 6 /* Contains copy of auxv array */ -#define NT_GWINDOWS 7 /* Contains copy of gwindows struct */ -#define NT_ASRS 8 /* Contains copy of asrset struct */ -#define NT_PSTATUS 10 /* Contains copy of pstatus struct */ -#define NT_PSINFO 13 /* Contains copy of psinfo struct */ -#define NT_PRCRED 14 /* Contains copy of prcred struct */ -#define NT_UTSNAME 15 /* Contains copy of utsname struct */ -#define NT_LWPSTATUS 16 /* Contains copy of lwpstatus struct */ -#define NT_LWPSINFO 17 /* Contains copy of lwpinfo struct */ -#define NT_PRFPXREG 20 /* Contains copy of fprxregset struct*/ - -/* Legal values for the note segment descriptor types for object files. */ - -#define NT_VERSION 1 /* Contains a version string. */ - - -/* Dynamic section entry. */ - -typedef struct -{ - Elf32_Sword d_tag; /* Dynamic entry type */ - union - { - Elf32_Word d_val; /* Integer value */ - Elf32_Addr d_ptr; /* Address value */ - } d_un; -} Elf32_Dyn; - -typedef struct -{ - Elf64_Sxword d_tag; /* Dynamic entry type */ - union - { - Elf64_Xword d_val; /* Integer value */ - Elf64_Addr d_ptr; /* Address value */ - } d_un; -} Elf64_Dyn; - -/* Legal values for d_tag (dynamic entry type). */ - -#define DT_NULL 0 /* Marks end of dynamic section */ -#define DT_NEEDED 1 /* Name of needed library */ -#define DT_PLTRELSZ 2 /* Size in bytes of PLT relocs */ -#define DT_PLTGOT 3 /* Processor defined value */ -#define DT_HASH 4 /* Address of symbol hash table */ -#define DT_STRTAB 5 /* Address of string table */ -#define DT_SYMTAB 6 /* Address of symbol table */ -#define DT_RELA 7 /* Address of Rela relocs */ -#define DT_RELASZ 8 /* Total size of Rela relocs */ -#define DT_RELAENT 9 /* Size of one Rela reloc */ -#define DT_STRSZ 10 /* Size of string table */ -#define DT_SYMENT 11 /* Size of one symbol table entry */ -#define DT_INIT 12 /* Address of init function */ -#define DT_FINI 13 /* Address of termination function */ -#define DT_SONAME 14 /* Name of shared object */ -#define DT_RPATH 15 /* Library search path (deprecated) */ -#define DT_SYMBOLIC 16 /* Start symbol search here */ -#define DT_REL 17 /* Address of Rel relocs */ -#define DT_RELSZ 18 /* Total size of Rel relocs */ -#define DT_RELENT 19 /* Size of one Rel reloc */ -#define DT_PLTREL 20 /* Type of reloc in PLT */ -#define DT_DEBUG 21 /* For debugging; unspecified */ -#define DT_TEXTREL 22 /* Reloc might modify .text */ -#define DT_JMPREL 23 /* Address of PLT relocs */ -#define DT_BIND_NOW 24 /* Process relocations of object */ -#define DT_INIT_ARRAY 25 /* Array with addresses of init fct */ -#define DT_FINI_ARRAY 26 /* Array with addresses of fini fct */ -#define DT_INIT_ARRAYSZ 27 /* Size in bytes of DT_INIT_ARRAY */ -#define DT_FINI_ARRAYSZ 28 /* Size in bytes of DT_FINI_ARRAY */ -#define DT_RUNPATH 29 /* Library search path */ -#define DT_FLAGS 30 /* Flags for the object being loaded */ -#define DT_ENCODING 32 /* Start of encoded range */ -#define DT_PREINIT_ARRAY 32 /* Array with addresses of preinit fct*/ -#define DT_PREINIT_ARRAYSZ 33 /* size in bytes of DT_PREINIT_ARRAY */ -#define DT_NUM 34 /* Number used */ -#define DT_LOOS 0x6000000d /* Start of OS-specific */ -#define DT_HIOS 0x6ffff000 /* End of OS-specific */ -#define DT_LOPROC 0x70000000 /* Start of processor-specific */ -#define DT_HIPROC 0x7fffffff /* End of processor-specific */ -#define DT_PROCNUM DT_MIPS_NUM /* Most used by any processor */ - -/* DT_* entries which fall between DT_VALRNGHI & DT_VALRNGLO use the - Dyn.d_un.d_val field of the Elf*_Dyn structure. This follows Sun's - approach. */ -#define DT_VALRNGLO 0x6ffffd00 -#define DT_GNU_PRELINKED 0x6ffffdf5 /* Prelinking timestamp */ -#define DT_GNU_CONFLICTSZ 0x6ffffdf6 /* Size of conflict section */ -#define DT_GNU_LIBLISTSZ 0x6ffffdf7 /* Size of library list */ -#define DT_CHECKSUM 0x6ffffdf8 -#define DT_PLTPADSZ 0x6ffffdf9 -#define DT_MOVEENT 0x6ffffdfa -#define DT_MOVESZ 0x6ffffdfb -#define DT_FEATURE_1 0x6ffffdfc /* Feature selection (DTF_*). */ -#define DT_POSFLAG_1 0x6ffffdfd /* Flags for DT_* entries, effecting - the following DT_* entry. */ -#define DT_SYMINSZ 0x6ffffdfe /* Size of syminfo table (in bytes) */ -#define DT_SYMINENT 0x6ffffdff /* Entry size of syminfo */ -#define DT_VALRNGHI 0x6ffffdff -#define DT_VALTAGIDX(tag) (DT_VALRNGHI - (tag)) /* Reverse order! */ -#define DT_VALNUM 12 - -/* DT_* entries which fall between DT_ADDRRNGHI & DT_ADDRRNGLO use the - Dyn.d_un.d_ptr field of the Elf*_Dyn structure. - - If any adjustment is made to the ELF object after it has been - built these entries will need to be adjusted. */ -#define DT_ADDRRNGLO 0x6ffffe00 -#define DT_GNU_CONFLICT 0x6ffffef8 /* Start of conflict section */ -#define DT_GNU_LIBLIST 0x6ffffef9 /* Library list */ -#define DT_CONFIG 0x6ffffefa /* Configuration information. */ -#define DT_DEPAUDIT 0x6ffffefb /* Dependency auditing. */ -#define DT_AUDIT 0x6ffffefc /* Object auditing. */ -#define DT_PLTPAD 0x6ffffefd /* PLT padding. */ -#define DT_MOVETAB 0x6ffffefe /* Move table. */ -#define DT_SYMINFO 0x6ffffeff /* Syminfo table. */ -#define DT_ADDRRNGHI 0x6ffffeff -#define DT_ADDRTAGIDX(tag) (DT_ADDRRNGHI - (tag)) /* Reverse order! */ -#define DT_ADDRNUM 10 - -/* The versioning entry types. The next are defined as part of the - GNU extension. */ -#define DT_VERSYM 0x6ffffff0 - -#define DT_RELACOUNT 0x6ffffff9 -#define DT_RELCOUNT 0x6ffffffa - -/* These were chosen by Sun. */ -#define DT_FLAGS_1 0x6ffffffb /* State flags, see DF_1_* below. */ -#define DT_VERDEF 0x6ffffffc /* Address of version definition - table */ -#define DT_VERDEFNUM 0x6ffffffd /* Number of version definitions */ -#define DT_VERNEED 0x6ffffffe /* Address of table with needed - versions */ -#define DT_VERNEEDNUM 0x6fffffff /* Number of needed versions */ -#define DT_VERSIONTAGIDX(tag) (DT_VERNEEDNUM - (tag)) /* Reverse order! */ -#define DT_VERSIONTAGNUM 16 - -/* Sun added these machine-independent extensions in the "processor-specific" - range. Be compatible. */ -#define DT_AUXILIARY 0x7ffffffd /* Shared object to load before self */ -#define DT_FILTER 0x7fffffff /* Shared object to get values from */ -#define DT_EXTRATAGIDX(tag) ((Elf32_Word)-((Elf32_Sword) (tag) <<1>>1)-1) -#define DT_EXTRANUM 3 - -/* Values of `d_un.d_val' in the DT_FLAGS entry. */ -#define DF_ORIGIN 0x00000001 /* Object may use DF_ORIGIN */ -#define DF_SYMBOLIC 0x00000002 /* Symbol resolutions starts here */ -#define DF_TEXTREL 0x00000004 /* Object contains text relocations */ -#define DF_BIND_NOW 0x00000008 /* No lazy binding for this object */ -#define DF_STATIC_TLS 0x00000010 /* Module uses the static TLS model */ - -/* State flags selectable in the `d_un.d_val' element of the DT_FLAGS_1 - entry in the dynamic section. */ -#define DF_1_NOW 0x00000001 /* Set RTLD_NOW for this object. */ -#define DF_1_GLOBAL 0x00000002 /* Set RTLD_GLOBAL for this object. */ -#define DF_1_GROUP 0x00000004 /* Set RTLD_GROUP for this object. */ -#define DF_1_NODELETE 0x00000008 /* Set RTLD_NODELETE for this object.*/ -#define DF_1_LOADFLTR 0x00000010 /* Trigger filtee loading at runtime.*/ -#define DF_1_INITFIRST 0x00000020 /* Set RTLD_INITFIRST for this object*/ -#define DF_1_NOOPEN 0x00000040 /* Set RTLD_NOOPEN for this object. */ -#define DF_1_ORIGIN 0x00000080 /* $ORIGIN must be handled. */ -#define DF_1_DIRECT 0x00000100 /* Direct binding enabled. */ -#define DF_1_TRANS 0x00000200 -#define DF_1_INTERPOSE 0x00000400 /* Object is used to interpose. */ -#define DF_1_NODEFLIB 0x00000800 /* Ignore default lib search path. */ -#define DF_1_NODUMP 0x00001000 /* Object can't be dldump'ed. */ -#define DF_1_CONFALT 0x00002000 /* Configuration alternative created.*/ -#define DF_1_ENDFILTEE 0x00004000 /* Filtee terminates filters search. */ -#define DF_1_DISPRELDNE 0x00008000 /* Disp reloc applied at build time. */ -#define DF_1_DISPRELPND 0x00010000 /* Disp reloc applied at run-time. */ - -/* Flags for the feature selection in DT_FEATURE_1. */ -#define DTF_1_PARINIT 0x00000001 -#define DTF_1_CONFEXP 0x00000002 - -/* Flags in the DT_POSFLAG_1 entry effecting only the next DT_* entry. */ -#define DF_P1_LAZYLOAD 0x00000001 /* Lazyload following object. */ -#define DF_P1_GROUPPERM 0x00000002 /* Symbols from next object are not - generally available. */ - -/* Version definition sections. */ - -typedef struct -{ - Elf32_Half vd_version; /* Version revision */ - Elf32_Half vd_flags; /* Version information */ - Elf32_Half vd_ndx; /* Version Index */ - Elf32_Half vd_cnt; /* Number of associated aux entries */ - Elf32_Word vd_hash; /* Version name hash value */ - Elf32_Word vd_aux; /* Offset in bytes to verdaux array */ - Elf32_Word vd_next; /* Offset in bytes to next verdef - entry */ -} Elf32_Verdef; - -typedef struct -{ - Elf64_Half vd_version; /* Version revision */ - Elf64_Half vd_flags; /* Version information */ - Elf64_Half vd_ndx; /* Version Index */ - Elf64_Half vd_cnt; /* Number of associated aux entries */ - Elf64_Word vd_hash; /* Version name hash value */ - Elf64_Word vd_aux; /* Offset in bytes to verdaux array */ - Elf64_Word vd_next; /* Offset in bytes to next verdef - entry */ -} Elf64_Verdef; - - -/* Legal values for vd_version (version revision). */ -#define VER_DEF_NONE 0 /* No version */ -#define VER_DEF_CURRENT 1 /* Current version */ -#define VER_DEF_NUM 2 /* Given version number */ - -/* Legal values for vd_flags (version information flags). */ -#define VER_FLG_BASE 0x1 /* Version definition of file itself */ -#define VER_FLG_WEAK 0x2 /* Weak version identifier */ - -/* Versym symbol index values. */ -#define VER_NDX_LOCAL 0 /* Symbol is local. */ -#define VER_NDX_GLOBAL 1 /* Symbol is global. */ -#define VER_NDX_LORESERVE 0xff00 /* Beginning of reserved entries. */ -#define VER_NDX_ELIMINATE 0xff01 /* Symbol is to be eliminated. */ - -/* Auxialiary version information. */ - -typedef struct -{ - Elf32_Word vda_name; /* Version or dependency names */ - Elf32_Word vda_next; /* Offset in bytes to next verdaux - entry */ -} Elf32_Verdaux; - -typedef struct -{ - Elf64_Word vda_name; /* Version or dependency names */ - Elf64_Word vda_next; /* Offset in bytes to next verdaux - entry */ -} Elf64_Verdaux; - - -/* Version dependency section. */ - -typedef struct -{ - Elf32_Half vn_version; /* Version of structure */ - Elf32_Half vn_cnt; /* Number of associated aux entries */ - Elf32_Word vn_file; /* Offset of filename for this - dependency */ - Elf32_Word vn_aux; /* Offset in bytes to vernaux array */ - Elf32_Word vn_next; /* Offset in bytes to next verneed - entry */ -} Elf32_Verneed; - -typedef struct -{ - Elf64_Half vn_version; /* Version of structure */ - Elf64_Half vn_cnt; /* Number of associated aux entries */ - Elf64_Word vn_file; /* Offset of filename for this - dependency */ - Elf64_Word vn_aux; /* Offset in bytes to vernaux array */ - Elf64_Word vn_next; /* Offset in bytes to next verneed - entry */ -} Elf64_Verneed; - - -/* Legal values for vn_version (version revision). */ -#define VER_NEED_NONE 0 /* No version */ -#define VER_NEED_CURRENT 1 /* Current version */ -#define VER_NEED_NUM 2 /* Given version number */ - -/* Auxiliary needed version information. */ - -typedef struct -{ - Elf32_Word vna_hash; /* Hash value of dependency name */ - Elf32_Half vna_flags; /* Dependency specific information */ - Elf32_Half vna_other; /* Unused */ - Elf32_Word vna_name; /* Dependency name string offset */ - Elf32_Word vna_next; /* Offset in bytes to next vernaux - entry */ -} Elf32_Vernaux; - -typedef struct -{ - Elf64_Word vna_hash; /* Hash value of dependency name */ - Elf64_Half vna_flags; /* Dependency specific information */ - Elf64_Half vna_other; /* Unused */ - Elf64_Word vna_name; /* Dependency name string offset */ - Elf64_Word vna_next; /* Offset in bytes to next vernaux - entry */ -} Elf64_Vernaux; - - -/* Legal values for vna_flags. */ -#define VER_FLG_WEAK 0x2 /* Weak version identifier */ - - -/* Auxiliary vector. */ - -/* This vector is normally only used by the program interpreter. The - usual definition in an ABI supplement uses the name auxv_t. The - vector is not usually defined in a standard file, but it - can't hurt. We rename it to avoid conflicts. The sizes of these - types are an arrangement between the exec server and the program - interpreter, so we don't fully specify them here. */ - -typedef struct -{ - int a_type; /* Entry type */ - union - { - long int a_val; /* Integer value */ - void *a_ptr; /* Pointer value */ - void (*a_fcn) (void); /* Function pointer value */ - } a_un; -} Elf32_auxv_t; - -typedef struct -{ - long int a_type; /* Entry type */ - union - { - long int a_val; /* Integer value */ - void *a_ptr; /* Pointer value */ - void (*a_fcn) (void); /* Function pointer value */ - } a_un; -} Elf64_auxv_t; - -/* Legal values for a_type (entry type). */ - -#define AT_NULL 0 /* End of vector */ -#define AT_IGNORE 1 /* Entry should be ignored */ -#define AT_EXECFD 2 /* File descriptor of program */ -#define AT_PHDR 3 /* Program headers for program */ -#define AT_PHENT 4 /* Size of program header entry */ -#define AT_PHNUM 5 /* Number of program headers */ -#define AT_PAGESZ 6 /* System page size */ -#define AT_BASE 7 /* Base address of interpreter */ -#define AT_FLAGS 8 /* Flags */ -#define AT_ENTRY 9 /* Entry point of program */ -#define AT_NOTELF 10 /* Program is not ELF */ -#define AT_UID 11 /* Real uid */ -#define AT_EUID 12 /* Effective uid */ -#define AT_GID 13 /* Real gid */ -#define AT_EGID 14 /* Effective gid */ -#define AT_CLKTCK 17 /* Frequency of times() */ - -/* Some more special a_type values describing the hardware. */ -#define AT_PLATFORM 15 /* String identifying platform. */ -#define AT_HWCAP 16 /* Machine dependent hints about - processor capabilities. */ - -/* This entry gives some information about the FPU initialization - performed by the kernel. */ -#define AT_FPUCW 18 /* Used FPU control word. */ - -/* Cache block sizes. */ -#define AT_DCACHEBSIZE 19 /* Data cache block size. */ -#define AT_ICACHEBSIZE 20 /* Instruction cache block size. */ -#define AT_UCACHEBSIZE 21 /* Unified cache block size. */ - -/* A special ignored value for PPC, used by the kernel to control the - interpretation of the AUXV. Must be > 16. */ -#define AT_IGNOREPPC 22 /* Entry should be ignored */ - -/* Pointer to the global system page used for system calls and other - nice things. */ -#define AT_SYSINFO 32 - - -/* Note section contents. Each entry in the note section begins with - a header of a fixed form. */ - -typedef struct -{ - Elf32_Word n_namesz; /* Length of the note's name. */ - Elf32_Word n_descsz; /* Length of the note's descriptor. */ - Elf32_Word n_type; /* Type of the note. */ -} Elf32_Nhdr; - -typedef struct -{ - Elf64_Word n_namesz; /* Length of the note's name. */ - Elf64_Word n_descsz; /* Length of the note's descriptor. */ - Elf64_Word n_type; /* Type of the note. */ -} Elf64_Nhdr; - -/* Known names of notes. */ - -/* Solaris entries in the note section have this name. */ -#define ELF_NOTE_SOLARIS "SUNW Solaris" - -/* Note entries for GNU systems have this name. */ -#define ELF_NOTE_GNU "GNU" - - -/* Defined types of notes for Solaris. */ - -/* Value of descriptor (one word) is desired pagesize for the binary. */ -#define ELF_NOTE_PAGESIZE_HINT 1 - - -/* Defined note types for GNU systems. */ - -/* ABI information. The descriptor consists of words: - word 0: OS descriptor - word 1: major version of the ABI - word 2: minor version of the ABI - word 3: subminor version of the ABI -*/ -#define ELF_NOTE_ABI 1 - -/* Known OSes. These value can appear in word 0 of an ELF_NOTE_ABI - note section entry. */ -#define ELF_NOTE_OS_LINUX 0 -#define ELF_NOTE_OS_GNU 1 -#define ELF_NOTE_OS_SOLARIS2 2 -#define ELF_NOTE_OS_FREEBSD 3 - - -/* Move records. */ -typedef struct -{ - Elf32_Xword m_value; /* Symbol value. */ - Elf32_Word m_info; /* Size and index. */ - Elf32_Word m_poffset; /* Symbol offset. */ - Elf32_Half m_repeat; /* Repeat count. */ - Elf32_Half m_stride; /* Stride info. */ -} Elf32_Move; - -typedef struct -{ - Elf64_Xword m_value; /* Symbol value. */ - Elf64_Xword m_info; /* Size and index. */ - Elf64_Xword m_poffset; /* Symbol offset. */ - Elf64_Half m_repeat; /* Repeat count. */ - Elf64_Half m_stride; /* Stride info. */ -} Elf64_Move; - -/* Macro to construct move records. */ -#define ELF32_M_SYM(info) ((info) >> 8) -#define ELF32_M_SIZE(info) ((unsigned char) (info)) -#define ELF32_M_INFO(sym, size) (((sym) << 8) + (unsigned char) (size)) - -#define ELF64_M_SYM(info) ELF32_M_SYM (info) -#define ELF64_M_SIZE(info) ELF32_M_SIZE (info) -#define ELF64_M_INFO(sym, size) ELF32_M_INFO (sym, size) - - -/* Motorola 68k specific definitions. */ - -/* Values for Elf32_Ehdr.e_flags. */ -#define EF_CPU32 0x00810000 - -/* m68k relocs. */ - -#define R_68K_NONE 0 /* No reloc */ -#define R_68K_32 1 /* Direct 32 bit */ -#define R_68K_16 2 /* Direct 16 bit */ -#define R_68K_8 3 /* Direct 8 bit */ -#define R_68K_PC32 4 /* PC relative 32 bit */ -#define R_68K_PC16 5 /* PC relative 16 bit */ -#define R_68K_PC8 6 /* PC relative 8 bit */ -#define R_68K_GOT32 7 /* 32 bit PC relative GOT entry */ -#define R_68K_GOT16 8 /* 16 bit PC relative GOT entry */ -#define R_68K_GOT8 9 /* 8 bit PC relative GOT entry */ -#define R_68K_GOT32O 10 /* 32 bit GOT offset */ -#define R_68K_GOT16O 11 /* 16 bit GOT offset */ -#define R_68K_GOT8O 12 /* 8 bit GOT offset */ -#define R_68K_PLT32 13 /* 32 bit PC relative PLT address */ -#define R_68K_PLT16 14 /* 16 bit PC relative PLT address */ -#define R_68K_PLT8 15 /* 8 bit PC relative PLT address */ -#define R_68K_PLT32O 16 /* 32 bit PLT offset */ -#define R_68K_PLT16O 17 /* 16 bit PLT offset */ -#define R_68K_PLT8O 18 /* 8 bit PLT offset */ -#define R_68K_COPY 19 /* Copy symbol at runtime */ -#define R_68K_GLOB_DAT 20 /* Create GOT entry */ -#define R_68K_JMP_SLOT 21 /* Create PLT entry */ -#define R_68K_RELATIVE 22 /* Adjust by program base */ -/* Keep this the last entry. */ -#define R_68K_NUM 23 - -/* Intel 80386 specific definitions. */ - -/* i386 relocs. */ - -#define R_386_NONE 0 /* No reloc */ -#define R_386_32 1 /* Direct 32 bit */ -#define R_386_PC32 2 /* PC relative 32 bit */ -#define R_386_GOT32 3 /* 32 bit GOT entry */ -#define R_386_PLT32 4 /* 32 bit PLT address */ -#define R_386_COPY 5 /* Copy symbol at runtime */ -#define R_386_GLOB_DAT 6 /* Create GOT entry */ -#define R_386_JMP_SLOT 7 /* Create PLT entry */ -#define R_386_RELATIVE 8 /* Adjust by program base */ -#define R_386_GOTOFF 9 /* 32 bit offset to GOT */ -#define R_386_GOTPC 10 /* 32 bit PC relative offset to GOT */ -#define R_386_32PLT 11 -#define R_386_TLS_TPOFF 14 /* Offset in static TLS block */ -#define R_386_TLS_IE 15 /* Address of GOT entry for static TLS - block offset */ -#define R_386_TLS_GOTIE 16 /* GOT entry for static TLS block - offset */ -#define R_386_TLS_LE 17 /* Offset relative to static TLS - block */ -#define R_386_TLS_GD 18 /* Direct 32 bit for GNU version of - general dynamic thread local data */ -#define R_386_TLS_LDM 19 /* Direct 32 bit for GNU version of - local dynamic thread local data - in LE code */ -#define R_386_16 20 -#define R_386_PC16 21 -#define R_386_8 22 -#define R_386_PC8 23 -#define R_386_TLS_GD_32 24 /* Direct 32 bit for general dynamic - thread local data */ -#define R_386_TLS_GD_PUSH 25 /* Tag for pushl in GD TLS code */ -#define R_386_TLS_GD_CALL 26 /* Relocation for call to - __tls_get_addr() */ -#define R_386_TLS_GD_POP 27 /* Tag for popl in GD TLS code */ -#define R_386_TLS_LDM_32 28 /* Direct 32 bit for local dynamic - thread local data in LE code */ -#define R_386_TLS_LDM_PUSH 29 /* Tag for pushl in LDM TLS code */ -#define R_386_TLS_LDM_CALL 30 /* Relocation for call to - __tls_get_addr() in LDM code */ -#define R_386_TLS_LDM_POP 31 /* Tag for popl in LDM TLS code */ -#define R_386_TLS_LDO_32 32 /* Offset relative to TLS block */ -#define R_386_TLS_IE_32 33 /* GOT entry for negated static TLS - block offset */ -#define R_386_TLS_LE_32 34 /* Negated offset relative to static - TLS block */ -#define R_386_TLS_DTPMOD32 35 /* ID of module containing symbol */ -#define R_386_TLS_DTPOFF32 36 /* Offset in TLS block */ -#define R_386_TLS_TPOFF32 37 /* Negated offset in static TLS block */ -/* Keep this the last entry. */ -#define R_386_NUM 38 - -/* SUN SPARC specific definitions. */ - -/* Legal values for ST_TYPE subfield of st_info (symbol type). */ - -#define STT_REGISTER 13 /* Global register reserved to app. */ - -/* Values for Elf64_Ehdr.e_flags. */ - -#define EF_SPARCV9_MM 3 -#define EF_SPARCV9_TSO 0 -#define EF_SPARCV9_PSO 1 -#define EF_SPARCV9_RMO 2 -#define EF_SPARC_LEDATA 0x800000 /* little endian data */ -#define EF_SPARC_EXT_MASK 0xFFFF00 -#define EF_SPARC_32PLUS 0x000100 /* generic V8+ features */ -#define EF_SPARC_SUN_US1 0x000200 /* Sun UltraSPARC1 extensions */ -#define EF_SPARC_HAL_R1 0x000400 /* HAL R1 extensions */ -#define EF_SPARC_SUN_US3 0x000800 /* Sun UltraSPARCIII extensions */ - -/* SPARC relocs. */ - -#define R_SPARC_NONE 0 /* No reloc */ -#define R_SPARC_8 1 /* Direct 8 bit */ -#define R_SPARC_16 2 /* Direct 16 bit */ -#define R_SPARC_32 3 /* Direct 32 bit */ -#define R_SPARC_DISP8 4 /* PC relative 8 bit */ -#define R_SPARC_DISP16 5 /* PC relative 16 bit */ -#define R_SPARC_DISP32 6 /* PC relative 32 bit */ -#define R_SPARC_WDISP30 7 /* PC relative 30 bit shifted */ -#define R_SPARC_WDISP22 8 /* PC relative 22 bit shifted */ -#define R_SPARC_HI22 9 /* High 22 bit */ -#define R_SPARC_22 10 /* Direct 22 bit */ -#define R_SPARC_13 11 /* Direct 13 bit */ -#define R_SPARC_LO10 12 /* Truncated 10 bit */ -#define R_SPARC_GOT10 13 /* Truncated 10 bit GOT entry */ -#define R_SPARC_GOT13 14 /* 13 bit GOT entry */ -#define R_SPARC_GOT22 15 /* 22 bit GOT entry shifted */ -#define R_SPARC_PC10 16 /* PC relative 10 bit truncated */ -#define R_SPARC_PC22 17 /* PC relative 22 bit shifted */ -#define R_SPARC_WPLT30 18 /* 30 bit PC relative PLT address */ -#define R_SPARC_COPY 19 /* Copy symbol at runtime */ -#define R_SPARC_GLOB_DAT 20 /* Create GOT entry */ -#define R_SPARC_JMP_SLOT 21 /* Create PLT entry */ -#define R_SPARC_RELATIVE 22 /* Adjust by program base */ -#define R_SPARC_UA32 23 /* Direct 32 bit unaligned */ - -/* Additional Sparc64 relocs. */ - -#define R_SPARC_PLT32 24 /* Direct 32 bit ref to PLT entry */ -#define R_SPARC_HIPLT22 25 /* High 22 bit PLT entry */ -#define R_SPARC_LOPLT10 26 /* Truncated 10 bit PLT entry */ -#define R_SPARC_PCPLT32 27 /* PC rel 32 bit ref to PLT entry */ -#define R_SPARC_PCPLT22 28 /* PC rel high 22 bit PLT entry */ -#define R_SPARC_PCPLT10 29 /* PC rel trunc 10 bit PLT entry */ -#define R_SPARC_10 30 /* Direct 10 bit */ -#define R_SPARC_11 31 /* Direct 11 bit */ -#define R_SPARC_64 32 /* Direct 64 bit */ -#define R_SPARC_OLO10 33 /* 10bit with secondary 13bit addend */ -#define R_SPARC_HH22 34 /* Top 22 bits of direct 64 bit */ -#define R_SPARC_HM10 35 /* High middle 10 bits of ... */ -#define R_SPARC_LM22 36 /* Low middle 22 bits of ... */ -#define R_SPARC_PC_HH22 37 /* Top 22 bits of pc rel 64 bit */ -#define R_SPARC_PC_HM10 38 /* High middle 10 bit of ... */ -#define R_SPARC_PC_LM22 39 /* Low miggle 22 bits of ... */ -#define R_SPARC_WDISP16 40 /* PC relative 16 bit shifted */ -#define R_SPARC_WDISP19 41 /* PC relative 19 bit shifted */ -#define R_SPARC_7 43 /* Direct 7 bit */ -#define R_SPARC_5 44 /* Direct 5 bit */ -#define R_SPARC_6 45 /* Direct 6 bit */ -#define R_SPARC_DISP64 46 /* PC relative 64 bit */ -#define R_SPARC_PLT64 47 /* Direct 64 bit ref to PLT entry */ -#define R_SPARC_HIX22 48 /* High 22 bit complemented */ -#define R_SPARC_LOX10 49 /* Truncated 11 bit complemented */ -#define R_SPARC_H44 50 /* Direct high 12 of 44 bit */ -#define R_SPARC_M44 51 /* Direct mid 22 of 44 bit */ -#define R_SPARC_L44 52 /* Direct low 10 of 44 bit */ -#define R_SPARC_REGISTER 53 /* Global register usage */ -#define R_SPARC_UA64 54 /* Direct 64 bit unaligned */ -#define R_SPARC_UA16 55 /* Direct 16 bit unaligned */ -#define R_SPARC_TLS_GD_HI22 56 -#define R_SPARC_TLS_GD_LO10 57 -#define R_SPARC_TLS_GD_ADD 58 -#define R_SPARC_TLS_GD_CALL 59 -#define R_SPARC_TLS_LDM_HI22 60 -#define R_SPARC_TLS_LDM_LO10 61 -#define R_SPARC_TLS_LDM_ADD 62 -#define R_SPARC_TLS_LDM_CALL 63 -#define R_SPARC_TLS_LDO_HIX22 64 -#define R_SPARC_TLS_LDO_LOX10 65 -#define R_SPARC_TLS_LDO_ADD 66 -#define R_SPARC_TLS_IE_HI22 67 -#define R_SPARC_TLS_IE_LO10 68 -#define R_SPARC_TLS_IE_LD 69 -#define R_SPARC_TLS_IE_LDX 70 -#define R_SPARC_TLS_IE_ADD 71 -#define R_SPARC_TLS_LE_HIX22 72 -#define R_SPARC_TLS_LE_LOX10 73 -#define R_SPARC_TLS_DTPMOD32 74 -#define R_SPARC_TLS_DTPMOD64 75 -#define R_SPARC_TLS_DTPOFF32 76 -#define R_SPARC_TLS_DTPOFF64 77 -#define R_SPARC_TLS_TPOFF32 78 -#define R_SPARC_TLS_TPOFF64 79 -/* Keep this the last entry. */ -#define R_SPARC_NUM 80 - -/* For Sparc64, legal values for d_tag of Elf64_Dyn. */ - -#define DT_SPARC_REGISTER 0x70000001 -#define DT_SPARC_NUM 2 - -/* Bits present in AT_HWCAP, primarily for Sparc32. */ - -#define HWCAP_SPARC_FLUSH 1 /* The cpu supports flush insn. */ -#define HWCAP_SPARC_STBAR 2 -#define HWCAP_SPARC_SWAP 4 -#define HWCAP_SPARC_MULDIV 8 -#define HWCAP_SPARC_V9 16 /* The cpu is v9, so v8plus is ok. */ -#define HWCAP_SPARC_ULTRA3 32 - -/* MIPS R3000 specific definitions. */ - -/* Legal values for e_flags field of Elf32_Ehdr. */ - -#define EF_MIPS_NOREORDER 1 /* A .noreorder directive was used */ -#define EF_MIPS_PIC 2 /* Contains PIC code */ -#define EF_MIPS_CPIC 4 /* Uses PIC calling sequence */ -#define EF_MIPS_XGOT 8 -#define EF_MIPS_64BIT_WHIRL 16 -#define EF_MIPS_ABI2 32 -#define EF_MIPS_ABI_ON32 64 -#define EF_MIPS_ARCH 0xf0000000 /* MIPS architecture level */ - -/* Legal values for MIPS architecture level. */ - -#define EF_MIPS_ARCH_1 0x00000000 /* -mips1 code. */ -#define EF_MIPS_ARCH_2 0x10000000 /* -mips2 code. */ -#define EF_MIPS_ARCH_3 0x20000000 /* -mips3 code. */ -#define EF_MIPS_ARCH_4 0x30000000 /* -mips4 code. */ -#define EF_MIPS_ARCH_5 0x40000000 /* -mips5 code. */ -#define EF_MIPS_ARCH_32 0x60000000 /* MIPS32 code. */ -#define EF_MIPS_ARCH_64 0x70000000 /* MIPS64 code. */ - -/* The following are non-official names and should not be used. */ - -#define E_MIPS_ARCH_1 0x00000000 /* -mips1 code. */ -#define E_MIPS_ARCH_2 0x10000000 /* -mips2 code. */ -#define E_MIPS_ARCH_3 0x20000000 /* -mips3 code. */ -#define E_MIPS_ARCH_4 0x30000000 /* -mips4 code. */ -#define E_MIPS_ARCH_5 0x40000000 /* -mips5 code. */ -#define E_MIPS_ARCH_32 0x60000000 /* MIPS32 code. */ -#define E_MIPS_ARCH_64 0x70000000 /* MIPS64 code. */ - -/* Special section indices. */ - -#define SHN_MIPS_ACOMMON 0xff00 /* Allocated common symbols */ -#define SHN_MIPS_TEXT 0xff01 /* Allocated test symbols. */ -#define SHN_MIPS_DATA 0xff02 /* Allocated data symbols. */ -#define SHN_MIPS_SCOMMON 0xff03 /* Small common symbols */ -#define SHN_MIPS_SUNDEFINED 0xff04 /* Small undefined symbols */ - -/* Legal values for sh_type field of Elf32_Shdr. */ - -#define SHT_MIPS_LIBLIST 0x70000000 /* Shared objects used in link */ -#define SHT_MIPS_MSYM 0x70000001 -#define SHT_MIPS_CONFLICT 0x70000002 /* Conflicting symbols */ -#define SHT_MIPS_GPTAB 0x70000003 /* Global data area sizes */ -#define SHT_MIPS_UCODE 0x70000004 /* Reserved for SGI/MIPS compilers */ -#define SHT_MIPS_DEBUG 0x70000005 /* MIPS ECOFF debugging information*/ -#define SHT_MIPS_REGINFO 0x70000006 /* Register usage information */ -#define SHT_MIPS_PACKAGE 0x70000007 -#define SHT_MIPS_PACKSYM 0x70000008 -#define SHT_MIPS_RELD 0x70000009 -#define SHT_MIPS_IFACE 0x7000000b -#define SHT_MIPS_CONTENT 0x7000000c -#define SHT_MIPS_OPTIONS 0x7000000d /* Miscellaneous options. */ -#define SHT_MIPS_SHDR 0x70000010 -#define SHT_MIPS_FDESC 0x70000011 -#define SHT_MIPS_EXTSYM 0x70000012 -#define SHT_MIPS_DENSE 0x70000013 -#define SHT_MIPS_PDESC 0x70000014 -#define SHT_MIPS_LOCSYM 0x70000015 -#define SHT_MIPS_AUXSYM 0x70000016 -#define SHT_MIPS_OPTSYM 0x70000017 -#define SHT_MIPS_LOCSTR 0x70000018 -#define SHT_MIPS_LINE 0x70000019 -#define SHT_MIPS_RFDESC 0x7000001a -#define SHT_MIPS_DELTASYM 0x7000001b -#define SHT_MIPS_DELTAINST 0x7000001c -#define SHT_MIPS_DELTACLASS 0x7000001d -#define SHT_MIPS_DWARF 0x7000001e /* DWARF debugging information. */ -#define SHT_MIPS_DELTADECL 0x7000001f -#define SHT_MIPS_SYMBOL_LIB 0x70000020 -#define SHT_MIPS_EVENTS 0x70000021 /* Event section. */ -#define SHT_MIPS_TRANSLATE 0x70000022 -#define SHT_MIPS_PIXIE 0x70000023 -#define SHT_MIPS_XLATE 0x70000024 -#define SHT_MIPS_XLATE_DEBUG 0x70000025 -#define SHT_MIPS_WHIRL 0x70000026 -#define SHT_MIPS_EH_REGION 0x70000027 -#define SHT_MIPS_XLATE_OLD 0x70000028 -#define SHT_MIPS_PDR_EXCEPTION 0x70000029 - -/* Legal values for sh_flags field of Elf32_Shdr. */ - -#define SHF_MIPS_GPREL 0x10000000 /* Must be part of global data area */ -#define SHF_MIPS_MERGE 0x20000000 -#define SHF_MIPS_ADDR 0x40000000 -#define SHF_MIPS_STRINGS 0x80000000 -#define SHF_MIPS_NOSTRIP 0x08000000 -#define SHF_MIPS_LOCAL 0x04000000 -#define SHF_MIPS_NAMES 0x02000000 -#define SHF_MIPS_NODUPE 0x01000000 - - -/* Symbol tables. */ - -/* MIPS specific values for `st_other'. */ -#define STO_MIPS_DEFAULT 0x0 -#define STO_MIPS_INTERNAL 0x1 -#define STO_MIPS_HIDDEN 0x2 -#define STO_MIPS_PROTECTED 0x3 -#define STO_MIPS_SC_ALIGN_UNUSED 0xff - -/* MIPS specific values for `st_info'. */ -#define STB_MIPS_SPLIT_COMMON 13 - -/* Entries found in sections of type SHT_MIPS_GPTAB. */ - -typedef union -{ - struct - { - Elf32_Word gt_current_g_value; /* -G value used for compilation */ - Elf32_Word gt_unused; /* Not used */ - } gt_header; /* First entry in section */ - struct - { - Elf32_Word gt_g_value; /* If this value were used for -G */ - Elf32_Word gt_bytes; /* This many bytes would be used */ - } gt_entry; /* Subsequent entries in section */ -} Elf32_gptab; - -/* Entry found in sections of type SHT_MIPS_REGINFO. */ - -typedef struct -{ - Elf32_Word ri_gprmask; /* General registers used */ - Elf32_Word ri_cprmask[4]; /* Coprocessor registers used */ - Elf32_Sword ri_gp_value; /* $gp register value */ -} Elf32_RegInfo; - -/* Entries found in sections of type SHT_MIPS_OPTIONS. */ - -typedef struct -{ - unsigned char kind; /* Determines interpretation of the - variable part of descriptor. */ - unsigned char size; /* Size of descriptor, including header. */ - Elf32_Section section; /* Section header index of section affected, - 0 for global options. */ - Elf32_Word info; /* Kind-specific information. */ -} Elf_Options; - -/* Values for `kind' field in Elf_Options. */ - -#define ODK_NULL 0 /* Undefined. */ -#define ODK_REGINFO 1 /* Register usage information. */ -#define ODK_EXCEPTIONS 2 /* Exception processing options. */ -#define ODK_PAD 3 /* Section padding options. */ -#define ODK_HWPATCH 4 /* Hardware workarounds performed */ -#define ODK_FILL 5 /* record the fill value used by the linker. */ -#define ODK_TAGS 6 /* reserve space for desktop tools to write. */ -#define ODK_HWAND 7 /* HW workarounds. 'AND' bits when merging. */ -#define ODK_HWOR 8 /* HW workarounds. 'OR' bits when merging. */ - -/* Values for `info' in Elf_Options for ODK_EXCEPTIONS entries. */ - -#define OEX_FPU_MIN 0x1f /* FPE's which MUST be enabled. */ -#define OEX_FPU_MAX 0x1f00 /* FPE's which MAY be enabled. */ -#define OEX_PAGE0 0x10000 /* page zero must be mapped. */ -#define OEX_SMM 0x20000 /* Force sequential memory mode? */ -#define OEX_FPDBUG 0x40000 /* Force floating point debug mode? */ -#define OEX_PRECISEFP OEX_FPDBUG -#define OEX_DISMISS 0x80000 /* Dismiss invalid address faults? */ - -#define OEX_FPU_INVAL 0x10 -#define OEX_FPU_DIV0 0x08 -#define OEX_FPU_OFLO 0x04 -#define OEX_FPU_UFLO 0x02 -#define OEX_FPU_INEX 0x01 - -/* Masks for `info' in Elf_Options for an ODK_HWPATCH entry. */ - -#define OHW_R4KEOP 0x1 /* R4000 end-of-page patch. */ -#define OHW_R8KPFETCH 0x2 /* may need R8000 prefetch patch. */ -#define OHW_R5KEOP 0x4 /* R5000 end-of-page patch. */ -#define OHW_R5KCVTL 0x8 /* R5000 cvt.[ds].l bug. clean=1. */ - -#define OPAD_PREFIX 0x1 -#define OPAD_POSTFIX 0x2 -#define OPAD_SYMBOL 0x4 - -/* Entry found in `.options' section. */ - -typedef struct -{ - Elf32_Word hwp_flags1; /* Extra flags. */ - Elf32_Word hwp_flags2; /* Extra flags. */ -} Elf_Options_Hw; - -/* Masks for `info' in ElfOptions for ODK_HWAND and ODK_HWOR entries. */ - -#define OHWA0_R4KEOP_CHECKED 0x00000001 -#define OHWA1_R4KEOP_CLEAN 0x00000002 - -/* MIPS relocs. */ - -#define R_MIPS_NONE 0 /* No reloc */ -#define R_MIPS_16 1 /* Direct 16 bit */ -#define R_MIPS_32 2 /* Direct 32 bit */ -#define R_MIPS_REL32 3 /* PC relative 32 bit */ -#define R_MIPS_26 4 /* Direct 26 bit shifted */ -#define R_MIPS_HI16 5 /* High 16 bit */ -#define R_MIPS_LO16 6 /* Low 16 bit */ -#define R_MIPS_GPREL16 7 /* GP relative 16 bit */ -#define R_MIPS_LITERAL 8 /* 16 bit literal entry */ -#define R_MIPS_GOT16 9 /* 16 bit GOT entry */ -#define R_MIPS_PC16 10 /* PC relative 16 bit */ -#define R_MIPS_CALL16 11 /* 16 bit GOT entry for function */ -#define R_MIPS_GPREL32 12 /* GP relative 32 bit */ - -#define R_MIPS_SHIFT5 16 -#define R_MIPS_SHIFT6 17 -#define R_MIPS_64 18 -#define R_MIPS_GOT_DISP 19 -#define R_MIPS_GOT_PAGE 20 -#define R_MIPS_GOT_OFST 21 -#define R_MIPS_GOT_HI16 22 -#define R_MIPS_GOT_LO16 23 -#define R_MIPS_SUB 24 -#define R_MIPS_INSERT_A 25 -#define R_MIPS_INSERT_B 26 -#define R_MIPS_DELETE 27 -#define R_MIPS_HIGHER 28 -#define R_MIPS_HIGHEST 29 -#define R_MIPS_CALL_HI16 30 -#define R_MIPS_CALL_LO16 31 -#define R_MIPS_SCN_DISP 32 -#define R_MIPS_REL16 33 -#define R_MIPS_ADD_IMMEDIATE 34 -#define R_MIPS_PJUMP 35 -#define R_MIPS_RELGOT 36 -#define R_MIPS_JALR 37 -/* Keep this the last entry. */ -#define R_MIPS_NUM 38 - -/* Legal values for p_type field of Elf32_Phdr. */ - -#define PT_MIPS_REGINFO 0x70000000 /* Register usage information */ -#define PT_MIPS_RTPROC 0x70000001 /* Runtime procedure table. */ -#define PT_MIPS_OPTIONS 0x70000002 - -/* Special program header types. */ - -#define PF_MIPS_LOCAL 0x10000000 - -/* Legal values for d_tag field of Elf32_Dyn. */ - -#define DT_MIPS_RLD_VERSION 0x70000001 /* Runtime linker interface version */ -#define DT_MIPS_TIME_STAMP 0x70000002 /* Timestamp */ -#define DT_MIPS_ICHECKSUM 0x70000003 /* Checksum */ -#define DT_MIPS_IVERSION 0x70000004 /* Version string (string tbl index) */ -#define DT_MIPS_FLAGS 0x70000005 /* Flags */ -#define DT_MIPS_BASE_ADDRESS 0x70000006 /* Base address */ -#define DT_MIPS_MSYM 0x70000007 -#define DT_MIPS_CONFLICT 0x70000008 /* Address of CONFLICT section */ -#define DT_MIPS_LIBLIST 0x70000009 /* Address of LIBLIST section */ -#define DT_MIPS_LOCAL_GOTNO 0x7000000a /* Number of local GOT entries */ -#define DT_MIPS_CONFLICTNO 0x7000000b /* Number of CONFLICT entries */ -#define DT_MIPS_LIBLISTNO 0x70000010 /* Number of LIBLIST entries */ -#define DT_MIPS_SYMTABNO 0x70000011 /* Number of DYNSYM entries */ -#define DT_MIPS_UNREFEXTNO 0x70000012 /* First external DYNSYM */ -#define DT_MIPS_GOTSYM 0x70000013 /* First GOT entry in DYNSYM */ -#define DT_MIPS_HIPAGENO 0x70000014 /* Number of GOT page table entries */ -#define DT_MIPS_RLD_MAP 0x70000016 /* Address of run time loader map. */ -#define DT_MIPS_DELTA_CLASS 0x70000017 /* Delta C++ class definition. */ -#define DT_MIPS_DELTA_CLASS_NO 0x70000018 /* Number of entries in - DT_MIPS_DELTA_CLASS. */ -#define DT_MIPS_DELTA_INSTANCE 0x70000019 /* Delta C++ class instances. */ -#define DT_MIPS_DELTA_INSTANCE_NO 0x7000001a /* Number of entries in - DT_MIPS_DELTA_INSTANCE. */ -#define DT_MIPS_DELTA_RELOC 0x7000001b /* Delta relocations. */ -#define DT_MIPS_DELTA_RELOC_NO 0x7000001c /* Number of entries in - DT_MIPS_DELTA_RELOC. */ -#define DT_MIPS_DELTA_SYM 0x7000001d /* Delta symbols that Delta - relocations refer to. */ -#define DT_MIPS_DELTA_SYM_NO 0x7000001e /* Number of entries in - DT_MIPS_DELTA_SYM. */ -#define DT_MIPS_DELTA_CLASSSYM 0x70000020 /* Delta symbols that hold the - class declaration. */ -#define DT_MIPS_DELTA_CLASSSYM_NO 0x70000021 /* Number of entries in - DT_MIPS_DELTA_CLASSSYM. */ -#define DT_MIPS_CXX_FLAGS 0x70000022 /* Flags indicating for C++ flavor. */ -#define DT_MIPS_PIXIE_INIT 0x70000023 -#define DT_MIPS_SYMBOL_LIB 0x70000024 -#define DT_MIPS_LOCALPAGE_GOTIDX 0x70000025 -#define DT_MIPS_LOCAL_GOTIDX 0x70000026 -#define DT_MIPS_HIDDEN_GOTIDX 0x70000027 -#define DT_MIPS_PROTECTED_GOTIDX 0x70000028 -#define DT_MIPS_OPTIONS 0x70000029 /* Address of .options. */ -#define DT_MIPS_INTERFACE 0x7000002a /* Address of .interface. */ -#define DT_MIPS_DYNSTR_ALIGN 0x7000002b -#define DT_MIPS_INTERFACE_SIZE 0x7000002c /* Size of the .interface section. */ -#define DT_MIPS_RLD_TEXT_RESOLVE_ADDR 0x7000002d /* Address of rld_text_rsolve - function stored in GOT. */ -#define DT_MIPS_PERF_SUFFIX 0x7000002e /* Default suffix of dso to be added - by rld on dlopen() calls. */ -#define DT_MIPS_COMPACT_SIZE 0x7000002f /* (O32)Size of compact rel section. */ -#define DT_MIPS_GP_VALUE 0x70000030 /* GP value for aux GOTs. */ -#define DT_MIPS_AUX_DYNAMIC 0x70000031 /* Address of aux .dynamic. */ -#define DT_MIPS_NUM 0x32 - -/* Legal values for DT_MIPS_FLAGS Elf32_Dyn entry. */ - -#define RHF_NONE 0 /* No flags */ -#define RHF_QUICKSTART (1 << 0) /* Use quickstart */ -#define RHF_NOTPOT (1 << 1) /* Hash size not power of 2 */ -#define RHF_NO_LIBRARY_REPLACEMENT (1 << 2) /* Ignore LD_LIBRARY_PATH */ -#define RHF_NO_MOVE (1 << 3) -#define RHF_SGI_ONLY (1 << 4) -#define RHF_GUARANTEE_INIT (1 << 5) -#define RHF_DELTA_C_PLUS_PLUS (1 << 6) -#define RHF_GUARANTEE_START_INIT (1 << 7) -#define RHF_PIXIE (1 << 8) -#define RHF_DEFAULT_DELAY_LOAD (1 << 9) -#define RHF_REQUICKSTART (1 << 10) -#define RHF_REQUICKSTARTED (1 << 11) -#define RHF_CORD (1 << 12) -#define RHF_NO_UNRES_UNDEF (1 << 13) -#define RHF_RLD_ORDER_SAFE (1 << 14) - -/* Entries found in sections of type SHT_MIPS_LIBLIST. */ - -typedef struct -{ - Elf32_Word l_name; /* Name (string table index) */ - Elf32_Word l_time_stamp; /* Timestamp */ - Elf32_Word l_checksum; /* Checksum */ - Elf32_Word l_version; /* Interface version */ - Elf32_Word l_flags; /* Flags */ -} Elf32_Lib; - -typedef struct -{ - Elf64_Word l_name; /* Name (string table index) */ - Elf64_Word l_time_stamp; /* Timestamp */ - Elf64_Word l_checksum; /* Checksum */ - Elf64_Word l_version; /* Interface version */ - Elf64_Word l_flags; /* Flags */ -} Elf64_Lib; - - -/* Legal values for l_flags. */ - -#define LL_NONE 0 -#define LL_EXACT_MATCH (1 << 0) /* Require exact match */ -#define LL_IGNORE_INT_VER (1 << 1) /* Ignore interface version */ -#define LL_REQUIRE_MINOR (1 << 2) -#define LL_EXPORTS (1 << 3) -#define LL_DELAY_LOAD (1 << 4) -#define LL_DELTA (1 << 5) - -/* Entries found in sections of type SHT_MIPS_CONFLICT. */ - -typedef Elf32_Addr Elf32_Conflict; - - -/* HPPA specific definitions. */ - -/* Legal values for e_flags field of Elf32_Ehdr. */ - -#define EF_PARISC_TRAPNIL 0x00010000 /* Trap nil pointer dereference. */ -#define EF_PARISC_EXT 0x00020000 /* Program uses arch. extensions. */ -#define EF_PARISC_LSB 0x00040000 /* Program expects little endian. */ -#define EF_PARISC_WIDE 0x00080000 /* Program expects wide mode. */ -#define EF_PARISC_NO_KABP 0x00100000 /* No kernel assisted branch - prediction. */ -#define EF_PARISC_LAZYSWAP 0x00400000 /* Allow lazy swapping. */ -#define EF_PARISC_ARCH 0x0000ffff /* Architecture version. */ - -/* Defined values for `e_flags & EF_PARISC_ARCH' are: */ - -#define EFA_PARISC_1_0 0x020b /* PA-RISC 1.0 big-endian. */ -#define EFA_PARISC_1_1 0x0210 /* PA-RISC 1.1 big-endian. */ -#define EFA_PARISC_2_0 0x0214 /* PA-RISC 2.0 big-endian. */ - -/* Additional section indeces. */ - -#define SHN_PARISC_ANSI_COMMON 0xff00 /* Section for tenatively declared - symbols in ANSI C. */ -#define SHN_PARISC_HUGE_COMMON 0xff01 /* Common blocks in huge model. */ - -/* Legal values for sh_type field of Elf32_Shdr. */ - -#define SHT_PARISC_EXT 0x70000000 /* Contains product specific ext. */ -#define SHT_PARISC_UNWIND 0x70000001 /* Unwind information. */ -#define SHT_PARISC_DOC 0x70000002 /* Debug info for optimized code. */ - -/* Legal values for sh_flags field of Elf32_Shdr. */ - -#define SHF_PARISC_SHORT 0x20000000 /* Section with short addressing. */ -#define SHF_PARISC_HUGE 0x40000000 /* Section far from gp. */ -#define SHF_PARISC_SBP 0x80000000 /* Static branch prediction code. */ - -/* Legal values for ST_TYPE subfield of st_info (symbol type). */ - -#define STT_PARISC_MILLICODE 13 /* Millicode function entry point. */ - -#define STT_HP_OPAQUE (STT_LOOS + 0x1) -#define STT_HP_STUB (STT_LOOS + 0x2) - -/* HPPA relocs. */ - -#define R_PARISC_NONE 0 /* No reloc. */ -#define R_PARISC_DIR32 1 /* Direct 32-bit reference. */ -#define R_PARISC_DIR21L 2 /* Left 21 bits of eff. address. */ -#define R_PARISC_DIR17R 3 /* Right 17 bits of eff. address. */ -#define R_PARISC_DIR17F 4 /* 17 bits of eff. address. */ -#define R_PARISC_DIR14R 6 /* Right 14 bits of eff. address. */ -#define R_PARISC_PCREL32 9 /* 32-bit rel. address. */ -#define R_PARISC_PCREL21L 10 /* Left 21 bits of rel. address. */ -#define R_PARISC_PCREL17R 11 /* Right 17 bits of rel. address. */ -#define R_PARISC_PCREL17F 12 /* 17 bits of rel. address. */ -#define R_PARISC_PCREL14R 14 /* Right 14 bits of rel. address. */ -#define R_PARISC_DPREL21L 18 /* Left 21 bits of rel. address. */ -#define R_PARISC_DPREL14R 22 /* Right 14 bits of rel. address. */ -#define R_PARISC_GPREL21L 26 /* GP-relative, left 21 bits. */ -#define R_PARISC_GPREL14R 30 /* GP-relative, right 14 bits. */ -#define R_PARISC_LTOFF21L 34 /* LT-relative, left 21 bits. */ -#define R_PARISC_LTOFF14R 38 /* LT-relative, right 14 bits. */ -#define R_PARISC_SECREL32 41 /* 32 bits section rel. address. */ -#define R_PARISC_SEGBASE 48 /* No relocation, set segment base. */ -#define R_PARISC_SEGREL32 49 /* 32 bits segment rel. address. */ -#define R_PARISC_PLTOFF21L 50 /* PLT rel. address, left 21 bits. */ -#define R_PARISC_PLTOFF14R 54 /* PLT rel. address, right 14 bits. */ -#define R_PARISC_LTOFF_FPTR32 57 /* 32 bits LT-rel. function pointer. */ -#define R_PARISC_LTOFF_FPTR21L 58 /* LT-rel. fct ptr, left 21 bits. */ -#define R_PARISC_LTOFF_FPTR14R 62 /* LT-rel. fct ptr, right 14 bits. */ -#define R_PARISC_FPTR64 64 /* 64 bits function address. */ -#define R_PARISC_PLABEL32 65 /* 32 bits function address. */ -#define R_PARISC_PCREL64 72 /* 64 bits PC-rel. address. */ -#define R_PARISC_PCREL22F 74 /* 22 bits PC-rel. address. */ -#define R_PARISC_PCREL14WR 75 /* PC-rel. address, right 14 bits. */ -#define R_PARISC_PCREL14DR 76 /* PC rel. address, right 14 bits. */ -#define R_PARISC_PCREL16F 77 /* 16 bits PC-rel. address. */ -#define R_PARISC_PCREL16WF 78 /* 16 bits PC-rel. address. */ -#define R_PARISC_PCREL16DF 79 /* 16 bits PC-rel. address. */ -#define R_PARISC_DIR64 80 /* 64 bits of eff. address. */ -#define R_PARISC_DIR14WR 83 /* 14 bits of eff. address. */ -#define R_PARISC_DIR14DR 84 /* 14 bits of eff. address. */ -#define R_PARISC_DIR16F 85 /* 16 bits of eff. address. */ -#define R_PARISC_DIR16WF 86 /* 16 bits of eff. address. */ -#define R_PARISC_DIR16DF 87 /* 16 bits of eff. address. */ -#define R_PARISC_GPREL64 88 /* 64 bits of GP-rel. address. */ -#define R_PARISC_GPREL14WR 91 /* GP-rel. address, right 14 bits. */ -#define R_PARISC_GPREL14DR 92 /* GP-rel. address, right 14 bits. */ -#define R_PARISC_GPREL16F 93 /* 16 bits GP-rel. address. */ -#define R_PARISC_GPREL16WF 94 /* 16 bits GP-rel. address. */ -#define R_PARISC_GPREL16DF 95 /* 16 bits GP-rel. address. */ -#define R_PARISC_LTOFF64 96 /* 64 bits LT-rel. address. */ -#define R_PARISC_LTOFF14WR 99 /* LT-rel. address, right 14 bits. */ -#define R_PARISC_LTOFF14DR 100 /* LT-rel. address, right 14 bits. */ -#define R_PARISC_LTOFF16F 101 /* 16 bits LT-rel. address. */ -#define R_PARISC_LTOFF16WF 102 /* 16 bits LT-rel. address. */ -#define R_PARISC_LTOFF16DF 103 /* 16 bits LT-rel. address. */ -#define R_PARISC_SECREL64 104 /* 64 bits section rel. address. */ -#define R_PARISC_SEGREL64 112 /* 64 bits segment rel. address. */ -#define R_PARISC_PLTOFF14WR 115 /* PLT-rel. address, right 14 bits. */ -#define R_PARISC_PLTOFF14DR 116 /* PLT-rel. address, right 14 bits. */ -#define R_PARISC_PLTOFF16F 117 /* 16 bits LT-rel. address. */ -#define R_PARISC_PLTOFF16WF 118 /* 16 bits PLT-rel. address. */ -#define R_PARISC_PLTOFF16DF 119 /* 16 bits PLT-rel. address. */ -#define R_PARISC_LTOFF_FPTR64 120 /* 64 bits LT-rel. function ptr. */ -#define R_PARISC_LTOFF_FPTR14WR 123 /* LT-rel. fct. ptr., right 14 bits. */ -#define R_PARISC_LTOFF_FPTR14DR 124 /* LT-rel. fct. ptr., right 14 bits. */ -#define R_PARISC_LTOFF_FPTR16F 125 /* 16 bits LT-rel. function ptr. */ -#define R_PARISC_LTOFF_FPTR16WF 126 /* 16 bits LT-rel. function ptr. */ -#define R_PARISC_LTOFF_FPTR16DF 127 /* 16 bits LT-rel. function ptr. */ -#define R_PARISC_LORESERVE 128 -#define R_PARISC_COPY 128 /* Copy relocation. */ -#define R_PARISC_IPLT 129 /* Dynamic reloc, imported PLT */ -#define R_PARISC_EPLT 130 /* Dynamic reloc, exported PLT */ -#define R_PARISC_TPREL32 153 /* 32 bits TP-rel. address. */ -#define R_PARISC_TPREL21L 154 /* TP-rel. address, left 21 bits. */ -#define R_PARISC_TPREL14R 158 /* TP-rel. address, right 14 bits. */ -#define R_PARISC_LTOFF_TP21L 162 /* LT-TP-rel. address, left 21 bits. */ -#define R_PARISC_LTOFF_TP14R 166 /* LT-TP-rel. address, right 14 bits.*/ -#define R_PARISC_LTOFF_TP14F 167 /* 14 bits LT-TP-rel. address. */ -#define R_PARISC_TPREL64 216 /* 64 bits TP-rel. address. */ -#define R_PARISC_TPREL14WR 219 /* TP-rel. address, right 14 bits. */ -#define R_PARISC_TPREL14DR 220 /* TP-rel. address, right 14 bits. */ -#define R_PARISC_TPREL16F 221 /* 16 bits TP-rel. address. */ -#define R_PARISC_TPREL16WF 222 /* 16 bits TP-rel. address. */ -#define R_PARISC_TPREL16DF 223 /* 16 bits TP-rel. address. */ -#define R_PARISC_LTOFF_TP64 224 /* 64 bits LT-TP-rel. address. */ -#define R_PARISC_LTOFF_TP14WR 227 /* LT-TP-rel. address, right 14 bits.*/ -#define R_PARISC_LTOFF_TP14DR 228 /* LT-TP-rel. address, right 14 bits.*/ -#define R_PARISC_LTOFF_TP16F 229 /* 16 bits LT-TP-rel. address. */ -#define R_PARISC_LTOFF_TP16WF 230 /* 16 bits LT-TP-rel. address. */ -#define R_PARISC_LTOFF_TP16DF 231 /* 16 bits LT-TP-rel. address. */ -#define R_PARISC_HIRESERVE 255 - -/* Legal values for p_type field of Elf32_Phdr/Elf64_Phdr. */ - -#define PT_HP_TLS (PT_LOOS + 0x0) -#define PT_HP_CORE_NONE (PT_LOOS + 0x1) -#define PT_HP_CORE_VERSION (PT_LOOS + 0x2) -#define PT_HP_CORE_KERNEL (PT_LOOS + 0x3) -#define PT_HP_CORE_COMM (PT_LOOS + 0x4) -#define PT_HP_CORE_PROC (PT_LOOS + 0x5) -#define PT_HP_CORE_LOADABLE (PT_LOOS + 0x6) -#define PT_HP_CORE_STACK (PT_LOOS + 0x7) -#define PT_HP_CORE_SHM (PT_LOOS + 0x8) -#define PT_HP_CORE_MMF (PT_LOOS + 0x9) -#define PT_HP_PARALLEL (PT_LOOS + 0x10) -#define PT_HP_FASTBIND (PT_LOOS + 0x11) -#define PT_HP_OPT_ANNOT (PT_LOOS + 0x12) -#define PT_HP_HSL_ANNOT (PT_LOOS + 0x13) -#define PT_HP_STACK (PT_LOOS + 0x14) - -#define PT_PARISC_ARCHEXT 0x70000000 -#define PT_PARISC_UNWIND 0x70000001 - -/* Legal values for p_flags field of Elf32_Phdr/Elf64_Phdr. */ - -#define PF_PARISC_SBP 0x08000000 - -#define PF_HP_PAGE_SIZE 0x00100000 -#define PF_HP_FAR_SHARED 0x00200000 -#define PF_HP_NEAR_SHARED 0x00400000 -#define PF_HP_CODE 0x01000000 -#define PF_HP_MODIFY 0x02000000 -#define PF_HP_LAZYSWAP 0x04000000 -#define PF_HP_SBP 0x08000000 - - -/* Alpha specific definitions. */ - -/* Legal values for e_flags field of Elf64_Ehdr. */ - -#define EF_ALPHA_32BIT 1 /* All addresses must be < 2GB. */ -#define EF_ALPHA_CANRELAX 2 /* Relocations for relaxing exist. */ - -/* Legal values for sh_type field of Elf64_Shdr. */ - -/* These two are primerily concerned with ECOFF debugging info. */ -#define SHT_ALPHA_DEBUG 0x70000001 -#define SHT_ALPHA_REGINFO 0x70000002 - -/* Legal values for sh_flags field of Elf64_Shdr. */ - -#define SHF_ALPHA_GPREL 0x10000000 - -/* Legal values for st_other field of Elf64_Sym. */ -#define STO_ALPHA_NOPV 0x80 /* No PV required. */ -#define STO_ALPHA_STD_GPLOAD 0x88 /* PV only used for initial ldgp. */ - -/* Alpha relocs. */ - -#define R_ALPHA_NONE 0 /* No reloc */ -#define R_ALPHA_REFLONG 1 /* Direct 32 bit */ -#define R_ALPHA_REFQUAD 2 /* Direct 64 bit */ -#define R_ALPHA_GPREL32 3 /* GP relative 32 bit */ -#define R_ALPHA_LITERAL 4 /* GP relative 16 bit w/optimization */ -#define R_ALPHA_LITUSE 5 /* Optimization hint for LITERAL */ -#define R_ALPHA_GPDISP 6 /* Add displacement to GP */ -#define R_ALPHA_BRADDR 7 /* PC+4 relative 23 bit shifted */ -#define R_ALPHA_HINT 8 /* PC+4 relative 16 bit shifted */ -#define R_ALPHA_SREL16 9 /* PC relative 16 bit */ -#define R_ALPHA_SREL32 10 /* PC relative 32 bit */ -#define R_ALPHA_SREL64 11 /* PC relative 64 bit */ -#define R_ALPHA_GPRELHIGH 17 /* GP relative 32 bit, high 16 bits */ -#define R_ALPHA_GPRELLOW 18 /* GP relative 32 bit, low 16 bits */ -#define R_ALPHA_GPREL16 19 /* GP relative 16 bit */ -#define R_ALPHA_COPY 24 /* Copy symbol at runtime */ -#define R_ALPHA_GLOB_DAT 25 /* Create GOT entry */ -#define R_ALPHA_JMP_SLOT 26 /* Create PLT entry */ -#define R_ALPHA_RELATIVE 27 /* Adjust by program base */ -#define R_ALPHA_TLS_GD_HI 28 -#define R_ALPHA_TLSGD 29 -#define R_ALPHA_TLS_LDM 30 -#define R_ALPHA_DTPMOD64 31 -#define R_ALPHA_GOTDTPREL 32 -#define R_ALPHA_DTPREL64 33 -#define R_ALPHA_DTPRELHI 34 -#define R_ALPHA_DTPRELLO 35 -#define R_ALPHA_DTPREL16 36 -#define R_ALPHA_GOTTPREL 37 -#define R_ALPHA_TPREL64 38 -#define R_ALPHA_TPRELHI 39 -#define R_ALPHA_TPRELLO 40 -#define R_ALPHA_TPREL16 41 -/* Keep this the last entry. */ -#define R_ALPHA_NUM 46 - -/* Magic values of the LITUSE relocation addend. */ -#define LITUSE_ALPHA_ADDR 0 -#define LITUSE_ALPHA_BASE 1 -#define LITUSE_ALPHA_BYTOFF 2 -#define LITUSE_ALPHA_JSR 3 -#define LITUSE_ALPHA_TLS_GD 4 -#define LITUSE_ALPHA_TLS_LDM 5 - - -/* PowerPC specific declarations */ - -/* Values for Elf32/64_Ehdr.e_flags. */ -#define EF_PPC_EMB 0x80000000 /* PowerPC embedded flag */ - -/* Cygnus local bits below */ -#define EF_PPC_RELOCATABLE 0x00010000 /* PowerPC -mrelocatable flag*/ -#define EF_PPC_RELOCATABLE_LIB 0x00008000 /* PowerPC -mrelocatable-lib - flag */ - -/* PowerPC relocations defined by the ABIs */ -#define R_PPC_NONE 0 -#define R_PPC_ADDR32 1 /* 32bit absolute address */ -#define R_PPC_ADDR24 2 /* 26bit address, 2 bits ignored. */ -#define R_PPC_ADDR16 3 /* 16bit absolute address */ -#define R_PPC_ADDR16_LO 4 /* lower 16bit of absolute address */ -#define R_PPC_ADDR16_HI 5 /* high 16bit of absolute address */ -#define R_PPC_ADDR16_HA 6 /* adjusted high 16bit */ -#define R_PPC_ADDR14 7 /* 16bit address, 2 bits ignored */ -#define R_PPC_ADDR14_BRTAKEN 8 -#define R_PPC_ADDR14_BRNTAKEN 9 -#define R_PPC_REL24 10 /* PC relative 26 bit */ -#define R_PPC_REL14 11 /* PC relative 16 bit */ -#define R_PPC_REL14_BRTAKEN 12 -#define R_PPC_REL14_BRNTAKEN 13 -#define R_PPC_GOT16 14 -#define R_PPC_GOT16_LO 15 -#define R_PPC_GOT16_HI 16 -#define R_PPC_GOT16_HA 17 -#define R_PPC_PLTREL24 18 -#define R_PPC_COPY 19 -#define R_PPC_GLOB_DAT 20 -#define R_PPC_JMP_SLOT 21 -#define R_PPC_RELATIVE 22 -#define R_PPC_LOCAL24PC 23 -#define R_PPC_UADDR32 24 -#define R_PPC_UADDR16 25 -#define R_PPC_REL32 26 -#define R_PPC_PLT32 27 -#define R_PPC_PLTREL32 28 -#define R_PPC_PLT16_LO 29 -#define R_PPC_PLT16_HI 30 -#define R_PPC_PLT16_HA 31 -#define R_PPC_SDAREL16 32 -#define R_PPC_SECTOFF 33 -#define R_PPC_SECTOFF_LO 34 -#define R_PPC_SECTOFF_HI 35 -#define R_PPC_SECTOFF_HA 36 -/* Keep this the last entry. */ -#define R_PPC_NUM 37 - -/* PowerPC64 relocations defined by the ABIs */ -#define R_PPC64_NONE R_PPC_NONE -#define R_PPC64_ADDR32 R_PPC_ADDR32 /* 32bit absolute address. */ -#define R_PPC64_ADDR24 R_PPC_ADDR24 /* 26bit address, word aligned. */ -#define R_PPC64_ADDR16 R_PPC_ADDR16 /* 16bit absolute address. */ -#define R_PPC64_ADDR16_LO R_PPC_ADDR16_LO /* lower 16bits of abs. address. */ -#define R_PPC64_ADDR16_HI R_PPC_ADDR16_HI /* high 16bits of abs. address. */ -#define R_PPC64_ADDR16_HA R_PPC_ADDR16_HA /* adjusted high 16bits. */ -#define R_PPC64_ADDR14 R_PPC_ADDR14 /* 16bit address, word aligned. */ -#define R_PPC64_ADDR14_BRTAKEN R_PPC_ADDR14_BRTAKEN -#define R_PPC64_ADDR14_BRNTAKEN R_PPC_ADDR14_BRNTAKEN -#define R_PPC64_REL24 R_PPC_REL24 /* PC relative 26 bit, word aligned. */ -#define R_PPC64_REL14 R_PPC_REL14 /* PC relative 16 bit. */ -#define R_PPC64_REL14_BRTAKEN R_PPC_REL14_BRTAKEN -#define R_PPC64_REL14_BRNTAKEN R_PPC_REL14_BRNTAKEN -#define R_PPC64_GOT16 R_PPC_GOT16 -#define R_PPC64_GOT16_LO R_PPC_GOT16_LO -#define R_PPC64_GOT16_HI R_PPC_GOT16_HI -#define R_PPC64_GOT16_HA R_PPC_GOT16_HA - -#define R_PPC64_COPY R_PPC_COPY -#define R_PPC64_GLOB_DAT R_PPC_GLOB_DAT -#define R_PPC64_JMP_SLOT R_PPC_JMP_SLOT -#define R_PPC64_RELATIVE R_PPC_RELATIVE - -#define R_PPC64_UADDR32 R_PPC_UADDR32 -#define R_PPC64_UADDR16 R_PPC_UADDR16 -#define R_PPC64_REL32 R_PPC_REL32 -#define R_PPC64_PLT32 R_PPC_PLT32 -#define R_PPC64_PLTREL32 R_PPC_PLTREL32 -#define R_PPC64_PLT16_LO R_PPC_PLT16_LO -#define R_PPC64_PLT16_HI R_PPC_PLT16_HI -#define R_PPC64_PLT16_HA R_PPC_PLT16_HA - -#define R_PPC64_SECTOFF R_PPC_SECTOFF -#define R_PPC64_SECTOFF_LO R_PPC_SECTOFF_LO -#define R_PPC64_SECTOFF_HI R_PPC_SECTOFF_HI -#define R_PPC64_SECTOFF_HA R_PPC_SECTOFF_HA -#define R_PPC64_ADDR30 37 /* word30 (S + A - P) >> 2. */ -#define R_PPC64_ADDR64 38 /* doubleword64 S + A. */ -#define R_PPC64_ADDR16_HIGHER 39 /* half16 #higher(S + A). */ -#define R_PPC64_ADDR16_HIGHERA 40 /* half16 #highera(S + A). */ -#define R_PPC64_ADDR16_HIGHEST 41 /* half16 #highest(S + A). */ -#define R_PPC64_ADDR16_HIGHESTA 42 /* half16 #highesta(S + A). */ -#define R_PPC64_UADDR64 43 /* doubleword64 S + A. */ -#define R_PPC64_REL64 44 /* doubleword64 S + A - P. */ -#define R_PPC64_PLT64 45 /* doubleword64 L + A. */ -#define R_PPC64_PLTREL64 46 /* doubleword64 L + A - P. */ -#define R_PPC64_TOC16 47 /* half16* S + A - .TOC. */ -#define R_PPC64_TOC16_LO 48 /* half16 #lo(S + A - .TOC.). */ -#define R_PPC64_TOC16_HI 49 /* half16 #hi(S + A - .TOC.). */ -#define R_PPC64_TOC16_HA 50 /* half16 #ha(S + A - .TOC.). */ -#define R_PPC64_TOC 51 /* doubleword64 .TOC. */ -#define R_PPC64_PLTGOT16 52 /* half16* M + A. */ -#define R_PPC64_PLTGOT16_LO 53 /* half16 #lo(M + A). */ -#define R_PPC64_PLTGOT16_HI 54 /* half16 #hi(M + A). */ -#define R_PPC64_PLTGOT16_HA 55 /* half16 #ha(M + A). */ - -#define R_PPC64_ADDR16_DS 56 /* half16ds* (S + A) >> 2. */ -#define R_PPC64_ADDR16_LO_DS 57 /* half16ds #lo(S + A) >> 2. */ -#define R_PPC64_GOT16_DS 58 /* half16ds* (G + A) >> 2. */ -#define R_PPC64_GOT16_LO_DS 59 /* half16ds #lo(G + A) >> 2. */ -#define R_PPC64_PLT16_LO_DS 60 /* half16ds #lo(L + A) >> 2. */ -#define R_PPC64_SECTOFF_DS 61 /* half16ds* (R + A) >> 2. */ -#define R_PPC64_SECTOFF_LO_DS 62 /* half16ds #lo(R + A) >> 2. */ -#define R_PPC64_TOC16_DS 63 /* half16ds* (S + A - .TOC.) >> 2. */ -#define R_PPC64_TOC16_LO_DS 64 /* half16ds #lo(S + A - .TOC.) >> 2. */ -#define R_PPC64_PLTGOT16_DS 65 /* half16ds* (M + A) >> 2. */ -#define R_PPC64_PLTGOT16_LO_DS 66 /* half16ds #lo(M + A) >> 2. */ -/* Keep this the last entry. */ -#define R_PPC64_NUM 67 - -/* The remaining relocs are from the Embedded ELF ABI, and are not - in the SVR4 ELF ABI. */ -#define R_PPC_EMB_NADDR32 101 -#define R_PPC_EMB_NADDR16 102 -#define R_PPC_EMB_NADDR16_LO 103 -#define R_PPC_EMB_NADDR16_HI 104 -#define R_PPC_EMB_NADDR16_HA 105 -#define R_PPC_EMB_SDAI16 106 -#define R_PPC_EMB_SDA2I16 107 -#define R_PPC_EMB_SDA2REL 108 -#define R_PPC_EMB_SDA21 109 /* 16 bit offset in SDA */ -#define R_PPC_EMB_MRKREF 110 -#define R_PPC_EMB_RELSEC16 111 -#define R_PPC_EMB_RELST_LO 112 -#define R_PPC_EMB_RELST_HI 113 -#define R_PPC_EMB_RELST_HA 114 -#define R_PPC_EMB_BIT_FLD 115 -#define R_PPC_EMB_RELSDA 116 /* 16 bit relative offset in SDA */ - -/* Diab tool relocations. */ -#define R_PPC_DIAB_SDA21_LO 180 /* like EMB_SDA21, but lower 16 bit */ -#define R_PPC_DIAB_SDA21_HI 181 /* like EMB_SDA21, but high 16 bit */ -#define R_PPC_DIAB_SDA21_HA 182 /* like EMB_SDA21, adjusted high 16 */ -#define R_PPC_DIAB_RELSDA_LO 183 /* like EMB_RELSDA, but lower 16 bit */ -#define R_PPC_DIAB_RELSDA_HI 184 /* like EMB_RELSDA, but high 16 bit */ -#define R_PPC_DIAB_RELSDA_HA 185 /* like EMB_RELSDA, adjusted high 16 */ - -/* This is a phony reloc to handle any old fashioned TOC16 references - that may still be in object files. */ -#define R_PPC_TOC16 255 - -/* PowerPC64 specific values for the Dyn d_tag field. */ -#define DT_PPC64_GLINK (DT_LOPROC + 0) -#define DT_PPC64_NUM 1 - -/* ARM specific declarations */ - -/* Processor specific flags for the ELF header e_flags field. */ -#define EF_ARM_RELEXEC 0x01 -#define EF_ARM_HASENTRY 0x02 -#define EF_ARM_INTERWORK 0x04 -#define EF_ARM_APCS_26 0x08 -#define EF_ARM_APCS_FLOAT 0x10 -#define EF_ARM_PIC 0x20 -#define EF_ARM_ALIGN8 0x40 /* 8-bit structure alignment is in use */ -#define EF_ARM_NEW_ABI 0x80 -#define EF_ARM_OLD_ABI 0x100 - -/* Other constants defined in the ARM ELF spec. version B-01. */ -/* NB. These conflict with values defined above. */ -#define EF_ARM_SYMSARESORTED 0x04 -#define EF_ARM_DYNSYMSUSESEGIDX 0x08 -#define EF_ARM_MAPSYMSFIRST 0x10 -#define EF_ARM_EABIMASK 0XFF000000 - -#define EF_ARM_EABI_VERSION(flags) ((flags) & EF_ARM_EABIMASK) -#define EF_ARM_EABI_UNKNOWN 0x00000000 -#define EF_ARM_EABI_VER1 0x01000000 -#define EF_ARM_EABI_VER2 0x02000000 - -/* Additional symbol types for Thumb */ -#define STT_ARM_TFUNC 0xd - -/* ARM-specific values for sh_flags */ -#define SHF_ARM_ENTRYSECT 0x10000000 /* Section contains an entry point */ -#define SHF_ARM_COMDEF 0x80000000 /* Section may be multiply defined - in the input to a link step */ - -/* ARM-specific program header flags */ -#define PF_ARM_SB 0x10000000 /* Segment contains the location - addressed by the static base */ - -/* ARM relocs. */ -#define R_ARM_NONE 0 /* No reloc */ -#define R_ARM_PC24 1 /* PC relative 26 bit branch */ -#define R_ARM_ABS32 2 /* Direct 32 bit */ -#define R_ARM_REL32 3 /* PC relative 32 bit */ -#define R_ARM_PC13 4 -#define R_ARM_ABS16 5 /* Direct 16 bit */ -#define R_ARM_ABS12 6 /* Direct 12 bit */ -#define R_ARM_THM_ABS5 7 -#define R_ARM_ABS8 8 /* Direct 8 bit */ -#define R_ARM_SBREL32 9 -#define R_ARM_THM_PC22 10 -#define R_ARM_THM_PC8 11 -#define R_ARM_AMP_VCALL9 12 -#define R_ARM_SWI24 13 -#define R_ARM_THM_SWI8 14 -#define R_ARM_XPC25 15 -#define R_ARM_THM_XPC22 16 -#define R_ARM_COPY 20 /* Copy symbol at runtime */ -#define R_ARM_GLOB_DAT 21 /* Create GOT entry */ -#define R_ARM_JUMP_SLOT 22 /* Create PLT entry */ -#define R_ARM_RELATIVE 23 /* Adjust by program base */ -#define R_ARM_GOTOFF 24 /* 32 bit offset to GOT */ -#define R_ARM_GOTPC 25 /* 32 bit PC relative offset to GOT */ -#define R_ARM_GOT32 26 /* 32 bit GOT entry */ -#define R_ARM_PLT32 27 /* 32 bit PLT address */ -#define R_ARM_ALU_PCREL_7_0 32 -#define R_ARM_ALU_PCREL_15_8 33 -#define R_ARM_ALU_PCREL_23_15 34 -#define R_ARM_LDR_SBREL_11_0 35 -#define R_ARM_ALU_SBREL_19_12 36 -#define R_ARM_ALU_SBREL_27_20 37 -#define R_ARM_GNU_VTENTRY 100 -#define R_ARM_GNU_VTINHERIT 101 -#define R_ARM_THM_PC11 102 /* thumb unconditional branch */ -#define R_ARM_THM_PC9 103 /* thumb conditional branch */ -#define R_ARM_RXPC25 249 -#define R_ARM_RSBREL32 250 -#define R_ARM_THM_RPC22 251 -#define R_ARM_RREL32 252 -#define R_ARM_RABS22 253 -#define R_ARM_RPC24 254 -#define R_ARM_RBASE 255 -/* Keep this the last entry. */ -#define R_ARM_NUM 256 - -/* IA-64 specific declarations. */ - -/* Processor specific flags for the Ehdr e_flags field. */ -#define EF_IA_64_MASKOS 0x0000000f /* os-specific flags */ -#define EF_IA_64_ABI64 0x00000010 /* 64-bit ABI */ -#define EF_IA_64_ARCH 0xff000000 /* arch. version mask */ - -/* Processor specific values for the Phdr p_type field. */ -#define PT_IA_64_ARCHEXT (PT_LOPROC + 0) /* arch extension bits */ -#define PT_IA_64_UNWIND (PT_LOPROC + 1) /* ia64 unwind bits */ - -/* Processor specific flags for the Phdr p_flags field. */ -#define PF_IA_64_NORECOV 0x80000000 /* spec insns w/o recovery */ - -/* Processor specific values for the Shdr sh_type field. */ -#define SHT_IA_64_EXT (SHT_LOPROC + 0) /* extension bits */ -#define SHT_IA_64_UNWIND (SHT_LOPROC + 1) /* unwind bits */ - -/* Processor specific flags for the Shdr sh_flags field. */ -#define SHF_IA_64_SHORT 0x10000000 /* section near gp */ -#define SHF_IA_64_NORECOV 0x20000000 /* spec insns w/o recovery */ - -/* Processor specific values for the Dyn d_tag field. */ -#define DT_IA_64_PLT_RESERVE (DT_LOPROC + 0) -#define DT_IA_64_NUM 1 - -/* IA-64 relocations. */ -#define R_IA64_NONE 0x00 /* none */ -#define R_IA64_IMM14 0x21 /* symbol + addend, add imm14 */ -#define R_IA64_IMM22 0x22 /* symbol + addend, add imm22 */ -#define R_IA64_IMM64 0x23 /* symbol + addend, mov imm64 */ -#define R_IA64_DIR32MSB 0x24 /* symbol + addend, data4 MSB */ -#define R_IA64_DIR32LSB 0x25 /* symbol + addend, data4 LSB */ -#define R_IA64_DIR64MSB 0x26 /* symbol + addend, data8 MSB */ -#define R_IA64_DIR64LSB 0x27 /* symbol + addend, data8 LSB */ -#define R_IA64_GPREL22 0x2a /* @gprel(sym + add), add imm22 */ -#define R_IA64_GPREL64I 0x2b /* @gprel(sym + add), mov imm64 */ -#define R_IA64_GPREL32MSB 0x2c /* @gprel(sym + add), data4 MSB */ -#define R_IA64_GPREL32LSB 0x2d /* @gprel(sym + add), data4 LSB */ -#define R_IA64_GPREL64MSB 0x2e /* @gprel(sym + add), data8 MSB */ -#define R_IA64_GPREL64LSB 0x2f /* @gprel(sym + add), data8 LSB */ -#define R_IA64_LTOFF22 0x32 /* @ltoff(sym + add), add imm22 */ -#define R_IA64_LTOFF64I 0x33 /* @ltoff(sym + add), mov imm64 */ -#define R_IA64_PLTOFF22 0x3a /* @pltoff(sym + add), add imm22 */ -#define R_IA64_PLTOFF64I 0x3b /* @pltoff(sym + add), mov imm64 */ -#define R_IA64_PLTOFF64MSB 0x3e /* @pltoff(sym + add), data8 MSB */ -#define R_IA64_PLTOFF64LSB 0x3f /* @pltoff(sym + add), data8 LSB */ -#define R_IA64_FPTR64I 0x43 /* @fptr(sym + add), mov imm64 */ -#define R_IA64_FPTR32MSB 0x44 /* @fptr(sym + add), data4 MSB */ -#define R_IA64_FPTR32LSB 0x45 /* @fptr(sym + add), data4 LSB */ -#define R_IA64_FPTR64MSB 0x46 /* @fptr(sym + add), data8 MSB */ -#define R_IA64_FPTR64LSB 0x47 /* @fptr(sym + add), data8 LSB */ -#define R_IA64_PCREL60B 0x48 /* @pcrel(sym + add), brl */ -#define R_IA64_PCREL21B 0x49 /* @pcrel(sym + add), ptb, call */ -#define R_IA64_PCREL21M 0x4a /* @pcrel(sym + add), chk.s */ -#define R_IA64_PCREL21F 0x4b /* @pcrel(sym + add), fchkf */ -#define R_IA64_PCREL32MSB 0x4c /* @pcrel(sym + add), data4 MSB */ -#define R_IA64_PCREL32LSB 0x4d /* @pcrel(sym + add), data4 LSB */ -#define R_IA64_PCREL64MSB 0x4e /* @pcrel(sym + add), data8 MSB */ -#define R_IA64_PCREL64LSB 0x4f /* @pcrel(sym + add), data8 LSB */ -#define R_IA64_LTOFF_FPTR22 0x52 /* @ltoff(@fptr(s+a)), imm22 */ -#define R_IA64_LTOFF_FPTR64I 0x53 /* @ltoff(@fptr(s+a)), imm64 */ -#define R_IA64_LTOFF_FPTR32MSB 0x54 /* @ltoff(@fptr(s+a)), data4 MSB */ -#define R_IA64_LTOFF_FPTR32LSB 0x55 /* @ltoff(@fptr(s+a)), data4 LSB */ -#define R_IA64_LTOFF_FPTR64MSB 0x56 /* @ltoff(@fptr(s+a)), data8 MSB */ -#define R_IA64_LTOFF_FPTR64LSB 0x57 /* @ltoff(@fptr(s+a)), data8 LSB */ -#define R_IA64_SEGREL32MSB 0x5c /* @segrel(sym + add), data4 MSB */ -#define R_IA64_SEGREL32LSB 0x5d /* @segrel(sym + add), data4 LSB */ -#define R_IA64_SEGREL64MSB 0x5e /* @segrel(sym + add), data8 MSB */ -#define R_IA64_SEGREL64LSB 0x5f /* @segrel(sym + add), data8 LSB */ -#define R_IA64_SECREL32MSB 0x64 /* @secrel(sym + add), data4 MSB */ -#define R_IA64_SECREL32LSB 0x65 /* @secrel(sym + add), data4 LSB */ -#define R_IA64_SECREL64MSB 0x66 /* @secrel(sym + add), data8 MSB */ -#define R_IA64_SECREL64LSB 0x67 /* @secrel(sym + add), data8 LSB */ -#define R_IA64_REL32MSB 0x6c /* data 4 + REL */ -#define R_IA64_REL32LSB 0x6d /* data 4 + REL */ -#define R_IA64_REL64MSB 0x6e /* data 8 + REL */ -#define R_IA64_REL64LSB 0x6f /* data 8 + REL */ -#define R_IA64_LTV32MSB 0x74 /* symbol + addend, data4 MSB */ -#define R_IA64_LTV32LSB 0x75 /* symbol + addend, data4 LSB */ -#define R_IA64_LTV64MSB 0x76 /* symbol + addend, data8 MSB */ -#define R_IA64_LTV64LSB 0x77 /* symbol + addend, data8 LSB */ -#define R_IA64_PCREL21BI 0x79 /* @pcrel(sym + add), 21bit inst */ -#define R_IA64_PCREL22 0x7a /* @pcrel(sym + add), 22bit inst */ -#define R_IA64_PCREL64I 0x7b /* @pcrel(sym + add), 64bit inst */ -#define R_IA64_IPLTMSB 0x80 /* dynamic reloc, imported PLT, MSB */ -#define R_IA64_IPLTLSB 0x81 /* dynamic reloc, imported PLT, LSB */ -#define R_IA64_COPY 0x84 /* copy relocation */ -#define R_IA64_SUB 0x85 /* Addend and symbol difference */ -#define R_IA64_LTOFF22X 0x86 /* LTOFF22, relaxable. */ -#define R_IA64_LDXMOV 0x87 /* Use of LTOFF22X. */ -#define R_IA64_TPREL14 0x91 /* @tprel(sym + add), imm14 */ -#define R_IA64_TPREL22 0x92 /* @tprel(sym + add), imm22 */ -#define R_IA64_TPREL64I 0x93 /* @tprel(sym + add), imm64 */ -#define R_IA64_TPREL64MSB 0x96 /* @tprel(sym + add), data8 MSB */ -#define R_IA64_TPREL64LSB 0x97 /* @tprel(sym + add), data8 LSB */ -#define R_IA64_LTOFF_TPREL22 0x9a /* @ltoff(@tprel(s+a)), imm2 */ -#define R_IA64_DTPMOD64MSB 0xa6 /* @dtpmod(sym + add), data8 MSB */ -#define R_IA64_DTPMOD64LSB 0xa7 /* @dtpmod(sym + add), data8 LSB */ -#define R_IA64_LTOFF_DTPMOD22 0xaa /* @ltoff(@dtpmod(sym + add)), imm22 */ -#define R_IA64_DTPREL14 0xb1 /* @dtprel(sym + add), imm14 */ -#define R_IA64_DTPREL22 0xb2 /* @dtprel(sym + add), imm22 */ -#define R_IA64_DTPREL64I 0xb3 /* @dtprel(sym + add), imm64 */ -#define R_IA64_DTPREL32MSB 0xb4 /* @dtprel(sym + add), data4 MSB */ -#define R_IA64_DTPREL32LSB 0xb5 /* @dtprel(sym + add), data4 LSB */ -#define R_IA64_DTPREL64MSB 0xb6 /* @dtprel(sym + add), data8 MSB */ -#define R_IA64_DTPREL64LSB 0xb7 /* @dtprel(sym + add), data8 LSB */ -#define R_IA64_LTOFF_DTPREL22 0xba /* @ltoff(@dtprel(s+a)), imm22 */ - -/* SH specific declarations */ - -/* SH relocs. */ -#define R_SH_NONE 0 -#define R_SH_DIR32 1 -#define R_SH_REL32 2 -#define R_SH_DIR8WPN 3 -#define R_SH_IND12W 4 -#define R_SH_DIR8WPL 5 -#define R_SH_DIR8WPZ 6 -#define R_SH_DIR8BP 7 -#define R_SH_DIR8W 8 -#define R_SH_DIR8L 9 -#define R_SH_SWITCH16 25 -#define R_SH_SWITCH32 26 -#define R_SH_USES 27 -#define R_SH_COUNT 28 -#define R_SH_ALIGN 29 -#define R_SH_CODE 30 -#define R_SH_DATA 31 -#define R_SH_LABEL 32 -#define R_SH_SWITCH8 33 -#define R_SH_GNU_VTINHERIT 34 -#define R_SH_GNU_VTENTRY 35 -#define R_SH_TLS_GD_32 144 -#define R_SH_TLS_LD_32 145 -#define R_SH_TLS_LDO_32 146 -#define R_SH_TLS_IE_32 147 -#define R_SH_TLS_LE_32 148 -#define R_SH_TLS_DTPMOD32 149 -#define R_SH_TLS_DTPOFF32 150 -#define R_SH_TLS_TPOFF32 151 -#define R_SH_GOT32 160 -#define R_SH_PLT32 161 -#define R_SH_COPY 162 -#define R_SH_GLOB_DAT 163 -#define R_SH_JMP_SLOT 164 -#define R_SH_RELATIVE 165 -#define R_SH_GOTOFF 166 -#define R_SH_GOTPC 167 -/* Keep this the last entry. */ -#define R_SH_NUM 256 - -/* Additional s390 relocs */ - -#define R_390_NONE 0 /* No reloc. */ -#define R_390_8 1 /* Direct 8 bit. */ -#define R_390_12 2 /* Direct 12 bit. */ -#define R_390_16 3 /* Direct 16 bit. */ -#define R_390_32 4 /* Direct 32 bit. */ -#define R_390_PC32 5 /* PC relative 32 bit. */ -#define R_390_GOT12 6 /* 12 bit GOT offset. */ -#define R_390_GOT32 7 /* 32 bit GOT offset. */ -#define R_390_PLT32 8 /* 32 bit PC relative PLT address. */ -#define R_390_COPY 9 /* Copy symbol at runtime. */ -#define R_390_GLOB_DAT 10 /* Create GOT entry. */ -#define R_390_JMP_SLOT 11 /* Create PLT entry. */ -#define R_390_RELATIVE 12 /* Adjust by program base. */ -#define R_390_GOTOFF32 13 /* 32 bit offset to GOT. */ -#define R_390_GOTPC 14 /* 32 bit PC relative offset to GOT. */ -#define R_390_GOT16 15 /* 16 bit GOT offset. */ -#define R_390_PC16 16 /* PC relative 16 bit. */ -#define R_390_PC16DBL 17 /* PC relative 16 bit shifted by 1. */ -#define R_390_PLT16DBL 18 /* 16 bit PC rel. PLT shifted by 1. */ -#define R_390_PC32DBL 19 /* PC relative 32 bit shifted by 1. */ -#define R_390_PLT32DBL 20 /* 32 bit PC rel. PLT shifted by 1. */ -#define R_390_GOTPCDBL 21 /* 32 bit PC rel. GOT shifted by 1. */ -#define R_390_64 22 /* Direct 64 bit. */ -#define R_390_PC64 23 /* PC relative 64 bit. */ -#define R_390_GOT64 24 /* 64 bit GOT offset. */ -#define R_390_PLT64 25 /* 64 bit PC relative PLT address. */ -#define R_390_GOTENT 26 /* 32 bit PC rel. to GOT entry >> 1. */ -#define R_390_GOTOFF16 27 /* 16 bit offset to GOT. */ -#define R_390_GOTOFF64 28 /* 64 bit offset to GOT. */ -#define R_390_GOTPLT12 29 /* 12 bit offset to jump slot. */ -#define R_390_GOTPLT16 30 /* 16 bit offset to jump slot. */ -#define R_390_GOTPLT32 31 /* 32 bit offset to jump slot. */ -#define R_390_GOTPLT64 32 /* 64 bit offset to jump slot. */ -#define R_390_GOTPLTENT 33 /* 32 bit rel. offset to jump slot. */ -#define R_390_PLTOFF16 34 /* 16 bit offset from GOT to PLT. */ -#define R_390_PLTOFF32 35 /* 32 bit offset from GOT to PLT. */ -#define R_390_PLTOFF64 36 /* 16 bit offset from GOT to PLT. */ -#define R_390_TLS_LOAD 37 /* Tag for load insn in TLS code. */ -#define R_390_TLS_GDCALL 38 /* Tag for function call in general - dynamic TLS code. */ -#define R_390_TLS_LDCALL 39 /* Tag for function call in local - dynamic TLS code. */ -#define R_390_TLS_GD32 40 /* Direct 32 bit for general dynamic - thread local data. */ -#define R_390_TLS_GD64 41 /* Direct 64 bit for general dynamic - thread local data. */ -#define R_390_TLS_GOTIE12 42 /* 12 bit GOT offset for static TLS - block offset. */ -#define R_390_TLS_GOTIE32 43 /* 32 bit GOT offset for static TLS - block offset. */ -#define R_390_TLS_GOTIE64 44 /* 64 bit GOT offset for static TLS - block offset. */ -#define R_390_TLS_LDM32 45 /* Direct 32 bit for local dynamic - thread local data in LE code. */ -#define R_390_TLS_LDM64 46 /* Direct 64 bit for local dynamic - thread local data in LE code. */ -#define R_390_TLS_IE32 47 /* 32 bit address of GOT entry for - negated static TLS block offset. */ -#define R_390_TLS_IE64 48 /* 64 bit address of GOT entry for - negated static TLS block offset. */ -#define R_390_TLS_IEENT 49 /* 32 bit rel. offset to GOT entry for - negated static TLS block offset. */ -#define R_390_TLS_LE32 50 /* 32 bit negated offset relative to - static TLS block. */ -#define R_390_TLS_LE64 51 /* 64 bit negated offset relative to - static TLS block. */ -#define R_390_TLS_LDO32 52 /* 32 bit offset relative to TLS - block. */ -#define R_390_TLS_LDO64 53 /* 64 bit offset relative to TLS - block. */ -#define R_390_TLS_DTPMOD 54 /* ID of module containing symbol. */ -#define R_390_TLS_DTPOFF 55 /* Offset in TLS block. */ -#define R_390_TLS_TPOFF 56 /* Negated offset in static TLS - block. */ - -/* Keep this the last entry. */ -#define R_390_NUM 57 - -/* CRIS relocations. */ -#define R_CRIS_NONE 0 -#define R_CRIS_8 1 -#define R_CRIS_16 2 -#define R_CRIS_32 3 -#define R_CRIS_8_PCREL 4 -#define R_CRIS_16_PCREL 5 -#define R_CRIS_32_PCREL 6 -#define R_CRIS_GNU_VTINHERIT 7 -#define R_CRIS_GNU_VTENTRY 8 -#define R_CRIS_COPY 9 -#define R_CRIS_GLOB_DAT 10 -#define R_CRIS_JUMP_SLOT 11 -#define R_CRIS_RELATIVE 12 -#define R_CRIS_16_GOT 13 -#define R_CRIS_32_GOT 14 -#define R_CRIS_16_GOTPLT 15 -#define R_CRIS_32_GOTPLT 16 -#define R_CRIS_32_GOTREL 17 -#define R_CRIS_32_PLT_GOTREL 18 -#define R_CRIS_32_PLT_PCREL 19 - -#define R_CRIS_NUM 20 - -/* AMD x86-64 relocations. */ -#define R_X86_64_NONE 0 /* No reloc */ -#define R_X86_64_64 1 /* Direct 64 bit */ -#define R_X86_64_PC32 2 /* PC relative 32 bit signed */ -#define R_X86_64_GOT32 3 /* 32 bit GOT entry */ -#define R_X86_64_PLT32 4 /* 32 bit PLT address */ -#define R_X86_64_COPY 5 /* Copy symbol at runtime */ -#define R_X86_64_GLOB_DAT 6 /* Create GOT entry */ -#define R_X86_64_JUMP_SLOT 7 /* Create PLT entry */ -#define R_X86_64_RELATIVE 8 /* Adjust by program base */ -#define R_X86_64_GOTPCREL 9 /* 32 bit signed PC relative - offset to GOT */ -#define R_X86_64_32 10 /* Direct 32 bit zero extended */ -#define R_X86_64_32S 11 /* Direct 32 bit sign extended */ -#define R_X86_64_16 12 /* Direct 16 bit zero extended */ -#define R_X86_64_PC16 13 /* 16 bit sign extended pc relative */ -#define R_X86_64_8 14 /* Direct 8 bit sign extended */ -#define R_X86_64_PC8 15 /* 8 bit sign extended pc relative */ -#define R_X86_64_DTPMOD64 16 /* ID of module containing symbol */ -#define R_X86_64_DTPOFF64 17 /* Offset in module's TLS block */ -#define R_X86_64_TPOFF64 18 /* Offset in initial TLS block */ -#define R_X86_64_TLSGD 19 /* 32 bit signed PC relative offset - to two GOT entries for GD symbol */ -#define R_X86_64_TLSLD 20 /* 32 bit signed PC relative offset - to two GOT entries for LD symbol */ -#define R_X86_64_DTPOFF32 21 /* Offset in TLS block */ -#define R_X86_64_GOTTPOFF 22 /* 32 bit signed PC relative offset - to GOT entry for IE symbol */ -#define R_X86_64_TPOFF32 23 /* Offset in initial TLS block */ - -#define R_X86_64_NUM 24 - -#endif /* elf.h */ diff --git a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp b/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp deleted file mode 100644 index efad01ffc..000000000 --- a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp +++ /dev/null @@ -1,167 +0,0 @@ -/* - * nvmemfun.hpp - Non-virtual member function wrappers - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 NVMEMFUN_H -#define NVMEMFUN_H - -#include - -#if defined __GNUC__ -#define HAVE_FAST_NV_MEM_FUN 1 -#define MEM_FUN_WORDS 2 -#if defined __GXX_ABI_VERSION /* GCC >= 3.0 */ -#define MEM_FUN_OFFSET 0 -#else -#define MEM_FUN_OFFSET 1 -#endif -#endif - -#if defined __ICC -#define HAVE_FAST_NV_MEM_FUN 1 -#define MEM_FUN_WORDS 2 -#define MEM_FUN_OFFSET 0 /* GNU C++ ABI v3 */ -#endif - -#if defined __EDG__ && defined __sgi -#define HAVE_FAST_NV_MEM_FUN 1 -#define MEM_FUN_WORDS 3 -#define MEM_FUN_OFFSET 2 -#endif - -#if HAVE_FAST_NV_MEM_FUN - -template< class PMF, class PF > -inline PF nv_mem_fun_of(PMF pmf) { - if (pmf == 0) - return 0; - union { PMF pmf; uintptr p[MEM_FUN_WORDS]; } x; - x.pmf = pmf; - return (PF)x.p[MEM_FUN_OFFSET]; -} - -template< class R, class T > -class nv_mem_fun_t : public std::unary_function { - typedef R (T::*pmf_t)(); - typedef R (*pf_t)(T *); - pf_t pf; -public: - nv_mem_fun_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) {} - R operator()(T *p) const { return (*pf)(p); } - pf_t ptr() const { return pf; } -}; - -template< class R, class T > -class const_nv_mem_fun_t : public std::unary_function { - typedef R (T::*pmf_t)(); - typedef R (*pf_t)(T *); - pf_t const pf; -public: - const_nv_mem_fun_t(pmf_t const pmf) : pf(nv_mem_fun_of(pmf)) {} - R operator()(const T *p) const { return (*pf)(p); } - pf_t ptr() const { return pf; } -}; - -template< class R, class T, class A > -class nv_mem_fun1_t : public std::binary_function { - typedef R (T::*pmf_t)(A); - typedef R (*pf_t)(T *, A x); - pf_t pf; -public: - nv_mem_fun1_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) {} - R operator()(T *p, A x) const { return (*pf)(p, x); } - pf_t ptr() const { return pf; } -}; - -template< class R, class T, class A > -class const_nv_mem_fun1_t : public std::binary_function { - typedef R (T::*pmf_t)(A); - typedef R (*pf_t)(T *, A x); - pf_t const pf; -public: - const_nv_mem_fun1_t(pmf_t const pmf) : pf(nv_mem_fun_of(pmf)) {} - R operator()(const T *p, A x) const { return (*pf)(p, x); } - pf_t ptr() const { return pf; } -}; - -#else - -template< class R, class T > -class nv_mem_fun_t : public std::unary_function { - typedef R (T::*pmf_t)(); - pmf_t pf; -public: - nv_mem_fun_t(R (T::*pmf)()) : pf(pmf) {} - R operator()(T *p) const { return (p->*pf)(); } - pmf_t ptr() const { return pf; } -}; - -template< class R, class T > -class const_nv_mem_fun_t : public std::unary_function { - typedef R (T::*pmf_t)() const; - pmf_t pf; -public: - const_nv_mem_fun_t(R (T::*pmf)() const) : pf(pmf) {} - R operator()(const T *p) const { return (p->*pf)(); } - pmf_t ptr() const { return pf; } -}; - -template< class R, class T, class A > -class nv_mem_fun1_t : public std::binary_function { - typedef R (T::*pmf_t)(A); - pmf_t pf; -public: - nv_mem_fun1_t(R (T::*pmf)(A)) : pf(pmf) {} - R operator()(T *p, A x) const { return (p->*pf)(x); } - pmf_t ptr() const { return pf; } -}; - -template< class R, class T, class A > -class const_nv_mem_fun1_t : public std::binary_function { - typedef R (T::*pmf_t)(A) const; - pmf_t pf; -public: - const_nv_mem_fun1_t(R (T::*pmf)(A) const) : pf(pmf) {} - R operator()(const T *p, A x) const { return (p->*pf)(x); } - pmf_t ptr() const { return pf; } -}; - -#endif - -template< class R, class T > -inline nv_mem_fun_t nv_mem_fun(R (T::*pmf)()) { - return nv_mem_fun_t(pmf); -} - -template< class R, class T > -inline const_nv_mem_fun_t nv_mem_fun(R (T::*pmf)() const) { - return const_nv_mem_fun_t(pmf); -} - -template< class R, class T, class A > -inline nv_mem_fun1_t nv_mem_fun(R (T::*pmf)(A)) { - return nv_mem_fun1_t(pmf); -} - -template< class R, class T, class A > -inline const_nv_mem_fun1_t nv_mem_fun(R (T::*pmf)(A) const) { - return const_nv_mem_fun1_t(pmf); -} - -#endif /* NVMEMFUN_H */ diff --git a/SheepShaver/src/kpx_cpu/include/task-plugin.hpp b/SheepShaver/src/kpx_cpu/include/task-plugin.hpp deleted file mode 100644 index c57fcd087..000000000 --- a/SheepShaver/src/kpx_cpu/include/task-plugin.hpp +++ /dev/null @@ -1,53 +0,0 @@ -/* - * task-plugin.hpp - Task plugin definition - * - * Kheperix (C) 2003 Gwenole Beauchesne - * - * 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 TASK_PLUGIN_H -#define TASK_PLUGIN_H - -#include "basic-plugin.hpp" - -// Forward declarations -class task_struct; -class basic_kernel; -class basic_cpu; -class program_info; - -// Base class for all task components -class task_plugin - : public basic_plugin -{ - // Parent task - task_struct * task; - -public: - - // Constructor - task_plugin(task_struct * parent_task) : task(parent_task) { } - - // Public accessors to resolve various components of a task - basic_kernel * kernel() const; - basic_cpu * cpu() const; - program_info * program() const; -}; - -// Get out of specified task -extern void task_exit(task_plugin *task, int status); - -#endif /* TASK_PLUGIN_H */ diff --git a/SheepShaver/src/kpx_cpu/ppc-dis.c b/SheepShaver/src/kpx_cpu/ppc-dis.c deleted file mode 100644 index a2478e633..000000000 --- a/SheepShaver/src/kpx_cpu/ppc-dis.c +++ /dev/null @@ -1,5489 +0,0 @@ -/* ppc-dis.c -- Disassemble PowerPC instructions - Copyright 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 - Free Software Foundation, Inc. - Written by Ian Lance Taylor, Cygnus Support - -This file is part of GDB, GAS, and the GNU binutils. - -GDB, GAS, and the GNU binutils are free software; you can redistribute -them and/or modify them under the terms of the GNU General Public -License as published by the Free Software Foundation; either version -2, or (at your option) any later version. - -GDB, GAS, and the GNU binutils are distributed in the hope that they -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 file; see the file COPYING. If not, -see . */ - -#include -#include - -#include "dis-asm.h" - -#define BFD_DEFAULT_TARGET_SIZE 64 - -/* ppc.h -- Header file for PowerPC opcode table - Copyright 1994, 1995, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, - 2007 Free Software Foundation, Inc. - Written by Ian Lance Taylor, Cygnus Support - -This file is part of GDB, GAS, and the GNU binutils. - -GDB, GAS, and the GNU binutils are free software; you can redistribute -them and/or modify them under the terms of the GNU General Public -License as published by the Free Software Foundation; either version -1, or (at your option) any later version. - -GDB, GAS, and the GNU binutils are distributed in the hope that they -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 file; see the file COPYING. If not, -see . */ - -/* The opcode table is an array of struct powerpc_opcode. */ - -struct powerpc_opcode -{ - /* The opcode name. */ - const char *name; - - /* The opcode itself. Those bits which will be filled in with - operands are zeroes. */ - unsigned long opcode; - - /* The opcode mask. This is used by the disassembler. This is a - mask containing ones indicating those bits which must match the - opcode field, and zeroes indicating those bits which need not - match (and are presumably filled in by operands). */ - unsigned long mask; - - /* One bit flags for the opcode. These are used to indicate which - specific processors support the instructions. The defined values - are listed below. */ - unsigned long flags; - - /* An array of operand codes. Each code is an index into the - operand table. They appear in the order which the operands must - appear in assembly code, and are terminated by a zero. */ - unsigned char operands[8]; -}; - -/* The table itself is sorted by major opcode number, and is otherwise - in the order in which the disassembler should consider - instructions. */ -extern const struct powerpc_opcode powerpc_opcodes[]; -extern const int powerpc_num_opcodes; - -/* Values defined for the flags field of a struct powerpc_opcode. */ - -/* Opcode is defined for the PowerPC architecture. */ -#define PPC_OPCODE_PPC 1 - -/* Opcode is defined for the POWER (RS/6000) architecture. */ -#define PPC_OPCODE_POWER 2 - -/* Opcode is defined for the POWER2 (Rios 2) architecture. */ -#define PPC_OPCODE_POWER2 4 - -/* Opcode is only defined on 32 bit architectures. */ -#define PPC_OPCODE_32 8 - -/* Opcode is only defined on 64 bit architectures. */ -#define PPC_OPCODE_64 0x10 - -/* Opcode is supported by the Motorola PowerPC 601 processor. The 601 - is assumed to support all PowerPC (PPC_OPCODE_PPC) instructions, - but it also supports many additional POWER instructions. */ -#define PPC_OPCODE_601 0x20 - -/* Opcode is supported in both the Power and PowerPC architectures - (ie, compiler's -mcpu=common or assembler's -mcom). */ -#define PPC_OPCODE_COMMON 0x40 - -/* Opcode is supported for any Power or PowerPC platform (this is - for the assembler's -many option, and it eliminates duplicates). */ -#define PPC_OPCODE_ANY 0x80 - -/* Opcode is supported as part of the 64-bit bridge. */ -#define PPC_OPCODE_64_BRIDGE 0x100 - -/* Opcode is supported by Altivec Vector Unit */ -#define PPC_OPCODE_ALTIVEC 0x200 - -/* Opcode is supported by PowerPC 403 processor. */ -#define PPC_OPCODE_403 0x400 - -/* Opcode is supported by PowerPC BookE processor. */ -#define PPC_OPCODE_BOOKE 0x800 - -/* Opcode is only supported by 64-bit PowerPC BookE processor. */ -#define PPC_OPCODE_BOOKE64 0x1000 - -/* Opcode is supported by PowerPC 440 processor. */ -#define PPC_OPCODE_440 0x2000 - -/* Opcode is only supported by Power4 architecture. */ -#define PPC_OPCODE_POWER4 0x4000 - -/* Opcode isn't supported by Power4 architecture. */ -#define PPC_OPCODE_NOPOWER4 0x8000 - -/* Opcode is only supported by POWERPC Classic architecture. */ -#define PPC_OPCODE_CLASSIC 0x10000 - -/* Opcode is only supported by e500x2 Core. */ -#define PPC_OPCODE_SPE 0x20000 - -/* Opcode is supported by e500x2 Integer select APU. */ -#define PPC_OPCODE_ISEL 0x40000 - -/* Opcode is an e500 SPE floating point instruction. */ -#define PPC_OPCODE_EFS 0x80000 - -/* Opcode is supported by branch locking APU. */ -#define PPC_OPCODE_BRLOCK 0x100000 - -/* Opcode is supported by performance monitor APU. */ -#define PPC_OPCODE_PMR 0x200000 - -/* Opcode is supported by cache locking APU. */ -#define PPC_OPCODE_CACHELCK 0x400000 - -/* Opcode is supported by machine check APU. */ -#define PPC_OPCODE_RFMCI 0x800000 - -/* Opcode is only supported by Power5 architecture. */ -#define PPC_OPCODE_POWER5 0x1000000 - -/* Opcode is supported by PowerPC e300 family. */ -#define PPC_OPCODE_E300 0x2000000 - -/* Opcode is only supported by Power6 architecture. */ -#define PPC_OPCODE_POWER6 0x4000000 - -/* Opcode is only supported by PowerPC Cell family. */ -#define PPC_OPCODE_CELL 0x8000000 - -/* A macro to extract the major opcode from an instruction. */ -#define PPC_OP(i) (((i) >> 26) & 0x3f) - -/* The operands table is an array of struct powerpc_operand. */ - -struct powerpc_operand -{ - /* A bitmask of bits in the operand. */ - unsigned int bitm; - - /* How far the operand is left shifted in the instruction. - -1 to indicate that BITM and SHIFT cannot be used to determine - where the operand goes in the insn. */ - int shift; - - /* Insertion function. This is used by the assembler. To insert an - operand value into an instruction, check this field. - - If it is NULL, execute - i |= (op & o->bitm) << o->shift; - (i is the instruction which we are filling in, o is a pointer to - this structure, and op is the operand value). - - If this field is not NULL, then simply call it with the - instruction and the operand value. It will return the new value - of the instruction. If the ERRMSG argument is not NULL, then if - the operand value is illegal, *ERRMSG will be set to a warning - string (the operand will be inserted in any case). If the - operand value is legal, *ERRMSG will be unchanged (most operands - can accept any value). */ - unsigned long (*insert) - (unsigned long instruction, long op, int dialect, const char **errmsg); - - /* Extraction function. This is used by the disassembler. To - extract this operand type from an instruction, check this field. - - If it is NULL, compute - op = (i >> o->shift) & o->bitm; - if ((o->flags & PPC_OPERAND_SIGNED) != 0) - sign_extend (op); - (i is the instruction, o is a pointer to this structure, and op - is the result). - - If this field is not NULL, then simply call it with the - instruction value. It will return the value of the operand. If - the INVALID argument is not NULL, *INVALID will be set to - non-zero if this operand type can not actually be extracted from - this operand (i.e., the instruction does not match). If the - operand is valid, *INVALID will not be changed. */ - long (*extract) (unsigned long instruction, int dialect, int *invalid); - - /* One bit syntax flags. */ - unsigned long flags; -}; - -/* Elements in the table are retrieved by indexing with values from - the operands field of the powerpc_opcodes table. */ - -extern const struct powerpc_operand powerpc_operands[]; -extern const unsigned int num_powerpc_operands; - -/* Values defined for the flags field of a struct powerpc_operand. */ - -/* This operand takes signed values. */ -#define PPC_OPERAND_SIGNED (0x1) - -/* This operand takes signed values, but also accepts a full positive - range of values when running in 32 bit mode. That is, if bits is - 16, it takes any value from -0x8000 to 0xffff. In 64 bit mode, - this flag is ignored. */ -#define PPC_OPERAND_SIGNOPT (0x2) - -/* This operand does not actually exist in the assembler input. This - is used to support extended mnemonics such as mr, for which two - operands fields are identical. The assembler should call the - insert function with any op value. The disassembler should call - the extract function, ignore the return value, and check the value - placed in the valid argument. */ -#define PPC_OPERAND_FAKE (0x4) - -/* The next operand should be wrapped in parentheses rather than - separated from this one by a comma. This is used for the load and - store instructions which want their operands to look like - reg,displacement(reg) - */ -#define PPC_OPERAND_PARENS (0x8) - -/* This operand may use the symbolic names for the CR fields, which - are - lt 0 gt 1 eq 2 so 3 un 3 - cr0 0 cr1 1 cr2 2 cr3 3 - cr4 4 cr5 5 cr6 6 cr7 7 - These may be combined arithmetically, as in cr2*4+gt. These are - only supported on the PowerPC, not the POWER. */ -#define PPC_OPERAND_CR (0x10) - -/* This operand names a register. The disassembler uses this to print - register names with a leading 'r'. */ -#define PPC_OPERAND_GPR (0x20) - -/* Like PPC_OPERAND_GPR, but don't print a leading 'r' for r0. */ -#define PPC_OPERAND_GPR_0 (0x40) - -/* This operand names a floating point register. The disassembler - prints these with a leading 'f'. */ -#define PPC_OPERAND_FPR (0x80) - -/* This operand is a relative branch displacement. The disassembler - prints these symbolically if possible. */ -#define PPC_OPERAND_RELATIVE (0x100) - -/* This operand is an absolute branch address. The disassembler - prints these symbolically if possible. */ -#define PPC_OPERAND_ABSOLUTE (0x200) - -/* This operand is optional, and is zero if omitted. This is used for - example, in the optional BF field in the comparison instructions. The - assembler must count the number of operands remaining on the line, - and the number of operands remaining for the opcode, and decide - whether this operand is present or not. The disassembler should - print this operand out only if it is not zero. */ -#define PPC_OPERAND_OPTIONAL (0x400) - -/* This flag is only used with PPC_OPERAND_OPTIONAL. If this operand - is omitted, then for the next operand use this operand value plus - 1, ignoring the next operand field for the opcode. This wretched - hack is needed because the Power rotate instructions can take - either 4 or 5 operands. The disassembler should print this operand - out regardless of the PPC_OPERAND_OPTIONAL field. */ -#define PPC_OPERAND_NEXT (0x800) - -/* This operand should be regarded as a negative number for the - purposes of overflow checking (i.e., the normal most negative - number is disallowed and one more than the normal most positive - number is allowed). This flag will only be set for a signed - operand. */ -#define PPC_OPERAND_NEGATIVE (0x1000) - -/* This operand names a vector unit register. The disassembler - prints these with a leading 'v'. */ -#define PPC_OPERAND_VR (0x2000) - -/* This operand is for the DS field in a DS form instruction. */ -#define PPC_OPERAND_DS (0x4000) - -/* This operand is for the DQ field in a DQ form instruction. */ -#define PPC_OPERAND_DQ (0x8000) - -/* Valid range of operand is 0..n rather than 0..n-1. */ -#define PPC_OPERAND_PLUS1 (0x10000) - -/* The POWER and PowerPC assemblers use a few macros. We keep them - with the operands table for simplicity. The macro table is an - array of struct powerpc_macro. */ - -struct powerpc_macro -{ - /* The macro name. */ - const char *name; - - /* The number of operands the macro takes. */ - unsigned int operands; - - /* One bit flags for the opcode. These are used to indicate which - specific processors support the instructions. The values are the - same as those for the struct powerpc_opcode flags field. */ - unsigned long flags; - - /* A format string to turn the macro into a normal instruction. - Each %N in the string is replaced with operand number N (zero - based). */ - const char *format; -}; - -extern const struct powerpc_macro powerpc_macros[]; -extern const int powerpc_num_macros; - -/* ppc-opc.c -- PowerPC opcode list - Copyright 1994, 1995, 1996, 1997, 1998, 2000, 2001, 2002, 2003, 2004, - 2005, 2006, 2007 Free Software Foundation, Inc. - Written by Ian Lance Taylor, Cygnus Support - - This file is part of GDB, GAS, and the GNU binutils. - - GDB, GAS, and the GNU binutils are free software; you can redistribute - them and/or modify them under the terms of the GNU General Public - License as published by the Free Software Foundation; either version - 2, or (at your option) any later version. - - GDB, GAS, and the GNU binutils are distributed in the hope that they - 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 file; see the file COPYING. - If not, see . */ - -/* This file holds the PowerPC opcode table. The opcode table - includes almost all of the extended instruction mnemonics. This - permits the disassembler to use them, and simplifies the assembler - logic, at the cost of increasing the table size. The table is - strictly constant data, so the compiler should be able to put it in - the .text section. - - This file also holds the operand table. All knowledge about - inserting operands into instructions and vice-versa is kept in this - file. */ - -/* Local insertion and extraction functions. */ - -static unsigned long insert_bat (unsigned long, long, int, const char **); -static long extract_bat (unsigned long, int, int *); -static unsigned long insert_bba (unsigned long, long, int, const char **); -static long extract_bba (unsigned long, int, int *); -static unsigned long insert_bdm (unsigned long, long, int, const char **); -static long extract_bdm (unsigned long, int, int *); -static unsigned long insert_bdp (unsigned long, long, int, const char **); -static long extract_bdp (unsigned long, int, int *); -static unsigned long insert_bo (unsigned long, long, int, const char **); -static long extract_bo (unsigned long, int, int *); -static unsigned long insert_boe (unsigned long, long, int, const char **); -static long extract_boe (unsigned long, int, int *); -static unsigned long insert_fxm (unsigned long, long, int, const char **); -static long extract_fxm (unsigned long, int, int *); -static unsigned long insert_mbe (unsigned long, long, int, const char **); -static long extract_mbe (unsigned long, int, int *); -static unsigned long insert_mb6 (unsigned long, long, int, const char **); -static long extract_mb6 (unsigned long, int, int *); -static long extract_nb (unsigned long, int, int *); -static unsigned long insert_nsi (unsigned long, long, int, const char **); -static long extract_nsi (unsigned long, int, int *); -static unsigned long insert_ral (unsigned long, long, int, const char **); -static unsigned long insert_ram (unsigned long, long, int, const char **); -static unsigned long insert_raq (unsigned long, long, int, const char **); -static unsigned long insert_ras (unsigned long, long, int, const char **); -static unsigned long insert_rbs (unsigned long, long, int, const char **); -static long extract_rbs (unsigned long, int, int *); -static unsigned long insert_sh6 (unsigned long, long, int, const char **); -static long extract_sh6 (unsigned long, int, int *); -static unsigned long insert_spr (unsigned long, long, int, const char **); -static long extract_spr (unsigned long, int, int *); -static unsigned long insert_sprg (unsigned long, long, int, const char **); -static long extract_sprg (unsigned long, int, int *); -static unsigned long insert_tbr (unsigned long, long, int, const char **); -static long extract_tbr (unsigned long, int, int *); - -/* The operands table. - - The fields are bitm, shift, insert, extract, flags. - - We used to put parens around the various additions, like the one - for BA just below. However, that caused trouble with feeble - compilers with a limit on depth of a parenthesized expression, like - (reportedly) the compiler in Microsoft Developer Studio 5. So we - omit the parens, since the macros are never used in a context where - the addition will be ambiguous. */ - -const struct powerpc_operand powerpc_operands[] = -{ - /* The zero index is used to indicate the end of the list of - operands. */ -#define UNUSED 0 - { 0, 0, NULL, NULL, 0 }, - - /* The BA field in an XL form instruction. */ -#define BA UNUSED + 1 - /* The BI field in a B form or XL form instruction. */ -#define BI BA -#define BI_MASK (0x1f << 16) - { 0x1f, 16, NULL, NULL, PPC_OPERAND_CR }, - - /* The BA field in an XL form instruction when it must be the same - as the BT field in the same instruction. */ -#define BAT BA + 1 - { 0x1f, 16, insert_bat, extract_bat, PPC_OPERAND_FAKE }, - - /* The BB field in an XL form instruction. */ -#define BB BAT + 1 -#define BB_MASK (0x1f << 11) - { 0x1f, 11, NULL, NULL, PPC_OPERAND_CR }, - - /* The BB field in an XL form instruction when it must be the same - as the BA field in the same instruction. */ -#define BBA BB + 1 - { 0x1f, 11, insert_bba, extract_bba, PPC_OPERAND_FAKE }, - - /* The BD field in a B form instruction. The lower two bits are - forced to zero. */ -#define BD BBA + 1 - { 0xfffc, 0, NULL, NULL, PPC_OPERAND_RELATIVE | PPC_OPERAND_SIGNED }, - - /* The BD field in a B form instruction when absolute addressing is - used. */ -#define BDA BD + 1 - { 0xfffc, 0, NULL, NULL, PPC_OPERAND_ABSOLUTE | PPC_OPERAND_SIGNED }, - - /* The BD field in a B form instruction when the - modifier is used. - This sets the y bit of the BO field appropriately. */ -#define BDM BDA + 1 - { 0xfffc, 0, insert_bdm, extract_bdm, - PPC_OPERAND_RELATIVE | PPC_OPERAND_SIGNED }, - - /* The BD field in a B form instruction when the - modifier is used - and absolute address is used. */ -#define BDMA BDM + 1 - { 0xfffc, 0, insert_bdm, extract_bdm, - PPC_OPERAND_ABSOLUTE | PPC_OPERAND_SIGNED }, - - /* The BD field in a B form instruction when the + modifier is used. - This sets the y bit of the BO field appropriately. */ -#define BDP BDMA + 1 - { 0xfffc, 0, insert_bdp, extract_bdp, - PPC_OPERAND_RELATIVE | PPC_OPERAND_SIGNED }, - - /* The BD field in a B form instruction when the + modifier is used - and absolute addressing is used. */ -#define BDPA BDP + 1 - { 0xfffc, 0, insert_bdp, extract_bdp, - PPC_OPERAND_ABSOLUTE | PPC_OPERAND_SIGNED }, - - /* The BF field in an X or XL form instruction. */ -#define BF BDPA + 1 - /* The CRFD field in an X form instruction. */ -#define CRFD BF - { 0x7, 23, NULL, NULL, PPC_OPERAND_CR }, - - /* The BF field in an X or XL form instruction. */ -#define BFF BF + 1 - { 0x7, 23, NULL, NULL, 0 }, - - /* An optional BF field. This is used for comparison instructions, - in which an omitted BF field is taken as zero. */ -#define OBF BFF + 1 - { 0x7, 23, NULL, NULL, PPC_OPERAND_CR | PPC_OPERAND_OPTIONAL }, - - /* The BFA field in an X or XL form instruction. */ -#define BFA OBF + 1 - { 0x7, 18, NULL, NULL, PPC_OPERAND_CR }, - - /* The BO field in a B form instruction. Certain values are - illegal. */ -#define BO BFA + 1 -#define BO_MASK (0x1f << 21) - { 0x1f, 21, insert_bo, extract_bo, 0 }, - - /* The BO field in a B form instruction when the + or - modifier is - used. This is like the BO field, but it must be even. */ -#define BOE BO + 1 - { 0x1e, 21, insert_boe, extract_boe, 0 }, - -#define BH BOE + 1 - { 0x3, 11, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The BT field in an X or XL form instruction. */ -#define BT BH + 1 - { 0x1f, 21, NULL, NULL, PPC_OPERAND_CR }, - - /* The condition register number portion of the BI field in a B form - or XL form instruction. This is used for the extended - conditional branch mnemonics, which set the lower two bits of the - BI field. This field is optional. */ -#define CR BT + 1 - { 0x7, 18, NULL, NULL, PPC_OPERAND_CR | PPC_OPERAND_OPTIONAL }, - - /* The CRB field in an X form instruction. */ -#define CRB CR + 1 - /* The MB field in an M form instruction. */ -#define MB CRB -#define MB_MASK (0x1f << 6) - { 0x1f, 6, NULL, NULL, 0 }, - - /* The CRFS field in an X form instruction. */ -#define CRFS CRB + 1 - { 0x7, 0, NULL, NULL, PPC_OPERAND_CR }, - - /* The CT field in an X form instruction. */ -#define CT CRFS + 1 - /* The MO field in an mbar instruction. */ -#define MO CT - { 0x1f, 21, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The D field in a D form instruction. This is a displacement off - a register, and implies that the next operand is a register in - parentheses. */ -#define D CT + 1 - { 0xffff, 0, NULL, NULL, PPC_OPERAND_PARENS | PPC_OPERAND_SIGNED }, - - /* The DE field in a DE form instruction. This is like D, but is 12 - bits only. */ -#define DE D + 1 - { 0xfff, 4, NULL, NULL, PPC_OPERAND_PARENS | PPC_OPERAND_SIGNED }, - - /* The DES field in a DES form instruction. This is like DS, but is 14 - bits only (12 stored.) */ -#define DES DE + 1 - { 0x3ffc, 2, NULL, NULL, PPC_OPERAND_PARENS | PPC_OPERAND_SIGNED }, - - /* The DQ field in a DQ form instruction. This is like D, but the - lower four bits are forced to zero. */ -#define DQ DES + 1 - { 0xfff0, 0, NULL, NULL, - PPC_OPERAND_PARENS | PPC_OPERAND_SIGNED | PPC_OPERAND_DQ }, - - /* The DS field in a DS form instruction. This is like D, but the - lower two bits are forced to zero. */ -#undef DS -#define DS DQ + 1 - { 0xfffc, 0, NULL, NULL, - PPC_OPERAND_PARENS | PPC_OPERAND_SIGNED | PPC_OPERAND_DS }, - - /* The E field in a wrteei instruction. */ -#define E DS + 1 - { 0x1, 15, NULL, NULL, 0 }, - - /* The FL1 field in a POWER SC form instruction. */ -#define FL1 E + 1 - /* The U field in an X form instruction. */ -#define U FL1 - { 0xf, 12, NULL, NULL, 0 }, - - /* The FL2 field in a POWER SC form instruction. */ -#define FL2 FL1 + 1 - { 0x7, 2, NULL, NULL, 0 }, - - /* The FLM field in an XFL form instruction. */ -#define FLM FL2 + 1 - { 0xff, 17, NULL, NULL, 0 }, - - /* The FRA field in an X or A form instruction. */ -#define FRA FLM + 1 -#define FRA_MASK (0x1f << 16) - { 0x1f, 16, NULL, NULL, PPC_OPERAND_FPR }, - - /* The FRB field in an X or A form instruction. */ -#define FRB FRA + 1 -#define FRB_MASK (0x1f << 11) - { 0x1f, 11, NULL, NULL, PPC_OPERAND_FPR }, - - /* The FRC field in an A form instruction. */ -#define FRC FRB + 1 -#define FRC_MASK (0x1f << 6) - { 0x1f, 6, NULL, NULL, PPC_OPERAND_FPR }, - - /* The FRS field in an X form instruction or the FRT field in a D, X - or A form instruction. */ -#define FRS FRC + 1 -#define FRT FRS - { 0x1f, 21, NULL, NULL, PPC_OPERAND_FPR }, - - /* The FXM field in an XFX instruction. */ -#define FXM FRS + 1 - { 0xff, 12, insert_fxm, extract_fxm, 0 }, - - /* Power4 version for mfcr. */ -#define FXM4 FXM + 1 - { 0xff, 12, insert_fxm, extract_fxm, PPC_OPERAND_OPTIONAL }, - - /* The L field in a D or X form instruction. */ -#define L FXM4 + 1 - { 0x1, 21, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The LEV field in a POWER SVC form instruction. */ -#define SVC_LEV L + 1 - { 0x7f, 5, NULL, NULL, 0 }, - - /* The LEV field in an SC form instruction. */ -#define LEV SVC_LEV + 1 - { 0x7f, 5, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The LI field in an I form instruction. The lower two bits are - forced to zero. */ -#define LI LEV + 1 - { 0x3fffffc, 0, NULL, NULL, PPC_OPERAND_RELATIVE | PPC_OPERAND_SIGNED }, - - /* The LI field in an I form instruction when used as an absolute - address. */ -#define LIA LI + 1 - { 0x3fffffc, 0, NULL, NULL, PPC_OPERAND_ABSOLUTE | PPC_OPERAND_SIGNED }, - - /* The LS field in an X (sync) form instruction. */ -#define LS LIA + 1 - { 0x3, 21, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The ME field in an M form instruction. */ -#define ME LS + 1 -#define ME_MASK (0x1f << 1) - { 0x1f, 1, NULL, NULL, 0 }, - - /* The MB and ME fields in an M form instruction expressed a single - operand which is a bitmask indicating which bits to select. This - is a two operand form using PPC_OPERAND_NEXT. See the - description in opcode/ppc.h for what this means. */ -#define MBE ME + 1 - { 0x1f, 6, NULL, NULL, PPC_OPERAND_OPTIONAL | PPC_OPERAND_NEXT }, - { -1, 0, insert_mbe, extract_mbe, 0 }, - - /* The MB or ME field in an MD or MDS form instruction. The high - bit is wrapped to the low end. */ -#define MB6 MBE + 2 -#define ME6 MB6 -#define MB6_MASK (0x3f << 5) - { 0x3f, 5, insert_mb6, extract_mb6, 0 }, - - /* The NB field in an X form instruction. The value 32 is stored as - 0. */ -#define NB MB6 + 1 - { 0x1f, 11, NULL, extract_nb, PPC_OPERAND_PLUS1 }, - - /* The NSI field in a D form instruction. This is the same as the - SI field, only negated. */ -#define NSI NB + 1 - { 0xffff, 0, insert_nsi, extract_nsi, - PPC_OPERAND_NEGATIVE | PPC_OPERAND_SIGNED }, - - /* The RA field in an D, DS, DQ, X, XO, M, or MDS form instruction. */ -#define RA NSI + 1 -#define RA_MASK (0x1f << 16) - { 0x1f, 16, NULL, NULL, PPC_OPERAND_GPR }, - - /* As above, but 0 in the RA field means zero, not r0. */ -#define RA0 RA + 1 - { 0x1f, 16, NULL, NULL, PPC_OPERAND_GPR_0 }, - - /* The RA field in the DQ form lq instruction, which has special - value restrictions. */ -#define RAQ RA0 + 1 - { 0x1f, 16, insert_raq, NULL, PPC_OPERAND_GPR_0 }, - - /* The RA field in a D or X form instruction which is an updating - load, which means that the RA field may not be zero and may not - equal the RT field. */ -#define RAL RAQ + 1 - { 0x1f, 16, insert_ral, NULL, PPC_OPERAND_GPR_0 }, - - /* The RA field in an lmw instruction, which has special value - restrictions. */ -#define RAM RAL + 1 - { 0x1f, 16, insert_ram, NULL, PPC_OPERAND_GPR_0 }, - - /* The RA field in a D or X form instruction which is an updating - store or an updating floating point load, which means that the RA - field may not be zero. */ -#define RAS RAM + 1 - { 0x1f, 16, insert_ras, NULL, PPC_OPERAND_GPR_0 }, - - /* The RA field of the tlbwe instruction, which is optional. */ -#define RAOPT RAS + 1 - { 0x1f, 16, NULL, NULL, PPC_OPERAND_GPR | PPC_OPERAND_OPTIONAL }, - - /* The RB field in an X, XO, M, or MDS form instruction. */ -#define RB RAOPT + 1 -#define RB_MASK (0x1f << 11) - { 0x1f, 11, NULL, NULL, PPC_OPERAND_GPR }, - - /* The RB field in an X form instruction when it must be the same as - the RS field in the instruction. This is used for extended - mnemonics like mr. */ -#define RBS RB + 1 - { 0x1f, 11, insert_rbs, extract_rbs, PPC_OPERAND_FAKE }, - - /* The RS field in a D, DS, X, XFX, XS, M, MD or MDS form - instruction or the RT field in a D, DS, X, XFX or XO form - instruction. */ -#define RS RBS + 1 -#define RT RS -#define RT_MASK (0x1f << 21) - { 0x1f, 21, NULL, NULL, PPC_OPERAND_GPR }, - - /* The RS and RT fields of the DS form stq instruction, which have - special value restrictions. */ -#define RSQ RS + 1 -#define RTQ RSQ - { 0x1e, 21, NULL, NULL, PPC_OPERAND_GPR_0 }, - - /* The RS field of the tlbwe instruction, which is optional. */ -#define RSO RSQ + 1 -#define RTO RSO - { 0x1f, 21, NULL, NULL, PPC_OPERAND_GPR | PPC_OPERAND_OPTIONAL }, - - /* The SH field in an X or M form instruction. */ -#define SH RSO + 1 -#define SH_MASK (0x1f << 11) - /* The other UIMM field in a EVX form instruction. */ -#define EVUIMM SH - { 0x1f, 11, NULL, NULL, 0 }, - - /* The SH field in an MD form instruction. This is split. */ -#define SH6 SH + 1 -#define SH6_MASK ((0x1f << 11) | (1 << 1)) - { 0x3f, -1, insert_sh6, extract_sh6, 0 }, - - /* The SH field of the tlbwe instruction, which is optional. */ -#define SHO SH6 + 1 - { 0x1f, 11, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The SI field in a D form instruction. */ -#define SI SHO + 1 - { 0xffff, 0, NULL, NULL, PPC_OPERAND_SIGNED }, - - /* The SI field in a D form instruction when we accept a wide range - of positive values. */ -#define SISIGNOPT SI + 1 - { 0xffff, 0, NULL, NULL, PPC_OPERAND_SIGNED | PPC_OPERAND_SIGNOPT }, - - /* The SPR field in an XFX form instruction. This is flipped--the - lower 5 bits are stored in the upper 5 and vice- versa. */ -#define SPR SISIGNOPT + 1 -#define PMR SPR -#define SPR_MASK (0x3ff << 11) - { 0x3ff, 11, insert_spr, extract_spr, 0 }, - - /* The BAT index number in an XFX form m[ft]ibat[lu] instruction. */ -#define SPRBAT SPR + 1 -#define SPRBAT_MASK (0x3 << 17) - { 0x3, 17, NULL, NULL, 0 }, - - /* The SPRG register number in an XFX form m[ft]sprg instruction. */ -#define SPRG SPRBAT + 1 - { 0x1f, 16, insert_sprg, extract_sprg, 0 }, - - /* The SR field in an X form instruction. */ -#define SR SPRG + 1 - { 0xf, 16, NULL, NULL, 0 }, - - /* The STRM field in an X AltiVec form instruction. */ -#define STRM SR + 1 - { 0x3, 21, NULL, NULL, 0 }, - - /* The SV field in a POWER SC form instruction. */ -#define SV STRM + 1 - { 0x3fff, 2, NULL, NULL, 0 }, - - /* The TBR field in an XFX form instruction. This is like the SPR - field, but it is optional. */ -#define TBR SV + 1 - { 0x3ff, 11, insert_tbr, extract_tbr, PPC_OPERAND_OPTIONAL }, - - /* The TO field in a D or X form instruction. */ -#define TO TBR + 1 -#define TO_MASK (0x1f << 21) - { 0x1f, 21, NULL, NULL, 0 }, - - /* The UI field in a D form instruction. */ -#define UI TO + 1 - { 0xffff, 0, NULL, NULL, 0 }, - - /* The VA field in a VA, VX or VXR form instruction. */ -#define VA UI + 1 - { 0x1f, 16, NULL, NULL, PPC_OPERAND_VR }, - - /* The VB field in a VA, VX or VXR form instruction. */ -#define VB VA + 1 - { 0x1f, 11, NULL, NULL, PPC_OPERAND_VR }, - - /* The VC field in a VA form instruction. */ -#define VC VB + 1 - { 0x1f, 6, NULL, NULL, PPC_OPERAND_VR }, - - /* The VD or VS field in a VA, VX, VXR or X form instruction. */ -#define VD VC + 1 -#define VS VD - { 0x1f, 21, NULL, NULL, PPC_OPERAND_VR }, - - /* The SIMM field in a VX form instruction. */ -#define SIMM VD + 1 - { 0x1f, 16, NULL, NULL, PPC_OPERAND_SIGNED}, - - /* The UIMM field in a VX form instruction, and TE in Z form. */ -#define UIMM SIMM + 1 -#define TE UIMM - { 0x1f, 16, NULL, NULL, 0 }, - - /* The SHB field in a VA form instruction. */ -#define SHB UIMM + 1 - { 0xf, 6, NULL, NULL, 0 }, - - /* The other UIMM field in a half word EVX form instruction. */ -#define EVUIMM_2 SHB + 1 - { 0x3e, 10, NULL, NULL, PPC_OPERAND_PARENS }, - - /* The other UIMM field in a word EVX form instruction. */ -#define EVUIMM_4 EVUIMM_2 + 1 - { 0x7c, 9, NULL, NULL, PPC_OPERAND_PARENS }, - - /* The other UIMM field in a double EVX form instruction. */ -#define EVUIMM_8 EVUIMM_4 + 1 - { 0xf8, 8, NULL, NULL, PPC_OPERAND_PARENS }, - - /* The WS field. */ -#define WS EVUIMM_8 + 1 - { 0x7, 11, NULL, NULL, 0 }, - - /* The L field in an mtmsrd or A form instruction or W in an X form. */ -#define A_L WS + 1 -#define W A_L - { 0x1, 16, NULL, NULL, PPC_OPERAND_OPTIONAL }, - -#define RMC A_L + 1 - { 0x3, 9, NULL, NULL, 0 }, - -#define R RMC + 1 - { 0x1, 16, NULL, NULL, 0 }, - -#define SP R + 1 - { 0x3, 19, NULL, NULL, 0 }, - -#define S SP + 1 - { 0x1, 20, NULL, NULL, 0 }, - - /* SH field starting at bit position 16. */ -#define SH16 S + 1 - /* The DCM and DGM fields in a Z form instruction. */ -#define DCM SH16 -#define DGM DCM - { 0x3f, 10, NULL, NULL, 0 }, - - /* The EH field in larx instruction. */ -#define EH SH16 + 1 - { 0x1, 0, NULL, NULL, PPC_OPERAND_OPTIONAL }, - - /* The L field in an mtfsf or XFL form instruction. */ -#define XFL_L EH + 1 - { 0x1, 25, NULL, NULL, PPC_OPERAND_OPTIONAL}, -}; - -const unsigned int num_powerpc_operands = (sizeof (powerpc_operands) - / sizeof (powerpc_operands[0])); - -/* The functions used to insert and extract complicated operands. */ - -/* The BA field in an XL form instruction when it must be the same as - the BT field in the same instruction. This operand is marked FAKE. - The insertion function just copies the BT field into the BA field, - and the extraction function just checks that the fields are the - same. */ - -static unsigned long -insert_bat (unsigned long insn, - long value ATTRIBUTE_UNUSED, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | (((insn >> 21) & 0x1f) << 16); -} - -static long -extract_bat (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - if (((insn >> 21) & 0x1f) != ((insn >> 16) & 0x1f)) - *invalid = 1; - return 0; -} - -/* The BB field in an XL form instruction when it must be the same as - the BA field in the same instruction. This operand is marked FAKE. - The insertion function just copies the BA field into the BB field, - and the extraction function just checks that the fields are the - same. */ - -static unsigned long -insert_bba (unsigned long insn, - long value ATTRIBUTE_UNUSED, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | (((insn >> 16) & 0x1f) << 11); -} - -static long -extract_bba (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - if (((insn >> 16) & 0x1f) != ((insn >> 11) & 0x1f)) - *invalid = 1; - return 0; -} - -/* The BD field in a B form instruction when the - modifier is used. - This modifier means that the branch is not expected to be taken. - For chips built to versions of the architecture prior to version 2 - (ie. not Power4 compatible), we set the y bit of the BO field to 1 - if the offset is negative. When extracting, we require that the y - bit be 1 and that the offset be positive, since if the y bit is 0 - we just want to print the normal form of the instruction. - Power4 compatible targets use two bits, "a", and "t", instead of - the "y" bit. "at" == 00 => no hint, "at" == 01 => unpredictable, - "at" == 10 => not taken, "at" == 11 => taken. The "t" bit is 00001 - in BO field, the "a" bit is 00010 for branch on CR(BI) and 01000 - for branch on CTR. We only handle the taken/not-taken hint here. - Note that we don't relax the conditions tested here when - disassembling with -Many because insns using extract_bdm and - extract_bdp always occur in pairs. One or the other will always - be valid. */ - -static unsigned long -insert_bdm (unsigned long insn, - long value, - int dialect, - const char **errmsg ATTRIBUTE_UNUSED) -{ - if ((dialect & PPC_OPCODE_POWER4) == 0) - { - if ((value & 0x8000) != 0) - insn |= 1 << 21; - } - else - { - if ((insn & (0x14 << 21)) == (0x04 << 21)) - insn |= 0x02 << 21; - else if ((insn & (0x14 << 21)) == (0x10 << 21)) - insn |= 0x08 << 21; - } - return insn | (value & 0xfffc); -} - -static long -extract_bdm (unsigned long insn, - int dialect, - int *invalid) -{ - if ((dialect & PPC_OPCODE_POWER4) == 0) - { - if (((insn & (1 << 21)) == 0) != ((insn & (1 << 15)) == 0)) - *invalid = 1; - } - else - { - if ((insn & (0x17 << 21)) != (0x06 << 21) - && (insn & (0x1d << 21)) != (0x18 << 21)) - *invalid = 1; - } - - return ((insn & 0xfffc) ^ 0x8000) - 0x8000; -} - -/* The BD field in a B form instruction when the + modifier is used. - This is like BDM, above, except that the branch is expected to be - taken. */ - -static unsigned long -insert_bdp (unsigned long insn, - long value, - int dialect, - const char **errmsg ATTRIBUTE_UNUSED) -{ - if ((dialect & PPC_OPCODE_POWER4) == 0) - { - if ((value & 0x8000) == 0) - insn |= 1 << 21; - } - else - { - if ((insn & (0x14 << 21)) == (0x04 << 21)) - insn |= 0x03 << 21; - else if ((insn & (0x14 << 21)) == (0x10 << 21)) - insn |= 0x09 << 21; - } - return insn | (value & 0xfffc); -} - -static long -extract_bdp (unsigned long insn, - int dialect, - int *invalid) -{ - if ((dialect & PPC_OPCODE_POWER4) == 0) - { - if (((insn & (1 << 21)) == 0) == ((insn & (1 << 15)) == 0)) - *invalid = 1; - } - else - { - if ((insn & (0x17 << 21)) != (0x07 << 21) - && (insn & (0x1d << 21)) != (0x19 << 21)) - *invalid = 1; - } - - return ((insn & 0xfffc) ^ 0x8000) - 0x8000; -} - -/* Check for legal values of a BO field. */ - -static int -valid_bo (long value, int dialect, int extract) -{ - if ((dialect & PPC_OPCODE_POWER4) == 0) - { - int valid; - /* Certain encodings have bits that are required to be zero. - These are (z must be zero, y may be anything): - 001zy - 011zy - 1z00y - 1z01y - 1z1zz - */ - switch (value & 0x14) - { - default: - case 0: - valid = 1; - break; - case 0x4: - valid = (value & 0x2) == 0; - break; - case 0x10: - valid = (value & 0x8) == 0; - break; - case 0x14: - valid = value == 0x14; - break; - } - /* When disassembling with -Many, accept power4 encodings too. */ - if (valid - || (dialect & PPC_OPCODE_ANY) == 0 - || !extract) - return valid; - } - - /* Certain encodings have bits that are required to be zero. - These are (z must be zero, a & t may be anything): - 0000z - 0001z - 0100z - 0101z - 001at - 011at - 1a00t - 1a01t - 1z1zz - */ - if ((value & 0x14) == 0) - return (value & 0x1) == 0; - else if ((value & 0x14) == 0x14) - return value == 0x14; - else - return 1; -} - -/* The BO field in a B form instruction. Warn about attempts to set - the field to an illegal value. */ - -static unsigned long -insert_bo (unsigned long insn, - long value, - int dialect, - const char **errmsg) -{ - if (!valid_bo (value, dialect, 0)) - *errmsg = _("invalid conditional option"); - return insn | ((value & 0x1f) << 21); -} - -static long -extract_bo (unsigned long insn, - int dialect, - int *invalid) -{ - long value; - - value = (insn >> 21) & 0x1f; - if (!valid_bo (value, dialect, 1)) - *invalid = 1; - return value; -} - -/* The BO field in a B form instruction when the + or - modifier is - used. This is like the BO field, but it must be even. When - extracting it, we force it to be even. */ - -static unsigned long -insert_boe (unsigned long insn, - long value, - int dialect, - const char **errmsg) -{ - if (!valid_bo (value, dialect, 0)) - *errmsg = _("invalid conditional option"); - else if ((value & 1) != 0) - *errmsg = _("attempt to set y bit when using + or - modifier"); - - return insn | ((value & 0x1f) << 21); -} - -static long -extract_boe (unsigned long insn, - int dialect, - int *invalid) -{ - long value; - - value = (insn >> 21) & 0x1f; - if (!valid_bo (value, dialect, 1)) - *invalid = 1; - return value & 0x1e; -} - -/* FXM mask in mfcr and mtcrf instructions. */ - -static unsigned long -insert_fxm (unsigned long insn, - long value, - int dialect, - const char **errmsg) -{ - /* If we're handling the mfocrf and mtocrf insns ensure that exactly - one bit of the mask field is set. */ - if ((insn & (1 << 20)) != 0) - { - if (value == 0 || (value & -value) != value) - { - *errmsg = _("invalid mask field"); - value = 0; - } - } - - /* If the optional field on mfcr is missing that means we want to use - the old form of the instruction that moves the whole cr. In that - case we'll have VALUE zero. There doesn't seem to be a way to - distinguish this from the case where someone writes mfcr %r3,0. */ - else if (value == 0) - ; - - /* If only one bit of the FXM field is set, we can use the new form - of the instruction, which is faster. Unlike the Power4 branch hint - encoding, this is not backward compatible. Do not generate the - new form unless -mpower4 has been given, or -many and the two - operand form of mfcr was used. */ - else if ((value & -value) == value - && ((dialect & PPC_OPCODE_POWER4) != 0 - || ((dialect & PPC_OPCODE_ANY) != 0 - && (insn & (0x3ff << 1)) == 19 << 1))) - insn |= 1 << 20; - - /* Any other value on mfcr is an error. */ - else if ((insn & (0x3ff << 1)) == 19 << 1) - { - *errmsg = _("ignoring invalid mfcr mask"); - value = 0; - } - - return insn | ((value & 0xff) << 12); -} - -static long -extract_fxm (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - long mask = (insn >> 12) & 0xff; - - /* Is this a Power4 insn? */ - if ((insn & (1 << 20)) != 0) - { - /* Exactly one bit of MASK should be set. */ - if (mask == 0 || (mask & -mask) != mask) - *invalid = 1; - } - - /* Check that non-power4 form of mfcr has a zero MASK. */ - else if ((insn & (0x3ff << 1)) == 19 << 1) - { - if (mask != 0) - *invalid = 1; - } - - return mask; -} - -/* The MB and ME fields in an M form instruction expressed as a single - operand which is itself a bitmask. The extraction function always - marks it as invalid, since we never want to recognize an - instruction which uses a field of this type. */ - -static unsigned long -insert_mbe (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg) -{ - unsigned long uval, mask; - int mb, me, mx, count, last; - - uval = value; - - if (uval == 0) - { - *errmsg = _("illegal bitmask"); - return insn; - } - - mb = 0; - me = 32; - if ((uval & 1) != 0) - last = 1; - else - last = 0; - count = 0; - - /* mb: location of last 0->1 transition */ - /* me: location of last 1->0 transition */ - /* count: # transitions */ - - for (mx = 0, mask = 1L << 31; mx < 32; ++mx, mask >>= 1) - { - if ((uval & mask) && !last) - { - ++count; - mb = mx; - last = 1; - } - else if (!(uval & mask) && last) - { - ++count; - me = mx; - last = 0; - } - } - if (me == 0) - me = 32; - - if (count != 2 && (count != 0 || ! last)) - *errmsg = _("illegal bitmask"); - - return insn | (mb << 6) | ((me - 1) << 1); -} - -static long -extract_mbe (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - long ret; - int mb, me; - int i; - - *invalid = 1; - - mb = (insn >> 6) & 0x1f; - me = (insn >> 1) & 0x1f; - if (mb < me + 1) - { - ret = 0; - for (i = mb; i <= me; i++) - ret |= 1L << (31 - i); - } - else if (mb == me + 1) - ret = ~0; - else /* (mb > me + 1) */ - { - ret = ~0; - for (i = me + 1; i < mb; i++) - ret &= ~(1L << (31 - i)); - } - return ret; -} - -/* The MB or ME field in an MD or MDS form instruction. The high bit - is wrapped to the low end. */ - -static unsigned long -insert_mb6 (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | ((value & 0x1f) << 6) | (value & 0x20); -} - -static long -extract_mb6 (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid ATTRIBUTE_UNUSED) -{ - return ((insn >> 6) & 0x1f) | (insn & 0x20); -} - -/* The NB field in an X form instruction. The value 32 is stored as - 0. */ - -static long -extract_nb (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid ATTRIBUTE_UNUSED) -{ - long ret; - - ret = (insn >> 11) & 0x1f; - if (ret == 0) - ret = 32; - return ret; -} - -/* The NSI field in a D form instruction. This is the same as the SI - field, only negated. The extraction function always marks it as - invalid, since we never want to recognize an instruction which uses - a field of this type. */ - -static unsigned long -insert_nsi (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | (-value & 0xffff); -} - -static long -extract_nsi (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - *invalid = 1; - return -(((insn & 0xffff) ^ 0x8000) - 0x8000); -} - -/* The RA field in a D or X form instruction which is an updating - load, which means that the RA field may not be zero and may not - equal the RT field. */ - -static unsigned long -insert_ral (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg) -{ - if (value == 0 - || (unsigned long) value == ((insn >> 21) & 0x1f)) - *errmsg = "invalid register operand when updating"; - return insn | ((value & 0x1f) << 16); -} - -/* The RA field in an lmw instruction, which has special value - restrictions. */ - -static unsigned long -insert_ram (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg) -{ - if ((unsigned long) value >= ((insn >> 21) & 0x1f)) - *errmsg = _("index register in load range"); - return insn | ((value & 0x1f) << 16); -} - -/* The RA field in the DQ form lq instruction, which has special - value restrictions. */ - -static unsigned long -insert_raq (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg) -{ - long rtvalue = (insn & RT_MASK) >> 21; - - if (value == rtvalue) - *errmsg = _("source and target register operands must be different"); - return insn | ((value & 0x1f) << 16); -} - -/* The RA field in a D or X form instruction which is an updating - store or an updating floating point load, which means that the RA - field may not be zero. */ - -static unsigned long -insert_ras (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg) -{ - if (value == 0) - *errmsg = _("invalid register operand when updating"); - return insn | ((value & 0x1f) << 16); -} - -/* The RB field in an X form instruction when it must be the same as - the RS field in the instruction. This is used for extended - mnemonics like mr. This operand is marked FAKE. The insertion - function just copies the BT field into the BA field, and the - extraction function just checks that the fields are the same. */ - -static unsigned long -insert_rbs (unsigned long insn, - long value ATTRIBUTE_UNUSED, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | (((insn >> 21) & 0x1f) << 11); -} - -static long -extract_rbs (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid) -{ - if (((insn >> 21) & 0x1f) != ((insn >> 11) & 0x1f)) - *invalid = 1; - return 0; -} - -/* The SH field in an MD form instruction. This is split. */ - -static unsigned long -insert_sh6 (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | ((value & 0x1f) << 11) | ((value & 0x20) >> 4); -} - -static long -extract_sh6 (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid ATTRIBUTE_UNUSED) -{ - return ((insn >> 11) & 0x1f) | ((insn << 4) & 0x20); -} - -/* The SPR field in an XFX form instruction. This is flipped--the - lower 5 bits are stored in the upper 5 and vice- versa. */ - -static unsigned long -insert_spr (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - return insn | ((value & 0x1f) << 16) | ((value & 0x3e0) << 6); -} - -static long -extract_spr (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid ATTRIBUTE_UNUSED) -{ - return ((insn >> 16) & 0x1f) | ((insn >> 6) & 0x3e0); -} - -/* Some dialects have 8 SPRG registers instead of the standard 4. */ - -static unsigned long -insert_sprg (unsigned long insn, - long value, - int dialect, - const char **errmsg) -{ - /* This check uses PPC_OPCODE_403 because PPC405 is later defined - as a synonym. If ever a 405 specific dialect is added this - check should use that instead. */ - if (value > 7 - || (value > 3 - && (dialect & (PPC_OPCODE_BOOKE | PPC_OPCODE_403)) == 0)) - *errmsg = _("invalid sprg number"); - - /* If this is mfsprg4..7 then use spr 260..263 which can be read in - user mode. Anything else must use spr 272..279. */ - if (value <= 3 || (insn & 0x100) != 0) - value |= 0x10; - - return insn | ((value & 0x17) << 16); -} - -static long -extract_sprg (unsigned long insn, - int dialect, - int *invalid) -{ - unsigned long val = (insn >> 16) & 0x1f; - - /* mfsprg can use 260..263 and 272..279. mtsprg only uses spr 272..279 - If not BOOKE or 405, then both use only 272..275. */ - if (val <= 3 - || (val < 0x10 && (insn & 0x100) != 0) - || (val - 0x10 > 3 - && (dialect & (PPC_OPCODE_BOOKE | PPC_OPCODE_403)) == 0)) - *invalid = 1; - return val & 7; -} - -/* The TBR field in an XFX instruction. This is just like SPR, but it - is optional. When TBR is omitted, it must be inserted as 268 (the - magic number of the TB register). These functions treat 0 - (indicating an omitted optional operand) as 268. This means that - ``mftb 4,0'' is not handled correctly. This does not matter very - much, since the architecture manual does not define mftb as - accepting any values other than 268 or 269. */ - -#define TB (268) - -static unsigned long -insert_tbr (unsigned long insn, - long value, - int dialect ATTRIBUTE_UNUSED, - const char **errmsg ATTRIBUTE_UNUSED) -{ - if (value == 0) - value = TB; - return insn | ((value & 0x1f) << 16) | ((value & 0x3e0) << 6); -} - -static long -extract_tbr (unsigned long insn, - int dialect ATTRIBUTE_UNUSED, - int *invalid ATTRIBUTE_UNUSED) -{ - long ret; - - ret = ((insn >> 16) & 0x1f) | ((insn >> 6) & 0x3e0); - if (ret == TB) - ret = 0; - return ret; -} - -/* Macros used to form opcodes. */ - -/* The main opcode. */ -#define OP(x) ((((unsigned long)(x)) & 0x3f) << 26) -#define OP_MASK OP (0x3f) - -/* The main opcode combined with a trap code in the TO field of a D - form instruction. Used for extended mnemonics for the trap - instructions. */ -#define OPTO(x,to) (OP (x) | ((((unsigned long)(to)) & 0x1f) << 21)) -#define OPTO_MASK (OP_MASK | TO_MASK) - -/* The main opcode combined with a comparison size bit in the L field - of a D form or X form instruction. Used for extended mnemonics for - the comparison instructions. */ -#define OPL(x,l) (OP (x) | ((((unsigned long)(l)) & 1) << 21)) -#define OPL_MASK OPL (0x3f,1) - -/* An A form instruction. */ -#define A(op, xop, rc) (OP (op) | ((((unsigned long)(xop)) & 0x1f) << 1) | (((unsigned long)(rc)) & 1)) -#define A_MASK A (0x3f, 0x1f, 1) - -/* An A_MASK with the FRB field fixed. */ -#define AFRB_MASK (A_MASK | FRB_MASK) - -/* An A_MASK with the FRC field fixed. */ -#define AFRC_MASK (A_MASK | FRC_MASK) - -/* An A_MASK with the FRA and FRC fields fixed. */ -#define AFRAFRC_MASK (A_MASK | FRA_MASK | FRC_MASK) - -/* An AFRAFRC_MASK, but with L bit clear. */ -#define AFRALFRC_MASK (AFRAFRC_MASK & ~((unsigned long) 1 << 16)) - -/* A B form instruction. */ -#define B(op, aa, lk) (OP (op) | ((((unsigned long)(aa)) & 1) << 1) | ((lk) & 1)) -#define B_MASK B (0x3f, 1, 1) - -/* A B form instruction setting the BO field. */ -#define BBO(op, bo, aa, lk) (B ((op), (aa), (lk)) | ((((unsigned long)(bo)) & 0x1f) << 21)) -#define BBO_MASK BBO (0x3f, 0x1f, 1, 1) - -/* A BBO_MASK with the y bit of the BO field removed. This permits - matching a conditional branch regardless of the setting of the y - bit. Similarly for the 'at' bits used for power4 branch hints. */ -#define Y_MASK (((unsigned long) 1) << 21) -#define AT1_MASK (((unsigned long) 3) << 21) -#define AT2_MASK (((unsigned long) 9) << 21) -#define BBOY_MASK (BBO_MASK &~ Y_MASK) -#define BBOAT_MASK (BBO_MASK &~ AT1_MASK) - -/* A B form instruction setting the BO field and the condition bits of - the BI field. */ -#define BBOCB(op, bo, cb, aa, lk) \ - (BBO ((op), (bo), (aa), (lk)) | ((((unsigned long)(cb)) & 0x3) << 16)) -#define BBOCB_MASK BBOCB (0x3f, 0x1f, 0x3, 1, 1) - -/* A BBOCB_MASK with the y bit of the BO field removed. */ -#define BBOYCB_MASK (BBOCB_MASK &~ Y_MASK) -#define BBOATCB_MASK (BBOCB_MASK &~ AT1_MASK) -#define BBOAT2CB_MASK (BBOCB_MASK &~ AT2_MASK) - -/* A BBOYCB_MASK in which the BI field is fixed. */ -#define BBOYBI_MASK (BBOYCB_MASK | BI_MASK) -#define BBOATBI_MASK (BBOAT2CB_MASK | BI_MASK) - -/* An Context form instruction. */ -#define CTX(op, xop) (OP (op) | (((unsigned long)(xop)) & 0x7)) -#define CTX_MASK CTX(0x3f, 0x7) - -/* An User Context form instruction. */ -#define UCTX(op, xop) (OP (op) | (((unsigned long)(xop)) & 0x1f)) -#define UCTX_MASK UCTX(0x3f, 0x1f) - -/* The main opcode mask with the RA field clear. */ -#define DRA_MASK (OP_MASK | RA_MASK) - -/* A DS form instruction. */ -#define DSO(op, xop) (OP (op) | ((xop) & 0x3)) -#define DS_MASK DSO (0x3f, 3) - -/* A DE form instruction. */ -#define DEO(op, xop) (OP (op) | ((xop) & 0xf)) -#define DE_MASK DEO (0x3e, 0xf) - -/* An EVSEL form instruction. */ -#define EVSEL(op, xop) (OP (op) | (((unsigned long)(xop)) & 0xff) << 3) -#define EVSEL_MASK EVSEL(0x3f, 0xff) - -/* An M form instruction. */ -#define M(op, rc) (OP (op) | ((rc) & 1)) -#define M_MASK M (0x3f, 1) - -/* An M form instruction with the ME field specified. */ -#define MME(op, me, rc) (M ((op), (rc)) | ((((unsigned long)(me)) & 0x1f) << 1)) - -/* An M_MASK with the MB and ME fields fixed. */ -#define MMBME_MASK (M_MASK | MB_MASK | ME_MASK) - -/* An M_MASK with the SH and ME fields fixed. */ -#define MSHME_MASK (M_MASK | SH_MASK | ME_MASK) - -/* An MD form instruction. */ -#define MD(op, xop, rc) (OP (op) | ((((unsigned long)(xop)) & 0x7) << 2) | ((rc) & 1)) -#define MD_MASK MD (0x3f, 0x7, 1) - -/* An MD_MASK with the MB field fixed. */ -#define MDMB_MASK (MD_MASK | MB6_MASK) - -/* An MD_MASK with the SH field fixed. */ -#define MDSH_MASK (MD_MASK | SH6_MASK) - -/* An MDS form instruction. */ -#define MDS(op, xop, rc) (OP (op) | ((((unsigned long)(xop)) & 0xf) << 1) | ((rc) & 1)) -#define MDS_MASK MDS (0x3f, 0xf, 1) - -/* An MDS_MASK with the MB field fixed. */ -#define MDSMB_MASK (MDS_MASK | MB6_MASK) - -/* An SC form instruction. */ -#define SC(op, sa, lk) (OP (op) | ((((unsigned long)(sa)) & 1) << 1) | ((lk) & 1)) -#define SC_MASK (OP_MASK | (((unsigned long)0x3ff) << 16) | (((unsigned long)1) << 1) | 1) - -/* An VX form instruction. */ -#define VX(op, xop) (OP (op) | (((unsigned long)(xop)) & 0x7ff)) - -/* The mask for an VX form instruction. */ -#define VX_MASK VX(0x3f, 0x7ff) - -/* An VA form instruction. */ -#define VXA(op, xop) (OP (op) | (((unsigned long)(xop)) & 0x03f)) - -/* The mask for an VA form instruction. */ -#define VXA_MASK VXA(0x3f, 0x3f) - -/* An VXR form instruction. */ -#define VXR(op, xop, rc) (OP (op) | (((rc) & 1) << 10) | (((unsigned long)(xop)) & 0x3ff)) - -/* The mask for a VXR form instruction. */ -#define VXR_MASK VXR(0x3f, 0x3ff, 1) - -/* An X form instruction. */ -#define X(op, xop) (OP (op) | ((((unsigned long)(xop)) & 0x3ff) << 1)) - -/* A Z form instruction. */ -#define Z(op, xop) (OP (op) | ((((unsigned long)(xop)) & 0x1ff) << 1)) - -/* An X form instruction with the RC bit specified. */ -#define XRC(op, xop, rc) (X ((op), (xop)) | ((rc) & 1)) - -/* A Z form instruction with the RC bit specified. */ -#define ZRC(op, xop, rc) (Z ((op), (xop)) | ((rc) & 1)) - -/* The mask for an X form instruction. */ -#define X_MASK XRC (0x3f, 0x3ff, 1) - -/* The mask for a Z form instruction. */ -#define Z_MASK ZRC (0x3f, 0x1ff, 1) -#define Z2_MASK ZRC (0x3f, 0xff, 1) - -/* An X_MASK with the RA field fixed. */ -#define XRA_MASK (X_MASK | RA_MASK) - -/* An XRA_MASK with the W field clear. */ -#define XWRA_MASK (XRA_MASK & ~((unsigned long) 1 << 16)) - -/* An X_MASK with the RB field fixed. */ -#define XRB_MASK (X_MASK | RB_MASK) - -/* An X_MASK with the RT field fixed. */ -#define XRT_MASK (X_MASK | RT_MASK) - -/* An XRT_MASK mask with the L bits clear. */ -#define XLRT_MASK (XRT_MASK & ~((unsigned long) 0x3 << 21)) - -/* An X_MASK with the RA and RB fields fixed. */ -#define XRARB_MASK (X_MASK | RA_MASK | RB_MASK) - -/* An XRARB_MASK, but with the L bit clear. */ -#define XRLARB_MASK (XRARB_MASK & ~((unsigned long) 1 << 16)) - -/* An X_MASK with the RT and RA fields fixed. */ -#define XRTRA_MASK (X_MASK | RT_MASK | RA_MASK) - -/* An XRTRA_MASK, but with L bit clear. */ -#define XRTLRA_MASK (XRTRA_MASK & ~((unsigned long) 1 << 21)) - -/* An X form instruction with the L bit specified. */ -#define XOPL(op, xop, l) (X ((op), (xop)) | ((((unsigned long)(l)) & 1) << 21)) - -/* The mask for an X form comparison instruction. */ -#define XCMP_MASK (X_MASK | (((unsigned long)1) << 22)) - -/* The mask for an X form comparison instruction with the L field - fixed. */ -#define XCMPL_MASK (XCMP_MASK | (((unsigned long)1) << 21)) - -/* An X form trap instruction with the TO field specified. */ -#define XTO(op, xop, to) (X ((op), (xop)) | ((((unsigned long)(to)) & 0x1f) << 21)) -#define XTO_MASK (X_MASK | TO_MASK) - -/* An X form tlb instruction with the SH field specified. */ -#define XTLB(op, xop, sh) (X ((op), (xop)) | ((((unsigned long)(sh)) & 0x1f) << 11)) -#define XTLB_MASK (X_MASK | SH_MASK) - -/* An X form sync instruction. */ -#define XSYNC(op, xop, l) (X ((op), (xop)) | ((((unsigned long)(l)) & 3) << 21)) - -/* An X form sync instruction with everything filled in except the LS field. */ -#define XSYNC_MASK (0xff9fffff) - -/* An X_MASK, but with the EH bit clear. */ -#define XEH_MASK (X_MASK & ~((unsigned long )1)) - -/* An X form AltiVec dss instruction. */ -#define XDSS(op, xop, a) (X ((op), (xop)) | ((((unsigned long)(a)) & 1) << 25)) -#define XDSS_MASK XDSS(0x3f, 0x3ff, 1) - -/* An XFL form instruction. */ -#define XFL(op, xop, rc) (OP (op) | ((((unsigned long)(xop)) & 0x3ff) << 1) | (((unsigned long)(rc)) & 1)) -#define XFL_MASK XFL (0x3f, 0x3ff, 1) - -/* An X form isel instruction. */ -#define XISEL(op, xop) (OP (op) | ((((unsigned long)(xop)) & 0x1f) << 1)) -#define XISEL_MASK XISEL(0x3f, 0x1f) - -/* An XL form instruction with the LK field set to 0. */ -#define XL(op, xop) (OP (op) | ((((unsigned long)(xop)) & 0x3ff) << 1)) - -/* An XL form instruction which uses the LK field. */ -#define XLLK(op, xop, lk) (XL ((op), (xop)) | ((lk) & 1)) - -/* The mask for an XL form instruction. */ -#define XL_MASK XLLK (0x3f, 0x3ff, 1) - -/* An XL form instruction which explicitly sets the BO field. */ -#define XLO(op, bo, xop, lk) \ - (XLLK ((op), (xop), (lk)) | ((((unsigned long)(bo)) & 0x1f) << 21)) -#define XLO_MASK (XL_MASK | BO_MASK) - -/* An XL form instruction which explicitly sets the y bit of the BO - field. */ -#define XLYLK(op, xop, y, lk) (XLLK ((op), (xop), (lk)) | ((((unsigned long)(y)) & 1) << 21)) -#define XLYLK_MASK (XL_MASK | Y_MASK) - -/* An XL form instruction which sets the BO field and the condition - bits of the BI field. */ -#define XLOCB(op, bo, cb, xop, lk) \ - (XLO ((op), (bo), (xop), (lk)) | ((((unsigned long)(cb)) & 3) << 16)) -#define XLOCB_MASK XLOCB (0x3f, 0x1f, 0x3, 0x3ff, 1) - -/* An XL_MASK or XLYLK_MASK or XLOCB_MASK with the BB field fixed. */ -#define XLBB_MASK (XL_MASK | BB_MASK) -#define XLYBB_MASK (XLYLK_MASK | BB_MASK) -#define XLBOCBBB_MASK (XLOCB_MASK | BB_MASK) - -/* A mask for branch instructions using the BH field. */ -#define XLBH_MASK (XL_MASK | (0x1c << 11)) - -/* An XL_MASK with the BO and BB fields fixed. */ -#define XLBOBB_MASK (XL_MASK | BO_MASK | BB_MASK) - -/* An XL_MASK with the BO, BI and BB fields fixed. */ -#define XLBOBIBB_MASK (XL_MASK | BO_MASK | BI_MASK | BB_MASK) - -/* An XO form instruction. */ -#define XO(op, xop, oe, rc) \ - (OP (op) | ((((unsigned long)(xop)) & 0x1ff) << 1) | ((((unsigned long)(oe)) & 1) << 10) | (((unsigned long)(rc)) & 1)) -#define XO_MASK XO (0x3f, 0x1ff, 1, 1) - -/* An XO_MASK with the RB field fixed. */ -#define XORB_MASK (XO_MASK | RB_MASK) - -/* An XS form instruction. */ -#define XS(op, xop, rc) (OP (op) | ((((unsigned long)(xop)) & 0x1ff) << 2) | (((unsigned long)(rc)) & 1)) -#define XS_MASK XS (0x3f, 0x1ff, 1) - -/* A mask for the FXM version of an XFX form instruction. */ -#define XFXFXM_MASK (X_MASK | (1 << 11) | (1 << 20)) - -/* An XFX form instruction with the FXM field filled in. */ -#define XFXM(op, xop, fxm, p4) \ - (X ((op), (xop)) | ((((unsigned long)(fxm)) & 0xff) << 12) \ - | ((unsigned long)(p4) << 20)) - -/* An XFX form instruction with the SPR field filled in. */ -#define XSPR(op, xop, spr) \ - (X ((op), (xop)) | ((((unsigned long)(spr)) & 0x1f) << 16) | ((((unsigned long)(spr)) & 0x3e0) << 6)) -#define XSPR_MASK (X_MASK | SPR_MASK) - -/* An XFX form instruction with the SPR field filled in except for the - SPRBAT field. */ -#define XSPRBAT_MASK (XSPR_MASK &~ SPRBAT_MASK) - -/* An XFX form instruction with the SPR field filled in except for the - SPRG field. */ -#define XSPRG_MASK (XSPR_MASK & ~(0x1f << 16)) - -/* An X form instruction with everything filled in except the E field. */ -#define XE_MASK (0xffff7fff) - -/* An X form user context instruction. */ -#define XUC(op, xop) (OP (op) | (((unsigned long)(xop)) & 0x1f)) -#define XUC_MASK XUC(0x3f, 0x1f) - -/* The BO encodings used in extended conditional branch mnemonics. */ -#define BODNZF (0x0) -#define BODNZFP (0x1) -#define BODZF (0x2) -#define BODZFP (0x3) -#define BODNZT (0x8) -#define BODNZTP (0x9) -#define BODZT (0xa) -#define BODZTP (0xb) - -#define BOF (0x4) -#define BOFP (0x5) -#define BOFM4 (0x6) -#define BOFP4 (0x7) -#define BOT (0xc) -#define BOTP (0xd) -#define BOTM4 (0xe) -#define BOTP4 (0xf) - -#define BODNZ (0x10) -#define BODNZP (0x11) -#define BODZ (0x12) -#define BODZP (0x13) -#define BODNZM4 (0x18) -#define BODNZP4 (0x19) -#define BODZM4 (0x1a) -#define BODZP4 (0x1b) - -#define BOU (0x14) - -/* The BI condition bit encodings used in extended conditional branch - mnemonics. */ -#define CBLT (0) -#define CBGT (1) -#define CBEQ (2) -#define CBSO (3) - -/* The TO encodings used in extended trap mnemonics. */ -#define TOLGT (0x1) -#define TOLLT (0x2) -#define TOEQ (0x4) -#define TOLGE (0x5) -#define TOLNL (0x5) -#define TOLLE (0x6) -#define TOLNG (0x6) -#define TOGT (0x8) -#define TOGE (0xc) -#define TONL (0xc) -#define TOLT (0x10) -#define TOLE (0x14) -#define TONG (0x14) -#define TONE (0x18) -#define TOU (0x1f) - -/* Smaller names for the flags so each entry in the opcodes table will - fit on a single line. */ -#undef PPC -#define PPC PPC_OPCODE_PPC -#define PPCCOM PPC_OPCODE_PPC | PPC_OPCODE_COMMON -#define NOPOWER4 PPC_OPCODE_NOPOWER4 | PPCCOM -#define POWER4 PPC_OPCODE_POWER4 -#define POWER5 PPC_OPCODE_POWER5 -#define POWER6 PPC_OPCODE_POWER6 -#define CELL PPC_OPCODE_CELL -#define PPC32 PPC_OPCODE_32 | PPC_OPCODE_PPC -#define PPC64 PPC_OPCODE_64 | PPC_OPCODE_PPC -#define PPC403 PPC_OPCODE_403 -#define PPC405 PPC403 -#define PPC440 PPC_OPCODE_440 -#define PPC750 PPC -#define PPC860 PPC -#define PPCVEC PPC_OPCODE_ALTIVEC -#define POWER PPC_OPCODE_POWER -#define POWER2 PPC_OPCODE_POWER | PPC_OPCODE_POWER2 -#define PPCPWR2 PPC_OPCODE_PPC | PPC_OPCODE_POWER | PPC_OPCODE_POWER2 -#define POWER32 PPC_OPCODE_POWER | PPC_OPCODE_32 -#define COM PPC_OPCODE_POWER | PPC_OPCODE_PPC | PPC_OPCODE_COMMON -#define COM32 PPC_OPCODE_POWER | PPC_OPCODE_PPC | PPC_OPCODE_COMMON | PPC_OPCODE_32 -#define M601 PPC_OPCODE_POWER | PPC_OPCODE_601 -#define PWRCOM PPC_OPCODE_POWER | PPC_OPCODE_601 | PPC_OPCODE_COMMON -#define MFDEC1 PPC_OPCODE_POWER -#define MFDEC2 PPC_OPCODE_PPC | PPC_OPCODE_601 | PPC_OPCODE_BOOKE -#define BOOKE PPC_OPCODE_BOOKE -#define BOOKE64 PPC_OPCODE_BOOKE64 -#define CLASSIC PPC_OPCODE_CLASSIC -#define PPCE300 PPC_OPCODE_E300 -#define PPCSPE PPC_OPCODE_SPE -#define PPCISEL PPC_OPCODE_ISEL -#define PPCEFS PPC_OPCODE_EFS -#define PPCBRLK PPC_OPCODE_BRLOCK -#define PPCPMR PPC_OPCODE_PMR -#define PPCCHLK PPC_OPCODE_CACHELCK -#define PPCCHLK64 PPC_OPCODE_CACHELCK | PPC_OPCODE_BOOKE64 -#define PPCRFMCI PPC_OPCODE_RFMCI - -/* The opcode table. - - The format of the opcode table is: - - NAME OPCODE MASK FLAGS { OPERANDS } - - NAME is the name of the instruction. - OPCODE is the instruction opcode. - MASK is the opcode mask; this is used to tell the disassembler - which bits in the actual opcode must match OPCODE. - FLAGS are flags indicated what processors support the instruction. - OPERANDS is the list of operands. - - The disassembler reads the table in order and prints the first - instruction which matches, so this table is sorted to put more - specific instructions before more general instructions. It is also - sorted by major opcode. */ - -const struct powerpc_opcode powerpc_opcodes[] = { -{ "attn", X(0,256), X_MASK, POWER4, { 0 } }, -{ "tdlgti", OPTO(2,TOLGT), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdllti", OPTO(2,TOLLT), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdeqi", OPTO(2,TOEQ), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdlgei", OPTO(2,TOLGE), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdlnli", OPTO(2,TOLNL), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdllei", OPTO(2,TOLLE), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdlngi", OPTO(2,TOLNG), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdgti", OPTO(2,TOGT), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdgei", OPTO(2,TOGE), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdnli", OPTO(2,TONL), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdlti", OPTO(2,TOLT), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdlei", OPTO(2,TOLE), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdngi", OPTO(2,TONG), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdnei", OPTO(2,TONE), OPTO_MASK, PPC64, { RA, SI } }, -{ "tdi", OP(2), OP_MASK, PPC64, { TO, RA, SI } }, - -{ "twlgti", OPTO(3,TOLGT), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlgti", OPTO(3,TOLGT), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twllti", OPTO(3,TOLLT), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tllti", OPTO(3,TOLLT), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "tweqi", OPTO(3,TOEQ), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "teqi", OPTO(3,TOEQ), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twlgei", OPTO(3,TOLGE), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlgei", OPTO(3,TOLGE), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twlnli", OPTO(3,TOLNL), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlnli", OPTO(3,TOLNL), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twllei", OPTO(3,TOLLE), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tllei", OPTO(3,TOLLE), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twlngi", OPTO(3,TOLNG), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlngi", OPTO(3,TOLNG), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twgti", OPTO(3,TOGT), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tgti", OPTO(3,TOGT), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twgei", OPTO(3,TOGE), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tgei", OPTO(3,TOGE), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twnli", OPTO(3,TONL), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tnli", OPTO(3,TONL), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twlti", OPTO(3,TOLT), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlti", OPTO(3,TOLT), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twlei", OPTO(3,TOLE), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tlei", OPTO(3,TOLE), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twngi", OPTO(3,TONG), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tngi", OPTO(3,TONG), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twnei", OPTO(3,TONE), OPTO_MASK, PPCCOM, { RA, SI } }, -{ "tnei", OPTO(3,TONE), OPTO_MASK, PWRCOM, { RA, SI } }, -{ "twi", OP(3), OP_MASK, PPCCOM, { TO, RA, SI } }, -{ "ti", OP(3), OP_MASK, PWRCOM, { TO, RA, SI } }, - -{ "macchw", XO(4,172,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchw.", XO(4,172,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwo", XO(4,172,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwo.", XO(4,172,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchws", XO(4,236,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchws.", XO(4,236,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwso", XO(4,236,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwso.", XO(4,236,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwsu", XO(4,204,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwsu.", XO(4,204,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwsuo", XO(4,204,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwsuo.", XO(4,204,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwu", XO(4,140,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwu.", XO(4,140,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwuo", XO(4,140,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "macchwuo.", XO(4,140,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhw", XO(4,44,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhw.", XO(4,44,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwo", XO(4,44,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwo.", XO(4,44,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhws", XO(4,108,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhws.", XO(4,108,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwso", XO(4,108,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwso.", XO(4,108,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwsu", XO(4,76,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwsu.", XO(4,76,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwsuo", XO(4,76,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwsuo.", XO(4,76,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwu", XO(4,12,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwu.", XO(4,12,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwuo", XO(4,12,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "machhwuo.", XO(4,12,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhw", XO(4,428,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhw.", XO(4,428,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwo", XO(4,428,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwo.", XO(4,428,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhws", XO(4,492,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhws.", XO(4,492,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwso", XO(4,492,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwso.", XO(4,492,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwsu", XO(4,460,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwsu.", XO(4,460,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwsuo", XO(4,460,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwsuo.", XO(4,460,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwu", XO(4,396,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwu.", XO(4,396,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwuo", XO(4,396,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "maclhwuo.", XO(4,396,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulchw", XRC(4,168,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulchw.", XRC(4,168,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulchwu", XRC(4,136,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulchwu.", XRC(4,136,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulhhw", XRC(4,40,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulhhw.", XRC(4,40,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulhhwu", XRC(4,8,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mulhhwu.", XRC(4,8,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mullhw", XRC(4,424,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mullhw.", XRC(4,424,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mullhwu", XRC(4,392,0), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mullhwu.", XRC(4,392,1), X_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchw", XO(4,174,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchw.", XO(4,174,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchwo", XO(4,174,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchwo.", XO(4,174,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchws", XO(4,238,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchws.", XO(4,238,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchwso", XO(4,238,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmacchwso.", XO(4,238,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhw", XO(4,46,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhw.", XO(4,46,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhwo", XO(4,46,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhwo.", XO(4,46,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhws", XO(4,110,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhws.", XO(4,110,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhwso", XO(4,110,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmachhwso.", XO(4,110,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhw", XO(4,430,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhw.", XO(4,430,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhwo", XO(4,430,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhwo.", XO(4,430,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhws", XO(4,494,0,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhws.", XO(4,494,0,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhwso", XO(4,494,1,0), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "nmaclhwso.", XO(4,494,1,1), XO_MASK, PPC405|PPC440, { RT, RA, RB } }, -{ "mfvscr", VX(4, 1540), VX_MASK, PPCVEC, { VD } }, -{ "mtvscr", VX(4, 1604), VX_MASK, PPCVEC, { VB } }, - - /* Double-precision opcodes. */ - /* Some of these conflict with AltiVec, so move them before, since - PPCVEC includes the PPC_OPCODE_PPC set. */ -{ "efscfd", VX(4, 719), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdabs", VX(4, 740), VX_MASK, PPCEFS, { RS, RA } }, -{ "efdnabs", VX(4, 741), VX_MASK, PPCEFS, { RS, RA } }, -{ "efdneg", VX(4, 742), VX_MASK, PPCEFS, { RS, RA } }, -{ "efdadd", VX(4, 736), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efdsub", VX(4, 737), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efdmul", VX(4, 744), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efddiv", VX(4, 745), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efdcmpgt", VX(4, 748), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdcmplt", VX(4, 749), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdcmpeq", VX(4, 750), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdtstgt", VX(4, 764), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdtstlt", VX(4, 765), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdtsteq", VX(4, 766), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efdcfsi", VX(4, 753), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfsid", VX(4, 739), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfui", VX(4, 752), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfuid", VX(4, 738), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfsf", VX(4, 755), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfuf", VX(4, 754), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctsi", VX(4, 757), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctsidz",VX(4, 747), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctsiz", VX(4, 762), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctui", VX(4, 756), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctuidz",VX(4, 746), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctuiz", VX(4, 760), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctsf", VX(4, 759), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdctuf", VX(4, 758), VX_MASK, PPCEFS, { RS, RB } }, -{ "efdcfs", VX(4, 751), VX_MASK, PPCEFS, { RS, RB } }, - /* End of double-precision opcodes. */ - -{ "vaddcuw", VX(4, 384), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddfp", VX(4, 10), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddsbs", VX(4, 768), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddshs", VX(4, 832), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddsws", VX(4, 896), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddubm", VX(4, 0), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vaddubs", VX(4, 512), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vadduhm", VX(4, 64), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vadduhs", VX(4, 576), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vadduwm", VX(4, 128), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vadduws", VX(4, 640), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vand", VX(4, 1028), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vandc", VX(4, 1092), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavgsb", VX(4, 1282), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavgsh", VX(4, 1346), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavgsw", VX(4, 1410), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavgub", VX(4, 1026), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavguh", VX(4, 1090), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vavguw", VX(4, 1154), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcfsx", VX(4, 842), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vcfux", VX(4, 778), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vcmpbfp", VXR(4, 966, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpbfp.", VXR(4, 966, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpeqfp", VXR(4, 198, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpeqfp.", VXR(4, 198, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequb", VXR(4, 6, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequb.", VXR(4, 6, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequh", VXR(4, 70, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequh.", VXR(4, 70, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequw", VXR(4, 134, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpequw.", VXR(4, 134, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgefp", VXR(4, 454, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgefp.", VXR(4, 454, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtfp", VXR(4, 710, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtfp.", VXR(4, 710, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsb", VXR(4, 774, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsb.", VXR(4, 774, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsh", VXR(4, 838, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsh.", VXR(4, 838, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsw", VXR(4, 902, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtsw.", VXR(4, 902, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtub", VXR(4, 518, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtub.", VXR(4, 518, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtuh", VXR(4, 582, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtuh.", VXR(4, 582, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtuw", VXR(4, 646, 0), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vcmpgtuw.", VXR(4, 646, 1), VXR_MASK, PPCVEC, { VD, VA, VB } }, -{ "vctsxs", VX(4, 970), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vctuxs", VX(4, 906), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vexptefp", VX(4, 394), VX_MASK, PPCVEC, { VD, VB } }, -{ "vlogefp", VX(4, 458), VX_MASK, PPCVEC, { VD, VB } }, -{ "vmaddfp", VXA(4, 46), VXA_MASK, PPCVEC, { VD, VA, VC, VB } }, -{ "vmaxfp", VX(4, 1034), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxsb", VX(4, 258), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxsh", VX(4, 322), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxsw", VX(4, 386), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxub", VX(4, 2), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxuh", VX(4, 66), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmaxuw", VX(4, 130), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmhaddshs", VXA(4, 32), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmhraddshs", VXA(4, 33), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vminfp", VX(4, 1098), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminsb", VX(4, 770), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminsh", VX(4, 834), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminsw", VX(4, 898), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminub", VX(4, 514), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminuh", VX(4, 578), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vminuw", VX(4, 642), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmladduhm", VXA(4, 34), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmrghb", VX(4, 12), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmrghh", VX(4, 76), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmrghw", VX(4, 140), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmrglb", VX(4, 268), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmrglh", VX(4, 332), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmrglw", VX(4, 396), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmsummbm", VXA(4, 37), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmsumshm", VXA(4, 40), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmsumshs", VXA(4, 41), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmsumubm", VXA(4, 36), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmsumuhm", VXA(4, 38), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmsumuhs", VXA(4, 39), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vmulesb", VX(4, 776), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmulesh", VX(4, 840), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmuleub", VX(4, 520), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmuleuh", VX(4, 584), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmulosb", VX(4, 264), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmulosh", VX(4, 328), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmuloub", VX(4, 8), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vmulouh", VX(4, 72), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vnmsubfp", VXA(4, 47), VXA_MASK, PPCVEC, { VD, VA, VC, VB } }, -{ "vnor", VX(4, 1284), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vor", VX(4, 1156), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vperm", VXA(4, 43), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vpkpx", VX(4, 782), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkshss", VX(4, 398), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkshus", VX(4, 270), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkswss", VX(4, 462), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkswus", VX(4, 334), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkuhum", VX(4, 14), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkuhus", VX(4, 142), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkuwum", VX(4, 78), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vpkuwus", VX(4, 206), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vrefp", VX(4, 266), VX_MASK, PPCVEC, { VD, VB } }, -{ "vrfim", VX(4, 714), VX_MASK, PPCVEC, { VD, VB } }, -{ "vrfin", VX(4, 522), VX_MASK, PPCVEC, { VD, VB } }, -{ "vrfip", VX(4, 650), VX_MASK, PPCVEC, { VD, VB } }, -{ "vrfiz", VX(4, 586), VX_MASK, PPCVEC, { VD, VB } }, -{ "vrlb", VX(4, 4), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vrlh", VX(4, 68), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vrlw", VX(4, 132), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vrsqrtefp", VX(4, 330), VX_MASK, PPCVEC, { VD, VB } }, -{ "vsel", VXA(4, 42), VXA_MASK, PPCVEC, { VD, VA, VB, VC } }, -{ "vsl", VX(4, 452), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vslb", VX(4, 260), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsldoi", VXA(4, 44), VXA_MASK, PPCVEC, { VD, VA, VB, SHB } }, -{ "vslh", VX(4, 324), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vslo", VX(4, 1036), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vslw", VX(4, 388), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vspltb", VX(4, 524), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vsplth", VX(4, 588), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vspltisb", VX(4, 780), VX_MASK, PPCVEC, { VD, SIMM } }, -{ "vspltish", VX(4, 844), VX_MASK, PPCVEC, { VD, SIMM } }, -{ "vspltisw", VX(4, 908), VX_MASK, PPCVEC, { VD, SIMM } }, -{ "vspltw", VX(4, 652), VX_MASK, PPCVEC, { VD, VB, UIMM } }, -{ "vsr", VX(4, 708), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsrab", VX(4, 772), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsrah", VX(4, 836), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsraw", VX(4, 900), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsrb", VX(4, 516), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsrh", VX(4, 580), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsro", VX(4, 1100), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsrw", VX(4, 644), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubcuw", VX(4, 1408), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubfp", VX(4, 74), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubsbs", VX(4, 1792), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubshs", VX(4, 1856), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubsws", VX(4, 1920), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsububm", VX(4, 1024), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsububs", VX(4, 1536), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubuhm", VX(4, 1088), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubuhs", VX(4, 1600), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubuwm", VX(4, 1152), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsubuws", VX(4, 1664), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsumsws", VX(4, 1928), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsum2sws", VX(4, 1672), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsum4sbs", VX(4, 1800), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsum4shs", VX(4, 1608), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vsum4ubs", VX(4, 1544), VX_MASK, PPCVEC, { VD, VA, VB } }, -{ "vupkhpx", VX(4, 846), VX_MASK, PPCVEC, { VD, VB } }, -{ "vupkhsb", VX(4, 526), VX_MASK, PPCVEC, { VD, VB } }, -{ "vupkhsh", VX(4, 590), VX_MASK, PPCVEC, { VD, VB } }, -{ "vupklpx", VX(4, 974), VX_MASK, PPCVEC, { VD, VB } }, -{ "vupklsb", VX(4, 654), VX_MASK, PPCVEC, { VD, VB } }, -{ "vupklsh", VX(4, 718), VX_MASK, PPCVEC, { VD, VB } }, -{ "vxor", VX(4, 1220), VX_MASK, PPCVEC, { VD, VA, VB } }, - -{ "evaddw", VX(4, 512), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evaddiw", VX(4, 514), VX_MASK, PPCSPE, { RS, RB, UIMM } }, -{ "evsubfw", VX(4, 516), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evsubw", VX(4, 516), VX_MASK, PPCSPE, { RS, RB, RA } }, -{ "evsubifw", VX(4, 518), VX_MASK, PPCSPE, { RS, UIMM, RB } }, -{ "evsubiw", VX(4, 518), VX_MASK, PPCSPE, { RS, RB, UIMM } }, -{ "evabs", VX(4, 520), VX_MASK, PPCSPE, { RS, RA } }, -{ "evneg", VX(4, 521), VX_MASK, PPCSPE, { RS, RA } }, -{ "evextsb", VX(4, 522), VX_MASK, PPCSPE, { RS, RA } }, -{ "evextsh", VX(4, 523), VX_MASK, PPCSPE, { RS, RA } }, -{ "evrndw", VX(4, 524), VX_MASK, PPCSPE, { RS, RA } }, -{ "evcntlzw", VX(4, 525), VX_MASK, PPCSPE, { RS, RA } }, -{ "evcntlsw", VX(4, 526), VX_MASK, PPCSPE, { RS, RA } }, - -{ "brinc", VX(4, 527), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evand", VX(4, 529), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evandc", VX(4, 530), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmr", VX(4, 535), VX_MASK, PPCSPE, { RS, RA, BBA } }, -{ "evor", VX(4, 535), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evorc", VX(4, 539), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evxor", VX(4, 534), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "eveqv", VX(4, 537), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evnand", VX(4, 542), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evnot", VX(4, 536), VX_MASK, PPCSPE, { RS, RA, BBA } }, -{ "evnor", VX(4, 536), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evrlw", VX(4, 552), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evrlwi", VX(4, 554), VX_MASK, PPCSPE, { RS, RA, EVUIMM } }, -{ "evslw", VX(4, 548), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evslwi", VX(4, 550), VX_MASK, PPCSPE, { RS, RA, EVUIMM } }, -{ "evsrws", VX(4, 545), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evsrwu", VX(4, 544), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evsrwis", VX(4, 547), VX_MASK, PPCSPE, { RS, RA, EVUIMM } }, -{ "evsrwiu", VX(4, 546), VX_MASK, PPCSPE, { RS, RA, EVUIMM } }, -{ "evsplati", VX(4, 553), VX_MASK, PPCSPE, { RS, SIMM } }, -{ "evsplatfi", VX(4, 555), VX_MASK, PPCSPE, { RS, SIMM } }, -{ "evmergehi", VX(4, 556), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmergelo", VX(4, 557), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmergehilo",VX(4,558), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmergelohi",VX(4,559), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evcmpgts", VX(4, 561), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evcmpgtu", VX(4, 560), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evcmplts", VX(4, 563), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evcmpltu", VX(4, 562), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evcmpeq", VX(4, 564), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evsel", EVSEL(4,79),EVSEL_MASK, PPCSPE, { RS, RA, RB, CRFS } }, - -{ "evldd", VX(4, 769), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evlddx", VX(4, 768), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evldw", VX(4, 771), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evldwx", VX(4, 770), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evldh", VX(4, 773), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evldhx", VX(4, 772), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlwhe", VX(4, 785), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evlwhex", VX(4, 784), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlwhou", VX(4, 789), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evlwhoux", VX(4, 788), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlwhos", VX(4, 791), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evlwhosx", VX(4, 790), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlwwsplat",VX(4, 793), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evlwwsplatx",VX(4, 792), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlwhsplat",VX(4, 797), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evlwhsplatx",VX(4, 796), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlhhesplat",VX(4, 777), VX_MASK, PPCSPE, { RS, EVUIMM_2, RA } }, -{ "evlhhesplatx",VX(4, 776), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlhhousplat",VX(4, 781), VX_MASK, PPCSPE, { RS, EVUIMM_2, RA } }, -{ "evlhhousplatx",VX(4, 780), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evlhhossplat",VX(4, 783), VX_MASK, PPCSPE, { RS, EVUIMM_2, RA } }, -{ "evlhhossplatx",VX(4, 782), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evstdd", VX(4, 801), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evstddx", VX(4, 800), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstdw", VX(4, 803), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evstdwx", VX(4, 802), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstdh", VX(4, 805), VX_MASK, PPCSPE, { RS, EVUIMM_8, RA } }, -{ "evstdhx", VX(4, 804), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstwwe", VX(4, 825), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evstwwex", VX(4, 824), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstwwo", VX(4, 829), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evstwwox", VX(4, 828), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstwhe", VX(4, 817), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evstwhex", VX(4, 816), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evstwho", VX(4, 821), VX_MASK, PPCSPE, { RS, EVUIMM_4, RA } }, -{ "evstwhox", VX(4, 820), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evfsabs", VX(4, 644), VX_MASK, PPCSPE, { RS, RA } }, -{ "evfsnabs", VX(4, 645), VX_MASK, PPCSPE, { RS, RA } }, -{ "evfsneg", VX(4, 646), VX_MASK, PPCSPE, { RS, RA } }, -{ "evfsadd", VX(4, 640), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evfssub", VX(4, 641), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evfsmul", VX(4, 648), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evfsdiv", VX(4, 649), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evfscmpgt", VX(4, 652), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfscmplt", VX(4, 653), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfscmpeq", VX(4, 654), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfststgt", VX(4, 668), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfststlt", VX(4, 669), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfststeq", VX(4, 670), VX_MASK, PPCSPE, { CRFD, RA, RB } }, -{ "evfscfui", VX(4, 656), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctuiz", VX(4, 664), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfscfsi", VX(4, 657), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfscfuf", VX(4, 658), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfscfsf", VX(4, 659), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctui", VX(4, 660), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctsi", VX(4, 661), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctsiz", VX(4, 666), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctuf", VX(4, 662), VX_MASK, PPCSPE, { RS, RB } }, -{ "evfsctsf", VX(4, 663), VX_MASK, PPCSPE, { RS, RB } }, - -{ "efsabs", VX(4, 708), VX_MASK, PPCEFS, { RS, RA } }, -{ "efsnabs", VX(4, 709), VX_MASK, PPCEFS, { RS, RA } }, -{ "efsneg", VX(4, 710), VX_MASK, PPCEFS, { RS, RA } }, -{ "efsadd", VX(4, 704), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efssub", VX(4, 705), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efsmul", VX(4, 712), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efsdiv", VX(4, 713), VX_MASK, PPCEFS, { RS, RA, RB } }, -{ "efscmpgt", VX(4, 716), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efscmplt", VX(4, 717), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efscmpeq", VX(4, 718), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efststgt", VX(4, 732), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efststlt", VX(4, 733), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efststeq", VX(4, 734), VX_MASK, PPCEFS, { CRFD, RA, RB } }, -{ "efscfui", VX(4, 720), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctuiz", VX(4, 728), VX_MASK, PPCEFS, { RS, RB } }, -{ "efscfsi", VX(4, 721), VX_MASK, PPCEFS, { RS, RB } }, -{ "efscfuf", VX(4, 722), VX_MASK, PPCEFS, { RS, RB } }, -{ "efscfsf", VX(4, 723), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctui", VX(4, 724), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctsi", VX(4, 725), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctsiz", VX(4, 730), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctuf", VX(4, 726), VX_MASK, PPCEFS, { RS, RB } }, -{ "efsctsf", VX(4, 727), VX_MASK, PPCEFS, { RS, RB } }, - -{ "evmhossf", VX(4, 1031), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhossfa", VX(4, 1063), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmf", VX(4, 1039), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmfa", VX(4, 1071), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmi", VX(4, 1037), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmia", VX(4, 1069), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhoumi", VX(4, 1036), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhoumia", VX(4, 1068), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessf", VX(4, 1027), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessfa", VX(4, 1059), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmf", VX(4, 1035), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmfa", VX(4, 1067), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmi", VX(4, 1033), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmia", VX(4, 1065), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheumi", VX(4, 1032), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheumia", VX(4, 1064), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmhossfaaw",VX(4, 1287), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhossiaaw",VX(4, 1285), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmfaaw",VX(4, 1295), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmiaaw",VX(4, 1293), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhousiaaw",VX(4, 1284), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhoumiaaw",VX(4, 1292), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessfaaw",VX(4, 1283), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessiaaw",VX(4, 1281), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmfaaw",VX(4, 1291), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmiaaw",VX(4, 1289), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheusiaaw",VX(4, 1280), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheumiaaw",VX(4, 1288), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmhossfanw",VX(4, 1415), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhossianw",VX(4, 1413), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmfanw",VX(4, 1423), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhosmianw",VX(4, 1421), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhousianw",VX(4, 1412), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhoumianw",VX(4, 1420), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessfanw",VX(4, 1411), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhessianw",VX(4, 1409), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmfanw",VX(4, 1419), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhesmianw",VX(4, 1417), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheusianw",VX(4, 1408), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmheumianw",VX(4, 1416), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmhogsmfaa",VX(4, 1327), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhogsmiaa",VX(4, 1325), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhogumiaa",VX(4, 1324), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegsmfaa",VX(4, 1323), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegsmiaa",VX(4, 1321), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegumiaa",VX(4, 1320), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmhogsmfan",VX(4, 1455), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhogsmian",VX(4, 1453), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhogumian",VX(4, 1452), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegsmfan",VX(4, 1451), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegsmian",VX(4, 1449), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmhegumian",VX(4, 1448), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwhssf", VX(4, 1095), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhssfa", VX(4, 1127), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhsmf", VX(4, 1103), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhsmfa", VX(4, 1135), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhsmi", VX(4, 1101), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhsmia", VX(4, 1133), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhumi", VX(4, 1100), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwhumia", VX(4, 1132), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwlumi", VX(4, 1096), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlumia", VX(4, 1128), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwlssiaaw",VX(4, 1345), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlsmiaaw",VX(4, 1353), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlusiaaw",VX(4, 1344), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlumiaaw",VX(4, 1352), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwlssianw",VX(4, 1473), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlsmianw",VX(4, 1481), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlusianw",VX(4, 1472), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwlumianw",VX(4, 1480), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwssf", VX(4, 1107), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwssfa", VX(4, 1139), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmf", VX(4, 1115), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmfa", VX(4, 1147), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmi", VX(4, 1113), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmia", VX(4, 1145), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwumi", VX(4, 1112), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwumia", VX(4, 1144), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwssfaa", VX(4, 1363), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmfaa", VX(4, 1371), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmiaa", VX(4, 1369), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwumiaa", VX(4, 1368), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evmwssfan", VX(4, 1491), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmfan", VX(4, 1499), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwsmian", VX(4, 1497), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evmwumian", VX(4, 1496), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "evaddssiaaw",VX(4, 1217), VX_MASK, PPCSPE, { RS, RA } }, -{ "evaddsmiaaw",VX(4, 1225), VX_MASK, PPCSPE, { RS, RA } }, -{ "evaddusiaaw",VX(4, 1216), VX_MASK, PPCSPE, { RS, RA } }, -{ "evaddumiaaw",VX(4, 1224), VX_MASK, PPCSPE, { RS, RA } }, - -{ "evsubfssiaaw",VX(4, 1219), VX_MASK, PPCSPE, { RS, RA } }, -{ "evsubfsmiaaw",VX(4, 1227), VX_MASK, PPCSPE, { RS, RA } }, -{ "evsubfusiaaw",VX(4, 1218), VX_MASK, PPCSPE, { RS, RA } }, -{ "evsubfumiaaw",VX(4, 1226), VX_MASK, PPCSPE, { RS, RA } }, - -{ "evmra", VX(4, 1220), VX_MASK, PPCSPE, { RS, RA } }, - -{ "evdivws", VX(4, 1222), VX_MASK, PPCSPE, { RS, RA, RB } }, -{ "evdivwu", VX(4, 1223), VX_MASK, PPCSPE, { RS, RA, RB } }, - -{ "mulli", OP(7), OP_MASK, PPCCOM, { RT, RA, SI } }, -{ "muli", OP(7), OP_MASK, PWRCOM, { RT, RA, SI } }, - -{ "subfic", OP(8), OP_MASK, PPCCOM, { RT, RA, SI } }, -{ "sfi", OP(8), OP_MASK, PWRCOM, { RT, RA, SI } }, - -{ "dozi", OP(9), OP_MASK, M601, { RT, RA, SI } }, - -{ "bce", B(9,0,0), B_MASK, BOOKE64, { BO, BI, BD } }, -{ "bcel", B(9,0,1), B_MASK, BOOKE64, { BO, BI, BD } }, -{ "bcea", B(9,1,0), B_MASK, BOOKE64, { BO, BI, BDA } }, -{ "bcela", B(9,1,1), B_MASK, BOOKE64, { BO, BI, BDA } }, - -{ "cmplwi", OPL(10,0), OPL_MASK, PPCCOM, { OBF, RA, UI } }, -{ "cmpldi", OPL(10,1), OPL_MASK, PPC64, { OBF, RA, UI } }, -{ "cmpli", OP(10), OP_MASK, PPC, { BF, L, RA, UI } }, -{ "cmpli", OP(10), OP_MASK, PWRCOM, { BF, RA, UI } }, - -{ "cmpwi", OPL(11,0), OPL_MASK, PPCCOM, { OBF, RA, SI } }, -{ "cmpdi", OPL(11,1), OPL_MASK, PPC64, { OBF, RA, SI } }, -{ "cmpi", OP(11), OP_MASK, PPC, { BF, L, RA, SI } }, -{ "cmpi", OP(11), OP_MASK, PWRCOM, { BF, RA, SI } }, - -{ "addic", OP(12), OP_MASK, PPCCOM, { RT, RA, SI } }, -{ "ai", OP(12), OP_MASK, PWRCOM, { RT, RA, SI } }, -{ "subic", OP(12), OP_MASK, PPCCOM, { RT, RA, NSI } }, - -{ "addic.", OP(13), OP_MASK, PPCCOM, { RT, RA, SI } }, -{ "ai.", OP(13), OP_MASK, PWRCOM, { RT, RA, SI } }, -{ "subic.", OP(13), OP_MASK, PPCCOM, { RT, RA, NSI } }, - -{ "li", OP(14), DRA_MASK, PPCCOM, { RT, SI } }, -{ "lil", OP(14), DRA_MASK, PWRCOM, { RT, SI } }, -{ "addi", OP(14), OP_MASK, PPCCOM, { RT, RA0, SI } }, -{ "cal", OP(14), OP_MASK, PWRCOM, { RT, D, RA0 } }, -{ "subi", OP(14), OP_MASK, PPCCOM, { RT, RA0, NSI } }, -{ "la", OP(14), OP_MASK, PPCCOM, { RT, D, RA0 } }, - -{ "lis", OP(15), DRA_MASK, PPCCOM, { RT, SISIGNOPT } }, -{ "liu", OP(15), DRA_MASK, PWRCOM, { RT, SISIGNOPT } }, -{ "addis", OP(15), OP_MASK, PPCCOM, { RT,RA0,SISIGNOPT } }, -{ "cau", OP(15), OP_MASK, PWRCOM, { RT,RA0,SISIGNOPT } }, -{ "subis", OP(15), OP_MASK, PPCCOM, { RT, RA0, NSI } }, - -{ "bdnz-", BBO(16,BODNZ,0,0), BBOATBI_MASK, PPCCOM, { BDM } }, -{ "bdnz+", BBO(16,BODNZ,0,0), BBOATBI_MASK, PPCCOM, { BDP } }, -{ "bdnz", BBO(16,BODNZ,0,0), BBOATBI_MASK, PPCCOM, { BD } }, -{ "bdn", BBO(16,BODNZ,0,0), BBOATBI_MASK, PWRCOM, { BD } }, -{ "bdnzl-", BBO(16,BODNZ,0,1), BBOATBI_MASK, PPCCOM, { BDM } }, -{ "bdnzl+", BBO(16,BODNZ,0,1), BBOATBI_MASK, PPCCOM, { BDP } }, -{ "bdnzl", BBO(16,BODNZ,0,1), BBOATBI_MASK, PPCCOM, { BD } }, -{ "bdnl", BBO(16,BODNZ,0,1), BBOATBI_MASK, PWRCOM, { BD } }, -{ "bdnza-", BBO(16,BODNZ,1,0), BBOATBI_MASK, PPCCOM, { BDMA } }, -{ "bdnza+", BBO(16,BODNZ,1,0), BBOATBI_MASK, PPCCOM, { BDPA } }, -{ "bdnza", BBO(16,BODNZ,1,0), BBOATBI_MASK, PPCCOM, { BDA } }, -{ "bdna", BBO(16,BODNZ,1,0), BBOATBI_MASK, PWRCOM, { BDA } }, -{ "bdnzla-", BBO(16,BODNZ,1,1), BBOATBI_MASK, PPCCOM, { BDMA } }, -{ "bdnzla+", BBO(16,BODNZ,1,1), BBOATBI_MASK, PPCCOM, { BDPA } }, -{ "bdnzla", BBO(16,BODNZ,1,1), BBOATBI_MASK, PPCCOM, { BDA } }, -{ "bdnla", BBO(16,BODNZ,1,1), BBOATBI_MASK, PWRCOM, { BDA } }, -{ "bdz-", BBO(16,BODZ,0,0), BBOATBI_MASK, PPCCOM, { BDM } }, -{ "bdz+", BBO(16,BODZ,0,0), BBOATBI_MASK, PPCCOM, { BDP } }, -{ "bdz", BBO(16,BODZ,0,0), BBOATBI_MASK, COM, { BD } }, -{ "bdzl-", BBO(16,BODZ,0,1), BBOATBI_MASK, PPCCOM, { BDM } }, -{ "bdzl+", BBO(16,BODZ,0,1), BBOATBI_MASK, PPCCOM, { BDP } }, -{ "bdzl", BBO(16,BODZ,0,1), BBOATBI_MASK, COM, { BD } }, -{ "bdza-", BBO(16,BODZ,1,0), BBOATBI_MASK, PPCCOM, { BDMA } }, -{ "bdza+", BBO(16,BODZ,1,0), BBOATBI_MASK, PPCCOM, { BDPA } }, -{ "bdza", BBO(16,BODZ,1,0), BBOATBI_MASK, COM, { BDA } }, -{ "bdzla-", BBO(16,BODZ,1,1), BBOATBI_MASK, PPCCOM, { BDMA } }, -{ "bdzla+", BBO(16,BODZ,1,1), BBOATBI_MASK, PPCCOM, { BDPA } }, -{ "bdzla", BBO(16,BODZ,1,1), BBOATBI_MASK, COM, { BDA } }, -{ "blt-", BBOCB(16,BOT,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "blt+", BBOCB(16,BOT,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "blt", BBOCB(16,BOT,CBLT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bltl-", BBOCB(16,BOT,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bltl+", BBOCB(16,BOT,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bltl", BBOCB(16,BOT,CBLT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "blta-", BBOCB(16,BOT,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "blta+", BBOCB(16,BOT,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "blta", BBOCB(16,BOT,CBLT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bltla-", BBOCB(16,BOT,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bltla+", BBOCB(16,BOT,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bltla", BBOCB(16,BOT,CBLT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bgt-", BBOCB(16,BOT,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bgt+", BBOCB(16,BOT,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bgt", BBOCB(16,BOT,CBGT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bgtl-", BBOCB(16,BOT,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bgtl+", BBOCB(16,BOT,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bgtl", BBOCB(16,BOT,CBGT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bgta-", BBOCB(16,BOT,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bgta+", BBOCB(16,BOT,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bgta", BBOCB(16,BOT,CBGT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bgtla-", BBOCB(16,BOT,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bgtla+", BBOCB(16,BOT,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bgtla", BBOCB(16,BOT,CBGT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "beq-", BBOCB(16,BOT,CBEQ,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "beq+", BBOCB(16,BOT,CBEQ,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "beq", BBOCB(16,BOT,CBEQ,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "beql-", BBOCB(16,BOT,CBEQ,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "beql+", BBOCB(16,BOT,CBEQ,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "beql", BBOCB(16,BOT,CBEQ,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "beqa-", BBOCB(16,BOT,CBEQ,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "beqa+", BBOCB(16,BOT,CBEQ,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "beqa", BBOCB(16,BOT,CBEQ,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "beqla-", BBOCB(16,BOT,CBEQ,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "beqla+", BBOCB(16,BOT,CBEQ,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "beqla", BBOCB(16,BOT,CBEQ,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bso-", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bso+", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bso", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bsol-", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bsol+", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bsol", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bsoa-", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bsoa+", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bsoa", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bsola-", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bsola+", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bsola", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bun-", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bun+", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bun", BBOCB(16,BOT,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BD } }, -{ "bunl-", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bunl+", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bunl", BBOCB(16,BOT,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BD } }, -{ "buna-", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "buna+", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "buna", BBOCB(16,BOT,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDA } }, -{ "bunla-", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bunla+", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bunla", BBOCB(16,BOT,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDA } }, -{ "bge-", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bge+", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bge", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bgel-", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bgel+", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bgel", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bgea-", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bgea+", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bgea", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bgela-", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bgela+", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bgela", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bnl-", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnl+", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnl", BBOCB(16,BOF,CBLT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnll-", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnll+", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnll", BBOCB(16,BOF,CBLT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnla-", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnla+", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnla", BBOCB(16,BOF,CBLT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bnlla-", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnlla+", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnlla", BBOCB(16,BOF,CBLT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "ble-", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "ble+", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "ble", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "blel-", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "blel+", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "blel", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "blea-", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "blea+", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "blea", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "blela-", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "blela+", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "blela", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bng-", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bng+", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bng", BBOCB(16,BOF,CBGT,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bngl-", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bngl+", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bngl", BBOCB(16,BOF,CBGT,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnga-", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnga+", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnga", BBOCB(16,BOF,CBGT,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bngla-", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bngla+", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bngla", BBOCB(16,BOF,CBGT,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bne-", BBOCB(16,BOF,CBEQ,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bne+", BBOCB(16,BOF,CBEQ,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bne", BBOCB(16,BOF,CBEQ,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnel-", BBOCB(16,BOF,CBEQ,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnel+", BBOCB(16,BOF,CBEQ,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnel", BBOCB(16,BOF,CBEQ,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnea-", BBOCB(16,BOF,CBEQ,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnea+", BBOCB(16,BOF,CBEQ,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnea", BBOCB(16,BOF,CBEQ,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bnela-", BBOCB(16,BOF,CBEQ,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnela+", BBOCB(16,BOF,CBEQ,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnela", BBOCB(16,BOF,CBEQ,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bns-", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bns+", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bns", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnsl-", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnsl+", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnsl", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, COM, { CR, BD } }, -{ "bnsa-", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnsa+", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnsa", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bnsla-", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnsla+", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnsla", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, COM, { CR, BDA } }, -{ "bnu-", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnu+", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnu", BBOCB(16,BOF,CBSO,0,0), BBOATCB_MASK, PPCCOM, { CR, BD } }, -{ "bnul-", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDM } }, -{ "bnul+", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BDP } }, -{ "bnul", BBOCB(16,BOF,CBSO,0,1), BBOATCB_MASK, PPCCOM, { CR, BD } }, -{ "bnua-", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnua+", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnua", BBOCB(16,BOF,CBSO,1,0), BBOATCB_MASK, PPCCOM, { CR, BDA } }, -{ "bnula-", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDMA } }, -{ "bnula+", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDPA } }, -{ "bnula", BBOCB(16,BOF,CBSO,1,1), BBOATCB_MASK, PPCCOM, { CR, BDA } }, -{ "bdnzt-", BBO(16,BODNZT,0,0), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdnzt+", BBO(16,BODNZT,0,0), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdnzt", BBO(16,BODNZT,0,0), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdnztl-", BBO(16,BODNZT,0,1), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdnztl+", BBO(16,BODNZT,0,1), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdnztl", BBO(16,BODNZT,0,1), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdnzta-", BBO(16,BODNZT,1,0), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdnzta+", BBO(16,BODNZT,1,0), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdnzta", BBO(16,BODNZT,1,0), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdnztla-",BBO(16,BODNZT,1,1), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdnztla+",BBO(16,BODNZT,1,1), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdnztla", BBO(16,BODNZT,1,1), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdnzf-", BBO(16,BODNZF,0,0), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdnzf+", BBO(16,BODNZF,0,0), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdnzf", BBO(16,BODNZF,0,0), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdnzfl-", BBO(16,BODNZF,0,1), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdnzfl+", BBO(16,BODNZF,0,1), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdnzfl", BBO(16,BODNZF,0,1), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdnzfa-", BBO(16,BODNZF,1,0), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdnzfa+", BBO(16,BODNZF,1,0), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdnzfa", BBO(16,BODNZF,1,0), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdnzfla-",BBO(16,BODNZF,1,1), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdnzfla+",BBO(16,BODNZF,1,1), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdnzfla", BBO(16,BODNZF,1,1), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bt-", BBO(16,BOT,0,0), BBOAT_MASK, PPCCOM, { BI, BDM } }, -{ "bt+", BBO(16,BOT,0,0), BBOAT_MASK, PPCCOM, { BI, BDP } }, -{ "bt", BBO(16,BOT,0,0), BBOAT_MASK, PPCCOM, { BI, BD } }, -{ "bbt", BBO(16,BOT,0,0), BBOAT_MASK, PWRCOM, { BI, BD } }, -{ "btl-", BBO(16,BOT,0,1), BBOAT_MASK, PPCCOM, { BI, BDM } }, -{ "btl+", BBO(16,BOT,0,1), BBOAT_MASK, PPCCOM, { BI, BDP } }, -{ "btl", BBO(16,BOT,0,1), BBOAT_MASK, PPCCOM, { BI, BD } }, -{ "bbtl", BBO(16,BOT,0,1), BBOAT_MASK, PWRCOM, { BI, BD } }, -{ "bta-", BBO(16,BOT,1,0), BBOAT_MASK, PPCCOM, { BI, BDMA } }, -{ "bta+", BBO(16,BOT,1,0), BBOAT_MASK, PPCCOM, { BI, BDPA } }, -{ "bta", BBO(16,BOT,1,0), BBOAT_MASK, PPCCOM, { BI, BDA } }, -{ "bbta", BBO(16,BOT,1,0), BBOAT_MASK, PWRCOM, { BI, BDA } }, -{ "btla-", BBO(16,BOT,1,1), BBOAT_MASK, PPCCOM, { BI, BDMA } }, -{ "btla+", BBO(16,BOT,1,1), BBOAT_MASK, PPCCOM, { BI, BDPA } }, -{ "btla", BBO(16,BOT,1,1), BBOAT_MASK, PPCCOM, { BI, BDA } }, -{ "bbtla", BBO(16,BOT,1,1), BBOAT_MASK, PWRCOM, { BI, BDA } }, -{ "bf-", BBO(16,BOF,0,0), BBOAT_MASK, PPCCOM, { BI, BDM } }, -{ "bf+", BBO(16,BOF,0,0), BBOAT_MASK, PPCCOM, { BI, BDP } }, -{ "bf", BBO(16,BOF,0,0), BBOAT_MASK, PPCCOM, { BI, BD } }, -{ "bbf", BBO(16,BOF,0,0), BBOAT_MASK, PWRCOM, { BI, BD } }, -{ "bfl-", BBO(16,BOF,0,1), BBOAT_MASK, PPCCOM, { BI, BDM } }, -{ "bfl+", BBO(16,BOF,0,1), BBOAT_MASK, PPCCOM, { BI, BDP } }, -{ "bfl", BBO(16,BOF,0,1), BBOAT_MASK, PPCCOM, { BI, BD } }, -{ "bbfl", BBO(16,BOF,0,1), BBOAT_MASK, PWRCOM, { BI, BD } }, -{ "bfa-", BBO(16,BOF,1,0), BBOAT_MASK, PPCCOM, { BI, BDMA } }, -{ "bfa+", BBO(16,BOF,1,0), BBOAT_MASK, PPCCOM, { BI, BDPA } }, -{ "bfa", BBO(16,BOF,1,0), BBOAT_MASK, PPCCOM, { BI, BDA } }, -{ "bbfa", BBO(16,BOF,1,0), BBOAT_MASK, PWRCOM, { BI, BDA } }, -{ "bfla-", BBO(16,BOF,1,1), BBOAT_MASK, PPCCOM, { BI, BDMA } }, -{ "bfla+", BBO(16,BOF,1,1), BBOAT_MASK, PPCCOM, { BI, BDPA } }, -{ "bfla", BBO(16,BOF,1,1), BBOAT_MASK, PPCCOM, { BI, BDA } }, -{ "bbfla", BBO(16,BOF,1,1), BBOAT_MASK, PWRCOM, { BI, BDA } }, -{ "bdzt-", BBO(16,BODZT,0,0), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdzt+", BBO(16,BODZT,0,0), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdzt", BBO(16,BODZT,0,0), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdztl-", BBO(16,BODZT,0,1), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdztl+", BBO(16,BODZT,0,1), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdztl", BBO(16,BODZT,0,1), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdzta-", BBO(16,BODZT,1,0), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdzta+", BBO(16,BODZT,1,0), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdzta", BBO(16,BODZT,1,0), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdztla-", BBO(16,BODZT,1,1), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdztla+", BBO(16,BODZT,1,1), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdztla", BBO(16,BODZT,1,1), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdzf-", BBO(16,BODZF,0,0), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdzf+", BBO(16,BODZF,0,0), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdzf", BBO(16,BODZF,0,0), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdzfl-", BBO(16,BODZF,0,1), BBOY_MASK, NOPOWER4, { BI, BDM } }, -{ "bdzfl+", BBO(16,BODZF,0,1), BBOY_MASK, NOPOWER4, { BI, BDP } }, -{ "bdzfl", BBO(16,BODZF,0,1), BBOY_MASK, PPCCOM, { BI, BD } }, -{ "bdzfa-", BBO(16,BODZF,1,0), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdzfa+", BBO(16,BODZF,1,0), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdzfa", BBO(16,BODZF,1,0), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bdzfla-", BBO(16,BODZF,1,1), BBOY_MASK, NOPOWER4, { BI, BDMA } }, -{ "bdzfla+", BBO(16,BODZF,1,1), BBOY_MASK, NOPOWER4, { BI, BDPA } }, -{ "bdzfla", BBO(16,BODZF,1,1), BBOY_MASK, PPCCOM, { BI, BDA } }, -{ "bc-", B(16,0,0), B_MASK, PPCCOM, { BOE, BI, BDM } }, -{ "bc+", B(16,0,0), B_MASK, PPCCOM, { BOE, BI, BDP } }, -{ "bc", B(16,0,0), B_MASK, COM, { BO, BI, BD } }, -{ "bcl-", B(16,0,1), B_MASK, PPCCOM, { BOE, BI, BDM } }, -{ "bcl+", B(16,0,1), B_MASK, PPCCOM, { BOE, BI, BDP } }, -{ "bcl", B(16,0,1), B_MASK, COM, { BO, BI, BD } }, -{ "bca-", B(16,1,0), B_MASK, PPCCOM, { BOE, BI, BDMA } }, -{ "bca+", B(16,1,0), B_MASK, PPCCOM, { BOE, BI, BDPA } }, -{ "bca", B(16,1,0), B_MASK, COM, { BO, BI, BDA } }, -{ "bcla-", B(16,1,1), B_MASK, PPCCOM, { BOE, BI, BDMA } }, -{ "bcla+", B(16,1,1), B_MASK, PPCCOM, { BOE, BI, BDPA } }, -{ "bcla", B(16,1,1), B_MASK, COM, { BO, BI, BDA } }, - -{ "sc", SC(17,1,0), SC_MASK, PPC, { LEV } }, -{ "svc", SC(17,0,0), SC_MASK, POWER, { SVC_LEV, FL1, FL2 } }, -{ "svcl", SC(17,0,1), SC_MASK, POWER, { SVC_LEV, FL1, FL2 } }, -{ "svca", SC(17,1,0), SC_MASK, PWRCOM, { SV } }, -{ "svcla", SC(17,1,1), SC_MASK, POWER, { SV } }, - -{ "b", B(18,0,0), B_MASK, COM, { LI } }, -{ "bl", B(18,0,1), B_MASK, COM, { LI } }, -{ "ba", B(18,1,0), B_MASK, COM, { LIA } }, -{ "bla", B(18,1,1), B_MASK, COM, { LIA } }, - -{ "mcrf", XL(19,0), XLBB_MASK|(3 << 21)|(3 << 16), COM, { BF, BFA } }, - -{ "blr", XLO(19,BOU,16,0), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "br", XLO(19,BOU,16,0), XLBOBIBB_MASK, PWRCOM, { 0 } }, -{ "blrl", XLO(19,BOU,16,1), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "brl", XLO(19,BOU,16,1), XLBOBIBB_MASK, PWRCOM, { 0 } }, -{ "bdnzlr", XLO(19,BODNZ,16,0), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "bdnzlr-", XLO(19,BODNZ,16,0), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdnzlr-", XLO(19,BODNZM4,16,0), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdnzlr+", XLO(19,BODNZP,16,0), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdnzlr+", XLO(19,BODNZP4,16,0), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdnzlrl", XLO(19,BODNZ,16,1), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "bdnzlrl-",XLO(19,BODNZ,16,1), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdnzlrl-",XLO(19,BODNZM4,16,1), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdnzlrl+",XLO(19,BODNZP,16,1), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdnzlrl+",XLO(19,BODNZP4,16,1), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdzlr", XLO(19,BODZ,16,0), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "bdzlr-", XLO(19,BODZ,16,0), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdzlr-", XLO(19,BODZM4,16,0), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdzlr+", XLO(19,BODZP,16,0), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdzlr+", XLO(19,BODZP4,16,0), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdzlrl", XLO(19,BODZ,16,1), XLBOBIBB_MASK, PPCCOM, { 0 } }, -{ "bdzlrl-", XLO(19,BODZ,16,1), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdzlrl-", XLO(19,BODZM4,16,1), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bdzlrl+", XLO(19,BODZP,16,1), XLBOBIBB_MASK, NOPOWER4, { 0 } }, -{ "bdzlrl+", XLO(19,BODZP4,16,1), XLBOBIBB_MASK, POWER4, { 0 } }, -{ "bltlr", XLOCB(19,BOT,CBLT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bltlr-", XLOCB(19,BOT,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltlr-", XLOCB(19,BOTM4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltlr+", XLOCB(19,BOTP,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltlr+", XLOCB(19,BOTP4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltr", XLOCB(19,BOT,CBLT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bltlrl", XLOCB(19,BOT,CBLT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bltlrl-", XLOCB(19,BOT,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltlrl-", XLOCB(19,BOTM4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltlrl+", XLOCB(19,BOTP,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltlrl+", XLOCB(19,BOTP4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltrl", XLOCB(19,BOT,CBLT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bgtlr", XLOCB(19,BOT,CBGT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgtlr-", XLOCB(19,BOT,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtlr-", XLOCB(19,BOTM4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtlr+", XLOCB(19,BOTP,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtlr+", XLOCB(19,BOTP4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtr", XLOCB(19,BOT,CBGT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bgtlrl", XLOCB(19,BOT,CBGT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgtlrl-", XLOCB(19,BOT,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtlrl-", XLOCB(19,BOTM4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtlrl+", XLOCB(19,BOTP,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtlrl+", XLOCB(19,BOTP4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtrl", XLOCB(19,BOT,CBGT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "beqlr", XLOCB(19,BOT,CBEQ,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "beqlr-", XLOCB(19,BOT,CBEQ,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqlr-", XLOCB(19,BOTM4,CBEQ,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqlr+", XLOCB(19,BOTP,CBEQ,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqlr+", XLOCB(19,BOTP4,CBEQ,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqr", XLOCB(19,BOT,CBEQ,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "beqlrl", XLOCB(19,BOT,CBEQ,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "beqlrl-", XLOCB(19,BOT,CBEQ,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqlrl-", XLOCB(19,BOTM4,CBEQ,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqlrl+", XLOCB(19,BOTP,CBEQ,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqlrl+", XLOCB(19,BOTP4,CBEQ,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqrl", XLOCB(19,BOT,CBEQ,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bsolr", XLOCB(19,BOT,CBSO,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bsolr-", XLOCB(19,BOT,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsolr-", XLOCB(19,BOTM4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsolr+", XLOCB(19,BOTP,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsolr+", XLOCB(19,BOTP4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsor", XLOCB(19,BOT,CBSO,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bsolrl", XLOCB(19,BOT,CBSO,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bsolrl-", XLOCB(19,BOT,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsolrl-", XLOCB(19,BOTM4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsolrl+", XLOCB(19,BOTP,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsolrl+", XLOCB(19,BOTP4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsorl", XLOCB(19,BOT,CBSO,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bunlr", XLOCB(19,BOT,CBSO,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bunlr-", XLOCB(19,BOT,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunlr-", XLOCB(19,BOTM4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunlr+", XLOCB(19,BOTP,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunlr+", XLOCB(19,BOTP4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunlrl", XLOCB(19,BOT,CBSO,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bunlrl-", XLOCB(19,BOT,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunlrl-", XLOCB(19,BOTM4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunlrl+", XLOCB(19,BOTP,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunlrl+", XLOCB(19,BOTP4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgelr", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgelr-", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgelr-", XLOCB(19,BOFM4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgelr+", XLOCB(19,BOFP,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgelr+", XLOCB(19,BOFP4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bger", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bgelrl", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgelrl-", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgelrl-", XLOCB(19,BOFM4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgelrl+", XLOCB(19,BOFP,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgelrl+", XLOCB(19,BOFP4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgerl", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnllr", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnllr-", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnllr-", XLOCB(19,BOFM4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnllr+", XLOCB(19,BOFP,CBLT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnllr+", XLOCB(19,BOFP4,CBLT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlr", XLOCB(19,BOF,CBLT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnllrl", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnllrl-", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnllrl-", XLOCB(19,BOFM4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnllrl+", XLOCB(19,BOFP,CBLT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnllrl+", XLOCB(19,BOFP4,CBLT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlrl", XLOCB(19,BOF,CBLT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "blelr", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "blelr-", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blelr-", XLOCB(19,BOFM4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blelr+", XLOCB(19,BOFP,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blelr+", XLOCB(19,BOFP4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bler", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "blelrl", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "blelrl-", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blelrl-", XLOCB(19,BOFM4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blelrl+", XLOCB(19,BOFP,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blelrl+", XLOCB(19,BOFP4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blerl", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnglr", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnglr-", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnglr-", XLOCB(19,BOFM4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnglr+", XLOCB(19,BOFP,CBGT,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnglr+", XLOCB(19,BOFP4,CBGT,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngr", XLOCB(19,BOF,CBGT,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnglrl", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnglrl-", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnglrl-", XLOCB(19,BOFM4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnglrl+", XLOCB(19,BOFP,CBGT,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnglrl+", XLOCB(19,BOFP4,CBGT,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngrl", XLOCB(19,BOF,CBGT,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnelr", XLOCB(19,BOF,CBEQ,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnelr-", XLOCB(19,BOF,CBEQ,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnelr-", XLOCB(19,BOFM4,CBEQ,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnelr+", XLOCB(19,BOFP,CBEQ,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnelr+", XLOCB(19,BOFP4,CBEQ,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bner", XLOCB(19,BOF,CBEQ,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnelrl", XLOCB(19,BOF,CBEQ,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnelrl-", XLOCB(19,BOF,CBEQ,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnelrl-", XLOCB(19,BOFM4,CBEQ,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnelrl+", XLOCB(19,BOFP,CBEQ,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnelrl+", XLOCB(19,BOFP4,CBEQ,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnerl", XLOCB(19,BOF,CBEQ,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnslr", XLOCB(19,BOF,CBSO,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnslr-", XLOCB(19,BOF,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnslr-", XLOCB(19,BOFM4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnslr+", XLOCB(19,BOFP,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnslr+", XLOCB(19,BOFP4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsr", XLOCB(19,BOF,CBSO,16,0), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnslrl", XLOCB(19,BOF,CBSO,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnslrl-", XLOCB(19,BOF,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnslrl-", XLOCB(19,BOFM4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnslrl+", XLOCB(19,BOFP,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnslrl+", XLOCB(19,BOFP4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsrl", XLOCB(19,BOF,CBSO,16,1), XLBOCBBB_MASK, PWRCOM, { CR } }, -{ "bnulr", XLOCB(19,BOF,CBSO,16,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnulr-", XLOCB(19,BOF,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnulr-", XLOCB(19,BOFM4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnulr+", XLOCB(19,BOFP,CBSO,16,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnulr+", XLOCB(19,BOFP4,CBSO,16,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnulrl", XLOCB(19,BOF,CBSO,16,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnulrl-", XLOCB(19,BOF,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnulrl-", XLOCB(19,BOFM4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnulrl+", XLOCB(19,BOFP,CBSO,16,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnulrl+", XLOCB(19,BOFP4,CBSO,16,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "btlr", XLO(19,BOT,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "btlr-", XLO(19,BOT,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btlr-", XLO(19,BOTM4,16,0), XLBOBB_MASK, POWER4, { BI } }, -{ "btlr+", XLO(19,BOTP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btlr+", XLO(19,BOTP4,16,0), XLBOBB_MASK, POWER4, { BI } }, -{ "bbtr", XLO(19,BOT,16,0), XLBOBB_MASK, PWRCOM, { BI } }, -{ "btlrl", XLO(19,BOT,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "btlrl-", XLO(19,BOT,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btlrl-", XLO(19,BOTM4,16,1), XLBOBB_MASK, POWER4, { BI } }, -{ "btlrl+", XLO(19,BOTP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btlrl+", XLO(19,BOTP4,16,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bbtrl", XLO(19,BOT,16,1), XLBOBB_MASK, PWRCOM, { BI } }, -{ "bflr", XLO(19,BOF,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bflr-", XLO(19,BOF,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bflr-", XLO(19,BOFM4,16,0), XLBOBB_MASK, POWER4, { BI } }, -{ "bflr+", XLO(19,BOFP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bflr+", XLO(19,BOFP4,16,0), XLBOBB_MASK, POWER4, { BI } }, -{ "bbfr", XLO(19,BOF,16,0), XLBOBB_MASK, PWRCOM, { BI } }, -{ "bflrl", XLO(19,BOF,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bflrl-", XLO(19,BOF,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bflrl-", XLO(19,BOFM4,16,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bflrl+", XLO(19,BOFP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bflrl+", XLO(19,BOFP4,16,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bbfrl", XLO(19,BOF,16,1), XLBOBB_MASK, PWRCOM, { BI } }, -{ "bdnztlr", XLO(19,BODNZT,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdnztlr-",XLO(19,BODNZT,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnztlr+",XLO(19,BODNZTP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnztlrl",XLO(19,BODNZT,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdnztlrl-",XLO(19,BODNZT,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnztlrl+",XLO(19,BODNZTP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnzflr", XLO(19,BODNZF,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdnzflr-",XLO(19,BODNZF,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnzflr+",XLO(19,BODNZFP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnzflrl",XLO(19,BODNZF,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdnzflrl-",XLO(19,BODNZF,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdnzflrl+",XLO(19,BODNZFP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdztlr", XLO(19,BODZT,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdztlr-", XLO(19,BODZT,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdztlr+", XLO(19,BODZTP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdztlrl", XLO(19,BODZT,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdztlrl-",XLO(19,BODZT,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdztlrl+",XLO(19,BODZTP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdzflr", XLO(19,BODZF,16,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdzflr-", XLO(19,BODZF,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdzflr+", XLO(19,BODZFP,16,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdzflrl", XLO(19,BODZF,16,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bdzflrl-",XLO(19,BODZF,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bdzflrl+",XLO(19,BODZFP,16,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bclr+", XLYLK(19,16,1,0), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bclrl+", XLYLK(19,16,1,1), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bclr-", XLYLK(19,16,0,0), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bclrl-", XLYLK(19,16,0,1), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bclr", XLLK(19,16,0), XLBH_MASK, PPCCOM, { BO, BI, BH } }, -{ "bclrl", XLLK(19,16,1), XLBH_MASK, PPCCOM, { BO, BI, BH } }, -{ "bcr", XLLK(19,16,0), XLBB_MASK, PWRCOM, { BO, BI } }, -{ "bcrl", XLLK(19,16,1), XLBB_MASK, PWRCOM, { BO, BI } }, -{ "bclre", XLLK(19,17,0), XLBB_MASK, BOOKE64, { BO, BI } }, -{ "bclrel", XLLK(19,17,1), XLBB_MASK, BOOKE64, { BO, BI } }, - -{ "rfid", XL(19,18), 0xffffffff, PPC64, { 0 } }, - -{ "crnot", XL(19,33), XL_MASK, PPCCOM, { BT, BA, BBA } }, -{ "crnor", XL(19,33), XL_MASK, COM, { BT, BA, BB } }, -{ "rfmci", X(19,38), 0xffffffff, PPCRFMCI, { 0 } }, - -{ "rfi", XL(19,50), 0xffffffff, COM, { 0 } }, -{ "rfci", XL(19,51), 0xffffffff, PPC403 | BOOKE, { 0 } }, - -{ "rfsvc", XL(19,82), 0xffffffff, POWER, { 0 } }, - -{ "crandc", XL(19,129), XL_MASK, COM, { BT, BA, BB } }, - -{ "isync", XL(19,150), 0xffffffff, PPCCOM, { 0 } }, -{ "ics", XL(19,150), 0xffffffff, PWRCOM, { 0 } }, - -{ "crclr", XL(19,193), XL_MASK, PPCCOM, { BT, BAT, BBA } }, -{ "crxor", XL(19,193), XL_MASK, COM, { BT, BA, BB } }, - -{ "crnand", XL(19,225), XL_MASK, COM, { BT, BA, BB } }, - -{ "crand", XL(19,257), XL_MASK, COM, { BT, BA, BB } }, - -{ "hrfid", XL(19,274), 0xffffffff, POWER5 | CELL, { 0 } }, - -{ "crset", XL(19,289), XL_MASK, PPCCOM, { BT, BAT, BBA } }, -{ "creqv", XL(19,289), XL_MASK, COM, { BT, BA, BB } }, - -{ "doze", XL(19,402), 0xffffffff, POWER6, { 0 } }, - -{ "crorc", XL(19,417), XL_MASK, COM, { BT, BA, BB } }, - -{ "nap", XL(19,434), 0xffffffff, POWER6, { 0 } }, - -{ "crmove", XL(19,449), XL_MASK, PPCCOM, { BT, BA, BBA } }, -{ "cror", XL(19,449), XL_MASK, COM, { BT, BA, BB } }, - -{ "sleep", XL(19,466), 0xffffffff, POWER6, { 0 } }, -{ "rvwinkle", XL(19,498), 0xffffffff, POWER6, { 0 } }, - -{ "bctr", XLO(19,BOU,528,0), XLBOBIBB_MASK, COM, { 0 } }, -{ "bctrl", XLO(19,BOU,528,1), XLBOBIBB_MASK, COM, { 0 } }, -{ "bltctr", XLOCB(19,BOT,CBLT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bltctr-", XLOCB(19,BOT,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltctr-", XLOCB(19,BOTM4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltctr+", XLOCB(19,BOTP,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltctr+", XLOCB(19,BOTP4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltctrl", XLOCB(19,BOT,CBLT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bltctrl-",XLOCB(19,BOT,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltctrl-",XLOCB(19,BOTM4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bltctrl+",XLOCB(19,BOTP,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bltctrl+",XLOCB(19,BOTP4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtctr", XLOCB(19,BOT,CBGT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgtctr-", XLOCB(19,BOT,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtctr-", XLOCB(19,BOTM4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtctr+", XLOCB(19,BOTP,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtctr+", XLOCB(19,BOTP4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtctrl", XLOCB(19,BOT,CBGT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgtctrl-",XLOCB(19,BOT,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtctrl-",XLOCB(19,BOTM4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgtctrl+",XLOCB(19,BOTP,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgtctrl+",XLOCB(19,BOTP4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqctr", XLOCB(19,BOT,CBEQ,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "beqctr-", XLOCB(19,BOT,CBEQ,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqctr-", XLOCB(19,BOTM4,CBEQ,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqctr+", XLOCB(19,BOTP,CBEQ,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqctr+", XLOCB(19,BOTP4,CBEQ,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqctrl", XLOCB(19,BOT,CBEQ,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "beqctrl-",XLOCB(19,BOT,CBEQ,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqctrl-",XLOCB(19,BOTM4,CBEQ,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "beqctrl+",XLOCB(19,BOTP,CBEQ,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "beqctrl+",XLOCB(19,BOTP4,CBEQ,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsoctr", XLOCB(19,BOT,CBSO,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bsoctr-", XLOCB(19,BOT,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsoctr-", XLOCB(19,BOTM4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsoctr+", XLOCB(19,BOTP,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsoctr+", XLOCB(19,BOTP4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsoctrl", XLOCB(19,BOT,CBSO,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bsoctrl-",XLOCB(19,BOT,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsoctrl-",XLOCB(19,BOTM4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bsoctrl+",XLOCB(19,BOTP,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bsoctrl+",XLOCB(19,BOTP4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunctr", XLOCB(19,BOT,CBSO,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bunctr-", XLOCB(19,BOT,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunctr-", XLOCB(19,BOTM4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunctr+", XLOCB(19,BOTP,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunctr+", XLOCB(19,BOTP4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunctrl", XLOCB(19,BOT,CBSO,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bunctrl-",XLOCB(19,BOT,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunctrl-",XLOCB(19,BOTM4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bunctrl+",XLOCB(19,BOTP,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bunctrl+",XLOCB(19,BOTP4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgectr", XLOCB(19,BOF,CBLT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgectr-", XLOCB(19,BOF,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgectr-", XLOCB(19,BOFM4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgectr+", XLOCB(19,BOFP,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgectr+", XLOCB(19,BOFP4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgectrl", XLOCB(19,BOF,CBLT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bgectrl-",XLOCB(19,BOF,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgectrl-",XLOCB(19,BOFM4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bgectrl+",XLOCB(19,BOFP,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bgectrl+",XLOCB(19,BOFP4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlctr", XLOCB(19,BOF,CBLT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnlctr-", XLOCB(19,BOF,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnlctr-", XLOCB(19,BOFM4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlctr+", XLOCB(19,BOFP,CBLT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnlctr+", XLOCB(19,BOFP4,CBLT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlctrl", XLOCB(19,BOF,CBLT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnlctrl-",XLOCB(19,BOF,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnlctrl-",XLOCB(19,BOFM4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnlctrl+",XLOCB(19,BOFP,CBLT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnlctrl+",XLOCB(19,BOFP4,CBLT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blectr", XLOCB(19,BOF,CBGT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "blectr-", XLOCB(19,BOF,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blectr-", XLOCB(19,BOFM4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blectr+", XLOCB(19,BOFP,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blectr+", XLOCB(19,BOFP4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blectrl", XLOCB(19,BOF,CBGT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "blectrl-",XLOCB(19,BOF,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blectrl-",XLOCB(19,BOFM4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "blectrl+",XLOCB(19,BOFP,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "blectrl+",XLOCB(19,BOFP4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngctr", XLOCB(19,BOF,CBGT,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bngctr-", XLOCB(19,BOF,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bngctr-", XLOCB(19,BOFM4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngctr+", XLOCB(19,BOFP,CBGT,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bngctr+", XLOCB(19,BOFP4,CBGT,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngctrl", XLOCB(19,BOF,CBGT,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bngctrl-",XLOCB(19,BOF,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bngctrl-",XLOCB(19,BOFM4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bngctrl+",XLOCB(19,BOFP,CBGT,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bngctrl+",XLOCB(19,BOFP4,CBGT,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnectr", XLOCB(19,BOF,CBEQ,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnectr-", XLOCB(19,BOF,CBEQ,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnectr-", XLOCB(19,BOFM4,CBEQ,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnectr+", XLOCB(19,BOFP,CBEQ,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnectr+", XLOCB(19,BOFP4,CBEQ,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnectrl", XLOCB(19,BOF,CBEQ,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnectrl-",XLOCB(19,BOF,CBEQ,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnectrl-",XLOCB(19,BOFM4,CBEQ,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnectrl+",XLOCB(19,BOFP,CBEQ,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnectrl+",XLOCB(19,BOFP4,CBEQ,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsctr", XLOCB(19,BOF,CBSO,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnsctr-", XLOCB(19,BOF,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnsctr-", XLOCB(19,BOFM4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsctr+", XLOCB(19,BOFP,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnsctr+", XLOCB(19,BOFP4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsctrl", XLOCB(19,BOF,CBSO,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnsctrl-",XLOCB(19,BOF,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnsctrl-",XLOCB(19,BOFM4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnsctrl+",XLOCB(19,BOFP,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnsctrl+",XLOCB(19,BOFP4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnuctr", XLOCB(19,BOF,CBSO,528,0), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnuctr-", XLOCB(19,BOF,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnuctr-", XLOCB(19,BOFM4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnuctr+", XLOCB(19,BOFP,CBSO,528,0), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnuctr+", XLOCB(19,BOFP4,CBSO,528,0), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnuctrl", XLOCB(19,BOF,CBSO,528,1), XLBOCBBB_MASK, PPCCOM, { CR } }, -{ "bnuctrl-",XLOCB(19,BOF,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnuctrl-",XLOCB(19,BOFM4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "bnuctrl+",XLOCB(19,BOFP,CBSO,528,1), XLBOCBBB_MASK, NOPOWER4, { CR } }, -{ "bnuctrl+",XLOCB(19,BOFP4,CBSO,528,1), XLBOCBBB_MASK, POWER4, { CR } }, -{ "btctr", XLO(19,BOT,528,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "btctr-", XLO(19,BOT,528,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btctr-", XLO(19,BOTM4,528,0), XLBOBB_MASK, POWER4, { BI } }, -{ "btctr+", XLO(19,BOTP,528,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btctr+", XLO(19,BOTP4,528,0), XLBOBB_MASK, POWER4, { BI } }, -{ "btctrl", XLO(19,BOT,528,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "btctrl-", XLO(19,BOT,528,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btctrl-", XLO(19,BOTM4,528,1), XLBOBB_MASK, POWER4, { BI } }, -{ "btctrl+", XLO(19,BOTP,528,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "btctrl+", XLO(19,BOTP4,528,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bfctr", XLO(19,BOF,528,0), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bfctr-", XLO(19,BOF,528,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bfctr-", XLO(19,BOFM4,528,0), XLBOBB_MASK, POWER4, { BI } }, -{ "bfctr+", XLO(19,BOFP,528,0), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bfctr+", XLO(19,BOFP4,528,0), XLBOBB_MASK, POWER4, { BI } }, -{ "bfctrl", XLO(19,BOF,528,1), XLBOBB_MASK, PPCCOM, { BI } }, -{ "bfctrl-", XLO(19,BOF,528,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bfctrl-", XLO(19,BOFM4,528,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bfctrl+", XLO(19,BOFP,528,1), XLBOBB_MASK, NOPOWER4, { BI } }, -{ "bfctrl+", XLO(19,BOFP4,528,1), XLBOBB_MASK, POWER4, { BI } }, -{ "bcctr-", XLYLK(19,528,0,0), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bcctr+", XLYLK(19,528,1,0), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bcctrl-", XLYLK(19,528,0,1), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bcctrl+", XLYLK(19,528,1,1), XLYBB_MASK, PPCCOM, { BOE, BI } }, -{ "bcctr", XLLK(19,528,0), XLBH_MASK, PPCCOM, { BO, BI, BH } }, -{ "bcctrl", XLLK(19,528,1), XLBH_MASK, PPCCOM, { BO, BI, BH } }, -{ "bcc", XLLK(19,528,0), XLBB_MASK, PWRCOM, { BO, BI } }, -{ "bccl", XLLK(19,528,1), XLBB_MASK, PWRCOM, { BO, BI } }, -{ "bcctre", XLLK(19,529,0), XLBB_MASK, BOOKE64, { BO, BI } }, -{ "bcctrel", XLLK(19,529,1), XLBB_MASK, BOOKE64, { BO, BI } }, - -{ "rlwimi", M(20,0), M_MASK, PPCCOM, { RA,RS,SH,MBE,ME } }, -{ "rlimi", M(20,0), M_MASK, PWRCOM, { RA,RS,SH,MBE,ME } }, - -{ "rlwimi.", M(20,1), M_MASK, PPCCOM, { RA,RS,SH,MBE,ME } }, -{ "rlimi.", M(20,1), M_MASK, PWRCOM, { RA,RS,SH,MBE,ME } }, - -{ "rotlwi", MME(21,31,0), MMBME_MASK, PPCCOM, { RA, RS, SH } }, -{ "clrlwi", MME(21,31,0), MSHME_MASK, PPCCOM, { RA, RS, MB } }, -{ "rlwinm", M(21,0), M_MASK, PPCCOM, { RA,RS,SH,MBE,ME } }, -{ "rlinm", M(21,0), M_MASK, PWRCOM, { RA,RS,SH,MBE,ME } }, -{ "rotlwi.", MME(21,31,1), MMBME_MASK, PPCCOM, { RA,RS,SH } }, -{ "clrlwi.", MME(21,31,1), MSHME_MASK, PPCCOM, { RA, RS, MB } }, -{ "rlwinm.", M(21,1), M_MASK, PPCCOM, { RA,RS,SH,MBE,ME } }, -{ "rlinm.", M(21,1), M_MASK, PWRCOM, { RA,RS,SH,MBE,ME } }, - -{ "rlmi", M(22,0), M_MASK, M601, { RA,RS,RB,MBE,ME } }, -{ "rlmi.", M(22,1), M_MASK, M601, { RA,RS,RB,MBE,ME } }, - -{ "be", B(22,0,0), B_MASK, BOOKE64, { LI } }, -{ "bel", B(22,0,1), B_MASK, BOOKE64, { LI } }, -{ "bea", B(22,1,0), B_MASK, BOOKE64, { LIA } }, -{ "bela", B(22,1,1), B_MASK, BOOKE64, { LIA } }, - -{ "rotlw", MME(23,31,0), MMBME_MASK, PPCCOM, { RA, RS, RB } }, -{ "rlwnm", M(23,0), M_MASK, PPCCOM, { RA,RS,RB,MBE,ME } }, -{ "rlnm", M(23,0), M_MASK, PWRCOM, { RA,RS,RB,MBE,ME } }, -{ "rotlw.", MME(23,31,1), MMBME_MASK, PPCCOM, { RA, RS, RB } }, -{ "rlwnm.", M(23,1), M_MASK, PPCCOM, { RA,RS,RB,MBE,ME } }, -{ "rlnm.", M(23,1), M_MASK, PWRCOM, { RA,RS,RB,MBE,ME } }, - -{ "nop", OP(24), 0xffffffff, PPCCOM, { 0 } }, -{ "ori", OP(24), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "oril", OP(24), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "oris", OP(25), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "oriu", OP(25), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "xori", OP(26), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "xoril", OP(26), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "xoris", OP(27), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "xoriu", OP(27), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "andi.", OP(28), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "andil.", OP(28), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "andis.", OP(29), OP_MASK, PPCCOM, { RA, RS, UI } }, -{ "andiu.", OP(29), OP_MASK, PWRCOM, { RA, RS, UI } }, - -{ "rotldi", MD(30,0,0), MDMB_MASK, PPC64, { RA, RS, SH6 } }, -{ "clrldi", MD(30,0,0), MDSH_MASK, PPC64, { RA, RS, MB6 } }, -{ "rldicl", MD(30,0,0), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, -{ "rotldi.", MD(30,0,1), MDMB_MASK, PPC64, { RA, RS, SH6 } }, -{ "clrldi.", MD(30,0,1), MDSH_MASK, PPC64, { RA, RS, MB6 } }, -{ "rldicl.", MD(30,0,1), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, - -{ "rldicr", MD(30,1,0), MD_MASK, PPC64, { RA, RS, SH6, ME6 } }, -{ "rldicr.", MD(30,1,1), MD_MASK, PPC64, { RA, RS, SH6, ME6 } }, - -{ "rldic", MD(30,2,0), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, -{ "rldic.", MD(30,2,1), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, - -{ "rldimi", MD(30,3,0), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, -{ "rldimi.", MD(30,3,1), MD_MASK, PPC64, { RA, RS, SH6, MB6 } }, - -{ "rotld", MDS(30,8,0), MDSMB_MASK, PPC64, { RA, RS, RB } }, -{ "rldcl", MDS(30,8,0), MDS_MASK, PPC64, { RA, RS, RB, MB6 } }, -{ "rotld.", MDS(30,8,1), MDSMB_MASK, PPC64, { RA, RS, RB } }, -{ "rldcl.", MDS(30,8,1), MDS_MASK, PPC64, { RA, RS, RB, MB6 } }, - -{ "rldcr", MDS(30,9,0), MDS_MASK, PPC64, { RA, RS, RB, ME6 } }, -{ "rldcr.", MDS(30,9,1), MDS_MASK, PPC64, { RA, RS, RB, ME6 } }, - -{ "cmpw", XOPL(31,0,0), XCMPL_MASK, PPCCOM, { OBF, RA, RB } }, -{ "cmpd", XOPL(31,0,1), XCMPL_MASK, PPC64, { OBF, RA, RB } }, -{ "cmp", X(31,0), XCMP_MASK, PPC, { BF, L, RA, RB } }, -{ "cmp", X(31,0), XCMPL_MASK, PWRCOM, { BF, RA, RB } }, - -{ "twlgt", XTO(31,4,TOLGT), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlgt", XTO(31,4,TOLGT), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twllt", XTO(31,4,TOLLT), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tllt", XTO(31,4,TOLLT), XTO_MASK, PWRCOM, { RA, RB } }, -{ "tweq", XTO(31,4,TOEQ), XTO_MASK, PPCCOM, { RA, RB } }, -{ "teq", XTO(31,4,TOEQ), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twlge", XTO(31,4,TOLGE), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlge", XTO(31,4,TOLGE), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twlnl", XTO(31,4,TOLNL), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlnl", XTO(31,4,TOLNL), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twlle", XTO(31,4,TOLLE), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlle", XTO(31,4,TOLLE), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twlng", XTO(31,4,TOLNG), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlng", XTO(31,4,TOLNG), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twgt", XTO(31,4,TOGT), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tgt", XTO(31,4,TOGT), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twge", XTO(31,4,TOGE), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tge", XTO(31,4,TOGE), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twnl", XTO(31,4,TONL), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tnl", XTO(31,4,TONL), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twlt", XTO(31,4,TOLT), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tlt", XTO(31,4,TOLT), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twle", XTO(31,4,TOLE), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tle", XTO(31,4,TOLE), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twng", XTO(31,4,TONG), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tng", XTO(31,4,TONG), XTO_MASK, PWRCOM, { RA, RB } }, -{ "twne", XTO(31,4,TONE), XTO_MASK, PPCCOM, { RA, RB } }, -{ "tne", XTO(31,4,TONE), XTO_MASK, PWRCOM, { RA, RB } }, -{ "trap", XTO(31,4,TOU), 0xffffffff, PPCCOM, { 0 } }, -{ "tw", X(31,4), X_MASK, PPCCOM, { TO, RA, RB } }, -{ "t", X(31,4), X_MASK, PWRCOM, { TO, RA, RB } }, - -{ "subfc", XO(31,8,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sf", XO(31,8,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subc", XO(31,8,0,0), XO_MASK, PPC, { RT, RB, RA } }, -{ "subfc.", XO(31,8,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sf.", XO(31,8,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subc.", XO(31,8,0,1), XO_MASK, PPCCOM, { RT, RB, RA } }, -{ "subfco", XO(31,8,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfo", XO(31,8,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subco", XO(31,8,1,0), XO_MASK, PPC, { RT, RB, RA } }, -{ "subfco.", XO(31,8,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfo.", XO(31,8,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subco.", XO(31,8,1,1), XO_MASK, PPC, { RT, RB, RA } }, - -{ "mulhdu", XO(31,9,0,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "mulhdu.", XO(31,9,0,1), XO_MASK, PPC64, { RT, RA, RB } }, - -{ "addc", XO(31,10,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "a", XO(31,10,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addc.", XO(31,10,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "a.", XO(31,10,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addco", XO(31,10,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "ao", XO(31,10,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addco.", XO(31,10,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "ao.", XO(31,10,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, - -{ "mulhwu", XO(31,11,0,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "mulhwu.", XO(31,11,0,1), XO_MASK, PPC, { RT, RA, RB } }, - -{ "isellt", X(31,15), X_MASK, PPCISEL, { RT, RA, RB } }, -{ "iselgt", X(31,47), X_MASK, PPCISEL, { RT, RA, RB } }, -{ "iseleq", X(31,79), X_MASK, PPCISEL, { RT, RA, RB } }, -{ "isel", XISEL(31,15), XISEL_MASK, PPCISEL, { RT, RA, RB, CRB } }, - -{ "mfocrf", XFXM(31,19,0,1), XFXFXM_MASK, COM, { RT, FXM } }, -{ "mfcr", X(31,19), XRARB_MASK, NOPOWER4 | COM, { RT } }, -{ "mfcr", X(31,19), XFXFXM_MASK, POWER4, { RT, FXM4 } }, - -{ "lwarx", X(31,20), XEH_MASK, PPC, { RT, RA0, RB, EH } }, - -{ "ldx", X(31,21), X_MASK, PPC64, { RT, RA0, RB } }, - -{ "icbt", X(31,22), X_MASK, BOOKE|PPCE300, { CT, RA, RB } }, -{ "icbt", X(31,262), XRT_MASK, PPC403, { RA, RB } }, - -{ "lwzx", X(31,23), X_MASK, PPCCOM, { RT, RA0, RB } }, -{ "lx", X(31,23), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "slw", XRC(31,24,0), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sl", XRC(31,24,0), X_MASK, PWRCOM, { RA, RS, RB } }, -{ "slw.", XRC(31,24,1), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sl.", XRC(31,24,1), X_MASK, PWRCOM, { RA, RS, RB } }, - -{ "cntlzw", XRC(31,26,0), XRB_MASK, PPCCOM, { RA, RS } }, -{ "cntlz", XRC(31,26,0), XRB_MASK, PWRCOM, { RA, RS } }, -{ "cntlzw.", XRC(31,26,1), XRB_MASK, PPCCOM, { RA, RS } }, -{ "cntlz.", XRC(31,26,1), XRB_MASK, PWRCOM, { RA, RS } }, - -{ "sld", XRC(31,27,0), X_MASK, PPC64, { RA, RS, RB } }, -{ "sld.", XRC(31,27,1), X_MASK, PPC64, { RA, RS, RB } }, - -{ "and", XRC(31,28,0), X_MASK, COM, { RA, RS, RB } }, -{ "and.", XRC(31,28,1), X_MASK, COM, { RA, RS, RB } }, - -{ "maskg", XRC(31,29,0), X_MASK, M601, { RA, RS, RB } }, -{ "maskg.", XRC(31,29,1), X_MASK, M601, { RA, RS, RB } }, - -{ "icbte", X(31,30), X_MASK, BOOKE64, { CT, RA, RB } }, - -{ "lwzxe", X(31,31), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "cmplw", XOPL(31,32,0), XCMPL_MASK, PPCCOM, { OBF, RA, RB } }, -{ "cmpld", XOPL(31,32,1), XCMPL_MASK, PPC64, { OBF, RA, RB } }, -{ "cmpl", X(31,32), XCMP_MASK, PPC, { BF, L, RA, RB } }, -{ "cmpl", X(31,32), XCMPL_MASK, PWRCOM, { BF, RA, RB } }, - -{ "subf", XO(31,40,0,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "sub", XO(31,40,0,0), XO_MASK, PPC, { RT, RB, RA } }, -{ "subf.", XO(31,40,0,1), XO_MASK, PPC, { RT, RA, RB } }, -{ "sub.", XO(31,40,0,1), XO_MASK, PPC, { RT, RB, RA } }, -{ "subfo", XO(31,40,1,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "subo", XO(31,40,1,0), XO_MASK, PPC, { RT, RB, RA } }, -{ "subfo.", XO(31,40,1,1), XO_MASK, PPC, { RT, RA, RB } }, -{ "subo.", XO(31,40,1,1), XO_MASK, PPC, { RT, RB, RA } }, - -{ "ldux", X(31,53), X_MASK, PPC64, { RT, RAL, RB } }, - -{ "dcbst", X(31,54), XRT_MASK, PPC, { RA, RB } }, - -{ "lwzux", X(31,55), X_MASK, PPCCOM, { RT, RAL, RB } }, -{ "lux", X(31,55), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "dcbste", X(31,62), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "lwzuxe", X(31,63), X_MASK, BOOKE64, { RT, RAL, RB } }, - -{ "cntlzd", XRC(31,58,0), XRB_MASK, PPC64, { RA, RS } }, -{ "cntlzd.", XRC(31,58,1), XRB_MASK, PPC64, { RA, RS } }, - -{ "andc", XRC(31,60,0), X_MASK, COM, { RA, RS, RB } }, -{ "andc.", XRC(31,60,1), X_MASK, COM, { RA, RS, RB } }, - -{ "tdlgt", XTO(31,68,TOLGT), XTO_MASK, PPC64, { RA, RB } }, -{ "tdllt", XTO(31,68,TOLLT), XTO_MASK, PPC64, { RA, RB } }, -{ "tdeq", XTO(31,68,TOEQ), XTO_MASK, PPC64, { RA, RB } }, -{ "tdlge", XTO(31,68,TOLGE), XTO_MASK, PPC64, { RA, RB } }, -{ "tdlnl", XTO(31,68,TOLNL), XTO_MASK, PPC64, { RA, RB } }, -{ "tdlle", XTO(31,68,TOLLE), XTO_MASK, PPC64, { RA, RB } }, -{ "tdlng", XTO(31,68,TOLNG), XTO_MASK, PPC64, { RA, RB } }, -{ "tdgt", XTO(31,68,TOGT), XTO_MASK, PPC64, { RA, RB } }, -{ "tdge", XTO(31,68,TOGE), XTO_MASK, PPC64, { RA, RB } }, -{ "tdnl", XTO(31,68,TONL), XTO_MASK, PPC64, { RA, RB } }, -{ "tdlt", XTO(31,68,TOLT), XTO_MASK, PPC64, { RA, RB } }, -{ "tdle", XTO(31,68,TOLE), XTO_MASK, PPC64, { RA, RB } }, -{ "tdng", XTO(31,68,TONG), XTO_MASK, PPC64, { RA, RB } }, -{ "tdne", XTO(31,68,TONE), XTO_MASK, PPC64, { RA, RB } }, -{ "td", X(31,68), X_MASK, PPC64, { TO, RA, RB } }, - -{ "mulhd", XO(31,73,0,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "mulhd.", XO(31,73,0,1), XO_MASK, PPC64, { RT, RA, RB } }, - -{ "mulhw", XO(31,75,0,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "mulhw.", XO(31,75,0,1), XO_MASK, PPC, { RT, RA, RB } }, - -{ "dlmzb", XRC(31,78,0), X_MASK, PPC403|PPC440, { RA, RS, RB } }, -{ "dlmzb.", XRC(31,78,1), X_MASK, PPC403|PPC440, { RA, RS, RB } }, - -{ "mtsrd", X(31,82), XRB_MASK|(1<<20), PPC64, { SR, RS } }, - -{ "mfmsr", X(31,83), XRARB_MASK, COM, { RT } }, - -{ "ldarx", X(31,84), XEH_MASK, PPC64, { RT, RA0, RB, EH } }, - -{ "dcbfl", XOPL(31,86,1), XRT_MASK, POWER5, { RA, RB } }, -{ "dcbf", X(31,86), XLRT_MASK, PPC, { RA, RB, L } }, - -{ "lbzx", X(31,87), X_MASK, COM, { RT, RA0, RB } }, - -{ "dcbfe", X(31,94), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "lbzxe", X(31,95), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "neg", XO(31,104,0,0), XORB_MASK, COM, { RT, RA } }, -{ "neg.", XO(31,104,0,1), XORB_MASK, COM, { RT, RA } }, -{ "nego", XO(31,104,1,0), XORB_MASK, COM, { RT, RA } }, -{ "nego.", XO(31,104,1,1), XORB_MASK, COM, { RT, RA } }, - -{ "mul", XO(31,107,0,0), XO_MASK, M601, { RT, RA, RB } }, -{ "mul.", XO(31,107,0,1), XO_MASK, M601, { RT, RA, RB } }, -{ "mulo", XO(31,107,1,0), XO_MASK, M601, { RT, RA, RB } }, -{ "mulo.", XO(31,107,1,1), XO_MASK, M601, { RT, RA, RB } }, - -{ "mtsrdin", X(31,114), XRA_MASK, PPC64, { RS, RB } }, - -{ "clf", X(31,118), XTO_MASK, POWER, { RA, RB } }, - -{ "lbzux", X(31,119), X_MASK, COM, { RT, RAL, RB } }, - -{ "popcntb", X(31,122), XRB_MASK, POWER5, { RA, RS } }, - -{ "not", XRC(31,124,0), X_MASK, COM, { RA, RS, RBS } }, -{ "nor", XRC(31,124,0), X_MASK, COM, { RA, RS, RB } }, -{ "not.", XRC(31,124,1), X_MASK, COM, { RA, RS, RBS } }, -{ "nor.", XRC(31,124,1), X_MASK, COM, { RA, RS, RB } }, - -{ "lwarxe", X(31,126), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "lbzuxe", X(31,127), X_MASK, BOOKE64, { RT, RAL, RB } }, - -{ "wrtee", X(31,131), XRARB_MASK, PPC403 | BOOKE, { RS } }, - -{ "dcbtstls",X(31,134), X_MASK, PPCCHLK, { CT, RA, RB }}, - -{ "subfe", XO(31,136,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfe", XO(31,136,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subfe.", XO(31,136,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfe.", XO(31,136,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subfeo", XO(31,136,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfeo", XO(31,136,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "subfeo.", XO(31,136,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "sfeo.", XO(31,136,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, - -{ "adde", XO(31,138,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "ae", XO(31,138,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "adde.", XO(31,138,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "ae.", XO(31,138,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addeo", XO(31,138,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "aeo", XO(31,138,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addeo.", XO(31,138,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "aeo.", XO(31,138,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, - -{ "dcbtstlse",X(31,142),X_MASK, PPCCHLK64, { CT, RA, RB }}, - -{ "mtocrf", XFXM(31,144,0,1), XFXFXM_MASK, COM, { FXM, RS } }, -{ "mtcr", XFXM(31,144,0xff,0), XRARB_MASK, COM, { RS }}, -{ "mtcrf", X(31,144), XFXFXM_MASK, COM, { FXM, RS } }, - -{ "mtmsr", X(31,146), XRARB_MASK, COM, { RS } }, - -{ "stdx", X(31,149), X_MASK, PPC64, { RS, RA0, RB } }, - -{ "stwcx.", XRC(31,150,1), X_MASK, PPC, { RS, RA0, RB } }, - -{ "stwx", X(31,151), X_MASK, PPCCOM, { RS, RA0, RB } }, -{ "stx", X(31,151), X_MASK, PWRCOM, { RS, RA, RB } }, - -{ "stwcxe.", XRC(31,158,1), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "stwxe", X(31,159), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "slq", XRC(31,152,0), X_MASK, M601, { RA, RS, RB } }, -{ "slq.", XRC(31,152,1), X_MASK, M601, { RA, RS, RB } }, - -{ "sle", XRC(31,153,0), X_MASK, M601, { RA, RS, RB } }, -{ "sle.", XRC(31,153,1), X_MASK, M601, { RA, RS, RB } }, - -{ "prtyw", X(31,154), XRB_MASK, POWER6, { RA, RS } }, - -{ "wrteei", X(31,163), XE_MASK, PPC403 | BOOKE, { E } }, - -{ "dcbtls", X(31,166), X_MASK, PPCCHLK, { CT, RA, RB }}, -{ "dcbtlse", X(31,174), X_MASK, PPCCHLK64, { CT, RA, RB }}, - -{ "mtmsrd", X(31,178), XRLARB_MASK, PPC64, { RS, A_L } }, - -{ "stdux", X(31,181), X_MASK, PPC64, { RS, RAS, RB } }, - -{ "stwux", X(31,183), X_MASK, PPCCOM, { RS, RAS, RB } }, -{ "stux", X(31,183), X_MASK, PWRCOM, { RS, RA0, RB } }, - -{ "sliq", XRC(31,184,0), X_MASK, M601, { RA, RS, SH } }, -{ "sliq.", XRC(31,184,1), X_MASK, M601, { RA, RS, SH } }, - -{ "prtyd", X(31,186), XRB_MASK, POWER6, { RA, RS } }, - -{ "stwuxe", X(31,191), X_MASK, BOOKE64, { RS, RAS, RB } }, - -{ "subfze", XO(31,200,0,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfze", XO(31,200,0,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfze.", XO(31,200,0,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfze.", XO(31,200,0,1), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfzeo", XO(31,200,1,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfzeo", XO(31,200,1,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfzeo.",XO(31,200,1,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfzeo.", XO(31,200,1,1), XORB_MASK, PWRCOM, { RT, RA } }, - -{ "addze", XO(31,202,0,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "aze", XO(31,202,0,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addze.", XO(31,202,0,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "aze.", XO(31,202,0,1), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addzeo", XO(31,202,1,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "azeo", XO(31,202,1,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addzeo.", XO(31,202,1,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "azeo.", XO(31,202,1,1), XORB_MASK, PWRCOM, { RT, RA } }, - -{ "mtsr", X(31,210), XRB_MASK|(1<<20), COM32, { SR, RS } }, - -{ "stdcx.", XRC(31,214,1), X_MASK, PPC64, { RS, RA0, RB } }, - -{ "stbx", X(31,215), X_MASK, COM, { RS, RA0, RB } }, - -{ "sllq", XRC(31,216,0), X_MASK, M601, { RA, RS, RB } }, -{ "sllq.", XRC(31,216,1), X_MASK, M601, { RA, RS, RB } }, - -{ "sleq", XRC(31,217,0), X_MASK, M601, { RA, RS, RB } }, -{ "sleq.", XRC(31,217,1), X_MASK, M601, { RA, RS, RB } }, - -{ "stbxe", X(31,223), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "icblc", X(31,230), X_MASK, PPCCHLK, { CT, RA, RB }}, - -{ "subfme", XO(31,232,0,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfme", XO(31,232,0,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfme.", XO(31,232,0,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfme.", XO(31,232,0,1), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfmeo", XO(31,232,1,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfmeo", XO(31,232,1,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "subfmeo.",XO(31,232,1,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "sfmeo.", XO(31,232,1,1), XORB_MASK, PWRCOM, { RT, RA } }, - -{ "mulld", XO(31,233,0,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "mulld.", XO(31,233,0,1), XO_MASK, PPC64, { RT, RA, RB } }, -{ "mulldo", XO(31,233,1,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "mulldo.", XO(31,233,1,1), XO_MASK, PPC64, { RT, RA, RB } }, - -{ "addme", XO(31,234,0,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "ame", XO(31,234,0,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addme.", XO(31,234,0,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "ame.", XO(31,234,0,1), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addmeo", XO(31,234,1,0), XORB_MASK, PPCCOM, { RT, RA } }, -{ "ameo", XO(31,234,1,0), XORB_MASK, PWRCOM, { RT, RA } }, -{ "addmeo.", XO(31,234,1,1), XORB_MASK, PPCCOM, { RT, RA } }, -{ "ameo.", XO(31,234,1,1), XORB_MASK, PWRCOM, { RT, RA } }, - -{ "mullw", XO(31,235,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "muls", XO(31,235,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "mullw.", XO(31,235,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "muls.", XO(31,235,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "mullwo", XO(31,235,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "mulso", XO(31,235,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "mullwo.", XO(31,235,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "mulso.", XO(31,235,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, - -{ "icblce", X(31,238), X_MASK, PPCCHLK64, { CT, RA, RB }}, -{ "mtsrin", X(31,242), XRA_MASK, PPC32, { RS, RB } }, -{ "mtsri", X(31,242), XRA_MASK, POWER32, { RS, RB } }, - -{ "dcbtst", X(31,246), X_MASK, PPC, { CT, RA, RB } }, - -{ "stbux", X(31,247), X_MASK, COM, { RS, RAS, RB } }, - -{ "slliq", XRC(31,248,0), X_MASK, M601, { RA, RS, SH } }, -{ "slliq.", XRC(31,248,1), X_MASK, M601, { RA, RS, SH } }, - -{ "dcbtste", X(31,253), X_MASK, BOOKE64, { CT, RA, RB } }, - -{ "stbuxe", X(31,255), X_MASK, BOOKE64, { RS, RAS, RB } }, - -{ "mfdcrx", X(31,259), X_MASK, BOOKE, { RS, RA } }, - -{ "doz", XO(31,264,0,0), XO_MASK, M601, { RT, RA, RB } }, -{ "doz.", XO(31,264,0,1), XO_MASK, M601, { RT, RA, RB } }, -{ "dozo", XO(31,264,1,0), XO_MASK, M601, { RT, RA, RB } }, -{ "dozo.", XO(31,264,1,1), XO_MASK, M601, { RT, RA, RB } }, - -{ "add", XO(31,266,0,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "cax", XO(31,266,0,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "add.", XO(31,266,0,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "cax.", XO(31,266,0,1), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addo", XO(31,266,1,0), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "caxo", XO(31,266,1,0), XO_MASK, PWRCOM, { RT, RA, RB } }, -{ "addo.", XO(31,266,1,1), XO_MASK, PPCCOM, { RT, RA, RB } }, -{ "caxo.", XO(31,266,1,1), XO_MASK, PWRCOM, { RT, RA, RB } }, - -{ "tlbiel", X(31,274), XRTLRA_MASK, POWER4, { RB, L } }, - -{ "mfapidi", X(31,275), X_MASK, BOOKE, { RT, RA } }, - -{ "lscbx", XRC(31,277,0), X_MASK, M601, { RT, RA, RB } }, -{ "lscbx.", XRC(31,277,1), X_MASK, M601, { RT, RA, RB } }, - -{ "dcbt", X(31,278), X_MASK, PPC, { CT, RA, RB } }, - -{ "lhzx", X(31,279), X_MASK, COM, { RT, RA0, RB } }, - -{ "eqv", XRC(31,284,0), X_MASK, COM, { RA, RS, RB } }, -{ "eqv.", XRC(31,284,1), X_MASK, COM, { RA, RS, RB } }, - -{ "dcbte", X(31,286), X_MASK, BOOKE64, { CT, RA, RB } }, - -{ "lhzxe", X(31,287), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "tlbie", X(31,306), XRTLRA_MASK, PPC, { RB, L } }, -{ "tlbi", X(31,306), XRT_MASK, POWER, { RA0, RB } }, - -{ "eciwx", X(31,310), X_MASK, PPC, { RT, RA, RB } }, - -{ "lhzux", X(31,311), X_MASK, COM, { RT, RAL, RB } }, - -{ "xor", XRC(31,316,0), X_MASK, COM, { RA, RS, RB } }, -{ "xor.", XRC(31,316,1), X_MASK, COM, { RA, RS, RB } }, - -{ "lhzuxe", X(31,319), X_MASK, BOOKE64, { RT, RAL, RB } }, - -{ "mfexisr", XSPR(31,323,64), XSPR_MASK, PPC403, { RT } }, -{ "mfexier", XSPR(31,323,66), XSPR_MASK, PPC403, { RT } }, -{ "mfbr0", XSPR(31,323,128), XSPR_MASK, PPC403, { RT } }, -{ "mfbr1", XSPR(31,323,129), XSPR_MASK, PPC403, { RT } }, -{ "mfbr2", XSPR(31,323,130), XSPR_MASK, PPC403, { RT } }, -{ "mfbr3", XSPR(31,323,131), XSPR_MASK, PPC403, { RT } }, -{ "mfbr4", XSPR(31,323,132), XSPR_MASK, PPC403, { RT } }, -{ "mfbr5", XSPR(31,323,133), XSPR_MASK, PPC403, { RT } }, -{ "mfbr6", XSPR(31,323,134), XSPR_MASK, PPC403, { RT } }, -{ "mfbr7", XSPR(31,323,135), XSPR_MASK, PPC403, { RT } }, -{ "mfbear", XSPR(31,323,144), XSPR_MASK, PPC403, { RT } }, -{ "mfbesr", XSPR(31,323,145), XSPR_MASK, PPC403, { RT } }, -{ "mfiocr", XSPR(31,323,160), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacr0", XSPR(31,323,192), XSPR_MASK, PPC403, { RT } }, -{ "mfdmact0", XSPR(31,323,193), XSPR_MASK, PPC403, { RT } }, -{ "mfdmada0", XSPR(31,323,194), XSPR_MASK, PPC403, { RT } }, -{ "mfdmasa0", XSPR(31,323,195), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacc0", XSPR(31,323,196), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacr1", XSPR(31,323,200), XSPR_MASK, PPC403, { RT } }, -{ "mfdmact1", XSPR(31,323,201), XSPR_MASK, PPC403, { RT } }, -{ "mfdmada1", XSPR(31,323,202), XSPR_MASK, PPC403, { RT } }, -{ "mfdmasa1", XSPR(31,323,203), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacc1", XSPR(31,323,204), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacr2", XSPR(31,323,208), XSPR_MASK, PPC403, { RT } }, -{ "mfdmact2", XSPR(31,323,209), XSPR_MASK, PPC403, { RT } }, -{ "mfdmada2", XSPR(31,323,210), XSPR_MASK, PPC403, { RT } }, -{ "mfdmasa2", XSPR(31,323,211), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacc2", XSPR(31,323,212), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacr3", XSPR(31,323,216), XSPR_MASK, PPC403, { RT } }, -{ "mfdmact3", XSPR(31,323,217), XSPR_MASK, PPC403, { RT } }, -{ "mfdmada3", XSPR(31,323,218), XSPR_MASK, PPC403, { RT } }, -{ "mfdmasa3", XSPR(31,323,219), XSPR_MASK, PPC403, { RT } }, -{ "mfdmacc3", XSPR(31,323,220), XSPR_MASK, PPC403, { RT } }, -{ "mfdmasr", XSPR(31,323,224), XSPR_MASK, PPC403, { RT } }, -{ "mfdcr", X(31,323), X_MASK, PPC403 | BOOKE, { RT, SPR } }, - -{ "div", XO(31,331,0,0), XO_MASK, M601, { RT, RA, RB } }, -{ "div.", XO(31,331,0,1), XO_MASK, M601, { RT, RA, RB } }, -{ "divo", XO(31,331,1,0), XO_MASK, M601, { RT, RA, RB } }, -{ "divo.", XO(31,331,1,1), XO_MASK, M601, { RT, RA, RB } }, - -{ "mfpmr", X(31,334), X_MASK, PPCPMR, { RT, PMR }}, - -{ "mfmq", XSPR(31,339,0), XSPR_MASK, M601, { RT } }, -{ "mfxer", XSPR(31,339,1), XSPR_MASK, COM, { RT } }, -{ "mfrtcu", XSPR(31,339,4), XSPR_MASK, COM, { RT } }, -{ "mfrtcl", XSPR(31,339,5), XSPR_MASK, COM, { RT } }, -{ "mfdec", XSPR(31,339,6), XSPR_MASK, MFDEC1, { RT } }, -{ "mfdec", XSPR(31,339,22), XSPR_MASK, MFDEC2, { RT } }, -{ "mflr", XSPR(31,339,8), XSPR_MASK, COM, { RT } }, -{ "mfctr", XSPR(31,339,9), XSPR_MASK, COM, { RT } }, -{ "mftid", XSPR(31,339,17), XSPR_MASK, POWER, { RT } }, -{ "mfdsisr", XSPR(31,339,18), XSPR_MASK, COM, { RT } }, -{ "mfdar", XSPR(31,339,19), XSPR_MASK, COM, { RT } }, -{ "mfsdr0", XSPR(31,339,24), XSPR_MASK, POWER, { RT } }, -{ "mfsdr1", XSPR(31,339,25), XSPR_MASK, COM, { RT } }, -{ "mfsrr0", XSPR(31,339,26), XSPR_MASK, COM, { RT } }, -{ "mfsrr1", XSPR(31,339,27), XSPR_MASK, COM, { RT } }, -{ "mfcfar", XSPR(31,339,28), XSPR_MASK, POWER6, { RT } }, -{ "mfpid", XSPR(31,339,48), XSPR_MASK, BOOKE, { RT } }, -{ "mfpid", XSPR(31,339,945), XSPR_MASK, PPC403, { RT } }, -{ "mfcsrr0", XSPR(31,339,58), XSPR_MASK, BOOKE, { RT } }, -{ "mfcsrr1", XSPR(31,339,59), XSPR_MASK, BOOKE, { RT } }, -{ "mfdear", XSPR(31,339,61), XSPR_MASK, BOOKE, { RT } }, -{ "mfdear", XSPR(31,339,981), XSPR_MASK, PPC403, { RT } }, -{ "mfesr", XSPR(31,339,62), XSPR_MASK, BOOKE, { RT } }, -{ "mfesr", XSPR(31,339,980), XSPR_MASK, PPC403, { RT } }, -{ "mfivpr", XSPR(31,339,63), XSPR_MASK, BOOKE, { RT } }, -{ "mfcmpa", XSPR(31,339,144), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpb", XSPR(31,339,145), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpc", XSPR(31,339,146), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpd", XSPR(31,339,147), XSPR_MASK, PPC860, { RT } }, -{ "mficr", XSPR(31,339,148), XSPR_MASK, PPC860, { RT } }, -{ "mfder", XSPR(31,339,149), XSPR_MASK, PPC860, { RT } }, -{ "mfcounta", XSPR(31,339,150), XSPR_MASK, PPC860, { RT } }, -{ "mfcountb", XSPR(31,339,151), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpe", XSPR(31,339,152), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpf", XSPR(31,339,153), XSPR_MASK, PPC860, { RT } }, -{ "mfcmpg", XSPR(31,339,154), XSPR_MASK, PPC860, { RT } }, -{ "mfcmph", XSPR(31,339,155), XSPR_MASK, PPC860, { RT } }, -{ "mflctrl1", XSPR(31,339,156), XSPR_MASK, PPC860, { RT } }, -{ "mflctrl2", XSPR(31,339,157), XSPR_MASK, PPC860, { RT } }, -{ "mfictrl", XSPR(31,339,158), XSPR_MASK, PPC860, { RT } }, -{ "mfbar", XSPR(31,339,159), XSPR_MASK, PPC860, { RT } }, -{ "mfvrsave", XSPR(31,339,256), XSPR_MASK, PPCVEC, { RT } }, -{ "mfusprg0", XSPR(31,339,256), XSPR_MASK, BOOKE, { RT } }, -{ "mftb", X(31,371), X_MASK, CLASSIC, { RT, TBR } }, -{ "mftb", XSPR(31,339,268), XSPR_MASK, BOOKE, { RT } }, -{ "mftbl", XSPR(31,371,268), XSPR_MASK, CLASSIC, { RT } }, -{ "mftbl", XSPR(31,339,268), XSPR_MASK, BOOKE, { RT } }, -{ "mftbu", XSPR(31,371,269), XSPR_MASK, CLASSIC, { RT } }, -{ "mftbu", XSPR(31,339,269), XSPR_MASK, BOOKE, { RT } }, -{ "mfsprg", XSPR(31,339,256), XSPRG_MASK, PPC, { RT, SPRG } }, -{ "mfsprg0", XSPR(31,339,272), XSPR_MASK, PPC, { RT } }, -{ "mfsprg1", XSPR(31,339,273), XSPR_MASK, PPC, { RT } }, -{ "mfsprg2", XSPR(31,339,274), XSPR_MASK, PPC, { RT } }, -{ "mfsprg3", XSPR(31,339,275), XSPR_MASK, PPC, { RT } }, -{ "mfsprg4", XSPR(31,339,260), XSPR_MASK, PPC405 | BOOKE, { RT } }, -{ "mfsprg5", XSPR(31,339,261), XSPR_MASK, PPC405 | BOOKE, { RT } }, -{ "mfsprg6", XSPR(31,339,262), XSPR_MASK, PPC405 | BOOKE, { RT } }, -{ "mfsprg7", XSPR(31,339,263), XSPR_MASK, PPC405 | BOOKE, { RT } }, -{ "mfasr", XSPR(31,339,280), XSPR_MASK, PPC64, { RT } }, -{ "mfear", XSPR(31,339,282), XSPR_MASK, PPC, { RT } }, -{ "mfpir", XSPR(31,339,286), XSPR_MASK, BOOKE, { RT } }, -{ "mfpvr", XSPR(31,339,287), XSPR_MASK, PPC, { RT } }, -{ "mfdbsr", XSPR(31,339,304), XSPR_MASK, BOOKE, { RT } }, -{ "mfdbsr", XSPR(31,339,1008), XSPR_MASK, PPC403, { RT } }, -{ "mfdbcr0", XSPR(31,339,308), XSPR_MASK, BOOKE, { RT } }, -{ "mfdbcr0", XSPR(31,339,1010), XSPR_MASK, PPC405, { RT } }, -{ "mfdbcr1", XSPR(31,339,309), XSPR_MASK, BOOKE, { RT } }, -{ "mfdbcr1", XSPR(31,339,957), XSPR_MASK, PPC405, { RT } }, -{ "mfdbcr2", XSPR(31,339,310), XSPR_MASK, BOOKE, { RT } }, -{ "mfiac1", XSPR(31,339,312), XSPR_MASK, BOOKE, { RT } }, -{ "mfiac1", XSPR(31,339,1012), XSPR_MASK, PPC403, { RT } }, -{ "mfiac2", XSPR(31,339,313), XSPR_MASK, BOOKE, { RT } }, -{ "mfiac2", XSPR(31,339,1013), XSPR_MASK, PPC403, { RT } }, -{ "mfiac3", XSPR(31,339,314), XSPR_MASK, BOOKE, { RT } }, -{ "mfiac3", XSPR(31,339,948), XSPR_MASK, PPC405, { RT } }, -{ "mfiac4", XSPR(31,339,315), XSPR_MASK, BOOKE, { RT } }, -{ "mfiac4", XSPR(31,339,949), XSPR_MASK, PPC405, { RT } }, -{ "mfdac1", XSPR(31,339,316), XSPR_MASK, BOOKE, { RT } }, -{ "mfdac1", XSPR(31,339,1014), XSPR_MASK, PPC403, { RT } }, -{ "mfdac2", XSPR(31,339,317), XSPR_MASK, BOOKE, { RT } }, -{ "mfdac2", XSPR(31,339,1015), XSPR_MASK, PPC403, { RT } }, -{ "mfdvc1", XSPR(31,339,318), XSPR_MASK, BOOKE, { RT } }, -{ "mfdvc1", XSPR(31,339,950), XSPR_MASK, PPC405, { RT } }, -{ "mfdvc2", XSPR(31,339,319), XSPR_MASK, BOOKE, { RT } }, -{ "mfdvc2", XSPR(31,339,951), XSPR_MASK, PPC405, { RT } }, -{ "mftsr", XSPR(31,339,336), XSPR_MASK, BOOKE, { RT } }, -{ "mftsr", XSPR(31,339,984), XSPR_MASK, PPC403, { RT } }, -{ "mftcr", XSPR(31,339,340), XSPR_MASK, BOOKE, { RT } }, -{ "mftcr", XSPR(31,339,986), XSPR_MASK, PPC403, { RT } }, -{ "mfivor0", XSPR(31,339,400), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor1", XSPR(31,339,401), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor2", XSPR(31,339,402), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor3", XSPR(31,339,403), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor4", XSPR(31,339,404), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor5", XSPR(31,339,405), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor6", XSPR(31,339,406), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor7", XSPR(31,339,407), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor8", XSPR(31,339,408), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor9", XSPR(31,339,409), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor10", XSPR(31,339,410), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor11", XSPR(31,339,411), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor12", XSPR(31,339,412), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor13", XSPR(31,339,413), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor14", XSPR(31,339,414), XSPR_MASK, BOOKE, { RT } }, -{ "mfivor15", XSPR(31,339,415), XSPR_MASK, BOOKE, { RT } }, -{ "mfspefscr", XSPR(31,339,512), XSPR_MASK, PPCSPE, { RT } }, -{ "mfbbear", XSPR(31,339,513), XSPR_MASK, PPCBRLK, { RT } }, -{ "mfbbtar", XSPR(31,339,514), XSPR_MASK, PPCBRLK, { RT } }, -{ "mfivor32", XSPR(31,339,528), XSPR_MASK, PPCSPE, { RT } }, -{ "mfivor33", XSPR(31,339,529), XSPR_MASK, PPCSPE, { RT } }, -{ "mfivor34", XSPR(31,339,530), XSPR_MASK, PPCSPE, { RT } }, -{ "mfivor35", XSPR(31,339,531), XSPR_MASK, PPCPMR, { RT } }, -{ "mfibatu", XSPR(31,339,528), XSPRBAT_MASK, PPC, { RT, SPRBAT } }, -{ "mfibatl", XSPR(31,339,529), XSPRBAT_MASK, PPC, { RT, SPRBAT } }, -{ "mfdbatu", XSPR(31,339,536), XSPRBAT_MASK, PPC, { RT, SPRBAT } }, -{ "mfdbatl", XSPR(31,339,537), XSPRBAT_MASK, PPC, { RT, SPRBAT } }, -{ "mfic_cst", XSPR(31,339,560), XSPR_MASK, PPC860, { RT } }, -{ "mfic_adr", XSPR(31,339,561), XSPR_MASK, PPC860, { RT } }, -{ "mfic_dat", XSPR(31,339,562), XSPR_MASK, PPC860, { RT } }, -{ "mfdc_cst", XSPR(31,339,568), XSPR_MASK, PPC860, { RT } }, -{ "mfdc_adr", XSPR(31,339,569), XSPR_MASK, PPC860, { RT } }, -{ "mfmcsrr0", XSPR(31,339,570), XSPR_MASK, PPCRFMCI, { RT } }, -{ "mfdc_dat", XSPR(31,339,570), XSPR_MASK, PPC860, { RT } }, -{ "mfmcsrr1", XSPR(31,339,571), XSPR_MASK, PPCRFMCI, { RT } }, -{ "mfmcsr", XSPR(31,339,572), XSPR_MASK, PPCRFMCI, { RT } }, -{ "mfmcar", XSPR(31,339,573), XSPR_MASK, PPCRFMCI, { RT } }, -{ "mfdpdr", XSPR(31,339,630), XSPR_MASK, PPC860, { RT } }, -{ "mfdpir", XSPR(31,339,631), XSPR_MASK, PPC860, { RT } }, -{ "mfimmr", XSPR(31,339,638), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_ctr", XSPR(31,339,784), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_ap", XSPR(31,339,786), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_epn", XSPR(31,339,787), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_twc", XSPR(31,339,789), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_rpn", XSPR(31,339,790), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_ctr", XSPR(31,339,792), XSPR_MASK, PPC860, { RT } }, -{ "mfm_casid", XSPR(31,339,793), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_ap", XSPR(31,339,794), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_epn", XSPR(31,339,795), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_twb", XSPR(31,339,796), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_twc", XSPR(31,339,797), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_rpn", XSPR(31,339,798), XSPR_MASK, PPC860, { RT } }, -{ "mfm_tw", XSPR(31,339,799), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_dbcam", XSPR(31,339,816), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_dbram0",XSPR(31,339,817), XSPR_MASK, PPC860, { RT } }, -{ "mfmi_dbram1",XSPR(31,339,818), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_dbcam", XSPR(31,339,824), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_dbram0",XSPR(31,339,825), XSPR_MASK, PPC860, { RT } }, -{ "mfmd_dbram1",XSPR(31,339,826), XSPR_MASK, PPC860, { RT } }, -{ "mfummcr0", XSPR(31,339,936), XSPR_MASK, PPC750, { RT } }, -{ "mfupmc1", XSPR(31,339,937), XSPR_MASK, PPC750, { RT } }, -{ "mfupmc2", XSPR(31,339,938), XSPR_MASK, PPC750, { RT } }, -{ "mfusia", XSPR(31,339,939), XSPR_MASK, PPC750, { RT } }, -{ "mfummcr1", XSPR(31,339,940), XSPR_MASK, PPC750, { RT } }, -{ "mfupmc3", XSPR(31,339,941), XSPR_MASK, PPC750, { RT } }, -{ "mfupmc4", XSPR(31,339,942), XSPR_MASK, PPC750, { RT } }, -{ "mfzpr", XSPR(31,339,944), XSPR_MASK, PPC403, { RT } }, -{ "mfccr0", XSPR(31,339,947), XSPR_MASK, PPC405, { RT } }, -{ "mfmmcr0", XSPR(31,339,952), XSPR_MASK, PPC750, { RT } }, -{ "mfpmc1", XSPR(31,339,953), XSPR_MASK, PPC750, { RT } }, -{ "mfsgr", XSPR(31,339,953), XSPR_MASK, PPC403, { RT } }, -{ "mfpmc2", XSPR(31,339,954), XSPR_MASK, PPC750, { RT } }, -{ "mfdcwr", XSPR(31,339,954), XSPR_MASK, PPC403, { RT } }, -{ "mfsia", XSPR(31,339,955), XSPR_MASK, PPC750, { RT } }, -{ "mfsler", XSPR(31,339,955), XSPR_MASK, PPC405, { RT } }, -{ "mfmmcr1", XSPR(31,339,956), XSPR_MASK, PPC750, { RT } }, -{ "mfsu0r", XSPR(31,339,956), XSPR_MASK, PPC405, { RT } }, -{ "mfpmc3", XSPR(31,339,957), XSPR_MASK, PPC750, { RT } }, -{ "mfpmc4", XSPR(31,339,958), XSPR_MASK, PPC750, { RT } }, -{ "mficdbdr", XSPR(31,339,979), XSPR_MASK, PPC403, { RT } }, -{ "mfevpr", XSPR(31,339,982), XSPR_MASK, PPC403, { RT } }, -{ "mfcdbcr", XSPR(31,339,983), XSPR_MASK, PPC403, { RT } }, -{ "mfpit", XSPR(31,339,987), XSPR_MASK, PPC403, { RT } }, -{ "mftbhi", XSPR(31,339,988), XSPR_MASK, PPC403, { RT } }, -{ "mftblo", XSPR(31,339,989), XSPR_MASK, PPC403, { RT } }, -{ "mfsrr2", XSPR(31,339,990), XSPR_MASK, PPC403, { RT } }, -{ "mfsrr3", XSPR(31,339,991), XSPR_MASK, PPC403, { RT } }, -{ "mfl2cr", XSPR(31,339,1017), XSPR_MASK, PPC750, { RT } }, -{ "mfdccr", XSPR(31,339,1018), XSPR_MASK, PPC403, { RT } }, -{ "mficcr", XSPR(31,339,1019), XSPR_MASK, PPC403, { RT } }, -{ "mfictc", XSPR(31,339,1019), XSPR_MASK, PPC750, { RT } }, -{ "mfpbl1", XSPR(31,339,1020), XSPR_MASK, PPC403, { RT } }, -{ "mfthrm1", XSPR(31,339,1020), XSPR_MASK, PPC750, { RT } }, -{ "mfpbu1", XSPR(31,339,1021), XSPR_MASK, PPC403, { RT } }, -{ "mfthrm2", XSPR(31,339,1021), XSPR_MASK, PPC750, { RT } }, -{ "mfpbl2", XSPR(31,339,1022), XSPR_MASK, PPC403, { RT } }, -{ "mfthrm3", XSPR(31,339,1022), XSPR_MASK, PPC750, { RT } }, -{ "mfpbu2", XSPR(31,339,1023), XSPR_MASK, PPC403, { RT } }, -{ "mfspr", X(31,339), X_MASK, COM, { RT, SPR } }, - -{ "lwax", X(31,341), X_MASK, PPC64, { RT, RA0, RB } }, - -{ "dst", XDSS(31,342,0), XDSS_MASK, PPCVEC, { RA, RB, STRM } }, -{ "dstt", XDSS(31,342,1), XDSS_MASK, PPCVEC, { RA, RB, STRM } }, - -{ "lhax", X(31,343), X_MASK, COM, { RT, RA0, RB } }, - -{ "lhaxe", X(31,351), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "dstst", XDSS(31,374,0), XDSS_MASK, PPCVEC, { RA, RB, STRM } }, -{ "dststt", XDSS(31,374,1), XDSS_MASK, PPCVEC, { RA, RB, STRM } }, - -{ "dccci", X(31,454), XRT_MASK, PPC403|PPC440, { RA, RB } }, - -{ "abs", XO(31,360,0,0), XORB_MASK, M601, { RT, RA } }, -{ "abs.", XO(31,360,0,1), XORB_MASK, M601, { RT, RA } }, -{ "abso", XO(31,360,1,0), XORB_MASK, M601, { RT, RA } }, -{ "abso.", XO(31,360,1,1), XORB_MASK, M601, { RT, RA } }, - -{ "divs", XO(31,363,0,0), XO_MASK, M601, { RT, RA, RB } }, -{ "divs.", XO(31,363,0,1), XO_MASK, M601, { RT, RA, RB } }, -{ "divso", XO(31,363,1,0), XO_MASK, M601, { RT, RA, RB } }, -{ "divso.", XO(31,363,1,1), XO_MASK, M601, { RT, RA, RB } }, - -{ "tlbia", X(31,370), 0xffffffff, PPC, { 0 } }, - -{ "lwaux", X(31,373), X_MASK, PPC64, { RT, RAL, RB } }, - -{ "lhaux", X(31,375), X_MASK, COM, { RT, RAL, RB } }, - -{ "lhauxe", X(31,383), X_MASK, BOOKE64, { RT, RAL, RB } }, - -{ "mtdcrx", X(31,387), X_MASK, BOOKE, { RA, RS } }, - -{ "dcblc", X(31,390), X_MASK, PPCCHLK, { CT, RA, RB }}, - -{ "subfe64", XO(31,392,0,0), XO_MASK, BOOKE64, { RT, RA, RB } }, -{ "subfe64o",XO(31,392,1,0), XO_MASK, BOOKE64, { RT, RA, RB } }, - -{ "adde64", XO(31,394,0,0), XO_MASK, BOOKE64, { RT, RA, RB } }, -{ "adde64o", XO(31,394,1,0), XO_MASK, BOOKE64, { RT, RA, RB } }, - -{ "dcblce", X(31,398), X_MASK, PPCCHLK64, { CT, RA, RB }}, - -{ "slbmte", X(31,402), XRA_MASK, PPC64, { RS, RB } }, - -{ "sthx", X(31,407), X_MASK, COM, { RS, RA0, RB } }, - -{ "cmpb", X(31,508), X_MASK, POWER6, { RA, RS, RB } }, - -{ "lfqx", X(31,791), X_MASK, POWER2, { FRT, RA, RB } }, - -{ "lfdpx", X(31,791), X_MASK, POWER6, { FRT, RA, RB } }, - -{ "lfqux", X(31,823), X_MASK, POWER2, { FRT, RA, RB } }, - -{ "stfqx", X(31,919), X_MASK, POWER2, { FRS, RA, RB } }, - -{ "stfdpx", X(31,919), X_MASK, POWER6, { FRS, RA, RB } }, - -{ "stfqux", X(31,951), X_MASK, POWER2, { FRS, RA, RB } }, - -{ "orc", XRC(31,412,0), X_MASK, COM, { RA, RS, RB } }, -{ "orc.", XRC(31,412,1), X_MASK, COM, { RA, RS, RB } }, - -{ "sradi", XS(31,413,0), XS_MASK, PPC64, { RA, RS, SH6 } }, -{ "sradi.", XS(31,413,1), XS_MASK, PPC64, { RA, RS, SH6 } }, - -{ "sthxe", X(31,415), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "slbie", X(31,434), XRTRA_MASK, PPC64, { RB } }, - -{ "ecowx", X(31,438), X_MASK, PPC, { RT, RA, RB } }, - -{ "sthux", X(31,439), X_MASK, COM, { RS, RAS, RB } }, - -{ "sthuxe", X(31,447), X_MASK, BOOKE64, { RS, RAS, RB } }, - -{ "cctpl", 0x7c210b78, 0xffffffff, CELL, { 0 }}, -{ "cctpm", 0x7c421378, 0xffffffff, CELL, { 0 }}, -{ "cctph", 0x7c631b78, 0xffffffff, CELL, { 0 }}, -{ "db8cyc", 0x7f9ce378, 0xffffffff, CELL, { 0 }}, -{ "db10cyc", 0x7fbdeb78, 0xffffffff, CELL, { 0 }}, -{ "db12cyc", 0x7fdef378, 0xffffffff, CELL, { 0 }}, -{ "db16cyc", 0x7ffffb78, 0xffffffff, CELL, { 0 }}, -{ "mr", XRC(31,444,0), X_MASK, COM, { RA, RS, RBS } }, -{ "or", XRC(31,444,0), X_MASK, COM, { RA, RS, RB } }, -{ "mr.", XRC(31,444,1), X_MASK, COM, { RA, RS, RBS } }, -{ "or.", XRC(31,444,1), X_MASK, COM, { RA, RS, RB } }, - -{ "mtexisr", XSPR(31,451,64), XSPR_MASK, PPC403, { RS } }, -{ "mtexier", XSPR(31,451,66), XSPR_MASK, PPC403, { RS } }, -{ "mtbr0", XSPR(31,451,128), XSPR_MASK, PPC403, { RS } }, -{ "mtbr1", XSPR(31,451,129), XSPR_MASK, PPC403, { RS } }, -{ "mtbr2", XSPR(31,451,130), XSPR_MASK, PPC403, { RS } }, -{ "mtbr3", XSPR(31,451,131), XSPR_MASK, PPC403, { RS } }, -{ "mtbr4", XSPR(31,451,132), XSPR_MASK, PPC403, { RS } }, -{ "mtbr5", XSPR(31,451,133), XSPR_MASK, PPC403, { RS } }, -{ "mtbr6", XSPR(31,451,134), XSPR_MASK, PPC403, { RS } }, -{ "mtbr7", XSPR(31,451,135), XSPR_MASK, PPC403, { RS } }, -{ "mtbear", XSPR(31,451,144), XSPR_MASK, PPC403, { RS } }, -{ "mtbesr", XSPR(31,451,145), XSPR_MASK, PPC403, { RS } }, -{ "mtiocr", XSPR(31,451,160), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacr0", XSPR(31,451,192), XSPR_MASK, PPC403, { RS } }, -{ "mtdmact0", XSPR(31,451,193), XSPR_MASK, PPC403, { RS } }, -{ "mtdmada0", XSPR(31,451,194), XSPR_MASK, PPC403, { RS } }, -{ "mtdmasa0", XSPR(31,451,195), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacc0", XSPR(31,451,196), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacr1", XSPR(31,451,200), XSPR_MASK, PPC403, { RS } }, -{ "mtdmact1", XSPR(31,451,201), XSPR_MASK, PPC403, { RS } }, -{ "mtdmada1", XSPR(31,451,202), XSPR_MASK, PPC403, { RS } }, -{ "mtdmasa1", XSPR(31,451,203), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacc1", XSPR(31,451,204), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacr2", XSPR(31,451,208), XSPR_MASK, PPC403, { RS } }, -{ "mtdmact2", XSPR(31,451,209), XSPR_MASK, PPC403, { RS } }, -{ "mtdmada2", XSPR(31,451,210), XSPR_MASK, PPC403, { RS } }, -{ "mtdmasa2", XSPR(31,451,211), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacc2", XSPR(31,451,212), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacr3", XSPR(31,451,216), XSPR_MASK, PPC403, { RS } }, -{ "mtdmact3", XSPR(31,451,217), XSPR_MASK, PPC403, { RS } }, -{ "mtdmada3", XSPR(31,451,218), XSPR_MASK, PPC403, { RS } }, -{ "mtdmasa3", XSPR(31,451,219), XSPR_MASK, PPC403, { RS } }, -{ "mtdmacc3", XSPR(31,451,220), XSPR_MASK, PPC403, { RS } }, -{ "mtdmasr", XSPR(31,451,224), XSPR_MASK, PPC403, { RS } }, -{ "mtdcr", X(31,451), X_MASK, PPC403 | BOOKE, { SPR, RS } }, - -{ "subfze64",XO(31,456,0,0), XORB_MASK, BOOKE64, { RT, RA } }, -{ "subfze64o",XO(31,456,1,0), XORB_MASK, BOOKE64, { RT, RA } }, - -{ "divdu", XO(31,457,0,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divdu.", XO(31,457,0,1), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divduo", XO(31,457,1,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divduo.", XO(31,457,1,1), XO_MASK, PPC64, { RT, RA, RB } }, - -{ "addze64", XO(31,458,0,0), XORB_MASK, BOOKE64, { RT, RA } }, -{ "addze64o",XO(31,458,1,0), XORB_MASK, BOOKE64, { RT, RA } }, - -{ "divwu", XO(31,459,0,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "divwu.", XO(31,459,0,1), XO_MASK, PPC, { RT, RA, RB } }, -{ "divwuo", XO(31,459,1,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "divwuo.", XO(31,459,1,1), XO_MASK, PPC, { RT, RA, RB } }, - -{ "mtmq", XSPR(31,467,0), XSPR_MASK, M601, { RS } }, -{ "mtxer", XSPR(31,467,1), XSPR_MASK, COM, { RS } }, -{ "mtlr", XSPR(31,467,8), XSPR_MASK, COM, { RS } }, -{ "mtctr", XSPR(31,467,9), XSPR_MASK, COM, { RS } }, -{ "mttid", XSPR(31,467,17), XSPR_MASK, POWER, { RS } }, -{ "mtdsisr", XSPR(31,467,18), XSPR_MASK, COM, { RS } }, -{ "mtdar", XSPR(31,467,19), XSPR_MASK, COM, { RS } }, -{ "mtrtcu", XSPR(31,467,20), XSPR_MASK, COM, { RS } }, -{ "mtrtcl", XSPR(31,467,21), XSPR_MASK, COM, { RS } }, -{ "mtdec", XSPR(31,467,22), XSPR_MASK, COM, { RS } }, -{ "mtsdr0", XSPR(31,467,24), XSPR_MASK, POWER, { RS } }, -{ "mtsdr1", XSPR(31,467,25), XSPR_MASK, COM, { RS } }, -{ "mtsrr0", XSPR(31,467,26), XSPR_MASK, COM, { RS } }, -{ "mtsrr1", XSPR(31,467,27), XSPR_MASK, COM, { RS } }, -{ "mtcfar", XSPR(31,467,28), XSPR_MASK, POWER6, { RS } }, -{ "mtpid", XSPR(31,467,48), XSPR_MASK, BOOKE, { RS } }, -{ "mtpid", XSPR(31,467,945), XSPR_MASK, PPC403, { RS } }, -{ "mtdecar", XSPR(31,467,54), XSPR_MASK, BOOKE, { RS } }, -{ "mtcsrr0", XSPR(31,467,58), XSPR_MASK, BOOKE, { RS } }, -{ "mtcsrr1", XSPR(31,467,59), XSPR_MASK, BOOKE, { RS } }, -{ "mtdear", XSPR(31,467,61), XSPR_MASK, BOOKE, { RS } }, -{ "mtdear", XSPR(31,467,981), XSPR_MASK, PPC403, { RS } }, -{ "mtesr", XSPR(31,467,62), XSPR_MASK, BOOKE, { RS } }, -{ "mtesr", XSPR(31,467,980), XSPR_MASK, PPC403, { RS } }, -{ "mtivpr", XSPR(31,467,63), XSPR_MASK, BOOKE, { RS } }, -{ "mtcmpa", XSPR(31,467,144), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpb", XSPR(31,467,145), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpc", XSPR(31,467,146), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpd", XSPR(31,467,147), XSPR_MASK, PPC860, { RS } }, -{ "mticr", XSPR(31,467,148), XSPR_MASK, PPC860, { RS } }, -{ "mtder", XSPR(31,467,149), XSPR_MASK, PPC860, { RS } }, -{ "mtcounta", XSPR(31,467,150), XSPR_MASK, PPC860, { RS } }, -{ "mtcountb", XSPR(31,467,151), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpe", XSPR(31,467,152), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpf", XSPR(31,467,153), XSPR_MASK, PPC860, { RS } }, -{ "mtcmpg", XSPR(31,467,154), XSPR_MASK, PPC860, { RS } }, -{ "mtcmph", XSPR(31,467,155), XSPR_MASK, PPC860, { RS } }, -{ "mtlctrl1", XSPR(31,467,156), XSPR_MASK, PPC860, { RS } }, -{ "mtlctrl2", XSPR(31,467,157), XSPR_MASK, PPC860, { RS } }, -{ "mtictrl", XSPR(31,467,158), XSPR_MASK, PPC860, { RS } }, -{ "mtbar", XSPR(31,467,159), XSPR_MASK, PPC860, { RS } }, -{ "mtvrsave", XSPR(31,467,256), XSPR_MASK, PPCVEC, { RS } }, -{ "mtusprg0", XSPR(31,467,256), XSPR_MASK, BOOKE, { RS } }, -{ "mtsprg", XSPR(31,467,256), XSPRG_MASK,PPC, { SPRG, RS } }, -{ "mtsprg0", XSPR(31,467,272), XSPR_MASK, PPC, { RS } }, -{ "mtsprg1", XSPR(31,467,273), XSPR_MASK, PPC, { RS } }, -{ "mtsprg2", XSPR(31,467,274), XSPR_MASK, PPC, { RS } }, -{ "mtsprg3", XSPR(31,467,275), XSPR_MASK, PPC, { RS } }, -{ "mtsprg4", XSPR(31,467,276), XSPR_MASK, PPC405 | BOOKE, { RS } }, -{ "mtsprg5", XSPR(31,467,277), XSPR_MASK, PPC405 | BOOKE, { RS } }, -{ "mtsprg6", XSPR(31,467,278), XSPR_MASK, PPC405 | BOOKE, { RS } }, -{ "mtsprg7", XSPR(31,467,279), XSPR_MASK, PPC405 | BOOKE, { RS } }, -{ "mtasr", XSPR(31,467,280), XSPR_MASK, PPC64, { RS } }, -{ "mtear", XSPR(31,467,282), XSPR_MASK, PPC, { RS } }, -{ "mttbl", XSPR(31,467,284), XSPR_MASK, PPC, { RS } }, -{ "mttbu", XSPR(31,467,285), XSPR_MASK, PPC, { RS } }, -{ "mtdbsr", XSPR(31,467,304), XSPR_MASK, BOOKE, { RS } }, -{ "mtdbsr", XSPR(31,467,1008), XSPR_MASK, PPC403, { RS } }, -{ "mtdbcr0", XSPR(31,467,308), XSPR_MASK, BOOKE, { RS } }, -{ "mtdbcr0", XSPR(31,467,1010), XSPR_MASK, PPC405, { RS } }, -{ "mtdbcr1", XSPR(31,467,309), XSPR_MASK, BOOKE, { RS } }, -{ "mtdbcr1", XSPR(31,467,957), XSPR_MASK, PPC405, { RS } }, -{ "mtdbcr2", XSPR(31,467,310), XSPR_MASK, BOOKE, { RS } }, -{ "mtiac1", XSPR(31,467,312), XSPR_MASK, BOOKE, { RS } }, -{ "mtiac1", XSPR(31,467,1012), XSPR_MASK, PPC403, { RS } }, -{ "mtiac2", XSPR(31,467,313), XSPR_MASK, BOOKE, { RS } }, -{ "mtiac2", XSPR(31,467,1013), XSPR_MASK, PPC403, { RS } }, -{ "mtiac3", XSPR(31,467,314), XSPR_MASK, BOOKE, { RS } }, -{ "mtiac3", XSPR(31,467,948), XSPR_MASK, PPC405, { RS } }, -{ "mtiac4", XSPR(31,467,315), XSPR_MASK, BOOKE, { RS } }, -{ "mtiac4", XSPR(31,467,949), XSPR_MASK, PPC405, { RS } }, -{ "mtdac1", XSPR(31,467,316), XSPR_MASK, BOOKE, { RS } }, -{ "mtdac1", XSPR(31,467,1014), XSPR_MASK, PPC403, { RS } }, -{ "mtdac2", XSPR(31,467,317), XSPR_MASK, BOOKE, { RS } }, -{ "mtdac2", XSPR(31,467,1015), XSPR_MASK, PPC403, { RS } }, -{ "mtdvc1", XSPR(31,467,318), XSPR_MASK, BOOKE, { RS } }, -{ "mtdvc1", XSPR(31,467,950), XSPR_MASK, PPC405, { RS } }, -{ "mtdvc2", XSPR(31,467,319), XSPR_MASK, BOOKE, { RS } }, -{ "mtdvc2", XSPR(31,467,951), XSPR_MASK, PPC405, { RS } }, -{ "mttsr", XSPR(31,467,336), XSPR_MASK, BOOKE, { RS } }, -{ "mttsr", XSPR(31,467,984), XSPR_MASK, PPC403, { RS } }, -{ "mttcr", XSPR(31,467,340), XSPR_MASK, BOOKE, { RS } }, -{ "mttcr", XSPR(31,467,986), XSPR_MASK, PPC403, { RS } }, -{ "mtivor0", XSPR(31,467,400), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor1", XSPR(31,467,401), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor2", XSPR(31,467,402), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor3", XSPR(31,467,403), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor4", XSPR(31,467,404), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor5", XSPR(31,467,405), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor6", XSPR(31,467,406), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor7", XSPR(31,467,407), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor8", XSPR(31,467,408), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor9", XSPR(31,467,409), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor10", XSPR(31,467,410), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor11", XSPR(31,467,411), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor12", XSPR(31,467,412), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor13", XSPR(31,467,413), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor14", XSPR(31,467,414), XSPR_MASK, BOOKE, { RS } }, -{ "mtivor15", XSPR(31,467,415), XSPR_MASK, BOOKE, { RS } }, -{ "mtspefscr", XSPR(31,467,512), XSPR_MASK, PPCSPE, { RS } }, -{ "mtbbear", XSPR(31,467,513), XSPR_MASK, PPCBRLK, { RS } }, -{ "mtbbtar", XSPR(31,467,514), XSPR_MASK, PPCBRLK, { RS } }, -{ "mtivor32", XSPR(31,467,528), XSPR_MASK, PPCSPE, { RS } }, -{ "mtivor33", XSPR(31,467,529), XSPR_MASK, PPCSPE, { RS } }, -{ "mtivor34", XSPR(31,467,530), XSPR_MASK, PPCSPE, { RS } }, -{ "mtivor35", XSPR(31,467,531), XSPR_MASK, PPCPMR, { RS } }, -{ "mtibatu", XSPR(31,467,528), XSPRBAT_MASK, PPC, { SPRBAT, RS } }, -{ "mtibatl", XSPR(31,467,529), XSPRBAT_MASK, PPC, { SPRBAT, RS } }, -{ "mtdbatu", XSPR(31,467,536), XSPRBAT_MASK, PPC, { SPRBAT, RS } }, -{ "mtdbatl", XSPR(31,467,537), XSPRBAT_MASK, PPC, { SPRBAT, RS } }, -{ "mtmcsrr0", XSPR(31,467,570), XSPR_MASK, PPCRFMCI, { RS } }, -{ "mtmcsrr1", XSPR(31,467,571), XSPR_MASK, PPCRFMCI, { RS } }, -{ "mtmcsr", XSPR(31,467,572), XSPR_MASK, PPCRFMCI, { RS } }, -{ "mtummcr0", XSPR(31,467,936), XSPR_MASK, PPC750, { RS } }, -{ "mtupmc1", XSPR(31,467,937), XSPR_MASK, PPC750, { RS } }, -{ "mtupmc2", XSPR(31,467,938), XSPR_MASK, PPC750, { RS } }, -{ "mtusia", XSPR(31,467,939), XSPR_MASK, PPC750, { RS } }, -{ "mtummcr1", XSPR(31,467,940), XSPR_MASK, PPC750, { RS } }, -{ "mtupmc3", XSPR(31,467,941), XSPR_MASK, PPC750, { RS } }, -{ "mtupmc4", XSPR(31,467,942), XSPR_MASK, PPC750, { RS } }, -{ "mtzpr", XSPR(31,467,944), XSPR_MASK, PPC403, { RS } }, -{ "mtccr0", XSPR(31,467,947), XSPR_MASK, PPC405, { RS } }, -{ "mtmmcr0", XSPR(31,467,952), XSPR_MASK, PPC750, { RS } }, -{ "mtsgr", XSPR(31,467,953), XSPR_MASK, PPC403, { RS } }, -{ "mtpmc1", XSPR(31,467,953), XSPR_MASK, PPC750, { RS } }, -{ "mtdcwr", XSPR(31,467,954), XSPR_MASK, PPC403, { RS } }, -{ "mtpmc2", XSPR(31,467,954), XSPR_MASK, PPC750, { RS } }, -{ "mtsler", XSPR(31,467,955), XSPR_MASK, PPC405, { RS } }, -{ "mtsia", XSPR(31,467,955), XSPR_MASK, PPC750, { RS } }, -{ "mtsu0r", XSPR(31,467,956), XSPR_MASK, PPC405, { RS } }, -{ "mtmmcr1", XSPR(31,467,956), XSPR_MASK, PPC750, { RS } }, -{ "mtpmc3", XSPR(31,467,957), XSPR_MASK, PPC750, { RS } }, -{ "mtpmc4", XSPR(31,467,958), XSPR_MASK, PPC750, { RS } }, -{ "mticdbdr", XSPR(31,467,979), XSPR_MASK, PPC403, { RS } }, -{ "mtevpr", XSPR(31,467,982), XSPR_MASK, PPC403, { RS } }, -{ "mtcdbcr", XSPR(31,467,983), XSPR_MASK, PPC403, { RS } }, -{ "mtpit", XSPR(31,467,987), XSPR_MASK, PPC403, { RS } }, -{ "mttbhi", XSPR(31,467,988), XSPR_MASK, PPC403, { RS } }, -{ "mttblo", XSPR(31,467,989), XSPR_MASK, PPC403, { RS } }, -{ "mtsrr2", XSPR(31,467,990), XSPR_MASK, PPC403, { RS } }, -{ "mtsrr3", XSPR(31,467,991), XSPR_MASK, PPC403, { RS } }, -{ "mtl2cr", XSPR(31,467,1017), XSPR_MASK, PPC750, { RS } }, -{ "mtdccr", XSPR(31,467,1018), XSPR_MASK, PPC403, { RS } }, -{ "mticcr", XSPR(31,467,1019), XSPR_MASK, PPC403, { RS } }, -{ "mtictc", XSPR(31,467,1019), XSPR_MASK, PPC750, { RS } }, -{ "mtpbl1", XSPR(31,467,1020), XSPR_MASK, PPC403, { RS } }, -{ "mtthrm1", XSPR(31,467,1020), XSPR_MASK, PPC750, { RS } }, -{ "mtpbu1", XSPR(31,467,1021), XSPR_MASK, PPC403, { RS } }, -{ "mtthrm2", XSPR(31,467,1021), XSPR_MASK, PPC750, { RS } }, -{ "mtpbl2", XSPR(31,467,1022), XSPR_MASK, PPC403, { RS } }, -{ "mtthrm3", XSPR(31,467,1022), XSPR_MASK, PPC750, { RS } }, -{ "mtpbu2", XSPR(31,467,1023), XSPR_MASK, PPC403, { RS } }, -{ "mtspr", X(31,467), X_MASK, COM, { SPR, RS } }, - -{ "dcbi", X(31,470), XRT_MASK, PPC, { RA, RB } }, - -{ "nand", XRC(31,476,0), X_MASK, COM, { RA, RS, RB } }, -{ "nand.", XRC(31,476,1), X_MASK, COM, { RA, RS, RB } }, - -{ "dcbie", X(31,478), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "dcread", X(31,486), X_MASK, PPC403|PPC440, { RT, RA, RB }}, - -{ "mtpmr", X(31,462), X_MASK, PPCPMR, { PMR, RS }}, - -{ "icbtls", X(31,486), X_MASK, PPCCHLK, { CT, RA, RB }}, - -{ "nabs", XO(31,488,0,0), XORB_MASK, M601, { RT, RA } }, -{ "subfme64",XO(31,488,0,0), XORB_MASK, BOOKE64, { RT, RA } }, -{ "nabs.", XO(31,488,0,1), XORB_MASK, M601, { RT, RA } }, -{ "nabso", XO(31,488,1,0), XORB_MASK, M601, { RT, RA } }, -{ "subfme64o",XO(31,488,1,0), XORB_MASK, BOOKE64, { RT, RA } }, -{ "nabso.", XO(31,488,1,1), XORB_MASK, M601, { RT, RA } }, - -{ "divd", XO(31,489,0,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divd.", XO(31,489,0,1), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divdo", XO(31,489,1,0), XO_MASK, PPC64, { RT, RA, RB } }, -{ "divdo.", XO(31,489,1,1), XO_MASK, PPC64, { RT, RA, RB } }, - -{ "addme64", XO(31,490,0,0), XORB_MASK, BOOKE64, { RT, RA } }, -{ "addme64o",XO(31,490,1,0), XORB_MASK, BOOKE64, { RT, RA } }, - -{ "divw", XO(31,491,0,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "divw.", XO(31,491,0,1), XO_MASK, PPC, { RT, RA, RB } }, -{ "divwo", XO(31,491,1,0), XO_MASK, PPC, { RT, RA, RB } }, -{ "divwo.", XO(31,491,1,1), XO_MASK, PPC, { RT, RA, RB } }, - -{ "icbtlse", X(31,494), X_MASK, PPCCHLK64, { CT, RA, RB }}, - -{ "slbia", X(31,498), 0xffffffff, PPC64, { 0 } }, - -{ "cli", X(31,502), XRB_MASK, POWER, { RT, RA } }, - -{ "stdcxe.", XRC(31,511,1), X_MASK, BOOKE64, { RS, RA, RB } }, - -{ "mcrxr", X(31,512), XRARB_MASK|(3<<21), COM, { BF } }, - -{ "bblels", X(31,518), X_MASK, PPCBRLK, { 0 }}, -{ "mcrxr64", X(31,544), XRARB_MASK|(3<<21), BOOKE64, { BF } }, - -{ "clcs", X(31,531), XRB_MASK, M601, { RT, RA } }, - -{ "ldbrx", X(31,532), X_MASK, CELL, { RT, RA0, RB } }, - -{ "lswx", X(31,533), X_MASK, PPCCOM, { RT, RA0, RB } }, -{ "lsx", X(31,533), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "lwbrx", X(31,534), X_MASK, PPCCOM, { RT, RA0, RB } }, -{ "lbrx", X(31,534), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "lfsx", X(31,535), X_MASK, COM, { FRT, RA0, RB } }, - -{ "srw", XRC(31,536,0), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sr", XRC(31,536,0), X_MASK, PWRCOM, { RA, RS, RB } }, -{ "srw.", XRC(31,536,1), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sr.", XRC(31,536,1), X_MASK, PWRCOM, { RA, RS, RB } }, - -{ "rrib", XRC(31,537,0), X_MASK, M601, { RA, RS, RB } }, -{ "rrib.", XRC(31,537,1), X_MASK, M601, { RA, RS, RB } }, - -{ "srd", XRC(31,539,0), X_MASK, PPC64, { RA, RS, RB } }, -{ "srd.", XRC(31,539,1), X_MASK, PPC64, { RA, RS, RB } }, - -{ "maskir", XRC(31,541,0), X_MASK, M601, { RA, RS, RB } }, -{ "maskir.", XRC(31,541,1), X_MASK, M601, { RA, RS, RB } }, - -{ "lwbrxe", X(31,542), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "lfsxe", X(31,543), X_MASK, BOOKE64, { FRT, RA0, RB } }, - -{ "bbelr", X(31,550), X_MASK, PPCBRLK, { 0 }}, - -{ "tlbsync", X(31,566), 0xffffffff, PPC, { 0 } }, - -{ "lfsux", X(31,567), X_MASK, COM, { FRT, RAS, RB } }, - -{ "lfsuxe", X(31,575), X_MASK, BOOKE64, { FRT, RAS, RB } }, - -{ "mfsr", X(31,595), XRB_MASK|(1<<20), COM32, { RT, SR } }, - -{ "lswi", X(31,597), X_MASK, PPCCOM, { RT, RA0, NB } }, -{ "lsi", X(31,597), X_MASK, PWRCOM, { RT, RA0, NB } }, - -{ "lwsync", XSYNC(31,598,1), 0xffffffff, PPC, { 0 } }, -{ "ptesync", XSYNC(31,598,2), 0xffffffff, PPC64, { 0 } }, -{ "msync", X(31,598), 0xffffffff, BOOKE, { 0 } }, -{ "sync", X(31,598), XSYNC_MASK, PPCCOM, { LS } }, -{ "dcs", X(31,598), 0xffffffff, PWRCOM, { 0 } }, - -{ "lfdx", X(31,599), X_MASK, COM, { FRT, RA0, RB } }, - -{ "lfdxe", X(31,607), X_MASK, BOOKE64, { FRT, RA0, RB } }, - -{ "mffgpr", XRC(31,607,0), XRA_MASK, POWER6, { FRT, RB } }, - -{ "mfsri", X(31,627), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "dclst", X(31,630), XRB_MASK, PWRCOM, { RS, RA } }, - -{ "lfdux", X(31,631), X_MASK, COM, { FRT, RAS, RB } }, - -{ "lfduxe", X(31,639), X_MASK, BOOKE64, { FRT, RAS, RB } }, - -{ "mfsrin", X(31,659), XRA_MASK, PPC32, { RT, RB } }, - -{ "stdbrx", X(31,660), X_MASK, CELL, { RS, RA0, RB } }, - -{ "stswx", X(31,661), X_MASK, PPCCOM, { RS, RA0, RB } }, -{ "stsx", X(31,661), X_MASK, PWRCOM, { RS, RA0, RB } }, - -{ "stwbrx", X(31,662), X_MASK, PPCCOM, { RS, RA0, RB } }, -{ "stbrx", X(31,662), X_MASK, PWRCOM, { RS, RA0, RB } }, - -{ "stfsx", X(31,663), X_MASK, COM, { FRS, RA0, RB } }, - -{ "srq", XRC(31,664,0), X_MASK, M601, { RA, RS, RB } }, -{ "srq.", XRC(31,664,1), X_MASK, M601, { RA, RS, RB } }, - -{ "sre", XRC(31,665,0), X_MASK, M601, { RA, RS, RB } }, -{ "sre.", XRC(31,665,1), X_MASK, M601, { RA, RS, RB } }, - -{ "stwbrxe", X(31,670), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "stfsxe", X(31,671), X_MASK, BOOKE64, { FRS, RA0, RB } }, - -{ "stfsux", X(31,695), X_MASK, COM, { FRS, RAS, RB } }, - -{ "sriq", XRC(31,696,0), X_MASK, M601, { RA, RS, SH } }, -{ "sriq.", XRC(31,696,1), X_MASK, M601, { RA, RS, SH } }, - -{ "stfsuxe", X(31,703), X_MASK, BOOKE64, { FRS, RAS, RB } }, - -{ "stswi", X(31,725), X_MASK, PPCCOM, { RS, RA0, NB } }, -{ "stsi", X(31,725), X_MASK, PWRCOM, { RS, RA0, NB } }, - -{ "stfdx", X(31,727), X_MASK, COM, { FRS, RA0, RB } }, - -{ "srlq", XRC(31,728,0), X_MASK, M601, { RA, RS, RB } }, -{ "srlq.", XRC(31,728,1), X_MASK, M601, { RA, RS, RB } }, - -{ "sreq", XRC(31,729,0), X_MASK, M601, { RA, RS, RB } }, -{ "sreq.", XRC(31,729,1), X_MASK, M601, { RA, RS, RB } }, - -{ "stfdxe", X(31,735), X_MASK, BOOKE64, { FRS, RA0, RB } }, - -{ "mftgpr", XRC(31,735,0), XRA_MASK, POWER6, { RT, FRB } }, - -{ "dcba", X(31,758), XRT_MASK, PPC405 | BOOKE, { RA, RB } }, - -{ "stfdux", X(31,759), X_MASK, COM, { FRS, RAS, RB } }, - -{ "srliq", XRC(31,760,0), X_MASK, M601, { RA, RS, SH } }, -{ "srliq.", XRC(31,760,1), X_MASK, M601, { RA, RS, SH } }, - -{ "dcbae", X(31,766), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "stfduxe", X(31,767), X_MASK, BOOKE64, { FRS, RAS, RB } }, - -{ "tlbivax", X(31,786), XRT_MASK, BOOKE, { RA, RB } }, -{ "tlbivaxe",X(31,787), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "lwzcix", X(31,789), X_MASK, POWER6, { RT, RA0, RB } }, - -{ "lhbrx", X(31,790), X_MASK, COM, { RT, RA0, RB } }, - -{ "sraw", XRC(31,792,0), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sra", XRC(31,792,0), X_MASK, PWRCOM, { RA, RS, RB } }, -{ "sraw.", XRC(31,792,1), X_MASK, PPCCOM, { RA, RS, RB } }, -{ "sra.", XRC(31,792,1), X_MASK, PWRCOM, { RA, RS, RB } }, - -{ "srad", XRC(31,794,0), X_MASK, PPC64, { RA, RS, RB } }, -{ "srad.", XRC(31,794,1), X_MASK, PPC64, { RA, RS, RB } }, - -{ "lhbrxe", X(31,798), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "ldxe", X(31,799), X_MASK, BOOKE64, { RT, RA0, RB } }, -{ "lduxe", X(31,831), X_MASK, BOOKE64, { RT, RA0, RB } }, - -{ "rac", X(31,818), X_MASK, PWRCOM, { RT, RA, RB } }, - -{ "lhzcix", X(31,821), X_MASK, POWER6, { RT, RA0, RB } }, - -{ "dss", XDSS(31,822,0), XDSS_MASK, PPCVEC, { STRM } }, -{ "dssall", XDSS(31,822,1), XDSS_MASK, PPCVEC, { 0 } }, - -{ "srawi", XRC(31,824,0), X_MASK, PPCCOM, { RA, RS, SH } }, -{ "srai", XRC(31,824,0), X_MASK, PWRCOM, { RA, RS, SH } }, -{ "srawi.", XRC(31,824,1), X_MASK, PPCCOM, { RA, RS, SH } }, -{ "srai.", XRC(31,824,1), X_MASK, PWRCOM, { RA, RS, SH } }, - -{ "slbmfev", X(31,851), XRA_MASK, PPC64, { RT, RB } }, - -{ "lbzcix", X(31,853), X_MASK, POWER6, { RT, RA0, RB } }, - -{ "mbar", X(31,854), X_MASK, BOOKE, { MO } }, -{ "eieio", X(31,854), 0xffffffff, PPC, { 0 } }, - -{ "lfiwax", X(31,855), X_MASK, POWER6, { FRT, RA0, RB } }, - -{ "ldcix", X(31,885), X_MASK, POWER6, { RT, RA0, RB } }, - -{ "tlbsx", XRC(31,914,0), X_MASK, PPC403|BOOKE, { RTO, RA, RB } }, -{ "tlbsx.", XRC(31,914,1), X_MASK, PPC403|BOOKE, { RTO, RA, RB } }, -{ "tlbsxe", XRC(31,915,0), X_MASK, BOOKE64, { RTO, RA, RB } }, -{ "tlbsxe.", XRC(31,915,1), X_MASK, BOOKE64, { RTO, RA, RB } }, - -{ "slbmfee", X(31,915), XRA_MASK, PPC64, { RT, RB } }, - -{ "stwcix", X(31,917), X_MASK, POWER6, { RS, RA0, RB } }, - -{ "sthbrx", X(31,918), X_MASK, COM, { RS, RA0, RB } }, - -{ "sraq", XRC(31,920,0), X_MASK, M601, { RA, RS, RB } }, -{ "sraq.", XRC(31,920,1), X_MASK, M601, { RA, RS, RB } }, - -{ "srea", XRC(31,921,0), X_MASK, M601, { RA, RS, RB } }, -{ "srea.", XRC(31,921,1), X_MASK, M601, { RA, RS, RB } }, - -{ "extsh", XRC(31,922,0), XRB_MASK, PPCCOM, { RA, RS } }, -{ "exts", XRC(31,922,0), XRB_MASK, PWRCOM, { RA, RS } }, -{ "extsh.", XRC(31,922,1), XRB_MASK, PPCCOM, { RA, RS } }, -{ "exts.", XRC(31,922,1), XRB_MASK, PWRCOM, { RA, RS } }, - -{ "sthbrxe", X(31,926), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "stdxe", X(31,927), X_MASK, BOOKE64, { RS, RA0, RB } }, - -{ "tlbrehi", XTLB(31,946,0), XTLB_MASK, PPC403, { RT, RA } }, -{ "tlbrelo", XTLB(31,946,1), XTLB_MASK, PPC403, { RT, RA } }, -{ "tlbre", X(31,946), X_MASK, PPC403|BOOKE, { RSO, RAOPT, SHO } }, - -{ "sthcix", X(31,949), X_MASK, POWER6, { RS, RA0, RB } }, - -{ "sraiq", XRC(31,952,0), X_MASK, M601, { RA, RS, SH } }, -{ "sraiq.", XRC(31,952,1), X_MASK, M601, { RA, RS, SH } }, - -{ "extsb", XRC(31,954,0), XRB_MASK, PPC, { RA, RS} }, -{ "extsb.", XRC(31,954,1), XRB_MASK, PPC, { RA, RS} }, - -{ "stduxe", X(31,959), X_MASK, BOOKE64, { RS, RAS, RB } }, - -{ "iccci", X(31,966), XRT_MASK, PPC403|PPC440, { RA, RB } }, - -{ "tlbwehi", XTLB(31,978,0), XTLB_MASK, PPC403, { RT, RA } }, -{ "tlbwelo", XTLB(31,978,1), XTLB_MASK, PPC403, { RT, RA } }, -{ "tlbwe", X(31,978), X_MASK, PPC403|BOOKE, { RSO, RAOPT, SHO } }, -{ "tlbld", X(31,978), XRTRA_MASK, PPC, { RB } }, - -{ "stbcix", X(31,981), X_MASK, POWER6, { RS, RA0, RB } }, - -{ "icbi", X(31,982), XRT_MASK, PPC, { RA, RB } }, - -{ "stfiwx", X(31,983), X_MASK, PPC, { FRS, RA0, RB } }, - -{ "extsw", XRC(31,986,0), XRB_MASK, PPC64 | BOOKE64,{ RA, RS } }, -{ "extsw.", XRC(31,986,1), XRB_MASK, PPC64, { RA, RS } }, - -{ "icread", X(31,998), XRT_MASK, PPC403|PPC440, { RA, RB } }, - -{ "icbie", X(31,990), XRT_MASK, BOOKE64, { RA, RB } }, -{ "stfiwxe", X(31,991), X_MASK, BOOKE64, { FRS, RA0, RB } }, - -{ "tlbli", X(31,1010), XRTRA_MASK, PPC, { RB } }, - -{ "stdcix", X(31,1013), X_MASK, POWER6, { RS, RA0, RB } }, - -{ "dcbzl", XOPL(31,1014,1), XRT_MASK,POWER4, { RA, RB } }, -{ "dcbz", X(31,1014), XRT_MASK, PPC, { RA, RB } }, -{ "dclz", X(31,1014), XRT_MASK, PPC, { RA, RB } }, - -{ "dcbze", X(31,1022), XRT_MASK, BOOKE64, { RA, RB } }, - -{ "lvebx", X(31, 7), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvehx", X(31, 39), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvewx", X(31, 71), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvsl", X(31, 6), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvsr", X(31, 38), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvx", X(31, 103), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "lvxl", X(31, 359), X_MASK, PPCVEC, { VD, RA, RB } }, -{ "stvebx", X(31, 135), X_MASK, PPCVEC, { VS, RA, RB } }, -{ "stvehx", X(31, 167), X_MASK, PPCVEC, { VS, RA, RB } }, -{ "stvewx", X(31, 199), X_MASK, PPCVEC, { VS, RA, RB } }, -{ "stvx", X(31, 231), X_MASK, PPCVEC, { VS, RA, RB } }, -{ "stvxl", X(31, 487), X_MASK, PPCVEC, { VS, RA, RB } }, - -/* New load/store left/right index vector instructions that are in the Cell only. */ -{ "lvlx", X(31, 519), X_MASK, CELL, { VD, RA0, RB } }, -{ "lvlxl", X(31, 775), X_MASK, CELL, { VD, RA0, RB } }, -{ "lvrx", X(31, 551), X_MASK, CELL, { VD, RA0, RB } }, -{ "lvrxl", X(31, 807), X_MASK, CELL, { VD, RA0, RB } }, -{ "stvlx", X(31, 647), X_MASK, CELL, { VS, RA0, RB } }, -{ "stvlxl", X(31, 903), X_MASK, CELL, { VS, RA0, RB } }, -{ "stvrx", X(31, 679), X_MASK, CELL, { VS, RA0, RB } }, -{ "stvrxl", X(31, 935), X_MASK, CELL, { VS, RA0, RB } }, - -{ "lwz", OP(32), OP_MASK, PPCCOM, { RT, D, RA0 } }, -{ "l", OP(32), OP_MASK, PWRCOM, { RT, D, RA0 } }, - -{ "lwzu", OP(33), OP_MASK, PPCCOM, { RT, D, RAL } }, -{ "lu", OP(33), OP_MASK, PWRCOM, { RT, D, RA0 } }, - -{ "lbz", OP(34), OP_MASK, COM, { RT, D, RA0 } }, - -{ "lbzu", OP(35), OP_MASK, COM, { RT, D, RAL } }, - -{ "stw", OP(36), OP_MASK, PPCCOM, { RS, D, RA0 } }, -{ "st", OP(36), OP_MASK, PWRCOM, { RS, D, RA0 } }, - -{ "stwu", OP(37), OP_MASK, PPCCOM, { RS, D, RAS } }, -{ "stu", OP(37), OP_MASK, PWRCOM, { RS, D, RA0 } }, - -{ "stb", OP(38), OP_MASK, COM, { RS, D, RA0 } }, - -{ "stbu", OP(39), OP_MASK, COM, { RS, D, RAS } }, - -{ "lhz", OP(40), OP_MASK, COM, { RT, D, RA0 } }, - -{ "lhzu", OP(41), OP_MASK, COM, { RT, D, RAL } }, - -{ "lha", OP(42), OP_MASK, COM, { RT, D, RA0 } }, - -{ "lhau", OP(43), OP_MASK, COM, { RT, D, RAL } }, - -{ "sth", OP(44), OP_MASK, COM, { RS, D, RA0 } }, - -{ "sthu", OP(45), OP_MASK, COM, { RS, D, RAS } }, - -{ "lmw", OP(46), OP_MASK, PPCCOM, { RT, D, RAM } }, -{ "lm", OP(46), OP_MASK, PWRCOM, { RT, D, RA0 } }, - -{ "stmw", OP(47), OP_MASK, PPCCOM, { RS, D, RA0 } }, -{ "stm", OP(47), OP_MASK, PWRCOM, { RS, D, RA0 } }, - -{ "lfs", OP(48), OP_MASK, COM, { FRT, D, RA0 } }, - -{ "lfsu", OP(49), OP_MASK, COM, { FRT, D, RAS } }, - -{ "lfd", OP(50), OP_MASK, COM, { FRT, D, RA0 } }, - -{ "lfdu", OP(51), OP_MASK, COM, { FRT, D, RAS } }, - -{ "stfs", OP(52), OP_MASK, COM, { FRS, D, RA0 } }, - -{ "stfsu", OP(53), OP_MASK, COM, { FRS, D, RAS } }, - -{ "stfd", OP(54), OP_MASK, COM, { FRS, D, RA0 } }, - -{ "stfdu", OP(55), OP_MASK, COM, { FRS, D, RAS } }, - -{ "lq", OP(56), OP_MASK, POWER4, { RTQ, DQ, RAQ } }, - -{ "lfq", OP(56), OP_MASK, POWER2, { FRT, D, RA0 } }, - -{ "lfqu", OP(57), OP_MASK, POWER2, { FRT, D, RA0 } }, - -{ "lfdp", OP(57), OP_MASK, POWER6, { FRT, D, RA0 } }, - -{ "lbze", DEO(58,0), DE_MASK, BOOKE64, { RT, DE, RA0 } }, -{ "lbzue", DEO(58,1), DE_MASK, BOOKE64, { RT, DE, RAL } }, -{ "lhze", DEO(58,2), DE_MASK, BOOKE64, { RT, DE, RA0 } }, -{ "lhzue", DEO(58,3), DE_MASK, BOOKE64, { RT, DE, RAL } }, -{ "lhae", DEO(58,4), DE_MASK, BOOKE64, { RT, DE, RA0 } }, -{ "lhaue", DEO(58,5), DE_MASK, BOOKE64, { RT, DE, RAL } }, -{ "lwze", DEO(58,6), DE_MASK, BOOKE64, { RT, DE, RA0 } }, -{ "lwzue", DEO(58,7), DE_MASK, BOOKE64, { RT, DE, RAL } }, -{ "stbe", DEO(58,8), DE_MASK, BOOKE64, { RS, DE, RA0 } }, -{ "stbue", DEO(58,9), DE_MASK, BOOKE64, { RS, DE, RAS } }, -{ "sthe", DEO(58,10), DE_MASK, BOOKE64, { RS, DE, RA0 } }, -{ "sthue", DEO(58,11), DE_MASK, BOOKE64, { RS, DE, RAS } }, -{ "stwe", DEO(58,14), DE_MASK, BOOKE64, { RS, DE, RA0 } }, -{ "stwue", DEO(58,15), DE_MASK, BOOKE64, { RS, DE, RAS } }, - -{ "ld", DSO(58,0), DS_MASK, PPC64, { RT, DS, RA0 } }, - -{ "ldu", DSO(58,1), DS_MASK, PPC64, { RT, DS, RAL } }, - -{ "lwa", DSO(58,2), DS_MASK, PPC64, { RT, DS, RA0 } }, - -{ "dadd", XRC(59,2,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "dadd.", XRC(59,2,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "dqua", ZRC(59,3,0), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, -{ "dqua.", ZRC(59,3,1), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, - -{ "fdivs", A(59,18,0), AFRC_MASK, PPC, { FRT, FRA, FRB } }, -{ "fdivs.", A(59,18,1), AFRC_MASK, PPC, { FRT, FRA, FRB } }, - -{ "fsubs", A(59,20,0), AFRC_MASK, PPC, { FRT, FRA, FRB } }, -{ "fsubs.", A(59,20,1), AFRC_MASK, PPC, { FRT, FRA, FRB } }, - -{ "fadds", A(59,21,0), AFRC_MASK, PPC, { FRT, FRA, FRB } }, -{ "fadds.", A(59,21,1), AFRC_MASK, PPC, { FRT, FRA, FRB } }, - -{ "fsqrts", A(59,22,0), AFRAFRC_MASK, PPC, { FRT, FRB } }, -{ "fsqrts.", A(59,22,1), AFRAFRC_MASK, PPC, { FRT, FRB } }, - -{ "fres", A(59,24,0), AFRALFRC_MASK, PPC, { FRT, FRB, A_L } }, -{ "fres.", A(59,24,1), AFRALFRC_MASK, PPC, { FRT, FRB, A_L } }, - -{ "fmuls", A(59,25,0), AFRB_MASK, PPC, { FRT, FRA, FRC } }, -{ "fmuls.", A(59,25,1), AFRB_MASK, PPC, { FRT, FRA, FRC } }, - -{ "frsqrtes", A(59,26,0), AFRALFRC_MASK,POWER5, { FRT, FRB, A_L } }, -{ "frsqrtes.",A(59,26,1), AFRALFRC_MASK,POWER5, { FRT, FRB, A_L } }, - -{ "fmsubs", A(59,28,0), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, -{ "fmsubs.", A(59,28,1), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, - -{ "fmadds", A(59,29,0), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, -{ "fmadds.", A(59,29,1), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, - -{ "fnmsubs", A(59,30,0), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, -{ "fnmsubs.",A(59,30,1), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, - -{ "fnmadds", A(59,31,0), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, -{ "fnmadds.",A(59,31,1), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, - -{ "dmul", XRC(59,34,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "dmul.", XRC(59,34,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "drrnd", ZRC(59,35,0), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, -{ "drrnd.", ZRC(59,35,1), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, - -{ "dscli", ZRC(59,66,0), Z_MASK, POWER6, { FRT, FRA, SH16 } }, -{ "dscli.", ZRC(59,66,1), Z_MASK, POWER6, { FRT, FRA, SH16 } }, - -{ "dquai", ZRC(59,67,0), Z2_MASK, POWER6, { TE, FRT, FRB, RMC } }, -{ "dquai.", ZRC(59,67,1), Z2_MASK, POWER6, { TE, FRT, FRB, RMC } }, - -{ "dscri", ZRC(59,98,0), Z_MASK, POWER6, { FRT, FRA, SH16 } }, -{ "dscri.", ZRC(59,98,1), Z_MASK, POWER6, { FRT, FRA, SH16 } }, - -{ "drintx", ZRC(59,99,0), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, -{ "drintx.", ZRC(59,99,1), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, - -{ "dcmpo", X(59,130), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "dtstex", X(59,162), X_MASK, POWER6, { BF, FRA, FRB } }, -{ "dtstdc", Z(59,194), Z_MASK, POWER6, { BF, FRA, DCM } }, -{ "dtstdg", Z(59,226), Z_MASK, POWER6, { BF, FRA, DGM } }, - -{ "drintn", ZRC(59,227,0), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, -{ "drintn.", ZRC(59,227,1), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, - -{ "dctdp", XRC(59,258,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dctdp.", XRC(59,258,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "dctfix", XRC(59,290,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dctfix.", XRC(59,290,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "ddedpd", XRC(59,322,0), X_MASK, POWER6, { SP, FRT, FRB } }, -{ "ddedpd.", XRC(59,322,1), X_MASK, POWER6, { SP, FRT, FRB } }, - -{ "dxex", XRC(59,354,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dxex.", XRC(59,354,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "dsub", XRC(59,514,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "dsub.", XRC(59,514,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "ddiv", XRC(59,546,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "ddiv.", XRC(59,546,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "dcmpu", X(59,642), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "dtstsf", X(59,674), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "drsp", XRC(59,770,0), X_MASK, POWER6, { FRT, FRB } }, -{ "drsp.", XRC(59,770,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "dcffix", XRC(59,802,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dcffix.", XRC(59,802,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "denbcd", XRC(59,834,0), X_MASK, POWER6, { S, FRT, FRB } }, -{ "denbcd.", XRC(59,834,1), X_MASK, POWER6, { S, FRT, FRB } }, - -{ "diex", XRC(59,866,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "diex.", XRC(59,866,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "stfq", OP(60), OP_MASK, POWER2, { FRS, D, RA } }, - -{ "stfqu", OP(61), OP_MASK, POWER2, { FRS, D, RA } }, - -{ "stfdp", OP(61), OP_MASK, POWER6, { FRT, D, RA0 } }, - -{ "lde", DEO(62,0), DE_MASK, BOOKE64, { RT, DES, RA0 } }, -{ "ldue", DEO(62,1), DE_MASK, BOOKE64, { RT, DES, RA0 } }, -{ "lfse", DEO(62,4), DE_MASK, BOOKE64, { FRT, DES, RA0 } }, -{ "lfsue", DEO(62,5), DE_MASK, BOOKE64, { FRT, DES, RAS } }, -{ "lfde", DEO(62,6), DE_MASK, BOOKE64, { FRT, DES, RA0 } }, -{ "lfdue", DEO(62,7), DE_MASK, BOOKE64, { FRT, DES, RAS } }, -{ "stde", DEO(62,8), DE_MASK, BOOKE64, { RS, DES, RA0 } }, -{ "stdue", DEO(62,9), DE_MASK, BOOKE64, { RS, DES, RAS } }, -{ "stfse", DEO(62,12), DE_MASK, BOOKE64, { FRS, DES, RA0 } }, -{ "stfsue", DEO(62,13), DE_MASK, BOOKE64, { FRS, DES, RAS } }, -{ "stfde", DEO(62,14), DE_MASK, BOOKE64, { FRS, DES, RA0 } }, -{ "stfdue", DEO(62,15), DE_MASK, BOOKE64, { FRS, DES, RAS } }, - -{ "std", DSO(62,0), DS_MASK, PPC64, { RS, DS, RA0 } }, - -{ "stdu", DSO(62,1), DS_MASK, PPC64, { RS, DS, RAS } }, - -{ "stq", DSO(62,2), DS_MASK, POWER4, { RSQ, DS, RA0 } }, - -{ "fcmpu", X(63,0), X_MASK|(3<<21), COM, { BF, FRA, FRB } }, - -{ "daddq", XRC(63,2,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "daddq.", XRC(63,2,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "dquaq", ZRC(63,3,0), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, -{ "dquaq.", ZRC(63,3,1), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, - -{ "fcpsgn", XRC(63,8,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "fcpsgn.", XRC(63,8,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "frsp", XRC(63,12,0), XRA_MASK, COM, { FRT, FRB } }, -{ "frsp.", XRC(63,12,1), XRA_MASK, COM, { FRT, FRB } }, - -{ "fctiw", XRC(63,14,0), XRA_MASK, PPCCOM, { FRT, FRB } }, -{ "fcir", XRC(63,14,0), XRA_MASK, POWER2, { FRT, FRB } }, -{ "fctiw.", XRC(63,14,1), XRA_MASK, PPCCOM, { FRT, FRB } }, -{ "fcir.", XRC(63,14,1), XRA_MASK, POWER2, { FRT, FRB } }, - -{ "fctiwz", XRC(63,15,0), XRA_MASK, PPCCOM, { FRT, FRB } }, -{ "fcirz", XRC(63,15,0), XRA_MASK, POWER2, { FRT, FRB } }, -{ "fctiwz.", XRC(63,15,1), XRA_MASK, PPCCOM, { FRT, FRB } }, -{ "fcirz.", XRC(63,15,1), XRA_MASK, POWER2, { FRT, FRB } }, - -{ "fdiv", A(63,18,0), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fd", A(63,18,0), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, -{ "fdiv.", A(63,18,1), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fd.", A(63,18,1), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, - -{ "fsub", A(63,20,0), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fs", A(63,20,0), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, -{ "fsub.", A(63,20,1), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fs.", A(63,20,1), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, - -{ "fadd", A(63,21,0), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fa", A(63,21,0), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, -{ "fadd.", A(63,21,1), AFRC_MASK, PPCCOM, { FRT, FRA, FRB } }, -{ "fa.", A(63,21,1), AFRC_MASK, PWRCOM, { FRT, FRA, FRB } }, - -{ "fsqrt", A(63,22,0), AFRAFRC_MASK, PPCPWR2, { FRT, FRB } }, -{ "fsqrt.", A(63,22,1), AFRAFRC_MASK, PPCPWR2, { FRT, FRB } }, - -{ "fsel", A(63,23,0), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, -{ "fsel.", A(63,23,1), A_MASK, PPC, { FRT,FRA,FRC,FRB } }, - -{ "fre", A(63,24,0), AFRALFRC_MASK, POWER5, { FRT, FRB, A_L } }, -{ "fre.", A(63,24,1), AFRALFRC_MASK, POWER5, { FRT, FRB, A_L } }, - -{ "fmul", A(63,25,0), AFRB_MASK, PPCCOM, { FRT, FRA, FRC } }, -{ "fm", A(63,25,0), AFRB_MASK, PWRCOM, { FRT, FRA, FRC } }, -{ "fmul.", A(63,25,1), AFRB_MASK, PPCCOM, { FRT, FRA, FRC } }, -{ "fm.", A(63,25,1), AFRB_MASK, PWRCOM, { FRT, FRA, FRC } }, - -{ "frsqrte", A(63,26,0), AFRALFRC_MASK, PPC, { FRT, FRB, A_L } }, -{ "frsqrte.",A(63,26,1), AFRALFRC_MASK, PPC, { FRT, FRB, A_L } }, - -{ "fmsub", A(63,28,0), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fms", A(63,28,0), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, -{ "fmsub.", A(63,28,1), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fms.", A(63,28,1), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, - -{ "fmadd", A(63,29,0), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fma", A(63,29,0), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, -{ "fmadd.", A(63,29,1), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fma.", A(63,29,1), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, - -{ "fnmsub", A(63,30,0), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fnms", A(63,30,0), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, -{ "fnmsub.", A(63,30,1), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fnms.", A(63,30,1), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, - -{ "fnmadd", A(63,31,0), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fnma", A(63,31,0), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, -{ "fnmadd.", A(63,31,1), A_MASK, PPCCOM, { FRT,FRA,FRC,FRB } }, -{ "fnma.", A(63,31,1), A_MASK, PWRCOM, { FRT,FRA,FRC,FRB } }, - -{ "fcmpo", X(63,32), X_MASK|(3<<21), COM, { BF, FRA, FRB } }, - -{ "dmulq", XRC(63,34,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "dmulq.", XRC(63,34,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "drrndq", ZRC(63,35,0), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, -{ "drrndq.", ZRC(63,35,1), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, - -{ "mtfsb1", XRC(63,38,0), XRARB_MASK, COM, { BT } }, -{ "mtfsb1.", XRC(63,38,1), XRARB_MASK, COM, { BT } }, - -{ "fneg", XRC(63,40,0), XRA_MASK, COM, { FRT, FRB } }, -{ "fneg.", XRC(63,40,1), XRA_MASK, COM, { FRT, FRB } }, - -{ "mcrfs", X(63,64), XRB_MASK|(3<<21)|(3<<16), COM, { BF, BFA } }, - -{ "dscliq", ZRC(63,66,0), Z_MASK, POWER6, { FRT, FRA, SH16 } }, -{ "dscliq.", ZRC(63,66,1), Z_MASK, POWER6, { FRT, FRA, SH16 } }, - -{ "dquaiq", ZRC(63,67,0), Z2_MASK, POWER6, { TE, FRT, FRB, RMC } }, -{ "dquaiq.", ZRC(63,67,1), Z2_MASK, POWER6, { FRT, FRA, FRB, RMC } }, - -{ "mtfsb0", XRC(63,70,0), XRARB_MASK, COM, { BT } }, -{ "mtfsb0.", XRC(63,70,1), XRARB_MASK, COM, { BT } }, - -{ "fmr", XRC(63,72,0), XRA_MASK, COM, { FRT, FRB } }, -{ "fmr.", XRC(63,72,1), XRA_MASK, COM, { FRT, FRB } }, - -{ "dscriq", ZRC(63,98,0), Z_MASK, POWER6, { FRT, FRA, SH16 } }, -{ "dscriq.", ZRC(63,98,1), Z_MASK, POWER6, { FRT, FRA, SH16 } }, - -{ "drintxq", ZRC(63,99,0), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, -{ "drintxq.",ZRC(63,99,1), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, - -{ "dcmpoq", X(63,130), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "mtfsfi", XRC(63,134,0), XWRA_MASK|(3<<21)|(1<<11), COM, { BFF, U, W } }, -{ "mtfsfi.", XRC(63,134,1), XWRA_MASK|(3<<21)|(1<<11), COM, { BFF, U, W } }, - -{ "fnabs", XRC(63,136,0), XRA_MASK, COM, { FRT, FRB } }, -{ "fnabs.", XRC(63,136,1), XRA_MASK, COM, { FRT, FRB } }, - -{ "dtstexq", X(63,162), X_MASK, POWER6, { BF, FRA, FRB } }, -{ "dtstdcq", Z(63,194), Z_MASK, POWER6, { BF, FRA, DCM } }, -{ "dtstdgq", Z(63,226), Z_MASK, POWER6, { BF, FRA, DGM } }, - -{ "drintnq", ZRC(63,227,0), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, -{ "drintnq.",ZRC(63,227,1), Z2_MASK, POWER6, { R, FRT, FRB, RMC } }, - -{ "dctqpq", XRC(63,258,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dctqpq.", XRC(63,258,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "fabs", XRC(63,264,0), XRA_MASK, COM, { FRT, FRB } }, -{ "fabs.", XRC(63,264,1), XRA_MASK, COM, { FRT, FRB } }, - -{ "dctfixq", XRC(63,290,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dctfixq.",XRC(63,290,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "ddedpdq", XRC(63,322,0), X_MASK, POWER6, { SP, FRT, FRB } }, -{ "ddedpdq.",XRC(63,322,1), X_MASK, POWER6, { SP, FRT, FRB } }, - -{ "dxexq", XRC(63,354,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dxexq.", XRC(63,354,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "frin", XRC(63,392,0), XRA_MASK, POWER5, { FRT, FRB } }, -{ "frin.", XRC(63,392,1), XRA_MASK, POWER5, { FRT, FRB } }, -{ "friz", XRC(63,424,0), XRA_MASK, POWER5, { FRT, FRB } }, -{ "friz.", XRC(63,424,1), XRA_MASK, POWER5, { FRT, FRB } }, -{ "frip", XRC(63,456,0), XRA_MASK, POWER5, { FRT, FRB } }, -{ "frip.", XRC(63,456,1), XRA_MASK, POWER5, { FRT, FRB } }, -{ "frim", XRC(63,488,0), XRA_MASK, POWER5, { FRT, FRB } }, -{ "frim.", XRC(63,488,1), XRA_MASK, POWER5, { FRT, FRB } }, - -{ "dsubq", XRC(63,514,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "dsubq.", XRC(63,514,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "ddivq", XRC(63,546,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "ddivq.", XRC(63,546,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -{ "mffs", XRC(63,583,0), XRARB_MASK, COM, { FRT } }, -{ "mffs.", XRC(63,583,1), XRARB_MASK, COM, { FRT } }, - -{ "dcmpuq", X(63,642), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "dtstsfq", X(63,674), X_MASK, POWER6, { BF, FRA, FRB } }, - -{ "mtfsf", XFL(63,711,0), XFL_MASK, COM, { FLM, FRB, XFL_L, W } }, -{ "mtfsf.", XFL(63,711,1), XFL_MASK, COM, { FLM, FRB, XFL_L, W } }, - -{ "drdpq", XRC(63,770,0), X_MASK, POWER6, { FRT, FRB } }, -{ "drdpq.", XRC(63,770,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "dcffixq", XRC(63,802,0), X_MASK, POWER6, { FRT, FRB } }, -{ "dcffixq.",XRC(63,802,1), X_MASK, POWER6, { FRT, FRB } }, - -{ "fctid", XRC(63,814,0), XRA_MASK, PPC64, { FRT, FRB } }, -{ "fctid.", XRC(63,814,1), XRA_MASK, PPC64, { FRT, FRB } }, - -{ "fctidz", XRC(63,815,0), XRA_MASK, PPC64, { FRT, FRB } }, -{ "fctidz.", XRC(63,815,1), XRA_MASK, PPC64, { FRT, FRB } }, - -{ "denbcdq", XRC(63,834,0), X_MASK, POWER6, { S, FRT, FRB } }, -{ "denbcdq.",XRC(63,834,1), X_MASK, POWER6, { S, FRT, FRB } }, - -{ "fcfid", XRC(63,846,0), XRA_MASK, PPC64, { FRT, FRB } }, -{ "fcfid.", XRC(63,846,1), XRA_MASK, PPC64, { FRT, FRB } }, - -{ "diexq", XRC(63,866,0), X_MASK, POWER6, { FRT, FRA, FRB } }, -{ "diexq.", XRC(63,866,1), X_MASK, POWER6, { FRT, FRA, FRB } }, - -}; - -const int powerpc_num_opcodes = - sizeof (powerpc_opcodes) / sizeof (powerpc_opcodes[0]); - -/* The macro table. This is only used by the assembler. */ - -/* The expressions of the form (-x ! 31) & (x | 31) have the value 0 - when x=0; 32-x when x is between 1 and 31; are negative if x is - negative; and are 32 or more otherwise. This is what you want - when, for instance, you are emulating a right shift by a - rotate-left-and-mask, because the underlying instructions support - shifts of size 0 but not shifts of size 32. By comparison, when - extracting x bits from some word you want to use just 32-x, because - the underlying instructions don't support extracting 0 bits but do - support extracting the whole word (32 bits in this case). */ - -const struct powerpc_macro powerpc_macros[] = { -{ "extldi", 4, PPC64, "rldicr %0,%1,%3,(%2)-1" }, -{ "extldi.", 4, PPC64, "rldicr. %0,%1,%3,(%2)-1" }, -{ "extrdi", 4, PPC64, "rldicl %0,%1,(%2)+(%3),64-(%2)" }, -{ "extrdi.", 4, PPC64, "rldicl. %0,%1,(%2)+(%3),64-(%2)" }, -{ "insrdi", 4, PPC64, "rldimi %0,%1,64-((%2)+(%3)),%3" }, -{ "insrdi.", 4, PPC64, "rldimi. %0,%1,64-((%2)+(%3)),%3" }, -{ "rotrdi", 3, PPC64, "rldicl %0,%1,(-(%2)!63)&((%2)|63),0" }, -{ "rotrdi.", 3, PPC64, "rldicl. %0,%1,(-(%2)!63)&((%2)|63),0" }, -{ "sldi", 3, PPC64, "rldicr %0,%1,%2,63-(%2)" }, -{ "sldi.", 3, PPC64, "rldicr. %0,%1,%2,63-(%2)" }, -{ "srdi", 3, PPC64, "rldicl %0,%1,(-(%2)!63)&((%2)|63),%2" }, -{ "srdi.", 3, PPC64, "rldicl. %0,%1,(-(%2)!63)&((%2)|63),%2" }, -{ "clrrdi", 3, PPC64, "rldicr %0,%1,0,63-(%2)" }, -{ "clrrdi.", 3, PPC64, "rldicr. %0,%1,0,63-(%2)" }, -{ "clrlsldi",4, PPC64, "rldic %0,%1,%3,(%2)-(%3)" }, -{ "clrlsldi.",4, PPC64, "rldic. %0,%1,%3,(%2)-(%3)" }, - -{ "extlwi", 4, PPCCOM, "rlwinm %0,%1,%3,0,(%2)-1" }, -{ "extlwi.", 4, PPCCOM, "rlwinm. %0,%1,%3,0,(%2)-1" }, -{ "extrwi", 4, PPCCOM, "rlwinm %0,%1,((%2)+(%3))&((%2)+(%3)<>32),32-(%2),31" }, -{ "extrwi.", 4, PPCCOM, "rlwinm. %0,%1,((%2)+(%3))&((%2)+(%3)<>32),32-(%2),31" }, -{ "inslwi", 4, PPCCOM, "rlwimi %0,%1,(-(%3)!31)&((%3)|31),%3,(%2)+(%3)-1" }, -{ "inslwi.", 4, PPCCOM, "rlwimi. %0,%1,(-(%3)!31)&((%3)|31),%3,(%2)+(%3)-1"}, -{ "insrwi", 4, PPCCOM, "rlwimi %0,%1,32-((%2)+(%3)),%3,(%2)+(%3)-1" }, -{ "insrwi.", 4, PPCCOM, "rlwimi. %0,%1,32-((%2)+(%3)),%3,(%2)+(%3)-1"}, -{ "rotrwi", 3, PPCCOM, "rlwinm %0,%1,(-(%2)!31)&((%2)|31),0,31" }, -{ "rotrwi.", 3, PPCCOM, "rlwinm. %0,%1,(-(%2)!31)&((%2)|31),0,31" }, -{ "slwi", 3, PPCCOM, "rlwinm %0,%1,%2,0,31-(%2)" }, -{ "sli", 3, PWRCOM, "rlinm %0,%1,%2,0,31-(%2)" }, -{ "slwi.", 3, PPCCOM, "rlwinm. %0,%1,%2,0,31-(%2)" }, -{ "sli.", 3, PWRCOM, "rlinm. %0,%1,%2,0,31-(%2)" }, -{ "srwi", 3, PPCCOM, "rlwinm %0,%1,(-(%2)!31)&((%2)|31),%2,31" }, -{ "sri", 3, PWRCOM, "rlinm %0,%1,(-(%2)!31)&((%2)|31),%2,31" }, -{ "srwi.", 3, PPCCOM, "rlwinm. %0,%1,(-(%2)!31)&((%2)|31),%2,31" }, -{ "sri.", 3, PWRCOM, "rlinm. %0,%1,(-(%2)!31)&((%2)|31),%2,31" }, -{ "clrrwi", 3, PPCCOM, "rlwinm %0,%1,0,0,31-(%2)" }, -{ "clrrwi.", 3, PPCCOM, "rlwinm. %0,%1,0,0,31-(%2)" }, -{ "clrlslwi",4, PPCCOM, "rlwinm %0,%1,%3,(%2)-(%3),31-(%3)" }, -{ "clrlslwi.",4, PPCCOM, "rlwinm. %0,%1,%3,(%2)-(%3),31-(%3)" }, -}; - -const int powerpc_num_macros = - sizeof (powerpc_macros) / sizeof (powerpc_macros[0]); - - -/* This file provides several disassembler functions, all of which use - the disassembler interface defined in dis-asm.h. Several functions - are provided because this file handles disassembly for the PowerPC - in both big and little endian mode and also for the POWER (RS/6000) - chip. */ - -static int print_insn_powerpc (bfd_vma, struct disassemble_info *, int, int); - -/* Determine which set of machines to disassemble for. PPC403/601 or - BookE. For convenience, also disassemble instructions supported - by the AltiVec vector unit. */ - -static int -powerpc_dialect (struct disassemble_info *info) -{ - int dialect = PPC_OPCODE_PPC; - - if (BFD_DEFAULT_TARGET_SIZE == 64) - dialect |= PPC_OPCODE_64; - - if (info->disassembler_options - && strstr (info->disassembler_options, "booke") != NULL) - dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_BOOKE64; - else if ((info->mach == bfd_mach_ppc_e500) - || (info->disassembler_options - && strstr (info->disassembler_options, "e500") != NULL)) - dialect |= (PPC_OPCODE_BOOKE - | PPC_OPCODE_SPE | PPC_OPCODE_ISEL - | PPC_OPCODE_EFS | PPC_OPCODE_BRLOCK - | PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK - | PPC_OPCODE_RFMCI); - else if (info->disassembler_options - && strstr (info->disassembler_options, "efs") != NULL) - dialect |= PPC_OPCODE_EFS; - else if (info->disassembler_options - && strstr (info->disassembler_options, "e300") != NULL) - dialect |= PPC_OPCODE_E300 | PPC_OPCODE_CLASSIC | PPC_OPCODE_COMMON; - else if (info->disassembler_options - && strstr (info->disassembler_options, "440") != NULL) - dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_32 - | PPC_OPCODE_440 | PPC_OPCODE_ISEL | PPC_OPCODE_RFMCI; - else - dialect |= (PPC_OPCODE_403 | PPC_OPCODE_601 | PPC_OPCODE_CLASSIC - | PPC_OPCODE_COMMON | PPC_OPCODE_ALTIVEC); - - if (info->disassembler_options - && strstr (info->disassembler_options, "power4") != NULL) - dialect |= PPC_OPCODE_POWER4; - - if (info->disassembler_options - && strstr (info->disassembler_options, "power5") != NULL) - dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5; - - if (info->disassembler_options - && strstr (info->disassembler_options, "cell") != NULL) - dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_CELL | PPC_OPCODE_ALTIVEC; - - if (info->disassembler_options - && strstr (info->disassembler_options, "power6") != NULL) - dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5 | PPC_OPCODE_POWER6 | PPC_OPCODE_ALTIVEC; - - if (info->disassembler_options - && strstr (info->disassembler_options, "any") != NULL) - dialect |= PPC_OPCODE_ANY; - - if (info->disassembler_options) - { - if (strstr (info->disassembler_options, "32") != NULL) - dialect &= ~PPC_OPCODE_64; - else if (strstr (info->disassembler_options, "64") != NULL) - dialect |= PPC_OPCODE_64; - } - - info->private_data = (char *) 0 + dialect; - return dialect; -} - -/* Qemu default */ -int -print_insn_ppc (bfd_vma memaddr, struct disassemble_info *info) -{ - int dialect = (char *) info->private_data - (char *) 0; - return print_insn_powerpc (memaddr, info, 1, dialect); -} - -/* Print a big endian PowerPC instruction. */ - -int -print_insn_big_powerpc (bfd_vma memaddr, struct disassemble_info *info) -{ - int dialect = (char *) info->private_data - (char *) 0; - return print_insn_powerpc (memaddr, info, 1, dialect); -} - -/* Print a little endian PowerPC instruction. */ - -int -print_insn_little_powerpc (bfd_vma memaddr, struct disassemble_info *info) -{ - int dialect = (char *) info->private_data - (char *) 0; - return print_insn_powerpc (memaddr, info, 0, dialect); -} - -/* Print a POWER (RS/6000) instruction. */ - -int -print_insn_rs6000 (bfd_vma memaddr, struct disassemble_info *info) -{ - return print_insn_powerpc (memaddr, info, 1, PPC_OPCODE_POWER); -} - -/* Extract the operand value from the PowerPC or POWER instruction. */ - -static long -operand_value_powerpc (const struct powerpc_operand *operand, - unsigned long insn, int dialect) -{ - long value; - int invalid; - /* Extract the value from the instruction. */ - if (operand->extract) - value = (*operand->extract) (insn, dialect, &invalid); - else - { - value = (insn >> operand->shift) & operand->bitm; - if ((operand->flags & PPC_OPERAND_SIGNED) != 0) - { - /* BITM is always some number of zeros followed by some - number of ones, followed by some numer of zeros. */ - unsigned long top = operand->bitm; - /* top & -top gives the rightmost 1 bit, so this - fills in any trailing zeros. */ - top |= (top & -top) - 1; - top &= ~(top >> 1); - value = (value ^ top) - top; - } - } - - return value; -} - -/* Determine whether the optional operand(s) should be printed. */ - -static int -skip_optional_operands (const unsigned char *opindex, - unsigned long insn, int dialect) -{ - const struct powerpc_operand *operand; - - for (; *opindex != 0; opindex++) - { - operand = &powerpc_operands[*opindex]; - if ((operand->flags & PPC_OPERAND_NEXT) != 0 - || ((operand->flags & PPC_OPERAND_OPTIONAL) != 0 - && operand_value_powerpc (operand, insn, dialect) != 0)) - return 0; - } - - return 1; -} - -bfd_vma bfd_getl32 (const bfd_byte *addr) -{ - unsigned long v; - - v = (unsigned long) addr[0]; - v |= (unsigned long) addr[1] << 8; - v |= (unsigned long) addr[2] << 16; - v |= (unsigned long) addr[3] << 24; - return (bfd_vma) v; -} - -bfd_vma bfd_getb32 (const bfd_byte *addr) -{ - unsigned long v; - - v = (unsigned long) addr[0] << 24; - v |= (unsigned long) addr[1] << 16; - v |= (unsigned long) addr[2] << 8; - v |= (unsigned long) addr[3]; - return (bfd_vma) v; -} - -/* Get LENGTH bytes from info's buffer, at target address memaddr. - Transfer them to myaddr. */ -int -buffer_read_memory(bfd_vma memaddr, bfd_byte *myaddr, int length, - struct disassemble_info *info) -{ - if (memaddr < info->buffer_vma - || memaddr + length > info->buffer_vma + info->buffer_length) - /* Out of bounds. Use EIO because GDB uses it. */ - return EIO; - memcpy (myaddr, info->buffer + (memaddr - info->buffer_vma), length); - return 0; -} - -/* Print an error message. We can assume that this is in response to - an error return from buffer_read_memory. */ -void -perror_memory (int status, bfd_vma memaddr, struct disassemble_info *info) -{ - if (status != EIO) - /* Can't happen. */ - (*info->fprintf_func) (info->stream, "Unknown error %d\n", status); - else - /* Actually, address between memaddr and memaddr + len was - out of bounds. */ - (*info->fprintf_func) (info->stream, - "Address 0x%" PRIx64 " is out of bounds.\n", memaddr); -} - -/* This could be in a separate file, to save miniscule amounts of space - in statically linked executables. */ - -/* Just print the address is hex. This is included for completeness even - though both GDB and objdump provide their own (to print symbolic - addresses). */ - -void -generic_print_address (bfd_vma addr, struct disassemble_info *info) -{ - (*info->fprintf_func) (info->stream, "0x%" PRIx64, addr); -} - -/* Just return the given address. */ - -int -generic_symbol_at_address (bfd_vma addr, struct disassemble_info *info) -{ - return 1; -} - -/* Print a PowerPC or POWER instruction. */ - -static int -print_insn_powerpc (bfd_vma memaddr, - struct disassemble_info *info, - int bigendian, - int dialect) -{ - bfd_byte buffer[4]; - int status; - unsigned long insn; - const struct powerpc_opcode *opcode; - const struct powerpc_opcode *opcode_end; - unsigned long op; - - if (dialect == 0) - dialect = powerpc_dialect (info); - - status = (*info->read_memory_func) (memaddr, buffer, 4, info); - if (status != 0) - { - (*info->memory_error_func) (status, memaddr, info); - return -1; - } - - if (bigendian) - insn = bfd_getb32 (buffer); - else - insn = bfd_getl32 (buffer); - - /* Get the major opcode of the instruction. */ - op = PPC_OP (insn); - - /* Find the first match in the opcode table. We could speed this up - a bit by doing a binary search on the major opcode. */ - opcode_end = powerpc_opcodes + powerpc_num_opcodes; - again: - for (opcode = powerpc_opcodes; opcode < opcode_end; opcode++) - { - unsigned long table_op; - const unsigned char *opindex; - const struct powerpc_operand *operand; - int invalid; - int need_comma; - int need_paren; - int skip_optional; - - table_op = PPC_OP (opcode->opcode); - if (op < table_op) - break; - if (op > table_op) - continue; - - if ((insn & opcode->mask) != opcode->opcode - || (opcode->flags & dialect) == 0) - continue; - - /* Make two passes over the operands. First see if any of them - have extraction functions, and, if they do, make sure the - instruction is valid. */ - invalid = 0; - for (opindex = opcode->operands; *opindex != 0; opindex++) - { - operand = powerpc_operands + *opindex; - if (operand->extract) - (*operand->extract) (insn, dialect, &invalid); - } - if (invalid) - continue; - - /* The instruction is valid. */ - if (opcode->operands[0] != 0) - (*info->fprintf_func) (info->stream, "%-7s ", opcode->name); - else - (*info->fprintf_func) (info->stream, "%s", opcode->name); - - /* Now extract and print the operands. */ - need_comma = 0; - need_paren = 0; - skip_optional = -1; - for (opindex = opcode->operands; *opindex != 0; opindex++) - { - long value; - - operand = powerpc_operands + *opindex; - - /* Operands that are marked FAKE are simply ignored. We - already made sure that the extract function considered - the instruction to be valid. */ - if ((operand->flags & PPC_OPERAND_FAKE) != 0) - continue; - - /* If all of the optional operands have the value zero, - then don't print any of them. */ - if ((operand->flags & PPC_OPERAND_OPTIONAL) != 0) - { - if (skip_optional < 0) - skip_optional = skip_optional_operands (opindex, insn, - dialect); - if (skip_optional) - continue; - } - - value = operand_value_powerpc (operand, insn, dialect); - - if (need_comma) - { - (*info->fprintf_func) (info->stream, ","); - need_comma = 0; - } - - /* Print the operand as directed by the flags. */ - if ((operand->flags & PPC_OPERAND_GPR) != 0 - || ((operand->flags & PPC_OPERAND_GPR_0) != 0 && value != 0)) - (*info->fprintf_func) (info->stream, "r%ld", value); - else if ((operand->flags & PPC_OPERAND_FPR) != 0) - (*info->fprintf_func) (info->stream, "f%ld", value); - else if ((operand->flags & PPC_OPERAND_VR) != 0) - (*info->fprintf_func) (info->stream, "v%ld", value); - else if ((operand->flags & PPC_OPERAND_RELATIVE) != 0) - (*info->print_address_func) (memaddr + value, info); - else if ((operand->flags & PPC_OPERAND_ABSOLUTE) != 0) - (*info->print_address_func) ((bfd_vma) value & 0xffffffff, info); - else if ((operand->flags & PPC_OPERAND_CR) == 0 - || (dialect & PPC_OPCODE_PPC) == 0) - (*info->fprintf_func) (info->stream, "%ld", value); - else - { - if (operand->bitm == 7) - (*info->fprintf_func) (info->stream, "cr%ld", value); - else - { - static const char *cbnames[4] = { "lt", "gt", "eq", "so" }; - int cr; - int cc; - - cr = value >> 2; - if (cr != 0) - (*info->fprintf_func) (info->stream, "4*cr%d+", cr); - cc = value & 3; - (*info->fprintf_func) (info->stream, "%s", cbnames[cc]); - } - } - - if (need_paren) - { - (*info->fprintf_func) (info->stream, ")"); - need_paren = 0; - } - - if ((operand->flags & PPC_OPERAND_PARENS) == 0) - need_comma = 1; - else - { - (*info->fprintf_func) (info->stream, "("); - need_paren = 1; - } - } - - /* We have found and printed an instruction; return. */ - return 4; - } - - if ((dialect & PPC_OPCODE_ANY) != 0) - { - dialect = ~PPC_OPCODE_ANY; - goto again; - } - - /* We could not find a match. */ - (*info->fprintf_func) (info->stream, ".long 0x%lx", insn); - - return 4; -} diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp deleted file mode 100644 index 7d6a599c8..000000000 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ /dev/null @@ -1,1235 +0,0 @@ -/* - * sheepshaver_glue.cpp - Glue Kheperix CPU to SheepShaver CPU engine interface - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "xlowmem.h" -#include "emul_op.h" -#include "rom_patches.h" -#include "macos_util.h" -#include "block-alloc.hpp" -#include "sigsegv.h" -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-operations.hpp" -#include "cpu/ppc/ppc-instructions.hpp" -#include "thunks.h" - -// Used for NativeOp trampolines -#include "video.h" -#include "name_registry.h" -#include "serial.h" -#include "ether.h" -#include "timer.h" - -#include -#include -#ifdef HAVE_MALLOC_H -#include -#endif - -#ifdef USE_SDL_VIDEO -#include -#endif - -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -#define DEBUG 0 -#include "debug.h" - -extern "C" { -#include "dis-asm.h" -} - -// Emulation time statistics -#ifndef EMUL_TIME_STATS -#define EMUL_TIME_STATS 0 -#endif - -#if EMUL_TIME_STATS -static clock_t emul_start_time; -static uint32 interrupt_count = 0, ppc_interrupt_count = 0; -static clock_t interrupt_time = 0; -static uint32 exec68k_count = 0; -static clock_t exec68k_time = 0; -static uint32 native_exec_count = 0; -static clock_t native_exec_time = 0; -static uint32 macos_exec_count = 0; -static clock_t macos_exec_time = 0; -#endif - -static void enter_mon(void) -{ - // Start up mon in real-mode -#if ENABLE_MON - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif -} - -// From main_*.cpp -extern uintptr SignalStackBase(); - -// From rsrc_patches.cpp -extern "C" void check_load_invoc(uint32 type, int16 id, uint32 h); -extern "C" void named_check_load_invoc(uint32 type, uint32 name, uint32 h); - -// PowerPC EmulOp to exit from emulation looop -const uint32 POWERPC_EXEC_RETURN = POWERPC_EMUL_OP | 1; - -// Enable Execute68k() safety checks? -#define SAFE_EXEC_68K 1 - -// Save FP state in Execute68k()? -#define SAVE_FP_EXEC_68K 1 - -// Interrupts in EMUL_OP mode? -#define INTERRUPTS_IN_EMUL_OP_MODE 1 - -// Interrupts in native mode? -#define INTERRUPTS_IN_NATIVE_MODE 1 - -// Pointer to Kernel Data -static KernelData * kernel_data; - -// SIGSEGV handler -sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t); - -#if PPC_ENABLE_JIT && PPC_REENTRANT_JIT -// Special trampolines for EmulOp and NativeOp -static uint8 *emul_op_trampoline; -static uint8 *native_op_trampoline; -#endif - - -/** - * PowerPC emulator glue with special 'sheep' opcodes - **/ - -enum { - PPC_I(SHEEP) = PPC_I(MAX), - PPC_I(SHEEP_MAX) -}; - -class sheepshaver_cpu - : public powerpc_cpu -{ - void init_decoder(); - void execute_sheep(uint32 opcode); - -public: - - // Constructor - sheepshaver_cpu(); - - // CR & XER accessors - uint32 get_cr() const { return cr().get(); } - void set_cr(uint32 v) { cr().set(v); } - uint32 get_xer() const { return xer().get(); } - void set_xer(uint32 v) { xer().set(v); } - - // Execute NATIVE_OP routine - void execute_native_op(uint32 native_op); - - // Execute EMUL_OP routine - void execute_emul_op(uint32 emul_op); - - // Execute 68k routine - void execute_68k(uint32 entry, M68kRegisters *r); - - // Execute ppc routine - void execute_ppc(uint32 entry); - - // Execute MacOS/PPC code - uint32 execute_macos_code(uint32 tvect, int nargs, uint32 const *args); - -#if PPC_ENABLE_JIT - // Compile one instruction - virtual int compile1(codegen_context_t & cg_context); -#endif - // Resource manager thunk - void get_resource(uint32 old_get_resource); - - // Handle MacOS interrupt - void interrupt(uint32 entry); - - // Make sure the SIGSEGV handler can access CPU registers - friend sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip); -}; - -sheepshaver_cpu::sheepshaver_cpu() -{ - init_decoder(); - -#if PPC_ENABLE_JIT - if (PrefsFindBool("jit")) - enable_jit(); -#endif -} - -void sheepshaver_cpu::init_decoder() -{ - static const instr_info_t sheep_ii_table[] = { - { "sheep", - (execute_pmf)&sheepshaver_cpu::execute_sheep, - PPC_I(SHEEP), - D_form, 6, 0, CFLOW_JUMP | CFLOW_TRAP - } - }; - - const int ii_count = sizeof(sheep_ii_table)/sizeof(sheep_ii_table[0]); - D(bug("SheepShaver extra decode table has %d entries\n", ii_count)); - - for (int i = 0; i < ii_count; i++) { - const instr_info_t * ii = &sheep_ii_table[i]; - init_decoder_entry(ii); - } -} - -/* NativeOp instruction format: - +------------+-------------------------+--+-----------+------------+ - | 6 | |FN| OP | 2 | - +------------+-------------------------+--+-----------+------------+ - 0 5 |6 18 19 20 25 26 31 -*/ - -typedef bit_field< 19, 19 > FN_field; -typedef bit_field< 20, 25 > NATIVE_OP_field; -typedef bit_field< 26, 31 > EMUL_OP_field; - -// Execute EMUL_OP routine -void sheepshaver_cpu::execute_emul_op(uint32 emul_op) -{ - M68kRegisters r68; - WriteMacInt32(XLM_68K_R25, gpr(25)); - WriteMacInt32(XLM_RUN_MODE, MODE_EMUL_OP); - for (int i = 0; i < 8; i++) - r68.d[i] = gpr(8 + i); - for (int i = 0; i < 7; i++) - r68.a[i] = gpr(16 + i); - r68.a[7] = gpr(1); - uint32 saved_cr = get_cr() & 0xff9fffff; // mask_operand::compute(11, 8) - uint32 saved_xer = get_xer(); - EmulOp(&r68, gpr(24), emul_op); - set_cr(saved_cr); - set_xer(saved_xer); - for (int i = 0; i < 8; i++) - gpr(8 + i) = r68.d[i]; - for (int i = 0; i < 7; i++) - gpr(16 + i) = r68.a[i]; - gpr(1) = r68.a[7]; - WriteMacInt32(XLM_RUN_MODE, MODE_68K); -} - -// Execute SheepShaver instruction -void sheepshaver_cpu::execute_sheep(uint32 opcode) -{ -// D(bug("Extended opcode %08x at %08x (68k pc %08x)\n", opcode, pc(), gpr(24))); - assert((((opcode >> 26) & 0x3f) == 6) && OP_MAX <= 64 + 3); - - switch (opcode & 0x3f) { - case 0: // EMUL_RETURN - QuitEmulator(); - break; - - case 1: // EXEC_RETURN - spcflags().set(SPCFLAG_CPU_EXEC_RETURN); - break; - - case 2: // EXEC_NATIVE - execute_native_op(NATIVE_OP_field::extract(opcode)); - if (FN_field::test(opcode)) - pc() = lr(); - else - pc() += 4; - break; - - default: // EMUL_OP - execute_emul_op(EMUL_OP_field::extract(opcode) - 3); - pc() += 4; - break; - } -} - -// Compile one instruction -#if PPC_ENABLE_JIT -int sheepshaver_cpu::compile1(codegen_context_t & cg_context) -{ - const instr_info_t *ii = cg_context.instr_info; - if (ii->mnemo != PPC_I(SHEEP)) - return COMPILE_FAILURE; - - int status = COMPILE_FAILURE; - powerpc_dyngen & dg = cg_context.codegen; - uint32 opcode = cg_context.opcode; - - switch (opcode & 0x3f) { - case 0: // EMUL_RETURN - dg.gen_invoke(QuitEmulator); - status = COMPILE_CODE_OK; - break; - - case 1: // EXEC_RETURN - dg.gen_spcflags_set(SPCFLAG_CPU_EXEC_RETURN); - // Don't check for pending interrupts, we do know we have to - // get out of this block ASAP - dg.gen_exec_return(); - status = COMPILE_EPILOGUE_OK; - break; - - case 2: { // EXEC_NATIVE - uint32 selector = NATIVE_OP_field::extract(opcode); - switch (selector) { -#if !PPC_REENTRANT_JIT - // Filter out functions that may invoke Execute68k() or - // CallMacOS(), this would break reentrancy as they could - // invalidate the translation cache and even overwrite - // continuation code when we are done with them. - case NATIVE_PATCH_NAME_REGISTRY: - dg.gen_invoke(DoPatchNameRegistry); - status = COMPILE_CODE_OK; - break; - case NATIVE_VIDEO_INSTALL_ACCEL: - dg.gen_invoke(VideoInstallAccel); - status = COMPILE_CODE_OK; - break; - case NATIVE_VIDEO_VBL: - dg.gen_invoke(VideoVBL); - status = COMPILE_CODE_OK; - break; - case NATIVE_GET_RESOURCE: - case NATIVE_GET_1_RESOURCE: - case NATIVE_GET_IND_RESOURCE: - case NATIVE_GET_1_IND_RESOURCE: - case NATIVE_R_GET_RESOURCE: { - static const uint32 get_resource_ptr[] = { - XLM_GET_RESOURCE, - XLM_GET_1_RESOURCE, - XLM_GET_IND_RESOURCE, - XLM_GET_1_IND_RESOURCE, - XLM_R_GET_RESOURCE - }; - uint32 old_get_resource = ReadMacInt32(get_resource_ptr[selector - NATIVE_GET_RESOURCE]); - typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::get_resource).ptr(); - dg.gen_invoke_CPU_im(func, old_get_resource); - status = COMPILE_CODE_OK; - break; - } -#endif - case NATIVE_CHECK_LOAD_INVOC: - dg.gen_load_T0_GPR(3); - dg.gen_load_T1_GPR(4); - dg.gen_se_16_32_T1(); - dg.gen_load_T2_GPR(5); - dg.gen_invoke_T0_T1_T2((void (*)(uint32, uint32, uint32))check_load_invoc); - status = COMPILE_CODE_OK; - break; - case NATIVE_NAMED_CHECK_LOAD_INVOC: - dg.gen_load_T0_GPR(3); - dg.gen_load_T1_GPR(4); - dg.gen_load_T2_GPR(5); - dg.gen_invoke_T0_T1_T2((void (*)(uint32, uint32, uint32))named_check_load_invoc); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_SYNC_HOOK: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_sync_hook); - dg.gen_store_T0_GPR(3); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_BITBLT_HOOK: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_bitblt_hook); - dg.gen_store_T0_GPR(3); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_FILLRECT_HOOK: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_fillrect_hook); - dg.gen_store_T0_GPR(3); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_UNKNOWN_HOOK: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_unknown_hook); - dg.gen_store_T0_GPR(3); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_BITBLT: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0((void (*)(uint32))NQD_bitblt); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_INVRECT: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0((void (*)(uint32))NQD_invrect); - status = COMPILE_CODE_OK; - break; - case NATIVE_NQD_FILLRECT: - dg.gen_load_T0_GPR(3); - dg.gen_invoke_T0((void (*)(uint32))NQD_fillrect); - status = COMPILE_CODE_OK; - break; - } - // Could we fully translate this NativeOp? - if (status == COMPILE_CODE_OK) { - if (!FN_field::test(opcode)) - cg_context.done_compile = false; - else { - dg.gen_load_T0_LR_aligned(); - dg.gen_set_PC_T0(); - cg_context.done_compile = true; - } - break; - } -#if PPC_REENTRANT_JIT - // Try to execute NativeOp trampoline - if (!FN_field::test(opcode)) - dg.gen_set_PC_im(cg_context.pc + 4); - else { - dg.gen_load_T0_LR_aligned(); - dg.gen_set_PC_T0(); - } - dg.gen_mov_32_T0_im(selector); - dg.gen_jmp(native_op_trampoline); - cg_context.done_compile = true; - status = COMPILE_EPILOGUE_OK; - break; -#endif - // Invoke NativeOp handler - if (!FN_field::test(opcode)) { - typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_native_op).ptr(); - dg.gen_invoke_CPU_im(func, selector); - cg_context.done_compile = false; - status = COMPILE_CODE_OK; - } - // Otherwise, let it generate a call to execute_sheep() which - // will cause necessary updates to the program counter - break; - } - - default: { // EMUL_OP - uint32 emul_op = EMUL_OP_field::extract(opcode) - 3; -#if PPC_REENTRANT_JIT - // Try to execute EmulOp trampoline - dg.gen_set_PC_im(cg_context.pc + 4); - dg.gen_mov_32_T0_im(emul_op); - dg.gen_jmp(emul_op_trampoline); - cg_context.done_compile = true; - status = COMPILE_EPILOGUE_OK; - break; -#endif - // Invoke EmulOp handler - typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_emul_op).ptr(); - dg.gen_invoke_CPU_im(func, emul_op); - cg_context.done_compile = false; - status = COMPILE_CODE_OK; - break; - } - } - return status; -} -#endif - -// Handle MacOS interrupt -void sheepshaver_cpu::interrupt(uint32 entry) -{ -#if EMUL_TIME_STATS - ppc_interrupt_count++; - const clock_t interrupt_start = clock(); -#endif - - // Save program counters and branch registers - uint32 saved_pc = pc(); - uint32 saved_lr = lr(); - uint32 saved_ctr= ctr(); - uint32 saved_sp = gpr(1); - - // Initialize stack pointer to SheepShaver alternate stack base - gpr(1) = SignalStackBase() - 64; - - // Build trampoline to return from interrupt - SheepVar32 trampoline = POWERPC_EXEC_RETURN; - - // Prepare registers for nanokernel interrupt routine - kernel_data->v[0x004 >> 2] = htonl(gpr(1)); - kernel_data->v[0x018 >> 2] = htonl(gpr(6)); - - gpr(6) = ntohl(kernel_data->v[0x65c >> 2]); - assert(gpr(6) != 0); - WriteMacInt32(gpr(6) + 0x13c, gpr(7)); - WriteMacInt32(gpr(6) + 0x144, gpr(8)); - WriteMacInt32(gpr(6) + 0x14c, gpr(9)); - WriteMacInt32(gpr(6) + 0x154, gpr(10)); - WriteMacInt32(gpr(6) + 0x15c, gpr(11)); - WriteMacInt32(gpr(6) + 0x164, gpr(12)); - WriteMacInt32(gpr(6) + 0x16c, gpr(13)); - - gpr(1) = KernelDataAddr; - gpr(7) = ntohl(kernel_data->v[0x660 >> 2]); - gpr(8) = 0; - gpr(10) = trampoline.addr(); - gpr(12) = trampoline.addr(); - gpr(13) = get_cr(); - - // rlwimi. r7,r7,8,0,0 - uint32 result = op_ppc_rlwimi::apply(gpr(7), 8, 0x80000000, gpr(7)); - record_cr0(result); - gpr(7) = result; - - gpr(11) = 0xf072; // MSR (SRR1) - cr().set((gpr(11) & 0x0fff0000) | (get_cr() & ~0x0fff0000)); - - // Enter nanokernel - execute(entry); - - // Restore program counters and branch registers - pc() = saved_pc; - lr() = saved_lr; - ctr()= saved_ctr; - gpr(1) = saved_sp; - -#if EMUL_TIME_STATS - interrupt_time += (clock() - interrupt_start); -#endif -} - -// Execute 68k routine -void sheepshaver_cpu::execute_68k(uint32 entry, M68kRegisters *r) -{ -#if EMUL_TIME_STATS - exec68k_count++; - const clock_t exec68k_start = clock(); -#endif - -#if SAFE_EXEC_68K - if (ReadMacInt32(XLM_RUN_MODE) != MODE_EMUL_OP) - printf("FATAL: Execute68k() not called from EMUL_OP mode\n"); -#endif - - // Save program counters and branch registers - uint32 saved_pc = pc(); - uint32 saved_lr = lr(); - uint32 saved_ctr= ctr(); - uint32 saved_cr = get_cr(); - - // Create MacOS stack frame - // FIXME: make sure MacOS doesn't expect PPC registers to live on top - uint32 sp = gpr(1); - gpr(1) -= 56; - WriteMacInt32(gpr(1), sp); - - // Save PowerPC registers - uint32 saved_GPRs[19]; - memcpy(&saved_GPRs[0], &gpr(13), sizeof(uint32)*(32-13)); -#if SAVE_FP_EXEC_68K - double saved_FPRs[18]; - memcpy(&saved_FPRs[0], &fpr(14), sizeof(double)*(32-14)); -#endif - - // Setup registers for 68k emulator - cr().set(CR_SO_field<2>::mask()); // Supervisor mode - for (int i = 0; i < 8; i++) // d[0]..d[7] - gpr(8 + i) = r->d[i]; - for (int i = 0; i < 7; i++) // a[0]..a[6] - gpr(16 + i) = r->a[i]; - gpr(23) = 0; - gpr(24) = entry; - gpr(25) = ReadMacInt32(XLM_68K_R25); // MSB of SR - gpr(26) = 0; - gpr(28) = 0; // VBR - gpr(29) = ntohl(kernel_data->ed.v[0x74 >> 2]); // Pointer to opcode table - gpr(30) = ntohl(kernel_data->ed.v[0x78 >> 2]); // Address of emulator - gpr(31) = KernelDataAddr + 0x1000; - - // Push return address (points to EXEC_RETURN opcode) on stack - gpr(1) -= 4; - WriteMacInt32(gpr(1), XLM_EXEC_RETURN_OPCODE); - - // Rentering 68k emulator - WriteMacInt32(XLM_RUN_MODE, MODE_68K); - - // Set r0 to 0 for 68k emulator - gpr(0) = 0; - - // Execute 68k opcode - uint32 opcode = ReadMacInt16(gpr(24)); - gpr(27) = (int32)(int16)ReadMacInt16(gpr(24) += 2); - gpr(29) += opcode * 8; - execute(gpr(29)); - - // Save r25 (contains current 68k interrupt level) - WriteMacInt32(XLM_68K_R25, gpr(25)); - - // Reentering EMUL_OP mode - WriteMacInt32(XLM_RUN_MODE, MODE_EMUL_OP); - - // Save 68k registers - for (int i = 0; i < 8; i++) // d[0]..d[7] - r->d[i] = gpr(8 + i); - for (int i = 0; i < 7; i++) // a[0]..a[6] - r->a[i] = gpr(16 + i); - - // Restore PowerPC registers - memcpy(&gpr(13), &saved_GPRs[0], sizeof(uint32)*(32-13)); -#if SAVE_FP_EXEC_68K - memcpy(&fpr(14), &saved_FPRs[0], sizeof(double)*(32-14)); -#endif - - // Cleanup stack - gpr(1) += 56; - - // Restore program counters and branch registers - pc() = saved_pc; - lr() = saved_lr; - ctr()= saved_ctr; - set_cr(saved_cr); - -#if EMUL_TIME_STATS - exec68k_time += (clock() - exec68k_start); -#endif -} - -// Call MacOS PPC code -uint32 sheepshaver_cpu::execute_macos_code(uint32 tvect, int nargs, uint32 const *args) -{ -#if EMUL_TIME_STATS - macos_exec_count++; - const clock_t macos_exec_start = clock(); -#endif - - // Save program counters and branch registers - uint32 saved_pc = pc(); - uint32 saved_lr = lr(); - uint32 saved_ctr= ctr(); - - // Build trampoline with EXEC_RETURN - SheepVar32 trampoline = POWERPC_EXEC_RETURN; - lr() = trampoline.addr(); - - gpr(1) -= 64; // Create stack frame - uint32 proc = ReadMacInt32(tvect); // Get routine address - uint32 toc = ReadMacInt32(tvect + 4); // Get TOC pointer - - // Save PowerPC registers - uint32 regs[8]; - regs[0] = gpr(2); - for (int i = 0; i < nargs; i++) - regs[i + 1] = gpr(i + 3); - - // Prepare and call MacOS routine - gpr(2) = toc; - for (int i = 0; i < nargs; i++) - gpr(i + 3) = args[i]; - execute(proc); - uint32 retval = gpr(3); - - // Restore PowerPC registers - for (int i = 0; i <= nargs; i++) - gpr(i + 2) = regs[i]; - - // Cleanup stack - gpr(1) += 64; - - // Restore program counters and branch registers - pc() = saved_pc; - lr() = saved_lr; - ctr()= saved_ctr; - -#if EMUL_TIME_STATS - macos_exec_time += (clock() - macos_exec_start); -#endif - - return retval; -} - -// Execute ppc routine -inline void sheepshaver_cpu::execute_ppc(uint32 entry) -{ - // Save branch registers - uint32 saved_lr = lr(); - - SheepVar32 trampoline = POWERPC_EXEC_RETURN; - WriteMacInt32(trampoline.addr(), POWERPC_EXEC_RETURN); - lr() = trampoline.addr(); - - execute(entry); - - // Restore branch registers - lr() = saved_lr; -} - -// Resource Manager thunk -inline void sheepshaver_cpu::get_resource(uint32 old_get_resource) -{ - uint32 type = gpr(3); - int16 id = gpr(4); - - // Create stack frame - gpr(1) -= 56; - - // Call old routine - execute_ppc(old_get_resource); - - // Call CheckLoad() - uint32 handle = gpr(3); - check_load_invoc(type, id, handle); - gpr(3) = handle; - - // Cleanup stack - gpr(1) += 56; -} - - -/** - * SheepShaver CPU engine interface - **/ - -// PowerPC CPU emulator -static sheepshaver_cpu *ppc_cpu = NULL; - -void FlushCodeCache(uintptr start, uintptr end) -{ - D(bug("FlushCodeCache(%08x, %08x)\n", start, end)); - ppc_cpu->invalidate_cache_range(start, end); -} - -// Dump PPC registers -static void dump_registers(void) -{ - ppc_cpu->dump_registers(); -} - -// Dump log -static void dump_log(void) -{ - ppc_cpu->dump_log(); -} - -static int read_mem(bfd_vma memaddr, bfd_byte *myaddr, int length, struct disassemble_info *info) -{ - Mac2Host_memcpy(myaddr, memaddr, length); - return 0; -} - -static void dump_disassembly(const uint32 pc, const int prefix_count, const int suffix_count) -{ - struct disassemble_info info; - INIT_DISASSEMBLE_INFO(info, stderr, fprintf); - info.read_memory_func = read_mem; - - const int count = prefix_count + suffix_count + 1; - const uint32 base_addr = pc - prefix_count * 4; - for (int i = 0; i < count; i++) { - const bfd_vma addr = base_addr + i * 4; - fprintf(stderr, "%s0x%8llx: ", addr == pc ? " >" : " ", addr); - print_insn_ppc(addr, &info); - fprintf(stderr, "\n"); - } -} - -sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) -{ -#if ENABLE_VOSF - // Handle screen fault - extern bool Screen_fault_handler(sigsegv_info_t *sip); - if (Screen_fault_handler(sip)) - return SIGSEGV_RETURN_SUCCESS; -#endif - - const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); -#if HAVE_SIGSEGV_SKIP_INSTRUCTION - // Ignore writes to ROM - if ((addr - (uintptr)ROMBaseHost) < ROM_SIZE) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // Get program counter of target CPU - sheepshaver_cpu * const cpu = ppc_cpu; - const uint32 pc = cpu->pc(); - - // Fault in Mac ROM or RAM? - bool mac_fault = (pc >= ROMBase) && (pc < (ROMBase + ROM_AREA_SIZE)) || (pc >= RAMBase) && (pc < (RAMBase + RAMSize)) || (pc >= DR_CACHE_BASE && pc < (DR_CACHE_BASE + DR_CACHE_SIZE)); - if (mac_fault) { - - // "VM settings" during MacOS 8 installation - if (pc == ROMBase + 0x488160 && cpu->gpr(20) == 0xf8000000) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // MacOS 8.5 installation - else if (pc == ROMBase + 0x488140 && cpu->gpr(16) == 0xf8000000) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // MacOS 8 serial drivers on startup - else if (pc == ROMBase + 0x48e080 && (cpu->gpr(8) == 0xf3012002 || cpu->gpr(8) == 0xf3012000)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // MacOS 8.1 serial drivers on startup - else if (pc == ROMBase + 0x48c5e0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - else if (pc == ROMBase + 0x4a10a0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM) - else if ((pc - DR_CACHE_BASE) < DR_CACHE_SIZE && (cpu->gpr(16) == 0xf3012002 || cpu->gpr(16) == 0xf3012000)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - else if ((pc - DR_CACHE_BASE) < DR_CACHE_SIZE && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // Ignore writes to the zero page - else if ((uint32)(addr - SheepMem::ZeroPage()) < (uint32)SheepMem::PageSize()) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - - // Ignore all other faults, if requested - if (PrefsFindBool("ignoresegv")) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - } -#else -#error "FIXME: You don't have the capability to skip instruction within signal handlers" -#endif - - fprintf(stderr, "SIGSEGV\n"); - fprintf(stderr, " pc %p\n", sigsegv_get_fault_instruction_address(sip)); - fprintf(stderr, " ea %p\n", sigsegv_get_fault_address(sip)); - dump_registers(); - ppc_cpu->dump_log(); - dump_disassembly(pc, 8, 8); - - enter_mon(); - QuitEmulator(); - - return SIGSEGV_RETURN_FAILURE; -} - -/* - * Initialize CPU emulation - */ - -void init_emul_ppc(void) -{ - // Get pointer to KernelData in host address space - kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE); - - // Initialize main CPU emulator - ppc_cpu = new sheepshaver_cpu(); - ppc_cpu->set_register(powerpc_registers::GPR(3), any_register((uint32)ROMBase + 0x30d000)); - ppc_cpu->set_register(powerpc_registers::GPR(4), any_register(KernelDataAddr + 0x1000)); - WriteMacInt32(XLM_RUN_MODE, MODE_68K); - -#if ENABLE_MON - // Install "regs" command in cxmon - mon_add_command("regs", dump_registers, "regs Dump PowerPC registers\n"); - mon_add_command("log", dump_log, "log Dump PowerPC emulation log\n"); -#endif - -#if EMUL_TIME_STATS - emul_start_time = clock(); -#endif -} - -/* - * Deinitialize emulation - */ - -void exit_emul_ppc(void) -{ -#if EMUL_TIME_STATS - clock_t emul_end_time = clock(); - - printf("### Statistics for SheepShaver emulation parts\n"); - const clock_t emul_time = emul_end_time - emul_start_time; - printf("Total emulation time : %.1f sec\n", double(emul_time) / double(CLOCKS_PER_SEC)); - printf("Total interrupt count: %d (%2.1f Hz)\n", interrupt_count, - (double(interrupt_count) * CLOCKS_PER_SEC) / double(emul_time)); - printf("Total ppc interrupt count: %d (%2.1f %%)\n", ppc_interrupt_count, - (double(ppc_interrupt_count) * 100.0) / double(interrupt_count)); - -#define PRINT_STATS(LABEL, VAR_PREFIX) do { \ - printf("Total " LABEL " count : %d\n", VAR_PREFIX##_count); \ - printf("Total " LABEL " time : %.1f sec (%.1f%%)\n", \ - double(VAR_PREFIX##_time) / double(CLOCKS_PER_SEC), \ - 100.0 * double(VAR_PREFIX##_time) / double(emul_time)); \ - } while (0) - - PRINT_STATS("Execute68k[Trap] execution", exec68k); - PRINT_STATS("NativeOp execution", native_exec); - PRINT_STATS("MacOS routine execution", macos_exec); - -#undef PRINT_STATS - printf("\n"); -#endif - - delete ppc_cpu; - ppc_cpu = NULL; -} - -#if PPC_ENABLE_JIT && PPC_REENTRANT_JIT -// Initialize EmulOp trampolines -void init_emul_op_trampolines(basic_dyngen & dg) -{ - typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func; - - // EmulOp - emul_op_trampoline = dg.gen_start(); - func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_emul_op).ptr(); - dg.gen_invoke_CPU_T0(func); - dg.gen_exec_return(); - dg.gen_end(); - - // NativeOp - native_op_trampoline = dg.gen_start(); - func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_native_op).ptr(); - dg.gen_invoke_CPU_T0(func); - dg.gen_exec_return(); - dg.gen_end(); - - D(bug("EmulOp trampoline: %p\n", emul_op_trampoline)); - D(bug("NativeOp trampoline: %p\n", native_op_trampoline)); -} -#endif - -/* - * Emulation loop - */ - -void emul_ppc(uint32 entry) -{ -#if 0 - ppc_cpu->start_log(); -#endif - // start emulation loop and enable code translation or caching - ppc_cpu->execute(entry); -} - -/* - * Handle PowerPC interrupt - */ - -void TriggerInterrupt(void) -{ - idle_resume(); -#if 0 - WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); -#else - // Trigger interrupt to main cpu only - if (ppc_cpu) - ppc_cpu->trigger_interrupt(); -#endif -} - -void HandleInterrupt(powerpc_registers *r) -{ -#ifdef USE_SDL_VIDEO - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); -#endif - - // Do nothing if interrupts are disabled - if (int32(ReadMacInt32(XLM_IRQ_NEST)) > 0) - return; - - // Update interrupt count -#if EMUL_TIME_STATS - interrupt_count++; -#endif - - // Interrupt action depends on current run mode - switch (ReadMacInt32(XLM_RUN_MODE)) { - case MODE_68K: - // 68k emulator active, trigger 68k interrupt level 1 - WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); - r->cr.set(r->cr.get() | tswap32(kernel_data->v[0x674 >> 2])); - break; - -#if INTERRUPTS_IN_NATIVE_MODE - case MODE_NATIVE: - // 68k emulator inactive, in nanokernel? - if (r->gpr[1] != KernelDataAddr) { - - // Prepare for 68k interrupt level 1 - WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); - WriteMacInt32(tswap32(kernel_data->v[0x658 >> 2]) + 0xdc, - ReadMacInt32(tswap32(kernel_data->v[0x658 >> 2]) + 0xdc) - | tswap32(kernel_data->v[0x674 >> 2])); - - // Execute nanokernel interrupt routine (this will activate the 68k emulator) - DisableInterrupt(); - if (ROMType == ROMTYPE_NEWWORLD) - ppc_cpu->interrupt(ROMBase + 0x312b1c); - else - ppc_cpu->interrupt(ROMBase + 0x312a3c); - } - break; -#endif - -#if INTERRUPTS_IN_EMUL_OP_MODE - case MODE_EMUL_OP: - // 68k emulator active, within EMUL_OP routine, execute 68k interrupt routine directly when interrupt level is 0 - if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) { -#if EMUL_TIME_STATS - const clock_t interrupt_start = clock(); -#endif -#if 1 - // Execute full 68k interrupt routine - M68kRegisters r; - uint32 old_r25 = ReadMacInt32(XLM_68K_R25); // Save interrupt level - WriteMacInt32(XLM_68K_R25, 0x21); // Execute with interrupt level 1 - static const uint8 proc_template[] = { - 0x3f, 0x3c, 0x00, 0x00, // move.w #$0000,-(sp) (fake format word) - 0x48, 0x7a, 0x00, 0x0a, // pea @1(pc) (return address) - 0x40, 0xe7, // move sr,-(sp) (saved SR) - 0x20, 0x78, 0x00, 0x064, // move.l $64,a0 - 0x4e, 0xd0, // jmp (a0) - M68K_RTS >> 8, M68K_RTS & 0xff // @1 - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc); - Execute68k(proc, &r); - WriteMacInt32(XLM_68K_R25, old_r25); // Restore interrupt level -#else - // Only update cursor - if (HasMacStarted()) { - if (InterruptFlags & INTFLAG_VIA) { - ClearInterruptFlag(INTFLAG_VIA); - ADBInterrupt(); - ExecuteNative(NATIVE_VIDEO_VBL); - } - } -#endif -#if EMUL_TIME_STATS - interrupt_time += (clock() - interrupt_start); -#endif - } - break; -#endif - } -} - -// Execute NATIVE_OP routine -void sheepshaver_cpu::execute_native_op(uint32 selector) -{ -#if EMUL_TIME_STATS - native_exec_count++; - const clock_t native_exec_start = clock(); -#endif - - switch (selector) { - case NATIVE_PATCH_NAME_REGISTRY: - DoPatchNameRegistry(); - break; - case NATIVE_VIDEO_INSTALL_ACCEL: - VideoInstallAccel(); - break; - case NATIVE_VIDEO_VBL: - VideoVBL(); - break; - case NATIVE_VIDEO_DO_DRIVER_IO: - gpr(3) = (int32)(int16)VideoDoDriverIO(gpr(3), gpr(4), gpr(5), gpr(6), gpr(7)); - break; - case NATIVE_ETHER_AO_GET_HWADDR: - AO_get_ethernet_address(gpr(3)); - break; - case NATIVE_ETHER_AO_ADD_MULTI: - AO_enable_multicast(gpr(3)); - break; - case NATIVE_ETHER_AO_DEL_MULTI: - AO_disable_multicast(gpr(3)); - break; - case NATIVE_ETHER_AO_SEND_PACKET: - AO_transmit_packet(gpr(3)); - break; - case NATIVE_ETHER_IRQ: - EtherIRQ(); - break; - case NATIVE_ETHER_INIT: - gpr(3) = InitStreamModule((void *)gpr(3)); - break; - case NATIVE_ETHER_TERM: - TerminateStreamModule(); - break; - case NATIVE_ETHER_OPEN: - gpr(3) = ether_open((queue_t *)gpr(3), (void *)gpr(4), gpr(5), gpr(6), (void*)gpr(7)); - break; - case NATIVE_ETHER_CLOSE: - gpr(3) = ether_close((queue_t *)gpr(3), gpr(4), (void *)gpr(5)); - break; - case NATIVE_ETHER_WPUT: - gpr(3) = ether_wput((queue_t *)gpr(3), (mblk_t *)gpr(4)); - break; - case NATIVE_ETHER_RSRV: - gpr(3) = ether_rsrv((queue_t *)gpr(3)); - break; - case NATIVE_NQD_SYNC_HOOK: - gpr(3) = NQD_sync_hook(gpr(3)); - break; - case NATIVE_NQD_UNKNOWN_HOOK: - gpr(3) = NQD_unknown_hook(gpr(3)); - break; - case NATIVE_NQD_BITBLT_HOOK: - gpr(3) = NQD_bitblt_hook(gpr(3)); - break; - case NATIVE_NQD_BITBLT: - NQD_bitblt(gpr(3)); - break; - case NATIVE_NQD_FILLRECT_HOOK: - gpr(3) = NQD_fillrect_hook(gpr(3)); - break; - case NATIVE_NQD_INVRECT: - NQD_invrect(gpr(3)); - break; - case NATIVE_NQD_FILLRECT: - NQD_fillrect(gpr(3)); - break; - case NATIVE_SERIAL_NOTHING: - case NATIVE_SERIAL_OPEN: - case NATIVE_SERIAL_PRIME_IN: - case NATIVE_SERIAL_PRIME_OUT: - case NATIVE_SERIAL_CONTROL: - case NATIVE_SERIAL_STATUS: - case NATIVE_SERIAL_CLOSE: { - typedef int16 (*SerialCallback)(uint32, uint32); - static const SerialCallback serial_callbacks[] = { - SerialNothing, - SerialOpen, - SerialPrimeIn, - SerialPrimeOut, - SerialControl, - SerialStatus, - SerialClose - }; - gpr(3) = serial_callbacks[selector - NATIVE_SERIAL_NOTHING](gpr(3), gpr(4)); - break; - } - case NATIVE_GET_RESOURCE: - get_resource(ReadMacInt32(XLM_GET_RESOURCE)); - break; - case NATIVE_GET_1_RESOURCE: - get_resource(ReadMacInt32(XLM_GET_1_RESOURCE)); - break; - case NATIVE_GET_IND_RESOURCE: - get_resource(ReadMacInt32(XLM_GET_IND_RESOURCE)); - break; - case NATIVE_GET_1_IND_RESOURCE: - get_resource(ReadMacInt32(XLM_GET_1_IND_RESOURCE)); - break; - case NATIVE_R_GET_RESOURCE: - get_resource(ReadMacInt32(XLM_R_GET_RESOURCE)); - break; - case NATIVE_MAKE_EXECUTABLE: - MakeExecutable(0, gpr(4), gpr(5)); - break; - case NATIVE_CHECK_LOAD_INVOC: - check_load_invoc(gpr(3), gpr(4), gpr(5)); - break; - case NATIVE_NAMED_CHECK_LOAD_INVOC: - named_check_load_invoc(gpr(3), gpr(4), gpr(5)); - break; - default: - printf("FATAL: NATIVE_OP called with bogus selector %d\n", selector); - QuitEmulator(); - break; - } - -#if EMUL_TIME_STATS - native_exec_time += (clock() - native_exec_start); -#endif -} - -/* - * Execute 68k subroutine (must be ended with EXEC_RETURN) - * This must only be called by the emul_thread when in EMUL_OP mode - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68k(uint32 pc, M68kRegisters *r) -{ - ppc_cpu->execute_68k(pc, r); -} - -/* - * Execute 68k A-Trap from EMUL_OP routine - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68kTrap(uint16 trap, M68kRegisters *r) -{ - SheepVar proc_var(4); - uint32 proc = proc_var.addr(); - WriteMacInt16(proc, trap); - WriteMacInt16(proc + 2, M68K_RTS); - Execute68k(proc, r); -} - -/* - * Call MacOS PPC code - */ - -uint32 call_macos(uint32 tvect) -{ - return ppc_cpu->execute_macos_code(tvect, 0, NULL); -} - -uint32 call_macos1(uint32 tvect, uint32 arg1) -{ - const uint32 args[] = { arg1 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2) -{ - const uint32 args[] = { arg1, arg2 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3) -{ - const uint32 args[] = { arg1, arg2, arg3 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4) -{ - const uint32 args[] = { arg1, arg2, arg3, arg4 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5) -{ - const uint32 args[] = { arg1, arg2, arg3, arg4, arg5 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6) -{ - const uint32 args[] = { arg1, arg2, arg3, arg4, arg5, arg6 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} - -uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7) -{ - const uint32 args[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7 }; - return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/block-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/block-cache.hpp deleted file mode 100644 index 3ba2b635e..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/block-cache.hpp +++ /dev/null @@ -1,277 +0,0 @@ -/* - * block-cache.hpp - Basic block cache management - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 BLOCK_CACHE_H -#define BLOCK_CACHE_H - -#include "block-alloc.hpp" - -template< class block_info, template class block_allocator = slow_allocator > -class block_cache -{ -private: - static const uint32 HASH_BITS = 15; - static const uint32 HASH_SIZE = 1 << HASH_BITS; - static const uint32 HASH_MASK = HASH_SIZE - 1; - - struct entry - : public block_info - { - entry * next_same_cl; - entry ** prev_same_cl_p; - entry * next; - entry ** prev_p; - }; - - block_allocator allocator; - entry * cache_tags[HASH_SIZE]; - entry * active; - entry * dormant; - - uint32 cacheline(uintptr addr) const { - return (addr >> 2) & HASH_MASK; - } - -public: - - block_cache(); - ~block_cache(); - - block_info *new_blockinfo(); - void delete_blockinfo(block_info *bi); - - void initialize(); - void clear(); - void clear_range(uintptr start, uintptr end); - block_info *fast_find(uintptr pc); - block_info *find(uintptr pc); - - void remove_from_cl_list(block_info *bi); - void remove_from_list(block_info *bi); - void remove_from_lists(block_info *bi); - - void add_to_cl_list(block_info *bi); - void raise_in_cl_list(block_info *bi); - - void add_to_active_list(block_info *bi); - void add_to_dormant_list(block_info *bi); -}; - -template< class block_info, template class block_allocator > -block_cache< block_info, block_allocator >::block_cache() - : active(NULL), dormant(NULL) -{ - initialize(); -} - -template< class block_info, template class block_allocator > -block_cache< block_info, block_allocator >::~block_cache() -{ - clear(); -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::initialize() -{ - for (int i = 0; i < HASH_SIZE; i++) - cache_tags[i] = NULL; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::clear() -{ - entry *p; - - p = active; - while (p) { - entry *d = p; - p = p->next; - delete_blockinfo(d); - } - active = NULL; - - p = dormant; - while (p) { - entry *d = p; - p = p->next; - delete_blockinfo(d); - } - dormant = NULL; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::clear_range(uintptr start, uintptr end) -{ - if (!active) - return; - - entry *p, *q; - if (cacheline(start) < cacheline(end - 1)) { - // Optimize for short ranges flush - const int end_cl = cacheline(end - 1); - for (int cl = cacheline(start); cl <= end_cl; cl++) { - p = cache_tags[cl]; - while (p) { - q = p; - p = p->next_same_cl; - if (q->intersect(start, end)) { - q->invalidate(); - remove_from_cl_list(q); - remove_from_list(q); - delete_blockinfo(q); - } - } - } - } - else { - p = active; - while (p) { - q = p; - p = p->next; - if (q->intersect(start, end)) { - q->invalidate(); - remove_from_cl_list(q); - remove_from_list(q); - delete_blockinfo(q); - } - } - } -} - -template< class block_info, template class block_allocator > -inline block_info *block_cache< block_info, block_allocator >::new_blockinfo() -{ - entry * bce = allocator.acquire(); - return bce; -} - -template< class block_info, template class block_allocator > -inline void block_cache< block_info, block_allocator >::delete_blockinfo(block_info *bi) -{ - entry * bce = (entry *)bi; - allocator.release(bce); -} - -template< class block_info, template class block_allocator > -inline block_info *block_cache< block_info, block_allocator >::fast_find(uintptr pc) -{ - // Hit: return immediately (that covers more than 95% of the cases) - entry * bce = cache_tags[cacheline(pc)]; - if (bce && bce->pc == pc) - return bce; - - return NULL; -} - -template< class block_info, template class block_allocator > -block_info *block_cache< block_info, block_allocator >::find(uintptr pc) -{ - // Hit: return immediately - entry * bce = cache_tags[cacheline(pc)]; - if (bce && bce->pc == pc) - return bce; - - // Miss: perform full list search and move block to front if found - while (bce) { - bce = bce->next_same_cl; - if (bce && bce->pc == pc) { - raise_in_cl_list(bce); - return bce; - } - } - - // Found none, will have to create a new block - return NULL; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::remove_from_cl_list(block_info *bi) -{ - entry * bce = (entry *)bi; - if (bce->prev_same_cl_p) - *bce->prev_same_cl_p = bce->next_same_cl; - if (bce->next_same_cl) - bce->next_same_cl->prev_same_cl_p = bce->prev_same_cl_p; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::add_to_cl_list(block_info *bi) -{ - entry * bce = (entry *)bi; - const uint32 cl = cacheline(bi->pc); - if (cache_tags[cl]) - cache_tags[cl]->prev_same_cl_p = &bce->next_same_cl; - bce->next_same_cl = cache_tags[cl]; - - cache_tags[cl] = bce; - bce->prev_same_cl_p = &cache_tags[cl]; -} - -template< class block_info, template class block_allocator > -inline void block_cache< block_info, block_allocator >::raise_in_cl_list(block_info *bi) -{ - remove_from_cl_list(bi); - add_to_cl_list(bi); -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::remove_from_list(block_info *bi) -{ - entry * bce = (entry *)bi; - if (bce->prev_p) - *bce->prev_p = bce->next; - if (bce->next) - bce->next->prev_p = bce->prev_p; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::add_to_active_list(block_info *bi) -{ - entry * bce = (entry *)bi; - - if (active) - active->prev_p = &bce->next; - bce->next = active; - - active = bce; - bce->prev_p = &active; -} - -template< class block_info, template class block_allocator > -void block_cache< block_info, block_allocator >::add_to_dormant_list(block_info *bi) -{ - entry * bce = (entry *)bi; - - if (dormant) - dormant->prev_p = &bce->next; - bce->next = dormant; - - dormant = bce; - bce->prev_p = &dormant; -} - -template< class block_info, template class block_allocator > -inline void block_cache< block_info, block_allocator >::remove_from_lists(block_info *bi) -{ - remove_from_cl_list(bi); - remove_from_list(bi); -} - -#endif /* BLOCK_CACHE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/dyngen-target-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/dyngen-target-exec.h deleted file mode 100644 index 14b070d07..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/dyngen-target-exec.h +++ /dev/null @@ -1,94 +0,0 @@ -/* - * dyngen defines for micro operation code - * - * Copyright (c) 2003-2004-2004 Fabrice Bellard - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef DYNGEN_TARGET_EXEC_H -#define DYNGEN_TARGET_EXEC_H - -enum { - /* callee save registers */ -#define AREG0 "rbp" - AREG0_ID = 5, - -/* - * Use of rbx register with gcc 4.2 on Mac OS 10.6 - * does not produce usable code. Just use r12 to r15. - */ -#if (defined(__APPLE__) && defined(__MACH__)) - -#define AREG1 "r12" - AREG1_ID = 12, - -#define AREG2 "r13" - AREG2_ID = 13, - -#define AREG3 "r14" - AREG3_ID = 14, - -#define AREG4 "r15" - AREG4_ID = 15, - -#else - -#define AREG1 "rbx" - AREG1_ID = 3, - -#define AREG2 "r12" - AREG2_ID = 12, - -#define AREG3 "r13" - AREG3_ID = 13, - -#define AREG4 "r14" - AREG4_ID = 14, - -#define AREG5 "r15" - AREG5_ID = 15, - -#endif - - - // NOTE: the following XMM registers definitions require to build - // *-dyngen-ops.cpp with -ffixed-xmmN - - /* floating-point registers */ -#define FREG0 "xmm4" - FREG0_ID = 4, - -#define FREG1 "xmm5" - FREG1_ID = 5, - -#define FREG2 "xmm6" - FREG2_ID = 6, - -#define FREG3 "xmm7" - FREG3_ID = 7, - - /* vector registers -- aliased to FP registers, not intermixed */ -#define VREG0 FREG0 -#define VREG0_ID FREG0_ID -#define VREG1 FREG1 -#define VREG1_ID FREG1_ID -#define VREG2 FREG2 -#define VREG2_ID FREG2_ID -#define VREG3 FREG3 -#define VREG3_ID FREG3_ID -}; - -#endif /* DYNGEN_TARGET_EXEC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-cache.hpp deleted file mode 100644 index f411d3bbe..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-cache.hpp +++ /dev/null @@ -1 +0,0 @@ -#include "cpu/jit/dummy/jit-target-cache.hpp" diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-codegen.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-codegen.hpp deleted file mode 100644 index e4611d690..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/amd64/jit-target-codegen.hpp +++ /dev/null @@ -1,108 +0,0 @@ -/* - * jit-target-codegen.hpp - Target specific code generator - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_AMD64_CODEGEN_H -#define JIT_AMD64_CODEGEN_H - -#define X86_TARGET_64BIT 1 -#include "cpu/jit/x86/jit-target-codegen.hpp" - -class amd64_codegen - : public x86_codegen -{ -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME(int s, int d) \ - { GEN_CODE(OP##rr(s, d)); } \ - void gen_##NAME(x86_memory_operand const & mem, int d) \ - { GEN_CODE(OP##mr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - - DEFINE_OP(sx_8_64, MOVSBQ); - DEFINE_OP(zx_8_64, MOVZBQ); - DEFINE_OP(sx_16_64, MOVSWQ); - DEFINE_OP(zx_16_64, MOVZWQ); - DEFINE_OP(sx_32_64, MOVSLQ); - -#undef DEFINE_OP - -public: - - void gen_push(int r) - { GEN_CODE(PUSHQr(r)); } - void gen_push(x86_memory_operand const & mem) - { GEN_CODE(PUSHQm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_pop(int r) - { GEN_CODE(POPQr(r)); } - void gen_pop(x86_memory_operand const & mem) - { GEN_CODE(POPQm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_bswap_64(int r) - { GEN_CODE(BSWAPQr(r)); } - void gen_lea_64(x86_memory_operand const & mem, int d) - { GEN_CODE(LEAQmr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -public: - - void gen_mov_64(int s, int d) - { GEN_CODE(MOVQrr(s, d)); } - void gen_mov_64(x86_memory_operand const & mem, int d) - { GEN_CODE(MOVQmr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_mov_64(int s, x86_memory_operand const & mem) - { GEN_CODE(MOVQrm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_mov_64(x86_immediate_operand const & imm, int d) - { GEN_CODE(MOVQir(imm.value, d)); } - void gen_mov_64(x86_immediate_operand const & imm, x86_memory_operand const & mem) - { GEN_CODE(MOVQim(imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - -private: - - void gen_rotshi_64(int op, int s, int d) - { GEN_CODE(_ROTSHIQrr(op, s, d)); } - void gen_rotshi_64(int op, int s, x86_memory_operand const & mem) - { GEN_CODE(_ROTSHIQrm(op, s, mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_rotshi_64(int op, x86_immediate_operand const & imm, int d) - { GEN_CODE(_ROTSHIQir(op, imm.value, d)); } - void gen_rotshi_64(int op, x86_immediate_operand const & imm, x86_memory_operand const & mem) - { GEN_CODE(_ROTSHIQim(op, imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME##_64(int s, int d) \ - { gen_rotshi_64(X86_##OP, s, d); } \ - void gen_##NAME##_64(int s, x86_memory_operand const & mem) \ - { gen_rotshi_64(X86_##OP, s, mem); } \ - void gen_##NAME##_64(x86_immediate_operand const & imm, int d) \ - { gen_rotshi_64(X86_##OP, imm, d); } \ - void gen_##NAME##_64(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { gen_rotshi_64(X86_##OP, imm, mem); } - - DEFINE_OP(rol, ROL); - DEFINE_OP(ror, ROR); - DEFINE_OP(rcl, RCL); - DEFINE_OP(rcr, RCR); - DEFINE_OP(shl, SHL); - DEFINE_OP(shr, SHR); - DEFINE_OP(sar, SAR); - -#undef DEFINE_OP -}; - -#endif /* JIT_AMD64_CODEGEN_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen-ops.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen-ops.cpp deleted file mode 100644 index 7b9feebc4..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen-ops.cpp +++ /dev/null @@ -1,481 +0,0 @@ -/* - * dyngen-ops.hpp - Synthetic opcodes - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "cpu/vm.hpp" -#include "cpu/jit/dyngen-exec.h" - -#include - -// We need at least 5 general purpose registers -struct basic_cpu; -register basic_cpu *CPU asm(REG_CPU); -#define DYNGEN_DEFINE_GLOBAL_REGISTER(REG) \ -register uintptr A##REG asm(REG_T##REG); \ -register uint32 T##REG asm(REG_T##REG) -DYNGEN_DEFINE_GLOBAL_REGISTER(0); -DYNGEN_DEFINE_GLOBAL_REGISTER(1); -DYNGEN_DEFINE_GLOBAL_REGISTER(2); - - -/** - * Native ALU operations optimization - **/ - -#if defined(__i386__) || defined(__x86_64__) -#define do_xchg_32(x, y) asm volatile ("xchg %0,%1" : "+r" (x), "+r" (y)) -#endif -#ifndef do_udiv_32 -#define do_udiv_32(x, y) ((uint32)x / (uint32)y) -#endif -#ifndef do_sdiv_32 -#define do_sdiv_32(x, y) ((int32)x / (int32)y) -#endif -#ifndef do_rol_32 -#define do_rol_32(x, y) ((x << y) | (x >> (32 - y))) -#endif -#ifndef do_ror_32 -#define do_ror_32(x, y) ((x >> y) | (x << (32 - y))) -#endif -#ifndef do_xchg_32 -#define do_xchg_32(x, y) do { uint32 t = x; x = y; y = t; } while (0) -#endif - - -/** - * ALU operations - **/ - -// XXX update for new 64-bit arches -#if defined __x86_64__ -#define MOV_AD_REG(PARAM, REG) asm volatile ("movabsq $__op_" #PARAM ",%0" : "=r" (REG)) -#else -#define MOV_AD_REG(PARAM, REG) REG = PARAM -#endif - -#define DEFINE_OP(REG) \ -void OPPROTO op_mov_ad_##REG##_im(void) \ -{ \ - MOV_AD_REG(PARAM1, REG); \ -} - -DEFINE_OP(A0); -DEFINE_OP(A1); -DEFINE_OP(A2); - -#undef DEFINE_OP - -#define DEFINE_OP(NAME, CODE) \ -void OPPROTO op_##NAME(void) \ -{ \ - CODE; \ -} - -// Register moves -DEFINE_OP(mov_32_T0_im, T0 = PARAM1); -DEFINE_OP(mov_32_T0_T1, T0 = T1); -DEFINE_OP(mov_32_T0_T2, T0 = T2); -DEFINE_OP(mov_32_T1_im, T1 = PARAM1); -DEFINE_OP(mov_32_T1_T0, T1 = T0); -DEFINE_OP(mov_32_T1_T2, T1 = T2); -DEFINE_OP(mov_32_T2_im, T2 = PARAM1); -DEFINE_OP(mov_32_T2_T1, T2 = T1); -DEFINE_OP(mov_32_T2_T0, T2 = T0); -DEFINE_OP(mov_32_T0_0, T0 = 0); -DEFINE_OP(mov_32_T1_0, T1 = 0); -DEFINE_OP(mov_32_T2_0, T2 = 0); - -// Arithmetic operations -DEFINE_OP(add_32_T0_T2, T0 += T2); -DEFINE_OP(add_32_T0_T1, T0 += T1); -DEFINE_OP(add_32_T0_im, T0 += PARAM1); -DEFINE_OP(add_32_T0_1, T0 += 1); -DEFINE_OP(add_32_T0_2, T0 += 2); -DEFINE_OP(add_32_T0_4, T0 += 4); -DEFINE_OP(add_32_T0_8, T0 += 8); -DEFINE_OP(sub_32_T0_T2, T0 -= T2); -DEFINE_OP(sub_32_T0_T1, T0 -= T1); -DEFINE_OP(sub_32_T0_im, T0 -= PARAM1); -DEFINE_OP(sub_32_T0_1, T0 -= 1); -DEFINE_OP(sub_32_T0_2, T0 -= 2); -DEFINE_OP(sub_32_T0_4, T0 -= 4); -DEFINE_OP(sub_32_T0_8, T0 -= 8); -DEFINE_OP(add_32_T1_T2, T1 += T2); -DEFINE_OP(add_32_T1_T0, T1 += T0); -DEFINE_OP(add_32_T1_im, T1 += PARAM1); -DEFINE_OP(add_32_T1_1, T1 += 1); -DEFINE_OP(add_32_T1_2, T1 += 2); -DEFINE_OP(add_32_T1_4, T1 += 4); -DEFINE_OP(add_32_T1_8, T1 += 8); -DEFINE_OP(sub_32_T1_T2, T1 -= T2); -DEFINE_OP(sub_32_T1_T0, T1 -= T0); -DEFINE_OP(sub_32_T1_im, T1 -= PARAM1); -DEFINE_OP(sub_32_T1_1, T1 -= 1); -DEFINE_OP(sub_32_T1_2, T1 -= 2); -DEFINE_OP(sub_32_T1_4, T1 -= 4); -DEFINE_OP(sub_32_T1_8, T1 -= 8); -DEFINE_OP(umul_32_T0_T1, T0 = (uint32)T0 * (uint32)T1); -DEFINE_OP(smul_32_T0_T1, T0 = (int32)T0 * (int32)T1); -DEFINE_OP(udiv_32_T0_T1, T0 = do_udiv_32(T0, T1)); -DEFINE_OP(sdiv_32_T0_T1, T0 = do_sdiv_32(T0, T1)); -DEFINE_OP(xchg_32_T0_T1, do_xchg_32(T0, T1)); -DEFINE_OP(bswap_16_T0, T0 = bswap_16(T0)); -DEFINE_OP(bswap_32_T0, T0 = bswap_32(T0)); - -// Logical operations -DEFINE_OP(neg_32_T0, T0 = -T0); -DEFINE_OP(not_32_T0, T0 = !T0); -DEFINE_OP(not_32_T1, T1 = !T1); -DEFINE_OP(and_32_T0_T1, T0 &= T1); -DEFINE_OP(and_32_T0_im, T0 &= PARAM1); -DEFINE_OP(or_32_T0_T1, T0 |= T1); -DEFINE_OP(or_32_T0_im, T0 |= PARAM1); -DEFINE_OP(xor_32_T0_T1, T0 ^= T1); -DEFINE_OP(xor_32_T0_im, T0 ^= PARAM1); -DEFINE_OP(orc_32_T0_T1, T0 |= ~T1); -DEFINE_OP(andc_32_T0_T1, T0 &= ~T1); -DEFINE_OP(nand_32_T0_T1, T0 = ~(T0 & T1)); -DEFINE_OP(nor_32_T0_T1, T0 = ~(T0 | T1)); -DEFINE_OP(eqv_32_T0_T1, T0 = ~(T0 ^ T1)); - -// Shift/Rotate operations -DEFINE_OP(lsl_32_T0_T1, T0 = T0 << T1); -DEFINE_OP(lsl_32_T0_im, T0 = T0 << PARAM1); -DEFINE_OP(lsr_32_T0_T1, T0 = T0 >> T1); -DEFINE_OP(lsr_32_T0_im, T0 = T0 >> PARAM1); -DEFINE_OP(asr_32_T0_T1, T0 = ((int32)T0) >> T1); -DEFINE_OP(asr_32_T0_im, T0 = ((int32)T0) >> PARAM1); -DEFINE_OP(rol_32_T0_T1, T0 = do_rol_32(T0, T1)); -DEFINE_OP(rol_32_T0_im, T0 = do_rol_32(T0, PARAM1)); -DEFINE_OP(ror_32_T0_T1, T0 = do_ror_32(T0, T1)); -DEFINE_OP(ror_32_T0_im, T0 = do_ror_32(T0, PARAM1)); - -// Sign-/Zero-extension -DEFINE_OP(se_16_32_T0, T0 = (int32)(int16)T0); -DEFINE_OP(se_16_32_T1, T1 = (int32)(int16)T1); -DEFINE_OP(ze_16_32_T0, T0 = (uint32)(uint16)T0); -DEFINE_OP(se_8_32_T0, T0 = (int32)(int8)T0); -DEFINE_OP(ze_8_32_T0, T0 = (uint32)(uint8)T0); - -#undef DEFINE_OP - - -/** - * Load/Store instructions - **/ - -#define im PARAM1 -#define DEFINE_OP(BITS,REG,SIZE,OFFSET) \ -void OPPROTO op_load_u##BITS##_##REG##_T1_##OFFSET(void) \ -{ \ - REG = (uint32)(uint##BITS)vm_read_memory_##SIZE(T1 + OFFSET); \ -} \ -void OPPROTO op_load_s##BITS##_##REG##_T1_##OFFSET(void) \ -{ \ - REG = (int32)(int##BITS)vm_read_memory_##SIZE(T1 + OFFSET); \ -} \ -void OPPROTO op_store_##BITS##_##REG##_T1_##OFFSET(void) \ -{ \ - vm_write_memory_##SIZE(T1 + OFFSET, REG); \ -} - -DEFINE_OP(32,T0,4,0); -DEFINE_OP(32,T0,4,im); -DEFINE_OP(32,T0,4,T2); -DEFINE_OP(16,T0,2,0); -DEFINE_OP(16,T0,2,im); -DEFINE_OP(16,T0,2,T2); -DEFINE_OP(8,T0,1,0); -DEFINE_OP(8,T0,1,im); -DEFINE_OP(8,T0,1,T2); - -#undef im -#undef DEFINE_OP - - -/** - * Control flow - **/ - -#ifdef __i386__ -#define FORCE_RET() asm volatile ("ret") -#endif -#ifdef __x86_64__ -#define FORCE_RET() asm volatile ("ret") -#endif -#ifdef __powerpc__ -#define FORCE_RET() asm volatile ("blr") -#endif -#ifdef __ppc__ -#define FORCE_RET() asm volatile ("blr") -#endif -#ifdef __s390__ -#define FORCE_RET() asm volatile ("br %r14") -#endif -#ifdef __alpha__ -#define FORCE_RET() asm volatile ("ret") -#endif -#ifdef __ia64__ -#define FORCE_RET() asm volatile ("br.ret.sptk.many b0;;") -#endif -#ifdef __sparc__ -#define FORCE_RET() asm volatile ("jmpl %i0 + 8, %g0\n" \ - "nop") -#endif -#ifdef __arm__ -#define FORCE_RET() asm volatile ("b exec_loop") -#endif -#ifdef __mc68000 -#define FORCE_RET() asm volatile ("rts") -#endif - -extern "C" void OPPROTO op_execute(uint8 *entry_point, basic_cpu *this_cpu); -void OPPROTO op_execute(uint8 *entry_point, basic_cpu *this_cpu) -{ - typedef void (*func_t)(void); - func_t func = (func_t)entry_point; - const int n_slots = 16 + 4; /* 16 stack slots + 4 VCPU registers */ - volatile uintptr stk[n_slots]; - stk[n_slots - 1] = (uintptr)CPU; - stk[n_slots - 2] = A0; - stk[n_slots - 3] = A1; - stk[n_slots - 4] = A2; - CPU = this_cpu; - DYNGEN_SLOW_DISPATCH(entry_point); - func(); // NOTE: never called, fake to make compiler save return point -#ifdef ASM_OP_EXEC_RETURN_INSN - asm volatile ("1: .byte " ASM_OP_EXEC_RETURN_INSN); -#else - asm volatile (ASM_DATA_SECTION); - asm volatile (ASM_GLOBAL " " ASM_NAME(op_exec_return_offset)); - asm volatile (ASM_NAME(op_exec_return_offset) ":"); - asm volatile (ASM_LONG " 1f-" ASM_NAME(op_execute)); - asm volatile (ASM_SIZE(op_exec_return_offset)); - asm volatile (ASM_PREVIOUS_SECTION); - asm volatile ("1:"); -#endif - A2 = stk[n_slots - 4]; - A1 = stk[n_slots - 3]; - A0 = stk[n_slots - 2]; - CPU = (basic_cpu *)stk[n_slots - 1]; -} - -void OPPROTO op_jmp_slow(void) -{ - DYNGEN_SLOW_DISPATCH(PARAM1); -} - -void OPPROTO op_jmp_fast(void) -{ -#ifdef DYNGEN_FAST_DISPATCH - DYNGEN_FAST_DISPATCH(__op_PARAM1); -#else - DYNGEN_SLOW_DISPATCH(PARAM1); -#endif -} - -void OPPROTO op_jmp_A0(void) -{ - DYNGEN_SLOW_DISPATCH(A0); -} - -// Register calling conventions based arches don't need a stack frame -// XXX enable on x86 too because we allocated a frame in op_execute() -#if (defined __APPLE__ && defined __MACH__) -#define DEFINE_OP(NAME, CODE) \ -static void OPPROTO impl_##NAME(void) __attribute__((used)); \ -void OPPROTO impl_##NAME(void) \ -{ \ - asm volatile (#NAME ":"); \ - CODE; \ - FORCE_RET(); \ - asm volatile ("." #NAME ":"); \ - asm volatile (ASM_SIZE(NAME)); \ -} \ -extern void OPPROTO NAME(void) __attribute__((weak_import)); \ -asm(".set helper_" #NAME "," #NAME); -#elif defined(__powerpc__) || ((defined(__x86_64__) || defined(__i386__)) && !defined(_WIN32)) -// XXX there is a problem on Windows: coff_text_shndx != text_shndx -// The latter is found by searching for ".text" in all symbols and -// assigning its e_scnum. -#define DEFINE_OP(NAME, CODE) \ -static void OPPROTO impl_##NAME(void) __attribute__((used)); \ -void OPPROTO impl_##NAME(void) \ -{ \ - asm volatile (#NAME ":"); \ - CODE; \ - FORCE_RET(); \ - asm volatile ("." #NAME ":"); \ - asm volatile (ASM_SIZE(NAME)); \ -} \ -asm(".weak " #NAME); \ -asm(".set helper_" #NAME "," #NAME); -#else -#define DEFINE_OP(NAME, CODE) \ -extern "C" void OPPROTO NAME(void); \ -void OPPROTO NAME(void) \ -{ \ - CODE; \ -} -#endif - -#if defined __mips__ -#define CALL(FUNC, ARGS) ({ \ - register uintptr func asm("t9"); \ - asm volatile ("move %0,%1" : "=r" (func) : "r" (FUNC)); \ - ((func_t)func) ARGS; \ -}) -#else -#define CALL(FUNC, ARGS) ((func_t)FUNC) ARGS -#endif - -DEFINE_OP(op_invoke, { - typedef void (*func_t)(void); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, ()); -}); - -DEFINE_OP(op_invoke_T0, { - typedef void (*func_t)(uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (T0)); -}); - -DEFINE_OP(op_invoke_T0_T1, { - typedef void (*func_t)(uint32, uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (T0, T1)); -}); - -DEFINE_OP(op_invoke_T0_T1_T2, { - typedef void (*func_t)(uint32, uint32, uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (T0, T1, T2)); -}); - -DEFINE_OP(op_invoke_T0_ret_T0, { - typedef uint32 (*func_t)(uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - T0 = CALL(func, (T0)); -}); - -DEFINE_OP(op_invoke_im, { - typedef void (*func_t)(uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (PARAM2)); -}); - -DEFINE_OP(op_invoke_CPU, { - typedef void (*func_t)(void *); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (CPU)); -}); - -DEFINE_OP(op_invoke_CPU_T0, { - typedef void (*func_t)(void *, uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (CPU, T0)); -}); - -DEFINE_OP(op_invoke_CPU_im, { - typedef void (*func_t)(void *, uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (CPU, PARAM2)); -}); - -DEFINE_OP(op_invoke_CPU_im_im, { - typedef void (*func_t)(void *, uint32, uint32); - uintptr func; - MOV_AD_REG(PARAM1, func); - CALL(func, (CPU, PARAM2, PARAM3)); -}); - -DEFINE_OP(op_invoke_CPU_A0_ret_A0, { - typedef void *(*func_t)(void *, uintptr); - uintptr func; - MOV_AD_REG(PARAM1, func); - A0 = (uintptr)CALL(func, (CPU, A0)); -}); - -DEFINE_OP(op_invoke_direct, { - typedef void (*func_t)(void); - CALL(PARAM1, ()); -}); - -DEFINE_OP(op_invoke_direct_T0, { - typedef void (*func_t)(uint32); - CALL(PARAM1, (T0)); -}); - -DEFINE_OP(op_invoke_direct_T0_T1, { - typedef void (*func_t)(uint32, uint32); - CALL(PARAM1, (T0, T1)); -}); - -DEFINE_OP(op_invoke_direct_T0_T1_T2, { - typedef void (*func_t)(uint32, uint32, uint32); - CALL(PARAM1, (T0, T1, T2)); -}); - -DEFINE_OP(op_invoke_direct_T0_ret_T0, { - typedef uint32 (*func_t)(uint32); - T0 = CALL(PARAM1, (T0)); -}); - -DEFINE_OP(op_invoke_direct_im, { - typedef void (*func_t)(uint32); - CALL(PARAM1, (PARAM2)); -}); - -DEFINE_OP(op_invoke_direct_CPU, { - typedef void (*func_t)(void *); - CALL(PARAM1, (CPU)); -}); - -DEFINE_OP(op_invoke_direct_CPU_T0, { - typedef void (*func_t)(void *, uint32); - CALL(PARAM1, (CPU, T0)); -}); - -DEFINE_OP(op_invoke_direct_CPU_im, { - typedef void (*func_t)(void *, uint32); - CALL(PARAM1, (CPU, PARAM2)); -}); - -DEFINE_OP(op_invoke_direct_CPU_im_im, { - typedef void (*func_t)(void *, uint32, uint32); - CALL(PARAM1, (CPU, PARAM2, PARAM3)); -}); - -DEFINE_OP(op_invoke_direct_CPU_A0_ret_A0, { - typedef void *(*func_t)(void *, uintptr); - A0 = (uintptr)CALL(PARAM1, (CPU, A0)); -}); - -#undef DEFINE_OP diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp deleted file mode 100644 index 4d214b73a..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp +++ /dev/null @@ -1,183 +0,0 @@ -/* - * dyngen-glue.hpp - Glue to QEMU dyngen infrastructure - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "basic-dyngen.hpp" - -int __op_param1, __op_param2, __op_param3; -int __op_jmp0, __op_jmp1; - -#define DYNGEN_IMPL 1 -#define DEFINE_GEN(NAME,RET,ARGS) RET basic_dyngen::NAME ARGS -#include "basic-dyngen-ops.hpp" - -basic_dyngen::basic_dyngen(dyngen_cpu_base cpu) - : parent_cpu(cpu) -{ -} - -bool -basic_dyngen::initialize(void) -{ - if (!jit_codegen::initialize()) - return false; - - execute_func = gen_start(); - gen_op_execute(); - gen_end(); - set_code_start(code_ptr()); - -#if PPC_REENTRANT_JIT -#ifdef SHEEPSHAVER - extern void init_emul_op_trampolines(basic_dyngen & dg); - init_emul_op_trampolines(*this); - set_code_start(code_ptr()); -#endif -#endif - - return true; -} - -void -basic_dyngen::gen_invoke(void (*func)()) -{ - uintptr funcptr = (uintptr)func; - if (direct_call_possible(funcptr)) - gen_op_invoke_direct(funcptr); - else - gen_op_invoke(funcptr); -} - -#define DEFINE_INVOKE(NAME, ARGS, IARGS) \ -void \ -basic_dyngen::gen_invoke_##NAME ARGS \ -{ \ - uintptr funcptr = (uintptr)func; \ - if (direct_call_possible(funcptr)) \ - gen_op_invoke_direct_##NAME IARGS; \ - else \ - gen_op_invoke_##NAME IARGS; \ -} - -DEFINE_INVOKE(T0, (void (*func)(uint32)), (funcptr)); -DEFINE_INVOKE(T0_T1, (void (*func)(uint32, uint32)), (funcptr)); -DEFINE_INVOKE(T0_T1_T2, (void (*func)(uint32, uint32, uint32)), (funcptr)); -DEFINE_INVOKE(T0_ret_T0, (uint32 (*func)(uint32)), (funcptr)); -DEFINE_INVOKE(im, (void (*func)(uint32), uint32 value), (funcptr, value)); -DEFINE_INVOKE(CPU, (void (*func)(dyngen_cpu_base)), (funcptr)); -DEFINE_INVOKE(CPU_T0, (void (*func)(dyngen_cpu_base, uint32)), (funcptr)); -DEFINE_INVOKE(CPU_im, (void (*func)(dyngen_cpu_base, uint32), uint32 value), (funcptr, value)); -DEFINE_INVOKE(CPU_im_im, (void (*func)(dyngen_cpu_base, uint32, uint32), uint32 param1, uint32 param2), (funcptr, param1, param2)); -DEFINE_INVOKE(CPU_A0_ret_A0, (void *(*func)(dyngen_cpu_base)), (funcptr)); - -#undef DEFINE_INVOKE - -uint8 * -basic_dyngen::gen_align(int align) -{ - int nbytes = align - (((uintptr)code_ptr()) % align); - if (nbytes == 0) - return code_ptr(); - -#if defined(__i386__) || defined(__x86_64__) - /* Source: GNU Binutils 2.12.90.0.15 */ - /* Various efficient no-op patterns for aligning code labels. - Note: Don't try to assemble the instructions in the comments. - 0L and 0w are not legal. */ - static const uint8 f32_1[] = - {0x90}; /* nop */ - static const uint8 f32_2[] = - {0x89,0xf6}; /* movl %esi,%esi */ - static const uint8 f32_3[] = - {0x8d,0x76,0x00}; /* leal 0(%esi),%esi */ - static const uint8 f32_4[] = - {0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ - static const uint8 f32_5[] = - {0x90, /* nop */ - 0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ - static const uint8 f32_6[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00}; /* leal 0L(%esi),%esi */ - static const uint8 f32_7[] = - {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ - static const uint8 f32_8[] = - {0x90, /* nop */ - 0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ - static const uint8 f32_9[] = - {0x89,0xf6, /* movl %esi,%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uint8 f32_10[] = - {0x8d,0x76,0x00, /* leal 0(%esi),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uint8 f32_11[] = - {0x8d,0x74,0x26,0x00, /* leal 0(%esi,1),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uint8 f32_12[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ - 0x8d,0xbf,0x00,0x00,0x00,0x00}; /* leal 0L(%edi),%edi */ - static const uint8 f32_13[] = - {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uint8 f32_14[] = - {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00, /* leal 0L(%esi,1),%esi */ - 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ - static const uint8 f32_15[] = - {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ - 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; - static const uint8 f32_16[] = - {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ - 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; - static const uint8 *const f32_patt[] = { - f32_1, f32_2, f32_3, f32_4, f32_5, f32_6, f32_7, f32_8, - f32_9, f32_10, f32_11, f32_12, f32_13, f32_14, f32_15 - }; - static const uint8 prefixes[4] = { 0x66, 0x66, 0x66, 0x66 }; - -#if defined(__x86_64__) - /* The recommended way to pad 64bit code is to use NOPs preceded by - maximally four 0x66 prefixes. Balance the size of nops. */ - int i; - int nnops = (nbytes + 3) / 4; - int len = nbytes / nnops; - int remains = nbytes - nnops * len; - - for (i = 0; i < remains; i++) { - emit_block(prefixes, len); - emit_8(0x90); // NOP - } - for (; i < nnops; i++) { - emit_block(prefixes, len - 1); - emit_8(0x90); // NOP - } -#else - int nloops = nbytes / 16; - while (nloops-- > 0) - emit_block(f32_16, sizeof(f32_16)); - - nbytes %= 16; - if (nbytes) - emit_block(f32_patt[nbytes - 1], nbytes); -#endif -#else -#warning "FIXME: tune for your target" - for (int i = 0; i < nbytes; i++) - emit_8(0); -#endif - return code_ptr(); -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.hpp deleted file mode 100644 index f04cd5efe..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.hpp +++ /dev/null @@ -1,374 +0,0 @@ -/* - * basic-dyngen.hpp - Basic code generator - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 BASIC_DYNGEN_H -#define BASIC_DYNGEN_H - -#include "cpu/jit/jit-config.hpp" -#include "cpu/jit/jit-codegen.hpp" - -// Set jump target address -static inline void dg_set_jmp_target_noflush(uint8 *jmp_addr, uint8 *addr) -{ -#if defined(__powerpc__) || defined(__ppc__) - // patch the branch destination - uint32 *ptr = (uint32 *)jmp_addr; - uint32 val = *ptr; - val = (val & ~0x03fffffc) | ((addr - jmp_addr) & 0x03fffffc); - *ptr = val; -#endif -#if defined(__i386__) || defined(__x86_64__) - // patch the branch destination - *(uint32 *)jmp_addr = addr - (jmp_addr + 4); -#endif -} - -static inline void dg_set_jmp_target(uint8 *jmp_addr, uint8 *addr) -{ - dg_set_jmp_target_noflush(jmp_addr, addr); -#if defined(__powerpc__) || defined(__ppc__) - // flush icache - asm volatile ("dcbst 0,%0" : : "r"(ptr) : "memory"); - asm volatile ("sync" : : : "memory"); - asm volatile ("icbi 0,%0" : : "r"(ptr) : "memory"); - asm volatile ("sync" : : : "memory"); - asm volatile ("isync" : : : "memory"); -#endif -} - -#ifdef SHEEPSHAVER -class powerpc_cpu; -typedef powerpc_cpu *dyngen_cpu_base; -#else -class basic_cpu; -typedef basic_cpu *dyngen_cpu_base; -#endif - -class basic_dyngen - : public jit_codegen -{ - uint8 *execute_func; - uint8 *gen_code_start; - dyngen_cpu_base parent_cpu; - - // Can we generate a direct call to target function? - bool direct_jump_possible(uintptr target) const; - bool direct_call_possible(uintptr target) const; - - // Generic code generators -# define DEFINE_CST(NAME,VALUE) static const unsigned long NAME = VALUE; -# define DEFINE_GEN(NAME,RET,ARGS) RET NAME ARGS; -# include "basic-dyngen-ops.hpp" - -public: - - // Constructor, parent CPU required - basic_dyngen(dyngen_cpu_base cpu); - - // Initialization - bool initialize(void); - - // Return CPU context associated to this code generator - dyngen_cpu_base cpu() const - { return parent_cpu; } - - // Align on ALIGN byte boundaries, ALIGN must be a power of 2 - uint8 *gen_align(int align = 16); - - // Start code generation of a new block - // Align on 16-byte boundaries - // Returns pointer to entry point - uint8 *gen_start(); - - // Stop code generation of the block - // Returns FALSE if translation cache is full - bool gen_end() const; - - // Execute compiled function at ENTRY_POINT - void execute(uint8 *entry_point); - - // Return from compiled code - void gen_exec_return(); - - // Function calls - void gen_jmp(const uint8 *target); - void gen_invoke(void (*func)(void)); - void gen_invoke_T0(void (*func)(uint32)); - void gen_invoke_T0_T1(void (*func)(uint32, uint32)); - void gen_invoke_T0_T1_T2(void (*func)(uint32, uint32, uint32)); - void gen_invoke_T0_ret_T0(uint32 (*func)(uint32)); - void gen_invoke_im(void (*func)(uint32), uint32 value); - void gen_invoke_CPU(void (*func)(dyngen_cpu_base)); - void gen_invoke_CPU_T0(void (*func)(dyngen_cpu_base, uint32)); - void gen_invoke_CPU_im(void (*func)(dyngen_cpu_base, uint32), uint32 value); - void gen_invoke_CPU_im_im(void (*func)(dyngen_cpu_base, uint32, uint32), uint32 param1, uint32 param2); - void gen_invoke_CPU_A0_ret_A0(void *(*func)(dyngen_cpu_base)); - - // Raw aliases -#define DEFINE_ALIAS_RAW(NAME, ARGLIST, ARGS) \ - void gen_##NAME ARGLIST { gen_op_##NAME ARGS; } - -#define DEFINE_ALIAS_0(NAME) DEFINE_ALIAS_RAW(NAME,(),()) -#define DEFINE_ALIAS_1(NAME) DEFINE_ALIAS_RAW(NAME,(long p1),(p1)) -#define DEFINE_ALIAS_2(NAME) DEFINE_ALIAS_RAW(NAME,(long p1,long p2),(p1,p2)) -#define DEFINE_ALIAS_3(NAME) DEFINE_ALIAS_RAW(NAME,(long p1,long p2,long p3),(p1,p2,p3)) -#define DEFINE_ALIAS(NAME, N) DEFINE_ALIAS_##N(NAME) - - // Register moves - void gen_mov_32_T0_im(int32 value); - DEFINE_ALIAS(mov_32_T0_T1,0); - DEFINE_ALIAS(mov_32_T0_T2,0); - void gen_mov_32_T1_im(int32 value); - DEFINE_ALIAS(mov_32_T1_T0,0); - DEFINE_ALIAS(mov_32_T1_T2,0); - void gen_mov_32_T2_im(int32 value); - DEFINE_ALIAS(mov_32_T2_T0,0); - DEFINE_ALIAS(mov_32_T2_T1,0); - DEFINE_ALIAS(mov_ad_A0_im,1); - DEFINE_ALIAS(mov_ad_A1_im,1); - DEFINE_ALIAS(mov_ad_A2_im,1); - - // Arithmetic operations - DEFINE_ALIAS(add_32_T0_T1,0); - DEFINE_ALIAS(add_32_T0_T2,0); - void gen_add_32_T0_im(int32 value); - DEFINE_ALIAS(sub_32_T0_T1,0); - DEFINE_ALIAS(sub_32_T0_T2,0); - void gen_sub_32_T0_im(int32 value); - DEFINE_ALIAS(add_32_T1_T0,0); - DEFINE_ALIAS(add_32_T1_T2,0); - void gen_add_32_T1_im(int32 value); - DEFINE_ALIAS(sub_32_T1_T0,0); - DEFINE_ALIAS(sub_32_T1_T2,0); - void gen_sub_32_T1_im(int32 value); - DEFINE_ALIAS(umul_32_T0_T1,0); - DEFINE_ALIAS(smul_32_T0_T1,0); - DEFINE_ALIAS(udiv_32_T0_T1,0); - DEFINE_ALIAS(sdiv_32_T0_T1,0); - DEFINE_ALIAS(xchg_32_T0_T1,0); - DEFINE_ALIAS(bswap_16_T0,0); - DEFINE_ALIAS(bswap_32_T0,0); - - // Logical operations - DEFINE_ALIAS(neg_32_T0,0); - DEFINE_ALIAS(not_32_T0,0); - DEFINE_ALIAS(not_32_T1,0); - DEFINE_ALIAS(and_32_T0_T1,0); - DEFINE_ALIAS(and_32_T0_im,1); - DEFINE_ALIAS(or_32_T0_T1,0); - DEFINE_ALIAS(or_32_T0_im,1); - DEFINE_ALIAS(xor_32_T0_T1,0); - DEFINE_ALIAS(xor_32_T0_im,1); - DEFINE_ALIAS(orc_32_T0_T1,0); - DEFINE_ALIAS(andc_32_T0_T1,0); - DEFINE_ALIAS(nand_32_T0_T1,0); - DEFINE_ALIAS(nor_32_T0_T1,0); - DEFINE_ALIAS(eqv_32_T0_T1,0); - - // Shift/Rotate operations - DEFINE_ALIAS(lsl_32_T0_T1,0); - DEFINE_ALIAS(lsl_32_T0_im,1); - DEFINE_ALIAS(lsr_32_T0_T1,0); - DEFINE_ALIAS(lsr_32_T0_im,1); - DEFINE_ALIAS(asr_32_T0_T1,0); - DEFINE_ALIAS(asr_32_T0_im,1); - DEFINE_ALIAS(rol_32_T0_T1,0); - DEFINE_ALIAS(rol_32_T0_im,1); - DEFINE_ALIAS(ror_32_T0_T1,0); - DEFINE_ALIAS(ror_32_T0_im,1); - - // Sign-/Zero-extension - DEFINE_ALIAS(se_16_32_T0,0); - DEFINE_ALIAS(se_16_32_T1,0); - DEFINE_ALIAS(ze_16_32_T0,0); - DEFINE_ALIAS(se_8_32_T0,0); - DEFINE_ALIAS(ze_8_32_T0,0); - - // Jump instructions - DEFINE_ALIAS(jmp_slow,1); - DEFINE_ALIAS(jmp_fast,1); - DEFINE_ALIAS(jmp_A0,0); - - // Load/Store instructions - DEFINE_ALIAS(load_u32_T0_T1_T2,0); - void gen_load_u32_T0_T1_im(int32 offset); - DEFINE_ALIAS(load_s32_T0_T1_T2,0); - void gen_load_s32_T0_T1_im(int32 offset); - DEFINE_ALIAS(load_u16_T0_T1_T2,0); - void gen_load_u16_T0_T1_im(int32 offset); - DEFINE_ALIAS(load_s16_T0_T1_T2,0); - void gen_load_s16_T0_T1_im(int32 offset); - DEFINE_ALIAS(load_u8_T0_T1_T2,0); - void gen_load_u8_T0_T1_im(int32 offset); - DEFINE_ALIAS(load_s8_T0_T1_T2,0); - void gen_load_s8_T0_T1_im(int32 offset); - DEFINE_ALIAS(store_32_T0_T1_T2,0); - void gen_store_32_T0_T1_im(int32 offset); - DEFINE_ALIAS(store_16_T0_T1_T2,0); - void gen_store_16_T0_T1_im(int32 offset); - DEFINE_ALIAS(store_8_T0_T1_T2,0); - void gen_store_8_T0_T1_im(int32 offset); - -#undef DEFINE_ALIAS -#undef DEFINE_ALIAS_0 -#undef DEFINE_ALIAS_1 -#undef DEFINE_ALIAS_2 -#undef DEFINE_ALIAS_3 -#undef DEFINE_ALIAS_RAW - - // Address of jump offset to patch for direct chaining - static const int MAX_JUMPS = 2; - uint8 *jmp_addr[MAX_JUMPS]; -}; - -inline bool -basic_dyngen::direct_jump_possible(uintptr target) const -{ -#if defined(__powerpc__) || defined(__ppc__) - const uintptr LI_OFFSET_MAX = 1 << 26; - return (((target - (uintptr)code_ptr()) < LI_OFFSET_MAX) || - (((uintptr)code_ptr() - target) < LI_OFFSET_MAX)); -#endif -#if defined(__i386__) - return true; -#endif -#if defined(__x86_64__) - const intptr offset = (intptr)target - (intptr)code_ptr() - sizeof(void *); - return offset <= 0xffffffff; -#endif - return false; -} - -inline void -basic_dyngen::gen_jmp(const uint8 *target_p) -{ - const uintptr target = (uintptr)target_p; - if (direct_jump_possible(target)) - gen_op_jmp_fast(target); - else - gen_op_jmp_slow(target); -} - -inline void -basic_dyngen::execute(uint8 *entry_point) -{ - typedef void (*func_t)(uint8 *, dyngen_cpu_base); - func_t func = (func_t)execute_func; - func(entry_point, parent_cpu); -} - -inline void -basic_dyngen::gen_exec_return() -{ - gen_jmp(execute_func + op_exec_return_offset); -} - -inline bool -basic_dyngen::direct_call_possible(uintptr target) const -{ -#if defined(__powerpc__) || defined(__ppc__) - const uintptr LI_OFFSET_MAX = 1 << 26; - return (((target - (uintptr)code_ptr()) < LI_OFFSET_MAX) || - (((uintptr)code_ptr() - target) < LI_OFFSET_MAX)); -#endif -#if defined(__i386__) - return true; -#endif -#if defined(__x86_64__) - const intptr offset = (intptr)target - (intptr)code_ptr() - sizeof(void *); - return offset <= 0xffffffff; -#endif - return false; -} - -inline uint8 * -basic_dyngen::gen_start() -{ - for (int i = 0; i < MAX_JUMPS; i++) - jmp_addr[i] = NULL; - gen_code_start = gen_align(); - return gen_code_start; -} - -inline bool -basic_dyngen::gen_end() const -{ - flush_icache_range((unsigned long)gen_code_start, (unsigned long)code_ptr()); - return !full_translation_cache(); -} - -#define DEFINE_OP(REG) \ -inline void \ -basic_dyngen::gen_mov_32_##REG##_im(int32 value) \ -{ \ - if (value == 0) \ - gen_op_mov_32_##REG##_0(); \ - else \ - gen_op_mov_32_##REG##_im(value); \ -} - -DEFINE_OP(T0); -DEFINE_OP(T1); -DEFINE_OP(T2); - -#undef DEFINE_OP - -#define DEFINE_OP(OP,REG) \ -inline void \ -basic_dyngen::gen_##OP##_32_##REG##_im(int32 value) \ -{ \ - if (value == 0) return; \ - else if (value == 1) gen_op_##OP##_32_##REG##_1(); \ - else if (value == 2) gen_op_##OP##_32_##REG##_2(); \ - else if (value == 4) gen_op_##OP##_32_##REG##_4(); \ - else if (value == 8) gen_op_##OP##_32_##REG##_8(); \ - else gen_op_##OP##_32_##REG##_im(value); \ -} - -DEFINE_OP(add,T0); -DEFINE_OP(add,T1); -DEFINE_OP(sub,T0); -DEFINE_OP(sub,T1); - -#undef DEFINE_OP - -#define DEFINE_OP(NAME,REG,SIZE) \ -inline void \ -basic_dyngen::gen_##NAME##_##SIZE##_##REG##_T1_im(int32 offset) \ -{ \ - if (offset == 0) \ - gen_op_##NAME##_##SIZE##_##REG##_T1_0(); \ - else \ - gen_op_##NAME##_##SIZE##_##REG##_T1_im(offset); \ -} - -DEFINE_OP(load,T0,u32); -DEFINE_OP(load,T0,s32); -DEFINE_OP(store,T0,32); -DEFINE_OP(load,T0,u16); -DEFINE_OP(load,T0,s16); -DEFINE_OP(store,T0,16); -DEFINE_OP(load,T0,u8); -DEFINE_OP(load,T0,s8); -DEFINE_OP(store,T0,8); - -#undef DEFINE_OP - -#endif /* BASIC_DYNGEN_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.cpp deleted file mode 100644 index e54c0f645..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.cpp +++ /dev/null @@ -1,4495 +0,0 @@ -/* - * cxxdemangle.cpp - C++ demangler - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 -#include -#include - -#include "cxxdemangle.h" - -#if defined(__GNUC__) && (__GXX_ABI_VERSION > 0) -#include - -char * -cxx_demangle(const char *mangled_name, char *buf, size_t *n, int *status) -{ - return abi::__cxa_demangle(mangled_name, buf, n, status); -} -#else -/* Use demangler from libiberty */ -char *cplus_demangle (const char *mangled, int options); - -/* Options passed to cplus_demangle (in 2nd parameter). */ -#define DMGL_NO_OPTS 0 /* For readability... */ -#define DMGL_PARAMS (1 << 0) /* Include function args */ -#define DMGL_ANSI (1 << 1) /* Include const, volatile, etc */ -#define DMGL_AUTO (1 << 8) -#define DMGL_GNU (1 << 9) -#define DMGL_LUCID (1 << 10) -#define DMGL_ARM (1 << 11) -#define DMGL_HP (1 << 12) -#define DMGL_EDG (1 << 13) - -#ifdef __GNUC__ -#define DMGL_COMPILER DMGL_GNU -#endif - -char * -cxx_demangle(const char *mangled_name, char *buf, size_t *n, int *status) -{ - if (mangled_name == NULL || (buf != NULL && n == NULL)) { - if (status) - *status = -3; - return NULL; - } - - char *demangled = cplus_demangle(mangled_name, DMGL_COMPILER | DMGL_PARAMS | DMGL_ANSI); - if (demangled == NULL) { - if (status) - *status = -2; - return NULL; - } - else { - int len = strlen(demangled) + 1; - if (buf && n) { - if (len <= *n) - strcpy(buf, demangled); - else { - if (status) - *status = -1; - return NULL; - } - } - } - - if (status) - *status = 0; - return demangled; -} - -#include -#define xmalloc(size) malloc(size) -#define xrealloc(ptr, size) realloc(ptr, size) - -#include -#define ISDIGIT(c) isdigit(c) -#define ISLOWER(c) islower(c) - -/* ANSI and traditional C compatability macros - Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001 - Free Software Foundation, Inc. - This file is part of the GNU C Library. */ - -#define PARAMS(ARGS) ARGS - -/* Define macros for some gcc attributes. This permits us to use the - macros freely, and know that they will come into play for the - version of gcc in which they are supported. */ - -#ifndef ATTRIBUTE_UNUSED -#define ATTRIBUTE_UNUSED -#endif /* ATTRIBUTE_UNUSED */ - -#ifndef ATTRIBUTE_NORETURN -#define ATTRIBUTE_NORETURN -#endif /* ATTRIBUTE_NORETURN */ - -/* Demangler for GNU C++ - Copyright 1989, 1991, 1994, 1995, 1996, 1997, 1998, 1999, - 2000, 2001 Free Software Foundation, Inc. - Written by James Clark (jjc@jclark.uucp) - Rewritten by Fred Fish (fnf@cygnus.com) for ARM and Lucid demangling - Modified by Satish Pai (pai@apollo.hp.com) for HP demangling - -This file is part of the libiberty library. */ - -/* This file exports two functions; cplus_mangle_opname and cplus_demangle. - - This file imports xmalloc and xrealloc, which are like malloc and - realloc except that they generate a fatal error if there is no - available memory. */ - -/* This file lives in both GCC and libiberty. When making changes, please - try not to break either. */ - -#undef CURRENT_DEMANGLING_STYLE -#define CURRENT_DEMANGLING_STYLE work->options - -#define AUTO_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_AUTO) -#define GNU_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_GNU) -#define LUCID_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_LUCID) -#define ARM_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_ARM) -#define HP_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_HP) -#define EDG_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_EDG) -#define GNU_V3_DEMANGLING (((int) CURRENT_DEMANGLING_STYLE) & DMGL_GNU_V3) - -#define min(X,Y) (((X) < (Y)) ? (X) : (Y)) - -/* A value at least one greater than the maximum number of characters - that will be output when using the `%d' format with `printf'. */ -#define INTBUF_SIZE 32 - -#ifndef ARRAY_SIZE -#define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0])) -#endif - -extern void fancy_abort PARAMS ((void)) ATTRIBUTE_NORETURN; - -/* In order to allow a single demangler executable to demangle strings - using various common values of CPLUS_MARKER, as well as any specific - one set at compile time, we maintain a string containing all the - commonly used ones, and check to see if the marker we are looking for - is in that string. CPLUS_MARKER is usually '$' on systems where the - assembler can deal with that. Where the assembler can't, it's usually - '.' (but on many systems '.' is used for other things). We put the - current defined CPLUS_MARKER first (which defaults to '$'), followed - by the next most common value, followed by an explicit '$' in case - the value of CPLUS_MARKER is not '$'. - - We could avoid this if we could just get g++ to tell us what the actual - cplus marker character is as part of the debug information, perhaps by - ensuring that it is the character that terminates the gcc_compiled - marker symbol (FIXME). */ - -#if !defined (CPLUS_MARKER) -#define CPLUS_MARKER '$' -#endif - -static char cplus_markers[] = { CPLUS_MARKER, '.', '$', '\0' }; - -static char char_str[2] = { '\000', '\000' }; - -typedef struct string /* Beware: these aren't required to be */ -{ /* '\0' terminated. */ - char *b; /* pointer to start of string */ - char *p; /* pointer after last character */ - char *e; /* pointer after end of allocated space */ -} string; - -/* Stuff that is shared between sub-routines. - Using a shared structure allows cplus_demangle to be reentrant. */ - -struct work_stuff -{ - int options; - char **typevec; - char **ktypevec; - char **btypevec; - int numk; - int numb; - int ksize; - int bsize; - int ntypes; - int typevec_size; - int constructor; - int destructor; - int static_type; /* A static member function */ - int temp_start; /* index in demangled to start of template args */ - int type_quals; /* The type qualifiers. */ - int dllimported; /* Symbol imported from a PE DLL */ - char **tmpl_argvec; /* Template function arguments. */ - int ntmpl_args; /* The number of template function arguments. */ - int forgetting_types; /* Nonzero if we are not remembering the types - we see. */ - string* previous_argument; /* The last function argument demangled. */ - int nrepeats; /* The number of times to repeat the previous - argument. */ -}; - -#define PRINT_ANSI_QUALIFIERS (work -> options & DMGL_ANSI) -#define PRINT_ARG_TYPES (work -> options & DMGL_PARAMS) - -static const struct optable -{ - const char *const in; - const char *const out; - const int flags; -} optable[] = { - {"nw", " new", DMGL_ANSI}, /* new (1.92, ansi) */ - {"dl", " delete", DMGL_ANSI}, /* new (1.92, ansi) */ - {"new", " new", 0}, /* old (1.91, and 1.x) */ - {"delete", " delete", 0}, /* old (1.91, and 1.x) */ - {"vn", " new []", DMGL_ANSI}, /* GNU, pending ansi */ - {"vd", " delete []", DMGL_ANSI}, /* GNU, pending ansi */ - {"as", "=", DMGL_ANSI}, /* ansi */ - {"ne", "!=", DMGL_ANSI}, /* old, ansi */ - {"eq", "==", DMGL_ANSI}, /* old, ansi */ - {"ge", ">=", DMGL_ANSI}, /* old, ansi */ - {"gt", ">", DMGL_ANSI}, /* old, ansi */ - {"le", "<=", DMGL_ANSI}, /* old, ansi */ - {"lt", "<", DMGL_ANSI}, /* old, ansi */ - {"plus", "+", 0}, /* old */ - {"pl", "+", DMGL_ANSI}, /* ansi */ - {"apl", "+=", DMGL_ANSI}, /* ansi */ - {"minus", "-", 0}, /* old */ - {"mi", "-", DMGL_ANSI}, /* ansi */ - {"ami", "-=", DMGL_ANSI}, /* ansi */ - {"mult", "*", 0}, /* old */ - {"ml", "*", DMGL_ANSI}, /* ansi */ - {"amu", "*=", DMGL_ANSI}, /* ansi (ARM/Lucid) */ - {"aml", "*=", DMGL_ANSI}, /* ansi (GNU/g++) */ - {"convert", "+", 0}, /* old (unary +) */ - {"negate", "-", 0}, /* old (unary -) */ - {"trunc_mod", "%", 0}, /* old */ - {"md", "%", DMGL_ANSI}, /* ansi */ - {"amd", "%=", DMGL_ANSI}, /* ansi */ - {"trunc_div", "/", 0}, /* old */ - {"dv", "/", DMGL_ANSI}, /* ansi */ - {"adv", "/=", DMGL_ANSI}, /* ansi */ - {"truth_andif", "&&", 0}, /* old */ - {"aa", "&&", DMGL_ANSI}, /* ansi */ - {"truth_orif", "||", 0}, /* old */ - {"oo", "||", DMGL_ANSI}, /* ansi */ - {"truth_not", "!", 0}, /* old */ - {"nt", "!", DMGL_ANSI}, /* ansi */ - {"postincrement","++", 0}, /* old */ - {"pp", "++", DMGL_ANSI}, /* ansi */ - {"postdecrement","--", 0}, /* old */ - {"mm", "--", DMGL_ANSI}, /* ansi */ - {"bit_ior", "|", 0}, /* old */ - {"or", "|", DMGL_ANSI}, /* ansi */ - {"aor", "|=", DMGL_ANSI}, /* ansi */ - {"bit_xor", "^", 0}, /* old */ - {"er", "^", DMGL_ANSI}, /* ansi */ - {"aer", "^=", DMGL_ANSI}, /* ansi */ - {"bit_and", "&", 0}, /* old */ - {"ad", "&", DMGL_ANSI}, /* ansi */ - {"aad", "&=", DMGL_ANSI}, /* ansi */ - {"bit_not", "~", 0}, /* old */ - {"co", "~", DMGL_ANSI}, /* ansi */ - {"call", "()", 0}, /* old */ - {"cl", "()", DMGL_ANSI}, /* ansi */ - {"alshift", "<<", 0}, /* old */ - {"ls", "<<", DMGL_ANSI}, /* ansi */ - {"als", "<<=", DMGL_ANSI}, /* ansi */ - {"arshift", ">>", 0}, /* old */ - {"rs", ">>", DMGL_ANSI}, /* ansi */ - {"ars", ">>=", DMGL_ANSI}, /* ansi */ - {"component", "->", 0}, /* old */ - {"pt", "->", DMGL_ANSI}, /* ansi; Lucid C++ form */ - {"rf", "->", DMGL_ANSI}, /* ansi; ARM/GNU form */ - {"indirect", "*", 0}, /* old */ - {"method_call", "->()", 0}, /* old */ - {"addr", "&", 0}, /* old (unary &) */ - {"array", "[]", 0}, /* old */ - {"vc", "[]", DMGL_ANSI}, /* ansi */ - {"compound", ", ", 0}, /* old */ - {"cm", ", ", DMGL_ANSI}, /* ansi */ - {"cond", "?:", 0}, /* old */ - {"cn", "?:", DMGL_ANSI}, /* pseudo-ansi */ - {"max", ">?", 0}, /* old */ - {"mx", ">?", DMGL_ANSI}, /* pseudo-ansi */ - {"min", "*", DMGL_ANSI}, /* ansi */ - {"sz", "sizeof ", DMGL_ANSI} /* pseudo-ansi */ -}; - -/* These values are used to indicate the various type varieties. - They are all non-zero so that they can be used as `success' - values. */ -typedef enum type_kind_t -{ - tk_none, - tk_pointer, - tk_reference, - tk_integral, - tk_bool, - tk_char, - tk_real -} type_kind_t; - -#define STRING_EMPTY(str) ((str) -> b == (str) -> p) -#define PREPEND_BLANK(str) {if (!STRING_EMPTY(str)) \ - string_prepend(str, " ");} -#define APPEND_BLANK(str) {if (!STRING_EMPTY(str)) \ - string_append(str, " ");} -#define LEN_STRING(str) ( (STRING_EMPTY(str))?0:((str)->p - (str)->b)) - -/* The scope separator appropriate for the language being demangled. */ - -#define SCOPE_STRING(work) "::" - -#define ARM_VTABLE_STRING "__vtbl__" /* Lucid/ARM virtual table prefix */ -#define ARM_VTABLE_STRLEN 8 /* strlen (ARM_VTABLE_STRING) */ - -/* Prototypes for local functions */ - -static void -delete_work_stuff PARAMS ((work_stuff *)); - -static void -delete_non_B_K_work_stuff PARAMS ((work_stuff *)); - -static char * -mop_up PARAMS ((work_stuff *, string *, int)); - -static void -squangle_mop_up PARAMS ((work_stuff *)); - -static void -work_stuff_copy_to_from PARAMS ((work_stuff *, work_stuff *)); - -static char * -internal_cplus_demangle PARAMS ((work_stuff *, const char *)); - -static int -demangle_template_template_parm PARAMS ((work_stuff *work, - const char **, string *)); - -static int -demangle_template PARAMS ((work_stuff *work, const char **, string *, - string *, int, int)); - -static int -arm_pt PARAMS ((work_stuff *, const char *, int, const char **, - const char **)); - -static int -demangle_class_name PARAMS ((work_stuff *, const char **, string *)); - -static int -demangle_qualified PARAMS ((work_stuff *, const char **, string *, - int, int)); - -static int -demangle_class PARAMS ((work_stuff *, const char **, string *)); - -static int -demangle_fund_type PARAMS ((work_stuff *, const char **, string *)); - -static int -demangle_signature PARAMS ((work_stuff *, const char **, string *)); - -static int -demangle_prefix PARAMS ((work_stuff *, const char **, string *)); - -static int -gnu_special PARAMS ((work_stuff *, const char **, string *)); - -static int -arm_special PARAMS ((const char **, string *)); - -static void -string_need PARAMS ((string *, int)); - -static void -string_delete PARAMS ((string *)); - -static void -string_init PARAMS ((string *)); - -static void -string_clear PARAMS ((string *)); - -static void -string_append PARAMS ((string *, const char *)); - -static void -string_appends PARAMS ((string *, string *)); - -static void -string_appendn PARAMS ((string *, const char *, int)); - -static void -string_prepend PARAMS ((string *, const char *)); - -static void -string_prependn PARAMS ((string *, const char *, int)); - -static void -string_append_template_idx PARAMS ((string *, int)); - -static int -get_count PARAMS ((const char **, int *)); - -static int -consume_count PARAMS ((const char **)); - -static int -consume_count_with_underscores PARAMS ((const char**)); - -static int -demangle_args PARAMS ((work_stuff *, const char **, string *)); - -static int -demangle_nested_args PARAMS ((work_stuff*, const char**, string*)); - -static int -do_type PARAMS ((work_stuff *, const char **, string *)); - -static int -do_arg PARAMS ((work_stuff *, const char **, string *)); - -static void -demangle_function_name PARAMS ((work_stuff *, const char **, string *, - const char *)); - -static int -iterate_demangle_function PARAMS ((work_stuff *, - const char **, string *, const char *)); - -static void -remember_type PARAMS ((work_stuff *, const char *, int)); - -static void -remember_Btype PARAMS ((work_stuff *, const char *, int, int)); - -static int -register_Btype PARAMS ((work_stuff *)); - -static void -remember_Ktype PARAMS ((work_stuff *, const char *, int)); - -static void -forget_types PARAMS ((work_stuff *)); - -static void -forget_B_and_K_types PARAMS ((work_stuff *)); - -static void -string_prepends PARAMS ((string *, string *)); - -static int -demangle_template_value_parm PARAMS ((work_stuff*, const char**, - string*, type_kind_t)); - -static int -do_hpacc_template_const_value PARAMS ((work_stuff *, const char **, string *)); - -static int -do_hpacc_template_literal PARAMS ((work_stuff *, const char **, string *)); - -static int -snarf_numeric_literal PARAMS ((const char **, string *)); - -/* There is a TYPE_QUAL value for each type qualifier. They can be - combined by bitwise-or to form the complete set of qualifiers for a - type. */ - -#define TYPE_UNQUALIFIED 0x0 -#define TYPE_QUAL_CONST 0x1 -#define TYPE_QUAL_VOLATILE 0x2 -#define TYPE_QUAL_RESTRICT 0x4 - -static int -code_for_qualifier PARAMS ((int)); - -static const char* -qualifier_string PARAMS ((int)); - -static const char* -demangle_qualifier PARAMS ((int)); - -static int -demangle_expression PARAMS ((work_stuff *, const char **, string *, - type_kind_t)); - -static int -demangle_integral_value PARAMS ((work_stuff *, const char **, - string *)); - -static int -demangle_real_value PARAMS ((work_stuff *, const char **, string *)); - -static void -demangle_arm_hp_template PARAMS ((work_stuff *, const char **, int, - string *)); - -static void -recursively_demangle PARAMS ((work_stuff *, const char **, string *, - int)); - -static void -grow_vect PARAMS ((void **, size_t *, size_t, int)); - -/* Translate count to integer, consuming tokens in the process. - Conversion terminates on the first non-digit character. - - Trying to consume something that isn't a count results in no - consumption of input and a return of -1. - - Overflow consumes the rest of the digits, and returns -1. */ - -static int -consume_count (const char **type) -{ - int count = 0; - - if (! ISDIGIT ((unsigned char)**type)) - return -1; - - while (ISDIGIT ((unsigned char)**type)) - { - count *= 10; - - /* Check for overflow. - We assume that count is represented using two's-complement; - no power of two is divisible by ten, so if an overflow occurs - when multiplying by ten, the result will not be a multiple of - ten. */ - if ((count % 10) != 0) - { - while (ISDIGIT ((unsigned char) **type)) - (*type)++; - return -1; - } - - count += **type - '0'; - (*type)++; - } - - if (count < 0) - count = -1; - - return (count); -} - - -/* Like consume_count, but for counts that are preceded and followed - by '_' if they are greater than 10. Also, -1 is returned for - failure, since 0 can be a valid value. */ - -static int -consume_count_with_underscores (const char **mangled) -{ - int idx; - - if (**mangled == '_') - { - (*mangled)++; - if (!ISDIGIT ((unsigned char)**mangled)) - return -1; - - idx = consume_count (mangled); - if (**mangled != '_') - /* The trailing underscore was missing. */ - return -1; - - (*mangled)++; - } - else - { - if (**mangled < '0' || **mangled > '9') - return -1; - - idx = **mangled - '0'; - (*mangled)++; - } - - return idx; -} - -/* C is the code for a type-qualifier. Return the TYPE_QUAL - corresponding to this qualifier. */ - -static int -code_for_qualifier (int c) -{ - switch (c) - { - case 'C': - return TYPE_QUAL_CONST; - - case 'V': - return TYPE_QUAL_VOLATILE; - - case 'u': - return TYPE_QUAL_RESTRICT; - - default: - break; - } - - /* C was an invalid qualifier. */ - abort (); -} - -/* Return the string corresponding to the qualifiers given by - TYPE_QUALS. */ - -static const char* -qualifier_string (int type_quals) -{ - switch (type_quals) - { - case TYPE_UNQUALIFIED: - return ""; - - case TYPE_QUAL_CONST: - return "const"; - - case TYPE_QUAL_VOLATILE: - return "volatile"; - - case TYPE_QUAL_RESTRICT: - return "__restrict"; - - case TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE: - return "const volatile"; - - case TYPE_QUAL_CONST | TYPE_QUAL_RESTRICT: - return "const __restrict"; - - case TYPE_QUAL_VOLATILE | TYPE_QUAL_RESTRICT: - return "volatile __restrict"; - - case TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE | TYPE_QUAL_RESTRICT: - return "const volatile __restrict"; - - default: - break; - } - - /* TYPE_QUALS was an invalid qualifier set. */ - abort (); -} - -/* C is the code for a type-qualifier. Return the string - corresponding to this qualifier. This function should only be - called with a valid qualifier code. */ - -static const char* -demangle_qualifier (int c) -{ - return qualifier_string (code_for_qualifier (c)); -} - - -/* char *cplus_demangle (const char *mangled, int options) - - If MANGLED is a mangled function name produced by GNU C++, then - a pointer to a @code{malloc}ed string giving a C++ representation - of the name will be returned; otherwise NULL will be returned. - It is the caller's responsibility to free the string which - is returned. - - The OPTIONS arg may contain one or more of the following bits: - - DMGL_ANSI ANSI qualifiers such as `const' and `void' are - included. - DMGL_PARAMS Function parameters are included. - - For example, - - cplus_demangle ("foo__1Ai", DMGL_PARAMS) => "A::foo(int)" - cplus_demangle ("foo__1Ai", DMGL_PARAMS | DMGL_ANSI) => "A::foo(int)" - cplus_demangle ("foo__1Ai", 0) => "A::foo" - - cplus_demangle ("foo__1Afe", DMGL_PARAMS) => "A::foo(float,...)" - cplus_demangle ("foo__1Afe", DMGL_PARAMS | DMGL_ANSI)=> "A::foo(float,...)" - cplus_demangle ("foo__1Afe", 0) => "A::foo" - - Note that any leading underscores, or other such characters prepended by - the compilation system, are presumed to have already been stripped from - MANGLED. */ - -char * -cplus_demangle (const char *mangled, int options) -{ - char *ret; - work_stuff work[1]; - - memset ((char *) work, 0, sizeof (work)); - work->options = options; - ret = internal_cplus_demangle (work, mangled); - squangle_mop_up (work); - return (ret); -} - - -/* Assuming *OLD_VECT points to an array of *SIZE objects of size - ELEMENT_SIZE, grow it to contain at least MIN_SIZE objects, - updating *OLD_VECT and *SIZE as necessary. */ - -static void -grow_vect (void **old_vect, size_t *size, size_t min_size, int element_size) -{ - if (*size < min_size) - { - *size *= 2; - if (*size < min_size) - *size = min_size; - *old_vect = (char *) xrealloc (*old_vect, *size * element_size); - } -} - -/* This function performs most of what cplus_demangle use to do, but - to be able to demangle a name with a B, K or n code, we need to - have a longer term memory of what types have been seen. The original - now initializes and cleans up the squangle code info, while internal - calls go directly to this routine to avoid resetting that info. */ - -static char * -internal_cplus_demangle (work_stuff *work, const char *mangled) -{ - - string decl; - int success = 0; - char *demangled = NULL; - int s1, s2, s3, s4; - s1 = work->constructor; - s2 = work->destructor; - s3 = work->static_type; - s4 = work->type_quals; - work->constructor = work->destructor = 0; - work->type_quals = TYPE_UNQUALIFIED; - work->dllimported = 0; - - if ((mangled != NULL) && (*mangled != '\0')) - { - string_init (&decl); - - /* First check to see if gnu style demangling is active and if the - string to be demangled contains a CPLUS_MARKER. If so, attempt to - recognize one of the gnu special forms rather than looking for a - standard prefix. In particular, don't worry about whether there - is a "__" string in the mangled string. Consider "_$_5__foo" for - example. */ - - if ((AUTO_DEMANGLING || GNU_DEMANGLING)) - { - success = gnu_special (work, &mangled, &decl); - } - if (!success) - { - success = demangle_prefix (work, &mangled, &decl); - } - if (success && (*mangled != '\0')) - { - success = demangle_signature (work, &mangled, &decl); - } - if (work->constructor == 2) - { - string_prepend (&decl, "global constructors keyed to "); - work->constructor = 0; - } - else if (work->destructor == 2) - { - string_prepend (&decl, "global destructors keyed to "); - work->destructor = 0; - } - else if (work->dllimported == 1) - { - string_prepend (&decl, "import stub for "); - work->dllimported = 0; - } - demangled = mop_up (work, &decl, success); - } - work->constructor = s1; - work->destructor = s2; - work->static_type = s3; - work->type_quals = s4; - return demangled; -} - - -/* Clear out and squangling related storage */ -static void -squangle_mop_up (work_stuff *work) -{ - /* clean up the B and K type mangling types. */ - forget_B_and_K_types (work); - if (work -> btypevec != NULL) - { - free ((char *) work -> btypevec); - } - if (work -> ktypevec != NULL) - { - free ((char *) work -> ktypevec); - } -} - - -/* Copy the work state and storage. */ - -static void -work_stuff_copy_to_from (work_stuff *to, work_stuff *from) -{ - int i; - - delete_work_stuff (to); - - /* Shallow-copy scalars. */ - memcpy (to, from, sizeof (*to)); - - /* Deep-copy dynamic storage. */ - if (from->typevec_size) - to->typevec - = (char **) xmalloc (from->typevec_size * sizeof (to->typevec[0])); - - for (i = 0; i < from->ntypes; i++) - { - int len = strlen (from->typevec[i]) + 1; - - to->typevec[i] = (char *) xmalloc (len); - memcpy (to->typevec[i], from->typevec[i], len); - } - - if (from->ksize) - to->ktypevec - = (char **) xmalloc (from->ksize * sizeof (to->ktypevec[0])); - - for (i = 0; i < from->numk; i++) - { - int len = strlen (from->ktypevec[i]) + 1; - - to->ktypevec[i] = (char *) xmalloc (len); - memcpy (to->ktypevec[i], from->ktypevec[i], len); - } - - if (from->bsize) - to->btypevec - = (char **) xmalloc (from->bsize * sizeof (to->btypevec[0])); - - for (i = 0; i < from->numb; i++) - { - int len = strlen (from->btypevec[i]) + 1; - - to->btypevec[i] = (char *) xmalloc (len); - memcpy (to->btypevec[i], from->btypevec[i], len); - } - - if (from->ntmpl_args) - to->tmpl_argvec - = (char **) xmalloc (from->ntmpl_args * sizeof (to->tmpl_argvec[0])); - - for (i = 0; i < from->ntmpl_args; i++) - { - int len = strlen (from->tmpl_argvec[i]) + 1; - - to->tmpl_argvec[i] = (char *) xmalloc (len); - memcpy (to->tmpl_argvec[i], from->tmpl_argvec[i], len); - } - - if (from->previous_argument) - { - to->previous_argument = (string*) xmalloc (sizeof (string)); - string_init (to->previous_argument); - string_appends (to->previous_argument, from->previous_argument); - } -} - - -/* Delete dynamic stuff in work_stuff that is not to be re-used. */ - -static void -delete_non_B_K_work_stuff (work_stuff *work) -{ - /* Discard the remembered types, if any. */ - - forget_types (work); - if (work -> typevec != NULL) - { - free ((char *) work -> typevec); - work -> typevec = NULL; - work -> typevec_size = 0; - } - if (work->tmpl_argvec) - { - int i; - - for (i = 0; i < work->ntmpl_args; i++) - if (work->tmpl_argvec[i]) - free ((char*) work->tmpl_argvec[i]); - - free ((char*) work->tmpl_argvec); - work->tmpl_argvec = NULL; - } - if (work->previous_argument) - { - string_delete (work->previous_argument); - free ((char*) work->previous_argument); - work->previous_argument = NULL; - } -} - - -/* Delete all dynamic storage in work_stuff. */ -static void -delete_work_stuff (work_stuff *work) -{ - delete_non_B_K_work_stuff (work); - squangle_mop_up (work); -} - - -/* Clear out any mangled storage */ - -static char * -mop_up (work_stuff *work, string *declp, int success) -{ - char *demangled = NULL; - - delete_non_B_K_work_stuff (work); - - /* If demangling was successful, ensure that the demangled string is null - terminated and return it. Otherwise, free the demangling decl. */ - - if (!success) - { - string_delete (declp); - } - else - { - string_appendn (declp, "", 1); - demangled = declp->b; - } - return (demangled); -} - -/* - -LOCAL FUNCTION - - demangle_signature -- demangle the signature part of a mangled name - -SYNOPSIS - - static int - demangle_signature (work_stuff *work, const char **mangled, - string *declp); - -DESCRIPTION - - Consume and demangle the signature portion of the mangled name. - - DECLP is the string where demangled output is being built. At - entry it contains the demangled root name from the mangled name - prefix. I.E. either a demangled operator name or the root function - name. In some special cases, it may contain nothing. - - *MANGLED points to the current unconsumed location in the mangled - name. As tokens are consumed and demangling is performed, the - pointer is updated to continuously point at the next token to - be consumed. - - Demangling GNU style mangled names is nasty because there is no - explicit token that marks the start of the outermost function - argument list. */ - -static int -demangle_signature (work_stuff *work, const char **mangled, string *declp) -{ - int success = 1; - int func_done = 0; - int expect_func = 0; - int expect_return_type = 0; - const char *oldmangled = NULL; - string trawname; - string tname; - - while (success && (**mangled != '\0')) - { - switch (**mangled) - { - case 'Q': - oldmangled = *mangled; - success = demangle_qualified (work, mangled, declp, 1, 0); - if (success) - remember_type (work, oldmangled, *mangled - oldmangled); - if (AUTO_DEMANGLING || GNU_DEMANGLING) - expect_func = 1; - oldmangled = NULL; - break; - - case 'K': - oldmangled = *mangled; - success = demangle_qualified (work, mangled, declp, 1, 0); - if (AUTO_DEMANGLING || GNU_DEMANGLING) - { - expect_func = 1; - } - oldmangled = NULL; - break; - - case 'S': - /* Static member function */ - if (oldmangled == NULL) - { - oldmangled = *mangled; - } - (*mangled)++; - work -> static_type = 1; - break; - - case 'C': - case 'V': - case 'u': - work->type_quals |= code_for_qualifier (**mangled); - - /* a qualified member function */ - if (oldmangled == NULL) - oldmangled = *mangled; - (*mangled)++; - break; - - case 'L': - /* Local class name follows after "Lnnn_" */ - if (HP_DEMANGLING) - { - while (**mangled && (**mangled != '_')) - (*mangled)++; - if (!**mangled) - success = 0; - else - (*mangled)++; - } - else - success = 0; - break; - - case '0': case '1': case '2': case '3': case '4': - case '5': case '6': case '7': case '8': case '9': - if (oldmangled == NULL) - { - oldmangled = *mangled; - } - work->temp_start = -1; /* uppermost call to demangle_class */ - success = demangle_class (work, mangled, declp); - if (success) - { - remember_type (work, oldmangled, *mangled - oldmangled); - } - if (AUTO_DEMANGLING || GNU_DEMANGLING || EDG_DEMANGLING) - { - /* EDG and others will have the "F", so we let the loop cycle - if we are looking at one. */ - if (**mangled != 'F') - expect_func = 1; - } - oldmangled = NULL; - break; - - case 'B': - { - string s; - success = do_type (work, mangled, &s); - if (success) - { - string_append (&s, SCOPE_STRING (work)); - string_prepends (declp, &s); - } - oldmangled = NULL; - expect_func = 1; - } - break; - - case 'F': - /* Function */ - /* ARM/HP style demangling includes a specific 'F' character after - the class name. For GNU style, it is just implied. So we can - safely just consume any 'F' at this point and be compatible - with either style. */ - - oldmangled = NULL; - func_done = 1; - (*mangled)++; - - /* For lucid/ARM/HP style we have to forget any types we might - have remembered up to this point, since they were not argument - types. GNU style considers all types seen as available for - back references. See comment in demangle_args() */ - - if (LUCID_DEMANGLING || ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) - { - forget_types (work); - } - success = demangle_args (work, mangled, declp); - /* After picking off the function args, we expect to either - find the function return type (preceded by an '_') or the - end of the string. */ - if (success && (AUTO_DEMANGLING || EDG_DEMANGLING) && **mangled == '_') - { - ++(*mangled); - /* At this level, we do not care about the return type. */ - success = do_type (work, mangled, &tname); - string_delete (&tname); - } - - break; - - case 't': - /* G++ Template */ - string_init(&trawname); - string_init(&tname); - if (oldmangled == NULL) - { - oldmangled = *mangled; - } - success = demangle_template (work, mangled, &tname, - &trawname, 1, 1); - if (success) - { - remember_type (work, oldmangled, *mangled - oldmangled); - } - string_append (&tname, SCOPE_STRING (work)); - - string_prepends(declp, &tname); - if (work -> destructor & 1) - { - string_prepend (&trawname, "~"); - string_appends (declp, &trawname); - work->destructor -= 1; - } - if ((work->constructor & 1) || (work->destructor & 1)) - { - string_appends (declp, &trawname); - work->constructor -= 1; - } - string_delete(&trawname); - string_delete(&tname); - oldmangled = NULL; - expect_func = 1; - break; - - case '_': - if ((AUTO_DEMANGLING || GNU_DEMANGLING) && expect_return_type) - { - /* Read the return type. */ - string return_type; - string_init (&return_type); - - (*mangled)++; - success = do_type (work, mangled, &return_type); - APPEND_BLANK (&return_type); - - string_prepends (declp, &return_type); - string_delete (&return_type); - break; - } - else - /* At the outermost level, we cannot have a return type specified, - so if we run into another '_' at this point we are dealing with - a mangled name that is either bogus, or has been mangled by - some algorithm we don't know how to deal with. So just - reject the entire demangling. */ - /* However, "_nnn" is an expected suffix for alternate entry point - numbered nnn for a function, with HP aCC, so skip over that - without reporting failure. pai/1997-09-04 */ - if (HP_DEMANGLING) - { - (*mangled)++; - while (**mangled && ISDIGIT ((unsigned char)**mangled)) - (*mangled)++; - } - else - success = 0; - break; - - case 'H': - if (AUTO_DEMANGLING || GNU_DEMANGLING) - { - /* A G++ template function. Read the template arguments. */ - success = demangle_template (work, mangled, declp, 0, 0, - 0); - if (!(work->constructor & 1)) - expect_return_type = 1; - (*mangled)++; - break; - } - else - /* fall through */ - {;} - - default: - if (AUTO_DEMANGLING || GNU_DEMANGLING) - { - /* Assume we have stumbled onto the first outermost function - argument token, and start processing args. */ - func_done = 1; - success = demangle_args (work, mangled, declp); - } - else - { - /* Non-GNU demanglers use a specific token to mark the start - of the outermost function argument tokens. Typically 'F', - for ARM/HP-demangling, for example. So if we find something - we are not prepared for, it must be an error. */ - success = 0; - } - break; - } - /* - if (AUTO_DEMANGLING || GNU_DEMANGLING) - */ - { - if (success && expect_func) - { - func_done = 1; - if (LUCID_DEMANGLING || ARM_DEMANGLING || EDG_DEMANGLING) - { - forget_types (work); - } - success = demangle_args (work, mangled, declp); - /* Since template include the mangling of their return types, - we must set expect_func to 0 so that we don't try do - demangle more arguments the next time we get here. */ - expect_func = 0; - } - } - } - if (success && !func_done) - { - if (AUTO_DEMANGLING || GNU_DEMANGLING) - { - /* With GNU style demangling, bar__3foo is 'foo::bar(void)', and - bar__3fooi is 'foo::bar(int)'. We get here when we find the - first case, and need to ensure that the '(void)' gets added to - the current declp. Note that with ARM/HP, the first case - represents the name of a static data member 'foo::bar', - which is in the current declp, so we leave it alone. */ - success = demangle_args (work, mangled, declp); - } - } - if (success && PRINT_ARG_TYPES) - { - if (work->static_type) - string_append (declp, " static"); - if (work->type_quals != TYPE_UNQUALIFIED) - { - APPEND_BLANK (declp); - string_append (declp, qualifier_string (work->type_quals)); - } - } - - return (success); -} - -static int -demangle_template_template_parm (work_stuff *work, - const char **mangled, - string *tname) -{ - int i; - int r; - int need_comma = 0; - int success = 1; - string temp; - - string_append (tname, "template <"); - /* get size of template parameter list */ - if (get_count (mangled, &r)) - { - for (i = 0; i < r; i++) - { - if (need_comma) - { - string_append (tname, ", "); - } - - /* Z for type parameters */ - if (**mangled == 'Z') - { - (*mangled)++; - string_append (tname, "class"); - } - /* z for template parameters */ - else if (**mangled == 'z') - { - (*mangled)++; - success = - demangle_template_template_parm (work, mangled, tname); - if (!success) - { - break; - } - } - else - { - /* temp is initialized in do_type */ - success = do_type (work, mangled, &temp); - if (success) - { - string_appends (tname, &temp); - } - string_delete(&temp); - if (!success) - { - break; - } - } - need_comma = 1; - } - - } - if (tname->p[-1] == '>') - string_append (tname, " "); - string_append (tname, "> class"); - return (success); -} - -static int -demangle_expression ( - work_stuff *work, - const char** mangled, - string* s, - type_kind_t tk) -{ - int need_operator = 0; - int success; - - success = 1; - string_appendn (s, "(", 1); - (*mangled)++; - while (success && **mangled != 'W' && **mangled != '\0') - { - if (need_operator) - { - size_t i; - size_t len; - - success = 0; - - len = strlen (*mangled); - - for (i = 0; i < (size_t)ARRAY_SIZE (optable); ++i) - { - size_t l = strlen (optable[i].in); - - if (l <= len - && memcmp (optable[i].in, *mangled, l) == 0) - { - string_appendn (s, " ", 1); - string_append (s, optable[i].out); - string_appendn (s, " ", 1); - success = 1; - (*mangled) += l; - break; - } - } - - if (!success) - break; - } - else - need_operator = 1; - - success = demangle_template_value_parm (work, mangled, s, tk); - } - - if (**mangled != 'W') - success = 0; - else - { - string_appendn (s, ")", 1); - (*mangled)++; - } - - return success; -} - -static int -demangle_integral_value ( - work_stuff *work, - const char** mangled, - string* s) -{ - int success; - - if (**mangled == 'E') - success = demangle_expression (work, mangled, s, tk_integral); - else if (**mangled == 'Q' || **mangled == 'K') - success = demangle_qualified (work, mangled, s, 0, 1); - else - { - int value; - - /* By default, we let the number decide whether we shall consume an - underscore. */ - int consume_following_underscore = 0; - int leave_following_underscore = 0; - - success = 0; - - /* Negative numbers are indicated with a leading `m'. */ - if (**mangled == 'm') - { - string_appendn (s, "-", 1); - (*mangled)++; - } - else if (mangled[0][0] == '_' && mangled[0][1] == 'm') - { - /* Since consume_count_with_underscores does not handle the - `m'-prefix we must do it here, using consume_count and - adjusting underscores: we have to consume the underscore - matching the prepended one. */ - consume_following_underscore = 1; - string_appendn (s, "-", 1); - (*mangled) += 2; - } - else if (**mangled == '_') - { - /* Do not consume a following underscore; - consume_following_underscore will consume what should be - consumed. */ - leave_following_underscore = 1; - } - - /* We must call consume_count if we expect to remove a trailing - underscore, since consume_count_with_underscores expects - the leading underscore (that we consumed) if it is to handle - multi-digit numbers. */ - if (consume_following_underscore) - value = consume_count (mangled); - else - value = consume_count_with_underscores (mangled); - - if (value != -1) - { - char buf[INTBUF_SIZE]; - sprintf (buf, "%d", value); - string_append (s, buf); - - /* Numbers not otherwise delimited, might have an underscore - appended as a delimeter, which we should skip. - - ??? This used to always remove a following underscore, which - is wrong. If other (arbitrary) cases are followed by an - underscore, we need to do something more radical. */ - - if ((value > 9 || consume_following_underscore) - && ! leave_following_underscore - && **mangled == '_') - (*mangled)++; - - /* All is well. */ - success = 1; - } - } - - return success; -} - -/* Demangle the real value in MANGLED. */ - -static int -demangle_real_value ( - work_stuff *work, - const char **mangled, - string* s) -{ - if (**mangled == 'E') - return demangle_expression (work, mangled, s, tk_real); - - if (**mangled == 'm') - { - string_appendn (s, "-", 1); - (*mangled)++; - } - while (ISDIGIT ((unsigned char)**mangled)) - { - string_appendn (s, *mangled, 1); - (*mangled)++; - } - if (**mangled == '.') /* fraction */ - { - string_appendn (s, ".", 1); - (*mangled)++; - while (ISDIGIT ((unsigned char)**mangled)) - { - string_appendn (s, *mangled, 1); - (*mangled)++; - } - } - if (**mangled == 'e') /* exponent */ - { - string_appendn (s, "e", 1); - (*mangled)++; - while (ISDIGIT ((unsigned char)**mangled)) - { - string_appendn (s, *mangled, 1); - (*mangled)++; - } - } - - return 1; -} - -static int -demangle_template_value_parm ( - work_stuff *work, - const char **mangled, - string* s, - type_kind_t tk) -{ - int success = 1; - - if (**mangled == 'Y') - { - /* The next argument is a template parameter. */ - int idx; - - (*mangled)++; - idx = consume_count_with_underscores (mangled); - if (idx == -1 - || (work->tmpl_argvec && idx >= work->ntmpl_args) - || consume_count_with_underscores (mangled) == -1) - return -1; - if (work->tmpl_argvec) - string_append (s, work->tmpl_argvec[idx]); - else - string_append_template_idx (s, idx); - } - else if (tk == tk_integral) - success = demangle_integral_value (work, mangled, s); - else if (tk == tk_char) - { - char tmp[2]; - int val; - if (**mangled == 'm') - { - string_appendn (s, "-", 1); - (*mangled)++; - } - string_appendn (s, "'", 1); - val = consume_count(mangled); - if (val <= 0) - success = 0; - else - { - tmp[0] = (char)val; - tmp[1] = '\0'; - string_appendn (s, &tmp[0], 1); - string_appendn (s, "'", 1); - } - } - else if (tk == tk_bool) - { - int val = consume_count (mangled); - if (val == 0) - string_appendn (s, "false", 5); - else if (val == 1) - string_appendn (s, "true", 4); - else - success = 0; - } - else if (tk == tk_real) - success = demangle_real_value (work, mangled, s); - else if (tk == tk_pointer || tk == tk_reference) - { - if (**mangled == 'Q') - success = demangle_qualified (work, mangled, s, - /*isfuncname=*/0, - /*append=*/1); - else - { - int symbol_len = consume_count (mangled); - if (symbol_len == -1) - return -1; - if (symbol_len == 0) - string_appendn (s, "0", 1); - else - { - char *p = (char *) xmalloc (symbol_len + 1), *q; - strncpy (p, *mangled, symbol_len); - p [symbol_len] = '\0'; - /* We use cplus_demangle here, rather than - internal_cplus_demangle, because the name of the entity - mangled here does not make use of any of the squangling - or type-code information we have built up thus far; it is - mangled independently. */ - q = cplus_demangle (p, work->options); - if (tk == tk_pointer) - string_appendn (s, "&", 1); - /* FIXME: Pointer-to-member constants should get a - qualifying class name here. */ - if (q) - { - string_append (s, q); - free (q); - } - else - string_append (s, p); - free (p); - } - *mangled += symbol_len; - } - } - - return success; -} - -/* Demangle the template name in MANGLED. The full name of the - template (e.g., S) is placed in TNAME. The name without the - template parameters (e.g. S) is placed in TRAWNAME if TRAWNAME is - non-NULL. If IS_TYPE is nonzero, this template is a type template, - not a function template. If both IS_TYPE and REMEMBER are nonzero, - the template is remembered in the list of back-referenceable - types. */ - -static int -demangle_template ( - work_stuff *work, - const char **mangled, - string *tname, - string *trawname, - int is_type, - int remember) -{ - int i; - int r; - int need_comma = 0; - int success = 0; - const char *start; - int is_java_array = 0; - string temp; - int bindex = 0; - - (*mangled)++; - if (is_type) - { - if (remember) - bindex = register_Btype (work); - start = *mangled; - /* get template name */ - if (**mangled == 'z') - { - int idx; - (*mangled)++; - (*mangled)++; - - idx = consume_count_with_underscores (mangled); - if (idx == -1 - || (work->tmpl_argvec && idx >= work->ntmpl_args) - || consume_count_with_underscores (mangled) == -1) - return (0); - - if (work->tmpl_argvec) - { - string_append (tname, work->tmpl_argvec[idx]); - if (trawname) - string_append (trawname, work->tmpl_argvec[idx]); - } - else - { - string_append_template_idx (tname, idx); - if (trawname) - string_append_template_idx (trawname, idx); - } - } - else - { - if ((r = consume_count (mangled)) <= 0 - || (int) strlen (*mangled) < r) - { - return (0); - } - string_appendn (tname, *mangled, r); - if (trawname) - string_appendn (trawname, *mangled, r); - *mangled += r; - } - } - if (!is_java_array) - string_append (tname, "<"); - /* get size of template parameter list */ - if (!get_count (mangled, &r)) - { - return (0); - } - if (!is_type) - { - /* Create an array for saving the template argument values. */ - work->tmpl_argvec = (char**) xmalloc (r * sizeof (char *)); - work->ntmpl_args = r; - for (i = 0; i < r; i++) - work->tmpl_argvec[i] = 0; - } - for (i = 0; i < r; i++) - { - if (need_comma) - { - string_append (tname, ", "); - } - /* Z for type parameters */ - if (**mangled == 'Z') - { - (*mangled)++; - /* temp is initialized in do_type */ - success = do_type (work, mangled, &temp); - if (success) - { - string_appends (tname, &temp); - - if (!is_type) - { - /* Save the template argument. */ - int len = temp.p - temp.b; - work->tmpl_argvec[i] = (char *) xmalloc (len + 1); - memcpy (work->tmpl_argvec[i], temp.b, len); - work->tmpl_argvec[i][len] = '\0'; - } - } - string_delete(&temp); - if (!success) - { - break; - } - } - /* z for template parameters */ - else if (**mangled == 'z') - { - int r2; - (*mangled)++; - success = demangle_template_template_parm (work, mangled, tname); - - if (success - && (r2 = consume_count (mangled)) > 0 - && (int) strlen (*mangled) >= r2) - { - string_append (tname, " "); - string_appendn (tname, *mangled, r2); - if (!is_type) - { - /* Save the template argument. */ - int len = r2; - work->tmpl_argvec[i] = (char *) xmalloc (len + 1); - memcpy (work->tmpl_argvec[i], *mangled, len); - work->tmpl_argvec[i][len] = '\0'; - } - *mangled += r2; - } - if (!success) - { - break; - } - } - else - { - string param; - string* s; - - /* otherwise, value parameter */ - - /* temp is initialized in do_type */ - success = do_type (work, mangled, &temp); - string_delete(&temp); - if (!success) - break; - - if (!is_type) - { - s = ¶m; - string_init (s); - } - else - s = tname; - - success = demangle_template_value_parm (work, mangled, s, - (type_kind_t) success); - - if (!success) - { - if (!is_type) - string_delete (s); - success = 0; - break; - } - - if (!is_type) - { - int len = s->p - s->b; - work->tmpl_argvec[i] = (char *) xmalloc (len + 1); - memcpy (work->tmpl_argvec[i], s->b, len); - work->tmpl_argvec[i][len] = '\0'; - - string_appends (tname, s); - string_delete (s); - } - } - need_comma = 1; - } - if (is_java_array) - { - string_append (tname, "[]"); - } - else - { - if (tname->p[-1] == '>') - string_append (tname, " "); - string_append (tname, ">"); - } - - if (is_type && remember) - remember_Btype (work, tname->b, LEN_STRING (tname), bindex); - - /* - if (work -> static_type) - { - string_append (declp, *mangled + 1); - *mangled += strlen (*mangled); - success = 1; - } - else - { - success = demangle_args (work, mangled, declp); - } - } - */ - return (success); -} - -static int -arm_pt ( - work_stuff *work, - const char *mangled, - int n, - const char **anchor, - const char **args) -{ - /* Check if ARM template with "__pt__" in it ("parameterized type") */ - /* Allow HP also here, because HP's cfront compiler follows ARM to some extent */ - if ((ARM_DEMANGLING || HP_DEMANGLING) && (*anchor = strstr (mangled, "__pt__"))) - { - int len; - *args = *anchor + 6; - len = consume_count (args); - if (len == -1) - return 0; - if (*args + len == mangled + n && **args == '_') - { - ++*args; - return 1; - } - } - if (AUTO_DEMANGLING || EDG_DEMANGLING) - { - if ((*anchor = strstr (mangled, "__tm__")) - || (*anchor = strstr (mangled, "__ps__")) - || (*anchor = strstr (mangled, "__pt__"))) - { - int len; - *args = *anchor + 6; - len = consume_count (args); - if (len == -1) - return 0; - if (*args + len == mangled + n && **args == '_') - { - ++*args; - return 1; - } - } - else if ((*anchor = strstr (mangled, "__S"))) - { - int len; - *args = *anchor + 3; - len = consume_count (args); - if (len == -1) - return 0; - if (*args + len == mangled + n && **args == '_') - { - ++*args; - return 1; - } - } - } - - return 0; -} - -static void -demangle_arm_hp_template ( - work_stuff *work, - const char **mangled, - int n, - string *declp) -{ - const char *p; - const char *args; - const char *e = *mangled + n; - string arg; - - /* Check for HP aCC template spec: classXt1t2 where t1, t2 are - template args */ - if (HP_DEMANGLING && ((*mangled)[n] == 'X')) - { - char *start_spec_args = NULL; - - /* First check for and omit template specialization pseudo-arguments, - such as in "Spec<#1,#1.*>" */ - start_spec_args = strchr (*mangled, '<'); - if (start_spec_args && (start_spec_args - *mangled < n)) - string_appendn (declp, *mangled, start_spec_args - *mangled); - else - string_appendn (declp, *mangled, n); - (*mangled) += n + 1; - string_init (&arg); - if (work->temp_start == -1) /* non-recursive call */ - work->temp_start = declp->p - declp->b; - string_append (declp, "<"); - while (1) - { - string_clear (&arg); - switch (**mangled) - { - case 'T': - /* 'T' signals a type parameter */ - (*mangled)++; - if (!do_type (work, mangled, &arg)) - goto hpacc_template_args_done; - break; - - case 'U': - case 'S': - /* 'U' or 'S' signals an integral value */ - if (!do_hpacc_template_const_value (work, mangled, &arg)) - goto hpacc_template_args_done; - break; - - case 'A': - /* 'A' signals a named constant expression (literal) */ - if (!do_hpacc_template_literal (work, mangled, &arg)) - goto hpacc_template_args_done; - break; - - default: - /* Today, 1997-09-03, we have only the above types - of template parameters */ - /* FIXME: maybe this should fail and return null */ - goto hpacc_template_args_done; - } - string_appends (declp, &arg); - /* Check if we're at the end of template args. - 0 if at end of static member of template class, - _ if done with template args for a function */ - if ((**mangled == '\000') || (**mangled == '_')) - break; - else - string_append (declp, ","); - } - hpacc_template_args_done: - string_append (declp, ">"); - string_delete (&arg); - if (**mangled == '_') - (*mangled)++; - return; - } - /* ARM template? (Also handles HP cfront extensions) */ - else if (arm_pt (work, *mangled, n, &p, &args)) - { - string type_str; - - string_init (&arg); - string_appendn (declp, *mangled, p - *mangled); - if (work->temp_start == -1) /* non-recursive call */ - work->temp_start = declp->p - declp->b; - string_append (declp, "<"); - /* should do error checking here */ - while (args < e) { - string_clear (&arg); - - /* Check for type or literal here */ - switch (*args) - { - /* HP cfront extensions to ARM for template args */ - /* spec: Xt1Lv1 where t1 is a type, v1 is a literal value */ - /* FIXME: We handle only numeric literals for HP cfront */ - case 'X': - /* A typed constant value follows */ - args++; - if (!do_type (work, &args, &type_str)) - goto cfront_template_args_done; - string_append (&arg, "("); - string_appends (&arg, &type_str); - string_append (&arg, ")"); - if (*args != 'L') - goto cfront_template_args_done; - args++; - /* Now snarf a literal value following 'L' */ - if (!snarf_numeric_literal (&args, &arg)) - goto cfront_template_args_done; - break; - - case 'L': - /* Snarf a literal following 'L' */ - args++; - if (!snarf_numeric_literal (&args, &arg)) - goto cfront_template_args_done; - break; - default: - /* Not handling other HP cfront stuff */ - if (!do_type (work, &args, &arg)) - goto cfront_template_args_done; - } - string_appends (declp, &arg); - string_append (declp, ","); - } - cfront_template_args_done: - string_delete (&arg); - if (args >= e) - --declp->p; /* remove extra comma */ - string_append (declp, ">"); - } - else if (n>10 && strncmp (*mangled, "_GLOBAL_", 8) == 0 - && (*mangled)[9] == 'N' - && (*mangled)[8] == (*mangled)[10] - && strchr (cplus_markers, (*mangled)[8])) - { - /* A member of the anonymous namespace. */ - string_append (declp, "{anonymous}"); - } - else - { - if (work->temp_start == -1) /* non-recursive call only */ - work->temp_start = 0; /* disable in recursive calls */ - string_appendn (declp, *mangled, n); - } - *mangled += n; -} - -/* Extract a class name, possibly a template with arguments, from the - mangled string; qualifiers, local class indicators, etc. have - already been dealt with */ - -static int -demangle_class_name ( - work_stuff *work, - const char **mangled, - string *declp) -{ - int n; - int success = 0; - - n = consume_count (mangled); - if (n == -1) - return 0; - if ((int) strlen (*mangled) >= n) - { - demangle_arm_hp_template (work, mangled, n, declp); - success = 1; - } - - return (success); -} - -/* - -LOCAL FUNCTION - - demangle_class -- demangle a mangled class sequence - -SYNOPSIS - - static int - demangle_class (work_stuff *work, const char **mangled, - strint *declp) - -DESCRIPTION - - DECLP points to the buffer into which demangling is being done. - - *MANGLED points to the current token to be demangled. On input, - it points to a mangled class (I.E. "3foo", "13verylongclass", etc.) - On exit, it points to the next token after the mangled class on - success, or the first unconsumed token on failure. - - If the CONSTRUCTOR or DESTRUCTOR flags are set in WORK, then - we are demangling a constructor or destructor. In this case - we prepend "class::class" or "class::~class" to DECLP. - - Otherwise, we prepend "class::" to the current DECLP. - - Reset the constructor/destructor flags once they have been - "consumed". This allows demangle_class to be called later during - the same demangling, to do normal class demangling. - - Returns 1 if demangling is successful, 0 otherwise. - -*/ - -static int -demangle_class ( - work_stuff *work, - const char **mangled, - string *declp) -{ - int success = 0; - int btype; - string class_name; - char *save_class_name_end = 0; - - string_init (&class_name); - btype = register_Btype (work); - if (demangle_class_name (work, mangled, &class_name)) - { - save_class_name_end = class_name.p; - if ((work->constructor & 1) || (work->destructor & 1)) - { - /* adjust so we don't include template args */ - if (work->temp_start && (work->temp_start != -1)) - { - class_name.p = class_name.b + work->temp_start; - } - string_prepends (declp, &class_name); - if (work -> destructor & 1) - { - string_prepend (declp, "~"); - work -> destructor -= 1; - } - else - { - work -> constructor -= 1; - } - } - class_name.p = save_class_name_end; - remember_Ktype (work, class_name.b, LEN_STRING(&class_name)); - remember_Btype (work, class_name.b, LEN_STRING(&class_name), btype); - string_prepend (declp, SCOPE_STRING (work)); - string_prepends (declp, &class_name); - success = 1; - } - string_delete (&class_name); - return (success); -} - - -/* Called when there's a "__" in the mangled name, with `scan' pointing to - the rightmost guess. - - Find the correct "__"-sequence where the function name ends and the - signature starts, which is ambiguous with GNU mangling. - Call demangle_signature here, so we can make sure we found the right - one; *mangled will be consumed so caller will not make further calls to - demangle_signature. */ - -static int -iterate_demangle_function ( - work_stuff *work, - const char **mangled, - string *declp, - const char *scan) -{ - const char *mangle_init = *mangled; - int success = 0; - string decl_init; - work_stuff work_init; - - if (*(scan + 2) == '\0') - return 0; - - /* Do not iterate for some demangling modes, or if there's only one - "__"-sequence. This is the normal case. */ - if (ARM_DEMANGLING || LUCID_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING - || strstr (scan + 2, "__") == NULL) - { - demangle_function_name (work, mangled, declp, scan); - return 1; - } - - /* Save state so we can restart if the guess at the correct "__" was - wrong. */ - string_init (&decl_init); - string_appends (&decl_init, declp); - memset (&work_init, 0, sizeof work_init); - work_stuff_copy_to_from (&work_init, work); - - /* Iterate over occurrences of __, allowing names and types to have a - "__" sequence in them. We must start with the first (not the last) - occurrence, since "__" most often occur between independent mangled - parts, hence starting at the last occurrence inside a signature - might get us a "successful" demangling of the signature. */ - - while (scan[2]) - { - demangle_function_name (work, mangled, declp, scan); - success = demangle_signature (work, mangled, declp); - if (success) - break; - - /* Reset demangle state for the next round. */ - *mangled = mangle_init; - string_clear (declp); - string_appends (declp, &decl_init); - work_stuff_copy_to_from (work, &work_init); - - /* Leave this underscore-sequence. */ - scan += 2; - - /* Scan for the next "__" sequence. */ - while (*scan && (scan[0] != '_' || scan[1] != '_')) - scan++; - - /* Move to last "__" in this sequence. */ - while (*scan && *scan == '_') - scan++; - scan -= 2; - } - - /* Delete saved state. */ - delete_work_stuff (&work_init); - string_delete (&decl_init); - - return success; -} - -/* - -LOCAL FUNCTION - - demangle_prefix -- consume the mangled name prefix and find signature - -SYNOPSIS - - static int - demangle_prefix (work_stuff *work, const char **mangled, - string *declp); - -DESCRIPTION - - Consume and demangle the prefix of the mangled name. - While processing the function name root, arrange to call - demangle_signature if the root is ambiguous. - - DECLP points to the string buffer into which demangled output is - placed. On entry, the buffer is empty. On exit it contains - the root function name, the demangled operator name, or in some - special cases either nothing or the completely demangled result. - - MANGLED points to the current pointer into the mangled name. As each - token of the mangled name is consumed, it is updated. Upon entry - the current mangled name pointer points to the first character of - the mangled name. Upon exit, it should point to the first character - of the signature if demangling was successful, or to the first - unconsumed character if demangling of the prefix was unsuccessful. - - Returns 1 on success, 0 otherwise. - */ - -static int -demangle_prefix ( - work_stuff *work, - const char **mangled, - string *declp) -{ - int success = 1; - const char *scan; - int i; - - if (strlen(*mangled) > 6 - && (strncmp(*mangled, "_imp__", 6) == 0 - || strncmp(*mangled, "__imp_", 6) == 0)) - { - /* it's a symbol imported from a PE dynamic library. Check for both - new style prefix _imp__ and legacy __imp_ used by older versions - of dlltool. */ - (*mangled) += 6; - work->dllimported = 1; - } - else if (strlen(*mangled) >= 11 && strncmp(*mangled, "_GLOBAL_", 8) == 0) - { - char *marker = strchr (cplus_markers, (*mangled)[8]); - if (marker != NULL && *marker == (*mangled)[10]) - { - if ((*mangled)[9] == 'D') - { - /* it's a GNU global destructor to be executed at program exit */ - (*mangled) += 11; - work->destructor = 2; - if (gnu_special (work, mangled, declp)) - return success; - } - else if ((*mangled)[9] == 'I') - { - /* it's a GNU global constructor to be executed at program init */ - (*mangled) += 11; - work->constructor = 2; - if (gnu_special (work, mangled, declp)) - return success; - } - } - } - else if ((ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) && strncmp(*mangled, "__std__", 7) == 0) - { - /* it's a ARM global destructor to be executed at program exit */ - (*mangled) += 7; - work->destructor = 2; - } - else if ((ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) && strncmp(*mangled, "__sti__", 7) == 0) - { - /* it's a ARM global constructor to be executed at program initial */ - (*mangled) += 7; - work->constructor = 2; - } - - /* This block of code is a reduction in strength time optimization - of: - scan = strstr (*mangled, "__"); */ - - { - scan = *mangled; - - do { - scan = strchr (scan, '_'); - } while (scan != NULL && *++scan != '_'); - - if (scan != NULL) --scan; - } - - if (scan != NULL) - { - /* We found a sequence of two or more '_', ensure that we start at - the last pair in the sequence. */ - /* i = strspn (scan, "_"); */ - i = 0; - while (scan[i] == '_') i++; - if (i > 2) - { - scan += (i - 2); - } - } - - if (scan == NULL) - { - success = 0; - } - else if (work -> static_type) - { - if (!ISDIGIT ((unsigned char)scan[0]) && (scan[0] != 't')) - { - success = 0; - } - } - else if ((scan == *mangled) - && (ISDIGIT ((unsigned char)scan[2]) || (scan[2] == 'Q') - || (scan[2] == 't') || (scan[2] == 'K') || (scan[2] == 'H'))) - { - /* The ARM says nothing about the mangling of local variables. - But cfront mangles local variables by prepending __ - to them. As an extension to ARM demangling we handle this case. */ - if ((LUCID_DEMANGLING || ARM_DEMANGLING || HP_DEMANGLING) - && ISDIGIT ((unsigned char)scan[2])) - { - *mangled = scan + 2; - consume_count (mangled); - string_append (declp, *mangled); - *mangled += strlen (*mangled); - success = 1; - } - else - { - /* A GNU style constructor starts with __[0-9Qt]. But cfront uses - names like __Q2_3foo3bar for nested type names. So don't accept - this style of constructor for cfront demangling. A GNU - style member-template constructor starts with 'H'. */ - if (!(LUCID_DEMANGLING || ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING)) - work -> constructor += 1; - *mangled = scan + 2; - } - } - else if (ARM_DEMANGLING && scan[2] == 'p' && scan[3] == 't') - { - /* Cfront-style parameterized type. Handled later as a signature. */ - success = 1; - - /* ARM template? */ - demangle_arm_hp_template (work, mangled, strlen (*mangled), declp); - } - else if (EDG_DEMANGLING && ((scan[2] == 't' && scan[3] == 'm') - || (scan[2] == 'p' && scan[3] == 's') - || (scan[2] == 'p' && scan[3] == 't'))) - { - /* EDG-style parameterized type. Handled later as a signature. */ - success = 1; - - /* EDG template? */ - demangle_arm_hp_template (work, mangled, strlen (*mangled), declp); - } - else if ((scan == *mangled) && !ISDIGIT ((unsigned char)scan[2]) - && (scan[2] != 't')) - { - /* Mangled name starts with "__". Skip over any leading '_' characters, - then find the next "__" that separates the prefix from the signature. - */ - if (!(ARM_DEMANGLING || LUCID_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) - || (arm_special (mangled, declp) == 0)) - { - while (*scan == '_') - { - scan++; - } - if ((scan = strstr (scan, "__")) == NULL || (*(scan + 2) == '\0')) - { - /* No separator (I.E. "__not_mangled"), or empty signature - (I.E. "__not_mangled_either__") */ - success = 0; - } - else - return iterate_demangle_function (work, mangled, declp, scan); - } - } - else if (*(scan + 2) != '\0') - { - /* Mangled name does not start with "__" but does have one somewhere - in there with non empty stuff after it. Looks like a global - function name. Iterate over all "__":s until the right - one is found. */ - return iterate_demangle_function (work, mangled, declp, scan); - } - else - { - /* Doesn't look like a mangled name */ - success = 0; - } - - if (!success && (work->constructor == 2 || work->destructor == 2)) - { - string_append (declp, *mangled); - *mangled += strlen (*mangled); - success = 1; - } - return (success); -} - -/* - -LOCAL FUNCTION - - gnu_special -- special handling of gnu mangled strings - -SYNOPSIS - - static int - gnu_special (work_stuff *work, const char **mangled, - string *declp); - - -DESCRIPTION - - Process some special GNU style mangling forms that don't fit - the normal pattern. For example: - - _$_3foo (destructor for class foo) - _vt$foo (foo virtual table) - _vt$foo$bar (foo::bar virtual table) - __vt_foo (foo virtual table, new style with thunks) - _3foo$varname (static data member) - _Q22rs2tu$vw (static data member) - __t6vector1Zii (constructor with template) - __thunk_4__$_7ostream (virtual function thunk) - */ - -static int -gnu_special ( - work_stuff *work, - const char **mangled, - string *declp) -{ - int n; - int success = 1; - const char *p; - - if ((*mangled)[0] == '_' - && strchr (cplus_markers, (*mangled)[1]) != NULL - && (*mangled)[2] == '_') - { - /* Found a GNU style destructor, get past "__" */ - (*mangled) += 3; - work -> destructor += 1; - } - else if ((*mangled)[0] == '_' - && (((*mangled)[1] == '_' - && (*mangled)[2] == 'v' - && (*mangled)[3] == 't' - && (*mangled)[4] == '_') - || ((*mangled)[1] == 'v' - && (*mangled)[2] == 't' - && strchr (cplus_markers, (*mangled)[3]) != NULL))) - { - /* Found a GNU style virtual table, get past "_vt" - and create the decl. Note that we consume the entire mangled - input string, which means that demangle_signature has no work - to do. */ - if ((*mangled)[2] == 'v') - (*mangled) += 5; /* New style, with thunks: "__vt_" */ - else - (*mangled) += 4; /* Old style, no thunks: "_vt" */ - while (**mangled != '\0') - { - switch (**mangled) - { - case 'Q': - case 'K': - success = demangle_qualified (work, mangled, declp, 0, 1); - break; - case 't': - success = demangle_template (work, mangled, declp, 0, 1, - 1); - break; - default: - if (ISDIGIT((unsigned char)*mangled[0])) - { - n = consume_count(mangled); - /* We may be seeing a too-large size, or else a - "." indicating a static local symbol. In - any case, declare victory and move on; *don't* try - to use n to allocate. */ - if (n > (int) strlen (*mangled)) - { - success = 1; - break; - } - } - else - { - /*n = strcspn (*mangled, cplus_markers);*/ - const char *check = *mangled; - n = 0; - while (*check) - if (strchr (cplus_markers, *check++) == NULL) - n++; - else - break; - } - string_appendn (declp, *mangled, n); - (*mangled) += n; - } - - p = strpbrk (*mangled, cplus_markers); - if (success && ((p == NULL) || (p == *mangled))) - { - if (p != NULL) - { - string_append (declp, SCOPE_STRING (work)); - (*mangled)++; - } - } - else - { - success = 0; - break; - } - } - if (success) - string_append (declp, " virtual table"); - } - else if ((*mangled)[0] == '_' - && (strchr("0123456789Qt", (*mangled)[1]) != NULL) - && (p = strpbrk (*mangled, cplus_markers)) != NULL) - { - /* static data member, "_3foo$varname" for example */ - (*mangled)++; - switch (**mangled) - { - case 'Q': - case 'K': - success = demangle_qualified (work, mangled, declp, 0, 1); - break; - case 't': - success = demangle_template (work, mangled, declp, 0, 1, 1); - break; - default: - n = consume_count (mangled); - if (n < 0 || n > (long) strlen (*mangled)) - { - success = 0; - break; - } - - if (n > 10 && strncmp (*mangled, "_GLOBAL_", 8) == 0 - && (*mangled)[9] == 'N' - && (*mangled)[8] == (*mangled)[10] - && strchr (cplus_markers, (*mangled)[8])) - { - /* A member of the anonymous namespace. There's information - about what identifier or filename it was keyed to, but - it's just there to make the mangled name unique; we just - step over it. */ - string_append (declp, "{anonymous}"); - (*mangled) += n; - - /* Now p points to the marker before the N, so we need to - update it to the first marker after what we consumed. */ - p = strpbrk (*mangled, cplus_markers); - break; - } - - string_appendn (declp, *mangled, n); - (*mangled) += n; - } - if (success && (p == *mangled)) - { - /* Consumed everything up to the cplus_marker, append the - variable name. */ - (*mangled)++; - string_append (declp, SCOPE_STRING (work)); - n = strlen (*mangled); - string_appendn (declp, *mangled, n); - (*mangled) += n; - } - else - { - success = 0; - } - } - else if (strncmp (*mangled, "__thunk_", 8) == 0) - { - int delta; - - (*mangled) += 8; - delta = consume_count (mangled); - if (delta == -1) - success = 0; - else - { - char *method = internal_cplus_demangle (work, ++*mangled); - - if (method) - { - char buf[50]; - sprintf (buf, "virtual function thunk (delta:%d) for ", -delta); - string_append (declp, buf); - string_append (declp, method); - free (method); - n = strlen (*mangled); - (*mangled) += n; - } - else - { - success = 0; - } - } - } - else if (strncmp (*mangled, "__t", 3) == 0 - && ((*mangled)[3] == 'i' || (*mangled)[3] == 'f')) - { - p = (*mangled)[3] == 'i' ? " type_info node" : " type_info function"; - (*mangled) += 4; - switch (**mangled) - { - case 'Q': - case 'K': - success = demangle_qualified (work, mangled, declp, 0, 1); - break; - case 't': - success = demangle_template (work, mangled, declp, 0, 1, 1); - break; - default: - success = do_type (work, mangled, declp); - break; - } - if (success && **mangled != '\0') - success = 0; - if (success) - string_append (declp, p); - } - else - { - success = 0; - } - return (success); -} - -static void -recursively_demangle ( - work_stuff *work, - const char **mangled, - string *result, - int namelength) -{ - char * recurse = (char *)NULL; - char * recurse_dem = (char *)NULL; - - recurse = (char *) xmalloc (namelength + 1); - memcpy (recurse, *mangled, namelength); - recurse[namelength] = '\000'; - - recurse_dem = cplus_demangle (recurse, work->options); - - if (recurse_dem) - { - string_append (result, recurse_dem); - free (recurse_dem); - } - else - { - string_appendn (result, *mangled, namelength); - } - free (recurse); - *mangled += namelength; -} - -/* - -LOCAL FUNCTION - - arm_special -- special handling of ARM/lucid mangled strings - -SYNOPSIS - - static int - arm_special (const char **mangled, - string *declp); - - -DESCRIPTION - - Process some special ARM style mangling forms that don't fit - the normal pattern. For example: - - __vtbl__3foo (foo virtual table) - __vtbl__3foo__3bar (bar::foo virtual table) - - */ - -static int -arm_special (const char **mangled, string *declp) -{ - int n; - int success = 1; - const char *scan; - - if (strncmp (*mangled, ARM_VTABLE_STRING, ARM_VTABLE_STRLEN) == 0) - { - /* Found a ARM style virtual table, get past ARM_VTABLE_STRING - and create the decl. Note that we consume the entire mangled - input string, which means that demangle_signature has no work - to do. */ - scan = *mangled + ARM_VTABLE_STRLEN; - while (*scan != '\0') /* first check it can be demangled */ - { - n = consume_count (&scan); - if (n == -1) - { - return (0); /* no good */ - } - scan += n; - if (scan[0] == '_' && scan[1] == '_') - { - scan += 2; - } - } - (*mangled) += ARM_VTABLE_STRLEN; - while (**mangled != '\0') - { - n = consume_count (mangled); - if (n == -1 - || n > (long) strlen (*mangled)) - return 0; - string_prependn (declp, *mangled, n); - (*mangled) += n; - if ((*mangled)[0] == '_' && (*mangled)[1] == '_') - { - string_prepend (declp, "::"); - (*mangled) += 2; - } - } - string_append (declp, " virtual table"); - } - else - { - success = 0; - } - return (success); -} - -/* - -LOCAL FUNCTION - - demangle_qualified -- demangle 'Q' qualified name strings - -SYNOPSIS - - static int - demangle_qualified (work_stuff *, const char *mangled, - string *result, int isfuncname, int append); - -DESCRIPTION - - Demangle a qualified name, such as "Q25Outer5Inner" which is - the mangled form of "Outer::Inner". The demangled output is - prepended or appended to the result string according to the - state of the append flag. - - If isfuncname is nonzero, then the qualified name we are building - is going to be used as a member function name, so if it is a - constructor or destructor function, append an appropriate - constructor or destructor name. I.E. for the above example, - the result for use as a constructor is "Outer::Inner::Inner" - and the result for use as a destructor is "Outer::Inner::~Inner". - -BUGS - - Numeric conversion is ASCII dependent (FIXME). - - */ - -static int -demangle_qualified ( - work_stuff *work, - const char **mangled, - string *result, - int isfuncname, - int append) -{ - int qualifiers = 0; - int success = 1; - string temp; - string last_name; - int bindex = register_Btype (work); - - /* We only make use of ISFUNCNAME if the entity is a constructor or - destructor. */ - isfuncname = (isfuncname - && ((work->constructor & 1) || (work->destructor & 1))); - - string_init (&temp); - string_init (&last_name); - - if ((*mangled)[0] == 'K') - { - /* Squangling qualified name reuse */ - int idx; - (*mangled)++; - idx = consume_count_with_underscores (mangled); - if (idx == -1 || idx >= work -> numk) - success = 0; - else - string_append (&temp, work -> ktypevec[idx]); - } - else - switch ((*mangled)[1]) - { - case '_': - /* GNU mangled name with more than 9 classes. The count is preceded - by an underscore (to distinguish it from the <= 9 case) and followed - by an underscore. */ - (*mangled)++; - qualifiers = consume_count_with_underscores (mangled); - if (qualifiers == -1) - success = 0; - break; - - case '1': - case '2': - case '3': - case '4': - case '5': - case '6': - case '7': - case '8': - case '9': - /* The count is in a single digit. */ - qualifiers = (*mangled)[1] - '0'; - - /* If there is an underscore after the digit, skip it. This is - said to be for ARM-qualified names, but the ARM makes no - mention of such an underscore. Perhaps cfront uses one. */ - if ((*mangled)[2] == '_') - { - (*mangled)++; - } - (*mangled) += 2; - break; - - case '0': - default: - success = 0; - } - - if (!success) - { - string_delete (&last_name); - string_delete (&temp); - return success; - } - - /* Pick off the names and collect them in the temp buffer in the order - in which they are found, separated by '::'. */ - - while (qualifiers-- > 0) - { - int remember_K = 1; - string_clear (&last_name); - - if (*mangled[0] == '_') - (*mangled)++; - - if (*mangled[0] == 't') - { - /* Here we always append to TEMP since we will want to use - the template name without the template parameters as a - constructor or destructor name. The appropriate - (parameter-less) value is returned by demangle_template - in LAST_NAME. We do not remember the template type here, - in order to match the G++ mangling algorithm. */ - success = demangle_template(work, mangled, &temp, - &last_name, 1, 0); - if (!success) - break; - } - else if (*mangled[0] == 'K') - { - int idx; - (*mangled)++; - idx = consume_count_with_underscores (mangled); - if (idx == -1 || idx >= work->numk) - success = 0; - else - string_append (&temp, work->ktypevec[idx]); - remember_K = 0; - - if (!success) break; - } - else - { - if (EDG_DEMANGLING) - { - int namelength; - /* Now recursively demangle the qualifier - * This is necessary to deal with templates in - * mangling styles like EDG */ - namelength = consume_count (mangled); - if (namelength == -1) - { - success = 0; - break; - } - recursively_demangle(work, mangled, &temp, namelength); - } - else - { - string temp_last_name; - string_init (&temp_last_name); - success = do_type (work, mangled, &temp_last_name); - if (!success) - { - string_delete (&temp_last_name); - break; - } - string_appends (&temp, &temp_last_name); - string_appends (&last_name, &temp_last_name); - string_delete (&temp_last_name); - } - } - - if (remember_K) - remember_Ktype (work, temp.b, LEN_STRING (&temp)); - - if (qualifiers > 0) - string_append (&temp, SCOPE_STRING (work)); - } - - remember_Btype (work, temp.b, LEN_STRING (&temp), bindex); - - /* If we are using the result as a function name, we need to append - the appropriate '::' separated constructor or destructor name. - We do this here because this is the most convenient place, where - we already have a pointer to the name and the length of the name. */ - - if (isfuncname) - { - string_append (&temp, SCOPE_STRING (work)); - if (work -> destructor & 1) - string_append (&temp, "~"); - string_appends (&temp, &last_name); - } - - /* Now either prepend the temp buffer to the result, or append it, - depending upon the state of the append flag. */ - - if (append) - string_appends (result, &temp); - else - { - if (!STRING_EMPTY (result)) - string_append (&temp, SCOPE_STRING (work)); - string_prepends (result, &temp); - } - - string_delete (&last_name); - string_delete (&temp); - return (success); -} - -/* - -LOCAL FUNCTION - - get_count -- convert an ascii count to integer, consuming tokens - -SYNOPSIS - - static int - get_count (const char **type, int *count) - -DESCRIPTION - - Assume that *type points at a count in a mangled name; set - *count to its value, and set *type to the next character after - the count. There are some weird rules in effect here. - - If *type does not point at a string of digits, return zero. - - If *type points at a string of digits followed by an - underscore, set *count to their value as an integer, advance - *type to point *after the underscore, and return 1. - - If *type points at a string of digits not followed by an - underscore, consume only the first digit. Set *count to its - value as an integer, leave *type pointing after that digit, - and return 1. - - The excuse for this odd behavior: in the ARM and HP demangling - styles, a type can be followed by a repeat count of the form - `Nxy', where: - - `x' is a single digit specifying how many additional copies - of the type to append to the argument list, and - - `y' is one or more digits, specifying the zero-based index of - the first repeated argument in the list. Yes, as you're - unmangling the name you can figure this out yourself, but - it's there anyway. - - So, for example, in `bar__3fooFPiN51', the first argument is a - pointer to an integer (`Pi'), and then the next five arguments - are the same (`N5'), and the first repeat is the function's - second argument (`1'). -*/ - -static int -get_count (const char **type, int *count) -{ - const char *p; - int n; - - if (!ISDIGIT ((unsigned char)**type)) - return (0); - else - { - *count = **type - '0'; - (*type)++; - if (ISDIGIT ((unsigned char)**type)) - { - p = *type; - n = *count; - do - { - n *= 10; - n += *p - '0'; - p++; - } - while (ISDIGIT ((unsigned char)*p)); - if (*p == '_') - { - *type = p + 1; - *count = n; - } - } - } - return (1); -} - -/* RESULT will be initialised here; it will be freed on failure. The - value returned is really a type_kind_t. */ - -static int -do_type (work_stuff *work, const char **mangled, string *result) -{ - int n; - int done; - int success; - string decl; - const char *remembered_type; - int type_quals; - string btype; - type_kind_t tk = tk_none; - - string_init (&btype); - string_init (&decl); - string_init (result); - - done = 0; - success = 1; - while (success && !done) - { - int member; - switch (**mangled) - { - - /* A pointer type */ - case 'P': - case 'p': - (*mangled)++; - string_prepend (&decl, "*"); - if (tk == tk_none) - tk = tk_pointer; - break; - - /* A reference type */ - case 'R': - (*mangled)++; - string_prepend (&decl, "&"); - if (tk == tk_none) - tk = tk_reference; - break; - - /* An array */ - case 'A': - { - ++(*mangled); - if (!STRING_EMPTY (&decl) - && (decl.b[0] == '*' || decl.b[0] == '&')) - { - string_prepend (&decl, "("); - string_append (&decl, ")"); - } - string_append (&decl, "["); - if (**mangled != '_') - success = demangle_template_value_parm (work, mangled, &decl, - tk_integral); - if (**mangled == '_') - ++(*mangled); - string_append (&decl, "]"); - break; - } - - /* A back reference to a previously seen type */ - case 'T': - (*mangled)++; - if (!get_count (mangled, &n) || n >= work -> ntypes) - { - success = 0; - } - else - { - remembered_type = work -> typevec[n]; - mangled = &remembered_type; - } - break; - - /* A function */ - case 'F': - (*mangled)++; - if (!STRING_EMPTY (&decl) - && (decl.b[0] == '*' || decl.b[0] == '&')) - { - string_prepend (&decl, "("); - string_append (&decl, ")"); - } - /* After picking off the function args, we expect to either find the - function return type (preceded by an '_') or the end of the - string. */ - if (!demangle_nested_args (work, mangled, &decl) - || (**mangled != '_' && **mangled != '\0')) - { - success = 0; - break; - } - if (success && (**mangled == '_')) - (*mangled)++; - break; - - case 'M': - case 'O': - { - type_quals = TYPE_UNQUALIFIED; - - member = **mangled == 'M'; - (*mangled)++; - - string_append (&decl, ")"); - - /* We don't need to prepend `::' for a qualified name; - demangle_qualified will do that for us. */ - if (**mangled != 'Q') - string_prepend (&decl, SCOPE_STRING (work)); - - if (ISDIGIT ((unsigned char)**mangled)) - { - n = consume_count (mangled); - if (n == -1 - || (int) strlen (*mangled) < n) - { - success = 0; - break; - } - string_prependn (&decl, *mangled, n); - *mangled += n; - } - else if (**mangled == 'X' || **mangled == 'Y') - { - string temp; - do_type (work, mangled, &temp); - string_prepends (&decl, &temp); - } - else if (**mangled == 't') - { - string temp; - string_init (&temp); - success = demangle_template (work, mangled, &temp, - NULL, 1, 1); - if (success) - { - string_prependn (&decl, temp.b, temp.p - temp.b); - string_clear (&temp); - } - else - break; - } - else if (**mangled == 'Q') - { - success = demangle_qualified (work, mangled, &decl, - /*isfuncnam=*/0, - /*append=*/0); - if (!success) - break; - } - else - { - success = 0; - break; - } - - string_prepend (&decl, "("); - if (member) - { - switch (**mangled) - { - case 'C': - case 'V': - case 'u': - type_quals |= code_for_qualifier (**mangled); - (*mangled)++; - break; - - default: - break; - } - - if (*(*mangled)++ != 'F') - { - success = 0; - break; - } - } - if ((member && !demangle_nested_args (work, mangled, &decl)) - || **mangled != '_') - { - success = 0; - break; - } - (*mangled)++; - if (! PRINT_ANSI_QUALIFIERS) - { - break; - } - if (type_quals != TYPE_UNQUALIFIED) - { - APPEND_BLANK (&decl); - string_append (&decl, qualifier_string (type_quals)); - } - break; - } - case 'G': - (*mangled)++; - break; - - case 'C': - case 'V': - case 'u': - if (PRINT_ANSI_QUALIFIERS) - { - if (!STRING_EMPTY (&decl)) - string_prepend (&decl, " "); - - string_prepend (&decl, demangle_qualifier (**mangled)); - } - (*mangled)++; - break; - /* - } - */ - - /* fall through */ - default: - done = 1; - break; - } - } - - if (success) switch (**mangled) - { - /* A qualified name, such as "Outer::Inner". */ - case 'Q': - case 'K': - { - success = demangle_qualified (work, mangled, result, 0, 1); - break; - } - - /* A back reference to a previously seen squangled type */ - case 'B': - (*mangled)++; - if (!get_count (mangled, &n) || n >= work -> numb) - success = 0; - else - string_append (result, work->btypevec[n]); - break; - - case 'X': - case 'Y': - /* A template parm. We substitute the corresponding argument. */ - { - int idx; - - (*mangled)++; - idx = consume_count_with_underscores (mangled); - - if (idx == -1 - || (work->tmpl_argvec && idx >= work->ntmpl_args) - || consume_count_with_underscores (mangled) == -1) - { - success = 0; - break; - } - - if (work->tmpl_argvec) - string_append (result, work->tmpl_argvec[idx]); - else - string_append_template_idx (result, idx); - - success = 1; - } - break; - - default: - success = demangle_fund_type (work, mangled, result); - if (tk == tk_none) - tk = (type_kind_t) success; - break; - } - - if (success) - { - if (!STRING_EMPTY (&decl)) - { - string_append (result, " "); - string_appends (result, &decl); - } - } - else - string_delete (result); - string_delete (&decl); - - if (success) - /* Assume an integral type, if we're not sure. */ - return (int) ((tk == tk_none) ? tk_integral : tk); - else - return 0; -} - -/* Given a pointer to a type string that represents a fundamental type - argument (int, long, unsigned int, etc) in TYPE, a pointer to the - string in which the demangled output is being built in RESULT, and - the WORK structure, decode the types and add them to the result. - - For example: - - "Ci" => "const int" - "Sl" => "signed long" - "CUs" => "const unsigned short" - - The value returned is really a type_kind_t. */ - -static int -demangle_fund_type (work_stuff *work, const char **mangled, string *result) -{ - int done = 0; - int success = 1; - char buf[10]; - unsigned int dec = 0; - string btype; - type_kind_t tk = tk_integral; - - string_init (&btype); - - /* First pick off any type qualifiers. There can be more than one. */ - - while (!done) - { - switch (**mangled) - { - case 'C': - case 'V': - case 'u': - if (PRINT_ANSI_QUALIFIERS) - { - if (!STRING_EMPTY (result)) - string_prepend (result, " "); - string_prepend (result, demangle_qualifier (**mangled)); - } - (*mangled)++; - break; - case 'U': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "unsigned"); - break; - case 'S': /* signed char only */ - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "signed"); - break; - case 'J': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "__complex"); - break; - default: - done = 1; - break; - } - } - - /* Now pick off the fundamental type. There can be only one. */ - - switch (**mangled) - { - case '\0': - case '_': - break; - case 'v': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "void"); - break; - case 'x': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "long long"); - break; - case 'l': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "long"); - break; - case 'i': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "int"); - break; - case 's': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "short"); - break; - case 'b': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "bool"); - tk = tk_bool; - break; - case 'c': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "char"); - tk = tk_char; - break; - case 'w': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "wchar_t"); - tk = tk_char; - break; - case 'r': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "long double"); - tk = tk_real; - break; - case 'd': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "double"); - tk = tk_real; - break; - case 'f': - (*mangled)++; - APPEND_BLANK (result); - string_append (result, "float"); - tk = tk_real; - break; - case 'G': - (*mangled)++; - if (!ISDIGIT ((unsigned char)**mangled)) - { - success = 0; - break; - } - case 'I': - (*mangled)++; - if (**mangled == '_') - { - int i; - (*mangled)++; - for (i = 0; - i < (long) sizeof (buf) - 1 && **mangled && **mangled != '_'; - (*mangled)++, i++) - buf[i] = **mangled; - if (**mangled != '_') - { - success = 0; - break; - } - buf[i] = '\0'; - (*mangled)++; - } - else - { - strncpy (buf, *mangled, 2); - buf[2] = '\0'; - *mangled += min (strlen (*mangled), 2); - } - /*sscanf (buf, "%x", &dec); - sprintf (buf, "int%u_t", dec);*/ - sprintf (buf, "i_xx_t"); - APPEND_BLANK (result); - string_append (result, buf); - break; - - /* fall through */ - /* An explicit type, such as "6mytype" or "7integer" */ - case '0': - case '1': - case '2': - case '3': - case '4': - case '5': - case '6': - case '7': - case '8': - case '9': - { - int bindex = register_Btype (work); - string loc_btype; - string_init (&loc_btype); - if (demangle_class_name (work, mangled, &loc_btype)) { - remember_Btype (work, loc_btype.b, LEN_STRING (&loc_btype), bindex); - APPEND_BLANK (result); - string_appends (result, &loc_btype); - } - else - success = 0; - string_delete (&loc_btype); - break; - } - case 't': - { - success = demangle_template (work, mangled, &btype, 0, 1, 1); - string_appends (result, &btype); - break; - } - default: - success = 0; - break; - } - - string_delete (&btype); - - return success ? ((int) tk) : 0; -} - - -/* Handle a template's value parameter for HP aCC (extension from ARM) - **mangled points to 'S' or 'U' */ - -static int -do_hpacc_template_const_value ( - work_stuff *work ATTRIBUTE_UNUSED, - const char **mangled, - string *result) -{ - int unsigned_const; - - if (**mangled != 'U' && **mangled != 'S') - return 0; - - unsigned_const = (**mangled == 'U'); - - (*mangled)++; - - switch (**mangled) - { - case 'N': - string_append (result, "-"); - /* fall through */ - case 'P': - (*mangled)++; - break; - case 'M': - /* special case for -2^31 */ - string_append (result, "-2147483648"); - (*mangled)++; - return 1; - default: - return 0; - } - - /* We have to be looking at an integer now */ - if (!(ISDIGIT ((unsigned char)**mangled))) - return 0; - - /* We only deal with integral values for template - parameters -- so it's OK to look only for digits */ - while (ISDIGIT ((unsigned char)**mangled)) - { - char_str[0] = **mangled; - string_append (result, char_str); - (*mangled)++; - } - - if (unsigned_const) - string_append (result, "U"); - - /* FIXME? Some day we may have 64-bit (or larger :-) ) constants - with L or LL suffixes. pai/1997-09-03 */ - - return 1; /* success */ -} - -/* Handle a template's literal parameter for HP aCC (extension from ARM) - **mangled is pointing to the 'A' */ - -static int -do_hpacc_template_literal ( - work_stuff *work, - const char **mangled, - string *result) -{ - int literal_len = 0; - char * recurse; - char * recurse_dem; - - if (**mangled != 'A') - return 0; - - (*mangled)++; - - literal_len = consume_count (mangled); - - if (literal_len <= 0) - return 0; - - /* Literal parameters are names of arrays, functions, etc. and the - canonical representation uses the address operator */ - string_append (result, "&"); - - /* Now recursively demangle the literal name */ - recurse = (char *) xmalloc (literal_len + 1); - memcpy (recurse, *mangled, literal_len); - recurse[literal_len] = '\000'; - - recurse_dem = cplus_demangle (recurse, work->options); - - if (recurse_dem) - { - string_append (result, recurse_dem); - free (recurse_dem); - } - else - { - string_appendn (result, *mangled, literal_len); - } - (*mangled) += literal_len; - free (recurse); - - return 1; -} - -static int -snarf_numeric_literal (const char **args, string *arg) -{ - if (**args == '-') - { - char_str[0] = '-'; - string_append (arg, char_str); - (*args)++; - } - else if (**args == '+') - (*args)++; - - if (!ISDIGIT ((unsigned char)**args)) - return 0; - - while (ISDIGIT ((unsigned char)**args)) - { - char_str[0] = **args; - string_append (arg, char_str); - (*args)++; - } - - return 1; -} - -/* Demangle the next argument, given by MANGLED into RESULT, which - *should be an uninitialized* string. It will be initialized here, - and free'd should anything go wrong. */ - -static int -do_arg ( - work_stuff *work, - const char **mangled, - string *result) -{ - /* Remember where we started so that we can record the type, for - non-squangling type remembering. */ - const char *start = *mangled; - string temp_result; - - string_init (result); - string_init (&temp_result); - - if (work->nrepeats > 0) - { - --work->nrepeats; - - if (work->previous_argument == 0) - return 0; - - /* We want to reissue the previous type in this argument list. */ - string_appends (result, work->previous_argument); - return 1; - } - - if (**mangled == 'n') - { - /* A squangling-style repeat. */ - (*mangled)++; - work->nrepeats = consume_count(mangled); - - if (work->nrepeats <= 0) - /* This was not a repeat count after all. */ - return 0; - - if (work->nrepeats > 9) - { - if (**mangled != '_') - /* The repeat count should be followed by an '_' in this - case. */ - return 0; - else - (*mangled)++; - } - - /* Now, the repeat is all set up. */ - return do_arg (work, mangled, result); - } - - /* Save the result in WORK->previous_argument so that we can find it - if it's repeated. Note that saving START is not good enough: we - do not want to add additional types to the back-referenceable - type vector when processing a repeated type. */ - if (work->previous_argument) - string_clear (work->previous_argument); - else - { - work->previous_argument = (string*) xmalloc (sizeof (string)); - string_init (work->previous_argument); - } - - if (!do_type (work, mangled, &temp_result)) - { - string_delete (&temp_result); - return 0; - } - string_appends (work->previous_argument, &temp_result); - string_delete (&temp_result); - - string_appends (result, work->previous_argument); - - remember_type (work, start, *mangled - start); - return 1; -} - -static void -remember_type ( - work_stuff *work, - const char *start, - int len) -{ - char *tem; - - if (work->forgetting_types) - return; - - if (work -> ntypes >= work -> typevec_size) - { - if (work -> typevec_size == 0) - { - work -> typevec_size = 3; - work -> typevec - = (char **) xmalloc (sizeof (char *) * work -> typevec_size); - } - else - { - work -> typevec_size *= 2; - work -> typevec - = (char **) xrealloc ((char *)work -> typevec, - sizeof (char *) * work -> typevec_size); - } - } - tem = (char *) xmalloc (len + 1); - memcpy (tem, start, len); - tem[len] = '\0'; - work -> typevec[work -> ntypes++] = tem; -} - - -/* Remember a K type class qualifier. */ -static void -remember_Ktype ( - work_stuff *work, - const char *start, - int len) -{ - char *tem; - - if (work -> numk >= work -> ksize) - { - if (work -> ksize == 0) - { - work -> ksize = 5; - work -> ktypevec - = (char **) xmalloc (sizeof (char *) * work -> ksize); - } - else - { - work -> ksize *= 2; - work -> ktypevec - = (char **) xrealloc ((char *)work -> ktypevec, - sizeof (char *) * work -> ksize); - } - } - tem = (char *) xmalloc (len + 1); - memcpy (tem, start, len); - tem[len] = '\0'; - work -> ktypevec[work -> numk++] = tem; -} - -/* Register a B code, and get an index for it. B codes are registered - as they are seen, rather than as they are completed, so map > - registers map > as B0, and temp as B1 */ - -static int -register_Btype (work_stuff *work) -{ - int ret; - - if (work -> numb >= work -> bsize) - { - if (work -> bsize == 0) - { - work -> bsize = 5; - work -> btypevec - = (char **) xmalloc (sizeof (char *) * work -> bsize); - } - else - { - work -> bsize *= 2; - work -> btypevec - = (char **) xrealloc ((char *)work -> btypevec, - sizeof (char *) * work -> bsize); - } - } - ret = work -> numb++; - work -> btypevec[ret] = NULL; - return(ret); -} - -/* Store a value into a previously registered B code type. */ - -static void -remember_Btype ( - work_stuff *work, - const char *start, - int len, int ind) -{ - char *tem; - - tem = (char *) xmalloc (len + 1); - memcpy (tem, start, len); - tem[len] = '\0'; - work -> btypevec[ind] = tem; -} - -/* Lose all the info related to B and K type codes. */ -static void -forget_B_and_K_types (work_stuff *work) -{ - int i; - - while (work -> numk > 0) - { - i = --(work -> numk); - if (work -> ktypevec[i] != NULL) - { - free (work -> ktypevec[i]); - work -> ktypevec[i] = NULL; - } - } - - while (work -> numb > 0) - { - i = --(work -> numb); - if (work -> btypevec[i] != NULL) - { - free (work -> btypevec[i]); - work -> btypevec[i] = NULL; - } - } -} -/* Forget the remembered types, but not the type vector itself. */ - -static void -forget_types (work_stuff *work) -{ - int i; - - while (work -> ntypes > 0) - { - i = --(work -> ntypes); - if (work -> typevec[i] != NULL) - { - free (work -> typevec[i]); - work -> typevec[i] = NULL; - } - } -} - -/* Process the argument list part of the signature, after any class spec - has been consumed, as well as the first 'F' character (if any). For - example: - - "__als__3fooRT0" => process "RT0" - "complexfunc5__FPFPc_PFl_i" => process "PFPc_PFl_i" - - DECLP must be already initialised, usually non-empty. It won't be freed - on failure. - - Note that g++ differs significantly from ARM and lucid style mangling - with regards to references to previously seen types. For example, given - the source fragment: - - class foo { - public: - foo::foo (int, foo &ia, int, foo &ib, int, foo &ic); - }; - - foo::foo (int, foo &ia, int, foo &ib, int, foo &ic) { ia = ib = ic; } - void foo (int, foo &ia, int, foo &ib, int, foo &ic) { ia = ib = ic; } - - g++ produces the names: - - __3fooiRT0iT2iT2 - foo__FiR3fooiT1iT1 - - while lcc (and presumably other ARM style compilers as well) produces: - - foo__FiR3fooT1T2T1T2 - __ct__3fooFiR3fooT1T2T1T2 - - Note that g++ bases its type numbers starting at zero and counts all - previously seen types, while lucid/ARM bases its type numbers starting - at one and only considers types after it has seen the 'F' character - indicating the start of the function args. For lucid/ARM style, we - account for this difference by discarding any previously seen types when - we see the 'F' character, and subtracting one from the type number - reference. - - */ - -static int -demangle_args ( - work_stuff *work, - const char **mangled, - string *declp) -{ - string arg; - int need_comma = 0; - int r; - int t; - const char *tem; - char temptype; - - if (PRINT_ARG_TYPES) - { - string_append (declp, "("); - if (**mangled == '\0') - { - string_append (declp, "void"); - } - } - - while ((**mangled != '_' && **mangled != '\0' && **mangled != 'e') - || work->nrepeats > 0) - { - if ((**mangled == 'N') || (**mangled == 'T')) - { - temptype = *(*mangled)++; - - if (temptype == 'N') - { - if (!get_count (mangled, &r)) - { - return (0); - } - } - else - { - r = 1; - } - if ((HP_DEMANGLING || ARM_DEMANGLING || EDG_DEMANGLING) && work -> ntypes >= 10) - { - /* If we have 10 or more types we might have more than a 1 digit - index so we'll have to consume the whole count here. This - will lose if the next thing is a type name preceded by a - count but it's impossible to demangle that case properly - anyway. Eg if we already have 12 types is T12Pc "(..., type1, - Pc, ...)" or "(..., type12, char *, ...)" */ - if ((t = consume_count(mangled)) <= 0) - { - return (0); - } - } - else - { - if (!get_count (mangled, &t)) - { - return (0); - } - } - if (LUCID_DEMANGLING || ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) - { - t--; - } - /* Validate the type index. Protect against illegal indices from - malformed type strings. */ - if ((t < 0) || (t >= work -> ntypes)) - { - return (0); - } - while (work->nrepeats > 0 || --r >= 0) - { - tem = work -> typevec[t]; - if (need_comma && PRINT_ARG_TYPES) - { - string_append (declp, ", "); - } - if (!do_arg (work, &tem, &arg)) - { - return (0); - } - if (PRINT_ARG_TYPES) - { - string_appends (declp, &arg); - } - string_delete (&arg); - need_comma = 1; - } - } - else - { - if (need_comma && PRINT_ARG_TYPES) - string_append (declp, ", "); - if (!do_arg (work, mangled, &arg)) - { - string_delete (&arg); - return (0); - } - if (PRINT_ARG_TYPES) - string_appends (declp, &arg); - string_delete (&arg); - need_comma = 1; - } - } - - if (**mangled == 'e') - { - (*mangled)++; - if (PRINT_ARG_TYPES) - { - if (need_comma) - { - string_append (declp, ","); - } - string_append (declp, "..."); - } - } - - if (PRINT_ARG_TYPES) - { - string_append (declp, ")"); - } - return (1); -} - -/* Like demangle_args, but for demangling the argument lists of function - and method pointers or references, not top-level declarations. */ - -static int -demangle_nested_args ( - work_stuff *work, - const char **mangled, - string *declp) -{ - string* saved_previous_argument; - int result; - int saved_nrepeats; - - /* The G++ name-mangling algorithm does not remember types on nested - argument lists, unless -fsquangling is used, and in that case the - type vector updated by remember_type is not used. So, we turn - off remembering of types here. */ - ++work->forgetting_types; - - /* For the repeat codes used with -fsquangling, we must keep track of - the last argument. */ - saved_previous_argument = work->previous_argument; - saved_nrepeats = work->nrepeats; - work->previous_argument = 0; - work->nrepeats = 0; - - /* Actually demangle the arguments. */ - result = demangle_args (work, mangled, declp); - - /* Restore the previous_argument field. */ - if (work->previous_argument) - { - string_delete (work->previous_argument); - free ((char*) work->previous_argument); - } - work->previous_argument = saved_previous_argument; - --work->forgetting_types; - work->nrepeats = saved_nrepeats; - - return result; -} - -static void -demangle_function_name ( - work_stuff *work, - const char **mangled, - string *declp, - const char *scan) -{ - size_t i; - string type; - const char *tem; - - string_appendn (declp, (*mangled), scan - (*mangled)); - string_need (declp, 1); - *(declp -> p) = '\0'; - - /* Consume the function name, including the "__" separating the name - from the signature. We are guaranteed that SCAN points to the - separator. */ - - (*mangled) = scan + 2; - /* We may be looking at an instantiation of a template function: - foo__Xt1t2_Ft3t4, where t1, t2, ... are template arguments and a - following _F marks the start of the function arguments. Handle - the template arguments first. */ - - if (HP_DEMANGLING && (**mangled == 'X')) - { - demangle_arm_hp_template (work, mangled, 0, declp); - /* This leaves MANGLED pointing to the 'F' marking func args */ - } - - if (LUCID_DEMANGLING || ARM_DEMANGLING || HP_DEMANGLING || EDG_DEMANGLING) - { - - /* See if we have an ARM style constructor or destructor operator. - If so, then just record it, clear the decl, and return. - We can't build the actual constructor/destructor decl until later, - when we recover the class name from the signature. */ - - if (strcmp (declp -> b, "__ct") == 0) - { - work -> constructor += 1; - string_clear (declp); - return; - } - else if (strcmp (declp -> b, "__dt") == 0) - { - work -> destructor += 1; - string_clear (declp); - return; - } - } - - if (declp->p - declp->b >= 3 - && declp->b[0] == 'o' - && declp->b[1] == 'p' - && strchr (cplus_markers, declp->b[2]) != NULL) - { - /* see if it's an assignment expression */ - if (declp->p - declp->b >= 10 /* op$assign_ */ - && memcmp (declp->b + 3, "assign_", 7) == 0) - { - for (i = 0; i < (size_t)ARRAY_SIZE (optable); i++) - { - int len = declp->p - declp->b - 10; - if ((int) strlen (optable[i].in) == len - && memcmp (optable[i].in, declp->b + 10, len) == 0) - { - string_clear (declp); - string_append (declp, "operator"); - string_append (declp, optable[i].out); - string_append (declp, "="); - break; - } - } - } - else - { - for (i = 0; i < (size_t)ARRAY_SIZE (optable); i++) - { - int len = declp->p - declp->b - 3; - if ((int) strlen (optable[i].in) == len - && memcmp (optable[i].in, declp->b + 3, len) == 0) - { - string_clear (declp); - string_append (declp, "operator"); - string_append (declp, optable[i].out); - break; - } - } - } - } - else if (declp->p - declp->b >= 5 && memcmp (declp->b, "type", 4) == 0 - && strchr (cplus_markers, declp->b[4]) != NULL) - { - /* type conversion operator */ - tem = declp->b + 5; - if (do_type (work, &tem, &type)) - { - string_clear (declp); - string_append (declp, "operator "); - string_appends (declp, &type); - string_delete (&type); - } - } - else if (declp->b[0] == '_' && declp->b[1] == '_' - && declp->b[2] == 'o' && declp->b[3] == 'p') - { - /* ANSI. */ - /* type conversion operator. */ - tem = declp->b + 4; - if (do_type (work, &tem, &type)) - { - string_clear (declp); - string_append (declp, "operator "); - string_appends (declp, &type); - string_delete (&type); - } - } - else if (declp->b[0] == '_' && declp->b[1] == '_' - && ISLOWER((unsigned char)declp->b[2]) - && ISLOWER((unsigned char)declp->b[3])) - { - if (declp->b[4] == '\0') - { - /* Operator. */ - for (i = 0; i < (size_t)ARRAY_SIZE (optable); i++) - { - if (strlen (optable[i].in) == 2 - && memcmp (optable[i].in, declp->b + 2, 2) == 0) - { - string_clear (declp); - string_append (declp, "operator"); - string_append (declp, optable[i].out); - break; - } - } - } - else - { - if (declp->b[2] == 'a' && declp->b[5] == '\0') - { - /* Assignment. */ - for (i = 0; i < (size_t)ARRAY_SIZE (optable); i++) - { - if (strlen (optable[i].in) == 3 - && memcmp (optable[i].in, declp->b + 2, 3) == 0) - { - string_clear (declp); - string_append (declp, "operator"); - string_append (declp, optable[i].out); - break; - } - } - } - } - } -} - -/* a mini string-handling package */ - -static void -string_need (string *s, int n) -{ - int tem; - - if (s->b == NULL) - { - if (n < 32) - { - n = 32; - } - s->p = s->b = (char *) xmalloc (n); - s->e = s->b + n; - } - else if (s->e - s->p < n) - { - tem = s->p - s->b; - n += tem; - n *= 2; - s->b = (char *) xrealloc (s->b, n); - s->p = s->b + tem; - s->e = s->b + n; - } -} - -static void -string_delete (string *s) -{ - if (s->b != NULL) - { - free (s->b); - s->b = s->e = s->p = NULL; - } -} - -static void -string_init (string *s) -{ - s->b = s->p = s->e = NULL; -} - -static void -string_clear (string *s) -{ - s->p = s->b; -} - -static void -string_append (string *p, const char *s) -{ - int n; - if (s == NULL || *s == '\0') - return; - n = strlen (s); - string_need (p, n); - memcpy (p->p, s, n); - p->p += n; -} - -static void -string_appends (string *p, string *s) -{ - int n; - - if (s->b != s->p) - { - n = s->p - s->b; - string_need (p, n); - memcpy (p->p, s->b, n); - p->p += n; - } -} - -static void -string_appendn (string *p, const char *s, int n) -{ - if (n != 0) - { - string_need (p, n); - memcpy (p->p, s, n); - p->p += n; - } -} - -static void -string_prepend (string *p, const char *s) -{ - if (s != NULL && *s != '\0') - { - string_prependn (p, s, strlen (s)); - } -} - -static void -string_prepends (string *p, string *s) -{ - if (s->b != s->p) - { - string_prependn (p, s->b, s->p - s->b); - } -} - -static void -string_prependn (string *p, const char *s, int n) -{ - char *q; - - if (n != 0) - { - string_need (p, n); - for (q = p->p - 1; q >= p->b; q--) - { - q[n] = q[0]; - } - memcpy (p->b, s, n); - p->p += n; - } -} - -static void -string_append_template_idx (string *s, int idx) -{ - char buf[INTBUF_SIZE + 1 /* 'T' */]; - sprintf(buf, "T%d", idx); - string_append (s, buf); -} -#endif - -#ifdef STANDALONE_DEMANGLER -#include -#include - -int main(int argc, char *argv[]) -{ - for (int i = 1; i < argc; i++) { - const char *mangled_name = argv[i]; - char *demangled_name = cxx_demangle(mangled_name, NULL, NULL, NULL); - if (demangled_name == NULL) - printf("Could not demangle string '%s'\n", mangled_name); - else { - printf("'%s'\n -> '%s'\n\n", mangled_name, demangled_name); - free(demangled_name); - } - } -} -#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.h deleted file mode 100644 index 6b634f4b1..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/cxxdemangle.h +++ /dev/null @@ -1,55 +0,0 @@ -/* - * cxxdemangle.h - C++ demangler - * - * Kheperix (C) 2003-2005-2004 Gwenole Beauchesne - * - * 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 CXX_DEMANGLE_H -#define CXX_DEMANGLE_H - -/** - * cxx_demangle - * - * Following GCC 3.0 ABI: - * - * - * - MANGLED-NAME is a pointer to a null-terminated array of - * characters - * - * - BUF may be null. If it is non-null, then N must also be - * nonnull, and BUF is a pointer to an array, of at least *N - * characters, that was allocated using malloc(). - * - * - STATUS points to an int that is used as an error indicator. It - * is permitted to be null, in which case the user just doesn't - * get any detailed error information. - * - * Codes: 0: success - * -1: memory allocation failure - * -2: invalid mangled name - * -3: invalid arguments (e.g. BUG nonnull and N null) - **/ - -#ifdef __cplusplus -extern "C" -#endif -char *cxx_demangle(const char *mangled_name, - char *buf, - size_t *n, - int *status); - -#endif /* CXX_DEMANGLE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/dummy/jit-target-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/dummy/jit-target-cache.hpp deleted file mode 100644 index 8bed86af1..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/dummy/jit-target-cache.hpp +++ /dev/null @@ -1,28 +0,0 @@ -/* - * jit-target-cache.hpp - Target specific code to invalidate cache - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_TARGET_CACHE_H -#define JIT_TARGET_CACHE_H - -static inline void flush_icache_range(unsigned long, unsigned long) -{ -} - -#endif /* JIT_TARGET_CACHE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h deleted file mode 100644 index 8c12fe6b8..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen-exec.h +++ /dev/null @@ -1,182 +0,0 @@ -/* - * dyngen defines for micro operation code - * - * Copyright (c) 2003-2004-2004 Fabrice Bellard - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef DYNGEN_EXEC_H -#define DYNGEN_EXEC_H - -#include "cpu/jit/jit-config.hpp" - -#define _JIT_HEADER dyngen-target-exec.h -#include "cpu/jit/jit-target-dispatch.h" - -/* define virtual register set */ -#define REG_CPU AREG0 -#define REG_CPU_ID AREG0_ID -#define REG_T0 AREG1 -#define REG_T0_ID AREG1_ID -#define REG_T1 AREG2 -#define REG_T1_ID AREG2_ID -#define REG_T2 AREG3 -#define REG_T2_ID AREG3_ID -#ifdef AREG4 -#define REG_T3 AREG4 -#define REG_T3_ID AREG4_ID -#endif -#ifdef FREG3 -#define REG_F0 FREG0 -#define REG_F0_ID FREG0_ID -#define REG_F1 FREG1 -#define REG_F1_ID FREG1_ID -#define REG_F2 FREG2 -#define REG_F2_ID FREG2_ID -#define REG_F3 FREG3 -#define REG_F3_ID FREG3_ID -#endif -#ifdef VREG3 -#define REG_V0 VREG0 -#define REG_V0_ID VREG0_ID -#define REG_V1 VREG1 -#define REG_V1_ID VREG1_ID -#define REG_V2 VREG2 -#define REG_V2_ID VREG2_ID -#define REG_V3 VREG3 -#define REG_V3_ID VREG3_ID -#endif - -// Force only one return point -#define dyngen_barrier() asm volatile ("") - -#ifndef OPPROTO -#define OPPROTO -#endif - -#ifdef __alpha__ -/* the symbols are considered non exported so a br immediate is generated */ -#define __hidden __attribute__((visibility("hidden"))) -#else -#define __hidden -#endif - -#ifdef __alpha__ -/* Suggested by Richard Henderson. This will result in code like - ldah $0,__op_PARAM1($29) !gprelhigh - lda $0,__op_PARAM1($0) !gprellow - We can then conveniently change $29 to $31 and adapt the offsets to - emit the appropriate constant. */ -#define PARAM1 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_PARAM1)); _r; }) -#define PARAM2 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_PARAM2)); _r; }) -#define PARAM3 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_PARAM3)); _r; }) -extern int __op_PARAM1 __hidden; -extern int __op_PARAM2 __hidden; -extern int __op_PARAM3 __hidden; -#elif defined __mips__ -/* On MIPS, parameters to a C expression are passed via the global pointer. - * We don't want that. */ -#define PARAMN(index) ({ register int _r; \ - asm("lui %0,%%hi(__op_PARAM" #index ")\n\t" \ - "ori %0,%0,%%lo(__op_PARAM" #index ")" \ - : "=r"(_r)); _r; }) -#define PARAM1 PARAMN(1) -#define PARAM2 PARAMN(2) -#define PARAM3 PARAMN(3) -#else -#if defined(__APPLE__) && defined(__MACH__) -static int __op_PARAM1, __op_PARAM2, __op_PARAM3; -#else -extern int __op_PARAM1, __op_PARAM2, __op_PARAM3; -#endif -#define PARAM1 ((long)(&__op_PARAM1)) -#define PARAM2 ((long)(&__op_PARAM2)) -#define PARAM3 ((long)(&__op_PARAM3)) -#endif - -// Direct block chaining support -#if defined(__powerpc__) || defined(__ppc__) -#define DYNGEN_FAST_DISPATCH(TARGET) asm volatile ("b " ASM_NAME(TARGET)) -#endif -#if defined(__i386__) || defined(__x86_64__) -#define DYNGEN_FAST_DISPATCH(TARGET) asm volatile ("jmp " ASM_NAME(TARGET)) -#endif - -#define DYNGEN_SLOW_DISPATCH(TARGET) do { \ - static const void __attribute__((unused)) *label1 = &&dummy_label1; \ - static const void __attribute__((unused)) *label2 = &&dummy_label2; \ - goto *((void *)TARGET); \ - dummy_label1: \ - dummy_label2: \ - dyngen_barrier(); \ -} while (0) - -extern int __op_jmp0, __op_jmp1; - -// Sections handling -#if defined(__CYGWIN__) || defined(_WIN32) -#define ASM_DATA_SECTION ".section .data\n" -#define ASM_PREVIOUS_SECTION ".section .text\n" -#define ASM_GLOBAL ".global" -#define ASM_NAME(NAME) "_" #NAME -#define ASM_SIZE(NAME) "" -#elif defined(__APPLE__) && defined(__MACH__) -#define ASM_DATA_SECTION ".data\n" -#define ASM_PREVIOUS_SECTION ".text\n" -#define ASM_GLOBAL ".globl" -#define ASM_NAME(NAME) "_" #NAME -#define ASM_SIZE(NAME) "" -#if defined(__ppc__) -#define ASM_OP_EXEC_RETURN_INSN "0x18,0xde,0xad,0xff" -#endif -#if defined(__i386__) -#define ASM_OP_EXEC_RETURN_INSN "0x0f,0xa6,0xf0" -#endif -#elif defined __sgi && defined __mips -#define ASM_DATA_SECTION ".data\n" -#define ASM_PREVIOUS_SECTION ".text\n" -#define ASM_GLOBAL ".globl" -#define ASM_NAME(NAME) #NAME -#define ASM_SIZE(NAME) "" -#define ASM_LONG ".word" -#else -#define ASM_DATA_SECTION ".section \".data\"\n" -#define ASM_PREVIOUS_SECTION ".previous\n" -#define ASM_GLOBAL ".global" -#define ASM_NAME(NAME) #NAME -#define ASM_SIZE(NAME) ".size " ASM_NAME(NAME) ",.-" ASM_NAME(NAME) -#endif -#ifndef ASM_LONG -#define ASM_LONG ".long" -#endif - -// Helper macros to annotate likely branch directions -#if __GNUC__ >= 3 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96) -#ifndef likely -#define likely(x) __builtin_expect((x),1) -#endif -#ifndef unlikely -#define unlikely(x) __builtin_expect((x),0) -#endif -#endif -#ifndef likely -#define likely(x) (x) -#endif -#ifndef unlikely -#define unlikely(x) (x) -#endif - -#endif /* DYNGEN_EXEC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c deleted file mode 100644 index b6ead7922..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c +++ /dev/null @@ -1,3027 +0,0 @@ -/* - * Generic Dynamic compiler generator - * - * Copyright (c) 2003-2004 Fabrice Bellard - * - * The COFF object format support was extracted from Kazu's QEMU port - * to Win32. - * - * Mach-O Support by Matt Reda and Pierre d'Herbemont - * - * 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., 675 Mass Ave, Cambridge, MA 02139, USA. - */ -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cxxdemangle.h" - -/* object file format defs */ -#ifndef CONFIG_WIN32 -#if defined(__CYGWIN__) || defined(_WIN32) -#define CONFIG_WIN32 1 -#endif -#endif -#ifndef CONFIG_DARWIN -#if defined(__APPLE__) && defined(__MACH__) -#define CONFIG_DARWIN 1 -#endif -#endif - -/* host cpu defs */ -#if CONFIG_WIN32 -#define HOST_I386 1 -#elif defined(__i386__) -#define HOST_I386 1 -#elif defined(__powerpc__) || defined(__ppc__) -#define HOST_PPC 1 -#elif defined(__s390__) -#define HOST_S390 1 -#elif defined(__alpha__) -#define HOST_ALPHA 1 -#elif defined(__ia64__) -#define HOST_IA64 1 -#elif defined(__sparc__) -#define HOST_SPARC 1 -#elif defined(__x86_64__) -#define HOST_X86_64 1 -#elif defined(__m68k__) -#define HOST_M68K 1 -#elif defined(__mips__) -#define HOST_MIPS 1 -#endif - -/* Debug generated code */ -#if ENABLE_MON && (defined(HOST_I386) || defined(HOST_X86_64)) && 0 -#define DYNGEN_PRETTY_PRINT 1 - -#include "disass/dis-asm.h" - -static inline bfd_byte bfd_read_byte(bfd_vma from) -{ - bfd_byte *p = (bfd_byte *)(uintptr_t)from; - return *p; -} - -int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) -{ - while (length--) - *to++ = bfd_read_byte(from++); - return 0; -} - -void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) -{ - info->fprintf_func(info->stream, "Unknown error %d\n", status); -} - -static uintptr_t print_address_base; - -void generic_print_address(bfd_vma addr, struct disassemble_info *info) -{ - addr -= print_address_base; - if (addr >= UVAL64(0x100000000)) - info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); - else - info->fprintf_func(info->stream, "$%08x", (uint32)addr); -} - -int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) -{ - return 0; -} - -struct SFILE { - char *buffer; - char *current; -}; - -static int dyngen_sprintf(struct SFILE *f, const char *format, ...) -{ - int n; - va_list args; - va_start(args, format); - vsprintf(f->current, format, args); - f->current += n = strlen(f->current); - va_end(args); - return n; -} - -#if defined(HOST_I386) || defined(HOST_X86_64) -static int pretty_print(char *buf, uintptr_t addr, uintptr_t base) -{ - disassemble_info info; - struct SFILE sfile = {buf, buf}; - sfile.buffer = buf; - sfile.current = buf; - INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)dyngen_sprintf); -#if defined(HOST_X86_64) - info.mach = bfd_mach_x86_64; -#endif - print_address_base = base; - return print_insn_i386_att(addr, &info); -} -#endif -#endif - -/* NOTE: we test CONFIG_WIN32 instead of _WIN32 to enabled cross - compilation */ -#if defined(CONFIG_WIN32) -#define CONFIG_FORMAT_COFF -#elif defined(CONFIG_DARWIN) -#define CONFIG_FORMAT_MACH -#else -#define CONFIG_FORMAT_ELF -#endif - -#ifdef CONFIG_FORMAT_ELF - -/* elf format definitions. We use these macros to test the CPU to - allow cross compilation (this tool must be ran on the build - platform) */ -#if defined(HOST_I386) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_386 -#define elf_check_arch(x) ( ((x) == EM_386) || ((x) == EM_486) ) -#undef ELF_USES_RELOCA - -#elif defined(HOST_X86_64) - -#define ELF_CLASS ELFCLASS64 -#define ELF_ARCH EM_X86_64 -#define elf_check_arch(x) ((x) == EM_X86_64) -#define ELF_USES_RELOCA - -#elif defined(HOST_PPC) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_PPC -#define elf_check_arch(x) ((x) == EM_PPC) -#define ELF_USES_RELOCA - -#elif defined(HOST_S390) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_S390 -#define elf_check_arch(x) ((x) == EM_S390) -#define ELF_USES_RELOCA - -#elif defined(HOST_ALPHA) - -#define ELF_CLASS ELFCLASS64 -#define ELF_ARCH EM_ALPHA -#define elf_check_arch(x) ((x) == EM_ALPHA) -#define ELF_USES_RELOCA - -#elif defined(HOST_IA64) - -#define ELF_CLASS ELFCLASS64 -#define ELF_ARCH EM_IA_64 -#define elf_check_arch(x) ((x) == EM_IA_64) -#define ELF_USES_RELOCA - -#elif defined(HOST_SPARC) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_SPARC -#define elf_check_arch(x) ((x) == EM_SPARC || (x) == EM_SPARC32PLUS) -#define ELF_USES_RELOCA - -#elif defined(HOST_SPARC64) - -#define ELF_CLASS ELFCLASS64 -#define ELF_ARCH EM_SPARCV9 -#define elf_check_arch(x) ((x) == EM_SPARCV9) -#define ELF_USES_RELOCA - -#elif defined(HOST_ARM) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_ARM -#define elf_check_arch(x) ((x) == EM_ARM) -#define ELF_USES_RELOC - -#elif defined(HOST_M68K) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_68K -#define elf_check_arch(x) ((x) == EM_68K) -#define ELF_USES_RELOCA - -#elif defined(HOST_MIPS) - -#define ELF_CLASS ELFCLASS32 -#define ELF_ARCH EM_MIPS -#define elf_check_arch(x) ((x) == EM_MIPS) -#define ELF_USES_RELOCA -#define ELF_USES_ALSO_RELOC - -#else -#error unsupported CPU - please update the code -#endif - -#include "elf-defs.h" - -#ifndef ElfW -# if ELF_CLASS == ELFCLASS32 -# define ElfW(x) Elf32_ ## x -# define ELFW(x) ELF32_ ## x -# else -# define ElfW(x) Elf64_ ## x -# define ELFW(x) ELF64_ ## x -# endif -#endif - -#if ELF_CLASS == ELFCLASS32 -typedef uint32_t host_ulong; -#define swabls(x) swab32s(x) -#else -typedef uint64_t host_ulong; -#define swabls(x) swab64s(x) -#endif - -typedef ElfW(Ehdr) elfhdr; -typedef ElfW(Shdr) elf_shdr; -typedef ElfW(Phdr) elf_phdr; -typedef ElfW(Rel) elf_rel; -typedef ElfW(Rela) elf_rela; - -#ifdef ELF_USES_RELOCA -#define ELF_RELOC elf_rela -#define SHT_RELOC SHT_RELA -#else -#define ELF_RELOC elf_rel -#define SHT_RELOC SHT_REL -#endif - -#define EXE_RELOC ELF_RELOC -#define EXE_SYM ElfW(Sym) - -#endif /* CONFIG_FORMAT_ELF */ - -#ifdef CONFIG_FORMAT_COFF - -#include "a.out-defs.h" - -typedef uint32_t host_ulong; - -#define FILENAMELEN 256 - -typedef struct coff_sym { - struct external_syment *st_syment; - char st_name[FILENAMELEN]; - uint32_t st_value; - int st_size; - uint8_t st_type; - uint8_t st_shndx; -} coff_Sym; - -typedef struct coff_rel { - struct external_reloc *r_reloc; - int r_offset; - uint8_t r_type; -} coff_Rel; - -#define EXE_RELOC struct coff_rel -#define EXE_SYM struct coff_sym - -#endif /* CONFIG_FORMAT_COFF */ - -#ifdef CONFIG_FORMAT_MACH - -#include -#include -#include -#include - -#if defined(HOST_PPC) || defined(HOST_I386) - -# if defined(HOST_I386) - -# define mach_check_cputype(x) ((x) == CPU_TYPE_I386) -# else -# define mach_check_cputype(x) ((x) == CPU_TYPE_POWERPC) -# endif -# define check_mach_header(x) (x.magic == MH_MAGIC) -# define SEGMENT_COMMAND segment_command -# define MACH_HEADER mach_header -# define SECTION section -# define NLIST nlist -typedef uint32_t host_ulong; - -#elif defined(HOST_X86_64) - -# include -# define mach_check_cputype(x) ((x) == CPU_TYPE_X86_64) -# define check_mach_header(x) (x.magic == MH_MAGIC_64) -# define SEGMENT_COMMAND segment_command_64 -# define MACH_HEADER mach_header_64 -# define SECTION section_64 -# define NLIST nlist_64 -typedef uint64_t host_ulong; - -#else -#error unsupported CPU - please update the code -#endif - -struct nlist_extended -{ - union { -#ifdef HOST_X86_64 - unsigned int n_strx; -#else - char *n_name; - long n_strx; -#endif - } n_un; - unsigned char n_type; - unsigned char n_sect; - short st_desc; - unsigned long st_value; - unsigned long st_size; -}; - -#define EXE_RELOC struct relocation_info -#define EXE_SYM struct nlist_extended - -#endif /* CONFIG_FORMAT_MACH */ - -enum { - OUT_GEN_OP_ALL, -}; - -/* all dynamically generated functions begin with this code */ -#define OP_PREFIX "op_" - -int do_swap; - -void __attribute__((noreturn)) __attribute__((format (printf, 1, 2))) error(const char *fmt, ...) -{ - va_list ap; - va_start(ap, fmt); - fprintf(stderr, "dyngen: "); - vfprintf(stderr, fmt, ap); - fprintf(stderr, "\n"); - va_end(ap); - exit(1); -} - -void *load_data(int fd, long offset, unsigned int size) -{ - char *data; - - data = malloc(size); - if (!data) - return NULL; - lseek(fd, offset, SEEK_SET); - if (read(fd, data, size) != size) { - free(data); - return NULL; - } - return data; -} - -int strstart(const char *str, const char *val, const char **ptr) -{ - const char *p, *q; - p = str; - q = val; - while (*q != '\0') { - if (*p != *q) - return 0; - p++; - q++; - } - if (ptr) - *ptr = p; - return 1; -} - -void pstrcpy(char *buf, int buf_size, const char *str) -{ - int c; - char *q = buf; - - if (buf_size <= 0) - return; - - for(;;) { - c = *str++; - if (c == 0 || q >= buf + buf_size - 1) - break; - *q++ = c; - } - *q = '\0'; -} - -void swab16s(uint16_t *p) -{ - *p = bswap_16(*p); -} - -void swab32s(uint32_t *p) -{ - *p = bswap_32(*p); -} - -void swab64s(uint64_t *p) -{ - *p = bswap_64(*p); -} - -uint16_t get16(uint16_t *p) -{ - uint16_t val; - val = *p; - if (do_swap) - val = bswap_16(val); - return val; -} - -uint32_t get32(uint32_t *p) -{ - uint32_t val; - val = *p; - if (do_swap) - val = bswap_32(val); - return val; -} - -void put16(uint16_t *p, uint16_t val) -{ - if (do_swap) - val = bswap_16(val); - *p = val; -} - -void put32(uint32_t *p, uint32_t val) -{ - if (do_swap) - val = bswap_32(val); - *p = val; -} - -static int is_op_param(const char *sym_name, const char **ptr) -{ - return - strstart(sym_name, "__op_param", ptr) || strstart(sym_name, "_op_param", ptr) || - strstart(sym_name, "__op_PARAM", ptr) || strstart(sym_name, "_op_PARAM", ptr); -} - -static int is_op_jmp(const char *sym_name, const char **ptr) -{ - return strstart(sym_name, "__op_jmp", ptr) || strstart(sym_name, "_op_jmp", ptr); -} - -static int is_op_gen_label(const char *sym_name, const char **ptr) -{ - return strstart(sym_name, "__op_gen_label", ptr) || strstart(sym_name, "_op_gen_label", ptr); -} - -/* generate op code */ -void gen_code(const char *name, const char *demangled_name, - host_ulong offset, host_ulong size, - FILE *outfile, int gen_switch, const char *prefix); -void patch_relocations(FILE *outfile, const char *name, host_ulong size, host_ulong start_offset, int copy_size); - -static void do_print_code(FILE *outfile, const char *name, const uint8_t *code_p, int code_size, int is_code) -{ - int i, b; - fprintf(outfile, " static const uint8 %s[] = {", name); -#ifdef DYNGEN_PRETTY_PRINT - if (is_code) { - const int BYTES_PER_LINE = 5; - uint8_t out[1024]; - int outindex = 0; - char buf[1024]; - uintptr_t addr = (uintptr_t)code_p; - uintptr_t end_addr = addr + code_size; - int ip = 0; - fprintf(outfile, "\n"); - while (addr < end_addr) { - int num = pretty_print(buf, (uintptr_t)addr, (uintptr_t)code_p); - int max_num = num > BYTES_PER_LINE ? num : BYTES_PER_LINE; - for (i = 0; i < max_num; i++) { - if ((i % BYTES_PER_LINE) == 0) - fprintf(outfile, "/* %04x */ ", ip); - if (i < num) { - fprintf(outfile, "0x%02x", (out[outindex++] = code_p[ip++])); - if (ip != code_size) - fprintf(outfile, ", "); - else - fprintf(outfile, " "); - } - else - fprintf(outfile, " "); - if (i == BYTES_PER_LINE - 1) - fprintf(outfile, "/* %s */", buf); - if ((i + 1) % BYTES_PER_LINE == 0 || i == max_num - 1) - fprintf(outfile, "\n"); - } - addr += num; - } - fprintf(outfile, " };\n"); - - /* sanity check we have not forgotten any byte */ - assert(outindex == code_size); - assert(memcmp(code_p, out, code_size) == 0); - return; - } -#endif - for (i = 0; i < code_size; i++) { - if ((i % 12) == 0) { - if (i != 0) - fprintf(outfile, ","); - fprintf(outfile, "\n "); - } - else - fprintf(outfile, ", "); - fprintf(outfile, "0x%02x", code_p[i]); - } - fprintf(outfile, "\n };\n"); -} - -static void print_code(FILE *outfile, const char *name, const uint8_t *code_p, int code_size) -{ - char *code_name; - code_name = alloca(strlen(name) + 5); - strcpy(code_name, name); - strcat(code_name, "_code"); - do_print_code(outfile, code_name, code_p, code_size, 1); -} - -static void print_data(FILE *outfile, const char *name, const uint8_t *data, int data_size) -{ - do_print_code(outfile, name, data, data_size, 0); -} - -static char *gen_dot_prefix(const char *sym_name) -{ - static char name[256]; - assert(sym_name[0] == '.'); - snprintf(name, sizeof(name), "dot_%s", sym_name + 1); - return name; -} - - -/* executable information */ -EXE_SYM *symtab; -int nb_syms; -int text_shndx; -int data_shndx; -uint8_t *text; -uint8_t *data; -uint8_t *literal16; -EXE_RELOC *relocs; -int nb_relocs; - -#ifdef CONFIG_FORMAT_ELF - -/* ELF file info */ -elf_shdr *shdr; -uint8_t **sdata; -elfhdr ehdr; -char *strtab; - -int elf_must_swap(elfhdr *h) -{ - union { - uint32_t i; - uint8_t b[4]; - } swaptest; - - swaptest.i = 1; - return (h->e_ident[EI_DATA] == ELFDATA2MSB) != - (swaptest.b[0] == 0); -} - -void elf_swap_ehdr(elfhdr *h) -{ - swab16s(&h->e_type); /* Object file type */ - swab16s(&h-> e_machine); /* Architecture */ - swab32s(&h-> e_version); /* Object file version */ - swabls(&h-> e_entry); /* Entry point virtual address */ - swabls(&h-> e_phoff); /* Program header table file offset */ - swabls(&h-> e_shoff); /* Section header table file offset */ - swab32s(&h-> e_flags); /* Processor-specific flags */ - swab16s(&h-> e_ehsize); /* ELF header size in bytes */ - swab16s(&h-> e_phentsize); /* Program header table entry size */ - swab16s(&h-> e_phnum); /* Program header table entry count */ - swab16s(&h-> e_shentsize); /* Section header table entry size */ - swab16s(&h-> e_shnum); /* Section header table entry count */ - swab16s(&h-> e_shstrndx); /* Section header string table index */ -} - -void elf_swap_shdr(elf_shdr *h) -{ - swab32s(&h-> sh_name); /* Section name (string tbl index) */ - swab32s(&h-> sh_type); /* Section type */ - swabls(&h-> sh_flags); /* Section flags */ - swabls(&h-> sh_addr); /* Section virtual addr at execution */ - swabls(&h-> sh_offset); /* Section file offset */ - swabls(&h-> sh_size); /* Section size in bytes */ - swab32s(&h-> sh_link); /* Link to another section */ - swab32s(&h-> sh_info); /* Additional section information */ - swabls(&h-> sh_addralign); /* Section alignment */ - swabls(&h-> sh_entsize); /* Entry size if section holds table */ -} - -void elf_swap_phdr(elf_phdr *h) -{ - swab32s(&h->p_type); /* Segment type */ - swabls(&h->p_offset); /* Segment file offset */ - swabls(&h->p_vaddr); /* Segment virtual address */ - swabls(&h->p_paddr); /* Segment physical address */ - swabls(&h->p_filesz); /* Segment size in file */ - swabls(&h->p_memsz); /* Segment size in memory */ - swab32s(&h->p_flags); /* Segment flags */ - swabls(&h->p_align); /* Segment alignment */ -} - -void elf_swap_rel(ELF_RELOC *rel) -{ - swabls(&rel->r_offset); - swabls(&rel->r_info); -#ifdef ELF_USES_RELOCA - swabls(&rel->r_addend); -#endif -} - -elf_shdr *find_elf_section(elf_shdr *shdr, int shnum, const char *shstr, - const char *name) -{ - int i; - const char *shname; - elf_shdr *sec; - - for(i = 0; i < shnum; i++) { - sec = &shdr[i]; - if (!sec->sh_name) - continue; - shname = shstr + sec->sh_name; - if (!strcmp(shname, name)) - return sec; - } - return NULL; -} - -static int do_find_reloc(int sh_index, ElfW(Word) type) -{ - elf_shdr *sec; - int i; - - for(i = 0; i < ehdr.e_shnum; i++) { - sec = &shdr[i]; - if (sec->sh_type == type && sec->sh_info == sh_index) - return i; - } - return 0; -} - -static int find_reloc(int sh_index) -{ - return do_find_reloc(sh_index, SHT_RELOC); -} - -static host_ulong get_rel_offset(EXE_RELOC *rel) -{ - return rel->r_offset; -} - -static char *get_rel_sym_name(EXE_RELOC *rel) -{ - return strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; -} - -static char *get_sym_name(EXE_SYM *sym) -{ - return strtab + sym->st_name; -} - -/* load an elf object file */ -int load_object(const char *filename, FILE *outfile) -{ - int fd; - elf_shdr *sec, *symtab_sec, *strtab_sec, *text_sec; - int i, j; - ElfW(Sym) *sym; - char *shstr; - ELF_RELOC *rel; - elf_shdr *data_sec; - elf_shdr *rodata_cst4_sec; - uint8_t *rodata_cst4 = NULL; - int rodata_cst4_shndx; - elf_shdr *rodata_cst8_sec; - uint8_t *rodata_cst8 = NULL; - int rodata_cst8_shndx; - elf_shdr *rodata_cst16_sec; - uint8_t *rodata_cst16 = NULL; - int rodata_cst16_shndx; - - fd = open(filename, O_RDONLY); - if (fd < 0) - error("can't open file '%s'", filename); - - /* Read ELF header. */ - if (read(fd, &ehdr, sizeof (ehdr)) != sizeof (ehdr)) - error("unable to read file header"); - - /* Check ELF identification. */ - if (ehdr.e_ident[EI_MAG0] != ELFMAG0 - || ehdr.e_ident[EI_MAG1] != ELFMAG1 - || ehdr.e_ident[EI_MAG2] != ELFMAG2 - || ehdr.e_ident[EI_MAG3] != ELFMAG3 - || ehdr.e_ident[EI_VERSION] != EV_CURRENT) { - error("bad ELF header"); - } - - do_swap = elf_must_swap(&ehdr); - if (do_swap) - elf_swap_ehdr(&ehdr); - if (ehdr.e_ident[EI_CLASS] != ELF_CLASS) - error("Unsupported ELF class"); - if (ehdr.e_type != ET_REL) - error("ELF object file expected"); - if (ehdr.e_version != EV_CURRENT) - error("Invalid ELF version"); - if (!elf_check_arch(ehdr.e_machine)) - error("Unsupported CPU (e_machine=%d)", ehdr.e_machine); - - /* read section headers */ - shdr = load_data(fd, ehdr.e_shoff, ehdr.e_shnum * sizeof(elf_shdr)); - if (do_swap) { - for(i = 0; i < ehdr.e_shnum; i++) { - elf_swap_shdr(&shdr[i]); - } - } - - /* read all section data */ - sdata = malloc(sizeof(void *) * ehdr.e_shnum); - memset(sdata, 0, sizeof(void *) * ehdr.e_shnum); - - for(i = 0;i < ehdr.e_shnum; i++) { - sec = &shdr[i]; - if (sec->sh_type != SHT_NOBITS) - sdata[i] = load_data(fd, sec->sh_offset, sec->sh_size); - } - - sec = &shdr[ehdr.e_shstrndx]; - shstr = sdata[ehdr.e_shstrndx]; - - /* swap relocations */ - for(i = 0; i < ehdr.e_shnum; i++) { - sec = &shdr[i]; - if (sec->sh_type == SHT_REL || sec->sh_type == SHT_RELA) { - nb_relocs = sec->sh_size / sec->sh_entsize; - if (do_swap) { - for(j = 0, rel = (ELF_RELOC *)sdata[i]; j < nb_relocs; j++, rel++) - elf_swap_rel(rel); - } - } - } - - /* data section */ - data_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".data"); - if (data_sec) { - data_shndx = data_sec - shdr; - data = sdata[data_shndx]; - } - else { - data_shndx = -1; - data = NULL; - } - - /* rodata sections */ - rodata_cst4_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".rodata.cst4"); - if (rodata_cst4_sec) { - rodata_cst4_shndx = rodata_cst4_sec - shdr; - rodata_cst4 = sdata[rodata_cst4_shndx]; - } - rodata_cst8_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".rodata.cst8"); - if (rodata_cst8_sec) { - rodata_cst8_shndx = rodata_cst8_sec - shdr; - rodata_cst8 = sdata[rodata_cst8_shndx]; - } - rodata_cst16_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".rodata.cst16"); - if (rodata_cst16_sec) { - rodata_cst16_shndx = rodata_cst16_sec - shdr; - rodata_cst16 = sdata[rodata_cst16_shndx]; - } - - /* text section */ - text_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".text"); - if (!text_sec) - error("could not find .text section"); - text_shndx = text_sec - shdr; - text = sdata[text_shndx]; - - /* find text relocations, if any */ - relocs = NULL; - nb_relocs = 0; - i = find_reloc(text_shndx); - if (i != 0) { - relocs = (ELF_RELOC *)sdata[i]; - nb_relocs = shdr[i].sh_size / shdr[i].sh_entsize; - } -#ifdef ELF_USES_ALSO_RELOC - i = do_find_reloc(text_shndx, SHT_REL); - if (i != 0) { - if (relocs) { - int j, nb_rels = shdr[i].sh_size / shdr[i].sh_entsize; - ElfW(Rel) *rels = (ElfW(Rel) *)sdata[i]; - ELF_RELOC *new_relocs = (ELF_RELOC *)malloc(sizeof(ELF_RELOC) * (nb_relocs + nb_rels)); - memcpy(new_relocs, relocs, sizeof(ELF_RELOC) * nb_relocs); - for (j = 0; j < nb_rels; j++) { - new_relocs[j + nb_relocs].r_offset = rels[j].r_offset; - new_relocs[j + nb_relocs].r_info = rels[j].r_info; - new_relocs[j + nb_relocs].r_addend = 0; - } - nb_relocs += nb_rels; - relocs = new_relocs; - } - } -#endif - - symtab_sec = find_elf_section(shdr, ehdr.e_shnum, shstr, ".symtab"); - if (!symtab_sec) - error("could not find .symtab section"); - strtab_sec = &shdr[symtab_sec->sh_link]; - - symtab = (ElfW(Sym) *)sdata[symtab_sec - shdr]; - strtab = sdata[symtab_sec->sh_link]; - - nb_syms = symtab_sec->sh_size / sizeof(ElfW(Sym)); - if (do_swap) { - for(i = 0, sym = symtab; i < nb_syms; i++, sym++) { - swab32s(&sym->st_name); - swabls(&sym->st_value); - swabls(&sym->st_size); - swab16s(&sym->st_shndx); - } - } - close(fd); - - { - int status; - size_t nf, nd = 256; - char *demangled_name, *func_name; - if ((demangled_name = malloc(nd)) == NULL) - return -1; - if ((func_name = malloc(nf = nd)) == NULL) { - free(demangled_name); - return -1; - } - - for(i = 0, sym = symtab; i < nb_syms; i++, sym++) { - const char *name; - name = get_sym_name(sym); - /* emit local symbols */ - if (strstart(name, ".LC", NULL)) { - const char *dot_name = gen_dot_prefix(name); - fprintf(outfile, "DEFINE_GEN(gen_const_%s,uint8 *,(void))\n", dot_name); - fprintf(outfile, "#ifdef DYNGEN_IMPL\n"); - fprintf(outfile, "{\n"); - int dot_size = 0; - if (sym->st_shndx == (rodata_cst16_sec - shdr)) - print_data(outfile, dot_name, rodata_cst16 + sym->st_value, (dot_size = 16)); - else if (sym->st_shndx == (rodata_cst8_sec - shdr)) - print_data(outfile, dot_name, rodata_cst8 + sym->st_value, (dot_size = 8)); - else if (sym->st_shndx == (rodata_cst4_sec - shdr)) - print_data(outfile, dot_name, rodata_cst4 + sym->st_value, (dot_size = 4)); - else - error("invalid section for local data %s (%x)\n", name, sym->st_shndx); - fprintf(outfile, " static uint8 *data_p = NULL;\n"); - fprintf(outfile, " if (data_p == NULL)\n"); - fprintf(outfile, " data_p = copy_data(%s, %d);\n", dot_name, dot_size); - fprintf(outfile, " return data_p;\n"); - fprintf(outfile, "}\n"); - fprintf(outfile, "#endif\n"); - } - } - - free(func_name); - free(demangled_name); - } - return 0; -} - -#endif /* CONFIG_FORMAT_ELF */ - -#ifdef CONFIG_FORMAT_COFF - -/* COFF file info */ -struct external_scnhdr *shdr; -uint8_t **sdata; -struct external_filehdr fhdr; -struct external_syment *coff_symtab; -char *strtab; -int coff_text_shndx, coff_data_shndx; - -#define STRTAB_SIZE 4 - -#define DIR32 0x06 -#define DISP32 0x14 - -#define T_FUNCTION 0x20 -#define C_EXTERNAL 2 - -void sym_ent_name(struct external_syment *ext_sym, EXE_SYM *sym) -{ - char *q; - int c, i, len; - - if (ext_sym->e.e.e_zeroes != 0) { - q = sym->st_name; - for(i = 0; i < 8; i++) { - c = ext_sym->e.e_name[i]; - if (c == '\0') - break; - *q++ = c; - } - *q = '\0'; - } else { - pstrcpy(sym->st_name, sizeof(sym->st_name), strtab + ext_sym->e.e.e_offset); - } - - /* now convert the name to a C name (suppress the leading '_') */ - if (sym->st_name[0] == '_') { - len = strlen(sym->st_name); - memmove(sym->st_name, sym->st_name + 1, len - 1); - sym->st_name[len - 1] = '\0'; - } -} - -char *name_for_dotdata(struct coff_rel *rel) -{ - int i; - struct coff_sym *sym; - uint32_t text_data; - - text_data = *(uint32_t *)(text + rel->r_offset); - - for (i = 0, sym = symtab; i < nb_syms; i++, sym++) { - if (sym->st_syment->e_scnum == data_shndx && - text_data >= sym->st_value && - text_data < sym->st_value + sym->st_size) { - - return sym->st_name; - - } - } - return NULL; -} - -static char *get_sym_name(EXE_SYM *sym) -{ - return sym->st_name; -} - -static char *get_rel_sym_name(EXE_RELOC *rel) -{ - char *name; - name = get_sym_name(symtab + *(uint32_t *)(rel->r_reloc->r_symndx)); - if (!strcmp(name, ".data")) - name = name_for_dotdata(rel); - return name; -} - -static host_ulong get_rel_offset(EXE_RELOC *rel) -{ - return rel->r_offset; -} - -struct external_scnhdr *find_coff_section(struct external_scnhdr *shdr, int shnum, const char *name) -{ - int i; - const char *shname; - struct external_scnhdr *sec; - - for(i = 0; i < shnum; i++) { - sec = &shdr[i]; - if (!sec->s_name) - continue; - shname = sec->s_name; - if (!strcmp(shname, name)) - return sec; - } - return NULL; -} - -/* load a coff object file */ -int load_object(const char *filename, FILE *outfile) -{ - int fd; - struct external_scnhdr *sec, *text_sec, *data_sec; - int i, j; - struct external_syment *ext_sym; - struct external_reloc *coff_relocs; - struct external_reloc *ext_rel; - uint32_t *n_strtab; - EXE_SYM *sym; - EXE_RELOC *rel; - - fd = open(filename, O_RDONLY -#ifdef _WIN32 - | O_BINARY -#endif - ); - if (fd < 0) - error("can't open file '%s'", filename); - - /* Read COFF header. */ - if (read(fd, &fhdr, sizeof (fhdr)) != sizeof (fhdr)) - error("unable to read file header"); - - /* Check COFF identification. */ - if (fhdr.f_magic != I386MAGIC) { - error("bad COFF header"); - } - do_swap = 0; - - /* read section headers */ - shdr = load_data(fd, sizeof(struct external_filehdr) + fhdr.f_opthdr, fhdr.f_nscns * sizeof(struct external_scnhdr)); - - /* read all section data */ - sdata = malloc(sizeof(void *) * fhdr.f_nscns); - memset(sdata, 0, sizeof(void *) * fhdr.f_nscns); - - const char *p; - for(i = 0;i < fhdr.f_nscns; i++) { - sec = &shdr[i]; - if (!strstart(sec->s_name, ".bss", &p)) - sdata[i] = load_data(fd, sec->s_scnptr, sec->s_size); - } - - - /* text section */ - text_sec = find_coff_section(shdr, fhdr.f_nscns, ".text"); - if (!text_sec) - error("could not find .text section"); - coff_text_shndx = text_sec - shdr; - text = sdata[coff_text_shndx]; - - /* data section */ - data_sec = find_coff_section(shdr, fhdr.f_nscns, ".data"); - if (!data_sec) - error("could not find .data section"); - coff_data_shndx = data_sec - shdr; - data = sdata[coff_data_shndx]; - - coff_symtab = load_data(fd, fhdr.f_symptr, fhdr.f_nsyms*SYMESZ); - for (i = 0, ext_sym = coff_symtab; i < nb_syms; i++, ext_sym++) { - for(j=0;j<8;j++) - printf(" %02x", ((uint8_t *)ext_sym->e.e_name)[j]); - printf("\n"); - } - - nb_syms = fhdr.f_nsyms; - n_strtab = load_data(fd, (fhdr.f_symptr + fhdr.f_nsyms*SYMESZ), STRTAB_SIZE); - strtab = load_data(fd, (fhdr.f_symptr + fhdr.f_nsyms*SYMESZ), *n_strtab); - - for (i = 0, ext_sym = coff_symtab; i < nb_syms; i++, ext_sym++) { - if (strstart(ext_sym->e.e_name, ".text", NULL)) - text_shndx = ext_sym->e_scnum; - if (strstart(ext_sym->e.e_name, ".data", NULL)) - data_shndx = ext_sym->e_scnum; - } - - /* set coff symbol */ - symtab = malloc(sizeof(struct coff_sym) * nb_syms); - - int aux_size; - for (i = 0, ext_sym = coff_symtab, sym = symtab; i < nb_syms; i++, ext_sym++, sym++) { - memset(sym, 0, sizeof(*sym)); - sym->st_syment = ext_sym; - sym_ent_name(ext_sym, sym); - sym->st_value = ext_sym->e_value; - - aux_size = *(int8_t *)ext_sym->e_numaux; - if (ext_sym->e_scnum == text_shndx && ext_sym->e_type == T_FUNCTION) { - for (j = aux_size + 1; j < nb_syms - i; j++) { - if ((ext_sym + j)->e_scnum == text_shndx && - (ext_sym + j)->e_type == T_FUNCTION ){ - sym->st_size = (ext_sym + j)->e_value - ext_sym->e_value; - break; - } else if (j == nb_syms - i - 1) { - sec = &shdr[coff_text_shndx]; - sym->st_size = sec->s_size - ext_sym->e_value; - break; - } - } - } else if (ext_sym->e_scnum == data_shndx && *(uint8_t *)ext_sym->e_sclass == C_EXTERNAL) { - for (j = aux_size + 1; j < nb_syms - i; j++) { - if ((ext_sym + j)->e_scnum == data_shndx) { - sym->st_size = (ext_sym + j)->e_value - ext_sym->e_value; - break; - } else if (j == nb_syms - i - 1) { - sec = &shdr[coff_data_shndx]; - sym->st_size = sec->s_size - ext_sym->e_value; - break; - } - } - } else { - sym->st_size = 0; - } - - sym->st_type = ext_sym->e_type; - sym->st_shndx = ext_sym->e_scnum; - } - - - /* find text relocations, if any */ - sec = &shdr[coff_text_shndx]; - coff_relocs = load_data(fd, sec->s_relptr, sec->s_nreloc*RELSZ); - nb_relocs = sec->s_nreloc; - - /* set coff relocation */ - relocs = malloc(sizeof(struct coff_rel) * nb_relocs); - for (i = 0, ext_rel = coff_relocs, rel = relocs; i < nb_relocs; - i++, ext_rel++, rel++) { - memset(rel, 0, sizeof(*rel)); - rel->r_reloc = ext_rel; - rel->r_offset = *(uint32_t *)ext_rel->r_vaddr; - rel->r_type = *(uint16_t *)ext_rel->r_type; - } - return 0; -} - -#endif /* CONFIG_FORMAT_COFF */ - -#ifdef CONFIG_FORMAT_MACH - -/* File Header */ -struct MACH_HEADER mach_hdr; - -/* commands */ -struct SEGMENT_COMMAND *segment = 0; -struct dysymtab_command *dysymtabcmd = 0; -struct symtab_command *symtabcmd = 0; - -/* section */ -struct SECTION *section_hdr; -struct SECTION *text_sec_hdr; -struct SECTION *data_sec_hdr; -struct SECTION *literal16_sec_hdr; -uint8_t **sdata; - -/* relocs */ -struct relocation_info *relocs; - -/* symbols */ -EXE_SYM *symtab; -struct NLIST *symtab_std; -char *strtab; - -/* indirect symbols */ -uint32_t *tocdylib; - -/* Utility functions */ - -static inline char *find_str_by_index(int index) -{ - return strtab+index; -} - -/* Used by dyngen common code */ -static char *get_sym_name(EXE_SYM *sym) -{ - char *name = find_str_by_index(sym->n_un.n_strx); - - if ( sym->n_type & N_STAB ) /* Debug symbols are ignored */ - return "debug"; - - if(!name) - return name; - if(name[0]=='_') - return name + 1; - else - return name; -} - -/* find a section index given its segname, sectname */ -static int find_mach_sec_index(struct SECTION *section_hdr, int shnum, const char *segname, - const char *sectname) -{ - int i; - struct SECTION *sec = section_hdr; - - for(i = 0; i < shnum; i++, sec++) { - if (!sec->segname || !sec->sectname) - continue; - if (!strcmp(sec->sectname, sectname) && !strcmp(sec->segname, segname)) - return i; - } - return -1; -} - -/* find a section header given its segname, sectname */ -struct SECTION *find_mach_sec_hdr(struct SECTION *section_hdr, int shnum, const char *segname, - const char *sectname) -{ - int index = find_mach_sec_index(section_hdr, shnum, segname, sectname); - if(index == -1) - return NULL; - return section_hdr+index; -} - - -static inline void fetch_next_pair_value(struct relocation_info * rel, unsigned int *value) -{ - struct scattered_relocation_info * scarel; - - if(R_SCATTERED & rel->r_address) { - scarel = (struct scattered_relocation_info*)rel; - if(scarel->r_type != PPC_RELOC_PAIR) - error("fetch_next_pair_value: looking for a pair which was not found (1)"); - *value = scarel->r_value; - } else { - if(rel->r_type != PPC_RELOC_PAIR) - error("fetch_next_pair_value: looking for a pair which was not found (2)"); - *value = rel->r_address; - } -} - -/* find a sym name given its value, in a section number */ -static const char * find_sym_with_value_and_sec_number( int value, int sectnum, int * offset ) -{ - int i, ret = -1; - - for( i = 0 ; i < nb_syms; i++ ) - { - if( !(symtab[i].n_type & N_STAB) && (symtab[i].n_type & N_SECT) && - (symtab[i].n_sect == sectnum) && (symtab[i].st_value <= value) ) - { - if( (ret<0) || (symtab[i].st_value >= symtab[ret].st_value) ) - ret = i; - } - } - if( ret < 0 ) { - *offset = 0; - return 0; - } else { - *offset = value - symtab[ret].st_value; - return get_sym_name(&symtab[ret]); - } -} - -/* - * Find symbol name given a (virtual) address, and a section which is of type - * S_NON_LAZY_SYMBOL_POINTERS or S_LAZY_SYMBOL_POINTERS or S_SYMBOL_STUBS - */ -static const char * find_reloc_name_in_sec_ptr(int address, struct SECTION * sec_hdr) -{ - unsigned int tocindex, symindex, size; - const char *name = 0; - - /* Sanity check */ - if(!( address >= sec_hdr->addr && address < (sec_hdr->addr + sec_hdr->size) ) ) - return (char*)0; - - if( sec_hdr->flags & S_SYMBOL_STUBS ){ - size = sec_hdr->reserved2; - if(size == 0) - error("size = 0"); - - } - else if( (sec_hdr->flags & S_LAZY_SYMBOL_POINTERS) || - (sec_hdr->flags & S_NON_LAZY_SYMBOL_POINTERS) ) - size = sizeof(unsigned long); - else - return 0; - - /* Compute our index in toc */ - tocindex = (address - sec_hdr->addr)/size; - symindex = tocdylib[sec_hdr->reserved1 + tocindex]; - - name = get_sym_name(&symtab[symindex]); - - return name; -} - -static const char * find_reloc_name_given_its_address(int address) -{ - unsigned int i; - for(i = 0; i < segment->nsects ; i++) - { - const char * name = find_reloc_name_in_sec_ptr(address, §ion_hdr[i]); - if((long)name != -1) - return name; - } - return 0; -} - -static const char * get_reloc_name(EXE_RELOC * rel, int * sslide) -{ - char * name = 0; - struct scattered_relocation_info * sca_rel = (struct scattered_relocation_info*)rel; - int sectnum = rel->r_symbolnum; - int sectoffset; - unsigned int other_half=0; - - /* init the slide value */ -#ifdef HOST_X86_64 /* no scattered on x86_64 */ - switch(rel->r_length) - { - case 0: *sslide = *(uint8_t *)(text + rel->r_address); break; - case 1: *sslide = *(uint16_t *)(text + rel->r_address); break; - case 2: *sslide = *(uint32_t *)(text + rel->r_address); break; - case 3: *sslide = *(uint64_t *)(text + rel->r_address); break; - } -#else - *sslide = 0; - - if (R_SCATTERED & rel->r_address) { - char *name = (char *)find_reloc_name_given_its_address(sca_rel->r_value); - - /* search it in the full symbol list, if not found */ - if (!name) { - int i; - for (i = 0; i < nb_syms; i++) { - EXE_SYM *sym = &symtab[i]; - if (sym->st_value == sca_rel->r_value) { - name = get_sym_name(sym); - switch (sca_rel->r_type) { - case GENERIC_RELOC_VANILLA: - *sslide = *(uint32_t *)(text + sca_rel->r_address) - sca_rel->r_value; - break; - } - break; - } - } - } - return name; - } -#endif - - if(rel->r_extern) - { - /* ignore debug sym */ - if ( symtab[rel->r_symbolnum].n_type & N_STAB ) - return 0; - return get_sym_name(&symtab[rel->r_symbolnum]); - } - -#ifdef HOST_X86_64 - return 0; -#else - - /* Intruction contains an offset to the symbols pointed to, in the rel->r_symbolnum section */ - sectoffset = *(uint32_t *)(text + rel->r_address) & 0xffff; - - if(sectnum==0xffffff) - return 0; - - /* Sanity Check */ - if(sectnum > segment->nsects) - error("sectnum > segment->nsects"); - - switch(rel->r_type) - { - case PPC_RELOC_PAIR: // The second relocation entry of a pair. A PPC_RELOC_PAIR entry must follow each of the other relocation entry types, except for PPC_RELOC_VANILLA, PPC_RELOC_BR14, PPC_RELOC_BR24, and PPC_RELOC_PB_LA_PTR. - break; - case PPC_RELOC_LO16: fetch_next_pair_value(rel+1, &other_half); sectoffset |= (other_half << 16); - break; - case PPC_RELOC_HI16: fetch_next_pair_value(rel+1, &other_half); sectoffset = (sectoffset << 16) | (uint16_t)(other_half & 0xffff); - break; - case PPC_RELOC_HA16: fetch_next_pair_value(rel+1, &other_half); sectoffset = (sectoffset << 16) + (int16_t)(other_half & 0xffff); - break; - case PPC_RELOC_BR24: - sectoffset = ( *(uint32_t *)(text + rel->r_address) & 0x03fffffc ); - if (sectoffset & 0x02000000) sectoffset |= 0xfc000000; - break; - case GENERIC_RELOC_VANILLA: - sectoffset = *(uint32_t *)(text + rel->r_address); - break; - default: - error("switch(rel->type=%d) not found", rel->r_type); - } - - if(rel->r_pcrel) { - sectoffset += rel->r_address; -#ifdef HOST_I386 - sectoffset += (1 << rel->r_length); -#endif - } - - if (rel->r_type == PPC_RELOC_BR24) - name = (char *)find_reloc_name_in_sec_ptr((int)sectoffset, §ion_hdr[sectnum-1]); - - /* search it in the full symbol list, if not found */ - if(!name) - name = (char *)find_sym_with_value_and_sec_number(sectoffset, sectnum, sslide); - - return name; -#endif -} - -/* Used by dyngen common code */ -static const char * get_rel_sym_name(EXE_RELOC * rel) -{ - int sslide; - return get_reloc_name( rel, &sslide); -} - -/* Used by dyngen common code */ -static host_ulong get_rel_offset(EXE_RELOC *rel) -{ - struct scattered_relocation_info * sca_rel = (struct scattered_relocation_info*)rel; - if(R_SCATTERED & rel->r_address) - return sca_rel->r_address; - else - return rel->r_address; -} - -/* load a mach-o object file */ -int load_object(const char *filename, FILE *outfile) -{ - int fd; - unsigned int offset_to_segment = 0; - unsigned int offset_to_dysymtab = 0; - unsigned int offset_to_symtab = 0; - struct load_command lc; - unsigned int i, j; - EXE_SYM *sym; - struct NLIST *syment; - - fd = open(filename, O_RDONLY); - if (fd < 0) - error("can't open file '%s'", filename); - - /* Read Mach header. */ - if (read(fd, &mach_hdr, sizeof (mach_hdr)) != sizeof (mach_hdr)) - error("unable to read file header"); - - /* Check Mach identification. */ - if (!check_mach_header(mach_hdr)) { - error("bad Mach header"); - } - - if (!mach_check_cputype(mach_hdr.cputype)) - error("Unsupported CPU"); - - if (mach_hdr.filetype != MH_OBJECT) - error("Unsupported Mach Object"); - - /* read segment headers */ - for(i=0, j=sizeof(mach_hdr); insects * sizeof(struct SECTION)); - - /* read all section data */ - sdata = (uint8_t **)malloc(sizeof(void *) * segment->nsects); - memset(sdata, 0, sizeof(void *) * segment->nsects); - - /* Load the data in section data */ - for(i = 0; i < segment->nsects; i++) - sdata[i] = load_data(fd, section_hdr[i].offset, section_hdr[i].size); - - /* .data section */ - data_sec_hdr = find_mach_sec_hdr(section_hdr, segment->nsects, SEG_DATA, SECT_DATA); - i = find_mach_sec_index(section_hdr, segment->nsects, SEG_DATA, SECT_DATA); - data = (i == -1) ? NULL : sdata[i]; - - /* const section TODO: __cstring __literal4 __literal8 */ - literal16_sec_hdr = find_mach_sec_hdr(section_hdr, segment->nsects, SEG_TEXT, "__literal16"); - i = find_mach_sec_index(section_hdr, segment->nsects, SEG_TEXT, "__literal16"); - literal16 = (i == -1) ? NULL : sdata[i]; - - /* .text section */ - text_sec_hdr = find_mach_sec_hdr(section_hdr, segment->nsects, SEG_TEXT, SECT_TEXT); - i = find_mach_sec_index(section_hdr, segment->nsects, SEG_TEXT, SECT_TEXT); - if (i == -1 || !text_sec_hdr) - error("could not find __TEXT,__text section"); - text = sdata[i]; - - /* Make sure dysym was loaded */ - if(dysymtabcmd == NULL) - error("could not find __DYSYMTAB segment"); - - /* read the table of content of the indirect sym */ - tocdylib = load_data( fd, dysymtabcmd->indirectsymoff, dysymtabcmd->nindirectsyms * sizeof(uint32_t) ); - - /* Make sure symtab was loaded */ - if(symtabcmd == NULL) - error("could not find __SYMTAB segment"); - nb_syms = symtabcmd->nsyms; - - symtab_std = load_data(fd, symtabcmd->symoff, symtabcmd->nsyms * sizeof(struct NLIST)); - strtab = load_data(fd, symtabcmd->stroff, symtabcmd->strsize); - - symtab = malloc(sizeof(EXE_SYM) * nb_syms); - - /* Now transform the symtab, to an extended version, with the sym size, and the C name */ - for(i = 0, sym = symtab, syment = symtab_std; i < nb_syms; i++, sym++, syment++) { - struct NLIST *sym_follow, *sym_next = 0; - unsigned int j; - memset(sym, 0, sizeof(*sym)); - - if ( syment->n_type & N_STAB ) /* Debug symbols are skipped */ - continue; - - if ( strchr((char*)(strtab + syment->n_un.n_strx), '.') ) /* no Exception handlers */ - continue; - - memcpy(sym, syment, sizeof(*syment)); - - /* Find the following symbol in order to get the current symbol size */ - for(j = 0, sym_follow = symtab_std; j < nb_syms; j++, sym_follow++) { - if ( sym_follow->n_sect != 1 || (sym_follow->n_type & N_STAB) || !(sym_follow->n_value > sym->st_value) ) - continue; - if(!sym_next) { - sym_next = sym_follow; - continue; - } - if(!(sym_next->n_value > sym_follow->n_value)) - continue; - sym_next = sym_follow; - } - if(sym_next) - sym->st_size = sym_next->n_value - sym->st_value; - else - sym->st_size = text_sec_hdr->size - sym->st_value; - } - - /* Find Reloc */ - relocs = load_data(fd, text_sec_hdr->reloff, text_sec_hdr->nreloc * sizeof(struct relocation_info)); - nb_relocs = text_sec_hdr->nreloc; - - close(fd); - return 0; -} - -#endif /* CONFIG_FORMAT_MACH */ - -void get_reloc_expr(char *name, int name_size, const char *sym_name) -{ - const char *p; - char *demangled; - char demangled_buf[256]; - size_t nd = sizeof(demangled_buf); - int status; - - demangled = cxx_demangle(sym_name, demangled_buf, &nd, &status); - if (!status && demangled) - sym_name = demangled; - if (is_op_param(sym_name, &p)) { - snprintf(name, name_size, "param%s", p); - } else if (is_op_gen_label(sym_name, &p)) { - snprintf(name, name_size, "gen_labels[param%s]", p); - } else if (strstart(sym_name, ".LC", NULL)) { - snprintf(name, name_size, "(long)(gen_const_%s())", gen_dot_prefix(sym_name)); - } else { -#ifdef HOST_SPARC - if (sym_name[0] == '.') - snprintf(name, name_size, - "(long)(&__dot_%s)", - sym_name + 1); - else -#endif - snprintf(name, name_size, "(long)(&%s)", sym_name); - } -} - -#ifdef HOST_ARM - -int arm_emit_ldr_info(const char *name, unsigned long start_offset, - FILE *outfile, uint8_t *p_start, uint8_t *p_end, - ELF_RELOC *relocs, int nb_relocs) -{ - uint8_t *p; - uint32_t insn; - int offset, min_offset, pc_offset, data_size; - uint8_t data_allocated[1024]; - unsigned int data_index; - - memset(data_allocated, 0, sizeof(data_allocated)); - - p = p_start; - min_offset = p_end - p_start; - while (p < p_start + min_offset) { - insn = get32((uint32_t *)p); - if ((insn & 0x0d5f0000) == 0x051f0000) { - /* ldr reg, [pc, #im] */ - offset = insn & 0xfff; - if (!(insn & 0x00800000)) - offset = -offset; - if ((offset & 3) !=0) - error("%s:%04x: ldr pc offset must be 32 bit aligned", - name, start_offset + p - p_start); - pc_offset = p - p_start + offset + 8; - if (pc_offset <= (p - p_start) || - pc_offset >= (p_end - p_start)) - error("%s:%04x: ldr pc offset must point inside the function code", - name, start_offset + p - p_start); - if (pc_offset < min_offset) - min_offset = pc_offset; - if (outfile) { - /* ldr position */ - fprintf(outfile, " arm_ldr_ptr->ptr = ptr() + %d;\n", - p - p_start); - /* ldr data index */ - data_index = ((p_end - p_start) - pc_offset - 4) >> 2; - fprintf(outfile, " arm_ldr_ptr->data_ptr = arm_data_ptr + %d;\n", - data_index); - fprintf(outfile, " arm_ldr_ptr++;\n"); - if (data_index >= sizeof(data_allocated)) - error("%s: too many data", name); - if (!data_allocated[data_index]) { - ELF_RELOC *rel; - int i, addend, type; - const char *sym_name, *p; - char relname[1024]; - - data_allocated[data_index] = 1; - - /* data value */ - addend = get32((uint32_t *)(p_start + pc_offset)); - relname[0] = '\0'; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset == (pc_offset + start_offset)) { - sym_name = get_rel_sym_name(rel); - /* the compiler leave some unnecessary references to the code */ - get_reloc_expr(relname, sizeof(relname), sym_name); - type = ELF32_R_TYPE(rel->r_info); - if (type != R_ARM_ABS32) - error("%s: unsupported data relocation", name); - break; - } - } - fprintf(outfile, " arm_data_ptr[%d] = 0x%x", - data_index, addend); - if (relname[0] != '\0') - fprintf(outfile, " + %s", relname); - fprintf(outfile, ";\n"); - } - } - } - p += 4; - } - data_size = (p_end - p_start) - min_offset; - if (data_size > 0 && outfile) { - fprintf(outfile, " arm_data_ptr += %d;\n", data_size >> 2); - } - - /* the last instruction must be a mov pc, lr */ - if (p == p_start) - goto arm_ret_error; - p -= 4; - insn = get32((uint32_t *)p); - if ((insn & 0xffff0000) != 0xe91b0000) { - arm_ret_error: - if (!outfile) - printf("%s: invalid epilog\n", name); - } - return p - p_start; -} -#endif - - -#define MAX_ARGS 3 - -/* generate op code */ -void gen_code(const char *name, const char *demangled_name, - host_ulong offset, host_ulong size, - FILE *outfile, int gen_switch, const char *prefix) -{ - int copy_size = 0; - uint8_t *p_start, *p_end; - host_ulong start_offset; - int nb_args, i, n; - uint8_t args_present[MAX_ARGS]; - const char *sym_name, *p; - EXE_RELOC *rel; - int op_execute = 0; - char demangled_buf[256]; - size_t nd; - char *demangled; - int status; - - if (strncmp(name, "op_execute", 10) == 0) - op_execute = 1; - - /* Compute exact size excluding prologue and epilogue instructions. - * Increment start_offset to skip epilogue instructions, then compute - * copy_size the indicate the size of the remaining instructions (in - * bytes). - */ - p_start = text + offset; - p_end = p_start + size; - start_offset = offset; - if (op_execute) { - uint8_t *p; - copy_size = p_end - p_start; -#ifdef CONFIG_FORMAT_MACH -#if defined(HOST_PPC) - for (p = p_start; p < p_end; p += 4) { - if (get32((uint32_t *)p) == 0x18deadff) - fprintf(outfile, "DEFINE_CST(op_exec_return_offset,0x%xL)\n\n", (p + 4) - p_start); - } -#elif defined(HOST_I386) - static const uint8_t return_insn[] = {0x0f,0xa6,0xf0}; - for (p = p_start; p < p_end; p++) { - if (memcmp(p, return_insn, sizeof(return_insn)) == 0) - fprintf(outfile, "DEFINE_CST(op_exec_return_offset,0x%xL)\n\n", (p + sizeof(return_insn)) - p_start); - } -#endif -#endif - } - else -#if defined(HOST_I386) || defined(HOST_X86_64) - { - uint8_t *p; - p = p_end - 1; - if (p == p_start) - error("empty code for %s", name); - while (*p != 0xc3) { - p--; - if (p <= p_start) - error("ret or jmp expected at the end of %s", name); - } - copy_size = p - p_start; - } -#elif defined(HOST_PPC) - { - uint8_t *p; - p = (void *)(p_end - 4); - if (p == p_start) - error("empty code for %s", name); - if (get32((uint32_t *)p) != 0x4e800020) - error("blr expected at the end of %s", name); - copy_size = p - p_start; - } -#elif defined(HOST_S390) - { - uint8_t *p; - p = (void *)(p_end - 2); - if (p == p_start) - error("empty code for %s", name); - if (get16((uint16_t *)p) != 0x07fe && get16((uint16_t *)p) != 0x07f4) - error("br %%r14 expected at the end of %s", name); - copy_size = p - p_start; - } -#elif defined(HOST_ALPHA) - { - uint8_t *p; - p = p_end - 4; -#if 0 - /* XXX: check why it occurs */ - if (p == p_start) - error("empty code for %s", name); -#endif - if (get32((uint32_t *)p) != 0x6bfa8001) - error("ret expected at the end of %s", name); - copy_size = p - p_start; - } -#elif defined(HOST_IA64) - { - uint8_t *p; - p = (void *)(p_end - 4); - if (p == p_start) - error("empty code for %s", name); - /* br.ret.sptk.many b0;; */ - /* 08 00 84 00 */ - if (get32((uint32_t *)p) != 0x00840008) - error("br.ret.sptk.many b0;; expected at the end of %s", name); - copy_size = p - p_start; - } -#elif defined(HOST_SPARC) - { - uint32_t start_insn, end_insn1, end_insn2; - uint8_t *p; - p = (void *)(p_end - 8); - if (p <= p_start) - error("empty code for %s", name); - start_insn = get32((uint32_t *)(p_start + 0x0)); - end_insn1 = get32((uint32_t *)(p + 0x0)); - end_insn2 = get32((uint32_t *)(p + 0x4)); - if ((start_insn & ~0x1fff) == 0x9de3a000) { - p_start += 0x4; - start_offset += 0x4; - if ((int)(start_insn | ~0x1fff) < -128) - error("Found bogus save at the start of %s", name); - if (end_insn1 != 0x81c7e008 || end_insn2 != 0x81e80000) - error("ret; restore; not found at end of %s", name); - } else { - error("No save at the beginning of %s", name); - } -#if 0 - /* Skip a preceeding nop, if present. */ - if (p > p_start) { - skip_insn = get32((uint32_t *)(p - 0x4)); - if (skip_insn == 0x01000000) - p -= 4; - } -#endif - copy_size = p - p_start; - } -#elif defined(HOST_SPARC64) - { - uint32_t start_insn, end_insn1, end_insn2, skip_insn; - uint8_t *p; - p = (void *)(p_end - 8); - if (p <= p_start) - error("empty code for %s", name); - start_insn = get32((uint32_t *)(p_start + 0x0)); - end_insn1 = get32((uint32_t *)(p + 0x0)); - end_insn2 = get32((uint32_t *)(p + 0x4)); - if ((start_insn & ~0x1fff) == 0x9de3a000) { - p_start += 0x4; - start_offset += 0x4; - if ((int)(start_insn | ~0x1fff) < -256) - error("Found bogus save at the start of %s", name); - if (end_insn1 != 0x81c7e008 || end_insn2 != 0x81e80000) - error("ret; restore; not found at end of %s", name); - } else { - error("No save at the beginning of %s", name); - } - - /* Skip a preceeding nop, if present. */ - if (p > p_start) { - skip_insn = get32((uint32_t *)(p - 0x4)); - if (skip_insn == 0x01000000) - p -= 4; - } - - copy_size = p - p_start; - } -#elif defined(HOST_ARM) - { - if ((p_end - p_start) <= 16) - error("%s: function too small", name); - if (get32((uint32_t *)p_start) != 0xe1a0c00d || - (get32((uint32_t *)(p_start + 4)) & 0xffff0000) != 0xe92d0000 || - get32((uint32_t *)(p_start + 8)) != 0xe24cb004) - error("%s: invalid prolog", name); - p_start += 12; - start_offset += 12; - copy_size = arm_emit_ldr_info(name, start_offset, NULL, p_start, p_end, - relocs, nb_relocs); - } -#elif defined(HOST_M68K) - { - uint8_t *p; - p = (void *)(p_end - 2); - if (p == p_start) - error("empty code for %s", name); - // remove NOP's, probably added for alignment - while ((get16((uint16_t *)p) == 0x4e71) && - (p>p_start)) - p -= 2; - if (get16((uint16_t *)p) != 0x4e75) - error("rts expected at the end of %s", name); - copy_size = p - p_start; - } -#elif defined(HOST_MIPS) - { - uint8_t *p; - p = (void *)(p_end - 4); - if (p == p_start) - error("empty code for %s", name); - while (p > p_start && get32((uint32_t *)p) != 0x03e00008) - p -= 4; - if (get32((uint32_t *)p) != 0x03e00008) - error("jr ra expected at the end of %s", name); - copy_size = p - p_start; - } -#else -#error unsupported CPU -#endif - - - - /* compute the number of arguments by looking at the relocations */ - for(i = 0;i < MAX_ARGS; i++) - args_present[i] = 0; - - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - host_ulong offset = get_rel_offset(rel); - if (offset >= start_offset && - offset < start_offset + (p_end - p_start)) { - sym_name = get_rel_sym_name(rel); - if(!sym_name) - continue; - nd = sizeof(demangled_buf); - demangled = cxx_demangle(sym_name, demangled_buf, &nd, &status); - if (!status && demangled) - sym_name = demangled; - if (is_op_param(sym_name, &p)) { - n = strtoul(p, NULL, 10); - if (n > MAX_ARGS) - error("too many arguments in %s", name); - args_present[n - 1] = 1; - } - } - } - - nb_args = 0; - while (nb_args < MAX_ARGS && args_present[nb_args]) - nb_args++; - for(i = nb_args; i < MAX_ARGS; i++) { - if (args_present[i]) - error("inconsistent argument numbering in %s", name); - } - - assert(gen_switch == 3); - if (gen_switch == 3) { - const char *func_name = name; - if (prefix && strstr(func_name, prefix) == func_name) - func_name += strlen(prefix); - - fprintf(outfile, "DEFINE_GEN(gen_%s,void,(", func_name); - if (nb_args == 0) { - fprintf(outfile, "void"); - } else { - for(i = 0; i < nb_args; i++) { - if (i != 0) - fprintf(outfile, ", "); - fprintf(outfile, "long param%d", i + 1); - } - } - fprintf(outfile, "))\n"); - fprintf(outfile, "#ifdef DYNGEN_IMPL\n"); - fprintf(outfile, "#define HAVE_gen_%s\n", func_name); - fprintf(outfile, "{\n"); - print_code(outfile, name, p_start + start_offset - offset, copy_size); - - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - host_ulong offset = get_rel_offset(rel); - if (offset >= start_offset && - offset < start_offset + (p_end - p_start)) { - sym_name = get_rel_sym_name(rel); - if(!sym_name) - continue; - nd = sizeof(demangled_buf); - demangled = cxx_demangle(sym_name, demangled_buf, &nd, &status); - if (!status && demangled) - sym_name = demangled; - if (*sym_name && - !is_op_param(sym_name, NULL) && - !is_op_jmp(sym_name, NULL) && - !strstart(sym_name, ".LC", NULL)) - error("unexpected external symbol %s", sym_name); - } - } - - fprintf(outfile, " copy_block(%s_code, %d);\n", name, copy_size); - - /* emit code offset information */ - { - EXE_SYM *sym; - const char *sym_name, *p; - unsigned long val; - int n; - - for(i = 0, sym = symtab; i < nb_syms; i++, sym++) { - sym_name = get_sym_name(sym); - if (strstart(sym_name, "__op_label", &p)) { - uint8_t *ptr; - unsigned long offset; - - /* test if the variable refers to a label inside - the code we are generating */ -#ifdef CONFIG_FORMAT_COFF - if (sym->st_shndx == text_shndx) { - ptr = sdata[coff_text_shndx]; - } else if (sym->st_shndx == data_shndx) { - ptr = sdata[coff_data_shndx]; - } else { - ptr = NULL; - } -#elif defined(CONFIG_FORMAT_MACH) - if(!sym->n_sect) - continue; - ptr = sdata[sym->n_sect-1]; -#else - ptr = sdata[sym->st_shndx]; -#endif - if (!ptr) - error("__op_labelN in invalid section"); - offset = sym->st_value; -#ifdef CONFIG_FORMAT_MACH - offset -= section_hdr[sym->n_sect-1].addr; -#endif - val = *(unsigned long *)(ptr + offset); -#ifdef ELF_USES_RELOCA - { - int reloc_shndx, nb_relocs1, j; - - /* try to find a matching relocation */ - reloc_shndx = find_reloc(sym->st_shndx); - if (reloc_shndx) { - nb_relocs1 = shdr[reloc_shndx].sh_size / - shdr[reloc_shndx].sh_entsize; - rel = (ELF_RELOC *)sdata[reloc_shndx]; - for(j = 0; j < nb_relocs1; j++) { - if (rel->r_offset == offset) { - val = rel->r_addend; - break; - } - rel++; - } - } - } -#endif - - if (val >= start_offset && val < start_offset + copy_size) { - n = strtol(p, NULL, 10); - fprintf(outfile, " label_offsets[%d] = %d + (code_ptr() - gen_code_buf);\n", n, val - start_offset); - } - } - } - } - - /* patch relocations */ - patch_relocations(outfile, name, size, start_offset, copy_size); - fprintf(outfile, " inc_code_ptr(%d);\n", copy_size); - fprintf(outfile, "}\n"); - fprintf(outfile, "#endif\n"); - fprintf(outfile, "\n"); - } -} - -void patch_relocations(FILE *outfile, const char *name, host_ulong size, host_ulong start_offset, int copy_size) -{ - EXE_RELOC *rel; - int i; -#if defined(HOST_I386) -#ifdef CONFIG_FORMAT_MACH - struct scattered_relocation_info *scarel; - char final_sym_name[256]; - const char *sym_name; - const char *p; - int slide, sslide; - - for (i = 0, rel = relocs; i < nb_relocs; i++, rel++) { - unsigned int offset, length, value = 0; - unsigned int type, pcrel, isym = 0; - unsigned int usesym = 0; - - if (R_SCATTERED & rel->r_address) { - scarel = (struct scattered_relocation_info*)rel; - offset = (unsigned int)scarel->r_address; - length = scarel->r_length; - pcrel = scarel->r_pcrel; - type = scarel->r_type; - value = scarel->r_value; - } - else { - value = isym = rel->r_symbolnum; - usesym = (rel->r_extern); - offset = rel->r_address; - length = rel->r_length; - pcrel = rel->r_pcrel; - type = rel->r_type; - } - - slide = offset - start_offset; - - if (!(offset >= start_offset && offset < start_offset + size)) - continue; /* not in our range */ - - sym_name = get_reloc_name(rel, &sslide); - - if (usesym && (symtab[isym].n_type & N_STAB)) - continue; /* don't handle STAB (debug sym) */ - - if (sym_name && is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", n, slide); - continue; /* Nothing more to do */ - } - - if (!sym_name) { - fprintf(outfile, "/* #warning relocation not handled in %s (value 0x%x, %s, offset 0x%x, length 0x%x, %s, type 0x%x) */\n", - name, value, usesym ? "use sym" : "don't use sym", offset, length, pcrel ? "pcrel":"", type); - continue; /* dunno how to handle without final_sym_name */ - } - - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - - if (length != 2) - error("unsupported %d-bit relocation", 8 * (1 << length)); - - switch (type) { - case GENERIC_RELOC_VANILLA: - if (pcrel) { - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %d) - 4;\n", - slide, final_sym_name, slide); - } - else { - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (%s + %d);\n", - slide, final_sym_name, sslide); - } - break; - default: - error("unsupported i386 relocation (%d)", type); - } - } -#else - char final_sym_name[256]; - const char *sym_name; - const char *p; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym_name = get_rel_sym_name(rel); - if (is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - /* __op_jmp relocations are done at - runtime to do translated block - chaining: the offset of the instruction - needs to be stored */ - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", - n, rel->r_offset - start_offset); - continue; - } - - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - addend = get32((uint32_t *)(text + rel->r_offset)); -#ifdef CONFIG_FORMAT_ELF - type = ELF32_R_TYPE(rel->r_info); - switch(type) { - case R_386_32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - rel->r_offset - start_offset, final_sym_name, addend); - break; - case R_386_PC32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %d) + %d;\n", - rel->r_offset - start_offset, final_sym_name, rel->r_offset - start_offset, addend); - break; - default: - error("unsupported i386 relocation (%d)", type); - } -#elif defined(CONFIG_FORMAT_COFF) - { - char *temp_name; - int j; - EXE_SYM *sym; - temp_name = get_sym_name(symtab + *(uint32_t *)(rel->r_reloc->r_symndx)); - if (!strcmp(temp_name, ".data")) { - for (j = 0, sym = symtab; j < nb_syms; j++, sym++) { - if (strstart(sym->st_name, sym_name, NULL)) { - addend -= sym->st_value; - } - } - } - } - type = rel->r_type; - switch(type) { - case DIR32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - rel->r_offset - start_offset, final_sym_name, addend); - break; - case DISP32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %d) + %d -4;\n", - rel->r_offset - start_offset, final_sym_name, rel->r_offset - start_offset, addend); - break; - default: - error("unsupported i386 relocation (%d)", type); - } -#else -#error unsupport object format for HOST_I386 -#endif - } - } -#endif -#elif defined(HOST_X86_64) -#if defined(CONFIG_FORMAT_MACH) - char final_sym_name[256]; - const char *sym_name; - const char *p; - int slide, sslide; - int bytecount, bitlength; - int local16; - - for (i = 0, rel = relocs, local16 = 0; i < nb_relocs; i++, rel++) { - unsigned int isym, usesym, offset, length, pcrel, type; - int adjustment = 0; - - isym = rel->r_symbolnum; - usesym = rel->r_extern; - offset = rel->r_address; - length = rel->r_length; - pcrel = rel->r_pcrel; - type = rel->r_type; - - if (usesym && (symtab[isym].n_type & N_STAB)) - continue; /* don't handle STAB (debug sym) */ - - if (!(offset >= start_offset && offset < start_offset + size)) - continue; /* not in our range */ - - if (length > 3) - error("unsupported %d-bit relocation", 8 * (1 << length)); - - bytecount = (1 << length); - bitlength = 8 * bytecount; - slide = offset - start_offset; - - if (!usesym) { - // local reloc - sslide = get32((uint32_t *)(text + offset)) + rel->r_address + 4; - if ( literal16_sec_hdr - && sslide >= literal16_sec_hdr->addr - && sslide + 16 <= literal16_sec_hdr->addr + literal16_sec_hdr->size ) { - sprintf(final_sym_name, "literal16_%d", ++local16); - print_data(outfile, final_sym_name, literal16 + sslide - literal16_sec_hdr->addr, 16); - fprintf(outfile, " static uint8 *data_p_%d = NULL;\n", local16); - fprintf(outfile, " if (data_p_%d == NULL)\n", local16); - fprintf(outfile, " data_p_%d = copy_data(%s, %d);\n", local16, final_sym_name, 16); - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (int32_t)((long)data_p_%d - (long)(code_ptr() + %d + %d));\n", - slide, local16, slide, bytecount); - } else { - fprintf(outfile, "/* #warning relocation not handled in %s (section %d, offset 0x%x, length 0x%x, %s, type 0x%x) */\n", - name, isym, offset, length, pcrel ? "pcrel":"", type); - } - continue; - } - - sym_name = get_reloc_name(rel, &sslide); - if (!sym_name) { - error("external symbol not found in %s (section %d, offset 0x%x, length 0x%x, %s, type 0x%x\n", - name, isym, offset, length, pcrel ? "pcrel":"", type); - } - - if (is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", n, slide); - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = 0;\n", slide); - continue; /* Nothing more to do */ - } - - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - - switch (type) { - case X86_64_RELOC_SIGNED_1: // Signed displacement with a -1 added. - adjustment = -1; - type = X86_64_RELOC_SIGNED; - break; - case X86_64_RELOC_SIGNED_2: // Signed displacement with a -2 added. - adjustment = -2; - type = X86_64_RELOC_SIGNED; - break; - case X86_64_RELOC_SIGNED_4: // Signed displacement with a -4 added. - adjustment = -4; - type = X86_64_RELOC_SIGNED; - break; - } - - if (pcrel || is_op_gen_label(sym_name, &p)) { - switch (type) { - case X86_64_RELOC_UNSIGNED: // for absolute addresses - case X86_64_RELOC_SIGNED: // for signed 32-bit displacement - case X86_64_RELOC_BRANCH: // a CALL/JMP instruction with 32-bit displacement - fprintf(outfile, " *(uint%d_t *)(code_ptr() + %d) = (int%d_t)((long)%s - (long)(code_ptr() + %d + %d)) + %d;\n", - bitlength, slide, bitlength, final_sym_name, slide, bytecount, sslide + adjustment); - break; - default: - error("unsupported x86_64 relocation (%d) in %s\n", type, sym_name); - } - } else { - switch (type) { - case X86_64_RELOC_UNSIGNED: // for absolute addresses - fprintf(outfile, " *(uint%d_t *)(code_ptr() + %d) = (uint%d_t)%s + %d;\n", - bitlength, slide, bitlength, final_sym_name, sslide); - break; - case X86_64_RELOC_SIGNED: // for signed 32-bit displacement - fprintf(outfile, " *(uint%d_t *)(code_ptr() + %d) = (int%d_t)%s + %d;\n", - bitlength, slide, bitlength, final_sym_name, sslide + adjustment); - break; - default: - error("unsupported x86_64 relocation (%d) in %s\n", type, sym_name); - } - } - } -#elif defined (CONFIG_FORMAT_ELF) - char final_sym_name[256]; - const char *sym_name; - const char *p; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - int slide; - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - if (is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - /* __op_jmp relocations are done at - runtime to do translated block - chaining: the offset of the instruction - needs to be stored */ - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", - n, rel->r_offset - start_offset); - continue; - } - - slide = rel->r_offset - start_offset; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF32_R_TYPE(rel->r_info); - addend = rel->r_addend; - switch(type) { - case R_X86_64_64: - fprintf(outfile, " *(uintptr *)(code_ptr() + %d) = (uintptr)%s + %d;\n", slide, final_sym_name, addend); - break; - case R_X86_64_32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (uint32_t)%s + %d;\n", slide, final_sym_name, addend); - break; - case R_X86_64_32S: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (int32_t)%s + %d;\n", slide, final_sym_name, addend); - break; - case R_X86_64_PC32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %d) + %d;\n", - slide, final_sym_name, slide, addend); - break; - default: - error("unsupported AMD64 relocation (%d)", type); - } - } - } -#else -#error unsupport object format for HOST_X86_64 -#endif -#elif defined(HOST_PPC) -#ifdef CONFIG_FORMAT_ELF - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - int slide; - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - if (is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - /* __op_jmp relocations are done at - runtime to do translated block - chaining: the offset of the instruction - needs to be stored */ - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", - n, rel->r_offset - start_offset); - continue; - } - - slide = rel->r_offset - start_offset; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF32_R_TYPE(rel->r_info); - addend = rel->r_addend; - switch(type) { - case R_PPC_ADDR32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - slide, final_sym_name, addend); - break; - case R_PPC_ADDR16_LO: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = (%s + %d);\n", - slide, final_sym_name, addend); - break; - case R_PPC_ADDR16_HI: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = (%s + %d) >> 16;\n", - slide, final_sym_name, addend); - break; - case R_PPC_ADDR16_HA: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = (%s + %d + 0x8000) >> 16;\n", - slide, final_sym_name, addend); - break; - case R_PPC_REL24: - /* warning: must be at 32 MB distancy */ - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (*(uint32_t *)(code_ptr() + %d) & ~0x03fffffc) | ((%s - (long)(code_ptr() + %d) + %d) & 0x03fffffc);\n", - slide, slide, final_sym_name, slide, addend); - break; - default: - error("unsupported powerpc relocation (%d)", type); - } - } - } -#elif defined(CONFIG_FORMAT_MACH) - struct scattered_relocation_info *scarel; - char final_sym_name[256]; - const char *sym_name; - const char *p; - int slide, sslide; - - for(i = 0, rel = relocs; i < nb_relocs; i++, rel++) { - unsigned int offset, length, value = 0; - unsigned int type, pcrel, isym = 0; - unsigned int usesym = 0; - - if(R_SCATTERED & rel->r_address) { - scarel = (struct scattered_relocation_info*)rel; - offset = (unsigned int)scarel->r_address; - length = scarel->r_length; - pcrel = scarel->r_pcrel; - type = scarel->r_type; - value = scarel->r_value; - } else { - value = isym = rel->r_symbolnum; - usesym = (rel->r_extern); - offset = rel->r_address; - length = rel->r_length; - pcrel = rel->r_pcrel; - type = rel->r_type; - } - - slide = offset - start_offset; - - if (!(offset >= start_offset && offset < start_offset + size)) - continue; /* not in our range */ - - sym_name = get_reloc_name(rel, &sslide); - - if(usesym && (symtab[isym].n_type & N_STAB)) - continue; /* don't handle STAB (debug sym) */ - - if (sym_name && is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", - n, slide); - continue; /* Nothing more to do */ - } - - if(!sym_name) - { - fprintf(outfile, "/* #warning relocation not handled in %s (value 0x%x, %s, offset 0x%x, length 0x%x, %s, type 0x%x) */\n", - name, value, usesym ? "use sym" : "don't use sym", offset, length, pcrel ? "pcrel":"", type); - continue; /* dunno how to handle without final_sym_name */ - } - - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - - switch(type) { - case PPC_RELOC_BR24: - if (!is_op_param(sym_name, &p)) { - fprintf(outfile, "{\n"); - fprintf(outfile, " uint32_t imm = *(uint32_t *)(code_ptr() + %d) & 0x3fffffc;\n", slide); - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (*(uint32_t *)(code_ptr() + %d) & ~0x03fffffc) | ((imm + ((long)%s - (long)code_ptr()) + %d) & 0x03fffffc);\n", - slide, slide, final_sym_name, sslide ); - fprintf(outfile, "}\n"); - } else { - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (*(uint32_t *)(code_ptr() + %d) & ~0x03fffffc) | (((long)%s - (long)code_ptr() - %d) & 0x03fffffc);\n", - slide, slide, final_sym_name, slide); - } - break; - case PPC_RELOC_HI16: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d + 2) = (%s + %d) >> 16;\n", - slide, final_sym_name, sslide); - break; - case PPC_RELOC_LO16: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d + 2) = (%s + %d);\n", - slide, final_sym_name, sslide); - break; - case PPC_RELOC_HA16: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d + 2) = (%s + %d + 0x8000) >> 16;\n", - slide, final_sym_name, sslide); - break; - default: - error("unsupported powerpc relocation (%d)", type); - } - } -#else -#error unsupport object format -#endif -#elif defined(HOST_S390) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - int slide; - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF32_R_TYPE(rel->r_info); - slide = rel->r_offset - start_offset; - addend = rel->r_addend; - switch(type) { - case R_390_32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - slide, final_sym_name, addend); - break; - case R_390_16: - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = %s + %d;\n", - slide, final_sym_name, addend); - break; - case R_390_8: - fprintf(outfile, " *(uint8_t *)(code_ptr() + %d) = %s + %d;\n", - slide, final_sym_name, addend); - break; - default: - error("unsupported s390 relocation (%d)", type); - } - } - } -#elif defined(HOST_ALPHA) - for (i = 0, rel = relocs; i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && rel->r_offset < start_offset + copy_size) { - int type; - - type = ELF64_R_TYPE(rel->r_info); - sym_name = strtab + symtab[ELF64_R_SYM(rel->r_info)].st_name; - switch (type) { - case R_ALPHA_GPDISP: - /* The gp is just 32 bit, and never changes, so it's easiest to emit it - as an immediate instead of constructing it from the pv or ra. */ - fprintf(outfile, " immediate_ldah(code_ptr() + %ld, gp);\n", - rel->r_offset - start_offset); - fprintf(outfile, " immediate_lda(code_ptr() + %ld, gp);\n", - rel->r_offset - start_offset + rel->r_addend); - break; - case R_ALPHA_LITUSE: - /* jsr to literal hint. Could be used to optimize to bsr. Ignore for - now, since some called functions (libc) need pv to be set up. */ - break; - case R_ALPHA_HINT: - /* Branch target prediction hint. Ignore for now. Should be already - correct for in-function jumps. */ - break; - case R_ALPHA_LITERAL: - /* Load a literal from the GOT relative to the gp. Since there's only a - single gp, nothing is to be done. */ - break; - case R_ALPHA_GPRELHIGH: - /* Handle fake relocations against __op_PARAM symbol. Need to emit the - high part of the immediate value instead. Other symbols need no - special treatment. */ - if (is_op_param(sym_name, &p)) - fprintf(outfile, " immediate_ldah(code_ptr() + %ld, param%s);\n", - rel->r_offset - start_offset, p); - break; - case R_ALPHA_GPRELLOW: - if (is_op_param(sym_name, &p)) - fprintf(outfile, " immediate_lda(code_ptr() + %ld, param%s);\n", - rel->r_offset - start_offset, p); - break; - case R_ALPHA_BRSGP: - /* PC-relative jump. Tweak offset to skip the two instructions that try to - set up the gp from the pv. */ - fprintf(outfile, " fix_bsr(code_ptr() + %ld, (uint8_t *) &%s - (code_ptr() + %ld + 4) + 8);\n", - rel->r_offset - start_offset, sym_name, rel->r_offset - start_offset); - break; - default: - error("unsupported Alpha relocation (%d)", type); - } - } - } -#elif defined(HOST_IA64) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && rel->r_offset < start_offset + copy_size) { - sym_name = strtab + symtab[ELF64_R_SYM(rel->r_info)].st_name; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF64_R_TYPE(rel->r_info); - addend = rel->r_addend; - switch(type) { - case R_IA64_LTOFF22: - error("must implement R_IA64_LTOFF22 relocation"); - case R_IA64_PCREL21B: - error("must implement R_IA64_PCREL21B relocation"); - default: - error("unsupported ia64 relocation (%d)", type); - } - } - } -#elif defined(HOST_SPARC) - char final_sym_name[256]; - const char *sym_name; - const char *p; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym_name = strtab + symtab[ELF32_R_SYM(rel->r_info)].st_name; - if (is_op_param(sym_name, &p)) { - snprintf(final_sym_name, sizeof(final_sym_name), "param%s", p); - } else { - if (sym_name[0] == '.') - snprintf(final_sym_name, sizeof(final_sym_name), - "(long)(&__dot_%s)", - sym_name + 1); - else - snprintf(final_sym_name, sizeof(final_sym_name), - "(long)(&%s)", sym_name); - } - type = ELF32_R_TYPE(rel->r_info); - addend = rel->r_addend; - switch(type) { - case R_SPARC_32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - rel->r_offset - start_offset, final_sym_name, addend); - break; - case R_SPARC_HI22: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3fffff) " - " | (((%s + %d) >> 10) & 0x3fffff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend); - break; - case R_SPARC_LO10: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3ff) " - " | ((%s + %d) & 0x3ff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend); - break; - case R_SPARC_WDISP30: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3fffffff) " - " | ((((%s + %d) - (long)(code_ptr() + %d))>>2) " - " & 0x3fffffff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend, - rel->r_offset - start_offset); - break; - default: - error("unsupported sparc relocation (%d)", type); - } - } - } -#elif defined(HOST_SPARC64) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym_name = strtab + symtab[ELF64_R_SYM(rel->r_info)].st_name; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF64_R_TYPE(rel->r_info); - addend = rel->r_addend; - switch(type) { - case R_SPARC_32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - rel->r_offset - start_offset, final_sym_name, addend); - break; - case R_SPARC_HI22: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3fffff) " - " | (((%s + %d) >> 10) & 0x3fffff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend); - break; - case R_SPARC_LO10: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3ff) " - " | ((%s + %d) & 0x3ff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend); - break; - case R_SPARC_WDISP30: - fprintf(outfile, - " *(uint32_t *)(code_ptr() + %d) = " - "((*(uint32_t *)(code_ptr() + %d)) " - " & ~0x3fffffff) " - " | ((((%s + %d) - (long)(code_ptr() + %d))>>2) " - " & 0x3fffffff);\n", - rel->r_offset - start_offset, - rel->r_offset - start_offset, - final_sym_name, addend, - rel->r_offset - start_offset); - break; - default: - error("unsupported sparc64 relocation (%d)", type); - } - } - } -#elif defined(HOST_ARM) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - - arm_emit_ldr_info(final_sym_name, start_offset, outfile, p_start, p_end, - relocs, nb_relocs); - - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - /* the compiler leave some unnecessary references to the code */ - if (sym_name[0] == '\0') - continue; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF32_R_TYPE(rel->r_info); - addend = get32((uint32_t *)(text + rel->r_offset)); - switch(type) { - case R_ARM_ABS32: - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %d;\n", - rel->r_offset - start_offset, final_sym_name, addend); - break; - case R_ARM_PC24: - fprintf(outfile, " arm_reloc_pc24((uint32_t *)(code_ptr() + %d), 0x%x, %s);\n", - rel->r_offset - start_offset, addend, final_sym_name); - break; - default: - error("unsupported arm relocation (%d)", type); - } - } - } -#elif defined(HOST_M68K) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - Elf32_Sym *sym; - for(i = 0, rel = relocs;i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym = &(symtab[ELFW(R_SYM)(rel->r_info)]); - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELF32_R_TYPE(rel->r_info); - addend = get32((uint32_t *)(text + rel->r_offset)) + rel->r_addend; - switch(type) { - case R_68K_32: - fprintf(outfile, " /* R_68K_32 RELOC, offset %x */\n", rel->r_offset) ; - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s + %#x;\n", - rel->r_offset - start_offset, final_sym_name, addend ); - break; - case R_68K_PC32: - fprintf(outfile, " /* R_68K_PC32 RELOC, offset %x */\n", rel->r_offset); - fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %#x) + %#x;\n", - rel->r_offset - start_offset, final_sym_name, rel->r_offset - start_offset, /*sym->st_value+*/ addend); - break; - default: - error("unsupported m68k relocation (%d)", type); - } - } - } -#elif defined(HOST_MIPS) - char final_sym_name[256]; - const char *sym_name; - int type; - int addend; - for (i = 0, rel = relocs; i < nb_relocs; i++, rel++) { - if (rel->r_offset >= start_offset && - rel->r_offset < start_offset + copy_size) { - sym_name = strtab + symtab[ELFW(R_SYM)(rel->r_info)].st_name; - if (is_op_jmp(sym_name, &p)) { - int n; - n = strtol(p, NULL, 10); - /* __op_jmp relocations are done at - runtime to do translated block - chaining: the offset of the instruction - needs to be stored */ - fprintf(outfile, " jmp_addr[%d] = code_ptr() + %d;\n", - n, rel->r_offset - start_offset); - continue; - } - - get_reloc_expr(final_sym_name, sizeof(final_sym_name), sym_name); - type = ELFW(R_TYPE)(rel->r_info); - addend = rel->r_addend; - if (addend) - error("non zero addend (%d), deal with this", addend); - switch (type) { - case R_MIPS_HI16: - fprintf(outfile, " /* R_MIPS_HI16 reloc, offset %x */\n", rel->r_offset); - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = (uint16_t)((uint32_t)(%s)>>16);\n", - rel->r_offset - start_offset + 2, final_sym_name); - break; - case R_MIPS_LO16: - fprintf(outfile, " /* R_MIPS_LO16 reloc, offset %x */\n", rel->r_offset); - fprintf(outfile, " *(uint16_t *)(code_ptr() + %d) = (uint16_t)((uint32_t)(%s)&0xffff);\n", - rel->r_offset - start_offset + 2, final_sym_name); - break; - default: - error("unsupported MIPS relocation (%d)", type); - } - } - } -#else -#error unsupported CPU -#endif -} - -int gen_file(FILE *outfile, int out_type) -{ - int i; - EXE_SYM *sym; - - assert(out_type == OUT_GEN_OP_ALL); - if (out_type == OUT_GEN_OP_ALL) { - int status; - size_t nf, nd = 256; - char *demangled_name, *func_name; - if ((demangled_name = malloc(nd)) == NULL) - return -1; - if ((func_name = malloc(nf = nd)) == NULL) { - free(demangled_name); - return -1; - } - - fprintf(outfile, "#ifndef DEFINE_CST\n"); - fprintf(outfile, "#define DEFINE_CST(NAME, VALUE)\n"); - fprintf(outfile, "#endif\n"); - for(i = 0, sym = symtab; i < nb_syms; i++, sym++) { - const char *name; - name = get_sym_name(sym); - if (strstart(name, OP_PREFIX "execute", NULL)) { - /* skip Exception handlers */ - if (strchr(name, '.')) - continue; - strcpy(func_name, name); -#if defined(CONFIG_FORMAT_ELF) || defined(CONFIG_FORMAT_COFF) - if (sym->st_shndx != text_shndx) - error("invalid section for opcode (0x%x)", sym->st_shndx); -#endif - gen_code(func_name, NULL, sym->st_value, sym->st_size, outfile, 3, NULL); - } - else if (strstart(name, OP_PREFIX "exec_return_offset", NULL)) { - host_ulong *long_p; -#if defined(CONFIG_FORMAT_ELF) || defined(CONFIG_FORMAT_COFF) - if (sym->st_shndx != data_shndx) - error("invalid section for data (0x%x)", sym->st_shndx); -#endif - if (data == NULL) - error("no .data section found"); -#ifdef CONFIG_FORMAT_MACH - fprintf(outfile, "DEFINE_CST(%s,0x%xL)\n\n", name, *((host_ulong *)(data + sym->st_value - data_sec_hdr->addr))); -#else - fprintf(outfile, "DEFINE_CST(%s,0x%xL)\n\n", name, *((host_ulong *)(data + sym->st_value))); -#endif - } - else if (strstart(name, OP_PREFIX "invoke", NULL)) { - const char *prefix = "helper_"; - strcpy(func_name, prefix); - strcat(func_name, name); -#if defined(CONFIG_FORMAT_ELF) || defined(CONFIG_FORMAT_COFF) - if (sym->st_shndx != text_shndx) - error("invalid section for opcode (0x%x)", sym->st_shndx); -#endif - gen_code(func_name, NULL, sym->st_value, sym->st_size, outfile, 3, prefix); - } - else { - /* demangle C++ symbols */ - nd = 256; - demangled_name = cxx_demangle(name, demangled_name, &nd, &status); - if (status == 0 && strstart(demangled_name, OP_PREFIX, NULL)) { - /* get real function name */ - char *p = strchr(demangled_name, '('); - if (p && !strstart(p, "()::label", NULL)) { - int func_name_length = p - demangled_name; - if (nd > nf) { - char *new_func_name; - nf = nd; - if ((new_func_name = realloc(func_name, nf)) == NULL) { - free(func_name); - return -1; - } - func_name = new_func_name; - } - strncpy(func_name, demangled_name, func_name_length); - func_name[func_name_length] = '\0'; - /* emit code generator */ -#if defined(CONFIG_FORMAT_ELF) || defined(CONFIG_FORMAT_COFF) - if (sym->st_shndx != text_shndx) - error("invalid section for opcode (%s:0x%x)", name, sym->st_shndx); -#endif - gen_code(func_name, demangled_name, sym->st_value, sym->st_size, outfile, 3, NULL); - } - } - } - } - fprintf(outfile, "#undef DEFINE_CST\n"); - fprintf(outfile, "#undef DEFINE_GEN\n"); - - free(func_name); - free(demangled_name); - } - - return 0; -} - -void usage(void) -{ - printf("dyngen (c) 2003-2004 Fabrice Bellard\n" - "usage: dyngen [-o outfile] objfile\n" - "Generate a dynamic code generator from an object file\n" - ); - exit(1); -} - -int main(int argc, char **argv) -{ - int c, out_type; - const char *filename, *outfilename; - FILE *outfile; - - outfilename = "out.c"; - out_type = OUT_GEN_OP_ALL; - for(;;) { - c = getopt(argc, argv, "ho:"); - if (c == -1) - break; - switch(c) { - case 'h': - usage(); - break; - case 'o': - outfilename = optarg; - break; - } - } - if (optind >= argc) - usage(); - filename = argv[optind]; - outfile = fopen(outfilename, "w"); - if (!outfile) - error("could not open '%s'", outfilename); - - load_object(filename, outfile); - gen_file(outfile, out_type); - fclose(outfile); - return 0; -} - -/* - Local variables: - tab-width: 4 - indent-tabs-mode: nil - End: - */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp deleted file mode 100644 index e99e59630..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp +++ /dev/null @@ -1,149 +0,0 @@ -/* - * jit-cache.cpp - Translation cache management - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "vm_alloc.h" -#include "cpu/jit/jit-cache.hpp" - -#define DEBUG 0 -#include "debug.h" - -// Default cache size in KB -#if defined(__alpha__) -const int JIT_CACHE_SIZE = 2 * 1024; -#elif defined(__powerpc__) || defined(__ppc__) -const int JIT_CACHE_SIZE = 4 * 1024; -#else -const int JIT_CACHE_SIZE = 8 * 1024; -#endif -const int JIT_CACHE_SIZE_GUARD = 4096; - -basic_jit_cache::basic_jit_cache() - : cache_size(0), tcode_start(NULL), code_start(NULL), code_p(NULL), code_end(NULL), data(NULL) -{ -} - -basic_jit_cache::~basic_jit_cache() -{ - kill_translation_cache(); - - // Release data pool - data_chunk_t *p = data; - while (p) { - data_chunk_t *d = p; - p = p->next; - D(bug("basic_jit_cache: Release data pool %p (%d KB)\n", d, d->size / 1024)); - vm_release(d, d->size); - } -} - -bool -basic_jit_cache::init_translation_cache(uint32 size) -{ - size *= 1024; - - // Round up translation cache size to 16 KB boundaries - const uint32 roundup = 16 * 1024; - cache_size = (size + JIT_CACHE_SIZE_GUARD + roundup - 1) & -roundup; - assert(cache_size > 0); - - tcode_start = (uint8 *)vm_acquire(cache_size, VM_MAP_PRIVATE | VM_MAP_32BIT); - if (tcode_start == VM_MAP_FAILED) { - tcode_start = NULL; - return false; - } - - if (vm_protect(tcode_start, cache_size, - VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) { - vm_release(tcode_start, cache_size); - tcode_start = NULL; - return false; - } - - done: - D(bug("basic_jit_cache: Translation cache: %d KB at %p\n", cache_size / 1024, tcode_start)); - code_start = tcode_start; - code_p = code_start; - code_end = code_p + size; - return true; -} - -void -basic_jit_cache::kill_translation_cache() -{ - if (tcode_start) { - D(bug("basic_jit_cache: Release translation cache\n")); - vm_release(tcode_start, cache_size); - cache_size = 0; - tcode_start = NULL; - } -} - -bool -basic_jit_cache::initialize(void) -{ - if (cache_size == 0) - set_cache_size(JIT_CACHE_SIZE); - return tcode_start && cache_size; -} - -void -basic_jit_cache::set_cache_size(uint32 size) -{ - kill_translation_cache(); - if (size) - init_translation_cache(size); -} - -uint8 * -basic_jit_cache::copy_data(const uint8 *block, uint32 size) -{ - const int ALIGN = 16; - uint8 *ptr; - - if (data && (data->offs + size) < data->size) - ptr = (uint8 *)data + data->offs; - else { - // No free space left, allocate a new chunk - uint32 to_alloc = sizeof(*data) + size + ALIGN; - uint32 page_size = vm_get_page_size(); - to_alloc = (to_alloc + page_size - 1) & -page_size; - - D(bug("basic_jit_cache: Allocate data pool (%d KB)\n", to_alloc / 1024)); - ptr = (uint8 *)vm_acquire(to_alloc, VM_MAP_PRIVATE | VM_MAP_32BIT); - if (ptr == VM_MAP_FAILED) { - fprintf(stderr, "FATAL: Could not allocate data pool!\n"); - abort(); - } - - data_chunk_t *dcp = (data_chunk_t *)ptr; - dcp->size = to_alloc; - dcp->offs = (sizeof(*data) + ALIGN - 1) & -ALIGN; - dcp->next = data; - data = dcp; - - ptr += dcp->offs; - } - - memcpy(ptr, block, size); - data->offs += (size + ALIGN - 1) & -ALIGN; - D(bug("basic_jit_cache: DATA %p, %d bytes [data=%p, offs=%u]\n", ptr, size, data, data->offs)); - return ptr; -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.hpp deleted file mode 100644 index 201841d86..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.hpp +++ /dev/null @@ -1,126 +0,0 @@ -/* - * jit-cache.hpp - Translation cache management - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_CACHE_H -#define JIT_CACHE_H - -#define _JIT_HEADER jit-target-cache.hpp -#include "cpu/jit/jit-target-dispatch.h" - -/** - * Basic translation cache - **/ - -class basic_jit_cache -{ - // Translation cache (allocated base, current pointer, end pointer) - uint32 cache_size; - uint8 *tcode_start; - uint8 *code_start; - uint8 *code_p; - uint8 *code_end; - - // Data pool (32-bit addressable) - struct data_chunk_t { - uint32 size; - uint32 offs; - data_chunk_t *next; - }; - data_chunk_t *data; - -protected: - - // Initialize translation cache - bool init_translation_cache(uint32 size); - void kill_translation_cache(); - - // Initialize user code start - void set_code_start(uint8 *ptr); - - // Increase/set/get current position - void inc_code_ptr(int offset) { code_p += offset; } - void set_code_ptr(uint8 *ptr) { code_p = ptr; } -public: - uint8 *code_ptr() const { return code_p; } - -public: - - // Default constructor & destructor (use default JIT_CACHE_SIZE) - basic_jit_cache(); - ~basic_jit_cache(); - - bool initialize(void); - void set_cache_size(uint32 size); - - // Invalidate translation cache - void invalidate_cache(); - bool full_translation_cache() const - { return code_p >= code_end; } - - // Emit code to translation cache - template< typename T > - void emit_generic(T v); - void emit_8(uint8 v) { emit_generic(v); } - void emit_16(uint16 v) { emit_generic(v); } - void emit_32(uint32 v) { emit_generic(v); } - void emit_64(uint64 v) { emit_generic(v); } - void emit_ptr(uintptr v) { emit_generic(v); } - void copy_block(const uint8 *block, uint32 size); - void emit_block(const uint8 *block, uint32 size); - - // Emit data to constant pool - uint8 *copy_data(const uint8 *block, uint32 size); -}; - -inline void -basic_jit_cache::set_code_start(uint8 *ptr) -{ - assert(ptr >= tcode_start && ptr < code_end); - code_start = ptr; -} - -inline void -basic_jit_cache::invalidate_cache() -{ - code_p = code_start; -} - -template< class T > -inline void -basic_jit_cache::emit_generic(T v) -{ - *((T *)code_ptr()) = v; - inc_code_ptr(sizeof(T)); -} - -inline void -basic_jit_cache::copy_block(const uint8 *block, uint32 size) -{ - memcpy(code_ptr(), block, size); -} - -inline void -basic_jit_cache::emit_block(const uint8 *block, uint32 size) -{ - copy_block(block, size); - inc_code_ptr(size); -} - -#endif /* JIT_CACHE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-codegen.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-codegen.hpp deleted file mode 100644 index 7d428a4c3..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-codegen.hpp +++ /dev/null @@ -1,39 +0,0 @@ -/* - * jit-codegen.hpp - Generic code generator - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_CODEGEN_H -#define JIT_CODEGEN_H - -#include "cpu/jit/jit-cache.hpp" - -#if defined(__i386__) -#include "cpu/jit/x86/jit-target-codegen.hpp" -typedef x86_codegen jit_codegen; -#elif defined(__x86_64__) -#include "cpu/jit/amd64/jit-target-codegen.hpp" -typedef amd64_codegen jit_codegen; -#else -struct jit_codegen - : public basic_jit_cache -{ -}; -#endif - -#endif /* JIT_CODEGEN_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-config.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-config.hpp deleted file mode 100644 index 44fd24588..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-config.hpp +++ /dev/null @@ -1,62 +0,0 @@ -/* - * jit-config.hpp - JIT config utils - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_CONFIG_H -#define JIT_CONFIG_H - -/** - * ENABLE_DYNGEN - * - * Define to enable the portable "JIT1" engine based on code - * inlining technique as implemented in QEMU. - **/ - -#ifndef ENABLE_DYNGEN -#define ENABLE_DYNGEN 0 -#endif - -/** - * DYNGEN_ASM_OPTS - * - * Define to permit host inline asm optimizations. This is - * particularly useful to compute emulated condition code - * registers. - **/ - -#if ENABLE_DYNGEN -#ifndef DYNGEN_ASM_OPTS -#define DYNGEN_ASM_OPTS 0 -#endif -#endif - -/** - * DYNGEN_DIRECT_BLOCK_CHAINING - * - * Define to enable direct block chaining on platforms supporting - * that feature. e.g. PowerPC. - **/ - -#if ENABLE_DYNGEN -#ifndef DYNGEN_DIRECT_BLOCK_CHAINING -#define DYNGEN_DIRECT_BLOCK_CHAINING 1 -#endif -#endif - -#endif /* JIT_CONFIG_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-target-dispatch.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-target-dispatch.h deleted file mode 100644 index f1ece3998..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-target-dispatch.h +++ /dev/null @@ -1,70 +0,0 @@ - -/* - * jit-target-dispatch.h - JIT headers dispatcher - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 - */ - -/* Undefine some built-ins */ -#ifdef i386 -#undef i386 -#define _jit_defined_i386 -#endif -#ifdef amd64 -#undef amd64 -#define _jit_defined_amd64 -#endif -#ifdef mips -#undef mips -#define _jit_defined_mips -#endif - -/* Dispatch arch dependent header */ -#define _JIT_CONCAT4(a,b,c,d) a##b##c##d -#if defined(__GNUC__) -#define _JIT_MAKE_HEADER(arch,header) -#else -#define _JIT_MAKE_HEADER(arch,header) _JIT_CONCAT4() -#endif -#if defined(__x86_64__) -#include _JIT_MAKE_HEADER(amd64,_JIT_HEADER) -#elif defined(__i386__) -#include _JIT_MAKE_HEADER(x86,_JIT_HEADER) -#elif defined(__powerpc__) || defined(__ppc__) -#include _JIT_MAKE_HEADER(ppc,_JIT_HEADER) -#elif defined(__mips__) || (defined __sgi && defined __mips) -#include _JIT_MAKE_HEADER(mips,_JIT_HEADER) -#else -#error "Unknown architecture, please submit bug report" -#endif -#undef _JIT_CONCAT4 -#undef _JIT_MAKE_HEADER -#undef _JIT_HEADER - -/* Redefine built-ins */ -#ifdef _jit_defined_i386 -#undef _jit_defined_i386 -#define i386 1 -#endif -#ifdef _jit_defined_amd64 -#undef _jit_defined_amd64 -#define amd64 1 -#endif -#ifdef _jit_defined_mips -#undef _jit_defined_mips -#define mips 1 -#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/dyngen-target-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/dyngen-target-exec.h deleted file mode 100644 index 2c2140de7..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/dyngen-target-exec.h +++ /dev/null @@ -1,45 +0,0 @@ -/* - * dyngen defines for micro operation code - * - * Copyright (c) 2003-2004-2004 Fabrice Bellard - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef DYNGEN_TARGET_EXEC_H -#define DYNGEN_TARGET_EXEC_H - -enum { - /* callee save registers */ -#define AREG0 "s0" - AREG0_ID = 16, - -#define AREG1 "s1" - AREG1_ID = 17, - -#define AREG2 "s2" - AREG2_ID = 18, - -#define AREG3 "s3" - AREG3_ID = 19, - -#define AREG4 "s4" - AREG4_ID = 20, - -#define AREG5 "s5" - AREG5_ID = 21, -}; - -#endif /* DYNGEN_TARGET_EXEC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/jit-target-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/jit-target-cache.hpp deleted file mode 100644 index 8e8ca3b83..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/mips/jit-target-cache.hpp +++ /dev/null @@ -1,34 +0,0 @@ -/* - * jit-target-cache.hpp - Target specific code to invalidate cache - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_TARGET_CACHE_H -#define JIT_TARGET_CACHE_H - -#if defined __sgi -#include -static inline void flush_icache_range(unsigned long start, unsigned long stop) -{ - cacheflush((void *)start, stop - start, BCACHE); -} -#elif defined __GNUC__ -#error "FIXME: implement assembly code for code cache invalidation" -#endif - -#endif /* JIT_TARGET_CACHE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/dyngen-target-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/dyngen-target-exec.h deleted file mode 100644 index e139e4c91..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/dyngen-target-exec.h +++ /dev/null @@ -1,71 +0,0 @@ -/* - * dyngen defines for micro operation code - * - * Copyright (c) 2003-2004-2004 Fabrice Bellard - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef DYNGEN_TARGET_EXEC_H -#define DYNGEN_TARGET_EXEC_H - -enum { -#define AREG0 "r27" - AREG0_ID = 27, - -#define AREG1 "r24" - AREG1_ID = 24, - -#define AREG2 "r25" - AREG2_ID = 25, - -#define AREG3 "r26" - AREG3_ID = 26, - -#define AREG4 "r16" - AREG4_ID = 16, - -#define AREG5 "r17" - AREG5_ID = 17, - -#define AREG6 "r18" - AREG6_ID = 18, - -#define AREG7 "r19" - AREG7_ID = 19, - -#define AREG8 "r20" - AREG8_ID = 20, - -#define AREG9 "r21" - AREG9_ID = 21, - -#define AREG10 "r22" - AREG10_ID = 22, - -#define AREG11 "r23" - AREG11_ID = 23, - -#define FREG0 "f1" - FREG0_ID = 1, - -#define FREG1 "f2" - FREG1_ID = 2, - -#define FREG2 "f3" - FREG2_ID = 3, -}; - -#endif /* DYNGEN_TARGET_EXEC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/jit-target-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/jit-target-cache.hpp deleted file mode 100644 index 8a83eb3d2..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/ppc/jit-target-cache.hpp +++ /dev/null @@ -1,44 +0,0 @@ -/* - * jit-target-cache.hpp - Target specific code to invalidate cache - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_TARGET_CACHE_H -#define JIT_TARGET_CACHE_H - -static inline void flush_icache_range(unsigned long start, unsigned long stop) -{ - const int MIN_CACHE_LINE_SIZE = 8; /* conservative value */ - - unsigned long p; - - p = start & ~(MIN_CACHE_LINE_SIZE - 1); - stop = (stop + MIN_CACHE_LINE_SIZE - 1) & ~(MIN_CACHE_LINE_SIZE - 1); - - for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) { - asm volatile ("dcbst 0,%0" : : "r"(p) : "memory"); - } - asm volatile ("sync" : : : "memory"); - for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) { - asm volatile ("icbi 0,%0" : : "r"(p) : "memory"); - } - asm volatile ("sync" : : : "memory"); - asm volatile ("isync" : : : "memory"); -} - -#endif /* JIT_TARGET_CACHE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h deleted file mode 120000 index 110f4bd0d..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h +++ /dev/null @@ -1 +0,0 @@ -../../../../../../../BasiliskII/src/uae_cpu/compiler/codegen_x86.h \ No newline at end of file diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/dyngen-target-exec.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/dyngen-target-exec.h deleted file mode 100644 index 4480345e6..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/dyngen-target-exec.h +++ /dev/null @@ -1,55 +0,0 @@ -/* - * dyngen defines for micro operation code - * - * Copyright (c) 2003-2004-2004 Fabrice Bellard - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this library; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef DYNGEN_TARGET_EXEC_H -#define DYNGEN_TARGET_EXEC_H - -enum { - /* callee save registers */ -#define AREG0 "ebp" - AREG0_ID = 5, - -#define AREG1 "ebx" - AREG1_ID = 3, - -#define AREG2 "esi" - AREG2_ID = 6, - -#define AREG3 "edi" - AREG3_ID = 7, - - // NOTE: the following XMM registers definitions require to build - // *-dyngen-ops.cpp with -ffixed-xmmN - - /* vector registers */ -#define VREG0 "xmm4" - VREG0_ID = 4, - -#define VREG1 "xmm5" - VREG1_ID = 5, - -#define VREG2 "xmm6" - VREG2_ID = 6, - -#define VREG3 "xmm7" - VREG3_ID = 7, -}; - -#endif /* DYNGEN_TARGET_EXEC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-cache.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-cache.hpp deleted file mode 100644 index f411d3bbe..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-cache.hpp +++ /dev/null @@ -1 +0,0 @@ -#include "cpu/jit/dummy/jit-target-cache.hpp" diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-codegen.hpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-codegen.hpp deleted file mode 100644 index 0643de904..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/jit-target-codegen.hpp +++ /dev/null @@ -1,760 +0,0 @@ -/* - * jit-target-codegen.hpp - Target specific code generator - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 JIT_X86_CODEGEN_H -#define JIT_X86_CODEGEN_H - -// XXX drop (Basilisk II, lightning) => merge into here -#define X86_FLAT_REGISTERS 0 -#define X86_OPTIMIZE_ALU 1 -#define X86_OPTIMIZE_ROTSHI 1 -#include "cpu/jit/x86/codegen_x86.h" - -#if defined(__GNUC__) -#define x86_emit_failure(MSG) gen_failure(MSG, __FILE__, __LINE__, __FUNCTION__) -#else -#define x86_emit_failure(MSG) gen_failure(MSG, __FILE__, __LINE__) -#endif -#define x86_code_pointer __my_cached_code_ptr -#define x86_get_target() x86_code_pointer -#define x86_emit_byte(v) (void)(*x86_code_pointer++ = (v)) -#define x86_emit_word(v) (*((uint16 *)x86_code_pointer) = (v), (void)(x86_code_pointer += 2)) -#define x86_emit_long(v) (*((uint32 *)x86_code_pointer) = (v), (void)(x86_code_pointer += 4)) -#define x86_emit_quad(v) (*((uint64 *)x86_code_pointer) = (v), (void)(x86_code_pointer += 8)) - -struct x86_immediate_operand { - const int32 value; - - explicit x86_immediate_operand(int32 imm) - : value(imm) - { } -}; - -struct x86_memory_operand { - const int32 MD; - const int8 MB; - const int8 MI; - const int8 MS; - - x86_memory_operand(int32 d, int b, int i = X86_NOREG, int s = 1) - : MD(d), MB(b), MI(i), MS(s) - { } -}; - -class x86_codegen - : public basic_jit_cache -{ -protected: - - void gen_failure(const char *msg, const char *file, int line, const char *fn = NULL); - -public: - - /* XXX this avoids emit_XXX() functions because GCC cannot - optimize out intermediate code_ptr() updates */ -#define GEN_CODE(CODE) do { \ - uint8 *x86_code_pointer = code_ptr(); \ - CODE; \ - set_code_ptr(x86_code_pointer); \ -} while (0) - -public: - - void gen_insn(int type, int op, int s, int d); - void gen_insn(int type, int op, x86_memory_operand const & mem, int d); - -private: - -#define DEFINE_OP(SZ, SFX) \ - void gen_arith_##SZ(int op, int s, int d) \ - { GEN_CODE(_ALU##SFX##rr(op, s, d)); } \ - void gen_arith_##SZ(int op, x86_memory_operand const & mem, int d) \ - { GEN_CODE(_ALU##SFX##mr(op, mem.MD, mem.MB, mem.MI, mem.MS, d)); } \ - void gen_arith_##SZ(int op, int s, x86_memory_operand const & mem) \ - { GEN_CODE(_ALU##SFX##rm(op, s, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_arith_##SZ(int op, x86_immediate_operand const & imm, int d) \ - { GEN_CODE(_ALU##SFX##ir(op, imm.value, d)); } \ - void gen_arith_##SZ(int op, x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { GEN_CODE(_ALU##SFX##im(op, imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(8, B); - DEFINE_OP(16, W); - DEFINE_OP(32, L); - -#undef DEFINE_OP - -public: - -#define DEFINE_OP_SZ(SZ, NAME, OP) \ - void gen_##NAME##_##SZ(int s, int d) \ - { gen_arith_##SZ(X86_##OP, s, d); } \ - void gen_##NAME##_##SZ(x86_memory_operand const & mem, int d) \ - { gen_arith_##SZ(X86_##OP, mem, d); } \ - void gen_##NAME##_##SZ(int s, x86_memory_operand const & mem) \ - { gen_arith_##SZ(X86_##OP, s, mem); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, int d) \ - { gen_arith_##SZ(X86_##OP, imm, d); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { gen_arith_##SZ(X86_##OP, imm, mem); } - -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_SZ(8, NAME, OP) \ - DEFINE_OP_SZ(16, NAME, OP) \ - DEFINE_OP_SZ(32, NAME, OP) - - DEFINE_OP(add, ADD); - DEFINE_OP(sub, SUB); - DEFINE_OP(adc, ADC); - DEFINE_OP(sbb, SBB); - DEFINE_OP(cmp, CMP); - DEFINE_OP(or, OR); - DEFINE_OP(xor, XOR); - DEFINE_OP(and, AND); - -#undef DEFINE_OP -#undef DEFINE_OP_SZ - -private: - -#define DEFINE_OP(SZ, SFX) \ - void gen_rotshi_##SZ(int op, int s, int d) \ - { GEN_CODE(_ROTSHI##SFX##rr(op, s, d)); } \ - void gen_rotshi_##SZ(int op, int s, x86_memory_operand const & mem) \ - { GEN_CODE(_ROTSHI##SFX##rm(op, s, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_rotshi_##SZ(int op, x86_immediate_operand const & imm, int d) \ - { GEN_CODE(_ROTSHI##SFX##ir(op, imm.value, d)); } \ - void gen_rotshi_##SZ(int op, x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { GEN_CODE(_ROTSHI##SFX##im(op, imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(8, B); - DEFINE_OP(16, W); - DEFINE_OP(32, L); - -#undef DEFINE_OP - -public: - -#define DEFINE_OP_SZ(SZ, NAME, OP) \ - void gen_##NAME##_##SZ(int s, int d) \ - { gen_rotshi_##SZ(X86_##OP, s, d); } \ - void gen_##NAME##_##SZ(int s, x86_memory_operand const & mem) \ - { gen_rotshi_##SZ(X86_##OP, s, mem); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, int d) \ - { gen_rotshi_##SZ(X86_##OP, imm, d); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { gen_rotshi_##SZ(X86_##OP, imm, mem); } - -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_SZ(8, NAME, OP) \ - DEFINE_OP_SZ(16, NAME, OP) \ - DEFINE_OP_SZ(32, NAME, OP) - - DEFINE_OP(rol, ROL); - DEFINE_OP(ror, ROR); - DEFINE_OP(rcl, RCL); - DEFINE_OP(rcr, RCR); - DEFINE_OP(shl, SHL); - DEFINE_OP(shr, SHR); - DEFINE_OP(sar, SAR); - -#undef DEFINE_OP -#undef DEFINE_OP_SZ - -private: - -#define DEFINE_OP(SZ, SFX) \ - void gen_bitop_##SZ(int op, int s, int d) \ - { GEN_CODE(_BT##SFX##rr(op, s, d)); } \ - void gen_bitop_##SZ(int op, int s, x86_memory_operand const & mem) \ - { GEN_CODE(_BT##SFX##rm(op, s, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_bitop_##SZ(int op, x86_immediate_operand const & imm, int d) \ - { GEN_CODE(_BT##SFX##ir(op, imm.value, d)); } \ - void gen_bitop_##SZ(int op, x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { GEN_CODE(_BT##SFX##im(op, imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(16, W); - DEFINE_OP(32, L); - -#undef DEFINE_OP - -public: - -#define DEFINE_OP_SZ(SZ, NAME, OP) \ - void gen_##NAME##_##SZ(int s, int d) \ - { gen_bitop_##SZ(X86_##OP, s, d); } \ - void gen_##NAME##_##SZ(int s, x86_memory_operand const & mem) \ - { gen_bitop_##SZ(X86_##OP, s, mem); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, int d) \ - { gen_bitop_##SZ(X86_##OP, imm, d); } \ - void gen_##NAME##_##SZ(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { gen_bitop_##SZ(X86_##OP, imm, mem); } - -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_SZ(16, NAME, OP) \ - DEFINE_OP_SZ(32, NAME, OP) - - DEFINE_OP(bt, BT); - DEFINE_OP(btc, BTC); - DEFINE_OP(bts, BTS); - DEFINE_OP(btr, BTR); - -#undef DEFINE_OP -#undef DEFINE_OP_SZ - -public: - -#define DEFINE_OP(SZ, SFX) \ - void gen_mov_##SZ(int s, int d) \ - { GEN_CODE(MOV##SFX##rr(s, d)); } \ - void gen_mov_##SZ(x86_memory_operand const & mem, int d) \ - { GEN_CODE(MOV##SFX##mr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } \ - void gen_mov_##SZ(int s, x86_memory_operand const & mem) \ - { GEN_CODE(MOV##SFX##rm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_mov_##SZ(x86_immediate_operand const & imm, int d) \ - { GEN_CODE(MOV##SFX##ir(imm.value, d)); } \ - void gen_mov_##SZ(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { GEN_CODE(MOV##SFX##im(imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_test_##SZ(int s, int d) \ - { GEN_CODE(TEST##SFX##rr(s, d)); } \ - void gen_test_##SZ(int s, x86_memory_operand const & mem) \ - { GEN_CODE(TEST##SFX##rm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } \ - void gen_test_##SZ(x86_immediate_operand const & imm, int d) \ - { GEN_CODE(TEST##SFX##ir(imm.value, d)); } \ - void gen_test_##SZ(x86_immediate_operand const & imm, x86_memory_operand const & mem) \ - { GEN_CODE(TEST##SFX##im(imm.value, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(8, B); - DEFINE_OP(16, W); - DEFINE_OP(32, L); - -#undef DEFINE_OP - -private: - - void gen_unary_8(int op, int r) - { GEN_CODE(_UNARYBr(op, r)); } - void gen_unary_8(int op, x86_memory_operand const & mem) - { GEN_CODE(_UNARYBm(op, mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_unary_16(int op, int r) - { GEN_CODE(_UNARYWr(op, r)); } - void gen_unary_16(int op, x86_memory_operand const & mem) - { GEN_CODE(_UNARYWm(op, mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_unary_32(int op, int r) - { GEN_CODE(_UNARYLr(op, r)); } - void gen_unary_32(int op, x86_memory_operand const & mem) - { GEN_CODE(_UNARYLm(op, mem.MD, mem.MB, mem.MI, mem.MS)); } - -public: - -#define DEFINE_OP_SZ(SZ, NAME, OP) \ - void gen_##NAME##_##SZ(int r) \ - { gen_unary_##SZ(X86_##OP, r); } \ - void gen_##NAME##_##SZ(x86_memory_operand const & mem) \ - { gen_unary_##SZ(X86_##OP, mem); } - -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_SZ(8, NAME, OP) \ - DEFINE_OP_SZ(16, NAME, OP) \ - DEFINE_OP_SZ(32, NAME, OP) - - DEFINE_OP(not, NOT); - DEFINE_OP(neg, NEG); - DEFINE_OP(mul, MUL); - DEFINE_OP(div, DIV); - DEFINE_OP(imul, IMUL); - DEFINE_OP(idiv, IDIV); - -#undef DEFINE_OP -#undef DEFINE_OP_SZ - - void gen_imul_16(int s, int d) - { GEN_CODE(IMULWrr(s, d)); } - void gen_imul_16(x86_memory_operand const & mem, int d) - { GEN_CODE(IMULWmr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_imul_16(int s, x86_immediate_operand const & imm, int d) - { GEN_CODE(IMULWirr(imm.value, s, d)); } - void gen_imul_16(x86_memory_operand const & mem, x86_immediate_operand const & imm, int d) - { GEN_CODE(IMULWimr(imm.value, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_imul_32(int s, int d) - { GEN_CODE(IMULLrr(s, d)); } - void gen_imul_32(x86_memory_operand const & mem, int d) - { GEN_CODE(IMULLmr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_imul_32(x86_immediate_operand const & imm, int d) - { GEN_CODE(IMULLir(imm.value, d)); } - void gen_imul_32(x86_immediate_operand const & imm, int s, int d) - { GEN_CODE(IMULLirr(imm.value, s, d)); } - void gen_imul_32(x86_memory_operand const & mem, x86_immediate_operand const & imm, int d) - { GEN_CODE(IMULLimr(imm.value, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -public: - - void gen_call(x86_immediate_operand const & target) - { GEN_CODE(CALLm(target.value)); } - void gen_call(int r) - { GEN_CODE(CALLsr(r)); } - void gen_call(x86_memory_operand const & mem) - { GEN_CODE(CALLsm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_jmp(x86_immediate_operand const & target) - { GEN_CODE(JMPm(target.value)); } - void gen_jmp(int r) - { GEN_CODE(JMPsr(r)); } - void gen_jmp(x86_memory_operand const & mem) - { GEN_CODE(JMPsm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_jcc(int cc, x86_immediate_operand const & target) - { GEN_CODE(JCCim(cc, target.value)); } - void gen_jcc_offset(int cc, x86_immediate_operand const & offset) - { GEN_CODE(JCCii(cc, offset.value)); } - void gen_setcc(int cc, int r) - { GEN_CODE(SETCCir(cc, r)); } - void gen_setcc(int cc, x86_memory_operand const & mem) - { GEN_CODE(SETCCim(cc, mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_cmov_16(int cc, int r, int d) - { GEN_CODE(CMOVWrr(cc, r, d)); } - void gen_cmov_16(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMOVWmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_cmov_32(int cc, int r, int d) - { GEN_CODE(CMOVLrr(cc, r, d)); } - void gen_cmov_32(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMOVLmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -public: - - void gen_push(int r) - { GEN_CODE(PUSHLr(r)); } - void gen_push(x86_memory_operand const & mem) - { GEN_CODE(PUSHLm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_pop(int r) - { GEN_CODE(POPLr(r)); } - void gen_pop(x86_memory_operand const & mem) - { GEN_CODE(POPLm(mem.MD, mem.MB, mem.MI, mem.MS)); } - void gen_pusha(void) - { GEN_CODE(PUSHA()); } - void gen_popa(void) - { GEN_CODE(POPA()); } - void gen_pushf(void) - { GEN_CODE(PUSHF()); } - void gen_popf(void) - { GEN_CODE(POPF()); } - -public: - -#define DEFINE_OP_SZ(SZ, SFX, NAME, OP) \ - void gen_##NAME##_##SZ(int s, int d) \ - { GEN_CODE(OP##SFX##rr(s, d)); } \ - void gen_##NAME##_##SZ(int s, x86_memory_operand const & mem) \ - { GEN_CODE(OP##SFX##rm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } - -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_SZ(8, B, NAME, OP) \ - DEFINE_OP_SZ(16, W, NAME, OP) \ - DEFINE_OP_SZ(32, L, NAME, OP) - - DEFINE_OP(cmpxchg, CMPXCHG); - DEFINE_OP(xadd, XADD); - DEFINE_OP(xchg, XCHG); - -#undef DEFINE_OP -#undef DEFINE_OP_SZ - -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME(int s, int d) \ - { GEN_CODE(OP##rr(s, d)); } \ - void gen_##NAME(x86_memory_operand const & mem, int d) \ - { GEN_CODE(OP##mr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - - DEFINE_OP(bsf_16, BSFW); - DEFINE_OP(bsr_16, BSRW); - DEFINE_OP(bsf_32, BSFL); - DEFINE_OP(bsr_32, BSRL); - DEFINE_OP(mov_sx_8_16, MOVSBW); - DEFINE_OP(mov_zx_8_16, MOVZBW); - DEFINE_OP(mov_sx_8_32, MOVSBL); - DEFINE_OP(mov_zx_8_32, MOVZBL); - DEFINE_OP(mov_sx_16_32, MOVSWL); - DEFINE_OP(mov_zx_16_32, MOVZWL); - -#undef DEFINE_OP - -public: - - void gen_bswap_32(int r) - { GEN_CODE(BSWAPLr(r)); } - void gen_lea_32(x86_memory_operand const & mem, int d) - { GEN_CODE(LEALmr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_clc(void) - { GEN_CODE(CLC()); } - void gen_stc(void) - { GEN_CODE(STC()); } - void gen_cmc(void) - { GEN_CODE(CMC()); } - void gen_lahf(void) - { GEN_CODE(LAHF()); } - void gen_sahf(void) - { GEN_CODE(SAHF()); } - -private: - - void gen_sse_arith_ss(int op, int s, int d) - { GEN_CODE(_SSESSrr(op, s, d)); } - void gen_sse_arith_ss(int op, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSESSmr(op, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_sse_arith_sd(int op, int s, int d) - { GEN_CODE(_SSESDrr(op, s, d)); } - void gen_sse_arith_sd(int op, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSESDmr(op, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_sse_arith_ps(int op, int s, int d) - { GEN_CODE(_SSEPSrr(op, s, d)); } - void gen_sse_arith_ps(int op, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSEPSmr(op, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_sse_arith_pd(int op, int s, int d) - { GEN_CODE(_SSEPDrr(op, s, d)); } - void gen_sse_arith_pd(int op, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSEPDmr(op, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -public: - - void gen_cmpps(int cc, int s, int d) - { GEN_CODE(CMPPSrr(cc, s, d)); } - void gen_cmpps(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMPPSmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_cmppd(int cc, int s, int d) - { GEN_CODE(CMPPDrr(cc, s, d)); } - void gen_cmppd(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMPPDmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_cmpss(int cc, int s, int d) - { GEN_CODE(CMPSSrr(cc, s, d)); } - void gen_cmpss(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMPSSmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_cmpsd(int cc, int s, int d) - { GEN_CODE(CMPSDrr(cc, s, d)); } - void gen_cmpsd(int cc, x86_memory_operand const & mem, int d) - { GEN_CODE(CMPSDmr(cc, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -public: - -#define DEFINE_OP_SS(NAME, OP) \ - void gen_##NAME##ss(x86_memory_operand const & mem, int d) \ - { gen_sse_arith_ss(X86_SSE_##OP, mem, d); } \ - void gen_##NAME##ss(int s, int d) \ - { gen_sse_arith_ss(X86_SSE_##OP, s, d); } -#define DEFINE_OP_SD(NAME, OP) \ - void gen_##NAME##sd(x86_memory_operand const & mem, int d) \ - { gen_sse_arith_sd(X86_SSE_##OP, mem, d); } \ - void gen_##NAME##sd(int s, int d) \ - { gen_sse_arith_sd(X86_SSE_##OP, s, d); } -#define DEFINE_OP_PS(NAME, OP) \ - void gen_##NAME##ps(x86_memory_operand const & mem, int d) \ - { gen_sse_arith_ps(X86_SSE_##OP, mem, d); } \ - void gen_##NAME##ps(int s, int d) \ - { gen_sse_arith_ps(X86_SSE_##OP, s, d); } -#define DEFINE_OP_PD(NAME, OP) \ - void gen_##NAME##pd(x86_memory_operand const & mem, int d) \ - { gen_sse_arith_pd(X86_SSE_##OP, mem, d); } \ - void gen_##NAME##pd(int s, int d) \ - { gen_sse_arith_pd(X86_SSE_##OP, s, d); } - -#define DEFINE_OP_S(NAME, OP) \ - DEFINE_OP_SS(NAME, OP) \ - DEFINE_OP_SD(NAME, OP) -#define DEFINE_OP_P(NAME, OP) \ - DEFINE_OP_PS(NAME, OP) \ - DEFINE_OP_PD(NAME, OP) -#define DEFINE_OP(NAME, OP) \ - DEFINE_OP_S(NAME, OP) \ - DEFINE_OP_P(NAME, OP) - - DEFINE_OP(add, ADD); - DEFINE_OP(sub, SUB); - DEFINE_OP(mul, MUL); - DEFINE_OP(div, DIV); - DEFINE_OP(min, MIN); - DEFINE_OP(max, MAX); - DEFINE_OP_P(and, AND); - DEFINE_OP_P(andn, ANDN); - DEFINE_OP_P(or, OR); - DEFINE_OP_P(xor, XOR); - DEFINE_OP_SS(rcp, RCP); - DEFINE_OP_PS(rcp, RCP); - DEFINE_OP_SS(rsqrt, RSQRT); - DEFINE_OP_PS(rsqrt, RSQRT); - DEFINE_OP_SS(sqrt, SQRT); - DEFINE_OP_PS(sqrt, SQRT); - DEFINE_OP_SS(comi, COMI); - DEFINE_OP_SD(comi, COMI); - DEFINE_OP_SS(ucomi, UCOMI); - DEFINE_OP_SD(ucomi, UCOMI); - -#undef DEFINE_OP -#undef DEFINE_OP_S -#undef DEFINE_OP_P -#undef DEFINE_OP_SS -#undef DEFINE_OP_SD -#undef DEFINE_OP_PS -#undef DEFINE_OP_PD - -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME(int s, int d) \ - { GEN_CODE(OP##rr(s, d)); } \ - void gen_##NAME(x86_memory_operand const & mem, int d) \ - { GEN_CODE(OP##mr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } \ - void gen_##NAME(int s, x86_memory_operand const & mem) \ - { GEN_CODE(OP##rm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(movaps, MOVAPS); - DEFINE_OP(movapd, MOVAPD); - DEFINE_OP(movdqa, MOVDQA); - DEFINE_OP(movdqu, MOVDQU); - -#undef DEFINE_OP - -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME(int s, int d) \ - { GEN_CODE(OP##rr(s, d)); } \ - void gen_##NAME(x86_memory_operand const & mem, int d) \ - { GEN_CODE(OP##mr(mem.MD, mem.MB, mem.MI, mem.MS, d)); } - - DEFINE_OP(movd_lx, MOVDXD); - -#undef DEFINE_OP - -public: - -#define DEFINE_OP(NAME, OP) \ - void gen_##NAME(int s, int d) \ - { GEN_CODE(OP##rr(s, d)); } \ - void gen_##NAME(int s, x86_memory_operand const & mem) \ - { GEN_CODE(OP##rm(s, mem.MD, mem.MB, mem.MI, mem.MS)); } - - DEFINE_OP(movd_xl, MOVDXS); - -#undef DEFINE_OP - -private: - - void gen_sse_arith(int op1, int op2, int s, int d) - { GEN_CODE(_SSELrr(op1, op2, s, _rX, d, _rX)); } - void gen_sse_arith(int op1, int op2, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSELmr(op1, op2, mem.MD, mem.MB, mem.MI, mem.MS, d, _rX)); } - void gen_sse_arith(int op1, int op2, x86_immediate_operand const & imm, int s, int d) - { GEN_CODE(_SSELirr(op1, op2, imm.value, s, d)); } - void gen_sse_arith(int op1, int op2, x86_immediate_operand const & imm, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSELimr(op1, op2, imm.value, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - void gen_sse_arith(int op1, int op2, int mri, x86_immediate_operand const & imm, int d) - { GEN_CODE(_SSELir(op1, op2, mri, imm.value, d)); } - -public: - -#define DEFINE_OP(NAME, OP1, OP2) \ - void gen_##NAME(int s, int d) \ - { gen_sse_arith(OP1, OP2, s, d); } \ - void gen_##NAME(x86_memory_operand const & mem, int d) \ - { gen_sse_arith(OP1, OP2, mem, d); } - -#define DEFINE_OP_IRR(NAME, OP1, OP2) \ - void gen_##NAME(x86_immediate_operand const & imm, int s, int d) \ - { gen_sse_arith(OP1, OP2, imm, s, d); } - -#define DEFINE_OP_IXR(NAME, OP1, OP2) \ - DEFINE_OP_IRR(NAME, OP1, OP2) \ - void gen_##NAME(x86_immediate_operand const & imm, x86_memory_operand const & mem, int d) \ - { gen_sse_arith(OP1, OP2, imm, mem, d); } - -#define DEFINE_OP_IR(NAME, OP1, OP2, MRI) \ - void gen_##NAME(x86_immediate_operand const & imm, int d) \ - { gen_sse_arith(OP1, OP2, MRI, imm, d); } - - DEFINE_OP(packssdw, 0x66, 0x6b); - DEFINE_OP(packsswb, 0x66, 0x63); - DEFINE_OP(packuswb, 0x66, 0x67); - DEFINE_OP(paddb, 0x66, 0xfc); - DEFINE_OP(paddd, 0x66, 0xfe); - DEFINE_OP(paddq, 0x66, 0xd4); - DEFINE_OP(paddsb, 0x66, 0xec); - DEFINE_OP(paddsw, 0x66, 0xed); - DEFINE_OP(paddusb, 0x66, 0xdc); - DEFINE_OP(paddusw, 0x66, 0xdd); - DEFINE_OP(paddw, 0x66, 0xfd); - DEFINE_OP(pand, 0x66, 0xdb); - DEFINE_OP(pandn, 0x66, 0xdf); - DEFINE_OP(pavgb, 0x66, 0xe0); - DEFINE_OP(pavgw, 0x66, 0xe3); - DEFINE_OP(pcmpeqb, 0x66, 0x74); - DEFINE_OP(pcmpeqd, 0x66, 0x76); - DEFINE_OP(pcmpeqw, 0x66, 0x75); - DEFINE_OP(pcmpgtb, 0x66, 0x64); - DEFINE_OP(pcmpgtd, 0x66, 0x66); - DEFINE_OP(pcmpgtw, 0x66, 0x65); - DEFINE_OP_IRR(pextrw, 0x66, 0xc5); - DEFINE_OP_IRR(pinsrw, 0x66, 0xc4); - DEFINE_OP(pmaddwd, 0x66, 0xf5); - DEFINE_OP(pmaxsw, 0x66, 0xee); - DEFINE_OP(pmaxub, 0x66, 0xde); - DEFINE_OP(pminsw, 0x66, 0xea); - DEFINE_OP(pminub, 0x66, 0xda); - DEFINE_OP(pmovmskb, 0x66, 0xd7); - DEFINE_OP(pmulhuw, 0x66, 0xe4); - DEFINE_OP(pmulhw, 0x66, 0xe5); - DEFINE_OP(pmullw, 0x66, 0xd5); - DEFINE_OP(pmuludq, 0x66, 0xf4); - DEFINE_OP(por, 0x66, 0xeb); - DEFINE_OP(psadbw, 0x66, 0xf6); - DEFINE_OP_IXR(pshufd, 0x66, 0x70); - DEFINE_OP_IXR(pshufhw, 0xf3, 0x70); - DEFINE_OP_IXR(pshuflhw, 0xf2, 0x70); - DEFINE_OP(pslld, 0x66, 0xf2); - DEFINE_OP_IR(pslld, 0x66, 0x72, 6); - DEFINE_OP_IR(pslldq, 0x66, 0x73, 7); - DEFINE_OP(psllq, 0x66, 0xf3); - DEFINE_OP_IR(psllq, 0x66, 0x73, 6); - DEFINE_OP(psllw, 0x66, 0xf1); - DEFINE_OP_IR(psllw, 0x66, 0x71, 6); - DEFINE_OP(psrad, 0x66, 0xe2); - DEFINE_OP_IR(psrad, 0x66, 0x72, 4); - DEFINE_OP(psraw, 0x66, 0xe1); - DEFINE_OP_IR(psraw, 0x66, 0x71, 4); - DEFINE_OP(psrld, 0x66, 0xd2); - DEFINE_OP_IR(psrld, 0x66, 0x72, 2); - DEFINE_OP_IR(psrldq, 0x66, 0x73, 3); - DEFINE_OP(psrlq, 0x66, 0xd3); - DEFINE_OP_IR(psrlq, 0x66, 0x73, 2); - DEFINE_OP(psrlw, 0x66, 0xd1); - DEFINE_OP_IR(psrlw, 0x66, 0x71, 2); - DEFINE_OP(psubb, 0x66, 0xf8); - DEFINE_OP(psubd, 0x66, 0xfa); - DEFINE_OP(psubq, 0x66, 0xfb); - DEFINE_OP(psubsb, 0x66, 0xe8); - DEFINE_OP(psubsw, 0x66, 0xe9); - DEFINE_OP(psubusb, 0x66, 0xd8); - DEFINE_OP(psubusw, 0x66, 0xd9); - DEFINE_OP(psubw, 0x66, 0xf9); - DEFINE_OP(punpckhbw, 0x66, 0x68); - DEFINE_OP(punpckhdq, 0x66, 0x6a); - DEFINE_OP(punpckhqdq, 0x66, 0x6d); - DEFINE_OP(punpckhwd, 0x66, 0x69); - DEFINE_OP(punpcklbw, 0x66, 0x60); - DEFINE_OP(punpckldq, 0x66, 0x62); - DEFINE_OP(punpcklqdq, 0x66, 0x6c); - DEFINE_OP(punpcklwd, 0x66, 0x61); - DEFINE_OP(pxor, 0x66, 0xef); - -#undef DEFINE_OP -#undef DEFINE_OP_IR -#undef DEFINE_OP_IRR -#undef DEFINE_OP_IXR - -private: - - void gen_ssse3_arith(int op1, int op2, int s, int d) - { GEN_CODE(_SSSE3Lrr(op1, op2, s, _rX, d, _rX)); } - void gen_ssse3_arith(int op1, int op2, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSSE3Lmr(op1, op2, mem.MD, mem.MB, mem.MI, mem.MS, d, _rX)); } - void gen_ssse3_arith(int op1, int op2, x86_immediate_operand const & imm, int s, int d) - { GEN_CODE(_SSSE3Lirr(op1, op2, imm.value, s, d)); } - void gen_ssse3_arith(int op1, int op2, x86_immediate_operand const & imm, x86_memory_operand const & mem, int d) - { GEN_CODE(_SSSE3Limr(op1, op2, imm.value, mem.MD, mem.MB, mem.MI, mem.MS, d)); } - -}; - -enum { - X86_INSN_ALU_8, - X86_INSN_ALU_16, - X86_INSN_ALU_32, - X86_INSN_BIT_16, - X86_INSN_BIT_32, - X86_INSN_ROT_8, - X86_INSN_ROT_16, - X86_INSN_ROT_32, - X86_INSN_SSE_SS, - X86_INSN_SSE_SD, - X86_INSN_SSE_PS, - X86_INSN_SSE_PD, - X86_INSN_SSE_PI, - X86_INSN_SSE_3P, /* 3-byte prefix (SSSE3) */ -}; - -inline void -x86_codegen::gen_insn(int type, int op, int s, int d) -{ - switch (type) { - case X86_INSN_SSE_SS: - gen_sse_arith_ss(op, s, d); - break; - case X86_INSN_SSE_SD: - gen_sse_arith_sd(op, s, d); - break; - case X86_INSN_SSE_PS: - gen_sse_arith_ps(op, s, d); - break; - case X86_INSN_SSE_PD: - gen_sse_arith_pd(op, s, d); - break; - case X86_INSN_SSE_PI: - gen_sse_arith(0x66, op, s, d); - break; - case X86_INSN_SSE_3P: - gen_ssse3_arith(0x38, op, s, d); - break; - default: - abort(); - } -} - -inline void -x86_codegen::gen_insn(int type, int op, x86_memory_operand const & mem, int d) -{ - switch (type) { - case X86_INSN_SSE_SS: - gen_sse_arith_ss(op, mem, d); - break; - case X86_INSN_SSE_SD: - gen_sse_arith_sd(op, mem, d); - break; - case X86_INSN_SSE_PS: - gen_sse_arith_ps(op, mem, d); - break; - case X86_INSN_SSE_PD: - gen_sse_arith_pd(op, mem, d); - break; - case X86_INSN_SSE_PI: - gen_sse_arith(0x66, op, mem, d); - break; - case X86_INSN_SSE_3P: - gen_ssse3_arith(0x38, op, mem, d); - break; - default: - abort(); - } -} - -inline void -x86_codegen::gen_failure(const char *msg, const char *file, int line, const char *fn) -{ - fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", - fn ? fn : "", file, line, msg); - abort(); -} - -#endif /* JIT_X86_CODEGEN_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/genexec.pl b/SheepShaver/src/kpx_cpu/src/cpu/ppc/genexec.pl deleted file mode 100755 index 5a6841f28..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/genexec.pl +++ /dev/null @@ -1,52 +0,0 @@ -#!/usr/bin/perl -use strict; - -my (@handlers, @extra_handlers, %templates); - -sub split_arglist($) { - (map { $_ =~ s/\s//g; $_ } split ",", $_[0]); -} - -my @lines = map { split ";", $_ } (); - -my $is_template = 0; -my $e; -foreach (@lines) { - $_ =~ s/;/&\n/g; - if (/^DEFINE_TEMPLATE\((\w+),.+,.+\((.+)\)\)/) { - $is_template = 1; - $e = { name => $1 }; - push @{$e->{args}}, split_arglist $2; - } - elsif ($is_template && /^\}/) { - $is_template = 0; - $templates{$e->{name}} = $e; - } - elsif (/(powerpc_cpu::execute_\w+)<(.+)>/) { - my $h = { name => $1, args => $2 }; - if ($is_template) { - push @{$e->{handlers}}, $h; - } - else { - push @handlers, $h; - } - } - elsif (/template.+decode_(\w+)<(.+)>/) { - my $template = $templates{$1}; - my @template_args = @{$template->{args}}; - my @args = split_arglist $2; - my %vars; - $vars{$template_args[$_]} = $args[$_] foreach (0 .. $#template_args); - foreach my $h (@{$template->{handlers}}) { - my @new_args = map { $vars{$_} || $_ } split_arglist $h->{args}; - push @extra_handlers, { name => $h->{name}, args => join(", ", @new_args) }; - } - } -} - -my %output_handlers; -foreach (@handlers, @extra_handlers) { - my $line = "template void $_->{name}<".join(", ", $_->{args}).">(uint32);"; - print "$line\n" if (!$output_handlers{$line}); - $output_handlers{$line} = 1; -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-bitfields.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-bitfields.hpp deleted file mode 100644 index 78eba468f..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-bitfields.hpp +++ /dev/null @@ -1,229 +0,0 @@ -/* - * ppc-bitfields.hpp - Instruction fields - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_BITFIELDS_H -#define PPC_BITFIELDS_H - -#include "cpu/ppc/ppc-operations.hpp" - -/// -/// Bitfield management -/// - -template< int FB, int FE > -struct static_mask { - enum { value = (0xffffffff >> FB) ^ (0xffffffff >> (FE + 1)) }; -}; - -template< int FB > -struct static_mask { - enum { value = 0xffffffff >> FB }; -}; - -template< int FB, int FE > -struct bit_field { - static inline uint32 mask() { - return static_mask::value; - } - static inline bool test(uint32 value) { - return value & mask(); - } - static inline uint32 extract(uint32 value) { - const uint32 m = mask() >> (31 - FE); - return (value >> (31 - FE)) & m; - } - static inline void insert(uint32 & data, uint32 value) { - const uint32 m = mask(); - data = (data & ~m) | ((value << (31 - FE)) & m); - } -}; - -template< class type, type value > -struct fake_bit_field { - static inline bool test(uint32) { - return value; - } - static inline type extract(uint32) { - return value; - } -}; - -/// -/// Instruction Fields -/// - -// Primary and extended opcode fields -typedef bit_field< 0, 5 > OPCD_field; -typedef bit_field< 21, 30 > XO_10_field; -typedef bit_field< 22, 30 > XO_9_field; -typedef bit_field< 26, 30 > XO_5_field; - -// General purpose registers -typedef bit_field< 11, 15 > rA_field; -typedef bit_field< 16, 20 > rB_field; -typedef bit_field< 6, 10 > rD_field; -typedef bit_field< 6, 10 > rS_field; - -// Floating-point registers -typedef bit_field< 11, 15 > frA_field; -typedef bit_field< 16, 20 > frB_field; -typedef bit_field< 21, 25 > frC_field; -typedef bit_field< 6, 10 > frD_field; -typedef bit_field< 6, 10 > frS_field; - -// Vector registers -typedef bit_field< 11, 15 > vA_field; -typedef bit_field< 16, 20 > vB_field; -typedef bit_field< 21, 25 > vC_field; -typedef bit_field< 6, 10 > vD_field; -typedef bit_field< 6, 10 > vS_field; - -typedef bit_field< 21, 21 > vRc_field; -typedef bit_field< 11, 15 > vUIMM_field; -typedef bit_field< 22, 25 > vSH_field; - -// Condition registers -typedef bit_field< 11, 15 > crbA_field; -typedef bit_field< 16, 20 > crbB_field; -typedef bit_field< 6, 10 > crbD_field; -typedef bit_field< 6, 8 > crfD_field; -typedef bit_field< 11, 13 > crfS_field; -typedef bit_field< 12, 19 > CRM_field; -typedef bit_field< 7, 14 > FM_field; - -// CR register fields -template< int CRn > struct CR_field : bit_field< 4*CRn+0, 4*CRn+3 > { }; -template< int CRn > struct CR_LT_field : bit_field< 4*CRn+0, 4*CRn+0 > { }; -template< int CRn > struct CR_GT_field : bit_field< 4*CRn+1, 4*CRn+1 > { }; -template< int CRn > struct CR_EQ_field : bit_field< 4*CRn+2, 4*CRn+2 > { }; -template< int CRn > struct CR_SO_field : bit_field< 4*CRn+3, 4*CRn+3 > { }; -template< int CRn > struct CR_UN_field : bit_field< 4*CRn+3, 4*CRn+3 > { }; - -// Aliases used for CR storage optimization -typedef CR_LT_field<7> standalone_CR_LT_field; -typedef CR_GT_field<7> standalone_CR_GT_field; -typedef CR_EQ_field<7> standalone_CR_EQ_field; -typedef CR_SO_field<7> standalone_CR_SO_field; - -// XER register fields -typedef bit_field< 0, 0 > XER_SO_field; -typedef bit_field< 1, 1 > XER_OV_field; -typedef bit_field< 2, 2 > XER_CA_field; -typedef bit_field< 25, 31 > XER_COUNT_field; - -// FPSCR register fields -typedef bit_field< 0, 0 > FPSCR_FX_field; -typedef bit_field< 1, 1 > FPSCR_FEX_field; -typedef bit_field< 2, 2 > FPSCR_VX_field; -typedef bit_field< 3, 3 > FPSCR_OX_field; -typedef bit_field< 4, 4 > FPSCR_UX_field; -typedef bit_field< 5, 5 > FPSCR_ZX_field; -typedef bit_field< 6, 6 > FPSCR_XX_field; -typedef bit_field< 7, 7 > FPSCR_VXSNAN_field; -typedef bit_field< 8, 8 > FPSCR_VXISI_field; -typedef bit_field< 9, 9 > FPSCR_VXIDI_field; -typedef bit_field< 10, 10 > FPSCR_VXZDZ_field; -typedef bit_field< 11, 11 > FPSCR_VXIMZ_field; -typedef bit_field< 12, 12 > FPSCR_VXVC_field; -typedef bit_field< 13, 13 > FPSCR_FR_field; -typedef bit_field< 14, 14 > FPSCR_FI_field; -typedef bit_field< 15, 19 > FPSCR_FPRF_field; -typedef bit_field< 21, 21 > FPSCR_VXSOFT_field; -typedef bit_field< 22, 22 > FPSCR_VXSQRT_field; -typedef bit_field< 23, 23 > FPSCR_VXCVI_field; -typedef bit_field< 24, 24 > FPSCR_VE_field; -typedef bit_field< 25, 25 > FPSCR_OE_field; -typedef bit_field< 26, 26 > FPSCR_UE_field; -typedef bit_field< 27, 27 > FPSCR_ZE_field; -typedef bit_field< 28, 28 > FPSCR_XE_field; -typedef bit_field< 29, 29 > FPSCR_NI_field; -typedef bit_field< 30, 31 > FPSCR_RN_field; -typedef bit_field< 16, 19 > FPSCR_FPCC_field; -typedef bit_field< 15, 15 > FPSCR_FPRF_C_field; // C -typedef bit_field< 16, 16 > FPSCR_FPRF_FL_field; // < -typedef bit_field< 17, 17 > FPSCR_FPRF_FG_field; // > -typedef bit_field< 18, 18 > FPSCR_FPRF_FE_field; // = -typedef bit_field< 19, 19 > FPSCR_FPRF_FU_field; // ? - -// Vector Status and Control Register -typedef bit_field< 15, 15 > VSCR_NJ_field; -typedef bit_field< 31, 31 > VSCR_SAT_field; - -// Define variations for branch instructions -typedef bit_field< 30, 30 > AA_field; -typedef bit_field< 31, 31 > LK_field; -typedef bit_field< 16, 29 > BD_field; -typedef bit_field< 11, 15 > BI_field; -typedef bit_field< 6, 10 > BO_field; - -// Helper macros to deal with BO field -#define BO_MAKE(COND, TRUE, DCTR, CTR0) (((COND) ? 0 : 16) | ((TRUE) ? 8 : 0) | ((DCTR) ? 0 : 4) | ((CTR0) ? 2 : 0)) -#define BO_DECREMENT_CTR(BO) (((BO) & 0x04) == 0) -#define BO_BRANCH_IF_CTR_ZERO(BO) (((BO) & 0x02) != 0) -#define BO_CONDITIONAL_BRANCH(BO) (((BO) & 0x10) == 0) -#define BO_BRANCH_IF_TRUE(BO) (((BO) & 0x08) != 0) - -// Define variations for ALU instructions -typedef bit_field< 31, 31 > Rc_field; -typedef bit_field< 21, 21 > OE_field; -typedef bit_field< 21, 25 > MB_field; -typedef bit_field< 26, 30 > ME_field; -typedef bit_field< 16, 20 > NB_field; -typedef bit_field< 16, 20 > SH_field; - -// Immediates -typedef bit_field< 16, 19 > IMM_field; -typedef bit_field< 16, 31 > d_field; -typedef bit_field< 6, 29 > LI_field; -typedef bit_field< 16, 31 > SIMM_field; -typedef bit_field< 16, 31 > UIMM_field; - -// Misc -typedef bit_field< 12, 15 > SR_field; -typedef bit_field< 6, 10 > TO_field; -typedef bit_field< 11, 20 > SPR_field; -typedef bit_field< 11, 20 > TBR_field; - -// Aliases to ease filling in decode table -#define DEFINE_FAKE_FIELD_ALIAS(NAME) \ -typedef fake_bit_field NAME##_0; \ -typedef fake_bit_field NAME##_1 - -#define DEFINE_FIELD_ALIAS(NAME, FIELD) \ -typedef FIELD##_field NAME##_G; \ -DEFINE_FAKE_FIELD_ALIAS(NAME) - -DEFINE_FAKE_FIELD_ALIAS(CA_BIT); -DEFINE_FIELD_ALIAS(RC_BIT, Rc); -DEFINE_FIELD_ALIAS(OE_BIT, OE); -DEFINE_FIELD_ALIAS(AA_BIT, AA); -DEFINE_FIELD_ALIAS(LK_BIT, LK); -DEFINE_FIELD_ALIAS(BO_BIT, BO); -DEFINE_FIELD_ALIAS(BI_BIT, BI); -DEFINE_FIELD_ALIAS(vRC_BIT, vRc); - -#undef DEFINE_FIELD_ALIAS -#undef DEFINE_FAKE_FIELD_ALIAS - -typedef fake_bit_field RA_FIELD_A; // GPR(RA) -typedef rA_field RA_FIELD_G; // RA ? GPR(RA) : 0 -typedef fake_bit_field RA_FIELD_0; // R0 -> 0 - -#endif /* PPC_BITFIELDS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-blockinfo.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-blockinfo.hpp deleted file mode 100644 index 7cea7d27f..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-blockinfo.hpp +++ /dev/null @@ -1,84 +0,0 @@ -/* - * ppc-blockinfo.hpp - PowerPC basic block information - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_BLOCKINFO_H -#define PPC_BLOCKINFO_H - -#include "cpu/jit/jit-config.hpp" -#include "nvmemfun.hpp" -#include "basic-blockinfo.hpp" - -class powerpc_cpu; - -struct powerpc_block_info - : public basic_block_info -{ - typedef nv_mem_fun1_t< void, powerpc_cpu, uint32 > execute_fn; - - struct decode_info - { - execute_fn execute; - uint32 opcode; - }; - -#if PPC_DECODE_CACHE - decode_info * di; -#endif -#if PPC_ENABLE_JIT - uint8 * entry_point; -#if DYNGEN_DIRECT_BLOCK_CHAINING - struct link_info { - uint8 * jmp_resolve_addr; // Address of default code to resolve target addr - uint8 * jmp_addr; // Address of target native branch offset to patch - uint32 jmp_pc; // Target jump addresses in emulated address space - }; - static const uint32 INVALID_PC = 0xffffffff; // An invalid PC address to mark jmp_pc[] as stale - link_info li[MAX_TARGETS]; -#endif -#endif - uintptr min_pc, max_pc; - - void init(uintptr start_pc); - bool intersect(uintptr start, uintptr end); - void invalidate(); -}; - -inline void -powerpc_block_info::init(uintptr start_pc) -{ - basic_block_info::init(start_pc); -#if PPC_DECODE_CACHE - di = NULL; -#endif -#if PPC_ENABLE_JIT -#if DYNGEN_DIRECT_BLOCK_CHAINING - for (int i = 0; i < MAX_TARGETS; i++) - li[i].jmp_pc = INVALID_PC; -#endif -#endif -} - -inline bool -powerpc_block_info::intersect(uintptr start, uintptr end) -{ - return (min_pc >= start && min_pc < end) || (max_pc >= start && max_pc < end); -} - -#endif /* PPC_BLOCKINFO_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-config.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-config.hpp deleted file mode 100644 index 7563fd026..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-config.hpp +++ /dev/null @@ -1,150 +0,0 @@ -/* - * ppc-config.hpp - PowerPC core emulator config - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_CONFIG_H -#define PPC_CONFIG_H - -/** - * PPC_CHECK_INTERRUPTS - * - * Define if interrupts need to be check after each instruction, - * in interpreted mode, or at the end of each block, in compiled - * mode. - * - * NOTE: this only checks for user defined interrupts that are - * triggered by the program. This is not about OEA interrupts. - */ - -#ifndef PPC_CHECK_INTERRUPTS -#define PPC_CHECK_INTERRUPTS 0 -#endif - - -/** - * PPC_ENABLE_FPU_EXCEPTIONS - * - * Define to enable a more precise FPU emulation with support for - * exception bits. This is slower and not fully correct yet. - **/ - -#ifndef PPC_ENABLE_FPU_EXCEPTIONS -#define PPC_ENABLE_FPU_EXCEPTIONS 0 -#endif - - -/** - * PPC_DECODE_CACHE - * - * Define to 0 to disable the decode cache. This is only useful - * for debugging purposes and side-by-side comparison with other - * PowerPC emulators. - **/ - -#ifndef PPC_DECODE_CACHE -#define PPC_DECODE_CACHE 1 -#endif - - -/** - * PPC_ENABLE_JIT - * - * Define to 1 if dynamic translation is used. This requires - * dyngen to be enabled first. - **/ - -#ifndef PPC_ENABLE_JIT -#define PPC_ENABLE_JIT ENABLE_DYNGEN -#endif - - -/** - * PPC_REENTRANT_JIT - * - * Define to 1 if we are guaranteed to be able to invoke the JIT - * compiler, and the generated code, recursively. Enable this - * only if you have necessary provisions to recover from possible - * cache invalidatation within inner calls. - **/ - -#ifndef PPC_REENTRANT_JIT -#define PPC_REENTRANT_JIT 0 -#endif - - -/** - * PPC_EXECUTE_DUMP_STATE - * - * Define to dump state after each instruction. This also - * disables the decode cache. - **/ - -#ifndef PPC_EXECUTE_DUMP_STATE -#define PPC_EXECUTE_DUMP_STATE 0 -#endif - - -/** - * PPC_FLIGHT_RECORDER - * - * Define to enable the flight recorder. If set to 2, the - * complete register state will be recorder after each - * instruction execution. - **/ - -#ifndef PPC_FLIGHT_RECORDER -#define PPC_FLIGHT_RECORDER 0 -#endif - - -/** - * PPC_PROFILE_COMPILE_TIME - * - * Define to enable some compile time statistics. This concerns - * time spent into the decoder (PPC_DECODE_CACHE case) or total - * time spent into the dynamic translator (PPC_ENABLE_JIT case). - **/ - -#ifndef PPC_PROFILE_COMPILE_TIME -#define PPC_PROFILE_COMPILE_TIME 0 -#endif - - -/** - * PPC_PROFILE_GENERIC_CALLS - * - * Define to enable some generic handler invocation statistics. - **/ - -#ifndef PPC_PROFILE_GENERIC_CALLS -#define PPC_PROFILE_GENERIC_CALLS 0 -#endif - - -/** - * PPC_PROFILE_REGS_USE - * - * Define to enable some statistics about registers use. - **/ - -#ifndef PPC_PROFILE_REGS_USE -#define PPC_PROFILE_REGS_USE 0 -#endif - -#endif /* PPC_CONFIG_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp deleted file mode 100644 index 1fb8f8567..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp +++ /dev/null @@ -1,825 +0,0 @@ -/* - * ppc-cpu.cpp - PowerPC CPU definition - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include -#include -#include "vm_alloc.h" -#include "cpu/vm.hpp" -#include "cpu/ppc/ppc-cpu.hpp" -#ifndef SHEEPSHAVER -#include "basic-kernel.hpp" -#endif - -#if PPC_ENABLE_JIT -#include "cpu/jit/dyngen-exec.h" -#endif - -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -#define DEBUG 0 -#include "debug.h" - -#if PPC_PROFILE_GENERIC_CALLS -uint32 powerpc_cpu::generic_calls_count[PPC_I(MAX)]; -static int generic_calls_ids[PPC_I(MAX)]; -const int generic_calls_top_ten = 20; - -int generic_calls_compare(const void *e1, const void *e2) -{ - const int id1 = *(const int *)e1; - const int id2 = *(const int *)e2; - return powerpc_cpu::generic_calls_count[id2] - powerpc_cpu::generic_calls_count[id1]; -} -#endif - -#if PPC_PROFILE_REGS_USE -int register_info_compare(const void *e1, const void *e2) -{ - const powerpc_cpu::register_info *ri1 = (powerpc_cpu::register_info *)e1; - const powerpc_cpu::register_info *ri2 = (powerpc_cpu::register_info *)e2; - return ri2->count - ri1->count; -} -#endif - -static int ppc_refcount = 0; - -void powerpc_cpu::set_register(int id, any_register const & value) -{ - if (id >= powerpc_registers::GPR(0) && id <= powerpc_registers::GPR(31)) { - gpr(id - powerpc_registers::GPR_BASE) = value.i; - return; - } - if (id >= powerpc_registers::FPR(0) && id <= powerpc_registers::FPR(31)) { - fpr(id - powerpc_registers::FPR_BASE) = value.d; - return; - } - switch (id) { - case powerpc_registers::CR: cr().set(value.i); break; - case powerpc_registers::FPSCR: fpscr() = value.i; break; - case powerpc_registers::XER: xer().set(value.i); break; - case powerpc_registers::LR: lr() = value.i; break; - case powerpc_registers::CTR: ctr() = value.i; break; - case basic_registers::PC: - case powerpc_registers::PC: pc() = value.i; break; - case basic_registers::SP: - case powerpc_registers::SP: gpr(1)= value.i; break; - default: abort(); break; - } -} - -any_register powerpc_cpu::get_register(int id) -{ - any_register value; - if (id >= powerpc_registers::GPR(0) && id <= powerpc_registers::GPR(31)) { - value.i = gpr(id - powerpc_registers::GPR_BASE); - return value; - } - if (id >= powerpc_registers::FPR(0) && id <= powerpc_registers::FPR(31)) { - value.d = fpr(id - powerpc_registers::FPR_BASE); - return value; - } - switch (id) { - case powerpc_registers::CR: value.i = cr().get(); break; - case powerpc_registers::FPSCR: value.i = fpscr(); break; - case powerpc_registers::XER: value.i = xer().get(); break; - case powerpc_registers::LR: value.i = lr(); break; - case powerpc_registers::CTR: value.i = ctr(); break; - case basic_registers::PC: - case powerpc_registers::PC: value.i = pc(); break; - case basic_registers::SP: - case powerpc_registers::SP: value.i = gpr(1); break; - default: abort(); break; - } - return value; -} - -#if KPX_MAX_CPUS != 1 -uint32 powerpc_registers::reserve_valid = 0; -uint32 powerpc_registers::reserve_addr = 0; -uint32 powerpc_registers::reserve_data = 0; -#endif - -void powerpc_cpu::init_registers() -{ - assert((((uintptr)&vr(0)) % 16) == 0); - for (int i = 0; i < 32; i++) { - gpr(i) = 0; - fpr(i) = 0; - } - cr().set(0); - fpscr() = 0; - xer().set(0); - lr() = 0; - ctr() = 0; - pc() = 0; -} - -void powerpc_cpu::init_flight_recorder() -{ -#if PPC_FLIGHT_RECORDER - log_ptr = 0; - log_ptr_wrapped = false; -#endif -} - -void powerpc_cpu::do_record_step(uint32 pc, uint32 opcode) -{ -#if PPC_FLIGHT_RECORDER - log[log_ptr].pc = pc; - log[log_ptr].opcode = opcode; -#ifdef SHEEPSHAVER - log[log_ptr].sp = gpr(1); - log[log_ptr].r24 = gpr(24); -#endif -#if PPC_FLIGHT_RECORDER >= 2 - for (int i = 0; i < 32; i++) { - log[log_ptr].r[i] = gpr(i); - log[log_ptr].fr[i] = fpr(i); - } - log[log_ptr].lr = lr(); - log[log_ptr].ctr = ctr(); - log[log_ptr].cr = cr().get(); - log[log_ptr].xer = xer().get(); - log[log_ptr].fpscr = fpscr(); -#endif - log_ptr++; - if (log_ptr == LOG_SIZE) { - log_ptr = 0; - log_ptr_wrapped = true; - } -#endif -} - -#if PPC_FLIGHT_RECORDER -void powerpc_cpu::start_log() -{ - logging = true; - invalidate_cache(); -} - -void powerpc_cpu::stop_log() -{ - logging = false; - invalidate_cache(); -} - -void powerpc_cpu::dump_log(const char *filename) -{ - if (filename == NULL) - filename = "ppc.log"; - - FILE *f = fopen(filename, "w"); - if (f == NULL) - return; - - int start_ptr = 0; - int log_size = log_ptr; - if (log_ptr_wrapped) { - start_ptr = log_ptr; - log_size = LOG_SIZE; - } - - for (int i = 0; i < log_size; i++) { - int j = (i + start_ptr) % LOG_SIZE; -#if PPC_FLIGHT_RECORDER >= 2 - fprintf(f, " pc %08x lr %08x ctr %08x cr %08x xer %08x ", log[j].pc, log[j].lr, log[j].ctr, log[j].cr, log[j].xer); - fprintf(f, " r0 %08x r1 %08x r2 %08x r3 %08x ", log[j].r[0], log[j].r[1], log[j].r[2], log[j].r[3]); - fprintf(f, " r4 %08x r5 %08x r6 %08x r7 %08x ", log[j].r[4], log[j].r[5], log[j].r[6], log[j].r[7]); - fprintf(f, " r8 %08x r9 %08x r10 %08x r11 %08x ", log[j].r[8], log[j].r[9], log[j].r[10], log[j].r[11]); - fprintf(f, "r12 %08x r13 %08x r14 %08x r15 %08x ", log[j].r[12], log[j].r[13], log[j].r[14], log[j].r[15]); - fprintf(f, "r16 %08x r17 %08x r18 %08x r19 %08x ", log[j].r[16], log[j].r[17], log[j].r[18], log[j].r[19]); - fprintf(f, "r20 %08x r21 %08x r22 %08x r23 %08x ", log[j].r[20], log[j].r[21], log[j].r[22], log[j].r[23]); - fprintf(f, "r24 %08x r25 %08x r26 %08x r27 %08x ", log[j].r[24], log[j].r[25], log[j].r[26], log[j].r[27]); - fprintf(f, "r28 %08x r29 %08x r30 %08x r31 %08x\n", log[j].r[28], log[j].r[29], log[j].r[30], log[j].r[31]); - fprintf(f, "opcode %08x\n", log[j].opcode); -#else - fprintf(f, " pc %08x opc %08x", log[j].pc, log[j].opcode); -#ifdef SHEEPSHAVER - fprintf(f, " sp %08x r24 %08x", log[j].sp, log[j].r24); -#endif - fprintf(f, "| "); -#if !ENABLE_MON - fprintf(f, "\n"); -#endif -#endif -#if ENABLE_MON - disass_ppc(f, log[j].pc, log[j].opcode); -#endif - } - fclose(f); -} -#endif - -#if ENABLE_MON -static uint32 mon_read_byte_ppc(uintptr addr) -{ - return *((uint8 *)addr); -} - -static void mon_write_byte_ppc(uintptr addr, uint32 b) -{ - uint8 *m = (uint8 *)addr; - *m = b; -} -#endif - -void powerpc_cpu::initialize() -{ -#ifdef SHEEPSHAVER - printf("PowerPC CPU emulator by Gwenole Beauchesne\n"); -#endif - -#if PPC_PROFILE_REGS_USE - reginfo = new register_info[32]; - for (int i = 0; i < 32; i++) { - reginfo[i].id = i; - reginfo[i].count = 0; - } -#endif - - init_flight_recorder(); - init_decoder(); - init_registers(); - init_decode_cache(); - execute_depth = 0; - - // Initialize block lookup table -#if PPC_DECODE_CACHE || PPC_ENABLE_JIT - my_block_cache.initialize(); -#endif - - // Init cache range invalidate recorder - cache_range.start = cache_range.end = 0; - - // Init syscalls handler - execute_do_syscall = NULL; - - // Init field2mask - for (int i = 0; i < 256; i++) { - uint32 mask = 0; - if (i & 0x01) mask |= 0x0000000f; - if (i & 0x02) mask |= 0x000000f0; - if (i & 0x04) mask |= 0x00000f00; - if (i & 0x08) mask |= 0x0000f000; - if (i & 0x10) mask |= 0x000f0000; - if (i & 0x20) mask |= 0x00f00000; - if (i & 0x40) mask |= 0x0f000000; - if (i & 0x80) mask |= 0xf0000000; - field2mask[i] = mask; - } - -#if ENABLE_MON - mon_init(); - mon_read_byte = mon_read_byte_ppc; - mon_write_byte = mon_write_byte_ppc; -#endif - -#if PPC_PROFILE_COMPILE_TIME - compile_count = 0; - compile_time = 0; - emul_start_time = clock(); -#endif -} - -#if PPC_ENABLE_JIT -void powerpc_cpu::enable_jit(uint32 cache_size) -{ - use_jit = true; - if (cache_size) - codegen.set_cache_size(cache_size); - codegen.initialize(); -} -#endif - -// Memory allocator returning powerpc_cpu objects aligned on 16-byte boundaries -// FORMAT: [ alignment ] magic identifier, offset to malloc'ed data, powerpc_cpu data -void *powerpc_cpu::operator new(size_t size) -{ - const int ALIGN = 16; - - // Allocate enough space for powerpc_cpu data + signature + align pad - uint8 *ptr = (uint8 *)malloc(size + ALIGN * 2); - if (ptr == NULL) - throw std::bad_alloc(); - - // Align memory - int ofs = 0; - while ((((uintptr)ptr) % ALIGN) != 0) - ofs++, ptr++; - - // Insert signature and offset - struct aligned_block_t { - uint32 pad[(ALIGN - 8) / 4]; - uint32 signature; - uint32 offset; - uint8 data[sizeof(powerpc_cpu)]; - }; - aligned_block_t *blk = (aligned_block_t *)ptr; - blk->signature = 0x53435055; /* 'SCPU' */ - blk->offset = ofs + (&blk->data[0] - (uint8 *)blk); - assert((((uintptr)&blk->data) % ALIGN) == 0); - return &blk->data[0]; -} - -void powerpc_cpu::operator delete(void *p) -{ - uint32 *blk = (uint32 *)p; - assert(blk[-2] == 0x53435055); /* 'SCPU' */ - void *ptr = (void *)(((uintptr)p) - blk[-1]); - free(ptr); -} - -#ifdef SHEEPSHAVER -powerpc_cpu::powerpc_cpu() -#if PPC_ENABLE_JIT - : codegen(this) -#endif -#else -powerpc_cpu::powerpc_cpu(task_struct *parent_task) - : basic_cpu(parent_task) -#if PPC_ENABLE_JIT - , codegen(this) -#endif -#endif -{ -#if PPC_ENABLE_JIT - use_jit = false; -#endif - ++ppc_refcount; - initialize(); -} - -powerpc_cpu::~powerpc_cpu() -{ - --ppc_refcount; -#if PPC_PROFILE_COMPILE_TIME - clock_t emul_end_time = clock(); - - const char *type = NULL; -#if PPC_ENABLE_JIT - if (use_jit) - type = "compile"; -#endif -#if PPC_DECODE_CACHE - if (!type) - type = "predecode"; -#endif - if (type) { - printf("### Statistics for block %s\n", type); - printf("Total block %s count : %d\n", type, compile_count); - uint32 emul_time = emul_end_time - emul_start_time; - printf("Total emulation time : %.1f sec\n", - double(emul_time) / double(CLOCKS_PER_SEC)); - printf("Total %s time : %.1f sec (%.1f%%)\n", type, - double(compile_time) / double(CLOCKS_PER_SEC), - 100.0 * double(compile_time) / double(emul_time)); - printf("\n"); - } -#endif - -#if PPC_PROFILE_GENERIC_CALLS - if (use_jit && ppc_refcount == 0) { - uint64 total_generic_calls_count = 0; - for (int i = 0; i < PPC_I(MAX); i++) { - generic_calls_ids[i] = i; - total_generic_calls_count += generic_calls_count[i]; - } - qsort(generic_calls_ids, PPC_I(MAX), sizeof(int), generic_calls_compare); - printf("Rank Count Ratio Name\n"); - for (int i = 0; i < generic_calls_top_ten; i++) { - uint32 mnemo = generic_calls_ids[i]; - uint32 count = generic_calls_count[mnemo]; - const instr_info_t *ii = powerpc_ii_table; - while (ii->mnemo != mnemo) - ii++; - printf("%03d: %10lu %2.1f%% %s\n", i, count, 100.0*double(count)/double(total_generic_calls_count), ii->name); - } - } -#endif - -#if PPC_PROFILE_REGS_USE - printf("\n### Statistics for register usage\n"); - uint64 tot_reg_count = 0; - for (int i = 0; i < 32; i++) - tot_reg_count += reginfo[i].count; - qsort(reginfo, 32, sizeof(register_info), register_info_compare); - uint64 cum_reg_count = 0; - for (int i = 0; i < 32; i++) { - cum_reg_count += reginfo[i].count; - printf("r%-2d : %16llu %2.1f%% [%3.1f%%]\n", - reginfo[i].id, reginfo[i].count, - 100.0*double(reginfo[i].count)/double(tot_reg_count), - 100.0*double(cum_reg_count)/double(tot_reg_count)); - } - delete[] reginfo; -#endif - - kill_decode_cache(); - -#if ENABLE_MON - mon_exit(); -#endif -} - -void powerpc_cpu::dump_registers() -{ - fprintf(stderr, " r0 %08x r1 %08x r2 %08x r3 %08x\n", gpr(0), gpr(1), gpr(2), gpr(3)); - fprintf(stderr, " r4 %08x r5 %08x r6 %08x r7 %08x\n", gpr(4), gpr(5), gpr(6), gpr(7)); - fprintf(stderr, " r8 %08x r9 %08x r10 %08x r11 %08x\n", gpr(8), gpr(9), gpr(10), gpr(11)); - fprintf(stderr, "r12 %08x r13 %08x r14 %08x r15 %08x\n", gpr(12), gpr(13), gpr(14), gpr(15)); - fprintf(stderr, "r16 %08x r17 %08x r18 %08x r19 %08x\n", gpr(16), gpr(17), gpr(18), gpr(19)); - fprintf(stderr, "r20 %08x r21 %08x r22 %08x r23 %08x\n", gpr(20), gpr(21), gpr(22), gpr(23)); - fprintf(stderr, "r24 %08x r25 %08x r26 %08x r27 %08x\n", gpr(24), gpr(25), gpr(26), gpr(27)); - fprintf(stderr, "r28 %08x r29 %08x r30 %08x r31 %08x\n", gpr(28), gpr(29), gpr(30), gpr(31)); - fprintf(stderr, " f0 %02.5f f1 %02.5f f2 %02.5f f3 %02.5f\n", fpr(0), fpr(1), fpr(2), fpr(3)); - fprintf(stderr, " f4 %02.5f f5 %02.5f f6 %02.5f f7 %02.5f\n", fpr(4), fpr(5), fpr(6), fpr(7)); - fprintf(stderr, " f8 %02.5f f9 %02.5f f10 %02.5f f11 %02.5f\n", fpr(8), fpr(9), fpr(10), fpr(11)); - fprintf(stderr, "f12 %02.5f f13 %02.5f f14 %02.5f f15 %02.5f\n", fpr(12), fpr(13), fpr(14), fpr(15)); - fprintf(stderr, "f16 %02.5f f17 %02.5f f18 %02.5f f19 %02.5f\n", fpr(16), fpr(17), fpr(18), fpr(19)); - fprintf(stderr, "f20 %02.5f f21 %02.5f f22 %02.5f f23 %02.5f\n", fpr(20), fpr(21), fpr(22), fpr(23)); - fprintf(stderr, "f24 %02.5f f25 %02.5f f26 %02.5f f27 %02.5f\n", fpr(24), fpr(25), fpr(26), fpr(27)); - fprintf(stderr, "f28 %02.5f f29 %02.5f f30 %02.5f f31 %02.5f\n", fpr(28), fpr(29), fpr(30), fpr(31)); - fprintf(stderr, " lr %08x ctr %08x cr %08x xer %08x\n", lr(), ctr(), cr().get(), xer().get()); - fprintf(stderr, " pc %08x fpscr %08x\n", pc(), fpscr()); - fflush(stderr); -} - -void powerpc_cpu::dump_instruction(uint32 opcode) -{ - fprintf(stderr, "[%08x]-> %08x\n", pc(), opcode); -} - -void powerpc_cpu::fake_dump_registers(uint32) -{ - dump_registers(); -} - -void powerpc_registers::interrupt_copy(powerpc_registers &oregs, powerpc_registers const &iregs) -{ - for (int i = 0; i < 32; i++) { - oregs.gpr[i] = iregs.gpr[i]; - oregs.fpr[i] = iregs.fpr[i]; - } - oregs.cr = iregs.cr; - oregs.fpscr = iregs.fpscr; - oregs.xer = iregs.xer; - oregs.lr = iregs.lr; - oregs.ctr = iregs.ctr; - oregs.pc = iregs.pc; - - uint32 vrsave = iregs.vrsave; - oregs.vrsave = vrsave; - if (vrsave) { - for (int i = 31; i >= 0; i--) { - if (vrsave & 1) - oregs.vr[i] = iregs.vr[i]; - vrsave >>= 1; - } - } -} - -bool powerpc_cpu::check_spcflags() -{ - if (spcflags().test(SPCFLAG_CPU_EXEC_RETURN)) { - spcflags().clear(SPCFLAG_CPU_EXEC_RETURN); - return false; - } -#ifdef SHEEPSHAVER - if (spcflags().test(SPCFLAG_CPU_HANDLE_INTERRUPT)) { - spcflags().clear(SPCFLAG_CPU_HANDLE_INTERRUPT); - static bool processing_interrupt = false; - if (!processing_interrupt) { - processing_interrupt = true; - powerpc_registers r; - powerpc_registers::interrupt_copy(r, regs()); - HandleInterrupt(&r); - powerpc_registers::interrupt_copy(regs(), r); - processing_interrupt = false; - } - } - if (spcflags().test(SPCFLAG_CPU_TRIGGER_INTERRUPT)) { - spcflags().clear(SPCFLAG_CPU_TRIGGER_INTERRUPT); - spcflags().set(SPCFLAG_CPU_HANDLE_INTERRUPT); - } -#endif - if (spcflags().test(SPCFLAG_CPU_ENTER_MON)) { - spcflags().clear(SPCFLAG_CPU_ENTER_MON); -#if ENABLE_MON - // Start up mon in real-mode - char *arg[] = { - "mon", -#ifdef SHEEPSHAVER - "-m", -#endif - "-r", - NULL - }; - mon(sizeof(arg)/sizeof(arg[0]) - 1, arg); -#endif - } - return true; -} - -#if DYNGEN_DIRECT_BLOCK_CHAINING -void *powerpc_cpu::compile_chain_block(block_info *sbi) -{ - // Block index is stuffed into the source basic block pointer, - // which is aligned at least on 4-byte boundaries - const int n = ((uintptr)sbi) & 3; - sbi = (block_info *)(((uintptr)sbi) & ~3L); - const uint32 bpc = sbi->pc; - - const uint32 tpc = sbi->li[n].jmp_pc; - block_info *tbi = my_block_cache.find(tpc); - if (tbi == NULL) - tbi = compile_block(tpc); - assert(tbi && tbi->pc == tpc); - - dg_set_jmp_target(sbi->li[n].jmp_addr, tbi->entry_point); - return tbi->entry_point; -} -#endif - -void powerpc_cpu::execute(uint32 entry) -{ - bool invalidated_cache = false; - pc() = entry; -#if PPC_EXECUTE_DUMP_STATE - const bool dump_state = true; -#endif - execute_depth++; -#if PPC_DECODE_CACHE || PPC_ENABLE_JIT - if (execute_depth == 1 || (PPC_ENABLE_JIT && PPC_REENTRANT_JIT)) { -#if PPC_ENABLE_JIT - if (use_jit) { - block_info *bi = my_block_cache.find(pc()); - if (bi == NULL) - bi = compile_block(pc()); - for (;;) { - // Execute all cached blocks - for (;;) { - codegen.execute(bi->entry_point); - - if (!spcflags().empty()) { - if (!check_spcflags()) - goto return_site; - - // Force redecoding if cache was invalidated - if (spcflags().test(SPCFLAG_JIT_EXEC_RETURN)) { - spcflags().clear(SPCFLAG_JIT_EXEC_RETURN); - invalidated_cache = true; - break; - } - } - - // Don't check for backward branches here as this - // is now done by generated code. Besides, we will - // get here if the fast cache lookup failed too. - if ((bi = my_block_cache.find(pc())) == NULL) - break; - } - - // Compile new block - bi = compile_block(pc()); - } - goto return_site; - } -#endif -#if PPC_DECODE_CACHE - block_info *bi = my_block_cache.find(pc()); - if (bi != NULL) - goto pdi_execute; - for (;;) { -#if PPC_PROFILE_COMPILE_TIME - compile_count++; - clock_t start_time; - start_time = clock(); -#endif - bi = my_block_cache.new_blockinfo(); - bi->init(pc()); - - // Predecode a new block - block_info::decode_info *di; - const instr_info_t *ii; - uint32 dpc; - di = bi->di = decode_cache_p; - dpc = pc() - 4; - do { - uint32 opcode = vm_read_memory_4(dpc += 4); - ii = decode(opcode); -#if PPC_EXECUTE_DUMP_STATE - if (dump_state) { - di->opcode = opcode; - di->execute = nv_mem_fun(&powerpc_cpu::dump_instruction); - di++; - } -#endif -#if PPC_FLIGHT_RECORDER - if (is_logging()) { - di->opcode = opcode; - di->execute = nv_mem_fun(&powerpc_cpu::record_step); - di++; - } -#endif - di->opcode = opcode; - di->execute = ii->execute; - di++; -#if PPC_EXECUTE_DUMP_STATE - if (dump_state) { - di->opcode = 0; - di->execute = nv_mem_fun(&powerpc_cpu::fake_dump_registers); - di++; - } -#endif - if (di >= decode_cache_end_p) { - // Invalidate cache and move current code to start - invalidate_cache(); - const int blocklen = di - bi->di; - memmove(decode_cache_p, bi->di, blocklen * sizeof(*di)); - bi->di = decode_cache_p; - di = bi->di + blocklen; - } - } while ((ii->cflow & CFLOW_END_BLOCK) == 0); - bi->end_pc = dpc; - bi->min_pc = dpc; - bi->max_pc = entry; - bi->size = di - bi->di; - my_block_cache.add_to_cl_list(bi); - my_block_cache.add_to_active_list(bi); - decode_cache_p += bi->size; -#if PPC_PROFILE_COMPILE_TIME - compile_time += (clock() - start_time); -#endif - - // Execute all cached blocks - pdi_execute: - for (;;) { - const int r = bi->size % 4; - di = bi->di + r; - int n = (bi->size + 3) / 4; - switch (r) { - case 0: do { - di += 4; - di[-4].execute(this, di[-4].opcode); - case 3: di[-3].execute(this, di[-3].opcode); - case 2: di[-2].execute(this, di[-2].opcode); - case 1: di[-1].execute(this, di[-1].opcode); - } while (--n > 0); - } - - if (!spcflags().empty()) { - if (!check_spcflags()) - goto return_site; - - // Force redecoding if cache was invalidated - if (spcflags().test(SPCFLAG_JIT_EXEC_RETURN)) { - spcflags().clear(SPCFLAG_JIT_EXEC_RETURN); - invalidated_cache = true; - break; - } - } - - if ((bi->pc != pc()) && ((bi = my_block_cache.find(pc())) == NULL)) - break; - } - } - goto return_site; -#endif - goto do_interpret; - } -#endif - do_interpret: - for (;;) { - uint32 opcode = vm_read_memory_4(pc()); - const instr_info_t *ii = decode(opcode); -#if PPC_EXECUTE_DUMP_STATE - if (dump_state) - dump_instruction(opcode); -#endif -#if PPC_FLIGHT_RECORDER - if (is_logging()) - record_step(opcode); -#endif - assert(ii->execute.ptr() != 0); - ii->execute(this, opcode); -#if PPC_EXECUTE_DUMP_STATE - if (dump_state) - dump_registers(); -#endif - if (!spcflags().empty() && !check_spcflags()) - goto return_site; - } - return_site: - // Tell upper level we invalidated cache? - if (invalidated_cache) - spcflags().set(SPCFLAG_JIT_EXEC_RETURN); - --execute_depth; -} - -void powerpc_cpu::execute() -{ - execute(pc()); -} - -void powerpc_cpu::init_decode_cache() -{ -#if PPC_DECODE_CACHE - decode_cache = (block_info::decode_info *)vm_acquire(DECODE_CACHE_SIZE); - if (decode_cache == VM_MAP_FAILED) { - fprintf(stderr, "powerpc_cpu: Could not allocate decode cache\n"); - abort(); - } - - D(bug("powerpc_cpu: Allocated decode cache: %d KB at %p\n", DECODE_CACHE_SIZE / 1024, decode_cache)); - decode_cache_p = decode_cache; - decode_cache_end_p = decode_cache + DECODE_CACHE_MAX_ENTRIES; -#if FLIGHT_RECORDER - // Leave enough room to last call to record_step() - decode_cache_end_p -= 2; -#endif -#if PPC_EXECUTE_DUMP_STATE - // Leave enough room to last calls to dump state functions - decode_cache_end_p -= 2; -#endif -#endif -} - -void powerpc_cpu::kill_decode_cache() -{ -#if PPC_DECODE_CACHE - vm_release(decode_cache, DECODE_CACHE_SIZE); -#endif -} - -void powerpc_cpu::invalidate_cache() -{ - D(bug("Invalidate all cache blocks\n")); -#if PPC_DECODE_CACHE || PPC_ENABLE_JIT - my_block_cache.clear(); - my_block_cache.initialize(); - spcflags().set(SPCFLAG_JIT_EXEC_RETURN); -#endif -#if PPC_ENABLE_JIT - codegen.invalidate_cache(); -#endif -#if PPC_DECODE_CACHE - decode_cache_p = decode_cache; -#endif -} - -void powerpc_block_info::invalidate() -{ -#if PPC_DECODE_CACHE - // Don't do anything if this is a predecoded block - if (di) - return; -#endif -#if DYNGEN_DIRECT_BLOCK_CHAINING - for (int i = 0; i < MAX_TARGETS; i++) { - link_info * const tli = &li[i]; - uint32 tpc = tli->jmp_pc; - // For any jump within page boundaries, reset the jump address - // to the target block resolver (trampoline) - if (tpc != INVALID_PC && ((tpc ^ pc) >> 12) == 0) - dg_set_jmp_target(tli->jmp_addr, tli->jmp_resolve_addr); - } -#endif -} - -void powerpc_cpu::invalidate_cache_range(uintptr start, uintptr end) -{ - D(bug("Invalidate cache block [%08x - %08x]\n", start, end)); -#if PPC_DECODE_CACHE || PPC_ENABLE_JIT -#if DYNGEN_DIRECT_BLOCK_CHAINING - if (use_jit) { - // Invalidate on page boundaries - start &= -4096; - end = (end + 4095) & -4096; - D(bug(" at page boundaries [%08x - %08x]\n", start, end)); - } -#endif - spcflags().set(SPCFLAG_JIT_EXEC_RETURN); - my_block_cache.clear_range(start, end); -#endif -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp deleted file mode 100644 index c418386ed..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp +++ /dev/null @@ -1,514 +0,0 @@ -/* - * ppc-cpu.hpp - PowerPC CPU definition - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_CPU_H -#define PPC_CPU_H - -#include "basic-cpu.hpp" -#include "nvmemfun.hpp" -#include "cpu/vm.hpp" -#include "cpu/block-cache.hpp" -#include "cpu/ppc/ppc-config.hpp" -#include "cpu/ppc/ppc-bitfields.hpp" -#include "cpu/ppc/ppc-blockinfo.hpp" -#include "cpu/ppc/ppc-registers.hpp" -#if PPC_ENABLE_JIT -#include "cpu/ppc/ppc-jit.hpp" -#endif -#include "cpu/ppc/ppc-instructions.hpp" -#include - -class powerpc_cpu -#ifndef SHEEPSHAVER - : public basic_cpu -#endif -{ - // NOTE: PowerPC registers structure shall be aligned on 16-byte - // boundaries for the AltiVec registers to be used in native code - // with aligned load/stores. - // - // We can't assume (offsetof(powerpc_cpu, regs) % 16) == 0 since - // extra data could be inserted prior regs, e.g. pointer to vtable - struct { - powerpc_registers regs; - uint8 pad[16]; - } _regs; - - // Make sure the calculation of the current offset makes use of - // 'this' as this could make it simplified at compile-time - powerpc_registers *regs_ptr() const { return (powerpc_registers *)((char *)&_regs.regs + (16 - (((char *)&_regs.regs - (char *)this) % 16))); } - powerpc_registers const & regs() const { return *regs_ptr(); } - powerpc_registers & regs() { return *regs_ptr(); } - -#if PPC_PROFILE_REGS_USE - // Registers use statistics - // NOTE: the emulator is designed to access registers only through - // the gpr() accessors. The number of calls to gpr() matches exactly - // the number of register operands for an instruction. -public: - struct register_info { - int id; - uint64 count; - }; -private: - register_info *reginfo; - void log_reg(int r) const { reginfo[r].count++; } -#else - void log_reg(int r) const { } -#endif - -protected: - - powerpc_spcflags & spcflags() { return regs().spcflags; } - powerpc_spcflags const & spcflags() const { return regs().spcflags; } - powerpc_cr_register & cr() { return regs().cr; } - powerpc_cr_register const & cr() const { return regs().cr; } - powerpc_xer_register & xer() { return regs().xer; } - powerpc_xer_register const & xer() const { return regs().xer; } - powerpc_vscr & vscr() { return regs().vscr; } - powerpc_vscr const & vscr() const { return regs().vscr; } - - uint32 vrsave() const { return regs().vrsave; } - uint32 & vrsave() { return regs().vrsave; } - - uint32 & fpscr() { return regs().fpscr; } - uint32 fpscr() const { return regs().fpscr; } - uint32 & lr() { return regs().lr; } - uint32 lr() const { return regs().lr; } - uint32 & ctr() { return regs().ctr; } - uint32 ctr() const { return regs().ctr; } - uint32 & pc() { return regs().pc; } - uint32 pc() const { return regs().pc; } - void increment_pc(int o) { pc() += o; } - - friend class pc_operand; - friend class lr_operand; - friend class ctr_operand; - friend class cr_operand; - template< class field > friend class xer_operand; - template< class field > friend class fpscr_operand; - -public: - - uint32 & gpr(int i) { log_reg(i); return regs().gpr[i]; } - uint32 gpr(int i) const { log_reg(i); return regs().gpr[i]; } - double & fpr(int i) { return regs().fpr[i].d; } - double fpr(int i) const { return regs().fpr[i].d; } - uint64 & fpr_dw(int i) { return regs().fpr[i].j; } - uint64 fpr_dw(int i) const { return regs().fpr[i].j; } - powerpc_vr & vr(int i) { return regs().vr[i]; } - powerpc_vr const & vr(int i) const { return regs().vr[i]; } - -protected: - - // Condition codes management - void record_cr(int crfd, int32 value) - { cr().compute(crfd, value); cr().set_so(crfd, xer().get_so()); } - void record_cr0(int32 value) - { record_cr(0, value); } - void record_cr1() - { cr().set((cr().get() & ~CR_field<1>::mask()) | ((fpscr() >> 4) & 0x0f000000)); } - void record_fpscr(int exceptions); - void record_cr6(powerpc_vr const & vS, bool check_one) { - if (check_one && (vS.j[0] == UVAL64(0xffffffffffffffff) && - vS.j[1] == UVAL64(0xffffffffffffffff))) - cr().set(6, 8); - else if (vS.j[0] == UVAL64(0) && vS.j[1] == UVAL64(0)) - cr().set(6, 2); - else - cr().set(6, 0); - } - - template< class FP > - void fp_classify(FP x); - -protected: - - // Flight recorder - struct rec_step { -#if PPC_FLIGHT_RECORDER >= 2 - uint32 r[32]; - double fr[32]; - uint32 lr, ctr; - uint32 cr, xer; - uint32 fpscr; -#endif - uint32 pc; - uint32 opcode; -#ifdef SHEEPSHAVER - uint32 sp; - uint32 r24; -#endif - }; - - // Instruction formats - enum instr_format_t { - INVALID_form = 0, - A_form, - B_form, - D_form, DS_form, - I_form, - M_form, - MD_form, MDS_form, - SC_form, - X_form, - XFL_form, XFX_form, XL_form, XO_form, XS_form, - VX_form, VXR_form, VA_form, - }; - - // Control flow types - enum control_flow_t { - CFLOW_NORMAL = 0, - CFLOW_BRANCH = 1, - CFLOW_JUMP = 2, - CFLOW_TRAP = 4, - CFLOW_CONST_JUMP = 8, - CFLOW_END_BLOCK = CFLOW_BRANCH | CFLOW_JUMP | CFLOW_TRAP - }; - - // Callbacks associated with each instruction - typedef void (powerpc_cpu::*execute_pmf)(uint32 opcode); - typedef nv_mem_fun1_t< void, powerpc_cpu, uint32 > execute_fn; - - // Instruction information structure - struct instr_info_t { - char name[12]; // Instruction name - execute_fn execute; // Semantic routine for this instruction - uint16 mnemo; // Mnemonic - uint16 format; // Instruction format (XO-form, D-form, etc.) - uint16 opcode; // Primary opcode - uint16 xo; // Extended opcode - uint16 cflow; // Mask of control flow information - }; - -private: - - // Compile time statistics -#if PPC_PROFILE_COMPILE_TIME - uint32 compile_count; - clock_t compile_time; - clock_t emul_start_time; -#endif - - // Compile blocks statistics -#if PPC_PROFILE_GENERIC_CALLS - friend int generic_calls_compare(const void *, const void *); - static uint32 generic_calls_count[]; -#endif - - // Flight recorder data - static const int LOG_SIZE = 32768; -#if PPC_FLIGHT_RECORDER - rec_step log[LOG_SIZE]; - bool logging; - int log_ptr; - bool log_ptr_wrapped; -#else - static const bool logging = false; -#endif - void do_record_step(uint32 pc, uint32 opcode); - void record_step(uint32 opcode) { do_record_step(pc(), opcode); } - - // Syscall callback must return TRUE if no error occurred - typedef bool (*syscall_fn)(powerpc_cpu *cpu); - syscall_fn execute_do_syscall; - - static const instr_info_t powerpc_ii_table[]; - std::vector ii_table; - typedef uint16 ii_index_t; - static const int II_INDEX_TABLE_SIZE = 0x20000; - ii_index_t ii_index_table[II_INDEX_TABLE_SIZE]; - - // Pack/unpack index into decode table - uint32 make_ii_index(uint32 opcode, uint32 xo) { return opcode | (xo << 6); } - uint32 get_ii_index(uint32 opcode) { return (opcode >> 26) | ((opcode & 0x7ff) << 6); } - - // Convert 8-bit field mask (e.g. mtcrf) to bit mask - uint32 field2mask[256]; - - // Check special CPU flags - bool check_spcflags(); - - // Current execute() nested level - int execute_depth; - -public: - - // Initialization & finalization - void initialize(); -#ifdef SHEEPSHAVER - powerpc_cpu(); -#else - powerpc_cpu(task_struct *parent_task); -#endif - ~powerpc_cpu(); - - // Specialised memory allocation (needs to be 16-byte aligned) - void *operator new(size_t size); - void operator delete(void *p); - - // Handle flight recorder -#if PPC_FLIGHT_RECORDER - bool is_logging() const { return logging; } - void start_log(); - void stop_log(); - void dump_log(const char *filename = NULL); -#else - bool is_logging() const { return false; } - void start_log() { } - void stop_log() { } - void dump_log(const char *filename = NULL) { } -#endif - - // Dump registers - void dump_registers(); - void dump_instruction(uint32 opcode); - void fake_dump_registers(uint32); - - // Start emulation loop - void execute(uint32 entry); - void execute(); - - // Interrupts handling - void trigger_interrupt(); - - // Set VALUE to register ID - void set_register(int id, any_register const & value); - - // Get register ID - any_register get_register(int id); - - // Set syscall callback - void set_syscall_callback(syscall_fn fn) { execute_do_syscall = fn; } - - // Caches invalidation - void invalidate_cache(); - void invalidate_cache_range(uintptr start, uintptr end); -private: - struct { uintptr start, end; } cache_range; - -protected: - - // Init decoder with one instruction info - void init_decoder_entry(const instr_info_t * ii); - -#if PPC_ENABLE_JIT - // Dynamic translation engine - struct codegen_context_t { - powerpc_dyngen & codegen; - uint32 entry_point; - uint32 pc; - uint32 opcode; - const instr_info_t *instr_info; - bool done_compile; - - codegen_context_t(powerpc_dyngen & codegen_init) - : codegen(codegen_init) - { } - }; - - // Compile one opcode, returns any of the following status - enum { - COMPILE_FAILURE, // no translation available, call interpreter - COMPILE_CODE_OK, // generated code, control flow fall through - COMPILE_EPILOGUE_OK // generated code, including basic block epilogue - }; - virtual int compile1(codegen_context_t & cg_context) { return COMPILE_FAILURE; } - - bool use_jit; -public: - void enable_jit(uint32 cache_size = 0); -#endif - -private: - - // Initializers & destructors - void init_flight_recorder(); - void init_registers(); - void init_decoder(); - void init_decode_cache(); - void kill_decode_cache(); - - // Get instruction info for opcode - const instr_info_t *decode(uint32 opcode) { - return &ii_table[ii_index_table[get_ii_index(opcode)]]; - } - - // Block lookup table - typedef powerpc_block_info block_info; - block_cache< block_info, lazy_allocator > my_block_cache; - -#if PPC_DECODE_CACHE - // Decode Cache - static const uint32 DECODE_CACHE_MAX_ENTRIES = 32768; - static const uint32 DECODE_CACHE_SIZE = DECODE_CACHE_MAX_ENTRIES * sizeof(block_info::decode_info); - block_info::decode_info * decode_cache; - block_info::decode_info * decode_cache_p; - block_info::decode_info * decode_cache_end_p; -#endif - -#if PPC_ENABLE_JIT - // Dynamic translation engine - friend class powerpc_dyngen_helper; - friend class powerpc_dyngen; - friend class powerpc_jit; - powerpc_jit codegen; - block_info *compile_block(uint32 entry); -#if DYNGEN_DIRECT_BLOCK_CHAINING - void *compile_chain_block(block_info *sbi); -#endif -#endif - - // Semantic action templates - template< bool SB, bool OE > - uint32 do_execute_divide(uint32, uint32); - template< bool EX, bool CA, bool OE > - uint32 do_execute_addition(uint32, uint32); - template< bool CA, bool OE > - uint32 do_execute_subtract(uint32, uint32); - template< bool OE > - uint32 do_execute_subtract_extended(uint32, uint32); - - // Instruction handlers - void execute_nop(uint32 opcode); - void execute_illegal(uint32 opcode); - template< class RA, class RB, class RC, class CA, class OE, class Rc > - void execute_addition(uint32 opcode); - template< class OP, class RD, class RA, class RB, class RC, class OE, class Rc > - void execute_generic_arith(uint32 opcode); - template< class PC, class BO, class DP, class AA, class LK > - void execute_branch(uint32 opcode); - template< class RB, typename CT > - void execute_compare(uint32 opcode); - template< class OP > - void execute_cr_op(uint32 opcode); - template< bool SB, class OE, class Rc > - void execute_divide(uint32 opcode); - template< class FP, class OP, class RD, class RA, class RB, class RC, class Rc, bool FPSCR > - void execute_fp_arith(uint32 opcode); - template< class OP, class RA, class RB, bool LD, int SZ, bool UP, bool RX > - void execute_loadstore(uint32 opcode); - template< class RA, class DP, bool LD > - void execute_loadstore_multiple(uint32 opcode); - template< class RA, bool IM, class NB > - void execute_load_string(uint32 opcode); - template< class RA, bool IM, class NB > - void execute_store_string(uint32 opcode); - template< class RA > - void execute_lwarx(uint32 opcode); - template< class RA > - void execute_stwcx(uint32 opcode); - void execute_mcrf(uint32 opcode); - void execute_mcrfs(uint32 opcode); - void execute_mcrxr(uint32 opcode); - void execute_mtcrf(uint32 opcode); - template< class FM, class RB, class Rc > - void execute_mtfsf(uint32 opcode); - template< class RB, class Rc > - void execute_mtfsfi(uint32 opcode); - template< class RB, class Rc > - void execute_mtfsb(uint32 opcode); - template< bool HI, bool SB, class OE, class Rc > - void execute_multiply(uint32 opcode); - template< class Rc > - void execute_mffs(uint32 opcode); - void execute_mfmsr(uint32 opcode); - template< class SPR > - void execute_mfspr(uint32 opcode); - template< class TBR > - void execute_mftbr(uint32 opcode); - template< class SPR > - void execute_mtspr(uint32 opcode); - template< class SH, class MA, class Rc > - void execute_rlwimi(uint32 opcode); - template< class OP, class RD, class RA, class SH, class SO, class CA, class Rc > - void execute_shift(uint32 opcode); - void execute_syscall(uint32 opcode); - template< bool OC > - void execute_fp_compare(uint32 opcode); - template< class RA, class RB, bool LD, bool DB, bool UP > - void execute_fp_loadstore(uint32 opcode); - template< class RN, class Rc > - void execute_fp_int_convert(uint32 opcode); - template< class Rc > - void execute_fp_round(uint32 opcode); - template< class RA, class RB > - void execute_icbi(uint32 opcode); - void execute_isync(uint32 opcode); - void execute_invalidate_cache_range(); - template< class RA, class RB > - void execute_dcbz(uint32 opcode); - template< bool SL > - void execute_vector_load_for_shift(uint32 opcode); - template< class VD, class RA, class RB > - void execute_vector_load(uint32 opcode); - template< class VS, class RA, class RB > - void execute_vector_store(uint32 opcode); - void execute_mfvscr(uint32 opcode); - void execute_mtvscr(uint32 opcode); - template< class OP, class VD, class VA, class VB, class VC, class Rc, int C1 > - void execute_vector_arith(uint32 opcode); - template< class OP, class VD, class VA, class VB, class VC > - void execute_vector_arith_mixed(uint32 opcode); - template< int ODD, class OP, class VD, class VA, class VB, class VC > - void execute_vector_arith_odd(uint32 opcode); - template< class VD, class VA, class VB, int LO > - void execute_vector_merge(uint32 opcode); - template< class VD, class VA, class VB > - void execute_vector_pack(uint32 opcode); - void execute_vector_pack_pixel(uint32 opcode); - template< int LO > - void execute_vector_unpack_pixel(uint32 opcode); - template< int LO, class VD, class VA > - void execute_vector_unpack(uint32 opcode); - void execute_vector_permute(uint32 opcode); - template< int SD > - void execute_vector_shift(uint32 opcode); - template< int SD, class VD, class VA, class VB, class SH > - void execute_vector_shift_octet(uint32 opcode); - template< class OP, class VD, class VB, bool IM > - void execute_vector_splat(uint32 opcode); - template< int SZ, class VD, class VA, class VB > - void execute_vector_sum(uint32 opcode); - - // Specialized instruction decoders - template< class RA, class RB, class RC, class CA > - execute_fn decode_addition(uint32 opcode); - template< class RA, class RS > - execute_fn decode_rlwinm(uint32 opcode); -}; - - -/** - * Interrupts handling - **/ - -inline void powerpc_cpu::trigger_interrupt() -{ -#if PPC_CHECK_INTERRUPTS - spcflags().set(SPCFLAG_CPU_TRIGGER_INTERRUPT); -#endif -} - -#ifdef SHEEPSHAVER -extern void HandleInterrupt(powerpc_registers *r); -#endif - -#endif /* PPC_CPU_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp deleted file mode 100644 index 972f26ec6..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp +++ /dev/null @@ -1,1869 +0,0 @@ -/* - * ppc-decode.cpp - PowerPC instructions decoder - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-bitfields.hpp" -#include "cpu/ppc/ppc-operands.hpp" -#include "cpu/ppc/ppc-operations.hpp" -#include "cpu/ppc/ppc-instructions.hpp" - -#define DEBUG 0 -#include "debug.h" - -#define EXECUTE_0(HANDLER) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_1(HANDLER, ARG1) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_2(HANDLER, ARG1, ARG2) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_3(HANDLER, ARG1, ARG2, ARG3) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_4(HANDLER, ARG1, ARG2, ARG3, ARG4) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_7(HANDLER, ARG1, ARG2, ARG3, ARG4, ARG5, ARG6, ARG7) \ -&powerpc_cpu::execute_##HANDLER - -#define EXECUTE_ADDITION(RA, RB, RC, CA, OE, Rc) \ -&powerpc_cpu::execute_addition - -#define EXECUTE_GENERIC_ARITH(OP, RD, RA, RB, RC, OE, Rc) \ -&powerpc_cpu::execute_generic_arith - -#define EXECUTE_BRANCH(PC, BO, DP, AA, LK) \ -&powerpc_cpu::execute_branch - -#define EXECUTE_COMPARE(RB, CT) \ -&powerpc_cpu::execute_compare - -#define EXECUTE_CR_OP(OP) \ -&powerpc_cpu::execute_cr_op - -#define EXECUTE_FP_ARITH(FP, OP, RD, RA, RB, RC, Rc, FPSCR) \ -&powerpc_cpu::execute_fp_arith - -#define EXECUTE_LOADSTORE(OP, RA, RB, LD, SZ, UP, RX) \ -&powerpc_cpu::execute_loadstore - -#define EXECUTE_LOADSTORE_MULTIPLE(RA, DP, LD) \ -&powerpc_cpu::execute_loadstore_multiple - -#define EXECUTE_LOAD_STRING(RA, IM, NB) \ -&powerpc_cpu::execute_load_string - -#define EXECUTE_STORE_STRING(RA, IM, NB) \ -&powerpc_cpu::execute_store_string - -#define EXECUTE_SHIFT(OP, RD, RA, SH, SO, CA, Rc) \ -&powerpc_cpu::execute_shift - -#define EXECUTE_FP_LOADSTORE(RA, RB, LD, DB, UP) \ -&powerpc_cpu::execute_fp_loadstore - -#define EXECUTE_VECTOR_LOADSTORE(OP, VD, RA, RB) \ -&powerpc_cpu::execute_vector_##OP - -#define EXECUTE_VECTOR_ARITH(OP, VD, VA, VB, VC) \ -&powerpc_cpu::execute_vector_arith, 0 > - -#define EXECUTE_VECTOR_ARITH_MIXED(OP, VD, VA, VB, VC) \ -&powerpc_cpu::execute_vector_arith_mixed - -#define EXECUTE_VECTOR_ARITH_ODD(ODD, OP, VD, VA, VB, VC) \ -&powerpc_cpu::execute_vector_arith_odd - -#define EXECUTE_VECTOR_MERGE(VD, VA, VB, LO) \ -&powerpc_cpu::execute_vector_merge - -#define EXECUTE_VECTOR_COMPARE(OP, VD, VA, VB, C1) \ -&powerpc_cpu::execute_vector_arith - -#define EXECUTE_VECTOR_PACK(VD, VA, VB) \ -&powerpc_cpu::execute_vector_pack - -#define EXECUTE_VECTOR_UNPACK(LO, VD, VB) \ -&powerpc_cpu::execute_vector_unpack - -#define EXECUTE_VECTOR_SHIFT_OCTET(SD, VD, VA, VB, SH) \ -&powerpc_cpu::execute_vector_shift_octet - -#define EXECUTE_VECTOR_SPLAT(OP, VD, VB, IM) \ -&powerpc_cpu::execute_vector_splat - -#define EXECUTE_VECTOR_SUM(SZ, VD, VA, VB) \ -&powerpc_cpu::execute_vector_sum - -const powerpc_cpu::instr_info_t powerpc_cpu::powerpc_ii_table[] = { - { "invalid", - EXECUTE_0(illegal), - PPC_I(INVALID), - INVALID_form, 0, 0, CFLOW_TRAP - }, - { "add", - EXECUTE_ADDITION(RA, RB, NONE, CA_BIT_0, OE_BIT_G, RC_BIT_G), - PPC_I(ADD), - XO_form, 31, 266, CFLOW_NORMAL - }, - { "addc", - EXECUTE_ADDITION(RA, RB, NONE, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(ADDC), - XO_form, 31, 10, CFLOW_NORMAL - }, - { "adde", - EXECUTE_ADDITION(RA, RB, XER_CA, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(ADDE), - XO_form, 31, 138, CFLOW_NORMAL - }, - { "addi", - EXECUTE_ADDITION(RA_or_0, SIMM, NONE, CA_BIT_0, OE_BIT_0, RC_BIT_0), - PPC_I(ADDI), - D_form, 14, 0, CFLOW_NORMAL - }, - { "addic", - EXECUTE_ADDITION(RA, SIMM, NONE, CA_BIT_1, OE_BIT_0, RC_BIT_0), - PPC_I(ADDIC), - D_form, 12, 0, CFLOW_NORMAL - }, - { "addic.", - EXECUTE_ADDITION(RA, SIMM, NONE, CA_BIT_1, OE_BIT_0, RC_BIT_1), - PPC_I(ADDIC_), - D_form, 13, 0, CFLOW_NORMAL - }, - { "addis", - EXECUTE_ADDITION(RA_or_0, SIMM_shifted, NONE, CA_BIT_0, OE_BIT_0, RC_BIT_0), - PPC_I(ADDIS), - D_form, 15, 0, CFLOW_NORMAL - }, - { "addme", - EXECUTE_ADDITION(RA, MINUS_ONE, XER_CA, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(ADDME), - XO_form, 31, 234, CFLOW_NORMAL - }, - { "addze", - EXECUTE_ADDITION(RA, ZERO, XER_CA, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(ADDZE), - XO_form, 31, 202, CFLOW_NORMAL - }, - { "and", - EXECUTE_GENERIC_ARITH(and, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(AND), - X_form, 31, 28, CFLOW_NORMAL - }, - { "andc", - EXECUTE_GENERIC_ARITH(andc, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(ANDC), - X_form, 31, 60, CFLOW_NORMAL - }, - { "andi.", - EXECUTE_GENERIC_ARITH(and, RA, RS, UIMM, NONE, OE_BIT_0, RC_BIT_1), - PPC_I(ANDI), - D_form, 28, 0, CFLOW_NORMAL - }, - { "andis.", - EXECUTE_GENERIC_ARITH(and, RA, RS, UIMM_shifted, NONE, OE_BIT_0, RC_BIT_1), - PPC_I(ANDIS), - D_form, 29, 0, CFLOW_NORMAL - }, - { "b", - EXECUTE_BRANCH(PC, immediate_value, LI, AA_BIT_G, LK_BIT_G), - PPC_I(B), - I_form, 18, 0, CFLOW_BRANCH - }, - { "bc", - EXECUTE_BRANCH(PC, operand_BO, BD, AA_BIT_G, LK_BIT_G), - PPC_I(BC), - B_form, 16, 0, CFLOW_BRANCH - }, - { "bcctr", - EXECUTE_BRANCH(CTR, operand_BO, ZERO, AA_BIT_0, LK_BIT_G), - PPC_I(BCCTR), - XL_form, 19, 528, CFLOW_BRANCH - }, - { "bclr", - EXECUTE_BRANCH(LR, operand_BO, ZERO, AA_BIT_0, LK_BIT_G), - PPC_I(BCLR), - XL_form, 19, 16, CFLOW_BRANCH - }, - { "cmp", - EXECUTE_COMPARE(RB, int32), - PPC_I(CMP), - X_form, 31, 0, CFLOW_NORMAL - }, - { "cmpi", - EXECUTE_COMPARE(SIMM, int32), - PPC_I(CMPI), - D_form, 11, 0, CFLOW_NORMAL - }, - { "cmpl", - EXECUTE_COMPARE(RB, uint32), - PPC_I(CMPL), - X_form, 31, 32, CFLOW_NORMAL - }, - { "cmpli", - EXECUTE_COMPARE(UIMM, uint32), - PPC_I(CMPLI), - D_form, 10, 0, CFLOW_NORMAL - }, - { "cntlzw", - EXECUTE_GENERIC_ARITH(cntlzw, RA, RS, NONE, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(CNTLZW), - X_form, 31, 26, CFLOW_NORMAL - }, - { "crand", - EXECUTE_CR_OP(and), - PPC_I(CRAND), - XL_form, 19, 257, CFLOW_NORMAL - }, - { "crandc", - EXECUTE_CR_OP(andc), - PPC_I(CRANDC), - XL_form, 19, 129, CFLOW_NORMAL - }, - { "creqv", - EXECUTE_CR_OP(eqv), - PPC_I(CREQV), - XL_form, 19, 289, CFLOW_NORMAL - }, - { "crnand", - EXECUTE_CR_OP(nand), - PPC_I(CRNAND), - XL_form, 19, 225, CFLOW_NORMAL - }, - { "crnor", - EXECUTE_CR_OP(nor), - PPC_I(CRNOR), - XL_form, 19, 33, CFLOW_NORMAL - }, - { "cror", - EXECUTE_CR_OP(or), - PPC_I(CROR), - XL_form, 19, 449, CFLOW_NORMAL - }, - { "crorc", - EXECUTE_CR_OP(orc), - PPC_I(CRORC), - XL_form, 19, 417, CFLOW_NORMAL - }, - { "crxor", - EXECUTE_CR_OP(xor), - PPC_I(CRXOR), - XL_form, 19, 193, CFLOW_NORMAL - }, - { "dcba", - EXECUTE_0(nop), - PPC_I(DCBA), - X_form, 31, 758, CFLOW_NORMAL - }, - { "dcbf", - EXECUTE_0(nop), - PPC_I(DCBF), - X_form, 31, 86, CFLOW_NORMAL - }, - { "dcbi", - EXECUTE_0(nop), - PPC_I(DCBI), - X_form, 31, 470, CFLOW_NORMAL - }, - { "dcbst", - EXECUTE_0(nop), - PPC_I(DCBST), - X_form, 31, 54, CFLOW_NORMAL - }, - { "dcbt", - EXECUTE_0(nop), - PPC_I(DCBT), - X_form, 31, 278, CFLOW_NORMAL - }, - { "dcbtst", - EXECUTE_0(nop), - PPC_I(DCBTST), - X_form, 31, 246, CFLOW_NORMAL - }, - { "dcbz", - EXECUTE_2(dcbz, operand_RA_or_0, operand_RB), - PPC_I(DCBZ), - X_form, 31, 1014, CFLOW_NORMAL - }, - { "divw", - EXECUTE_3(divide, true, OE_BIT_G, RC_BIT_G), - PPC_I(DIVW), - XO_form, 31, 491, CFLOW_NORMAL - }, - { "divwu", - EXECUTE_3(divide, false, OE_BIT_G, RC_BIT_G), - PPC_I(DIVWU), - XO_form, 31, 459, CFLOW_NORMAL - }, - { "dss", - EXECUTE_0(nop), - PPC_I(DSS), - X_form, 31, 822, CFLOW_NORMAL - }, - { "dst", - EXECUTE_0(nop), - PPC_I(DST), - X_form, 31, 342, CFLOW_NORMAL - }, - { "dstst", - EXECUTE_0(nop), - PPC_I(DST), - X_form, 31, 374, CFLOW_NORMAL - }, - { "eciwx", - EXECUTE_0(nop), - PPC_I(ECIWX), - X_form, 31, 310, CFLOW_NORMAL - }, - { "ecowx", - EXECUTE_0(nop), - PPC_I(ECOWX), - X_form, 31, 438, CFLOW_NORMAL - }, - { "eieio", - EXECUTE_0(nop), - PPC_I(EIEIO), - X_form, 31, 854, CFLOW_NORMAL - }, - { "eqv", - EXECUTE_GENERIC_ARITH(eqv, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(EQV), - X_form, 31, 284, CFLOW_NORMAL - }, - { "extsb", - EXECUTE_GENERIC_ARITH(sign_extend_8_32, RA, RS, NONE, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(EXTSB), - X_form, 31, 954, CFLOW_NORMAL - }, - { "extsh", - EXECUTE_GENERIC_ARITH(sign_extend_16_32, RA, RS, NONE, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(EXTSH), - X_form, 31, 922, CFLOW_NORMAL - }, - { "fabs", - EXECUTE_FP_ARITH(double, fabs, RD, RB, NONE, NONE, RC_BIT_G, false), - PPC_I(FABS), - X_form, 63, 264, CFLOW_NORMAL - }, - { "fadd", - EXECUTE_FP_ARITH(double, fadd, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FADD), - A_form, 63, 21, CFLOW_NORMAL - }, - { "fadds", - EXECUTE_FP_ARITH(float, fadd, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FADDS), - A_form, 59, 21, CFLOW_NORMAL - }, - { "fcmpo", - EXECUTE_1(fp_compare, true), - PPC_I(FCMPO), - X_form, 63, 32, CFLOW_NORMAL - }, - { "fcmpu", - EXECUTE_1(fp_compare, false), - PPC_I(FCMPU), - X_form, 63, 0, CFLOW_NORMAL - }, - { "fctiw", - EXECUTE_2(fp_int_convert, operand_FPSCR_RN, RC_BIT_G), - PPC_I(FCTIW), - X_form, 63, 14, CFLOW_NORMAL - }, - { "fctiwz", - EXECUTE_2(fp_int_convert, operand_ONE, RC_BIT_G), - PPC_I(FCTIWZ), - X_form, 63, 15, CFLOW_NORMAL - }, - { "fdiv", - EXECUTE_FP_ARITH(double, fdiv, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FDIV), - A_form, 63, 18, CFLOW_NORMAL - }, - { "fdivs", - EXECUTE_FP_ARITH(float, fdiv, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FDIVS), - A_form, 59, 18, CFLOW_NORMAL - }, - { "fmadd", - EXECUTE_FP_ARITH(double, fmadd, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FMADD), - A_form, 63, 29, CFLOW_NORMAL - }, - { "fmadds", - EXECUTE_FP_ARITH(float, fmadd, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FMADDS), - A_form, 59, 29, CFLOW_NORMAL - }, - { "fmr", - EXECUTE_FP_ARITH(double, fnop, RD, RB, NONE, NONE, RC_BIT_G, false), - PPC_I(FMR), - X_form, 63, 72, CFLOW_NORMAL - }, - { "fmsub", - EXECUTE_FP_ARITH(double, fmsub, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FMSUB), - A_form, 63, 28, CFLOW_NORMAL - }, - { "fmsubs", - EXECUTE_FP_ARITH(float, fmsub, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FMSUBS), - A_form, 59, 28, CFLOW_NORMAL - }, - { "fmul", - EXECUTE_FP_ARITH(double, fmul, RD, RA, RC, NONE, RC_BIT_G, true), - PPC_I(FMUL), - A_form, 63, 25, CFLOW_NORMAL - }, - { "fmuls", - EXECUTE_FP_ARITH(float, fmul, RD, RA, RC, NONE, RC_BIT_G, true), - PPC_I(FMULS), - A_form, 59, 25, CFLOW_NORMAL - }, - { "fnabs", - EXECUTE_FP_ARITH(double, fnabs, RD, RB, NONE, NONE, RC_BIT_G, false), - PPC_I(FNABS), - X_form, 63, 136, CFLOW_NORMAL - }, - { "fneg", - EXECUTE_FP_ARITH(double, fneg, RD, RB, NONE, NONE, RC_BIT_G, false), - PPC_I(FNEG), - X_form, 63, 40, CFLOW_NORMAL - }, - { "fnmadd", - EXECUTE_FP_ARITH(double, fnmadd, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FNMADD), - A_form, 63, 31, CFLOW_NORMAL - }, - { "fnmadds", - EXECUTE_FP_ARITH(double, fnmadds, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FNMADDS), - A_form, 59, 31, CFLOW_NORMAL - }, - { "fnmsub", - EXECUTE_FP_ARITH(double, fnmsub, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FNMSUB), - A_form, 63, 30, CFLOW_NORMAL - }, - { "fnmsubs", - EXECUTE_FP_ARITH(double, fnmsubs, RD, RA, RC, RB, RC_BIT_G, true), - PPC_I(FNMSUBS), - A_form, 59, 30, CFLOW_NORMAL - }, - { "frsp", - EXECUTE_1(fp_round, RC_BIT_G), - PPC_I(FRSP), - X_form, 63, 12, CFLOW_NORMAL - }, - { "fsel", - EXECUTE_FP_ARITH(double, fsel, RD, RA, RC, RB, RC_BIT_G, false), - PPC_I(FSEL), - A_form, 63, 23, CFLOW_NORMAL - }, - { "fsub", - EXECUTE_FP_ARITH(double, fsub, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FSUB), - A_form, 63, 20, CFLOW_NORMAL - }, - { "fsubs", - EXECUTE_FP_ARITH(float, fsub, RD, RA, RB, NONE, RC_BIT_G, true), - PPC_I(FSUBS), - A_form, 59, 20, CFLOW_NORMAL - }, - { "icbi", - EXECUTE_2(icbi, operand_RA_or_0, operand_RB), - PPC_I(ICBI), - X_form, 31, 982, CFLOW_NORMAL - }, - { "isync", - EXECUTE_0(isync), - PPC_I(ISYNC), - X_form, 19, 150, CFLOW_NORMAL - }, - { "lbz", - EXECUTE_LOADSTORE(nop, RA_or_0, D, true, 1, false, false), - PPC_I(LBZ), - D_form, 34, 0, CFLOW_NORMAL - }, - { "lbzu", - EXECUTE_LOADSTORE(nop, RA, D, true, 1, true, false), - PPC_I(LBZU), - D_form, 35, 0, CFLOW_NORMAL - }, - { "lbzux", - EXECUTE_LOADSTORE(nop, RA, RB, true, 1, true, false), - PPC_I(LBZUX), - X_form, 31, 119, CFLOW_NORMAL - }, - { "lbzx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, true, 1, false, false), - PPC_I(LBZX), - X_form, 31, 87, CFLOW_NORMAL - }, - { "lfd", - EXECUTE_FP_LOADSTORE(RA_or_0, D, true, true, false), - PPC_I(LFD), - D_form, 50, 0, CFLOW_NORMAL - }, - { "lfdu", - EXECUTE_FP_LOADSTORE(RA, D, true, true, true), - PPC_I(LFDU), - D_form, 51, 0, CFLOW_NORMAL - }, - { "lfdux", - EXECUTE_FP_LOADSTORE(RA, RB, true, true, true), - PPC_I(LFDUX), - X_form, 31, 631, CFLOW_NORMAL - }, - { "lfdx", - EXECUTE_FP_LOADSTORE(RA_or_0, RB, true, true, false), - PPC_I(LFDX), - X_form, 31, 599, CFLOW_NORMAL - }, - { "lfs", - EXECUTE_FP_LOADSTORE(RA_or_0, D, true, false, false), - PPC_I(LFS), - D_form, 48, 0, CFLOW_NORMAL - }, - { "lfsu", - EXECUTE_FP_LOADSTORE(RA, D, true, false, true), - PPC_I(LFSU), - D_form, 49, 0, CFLOW_NORMAL - }, - { "lfsux", - EXECUTE_FP_LOADSTORE(RA, RB, true, false, true), - PPC_I(LFSUX), - X_form, 31, 567, CFLOW_NORMAL - }, - { "lfsx", - EXECUTE_FP_LOADSTORE(RA_or_0, RB, true, false, false), - PPC_I(LFSX), - X_form, 31, 535, CFLOW_NORMAL - }, - { "lha", - EXECUTE_LOADSTORE(sign_extend_16_32, RA_or_0, D, true, 2, false, false), - PPC_I(LHA), - D_form, 42, 0, CFLOW_NORMAL - }, - { "lhau", - EXECUTE_LOADSTORE(sign_extend_16_32, RA, D, true, 2, true, false), - PPC_I(LHAU), - D_form, 43, 0, CFLOW_NORMAL - }, - { "lhaux", - EXECUTE_LOADSTORE(sign_extend_16_32, RA, RB, true, 2, true, false), - PPC_I(LHAUX), - X_form, 31, 375, CFLOW_NORMAL - }, - { "lhax", - EXECUTE_LOADSTORE(sign_extend_16_32, RA_or_0, RB, true, 2, false, false), - PPC_I(LHAX), - X_form, 31, 343, CFLOW_NORMAL - }, - { "lhbrx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, true, 2, false, true), - PPC_I(LHBRX), - X_form, 31, 790, CFLOW_NORMAL - }, - { "lhz", - EXECUTE_LOADSTORE(nop, RA_or_0, D, true, 2, false, false), - PPC_I(LHZ), - D_form, 40, 0, CFLOW_NORMAL - }, - { "lhzu", - EXECUTE_LOADSTORE(nop, RA, D, true, 2, true, false), - PPC_I(LHZU), - D_form, 41, 0, CFLOW_NORMAL - }, - { "lhzux", - EXECUTE_LOADSTORE(nop, RA, RB, true, 2, true, false), - PPC_I(LHZUX), - X_form, 31, 311, CFLOW_NORMAL - }, - { "lhzx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, true, 2, false, false), - PPC_I(LHZX), - X_form, 31, 279, CFLOW_NORMAL - }, - { "lmw", - EXECUTE_LOADSTORE_MULTIPLE(RA_or_0, D, true), - PPC_I(LMW), - D_form, 46, 0, CFLOW_NORMAL - }, - { "lswi", - EXECUTE_LOAD_STRING(RA_or_0, true, NB), - PPC_I(LSWI), - X_form, 31, 597, CFLOW_NORMAL - }, - { "lswx", - EXECUTE_LOAD_STRING(RA_or_0, false, XER_COUNT), - PPC_I(LSWX), - X_form, 31, 533, CFLOW_NORMAL - }, - { "lvebx", - EXECUTE_VECTOR_LOADSTORE(load, V16QIm, RA_or_0, RB), - PPC_I(LVEBX), - X_form, 31, 7, CFLOW_NORMAL - }, - { "lvehx", - EXECUTE_VECTOR_LOADSTORE(load, V8HIm, RA_or_0, RB), - PPC_I(LVEHX), - X_form, 31, 39, CFLOW_NORMAL - }, - { "lvewx", - EXECUTE_VECTOR_LOADSTORE(load, V4SI, RA_or_0, RB), - PPC_I(LVEWX), - X_form, 31, 71, CFLOW_NORMAL - }, - { "lvsl", - EXECUTE_1(vector_load_for_shift, 1), - PPC_I(LVSL), - X_form, 31, 6, CFLOW_NORMAL - }, - { "lvsr", - EXECUTE_1(vector_load_for_shift, 0), - PPC_I(LVSR), - X_form, 31, 38, CFLOW_NORMAL - }, - { "lvx", - EXECUTE_VECTOR_LOADSTORE(load, V2DI, RA_or_0, RB), - PPC_I(LVX), - X_form, 31, 103, CFLOW_NORMAL - }, - { "lvxl", - EXECUTE_VECTOR_LOADSTORE(load, V2DI, RA_or_0, RB), - PPC_I(LVXL), - X_form, 31, 359, CFLOW_NORMAL - }, - { "lwarx", - EXECUTE_1(lwarx, operand_RA_or_0), - PPC_I(LWARX), - X_form, 31, 20, CFLOW_NORMAL - }, - { "lwbrx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, true, 4, false, true), - PPC_I(LWBRX), - X_form, 31, 534, CFLOW_NORMAL - }, - { "lwz", - EXECUTE_LOADSTORE(nop, RA_or_0, D, true, 4, false, false), - PPC_I(LWZ), - D_form, 32, 0, CFLOW_NORMAL - }, - { "lwzu", - EXECUTE_LOADSTORE(nop, RA, D, true, 4, true, false), - PPC_I(LWZU), - D_form, 33, 0, CFLOW_NORMAL - }, - { "lwzux", - EXECUTE_LOADSTORE(nop, RA, RB, true, 4, true, false), - PPC_I(LWZUX), - X_form, 31, 55, CFLOW_NORMAL - }, - { "lwzx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, true, 4, false, false), - PPC_I(LWZX), - X_form, 31, 23, CFLOW_NORMAL - }, - { "mcrf", - EXECUTE_0(mcrf), - PPC_I(MCRF), - XL_form, 19, 0, CFLOW_NORMAL - }, - { "mcrfs", - EXECUTE_0(mcrfs), - PPC_I(MCRFS), - X_form, 63, 64, CFLOW_NORMAL - }, - { "mcrxr", - EXECUTE_0(mcrxr), - PPC_I(MCRXR), - X_form, 31, 512, CFLOW_NORMAL - }, - { "mfcr", - EXECUTE_GENERIC_ARITH(nop, RD, CR, NONE, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(MFCR), - X_form, 31, 19, CFLOW_NORMAL - }, - { "mffs", - EXECUTE_1(mffs, RC_BIT_G), - PPC_I(MFFS), - X_form, 63, 583, CFLOW_NORMAL - }, - { "mfmsr", - EXECUTE_0(mfmsr), - PPC_I(MFMSR), - X_form, 31, 83, CFLOW_NORMAL - }, - { "mfspr", - EXECUTE_1(mfspr, operand_SPR), - PPC_I(MFSPR), - XFX_form, 31, 339, CFLOW_NORMAL - }, - { "mftb", - EXECUTE_1(mftbr, operand_TBR), - PPC_I(MFTB), - XFX_form, 31, 371, CFLOW_NORMAL - }, - { "mfvscr", - EXECUTE_0(mfvscr), - PPC_I(MFVSCR), - VX_form, 4, 1540, CFLOW_NORMAL - }, - { "mtcrf", - EXECUTE_0(mtcrf), - PPC_I(MTCRF), - XFX_form, 31, 144, CFLOW_NORMAL - }, - { "mtfsb0", - EXECUTE_2(mtfsb, immediate_value<0>, RC_BIT_G), - PPC_I(MTFSB0), - X_form, 63, 70, CFLOW_NORMAL - }, - { "mtfsb1", - EXECUTE_2(mtfsb, immediate_value<1>, RC_BIT_G), - PPC_I(MTFSB1), - X_form, 63, 38, CFLOW_NORMAL - }, - { "mtfsf", - EXECUTE_3(mtfsf, operand_FM, operand_fp_dw_RB, RC_BIT_G), - PPC_I(MTFSF), - XFL_form, 63, 711, CFLOW_NORMAL - }, - { "mtfsfi", - EXECUTE_2(mtfsfi, operand_IMM, RC_BIT_G), - PPC_I(MTFSFI), - X_form, 63, 134, CFLOW_NORMAL - }, - { "mtspr", - EXECUTE_1(mtspr, operand_SPR), - PPC_I(MTSPR), - XFX_form, 31, 467, CFLOW_NORMAL - }, - { "mtvscr", - EXECUTE_0(mtvscr), - PPC_I(MTVSCR), - VX_form, 4, 1604, CFLOW_NORMAL - }, - { "mulhw", - EXECUTE_4(multiply, true, true, OE_BIT_0, RC_BIT_G), - PPC_I(MULHW), - XO_form, 31, 75, CFLOW_NORMAL - }, - { "mulhwu", - EXECUTE_4(multiply, true, false, OE_BIT_0, RC_BIT_G), - PPC_I(MULHWU), - XO_form, 31, 11, CFLOW_NORMAL - }, - { "mulli", - EXECUTE_GENERIC_ARITH(smul, RD, RA, SIMM, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(MULLI), - D_form, 7, 0, CFLOW_NORMAL - }, - { "mullw", - EXECUTE_4(multiply, false, true, OE_BIT_G, RC_BIT_G), - PPC_I(MULLW), - XO_form, 31, 235, CFLOW_NORMAL - }, - { "nand", - EXECUTE_GENERIC_ARITH(nand, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(NAND), - X_form, 31, 476, CFLOW_NORMAL - }, - { "neg", - EXECUTE_GENERIC_ARITH(neg, RD, RA, NONE, NONE, OE_BIT_G, RC_BIT_G), - PPC_I(NEG), - XO_form, 31, 104, CFLOW_NORMAL - }, - { "nor", - EXECUTE_GENERIC_ARITH(nor, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(NOR), - XO_form, 31, 124, CFLOW_NORMAL - }, - { "or", - EXECUTE_GENERIC_ARITH(or, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(OR), - XO_form, 31, 444, CFLOW_NORMAL - }, - { "orc", - EXECUTE_GENERIC_ARITH(orc, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(ORC), - XO_form, 31, 412, CFLOW_NORMAL - }, - { "ori", - EXECUTE_GENERIC_ARITH(or, RA, RS, UIMM, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(ORI), - D_form, 24, 0, CFLOW_NORMAL - }, - { "oris", - EXECUTE_GENERIC_ARITH(or, RA, RS, UIMM_shifted, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(ORIS), - D_form, 25, 0, CFLOW_NORMAL - }, - { "rlwimi", - EXECUTE_3(rlwimi, operand_SH, operand_MASK, RC_BIT_G), - PPC_I(RLWIMI), - M_form, 20, 0, CFLOW_NORMAL - }, - { "rlwinm", - EXECUTE_GENERIC_ARITH(ppc_rlwinm, RA, RS, SH, MASK, OE_BIT_0, RC_BIT_G), - PPC_I(RLWINM), - M_form, 21, 0, CFLOW_NORMAL - }, - { "rlwnm", - EXECUTE_GENERIC_ARITH(ppc_rlwnm, RA, RS, RB, MASK, OE_BIT_0, RC_BIT_G), - PPC_I(RLWNM), - M_form, 23, 0, CFLOW_NORMAL - }, - { "sc", - EXECUTE_0(syscall), - PPC_I(SC), - SC_form, 17, 0, CFLOW_NORMAL - }, - { "slw", - EXECUTE_SHIFT(shll, RA, RS, RB, andi<0x3f>, CA_BIT_0, RC_BIT_G), - PPC_I(SLW), - X_form, 31, 24, CFLOW_NORMAL - }, - { "sraw", - EXECUTE_SHIFT(shra, RA, RS, RB, andi<0x3f>, CA_BIT_1, RC_BIT_G), - PPC_I(SRAW), - X_form, 31, 792, CFLOW_NORMAL - }, - { "srawi", - EXECUTE_SHIFT(shra, RA, RS, SH, andi<0x1f>, CA_BIT_1, RC_BIT_G), - PPC_I(SRAWI), - X_form, 31, 824, CFLOW_NORMAL - }, - { "srw", - EXECUTE_SHIFT(shrl, RA, RS, RB, andi<0x3f>, CA_BIT_0, RC_BIT_G), - PPC_I(SRW), - X_form, 31, 536, CFLOW_NORMAL - }, - { "stb", - EXECUTE_LOADSTORE(nop, RA_or_0, D, false, 1, false, false), - PPC_I(STB), - D_form, 38, 0, CFLOW_NORMAL - }, - { "stbu", - EXECUTE_LOADSTORE(nop, RA, D, false, 1, true, false), - PPC_I(STBU), - D_form, 39, 0, CFLOW_NORMAL - }, - { "stbux", - EXECUTE_LOADSTORE(nop, RA, RB, false, 1, true, false), - PPC_I(STBUX), - X_form, 31, 247, CFLOW_NORMAL - }, - { "stbx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, false, 1, false, false), - PPC_I(STBX), - X_form, 31, 215, CFLOW_NORMAL - }, - { "stfd", - EXECUTE_FP_LOADSTORE(RA_or_0, D, false, true, false), - PPC_I(STFD), - D_form, 54, 0, CFLOW_NORMAL - }, - { "stfdu", - EXECUTE_FP_LOADSTORE(RA, D, false, true, true), - PPC_I(STFDU), - D_form, 55, 0, CFLOW_NORMAL - }, - { "stfdux", - EXECUTE_FP_LOADSTORE(RA, RB, false, true, true), - PPC_I(STFDUX), - X_form, 31, 759, CFLOW_NORMAL - }, - { "stfdx", - EXECUTE_FP_LOADSTORE(RA_or_0, RB, false, true, false), - PPC_I(STFDX), - X_form, 31, 727, CFLOW_NORMAL - }, - { "stfs", - EXECUTE_FP_LOADSTORE(RA_or_0, D, false, false, false), - PPC_I(STFS), - D_form, 52, 0, CFLOW_NORMAL - }, - { "stfsu", - EXECUTE_FP_LOADSTORE(RA, D, false, false, true), - PPC_I(STFSU), - D_form, 53, 0, CFLOW_NORMAL - }, - { "stfsux", - EXECUTE_FP_LOADSTORE(RA, RB, false, false, true), - PPC_I(STFSUX), - X_form, 31, 695, CFLOW_NORMAL - }, - { "stfsx", - EXECUTE_FP_LOADSTORE(RA_or_0, RB, false, false, false), - PPC_I(STFSX), - X_form, 31, 663, CFLOW_NORMAL - }, - { "sth", - EXECUTE_LOADSTORE(nop, RA_or_0, D, false, 2, false, false), - PPC_I(STH), - D_form, 44, 0, CFLOW_NORMAL - }, - { "sthbrx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, false, 2, false, true), - PPC_I(STHBRX), - X_form, 31, 918, CFLOW_NORMAL - }, - { "sthu", - EXECUTE_LOADSTORE(nop, RA, D, false, 2, true, false), - PPC_I(STHU), - D_form, 45, 0, CFLOW_NORMAL - }, - { "sthux", - EXECUTE_LOADSTORE(nop, RA, RB, false, 2, true, false), - PPC_I(STHUX), - X_form, 31, 439, CFLOW_NORMAL - }, - { "sthx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, false, 2, false, false), - PPC_I(STHX), - X_form, 31, 407, CFLOW_NORMAL - }, - { "stmw", - EXECUTE_LOADSTORE_MULTIPLE(RA_or_0, D, false), - PPC_I(STMW), - D_form, 47, 0, CFLOW_NORMAL - }, - { "stswi", - EXECUTE_STORE_STRING(RA_or_0, true, NB), - PPC_I(STSWI), - X_form, 31, 725, CFLOW_NORMAL - }, - { "stswx", - EXECUTE_STORE_STRING(RA_or_0, false, XER_COUNT), - PPC_I(STSWX), - X_form, 31, 661, CFLOW_NORMAL - }, - { "stvebx", - EXECUTE_VECTOR_LOADSTORE(store, V16QIm, RA_or_0, RB), - PPC_I(STVEBX), - X_form, 31, 135, CFLOW_NORMAL - }, - { "stvehx", - EXECUTE_VECTOR_LOADSTORE(store, V8HIm, RA_or_0, RB), - PPC_I(STVEHX), - X_form, 31, 167, CFLOW_NORMAL - }, - { "stvewx", - EXECUTE_VECTOR_LOADSTORE(store, V4SI, RA_or_0, RB), - PPC_I(STVEWX), - X_form, 31, 199, CFLOW_NORMAL - }, - { "stvx", - EXECUTE_VECTOR_LOADSTORE(store, V2DI, RA_or_0, RB), - PPC_I(STVX), - X_form, 31, 231, CFLOW_NORMAL - }, - { "stvxl", - EXECUTE_VECTOR_LOADSTORE(store, V2DI, RA_or_0, RB), - PPC_I(STVXL), - X_form, 31, 487, CFLOW_NORMAL - }, - { "stw", - EXECUTE_LOADSTORE(nop, RA_or_0, D, false, 4, false, false), - PPC_I(STW), - D_form, 36, 0, CFLOW_NORMAL - }, - { "stwbrx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, false, 4, false, true), - PPC_I(STWBRX), - X_form, 31, 662, CFLOW_NORMAL - }, - { "stwcx.", - EXECUTE_1(stwcx, operand_RA_or_0), - PPC_I(STWCX), - X_form, 31, 150, CFLOW_NORMAL - }, - { "stwu", - EXECUTE_LOADSTORE(nop, RA, D, false, 4, true, false), - PPC_I(STWU), - D_form, 37, 0, CFLOW_NORMAL - }, - { "stwux", - EXECUTE_LOADSTORE(nop, RA, RB, false, 4, true, false), - PPC_I(STWUX), - X_form, 31, 183, CFLOW_NORMAL - }, - { "stwx", - EXECUTE_LOADSTORE(nop, RA_or_0, RB, false, 4, false, false), - PPC_I(STWX), - X_form, 31, 151, CFLOW_NORMAL - }, - { "subf", - EXECUTE_ADDITION(RA_compl, RB, ONE, CA_BIT_0, OE_BIT_G, RC_BIT_G), - PPC_I(SUBF), - XO_form, 31, 40, CFLOW_NORMAL - }, - { "subfc", - EXECUTE_ADDITION(RA_compl, RB, ONE, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(SUBFC), - XO_form, 31, 8, CFLOW_NORMAL - }, - { "subfe", - EXECUTE_ADDITION(RA_compl, RB, XER_CA, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(SUBFE), - XO_form, 31, 136, CFLOW_NORMAL - }, - { "subfic", - EXECUTE_ADDITION(RA_compl, SIMM, ONE, CA_BIT_1, OE_BIT_0, RC_BIT_0), - PPC_I(SUBFIC), - D_form, 8, 0, CFLOW_NORMAL - }, - { "subfme", - EXECUTE_ADDITION(RA_compl, XER_CA, MINUS_ONE, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(SUBFME), - XO_form, 31, 232, CFLOW_NORMAL - }, - { "subfze", - EXECUTE_ADDITION(RA_compl, XER_CA, ZERO, CA_BIT_1, OE_BIT_G, RC_BIT_G), - PPC_I(SUBFZE), - XO_form, 31, 200, CFLOW_NORMAL - }, - { "sync", - EXECUTE_0(nop), - PPC_I(SYNC), - X_form, 31, 598, CFLOW_NORMAL - }, - { "xor", - EXECUTE_GENERIC_ARITH(xor, RA, RS, RB, NONE, OE_BIT_0, RC_BIT_G), - PPC_I(XOR), - X_form, 31, 316, CFLOW_NORMAL - }, - { "xori", - EXECUTE_GENERIC_ARITH(xor, RA, RS, UIMM, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(XORI), - D_form, 26, 0, CFLOW_NORMAL - }, - { "xoris", - EXECUTE_GENERIC_ARITH(xor, RA, RS, UIMM_shifted, NONE, OE_BIT_0, RC_BIT_0), - PPC_I(XORIS), - D_form, 27, 0, CFLOW_NORMAL - }, - { "vaddcuw", - EXECUTE_VECTOR_ARITH(addcuw, V4SI, V4SI, V4SI, NONE), - PPC_I(VADDCUW), - VX_form, 4, 384, CFLOW_NORMAL - }, - { "vaddfp", - EXECUTE_VECTOR_ARITH(fadds, V4SF, V4SF, V4SF, NONE), - PPC_I(VADDFP), - VX_form, 4, 10, CFLOW_NORMAL - }, - { "vaddsbs", - EXECUTE_VECTOR_ARITH(add, V16QI_SAT, V16QI_SAT, V16QI_SAT, NONE), - PPC_I(VADDSBS), - VX_form, 4, 768, CFLOW_NORMAL - }, - { "vaddshs", - EXECUTE_VECTOR_ARITH(add, V8HI_SAT, V8HI_SAT, V8HI_SAT, NONE), - PPC_I(VADDSHS), - VX_form, 4, 832, CFLOW_NORMAL - }, - { "vaddsws", - EXECUTE_VECTOR_ARITH(add_64, V4SI_SAT, V4SI_SAT, V4SI_SAT, NONE), - PPC_I(VADDSWS), - VX_form, 4, 896, CFLOW_NORMAL - }, - { "vaddubm", - EXECUTE_VECTOR_ARITH(add, V16QI, V16QI, V16QI, NONE), - PPC_I(VADDUBM), - VX_form, 4, 0, CFLOW_NORMAL - }, - { "vaddubs", - EXECUTE_VECTOR_ARITH(add, V16QI_SAT, V16QI_SAT, V16QI_SAT, NONE), - PPC_I(VADDUBS), - VX_form, 4, 512, CFLOW_NORMAL - }, - { "vadduhm", - EXECUTE_VECTOR_ARITH(add, V8HI, V8HI, V8HI, NONE), - PPC_I(VADDUHM), - VX_form, 4, 64, CFLOW_NORMAL - }, - { "vadduhs", - EXECUTE_VECTOR_ARITH(add, V8HI_SAT, V8HI_SAT, V8HI_SAT, NONE), - PPC_I(VADDUHS), - VX_form, 4, 576, CFLOW_NORMAL - }, - { "vadduwm", - EXECUTE_VECTOR_ARITH(add, V4SI, V4SI, V4SI, NONE), - PPC_I(VADDUWM), - VX_form, 4, 128, CFLOW_NORMAL - }, - { "vadduws", - EXECUTE_VECTOR_ARITH(add_64, V4SI_SAT, V4SI_SAT, V4SI_SAT, NONE), - PPC_I(VADDUWS), - VX_form, 4, 640, CFLOW_NORMAL - }, - { "vand", - EXECUTE_VECTOR_ARITH(and_64, V2DI, V2DI, V2DI, NONE), - PPC_I(VAND), - VX_form, 4, 1028, CFLOW_NORMAL - }, - { "vandc", - EXECUTE_VECTOR_ARITH(andc_64, V2DI, V2DI, V2DI, NONE), - PPC_I(VANDC), - VX_form, 4, 1092, CFLOW_NORMAL - }, - { "vavgsb", - EXECUTE_VECTOR_ARITH(avgsb, V16QI, V16QI, V16QI, NONE), - PPC_I(VAVGSB), - VX_form, 4, 1282, CFLOW_NORMAL - }, - { "vavgsh", - EXECUTE_VECTOR_ARITH(avgsh, V8HI, V8HI, V8HI, NONE), - PPC_I(VAVGSH), - VX_form, 4, 1346, CFLOW_NORMAL - }, - { "vavgsw", - EXECUTE_VECTOR_ARITH(avgsw, V4SI, V4SI, V4SI, NONE), - PPC_I(VAVGSW), - VX_form, 4, 1410, CFLOW_NORMAL - }, - { "vavgub", - EXECUTE_VECTOR_ARITH(avgub, V16QI, V16QI, V16QI, NONE), - PPC_I(VAVGUB), - VX_form, 4, 1026, CFLOW_NORMAL - }, - { "vavguh", - EXECUTE_VECTOR_ARITH(avguh, V8HI, V8HI, V8HI, NONE), - PPC_I(VAVGUH), - VX_form, 4, 1090, CFLOW_NORMAL - }, - { "vavguw", - EXECUTE_VECTOR_ARITH(avguw, V4SI, V4SI, V4SI, NONE), - PPC_I(VAVGUW), - VX_form, 4, 1154, CFLOW_NORMAL - }, - { "vcfsx", - EXECUTE_VECTOR_ARITH(cvt_si2fp, V4SF, UIMM, V4SIs, NONE), - PPC_I(VCFSX), - VX_form, 4, 842, CFLOW_NORMAL - }, - { "vcfux", - EXECUTE_VECTOR_ARITH(cvt_si2fp, V4SF, UIMM, V4SI, NONE), - PPC_I(VCFUX), - VX_form, 4, 778, CFLOW_NORMAL - }, - { "vcmpbfp", - EXECUTE_VECTOR_COMPARE(cmpbfp, V4SI, V4SF, V4SF, 0), - PPC_I(VCMPBFP), - VXR_form, 4, 966, CFLOW_NORMAL - }, - { "vcmpeqfp", - EXECUTE_VECTOR_COMPARE(cmp_eq, V4SI, V4SF, V4SF, 1), - PPC_I(VCMPEQFP), - VXR_form, 4, 198, CFLOW_NORMAL - }, - { "vcmpequb", - EXECUTE_VECTOR_COMPARE(cmp_eq, V16QI, V16QI, V16QI, 1), - PPC_I(VCMPEQUB), - VXR_form, 4, 6, CFLOW_NORMAL - }, - { "vcmpequh", - EXECUTE_VECTOR_COMPARE(cmp_eq, V8HI, V8HI, V8HI, 1), - PPC_I(VCMPEQUH), - VXR_form, 4, 70, CFLOW_NORMAL - }, - { "vcmpequw", - EXECUTE_VECTOR_COMPARE(cmp_eq, V4SI, V4SI, V4SI, 1), - PPC_I(VCMPEQUW), - VXR_form, 4, 134, CFLOW_NORMAL - }, - { "vcmpgefp", - EXECUTE_VECTOR_COMPARE(cmp_ge, V4SI, V4SF, V4SF, 1), - PPC_I(VCMPGEFP), - VXR_form, 4, 454, CFLOW_NORMAL - }, - { "vcmpgtfp", - EXECUTE_VECTOR_COMPARE(cmp_gt, V4SI, V4SF, V4SF, 1), - PPC_I(VCMPGTFP), - VXR_form, 4, 710, CFLOW_NORMAL - }, - { "vcmpgtsb", - EXECUTE_VECTOR_COMPARE(cmp_gt, V16QI, V16QIs, V16QIs, 1), - PPC_I(VCMPGTSB), - VXR_form, 4, 774, CFLOW_NORMAL - }, - { "vcmpgtsh", - EXECUTE_VECTOR_COMPARE(cmp_gt, V8HI, V8HIs, V8HIs, 1), - PPC_I(VCMPGTSH), - VXR_form, 4, 838, CFLOW_NORMAL - }, - { "vcmpgtsw", - EXECUTE_VECTOR_COMPARE(cmp_gt, V4SI, V4SIs, V4SIs, 1), - PPC_I(VCMPGTSW), - VXR_form, 4, 902, CFLOW_NORMAL - }, - { "vcmpgtub", - EXECUTE_VECTOR_COMPARE(cmp_gt, V16QI, V16QI, V16QI, 1), - PPC_I(VCMPGTUB), - VXR_form, 4, 518, CFLOW_NORMAL - }, - { "vcmpgtuh", - EXECUTE_VECTOR_COMPARE(cmp_gt, V8HI, V8HI, V8HI, 1), - PPC_I(VCMPGTUH), - VXR_form, 4, 582, CFLOW_NORMAL - }, - { "vcmpgtuw", - EXECUTE_VECTOR_COMPARE(cmp_gt, V4SI, V4SI, V4SI, 1), - PPC_I(VCMPGTUW), - VXR_form, 4, 646, CFLOW_NORMAL - }, - { "vctsxs", - EXECUTE_VECTOR_ARITH(cvt_fp2si, V4SI_SAT, UIMM, V4SF, NONE), - PPC_I(VCTSXS), - VX_form, 4, 970, CFLOW_NORMAL - }, - { "vctuxs", - EXECUTE_VECTOR_ARITH(cvt_fp2si, V4SI_SAT, UIMM, V4SF, NONE), - PPC_I(VCTUXS), - VX_form, 4, 906, CFLOW_NORMAL - }, - { "vexptefp", - EXECUTE_VECTOR_ARITH(exp2, V4SF, NONE, V4SF, NONE), - PPC_I(VEXPTEFP), - VX_form, 4, 394, CFLOW_NORMAL - }, - { "vlogefp", - EXECUTE_VECTOR_ARITH(log2, V4SF, NONE, V4SF, NONE), - PPC_I(VLOGEFP), - VX_form, 4, 458, CFLOW_NORMAL - }, - { "vmaddfp", - EXECUTE_VECTOR_ARITH(vmaddfp, V4SF, V4SF, V4SF, V4SF), - PPC_I(VMADDFP), - VA_form, 4, 46, CFLOW_NORMAL - }, - { "vmaxfp", - EXECUTE_VECTOR_ARITH(max, V4SF, V4SF, V4SF, NONE), - PPC_I(VMAXFP), - VX_form, 4, 1034, CFLOW_NORMAL - }, - { "vmaxsb", - EXECUTE_VECTOR_ARITH(max, V16QI, V16QI, V16QI, NONE), - PPC_I(VMAXSB), - VX_form, 4, 258, CFLOW_NORMAL - }, - { "vmaxsh", - EXECUTE_VECTOR_ARITH(max, V8HI, V8HI, V8HI, NONE), - PPC_I(VMAXSH), - VX_form, 4, 322, CFLOW_NORMAL - }, - { "vmaxsw", - EXECUTE_VECTOR_ARITH(max, V4SI, V4SI, V4SI, NONE), - PPC_I(VMAXSW), - VX_form, 4, 386, CFLOW_NORMAL - }, - { "vmaxub", - EXECUTE_VECTOR_ARITH(max, V16QI, V16QI, V16QI, NONE), - PPC_I(VMAXUB), - VX_form, 4, 2, CFLOW_NORMAL - }, - { "vmaxuh", - EXECUTE_VECTOR_ARITH(max, V8HI, V8HI, V8HI, NONE), - PPC_I(VMAXUH), - VX_form, 4, 66, CFLOW_NORMAL - }, - { "vmaxuw", - EXECUTE_VECTOR_ARITH(max, V4SI, V4SI, V4SI, NONE), - PPC_I(VMAXUW), - VX_form, 4, 130, CFLOW_NORMAL - }, - { "vmhaddshs", - EXECUTE_VECTOR_ARITH(mhraddsh<0>, V8HI_SAT, V8HI_SAT, V8HI_SAT, V8HI_SAT), - PPC_I(VMHADDSHS), - VA_form, 4, 32, CFLOW_NORMAL - }, - { "vmhraddshs", - EXECUTE_VECTOR_ARITH(mhraddsh<0x4000>, V8HI_SAT, V8HI_SAT, V8HI_SAT, V8HI_SAT), - PPC_I(VMHRADDSHS), - VA_form, 4, 33, CFLOW_NORMAL - }, - { "vminfp", - EXECUTE_VECTOR_ARITH(min, V4SF, V4SF, V4SF, NONE), - PPC_I(VMINFP), - VX_form, 4, 1098, CFLOW_NORMAL - }, - { "vminsb", - EXECUTE_VECTOR_ARITH(min, V16QI, V16QI, V16QI, NONE), - PPC_I(VMINSB), - VX_form, 4, 770, CFLOW_NORMAL - }, - { "vminsh", - EXECUTE_VECTOR_ARITH(min, V8HI, V8HI, V8HI, NONE), - PPC_I(VMINSH), - VX_form, 4, 834, CFLOW_NORMAL - }, - { "vminsw", - EXECUTE_VECTOR_ARITH(min, V4SI, V4SI, V4SI, NONE), - PPC_I(VMINSW), - VX_form, 4, 898, CFLOW_NORMAL - }, - { "vminub", - EXECUTE_VECTOR_ARITH(min, V16QI, V16QI, V16QI, NONE), - PPC_I(VMINUB), - VX_form, 4, 514, CFLOW_NORMAL - }, - { "vminuh", - EXECUTE_VECTOR_ARITH(min, V8HI, V8HI, V8HI, NONE), - PPC_I(VMINUH), - VX_form, 4, 578, CFLOW_NORMAL - }, - { "vminuw", - EXECUTE_VECTOR_ARITH(min, V4SI, V4SI, V4SI, NONE), - PPC_I(VMINUW), - VX_form, 4, 642, CFLOW_NORMAL - }, - { "vmladduhm", - EXECUTE_VECTOR_ARITH(mladduh, V8HI, V8HI, V8HI, V8HI), - PPC_I(VMLADDUHM), - VA_form, 4, 34, CFLOW_NORMAL - }, - { "vmrghb", - EXECUTE_VECTOR_MERGE(V16QIm, V16QIm, V16QIm, 0), - PPC_I(VMRGHB), - VX_form, 4, 12, CFLOW_NORMAL - }, - { "vmrghh", - EXECUTE_VECTOR_MERGE(V8HIm, V8HIm, V8HIm, 0), - PPC_I(VMRGHH), - VX_form, 4, 76, CFLOW_NORMAL - }, - { "vmrghw", - EXECUTE_VECTOR_MERGE(V4SI, V4SI, V4SI, 0), - PPC_I(VMRGHW), - VX_form, 4, 140, CFLOW_NORMAL - }, - { "vmrglb", - EXECUTE_VECTOR_MERGE(V16QIm, V16QIm, V16QIm, 1), - PPC_I(VMRGLB), - VX_form, 4, 268, CFLOW_NORMAL - }, - { "vmrglh", - EXECUTE_VECTOR_MERGE(V8HIm, V8HIm, V8HIm, 1), - PPC_I(VMRGLH), - VX_form, 4, 332, CFLOW_NORMAL - }, - { "vmrglw", - EXECUTE_VECTOR_MERGE(V4SI, V4SI, V4SI, 1), - PPC_I(VMRGLW), - VX_form, 4, 396, CFLOW_NORMAL - }, - { "vmsummbm", - EXECUTE_VECTOR_ARITH_MIXED(smul, V4SI, V16QI_SAT, V16QI_SAT, V4SI), - PPC_I(VMSUMMBM), - VA_form, 4, 37, CFLOW_NORMAL - }, - { "vmsumshm", - EXECUTE_VECTOR_ARITH_MIXED(smul, V4SI, V8HI_SAT, V8HI_SAT, V4SI), - PPC_I(VMSUMSHM), - VA_form, 4, 40, CFLOW_NORMAL - }, - { "vmsumshs", - EXECUTE_VECTOR_ARITH_MIXED(smul_64, V4SI_SAT, V8HI_SAT, V8HI_SAT, V4SIs), - PPC_I(VMSUMSHS), - VA_form, 4, 41, CFLOW_NORMAL - }, - { "vmsumubm", - EXECUTE_VECTOR_ARITH_MIXED(mul, V4SI, V16QI, V16QI, V4SI), - PPC_I(VMSUMUBM), - VA_form, 4, 36, CFLOW_NORMAL - }, - { "vmsumuhm", - EXECUTE_VECTOR_ARITH_MIXED(mul, V4SI, V8HI, V8HI, V4SI), - PPC_I(VMSUMUHM), - VA_form, 4, 38, CFLOW_NORMAL - }, - { "vmsumuhs", - EXECUTE_VECTOR_ARITH_MIXED(mul, V4SI_SAT, V8HI, V8HI, V4SI), - PPC_I(VMSUMUHS), - VA_form, 4, 39, CFLOW_NORMAL - }, - { "vmulesb", - EXECUTE_VECTOR_ARITH_ODD(0, smul, V8HIm, V16QIm_SAT, V16QIm_SAT, NONE), - PPC_I(VMULESB), - VX_form, 4, 776, CFLOW_NORMAL - }, - { "vmulesh", - EXECUTE_VECTOR_ARITH_ODD(0, smul, V4SI, V8HIm_SAT, V8HIm_SAT, NONE), - PPC_I(VMULESH), - VX_form, 4, 840, CFLOW_NORMAL - }, - { "vmuleub", - EXECUTE_VECTOR_ARITH_ODD(0, mul, V8HIm, V16QIm, V16QIm, NONE), - PPC_I(VMULEUB), - VX_form, 4, 520, CFLOW_NORMAL - }, - { "vmuleuh", - EXECUTE_VECTOR_ARITH_ODD(0, mul, V4SI, V8HIm, V8HIm, NONE), - PPC_I(VMULEUH), - VX_form, 4, 584, CFLOW_NORMAL - }, - { "vmulosb", - EXECUTE_VECTOR_ARITH_ODD(1, smul, V8HIm, V16QIm_SAT, V16QIm_SAT, NONE), - PPC_I(VMULOSB), - VX_form, 4, 264, CFLOW_NORMAL - }, - { "vmulosh", - EXECUTE_VECTOR_ARITH_ODD(1, smul, V4SI, V8HIm_SAT, V8HIm_SAT, NONE), - PPC_I(VMULOSH), - VX_form, 4, 328, CFLOW_NORMAL - }, - { "vmuloub", - EXECUTE_VECTOR_ARITH_ODD(1, mul, V8HIm, V16QIm, V16QIm, NONE), - PPC_I(VMULOUB), - VX_form, 4, 8, CFLOW_NORMAL - }, - { "vmulouh", - EXECUTE_VECTOR_ARITH_ODD(1, mul, V4SI, V8HIm, V8HIm, NONE), - PPC_I(VMULOUH), - VX_form, 4, 72, CFLOW_NORMAL - }, - { "vnmsubfp", - EXECUTE_VECTOR_ARITH(vnmsubfp, V4SF, V4SF, V4SF, V4SF), - PPC_I(VNMSUBFP), - VA_form, 4, 47, CFLOW_NORMAL - }, - { "vnor", - EXECUTE_VECTOR_ARITH(nor_64, V2DI, V2DI, V2DI, NONE), - PPC_I(VNOR), - VX_form, 4, 1284, CFLOW_NORMAL - }, - { "vor", - EXECUTE_VECTOR_ARITH(or_64, V2DI, V2DI, V2DI, NONE), - PPC_I(VOR), - VX_form, 4, 1156, CFLOW_NORMAL - }, - { "vperm", - EXECUTE_0(vector_permute), - PPC_I(VPERM), - VA_form, 4, 43, CFLOW_NORMAL - }, - { "vpkpx", - EXECUTE_0(vector_pack_pixel), - PPC_I(VPKPX), - VX_form, 4, 782, CFLOW_NORMAL - }, - { "vpkshss", - EXECUTE_VECTOR_PACK(V16QIm_SAT, V8HIm, V8HIm), - PPC_I(VPKSHSS), - VX_form, 4, 398, CFLOW_NORMAL - }, - { "vpkshus", - EXECUTE_VECTOR_PACK(V16QIm_SAT, V8HIm, V8HIm), - PPC_I(VPKSHUS), - VX_form, 4, 270, CFLOW_NORMAL - }, - { "vpkswss", - EXECUTE_VECTOR_PACK(V8HIm_SAT, V4SI, V4SI), - PPC_I(VPKSWSS), - VX_form, 4, 462, CFLOW_NORMAL - }, - { "vpkswus", - EXECUTE_VECTOR_PACK(V8HIm_SAT, V4SI, V4SI), - PPC_I(VPKSWUS), - VX_form, 4, 334, CFLOW_NORMAL - }, - { "vpkuhum", - EXECUTE_VECTOR_PACK(V16QIm, V8HIm, V8HIm), - PPC_I(VPKUHUM), - VX_form, 4, 14, CFLOW_NORMAL - }, - { "vpkuhus", - EXECUTE_VECTOR_PACK(V16QIm_USAT, V8HIm, V8HIm), - PPC_I(VPKUHUS), - VX_form, 4, 142, CFLOW_NORMAL - }, - { "vpkuwum", - EXECUTE_VECTOR_PACK(V8HIm, V4SI, V4SI), - PPC_I(VPKUWUM), - VX_form, 4, 78, CFLOW_NORMAL - }, - { "vpkuwus", - EXECUTE_VECTOR_PACK(V8HIm_USAT, V4SI, V4SI), - PPC_I(VPKUWUS), - VX_form, 4, 206, CFLOW_NORMAL - }, - { "vrefp", - EXECUTE_VECTOR_ARITH(fres, V4SF, NONE, V4SF, NONE), - PPC_I(VREFP), - VX_form, 4, 266, CFLOW_NORMAL - }, - { "vrfim", - EXECUTE_VECTOR_ARITH(frsim, V4SF, NONE, V4SF, NONE), - PPC_I(VRFIM), - VX_form, 4, 714, CFLOW_NORMAL - }, - { "vrfin", - EXECUTE_VECTOR_ARITH(frsin, V4SF, NONE, V4SF, NONE), - PPC_I(VRFIN), - VX_form, 4, 522, CFLOW_NORMAL - }, - { "vrfip", - EXECUTE_VECTOR_ARITH(frsip, V4SF, NONE, V4SF, NONE), - PPC_I(VRFIP), - VX_form, 4, 650, CFLOW_NORMAL - }, - { "vrfiz", - EXECUTE_VECTOR_ARITH(frsiz, V4SF, NONE, V4SF, NONE), - PPC_I(VRFIZ), - VX_form, 4, 586, CFLOW_NORMAL - }, - { "vrlb", - EXECUTE_VECTOR_ARITH(vrl, V16QI, V16QI, V16QI, NONE), - PPC_I(VRLB), - VX_form, 4, 4, CFLOW_NORMAL - }, - { "vrlh", - EXECUTE_VECTOR_ARITH(vrl, V8HI, V8HI, V8HI, NONE), - PPC_I(VRLH), - VX_form, 4, 68, CFLOW_NORMAL - }, - { "vrlw", - EXECUTE_VECTOR_ARITH(vrl, V4SI, V4SI, V4SI, NONE), - PPC_I(VRLW), - VX_form, 4, 132, CFLOW_NORMAL - }, - { "vrsqrtefp", - EXECUTE_VECTOR_ARITH(frsqrt, V4SF, NONE, V4SF, NONE), - PPC_I(VRSQRTEFP), - VX_form, 4, 330, CFLOW_NORMAL - }, - { "vsel", - EXECUTE_VECTOR_ARITH(vsel, V4SI, V4SI, V4SI, V4SI), - PPC_I(VSEL), - VA_form, 4, 42, CFLOW_NORMAL - }, - { "vsl", - EXECUTE_1(vector_shift, -1), - PPC_I(VSL), - VX_form, 4, 452, CFLOW_NORMAL - }, - { "vslb", - EXECUTE_VECTOR_ARITH(vsl, V16QI, V16QI, V16QI, NONE), - PPC_I(VSLB), - VX_form, 4, 260, CFLOW_NORMAL - }, - { "vsldoi", - EXECUTE_VECTOR_SHIFT_OCTET(-1, V16QIm, V16QIm, V16QIm, SHB), - PPC_I(VSLDOI), - VA_form, 4, 44, CFLOW_NORMAL - }, - { "vslh", - EXECUTE_VECTOR_ARITH(vsl, V8HI, V8HI, V8HI, NONE), - PPC_I(VSLH), - VX_form, 4, 324, CFLOW_NORMAL - }, - { "vslo", - EXECUTE_VECTOR_SHIFT_OCTET(-1, V16QIm, V16QIm, NONE, SHBO), - PPC_I(VSLO), - VX_form, 4, 1036, CFLOW_NORMAL - }, - { "vslw", - EXECUTE_VECTOR_ARITH(vsl, V4SI, V4SI, V4SI, NONE), - PPC_I(VSLW), - VX_form, 4, 388, CFLOW_NORMAL - }, - { "vspltb", - EXECUTE_VECTOR_SPLAT(nop, V16QI, V16QIm, false), - PPC_I(VSPLTB), - VX_form, 4, 524, CFLOW_NORMAL - }, - { "vsplth", - EXECUTE_VECTOR_SPLAT(nop, V8HI, V8HIm, false), - PPC_I(VSPLTH), - VX_form, 4, 588, CFLOW_NORMAL - }, - { "vspltisb", - EXECUTE_VECTOR_SPLAT(sign_extend_5_32, V16QI, UIMM, true), - PPC_I(VSPLTISB), - VX_form, 4, 780, CFLOW_NORMAL - }, - { "vspltish", - EXECUTE_VECTOR_SPLAT(sign_extend_5_32, V8HI, UIMM, true), - PPC_I(VSPLTISH), - VX_form, 4, 844, CFLOW_NORMAL - }, - { "vspltisw", - EXECUTE_VECTOR_SPLAT(sign_extend_5_32, V4SI, UIMM, true), - PPC_I(VSPLTISW), - VX_form, 4, 908, CFLOW_NORMAL - }, - { "vspltw", - EXECUTE_VECTOR_SPLAT(nop, V4SI, V4SI, false), - PPC_I(VSPLTW), - VX_form, 4, 652, CFLOW_NORMAL - }, - { "vsr", - EXECUTE_1(vector_shift, +1), - PPC_I(VSR), - VX_form, 4, 708, CFLOW_NORMAL - }, - { "vsrab", - EXECUTE_VECTOR_ARITH(vsr, V16QI, V16QIs, V16QI, NONE), - PPC_I(VSRAB), - VX_form, 4, 772, CFLOW_NORMAL - }, - { "vsrah", - EXECUTE_VECTOR_ARITH(vsr, V8HI, V8HIs, V8HI, NONE), - PPC_I(VSRAH), - VX_form, 4, 836, CFLOW_NORMAL - }, - { "vsraw", - EXECUTE_VECTOR_ARITH(vsr, V4SI, V4SIs, V4SIs, NONE), - PPC_I(VSRAW), - VX_form, 4, 900, CFLOW_NORMAL - }, - { "vsrb", - EXECUTE_VECTOR_ARITH(vsr, V16QI, V16QI, V16QI, NONE), - PPC_I(VSRB), - VX_form, 4, 516, CFLOW_NORMAL - }, - { "vsrh", - EXECUTE_VECTOR_ARITH(vsr, V8HI, V8HI, V8HI, NONE), - PPC_I(VSRH), - VX_form, 4, 580, CFLOW_NORMAL - }, - { "vsro", - EXECUTE_VECTOR_SHIFT_OCTET(+1, V16QIm, V16QIm, NONE, SHBO), - PPC_I(VSRO), - VX_form, 4, 1100, CFLOW_NORMAL - }, - { "vsrw", - EXECUTE_VECTOR_ARITH(vsr, V4SI, V4SI, V4SI, NONE), - PPC_I(VSRW), - VX_form, 4, 644, CFLOW_NORMAL - }, - { "vsubcuw", - EXECUTE_VECTOR_ARITH(subcuw, V4SI, V4SI, V4SI, NONE), - PPC_I(VSUBCUW), - VX_form, 4, 1408, CFLOW_NORMAL - }, - { "vsubfp", - EXECUTE_VECTOR_ARITH(fsubs, V4SF, V4SF, V4SF, NONE), - PPC_I(VSUBFP), - VX_form, 4, 74, CFLOW_NORMAL - }, - { "vsubsbs", - EXECUTE_VECTOR_ARITH(sub, V16QI_SAT, V16QI_SAT, V16QI_SAT, NONE), - PPC_I(VSUBSBS), - VX_form, 4, 1792, CFLOW_NORMAL - }, - { "vsubshs", - EXECUTE_VECTOR_ARITH(sub, V8HI_SAT, V8HI_SAT, V8HI_SAT, NONE), - PPC_I(VSUBSHS), - VX_form, 4, 1856, CFLOW_NORMAL - }, - { "vsubsws", - EXECUTE_VECTOR_ARITH(sub_64, V4SI_SAT, V4SI_SAT, V4SI_SAT, NONE), - PPC_I(VSUBSWS), - VX_form, 4, 1920, CFLOW_NORMAL - }, - { "vsububm", - EXECUTE_VECTOR_ARITH(sub, V16QI, V16QI, V16QI, NONE), - PPC_I(VSUBUBM), - VX_form, 4, 1024, CFLOW_NORMAL - }, - { "vsububs", - EXECUTE_VECTOR_ARITH(sub, V16QI_SAT, V16QI_SAT, V16QI_SAT, NONE), - PPC_I(VSUBUBS), - VX_form, 4, 1536, CFLOW_NORMAL - }, - { "vsubuhm", - EXECUTE_VECTOR_ARITH(sub, V8HI, V8HI, V8HI, NONE), - PPC_I(VSUBUHM), - VX_form, 4, 1088, CFLOW_NORMAL - }, - { "vsubuhs", - EXECUTE_VECTOR_ARITH(sub, V8HI_SAT, V8HI_SAT, V8HI_SAT, NONE), - PPC_I(VSUBUHS), - VX_form, 4, 1600, CFLOW_NORMAL - }, - { "vsubuwm", - EXECUTE_VECTOR_ARITH(sub, V4SI, V4SI, V4SI, NONE), - PPC_I(VSUBUWM), - VX_form, 4, 1152, CFLOW_NORMAL - }, - { "vsubuws", - EXECUTE_VECTOR_ARITH(sub_64, V4SI_SAT, V4SI_SAT, V4SI_SAT, NONE), - PPC_I(VSUBUWS), - VX_form, 4, 1664, CFLOW_NORMAL - }, - { "vsumsws", - EXECUTE_VECTOR_SUM(1, V4SI_SAT, V4SIs, V4SIs), - PPC_I(VSUMSWS), - VX_form, 4, 1928, CFLOW_NORMAL - }, - { "vsum2sws", - EXECUTE_VECTOR_SUM(2, V4SI_SAT, V4SIs, V4SIs), - PPC_I(VSUM2SWS), - VX_form, 4, 1672, CFLOW_NORMAL - }, - { "vsum4sbs", - EXECUTE_VECTOR_SUM(4, V4SI_SAT, V16QIs, V4SIs), - PPC_I(VSUM4SBS), - VX_form, 4, 1800, CFLOW_NORMAL - }, - { "vsum4shs", - EXECUTE_VECTOR_SUM(4, V4SI_SAT, V8HIs, V4SIs), - PPC_I(VSUM4SHS), - VX_form, 4, 1608, CFLOW_NORMAL - }, - { "vsum4ubs", - EXECUTE_VECTOR_SUM(4, V4SI_SAT, V16QI, V4SI), - PPC_I(VSUM4UBS), - VX_form, 4, 1544, CFLOW_NORMAL - }, - { "vupkhpx", - EXECUTE_1(vector_unpack_pixel, 0), - PPC_I(VUPKHPX), - VX_form, 4, 846, CFLOW_NORMAL - }, - { "vupkhsb", - EXECUTE_VECTOR_UNPACK(0, V8HIms, V16QIms), - PPC_I(VUPKHSB), - VX_form, 4, 526, CFLOW_NORMAL - }, - { "vupkhsh", - EXECUTE_VECTOR_UNPACK(0, V4SIs, V8HIms), - PPC_I(VUPKHSH), - VX_form, 4, 590, CFLOW_NORMAL - }, - { "vupklpx", - EXECUTE_1(vector_unpack_pixel, 1), - PPC_I(VUPKLPX), - VX_form, 4, 974, CFLOW_NORMAL - }, - { "vupklsb", - EXECUTE_VECTOR_UNPACK(1, V8HIms, V16QIms), - PPC_I(VUPKLSB), - VX_form, 4, 654, CFLOW_NORMAL - }, - { "vupklsh", - EXECUTE_VECTOR_UNPACK(1, V4SIs, V8HIms), - PPC_I(VUPKLSH), - VX_form, 4, 718, CFLOW_NORMAL - }, - { "vxor", - EXECUTE_VECTOR_ARITH(xor_64, V2DI, V2DI, V2DI, NONE), - PPC_I(VXOR), - VX_form, 4, 1220, CFLOW_NORMAL - } -}; - -void powerpc_cpu::init_decoder() -{ - const int ii_count = sizeof(powerpc_ii_table)/sizeof(powerpc_ii_table[0]); - D(bug("PowerPC decode table has %d entries\n", ii_count)); - assert(ii_count < (1 << (8 * sizeof(ii_index_t)))); - ii_table.reserve(ii_count); - - for (int i = 0; i < ii_count; i++) { - const instr_info_t * ii = &powerpc_ii_table[i]; - init_decoder_entry(ii); - } -} - -void powerpc_cpu::init_decoder_entry(const instr_info_t * ii) -{ - ii_table.push_back(*ii); - const ii_index_t ii_index = ii_table.size() - 1; - - assert((ii->format == INVALID_form && ii_index == 0) || - (ii->format != INVALID_form && ii_index != 0) ); - - switch (ii->format) { - case INVALID_form: - // Initialize all index table - for (int i = 0; i < II_INDEX_TABLE_SIZE; i++) - ii_index_table[i] = ii_index; - break; - - case B_form: - case D_form: - case I_form: - case M_form: - // Primary opcode only - for (int j = 0; j < 2048; j++) - ii_index_table[make_ii_index(ii->opcode, j)] = ii_index; - break; - - case SC_form: - // Primary opcode only, with reserved bits - ii_index_table[make_ii_index(ii->opcode, 2)] = ii_index; - break; - - case X_form: - case XL_form: - case XFX_form: - case XFL_form: - // Extended opcode in bits 21..30 - ii_index_table[make_ii_index(ii->opcode, (ii->xo << 1) )] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (ii->xo << 1) | 1)] = ii_index; - break; - - case XO_form: - // Extended opcode in bits 22..30, with OE bit 21 - ii_index_table[make_ii_index(ii->opcode, (ii->xo << 1) )] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (1 << 10) | (ii->xo << 1) )] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (ii->xo << 1) | 1)] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (1 << 10) | (ii->xo << 1) | 1)] = ii_index; - break; - - case A_form: - // Extended opcode in bits 26..30 - for (int j = 0; j < 32; j++) { - ii_index_table[make_ii_index(ii->opcode, (j << 6) | (ii->xo << 1) )] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (j << 6) | (ii->xo << 1) | 1)] = ii_index; - } - break; - - case VX_form: - // Extended opcode in bits 21..31 - ii_index_table[make_ii_index(ii->opcode, ii->xo)] = ii_index; - break; - - case VXR_form: - // Extended opcode in bits 22..31 - ii_index_table[make_ii_index(ii->opcode, ii->xo)] = ii_index; - ii_index_table[make_ii_index(ii->opcode, (1 << 10) | ii->xo)] = ii_index; - break; - - case VA_form: - // Extended opcode in bits 26..31 - for (int j = 0; j < 32; j++) - ii_index_table[make_ii_index(ii->opcode, (j << 6) | ii->xo)] = ii_index; - break; - - default: - fprintf(stderr, "Unhandled form %d\n", ii->format); - abort(); - break; - } -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp deleted file mode 100644 index 7f9e9f0bb..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp +++ /dev/null @@ -1,1769 +0,0 @@ -/* - * ppc-dyngen-ops.hpp - PowerPC synthetic instructions - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "cpu/vm.hpp" -#include "cpu/jit/dyngen-exec.h" -#define NO_DEFINE_ALIAS 1 -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-bitfields.hpp" -#include "cpu/ppc/ppc-registers.hpp" -#include "cpu/ppc/ppc-operations.hpp" - -#if defined(__GNUC__) -// Force inlining under newer versions of GCC. -static inline uint64 vm_read_memory_8(vm_addr_t addr) __attribute__((always_inline)); -static inline void vm_write_memory_8(vm_addr_t addr, uint64 value) __attribute__((always_inline)); -static inline uint64 vm_do_read_memory_8(uint64 *a) __attribute__((always_inline)); -static inline void vm_do_write_memory_8(uint64 *a, uint64 v) __attribute__((always_inline)); -static inline uint64 generic_bswap_64(uint64 x) __attribute__((always_inline)); -static inline uint32 fp_store_single_convert(uint64 v) __attribute__((always_inline)); -#define INLINE inline __attribute__((always_inline)) -#else -#define INLINE inline -#endif - -// We need at least 4 general purpose registers -register struct powerpc_cpu *CPU asm(REG_CPU); -#define DYNGEN_DEFINE_GLOBAL_REGISTER(REG) \ -register uintptr A##REG asm(REG_T##REG); \ -register uint32 T##REG asm(REG_T##REG) -DYNGEN_DEFINE_GLOBAL_REGISTER(0); -DYNGEN_DEFINE_GLOBAL_REGISTER(1); -DYNGEN_DEFINE_GLOBAL_REGISTER(2); -#ifdef REG_T3 -DYNGEN_DEFINE_GLOBAL_REGISTER(3); -#else -#define A3 powerpc_dyngen_helper::reg_T3() -#define T3 powerpc_dyngen_helper::reg_T3() -#endif - -// Floating-point registers -#define FPREG(X) ((powerpc_fpr *)(X)) -#define F0 FPREG(A0)->d -#define F0_dw FPREG(A0)->j -#define F1 FPREG(A1)->d -#define F1_dw FPREG(A1)->j -#define F2 FPREG(A2)->d -#define F2_dw FPREG(A2)->j -#define FD powerpc_dyngen_helper::reg_F3().d -#define FD_dw powerpc_dyngen_helper::reg_F3().j - -// Vector registers -#define VREG(X) ((powerpc_vr *)(X))[0] -#define V0 VREG(reg_V0) -#define reg_V0 A0 -#define V1 VREG(reg_V1) -#define reg_V1 A1 -#define V2 VREG(reg_V2) -#define reg_V2 A2 -#define VD VREG(reg_VD) -#define reg_VD A3 - -/** - * Helper class to access protected CPU context - **/ - -struct powerpc_dyngen_helper { - static INLINE uint32 get_pc() { return CPU->pc(); } - static INLINE void set_pc(uint32 value) { CPU->pc() = value; } - static INLINE void inc_pc(int32 offset) { CPU->pc() += offset; } - static INLINE uint32 get_lr() { return CPU->lr(); } - static INLINE void set_lr(uint32 value) { CPU->lr() = value; } - static INLINE uint32 get_ctr() { return CPU->ctr(); } - static INLINE void set_ctr(uint32 value) { CPU->ctr() = value; } - static INLINE uint32 get_cr() { return CPU->cr().get(); } - static INLINE void set_cr(uint32 value) { CPU->cr().set(value); } - static INLINE uint32 get_fpscr() { return CPU->fpscr(); } - static INLINE void set_fpscr(uint32 value) { CPU->fpscr() = value; } - static INLINE uint32 get_xer() { return CPU->xer().get(); } - static INLINE void set_xer(uint32 value) { CPU->xer().set(value); } - static INLINE uint32 get_vrsave() { return CPU->vrsave(); } - static INLINE void set_vrsave(uint32 value) { CPU->vrsave() = value; } - static INLINE uint32 get_vscr() { return CPU->vscr().get(); } - static INLINE void set_vscr(uint32 value) { CPU->vscr().set(value); } - static INLINE void record(int crf, int32 v) { CPU->record_cr(crf, v); } - static INLINE powerpc_cr_register & cr() { return CPU->cr(); } - static INLINE powerpc_xer_register & xer() { return CPU->xer(); } - static INLINE powerpc_spcflags & spcflags() { return CPU->spcflags(); } - static INLINE void set_cr(int crfd, int v) { CPU->cr().set(crfd, v); } - static INLINE powerpc_registers *regs() { return &CPU->regs(); } - -#ifndef REG_T3 - static INLINE uintptr & reg_T3() { return CPU->codegen.reg_T3; } -#endif -//#ifndef REG_F3 - static INLINE powerpc_fpr & reg_F3() { return CPU->codegen.reg_F3; } -//#endif - - static INLINE powerpc_block_info *find_block(uint32 pc) { return CPU->my_block_cache.fast_find(pc); } -}; - -// Semantic action templates -#define DYNGEN_OPS -#include "ppc-execute.hpp" - - -/** - * Load/store general purpose registers - **/ - -#define DEFINE_OP(REG, N) \ -void OPPROTO op_load_##REG##_GPR##N(void) \ -{ \ - REG = CPU->gpr(N); \ -} \ -void OPPROTO op_store_##REG##_GPR##N(void) \ -{ \ - CPU->gpr(N) = REG; \ -} -#define DEFINE_REG(N) \ -DEFINE_OP(T0,N); \ -DEFINE_OP(T1,N); \ -DEFINE_OP(T2,N); - -DEFINE_REG(0); -DEFINE_REG(1); -DEFINE_REG(2); -DEFINE_REG(3); -DEFINE_REG(4); -DEFINE_REG(5); -DEFINE_REG(6); -DEFINE_REG(7); -DEFINE_REG(8); -DEFINE_REG(9); -DEFINE_REG(10); -DEFINE_REG(11); -DEFINE_REG(12); -DEFINE_REG(13); -DEFINE_REG(14); -DEFINE_REG(15); -DEFINE_REG(16); -DEFINE_REG(17); -DEFINE_REG(18); -DEFINE_REG(19); -DEFINE_REG(20); -DEFINE_REG(21); -DEFINE_REG(22); -DEFINE_REG(23); -DEFINE_REG(24); -DEFINE_REG(25); -DEFINE_REG(26); -DEFINE_REG(27); -DEFINE_REG(28); -DEFINE_REG(29); -DEFINE_REG(30); -DEFINE_REG(31); - -#undef DEFINE_REG -#undef DEFINE_OP - - -/** - * Load/store floating-point registers - **/ - -#define DEFINE_OP(REG, N) \ -void OPPROTO op_load_F##REG##_FPR##N(void) \ -{ \ - A##REG = (uintptr)&CPU->fpr(N); \ -} \ -void OPPROTO op_store_F##REG##_FPR##N(void) \ -{ \ - CPU->fpr_dw(N) = F##REG##_dw; \ -} -#define DEFINE_REG(N) \ -DEFINE_OP(0,N); \ -DEFINE_OP(1,N); \ -DEFINE_OP(2,N); \ -void OPPROTO op_store_FD_FPR##N(void) \ -{ \ - CPU->fpr_dw(N) = FD_dw; \ -} - -DEFINE_REG(0); -DEFINE_REG(1); -DEFINE_REG(2); -DEFINE_REG(3); -DEFINE_REG(4); -DEFINE_REG(5); -DEFINE_REG(6); -DEFINE_REG(7); -DEFINE_REG(8); -DEFINE_REG(9); -DEFINE_REG(10); -DEFINE_REG(11); -DEFINE_REG(12); -DEFINE_REG(13); -DEFINE_REG(14); -DEFINE_REG(15); -DEFINE_REG(16); -DEFINE_REG(17); -DEFINE_REG(18); -DEFINE_REG(19); -DEFINE_REG(20); -DEFINE_REG(21); -DEFINE_REG(22); -DEFINE_REG(23); -DEFINE_REG(24); -DEFINE_REG(25); -DEFINE_REG(26); -DEFINE_REG(27); -DEFINE_REG(28); -DEFINE_REG(29); -DEFINE_REG(30); -DEFINE_REG(31); - -#undef DEFINE_REG -#undef DEFINE_OP - - -/** - * Load/Store floating-point data - **/ - -#if defined(__i386__) -#define do_load_double(REG, EA) do { \ - uint32 *w = (uint32 *)® \ - w[1] = vm_read_memory_4(EA + 0); \ - w[0] = vm_read_memory_4(EA + 4); \ -} while (0) -#define do_store_double(REG, EA) do { \ - uint32 *w = (uint32 *)® \ - vm_write_memory_4(EA + 0, w[1]); \ - vm_write_memory_4(EA + 4, w[0]); \ -} while (0) -#endif - -#ifndef do_load_single -#define do_load_single(REG, EA) REG##_dw = fp_load_single_convert(vm_read_memory_4(EA)) -#endif - -#ifndef do_store_single -#define do_store_single(REG, EA) vm_write_memory_4(EA, fp_store_single_convert(REG##_dw)) -#endif - -#ifndef do_load_double -#define do_load_double(REG, EA) REG##_dw = vm_read_memory_8(EA) -#endif - -#ifndef do_store_double -#define do_store_double(REG, EA) vm_write_memory_8(EA, REG##_dw) -#endif - -#define im PARAM1 -#define DEFINE_OP(OFFSET) \ -void OPPROTO op_load_double_FD_T1_##OFFSET(void) \ -{ \ - do_load_double(FD, T1 + OFFSET); \ -} \ -void OPPROTO op_load_single_FD_T1_##OFFSET(void) \ -{ \ - do_load_single(FD, T1 + OFFSET); \ -} \ -void OPPROTO op_store_double_F0_T1_##OFFSET(void) \ -{ \ - do_store_double(F0, T1 + OFFSET); \ -} \ -void OPPROTO op_store_single_F0_T1_##OFFSET(void) \ -{ \ - do_store_single(F0, T1 + OFFSET); \ -} - -DEFINE_OP(0); -DEFINE_OP(im); -DEFINE_OP(T2); - -#undef im -#undef DEFINE_OP - -#if KPX_MAX_CPUS == 1 -void OPPROTO op_lwarx_T0_T1(void) -{ - T0 = vm_read_memory_4(T1); - powerpc_dyngen_helper::regs()->reserve_valid = 1; - powerpc_dyngen_helper::regs()->reserve_addr = T1; -} - -void OPPROTO op_stwcx_T0_T1(void) -{ - uint32 cr = powerpc_dyngen_helper::get_cr() & ~CR_field<0>::mask(); - cr |= powerpc_dyngen_helper::xer().get_so() << 28; - if (powerpc_dyngen_helper::regs()->reserve_valid) { - powerpc_dyngen_helper::regs()->reserve_valid = 0; - if (powerpc_dyngen_helper::regs()->reserve_addr == T1 /* physical_addr(EA) */) { - vm_write_memory_4(T1, T0); - cr |= CR_EQ_field<0>::mask(); - } - } - powerpc_dyngen_helper::set_cr(cr); - dyngen_barrier(); -} -#endif - - -/** - * Condition Registers - **/ - -void OPPROTO op_load_T0_CR(void) -{ - T0 = powerpc_dyngen_helper::get_cr(); -} - -void OPPROTO op_store_T0_CR(void) -{ - powerpc_dyngen_helper::set_cr(T0); -} - -#define DEFINE_OP(REG, N) \ -void OPPROTO op_load_##REG##_crb##N(void) \ -{ \ - const uint32 cr = powerpc_dyngen_helper::get_cr(); \ - REG = (cr >> (31 - N)) & 1; \ -} \ -void OPPROTO op_store_##REG##_crb##N(void) \ -{ \ - uint32 cr = powerpc_dyngen_helper::get_cr() & ~(1 << (31 - N)); \ - cr |= ((REG & 1) << (31 - N)); \ - powerpc_dyngen_helper::set_cr(cr); \ -} -#define DEFINE_REG(N) \ -DEFINE_OP(T0, N); \ -DEFINE_OP(T1, N); - -DEFINE_REG(0); -DEFINE_REG(1); -DEFINE_REG(2); -DEFINE_REG(3); -DEFINE_REG(4); -DEFINE_REG(5); -DEFINE_REG(6); -DEFINE_REG(7); -DEFINE_REG(8); -DEFINE_REG(9); -DEFINE_REG(10); -DEFINE_REG(11); -DEFINE_REG(12); -DEFINE_REG(13); -DEFINE_REG(14); -DEFINE_REG(15); -DEFINE_REG(16); -DEFINE_REG(17); -DEFINE_REG(18); -DEFINE_REG(19); -DEFINE_REG(20); -DEFINE_REG(21); -DEFINE_REG(22); -DEFINE_REG(23); -DEFINE_REG(24); -DEFINE_REG(25); -DEFINE_REG(26); -DEFINE_REG(27); -DEFINE_REG(28); -DEFINE_REG(29); -DEFINE_REG(30); -DEFINE_REG(31); - -#undef DEFINE_REG -#undef DEFINE_OP - -#define DEFINE_OP(CRF, REG) \ -void OPPROTO op_load_##REG##_cr##CRF(void) \ -{ \ - REG = powerpc_dyngen_helper::cr().get(CRF); \ -} \ -void OPPROTO op_store_##REG##_cr##CRF(void) \ -{ \ - powerpc_dyngen_helper::cr().set(CRF, REG); \ -} - -DEFINE_OP(0, T0); -DEFINE_OP(1, T0); -DEFINE_OP(2, T0); -DEFINE_OP(3, T0); -DEFINE_OP(4, T0); -DEFINE_OP(5, T0); -DEFINE_OP(6, T0); -DEFINE_OP(7, T0); - -#undef DEFINE_OP - -void OPPROTO op_mtcrf_T0_im(void) -{ - const uint32 mask = PARAM1; - const uint32 cr = powerpc_dyngen_helper::get_cr(); - powerpc_dyngen_helper::set_cr((cr & ~mask) | (T0 & mask)); -} - - -/** - * Native FP operations optimization - **/ - -#if defined(__i386__) -#define do_fabs(x) ({ double y; asm volatile ("fabs" : "=t" (y) : "0" (x)); y; }) -#define do_fneg(x) ({ double y; asm volatile ("fchs" : "=t" (y) : "0" (x)); y; }) -#endif - -#ifndef do_fabs -#define do_fabs(x) fabs(x) -#endif -#ifndef do_fadd -#define do_fadd(x, y) (x) + (y) -#endif -#ifndef do_fdiv -#define do_fdiv(x, y) (x) / (y) -#endif -#ifndef do_fmadd -#define do_fmadd(x, y, z) (((x) * (y)) + (z)) -#endif -#ifndef do_fmsub -#define do_fmsub(x, y, z) (((x) * (y)) - (z)) -#endif -#ifndef do_fmul -#define do_fmul(x, y) ((x) * (y)) -#endif -#ifndef do_fneg -#define do_fneg(x) -(x) -#endif -#ifndef do_fnabs -#define do_fnabs(x) do_fneg(do_fabs(x)) -#endif -#ifndef do_fnmadd -#define do_fnmadd(x, y, z) do_fneg(((x) * (y)) + (z)) -#endif -#ifndef do_fnmsub -#define do_fnmsub(x, y, z) do_fneg(((x) * (y)) - (z)) -#endif -#ifndef do_fsub -#define do_fsub(x, y) (x) - (y) -#endif - - -/** - * Double-precision floating point operations - **/ - -#define DEFINE_OP(NAME, CODE) \ -void OPPROTO op_##NAME(void) \ -{ \ - CODE; \ -} - -DEFINE_OP(fmov_F0_F1, F0_dw = F1_dw); -DEFINE_OP(fmov_F0_F2, F0_dw = F2_dw); -DEFINE_OP(fmov_F1_F0, F1_dw = F0_dw); -DEFINE_OP(fmov_F1_F2, F1_dw = F2_dw); -DEFINE_OP(fmov_F2_F0, F2_dw = F0_dw); -DEFINE_OP(fmov_F2_F1, F2_dw = F1_dw); -DEFINE_OP(fmov_FD_F0, FD_dw = F0_dw); -DEFINE_OP(fmov_FD_F1, FD_dw = F1_dw); -DEFINE_OP(fmov_FD_F2, FD_dw = F2_dw); - -DEFINE_OP(fabs_FD_F0, FD = do_fabs(F0)); -DEFINE_OP(fneg_FD_F0, FD = do_fneg(F0)); -DEFINE_OP(fnabs_FD_F0, FD = do_fnabs(F0)); - -DEFINE_OP(fadd_FD_F0_F1, FD = do_fadd(F0, F1)); -DEFINE_OP(fsub_FD_F0_F1, FD = do_fsub(F0, F1)); -DEFINE_OP(fmul_FD_F0_F1, FD = do_fmul(F0, F1)); -DEFINE_OP(fdiv_FD_F0_F1, FD = do_fdiv(F0, F1)); -DEFINE_OP(fmadd_FD_F0_F1_F2, FD = do_fmadd(F0, F1, F2)); -DEFINE_OP(fmsub_FD_F0_F1_F2, FD = do_fmsub(F0, F1, F2)); -DEFINE_OP(fnmadd_FD_F0_F1_F2, FD = do_fnmadd(F0, F1, F2)); -DEFINE_OP(fnmsub_FD_F0_F1_F2, FD = do_fnmsub(F0, F1, F2)); - -#undef DEFINE_OP - - -/** - * Single-Precision floating point operations - **/ - -#define DEFINE_OP(NAME, REG, OP) \ -void OPPROTO op_##NAME(void) \ -{ \ - float x = OP; \ - REG = x; \ -} - -DEFINE_OP(fadds_FD_F0_F1, FD, do_fadd(F0, F1)); -DEFINE_OP(fsubs_FD_F0_F1, FD, do_fsub(F0, F1)); -DEFINE_OP(fmuls_FD_F0_F1, FD, do_fmul(F0, F1)); -DEFINE_OP(fdivs_FD_F0_F1, FD, do_fdiv(F0, F1)); -DEFINE_OP(fmadds_FD_F0_F1_F2, FD, do_fmadd(F0, F1, F2)); -DEFINE_OP(fmsubs_FD_F0_F1_F2, FD, do_fmsub(F0, F1, F2)); -DEFINE_OP(fnmadds_FD_F0_F1_F2, FD, do_fnmadd(F0, F1, F2)); -DEFINE_OP(fnmsubs_FD_F0_F1_F2, FD, do_fnmsub(F0, F1, F2)); - -#undef DEFINE_OP - - -/** - * Special purpose registers - **/ - -void OPPROTO op_load_T0_VRSAVE(void) -{ - T0 = powerpc_dyngen_helper::get_vrsave(); -} - -void OPPROTO op_store_T0_VRSAVE(void) -{ - powerpc_dyngen_helper::set_vrsave(T0); -} - -void OPPROTO op_load_T0_XER(void) -{ - T0 = powerpc_dyngen_helper::get_xer(); -} - -void OPPROTO op_store_T0_XER(void) -{ - powerpc_dyngen_helper::set_xer(T0); -} - -void OPPROTO op_load_T0_PC(void) -{ - T0 = powerpc_dyngen_helper::get_pc(); -} - -void OPPROTO op_store_T0_PC(void) -{ - powerpc_dyngen_helper::set_pc(T0); -} - -void OPPROTO op_set_PC_im(void) -{ - powerpc_dyngen_helper::set_pc(PARAM1); -} - -void OPPROTO op_set_PC_T0(void) -{ - powerpc_dyngen_helper::set_pc(T0); -} - -void OPPROTO op_inc_PC(void) -{ - powerpc_dyngen_helper::inc_pc(PARAM1); -} - -void OPPROTO op_load_T0_LR(void) -{ - T0 = powerpc_dyngen_helper::get_lr(); -} - -void OPPROTO op_store_T0_LR(void) -{ - powerpc_dyngen_helper::set_lr(T0); -} - -void OPPROTO op_load_T0_CTR(void) -{ - T0 = powerpc_dyngen_helper::get_ctr(); -} - -void OPPROTO op_store_T0_CTR(void) -{ - powerpc_dyngen_helper::set_ctr(T0); -} - -void OPPROTO op_store_im_LR(void) -{ - powerpc_dyngen_helper::set_lr(PARAM1); -} - -void OPPROTO op_load_T0_CTR_aligned(void) -{ - T0 = powerpc_dyngen_helper::get_ctr() & -4; -} - -void OPPROTO op_load_T0_LR_aligned(void) -{ - T0 = powerpc_dyngen_helper::get_lr() & -4; -} - -void OPPROTO op_spcflags_init(void) -{ - powerpc_dyngen_helper::spcflags().set(PARAM1); -} - -void OPPROTO op_spcflags_set(void) -{ - powerpc_dyngen_helper::spcflags().set(PARAM1); -} - -void OPPROTO op_spcflags_clear(void) -{ - powerpc_dyngen_helper::spcflags().clear(PARAM1); -} - -#if defined(__x86_64__) -#define FAST_COMPARE_SPECFLAGS_DISPATCH(SPCFLAGS, TARGET) \ - asm volatile ("test %0,%0 ; jz " #TARGET : : "r" (SPCFLAGS)) -#endif -#ifndef FAST_COMPARE_SPECFLAGS_DISPATCH -#define FAST_COMPARE_SPECFLAGS_DISPATCH(SPCFLAGS, TARGET) \ - if (SPCFLAGS == 0) DYNGEN_FAST_DISPATCH(TARGET) -#endif - -void OPPROTO op_spcflags_check(void) -{ - FAST_COMPARE_SPECFLAGS_DISPATCH(powerpc_dyngen_helper::spcflags().get(), __op_jmp0); -} - - -/** - * Branch instructions - **/ - -template< int bo > -static INLINE void do_prep_branch_bo(void) -{ - bool ctr_ok = true; - bool cond_ok = true; - - if (BO_CONDITIONAL_BRANCH(bo)) { - if (BO_BRANCH_IF_TRUE(bo)) - cond_ok = T1; - else - cond_ok = !T1; - } - - if (BO_DECREMENT_CTR(bo)) { - T2 = powerpc_dyngen_helper::get_ctr() - 1; - powerpc_dyngen_helper::set_ctr(T2); - if (BO_BRANCH_IF_CTR_ZERO(bo)) - ctr_ok = !T2; - else - ctr_ok = T2; - } - - T1 = ctr_ok && cond_ok; - dyngen_barrier(); -} - -#define BO(A,B,C,D) (((A) << 4)| ((B) << 3) | ((C) << 2) | ((D) << 1)) -#define DEFINE_OP(BO_SUFFIX, BO_VALUE) \ -void OPPROTO op_prep_branch_bo_##BO_SUFFIX(void) \ -{ \ - do_prep_branch_bo(); \ -} - -DEFINE_OP(0000,(0,0,0,0)); -DEFINE_OP(0001,(0,0,0,1)); -DEFINE_OP(001x,(0,0,1,0)); -DEFINE_OP(0100,(0,1,0,0)); -DEFINE_OP(0101,(0,1,0,1)); -DEFINE_OP(011x,(0,1,1,0)); -DEFINE_OP(1x00,(1,0,0,0)); -DEFINE_OP(1x01,(1,0,0,1)); -// NOTE: the compiler is expected to optimize out the use of PARAM1 -DEFINE_OP(1x1x,(1,0,1,0)); - -#undef DEFINE_OP -#undef BO - -void OPPROTO op_branch_chain_1(void) -{ - DYNGEN_FAST_DISPATCH(__op_jmp0); -} - -void OPPROTO op_branch_chain_2(void) -{ - if (T1) - DYNGEN_FAST_DISPATCH(__op_jmp0); - else - DYNGEN_FAST_DISPATCH(__op_jmp1); - dyngen_barrier(); -} - -static INLINE void do_execute_branch_1(uint32 tpc) -{ - powerpc_dyngen_helper::set_pc(tpc); -} - -void OPPROTO op_branch_1_T0(void) -{ - do_execute_branch_1(T0); -} - -void OPPROTO op_branch_1_im(void) -{ - do_execute_branch_1(PARAM1); -} - -static INLINE void do_execute_branch_2(uint32 tpc, uint32 npc) -{ - powerpc_dyngen_helper::set_pc(T1 ? tpc : npc); - dyngen_barrier(); -} - -void OPPROTO op_branch_2_T0_im(void) -{ - do_execute_branch_2(T0, PARAM1); -} - -void OPPROTO op_branch_2_im_im(void) -{ - do_execute_branch_2(PARAM1, PARAM2); -} - - -/** - * Compare & Record instructions - **/ - -void OPPROTO op_record_cr0_T0(void) -{ - uint32 cr = powerpc_dyngen_helper::get_cr() & ~CR_field<0>::mask(); - cr |= powerpc_dyngen_helper::xer().get_so() << 28; - if ((int32)T0 < 0) - cr |= CR_LT_field<0>::mask(); - else if ((int32)T0 > 0) - cr |= CR_GT_field<0>::mask(); - else - cr |= CR_EQ_field<0>::mask(); - powerpc_dyngen_helper::set_cr(cr); - dyngen_barrier(); -} - -void OPPROTO op_record_cr1(void) -{ - powerpc_dyngen_helper::set_cr((powerpc_dyngen_helper::get_cr() & ~CR_field<1>::mask()) | - ((powerpc_dyngen_helper::get_fpscr() >> 4) & 0x0f000000)); -} - -#define im PARAM1 - -#if DYNGEN_ASM_OPTS && defined(__powerpc__) && 0 - -#define DEFINE_OP(NAME, COMP, LHS, RHST, RHS) \ -void OPPROTO op_##NAME##_##LHS##_##RHS(void) \ -{ \ - T0 = powerpc_dyngen_helper::xer().get_so(); \ - uint32 v; \ - asm volatile (COMP " 7,%1,%2 ; mfcr %0" : "=r" (v) : "r" (LHS), RHST (RHS) : "cr7"); \ - T0 |= (v & 0xe); \ -} - -DEFINE_OP(compare,"cmpw",T0,"r",T1); -DEFINE_OP(compare,"cmpw",T0,"r",im); -DEFINE_OP(compare,"cmpwi",T0,"i",0); -DEFINE_OP(compare_logical,"cmplw",T0,"r",T1); -DEFINE_OP(compare_logical,"cmplw",T0,"r",im); -DEFINE_OP(compare_logical,"cmplwi",T0,"i",0); - -#else - -#define DEFINE_OP(NAME, TYPE, LHS, RHS) \ -void OPPROTO op_##NAME##_##LHS##_##RHS(void) \ -{ \ - const uint32 SO = powerpc_dyngen_helper::xer().get_so(); \ - if ((TYPE)LHS < (TYPE)RHS) \ - T0 = SO | standalone_CR_LT_field::mask(); \ - else if ((TYPE)LHS > (TYPE)RHS) \ - T0 = SO | standalone_CR_GT_field::mask(); \ - else \ - T0 = SO | standalone_CR_EQ_field::mask(); \ - dyngen_barrier(); \ -} - -DEFINE_OP(compare,int32,T0,T1); -DEFINE_OP(compare,int32,T0,im); -DEFINE_OP(compare,int32,T0,0); -DEFINE_OP(compare_logical,uint32,T0,T1); -DEFINE_OP(compare_logical,uint32,T0,im); -DEFINE_OP(compare_logical,uint32,T0,0); - -#endif - -#undef im -#undef DEFINE_OP - - -/** - * Divide instructions - **/ - -#if DYNGEN_ASM_OPTS && defined(__powerpc__) -#define get_ov() ({ uint32 xer; asm volatile ("mfxer %0" : "=r" (xer)); XER_OV_field::extract(xer); }) -#endif - -void OPPROTO op_divw_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - asm volatile ("divw %0,%0,%1" : "=r" (T0) : "r" (T1)); - return; -#endif -#endif - T0 = do_execute_divide(T0, T1); -} - -void OPPROTO op_divwo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - asm volatile ("divwo %0,%0,%1" : "=r" (T0) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ov(get_ov()); - return; -#endif -#endif - T0 = do_execute_divide(T0, T1); -} - -void OPPROTO op_divwu_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - asm volatile ("divwu %0,%0,%1" : "=r" (T0) : "r" (T1)); - return; -#endif -#endif - T0 = do_execute_divide(T0, T1); -} - -void OPPROTO op_divwuo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - asm volatile ("divwuo %0,%0,%1" : "=r" (T0) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ov(get_ov()); - return; -#endif -#endif - T0 = do_execute_divide(T0, T1); -} - - -/** - * Multiply instructions - **/ - -void OPPROTO op_mulhw_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - asm volatile ("imul %0" : "+d" (T0) : "a" (T1)); - return; -#endif -#endif - T0 = (((int64)(int32)T0) * ((int64)(int32)T1)) >> 32; -} - -void OPPROTO op_mulhwu_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - asm volatile ("mul %0" : "+d" (T0) : "a" (T1)); - return; -#endif -#endif - T0 = (((uint64)T0) * ((uint64)T1)) >> 32; -} - -void OPPROTO op_mulli_T0_im(void) -{ - T0 = (int32)T0 * (int32)PARAM1; -} - -void OPPROTO op_mullwo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - asm volatile ("mullwo %0,%0,%1" : "=r" (T0) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ov(get_ov()); - return; -#endif -#endif - int64 RD = (int64)(int32)T0 * (int64)(int32)T1; - powerpc_dyngen_helper::xer().set_ov((int32)RD != RD); - T0 = RD; - dyngen_barrier(); -} - - -/** - * Shift/Rotate instructions - **/ - -void OPPROTO op_slw_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - T0 <<= T1; // the shift count is masked to 5 bits - if (T1 & 0x20) - T0 = 0; - return; -#endif -#endif - T1 &= 0x3f; - T0 = (T1 & 0x20) ? 0 : (T0 << T1); - dyngen_barrier(); -} - -void OPPROTO op_srw_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - T0 >>= T1; // the shift count is masked to 5 bits - if (T1 & 0x20) - T0 = 0; - return; -#endif -#endif - T1 &= 0x3f; - T0 = (T1 & 0x20) ? 0 : (T0 >> T1); - dyngen_barrier(); -} - -void OPPROTO op_sraw_T0_T1(void) -{ - T1 &= 0x3f; - if (T1 & 0x20) { - const uint32 SB = T0 >> 31; - powerpc_dyngen_helper::xer().set_ca(SB); - T0 = -SB; - } - else { - const uint32 RD = ((int32)T0) >> T1; - const bool CA = (int32)T0 < 0 && (T0 & ~(0xffffffff << T1)); - powerpc_dyngen_helper::xer().set_ca(CA); - T0 = RD; - } - dyngen_barrier(); -} - -void OPPROTO op_sraw_T0_im(void) -{ - const uint32 n = PARAM1; - const uint32 RD = ((int32)T0) >> n; - const bool ca = (((int32)T0) < 0) && (T0 & ~(0xffffffff << n)); - powerpc_dyngen_helper::xer().set_ca(ca); - T0 = RD; - dyngen_barrier(); -} - -void OPPROTO op_rlwimi_T0_T1(void) -{ - T0 = op_ppc_rlwimi::apply(T1, PARAM1, PARAM2, T0); -} - -void OPPROTO op_rlwinm_T0_T1(void) -{ - T0 = op_rotl::apply(T0, PARAM1) & PARAM2; -} - -void OPPROTO op_rlwnm_T0_T1(void) -{ - T0 = op_rotl::apply(T0, T1) & PARAM1; -} - -void OPPROTO op_cntlzw_32_T0(void) -{ - int n; -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - n = -1; - asm volatile ("bsr %1,%0" : "+r" (n) : "r" (T0)); - T0 = 31 - n; - return; -#endif -#endif - uint32 m = 0x80000000; - for (n = 0; n < 32; n++, m >>= 1) - if (T0 & m) - break; - T0 = n; - dyngen_barrier(); -} - - -/** - * Addition/Subtraction - **/ - -void OPPROTO op_addo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer; - asm volatile ("addo %0,%0,%2 ; mfxer %1" : "=r" (T0), "=r" (xer) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ov(XER_OV_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ov; - asm volatile ("add %2,%0; seto %b1" : "=r" (T0), "=r" (ov) : "r" (T1) : "cc"); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_addition(T0, T1); -} - -void OPPROTO op_addc_T0_im(void) -{ - T0 = do_execute_addition(T0, PARAM1); -} - -void OPPROTO op_addc_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer; - asm volatile ("addc %0,%0,%2 ; mfxer %1" : "=r" (T0), "=r" (xer) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ca; - asm volatile ("add %2,%0; setc %b1" : "=r" (T0), "=r" (ca) : "r" (T1) : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_addition(T0, T1); -} - -void OPPROTO op_addco_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer; - asm volatile ("addco %0,%0,%2 ; mfxer %1" : "=r" (T0), "=r" (xer) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - powerpc_dyngen_helper::xer().set_ov(XER_OV_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ca, ov; - asm volatile ("add %3,%0; setc %b1; seto %b2" : "=r" (T0), "=r" (ca), "=r" (ov) : "r" (T1) : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_addition(T0, T1); -} - -void OPPROTO op_adde_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("adde %0,%0,%2 ; mfxer %1" : "=r" (T0), "=r" (xer) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc %2,%0; setc %b1" : "=r" (T0), "+r" (ca) : "r" (T1) : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_addition(T0, T1); -} - -void OPPROTO op_addeo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("addeo %0,%0,%2 ; mfxer %1" : "=r" (T0), "=r" (xer) : "r" (T1)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - powerpc_dyngen_helper::xer().set_ov(XER_OV_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ov, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc %3,%0; setc %b1; seto %b2" : "=r" (T0), "+r" (ca), "=r" (ov) : "r" (T1) : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_addition(T0, T1); -} - -void OPPROTO op_addme_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("addme %0,%0 ; mfxer %1" : "=r" (T0), "=r" (xer)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc $-1,%0; setc %b1" : "=r" (T0), "+r" (ca) : : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_addition(T0, 0xffffffff); -} - -void OPPROTO op_addmeo_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("addmeo %0,%0 ; mfxer %1" : "=r" (T0), "=r" (xer)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - powerpc_dyngen_helper::xer().set_ov(XER_OV_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ov, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc $-1,%0; setc %b1; seto %b2" : "=r" (T0), "+r" (ca), "=r" (ov) : : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_addition(T0, 0xffffffff); -} - -void OPPROTO op_addze_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("addze %0,%0 ; mfxer %1" : "=r" (T0), "=r" (xer)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc $0,%0; setc %b1" : "=r" (T0), "+r" (ca) : : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_addition(T0, 0); -} - -void OPPROTO op_addzeo_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__powerpc__) - uint32 xer, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("li 0,-1 ; addc 0,%0,0" : : "r" (ca) : "r0"); - asm volatile ("addzeo %0,%0 ; mfxer %1" : "=r" (T0), "=r" (xer)); - powerpc_dyngen_helper::xer().set_ca(XER_CA_field::extract(xer)); - powerpc_dyngen_helper::xer().set_ov(XER_OV_field::extract(xer)); - return; -#endif -#if defined(__i386__) || defined(__x86_64__) - uint32 ov, ca = powerpc_dyngen_helper::xer().get_ca(); - asm volatile ("bt $0,%1; adc $0,%0; setc %b1; seto %b2" : "=r" (T0), "+r" (ca), "=r" (ov) : : "cc"); - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_addition(T0, 0); -} - -void OPPROTO op_subf_T0_T1(void) -{ - T0 = T1 - T0; -} - -void OPPROTO op_subfo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ov, TI; - TI = T1; - asm volatile ("sub %2,%0; seto %b1" : "+r" (TI), "=r" (ov) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_subtract(T0, T1); -} - -void OPPROTO op_subfc_T0_im(void) -{ - T0 = do_execute_subtract(T0, PARAM1); -} - -void OPPROTO op_subfc_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ca, TI; - TI = T1; - asm volatile ("sub %2,%0; cmc; setc %b1" : "+r" (TI), "=r" (ca) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_subtract(T0, T1); -} - -void OPPROTO op_subfco_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ca, ov, TI; - TI = T1; - asm volatile ("sub %3,%0; cmc; setc %b1; seto %b2" : "+r" (TI), "=r" (ca), "=r" (ov) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_subtract(T0, T1); -} - -void OPPROTO op_subfe_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = T1; - asm volatile ("bt $0,%1; cmc; sbb %2,%0; cmc; setc %b1" : "+r" (TI), "+r" (ca) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, T1); -} - -void OPPROTO op_subfeo_T0_T1(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ov, ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = T1; - asm volatile ("bt $0,%1; cmc; sbb %3,%0; cmc; setc %b1; seto %b2" : "+r" (TI), "+r" (ca), "=r" (ov) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, T1); -} - -void OPPROTO op_subfme_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = (uint32)-1; - asm volatile ("bt $0,%1; cmc; sbb %2,%0; cmc; setc %b1" : "+r" (TI), "+r" (ca) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, 0xffffffff); -} - -void OPPROTO op_subfmeo_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ov; - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = (uint32)-1; - asm volatile ("bt $0,%1; cmc; sbb %3,%0; cmc; setc %b1; seto %b2" : "+r" (TI), "+r" (ca), "=r" (ov) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, 0xffffffff); -} - -void OPPROTO op_subfze_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = 0; - asm volatile ("bt $0,%1; cmc; sbb %2,%0; cmc; setc %b1" : "+r" (TI), "+r" (ca) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, 0); -} - -void OPPROTO op_subfzeo_T0(void) -{ -#if DYNGEN_ASM_OPTS -#if defined(__i386__) || defined(__x86_64__) - uint32 ov; - uint32 ca = powerpc_dyngen_helper::xer().get_ca(); - uint32 TI = 0; - asm volatile ("bt $0,%1; cmc; sbb %3,%0; cmc; setc %b1; seto %b2" : "+r" (TI), "+r" (ca), "=r" (ov) : "r" (T0) : "cc"); - T0 = TI; - powerpc_dyngen_helper::xer().set_ca(ca); - powerpc_dyngen_helper::xer().set_ov(ov); - return; -#endif -#endif - T0 = do_execute_subtract_extended(T0, 0); -} - -/** - * Misc synthetic instructions - **/ - -void OPPROTO op_inc_32_mem(void) -{ - uint32 *m = (uint32 *)PARAM1; - *m += 1; -} - -void OPPROTO op_nego_T0(void) -{ - powerpc_dyngen_helper::xer().set_ov(T0 == 0x80000000); - T0 = -T0; -} - -void OPPROTO op_dcbz_T0(void) -{ - T0 &= -32; // align T0 on cache line boundaries - uint64 * block = (uint64 *) vm_do_get_real_address(T0); - block[0] = 0; block[1] = 0; block[2] = 0; block[3] = 0; -} - -/** - * Generate possible call to next basic block without going - * through register state restore & full cache lookup - **/ - -void OPPROTO op_jump_next_A0(void) -{ - powerpc_block_info *bi = (powerpc_block_info *)A0; - uint32 pc = powerpc_dyngen_helper::get_pc(); - if (likely(bi->pc == pc) || likely((bi = powerpc_dyngen_helper::find_block(pc)) != NULL)) - goto *(bi->entry_point); - dyngen_barrier(); -} - -/** - * Load/store multiple - **/ - -template< int N > -static INLINE void do_lmw(void) -{ - CPU->gpr(N) = vm_read_memory_4(T0); - T0 += 4; - do_lmw(); -} - -template<> -INLINE void do_lmw<31>(void) -{ - CPU->gpr(31) = vm_read_memory_4(T0); -} - -template<> -INLINE void do_lmw<32>(void) -{ - for (uint32 r = PARAM1, ad = T0; r <= 31; r++, ad += 4) - CPU->gpr(r) = vm_read_memory_4(ad); - dyngen_barrier(); -} - -template< int N > -static INLINE void do_stmw(void) -{ - vm_write_memory_4(T0, CPU->gpr(N)); - T0 += 4; - do_stmw(); -} - -template<> -INLINE void do_stmw<31>(void) -{ - vm_write_memory_4(T0, CPU->gpr(31)); -} - -template<> -INLINE void do_stmw<32>(void) -{ - for (uint32 r = PARAM1, ad = T0; r <= 31; r++, ad += 4) - vm_write_memory_4(ad, CPU->gpr(r)); - dyngen_barrier(); -} - -#define im 32 -#define DEFINE_OP(N) \ -void op_lmw_T0_## N(void) { do_lmw (); } \ -void op_stmw_T0_##N(void) { do_stmw(); } - -DEFINE_OP(im); -DEFINE_OP(26); -DEFINE_OP(27); -DEFINE_OP(28); -DEFINE_OP(29); -DEFINE_OP(30); -DEFINE_OP(31); - -#undef im -#undef DEFINE_OP - -/** - * Load/store addresses to vector registers - **/ - -#define DEFINE_OP(REG, N) \ -void OPPROTO op_load_ad_V##REG##_VR##N(void) \ -{ \ - reg_V##REG = (uintptr)&CPU->vr(N); \ -} -#define DEFINE_REG(N) \ -DEFINE_OP(D,N); \ -DEFINE_OP(0,N); \ -DEFINE_OP(1,N); \ -DEFINE_OP(2,N) - -DEFINE_REG(0); -DEFINE_REG(1); -DEFINE_REG(2); -DEFINE_REG(3); -DEFINE_REG(4); -DEFINE_REG(5); -DEFINE_REG(6); -DEFINE_REG(7); -DEFINE_REG(8); -DEFINE_REG(9); -DEFINE_REG(10); -DEFINE_REG(11); -DEFINE_REG(12); -DEFINE_REG(13); -DEFINE_REG(14); -DEFINE_REG(15); -DEFINE_REG(16); -DEFINE_REG(17); -DEFINE_REG(18); -DEFINE_REG(19); -DEFINE_REG(20); -DEFINE_REG(21); -DEFINE_REG(22); -DEFINE_REG(23); -DEFINE_REG(24); -DEFINE_REG(25); -DEFINE_REG(26); -DEFINE_REG(27); -DEFINE_REG(28); -DEFINE_REG(29); -DEFINE_REG(30); -DEFINE_REG(31); - -#undef DEFINE_REG -#undef DEFINE_OP -#undef AD - -void op_load_word_VD_T0(void) -{ - const uint32 ea = T0; - VD.w[(ea >> 2) & 3] = vm_read_memory_4(ea & ~3); -} - -void op_store_word_VD_T0(void) -{ - const uint32 ea = T0; - vm_write_memory_4(ea & ~3, VD.w[(ea >> 2) & 3]); -} - -void op_load_vect_VD_T0(void) -{ - const uint32 ea = T0 & ~15; - VD.w[0] = vm_read_memory_4(ea + 0); - VD.w[1] = vm_read_memory_4(ea + 4); - VD.w[2] = vm_read_memory_4(ea + 8); - VD.w[3] = vm_read_memory_4(ea + 12); -} - -void op_store_vect_VD_T0(void) -{ - const uint32 ea = T0 & ~15; - vm_write_memory_4(ea + 0, VD.w[0]); - vm_write_memory_4(ea + 4, VD.w[1]); - vm_write_memory_4(ea + 8, VD.w[2]); - vm_write_memory_4(ea + 12, VD.w[3]); -} - -/** - * Vector operations helpers - **/ - -#define VNONE op_VNONE -struct op_VNONE { - typedef null_operand type; - static INLINE uint32 get(powerpc_vr const & v, int i) { return 0; } - static INLINE void set(powerpc_vr const & v, int i, uint32) { } -}; - -#define V16QI op_V16QI -struct op_V16QI { - typedef uint8 type; - static INLINE type get(powerpc_vr const & v, int i) { return v.b[i]; } - static INLINE void set(powerpc_vr & v, int i, type x) { v.b[i] = x; } -}; - -#define V8HI op_V8HI -struct op_V8HI { - typedef uint16 type; - static INLINE type get(powerpc_vr const & v, int i) { return v.h[i]; } - static INLINE void set(powerpc_vr & v, int i, type x) { v.h[i] = x; } -}; - -#define V4SI op_V4SI -struct op_V4SI { - typedef uint32 type; - static INLINE type get(powerpc_vr const & v, int i) { return v.w[i]; } - static INLINE void set(powerpc_vr & v, int i, type x) { v.w[i] = x; } -}; - -#define V2DI op_V2DI -struct op_V2DI { - typedef uint64 type; - static INLINE type get(powerpc_vr const & v, int i) { return v.j[i]; } - static INLINE void set(powerpc_vr & v, int i, type x) { v.j[i] = x; } -}; - -#define V4SF op_V4SF -struct op_V4SF { - typedef float type; - static INLINE type get(powerpc_vr const & v, int i) { return v.f[i]; } - static INLINE void set(powerpc_vr & v, int i, type x) { v.f[i] = x; } -}; - -template< class OP, class VX, class VA, class VB, class VC, int N > -struct do_vector_execute { - static INLINE void apply() { - do_vector_execute::apply(); - VX::set( - VD, N, - op_apply::apply( - VA::get(V0, N), - VB::get(V1, N), - VC::get(V2, N))); - } -}; - -template< class OP, class VX, class VA, class VB, class VC > -struct do_vector_execute { - static INLINE void apply() { - VX::set( - VD, 0, op_apply::apply( - VA::get(V0, 0), - VB::get(V1, 0), - VC::get(V2, 0))); - } -}; - -template< class OP, class VX, class VA, class VB = VNONE, class VC = VNONE > -struct vector_execute { - static INLINE void apply() { - do_vector_execute::apply(); - } -}; - - -/** - * Vector synthetic operations - **/ - -void op_vaddfp_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vsubfp_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vmaddfp_VD_V0_V1_V2(void) -{ - vector_execute::apply(); -} - -#if defined(__i386__) && defined(__SSE__) -// Workaround gcc 3.2.2 miscompilation that inserts SSE instructions -struct op_do_vnmsubfp { - static INLINE float apply(float x, float y, float z) { -// return 0. - ((x * z) - y); - return y - (x * z); - } -}; -#else -typedef op_vnmsubfp op_do_vnmsubfp; -#endif - -void op_vnmsubfp_VD_V0_V1_V2(void) -{ - vector_execute::apply(); -} - -void op_vand_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vandc_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vnor_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vor_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_vxor_VD_V0_V1(void) -{ - vector_execute::apply(); -} - -void op_record_cr6_VD(void) -{ - unsigned int cr6 = 0; -#if SIZEOF_VOID_P == 8 - if ((~VD.j[0] | ~VD.j[1]) == 0) - cr6 = 8; - else if ((VD.j[0] | VD.j[1]) == 0) - cr6 = 2; -#else - if ((~VD.w[0] | ~VD.w[1] | ~VD.w[2] | ~VD.w[3]) == 0) - cr6 = 8; - else if ((VD.w[0] | VD.w[1] | VD.w[2] | VD.w[3]) == 0) - cr6 = 2; -#endif - powerpc_dyngen_helper::cr().set(6, cr6); - dyngen_barrier(); -} - -void op_mfvscr_VD(void) -{ - VD.w[0] = 0; - VD.w[1] = 0; - VD.w[2] = 0; - VD.w[3] = powerpc_dyngen_helper::get_vscr(); -} - -void op_mtvscr_V0(void) -{ - powerpc_dyngen_helper::set_vscr(V0.w[3]); -} - -#undef VNONE -#undef V16QI -#undef V8HI -#undef V4SI -#undef V2DI -#undef V4SF - -/** - * X86 SIMD optimizations - **/ - -#if defined(__i386__) || defined(__x86_64__) -#undef VD -#undef V0 -#undef V1 -#undef V2 - -/* We are using GCC, so we can use its extensions */ -#if defined __MMX__ || __GNUC__ < 4 -#define __mmx_clobbers(reglist...) reglist -#else -#define __mmx_clobbers(reglist...) -#endif -#if defined __SSE__ || __GNUC__ < 4 -#define __sse_clobbers(reglist...) reglist -#else -#define __sse_clobbers(reglist...) -#endif - -// MMX instructions -void op_emms(void) -{ - asm volatile ("emms"); -} - -#define DEFINE_OP(NAME, OP, VA, VB) \ -void op_mmx_##NAME(void) \ -{ \ - asm volatile ("movq (%1),%%mm0\n" \ - "movq 8(%1),%%mm1\n" \ - #OP " (%2),%%mm0\n" \ - #OP " 8(%2),%%mm1\n" \ - "movq %%mm0,(%0)\n" \ - "movq %%mm1,8(%0)\n" \ - : : "r" (reg_VD), "r" (reg_##VA), "r" (reg_##VB) \ - : __mmx_clobbers("mm0", "mm1")); \ -} - -DEFINE_OP(vcmpequb, pcmpeqb, V0, V1); -DEFINE_OP(vcmpequh, pcmpeqw, V0, V1); -DEFINE_OP(vcmpequw, pcmpeqd, V0, V1); -DEFINE_OP(vcmpgtsb, pcmpgtb, V0, V1); -DEFINE_OP(vcmpgtsh, pcmpgtw, V0, V1); -DEFINE_OP(vcmpgtsw, pcmpgtd, V0, V1); -DEFINE_OP(vaddubm, paddb, V0, V1); -DEFINE_OP(vadduhm, paddw, V0, V1); -DEFINE_OP(vadduwm, paddd, V0, V1); -DEFINE_OP(vsububm, psubb, V0, V1); -DEFINE_OP(vsubuhm, psubw, V0, V1); -DEFINE_OP(vsubuwm, psubd, V0, V1); -DEFINE_OP(vand, pand, V0, V1); -DEFINE_OP(vandc, pandn, V1, V0); -DEFINE_OP(vor, por, V0, V1); -DEFINE_OP(vxor, pxor, V0, V1); -DEFINE_OP(vmaxub, pmaxub, V0, V1); -DEFINE_OP(vminub, pminub, V0, V1); -DEFINE_OP(vmaxsh, pmaxsw, V0, V1); -DEFINE_OP(vminsh, pminsw, V0, V1); - -#undef DEFINE_OP -#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp deleted file mode 100644 index 8d8451cb1..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp +++ /dev/null @@ -1,313 +0,0 @@ -/* - * ppc-dyngen.cpp - PowerPC dynamic translation (low-level) - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "utils/utils-cpuinfo.hpp" -#include "cpu/ppc/ppc-dyngen.hpp" -#include "cpu/ppc/ppc-bitfields.hpp" -#include "cpu/ppc/ppc-instructions.hpp" - -#include -#include - -#define DYNGEN_IMPL 1 -#define DEFINE_GEN(NAME,RET,ARGS) RET powerpc_dyngen::NAME ARGS -#include "ppc-dyngen-ops.hpp" - -powerpc_dyngen::powerpc_dyngen(dyngen_cpu_base cpu) - : basic_dyngen(cpu) -{ -#ifdef SHEEPSHAVER - printf("Detected CPU features:"); - if (cpuinfo_check_mmx()) - printf(" MMX"); - if (cpuinfo_check_sse()) - printf(" SSE"); - if (cpuinfo_check_sse2()) - printf(" SSE2"); - if (cpuinfo_check_sse3()) - printf(" SSE3"); - if (cpuinfo_check_ssse3()) - printf(" SSSE3"); - if (cpuinfo_check_altivec()) - printf(" VMX"); - printf("\n"); -#endif -} - -uint8 *powerpc_dyngen::gen_start(uint32 pc) -{ - // Generate exit if there are pending spcflags - uint8 *p = basic_dyngen::gen_start(); - gen_op_spcflags_check(); - gen_op_set_PC_im(pc); - gen_exec_return(); - dg_set_jmp_target_noflush(jmp_addr[0], gen_align()); - jmp_addr[0] = NULL; - return p; -} - -void powerpc_dyngen::gen_compare_T0_T1(int crf) -{ - gen_op_compare_T0_T1(); - gen_store_T0_crf(crf); -} - -void powerpc_dyngen::gen_compare_T0_im(int crf, int32 value) -{ - if (value == 0) - gen_op_compare_T0_0(); - else - gen_op_compare_T0_im(value); - gen_store_T0_crf(crf); -} - -void powerpc_dyngen::gen_compare_logical_T0_T1(int crf) -{ - gen_op_compare_logical_T0_T1(); - gen_store_T0_crf(crf); -} - -void powerpc_dyngen::gen_compare_logical_T0_im(int crf, int32 value) -{ - if (value == 0) - gen_op_compare_logical_T0_0(); - else - gen_op_compare_logical_T0_im(value); - gen_store_T0_crf(crf); -} - -void powerpc_dyngen::gen_mtcrf_T0_im(uint32 mask) -{ - gen_op_mtcrf_T0_im(mask); -} - - -/** - * Load/store multiple words - **/ - -#define DEFINE_INSN(OP) \ -void powerpc_dyngen::gen_##OP##_T0(int r) \ -{ \ - switch (r) { \ - case 26: gen_op_##OP##_T0_26(); break; \ - case 27: gen_op_##OP##_T0_27(); break; \ - case 28: gen_op_##OP##_T0_28(); break; \ - case 29: gen_op_##OP##_T0_29(); break; \ - case 30: gen_op_##OP##_T0_30(); break; \ - case 31: gen_op_##OP##_T0_31(); break; \ - default: gen_op_##OP##_T0_im(r); break; \ - } \ -} - -DEFINE_INSN(lmw); -DEFINE_INSN(stmw); - -#undef DEFINE_INSN - - -/** - * Load/store registers - **/ - -#define DEFINE_INSN(OP, REG, REGT) \ -void powerpc_dyngen::gen_##OP##_##REG##_##REGT(int i) \ -{ \ - switch (i) { \ - case 0: gen_op_##OP##_##REG##_##REGT##0(); break; \ - case 1: gen_op_##OP##_##REG##_##REGT##1(); break; \ - case 2: gen_op_##OP##_##REG##_##REGT##2(); break; \ - case 3: gen_op_##OP##_##REG##_##REGT##3(); break; \ - case 4: gen_op_##OP##_##REG##_##REGT##4(); break; \ - case 5: gen_op_##OP##_##REG##_##REGT##5(); break; \ - case 6: gen_op_##OP##_##REG##_##REGT##6(); break; \ - case 7: gen_op_##OP##_##REG##_##REGT##7(); break; \ - case 8: gen_op_##OP##_##REG##_##REGT##8(); break; \ - case 9: gen_op_##OP##_##REG##_##REGT##9(); break; \ - case 10: gen_op_##OP##_##REG##_##REGT##10(); break; \ - case 11: gen_op_##OP##_##REG##_##REGT##11(); break; \ - case 12: gen_op_##OP##_##REG##_##REGT##12(); break; \ - case 13: gen_op_##OP##_##REG##_##REGT##13(); break; \ - case 14: gen_op_##OP##_##REG##_##REGT##14(); break; \ - case 15: gen_op_##OP##_##REG##_##REGT##15(); break; \ - case 16: gen_op_##OP##_##REG##_##REGT##16(); break; \ - case 17: gen_op_##OP##_##REG##_##REGT##17(); break; \ - case 18: gen_op_##OP##_##REG##_##REGT##18(); break; \ - case 19: gen_op_##OP##_##REG##_##REGT##19(); break; \ - case 20: gen_op_##OP##_##REG##_##REGT##20(); break; \ - case 21: gen_op_##OP##_##REG##_##REGT##21(); break; \ - case 22: gen_op_##OP##_##REG##_##REGT##22(); break; \ - case 23: gen_op_##OP##_##REG##_##REGT##23(); break; \ - case 24: gen_op_##OP##_##REG##_##REGT##24(); break; \ - case 25: gen_op_##OP##_##REG##_##REGT##25(); break; \ - case 26: gen_op_##OP##_##REG##_##REGT##26(); break; \ - case 27: gen_op_##OP##_##REG##_##REGT##27(); break; \ - case 28: gen_op_##OP##_##REG##_##REGT##28(); break; \ - case 29: gen_op_##OP##_##REG##_##REGT##29(); break; \ - case 30: gen_op_##OP##_##REG##_##REGT##30(); break; \ - case 31: gen_op_##OP##_##REG##_##REGT##31(); break; \ - default: abort(); \ - } \ -} - -// General purpose registers -DEFINE_INSN(load, T0, GPR); -DEFINE_INSN(load, T1, GPR); -DEFINE_INSN(load, T2, GPR); -DEFINE_INSN(store, T0, GPR); -DEFINE_INSN(store, T1, GPR); -DEFINE_INSN(store, T2, GPR); -DEFINE_INSN(load, F0, FPR); -DEFINE_INSN(load, F1, FPR); -DEFINE_INSN(load, F2, FPR); -DEFINE_INSN(store, F0, FPR); -DEFINE_INSN(store, F1, FPR); -DEFINE_INSN(store, F2, FPR); -DEFINE_INSN(store, FD, FPR); -DEFINE_INSN(load_ad, VD, VR); -DEFINE_INSN(load_ad, V0, VR); -DEFINE_INSN(load_ad, V1, VR); -DEFINE_INSN(load_ad, V2, VR); - -// Condition register bitfield -DEFINE_INSN(load, T0, crb); -DEFINE_INSN(load, T1, crb); -DEFINE_INSN(store, T0, crb); -DEFINE_INSN(store, T1, crb); - -#undef DEFINE_INSN - -// Floating point load store -#define DEFINE_OP(NAME, REG, TYPE) \ -void powerpc_dyngen::gen_##NAME##_##TYPE##_##REG##_T1_im(int32 offset) \ -{ \ - if (offset == 0) \ - gen_op_##NAME##_##TYPE##_##REG##_T1_0(); \ - else \ - gen_op_##NAME##_##TYPE##_##REG##_T1_im(offset); \ -} - -DEFINE_OP(load, FD, double); -DEFINE_OP(load, FD, single); -DEFINE_OP(store, F0, double); -DEFINE_OP(store, F0, single); - -#undef DEFINE_OP - -#define DEFINE_INSN(OP, REG) \ -void powerpc_dyngen::gen_##OP##_##REG##_crf(int crf) \ -{ \ - switch (crf) { \ - case 0: gen_op_##OP##_##REG##_cr0(); break; \ - case 1: gen_op_##OP##_##REG##_cr1(); break; \ - case 2: gen_op_##OP##_##REG##_cr2(); break; \ - case 3: gen_op_##OP##_##REG##_cr3(); break; \ - case 4: gen_op_##OP##_##REG##_cr4(); break; \ - case 5: gen_op_##OP##_##REG##_cr5(); break; \ - case 6: gen_op_##OP##_##REG##_cr6(); break; \ - case 7: gen_op_##OP##_##REG##_cr7(); break; \ - default: abort(); \ - } \ -} - -DEFINE_INSN(load, T0); -DEFINE_INSN(store, T0); - -#undef DEFINE_INSN - -void powerpc_dyngen::gen_bc(int bo, int bi, uint32 tpc, uint32 npc, bool direct_chaining) -{ - if (BO_CONDITIONAL_BRANCH(bo)) - gen_load_T1_crb(bi); - - switch (bo >> 1) { -#define _(A,B,C,D) (((A) << 3)| ((B) << 2) | ((C) << 1) | (D)) - case _(0,0,0,0): gen_op_prep_branch_bo_0000(); break; - case _(0,0,0,1): gen_op_prep_branch_bo_0001(); break; - case _(0,0,1,0): - case _(0,0,1,1): gen_op_prep_branch_bo_001x(); break; - case _(0,1,0,0): gen_op_prep_branch_bo_0100(); break; - case _(0,1,0,1): gen_op_prep_branch_bo_0101(); break; - case _(0,1,1,0): - case _(0,1,1,1): gen_op_prep_branch_bo_011x(); break; - case _(1,0,0,0): - case _(1,1,0,0): gen_op_prep_branch_bo_1x00(); break; - case _(1,0,0,1): - case _(1,1,0,1): gen_op_prep_branch_bo_1x01(); break; - case _(1,0,1,0): - case _(1,0,1,1): - case _(1,1,1,0): - case _(1,1,1,1): gen_op_prep_branch_bo_1x1x(); break; -#undef _ - default: abort(); - } - - if (BO_CONDITIONAL_BRANCH(bo) || BO_DECREMENT_CTR(bo)) { - // two-way branches - if (direct_chaining) - gen_op_branch_chain_2(); - else { - if (tpc != 0xffffffff) - gen_op_branch_2_im_im(tpc, npc); - else - gen_op_branch_2_T0_im(npc); - } - } - else { - // one-way branches - if (direct_chaining) - gen_op_branch_chain_1(); - else { - if (tpc != 0xffffffff) - gen_op_branch_1_im(tpc); - else - gen_op_branch_1_T0(); - } - } -} - -/** - * Vector instructions - **/ - -void powerpc_dyngen::gen_load_word_VD_T0(int vD) -{ - gen_load_ad_VD_VR(vD); - gen_op_load_word_VD_T0(); -} - -void powerpc_dyngen::gen_store_word_VS_T0(int vS) -{ - gen_load_ad_VD_VR(vS); - gen_op_store_word_VD_T0(); -} - -void powerpc_dyngen::gen_load_vect_VD_T0(int vD) -{ - gen_load_ad_VD_VR(vD); - gen_op_load_vect_VD_T0(); -} - -void powerpc_dyngen::gen_store_vect_VS_T0(int vS) -{ - gen_load_ad_VD_VR(vS); - gen_op_store_vect_VD_T0(); -} diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.hpp deleted file mode 100644 index 10af38fda..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.hpp +++ /dev/null @@ -1,260 +0,0 @@ -/* - * ppc-dyngen.hpp - PowerPC dynamic translation (low-level) - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_DYNGEN_H -#define PPC_DYNGEN_H - -#include "sysdeps.h" -#include "nvmemfun.hpp" -#include "cpu/ppc/ppc-config.hpp" - -#if PPC_ENABLE_JIT -#include "cpu/ppc/ppc-registers.hpp" -#include "cpu/jit/jit-config.hpp" -#include "cpu/jit/basic-dyngen.hpp" - -class powerpc_dyngen - : public basic_dyngen -{ -#ifndef REG_T3 - uintptr reg_T3; -#endif - -//#ifndef REG_F3 - powerpc_fpr reg_F3; -//#endif - - // Code generators for PowerPC synthetic instructions -#ifndef NO_DEFINE_ALIAS -# define DEFINE_GEN(NAME,RET,ARGS) RET NAME ARGS; -# include "ppc-dyngen-ops.hpp" -#endif - -public: - friend class powerpc_jit; - friend class powerpc_dyngen_helper; - - // Code generators - typedef nv_mem_fun_t< void, powerpc_dyngen > gen_handler_t; - - // Default constructor - powerpc_dyngen(dyngen_cpu_base cpu); - - // Generate prologue - uint8 *gen_start(uint32 pc); - - // Load/store registers - void gen_load_T0_GPR(int i); - void gen_load_T1_GPR(int i); - void gen_load_T2_GPR(int i); - void gen_store_T0_GPR(int i); - void gen_store_T1_GPR(int i); - void gen_store_T2_GPR(int i); - void gen_load_F0_FPR(int i); - void gen_load_F1_FPR(int i); - void gen_load_F2_FPR(int i); - void gen_store_FD_FPR(int i); - void gen_store_F0_FPR(int i); - void gen_store_F1_FPR(int i); - void gen_store_F2_FPR(int i); - - // Load/store multiple words - void gen_lmw_T0(int r); - void gen_stmw_T0(int r); - - // Raw aliases -#define DEFINE_ALIAS_RAW(NAME, PRE, POST, ARGLIST, ARGS) \ - void gen_##NAME ARGLIST { PRE; gen_op_##NAME ARGS; POST; } - -#define DEFINE_ALIAS_0(NAME,PRE,POST) DEFINE_ALIAS_RAW(NAME,PRE,POST,(),()) -#define DEFINE_ALIAS_1(NAME,PRE,POST) DEFINE_ALIAS_RAW(NAME,PRE,POST,(long p1),(p1)) -#define DEFINE_ALIAS_2(NAME,PRE,POST) DEFINE_ALIAS_RAW(NAME,PRE,POST,(long p1,long p2),(p1,p2)) -#define DEFINE_ALIAS_3(NAME,PRE,POST) DEFINE_ALIAS_RAW(NAME,PRE,POST,(long p1,long p2,long p3),(p1,p2,p3)) -#ifdef NO_DEFINE_ALIAS -#define DEFINE_ALIAS(NAME,N) -#else -#define DEFINE_ALIAS(NAME,N) DEFINE_ALIAS_##N(NAME,,) -#endif - - // Misc instructions -#if KPX_MAX_CPUS == 1 - DEFINE_ALIAS(lwarx_T0_T1,0); - DEFINE_ALIAS(stwcx_T0_T1,0); -#endif - DEFINE_ALIAS(inc_32_mem,1); - DEFINE_ALIAS(nego_T0,0); - DEFINE_ALIAS(dcbz_T0,0); - - // Condition registers - DEFINE_ALIAS(load_T0_CR,0); - DEFINE_ALIAS(store_T0_CR,0); - void gen_load_T0_crf(int crf); - void gen_store_T0_crf(int crf); - void gen_load_T0_crb(int i); - void gen_load_T1_crb(int i); - void gen_store_T0_crb(int i); - void gen_store_T1_crb(int i); - void gen_mtcrf_T0_im(uint32 mask); - - // Special purpose registers - DEFINE_ALIAS(load_T0_VRSAVE,0); - DEFINE_ALIAS(store_T0_VRSAVE,0); - DEFINE_ALIAS(load_T0_XER,0); - DEFINE_ALIAS(store_T0_XER,0); - DEFINE_ALIAS(load_T0_PC,0); - DEFINE_ALIAS(store_T0_PC,0); - DEFINE_ALIAS(set_PC_im,1); - DEFINE_ALIAS(set_PC_T0,0); - DEFINE_ALIAS(inc_PC,1); - DEFINE_ALIAS(load_T0_LR,0); - DEFINE_ALIAS(store_T0_LR,0); - DEFINE_ALIAS(load_T0_CTR,0); - DEFINE_ALIAS(load_T0_CTR_aligned,0); - DEFINE_ALIAS(store_T0_CTR,0); - DEFINE_ALIAS(load_T0_LR_aligned,0); - DEFINE_ALIAS(store_im_LR,1); - - DEFINE_ALIAS(spcflags_init,1); - DEFINE_ALIAS(spcflags_set,1); - DEFINE_ALIAS(spcflags_clear,1); - - // Control Flow - DEFINE_ALIAS(jump_next_A0,0); - - // Compare & Record instructions - DEFINE_ALIAS(record_cr0_T0,0); - DEFINE_ALIAS(record_cr1,0); - void gen_compare_T0_T1(int crf); - void gen_compare_T0_im(int crf, int32 value); - void gen_compare_logical_T0_T1(int crf); - void gen_compare_logical_T0_im(int crf, int32 value); - - // Multiply/Divide instructions - DEFINE_ALIAS(mulhw_T0_T1,0); - DEFINE_ALIAS(mulhwu_T0_T1,0); - DEFINE_ALIAS(mulli_T0_im,1); - DEFINE_ALIAS(mullwo_T0_T1,0); - DEFINE_ALIAS(divw_T0_T1,0); - DEFINE_ALIAS(divwo_T0_T1,0); - DEFINE_ALIAS(divwu_T0_T1,0); - DEFINE_ALIAS(divwuo_T0_T1,0); - - // Shift/Rotate instructions - DEFINE_ALIAS(slw_T0_T1,0); - DEFINE_ALIAS(srw_T0_T1,0); - DEFINE_ALIAS(sraw_T0_T1,0); - DEFINE_ALIAS(sraw_T0_im,1); - DEFINE_ALIAS(rlwimi_T0_T1,2); - DEFINE_ALIAS(rlwinm_T0_T1,2); - DEFINE_ALIAS(rlwnm_T0_T1,1); - DEFINE_ALIAS(cntlzw_32_T0,0); - - // Add/Sub related instructions - DEFINE_ALIAS(addo_T0_T1,0); - DEFINE_ALIAS(addc_T0_im,1); - DEFINE_ALIAS(addc_T0_T1,0); - DEFINE_ALIAS(addco_T0_T1,0); - DEFINE_ALIAS(adde_T0_T1,0); - DEFINE_ALIAS(addeo_T0_T1,0); - DEFINE_ALIAS(addme_T0,0); - DEFINE_ALIAS(addmeo_T0,0); - DEFINE_ALIAS(addze_T0,0); - DEFINE_ALIAS(addzeo_T0,0); - DEFINE_ALIAS(subf_T0_T1,0); - DEFINE_ALIAS(subfo_T0_T1,0); - DEFINE_ALIAS(subfc_T0_im,1); - DEFINE_ALIAS(subfc_T0_T1,0); - DEFINE_ALIAS(subfco_T0_T1,0); - DEFINE_ALIAS(subfe_T0_T1,0); - DEFINE_ALIAS(subfeo_T0_T1,0); - DEFINE_ALIAS(subfme_T0,0); - DEFINE_ALIAS(subfmeo_T0,0); - DEFINE_ALIAS(subfze_T0,0); - DEFINE_ALIAS(subfzeo_T0,0); - - // Double-precision floating point operations - DEFINE_ALIAS(fmov_F0_F1,0); - DEFINE_ALIAS(fmov_F0_F2,0); - DEFINE_ALIAS(fmov_F1_F0,0); - DEFINE_ALIAS(fmov_F1_F2,0); - DEFINE_ALIAS(fmov_F2_F0,0); - DEFINE_ALIAS(fmov_F2_F1,0); - DEFINE_ALIAS(fmov_FD_F0,0); - DEFINE_ALIAS(fmov_FD_F1,0); - DEFINE_ALIAS(fmov_FD_F2,0); - DEFINE_ALIAS(fabs_FD_F0,0); - DEFINE_ALIAS(fneg_FD_F0,0); - DEFINE_ALIAS(fnabs_FD_F0,0); - DEFINE_ALIAS(fadd_FD_F0_F1,0); - DEFINE_ALIAS(fsub_FD_F0_F1,0); - DEFINE_ALIAS(fmul_FD_F0_F1,0); - DEFINE_ALIAS(fdiv_FD_F0_F1,0); - DEFINE_ALIAS(fmadd_FD_F0_F1_F2,0); - DEFINE_ALIAS(fmsub_FD_F0_F1_F2,0); - DEFINE_ALIAS(fnmadd_FD_F0_F1_F2,0); - DEFINE_ALIAS(fnmsub_FD_F0_F1_F2,0); - - // Single-precision floating point operations - DEFINE_ALIAS(fadds_FD_F0_F1,0); - DEFINE_ALIAS(fsubs_FD_F0_F1,0); - DEFINE_ALIAS(fmuls_FD_F0_F1,0); - DEFINE_ALIAS(fdivs_FD_F0_F1,0); - DEFINE_ALIAS(fmadds_FD_F0_F1_F2,0); - DEFINE_ALIAS(fmsubs_FD_F0_F1_F2,0); - DEFINE_ALIAS(fnmadds_FD_F0_F1_F2,0); - DEFINE_ALIAS(fnmsubs_FD_F0_F1_F2,0); - - // Load/store floating point data - DEFINE_ALIAS(load_double_FD_T1_T2,0); - void gen_load_double_FD_T1_im(int32 offset); - DEFINE_ALIAS(load_single_FD_T1_T2,0); - void gen_load_single_FD_T1_im(int32 offset); - DEFINE_ALIAS(store_double_F0_T1_T2,0); - void gen_store_double_F0_T1_im(int32 offset); - DEFINE_ALIAS(store_single_F0_T1_T2,0); - void gen_store_single_F0_T1_im(int32 offset); - - // Branch instructions - void gen_bc(int bo, int bi, uint32 tpc, uint32 npc, bool direct_chaining); - - // Vector instructions - void gen_load_ad_VD_VR(int i); - void gen_load_ad_V0_VR(int i); - void gen_load_ad_V1_VR(int i); - void gen_load_ad_V2_VR(int i); - void gen_load_word_VD_T0(int vD); - void gen_load_vect_VD_T0(int vD); - void gen_store_word_VS_T0(int vS); - void gen_store_vect_VS_T0(int vS); - DEFINE_ALIAS(record_cr6_VD,0); - DEFINE_ALIAS(mfvscr_VD,0); - DEFINE_ALIAS(mtvscr_V0,0); - -#undef DEFINE_ALIAS -#undef DEFINE_ALIAS_0 -#undef DEFINE_ALIAS_1 -#undef DEFINE_ALIAS_2 -#undef DEFINE_ALIAS_3 -#undef DEFINE_ALIAS_RAW -}; - -#endif /* PPC_ENABLE_JIT */ - -#endif /* PPC_DYNGEN_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp deleted file mode 100644 index 26e985332..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp +++ /dev/null @@ -1,1787 +0,0 @@ -/* - * ppc-execute.cpp - PowerPC semantics - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" - -#include -#include -#include - -#include "cpu/vm.hpp" -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-bitfields.hpp" -#include "cpu/ppc/ppc-operands.hpp" -#include "cpu/ppc/ppc-operations.hpp" -#include "cpu/ppc/ppc-execute.hpp" - -#ifndef SHEEPSHAVER -#include "basic-kernel.hpp" -#endif - -#ifdef SHEEPSHAVER -#include "main.h" -#include "prefs.h" -#endif - -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -#define DEBUG 0 -#include "debug.h" - -/** - * Illegal & NOP instructions - **/ - -void powerpc_cpu::execute_illegal(uint32 opcode) -{ - fprintf(stderr, "Illegal instruction at %08x, opcode = %08x\n", pc(), opcode); - -#ifdef SHEEPSHAVER - if (PrefsFindBool("ignoreillegal")) { - increment_pc(4); - return; - } -#endif - -#if ENABLE_MON - disass_ppc(stdout, pc(), opcode); - - // Start up mon in real-mode - char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif - abort(); -} - -void powerpc_cpu::execute_nop(uint32 opcode) -{ - increment_pc(4); -} - -/** - * Floating-point rounding modes conversion - **/ - -static inline int ppc_to_native_rounding_mode(int round) -{ - switch (round) { - case 0: return FE_TONEAREST; - case 1: return FE_TOWARDZERO; - case 2: return FE_UPWARD; - case 3: return FE_DOWNWARD; - } -} - -static inline int native_to_ppc_rounding_mode(int round) -{ - switch (round) { - case FE_TONEAREST: return 0; - case FE_TOWARDZERO: return 1; - case FE_UPWARD: return 2; - case FE_DOWNWARD: return 3; - } -} - -/** - * Helper class to compute the overflow/carry condition - * - * OP Operation to perform - */ - -template< class OP > -struct op_carry { - static inline bool apply(uint32, uint32, uint32) { - return false; - } -}; - -template<> -struct op_carry { - static inline bool apply(uint32 a, uint32 b, uint32 c) { - // TODO: use 32-bit arithmetics - uint64 carry = (uint64)a + (uint64)b + (uint64)c; - return (carry >> 32) != 0; - } -}; - -template< class OP > -struct op_overflow { - static inline bool apply(uint32, uint32, uint32) { - return false; - } -}; - -template<> -struct op_overflow { - static inline bool apply(uint32 a, uint32, uint32) { - return a == 0x80000000; - }; -}; - -template<> -struct op_overflow { - static inline bool apply(uint32 a, uint32 b, uint32 c) { - // TODO: use 32-bit arithmetics - int64 overflow = (int64)(int32)a + (int64)(int32)b + (int64)(int32)c; - return (((uint64)overflow) >> 63) ^ (((uint32)overflow) >> 31); - } -}; - -/** - * Perform an addition/substraction - * - * RA Input operand register, possibly 0 - * RB Input operand either register or immediate - * RC Input carry - * CA Predicate to compute the carry out of the operation - * OE Predicate to compute the overflow flag - * Rc Predicate to record CR0 - **/ - -template< class RA, class RB, class RC, class CA, class OE, class Rc > -void powerpc_cpu::execute_addition(uint32 opcode) -{ - const uint32 a = RA::get(this, opcode); - const uint32 b = RB::get(this, opcode); - const uint32 c = RC::get(this, opcode); - uint32 d = a + b + c; - - // Set XER (CA) if instruction affects carry bit - if (CA::test(opcode)) - xer().set_ca(op_carry::apply(a, b, c)); - - // Set XER (OV, SO) if instruction has OE set - if (OE::test(opcode)) - xer().set_ov(op_overflow::apply(a, b, c)); - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((int32)d); - - // Commit result to output operand - operand_RD::set(this, opcode, d); - - increment_pc(4); -} - -/** - * Generic arithmetic instruction - * - * OP Operation to perform - * RD Output register - * RA Input operand register - * RB Input operand register or immediate (optional: operand_NONE) - * RC Input operand register or immediate (optional: operand_NONE) - * OE Predicate to compute overflow flag - * Rc Predicate to record CR0 - **/ - -template< class OP, class RD, class RA, class RB, class RC, class OE, class Rc > -void powerpc_cpu::execute_generic_arith(uint32 opcode) -{ - const uint32 a = RA::get(this, opcode); - const uint32 b = RB::get(this, opcode); - const uint32 c = RC::get(this, opcode); - - uint32 d = op_apply::apply(a, b, c); - - // Set XER (OV, SO) if instruction has OE set - if (OE::test(opcode)) - xer().set_ov(op_overflow::apply(a, b, c)); - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((int32)d); - - // commit result to output operand - RD::set(this, opcode, d); - - increment_pc(4); -} - -/** - * Rotate Left Word Immediate then Mask Insert - * - * SH Shift count - * MA Mask value - * Rc Predicate to record CR0 - **/ - -template< class SH, class MA, class Rc > -void powerpc_cpu::execute_rlwimi(uint32 opcode) -{ - const uint32 n = SH::get(this, opcode); - const uint32 m = MA::get(this, opcode); - const uint32 rs = operand_RS::get(this, opcode); - const uint32 ra = operand_RA::get(this, opcode); - uint32 d = op_ppc_rlwimi::apply(rs, n, m, ra); - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((int32)d); - - // Commit result to output operand - operand_RA::set(this, opcode, d); - - increment_pc(4); -} - -/** - * Shift instructions - * - * OP Operation to perform - * RD Output operand - * RA Source operand - * SH Shift count - * SO Shift operation - * CA Predicate to compute carry bit - * Rc Predicate to record CR0 - **/ - -template< class OP > -struct invalid_shift { - static inline uint32 value(uint32) { - return 0; - } -}; - -template<> -struct invalid_shift { - static inline uint32 value(uint32 r) { - return 0 - (r >> 31); - } -}; - -template< class OP, class RD, class RA, class SH, class SO, class CA, class Rc > -void powerpc_cpu::execute_shift(uint32 opcode) -{ - const uint32 n = SO::apply(SH::get(this, opcode)); - const uint32 r = RA::get(this, opcode); - uint32 d; - - // Shift operation is valid only if rB[26] = 0 - if (n & 0x20) { - d = invalid_shift::value(r); - if (CA::test(opcode)) - xer().set_ca(d >> 31); - } - else { - d = OP::apply(r, n); - if (CA::test(opcode)) { - const uint32 ca = (r & 0x80000000) && (r & ~(0xffffffff << n)); - xer().set_ca(ca); - } - } - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((int32)d); - - // Commit result to output operand - RD::set(this, opcode, d); - - increment_pc(4); -} - -/** - * Branch conditional instructions - * - * PC Input program counter (PC, LR, CTR) - * BO BO operand - * DP Displacement operand - * AA Predicate for absolute address - * LK Predicate to record NPC into link register - **/ - -template< class PC, class BO, class DP, class AA, class LK > -void powerpc_cpu::execute_branch(uint32 opcode) -{ - const int bo = BO::get(this, opcode); - bool ctr_ok = true; - bool cond_ok = true; - - if (BO_CONDITIONAL_BRANCH(bo)) { - cond_ok = cr().test(BI_field::extract(opcode)); - if (!BO_BRANCH_IF_TRUE(bo)) - cond_ok = !cond_ok; - } - - if (BO_DECREMENT_CTR(bo)) { - ctr_ok = (ctr() -= 1) == 0; - if (!BO_BRANCH_IF_CTR_ZERO(bo)) - ctr_ok = !ctr_ok; - } - - const uint32 npc = pc() + 4; - if (ctr_ok && cond_ok) - pc() = ((AA::test(opcode) ? 0 : PC::get(this, opcode)) + DP::get(this, opcode)) & -4; - else - pc() = npc; - - if (LK::test(opcode)) - lr() = npc; -} - -/** - * Compare instructions - * - * RB Second operand (GPR, SIMM, UIMM) - * CT Type of variables to be compared (uint32, int32) - **/ - -template< class RB, typename CT > -void powerpc_cpu::execute_compare(uint32 opcode) -{ - const uint32 a = operand_RA::get(this, opcode); - const uint32 b = RB::get(this, opcode); - const uint32 crfd = crfD_field::extract(opcode); - record_cr(crfd, (CT)a < (CT)b ? -1 : ((CT)a > (CT)b ? +1 : 0)); - increment_pc(4); -} - -/** - * Operations on condition register - * - * OP Operation to perform - **/ - -template< class OP > -void powerpc_cpu::execute_cr_op(uint32 opcode) -{ - const uint32 crbA = crbA_field::extract(opcode); - uint32 a = (cr().get() >> (31 - crbA)) & 1; - const uint32 crbB = crbB_field::extract(opcode); - uint32 b = (cr().get() >> (31 - crbB)) & 1; - const uint32 crbD = crbD_field::extract(opcode); - uint32 d = OP::apply(a, b) & 1; - cr().set((cr().get() & ~(1 << (31 - crbD))) | (d << (31 - crbD))); - increment_pc(4); -} - -/** - * Divide instructions - * - * SB Signed division - * OE Predicate to compute overflow - * Rc Predicate to record CR0 - **/ - -template< bool SB, class OE, class Rc > -void powerpc_cpu::execute_divide(uint32 opcode) -{ - const uint32 a = operand_RA::get(this, opcode); - const uint32 b = operand_RB::get(this, opcode); - uint32 d; - - // Specialize divide semantic action - if (OE::test(opcode)) - d = do_execute_divide(a, b); - else - d = do_execute_divide(a, b); - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((int32)d); - - // Commit result to output operand - operand_RD::set(this, opcode, d); - - increment_pc(4); -} - -/** - * Multiply instructions - * - * HI Predicate for multiply high word - * SB Predicate for signed operation - * OE Predicate to compute overflow - * Rc Predicate to record CR0 - **/ - -template< bool HI, bool SB, class OE, class Rc > -void powerpc_cpu::execute_multiply(uint32 opcode) -{ - const uint32 a = operand_RA::get(this, opcode); - const uint32 b = operand_RB::get(this, opcode); - uint64 d = SB ? (int64)(int32)a * (int64)(int32)b : (uint64)a * (uint64)b; - - // Overflow if the product cannot be represented in 32 bits - if (OE::test(opcode)) { - xer().set_ov((d & UVAL64(0xffffffff80000000)) != 0 && - (d & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)); - } - - // Only keep high word if multiply high instruction - if (HI) - d >>= 32; - - // Set CR0 (LT, GT, EQ, SO) if instruction has Rc set - if (Rc::test(opcode)) - record_cr0((uint32)d); - - // Commit result to output operand - operand_RD::set(this, opcode, (uint32)d); - - increment_pc(4); -} - -/** - * Record FPSCR - * - * Update FP exception bits - **/ - -void powerpc_cpu::record_fpscr(int exceptions) -{ -#if PPC_ENABLE_FPU_EXCEPTIONS - // Reset non-sticky bits - fpscr() &= ~(FPSCR_VX_field::mask() | FPSCR_FEX_field::mask()); - - // Always update FX if any exception bit was set - if (exceptions) - fpscr() |= FPSCR_FX_field::mask() | exceptions; - - // Always update VX - if (fpscr() & (FPSCR_VXSNAN_field::mask() | FPSCR_VXISI_field::mask() | - FPSCR_VXISI_field::mask() | FPSCR_VXIDI_field::mask() | - FPSCR_VXZDZ_field::mask() | FPSCR_VXIMZ_field::mask() | - FPSCR_VXVC_field::mask() | FPSCR_VXSOFT_field::mask() | - FPSCR_VXSQRT_field::mask() | FPSCR_VXCVI_field::mask())) - fpscr() |= FPSCR_VX_field::mask(); - - // Always update FEX - if (((fpscr() & FPSCR_VX_field::mask()) && (fpscr() & FPSCR_VE_field::mask())) || - ((fpscr() & FPSCR_OX_field::mask()) && (fpscr() & FPSCR_OE_field::mask())) || - ((fpscr() & FPSCR_UX_field::mask()) && (fpscr() & FPSCR_UE_field::mask())) || - ((fpscr() & FPSCR_ZX_field::mask()) && (fpscr() & FPSCR_ZE_field::mask())) || - ((fpscr() & FPSCR_XX_field::mask()) && (fpscr() & FPSCR_XE_field::mask()))) - fpscr() |= FPSCR_FEX_field::mask(); -#endif -} - -/** - * Floating-point arithmetics - * - * FP Floating Point type - * OP Operation to perform - * RD Output register - * RA Input operand - * RB Input operand (optional) - * RC Input operand (optional) - * Rc Predicate to record CR1 - * FPSCR Predicate to compute FPSCR bits - **/ - -template< class FP, class OP, class RD, class RA, class RB, class RC, class Rc, bool FPSCR > -void powerpc_cpu::execute_fp_arith(uint32 opcode) -{ - const double a = RA::get(this, opcode); - const double b = RB::get(this, opcode); - const double c = RC::get(this, opcode); - -#if PPC_ENABLE_FPU_EXCEPTIONS - int exceptions; - if (FPSCR) { - exceptions = op_apply, RA, RB, RC>::apply(a, b, c); - feclearexcept(FE_ALL_EXCEPT); - febarrier(); - } -#endif - - FP d = op_apply::apply(a, b, c); - - if (FPSCR) { - - // Update FPSCR exception bits -#if PPC_ENABLE_FPU_EXCEPTIONS - febarrier(); - int raised = fetestexcept(FE_ALL_EXCEPT); - if (raised & FE_INEXACT) - exceptions |= FPSCR_XX_field::mask(); - if (raised & FE_DIVBYZERO) - exceptions |= FPSCR_ZX_field::mask(); - if (raised & FE_UNDERFLOW) - exceptions |= FPSCR_UX_field::mask(); - if (raised & FE_OVERFLOW) - exceptions |= FPSCR_OX_field::mask(); - record_fpscr(exceptions); -#endif - - // FPSCR[FPRF] is set to the class and sign of the result - if (!FPSCR_VE_field::test(fpscr())) - fp_classify(d); - } - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - // Commit result to output operand - RD::set(this, opcode, d); - increment_pc(4); -} - -/** - * Load/store instructions - * - * OP Operation to perform on loaded value - * RA Base operand - * RB Displacement (GPR(RB), EXTS(d)) - * LD Load operation? - * SZ Size of load/store operation - * UP Update RA with EA - * RX Reverse operand - **/ - -template< int SZ, bool RX > -struct memory_helper; - -#define DEFINE_MEMORY_HELPER(SIZE) \ -template< bool RX > \ -struct memory_helper \ -{ \ - static inline uint32 load(uint32 ea) { \ - return RX ? vm_read_memory_##SIZE##_reversed(ea) : vm_read_memory_##SIZE(ea); \ - } \ - static inline void store(uint32 ea, uint32 value) { \ - RX ? vm_write_memory_##SIZE##_reversed(ea, value) : vm_write_memory_##SIZE(ea, value); \ - } \ -} - -DEFINE_MEMORY_HELPER(1); -DEFINE_MEMORY_HELPER(2); -DEFINE_MEMORY_HELPER(4); - -template< class OP, class RA, class RB, bool LD, int SZ, bool UP, bool RX > -void powerpc_cpu::execute_loadstore(uint32 opcode) -{ - const uint32 a = RA::get(this, opcode); - const uint32 b = RB::get(this, opcode); - const uint32 ea = a + b; - - if (LD) - operand_RD::set(this, opcode, OP::apply(memory_helper::load(ea))); - else - memory_helper::store(ea, operand_RS::get(this, opcode)); - - if (UP) - RA::set(this, opcode, ea); - - increment_pc(4); -} - -template< class RA, class DP, bool LD > -void powerpc_cpu::execute_loadstore_multiple(uint32 opcode) -{ - const uint32 a = RA::get(this, opcode); - const uint32 d = DP::get(this, opcode); - uint32 ea = a + d; - - // FIXME: generate exception if ea is not word-aligned - if ((ea & 3) != 0) { -#ifdef SHEEPSHAVER - D(bug("unaligned load/store multiple to %08x\n", ea)); - increment_pc(4); - return; -#else - abort(); -#endif - } - - int r = LD ? rD_field::extract(opcode) : rS_field::extract(opcode); - while (r <= 31) { - if (LD) - gpr(r) = vm_read_memory_4(ea); - else - vm_write_memory_4(ea, gpr(r)); - r++; - ea += 4; - } - - increment_pc(4); -} - -/** - * Floating-point load/store instructions - * - * RA Base operand - * RB Displacement (GPR(RB), EXTS(d)) - * LD Load operation? - * DB Predicate for double value - * UP Predicate to update RA with EA - **/ - -template< class RA, class RB, bool LD, bool DB, bool UP > -void powerpc_cpu::execute_fp_loadstore(uint32 opcode) -{ - const uint32 a = RA::get(this, opcode); - const uint32 b = RB::get(this, opcode); - const uint32 ea = a + b; - uint64 v; - - if (LD) { - if (DB) - v = vm_read_memory_8(ea); - else - v = fp_load_single_convert(vm_read_memory_4(ea)); - operand_fp_dw_RD::set(this, opcode, v); - } - else { - v = operand_fp_dw_RS::get(this, opcode); - if (DB) - vm_write_memory_8(ea, v); - else - vm_write_memory_4(ea, fp_store_single_convert(v)); - } - - if (UP) - RA::set(this, opcode, ea); - - increment_pc(4); -} - -/** - * Load/Store String Word instruction - * - * RA Input operand as base EA - * IM lswi mode? - * NB Number of bytes to transfer - **/ - -template< class RA, bool IM, class NB > -void powerpc_cpu::execute_load_string(uint32 opcode) -{ - uint32 ea = RA::get(this, opcode); - if (!IM) - ea += operand_RB::get(this, opcode); - - int nb = NB::get(this, opcode); - if (IM && nb == 0) - nb = 32; - - int rd = rD_field::extract(opcode); -#if 1 - int i; - for (i = 0; nb - i >= 4; i += 4, rd = (rd + 1) & 0x1f) - gpr(rd) = vm_read_memory_4(ea + i); - switch (nb - i) { - case 1: - gpr(rd) = vm_read_memory_1(ea + i) << 24; - break; - case 2: - gpr(rd) = vm_read_memory_2(ea + i) << 16; - break; - case 3: - gpr(rd) = (vm_read_memory_2(ea + i) << 16) + (vm_read_memory_1(ea + i + 2) << 8); - break; - } -#else - for (int i = 0; i < nb; i++) { - switch (i & 3) { - case 0: - gpr(rd) = vm_read_memory_1(ea + i) << 24; - break; - case 1: - gpr(rd) = (gpr(rd) & 0xff00ffff) | (vm_read_memory_1(ea + i) << 16); - break; - case 2: - gpr(rd) = (gpr(rd) & 0xffff00ff) | (vm_read_memory_1(ea + i) << 8); - break; - case 3: - gpr(rd) = (gpr(rd) & 0xffffff00) | vm_read_memory_1(ea + i); - rd = (rd + 1) & 0x1f; - break; - } - } -#endif - - increment_pc(4); -} - -template< class RA, bool IM, class NB > -void powerpc_cpu::execute_store_string(uint32 opcode) -{ - uint32 ea = RA::get(this, opcode); - if (!IM) - ea += operand_RB::get(this, opcode); - - int nb = NB::get(this, opcode); - if (IM && nb == 0) - nb = 32; - - int rs = rS_field::extract(opcode); - int sh = 24; - for (int i = 0; i < nb; i++) { - vm_write_memory_1(ea + i, gpr(rs) >> sh); - sh -= 8; - if (sh < 0) { - sh = 24; - rs = (rs + 1) & 0x1f; - } - } - - increment_pc(4); -} - -/** - * Load Word and Reserve Indexed / Store Word Conditional Indexed - * - * RA Input operand as base EA - **/ - -template< class RA > -void powerpc_cpu::execute_lwarx(uint32 opcode) -{ - const uint32 ea = RA::get(this, opcode) + operand_RB::get(this, opcode); - uint32 reserve_data = vm_read_memory_4(ea); - regs().reserve_valid = 1; - regs().reserve_addr = ea; -#if KPX_MAX_CPUS != 1 - regs().reserve_data = reserve_data; -#endif - operand_RD::set(this, opcode, reserve_data); - increment_pc(4); -} - -template< class RA > -void powerpc_cpu::execute_stwcx(uint32 opcode) -{ - const uint32 ea = RA::get(this, opcode) + operand_RB::get(this, opcode); - cr().clear(0); - if (regs().reserve_valid) { - if (regs().reserve_addr == ea /* physical_addr(EA) */ -#if KPX_MAX_CPUS != 1 - /* HACK: if another processor wrote to the reserved block, - nothing happens, i.e. we should operate as if reserve == 0 */ - && regs().reserve_data == vm_read_memory_4(ea) -#endif - ) { - vm_write_memory_4(ea, operand_RS::get(this, opcode)); - cr().set(0, standalone_CR_EQ_field::mask()); - } - regs().reserve_valid = 0; - } - cr().set_so(0, xer().get_so()); - increment_pc(4); -} - -/** - * Floating-point compare instruction - * - * OC Predicate for ordered compare - **/ - -template< bool OC > -void powerpc_cpu::execute_fp_compare(uint32 opcode) -{ - const double a = operand_fp_RA::get(this, opcode); - const double b = operand_fp_RB::get(this, opcode); - const int crfd = crfD_field::extract(opcode); - int c; - - if (is_NaN(a) || is_NaN(b)) - c = 1; - else if (isless(a, b)) - c = 8; - else if (isgreater(a, b)) - c = 4; - else - c = 2; - - FPSCR_FPCC_field::insert(fpscr(), c); - cr().set(crfd, c); - - // Update FPSCR exception bits -#if PPC_ENABLE_FPU_EXCEPTIONS - int exceptions = 0; - if (is_SNaN(a) || is_SNaN(b)) { - exceptions |= FPSCR_VXSNAN_field::mask(); - if (OC && !FPSCR_VE_field::test(fpscr())) - exceptions |= FPSCR_VXVC_field::mask(); - } - else if (OC && (is_QNaN(a) || is_QNaN(b))) - exceptions |= FPSCR_VXVC_field::mask(); - record_fpscr(exceptions); -#endif - - increment_pc(4); -} - -/** - * Floating Convert to Integer Word instructions - * - * RN Rounding mode - * Rc Predicate to record CR1 - **/ - -template< class RN, class Rc > -void powerpc_cpu::execute_fp_int_convert(uint32 opcode) -{ - const double b = operand_fp_RB::get(this, opcode); - const uint32 r = RN::get(this, opcode); - any_register d; - -#if PPC_ENABLE_FPU_EXCEPTIONS - int exceptions = 0; - if (is_NaN(b)) { - exceptions |= FPSCR_VXCVI_field::mask(); - if (is_SNaN(b)) - exceptions |= FPSCR_VXSNAN_field::mask(); - } - if (isinf(b)) - exceptions |= FPSCR_VXCVI_field::mask(); - - feclearexcept(FE_ALL_EXCEPT); - febarrier(); -#endif - - // Convert to integer word if operand fits bounds - if (b >= -(double)0x80000000 && b <= (double)0x7fffffff) { -#if defined mathlib_lrint - int old_round = fegetround(); - fesetround(ppc_to_native_rounding_mode(r)); - d.j = (int32)mathlib_lrint(b); - fesetround(old_round); -#else - switch (r) { - case 0: d.j = (int32)op_frin::apply(b); break; // near - case 1: d.j = (int32)op_friz::apply(b); break; // zero - case 2: d.j = (int32)op_frip::apply(b); break; // +inf - case 3: d.j = (int32)op_frim::apply(b); break; // -inf - } -#endif - } - - // NOTE: this catches infinity and NaN operands - else if (b > 0) - d.j = 0x7fffffff; - else - d.j = 0x80000000; - - // Update FPSCR exception bits -#if PPC_ENABLE_FPU_EXCEPTIONS - febarrier(); - int raised = fetestexcept(FE_ALL_EXCEPT); - if (raised & FE_UNDERFLOW) - exceptions |= FPSCR_UX_field::mask(); - if (raised & FE_INEXACT) - exceptions |= FPSCR_XX_field::mask(); - record_fpscr(exceptions); -#endif - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - // Commit result to output operand - operand_fp_RD::set(this, opcode, d.d); - increment_pc(4); -} - -/** - * Floating-point Round to Single - * - * Rc Predicate to record CR1 - **/ - -template< class FP > -void powerpc_cpu::fp_classify(FP x) -{ - uint32 c = fpscr() & ~FPSCR_FPRF_field::mask(); - uint8 fc = fpclassify(x); - switch (fc) { - case FP_NAN: - c |= FPSCR_FPRF_FU_field::mask() | FPSCR_FPRF_C_field::mask(); - break; - case FP_ZERO: - c |= FPSCR_FPRF_FE_field::mask(); - if (signbit(x)) - c |= FPSCR_FPRF_C_field::mask(); - break; - case FP_INFINITE: - c |= FPSCR_FPRF_FU_field::mask(); - goto FL_FG_field; - case FP_SUBNORMAL: - c |= FPSCR_FPRF_C_field::mask(); - // fall-through - case FP_NORMAL: - FL_FG_field: - if (x < 0) - c |= FPSCR_FPRF_FL_field::mask(); - else - c |= FPSCR_FPRF_FG_field::mask(); - break; - } - fpscr() = c; -} - -template< class Rc > -void powerpc_cpu::execute_fp_round(uint32 opcode) -{ - const double b = operand_fp_RB::get(this, opcode); - -#if PPC_ENABLE_FPU_EXCEPTIONS - int exceptions = - fp_invalid_operation_condition:: - apply(FPSCR_VXSNAN_field::mask(), b); - - feclearexcept(FE_ALL_EXCEPT); - febarrier(); -#endif - - float d = (float)b; - - // Update FPSCR exception bits -#if PPC_ENABLE_FPU_EXCEPTIONS - febarrier(); - int raised = fetestexcept(FE_ALL_EXCEPT); - if (raised & FE_UNDERFLOW) - exceptions |= FPSCR_UX_field::mask(); - if (raised & FE_OVERFLOW) - exceptions |= FPSCR_OX_field::mask(); - if (raised & FE_INEXACT) - exceptions |= FPSCR_XX_field::mask(); - record_fpscr(exceptions); -#endif - - // FPSCR[FPRF] is set to the class and sign of the result - if (!FPSCR_VE_field::test(fpscr())) - fp_classify(d); - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - // Commit result to output operand - operand_fp_RD::set(this, opcode, (double)d); - increment_pc(4); -} - -/** - * System Call instruction - **/ - -void powerpc_cpu::execute_syscall(uint32 opcode) -{ -#ifdef SHEEPSHAVER - execute_illegal(opcode); -#else - cr().set_so(0, execute_do_syscall && !execute_do_syscall(this)); -#endif - increment_pc(4); -} - -/** - * Instructions dealing with system registers - **/ - -void powerpc_cpu::execute_mcrf(uint32 opcode) -{ - const int crfS = crfS_field::extract(opcode); - const int crfD = crfD_field::extract(opcode); - cr().set(crfD, cr().get(crfS)); - increment_pc(4); -} - -void powerpc_cpu::execute_mcrfs(uint32 opcode) -{ - const int crfS = crfS_field::extract(opcode); - const int crfD = crfD_field::extract(opcode); - - // The contents of FPSCR field crfS are copied to CR field crfD - const uint32 m = 0xf << (28 - 4 * crfS); - cr().set(crfD, (fpscr() & m) >> (28 - 4 * crfS)); - - // All exception bits copied (except FEX and VX) are cleared in the FPSCR - fpscr() &= ~(m & (FPSCR_FX_field::mask() | FPSCR_OX_field::mask() | - FPSCR_UX_field::mask() | FPSCR_ZX_field::mask() | - FPSCR_XX_field::mask() | FPSCR_VXSNAN_field::mask() | - FPSCR_VXISI_field::mask() | FPSCR_VXIDI_field::mask() | - FPSCR_VXZDZ_field::mask() | FPSCR_VXIMZ_field::mask() | - FPSCR_VXVC_field::mask() | FPSCR_VXSOFT_field::mask() | - FPSCR_VXSQRT_field::mask() | FPSCR_VXCVI_field::mask())); - - increment_pc(4); -} - -void powerpc_cpu::execute_mcrxr(uint32 opcode) -{ - const int crfD = crfD_field::extract(opcode); - const uint32 x = xer().get(); - cr().set(crfD, x >> 28); - xer().set(x & 0x0fffffff); - increment_pc(4); -} - -void powerpc_cpu::execute_mtcrf(uint32 opcode) -{ - uint32 mask = field2mask[CRM_field::extract(opcode)]; - cr().set((operand_RS::get(this, opcode) & mask) | (cr().get() & ~mask)); - increment_pc(4); -} - -template< class FM, class RB, class Rc > -void powerpc_cpu::execute_mtfsf(uint32 opcode) -{ - const uint64 fsf = RB::get(this, opcode); - const uint32 f = FM::get(this, opcode); - uint32 m = field2mask[f]; - - // FPSCR[FX] is altered only if FM[0] = 1 - if ((f & 0x80) == 0) - m &= ~FPSCR_FX_field::mask(); - - // The mtfsf instruction cannot alter FPSCR[FEX] nor FPSCR[VX] explicitly - int exceptions = fsf & m; - exceptions &= ~(FPSCR_FEX_field::mask() | FPSCR_VX_field::mask()); - - // Move frB bits to FPSCR according to field mask - fpscr() = (fpscr() & ~m) | exceptions; - - // Update FPSCR exception bits (don't implicitly update FX) - record_fpscr(0); - - // Update native FP control word - if (m & FPSCR_RN_field::mask()) - fesetround(ppc_to_native_rounding_mode(FPSCR_RN_field::extract(fpscr()))); - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - increment_pc(4); -} - -template< class RB, class Rc > -void powerpc_cpu::execute_mtfsfi(uint32 opcode) -{ - const uint32 crfD = crfD_field::extract(opcode); - uint32 m = 0xf << (4 * (7 - crfD)); - - // FPSCR[FX] is altered only if crfD = 0 - if (crfD == 0) - m &= ~FPSCR_FX_field::mask(); - - // The mtfsfi instruction cannot alter FPSCR[FEX] nor FPSCR[VX] explicitly - int exceptions = RB::get(this, opcode) & m; - exceptions &= ~(FPSCR_FEX_field::mask() | FPSCR_VX_field::mask()); - - // Move immediate to FPSCR according to field crfD - fpscr() = (fpscr() & ~m) | exceptions; - - // Update native FP control word - if (m & FPSCR_RN_field::mask()) - fesetround(ppc_to_native_rounding_mode(FPSCR_RN_field::extract(fpscr()))); - - // Update FPSCR exception bits (don't implicitly update FX) - record_fpscr(0); - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - increment_pc(4); -} - -template< class RB, class Rc > -void powerpc_cpu::execute_mtfsb(uint32 opcode) -{ - const bool set_bit = RB::get(this, opcode); - - // The mtfsb0 and mtfsb1 instructions cannot alter FPSCR[FEX] nor FPSCR[VX] explicitly - uint32 m = 1 << (31 - crbD_field::extract(opcode)); - m &= ~(FPSCR_FEX_field::mask() | FPSCR_VX_field::mask()); - - // Bit crbD of the FPSCR is set or clear - fpscr() &= ~m; - - // Update FPSCR exception bits - record_fpscr(set_bit ? m : 0); - - // Update native FP control word if FPSCR[RN] changed - if (m & FPSCR_RN_field::mask()) - fesetround(ppc_to_native_rounding_mode(FPSCR_RN_field::extract(fpscr()))); - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - increment_pc(4); -} - -template< class Rc > -void powerpc_cpu::execute_mffs(uint32 opcode) -{ - // Move FPSCR to FPR(FRD) - operand_fp_dw_RD::set(this, opcode, fpscr()); - - // Set CR1 (FX, FEX, VX, VOX) if instruction has Rc set - if (Rc::test(opcode)) - record_cr1(); - - increment_pc(4); -} - -void powerpc_cpu::execute_mfmsr(uint32 opcode) -{ - operand_RD::set(this, opcode, 0xf072); - increment_pc(4); -} - -template< class SPR > -void powerpc_cpu::execute_mfspr(uint32 opcode) -{ - const uint32 spr = SPR::get(this, opcode); - uint32 d; - switch (spr) { - case powerpc_registers::SPR_XER: d = xer().get();break; - case powerpc_registers::SPR_LR: d = lr(); break; - case powerpc_registers::SPR_CTR: d = ctr(); break; - case powerpc_registers::SPR_VRSAVE: d = vrsave(); break; -#ifdef SHEEPSHAVER - case powerpc_registers::SPR_SDR1: d = 0xdead001f; break; - case powerpc_registers::SPR_PVR: { - extern uint32 PVR; - d = PVR; - break; - } - default: d = 0; -#else - default: execute_illegal(opcode); -#endif - } - operand_RD::set(this, opcode, d); - increment_pc(4); -} - -template< class SPR > -void powerpc_cpu::execute_mtspr(uint32 opcode) -{ - const uint32 spr = SPR::get(this, opcode); - const uint32 s = operand_RS::get(this, opcode); - - switch (spr) { - case powerpc_registers::SPR_XER: xer().set(s); break; - case powerpc_registers::SPR_LR: lr() = s; break; - case powerpc_registers::SPR_CTR: ctr() = s; break; - case powerpc_registers::SPR_VRSAVE: vrsave() = s; break; -#ifndef SHEEPSHAVER - default: execute_illegal(opcode); -#endif - } - - increment_pc(4); -} - -// Compute with 96 bit intermediate result: (a * b) / c -static uint64 muldiv64(uint64 a, uint32 b, uint32 c) -{ - union { - uint64 ll; - struct { -#ifdef WORDS_BIGENDIAN - uint32 high, low; -#else - uint32 low, high; -#endif - } l; - } u, res; - - u.ll = a; - uint64 rl = (uint64)u.l.low * (uint64)b; - uint64 rh = (uint64)u.l.high * (uint64)b; - rh += (rl >> 32); - res.l.high = rh / c; - res.l.low = (((rh % c) << 32) + (rl & 0xffffffff)) / c; - return res.ll; -} - -static inline uint64 get_tb_ticks(void) -{ - uint64 ticks; -#ifdef SHEEPSHAVER - const uint32 TBFreq = TimebaseSpeed; - ticks = muldiv64(GetTicks_usec(), TBFreq, 1000000); -#else - const uint32 TBFreq = 25 * 1000 * 1000; // 25 MHz - ticks = muldiv64((uint64)clock(), TBFreq, CLOCKS_PER_SEC); -#endif - return ticks; -} - -template< class TBR > -void powerpc_cpu::execute_mftbr(uint32 opcode) -{ - uint32 tbr = TBR::get(this, opcode); - uint32 d; - switch (tbr) { - case 268: d = (uint32)get_tb_ticks(); break; - case 269: d = (get_tb_ticks() >> 32); break; - default: execute_illegal(opcode); - } - operand_RD::set(this, opcode, d); - increment_pc(4); -} - -/** - * Instruction cache management - **/ - -void powerpc_cpu::execute_invalidate_cache_range() -{ - if (cache_range.start != cache_range.end) { - invalidate_cache_range(cache_range.start, cache_range.end); - cache_range.start = cache_range.end = 0; - } -} - -template< class RA, class RB > -void powerpc_cpu::execute_icbi(uint32 opcode) -{ - const uint32 ea = RA::get(this, opcode) + RB::get(this, opcode); - const uint32 block_start = ea - (ea % 32); - - if (block_start == cache_range.end) { - // Extend region to invalidate - cache_range.end += 32; - } - else { - // New region to invalidate - execute_invalidate_cache_range(); - cache_range.start = block_start; - cache_range.end = cache_range.start + 32; - } - - increment_pc(4); -} - -void powerpc_cpu::execute_isync(uint32 opcode) -{ - execute_invalidate_cache_range(); - increment_pc(4); -} - -/** - * (Fake) data cache management - **/ - -template< class RA, class RB > -void powerpc_cpu::execute_dcbz(uint32 opcode) -{ - uint32 ea = RA::get(this, opcode) + RB::get(this, opcode); - vm_memset(ea - (ea % 32), 0, 32); - increment_pc(4); -} - -/** - * Vector load/store instructions - **/ - -template< bool SL > -void powerpc_cpu::execute_vector_load_for_shift(uint32 opcode) -{ - const uint32 ra = operand_RA_or_0::get(this, opcode); - const uint32 rb = operand_RB::get(this, opcode); - const uint32 ea = ra + rb; - powerpc_vr & vD = vr(vD_field::extract(opcode)); - int j = SL ? (ea & 0xf) : (0x10 - (ea & 0xf)); - for (int i = 0; i < 16; i++) - vD.b[ev_mixed::byte_element(i)] = j++; - increment_pc(4); -} - -template< class VD, class RA, class RB > -void powerpc_cpu::execute_vector_load(uint32 opcode) -{ - uint32 ea = RA::get(this, opcode) + RB::get(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - switch (VD::element_size) { - case 1: - VD::set_element(vD, (ea & 0x0f), vm_read_memory_1(ea)); - break; - case 2: - VD::set_element(vD, ((ea >> 1) & 0x07), vm_read_memory_2(ea & ~1)); - break; - case 4: - VD::set_element(vD, ((ea >> 2) & 0x03), vm_read_memory_4(ea & ~3)); - break; - case 8: - ea &= ~15; - vD.w[0] = vm_read_memory_4(ea + 0); - vD.w[1] = vm_read_memory_4(ea + 4); - vD.w[2] = vm_read_memory_4(ea + 8); - vD.w[3] = vm_read_memory_4(ea + 12); - break; - } - increment_pc(4); -} - -template< class VS, class RA, class RB > -void powerpc_cpu::execute_vector_store(uint32 opcode) -{ - uint32 ea = RA::get(this, opcode) + RB::get(this, opcode); - typename VS::type & vS = VS::ref(this, opcode); - switch (VS::element_size) { - case 1: - vm_write_memory_1(ea, VS::get_element(vS, (ea & 0x0f))); - break; - case 2: - vm_write_memory_2(ea & ~1, VS::get_element(vS, ((ea >> 1) & 0x07))); - break; - case 4: - vm_write_memory_4(ea & ~3, VS::get_element(vS, ((ea >> 2) & 0x03))); - break; - case 8: - ea &= ~15; - vm_write_memory_4(ea + 0, vS.w[0]); - vm_write_memory_4(ea + 4, vS.w[1]); - vm_write_memory_4(ea + 8, vS.w[2]); - vm_write_memory_4(ea + 12, vS.w[3]); - break; - } - increment_pc(4); -} - -/** - * Vector arithmetic - * - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - * Rc Predicate to record CR6 - * C1 If recording CR6, do we check for '1' bits in vD? - **/ - -template< class OP, class VD, class VA, class VB, class VC, class Rc, int C1 > -void powerpc_cpu::execute_vector_arith(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VC::type const & vC = VC::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - for (int i = 0; i < n_elements; i++) { - const typename VA::element_type a = VA::get_element(vA, i); - const typename VB::element_type b = VB::get_element(vB, i); - const typename VC::element_type c = VC::get_element(vC, i); - typename VD::element_type d = op_apply::apply(a, b, c); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i, d); - } - - // Propagate all conditions to CR6 - if (Rc::test(opcode)) - record_cr6(vD, C1); - - increment_pc(4); -} - -/** - * Vector mixed arithmetic - * - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - **/ - -template< class OP, class VD, class VA, class VB, class VC > -void powerpc_cpu::execute_vector_arith_mixed(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VC::type const & vC = VC::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - const int n_sub_elements = 4 / VA::element_size; - - for (int i = 0; i < n_elements; i++) { - const typename VC::element_type c = VC::get_element(vC, i); - typename VD::element_type d = c; - for (int j = 0; j < n_sub_elements; j++) { - const typename VA::element_type a = VA::get_element(vA, i * n_sub_elements + j); - const typename VB::element_type b = VB::get_element(vB, i * n_sub_elements + j); - d += op_apply::apply(a, b, c); - } - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i, d); - } - - increment_pc(4); -} - -/** - * Vector odd/even arithmetic - * - * ODD Flag: are we computing every odd element? - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - **/ - -template< int ODD, class OP, class VD, class VA, class VB, class VC > -void powerpc_cpu::execute_vector_arith_odd(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VC::type const & vC = VC::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - for (int i = 0; i < n_elements; i++) { - const typename VA::element_type a = VA::get_element(vA, (i * 2) + ODD); - const typename VB::element_type b = VB::get_element(vB, (i * 2) + ODD); - const typename VC::element_type c = VC::get_element(vC, (i * 2) + ODD); - typename VD::element_type d = op_apply::apply(a, b, c); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i, d); - } - - increment_pc(4); -} - -/** - * Vector merge instructions - * - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - * LO Flag: use lower part of element - **/ - -template< class VD, class VA, class VB, int LO > -void powerpc_cpu::execute_vector_merge(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - for (int i = 0; i < n_elements; i += 2) { - VD::set_element(vD, i , VA::get_element(vA, (i / 2) + LO * (n_elements / 2))); - VD::set_element(vD, i + 1, VB::get_element(vB, (i / 2) + LO * (n_elements / 2))); - } - - increment_pc(4); -} - -/** - * Vector pack/unpack instructions - * - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - * LO Flag: use lower part of element - **/ - -template< class VD, class VA, class VB > -void powerpc_cpu::execute_vector_pack(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - const int n_pivot = n_elements / 2; - - for (int i = 0; i < n_elements; i++) { - typename VD::element_type d; - if (i < n_pivot) - d = VA::get_element(vA, i); - else - d = VB::get_element(vB, i - n_pivot); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i, d); - } - - increment_pc(4); -} - -template< int LO, class VD, class VA > -void powerpc_cpu::execute_vector_unpack(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - for (int i = 0; i < n_elements; i++) - VD::set_element(vD, i, VA::get_element(vA, i + LO * n_elements)); - - increment_pc(4); -} - -void powerpc_cpu::execute_vector_pack_pixel(uint32 opcode) -{ - powerpc_vr const & vA = vr(vA_field::extract(opcode)); - powerpc_vr const & vB = vr(vB_field::extract(opcode)); - powerpc_vr & vD = vr(vD_field::extract(opcode)); - - for (int i = 0; i < 4; i++) { - const uint32 a = vA.w[i]; - vD.h[ev_mixed::half_element(i)] = ((a >> 9) & 0xfc00) | ((a >> 6) & 0x03e0) | ((a >> 3) & 0x001f); - const uint32 b = vB.w[i]; - vD.h[ev_mixed::half_element(i + 4)] = ((b >> 9) & 0xfc00) | ((b >> 6) & 0x03e0) | ((b >> 3) & 0x001f); - } - - increment_pc(4); -} - -template< int LO > -void powerpc_cpu::execute_vector_unpack_pixel(uint32 opcode) -{ - powerpc_vr const & vB = vr(vB_field::extract(opcode)); - powerpc_vr & vD = vr(vD_field::extract(opcode)); - - for (int i = 0; i < 4; i++) { - const uint32 h = vB.h[ev_mixed::half_element(i + LO * 4)]; - vD.w[i] = (((h & 0x8000) ? 0xff000000 : 0) | - ((h & 0x7c00) << 6) | - ((h & 0x03e0) << 3) | - (h & 0x001f)); - } - - increment_pc(4); -} - -/** - * Vector shift instructions - * - * SD Shift direction: left (-1), right (+1) - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * VC Input operand vector (optional: operand_NONE) - * SH Shift count operand - **/ - -template< int SD > -void powerpc_cpu::execute_vector_shift(uint32 opcode) -{ - powerpc_vr const & vA = vr(vA_field::extract(opcode)); - powerpc_vr const & vB = vr(vB_field::extract(opcode)); - powerpc_vr & vD = vr(vD_field::extract(opcode)); - - // The contents of the low-order three bits of all byte - // elements in vB must be identical to vB[125-127]; otherwise - // the value placed into vD is undefined. - const int sh = vB.b[ev_mixed::byte_element(15)] & 7; - if (sh == 0) { - for (int i = 0; i < 4; i++) - vD.w[i] = vA.w[i]; - } - else { - uint32 prev_bits = 0; - if (SD < 0) { - for (int i = 3; i >= 0; i--) { - uint32 next_bits = vA.w[i] >> (32 - sh); - vD.w[i] = ((vA.w[i] << sh) | prev_bits); - prev_bits = next_bits; - } - } - else if (SD > 0) { - for (int i = 0; i < 4; i++) { - uint32 next_bits = vA.w[i] << (32 - sh); - vD.w[i] = ((vA.w[i] >> sh) | prev_bits); - prev_bits = next_bits; - } - } - } - - increment_pc(4); -} - -template< int SD, class VD, class VA, class VB, class SH > -void powerpc_cpu::execute_vector_shift_octet(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - const int sh = SH::get(this, opcode); - if (SD < 0) { - for (int i = 0; i < 16; i++) { - if (i + sh < 16) - VD::set_element(vD, i, VA::get_element(vA, i + sh)); - else - VD::set_element(vD, i, VB::get_element(vB, i - (16 - sh))); - } - } - else if (SD > 0) { - for (int i = 0; i < 16; i++) { - if (i < sh) - VD::set_element(vD, i, VB::get_element(vB, 16 - (i - sh))); - else - VD::set_element(vD, i, VA::get_element(vA, i - sh)); - } - } - - increment_pc(4); -} - -/** - * Vector splat instructions - * - * OP Operation to perform on element - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - * IM Immediate value to replicate - **/ - -template< class OP, class VD, class VB, bool IM > -void powerpc_cpu::execute_vector_splat(uint32 opcode) -{ - typename VD::type & vD = VD::ref(this, opcode); - const int n_elements = 16 / VD::element_size; - - uint32 value; - if (IM) - value = OP::apply(vUIMM_field::extract(opcode)); - else { - typename VB::type const & vB = VB::const_ref(this, opcode); - const int n = vUIMM_field::extract(opcode) & (n_elements - 1); - value = OP::apply(VB::get_element(vB, n)); - } - - for (int i = 0; i < n_elements; i++) - VD::set_element(vD, i, value); - - increment_pc(4); -} - -/** - * Vector sum instructions - * - * SZ Size of destination vector elements - * VD Output operand vector - * VA Input operand vector - * VB Input operand vector (optional: operand_NONE) - **/ - -template< int SZ, class VD, class VA, class VB > -void powerpc_cpu::execute_vector_sum(uint32 opcode) -{ - typename VA::type const & vA = VA::const_ref(this, opcode); - typename VB::type const & vB = VB::const_ref(this, opcode); - typename VD::type & vD = VD::ref(this, opcode); - typename VD::element_type d; - - switch (SZ) { - case 1: // vsum - d = VB::get_element(vB, 3); - for (int j = 0; j < 4; j++) - d += VA::get_element(vA, j); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, 0, 0); - VD::set_element(vD, 1, 0); - VD::set_element(vD, 2, 0); - VD::set_element(vD, 3, d); - break; - - case 2: // vsum2 - for (int i = 0; i < 4; i += 2) { - d = VB::get_element(vB, i + 1); - for (int j = 0; j < 2; j++) - d += VA::get_element(vA, i + j); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i + 0, 0); - VD::set_element(vD, i + 1, d); - } - break; - - case 4: // vsum4 - for (int i = 0; i < 4; i += 1) { - d = VB::get_element(vB, i); - const int n_elements = 4 / VA::element_size; - for (int j = 0; j < n_elements; j++) - d += VA::get_element(vA, i * n_elements + j); - if (VD::saturate(d)) - vscr().set_sat(1); - VD::set_element(vD, i, d); - } - break; - } - - increment_pc(4); -} - -/** - * Misc vector instructions - **/ - -void powerpc_cpu::execute_vector_permute(uint32 opcode) -{ - powerpc_vr const & vA = vr(vA_field::extract(opcode)); - powerpc_vr const & vB = vr(vB_field::extract(opcode)); - powerpc_vr const & vC = vr(vC_field::extract(opcode)); - powerpc_vr & vD = vr(vD_field::extract(opcode)); - - for (int i = 0; i < 16; i++) { - const int ei = ev_mixed::byte_element(i); - const int n = vC.b[ei] & 0x1f; - const int en = ev_mixed::byte_element(n & 0xf); - vD.b[ei] = (n & 0x10) ? vB.b[en] : vA.b[en]; - } - - increment_pc(4); -} - -void powerpc_cpu::execute_mfvscr(uint32 opcode) -{ - const int vD = vD_field::extract(opcode); - vr(vD).w[0] = 0; - vr(vD).w[1] = 0; - vr(vD).w[2] = 0; - vr(vD).w[3] = vscr().get(); - increment_pc(4); -} - -void powerpc_cpu::execute_mtvscr(uint32 opcode) -{ - const int vB = vB_field::extract(opcode); - vscr().set(vr(vB).w[3]); - increment_pc(4); -} - -/** - * Explicit template instantiations - **/ - -#include "ppc-execute-impl.cpp" diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.hpp deleted file mode 100644 index d3ce93f21..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.hpp +++ /dev/null @@ -1,380 +0,0 @@ -/* - * ppc-execute.hpp - PowerPC semantic action templates - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_EXECUTE_H -#define PPC_EXECUTE_H - -// This file is designed to be included from implementation files only. -#ifdef DYNGEN_OPS -#define PPC_CPU powerpc_dyngen_helper -#define DEFINE_HELPER(NAME, ARGS) static inline uint32 NAME ARGS -#define RETURN(VAL) dyngen_barrier(); return (VAL) -#else -#define PPC_CPU powerpc_cpu -#define DEFINE_HELPER(NAME, ARGS) inline uint32 powerpc_cpu::NAME ARGS -#define RETURN(VAL) return (VAL) -#endif - - -template< bool SB > struct register_value { typedef uint32 type; }; -template< > struct register_value< true > { typedef int32 type; }; - -/** - * Helper class to apply an unary/binary/trinary operation - * - * OP Operation to perform - * RA Input operand register - * RB Input operand register or immediate (optional: operand_NONE) - * RC Input operand register or immediate (optional: operand_NONE) - **/ - -struct null_operand; -struct null_vector_operand; - -template< class RT, class OP, class RA, class RB, class RC > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A a, B b, C c) { - return OP::apply(a, b, c); - } -}; - -template< class RT, class OP, class RA, class RB > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A a, B b, C) { - return OP::apply(a, b); - } -}; - -template< class RT, class OP, class RA > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A a, B, C) { - return OP::apply(a); - } -}; - -template< class RT, class OP, class RA, class RB > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A a, B b, C) { - return (RT)OP::apply(a, b); - } -}; - -template< class RT, class OP, class RA > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A a, B, C) { - return (RT)OP::apply(a); - } -}; - -template< class RT, class OP, class RB > -struct op_apply { - template< class A, class B, class C > - static inline RT apply(A, B b, C) { - return (RT)OP::apply(b); - } -}; - -/** - * Add instruction templates - **/ - -template< bool EX, bool CA, bool OE > -DEFINE_HELPER(do_execute_addition, (uint32 RA, uint32 RB)) -{ - uint32 RD = RA + RB + (EX ? PPC_CPU::xer().get_ca() : 0); - - const bool _RA = ((int32)RA) < 0; - const bool _RB = ((int32)RB) < 0; - const bool _RD = ((int32)RD) < 0; - - if (EX) { - const bool ca = _RB ^ ((_RB ^ _RA) & (_RA ^ _RD)); - PPC_CPU::xer().set_ca(ca); - } - else if (CA) { - const bool ca = (uint32)RD < (uint32)RA; - PPC_CPU::xer().set_ca(ca); - } - - if (OE) - PPC_CPU::xer().set_ov((_RB ^ _RD) & (_RA ^ _RD)); - - RETURN(RD); -} - -/** - * Subtract instruction templates - **/ - -template< bool CA, bool OE > -DEFINE_HELPER(do_execute_subtract, (uint32 RA, uint32 RB)) -{ - uint32 RD = RB - RA; - - const bool _RA = ((int32)RA) < 0; - const bool _RB = ((int32)RB) < 0; - const bool _RD = ((int32)RD) < 0; - - if (CA) - PPC_CPU::xer().set_ca((uint32)RD <= (uint32)RB); - - if (OE) - PPC_CPU::xer().set_ov((_RA ^ _RB) & (_RD ^ _RB)); - - RETURN(RD); -} - -template< bool OE > -DEFINE_HELPER(do_execute_subtract_extended, (uint32 RA, uint32 RB)) -{ - const uint32 RD = ~RA + RB + PPC_CPU::xer().get_ca(); - - const bool _RA = ((int32)RA) < 0; - const bool _RB = ((int32)RB) < 0; - const bool _RD = ((int32)RD) < 0; - - const bool ca = !_RA ^ ((_RA ^ _RD) & (_RB ^ _RD)); - PPC_CPU::xer().set_ca(ca); - - if (OE) - PPC_CPU::xer().set_ov((_RA ^ _RB) & (_RD ^ _RB)); - - RETURN(RD); -} - -/** - * Divide instruction templates - **/ - -template< bool SB, bool OE > -DEFINE_HELPER(do_execute_divide, (uint32 RA, uint32 RB)) -{ - typename register_value::type a = RA; - typename register_value::type b = RB; - uint32 RD; - - if (b == 0 || (SB && a == 0x80000000 && b == -1)) { - // Reference manual says result is undefined but it gets all - // bits set to MSB on a real processor - RD = SB ? ((int32)RA >> 31) : 0; - if (OE) - PPC_CPU::xer().set_ov(1); - } - else { - RD = a / b; - if (OE) - PPC_CPU::xer().set_ov(0); - } - - RETURN(RD); -} - -/** - * FP load/store - **/ - -// C.6 Floating-Point Load Instructions -static inline uint64 fp_load_single_convert(uint32 v) -{ - // XXX we currently use the native floating-point capabilities - any_register x; - x.i = v; - x.d = (double)x.f; - return x.j; -} - -// C.7 Floating-Point Store Instructions -static inline uint32 fp_store_single_convert(uint64 v) -{ - int exp = (v >> 52) & 0x7ff; - if (exp < 874 || exp > 896) { - // No denormalization required (or "undefined" behaviour) - // WORD[0 - 1] = frS[0 - 1] - // WORD[2 - 31] = frS[5 - 34] - return (uint32)(((v >> 32) & 0xc0000000) | ((v >> 29) & 0x3fffffff)); - } - - // Handle denormalization (874 <= frS[1 - 11] <= 896 - // XXX we currently use the native floating-point capabilities - any_register x; - x.j = v; - x.f = (float)x.d; - return x.i; -} - -/** - * FP classification - **/ - -static inline bool is_NaN(double v) -{ - any_register x; x.d = v; - return (((x.j & UVAL64(0x7ff0000000000000)) == UVAL64(0x7ff0000000000000)) && - ((x.j & UVAL64(0x000fffffffffffff)) != 0)); -} - -static inline bool is_QNaN(double v) -{ - any_register x; x.d = v; - return is_NaN(v) && (x.j & UVAL64(0x0008000000000000)); -} - -static inline bool is_SNaN(double v) -{ - return is_NaN(v) && !is_QNaN(v); -} - -static inline bool is_NaN(float v) -{ - any_register x; x.f = v; - return (((x.i & 0x7f800000) == 0x7f800000) && - ((x.i & 0x007fffff) != 0)); -} - -static inline bool is_QNaN(float v) -{ - any_register x; x.f = v; - return is_NaN(v) && (x.i & 0x00400000); -} - -static inline bool is_SNaN(float v) -{ - return is_NaN(v) && !is_QNaN(v); -} - -/** - * Check for FP Exception Conditions - **/ - -template< class OP > -struct fp_exception_condition { - static inline uint32 apply(double) { - return 0; - } - static inline uint32 apply(double, double) { - return 0; - } - static inline uint32 apply(double, double, double) { - return 0; - } -}; - -template< class FP > -struct fp_invalid_operation_condition { - static inline uint32 apply(int flags) { - uint32 exceptions = 0; - if (FPSCR_VXSOFT_field::test(flags)) - exceptions |= FPSCR_VXSOFT_field::mask(); - return 0; - } - static inline uint32 apply(int flags, FP a) { - uint32 exceptions = 0; - if (FPSCR_VXSNAN_field::test(flags) && is_SNaN(a)) - exceptions |= FPSCR_VXSNAN_field::mask(); - if (FPSCR_VXVC_field::test(flags) && is_NaN(a)) - exceptions |= FPSCR_VXVC_field::mask(); - if (FPSCR_VXSQRT_field::test(flags) && signbit(a)) - exceptions |= FPSCR_VXSQRT_field::mask(); - return exceptions; - } - static inline uint32 apply(int flags, FP a, FP b, bool negate = false) { - uint32 exceptions = apply(flags) | apply(flags, a) | apply(flags, b); - if (FPSCR_VXISI_field::test(flags) && isinf(a) && isinf(b)) { - if (( negate && (signbit(a) == signbit(b))) || - (!negate && (signbit(a) != signbit(b)))) - exceptions |= FPSCR_VXISI_field::mask(); - } - if (FPSCR_VXIDI_field::test(flags) && isinf(a) && isinf(b)) - exceptions |= FPSCR_VXIDI_field::mask(); - if (FPSCR_VXZDZ_field::test(flags) && a == 0 && b == 0) - exceptions |= FPSCR_VXZDZ_field::mask(); - if (FPSCR_VXIMZ_field::test(flags) && ((a == 0 && isinf(b)) || (isinf(a) && b == 0))) - exceptions |= FPSCR_VXIMZ_field::mask(); - return exceptions; - } -}; - -#define DEFINE_FP_INVALID_OPERATION(OP, TYPE, EXCP, NEGATE) \ -template<> \ -struct fp_exception_condition { \ - static inline uint32 apply(TYPE a, TYPE b) { \ - return fp_invalid_operation_condition::apply(EXCP, a, b, NEGATE); \ - } \ -}; - -DEFINE_FP_INVALID_OPERATION(op_fadd, double, FPSCR_VXSNAN_field::mask() | FPSCR_VXISI_field::mask(), 0); -DEFINE_FP_INVALID_OPERATION(op_fsub, double, FPSCR_VXSNAN_field::mask() | FPSCR_VXISI_field::mask(), 1); -DEFINE_FP_INVALID_OPERATION(op_fmul, double, FPSCR_VXSNAN_field::mask() | FPSCR_VXIMZ_field::mask(), 0); - -template< class FP > -struct fp_divide_exception_condition { - static inline uint32 apply(FP a, FP b) { - int exceptions = - fp_invalid_operation_condition:: - apply(FPSCR_VXSNAN_field::mask() | FPSCR_VXIDI_field::mask() | FPSCR_VXZDZ_field::mask(), - a, b); - if (isfinite(a) && a != 0 && b == 0) - exceptions = FPSCR_ZX_field::mask(); - return exceptions; - } -}; - -template<> struct fp_exception_condition : fp_divide_exception_condition { }; - -template< class FP, bool negate > -struct fp_fma_exception_condition { - static inline uint32 apply(FP a, FP b, FP c) { - int exceptions = - fp_invalid_operation_condition:: - apply(FPSCR_VXSNAN_field::mask(), a) | - fp_invalid_operation_condition:: - apply(FPSCR_VXSNAN_field::mask(), b) | - fp_invalid_operation_condition:: - apply(FPSCR_VXSNAN_field::mask(), c) | - fp_invalid_operation_condition:: - apply(FPSCR_VXIMZ_field::mask(), a, b); - // 2.1.5 -- The XER bit definitions are based on the - // operation of an instruction considered as a whole, - // not on intermediate results - if ((isinf(a) || isinf(b)) && isinf(c)) { - FP m = a * b; - if (isinf(m)) { - // make sure the intermediate result is an infinity and not a NaN - // FIXME: it could be faster to use (exceptions & IMZ) == 0 instead of isinf() - if (( negate && (signbit(m) == signbit(c))) || - (!negate && (signbit(m) != signbit(c)))) - exceptions |= FPSCR_VXISI_field::mask(); - } - } - return exceptions; - } -}; - -template<> struct fp_exception_condition : fp_fma_exception_condition { }; -template<> struct fp_exception_condition : fp_fma_exception_condition { }; -template<> struct fp_exception_condition : fp_fma_exception_condition { }; -template<> struct fp_exception_condition : fp_fma_exception_condition { }; - -#endif /* PPC_EXECUTE_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp deleted file mode 100644 index c42b61d18..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp +++ /dev/null @@ -1,366 +0,0 @@ -/* - * ppc-instructions.hpp - PowerPC instructions IDs - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_INSTRUCTIONS_H -#define PPC_INSTRUCTIONS_H - -/** - * Define PowerPC instruction types - **/ - -#define PPC_I(X) powerpc_instruction_##X - -enum powerpc_instruction { - PPC_I(INVALID), - PPC_I(ADD), - PPC_I(ADDC), - PPC_I(ADDE), - PPC_I(ADDI), - PPC_I(ADDIC), - PPC_I(ADDIC_), - PPC_I(ADDIS), - PPC_I(ADDME), - PPC_I(ADDZE), - PPC_I(AND), - PPC_I(ANDC), - PPC_I(ANDI), - PPC_I(ANDIS), - PPC_I(B), - PPC_I(BC), - PPC_I(BCCTR), - PPC_I(BCLR), - PPC_I(CMP), - PPC_I(CMPI), - PPC_I(CMPL), - PPC_I(CMPLI), - PPC_I(CNTLZW), - PPC_I(CRAND), - PPC_I(CRANDC), - PPC_I(CREQV), - PPC_I(CRNAND), - PPC_I(CRNOR), - PPC_I(CROR), - PPC_I(CRORC), - PPC_I(CRXOR), - PPC_I(DCBA), - PPC_I(DCBF), - PPC_I(DCBI), - PPC_I(DCBST), - PPC_I(DCBT), - PPC_I(DCBTST), - PPC_I(DCBZ), - PPC_I(DIVW), - PPC_I(DIVWU), - PPC_I(DSS), - PPC_I(DST), - PPC_I(DSTST), - PPC_I(ECIWX), - PPC_I(ECOWX), - PPC_I(EIEIO), - PPC_I(EQV), - PPC_I(EXTSB), - PPC_I(EXTSH), - PPC_I(FABS), - PPC_I(FADD), - PPC_I(FADDS), - PPC_I(FCMPO), - PPC_I(FCMPU), - PPC_I(FCTIW), - PPC_I(FCTIWZ), - PPC_I(FDIV), - PPC_I(FDIVS), - PPC_I(FMADD), - PPC_I(FMADDS), - PPC_I(FMR), - PPC_I(FMSUB), - PPC_I(FMSUBS), - PPC_I(FMUL), - PPC_I(FMULS), - PPC_I(FNABS), - PPC_I(FNEG), - PPC_I(FNMADD), - PPC_I(FNMADDS), - PPC_I(FNMSUB), - PPC_I(FNMSUBS), - PPC_I(FRSP), - PPC_I(FSEL), - PPC_I(FSUB), - PPC_I(FSUBS), - PPC_I(ICBI), - PPC_I(ISYNC), - PPC_I(LBZ), - PPC_I(LBZU), - PPC_I(LBZUX), - PPC_I(LBZX), - PPC_I(LFD), - PPC_I(LFDU), - PPC_I(LFDUX), - PPC_I(LFDX), - PPC_I(LFS), - PPC_I(LFSU), - PPC_I(LFSUX), - PPC_I(LFSX), - PPC_I(LHA), - PPC_I(LHAU), - PPC_I(LHAUX), - PPC_I(LHAX), - PPC_I(LHBRX), - PPC_I(LHZ), - PPC_I(LHZU), - PPC_I(LHZUX), - PPC_I(LHZX), - PPC_I(LMW), - PPC_I(LSWI), - PPC_I(LSWX), - PPC_I(LVEBX), - PPC_I(LVEHX), - PPC_I(LVEWX), - PPC_I(LVSL), - PPC_I(LVSR), - PPC_I(LVX), - PPC_I(LVXL), - PPC_I(LWARX), - PPC_I(LWBRX), - PPC_I(LWZ), - PPC_I(LWZU), - PPC_I(LWZUX), - PPC_I(LWZX), - PPC_I(MCRF), - PPC_I(MCRFS), - PPC_I(MCRXR), - PPC_I(MFCR), - PPC_I(MFFS), - PPC_I(MFMSR), - PPC_I(MFSPR), - PPC_I(MFTB), - PPC_I(MFVSCR), - PPC_I(MTCRF), - PPC_I(MTFSB0), - PPC_I(MTFSB1), - PPC_I(MTFSF), - PPC_I(MTFSFI), - PPC_I(MTSPR), - PPC_I(MTVSCR), - PPC_I(MULHW), - PPC_I(MULHWU), - PPC_I(MULLI), - PPC_I(MULLW), - PPC_I(NAND), - PPC_I(NEG), - PPC_I(NOR), - PPC_I(OR), - PPC_I(ORC), - PPC_I(ORI), - PPC_I(ORIS), - PPC_I(RLWIMI), - PPC_I(RLWINM), - PPC_I(RLWNM), - PPC_I(SC), - PPC_I(SLW), - PPC_I(SRAW), - PPC_I(SRAWI), - PPC_I(SRW), - PPC_I(STB), - PPC_I(STBU), - PPC_I(STBUX), - PPC_I(STBX), - PPC_I(STFD), - PPC_I(STFDU), - PPC_I(STFDUX), - PPC_I(STFDX), - PPC_I(STFS), - PPC_I(STFSU), - PPC_I(STFSUX), - PPC_I(STFSX), - PPC_I(STH), - PPC_I(STHBRX), - PPC_I(STHU), - PPC_I(STHUX), - PPC_I(STHX), - PPC_I(STMW), - PPC_I(STSWI), - PPC_I(STSWX), - PPC_I(STVEBX), - PPC_I(STVEHX), - PPC_I(STVEWX), - PPC_I(STVX), - PPC_I(STVXL), - PPC_I(STW), - PPC_I(STWBRX), - PPC_I(STWCX), - PPC_I(STWU), - PPC_I(STWUX), - PPC_I(STWX), - PPC_I(SUBF), - PPC_I(SUBFC), - PPC_I(SUBFE), - PPC_I(SUBFIC), - PPC_I(SUBFME), - PPC_I(SUBFZE), - PPC_I(SYNC), - PPC_I(XOR), - PPC_I(XORI), - PPC_I(XORIS), - PPC_I(VADDCUW), - PPC_I(VADDFP), - PPC_I(VADDSBS), - PPC_I(VADDSHS), - PPC_I(VADDSWS), - PPC_I(VADDUBM), - PPC_I(VADDUBS), - PPC_I(VADDUHM), - PPC_I(VADDUHS), - PPC_I(VADDUWM), - PPC_I(VADDUWS), - PPC_I(VAND), - PPC_I(VANDC), - PPC_I(VAVGSB), - PPC_I(VAVGSH), - PPC_I(VAVGSW), - PPC_I(VAVGUB), - PPC_I(VAVGUH), - PPC_I(VAVGUW), - PPC_I(VCFSX), - PPC_I(VCFUX), - PPC_I(VCMPBFP), - PPC_I(VCMPEQFP), - PPC_I(VCMPEQUB), - PPC_I(VCMPEQUH), - PPC_I(VCMPEQUW), - PPC_I(VCMPGEFP), - PPC_I(VCMPGTFP), - PPC_I(VCMPGTSB), - PPC_I(VCMPGTSH), - PPC_I(VCMPGTSW), - PPC_I(VCMPGTUB), - PPC_I(VCMPGTUH), - PPC_I(VCMPGTUW), - PPC_I(VCTSXS), - PPC_I(VCTUXS), - PPC_I(VEXPTEFP), - PPC_I(VLOGEFP), - PPC_I(VMADDFP), - PPC_I(VMAXFP), - PPC_I(VMAXSB), - PPC_I(VMAXSH), - PPC_I(VMAXSW), - PPC_I(VMAXUB), - PPC_I(VMAXUH), - PPC_I(VMAXUW), - PPC_I(VMHADDSHS), - PPC_I(VMHRADDSHS), - PPC_I(VMINFP), - PPC_I(VMINSB), - PPC_I(VMINSH), - PPC_I(VMINSW), - PPC_I(VMINUB), - PPC_I(VMINUH), - PPC_I(VMINUW), - PPC_I(VMLADDUHM), - PPC_I(VMRGHB), - PPC_I(VMRGHH), - PPC_I(VMRGHW), - PPC_I(VMRGLB), - PPC_I(VMRGLH), - PPC_I(VMRGLW), - PPC_I(VMSUMMBM), - PPC_I(VMSUMSHM), - PPC_I(VMSUMSHS), - PPC_I(VMSUMUBM), - PPC_I(VMSUMUHM), - PPC_I(VMSUMUHS), - PPC_I(VMULESB), - PPC_I(VMULESH), - PPC_I(VMULEUB), - PPC_I(VMULEUH), - PPC_I(VMULOSB), - PPC_I(VMULOSH), - PPC_I(VMULOUB), - PPC_I(VMULOUH), - PPC_I(VNMSUBFP), - PPC_I(VNOR), - PPC_I(VOR), - PPC_I(VPERM), - PPC_I(VPKPX), - PPC_I(VPKSHSS), - PPC_I(VPKSHUS), - PPC_I(VPKSWSS), - PPC_I(VPKSWUS), - PPC_I(VPKUHUM), - PPC_I(VPKUHUS), - PPC_I(VPKUWUM), - PPC_I(VPKUWUS), - PPC_I(VREFP), - PPC_I(VRFIM), - PPC_I(VRFIN), - PPC_I(VRFIP), - PPC_I(VRFIZ), - PPC_I(VRLB), - PPC_I(VRLH), - PPC_I(VRLW), - PPC_I(VRSQRTEFP), - PPC_I(VSEL), - PPC_I(VSL), - PPC_I(VSLB), - PPC_I(VSLDOI), - PPC_I(VSLH), - PPC_I(VSLO), - PPC_I(VSLW), - PPC_I(VSPLTB), - PPC_I(VSPLTH), - PPC_I(VSPLTISB), - PPC_I(VSPLTISH), - PPC_I(VSPLTISW), - PPC_I(VSPLTW), - PPC_I(VSR), - PPC_I(VSRAB), - PPC_I(VSRAH), - PPC_I(VSRAW), - PPC_I(VSRB), - PPC_I(VSRH), - PPC_I(VSRO), - PPC_I(VSRW), - PPC_I(VSUBCUW), - PPC_I(VSUBFP), - PPC_I(VSUBSBS), - PPC_I(VSUBSHS), - PPC_I(VSUBSWS), - PPC_I(VSUBUBM), - PPC_I(VSUBUBS), - PPC_I(VSUBUHM), - PPC_I(VSUBUHS), - PPC_I(VSUBUWM), - PPC_I(VSUBUWS), - PPC_I(VSUMSWS), - PPC_I(VSUM2SWS), - PPC_I(VSUM4SBS), - PPC_I(VSUM4SHS), - PPC_I(VSUM4UBS), - PPC_I(VUPKHPX), - PPC_I(VUPKHSB), - PPC_I(VUPKHSH), - PPC_I(VUPKLPX), - PPC_I(VUPKLSB), - PPC_I(VUPKLSH), - PPC_I(VXOR), - PPC_I(MAX) // Total number of instruction types -}; - -#endif /* PPC_INSTRUCTIONS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp deleted file mode 100644 index 4b294401e..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp +++ /dev/null @@ -1,942 +0,0 @@ -/* - * ppc-jit.cpp - PowerPC dynamic translation (mid-level) - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "cpu/jit/dyngen-exec.h" -#include "cpu/ppc/ppc-jit.hpp" -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-instructions.hpp" -#include "cpu/ppc/ppc-operands.hpp" -#include "utils/utils-cpuinfo.hpp" -#include "utils/utils-sentinel.hpp" - -// Mid-level code generator info -const powerpc_jit::jit_info_t *powerpc_jit::jit_info[PPC_I(MAX)]; - -// PowerPC JIT initializer -powerpc_jit::powerpc_jit(dyngen_cpu_base cpu) - : powerpc_dyngen(cpu) -{ -} - -bool powerpc_jit::initialize(void) -{ - if (!powerpc_dyngen::initialize()) - return false; - - static bool once = true; - - if (once) { - once = false; - - // default to no handler - static const jit_info_t jit_not_available = { - -1, - (gen_handler_t)&powerpc_jit::gen_not_available, - }; - for (int i = 0; i < PPC_I(MAX); i++) - jit_info[i] = &jit_not_available; - - // generic altivec handlers - static const jit_info_t gen_vector[] = { -#define DEFINE_OP(MNEMO, GEN_OP, DYNGEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_vector_generic_##GEN_OP, &powerpc_dyngen::gen_op_##DYNGEN_OP } - DEFINE_OP(VADDFP, 2, vaddfp_VD_V0_V1), - DEFINE_OP(VSUBFP, 2, vsubfp_VD_V0_V1), - DEFINE_OP(VMADDFP, 3, vmaddfp_VD_V0_V1_V2), - DEFINE_OP(VNMSUBFP, 3, vnmsubfp_VD_V0_V1_V2), - DEFINE_OP(VAND, 2, vand_VD_V0_V1), - DEFINE_OP(VANDC, 2, vandc_VD_V0_V1), - DEFINE_OP(VNOR, 2, vnor_VD_V0_V1), - DEFINE_OP(VOR, 2, vor_VD_V0_V1), - DEFINE_OP(VXOR, 2, vxor_VD_V0_V1), - DEFINE_OP(MFVSCR, 1, mfvscr_VD), - DEFINE_OP(MTVSCR, 1, mtvscr_V0), -#undef DEFINE_OP -#define DEFINE_OP(MNEMO, GEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_vector_generic_##GEN_OP, } - DEFINE_OP(LVX, load), - DEFINE_OP(LVXL, load), - DEFINE_OP(LVEWX, load_word), - DEFINE_OP(STVX, store), - DEFINE_OP(STVXL, store), - DEFINE_OP(STVEWX, store_word), -#undef DEFINE_OP - }; - for (int i = 0; i < sizeof(gen_vector) / sizeof(gen_vector[0]); i++) - jit_info[gen_vector[i].mnemo] = &gen_vector[i]; - -#if defined(__i386__) || defined(__x86_64__) - // x86 optimized handlers - static const jit_info_t x86_vector[] = { -#define DEFINE_OP(MNEMO, GEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_x86_##GEN_OP, } - DEFINE_OP(MTVSCR, mtvscr), - DEFINE_OP(MFVSCR, mfvscr), - DEFINE_OP(LVX, lvx), - DEFINE_OP(LVXL, lvx), - DEFINE_OP(STVX, stvx), - DEFINE_OP(STVXL, stvx) -#undef DEFINE_OP - }; - for (int i = 0; i < sizeof(x86_vector) / sizeof(x86_vector[0]); i++) - jit_info[x86_vector[i].mnemo] = &x86_vector[i]; - - // MMX optimized handlers - static const jit_info_t mmx_vector[] = { -#define DEFINE_OP(MNEMO, GEN_OP, DYNGEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_mmx_arith_##GEN_OP, &powerpc_dyngen::gen_op_mmx_##DYNGEN_OP } - DEFINE_OP(VADDUBM, 2, vaddubm), - DEFINE_OP(VADDUHM, 2, vadduhm), - DEFINE_OP(VADDUWM, 2, vadduwm), - DEFINE_OP(VAND, 2, vand), - DEFINE_OP(VANDC, 2, vandc), - DEFINE_OP(VCMPEQUB, c, vcmpequb), - DEFINE_OP(VCMPEQUH, c, vcmpequh), - DEFINE_OP(VCMPEQUW, c, vcmpequw), - DEFINE_OP(VCMPGTSB, c, vcmpgtsb), - DEFINE_OP(VCMPGTSH, c, vcmpgtsh), - DEFINE_OP(VCMPGTSW, c, vcmpgtsw), - DEFINE_OP(VOR, 2, vor), - DEFINE_OP(VSUBUBM, 2, vsububm), - DEFINE_OP(VSUBUHM, 2, vsubuhm), - DEFINE_OP(VSUBUWM, 2, vsubuwm), - DEFINE_OP(VXOR, 2, vxor) -#undef DEFINE_OP - }; - if (cpuinfo_check_mmx()) { - for (int i = 0; i < sizeof(mmx_vector) / sizeof(mmx_vector[0]); i++) - jit_info[mmx_vector[i].mnemo] = &mmx_vector[i]; - } - - // SSE optimized handlers - static const jit_info_t sse_vector[] = { - // new MMX instructions brought into SSE capable CPUs -#define DEFINE_OP(MNEMO, GEN_OP, DYNGEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_mmx_arith_##GEN_OP, &powerpc_dyngen::gen_op_mmx_##DYNGEN_OP } - DEFINE_OP(VMAXSH, 2, vmaxsh), - DEFINE_OP(VMAXUB, 2, vmaxub), - DEFINE_OP(VMINSH, 2, vminsh), - DEFINE_OP(VMINUB, 2, vminub), -#undef DEFINE_OP - // full SSE instructions -#define DEFINE_OP(MNEMO, GEN_OP, TYPE_OP, SSE_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_sse_arith_##GEN_OP, (X86_INSN_SSE_##TYPE_OP << 8) | X86_SSE_##SSE_OP } - DEFINE_OP(VADDFP, 2, PS,ADD), - DEFINE_OP(VAND, 2, PS,AND), - DEFINE_OP(VANDC, s, PS,ANDN), - DEFINE_OP(VMAXFP, 2, PS,MAX), - DEFINE_OP(VMINFP, 2, PS,MIN), - DEFINE_OP(VOR, 2, PS,OR), - DEFINE_OP(VSUBFP, 2, PS,SUB), - DEFINE_OP(VXOR, 2, PS,XOR), - DEFINE_OP(VMINUB, 2, PI,PMINUB), - DEFINE_OP(VMAXUB, 2, PI,PMAXUB), - DEFINE_OP(VMINSH, 2, PI,PMINSW), - DEFINE_OP(VMAXSH, 2, PI,PMAXSW), - DEFINE_OP(VAVGUB, 2, PI,PAVGB), - DEFINE_OP(VAVGUH, 2, PI,PAVGW), -#undef DEFINE_OP -#define DEFINE_OP(MNEMO, COND) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_sse_arith_c, X86_SSE_CC_##COND } - DEFINE_OP(VCMPEQFP, EQ), - DEFINE_OP(VCMPGEFP, GE), - DEFINE_OP(VCMPGTFP, GT), -#undef DEFINE_OP -#define DEFINE_OP(MNEMO, GEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_sse_##GEN_OP } - DEFINE_OP(VSEL, vsel), - DEFINE_OP(VMADDFP, vmaddfp), - DEFINE_OP(VNMSUBFP, vnmsubfp) -#undef DEFINE_OP - }; - - if (cpuinfo_check_sse()) { - for (int i = 0; i < sizeof(sse_vector) / sizeof(sse_vector[0]); i++) - jit_info[sse_vector[i].mnemo] = &sse_vector[i]; - } - - // SSE2 optimized handlers - static const jit_info_t sse2_vector[] = { -#define DEFINE_OP(MNEMO, GEN_OP, TYPE_OP, SSE_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_sse2_arith_##GEN_OP, (X86_INSN_SSE_##TYPE_OP << 8) | X86_SSE_##SSE_OP } - DEFINE_OP(VADDUBM, 2, PI,PADDB), - DEFINE_OP(VADDUHM, 2, PI,PADDW), - DEFINE_OP(VADDUWM, 2, PI,PADDD), - DEFINE_OP(VSUBUBM, 2, PI,PSUBB), - DEFINE_OP(VSUBUHM, 2, PI,PSUBW), - DEFINE_OP(VSUBUWM, 2, PI,PSUBD), - DEFINE_OP(VAND, 2, PI,PAND), - DEFINE_OP(VANDC, s, PI,PANDN), - DEFINE_OP(VOR, 2, PI,POR), - DEFINE_OP(VXOR, 2, PI,PXOR), - DEFINE_OP(VCMPEQUB, c, PI,PCMPEQB), - DEFINE_OP(VCMPEQUH, c, PI,PCMPEQW), - DEFINE_OP(VCMPEQUW, c, PI,PCMPEQD), - DEFINE_OP(VCMPGTSB, c, PI,PCMPGTB), - DEFINE_OP(VCMPGTSH, c, PI,PCMPGTW), - DEFINE_OP(VCMPGTSW, c, PI,PCMPGTD), - DEFINE_OP(VREFP, 2, PS,RCP), - DEFINE_OP(VRSQRTEFP,2, PS,RSQRT), -#undef DEFINE_OP -#define DEFINE_OP(MNEMO, GEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_sse2_##GEN_OP, } - DEFINE_OP(VSEL, vsel), - DEFINE_OP(VSLDOI, vsldoi), - DEFINE_OP(VSPLTB, vspltb), - DEFINE_OP(VSPLTH, vsplth), - DEFINE_OP(VSPLTW, vspltw), - DEFINE_OP(VSPLTISB, vspltisb), - DEFINE_OP(VSPLTISH, vspltish), - DEFINE_OP(VSPLTISW, vspltisw) -#undef DEFINE_OP - }; - - if (cpuinfo_check_sse2()) { - for (int i = 0; i < sizeof(sse2_vector) / sizeof(sse2_vector[0]); i++) - jit_info[sse2_vector[i].mnemo] = &sse2_vector[i]; - } - - // SSSE3 optimized handlers - static const jit_info_t ssse3_vector[] = { -#define DEFINE_OP(MNEMO, GEN_OP) \ - { PPC_I(MNEMO), (gen_handler_t)&powerpc_jit::gen_ssse3_##GEN_OP, } - DEFINE_OP(LVX, lvx), - DEFINE_OP(LVXL, lvx), - DEFINE_OP(STVX, stvx), - DEFINE_OP(STVXL, stvx), - DEFINE_OP(VPERM, vperm) -#undef DEFINE_OP - }; - - if (cpuinfo_check_ssse3()) { - for (int i = 0; i < sizeof(ssse3_vector) / sizeof(ssse3_vector[0]); i++) - jit_info[ssse3_vector[i].mnemo] = &ssse3_vector[i]; - } -#endif - } - - return true; -} - -// Dispatch mid-level code generators -bool powerpc_jit::gen_vector_1(int mnemo, int vD) -{ - return (this->*((bool (powerpc_jit::*)(int, int))jit_info[mnemo]->handler))(mnemo, vD); -} - -bool powerpc_jit::gen_vector_2(int mnemo, int vD, int vA, int vB) -{ - return (this->*((bool (powerpc_jit::*)(int, int, int, int))jit_info[mnemo]->handler))(mnemo, vD, vA, vB); -} - -bool powerpc_jit::gen_vector_3(int mnemo, int vD, int vA, int vB, int vC) -{ - return (this->*((bool (powerpc_jit::*)(int, int, int, int, int))jit_info[mnemo]->handler))(mnemo, vD, vA, vB, vC); -} - -bool powerpc_jit::gen_vector_compare(int mnemo, int vD, int vA, int vB, bool Rc) -{ - return (this->*((bool (powerpc_jit::*)(int, int, int, int, bool))jit_info[mnemo]->handler))(mnemo, vD, vA, vB, Rc); -} - - -bool powerpc_jit::gen_not_available(int mnemo) -{ - return false; -} - -bool powerpc_jit::gen_vector_generic_1(int mnemo, int vD) -{ - gen_load_ad_VD_VR(vD); - (this->*(jit_info[mnemo]->o.dyngen_handler))(); - return true; -} - -bool powerpc_jit::gen_vector_generic_2(int mnemo, int vD, int vA, int vB) -{ - gen_load_ad_VD_VR(vD); - gen_load_ad_V0_VR(vA); - gen_load_ad_V1_VR(vB); - (this->*(jit_info[mnemo]->o.dyngen_handler))(); - return true; -} - -bool powerpc_jit::gen_vector_generic_3(int mnemo, int vD, int vA, int vB, int vC) -{ - gen_load_ad_VD_VR(vD); - gen_load_ad_V0_VR(vA); - gen_load_ad_V1_VR(vB); - gen_load_ad_V2_VR(vC); - (this->*(jit_info[mnemo]->o.dyngen_handler))(); - return true; -} - -bool powerpc_jit::gen_vector_generic_c(int mnemo, int vD, int vA, int vB, bool Rc) -{ - gen_vector_generic_2(mnemo, vD, vA, vB); - if (Rc) - gen_record_cr6_VD(); - return true; -} - -bool powerpc_jit::gen_vector_generic_load(int mnemo, int vD, int rA, int rB) -{ - // NOTE: T0/VD are clobbered in the following instructions! - gen_load_T0_GPR(rB); - if (rA != 0) { - gen_load_T1_GPR(rA); - gen_add_32_T0_T1(); - } - gen_load_vect_VD_T0(vD); - return true; -} - -bool powerpc_jit::gen_vector_generic_store(int mnemo, int vS, int rA, int rB) -{ - // NOTE: T0/VS are clobbered in the following instructions! - gen_load_T0_GPR(rB); - if (rA != 0) { - gen_load_T1_GPR(rA); - gen_add_32_T0_T1(); - } - gen_store_vect_VS_T0(vS); - return true; -} - -bool powerpc_jit::gen_vector_generic_load_word(int mnemo, int vD, int rA, int rB) -{ - // NOTE: T0/VD are clobbered in the following instructions! - gen_load_T0_GPR(rB); - if (rA != 0) { - gen_load_T1_GPR(rA); - gen_add_32_T0_T1(); - } - gen_load_word_VD_T0(vD); - return true; -} - -bool powerpc_jit::gen_vector_generic_store_word(int mnemo, int vS, int rA, int rB) -{ - // NOTE: T0/VS are clobbered in the following instructions! - gen_load_T0_GPR(rB); - if (rA != 0) { - gen_load_T1_GPR(rA); - gen_add_32_T0_T1(); - } - gen_store_word_VS_T0(vS); - return true; -} - -#if PPC_PROFILE_REGS_USE -// XXX update reginfo[] counts for xPPC_GPR() accesses -static uint8 dummy_ppc_context[sizeof(powerpc_cpu)]; -#define xPPC_CONTEXT ((powerpc_cpu *)dummy_ppc_context) -#else -#define xPPC_CONTEXT ((powerpc_cpu *)0) -#endif -#define xPPC_FIELD(M) (((uintptr)&xPPC_CONTEXT->M) - (uintptr)xPPC_CONTEXT) -#define xPPC_GPR(N) xPPC_FIELD(gpr(N)) -#define xPPC_VR(N) xPPC_FIELD(vr(N)) -#define xPPC_CR xPPC_FIELD(cr()) -#define xPPC_VSCR xPPC_FIELD(vscr()) - -#if defined(__i386__) || defined(__x86_64__) -/* - * X86 optimizations - */ - -// mtvscr -bool powerpc_jit::gen_x86_mtvscr(int mnemo, int vD) -{ - gen_mov_32(x86_memory_operand(xPPC_VR(vD) + 3*4, REG_CPU_ID), REG_T0_ID); - gen_mov_32(REG_T0_ID, x86_memory_operand(xPPC_VSCR, REG_CPU_ID)); - return true; -} - -// mfvscr -bool powerpc_jit::gen_x86_mfvscr(int mnemo, int vB) -{ - gen_xor_32(REG_T0_ID, REG_T0_ID); - gen_mov_32(x86_memory_operand(xPPC_VSCR, REG_CPU_ID), REG_T1_ID); -#if SIZEOF_VOID_P == 8 - gen_mov_64(REG_T0_ID, x86_memory_operand(xPPC_VR(vB) + 0*4, REG_CPU_ID)); -#else - gen_mov_32(REG_T0_ID, x86_memory_operand(xPPC_VR(vB) + 0*4, REG_CPU_ID)); - gen_mov_32(REG_T0_ID, x86_memory_operand(xPPC_VR(vB) + 1*4, REG_CPU_ID)); -#endif - gen_mov_32(REG_T0_ID, x86_memory_operand(xPPC_VR(vB) + 2*4, REG_CPU_ID)); - gen_mov_32(REG_T1_ID, x86_memory_operand(xPPC_VR(vB) + 3*4, REG_CPU_ID)); - return true; -} - -// lvx, lvxl -bool powerpc_jit::gen_x86_lvx(int mnemo, int vD, int rA, int rB) -{ - gen_mov_32(x86_memory_operand(xPPC_GPR(rB), REG_CPU_ID), REG_T0_ID); - if (rA != 0) - gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); - gen_and_32(x86_immediate_operand(-16), REG_T0_ID); -#if SIZEOF_VOID_P == 8 - gen_mov_64(x86_memory_operand(0, REG_T0_ID), REG_T1_ID); - gen_mov_64(x86_memory_operand(8, REG_T0_ID), REG_T2_ID); - gen_bswap_64(REG_T1_ID); - gen_bswap_64(REG_T2_ID); - gen_rol_64(x86_immediate_operand(32), REG_T1_ID); - gen_rol_64(x86_immediate_operand(32), REG_T2_ID); - gen_mov_64(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 0, REG_CPU_ID)); - gen_mov_64(REG_T2_ID, x86_memory_operand(xPPC_VR(vD) + 8, REG_CPU_ID)); -#else - gen_mov_32(x86_memory_operand(0*4, REG_T0_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(1*4, REG_T0_ID), REG_T2_ID); - gen_bswap_32(REG_T1_ID); - gen_bswap_32(REG_T2_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 0*4, REG_CPU_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(xPPC_VR(vD) + 1*4, REG_CPU_ID)); - gen_mov_32(x86_memory_operand(2*4, REG_T0_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(3*4, REG_T0_ID), REG_T2_ID); - gen_bswap_32(REG_T1_ID); - gen_bswap_32(REG_T2_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 2*4, REG_CPU_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(xPPC_VR(vD) + 3*4, REG_CPU_ID)); -#endif - return true; -} - -// stvx, stvxl -bool powerpc_jit::gen_x86_stvx(int mnemo, int vS, int rA, int rB) -{ - // NOTE: primitive scheduling - gen_mov_32(x86_memory_operand(xPPC_GPR(rB), REG_CPU_ID), REG_T0_ID); -#if SIZEOF_VOID_P == 8 - gen_mov_64(x86_memory_operand(xPPC_VR(vS) + 0, REG_CPU_ID), REG_T1_ID); - gen_mov_64(x86_memory_operand(xPPC_VR(vS) + 8, REG_CPU_ID), REG_T2_ID); - if (rA != 0) - gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); - gen_bswap_64(REG_T1_ID); - gen_bswap_64(REG_T2_ID); - gen_and_32(x86_immediate_operand(-16), REG_T0_ID); - gen_rol_64(x86_immediate_operand(32), REG_T1_ID); - gen_rol_64(x86_immediate_operand(32), REG_T2_ID); - gen_mov_64(REG_T1_ID, x86_memory_operand(0, REG_T0_ID)); - gen_mov_64(REG_T2_ID, x86_memory_operand(8, REG_T0_ID)); -#else - gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 0*4, REG_CPU_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 1*4, REG_CPU_ID), REG_T2_ID); - if (rA != 0) - gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); - gen_bswap_32(REG_T1_ID); - gen_bswap_32(REG_T2_ID); - gen_and_32(x86_immediate_operand(-16), REG_T0_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(0*4, REG_T0_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(1*4, REG_T0_ID)); - gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 2*4, REG_CPU_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 3*4, REG_CPU_ID), REG_T2_ID); - gen_bswap_32(REG_T1_ID); - gen_bswap_32(REG_T2_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(2*4, REG_T0_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(3*4, REG_T0_ID)); -#endif - return true; -} - -/* - * MMX optimizations - */ - -// Generic MMX arith -bool powerpc_jit::gen_mmx_arith_2(int mnemo, int vD, int vA, int vB) -{ - gen_load_ad_VD_VR(vD); - gen_load_ad_V0_VR(vA); - gen_load_ad_V1_VR(vB); - (this->*(jit_info[mnemo]->o.dyngen_handler))(); - gen_op_emms(); - return true; -} - -// MMX comparison -bool powerpc_jit::gen_mmx_arith_c(int mnemo, int vD, int vA, int vB, bool Rc) -{ - gen_mmx_arith_2(mnemo, vD, vA, vB); - if (Rc) - gen_record_cr6_VD(); - return true; -} - -/* - * SSE optimizations - */ - -// Record CR6 (vD contains the result of the CMP instruction) -void powerpc_jit::gen_sse_record_cr6(int vD) -{ - // NOTE: %ecx & %edx are caller saved registers and not static allocated at this time - assert(REG_T2_ID != (int)X86_ECX && REG_T2_ID != (int)X86_EDX); - gen_xor_32(X86_ECX, X86_ECX); // xor %t0,%t0 - gen_xor_32(X86_EDX, X86_EDX); // xor %t1,%t1 - gen_insn(X86_INSN_SSE_PS, X86_SSE_MOVMSK, vD, REG_T2_ID); // movmskps %v0,%t2 - gen_cmp_32(x86_immediate_operand(0), REG_T2_ID); // cmp $0,%t2 - gen_setcc(X86_CC_Z, X86_CL); // sete %t0 - gen_cmp_32(x86_immediate_operand(0xf), REG_T2_ID); // cmp $0xf,%t1 - gen_setcc(X86_CC_E, X86_DL); // sete %t1 - gen_lea_32(x86_memory_operand(0, X86_ECX, X86_EDX, 4), REG_T2_ID); // %t2 = %t0 + %t1*4 - gen_mov_32(x86_memory_operand(xPPC_CR, REG_CPU_ID), X86_ECX); // mov $xPPC_CR(%cpu),%t0 - gen_shl_32(x86_immediate_operand(5), REG_T2_ID); // %t2 holds new cr6 - gen_and_32(x86_immediate_operand(0xffffff0f), X86_ECX); // and $0xffffff0f,%t0 - gen_or_32(X86_ECX, REG_T2_ID); // or %t0,%t2 - gen_mov_32(REG_T2_ID, x86_memory_operand(xPPC_CR, REG_CPU_ID)); // mov %t0,$xPPC_CR(%cpu) -} - -// Generic SSE arith -bool powerpc_jit::gen_sse_arith_2(int mnemo, int vD, int vA, int vB) -{ - gen_movaps(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - const uint16 insn = jit_info[mnemo]->o.value; - gen_insn(insn >> 8, insn & 0xff, x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V0_ID); - gen_movaps(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// Generic SSE arith with swapped operands (ANDPS) -bool powerpc_jit::gen_sse_arith_s(int mnemo, int vD, int vA, int vB) -{ - return gen_sse_arith_2(mnemo, vD, vB, vA); -} - -// SSE comparison (CMPPS) -bool powerpc_jit::gen_sse_arith_c(int mnemo, int vD, int vA, int vB, bool Rc) -{ - // NOTE: this uses swapped operands for GT, GE (no change for EQ) - gen_movaps(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V0_ID); - gen_cmpps(jit_info[mnemo]->o.value, x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - gen_movaps(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - if (Rc) - gen_sse_record_cr6(REG_V0_ID); - return true; -} - -// vmaddfp -bool powerpc_jit::gen_sse_vmaddfp(int mnemo, int vD, int vA, int vB, int vC) -{ - gen_movaps(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - gen_mulps(x86_memory_operand(xPPC_VR(vC), REG_CPU_ID), REG_V0_ID); - gen_addps(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V0_ID); - gen_movaps(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// vnmsubfp -bool powerpc_jit::gen_sse_vnmsubfp(int mnemo, int vD, int vA, int vB, int vC) -{ - gen_movaps(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - gen_xorps(REG_V1_ID, REG_V1_ID); - gen_mulps(x86_memory_operand(xPPC_VR(vC), REG_CPU_ID), REG_V0_ID); - gen_subps(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V0_ID); - gen_subps(REG_V0_ID, REG_V1_ID); - gen_movaps(REG_V1_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// vsel -bool powerpc_jit::gen_sse_vsel(int mnemo, int vD, int vA, int vB, int vC) -{ - // NOTE: simplified into (vB & vC) | (vA & ~vC) - gen_movaps(x86_memory_operand(xPPC_VR(vC), REG_CPU_ID), REG_V0_ID); - gen_movaps(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V1_ID); - gen_movaps(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V2_ID); - gen_andps(REG_V0_ID, REG_V1_ID); - gen_andnps(REG_V2_ID, REG_V0_ID); - gen_orps(REG_V1_ID, REG_V0_ID); - gen_movaps(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -/* - * SSE2 optimizations - */ - -// Record CR6 (vD contains the result of the CMP instruction) -void powerpc_jit::gen_sse2_record_cr6(int vD) -{ - // NOTE: %ecx & %edx are caller saved registers and not static allocated at this time - assert(REG_T2_ID != (int)X86_ECX && REG_T2_ID != (int)X86_EDX); - gen_xor_32(X86_ECX, X86_ECX); // xor %t0,%t0 - gen_xor_32(X86_EDX, X86_EDX); // xor %t1,%t1 - gen_pmovmskb(vD, REG_T2_ID); // pmovmskb %v0,%t2 - gen_cmp_32(x86_immediate_operand(0), REG_T2_ID); // cmp $0,%t2 - gen_setcc(X86_CC_Z, X86_CL); // sete %t0 - gen_cmp_32(x86_immediate_operand(0xffff), REG_T2_ID); // cmp $0xffff,%t1 - gen_setcc(X86_CC_E, X86_EDX); // sete %t1 - gen_lea_32(x86_memory_operand(0, X86_ECX, X86_EDX, 4), REG_T2_ID); // %t2 = %t0 + %t1*4 - gen_mov_32(x86_memory_operand(xPPC_CR, REG_CPU_ID), X86_ECX); // mov $xPPC_CR(%cpu),%t0 - gen_shl_32(x86_immediate_operand(5), REG_T2_ID); // %t2 holds new cr6 - gen_and_32(x86_immediate_operand(0xffffff0f), X86_ECX); // and $0xffffff0f,%t0 - gen_or_32(X86_ECX, REG_T2_ID); // or %t0,%t2 - gen_mov_32(REG_T2_ID, x86_memory_operand(xPPC_CR, REG_CPU_ID)); // mov %t0,$xPPC_CR(%cpu) -} - -// Generic SSE2 arith -bool powerpc_jit::gen_sse2_arith_2(int mnemo, int vD, int vA, int vB) -{ - gen_movdqa(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - const uint16 insn = jit_info[mnemo]->o.value; - gen_insn(insn >> 8, insn & 0xff, x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// Generic SSE2 arith with swapped operands (PANDN) -bool powerpc_jit::gen_sse2_arith_s(int mnemo, int vD, int vA, int vB) -{ - return gen_sse2_arith_2(mnemo, vD, vB, vA); -} - -// SSE2 comparison (PCMPEQ, PCMPGT) -bool powerpc_jit::gen_sse2_arith_c(int mnemo, int vD, int vA, int vB, bool Rc) -{ - gen_sse2_arith_2(mnemo, vD, vA, vB); - if (Rc) - gen_sse2_record_cr6(REG_V0_ID); - return true; -} - -// vsldoi -bool powerpc_jit::gen_sse2_vsldoi(int mnemo, int vD, int vA, int vB, int SH) -{ - // Optimize out vsldoi vX,vX,vB,0 - if (SH == 0 && vA == vD) - return true; - - gen_movdqa(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - if (SH) { - gen_movdqa(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V1_ID); - gen_pshufd(x86_immediate_operand(0x1b), REG_V0_ID, REG_V0_ID); - gen_pshufd(x86_immediate_operand(0x1b), REG_V1_ID, REG_V1_ID); - gen_pslldq(x86_immediate_operand(SH), REG_V0_ID); - gen_psrldq(x86_immediate_operand(16 - SH), REG_V1_ID); - gen_por(REG_V1_ID, REG_V0_ID); - gen_pshufd(x86_immediate_operand(0x1b), REG_V0_ID, REG_V0_ID); - } - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// vsel -bool powerpc_jit::gen_sse2_vsel(int mnemo, int vD, int vA, int vB, int vC) -{ - // NOTE: simplified into (vB & vC) | (vA & ~vC) - gen_movdqa(x86_memory_operand(xPPC_VR(vC), REG_CPU_ID), REG_V0_ID); - gen_movdqa(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V1_ID); - gen_movdqa(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V2_ID); - gen_pand(REG_V0_ID, REG_V1_ID); - gen_pandn(REG_V2_ID, REG_V0_ID); - gen_por(REG_V1_ID, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -/* - * Vector splat instructions - * - * Reference: "Optimizing subroutines in assembly language", Agner, table 13.6 - */ - -void powerpc_jit::gen_sse2_vsplat(int vD, int rValue) -{ - gen_movd_lx(rValue, REG_V0_ID); - gen_pshufd(x86_immediate_operand(0), REG_V0_ID, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); -} - -// vspltisb -bool powerpc_jit::gen_sse2_vspltisb(int mnemo, int vD, int SIMM) -{ - switch (SIMM) { - case 0: - gen_pxor(REG_V0_ID, REG_V0_ID); - goto commit; - case 1: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - gen_packuswb(REG_V0_ID, REG_V0_ID); - goto commit; - case 2: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - gen_psllw(x86_immediate_operand(1), REG_V0_ID); - gen_packuswb(REG_V0_ID, REG_V0_ID); - goto commit; - case 3: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(14), REG_V0_ID); - gen_packuswb(REG_V0_ID, REG_V0_ID); - goto commit; - case 4: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - gen_psllw(x86_immediate_operand(2), REG_V0_ID); - gen_packuswb(REG_V0_ID, REG_V0_ID); - goto commit; - case -1: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - goto commit; - case -2: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psllw(x86_immediate_operand(1), REG_V0_ID); - gen_packsswb(REG_V0_ID, REG_V0_ID); - goto commit; - { - commit: - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - break; - } - default: - const uint32 value = ((uint8)SIMM) * 0x01010101; - gen_mov_32(x86_immediate_operand(value), REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - break; - } - return true; -} - -// vspltish -bool powerpc_jit::gen_sse2_vspltish(int mnemo, int vD, int SIMM) -{ - switch (SIMM) { - case 0: - gen_pxor(REG_V0_ID, REG_V0_ID); - goto commit; - case 1: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - goto commit; - case 2: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - gen_psllw(x86_immediate_operand(1), REG_V0_ID); - goto commit; - case 3: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(14), REG_V0_ID); - goto commit; - case 4: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psrlw(x86_immediate_operand(15), REG_V0_ID); - gen_psllw(x86_immediate_operand(2), REG_V0_ID); - goto commit; - case -1: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - goto commit; - case -2: - gen_pcmpeqw(REG_V0_ID, REG_V0_ID); - gen_psllw(x86_immediate_operand(1), REG_V0_ID); - goto commit; - { - commit: - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - break; - } - default: - const uint32 value = ((uint16)SIMM) * 0x10001; - gen_mov_32(x86_immediate_operand(value), REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - break; - } - return true; -} - -// vspltisw -bool powerpc_jit::gen_sse2_vspltisw(int mnemo, int vD, int SIMM) -{ - switch (SIMM) { - case 0: - gen_pxor(REG_V0_ID, REG_V0_ID); - goto commit; - case 1: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - gen_psrld(x86_immediate_operand(31), REG_V0_ID); - goto commit; - case 2: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - gen_psrld(x86_immediate_operand(31), REG_V0_ID); - gen_pslld(x86_immediate_operand(1), REG_V0_ID); - goto commit; - case 3: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - gen_psrld(x86_immediate_operand(30), REG_V0_ID); - goto commit; - case 4: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - gen_psrld(x86_immediate_operand(31), REG_V0_ID); - gen_pslld(x86_immediate_operand(2), REG_V0_ID); - goto commit; - case -1: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - goto commit; - case -2: - gen_pcmpeqd(REG_V0_ID, REG_V0_ID); - gen_pslld(x86_immediate_operand(1), REG_V0_ID); - goto commit; - { - commit: - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - break; - } - default: - const uint32 value = SIMM; - gen_mov_32(x86_immediate_operand(value), REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - } - return true; -} - -// vspltb -bool powerpc_jit::gen_sse2_vspltb(int mnemo, int vD, int UIMM, int vB) -{ - const int N = ev_mixed::byte_element(UIMM & 15); - gen_mov_zx_8_32(x86_memory_operand(xPPC_VR(vB) + N * 1, REG_CPU_ID), REG_T0_ID); - gen_imul_32(x86_immediate_operand(0x01010101), REG_T0_ID, REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - return true; -} - -// vsplth -bool powerpc_jit::gen_sse2_vsplth(int mnemo, int vD, int UIMM, int vB) -{ - const int N = ev_mixed::half_element(UIMM & 7); - gen_mov_zx_16_32(x86_memory_operand(xPPC_VR(vB) + N * 2, REG_CPU_ID), REG_T0_ID); - gen_imul_32(x86_immediate_operand(0x10001), REG_T0_ID, REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - return true; -} - -// vspltw -bool powerpc_jit::gen_sse2_vspltw(int mnemo, int vD, int UIMM, int vB) -{ - const int N = UIMM & 3; - gen_mov_32(x86_memory_operand(xPPC_VR(vB) + N * 4, REG_CPU_ID), REG_T0_ID); - gen_sse2_vsplat(vD, REG_T0_ID); - return true; -} - -/* - * SSSE3 optimizations - */ - -uintptr powerpc_jit::gen_ssse3_vswap_mask(void) -{ - // We must get the following bytes in memory - // 0x3 0x2 0x1 0x0 0x7 0x6 0x5 0x4 0xb 0xa 0x9 0x8 0xf 0xe 0xd 0xc - static uintptr control_mask = 0; - if (control_mask == 0) { - static const uint8 value[16] = { - 0x03, 0x02, 0x01, 0x00, 0x07, 0x06, 0x05, 0x04, - 0x0b, 0x0a, 0x09, 0x08, 0x0f, 0x0e, 0x0d, 0x0c - }; - control_mask = (uintptr)copy_data(value, sizeof(value)); - assert(control_mask <= 0xffffffff); - } - return control_mask; -} - -// lvx, lvxl -bool powerpc_jit::gen_ssse3_lvx(int mnemo, int vD, int rA, int rB) -{ - gen_mov_32(x86_memory_operand(xPPC_GPR(rB), REG_CPU_ID), REG_T0_ID); - if (rA != 0) - gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); - gen_and_32(x86_immediate_operand(-16), REG_T0_ID); - - x86_memory_operand vswapmask(gen_ssse3_vswap_mask(), X86_NOREG); - gen_movdqa(x86_memory_operand(0, REG_T0_ID), REG_V0_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, vswapmask, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} - -// stvx, stvxl -bool powerpc_jit::gen_ssse3_stvx(int mnemo, int vS, int rA, int rB) -{ - gen_mov_32(x86_memory_operand(xPPC_GPR(rB), REG_CPU_ID), REG_T0_ID); - if (rA != 0) - gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); - gen_and_32(x86_immediate_operand(-16), REG_T0_ID); - - x86_memory_operand vswapmask(gen_ssse3_vswap_mask(), X86_NOREG); - gen_movdqa(x86_memory_operand(xPPC_VR(vS), REG_CPU_ID), REG_V0_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, vswapmask, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(0, REG_T0_ID)); - return true; -} - -// vperm -bool powerpc_jit::gen_ssse3_vperm(int mnemo, int vD, int vA, int vB, int vC) -{ - static uintptr zero_mask = 0; - if (zero_mask == 0) { - static const uint8 value[16] = { - 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, - 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80 - }; - zero_mask = (uintptr)copy_data(value, sizeof(value)); - assert(zero_mask <= 0xffffffff); - } - - static uintptr index_mask = 0; - if (index_mask == 0) { - static const uint8 value[16] = { - 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, - 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f, 0x1f - }; - index_mask = (uintptr)copy_data(value, sizeof(value)); - assert(index_mask <= 0xffffffff); - }; - - /* - * PROP_IMSB(T) = T.index|most significant bit of T.index (T.bit0 = T.bit3) - * --> used to handle one vector at a time - * - * T.A = PSHUFB(PROP_IMSB(vC & IndexMask), vA); - * T.B = PSHUFB(PROP_IMSB(vC & IndexMaxk) ^ ZeroMask, vB); - * vD = T.A | T.B - */ - x86_memory_operand swap_mask(gen_ssse3_vswap_mask(), X86_NOREG); - gen_movdqa(x86_memory_operand(xPPC_VR(vC), REG_CPU_ID), REG_V2_ID); - gen_movdqa(swap_mask, REG_V3_ID); - gen_movdqa(x86_memory_operand(xPPC_VR(vA), REG_CPU_ID), REG_V0_ID); - gen_pand(x86_memory_operand(index_mask, X86_NOREG), REG_V2_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V3_ID, REG_V0_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V3_ID, REG_V2_ID); - gen_movdqa(REG_V2_ID, REG_V1_ID); - gen_psllq(x86_immediate_operand(3), REG_V2_ID); - gen_pand(x86_memory_operand(zero_mask, X86_NOREG), REG_V2_ID); - gen_por(REG_V2_ID, REG_V1_ID); - gen_movdqa(x86_memory_operand(xPPC_VR(vB), REG_CPU_ID), REG_V2_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V1_ID, REG_V0_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V3_ID, REG_V2_ID); - gen_pxor(x86_memory_operand(zero_mask, X86_NOREG), REG_V1_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V1_ID, REG_V2_ID); - gen_por(REG_V2_ID, REG_V0_ID); - gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, REG_V3_ID, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); - return true; -} -#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp deleted file mode 100644 index a8e563ae1..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp +++ /dev/null @@ -1,106 +0,0 @@ -/* - * ppc-jit.hpp - PowerPC dynamic translation (mid-level) - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_JIT_H -#define PPC_JIT_H - -#include "sysdeps.h" -#include "cpu/ppc/ppc-dyngen.hpp" - -struct powerpc_jit - : public powerpc_dyngen -{ - // Default constructor - powerpc_jit(dyngen_cpu_base cpu); - - // Initialization - bool initialize(void); - - bool gen_vector_1(int mnemo, int vD); - bool gen_vector_2(int mnemo, int vD, int vA, int vB); - bool gen_vector_3(int mnemo, int vD, int vA, int vB, int vC); - bool gen_vector_compare(int mnemo, int vD, int vA, int vB, bool Rc); - -private: - // Mid-level code generator info - typedef bool (powerpc_jit::*gen_handler_t)(int, bool); - typedef void (powerpc_dyngen::*dyngen_handler_t)(void); - union jit_option_t { - jit_option_t() { } - uintptr value; - jit_option_t(uintptr v) : value(v) { } - dyngen_handler_t dyngen_handler; - jit_option_t(dyngen_handler_t const & h) : dyngen_handler(h) { } - }; - struct jit_info_t { - int mnemo; - gen_handler_t handler; - jit_option_t o; - }; - static const jit_info_t *jit_info[]; - -private: - bool gen_not_available(int mnemo); - bool gen_vector_generic_1(int mnemo, int vD); - bool gen_vector_generic_2(int mnemo, int vD, int vA, int vB); - bool gen_vector_generic_3(int mnemo, int vD, int vA, int vB, int vC); - bool gen_vector_generic_c(int mnemo, int vD, int vA, int vB, bool Rc); - bool gen_vector_generic_load(int mnemo, int vD, int rA, int rB); - bool gen_vector_generic_store(int mnemo, int vS, int rA, int rB); - bool gen_vector_generic_load_word(int mnemo, int vD, int rA, int rB); - bool gen_vector_generic_store_word(int mnemo, int vS, int rA, int rB); - -#if defined(__i386__) || defined(__x86_64__) - bool gen_x86_lvx(int mnemo, int vD, int rA, int rB); - bool gen_x86_lvewx(int mnemo, int vD, int rA, int rB); - bool gen_x86_stvx(int mnemo, int vS, int rA, int rB); - bool gen_x86_stvewx(int mnemo, int vS, int rA, int rB); - bool gen_x86_mtvscr(int mnemo, int vD); - bool gen_x86_mfvscr(int mnemo, int vB); - bool gen_mmx_arith_2(int mnemo, int vD, int vA, int vB); - bool gen_mmx_arith_c(int mnemo, int vD, int vA, int vB, bool Rc); - void gen_sse_record_cr6(int vD); - bool gen_sse_arith_2(int mnemo, int vD, int vA, int vB); - bool gen_sse_arith_s(int mnemo, int vD, int vA, int vB); - bool gen_sse_arith_c(int mnemo, int vD, int vA, int vB, bool Rc); - bool gen_sse_vsel(int mnemo, int vD, int vA, int vB, int vC); - bool gen_sse_vmaddfp(int mnemo, int vD, int vA, int vB, int vC); - bool gen_sse_vnmsubfp(int mnemo, int vD, int vA, int vB, int vC); - void gen_sse2_record_cr6(int vD); - bool gen_sse2_arith_2(int mnemo, int vD, int vA, int vB); - bool gen_sse2_arith_s(int mnemo, int vD, int vA, int vB); - bool gen_sse2_arith_c(int mnemo, int vD, int vA, int vB, bool Rc); - bool gen_sse2_vsel(int mnemo, int vD, int vA, int vB, int vC); - bool gen_sse2_vsldoi(int mnemo, int vD, int vA, int vB, int SH); - void gen_sse2_vsplat(int vD, int rValue); - bool gen_sse2_vspltisb(int mnemo, int vD, int SIMM); - bool gen_sse2_vspltish(int mnemo, int vD, int SIMM); - bool gen_sse2_vspltisw(int mnemo, int vD, int SIMM); - bool gen_sse2_vspltb(int mnemo, int vD, int UIMM, int vB); - bool gen_sse2_vsplth(int mnemo, int vD, int UIMM, int vB); - bool gen_sse2_vspltw(int mnemo, int vD, int UIMM, int vB); - uintptr gen_ssse3_vswap_mask(void); - bool gen_ssse3_lvx(int mnemo, int vD, int rA, int rB); - bool gen_ssse3_stvx(int mnemo, int vS, int rA, int rB); - bool gen_ssse3_vperm(int mnemo, int vD, int vA, int vB, int vC); -#endif -}; - -#endif /* PPC_JIT_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operands.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operands.hpp deleted file mode 100644 index 95716ac93..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operands.hpp +++ /dev/null @@ -1,591 +0,0 @@ -/* - * ppc-operands.hpp - PowerPC operands definition - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_OPERANDS_H -#define PPC_OPERANDS_H - -/** - * Numerical limits of vector registers components - **/ - -template< class type > -struct vector_numeric_limits { - static type min() throw(); - static type max() throw(); -}; - -#define DEFINE_NUMERIC_LIMITS(TYPE, SMAX, USFX) \ -template<> \ -struct vector_numeric_limits { \ - static inline TYPE min() throw() { return -(SMAX) - 1; } \ - static inline TYPE max() throw() { return SMAX; } \ -}; \ -template<> \ -struct vector_numeric_limits { \ - static inline u##TYPE min() throw() { return 0##USFX; } \ - static inline u##TYPE max() throw() { return SMAX * 2##USFX + 1; } \ -} - -DEFINE_NUMERIC_LIMITS( int8, 127, U); -DEFINE_NUMERIC_LIMITS(int16, 32767, U); -DEFINE_NUMERIC_LIMITS(int32, 2147483647L, UL); -DEFINE_NUMERIC_LIMITS(int64, 9223372036854775807LL, ULL); - -#undef DEFINE_NUMERIC_LIMITS - -/** - * Compile time checks - **/ - -template< int a, int b > -struct ensure_equals; - -template< int n > -struct ensure_equals { }; - -template< class type, int size > -struct ensure_sizeof : ensure_equals { }; - -/** - * General purpose registers - **/ - -template< class field, class op > -struct input_gpr_op { - static inline uint32 get(powerpc_cpu * cpu, uint32 opcode) { - return op::apply(cpu->gpr(field::extract(opcode))); - } -}; - -template< class field > -struct input_gpr : input_gpr_op< field, op_nop > { }; - -template< class field > -struct output_gpr { - static inline void set(powerpc_cpu * cpu, uint32 opcode, uint32 value) { - cpu->gpr(field::extract(opcode)) = value; - } -}; - -template< class field > -struct gpr_operand : input_gpr< field >, output_gpr< field > { }; - -template< class field, int except_regno > -struct input_gpr_except { - static inline uint32 get(powerpc_cpu * cpu, uint32 opcode) { - const int regno = field::extract(opcode); - return regno != except_regno ? cpu->gpr(regno) : 0; - }; - static inline void set(powerpc_cpu * cpu, uint32 opcode, uint32 value) { - const int regno = field::extract(opcode); - if (regno == except_regno) abort(); - cpu->gpr(regno) = value; - } -}; - -/** - * Floating-point registers - **/ - -template< class field > -struct input_fpr { - static inline double get(powerpc_cpu * cpu, uint32 opcode) { - return cpu->fpr(field::extract(opcode)); - } -}; - -template< class field > -struct output_fpr { - static inline void set(powerpc_cpu * cpu, uint32 opcode, double value) { - cpu->fpr(field::extract(opcode)) = value; - } -}; - -template< class field > -struct fpr_operand : input_fpr< field >, output_fpr< field > { }; - -template< class field > -struct input_fpr_dw { - static inline uint64 get(powerpc_cpu * cpu, uint32 opcode) { - return cpu->fpr_dw(field::extract(opcode)); - } -}; - -template< class field > -struct output_fpr_dw { - static inline void set(powerpc_cpu * cpu, uint32 opcode, uint64 value) { - cpu->fpr_dw(field::extract(opcode)) = value; - } -}; - -template< class field > -struct fpr_dw_operand : input_fpr_dw< field >, output_fpr_dw< field > { }; - -/** - * Vector registers - **/ - -struct ev_direct { - static inline int byte_element(int i) { return i; } - static inline int half_element(int i) { return i; } - static inline int word_element(int i) { return i; } -}; - -// This supposes elements are loaded by 4-byte word parts -#ifdef WORDS_BIGENDIAN -typedef ev_direct ev_mixed; -#else -struct ev_mixed : public ev_direct { -#if 0 - static inline int byte_element(int i) { return (i & ~3) + (3 - (i & 3)); } - static inline int half_element(int i) { return (i & ~1) + (1 - (i & 1)); } -#else - static inline int byte_element(int i) { - static const int lookup[16] = { - 3, 2, 1, 0, - 7, 6, 5, 4, - 11, 10, 9, 8, - 15, 14, 13, 12 - }; - return lookup[i]; - } - static inline int half_element(int i) { - static const int lookup[8] = { - 1, 0, 3, 2, - 5, 4, 7, 6 - }; - return lookup[i]; - } -#endif -}; -#endif - -struct null_vector_operand { - typedef uint32 type; - typedef uint32 element_type; - static const uint32 element_size = sizeof(element_type); - static inline type const_ref(powerpc_cpu *, uint32) { return 0; } // fake so that compiler optimizes it out - static inline element_type get_element(type const & reg, int i) { return 0; } -}; - -template< class field > -struct vimm_operand { - typedef uint32 type; - typedef uint32 element_type; - static const uint32 element_size = sizeof(element_type); - static inline type const_ref(powerpc_cpu *, uint32 opcode) { return field::extract(opcode); } - static inline element_type get_element(type const & reg, int i) { return reg; } -}; - -template< class field > -struct input_vr { - static inline powerpc_vr const & const_ref(powerpc_cpu * cpu, uint32 opcode) { - return cpu->vr(field::extract(opcode)); - } -}; - -template< class field > -struct output_vr { - static inline powerpc_vr & ref(powerpc_cpu * cpu, uint32 opcode) { - return cpu->vr(field::extract(opcode)); - } -}; - -template< class field, class value_type > -struct vector_operand : input_vr< field >, output_vr< field > { - typedef powerpc_vr type; - typedef value_type element_type; - static const uint32 element_size = sizeof(element_type); - static inline bool saturate(element_type) { return false; } -}; - -template< class field, class value_type, class sat_type > -struct vector_saturate_operand : input_vr< field >, output_vr< field > { - typedef powerpc_vr type; - typedef sat_type element_type; - static const uint32 element_size = sizeof(value_type); - static inline bool saturate(element_type & v) { - bool sat = false; - if (v > vector_numeric_limits::max()) { - v = vector_numeric_limits::max(); - sat = true; - } - else if (v < vector_numeric_limits::min()) { - v = vector_numeric_limits::min(); - sat = true; - } - return sat; - } -}; - -template< class field, class value_type, class sat_type = int16, class ev = ev_direct > -struct v16qi_sat_operand : vector_saturate_operand< field, value_type, sat_type >, ensure_sizeof< sat_type, 2 > { - static inline sat_type get_element(powerpc_vr const & reg, int i) { - return (sat_type)(value_type)reg.b[ev::byte_element(i)]; - } - static inline void set_element(powerpc_vr & reg, int i, sat_type value) { - reg.b[ev::byte_element(i)] = value; - } -}; - -template< class field, class value_type, class sat_type = int32, class ev = ev_direct > -struct v8hi_sat_operand : vector_saturate_operand< field, value_type, sat_type >, ensure_sizeof< sat_type, 4 > { - static inline sat_type get_element(powerpc_vr const & reg, int i) { - return (sat_type)(value_type)reg.h[ev::half_element(i)]; - } - static inline void set_element(powerpc_vr & reg, int i, sat_type value) { - reg.h[ev::half_element(i)] = value; - } -}; - -template< class field, class value_type, class sat_type = int64 > -struct v4si_sat_operand : vector_saturate_operand< field, value_type, sat_type >, ensure_sizeof< sat_type, 8 > { - static inline sat_type get_element(powerpc_vr const & reg, int i) { - return (sat_type)(value_type)reg.w[i]; - } - static inline void set_element(powerpc_vr & reg, int i, sat_type value) { - reg.w[i] = value; - } -}; - -template< class field, class value_type = uint8, class ev = ev_direct > -struct v16qi_operand : vector_operand< field, value_type >, ensure_sizeof< value_type, 1 > { - static inline value_type get_element(powerpc_vr const & reg, int i) { - return reg.b[ev::byte_element(i)]; - } - static inline void set_element(powerpc_vr & reg, int i, value_type value) { - reg.b[ev::byte_element(i)] = value; - } -}; - -template< class field, class value_type = uint16, class ev = ev_direct > -struct v8hi_operand : vector_operand< field, value_type >, ensure_sizeof< value_type, 2 > { - static inline value_type get_element(powerpc_vr const & reg, int i) { - return reg.h[ev::half_element(i)]; - } - static inline void set_element(powerpc_vr & reg, int i, value_type value) { - reg.h[ev::half_element(i)] = value; - } -}; - -template< class field, class value_type = uint32 > -struct v4si_operand : vector_operand< field, value_type >, ensure_sizeof< value_type, 4 > { - static inline value_type get_element(powerpc_vr const & reg, int i) { - return reg.w[i]; - } - static inline void set_element(powerpc_vr & reg, int i, value_type value) { - reg.w[i] = value; - } -}; - -template< class field, class value_type = uint64 > -struct v2di_operand : vector_operand< field, value_type >, ensure_sizeof< value_type, 8 > { - static inline value_type get_element(powerpc_vr const & reg, int i) { - return reg.j[i]; - } - static inline void set_element(powerpc_vr & reg, int i, value_type value) { - reg.j[i] = value; - } -}; - -template< class field > -struct v4sf_operand : vector_operand< field, float > { - static inline float get_element(powerpc_vr const & reg, int i) { - return reg.f[i]; - } - static inline void set_element(powerpc_vr & reg, int i, float value) { - reg.f[i] = value; - } -}; - -template< class field > -struct vSH_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32 opcode) { - return (cpu->vr(field::extract(opcode)).b[ev_mixed::byte_element(15)] >> 3) & 15; - } -}; - - -/** - * Immediate operands - **/ - -struct null_operand { - static inline uint32 get(powerpc_cpu *, uint32) { - return 0; - } -}; -template< class field, class operation > -struct immediate_operand { - static inline uint32 get(powerpc_cpu *, uint32 opcode) { - return operation::apply(field::extract(opcode)); - } -}; - -template< int32 N > -struct immediate_value { - static inline uint32 get(powerpc_cpu *, uint32) { - return (uint32)N; - } -}; - -struct mask_operand { - static inline uint32 compute(uint32 mb, uint32 me) { - return ((mb > me) ? - ~(((uint32)-1 >> mb) ^ ((me >= 31) ? 0 : (uint32)-1 >> (me + 1))) : - (((uint32)-1 >> mb) ^ ((me >= 31) ? 0 : (uint32)-1 >> (me + 1)))); - } - static inline uint32 get(powerpc_cpu *, uint32 opcode) { - const uint32 mb = MB_field::extract(opcode); - const uint32 me = ME_field::extract(opcode); - return compute(mb, me); - } -}; - -/** - * Special purpose registers - **/ - -struct pc_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->pc(); - }; -}; - -struct lr_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->lr(); - }; -}; - -struct ctr_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->ctr(); - }; -}; - -struct cr_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->cr().get(); - } -}; - -template< class field > -struct xer_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return field::extract(cpu->xer().get()); - } -}; - -template<> -struct xer_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->xer().get_ca(); - } -}; - -template<> -struct xer_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return cpu->xer().get_count(); - } -}; - -template< class field > -struct fpscr_operand { - static inline uint32 get(powerpc_cpu * cpu, uint32) { - return field::extract(cpu->fpscr()); - } -}; - -struct spr_operand { - static inline uint32 get(powerpc_cpu *, uint32 opcode) { - uint32 spr = SPR_field::extract(opcode); - return ((spr & 0x1f) << 5) | ((spr >> 5) & 0x1f); - } -}; - -struct tbr_operand { - static inline uint32 get(powerpc_cpu *, uint32 opcode) { - uint32 tbr = TBR_field::extract(opcode); - return ((tbr & 0x1f) << 5) | ((tbr >> 5) & 0x1f); - } -}; - - -/** - * Operand aliases for decode table - **/ - -typedef null_operand operand_NONE; -typedef cr_operand operand_CR; -typedef pc_operand operand_PC; -typedef lr_operand operand_LR; -typedef ctr_operand operand_CTR; -typedef input_gpr_op operand_RA_compl; -typedef gpr_operand operand_RA; -typedef gpr_operand operand_RB; -typedef gpr_operand operand_RS; -typedef gpr_operand operand_RD; -typedef input_gpr_except operand_RA_or_0; // RA ? GPR(RA) : 0 -typedef immediate_value<0> operand_RA_is_0; // RA -> 0 -typedef immediate_value<1> operand_ONE; -typedef immediate_value<0> operand_ZERO; -typedef immediate_value<-1> operand_MINUS_ONE; -typedef null_operand operand_fp_NONE; -typedef fpr_operand operand_fp_RA; -typedef fpr_operand operand_fp_RB; -typedef fpr_operand operand_fp_RC; -typedef fpr_operand operand_fp_RD; -typedef fpr_operand operand_fp_RS; -typedef fpr_dw_operand operand_fp_dw_RA; -typedef fpr_dw_operand operand_fp_dw_RB; -typedef fpr_dw_operand operand_fp_dw_RC; -typedef fpr_dw_operand operand_fp_dw_RD; -typedef fpr_dw_operand operand_fp_dw_RS; -typedef xer_operand operand_XER_CA; -typedef xer_operand operand_XER_COUNT; -typedef fpscr_operand operand_FPSCR_RN; -typedef spr_operand operand_SPR; -typedef tbr_operand operand_TBR; -typedef mask_operand operand_MASK; -typedef null_vector_operand operand_vD_NONE; -typedef null_vector_operand operand_vA_NONE; -typedef null_vector_operand operand_vB_NONE; -typedef null_vector_operand operand_vC_NONE; -typedef v16qi_operand operand_vD_V16QI; -typedef v16qi_operand operand_vA_V16QI; -typedef v16qi_operand operand_vB_V16QI; -typedef v16qi_operand operand_vC_V16QI; -typedef v16qi_operand operand_vD_V16QIs; -typedef v16qi_operand operand_vA_V16QIs; -typedef v16qi_operand operand_vB_V16QIs; -typedef v16qi_operand operand_vC_V16QIs; -typedef v16qi_operand operand_vD_V16QIms; -typedef v16qi_operand operand_vB_V16QIms; -typedef v8hi_operand operand_vD_V8HI; -typedef v8hi_operand operand_vA_V8HI; -typedef v8hi_operand operand_vB_V8HI; -typedef v8hi_operand operand_vC_V8HI; -typedef v8hi_operand operand_vD_V8HIs; -typedef v8hi_operand operand_vA_V8HIs; -typedef v8hi_operand operand_vB_V8HIs; -typedef v8hi_operand operand_vC_V8HIs; -typedef v8hi_operand operand_vD_V8HIms; -typedef v8hi_operand operand_vB_V8HIms; -typedef v4si_operand operand_vD_V4SI; -typedef v4si_operand operand_vA_V4SI; -typedef v4si_operand operand_vB_V4SI; -typedef v4si_operand operand_vC_V4SI; -typedef v4si_operand operand_vD_V4SIs; -typedef v4si_operand operand_vA_V4SIs; -typedef v4si_operand operand_vB_V4SIs; -typedef v4si_operand operand_vC_V4SIs; -typedef v2di_operand operand_vD_V2DI; -typedef v2di_operand operand_vA_V2DI; -typedef v2di_operand operand_vB_V2DI; -typedef v2di_operand operand_vC_V2DI; -typedef v2di_operand operand_vD_V2DIs; -typedef v2di_operand operand_vA_V2DIs; -typedef v2di_operand operand_vB_V2DIs; -typedef v2di_operand operand_vC_V2DIs; -typedef v4sf_operand operand_vD_V4SF; -typedef v4sf_operand operand_vA_V4SF; -typedef v4sf_operand operand_vB_V4SF; -typedef v4sf_operand operand_vC_V4SF; -typedef v4si_operand operand_vS_V4SI; -typedef v2di_operand operand_vS_V2DI; -typedef vimm_operand operand_vA_UIMM; -typedef vimm_operand operand_vB_UIMM; -typedef vSH_operand operand_SHBO; - -// vector mixed element accessors -typedef v16qi_operand operand_vA_V16QIm; -typedef v16qi_operand operand_vB_V16QIm; -typedef v16qi_operand operand_vD_V16QIm; -typedef v8hi_operand operand_vA_V8HIm; -typedef v8hi_operand operand_vB_V8HIm; -typedef v8hi_operand operand_vD_V8HIm; - -#define DEFINE_VECTOR_SAT_OPERAND(EV, REG, OP) \ -template< class value_type > \ -struct operand_##REG##_##EV##_SAT : OP##_sat_operand { } - -DEFINE_VECTOR_SAT_OPERAND(V4SI, vD, v4si); -DEFINE_VECTOR_SAT_OPERAND(V4SI, vA, v4si); -DEFINE_VECTOR_SAT_OPERAND(V4SI, vB, v4si); -DEFINE_VECTOR_SAT_OPERAND(V4SI, vC, v4si); -DEFINE_VECTOR_SAT_OPERAND(V8HI, vD, v8hi); -DEFINE_VECTOR_SAT_OPERAND(V8HI, vA, v8hi); -DEFINE_VECTOR_SAT_OPERAND(V8HI, vB, v8hi); -DEFINE_VECTOR_SAT_OPERAND(V8HI, vC, v8hi); -DEFINE_VECTOR_SAT_OPERAND(V16QI, vD, v16qi); -DEFINE_VECTOR_SAT_OPERAND(V16QI, vA, v16qi); -DEFINE_VECTOR_SAT_OPERAND(V16QI, vB, v16qi); -DEFINE_VECTOR_SAT_OPERAND(V16QI, vC, v16qi); - -#undef DEFINE_VECTOR_SAT_OPERAND - -#define DEFINE_VECTOR_MIXED_SAT_OPERAND(EV, SAT, REG, OP, TYPE) \ -template< class value_type > \ -struct operand_##REG##_##EV##m_##SAT : OP##_sat_operand { } - -DEFINE_VECTOR_MIXED_SAT_OPERAND(V16QI, SAT, vA, v16qi, int16); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V16QI, SAT, vB, v16qi, int16); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V16QI, SAT, vD, v16qi, int16); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V16QI, USAT, vD, v16qi, uint16); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V8HI, SAT, vA, v8hi, int32); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V8HI, SAT, vB, v8hi, int32); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V8HI, SAT, vD, v8hi, int32); -DEFINE_VECTOR_MIXED_SAT_OPERAND(V8HI, USAT, vD, v8hi, uint32); - -#undef DEFINE_VECTOR_MIXED_SAT_OPERAND - -#define DEFINE_VECTOR_USAT_OPERAND(EV, REG, OP, TYPE) \ -template< class value_type > \ -struct operand_##REG##_##EV##_USAT : OP##_sat_operand { } - -// FIXME: temporary for vector pack unsigned saturate variants -DEFINE_VECTOR_USAT_OPERAND(V4SI, vD, v4si, uint64); -DEFINE_VECTOR_USAT_OPERAND(V8HI, vD, v8hi, uint32); -DEFINE_VECTOR_USAT_OPERAND(V16QI, vD, v16qi, uint16); - -#undef DEFINE_VECTOR_USAT_OPERAND - -#define DEFINE_IMMEDIATE_OPERAND(NAME, FIELD, OP) \ -typedef immediate_operand operand_##NAME - -DEFINE_IMMEDIATE_OPERAND(LI, LI, sign_extend_LI_32); -DEFINE_IMMEDIATE_OPERAND(BO, BO, nop); -DEFINE_IMMEDIATE_OPERAND(BD, BD, sign_extend_BD_32); -DEFINE_IMMEDIATE_OPERAND(IMM, IMM, nop); -DEFINE_IMMEDIATE_OPERAND(UIMM, UIMM, zero_extend_16_32); -DEFINE_IMMEDIATE_OPERAND(UIMM_shifted, UIMM, zero_extend_16_32_shifted); -DEFINE_IMMEDIATE_OPERAND(SIMM, SIMM, sign_extend_16_32); -DEFINE_IMMEDIATE_OPERAND(SIMM_shifted, SIMM, sign_extend_16_32_shifted); -DEFINE_IMMEDIATE_OPERAND(D, d, sign_extend_16_32); -DEFINE_IMMEDIATE_OPERAND(NB, NB, nop); -DEFINE_IMMEDIATE_OPERAND(SH, SH, nop); -DEFINE_IMMEDIATE_OPERAND(FM, FM, nop); -DEFINE_IMMEDIATE_OPERAND(SHB, vSH, nop); - -#undef DEFINE_IMMEDIATE_OPERAND - -#endif /* PPC_OPERANDS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp deleted file mode 100644 index 47b56493e..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp +++ /dev/null @@ -1,405 +0,0 @@ -/* - * ppc-operations.cpp - PowerPC specific operations - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_OPERATIONS_H -#define PPC_OPERATIONS_H - -#include -#include "mathlib/mathlib.hpp" - -/** - * Define an unary/binary/trinary operation - * - * NAME Name of the operation - * TYPE Type of operands and result - * EXPR C++ expression defining the operation, parameters are x/y/z/t - **/ - -#define DEFINE_ALIAS_OP(NAME, T_NAME, TYPE) \ -typedef op_template_##T_NAME op_##NAME - -#define DEFINE_OP1(NAME, TYPE, EXPR) \ -struct op_##NAME { \ - static inline TYPE apply(TYPE x) { \ - return EXPR; \ - } \ -} - -#define DEFINE_TEMPLATE_OP1(NAME, EXPR) \ -template< class TYPE > \ -DEFINE_OP1(template_##NAME, TYPE, EXPR) - -#define DEFINE_OP2(NAME, TYPE, EXPR) \ -struct op_##NAME { \ - static inline TYPE apply(TYPE x, TYPE y) { \ - return EXPR; \ - } \ -} - -#define DEFINE_TEMPLATE_OP2(NAME, EXPR) \ -template< class TYPE > \ -DEFINE_OP2(template_##NAME, TYPE, EXPR) - -#define DEFINE_OP3(NAME, TYPE, EXPR) \ -struct op_##NAME { \ - static inline TYPE apply(TYPE x, TYPE y, TYPE z) { \ - return EXPR; \ - } \ -} - -#define DEFINE_OP4(NAME, TYPE, EXPR) \ -struct op_##NAME { \ - static inline TYPE apply(TYPE x, TYPE y, TYPE z, TYPE t) { \ - return EXPR; \ - } \ -} - -// Basic operations - -DEFINE_TEMPLATE_OP1(nop, x); -DEFINE_TEMPLATE_OP2(add, x + y); -DEFINE_TEMPLATE_OP2(sub, x - y); -DEFINE_TEMPLATE_OP2(mul, x * y); -DEFINE_TEMPLATE_OP2(div, x / y); -DEFINE_TEMPLATE_OP2(and, x & y); -DEFINE_TEMPLATE_OP2(or, x | y); -DEFINE_TEMPLATE_OP2(xor, x ^ y); -DEFINE_TEMPLATE_OP2(orc, x | ~y); -DEFINE_TEMPLATE_OP2(andc,x & ~y); -DEFINE_TEMPLATE_OP2(nand,~(x & y)); -DEFINE_TEMPLATE_OP2(nor, ~(x | y)); -DEFINE_TEMPLATE_OP2(eqv, ~(x ^ y)); - -// Integer basic operations - -DEFINE_ALIAS_OP(nop, nop, uint32); -DEFINE_ALIAS_OP(add, add, uint32); -DEFINE_ALIAS_OP(sub, sub, uint32); -DEFINE_ALIAS_OP(mul, mul, uint32); -DEFINE_ALIAS_OP(smul,mul, int32); -DEFINE_ALIAS_OP(div, div, uint32); -DEFINE_ALIAS_OP(sdiv,div, int32); -DEFINE_OP1(neg, uint32, -x); -DEFINE_OP1(compl, uint32, ~x); -DEFINE_OP2(mod, uint32, x % y); -DEFINE_ALIAS_OP(and, and, uint32); -DEFINE_ALIAS_OP(or, or, uint32); -DEFINE_ALIAS_OP(xor, xor, uint32); -DEFINE_ALIAS_OP(orc, orc, uint32); -DEFINE_ALIAS_OP(andc,andc,uint32); -DEFINE_ALIAS_OP(nand,nand,uint32); -DEFINE_ALIAS_OP(nor, nor, uint32); -DEFINE_ALIAS_OP(eqv, eqv, uint32); -DEFINE_OP2(shll, uint32, x << y); -DEFINE_OP2(shrl, uint32, x >> y); -DEFINE_OP2(shra, uint32, (int32)x >> y); -DEFINE_OP2(rotl, uint32, ((x << y) | (x >> (32 - y)))); -DEFINE_OP2(rotr, uint32, ((x >> y) | (x << (32 - y)))); - -DEFINE_OP4(ppc_rlwimi, uint32, (op_rotl::apply(x, y) & z) | (t & ~z)); -DEFINE_OP3(ppc_rlwinm, uint32, (op_rotl::apply(x, y) & z)); -DEFINE_OP3(ppc_rlwnm, uint32, (op_rotl::apply(x, (y & 0x1f)) & z)); - -DEFINE_ALIAS_OP(add_64, add, uint64); -DEFINE_ALIAS_OP(sub_64, sub, uint64); -DEFINE_ALIAS_OP(smul_64,mul, int64); -DEFINE_ALIAS_OP(and_64, and, uint64); -DEFINE_ALIAS_OP(andc_64,andc,uint64); -DEFINE_ALIAS_OP(or_64, or, uint64); -DEFINE_ALIAS_OP(nor_64, nor, uint64); -DEFINE_ALIAS_OP(xor_64, xor, uint64); - -// Floating-point basic operations - -DEFINE_OP1(fnop, double, x); -DEFINE_OP1(fabs, double, fabs(x)); -DEFINE_OP2(fadd, double, x + y); -DEFINE_OP2(fdiv, double, x / y); -DEFINE_OP3(fmadd, double, mathlib_fmadd(x, y, z)); -DEFINE_OP3(fmsub, double, mathlib_fmsub(x, y, z)); -DEFINE_OP2(fmul, double, x * y); -DEFINE_OP1(fnabs, double, -fabs(x)); -DEFINE_OP1(fneg, double, -x); -DEFINE_OP3(fnmadd, double, -mathlib_fmadd(x, y, z)); -DEFINE_OP3(fnmsub, double, -mathlib_fmsub(x, y, z)); -DEFINE_OP3(fnmadds, double, -(float)mathlib_fmadd(x, y, z)); -DEFINE_OP3(fnmsubs, double, -(float)mathlib_fmsub(x, y, z)); -DEFINE_OP2(fsub, double, x - y); -DEFINE_OP3(fsel, double, (x >= 0.0) ? y : z); -DEFINE_OP1(frim, double, floor(x)); -DEFINE_OP1(frin, double, round(x)); -DEFINE_OP1(frip, double, ceil(x)); -DEFINE_OP1(friz, double, trunc(x)); - -DEFINE_OP2(fadds, float, x + y); -DEFINE_OP2(fsubs, float, x - y); -DEFINE_OP1(exp2, float, exp2f(x)); -DEFINE_OP1(log2, float, log2f(x)); -DEFINE_OP1(fres, float, 1 / x); -DEFINE_OP1(frsqrt, float, 1 / sqrt(x)); -DEFINE_OP1(frsim, float, floorf(x)); -DEFINE_OP1(frsin, float, roundf(x)); -DEFINE_OP1(frsip, float, ceilf(x)); -DEFINE_OP1(frsiz, float, truncf(x)); - -// Misc operations used in AltiVec instructions - -template< class TYPE > -struct op_vrl { - static inline TYPE apply(TYPE v, TYPE n) { - const int sh = n & ((8 * sizeof(TYPE)) - 1); - return ((v << sh) | (v >> ((8 * sizeof(TYPE)) - sh))); - } -}; - -template< class TYPE > -struct op_vsl { - static inline TYPE apply(TYPE v, TYPE n) { - const int sh = n & ((8 * sizeof(TYPE)) - 1); - return v << sh; - } -}; - -template< class TYPE > -struct op_vsr { - static inline TYPE apply(TYPE v, TYPE n) { - const int sh = n & ((8 * sizeof(TYPE)) - 1); - return v >> sh; - } -}; - -template< uint16 round = 0 > -struct op_mhraddsh { - static inline int32 apply(int32 a, int32 b, int32 c) { - return (((a * b) + round) >> 15) + c; - } -}; - -struct op_cvt_fp2si { - static inline int64 apply(uint32 a, float b) { - // Delegate saturation to upper level - if (mathlib_isinf(b)) - return ((int64)(b < 0 ? 0x80000000 : 0x7fffffff)) << 32; - if (mathlib_isnan(b)) - return 0; - return (int64)(b * (1U << a)); - } -}; - -template< class TYPE > -struct op_cvt_si2fp { - static inline float apply(uint32 a, TYPE b) { - return ((float)b) / ((float)(1U << a)); - } -}; - -template< class TYPE > -struct op_max { - static inline TYPE apply(TYPE a, TYPE b) { - return (a > b) ? a : b; - } -}; - -template<> -struct op_max { - static inline float apply(float a, float b) { - // XXX The maximum of any value and a NaN is a QNaN - if (mathlib_isnan(a)) - return a; - if (mathlib_isnan(b)) - return b; - return a > b ? a : b; - } -}; - -template< class TYPE > -struct op_min { - static inline TYPE apply(TYPE a, TYPE b) { - return (a < b) ? a : b; - } -}; - -template<> -struct op_min { - static inline float apply(float a, float b) { - // XXX The minimum of any value and a NaN is a QNaN - if (mathlib_isnan(a)) - return a; - if (mathlib_isnan(b)) - return b; - return a < b ? a : b; - } -}; - -template< int nbytes > -struct op_all_ones { - static const uint32 value = (1U << (8 * nbytes)) - 1; -}; - -template<> -struct op_all_ones<4> { - static const uint32 value = 0xffffffff; -}; - -template< class VX > -struct op_cmp { - static const uint32 result = op_all_ones::value; -}; - -template< class VX > -struct op_cmp_eq { - static inline uint32 apply(VX a, VX b) { - return a == b ? op_cmp::result : 0; - } -}; - -template< class VX > -struct op_cmp_ge { - static inline uint32 apply(VX a, VX b) { - return a >= b ? op_cmp::result : 0; - } -}; - -template< class VX > -struct op_cmp_gt { - static inline uint32 apply(VX a, VX b) { - return a > b ? op_cmp::result : 0; - } -}; - -struct op_cmpbfp { - static inline uint32 apply(float a, float b) { - const bool le = a <= b; - const bool ge = a >= -b; - return (le ? 0 : (1 << 31)) | (ge ? 0 : (1 << 30)); - } -}; - -DEFINE_OP3(vsel, uint32, ((y & z) | (x & ~z))); -DEFINE_OP3(vmaddfp, float, ((x * z) + y)); -DEFINE_OP3(vnmsubfp, float, -((x * z) - y)); -DEFINE_OP3(mladduh, uint32, ((x * y) + z) & 0xffff); -DEFINE_OP2(addcuw, uint32, ((uint64)x + (uint64)y) >> 32); -DEFINE_OP2(subcuw, uint32, (~((int64)x - (int64)y) >> 32) & 1); -DEFINE_OP2(avgsb, int8, (((int16)x + (int16)y + 1) >> 1)); -DEFINE_OP2(avgsh, int16, (((int32)x + (int32)y + 1) >> 1)); -DEFINE_OP2(avgsw, int32, (((int64)x + (int64)y + 1) >> 1)); -DEFINE_OP2(avgub, uint8, ((uint16)x + (uint16)y + 1) >> 1); -DEFINE_OP2(avguh, uint16, ((uint32)x + (uint32)y + 1) >> 1); -DEFINE_OP2(avguw, uint32, ((uint64)x + (uint64)y + 1) >> 1); - - -#undef DEFINE_OP1 -#undef DEFINE_OP2 -#undef DEFINE_OP3 -#undef DEFINE_OP4 - -#undef DEFINE_TEMPLATE_OP1 -#undef DEFINE_TEMPLATE_OP2 -#undef DEFINE_TEMPLATE_OP3 - -#undef DEFINE_ALIAS_OP - - -// Sign/Zero-extend operation - -struct op_sign_extend_5_32 { - static inline uint32 apply(uint32 value) { - if (value & 0x10) - value -= 0x20; - return value; - } -}; - -struct op_sign_extend_16_32 { - static inline uint32 apply(uint32 value) { - return (uint32)(int32)(int16)value; - } -}; - -struct op_sign_extend_8_32 { - static inline uint32 apply(uint32 value) { - return (uint32)(int32)(int8)value; - } -}; - -struct op_zero_extend_16_32 { - static inline uint32 apply(uint32 value) { - return (uint32)(uint16)value; - } -}; - -struct op_zero_extend_8_32 { - static inline uint32 apply(uint32 value) { - return (uint32)(uint8)value; - } -}; - -struct op_sign_extend_16_32_shifted { - static inline uint32 apply(uint32 value) { - return op_sign_extend_16_32::apply(value) << 16; - } -}; - -struct op_zero_extend_16_32_shifted { - static inline uint32 apply(uint32 value) { - return op_zero_extend_16_32::apply(value) << 16; - } -}; - -struct op_sign_extend_BD_32 { - static inline uint32 apply(uint32 value) { - return op_sign_extend_16_32::apply(value << 2); - } -}; - -struct op_sign_extend_LI_32 { - static inline uint32 apply(uint32 value) { - if (value & 0x800000) - value |= 0xff000000; - return value << 2; - } -}; - - -// And Word with Immediate value - -template< uint32 value > -struct op_andi { - static inline uint32 apply(uint32 x) { - return x & value; - } -}; - - -// Count Leading Zero Word - -struct op_cntlzw { - static inline uint32 apply(uint32 x) { - uint32 n; - uint32 m = 0x80000000; - for (n = 0; n < 32; n++, m >>= 1) - if (x & m) - break; - return n; - } -}; - -#endif /* PPC_OPERATIONS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-registers.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-registers.hpp deleted file mode 100644 index a44a32dff..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-registers.hpp +++ /dev/null @@ -1,251 +0,0 @@ -/* - * ppc-registers.hpp - PowerPC registers definition - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 PPC_REGISTERS_H -#define PPC_REGISTERS_H - -#include "cpu/ppc/ppc-bitfields.hpp" - -/** - * Condition Register - **/ - -class powerpc_cr_register -{ - uint32 cr; -public: - bool test(int condition) const; - void set(uint32 v); - uint32 get() const; - void clear(int crfd); - void set(int crfd, uint32 v); - uint32 get(int crfd) const; - void set_so(int crfd, bool v); - void compute(int crfd, int32 v); -}; - -inline void -powerpc_cr_register::clear(int crfd) -{ - cr &= ~(0xf << (28 - 4 * crfd)); -} - -inline void -powerpc_cr_register::set(int crfd, uint32 v) -{ - clear(crfd); - cr |= v << (28 - 4 * crfd); -} - -inline uint32 -powerpc_cr_register::get(int crfd) const -{ - return (cr >> (28 - 4 * crfd)) & 0xf; -} - -inline void -powerpc_cr_register::set_so(int crfd, bool v) -{ - const uint32 m = standalone_CR_SO_field::mask() << (28 - 4 * crfd); - cr = (cr & ~m) | (v ? m : 0); -} - -inline void -powerpc_cr_register::compute(int crfd, int32 v) -{ - const uint32 m = (standalone_CR_LT_field::mask() | - standalone_CR_GT_field::mask() | - standalone_CR_EQ_field::mask() ) << (28 - 4 * crfd); - cr = (cr & ~m); - if (v < 0) - cr |= standalone_CR_LT_field::mask() << (28 - 4 * crfd); - else if (v > 0) - cr |= standalone_CR_GT_field::mask() << (28 - 4 * crfd); - else - cr |= standalone_CR_EQ_field::mask() << (28 - 4 * crfd); -} - -inline void -powerpc_cr_register::set(uint32 v) -{ - cr = v; -} - -inline uint32 -powerpc_cr_register::get() const -{ - return cr; -} - -inline bool -powerpc_cr_register::test(int condition) const -{ - return (cr << condition) & 0x80000000; -} - - -/** - * XER register (SPR1) - **/ - -class powerpc_xer_register -{ - uint8 so; - uint8 ov; - uint8 ca; - uint8 byte_count; -public: - powerpc_xer_register(); - void set(uint32 xer); - uint32 get() const; - void set_so(int v) { so = v; } - int get_so() const { return so; } - void set_ov(int v) { ov = v; so |= v; } - int get_ov() const { return ov; } - void set_ca(int v) { ca = v; } - int get_ca() const { return ca; } - void set_count(int v) { byte_count = v; } - int get_count() const { return byte_count; } -}; - -inline -powerpc_xer_register::powerpc_xer_register() - : so(0), ov(0), ca(0), byte_count(0) -{ } - -inline uint32 -powerpc_xer_register::get() const -{ - return (so << 31) | (ov << 30) | (ca << 29) | byte_count; -} - -inline void -powerpc_xer_register::set(uint32 xer) -{ - so = XER_SO_field::extract(xer); - ov = XER_OV_field::extract(xer); - ca = XER_CA_field::extract(xer); - byte_count = XER_COUNT_field::extract(xer); -} - - -/** - * Special CPU flags - **/ - -#include "cpu/spcflags.hpp" -typedef basic_spcflags powerpc_spcflags; - - -/** - * Floating point register - **/ - -union powerpc_fpr { - uint64 j; - double d; -}; - - -/** - * Vector Status and Control Register - **/ - -class powerpc_vscr -{ - uint32 vscr; -public: - powerpc_vscr() : vscr(0) { } - void set(uint32 v) { vscr = v; } - uint32 get() const { return vscr; } - uint32 get_nj() const { return vscr & VSCR_NJ_field::mask(); } - void set_nj(bool v) { VSCR_NJ_field::insert(vscr, v); } - uint32 get_sat() const { return vscr & VSCR_SAT_field::mask(); } - void set_sat(bool v) { VSCR_SAT_field::insert(vscr, v); } -}; - - -/** - * Vector register - **/ - -union powerpc_vr -{ - uint8 b[16]; - uint16 h[8]; - uint32 w[4]; - uint64 j[2]; - float f[4]; -}; - - -/** - * User Environment Architecture (UEA) Register Set - **/ - -struct powerpc_registers -{ - enum { - GPR_BASE = 0, - FPR_BASE = 32, - CR = 64, - FPSCR, - XER, - LR, CTR, - PC, - SP = GPR_BASE + 1 - }; - - enum { - SPR_XER = 1, - SPR_LR = 8, - SPR_CTR = 9, - SPR_SDR1 = 25, - SPR_PVR = 287, - SPR_VRSAVE = 256, - }; - - static inline int GPR(int r) { return GPR_BASE + r; } - static inline int FPR(int r) { return FPR_BASE + r; } - static void interrupt_copy(powerpc_registers &oregs, powerpc_registers const &iregs); - - uint32 gpr[32]; // General-Purpose Registers - powerpc_fpr fpr[32]; // Floating-Point Registers - powerpc_vr vr[32]; // Vector Registers - powerpc_cr_register cr; // Condition Register - powerpc_xer_register xer; // XER Register (SPR 1) - powerpc_vscr vscr; // Vector Status and Control Register - uint32 vrsave; // AltiVec Save Register - uint32 fpscr; // Floating-Point Status and Control Register - uint32 lr; // Link Register (SPR 8) - uint32 ctr; // Count Register (SPR 9) - uint32 pc; // Program Counter - powerpc_spcflags spcflags; // Special CPU flags -#if KPX_MAX_CPUS == 1 - uint32 reserve_valid; - uint32 reserve_addr; -#else - static uint32 reserve_valid; - static uint32 reserve_addr; - static uint32 reserve_data; -#endif -}; - -#endif /* PPC_REGISTERS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp deleted file mode 100644 index 6db1fa29c..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp +++ /dev/null @@ -1,1589 +0,0 @@ -/* - * ppc-translate.cpp - PowerPC dynamic translation - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-instructions.hpp" -#include "cpu/ppc/ppc-operands.hpp" - -#if PPC_ENABLE_JIT -#include "cpu/jit/dyngen-exec.h" -#endif - -#ifdef SHEEPSHAVER -#include "cpu_emulation.h" -#endif - -#include - -#define DEBUG 1 -#include "debug.h" - -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -// Define to enable const branches optimization -#define FOLLOW_CONST_JUMPS 1 - -// FIXME: define ROM areas -static inline bool is_read_only_memory(uintptr addr) -{ -#ifdef SHEEPSHAVER - if ((addr - ROMBase) < ROM_AREA_SIZE) - return true; -#endif - return false; -} - -// Returns TRUE if we can directly generate a jump to the target block -// XXX mixing front-end and back-end conditions is not a very good idea... -static inline bool direct_chaining_possible(uint32 bpc, uint32 tpc) -{ -#ifndef DYNGEN_FAST_DISPATCH - return false; -#endif - return ((bpc ^ tpc) >> 12) == 0 || is_read_only_memory(tpc); -} - - -/** - * Basic block disassemblers - **/ - -#define TARGET_M68K 0 -#define TARGET_POWERPC 1 -#define TARGET_X86 2 -#define TARGET_AMD64 3 -#if defined(i386) || defined(__i386__) -#define TARGET_NATIVE TARGET_X86 -#endif -#if defined(x86_64) || defined(__x86_64__) -#define TARGET_NATIVE TARGET_AMD64 -#endif -#if defined(powerpc) || defined(__powerpc__) || defined(__ppc__) -#define TARGET_NATIVE TARGET_POWERPC -#endif - -#if PPC_ENABLE_JIT -static void disasm_block(int target, uint8 *start, uint32 length) -{ -#if ENABLE_MON - char disasm_str[200]; - sprintf(disasm_str, "%s $%x $%x", - target == TARGET_M68K ? "d68" : - target == TARGET_X86 ? "d86" : - target == TARGET_AMD64 ? "d8664" : - target == TARGET_POWERPC ? "d" : "x", - start, start + length - 1); - - char *arg[] = {"mon", -#ifdef SHEEPSHAVER - "-m", -#endif - "-r", disasm_str, NULL}; - mon(sizeof(arg)/sizeof(arg[0]) - 1, arg); -#endif -} - -static void disasm_translation(uint32 src_addr, uint32 src_len, - uint8* dst_addr, uint32 dst_len) -{ - printf("### Block at %08x translated to %p (%d bytes)\n", src_addr, dst_addr, dst_len); - printf("IN:\n"); - disasm_block(TARGET_POWERPC, vm_do_get_real_address(src_addr), src_len); - printf("OUT:\n"); -#ifdef TARGET_NATIVE - disasm_block(TARGET_NATIVE, dst_addr, dst_len); -#else - printf("unsupported disassembler for this archicture\n"); -#endif -} -#endif - - -/** - * DynGen dynamic code translation - **/ - -#if PPC_ENABLE_JIT -powerpc_cpu::block_info * -powerpc_cpu::compile_block(uint32 entry_point) -{ -#if DEBUG - bool disasm = false; -#else - const bool disasm = false; -#endif - -#if PPC_PROFILE_COMPILE_TIME - compile_count++; - clock_t start_time = clock(); -#endif - - powerpc_jit & dg = codegen; - codegen_context_t cg_context(dg); - cg_context.entry_point = entry_point; - again: - block_info *bi = my_block_cache.new_blockinfo(); - bi->init(entry_point); - bi->entry_point = dg.gen_start(entry_point); - - // Direct block chaining support variables - bool use_direct_block_chaining = false; - - int compile_status; - uint32 dpc = entry_point - 4; - uint32 min_pc, max_pc; - min_pc = max_pc = entry_point; - uint32 sync_pc = dpc; - uint32 sync_pc_offset = 0; - bool done_compile = false; - while (!done_compile) { - uint32 opcode = vm_read_memory_4(dpc += 4); - const instr_info_t *ii = decode(opcode); - if (ii->cflow & CFLOW_END_BLOCK) - done_compile = true; - - // Assume we can compile this opcode - compile_status = COMPILE_CODE_OK; - -#if PPC_FLIGHT_RECORDER - if (is_logging()) { - typedef void (*func_t)(dyngen_cpu_base, uint32, uint32); - func_t func = (func_t)nv_mem_fun((execute_pmf)&powerpc_cpu::do_record_step).ptr(); - dg.gen_invoke_CPU_im_im(func, dpc, opcode); - } -#endif - - union operands_t { - struct { - int size, sign; - int do_update; - int do_indexed; - } mem; - struct { - uint32 target; - } jmp; - }; - operands_t op; - - switch (ii->mnemo) { - case PPC_I(LBZ): // Load Byte and Zero - op.mem.size = 1; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LBZU): // Load Byte and Zero with Update - op.mem.size = 1; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LBZUX): // Load Byte and Zero with Update Indexed - op.mem.size = 1; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LBZX): // Load Byte and Zero Indexed - op.mem.size = 1; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LHA): // Load Half Word Algebraic - op.mem.size = 2; - op.mem.sign = 1; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LHAU): // Load Half Word Algebraic with Update - op.mem.size = 2; - op.mem.sign = 1; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LHAUX): // Load Half Word Algebraic with Update Indexed - op.mem.size = 2; - op.mem.sign = 1; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LHAX): // Load Half Word Algebraic Indexed - op.mem.size = 2; - op.mem.sign = 1; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LHZ): // Load Half Word and Zero - op.mem.size = 2; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LHZU): // Load Half Word and Zero with Update - op.mem.size = 2; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LHZUX): // Load Half Word and Zero with Update Indexed - op.mem.size = 2; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LHZX): // Load Half Word and Zero Indexed - op.mem.size = 2; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LWZ): // Load Word and Zero - op.mem.size = 4; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LWZU): // Load Word and Zero with Update - op.mem.size = 4; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_load; - case PPC_I(LWZUX): // Load Word and Zero with Update Indexed - op.mem.size = 4; - op.mem.sign = 0; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_load; - case PPC_I(LWZX): // Load Word and Zero Indexed - op.mem.size = 4; - op.mem.sign = 0; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_load; - { - do_load: - // Extract RZ operand - const int rA = rA_field::extract(opcode); - if (rA == 0 && !op.mem.do_update) - dg.gen_mov_32_T1_im(0); - else - dg.gen_load_T1_GPR(rA); - - // Extract index operand - if (op.mem.do_indexed) - dg.gen_load_T2_GPR(rB_field::extract(opcode)); - - switch (op.mem.size) { - case 1: - if (op.mem.do_indexed) - dg.gen_load_u8_T0_T1_T2(); - else - dg.gen_load_u8_T0_T1_im(operand_D::get(this, opcode)); - break; - case 2: - if (op.mem.do_indexed) { - if (op.mem.sign) - dg.gen_load_s16_T0_T1_T2(); - else - dg.gen_load_u16_T0_T1_T2(); - } - else { - const int32 offset = operand_D::get(this, opcode); - if (op.mem.sign) - dg.gen_load_s16_T0_T1_im(offset); - else - dg.gen_load_u16_T0_T1_im(offset); - } - break; - case 4: - if (op.mem.do_indexed) { - dg.gen_load_u32_T0_T1_T2(); - } - else { - const int32 offset = operand_D::get(this, opcode); - dg.gen_load_u32_T0_T1_im(offset); - } - break; - } - - // Commit result - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - - // Update RA - if (op.mem.do_update) { - if (op.mem.do_indexed) - dg.gen_add_32_T1_T2(); - else - dg.gen_add_32_T1_im(operand_D::get(this, opcode)); - dg.gen_store_T1_GPR(rA); - } - break; - } - case PPC_I(STB): // Store Byte - op.mem.size = 1; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STBU): // Store Byte with Update - op.mem.size = 1; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STBUX): // Store Byte with Update Indexed - op.mem.size = 1; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_store; - case PPC_I(STBX): // Store Byte Indexed - op.mem.size = 1; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_store; - case PPC_I(STH): // Store Half Word - op.mem.size = 2; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STHU): // Store Half Word with Update - op.mem.size = 2; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STHUX): // Store Half Word with Update Indexed - op.mem.size = 2; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_store; - case PPC_I(STHX): // Store Half Word Indexed - op.mem.size = 2; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_store; - case PPC_I(STW): // Store Word - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STWU): // Store Word with Update - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_store; - case PPC_I(STWUX): // Store Word with Update Indexed - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_store; - case PPC_I(STWX): // Store Word Indexed - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_store; - { - do_store: - // Extract RZ operand - const int rA = rA_field::extract(opcode); - if (rA == 0 && !op.mem.do_update) - dg.gen_mov_32_T1_im(0); - else - dg.gen_load_T1_GPR(rA); - - // Extract index operand - if (op.mem.do_indexed) - dg.gen_load_T2_GPR(rB_field::extract(opcode)); - - // Load register to commit to memory - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - - switch (op.mem.size) { - case 1: - if (op.mem.do_indexed) - dg.gen_store_8_T0_T1_T2(); - else - dg.gen_store_8_T0_T1_im(operand_D::get(this, opcode)); - break; - case 2: - if (op.mem.do_indexed) - dg.gen_store_16_T0_T1_T2(); - else - dg.gen_store_16_T0_T1_im(operand_D::get(this, opcode)); - break; - case 4: - if (op.mem.do_indexed) - dg.gen_store_32_T0_T1_T2(); - else - dg.gen_store_32_T0_T1_im(operand_D::get(this, opcode)); - break; - } - - // Update RA - if (op.mem.do_update) { - if (op.mem.do_indexed) - dg.gen_add_32_T1_T2(); - else - dg.gen_add_32_T1_im(operand_D::get(this, opcode)); - dg.gen_store_T1_GPR(rA); - } - break; - } - case PPC_I(LMW): // Load Multiple Word - case PPC_I(STMW): // Store Multiple Word - { - const int rA = rA_field::extract(opcode); - if (rA == 0) - dg.gen_mov_32_T0_im(operand_D::get(this, opcode)); - else { - dg.gen_load_T0_GPR(rA); - dg.gen_add_32_T0_im(operand_D::get(this, opcode)); - } - switch (ii->mnemo) { - case PPC_I(LMW): dg.gen_lmw_T0(rD_field::extract(opcode)); break; - case PPC_I(STMW): dg.gen_stmw_T0(rS_field::extract(opcode)); break; - } - break; - } -#if KPX_MAX_CPUS == 1 - case PPC_I(STWCX): // Store Word Conditional Indexed - case PPC_I(LWARX): // Load Word and Reserve Indexed - { - const int rA = rA_field::extract(opcode); - const int rB = rB_field::extract(opcode); - if (rA == 0) - dg.gen_load_T1_GPR(rB); - else { - dg.gen_load_T1_GPR(rA); - dg.gen_load_T2_GPR(rB); - dg.gen_add_32_T1_T2(); - } - switch (ii->mnemo) { - case PPC_I(LWARX): - dg.gen_lwarx_T0_T1(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - case PPC_I(STWCX): - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_stwcx_T0_T1(); - break; - } - break; - } -#endif - case PPC_I(BC): // Branch Conditional - { - const int bo = BO_field::extract(opcode); -#if FOLLOW_CONST_JUMPS - if (!BO_CONDITIONAL_BRANCH(bo) && !BO_DECREMENT_CTR(bo)) { - if (LK_field::test(opcode)) { - const uint32 npc = dpc + 4; - dg.gen_store_im_LR(npc); - } - if (AA_field::test(opcode)) - dpc = 0; - op.jmp.target = ((dpc + operand_BD::get(this, opcode)) & -4); - goto do_const_jump; - } -#endif - const uint32 tpc = ((AA_field::test(opcode) ? 0 : dpc) + operand_BD::get(this, opcode)) & -4; - const uint32 npc = dpc + 4; -#if DYNGEN_DIRECT_BLOCK_CHAINING - // Use direct block chaining for in-page jumps or jumps to ROM area - if (direct_chaining_possible(bi->pc, tpc)) { - use_direct_block_chaining = true; - bi->li[0].jmp_pc = tpc; - // Make sure it's a conditional branch - if (BO_CONDITIONAL_BRANCH(bo) || BO_DECREMENT_CTR(bo)) - bi->li[1].jmp_pc = npc; - } -#endif - - if (LK_field::test(opcode)) - dg.gen_store_im_LR(npc); - - dg.gen_bc(bo, BI_field::extract(opcode), tpc, npc, use_direct_block_chaining); - break; - } - case PPC_I(BCCTR): // Branch Conditional to Count Register - dg.gen_load_T0_CTR_aligned(); - goto do_branch; - case PPC_I(BCLR): // Branch Conditional to Link Register - dg.gen_load_T0_LR_aligned(); - goto do_branch; - { - do_branch: - const int bo = BO_field::extract(opcode); - const int bi = BI_field::extract(opcode); - - const uint32 npc = dpc + 4; - if (LK_field::test(opcode)) - dg.gen_store_im_LR(npc); - - dg.gen_bc(bo, bi, (uint32)-1, npc, use_direct_block_chaining); - break; - } - case PPC_I(B): // Branch - goto do_call; - { -#if FOLLOW_CONST_JUMPS - do_const_jump: - sync_pc = dpc = op.jmp.target - 4; - sync_pc_offset = 0; - if (dpc < min_pc) - min_pc = dpc; - else if (dpc > max_pc) - max_pc = dpc; - done_compile = false; - break; -#endif - do_call: - uint32 tpc = AA_field::test(opcode) ? 0 : dpc; - tpc = (tpc + operand_LI::get(this, opcode)) & -4; - - const uint32 npc = dpc + 4; - if (LK_field::test(opcode)) - dg.gen_store_im_LR(npc); -#if FOLLOW_CONST_JUMPS - else { - op.jmp.target = tpc; - goto do_const_jump; - } -#endif - -#if DYNGEN_DIRECT_BLOCK_CHAINING - // Use direct block chaining, addresses will be resolved at execution - if (direct_chaining_possible(bi->pc, tpc)) { - use_direct_block_chaining = true; - bi->li[0].jmp_pc = tpc; - } -#endif - - // BO field is built so that we always branch to pc - dg.gen_bc(BO_MAKE(0,0,0,0), 0, tpc, 0, use_direct_block_chaining); - break; - } - case PPC_I(CMP): // Compare - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - dg.gen_compare_T0_T1(crfD_field::extract(opcode)); - break; - } - case PPC_I(CMPI): // Compare Immediate - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_compare_T0_im(crfD_field::extract(opcode), operand_SIMM::get(this, opcode)); - break; - } - case PPC_I(CMPL): // Compare Logical - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - dg.gen_compare_logical_T0_T1(crfD_field::extract(opcode)); - break; - } - case PPC_I(CMPLI): // Compare Logical Immediate - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_compare_logical_T0_im(crfD_field::extract(opcode), operand_UIMM::get(this, opcode)); - break; - } - case PPC_I(CRAND): // Condition Register AND - case PPC_I(CRANDC): // Condition Register AND with Complement - case PPC_I(CREQV): // Condition Register Equivalent - case PPC_I(CRNAND): // Condition Register NAND - case PPC_I(CRNOR): // Condition Register NOR - case PPC_I(CROR): // Condition Register OR - case PPC_I(CRORC): // Condition Register OR with Complement - case PPC_I(CRXOR): // Condition Register XOR - { - dg.gen_load_T0_crb(crbA_field::extract(opcode)); - dg.gen_load_T1_crb(crbB_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(CRAND): dg.gen_and_32_T0_T1(); break; - case PPC_I(CRANDC): dg.gen_andc_32_T0_T1(); break; - case PPC_I(CREQV): dg.gen_eqv_32_T0_T1(); break; - case PPC_I(CRNAND): dg.gen_nand_32_T0_T1(); break; - case PPC_I(CRNOR): dg.gen_nor_32_T0_T1(); break; - case PPC_I(CROR): dg.gen_or_32_T0_T1(); break; - case PPC_I(CRORC): dg.gen_orc_32_T0_T1(); break; - case PPC_I(CRXOR): dg.gen_xor_32_T0_T1(); break; - default: abort(); - } - dg.gen_store_T0_crb(crbD_field::extract(opcode)); - break; - } - case PPC_I(AND): // AND - case PPC_I(ANDC): // AND with Complement - case PPC_I(EQV): // Equivalent - case PPC_I(NAND): // NAND - case PPC_I(NOR): // NOR - case PPC_I(ORC): // ORC - case PPC_I(XOR): // XOR - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(AND): dg.gen_and_32_T0_T1(); break; - case PPC_I(ANDC): dg.gen_andc_32_T0_T1(); break; - case PPC_I(EQV): dg.gen_eqv_32_T0_T1(); break; - case PPC_I(NAND): dg.gen_nand_32_T0_T1(); break; - case PPC_I(NOR): dg.gen_nor_32_T0_T1(); break; - case PPC_I(ORC): dg.gen_orc_32_T0_T1(); break; - case PPC_I(XOR): dg.gen_xor_32_T0_T1(); break; - default: abort(); - } - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(OR): // OR - { - const int rS = rS_field::extract(opcode); - const int rB = rB_field::extract(opcode); - const int rA = rA_field::extract(opcode); - dg.gen_load_T0_GPR(rS); - if (rS != rB) { // Not MR case - dg.gen_load_T1_GPR(rB); - dg.gen_or_32_T0_T1(); - } - dg.gen_store_T0_GPR(rA); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(ORI): // OR Immediate - { - const int rA = rA_field::extract(opcode); - const int rS = rS_field::extract(opcode); - const uint32 val = operand_UIMM::get(this, opcode); - if (val == 0) { - if (rA != rS) { // Skip NOP, handle register move - dg.gen_load_T0_GPR(rS); - dg.gen_store_T0_GPR(rA); - } - } - else { - dg.gen_load_T0_GPR(rS); - dg.gen_or_32_T0_im(val); - dg.gen_store_T0_GPR(rA); - } - break; - } - case PPC_I(XORI): // XOR Immediate - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_xor_32_T0_im(operand_UIMM::get(this, opcode)); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - break; - } - case PPC_I(ORIS): // OR Immediate Shifted - case PPC_I(XORIS): // XOR Immediate Shifted - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - uint32 val = operand_UIMM_shifted::get(this, opcode); - switch (ii->mnemo) { - case PPC_I(ORIS): dg.gen_or_32_T0_im(val); break; - case PPC_I(XORIS): dg.gen_xor_32_T0_im(val); break; - default: abort(); - } - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - break; - } - case PPC_I(ANDI): // AND Immediate - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_and_32_T0_im(operand_UIMM::get(this, opcode)); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(ANDIS): // AND Immediate Shifted - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_and_32_T0_im(operand_UIMM_shifted::get(this, opcode)); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(EXTSB): // Extend Sign Byte - case PPC_I(EXTSH): // Extend Sign Half Word - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(EXTSB): dg.gen_se_8_32_T0(); break; - case PPC_I(EXTSH): dg.gen_se_16_32_T0(); break; - default: abort(); - } - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(NEG): // Negate - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - if (OE_field::test(opcode)) - dg.gen_nego_T0(); - else - dg.gen_neg_32_T0(); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(MFCR): // Move from Condition Register - { - dg.gen_load_T0_CR(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(MFSPR): // Move from Special-Purpose Register - { - const int spr = operand_SPR::get(this, opcode); - switch (spr) { - case powerpc_registers::SPR_XER: - dg.gen_load_T0_XER(); - break; - case powerpc_registers::SPR_LR: - dg.gen_load_T0_LR(); - break; - case powerpc_registers::SPR_CTR: - dg.gen_load_T0_CTR(); - break; - case powerpc_registers::SPR_VRSAVE: - dg.gen_load_T0_VRSAVE(); - break; -#ifdef SHEEPSHAVER - case powerpc_registers::SPR_SDR1: - dg.gen_mov_32_T0_im(0xdead001f); - break; - case powerpc_registers::SPR_PVR: { - extern uint32 PVR; - dg.gen_mov_32_T0_im(PVR); - break; - } - default: - dg.gen_mov_32_T0_im(0); - break; -#else - default: goto do_generic; -#endif - } - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(MTSPR): // Move to Special-Purpose Register - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - const int spr = operand_SPR::get(this, opcode); - switch (spr) { - case powerpc_registers::SPR_XER: - dg.gen_store_T0_XER(); - break; - case powerpc_registers::SPR_LR: - dg.gen_store_T0_LR(); - break; - case powerpc_registers::SPR_CTR: - dg.gen_store_T0_CTR(); - break; - case powerpc_registers::SPR_VRSAVE: - dg.gen_store_T0_VRSAVE(); - break; -#ifndef SHEEPSHAVER - default: goto do_generic; -#endif - } - break; - } - case PPC_I(ADD): // Add - case PPC_I(ADDC): // Add Carrying - case PPC_I(ADDE): // Add Extended - case PPC_I(SUBF): // Subtract From - case PPC_I(SUBFC): // Subtract from Carrying - case PPC_I(SUBFE): // Subtract from Extended - case PPC_I(MULLW): // Multiply Low Word - case PPC_I(DIVW): // Divide Word - case PPC_I(DIVWU): // Divide Word Unsigned - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - if (OE_field::test(opcode)) { - switch (ii->mnemo) { - case PPC_I(ADD): dg.gen_addo_T0_T1(); break; - case PPC_I(ADDC): dg.gen_addco_T0_T1(); break; - case PPC_I(ADDE): dg.gen_addeo_T0_T1(); break; - case PPC_I(SUBF): dg.gen_subfo_T0_T1(); break; - case PPC_I(SUBFC): dg.gen_subfco_T0_T1(); break; - case PPC_I(SUBFE): dg.gen_subfeo_T0_T1(); break; - case PPC_I(MULLW): dg.gen_mullwo_T0_T1(); break; - case PPC_I(DIVW): dg.gen_divwo_T0_T1(); break; - case PPC_I(DIVWU): dg.gen_divwuo_T0_T1(); break; - default: abort(); - } - } - else { - switch (ii->mnemo) { - case PPC_I(ADD): dg.gen_add_32_T0_T1(); break; - case PPC_I(ADDC): dg.gen_addc_T0_T1(); break; - case PPC_I(ADDE): dg.gen_adde_T0_T1(); break; - case PPC_I(SUBF): dg.gen_subf_T0_T1(); break; - case PPC_I(SUBFC): dg.gen_subfc_T0_T1(); break; - case PPC_I(SUBFE): dg.gen_subfe_T0_T1(); break; - case PPC_I(MULLW): dg.gen_umul_32_T0_T1(); break; - case PPC_I(DIVW): dg.gen_divw_T0_T1(); break; - case PPC_I(DIVWU): dg.gen_divwu_T0_T1(); break; - default: abort(); - } - } - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(ADDIC): // Add Immediate Carrying - case PPC_I(ADDIC_): // Add Immediate Carrying and Record - case PPC_I(SUBFIC): // Subtract from Immediate Carrying - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - const uint32 val = operand_SIMM::get(this, opcode); - switch (ii->mnemo) { - case PPC_I(ADDIC): - dg.gen_addc_T0_im(val); - break; - case PPC_I(ADDIC_): - dg.gen_addc_T0_im(val); - dg.gen_record_cr0_T0(); - break; - case PPC_I(SUBFIC): - dg.gen_subfc_T0_im(val); - break; - defautl: - abort(); - } - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(ADDME): // Add to Minus One Extended - case PPC_I(ADDZE): // Add to Zero Extended - case PPC_I(SUBFME): // Subtract from Minus One Extended - case PPC_I(SUBFZE): // Subtract from Zero Extended - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - if (OE_field::test(opcode)) { - switch (ii->mnemo) { - case PPC_I(ADDME): dg.gen_addmeo_T0(); break; - case PPC_I(ADDZE): dg.gen_addzeo_T0(); break; - case PPC_I(SUBFME): dg.gen_subfmeo_T0(); break; - case PPC_I(SUBFZE): dg.gen_subfzeo_T0(); break; - default: abort(); - } - } - else { - switch (ii->mnemo) { - case PPC_I(ADDME): dg.gen_addme_T0(); break; - case PPC_I(ADDZE): dg.gen_addze_T0(); break; - case PPC_I(SUBFME): dg.gen_subfme_T0(); break; - case PPC_I(SUBFZE): dg.gen_subfze_T0(); break; - default: abort(); - } - } - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(ADDI): // Add Immediate - { - const int rA = rA_field::extract(opcode); - const int rD = rD_field::extract(opcode); - if (rA == 0) // li rD,value - dg.gen_mov_32_T0_im(operand_SIMM::get(this, opcode)); - else { - dg.gen_load_T0_GPR(rA); - dg.gen_add_32_T0_im(operand_SIMM::get(this, opcode)); - } - dg.gen_store_T0_GPR(rD); - break; - } - case PPC_I(ADDIS): // Add Immediate Shifted - { - const int rA = rA_field::extract(opcode); - const int rD = rD_field::extract(opcode); - if (rA == 0) // lis rD,value - dg.gen_mov_32_T0_im(operand_SIMM_shifted::get(this, opcode)); - else { - dg.gen_load_T0_GPR(rA); - dg.gen_add_32_T0_im(operand_SIMM_shifted::get(this, opcode)); - } - dg.gen_store_T0_GPR(rD); - break; - } - case PPC_I(RLWIMI): // Rotate Left Word Immediate then Mask Insert - { - const int rA = rA_field::extract(opcode); - const int rS = rS_field::extract(opcode); - const int SH = SH_field::extract(opcode); - const int MB = MB_field::extract(opcode); - const int ME = ME_field::extract(opcode); - dg.gen_load_T0_GPR(rA); - dg.gen_load_T1_GPR(rS); - const uint32 m = mask_operand::compute(MB, ME); - dg.gen_rlwimi_T0_T1(SH, m); - dg.gen_store_T0_GPR(rA); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(RLWINM): // Rotate Left Word Immediate then AND with Mask - { - const int rS = rS_field::extract(opcode); - const int rA = rA_field::extract(opcode); - const int SH = SH_field::extract(opcode); - const int MB = MB_field::extract(opcode); - const int ME = ME_field::extract(opcode); - const uint32 m = mask_operand::compute(MB, ME); - dg.gen_load_T0_GPR(rS); - if (MB == 0) { - if (ME == 31) { - // rotlwi rA,rS,SH - if (SH > 0) - dg.gen_rol_32_T0_im(SH); - } - else if (ME == (31 - SH)) { - // slwi rA,rS,SH - dg.gen_lsl_32_T0_im(SH); - } - else if (SH == 0) { - // andi rA,rS,MASK(0,ME) - dg.gen_and_32_T0_im(m); - } - else goto do_generic_rlwinm; - } - else if (ME == 31) { - if (SH == (32 - MB)) { - // srwi rA,rS,SH - dg.gen_lsr_32_T0_im(MB); - } - else if (SH == 0) { - // andi rA,rS,MASK(MB,31) - dg.gen_and_32_T0_im(m); - } - else goto do_generic_rlwinm; - } - else { - // rlwinm rA,rS,SH,MB,ME - do_generic_rlwinm: - dg.gen_rlwinm_T0_T1(SH, m); - } - dg.gen_store_T0_GPR(rA); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(RLWNM): // Rotate Left Word then AND with Mask - { - const int rS = rS_field::extract(opcode); - const int rB = rB_field::extract(opcode); - const int rA = rA_field::extract(opcode); - const int MB = MB_field::extract(opcode); - const int ME = ME_field::extract(opcode); - const uint32 m = mask_operand::compute(MB, ME); - dg.gen_load_T0_GPR(rS); - dg.gen_load_T1_GPR(rB); - if (MB == 0 && ME == 31) - dg.gen_rol_32_T0_T1(); - else - dg.gen_rlwnm_T0_T1(m); - dg.gen_store_T0_GPR(rA); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(CNTLZW): // Count Leading Zeros Word - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_cntlzw_32_T0(); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(SLW): // Shift Left Word - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - dg.gen_slw_T0_T1(); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(SRW): // Shift Right Word - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - dg.gen_srw_T0_T1(); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(SRAW): // Shift Right Algebraic Word - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - dg.gen_sraw_T0_T1(); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(SRAWI): // Shift Right Algebraic Word Immediate - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_sraw_T0_im(SH_field::extract(opcode)); - dg.gen_store_T0_GPR(rA_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(MULHW): // Multiply High Word - case PPC_I(MULHWU): // Multiply High Word Unsigned - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_load_T1_GPR(rB_field::extract(opcode)); - if (ii->mnemo == PPC_I(MULHW)) - dg.gen_mulhw_T0_T1(); - else - dg.gen_mulhwu_T0_T1(); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr0_T0(); - break; - } - case PPC_I(MULLI): // Multiply Low Immediate - { - dg.gen_load_T0_GPR(rA_field::extract(opcode)); - dg.gen_mulli_T0_im(operand_SIMM::get(this, opcode)); - dg.gen_store_T0_GPR(rD_field::extract(opcode)); - break; - } - case PPC_I(DCBZ): // Data Cache Block Clear to Zero - { - const int rA = rA_field::extract(opcode); - const int rB = rB_field::extract(opcode); - if (rA == 0) - dg.gen_load_T0_GPR(rB); - else { - dg.gen_load_T0_GPR(rA); - dg.gen_load_T1_GPR(rB); - dg.gen_add_32_T0_T1(); - } - dg.gen_dcbz_T0(); - break; - } - case PPC_I(DCBA): // Data Cache Block Allocate - case PPC_I(DCBF): // Data Cache Block Flush - case PPC_I(DCBI): // Data Cache Block Invalidate - case PPC_I(DCBST): // Data Cache Block Store - case PPC_I(DCBT): // Data Cache Block Touch - case PPC_I(DCBTST): // Data Cache Block Touch for Store - case PPC_I(ECIWX): // External Control In Word Indexed - case PPC_I(ECOWX): // External Control Out Word Indexed - case PPC_I(EIEIO): // Enforce In-Order Execution of I/O - case PPC_I(SYNC): // Synchronize - { - break; - } - case PPC_I(ISYNC): // Instruction synchronize - { - typedef void (*func_t)(dyngen_cpu_base); - func_t func = (func_t)nv_mem_fun(&powerpc_cpu::execute_invalidate_cache_range).ptr(); - dg.gen_invoke_CPU(func); - break; - } - case PPC_I(MTCRF): // Move to Condition Register Fields - { - dg.gen_load_T0_GPR(rS_field::extract(opcode)); - dg.gen_mtcrf_T0_im(field2mask[CRM_field::extract(opcode)]); - break; - } - case PPC_I(MCRF): // Move Condition Register Field - { - dg.gen_load_T0_crf(crfS_field::extract(opcode)); - dg.gen_store_T0_crf(crfD_field::extract(opcode)); - break; - } - case PPC_I(LFD): // Load Floating-Point Double - op.mem.size = 8; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_fp_load;; - case PPC_I(LFDU): // Load Floating-Point Double with Update - op.mem.size = 8; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_fp_load; - case PPC_I(LFDUX): // Load Floating-Point Double with Update Indexed - op.mem.size = 8; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_fp_load; - case PPC_I(LFDX): // Load Floating-Point Double Indexed - op.mem.size = 8; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_fp_load; - case PPC_I(LFS): // Load Floating-Point Single - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_fp_load; - case PPC_I(LFSU): // Load Floating-Point Single with Update - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_fp_load; - case PPC_I(LFSUX): // Load Floating-Point Single with Update Indexed - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_fp_load; - case PPC_I(LFSX): // Load Floating-Point Single Indexed - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_fp_load; - { - do_fp_load: - // Extract RZ operand - const int rA = rA_field::extract(opcode); - if (rA == 0 && !op.mem.do_update) - dg.gen_mov_32_T1_im(0); - else - dg.gen_load_T1_GPR(rA); - - // Extract index operand - if (op.mem.do_indexed) - dg.gen_load_T2_GPR(rB_field::extract(opcode)); - - // Load floating point data - if (op.mem.size == 8) { - if (op.mem.do_indexed) - dg.gen_load_double_FD_T1_T2(); - else - dg.gen_load_double_FD_T1_im(operand_D::get(this, opcode)); - } - else { - if (op.mem.do_indexed) - dg.gen_load_single_FD_T1_T2(); - else - dg.gen_load_single_FD_T1_im(operand_D::get(this, opcode)); - } - - // Commit result - dg.gen_store_FD_FPR(frD_field::extract(opcode)); - - // Update RA - if (op.mem.do_update) { - if (op.mem.do_indexed) - dg.gen_add_32_T1_T2(); - else - dg.gen_add_32_T1_im(operand_D::get(this, opcode)); - dg.gen_store_T1_GPR(rA); - } - break; - } - case PPC_I(STFD): // Store Floating-Point Double - op.mem.size = 8; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_fp_store; - case PPC_I(STFDU): // Store Floating-Point Double with Update - op.mem.size = 8; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_fp_store; - case PPC_I(STFDUX): // Store Floating-Point Double with Update Indexed - op.mem.size = 8; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_fp_store; - case PPC_I(STFDX): // Store Floating-Point Double Indexed - op.mem.size = 8; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_fp_store; - case PPC_I(STFS): // Store Floating-Point Single - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 0; - goto do_fp_store; - case PPC_I(STFSU): // Store Floating-Point Single with Update - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 0; - goto do_fp_store; - case PPC_I(STFSUX): // Store Floating-Point Single with Update Indexed - op.mem.size = 4; - op.mem.do_update = 1; - op.mem.do_indexed = 1; - goto do_fp_store; - case PPC_I(STFSX): // Store Floating-Point Single Indexed - op.mem.size = 4; - op.mem.do_update = 0; - op.mem.do_indexed = 1; - goto do_fp_store; - { - do_fp_store: - // Extract RZ operand - const int rA = rA_field::extract(opcode); - if (rA == 0 && !op.mem.do_update) - dg.gen_mov_32_T1_im(0); - else - dg.gen_load_T1_GPR(rA); - - // Extract index operand - if (op.mem.do_indexed) - dg.gen_load_T2_GPR(rB_field::extract(opcode)); - - // Load register to commit to memory - dg.gen_load_F0_FPR(frS_field::extract(opcode)); - - // Store floating point data - if (op.mem.size == 8) { - if (op.mem.do_indexed) - dg.gen_store_double_F0_T1_T2(); - else - dg.gen_store_double_F0_T1_im(operand_D::get(this, opcode)); - } - else { - if (op.mem.do_indexed) - dg.gen_store_single_F0_T1_T2(); - else - dg.gen_store_single_F0_T1_im(operand_D::get(this, opcode)); - } - - // Update RA - if (op.mem.do_update) { - if (op.mem.do_indexed) - dg.gen_add_32_T1_T2(); - else - dg.gen_add_32_T1_im(operand_D::get(this, opcode)); - dg.gen_store_T1_GPR(rA); - } - break; - } -#if PPC_ENABLE_FPU_EXCEPTIONS == 0 - case PPC_I(FABS): // Floating Absolute Value - case PPC_I(FNABS): // Floating Negative Absolute Value - case PPC_I(FNEG): // Floating Negate - case PPC_I(FMR): // Floating Move Register - { - dg.gen_load_F0_FPR(frB_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(FABS): dg.gen_fabs_FD_F0(); break; - case PPC_I(FNABS): dg.gen_fnabs_FD_F0(); break; - case PPC_I(FNEG): dg.gen_fneg_FD_F0(); break; - case PPC_I(FMR): dg.gen_fmov_FD_F0(); break; - } - dg.gen_store_FD_FPR(frD_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr1(); - break; - } - case PPC_I(FADD): // Floating Add (Double-Precision) - case PPC_I(FSUB): // Floating Subtract (Double-Precision) - case PPC_I(FMUL): // Floating Multiply (Double-Precision) - case PPC_I(FDIV): // Floating Divide (Double-Precision) - case PPC_I(FADDS): // Floating Add (Single-Precision) - case PPC_I(FSUBS): // Floating Subtract (Single-Precision) - case PPC_I(FMULS): // Floating Multiply (Single-Precision) - case PPC_I(FDIVS): // Floating Divide (Single-Precision) - { - dg.gen_load_F0_FPR(frA_field::extract(opcode)); - if (ii->mnemo == PPC_I(FMUL) || ii->mnemo == PPC_I(FMULS)) - dg.gen_load_F1_FPR(frC_field::extract(opcode)); - else - dg.gen_load_F1_FPR(frB_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(FADD): dg.gen_fadd_FD_F0_F1(); break; - case PPC_I(FSUB): dg.gen_fsub_FD_F0_F1(); break; - case PPC_I(FMUL): dg.gen_fmul_FD_F0_F1(); break; - case PPC_I(FDIV): dg.gen_fdiv_FD_F0_F1(); break; - case PPC_I(FADDS): dg.gen_fadds_FD_F0_F1(); break; - case PPC_I(FSUBS): dg.gen_fsubs_FD_F0_F1(); break; - case PPC_I(FMULS): dg.gen_fmuls_FD_F0_F1(); break; - case PPC_I(FDIVS): dg.gen_fdivs_FD_F0_F1(); break; - } - dg.gen_store_FD_FPR(frD_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr1(); - break; - } - case PPC_I(FMADD): // Floating Multiply-Add (Double-Precision) - case PPC_I(FMSUB): // Floating Multiply-Subtract (Double-Precision) - case PPC_I(FNMADD): // Floating Negative Multiply-Add (Double-Precision) - case PPC_I(FNMSUB): // Floating Negative Multiply-Subract (Double-Precision) - case PPC_I(FMADDS): // Floating Multiply-Add (Single-Precision) - case PPC_I(FMSUBS): // Floating Multiply-Subtract (Single-Precision) - case PPC_I(FNMADDS): // Floating Negative Multiply-Add (Single-Precision) - case PPC_I(FNMSUBS): // Floating Negative Multiply-Subract (Single-Precision) - { - dg.gen_load_F0_FPR(frA_field::extract(opcode)); - dg.gen_load_F1_FPR(frC_field::extract(opcode)); - dg.gen_load_F2_FPR(frB_field::extract(opcode)); - switch (ii->mnemo) { - case PPC_I(FMADD): dg.gen_fmadd_FD_F0_F1_F2(); break; - case PPC_I(FMSUB): dg.gen_fmsub_FD_F0_F1_F2(); break; - case PPC_I(FNMADD): dg.gen_fnmadd_FD_F0_F1_F2(); break; - case PPC_I(FNMSUB): dg.gen_fnmsub_FD_F0_F1_F2(); break; - case PPC_I(FMADDS): dg.gen_fmadds_FD_F0_F1_F2(); break; - case PPC_I(FMSUBS): dg.gen_fmsubs_FD_F0_F1_F2(); break; - case PPC_I(FNMADDS): dg.gen_fnmadds_FD_F0_F1_F2(); break; - case PPC_I(FNMSUBS): dg.gen_fnmsubs_FD_F0_F1_F2(); break; - } - dg.gen_store_FD_FPR(frD_field::extract(opcode)); - if (Rc_field::test(opcode)) - dg.gen_record_cr1(); - break; - } -#endif - case PPC_I(LVEWX): - case PPC_I(LVX): - case PPC_I(LVXL): - case PPC_I(STVEWX): - case PPC_I(STVX): - case PPC_I(STVXL): - assert(vD_field::mask() == vS_field::mask()); - assert(vA_field::mask() == rA_field::mask()); - assert(vB_field::mask() == rB_field::mask()); - // fall-through - case PPC_I(VCMPEQFP): - case PPC_I(VCMPEQUB): - case PPC_I(VCMPEQUH): - case PPC_I(VCMPEQUW): - case PPC_I(VCMPGEFP): - case PPC_I(VCMPGTFP): - case PPC_I(VCMPGTSB): - case PPC_I(VCMPGTSH): - case PPC_I(VCMPGTSW): - { - const int vD = vD_field::extract(opcode); - const int vA = vA_field::extract(opcode); - const int vB = vB_field::extract(opcode); - if (!dg.gen_vector_compare(ii->mnemo, vD, vA, vB, vRc_field::test(opcode))) - goto do_generic; - break; - } - case PPC_I(VADDFP): - case PPC_I(VADDUBM): - case PPC_I(VADDUHM): - case PPC_I(VADDUWM): - case PPC_I(VAND): - case PPC_I(VANDC): - case PPC_I(VAVGUB): - case PPC_I(VAVGUH): - case PPC_I(VMAXSH): - case PPC_I(VMAXUB): - case PPC_I(VMINSH): - case PPC_I(VMINUB): - case PPC_I(VNOR): - case PPC_I(VOR): - case PPC_I(VSUBFP): - case PPC_I(VSUBUBM): - case PPC_I(VSUBUHM): - case PPC_I(VSUBUWM): - case PPC_I(VXOR): - case PPC_I(VREFP): - case PPC_I(VRSQRTEFP): - { - const int vD = vD_field::extract(opcode); - const int vA = vA_field::extract(opcode); - const int vB = vB_field::extract(opcode); - if (!dg.gen_vector_2(ii->mnemo, vD, vA, vB)) - goto do_generic; - break; - } - case PPC_I(VSEL): - case PPC_I(VPERM): - case PPC_I(VMADDFP): - case PPC_I(VNMSUBFP): - { - const int vD = vD_field::extract(opcode); - const int vA = vA_field::extract(opcode); - const int vB = vB_field::extract(opcode); - const int vC = vC_field::extract(opcode); - if (!dg.gen_vector_3(ii->mnemo, vD, vA, vB, vC)) - goto do_generic; - break; - } - case PPC_I(VSLDOI): - { - const int vD = vD_field::extract(opcode); - const int vA = vA_field::extract(opcode); - const int vB = vB_field::extract(opcode); - const int SH = vSH_field::extract(opcode); - if (!dg.gen_vector_3(ii->mnemo, vD, vA, vB, SH)) - goto do_generic; - break; - } - case PPC_I(MFVSCR): - { - if (!dg.gen_vector_1(ii->mnemo, vD_field::extract(opcode))) - goto do_generic; - break; - } - case PPC_I(MTVSCR): - { - if (!dg.gen_vector_1(ii->mnemo, vB_field::extract(opcode))) - goto do_generic; - break; - } - case PPC_I(VSPLTISB): - case PPC_I(VSPLTISH): - case PPC_I(VSPLTISW): - { - const int vD = vD_field::extract(opcode); - const int SIMM = op_sign_extend_5_32::apply(vUIMM_field::extract(opcode)); - if (!dg.gen_vector_2(ii->mnemo, vD, SIMM, 0)) - goto do_generic; - break; - } - case PPC_I(VSPLTB): - case PPC_I(VSPLTH): - case PPC_I(VSPLTW): - { - const int vD = vD_field::extract(opcode); - const int UIMM = vUIMM_field::extract(opcode); - const int vB = vB_field::extract(opcode); - if (!dg.gen_vector_2(ii->mnemo, vD, UIMM, vB)) - goto do_generic; - break; - } - default: // Direct call to instruction handler - { - typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func; - do_generic: - func = (func_t)ii->execute.ptr(); - goto do_invoke; - do_illegal: - func = (func_t)nv_mem_fun(&powerpc_cpu::execute_illegal).ptr(); - goto do_invoke; - do_invoke: -#if PPC_PROFILE_GENERIC_CALLS - if (ii->mnemo <= PPC_I(MAX)) { - uintptr mem = (uintptr)&generic_calls_count[ii->mnemo]; - if (mem <= 0xffffffff) - dg.gen_inc_32_mem(mem); - } -#endif - cg_context.pc = dpc; - cg_context.opcode = opcode; - cg_context.instr_info = ii; - cg_context.done_compile = done_compile; - compile_status = compile1(cg_context); - switch (compile_status) { - case COMPILE_FAILURE: - case COMPILE_EPILOGUE_OK: - if ((dpc - sync_pc) > sync_pc_offset) { - sync_pc = dpc; - sync_pc_offset = 0; - if (compile_status == COMPILE_EPILOGUE_OK) - break; - dg.gen_set_PC_im(dpc); - } - sync_pc_offset += 4; - dg.gen_invoke_CPU_im(func, opcode); - compile_status = COMPILE_CODE_OK; // could generate code, though a call to handler - break; - } - done_compile = cg_context.done_compile; - } - } - if (dg.full_translation_cache()) { - // Invalidate cache and start again - invalidate_cache(); - goto again; - } - } - // Do nothing if block has special epilogue code generated already - assert(compile_status != COMPILE_FAILURE); - if (compile_status != COMPILE_EPILOGUE_OK) { - // In direct block chaining mode, this code is reached only if - // there are pending spcflags, i.e. get out of this block - if (!use_direct_block_chaining) { - // TODO: optimize this to a direct jump to pregenerated code? - dg.gen_mov_ad_A0_im((uintptr)bi); - dg.gen_jump_next_A0(); - } - dg.gen_exec_return(); - } - bi->end_pc = dpc; - if (dpc < min_pc) - min_pc = dpc; - else if (dpc > max_pc) - max_pc = dpc; - bi->min_pc = min_pc; - bi->max_pc = max_pc; - -#if DYNGEN_DIRECT_BLOCK_CHAINING - // Generate backpatch trampolines - if (use_direct_block_chaining) { - typedef void *(*func_t)(dyngen_cpu_base); - func_t func = (func_t)nv_mem_fun(&powerpc_cpu::compile_chain_block).ptr(); - for (int i = 0; i < block_info::MAX_TARGETS; i++) { - if (bi->li[i].jmp_pc != block_info::INVALID_PC) { - uint8 *p = dg.gen_align(16); - dg.gen_mov_ad_A0_im(((uintptr)bi) | i); - dg.gen_invoke_CPU_A0_ret_A0(func); - dg.gen_jmp_A0(); - assert(dg.jmp_addr[i] != NULL); - bi->li[i].jmp_addr = dg.jmp_addr[i]; - bi->li[i].jmp_resolve_addr = p; - dg_set_jmp_target_noflush(bi->li[i].jmp_addr, bi->li[i].jmp_resolve_addr); - } - } - } -#endif - - bi->size = dg.code_ptr() - bi->entry_point; - if (disasm) - disasm_translation(entry_point, dpc - entry_point + 4, bi->entry_point, bi->size); - - dg.gen_end(); - my_block_cache.add_to_cl_list(bi); - if (is_read_only_memory(bi->pc)) - my_block_cache.add_to_dormant_list(bi); - else - my_block_cache.add_to_active_list(bi); -#if PPC_PROFILE_COMPILE_TIME - compile_time += (clock() - start_time); -#endif - return bi; -} -#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp b/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp deleted file mode 100644 index 0b521d534..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp +++ /dev/null @@ -1,66 +0,0 @@ -/* - * spcflags.hpp - CPU special flags - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 SPCFLAGS_H -#define SPCFLAGS_H - -/** - * Basic special flags - **/ - -enum { - SPCFLAG_CPU_EXEC_RETURN = 1 << 0, // Return from emulation loop - SPCFLAG_CPU_TRIGGER_INTERRUPT = 1 << 1, // Trigger user interrupt - SPCFLAG_CPU_HANDLE_INTERRUPT = 1 << 2, // Call user interrupt handler - SPCFLAG_CPU_ENTER_MON = 1 << 3, // Enter cxmon - SPCFLAG_JIT_EXEC_RETURN = 1 << 4, // Return from compiled code -}; - -class basic_spcflags -{ - uint32 mask; - spinlock_t lock; - -public: - - basic_spcflags() - : mask(0), lock(SPIN_LOCK_UNLOCKED) - { } - - bool empty() const - { return (mask == 0); } - - bool test(uint32 v) const - { return (mask & v); } - - void init(uint32 v) - { spin_lock(&lock); mask = v; spin_unlock(&lock); } - - uint32 get() const - { return mask; } - - void set(uint32 v) - { spin_lock(&lock); mask |= v; spin_unlock(&lock); } - - void clear(uint32 v) - { spin_lock(&lock); mask &= ~v; spin_unlock(&lock); } -}; - -#endif /* SPCFLAGS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp b/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp deleted file mode 100644 index 55f30ec36..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp +++ /dev/null @@ -1,298 +0,0 @@ -/* - * vm.hpp - Virtual memory management - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 VM_H -#define VM_H - -/// -/// Optimized memory accessors -/// - -#if defined(__i386__) || defined(__powerpc__) || defined(__ppc__) || defined(__m68k__) || defined(__x86_64__) -# define VM_CAN_ACCESS_UNALIGNED -#endif - -#ifdef WORDS_BIGENDIAN - -#ifdef VM_CAN_ACCESS_UNALIGNED - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_2 -#define VM_OPTIMIZED_MEMORY_ACCESS_2 -static inline uint32 vm_do_read_memory_2(uint16 *a) { return *a; } -static inline void vm_do_write_memory_2(uint16 *a, uint32 v) { *a = v; } -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_4 -#define VM_OPTIMIZED_MEMORY_ACCESS_4 -static inline uint32 vm_do_read_memory_4(uint32 *a) { return *a; } -static inline void vm_do_write_memory_4(uint32 *a, uint32 v) { *a = v; } -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_8 -#define VM_OPTIMIZED_MEMORY_ACCESS_8 -static inline uint64 vm_do_read_memory_8(uint64 *a) { return *a; } -static inline void vm_do_write_memory_8(uint64 *a, uint64 v) { *a = v; } -#endif - -#endif /* VM_CAN_ACCESS_UNALIGNED */ - -#else - -#ifdef VM_CAN_ACCESS_UNALIGNED - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_2 -#define VM_OPTIMIZED_MEMORY_ACCESS_2 -static inline uint32 vm_do_read_memory_2(uint16 *a) { return bswap_16(*a); } -static inline void vm_do_write_memory_2(uint16 *a, uint32 v) { *a = bswap_16(v); } -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_4 -#define VM_OPTIMIZED_MEMORY_ACCESS_4 -static inline uint32 vm_do_read_memory_4(uint32 *a) { return bswap_32(*a); } -static inline void vm_do_write_memory_4(uint32 *a, uint32 v) { *a = bswap_32(v); } -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_8 -#define VM_OPTIMIZED_MEMORY_ACCESS_8 -static inline uint64 vm_do_read_memory_8(uint64 *a) { return bswap_64(*a); } -static inline void vm_do_write_memory_8(uint64 *a, uint64 v) { *a = bswap_64(v); } -#endif - -#endif /* VM_CAN_ACCESS_UNALIGNED */ - -#endif /* WORDS_BIGENDIAN */ - -/// -/// Generic core memory accessors -/// - -static inline uint32 vm_do_read_memory_1(uint8 *a) -{ - return *a; -} -static inline void vm_do_write_memory_1(uint8 *a, uint32 v) -{ - *a = v; -} - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_2 -static inline uint32 vm_do_read_memory_2(uint16 *a) -{ - uint8 * b = (uint8 *)a; - return (b[0] << 8) | b[1]; -} -static inline void vm_do_write_memory_2(uint16 *a, uint32 v) -{ - uint8 * b = (uint8 *)a; - b[0] = v >> 8; - b[1] = v; -} -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_4 -static inline uint32 vm_do_read_memory_4(uint32 *a) -{ - uint8 * b = (uint8 *)a; - return (b[0] << 24) | (b[1] << 16) | (b[2] << 8) | b[3]; -} -static inline void vm_do_write_memory_4(uint32 *a, uint32 v) -{ - uint8 * b = (uint8 *)a; - b[0] = v >> 24; - b[1] = v >> 16; - b[2] = v >> 8; - b[3] = v; -} -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_8 -static inline uint64 vm_do_read_memory_8(uint64 *a) -{ - uint8 * b = (uint8 *)a; - return - ((uint64)b[0] << 56) | - ((uint64)b[1] << 48) | - ((uint64)b[2] << 40) | - ((uint64)b[3] << 32) | - ((uint64)b[4] << 24) | - ((uint64)b[5] << 16) | - ((uint64)b[6] << 8) | - ((uint64)b[7]); -} - -static inline void vm_do_write_memory_8(uint64 *a, uint64 v) -{ - uint8 * b = (uint8 *)a; - b[0] = v >> 56; - b[1] = v >> 48; - b[2] = v >> 40; - b[3] = v >> 32; - b[4] = v >> 24; - b[5] = v >> 16; - b[6] = v >> 8; - b[7] = v; -} -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_2_REVERSED -static inline uint32 vm_do_read_memory_2_reversed(uint16 *a) -{ - uint8 * b = (uint8 *)a; - return b[0] | (b[1] << 8); -} -static inline void vm_do_write_memory_2_reversed(uint16 *a, uint32 v) -{ - uint8 * b = (uint8 *)a; - b[0] = v; - b[1] = v >> 8; -} -#endif - -#ifndef VM_OPTIMIZED_MEMORY_ACCESS_4_REVERSED -static inline uint32 vm_do_read_memory_4_reversed(uint32 *a) -{ - uint8 * b = (uint8 *)a; - return b[0] | (b[1] << 8) | (b[2] << 16) | (b[3] << 24); -} -static inline void vm_do_write_memory_4_reversed(uint32 *a, uint32 v) -{ - uint8 * b = (uint8 *)a; - b[0] = v; - b[1] = v >> 8; - b[2] = v >> 16; - b[3] = v >> 24; -} -#endif - -/// -/// Actual memory accessors visible to CPU through virtual addresses -/// - -typedef uintptr vm_addr_t; - -#if REAL_ADDRESSING -const uintptr VMBaseDiff = 0; -#elif DIRECT_ADDRESSING -#ifdef NATMEM_OFFSET -const uintptr VMBaseDiff = NATMEM_OFFSET; -#endif -// Wrap address to 32-bit if we are not using 33-bit addressing space -#if defined(SHEEPSHAVER) && SIZEOF_VOID_P == 8 -#define vm_wrap_address(ADDR) (uintptr)(uint32)(ADDR) -#endif -#endif -#ifndef vm_wrap_address -#define vm_wrap_address(ADDR) (ADDR) -#endif - -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static inline uint8 * vm_do_get_real_address(vm_addr_t addr) -{ - return (uint8 *)vm_wrap_address(VMBaseDiff + addr); -} -static inline vm_addr_t vm_do_get_virtual_address(uint8 *addr) -{ - return vm_wrap_address((uintptr)addr - VMBaseDiff); -} -static inline uint32 vm_read_memory_1(vm_addr_t addr) -{ - uint8 * const m = vm_do_get_real_address(addr); - return vm_do_read_memory_1(m); -} -static inline uint32 vm_read_memory_2(vm_addr_t addr) -{ - uint16 * const m = (uint16 *)vm_do_get_real_address(addr); - return vm_do_read_memory_2(m); -} -static inline uint32 vm_read_memory_4(vm_addr_t addr) -{ - uint32 * const m = (uint32 *)vm_do_get_real_address(addr); - return vm_do_read_memory_4(m); -} -static inline uint64 vm_read_memory_8(vm_addr_t addr) -{ - uint64 * const m = (uint64 *)vm_do_get_real_address(addr); - return vm_do_read_memory_8(m); -} -#define vm_read_memory_1_reversed vm_read_memory_1 -static inline uint32 vm_read_memory_2_reversed(vm_addr_t addr) -{ - uint16 * const m = (uint16 *)vm_do_get_real_address(addr); - return vm_do_read_memory_2_reversed(m); -} -static inline uint32 vm_read_memory_4_reversed(vm_addr_t addr) -{ - uint32 * const m = (uint32 *)vm_do_get_real_address(addr); - return vm_do_read_memory_4_reversed(m); -} -static inline void vm_write_memory_1(vm_addr_t addr, uint32 value) -{ - uint8 * const m = vm_do_get_real_address(addr); - vm_do_write_memory_1(m, value); -} -static inline void vm_write_memory_2(vm_addr_t addr, uint32 value) -{ - uint16 * const m = (uint16 *)vm_do_get_real_address(addr); - vm_do_write_memory_2(m, value); -} -static inline void vm_write_memory_4(vm_addr_t addr, uint32 value) -{ - uint32 * const m = (uint32 *)vm_do_get_real_address(addr); - vm_do_write_memory_4(m, value); -} -static inline void vm_write_memory_8(vm_addr_t addr, uint64 value) -{ - uint64 * const m = (uint64 *)vm_do_get_real_address(addr); - vm_do_write_memory_8(m, value); -} -#define vm_write_memory_1_reversed vm_write_memory_1 -static inline void vm_write_memory_2_reversed(vm_addr_t addr, uint32 value) -{ - uint16 * const m = (uint16 *)vm_do_get_real_address(addr); - vm_do_write_memory_2_reversed(m, value); -} -static inline void vm_write_memory_4_reversed(vm_addr_t addr, uint32 value) -{ - uint32 * const m = (uint32 *)vm_do_get_real_address(addr); - vm_do_write_memory_4_reversed(m, value); -} -static inline void *vm_memset(vm_addr_t addr, int c, size_t n) -{ - uint8 * const m = (uint8 *)vm_do_get_real_address(addr); - return memset(m, c, n); -} -#ifdef __cplusplus -static inline void *vm_memcpy(void *dest, vm_addr_t src, size_t n) -{ - return memcpy(dest, vm_do_get_real_address(src), n); -} -static inline void *vm_memcpy(vm_addr_t dest, const void *src, size_t n) -{ - return memcpy(vm_do_get_real_address(dest), src, n); -} -#endif -static inline void *vm_memcpy(vm_addr_t dest, vm_addr_t src, size_t n) -{ - return memcpy(vm_do_get_real_address(dest), vm_do_get_real_address(src), n); -} -#endif - -#endif /* VM_H */ - diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.cpp b/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.cpp deleted file mode 100755 index 3b471cdad..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.cpp +++ /dev/null @@ -1,111 +0,0 @@ -/* - * ieeefp-i386.cpp - Access to FPU environment, x86 specific code - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 - */ - -/* - * CPU features - */ - -/* XXX: duplicate from cpu/ppc/ppc-dyngen.cpp! */ -static uint32 cpu_features = 0; - -enum { - HWCAP_I386_CMOV = 1 << 15, - HWCAP_I386_MMX = 1 << 23, - HWCAP_I386_SSE = 1 << 25, - HWCAP_I386_SSE2 = 1 << 26, -}; - -static unsigned int x86_cpuid(void) -{ - int fl1, fl2; - - /* See if we can use cpuid. On AMD64 we always can. */ - __asm__ ("pushfl; pushfl; popl %0; movl %0,%1; xorl %2,%0;" - "pushl %0; popfl; pushfl; popl %0; popfl" - : "=&r" (fl1), "=&r" (fl2) - : "i" (0x00200000)); - if (((fl1 ^ fl2) & 0x00200000) == 0) - return (0); - - /* Host supports cpuid. See if cpuid gives capabilities, try - CPUID(0). Preserve %ebx and %ecx; cpuid insn clobbers these, we - don't need their CPUID values here, and %ebx may be the PIC - register. */ - __asm__ ("push %%ecx ; push %%ebx ; cpuid ; pop %%ebx ; pop %%ecx" - : "=a" (fl1) : "0" (0) : "edx", "cc"); - if (fl1 == 0) - return (0); - - /* Invoke CPUID(1), return %edx; caller can examine bits to - determine what's supported. */ - __asm__ ("push %%ecx ; push %%ebx ; cpuid ; pop %%ebx ; pop %%ecx" : "=d" (fl2) : "a" (1) : "cc"); - - return fl2; -} - -static inline int has_cpu_features(int test_cpu_features) -{ - static bool initted = false; - if (!initted) { - cpu_features = x86_cpuid(); - initted = true; - } - return cpu_features & test_cpu_features; -} - - -/* - * Rounding control - */ - -// Get current rounding direction -int fegetround(void) -{ - unsigned short cw; - - __asm__ __volatile__("fnstcw %0" : "=m" (*&cw)); - - return cw & 0xc00; -} - -// Set the rounding direction represented by ROUND -int fesetround(int round) -{ - unsigned short cw; - - if ((round & ~0xc00) != 0) - return 1; - - __asm__ __volatile__("fnstcw %0" : "=m" (*&cw)); - cw &= ~0xc00; - cw |= round; - __asm__ __volatile__("fldcw %0" : : "m" (*&cw)); - - if (has_cpu_features(HWCAP_I386_SSE) != 0) { - uint32 xcw; - __asm__ __volatile__("stmxcsr %0" : "=m" (*&xcw)); - xcw &= ~0x6000; - xcw |= round << 3; - __asm__ __volatile__("ldmxcsr %0" : : "m" (*&xcw)); - } - - return 0; -} diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.hpp deleted file mode 100755 index 17e27d14e..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-i386.hpp +++ /dev/null @@ -1,58 +0,0 @@ -/* - * ieeefp-i386.hpp - IEEE754 Floating-Point Math library, x86 specific code - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * Code derived from the GNU C Library - * - * 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 IEEEFP_I386_H -#define IEEEFP_I386_H - -// 7.6 Floating-point environment -#ifndef HAVE_FENV_H - -// Exceptions -enum { - FE_INVALID = 0x01, -#define FE_INVALID FE_INVALID - FE_DIVBYZERO = 0x04, -#define FE_DIVBYZERO FE_DIVBYZERO - FE_OVERFLOW = 0x08, -#define FE_OVERFLOW FE_OVERFLOW - FE_UNDERFLOW = 0x10, -#define FE_UNDERFLOW FE_UNDERFLOW - FE_INEXACT = 0x20 -#define FE_INEXACT FE_INEXACT -}; - -#define FE_ALL_EXCEPT (FE_INVALID | FE_DIVBYZERO | FE_OVERFLOW | FE_UNDERFLOW | FE_INEXACT) - -// Rounding modes -enum { - FE_TONEAREST = 0, -#define FE_TONEAREST FE_TONEAREST - FE_DOWNWARD = 0x400, -#define FE_DOWNWARD FE_DOWNWARD - FE_UPWARD = 0x800, -#define FE_UPWARD FE_UPWARD - FE_TOWARDZERO = 0xc00 -#define FE_TOWARDZERO FE_TOWARDZERO -}; - -#endif - -#endif /* IEEEFP_I386_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-mips.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-mips.hpp deleted file mode 100644 index 593331eb3..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp-mips.hpp +++ /dev/null @@ -1,58 +0,0 @@ -/* - * ieee-mips.hpp - IEE754 Floating-Point Math library, mips specific code - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * Code derived from the GNU C Library - * - * 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 IEEEFP_MIPS_H -#define IEEEFP_MIPS_H - -// 7.6 Floating-point environment -#ifndef USE_FENV_H - -// Exceptions -enum { - FE_INEXACT = 0x04, -#define FE_INEXACT FE_INEXACT - FE_UNDERFLOW = 0x08, -#define FE_UNDERFLOW FE_UNDERFLOW - FE_OVERFLOW = 0x10, -#define FE_OVERFLOW FE_OVERFLOW - FE_DIVBYZERO = 0x20, -#define FE_DIVBYZERO FE_DIVBYZERO - FE_INVALID = 0x40, -#define FE_INVALID FE_INVALID -}; - -#define FE_ALL_EXCEPT (FE_INEXACT | FE_DIVBYZERO | FE_UNDERFLOW | FE_OVERFLOW | FE_INVALID) - -// Rounding modes -enum { - FE_TONEAREST = 0x0, -#define FE_TONEAREST FE_TONEAREST - FE_TOWARDZERO = 0x1, -#define FE_TOWARDZERO FE_TOWARDZERO - FE_UPWARD = 0x2, -#define FE_UPWARD FE_UPWARD - FE_DOWNWARD = 0x3 -#define FE_DOWNWARD FE_DOWNWARD -}; - -#endif - -#endif /* IEEEFP_MIPS_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.cpp b/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.cpp deleted file mode 100755 index 8158aceea..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.cpp +++ /dev/null @@ -1,29 +0,0 @@ -/* - * ieeefp.cpp - Access to FPU environment - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" - -#ifndef HAVE_FENV_H -#include "mathlib/ieeefp.hpp" -#if defined(__i386__) -#include "mathlib/ieeefp-i386.cpp" -#endif -#endif - diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.hpp deleted file mode 100755 index 7fe544e5f..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/ieeefp.hpp +++ /dev/null @@ -1,123 +0,0 @@ -/* - * ieeefp.hpp - IEEE754 Floating-Point Math library - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 IEEEFP_H -#define IEEEFP_H - -// Can we use C99 extensions in C++ mode? -#ifdef HAVE_FENV_H -#if defined __GNUC__ -#define USE_FENV_H 1 -#endif -#endif - -// Arch-dependent definitions -#if defined(__i386__) -#include "mathlib/ieeefp-i386.hpp" -#endif -#if defined(__mips__) || (defined(sgi) && defined(mips)) -#include "mathlib/ieeefp-mips.hpp" -#endif - -#ifdef USE_FENV_H -#include -#else - -// Rounding control -extern "C" int fegetround(void); -extern "C" int fesetround(int); - -#endif /* FENV_H */ - -// Make sure previous instructions are executed first -// XXX this is most really a hint to the compiler so that is doesn't -// reorder calls to fe*() functions before the actual compuation... -#if defined __GNUC__ -#define febarrier() __asm__ __volatile__ ("") -#endif -#ifndef febarrier -#define febarrier() -#endif - -// HOST_FLOAT_WORDS_BIG_ENDIAN is a tristate: -// yes (1) / no (0) / default (undefined) -#if HOST_FLOAT_WORDS_BIG_ENDIAN -#define FLOAT_WORD_ORDER_BIG_ENDIAN -#elif defined(WORDS_BIGENDIAN) -#define FLOAT_WORD_ORDER_BIG_ENDIAN -#endif - -// Representation of an IEEE 754 float -union mathlib_ieee_float_shape_type { - float value; - uint32 word; -}; - -#define MATHLIB_GET_FLOAT_WORD(i,d) \ -do { \ - mathlib_ieee_float_shape_type gf_u; \ - gf_u.value = (d); \ - (i) = gf_u.word; \ -} while (0) - -#define MATHLIB_SET_FLOAT_WORD(d,i) \ -do { \ - mathlib_ieee_float_shape_type sf_u; \ - sf_u.word = (i); \ - (d) = sf_u.value; \ -} while (0) - -// Representation of an IEEE 754 double -union mathlib_ieee_double_shape_type { - double value; - struct { -#ifdef FLOAT_WORD_ORDER_BIG_ENDIAN - uint32 msw; - uint32 lsw; -#else - uint32 lsw; - uint32 msw; -#endif - } parts; -}; - -#define MATHLIB_EXTRACT_WORDS(ix0,ix1,d) \ -do { \ - mathlib_ieee_double_shape_type ew_u; \ - ew_u.value = (d); \ - (ix0) = ew_u.parts.msw; \ - (ix1) = ew_u.parts.lsw; \ -} while (0) - -#define MATHLIB_GET_HIGH_WORD(i,d) \ -do { \ - mathlib_ieee_double_shape_type gh_u; \ - gh_u.value = (d); \ - (i) = gh_u.parts.msw; \ -} while (0) - -#define MATHLIB_GET_LOW_WORD(i,d) \ -do { \ - mathlib_ieee_double_shape_type gl_u; \ - gl_u.value = (d); \ - (i) = gl_u.parts.lsw; \ -} while (0) - -#endif /* IEEEFP_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.cpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.cpp deleted file mode 100644 index cc82bbea6..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.cpp +++ /dev/null @@ -1,38 +0,0 @@ -/* - * mathlib-i386.cpp - Math library wrapper, x86 specific code - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 - */ - -// 7.12.9.8 The trunc functions -#ifndef HAVE_TRUNC -#define HAVE_TRUNC -double trunc(double x) -{ - volatile unsigned short int cw; - volatile unsigned short int cwtmp; - double value; - - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - cwtmp = (cw & 0xf3ff) | 0x0c00; /* toward zero */ - __asm__ __volatile__("fldcw %0" : : "m" (cwtmp)); - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); - __asm__ __volatile__("fldcw %0" : : "m" (cw)); - return value; -} -#endif diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.hpp deleted file mode 100644 index 3c23b81c2..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-i386.hpp +++ /dev/null @@ -1,52 +0,0 @@ -/* - * mathlib-i386.hpp - Math library wrapper, x86 specific code - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 MATHLIB_I386_H -#define MATHLIB_I386_H - -// 7.12.9.5 The lrint and llrint functions -#if defined(__GNUC__) -#define mathlib_lrint(x) \ -({ long int __result; \ - __asm__ __volatile__ ("fistpl %0" : "=m" (__result) : "t" (x) : "st"); \ - __result; }) -#endif - -// 7.12.14 Comparison macros -#if defined(__GNUC__) -#ifndef isless -#define isless(x, y) \ -({ register char __result; \ - __asm__ ("fucompp; fnstsw; testb $0x45, %%ah; setz %%al" \ - : "=a" (__result) : "u" (x), "t" (y) : "cc", "st", "st(1)"); \ - __result; }) -#endif - -#ifndef isgreater -#define isgreater(x, y) \ -({ register char __result; \ - __asm__ ("fucompp; fnstsw; testb $0x45, %%ah; setz %%al" \ - : "=a" (__result) : "u" (y), "t" (x) : "cc", "st", "st(1)"); \ - __result; }) -#endif -#endif - -#endif /* MATHLIB_I386_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-ppc.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-ppc.hpp deleted file mode 100644 index 79cccb22a..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-ppc.hpp +++ /dev/null @@ -1,63 +0,0 @@ -/* - * mathlib-ppc.hpp - Math library wrapper, ppc specific code - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 MATHLIB_PPC_H -#define MATHLIB_PPC_H - -// Floating-Point Multiply Add -#if defined __GNUC__ -static inline double mathlib_fmadd(double x, double y, double z) -{ - double r; - __asm__ __volatile__ ("fmadd %0,%1,%2,%3" : "=f" (r) : "f" (x), "f" (y) , "f" (z)); - return r; -} - -static inline float mathlib_fmadd(float x, float y, float z) -{ - float r; - __asm__ __volatile__ ("fmadds %0,%1,%2,%3" : "=f" (r) : "f" (x), "f" (y) , "f" (z)); - return r; -} - -#define mathlib_fmadd(x, y, z) (mathlib_fmadd)(x, y, z) -#endif - -// Floating-Point Multiply Subtract -#if defined __GNUC__ -static inline double mathlib_fmsub(double x, double y, double z) -{ - double r; - __asm__ __volatile__ ("fmsub %0,%1,%2,%3" : "=f" (r) : "f" (x), "f" (y) , "f" (z)); - return r; -} - -static inline float mathlib_fmsub(float x, float y, float z) -{ - float r; - __asm__ __volatile__ ("fmsubs %0,%1,%2,%3" : "=f" (r) : "f" (x), "f" (y) , "f" (z)); - return r; -} - -#define mathlib_fmsub(x, y, z) (mathlib_fmsub)(x, y, z) -#endif - -#endif /* MATHLIB_PPC_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-x86_64.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-x86_64.hpp deleted file mode 100644 index 4af8a426f..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib-x86_64.hpp +++ /dev/null @@ -1,33 +0,0 @@ -/* - * mathlib-x86_64.hpp - Math library wrapper, x86-64 specific code - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 MATHLIB_X86_64_H -#define MATHLIB_X86_64_H - -// 7.12.9.5 The lrint and llrint functions -#if defined(__GNUC__) -#define mathlib_lrint(x) \ -({ long int __result; \ - __asm__ __volatile__ ("cvtsd2si %1, %0" : "=r" (__result) : "x" (x)); \ - __result; }) -#endif - -#endif /* MATHLIB_X86_64_H */ diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp deleted file mode 100644 index d51a8db27..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp +++ /dev/null @@ -1,228 +0,0 @@ -/* - * mathlib.cpp - Math library wrapper - * Code largely derived from GNU libc - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "mathlib/mathlib.hpp" - -#include -#include - - -/** - * Arch-dependent optimizations - **/ - -#if defined(__i386__) -#include "mathlib/mathlib-i386.cpp" -#endif - - -/** - * Helper functions - **/ - -static void unimplemented(const char *function) -{ - fprintf(stderr, "MATHLIB: unimplemented function '%s', aborting execution\n", function); - abort(); -} - - -/** - * 7.12.3.1 The fpclassify macro - **/ - -int mathlib_fpclassifyf (float x) -{ - uint32 wx; - int retval = FP_NORMAL; - - MATHLIB_GET_FLOAT_WORD (wx, x); - wx &= 0x7fffffff; - if (wx == 0) - retval = FP_ZERO; - else if (wx < 0x800000) - retval = FP_SUBNORMAL; - else if (wx >= 0x7f800000) - retval = wx > 0x7f800000 ? FP_NAN : FP_INFINITE; - - return retval; -} - -int mathlib_fpclassify (double x) -{ - uint32 hx, lx; - int retval = FP_NORMAL; - - MATHLIB_EXTRACT_WORDS (hx, lx, x); - lx |= hx & 0xfffff; - hx &= 0x7ff00000; - if ((hx | lx) == 0) - retval = FP_ZERO; - else if (hx == 0) - retval = FP_SUBNORMAL; - else if (hx == 0x7ff00000) - retval = lx != 0 ? FP_NAN : FP_INFINITE; - - return retval; -} - -int mathlib_fpclassifyl(long double x) -{ - unimplemented("fpclassifyl"); -} - - -/** - * 7.12.3.6 The signbit macro - **/ - -int mathlib_signbitf (float x) -{ - int32 hx; - - MATHLIB_GET_FLOAT_WORD (hx, x); - return hx & 0x80000000; -} - -int mathlib_signbit (double x) -{ - int32 hx; - - MATHLIB_GET_HIGH_WORD (hx, x); - return hx & 0x80000000; -} - -int mathlib_signbitl(long double x) -{ - unimplemented("signbitl"); -} - - -/** - * 7.12.9.5 The lrint and llrint functions - **/ - -#ifndef mathlib_lrint -long mathlib_lrint(double x) -{ - int32 j0; - uint32 i0, i1; - volatile double w; - double t; - long int result; - int sx; - - static const double two52[2] = { - 4.50359962737049600000e+15, /* 0x43300000, 0x00000000 */ - -4.50359962737049600000e+15, /* 0xC3300000, 0x00000000 */ - }; - - MATHLIB_EXTRACT_WORDS (i0, i1, x); - j0 = ((i0 >> 20) & 0x7ff) - 0x3ff; - sx = i0 >> 31; - i0 &= 0xfffff; - i0 |= 0x100000; - - if (j0 < 20) { - if (j0 < -1) - return 0; - else { - w = two52[sx] + x; - t = w - two52[sx]; - MATHLIB_EXTRACT_WORDS (i0, i1, t); - j0 = ((i0 >> 20) & 0x7ff) - 0x3ff; - i0 &= 0xfffff; - i0 |= 0x100000; - - result = i0 >> (20 - j0); - } - } - else if (j0 < (int32) (8 * sizeof (long int)) - 1) { - if (j0 >= 52) - result = ((long int) i0 << (j0 - 20)) | (i1 << (j0 - 52)); - else { - w = two52[sx] + x; - t = w - two52[sx]; - MATHLIB_EXTRACT_WORDS (i0, i1, t); - j0 = ((i0 >> 20) & 0x7ff) - 0x3ff; - i0 &= 0xfffff; - i0 |= 0x100000; - - if (j0 == 20) - result = (long int) i0; - else - result = ((long int) i0 << (j0 - 20)) | (i1 >> (52 - j0)); - } - } - else { - /* The number is too large. It is left implementation defined - what happens. */ - return (long int) x; - } - - return sx ? -result : result; -} -#endif - - -/** - * 7.12.9.6 The round functions - **/ - -float mathlib_roundf(float x) -{ - int32 i0, j0; - static const float huge = 1.0e30; - - MATHLIB_GET_FLOAT_WORD (i0, x); - j0 = ((i0 >> 23) & 0xff) - 0x7f; - if (j0 < 23) { - if (j0 < 0) { - if (huge + x > 0.0F) { - i0 &= 0x80000000; - if (j0 == -1) - i0 |= 0x3f800000; - } - } - else { - uint32 i = 0x007fffff >> j0; - if ((i0 & i) == 0) - /* X is integral. */ - return x; - if (huge + x > 0.0F) { - /* Raise inexact if x != 0. */ - i0 += 0x00400000 >> j0; - i0 &= ~i; - } - } - } - else { - if (j0 == 0x80) - /* Inf or NaN. */ - return x + x; - else - return x; - } - - MATHLIB_SET_FLOAT_WORD (x, i0); - return x; -} diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.hpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.hpp deleted file mode 100644 index d0ef5dcf5..000000000 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.hpp +++ /dev/null @@ -1,339 +0,0 @@ - -/* - * mathlib.hpp - Math library wrapper - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 MATHLIB_H -#define MATHLIB_H - -#include -#include "mathlib/ieeefp.hpp" - -// Broken MacOS X headers -#if defined(__APPLE__) && defined(__MACH__) -// ... the following exist but are not macro-defined ... -#ifndef FP_NAN -#define FP_NAN FP_NAN -#define FP_INFINITE FP_INFINITE -#define FP_ZERO FP_ZERO -#define FP_NORMAL FP_NORMAL -#define FP_SUBNORMAL FP_SUBNORMAL -#endif -#endif - -// GCC fixes for IRIX/mips -#if defined __GNUC__ && defined __sgi__ && defined __mips__ -#define mathlib_generic_1(func, x) \ - (sizeof(x) == sizeof(float) ? _##func##f(x) : _##func(x)) - -#define fpclassify(x) mathlib_generic_1(fpclassify, x) -#define isnormal(x) mathlib_generic_1(isnormal, x) -#define isfinite(x) mathlib_generic_1(isfinite, x) -#define isnan(x) mathlib_generic_1(isnan, x) -#define isinf(x) mathlib_generic_1(isinf, x) -#define signbit(x) mathlib_generic_1(signbit, x) - -#define mathlib_generic_2(func, x, y) \ - ((sizeof(x) == sizeof(float) && sizeof(x) == sizeof(y)) ? _##func##f(x, y) : _##func(x, y)) - -#define isless(x,y) mathlib_generic_2(isless, x, y) -#define isgreater(x,y) mathlib_generic_2(isgreater, x, y) -#endif - -// C++ exception specifications -#if defined __GLIBC__ && defined __THROW -#define MATHLIB_THROW __THROW -#else -#define MATHLIB_THROW -#endif - -// 7.12 Mathematics [#6] -#ifndef FP_NAN -enum { - FP_NAN, -# define FP_NAN FP_NAN - FP_INFINITE, -# define FP_INFINITE FP_INFINITE - FP_ZERO, -# define FP_ZERO FP_ZERO - FP_SUBNORMAL, -# define FP_SUBNORMAL FP_SUBNORMAL - FP_NORMAL -# define FP_NORMAL FP_NORMAL -}; -#endif - -// Arch-dependent definitions -#if defined(__i386__) -#include "mathlib/mathlib-i386.hpp" -#endif -#if defined(__x86_64__) -#include "mathlib/mathlib-x86_64.hpp" -#endif -#if defined(__powerpc__) || defined(__ppc__) -#include "mathlib/mathlib-ppc.hpp" -#endif - -// Floating-Point Multiply Add/Subtract functions -#if (SIZEOF_LONG_DOUBLE > SIZEOF_DOUBLE) && (SIZEOF_DOUBLE > SIZEOF_FLOAT) -// FIXME: this is wrong for underflow conditions -#ifndef mathlib_fmadd -static inline double mathlib_fmadd(double x, double y, double z) -{ - return ((long double)x * (long double)y) + z; -} -static inline float mathlib_fmadd(float x, float y, float z) -{ - return ((double)x * (double)y) + z; -} -#define mathlib_fmadd(x, y, z) (mathlib_fmadd)(x, y, z) -#endif -#ifndef mathlib_fmsub -static inline double mathlib_fmsub(double x, double y, double z) -{ - return ((long double)x * (long double)y) - z; -} -static inline float mathlib_fmsub(float x, float y, float z) -{ - return ((double)x * (double)y) - z; -} -#define mathlib_fmsub(x, y, z) (mathlib_fmsub)(x, y, z) -#endif -#endif -#ifndef mathlib_fmadd -#define mathlib_fmadd(x, y, z) (((x) * (y)) + (z)) -#endif -#ifndef mathlib_fmsub -#define mathlib_fmsub(x, y, z) (((x) * (y)) - (z)) -#endif - -// 7.12.6.2 The exp2 functions -#ifdef HAVE_EXP2F -extern "C" float exp2f(float x) MATHLIB_THROW; -#else -#ifdef HAVE_EXP2 -extern "C" double exp2(double x) MATHLIB_THROW; -#define exp2f(x) (float)exp2(x) -#else -#ifndef exp2f -#define exp2f(x) powf(2.0, (x)) -#endif -#endif -#endif - -// 7.12.6.10 The log2 functions -#ifdef HAVE_LOG2F -extern "C" float log2f(float x) MATHLIB_THROW; -#else -#ifdef HAVE_LOG2 -extern "C" double log2(double x) MATHLIB_THROW; -#define log2f(x) (float)log2(x) -#else -#ifndef M_LN2 -#define M_LN2 logf(2.0) -#endif -#ifndef log2f -#define log2f(x) logf(x) / M_LN2 -#endif -#endif -#endif - -// 7.12.9.1 The ceil functions -#ifdef HAVE_CEILF -extern "C" float ceilf(float x) MATHLIB_THROW; -#else -#ifdef HAVE_CEIL -extern "C" double ceil(double x) MATHLIB_THROW; -#define ceilf(x) (float)ceil(x) -#endif -#endif - -// 7.12.9.2 The floor functions -#ifdef HAVE_FLOORF -extern "C" float floorf(float x) MATHLIB_THROW; -#else -#ifdef HAVE_FLOOR -extern "C" double floor(double x) MATHLIB_THROW; -#define floorf(x) (float)floor(x) -#endif -#endif - -// 7.12.9.5 The lrint and llrint functions -#ifdef HAVE_LRINT -extern "C" long lrint(double x) MATHLIB_THROW; -#else -#ifndef mathlib_lrint -extern long mathlib_lrint(double); -#endif -#define lrint(x) mathlib_lrint(x) -#endif - -// 7.12.9.6 The round functions -#ifdef HAVE_ROUNDF -extern "C" float roundf(float x) MATHLIB_THROW; -#else -#ifdef HAVE_ROUND -extern "C" double round(double x) MATHLIB_THROW; -#define roundf(x) (float)round(x) -#else -extern float mathlib_roundf(float); -#define roundf(x) mathlib_roundf(x) -#endif -#endif - -// 7.12.9.8 The trunc functions -#ifdef HAVE_TRUNCF -extern "C" float truncf(float x) MATHLIB_THROW; -#else -#ifdef HAVE_TRUNC -extern "C" double trunc(double x) MATHLIB_THROW; -#define truncf(x) (float)trunc(x) -#endif -#endif - -// 7.12.3.1 The fpclassify macro -#ifndef fpclassify -#ifndef mathlib_fpclassifyf -extern int mathlib_fpclassifyf(float x); -#endif -#ifndef mathlib_fpclassify -extern int mathlib_fpclassify(double x); -#endif -#ifndef mathlib_fpclassifyl -extern int mathlib_fpclassifyl(long double x); -#endif -#define fpclassify(x) \ - (sizeof (x) == sizeof (float) \ - ? mathlib_fpclassifyf (x) \ - : sizeof (x) == sizeof (double) \ - ? mathlib_fpclassify (x) : mathlib_fpclassifyl (x)) -#endif - -// 7.12.3.2 The isfinite macro -static inline int mathlib_isfinite(float x) -{ - int32 ix; - - MATHLIB_GET_FLOAT_WORD(ix, x); - return (int)((uint32)((ix & 0x7fffffff) - 0x7f800000) >> 31); -} - -static inline int mathlib_isfinite(double x) -{ - int32 hx; - - MATHLIB_GET_HIGH_WORD(hx, x); - return (int)((uint32)((hx & 0x7fffffff) - 0x7ff00000) >> 31); -} - -#ifndef isfinite -#define isfinite(x) mathlib_isfinite(x) -#endif - -// 7.12.3.3 The isinf macro -static inline int mathlib_isinf(float x) -{ - int32 ix, t; - - MATHLIB_GET_FLOAT_WORD(ix, x); - t = ix & 0x7fffffff; - t ^= 0x7f800000; - t |= -t; - return ~(t >> 31) & (ix >> 30); -} - -static inline int mathlib_isinf(double x) -{ - int32 hx, lx; - - MATHLIB_EXTRACT_WORDS(hx, lx, x); - lx |= (hx & 0x7fffffff) ^ 0x7ff00000; - lx |= -lx; - return ~(lx >> 31) & (hx >> 30); -} - -#ifndef isinf -#if defined __sgi && defined __mips -// specialized implementation for IRIX mips compilers -extern "C" int _isinf(double); -extern "C" int _isinff(float); -static inline int isinf(double x) { return _isinf(x); } -static inline int isinf(float x) { return _isinff(x); } -#else -#define isinf(x) mathlib_isinf(x) -#endif -#endif - -// 7.12.3.4 The isnan macro -static inline int mathlib_isnan(float x) -{ - int32 ix; - - MATHLIB_GET_FLOAT_WORD(ix, x); - ix &= 0x7fffffff; - ix = 0x7f800000 - ix; - return (int)(((uint32)ix) >> 31); -} - -static inline int mathlib_isnan(double x) -{ - int32 hx, lx; - - MATHLIB_EXTRACT_WORDS(hx, lx, x); - hx &= 0x7fffffff; - hx |= (uint32)(lx|(-lx)) >> 31; - hx = 0x7ff00000 - hx; - return (int)(((uint32)hx) >> 31); -} - -#ifndef isnan -#define isnan(x) mathlib_isnan(x) -#endif - -// 7.12.3.6 The signbit macro -#ifndef signbit -#ifndef mathlib_signbitf -extern int mathlib_signbitf(float x); -#endif -#ifndef mathlib_signbit -extern int mathlib_signbit(double x); -#endif -#ifndef mathlib_signbitl -extern int mathlib_signbitl(long double x); -#endif -#define signbit(x) \ - (sizeof (x) == sizeof (float) \ - ? mathlib_signbitf (x) \ - : sizeof (x) == sizeof (double) \ - ? mathlib_signbit (x) : mathlib_signbitl (x)) -#endif - -// 7.12.14.1 The isgreater macro -// FIXME: this is wrong for unordered values -#ifndef isgreater -#define isgreater(x, y) ((x) > (y)) -#endif - -// 7.12.14.3 The isless macro -// FIXME: this is wrong for unordered values -#ifndef isless -#define isless(x, y) ((x) < (y)) -#endif - -#endif /* MATHLIB_H */ diff --git a/SheepShaver/src/kpx_cpu/src/test/test-powerpc.cpp b/SheepShaver/src/kpx_cpu/src/test/test-powerpc.cpp deleted file mode 100644 index 2e5b99d39..000000000 --- a/SheepShaver/src/kpx_cpu/src/test/test-powerpc.cpp +++ /dev/null @@ -1,2242 +0,0 @@ -/* - * test-powerpc.cpp - PowerPC regression testing - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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: Results file md5sum: 3e29432abb6e21e625a2eef8cf2f0840 ($Revision$) - -#include -#include -#include -#include -#include -#include // ntohl(), htonl() -#include -#include -#include -#include - -#if defined(__powerpc__) || defined(__ppc__) -#define NATIVE_POWERPC -#endif - -#if EMU_KHEPERIX -#include "sysdeps.h" -#include "vm_alloc.h" -#include "cpu/ppc/ppc-cpu.hpp" -#include "cpu/ppc/ppc-instructions.hpp" -#endif - -#if EMU_MICROLIB -#include -typedef unsigned int uint32; -typedef unsigned long uintptr; -#undef RD -#undef RA -#undef RB -#undef FB -#undef FE -#endif - -#if EMU_MODEL3PPC -extern "C" { -#include "ppc.h" -} -typedef unsigned int uint32; -typedef unsigned long uintptr; -typedef uint32_t UINT32; -typedef char CHAR; -typedef int BOOL; -#endif - -#if EMU_QEMU -extern "C" { -#include "target-ppc/cpu.h" -extern void tb_flush(); -} -typedef uint32_t uint32; -typedef uintptr_t uintptr; -#endif - -// Disassemblers needed for debugging purposes -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif - -// Define units to test (in-order: ALU, FPU, VMX) -#define TEST_ALU_OPS 1 -#if EMU_KHEPERIX -#define TEST_FPU_OPS 1 -#define TEST_VMX_OPS 1 -#endif - -// Define units to skip during testing -#define SKIP_ALU_OPS 0 -#define SKIP_FPU_OPS 0 -#define SKIP_VMX_OPS 0 - -// Define instructions to test -#define TEST_ADD 1 -#define TEST_SUB 1 -#define TEST_MUL 1 -#define TEST_DIV 1 -#define TEST_SHIFT 1 -#define TEST_ROTATE 1 -#define TEST_MISC 1 -#define TEST_LOGICAL 1 -#define TEST_COMPARE 1 -#define TEST_CR_LOGICAL 1 -#define TEST_VMX_LOADSH 1 -#define TEST_VMX_LOAD 1 -#define TEST_VMX_ARITH 1 - - -// Partial PowerPC runtime assembler from GNU lightning -#undef _I -#define _I(X) ((uint32)(X)) -#undef _UL -#define _UL(X) ((uint32)(X)) -#undef _MASK -#define _MASK(N) ((uint32)((1<<(N)))-1) -#undef _ck_s -#define _ck_s(W,I) (_UL(I) & _MASK(W)) -#undef _ck_u -#define _ck_u(W,I) (_UL(I) & _MASK(W)) -#undef _ck_su -#define _ck_su(W,I) (_UL(I) & _MASK(W)) -#undef _u1 -#define _u1(I) _ck_u( 1,I) -#undef _u5 -#define _u5(I) _ck_u( 5,I) -#undef _u6 -#define _u6(I) _ck_u( 6,I) -#undef _u9 -#define _u9(I) _ck_u( 9,I) -#undef _u10 -#define _u10(I) _ck_u(10,I) -#undef _u11 -#define _u11(I) _ck_u(11,I) -#undef _s16 -#define _s16(I) _ck_s(16,I) - -#undef _D -#define _D( OP,RD,RA, DD ) _I((_u6(OP)<<26)|(_u5(RD)<<21)|(_u5(RA)<<16)| _s16(DD) ) -#undef _X -#define _X( OP,RD,RA,RB, XO,RC ) _I((_u6(OP)<<26)|(_u5(RD)<<21)|(_u5(RA)<<16)|( _u5(RB)<<11)| (_u10(XO)<<1)|_u1(RC)) -#undef _XO -#define _XO( OP,RD,RA,RB,OE,XO,RC ) _I((_u6(OP)<<26)|(_u5(RD)<<21)|(_u5(RA)<<16)|( _u5(RB)<<11)|(_u1(OE)<<10)|( _u9(XO)<<1)|_u1(RC)) -#undef _M -#define _M( OP,RS,RA,SH,MB,ME,RC ) _I((_u6(OP)<<26)|(_u5(RS)<<21)|(_u5(RA)<<16)|( _u5(SH)<<11)|(_u5(MB)<< 6)|( _u5(ME)<<1)|_u1(RC)) -#undef _VX -#define _VX( OP,VD,VA,VB, XO ) _I((_u6(OP)<<26)|(_u5(VD)<<21)|(_u5(VA)<<16)|( _u5(VB)<<11)| _u11(XO) ) -#undef _VXR -#define _VXR( OP,VD,VA,VB, XO,RC ) _I((_u6(OP)<<26)|(_u5(VD)<<21)|(_u5(VA)<<16)|( _u5(VB)<<11)| (_u1(RC)<<10)|_u10(XO)) -#undef _VA -#define _VA( OP,VD,VA,VB,VC,XO ) _I((_u6(OP)<<26)|(_u5(VD)<<21)|(_u5(VA)<<16)|( _u5(VB)<<11)|(_u5(VC)<< 6)| _u6(XO) ) - -// PowerPC opcodes -static inline uint32 POWERPC_LI(int RD, uint32 v) { return _D(14,RD,00,(v&0xffff)); } -static inline uint32 POWERPC_MR(int RD, int RA) { return _X(31,RA,RD,RA,444,0); } -static inline uint32 POWERPC_MFCR(int RD) { return _X(31,RD,00,00,19,0); } -static inline uint32 POWERPC_LVX(int vD, int rA, int rB) { return _X(31,vD,rA,rB,103,0); } -static inline uint32 POWERPC_STVX(int vS, int rA, int rB) { return _X(31,vS,rA,rB,231,0); } -static inline uint32 POWERPC_MFSPR(int rD, int SPR) { return _X(31,rD,(SPR&0x1f),((SPR>>5)&0x1f),339,0); } -static inline uint32 POWERPC_MTSPR(int rS, int SPR) { return _X(31,rS,(SPR&0x1f),((SPR>>5)&0x1f),467,0); } -const uint32 POWERPC_NOP = 0x60000000; -const uint32 POWERPC_BLR = 0x4e800020; -const uint32 POWERPC_BLRL = 0x4e800021; -const uint32 POWERPC_ILLEGAL = 0x00000000; -const uint32 POWERPC_EMUL_OP = 0x18000000; - -// Invalidate test cache -#ifdef NATIVE_POWERPC -static void inline ppc_flush_icache_range(uint32 *start_p, uint32 length) -{ - const int MIN_CACHE_LINE_SIZE = 8; /* conservative value */ - - unsigned long start = (unsigned long)start_p; - unsigned long stop = start + length; - unsigned long p; - - p = start & ~(MIN_CACHE_LINE_SIZE - 1); - stop = (stop + MIN_CACHE_LINE_SIZE - 1) & ~(MIN_CACHE_LINE_SIZE - 1); - - for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) { - asm volatile ("dcbst 0,%0" : : "r"(p) : "memory"); - } - asm volatile ("sync" : : : "memory"); - for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) { - asm volatile ("icbi 0,%0" : : "r"(p) : "memory"); - } - asm volatile ("sync" : : : "memory"); - asm volatile ("isync" : : : "memory"); -} -#else -static void inline ppc_flush_icache_range(uint32 *start_p, uint32 length) -{ -} -#endif - -#if EMU_KHEPERIX -// Wrappers when building from SheepShaver tree -#ifdef SHEEPSHAVER -uint32 ROMBase = 0x40800000; -int64 TimebaseSpeed = 25000000; // Default: 25 MHz -uint32 PVR = 0x000c0000; // Default: 7400 (with AltiVec) - -bool PrefsFindBool(const char *name) -{ - return false; -} - -uint64 GetTicks_usec(void) -{ - return clock(); -} - -void HandleInterrupt(powerpc_registers *) -{ -} - -#if PPC_ENABLE_JIT && PPC_REENTRANT_JIT -void init_emul_op_trampolines(basic_dyngen & dg) -{ -} -#endif -#endif - -struct powerpc_cpu_base - : public powerpc_cpu -{ - powerpc_cpu_base(); - void init_decoder(); - void execute_return(uint32 opcode); - void invalidate_cache_range(uint32 *start, uint32 size) - { powerpc_cpu::invalidate_cache_range((uintptr)start, ((uintptr)start) + size); } - - uint32 emul_get_xer() const { return xer().get(); } - void emul_set_xer(uint32 value) { xer().set(value); } - uint32 emul_get_cr() const { return cr().get(); } - void emul_set_cr(uint32 value) { cr().set(value); } - uint32 get_lr() const { return lr(); } - void set_lr(uint32 value) { lr() = value; } - uint32 get_gpr(int i) const { return gpr(i); } - void set_gpr(int i, uint32 value) { gpr(i) = value; } -}; - -powerpc_cpu_base::powerpc_cpu_base() -#ifndef SHEEPSHAVER - : powerpc_cpu(NULL) -#endif -{ - init_decoder(); -} - -void powerpc_cpu_base::execute_return(uint32 opcode) -{ - spcflags().set(SPCFLAG_CPU_EXEC_RETURN); -} - -void powerpc_cpu_base::init_decoder() -{ - static const instr_info_t return_ii_table[] = { - { "return", - (execute_pmf)&powerpc_cpu_base::execute_return, - PPC_I(MAX), - D_form, 6, 0, CFLOW_JUMP - } - }; - - const int ii_count = sizeof(return_ii_table)/sizeof(return_ii_table[0]); - - for (int i = 0; i < ii_count; i++) { - const instr_info_t * ii = &return_ii_table[i]; - init_decoder_entry(ii); - } -} -#endif - -#if EMU_MICROLIB -static volatile bool ppc_running = false; - -struct powerpc_cpu_base -{ - powerpc_cpu_base(); - void execute(uintptr); - void enable_jit() { } - void invalidate_cache() { } - void invalidate_cache_range(uint32 *start, uint32 size) { } - - uint32 emul_get_xer() const { return XER; } - void emul_set_xer(uint32 value) { XER = value; } - uint32 emul_get_cr() const { return CR; } - void emul_set_cr(uint32 value) { CR = value; } - uint32 get_lr() const { return LR; } - void set_lr(uint32 value) { LR = value; } - uint32 get_gpr(int i) const { return GPR(i); } - void set_gpr(int i, uint32 value) { GPR(i) = value; } -}; - -void sheep_impl(ppc_inst_t inst) -{ - ppc_running = false; -} - -extern "C" void init_table(int opcd, void (*impl)(ppc_inst_t), char *(*bin2c)(ppc_inst_t, addr_t, char *), char *(*disasm)(ppc_inst_t, addr_t, char *), void (*translate)(ppc_inst_t, struct DecodedInstruction *), void (*xmlize)(ppc_inst_t, addr_t, char *), char *mnemonic); - -powerpc_cpu_base::powerpc_cpu_base() -{ - ppc_init(); - init_table(6, sheep_impl, NULL, NULL, NULL, NULL, "sheep"); -} - -#define ppc_code_fetch(A) ntohl(*((uint32 *)(A))) - -void powerpc_cpu_base::execute(uintptr entry_point) -{ - PC = entry_point; - - ppc_running = true; - while (ppc_running) { - ppc_inst_t inst = ppc_code_fetch(PC); - ppc_execute(inst); - } -} -#endif - -#if EMU_MODEL3PPC -extern "C" BOOL DisassemblePowerPC(UINT32, UINT32, CHAR *, CHAR *, BOOL); -BOOL DisassemblePowerPC(UINT32, UINT32, CHAR *, CHAR *, BOOL) { } - -static volatile bool ppc_running = false; - -struct powerpc_cpu_base -{ - powerpc_cpu_base(); - void execute(uintptr); - void enable_jit() { } - void invalidate_cache() { } - void invalidate_cache_range(uint32 *start, uint32 size) { } - - uint32 emul_get_xer() const { return ppc_get_reg(PPC_REG_XER); } - void emul_set_xer(uint32 value) { ppc_set_reg(PPC_REG_XER, value); } - uint32 emul_get_cr() const { return ppc_get_reg(PPC_REG_CR); } - void emul_set_cr(uint32 value) { ppc_set_reg(PPC_REG_CR, value); } - uint32 get_lr() const { return ppc_get_reg(PPC_REG_LR); } - void set_lr(uint32 value) { ppc_set_reg(PPC_REG_LR, value); } - uint32 get_gpr(int i) const { return ppc_get_r(i); } - void set_gpr(int i, uint32 value) { ppc_set_r(i, value); } -}; - -static uint32 read_32(uint32 a) -{ - return ntohl(*((uint32 *)a)); -} - -static uint32 read_op(uint32 a) -{ - uint32 opcode = read_32(a); - if (opcode == POWERPC_EMUL_OP) { - ppc_running = false; - return POWERPC_NOP; - } - return opcode; -} - -powerpc_cpu_base::powerpc_cpu_base() -{ - ppc_init(NULL); - ppc_set_read_32_handler((void *)&read_32); - ppc_set_read_op_handler((void *)&read_op); -} - -void powerpc_cpu_base::execute(uintptr entry_point) -{ - ppc_set_reg(PPC_REG_PC, entry_point); - - ppc_running = true; - while (ppc_running) - ppc_run(1); -} -#endif - -#if EMU_QEMU -class powerpc_cpu_base -{ - CPUPPCState *ppc; -public: - powerpc_cpu_base(); - ~powerpc_cpu_base(); - void execute(uintptr); - void enable_jit() { } - void invalidate_cache() { tb_flush(); } - void invalidate_cache_range(uint32 *start, uint32 size) { invalidate_cache(); } - - uint32 emul_get_xer() const; - void emul_set_xer(uint32 value); - uint32 emul_get_cr() const; - void emul_set_cr(uint32 value); - uint32 get_lr() const { return ppc->LR; } - void set_lr(uint32 value) { ppc->LR = value; } - uint32 get_gpr(int i) const { return ppc->gpr[i]; } - void set_gpr(int i, uint32 value) { ppc->gpr[i] = value; } -}; - -uint32 powerpc_cpu_base::emul_get_xer() const -{ - uint32 xer = 0; - for (int i = 0; i < 32; i++) - xer |= ppc->xer[i] << i; - return xer; -} - -void powerpc_cpu_base::emul_set_xer(uint32 value) -{ - for (int i = 0; i < 32; i++) - ppc->xer[i] = (value >> i) & 1; -} - -uint32 powerpc_cpu_base::emul_get_cr() const -{ - uint32 cr = 0; - for (int i = 0; i < 8; i++) - cr |= (ppc->crf[i] & 15) << (28 - 4 * i); - return cr; -} - -void powerpc_cpu_base::emul_set_cr(uint32 value) -{ - for (int i = 0; i < 8; i++) - ppc->crf[i] = (value >> (28 - 4 * i)) & 15; -} - -powerpc_cpu_base::powerpc_cpu_base() -{ - ppc = cpu_ppc_init(); -} - -powerpc_cpu_base::~powerpc_cpu_base() -{ - cpu_ppc_close(ppc); -} - -void powerpc_cpu_base::execute(uintptr entry_point) -{ - ppc->nip = entry_point; - cpu_exec(ppc); -} -#endif - -// Define bit-fields -#if !EMU_KHEPERIX -template< int FB, int FE > -struct static_mask { - enum { value = (0xffffffff >> FB) ^ (0xffffffff >> (FE + 1)) }; -}; - -template< int FB > -struct static_mask { - enum { value = 0xffffffff >> FB }; -}; - -template< int FB, int FE > -struct bit_field { - static inline uint32 mask() { - return static_mask::value; - } - static inline bool test(uint32 value) { - return value & mask(); - } - static inline uint32 extract(uint32 value) { - const uint32 m = mask() >> (31 - FE); - return (value >> (31 - FE)) & m; - } - static inline void insert(uint32 & data, uint32 value) { - const uint32 m = mask(); - data = (data & ~m) | ((value << (31 - FE)) & m); - } -}; - -// General purpose registers -typedef bit_field< 11, 15 > rA_field; -typedef bit_field< 16, 20 > rB_field; -typedef bit_field< 6, 10 > rD_field; -typedef bit_field< 6, 10 > rS_field; - -// Vector registers -typedef bit_field< 11, 15 > vA_field; -typedef bit_field< 16, 20 > vB_field; -typedef bit_field< 21, 25 > vC_field; -typedef bit_field< 6, 10 > vD_field; -typedef bit_field< 6, 10 > vS_field; -typedef bit_field< 22, 25 > vSH_field; - -// Condition registers -typedef bit_field< 11, 15 > crbA_field; -typedef bit_field< 16, 20 > crbB_field; -typedef bit_field< 6, 10 > crbD_field; -typedef bit_field< 6, 8 > crfD_field; -typedef bit_field< 11, 13 > crfS_field; - -// CR register fields -template< int CRn > struct CR_field : bit_field< 4*CRn+0, 4*CRn+3 > { }; -template< int CRn > struct CR_LT_field : bit_field< 4*CRn+0, 4*CRn+0 > { }; -template< int CRn > struct CR_GT_field : bit_field< 4*CRn+1, 4*CRn+1 > { }; -template< int CRn > struct CR_EQ_field : bit_field< 4*CRn+2, 4*CRn+2 > { }; -template< int CRn > struct CR_SO_field : bit_field< 4*CRn+3, 4*CRn+3 > { }; -template< int CRn > struct CR_UN_field : bit_field< 4*CRn+3, 4*CRn+3 > { }; - -// Immediates -typedef bit_field< 16, 31 > UIMM_field; -typedef bit_field< 21, 25 > MB_field; -typedef bit_field< 26, 30 > ME_field; -typedef bit_field< 16, 20 > SH_field; - -// XER register fields -typedef bit_field< 0, 0 > XER_SO_field; -typedef bit_field< 1, 1 > XER_OV_field; -typedef bit_field< 2, 2 > XER_CA_field; -#endif -#undef CA -#define CA XER_CA_field::mask() -#undef OV -#define OV XER_OV_field::mask() -#undef SO -#define SO XER_SO_field::mask() - -// Flag: does the host support AltiVec instructions? -static bool has_altivec = true; - -// A 128-bit AltiVec register -typedef uint8 vector_t[16]; - -class aligned_vector_t { - struct { - vector_t v; - uint8 pad[16]; - } vs; -public: - aligned_vector_t() - { clear(); } - void clear() - { memset(addr(), 0, sizeof(vector_t)); } - void copy(vector_t const & vi, int n = sizeof(vector_t)) - { clear(); memcpy(addr(), &vi, n); } - vector_t *addr() const - { return (vector_t *)(((char *)&vs.v) + (16 - (((uintptr)&vs.v) % 16))); } - vector_t const & value() const - { return *addr(); } - vector_t & value() - { return *addr(); } -}; - -union vector_helper_t { - vector_t v; - uint8 b[16]; - uint16 h[8]; - uint32 w[4]; - float f[4]; -}; - -static void print_vector(vector_t const & v, char type = 'b') -{ - vector_helper_t x; - memcpy(&x.b, &v, sizeof(vector_t)); - - printf("{"); - switch (type) { - case 'b': - default: - for (int i = 0; i < 16; i++) { - if (i != 0) - printf(","); - printf(" %02x", x.b[i]); - } - break; - case 'h': - for (int i = 0; i < 8; i++) { - if (i != 0) - printf(","); - printf(" %04x", x.h[i]); - } - break; - case 'w': - for (int i = 0; i < 4; i++) { - if (i != 0) - printf(","); - printf(" %08x", x.w[i]); - } - break; - case 'f': - case 'e': // estimate result - case 'l': // estimate log2 result - for (int i = 0; i < 4; i++) { - x.w[i] = ntohl(x.w[i]); - if (i != 0) - printf(","); - printf(" %g", x.f[i]); - } - break; - } - printf(" }"); -} - -static inline bool do_float_equals(float a, float b, float tolerance) -{ - if (a == b) - return true; - - if (isnan(a) && isnan(b)) - return true; - - if (isinf(a) && isinf(b) && signbit(a) == signbit(b)) - return true; - - if ((b < (a + tolerance)) && (b > (a - tolerance))) - return true; - - return false; -} - -static inline bool float_equals(float a, float b) -{ - return do_float_equals(a, b, 3 * std::numeric_limits::epsilon()); -} - -static bool vector_equals(char type, vector_t const & a, vector_t const & b) -{ - // the vector is in ppc big endian format - float tolerance; - switch (type) { - case 'f': - tolerance = 3 * std::numeric_limits::epsilon(); - goto do_compare; - case 'l': // FIXME: this does not handle |x-1|<=1/8 case - tolerance = 1. / 32.; - goto do_compare; - case 'e': - tolerance = 1. / 4096.; - do_compare: - for (int i = 0; i < 4; i++) { - union { float f; uint32 i; } u, v; - u.i = ntohl(((uint32 *)&a)[i]); - v.i = ntohl(((uint32 *)&b)[i]); - if (!do_float_equals(u.f, v.f, tolerance)) - return false; - } - return true; - } - - return memcmp(&a, &b, sizeof(vector_t)) == 0; -} - -static bool vector_all_eq(char type, vector_t const & b) -{ - uint32 v; - vector_helper_t x; - memcpy(&x.v, &b, sizeof(vector_t)); - - bool all_eq = true; - switch (type) { - case 'b': - default: - v = x.b[0]; - for (int i = 1; all_eq && i < 16; i++) - if (x.b[i] != v) - all_eq = false; - break; - case 'h': - v = x.h[0]; - for (int i = 1; all_eq && i < 8; i++) - if (x.h[i] != v) - all_eq = false; - break; - case 'w': - case 'f': - v = x.w[0]; - for (int i = 1; all_eq && i < 4; i++) - if (x.w[i] != v) - all_eq = false; - break; - } - return all_eq; -} - -// Define PowerPC tester -class powerpc_test_cpu - : public powerpc_cpu_base -{ -#ifdef NATIVE_POWERPC - uint32 native_get_xer() const - { uint32 xer; asm volatile ("mfxer %0" : "=r" (xer)); return xer; } - - void native_set_xer(uint32 xer) const - { asm volatile ("mtxer %0" : : "r" (xer)); } - - uint32 native_get_cr() const - { uint32 cr; asm volatile ("mfcr %0" : "=r" (cr)); return cr; } - - void native_set_cr(uint32 cr) const - { asm volatile ("mtcr %0" : : "r" (cr)); } -#endif - - void flush_icache_range(uint32 *start, uint32 size) - { invalidate_cache_range(start, size); ppc_flush_icache_range(start, size); } - - void print_xer_flags(uint32 xer) const; - void print_flags(uint32 cr, uint32 xer, int crf = 0) const; - void execute(uint32 *code); - -public: - - powerpc_test_cpu(); - ~powerpc_test_cpu(); - - bool test(void); - - void set_results_file(FILE *fp) - { results_file = fp; } - -private: - - static const bool verbose = false; - uint32 tests, errors; - - // Results file for reference - FILE *results_file; - uint32 get32(); - void put32(uint32 v); - void get_vector(vector_t & v); - void put_vector(vector_t const & v); - - // Initial CR0, XER states - uint32 init_cr; - uint32 init_xer; - - // XER preset values to test with - std::vector xer_values; - void gen_xer_values(uint32 use_mask, uint32 set_mask); - - // Emulated registers IDs - enum { - RD = 3, - RA = 4, - RB = 5, - RC = 6, - VSCR = 7, - }; - - // Operands - enum { - __, - vD, vS, vA, vB, vC, vI, vN, - rD, rS, rA, rB, rC, - }; - - struct vector_test_t { - uint8 name[14]; - char type; - char op_type; - uint32 opcode; - uint8 operands[4]; - }; - - struct vector_value_t { - char type; - vector_t v; - }; - - static const uint32 reg_values[]; - static const uint32 imm_values[]; - static const uint32 msk_values[]; - static const vector_value_t vector_values[]; - static const vector_value_t vector_fp_values[]; - - void test_one_1(uint32 *code, const char *insn, uint32 a1, uint32 a2, uint32 a3, uint32 a0 = 0); - void test_one(uint32 *code, const char *insn, uint32 a1, uint32 a2, uint32 a3, uint32 a0 = 0); - void test_instruction_CNTLZ(const char *insn, uint32 opcode); - void test_instruction_RR___(const char *insn, uint32 opcode); - void test_instruction_RRI__(const char *insn, uint32 opcode); -#define test_instruction_RRK__ test_instruction_RRI__ - void test_instruction_RRS__(const char *insn, uint32 opcode); - void test_instruction_RRR__(const char *insn, uint32 opcode); - void test_instruction_RRRSH(const char *insn, uint32 opcode); - void test_instruction_RRIII(const char *insn, uint32 opcode); - void test_instruction_RRRII(const char *insn, uint32 opcode); - void test_instruction_CRR__(const char *insn, uint32 opcode); - void test_instruction_CRI__(const char *insn, uint32 opcode); -#define test_instruction_CRK__ test_instruction_CRI__ - void test_instruction_CCC__(const char *insn, uint32 opcode); - - void test_add(void); - void test_sub(void); - void test_mul(void); - void test_div(void); - void test_shift(void); - void test_rotate(void); - void test_logical(void); - void test_compare(void); - void test_cr_logical(void); - - void test_one_vector(uint32 *code, vector_test_t const & vt, uint8 *rA, uint8 *rB = 0, uint8 *rC = 0); - void test_one_vector(uint32 *code, vector_test_t const & vt, vector_t const *vA = 0, vector_t const *vB = 0, vector_t const *vC = 0) - { test_one_vector(code, vt, (uint8 *)vA, (uint8 *)vB, (uint8 *)vC); } - void test_vector_load(void); - void test_vector_load_for_shift(void); - void test_vector_arith(void); -}; - -powerpc_test_cpu::powerpc_test_cpu() - : powerpc_cpu_base(), results_file(NULL) -{ -#if ENABLE_MON - mon_init(); -#endif -} - -powerpc_test_cpu::~powerpc_test_cpu() -{ -#if ENABLE_MON - mon_exit(); -#endif -} - -uint32 powerpc_test_cpu::get32() -{ - uint32 v; - if (fread(&v, sizeof(v), 1, results_file) != 1) { - fprintf(stderr, "ERROR: unexpected end of results file\n"); - exit(EXIT_FAILURE); - } - return ntohl(v); -} - -void powerpc_test_cpu::put32(uint32 v) -{ - uint32 out = htonl(v); - if (fwrite(&out, sizeof(out), 1, results_file) != 1) { - fprintf(stderr, "could not write item to results file\n"); - exit(EXIT_FAILURE); - } -} - -void powerpc_test_cpu::get_vector(vector_t & v) -{ - if (fread(&v, sizeof(v), 1, results_file) != 1) { - fprintf(stderr, "ERROR: unexpected end of results file\n"); - exit(EXIT_FAILURE); - } -} - -void powerpc_test_cpu::put_vector(vector_t const & v) -{ - if (fwrite(&v, sizeof(v), 1, results_file) != 1) { - fprintf(stderr, "could not write vector to results file\n"); - exit(EXIT_FAILURE); - } -} - -void powerpc_test_cpu::execute(uint32 *code_p) -{ - static uint32 code[2]; - code[0] = htonl(POWERPC_BLRL); - code[1] = htonl(POWERPC_EMUL_OP); - -#ifndef NATIVE_POWERPC - const int n_func_words = 1024; - static uint32 func[n_func_words]; - static int old_i; - again: - int i = old_i; - for (int j = 0; ; j++, i++) { - if (i >= n_func_words) { - old_i = 0; - invalidate_cache(); - goto again; - } - uint32 opcode = code_p[j]; - func[i] = htonl(opcode); - if (opcode == POWERPC_BLR) - break; - } - code_p = &func[old_i]; - old_i = i; -#endif - - assert((uintptr)code_p <= UINT_MAX); - set_lr((uintptr)code_p); - - assert((uintptr)code <= UINT_MAX); - powerpc_cpu_base::execute((uintptr)code); -} - -void powerpc_test_cpu::gen_xer_values(uint32 use_mask, uint32 set_mask) -{ - const uint32 mask = use_mask | set_mask; - - // Always test with XER=0 - xer_values.clear(); - xer_values.push_back(0); - - // Iterate over XER fields, only handle CA, OV, SO - for (uint32 m = 0x80000000; m != 0; m >>= 1) { - if (m & (CA | OV | SO) & mask) { - const int n_xer_values = xer_values.size(); - for (int i = 0; i < n_xer_values; i++) - xer_values.push_back(xer_values[i] | m); - } - } - -#if 0 - printf("%d XER values\n", xer_values.size()); - for (int i = 0; i < xer_values.size(); i++) { - print_xer_flags(xer_values[i]); - printf("\n"); - } -#endif -} - -void powerpc_test_cpu::print_xer_flags(uint32 xer) const -{ - printf("%s,%s,%s", - (xer & XER_CA_field::mask() ? "CA" : "__"), - (xer & XER_OV_field::mask() ? "OV" : "__"), - (xer & XER_SO_field::mask() ? "SO" : "__")); -} - -void powerpc_test_cpu::print_flags(uint32 cr, uint32 xer, int crf) const -{ - cr = cr << (4 * crf); - printf("%s,%s,%s,%s,%s,%s", - (cr & CR_LT_field<0>::mask() ? "LT" : "__"), - (cr & CR_GT_field<0>::mask() ? "GT" : "__"), - (cr & CR_EQ_field<0>::mask() ? "EQ" : "__"), - (cr & CR_SO_field<0>::mask() ? "SO" : "__"), - (xer & XER_OV_field::mask() ? "OV" : "__"), - (xer & XER_CA_field::mask() ? "CA" : "__")); -} - -#define TEST_INSTRUCTION(FORMAT, NATIVE_OP, EMUL_OP) do { \ - printf("Testing " NATIVE_OP "\n"); \ - test_instruction_##FORMAT(NATIVE_OP, EMUL_OP); \ -} while (0) - -void powerpc_test_cpu::test_one(uint32 *code, const char *insn, uint32 a1, uint32 a2, uint32 a3, uint32 a0) -{ - // Iterate over test XER values as input - const int n_xer_values = xer_values.size(); - for (int i = 0; i < n_xer_values; i++) { - init_xer = xer_values[i]; - test_one_1(code, insn, a1, a2, a3, a0); - } - init_xer = 0; -} - -void powerpc_test_cpu::test_one_1(uint32 *code, const char *insn, uint32 a1, uint32 a2, uint32 a3, uint32 a0) -{ -#ifdef NATIVE_POWERPC - // Invoke native code - const uint32 save_xer = native_get_xer(); - const uint32 save_cr = native_get_cr(); - native_set_xer(init_xer); - native_set_cr(init_cr); - typedef uint32 (*func_t)(uint32, uint32, uint32); - func_t func = (func_t)code; - const uint32 native_rd = func(a0, a1, a2); - const uint32 native_xer = native_get_xer(); - const uint32 native_cr = native_get_cr(); - native_set_xer(save_xer); - native_set_cr(save_cr); - if (results_file) { - put32(native_rd); - put32(native_xer); - put32(native_cr); - } -#else - const uint32 native_rd = get32(); - const uint32 native_xer = get32(); - const uint32 native_cr = get32(); -#endif - - if (SKIP_ALU_OPS) - return; - - // Invoke emulated code - emul_set_xer(init_xer); - emul_set_cr(init_cr); - set_gpr(RD, a0); - set_gpr(RA, a1); - set_gpr(RB, a2); - execute(code); - const uint32 emul_rd = get_gpr(RD); - const uint32 emul_xer = emul_get_xer(); - const uint32 emul_cr = emul_get_cr(); - - ++tests; - - bool ok = native_rd == emul_rd - && native_xer == emul_xer - && native_cr == emul_cr; - - if (code[0] == POWERPC_MR(0, RA)) - code++; - - if (!ok) { - printf("FAIL: %s [%08x]\n", insn, code[0]); - errors++; - } - else if (verbose) { - printf("PASS: %s [%08x]\n", insn, code[0]); - } - - if (!ok || verbose) { -#if ENABLE_MON - disass_ppc(stdout, (uintptr)code, code[0]); -#endif -#define PRINT_OPERANDS(PREFIX) do { \ - printf(" %08x, %08x, %08x, %08x => %08x [", \ - a0, a1, a2, a3, PREFIX##_rd); \ - print_flags(PREFIX##_cr, PREFIX##_xer); \ - printf("]\n"); \ - } while (0) - PRINT_OPERANDS(native); - PRINT_OPERANDS(emul); -#undef PRINT_OPERANDS - } -} - -const uint32 powerpc_test_cpu::reg_values[] = { - 0x00000000, 0x10000000, 0x20000000, - 0x30000000, 0x40000000, 0x50000000, - 0x60000000, 0x70000000, 0x80000000, - 0x90000000, 0xa0000000, 0xb0000000, - 0xc0000000, 0xd0000000, 0xe0000000, - 0xf0000000, 0xfffffffd, 0xfffffffe, - 0xffffffff, 0x00000001, 0x00000002, - 0x00000003, 0x11111111, 0x22222222, - 0x33333333, 0x44444444, 0x55555555, - 0x66666666, 0x77777777, 0x88888888, - 0x99999999, 0xaaaaaaaa, 0xbbbbbbbb, - 0xcccccccc, 0xdddddddd, 0xeeeeeeee -}; - -const uint32 powerpc_test_cpu::imm_values[] = { - 0x0000, 0x1000, 0x2000, - 0x3000, 0x4000, 0x5000, - 0x6000, 0x7000, 0x8000, - 0x9000, 0xa000, 0xb000, - 0xc000, 0xd000, 0xe000, - 0xf000, 0xfffd, 0xfffe, - 0xffff, 0x0001, 0x0002, - 0x0003, 0x1111, 0x2222, - 0x3333, 0x4444, 0x5555, - 0x6666, 0x7777, 0x8888, - 0x9999, 0xaaaa, 0xbbbb, - 0xcccc, 0xdddd, 0xeeee -}; - -const uint32 powerpc_test_cpu::msk_values[] = { - 0, 1, -// 15, 16, 17, - 30, 31 -}; - -void powerpc_test_cpu::test_instruction_CNTLZ(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - code[0] = code[3] = opcode; // RD,RA,RB - rA_field::insert(code[3], 0); // RD,R0,RB - flush_icache_range(code, sizeof(code)); - - for (uint32 mask = 0x80000000; mask != 0; mask >>= 1) { - uint32 ra = mask; - test_one(&code[0], insn, ra, 0, 0); - test_one(&code[2], insn, ra, 0, 0); - } - // random values (including zero) - for (int i = 0; i < n_values; i++) { - uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, 0, 0); - test_one(&code[2], insn, ra, 0, 0); - } -} - -void powerpc_test_cpu::test_instruction_RR___(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - code[0] = code[3] = opcode; // RD,RA,RB - rA_field::insert(code[3], 0); // RD,R0,RB - flush_icache_range(code, sizeof(code)); - - for (int i = 0; i < n_values; i++) { - uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, 0, 0); - test_one(&code[2], insn, ra, 0, 0); - } -} - -void powerpc_test_cpu::test_instruction_RRI__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_reg_values = sizeof(reg_values)/sizeof(reg_values[0]); - const int n_imm_values = sizeof(imm_values)/sizeof(imm_values[0]); - - for (int j = 0; j < n_imm_values; j++) { - const uint32 im = imm_values[j]; - uint32 op = opcode; - UIMM_field::insert(op, im); - code[0] = code[3] = op; // RD,RA,IM - rA_field::insert(code[3], 0); // RD,R0,IM - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_reg_values; i++) { - const uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, im, 0); - test_one(&code[2], insn, ra, im, 0); - } - } -} - -void powerpc_test_cpu::test_instruction_RRS__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - for (int j = 0; j < 32; j++) { - const uint32 sh = j; - SH_field::insert(opcode, sh); - code[0] = code[3] = opcode; - rA_field::insert(code[3], 0); - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_values; i++) { - const uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, sh, 0); - } - } -} - -void powerpc_test_cpu::test_instruction_RRR__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - code[0] = code[3] = opcode; // RD,RA,RB - rA_field::insert(code[3], 0); // RD,R0,RB - flush_icache_range(code, sizeof(code)); - - for (int i = 0; i < n_values; i++) { - const uint32 ra = reg_values[i]; - for (int j = 0; j < n_values; j++) { - const uint32 rb = reg_values[j]; - test_one(&code[0], insn, ra, rb, 0); - test_one(&code[2], insn, ra, rb, 0); - } - } -} - -void powerpc_test_cpu::test_instruction_RRRSH(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - code[0] = code[3] = opcode; // RD,RA,RB - rA_field::insert(code[3], 0); // RD,R0,RB - flush_icache_range(code, sizeof(code)); - - for (int i = 0; i < n_values; i++) { - const uint32 ra = reg_values[i]; - for (int j = 0; j <= 64; j++) { - const uint32 rb = j; - test_one(&code[0], insn, ra, rb, 0); - test_one(&code[2], insn, ra, rb, 0); - } - } -} - -void powerpc_test_cpu::test_instruction_RRIII(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_reg_values = sizeof(reg_values)/sizeof(reg_values[0]); - const int n_msk_values = sizeof(msk_values)/sizeof(msk_values[0]); - - for (int sh = 0; sh < 32; sh++) { - for (int i_mb = 0; i_mb < n_msk_values; i_mb++) { - const uint32 mb = msk_values[i_mb]; - for (int i_me = 0; i_me < n_msk_values; i_me++) { - const uint32 me = msk_values[i_me]; - SH_field::insert(opcode, sh); - MB_field::insert(opcode, mb); - ME_field::insert(opcode, me); - code[0] = opcode; - code[3] = opcode; - rA_field::insert(code[3], 0); - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_reg_values; i++) { - const uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, sh, 0, 0); - test_one(&code[2], insn, ra, sh, 0, 0); - } - } - } - } -} - -void powerpc_test_cpu::test_instruction_RRRII(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_reg_values = sizeof(reg_values)/sizeof(reg_values[0]); - const int n_msk_values = sizeof(msk_values)/sizeof(msk_values[0]); - - for (int i_mb = 0; i_mb < n_msk_values; i_mb++) { - const uint32 mb = msk_values[i_mb]; - for (int i_me = 0; i_me < n_msk_values; i_me++) { - const uint32 me = msk_values[i_me]; - MB_field::insert(opcode, mb); - ME_field::insert(opcode, me); - code[0] = opcode; - code[3] = opcode; - rA_field::insert(code[3], 0); - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_reg_values; i++) { - const uint32 ra = reg_values[i]; - for (int j = -1; j <= 33; j++) { - const uint32 rb = j; - test_one(&code[0], insn, ra, rb, 0, 0); - test_one(&code[2], insn, ra, rb, 0, 0); - } - } - } - } -} - -void powerpc_test_cpu::test_instruction_CRR__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_values = sizeof(reg_values)/sizeof(reg_values[0]); - - for (int k = 0; k < 8; k++) { - crfD_field::insert(opcode, k); - code[0] = code[3] = opcode; // crfD,RA,RB - rA_field::insert(code[3], 0); // crfD,R0,RB - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_values; i++) { - const uint32 ra = reg_values[i]; - for (int j = 0; j < n_values; j++) { - const uint32 rb = reg_values[j]; - test_one(&code[0], insn, ra, rb, 0); - test_one(&code[2], insn, ra, rb, 0); - } - } - } -} - -void powerpc_test_cpu::test_instruction_CRI__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_BLR, - POWERPC_MR(0, RA), POWERPC_ILLEGAL, POWERPC_BLR - }; - - // Input values - const int n_reg_values = sizeof(reg_values)/sizeof(reg_values[0]); - const int n_imm_values = sizeof(imm_values)/sizeof(imm_values[0]); - - for (int k = 0; k < 8; k++) { - crfD_field::insert(opcode, k); - for (int j = 0; j < n_imm_values; j++) { - const uint32 im = imm_values[j]; - UIMM_field::insert(opcode, im); - code[0] = code[3] = opcode; // crfD,RA,SIMM - rA_field::insert(code[3], 0); // crfD,R0,SIMM - flush_icache_range(code, sizeof(code)); - for (int i = 0; i < n_reg_values; i++) { - const uint32 ra = reg_values[i]; - test_one(&code[0], insn, ra, im, 0); - test_one(&code[2], insn, ra, im, 0); - } - } - } -} - -void powerpc_test_cpu::test_instruction_CCC__(const char *insn, uint32 opcode) -{ - // Test code - static uint32 code[] = { - POWERPC_ILLEGAL, POWERPC_MFCR(RD), POWERPC_BLR, - }; - - const uint32 saved_cr = init_cr; - crbD_field::insert(opcode, 0); - - // Loop over crbA=[4-7] (crf1), crbB=[28-31] (crf7) - for (int crbA = 4; crbA <= 7; crbA++) { - crbA_field::insert(opcode, crbA); - for (int crbB = 28; crbB <= 31; crbB++) { - crbB_field::insert(opcode, crbB); - code[0] = opcode; - flush_icache_range(code, sizeof(code)); - // Generate CR values for (crf1, crf7) - uint32 cr = 0; - for (int i = 0; i < 16; i++) { - CR_field<1>::insert(cr, i); - for (int j = 0; j < 16; j++) { - CR_field<7>::insert(cr, j); - init_cr = cr; - test_one(&code[0], insn, init_cr, 0, 0); - } - } - } - } - init_cr = saved_cr; -} - -void powerpc_test_cpu::test_add(void) -{ -#if TEST_ADD - gen_xer_values(0, 0); - TEST_INSTRUCTION(RRI__,"addi", _D (14,RD,RA,00)); - TEST_INSTRUCTION(RRI__,"addis", _D (15,RD,RA,00)); - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRR__,"add", _XO(31,RD,RA,RB,0,266,0)); - TEST_INSTRUCTION(RRR__,"add.", _XO(31,RD,RA,RB,0,266,1)); - gen_xer_values(0, SO|OV); - TEST_INSTRUCTION(RRR__,"addo", _XO(31,RD,RA,RB,1,266,0)); - TEST_INSTRUCTION(RRR__,"addo." , _XO(31,RD,RA,RB,1,266,1)); - gen_xer_values(0, SO|CA); - TEST_INSTRUCTION(RRR__,"addc", _XO(31,RD,RA,RB,0, 10,0)); - TEST_INSTRUCTION(RRR__,"addc.", _XO(31,RD,RA,RB,0, 10,1)); - TEST_INSTRUCTION(RRI__,"addic", _D (12,RD,RA,00)); - TEST_INSTRUCTION(RRI__,"addic.", _D (13,RD,RA,00)); - gen_xer_values(0, SO|CA|OV); - TEST_INSTRUCTION(RRR__,"addco", _XO(31,RD,RA,RB,1, 10,0)); - TEST_INSTRUCTION(RRR__,"addco.", _XO(31,RD,RA,RB,1, 10,1)); - gen_xer_values(CA, SO|CA); - TEST_INSTRUCTION(RRR__,"adde", _XO(31,RD,RA,RB,0,138,0)); - TEST_INSTRUCTION(RRR__,"adde.", _XO(31,RD,RA,RB,0,138,1)); - TEST_INSTRUCTION(RR___,"addme", _XO(31,RD,RA,00,0,234,0)); - TEST_INSTRUCTION(RR___,"addme.", _XO(31,RD,RA,00,0,234,1)); - TEST_INSTRUCTION(RR___,"addze", _XO(31,RD,RA,00,0,202,0)); - TEST_INSTRUCTION(RR___,"addze.", _XO(31,RD,RA,00,0,202,1)); - gen_xer_values(CA, SO|CA|OV); - TEST_INSTRUCTION(RRR__,"addeo", _XO(31,RD,RA,RB,1,138,0)); - TEST_INSTRUCTION(RRR__,"addeo.", _XO(31,RD,RA,RB,1,138,1)); - TEST_INSTRUCTION(RR___,"addmeo", _XO(31,RD,RA,00,1,234,0)); - TEST_INSTRUCTION(RR___,"addmeo.", _XO(31,RD,RA,00,1,234,1)); - TEST_INSTRUCTION(RR___,"addzeo", _XO(31,RD,RA,00,1,202,0)); - TEST_INSTRUCTION(RR___,"addzeo.", _XO(31,RD,RA,00,1,202,1)); -#endif -} - -void powerpc_test_cpu::test_sub(void) -{ -#if TEST_SUB - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRR__,"subf", _XO(31,RD,RA,RB,0, 40,0)); - TEST_INSTRUCTION(RRR__,"subf.", _XO(31,RD,RA,RB,0, 40,1)); - gen_xer_values(0, SO|OV); - TEST_INSTRUCTION(RRR__,"subfo", _XO(31,RD,RA,RB,1, 40,0)); - TEST_INSTRUCTION(RRR__,"subfo.", _XO(31,RD,RA,RB,1, 40,1)); - gen_xer_values(0, SO|CA); - TEST_INSTRUCTION(RRR__,"subfc", _XO(31,RD,RA,RB,0, 8,0)); - TEST_INSTRUCTION(RRR__,"subfc.", _XO(31,RD,RA,RB,0, 8,1)); - gen_xer_values(0, SO|CA|OV); - TEST_INSTRUCTION(RRR__,"subfco", _XO(31,RD,RA,RB,1, 8,0)); - TEST_INSTRUCTION(RRR__,"subfco.", _XO(31,RD,RA,RB,1, 8,1)); - gen_xer_values(0, CA); - TEST_INSTRUCTION(RRI__,"subfic", _D ( 8,RD,RA,00)); - gen_xer_values(CA, SO|CA); - TEST_INSTRUCTION(RRR__,"subfe", _XO(31,RD,RA,RB,0,136,0)); - TEST_INSTRUCTION(RRR__,"subfe.", _XO(31,RD,RA,RB,0,136,1)); - TEST_INSTRUCTION(RR___,"subfme", _XO(31,RD,RA,00,0,232,0)); - TEST_INSTRUCTION(RR___,"subfme.", _XO(31,RD,RA,00,0,232,1)); - TEST_INSTRUCTION(RR___,"subfze", _XO(31,RD,RA,00,0,200,0)); - TEST_INSTRUCTION(RR___,"subfze.", _XO(31,RD,RA,00,0,200,1)); - gen_xer_values(CA, SO|CA|OV); - TEST_INSTRUCTION(RRR__,"subfeo", _XO(31,RD,RA,RB,1,136,0)); - TEST_INSTRUCTION(RRR__,"subfeo.", _XO(31,RD,RA,RB,1,136,1)); - TEST_INSTRUCTION(RR___,"subfmeo", _XO(31,RD,RA,00,1,232,0)); - TEST_INSTRUCTION(RR___,"subfmeo.", _XO(31,RD,RA,00,1,232,1)); - TEST_INSTRUCTION(RR___,"subfzeo", _XO(31,RD,RA,00,1,200,0)); - TEST_INSTRUCTION(RR___,"subfzeo.", _XO(31,RD,RA,00,1,200,1)); -#endif -} - -void powerpc_test_cpu::test_mul(void) -{ -#if TEST_MUL - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRR__,"mulhw", _XO(31,RD,RA,RB,0, 75,0)); - TEST_INSTRUCTION(RRR__,"mulhw.", _XO(31,RD,RA,RB,0, 75,1)); - TEST_INSTRUCTION(RRR__,"mulhwu", _XO(31,RD,RA,RB,0, 11,0)); - TEST_INSTRUCTION(RRR__,"mulhwu.", _XO(31,RD,RA,RB,0, 11,1)); - TEST_INSTRUCTION(RRI__,"mulli", _D ( 7,RD,RA,00)); - TEST_INSTRUCTION(RRR__,"mullw", _XO(31,RD,RA,RB,0,235,0)); - TEST_INSTRUCTION(RRR__,"mullw.", _XO(31,RD,RA,RB,0,235,1)); - gen_xer_values(0, SO|OV); - TEST_INSTRUCTION(RRR__,"mullwo", _XO(31,RD,RA,RB,1,235,0)); - TEST_INSTRUCTION(RRR__,"mullwo.", _XO(31,RD,RA,RB,1,235,1)); -#endif -} - -void powerpc_test_cpu::test_div(void) -{ -#if TEST_DIV - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRR__,"divw", _XO(31,RD,RA,RB,0,491,0)); - TEST_INSTRUCTION(RRR__,"divw.", _XO(31,RD,RA,RB,0,491,1)); - TEST_INSTRUCTION(RRR__,"divwu", _XO(31,RD,RA,RB,0,459,0)); - TEST_INSTRUCTION(RRR__,"divwu.", _XO(31,RD,RA,RB,0,459,1)); - gen_xer_values(0, SO|OV); - TEST_INSTRUCTION(RRR__,"divwo", _XO(31,RD,RA,RB,1,491,0)); - TEST_INSTRUCTION(RRR__,"divwo.", _XO(31,RD,RA,RB,1,491,1)); - TEST_INSTRUCTION(RRR__,"divwuo", _XO(31,RD,RA,RB,1,459,0)); - TEST_INSTRUCTION(RRR__,"divwuo.", _XO(31,RD,RA,RB,1,459,1)); -#endif -} - -void powerpc_test_cpu::test_logical(void) -{ -#if TEST_LOGICAL - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRR__,"and", _X (31,RA,RD,RB,28,0)); - TEST_INSTRUCTION(RRR__,"and.", _X (31,RA,RD,RB,28,1)); - TEST_INSTRUCTION(RRR__,"andc", _X (31,RA,RD,RB,60,0)); - TEST_INSTRUCTION(RRR__,"andc.", _X (31,RA,RD,RB,60,1)); - TEST_INSTRUCTION(RRK__,"andi.", _D (28,RA,RD,00)); - TEST_INSTRUCTION(RRK__,"andis.", _D (29,RA,RD,00)); - TEST_INSTRUCTION(CNTLZ,"cntlzw", _X (31,RA,RD,00,26,0)); - TEST_INSTRUCTION(CNTLZ,"cntlzw.", _X (31,RA,RD,00,26,1)); - TEST_INSTRUCTION(RRR__,"eqv", _X (31,RA,RD,RB,284,0)); - TEST_INSTRUCTION(RRR__,"eqv.", _X (31,RA,RD,RB,284,1)); - TEST_INSTRUCTION(RR___,"extsb", _X (31,RA,RD,00,954,0)); - TEST_INSTRUCTION(RR___,"extsb.", _X (31,RA,RD,00,954,1)); - TEST_INSTRUCTION(RR___,"extsh", _X (31,RA,RD,00,922,0)); - TEST_INSTRUCTION(RR___,"extsh.", _X (31,RA,RD,00,922,1)); - TEST_INSTRUCTION(RRR__,"nand", _X (31,RA,RD,RB,476,0)); - TEST_INSTRUCTION(RRR__,"nand.", _X (31,RA,RD,RB,476,1)); - TEST_INSTRUCTION(RR___,"neg", _XO(31,RD,RA,RB,0,104,0)); - TEST_INSTRUCTION(RR___,"neg.", _XO(31,RD,RA,RB,0,104,1)); - TEST_INSTRUCTION(RRR__,"nor", _X (31,RA,RD,RB,124,0)); - TEST_INSTRUCTION(RRR__,"nor.", _X (31,RA,RD,RB,124,1)); - TEST_INSTRUCTION(RRR__,"or", _X (31,RA,RD,RB,444,0)); - TEST_INSTRUCTION(RRR__,"or.", _X (31,RA,RD,RB,444,1)); - TEST_INSTRUCTION(RRR__,"orc", _X (31,RA,RD,RB,412,0)); - TEST_INSTRUCTION(RRR__,"orc.", _X (31,RA,RD,RB,412,1)); - TEST_INSTRUCTION(RRK__,"ori", _D (24,RA,RD,00)); - TEST_INSTRUCTION(RRK__,"oris", _D (25,RA,RD,00)); - TEST_INSTRUCTION(RRR__,"xor", _X (31,RA,RD,RB,316,0)); - TEST_INSTRUCTION(RRR__,"xor.", _X (31,RA,RD,RB,316,1)); - TEST_INSTRUCTION(RRK__,"xori", _D (26,RA,RD,00)); - TEST_INSTRUCTION(RRK__,"xoris", _D (27,RA,RD,00)); - gen_xer_values(0, SO|OV); - TEST_INSTRUCTION(RR___,"nego", _XO(31,RD,RA,RB,1,104,0)); - TEST_INSTRUCTION(RR___,"nego.", _XO(31,RD,RA,RB,1,104,1)); -#endif -} - -void powerpc_test_cpu::test_shift(void) -{ -#if TEST_SHIFT - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRRSH,"slw", _X (31,RA,RD,RB, 24,0)); - TEST_INSTRUCTION(RRRSH,"slw.", _X (31,RA,RD,RB, 24,1)); - TEST_INSTRUCTION(RRRSH,"sraw", _X (31,RA,RD,RB,792,0)); - TEST_INSTRUCTION(RRRSH,"sraw.", _X (31,RA,RD,RB,792,1)); - TEST_INSTRUCTION(RRS__,"srawi", _X (31,RA,RD,00,824,0)); - TEST_INSTRUCTION(RRS__,"srawi.", _X (31,RA,RD,00,824,1)); - TEST_INSTRUCTION(RRRSH,"srw", _X (31,RA,RD,RB,536,0)); - TEST_INSTRUCTION(RRRSH,"srw.", _X (31,RA,RD,RB,536,1)); -#endif -} - -void powerpc_test_cpu::test_rotate(void) -{ -#if TEST_ROTATE - gen_xer_values(0, SO); - TEST_INSTRUCTION(RRIII,"rlwimi", _M (20,RA,RD,00,00,00,0)); - TEST_INSTRUCTION(RRIII,"rlwimi.", _M (20,RA,RD,00,00,00,1)); - TEST_INSTRUCTION(RRIII,"rlwinm", _M (21,RA,RD,00,00,00,0)); - TEST_INSTRUCTION(RRIII,"rlwinm.", _M (21,RA,RD,00,00,00,1)); - TEST_INSTRUCTION(RRRII,"rlwnm", _M (23,RA,RD,RB,00,00,0)); - TEST_INSTRUCTION(RRRII,"rlwnm.", _M (23,RA,RD,RB,00,00,1)); -#endif -} - -void powerpc_test_cpu::test_compare(void) -{ -#if TEST_COMPARE - gen_xer_values(0, SO); - TEST_INSTRUCTION(CRR__,"cmp", _X (31,00,RA,RB,000,0)); - TEST_INSTRUCTION(CRI__,"cmpi", _D (11,00,RA,00)); - TEST_INSTRUCTION(CRR__,"cmpl", _X (31,00,RA,RB, 32,0)); - TEST_INSTRUCTION(CRK__,"cmpli", _D (10,00,RA,00)); -#endif -} - -void powerpc_test_cpu::test_cr_logical(void) -{ -#if TEST_CR_LOGICAL - gen_xer_values(0, SO); - TEST_INSTRUCTION(CCC__,"crand", _X (19,00,00,00,257,0)); - TEST_INSTRUCTION(CCC__,"crandc", _X (19,00,00,00,129,0)); - TEST_INSTRUCTION(CCC__,"creqv", _X (19,00,00,00,289,0)); - TEST_INSTRUCTION(CCC__,"crnand", _X (19,00,00,00,225,0)); - TEST_INSTRUCTION(CCC__,"crnor", _X (19,00,00,00, 33,0)); - TEST_INSTRUCTION(CCC__,"cror", _X (19,00,00,00,449,0)); - TEST_INSTRUCTION(CCC__,"crorc", _X (19,00,00,00,417,0)); - TEST_INSTRUCTION(CCC__,"crxor", _X (19,00,00,00,193,0)); -#endif -} - -// Template-generated vector values -const powerpc_test_cpu::vector_value_t powerpc_test_cpu::vector_values[] = { - {'w',{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}}, - {'w',{0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01}}, - {'w',{0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02}}, - {'w',{0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03}}, - {'w',{0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x04}}, - {'w',{0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05,0x05}}, - {'w',{0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06,0x06}}, - {'w',{0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07,0x07}}, - {'w',{0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08,0x08}}, - {'w',{0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10,0x10}}, - {'w',{0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18}}, - {'w',{0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20}}, - {'w',{0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28,0x28}}, - {'w',{0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30}}, - {'w',{0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38,0x38}}, - {'w',{0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40}}, - {'w',{0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48,0x48}}, - {'w',{0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50,0x50}}, - {'w',{0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58}}, - {'w',{0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60,0x60}}, - {'w',{0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68,0x68}}, - {'w',{0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70,0x70}}, - {'w',{0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78}}, - {'w',{0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00}}, - {'w',{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x04}}, - {'w',{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x10}}, - {'w',{0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff}}, - {'w',{0x11,0x11,0x11,0x11,0x22,0x22,0x22,0x22,0x33,0x33,0x33,0x33,0x44,0x44,0x44,0x44}}, - {'w',{0x88,0x88,0x88,0x88,0x77,0x77,0x77,0x77,0x66,0x66,0x66,0x66,0x55,0x55,0x55,0x55}}, - {'w',{0x99,0x99,0x99,0x99,0xaa,0xaa,0xaa,0xaa,0xbb,0xbb,0xbb,0xbb,0xcc,0xcc,0xcc,0xcc}}, - {'w',{0x00,0x00,0x00,0x00,0xff,0xff,0xff,0xff,0xee,0xee,0xee,0xee,0xdd,0xdd,0xdd,0xdd}}, - {'w',{0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,0x88,0x99,0xaa,0xbb,0xcc,0xdd,0xee,0xff}}, - {'h',{0x00,0x00,0x11,0x11,0x22,0x22,0x33,0x33,0x44,0x44,0x55,0x55,0x66,0x66,0x77,0x77}}, - {'h',{0x00,0x01,0x00,0x02,0x00,0x03,0x00,0x04,0x00,0x05,0x00,0x06,0x00,0x07,0x00,0x08}}, - {'h',{0x00,0x16,0x00,0x15,0x00,0x14,0x00,0x13,0x00,0x12,0x00,0x10,0x00,0x10,0x00,0x09}}, - {'b',{0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,0x88,0x99,0xaa,0xbb,0xcc,0xdd,0xee,0xff}}, - {'b',{0xff,0xee,0xdd,0xcc,0xbb,0xaa,0x99,0x88,0x77,0x66,0x55,0x44,0x33,0x22,0x11,0x00}}, - {'b',{0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f}}, - {'b',{0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f}}, - {'b',{0x2f,0x2e,0x2d,0x2c,0x2b,0x2a,0x29,0x28,0x27,0x26,0x25,0x24,0x23,0x22,0x21,0x20}} -}; - -const powerpc_test_cpu::vector_value_t powerpc_test_cpu::vector_fp_values[] = { - {'f',{0x80,0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x80,0x00,0x00,0x00}}, // -0, -0, -0, -0 - {'f',{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}}, // 0, 0, 0, 0 - {'f',{0xbf,0x80,0x00,0x00,0xbf,0x80,0x00,0x00,0xbf,0x80,0x00,0x00,0xbf,0x80,0x00,0x00}}, // -1, -1, -1, -1 - {'f',{0x3f,0x80,0x00,0x00,0x3f,0x80,0x00,0x00,0x3f,0x80,0x00,0x00,0x3f,0x80,0x00,0x00}}, // 1, 1, 1, 1 - {'f',{0xc0,0x00,0x00,0x00,0xc0,0x00,0x00,0x00,0xc0,0x00,0x00,0x00,0xc0,0x00,0x00,0x00}}, // -2, -2, -2, -2 - {'f',{0x40,0x00,0x00,0x00,0x40,0x00,0x00,0x00,0x40,0x00,0x00,0x00,0x40,0x00,0x00,0x00}}, // 2, 2, 2, 2 - {'f',{0xc0,0x00,0x00,0x00,0xbf,0x80,0x00,0x00,0x3f,0x80,0x00,0x00,0x40,0x00,0x00,0x00}}, // -2, -1, 1, 2 - {'f',{0xc0,0x40,0x00,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x40,0x40,0x00,0x00}}, // -3, -0, 0, 3 - {'f',{0x40,0x00,0x00,0x00,0x3f,0x80,0x00,0x00,0xbf,0x80,0x00,0x00,0xc0,0x00,0x00,0x00}} // 2, 1, -1, -2 -}; - -void powerpc_test_cpu::test_one_vector(uint32 *code, vector_test_t const & vt, uint8 *rAp, uint8 *rBp, uint8 *rCp) -{ -#if TEST_VMX_OPS - static vector_t native_vD; - memset(&native_vD, 0, sizeof(native_vD)); - static vector_helper_t native_vSCR; - memset(&native_vSCR, 0, sizeof(native_vSCR)); - static aligned_vector_t dummy_vector; - dummy_vector.clear(); - if (!rAp) rAp = (uint8 *)dummy_vector.addr(); - if (!rBp) rBp = (uint8 *)dummy_vector.addr(); - if (!rCp) rCp = (uint8 *)dummy_vector.addr(); -#ifdef NATIVE_POWERPC - // Invoke native code - const uint32 save_cr = native_get_cr(); - native_set_cr(init_cr); - native_vSCR.w[3] = 0; - typedef void (*func_t)(uint8 *, uint8 *, uint8 *, uint8 *, uint8 *); - func_t func = (func_t)code; - func((uint8 *)&native_vD, rAp, rBp, rCp, native_vSCR.b); - const uint32 native_cr = native_get_cr(); - const uint32 native_vscr = native_vSCR.w[3]; - native_set_cr(save_cr); - if (results_file) { - put_vector(native_vD); - put32(native_cr); - put32(native_vscr); - } -#else - get_vector(native_vD); - const uint32 native_cr = get32(); - const uint32 native_vscr = get32(); -#endif - - if (SKIP_VMX_OPS) - return; - - // Invoke emulated code - static aligned_vector_t emul_vD; - emul_vD.clear(); - static aligned_vector_t emul_vSCR; - emul_vSCR.clear(); - emul_set_cr(init_cr); - set_gpr(RD, (uintptr)emul_vD.addr()); - set_gpr(RA, (uintptr)rAp); - set_gpr(RB, (uintptr)rBp); - set_gpr(RC, (uintptr)rCp); - set_gpr(VSCR, (uintptr)emul_vSCR.addr()); - execute(code); - vector_helper_t emul_vSCR_helper; - memcpy(&emul_vSCR_helper, emul_vSCR.addr(), sizeof(vector_t)); - const uint32 emul_cr = emul_get_cr(); - const uint32 emul_vscr = ntohl(emul_vSCR_helper.w[3]); - - ++tests; - - bool ok = vector_equals(vt.type, native_vD, emul_vD.value()) - && native_cr == emul_cr - && native_vscr == emul_vscr; - - if (!ok) { - printf("FAIL: %s [%08x]\n", vt.name, vt.opcode); - errors++; - } - else if (verbose) { - printf("PASS: %s [%08x]\n", vt.name, vt.opcode); - } - - if (!ok || verbose) { -#if ENABLE_MON - disass_ppc(stdout, (uintptr)code, vt.opcode); -#endif - char op_type = tolower(vt.op_type); - if (!op_type) - op_type = vt.type; -#define PRINT_OPERAND(N, vX, rX) \ - switch (vt.operands[N]) { \ - case vX: \ - printf(#vX " = "); \ - print_vector(*((vector_t *)rX##p)); \ - printf("\n"); \ - break; \ - case vI: \ - case vN: \ - printf(#vX " = %d\n", vX##_field::extract(vt.opcode)); \ - break; \ - case rX: \ - printf(#rX " = %08x", rX##p); \ - if (rX##p) switch (op_type) { \ - case 'b': printf(" [%02x]", *rX##p); break; \ - case 'h': printf(" [%04x]", *((uint16 *)rX##p)); break; \ - case 'w': printf(" [%08x]", *((uint32 *)rX##p)); break; \ - } \ - printf("\n"); \ - break; \ - } - PRINT_OPERAND(1, vA, rA); - PRINT_OPERAND(2, vB, rB); - PRINT_OPERAND(3, vC, rC); -#undef PRINT_OPERAND - printf("vD.N = "); - print_vector(native_vD, vt.type); - printf("\n"); - printf("vD.E = "); - print_vector(emul_vD.value(), vt.type); - printf("\n"); - printf("CR.N = %08x ; VSCR.N = %08x\n", native_cr, native_vscr); - printf("CR.E = %08x ; VSCR.E = %08x\n", emul_cr, emul_vscr); - } -#endif -} - -void powerpc_test_cpu::test_vector_load_for_shift(void) -{ -#if TEST_VMX_LOADSH - // Tested instructions - static const vector_test_t tests[] = { - { "lvsl", 'b', 0, _X (31,00,00,00, 6,0), { vD, rA, rB } }, - { "lvsr", 'b', 0, _X (31,00,00,00, 38,0), { vD, rA, rB } }, - }; - - // Code template - static uint32 code[] = { - POWERPC_MFSPR(12, 256), // mfvrsave r12 - _D(15,0,0,0x1000), // lis r0,0x1000 ([v3]) - POWERPC_MTSPR(0, 256), // mtvrsave r0 - POWERPC_LI(RA, 0), // li rB, - 0, // - POWERPC_STVX(RD, 0, RD), // stvx v3,r3(0) - POWERPC_MTSPR(12, 256), // mtvrsave r12 - POWERPC_BLR // blr - }; - - int i_opcode = -1; - const int n_instructions = sizeof(code) / sizeof(code[0]); - for (int i = 0; i < n_instructions; i++) { - if (code[i] == 0) { - i_opcode = i; - break; - } - } - assert(i_opcode != -1); - - const int n_elements = sizeof(tests) / sizeof(tests[0]); - for (int i = 0; i < n_elements; i++) { - vector_test_t const & vt = tests[i]; - code[i_opcode] = vt.opcode; - vD_field::insert(code[i_opcode], RD); - rA_field::insert(code[i_opcode], 00); - rB_field::insert(code[i_opcode], RA); - - printf("Testing %s\n", vt.name); - for (int j = 0; j < 32; j++) { - UIMM_field::insert(code[i_opcode - 1], j); - flush_icache_range(code, sizeof(code)); - test_one_vector(code, vt, (uint8 *)NULL); - } - } -#endif -} - -void powerpc_test_cpu::test_vector_load(void) -{ -#if TEST_VMX_LOAD - // Tested instructions - static const vector_test_t tests[] = { - { "lvebx", 'b', 0, _X (31,00,00,00, 7,0), { vD, rA, rB } }, - { "lvehx", 'h', 0, _X (31,00,00,00, 39,0), { vD, rA, rB } }, - { "lvewx", 'w', 0, _X (31,00,00,00, 71,0), { vD, rA, rB } } - }; - - // Code template - static uint32 code[] = { - POWERPC_MFSPR(12, 256), // mfvrsave r12 - _D(15,0,0,0x1000), // lis r0,0x1000 ([v3]) - POWERPC_MTSPR(0, 256), // mtvrsave r0 - POWERPC_LVX(RD, 0, RD), // lvx v3,r3(0) - 0, // - POWERPC_STVX(RD, 0, RD), // stvx v3,r3(0) - POWERPC_MTSPR(12, 256), // mtvrsave r12 - POWERPC_BLR // blr - }; - - int i_opcode = -1; - const int n_instructions = sizeof(code) / sizeof(code[0]); - for (int i = 0; i < n_instructions; i++) { - if (code[i] == 0) { - i_opcode = i; - break; - } - } - assert(i_opcode != -1); - - const int n_elements = sizeof(tests) / sizeof(tests[0]); - for (int i = 0; i < n_elements; i++) { - vector_test_t const & vt = tests[i]; - code[i_opcode] = vt.opcode; - vD_field::insert(code[i_opcode], RD); - rA_field::insert(code[i_opcode], 00); - rB_field::insert(code[i_opcode], RA); - flush_icache_range(code, sizeof(code)); - - printf("Testing %s\n", vt.name); - const int n_vector_values = sizeof(vector_values)/sizeof(vector_values[0]); - for (int j = 0; j < n_vector_values; j++) { - static aligned_vector_t av; - switch (vt.type) { - case 'b': - for (int k = 0; k < 16; k++) { - av.copy(*(vector_t *)((uint8 *)(&vector_values[j].v) + 1 * k), 16 - 1 * k); - test_one_vector(code, vt, av.addr()); - } - break; - case 'h': - for (int k = 0; k < 8; k++) { - av.copy(*(vector_t *)((uint8 *)(&vector_values[j].v) + 2 * k), 16 - 2 * k); - test_one_vector(code, vt, av.addr()); - } - break; - case 'w': - for (int k = 0; k < 4; k++) { - av.copy(*(vector_t *)((uint8 *)(&vector_values[j].v) + 4 * k), 16 - 4 * k); - test_one_vector(code, vt, av.addr()); - } - break; - } - } - } -#endif -} - -void powerpc_test_cpu::test_vector_arith(void) -{ -#if TEST_VMX_ARITH - // Tested instructions - static const vector_test_t tests[] = { - { "vaddcuw", 'w', 0 , _VX(04,RD,RA,RB, 384), { vD, vA, vB } }, - { "vaddfp", 'f', 0 , _VX(04,RD,RA,RB, 10), { vD, vA, vB } }, - { "vaddsbs", 'b', 0 , _VX(04,RD,RA,RB, 768), { vD, vA, vB } }, - { "vaddshs", 'h', 0 , _VX(04,RD,RA,RB, 832), { vD, vA, vB } }, - { "vaddsws", 'w', 0 , _VX(04,RD,RA,RB, 896), { vD, vA, vB } }, - { "vaddubm", 'b', 0 , _VX(04,RD,RA,RB, 0), { vD, vA, vB } }, - { "vaddubs", 'b', 0 , _VX(04,RD,RA,RB, 512), { vD, vA, vB } }, - { "vadduhm", 'h', 0 , _VX(04,RD,RA,RB, 64), { vD, vA, vB } }, - { "vadduhs", 'h', 0 , _VX(04,RD,RA,RB, 576), { vD, vA, vB } }, - { "vadduwm", 'w', 0 , _VX(04,RD,RA,RB, 128), { vD, vA, vB } }, - { "vadduws", 'w', 0 , _VX(04,RD,RA,RB, 640), { vD, vA, vB } }, - { "vand", 'w', 0 , _VX(04,RD,RA,RB,1028), { vD, vA, vB } }, - { "vandc", 'w', 0 , _VX(04,RD,RA,RB,1092), { vD, vA, vB } }, - { "vavgsb", 'b', 0 , _VX(04,RD,RA,RB,1282), { vD, vA, vB } }, - { "vavgsh", 'h', 0 , _VX(04,RD,RA,RB,1346), { vD, vA, vB } }, - { "vavgsw", 'w', 0 , _VX(04,RD,RA,RB,1410), { vD, vA, vB } }, - { "vavgub", 'b', 0 , _VX(04,RD,RA,RB,1026), { vD, vA, vB } }, - { "vavguh", 'h', 0 , _VX(04,RD,RA,RB,1090), { vD, vA, vB } }, - { "vavguw", 'w', 0 , _VX(04,RD,RA,RB,1154), { vD, vA, vB } }, - { "vcfsx", 'f', 'w', _VX(04,RD,00,RB, 842), { vD, vI, vB } }, - { "vcfux", 'f', 'w', _VX(04,RD,00,RB, 778), { vD, vI, vB } }, - { "vcmpbfp", 'w', 'f', _VXR(04,RD,RA,RB,966,0), { vD, vA, vB } }, - { "vcmpbfp.", 'w', 'f', _VXR(04,RD,RA,RB,966,1), { vD, vA, vB } }, - { "vcmpeqfp", 'w', 'f', _VXR(04,RD,RA,RB,198,0), { vD, vA, vB } }, - { "vcmpeqfp.", 'w', 'f', _VXR(04,RD,RA,RB,198,1), { vD, vA, vB } }, - { "vcmpequb", 'b', 0 , _VXR(04,RD,RA,RB, 6,0), { vD, vA, vB } }, - { "vcmpequb.", 'b', 0 , _VXR(04,RD,RA,RB, 6,1), { vD, vA, vB } }, - { "vcmpequh", 'h', 0 , _VXR(04,RD,RA,RB, 70,0), { vD, vA, vB } }, - { "vcmpequh.", 'h', 0 , _VXR(04,RD,RA,RB, 70,1), { vD, vA, vB } }, - { "vcmpequw", 'w', 0 , _VXR(04,RD,RA,RB,134,0), { vD, vA, vB } }, - { "vcmpequw.", 'w', 0 , _VXR(04,RD,RA,RB,134,1), { vD, vA, vB } }, - { "vcmpgefp", 'w', 'f', _VXR(04,RD,RA,RB,454,0), { vD, vA, vB } }, - { "vcmpgefp.", 'w', 'f', _VXR(04,RD,RA,RB,454,1), { vD, vA, vB } }, - { "vcmpgtfp", 'w', 'f', _VXR(04,RD,RA,RB,710,0), { vD, vA, vB } }, - { "vcmpgtfp.", 'w', 'f', _VXR(04,RD,RA,RB,710,1), { vD, vA, vB } }, - { "vcmpgtsb", 'b', 0 , _VXR(04,RD,RA,RB,774,0), { vD, vA, vB } }, - { "vcmpgtsb.", 'b', 0 , _VXR(04,RD,RA,RB,774,1), { vD, vA, vB } }, - { "vcmpgtsh", 'h', 0 , _VXR(04,RD,RA,RB,838,0), { vD, vA, vB } }, - { "vcmpgtsh.", 'h', 0 , _VXR(04,RD,RA,RB,838,1), { vD, vA, vB } }, - { "vcmpgtsw", 'w', 0 , _VXR(04,RD,RA,RB,902,0), { vD, vA, vB } }, - { "vcmpgtsw.", 'w', 0 , _VXR(04,RD,RA,RB,902,1), { vD, vA, vB } }, - { "vcmpgtub", 'b', 0 , _VXR(04,RD,RA,RB,518,0), { vD, vA, vB } }, - { "vcmpgtub.", 'b', 0 , _VXR(04,RD,RA,RB,518,1), { vD, vA, vB } }, - { "vcmpgtuh", 'h', 0 , _VXR(04,RD,RA,RB,582,0), { vD, vA, vB } }, - { "vcmpgtuh.", 'h', 0 , _VXR(04,RD,RA,RB,582,1), { vD, vA, vB } }, - { "vcmpgtuw", 'w', 0 , _VXR(04,RD,RA,RB,646,0), { vD, vA, vB } }, - { "vcmpgtuw.", 'w', 0 , _VXR(04,RD,RA,RB,646,1), { vD, vA, vB } }, - { "vctsxs", 'w', 'f', _VX(04,RD,00,RB, 970), { vD, vI, vB } }, - { "vctuxs", 'w', 'f', _VX(04,RD,00,RB, 906), { vD, vI, vB } }, - { "vexptefp", 'f', 0 , _VX(04,RD,00,RB, 394), { vD, __, vB } }, - { "vlogefp", 'l', 'f', _VX(04,RD,00,RB, 458), { vD, __, vB } }, - { "vmaddfp", 'f', 0 , _VA(04,RD,RA,RB,RC,46),{ vD, vA, vB, vC } }, - { "vmaxfp", 'f', 0 , _VX(04,RD,RA,RB,1034), { vD, vA, vB } }, - { "vmaxsb", 'b', 0 , _VX(04,RD,RA,RB, 258), { vD, vA, vB } }, - { "vmaxsh", 'h', 0 , _VX(04,RD,RA,RB, 322), { vD, vA, vB } }, - { "vmaxsw", 'w', 0 , _VX(04,RD,RA,RB, 386), { vD, vA, vB } }, - { "vmaxub", 'b', 0 , _VX(04,RD,RA,RB, 2), { vD, vA, vB } }, - { "vmaxuh", 'h', 0 , _VX(04,RD,RA,RB, 66), { vD, vA, vB } }, - { "vmaxuw", 'w', 0 , _VX(04,RD,RA,RB, 130), { vD, vA, vB } }, - { "vmhaddshs", 'h', 0 , _VA(04,RD,RA,RB,RC,32),{ vD, vA, vB, vC } }, - { "vmhraddshs", 'h', 0 , _VA(04,RD,RA,RB,RC,33),{ vD, vA, vB, vC } }, - { "vminfp", 'f', 0 , _VX(04,RD,RA,RB,1098), { vD, vA, vB } }, - { "vminsb", 'b', 0 , _VX(04,RD,RA,RB, 770), { vD, vA, vB } }, - { "vminsh", 'h', 0 , _VX(04,RD,RA,RB, 834), { vD, vA, vB } }, - { "vminsw", 'w', 0 , _VX(04,RD,RA,RB, 898), { vD, vA, vB } }, - { "vminub", 'b', 0 , _VX(04,RD,RA,RB, 514), { vD, vA, vB } }, - { "vminuh", 'h', 0 , _VX(04,RD,RA,RB, 578), { vD, vA, vB } }, - { "vminuw", 'w', 0 , _VX(04,RD,RA,RB, 642), { vD, vA, vB } }, - { "vmladduhm", 'h', 0 , _VA(04,RD,RA,RB,RC,34),{ vD, vA, vB, vC } }, - { "vmrghb", 'b', 0 , _VX(04,RD,RA,RB, 12), { vD, vA, vB } }, - { "vmrghh", 'h', 0 , _VX(04,RD,RA,RB, 76), { vD, vA, vB } }, - { "vmrghw", 'w', 0 , _VX(04,RD,RA,RB, 140), { vD, vA, vB } }, - { "vmrglb", 'b', 0 , _VX(04,RD,RA,RB, 268), { vD, vA, vB } }, - { "vmrglh", 'h', 0 , _VX(04,RD,RA,RB, 332), { vD, vA, vB } }, - { "vmrglw", 'w', 0 , _VX(04,RD,RA,RB, 396), { vD, vA, vB } }, - { "vmsummbm", 'b', 0 , _VA(04,RD,RA,RB,RC,37),{ vD, vA, vB, vC } }, - { "vmsumshm", 'h', 0 , _VA(04,RD,RA,RB,RC,40),{ vD, vA, vB, vC } }, - { "vmsumshs", 'h', 0 , _VA(04,RD,RA,RB,RC,41),{ vD, vA, vB, vC } }, - { "vmsumubm", 'b', 0 , _VA(04,RD,RA,RB,RC,36),{ vD, vA, vB, vC } }, - { "vmsumuhm", 'h', 0 , _VA(04,RD,RA,RB,RC,38),{ vD, vA, vB, vC } }, - { "vmsumuhs", 'h', 0 , _VA(04,RD,RA,RB,RC,39),{ vD, vA, vB, vC } }, - { "vmulesb", 'b', 0 , _VX(04,RD,RA,RB, 776), { vD, vA, vB } }, - { "vmulesh", 'h', 0 , _VX(04,RD,RA,RB, 840), { vD, vA, vB } }, - { "vmuleub", 'b', 0 , _VX(04,RD,RA,RB, 520), { vD, vA, vB } }, - { "vmuleuh", 'h', 0 , _VX(04,RD,RA,RB, 584), { vD, vA, vB } }, - { "vmulosb", 'b', 0 , _VX(04,RD,RA,RB, 264), { vD, vA, vB } }, - { "vmulosh", 'h', 0 , _VX(04,RD,RA,RB, 328), { vD, vA, vB } }, - { "vmuloub", 'b', 0 , _VX(04,RD,RA,RB, 8), { vD, vA, vB } }, - { "vmulouh", 'h', 0 , _VX(04,RD,RA,RB, 72), { vD, vA, vB } }, - { "vnmsubfp", 'f', 0 , _VA(04,RD,RA,RB,RC,47),{ vD, vA, vB, vC } }, - { "vnor", 'w', 0 , _VX(04,RD,RA,RB,1284), { vD, vA, vB } }, - { "vor", 'w', 0 , _VX(04,RD,RA,RB,1156), { vD, vA, vB } }, - { "vperm", 'b', 0 , _VA(04,RD,RA,RB,RC,43),{ vD, vA, vB, vC } }, - { "vpkpx", 'h', 0 , _VX(04,RD,RA,RB, 782), { vD, vA, vB } }, - { "vpkshss", 'b', 0 , _VX(04,RD,RA,RB, 398), { vD, vA, vB } }, - { "vpkshus", 'b', 0 , _VX(04,RD,RA,RB, 270), { vD, vA, vB } }, - { "vpkswss", 'h', 0 , _VX(04,RD,RA,RB, 462), { vD, vA, vB } }, - { "vpkswus", 'h', 0 , _VX(04,RD,RA,RB, 334), { vD, vA, vB } }, - { "vpkuhum", 'b', 0 , _VX(04,RD,RA,RB, 14), { vD, vA, vB } }, - { "vpkuhus", 'b', 0 , _VX(04,RD,RA,RB, 142), { vD, vA, vB } }, - { "vpkuwum", 'h', 0 , _VX(04,RD,RA,RB, 78), { vD, vA, vB } }, - { "vpkuwus", 'h', 0 , _VX(04,RD,RA,RB, 206), { vD, vA, vB } }, - { "vrefp", 'e', 'f', _VX(04,RD,00,RB, 266), { vD, __, vB } }, - { "vrfim", 'f', 0 , _VX(04,RD,00,RB, 714), { vD, __, vB } }, - { "vrfin", 'f', 0 , _VX(04,RD,00,RB, 522), { vD, __, vB } }, - { "vrfip", 'f', 0 , _VX(04,RD,00,RB, 650), { vD, __, vB } }, - { "vrfiz", 'f', 0 , _VX(04,RD,00,RB, 586), { vD, __, vB } }, - { "vrlb", 'b', 0 , _VX(04,RD,RA,RB, 4), { vD, vA, vB } }, - { "vrlh", 'h', 0 , _VX(04,RD,RA,RB, 68), { vD, vA, vB } }, - { "vrlw", 'w', 0 , _VX(04,RD,RA,RB, 132), { vD, vA, vB } }, - { "vrsqrtefp", 'e', 'f', _VX(04,RD,00,RB, 330), { vD, __, vB } }, - { "vsel", 'b', 0 , _VA(04,RD,RA,RB,RC,42),{ vD, vA, vB, vC } }, - { "vsl", 'b', 'B', _VX(04,RD,RA,RB, 452), { vD, vA, vB } }, - { "vslb", 'b', 0 , _VX(04,RD,RA,RB, 260), { vD, vA, vB } }, - { "vsldoi", 'b', 0 , _VA(04,RD,RA,RB,00,44),{ vD, vA, vB, vN } }, - { "vslh", 'h', 0 , _VX(04,RD,RA,RB, 324), { vD, vA, vB } }, - { "vslo", 'b', 0 , _VX(04,RD,RA,RB,1036), { vD, vA, vB } }, - { "vslw", 'w', 0 , _VX(04,RD,RA,RB, 388), { vD, vA, vB } }, - { "vspltb", 'b', 0 , _VX(04,RD,00,RB, 524), { vD, vI, vB } }, - { "vsplth", 'h', 0 , _VX(04,RD,00,RB, 588), { vD, vI, vB } }, - { "vspltisb", 'b', 0 , _VX(04,RD,00,00, 780), { vD, vI } }, - { "vspltish", 'h', 0 , _VX(04,RD,00,00, 844), { vD, vI } }, - { "vspltisw", 'w', 0 , _VX(04,RD,00,00, 908), { vD, vI } }, - { "vspltw", 'w', 0 , _VX(04,RD,00,RB, 652), { vD, vI, vB } }, - { "vsr", 'b', 'B', _VX(04,RD,RA,RB, 708), { vD, vA, vB } }, - { "vsrab", 'b', 0 , _VX(04,RD,RA,RB, 772), { vD, vA, vB } }, - { "vsrah", 'h', 0 , _VX(04,RD,RA,RB, 836), { vD, vA, vB } }, - { "vsraw", 'w', 0 , _VX(04,RD,RA,RB, 900), { vD, vA, vB } }, - { "vsrb", 'b', 0 , _VX(04,RD,RA,RB, 516), { vD, vA, vB } }, - { "vsrh", 'h', 0 , _VX(04,RD,RA,RB, 580), { vD, vA, vB } }, - { "vsro", 'b', 0 , _VX(04,RD,RA,RB,1100), { vD, vA, vB } }, - { "vsrw", 'w', 0 , _VX(04,RD,RA,RB, 644), { vD, vA, vB } }, - { "vsubcuw", 'w', 0 , _VX(04,RD,RA,RB,1408), { vD, vA, vB } }, - { "vsubfp", 'f', 0 , _VX(04,RD,RA,RB, 74), { vD, vA, vB } }, - { "vsubsbs", 'b', 0 , _VX(04,RD,RA,RB,1792), { vD, vA, vB } }, - { "vsubshs", 'h', 0 , _VX(04,RD,RA,RB,1856), { vD, vA, vB } }, - { "vsubsws", 'w', 0 , _VX(04,RD,RA,RB,1920), { vD, vA, vB } }, - { "vsububm", 'b', 0 , _VX(04,RD,RA,RB,1024), { vD, vA, vB } }, - { "vsububs", 'b', 0 , _VX(04,RD,RA,RB,1536), { vD, vA, vB } }, - { "vsubuhm", 'h', 0 , _VX(04,RD,RA,RB,1088), { vD, vA, vB } }, - { "vsubuhs", 'h', 0 , _VX(04,RD,RA,RB,1600), { vD, vA, vB } }, - { "vsubuwm", 'w', 0 , _VX(04,RD,RA,RB,1152), { vD, vA, vB } }, - { "vsubuws", 'w', 0 , _VX(04,RD,RA,RB,1664), { vD, vA, vB } }, - { "vsum2sws", 'w', 0 , _VX(04,RD,RA,RB,1672), { vD, vA, vB } }, - { "vsum4sbs", 'w', 0 , _VX(04,RD,RA,RB,1800), { vD, vA, vB } }, - { "vsum4shs", 'w', 0 , _VX(04,RD,RA,RB,1608), { vD, vA, vB } }, - { "vsum4ubs", 'w', 0 , _VX(04,RD,RA,RB,1544), { vD, vA, vB } }, - { "vsumsws", 'w', 0 , _VX(04,RD,RA,RB,1928), { vD, vA, vB } }, - { "vupkhpx", 'w', 0 , _VX(04,RD,00,RB, 846), { vD, __, vB } }, - { "vupkhsb", 'h', 0 , _VX(04,RD,00,RB, 526), { vD, __, vB } }, - { "vupkhsh", 'w', 0 , _VX(04,RD,00,RB, 590), { vD, __, vB } }, - { "vupklpx", 'w', 0 , _VX(04,RD,00,RB, 974), { vD, __, vB } }, - { "vupklsb", 'h', 0 , _VX(04,RD,00,RB, 654), { vD, __, vB } }, - { "vupklsh", 'w', 0 , _VX(04,RD,00,RB, 718), { vD, __, vB } }, - { "vxor", 'w', 0 , _VX(04,RD,RA,RB,1220), { vD, vA, vB } }, - }; - - // Code template - static uint32 code[] = { - POWERPC_MFSPR(12, 256), // mfvrsave r12 - _D(15,0,0,0x9e00), // lis r0,0x9e00 ([v0;v3-v6]) - POWERPC_MTSPR(0, 256), // mtvrsave r0 - POWERPC_LVX(RA, 0, RA), // lvx v4,r4(0) - POWERPC_LVX(RB, 0, RB), // lvx v5,r5(0) - POWERPC_LVX(RC, 0, RC), // lvx v6,r6(0) - POWERPC_LVX(0, 0, VSCR), // lvx v0,r7(0) - _VX(04,00,00,00,1604), // mtvscr v0 - 0, // v3,v4,v5 - _VX(04,00,00,00,1540), // mfvscr v0 - POWERPC_STVX(0, 0, VSCR), // stvx v0,r7(0) - POWERPC_STVX(RD, 0, RD), // stvx v3,r3(0) - POWERPC_MTSPR(12, 256), // mtvrsave r12 - POWERPC_BLR // blr - }; - - int i_opcode = -1; - const int n_instructions = sizeof(code) / sizeof(code[0]); - for (int i = 0; i < n_instructions; i++) { - if (code[i] == 0) { - i_opcode = i; - break; - } - } - assert(i_opcode != -1); - - const int n_elements = sizeof(tests) / sizeof(tests[0]); - for (int n = 0; n < n_elements; n++) { - vector_test_t vt = tests[n]; - code[i_opcode] = vt.opcode; - flush_icache_range(code, sizeof(code)); - - // Operand type - char op_type = vt.op_type; - if (!op_type) - op_type = vt.type; - - // Operand values - int n_vector_values; - const vector_value_t *vvp; - if (op_type == 'f') { - n_vector_values = sizeof(vector_fp_values)/sizeof(vector_fp_values[0]); - vvp = vector_fp_values; - } - else { - n_vector_values = sizeof(vector_values)/sizeof(vector_values[0]); - vvp = vector_values; - } - - printf("Testing %s\n", vt.name); - static aligned_vector_t avi, avj, avk; - if (vt.operands[1] == vA && vt.operands[2] == vB && vt.operands[3] == vC) { - for (int i = 0; i < n_vector_values; i++) { - avi.copy(vvp[i].v); - for (int j = 0; j < n_vector_values; j++) { - avj.copy(vvp[j].v); - for (int k = 0; k < n_vector_values; k++) { - avk.copy(vvp[k].v); - test_one_vector(code, vt, avi.addr(), avj.addr(), avk.addr()); - } - } - } - } - else if (vt.operands[1] == vA && vt.operands[2] == vB && vt.operands[3] == vN) { - for (int i = 0; i < 16; i++) { - vSH_field::insert(vt.opcode, i); - code[i_opcode] = vt.opcode; - flush_icache_range(code, sizeof(code)); - avi.copy(vvp[i].v); - for (int j = 0; j < n_vector_values; j++) { - avj.copy(vvp[j].v); - for (int k = 0; k < n_vector_values; k++) - test_one_vector(code, vt, avi.addr(), avj.addr()); - } - } - } - else if (vt.operands[1] == vA && vt.operands[2] == vB) { - for (int i = 0; i < n_vector_values; i++) { - avi.copy(vvp[i].v); - for (int j = 0; j < n_vector_values; j++) { - if (op_type == 'B') { - if (!vector_all_eq('b', vvp[j].v)) - continue; - } - avj.copy(vvp[j].v); - test_one_vector(code, vt, avi.addr(), avj.addr()); - } - } - } - else if (vt.operands[1] == vI && vt.operands[2] == vB) { - for (int i = 0; i < 32; i++) { - rA_field::insert(vt.opcode, i); - code[i_opcode] = vt.opcode; - flush_icache_range(code, sizeof(code)); - for (int j = 0; j < n_vector_values; j++) { - avj.copy(vvp[j].v); - test_one_vector(code, vt, NULL, avj.addr()); - } - } - } - else if (vt.operands[1] == vI) { - for (int i = 0; i < 32; i++) { - rA_field::insert(vt.opcode, i); - code[i_opcode] = vt.opcode; - flush_icache_range(code, sizeof(code)); - test_one_vector(code, vt); - } - } - else if (vt.operands[1] == __ && vt.operands[2] == vB) { - for (int i = 0; i < n_vector_values; i++) { - avi.copy(vvp[i].v); - test_one_vector(code, vt, NULL, avi.addr()); - } - } - else { - printf("ERROR: unhandled test case\n"); - abort(); - } - } -#endif -} - -// Illegal handler to catch out AltiVec instruction -#ifdef NATIVE_POWERPC -static sigjmp_buf env; - -static void sigill_handler(int sig) -{ - has_altivec = false; - siglongjmp(env, 1); -} -#endif - -bool powerpc_test_cpu::test(void) -{ - // Tests initialization - tests = errors = 0; - init_cr = init_xer = 0; - - // Execution ALU tests -#if TEST_ALU_OPS - test_add(); - test_sub(); - test_mul(); - test_div(); - test_shift(); - test_rotate(); - test_logical(); - test_compare(); - test_cr_logical(); -#endif - - // Execute VMX tests -#if TEST_VMX_OPS - if (has_altivec) { - test_vector_load_for_shift(); - test_vector_load(); - test_vector_arith(); - } -#endif - - printf("%u errors out of %u tests\n", errors, tests); - return errors == 0; -} - -int main(int argc, char *argv[]) -{ -#ifdef EMU_KHEPERIX - // Initialize VM system (predecode cache uses vm_acquire()) - vm_init(); -#endif - - FILE *fp = NULL; - powerpc_test_cpu *ppc = new powerpc_test_cpu; - - if (argc > 1) { - const char *arg = argv[1]; - if (strcmp(arg, "--jit") == 0) { - --argc; - argv[1] = argv[0]; - ++argv; - ppc->enable_jit(); - } - } - - if (argc > 1) { - const char *file = argv[1]; -#ifdef NATIVE_POWERPC - if ((fp = fopen(file, "wb")) == NULL) { - fprintf(stderr, "ERROR: can't open %s for writing\n", file); - return EXIT_FAILURE; - } -#else - if ((fp = fopen(file, "rb")) == NULL) { - fprintf(stderr, "ERROR: can't open %s for reading\n", file); - return EXIT_FAILURE; - } -#endif - ppc->set_results_file(fp); - - // Use a large enough buffer - static char buffer[4096]; - setvbuf(fp, buffer, _IOFBF, sizeof(buffer)); - } - - // We need a results file on non PowerPC platforms -#ifndef NATIVE_POWERPC - if (fp == NULL) { - fprintf(stderr, "ERROR: a results file for reference is required\n"); - return EXIT_FAILURE; - } -#endif - - // Check if host CPU supports AltiVec instructions - has_altivec = true; -#ifdef NATIVE_POWERPC - signal(SIGILL, sigill_handler); - if (!sigsetjmp(env, 1)) - asm volatile(".long 0x10000484"); // vor v0,v0,v0 - signal(SIGILL, SIG_DFL); -#endif - - bool ok = ppc->test(); - if (fp) fclose(fp); - delete ppc; - return !ok; -} diff --git a/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.cpp b/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.cpp deleted file mode 100644 index d7e2d0129..000000000 --- a/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.cpp +++ /dev/null @@ -1,151 +0,0 @@ -/* - * utils-cpuinfo.cpp - Processor capability information - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 "sysdeps.h" -#include "utils/utils-cpuinfo.hpp" -#include "utils/utils-sentinel.hpp" - -// x86 CPU features -static uint32 x86_cpu_features = 0; - -enum { - HWCAP_I386_CMOV = 1 << 15, - HWCAP_I386_MMX = 1 << 23, - HWCAP_I386_SSE = 1 << 25, - HWCAP_I386_SSE2 = 1 << 26, - HWCAP_I386_EDX_FLAGS = (HWCAP_I386_CMOV|HWCAP_I386_MMX|HWCAP_I386_SSE|HWCAP_I386_SSE2), - HWCAP_I386_SSE3 = 1 << 0, - HWCAP_I386_SSSE3 = 1 << 9, - HWCAP_I386_SSE4_1 = 1 << 19, - HWCAP_I386_SSE4_2 = 1 << 20, - HWCAP_I386_ECX_FLAGS = (HWCAP_I386_SSE3|HWCAP_I386_SSSE3|HWCAP_I386_SSE4_1|HWCAP_I386_SSE4_2) -}; - -// Determine x86 CPU features -DEFINE_INIT_SENTINEL(init_x86_cpu_features); - -static void init_x86_cpu_features(void) -{ -#if defined(__i386__) || defined(__x86_64__) - unsigned int fl1, fl2; - -#ifndef __x86_64__ - /* See if we can use cpuid. On AMD64 we always can. */ - __asm__ ("pushfl; pushfl; popl %0; movl %0,%1; xorl %2,%0;" - "pushl %0; popfl; pushfl; popl %0; popfl" - : "=&r" (fl1), "=&r" (fl2) - : "i" (0x00200000)); - if (((fl1 ^ fl2) & 0x00200000) == 0) - return; -#endif - - /* Host supports cpuid. See if cpuid gives capabilities, try - CPUID(0). Preserve %ebx and %ecx; cpuid insn clobbers these, we - don't need their CPUID values here, and %ebx may be the PIC - register. */ -#ifdef __x86_64__ - __asm__ ("pushq %%rcx; pushq %%rbx; cpuid; popq %%rbx; popq %%rcx" - : "=a" (fl1) : "0" (0) : "rdx", "cc"); -#else - __asm__ ("push %%ecx ; push %%ebx ; cpuid ; pop %%ebx ; pop %%ecx" - : "=a" (fl1) : "0" (0) : "edx", "cc"); -#endif - if (fl1 == 0) - return; - - /* Invoke CPUID(1), return %edx; caller can examine bits to - determine what's supported. */ -#ifdef __x86_64__ - __asm__ ("push %%rbx ; cpuid ; pop %%rbx" : "=c" (fl1), "=d" (fl2) : "a" (1) : "cc"); -#else - __asm__ ("push %%ebx ; cpuid ; pop %%ebx" : "=c" (fl1), "=d" (fl2) : "a" (1) : "cc"); -#endif - - x86_cpu_features = (fl1 & HWCAP_I386_ECX_FLAGS) | (fl2 & HWCAP_I386_EDX_FLAGS); -#endif -} - -// Check for x86 feature CMOV -bool cpuinfo_check_cmov(void) -{ - return x86_cpu_features & HWCAP_I386_CMOV; -} - -// Check for x86 feature MMX -bool cpuinfo_check_mmx(void) -{ - return x86_cpu_features & HWCAP_I386_MMX; -} - -// Check for x86 feature SSE -bool cpuinfo_check_sse(void) -{ - return x86_cpu_features & HWCAP_I386_SSE; -} - -// Check for x86 feature SSE2 -bool cpuinfo_check_sse2(void) -{ - return x86_cpu_features & HWCAP_I386_SSE2; -} - -// Check for x86 feature SSE3 -bool cpuinfo_check_sse3(void) -{ - return x86_cpu_features & HWCAP_I386_SSE3; -} - -// Check for x86 feature SSSE3 -bool cpuinfo_check_ssse3(void) -{ - return x86_cpu_features & HWCAP_I386_SSSE3; -} - -// Check for x86 feature SSE4.1 -bool cpuinfo_check_sse4_1(void) -{ - return x86_cpu_features & HWCAP_I386_SSE4_1; -} - -// Check for x86 feature SSE4_2 -bool cpuinfo_check_sse4_2(void) -{ - return x86_cpu_features & HWCAP_I386_SSE4_2; -} - -// PowerPC CPU features -static uint32 ppc_cpu_features = 0; - -enum { - HWCAP_PPC_ALTIVEC = 1 << 0 -}; - -// Determine PowerPC CPU features -DEFINE_INIT_SENTINEL(init_ppc_cpu_features); - -static void init_ppc_cpu_features(void) -{ -} - -// Check for ppc feature VMX (Altivec) -bool cpuinfo_check_altivec(void) -{ - return ppc_cpu_features & HWCAP_PPC_ALTIVEC; -} diff --git a/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.hpp b/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.hpp deleted file mode 100644 index 22bd621fe..000000000 --- a/SheepShaver/src/kpx_cpu/src/utils/utils-cpuinfo.hpp +++ /dev/null @@ -1,51 +0,0 @@ -/* - * utils-cpuinfo.hpp - Processor capability information - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 UTILS_CPUINFO_H -#define UTILS_CPUINFO_H - -// Check for x86 feature CMOV -extern bool cpuinfo_check_cmov(void); - -// Check for x86 feature MMX -extern bool cpuinfo_check_mmx(void); - -// Check for x86 feature SSE -extern bool cpuinfo_check_sse(void); - -// Check for x86 feature SSE2 -extern bool cpuinfo_check_sse2(void); - -// Check for x86 feature SSE3 -extern bool cpuinfo_check_sse3(void); - -// Check for x86 feature SSSE3 -extern bool cpuinfo_check_ssse3(void); - -// Check for x86 feature SSE4.1 -extern bool cpuinfo_check_sse4_1(void); - -// Check for x86 feature SSE4_2 -extern bool cpuinfo_check_sse4_2(void); - -// Check for ppc feature VMX (Altivec) -extern bool cpuinfo_check_altivec(void); - -#endif /* UTILS_CPUINFO_H */ diff --git a/SheepShaver/src/kpx_cpu/src/utils/utils-sentinel.hpp b/SheepShaver/src/kpx_cpu/src/utils/utils-sentinel.hpp deleted file mode 100644 index b696f419a..000000000 --- a/SheepShaver/src/kpx_cpu/src/utils/utils-sentinel.hpp +++ /dev/null @@ -1,47 +0,0 @@ -/* - * utils-sentinel.hpp - Helper functions for program initialization and termination - * - * Kheperix (C) 2003-2005 Gwenole Beauchesne - * - * 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 UTILS_SENTINEL_H -#define UTILS_SENTINEL_H - -class program_sentinel { - void (*fini)(void); -public: - program_sentinel(void (*init_func)(void) = 0, void (*exit_func)(void) = 0) - : fini(exit_func) - { if (init_func) init_func(); } - ~program_sentinel() - { if (fini) fini(); } -}; - -#define DEFINE_INIT_SENTINEL(FUNCTION) \ -static void FUNCTION(void); \ -static program_sentinel g_program_init_sentinel__##FUNCTION(FUNCTION) - -#define DEFINE_EXIT_SENTINEL(FUNCTION) \ -static void FUNCTION(void); \ -static program_sentinel g_program_exit_sentinel__##FUNCTION(0, FUNCTION) - -#define DEFINE_PROG_SENTINEL(FUNCTION) \ -static void init_##FUNCTION(void); \ -static void exit_##FUNCTION(void); \ -static program_sentinel g_program_sentinel_##FUNCTION(init_##FUNCTION, exit_##FUNCTION) - -#endif /* UTILS_SENTINEL_H */ diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp deleted file mode 100644 index 13b21397a..000000000 --- a/SheepShaver/src/macos_util.cpp +++ /dev/null @@ -1,354 +0,0 @@ -/* - * macos_util.cpp - MacOS definitions/utility functions - * - * SheepShaver (C) Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "xlowmem.h" -#include "emul_op.h" -#include "macos_util.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// Function pointers -typedef long (*cu_ptr)(void *, uint32); -static uint32 cu_tvect = 0; -static inline long CallUniversal(void *arg1, uint32 arg2) -{ - return (long)CallMacOS2(cu_ptr, cu_tvect, arg1, arg2); -} -typedef int16 (*gsl_ptr)(char *, uint32, uint32, uint32 *, void **, char *); -static uint32 gsl_tvect = 0; -static inline int16 GetSharedLibrary(uintptr arg1, uint32 arg2, uint32 arg3, uintptr arg4, uintptr arg5, uintptr arg6) -{ - return (int16)CallMacOS6(gsl_ptr, gsl_tvect, (char *)arg1, arg2, arg3, (uint32 *)arg4, (void **)arg5, (char *)arg6); -} -typedef int16 (*fs_ptr)(uint32, char *, void **, uint32 *); -static uint32 fs_tvect = 0; -static inline int16 FindSymbol(uint32 arg1, uintptr arg2, uintptr arg3, uintptr arg4) -{ - return (int16)CallMacOS4(fs_ptr, fs_tvect, arg1, (char *)arg2, (void **)arg3, (uint32 **)arg4); -} -typedef int16 (*cc_ptr)(uint32 *); -static uint32 cc_tvect = 0; -static inline int16 CloseConnection(uint32 *arg1) -{ - return (int16)CallMacOS1(cc_ptr, cc_tvect, arg1); -} -typedef uint32 (*nps_ptr)(uint32); -static uint32 nps_tvect = 0; -static inline uint32 NewPtrSys(uint32 arg1) -{ - return CallMacOS1(nps_ptr, nps_tvect, arg1); -} -typedef void (*d_ptr)(uint32); -static uint32 d_tvect = 0; -static inline void DisposePtr(uint32 arg1) -{ - CallMacOS1(d_ptr, d_tvect, arg1); -} - - -/* - * Reset MacOS utilities - */ - -void MacOSUtilReset(void) -{ - cu_tvect = 0; - gsl_tvect = 0; - fs_tvect = 0; - cc_tvect = 0; -} - - -/* - * Enqueue QElem to list - */ - -void Enqueue(uint32 elem, uint32 list) -{ - WriteMacInt32(elem + qLink, 0); - if (!ReadMacInt32(list + qTail)) { - WriteMacInt32(list + qHead, elem); - WriteMacInt32(list + qTail, elem); - } else { - WriteMacInt32(ReadMacInt32(list + qTail) + qLink, elem); - WriteMacInt32(list + qTail, elem); - } -} - - -/* - * Find first free drive number, starting at num - */ - -static bool is_drive_number_free(int num) -{ - uint32 e = ReadMacInt32(0x308 + qHead); - while (e) { - uint32 d = e - dsQLink; - if ((int)ReadMacInt16(d + dsQDrive) == num) - return false; - e = ReadMacInt32(e + qLink); - } - return true; -} - -int FindFreeDriveNumber(int num) -{ - while (!is_drive_number_free(num)) - num++; - return num; -} - - -/* - * Mount volume with given file handle (call this function when you are unable to - * do automatic media change detection and the user has to press a special key - * or something to mount a volume; this function will check if there's really a - * volume in the drive with SysIsDiskInserted(); volumes which are present on startup - * are automatically mounted) - */ - -void MountVolume(void *fh) -{ - SonyMountVolume(fh) || DiskMountVolume(fh) || CDROMMountVolume(fh); -} - - -/* - * Calculate disk image file layout given file size and first 256 data bytes - */ - -void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size) -{ - if (size == 419284 || size == 838484) { - // 400K/800K DiskCopy image, 84 byte header - start_byte = 84; - real_size = (size - 84) & ~0x1ff; - } else { - // 0..511 byte header - start_byte = size & 0x1ff; - real_size = size - start_byte; - } -} - - -/* - * Find symbol in shared library (using CFM) - * lib and sym must be Pascal strings! - */ - -uint32 FindLibSymbol(const char *lib_str, const char *sym_str) -{ - SheepVar32 conn_id = 0; - SheepVar32 main_addr = 0; - SheepArray<256> err; - WriteMacInt8(err.addr(), 0); - SheepVar32 sym_addr = 0; - SheepVar32 sym_class = 0; - - SheepString lib(lib_str); - SheepString sym(sym_str); - - D(bug("FindLibSymbol %s in %s...\n", sym.value()+1, lib.value()+1)); - - if (ReadMacInt32(XLM_RUN_MODE) == MODE_EMUL_OP) { - M68kRegisters r; - - // Find shared library - static const uint8 proc1_template[] = { - 0x55, 0x8f, // subq.l #2,a7 - 0x2f, 0x08, // move.l a0,-(a7) - 0x2f, 0x3c, 0x70, 0x77, 0x70, 0x63, // move.l #'pwpc',-(a7) - 0x2f, 0x3c, 0x00, 0x00, 0x00, 0x01, // move.l #kReferenceCFrag,-(a7) - 0x2f, 0x09, // move.l a1,-(a7) - 0x2f, 0x0a, // move.l a2,-(a7) - 0x2f, 0x0b, // move.l a3,-(a7) - 0x3f, 0x3c, 0x00, 0x01, // (GetSharedLibrary) - 0xaa, 0x5a, // CFMDispatch - 0x30, 0x1f, // move.w (a7)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc1); - r.a[0] = lib.addr(); - r.a[1] = conn_id.addr(); - r.a[2] = main_addr.addr(); - r.a[3] = err.addr(); - Execute68k(proc1, &r); - D(bug(" GetSharedLibrary: ret %d, connection ID %ld, main %p\n", (int16)r.d[0], conn_id.value(), main_addr.value())); - if (r.d[0]) - return 0; - - // Find symbol - static const uint8 proc2_template[] = { - 0x55, 0x8f, // subq.l #2,a7 - 0x2f, 0x00, // move.l d0,-(a7) - 0x2f, 0x08, // move.l a0,-(a7) - 0x2f, 0x09, // move.l a1,-(a7) - 0x2f, 0x0a, // move.l a2,-(a7) - 0x3f, 0x3c, 0x00, 0x05, // (FindSymbol) - 0xaa, 0x5a, // CFMDispatch - 0x30, 0x1f, // move.w (a7)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc2); - r.d[0] = conn_id.value(); - r.a[0] = sym.addr(); - r.a[1] = sym_addr.addr(); - r.a[2] = sym_class.addr(); - Execute68k(proc2, &r); - D(bug(" FindSymbol1: ret %d, sym_addr %p, sym_class %ld\n", (int16)r.d[0], sym_addr.value(), sym_class.value())); -//!! CloseConnection()? - if (r.d[0]) - return 0; - else - return sym_addr.value(); - - } else { - - if (GetSharedLibrary == NULL || FindSymbol == NULL) { - printf("FATAL: FindLibSymbol() called too early\n"); - return 0; - } - int16 res; - res = GetSharedLibrary(lib.addr(), FOURCC('p','w','p','c'), 1, conn_id.addr(), main_addr.addr(), err.addr()); - D(bug(" GetSharedLibrary: ret %d, connection ID %ld, main %p\n", res, conn_id.value(), main_addr.value())); - if (res) - return 0; - res = FindSymbol(conn_id.value(), sym.addr(), sym_addr.addr(), sym_class.addr()); - D(bug(" FindSymbol: ret %d, sym_addr %p, sym_class %ld\n", res, sym_addr.value(), sym_class.value())); -//!!?? CloseConnection(&conn_id); - if (res) - return 0; - else - return sym_addr.value(); - } -} - - -/* - * Find CallUniversalProc() TVector - */ - -void InitCallUniversalProc() -{ - cu_tvect = FindLibSymbol("\014InterfaceLib", "\021CallUniversalProc"); - D(bug("CallUniversalProc TVECT at %08lx\n", cu_tvect)); - if (cu_tvect == 0) { - printf("FATAL: Can't find CallUniversalProc()\n"); - QuitEmulator(); - } - - gsl_tvect = FindLibSymbol("\014InterfaceLib", "\020GetSharedLibrary"); - D(bug("GetSharedLibrary TVECT at %08lx\n", gsl_tvect)); - if (gsl_tvect == 0) { - printf("FATAL: Can't find GetSharedLibrary()\n"); - QuitEmulator(); - } - - fs_tvect = FindLibSymbol("\014InterfaceLib", "\012FindSymbol"); - D(bug("FindSymbol TVECT at %08lx\n", fs_tvect)); - if (fs_tvect == 0) { - printf("FATAL: Can't find FindSymbol()\n"); - QuitEmulator(); - } - - cc_tvect = FindLibSymbol("\014InterfaceLib", "\017CloseConnection"); - D(bug("CloseConnection TVECT at %08lx\n", cc_tvect)); - if (cc_tvect == 0) { - printf("FATAL: Can't find CloseConnection()\n"); - QuitEmulator(); - } - - nps_tvect = FindLibSymbol("\014InterfaceLib", "\011NewPtrSys"); - D(bug("NewPtrSys TVECT at %08lx\n", nps_tvect)); - if (nps_tvect == 0) { - printf("FATAL: Can't find NewPtrSys()\n"); - QuitEmulator(); - } - - d_tvect = FindLibSymbol("\014InterfaceLib", "\012DisposePtr"); - D(bug("DisposePtr TVECT at %08lx\n", d_tvect)); - if (d_tvect == 0) { - printf("FATAL: Can't find DisposePtr()\n"); - QuitEmulator(); - } -} - - -/* - * CallUniversalProc - */ - -long CallUniversalProc(void *upp, uint32 info) -{ - if (cu_tvect == 0) { - printf("FATAL: CallUniversalProc() called too early\n"); - return 0; - } - return CallUniversal(upp, info); -} - - -/* - * Convert time_t value to MacOS time (seconds since 1.1.1904) - */ - -uint32 TimeToMacTime(time_t t) -{ - // This code is taken from glibc 2.2 - - // Convert to number of seconds elapsed since 1-Jan-1904 - struct tm *local = localtime(&t); - const int TM_EPOCH_YEAR = 1900; - const int MAC_EPOCH_YEAR = 1904; - int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); - int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); - int a100 = a4 / 25 - (a4 % 25 < 0); - int b100 = b4 / 25 - (b4 % 25 < 0); - int a400 = a100 >> 2; - int b400 = b100 >> 2; - int intervening_leap_days = (a4 - b4) - (a100 - b100) + (a400 - b400); - uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days; - return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * days)); -} - - -/* - * Memory allocators in MacOS system heap zone - */ - -uint32 Mac_sysalloc(uint32 size) -{ - return NewPtrSys(size); -} - -void Mac_sysfree(uint32 addr) -{ - DisposePtr(addr); -} diff --git a/SheepShaver/src/main.cpp b/SheepShaver/src/main.cpp deleted file mode 100644 index 1224fbe1a..000000000 --- a/SheepShaver/src/main.cpp +++ /dev/null @@ -1,326 +0,0 @@ -/* - * main.cpp - ROM patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" - -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "scsi.h" -#include "video.h" -#include "audio.h" -#include "ether.h" -#include "serial.h" -#include "clip.h" -#include "extfs.h" -#include "sys.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "user_strings.h" -#include "vm_alloc.h" -#include "sigsegv.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - -#ifdef ENABLE_MON -#include "mon.h" - -static uint32 sheepshaver_read_byte(uintptr adr) -{ - return ReadMacInt8(adr); -} - -static void sheepshaver_write_byte(uintptr adr, uint32 b) -{ - WriteMacInt8(adr, b); -} -#endif - - -/* - * Initialize everything, returns false on error - */ - -bool InitAll(const char *vmdir) -{ - // Load NVRAM - XPRAMInit(vmdir); - - // Load XPRAM default values if signature not found - if (XPRAM[0x130c] != 0x4e || XPRAM[0x130d] != 0x75 - || XPRAM[0x130e] != 0x4d || XPRAM[0x130f] != 0x63) { - D(bug("Loading XPRAM default values\n")); - memset(XPRAM + 0x1300, 0, 0x100); - XPRAM[0x130c] = 0x4e; // "NuMc" signature - XPRAM[0x130d] = 0x75; - XPRAM[0x130e] = 0x4d; - XPRAM[0x130f] = 0x63; - XPRAM[0x1301] = 0x80; // InternalWaitFlags = DynWait (don't wait for SCSI devices upon bootup) - XPRAM[0x1310] = 0xa8; // Standard PRAM values - XPRAM[0x1311] = 0x00; - XPRAM[0x1312] = 0x00; - XPRAM[0x1313] = 0x22; - XPRAM[0x1314] = 0xcc; - XPRAM[0x1315] = 0x0a; - XPRAM[0x1316] = 0xcc; - XPRAM[0x1317] = 0x0a; - XPRAM[0x131c] = 0x00; - XPRAM[0x131d] = 0x02; - XPRAM[0x131e] = 0x63; - XPRAM[0x131f] = 0x00; - XPRAM[0x1308] = 0x13; - XPRAM[0x1309] = 0x88; - XPRAM[0x130a] = 0x00; - XPRAM[0x130b] = 0xcc; - XPRAM[0x1376] = 0x00; // OSDefault = MacOS - XPRAM[0x1377] = 0x01; - XPRAM[0x138a] = 0x25; // Use PPC memory manager ("Modern Memory Manager") - } - - // Set boot volume - int16 i16 = PrefsFindInt32("bootdrive"); - XPRAM[0x1378] = i16 >> 8; - XPRAM[0x1379] = i16 & 0xff; - i16 = PrefsFindInt32("bootdriver"); - XPRAM[0x137a] = i16 >> 8; - XPRAM[0x137b] = i16 & 0xff; - - // Create BootGlobs at top of Mac memory - memset(RAMBaseHost + RAMSize - 4096, 0, 4096); - BootGlobsAddr = RAMBase + RAMSize - 0x1c; - WriteMacInt32(BootGlobsAddr - 5 * 4, RAMBase + RAMSize); // MemTop - WriteMacInt32(BootGlobsAddr + 0 * 4, RAMBase); // First RAM bank - WriteMacInt32(BootGlobsAddr + 1 * 4, RAMSize); - WriteMacInt32(BootGlobsAddr + 2 * 4, (uint32)-1); // End of bank table - - // Init thunks - if (!ThunksInit()) - return false; - - // Init drivers - SonyInit(); - DiskInit(); - CDROMInit(); - SCSIInit(); - - // Init external file system - ExtFSInit(); - - // Init ADB - ADBInit(); - - // Init audio - AudioInit(); - - // Init network - EtherInit(); - - // Init serial ports - SerialInit(); - - // Init Time Manager - TimerInit(); - - // Init clipboard - ClipInit(); - - // Init video - if (!VideoInit()) - return false; - - // Install ROM patches - if (!PatchROM()) { - ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR)); - return false; - } - - // Initialize Kernel Data - KernelData *kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE); - memset(kernel_data, 0, sizeof(KernelData)); - if (ROMType == ROMTYPE_NEWWORLD) { - uint32 of_dev_tree = SheepMem::Reserve(4 * sizeof(uint32)); - Mac_memset(of_dev_tree, 0, 4 * sizeof(uint32)); - uint32 vector_lookup_tbl = SheepMem::Reserve(128); - uint32 vector_mask_tbl = SheepMem::Reserve(64); - memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80); - Mac_memset(vector_lookup_tbl, 0, 128); - Mac_memset(vector_mask_tbl, 0, 64); - kernel_data->v[0xb80 >> 2] = htonl(ROMBase); - kernel_data->v[0xb84 >> 2] = htonl(of_dev_tree); // OF device tree base - kernel_data->v[0xb90 >> 2] = htonl(vector_lookup_tbl); - kernel_data->v[0xb94 >> 2] = htonl(vector_mask_tbl); - kernel_data->v[0xb98 >> 2] = htonl(ROMBase); // OpenPIC base - kernel_data->v[0xbb0 >> 2] = htonl(0); // ADB base - kernel_data->v[0xc20 >> 2] = htonl(RAMSize); - kernel_data->v[0xc24 >> 2] = htonl(RAMSize); - kernel_data->v[0xc30 >> 2] = htonl(RAMSize); - kernel_data->v[0xc34 >> 2] = htonl(RAMSize); - kernel_data->v[0xc38 >> 2] = htonl(0x00010020); - kernel_data->v[0xc3c >> 2] = htonl(0x00200001); - kernel_data->v[0xc40 >> 2] = htonl(0x00010000); - kernel_data->v[0xc50 >> 2] = htonl(RAMBase); - kernel_data->v[0xc54 >> 2] = htonl(RAMSize); - kernel_data->v[0xf60 >> 2] = htonl(PVR); - kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf6c >> 2] = htonl(TimebaseSpeed); // timebase-frequency - } else if (ROMType == ROMTYPE_GOSSAMER) { - kernel_data->v[0xc80 >> 2] = htonl(RAMSize); - kernel_data->v[0xc84 >> 2] = htonl(RAMSize); - kernel_data->v[0xc90 >> 2] = htonl(RAMSize); - kernel_data->v[0xc94 >> 2] = htonl(RAMSize); - kernel_data->v[0xc98 >> 2] = htonl(0x00010020); - kernel_data->v[0xc9c >> 2] = htonl(0x00200001); - kernel_data->v[0xca0 >> 2] = htonl(0x00010000); - kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); - kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); - kernel_data->v[0xf60 >> 2] = htonl(PVR); - kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf6c >> 2] = htonl(TimebaseSpeed); // timebase-frequency - } else { - kernel_data->v[0xc80 >> 2] = htonl(RAMSize); - kernel_data->v[0xc84 >> 2] = htonl(RAMSize); - kernel_data->v[0xc90 >> 2] = htonl(RAMSize); - kernel_data->v[0xc94 >> 2] = htonl(RAMSize); - kernel_data->v[0xc98 >> 2] = htonl(0x00010020); - kernel_data->v[0xc9c >> 2] = htonl(0x00200001); - kernel_data->v[0xca0 >> 2] = htonl(0x00010000); - kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); - kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); - kernel_data->v[0xf80 >> 2] = htonl(PVR); - kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed); // clock-frequency - kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed); // bus-frequency - kernel_data->v[0xf8c >> 2] = htonl(TimebaseSpeed); // timebase-frequency - } - - // Initialize extra low memory - D(bug("Initializing Low Memory...\n")); - Mac_memset(0, 0, 0x3000); - WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h')); // Signature to detect SheepShaver - WriteMacInt32(XLM_KERNEL_DATA, KernelDataAddr); // For trap replacement routines - WriteMacInt32(XLM_PVR, PVR); // Theoretical PVR - WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed); // For DriverServicesLib patch - WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN); // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode) - WriteMacInt32(XLM_ZERO_PAGE, SheepMem::ZeroPage()); // Pointer to read-only page with all bits set to 0 -#if !EMULATED_PPC -#ifdef SYSTEM_CLOBBERS_R2 - WriteMacInt32(XLM_TOC, (uint32)TOC); // TOC pointer of emulator -#endif -#ifdef SYSTEM_CLOBBERS_R13 - WriteMacInt32(XLM_R13, (uint32)R13); // TLS register -#endif -#endif - - WriteMacInt32(XLM_ETHER_AO_GET_HWADDR, NativeFunction(NATIVE_ETHER_AO_GET_HWADDR)); // Low level ethernet driver functions - WriteMacInt32(XLM_ETHER_AO_ADD_MULTI, NativeFunction(NATIVE_ETHER_AO_ADD_MULTI)); - WriteMacInt32(XLM_ETHER_AO_DEL_MULTI, NativeFunction(NATIVE_ETHER_AO_DEL_MULTI)); - WriteMacInt32(XLM_ETHER_AO_SEND_PACKET, NativeFunction(NATIVE_ETHER_AO_SEND_PACKET)); - - WriteMacInt32(XLM_ETHER_INIT, NativeFunction(NATIVE_ETHER_INIT)); // DLPI ethernet driver functions - WriteMacInt32(XLM_ETHER_TERM, NativeFunction(NATIVE_ETHER_TERM)); - WriteMacInt32(XLM_ETHER_OPEN, NativeFunction(NATIVE_ETHER_OPEN)); - WriteMacInt32(XLM_ETHER_CLOSE, NativeFunction(NATIVE_ETHER_CLOSE)); - WriteMacInt32(XLM_ETHER_WPUT, NativeFunction(NATIVE_ETHER_WPUT)); - WriteMacInt32(XLM_ETHER_RSRV, NativeFunction(NATIVE_ETHER_RSRV)); - WriteMacInt32(XLM_VIDEO_DOIO, NativeFunction(NATIVE_VIDEO_DO_DRIVER_IO)); - D(bug("Low Memory initialized\n")); - -#if ENABLE_MON - // Initialize mon - mon_init(); - mon_read_byte = sheepshaver_read_byte; - mon_write_byte = sheepshaver_write_byte; -#endif - - return true; -} - - -/* - * Deinitialize everything - */ - -void ExitAll(void) -{ -#if ENABLE_MON - // Deinitialize mon - mon_exit(); -#endif - - // Save NVRAM - XPRAMExit(); - - // Exit clipboard - ClipExit(); - - // Exit Time Manager - TimerExit(); - - // Exit serial - SerialExit(); - - // Exit network - EtherExit(); - - // Exit audio - AudioExit(); - - // Exit ADB - ADBExit(); - - // Exit video - VideoExit(); - - // Exit external file system - ExtFSExit(); - - // Exit drivers - SCSIExit(); - CDROMExit(); - DiskExit(); - SonyExit(); - - // Delete thunks - ThunksExit(); -} - - -/* - * Patch things after system startup (gets called by disk driver accRun routine) - */ - -void PatchAfterStartup(void) -{ - ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL); - InstallExtFS(); -} diff --git a/SheepShaver/src/name_registry.cpp b/SheepShaver/src/name_registry.cpp deleted file mode 100644 index 89819d6d4..000000000 --- a/SheepShaver/src/name_registry.cpp +++ /dev/null @@ -1,368 +0,0 @@ -/* - * name_registry.cpp - Name Registry handling - * - * SheepShaver (C) Christian Bauer and Marc Hellwig - * - * 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 - -#include "sysdeps.h" -#include "name_registry.h" -#include "main.h" -#include "macos_util.h" -#include "user_strings.h" -#include "emul_op.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// Function pointers -typedef int16 (*rcec_ptr)(const RegEntryID *, const char *, RegEntryID *); -static uint32 rcec_tvect = 0; -static inline int16 RegistryCStrEntryCreate(uintptr arg1, const char *arg2, uint32 arg3) -{ - SheepString arg2str(arg2); - return (int16)CallMacOS3(rcec_ptr, rcec_tvect, (const RegEntryID *)arg1, arg2str.addr(), arg3); -} -typedef int16 (*rpc_ptr)(const RegEntryID *, const char *, const void *, uint32); -static uint32 rpc_tvect = 0; -static inline int16 RegistryPropertyCreate(uintptr arg1, const char *arg2, uintptr arg3, uint32 arg4) -{ - SheepString arg2str(arg2); - return (int16)CallMacOS4(rpc_ptr, rpc_tvect, (const RegEntryID *)arg1, arg2str.addr(), (const void *)arg3, arg4); -} -static inline int16 RegistryPropertyCreateStr(uintptr arg1, const char *arg2, const char *arg3) -{ - SheepString arg3str(arg3); - return RegistryPropertyCreate(arg1, arg2, arg3str.addr(), strlen(arg3) + 1); -} - -// Video driver stub -static const uint8 video_driver[] = { -#include "VideoDriverStub.i" -}; - -// Ethernet driver stub -static const uint8 ethernet_driver[] = { -#ifdef USE_ETHER_FULL_DRIVER -#include "EthernetDriverFull.i" -#else -#include "EthernetDriverStub.i" -#endif -}; - -// Helper for RegEntryID -typedef SheepArray SheepRegEntryID; - -// Helper for a pair -struct SheepPair : public SheepArray<8> { - SheepPair(uint32 base, uint32 size) : SheepArray<8>() - { WriteMacInt32(addr(), base); WriteMacInt32(addr() + 4, size); } -}; - - -/* - * Patch Name Registry during startup - */ - -void DoPatchNameRegistry(void) -{ - SheepVar32 u32; - D(bug("Patching Name Registry...")); - - // Create "device-tree" - SheepRegEntryID device_tree; - if (!RegistryCStrEntryCreate(0, "Devices:device-tree", device_tree.addr())) { - u32.set_value(BusClockSpeed); - RegistryPropertyCreate(device_tree.addr(), "clock-frequency", u32.addr(), 4); - RegistryPropertyCreateStr(device_tree.addr(), "model", "Power Macintosh"); - - // Create "AAPL,ROM" - SheepRegEntryID aapl_rom; - if (!RegistryCStrEntryCreate(device_tree.addr(), "AAPL,ROM", aapl_rom.addr())) { - RegistryPropertyCreateStr(aapl_rom.addr(), "device_type", "rom"); - SheepPair reg(ROMBase, ROM_SIZE); - RegistryPropertyCreate(aapl_rom.addr(), "reg", reg.addr(), 8); - } - - // Create "PowerPC,60x" - SheepRegEntryID power_pc; - const char *str; - switch (PVR >> 16) { - case 1: // 601 - str = "PowerPC,601"; - break; - case 3: // 603 - str = "PowerPC,603"; - break; - case 4: // 604 - str = "PowerPC,604"; - break; - case 6: // 603e - str = "PowerPC,603e"; - break; - case 7: // 603ev - str = "PowerPC,603ev"; - break; - case 8: // 750 - str = "PowerPC,750"; - break; - case 9: // 604e - str = "PowerPC,604e"; - break; - case 10: // 604ev5 - str = "PowerPC,604ev"; - break; - case 50: // 821 - str = "PowerPC,821"; - break; - case 80: // 860 - str = "PowerPC,860"; - break; - case 12: // 7400, 7410, 7450, 7455, 7457 - case 0x800c: - case 0x8000: - case 0x8001: - case 0x8002: - str = "PowerPC,G4"; - break; - default: - str = "PowerPC,???"; - break; - } - if (!RegistryCStrEntryCreate(device_tree.addr(), str, power_pc.addr())) { - u32.set_value(CPUClockSpeed); - RegistryPropertyCreate(power_pc.addr(), "clock-frequency", u32.addr(), 4); - u32.set_value(BusClockSpeed); - RegistryPropertyCreate(power_pc.addr(), "bus-frequency", u32.addr(), 4); - u32.set_value(TimebaseSpeed); - RegistryPropertyCreate(power_pc.addr(), "timebase-frequency", u32.addr(), 4); - u32.set_value(PVR); - RegistryPropertyCreate(power_pc.addr(), "cpu-version", u32.addr(), 4); - RegistryPropertyCreateStr(power_pc.addr(), "device_type", "cpu"); - switch (PVR >> 16) { - case 1: // 601 - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 3: // 603 - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x2000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x2000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 4: // 604 - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x4000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x4000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 6: // 603e - case 7: // 603ev - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x4000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x4000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 8: // 750, 750FX - case 0x7000: - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 9: // 604e - case 10: // 604ev5 - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 12: // 7400, 7410, 7450, 7455, 7457 - case 0x800c: - case 0x8000: - case 0x8001: - case 0x8002: - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(64); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - case 0x39: // 970 - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-block-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "d-cache-sets", u32.addr(), 4); - u32.set_value(0x8000); - RegistryPropertyCreate(power_pc.addr(), "d-cache-size", u32.addr(), 4); - u32.set_value(128); - RegistryPropertyCreate(power_pc.addr(), "i-cache-block-size", u32.addr(), 4); - u32.set_value(512); - RegistryPropertyCreate(power_pc.addr(), "i-cache-sets", u32.addr(), 4); - u32.set_value(0x10000); - RegistryPropertyCreate(power_pc.addr(), "i-cache-size", u32.addr(), 4); - u32.set_value(256); - RegistryPropertyCreate(power_pc.addr(), "tlb-sets", u32.addr(), 4); - u32.set_value(0x1000); - RegistryPropertyCreate(power_pc.addr(), "tlb-size", u32.addr(), 4); - break; - default: - break; - } - u32.set_value(32); - RegistryPropertyCreate(power_pc.addr(), "reservation-granularity", u32.addr(), 4); - SheepPair reg(0, 0); - RegistryPropertyCreate(power_pc.addr(), "reg", reg.addr(), 8); - } - - // Create "memory" - SheepRegEntryID memory; - if (!RegistryCStrEntryCreate(device_tree.addr(), "memory", memory.addr())) { - SheepPair reg(RAMBase, RAMSize); - RegistryPropertyCreateStr(memory.addr(), "device_type", "memory"); - RegistryPropertyCreate(memory.addr(), "reg", reg.addr(), 8); - } - - // Create "video" - SheepRegEntryID video; - if (!RegistryCStrEntryCreate(device_tree.addr(), "video", video.addr())) { - RegistryPropertyCreateStr(video.addr(), "AAPL,connector", "monitor"); - RegistryPropertyCreateStr(video.addr(), "device_type", "display"); - SheepArray the_video_driver; - Host2Mac_memcpy(the_video_driver.addr(), video_driver, sizeof(video_driver)); - RegistryPropertyCreate(video.addr(), "driver,AAPL,MacOS,PowerPC", the_video_driver.addr(), sizeof(video_driver)); - RegistryPropertyCreateStr(video.addr(), "model", "SheepShaver Video"); - } - - // Create "ethernet" - SheepRegEntryID ethernet; - if (!RegistryCStrEntryCreate(device_tree.addr(), "ethernet", ethernet.addr())) { - RegistryPropertyCreateStr(ethernet.addr(), "AAPL,connector", "ethernet"); - RegistryPropertyCreateStr(ethernet.addr(), "device_type", "network"); - SheepArray the_ethernet_driver; - Host2Mac_memcpy(the_ethernet_driver.addr(), ethernet_driver, sizeof(ethernet_driver)); - RegistryPropertyCreate(ethernet.addr(), "driver,AAPL,MacOS,PowerPC", the_ethernet_driver.addr(), sizeof(ethernet_driver)); - // local-mac-address - // max-frame-size 2048 - } - } - D(bug("done.\n")); -} - -void PatchNameRegistry(void) -{ - // Find RegistryCStrEntryCreate() and RegistryPropertyCreate() TVECTs - rcec_tvect = FindLibSymbol("\017NameRegistryLib", "\027RegistryCStrEntryCreate"); - D(bug("RegistryCStrEntryCreate TVECT at %08x\n", rcec_tvect)); - rpc_tvect = FindLibSymbol("\017NameRegistryLib", "\026RegistryPropertyCreate"); - D(bug("RegistryPropertyCreate TVECT at %08x\n", rpc_tvect)); - if (rcec_tvect == 0 || rpc_tvect == 0) { - ErrorAlert(GetString(STR_NO_NAME_REGISTRY_ERR)); - QuitEmulator(); - } - - // Main routine must be executed in PPC mode - ExecuteNative(NATIVE_PATCH_NAME_REGISTRY); -} diff --git a/SheepShaver/src/pict.c b/SheepShaver/src/pict.c deleted file mode 120000 index bcbd7ff4f..000000000 --- a/SheepShaver/src/pict.c +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/pict.c \ No newline at end of file diff --git a/SheepShaver/src/prefs.cpp b/SheepShaver/src/prefs.cpp deleted file mode 120000 index 6559f3b13..000000000 --- a/SheepShaver/src/prefs.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/prefs.cpp \ No newline at end of file diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp deleted file mode 100644 index 1d4758dc9..000000000 --- a/SheepShaver/src/prefs_items.cpp +++ /dev/null @@ -1,95 +0,0 @@ -/* - * prefs_items.cpp - Common preferences items - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" - -#include "sys.h" -#include "prefs.h" - - -// Common preferences items (those which exist on all platforms) -prefs_desc common_prefs_items[] = { - {"disk", TYPE_STRING, true, "device/file name of Mac volume"}, - {"floppy", TYPE_STRING, true, "device/file name of Mac floppy drive"}, - {"cdrom", TYPE_STRING, true, "device/file names of Mac CD-ROM drive"}, - {"extfs", TYPE_STRING, false, "root path of ExtFS"}, - {"scsi0", TYPE_STRING, false, "SCSI target for Mac SCSI ID 0"}, - {"scsi1", TYPE_STRING, false, "SCSI target for Mac SCSI ID 1"}, - {"scsi2", TYPE_STRING, false, "SCSI target for Mac SCSI ID 2"}, - {"scsi3", TYPE_STRING, false, "SCSI target for Mac SCSI ID 3"}, - {"scsi4", TYPE_STRING, false, "SCSI target for Mac SCSI ID 4"}, - {"scsi5", TYPE_STRING, false, "SCSI target for Mac SCSI ID 5"}, - {"scsi6", TYPE_STRING, false, "SCSI target for Mac SCSI ID 6"}, - {"screen", TYPE_STRING, false, "video mode"}, - {"windowmodes", TYPE_INT32, false, "bitmap of allowed window video modes"}, - {"screenmodes", TYPE_INT32, false, "bitmap of allowed fullscreen video modes"}, - {"seriala", TYPE_STRING, false, "device name of Mac serial port A"}, - {"serialb", TYPE_STRING, false, "device name of Mac serial port B"}, - {"rom", TYPE_STRING, false, "path of ROM file"}, - {"bootdrive", TYPE_INT32, false, "boot drive number"}, - {"bootdriver", TYPE_INT32, false, "boot driver number"}, - {"ramsize", TYPE_INT32, false, "size of Mac RAM in bytes"}, - {"frameskip", TYPE_INT32, false, "number of frames to skip in refreshed video modes"}, - {"gfxaccel", TYPE_BOOLEAN, false, "turn on QuickDraw acceleration"}, - {"nocdrom", TYPE_BOOLEAN, false, "don't install CD-ROM driver"}, - {"nonet", TYPE_BOOLEAN, false, "don't use Ethernet"}, - {"nosound", TYPE_BOOLEAN, false, "don't enable sound output"}, - {"nogui", TYPE_BOOLEAN, false, "disable GUI"}, - {"noclipconversion", TYPE_BOOLEAN, false, "don't convert clipboard contents"}, - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, - {"ignoreillegal", TYPE_BOOLEAN, false, "ignore illegal instructions"}, - {"jit", TYPE_BOOLEAN, false, "enable JIT compiler"}, - {"jit68k", TYPE_BOOLEAN, false, "enable 68k DR emulator"}, - {"keyboardtype", TYPE_INT32, false, "hardware keyboard type"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - -/* - * Set default values for preferences items - */ - -void AddPrefsDefaults(void) -{ -#ifndef PREFS_EDITOR - SysAddSerialPrefs(); -#endif - PrefsAddInt32("bootdriver", 0); - PrefsAddInt32("bootdrive", 0); - PrefsAddInt32("ramsize", 16 * 1024 * 1024); - PrefsAddInt32("frameskip", 8); - PrefsAddBool("gfxaccel", true); - PrefsAddBool("nocdrom", false); - PrefsAddBool("nonet", false); - PrefsAddBool("nosound", false); - PrefsAddBool("nogui", false); - PrefsAddBool("noclipconversion", false); - PrefsAddBool("ignoresegv", false); - PrefsAddBool("ignoreillegal", false); - -#if USE_JIT - // JIT compiler specific options - PrefsAddBool("jit", true); -#else - PrefsAddBool("jit", false); -#endif - PrefsAddBool("jit68k", false); - - PrefsAddInt32("keyboardtype", 5); -} diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp deleted file mode 100644 index 9dcd826a9..000000000 --- a/SheepShaver/src/rom_patches.cpp +++ /dev/null @@ -1,2499 +0,0 @@ -/* - * rom_patches.cpp - ROM patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * TODO: - * IRQ_NEST must be handled atomically - * Don't use r1 in extra routines - */ - -#include - -#include "sysdeps.h" -#include "rom_patches.h" -#include "main.h" -#include "prefs.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "audio.h" -#include "audio_defs.h" -#include "serial.h" -#include "macos_util.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// 68k breakpoint address -//#define M68K_BREAK_POINT 0x29e0 // BootMe -//#define M68K_BREAK_POINT 0x2a1e // Boot block code returned -//#define M68K_BREAK_POINT 0x3150 // CritError -//#define M68K_BREAK_POINT 0x187ce // Unimplemented trap - -// PowerPC breakpoint address -//#define POWERPC_BREAK_POINT 0x36e6c0 // 68k emulator start - -#define DISABLE_SCSI 1 - - -// Other ROM addresses -const uint32 CHECK_LOAD_PATCH_SPACE = 0x2fcf00; -const uint32 ZERO_SCRAP_PATCH_SPACE = 0x2fcf80; -const uint32 PUT_SCRAP_PATCH_SPACE = 0x2fcfc0; -const uint32 GET_SCRAP_PATCH_SPACE = 0x2fd100; -const uint32 ADDR_MAP_PATCH_SPACE = 0x2fd140; - -// Global variables -int ROMType; // ROM type -static uint32 sony_offset; // Offset of .Sony driver resource - -// Prototypes -static bool patch_nanokernel_boot(void); -static bool patch_68k_emul(void); -static bool patch_nanokernel(void); -static bool patch_68k(void); - - -// Decode LZSS data -static void decode_lzss(const uint8 *src, uint8 *dest, int size) -{ - char dict[0x1000]; - int run_mask = 0, dict_idx = 0xfee; - for (;;) { - if (run_mask < 0x100) { - // Start new run - if (--size < 0) - break; - run_mask = *src++ | 0xff00; - } - bool bit = run_mask & 1; - run_mask >>= 1; - if (bit) { - // Verbatim copy - if (--size < 0) - break; - int c = *src++; - dict[dict_idx++] = c; - *dest++ = c; - dict_idx &= 0xfff; - } else { - // Copy from dictionary - if (--size < 0) - break; - int idx = *src++; - if (--size < 0) - break; - int cnt = *src++; - idx |= (cnt << 4) & 0xf00; - cnt = (cnt & 0x0f) + 3; - while (cnt--) { - char c = dict[idx++]; - dict[dict_idx++] = c; - *dest++ = c; - idx &= 0xfff; - dict_idx &= 0xfff; - } - } - } -} - -// Decode parcels of ROM image (MacOS 9.X and even earlier) -void decode_parcels(const uint8 *src, uint8 *dest, int size) -{ - uint32 parcel_offset = 0x14; - D(bug("Offset Type Name\n")); - while (parcel_offset != 0) { - const uint32 *parcel_data = (uint32 *)(src + parcel_offset); - uint32 next_offset = ntohl(parcel_data[0]); - uint32 parcel_type = ntohl(parcel_data[1]); - D(bug("%08x %c%c%c%c %s\n", parcel_offset, - (parcel_type >> 24) & 0xff, (parcel_type >> 16) & 0xff, - (parcel_type >> 8) & 0xff, parcel_type & 0xff, &parcel_data[6])); - if (parcel_type == FOURCC('r','o','m',' ')) { - uint32 lzss_offset = ntohl(parcel_data[2]); - uint32 lzss_size = ((uintptr)src + next_offset) - ((uintptr)parcel_data + lzss_offset); - decode_lzss((uint8 *)parcel_data + lzss_offset, dest, lzss_size); - } - parcel_offset = next_offset; - } -} - - -/* - * Decode ROM image, 4 MB plain images or NewWorld images - */ - -bool DecodeROM(uint8 *data, uint32 size) -{ - if (size == ROM_SIZE) { - // Plain ROM image - memcpy(ROMBaseHost, data, ROM_SIZE); - return true; - } - else if (strncmp((char *)data, "", 11) == 0) { - // CHRP compressed ROM image - uint32 image_offset, image_size; - bool decode_info_ok = false; - - char *s = strstr((char *)data, "constant lzss-offset"); - if (s != NULL) { - // Probably a plain LZSS compressed ROM image - if (sscanf(s - 7, "%06x", &image_offset) == 1) { - s = strstr((char *)data, "constant lzss-size"); - if (s != NULL && (sscanf(s - 7, "%06x", &image_size) == 1)) - decode_info_ok = true; - } - } - else { - // Probably a MacOS 9.2.x ROM image - s = strstr((char *)data, "constant parcels-offset"); - if (s != NULL) { - if (sscanf(s - 7, "%06x", &image_offset) == 1) { - s = strstr((char *)data, "constant parcels-size"); - if (s != NULL && (sscanf(s - 7, "%06x", &image_size) == 1)) - decode_info_ok = true; - } - } - } - - // No valid information to decode the ROM found? - if (!decode_info_ok) - return false; - - // Check signature, this could be a parcels-based ROM image - uint32 rom_signature = ntohl(*(uint32 *)(data + image_offset)); - if (rom_signature == FOURCC('p','r','c','l')) { - D(bug("Offset of parcels data: %08x\n", image_offset)); - D(bug("Size of parcels data: %08x\n", image_size)); - decode_parcels(data + image_offset, ROMBaseHost, image_size); - } - else { - D(bug("Offset of compressed data: %08x\n", image_offset)); - D(bug("Size of compressed data: %08x\n", image_size)); - decode_lzss(data + image_offset, ROMBaseHost, image_size); - } - return true; - } - return false; -} - - -/* - * Search ROM for byte string, return ROM offset (or 0) - */ - -static uint32 find_rom_data(uint32 start, uint32 end, const uint8 *data, uint32 data_len) -{ - uint32 ofs = start; - while (ofs < end) { - if (!memcmp(ROMBaseHost + ofs, data, data_len)) - return ofs; - ofs++; - } - return 0; -} - - -/* - * Search ROM resource by type/ID, return ROM offset of resource data - */ - -static uint32 rsrc_ptr = 0; - -// id = 4711 means "find any ID" -static uint32 find_rom_resource(uint32 s_type, int16 s_id = 4711, bool cont = false) -{ - uint32 lp = ROMBase + 0x1a; - uint32 x = ReadMacInt32(lp); - uint32 header_size = ReadMacInt8(ROMBase + x + 5); - - if (!cont) - rsrc_ptr = x; - else if (rsrc_ptr == 0) - return 0; - - for (;;) { - lp = ROMBase + rsrc_ptr; - rsrc_ptr = ReadMacInt32(lp); - if (rsrc_ptr == 0) - break; - - rsrc_ptr += header_size; - - lp = ROMBase + rsrc_ptr + 4; - uint32 data = ReadMacInt32(lp); - uint32 type = ReadMacInt32(lp + 4); - int16 id = ReadMacInt16(lp + 8); - if (type == s_type && (id == s_id || s_id == 4711)) - return data; - } - return 0; -} - - -/* - * Search offset of A-Trap routine in ROM - */ - -static uint32 find_rom_trap(uint16 trap) -{ - uint32 lp = ROMBase + ReadMacInt32(ROMBase + 0x22); - - if (trap > 0xa800) - return ReadMacInt32(lp + 4 * (trap & 0x3ff)); - else - return ReadMacInt32(lp + 4 * ((trap & 0xff) + 0x400)); -} - - -/* - * Return target of branch instruction specified at ADDR, or 0 if - * there is no such instruction - */ - -static uint32 rom_powerpc_branch_target(uint32 addr) -{ - uint32 opcode = ntohl(*(uint32 *)(ROMBaseHost + addr)); - uint32 primop = opcode >> 26; - uint32 target = 0; - - if (primop == 18) { // Branch - target = opcode & 0x3fffffc; - if (target & 0x2000000) - target |= 0xfc000000; - if ((opcode & 2) == 0) - target += addr; - } - else if (primop == 16) { // Branch Conditional - target = (int32)(int16)(opcode & 0xfffc); - if ((opcode & 2) == 0) - target += addr; - } - return target; -} - - -/* - * Search ROM for instruction branching to target address, return 0 if none found - */ - -static uint32 find_rom_powerpc_branch(uint32 start, uint32 end, uint32 target) -{ - for (uint32 addr = start; addr < end; addr += 4) { - if (rom_powerpc_branch_target(addr) == target) - return addr; - } - return 0; -} - - -/* - * Check that requested ROM patch space is really available - */ - -static bool check_rom_patch_space(uint32 base, uint32 size) -{ - size = (size + 3) & -4; - for (int i = 0; i < size; i += 4) { - uint32 x = ntohl(*(uint32 *)(ROMBaseHost + base + i)); - if (x != 0x6b636b63 && x != 0) - return false; - } - return true; -} - - -/* - * List of audio sifters installed in ROM and System file - */ - -struct sift_entry { - uint32 type; - int16 id; -}; -static sift_entry sifter_list[32]; -static int num_sifters; - -void AddSifter(uint32 type, int16 id) -{ - if (FindSifter(type, id)) - return; - D(bug(" adding sifter type %c%c%c%c (%08x), id %d\n", type >> 24, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff, type, id)); - sifter_list[num_sifters].type = type; - sifter_list[num_sifters].id = id; - num_sifters++; -} - -bool FindSifter(uint32 type, int16 id) -{ - for (int i=0; i> 8, SonyDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, - 0x00, 0x18, // Open() offset - 0x00, 0x1c, // Prime() offset - 0x00, 0x20, // Control() offset - 0x00, 0x2c, // Status() offset - 0x00, 0x52, // Close() offset - 0x05, 0x2e, 0x53, 0x6f, 0x6e, 0x79, // ".Sony" - - // Open() - M68K_EMUL_OP_SONY_OPEN >> 8, M68K_EMUL_OP_SONY_OPEN & 0xff, - 0x4e, 0x75, // rts - - // Prime() - M68K_EMUL_OP_SONY_PRIME >> 8, M68K_EMUL_OP_SONY_PRIME & 0xff, - 0x60, 0x0e, // bra IOReturn - - // Control() - M68K_EMUL_OP_SONY_CONTROL >> 8, M68K_EMUL_OP_SONY_CONTROL & 0xff, - 0x0c, 0x68, 0x00, 0x01, 0x00, 0x1a, // cmp.w #1,$1a(a0) - 0x66, 0x04, // bne IOReturn - 0x4e, 0x75, // rts - - // Status() - M68K_EMUL_OP_SONY_STATUS >> 8, M68K_EMUL_OP_SONY_STATUS & 0xff, - - // IOReturn - 0x32, 0x28, 0x00, 0x06, // move.w 6(a0),d1 - 0x08, 0x01, 0x00, 0x09, // btst #9,d1 - 0x67, 0x0c, // beq 1 - 0x4a, 0x40, // tst.w d0 - 0x6f, 0x02, // ble 2 - 0x42, 0x40, // clr.w d0 - 0x31, 0x40, 0x00, 0x10, //2 move.w d0,$10(a0) - 0x4e, 0x75, // rts - 0x4a, 0x40, //1 tst.w d0 - 0x6f, 0x04, // ble 3 - 0x42, 0x40, // clr.w d0 - 0x4e, 0x75, // rts - 0x2f, 0x38, 0x08, 0xfc, //3 move.l $8fc,-(sp) - 0x4e, 0x75, // rts - - // Close() - 0x70, 0xe8, // moveq #-24,d0 - 0x4e, 0x75 // rts -}; - -static const uint8 disk_driver[] = { // Generic disk driver - // Driver header - DiskDriverFlags >> 8, DiskDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, - 0x00, 0x18, // Open() offset - 0x00, 0x1c, // Prime() offset - 0x00, 0x20, // Control() offset - 0x00, 0x2c, // Status() offset - 0x00, 0x52, // Close() offset - 0x05, 0x2e, 0x44, 0x69, 0x73, 0x6b, // ".Disk" - - // Open() - M68K_EMUL_OP_DISK_OPEN >> 8, M68K_EMUL_OP_DISK_OPEN & 0xff, - 0x4e, 0x75, // rts - - // Prime() - M68K_EMUL_OP_DISK_PRIME >> 8, M68K_EMUL_OP_DISK_PRIME & 0xff, - 0x60, 0x0e, // bra IOReturn - - // Control() - M68K_EMUL_OP_DISK_CONTROL >> 8, M68K_EMUL_OP_DISK_CONTROL & 0xff, - 0x0c, 0x68, 0x00, 0x01, 0x00, 0x1a, // cmp.w #1,$1a(a0) - 0x66, 0x04, // bne IOReturn - 0x4e, 0x75, // rts - - // Status() - M68K_EMUL_OP_DISK_STATUS >> 8, M68K_EMUL_OP_DISK_STATUS & 0xff, - - // IOReturn - 0x32, 0x28, 0x00, 0x06, // move.w 6(a0),d1 - 0x08, 0x01, 0x00, 0x09, // btst #9,d1 - 0x67, 0x0c, // beq 1 - 0x4a, 0x40, // tst.w d0 - 0x6f, 0x02, // ble 2 - 0x42, 0x40, // clr.w d0 - 0x31, 0x40, 0x00, 0x10, //2 move.w d0,$10(a0) - 0x4e, 0x75, // rts - 0x4a, 0x40, //1 tst.w d0 - 0x6f, 0x04, // ble 3 - 0x42, 0x40, // clr.w d0 - 0x4e, 0x75, // rts - 0x2f, 0x38, 0x08, 0xfc, //3 move.l $8fc,-(sp) - 0x4e, 0x75, // rts - - // Close() - 0x70, 0xe8, // moveq #-24,d0 - 0x4e, 0x75 // rts -}; - -static const uint8 cdrom_driver[] = { // CD-ROM driver - // Driver header - CDROMDriverFlags >> 8, CDROMDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, - 0x00, 0x1c, // Open() offset - 0x00, 0x20, // Prime() offset - 0x00, 0x24, // Control() offset - 0x00, 0x30, // Status() offset - 0x00, 0x56, // Close() offset - 0x08, 0x2e, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x43, 0x44, 0x00, // ".AppleCD" - - // Open() - M68K_EMUL_OP_CDROM_OPEN >> 8, M68K_EMUL_OP_CDROM_OPEN & 0xff, - 0x4e, 0x75, // rts - - // Prime() - M68K_EMUL_OP_CDROM_PRIME >> 8, M68K_EMUL_OP_CDROM_PRIME & 0xff, - 0x60, 0x0e, // bra IOReturn - - // Control() - M68K_EMUL_OP_CDROM_CONTROL >> 8, M68K_EMUL_OP_CDROM_CONTROL & 0xff, - 0x0c, 0x68, 0x00, 0x01, 0x00, 0x1a, // cmp.w #1,$1a(a0) - 0x66, 0x04, // bne IOReturn - 0x4e, 0x75, // rts - - // Status() - M68K_EMUL_OP_CDROM_STATUS >> 8, M68K_EMUL_OP_CDROM_STATUS & 0xff, - - // IOReturn - 0x32, 0x28, 0x00, 0x06, // move.w 6(a0),d1 - 0x08, 0x01, 0x00, 0x09, // btst #9,d1 - 0x67, 0x0c, // beq 1 - 0x4a, 0x40, // tst.w d0 - 0x6f, 0x02, // ble 2 - 0x42, 0x40, // clr.w d0 - 0x31, 0x40, 0x00, 0x10, //2 move.w d0,$10(a0) - 0x4e, 0x75, // rts - 0x4a, 0x40, //1 tst.w d0 - 0x6f, 0x04, // ble 3 - 0x42, 0x40, // clr.w d0 - 0x4e, 0x75, // rts - 0x2f, 0x38, 0x08, 0xfc, //3 move.l $8fc,-(sp) - 0x4e, 0x75, // rts - - // Close() - 0x70, 0xe8, // moveq #-24,d0 - 0x4e, 0x75 // rts -}; - -static uint32 long_ptr; - -static void SetLongBase(uint32 addr) -{ - long_ptr = addr; -} - -static void Long(uint32 value) -{ - WriteMacInt32(long_ptr, value); - long_ptr += 4; -} - -static void gen_ain_driver(uintptr addr) -{ - SetLongBase(addr); - - // .AIn driver header - Long(0x4d000000); Long(0x00000000); - Long(0x00200040); Long(0x00600080); - Long(0x00a0042e); Long(0x41496e00); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_NOTHING)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_PRIME_IN)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CONTROL)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_STATUS)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_NOTHING)); - Long(0x00000000); Long(0x00000000); -}; - -static void gen_aout_driver(uintptr addr) -{ - SetLongBase(addr); - - // .AOut driver header - Long(0x4d000000); Long(0x00000000); - Long(0x00200040); Long(0x00600080); - Long(0x00a0052e); Long(0x414f7574); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_OPEN)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_PRIME_OUT)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CONTROL)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_STATUS)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CLOSE)); - Long(0x00000000); Long(0x00000000); -}; - -static void gen_bin_driver(uintptr addr) -{ - SetLongBase(addr); - - // .BIn driver header - Long(0x4d000000); Long(0x00000000); - Long(0x00200040); Long(0x00600080); - Long(0x00a0042e); Long(0x42496e00); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_NOTHING)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_PRIME_IN)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CONTROL)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_STATUS)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_NOTHING)); - Long(0x00000000); Long(0x00000000); -}; - -static void gen_bout_driver(uintptr addr) -{ - SetLongBase(addr); - - // .BOut driver header - Long(0x4d000000); Long(0x00000000); - Long(0x00200040); Long(0x00600080); - Long(0x00a0052e); Long(0x424f7574); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_OPEN)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_PRIME_OUT)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CONTROL)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_STATUS)); - Long(0x00000000); Long(0x00000000); - Long(0xaafe0700); Long(0x00000000); - Long(0x00000000); Long(0x00179822); - Long(0x00010004); Long(NativeTVECT(NATIVE_SERIAL_CLOSE)); - Long(0x00000000); Long(0x00000000); -}; - -static const uint8 adbop_patch[] = { // Call ADBOp() completion procedure - // The completion procedure may call ADBOp() again! - 0x40, 0xe7, // move sr,-(sp) - 0x00, 0x7c, 0x07, 0x00, // ori #$0700,sr - M68K_EMUL_OP_ADBOP >> 8, M68K_EMUL_OP_ADBOP & 0xff, - 0x48, 0xe7, 0x70, 0xf0, // movem.l d1-d3/a0-a3,-(sp) - 0x26, 0x48, // move.l a0,a3 - 0x4a, 0xab, 0x00, 0x04, // tst.l 4(a3) - 0x67, 0x00, 0x00, 0x18, // beq 1 - 0x20, 0x53, // move.l (a3),a0 - 0x22, 0x6b, 0x00, 0x04, // move.l 4(a3),a1 - 0x24, 0x6b, 0x00, 0x08, // move.l 8(a3),a2 - 0x26, 0x78, 0x0c, 0xf8, // move.l $cf8,a3 - 0x4e, 0x91, // jsr (a1) - 0x70, 0x00, // moveq #0,d0 - 0x60, 0x00, 0x00, 0x04, // bra 2 - 0x70, 0xff, //1 moveq #-1,d0 - 0x4c, 0xdf, 0x0f, 0x0e, //2 movem.l (sp)+,d1-d3/a0-a3 - 0x46, 0xdf, // move (sp)+,sr - 0x4e, 0x75 // rts -}; - - -/* - * Copy PowerPC code to ROM image and reverse bytes if necessary - */ - -static inline void memcpy_powerpc_code(void *dst, const void *src, size_t len) -{ -#ifdef WORDS_BIGENDIAN - (void)memcpy(dst, src, len); -#else - uint32 *d = (uint32 *)dst; - uint32 *s = (uint32 *)src; - for (int i = 0; i < len/4; i++) - d[i] = htonl(s[i]); -#endif -} - - -/* - * Install ROM patches (RAMBase and KernelDataAddr must be set) - */ - -bool PatchROM(void) -{ - // Print ROM info - D(bug("Checksum: %08lx\n", ntohl(*(uint32 *)ROMBaseHost))); - D(bug("Version: %04x\n", ntohs(*(uint16 *)(ROMBaseHost + 8)))); - D(bug("Sub Version: %04x\n", ntohs(*(uint16 *)(ROMBaseHost + 18)))); - D(bug("Nanokernel ID: %s\n", (char *)ROMBaseHost + 0x30d064)); - D(bug("Resource Map at %08lx\n", ntohl(*(uint32 *)(ROMBaseHost + 26)))); - D(bug("Trap Tables at %08lx\n\n", ntohl(*(uint32 *)(ROMBaseHost + 34)))); - - // Detect ROM type - if (!memcmp(ROMBaseHost + 0x30d064, "Boot TNT", 8)) - ROMType = ROMTYPE_TNT; - else if (!memcmp(ROMBaseHost + 0x30d064, "Boot Alchemy", 12)) - ROMType = ROMTYPE_ALCHEMY; - else if (!memcmp(ROMBaseHost + 0x30d064, "Boot Zanzibar", 13)) - ROMType = ROMTYPE_ZANZIBAR; - else if (!memcmp(ROMBaseHost + 0x30d064, "Boot Gazelle", 12)) - ROMType = ROMTYPE_GAZELLE; - else if (!memcmp(ROMBaseHost + 0x30d064, "Boot Gossamer", 13)) - ROMType = ROMTYPE_GOSSAMER; - else if (!memcmp(ROMBaseHost + 0x30d064, "NewWorld", 8)) - ROMType = ROMTYPE_NEWWORLD; - else - return false; - - // Check that other ROM addresses point to really free regions - if (!check_rom_patch_space(CHECK_LOAD_PATCH_SPACE, 0x40)) - return false; - if (!check_rom_patch_space(ZERO_SCRAP_PATCH_SPACE, 0x40)) - return false; - if (!check_rom_patch_space(PUT_SCRAP_PATCH_SPACE, 0x40)) - return false; - if (!check_rom_patch_space(GET_SCRAP_PATCH_SPACE, 0x40)) - return false; - if (!check_rom_patch_space(ADDR_MAP_PATCH_SPACE - 10 * 4, 0x100)) - return false; - - // Apply patches - if (!patch_nanokernel_boot()) return false; - if (!patch_68k_emul()) return false; - if (!patch_nanokernel()) return false; - if (!patch_68k()) return false; - -#ifdef M68K_BREAK_POINT - // Install 68k breakpoint - uint16 *wp = (uint16 *)(ROMBaseHost + M68K_BREAK_POINT); - *wp++ = htons(M68K_EMUL_BREAK); - *wp = htons(M68K_EMUL_RETURN); -#endif - -#ifdef POWERPC_BREAK_POINT - // Install PowerPC breakpoint - uint32 *lp = (uint32 *)(ROMBaseHost + POWERPC_BREAK_POINT); - *lp = htonl(0); -#endif - - // Copy 68k emulator to 2MB boundary - memcpy(ROMBaseHost + ROM_SIZE, ROMBaseHost + (ROM_SIZE - 0x100000), 0x100000); - return true; -} - - -/* - * Nanokernel boot routine patches - */ - -static bool patch_nanokernel_boot(void) -{ - uint32 *lp; - uint32 base, loc; - - // ROM boot structure patches - lp = (uint32 *)(ROMBaseHost + 0x30d000); - lp[0x9c >> 2] = htonl(KernelDataAddr); // LA_InfoRecord - lp[0xa0 >> 2] = htonl(KernelDataAddr); // LA_KernelData - lp[0xa4 >> 2] = htonl(KernelDataAddr + 0x1000); // LA_EmulatorData - lp[0xa8 >> 2] = htonl(ROMBase + 0x480000); // LA_DispatchTable - lp[0xac >> 2] = htonl(ROMBase + 0x460000); // LA_EmulatorCode - lp[0x360 >> 2] = htonl(0); // Physical RAM base (? on NewWorld ROM, this contains -1) - lp[0xfd8 >> 2] = htonl(ROMBase + 0x2a); // 68k reset vector - - // Skip SR/BAT/SDR init - loc = 0x310000; - if (ROMType == ROMTYPE_GAZELLE || ROMType == ROMTYPE_GOSSAMER || ROMType == ROMTYPE_NEWWORLD) { - lp = (uint32 *)(ROMBaseHost + loc); - *lp++ = htonl(POWERPC_NOP); - *lp = htonl(0x38000000); - } - static const uint8 sr_init_dat[] = {0x35, 0x4a, 0xff, 0xfc, 0x7d, 0x86, 0x50, 0x2e}; - if ((base = find_rom_data(0x3101b0, 0x3105b0, sr_init_dat, sizeof(sr_init_dat))) == 0) return false; - D(bug("sr_init %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + loc + 8); - *lp = htonl(0x48000000 | ((base - loc - 8) & 0x3fffffc)); // b ROMBase+0x3101b0 - lp = (uint32 *)(ROMBaseHost + base); - *lp++ = htonl(0x80200000 + XLM_KERNEL_DATA); // lwz r1,(pointer to Kernel Data) - *lp++ = htonl(0x3da0dead); // lis r13,0xdead (start of kernel memory) - *lp++ = htonl(0x3dc00010); // lis r14,0x0010 (size of page table) - *lp = htonl(0x3de00010); // lis r15,0x0010 (size of kernel memory) - - // Don't read PVR - static const uint8 pvr_read_dat[] = {0x7d, 0x9f, 0x42, 0xa6}; - if ((base = find_rom_data(0x3103b0, 0x3108b0, pvr_read_dat, sizeof(pvr_read_dat))) == 0) return false; - D(bug("pvr_read %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x81800000 + XLM_PVR); // lwz r12,(theoretical PVR) - - // Set CPU specific data (even if ROM doesn't have support for that CPU) - if (ntohl(lp[6]) != 0x2c0c0001) - return false; - uint32 ofs = ntohl(lp[7]) & 0xffff; - D(bug("ofs %08lx\n", ofs)); - lp[8] = htonl((ntohl(lp[8]) & 0xffff) | 0x48000000); // beq -> b - loc = (ntohl(lp[8]) & 0xffff) + (uintptr)(lp+8) - (uintptr)ROMBaseHost; - D(bug("loc %08lx\n", loc)); - lp = (uint32 *)(ROMBaseHost + ofs + 0x310000); - switch (PVR >> 16) { - case 1: // 601 - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00010040); // Unified caches/Inst cache line size - lp[5] = htonl(0x00400020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00080008); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x01000002); // TLB total size/TLB assoc - break; - case 3: // 603 - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x2000); // Data cache size - lp[2] = htonl(0x2000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00020002); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00400002); // TLB total size/TLB assoc - break; - case 4: // 604 - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x4000); // Data cache size - lp[2] = htonl(0x4000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00040004); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00800002); // TLB total size/TLB assoc - break; -// case 5: // 740? - case 6: // 603e - case 7: // 603ev - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x4000); // Data cache size - lp[2] = htonl(0x4000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00040004); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00400002); // TLB total size/TLB assoc - break; - case 8: // 750, 750FX - case 0x7000: - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00080008); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00800002); // TLB total size/TLB assoc - break; - case 9: // 604e - case 10: // 604ev5 - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00040004); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00800002); // TLB total size/TLB assoc - break; -// case 11: // X704? - case 12: // 7400, 7410, 7450, 7455, 7457 - case 0x800c: - case 0x8000: - case 0x8001: - case 0x8002: - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00080008); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00800002); // TLB total size/TLB assoc - break; - case 13: // ??? - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00000020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00080008); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x01000004); // TLB total size/TLB assoc - break; -// case 50: // 821 -// case 80: // 860 - case 96: // ??? - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x8000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00010020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00200020); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00080008); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x00800004); // TLB total size/TLB assoc - break; - case 0x39: // 970 - lp[0] = htonl(0x1000); // Page size - lp[1] = htonl(0x8000); // Data cache size - lp[2] = htonl(0x10000); // Inst cache size - lp[3] = htonl(0x00200020); // Coherency block size/Reservation granule size - lp[4] = htonl(0x00010020); // Unified caches/Inst cache line size - lp[5] = htonl(0x00200020); // Data cache line size/Data cache block size touch - lp[6] = htonl(0x00800080); // Inst cache block size/Data cache block size - lp[7] = htonl(0x00020002); // Inst cache assoc/Data cache assoc - lp[8] = htonl(0x02000004); // TLB total size/TLB assoc - break; - default: - printf("WARNING: Unknown CPU type\n"); - break; - } - - // Don't set SPRG3, don't test MQ - static const uint8 sprg3_mq_dat[] = {0x7d, 0x13, 0x43, 0xa6, 0x3d, 0x00, 0x00, 0x04, 0x7d, 0x00, 0x03, 0xa6, 0x39, 0x00, 0x00, 0x00, 0x7d, 0x00, 0x02, 0xa6}; - if ((base = find_rom_data(loc + 0x20, loc + 0x60, sprg3_mq_dat, sizeof(sprg3_mq_dat))) == 0) return false; - D(bug("sprg3/mq %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - lp[0] = htonl(POWERPC_NOP); - lp[2] = htonl(POWERPC_NOP); - lp[4] = htonl(POWERPC_NOP); - - // Don't read MSR - static const uint8 msr_dat[] = {0x7d, 0xc0, 0x00, 0xa6}; - if ((base = find_rom_data(loc + 0x40, loc + 0x80, msr_dat, sizeof(msr_dat))) == 0) return false; - D(bug("msr %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x39c00000); // li r14,0 - - // Don't write to DEC - lp = (uint32 *)(ROMBaseHost + loc + 0x70); - *lp++ = htonl(POWERPC_NOP); - loc = (ntohl(lp[0]) & 0xffff) + (uintptr)lp - (uintptr)ROMBaseHost; - D(bug("loc %08lx\n", loc)); - - // Don't set SPRG3 - static const uint8 sprg3_dat[] = {0x39, 0x21, 0x03, 0x60, 0x7d, 0x33, 0x43, 0xa6, 0x39, 0x01, 0x04, 0x20}; - if ((base = find_rom_data(0x310000, 0x314000, sprg3_dat, sizeof(sprg3_dat))) == 0) return false; - D(bug("sprg3 %08lx\n", base + 4)); - lp = (uint32 *)(ROMBaseHost + base + 4); - *lp = htonl(POWERPC_NOP); - - // Don't read PVR - static const uint8 pvr_read2_dat[] = {0x7e, 0xff, 0x42, 0xa6, 0x56, 0xf7, 0x84, 0x3e}; - if ((base = find_rom_data(0x310000, 0x320000, pvr_read2_dat, sizeof(pvr_read2_dat))) == 0) return false; - D(bug("pvr_read2 %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x82e00000 + XLM_PVR); // lwz r23,(theoretical PVR) - if ((base = find_rom_data(base + 4, 0x320000, pvr_read2_dat, sizeof(pvr_read2_dat))) != 0) { - D(bug("pvr_read2 %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x82e00000 + XLM_PVR); // lwz r23,(theoretical PVR) - } - static const uint8 pvr_read3_dat[] = {0x7e, 0x5f, 0x42, 0xa6, 0x56, 0x52, 0x84, 0x3e}; - if ((base = find_rom_data(0x310000, 0x320000, pvr_read3_dat, sizeof(pvr_read3_dat))) != 0) { - D(bug("pvr_read3 %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x82400000 + XLM_PVR); // lwz r18,(theoretical PVR) - } - static const uint8 pvr_read4_dat[] = {0x7d, 0x3f, 0x42, 0xa6, 0x55, 0x29, 0x84, 0x3e}; - if ((base = find_rom_data(0x310000, 0x320000, pvr_read4_dat, sizeof(pvr_read4_dat))) != 0) { - D(bug("pvr_read4 %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x81200000 + XLM_PVR); // lzw r9,(theoritical PVR) - } - - // Don't read SDR1 - static const uint8 sdr1_read_dat[] = {0x7d, 0x19, 0x02, 0xa6, 0x55, 0x16, 0x81, 0xde}; - if ((base = find_rom_data(0x310000, 0x320000, sdr1_read_dat, sizeof(sdr1_read_dat))) == 0) return false; - D(bug("sdr1_read %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp++ = htonl(0x3d00dead); // lis r8,0xdead (pointer to page table) - *lp++ = htonl(0x3ec0001f); // lis r22,0x001f (size of page table) - *lp = htonl(POWERPC_NOP); - - // Don't clear page table, don't invalidate TLB - static const uint8 pgtb_clear_dat[] = {0x36, 0xd6, 0xff, 0xfc, 0x7e, 0xe8, 0xb1, 0x2e, 0x41, 0x81, 0xff, 0xf8}; - if ((base = find_rom_data(0x310000, 0x320000, pgtb_clear_dat, sizeof(pgtb_clear_dat))) == 0) return false; - D(bug("pgtb_clear %08lx\n", base + 4)); - lp = (uint32 *)(ROMBaseHost + base + 4); - *lp = htonl(POWERPC_NOP); - D(bug("tblie %08lx\n", base + 12)); - lp = (uint32 *)(ROMBaseHost + base + 12); - *lp = htonl(POWERPC_NOP); - - // Don't create RAM descriptor table - static const uint8 desc_create_dat[] = {0x97, 0xfd, 0x00, 0x04, 0x3b, 0xff, 0x10, 0x00, 0x4b, 0xff, 0xff, 0xdc}; - if ((base = find_rom_data(0x310000, 0x320000, desc_create_dat, sizeof(desc_create_dat))) == 0) return false; - D(bug("desc_create %08lx\n", base)) - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(POWERPC_NOP); - - // Don't load SRs and BATs - static const uint8 sr_load[] = {0x7c, 0x00, 0x04, 0xac, 0x83, 0x9d, 0x00, 0x00, 0x93, 0x81, 0x05, 0xe8}; - if ((loc = find_rom_data(0x310000, 0x320000, sr_load, sizeof(sr_load))) == 0) return false; - static const uint8 sr_load_caller[] = {0x3e, 0xd6, 0xff, 0xff, 0x41, 0x81, 0xff, 0xdc, 0xb2, 0xc8, 0x00, 0x02}; - if ((base = find_rom_data(0x310000, 0x320000, sr_load_caller, sizeof(sr_load_caller))) == 0) return false; - if ((base = find_rom_powerpc_branch(base + 12, 0x320000, loc)) == 0) return false; - D(bug("sr_load %08lx, called from %08lx\n", loc, base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(POWERPC_NOP); - - // Don't mess with SRs - static const uint8 sr_load2_dat[] = {0x83, 0xa1, 0x05, 0xe8, 0x57, 0x7c, 0x3e, 0x78, 0x7f, 0xbd, 0xe0, 0x2e}; - if ((base = find_rom_data(0x310000, 0x320000, sr_load2_dat, sizeof(sr_load2_dat))) == 0) return false; - D(bug("sr_load2 %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(POWERPC_BLR); - - // Don't check performance monitor - static const uint8 pm_check_dat[] = {0x7e, 0x58, 0xeb, 0xa6, 0x7e, 0x53, 0x90, 0xf8, 0x7e, 0x78, 0xea, 0xa6}; - if ((base = find_rom_data(0x310000, 0x320000, pm_check_dat, sizeof(pm_check_dat))) == 0) return false; - D(bug("pm_check %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - - static const int spr_check_list[] = { - 952 /* mmcr0 */, 953 /* pmc1 */, 954 /* pmc2 */, 955 /* sia */, - 956 /* mmcr1 */, 957 /* pmc3 */, 958 /* pmc4 */, 959 /* sda */ - }; - - for (int i = 0; i < sizeof(spr_check_list)/sizeof(spr_check_list[0]); i++) { - int spr = spr_check_list[i]; - uint32 mtspr = 0x7e4003a6 | ((spr & 0x1f) << 16) | ((spr & 0x3e0) << 6); - uint32 mfspr = 0x7e6002a6 | ((spr & 0x1f) << 16) | ((spr & 0x3e0) << 6); - for (int ofs = 0; ofs < 64; ofs++) { - if (ntohl(lp[ofs]) == mtspr) { - if (ntohl(lp[ofs + 2]) != mfspr) - return false; - D(bug(" SPR%d %08lx\n", spr, base + 4*ofs)); - lp[ofs] = htonl(POWERPC_NOP); - lp[ofs + 2] = htonl(POWERPC_NOP); - } - } - } - - // Jump to 68k emulator - static const uint8 jump68k_dat[] = {0x7d, 0x92, 0x43, 0xa6, 0x7d, 0x5a, 0x03, 0xa6, 0x7d, 0x7b, 0x03, 0xa6}; - if ((loc = find_rom_data(0x310000, 0x320000, jump68k_dat, sizeof(jump68k_dat))) == 0) return false; - static const uint8 jump68k_caller_dat[] = {0x85, 0x13, 0x00, 0x08, 0x56, 0xbf, 0x50, 0x3e, 0x63, 0xff, 0x0c, 0x00}; - if ((base = find_rom_data(0x310000, 0x320000, jump68k_caller_dat, sizeof(jump68k_caller_dat))) == 0) return false; - if ((base = find_rom_powerpc_branch(base + 12, 0x320000, loc)) == 0) return false; - D(bug("jump68k %08lx, called from %08lx\n", loc, base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp++ = htonl(0x80610634); // lwz r3,0x0634(r1) (pointer to Emulator Data) - *lp++ = htonl(0x8081119c); // lwz r4,0x119c(r1) (pointer to opcode table) - *lp++ = htonl(0x80011184); // lwz r0,0x1184(r1) (pointer to emulator init routine) - *lp++ = htonl(0x7c0903a6); // mtctr r0 - *lp = htonl(POWERPC_BCTR); - return true; -} - - -/* - * 68k emulator patches - */ - -static bool patch_68k_emul(void) -{ - uint32 *lp; - uint32 base, loc; - - // Overwrite twi instructions - static const uint8 twi_dat[] = {0x0f, 0xff, 0x00, 0x00, 0x0f, 0xff, 0x00, 0x01, 0x0f, 0xff, 0x00, 0x02}; - if ((base = find_rom_data(0x36e600, 0x36ea00, twi_dat, sizeof(twi_dat))) == 0) return false; - D(bug("twi %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp++ = htonl(0x48000000 + 0x36f900 - base); // b 0x36f900 (Emulator start) - *lp++ = htonl(0x48000000 + 0x36fa00 - base - 4); // b 0x36fa00 (Mixed mode) - *lp++ = htonl(0x48000000 + 0x36fb00 - base - 8); // b 0x36fb00 (Reset/FC1E opcode) - *lp++ = htonl(0x48000000 + 0x36fc00 - base - 12); // FE0A opcode - *lp++ = htonl(POWERPC_ILLEGAL); // Interrupt - *lp++ = htonl(0x48000000 + 0x36fd00 - base - 20); // FE0F opcode - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp++ = htonl(POWERPC_ILLEGAL); - *lp = htonl(POWERPC_ILLEGAL); - -#if EMULATED_PPC - // Install EMUL_RETURN, EXEC_RETURN, EXEC_NATIVE and EMUL_OP opcodes - lp = (uint32 *)(ROMBaseHost + 0x380000 + (M68K_EMUL_RETURN << 3)); - *lp++ = htonl(POWERPC_EMUL_OP); - *lp++ = htonl(0x4bf66e80); // b 0x366084 - *lp++ = htonl(POWERPC_EMUL_OP | 1); - *lp++ = htonl(0x4bf66e78); // b 0x366084 - *lp++ = htonl(POWERPC_EMUL_OP | 2); - *lp++ = htonl(0x4bf66e70); // b 0x366084 - for (int i=0; i> 16)); // lis r0,xxx - *lp++ = htonl(0x60000000 + ((ROMBase + base) & 0xffff)); // ori r0,r0,xxx - *lp++ = htonl(0x7c0803a6); // mtlr r0 - *lp = htonl(POWERPC_BLR); // blr - } - return true; -} - - -/* - * Nanokernel patches - */ - -static bool patch_nanokernel(void) -{ - uint32 *lp; - uint32 base, loc; - - // Patch Mixed Mode trap - static const uint8 virt2phys_dat[] = {0x7d, 0x1b, 0x43, 0x78, 0x3b, 0xa1, 0x03, 0x20}; - if ((base = find_rom_data(0x313000, 0x314000, virt2phys_dat, sizeof(virt2phys_dat))) == 0) return false; - D(bug("virt2phys %08lx\n", base + 8)); - lp = (uint32 *)(ROMBaseHost + base + 8); // Don't translate virtual->physical - lp[0] = htonl(0x7f7fdb78); // mr r31,r27 - lp[2] = htonl(POWERPC_NOP); - - static const uint8 ppc_excp_tbl_dat[] = {0x39, 0x01, 0x04, 0x20, 0x7d, 0x13, 0x43, 0xa6}; - if ((base = find_rom_data(0x313000, 0x314000, ppc_excp_tbl_dat, sizeof(ppc_excp_tbl_dat))) == 0) return false; - D(bug("ppc_excp_tbl %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); // Don't activate PPC exception table - *lp++ = htonl(0x39000000 + MODE_NATIVE); // li r8,MODE_NATIVE - *lp = htonl(0x91000000 + XLM_RUN_MODE); // stw r8,XLM_RUN_MODE - - static const uint8 save_fpu_dat[] = {0x7d, 0x00, 0x00, 0xa6, 0x61, 0x08, 0x20, 0x00, 0x7d, 0x00, 0x01, 0x24}; - if ((base = find_rom_data(0x310000, 0x314000, save_fpu_dat, sizeof(save_fpu_dat))) == 0) return false; - D(bug("save_fpu %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); // Don't modify MSR to turn on FPU - if (ntohl(lp[4]) != 0x556b04e2) return false; - loc = base; -#if 1 - // FIXME: is that really intended? - *lp++ = htonl(POWERPC_NOP); - lp++; - *lp++ = htonl(POWERPC_NOP); - lp++; - *lp = htonl(POWERPC_NOP); -#else - lp[0] = htonl(POWERPC_NOP); - lp[1] = htonl(POWERPC_NOP); - lp[2] = htonl(POWERPC_NOP); - lp[3] = htonl(POWERPC_NOP); -#endif - - static const uint8 save_fpu_caller_dat[] = {0x93, 0xa6, 0x01, 0xec, 0x93, 0xc6, 0x01, 0xf4, 0x93, 0xe6, 0x01, 0xfc, 0x40}; - if ((base = find_rom_data(0x310000, 0x314000, save_fpu_caller_dat, sizeof(save_fpu_caller_dat))) == 0) return false; - D(bug("save_fpu_caller %08lx\n", base + 12)); - if (rom_powerpc_branch_target(base + 12) != loc) return false; - lp = (uint32 *)(ROMBaseHost + base + 12); // Always save FPU state - *lp = htonl(0x48000000 | (ntohl(*lp) & 0xffff)); // bl 0x00312e88 - - static const uint8 mdec_dat[] = {0x7f, 0xf6, 0x02, 0xa6, 0x2c, 0x08, 0x00, 0x00, 0x93, 0xe1, 0x06, 0x68, 0x7d, 0x16, 0x03, 0xa6}; - if ((base = find_rom_data(0x310000, 0x314000, mdec_dat, sizeof(mdec_dat))) == 0) return false; - D(bug("mdec %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); // Don't modify DEC - lp[0] = htonl(0x3be00000); // li r31,0 -#if 1 - lp[3] = htonl(POWERPC_NOP); - lp[4] = htonl(POWERPC_NOP); -#else - lp[3] = htonl(0x39000040); // li r8,0x40 - lp[4] = htonl(0x990600e4); // stb r8,0xe4(r6) -#endif - - static const uint8 restore_fpu_caller_dat[] = {0x81, 0x06, 0x00, 0xf4, 0x81, 0x46, 0x00, 0xfc, 0x7d, 0x09, 0x03, 0xa6, 0x40}; - if ((base = find_rom_data(0x310000, 0x314000, restore_fpu_caller_dat, sizeof(restore_fpu_caller_dat))) == 0) return false; - D(bug("restore_fpu_caller %08lx\n", base + 12)); - lp = (uint32 *)(ROMBaseHost + base + 12); // Always restore FPU state - *lp = htonl(0x48000000 | (ntohl(*lp) & 0xffff)); // bl 0x00312ddc - - static const uint8 m68k_excp_tbl_dat[] = {0x81, 0x21, 0x06, 0x58, 0x39, 0x01, 0x03, 0x60, 0x7d, 0x13, 0x43, 0xa6}; - if ((base = find_rom_data(0x310000, 0x314000, m68k_excp_tbl_dat, sizeof(m68k_excp_tbl_dat))) == 0) return false; - D(bug("m68k_excp %08lx\n", base + 4)); - lp = (uint32 *)(ROMBaseHost + base + 4); // Don't activate 68k exception table - *lp++ = htonl(0x39000000 + MODE_68K); // li r8,MODE_68K - *lp = htonl(0x91000000 + XLM_RUN_MODE); // stw r8,XLM_RUN_MODE - - // Patch 68k emulator trap routine - static const uint8 restore_fpu_caller2_dat[] = {0x81, 0x86, 0x00, 0x8c, 0x80, 0x66, 0x00, 0x94, 0x80, 0x86, 0x00, 0x9c, 0x40}; - if ((base = find_rom_data(0x310000, 0x314000, restore_fpu_caller2_dat, sizeof(restore_fpu_caller2_dat))) == 0) return false; - D(bug("restore_fpu_caller2 %08lx\n", base + 12)); - loc = rom_powerpc_branch_target(base + 12); - lp = (uint32 *)(ROMBaseHost + base + 12); // Always restore FPU state - *lp = htonl(0x48000000 | (ntohl(*lp) & 0xffff)); // bl 0x00312dd4 - - static const uint8 restore_fpu_dat[] = {0x55, 0x68, 0x04, 0xa5, 0x4c, 0x82, 0x00, 0x20, 0x81, 0x06, 0x00, 0xe4}; - if ((base = find_rom_data(0x310000, 0x314000, restore_fpu_dat, sizeof(restore_fpu_dat))) == 0) return false; - D(bug("restore_fpu %08lx\n", base)); - if (base != loc) return false; - lp = (uint32 *)(ROMBaseHost + base + 4); // Don't modify MSR to turn on FPU - *lp++ = htonl(POWERPC_NOP); - lp += 2; - *lp++ = htonl(POWERPC_NOP); - lp++; - *lp++ = htonl(POWERPC_NOP); - *lp++ = htonl(POWERPC_NOP); - *lp = htonl(POWERPC_NOP); - - // Disable suspend (FE0F opcode) - // TODO: really suspend SheepShaver? - static const uint8 suspend_dat[] = {0x7c, 0x88, 0x68, 0x39, 0x41, 0x9d}; - if ((base = find_rom_data(0x315000, 0x316000, suspend_dat, sizeof(suspend_dat))) == 0) return false; - D(bug("suspend %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base + 4); - *lp = htonl((ntohl(*lp) & 0xffff) | 0x48000000); // bgt -> b - - // Patch trap return routine - static const uint8 trap_return_dat[] = {0x80, 0xc1, 0x00, 0x18, 0x80, 0x21, 0x00, 0x04, 0x4c, 0x00, 0x00, 0x64}; - if ((base = find_rom_data(0x312000, 0x320000, trap_return_dat, sizeof(trap_return_dat))) == 0) return false; - D(bug("trap_return %08lx\n", base + 8)); - lp = (uint32 *)(ROMBaseHost + base + 8); // Replace rfi - *lp = htonl(POWERPC_BCTR); - - while (ntohl(*lp) != 0x7d5a03a6) lp--; - *lp++ = htonl(0x7d4903a6); // mtctr r10 - *lp++ = htonl(0x7daff120); // mtcr r13 - *lp = htonl(0x48000000 + ((0x318000 - ((uintptr)lp - (uintptr)ROMBaseHost)) & 0x03fffffc)); // b ROMBase+0x318000 - uint32 npc = (uintptr)(lp + 1) - (uintptr)ROMBaseHost; - - lp = (uint32 *)(ROMBaseHost + 0x318000); - *lp++ = htonl(0x81400000 + XLM_IRQ_NEST); // lwz r10,XLM_IRQ_NEST - *lp++ = htonl(0x394affff); // subi r10,r10,1 - *lp++ = htonl(0x91400000 + XLM_IRQ_NEST); // stw r10,XLM_IRQ_NEST - *lp = htonl(0x48000000 + ((npc - 0x31800c) & 0x03fffffc)); // b ROMBase+0x312c2c - - // Patch FEOA opcode, selector 0x0A (virtual->physical page index) - static const uint8 fe0a_0a_dat[] = {0x55, 0x23, 0xa3, 0x3e, 0x4b}; - if ((base = find_rom_data(0x314000, 0x318000, fe0a_0a_dat, sizeof(fe0a_0a_dat))) == 0) return false; - loc = rom_powerpc_branch_target(base - 8); - static const uint8 fe0a_dat[] = {0x7e, 0x04, 0x48, 0x40, 0x81, 0xe1, 0x06, 0xb0, 0x54, 0x88, 0x10, 0x3a, 0x40, 0x90}; - if (find_rom_data(loc, 0x318000, fe0a_dat, sizeof(fe0a_dat)) != loc) return false; - D(bug("fe0a_0a %08lx\n", base - 8)); - lp = (uint32 *)(ROMBaseHost + base - 8); - *lp++ = htonl(0x7c832378); // mr r3,r4 - *lp++ = htonl(POWERPC_NOP); - *lp = htonl(POWERPC_NOP); - - // Disable FE0A opcode, selector 0x11 (init page tables?) - static const uint8 fe0a_11_dat[] = {0x56, 0x07, 0x06, 0x74, 0x2c, 0x07, 0x00, 0x60, 0x40}; - if ((base = find_rom_data(0x314000, 0x318000, fe0a_11_dat, sizeof(fe0a_11_dat))) == 0) return false; - loc = rom_powerpc_branch_target(base - 4); - if (find_rom_data(0x314000, 0x318000, fe0a_dat, sizeof(fe0a_dat)) != loc) return false; - D(bug("fe0a_11 %08lx\n", base - 4)); - lp = (uint32 *)(ROMBaseHost + base - 4); - *lp++ = htonl(POWERPC_NOP); - *lp++ = htonl(POWERPC_NOP); - *lp++ = htonl(POWERPC_NOP); - *lp = htonl(ntohl(*lp) | 0x02800000); // bf => ba - - // Patch FE0A opcode to fake a page table entry so that V=P for RAM and ROM - static const uint8 pg_lookup_dat[] = {0x7e, 0x0f, 0x40, 0x6e, 0x81, 0xc1, 0x06, 0xa4, 0x7e, 0x00, 0x71, 0x20}; - if ((base = find_rom_data(0x310000, 0x320000, pg_lookup_dat, sizeof(pg_lookup_dat))) == 0) return false; - D(bug("fe0a_pgtb_lookup %08lx\n", base - 12)); - lp = (uint32 *)(ROMBaseHost + base - 12); - if (ntohl(lp[0]) != 0x81e106b0) // lwz r15,$06b0(r1) - return false; - lp[0] = htonl(0x54906026); // slwi r16,r4,12 - lp[3] = htonl(0x62100121); // ori r16,r16,0x121 - - // Patch FE0A opcode to not write to kernel memory - static const uint8 krnl_write_dat[] = {0x38, 0xe0, 0x00, 0x01, 0x7e, 0x10, 0x38, 0x78, 0x92, 0x0f, 0x00, 0x00}; - if ((base = find_rom_data(0x310000, 0x320000, krnl_write_dat, sizeof(krnl_write_dat))) == 0) return false; - D(bug("fe0a_krnl_write %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - lp[2] = htonl(POWERPC_NOP); - -/* - // Disable FE0A/FE06 opcodes - lp = (uint32 *)(ROMBase + 0x3144ac); - *lp++ = htonl(POWERPC_NOP); - *lp += 8; -*/ - return true; -} - - -/* - * 68k boot routine patches - */ - -static bool patch_68k(void) -{ - uint32 *lp; - uint16 *wp; - uint8 *bp; - uint32 base, loc; - - // Remove 68k RESET instruction - static const uint8 reset_dat[] = {0x4e, 0x70}; - if ((base = find_rom_data(0xc8, 0x120, reset_dat, sizeof(reset_dat))) == 0) return false; - D(bug("reset %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp = htons(M68K_NOP); - - // Fake reading PowerMac ID (via Universal) - static const uint8 powermac_id_dat[] = {0x45, 0xf9, 0x5f, 0xff, 0xff, 0xfc, 0x20, 0x12, 0x72, 0x00}; - if ((base = find_rom_data(0xe000, 0x15000, powermac_id_dat, sizeof(powermac_id_dat))) == 0) return false; - D(bug("powermac_id %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x203c); // move.l #id,d0 - *wp++ = htons(0); -// if (ROMType == ROMTYPE_NEWWORLD) -// *wp++ = htons(0x3035); // (PowerMac 9500 ID) -// else - *wp++ = htons(0x3020); // (PowerMac 9500 ID) - *wp++ = htons(0xb040); // cmp.w d0,d0 - *wp = htons(0x4ed6); // jmp (a6) - - // Patch UniversalInfo - if (ROMType == ROMTYPE_NEWWORLD) { - static const uint8 univ_info_dat[] = {0x3f, 0xff, 0x04, 0x00}; - if ((base = find_rom_data(0x14000, 0x18000, univ_info_dat, sizeof(univ_info_dat))) == 0) return false; - D(bug("universal_info %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base - 0x14); - lp[0x00 >> 2] = htonl(ADDR_MAP_PATCH_SPACE - (base - 0x14)); - lp[0x10 >> 2] = htonl(0xcc003d11); // Make it like the PowerMac 9500 UniversalInfo - lp[0x14 >> 2] = htonl(0x3fff0401); - lp[0x18 >> 2] = htonl(0x0300001c); - lp[0x1c >> 2] = htonl(0x000108c4); - lp[0x24 >> 2] = htonl(0xc301bf26); - lp[0x28 >> 2] = htonl(0x00000861); - lp[0x58 >> 2] = htonl(0x30200000); - lp[0x60 >> 2] = htonl(0x0000003d); - } else if (ROMType == ROMTYPE_ZANZIBAR) { - base = 0x12b70; - lp = (uint32 *)(ROMBaseHost + base - 0x14); - lp[0x00 >> 2] = htonl(ADDR_MAP_PATCH_SPACE - (base - 0x14)); - lp[0x10 >> 2] = htonl(0xcc003d11); // Make it like the PowerMac 9500 UniversalInfo - lp[0x14 >> 2] = htonl(0x3fff0401); - lp[0x18 >> 2] = htonl(0x0300001c); - lp[0x1c >> 2] = htonl(0x000108c4); - lp[0x24 >> 2] = htonl(0xc301bf26); - lp[0x28 >> 2] = htonl(0x00000861); - lp[0x58 >> 2] = htonl(0x30200000); - lp[0x60 >> 2] = htonl(0x0000003d); - } else if (ROMType == ROMTYPE_GOSSAMER) { - base = 0x12d20; - lp = (uint32 *)(ROMBaseHost + base - 0x14); - lp[0x00 >> 2] = htonl(ADDR_MAP_PATCH_SPACE - (base - 0x14)); - lp[0x10 >> 2] = htonl(0xcc003d11); // Make it like the PowerMac 9500 UniversalInfo - lp[0x14 >> 2] = htonl(0x3fff0401); - lp[0x18 >> 2] = htonl(0x0300001c); - lp[0x1c >> 2] = htonl(0x000108c4); - lp[0x24 >> 2] = htonl(0xc301bf26); - lp[0x28 >> 2] = htonl(0x00000861); - lp[0x58 >> 2] = htonl(0x30410000); - lp[0x60 >> 2] = htonl(0x0000003d); - } - - // Construct AddrMap for NewWorld ROM - if (ROMType == ROMTYPE_NEWWORLD || ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_GOSSAMER) { - lp = (uint32 *)(ROMBaseHost + ADDR_MAP_PATCH_SPACE); - memset(lp - 10, 0, 0x128); - lp[-10] = htonl(0x0300001c); - lp[-9] = htonl(0x000108c4); - lp[-4] = htonl(0x00300000); - lp[-2] = htonl(0x11010000); - lp[-1] = htonl(0xf8000000); - lp[0] = htonl(0xffc00000); - lp[2] = htonl(0xf3016000); - lp[3] = htonl(0xf3012000); - lp[4] = htonl(0xf3012000); - lp[24] = htonl(0xf3018000); - lp[25] = htonl(0xf3010000); - lp[34] = htonl(0xf3011000); - lp[38] = htonl(0xf3015000); - lp[39] = htonl(0xf3014000); - lp[43] = htonl(0xf3000000); - lp[48] = htonl(0xf8000000); - } - - // Don't initialize VIA (via Universal) - static const uint8 via_init_dat[] = {0x08, 0x00, 0x00, 0x02, 0x67, 0x00, 0x00, 0x2c, 0x24, 0x68, 0x00, 0x08}; - if ((base = find_rom_data(0xe000, 0x15000, via_init_dat, sizeof(via_init_dat))) == 0) return false; - D(bug("via_init %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 4); - *wp = htons(0x6000); // bra - - static const uint8 via_init2_dat[] = {0x24, 0x68, 0x00, 0x08, 0x00, 0x12, 0x00, 0x30, 0x4e, 0x71}; - if ((base = find_rom_data(0xa000, 0x10000, via_init2_dat, sizeof(via_init2_dat))) == 0) return false; - D(bug("via_init2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp = htons(0x4ed6); // jmp (a6) - - static const uint8 via_init3_dat[] = {0x22, 0x68, 0x00, 0x08, 0x28, 0x3c, 0x20, 0x00, 0x01, 0x00}; - if ((base = find_rom_data(0xa000, 0x10000, via_init3_dat, sizeof(via_init3_dat))) == 0) return false; - D(bug("via_init3 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp = htons(0x4ed6); // jmp (a6) - - // Don't RunDiags, get BootGlobs pointer directly - if (ROMType == ROMTYPE_NEWWORLD) { - static const uint8 run_diags_dat[] = {0x60, 0xff, 0x00, 0x0c}; - if ((base = find_rom_data(0x110, 0x128, run_diags_dat, sizeof(run_diags_dat))) == 0) return false; - D(bug("run_diags %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x4df9); // lea xxx,a6 - *wp++ = htons((RAMBase + RAMSize - 0x1c) >> 16); - *wp = htons((RAMBase + RAMSize - 0x1c) & 0xffff); - } else { - static const uint8 run_diags_dat[] = {0x74, 0x00, 0x2f, 0x0e}; - if ((base = find_rom_data(0xd0, 0xf0, run_diags_dat, sizeof(run_diags_dat))) == 0) return false; - D(bug("run_diags %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base - 6); - *wp++ = htons(0x4df9); // lea xxx,a6 - *wp++ = htons((RAMBase + RAMSize - 0x1c) >> 16); - *wp = htons((RAMBase + RAMSize - 0x1c) & 0xffff); - } - - // Replace NVRAM routines - static const uint8 nvram1_dat[] = {0x48, 0xe7, 0x01, 0x0e, 0x24, 0x68, 0x00, 0x08, 0x08, 0x83, 0x00, 0x1f}; - if ((base = find_rom_data(0x7000, 0xc000, nvram1_dat, sizeof(nvram1_dat))) == 0) return false; - D(bug("nvram1 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_EMUL_OP_XPRAM1); - *wp = htons(M68K_RTS); - - if (ROMType == ROMTYPE_NEWWORLD) { - static const uint8 nvram2_dat[] = {0x48, 0xe7, 0x1c, 0xe0, 0x4f, 0xef, 0xff, 0xb4}; - if ((base = find_rom_data(0xa000, 0xd000, nvram2_dat, sizeof(nvram2_dat))) == 0) return false; - D(bug("nvram2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_EMUL_OP_XPRAM2); - *wp = htons(0x4ed3); // jmp (a3) - - static const uint8 nvram3_dat[] = {0x48, 0xe7, 0xdc, 0xe0, 0x4f, 0xef, 0xff, 0xb4}; - if ((base = find_rom_data(0xa000, 0xd000, nvram3_dat, sizeof(nvram3_dat))) == 0) return false; - D(bug("nvram3 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_EMUL_OP_XPRAM3); - *wp = htons(0x4ed3); // jmp (a3) - - static const uint8 nvram4_dat[] = {0x4e, 0x56, 0xff, 0xa8, 0x48, 0xe7, 0x1f, 0x38, 0x16, 0x2e, 0x00, 0x13}; - if ((base = find_rom_data(0xa000, 0xd000, nvram4_dat, sizeof(nvram4_dat))) == 0) return false; - D(bug("nvram4 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 16); - *wp++ = htons(0x1a2e); // move.b ($000f,a6),d5 - *wp++ = htons(0x000f); - *wp++ = htons(M68K_EMUL_OP_NVRAM3); - *wp++ = htons(0x4cee); // movem.l ($ff88,a6),d3-d7/a2-a4 - *wp++ = htons(0x1cf8); - *wp++ = htons(0xff88); - *wp++ = htons(0x4e5e); // unlk a6 - *wp = htons(M68K_RTS); - - static const uint8 nvram5_dat[] = {0x0c, 0x80, 0x03, 0x00, 0x00, 0x00, 0x66, 0x0a, 0x70, 0x00, 0x21, 0xf8, 0x02, 0x0c, 0x01, 0xe4}; - if ((base = find_rom_data(0xa000, 0xd000, nvram5_dat, sizeof(nvram5_dat))) == 0) return false; - D(bug("nvram5 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 6); - *wp = htons(M68K_NOP); - - static const uint8 nvram6_dat[] = {0x2f, 0x0a, 0x24, 0x48, 0x4f, 0xef, 0xff, 0xa0, 0x20, 0x0f}; - if ((base = find_rom_data(0x9000, 0xb000, nvram6_dat, sizeof(nvram6_dat))) == 0) return false; - D(bug("nvram6 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x7000); // moveq #0,d0 - *wp++ = htons(0x2080); // move.l d0,(a0) - *wp++ = htons(0x4228); // clr.b 4(a0) - *wp++ = htons(0x0004); - *wp = htons(M68K_RTS); - - static const uint8 nvram7_dat[] = {0x42, 0x2a, 0x00, 0x04, 0x4f, 0xef, 0x00, 0x60, 0x24, 0x5f, 0x4e, 0x75, 0x4f, 0xef, 0xff, 0xa0, 0x20, 0x0f}; - base = find_rom_data(0x9000, 0xb000, nvram7_dat, sizeof(nvram7_dat)); - if (base) { - D(bug("nvram7 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 12); - *wp = htons(M68K_RTS); - } - } else { - static const uint8 nvram2_dat[] = {0x4e, 0xd6, 0x06, 0x41, 0x13, 0x00}; - if ((base = find_rom_data(0x7000, 0xb000, nvram2_dat, sizeof(nvram2_dat))) == 0) return false; - D(bug("nvram2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 2); - *wp++ = htons(M68K_EMUL_OP_XPRAM2); - *wp = htons(0x4ed3); // jmp (a3) - - static const uint8 nvram3_dat[] = {0x4e, 0xd3, 0x06, 0x41, 0x13, 0x00}; - if ((base = find_rom_data(0x7000, 0xb000, nvram3_dat, sizeof(nvram3_dat))) == 0) return false; - D(bug("nvram3 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 2); - *wp++ = htons(M68K_EMUL_OP_XPRAM3); - *wp = htons(0x4ed3); // jmp (a3) - - static const uint32 nvram4_loc[] = {0x582f0, 0xa0a0, 0x7e50, 0xa1d0, 0x538d0, 0}; - wp = (uint16 *)(ROMBaseHost + nvram4_loc[ROMType]); - *wp++ = htons(0x202f); // move.l 4(sp),d0 - *wp++ = htons(0x0004); - *wp++ = htons(M68K_EMUL_OP_NVRAM1); - if (ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_GAZELLE) - *wp = htons(M68K_RTS); - else { - *wp++ = htons(0x1f40); // move.b d0,8(sp) - *wp++ = htons(0x0008); - *wp++ = htons(0x4e74); // rtd #4 - *wp = htons(0x0004); - } - - static const uint32 nvram5_loc[] = {0x58460, 0xa0f0, 0x7f40, 0xa220, 0x53a20, 0}; - wp = (uint16 *)(ROMBaseHost + nvram5_loc[ROMType]); - if (ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_GAZELLE) { - *wp++ = htons(0x202f); // move.l 4(sp),d0 - *wp++ = htons(0x0004); - *wp++ = htons(0x122f); // move.b 11(sp),d1 - *wp++ = htons(0x000b); - *wp++ = htons(M68K_EMUL_OP_NVRAM2); - *wp = htons(M68K_RTS); - } else { - *wp++ = htons(0x202f); // move.l 6(sp),d0 - *wp++ = htons(0x0006); - *wp++ = htons(0x122f); // move.b 4(sp),d1 - *wp++ = htons(0x0004); - *wp++ = htons(M68K_EMUL_OP_NVRAM2); - *wp++ = htons(0x4e74); // rtd #6 - *wp = htons(0x0006); - } - } - - // Fix MemTop/BootGlobs during system startup - static const uint8 mem_top_dat[] = {0x2c, 0x6c, 0xff, 0xec, 0x2a, 0x4c, 0xdb, 0xec, 0xff, 0xf4}; - if ((base = find_rom_data(0x120, 0x180, mem_top_dat, sizeof(mem_top_dat))) == 0) return false; - D(bug("mem_top %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_EMUL_OP_FIX_MEMTOP); - *wp = htons(M68K_NOP); - - // Don't initialize SCC (via 0x1ac) - static const uint8 scc_init_caller_dat[] = {0x21, 0xce, 0x01, 0x08, 0x22, 0x78, 0x0d, 0xd8}; - if ((base = find_rom_data(0x180, 0x1f0, scc_init_caller_dat, sizeof(scc_init_caller_dat))) == 0) return false; - D(bug("scc_init_caller %08lx\n", base + 12)); - wp = (uint16 *)(ROMBaseHost + base + 12); - loc = ntohs(wp[1]) + ((uintptr)wp - (uintptr)ROMBaseHost) + 2; - static const uint8 scc_init_dat[] = {0x20, 0x78, 0x01, 0xdc, 0x22, 0x78, 0x01, 0xd8}; - if ((base = find_rom_data(loc, loc + 0x80, scc_init_dat, sizeof(scc_init_dat))) == 0) return false; - D(bug("scc_init %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_EMUL_OP_RESET); - *wp = htons(M68K_RTS); - - // Don't EnableExtCache (via 0x1f6) and don't DisableIntSources(via 0x1fc) - static const uint8 ext_cache_dat[] = {0x4e, 0x7b, 0x00, 0x02}; - if ((base = find_rom_data(0x1d0, 0x230, ext_cache_dat, sizeof(ext_cache_dat))) == 0) return false; - D(bug("ext_cache %08lx\n", base)); - loc = ReadMacInt32(ROMBase + base + 6); - wp = (uint16 *)(ROMBaseHost + loc + base + 6); - *wp = htons(M68K_RTS); - loc = ReadMacInt32(ROMBase + base + 12); - wp = (uint16 *)(ROMBaseHost + loc + base + 12); - *wp = htons(M68K_RTS); - - // Fake CPU speed test (SetupTimeK) - static const uint8 timek_dat[] = {0x0c, 0x38, 0x00, 0x04, 0x01, 0x2f, 0x6d, 0x3c}; - if ((base = find_rom_data(0x400, 0x500, timek_dat, sizeof(timek_dat))) == 0) return false; - D(bug("timek %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x31fc); // move.w #xxx,TimeDBRA - *wp++ = htons(100); - *wp++ = htons(0x0d00); - *wp++ = htons(0x31fc); // move.w #xxx,TimeSCCDBRA - *wp++ = htons(100); - *wp++ = htons(0x0d02); - *wp++ = htons(0x31fc); // move.w #xxx,TimeSCSIDBRA - *wp++ = htons(100); - *wp++ = htons(0x0b24); - *wp++ = htons(0x31fc); // move.w #xxx,TimeRAMDBRA - *wp++ = htons(100); - *wp++ = htons(0x0cea); - *wp = htons(M68K_RTS); - - // Relocate jump tables ($2000..) - static const uint8 jump_tab_dat[] = {0x41, 0xfa, 0x00, 0x0e, 0x21, 0xc8, 0x20, 0x10, 0x4e, 0x75}; - if ((base = find_rom_data(0x3000, 0x6000, jump_tab_dat, sizeof(jump_tab_dat))) == 0) return false; - D(bug("jump_tab %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base + 16); - for (;;) { - D(bug(" %08lx\n", (uintptr)lp - (uintptr)ROMBaseHost)); - while ((ntohl(*lp) & 0xff000000) == 0xff000000) { - *lp = htonl((ntohl(*lp) & (ROM_SIZE-1)) + ROMBase); - lp++; - } - while (!ntohl(*lp)) lp++; - if (ntohl(*lp) != 0x41fa000e) - break; - lp += 4; - } - - // Create SysZone at start of Mac RAM (SetSysAppZone, via 0x22a) - static const uint8 sys_zone_dat[] = {0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x40, 0x00}; - if ((base = find_rom_data(0x600, 0x900, sys_zone_dat, sizeof(sys_zone_dat))) == 0) return false; - D(bug("sys_zone %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp++ = htonl(RAMBase ? RAMBase : 0x3000); - *lp = htonl(RAMBase ? RAMBase + 0x1800 : 0x4800); - - // Set boot stack at RAMBase+4MB and fix logical/physical RAM size (CompBootStack) - // The RAM size fix must be done after InitMemMgr! - static const uint8 boot_stack_dat[] = {0x08, 0x38, 0x00, 0x06, 0x24, 0x0b}; - if ((base = find_rom_data(0x580, 0x800, boot_stack_dat, sizeof(boot_stack_dat))) == 0) return false; - D(bug("boot_stack %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x207c); // move.l #RAMBase+0x3ffffe,a0 - *wp++ = htons((RAMBase + 0x3ffffe) >> 16); - *wp++ = htons((RAMBase + 0x3ffffe) & 0xffff); - *wp++ = htons(M68K_EMUL_OP_FIX_MEMSIZE); - *wp = htons(M68K_RTS); - - // Get PowerPC page size (InitVMemMgr, via 0x240) - static const uint8 page_size_dat[] = {0x20, 0x30, 0x81, 0xf2, 0x5f, 0xff, 0xef, 0xd8, 0x00, 0x10}; - if ((base = find_rom_data(0xb000, 0x12000, page_size_dat, sizeof(page_size_dat))) == 0) return false; - D(bug("page_size %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x203c); // move.l #$1000,d0 - *wp++ = htons(0); - *wp++ = htons(0x1000); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - - // Gestalt PowerPC page size, CPU type, RAM size (InitGestalt, via 0x25c) - static const uint8 page_size2_dat[] = {0x26, 0x79, 0x5f, 0xff, 0xef, 0xd8, 0x25, 0x6b, 0x00, 0x10, 0x00, 0x1e}; - if ((base = find_rom_data(0x50000, 0x70000, page_size2_dat, sizeof(page_size2_dat))) == 0) return false; - D(bug("page_size2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x257c); // move.l #$1000,$1e(a2) - *wp++ = htons(0); - *wp++ = htons(0x1000); - *wp++ = htons(0x001e); - *wp++ = htons(0x157c); // move.b #PVR,$1d(a2) - uint32 cput = (PVR >> 16); - if (cput == 0x7000) - cput |= 0x20; - else if (cput >= 0x8000 && cput <= 0x8002) - cput |= 0x10; - cput &= 0xff; - *wp++ = htons(cput); - *wp++ = htons(0x001d); - *wp++ = htons(0x263c); // move.l #RAMSize,d3 - *wp++ = htons(RAMSize >> 16); - *wp++ = htons(RAMSize & 0xffff); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - if (ROMType == ROMTYPE_NEWWORLD) - wp = (uint16 *)(ROMBaseHost + base + 0x4a); - else - wp = (uint16 *)(ROMBaseHost + base + 0x28); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - - // Gestalt CPU/bus clock speed (InitGestalt, via 0x25c) - if (ROMType == ROMTYPE_ZANZIBAR) { - wp = (uint16 *)(ROMBaseHost + 0x5d87a); - *wp++ = htons(0x203c); // move.l #Hz,d0 - *wp++ = htons(BusClockSpeed >> 16); - *wp++ = htons(BusClockSpeed & 0xffff); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - wp = (uint16 *)(ROMBaseHost + 0x5d888); - *wp++ = htons(0x203c); // move.l #Hz,d0 - *wp++ = htons(CPUClockSpeed >> 16); - *wp++ = htons(CPUClockSpeed & 0xffff); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - } - - // Don't write to GC interrupt mask register (via 0x262) - if (ROMType != ROMTYPE_NEWWORLD) { - static const uint8 gc_mask_dat[] = {0x83, 0xa8, 0x00, 0x24, 0x4e, 0x71}; - if ((base = find_rom_data(0x13000, 0x20000, gc_mask_dat, sizeof(gc_mask_dat))) == 0) return false; - D(bug("gc_mask %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - wp = (uint16 *)(ROMBaseHost + base + 0x40); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - wp = (uint16 *)(ROMBaseHost + base + 0x78); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - wp = (uint16 *)(ROMBaseHost + base + 0x96); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - - static const uint8 gc_mask2_dat[] = {0x02, 0xa8, 0x00, 0x00, 0x00, 0x80, 0x00, 0x24}; - if ((base = find_rom_data(0x13000, 0x20000, gc_mask2_dat, sizeof(gc_mask2_dat))) == 0) return false; - D(bug("gc_mask2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - if (ROMType == ROMTYPE_GOSSAMER) { - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - } - for (int i=0; i<5; i++) { - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - wp += 2; - } - if (ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_GOSSAMER) { - for (int i=0; i<6; i++) { - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - wp += 2; - } - } - } - - // Don't initialize Cuda (via 0x274) - static const uint8 cuda_init_dat[] = {0x08, 0xa9, 0x00, 0x04, 0x16, 0x00, 0x4e, 0x71, 0x13, 0x7c, 0x00, 0x84, 0x1c, 0x00, 0x4e, 0x71}; - if ((base = find_rom_data(0xa000, 0x12000, cuda_init_dat, sizeof(cuda_init_dat))) == 0) return false; - D(bug("cuda_init %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - - // Patch GetCPUSpeed (via 0x27a) (some ROMs have two of them) - static const uint8 cpu_speed_dat[] = {0x20, 0x30, 0x81, 0xf2, 0x5f, 0xff, 0xef, 0xd8, 0x00, 0x04, 0x4c, 0x7c}; - if ((base = find_rom_data(0x6000, 0xa000, cpu_speed_dat, sizeof(cpu_speed_dat))) == 0) return false; - D(bug("cpu_speed %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x203c); // move.l #(MHz<<16)|MHz,d0 - *wp++ = htons(CPUClockSpeed / 1000000); - *wp++ = htons(CPUClockSpeed / 1000000); - *wp = htons(M68K_RTS); - if ((base = find_rom_data(base, 0xa000, cpu_speed_dat, sizeof(cpu_speed_dat))) != 0) { - D(bug("cpu_speed2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x203c); // move.l #(MHz<<16)|MHz,d0 - *wp++ = htons(CPUClockSpeed / 1000000); - *wp++ = htons(CPUClockSpeed / 1000000); - *wp = htons(M68K_RTS); - } - - // Don't poke VIA in InitTimeMgr (via 0x298) - static const uint8 time_via_dat[] = {0x40, 0xe7, 0x00, 0x7c, 0x07, 0x00, 0x28, 0x78, 0x01, 0xd4, 0x43, 0xec, 0x10, 0x00}; - if ((base = find_rom_data(0x30000, 0x40000, time_via_dat, sizeof(time_via_dat))) == 0) return false; - D(bug("time_via %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x4cdf); // movem.l (sp)+,d0-d5/a0-a4 - *wp++ = htons(0x1f3f); - *wp = htons(M68K_RTS); - - // Don't read from 0xff800000 (Name Registry, Open Firmware?) (via 0x2a2) - // Remove this if FE03 works!! - static const uint8 open_firmware_dat[] = {0x2f, 0x79, 0xff, 0x80, 0x00, 0x00, 0x00, 0xfc}; - if ((base = find_rom_data(0x48000, 0x58000, open_firmware_dat, sizeof(open_firmware_dat))) == 0) return false; - D(bug("open_firmware %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x2f7c); // move.l #deadbeef,0xfc(a7) - *wp++ = htons(0xdead); - *wp++ = htons(0xbeef); - *wp = htons(0x00fc); - wp = (uint16 *)(ROMBaseHost + base + 0x1a); - *wp++ = htons(M68K_NOP); // (FE03 opcode, tries to jump to 0xdeadbeef) - *wp = htons(M68K_NOP); - - // Don't EnableExtCache (via 0x2b2) - static const uint8 ext_cache2_dat[] = {0x4f, 0xef, 0xff, 0xec, 0x20, 0x4f, 0x10, 0xbc, 0x00, 0x01, 0x11, 0x7c, 0x00, 0x1b}; - if ((base = find_rom_data(0x13000, 0x20000, ext_cache2_dat, sizeof(ext_cache2_dat))) == 0) return false; - D(bug("ext_cache2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp = htons(M68K_RTS); - - // Don't install Time Manager task for 60Hz interrupt (Enable60HzInts, via 0x2b8) - if (ROMType == ROMTYPE_NEWWORLD || ROMType == ROMTYPE_GOSSAMER) { - static const uint8 tm_task_dat[] = {0x30, 0x3c, 0x4e, 0x2b, 0xa9, 0xc9}; - if ((base = find_rom_data(0x2a0, 0x320, tm_task_dat, sizeof(tm_task_dat))) == 0) return false; - D(bug("tm_task %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 28); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - } else { - static const uint8 tm_task_dat[] = {0x20, 0x3c, 0x73, 0x79, 0x73, 0x61}; - if ((base = find_rom_data(0x280, 0x300, tm_task_dat, sizeof(tm_task_dat))) == 0) return false; - D(bug("tm_task %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base - 6); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - } - - // Don't read PVR from 0x5fffef80 in DriverServicesLib (via 0x316) - if (ROMType != ROMTYPE_NEWWORLD && ROMType != ROMTYPE_GOSSAMER) { - uint32 dsl_offset = find_rom_resource(FOURCC('n','l','i','b'), -16401); - if (ROMType == ROMTYPE_ZANZIBAR) { - static const uint8 dsl_pvr_dat[] = {0x40, 0x82, 0x00, 0x40, 0x38, 0x60, 0xef, 0x80, 0x3c, 0x63, 0x60, 0x00, 0x80, 0x83, 0x00, 0x00, 0x54, 0x84, 0x84, 0x3e}; - if ((base = find_rom_data(dsl_offset, dsl_offset + 0x6000, dsl_pvr_dat, sizeof(dsl_pvr_dat))) == 0) return false; - } else { - static const uint8 dsl_pvr_dat[] = {0x3b, 0xc3, 0x00, 0x00, 0x30, 0x84, 0xff, 0xa0, 0x40, 0x82, 0x00, 0x44, 0x80, 0x84, 0xef, 0xe0, 0x54, 0x84, 0x84, 0x3e}; - if ((base = find_rom_data(dsl_offset, dsl_offset + 0x6000, dsl_pvr_dat, sizeof(dsl_pvr_dat))) == 0) return false; - } - D(bug("dsl_pvr %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base + 12); - *lp = htonl(0x3c800000 | (PVR >> 16)); // lis r4,PVR - - // Don't read bus clock from 0x5fffef88 in DriverServicesLib (via 0x316) - if (ROMType == ROMTYPE_ZANZIBAR) { - static const uint8 dsl_bus_dat[] = {0x81, 0x07, 0x00, 0x00, 0x39, 0x20, 0x42, 0x40, 0x81, 0x62, 0xff, 0x20}; - if ((base = find_rom_data(dsl_offset, dsl_offset + 0x6000, dsl_bus_dat, sizeof(dsl_bus_dat))) == 0) return false; - D(bug("dsl_bus %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x81000000 + XLM_BUS_CLOCK); // lwz r8,(bus clock speed) - } else { - static const uint8 dsl_bus_dat[] = {0x80, 0x83, 0xef, 0xe8, 0x80, 0x62, 0x00, 0x10, 0x7c, 0x04, 0x03, 0x96}; - if ((base = find_rom_data(dsl_offset, dsl_offset + 0x6000, dsl_bus_dat, sizeof(dsl_bus_dat))) == 0) return false; - D(bug("dsl_bus %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x80800000 + XLM_BUS_CLOCK); // lwz r4,(bus clock speed) - } - } - - // Don't open InterruptTreeTNT in MotherBoardHAL init in DriverServicesLib init - if (ROMType == ROMTYPE_ZANZIBAR) { - lp = (uint32 *)(ROMBaseHost + find_rom_resource(FOURCC('n','l','i','b'), -16408) + 0x16c); - *lp = htonl(0x38600000); // li r3,0 - } - - // Don't read from MacPgm in WipeOutMACPGMINFOProcPtrs (StdCLib) - if (1) { - uint32 hpchk_offset = find_rom_resource(FOURCC('n','l','i','b'), 10); - static const uint8 hpchk_dat[] = {0x80, 0x80, 0x03, 0x16, 0x94, 0x21, 0xff, 0xb0, 0x83, 0xc4, 0x00, 0x04}; - if ((base = find_rom_data(hpchk_offset, hpchk_offset + 0x3000, hpchk_dat, sizeof(hpchk_dat))) == 0) return false; - D(bug("macpgm %08lx\n", base)); - lp = (uint32 *)(ROMBaseHost + base); - *lp = htonl(0x80800000 + XLM_ZERO_PAGE); // lwz r4,(zero page) - } - - // Patch Name Registry - static const uint8 name_reg_dat[] = {0x70, 0xff, 0xab, 0xeb}; - if ((base = find_rom_data(0x300, 0x380, name_reg_dat, sizeof(name_reg_dat))) == 0) return false; - D(bug("name_reg %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp = htons(M68K_EMUL_OP_NAME_REGISTRY); - -#if DISABLE_SCSI - // Fake SCSI Manager - // Remove this if SCSI Manager works!! - static const uint8 scsi_mgr_a_dat[] = {0x4e, 0x56, 0x00, 0x00, 0x20, 0x3c, 0x00, 0x00, 0x04, 0x0c, 0xa7, 0x1e}; - static const uint8 scsi_mgr_b_dat[] = {0x4e, 0x56, 0x00, 0x00, 0x2f, 0x0c, 0x20, 0x3c, 0x00, 0x00, 0x04, 0x0c, 0xa7, 0x1e}; - if ((base = find_rom_data(0x1c000, 0x28000, scsi_mgr_a_dat, sizeof(scsi_mgr_a_dat))) == 0) { - if ((base = find_rom_data(0x1c000, 0x28000, scsi_mgr_b_dat, sizeof(scsi_mgr_b_dat))) == 0) return false; - } - D(bug("scsi_mgr %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x21fc); // move.l #xxx,0x624 (SCSIAtomic) - *wp++ = htons((ROMBase + base + 18) >> 16); - *wp++ = htons((ROMBase + base + 18) & 0xffff); - *wp++ = htons(0x0624); - *wp++ = htons(0x21fc); // move.l #xxx,0xe54 (SCSIDispatch) - *wp++ = htons((ROMBase + base + 22) >> 16); - *wp++ = htons((ROMBase + base + 22) & 0xffff); - *wp++ = htons(0x0e54); - *wp++ = htons(M68K_RTS); - *wp++ = htons(M68K_EMUL_OP_SCSI_ATOMIC); - *wp++ = htons(M68K_RTS); - *wp++ = htons(M68K_EMUL_OP_SCSI_DISPATCH); - *wp = htons(0x4ed0); // jmp (a0) - wp = (uint16 *)(ROMBaseHost + base + 0x20); - *wp++ = htons(0x7000); // moveq #0,d0 - *wp = htons(M68K_RTS); -#endif - -#if DISABLE_SCSI - // Don't access SCSI variables - // Remove this if SCSI Manager works!! - if (ROMType == ROMTYPE_NEWWORLD) { - static const uint8 scsi_var_dat[] = {0x70, 0x01, 0xa0, 0x89, 0x4a, 0x6e, 0xfe, 0xac, 0x4f, 0xef, 0x00, 0x10, 0x66, 0x00}; - if ((base = find_rom_data(0x1f500, 0x1f600, scsi_var_dat, sizeof(scsi_var_dat))) != 0) { - D(bug("scsi_var %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 12); - *wp = htons(0x6000); // bra - } - - static const uint8 scsi_var2_dat[] = {0x4e, 0x56, 0xfc, 0x58, 0x48, 0xe7, 0x1f, 0x38}; - if ((base = find_rom_data(0x1f700, 0x1f800, scsi_var2_dat, sizeof(scsi_var2_dat))) != 0) { - D(bug("scsi_var2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x7000); // moveq #0,d0 - *wp = htons(M68K_RTS); - } - } - else if (ROMType == ROMTYPE_GOSSAMER) { - static const uint8 scsi_var_dat[] = {0x70, 0x01, 0xa0, 0x89, 0x4a, 0x6e, 0xfe, 0xac, 0x4f, 0xef, 0x00, 0x10, 0x66, 0x00}; - if ((base = find_rom_data(0x1d700, 0x1d800, scsi_var_dat, sizeof(scsi_var_dat))) != 0) { - D(bug("scsi_var %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 12); - *wp = htons(0x6000); // bra - } - - static const uint8 scsi_var2_dat[] = {0x4e, 0x56, 0xfc, 0x5a, 0x48, 0xe7, 0x1f, 0x38}; - if ((base = find_rom_data(0x1d900, 0x1da00, scsi_var2_dat, sizeof(scsi_var2_dat))) != 0) { - D(bug("scsi_var2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x7000); // moveq #0,d0 - *wp = htons(M68K_RTS); - } - } -#endif - - // Don't wait in ADBInit (via 0x36c) - static const uint8 adb_init_dat[] = {0x08, 0x2b, 0x00, 0x05, 0x01, 0x5d, 0x66, 0xf8}; - if ((base = find_rom_data(0x31000, 0x3d000, adb_init_dat, sizeof(adb_init_dat))) == 0) return false; - D(bug("adb_init %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 6); - *wp = htons(M68K_NOP); - - // Modify check in InitResources() so that addresses >0x80000000 work - static const uint8 init_res_dat[] = {0x4a, 0xb8, 0x0a, 0x50, 0x6e, 0x20}; - if ((base = find_rom_data(0x78000, 0x8c000, init_res_dat, sizeof(init_res_dat))) == 0) return false; - D(bug("init_res %08lx\n", base)); - bp = (uint8 *)(ROMBaseHost + base + 4); - *bp = 0x66; - - // Modify vCheckLoad() so that we can patch resources (68k Resource Manager) - static const uint8 check_load_dat[] = {0x20, 0x78, 0x07, 0xf0, 0x4e, 0xd0}; - if ((base = find_rom_data(0x78000, 0x8c000, check_load_dat, sizeof(check_load_dat))) == 0) return false; - D(bug("check_load %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(M68K_JMP); - *wp++ = htons((ROMBase + CHECK_LOAD_PATCH_SPACE) >> 16); - *wp = htons((ROMBase + CHECK_LOAD_PATCH_SPACE) & 0xffff); - wp = (uint16 *)(ROMBaseHost + CHECK_LOAD_PATCH_SPACE); - *wp++ = htons(0x2f03); // move.l d3,-(a7) - *wp++ = htons(0x2078); // move.l $07f0,a0 - *wp++ = htons(0x07f0); - *wp++ = htons(M68K_JSR_A0); - *wp++ = htons(M68K_EMUL_OP_CHECKLOAD); - *wp = htons(M68K_RTS); - - // Replace .Sony driver - sony_offset = find_rom_resource(FOURCC('D','R','V','R'), 4); - if (ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_NEWWORLD) - sony_offset = find_rom_resource(FOURCC('D','R','V','R'), 4, true); // First DRVR 4 is .MFMFloppy - if (sony_offset == 0) { - sony_offset = find_rom_resource(FOURCC('n','d','r','v'), -20196); // NewWorld 1.6 has "PCFloppy" ndrv - if (sony_offset == 0) - return false; - lp = (uint32 *)(ROMBaseHost + rsrc_ptr + 8); - *lp = htonl(FOURCC('D','R','V','R')); - wp = (uint16 *)(ROMBaseHost + rsrc_ptr + 12); - *wp = htons(4); - } - D(bug("sony_offset %08lx\n", sony_offset)); - memcpy((void *)(ROMBaseHost + sony_offset), sony_driver, sizeof(sony_driver)); - - // Install .Disk and .AppleCD drivers - memcpy((void *)(ROMBaseHost + sony_offset + 0x100), disk_driver, sizeof(disk_driver)); - memcpy((void *)(ROMBaseHost + sony_offset + 0x200), cdrom_driver, sizeof(cdrom_driver)); - - // Install serial drivers - gen_ain_driver( ROMBase + sony_offset + 0x300); - gen_aout_driver(ROMBase + sony_offset + 0x400); - gen_bin_driver( ROMBase + sony_offset + 0x500); - gen_bout_driver(ROMBase + sony_offset + 0x600); - - // Copy icons to ROM - SonyDiskIconAddr = ROMBase + sony_offset + 0x800; - memcpy(ROMBaseHost + sony_offset + 0x800, SonyDiskIcon, sizeof(SonyDiskIcon)); - SonyDriveIconAddr = ROMBase + sony_offset + 0xa00; - memcpy(ROMBaseHost + sony_offset + 0xa00, SonyDriveIcon, sizeof(SonyDriveIcon)); - DiskIconAddr = ROMBase + sony_offset + 0xc00; - memcpy(ROMBaseHost + sony_offset + 0xc00, DiskIcon, sizeof(DiskIcon)); - CDROMIconAddr = ROMBase + sony_offset + 0xe00; - memcpy(ROMBaseHost + sony_offset + 0xe00, CDROMIcon, sizeof(CDROMIcon)); - - // Patch driver install routine - static const uint8 drvr_install_dat[] = {0xa7, 0x1e, 0x21, 0xc8, 0x01, 0x1c, 0x4e, 0x75}; - if ((base = find_rom_data(0xb00, 0xd00, drvr_install_dat, sizeof(drvr_install_dat))) == 0) return false; - D(bug("drvr_install %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base + 8); - *wp++ = htons(M68K_EMUL_OP_INSTALL_DRIVERS); - *wp = htons(M68K_RTS); - - // Don't install serial drivers from ROM - if (ROMType == ROMTYPE_ZANZIBAR || ROMType == ROMTYPE_NEWWORLD || ROMType == ROMTYPE_GOSSAMER) { - wp = (uint16 *)(ROMBaseHost + find_rom_resource(FOURCC('S','E','R','D'), 0)); - *wp = htons(M68K_RTS); - } else { - wp = (uint16 *)(ROMBaseHost + find_rom_resource(FOURCC('s','l','0','5'), 2) + 0xc4); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(0x7000); // moveq #0,d0 - wp = (uint16 *)(ROMBaseHost + find_rom_resource(FOURCC('s','l','0','5'), 2) + 0x8ee); - *wp = htons(M68K_NOP); - } - uint32 nsrd_offset = find_rom_resource(FOURCC('n','s','r','d'), 1); - if (nsrd_offset) { - lp = (uint32 *)(ROMBaseHost + rsrc_ptr + 8); - *lp = htonl(FOURCC('x','s','r','d')); - } - - // Replace ADBOp() - memcpy(ROMBaseHost + find_rom_trap(0xa07c), adbop_patch, sizeof(adbop_patch)); - - // Replace Time Manager - wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa058)); - *wp++ = htons(M68K_EMUL_OP_INSTIME); - *wp = htons(M68K_RTS); - wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa059)); - *wp++ = htons(0x40e7); // move sr,-(sp) - *wp++ = htons(0x007c); // ori #$0700,sr - *wp++ = htons(0x0700); - *wp++ = htons(M68K_EMUL_OP_RMVTIME); - *wp++ = htons(0x46df); // move (sp)+,sr - *wp = htons(M68K_RTS); - wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa05a)); - *wp++ = htons(0x40e7); // move sr,-(sp) - *wp++ = htons(0x007c); // ori #$0700,sr - *wp++ = htons(0x0700); - *wp++ = htons(M68K_EMUL_OP_PRIMETIME); - *wp++ = htons(0x46df); // move (sp)+,sr - *wp = htons(M68K_RTS); - wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa093)); - *wp++ = htons(M68K_EMUL_OP_MICROSECONDS); - *wp = htons(M68K_RTS); - - // Disable Egret Manager - static const uint8 egret_dat[] = {0x2f, 0x30, 0x81, 0xe2, 0x20, 0x10, 0x00, 0x18}; - if ((base = find_rom_data(0xa000, 0x10000, egret_dat, sizeof(egret_dat))) == 0) return false; - D(bug("egret %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - *wp++ = htons(0x7000); - *wp = htons(M68K_RTS); - - // Don't call FE0A opcode in Shutdown Manager - static const uint8 shutdown_dat[] = {0x40, 0xe7, 0x00, 0x7c, 0x07, 0x00, 0x48, 0xe7, 0x3f, 0x00, 0x2c, 0x00, 0x2e, 0x01}; - if ((base = find_rom_data(0x30000, 0x40000, shutdown_dat, sizeof(shutdown_dat))) == 0) return false; - D(bug("shutdown %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); - if (ROMType == ROMTYPE_ZANZIBAR) - *wp = htons(M68K_RTS); - else if (ntohs(wp[-4]) == 0x61ff) - *wp = htons(M68K_RTS); - else if (ntohs(wp[-2]) == 0x6700) - wp[-2] = htons(0x6000); // bra - - // Patch PowerOff() - wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa05b)); // PowerOff() - *wp = htons(M68K_EMUL_RETURN); - - // Patch VIA interrupt handler - static const uint8 via_int_dat[] = {0x70, 0x7f, 0xc0, 0x29, 0x1a, 0x00, 0xc0, 0x29, 0x1c, 0x00}; - if ((base = find_rom_data(0x13000, 0x1c000, via_int_dat, sizeof(via_int_dat))) == 0) return false; - D(bug("via_int %08lx\n", base)); - uint32 level1_int = ROMBase + base; - wp = (uint16 *)(ROMBaseHost + base); // Level 1 handler - *wp++ = htons(0x7002); // moveq #2,d0 (60Hz interrupt) - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); - - static const uint8 via_int2_dat[] = {0x13, 0x7c, 0x00, 0x02, 0x1a, 0x00, 0x4e, 0x71, 0x52, 0xb8, 0x01, 0x6a}; - if ((base = find_rom_data(0x10000, 0x18000, via_int2_dat, sizeof(via_int2_dat))) == 0) return false; - D(bug("via_int2 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); // 60Hz handler - *wp++ = htons(M68K_EMUL_OP_IRQ); - *wp++ = htons(0x4a80); // tst.l d0 - *wp++ = htons(0x6700); // beq xxx - *wp = htons(0xffe8); - - if (ROMType == ROMTYPE_NEWWORLD) { - static const uint8 via_int3_dat[] = {0x48, 0xe7, 0xf0, 0xf0, 0x76, 0x01, 0x60, 0x26}; - if ((base = find_rom_data(0x15000, 0x19000, via_int3_dat, sizeof(via_int3_dat))) == 0) return false; - D(bug("via_int3 %08lx\n", base)); - wp = (uint16 *)(ROMBaseHost + base); // CHRP level 1 handler - *wp++ = htons(M68K_JMP); - *wp++ = htons((level1_int - 12) >> 16); - *wp = htons((level1_int - 12) & 0xffff); - } - - // Patch ZeroScrap() for clipboard exchange with host OS - uint32 zero_scrap = find_rom_trap(0xa9fc); // ZeroScrap() - wp = (uint16 *)(ROMBaseHost + ZERO_SCRAP_PATCH_SPACE); - *wp++ = htons(M68K_EMUL_OP_ZERO_SCRAP); - *wp++ = htons(M68K_JMP); - *wp++ = htons((ROMBase + zero_scrap) >> 16); - *wp++ = htons((ROMBase + zero_scrap) & 0xffff); - base = ROMBase + ReadMacInt32(ROMBase + 0x22); - WriteMacInt32(base + 4 * (0xa9fc & 0x3ff), ZERO_SCRAP_PATCH_SPACE); - - // Patch PutScrap() for clipboard exchange with host OS - uint32 put_scrap = find_rom_trap(0xa9fe); // PutScrap() - wp = (uint16 *)(ROMBaseHost + PUT_SCRAP_PATCH_SPACE); - *wp++ = htons(M68K_EMUL_OP_PUT_SCRAP); - *wp++ = htons(M68K_JMP); - *wp++ = htons((ROMBase + put_scrap) >> 16); - *wp++ = htons((ROMBase + put_scrap) & 0xffff); - base = ROMBase + ReadMacInt32(ROMBase + 0x22); - WriteMacInt32(base + 4 * (0xa9fe & 0x3ff), PUT_SCRAP_PATCH_SPACE); - - // Patch GetScrap() for clipboard exchange with host OS - uint32 get_scrap = find_rom_trap(0xa9fd); // GetScrap() - wp = (uint16 *)(ROMBaseHost + GET_SCRAP_PATCH_SPACE); - *wp++ = htons(M68K_EMUL_OP_GET_SCRAP); - *wp++ = htons(M68K_JMP); - *wp++ = htons((ROMBase + get_scrap) >> 16); - *wp++ = htons((ROMBase + get_scrap) & 0xffff); - base = ROMBase + ReadMacInt32(ROMBase + 0x22); - WriteMacInt32(base + 4 * (0xa9fd & 0x3ff), GET_SCRAP_PATCH_SPACE); - - // Patch SynchIdleTime() - if (PrefsFindBool("idlewait")) { - base = find_rom_trap(0xabf7) + 4; // SynchIdleTime() - wp = (uint16 *)(ROMBaseHost + base); - D(bug("SynchIdleTime at %08lx\n", base)); - if (ntohs(*wp) == 0x2078) { // movea.l ExpandMem,a0 - *wp++ = htons(M68K_EMUL_OP_IDLE_TIME); - *wp = htons(M68K_NOP); - } - else if (ntohs(*wp) == 0x70fe) // moveq #-2,d0 - *wp++ = htons(M68K_EMUL_OP_IDLE_TIME_2); - else { - D(bug("SynchIdleTime patch not installed\n")); - } - } - - // Construct list of all sifters used by sound components in ROM - D(bug("Searching for sound components with type sdev in ROM\n")); - uint32 thing = find_rom_resource(FOURCC('t','h','n','g')); - while (thing) { - thing += ROMBase; - D(bug(" found %c%c%c%c %c%c%c%c\n", ReadMacInt8(thing), ReadMacInt8(thing + 1), ReadMacInt8(thing + 2), ReadMacInt8(thing + 3), ReadMacInt8(thing + 4), ReadMacInt8(thing + 5), ReadMacInt8(thing + 6), ReadMacInt8(thing + 7))); - if (ReadMacInt32(thing) == FOURCC('s','d','e','v') && ReadMacInt32(thing + 4) == FOURCC('s','i','n','g')) { - WriteMacInt32(thing + 4, FOURCC('a','w','g','c')); - D(bug(" found sdev component at offset %08x in ROM\n", thing)); - AddSifter(ReadMacInt32(thing + componentResType), ReadMacInt16(thing + componentResID)); - if (ReadMacInt32(thing + componentPFCount)) - AddSifter(ReadMacInt32(thing + componentPFResType), ReadMacInt16(thing + componentPFResID)); - } - thing = find_rom_resource(FOURCC('t','h','n','g'), 4711, true); - } - - // Patch component code - D(bug("Patching sifters in ROM\n")); - for (int i=0; i pb_var; - const uintptr pb = pb_var.addr(); - -#if DISABLE_SCSI - // Setup fake SCSI Globals - r.d[0] = 0x1000; - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32 scsi_globals = r.a[0]; - D(bug("Fake SCSI globals at %08lx\n", scsi_globals)); - WriteMacInt32(0xc0c, scsi_globals); // Set SCSIGlobals -#endif - - // Install floppy driver - if (ROMType == ROMTYPE_NEWWORLD || ROMType == ROMTYPE_GOSSAMER) { - - // Force installation of floppy driver with NewWorld and Gossamer ROMs - r.a[0] = ROMBase + sony_offset; - r.d[0] = (uint32)SonyRefNum; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~SonyRefNum * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - uint32 dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset); - WriteMacInt16(dce + dCtlFlags, SonyDriverFlags); - } - - // Open .Sony driver - SheepString sony_str("\005.Sony"); - WriteMacInt8(pb + ioPermssn, 0); - WriteMacInt32(pb + ioNamePtr, sony_str.addr()); - r.a[0] = pb; - Execute68kTrap(0xa000, &r); // Open() - - // Install disk driver - r.a[0] = ROMBase + sony_offset + 0x100; - r.d[0] = (uint32)DiskRefNum; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~DiskRefNum * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - uint32 dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x100); - WriteMacInt16(dce + dCtlFlags, DiskDriverFlags); - - // Open disk driver - SheepString disk_str("\005.Disk"); - WriteMacInt32(pb + ioNamePtr, disk_str.addr()); - r.a[0] = pb; - Execute68kTrap(0xa000, &r); // Open() - - // Install CD-ROM driver unless nocdrom option given - if (!PrefsFindBool("nocdrom")) { - - // Install CD-ROM driver - r.a[0] = ROMBase + sony_offset + 0x200; - r.d[0] = (uint32)CDROMRefNum; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~CDROMRefNum * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x200); - WriteMacInt16(dce + dCtlFlags, CDROMDriverFlags); - - // Open CD-ROM driver - SheepString apple_cd("\010.AppleCD"); - WriteMacInt32(pb + ioNamePtr, apple_cd.addr()); - r.a[0] = pb; - Execute68kTrap(0xa000, &r); // Open() - } - - // Install serial drivers - r.a[0] = ROMBase + sony_offset + 0x300; - r.d[0] = (uint32)-6; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~(-6) * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x300); - WriteMacInt16(dce + dCtlFlags, 0x4d00); - - r.a[0] = ROMBase + sony_offset + 0x400; - r.d[0] = (uint32)-7; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~(-7) * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x400); - WriteMacInt16(dce + dCtlFlags, 0x4e00); - - r.a[0] = ROMBase + sony_offset + 0x500; - r.d[0] = (uint32)-8; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~(-8) * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x500); - WriteMacInt16(dce + dCtlFlags, 0x4d00); - - r.a[0] = ROMBase + sony_offset + 0x600; - r.d[0] = (uint32)-9; - Execute68kTrap(0xa43d, &r); // DrvrInstallRsrvMem() - r.a[0] = ReadMacInt32(ReadMacInt32(0x11c) + ~(-9) * 4); // Get driver handle from Unit Table - Execute68kTrap(0xa029, &r); // HLock() - dce = ReadMacInt32(r.a[0]); - WriteMacInt32(dce + dCtlDriver, ROMBase + sony_offset + 0x600); - WriteMacInt16(dce + dCtlFlags, 0x4e00); -} diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp deleted file mode 100644 index 8bf0ac4ff..000000000 --- a/SheepShaver/src/rsrc_patches.cpp +++ /dev/null @@ -1,1051 +0,0 @@ -/* - * rsrc_patches.cpp - Resource patches - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include - -#include "sysdeps.h" -#include "rsrc_patches.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "main.h" -#include "audio.h" -#include "audio_defs.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// Sound input driver -static const uint8 sound_input_driver[] = { // .AppleSoundInput driver header - // Driver header - 0x4d, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x24, // Open() offset - 0x00, 0x28, // Prime() offset - 0x00, 0x2c, // Control() offset - 0x00, 0x38, // Status() offset - 0x00, 0x5e, // Close() offset - 0x10, 0x2e, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x53, 0x6f, 0x75, 0x6e, 0x64, 0x49, 0x6e, 0x70, 0x75, 0x74, 0x00, // ".AppleSoundInput" - - // Open() - M68K_EMUL_OP_SOUNDIN_OPEN >> 8, M68K_EMUL_OP_SOUNDIN_OPEN & 0xff, - 0x4e, 0x75, // rts - - // Prime() - M68K_EMUL_OP_SOUNDIN_PRIME >> 8, M68K_EMUL_OP_SOUNDIN_PRIME & 0xff, - 0x60, 0x0e, // bra IOReturn - - // Control() - M68K_EMUL_OP_SOUNDIN_CONTROL >> 8, M68K_EMUL_OP_SOUNDIN_CONTROL & 0xff, - 0x0c, 0x68, 0x00, 0x01, 0x00, 0x1a, // cmp.w #1,$1a(a0) - 0x66, 0x04, // bne IOReturn - 0x4e, 0x75, // rts - - // Status() - M68K_EMUL_OP_SOUNDIN_STATUS >> 8, M68K_EMUL_OP_SOUNDIN_STATUS & 0xff, - - // IOReturn - 0x32, 0x28, 0x00, 0x06, // move.w 6(a0),d1 - 0x08, 0x01, 0x00, 0x09, // btst #9,d1 - 0x67, 0x0c, // beq 1 - 0x4a, 0x40, // tst.w d0 - 0x6f, 0x02, // ble 2 - 0x42, 0x40, // clr.w d0 - 0x31, 0x40, 0x00, 0x10, //2 move.w d0,$10(a0) - 0x4e, 0x75, // rts - 0x4a, 0x40, //1 tst.w d0 - 0x6f, 0x04, // ble 3 - 0x42, 0x40, // clr.w d0 - 0x4e, 0x75, // rts - 0x2f, 0x38, 0x08, 0xfc, //3 move.l $8fc,-(sp) - 0x4e, 0x75, // rts - - // Close() - M68K_EMUL_OP_SOUNDIN_CLOSE >> 8, M68K_EMUL_OP_SOUNDIN_CLOSE & 0xff, - 0x4e, 0x75, // rts -}; - - -/* - * Search resource for byte string, return offset (or 0) - */ - -static uint32 find_rsrc_data(const uint8 *rsrc, uint32 max, const uint8 *search, uint32 search_len, uint32 ofs = 0) -{ - while (ofs < max - search_len) { - if (!memcmp(rsrc + ofs, search, search_len)) - return ofs; - ofs++; - } - return 0; -} - - -/* - * Resource patches via vCheckLoad - */ - -// 680x0 code pattern matching helper -#define PM(N, V) (p[N] == htons(V)) - -void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) -{ - uint16 *p16; - uint32 base; - D(bug("vCheckLoad %c%c%c%c (%08x) ID %d, data %p, size %d\n", type >> 24, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff, type, id, p, size)); - - // Don't modify resources in ROM - if ((uintptr)p >= (uintptr)ROMBaseHost && (uintptr)p <= (uintptr)(ROMBaseHost + ROM_SIZE)) - return; - - if (type == FOURCC('b','o','o','t') && id == 3) { - D(bug("boot 3 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x51c9) && PM(2,0x2e49)) { - // Set boot stack pointer (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) - p[2] = htons(M68K_EMUL_OP_FIX_BOOTSTACK); - D(bug(" patch 1 applied\n")); - } else if (PM(0,0x4267) && PM(1,0x3f01) && PM(2,0x3f2a) && PM(3,0x0006) && PM(4,0x6100)) { - // Check when ntrb 17 is installed (for native Resource Manager patch) (7.5.3, 7.5.5) - p[7] = htons(M68K_EMUL_OP_NTRB_17_PATCH3); - D(bug(" patch 2 applied\n")); - } else if (PM(0,0x3f2a) && PM(1,0x0006) && PM(2,0x3f2a) && PM(3,0x0002) && PM(4,0x6100)) { - // Check when ntrb 17 is installed (for native Resource Manager patch) (7.6, 7.6.1, 8.0, 8.1) - p[7] = htons(M68K_EMUL_OP_NTRB_17_PATCH); - D(bug(" patch 3 applied\n")); - } else if (PM(0,0x3f2a) && PM(1,0x0006) && PM(2,0x3f2a) && PM(3,0x0002) && PM(4,0x61ff) && PM(8,0x245f)) { - // Check when ntrb 17 is installed (for native Resource Manager patch) (8.5, 8.6) - p[8] = htons(M68K_EMUL_OP_NTRB_17_PATCH); - D(bug(" patch 4 applied\n")); - } else if (PM(0,0x3f2a) && PM(1,0x0006) && PM(2,0x3f2a) && PM(3,0x0002) && PM(4,0x61ff) && PM(7,0x301f)) { - // Check when ntrb 17 is installed (for native Resource Manager patch) (9.0) - p[7] = htons(M68K_EMUL_OP_NTRB_17_PATCH4); - p[8] = htons(ntohs(p[8]) & 0xf0ff); // bra - D(bug(" patch 5 applied\n")); - } else if (PM(0,0x0c39) && PM(1,0x0001) && PM(2,0xf800) && PM(3,0x0008) && PM(4,0x6f00)) { - // Don't read from 0xf8000008 (8.5 with Zanzibar ROM, 8.6, 9.0) - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(0x6000); // bra - D(bug(" patch 6 applied\n")); - } else if (PM(0,0x2f3c) && PM(1,0x6b72) && PM(2,0x6e6c) && PM(3,0x4267) && PM(4,0xa9a0) && PM(5,0x265f) && PM(6,0x200b) && PM(7,0x6700)) { - // Don't replace nanokernel ("krnl" resource) (8.6, 9.0) - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(M68K_NOP); - p[7] = htons(0x6000); // bra - D(bug(" patch 7 applied\n")); - } else if (PM(0,0xa8fe) && PM(1,0x3038) && PM(2,0x017a) && PM(3,0x0c40) && PM(4,0x8805) && PM(5,0x6710)) { - // No SCSI (calls via 0x205c jump vector which is not initialized in NewWorld ROM 1.6) (8.6) - if (ROMType == ROMTYPE_NEWWORLD) { - p[5] = htons(0x6010); // bra - D(bug(" patch 8 applied\n")); - } - } else if (PM(0,0x2f3c) && PM(1,0x7665) && PM(2,0x7273) && PM(3,0x3f3c) && PM(4,0x0001) && PM(10,0x2041) && PM(11,0x2248) && PM(12,0x2050) && PM(20,0x7066) && PM(21,0xa9c9)) { - // Check when vers 1 is installed (for safe abort if MacOS < 8.1 is used with a NewWorld ROM) - p[10] = htons(M68K_EMUL_OP_CHECK_SYSV); - p[11] = htons(0x4a81); // tst.l d1 - p[12] = htons(0x670e); // beq.s - D(bug(" patch 9 applied\n")); - } - p++; - } - - } else if (type == FOURCC('g','n','l','d') && id == 0) { - D(bug("gnld 0 found\n")); - - // Patch native Resource Manager after ntrbs are installed (7.5.2) - static const uint8 dat[] = {0x4e, 0xba, 0x00, 0x9e, 0x3e, 0x00, 0x50, 0x4f, 0x67, 0x04}; - base = find_rsrc_data((uint8 *)p, size, dat, sizeof(dat)); - if (base) { - p16 = (uint16 *)((uintptr)p + base + 6); - *p16 = htons(M68K_EMUL_OP_NTRB_17_PATCH2); - D(bug(" patch 1 applied\n")); - } - - } else if (type == FOURCC('p','t','c','h') && id == 156) { - D(bug("ptch 156 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x4e56) && PM(1,0xfffa) && PM(2,0x48e7) && PM(3,0x1f18) && PM(4,0x7800) && PM(5,0x267c) && PM(6,0x6900) && PM(7,0x0000)) { - // Don't call FE0A opcode (9.0) - p[0] = htons(0x7000); // moveq #0,d0 - p[1] = htons(M68K_RTS); - D(bug(" patch 1 applied\n")); - break; - } - p++; - } - - } else if (type == FOURCC('p','t','c','h') && id == 420) { - D(bug("ptch 420 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0xa030) && PM(1,0x5240) && PM(2,0x303c) && PM(3,0x0100) && PM(4,0xc06e) && PM(5,0xfef6)) { - // Disable VM (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1) - p[1] = htons(M68K_NOP); - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(M68K_NOP); - p[5] = htons(M68K_NOP); - p[6] = htons(M68K_NOP); - p[7] = htons(M68K_NOP); - p[8] = htons(M68K_NOP); - p[9] = htons(M68K_NOP); - p[10] = htons(M68K_NOP); - p[11] = htons(M68K_NOP); - D(bug(" patch 1 applied\n")); - break; - } else if (PM(0,0xa030) && PM(1,0x5240) && PM(2,0x7000) && PM(3,0x302e) && PM(4,0xfef6) && PM(5,0x323c) && PM(6,0x0100)) { - // Disable VM (8.0, 8.1) - p[8] = htons(M68K_NOP); - p[15] = htons(M68K_NOP); - D(bug(" patch 2 applied\n")); - break; - } else if (PM(0,0xa030) && PM(1,0x5240) && PM(2,0x7000) && PM(3,0x302e) && PM(4,0xfecc) && PM(5,0x323c) && PM(6,0x0100)) { - // Disable VM (8.5, 8.6, 9.0) - p[8] = htons(M68K_NOP); - p[15] = htons(M68K_NOP); - D(bug(" patch 3 applied\n")); - break; - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 16) { - D(bug("gpch 16 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x6700) && PM(13,0x7013) && PM(14,0xfe0a)) { - // Don't call FE0A in Shutdown Manager (7.6.1, 8.0, 8.1, 8.5) - p[0] = htons(0x6000); - D(bug(" patch 1 applied\n")); - break; - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 650) { - D(bug("gpch 650 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x6600) && PM(1,0x001a) && PM(2,0x2278) && PM(3,0x0134)) { - // We don't have SonyVars (7.5.2) - p[0] = htons(0x6000); - D(bug(" patch 1 applied\n")); - } else if (PM(0,0x6618) && PM(1,0x2278) && PM(2,0x0134)) { - // We don't have SonyVars (7.5.3) - p[-6] = htons(M68K_NOP); - p[-3] = htons(M68K_NOP); - p[0] = htons(0x6018); - D(bug(" patch 2 applied\n")); - } else if (PM(0,0x6660) && PM(1,0x2278) && PM(2,0x0134)) { - // We don't have SonyVars (7.5.3 Revision 2.2) - p[-6] = htons(M68K_NOP); - p[-3] = htons(M68K_NOP); - p[0] = htons(0x6060); - D(bug(" patch 3 applied\n")); - } else if (PM(0,0x666e) && PM(1,0x2278) && PM(2,0x0134)) { - // We don't have SonyVars (7.5.5) - p[-6] = htons(M68K_NOP); - p[-3] = htons(M68K_NOP); - p[0] = htons(0x606e); - D(bug(" patch 4 applied\n")); - } else if (PM(0,0x6400) && PM(1,0x011c) && PM(2,0x2278) && PM(3,0x0134)) { - // We don't have SonyVars (7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) - p[0] = htons(0x6000); - D(bug(" patch 5 applied\n")); - } else if (PM(0,0x6400) && PM(1,0x00e6) && PM(2,0x2278) && PM(3,0x0134)) { - // We don't have SonyVars (7.6) - p[0] = htons(0x6000); - D(bug(" patch 6 applied\n")); - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 655) { - D(bug("gpch 655 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x83a8) && PM(1,0x0024) && PM(2,0x4e71)) { - // Don't write to GC interrupt mask (7.6, 7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - D(bug(" patch 1 applied\n")); - } else if (PM(0,0x207c) && PM(1,0xf300) && PM(2,0x0034)) { - // Don't read PowerMac ID (7.6, 7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(0x303c); // move.w #id,d0 - p[1] = htons(0x3020); - p[2] = htons(M68K_RTS); - D(bug(" patch 2 applied\n")); - } else if (PM(0,0x13fc) && PM(1,0x0081) && PM(2,0xf130) && PM(3,0xa030)) { - // Don't write to hardware (7.6, 7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - D(bug(" patch 3 applied\n")); - } else if (PM(0,0x4e56) && PM(1,0x0000) && PM(2,0x227c) && PM(3,0xf800) && PM(4,0x0000)) { - // OpenFirmare? (7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_RTS); - D(bug(" patch 4 applied\n")); - } else if (PM(0,0x4e56) && PM(1,0xfffc) && PM(2,0x48e7) && PM(3,0x0300) && PM(4,0x598f) && PM(5,0x2eb8) && PM(6,0x01dc)) { - // Don't write to SCC (7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_RTS); - D(bug(" patch 5 applied\n")); - } else if (PM(0,0x4e56) && PM(1,0x0000) && PM(2,0x227c) && PM(3,0xf300) && PM(4,0x0034)) { - // Don't write to GC (7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_RTS); - D(bug(" patch 6 applied\n")); - } else if (PM(0,0x40e7) && PM(1,0x007c) && PM(2,0x0700) && PM(3,0x48e7) && PM(4,0x00c0) && PM(5,0x2078) && PM(6,0x0dd8) && PM(7,0xd1e8) && PM(8,0x0044) && PM(9,0x8005) && PM(11,0x93c8) && PM(12,0x2149) && PM(13,0x0024)) { - // Don't replace NVRAM routines (7.6, 7.6.1, 8.0, 8.1 with Zanzibar ROM) - p[0] = htons(M68K_RTS); - D(bug(" patch 7 applied\n")); - } else if (PM(0,0x207c) && PM(1,0x50f1) && PM(2,0xa101) && (PM(3,0x08d0) || PM(3,0x0890))) { - // Don't write to 0x50f1a101 (8.1 with Zanzibar ROM) - p[3] = htons(M68K_NOP); - p[4] = htons(M68K_NOP); - D(bug(" patch 8 applied\n")); - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 750) { - D(bug("gpch 750 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0xf301) && PM(1,0x9100) && PM(2,0x0c11) && PM(3,0x0044)) { - // Don't read from 0xf3019100 (MACE ENET) (7.6, 7.6.1, 8.0, 8.1) - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(0x6026); - D(bug(" patch 1 applied\n")); - } else if (PM(0,0x41e8) && PM(1,0x0374) && PM(2,0xfc1e)) { - // Don't call FC1E opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6) - p[2] = htons(M68K_NOP); - D(bug(" patch 2 applied\n")); - } else if (PM(0,0x700a) && PM(1,0xfe0a)) { - // Don't call FE0A opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) - p[1] = htons(0x2008); // move.l a0,d0 - D(bug(" patch 3 applied\n")); - } else if (PM(0,0x6c00) && PM(1,0x016a) && PM(2,0x2278) && PM(3,0x0134)) { - // We don't have SonyVars (8.6) - p[-4] = htons(0x21fc); // move.l $40810000,($0000) - p[-3] = htons(0x4081); - p[-2] = htons(0x0000); - p[-1] = htons(0x0000); - p[0] = htons(0x6000); - D(bug(" patch 4 applied\n")); - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 999) { - D(bug("gpch 999 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0xf301) && PM(1,0x9100) && PM(2,0x0c11) && PM(3,0x0044)) { - // Don't read from 0xf3019100 (MACE ENET) (8.5, 8.6) - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(0x6026); - D(bug(" patch 1 applied\n")); - } - p++; - } - - } else if (type == FOURCC('g','p','c','h') && id == 3000) { - D(bug("gpch 3000 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0xf301) && PM(1,0x9100) && PM(2,0x0c11) && PM(3,0x0044)) { - // Don't read from 0xf3019100 (MACE ENET) (8.1 with NewWorld ROM) - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(0x6026); - D(bug(" patch 1 applied\n")); - } - p++; - } - - } else if (type == FOURCC('l','t','l','k') && id == 0) { - D(bug("ltlk 0 found\n")); -#if 1 - size >>= 1; - while (size--) { - if (PM(0,0xc2fc) && PM(1,0x0fa0) && PM(2,0x82c5)) { - // Prevent division by 0 in speed test (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[2] = htons(0x7200); - WriteMacInt32(0x1d8, 0x2c00); - WriteMacInt32(0x1dc, 0x2c00); - D(bug(" patch 1 applied\n")); - } else if (PM(0,0x1418) && PM(1,0x84c1)) { - // Prevent division by 0 (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[1] = htons(0x7400); - D(bug(" patch 2 applied\n")); - } else if (PM(0,0x2678) && PM(1,0x01dc) && PM(2,0x3018) && PM(3,0x6708) && PM(4,0x1680) && PM(5,0xe058) && PM(6,0x1680)) { - // Don't write to SCC (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[4] = htons(M68K_NOP); - p[6] = htons(M68K_NOP); - D(bug(" patch 3 applied\n")); - } else if (PM(0,0x2278) && PM(1,0x01dc) && PM(2,0x12bc) && PM(3,0x0006) && PM(4,0x4e71) && PM(5,0x1292)) { - // Don't write to SCC (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[5] = htons(M68K_NOP); - D(bug(" patch 4 applied\n")); - } else if (PM(0,0x2278) && PM(1,0x01dc) && PM(2,0x12bc) && PM(3,0x0003) && PM(4,0x4e71) && PM(5,0x1281)) { - // Don't write to SCC (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[5] = htons(M68K_NOP); - D(bug(" patch 5 applied\n")); - } else if (PM(0,0x0811) && PM(1,0x0000) && PM(2,0x51c8) && PM(3,0xfffa)) { - // Don't test SCC (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1) - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - D(bug(" patch 6 applied\n")); - } else if (PM(0,0x4a2a) && PM(1,0x063e) && PM(2,0x66fa)) { - // Don't wait for SCC (7.5.2, 7.5.3, 7.5.5) - p[2] = htons(M68K_NOP); - D(bug(" patch 7 applied\n")); - } else if (PM(0,0x4a2a) && PM(1,0x03a6) && PM(2,0x66fa)) { - // Don't wait for SCC (7.6, 7.6.1, 8.0, 8.1) - p[2] = htons(M68K_NOP); - D(bug(" patch 8 applied\n")); - } - p++; - } -#else - // Disable LocalTalk - p[0] = htons(M68K_JMP_A0); - p[1] = htons(0x7000); // moveq #0,d0 - p[2] = htons(M68K_RTS); - D(bug(" patch 1 applied\n")); -#endif - - } else if (type == FOURCC('n','s','r','d') && id == 1) { - D(bug("nsrd 1 found\n")); - if (p[(0x378 + 0x460) >> 1] == htons(0x7c08) && p[(0x37a + 0x460) >> 1] == htons(0x02a6)) { - // Don't overwrite our serial drivers (7.5.3 Revision 2.2) - p[(0x378 + 0x460) >> 1] = htons(0x4e80); // blr - p[(0x37a + 0x460) >> 1] = htons(0x0020); - D(bug(" patch 1 applied\n")); - } else if (p[(0x378 + 0x570) >> 1] == htons(0x7c08) && p[(0x37a + 0x570) >> 1] == htons(0x02a6)) { - // Don't overwrite our serial drivers (8.0, 8.1) - p[(0x378 + 0x570) >> 1] = htons(0x4e80); // blr - p[(0x37a + 0x570) >> 1] = htons(0x0020); - D(bug(" patch 2 applied\n")); - } else if (p[(0x378 + 0x6c0) >> 1] == htons(0x7c08) && p[(0x37a + 0x6c0) >> 1] == htons(0x02a6)) { - // Don't overwrite our serial drivers (8.5, 8.6) - p[(0x378 + 0x6c0) >> 1] = htons(0x4e80); // blr - p[(0x37a + 0x6c0) >> 1] = htons(0x0020); - D(bug(" patch 3 applied\n")); - } else if (p[(0x374 + 0x510) >> 1] == htons(0x7c08) && p[(0x376 + 0x510) >> 1] == htons(0x02a6)) { - // Don't overwrite our serial drivers (9.0) - p[(0x374 + 0x510) >> 1] = htons(0x4e80); // blr - p[(0x376 + 0x510) >> 1] = htons(0x0020); - D(bug(" patch 4 applied\n")); - } - - } else if (type == FOURCC('c','i','t','t') && id == 45) { - D(bug("citt 45 found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x203c) && PM(1,0x0100) && PM(2,0x0000) && PM(3,0xc0ae) && PM(4,0xfffc)) { - // Don't replace SCSI Manager (8.1, 8.5, 8.6, 9.0) - p[5] = htons((ntohs(p[5]) & 0xff) | 0x6000); // beq - D(bug(" patch 1 applied\n")); - break; - } - p++; - } - - } else if (type == FOURCC('t','h','n','g')) { - // Collect info about used audio sifters - uint32 thing = Host2MacAddr((uint8 *)p); - uint32 c_type = ReadMacInt32(thing); - uint32 sub_type = ReadMacInt32(thing + 4); - if (c_type == FOURCC('s','d','e','v') && sub_type == FOURCC('s','i','n','g')) { - WriteMacInt32(thing + 4, FOURCC('a','w','g','c')); - D(bug("thng %d, type %c%c%c%c (%08x), sub type %c%c%c%c (%08x), data %p\n", id, c_type >> 24, (c_type >> 16) & 0xff, (c_type >> 8) & 0xff, c_type & 0xff, c_type, sub_type >> 24, (sub_type >> 16) & 0xff, (sub_type >> 8) & 0xff, sub_type & 0xff, sub_type, p)); - AddSifter(ReadMacInt32(thing + componentResType), ReadMacInt16(thing + componentResID)); - if (ReadMacInt32(thing + componentPFCount)) - AddSifter(ReadMacInt32(thing + componentPFResType), ReadMacInt16(thing + componentPFResID)); - } - - } else if (type == FOURCC('s','i','f','t') || type == FOURCC('n','i','f','t')) { - // Patch audio sifters - if (FindSifter(type, id)) { - D(bug("sifter found\n")); - p[0] = htons(0x4e56); p[1] = htons(0x0000); // link a6,#0 - p[2] = htons(0x48e7); p[3] = htons(0x8018); // movem.l d0/a3-a4,-(a7) - p[4] = htons(0x266e); p[5] = htons(0x000c); // movea.l $c(a6),a3 - p[6] = htons(0x286e); p[7] = htons(0x0008); // movea.l $8(a6),a4 - p[8] = htons(M68K_EMUL_OP_AUDIO_DISPATCH); - p[9] = htons(0x2d40); p[10] = htons(0x0010); // move.l d0,$10(a6) - p[11] = htons(0x4cdf); p[12] = htons(0x1801); // movem.l (a7)+,d0/a3-a4 - p[13] = htons(0x4e5e); // unlk a6 - p[14] = htons(0x4e74); p[15] = htons(0x0008); // rtd #8 - D(bug(" patch applied\n")); - } - - } else if (type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { - D(bug("DRVR -16501/-16500 found\n")); - // Install sound input driver - memcpy(p, sound_input_driver, sizeof(sound_input_driver)); - D(bug(" patch 1 applied\n")); - - } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { - D(bug("INIT 1 (size 2416) found\n")); - size >>= 1; - while (size--) { - if (PM(0,0x247c) && PM(1,0xf301) && PM(2,0x9000)) { - // Prevent "MacOS Licensing Extension" from accessing hardware (7.6) - p[22] = htons(0x6028); - D(bug(" patch 1 applied\n")); - break; - } - p++; - } - - } else if (type == FOURCC('s','c','o','d') && id == -16465) { - D(bug("scod -16465 found\n")); - - // Don't crash in Process Manager on reset/shutdown (8.6, 9.0) - static const uint8 dat[] = {0x4e, 0x56, 0x00, 0x00, 0x48, 0xe7, 0x03, 0x18, 0x2c, 0x2e, 0x00, 0x10}; - base = find_rsrc_data((uint8 *)p, size, dat, sizeof(dat)); - if (base) { - p16 = (uint16 *)((uintptr)p + base); - p16[0] = htons(0x7000); // moveq #0,d0 - p16[1] = htons(M68K_RTS); - D(bug(" patch 1 applied\n")); - } - - } else if (type == FOURCC('N','O','b','j') && id == 100) { - D(bug("NObj 100 found\n")); - - // Don't access VIA registers in MacBench 5.0 - static const uint8 dat1[] = {0x7c, 0x08, 0x02, 0xa6, 0xbf, 0x01, 0xff, 0xe0, 0x90, 0x01, 0x00, 0x08}; - base = find_rsrc_data((uint8 *)p, size, dat1, sizeof(dat1)); - if (base) { - p[(base + 0x00) >> 1] = htons(0x3860); // li r3,0 - p[(base + 0x02) >> 1] = htons(0x0000); - p[(base + 0x04) >> 1] = htons(0x4e80); // blr - p[(base + 0x06) >> 1] = htons(0x0020); - D(bug(" patch 1 applied\n")); - } - static const uint8 dat2[] = {0x7c, 0x6c, 0x1b, 0x78, 0x7c, 0x8b, 0x23, 0x78, 0x38, 0xc0, 0x3f, 0xfd}; - base = find_rsrc_data((uint8 *)p, size, dat2, sizeof(dat2)); - if (base) { - p[(base + 0x00) >> 1] = htons(0x3860); // li r3,0 - p[(base + 0x02) >> 1] = htons(0x0000); - p[(base + 0x04) >> 1] = htons(0x4e80); // blr - p[(base + 0x06) >> 1] = htons(0x0020); - D(bug(" patch 2 applied\n")); - } - - } else if (type == FOURCC('C','O','D','E') && id == 27 && size == 25024) { - D(bug("CODE 27 found [Apple Personal Diagnostics]\n")); - - // Don't access FCBs directly in Apple Personal Diagnostics (MacOS 9) - // FIXME: this should not be called in the first place, use UTResolveFCB? - static const uint8 dat[] = {0x2d, 0x78, 0x03, 0x4e, 0xff, 0xf8, 0x20, 0x6e, 0xff, 0xf8}; - base = find_rsrc_data((uint8 *)p, size, dat, sizeof(dat)); - if (base - && ReadMacInt16(0x3f6) == 4 /* FSFCBLen */ - && p[(base + 0x1a) >> 1] == htons(0x605e) - && p[(base + 0x80) >> 1] == htons(0x7000)) - { - p[(base + 0x1a) >> 1] = htons(0x6064); - D(bug(" patch1 applied\n")); - } - - } else if (type == FOURCC('i','n','f','n') && (id == 129 || id == 200)) { - D(bug("infn %d found\n", id)); - size >>= 1; - while (size--) { - if (PM(0,0x203c) && PM(1,0xf800) && PM(2,0x0000) && PM(4,0x2040) && PM(5,0x1028) && PM(6,0x0090)) { - // Don't read from 0xf8000090 during MacOS (8.5, 9.0) installation - p[0] = htons(M68K_NOP); - p[1] = htons(M68K_NOP); - p[2] = htons(M68K_NOP); - p[3] = htons(M68K_NOP); - p[4] = htons(M68K_NOP); - p[5] = htons(M68K_NOP); - p[6] = htons(0x7000); // moveq #0,d0 - D(bug(" patch 1 applied\n")); - break; - } - p++; - } - - } -} - - -/* - * Resource patches via GetNamedResource() and Get1NamedResource() - */ - -void CheckLoad(uint32 type, const char *name, uint8 *p, uint32 size) -{ - uint16 *p16; - uint32 base; - D(bug("vCheckLoad %c%c%c%c (%08x) name \"%*s\", data %p, size %d\n", type >> 24, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff, type, name[0], &name[1], p, size)); - - // Don't modify resources in ROM - if ((uintptr)p >= (uintptr)ROMBaseHost && (uintptr)p <= (uintptr)(ROMBaseHost + ROM_SIZE)) - return; - - if (type == FOURCC('D','R','V','R') && strncmp(&name[1], ".AFPTranslator", name[0]) == 0) { - D(bug(" DRVR .AFPTranslator found\n")); - - // Don't access ROM85 as it it was a pointer to a ROM version number (8.0, 8.1) - static const uint8 dat[] = {0x3a, 0x2e, 0x00, 0x0a, 0x55, 0x4f, 0x3e, 0xb8, 0x02, 0x8e, 0x30, 0x1f, 0x48, 0xc0, 0x24, 0x40, 0x20, 0x40}; - base = find_rsrc_data(p, size, dat, sizeof(dat)); - if (base) { - p16 = (uint16 *)(p + base + 4); - *p16++ = htons(0x303c); // move.l #ROM85,%d0 - *p16++ = htons(0x028e); - *p16++ = htons(M68K_NOP); - *p16++ = htons(M68K_NOP); - D(bug(" patch 1 applied\n")); - } - } -} - - -/* - * Native Resource Manager patches - */ - -#ifdef __BEOS__ -static -#else -extern "C" -#endif -void check_load_invoc(uint32 type, int16 id, uint32 h) -{ - if (h == 0) - return; - uint32 p = ReadMacInt32(h); - if (p == 0) - return; - uint32 size = ReadMacInt32(p - 2 * 4) & 0xffffff; - - CheckLoad(type, id, (uint16 *)Mac2HostAddr(p), size); -} - -#ifdef __BEOS__ -static -#else -extern "C" -#endif -void named_check_load_invoc(uint32 type, uint32 name, uint32 h) -{ - if (h == 0) - return; - uint32 p = ReadMacInt32(h); - if (p == 0) - return; - uint32 size = ReadMacInt32(p - 2 * 4) & 0xffffff; - - CheckLoad(type, (char *)Mac2HostAddr(name), Mac2HostAddr(p), size); -} - -#ifdef __BEOS__ -static asm void **get_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_ind_resource(register uint32 type, register int16 index) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/index - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_IND_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_ind_resource(register uint32 type, register int16 index) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/index - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_IND_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **r_get_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_R_GET_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_named_resource(register uint32 type, register uint32 name) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_NAMED_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl named_check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_named_resource(register uint32 type, register uint32 name) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_NAMED_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl named_check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} -#else -// Routines in asm_linux.S -extern "C" void get_resource(void); -extern "C" void get_1_resource(void); -extern "C" void get_ind_resource(void); -extern "C" void get_1_ind_resource(void); -extern "C" void r_get_resource(void); -extern "C" void get_named_resource(void); -extern "C" void get_1_named_resource(void); -#endif - -void PatchNativeResourceManager(void) -{ - D(bug("PatchNativeResourceManager\n")); - - // Patch native GetResource() - uint32 upp = ReadMacInt32(0x1480); - if ((upp & 0xffc00000) == ROMBase) - return; - uint32 tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" GetResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_RES_LIB_TOC, ReadMacInt32(tvec + 4)); - WriteMacInt32(XLM_GET_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_RESOURCE)); -#else -#ifdef __BEOS__ - uint32 *tvec2 = (uint32 *)get_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_resource); -#endif -#endif - - // Patch native Get1Resource() - upp = ReadMacInt32(0x0e7c); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" Get1Resource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_GET_1_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_1_resource); -#endif -#endif - - // Patch native GetIndResource() - upp = ReadMacInt32(0x1474); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" GetIndResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_GET_IND_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_IND_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_ind_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_ind_resource); -#endif -#endif - - // Patch native Get1IndResource() - upp = ReadMacInt32(0x0e38); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" Get1IndResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_GET_1_IND_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_IND_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_ind_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_1_ind_resource); -#endif -#endif - - // Patch native RGetResource() - upp = ReadMacInt32(0x0e30); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" RGetResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_R_GET_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_R_GET_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)r_get_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)r_get_resource); -#endif -#endif - - // Patch native GetNamedResource() - upp = ReadMacInt32(0x1484); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" GetNamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_GET_NAMED_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_NAMED_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_named_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_named_resource); -#endif -#endif - - // Patch native Get1NamedResource() - upp = ReadMacInt32(0x0e80); - tvec = ReadMacInt32(upp + 5 * 4); - D(bug(" Get1NamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); - WriteMacInt32(XLM_GET_1_NAMED_RESOURCE, ReadMacInt32(tvec)); -#if EMULATED_PPC - WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_NAMED_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_named_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); -#else - WriteMacInt32(tvec, (uint32)get_1_named_resource); -#endif -#endif -} diff --git a/SheepShaver/src/scsi.cpp b/SheepShaver/src/scsi.cpp deleted file mode 120000 index 1e1a7e348..000000000 --- a/SheepShaver/src/scsi.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/scsi.cpp \ No newline at end of file diff --git a/SheepShaver/src/serial.cpp b/SheepShaver/src/serial.cpp deleted file mode 100644 index 723fc8dcb..000000000 --- a/SheepShaver/src/serial.cpp +++ /dev/null @@ -1,315 +0,0 @@ -/* - * serial.cpp - Serial device driver - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" -#include "main.h" -#include "macos_util.h" -#include "serial.h" -#include "serial_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -SERDPort *the_serd_port[2]; - -// Function pointers from imported functions -typedef int16 (*iocic_ptr)(uint32, int16); -static uint32 iocic_tvect = 0; -static inline int16 IOCommandIsComplete(uint32 arg1, int16 arg2) -{ - return (int16)CallMacOS2(iocic_ptr, iocic_tvect, arg1, arg2); -} - - -/* - * Empty function (AIn/BIn Open/Close) - */ - -int16 SerialNothing(uint32 pb, uint32 dce) -{ - return noErr; -} - - -/* - * Driver Open() routine (output side only) - */ - -int16 SerialOpen(uint32 pb, uint32 dce) -{ - D(bug("SerialOpen pb %08lx, dce %08lx\n", pb, dce)); - - // Get IOCommandIsComplete function - iocic_tvect = FindLibSymbol("\021DriverServicesLib", "\023IOCommandIsComplete"); - D(bug("IOCommandIsComplete TVECT at %08lx\n", iocic_tvect)); - if (iocic_tvect == 0) { - printf("FATAL: SerialOpen(): Can't find IOCommandIsComplete()\n"); - return openErr; - } - - // Do nothing if port is already open - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (the_port->is_open) - return noErr; - - // Init variables - the_port->read_pending = the_port->write_pending = false; - the_port->read_done = the_port->write_done = false; - the_port->cum_errors = 0; - - // Open port - int16 res = the_port->open(ReadMacInt16(0x1fc + ((-(int16)ReadMacInt16(dce + dCtlRefNum)-6) & 2))); - if (res) - return res; - - // Allocate Deferred Task structures - if ((the_port->dt_store = Mac_sysalloc(SIZEOF_serdt * 2)) == 0) - return openErr; - uint32 input_dt = the_port->input_dt = the_port->dt_store; - uint32 output_dt = the_port->output_dt = the_port->dt_store + SIZEOF_serdt; - D(bug(" input_dt %08lx, output_dt %08lx\n", input_dt, output_dt)); - - WriteMacInt16(input_dt + qType, dtQType); - WriteMacInt32(input_dt + dtAddr, input_dt + serdtCode); - WriteMacInt32(input_dt + dtParam, input_dt + serdtResult); - // Deferred function for signalling that Prime is complete (pointer to mydtResult in a1) - WriteMacInt16(input_dt + serdtCode, 0x2019); // move.l (a1)+,d0 (result) - WriteMacInt16(input_dt + serdtCode + 2, 0x2251); // move.l (a1),a1 (dce) - WriteMacInt32(input_dt + serdtCode + 4, 0x207808fc); // move.l JIODone,a0 - WriteMacInt16(input_dt + serdtCode + 8, 0x4ed0); // jmp (a0) - - WriteMacInt16(output_dt + qType, dtQType); - WriteMacInt32(output_dt + dtAddr, output_dt + serdtCode); - WriteMacInt32(output_dt + dtParam, output_dt + serdtResult); - // Deferred function for signalling that Prime is complete (pointer to mydtResult in a1) - WriteMacInt16(output_dt + serdtCode, 0x2019); // move.l (a1)+,d0 (result) - WriteMacInt16(output_dt + serdtCode + 2, 0x2251); // move.l (a1),a1 (dce) - WriteMacInt32(output_dt + serdtCode + 4, 0x207808fc); // move.l JIODone,a0 - WriteMacInt16(output_dt + serdtCode + 8, 0x4ed0); // jmp (a0) - - the_port->is_open = true; - return noErr; -} - - -/* - * Driver Prime() routines - */ - -int16 SerialPrimeIn(uint32 pb, uint32 dce) -{ - D(bug("SerialPrimeIn pb %08lx, dce %08lx\n", pb, dce)); - int16 res; - - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (!the_port->is_open) - res = notOpenErr; - else { - if (the_port->read_pending) { - printf("FATAL: SerialPrimeIn() called while request is pending\n"); - res = readErr; - } else - res = the_port->prime_in(pb, dce); - } - - if (ReadMacInt16(pb + ioTrap) & 0x0200) - if (res > 0) { - WriteMacInt16(pb + ioResult, 0); - return 0; // Command in progress - } else { - WriteMacInt16(pb + ioResult, res); - return res; - } - else - if (res > 0) - return 0; // Command in progress - else { - IOCommandIsComplete(pb, res); - return res; - } -} - -int16 SerialPrimeOut(uint32 pb, uint32 dce) -{ - D(bug("SerialPrimeOut pb %08lx, dce %08lx\n", pb, dce)); - int16 res; - - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (!the_port->is_open) - res = notOpenErr; - else { - if (the_port->write_pending) { - printf("FATAL: SerialPrimeOut() called while request is pending\n"); - res = writErr; - } else - res = the_port->prime_out(pb, dce); - } - - if (ReadMacInt16(pb + ioTrap) & 0x0200) - if (res > 0) { - WriteMacInt16(pb + ioResult, 0); - return 0; // Command in progress - } else { - WriteMacInt16(pb + ioResult, res); - return res; - } - else - if (res > 0) - return 0; // Command in progress - else { - IOCommandIsComplete(pb, res); - return res; - } -} - - -/* - * Driver Control() routine - */ - -int16 SerialControl(uint32 pb, uint32 dce) -{ - uint16 code = ReadMacInt16(pb + csCode); - D(bug("SerialControl %d, pb %08lx, dce %08lx\n", code, pb, dce)); - int16 res; - - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (!the_port->is_open) - res = notOpenErr; - else { - switch (code) { - case kSERDSetPollWrite: - res = noErr; - break; - default: - res = the_port->control(pb, dce, code); - break; - } - } - - if (code == 1) - return res; - else if (ReadMacInt16(pb + ioTrap) & 0x0200) { - WriteMacInt16(pb + ioResult, res); - return res; - } else { - IOCommandIsComplete(pb, res); - return res; - } -} - - -/* - * Driver Status() routine - */ - -int16 SerialStatus(uint32 pb, uint32 dce) -{ - uint16 code = ReadMacInt16(pb + csCode); - D(bug("SerialStatus %d, pb %08lx, dce %08lx\n", code, pb, dce)); - int16 res; - - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (!the_port->is_open) - res = notOpenErr; - else { - switch (code) { - case kSERDVersion: - WriteMacInt8(pb + csParam, 9); // Second-generation SerialDMA driver - res = noErr; - break; - - case 0x8000: - WriteMacInt8(pb + csParam, 9); // Second-generation SerialDMA driver - WriteMacInt16(pb + csParam + 4, 0x1997); // Date of serial driver - WriteMacInt16(pb + csParam + 6, 0x0616); - res = noErr; - break; - - default: - res = the_port->status(pb, dce, code); - break; - } - } - - if (ReadMacInt16(pb + ioTrap) & 0x0200) { - WriteMacInt16(pb + ioResult, res); - return res; - } else { - IOCommandIsComplete(pb, res); - return res; - } -} - - -/* - * Driver Close() routine - */ - -int16 SerialClose(uint32 pb, uint32 dce) -{ - D(bug("SerialClose pb %08lx, dce %08lx\n", pb, dce)); - - // Close port if open - SERDPort *the_port = the_serd_port[(-(int16)ReadMacInt16(dce + dCtlRefNum)-6) >> 1]; - if (the_port->is_open) { - Mac_sysfree(the_port->dt_store); - int16 res = the_port->close(); - the_port->is_open = false; - return res; - } else - return noErr; -} - - -/* - * Serial interrupt - Prime command completed, activate deferred tasks to call IODone - */ - -void SerialInterrupt(void) -{ - D(bug("SerialIRQ\n")); - - // Port 0 - if (the_serd_port[0]->is_open) { - if (the_serd_port[0]->read_pending && the_serd_port[0]->read_done) { - Enqueue(the_serd_port[0]->input_dt, 0xd92); - the_serd_port[0]->read_pending = the_serd_port[0]->read_done = false; - } - if (the_serd_port[0]->write_pending && the_serd_port[0]->write_done) { - Enqueue(the_serd_port[0]->output_dt, 0xd92); - the_serd_port[0]->write_pending = the_serd_port[0]->write_done = false; - } - } - - // Port 1 - if (the_serd_port[1]->is_open) { - if (the_serd_port[1]->read_pending && the_serd_port[1]->read_done) { - Enqueue(the_serd_port[1]->input_dt, 0xd92); - the_serd_port[1]->read_pending = the_serd_port[1]->read_done = false; - } - if (the_serd_port[1]->write_pending && the_serd_port[1]->write_done) { - Enqueue(the_serd_port[1]->output_dt, 0xd92); - the_serd_port[1]->write_pending = the_serd_port[1]->write_done = false; - } - } -} diff --git a/SheepShaver/src/slirp b/SheepShaver/src/slirp deleted file mode 120000 index 4e6fe8f54..000000000 --- a/SheepShaver/src/slirp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/slirp \ No newline at end of file diff --git a/SheepShaver/src/sony.cpp b/SheepShaver/src/sony.cpp deleted file mode 120000 index 42aaabb75..000000000 --- a/SheepShaver/src/sony.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/sony.cpp \ No newline at end of file diff --git a/SheepShaver/src/thunks.cpp b/SheepShaver/src/thunks.cpp deleted file mode 100644 index f8a1b64a5..000000000 --- a/SheepShaver/src/thunks.cpp +++ /dev/null @@ -1,406 +0,0 @@ -/* - * thunks.cpp - Thunks to share data and code with MacOS - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "thunks.h" -#include "emul_op.h" -#include "cpu_emulation.h" -#include "xlowmem.h" - -// Native function declarations -#include "main.h" -#include "video.h" -#include "name_registry.h" -#include "serial.h" -#include "ether.h" -#include "macos_util.h" - -// Generate PowerPC thunks for GetResource() replacements? -#define POWERPC_GET_RESOURCE_THUNKS 1 - - -/* NativeOp instruction format: - +------------+-------------------------+--+-----------+------------+ - | 6 | |FN| OP | 2 | - +------------+-------------------------+--+-----------+------------+ - 0 5 |6 18 19 20 25 26 31 -*/ - -#define POWERPC_NATIVE_OP(FN, OP) \ - (POWERPC_EMUL_OP | ((FN) << 12) | (((uint32)OP) << 6) | 2) - -/* - * Return the fake PowerPC opcode to handle specified native code - */ - -#if EMULATED_PPC -uint32 NativeOpcode(int selector) -{ - uint32 opcode; - switch (selector) { - case NATIVE_CHECK_LOAD_INVOC: - case NATIVE_NAMED_CHECK_LOAD_INVOC: - case NATIVE_NQD_SYNC_HOOK: - case NATIVE_NQD_BITBLT_HOOK: - case NATIVE_NQD_FILLRECT_HOOK: - case NATIVE_NQD_UNKNOWN_HOOK: - case NATIVE_NQD_BITBLT: - case NATIVE_NQD_INVRECT: - case NATIVE_NQD_FILLRECT: - opcode = POWERPC_NATIVE_OP(0, selector); - break; - case NATIVE_PATCH_NAME_REGISTRY: - case NATIVE_VIDEO_INSTALL_ACCEL: - case NATIVE_VIDEO_VBL: - case NATIVE_VIDEO_DO_DRIVER_IO: - case NATIVE_ETHER_AO_GET_HWADDR: - case NATIVE_ETHER_AO_ADD_MULTI: - case NATIVE_ETHER_AO_DEL_MULTI: - case NATIVE_ETHER_AO_SEND_PACKET: - case NATIVE_ETHER_IRQ: - case NATIVE_ETHER_INIT: - case NATIVE_ETHER_TERM: - case NATIVE_ETHER_OPEN: - case NATIVE_ETHER_CLOSE: - case NATIVE_ETHER_WPUT: - case NATIVE_ETHER_RSRV: - case NATIVE_SERIAL_NOTHING: - case NATIVE_SERIAL_OPEN: - case NATIVE_SERIAL_PRIME_IN: - case NATIVE_SERIAL_PRIME_OUT: - case NATIVE_SERIAL_CONTROL: - case NATIVE_SERIAL_STATUS: - case NATIVE_SERIAL_CLOSE: - case NATIVE_GET_RESOURCE: - case NATIVE_GET_1_RESOURCE: - case NATIVE_GET_IND_RESOURCE: - case NATIVE_GET_1_IND_RESOURCE: - case NATIVE_R_GET_RESOURCE: - case NATIVE_GET_NAMED_RESOURCE: - case NATIVE_GET_1_NAMED_RESOURCE: - case NATIVE_MAKE_EXECUTABLE: - opcode = POWERPC_NATIVE_OP(1, selector); - break; - default: - abort(); - } - return opcode; -} -#endif - - -/* - * Generate PowerPC thunks for GetResource() replacements - */ - -#if EMULATED_PPC -static uint32 get_resource_func; -static uint32 get_1_resource_func; -static uint32 get_ind_resource_func; -static uint32 get_1_ind_resource_func; -static uint32 r_get_resource_func; -static uint32 get_named_resource_func; -static uint32 get_1_named_resource_func; - -static void generate_powerpc_thunks(void) -{ - // check_load_invoc() thunk - uint32 check_load_invoc_opcode = NativeOpcode(NATIVE_CHECK_LOAD_INVOC); - uint32 base; - - static uint32 get_resource_template[] = { - PL(0x7c0802a6), // mflr r0 - PL(0x90010008), // stw r0,8(r1) - PL(0x9421ffbc), // stwu r1,-68(r1) - PL(0x90610038), // stw r3,56(r1) - PL(0x9081003c), // stw r4,60(r1) - PL(0x00000000), // lwz r0,XLM_GET_RESOURCE(r0) - PL(0x80402834), // lwz r2,XLM_RES_LIB_TOC(r0) - PL(0x7c0903a6), // mtctr r0 - PL(0x4e800421), // bctrl - PL(0x90610040), // stw r3,64(r1) - PL(0x80610038), // lwz r3,56(r1) - PL(0xa881003e), // lha r4,62(r1) - PL(0x80a10040), // lwz r5,64(r1) - PL(0x00000001), // - PL(0x80610040), // lwz r3,64(r1) - PL(0x8001004c), // lwz r0,76(r1) - PL(0x7c0803a6), // mtlr r0 - PL(0x38210044), // addi r1,r1,68 - PL(0x4e800020) // blr - }; - const uint32 get_resource_template_size = sizeof(get_resource_template); - - int xlm_index = -1, check_load_invoc_index = -1; - for (int i = 0; i < get_resource_template_size/4; i++) { - uint32 opcode = ntohl(get_resource_template[i]); - switch (opcode) { - case 0x00000000: - xlm_index = i; - break; - case 0x00000001: - check_load_invoc_index = i; - break; - } - } - assert(xlm_index != -1 && check_load_invoc_index != -1); - - // GetResource() - get_resource_func = base = SheepMem::Reserve(get_resource_template_size); - Host2Mac_memcpy(base, get_resource_template, get_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // Get1Resource() - get_1_resource_func = base = SheepMem::Reserve(get_resource_template_size); - Host2Mac_memcpy(base, get_resource_template, get_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_1_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // GetIndResource() - get_ind_resource_func = base = SheepMem::Reserve(get_resource_template_size); - Host2Mac_memcpy(base, get_resource_template, get_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_IND_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // Get1IndResource() - get_1_ind_resource_func = base = SheepMem::Reserve(get_resource_template_size); - Host2Mac_memcpy(base, get_resource_template, get_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_1_IND_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // RGetResource() - r_get_resource_func = base = SheepMem::Reserve(get_resource_template_size); - Host2Mac_memcpy(base, get_resource_template, get_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_R_GET_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // named_check_load_invoc() thunk - check_load_invoc_opcode = NativeOpcode(NATIVE_NAMED_CHECK_LOAD_INVOC); - - static uint32 get_named_resource_template[] = { - PL(0x7c0802a6), // mflr r0 - PL(0x90010008), // stw r0,8(r1) - PL(0x9421ffbc), // stwu r1,-68(r1) - PL(0x90610038), // stw r3,56(r1) - PL(0x9081003c), // stw r4,60(r1) - PL(0x00000000), // lwz r0,XLM_GET_NAMED_RESOURCE(r0) - PL(0x80402834), // lwz r2,XLM_RES_LIB_TOC(r0) - PL(0x7c0903a6), // mtctr r0 - PL(0x4e800421), // bctrl - PL(0x90610040), // stw r3,64(r1) - PL(0x80610038), // lwz r3,56(r1) - PL(0x8081003c), // lwz r4,60(r1) - PL(0x80a10040), // lwz r5,64(r1) - PL(0x00000001), // - PL(0x80610040), // lwz r3,64(r1) - PL(0x8001004c), // lwz r0,76(r1) - PL(0x7c0803a6), // mtlr r0 - PL(0x38210044), // addi r1,r1,68 - PL(0x4e800020) // blr - }; - const uint32 get_named_resource_template_size = sizeof(get_named_resource_template); - - xlm_index = -1, check_load_invoc_index = -1; - for (int i = 0; i < get_resource_template_size/4; i++) { - uint32 opcode = ntohl(get_resource_template[i]); - switch (opcode) { - case 0x00000000: - xlm_index = i; - break; - case 0x00000001: - check_load_invoc_index = i; - break; - } - } - assert(xlm_index != -1 && check_load_invoc_index != -1); - - // GetNamedResource() - get_named_resource_func = base = SheepMem::Reserve(get_named_resource_template_size); - Host2Mac_memcpy(base, get_named_resource_template, get_named_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_NAMED_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); - - // Get1NamedResource() - get_1_named_resource_func = base = SheepMem::Reserve(get_named_resource_template_size); - Host2Mac_memcpy(base, get_named_resource_template, get_named_resource_template_size); - WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_1_NAMED_RESOURCE); - WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode); -} -#endif - - -/* - * Initialize the thunks system - */ - -struct native_op_t { - uint32 tvect; - uint32 func; - SheepRoutineDescriptor *desc; -}; -static native_op_t native_op[NATIVE_OP_MAX]; - -bool ThunksInit(void) -{ -#if EMULATED_PPC - for (int i = 0; i < NATIVE_OP_MAX; i++) { - uintptr base = SheepMem::Reserve(16); - WriteMacInt32(base + 0, base + 8); - WriteMacInt32(base + 4, 0); // Fake TVECT - WriteMacInt32(base + 8, NativeOpcode(i)); - WriteMacInt32(base + 12, POWERPC_BLR); - native_op[i].tvect = base; - native_op[i].func = base + 8; - } -#if POWERPC_GET_RESOURCE_THUNKS - generate_powerpc_thunks(); - native_op[NATIVE_GET_RESOURCE].func = get_resource_func; - native_op[NATIVE_GET_1_RESOURCE].func = get_1_resource_func; - native_op[NATIVE_GET_IND_RESOURCE].func = get_ind_resource_func; - native_op[NATIVE_GET_1_IND_RESOURCE].func = get_1_ind_resource_func; - native_op[NATIVE_R_GET_RESOURCE].func = r_get_resource_func; - native_op[NATIVE_GET_NAMED_RESOURCE].func = get_named_resource_func; - native_op[NATIVE_GET_1_NAMED_RESOURCE].func = get_1_named_resource_func; -#endif -#else -#if defined(__linux__) || defined(__NetBSD__) || (defined(__APPLE__) && defined(__MACH__)) -#define DEFINE_NATIVE_OP(ID, FUNC) do { \ - uintptr base = SheepMem::Reserve(8); \ - WriteMacInt32(base + 0, (uint32)FUNC); \ - WriteMacInt32(base + 4, (uint32)TOC); \ - native_op[ID].tvect = base; \ - native_op[ID].func = (uint32)FUNC; \ - } while (0) -#elif defined(__BEOS__) -#define DEFINE_NATIVE_OP(ID, FUNC) do { \ - native_op[ID].tvect = FUNC; \ - native_op[ID].func = ((uint32 *)FUNC)[0]; \ - } while (0) -#else -#error "FIXME: define NativeOp for your platform" -#endif - // FIXME: add GetResource() and friends for completeness - DEFINE_NATIVE_OP(NATIVE_PATCH_NAME_REGISTRY, DoPatchNameRegistry); - DEFINE_NATIVE_OP(NATIVE_VIDEO_INSTALL_ACCEL, VideoInstallAccel); - DEFINE_NATIVE_OP(NATIVE_VIDEO_VBL, VideoVBL); - DEFINE_NATIVE_OP(NATIVE_VIDEO_DO_DRIVER_IO, VideoDoDriverIO); - DEFINE_NATIVE_OP(NATIVE_ETHER_AO_GET_HWADDR, AO_get_ethernet_address); - DEFINE_NATIVE_OP(NATIVE_ETHER_AO_ADD_MULTI, AO_enable_multicast); - DEFINE_NATIVE_OP(NATIVE_ETHER_AO_DEL_MULTI, AO_disable_multicast); - DEFINE_NATIVE_OP(NATIVE_ETHER_AO_SEND_PACKET, AO_transmit_packet); - DEFINE_NATIVE_OP(NATIVE_ETHER_IRQ, EtherIRQ); - DEFINE_NATIVE_OP(NATIVE_ETHER_INIT, InitStreamModule); - DEFINE_NATIVE_OP(NATIVE_ETHER_TERM, TerminateStreamModule); - DEFINE_NATIVE_OP(NATIVE_ETHER_OPEN, ether_open); - DEFINE_NATIVE_OP(NATIVE_ETHER_CLOSE, ether_close); - DEFINE_NATIVE_OP(NATIVE_ETHER_WPUT, ether_wput); - DEFINE_NATIVE_OP(NATIVE_ETHER_RSRV, ether_rsrv); - DEFINE_NATIVE_OP(NATIVE_SERIAL_NOTHING, SerialNothing); - DEFINE_NATIVE_OP(NATIVE_SERIAL_OPEN, SerialOpen); - DEFINE_NATIVE_OP(NATIVE_SERIAL_PRIME_IN, SerialPrimeIn); - DEFINE_NATIVE_OP(NATIVE_SERIAL_PRIME_OUT, SerialPrimeOut); - DEFINE_NATIVE_OP(NATIVE_SERIAL_CONTROL, SerialControl); - DEFINE_NATIVE_OP(NATIVE_SERIAL_STATUS, SerialStatus); - DEFINE_NATIVE_OP(NATIVE_SERIAL_CLOSE, SerialClose); - DEFINE_NATIVE_OP(NATIVE_MAKE_EXECUTABLE, MakeExecutable); - DEFINE_NATIVE_OP(NATIVE_NQD_SYNC_HOOK, NQD_sync_hook); - DEFINE_NATIVE_OP(NATIVE_NQD_BITBLT_HOOK, NQD_bitblt_hook); - DEFINE_NATIVE_OP(NATIVE_NQD_FILLRECT_HOOK, NQD_fillrect_hook); - DEFINE_NATIVE_OP(NATIVE_NQD_UNKNOWN_HOOK, NQD_unknown_hook); - DEFINE_NATIVE_OP(NATIVE_NQD_BITBLT, NQD_bitblt); - DEFINE_NATIVE_OP(NATIVE_NQD_INVRECT, NQD_invrect); - DEFINE_NATIVE_OP(NATIVE_NQD_FILLRECT, NQD_fillrect); -#undef DEFINE_NATIVE_OP -#endif - - // Initialize routine descriptors (if TVECT exists) - for (int i = 0; i < NATIVE_OP_MAX; i++) { - uint32 tvect = native_op[i].tvect; - if (tvect) - native_op[i].desc = new SheepRoutineDescriptor(0, tvect); - } - - return true; -} - - -/* - * Delete generated thunks - */ - -void ThunksExit(void) -{ - for (int i = 0; i < NATIVE_OP_MAX; i++) { - SheepRoutineDescriptor *desc = native_op[i].desc; - if (desc) - delete desc; - } -} - - -/* - * Return the native function descriptor (TVECT) - */ - -uint32 NativeTVECT(int selector) -{ - assert(selector < NATIVE_OP_MAX); - const uint32 tvect = native_op[selector].tvect; - assert(tvect != 0); - return tvect; -} - - -/* - * Return the native function address - */ - -uint32 NativeFunction(int selector) -{ - assert(selector < NATIVE_OP_MAX); - const uint32 func = native_op[selector].func; - assert(func != 0); - return func; -} - - -/* - * Return the routine descriptor address of the native function - */ - -uint32 NativeRoutineDescriptor(int selector) -{ - assert(selector < NATIVE_OP_MAX); - SheepRoutineDescriptor * const desc = native_op[selector].desc; - assert(desc != 0); - return desc->addr(); -} - - -/* - * Execute native code from EMUL_OP routine (real mode switch) - */ - -void ExecuteNative(int selector) -{ - M68kRegisters r; - Execute68k(NativeRoutineDescriptor(selector), &r); -} diff --git a/SheepShaver/src/timer.cpp b/SheepShaver/src/timer.cpp deleted file mode 100644 index 3edd6ca0d..000000000 --- a/SheepShaver/src/timer.cpp +++ /dev/null @@ -1,677 +0,0 @@ -/* - * timer.cpp - Time Manager emulation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "timer.h" -#include "macos_util.h" -#include "main.h" -#include "cpu_emulation.h" - -#ifdef PRECISE_TIMING_POSIX -#include -#include -#endif - -#ifdef PRECISE_TIMING_MACH -#include -#endif - -#define DEBUG 0 -#include "debug.h" - - -#define TM_QUEUE 0 // Enable TMQueue management (doesn't work) - - -// Definitions for Time Manager -enum { // TMTask struct - tmAddr = 6, - tmCount = 10, - tmWakeUp = 14, - tmReserved = 18 -}; - - -// Array of additional info for each installed TMTask -struct TMDesc { - uint32 task; // Mac address of associated TMTask - tm_time_t wakeup; // Time this task is scheduled for execution - TMDesc *next; -}; - -static TMDesc *tmDescList; - -#if PRECISE_TIMING -#ifdef PRECISE_TIMING_BEOS -static thread_id timer_thread = -1; -static bool thread_active = true; -static const tm_time_t wakeup_time_max = 0x7fffffffffffffff; -static volatile tm_time_t wakeup_time = wakeup_time_max; -static sem_id wakeup_time_sem = -1; -static int32 timer_func(void *arg); -#endif -#ifdef PRECISE_TIMING_POSIX -static pthread_t timer_thread; -static bool timer_thread_active = false; -static volatile bool timer_thread_cancel = false; -static tm_time_t wakeup_time_max = { 0x7fffffff, 999999999 }; -static tm_time_t wakeup_time = wakeup_time_max; -static pthread_mutex_t wakeup_time_lock = PTHREAD_MUTEX_INITIALIZER; -static void *timer_func(void *arg); -#endif -#ifdef PRECISE_TIMING_MACH -static clock_serv_t system_clock; -static thread_act_t timer_thread; -static bool timer_thread_active = false; -static tm_time_t wakeup_time_max = { 0x7fffffff, 999999999 }; -static tm_time_t wakeup_time = wakeup_time_max; -static semaphore_t wakeup_time_sem; -static void *timer_func(void *arg); -#endif -#endif - - -inline static void free_desc(TMDesc *desc) -{ - if (desc == tmDescList) { - tmDescList = desc->next; - } else { - for (TMDesc *d = tmDescList; d; d = d->next) { - if (d->next == desc) { - d->next = desc->next; - break; - } - } - } - delete desc; -} - -/* - * Find descriptor associated with given TMTask - */ - -inline static TMDesc *find_desc(uint32 tm) -{ - TMDesc *desc = tmDescList; - while (desc) { - if (desc->task == tm) { - return desc; - } - desc = desc->next; - } - return NULL; -} - - -/* - * Enqueue task in Time Manager queue - */ - -static void enqueue_tm(uint32 tm) -{ -#if TM_QUEUE - uint32 tm_var = ReadMacInt32(0xb30); - WriteMacInt32(tm + qLink, ReadMacInt32(tm_var)); - WriteMacInt32(tm_var, tm); -#endif -} - - -/* - * Remove task from Time Manager queue - */ - -static void dequeue_tm(uint32 tm) -{ -#if TM_QUEUE - uint32 p = ReadMacInt32(0xb30); - while (p) { - uint32 next = ReadMacInt32(p + qLink); - if (next == tm) { - WriteMacInt32(p + qLink, ReadMacInt32(next + qLink)); - return; - } - } -#endif -} - - -/* - * Timer thread operations - */ - -#ifdef PRECISE_TIMING_POSIX -const int SIGSUSPEND = SIGRTMIN + 6; -const int SIGRESUME = SIGRTMIN + 7; -static struct sigaction sigsuspend_action; -static struct sigaction sigresume_action; - -static int suspend_count = 0; -static pthread_mutex_t suspend_count_lock = PTHREAD_MUTEX_INITIALIZER; -static sem_t suspend_ack_sem; -static sigset_t suspend_handler_mask; - -// Signal handler for suspended thread -static void sigsuspend_handler(int sig) -{ - sem_post(&suspend_ack_sem); - sigsuspend(&suspend_handler_mask); -} - -// Signal handler for resumed thread -static void sigresume_handler(int sig) -{ - /* simply trigger a signal to stop clock_nanosleep() */ -} - -// Initialize timer thread -static bool timer_thread_init(void) -{ - // Install suspend signal handler - sigemptyset(&sigsuspend_action.sa_mask); - sigaddset(&sigsuspend_action.sa_mask, SIGRESUME); - sigsuspend_action.sa_handler = sigsuspend_handler; - sigsuspend_action.sa_flags = SA_RESTART; -#ifdef HAVE_SIGNAL_SA_RESTORER - sigsuspend_action.sa_restorer = NULL; -#endif - if (sigaction(SIGSUSPEND, &sigsuspend_action, NULL) < 0) - return false; - - // Install resume signal handler - sigemptyset(&sigresume_action.sa_mask); - sigresume_action.sa_handler = sigresume_handler; - sigresume_action.sa_flags = SA_RESTART; -#ifdef HAVE_SIGNAL_SA_RESTORER - sigresume_action.sa_restorer = NULL; -#endif - if (sigaction(SIGRESUME, &sigresume_action, NULL) < 0) - return false; - - // Initialize semaphore - if (sem_init(&suspend_ack_sem, 0, 0) < 0) - return false; - - // Initialize suspend_handler_mask, it excludes SIGRESUME - if (sigfillset(&suspend_handler_mask) != 0) - return false; - if (sigdelset(&suspend_handler_mask, SIGRESUME) != 0) - return false; - - // Create thread in running state - suspend_count = 0; - return (pthread_create(&timer_thread, NULL, timer_func, NULL) == 0); -} - -// Kill timer thread -static void timer_thread_kill(void) -{ - timer_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(timer_thread); -#endif - pthread_join(timer_thread, NULL); -} - -// Suspend timer thread -static void timer_thread_suspend(void) -{ - pthread_mutex_lock(&suspend_count_lock); - if (suspend_count == 0) { - suspend_count ++; - if (pthread_kill(timer_thread, SIGSUSPEND) == 0) - sem_wait(&suspend_ack_sem); - } - pthread_mutex_unlock(&suspend_count_lock); -} - -// Resume timer thread -static void timer_thread_resume(void) -{ - pthread_mutex_lock(&suspend_count_lock); - assert(suspend_count > 0); - if (suspend_count == 1) { - suspend_count = 0; - pthread_kill(timer_thread, SIGRESUME); - } - pthread_mutex_unlock(&suspend_count_lock); -} -#endif - - -/* - * Initialize Time Manager - */ - -void TimerInit(void) -{ - TimerReset(); - -#if PRECISE_TIMING - // Start timer thread -#ifdef PRECISE_TIMING_BEOS - wakeup_time_sem = create_sem(1, "Wakeup Time"); - timer_thread = spawn_thread(timer_func, "Time Manager", B_REAL_TIME_PRIORITY, NULL); - resume_thread(timer_thread); -#elif PRECISE_TIMING_MACH - pthread_t pthread; - - host_get_clock_service(mach_host_self(), REALTIME_CLOCK, &system_clock); - semaphore_create(mach_task_self(), &wakeup_time_sem, SYNC_POLICY_FIFO, 1); - - pthread_create(&pthread, NULL, &timer_func, NULL); -#endif -#ifdef PRECISE_TIMING_POSIX - timer_thread_active = timer_thread_init(); -#endif -#endif -} - - -/* - * Exit Time Manager - */ - -void TimerExit(void) -{ -#if PRECISE_TIMING - // Quit timer thread - if (timer_thread > 0) { -#ifdef PRECISE_TIMING_BEOS - status_t l; - thread_active = false; - suspend_thread(timer_thread); - resume_thread(timer_thread); - wait_for_thread(timer_thread, &l); - delete_sem(wakeup_time_sem); -#endif -#ifdef PRECISE_TIMING_MACH - timer_thread_active = false; - semaphore_destroy(mach_task_self(), wakeup_time_sem); -#endif -#ifdef PRECISE_TIMING_POSIX - timer_thread_kill(); -#endif - } -#endif -} - - -/* - * Emulator reset, remove all timer tasks - */ - -void TimerReset(void) -{ - TMDesc *desc = tmDescList; - while (desc) { - TMDesc *next = desc->next; - delete desc; - desc = next; - } - tmDescList = NULL; -} - - -/* - * Insert timer task - */ - -int16 InsTime(uint32 tm, uint16 trap) -{ - D(bug("InsTime %08lx, trap %04x\n", tm, trap)); - WriteMacInt16((uint32)tm + qType, ReadMacInt16((uint32)tm + qType) & 0x1fff | (trap << 4) & 0x6000); - if (find_desc(tm)) - printf("WARNING: InsTime(%08x): Task re-inserted\n", tm); - else { - TMDesc *desc = new TMDesc; - desc->task = tm; - desc->next = tmDescList; - tmDescList = desc; - } - return 0; -} - - -/* - * Remove timer task - */ - -int16 RmvTime(uint32 tm) -{ - D(bug("RmvTime %08lx\n", tm)); - - // Find descriptor - TMDesc *desc = find_desc(tm); - if (!desc) { - printf("WARNING: RmvTime(%08x): Descriptor not found\n", tm); - return 0; - } - - // Task active? -#if PRECISE_TIMING_BEOS - while (acquire_sem(wakeup_time_sem) == B_INTERRUPTED) ; - suspend_thread(timer_thread); -#endif -#ifdef PRECISE_TIMING_MACH - semaphore_wait(wakeup_time_sem); - thread_suspend(timer_thread); -#endif -#if PRECISE_TIMING_POSIX - timer_thread_suspend(); - pthread_mutex_lock(&wakeup_time_lock); -#endif - if (ReadMacInt16(tm + qType) & 0x8000) { - - // Yes, make task inactive and remove it from the Time Manager queue - WriteMacInt16(tm + qType, ReadMacInt16(tm + qType) & 0x7fff); - dequeue_tm(tm); -#if PRECISE_TIMING - // Look for next task to be called and set wakeup_time - wakeup_time = wakeup_time_max; - for (TMDesc *d = tmDescList; d; d = d->next) - if ((ReadMacInt16(d->task + qType) & 0x8000)) - if (timer_cmp_time(d->wakeup, wakeup_time) < 0) - wakeup_time = d->wakeup; -#endif - - // Compute remaining time - tm_time_t remaining, current; - timer_current_time(current); - timer_sub_time(remaining, desc->wakeup, current); - WriteMacInt32(tm + tmCount, timer_host2mac_time(remaining)); - } else - WriteMacInt32(tm + tmCount, 0); - D(bug(" tmCount %ld\n", ReadMacInt32(tm + tmCount))); -#if PRECISE_TIMING_BEOS - release_sem(wakeup_time_sem); - thread_info info; - do { - resume_thread(timer_thread); // This will unblock the thread - get_thread_info(timer_thread, &info); - } while (info.state == B_THREAD_SUSPENDED); // Sometimes, resume_thread() doesn't work (BeOS bug?) -#endif -#ifdef PRECISE_TIMING_MACH - semaphore_signal(wakeup_time_sem); - thread_abort(timer_thread); - thread_resume(timer_thread); -#endif -#if PRECISE_TIMING_POSIX - pthread_mutex_unlock(&wakeup_time_lock); - timer_thread_resume(); - assert(suspend_count == 0); -#endif - - // Free descriptor - free_desc(desc); - return 0; -} - - -/* - * Start timer task - */ - -int16 PrimeTime(uint32 tm, int32 time) -{ - D(bug("PrimeTime %08lx, time %ld\n", tm, time)); - - // Find descriptor - TMDesc *desc = find_desc(tm); - if (!desc) { - printf("FATAL: PrimeTime(%08x): Descriptor not found\n", tm); - return 0; - } - - // Convert delay time - tm_time_t delay; - timer_mac2host_time(delay, time); - - // Extended task? - if (ReadMacInt16(tm + qType) & 0x4000) { - - // Yes, tmWakeUp set? - if (ReadMacInt32(tm + tmWakeUp)) { - - // PrimeTime(0) can either mean (a) "the task runs as soon as interrupts are enabled" - // or (b) "continue previous delay" if an expired task was stopped via RmvTime() and - // then re-installed using InsXTime(). Since tmWakeUp was set, this is case (b). - // The remaining time was saved in tmCount by RmvTime(). - if (time == 0) { - timer_mac2host_time(delay, ReadMacInt16(tm + tmCount)); - } - - // Yes, calculate wakeup time relative to last scheduled time - tm_time_t wakeup; - timer_add_time(wakeup, desc->wakeup, delay); - desc->wakeup = wakeup; - - } else { - - // No, calculate wakeup time relative to current time - tm_time_t now; - timer_current_time(now); - timer_add_time(desc->wakeup, now, delay); - } - - // Set tmWakeUp to indicate that task was scheduled - WriteMacInt32(tm + tmWakeUp, 0x12345678); - - } else { - - // Not extended task, calculate wakeup time relative to current time - tm_time_t now; - timer_current_time(now); - timer_add_time(desc->wakeup, now, delay); - } - - // Make task active and enqueue it in the Time Manager queue -#if PRECISE_TIMING_BEOS - while (acquire_sem(wakeup_time_sem) == B_INTERRUPTED) ; - suspend_thread(timer_thread); -#endif -#ifdef PRECISE_TIMING_MACH - semaphore_wait(wakeup_time_sem); - thread_suspend(timer_thread); -#endif -#if PRECISE_TIMING_POSIX - timer_thread_suspend(); - pthread_mutex_lock(&wakeup_time_lock); -#endif - WriteMacInt16(tm + qType, ReadMacInt16(tm + qType) | 0x8000); - enqueue_tm(tm); -#if PRECISE_TIMING - // Look for next task to be called and set wakeup_time - wakeup_time = wakeup_time_max; - for (TMDesc *d = tmDescList; d; d = d->next) - if ((ReadMacInt16(d->task + qType) & 0x8000)) - if (timer_cmp_time(d->wakeup, wakeup_time) < 0) - wakeup_time = d->wakeup; -#ifdef PRECISE_TIMING_BEOS - release_sem(wakeup_time_sem); - thread_info info; - do { - resume_thread(timer_thread); // This will unblock the thread - get_thread_info(timer_thread, &info); - } while (info.state == B_THREAD_SUSPENDED); // Sometimes, resume_thread() doesn't work (BeOS bug?) -#endif -#ifdef PRECISE_TIMING_MACH - semaphore_signal(wakeup_time_sem); - thread_abort(timer_thread); - thread_resume(timer_thread); -#endif -#ifdef PRECISE_TIMING_POSIX - pthread_mutex_unlock(&wakeup_time_lock); - timer_thread_resume(); - assert(suspend_count == 0); -#endif -#endif - return 0; -} - - -/* - * Time Manager thread - */ - -#ifdef PRECISE_TIMING_BEOS -static int32 timer_func(void *arg) -{ - while (thread_active) { - - // Wait until time specified by wakeup_time - snooze_until(wakeup_time, B_SYSTEM_TIMEBASE); - - while (acquire_sem(wakeup_time_sem) == B_INTERRUPTED) ; - if (wakeup_time < system_time()) { - - // Timer expired, trigger interrupt - wakeup_time = 0x7fffffffffffffff; - SetInterruptFlag(INTFLAG_TIMER); - TriggerInterrupt(); - } - release_sem(wakeup_time_sem); - } - return 0; -} -#endif - -#ifdef PRECISE_TIMING_MACH -static void *timer_func(void *arg) -{ - timer_thread = mach_thread_self(); - timer_thread_active = true; - - while (timer_thread_active) { - clock_sleep(system_clock, TIME_ABSOLUTE, wakeup_time, NULL); - semaphore_wait(wakeup_time_sem); - - tm_time_t system_time; - - timer_current_time(system_time); - if (timer_cmp_time(wakeup_time, system_time) < 0) { - wakeup_time = wakeup_time_max; - SetInterruptFlag(INTFLAG_TIMER); - TriggerInterrupt(); - } - semaphore_signal(wakeup_time_sem); - } - return NULL; -} -#endif - -#ifdef PRECISE_TIMING_POSIX -static void *timer_func(void *arg) -{ - while (!timer_thread_cancel) { - // Wait until time specified by wakeup_time - clock_nanosleep(CLOCK_REALTIME, TIMER_ABSTIME, &wakeup_time, NULL); - - tm_time_t system_time; - timer_current_time(system_time); - if (timer_cmp_time(wakeup_time, system_time) < 0) { - - // Timer expired, trigger interrupt - pthread_mutex_lock(&wakeup_time_lock); - wakeup_time = wakeup_time_max; - pthread_mutex_unlock(&wakeup_time_lock); - SetInterruptFlag(INTFLAG_TIMER); - TriggerInterrupt(); - } - } - return NULL; -} -#endif - - -/* - * Timer interrupt function (executed as part of 60Hz interrupt) - */ - -void TimerInterrupt(void) -{ -// D(bug("TimerIRQ\n")); - - // Look for active TMTasks that have expired - tm_time_t now; - timer_current_time(now); - TMDesc *desc = tmDescList; - while (desc) { - TMDesc *next = desc->next; - uint32 tm = desc->task; - if ((ReadMacInt16(tm + qType) & 0x8000) && timer_cmp_time(desc->wakeup, now) <= 0) { - - // Found one, mark as inactive and remove it from the Time Manager queue - WriteMacInt16(tm + qType, ReadMacInt16(tm + qType) & 0x7fff); - dequeue_tm(tm); - - // Call timer function - uint32 addr = ReadMacInt32(tm + tmAddr); - if (addr) { - D(bug("Calling TimeTask %08lx, addr %08lx\n", tm, addr)); - M68kRegisters r; - r.a[0] = addr; - r.a[1] = tm; - Execute68k(r.a[0], &r); - D(bug(" returned from TimeTask\n")); - } - } - desc = next; - } - -#if PRECISE_TIMING - // Look for next task to be called and set wakeup_time -#if PRECISE_TIMING_BEOS - while (acquire_sem(wakeup_time_sem) == B_INTERRUPTED) ; - suspend_thread(timer_thread); -#endif -#if PRECISE_TIMING_MACH - semaphore_wait(wakeup_time_sem); - thread_suspend(timer_thread); -#endif -#if PRECISE_TIMING_POSIX - timer_thread_suspend(); - pthread_mutex_lock(&wakeup_time_lock); -#endif - wakeup_time = wakeup_time_max; - for (TMDesc *d = tmDescList; d; d = d->next) - if ((ReadMacInt16(d->task + qType) & 0x8000)) - if (timer_cmp_time(d->wakeup, wakeup_time) < 0) - wakeup_time = d->wakeup; -#if PRECISE_TIMING_BEOS - release_sem(wakeup_time_sem); - thread_info info; - do { - resume_thread(timer_thread); // This will unblock the thread - get_thread_info(timer_thread, &info); - } while (info.state == B_THREAD_SUSPENDED); // Sometimes, resume_thread() doesn't work (BeOS bug?) -#endif -#if PRECISE_TIMING_MACH - semaphore_signal(wakeup_time_sem); - thread_abort(timer_thread); - thread_resume(timer_thread); -#endif -#if PRECISE_TIMING_POSIX - pthread_mutex_unlock(&wakeup_time_lock); - timer_thread_resume(); - assert(suspend_count == 0); -#endif -#endif -} diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp deleted file mode 100644 index 4041d4519..000000000 --- a/SheepShaver/src/user_strings.cpp +++ /dev/null @@ -1,186 +0,0 @@ -/* - * user_strings.cpp - Localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - * This should only be used for user-interface related messages that must be - * translated or transcibed for localized versions of SheepShaver. - * It should NOT be used for: - * - file names - * - names of threads, areas, ports, semaphores, drivers, views and other "invisible" names - * - debugging messages - * - error messages that only go to the shell ("FATAL"/"WARNING", those are really debugging messages) - */ - -#include "sysdeps.h" -#include "user_strings.h" - -#ifdef __BEOS__ -#define ELLIPSIS "\xE2\x80\xA6" -#else -#define ELLIPSIS "..." -#endif - - -// Common string definitions -user_string_def common_strings[] = { - {STR_ABOUT_TEXT1, "SheepShaver V%d.%d"}, - {STR_ABOUT_TEXT2, "by Christian Bauer and Mar\"c\" Hellwig"}, - {STR_READING_ROM_FILE, "Reading ROM file...\n"}, - {STR_SHELL_ERROR_PREFIX, "ERROR: %s\n"}, - {STR_GUI_ERROR_PREFIX, "SheepShaver error:\n%s"}, - {STR_ERROR_ALERT_TITLE, "SheepShaver Error"}, - {STR_SHELL_WARNING_PREFIX, "WARNING: %s\n"}, - {STR_GUI_WARNING_PREFIX, "SheepShaver warning:\n%s"}, - {STR_WARNING_ALERT_TITLE, "SheepShaver Warning"}, - {STR_NOTICE_ALERT_TITLE, "SheepShaver Notice"}, - {STR_ABOUT_TITLE, "About SheepShaver"}, - {STR_OK_BUTTON, "OK"}, - {STR_START_BUTTON, "Start"}, - {STR_QUIT_BUTTON, "Quit"}, - {STR_CANCEL_BUTTON, "Cancel"}, - {STR_IGNORE_BUTTON, "Ignore"}, - - {STR_NOT_ENOUGH_MEMORY_ERR, "Your computer does not have enough memory to run SheepShaver."}, - {STR_NO_KERNEL_DATA_ERR, "Cannot create Kernel Data area: %s (%08x)."}, - {STR_NO_ROM_FILE_ERR, "Cannot open ROM file."}, - {STR_RAM_HIGHER_THAN_ROM_ERR, "RAM area higher than ROM area. Try to decrease the MacOS RAM size."}, - {STR_ROM_FILE_READ_ERR, "Cannot read ROM file."}, - {STR_ROM_SIZE_ERR, "Invalid ROM file size. SheepShaver requires a 4MB PCI PowerMac ROM."}, - {STR_UNSUPPORTED_ROM_TYPE_ERR, "Unsupported ROM type."}, - {STR_POWER_INSTRUCTION_ERR, "Your Mac program is using POWER instructions which are not supported by SheepShaver.\n(pc %p, sp %p, opcode %08lx)"}, - {STR_MEM_ACCESS_ERR, "Your Mac program made an illegal %s %s access to address %p.\n(pc %p, 68k pc %p, sp %p)"}, - {STR_MEM_ACCESS_READ, "read"}, - {STR_MEM_ACCESS_WRITE, "write"}, - {STR_UNKNOWN_SEGV_ERR, "Your Mac program did something terribly stupid.\n(pc %p, 68k pc %p, sp %p, opcode %08lx)"}, - {STR_NO_NAME_REGISTRY_ERR, "Cannot find Name Registry. Giving up."}, - {STR_FULL_SCREEN_ERR, "Cannot open full screen display: %s (%08x)."}, - {STR_SCSI_BUFFER_ERR, "Cannot allocate SCSI buffer (requested %d bytes). Giving up."}, - {STR_SCSI_SG_FULL_ERR, "SCSI scatter/gather table full. Giving up."}, - - {STR_SMALL_RAM_WARN, "Selected less than 8MB Mac RAM, using 8MB."}, - {STR_CANNOT_UNMOUNT_WARN, "The volume '%s' could not be unmounted. SheepShaver will not use it."}, - {STR_CREATE_VOLUME_WARN, "Cannot create hardfile (%s)."}, - - {STR_PREFS_TITLE, "SheepShaver Settings"}, - {STR_PREFS_MENU, "Settings"}, - {STR_PREFS_ITEM_ABOUT, "About SheepShaver" ELLIPSIS}, - {STR_PREFS_ITEM_START, "Start SheepShaver"}, - {STR_PREFS_ITEM_ZAP_PRAM, "Zap PRAM File"}, - {STR_PREFS_ITEM_QUIT, "Quit SheepShaver"}, - - {STR_NONE_LAB, ""}, - - {STR_VOLUMES_PANE_TITLE, "Volumes"}, - {STR_ADD_VOLUME_BUTTON, "Add" ELLIPSIS}, - {STR_CREATE_VOLUME_BUTTON, "Create" ELLIPSIS}, - {STR_REMOVE_VOLUME_BUTTON, "Remove"}, - {STR_ADD_VOLUME_PANEL_BUTTON, "Add"}, - {STR_CREATE_VOLUME_PANEL_BUTTON, "Create"}, - {STR_CDROM_DRIVE_CTRL, "CD-ROM Drive"}, - {STR_BOOTDRIVER_CTRL, "Boot From"}, - {STR_BOOT_ANY_LAB, "Any"}, - {STR_BOOT_CDROM_LAB, "CD-ROM"}, - {STR_NOCDROM_CTRL, "Disable CD-ROM Driver"}, - {STR_ADD_VOLUME_TITLE, "Add Volume"}, - {STR_CREATE_VOLUME_TITLE, "Create Hardfile"}, - {STR_HARDFILE_SIZE_CTRL, "Size (MB)"}, - - {STR_GRAPHICS_SOUND_PANE_TITLE, "Graphics/Sound"}, - {STR_FRAMESKIP_CTRL, "Window Refresh Rate"}, - {STR_REF_5HZ_LAB, "5 Hz"}, - {STR_REF_7_5HZ_LAB, "7.5 Hz"}, - {STR_REF_10HZ_LAB, "10 Hz"}, - {STR_REF_15HZ_LAB, "15 Hz"}, - {STR_REF_30HZ_LAB, "30 Hz"}, - {STR_REF_60HZ_LAB, "60 Hz"}, - {STR_REF_DYNAMIC_LAB, "Dynamic"}, - {STR_GFXACCEL_CTRL, "QuickDraw Acceleration"}, - {STR_8_BIT_CTRL, "8 Bit"}, - {STR_16_BIT_CTRL, "15 Bit"}, - {STR_32_BIT_CTRL, "32 Bit"}, - {STR_W_640x480_CTRL, "Window 640x480"}, - {STR_W_800x600_CTRL, "Window 800x600"}, - {STR_640x480_CTRL, "Fullscreen 640x480"}, - {STR_800x600_CTRL, "Fullscreen 800x600"}, - {STR_1024x768_CTRL, "Fullscreen 1024x768"}, - {STR_1152x768_CTRL, "Fullscreen 1152x768"}, - {STR_1152x900_CTRL, "Fullscreen 1152x900"}, - {STR_1280x1024_CTRL, "Fullscreen 1280x1024"}, - {STR_1600x1200_CTRL, "Fullscreen 1600x1200"}, - {STR_VIDEO_MODE_CTRL, "Enabled Video Modes"}, - {STR_FULLSCREEN_CTRL, "Fullscreen"}, - {STR_WINDOW_CTRL, "Window"}, - {STR_VIDEO_TYPE_CTRL, "Video Type"}, - {STR_DISPLAY_X_CTRL, "Width"}, - {STR_DISPLAY_Y_CTRL, "Height"}, - {STR_SIZE_384_LAB, "384"}, - {STR_SIZE_480_LAB, "480"}, - {STR_SIZE_512_LAB, "512"}, - {STR_SIZE_600_LAB, "600"}, - {STR_SIZE_640_LAB, "640"}, - {STR_SIZE_768_LAB, "768"}, - {STR_SIZE_800_LAB, "800"}, - {STR_SIZE_1024_LAB, "1024"}, - {STR_SIZE_MAX_LAB, "Maximum"}, - {STR_NOSOUND_CTRL, "Disable Sound Output"}, - - {STR_SERIAL_NETWORK_PANE_TITLE, "Serial/Network"}, - {STR_SERPORTA_CTRL, "Modem Port"}, - {STR_SERPORTB_CTRL, "Printer Port"}, - {STR_NONET_CTRL, "Disable Ethernet"}, - {STR_ETHERNET_IF_CTRL, "Ethernet Interface"}, - - {STR_MEMORY_MISC_PANE_TITLE, "Memory/Misc"}, - {STR_RAMSIZE_CTRL, "MacOS RAM Size (MB)"}, - {STR_RAMSIZE_4MB_LAB, "4"}, - {STR_RAMSIZE_8MB_LAB, "8"}, - {STR_RAMSIZE_16MB_LAB, "16"}, - {STR_RAMSIZE_32MB_LAB, "32"}, - {STR_RAMSIZE_64MB_LAB, "64"}, - {STR_RAMSIZE_128MB_LAB, "128"}, - {STR_RAMSIZE_256MB_LAB, "256"}, - {STR_RAMSIZE_512MB_LAB, "512"}, - {STR_RAMSIZE_1024MB_LAB, "1024"}, - {STR_RAMSIZE_SLIDER, "MacOS RAM Size:"}, - {STR_RAMSIZE_FMT, "%d MB"}, - {STR_IGNORESEGV_CTRL, "Ignore Illegal Memory Accesses"}, - {STR_IDLEWAIT_CTRL, "Don't Use CPU When Idle"}, - {STR_ROM_FILE_CTRL, "ROM File"}, - - {STR_JIT_PANE_TITLE, "JIT Compiler"}, - {STR_JIT_CTRL, "Enable JIT Compiler"}, - {STR_JIT_68K_CTRL, "Enable built-in 68k DR Emulator (EXPERIMENTAL)"}, - - {STR_WINDOW_TITLE, "SheepShaver"}, - {STR_WINDOW_TITLE_FROZEN, "SheepShaver *** FROZEN ***"}, - {STR_WINDOW_MENU, "SheepShaver"}, - {STR_WINDOW_ITEM_ABOUT, "About SheepShaver" ELLIPSIS}, - {STR_WINDOW_ITEM_REFRESH, "Refresh Rate"}, - {STR_WINDOW_ITEM_MOUNT, "Mount"}, - - {STR_SOUND_IN_NAME, "\010Built-In"}, - - {STR_EXTFS_NAME, "Host Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "Host"}, - - {-1, NULL} // End marker -}; diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp deleted file mode 100644 index d0eda93db..000000000 --- a/SheepShaver/src/video.cpp +++ /dev/null @@ -1,1097 +0,0 @@ -/* - * video.cpp - Video/graphics emulation - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - */ - -/* - * TODO - * - check for supported modes ??? - */ - -#include -#include - -#include "sysdeps.h" -#include "video.h" -#include "video_defs.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "user_strings.h" -#include "version.h" -#include "thunks.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -bool video_activated = false; // Flag: video display activated, mouse and keyboard data valid -uint32 screen_base = 0; // Frame buffer base address -int cur_mode; // Number of current video mode (index in VModes array) -int display_type = DIS_INVALID; // Current display type -rgb_color mac_pal[256]; -uint8 remap_mac_be[256]; -uint8 MacCursor[68] = {16, 1}; // Mac cursor image - - -bool keyfile_valid; // Flag: Keyfile is valid, enable full-screen modes - - -/* - * Video mode information (constructed by VideoInit()) - */ - -struct VideoInfo VModes[64]; - - -/* - * Driver local variables - */ - -VidLocals *private_data = NULL; // Pointer to driver local variables (there is only one display, so this is ok) - -static long save_conf_id = APPLE_W_640x480; -static long save_conf_mode = APPLE_8_BIT; - - -// Function pointers of imported functions -typedef int16 (*iocic_ptr)(void *, int16); -static uint32 iocic_tvect = 0; -static inline int16 IOCommandIsComplete(uintptr arg1, int16 arg2) -{ - return (int16)CallMacOS2(iocic_ptr, iocic_tvect, (void *)arg1, arg2); -} -typedef int16 (*vslnewis_ptr)(void *, uint32, uint32 *); -static uint32 vslnewis_tvect = 0; -static inline int16 VSLNewInterruptService(uintptr arg1, uint32 arg2, uintptr arg3) -{ - return (int16)CallMacOS3(vslnewis_ptr, vslnewis_tvect, (void *)arg1, arg2, (uint32 *)arg3); -} -typedef int16 (*vsldisposeis_ptr)(uint32); -static uint32 vsldisposeis_tvect = 0; -static inline int16 VSLDisposeInterruptService(uint32 arg1) -{ - return (int16)CallMacOS1(vsldisposeis_ptr, vsldisposeis_tvect, arg1); -} -typedef int16 (*vsldois_ptr)(uint32); -static uint32 vsldois_tvect = 0; -int16 VSLDoInterruptService(uint32 arg1) -{ - return (int16)CallMacOS1(vsldois_ptr, vsldois_tvect, arg1); -} -typedef void (*nqdmisc_ptr)(uint32, void *); -static uint32 nqdmisc_tvect = 0; -void NQDMisc(uint32 arg1, uintptr arg2) -{ - CallMacOS2(nqdmisc_ptr, nqdmisc_tvect, arg1, (void *)arg2); -} - - -// Prototypes -static int16 set_gamma(VidLocals *csSave, uint32 gamma); - - -/* - * Tell whether window/screen is activated or not (for mouse/keyboard polling) - */ - -bool VideoActivated(void) -{ - return video_activated; -} - - -/* - * Create RGB snapshot of current screen - */ - -bool VideoSnapshot(int xsize, int ysize, uint8 *p) -{ - if (display_type == DIS_WINDOW) { - uint8 *screen = (uint8 *)private_data->saveBaseAddr; - uint32 row_bytes = VModes[cur_mode].viRowBytes; - uint32 y2size = VModes[cur_mode].viYsize; - uint32 x2size = VModes[cur_mode].viXsize; - for (int j=0;jsaveBaseAddr = screen_base; - csSave->saveData = VModes[cur_mode].viAppleID;// First mode ... - csSave->saveMode = VModes[cur_mode].viAppleMode; - csSave->savePage = 0; - csSave->saveVidParms = 0; // Add the right table - csSave->luminanceMapping = false; - csSave->cursorHardware = UseHardwareCursor(); - csSave->cursorX = 0; - csSave->cursorY = 0; - csSave->cursorVisible = 0; - csSave->cursorSet = 0; - csSave->cursorHotFlag = false; - csSave->cursorHotX = 0; - csSave->cursorHotY = 0; - - // Find and set default gamma table - csSave->gammaTable = 0; - csSave->maxGammaTableSize = 0; - set_gamma(csSave, 0); - - // Install and activate interrupt service - SheepVar32 theServiceID = 0; - VSLNewInterruptService(csSave->regEntryID, FOURCC('v','b','l',' '), theServiceID.addr()); - csSave->vslServiceID = theServiceID.value(); - D(bug(" Interrupt ServiceID %08lx\n", csSave->vslServiceID)); - csSave->interruptsEnabled = true; - - return noErr; -} - - -/* - * Video driver control routine - */ - -static bool allocate_gamma_table(VidLocals *csSave, uint32 size) -{ - if (size > csSave->maxGammaTableSize) { - if (csSave->gammaTable) { - Mac_sysfree(csSave->gammaTable); - csSave->gammaTable = 0; - csSave->maxGammaTableSize = 0; - } - if ((csSave->gammaTable = Mac_sysalloc(size)) == 0) - return false; - csSave->maxGammaTableSize = size; - } - return true; -} - -static int16 set_gamma(VidLocals *csSave, uint32 gamma) -{ - if (gamma == 0) { // Build linear ramp, 256 entries - - // Allocate new table, if necessary - if (!allocate_gamma_table(csSave, SIZEOF_GammaTbl + 256)) - return memFullErr; - - // Initialize header - WriteMacInt16(csSave->gammaTable + gVersion, 0); // A version 0 style of the GammaTbl structure - WriteMacInt16(csSave->gammaTable + gType, 0); // Frame buffer hardware invariant - WriteMacInt16(csSave->gammaTable + gFormulaSize, 0); // No formula data, just correction data - WriteMacInt16(csSave->gammaTable + gChanCnt, 1); // Apply same correction to Red, Green, & Blue - WriteMacInt16(csSave->gammaTable + gDataCnt, 256); // gDataCnt == 2^^gDataWidth - WriteMacInt16(csSave->gammaTable + gDataWidth, 8); // 8 bits of significant data per entry - - // Build the linear ramp - uint32 p = csSave->gammaTable + gFormulaData; - for (int i=0; i<256; i++) - WriteMacInt8(p + i, i); - - } else { // User-supplied gamma table - - // Validate header - if (ReadMacInt16(gamma + gVersion) != 0) - return paramErr; - if (ReadMacInt16(gamma + gType) != 0) - return paramErr; - int chan_cnt = ReadMacInt16(gamma + gChanCnt); - if (chan_cnt != 1 && chan_cnt != 3) - return paramErr; - int data_width = ReadMacInt16(gamma + gDataWidth); - if (data_width > 8) - return paramErr; - int data_cnt = ReadMacInt16(gamma + gDataCnt); - if (data_cnt != (1 << data_width)) - return paramErr; - - // Allocate new table, if necessary - int size = SIZEOF_GammaTbl + ReadMacInt16(gamma + gFormulaSize) + chan_cnt * data_cnt; - if (!allocate_gamma_table(csSave, size)) - return memFullErr; - - // Copy table - Mac2Mac_memcpy(csSave->gammaTable, gamma, size); - } - return noErr; -} - -static int16 VideoControl(uint32 pb, VidLocals *csSave) -{ - int16 code = ReadMacInt16(pb + csCode); - D(bug("VideoControl %d: ", code)); - uint32 param = ReadMacInt32(pb + csParam); - switch (code) { - - case cscReset: // VidReset - D(bug("VidReset\n")); - return controlErr; - - case cscKillIO: // VidKillIO - D(bug("VidKillIO\n")); - return controlErr; - - case cscSetMode: // SetVidMode - D(bug("SetVidMode\n")); - D(bug("mode:%04x page:%04x \n", ReadMacInt16(param + csMode), - ReadMacInt16(param + csPage))); - WriteMacInt32(param + csData, csSave->saveData); - return video_mode_change(csSave, param); - - case cscSetEntries: { // SetEntries - D(bug("SetEntries\n")); - if (VModes[cur_mode].viAppleMode > APPLE_8_BIT) return controlErr; - uint32 s_pal = ReadMacInt32(param + csTable); - uint16 start = ReadMacInt16(param + csStart); - uint16 count = ReadMacInt16(param + csCount); - if (s_pal == 0 || count > 256) return controlErr; - - // Preparations for gamma correction - bool do_gamma = false; - uint8 *red_gamma = NULL; - uint8 *green_gamma = NULL; - uint8 *blue_gamma = NULL; - int gamma_data_width = 0; - if (csSave->gammaTable) { -#ifdef __BEOS__ - // Windows are gamma-corrected by BeOS - const bool can_do_gamma = (display_type == DIS_SCREEN); -#else - const bool can_do_gamma = true; -#endif - if (can_do_gamma) { - uint32 gamma_table = csSave->gammaTable; - red_gamma = Mac2HostAddr(gamma_table + gFormulaData + ReadMacInt16(gamma_table + gFormulaSize)); - int chan_cnt = ReadMacInt16(gamma_table + gChanCnt); - if (chan_cnt == 1) - green_gamma = blue_gamma = red_gamma; - else { - int ofs = ReadMacInt16(gamma_table + gDataCnt); - green_gamma = red_gamma + ofs; - blue_gamma = green_gamma + ofs; - } - gamma_data_width = ReadMacInt16(gamma_table + gDataWidth); - do_gamma = true; - } - } - - // Set palette - rgb_color *d_pal; - if (start == 0xffff) { // Indexed - for (int i=0; i<=count; i++) { - d_pal = mac_pal + (ReadMacInt16(s_pal + csValue) & 0xff); - uint8 red = (uint16)ReadMacInt16(s_pal + csRed) >> 8; - uint8 green = (uint16)ReadMacInt16(s_pal + csGreen) >> 8; - uint8 blue = (uint16)ReadMacInt16(s_pal + csBlue) >> 8; - if (csSave->luminanceMapping) - red = green = blue = (red * 0x4ccc + green * 0x970a + blue * 0x1c29) >> 16; - if (do_gamma) { - red = red_gamma[red >> (8 - gamma_data_width)]; - green = green_gamma[green >> (8 - gamma_data_width)]; - blue = blue_gamma[blue >> (8 - gamma_data_width)]; - } - (*d_pal).red = red; - (*d_pal).green = green; - (*d_pal).blue = blue; - s_pal += 8; - } - } else { // Sequential - d_pal = mac_pal + start; - for (int i=0; i<=count; i++) { - uint8 red = (uint16)ReadMacInt16(s_pal + csRed) >> 8; - uint8 green = (uint16)ReadMacInt16(s_pal + csGreen) >> 8; - uint8 blue = (uint16)ReadMacInt16(s_pal + csBlue) >> 8; - if (csSave->luminanceMapping) - red = green = blue = (red * 0x4ccc + green * 0x970a + blue * 0x1c29) >> 16; - if (do_gamma) { - red = red_gamma[red >> (8 - gamma_data_width)]; - green = green_gamma[green >> (8 - gamma_data_width)]; - blue = blue_gamma[blue >> (8 - gamma_data_width)]; - } - (*d_pal).red = red; - (*d_pal).green = green; - (*d_pal).blue = blue; - d_pal++; - s_pal += 8; - } - } - video_set_palette(); - return noErr; - } - - case cscSetGamma: { // SetGamma - uint32 user_table = ReadMacInt32(param + csGTable); - D(bug("SetGamma %08x\n", user_table)); - return set_gamma(csSave, user_table); - } - - case cscGrayPage: { // GrayPage - D(bug("GrayPage %d\n", ReadMacInt16(param + csPage))); - if (ReadMacInt16(param + csPage)) - return paramErr; - - uint32 pattern[6] = { - 0xaaaaaaaa, // 1 bpp - 0xcccccccc, // 2 bpp - 0xf0f0f0f0, // 4 bpp - 0xff00ff00, // 8 bpp - 0xffff0000, // 16 bpp - 0xffffffff // 32 bpp - }; - uint32 p = csSave->saveBaseAddr; - uint32 pat = pattern[VModes[cur_mode].viAppleMode - APPLE_1_BIT]; - bool invert = (VModes[cur_mode].viAppleMode == APPLE_32_BIT); - for (uint32 y=0; yluminanceMapping = ReadMacInt8(param); - return noErr; - - case cscSetInterrupt: // SetInterrupt - D(bug("SetInterrupt\n")); - csSave->interruptsEnabled = !ReadMacInt8(param); - return noErr; - - case cscDirectSetEntries: // DirectSetEntries - D(bug("DirectSetEntries\n")); - return controlErr; - - case cscSetDefaultMode: // SetDefaultMode - D(bug("SetDefaultMode\n")); - return controlErr; - - case cscSwitchMode: - D(bug("cscSwitchMode (Display Manager support) \nMode:%02x ID:%04x Page:%d\n", - ReadMacInt16(param + csMode), ReadMacInt32(param + csData), ReadMacInt16(param + csPage))); - return video_mode_change(csSave, param); - - case cscSavePreferredConfiguration: - D(bug("SavePreferredConfiguration\n")); - save_conf_id = ReadMacInt32(param + csData); - save_conf_mode = ReadMacInt16(param + csMode); - return noErr; - - case cscSetHardwareCursor: { -// D(bug("SetHardwareCursor\n")); - - if (!csSave->cursorHardware) - return controlErr; - - csSave->cursorSet = false; - bool changed = false; - - // Image - uint32 cursor = ReadMacInt32(param); // Pointer to CursorImage - uint32 pmhandle = ReadMacInt32(cursor + ciCursorPixMap); - if (pmhandle == 0 || ReadMacInt32(pmhandle) == 0) - return controlErr; - uint32 pixmap = ReadMacInt32(pmhandle); - - // XXX: only certain image formats are handled properly at the moment - uint16 rowBytes = ReadMacInt16(pixmap + 4) & 0x7FFF; - if (rowBytes != 2) - return controlErr; - - // Mask - uint32 bmhandle = ReadMacInt32(cursor + ciCursorBitMask); - if (bmhandle == 0 || ReadMacInt32(bmhandle) == 0) - return controlErr; - uint32 bitmap = ReadMacInt32(bmhandle); - - // Get cursor data even on a screen, to set the right cursor image when switching back to a window. - // Hotspot is stale, but will be fixed by the next call to DrawHardwareCursor, which is likely to - // occur immediately hereafter. - - if (memcmp(MacCursor + 4, Mac2HostAddr(ReadMacInt32(pixmap)), 32)) { - memcpy(MacCursor + 4, Mac2HostAddr(ReadMacInt32(pixmap)), 32); - changed = true; - } - if (memcmp(MacCursor + 4 + 32, Mac2HostAddr(ReadMacInt32(bitmap)), 32)) { - memcpy(MacCursor + 4 + 32, Mac2HostAddr(ReadMacInt32(bitmap)), 32); - changed = true; - } - - // Set new cursor image - if (!video_can_change_cursor()) - return controlErr; - if (changed) - video_set_cursor(); - - csSave->cursorSet = true; - csSave->cursorHotFlag = true; - return noErr; - } - - case cscDrawHardwareCursor: { -// D(bug("DrawHardwareCursor\n")); - - if (!csSave->cursorHardware) - return controlErr; - - int32 oldX = csSave->cursorX; - int32 oldY = csSave->cursorY; - uint32 oldVisible = csSave->cursorVisible; - - csSave->cursorX = ReadMacInt32(param + csCursorX); - csSave->cursorY = ReadMacInt32(param + csCursorY); - csSave->cursorVisible = ReadMacInt32(param + csCursorVisible); - bool changed = (csSave->cursorVisible != oldVisible); - - // If this is the first DrawHardwareCursor call since the cursor was last set (via SetHardwareCursor), - // attempt to set an appropriate cursor hotspot. SetHardwareCursor itself does not know what the - // hotspot should be; it knows only the cursor image and mask. The hotspot is known only to the caller, - // and we have to try to infer it here. The usual sequence of calls when changing the cursor is: - // - // DrawHardwareCursor with (oldX, oldY, invisible) - // SetHardwareCursor with (cursor) - // DrawHardwareCursor with (newX, newY, visible) - // - // The key thing to note is that the sequence is intended not to change the current screen pixel location - // indicated by the hotspot. Thus, the difference between (newX, newY) and (oldX, oldY) reflects precisely - // the difference between the old cursor hotspot and the new one. For example, if you change from a - // cursor whose hotspot is (1, 1) to one whose hotspot is (7, 4), then you must adjust the cursor position - // by (-6, -3) in order for the same screen pixel to remain under the new hotspot. - // - // Alas, on rare occasions this heuristic can fail, and if you did nothing else you could even get stuck - // with the wrong hotspot from then on. To address that possibility, we force the hotspot to (1, 1) - // whenever the cursor being drawn is the standard arrow. Thus, while it is very unlikely that you will - // ever have the wrong hotspot, if you do, it is easy to recover. - - if (csSave->cursorHotFlag) { - csSave->cursorHotFlag = false; - D(bug("old hotspot (%d, %d)\n", csSave->cursorHotX, csSave->cursorHotY)); - - static uint8 arrow[] = { - 0x00, 0x00, 0x40, 0x00, 0x60, 0x00, 0x70, 0x00, 0x78, 0x00, 0x7C, 0x00, 0x7E, 0x00, 0x7F, 0x00, - 0x7F, 0x80, 0x7C, 0x00, 0x6C, 0x00, 0x46, 0x00, 0x06, 0x00, 0x03, 0x00, 0x03, 0x00, 0x00, 0x00, - }; - if (memcmp(MacCursor + 4, arrow, 32) == 0) { - csSave->cursorHotX = 1; - csSave->cursorHotY = 1; - } else if (csSave->cursorX != oldX || csSave->cursorY != oldY) { - int32 hotX = csSave->cursorHotX + (oldX - csSave->cursorX); - int32 hotY = csSave->cursorHotY + (oldY - csSave->cursorY); - - if (0 <= hotX && hotX <= 15 && 0 <= hotY && hotY <= 15) { - csSave->cursorHotX = hotX; - csSave->cursorHotY = hotY; - } - } - if (MacCursor[2] != csSave->cursorHotX || MacCursor[3] != csSave->cursorHotY) { - MacCursor[2] = csSave->cursorHotX; - MacCursor[3] = csSave->cursorHotY; - changed = true; - } - D(bug("new hotspot (%d, %d)\n", csSave->cursorHotX, csSave->cursorHotY)); - } - - if (changed && video_can_change_cursor()) - video_set_cursor(); - - return noErr; - } - - case 43: { // Driver Gestalt - uint32 sel = ReadMacInt32(pb + csParam); - D(bug(" driver gestalt %c%c%c%c\n", sel >> 24, sel >> 16, sel >> 8, sel)); - switch (sel) { - case FOURCC('v','e','r','s'): - WriteMacInt32(pb + csParam + 4, 0x01008000); - break; - case FOURCC('i','n','t','f'): - WriteMacInt32(pb + csParam + 4, FOURCC('c','a','r','d')); - break; - case FOURCC('s','y','n','c'): - WriteMacInt32(pb + csParam + 4, 0x01000000); - break; - default: - return statusErr; - }; - return noErr; - } - - default: - D(bug(" unknown control code %d\n", code)); - return controlErr; - } -} - - -/* - * Video driver status routine - */ - -// Search for given AppleID in mode table -static bool has_mode(uint32 id) -{ - VideoInfo *p = VModes; - while (p->viType != DIS_INVALID) { - if (p->viAppleID == id) - return true; - p++; - } - return false; -} - -// Find maximum depth for given AppleID -static uint32 max_depth(uint32 id) -{ - uint32 max = APPLE_1_BIT; - VideoInfo *p = VModes; - while (p->viType != DIS_INVALID) { - if (p->viAppleID == id && p->viAppleMode > max) - max = p->viAppleMode; - p++; - } - return max; -} - -// Get X/Y size of specified resolution -static void get_size_of_resolution(int id, uint32 &x, uint32 &y) -{ - VideoInfo *p = VModes; - while (p->viType != DIS_INVALID) { - if (p->viAppleID == id) { - x = p->viXsize; - y = p->viYsize; - return; - } - p++; - } - x = y = 0; -} - -static int16 VideoStatus(uint32 pb, VidLocals *csSave) -{ - int16 code = ReadMacInt16(pb + csCode); - D(bug("VideoStatus %d: ", code)); - uint32 param = ReadMacInt32(pb + csParam); - switch (code) { - - case cscGetMode: // GetMode - D(bug("GetMode\n")); - WriteMacInt32(param + csBaseAddr, csSave->saveBaseAddr); - WriteMacInt16(param + csMode, csSave->saveMode); - WriteMacInt16(param + csPage, csSave->savePage); - D(bug("return: mode:%04x page:%04x ", ReadMacInt16(param + csMode), - ReadMacInt16(param + csPage))); - D(bug("base adress %08lx\n", ReadMacInt32(param + csBaseAddr))); - return noErr; - - case cscGetEntries: { // GetEntries - D(bug("GetEntries\n")); - uint32 d_pal = ReadMacInt32(param + csTable); - uint16 start = ReadMacInt16(param + csStart); - uint16 count = ReadMacInt16(param + csCount); - rgb_color *s_pal; - if ((VModes[cur_mode].viAppleMode == APPLE_32_BIT)|| - (VModes[cur_mode].viAppleMode == APPLE_16_BIT)) { - D(bug("ERROR: GetEntries in direct mode \n")); - return statusErr; - } - - if (start == 0xffff) { // Indexed - for (uint16 i=0;i 255) - return paramErr; - s_pal = mac_pal + start; - for (uint16 i=0;isaveBaseAddr); - return noErr; - - case cscGetGray: // GetGray - D(bug("GetGray\n")); - WriteMacInt8(param, csSave->luminanceMapping ? 1 : 0); - return noErr; - - case cscGetInterrupt: // GetInterrupt - D(bug("GetInterrupt\n")); - WriteMacInt8(param, csSave->interruptsEnabled ? 0 : 1); - return noErr; - - case cscGetGamma: // GetGamma - D(bug("GetGamma\n")); - WriteMacInt32(param, (uint32)csSave->gammaTable); - return noErr; - - case cscGetDefaultMode: // GetDefaultMode - D(bug("GetDefaultMode\n")); - return statusErr; - - case cscGetCurMode: // GetCurMode - D(bug("GetCurMode\n")); - WriteMacInt16(param + csMode, csSave->saveMode); - WriteMacInt32(param + csData, csSave->saveData); - WriteMacInt16(param + csPage, csSave->savePage); - WriteMacInt32(param + csBaseAddr, csSave->saveBaseAddr); - - D(bug("return: mode:%04x ID:%08lx page:%04x ", ReadMacInt16(param + csMode), - ReadMacInt32(param + csData), ReadMacInt16(param + csPage))); - D(bug("base adress %08lx\n", ReadMacInt32(param + csBaseAddr))); - return noErr; - - case cscGetConnection: // GetConnection - D(bug("GetConnection\n")); - WriteMacInt16(param + csDisplayType, kMultiModeCRT3Connect); - WriteMacInt8(param + csConnectTaggedType, 6); - WriteMacInt8(param + csConnectTaggedData, 0x23); - WriteMacInt32(param + csConnectFlags, (1<saveData; - break; - case kDisplayModeIDFindFirstResolution: - work_id = APPLE_ID_MIN; - while (!has_mode(work_id)) - work_id ++; - break; - default: - if (!has_mode(work_id)) - return paramErr; - work_id++; - while (!has_mode(work_id)) { - work_id++; - if (work_id > APPLE_ID_MAX) { - WriteMacInt32(param + csRIDisplayModeID, kDisplayModeIDNoMoreResolutions); - return noErr; - } - } - break; - } - WriteMacInt32(param + csRIDisplayModeID, work_id); - WriteMacInt16(param + csMaxDepthMode, max_depth(work_id)); - switch (work_id) { - case APPLE_640x480: - WriteMacInt32(param + csHorizontalPixels, 640); - WriteMacInt32(param + csVerticalLines, 480); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_W_640x480: - WriteMacInt32(param + csHorizontalPixels, 640); - WriteMacInt32(param + csVerticalLines, 480); - WriteMacInt32(param + csRefreshRate, 60<<16); - break; - case APPLE_800x600: - WriteMacInt32(param + csHorizontalPixels, 800); - WriteMacInt32(param + csVerticalLines, 600); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_W_800x600: - WriteMacInt32(param + csHorizontalPixels, 800); - WriteMacInt32(param + csVerticalLines, 600); - WriteMacInt32(param + csRefreshRate, 60<<16); - break; - case APPLE_1024x768: - WriteMacInt32(param + csHorizontalPixels, 1024); - WriteMacInt32(param + csVerticalLines, 768); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_1152x768: - WriteMacInt32(param + csHorizontalPixels, 1152); - WriteMacInt32(param + csVerticalLines, 768); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_1152x900: - WriteMacInt32(param + csHorizontalPixels, 1152); - WriteMacInt32(param + csVerticalLines, 900); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_1280x1024: - WriteMacInt32(param + csHorizontalPixels, 1280); - WriteMacInt32(param + csVerticalLines, 1024); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_1600x1200: - WriteMacInt32(param + csHorizontalPixels, 1600); - WriteMacInt32(param + csVerticalLines, 1200); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - case APPLE_CUSTOM: { - uint32 x, y; - get_size_of_resolution(work_id, x, y); - WriteMacInt32(param + csHorizontalPixels, x); - WriteMacInt32(param + csVerticalLines, y); - WriteMacInt32(param + csRefreshRate, 75<<16); - break; - } - } - return noErr; - } - - case cscGetVideoParameters: // GetVideoParameters - D(bug("GetVideoParameters ID:%08lx Depth:%04x\n", - ReadMacInt32(param + csDisplayModeID), - ReadMacInt16(param + csDepthMode))); - - // find right video mode - for (int i=0; VModes[i].viType!=DIS_INVALID; i++) { - if ((ReadMacInt16(param + csDepthMode) == VModes[i].viAppleMode) && - (ReadMacInt32(param + csDisplayModeID) == VModes[i].viAppleID)) { - uint32 vpb = ReadMacInt32(param + csVPBlockPtr); - WriteMacInt32(vpb + vpBaseOffset, 0); - WriteMacInt16(vpb + vpRowBytes, VModes[i].viRowBytes); - WriteMacInt16(vpb + vpBounds, 0); - WriteMacInt16(vpb + vpBounds + 2, 0); - WriteMacInt16(vpb + vpBounds + 4, VModes[i].viYsize); - WriteMacInt16(vpb + vpBounds + 6, VModes[i].viXsize); - WriteMacInt16(vpb + vpVersion, 0); // Pixel Map version number - WriteMacInt16(vpb + vpPackType, 0); - WriteMacInt32(vpb + vpPackSize, 0); - WriteMacInt32(vpb + vpHRes, 0x00480000); // horiz res of the device (ppi) - WriteMacInt32(vpb + vpVRes, 0x00480000); // vert res of the device (ppi) - switch (VModes[i].viAppleMode) { - case APPLE_1_BIT: - WriteMacInt16(vpb + vpPixelType, 0); - WriteMacInt16(vpb + vpPixelSize, 1); - WriteMacInt16(vpb + vpCmpCount, 1); - WriteMacInt16(vpb + vpCmpSize, 1); - WriteMacInt32(param + csDeviceType, 0); // CLUT - break; - case APPLE_2_BIT: - WriteMacInt16(vpb + vpPixelType, 0); - WriteMacInt16(vpb + vpPixelSize, 2); - WriteMacInt16(vpb + vpCmpCount, 1); - WriteMacInt16(vpb + vpCmpSize, 2); - WriteMacInt32(param + csDeviceType, 0); // CLUT - break; - case APPLE_4_BIT: - WriteMacInt16(vpb + vpPixelType, 0); - WriteMacInt16(vpb + vpPixelSize, 4); - WriteMacInt16(vpb + vpCmpCount, 1); - WriteMacInt16(vpb + vpCmpSize, 4); - WriteMacInt32(param + csDeviceType, 0); // CLUT - break; - case APPLE_8_BIT: - WriteMacInt16(vpb + vpPixelType, 0); - WriteMacInt16(vpb + vpPixelSize, 8); - WriteMacInt16(vpb + vpCmpCount, 1); - WriteMacInt16(vpb + vpCmpSize, 8); - WriteMacInt32(param + csDeviceType, 0); // CLUT - break; - case APPLE_16_BIT: - WriteMacInt16(vpb + vpPixelType, 0x10); - WriteMacInt16(vpb + vpPixelSize, 16); - WriteMacInt16(vpb + vpCmpCount, 3); - WriteMacInt16(vpb + vpCmpSize, 5); - WriteMacInt32(param + csDeviceType, 2); // DIRECT - break; - case APPLE_32_BIT: - WriteMacInt16(vpb + vpPixelType, 0x10); - WriteMacInt16(vpb + vpPixelSize, 32); - WriteMacInt16(vpb + vpCmpCount, 3); - WriteMacInt16(vpb + vpCmpSize, 8); - WriteMacInt32(param + csDeviceType, 2); // DIRECT - break; - } - WriteMacInt32(param + csPageCount, 1); - return noErr; - } - } - return paramErr; - - case cscGetModeTiming: - D(bug("GetModeTiming mode %08lx\n", ReadMacInt32(param + csTimingMode))); - WriteMacInt32(param + csTimingFormat, kDeclROMtables); - WriteMacInt32(param + csTimingFlags, (1<cursorHardware); - return noErr; - - case cscGetHardwareCursorDrawState: - D(bug("GetHardwareCursorDrawState\n")); - - if (!csSave->cursorHardware) - return statusErr; - - WriteMacInt32(param + csCursorX, csSave->cursorX); - WriteMacInt32(param + csCursorY, csSave->cursorY); - WriteMacInt32(param + csCursorVisible, csSave->cursorVisible); - WriteMacInt32(param + csCursorSet, csSave->cursorSet); - return noErr; - - default: - D(bug(" unknown status code %d\n", code)); - return statusErr; - } -} - - -/* - * Video driver close routine - */ - -static int16 VideoClose(uint32 pb, VidLocals *csSave) -{ - D(bug("VideoClose\n")); - - // Delete interrupt service - csSave->interruptsEnabled = false; - VSLDisposeInterruptService(csSave->vslServiceID); - - return noErr; -} - - -/* - * Native (PCI) driver entry - */ - -int16 VideoDoDriverIO(uint32 spaceID, uint32 commandID, uint32 commandContents, uint32 commandCode, uint32 commandKind) -{ -// D(bug("VideoDoDriverIO space %08x, command %08x, contents %08x, code %d, kind %d\n", spaceID, commandID, commandContents, commandCode, commandKind)); - int16 err = noErr; - - switch (commandCode) { - case kInitializeCommand: - case kReplaceCommand: - if (private_data != NULL) { // Might be left over from a reboot - if (private_data->gammaTable) - Mac_sysfree(private_data->gammaTable); - if (private_data->regEntryID) - Mac_sysfree(private_data->regEntryID); - } - delete private_data; - - iocic_tvect = FindLibSymbol("\021DriverServicesLib", "\023IOCommandIsComplete"); - D(bug("IOCommandIsComplete TVECT at %08lx\n", iocic_tvect)); - if (iocic_tvect == 0) { - printf("FATAL: VideoDoDriverIO(): Can't find IOCommandIsComplete()\n"); - err = -1; - break; - } - vslnewis_tvect = FindLibSymbol("\020VideoServicesLib", "\026VSLNewInterruptService"); - D(bug("VSLNewInterruptService TVECT at %08lx\n", vslnewis_tvect)); - if (vslnewis_tvect == 0) { - printf("FATAL: VideoDoDriverIO(): Can't find VSLNewInterruptService()\n"); - err = -1; - break; - } - vsldisposeis_tvect = FindLibSymbol("\020VideoServicesLib", "\032VSLDisposeInterruptService"); - D(bug("VSLDisposeInterruptService TVECT at %08lx\n", vsldisposeis_tvect)); - if (vsldisposeis_tvect == 0) { - printf("FATAL: VideoDoDriverIO(): Can't find VSLDisposeInterruptService()\n"); - err = -1; - break; - } - vsldois_tvect = FindLibSymbol("\020VideoServicesLib", "\025VSLDoInterruptService"); - D(bug("VSLDoInterruptService TVECT at %08lx\n", vsldois_tvect)); - if (vsldois_tvect == 0) { - printf("FATAL: VideoDoDriverIO(): Can't find VSLDoInterruptService()\n"); - err = -1; - break; - } - nqdmisc_tvect = FindLibSymbol("\014InterfaceLib", "\007NQDMisc"); - D(bug("NQDMisc TVECT at %08lx\n", nqdmisc_tvect)); - if (nqdmisc_tvect == 0) { - printf("FATAL: VideoDoDriverIO(): Can't find NQDMisc()\n"); - err = -1; - break; - } - - private_data = new VidLocals; - private_data->gammaTable = 0; - private_data->regEntryID = Mac_sysalloc(sizeof(RegEntryID)); - if (private_data->regEntryID == 0) { - printf("FATAL: VideoDoDriverIO(): Can't allocate service owner\n"); - err = -1; - break; - } - Mac2Mac_memcpy(private_data->regEntryID, commandContents + 2, 16); // DriverInitInfo.deviceEntry - private_data->interruptsEnabled = false; // Disable interrupts - break; - - case kFinalizeCommand: - case kSupersededCommand: - if (private_data != NULL) { - if (private_data->gammaTable) - Mac_sysfree(private_data->gammaTable); - if (private_data->regEntryID) - Mac_sysfree(private_data->regEntryID); - } - delete private_data; - private_data = NULL; - break; - - case kOpenCommand: - err = VideoOpen(commandContents, private_data); - break; - - case kCloseCommand: - err = VideoClose(commandContents, private_data); - break; - - case kControlCommand: - err = VideoControl(commandContents, private_data); - break; - - case kStatusCommand: - err = VideoStatus(commandContents, private_data); - break; - - case kReadCommand: - case kWriteCommand: - break; - - case kKillIOCommand: - err = abortErr; - break; - - default: - err = paramErr; - break; - } - - if (commandKind == kImmediateIOCommandKind) - return err; - else - return IOCommandIsComplete(commandID, err); -} diff --git a/SheepShaver/src/xpram.cpp b/SheepShaver/src/xpram.cpp deleted file mode 120000 index 17fe090fd..000000000 --- a/SheepShaver/src/xpram.cpp +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/xpram.cpp \ No newline at end of file diff --git a/cxmon/.gitignore b/cxmon/.gitignore deleted file mode 100644 index ab09b3078..000000000 --- a/cxmon/.gitignore +++ /dev/null @@ -1,26 +0,0 @@ -# Object files -*.o - -# Executables and libraries -src/cxmon -src/disass/libdisass.a - -# Autoconf generated files -.deps -Makefile -Makefile.in -aclocal.m4 -autom4te.cache -compile -config.guess -config.h -config.h.in -config.log -config.status -config.sub -configure -cxmon.spec -depcomp -install-sh -missing -stamp-h1 diff --git a/cxmon/AUTHORS b/cxmon/AUTHORS deleted file mode 100644 index ffbd0fa05..000000000 --- a/cxmon/AUTHORS +++ /dev/null @@ -1,8 +0,0 @@ -'mon' was written by - Christian Bauer - Marc Hellwig - -with contributions from - Gwenolé Beauchesne (64-bit support and PPC extensions) - -The 680x0 and 80x86 disassemblers are taken from GNU binutils. diff --git a/cxmon/COPYING b/cxmon/COPYING deleted file mode 100644 index 60549be51..000000000 --- a/cxmon/COPYING +++ /dev/null @@ -1,340 +0,0 @@ - GNU GENERAL PUBLIC LICENSE - Version 2, June 1991 - - Copyright (C) 1989, 1991 Free Software Foundation, Inc. - 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - Everyone is permitted to copy and distribute verbatim copies - of this license document, but changing it is not allowed. - - Preamble - - The licenses for most software are designed to take away your -freedom to share and change it. By contrast, the GNU General Public -License is intended to guarantee your freedom to share and change free -software--to make sure the software is free for all its users. This -General Public License applies to most of the Free Software -Foundation's software and to any other program whose authors commit to -using it. (Some other Free Software Foundation software is covered by -the GNU Library General Public License instead.) You can apply it to -your programs, too. - - When we speak of free software, we are referring to freedom, not -price. Our General Public Licenses are designed to make sure that you -have the freedom to distribute copies of free software (and charge for -this service if you wish), that you receive source code or can get it -if you want it, that you can change the software or use pieces of it -in new free programs; and that you know you can do these things. - - To protect your rights, we need to make restrictions that forbid -anyone to deny you these rights or to ask you to surrender the rights. -These restrictions translate to certain responsibilities for you if you -distribute copies of the software, or if you modify it. - - For example, if you distribute copies of such a program, whether -gratis or for a fee, you must give the recipients all the rights that -you have. You must make sure that they, too, receive or can get the -source code. And you must show them these terms so they know their -rights. - - We protect your rights with two steps: (1) copyright the software, and -(2) offer you this license which gives you legal permission to copy, -distribute and/or modify the software. - - Also, for each author's protection and ours, we want to make certain -that everyone understands that there is no warranty for this free -software. If the software is modified by someone else and passed on, we -want its recipients to know that what they have is not the original, so -that any problems introduced by others will not reflect on the original -authors' reputations. - - Finally, any free program is threatened constantly by software -patents. We wish to avoid the danger that redistributors of a free -program will individually obtain patent licenses, in effect making the -program proprietary. To prevent this, we have made it clear that any -patent must be licensed for everyone's free use or not licensed at all. - - The precise terms and conditions for copying, distribution and -modification follow. - - GNU GENERAL PUBLIC LICENSE - TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION - - 0. This License applies to any program or other work which contains -a notice placed by the copyright holder saying it may be distributed -under the terms of this General Public License. The "Program", below, -refers to any such program or work, and a "work based on the Program" -means either the Program or any derivative work under copyright law: -that is to say, a work containing the Program or a portion of it, -either verbatim or with modifications and/or translated into another -language. (Hereinafter, translation is included without limitation in -the term "modification".) Each licensee is addressed as "you". - -Activities other than copying, distribution and modification are not -covered by this License; they are outside its scope. The act of -running the Program is not restricted, and the output from the Program -is covered only if its contents constitute a work based on the -Program (independent of having been made by running the Program). -Whether that is true depends on what the Program does. - - 1. You may copy and distribute verbatim copies of the Program's -source code as you receive it, in any medium, provided that you -conspicuously and appropriately publish on each copy an appropriate -copyright notice and disclaimer of warranty; keep intact all the -notices that refer to this License and to the absence of any warranty; -and give any other recipients of the Program a copy of this License -along with the Program. - -You may charge a fee for the physical act of transferring a copy, and -you may at your option offer warranty protection in exchange for a fee. - - 2. You may modify your copy or copies of the Program or any portion -of it, thus forming a work based on the Program, and copy and -distribute such modifications or work under the terms of Section 1 -above, provided that you also meet all of these conditions: - - a) You must cause the modified files to carry prominent notices - stating that you changed the files and the date of any change. - - b) You must cause any work that you distribute or publish, that in - whole or in part contains or is derived from the Program or any - part thereof, to be licensed as a whole at no charge to all third - parties under the terms of this License. - - c) If the modified program normally reads commands interactively - when run, you must cause it, when started running for such - interactive use in the most ordinary way, to print or display an - announcement including an appropriate copyright notice and a - notice that there is no warranty (or else, saying that you provide - a warranty) and that users may redistribute the program under - these conditions, and telling the user how to view a copy of this - License. (Exception: if the Program itself is interactive but - does not normally print such an announcement, your work based on - the Program is not required to print an announcement.) - -These requirements apply to the modified work as a whole. If -identifiable sections of that work are not derived from the Program, -and can be reasonably considered independent and separate works in -themselves, then this License, and its terms, do not apply to those -sections when you distribute them as separate works. But when you -distribute the same sections as part of a whole which is a work based -on the Program, the distribution of the whole must be on the terms of -this License, whose permissions for other licensees extend to the -entire whole, and thus to each and every part regardless of who wrote it. - -Thus, it is not the intent of this section to claim rights or contest -your rights to work written entirely by you; rather, the intent is to -exercise the right to control the distribution of derivative or -collective works based on the Program. - -In addition, mere aggregation of another work not based on the Program -with the Program (or with a work based on the Program) on a volume of -a storage or distribution medium does not bring the other work under -the scope of this License. - - 3. You may copy and distribute the Program (or a work based on it, -under Section 2) in object code or executable form under the terms of -Sections 1 and 2 above provided that you also do one of the following: - - a) Accompany it with the complete corresponding machine-readable - source code, which must be distributed under the terms of Sections - 1 and 2 above on a medium customarily used for software interchange; or, - - b) Accompany it with a written offer, valid for at least three - years, to give any third party, for a charge no more than your - cost of physically performing source distribution, a complete - machine-readable copy of the corresponding source code, to be - distributed under the terms of Sections 1 and 2 above on a medium - customarily used for software interchange; or, - - c) Accompany it with the information you received as to the offer - to distribute corresponding source code. (This alternative is - allowed only for noncommercial distribution and only if you - received the program in object code or executable form with such - an offer, in accord with Subsection b above.) - -The source code for a work means the preferred form of the work for -making modifications to it. For an executable work, complete source -code means all the source code for all modules it contains, plus any -associated interface definition files, plus the scripts used to -control compilation and installation of the executable. However, as a -special exception, the source code distributed need not include -anything that is normally distributed (in either source or binary -form) with the major components (compiler, kernel, and so on) of the -operating system on which the executable runs, unless that component -itself accompanies the executable. - -If distribution of executable or object code is made by offering -access to copy from a designated place, then offering equivalent -access to copy the source code from the same place counts as -distribution of the source code, even though third parties are not -compelled to copy the source along with the object code. - - 4. You may not copy, modify, sublicense, or distribute the Program -except as expressly provided under this License. Any attempt -otherwise to copy, modify, sublicense or distribute the Program is -void, and will automatically terminate your rights under this License. -However, parties who have received copies, or rights, from you under -this License will not have their licenses terminated so long as such -parties remain in full compliance. - - 5. You are not required to accept this License, since you have not -signed it. However, nothing else grants you permission to modify or -distribute the Program or its derivative works. These actions are -prohibited by law if you do not accept this License. Therefore, by -modifying or distributing the Program (or any work based on the -Program), you indicate your acceptance of this License to do so, and -all its terms and conditions for copying, distributing or modifying -the Program or works based on it. - - 6. Each time you redistribute the Program (or any work based on the -Program), the recipient automatically receives a license from the -original licensor to copy, distribute or modify the Program subject to -these terms and conditions. You may not impose any further -restrictions on the recipients' exercise of the rights granted herein. -You are not responsible for enforcing compliance by third parties to -this License. - - 7. If, as a consequence of a court judgment or allegation of patent -infringement or for any other reason (not limited to patent issues), -conditions are imposed on you (whether by court order, agreement or -otherwise) that contradict the conditions of this License, they do not -excuse you from the conditions of this License. If you cannot -distribute so as to satisfy simultaneously your obligations under this -License and any other pertinent obligations, then as a consequence you -may not distribute the Program at all. For example, if a patent -license would not permit royalty-free redistribution of the Program by -all those who receive copies directly or indirectly through you, then -the only way you could satisfy both it and this License would be to -refrain entirely from distribution of the Program. - -If any portion of this section is held invalid or unenforceable under -any particular circumstance, the balance of the section is intended to -apply and the section as a whole is intended to apply in other -circumstances. - -It is not the purpose of this section to induce you to infringe any -patents or other property right claims or to contest validity of any -such claims; this section has the sole purpose of protecting the -integrity of the free software distribution system, which is -implemented by public license practices. Many people have made -generous contributions to the wide range of software distributed -through that system in reliance on consistent application of that -system; it is up to the author/donor to decide if he or she is willing -to distribute software through any other system and a licensee cannot -impose that choice. - -This section is intended to make thoroughly clear what is believed to -be a consequence of the rest of this License. - - 8. If the distribution and/or use of the Program is restricted in -certain countries either by patents or by copyrighted interfaces, the -original copyright holder who places the Program under this License -may add an explicit geographical distribution limitation excluding -those countries, so that distribution is permitted only in or among -countries not thus excluded. In such case, this License incorporates -the limitation as if written in the body of this License. - - 9. The Free Software Foundation may publish revised and/or new versions -of the General Public License from time to time. Such new versions will -be similar in spirit to the present version, but may differ in detail to -address new problems or concerns. - -Each version is given a distinguishing version number. If the Program -specifies a version number of this License which applies to it and "any -later version", you have the option of following the terms and conditions -either of that version or of any later version published by the Free -Software Foundation. If the Program does not specify a version number of -this License, you may choose any version ever published by the Free Software -Foundation. - - 10. If you wish to incorporate parts of the Program into other free -programs whose distribution conditions are different, write to the author -to ask for permission. For software which is copyrighted by the Free -Software Foundation, write to the Free Software Foundation; we sometimes -make exceptions for this. Our decision will be guided by the two goals -of preserving the free status of all derivatives of our free software and -of promoting the sharing and reuse of software generally. - - NO WARRANTY - - 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY -FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN -OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES -PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED -OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF -MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS -TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE -PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, -REPAIR OR CORRECTION. - - 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING -WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR -REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, -INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING -OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED -TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY -YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER -PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE -POSSIBILITY OF SUCH DAMAGES. - - END OF TERMS AND CONDITIONS - - How to Apply These Terms to Your New Programs - - If you develop a new program, and you want it to be of the greatest -possible use to the public, the best way to achieve this is to make it -free software which everyone can redistribute and change under these terms. - - To do so, attach the following notices to the program. It is safest -to attach them to the start of each source file to most effectively -convey the exclusion of warranty; and each file should have at least -the "copyright" line and a pointer to where the full notice is found. - - - Copyright (C) 19yy - - 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 - - -Also add information on how to contact you by electronic and paper mail. - -If the program is interactive, make it output a short notice like this -when it starts in an interactive mode: - - Gnomovision version 69, Copyright (C) 19yy name of author - Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. - This is free software, and you are welcome to redistribute it - under certain conditions; type `show c' for details. - -The hypothetical commands `show w' and `show c' should show the appropriate -parts of the General Public License. Of course, the commands you use may -be called something other than `show w' and `show c'; they could even be -mouse-clicks or menu items--whatever suits your program. - -You should also get your employer (if you work as a programmer) or your -school, if any, to sign a "copyright disclaimer" for the program, if -necessary. Here is a sample; alter the names: - - Yoyodyne, Inc., hereby disclaims all copyright interest in the program - `Gnomovision' (which makes passes at compilers) written by James Hacker. - - , 1 April 1989 - Ty Coon, President of Vice - -This General Public License does not permit incorporating your program into -proprietary programs. If your program is a subroutine library, you may -consider it more useful to permit linking proprietary applications with the -library. If this is what you want to do, use the GNU Library General -Public License instead of this License. diff --git a/cxmon/ChangeLog b/cxmon/ChangeLog deleted file mode 100644 index df26a0ef8..000000000 --- a/cxmon/ChangeLog +++ /dev/null @@ -1,20 +0,0 @@ -V3.2 - 64-bit fixes to 680x0 disassembler, added AltiVec instructions to PPC - disassembler, fixes to Z80 disassembler (hl->ix/iy and relative jumps) -V3.1 - Make LowMem globals as predefined variables, fix 64-bit support, enable - x86-64 disassembler with "d8664" command, removed input line length - restrictions -V3.0 - Replaced 680x0 and 80x86 disassemblers with the ones from GNU binutils, - added symbolic display of MacOS low memory globals to PPC disassembler, - MacOS features in PPC disassembler are controlled by "-m" argument, - real memory mode is entered by "-r" argument, extended 8080 disassembler - to Z80, name changed from "mon" to "cxmon" -V2.2 - Switched to autoconf/automake, fixed some minor bugs in the PPC - disassembler, commands made modular, added binary dump (b) command -V2.1 - Compiled for BeOS R4, opens Terminal window when started from Tracker, - implemented 8080 disassembler, included Unix makefile -V2.0 - Unified PPC and x86 release -V1.5 - Non-interactive mode, real mode -V1.4 - Implemented 6502 and 680x0 disassemblers -V1.3 - Now uses libreadline - Disassembler: prints SPR names instead of numbers, fixed bugs -V1.0 - Initial release diff --git a/cxmon/INSTALL b/cxmon/INSTALL deleted file mode 100644 index b42a17ac4..000000000 --- a/cxmon/INSTALL +++ /dev/null @@ -1,182 +0,0 @@ -Basic Installation -================== - - These are generic installation instructions. - - The `configure' shell script attempts to guess correct values for -various system-dependent variables used during compilation. It uses -those values to create a `Makefile' in each directory of the package. -It may also create one or more `.h' files containing system-dependent -definitions. Finally, it creates a shell script `config.status' that -you can run in the future to recreate the current configuration, a file -`config.cache' that saves the results of its tests to speed up -reconfiguring, and a file `config.log' containing compiler output -(useful mainly for debugging `configure'). - - If you need to do unusual things to compile the package, please try -to figure out how `configure' could check whether to do them, and mail -diffs or instructions to the address given in the `README' so they can -be considered for the next release. If at some point `config.cache' -contains results you don't want to keep, you may remove or edit it. - - The file `configure.in' is used to create `configure' by a program -called `autoconf'. You only need `configure.in' if you want to change -it or regenerate `configure' using a newer version of `autoconf'. - -The simplest way to compile this package is: - - 1. `cd' to the directory containing the package's source code and type - `./configure' to configure the package for your system. If you're - using `csh' on an old version of System V, you might need to type - `sh ./configure' instead to prevent `csh' from trying to execute - `configure' itself. - - Running `configure' takes awhile. While running, it prints some - messages telling which features it is checking for. - - 2. Type `make' to compile the package. - - 3. Optionally, type `make check' to run any self-tests that come with - the package. - - 4. Type `make install' to install the programs and any data files and - documentation. - - 5. You can remove the program binaries and object files from the - source code directory by typing `make clean'. To also remove the - files that `configure' created (so you can compile the package for - a different kind of computer), type `make distclean'. There is - also a `make maintainer-clean' target, but that is intended mainly - for the package's developers. If you use it, you may have to get - all sorts of other programs in order to regenerate files that came - with the distribution. - -Compilers and Options -===================== - - Some systems require unusual options for compilation or linking that -the `configure' script does not know about. You can give `configure' -initial values for variables by setting them in the environment. Using -a Bourne-compatible shell, you can do that on the command line like -this: - CC=c89 CFLAGS=-O2 LIBS=-lposix ./configure - -Or on systems that have the `env' program, you can do it like this: - env CPPFLAGS=-I/usr/local/include LDFLAGS=-s ./configure - -Compiling For Multiple Architectures -==================================== - - You can compile the package for more than one kind of computer at the -same time, by placing the object files for each architecture in their -own directory. To do this, you must use a version of `make' that -supports the `VPATH' variable, such as GNU `make'. `cd' to the -directory where you want the object files and executables to go and run -the `configure' script. `configure' automatically checks for the -source code in the directory that `configure' is in and in `..'. - - If you have to use a `make' that does not supports the `VPATH' -variable, you have to compile the package for one architecture at a time -in the source code directory. After you have installed the package for -one architecture, use `make distclean' before reconfiguring for another -architecture. - -Installation Names -================== - - By default, `make install' will install the package's files in -`/usr/local/bin', `/usr/local/man', etc. You can specify an -installation prefix other than `/usr/local' by giving `configure' the -option `--prefix=PATH'. - - You can specify separate installation prefixes for -architecture-specific files and architecture-independent files. If you -give `configure' the option `--exec-prefix=PATH', the package will use -PATH as the prefix for installing programs and libraries. -Documentation and other data files will still use the regular prefix. - - In addition, if you use an unusual directory layout you can give -options like `--bindir=PATH' to specify different values for particular -kinds of files. Run `configure --help' for a list of the directories -you can set and what kinds of files go in them. - - If the package supports it, you can cause programs to be installed -with an extra prefix or suffix on their names by giving `configure' the -option `--program-prefix=PREFIX' or `--program-suffix=SUFFIX'. - -Optional Features -================= - - Some packages pay attention to `--enable-FEATURE' options to -`configure', where FEATURE indicates an optional part of the package. -They may also pay attention to `--with-PACKAGE' options, where PACKAGE -is something like `gnu-as' or `x' (for the X Window System). The -`README' should mention any `--enable-' and `--with-' options that the -package recognizes. - - For packages that use the X Window System, `configure' can usually -find the X include and library files automatically, but if it doesn't, -you can use the `configure' options `--x-includes=DIR' and -`--x-libraries=DIR' to specify their locations. - -Specifying the System Type -========================== - - There may be some features `configure' can not figure out -automatically, but needs to determine by the type of host the package -will run on. Usually `configure' can figure that out, but if it prints -a message saying it can not guess the host type, give it the -`--host=TYPE' option. TYPE can either be a short name for the system -type, such as `sun4', or a canonical name with three fields: - CPU-COMPANY-SYSTEM - -See the file `config.sub' for the possible values of each field. If -`config.sub' isn't included in this package, then this package doesn't -need to know the host type. - - If you are building compiler tools for cross-compiling, you can also -use the `--target=TYPE' option to select the type of system they will -produce code for and the `--build=TYPE' option to select the type of -system on which you are compiling the package. - -Sharing Defaults -================ - - If you want to set default values for `configure' scripts to share, -you can create a site shell script called `config.site' that gives -default values for variables like `CC', `cache_file', and `prefix'. -`configure' looks for `PREFIX/share/config.site' if it exists, then -`PREFIX/etc/config.site' if it exists. Or, you can set the -`CONFIG_SITE' environment variable to the location of the site script. -A warning: not all `configure' scripts look for a site script. - -Operation Controls -================== - - `configure' recognizes the following options to control how it -operates. - -`--cache-file=FILE' - Use and save the results of the tests in FILE instead of - `./config.cache'. Set FILE to `/dev/null' to disable caching, for - debugging `configure'. - -`--help' - Print a summary of the options to `configure', and exit. - -`--quiet' -`--silent' -`-q' - Do not print messages saying which checks are being made. To - suppress all normal output, redirect it to `/dev/null' (any error - messages will still be shown). - -`--srcdir=DIR' - Look for the package's source code in directory DIR. Usually - `configure' can determine that directory automatically. - -`--version' - Print the version of Autoconf used to generate the `configure' - script, and exit. - -`configure' also accepts some other, not widely useful, options. diff --git a/cxmon/Makefile.am b/cxmon/Makefile.am deleted file mode 100644 index 4e8b8b267..000000000 --- a/cxmon/Makefile.am +++ /dev/null @@ -1,17 +0,0 @@ -## Process this file with automake to produce Makefile.in -SUBDIRS = src - -# Manpages -man_MANS = cxmon.1 - -EXTRA_DIST = cxmon.1 bootstrap - -dist-hook: cxmon.spec - cp cxmon.spec $(distdir) - -# Rule to build tar-gzipped distribution package -$(PACKAGE)-$(VERSION).tar.gz: dist - -# Rule to build RPM distribution package -rpm: $(PACKAGE)-$(VERSION).tar.gz - rpm -ta --clean $(PACKAGE)-$(VERSION).tar.gz diff --git a/cxmon/README b/cxmon/README deleted file mode 100644 index 44ab37f62..000000000 --- a/cxmon/README +++ /dev/null @@ -1,437 +0,0 @@ - - cxmon, Version 3.2 - A command-line file manipulation tool and disassembler - - Copyright (C) 1997-2007 Christian Bauer, Marc Hellwig - GNU binutils disassemblers Copyright (C) 1988, 89, 91, 93, 94, 95, 96, 97, 1998 - Free Software Foundation, Inc. - - -License -------- - -cxmon is available under the terms of the GNU General Public License. See the -file "COPYING" that is included in the distribution for details. - - -Overview --------- - -cxmon is an interactive command-driven file manipulation tool that is -inspired by the "Amiga Monitor" by Timo Rossi. It has commands and features -similar to a machine code monitor/debugger, but it lacks any functions for -running/tracing code. There are, however, built-in PowerPC, 680x0, 80x86, -x86-64, 6502 and Z80 disassemblers and special support for disassembling -MacOS code. By default, cxmon operates on a fixed-size (but adjustable) -memory buffer with adresses starting at 0. - - -Installation ------------- - -Please consult the file "INSTALL" for installation instructions. - - -Usage ------ - -cxmon can be started from the Shell or from the Tracker (BeOS), but command -line history doesn't work when started from the Tracker. - -Options: - -m enables symbolic MacOS A-Trap and low memory globals display in the - 680x0 disassembler - -r makes cxmon operate in real (virtual) memory space instead of an - allocated buffer - -If no additional command line arguments are given, cxmon enters interactive -mode. Otherwise, all remaining arguments are interpreted and executed as cxmon -commands. - -The default buffer size is 1MB. - -The cxmon command prompt looks like this: - - [00000000]-> - -The number in brackets is the value of "." (the "current address", see the -section on expressions). You can get a short command overview by entering -"h". - -Commands that create a longer output can be interrupted with Ctrl-C. - -To quit cxmon, enter the command "x". - - -Constants, variables and expressions ------------------------------------- - -The default number base is hexadecimal. Decimal numbers must be prefixed with -"_". Hexadecimal numbers may also be prefixed with "$" for clarity. Numbers -can also be entered as ASCII characters enclosed in single quotes (e.g. 'BAPP' -is the same as $42415050). All numbers are 32-bit values (one word). - -With the "set" command, variables can be defined that hold 32-bit integer -values. A variable is referred to by its name. Variable names may be arbitrary -combinations of digits and letters (they may also start with a digit) that -are not also valid hexadecimal numbers. Names are case-sensitive. - -cxmon accepts expressions in all places where you have to specify a number. -The following operators are available and have the same meaning and -precedence as in the C programming language: - - ~ complement - + unary plus - - unary minus - * multiplication - / integer division - % modulo - + addition - - subtraction - << shift left - >> shift right - & bitwise AND - ^ bitwise exclusive OR - | bitwise inclusive OR - -Parentheses may be used to change the evaluation order of sub-expressions. - -There are two special symbols that can be used in expressions: - - . represents the "current address" (the value of "." is also displayed in - the command prompt). What exactly the current address is, depends on the - command last executed. The display commands set "." to the address after - the last address displayed, the "hunt" commands sets "." to the address - of the first found occurence of the search string, etc. - : is used by the "apply" ("y") command and holds the value of the byte/ - half-word/word at the current address. - -The "modify" (":"), "fill" ("f") and "hunt" ("h") commands require you to -specify a byte string. Byte strings consist of an arbitrary number of byte -values and ASCII strings separated by commas. Examples: - - "string" - 12,34,56,78,9a,bc,de,f0 - "this",0a,"is a string",0a,"with","newlines",_10 - - -The buffer ----------- - -Those cxmon commands that operate on "memory" operate on a buffer allocated -by cxmon whose size is adjustable with the "@" command. The default buffer -size is 1MB. The buffer is an array of bytes where each byte has a 32-bit -integer address. Addresses start at 0 and are taken modulo the buffer size -(i.e. for the default 1MB buffer, addresses 0 and 100000 refer to the same -byte). - -The buffer is the working area of cxmon where you load files into, manipulate -them, and write files back from. Arbitraty portions of the buffer may be used -as scratch space. - - -Commands --------- - -The following commands are available in cxmon ('[]' marks a parameter than -can be left out): - - - x Quit cxmon - -quits cxmon and returns to the shell. - - - h Show help text - -displays a short overview of commands. - - - ?? Show list of commands - -displays a short list of available commands. - - - ver Show version - -shows the version number of cxmon. - - - ? expression Calculate expression - -displays the value of the given expression in hex, decimal, and ASCII -characters. If the value is negative, it is displayed as a signed and unsigned -number. - - - @ [size] Reallocate buffer - -changes the size of the buffer to the given number of bytes while preserving -the contents of the buffer. If the "size" argument is omitted, the current -buffer size is displayed. - - - i [start [end]] ASCII memory dump - -displays the buffer contents from address "start" to address "end" as ASCII -characters. Entering "i" without arguments is equivalent to "i .". The value -of "." is set to the address after the last address displayed. - - - b [start [end]] Binary memory dump - -displays the buffer contents from address "start" to address "end" in a binary -format. Entering "b" without arguments is equivalent to "b .". The value of -"." is set to the address after the last address displayed. - - - m [start [end]] Hex/ASCII memory dump - -displays the buffer contents from address "start" to address "end" as hex -words and ASCII characters. Entering "m" without arguments is equivalent to -"m .". The value of "." is set to the address after the last address displayed. - - - d [start [end]] Disassemble PowerPC code - -disassembles the buffer contents from address "start" to address "end". -Entering "d" without arguments is equivalent to "d .". The value of "." is -set to the address after the last address displayed. - - - d65 [start [end]] Disassemble 6502 code - -disassembles the buffer contents from address "start" to address "end". -Entering "d65" without arguments is equivalent to "d65 .". The value of -"." is set to the address after the last address displayed. - - - d68 [start [end]] Disassemble 680x0 code - -disassembles the buffer contents from address "start" to address "end". -Entering "d68" without arguments is equivalent to "d68 .". The value of -"." is set to the address after the last address displayed. - - - d80 [start [end]] Disassemble Z80 code - -disassembles the buffer contents from address "start" to address "end". -Entering "d80" without arguments is equivalent to "d80 .". The value of -"." is set to the address after the last address displayed. - - - d86 [start [end]] Disassemble 80x86 (32-bit) code - -disassembles the buffer contents from address "start" to address "end". -Entering "d86" without arguments is equivalent to "d86 .". The value of -"." is set to the address after the last address displayed. - - - d8086 [start [end]] Disassemble 80x86 (16-bit) code - -disassembles the buffer contents from address "start" to address "end". -Entering "d8086" without arguments is equivalent to "d8086 .". The value -of "." is set to the address after the last address displayed. - - - d8664 [start [end]] Disassemble x86-64 code - -disassembles the buffer contents from address "start" to address "end". -Entering "d8086" without arguments is equivalent to "d8086 .". The value -of "." is set to the address after the last address displayed. - - - : start string Modify memory - -puts the specified byte string at the address "start" into the buffer. The -value of "." is set to the address after the last address modified. - - - f start end string Fill memory - -fill the buffer in the range from "start" to (and including) "end" with the -given byte string. - - - y[b|h|w] start end expr Apply expression to memory - -works like the "fill" ("f") command, but it doesn't fill with a byte string -but with the value of an expression that is re-evaluated for each buffer -location to be filled. The command comes in three flavors: "y"/"yb" works on -bytes (8-bit), "yh" on half-words (16-bit) and "yw" on words (32-bit). The -value of "." is the current address to be modified, the value of ":" holds -the contents of this address before modification. - -Examples: - yw 0 fff :<<8 shifts all words in the address range 0..fff to the left - by 8 bits (you can use this to convert bitmap data from - ARGB to RGBA format, for example) - y 0 1234 ~: inverts all bytes in the address range 0..1234 - yh 2 ff 20000/. creates a table of the fractional parts of the reciprocals - of 1..7f - - - t start end dest Transfer memory - -transfers the buffer contents from "start" to (and including) "end" to "dest". -Source and destination may overlap. - - - c start end dest Compare memory - -compares the buffer contents in the range from "start" to (and including) -"end" with the contents at "dest". The addresses of all different bytes and -the total number of differences (decimal) are printed. - - - h start end string Search for byte string - -searches for the given byte string in the buffer starting at "start" up to -(and including) "end". The addresses and the total number of occurrences are -displayed. The value of "." is set to the address of the first occurrence. - - - \ "command" Execute shell command - -executes the given shell command which must be enclosed in quotes. - - - ls [args] List directory contents - -works as the shell command "ls". - - - rm [args] Remove file(s) - -works as the shell command "rm". - - - cp [args] Copy file(s) - -works as the shell command "cp". - - - mv [args] Move file(s) - -works as the shell command "mv". - - - cd directory Change current directory - -works as the shell command "cd". The name of the directory doesn't have to be -enclosed in quotes. - - - o ["file"] Redirect output - -When a file name is specified, all following output is redirected to this -file. The file name must be enclosed in quotation marks even if it contains -no spaces. Entering "o" without parameters closes the file and directs the -output into the terminal window again. - - - [ start "file" Load data from file - -loads the contents of the specified file into the buffer starting from address -"start". The file name must be enclosed in quotation marks even if it contains -no spaces. The value of "." is set to the address after the last address -affected by the load. - - - ] start size "file" Save data to file - -writes "size" number of bytes of the buffer from "start" to the specified file. -The file name must be enclosed in quotation marks even if it contains no spaces. - - - set [var[=value]] Set/clear/show variables - -If no arguments are given, all currently defined variables are displayed. -Otherwise, the value of "var" is set to the specified value. If "=value" -is omitted, the variable "var" is cleared. - - - cv Clear all variables - -clears all currently defined variables. - - -Examples --------- - -Here are some simple examples for what is possible with cxmon. - -Join "file1" and "file2" to "file3": - - [ 0 "file1" - [ . "file2" - ] 0 . "file3" - -Remove the first 24 bytes (e.g. an unneeded header) of a file: - - [ 0 "file" - ] 18 .-18 "file" - -Load the cxmon executable and search for PowerPC "nop" commands: - - [ 0 "cxmon" - h 0 . 60,00,00,00 - -Create a modified version of cxmon so that the prompt has " $" instead of -"->": - - [ 0 "cxmon" - set size=. - h 0 . "->" - : . " $" - ] 0 size "cxmon1" - -Convert a binary file which contains 16-bit numbers in little-endian format -to big-endian format (or vice-versa): - - [ 0 "file" - yh 0 .-1 :>>8|:<<8 - ] 0 . "file" - -Load a BeBox boot ROM image and start disassembling the system reset handler: - - [ 0 "bootnub.image" - d 100 - - -Using cxmon in your own programs --------------------------------- - -cxmon provides a simple interface for integration in other programs. It can, -for example, be used as a monitor/debugger for an emulator (it is used in -Basilisk II in this way). - -Here's how to do it (all functions are defined in the mon.h header file): - - 1. Link all the cxmon object files, except main.o, to your program. - 2. In your program, call mon_init() before using any other cxmon functions. - 3. After calling mon_init(), set the mon_read_byte and mon_write_byte - function pointers to the routines used for accessing memory. - 4. You can use mon_add_command() to add new commands to cxmon by specifying - the command name, function and help text. From within your command - function, you can use mon_get_token() and mon_expression() to parse the - arguments and the mon_read/write_*() functions to access memory. - 5. To enter cxmon, call the mon() function like this: - - char *args[3] = {"mon", "-r", NULL}; - mon(2, args); - - 6. If you're done with cxmon, call mon_exit(). - - -History -------- - -Please consult the file "ChangeLog" for the release history. - - -Christian Bauer -www.cebix.net - -Marc Hellwig - diff --git a/cxmon/bootstrap b/cxmon/bootstrap deleted file mode 100755 index 0fb6c4f8c..000000000 --- a/cxmon/bootstrap +++ /dev/null @@ -1,2 +0,0 @@ -#!/bin/sh -autoreconf --install diff --git a/cxmon/configure.ac b/cxmon/configure.ac deleted file mode 100644 index f93e6c853..000000000 --- a/cxmon/configure.ac +++ /dev/null @@ -1,47 +0,0 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written by Christian Bauer - -AC_PREREQ(2.69) -AC_INIT([cxmon], [3.2], [cb@cebix.net], [cxmon]) -AC_CONFIG_SRCDIR([src/mon.cpp]) -AM_INIT_AUTOMAKE([1.12 foreign]) - -AM_CONFIG_HEADER(config.h) - -dnl Checks for programs. -AC_PROG_CC -AC_PROG_CPP -AC_PROG_CXX -AC_PROG_CXXCPP -AC_PROG_INSTALL -AC_PROG_RANLIB - -dnl Checks for header files. -AC_HEADER_STDC -AC_CHECK_HEADERS(unistd.h readline.h history.h readline/readline.h readline/history.h) - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_CHECK_SIZEOF(short, 2) -AC_CHECK_SIZEOF(int, 4) -AC_CHECK_SIZEOF(long, 4) -AC_CHECK_SIZEOF(long long, 8) -AC_CHECK_SIZEOF(void *, 4) - -dnl Checks for libraries. -AC_SEARCH_LIBS([tgetent], [ncurses termcap termlib terminfo Hcurses curses], [], [ - AC_MSG_ERROR([unable to find the tgetent() function]) -]) -AC_SEARCH_LIBS([readline], [readline], [], [ - AC_MSG_ERROR([unable to find the readline() function]) -]) - -dnl Generate Makefile. -AC_OUTPUT([ -Makefile -cxmon.spec -src/Makefile -src/disass/Makefile -]) - -dnl Print summary. -echo "Configuration done. Now type \"make\"." diff --git a/cxmon/cxmon.1 b/cxmon/cxmon.1 deleted file mode 100644 index 7e0ef360e..000000000 --- a/cxmon/cxmon.1 +++ /dev/null @@ -1,56 +0,0 @@ -.TH cxmon 1 "January, 2007" -.SH NAME -cxmon \- a command-line file manipulation tool and disassembler -.SH SYNOPSIS -.B cxmon -[\-m] [\-r] -.RI [ commands\&... ] -.SH DESCRIPTION -.B cxmon -is an interactive command-driven file manipulation tool that is inspired by -the "Amiga Monitor" by Timo Rossi. It has commands and features similar to a -machine code monitor/debugger, but it lacks any functions for running/tracing -code. There are, however, built-in PowerPC, 680x0, 80x86, 6502 and Z80 -disassemblers and special support for disassembling MacOS code. By default, -cxmon operates on a fixed-size (but adjustable) memory buffer with adresses -starting at 0. -.PP -Type "h" to get a list of supported commands. -.PP -For more information, see the included "README" file. -.SH OPTIONS -.TP -.B \-m -enables symbolic MacOS A-Trap and low memory globals display in the 680x0 -disassembler -.TP -.B \-r -makes cxmon operate in real (virtual) memory space instead of an allocated -buffer -.PP -If no additional command line arguments are given, cxmon enters interactive -mode. Otherwise, all remaining arguments are interpreted and executed as cxmon -commands. -.SH AUTHORS -Christian Bauer -.br -Marc Hellwig -.SH COPYRIGHT -Copyright \(co 1997-2007 Christian Bauer, Marc Hellwig -.br -GNU binutils disassemblers Copyright \(co 1988, 89, 91, 93, 94, 95, 96, 97, 1998 -Free Software Foundation, Inc. - -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., 675 Mass Ave, Cambridge, MA 02139, USA. diff --git a/cxmon/cxmon.spec.in b/cxmon/cxmon.spec.in deleted file mode 100644 index 6b1cfd33e..000000000 --- a/cxmon/cxmon.spec.in +++ /dev/null @@ -1,42 +0,0 @@ -%define name @PACKAGE@ -%define version @VERSION@ -%define release 1 - -Summary: Command-line file manipulation tool and disassembler -Name: %{name} -Version: %{version} -Release: %{release} -License: GPL -Group: Utilities/File -Source0: %{name}-%{version}.tar.gz -URL: http://cxmon.cebix.net/ -BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n) -Prefix: %{_prefix} - -%description -cxmon is an interactive command-driven file manipulation tool that is -inspired by the "Amiga Monitor" by Timo Rossi. It has commands and features -similar to a machine code monitor/debugger, but it lacks any functions for -running/tracing code. There are, however, built-in PowerPC, 680x0, 80x86, -x86-64, 6502 and Z80 disassemblers and special support for disassembling -MacOS code. - -%prep -%setup -q - -%build -%configure -make - -%install -rm -rf ${RPM_BUILD_ROOT} -%makeinstall - -%clean -rm -rf ${RPM_BUILD_ROOT} - -%files -%defattr(-,root,root) -%doc AUTHORS ChangeLog COPYING README -%{_bindir}/* -%{_mandir}/man1/* diff --git a/cxmon/src/Makefile.am b/cxmon/src/Makefile.am deleted file mode 100644 index 0b865b2d3..000000000 --- a/cxmon/src/Makefile.am +++ /dev/null @@ -1,10 +0,0 @@ -## Process this file with automake to produce Makefile.in - -SUBDIRS = disass - -bin_PROGRAMS = cxmon -cxmon_SOURCES = main.cpp mon.cpp mon.h mon_6502.cpp mon_z80.cpp mon_atraps.h \ - mon_cmd.cpp mon_cmd.h mon_disass.cpp mon_disass.h mon_lowmem.cpp mon_lowmem.h \ - mon_ppc.cpp sysdeps.h - -cxmon_LDADD = disass/libdisass.a diff --git a/cxmon/src/disass/Makefile.am b/cxmon/src/disass/Makefile.am deleted file mode 100644 index 80a908fbc..000000000 --- a/cxmon/src/disass/Makefile.am +++ /dev/null @@ -1,8 +0,0 @@ -## Process this file with automake to produce Makefile.in - -noinst_LIBRARIES = libdisass.a -libdisass_a_SOURCES = ansidecl.h bfd.h dis-asm.h floatformat.c floatformat.h \ - i386-dis.c m68k-dis.c m68k-opc.c m68k.h opintl.h - -# Extra includes, for -CPPFLAGS = -I$(srcdir)/.. diff --git a/cxmon/src/disass/ansidecl.h b/cxmon/src/disass/ansidecl.h deleted file mode 100644 index 9a7c5777f..000000000 --- a/cxmon/src/disass/ansidecl.h +++ /dev/null @@ -1,295 +0,0 @@ -/* ANSI and traditional C compatability macros - Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001 - Free Software Foundation, Inc. - This file is part of the GNU C Library. - -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. */ - -/* ANSI and traditional C compatibility macros - - ANSI C is assumed if __STDC__ is #defined. - - Macro ANSI C definition Traditional C definition - ----- ---- - ---------- ----------- - ---------- - ANSI_PROTOTYPES 1 not defined - PTR `void *' `char *' - PTRCONST `void *const' `char *' - LONG_DOUBLE `long double' `double' - const not defined `' - volatile not defined `' - signed not defined `' - VA_START(ap, var) va_start(ap, var) va_start(ap) - - Note that it is safe to write "void foo();" indicating a function - with no return value, in all K+R compilers we have been able to test. - - For declaring functions with prototypes, we also provide these: - - PARAMS ((prototype)) - -- for functions which take a fixed number of arguments. Use this - when declaring the function. When defining the function, write a - K+R style argument list. For example: - - char *strcpy PARAMS ((char *dest, char *source)); - ... - char * - strcpy (dest, source) - char *dest; - char *source; - { ... } - - - VPARAMS ((prototype, ...)) - -- for functions which take a variable number of arguments. Use - PARAMS to declare the function, VPARAMS to define it. For example: - - int printf PARAMS ((const char *format, ...)); - ... - int - printf VPARAMS ((const char *format, ...)) - { - ... - } - - For writing functions which take variable numbers of arguments, we - also provide the VA_OPEN, VA_CLOSE, and VA_FIXEDARG macros. These - hide the differences between K+R and C89 more - thoroughly than the simple VA_START() macro mentioned above. - - VA_OPEN and VA_CLOSE are used *instead of* va_start and va_end. - Immediately after VA_OPEN, put a sequence of VA_FIXEDARG calls - corresponding to the list of fixed arguments. Then use va_arg - normally to get the variable arguments, or pass your va_list object - around. You do not declare the va_list yourself; VA_OPEN does it - for you. - - Here is a complete example: - - int - printf VPARAMS ((const char *format, ...)) - { - int result; - - VA_OPEN (ap, format); - VA_FIXEDARG (ap, const char *, format); - - result = vfprintf (stdout, format, ap); - VA_CLOSE (ap); - - return result; - } - - - You can declare variables either before or after the VA_OPEN, - VA_FIXEDARG sequence. Also, VA_OPEN and VA_CLOSE are the beginning - and end of a block. They must appear at the same nesting level, - and any variables declared after VA_OPEN go out of scope at - VA_CLOSE. Unfortunately, with a K+R compiler, that includes the - argument list. You can have multiple instances of VA_OPEN/VA_CLOSE - pairs in a single function in case you need to traverse the - argument list more than once. - - For ease of writing code which uses GCC extensions but needs to be - portable to other compilers, we provide the GCC_VERSION macro that - simplifies testing __GNUC__ and __GNUC_MINOR__ together, and various - wrappers around __attribute__. Also, __extension__ will be #defined - to nothing if it doesn't work. See below. - - This header also defines a lot of obsolete macros: - CONST, VOLATILE, SIGNED, PROTO, EXFUN, DEFUN, DEFUN_VOID, - AND, DOTS, NOARGS. Don't use them. */ - -#ifndef _ANSIDECL_H -#define _ANSIDECL_H 1 - -/* Every source file includes this file, - so they will all get the switch for lint. */ -/* LINTLIBRARY */ - -/* Using MACRO(x,y) in cpp #if conditionals does not work with some - older preprocessors. Thus we can't define something like this: - -#define HAVE_GCC_VERSION(MAJOR, MINOR) \ - (__GNUC__ > (MAJOR) || (__GNUC__ == (MAJOR) && __GNUC_MINOR__ >= (MINOR))) - -and then test "#if HAVE_GCC_VERSION(2,7)". - -So instead we use the macro below and test it against specific values. */ - -/* This macro simplifies testing whether we are using gcc, and if it - is of a particular minimum version. (Both major & minor numbers are - significant.) This macro will evaluate to 0 if we are not using - gcc at all. */ -#ifndef GCC_VERSION -#define GCC_VERSION (__GNUC__ * 1000 + __GNUC_MINOR__) -#endif /* GCC_VERSION */ - -#if defined (__STDC__) || defined (_AIX) || (defined (__mips) && defined (_SYSTYPE_SVR4)) || defined(_WIN32) -/* All known AIX compilers implement these things (but don't always - define __STDC__). The RISC/OS MIPS compiler defines these things - in SVR4 mode, but does not define __STDC__. */ - -#define ANSI_PROTOTYPES 1 -#define PTR void * -#define PTRCONST void *const -#define LONG_DOUBLE long double - -#define PARAMS(ARGS) ARGS -#define VPARAMS(ARGS) ARGS -#define VA_START(VA_LIST, VAR) va_start(VA_LIST, VAR) - -/* variadic function helper macros */ -/* "struct Qdmy" swallows the semicolon after VA_OPEN/VA_FIXEDARG's - use without inhibiting further decls and without declaring an - actual variable. */ -#define VA_OPEN(AP, VAR) { va_list AP; va_start(AP, VAR); { struct Qdmy -#define VA_CLOSE(AP) } va_end(AP); } -#define VA_FIXEDARG(AP, T, N) struct Qdmy - -#undef const -#undef volatile -#undef signed - -/* inline requires special treatment; it's in C99, and GCC >=2.7 supports - it too, but it's not in C89. */ -#undef inline -#if __STDC_VERSION__ > 199901L -/* it's a keyword */ -#else -# if GCC_VERSION >= 2007 -# define inline __inline__ /* __inline__ prevents -pedantic warnings */ -# else -# define inline /* nothing */ -# endif -#endif - -/* These are obsolete. Do not use. */ -#ifndef IN_GCC -#define CONST const -#define VOLATILE volatile -#define SIGNED signed - -#define PROTO(type, name, arglist) type name arglist -#define EXFUN(name, proto) name proto -#define DEFUN(name, arglist, args) name(args) -#define DEFUN_VOID(name) name(void) -#define AND , -#define DOTS , ... -#define NOARGS void -#endif /* ! IN_GCC */ - -#else /* Not ANSI C. */ - -#undef ANSI_PROTOTYPES -#define PTR char * -#define PTRCONST PTR -#define LONG_DOUBLE double - -#define PARAMS(args) () -#define VPARAMS(args) (va_alist) va_dcl -#define VA_START(va_list, var) va_start(va_list) - -#define VA_OPEN(AP, VAR) { va_list AP; va_start(AP); { struct Qdmy -#define VA_CLOSE(AP) } va_end(AP); } -#define VA_FIXEDARG(AP, TYPE, NAME) TYPE NAME = va_arg(AP, TYPE) - -/* some systems define these in header files for non-ansi mode */ -#undef const -#undef volatile -#undef signed -#undef inline -#define const -#define volatile -#define signed -#define inline - -#ifndef IN_GCC -#define CONST -#define VOLATILE -#define SIGNED - -#define PROTO(type, name, arglist) type name () -#define EXFUN(name, proto) name() -#define DEFUN(name, arglist, args) name arglist args; -#define DEFUN_VOID(name) name() -#define AND ; -#define DOTS -#define NOARGS -#endif /* ! IN_GCC */ - -#endif /* ANSI C. */ - -/* Define macros for some gcc attributes. This permits us to use the - macros freely, and know that they will come into play for the - version of gcc in which they are supported. */ - -#if (GCC_VERSION < 2007) -# define __attribute__(x) -#endif - -/* Attribute __malloc__ on functions was valid as of gcc 2.96. */ -#ifndef ATTRIBUTE_MALLOC -# if (GCC_VERSION >= 2096) -# define ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) -# else -# define ATTRIBUTE_MALLOC -# endif /* GNUC >= 2.96 */ -#endif /* ATTRIBUTE_MALLOC */ - -/* Attributes on labels were valid as of gcc 2.93. */ -#ifndef ATTRIBUTE_UNUSED_LABEL -# if (GCC_VERSION >= 2093) -# define ATTRIBUTE_UNUSED_LABEL ATTRIBUTE_UNUSED -# else -# define ATTRIBUTE_UNUSED_LABEL -# endif /* GNUC >= 2.93 */ -#endif /* ATTRIBUTE_UNUSED_LABEL */ - -#ifndef ATTRIBUTE_UNUSED -#define ATTRIBUTE_UNUSED __attribute__ ((__unused__)) -#endif /* ATTRIBUTE_UNUSED */ - -#ifndef ATTRIBUTE_NORETURN -#define ATTRIBUTE_NORETURN __attribute__ ((__noreturn__)) -#endif /* ATTRIBUTE_NORETURN */ - -#ifndef ATTRIBUTE_PRINTF -#define ATTRIBUTE_PRINTF(m, n) __attribute__ ((__format__ (__printf__, m, n))) -#define ATTRIBUTE_PRINTF_1 ATTRIBUTE_PRINTF(1, 2) -#define ATTRIBUTE_PRINTF_2 ATTRIBUTE_PRINTF(2, 3) -#define ATTRIBUTE_PRINTF_3 ATTRIBUTE_PRINTF(3, 4) -#define ATTRIBUTE_PRINTF_4 ATTRIBUTE_PRINTF(4, 5) -#define ATTRIBUTE_PRINTF_5 ATTRIBUTE_PRINTF(5, 6) -#endif /* ATTRIBUTE_PRINTF */ - -/* We use __extension__ in some places to suppress -pedantic warnings - about GCC extensions. This feature didn't work properly before - gcc 2.8. */ -#if GCC_VERSION < 2008 -#define __extension__ -#endif - -/* Bootstrap support: Adjust certain macros defined by Autoconf, - which are only valid for the stage1 compiler. If we detect - a modern version of GCC, we are probably in stage2 or beyond, - so unconditionally reset the values. Note that const, inline, - etc. have been dealt with above. */ -#if (GCC_VERSION >= 2007) -# ifndef HAVE_LONG_DOUBLE -# define HAVE_LONG_DOUBLE 1 -# endif -#endif /* GCC >= 2.7 */ - -#endif /* ansidecl.h */ diff --git a/cxmon/src/disass/bfd.h b/cxmon/src/disass/bfd.h deleted file mode 100644 index dbb9a8822..000000000 --- a/cxmon/src/disass/bfd.h +++ /dev/null @@ -1,66 +0,0 @@ -/* - * bfd.h - Dummy bfd library header file - */ - -#include "sysdeps.h" -#include "ansidecl.h" - -enum bfd_flavour { - bfd_target_unknown_flavour -}; - -enum bfd_endian { - BFD_ENDIAN_BIG, - BFD_ENDIAN_LITTLE, - BFD_ENDIAN_UNKNOWN -}; - -enum bfd_architecture { - bfd_arch_unknown, - bfd_arch_m68k, -#define bfd_mach_m68000 1 -#define bfd_mach_m68008 2 -#define bfd_mach_m68010 3 -#define bfd_mach_m68020 4 -#define bfd_mach_m68030 5 -#define bfd_mach_m68040 6 -#define bfd_mach_m68060 7 - bfd_arch_i386 -#define bfd_mach_i386_i386 0 -#define bfd_mach_i386_i8086 1 -#define bfd_mach_i386_i386_intel_syntax 2 -#define bfd_mach_x86_64 3 -#define bfd_mach_x86_64_intel_syntax 4 -}; - -typedef struct symbol_cache_entry { - CONST char *name; -} asymbol; - -typedef uint64 bfd_vma; -typedef int64 bfd_signed_vma; -typedef unsigned char bfd_byte; - -typedef struct _bfd bfd; -struct _bfd; - -#if SIZEOF_LONG == 8 -#define BFD_HOST_64BIT_LONG 1 -#endif - -// 64-bit vma -#define BFD64 - -#ifndef fprintf_vma -#if BFD_HOST_64BIT_LONG -#define sprintf_vma(s,x) sprintf (s, "%016lx", x) -#define fprintf_vma(f,x) fprintf (f, "%016lx", x) -#else -#define _bfd_int64_low(x) ((unsigned long) (((x) & 0xffffffff))) -#define _bfd_int64_high(x) ((unsigned long) (((x) >> 32) & 0xffffffff)) -#define fprintf_vma(s,x) \ - fprintf ((s), "%08lx%08lx", _bfd_int64_high (x), _bfd_int64_low (x)) -#define sprintf_vma(s,x) \ - sprintf ((s), "%08lx%08lx", _bfd_int64_high (x), _bfd_int64_low (x)) -#endif -#endif diff --git a/cxmon/src/disass/dis-asm.h b/cxmon/src/disass/dis-asm.h deleted file mode 100644 index 3d2461c0c..000000000 --- a/cxmon/src/disass/dis-asm.h +++ /dev/null @@ -1,315 +0,0 @@ -/* Interface between the opcode library and its callers. - - Copyright 2001, 2002 Free Software Foundation, Inc. - - 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, 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. - - Written by Cygnus Support, 1993. - - The opcode library (libopcodes.a) provides instruction decoders for - a large variety of instruction sets, callable with an identical - interface, for making instruction-processing programs more independent - of the instruction set being processed. */ - -#ifndef DIS_ASM_H -#define DIS_ASM_H - -#ifdef __cplusplus -extern "C" { -#endif - -#include -#include "bfd.h" - -typedef int (*fprintf_ftype) PARAMS((PTR, const char*, ...)); - -enum dis_insn_type { - dis_noninsn, /* Not a valid instruction */ - dis_nonbranch, /* Not a branch instruction */ - dis_branch, /* Unconditional branch */ - dis_condbranch, /* Conditional branch */ - dis_jsr, /* Jump to subroutine */ - dis_condjsr, /* Conditional jump to subroutine */ - dis_dref, /* Data reference instruction */ - dis_dref2 /* Two data references in instruction */ -}; - -/* This struct is passed into the instruction decoding routine, - and is passed back out into each callback. The various fields are used - for conveying information from your main routine into your callbacks, - for passing information into the instruction decoders (such as the - addresses of the callback functions), or for passing information - back from the instruction decoders to their callers. - - It must be initialized before it is first passed; this can be done - by hand, or using one of the initialization macros below. */ - -typedef struct disassemble_info { - fprintf_ftype fprintf_func; - PTR stream; - PTR application_data; - - /* Target description. We could replace this with a pointer to the bfd, - but that would require one. There currently isn't any such requirement - so to avoid introducing one we record these explicitly. */ - /* The bfd_flavour. This can be bfd_target_unknown_flavour. */ - enum bfd_flavour flavour; - /* The bfd_arch value. */ - enum bfd_architecture arch; - /* The bfd_mach value. */ - unsigned long mach; - /* Endianness (for bi-endian cpus). Mono-endian cpus can ignore this. */ - enum bfd_endian endian; - /* An arch/mach-specific bitmask of selected instruction subsets, mainly - for processors with run-time-switchable instruction sets. The default, - zero, means that there is no constraint. CGEN-based opcodes ports - may use ISA_foo masks. */ - unsigned long insn_sets; - - /* An array of pointers to symbols either at the location being disassembled - or at the start of the function being disassembled. The array is sorted - so that the first symbol is intended to be the one used. The others are - present for any misc. purposes. This is not set reliably, but if it is - not NULL, it is correct. */ - asymbol **symbols; - /* Number of symbols in array. */ - int num_symbols; - - /* For use by the disassembler. - The top 16 bits are reserved for public use (and are documented here). - The bottom 16 bits are for the internal use of the disassembler. */ - unsigned long flags; -#define INSN_HAS_RELOC 0x80000000 - PTR private_data; - - /* Function used to get bytes to disassemble. MEMADDR is the - address of the stuff to be disassembled, MYADDR is the address to - put the bytes in, and LENGTH is the number of bytes to read. - INFO is a pointer to this struct. - Returns an errno value or 0 for success. */ - int (*read_memory_func) - PARAMS ((bfd_vma memaddr, bfd_byte *myaddr, unsigned int length, - struct disassemble_info *info)); - - /* Function which should be called if we get an error that we can't - recover from. STATUS is the errno value from read_memory_func and - MEMADDR is the address that we were trying to read. INFO is a - pointer to this struct. */ - void (*memory_error_func) - PARAMS ((int status, bfd_vma memaddr, struct disassemble_info *info)); - - /* Function called to print ADDR. */ - void (*print_address_func) - PARAMS ((bfd_vma addr, struct disassemble_info *info)); - - /* Function called to determine if there is a symbol at the given ADDR. - If there is, the function returns 1, otherwise it returns 0. - This is used by ports which support an overlay manager where - the overlay number is held in the top part of an address. In - some circumstances we want to include the overlay number in the - address, (normally because there is a symbol associated with - that address), but sometimes we want to mask out the overlay bits. */ - int (* symbol_at_address_func) - PARAMS ((bfd_vma addr, struct disassemble_info * info)); - - /* These are for buffer_read_memory. */ - bfd_byte *buffer; - bfd_vma buffer_vma; - unsigned int buffer_length; - - /* This variable may be set by the instruction decoder. It suggests - the number of bytes objdump should display on a single line. If - the instruction decoder sets this, it should always set it to - the same value in order to get reasonable looking output. */ - int bytes_per_line; - - /* the next two variables control the way objdump displays the raw data */ - /* For example, if bytes_per_line is 8 and bytes_per_chunk is 4, the */ - /* output will look like this: - 00: 00000000 00000000 - with the chunks displayed according to "display_endian". */ - int bytes_per_chunk; - enum bfd_endian display_endian; - - /* Number of octets per incremented target address - Normally one, but some DSPs have byte sizes of 16 or 32 bits. */ - unsigned int octets_per_byte; - - /* Results from instruction decoders. Not all decoders yet support - this information. This info is set each time an instruction is - decoded, and is only valid for the last such instruction. - - To determine whether this decoder supports this information, set - insn_info_valid to 0, decode an instruction, then check it. */ - - char insn_info_valid; /* Branch info has been set. */ - char branch_delay_insns; /* How many sequential insn's will run before - a branch takes effect. (0 = normal) */ - char data_size; /* Size of data reference in insn, in bytes */ - enum dis_insn_type insn_type; /* Type of instruction */ - bfd_vma target; /* Target address of branch or dref, if known; - zero if unknown. */ - bfd_vma target2; /* Second target address for dref2 */ - - /* Command line options specific to the target disassembler. */ - char * disassembler_options; - -} disassemble_info; - - -/* Standard disassemblers. Disassemble one instruction at the given - target address. Return number of octets processed. */ -typedef int (*disassembler_ftype) - PARAMS((bfd_vma, disassemble_info *)); - -extern int print_insn_big_mips PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_little_mips PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_i386 PARAMS ((bfd_vma, disassemble_info *)); -extern int print_insn_i386_att PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_i386_intel PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_ia64 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_i370 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_m68hc11 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_m68hc12 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_m68k PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_z8001 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_z8002 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_h8300 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_h8300h PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_h8300s PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_h8500 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_alpha PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_big_arm PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_little_arm PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_sparc PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_big_a29k PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_little_a29k PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_avr PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_d10v PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_d30v PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_dlx PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_fr30 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_hppa PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_i860 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_i960 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_m32r PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_m88k PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_mcore PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_mmix PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_mn10200 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_mn10300 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_ns32k PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_openrisc PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_big_or32 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_little_or32 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_pdp11 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_pj PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_big_powerpc PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_little_powerpc PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_rs6000 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_s390 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_sh PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_tic30 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_tic54x PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_tic80 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_v850 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_vax PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_w65 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_xstormy16 PARAMS ((bfd_vma, disassemble_info*)); -extern int print_insn_sh64 PARAMS ((bfd_vma, disassemble_info *)); -extern int print_insn_sh64x_media PARAMS ((bfd_vma, disassemble_info *)); -extern int print_insn_frv PARAMS ((bfd_vma, disassemble_info *)); - -extern disassembler_ftype arc_get_disassembler PARAMS ((void *)); -extern disassembler_ftype cris_get_disassembler PARAMS ((bfd *)); - -extern void print_arm_disassembler_options PARAMS ((FILE *)); -extern void parse_arm_disassembler_option PARAMS ((char *)); -extern int get_arm_regname_num_options PARAMS ((void)); -extern int set_arm_regname_option PARAMS ((int)); -extern int get_arm_regnames PARAMS ((int, const char **, const char **, const char ***)); - -/* Fetch the disassembler for a given BFD, if that support is available. */ -extern disassembler_ftype disassembler PARAMS ((bfd *)); - -/* Document any target specific options available from the disassembler. */ -extern void disassembler_usage PARAMS ((FILE *)); - - -/* This block of definitions is for particular callers who read instructions - into a buffer before calling the instruction decoder. */ - -/* Here is a function which callers may wish to use for read_memory_func. - It gets bytes from a buffer. */ -extern int buffer_read_memory - PARAMS ((bfd_vma, bfd_byte *, unsigned int, struct disassemble_info *)); - -/* This function goes with buffer_read_memory. - It prints a message using info->fprintf_func and info->stream. */ -extern void perror_memory PARAMS ((int, bfd_vma, struct disassemble_info *)); - - -/* Just print the address in hex. This is included for completeness even - though both GDB and objdump provide their own (to print symbolic - addresses). */ -extern void generic_print_address - PARAMS ((bfd_vma, struct disassemble_info *)); - -/* Always true. */ -extern int generic_symbol_at_address - PARAMS ((bfd_vma, struct disassemble_info *)); - -/* Macro to initialize a disassemble_info struct. This should be called - by all applications creating such a struct. */ -#define INIT_DISASSEMBLE_INFO(INFO, STREAM, FPRINTF_FUNC) \ - (INFO).flavour = bfd_target_unknown_flavour, \ - (INFO).arch = bfd_arch_unknown, \ - (INFO).mach = 0, \ - (INFO).insn_sets = 0, \ - (INFO).endian = BFD_ENDIAN_UNKNOWN, \ - (INFO).octets_per_byte = 1, \ - INIT_DISASSEMBLE_INFO_NO_ARCH(INFO, STREAM, FPRINTF_FUNC) - -/* Call this macro to initialize only the internal variables for the - disassembler. Architecture dependent things such as byte order, or machine - variant are not touched by this macro. This makes things much easier for - GDB which must initialize these things separately. */ - -#define INIT_DISASSEMBLE_INFO_NO_ARCH(INFO, STREAM, FPRINTF_FUNC) \ - (INFO).fprintf_func = (fprintf_ftype)(FPRINTF_FUNC), \ - (INFO).stream = (PTR)(STREAM), \ - (INFO).symbols = NULL, \ - (INFO).num_symbols = 0, \ - (INFO).private_data = NULL, \ - (INFO).buffer = NULL, \ - (INFO).buffer_vma = 0, \ - (INFO).buffer_length = 0, \ - (INFO).read_memory_func = buffer_read_memory, \ - (INFO).memory_error_func = perror_memory, \ - (INFO).print_address_func = generic_print_address, \ - (INFO).symbol_at_address_func = generic_symbol_at_address, \ - (INFO).flags = 0, \ - (INFO).bytes_per_line = 0, \ - (INFO).bytes_per_chunk = 0, \ - (INFO).display_endian = BFD_ENDIAN_UNKNOWN, \ - (INFO).disassembler_options = NULL, \ - (INFO).insn_info_valid = 0 - -#ifdef __cplusplus -}; -#endif - -#endif /* ! defined (DIS_ASM_H) */ diff --git a/cxmon/src/disass/floatformat.c b/cxmon/src/disass/floatformat.c deleted file mode 100644 index 7f6086f43..000000000 --- a/cxmon/src/disass/floatformat.c +++ /dev/null @@ -1,401 +0,0 @@ -/* IEEE floating point support routines, for GDB, the GNU Debugger. - Copyright (C) 1991, 1994 Free Software Foundation, Inc. - -This file is part of GDB. - -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 "floatformat.h" -#include /* ldexp */ -#ifdef __STDC__ -#include -extern void *memcpy (void *s1, const void *s2, size_t n); -extern void *memset (void *s, int c, size_t n); -#else -extern char *memcpy (); -extern char *memset (); -#endif - -/* The odds that CHAR_BIT will be anything but 8 are low enough that I'm not - going to bother with trying to muck around with whether it is defined in - a system header, what we do if not, etc. */ -#define FLOATFORMAT_CHAR_BIT 8 - -/* floatformats for IEEE single and double, big and little endian. */ -const struct floatformat floatformat_ieee_single_big = -{ - floatformat_big, 32, 0, 1, 8, 127, 255, 9, 23, floatformat_intbit_no -}; -const struct floatformat floatformat_ieee_single_little = -{ - floatformat_little, 32, 0, 1, 8, 127, 255, 9, 23, floatformat_intbit_no -}; -const struct floatformat floatformat_ieee_double_big = -{ - floatformat_big, 64, 0, 1, 11, 1023, 2047, 12, 52, floatformat_intbit_no -}; -const struct floatformat floatformat_ieee_double_little = -{ - floatformat_little, 64, 0, 1, 11, 1023, 2047, 12, 52, floatformat_intbit_no -}; - -/* floatformat for IEEE double, little endian byte order, with big endian word - ordering, as on the ARM. */ - -const struct floatformat floatformat_ieee_double_littlebyte_bigword = -{ - floatformat_littlebyte_bigword, 64, 0, 1, 11, 1023, 2047, 12, 52, floatformat_intbit_no -}; - -const struct floatformat floatformat_i387_ext = -{ - floatformat_little, 80, 0, 1, 15, 0x3fff, 0x7fff, 16, 64, - floatformat_intbit_yes -}; -const struct floatformat floatformat_m68881_ext = -{ - /* Note that the bits from 16 to 31 are unused. */ - floatformat_big, 96, 0, 1, 15, 0x3fff, 0x7fff, 32, 64, floatformat_intbit_yes -}; -const struct floatformat floatformat_i960_ext = -{ - /* Note that the bits from 0 to 15 are unused. */ - floatformat_little, 96, 16, 17, 15, 0x3fff, 0x7fff, 32, 64, - floatformat_intbit_yes -}; -const struct floatformat floatformat_m88110_ext = -{ -#ifdef HARRIS_FLOAT_FORMAT - /* Harris uses raw format 128 bytes long, but the number is just an ieee - double, and the last 64 bits are wasted. */ - floatformat_big,128, 0, 1, 11, 0x3ff, 0x7ff, 12, 52, - floatformat_intbit_no -#else - floatformat_big, 80, 0, 1, 15, 0x3fff, 0x7fff, 16, 64, - floatformat_intbit_yes -#endif /* HARRIS_FLOAT_FORMAT */ -}; -const struct floatformat floatformat_arm_ext = -{ - /* Bits 1 to 16 are unused. */ - floatformat_big, 96, 0, 17, 15, 0x3fff, 0x7fff, 32, 64, - floatformat_intbit_yes -}; - -static unsigned long get_field PARAMS ((unsigned char *, - enum floatformat_byteorders, - unsigned int, - unsigned int, - unsigned int)); - -/* Extract a field which starts at START and is LEN bytes long. DATA and - TOTAL_LEN are the thing we are extracting it from, in byteorder ORDER. */ -static unsigned long -get_field (data, order, total_len, start, len) - unsigned char *data; - enum floatformat_byteorders order; - unsigned int total_len; - unsigned int start; - unsigned int len; -{ - unsigned long result; - unsigned int cur_byte; - int cur_bitshift; - - /* Start at the least significant part of the field. */ - cur_byte = (start + len) / FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - cur_byte = (total_len / FLOATFORMAT_CHAR_BIT) - cur_byte - 1; - cur_bitshift = - ((start + len) % FLOATFORMAT_CHAR_BIT) - FLOATFORMAT_CHAR_BIT; - result = *(data + cur_byte) >> (-cur_bitshift); - cur_bitshift += FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - ++cur_byte; - else - --cur_byte; - - /* Move towards the most significant part of the field. */ - while (cur_bitshift < len) - { - if (len - cur_bitshift < FLOATFORMAT_CHAR_BIT) - /* This is the last byte; zero out the bits which are not part of - this field. */ - result |= - (*(data + cur_byte) & ((1 << (len - cur_bitshift)) - 1)) - << cur_bitshift; - else - result |= *(data + cur_byte) << cur_bitshift; - cur_bitshift += FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - ++cur_byte; - else - --cur_byte; - } - return result; -} - -#ifndef min -#define min(a, b) ((a) < (b) ? (a) : (b)) -#endif - -/* Convert from FMT to a double. - FROM is the address of the extended float. - Store the double in *TO. */ - -void -floatformat_to_double (fmt, from, to) - const struct floatformat *fmt; - char *from; - double *to; -{ - unsigned char *ufrom = (unsigned char *)from; - double dto; - long exponent; - unsigned long mant; - unsigned int mant_bits, mant_off; - int mant_bits_left; - int special_exponent; /* It's a NaN, denorm or zero */ - - exponent = get_field (ufrom, fmt->byteorder, fmt->totalsize, - fmt->exp_start, fmt->exp_len); - /* Note that if exponent indicates a NaN, we can't really do anything useful - (not knowing if the host has NaN's, or how to build one). So it will - end up as an infinity or something close; that is OK. */ - - mant_bits_left = fmt->man_len; - mant_off = fmt->man_start; - dto = 0.0; - - special_exponent = exponent == 0 || exponent == fmt->exp_nan; - - /* Don't bias zero's, denorms or NaNs. */ - if (!special_exponent) - exponent -= fmt->exp_bias; - - /* Build the result algebraically. Might go infinite, underflow, etc; - who cares. */ - - /* If this format uses a hidden bit, explicitly add it in now. Otherwise, - increment the exponent by one to account for the integer bit. */ - - if (!special_exponent) - if (fmt->intbit == floatformat_intbit_no) - dto = ldexp (1.0, exponent); - else - exponent++; - - while (mant_bits_left > 0) - { - mant_bits = min (mant_bits_left, 32); - - mant = get_field (ufrom, fmt->byteorder, fmt->totalsize, - mant_off, mant_bits); - - dto += ldexp ((double)mant, exponent - mant_bits); - exponent -= mant_bits; - mant_off += mant_bits; - mant_bits_left -= mant_bits; - } - - /* Negate it if negative. */ - if (get_field (ufrom, fmt->byteorder, fmt->totalsize, fmt->sign_start, 1)) - dto = -dto; - *to = dto; -} - -static void put_field PARAMS ((unsigned char *, enum floatformat_byteorders, - unsigned int, - unsigned int, - unsigned int, - unsigned long)); - -/* Set a field which starts at START and is LEN bytes long. DATA and - TOTAL_LEN are the thing we are extracting it from, in byteorder ORDER. */ -static void -put_field (data, order, total_len, start, len, stuff_to_put) - unsigned char *data; - enum floatformat_byteorders order; - unsigned int total_len; - unsigned int start; - unsigned int len; - unsigned long stuff_to_put; -{ - unsigned int cur_byte; - int cur_bitshift; - - /* Start at the least significant part of the field. */ - cur_byte = (start + len) / FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - cur_byte = (total_len / FLOATFORMAT_CHAR_BIT) - cur_byte - 1; - cur_bitshift = - ((start + len) % FLOATFORMAT_CHAR_BIT) - FLOATFORMAT_CHAR_BIT; - *(data + cur_byte) &= - ~(((1 << ((start + len) % FLOATFORMAT_CHAR_BIT)) - 1) << (-cur_bitshift)); - *(data + cur_byte) |= - (stuff_to_put & ((1 << FLOATFORMAT_CHAR_BIT) - 1)) << (-cur_bitshift); - cur_bitshift += FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - ++cur_byte; - else - --cur_byte; - - /* Move towards the most significant part of the field. */ - while (cur_bitshift < len) - { - if (len - cur_bitshift < FLOATFORMAT_CHAR_BIT) - { - /* This is the last byte. */ - *(data + cur_byte) &= - ~((1 << (len - cur_bitshift)) - 1); - *(data + cur_byte) |= (stuff_to_put >> cur_bitshift); - } - else - *(data + cur_byte) = ((stuff_to_put >> cur_bitshift) - & ((1 << FLOATFORMAT_CHAR_BIT) - 1)); - cur_bitshift += FLOATFORMAT_CHAR_BIT; - if (order == floatformat_little) - ++cur_byte; - else - --cur_byte; - } -} - -/* The converse: convert the double *FROM to an extended float - and store where TO points. Neither FROM nor TO have any alignment - restrictions. */ - -void -floatformat_from_double (fmt, from, to) - CONST struct floatformat *fmt; - double *from; - char *to; -{ - double dfrom; - int exponent; - double mant; - unsigned int mant_bits, mant_off; - int mant_bits_left; - unsigned char *uto = (unsigned char *)to; - - memcpy (&dfrom, from, sizeof (dfrom)); - memset (uto, 0, fmt->totalsize / FLOATFORMAT_CHAR_BIT); - if (dfrom == 0) - return; /* Result is zero */ - if (dfrom != dfrom) - { - /* From is NaN */ - put_field (uto, fmt->byteorder, fmt->totalsize, fmt->exp_start, - fmt->exp_len, fmt->exp_nan); - /* Be sure it's not infinity, but NaN value is irrel */ - put_field (uto, fmt->byteorder, fmt->totalsize, fmt->man_start, - 32, 1); - return; - } - - /* If negative, set the sign bit. */ - if (dfrom < 0) - { - put_field (uto, fmt->byteorder, fmt->totalsize, fmt->sign_start, 1, 1); - dfrom = -dfrom; - } - - /* How to tell an infinity from an ordinary number? FIXME-someday */ - - mant = frexp (dfrom, &exponent); - put_field (uto, fmt->byteorder, fmt->totalsize, fmt->exp_start, fmt->exp_len, - exponent + fmt->exp_bias - 1); - - mant_bits_left = fmt->man_len; - mant_off = fmt->man_start; - while (mant_bits_left > 0) - { - unsigned long mant_long; - mant_bits = mant_bits_left < 32 ? mant_bits_left : 32; - - mant *= 4294967296.0; - mant_long = (unsigned long)mant; - mant -= mant_long; - - /* If the integer bit is implicit, then we need to discard it. - If we are discarding a zero, we should be (but are not) creating - a denormalized number which means adjusting the exponent - (I think). */ - if (mant_bits_left == fmt->man_len - && fmt->intbit == floatformat_intbit_no) - { - mant_long &= 0x7fffffff; - mant_bits -= 1; - } - else if (mant_bits < 32) - { - /* The bits we want are in the most significant MANT_BITS bits of - mant_long. Move them to the least significant. */ - mant_long >>= 32 - mant_bits; - } - - put_field (uto, fmt->byteorder, fmt->totalsize, - mant_off, mant_bits, mant_long); - mant_off += mant_bits; - mant_bits_left -= mant_bits; - } -} - - -#ifdef IEEE_DEBUG - -/* This is to be run on a host which uses IEEE floating point. */ - -void -ieee_test (n) - double n; -{ - double result; - char exten[16]; - - floatformat_to_double (&floatformat_ieee_double_big, &n, &result); - if (n != result) - printf ("Differ(to): %.20g -> %.20g\n", n, result); - floatformat_from_double (&floatformat_ieee_double_big, &n, &result); - if (n != result) - printf ("Differ(from): %.20g -> %.20g\n", n, result); - - floatformat_from_double (&floatformat_m68881_ext, &n, exten); - floatformat_to_double (&floatformat_m68881_ext, exten, &result); - if (n != result) - printf ("Differ(to+from): %.20g -> %.20g\n", n, result); - -#if IEEE_DEBUG > 1 - /* This is to be run on a host which uses 68881 format. */ - { - long double ex = *(long double *)exten; - if (ex != n) - printf ("Differ(from vs. extended): %.20g\n", n); - } -#endif -} - -int -main () -{ - ieee_test (0.5); - ieee_test (256.0); - ieee_test (0.12345); - ieee_test (234235.78907234); - ieee_test (-512.0); - ieee_test (-0.004321); - return 0; -} -#endif diff --git a/cxmon/src/disass/floatformat.h b/cxmon/src/disass/floatformat.h deleted file mode 100644 index 90daca21b..000000000 --- a/cxmon/src/disass/floatformat.h +++ /dev/null @@ -1,111 +0,0 @@ -/* IEEE floating point support declarations, for GDB, the GNU Debugger. - Copyright (C) 1991 Free Software Foundation, Inc. - -This file is part of GDB. - -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. */ - -#if !defined (FLOATFORMAT_H) -#define FLOATFORMAT_H 1 - -#include "ansidecl.h" - -/* A floatformat consists of a sign bit, an exponent and a mantissa. Once the - bytes are concatenated according to the byteorder flag, then each of those - fields is contiguous. We number the bits with 0 being the most significant - (i.e. BITS_BIG_ENDIAN type numbering), and specify which bits each field - contains with the *_start and *_len fields. */ - -/* What is the order of the bytes. */ - -enum floatformat_byteorders { - - /* Standard little endian byte order. - EX: 1.2345678e10 => 00 00 80 c5 e0 fe 06 42 */ - - floatformat_little, - - /* Standard big endian byte order. - EX: 1.2345678e10 => 42 06 fe e0 c5 80 00 00 */ - - floatformat_big, - - /* Little endian byte order but big endian word order. - EX: 1.2345678e10 => e0 fe 06 42 00 00 80 c5 */ - - floatformat_littlebyte_bigword - -}; - -enum floatformat_intbit { floatformat_intbit_yes, floatformat_intbit_no }; - -struct floatformat -{ - enum floatformat_byteorders byteorder; - unsigned int totalsize; /* Total size of number in bits */ - - /* Sign bit is always one bit long. 1 means negative, 0 means positive. */ - unsigned int sign_start; - - unsigned int exp_start; - unsigned int exp_len; - /* Amount added to "true" exponent. 0x3fff for many IEEE extendeds. */ - unsigned int exp_bias; - /* Exponent value which indicates NaN. This is the actual value stored in - the float, not adjusted by the exp_bias. This usually consists of all - one bits. */ - unsigned int exp_nan; - - unsigned int man_start; - unsigned int man_len; - - /* Is the integer bit explicit or implicit? */ - enum floatformat_intbit intbit; -}; - -/* floatformats for IEEE single and double, big and little endian. */ - -extern const struct floatformat floatformat_ieee_single_big; -extern const struct floatformat floatformat_ieee_single_little; -extern const struct floatformat floatformat_ieee_double_big; -extern const struct floatformat floatformat_ieee_double_little; - -/* floatformat for ARM IEEE double, little endian bytes and big endian words */ - -extern const struct floatformat floatformat_ieee_double_littlebyte_bigword; - -/* floatformats for various extendeds. */ - -extern const struct floatformat floatformat_i387_ext; -extern const struct floatformat floatformat_m68881_ext; -extern const struct floatformat floatformat_i960_ext; -extern const struct floatformat floatformat_m88110_ext; -extern const struct floatformat floatformat_arm_ext; - -/* Convert from FMT to a double. - FROM is the address of the extended float. - Store the double in *TO. */ - -extern void -floatformat_to_double PARAMS ((const struct floatformat *, char *, double *)); - -/* The converse: convert the double *FROM to FMT - and store where TO points. */ - -extern void -floatformat_from_double PARAMS ((const struct floatformat *, - double *, char *)); - -#endif /* defined (FLOATFORMAT_H) */ diff --git a/cxmon/src/disass/i386-dis.c b/cxmon/src/disass/i386-dis.c deleted file mode 100644 index e417212e1..000000000 --- a/cxmon/src/disass/i386-dis.c +++ /dev/null @@ -1,4146 +0,0 @@ -/* Print i386 instructions for GDB, the GNU debugger. - Copyright 1988, 1989, 1991, 1993, 1994, 1995, 1996, 1997, 1998, 1999, - 2001 - Free Software Foundation, Inc. - -This file is part of GDB. - -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. */ - -/* - * 80386 instruction printer by Pace Willisson (pace@prep.ai.mit.edu) - * July 1988 - * modified by John Hassey (hassey@dg-rtp.dg.com) - * x86-64 support added by Jan Hubicka (jh@suse.cz) - */ - -/* - * The main tables describing the instructions is essentially a copy - * of the "Opcode Map" chapter (Appendix A) of the Intel 80386 - * Programmers Manual. Usually, there is a capital letter, followed - * by a small letter. The capital letter tell the addressing mode, - * and the small letter tells about the operand size. Refer to - * the Intel manual for details. - */ - -#include "dis-asm.h" -#include "opintl.h" - -#define MAXLEN 20 - -#include - -#ifndef UNIXWARE_COMPAT -/* Set non-zero for broken, compatible instructions. Set to zero for - non-broken opcodes. */ -#define UNIXWARE_COMPAT 1 -#endif - -static int fetch_data PARAMS ((struct disassemble_info *, bfd_byte *)); -static void ckprefix PARAMS ((void)); -static const char *prefix_name PARAMS ((int, int)); -static int print_insn PARAMS ((bfd_vma, disassemble_info *)); -static void dofloat PARAMS ((int)); -static void OP_ST PARAMS ((int, int)); -static void OP_STi PARAMS ((int, int)); -static int putop PARAMS ((const char *, int)); -static void oappend PARAMS ((const char *)); -static void append_seg PARAMS ((void)); -static void OP_indirE PARAMS ((int, int)); -static void print_operand_value PARAMS ((char *, int, bfd_vma)); -static void OP_E PARAMS ((int, int)); -static void OP_G PARAMS ((int, int)); -static bfd_vma get64 PARAMS ((void)); -static bfd_signed_vma get32 PARAMS ((void)); -static bfd_signed_vma get32s PARAMS ((void)); -static int get16 PARAMS ((void)); -static void set_op PARAMS ((bfd_vma, int)); -static void OP_REG PARAMS ((int, int)); -static void OP_IMREG PARAMS ((int, int)); -static void OP_I PARAMS ((int, int)); -static void OP_I64 PARAMS ((int, int)); -static void OP_sI PARAMS ((int, int)); -static void OP_J PARAMS ((int, int)); -static void OP_SEG PARAMS ((int, int)); -static void OP_DIR PARAMS ((int, int)); -static void OP_OFF PARAMS ((int, int)); -static void OP_OFF64 PARAMS ((int, int)); -static void ptr_reg PARAMS ((int, int)); -static void OP_ESreg PARAMS ((int, int)); -static void OP_DSreg PARAMS ((int, int)); -static void OP_C PARAMS ((int, int)); -static void OP_D PARAMS ((int, int)); -static void OP_T PARAMS ((int, int)); -static void OP_Rd PARAMS ((int, int)); -static void OP_MMX PARAMS ((int, int)); -static void OP_XMM PARAMS ((int, int)); -static void OP_EM PARAMS ((int, int)); -static void OP_EX PARAMS ((int, int)); -static void OP_MS PARAMS ((int, int)); -static void OP_XS PARAMS ((int, int)); -static void OP_3DNowSuffix PARAMS ((int, int)); -static void OP_SIMD_Suffix PARAMS ((int, int)); -static void SIMD_Fixup PARAMS ((int, int)); -static void BadOp PARAMS ((void)); - -struct dis_private { - /* Points to first byte not fetched. */ - bfd_byte *max_fetched; - bfd_byte the_buffer[MAXLEN]; - bfd_vma insn_start; - int orig_sizeflag; - jmp_buf bailout; -}; - -/* The opcode for the fwait instruction, which we treat as a prefix - when we can. */ -#define FWAIT_OPCODE (0x9b) - -/* Set to 1 for 64bit mode disassembly. */ -static int mode_64bit; - -/* Flags for the prefixes for the current instruction. See below. */ -static int prefixes; - -/* REX prefix the current instruction. See below. */ -static int rex; -/* Bits of REX we've already used. */ -static int rex_used; -#define REX_MODE64 8 -#define REX_EXTX 4 -#define REX_EXTY 2 -#define REX_EXTZ 1 -/* Mark parts used in the REX prefix. When we are testing for - empty prefix (for 8bit register REX extension), just mask it - out. Otherwise test for REX bit is excuse for existence of REX - only in case value is nonzero. */ -#define USED_REX(value) \ - { \ - if (value) \ - rex_used |= (rex & value) ? (value) | 0x40 : 0; \ - else \ - rex_used |= 0x40; \ - } - -/* Flags for prefixes which we somehow handled when printing the - current instruction. */ -static int used_prefixes; - -/* Flags stored in PREFIXES. */ -#define PREFIX_REPZ 1 -#define PREFIX_REPNZ 2 -#define PREFIX_LOCK 4 -#define PREFIX_CS 8 -#define PREFIX_SS 0x10 -#define PREFIX_DS 0x20 -#define PREFIX_ES 0x40 -#define PREFIX_FS 0x80 -#define PREFIX_GS 0x100 -#define PREFIX_DATA 0x200 -#define PREFIX_ADDR 0x400 -#define PREFIX_FWAIT 0x800 - -/* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive) - to ADDR (exclusive) are valid. Returns 1 for success, longjmps - on error. */ -#define FETCH_DATA(info, addr) \ - ((addr) <= ((struct dis_private *) (info->private_data))->max_fetched \ - ? 1 : fetch_data ((info), (addr))) - -static int -fetch_data (info, addr) - struct disassemble_info *info; - bfd_byte *addr; -{ - int status; - struct dis_private *priv = (struct dis_private *) info->private_data; - bfd_vma start = priv->insn_start + (priv->max_fetched - priv->the_buffer); - - status = (*info->read_memory_func) (start, - priv->max_fetched, - addr - priv->max_fetched, - info); - if (status != 0) - { - /* If we did manage to read at least one byte, then - print_insn_i386 will do something sensible. Otherwise, print - an error. We do that here because this is where we know - STATUS. */ - if (priv->max_fetched == priv->the_buffer) - (*info->memory_error_func) (status, start, info); - longjmp (priv->bailout, 1); - } - else - priv->max_fetched = addr; - return 1; -} - -#define XX NULL, 0 - -#define Eb OP_E, b_mode -#define Ev OP_E, v_mode -#define Ed OP_E, d_mode -#define Edq OP_E, dq_mode -#define indirEb OP_indirE, b_mode -#define indirEv OP_indirE, v_mode -#define Ew OP_E, w_mode -#define Ma OP_E, v_mode -#define M OP_E, 0 /* lea, lgdt, etc. */ -#define Mp OP_E, 0 /* 32 or 48 bit memory operand for LDS, LES etc */ -#define Gb OP_G, b_mode -#define Gv OP_G, v_mode -#define Gd OP_G, d_mode -#define Gw OP_G, w_mode -#define Rd OP_Rd, d_mode -#define Rm OP_Rd, m_mode -#define Ib OP_I, b_mode -#define sIb OP_sI, b_mode /* sign extened byte */ -#define Iv OP_I, v_mode -#define Iq OP_I, q_mode -#define Iv64 OP_I64, v_mode -#define Iw OP_I, w_mode -#define Jb OP_J, b_mode -#define Jv OP_J, v_mode -#define Cm OP_C, m_mode -#define Dm OP_D, m_mode -#define Td OP_T, d_mode - -#define RMeAX OP_REG, eAX_reg -#define RMeBX OP_REG, eBX_reg -#define RMeCX OP_REG, eCX_reg -#define RMeDX OP_REG, eDX_reg -#define RMeSP OP_REG, eSP_reg -#define RMeBP OP_REG, eBP_reg -#define RMeSI OP_REG, eSI_reg -#define RMeDI OP_REG, eDI_reg -#define RMrAX OP_REG, rAX_reg -#define RMrBX OP_REG, rBX_reg -#define RMrCX OP_REG, rCX_reg -#define RMrDX OP_REG, rDX_reg -#define RMrSP OP_REG, rSP_reg -#define RMrBP OP_REG, rBP_reg -#define RMrSI OP_REG, rSI_reg -#define RMrDI OP_REG, rDI_reg -#define RMAL OP_REG, al_reg -#define RMAL OP_REG, al_reg -#define RMCL OP_REG, cl_reg -#define RMDL OP_REG, dl_reg -#define RMBL OP_REG, bl_reg -#define RMAH OP_REG, ah_reg -#define RMCH OP_REG, ch_reg -#define RMDH OP_REG, dh_reg -#define RMBH OP_REG, bh_reg -#define RMAX OP_REG, ax_reg -#define RMDX OP_REG, dx_reg - -#define eAX OP_IMREG, eAX_reg -#define eBX OP_IMREG, eBX_reg -#define eCX OP_IMREG, eCX_reg -#define eDX OP_IMREG, eDX_reg -#define eSP OP_IMREG, eSP_reg -#define eBP OP_IMREG, eBP_reg -#define eSI OP_IMREG, eSI_reg -#define eDI OP_IMREG, eDI_reg -#define AL OP_IMREG, al_reg -#define AL OP_IMREG, al_reg -#define CL OP_IMREG, cl_reg -#define DL OP_IMREG, dl_reg -#define BL OP_IMREG, bl_reg -#define AH OP_IMREG, ah_reg -#define CH OP_IMREG, ch_reg -#define DH OP_IMREG, dh_reg -#define BH OP_IMREG, bh_reg -#define AX OP_IMREG, ax_reg -#define DX OP_IMREG, dx_reg -#define indirDX OP_IMREG, indir_dx_reg - -#define Sw OP_SEG, w_mode -#define Ap OP_DIR, 0 -#define Ob OP_OFF, b_mode -#define Ob64 OP_OFF64, b_mode -#define Ov OP_OFF, v_mode -#define Ov64 OP_OFF64, v_mode -#define Xb OP_DSreg, eSI_reg -#define Xv OP_DSreg, eSI_reg -#define Yb OP_ESreg, eDI_reg -#define Yv OP_ESreg, eDI_reg -#define DSBX OP_DSreg, eBX_reg - -#define es OP_REG, es_reg -#define ss OP_REG, ss_reg -#define cs OP_REG, cs_reg -#define ds OP_REG, ds_reg -#define fs OP_REG, fs_reg -#define gs OP_REG, gs_reg - -#define MX OP_MMX, 0 -#define XM OP_XMM, 0 -#define EM OP_EM, v_mode -#define EX OP_EX, v_mode -#define MS OP_MS, v_mode -#define XS OP_XS, v_mode -#define None OP_E, 0 -#define OPSUF OP_3DNowSuffix, 0 -#define OPSIMD OP_SIMD_Suffix, 0 - -#define cond_jump_flag NULL, cond_jump_mode -#define loop_jcxz_flag NULL, loop_jcxz_mode - -/* bits in sizeflag */ -#define SUFFIX_ALWAYS 4 -#define AFLAG 2 -#define DFLAG 1 - -#define b_mode 1 /* byte operand */ -#define v_mode 2 /* operand size depends on prefixes */ -#define w_mode 3 /* word operand */ -#define d_mode 4 /* double word operand */ -#define q_mode 5 /* quad word operand */ -#define x_mode 6 -#define m_mode 7 /* d_mode in 32bit, q_mode in 64bit mode. */ -#define cond_jump_mode 8 -#define loop_jcxz_mode 9 -#define dq_mode 10 /* operand size depends on REX prefixes. */ - -#define es_reg 100 -#define cs_reg 101 -#define ss_reg 102 -#define ds_reg 103 -#define fs_reg 104 -#define gs_reg 105 - -#define eAX_reg 108 -#define eCX_reg 109 -#define eDX_reg 110 -#define eBX_reg 111 -#define eSP_reg 112 -#define eBP_reg 113 -#define eSI_reg 114 -#define eDI_reg 115 - -#define al_reg 116 -#define cl_reg 117 -#define dl_reg 118 -#define bl_reg 119 -#define ah_reg 120 -#define ch_reg 121 -#define dh_reg 122 -#define bh_reg 123 - -#define ax_reg 124 -#define cx_reg 125 -#define dx_reg 126 -#define bx_reg 127 -#define sp_reg 128 -#define bp_reg 129 -#define si_reg 130 -#define di_reg 131 - -#define rAX_reg 132 -#define rCX_reg 133 -#define rDX_reg 134 -#define rBX_reg 135 -#define rSP_reg 136 -#define rBP_reg 137 -#define rSI_reg 138 -#define rDI_reg 139 - -#define indir_dx_reg 150 - -#define FLOATCODE 1 -#define USE_GROUPS 2 -#define USE_PREFIX_USER_TABLE 3 -#define X86_64_SPECIAL 4 - -#define FLOAT NULL, NULL, FLOATCODE, NULL, 0, NULL, 0 - -#define GRP1b NULL, NULL, USE_GROUPS, NULL, 0, NULL, 0 -#define GRP1S NULL, NULL, USE_GROUPS, NULL, 1, NULL, 0 -#define GRP1Ss NULL, NULL, USE_GROUPS, NULL, 2, NULL, 0 -#define GRP2b NULL, NULL, USE_GROUPS, NULL, 3, NULL, 0 -#define GRP2S NULL, NULL, USE_GROUPS, NULL, 4, NULL, 0 -#define GRP2b_one NULL, NULL, USE_GROUPS, NULL, 5, NULL, 0 -#define GRP2S_one NULL, NULL, USE_GROUPS, NULL, 6, NULL, 0 -#define GRP2b_cl NULL, NULL, USE_GROUPS, NULL, 7, NULL, 0 -#define GRP2S_cl NULL, NULL, USE_GROUPS, NULL, 8, NULL, 0 -#define GRP3b NULL, NULL, USE_GROUPS, NULL, 9, NULL, 0 -#define GRP3S NULL, NULL, USE_GROUPS, NULL, 10, NULL, 0 -#define GRP4 NULL, NULL, USE_GROUPS, NULL, 11, NULL, 0 -#define GRP5 NULL, NULL, USE_GROUPS, NULL, 12, NULL, 0 -#define GRP6 NULL, NULL, USE_GROUPS, NULL, 13, NULL, 0 -#define GRP7 NULL, NULL, USE_GROUPS, NULL, 14, NULL, 0 -#define GRP8 NULL, NULL, USE_GROUPS, NULL, 15, NULL, 0 -#define GRP9 NULL, NULL, USE_GROUPS, NULL, 16, NULL, 0 -#define GRP10 NULL, NULL, USE_GROUPS, NULL, 17, NULL, 0 -#define GRP11 NULL, NULL, USE_GROUPS, NULL, 18, NULL, 0 -#define GRP12 NULL, NULL, USE_GROUPS, NULL, 19, NULL, 0 -#define GRP13 NULL, NULL, USE_GROUPS, NULL, 20, NULL, 0 -#define GRP14 NULL, NULL, USE_GROUPS, NULL, 21, NULL, 0 -#define GRPAMD NULL, NULL, USE_GROUPS, NULL, 22, NULL, 0 - -#define PREGRP0 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 0, NULL, 0 -#define PREGRP1 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 1, NULL, 0 -#define PREGRP2 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 2, NULL, 0 -#define PREGRP3 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 3, NULL, 0 -#define PREGRP4 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 4, NULL, 0 -#define PREGRP5 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 5, NULL, 0 -#define PREGRP6 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 6, NULL, 0 -#define PREGRP7 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 7, NULL, 0 -#define PREGRP8 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 8, NULL, 0 -#define PREGRP9 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 9, NULL, 0 -#define PREGRP10 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 10, NULL, 0 -#define PREGRP11 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 11, NULL, 0 -#define PREGRP12 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 12, NULL, 0 -#define PREGRP13 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 13, NULL, 0 -#define PREGRP14 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 14, NULL, 0 -#define PREGRP15 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 15, NULL, 0 -#define PREGRP16 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 16, NULL, 0 -#define PREGRP17 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 17, NULL, 0 -#define PREGRP18 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 18, NULL, 0 -#define PREGRP19 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 19, NULL, 0 -#define PREGRP20 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 20, NULL, 0 -#define PREGRP21 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 21, NULL, 0 -#define PREGRP22 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 22, NULL, 0 -#define PREGRP23 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 23, NULL, 0 -#define PREGRP24 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 24, NULL, 0 -#define PREGRP25 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 25, NULL, 0 -#define PREGRP26 NULL, NULL, USE_PREFIX_USER_TABLE, NULL, 26, NULL, 0 - -#define X86_64_0 NULL, NULL, X86_64_SPECIAL, NULL, 0, NULL, 0 - -typedef void (*op_rtn) PARAMS ((int bytemode, int sizeflag)); - -struct dis386 { - const char *name; - op_rtn op1; - int bytemode1; - op_rtn op2; - int bytemode2; - op_rtn op3; - int bytemode3; -}; - -/* Upper case letters in the instruction names here are macros. - 'A' => print 'b' if no register operands or suffix_always is true - 'B' => print 'b' if suffix_always is true - 'E' => print 'e' if 32-bit form of jcxz - 'F' => print 'w' or 'l' depending on address size prefix (loop insns) - 'H' => print ",pt" or ",pn" branch hint - 'L' => print 'l' if suffix_always is true - 'N' => print 'n' if instruction has no wait "prefix" - 'O' => print 'd', or 'o' - 'P' => print 'w', 'l' or 'q' if instruction has an operand size prefix, - . or suffix_always is true. print 'q' if rex prefix is present. - 'Q' => print 'w', 'l' or 'q' if no register operands or suffix_always - . is true - 'R' => print 'w', 'l' or 'q' ("wd" or "dq" in intel mode) - 'S' => print 'w', 'l' or 'q' if suffix_always is true - 'T' => print 'q' in 64bit mode and behave as 'P' otherwise - 'U' => print 'q' in 64bit mode and behave as 'Q' otherwise - 'X' => print 's', 'd' depending on data16 prefix (for XMM) - 'W' => print 'b' or 'w' ("w" or "de" in intel mode) - 'Y' => 'q' if instruction has an REX 64bit overwrite prefix - - Many of the above letters print nothing in Intel mode. See "putop" - for the details. - - Braces '{' and '}', and vertical bars '|', indicate alternative - mnemonic strings for AT&T, Intel, X86_64 AT&T, and X86_64 Intel - modes. In cases where there are only two alternatives, the X86_64 - instruction is reserved, and "(bad)" is printed. -*/ - -static const struct dis386 dis386[] = { - /* 00 */ - { "addB", Eb, Gb, XX }, - { "addS", Ev, Gv, XX }, - { "addB", Gb, Eb, XX }, - { "addS", Gv, Ev, XX }, - { "addB", AL, Ib, XX }, - { "addS", eAX, Iv, XX }, - { "push{T|}", es, XX, XX }, - { "pop{T|}", es, XX, XX }, - /* 08 */ - { "orB", Eb, Gb, XX }, - { "orS", Ev, Gv, XX }, - { "orB", Gb, Eb, XX }, - { "orS", Gv, Ev, XX }, - { "orB", AL, Ib, XX }, - { "orS", eAX, Iv, XX }, - { "push{T|}", cs, XX, XX }, - { "(bad)", XX, XX, XX }, /* 0x0f extended opcode escape */ - /* 10 */ - { "adcB", Eb, Gb, XX }, - { "adcS", Ev, Gv, XX }, - { "adcB", Gb, Eb, XX }, - { "adcS", Gv, Ev, XX }, - { "adcB", AL, Ib, XX }, - { "adcS", eAX, Iv, XX }, - { "push{T|}", ss, XX, XX }, - { "popT|}", ss, XX, XX }, - /* 18 */ - { "sbbB", Eb, Gb, XX }, - { "sbbS", Ev, Gv, XX }, - { "sbbB", Gb, Eb, XX }, - { "sbbS", Gv, Ev, XX }, - { "sbbB", AL, Ib, XX }, - { "sbbS", eAX, Iv, XX }, - { "push{T|}", ds, XX, XX }, - { "pop{T|}", ds, XX, XX }, - /* 20 */ - { "andB", Eb, Gb, XX }, - { "andS", Ev, Gv, XX }, - { "andB", Gb, Eb, XX }, - { "andS", Gv, Ev, XX }, - { "andB", AL, Ib, XX }, - { "andS", eAX, Iv, XX }, - { "(bad)", XX, XX, XX }, /* SEG ES prefix */ - { "daa{|}", XX, XX, XX }, - /* 28 */ - { "subB", Eb, Gb, XX }, - { "subS", Ev, Gv, XX }, - { "subB", Gb, Eb, XX }, - { "subS", Gv, Ev, XX }, - { "subB", AL, Ib, XX }, - { "subS", eAX, Iv, XX }, - { "(bad)", XX, XX, XX }, /* SEG CS prefix */ - { "das{|}", XX, XX, XX }, - /* 30 */ - { "xorB", Eb, Gb, XX }, - { "xorS", Ev, Gv, XX }, - { "xorB", Gb, Eb, XX }, - { "xorS", Gv, Ev, XX }, - { "xorB", AL, Ib, XX }, - { "xorS", eAX, Iv, XX }, - { "(bad)", XX, XX, XX }, /* SEG SS prefix */ - { "aaa{|}", XX, XX, XX }, - /* 38 */ - { "cmpB", Eb, Gb, XX }, - { "cmpS", Ev, Gv, XX }, - { "cmpB", Gb, Eb, XX }, - { "cmpS", Gv, Ev, XX }, - { "cmpB", AL, Ib, XX }, - { "cmpS", eAX, Iv, XX }, - { "(bad)", XX, XX, XX }, /* SEG DS prefix */ - { "aas{|}", XX, XX, XX }, - /* 40 */ - { "inc{S|}", RMeAX, XX, XX }, - { "inc{S|}", RMeCX, XX, XX }, - { "inc{S|}", RMeDX, XX, XX }, - { "inc{S|}", RMeBX, XX, XX }, - { "inc{S|}", RMeSP, XX, XX }, - { "inc{S|}", RMeBP, XX, XX }, - { "inc{S|}", RMeSI, XX, XX }, - { "inc{S|}", RMeDI, XX, XX }, - /* 48 */ - { "dec{S|}", RMeAX, XX, XX }, - { "dec{S|}", RMeCX, XX, XX }, - { "dec{S|}", RMeDX, XX, XX }, - { "dec{S|}", RMeBX, XX, XX }, - { "dec{S|}", RMeSP, XX, XX }, - { "dec{S|}", RMeBP, XX, XX }, - { "dec{S|}", RMeSI, XX, XX }, - { "dec{S|}", RMeDI, XX, XX }, - /* 50 */ - { "pushS", RMrAX, XX, XX }, - { "pushS", RMrCX, XX, XX }, - { "pushS", RMrDX, XX, XX }, - { "pushS", RMrBX, XX, XX }, - { "pushS", RMrSP, XX, XX }, - { "pushS", RMrBP, XX, XX }, - { "pushS", RMrSI, XX, XX }, - { "pushS", RMrDI, XX, XX }, - /* 58 */ - { "popS", RMrAX, XX, XX }, - { "popS", RMrCX, XX, XX }, - { "popS", RMrDX, XX, XX }, - { "popS", RMrBX, XX, XX }, - { "popS", RMrSP, XX, XX }, - { "popS", RMrBP, XX, XX }, - { "popS", RMrSI, XX, XX }, - { "popS", RMrDI, XX, XX }, - /* 60 */ - { "pusha{P|}", XX, XX, XX }, - { "popa{P|}", XX, XX, XX }, - { "bound{S|}", Gv, Ma, XX }, - { X86_64_0 }, - { "(bad)", XX, XX, XX }, /* seg fs */ - { "(bad)", XX, XX, XX }, /* seg gs */ - { "(bad)", XX, XX, XX }, /* op size prefix */ - { "(bad)", XX, XX, XX }, /* adr size prefix */ - /* 68 */ - { "pushT", Iq, XX, XX }, - { "imulS", Gv, Ev, Iv }, - { "pushT", sIb, XX, XX }, - { "imulS", Gv, Ev, sIb }, - { "ins{b||b|}", Yb, indirDX, XX }, - { "ins{R||R|}", Yv, indirDX, XX }, - { "outs{b||b|}", indirDX, Xb, XX }, - { "outs{R||R|}", indirDX, Xv, XX }, - /* 70 */ - { "joH", Jb, XX, cond_jump_flag }, - { "jnoH", Jb, XX, cond_jump_flag }, - { "jbH", Jb, XX, cond_jump_flag }, - { "jaeH", Jb, XX, cond_jump_flag }, - { "jeH", Jb, XX, cond_jump_flag }, - { "jneH", Jb, XX, cond_jump_flag }, - { "jbeH", Jb, XX, cond_jump_flag }, - { "jaH", Jb, XX, cond_jump_flag }, - /* 78 */ - { "jsH", Jb, XX, cond_jump_flag }, - { "jnsH", Jb, XX, cond_jump_flag }, - { "jpH", Jb, XX, cond_jump_flag }, - { "jnpH", Jb, XX, cond_jump_flag }, - { "jlH", Jb, XX, cond_jump_flag }, - { "jgeH", Jb, XX, cond_jump_flag }, - { "jleH", Jb, XX, cond_jump_flag }, - { "jgH", Jb, XX, cond_jump_flag }, - /* 80 */ - { GRP1b }, - { GRP1S }, - { "(bad)", XX, XX, XX }, - { GRP1Ss }, - { "testB", Eb, Gb, XX }, - { "testS", Ev, Gv, XX }, - { "xchgB", Eb, Gb, XX }, - { "xchgS", Ev, Gv, XX }, - /* 88 */ - { "movB", Eb, Gb, XX }, - { "movS", Ev, Gv, XX }, - { "movB", Gb, Eb, XX }, - { "movS", Gv, Ev, XX }, - { "movQ", Ev, Sw, XX }, - { "leaS", Gv, M, XX }, - { "movQ", Sw, Ev, XX }, - { "popU", Ev, XX, XX }, - /* 90 */ - { "nop", XX, XX, XX }, - /* FIXME: NOP with REPz prefix is called PAUSE. */ - { "xchgS", RMeCX, eAX, XX }, - { "xchgS", RMeDX, eAX, XX }, - { "xchgS", RMeBX, eAX, XX }, - { "xchgS", RMeSP, eAX, XX }, - { "xchgS", RMeBP, eAX, XX }, - { "xchgS", RMeSI, eAX, XX }, - { "xchgS", RMeDI, eAX, XX }, - /* 98 */ - { "cW{tR||tR|}", XX, XX, XX }, - { "cR{tO||tO|}", XX, XX, XX }, - { "lcall{T|}", Ap, XX, XX }, - { "(bad)", XX, XX, XX }, /* fwait */ - { "pushfT", XX, XX, XX }, - { "popfT", XX, XX, XX }, - { "sahf{|}", XX, XX, XX }, - { "lahf{|}", XX, XX, XX }, - /* a0 */ - { "movB", AL, Ob64, XX }, - { "movS", eAX, Ov64, XX }, - { "movB", Ob64, AL, XX }, - { "movS", Ov64, eAX, XX }, - { "movs{b||b|}", Yb, Xb, XX }, - { "movs{R||R|}", Yv, Xv, XX }, - { "cmps{b||b|}", Xb, Yb, XX }, - { "cmps{R||R|}", Xv, Yv, XX }, - /* a8 */ - { "testB", AL, Ib, XX }, - { "testS", eAX, Iv, XX }, - { "stosB", Yb, AL, XX }, - { "stosS", Yv, eAX, XX }, - { "lodsB", AL, Xb, XX }, - { "lodsS", eAX, Xv, XX }, - { "scasB", AL, Yb, XX }, - { "scasS", eAX, Yv, XX }, - /* b0 */ - { "movB", RMAL, Ib, XX }, - { "movB", RMCL, Ib, XX }, - { "movB", RMDL, Ib, XX }, - { "movB", RMBL, Ib, XX }, - { "movB", RMAH, Ib, XX }, - { "movB", RMCH, Ib, XX }, - { "movB", RMDH, Ib, XX }, - { "movB", RMBH, Ib, XX }, - /* b8 */ - { "movS", RMeAX, Iv64, XX }, - { "movS", RMeCX, Iv64, XX }, - { "movS", RMeDX, Iv64, XX }, - { "movS", RMeBX, Iv64, XX }, - { "movS", RMeSP, Iv64, XX }, - { "movS", RMeBP, Iv64, XX }, - { "movS", RMeSI, Iv64, XX }, - { "movS", RMeDI, Iv64, XX }, - /* c0 */ - { GRP2b }, - { GRP2S }, - { "retT", Iw, XX, XX }, - { "retT", XX, XX, XX }, - { "les{S|}", Gv, Mp, XX }, - { "ldsS", Gv, Mp, XX }, - { "movA", Eb, Ib, XX }, - { "movQ", Ev, Iv, XX }, - /* c8 */ - { "enterT", Iw, Ib, XX }, - { "leaveT", XX, XX, XX }, - { "lretP", Iw, XX, XX }, - { "lretP", XX, XX, XX }, - { "int3", XX, XX, XX }, - { "int", Ib, XX, XX }, - { "into{|}", XX, XX, XX }, - { "iretP", XX, XX, XX }, - /* d0 */ - { GRP2b_one }, - { GRP2S_one }, - { GRP2b_cl }, - { GRP2S_cl }, - { "aam{|}", sIb, XX, XX }, - { "aad{|}", sIb, XX, XX }, - { "(bad)", XX, XX, XX }, - { "xlat", DSBX, XX, XX }, - /* d8 */ - { FLOAT }, - { FLOAT }, - { FLOAT }, - { FLOAT }, - { FLOAT }, - { FLOAT }, - { FLOAT }, - { FLOAT }, - /* e0 */ - { "loopneFH", Jb, XX, loop_jcxz_flag }, - { "loopeFH", Jb, XX, loop_jcxz_flag }, - { "loopFH", Jb, XX, loop_jcxz_flag }, - { "jEcxzH", Jb, XX, loop_jcxz_flag }, - { "inB", AL, Ib, XX }, - { "inS", eAX, Ib, XX }, - { "outB", Ib, AL, XX }, - { "outS", Ib, eAX, XX }, - /* e8 */ - { "callT", Jv, XX, XX }, - { "jmpT", Jv, XX, XX }, - { "ljmp{T|}", Ap, XX, XX }, - { "jmp", Jb, XX, XX }, - { "inB", AL, indirDX, XX }, - { "inS", eAX, indirDX, XX }, - { "outB", indirDX, AL, XX }, - { "outS", indirDX, eAX, XX }, - /* f0 */ - { "(bad)", XX, XX, XX }, /* lock prefix */ - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, /* repne */ - { "(bad)", XX, XX, XX }, /* repz */ - { "hlt", XX, XX, XX }, - { "cmc", XX, XX, XX }, - { GRP3b }, - { GRP3S }, - /* f8 */ - { "clc", XX, XX, XX }, - { "stc", XX, XX, XX }, - { "cli", XX, XX, XX }, - { "sti", XX, XX, XX }, - { "cld", XX, XX, XX }, - { "std", XX, XX, XX }, - { GRP4 }, - { GRP5 }, -}; - -static const struct dis386 dis386_twobyte[] = { - /* 00 */ - { GRP6 }, - { GRP7 }, - { "larS", Gv, Ew, XX }, - { "lslS", Gv, Ew, XX }, - { "(bad)", XX, XX, XX }, - { "syscall", XX, XX, XX }, - { "clts", XX, XX, XX }, - { "sysretP", XX, XX, XX }, - /* 08 */ - { "invd", XX, XX, XX }, - { "wbinvd", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "ud2a", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { GRPAMD }, - { "femms", XX, XX, XX }, - { "", MX, EM, OPSUF }, /* See OP_3DNowSuffix. */ - /* 10 */ - { PREGRP8 }, - { PREGRP9 }, - { "movlpX", XM, EX, SIMD_Fixup, 'h' }, /* really only 2 operands */ - { "movlpX", EX, XM, SIMD_Fixup, 'h' }, - { "unpcklpX", XM, EX, XX }, - { "unpckhpX", XM, EX, XX }, - { "movhpX", XM, EX, SIMD_Fixup, 'l' }, - { "movhpX", EX, XM, SIMD_Fixup, 'l' }, - /* 18 */ - { GRP14 }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - /* 20 */ - { "movL", Rm, Cm, XX }, - { "movL", Rm, Dm, XX }, - { "movL", Cm, Rm, XX }, - { "movL", Dm, Rm, XX }, - { "movL", Rd, Td, XX }, - { "(bad)", XX, XX, XX }, - { "movL", Td, Rd, XX }, - { "(bad)", XX, XX, XX }, - /* 28 */ - { "movapX", XM, EX, XX }, - { "movapX", EX, XM, XX }, - { PREGRP2 }, - { "movntpX", Ev, XM, XX }, - { PREGRP4 }, - { PREGRP3 }, - { "ucomisX", XM,EX, XX }, - { "comisX", XM,EX, XX }, - /* 30 */ - { "wrmsr", XX, XX, XX }, - { "rdtsc", XX, XX, XX }, - { "rdmsr", XX, XX, XX }, - { "rdpmc", XX, XX, XX }, - { "sysenter", XX, XX, XX }, - { "sysexit", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - /* 38 */ - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - /* 40 */ - { "cmovo", Gv, Ev, XX }, - { "cmovno", Gv, Ev, XX }, - { "cmovb", Gv, Ev, XX }, - { "cmovae", Gv, Ev, XX }, - { "cmove", Gv, Ev, XX }, - { "cmovne", Gv, Ev, XX }, - { "cmovbe", Gv, Ev, XX }, - { "cmova", Gv, Ev, XX }, - /* 48 */ - { "cmovs", Gv, Ev, XX }, - { "cmovns", Gv, Ev, XX }, - { "cmovp", Gv, Ev, XX }, - { "cmovnp", Gv, Ev, XX }, - { "cmovl", Gv, Ev, XX }, - { "cmovge", Gv, Ev, XX }, - { "cmovle", Gv, Ev, XX }, - { "cmovg", Gv, Ev, XX }, - /* 50 */ - { "movmskpX", Gd, XS, XX }, - { PREGRP13 }, - { PREGRP12 }, - { PREGRP11 }, - { "andpX", XM, EX, XX }, - { "andnpX", XM, EX, XX }, - { "orpX", XM, EX, XX }, - { "xorpX", XM, EX, XX }, - /* 58 */ - { PREGRP0 }, - { PREGRP10 }, - { PREGRP17 }, - { PREGRP16 }, - { PREGRP14 }, - { PREGRP7 }, - { PREGRP5 }, - { PREGRP6 }, - /* 60 */ - { "punpcklbw", MX, EM, XX }, - { "punpcklwd", MX, EM, XX }, - { "punpckldq", MX, EM, XX }, - { "packsswb", MX, EM, XX }, - { "pcmpgtb", MX, EM, XX }, - { "pcmpgtw", MX, EM, XX }, - { "pcmpgtd", MX, EM, XX }, - { "packuswb", MX, EM, XX }, - /* 68 */ - { "punpckhbw", MX, EM, XX }, - { "punpckhwd", MX, EM, XX }, - { "punpckhdq", MX, EM, XX }, - { "packssdw", MX, EM, XX }, - { PREGRP26 }, - { PREGRP24 }, - { "movd", MX, Edq, XX }, - { PREGRP19 }, - /* 70 */ - { PREGRP22 }, - { GRP10 }, - { GRP11 }, - { GRP12 }, - { "pcmpeqb", MX, EM, XX }, - { "pcmpeqw", MX, EM, XX }, - { "pcmpeqd", MX, EM, XX }, - { "emms", XX, XX, XX }, - /* 78 */ - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { PREGRP23 }, - { PREGRP20 }, - /* 80 */ - { "joH", Jv, XX, cond_jump_flag }, - { "jnoH", Jv, XX, cond_jump_flag }, - { "jbH", Jv, XX, cond_jump_flag }, - { "jaeH", Jv, XX, cond_jump_flag }, - { "jeH", Jv, XX, cond_jump_flag }, - { "jneH", Jv, XX, cond_jump_flag }, - { "jbeH", Jv, XX, cond_jump_flag }, - { "jaH", Jv, XX, cond_jump_flag }, - /* 88 */ - { "jsH", Jv, XX, cond_jump_flag }, - { "jnsH", Jv, XX, cond_jump_flag }, - { "jpH", Jv, XX, cond_jump_flag }, - { "jnpH", Jv, XX, cond_jump_flag }, - { "jlH", Jv, XX, cond_jump_flag }, - { "jgeH", Jv, XX, cond_jump_flag }, - { "jleH", Jv, XX, cond_jump_flag }, - { "jgH", Jv, XX, cond_jump_flag }, - /* 90 */ - { "seto", Eb, XX, XX }, - { "setno", Eb, XX, XX }, - { "setb", Eb, XX, XX }, - { "setae", Eb, XX, XX }, - { "sete", Eb, XX, XX }, - { "setne", Eb, XX, XX }, - { "setbe", Eb, XX, XX }, - { "seta", Eb, XX, XX }, - /* 98 */ - { "sets", Eb, XX, XX }, - { "setns", Eb, XX, XX }, - { "setp", Eb, XX, XX }, - { "setnp", Eb, XX, XX }, - { "setl", Eb, XX, XX }, - { "setge", Eb, XX, XX }, - { "setle", Eb, XX, XX }, - { "setg", Eb, XX, XX }, - /* a0 */ - { "pushT", fs, XX, XX }, - { "popT", fs, XX, XX }, - { "cpuid", XX, XX, XX }, - { "btS", Ev, Gv, XX }, - { "shldS", Ev, Gv, Ib }, - { "shldS", Ev, Gv, CL }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - /* a8 */ - { "pushT", gs, XX, XX }, - { "popT", gs, XX, XX }, - { "rsm", XX, XX, XX }, - { "btsS", Ev, Gv, XX }, - { "shrdS", Ev, Gv, Ib }, - { "shrdS", Ev, Gv, CL }, - { GRP13 }, - { "imulS", Gv, Ev, XX }, - /* b0 */ - { "cmpxchgB", Eb, Gb, XX }, - { "cmpxchgS", Ev, Gv, XX }, - { "lssS", Gv, Mp, XX }, - { "btrS", Ev, Gv, XX }, - { "lfsS", Gv, Mp, XX }, - { "lgsS", Gv, Mp, XX }, - { "movz{bR|x|bR|x}", Gv, Eb, XX }, - { "movz{wR|x|wR|x}", Gv, Ew, XX }, /* yes, there really is movzww ! */ - /* b8 */ - { "(bad)", XX, XX, XX }, - { "ud2b", XX, XX, XX }, - { GRP8 }, - { "btcS", Ev, Gv, XX }, - { "bsfS", Gv, Ev, XX }, - { "bsrS", Gv, Ev, XX }, - { "movs{bR|x|bR|x}", Gv, Eb, XX }, - { "movs{wR|x|wR|x}", Gv, Ew, XX }, /* yes, there really is movsww ! */ - /* c0 */ - { "xaddB", Eb, Gb, XX }, - { "xaddS", Ev, Gv, XX }, - { PREGRP1 }, - { "movntiS", Ev, Gv, XX }, - { "pinsrw", MX, Ed, Ib }, - { "pextrw", Gd, MS, Ib }, - { "shufpX", XM, EX, Ib }, - { GRP9 }, - /* c8 */ - { "bswap", RMeAX, XX, XX }, - { "bswap", RMeCX, XX, XX }, - { "bswap", RMeDX, XX, XX }, - { "bswap", RMeBX, XX, XX }, - { "bswap", RMeSP, XX, XX }, - { "bswap", RMeBP, XX, XX }, - { "bswap", RMeSI, XX, XX }, - { "bswap", RMeDI, XX, XX }, - /* d0 */ - { "(bad)", XX, XX, XX }, - { "psrlw", MX, EM, XX }, - { "psrld", MX, EM, XX }, - { "psrlq", MX, EM, XX }, - { "paddq", MX, EM, XX }, - { "pmullw", MX, EM, XX }, - { PREGRP21 }, - { "pmovmskb", Gd, MS, XX }, - /* d8 */ - { "psubusb", MX, EM, XX }, - { "psubusw", MX, EM, XX }, - { "pminub", MX, EM, XX }, - { "pand", MX, EM, XX }, - { "paddusb", MX, EM, XX }, - { "paddusw", MX, EM, XX }, - { "pmaxub", MX, EM, XX }, - { "pandn", MX, EM, XX }, - /* e0 */ - { "pavgb", MX, EM, XX }, - { "psraw", MX, EM, XX }, - { "psrad", MX, EM, XX }, - { "pavgw", MX, EM, XX }, - { "pmulhuw", MX, EM, XX }, - { "pmulhw", MX, EM, XX }, - { PREGRP15 }, - { PREGRP25 }, - /* e8 */ - { "psubsb", MX, EM, XX }, - { "psubsw", MX, EM, XX }, - { "pminsw", MX, EM, XX }, - { "por", MX, EM, XX }, - { "paddsb", MX, EM, XX }, - { "paddsw", MX, EM, XX }, - { "pmaxsw", MX, EM, XX }, - { "pxor", MX, EM, XX }, - /* f0 */ - { "(bad)", XX, XX, XX }, - { "psllw", MX, EM, XX }, - { "pslld", MX, EM, XX }, - { "psllq", MX, EM, XX }, - { "pmuludq", MX, EM, XX }, - { "pmaddwd", MX, EM, XX }, - { "psadbw", MX, EM, XX }, - { PREGRP18 }, - /* f8 */ - { "psubb", MX, EM, XX }, - { "psubw", MX, EM, XX }, - { "psubd", MX, EM, XX }, - { "psubq", MX, EM, XX }, - { "paddb", MX, EM, XX }, - { "paddw", MX, EM, XX }, - { "paddd", MX, EM, XX }, - { "(bad)", XX, XX, XX } -}; - -static const unsigned char onebyte_has_modrm[256] = { - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ - /* ------------------------------- */ - /* 00 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 00 */ - /* 10 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 10 */ - /* 20 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 20 */ - /* 30 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 30 */ - /* 40 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 40 */ - /* 50 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 50 */ - /* 60 */ 0,0,1,1,0,0,0,0,0,1,0,1,0,0,0,0, /* 60 */ - /* 70 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 70 */ - /* 80 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 80 */ - /* 90 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 90 */ - /* a0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* a0 */ - /* b0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* b0 */ - /* c0 */ 1,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0, /* c0 */ - /* d0 */ 1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1, /* d0 */ - /* e0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* e0 */ - /* f0 */ 0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1 /* f0 */ - /* ------------------------------- */ - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ -}; - -static const unsigned char twobyte_has_modrm[256] = { - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ - /* ------------------------------- */ - /* 00 */ 1,1,1,1,0,0,0,0,0,0,0,0,0,1,0,1, /* 0f */ - /* 10 */ 1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0, /* 1f */ - /* 20 */ 1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1, /* 2f */ - /* 30 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 3f */ - /* 40 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 4f */ - /* 50 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 5f */ - /* 60 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 6f */ - /* 70 */ 1,1,1,1,1,1,1,0,0,0,0,0,0,0,1,1, /* 7f */ - /* 80 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 8f */ - /* 90 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 9f */ - /* a0 */ 0,0,0,1,1,1,0,0,0,0,0,1,1,1,1,1, /* af */ - /* b0 */ 1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1, /* bf */ - /* c0 */ 1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0, /* cf */ - /* d0 */ 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* df */ - /* e0 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* ef */ - /* f0 */ 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0 /* ff */ - /* ------------------------------- */ - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ -}; - -static const unsigned char twobyte_uses_SSE_prefix[256] = { - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ - /* ------------------------------- */ - /* 00 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0f */ - /* 10 */ 1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 1f */ - /* 20 */ 0,0,0,0,0,0,0,0,0,0,1,0,1,1,0,0, /* 2f */ - /* 30 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 3f */ - /* 40 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 4f */ - /* 50 */ 0,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1, /* 5f */ - /* 60 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1, /* 6f */ - /* 70 */ 1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1, /* 7f */ - /* 80 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 8f */ - /* 90 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 9f */ - /* a0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* af */ - /* b0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* bf */ - /* c0 */ 0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0, /* cf */ - /* d0 */ 0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0, /* df */ - /* e0 */ 0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0, /* ef */ - /* f0 */ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0 /* ff */ - /* ------------------------------- */ - /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */ -}; - -static char obuf[100]; -static char *obufp; -static char scratchbuf[100]; -static unsigned char *start_codep; -static unsigned char *insn_codep; -static unsigned char *codep; -static disassemble_info *the_info; -static int mod; -static int rm; -static int reg; -static unsigned char need_modrm; - -/* If we are accessing mod/rm/reg without need_modrm set, then the - values are stale. Hitting this abort likely indicates that you - need to update onebyte_has_modrm or twobyte_has_modrm. */ -#define MODRM_CHECK if (!need_modrm) abort () - -static const char **names64; -static const char **names32; -static const char **names16; -static const char **names8; -static const char **names8rex; -static const char **names_seg; -static const char **index16; - -static const char *intel_names64[] = { - "rax", "rcx", "rdx", "rbx", "rsp", "rbp", "rsi", "rdi", - "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15" -}; -static const char *intel_names32[] = { - "eax", "ecx", "edx", "ebx", "esp", "ebp", "esi", "edi", - "r8d", "r9d", "r10d", "r11d", "r12d", "r13d", "r14d", "r15d" -}; -static const char *intel_names16[] = { - "ax", "cx", "dx", "bx", "sp", "bp", "si", "di", - "r8w", "r9w", "r10w", "r11w", "r12w", "r13w", "r14w", "r15w" -}; -static const char *intel_names8[] = { - "al", "cl", "dl", "bl", "ah", "ch", "dh", "bh", -}; -static const char *intel_names8rex[] = { - "al", "cl", "dl", "bl", "spl", "bpl", "sil", "dil", - "r8b", "r9b", "r10b", "r11b", "r12b", "r13b", "r14b", "r15b" -}; -static const char *intel_names_seg[] = { - "es", "cs", "ss", "ds", "fs", "gs", "?", "?", -}; -static const char *intel_index16[] = { - "bx+si", "bx+di", "bp+si", "bp+di", "si", "di", "bp", "bx" -}; - -static const char *att_names64[] = { - "%rax", "%rcx", "%rdx", "%rbx", "%rsp", "%rbp", "%rsi", "%rdi", - "%r8", "%r9", "%r10", "%r11", "%r12", "%r13", "%r14", "%r15" -}; -static const char *att_names32[] = { - "%eax", "%ecx", "%edx", "%ebx", "%esp", "%ebp", "%esi", "%edi", - "%r8d", "%r9d", "%r10d", "%r11d", "%r12d", "%r13d", "%r14d", "%r15d" -}; -static const char *att_names16[] = { - "%ax", "%cx", "%dx", "%bx", "%sp", "%bp", "%si", "%di", - "%r8w", "%r9w", "%r10w", "%r11w", "%r12w", "%r13w", "%r14w", "%r15w" -}; -static const char *att_names8[] = { - "%al", "%cl", "%dl", "%bl", "%ah", "%ch", "%dh", "%bh", -}; -static const char *att_names8rex[] = { - "%al", "%cl", "%dl", "%bl", "%spl", "%bpl", "%sil", "%dil", - "%r8b", "%r9b", "%r10b", "%r11b", "%r12b", "%r13b", "%r14b", "%r15b" -}; -static const char *att_names_seg[] = { - "%es", "%cs", "%ss", "%ds", "%fs", "%gs", "%?", "%?", -}; -static const char *att_index16[] = { - "%bx,%si", "%bx,%di", "%bp,%si", "%bp,%di", "%si", "%di", "%bp", "%bx" -}; - -static const struct dis386 grps[][8] = { - /* GRP1b */ - { - { "addA", Eb, Ib, XX }, - { "orA", Eb, Ib, XX }, - { "adcA", Eb, Ib, XX }, - { "sbbA", Eb, Ib, XX }, - { "andA", Eb, Ib, XX }, - { "subA", Eb, Ib, XX }, - { "xorA", Eb, Ib, XX }, - { "cmpA", Eb, Ib, XX } - }, - /* GRP1S */ - { - { "addQ", Ev, Iv, XX }, - { "orQ", Ev, Iv, XX }, - { "adcQ", Ev, Iv, XX }, - { "sbbQ", Ev, Iv, XX }, - { "andQ", Ev, Iv, XX }, - { "subQ", Ev, Iv, XX }, - { "xorQ", Ev, Iv, XX }, - { "cmpQ", Ev, Iv, XX } - }, - /* GRP1Ss */ - { - { "addQ", Ev, sIb, XX }, - { "orQ", Ev, sIb, XX }, - { "adcQ", Ev, sIb, XX }, - { "sbbQ", Ev, sIb, XX }, - { "andQ", Ev, sIb, XX }, - { "subQ", Ev, sIb, XX }, - { "xorQ", Ev, sIb, XX }, - { "cmpQ", Ev, sIb, XX } - }, - /* GRP2b */ - { - { "rolA", Eb, Ib, XX }, - { "rorA", Eb, Ib, XX }, - { "rclA", Eb, Ib, XX }, - { "rcrA", Eb, Ib, XX }, - { "shlA", Eb, Ib, XX }, - { "shrA", Eb, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "sarA", Eb, Ib, XX }, - }, - /* GRP2S */ - { - { "rolQ", Ev, Ib, XX }, - { "rorQ", Ev, Ib, XX }, - { "rclQ", Ev, Ib, XX }, - { "rcrQ", Ev, Ib, XX }, - { "shlQ", Ev, Ib, XX }, - { "shrQ", Ev, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "sarQ", Ev, Ib, XX }, - }, - /* GRP2b_one */ - { - { "rolA", Eb, XX, XX }, - { "rorA", Eb, XX, XX }, - { "rclA", Eb, XX, XX }, - { "rcrA", Eb, XX, XX }, - { "shlA", Eb, XX, XX }, - { "shrA", Eb, XX, XX }, - { "(bad)", XX, XX, XX }, - { "sarA", Eb, XX, XX }, - }, - /* GRP2S_one */ - { - { "rolQ", Ev, XX, XX }, - { "rorQ", Ev, XX, XX }, - { "rclQ", Ev, XX, XX }, - { "rcrQ", Ev, XX, XX }, - { "shlQ", Ev, XX, XX }, - { "shrQ", Ev, XX, XX }, - { "(bad)", XX, XX, XX}, - { "sarQ", Ev, XX, XX }, - }, - /* GRP2b_cl */ - { - { "rolA", Eb, CL, XX }, - { "rorA", Eb, CL, XX }, - { "rclA", Eb, CL, XX }, - { "rcrA", Eb, CL, XX }, - { "shlA", Eb, CL, XX }, - { "shrA", Eb, CL, XX }, - { "(bad)", XX, XX, XX }, - { "sarA", Eb, CL, XX }, - }, - /* GRP2S_cl */ - { - { "rolQ", Ev, CL, XX }, - { "rorQ", Ev, CL, XX }, - { "rclQ", Ev, CL, XX }, - { "rcrQ", Ev, CL, XX }, - { "shlQ", Ev, CL, XX }, - { "shrQ", Ev, CL, XX }, - { "(bad)", XX, XX, XX }, - { "sarQ", Ev, CL, XX } - }, - /* GRP3b */ - { - { "testA", Eb, Ib, XX }, - { "(bad)", Eb, XX, XX }, - { "notA", Eb, XX, XX }, - { "negA", Eb, XX, XX }, - { "mulA", Eb, XX, XX }, /* Don't print the implicit %al register, */ - { "imulA", Eb, XX, XX }, /* to distinguish these opcodes from other */ - { "divA", Eb, XX, XX }, /* mul/imul opcodes. Do the same for div */ - { "idivA", Eb, XX, XX } /* and idiv for consistency. */ - }, - /* GRP3S */ - { - { "testQ", Ev, Iv, XX }, - { "(bad)", XX, XX, XX }, - { "notQ", Ev, XX, XX }, - { "negQ", Ev, XX, XX }, - { "mulQ", Ev, XX, XX }, /* Don't print the implicit register. */ - { "imulQ", Ev, XX, XX }, - { "divQ", Ev, XX, XX }, - { "idivQ", Ev, XX, XX }, - }, - /* GRP4 */ - { - { "incA", Eb, XX, XX }, - { "decA", Eb, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRP5 */ - { - { "incQ", Ev, XX, XX }, - { "decQ", Ev, XX, XX }, - { "callT", indirEv, XX, XX }, - { "lcallT", indirEv, XX, XX }, - { "jmpT", indirEv, XX, XX }, - { "ljmpT", indirEv, XX, XX }, - { "pushU", Ev, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRP6 */ - { - { "sldtQ", Ev, XX, XX }, - { "strQ", Ev, XX, XX }, - { "lldt", Ew, XX, XX }, - { "ltr", Ew, XX, XX }, - { "verr", Ew, XX, XX }, - { "verw", Ew, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX } - }, - /* GRP7 */ - { - { "sgdtQ", M, XX, XX }, - { "sidtQ", M, XX, XX }, - { "lgdtQ", M, XX, XX }, - { "lidtQ", M, XX, XX }, - { "smswQ", Ev, XX, XX }, - { "(bad)", XX, XX, XX }, - { "lmsw", Ew, XX, XX }, - { "invlpg", Ew, XX, XX }, - }, - /* GRP8 */ - { - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "btQ", Ev, Ib, XX }, - { "btsQ", Ev, Ib, XX }, - { "btrQ", Ev, Ib, XX }, - { "btcQ", Ev, Ib, XX }, - }, - /* GRP9 */ - { - { "(bad)", XX, XX, XX }, - { "cmpxchg8b", Ev, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRP10 */ - { - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "psrlw", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "psraw", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "psllw", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRP11 */ - { - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "psrld", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "psrad", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "pslld", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRP12 */ - { - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "psrlq", MS, Ib, XX }, - { "psrldq", MS, Ib, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "psllq", MS, Ib, XX }, - { "pslldq", MS, Ib, XX }, - }, - /* GRP13 */ - { - { "fxsave", Ev, XX, XX }, - { "fxrstor", Ev, XX, XX }, - { "ldmxcsr", Ev, XX, XX }, - { "stmxcsr", Ev, XX, XX }, - { "(bad)", XX, XX, XX }, - { "lfence", None, XX, XX }, - { "mfence", None, XX, XX }, - { "sfence", None, XX, XX }, - /* FIXME: the sfence with memory operand is clflush! */ - }, - /* GRP14 */ - { - { "prefetchnta", Ev, XX, XX }, - { "prefetcht0", Ev, XX, XX }, - { "prefetcht1", Ev, XX, XX }, - { "prefetcht2", Ev, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* GRPAMD */ - { - { "prefetch", Eb, XX, XX }, - { "prefetchw", Eb, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - } -}; - -static const struct dis386 prefix_user_table[][4] = { - /* PREGRP0 */ - { - { "addps", XM, EX, XX }, - { "addss", XM, EX, XX }, - { "addpd", XM, EX, XX }, - { "addsd", XM, EX, XX }, - }, - /* PREGRP1 */ - { - { "", XM, EX, OPSIMD }, /* See OP_SIMD_SUFFIX. */ - { "", XM, EX, OPSIMD }, - { "", XM, EX, OPSIMD }, - { "", XM, EX, OPSIMD }, - }, - /* PREGRP2 */ - { - { "cvtpi2ps", XM, EM, XX }, - { "cvtsi2ssY", XM, Ev, XX }, - { "cvtpi2pd", XM, EM, XX }, - { "cvtsi2sdY", XM, Ev, XX }, - }, - /* PREGRP3 */ - { - { "cvtps2pi", MX, EX, XX }, - { "cvtss2siY", Gv, EX, XX }, - { "cvtpd2pi", MX, EX, XX }, - { "cvtsd2siY", Gv, EX, XX }, - }, - /* PREGRP4 */ - { - { "cvttps2pi", MX, EX, XX }, - { "cvttss2siY", Gv, EX, XX }, - { "cvttpd2pi", MX, EX, XX }, - { "cvttsd2siY", Gv, EX, XX }, - }, - /* PREGRP5 */ - { - { "divps", XM, EX, XX }, - { "divss", XM, EX, XX }, - { "divpd", XM, EX, XX }, - { "divsd", XM, EX, XX }, - }, - /* PREGRP6 */ - { - { "maxps", XM, EX, XX }, - { "maxss", XM, EX, XX }, - { "maxpd", XM, EX, XX }, - { "maxsd", XM, EX, XX }, - }, - /* PREGRP7 */ - { - { "minps", XM, EX, XX }, - { "minss", XM, EX, XX }, - { "minpd", XM, EX, XX }, - { "minsd", XM, EX, XX }, - }, - /* PREGRP8 */ - { - { "movups", XM, EX, XX }, - { "movss", XM, EX, XX }, - { "movupd", XM, EX, XX }, - { "movsd", XM, EX, XX }, - }, - /* PREGRP9 */ - { - { "movups", EX, XM, XX }, - { "movss", EX, XM, XX }, - { "movupd", EX, XM, XX }, - { "movsd", EX, XM, XX }, - }, - /* PREGRP10 */ - { - { "mulps", XM, EX, XX }, - { "mulss", XM, EX, XX }, - { "mulpd", XM, EX, XX }, - { "mulsd", XM, EX, XX }, - }, - /* PREGRP11 */ - { - { "rcpps", XM, EX, XX }, - { "rcpss", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP12 */ - { - { "rsqrtps", XM, EX, XX }, - { "rsqrtss", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP13 */ - { - { "sqrtps", XM, EX, XX }, - { "sqrtss", XM, EX, XX }, - { "sqrtpd", XM, EX, XX }, - { "sqrtsd", XM, EX, XX }, - }, - /* PREGRP14 */ - { - { "subps", XM, EX, XX }, - { "subss", XM, EX, XX }, - { "subpd", XM, EX, XX }, - { "subsd", XM, EX, XX }, - }, - /* PREGRP15 */ - { - { "(bad)", XM, EX, XX }, - { "cvtdq2pd", XM, EX, XX }, - { "cvttpd2dq", XM, EX, XX }, - { "cvtpd2dq", XM, EX, XX }, - }, - /* PREGRP16 */ - { - { "cvtdq2ps", XM, EX, XX }, - { "cvttps2dq",XM, EX, XX }, - { "cvtps2dq",XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP17 */ - { - { "cvtps2pd", XM, EX, XX }, - { "cvtss2sd", XM, EX, XX }, - { "cvtpd2ps", XM, EX, XX }, - { "cvtsd2ss", XM, EX, XX }, - }, - /* PREGRP18 */ - { - { "maskmovq", MX, MS, XX }, - { "(bad)", XM, EX, XX }, - { "maskmovdqu", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP19 */ - { - { "movq", MX, EM, XX }, - { "movdqu", XM, EX, XX }, - { "movdqa", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP20 */ - { - { "movq", EM, MX, XX }, - { "movdqu", EX, XM, XX }, - { "movdqa", EX, XM, XX }, - { "(bad)", EX, XM, XX }, - }, - /* PREGRP21 */ - { - { "(bad)", EX, XM, XX }, - { "movq2dq", XM, MS, XX }, - { "movq", EX, XM, XX }, - { "movdq2q", MX, XS, XX }, - }, - /* PREGRP22 */ - { - { "pshufw", MX, EM, Ib }, - { "pshufhw", XM, EX, Ib }, - { "pshufd", XM, EX, Ib }, - { "pshuflw", XM, EX, Ib }, - }, - /* PREGRP23 */ - { - { "movd", Edq, MX, XX }, - { "movq", XM, EX, XX }, - { "movd", Edq, XM, XX }, - { "(bad)", Ed, XM, XX }, - }, - /* PREGRP24 */ - { - { "(bad)", MX, EX, XX }, - { "(bad)", XM, EX, XX }, - { "punpckhqdq", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, - /* PREGRP25 */ - { - { "movntq", Ev, MX, XX }, - { "(bad)", Ev, XM, XX }, - { "movntdq", Ev, XM, XX }, - { "(bad)", Ev, XM, XX }, - }, - /* PREGRP26 */ - { - { "(bad)", MX, EX, XX }, - { "(bad)", XM, EX, XX }, - { "punpcklqdq", XM, EX, XX }, - { "(bad)", XM, EX, XX }, - }, -}; - -static const struct dis386 x86_64_table[][2] = { - { - { "arpl", Ew, Gw, XX }, - { "movs{||lq|xd}", Gv, Ed, XX }, - }, -}; - -#define INTERNAL_DISASSEMBLER_ERROR _("") - -static void -ckprefix () -{ - int newrex; - rex = 0; - prefixes = 0; - used_prefixes = 0; - rex_used = 0; - while (1) - { - FETCH_DATA (the_info, codep + 1); - newrex = 0; - switch (*codep) - { - /* REX prefixes family. */ - case 0x40: - case 0x41: - case 0x42: - case 0x43: - case 0x44: - case 0x45: - case 0x46: - case 0x47: - case 0x48: - case 0x49: - case 0x4a: - case 0x4b: - case 0x4c: - case 0x4d: - case 0x4e: - case 0x4f: - if (mode_64bit) - newrex = *codep; - else - return; - break; - case 0xf3: - prefixes |= PREFIX_REPZ; - break; - case 0xf2: - prefixes |= PREFIX_REPNZ; - break; - case 0xf0: - prefixes |= PREFIX_LOCK; - break; - case 0x2e: - prefixes |= PREFIX_CS; - break; - case 0x36: - prefixes |= PREFIX_SS; - break; - case 0x3e: - prefixes |= PREFIX_DS; - break; - case 0x26: - prefixes |= PREFIX_ES; - break; - case 0x64: - prefixes |= PREFIX_FS; - break; - case 0x65: - prefixes |= PREFIX_GS; - break; - case 0x66: - prefixes |= PREFIX_DATA; - break; - case 0x67: - prefixes |= PREFIX_ADDR; - break; - case FWAIT_OPCODE: - /* fwait is really an instruction. If there are prefixes - before the fwait, they belong to the fwait, *not* to the - following instruction. */ - if (prefixes) - { - prefixes |= PREFIX_FWAIT; - codep++; - return; - } - prefixes = PREFIX_FWAIT; - break; - default: - return; - } - /* Rex is ignored when followed by another prefix. */ - if (rex) - { - oappend (prefix_name (rex, 0)); - oappend (" "); - } - rex = newrex; - codep++; - } -} - -/* Return the name of the prefix byte PREF, or NULL if PREF is not a - prefix byte. */ - -static const char * -prefix_name (pref, sizeflag) - int pref; - int sizeflag; -{ - switch (pref) - { - /* REX prefixes family. */ - case 0x40: - return "rex"; - case 0x41: - return "rexZ"; - case 0x42: - return "rexY"; - case 0x43: - return "rexYZ"; - case 0x44: - return "rexX"; - case 0x45: - return "rexXZ"; - case 0x46: - return "rexXY"; - case 0x47: - return "rexXYZ"; - case 0x48: - return "rex64"; - case 0x49: - return "rex64Z"; - case 0x4a: - return "rex64Y"; - case 0x4b: - return "rex64YZ"; - case 0x4c: - return "rex64X"; - case 0x4d: - return "rex64XZ"; - case 0x4e: - return "rex64XY"; - case 0x4f: - return "rex64XYZ"; - case 0xf3: - return "repz"; - case 0xf2: - return "repnz"; - case 0xf0: - return "lock"; - case 0x2e: - return "cs"; - case 0x36: - return "ss"; - case 0x3e: - return "ds"; - case 0x26: - return "es"; - case 0x64: - return "fs"; - case 0x65: - return "gs"; - case 0x66: - return (sizeflag & DFLAG) ? "data16" : "data32"; - case 0x67: - if (mode_64bit) - return (sizeflag & AFLAG) ? "addr32" : "addr64"; - else - return ((sizeflag & AFLAG) && !mode_64bit) ? "addr16" : "addr32"; - case FWAIT_OPCODE: - return "fwait"; - default: - return NULL; - } -} - -static char op1out[100], op2out[100], op3out[100]; -static int op_ad, op_index[3]; -static bfd_vma op_address[3]; -static bfd_vma op_riprel[3]; -static bfd_vma start_pc; - -/* - * On the 386's of 1988, the maximum length of an instruction is 15 bytes. - * (see topic "Redundant prefixes" in the "Differences from 8086" - * section of the "Virtual 8086 Mode" chapter.) - * 'pc' should be the address of this instruction, it will - * be used to print the target address if this is a relative jump or call - * The function returns the length of this instruction in bytes. - */ - -static char intel_syntax; -static char open_char; -static char close_char; -static char separator_char; -static char scale_char; - -/* Here for backwards compatibility. When gdb stops using - print_insn_i386_att and print_insn_i386_intel these functions can - disappear, and print_insn_i386 be merged into print_insn. */ -int -print_insn_i386_att (pc, info) - bfd_vma pc; - disassemble_info *info; -{ - intel_syntax = 0; - - return print_insn (pc, info); -} - -int -print_insn_i386_intel (pc, info) - bfd_vma pc; - disassemble_info *info; -{ - intel_syntax = 1; - - return print_insn (pc, info); -} - -int -print_insn_i386 (pc, info) - bfd_vma pc; - disassemble_info *info; -{ - intel_syntax = -1; - - return print_insn (pc, info); -} - -static int -print_insn (pc, info) - bfd_vma pc; - disassemble_info *info; -{ - const struct dis386 *dp; - int i; - int two_source_ops; - char *first, *second, *third; - int needcomma; - unsigned char uses_SSE_prefix; - int sizeflag; - const char *p; - struct dis_private priv; - - mode_64bit = (info->mach == bfd_mach_x86_64_intel_syntax - || info->mach == bfd_mach_x86_64); - - if (intel_syntax == -1) - intel_syntax = (info->mach == bfd_mach_i386_i386_intel_syntax - || info->mach == bfd_mach_x86_64_intel_syntax); - - if (info->mach == bfd_mach_i386_i386 - || info->mach == bfd_mach_x86_64 - || info->mach == bfd_mach_i386_i386_intel_syntax - || info->mach == bfd_mach_x86_64_intel_syntax) - priv.orig_sizeflag = AFLAG | DFLAG; - else if (info->mach == bfd_mach_i386_i8086) - priv.orig_sizeflag = 0; - else - abort (); - - for (p = info->disassembler_options; p != NULL; ) - { - if (strncmp (p, "x86-64", 6) == 0) - { - mode_64bit = 1; - priv.orig_sizeflag = AFLAG | DFLAG; - } - else if (strncmp (p, "i386", 4) == 0) - { - mode_64bit = 0; - priv.orig_sizeflag = AFLAG | DFLAG; - } - else if (strncmp (p, "i8086", 5) == 0) - { - mode_64bit = 0; - priv.orig_sizeflag = 0; - } - else if (strncmp (p, "intel", 5) == 0) - { - intel_syntax = 1; - } - else if (strncmp (p, "att", 3) == 0) - { - intel_syntax = 0; - } - else if (strncmp (p, "addr", 4) == 0) - { - if (p[4] == '1' && p[5] == '6') - priv.orig_sizeflag &= ~AFLAG; - else if (p[4] == '3' && p[5] == '2') - priv.orig_sizeflag |= AFLAG; - } - else if (strncmp (p, "data", 4) == 0) - { - if (p[4] == '1' && p[5] == '6') - priv.orig_sizeflag &= ~DFLAG; - else if (p[4] == '3' && p[5] == '2') - priv.orig_sizeflag |= DFLAG; - } - else if (strncmp (p, "suffix", 6) == 0) - priv.orig_sizeflag |= SUFFIX_ALWAYS; - - p = strchr (p, ','); - if (p != NULL) - p++; - } - - if (intel_syntax) - { - names64 = intel_names64; - names32 = intel_names32; - names16 = intel_names16; - names8 = intel_names8; - names8rex = intel_names8rex; - names_seg = intel_names_seg; - index16 = intel_index16; - open_char = '['; - close_char = ']'; - separator_char = '+'; - scale_char = '*'; - } - else - { - names64 = att_names64; - names32 = att_names32; - names16 = att_names16; - names8 = att_names8; - names8rex = att_names8rex; - names_seg = att_names_seg; - index16 = att_index16; - open_char = '('; - close_char = ')'; - separator_char = ','; - scale_char = ','; - } - - /* The output looks better if we put 7 bytes on a line, since that - puts most long word instructions on a single line. */ - info->bytes_per_line = 7; - - info->private_data = (PTR) &priv; - priv.max_fetched = priv.the_buffer; - priv.insn_start = pc; - - obuf[0] = 0; - op1out[0] = 0; - op2out[0] = 0; - op3out[0] = 0; - - op_index[0] = op_index[1] = op_index[2] = -1; - - the_info = info; - start_pc = pc; - start_codep = priv.the_buffer; - codep = priv.the_buffer; - - if (setjmp (priv.bailout) != 0) - { - const char *name; - - /* Getting here means we tried for data but didn't get it. That - means we have an incomplete instruction of some sort. Just - print the first byte as a prefix or a .byte pseudo-op. */ - if (codep > priv.the_buffer) - { - name = prefix_name (priv.the_buffer[0], priv.orig_sizeflag); - if (name != NULL) - (*info->fprintf_func) (info->stream, "%s", name); - else - { - /* Just print the first byte as a .byte instruction. */ - (*info->fprintf_func) (info->stream, ".byte 0x%x", - (unsigned int) priv.the_buffer[0]); - } - - return 1; - } - - return -1; - } - - obufp = obuf; - ckprefix (); - - insn_codep = codep; - sizeflag = priv.orig_sizeflag; - - FETCH_DATA (info, codep + 1); - two_source_ops = (*codep == 0x62) || (*codep == 0xc8); - - if ((prefixes & PREFIX_FWAIT) - && ((*codep < 0xd8) || (*codep > 0xdf))) - { - const char *name; - - /* fwait not followed by floating point instruction. Print the - first prefix, which is probably fwait itself. */ - name = prefix_name (priv.the_buffer[0], priv.orig_sizeflag); - if (name == NULL) - name = INTERNAL_DISASSEMBLER_ERROR; - (*info->fprintf_func) (info->stream, "%s", name); - return 1; - } - - if (*codep == 0x0f) - { - FETCH_DATA (info, codep + 2); - dp = &dis386_twobyte[*++codep]; - need_modrm = twobyte_has_modrm[*codep]; - uses_SSE_prefix = twobyte_uses_SSE_prefix[*codep]; - } - else - { - dp = &dis386[*codep]; - need_modrm = onebyte_has_modrm[*codep]; - uses_SSE_prefix = 0; - } - codep++; - - if (!uses_SSE_prefix && (prefixes & PREFIX_REPZ)) - { - oappend ("repz "); - used_prefixes |= PREFIX_REPZ; - } - if (!uses_SSE_prefix && (prefixes & PREFIX_REPNZ)) - { - oappend ("repnz "); - used_prefixes |= PREFIX_REPNZ; - } - if (prefixes & PREFIX_LOCK) - { - oappend ("lock "); - used_prefixes |= PREFIX_LOCK; - } - - if (prefixes & PREFIX_ADDR) - { - sizeflag ^= AFLAG; - if (dp->bytemode3 != loop_jcxz_mode || intel_syntax) - { - if ((sizeflag & AFLAG) || mode_64bit) - oappend ("addr32 "); - else - oappend ("addr16 "); - used_prefixes |= PREFIX_ADDR; - } - } - - if (!uses_SSE_prefix && (prefixes & PREFIX_DATA)) - { - sizeflag ^= DFLAG; - if (dp->bytemode3 == cond_jump_mode - && dp->bytemode1 == v_mode - && !intel_syntax) - { - if (sizeflag & DFLAG) - oappend ("data32 "); - else - oappend ("data16 "); - used_prefixes |= PREFIX_DATA; - } - } - - if (need_modrm) - { - FETCH_DATA (info, codep + 1); - mod = (*codep >> 6) & 3; - reg = (*codep >> 3) & 7; - rm = *codep & 7; - } - - if (dp->name == NULL && dp->bytemode1 == FLOATCODE) - { - dofloat (sizeflag); - } - else - { - int index; - if (dp->name == NULL) - { - switch (dp->bytemode1) - { - case USE_GROUPS: - dp = &grps[dp->bytemode2][reg]; - break; - - case USE_PREFIX_USER_TABLE: - index = 0; - used_prefixes |= (prefixes & PREFIX_REPZ); - if (prefixes & PREFIX_REPZ) - index = 1; - else - { - used_prefixes |= (prefixes & PREFIX_DATA); - if (prefixes & PREFIX_DATA) - index = 2; - else - { - used_prefixes |= (prefixes & PREFIX_REPNZ); - if (prefixes & PREFIX_REPNZ) - index = 3; - } - } - dp = &prefix_user_table[dp->bytemode2][index]; - break; - - case X86_64_SPECIAL: - dp = &x86_64_table[dp->bytemode2][mode_64bit]; - break; - - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - break; - } - } - - if (putop (dp->name, sizeflag) == 0) - { - obufp = op1out; - op_ad = 2; - if (dp->op1) - (*dp->op1) (dp->bytemode1, sizeflag); - - obufp = op2out; - op_ad = 1; - if (dp->op2) - (*dp->op2) (dp->bytemode2, sizeflag); - - obufp = op3out; - op_ad = 0; - if (dp->op3) - (*dp->op3) (dp->bytemode3, sizeflag); - } - } - - /* See if any prefixes were not used. If so, print the first one - separately. If we don't do this, we'll wind up printing an - instruction stream which does not precisely correspond to the - bytes we are disassembling. */ - if ((prefixes & ~used_prefixes) != 0) - { - const char *name; - - name = prefix_name (priv.the_buffer[0], priv.orig_sizeflag); - if (name == NULL) - name = INTERNAL_DISASSEMBLER_ERROR; - (*info->fprintf_func) (info->stream, "%s", name); - return 1; - } - if (rex & ~rex_used) - { - const char *name; - name = prefix_name (rex | 0x40, priv.orig_sizeflag); - if (name == NULL) - name = INTERNAL_DISASSEMBLER_ERROR; - (*info->fprintf_func) (info->stream, "%s ", name); - } - - obufp = obuf + strlen (obuf); - for (i = strlen (obuf); i < 6; i++) - oappend (" "); - oappend (" "); - (*info->fprintf_func) (info->stream, "%s", obuf); - - /* The enter and bound instructions are printed with operands in the same - order as the intel book; everything else is printed in reverse order. */ - if (intel_syntax || two_source_ops) - { - first = op1out; - second = op2out; - third = op3out; - op_ad = op_index[0]; - op_index[0] = op_index[2]; - op_index[2] = op_ad; - } - else - { - first = op3out; - second = op2out; - third = op1out; - } - needcomma = 0; - if (*first) - { - if (op_index[0] != -1 && !op_riprel[0]) - (*info->print_address_func) ((bfd_vma) op_address[op_index[0]], info); - else - (*info->fprintf_func) (info->stream, "%s", first); - needcomma = 1; - } - if (*second) - { - if (needcomma) - (*info->fprintf_func) (info->stream, ","); - if (op_index[1] != -1 && !op_riprel[1]) - (*info->print_address_func) ((bfd_vma) op_address[op_index[1]], info); - else - (*info->fprintf_func) (info->stream, "%s", second); - needcomma = 1; - } - if (*third) - { - if (needcomma) - (*info->fprintf_func) (info->stream, ","); - if (op_index[2] != -1 && !op_riprel[2]) - (*info->print_address_func) ((bfd_vma) op_address[op_index[2]], info); - else - (*info->fprintf_func) (info->stream, "%s", third); - } - for (i = 0; i < 3; i++) - if (op_index[i] != -1 && op_riprel[i]) - { - (*info->fprintf_func) (info->stream, " # "); - (*info->print_address_func) ((bfd_vma) (start_pc + codep - start_codep - + op_address[op_index[i]]), info); - } - return codep - priv.the_buffer; -} - -static const char *float_mem[] = { - /* d8 */ - "fadd{s||s|}", - "fmul{s||s|}", - "fcom{s||s|}", - "fcomp{s||s|}", - "fsub{s||s|}", - "fsubr{s||s|}", - "fdiv{s||s|}", - "fdivr{s||s|}", - /* d9 */ - "fld{s||s|}", - "(bad)", - "fst{s||s|}", - "fstp{s||s|}", - "fldenv", - "fldcw", - "fNstenv", - "fNstcw", - /* da */ - "fiadd{l||l|}", - "fimul{l||l|}", - "ficom{l||l|}", - "ficomp{l||l|}", - "fisub{l||l|}", - "fisubr{l||l|}", - "fidiv{l||l|}", - "fidivr{l||l|}", - /* db */ - "fild{l||l|}", - "(bad)", - "fist{l||l|}", - "fistp{l||l|}", - "(bad)", - "fld{t||t|}", - "(bad)", - "fstp{t||t|}", - /* dc */ - "fadd{l||l|}", - "fmul{l||l|}", - "fcom{l||l|}", - "fcomp{l||l|}", - "fsub{l||l|}", - "fsubr{l||l|}", - "fdiv{l||l|}", - "fdivr{l||l|}", - /* dd */ - "fld{l||l|}", - "(bad)", - "fst{l||l|}", - "fstp{l||l|}", - "frstor", - "(bad)", - "fNsave", - "fNstsw", - /* de */ - "fiadd", - "fimul", - "ficom", - "ficomp", - "fisub", - "fisubr", - "fidiv", - "fidivr", - /* df */ - "fild", - "(bad)", - "fist", - "fistp", - "fbld", - "fild{ll||ll|}", - "fbstp", - "fistpll", -}; - -#define ST OP_ST, 0 -#define STi OP_STi, 0 - -#define FGRPd9_2 NULL, NULL, 0, NULL, 0, NULL, 0 -#define FGRPd9_4 NULL, NULL, 1, NULL, 0, NULL, 0 -#define FGRPd9_5 NULL, NULL, 2, NULL, 0, NULL, 0 -#define FGRPd9_6 NULL, NULL, 3, NULL, 0, NULL, 0 -#define FGRPd9_7 NULL, NULL, 4, NULL, 0, NULL, 0 -#define FGRPda_5 NULL, NULL, 5, NULL, 0, NULL, 0 -#define FGRPdb_4 NULL, NULL, 6, NULL, 0, NULL, 0 -#define FGRPde_3 NULL, NULL, 7, NULL, 0, NULL, 0 -#define FGRPdf_4 NULL, NULL, 8, NULL, 0, NULL, 0 - -static const struct dis386 float_reg[][8] = { - /* d8 */ - { - { "fadd", ST, STi, XX }, - { "fmul", ST, STi, XX }, - { "fcom", STi, XX, XX }, - { "fcomp", STi, XX, XX }, - { "fsub", ST, STi, XX }, - { "fsubr", ST, STi, XX }, - { "fdiv", ST, STi, XX }, - { "fdivr", ST, STi, XX }, - }, - /* d9 */ - { - { "fld", STi, XX, XX }, - { "fxch", STi, XX, XX }, - { FGRPd9_2 }, - { "(bad)", XX, XX, XX }, - { FGRPd9_4 }, - { FGRPd9_5 }, - { FGRPd9_6 }, - { FGRPd9_7 }, - }, - /* da */ - { - { "fcmovb", ST, STi, XX }, - { "fcmove", ST, STi, XX }, - { "fcmovbe",ST, STi, XX }, - { "fcmovu", ST, STi, XX }, - { "(bad)", XX, XX, XX }, - { FGRPda_5 }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* db */ - { - { "fcmovnb",ST, STi, XX }, - { "fcmovne",ST, STi, XX }, - { "fcmovnbe",ST, STi, XX }, - { "fcmovnu",ST, STi, XX }, - { FGRPdb_4 }, - { "fucomi", ST, STi, XX }, - { "fcomi", ST, STi, XX }, - { "(bad)", XX, XX, XX }, - }, - /* dc */ - { - { "fadd", STi, ST, XX }, - { "fmul", STi, ST, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, -#if UNIXWARE_COMPAT - { "fsub", STi, ST, XX }, - { "fsubr", STi, ST, XX }, - { "fdiv", STi, ST, XX }, - { "fdivr", STi, ST, XX }, -#else - { "fsubr", STi, ST, XX }, - { "fsub", STi, ST, XX }, - { "fdivr", STi, ST, XX }, - { "fdiv", STi, ST, XX }, -#endif - }, - /* dd */ - { - { "ffree", STi, XX, XX }, - { "(bad)", XX, XX, XX }, - { "fst", STi, XX, XX }, - { "fstp", STi, XX, XX }, - { "fucom", STi, XX, XX }, - { "fucomp", STi, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - }, - /* de */ - { - { "faddp", STi, ST, XX }, - { "fmulp", STi, ST, XX }, - { "(bad)", XX, XX, XX }, - { FGRPde_3 }, -#if UNIXWARE_COMPAT - { "fsubp", STi, ST, XX }, - { "fsubrp", STi, ST, XX }, - { "fdivp", STi, ST, XX }, - { "fdivrp", STi, ST, XX }, -#else - { "fsubrp", STi, ST, XX }, - { "fsubp", STi, ST, XX }, - { "fdivrp", STi, ST, XX }, - { "fdivp", STi, ST, XX }, -#endif - }, - /* df */ - { - { "ffreep", STi, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { "(bad)", XX, XX, XX }, - { FGRPdf_4 }, - { "fucomip",ST, STi, XX }, - { "fcomip", ST, STi, XX }, - { "(bad)", XX, XX, XX }, - }, -}; - -static char *fgrps[][8] = { - /* d9_2 0 */ - { - "fnop","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)", - }, - - /* d9_4 1 */ - { - "fchs","fabs","(bad)","(bad)","ftst","fxam","(bad)","(bad)", - }, - - /* d9_5 2 */ - { - "fld1","fldl2t","fldl2e","fldpi","fldlg2","fldln2","fldz","(bad)", - }, - - /* d9_6 3 */ - { - "f2xm1","fyl2x","fptan","fpatan","fxtract","fprem1","fdecstp","fincstp", - }, - - /* d9_7 4 */ - { - "fprem","fyl2xp1","fsqrt","fsincos","frndint","fscale","fsin","fcos", - }, - - /* da_5 5 */ - { - "(bad)","fucompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)", - }, - - /* db_4 6 */ - { - "feni(287 only)","fdisi(287 only)","fNclex","fNinit", - "fNsetpm(287 only)","(bad)","(bad)","(bad)", - }, - - /* de_3 7 */ - { - "(bad)","fcompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)", - }, - - /* df_4 8 */ - { - "fNstsw","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)", - }, -}; - -static void -dofloat (sizeflag) - int sizeflag; -{ - const struct dis386 *dp; - unsigned char floatop; - - floatop = codep[-1]; - - if (mod != 3) - { - putop (float_mem[(floatop - 0xd8) * 8 + reg], sizeflag); - obufp = op1out; - if (floatop == 0xdb) - OP_E (x_mode, sizeflag); - else if (floatop == 0xdd) - OP_E (d_mode, sizeflag); - else - OP_E (v_mode, sizeflag); - return; - } - /* Skip mod/rm byte. */ - MODRM_CHECK; - codep++; - - dp = &float_reg[floatop - 0xd8][reg]; - if (dp->name == NULL) - { - putop (fgrps[dp->bytemode1][rm], sizeflag); - - /* Instruction fnstsw is only one with strange arg. */ - if (floatop == 0xdf && codep[-1] == 0xe0) - strcpy (op1out, names16[0]); - } - else - { - putop (dp->name, sizeflag); - - obufp = op1out; - if (dp->op1) - (*dp->op1) (dp->bytemode1, sizeflag); - obufp = op2out; - if (dp->op2) - (*dp->op2) (dp->bytemode2, sizeflag); - } -} - -static void -OP_ST (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - oappend ("%st"); -} - -static void -OP_STi (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - sprintf (scratchbuf, "%%st(%d)", rm); - oappend (scratchbuf + intel_syntax); -} - -/* Capital letters in template are macros. */ -static int -putop (template, sizeflag) - const char *template; - int sizeflag; -{ - const char *p; - int alt; - - for (p = template; *p; p++) - { - switch (*p) - { - default: - *obufp++ = *p; - break; - case '{': - alt = 0; - if (intel_syntax) - alt += 1; - if (mode_64bit) - alt += 2; - while (alt != 0) - { - while (*++p != '|') - { - if (*p == '}') - { - /* Alternative not valid. */ - strcpy (obuf, "(bad)"); - obufp = obuf + 5; - return 1; - } - else if (*p == '\0') - abort (); - } - alt--; - } - break; - case '|': - while (*++p != '}') - { - if (*p == '\0') - abort (); - } - break; - case '}': - break; - case 'A': - if (intel_syntax) - break; - if (mod != 3 || (sizeflag & SUFFIX_ALWAYS)) - *obufp++ = 'b'; - break; - case 'B': - if (intel_syntax) - break; - if (sizeflag & SUFFIX_ALWAYS) - *obufp++ = 'b'; - break; - case 'E': /* For jcxz/jecxz */ - if (mode_64bit) - { - if (sizeflag & AFLAG) - *obufp++ = 'r'; - else - *obufp++ = 'e'; - } - else - if (sizeflag & AFLAG) - *obufp++ = 'e'; - used_prefixes |= (prefixes & PREFIX_ADDR); - break; - case 'F': - if (intel_syntax) - break; - if ((prefixes & PREFIX_ADDR) || (sizeflag & SUFFIX_ALWAYS)) - { - if (sizeflag & AFLAG) - *obufp++ = mode_64bit ? 'q' : 'l'; - else - *obufp++ = mode_64bit ? 'l' : 'w'; - used_prefixes |= (prefixes & PREFIX_ADDR); - } - break; - case 'H': - if (intel_syntax) - break; - if ((prefixes & (PREFIX_CS | PREFIX_DS)) == PREFIX_CS - || (prefixes & (PREFIX_CS | PREFIX_DS)) == PREFIX_DS) - { - used_prefixes |= prefixes & (PREFIX_CS | PREFIX_DS); - *obufp++ = ','; - *obufp++ = 'p'; - if (prefixes & PREFIX_DS) - *obufp++ = 't'; - else - *obufp++ = 'n'; - } - break; - case 'L': - if (intel_syntax) - break; - if (sizeflag & SUFFIX_ALWAYS) - *obufp++ = 'l'; - break; - case 'N': - if ((prefixes & PREFIX_FWAIT) == 0) - *obufp++ = 'n'; - else - used_prefixes |= PREFIX_FWAIT; - break; - case 'O': - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - *obufp++ = 'o'; - else - *obufp++ = 'd'; - break; - case 'T': - if (intel_syntax) - break; - if (mode_64bit) - { - *obufp++ = 'q'; - break; - } - /* Fall through. */ - case 'P': - if (intel_syntax) - break; - if ((prefixes & PREFIX_DATA) - || (rex & REX_MODE64) - || (sizeflag & SUFFIX_ALWAYS)) - { - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - *obufp++ = 'q'; - else - { - if (sizeflag & DFLAG) - *obufp++ = 'l'; - else - *obufp++ = 'w'; - used_prefixes |= (prefixes & PREFIX_DATA); - } - } - break; - case 'U': - if (intel_syntax) - break; - if (mode_64bit) - { - *obufp++ = 'q'; - break; - } - /* Fall through. */ - case 'Q': - if (intel_syntax) - break; - USED_REX (REX_MODE64); - if (mod != 3 || (sizeflag & SUFFIX_ALWAYS)) - { - if (rex & REX_MODE64) - *obufp++ = 'q'; - else - { - if (sizeflag & DFLAG) - *obufp++ = 'l'; - else - *obufp++ = 'w'; - used_prefixes |= (prefixes & PREFIX_DATA); - } - } - break; - case 'R': - USED_REX (REX_MODE64); - if (intel_syntax) - { - if (rex & REX_MODE64) - { - *obufp++ = 'q'; - *obufp++ = 't'; - } - else if (sizeflag & DFLAG) - { - *obufp++ = 'd'; - *obufp++ = 'q'; - } - else - { - *obufp++ = 'w'; - *obufp++ = 'd'; - } - } - else - { - if (rex & REX_MODE64) - *obufp++ = 'q'; - else if (sizeflag & DFLAG) - *obufp++ = 'l'; - else - *obufp++ = 'w'; - } - if (!(rex & REX_MODE64)) - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case 'S': - if (intel_syntax) - break; - if (sizeflag & SUFFIX_ALWAYS) - { - if (rex & REX_MODE64) - *obufp++ = 'q'; - else - { - if (sizeflag & DFLAG) - *obufp++ = 'l'; - else - *obufp++ = 'w'; - used_prefixes |= (prefixes & PREFIX_DATA); - } - } - break; - case 'X': - if (prefixes & PREFIX_DATA) - *obufp++ = 'd'; - else - *obufp++ = 's'; - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case 'Y': - if (intel_syntax) - break; - if (rex & REX_MODE64) - { - USED_REX (REX_MODE64); - *obufp++ = 'q'; - } - break; - /* implicit operand size 'l' for i386 or 'q' for x86-64 */ - case 'W': - /* operand size flag for cwtl, cbtw */ - USED_REX (0); - if (rex) - *obufp++ = 'l'; - else if (sizeflag & DFLAG) - *obufp++ = 'w'; - else - *obufp++ = 'b'; - if (intel_syntax) - { - if (rex) - { - *obufp++ = 'q'; - *obufp++ = 'e'; - } - if (sizeflag & DFLAG) - { - *obufp++ = 'd'; - *obufp++ = 'e'; - } - else - { - *obufp++ = 'w'; - } - } - if (!rex) - used_prefixes |= (prefixes & PREFIX_DATA); - break; - } - } - *obufp = 0; - return 0; -} - -static void -oappend (s) - const char *s; -{ - strcpy (obufp, s); - obufp += strlen (s); -} - -static void -append_seg () -{ - if (prefixes & PREFIX_CS) - { - used_prefixes |= PREFIX_CS; - oappend ("%cs:" + intel_syntax); - } - if (prefixes & PREFIX_DS) - { - used_prefixes |= PREFIX_DS; - oappend ("%ds:" + intel_syntax); - } - if (prefixes & PREFIX_SS) - { - used_prefixes |= PREFIX_SS; - oappend ("%ss:" + intel_syntax); - } - if (prefixes & PREFIX_ES) - { - used_prefixes |= PREFIX_ES; - oappend ("%es:" + intel_syntax); - } - if (prefixes & PREFIX_FS) - { - used_prefixes |= PREFIX_FS; - oappend ("%fs:" + intel_syntax); - } - if (prefixes & PREFIX_GS) - { - used_prefixes |= PREFIX_GS; - oappend ("%gs:" + intel_syntax); - } -} - -static void -OP_indirE (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - if (!intel_syntax) - oappend ("*"); - OP_E (bytemode, sizeflag); -} - -static void -print_operand_value (buf, hex, disp) - char *buf; - int hex; - bfd_vma disp; -{ - if (mode_64bit) - { - if (hex) - { - char tmp[30]; - int i; - buf[0] = '0'; - buf[1] = 'x'; - sprintf_vma (tmp, disp); - for (i = 0; tmp[i] == '0' && tmp[i + 1]; i++); - strcpy (buf + 2, tmp + i); - } - else - { - bfd_signed_vma v = disp; - char tmp[30]; - int i; - if (v < 0) - { - *(buf++) = '-'; - v = -disp; - /* Check for possible overflow on 0x8000000000000000. */ - if (v < 0) - { - strcpy (buf, "9223372036854775808"); - return; - } - } - if (!v) - { - strcpy (buf, "0"); - return; - } - - i = 0; - tmp[29] = 0; - while (v) - { - tmp[28 - i] = (v % 10) + '0'; - v /= 10; - i++; - } - strcpy (buf, tmp + 29 - i); - } - } - else - { - if (hex) - sprintf (buf, "0x%x", (unsigned int) disp); - else - sprintf (buf, "%d", (int) disp); - } -} - -static void -OP_E (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - bfd_vma disp; - int add = 0; - int riprel = 0; - USED_REX (REX_EXTZ); - if (rex & REX_EXTZ) - add += 8; - - /* Skip mod/rm byte. */ - MODRM_CHECK; - codep++; - - if (mod == 3) - { - switch (bytemode) - { - case b_mode: - USED_REX (0); - if (rex) - oappend (names8rex[rm + add]); - else - oappend (names8[rm + add]); - break; - case w_mode: - oappend (names16[rm + add]); - break; - case d_mode: - oappend (names32[rm + add]); - break; - case q_mode: - oappend (names64[rm + add]); - break; - case m_mode: - if (mode_64bit) - oappend (names64[rm + add]); - else - oappend (names32[rm + add]); - break; - case v_mode: - case dq_mode: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - oappend (names64[rm + add]); - else if ((sizeflag & DFLAG) || bytemode == dq_mode) - oappend (names32[rm + add]); - else - oappend (names16[rm + add]); - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case 0: - if (!(codep[-2] == 0xAE && codep[-1] == 0xF8 /* sfence */) - && !(codep[-2] == 0xAE && codep[-1] == 0xF0 /* mfence */) - && !(codep[-2] == 0xAE && codep[-1] == 0xe8 /* lfence */)) - BadOp (); /* bad sfence,lea,lds,les,lfs,lgs,lss modrm */ - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - break; - } - return; - } - - disp = 0; - append_seg (); - - if ((sizeflag & AFLAG) || mode_64bit) /* 32 bit address mode */ - { - int havesib; - int havebase; - int base; - int index = 0; - int scale = 0; - - havesib = 0; - havebase = 1; - base = rm; - - if (base == 4) - { - havesib = 1; - FETCH_DATA (the_info, codep + 1); - scale = (*codep >> 6) & 3; - index = (*codep >> 3) & 7; - base = *codep & 7; - USED_REX (REX_EXTY); - USED_REX (REX_EXTZ); - if (rex & REX_EXTY) - index += 8; - if (rex & REX_EXTZ) - base += 8; - codep++; - } - - switch (mod) - { - case 0: - if ((base & 7) == 5) - { - havebase = 0; - if (mode_64bit && !havesib && (sizeflag & AFLAG)) - riprel = 1; - disp = get32s (); - } - break; - case 1: - FETCH_DATA (the_info, codep + 1); - disp = *codep++; - if ((disp & 0x80) != 0) - disp -= 0x100; - break; - case 2: - disp = get32s (); - break; - } - - if (!intel_syntax) - if (mod != 0 || (base & 7) == 5) - { - print_operand_value (scratchbuf, !riprel, disp); - oappend (scratchbuf); - if (riprel) - { - set_op (disp, 1); - oappend ("(%rip)"); - } - } - - if (havebase || (havesib && (index != 4 || scale != 0))) - { - if (intel_syntax) - { - switch (bytemode) - { - case b_mode: - oappend ("BYTE PTR "); - break; - case w_mode: - oappend ("WORD PTR "); - break; - case v_mode: - oappend ("DWORD PTR "); - break; - case d_mode: - oappend ("QWORD PTR "); - break; - case m_mode: - if (mode_64bit) - oappend ("DWORD PTR "); - else - oappend ("QWORD PTR "); - break; - case x_mode: - oappend ("XWORD PTR "); - break; - default: - break; - } - } - *obufp++ = open_char; - if (intel_syntax && riprel) - oappend ("rip + "); - *obufp = '\0'; - USED_REX (REX_EXTZ); - if (!havesib && (rex & REX_EXTZ)) - base += 8; - if (havebase) - oappend (mode_64bit && (sizeflag & AFLAG) - ? names64[base] : names32[base]); - if (havesib) - { - if (index != 4) - { - if (intel_syntax) - { - if (havebase) - { - *obufp++ = separator_char; - *obufp = '\0'; - } - sprintf (scratchbuf, "%s", - mode_64bit && (sizeflag & AFLAG) - ? names64[index] : names32[index]); - } - else - sprintf (scratchbuf, ",%s", - mode_64bit && (sizeflag & AFLAG) - ? names64[index] : names32[index]); - oappend (scratchbuf); - } - if (!intel_syntax - || (intel_syntax - && bytemode != b_mode - && bytemode != w_mode - && bytemode != v_mode)) - { - *obufp++ = scale_char; - *obufp = '\0'; - sprintf (scratchbuf, "%d", 1 << scale); - oappend (scratchbuf); - } - } - if (intel_syntax) - if (mod != 0 || (base & 7) == 5) - { - /* Don't print zero displacements. */ - if (disp != 0) - { - if ((bfd_signed_vma) disp > 0) - { - *obufp++ = '+'; - *obufp = '\0'; - } - - print_operand_value (scratchbuf, 0, disp); - oappend (scratchbuf); - } - } - - *obufp++ = close_char; - *obufp = '\0'; - } - else if (intel_syntax) - { - if (mod != 0 || (base & 7) == 5) - { - if (prefixes & (PREFIX_CS | PREFIX_SS | PREFIX_DS - | PREFIX_ES | PREFIX_FS | PREFIX_GS)) - ; - else - { - oappend (names_seg[ds_reg - es_reg]); - oappend (":"); - } - print_operand_value (scratchbuf, 1, disp); - oappend (scratchbuf); - } - } - } - else - { /* 16 bit address mode */ - switch (mod) - { - case 0: - if ((rm & 7) == 6) - { - disp = get16 (); - if ((disp & 0x8000) != 0) - disp -= 0x10000; - } - break; - case 1: - FETCH_DATA (the_info, codep + 1); - disp = *codep++; - if ((disp & 0x80) != 0) - disp -= 0x100; - break; - case 2: - disp = get16 (); - if ((disp & 0x8000) != 0) - disp -= 0x10000; - break; - } - - if (!intel_syntax) - if (mod != 0 || (rm & 7) == 6) - { - print_operand_value (scratchbuf, 0, disp); - oappend (scratchbuf); - } - - if (mod != 0 || (rm & 7) != 6) - { - *obufp++ = open_char; - *obufp = '\0'; - oappend (index16[rm + add]); - *obufp++ = close_char; - *obufp = '\0'; - } - } -} - -static void -OP_G (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - int add = 0; - USED_REX (REX_EXTX); - if (rex & REX_EXTX) - add += 8; - switch (bytemode) - { - case b_mode: - USED_REX (0); - if (rex) - oappend (names8rex[reg + add]); - else - oappend (names8[reg + add]); - break; - case w_mode: - oappend (names16[reg + add]); - break; - case d_mode: - oappend (names32[reg + add]); - break; - case q_mode: - oappend (names64[reg + add]); - break; - case v_mode: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - oappend (names64[reg + add]); - else if (sizeflag & DFLAG) - oappend (names32[reg + add]); - else - oappend (names16[reg + add]); - used_prefixes |= (prefixes & PREFIX_DATA); - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - break; - } -} - -static bfd_vma -get64 () -{ - bfd_vma x; -#ifdef BFD64 - unsigned int a; - unsigned int b; - - FETCH_DATA (the_info, codep + 8); - a = *codep++ & 0xff; - a |= (*codep++ & 0xff) << 8; - a |= (*codep++ & 0xff) << 16; - a |= (*codep++ & 0xff) << 24; - b = *codep++ & 0xff; - b |= (*codep++ & 0xff) << 8; - b |= (*codep++ & 0xff) << 16; - b |= (*codep++ & 0xff) << 24; - x = a + ((bfd_vma) b << 32); -#else - abort (); - x = 0; -#endif - return x; -} - -static bfd_signed_vma -get32 () -{ - bfd_signed_vma x = 0; - - FETCH_DATA (the_info, codep + 4); - x = *codep++ & (bfd_signed_vma) 0xff; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 8; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 16; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 24; - return x; -} - -static bfd_signed_vma -get32s () -{ - bfd_signed_vma x = 0; - - FETCH_DATA (the_info, codep + 4); - x = *codep++ & (bfd_signed_vma) 0xff; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 8; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 16; - x |= (*codep++ & (bfd_signed_vma) 0xff) << 24; - - x = (x ^ ((bfd_signed_vma) 1 << 31)) - ((bfd_signed_vma) 1 << 31); - - return x; -} - -static int -get16 () -{ - int x = 0; - - FETCH_DATA (the_info, codep + 2); - x = *codep++ & 0xff; - x |= (*codep++ & 0xff) << 8; - return x; -} - -static void -set_op (op, riprel) - bfd_vma op; - int riprel; -{ - op_index[op_ad] = op_ad; - if (mode_64bit) - { - op_address[op_ad] = op; - op_riprel[op_ad] = riprel; - } - else - { - /* Mask to get a 32-bit address. */ - op_address[op_ad] = op & 0xffffffff; - op_riprel[op_ad] = riprel & 0xffffffff; - } -} - -static void -OP_REG (code, sizeflag) - int code; - int sizeflag; -{ - const char *s; - int add = 0; - USED_REX (REX_EXTZ); - if (rex & REX_EXTZ) - add = 8; - - switch (code) - { - case indir_dx_reg: - if (intel_syntax) - s = "[dx]"; - else - s = "(%dx)"; - break; - case ax_reg: case cx_reg: case dx_reg: case bx_reg: - case sp_reg: case bp_reg: case si_reg: case di_reg: - s = names16[code - ax_reg + add]; - break; - case es_reg: case ss_reg: case cs_reg: - case ds_reg: case fs_reg: case gs_reg: - s = names_seg[code - es_reg + add]; - break; - case al_reg: case ah_reg: case cl_reg: case ch_reg: - case dl_reg: case dh_reg: case bl_reg: case bh_reg: - USED_REX (0); - if (rex) - s = names8rex[code - al_reg + add]; - else - s = names8[code - al_reg]; - break; - case rAX_reg: case rCX_reg: case rDX_reg: case rBX_reg: - case rSP_reg: case rBP_reg: case rSI_reg: case rDI_reg: - if (mode_64bit) - { - s = names64[code - rAX_reg + add]; - break; - } - code += eAX_reg - rAX_reg; - /* Fall through. */ - case eAX_reg: case eCX_reg: case eDX_reg: case eBX_reg: - case eSP_reg: case eBP_reg: case eSI_reg: case eDI_reg: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - s = names64[code - eAX_reg + add]; - else if (sizeflag & DFLAG) - s = names32[code - eAX_reg + add]; - else - s = names16[code - eAX_reg + add]; - used_prefixes |= (prefixes & PREFIX_DATA); - break; - default: - s = INTERNAL_DISASSEMBLER_ERROR; - break; - } - oappend (s); -} - -static void -OP_IMREG (code, sizeflag) - int code; - int sizeflag; -{ - const char *s; - - switch (code) - { - case indir_dx_reg: - if (intel_syntax) - s = "[dx]"; - else - s = "(%dx)"; - break; - case ax_reg: case cx_reg: case dx_reg: case bx_reg: - case sp_reg: case bp_reg: case si_reg: case di_reg: - s = names16[code - ax_reg]; - break; - case es_reg: case ss_reg: case cs_reg: - case ds_reg: case fs_reg: case gs_reg: - s = names_seg[code - es_reg]; - break; - case al_reg: case ah_reg: case cl_reg: case ch_reg: - case dl_reg: case dh_reg: case bl_reg: case bh_reg: - USED_REX (0); - if (rex) - s = names8rex[code - al_reg]; - else - s = names8[code - al_reg]; - break; - case eAX_reg: case eCX_reg: case eDX_reg: case eBX_reg: - case eSP_reg: case eBP_reg: case eSI_reg: case eDI_reg: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - s = names64[code - eAX_reg]; - else if (sizeflag & DFLAG) - s = names32[code - eAX_reg]; - else - s = names16[code - eAX_reg]; - used_prefixes |= (prefixes & PREFIX_DATA); - break; - default: - s = INTERNAL_DISASSEMBLER_ERROR; - break; - } - oappend (s); -} - -static void -OP_I (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - bfd_signed_vma op; - bfd_signed_vma mask = -1; - - switch (bytemode) - { - case b_mode: - FETCH_DATA (the_info, codep + 1); - op = *codep++; - mask = 0xff; - break; - case q_mode: - if (mode_64bit) - { - op = get32s (); - break; - } - /* Fall through. */ - case v_mode: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - op = get32s (); - else if (sizeflag & DFLAG) - { - op = get32 (); - mask = 0xffffffff; - } - else - { - op = get16 (); - mask = 0xfffff; - } - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case w_mode: - mask = 0xfffff; - op = get16 (); - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - return; - } - - op &= mask; - scratchbuf[0] = '$'; - print_operand_value (scratchbuf + 1, 1, op); - oappend (scratchbuf + intel_syntax); - scratchbuf[0] = '\0'; -} - -static void -OP_I64 (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - bfd_signed_vma op; - bfd_signed_vma mask = -1; - - if (!mode_64bit) - { - OP_I (bytemode, sizeflag); - return; - } - - switch (bytemode) - { - case b_mode: - FETCH_DATA (the_info, codep + 1); - op = *codep++; - mask = 0xff; - break; - case v_mode: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - op = get64 (); - else if (sizeflag & DFLAG) - { - op = get32 (); - mask = 0xffffffff; - } - else - { - op = get16 (); - mask = 0xfffff; - } - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case w_mode: - mask = 0xfffff; - op = get16 (); - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - return; - } - - op &= mask; - scratchbuf[0] = '$'; - print_operand_value (scratchbuf + 1, 1, op); - oappend (scratchbuf + intel_syntax); - scratchbuf[0] = '\0'; -} - -static void -OP_sI (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - bfd_signed_vma op; - bfd_signed_vma mask = -1; - - switch (bytemode) - { - case b_mode: - FETCH_DATA (the_info, codep + 1); - op = *codep++; - if ((op & 0x80) != 0) - op -= 0x100; - mask = 0xffffffff; - break; - case v_mode: - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - op = get32s (); - else if (sizeflag & DFLAG) - { - op = get32s (); - mask = 0xffffffff; - } - else - { - mask = 0xffffffff; - op = get16 (); - if ((op & 0x8000) != 0) - op -= 0x10000; - } - used_prefixes |= (prefixes & PREFIX_DATA); - break; - case w_mode: - op = get16 (); - mask = 0xffffffff; - if ((op & 0x8000) != 0) - op -= 0x10000; - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - return; - } - - scratchbuf[0] = '$'; - print_operand_value (scratchbuf + 1, 1, op); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_J (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - bfd_vma disp; - bfd_vma mask = -1; - - switch (bytemode) - { - case b_mode: - FETCH_DATA (the_info, codep + 1); - disp = *codep++; - if ((disp & 0x80) != 0) - disp -= 0x100; - break; - case v_mode: - if (sizeflag & DFLAG) - disp = get32s (); - else - { - disp = get16 (); - /* For some reason, a data16 prefix on a jump instruction - means that the pc is masked to 16 bits after the - displacement is added! */ - mask = 0xffff; - } - break; - default: - oappend (INTERNAL_DISASSEMBLER_ERROR); - return; - } - disp = (start_pc + codep - start_codep + disp) & mask; - set_op (disp, 0); - print_operand_value (scratchbuf, 1, disp); - oappend (scratchbuf); -} - -static void -OP_SEG (dummy, sizeflag) - int dummy ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - oappend (names_seg[reg]); -} - -static void -OP_DIR (dummy, sizeflag) - int dummy ATTRIBUTE_UNUSED; - int sizeflag; -{ - int seg, offset; - - if (sizeflag & DFLAG) - { - offset = get32 (); - seg = get16 (); - } - else - { - offset = get16 (); - seg = get16 (); - } - used_prefixes |= (prefixes & PREFIX_DATA); - if (intel_syntax) - sprintf (scratchbuf, "0x%x,0x%x", seg, offset); - else - sprintf (scratchbuf, "$0x%x,$0x%x", seg, offset); - oappend (scratchbuf); -} - -static void -OP_OFF (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag; -{ - bfd_vma off; - - append_seg (); - - if ((sizeflag & AFLAG) || mode_64bit) - off = get32 (); - else - off = get16 (); - - if (intel_syntax) - { - if (!(prefixes & (PREFIX_CS | PREFIX_SS | PREFIX_DS - | PREFIX_ES | PREFIX_FS | PREFIX_GS))) - { - oappend (names_seg[ds_reg - es_reg]); - oappend (":"); - } - } - print_operand_value (scratchbuf, 1, off); - oappend (scratchbuf); -} - -static void -OP_OFF64 (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - bfd_vma off; - - if (!mode_64bit) - { - OP_OFF (bytemode, sizeflag); - return; - } - - append_seg (); - - off = get64 (); - - if (intel_syntax) - { - if (!(prefixes & (PREFIX_CS | PREFIX_SS | PREFIX_DS - | PREFIX_ES | PREFIX_FS | PREFIX_GS))) - { - oappend (names_seg[ds_reg - es_reg]); - oappend (":"); - } - } - print_operand_value (scratchbuf, 1, off); - oappend (scratchbuf); -} - -static void -ptr_reg (code, sizeflag) - int code; - int sizeflag; -{ - const char *s; - if (intel_syntax) - oappend ("["); - else - oappend ("("); - - USED_REX (REX_MODE64); - if (rex & REX_MODE64) - { - if (!(sizeflag & AFLAG)) - s = names32[code - eAX_reg]; - else - s = names64[code - eAX_reg]; - } - else if (sizeflag & AFLAG) - s = names32[code - eAX_reg]; - else - s = names16[code - eAX_reg]; - oappend (s); - if (intel_syntax) - oappend ("]"); - else - oappend (")"); -} - -static void -OP_ESreg (code, sizeflag) - int code; - int sizeflag; -{ - oappend ("%es:" + intel_syntax); - ptr_reg (code, sizeflag); -} - -static void -OP_DSreg (code, sizeflag) - int code; - int sizeflag; -{ - if ((prefixes - & (PREFIX_CS - | PREFIX_DS - | PREFIX_SS - | PREFIX_ES - | PREFIX_FS - | PREFIX_GS)) == 0) - prefixes |= PREFIX_DS; - append_seg (); - ptr_reg (code, sizeflag); -} - -static void -OP_C (dummy, sizeflag) - int dummy ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - int add = 0; - USED_REX (REX_EXTX); - if (rex & REX_EXTX) - add = 8; - sprintf (scratchbuf, "%%cr%d", reg + add); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_D (dummy, sizeflag) - int dummy ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - int add = 0; - USED_REX (REX_EXTX); - if (rex & REX_EXTX) - add = 8; - if (intel_syntax) - sprintf (scratchbuf, "db%d", reg + add); - else - sprintf (scratchbuf, "%%db%d", reg + add); - oappend (scratchbuf); -} - -static void -OP_T (dummy, sizeflag) - int dummy ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - sprintf (scratchbuf, "%%tr%d", reg); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_Rd (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - if (mod == 3) - OP_E (bytemode, sizeflag); - else - BadOp (); -} - -static void -OP_MMX (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - int add = 0; - USED_REX (REX_EXTX); - if (rex & REX_EXTX) - add = 8; - used_prefixes |= (prefixes & PREFIX_DATA); - if (prefixes & PREFIX_DATA) - sprintf (scratchbuf, "%%xmm%d", reg + add); - else - sprintf (scratchbuf, "%%mm%d", reg + add); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_XMM (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - int add = 0; - USED_REX (REX_EXTX); - if (rex & REX_EXTX) - add = 8; - sprintf (scratchbuf, "%%xmm%d", reg + add); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_EM (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - int add = 0; - if (mod != 3) - { - OP_E (bytemode, sizeflag); - return; - } - USED_REX (REX_EXTZ); - if (rex & REX_EXTZ) - add = 8; - - /* Skip mod/rm byte. */ - MODRM_CHECK; - codep++; - used_prefixes |= (prefixes & PREFIX_DATA); - if (prefixes & PREFIX_DATA) - sprintf (scratchbuf, "%%xmm%d", rm + add); - else - sprintf (scratchbuf, "%%mm%d", rm + add); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_EX (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - int add = 0; - if (mod != 3) - { - OP_E (bytemode, sizeflag); - return; - } - USED_REX (REX_EXTZ); - if (rex & REX_EXTZ) - add = 8; - - /* Skip mod/rm byte. */ - MODRM_CHECK; - codep++; - sprintf (scratchbuf, "%%xmm%d", rm + add); - oappend (scratchbuf + intel_syntax); -} - -static void -OP_MS (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - if (mod == 3) - OP_EM (bytemode, sizeflag); - else - BadOp (); -} - -static void -OP_XS (bytemode, sizeflag) - int bytemode; - int sizeflag; -{ - if (mod == 3) - OP_EX (bytemode, sizeflag); - else - BadOp (); -} - -static const char *Suffix3DNow[] = { -/* 00 */ NULL, NULL, NULL, NULL, -/* 04 */ NULL, NULL, NULL, NULL, -/* 08 */ NULL, NULL, NULL, NULL, -/* 0C */ "pi2fw", "pi2fd", NULL, NULL, -/* 10 */ NULL, NULL, NULL, NULL, -/* 14 */ NULL, NULL, NULL, NULL, -/* 18 */ NULL, NULL, NULL, NULL, -/* 1C */ "pf2iw", "pf2id", NULL, NULL, -/* 20 */ NULL, NULL, NULL, NULL, -/* 24 */ NULL, NULL, NULL, NULL, -/* 28 */ NULL, NULL, NULL, NULL, -/* 2C */ NULL, NULL, NULL, NULL, -/* 30 */ NULL, NULL, NULL, NULL, -/* 34 */ NULL, NULL, NULL, NULL, -/* 38 */ NULL, NULL, NULL, NULL, -/* 3C */ NULL, NULL, NULL, NULL, -/* 40 */ NULL, NULL, NULL, NULL, -/* 44 */ NULL, NULL, NULL, NULL, -/* 48 */ NULL, NULL, NULL, NULL, -/* 4C */ NULL, NULL, NULL, NULL, -/* 50 */ NULL, NULL, NULL, NULL, -/* 54 */ NULL, NULL, NULL, NULL, -/* 58 */ NULL, NULL, NULL, NULL, -/* 5C */ NULL, NULL, NULL, NULL, -/* 60 */ NULL, NULL, NULL, NULL, -/* 64 */ NULL, NULL, NULL, NULL, -/* 68 */ NULL, NULL, NULL, NULL, -/* 6C */ NULL, NULL, NULL, NULL, -/* 70 */ NULL, NULL, NULL, NULL, -/* 74 */ NULL, NULL, NULL, NULL, -/* 78 */ NULL, NULL, NULL, NULL, -/* 7C */ NULL, NULL, NULL, NULL, -/* 80 */ NULL, NULL, NULL, NULL, -/* 84 */ NULL, NULL, NULL, NULL, -/* 88 */ NULL, NULL, "pfnacc", NULL, -/* 8C */ NULL, NULL, "pfpnacc", NULL, -/* 90 */ "pfcmpge", NULL, NULL, NULL, -/* 94 */ "pfmin", NULL, "pfrcp", "pfrsqrt", -/* 98 */ NULL, NULL, "pfsub", NULL, -/* 9C */ NULL, NULL, "pfadd", NULL, -/* A0 */ "pfcmpgt", NULL, NULL, NULL, -/* A4 */ "pfmax", NULL, "pfrcpit1", "pfrsqit1", -/* A8 */ NULL, NULL, "pfsubr", NULL, -/* AC */ NULL, NULL, "pfacc", NULL, -/* B0 */ "pfcmpeq", NULL, NULL, NULL, -/* B4 */ "pfmul", NULL, "pfrcpit2", "pfmulhrw", -/* B8 */ NULL, NULL, NULL, "pswapd", -/* BC */ NULL, NULL, NULL, "pavgusb", -/* C0 */ NULL, NULL, NULL, NULL, -/* C4 */ NULL, NULL, NULL, NULL, -/* C8 */ NULL, NULL, NULL, NULL, -/* CC */ NULL, NULL, NULL, NULL, -/* D0 */ NULL, NULL, NULL, NULL, -/* D4 */ NULL, NULL, NULL, NULL, -/* D8 */ NULL, NULL, NULL, NULL, -/* DC */ NULL, NULL, NULL, NULL, -/* E0 */ NULL, NULL, NULL, NULL, -/* E4 */ NULL, NULL, NULL, NULL, -/* E8 */ NULL, NULL, NULL, NULL, -/* EC */ NULL, NULL, NULL, NULL, -/* F0 */ NULL, NULL, NULL, NULL, -/* F4 */ NULL, NULL, NULL, NULL, -/* F8 */ NULL, NULL, NULL, NULL, -/* FC */ NULL, NULL, NULL, NULL, -}; - -static void -OP_3DNowSuffix (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - const char *mnemonic; - - FETCH_DATA (the_info, codep + 1); - /* AMD 3DNow! instructions are specified by an opcode suffix in the - place where an 8-bit immediate would normally go. ie. the last - byte of the instruction. */ - obufp = obuf + strlen (obuf); - mnemonic = Suffix3DNow[*codep++ & 0xff]; - if (mnemonic) - oappend (mnemonic); - else - { - /* Since a variable sized modrm/sib chunk is between the start - of the opcode (0x0f0f) and the opcode suffix, we need to do - all the modrm processing first, and don't know until now that - we have a bad opcode. This necessitates some cleaning up. */ - op1out[0] = '\0'; - op2out[0] = '\0'; - BadOp (); - } -} - -static const char *simd_cmp_op[] = { - "eq", - "lt", - "le", - "unord", - "neq", - "nlt", - "nle", - "ord" -}; - -static void -OP_SIMD_Suffix (bytemode, sizeflag) - int bytemode ATTRIBUTE_UNUSED; - int sizeflag ATTRIBUTE_UNUSED; -{ - unsigned int cmp_type; - - FETCH_DATA (the_info, codep + 1); - obufp = obuf + strlen (obuf); - cmp_type = *codep++ & 0xff; - if (cmp_type < 8) - { - char suffix1 = 'p', suffix2 = 's'; - used_prefixes |= (prefixes & PREFIX_REPZ); - if (prefixes & PREFIX_REPZ) - suffix1 = 's'; - else - { - used_prefixes |= (prefixes & PREFIX_DATA); - if (prefixes & PREFIX_DATA) - suffix2 = 'd'; - else - { - used_prefixes |= (prefixes & PREFIX_REPNZ); - if (prefixes & PREFIX_REPNZ) - suffix1 = 's', suffix2 = 'd'; - } - } - sprintf (scratchbuf, "cmp%s%c%c", - simd_cmp_op[cmp_type], suffix1, suffix2); - used_prefixes |= (prefixes & PREFIX_REPZ); - oappend (scratchbuf); - } - else - { - /* We have a bad extension byte. Clean up. */ - op1out[0] = '\0'; - op2out[0] = '\0'; - BadOp (); - } -} - -static void -SIMD_Fixup (extrachar, sizeflag) - int extrachar; - int sizeflag ATTRIBUTE_UNUSED; -{ - /* Change movlps/movhps to movhlps/movlhps for 2 register operand - forms of these instructions. */ - if (mod == 3) - { - char *p = obuf + strlen (obuf); - *(p + 1) = '\0'; - *p = *(p - 1); - *(p - 1) = *(p - 2); - *(p - 2) = *(p - 3); - *(p - 3) = extrachar; - } -} - -static void -BadOp (void) -{ - /* Throw away prefixes and 1st. opcode byte. */ - codep = insn_codep + 1; - oappend ("(bad)"); -} diff --git a/cxmon/src/disass/m68k-dis.c b/cxmon/src/disass/m68k-dis.c deleted file mode 100644 index 3e10c8c2f..000000000 --- a/cxmon/src/disass/m68k-dis.c +++ /dev/null @@ -1,1248 +0,0 @@ -/* Print Motorola 68k instructions. - Copyright 1986, 87, 89, 91, 92, 93, 94, 95, 96, 97, 1998 - Free Software Foundation, Inc. - -This file 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 -#include "dis-asm.h" -#include "floatformat.h" -#include "opintl.h" - -#include "m68k.h" - -/* Local function prototypes */ - -static int -fetch_data PARAMS ((struct disassemble_info *, bfd_byte *)); - -static void -dummy_print_address PARAMS ((bfd_vma, struct disassemble_info *)); - -static int -fetch_arg PARAMS ((unsigned char *, int, int, disassemble_info *)); - -static void -print_base PARAMS ((int, bfd_vma, disassemble_info*)); - -static unsigned char * -print_indexed PARAMS ((int, unsigned char *, bfd_vma, disassemble_info *)); - -static int -print_insn_arg PARAMS ((const char *, unsigned char *, unsigned char *, - bfd_vma, disassemble_info *)); - -CONST char * CONST fpcr_names[] = { - "", "fpiar", "fpsr", "fpiar/fpsr", "fpcr", - "fpiar/fpcr", "fpsr/fpcr", "fpiar/fpsr/fpcr"}; - -static char *const reg_names[] = { - "d0", "d1", "d2", "d3", "d4", "d5", "d6", "d7", - "a0", "a1", "a2", "a3", "a4", "a5", "a6", "a7", - "sr", "pc"}; - -/* Sign-extend an (unsigned char). */ -#if __STDC__ == 1 -#define COERCE_SIGNED_CHAR(ch) ((signed char)(ch)) -#else -#define COERCE_SIGNED_CHAR(ch) ((int)(((ch) ^ 0x80) & 0xFF) - 128) -#endif - -/* Get a 1 byte signed integer. */ -#define NEXTBYTE(p) (p += 2, FETCH_DATA (info, p), COERCE_SIGNED_CHAR(p[-1])) - -/* Get a 2 byte signed integer. */ -#define COERCE16(x) ((int) (((x) ^ 0x8000) - 0x8000)) -#define NEXTWORD(p) \ - (p += 2, FETCH_DATA (info, p), \ - COERCE16 ((p[-2] << 8) + p[-1])) - -/* Get a 4 byte signed integer. */ -#define COERCE32(x) ((bfd_signed_vma) ((x) ^ 0x80000000) - 0x80000000) -#define NEXTLONG(p) \ - (p += 4, FETCH_DATA (info, p), \ - (COERCE32 ((((((p[-4] << 8) + p[-3]) << 8) + p[-2]) << 8) + p[-1]))) - -/* Get a 4 byte unsigned integer. */ -#define NEXTULONG(p) \ - (p += 4, FETCH_DATA (info, p), \ - (unsigned int) ((((((p[-4] << 8) + p[-3]) << 8) + p[-2]) << 8) + p[-1])) - -/* Get a single precision float. */ -#define NEXTSINGLE(val, p) \ - (p += 4, FETCH_DATA (info, p), \ - floatformat_to_double (&floatformat_ieee_single_big, (char *) p - 4, &val)) - -/* Get a double precision float. */ -#define NEXTDOUBLE(val, p) \ - (p += 8, FETCH_DATA (info, p), \ - floatformat_to_double (&floatformat_ieee_double_big, (char *) p - 8, &val)) - -/* Get an extended precision float. */ -#define NEXTEXTEND(val, p) \ - (p += 12, FETCH_DATA (info, p), \ - floatformat_to_double (&floatformat_m68881_ext, (char *) p - 12, &val)) - -/* Need a function to convert from packed to double - precision. Actually, it's easier to print a - packed number than a double anyway, so maybe - there should be a special case to handle this... */ -#define NEXTPACKED(p) \ - (p += 12, FETCH_DATA (info, p), 0.0) - - -/* Maximum length of an instruction. */ -#define MAXLEN 22 - -#include - -struct private -{ - /* Points to first byte not fetched. */ - bfd_byte *max_fetched; - bfd_byte the_buffer[MAXLEN]; - bfd_vma insn_start; - jmp_buf bailout; -}; - -/* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive) - to ADDR (exclusive) are valid. Returns 1 for success, longjmps - on error. */ -#define FETCH_DATA(info, addr) \ - ((addr) <= ((struct private *)(info->private_data))->max_fetched \ - ? 1 : fetch_data ((info), (addr))) - -static int -fetch_data (info, addr) - struct disassemble_info *info; - bfd_byte *addr; -{ - int status; - struct private *priv = (struct private *)info->private_data; - bfd_vma start = priv->insn_start + (priv->max_fetched - priv->the_buffer); - - status = (*info->read_memory_func) (start, - priv->max_fetched, - addr - priv->max_fetched, - info); - if (status != 0) - { - (*info->memory_error_func) (status, start, info); - longjmp (priv->bailout, 1); - } - else - priv->max_fetched = addr; - return 1; -} - -/* This function is used to print to the bit-bucket. */ -static int -#ifdef __STDC__ -dummy_printer (FILE * file, const char * format, ...) -#else -dummy_printer (file) FILE *file; -#endif - { return 0; } - -static void -dummy_print_address (vma, info) - bfd_vma vma; - struct disassemble_info *info; -{ -} - -/* Print the m68k instruction at address MEMADDR in debugged memory, - on INFO->STREAM. Returns length of the instruction, in bytes. */ - -int -print_insn_m68k (memaddr, info) - bfd_vma memaddr; - disassemble_info *info; -{ - register int i; - register unsigned char *p; - unsigned char *save_p; - register const char *d; - register unsigned long bestmask; - const struct m68k_opcode *best = 0; - unsigned int arch_mask; - struct private priv; - bfd_byte *buffer = priv.the_buffer; - fprintf_ftype save_printer = info->fprintf_func; - void (*save_print_address) PARAMS((bfd_vma, struct disassemble_info*)) - = info->print_address_func; - int major_opcode; - static int numopcodes[16]; - static const struct m68k_opcode **opcodes[16]; - - if (!opcodes[0]) - { - /* Speed up the matching by sorting the opcode table on the upper - four bits of the opcode. */ - const struct m68k_opcode **opc_pointer[16]; - - /* First count how many opcodes are in each of the sixteen buckets. */ - for (i = 0; i < m68k_numopcodes; i++) - numopcodes[(m68k_opcodes[i].opcode >> 28) & 15]++; - - /* Then create a sorted table of pointers that point into the - unsorted table. */ - opc_pointer[0] = ((const struct m68k_opcode **) - malloc (sizeof (struct m68k_opcode *) - * m68k_numopcodes)); - opcodes[0] = opc_pointer[0]; - for (i = 1; i < 16; i++) - { - opc_pointer[i] = opc_pointer[i - 1] + numopcodes[i - 1]; - opcodes[i] = opc_pointer[i]; - } - - for (i = 0; i < m68k_numopcodes; i++) - *opc_pointer[(m68k_opcodes[i].opcode >> 28) & 15]++ = &m68k_opcodes[i]; - - } - - info->private_data = (PTR) &priv; - /* Tell objdump to use two bytes per chunk and six bytes per line for - displaying raw data. */ - info->bytes_per_chunk = 2; - info->bytes_per_line = 6; - info->display_endian = BFD_ENDIAN_BIG; - priv.max_fetched = priv.the_buffer; - priv.insn_start = memaddr; - if (setjmp (priv.bailout) != 0) - /* Error return. */ - return -1; - - switch (info->mach) - { - default: - case 0: - arch_mask = (unsigned int) -1; - break; - case bfd_mach_m68000: - arch_mask = m68000; - break; - case bfd_mach_m68008: - arch_mask = m68008; - break; - case bfd_mach_m68010: - arch_mask = m68010; - break; - case bfd_mach_m68020: - arch_mask = m68020; - break; - case bfd_mach_m68030: - arch_mask = m68030; - break; - case bfd_mach_m68040: - arch_mask = m68040; - break; - case bfd_mach_m68060: - arch_mask = m68060; - break; - } - - arch_mask |= m68881 | m68851; - - bestmask = 0; - FETCH_DATA (info, buffer + 2); - major_opcode = (buffer[0] >> 4) & 15; - for (i = 0; i < numopcodes[major_opcode]; i++) - { - const struct m68k_opcode *opc = opcodes[major_opcode][i]; - unsigned long opcode = opc->opcode; - unsigned long match = opc->match; - - if (((0xff & buffer[0] & (match >> 24)) == (0xff & (opcode >> 24))) - && ((0xff & buffer[1] & (match >> 16)) == (0xff & (opcode >> 16))) - /* Only fetch the next two bytes if we need to. */ - && (((0xffff & match) == 0) - || - (FETCH_DATA (info, buffer + 4) - && ((0xff & buffer[2] & (match >> 8)) == (0xff & (opcode >> 8))) - && ((0xff & buffer[3] & match) == (0xff & opcode))) - ) - && (opc->arch & arch_mask) != 0) - { - /* Don't use for printout the variants of divul and divsl - that have the same register number in two places. - The more general variants will match instead. */ - for (d = opc->args; *d; d += 2) - if (d[1] == 'D') - break; - - /* Don't use for printout the variants of most floating - point coprocessor instructions which use the same - register number in two places, as above. */ - if (*d == '\0') - for (d = opc->args; *d; d += 2) - if (d[1] == 't') - break; - - /* Don't match fmovel with more than one register; wait for - fmoveml. */ - if (*d == '\0') - { - for (d = opc->args; *d; d += 2) - { - if (d[0] == 's' && d[1] == '8') - { - int val; - - val = fetch_arg (buffer, d[1], 3, info); - if ((val & (val - 1)) != 0) - break; - } - } - } - - if (*d == '\0' && match > bestmask) - { - best = opc; - bestmask = match; - } - } - } - - if (best == 0) - goto invalid; - - /* Point at first word of argument data, - and at descriptor for first argument. */ - p = buffer + 2; - - /* Figure out how long the fixed-size portion of the instruction is. - The only place this is stored in the opcode table is - in the arguments--look for arguments which specify fields in the 2nd - or 3rd words of the instruction. */ - for (d = best->args; *d; d += 2) - { - /* I don't think it is necessary to be checking d[0] here; I suspect - all this could be moved to the case statement below. */ - if (d[0] == '#') - { - if (d[1] == 'l' && p - buffer < 6) - p = buffer + 6; - else if (p - buffer < 4 && d[1] != 'C' && d[1] != '8' ) - p = buffer + 4; - } - if ((d[0] == 'L' || d[0] == 'l') && d[1] == 'w' && p - buffer < 4) - p = buffer + 4; - switch (d[1]) - { - case '1': - case '2': - case '3': - case '7': - case '8': - case '9': - case 'i': - if (p - buffer < 4) - p = buffer + 4; - break; - case '4': - case '5': - case '6': - if (p - buffer < 6) - p = buffer + 6; - break; - default: - break; - } - } - - /* pflusha is an exceptions. It takes no arguments but is two words - long. Recognize it by looking at the lower 16 bits of the mask. */ - if (p - buffer < 4 && (best->match & 0xFFFF) != 0) - p = buffer + 4; - - /* lpstop is another exception. It takes a one word argument but is - three words long. */ - if (p - buffer < 6 - && (best->match & 0xffff) == 0xffff - && best->args[0] == '#' - && best->args[1] == 'w') - { - /* Copy the one word argument into the usual location for a one - word argument, to simplify printing it. We can get away with - this because we know exactly what the second word is, and we - aren't going to print anything based on it. */ - p = buffer + 6; - FETCH_DATA (info, p); - buffer[2] = buffer[4]; - buffer[3] = buffer[5]; - } - - FETCH_DATA (info, p); - - d = best->args; - - /* We can the operands twice. The first time we don't print anything, - but look for errors. */ - - save_p = p; - info->print_address_func = dummy_print_address; - info->fprintf_func = (fprintf_ftype)dummy_printer; - for ( ; *d; d += 2) - { - int eaten = print_insn_arg (d, buffer, p, memaddr + (p - buffer), info); - if (eaten >= 0) - p += eaten; - else if (eaten == -1) - goto invalid; - else - { - (*info->fprintf_func)(info->stream, - /* xgettext:c-format */ - _("\n"), - best->name, - best->args); - goto invalid; - } - - } - p = save_p; - info->fprintf_func = save_printer; - info->print_address_func = save_print_address; - - d = best->args; - - (*info->fprintf_func) (info->stream, "%s", best->name); - - if (*d) - (*info->fprintf_func) (info->stream, "\t"); - - while (*d) - { - p += print_insn_arg (d, buffer, p, memaddr + (p - buffer), info); - d += 2; - if (*d && *(d - 2) != 'I' && *d != 'k') - (*info->fprintf_func) (info->stream, ","); - } - return p - buffer; - -invalid: { - extern void print_68k_invalid_opcode(unsigned long, struct disassemble_info *); - - /* Handle undefined instructions. */ - info->fprintf_func = save_printer; - info->print_address_func = save_print_address; - print_68k_invalid_opcode((buffer[0] << 8) | buffer[1], info); - return 2; - } -} - -/* Returns number of bytes "eaten" by the operand, or - return -1 if an invalid operand was found, or -2 if - an opcode tabe error was found. */ - -static int -print_insn_arg (d, buffer, p0, addr, info) - const char *d; - unsigned char *buffer; - unsigned char *p0; - bfd_vma addr; /* PC for this arg to be relative to */ - disassemble_info *info; -{ - register int val = 0; - register int place = d[1]; - register unsigned char *p = p0; - int regno; - register CONST char *regname; - register unsigned char *p1; - double flval; - int flt_p; - bfd_signed_vma disp; - unsigned int uval; - - switch (*d) - { - case 'c': /* cache identifier */ - { - static char *const cacheFieldName[] = { "nc", "dc", "ic", "bc" }; - val = fetch_arg (buffer, place, 2, info); - (*info->fprintf_func) (info->stream, cacheFieldName[val]); - break; - } - - case 'a': /* address register indirect only. Cf. case '+'. */ - { - (*info->fprintf_func) - (info->stream, - "(%s)", - reg_names [fetch_arg (buffer, place, 3, info) + 8]); - break; - } - - case '_': /* 32-bit absolute address for move16. */ - { - uval = NEXTULONG (p); - (*info->print_address_func) (uval, info); - break; - } - - case 'C': - (*info->fprintf_func) (info->stream, "ccr"); - break; - - case 'S': - (*info->fprintf_func) (info->stream, "sr"); - break; - - case 'U': - (*info->fprintf_func) (info->stream, "usp"); - break; - - case 'J': - { - static const struct { char *name; int value; } names[] - = {{"sfc", 0x000}, {"dfc", 0x001}, {"cacr", 0x002}, - {"tc", 0x003}, {"itt0",0x004}, {"itt1", 0x005}, - {"dtt0",0x006}, {"dtt1",0x007}, {"buscr",0x008}, - {"usp", 0x800}, {"vbr", 0x801}, {"caar", 0x802}, - {"msp", 0x803}, {"isp", 0x804}, - - /* Should we be calling this psr like we do in case 'Y'? */ - {"mmusr",0x805}, - - {"urp", 0x806}, {"srp", 0x807}, {"pcr", 0x808}}; - - val = fetch_arg (buffer, place, 12, info); - for (regno = sizeof names / sizeof names[0] - 1; regno >= 0; regno--) - if (names[regno].value == val) - { - (*info->fprintf_func) (info->stream, "%s", names[regno].name); - break; - } - if (regno < 0) - (*info->fprintf_func) (info->stream, "$%04x", val); - } - break; - - case 'Q': - val = fetch_arg (buffer, place, 3, info); - /* 0 means 8, except for the bkpt instruction... */ - if (val == 0 && d[1] != 's') - val = 8; - (*info->fprintf_func) (info->stream, "#%d", val); - break; - - case 'M': - val = fetch_arg (buffer, place, 8, info); - if (val & 0x80) - val = val - 0x100; - (*info->fprintf_func) (info->stream, "#$%02x", val); - break; - - case 'T': - val = fetch_arg (buffer, place, 4, info); - (*info->fprintf_func) (info->stream, "#$%08x", val); - break; - - case 'D': - (*info->fprintf_func) (info->stream, "%s", - reg_names[fetch_arg (buffer, place, 3, info)]); - break; - - case 'A': - (*info->fprintf_func) - (info->stream, "%s", - reg_names[fetch_arg (buffer, place, 3, info) + 010]); - break; - - case 'R': - (*info->fprintf_func) - (info->stream, "%s", - reg_names[fetch_arg (buffer, place, 4, info)]); - break; - - case 'r': - regno = fetch_arg (buffer, place, 4, info); - (*info->fprintf_func) (info->stream, "(%s)", reg_names[regno]); - break; - - case 'F': - (*info->fprintf_func) - (info->stream, "fp%d", - fetch_arg (buffer, place, 3, info)); - break; - - case 'O': - val = fetch_arg (buffer, place, 6, info); - if (val & 0x20) - (*info->fprintf_func) (info->stream, "%s", reg_names [val & 7]); - else - (*info->fprintf_func) (info->stream, "%d", val); - break; - - case '+': - (*info->fprintf_func) - (info->stream, "(%s)+", - reg_names[fetch_arg (buffer, place, 3, info) + 8]); - break; - - case '-': - (*info->fprintf_func) - (info->stream, "-(%s)", - reg_names[fetch_arg (buffer, place, 3, info) + 8]); - break; - - case 'k': - if (place == 'k') - (*info->fprintf_func) - (info->stream, "{%s}", - reg_names[fetch_arg (buffer, place, 3, info)]); - else if (place == 'C') - { - val = fetch_arg (buffer, place, 7, info); - if ( val > 63 ) /* This is a signed constant. */ - val -= 128; - (*info->fprintf_func) (info->stream, "{#%d}", val); - } - else - return -2; - break; - - case '#': - case '^': - p1 = buffer + (*d == '#' ? 2 : 4); - if (place == 's') - val = fetch_arg (buffer, place, 4, info); - else if (place == 'C') - val = fetch_arg (buffer, place, 7, info); - else if (place == '8') - val = fetch_arg (buffer, place, 3, info); - else if (place == '3') - val = fetch_arg (buffer, place, 8, info); - else if (place == 'b') { - val = NEXTBYTE (p1); - (*info->fprintf_func) (info->stream, "#$%02x", val & 0xff); - break; - } - else if (place == 'w' || place == 'W') { - val = NEXTWORD (p1); - (*info->fprintf_func) (info->stream, "#$%04x", val & 0xffff); - break; - } - else if (place == 'l') { - val = NEXTLONG (p1); - (*info->fprintf_func) (info->stream, "#$%08x", val); - break; - } - else - return -2; - (*info->fprintf_func) (info->stream, "#%d", val); - break; - - case 'B': - if (place == 'b') - disp = NEXTBYTE (p); - else if (place == 'B') - disp = COERCE_SIGNED_CHAR(buffer[1]); - else if (place == 'w' || place == 'W') - disp = NEXTWORD (p); - else if (place == 'l' || place == 'L' || place == 'C') - disp = NEXTLONG (p); - else if (place == 'g') - { - disp = NEXTBYTE (buffer); - if (disp == 0) - disp = NEXTWORD (p); - else if (disp == -1) - disp = NEXTLONG (p); - } - else if (place == 'c') - { - if (buffer[1] & 0x40) /* If bit six is one, long offset */ - disp = NEXTLONG (p); - else - disp = NEXTWORD (p); - } - else - return -2; - - (*info->print_address_func) (addr + disp, info); - break; - - case 'd': - val = NEXTWORD (p); - (*info->fprintf_func) - (info->stream, "($%04x,%s)", - val, reg_names[fetch_arg (buffer, place, 3, info) + 8]); - break; - - case 's': - (*info->fprintf_func) (info->stream, "%s", - fpcr_names[fetch_arg (buffer, place, 3, info)]); - break; - - case 'I': - /* Get coprocessor ID... */ - val = fetch_arg (buffer, 'd', 3, info); - - if (val != 1) /* Unusual coprocessor ID? */ - (*info->fprintf_func) (info->stream, "(cpid=%d) ", val); - break; - - case '*': - case '~': - case '%': - case ';': - case '@': - case '!': - case '$': - case '?': - case '/': - case '&': - case '|': - case '<': - case '>': - case 'm': - case 'n': - case 'o': - case 'p': - case 'q': - case 'v': - - if (place == 'd') - { - val = fetch_arg (buffer, 'x', 6, info); - val = ((val & 7) << 3) + ((val >> 3) & 7); - } - else - val = fetch_arg (buffer, 's', 6, info); - - /* Get register number assuming address register. */ - regno = (val & 7) + 8; - regname = reg_names[regno]; - switch (val >> 3) - { - case 0: - (*info->fprintf_func) (info->stream, "%s", reg_names[val]); - break; - - case 1: - (*info->fprintf_func) (info->stream, "%s", regname); - break; - - case 2: - (*info->fprintf_func) (info->stream, "(%s)", regname); - break; - - case 3: - (*info->fprintf_func) (info->stream, "(%s)+", regname); - break; - - case 4: - (*info->fprintf_func) (info->stream, "-(%s)", regname); - break; - - case 5: - val = NEXTWORD (p); - (*info->fprintf_func) (info->stream, "($%04x,%s)", val, regname); - break; - - case 6: - p = print_indexed (regno, p, addr, info); - break; - - case 7: - switch (val & 7) - { - case 0: - val = NEXTWORD (p); - (*info->print_address_func) (val, info); - break; - - case 1: - uval = NEXTULONG (p); - (*info->print_address_func) (uval, info); - break; - - case 2: - val = NEXTWORD (p); - (*info->fprintf_func) (info->stream, "("); - (*info->print_address_func) (addr + val, info); - (*info->fprintf_func) (info->stream, ",pc)"); - break; - - case 3: - p = print_indexed (-1, p, addr, info); - break; - - case 4: - switch( place ) - { - case 'b': - val = NEXTBYTE (p); - (*info->fprintf_func) (info->stream, "#$%02x", val & 0xff); - goto imm_printed; - - case 'w': - val = NEXTWORD (p); - (*info->fprintf_func) (info->stream, "#$%04x", val & 0xffff); - goto imm_printed; - - case 'l': - val = NEXTLONG (p); - (*info->fprintf_func) (info->stream, "#$%08x", val); - goto imm_printed; - - case 'f': - NEXTSINGLE(flval, p); - break; - - case 'F': - NEXTDOUBLE(flval, p); - break; - - case 'x': - NEXTEXTEND(flval, p); - break; - - case 'p': - flval = NEXTPACKED(p); - break; - - default: - return -1; - } - (*info->fprintf_func) (info->stream, "#%g", flval); -imm_printed: - break; - - default: - return -1; - } - } - break; - - case 'L': - case 'l': - if (place == 'w') - { - char doneany; - p1 = buffer + 2; - val = NEXTWORD (p1); - /* Move the pointer ahead if this point is farther ahead - than the last. */ - p = p1 > p ? p1 : p; - if (val == 0) - { - (*info->fprintf_func) (info->stream, "#0"); - break; - } - if (*d == 'l') - { - register int newval = 0; - for (regno = 0; regno < 16; ++regno) - if (val & (0x8000 >> regno)) - newval |= 1 << regno; - val = newval; - } - val &= 0xffff; - doneany = 0; - for (regno = 0; regno < 16; ++regno) - if (val & (1 << regno)) - { - int first_regno; - if (doneany) - (*info->fprintf_func) (info->stream, "/"); - doneany = 1; - (*info->fprintf_func) (info->stream, "%s", reg_names[regno]); - first_regno = regno; - while (val & (1 << (regno + 1))) - ++regno; - if (regno > first_regno) - (*info->fprintf_func) (info->stream, "-%s", - reg_names[regno]); - } - } - else if (place == '3') - { - /* `fmovem' insn. */ - char doneany; - val = fetch_arg (buffer, place, 8, info); - if (val == 0) - { - (*info->fprintf_func) (info->stream, "#0"); - break; - } - if (*d == 'l') - { - register int newval = 0; - for (regno = 0; regno < 8; ++regno) - if (val & (0x80 >> regno)) - newval |= 1 << regno; - val = newval; - } - val &= 0xff; - doneany = 0; - for (regno = 0; regno < 8; ++regno) - if (val & (1 << regno)) - { - int first_regno; - if (doneany) - (*info->fprintf_func) (info->stream, "/"); - doneany = 1; - (*info->fprintf_func) (info->stream, "fp%d", regno); - first_regno = regno; - while (val & (1 << (regno + 1))) - ++regno; - if (regno > first_regno) - (*info->fprintf_func) (info->stream, "-fp%d", regno); - } - } - else if (place == '8') - { - /* fmoveml for FP status registers */ - (*info->fprintf_func) (info->stream, "%s", - fpcr_names[fetch_arg (buffer, place, 3, - info)]); - } - else - return -2; - break; - - case 'X': - place = '8'; - case 'Y': - case 'Z': - case 'W': - case '0': - case '1': - case '2': - case '3': - { - int val = fetch_arg (buffer, place, 5, info); - char *name = 0; - switch (val) - { - case 2: name = "tt0"; break; - case 3: name = "tt1"; break; - case 0x10: name = "tc"; break; - case 0x11: name = "drp"; break; - case 0x12: name = "srp"; break; - case 0x13: name = "crp"; break; - case 0x14: name = "cal"; break; - case 0x15: name = "val"; break; - case 0x16: name = "scc"; break; - case 0x17: name = "ac"; break; - case 0x18: name = "psr"; break; - case 0x19: name = "pcsr"; break; - case 0x1c: - case 0x1d: - { - int break_reg = ((buffer[3] >> 2) & 7); - (*info->fprintf_func) - (info->stream, val == 0x1c ? "bad%d" : "bac%d", - break_reg); - } - break; - default: - (*info->fprintf_func) (info->stream, "", val); - } - if (name) - (*info->fprintf_func) (info->stream, "%s", name); - } - break; - - case 'f': - { - int fc = fetch_arg (buffer, place, 5, info); - if (fc == 1) - (*info->fprintf_func) (info->stream, "dfc"); - else if (fc == 0) - (*info->fprintf_func) (info->stream, "sfc"); - else - /* xgettext:c-format */ - (*info->fprintf_func) (info->stream, _(""), fc); - } - break; - - case 'V': - (*info->fprintf_func) (info->stream, "val"); - break; - - case 't': - { - int level = fetch_arg (buffer, place, 3, info); - (*info->fprintf_func) (info->stream, "%d", level); - } - break; - - default: - return -2; - } - - return p - p0; -} - -/* Fetch BITS bits from a position in the instruction specified by CODE. - CODE is a "place to put an argument", or 'x' for a destination - that is a general address (mode and register). - BUFFER contains the instruction. */ - -static int -fetch_arg (buffer, code, bits, info) - unsigned char *buffer; - int code; - int bits; - disassemble_info *info; -{ - register int val = 0; - switch (code) - { - case 's': - val = buffer[1]; - break; - - case 'd': /* Destination, for register or quick. */ - val = (buffer[0] << 8) + buffer[1]; - val >>= 9; - break; - - case 'x': /* Destination, for general arg */ - val = (buffer[0] << 8) + buffer[1]; - val >>= 6; - break; - - case 'k': - FETCH_DATA (info, buffer + 3); - val = (buffer[3] >> 4); - break; - - case 'C': - FETCH_DATA (info, buffer + 3); - val = buffer[3]; - break; - - case '1': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - val >>= 12; - break; - - case '2': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - val >>= 6; - break; - - case '3': - case 'j': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - break; - - case '4': - FETCH_DATA (info, buffer + 5); - val = (buffer[4] << 8) + buffer[5]; - val >>= 12; - break; - - case '5': - FETCH_DATA (info, buffer + 5); - val = (buffer[4] << 8) + buffer[5]; - val >>= 6; - break; - - case '6': - FETCH_DATA (info, buffer + 5); - val = (buffer[4] << 8) + buffer[5]; - break; - - case '7': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - val >>= 7; - break; - - case '8': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - val >>= 10; - break; - - case '9': - FETCH_DATA (info, buffer + 3); - val = (buffer[2] << 8) + buffer[3]; - val >>= 5; - break; - - case 'e': - val = (buffer[1] >> 6); - break; - - default: - abort (); - } - - switch (bits) - { - case 2: - return val & 3; - case 3: - return val & 7; - case 4: - return val & 017; - case 5: - return val & 037; - case 6: - return val & 077; - case 7: - return val & 0177; - case 8: - return val & 0377; - case 12: - return val & 07777; - default: - abort (); - } -} - -/* Print an indexed argument. The base register is BASEREG (-1 for pc). - P points to extension word, in buffer. - ADDR is the nominal core address of that extension word. */ - -static unsigned char * -print_indexed (basereg, p, addr, info) - int basereg; - unsigned char *p; - bfd_vma addr; - disassemble_info *info; -{ - register int word; - static char *const scales[] = {"", "*2", "*4", "*8"}; - bfd_vma base_disp; - bfd_vma outer_disp; - char buf[40]; - char vmabuf[50]; - - word = NEXTWORD (p); - - /* Generate the text for the index register. - Where this will be output is not yet determined. */ - sprintf (buf, "%s.%c%s", - reg_names[(word >> 12) & 0xf], - (word & 0x800) ? 'l' : 'w', - scales[(word >> 9) & 3]); - - /* Handle the 68000 style of indexing. */ - - if ((word & 0x100) == 0) - { - base_disp = word & 0xff; - if ((base_disp & 0x80) != 0) - base_disp -= 0x100; - if (basereg == -1) - base_disp += addr; - (*info->fprintf_func) (info->stream, "(", buf); - print_base (basereg, base_disp, info); - (*info->fprintf_func) (info->stream, ",%s)", buf); - return p; - } - - /* Handle the generalized kind. */ - /* First, compute the displacement to add to the base register. */ - - if (word & 0200) - { - if (basereg == -1) - basereg = -3; - else - basereg = -2; - } - if (word & 0100) - buf[0] = '\0'; - base_disp = 0; - switch ((word >> 4) & 3) - { - case 2: - base_disp = NEXTWORD (p); - break; - case 3: - base_disp = NEXTLONG (p); - } - if (basereg == -1) - base_disp += addr; - - /* Handle single-level case (not indirect) */ - - if ((word & 7) == 0) - { - (*info->fprintf_func) (info->stream, "("); - print_base (basereg, base_disp, info); - if (buf[0] != '\0') - (*info->fprintf_func) (info->stream, ",%s", buf); - (*info->fprintf_func) (info->stream, ")"); - return p; - } - - /* Two level. Compute displacement to add after indirection. */ - - outer_disp = 0; - switch (word & 3) - { - case 2: - outer_disp = NEXTWORD (p); - break; - case 3: - outer_disp = NEXTLONG (p); - } - - (*info->fprintf_func) (info->stream, "(["); - print_base (basereg, base_disp, info); - if ((word & 4) == 0 && buf[0] != '\0') - { - (*info->fprintf_func) (info->stream, ",%s", buf); - buf[0] = '\0'; - } - if (outer_disp) - (*info->fprintf_func) (info->stream, "],$%08x", (uint32)outer_disp); - else - (*info->fprintf_func) (info->stream, "]"); - if (buf[0] != '\0') - (*info->fprintf_func) (info->stream, ",%s", buf); - (*info->fprintf_func) (info->stream, ")"); - - return p; -} - -/* Print a base register REGNO and displacement DISP, on INFO->STREAM. - REGNO = -1 for pc, -2 for none (suppressed). */ - -static void -print_base (regno, disp, info) - int regno; - bfd_vma disp; - disassemble_info *info; -{ - if (regno == -1) { - (*info->print_address_func) (disp, info); - (*info->fprintf_func) (info->stream, ",pc"); - } - else { - if (regno == -3) { - (*info->print_address_func) (disp, info); - (*info->fprintf_func) (info->stream, ",zpc"); - } - else if (regno == -2) - (*info->print_address_func) (disp, info); - else - (*info->fprintf_func) (info->stream, "$%08x,%s", (uint32)disp, reg_names[regno]); - } -} diff --git a/cxmon/src/disass/m68k-opc.c b/cxmon/src/disass/m68k-opc.c deleted file mode 100644 index 751eae60b..000000000 --- a/cxmon/src/disass/m68k-opc.c +++ /dev/null @@ -1,2066 +0,0 @@ -/* Opcode table for m680[012346]0/m6888[12]/m68851/mcf5200. - Copyright 1989, 91, 92, 93, 94, 95, 96, 97, 98, 1999 - Free Software Foundation. - -This file is part of GDB, GAS, and the GNU binutils. - -GDB, GAS, and the GNU binutils are free software; you can redistribute -them and/or modify them under the terms of the GNU General Public -License as published by the Free Software Foundation; either version -1, or (at your option) any later version. - -GDB, GAS, and the GNU binutils are distributed in the hope that they -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 file; see the file COPYING. If not, write to the Free -Software Foundation, 59 Temple Place - Suite 330, Boston, MA -02111-1307, USA. */ - -#include "ansidecl.h" -#include "m68k.h" - -#define one(x) ((unsigned int) (x) << 16) -#define two(x, y) (((unsigned int) (x) << 16) + (y)) - -/* The assembler requires that all instances of the same mnemonic must - be consecutive. If they aren't, the assembler will bomb at - runtime. */ - -const struct m68k_opcode m68k_opcodes[] = -{ -{"abcd", one(0140400), one(0170770), "DsDd", m68000up }, -{"abcd", one(0140410), one(0170770), "-s-d", m68000up }, - -{"adda.w", one(0150300), one(0170700), "*wAd", m68000up }, -{"adda.l", one(0150700), one(0170700), "*lAd", m68000up | mcf5200 }, - -{"addi.b", one(0003000), one(0177700), "#b$s", m68000up }, -{"addi.w", one(0003100), one(0177700), "#w$s", m68000up }, -{"addi.l", one(0003200), one(0177700), "#l$s", m68000up }, -{"addi.l", one(0003200), one(0177700), "#lDs", mcf5200 }, - -{"addq.b", one(0050000), one(0170700), "Qd$b", m68000up }, -{"addq.w", one(0050100), one(0170700), "Qd%w", m68000up }, -{"addq.l", one(0050200), one(0170700), "Qd%l", m68000up | mcf5200 }, - -/* The add opcode can generate the adda, addi, and addq instructions. */ -{"add.b", one(0050000), one(0170700), "Qd$b", m68000up }, -{"add.b", one(0003000), one(0177700), "#b$s", m68000up }, -{"add.b", one(0150000), one(0170700), ";bDd", m68000up }, -{"add.b", one(0150400), one(0170700), "Dd~b", m68000up }, -{"add.w", one(0050100), one(0170700), "Qd%w", m68000up }, -{"add.w", one(0150300), one(0170700), "*wAd", m68000up }, -{"add.w", one(0003100), one(0177700), "#w$s", m68000up }, -{"add.w", one(0150100), one(0170700), "*wDd", m68000up }, -{"add.w", one(0150500), one(0170700), "Dd~w", m68000up }, -{"add.l", one(0050200), one(0170700), "Qd%l", m68000up | mcf5200 }, -{"add.l", one(0003200), one(0177700), "#l$s", m68000up }, -{"add.l", one(0003200), one(0177700), "#lDs", mcf5200 }, -{"add.l", one(0150700), one(0170700), "*lAd", m68000up | mcf5200 }, -{"add.l", one(0150200), one(0170700), "*lDd", m68000up | mcf5200 }, -{"add.l", one(0150600), one(0170700), "Dd~l", m68000up | mcf5200 }, - -{"addx.b", one(0150400), one(0170770), "DsDd", m68000up }, -{"addx.b", one(0150410), one(0170770), "-s-d", m68000up }, -{"addx.w", one(0150500), one(0170770), "DsDd", m68000up }, -{"addx.w", one(0150510), one(0170770), "-s-d", m68000up }, -{"addx.l", one(0150600), one(0170770), "DsDd", m68000up | mcf5200 }, -{"addx.l", one(0150610), one(0170770), "-s-d", m68000up }, - -{"andi.b", one(0001000), one(0177700), "#b$s", m68000up }, -{"andi.w", one(0001100), one(0177700), "#w$s", m68000up }, -{"andi.l", one(0001200), one(0177700), "#l$s", m68000up }, -{"andi.l", one(0001200), one(0177700), "#lDs", mcf5200 }, -{"andi", one(0001100), one(0177700), "#w$s", m68000up }, -{"andi", one(0001074), one(0177777), "#bCs", m68000up }, -{"andi", one(0001174), one(0177777), "#wSs", m68000up }, - -/* The and opcode can generate the andi instruction. */ -{"and.b", one(0001000), one(0177700), "#b$s", m68000up }, -{"and.b", one(0140000), one(0170700), ";bDd", m68000up }, -{"and.b", one(0140400), one(0170700), "Dd~b", m68000up }, -{"and.w", one(0001100), one(0177700), "#w$s", m68000up }, -{"and.w", one(0140100), one(0170700), ";wDd", m68000up }, -{"and.w", one(0140500), one(0170700), "Dd~w", m68000up }, -{"and.l", one(0001200), one(0177700), "#l$s", m68000up }, -{"and.l", one(0001200), one(0177700), "#lDs", mcf5200 }, -{"and.l", one(0140200), one(0170700), ";lDd", m68000up | mcf5200 }, -{"and.l", one(0140600), one(0170700), "Dd~l", m68000up | mcf5200 }, -{"and", one(0001100), one(0177700), "#w$w", m68000up }, -{"and", one(0001074), one(0177777), "#bCs", m68000up }, -{"and", one(0001174), one(0177777), "#wSs", m68000up }, -{"and", one(0140100), one(0170700), ";wDd", m68000up }, -{"and", one(0140500), one(0170700), "Dd~w", m68000up }, - -{"asl.b", one(0160400), one(0170770), "QdDs", m68000up }, -{"asl.b", one(0160440), one(0170770), "DdDs", m68000up }, -{"asl.w", one(0160500), one(0170770), "QdDs", m68000up }, -{"asl.w", one(0160540), one(0170770), "DdDs", m68000up }, -{"asl.w", one(0160700), one(0177700), "~s", m68000up }, -{"asl.l", one(0160600), one(0170770), "QdDs", m68000up | mcf5200 }, -{"asl.l", one(0160640), one(0170770), "DdDs", m68000up | mcf5200 }, - -{"asr.b", one(0160000), one(0170770), "QdDs", m68000up }, -{"asr.b", one(0160040), one(0170770), "DdDs", m68000up }, -{"asr.w", one(0160100), one(0170770), "QdDs", m68000up }, -{"asr.w", one(0160140), one(0170770), "DdDs", m68000up }, -{"asr.w", one(0160300), one(0177700), "~s", m68000up }, -{"asr.l", one(0160200), one(0170770), "QdDs", m68000up | mcf5200 }, -{"asr.l", one(0160240), one(0170770), "DdDs", m68000up | mcf5200 }, - -{"bhi", one(0061000), one(0177777), "BW", m68000up | mcf5200 }, -{"bls", one(0061400), one(0177777), "BW", m68000up | mcf5200 }, -{"bcc", one(0062000), one(0177777), "BW", m68000up | mcf5200 }, -{"bcs", one(0062400), one(0177777), "BW", m68000up | mcf5200 }, -{"bne", one(0063000), one(0177777), "BW", m68000up | mcf5200 }, -{"beq", one(0063400), one(0177777), "BW", m68000up | mcf5200 }, -{"bvc", one(0064000), one(0177777), "BW", m68000up | mcf5200 }, -{"bvs", one(0064400), one(0177777), "BW", m68000up | mcf5200 }, -{"bpl", one(0065000), one(0177777), "BW", m68000up | mcf5200 }, -{"bmi", one(0065400), one(0177777), "BW", m68000up | mcf5200 }, -{"bge", one(0066000), one(0177777), "BW", m68000up | mcf5200 }, -{"blt", one(0066400), one(0177777), "BW", m68000up | mcf5200 }, -{"bgt", one(0067000), one(0177777), "BW", m68000up | mcf5200 }, -{"ble", one(0067400), one(0177777), "BW", m68000up | mcf5200 }, - -{"bhi.l", one(0061377), one(0177777), "BL", m68020up | cpu32 }, -{"bls.l", one(0061777), one(0177777), "BL", m68020up | cpu32 }, -{"bcc.l", one(0062377), one(0177777), "BL", m68020up | cpu32 }, -{"bcs.l", one(0062777), one(0177777), "BL", m68020up | cpu32 }, -{"bne.l", one(0063377), one(0177777), "BL", m68020up | cpu32 }, -{"beq.l", one(0063777), one(0177777), "BL", m68020up | cpu32 }, -{"bvc.l", one(0064377), one(0177777), "BL", m68020up | cpu32 }, -{"bvs.l", one(0064777), one(0177777), "BL", m68020up | cpu32 }, -{"bpl.l", one(0065377), one(0177777), "BL", m68020up | cpu32 }, -{"bmi.l", one(0065777), one(0177777), "BL", m68020up | cpu32 }, -{"bge.l", one(0066377), one(0177777), "BL", m68020up | cpu32 }, -{"blt.l", one(0066777), one(0177777), "BL", m68020up | cpu32 }, -{"bgt.l", one(0067377), one(0177777), "BL", m68020up | cpu32 }, -{"ble.l", one(0067777), one(0177777), "BL", m68020up | cpu32 }, - -{"bhi.s", one(0061000), one(0177400), "BB", m68000up | mcf5200 }, -{"bls.s", one(0061400), one(0177400), "BB", m68000up | mcf5200 }, -{"bcc.s", one(0062000), one(0177400), "BB", m68000up | mcf5200 }, -{"bcs.s", one(0062400), one(0177400), "BB", m68000up | mcf5200 }, -{"bne.s", one(0063000), one(0177400), "BB", m68000up | mcf5200 }, -{"beq.s", one(0063400), one(0177400), "BB", m68000up | mcf5200 }, -{"bvc.s", one(0064000), one(0177400), "BB", m68000up | mcf5200 }, -{"bvs.s", one(0064400), one(0177400), "BB", m68000up | mcf5200 }, -{"bpl.s", one(0065000), one(0177400), "BB", m68000up | mcf5200 }, -{"bmi.s", one(0065400), one(0177400), "BB", m68000up | mcf5200 }, -{"bge.s", one(0066000), one(0177400), "BB", m68000up | mcf5200 }, -{"blt.s", one(0066400), one(0177400), "BB", m68000up | mcf5200 }, -{"bgt.s", one(0067000), one(0177400), "BB", m68000up | mcf5200 }, -{"ble.s", one(0067400), one(0177400), "BB", m68000up | mcf5200 }, - -{"jhi", one(0061000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jls", one(0061400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jcc", one(0062000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jcs", one(0062400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jne", one(0063000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jeq", one(0063400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jvc", one(0064000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jvs", one(0064400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jpl", one(0065000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jmi", one(0065400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jge", one(0066000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jlt", one(0066400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jgt", one(0067000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jle", one(0067400), one(0177400), "Bg", m68000up | mcf5200 }, - -{"bchg", one(0000500), one(0170700), "Dd$s", m68000up | mcf5200 }, -{"bchg", one(0004100), one(0177700), "#b$s", m68000up }, -{"bchg", one(0004100), one(0177700), "#bqs", mcf5200 }, - -{"bclr", one(0000600), one(0170700), "Dd$s", m68000up }, -{"bclr", one(0000600), one(0170700), "Ddvs", mcf5200 }, -{"bclr", one(0004200), one(0177700), "#b$s", m68000up }, -{"bclr", one(0004200), one(0177700), "#bqs", mcf5200 }, - -{"bfchg", two(0165300, 0), two(0177700, 0170000), "?sO2O3", m68020up }, -{"bfclr", two(0166300, 0), two(0177700, 0170000), "?sO2O3", m68020up }, -{"bfexts", two(0165700, 0), two(0177700, 0100000), "/sO2O3D1", m68020up }, -{"bfextu", two(0164700, 0), two(0177700, 0100000), "/sO2O3D1", m68020up }, -{"bfffo", two(0166700, 0), two(0177700, 0100000), "/sO2O3D1", m68020up }, -{"bfins", two(0167700, 0), two(0177700, 0100000), "D1?sO2O3", m68020up }, -{"bfset", two(0167300, 0), two(0177700, 0170000), "?sO2O3", m68020up }, -{"bftst", two(0164300, 0), two(0177700, 0170000), "/sO2O3", m68020up }, - -{"bgnd", one(0045372), one(0177777), "", cpu32 }, - -{"bkpt", one(0044110), one(0177770), "ts", m68010up }, - -{"bra", one(0060000), one(0177777), "BW", m68000up | mcf5200 }, -{"bra.l", one(0060377), one(0177777), "BL", m68020up | cpu32 }, -{"bra.s", one(0060000), one(0177400), "BB", m68000up | mcf5200 }, - -{"bset", one(0000700), one(0170700), "Dd$s", m68000up }, -{"bset", one(0000700), one(0170700), "Ddvs", mcf5200 }, -{"bset", one(0004300), one(0177700), "#b$s", m68000up }, -{"bset", one(0004300), one(0177700), "#bqs", mcf5200 }, - -{"bsr", one(0060400), one(0177777), "BW", m68000up | mcf5200 }, -{"bsr.l", one(0060777), one(0177777), "BL", m68020up | cpu32 }, -{"bsr.s", one(0060400), one(0177400), "BB", m68000up | mcf5200 }, - -{"btst", one(0000400), one(0170700), "Dd;b", m68000up | mcf5200 }, -{"btst", one(0004000), one(0177700), "#b@s", m68000up }, -{"btst", one(0004000), one(0177700), "#bqs", mcf5200 }, - -{"callm", one(0003300), one(0177700), "#b!s", m68020 }, - -{"cas2.w", two(0006374,0), two(0177777,0007070), "D3D6D2D5r1r4", m68020up }, -{"cas2.w", two(0006374,0), two(0177777,0007070), "D3D6D2D5R1R4", m68020up }, -{"cas2.l", two(0007374,0), two(0177777,0007070), "D3D6D2D5r1r4", m68020up }, -{"cas2.l", two(0007374,0), two(0177777,0007070), "D3D6D2D5R1R4", m68020up }, - -{"cas.b", two(0005300, 0), two(0177700, 0177070), "D3D2~s", m68020up }, -{"cas.w", two(0006300, 0), two(0177700, 0177070), "D3D2~s", m68020up }, -{"cas.l", two(0007300, 0), two(0177700, 0177070), "D3D2~s", m68020up }, - -{"chk2.b", two(0000300,0004000), two(0177700,07777), "!sR1", m68020up | cpu32 }, -{"chk2.w", two(0001300,0004000), two(0177700,07777), "!sR1", m68020up | cpu32 }, -{"chk2.l", two(0002300,0004000), two(0177700,07777), "!sR1", m68020up | cpu32 }, - -{"chk.l", one(0040400), one(0170700), ";lDd", m68000up }, -{"chk.w", one(0040600), one(0170700), ";wDd", m68000up }, - -#define SCOPE_LINE (0x1 << 3) -#define SCOPE_PAGE (0x2 << 3) -#define SCOPE_ALL (0x3 << 3) - -{"cinva", one(0xf400|SCOPE_ALL), one(0xff38), "ce", m68040up }, -{"cinvl", one(0xf400|SCOPE_LINE), one(0xff38), "ceas", m68040up }, -{"cinvp", one(0xf400|SCOPE_PAGE), one(0xff38), "ceas", m68040up }, - -{"cpusha", one(0xf420|SCOPE_ALL), one(0xff38), "ce", m68040up }, -{"cpushl", one(0xf420|SCOPE_LINE), one(0xff38), "ceas", m68040up }, -{"cpushl", one(0x04e8), one(0xfff8), "as", mcf5200 }, -{"cpushp", one(0xf420|SCOPE_PAGE), one(0xff38), "ceas", m68040up }, - -#undef SCOPE_LINE -#undef SCOPE_PAGE -#undef SCOPE_ALL - -{"clr.b", one(0041000), one(0177700), "$s", m68000up | mcf5200 }, -{"clr.w", one(0041100), one(0177700), "$s", m68000up | mcf5200 }, -{"clr.l", one(0041200), one(0177700), "$s", m68000up | mcf5200 }, - -{"cmp2.b", two(0000300,0), two(0177700,07777), "!sR1", m68020up | cpu32 }, -{"cmp2.w", two(0001300,0), two(0177700,07777), "!sR1", m68020up | cpu32 }, -{"cmp2.l", two(0002300,0), two(0177700,07777), "!sR1", m68020up | cpu32 }, - -{"cmpa.w", one(0130300), one(0170700), "*wAd", m68000up }, -{"cmpa.l", one(0130700), one(0170700), "*lAd", m68000up | mcf5200 }, - -{"cmpi.b", one(0006000), one(0177700), "#b;s", m68000up }, -{"cmpi.w", one(0006100), one(0177700), "#w;s", m68000up }, -{"cmpi.l", one(0006200), one(0177700), "#l;s", m68000up }, -{"cmpi.l", one(0006200), one(0177700), "#lDs", mcf5200 }, - -{"cmpm.b", one(0130410), one(0170770), "+s+d", m68000up }, -{"cmpm.w", one(0130510), one(0170770), "+s+d", m68000up }, -{"cmpm.l", one(0130610), one(0170770), "+s+d", m68000up }, - -/* The cmp opcode can generate the cmpa, cmpm, and cmpi instructions. */ -{"cmp.b", one(0006000), one(0177700), "#b;s", m68000up }, -{"cmp.b", one(0130410), one(0170770), "+s+d", m68000up }, -{"cmp.b", one(0130000), one(0170700), ";bDd", m68000up }, -{"cmp.w", one(0130300), one(0170700), "*wAd", m68000up }, -{"cmp.w", one(0006100), one(0177700), "#w;s", m68000up }, -{"cmp.w", one(0130510), one(0170770), "+s+d", m68000up }, -{"cmp.w", one(0130100), one(0170700), "*wDd", m68000up }, -{"cmp.l", one(0130700), one(0170700), "*lAd", m68000up | mcf5200 }, -{"cmp.l", one(0006200), one(0177700), "#l;s", m68000up }, -{"cmp.l", one(0006200), one(0177700), "#lDs", mcf5200 }, -{"cmp.l", one(0130610), one(0170770), "+s+d", m68000up }, -{"cmp.l", one(0130200), one(0170700), "*lDd", m68000up | mcf5200 }, - -{"dbcc", one(0052310), one(0177770), "DsBw", m68000up }, -{"dbcs", one(0052710), one(0177770), "DsBw", m68000up }, -{"dbeq", one(0053710), one(0177770), "DsBw", m68000up }, -{"dbf", one(0050710), one(0177770), "DsBw", m68000up }, -{"dbge", one(0056310), one(0177770), "DsBw", m68000up }, -{"dbgt", one(0057310), one(0177770), "DsBw", m68000up }, -{"dbhi", one(0051310), one(0177770), "DsBw", m68000up }, -{"dble", one(0057710), one(0177770), "DsBw", m68000up }, -{"dbls", one(0051710), one(0177770), "DsBw", m68000up }, -{"dblt", one(0056710), one(0177770), "DsBw", m68000up }, -{"dbmi", one(0055710), one(0177770), "DsBw", m68000up }, -{"dbne", one(0053310), one(0177770), "DsBw", m68000up }, -{"dbpl", one(0055310), one(0177770), "DsBw", m68000up }, -{"dbt", one(0050310), one(0177770), "DsBw", m68000up }, -{"dbvc", one(0054310), one(0177770), "DsBw", m68000up }, -{"dbvs", one(0054710), one(0177770), "DsBw", m68000up }, - -{"divs.w", one(0100700), one(0170700), ";wDd", m68000up }, - -{"divs.l", two(0046100,0006000),two(0177700,0107770),";lD3D1", m68020up|cpu32 }, -{"divs.l", two(0046100,0004000),two(0177700,0107770),";lDD", m68020up|cpu32 }, - -{"divsl.l", two(0046100,0004000),two(0177700,0107770),";lD3D1",m68020up|cpu32 }, -{"divsl.l", two(0046100,0004000),two(0177700,0107770),";lDD", m68020up|cpu32 }, - -{"divu.w", one(0100300), one(0170700), ";wDd", m68000up }, - -{"divu.l", two(0046100,0002000),two(0177700,0107770),";lD3D1", m68020up|cpu32 }, -{"divu.l", two(0046100,0000000),two(0177700,0107770),";lDD", m68020up|cpu32 }, - -{"divul.l", two(0046100,0000000),two(0177700,0107770),";lD3D1",m68020up|cpu32 }, -{"divul.l", two(0046100,0000000),two(0177700,0107770),";lDD", m68020up|cpu32 }, - -{"eori.b", one(0005000), one(0177700), "#b$s", m68000up }, -{"eori.w", one(0005100), one(0177700), "#w$s", m68000up }, -{"eori.l", one(0005200), one(0177700), "#l$s", m68000up }, -{"eori.l", one(0005200), one(0177700), "#lDs", mcf5200 }, -{"eori", one(0005074), one(0177777), "#bCs", m68000up }, -{"eori", one(0005174), one(0177777), "#wSs", m68000up }, -{"eori", one(0005100), one(0177700), "#w$s", m68000up }, - -/* The eor opcode can generate the eori instruction. */ -{"eor.b", one(0005000), one(0177700), "#b$s", m68000up }, -{"eor.b", one(0130400), one(0170700), "Dd$s", m68000up }, -{"eor.w", one(0005100), one(0177700), "#w$s", m68000up }, -{"eor.w", one(0130500), one(0170700), "Dd$s", m68000up }, -{"eor.l", one(0005200), one(0177700), "#l$s", m68000up }, -{"eor.l", one(0005200), one(0177700), "#lDs", mcf5200 }, -{"eor.l", one(0130600), one(0170700), "Dd$s", m68000up | mcf5200 }, -{"eor", one(0005074), one(0177777), "#bCs", m68000up }, -{"eor", one(0005174), one(0177777), "#wSs", m68000up }, -{"eor", one(0005100), one(0177700), "#w$s", m68000up }, -{"eor", one(0130500), one(0170700), "Dd$s", m68000up }, - -{"exg", one(0140500), one(0170770), "DdDs", m68000up }, -{"exg", one(0140510), one(0170770), "AdAs", m68000up }, -{"exg", one(0140610), one(0170770), "DdAs", m68000up }, -{"exg", one(0140610), one(0170770), "AsDd", m68000up }, - -{"ext.w", one(0044200), one(0177770), "Ds", m68000up|mcf5200 }, -{"ext.l", one(0044300), one(0177770), "Ds", m68000up|mcf5200 }, -{"extb.l", one(0044700), one(0177770), "Ds", m68020up|cpu32|mcf5200 }, - -/* float stuff starts here */ - -{"fabs.b", two(0xF000, 0x5818), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fabs.d", two(0xF000, 0x5418), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fabs.l", two(0xF000, 0x4018), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fabs.p", two(0xF000, 0x4C18), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fabs.s", two(0xF000, 0x4418), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fabs.w", two(0xF000, 0x5018), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fabs.x", two(0xF000, 0x0018), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fabs.x", two(0xF000, 0x4818), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fabs.x", two(0xF000, 0x0018), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsabs.b", two(0xF000, 0x5858), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsabs.d", two(0xF000, 0x5458), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsabs.l", two(0xF000, 0x4058), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsabs.p", two(0xF000, 0x4C58), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fsabs.s", two(0xF000, 0x4458), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsabs.w", two(0xF000, 0x5058), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsabs.x", two(0xF000, 0x0058), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsabs.x", two(0xF000, 0x4858), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fsabs.x", two(0xF000, 0x0058), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fdabs.b", two(0xF000, 0x585c), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up}, -{"fdabs.d", two(0xF000, 0x545c), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up}, -{"fdabs.l", two(0xF000, 0x405c), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up}, -{"fdabs.p", two(0xF000, 0x4C5c), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up}, -{"fdabs.s", two(0xF000, 0x445c), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up}, -{"fdabs.w", two(0xF000, 0x505c), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up}, -{"fdabs.x", two(0xF000, 0x005c), two(0xF1C0, 0xE07F), "IiF8F7", m68040up}, -{"fdabs.x", two(0xF000, 0x485c), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up}, -{"fdabs.x", two(0xF000, 0x005c), two(0xF1C0, 0xE07F), "IiFt", m68040up}, - -{"facos.b", two(0xF000, 0x581C), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"facos.d", two(0xF000, 0x541C), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"facos.l", two(0xF000, 0x401C), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"facos.p", two(0xF000, 0x4C1C), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"facos.s", two(0xF000, 0x441C), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"facos.w", two(0xF000, 0x501C), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"facos.x", two(0xF000, 0x001C), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"facos.x", two(0xF000, 0x481C), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"facos.x", two(0xF000, 0x001C), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fadd.b", two(0xF000, 0x5822), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fadd.d", two(0xF000, 0x5422), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fadd.l", two(0xF000, 0x4022), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fadd.p", two(0xF000, 0x4C22), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fadd.s", two(0xF000, 0x4422), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fadd.w", two(0xF000, 0x5022), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fadd.x", two(0xF000, 0x0022), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fadd.x", two(0xF000, 0x4822), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"fsadd.b", two(0xF000, 0x5862), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsadd.d", two(0xF000, 0x5462), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsadd.l", two(0xF000, 0x4062), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsadd.p", two(0xF000, 0x4C62), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fsadd.s", two(0xF000, 0x4462), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsadd.w", two(0xF000, 0x5062), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsadd.x", two(0xF000, 0x0062), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsadd.x", two(0xF000, 0x4862), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fdadd.b", two(0xF000, 0x5866), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdadd.d", two(0xF000, 0x5466), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdadd.l", two(0xF000, 0x4066), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdadd.p", two(0xF000, 0x4C66), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fdadd.s", two(0xF000, 0x4466), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdadd.w", two(0xF000, 0x5066), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdadd.x", two(0xF000, 0x0066), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdadd.x", two(0xF000, 0x4866), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fasin.b", two(0xF000, 0x580C), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fasin.d", two(0xF000, 0x540C), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fasin.l", two(0xF000, 0x400C), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fasin.p", two(0xF000, 0x4C0C), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fasin.s", two(0xF000, 0x440C), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fasin.w", two(0xF000, 0x500C), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fasin.x", two(0xF000, 0x000C), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fasin.x", two(0xF000, 0x480C), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fasin.x", two(0xF000, 0x000C), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fatan.b", two(0xF000, 0x580A), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fatan.d", two(0xF000, 0x540A), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fatan.l", two(0xF000, 0x400A), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fatan.p", two(0xF000, 0x4C0A), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fatan.s", two(0xF000, 0x440A), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fatan.w", two(0xF000, 0x500A), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fatan.x", two(0xF000, 0x000A), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fatan.x", two(0xF000, 0x480A), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fatan.x", two(0xF000, 0x000A), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fatanh.b", two(0xF000, 0x580D), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fatanh.d", two(0xF000, 0x540D), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fatanh.l", two(0xF000, 0x400D), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fatanh.p", two(0xF000, 0x4C0D), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fatanh.s", two(0xF000, 0x440D), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fatanh.w", two(0xF000, 0x500D), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fatanh.x", two(0xF000, 0x000D), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fatanh.x", two(0xF000, 0x480D), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fatanh.x", two(0xF000, 0x000D), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fbeq", one(0xF081), one(0xF1FF), "IdBW", mfloat }, -{"fbf", one(0xF080), one(0xF1FF), "IdBW", mfloat }, -{"fbge", one(0xF093), one(0xF1FF), "IdBW", mfloat }, -{"fbgl", one(0xF096), one(0xF1FF), "IdBW", mfloat }, -{"fbgle", one(0xF097), one(0xF1FF), "IdBW", mfloat }, -{"fbgt", one(0xF092), one(0xF1FF), "IdBW", mfloat }, -{"fble", one(0xF095), one(0xF1FF), "IdBW", mfloat }, -{"fblt", one(0xF094), one(0xF1FF), "IdBW", mfloat }, -{"fbne", one(0xF08E), one(0xF1FF), "IdBW", mfloat }, -{"fbnge", one(0xF09C), one(0xF1FF), "IdBW", mfloat }, -{"fbngl", one(0xF099), one(0xF1FF), "IdBW", mfloat }, -{"fbngle", one(0xF098), one(0xF1FF), "IdBW", mfloat }, -{"fbngt", one(0xF09D), one(0xF1FF), "IdBW", mfloat }, -{"fbnle", one(0xF09A), one(0xF1FF), "IdBW", mfloat }, -{"fbnlt", one(0xF09B), one(0xF1FF), "IdBW", mfloat }, -{"fboge", one(0xF083), one(0xF1FF), "IdBW", mfloat }, -{"fbogl", one(0xF086), one(0xF1FF), "IdBW", mfloat }, -{"fbogt", one(0xF082), one(0xF1FF), "IdBW", mfloat }, -{"fbole", one(0xF085), one(0xF1FF), "IdBW", mfloat }, -{"fbolt", one(0xF084), one(0xF1FF), "IdBW", mfloat }, -{"fbor", one(0xF087), one(0xF1FF), "IdBW", mfloat }, -{"fbseq", one(0xF091), one(0xF1FF), "IdBW", mfloat }, -{"fbsf", one(0xF090), one(0xF1FF), "IdBW", mfloat }, -{"fbsne", one(0xF09E), one(0xF1FF), "IdBW", mfloat }, -{"fbst", one(0xF09F), one(0xF1FF), "IdBW", mfloat }, -{"fbt", one(0xF08F), one(0xF1FF), "IdBW", mfloat }, -{"fbueq", one(0xF089), one(0xF1FF), "IdBW", mfloat }, -{"fbuge", one(0xF08B), one(0xF1FF), "IdBW", mfloat }, -{"fbugt", one(0xF08A), one(0xF1FF), "IdBW", mfloat }, -{"fbule", one(0xF08D), one(0xF1FF), "IdBW", mfloat }, -{"fbult", one(0xF08C), one(0xF1FF), "IdBW", mfloat }, -{"fbun", one(0xF088), one(0xF1FF), "IdBW", mfloat }, - -{"fbeq.l", one(0xF0C1), one(0xF1FF), "IdBC", mfloat }, -{"fbf.l", one(0xF0C0), one(0xF1FF), "IdBC", mfloat }, -{"fbge.l", one(0xF0D3), one(0xF1FF), "IdBC", mfloat }, -{"fbgl.l", one(0xF0D6), one(0xF1FF), "IdBC", mfloat }, -{"fbgle.l", one(0xF0D7), one(0xF1FF), "IdBC", mfloat }, -{"fbgt.l", one(0xF0D2), one(0xF1FF), "IdBC", mfloat }, -{"fble.l", one(0xF0D5), one(0xF1FF), "IdBC", mfloat }, -{"fblt.l", one(0xF0D4), one(0xF1FF), "IdBC", mfloat }, -{"fbne.l", one(0xF0CE), one(0xF1FF), "IdBC", mfloat }, -{"fbnge.l", one(0xF0DC), one(0xF1FF), "IdBC", mfloat }, -{"fbngl.l", one(0xF0D9), one(0xF1FF), "IdBC", mfloat }, -{"fbngle.l", one(0xF0D8), one(0xF1FF), "IdBC", mfloat }, -{"fbngt.l", one(0xF0DD), one(0xF1FF), "IdBC", mfloat }, -{"fbnle.l", one(0xF0DA), one(0xF1FF), "IdBC", mfloat }, -{"fbnlt.l", one(0xF0DB), one(0xF1FF), "IdBC", mfloat }, -{"fboge.l", one(0xF0C3), one(0xF1FF), "IdBC", mfloat }, -{"fbogl.l", one(0xF0C6), one(0xF1FF), "IdBC", mfloat }, -{"fbogt.l", one(0xF0C2), one(0xF1FF), "IdBC", mfloat }, -{"fbole.l", one(0xF0C5), one(0xF1FF), "IdBC", mfloat }, -{"fbolt.l", one(0xF0C4), one(0xF1FF), "IdBC", mfloat }, -{"fbor.l", one(0xF0C7), one(0xF1FF), "IdBC", mfloat }, -{"fbseq.l", one(0xF0D1), one(0xF1FF), "IdBC", mfloat }, -{"fbsf.l", one(0xF0D0), one(0xF1FF), "IdBC", mfloat }, -{"fbsne.l", one(0xF0DE), one(0xF1FF), "IdBC", mfloat }, -{"fbst.l", one(0xF0DF), one(0xF1FF), "IdBC", mfloat }, -{"fbt.l", one(0xF0CF), one(0xF1FF), "IdBC", mfloat }, -{"fbueq.l", one(0xF0C9), one(0xF1FF), "IdBC", mfloat }, -{"fbuge.l", one(0xF0CB), one(0xF1FF), "IdBC", mfloat }, -{"fbugt.l", one(0xF0CA), one(0xF1FF), "IdBC", mfloat }, -{"fbule.l", one(0xF0CD), one(0xF1FF), "IdBC", mfloat }, -{"fbult.l", one(0xF0CC), one(0xF1FF), "IdBC", mfloat }, -{"fbun.l", one(0xF0C8), one(0xF1FF), "IdBC", mfloat }, - -{"fjeq", one(0xF081), one(0xF1BF), "IdBc", mfloat }, -{"fjf", one(0xF080), one(0xF1BF), "IdBc", mfloat }, -{"fjge", one(0xF093), one(0xF1BF), "IdBc", mfloat }, -{"fjgl", one(0xF096), one(0xF1BF), "IdBc", mfloat }, -{"fjgle", one(0xF097), one(0xF1BF), "IdBc", mfloat }, -{"fjgt", one(0xF092), one(0xF1BF), "IdBc", mfloat }, -{"fjle", one(0xF095), one(0xF1BF), "IdBc", mfloat }, -{"fjlt", one(0xF094), one(0xF1BF), "IdBc", mfloat }, -{"fjne", one(0xF08E), one(0xF1BF), "IdBc", mfloat }, -{"fjnge", one(0xF09C), one(0xF1BF), "IdBc", mfloat }, -{"fjngl", one(0xF099), one(0xF1BF), "IdBc", mfloat }, -{"fjngle", one(0xF098), one(0xF1BF), "IdBc", mfloat }, -{"fjngt", one(0xF09D), one(0xF1BF), "IdBc", mfloat }, -{"fjnle", one(0xF09A), one(0xF1BF), "IdBc", mfloat }, -{"fjnlt", one(0xF09B), one(0xF1BF), "IdBc", mfloat }, -{"fjoge", one(0xF083), one(0xF1BF), "IdBc", mfloat }, -{"fjogl", one(0xF086), one(0xF1BF), "IdBc", mfloat }, -{"fjogt", one(0xF082), one(0xF1BF), "IdBc", mfloat }, -{"fjole", one(0xF085), one(0xF1BF), "IdBc", mfloat }, -{"fjolt", one(0xF084), one(0xF1BF), "IdBc", mfloat }, -{"fjor", one(0xF087), one(0xF1BF), "IdBc", mfloat }, -{"fjseq", one(0xF091), one(0xF1BF), "IdBc", mfloat }, -{"fjsf", one(0xF090), one(0xF1BF), "IdBc", mfloat }, -{"fjsne", one(0xF09E), one(0xF1BF), "IdBc", mfloat }, -{"fjst", one(0xF09F), one(0xF1BF), "IdBc", mfloat }, -{"fjt", one(0xF08F), one(0xF1BF), "IdBc", mfloat }, -{"fjueq", one(0xF089), one(0xF1BF), "IdBc", mfloat }, -{"fjuge", one(0xF08B), one(0xF1BF), "IdBc", mfloat }, -{"fjugt", one(0xF08A), one(0xF1BF), "IdBc", mfloat }, -{"fjule", one(0xF08D), one(0xF1BF), "IdBc", mfloat }, -{"fjult", one(0xF08C), one(0xF1BF), "IdBc", mfloat }, -{"fjun", one(0xF088), one(0xF1BF), "IdBc", mfloat }, - -{"fcmp.b", two(0xF000, 0x5838), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fcmp.d", two(0xF000, 0x5438), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fcmp.l", two(0xF000, 0x4038), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fcmp.p", two(0xF000, 0x4C38), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fcmp.s", two(0xF000, 0x4438), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fcmp.w", two(0xF000, 0x5038), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fcmp.x", two(0xF000, 0x0038), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fcmp.x", two(0xF000, 0x4838), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"fcos.b", two(0xF000, 0x581D), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fcos.d", two(0xF000, 0x541D), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fcos.l", two(0xF000, 0x401D), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fcos.p", two(0xF000, 0x4C1D), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fcos.s", two(0xF000, 0x441D), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fcos.w", two(0xF000, 0x501D), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fcos.x", two(0xF000, 0x001D), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fcos.x", two(0xF000, 0x481D), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fcos.x", two(0xF000, 0x001D), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fcosh.b", two(0xF000, 0x5819), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fcosh.d", two(0xF000, 0x5419), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fcosh.l", two(0xF000, 0x4019), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fcosh.p", two(0xF000, 0x4C19), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fcosh.s", two(0xF000, 0x4419), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fcosh.w", two(0xF000, 0x5019), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fcosh.x", two(0xF000, 0x0019), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fcosh.x", two(0xF000, 0x4819), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fcosh.x", two(0xF000, 0x0019), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fdbeq", two(0xF048, 0x0001), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbf", two(0xF048, 0x0000), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbge", two(0xF048, 0x0013), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbgl", two(0xF048, 0x0016), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbgle", two(0xF048, 0x0017), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbgt", two(0xF048, 0x0012), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdble", two(0xF048, 0x0015), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdblt", two(0xF048, 0x0014), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbne", two(0xF048, 0x000E), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbnge", two(0xF048, 0x001C), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbngl", two(0xF048, 0x0019), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbngle", two(0xF048, 0x0018), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbngt", two(0xF048, 0x001D), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbnle", two(0xF048, 0x001A), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbnlt", two(0xF048, 0x001B), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdboge", two(0xF048, 0x0003), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbogl", two(0xF048, 0x0006), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbogt", two(0xF048, 0x0002), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbole", two(0xF048, 0x0005), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbolt", two(0xF048, 0x0004), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbor", two(0xF048, 0x0007), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbseq", two(0xF048, 0x0011), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbsf", two(0xF048, 0x0010), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbsne", two(0xF048, 0x001E), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbst", two(0xF048, 0x001F), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbt", two(0xF048, 0x000F), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbueq", two(0xF048, 0x0009), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbuge", two(0xF048, 0x000B), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbugt", two(0xF048, 0x000A), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbule", two(0xF048, 0x000D), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbult", two(0xF048, 0x000C), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, -{"fdbun", two(0xF048, 0x0008), two(0xF1F8, 0xFFFF), "IiDsBw", mfloat }, - -{"fdiv.b", two(0xF000, 0x5820), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fdiv.d", two(0xF000, 0x5420), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fdiv.l", two(0xF000, 0x4020), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fdiv.p", two(0xF000, 0x4C20), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fdiv.s", two(0xF000, 0x4420), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fdiv.w", two(0xF000, 0x5020), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fdiv.x", two(0xF000, 0x0020), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fdiv.x", two(0xF000, 0x4820), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"fsdiv.b", two(0xF000, 0x5860), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsdiv.d", two(0xF000, 0x5460), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsdiv.l", two(0xF000, 0x4060), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsdiv.p", two(0xF000, 0x4C60), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fsdiv.s", two(0xF000, 0x4460), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsdiv.w", two(0xF000, 0x5060), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsdiv.x", two(0xF000, 0x0060), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsdiv.x", two(0xF000, 0x4860), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fddiv.b", two(0xF000, 0x5864), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fddiv.d", two(0xF000, 0x5464), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fddiv.l", two(0xF000, 0x4064), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fddiv.p", two(0xF000, 0x4C64), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fddiv.s", two(0xF000, 0x4464), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fddiv.w", two(0xF000, 0x5064), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fddiv.x", two(0xF000, 0x0064), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fddiv.x", two(0xF000, 0x4864), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fetox.b", two(0xF000, 0x5810), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fetox.d", two(0xF000, 0x5410), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fetox.l", two(0xF000, 0x4010), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fetox.p", two(0xF000, 0x4C10), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fetox.s", two(0xF000, 0x4410), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fetox.w", two(0xF000, 0x5010), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fetox.x", two(0xF000, 0x0010), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fetox.x", two(0xF000, 0x4810), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fetox.x", two(0xF000, 0x0010), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fetoxm1.b", two(0xF000, 0x5808), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fetoxm1.d", two(0xF000, 0x5408), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fetoxm1.l", two(0xF000, 0x4008), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fetoxm1.p", two(0xF000, 0x4C08), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fetoxm1.s", two(0xF000, 0x4408), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fetoxm1.w", two(0xF000, 0x5008), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fetoxm1.x", two(0xF000, 0x0008), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fetoxm1.x", two(0xF000, 0x4808), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fetoxm1.x", two(0xF000, 0x0008), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fgetexp.b", two(0xF000, 0x581E), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fgetexp.d", two(0xF000, 0x541E), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fgetexp.l", two(0xF000, 0x401E), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fgetexp.p", two(0xF000, 0x4C1E), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fgetexp.s", two(0xF000, 0x441E), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fgetexp.w", two(0xF000, 0x501E), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fgetexp.x", two(0xF000, 0x001E), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fgetexp.x", two(0xF000, 0x481E), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fgetexp.x", two(0xF000, 0x001E), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fgetman.b", two(0xF000, 0x581F), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fgetman.d", two(0xF000, 0x541F), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fgetman.l", two(0xF000, 0x401F), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fgetman.p", two(0xF000, 0x4C1F), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fgetman.s", two(0xF000, 0x441F), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fgetman.w", two(0xF000, 0x501F), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fgetman.x", two(0xF000, 0x001F), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fgetman.x", two(0xF000, 0x481F), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fgetman.x", two(0xF000, 0x001F), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fint.b", two(0xF000, 0x5801), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fint.d", two(0xF000, 0x5401), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fint.l", two(0xF000, 0x4001), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fint.p", two(0xF000, 0x4C01), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fint.s", two(0xF000, 0x4401), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fint.w", two(0xF000, 0x5001), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fint.x", two(0xF000, 0x0001), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fint.x", two(0xF000, 0x4801), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fint.x", two(0xF000, 0x0001), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fintrz.b", two(0xF000, 0x5803), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fintrz.d", two(0xF000, 0x5403), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fintrz.l", two(0xF000, 0x4003), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fintrz.p", two(0xF000, 0x4C03), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fintrz.s", two(0xF000, 0x4403), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fintrz.w", two(0xF000, 0x5003), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fintrz.x", two(0xF000, 0x0003), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fintrz.x", two(0xF000, 0x4803), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fintrz.x", two(0xF000, 0x0003), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"flog10.b", two(0xF000, 0x5815), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"flog10.d", two(0xF000, 0x5415), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"flog10.l", two(0xF000, 0x4015), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"flog10.p", two(0xF000, 0x4C15), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"flog10.s", two(0xF000, 0x4415), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"flog10.w", two(0xF000, 0x5015), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"flog10.x", two(0xF000, 0x0015), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"flog10.x", two(0xF000, 0x4815), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"flog10.x", two(0xF000, 0x0015), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"flog2.b", two(0xF000, 0x5816), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"flog2.d", two(0xF000, 0x5416), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"flog2.l", two(0xF000, 0x4016), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"flog2.p", two(0xF000, 0x4C16), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"flog2.s", two(0xF000, 0x4416), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"flog2.w", two(0xF000, 0x5016), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"flog2.x", two(0xF000, 0x0016), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"flog2.x", two(0xF000, 0x4816), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"flog2.x", two(0xF000, 0x0016), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"flogn.b", two(0xF000, 0x5814), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"flogn.d", two(0xF000, 0x5414), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"flogn.l", two(0xF000, 0x4014), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"flogn.p", two(0xF000, 0x4C14), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"flogn.s", two(0xF000, 0x4414), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"flogn.w", two(0xF000, 0x5014), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"flogn.x", two(0xF000, 0x0014), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"flogn.x", two(0xF000, 0x4814), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"flogn.x", two(0xF000, 0x0014), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"flognp1.b", two(0xF000, 0x5806), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"flognp1.d", two(0xF000, 0x5406), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"flognp1.l", two(0xF000, 0x4006), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"flognp1.p", two(0xF000, 0x4C06), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"flognp1.s", two(0xF000, 0x4406), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"flognp1.w", two(0xF000, 0x5006), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"flognp1.x", two(0xF000, 0x0006), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"flognp1.x", two(0xF000, 0x4806), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"flognp1.x", two(0xF000, 0x0006), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fmod.b", two(0xF000, 0x5821), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fmod.d", two(0xF000, 0x5421), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fmod.l", two(0xF000, 0x4021), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fmod.p", two(0xF000, 0x4C21), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fmod.s", two(0xF000, 0x4421), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fmod.w", two(0xF000, 0x5021), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fmod.x", two(0xF000, 0x0021), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fmod.x", two(0xF000, 0x4821), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"fmove.b", two(0xF000, 0x5800), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fmove.b", two(0xF000, 0x7800), two(0xF1C0, 0xFC7F), "IiF7$b", mfloat }, -{"fmove.d", two(0xF000, 0x5400), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fmove.d", two(0xF000, 0x7400), two(0xF1C0, 0xFC7F), "IiF7~F", mfloat }, -{"fmove.l", two(0xF000, 0x4000), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fmove.l", two(0xF000, 0x6000), two(0xF1C0, 0xFC7F), "IiF7$l", mfloat }, -/* FIXME: the next two variants should not permit moving an address - register to anything but the floating point instruction register. */ -{"fmove.l", two(0xF000, 0xA000), two(0xF1C0, 0xE3FF), "Iis8%s", mfloat }, -{"fmove.l", two(0xF000, 0x8000), two(0xF1C0, 0xE3FF), "Ii*ls8", mfloat }, -{"fmove.p", two(0xF000, 0x4C00), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fmove.p", two(0xF000, 0x6C00), two(0xF1C0, 0xFC00), "IiF7~pkC", mfloat }, -{"fmove.p", two(0xF000, 0x7C00), two(0xF1C0, 0xFC0F), "IiF7~pDk", mfloat }, -{"fmove.s", two(0xF000, 0x4400), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fmove.s", two(0xF000, 0x6400), two(0xF1C0, 0xFC7F), "IiF7$f", mfloat }, -{"fmove.w", two(0xF000, 0x5000), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fmove.w", two(0xF000, 0x7000), two(0xF1C0, 0xFC7F), "IiF7$w", mfloat }, -{"fmove.x", two(0xF000, 0x0000), two(0xF1FF, 0xE07F), "IiF8F7", mfloat }, -{"fmove.x", two(0xF000, 0x4800), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fmove.x", two(0xF000, 0x6800), two(0xF1C0, 0xFC7F), "IiF7~x", mfloat }, - -{"fsmove.b", two(0xF000, 0x5840), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsmove.d", two(0xF000, 0x5440), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsmove.l", two(0xF000, 0x4040), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsmove.s", two(0xF000, 0x4440), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsmove.w", two(0xF000, 0x5040), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsmove.x", two(0xF000, 0x0040), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsmove.x", two(0xF000, 0x4840), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fsmove.p", two(0xF000, 0x4C40), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, - -{"fdmove.b", two(0xF000, 0x5844), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdmove.d", two(0xF000, 0x5444), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdmove.l", two(0xF000, 0x4044), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdmove.s", two(0xF000, 0x4444), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdmove.w", two(0xF000, 0x5044), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdmove.x", two(0xF000, 0x0044), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdmove.x", two(0xF000, 0x4844), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fdmove.p", two(0xF000, 0x4C44), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, - -{"fmovecr.x", two(0xF000, 0x5C00), two(0xF1FF, 0xFC00), "Ii#CF7", mfloat }, - -{"fmovem.x", two(0xF000, 0xF800), two(0xF1C0, 0xFF8F), "IiDk&s", mfloat }, -{"fmovem.x", two(0xF020, 0xE800), two(0xF1F8, 0xFF8F), "IiDk-s", mfloat }, -{"fmovem.x", two(0xF000, 0xD800), two(0xF1C0, 0xFF8F), "Ii&sDk", mfloat }, -{"fmovem.x", two(0xF018, 0xD800), two(0xF1F8, 0xFF8F), "Ii+sDk", mfloat }, -{"fmovem.x", two(0xF000, 0xF000), two(0xF1C0, 0xFF00), "Idl3&s", mfloat }, -{"fmovem.x", two(0xF000, 0xF000), two(0xF1C0, 0xFF00), "Id#3&s", mfloat }, -{"fmovem.x", two(0xF000, 0xD000), two(0xF1C0, 0xFF00), "Id&sl3", mfloat }, -{"fmovem.x", two(0xF000, 0xD000), two(0xF1C0, 0xFF00), "Id&s#3", mfloat }, -{"fmovem.x", two(0xF020, 0xE000), two(0xF1F8, 0xFF00), "IdL3-s", mfloat }, -{"fmovem.x", two(0xF020, 0xE000), two(0xF1F8, 0xFF00), "Id#3-s", mfloat }, -{"fmovem.x", two(0xF018, 0xD000), two(0xF1F8, 0xFF00), "Id+sl3", mfloat }, -{"fmovem.x", two(0xF018, 0xD000), two(0xF1F8, 0xFF00), "Id+s#3", mfloat }, - -{"fmovem.l", two(0xF000, 0xA000), two(0xF1C0, 0xE3FF), "Iis8%s", mfloat }, -{"fmovem.l", two(0xF000, 0xA000), two(0xF1C0, 0xE3FF), "IiL8~s", mfloat }, -/* FIXME: In the next instruction, we should only permit %dn if the - target is a single register. We should only permit %an if the - target is a single %fpiar. */ -{"fmovem.l", two(0xF000, 0x8000), two(0xF1C0, 0xE3FF), "Ii*lL8", mfloat }, - -{"fmovem", two(0xF020, 0xE000), two(0xF1F8, 0xFF00), "IdL3-s", mfloat }, -{"fmovem", two(0xF000, 0xF000), two(0xF1C0, 0xFF00), "Idl3&s", mfloat }, -{"fmovem", two(0xF018, 0xD000), two(0xF1F8, 0xFF00), "Id+sl3", mfloat }, -{"fmovem", two(0xF000, 0xD000), two(0xF1C0, 0xFF00), "Id&sl3", mfloat }, -{"fmovem", two(0xF020, 0xE000), two(0xF1F8, 0xFF00), "Id#3-s", mfloat }, -{"fmovem", two(0xF020, 0xE800), two(0xF1F8, 0xFF8F), "IiDk-s", mfloat }, -{"fmovem", two(0xF000, 0xF000), two(0xF1C0, 0xFF00), "Id#3&s", mfloat }, -{"fmovem", two(0xF000, 0xF800), two(0xF1C0, 0xFF8F), "IiDk&s", mfloat }, -{"fmovem", two(0xF018, 0xD000), two(0xF1F8, 0xFF00), "Id+s#3", mfloat }, -{"fmovem", two(0xF018, 0xD800), two(0xF1F8, 0xFF8F), "Ii+sDk", mfloat }, -{"fmovem", two(0xF000, 0xD000), two(0xF1C0, 0xFF00), "Id&s#3", mfloat }, -{"fmovem", two(0xF000, 0xD800), two(0xF1C0, 0xFF8F), "Ii&sDk", mfloat }, -{"fmovem", two(0xF000, 0xA000), two(0xF1C0, 0xE3FF), "Iis8%s", mfloat }, -{"fmovem", two(0xF000, 0x8000), two(0xF1C0, 0xE3FF), "Ii*ss8", mfloat }, -{"fmovem", two(0xF000, 0xA000), two(0xF1C0, 0xE3FF), "IiL8~s", mfloat }, -{"fmovem", two(0xF000, 0x8000), two(0xF2C0, 0xE3FF), "Ii*sL8", mfloat }, - -{"fmul.b", two(0xF000, 0x5823), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fmul.d", two(0xF000, 0x5423), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fmul.l", two(0xF000, 0x4023), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fmul.p", two(0xF000, 0x4C23), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fmul.s", two(0xF000, 0x4423), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fmul.w", two(0xF000, 0x5023), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fmul.x", two(0xF000, 0x0023), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fmul.x", two(0xF000, 0x4823), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"fsmul.b", two(0xF000, 0x5863), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsmul.d", two(0xF000, 0x5463), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsmul.l", two(0xF000, 0x4063), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsmul.p", two(0xF000, 0x4C63), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fsmul.s", two(0xF000, 0x4463), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsmul.w", two(0xF000, 0x5063), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsmul.x", two(0xF000, 0x0063), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsmul.x", two(0xF000, 0x4863), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fdmul.b", two(0xF000, 0x5867), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdmul.d", two(0xF000, 0x5467), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdmul.l", two(0xF000, 0x4067), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdmul.p", two(0xF000, 0x4C67), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fdmul.s", two(0xF000, 0x4467), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdmul.w", two(0xF000, 0x5067), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdmul.x", two(0xF000, 0x0067), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdmul.x", two(0xF000, 0x4867), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, - -{"fneg.b", two(0xF000, 0x581A), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fneg.d", two(0xF000, 0x541A), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fneg.l", two(0xF000, 0x401A), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fneg.p", two(0xF000, 0x4C1A), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fneg.s", two(0xF000, 0x441A), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fneg.w", two(0xF000, 0x501A), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fneg.x", two(0xF000, 0x001A), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fneg.x", two(0xF000, 0x481A), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fneg.x", two(0xF000, 0x001A), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsneg.b", two(0xF000, 0x585A), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fsneg.d", two(0xF000, 0x545A), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fsneg.l", two(0xF000, 0x405A), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fsneg.p", two(0xF000, 0x4C5A), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fsneg.s", two(0xF000, 0x445A), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fsneg.w", two(0xF000, 0x505A), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fsneg.x", two(0xF000, 0x005A), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fsneg.x", two(0xF000, 0x485A), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fsneg.x", two(0xF000, 0x005A), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fdneg.b", two(0xF000, 0x585E), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdneg.d", two(0xF000, 0x545E), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdneg.l", two(0xF000, 0x405E), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdneg.p", two(0xF000, 0x4C5E), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fdneg.s", two(0xF000, 0x445E), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdneg.w", two(0xF000, 0x505E), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdneg.x", two(0xF000, 0x005E), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdneg.x", two(0xF000, 0x485E), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fdneg.x", two(0xF000, 0x005E), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fnop", two(0xF280, 0x0000), two(0xFFFF, 0xFFFF), "Ii", mfloat }, - -{"frem.b", two(0xF000, 0x5825), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"frem.d", two(0xF000, 0x5425), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"frem.l", two(0xF000, 0x4025), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"frem.p", two(0xF000, 0x4C25), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"frem.s", two(0xF000, 0x4425), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"frem.w", two(0xF000, 0x5025), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"frem.x", two(0xF000, 0x0025), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"frem.x", two(0xF000, 0x4825), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -{"frestore", one(0xF140), one(0xF1C0), "Ids", mfloat }, - -{"fscale.b", two(0xF000, 0x5826), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fscale.d", two(0xF000, 0x5426), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fscale.l", two(0xF000, 0x4026), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fscale.p", two(0xF000, 0x4C26), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fscale.s", two(0xF000, 0x4426), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fscale.w", two(0xF000, 0x5026), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fscale.x", two(0xF000, 0x0026), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fscale.x", two(0xF000, 0x4826), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, - -/* $ is necessary to prevent the assembler from using PC-relative. - If @ were used, "label: fseq label" could produce "ftrapeq", - because "label" became "pc@label". */ -{"fseq", two(0xF040, 0x0001), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsf", two(0xF040, 0x0000), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsge", two(0xF040, 0x0013), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsgl", two(0xF040, 0x0016), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsgle", two(0xF040, 0x0017), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsgt", two(0xF040, 0x0012), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsle", two(0xF040, 0x0015), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fslt", two(0xF040, 0x0014), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsne", two(0xF040, 0x000E), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsnge", two(0xF040, 0x001C), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsngl", two(0xF040, 0x0019), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsngle", two(0xF040, 0x0018), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsngt", two(0xF040, 0x001D), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsnle", two(0xF040, 0x001A), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsnlt", two(0xF040, 0x001B), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsoge", two(0xF040, 0x0003), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsogl", two(0xF040, 0x0006), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsogt", two(0xF040, 0x0002), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsole", two(0xF040, 0x0005), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsolt", two(0xF040, 0x0004), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsor", two(0xF040, 0x0007), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsseq", two(0xF040, 0x0011), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fssf", two(0xF040, 0x0010), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fssne", two(0xF040, 0x001E), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsst", two(0xF040, 0x001F), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fst", two(0xF040, 0x000F), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsueq", two(0xF040, 0x0009), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsuge", two(0xF040, 0x000B), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsugt", two(0xF040, 0x000A), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsule", two(0xF040, 0x000D), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsult", two(0xF040, 0x000C), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, -{"fsun", two(0xF040, 0x0008), two(0xF1C0, 0xFFFF), "Ii$s", mfloat }, - -{"fsgldiv.b", two(0xF000, 0x5824), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsgldiv.d", two(0xF000, 0x5424), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsgldiv.l", two(0xF000, 0x4024), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsgldiv.p", two(0xF000, 0x4C24), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsgldiv.s", two(0xF000, 0x4424), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsgldiv.w", two(0xF000, 0x5024), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsgldiv.x", two(0xF000, 0x0024), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsgldiv.x", two(0xF000, 0x4824), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsgldiv.x", two(0xF000, 0x0024), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsglmul.b", two(0xF000, 0x5827), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsglmul.d", two(0xF000, 0x5427), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsglmul.l", two(0xF000, 0x4027), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsglmul.p", two(0xF000, 0x4C27), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsglmul.s", two(0xF000, 0x4427), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsglmul.w", two(0xF000, 0x5027), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsglmul.x", two(0xF000, 0x0027), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsglmul.x", two(0xF000, 0x4827), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsglmul.x", two(0xF000, 0x0027), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsin.b", two(0xF000, 0x580E), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsin.d", two(0xF000, 0x540E), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsin.l", two(0xF000, 0x400E), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsin.p", two(0xF000, 0x4C0E), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsin.s", two(0xF000, 0x440E), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsin.w", two(0xF000, 0x500E), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsin.x", two(0xF000, 0x000E), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsin.x", two(0xF000, 0x480E), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsin.x", two(0xF000, 0x000E), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsincos.b", two(0xF000, 0x5830), two(0xF1C0, 0xFC78), "Ii;bF3F7", mfloat }, -{"fsincos.d", two(0xF000, 0x5430), two(0xF1C0, 0xFC78), "Ii;FF3F7", mfloat }, -{"fsincos.l", two(0xF000, 0x4030), two(0xF1C0, 0xFC78), "Ii;lF3F7", mfloat }, -{"fsincos.p", two(0xF000, 0x4C30), two(0xF1C0, 0xFC78), "Ii;pF3F7", mfloat }, -{"fsincos.s", two(0xF000, 0x4430), two(0xF1C0, 0xFC78), "Ii;fF3F7", mfloat }, -{"fsincos.w", two(0xF000, 0x5030), two(0xF1C0, 0xFC78), "Ii;wF3F7", mfloat }, -{"fsincos.x", two(0xF000, 0x0030), two(0xF1C0, 0xE078), "IiF8F3F7", mfloat }, -{"fsincos.x", two(0xF000, 0x4830), two(0xF1C0, 0xFC78), "Ii;xF3F7", mfloat }, - -{"fsinh.b", two(0xF000, 0x5802), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsinh.d", two(0xF000, 0x5402), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsinh.l", two(0xF000, 0x4002), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsinh.p", two(0xF000, 0x4C02), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsinh.s", two(0xF000, 0x4402), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsinh.w", two(0xF000, 0x5002), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsinh.x", two(0xF000, 0x0002), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsinh.x", two(0xF000, 0x4802), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsinh.x", two(0xF000, 0x0002), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fsqrt.b", two(0xF000, 0x5804), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsqrt.d", two(0xF000, 0x5404), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsqrt.l", two(0xF000, 0x4004), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsqrt.p", two(0xF000, 0x4C04), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsqrt.s", two(0xF000, 0x4404), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsqrt.w", two(0xF000, 0x5004), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsqrt.x", two(0xF000, 0x0004), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsqrt.x", two(0xF000, 0x4804), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsqrt.x", two(0xF000, 0x0004), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fssqrt.b", two(0xF000, 0x5841), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fssqrt.d", two(0xF000, 0x5441), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fssqrt.l", two(0xF000, 0x4041), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fssqrt.p", two(0xF000, 0x4C41), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fssqrt.s", two(0xF000, 0x4441), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fssqrt.w", two(0xF000, 0x5041), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fssqrt.x", two(0xF000, 0x0041), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fssqrt.x", two(0xF000, 0x4841), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fssqrt.x", two(0xF000, 0x0041), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fdsqrt.b", two(0xF000, 0x5845), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdsqrt.d", two(0xF000, 0x5445), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdsqrt.l", two(0xF000, 0x4045), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdsqrt.p", two(0xF000, 0x4C45), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fdsqrt.s", two(0xF000, 0x4445), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdsqrt.w", two(0xF000, 0x5045), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdsqrt.x", two(0xF000, 0x0045), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdsqrt.x", two(0xF000, 0x4845), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fdsqrt.x", two(0xF000, 0x0045), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fsub.b", two(0xF000, 0x5828), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"fsub.d", two(0xF000, 0x5428), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"fsub.l", two(0xF000, 0x4028), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"fsub.p", two(0xF000, 0x4C28), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"fsub.s", two(0xF000, 0x4428), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"fsub.w", two(0xF000, 0x5028), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"fsub.x", two(0xF000, 0x0028), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"fsub.x", two(0xF000, 0x4828), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"fsub.x", two(0xF000, 0x0028), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"fssub.b", two(0xF000, 0x5868), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fssub.d", two(0xF000, 0x5468), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fssub.l", two(0xF000, 0x4068), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fssub.p", two(0xF000, 0x4C68), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fssub.s", two(0xF000, 0x4468), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fssub.w", two(0xF000, 0x5068), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fssub.x", two(0xF000, 0x0068), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fssub.x", two(0xF000, 0x4868), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fssub.x", two(0xF000, 0x0068), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"fdsub.b", two(0xF000, 0x586c), two(0xF1C0, 0xFC7F), "Ii;bF7", m68040up }, -{"fdsub.d", two(0xF000, 0x546c), two(0xF1C0, 0xFC7F), "Ii;FF7", m68040up }, -{"fdsub.l", two(0xF000, 0x406c), two(0xF1C0, 0xFC7F), "Ii;lF7", m68040up }, -{"fdsub.p", two(0xF000, 0x4C6c), two(0xF1C0, 0xFC7F), "Ii;pF7", m68040up }, -{"fdsub.s", two(0xF000, 0x446c), two(0xF1C0, 0xFC7F), "Ii;fF7", m68040up }, -{"fdsub.w", two(0xF000, 0x506c), two(0xF1C0, 0xFC7F), "Ii;wF7", m68040up }, -{"fdsub.x", two(0xF000, 0x006c), two(0xF1C0, 0xE07F), "IiF8F7", m68040up }, -{"fdsub.x", two(0xF000, 0x486c), two(0xF1C0, 0xFC7F), "Ii;xF7", m68040up }, -{"fdsub.x", two(0xF000, 0x006c), two(0xF1C0, 0xE07F), "IiFt", m68040up }, - -{"ftan.b", two(0xF000, 0x580F), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"ftan.d", two(0xF000, 0x540F), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"ftan.l", two(0xF000, 0x400F), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"ftan.p", two(0xF000, 0x4C0F), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"ftan.s", two(0xF000, 0x440F), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"ftan.w", two(0xF000, 0x500F), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"ftan.x", two(0xF000, 0x000F), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"ftan.x", two(0xF000, 0x480F), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"ftan.x", two(0xF000, 0x000F), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"ftanh.b", two(0xF000, 0x5809), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"ftanh.d", two(0xF000, 0x5409), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"ftanh.l", two(0xF000, 0x4009), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"ftanh.p", two(0xF000, 0x4C09), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"ftanh.s", two(0xF000, 0x4409), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"ftanh.w", two(0xF000, 0x5009), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"ftanh.x", two(0xF000, 0x0009), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"ftanh.x", two(0xF000, 0x4809), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"ftanh.x", two(0xF000, 0x0009), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"ftentox.b", two(0xF000, 0x5812), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"ftentox.d", two(0xF000, 0x5412), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"ftentox.l", two(0xF000, 0x4012), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"ftentox.p", two(0xF000, 0x4C12), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"ftentox.s", two(0xF000, 0x4412), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"ftentox.w", two(0xF000, 0x5012), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"ftentox.x", two(0xF000, 0x0012), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"ftentox.x", two(0xF000, 0x4812), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"ftentox.x", two(0xF000, 0x0012), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"ftrapeq", two(0xF07C, 0x0001), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapf", two(0xF07C, 0x0000), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapge", two(0xF07C, 0x0013), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapgl", two(0xF07C, 0x0016), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapgle", two(0xF07C, 0x0017), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapgt", two(0xF07C, 0x0012), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftraple", two(0xF07C, 0x0015), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftraplt", two(0xF07C, 0x0014), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapne", two(0xF07C, 0x000E), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapnge", two(0xF07C, 0x001C), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapngl", two(0xF07C, 0x0019), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapngle", two(0xF07C, 0x0018), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapngt", two(0xF07C, 0x001D), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapnle", two(0xF07C, 0x001A), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapnlt", two(0xF07C, 0x001B), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapoge", two(0xF07C, 0x0003), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapogl", two(0xF07C, 0x0006), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapogt", two(0xF07C, 0x0002), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapole", two(0xF07C, 0x0005), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapolt", two(0xF07C, 0x0004), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapor", two(0xF07C, 0x0007), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapseq", two(0xF07C, 0x0011), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapsf", two(0xF07C, 0x0010), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapsne", two(0xF07C, 0x001E), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapst", two(0xF07C, 0x001F), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapt", two(0xF07C, 0x000F), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapueq", two(0xF07C, 0x0009), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapuge", two(0xF07C, 0x000B), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapugt", two(0xF07C, 0x000A), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapule", two(0xF07C, 0x000D), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapult", two(0xF07C, 0x000C), two(0xF1FF, 0xFFFF), "Ii", mfloat }, -{"ftrapun", two(0xF07C, 0x0008), two(0xF1FF, 0xFFFF), "Ii", mfloat }, - -{"ftrapeq.w", two(0xF07A, 0x0001), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapf.w", two(0xF07A, 0x0000), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapge.w", two(0xF07A, 0x0013), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapgl.w", two(0xF07A, 0x0016), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapgle.w", two(0xF07A, 0x0017), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapgt.w", two(0xF07A, 0x0012), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftraple.w", two(0xF07A, 0x0015), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftraplt.w", two(0xF07A, 0x0014), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapne.w", two(0xF07A, 0x000E), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapnge.w", two(0xF07A, 0x001C), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapngl.w", two(0xF07A, 0x0019), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapngle.w", two(0xF07A, 0x0018), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapngt.w", two(0xF07A, 0x001D), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapnle.w", two(0xF07A, 0x001A), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapnlt.w", two(0xF07A, 0x001B), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapoge.w", two(0xF07A, 0x0003), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapogl.w", two(0xF07A, 0x0006), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapogt.w", two(0xF07A, 0x0002), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapole.w", two(0xF07A, 0x0005), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapolt.w", two(0xF07A, 0x0004), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapor.w", two(0xF07A, 0x0007), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapseq.w", two(0xF07A, 0x0011), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapsf.w", two(0xF07A, 0x0010), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapsne.w", two(0xF07A, 0x001E), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapst.w", two(0xF07A, 0x001F), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapt.w", two(0xF07A, 0x000F), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapueq.w", two(0xF07A, 0x0009), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapuge.w", two(0xF07A, 0x000B), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapugt.w", two(0xF07A, 0x000A), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapule.w", two(0xF07A, 0x000D), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapult.w", two(0xF07A, 0x000C), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, -{"ftrapun.w", two(0xF07A, 0x0008), two(0xF1FF, 0xFFFF), "Ii^w", mfloat }, - -{"ftrapeq.l", two(0xF07B, 0x0001), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapf.l", two(0xF07B, 0x0000), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapge.l", two(0xF07B, 0x0013), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapgl.l", two(0xF07B, 0x0016), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapgle.l", two(0xF07B, 0x0017), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapgt.l", two(0xF07B, 0x0012), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftraple.l", two(0xF07B, 0x0015), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftraplt.l", two(0xF07B, 0x0014), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapne.l", two(0xF07B, 0x000E), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapnge.l", two(0xF07B, 0x001C), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapngl.l", two(0xF07B, 0x0019), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapngle.l", two(0xF07B, 0x0018), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapngt.l", two(0xF07B, 0x001D), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapnle.l", two(0xF07B, 0x001A), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapnlt.l", two(0xF07B, 0x001B), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapoge.l", two(0xF07B, 0x0003), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapogl.l", two(0xF07B, 0x0006), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapogt.l", two(0xF07B, 0x0002), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapole.l", two(0xF07B, 0x0005), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapolt.l", two(0xF07B, 0x0004), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapor.l", two(0xF07B, 0x0007), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapseq.l", two(0xF07B, 0x0011), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapsf.l", two(0xF07B, 0x0010), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapsne.l", two(0xF07B, 0x001E), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapst.l", two(0xF07B, 0x001F), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapt.l", two(0xF07B, 0x000F), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapueq.l", two(0xF07B, 0x0009), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapuge.l", two(0xF07B, 0x000B), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapugt.l", two(0xF07B, 0x000A), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapule.l", two(0xF07B, 0x000D), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapult.l", two(0xF07B, 0x000C), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, -{"ftrapun.l", two(0xF07B, 0x0008), two(0xF1FF, 0xFFFF), "Ii^l", mfloat }, - -{"ftst.b", two(0xF000, 0x583A), two(0xF1C0, 0xFC7F), "Ii;b", mfloat }, -{"ftst.d", two(0xF000, 0x543A), two(0xF1C0, 0xFC7F), "Ii;F", mfloat }, -{"ftst.l", two(0xF000, 0x403A), two(0xF1C0, 0xFC7F), "Ii;l", mfloat }, -{"ftst.p", two(0xF000, 0x4C3A), two(0xF1C0, 0xFC7F), "Ii;p", mfloat }, -{"ftst.s", two(0xF000, 0x443A), two(0xF1C0, 0xFC7F), "Ii;f", mfloat }, -{"ftst.w", two(0xF000, 0x503A), two(0xF1C0, 0xFC7F), "Ii;w", mfloat }, -{"ftst.x", two(0xF000, 0x003A), two(0xF1C0, 0xE07F), "IiF8", mfloat }, -{"ftst.x", two(0xF000, 0x483A), two(0xF1C0, 0xFC7F), "Ii;x", mfloat }, - -{"ftwotox.b", two(0xF000, 0x5811), two(0xF1C0, 0xFC7F), "Ii;bF7", mfloat }, -{"ftwotox.d", two(0xF000, 0x5411), two(0xF1C0, 0xFC7F), "Ii;FF7", mfloat }, -{"ftwotox.l", two(0xF000, 0x4011), two(0xF1C0, 0xFC7F), "Ii;lF7", mfloat }, -{"ftwotox.p", two(0xF000, 0x4C11), two(0xF1C0, 0xFC7F), "Ii;pF7", mfloat }, -{"ftwotox.s", two(0xF000, 0x4411), two(0xF1C0, 0xFC7F), "Ii;fF7", mfloat }, -{"ftwotox.w", two(0xF000, 0x5011), two(0xF1C0, 0xFC7F), "Ii;wF7", mfloat }, -{"ftwotox.x", two(0xF000, 0x0011), two(0xF1C0, 0xE07F), "IiF8F7", mfloat }, -{"ftwotox.x", two(0xF000, 0x4811), two(0xF1C0, 0xFC7F), "Ii;xF7", mfloat }, -{"ftwotox.x", two(0xF000, 0x0011), two(0xF1C0, 0xE07F), "IiFt", mfloat }, - -{"halt", one(0045310), one(0177777), "", m68060 | mcf5200 }, - -{"illegal", one(0045374), one(0177777), "", m68000up }, - -{"jmp", one(0047300), one(0177700), "!s", m68000up | mcf5200 }, - -{"jra", one(0060000), one(0177400), "Bg", m68000up | mcf5200 }, -{"jra", one(0047300), one(0177700), "!s", m68000up | mcf5200 }, - -{"jsr", one(0047200), one(0177700), "!s", m68000up | mcf5200 }, - -{"jbsr", one(0060400), one(0177400), "Bg", m68000up | mcf5200 }, -{"jbsr", one(0047200), one(0177700), "!s", m68000up | mcf5200 }, - -{"lea", one(0040700), one(0170700), "!sAd", m68000up | mcf5200 }, - -{"lpstop", two(0174000,0000700),two(0177777,0177777),"#w", cpu32|m68060 }, - -{"link.w", one(0047120), one(0177770), "As#w", m68000up | mcf5200 }, -{"link.l", one(0044010), one(0177770), "As#l", m68020up | cpu32 }, -{"link", one(0047120), one(0177770), "As#W", m68000up | mcf5200 }, -{"link", one(0044010), one(0177770), "As#l", m68020up | cpu32 }, - -{"lsl.b", one(0160410), one(0170770), "QdDs", m68000up }, -{"lsl.b", one(0160450), one(0170770), "DdDs", m68000up }, -{"lsl.w", one(0160510), one(0170770), "QdDs", m68000up }, -{"lsl.w", one(0160550), one(0170770), "DdDs", m68000up }, -{"lsl.w", one(0161700), one(0177700), "~s", m68000up }, -{"lsl.l", one(0160610), one(0170770), "QdDs", m68000up | mcf5200 }, -{"lsl.l", one(0160650), one(0170770), "DdDs", m68000up | mcf5200 }, - -{"lsr.b", one(0160010), one(0170770), "QdDs", m68000up }, -{"lsr.b", one(0160050), one(0170770), "DdDs", m68000up }, -{"lsr.w", one(0160110), one(0170770), "QdDs", m68000up }, -{"lsr.w", one(0160150), one(0170770), "DdDs", m68000up }, -{"lsr.w", one(0161300), one(0177700), "~s", m68000up }, -{"lsr.l", one(0160210), one(0170770), "QdDs", m68000up | mcf5200 }, -{"lsr.l", one(0160250), one(0170770), "DdDs", m68000up | mcf5200 }, - -/* NOTE: The mcf5200 family programmer's reference manual does not - indicate the byte form of the movea instruction is invalid (as it - is on 68000 family cpus). However, experiments on the 5202 yeild - unexpected results. The value is copied, but it is not sign extended - (as is done with movea.w) and the top three bytes in the address - register are not disturbed. I don't know if this is the intended - behavior --- it could be a hole in instruction decoding (Motorola - decided not to trap all invalid instructions for performance reasons) - --- but I suspect that it is not. - - I reported this to Motorola ISD Technical Communications Support, - which replied that other coldfire assemblers reject movea.b. For - this reason I've decided to not allow moveab. - - jtc@cygnus.com - 97/01/24 - */ - -{"movea.l", one(0020100), one(0170700), "*lAd", m68000up | mcf5200 }, -{"movea.w", one(0030100), one(0170700), "*wAd", m68000up | mcf5200 }, - -{"movec", one(0047173), one(0177777), "R1Jj", m68010up | mcf5200 }, -{"movec", one(0047173), one(0177777), "R1#j", m68010up | mcf5200 }, -{"movec", one(0047172), one(0177777), "JjR1", m68010up }, -{"movec", one(0047172), one(0177777), "#jR1", m68010up }, - -{"movem.w", one(0044200), one(0177700), "Lw&s", m68000up }, -{"movem.w", one(0044240), one(0177770), "lw-s", m68000up }, -{"movem.w", one(0044200), one(0177700), "#w>s", m68000up }, -{"movem.w", one(0046200), one(0177700), "s", m68000up }, -{"movem.l", one(0046300), one(0177700), "s", m68851 }, - -{"psac", two(0xf040, 0x0007), two(0xffc0, 0xffff), "$s", m68851 }, -{"psas", two(0xf040, 0x0006), two(0xffc0, 0xffff), "$s", m68851 }, -{"psbc", two(0xf040, 0x0001), two(0xffc0, 0xffff), "$s", m68851 }, -{"psbs", two(0xf040, 0x0000), two(0xffc0, 0xffff), "$s", m68851 }, -{"pscc", two(0xf040, 0x000f), two(0xffc0, 0xffff), "$s", m68851 }, -{"pscs", two(0xf040, 0x000e), two(0xffc0, 0xffff), "$s", m68851 }, -{"psgc", two(0xf040, 0x000d), two(0xffc0, 0xffff), "$s", m68851 }, -{"psgs", two(0xf040, 0x000c), two(0xffc0, 0xffff), "$s", m68851 }, -{"psic", two(0xf040, 0x000b), two(0xffc0, 0xffff), "$s", m68851 }, -{"psis", two(0xf040, 0x000a), two(0xffc0, 0xffff), "$s", m68851 }, -{"pslc", two(0xf040, 0x0003), two(0xffc0, 0xffff), "$s", m68851 }, -{"psls", two(0xf040, 0x0002), two(0xffc0, 0xffff), "$s", m68851 }, -{"pssc", two(0xf040, 0x0005), two(0xffc0, 0xffff), "$s", m68851 }, -{"psss", two(0xf040, 0x0004), two(0xffc0, 0xffff), "$s", m68851 }, -{"pswc", two(0xf040, 0x0009), two(0xffc0, 0xffff), "$s", m68851 }, -{"psws", two(0xf040, 0x0008), two(0xffc0, 0xffff), "$s", m68851 }, - -{"ptestr", two(0xf000,0x8210), two(0xffc0, 0xe3f0), "T3&st8", m68030|m68851 }, -{"ptestr", two(0xf000,0x8310), two(0xffc0,0xe310), "T3&st8A9", m68030|m68851 }, -{"ptestr", two(0xf000,0x8208), two(0xffc0,0xe3f8), "D3&st8", m68030|m68851 }, -{"ptestr", two(0xf000,0x8308), two(0xffc0,0xe318), "D3&st8A9", m68030|m68851 }, -{"ptestr", two(0xf000,0x8200), two(0xffc0,0xe3fe), "f3&st8", m68030|m68851 }, -{"ptestr", two(0xf000,0x8300), two(0xffc0,0xe31e), "f3&st8A9", m68030|m68851 }, -{"ptestr", one(0xf568), one(0xfff8), "as", m68040 }, - -{"ptestw", two(0xf000,0x8010), two(0xffc0,0xe3f0), "T3&st8", m68030|m68851 }, -{"ptestw", two(0xf000,0x8110), two(0xffc0,0xe310), "T3&st8A9", m68030|m68851 }, -{"ptestw", two(0xf000,0x8008), two(0xffc0,0xe3f8), "D3&st8", m68030|m68851 }, -{"ptestw", two(0xf000,0x8108), two(0xffc0,0xe318), "D3&st8A9", m68030|m68851 }, -{"ptestw", two(0xf000,0x8000), two(0xffc0,0xe3fe), "f3&st8", m68030|m68851 }, -{"ptestw", two(0xf000,0x8100), two(0xffc0,0xe31e), "f3&st8A9", m68030|m68851 }, -{"ptestw", one(0xf548), one(0xfff8), "as", m68040 }, - -{"ptrapac.w", two(0xf07a, 0x0007), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapac.l", two(0xf07b, 0x0007), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapac", two(0xf07c, 0x0007), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapas.w", two(0xf07a, 0x0006), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapas.l", two(0xf07b, 0x0006), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapas", two(0xf07c, 0x0006), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapbc.w", two(0xf07a, 0x0001), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapbc.l", two(0xf07b, 0x0001), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapbc", two(0xf07c, 0x0001), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapbs.w", two(0xf07a, 0x0000), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapbs.l", two(0xf07b, 0x0000), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapbs", two(0xf07c, 0x0000), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapcc.w", two(0xf07a, 0x000f), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapcc.l", two(0xf07b, 0x000f), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapcc", two(0xf07c, 0x000f), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapcs.w", two(0xf07a, 0x000e), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapcs.l", two(0xf07b, 0x000e), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapcs", two(0xf07c, 0x000e), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapgc.w", two(0xf07a, 0x000d), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapgc.l", two(0xf07b, 0x000d), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapgc", two(0xf07c, 0x000d), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapgs.w", two(0xf07a, 0x000c), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapgs.l", two(0xf07b, 0x000c), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapgs", two(0xf07c, 0x000c), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapic.w", two(0xf07a, 0x000b), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapic.l", two(0xf07b, 0x000b), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapic", two(0xf07c, 0x000b), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapis.w", two(0xf07a, 0x000a), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapis.l", two(0xf07b, 0x000a), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapis", two(0xf07c, 0x000a), two(0xffff, 0xffff), "", m68851 }, - -{"ptraplc.w", two(0xf07a, 0x0003), two(0xffff, 0xffff), "#w", m68851 }, -{"ptraplc.l", two(0xf07b, 0x0003), two(0xffff, 0xffff), "#l", m68851 }, -{"ptraplc", two(0xf07c, 0x0003), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapls.w", two(0xf07a, 0x0002), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapls.l", two(0xf07b, 0x0002), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapls", two(0xf07c, 0x0002), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapsc.w", two(0xf07a, 0x0005), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapsc.l", two(0xf07b, 0x0005), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapsc", two(0xf07c, 0x0005), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapss.w", two(0xf07a, 0x0004), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapss.l", two(0xf07b, 0x0004), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapss", two(0xf07c, 0x0004), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapwc.w", two(0xf07a, 0x0009), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapwc.l", two(0xf07b, 0x0009), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapwc", two(0xf07c, 0x0009), two(0xffff, 0xffff), "", m68851 }, - -{"ptrapws.w", two(0xf07a, 0x0008), two(0xffff, 0xffff), "#w", m68851 }, -{"ptrapws.l", two(0xf07b, 0x0008), two(0xffff, 0xffff), "#l", m68851 }, -{"ptrapws", two(0xf07c, 0x0008), two(0xffff, 0xffff), "", m68851 }, - -{"pulse", one(0045314), one(0177777), "", m68060 | mcf5200 }, - -{"pvalid", two(0xf000, 0x2800), two(0xffc0, 0xffff), "Vs&s", m68851 }, -{"pvalid", two(0xf000, 0x2c00), two(0xffc0, 0xfff8), "A3&s", m68851 }, - - -{"reset", one(0047160), one(0177777), "", m68000up }, - -{"rol.b", one(0160430), one(0170770), "QdDs", m68000up }, -{"rol.b", one(0160470), one(0170770), "DdDs", m68000up }, -{"rol.w", one(0160530), one(0170770), "QdDs", m68000up }, -{"rol.w", one(0160570), one(0170770), "DdDs", m68000up }, -{"rol.w", one(0163700), one(0177700), "~s", m68000up }, -{"rol.l", one(0160630), one(0170770), "QdDs", m68000up }, -{"rol.l", one(0160670), one(0170770), "DdDs", m68000up }, - -{"ror.b", one(0160030), one(0170770), "QdDs", m68000up }, -{"ror.b", one(0160070), one(0170770), "DdDs", m68000up }, -{"ror.w", one(0160130), one(0170770), "QdDs", m68000up }, -{"ror.w", one(0160170), one(0170770), "DdDs", m68000up }, -{"ror.w", one(0163300), one(0177700), "~s", m68000up }, -{"ror.l", one(0160230), one(0170770), "QdDs", m68000up }, -{"ror.l", one(0160270), one(0170770), "DdDs", m68000up }, - -{"roxl.b", one(0160420), one(0170770), "QdDs", m68000up }, -{"roxl.b", one(0160460), one(0170770), "DdDs", m68000up }, -{"roxl.w", one(0160520), one(0170770), "QdDs", m68000up }, -{"roxl.w", one(0160560), one(0170770), "DdDs", m68000up }, -{"roxl.w", one(0162700), one(0177700), "~s", m68000up }, -{"roxl.l", one(0160620), one(0170770), "QdDs", m68000up }, -{"roxl.l", one(0160660), one(0170770), "DdDs", m68000up }, - -{"roxr.b", one(0160020), one(0170770), "QdDs", m68000up }, -{"roxr.b", one(0160060), one(0170770), "DdDs", m68000up }, -{"roxr.w", one(0160120), one(0170770), "QdDs", m68000up }, -{"roxr.w", one(0160160), one(0170770), "DdDs", m68000up }, -{"roxr.w", one(0162300), one(0177700), "~s", m68000up }, -{"roxr.l", one(0160220), one(0170770), "QdDs", m68000up }, -{"roxr.l", one(0160260), one(0170770), "DdDs", m68000up }, - -{"rtd", one(0047164), one(0177777), "#w", m68010up }, - -{"rte", one(0047163), one(0177777), "", m68000up|mcf5200 }, - -{"rtm", one(0003300), one(0177760), "Rs", m68020 }, - -{"rtr", one(0047167), one(0177777), "", m68000up }, - -{"rts", one(0047165), one(0177777), "", m68000up|mcf5200 }, - -{"sbcd", one(0100400), one(0170770), "DsDd", m68000up }, -{"sbcd", one(0100410), one(0170770), "-s-d", m68000up }, - - -{"scc", one(0052300), one(0177700), "$s", m68000up }, -{"scc", one(0052300), one(0177700), "Ds", mcf5200 }, -{"scs", one(0052700), one(0177700), "$s", m68000up }, -{"scs", one(0052700), one(0177700), "Ds", mcf5200 }, -{"seq", one(0053700), one(0177700), "$s", m68000up }, -{"seq", one(0053700), one(0177700), "Ds", mcf5200 }, -{"sf", one(0050700), one(0177700), "$s", m68000up }, -{"sf", one(0050700), one(0177700), "Ds", mcf5200 }, -{"sge", one(0056300), one(0177700), "$s", m68000up }, -{"sge", one(0056300), one(0177700), "Ds", mcf5200 }, -{"sgt", one(0057300), one(0177700), "$s", m68000up }, -{"sgt", one(0057300), one(0177700), "Ds", mcf5200 }, -{"shi", one(0051300), one(0177700), "$s", m68000up }, -{"shi", one(0051300), one(0177700), "Ds", mcf5200 }, -{"sle", one(0057700), one(0177700), "$s", m68000up }, -{"sle", one(0057700), one(0177700), "Ds", mcf5200 }, -{"sls", one(0051700), one(0177700), "$s", m68000up }, -{"sls", one(0051700), one(0177700), "Ds", mcf5200 }, -{"slt", one(0056700), one(0177700), "$s", m68000up }, -{"slt", one(0056700), one(0177700), "Ds", mcf5200 }, -{"smi", one(0055700), one(0177700), "$s", m68000up }, -{"smi", one(0055700), one(0177700), "Ds", mcf5200 }, -{"sne", one(0053300), one(0177700), "$s", m68000up }, -{"sne", one(0053300), one(0177700), "Ds", mcf5200 }, -{"spl", one(0055300), one(0177700), "$s", m68000up }, -{"spl", one(0055300), one(0177700), "Ds", mcf5200 }, -{"st", one(0050300), one(0177700), "$s", m68000up }, -{"st", one(0050300), one(0177700), "Ds", mcf5200 }, -{"svc", one(0054300), one(0177700), "$s", m68000up }, -{"svc", one(0054300), one(0177700), "Ds", mcf5200 }, -{"svs", one(0054700), one(0177700), "$s", m68000up }, -{"svs", one(0054700), one(0177700), "Ds", mcf5200 }, - -{"stop", one(0047162), one(0177777), "#w", m68000up | mcf5200 }, - -{"suba.l", one(0110700), one(0170700), "*lAd", m68000up | mcf5200 }, -{"suba.w", one(0110300), one(0170700), "*wAd", m68000up }, - -{"subi.b", one(0002000), one(0177700), "#b$s", m68000up }, -{"subi.w", one(0002100), one(0177700), "#w$s", m68000up }, -{"subi.l", one(0002200), one(0177700), "#l$s", m68000up }, -{"subi.l", one(0002200), one(0177700), "#lDs", mcf5200 }, - -{"subq.b", one(0050400), one(0170700), "Qd%s", m68000up }, -{"subq.w", one(0050500), one(0170700), "Qd%s", m68000up }, -{"subq.l", one(0050600), one(0170700), "Qd%s", m68000up | mcf5200 }, - -/* The sub opcode can generate the suba, subi, and subq instructions. */ -{"sub.b", one(0050400), one(0170700), "Qd%s", m68000up }, -{"sub.b", one(0002000), one(0177700), "#b$s", m68000up }, -{"sub.b", one(0110000), one(0170700), ";bDd", m68000up }, -{"sub.b", one(0110400), one(0170700), "Dd~s", m68000up }, -{"sub.w", one(0050500), one(0170700), "Qd%s", m68000up }, -{"sub.w", one(0002100), one(0177700), "#w$s", m68000up }, -{"sub.w", one(0110300), one(0170700), "*wAd", m68000up }, -{"sub.w", one(0110100), one(0170700), "*wDd", m68000up }, -{"sub.w", one(0110500), one(0170700), "Dd~s", m68000up }, -{"sub.l", one(0050600), one(0170700), "Qd%s", m68000up | mcf5200 }, -{"sub.l", one(0002200), one(0177700), "#l$s", m68000up }, -{"sub.l", one(0002200), one(0177700), "#lDs", mcf5200 }, -{"sub.l", one(0110700), one(0170700), "*lAd", m68000up | mcf5200 }, -{"sub.l", one(0110200), one(0170700), "*lDd", m68000up | mcf5200 }, -{"sub.l", one(0110600), one(0170700), "Dd~s", m68000up | mcf5200 }, - -{"subx.b", one(0110400), one(0170770), "DsDd", m68000up }, -{"subx.b", one(0110410), one(0170770), "-s-d", m68000up }, -{"subx.w", one(0110500), one(0170770), "DsDd", m68000up }, -{"subx.w", one(0110510), one(0170770), "-s-d", m68000up }, -{"subx.l", one(0110600), one(0170770), "DsDd", m68000up | mcf5200 }, -{"subx.l", one(0110610), one(0170770), "-s-d", m68000up }, - -{"swap", one(0044100), one(0177770), "Ds", m68000up | mcf5200 }, - -/* swbeg and swbegl are magic constants used on sysV68. The compiler - generates them before a switch table. They tell the debugger and - disassembler that a switch table follows. The parameter is the - number of elements in the table. swbeg means that the entries in - the table are word (2 byte) sized, and swbegl means that the - entries in the table are longword (4 byte) sized. */ -{"swbeg", one(0045374), one(0177777), "#w", m68000up | mcf5200 }, -{"swbeg.l", one(0045375), one(0177777), "#l", m68000up | mcf5200 }, - -{"tas", one(0045300), one(0177700), "$s", m68000up }, - -#define TBL1(name,signed,round,size) \ - {name, two(0174000, (signed<<11)|(!round<<10)|(size<<6)|0000400), \ - two(0177700,0107777), "!sD1", cpu32 }, \ - {name, two(0174000, (signed<<11)|(!round<<10)|(size<<6)), \ - two(0177770,0107770), "DsD3D1", cpu32 } -#define TBL(name1, name2, name3, s, r) \ - TBL1(name1, s, r, 0), TBL1(name2, s, r, 1), TBL1(name3, s, r, 2) -TBL("tbls.b", "tbls.w", "tbls.l", 1, 1), -TBL("tblsn.b", "tblsn.w", "tblsn.l", 1, 0), -TBL("tblu.b", "tblu.w", "tblu.l", 0, 1), -TBL("tblun.b", "tblun.w", "tblun.l", 0, 0), - -{"trap", one(0047100), one(0177760), "Ts", m68000up | mcf5200 }, - -{"trapcc", one(0052374), one(0177777), "", m68020up | cpu32 }, -{"trapcs", one(0052774), one(0177777), "", m68020up | cpu32 }, -{"trapeq", one(0053774), one(0177777), "", m68020up | cpu32 }, -{"trapf", one(0050774), one(0177777), "", m68020up | cpu32 | mcf5200 }, -{"trapge", one(0056374), one(0177777), "", m68020up | cpu32 }, -{"trapgt", one(0057374), one(0177777), "", m68020up | cpu32 }, -{"traphi", one(0051374), one(0177777), "", m68020up | cpu32 }, -{"traple", one(0057774), one(0177777), "", m68020up | cpu32 }, -{"trapls", one(0051774), one(0177777), "", m68020up | cpu32 }, -{"traplt", one(0056774), one(0177777), "", m68020up | cpu32 }, -{"trapmi", one(0055774), one(0177777), "", m68020up | cpu32 }, -{"trapne", one(0053374), one(0177777), "", m68020up | cpu32 }, -{"trappl", one(0055374), one(0177777), "", m68020up | cpu32 }, -{"trapt", one(0050374), one(0177777), "", m68020up | cpu32 }, -{"trapvc", one(0054374), one(0177777), "", m68020up | cpu32 }, -{"trapvs", one(0054774), one(0177777), "", m68020up | cpu32 }, - -{"trapcc.w", one(0052372), one(0177777), "#w", m68020up|cpu32 }, -{"trapcs.w", one(0052772), one(0177777), "#w", m68020up|cpu32 }, -{"trapeq.w", one(0053772), one(0177777), "#w", m68020up|cpu32 }, -{"trapf.w", one(0050772), one(0177777), "#w", m68020up|cpu32|mcf5200}, -{"trapge.w", one(0056372), one(0177777), "#w", m68020up|cpu32 }, -{"trapgt.w", one(0057372), one(0177777), "#w", m68020up|cpu32 }, -{"traphi.w", one(0051372), one(0177777), "#w", m68020up|cpu32 }, -{"traple.w", one(0057772), one(0177777), "#w", m68020up|cpu32 }, -{"trapls.w", one(0051772), one(0177777), "#w", m68020up|cpu32 }, -{"traplt.w", one(0056772), one(0177777), "#w", m68020up|cpu32 }, -{"trapmi.w", one(0055772), one(0177777), "#w", m68020up|cpu32 }, -{"trapne.w", one(0053372), one(0177777), "#w", m68020up|cpu32 }, -{"trappl.w", one(0055372), one(0177777), "#w", m68020up|cpu32 }, -{"trapt.w", one(0050372), one(0177777), "#w", m68020up|cpu32 }, -{"trapvc.w", one(0054372), one(0177777), "#w", m68020up|cpu32 }, -{"trapvs.w", one(0054772), one(0177777), "#w", m68020up|cpu32 }, - -{"trapcc.l", one(0052373), one(0177777), "#l", m68020up|cpu32 }, -{"trapcs.l", one(0052773), one(0177777), "#l", m68020up|cpu32 }, -{"trapeq.l", one(0053773), one(0177777), "#l", m68020up|cpu32 }, -{"trapf.l", one(0050773), one(0177777), "#l", m68020up|cpu32|mcf5200}, -{"trapge.l", one(0056373), one(0177777), "#l", m68020up|cpu32 }, -{"trapgt.l", one(0057373), one(0177777), "#l", m68020up|cpu32 }, -{"traphi.l", one(0051373), one(0177777), "#l", m68020up|cpu32 }, -{"traple.l", one(0057773), one(0177777), "#l", m68020up|cpu32 }, -{"trapls.l", one(0051773), one(0177777), "#l", m68020up|cpu32 }, -{"traplt.l", one(0056773), one(0177777), "#l", m68020up|cpu32 }, -{"trapmi.l", one(0055773), one(0177777), "#l", m68020up|cpu32 }, -{"trapne.l", one(0053373), one(0177777), "#l", m68020up|cpu32 }, -{"trappl.l", one(0055373), one(0177777), "#l", m68020up|cpu32 }, -{"trapt.l", one(0050373), one(0177777), "#l", m68020up|cpu32 }, -{"trapvc.l", one(0054373), one(0177777), "#l", m68020up|cpu32 }, -{"trapvs.l", one(0054773), one(0177777), "#l", m68020up|cpu32 }, - -{"trapv", one(0047166), one(0177777), "", m68000up }, - -{"tst.b", one(0045000), one(0177700), ";b", m68020up|cpu32|mcf5200 }, -{"tst.b", one(0045000), one(0177700), "$b", m68000up }, -{"tst.w", one(0045100), one(0177700), "*w", m68020up|cpu32|mcf5200 }, -{"tst.w", one(0045100), one(0177700), "$w", m68000up }, -{"tst.l", one(0045200), one(0177700), "*l", m68020up|cpu32|mcf5200 }, -{"tst.l", one(0045200), one(0177700), "$l", m68000up }, - -{"unlk", one(0047130), one(0177770), "As", m68000up | mcf5200 }, - -{"unpk", one(0100600), one(0170770), "DsDd#w", m68020up }, -{"unpk", one(0100610), one(0170770), "-s-d#w", m68020up }, - -{"wddata.b", one(0172000), one(0177700), "~s", mcf5200 }, -{"wddata.w", one(0172100), one(0177700), "~s", mcf5200 }, -{"wddata.l", one(0172200), one(0177700), "~s", mcf5200 }, - -}; - -const int m68k_numopcodes = sizeof m68k_opcodes / sizeof m68k_opcodes[0]; - -/* These aliases used to be in the above table, each one duplicating - all of the entries for its primary exactly. This table was - constructed by mechanical processing of the opcode table, with a - small number of tweaks done by hand. There are probably a lot more - aliases above that could be moved down here, except for very minor - differences. */ - -const struct m68k_opcode_alias m68k_opcode_aliases[] = -{ - { "add", "add.w", }, - { "adda", "adda.w", }, - { "addi", "addi.w", }, - { "addq", "addq.w", }, - { "addx", "addx.w", }, - { "asl", "asl.w", }, - { "asr", "asr.w", }, - { "bhi", "bhi.w", }, - { "bls", "bls.w", }, - { "bcc", "bcc.w", }, - { "bcs", "bcs.w", }, - { "bne", "bne.w", }, - { "beq", "beq.w", }, - { "bvc", "bvc.w", }, - { "bvs", "bvs.w", }, - { "bpl", "bpl.w", }, - { "bmi", "bmi.w", }, - { "bge", "bge.w", }, - { "blt", "blt.w", }, - { "bgt", "bgt.w", }, - { "ble", "ble.w", }, - { "bra", "bra.w", }, - { "bsr", "bsr.w", }, - { "bhi.b", "bhi.s", }, - { "bls.b", "bls.s", }, - { "bcc.b", "bcc.s", }, - { "bcs.b", "bcs.s", }, - { "bne.b", "bne.s", }, - { "beq.b", "beq.s", }, - { "bvc.b", "bvc.s", }, - { "bvs.b", "bvs.s", }, - { "bpl.b", "bpl.s", }, - { "bmi.b", "bmi.s", }, - { "bge.b", "bge.s", }, - { "blt.b", "blt.s", }, - { "bgt.b", "bgt.s", }, - { "ble.b", "ble.s", }, - { "bra.b", "bra.s", }, - { "bsr.b", "bsr.s", }, - { "bhs", "bcc.w" }, - { "bhs.s", "bcc.s" }, - { "bhs.b", "bcc.s" }, - { "bhs.w", "bcc.w" }, - { "bhs.l", "bcc.l" }, - { "blo", "bcs.w" }, - { "blo.s", "bcs.s" }, - { "blo.b", "bcs.s" }, - { "blo.w", "bcs.w" }, - { "blo.l", "bcs.l" }, - { "br", "bra.w", }, - { "br.s", "bra.s", }, - { "br.b", "bra.s", }, - { "br.w", "bra.w", }, - { "br.l", "bra.l", }, - { "jfnlt", "bcc", }, /* apparently a sun alias */ - { "jfngt", "ble", }, /* apparently a sun alias */ - { "jfeq", "beq.s", }, /* apparently a sun alias */ - { "bchg.b", "bchg", }, - { "bchg.l", "bchg", }, - { "bclr.b", "bclr", }, - { "bclr.l", "bclr", }, - { "bset.b", "bset", }, - { "bset.l", "bset", }, - { "btst.b", "btst", }, - { "btst.l", "btst", }, - { "cas2", "cas2.w", }, - { "cas", "cas.w", }, - { "chk2", "chk2.w", }, - { "chk", "chk.w", }, - { "clr", "clr.w", }, - { "cmp2", "cmp2.w", }, - { "cmpa", "cmpa.w", }, - { "cmpi", "cmpi.w", }, - { "cmpm", "cmpm.w", }, - { "cmp", "cmp.w", }, - { "dbcc.w", "dbcc", }, - { "dbcs.w", "dbcs", }, - { "dbeq.w", "dbeq", }, - { "dbf.w", "dbf", }, - { "dbge.w", "dbge", }, - { "dbgt.w", "dbgt", }, - { "dbhi.w", "dbhi", }, - { "dble.w", "dble", }, - { "dbls.w", "dbls", }, - { "dblt.w", "dblt", }, - { "dbmi.w", "dbmi", }, - { "dbne.w", "dbne", }, - { "dbpl.w", "dbpl", }, - { "dbt.w", "dbt", }, - { "dbvc.w", "dbvc", }, - { "dbvs.w", "dbvs", }, - { "dbhs", "dbcc", }, - { "dbhs.w", "dbcc", }, - { "dbra", "dbf", }, - { "dbra.w", "dbf", }, - { "tdivs.l", "divs.l", }, - { "divs", "divs.w", }, - { "divu", "divu.w", }, - { "ext", "ext.w", }, - { "extb.w", "ext.w", }, - { "extw.l", "ext.l", }, - { "fbneq", "fbne", }, - { "fbsneq", "fbsne", }, - { "fdbneq", "fdbne", }, - { "fdbsneq", "fdbsne", }, - { "fmovecr", "fmovecrx", }, - { "fmovm", "fmovem", }, - { "fsneq", "fsne", }, - { "fssneq", "fssne", }, - { "ftrapneq", "ftrapne", }, - { "ftrapsneq", "ftrapsne", }, - { "fjneq", "fjne", }, - { "fjsneq", "fjsne", }, - { "jmp.l", "jmp", }, - { "jmp.s", "jmp", }, - { "jsr.l", "jsr", }, - { "jsr.s", "jsr", }, - { "lea.l", "lea", }, - { "lsl", "lsl.w", }, - { "lsr", "lsr.w", }, - { "movea", "movea.w", }, - { "movem", "movem.w", }, - { "movm.l", "movem.l", }, - { "movm.w", "movem.w", }, - { "movm", "movem.w", }, - { "movep", "movep.w", }, - { "movp.w", "movep.w", }, - { "moves", "moves.w" }, - { "muls", "muls.w", }, - { "mulu", "mulu.w", }, - { "nbcd.b", "nbcd" }, - { "neg", "neg.w", }, - { "negx", "negx.w", }, - { "not", "not.w", }, - { "pea.l", "pea", }, - { "rol", "rol.w", }, - { "ror", "ror.w", }, - { "roxl", "roxl.w", }, - { "roxr", "roxr.w", }, - { "sbcd.b", "sbcd", }, - { "scc.b", "scc", }, - { "scs.b", "scs", }, - { "seq.b", "seq", }, - { "sf.b", "sf", }, - { "sge.b", "sge", }, - { "sgt.b", "sgt", }, - { "shi.b", "shi", }, - { "sle.b", "sle", }, - { "sls.b", "sls", }, - { "slt.b", "slt", }, - { "smi.b", "smi", }, - { "sne.b", "sne", }, - { "spl.b", "spl", }, - { "st.b", "st", }, - { "svc.b", "svc", }, - { "svs.b", "svs", }, - { "sfge", "sge", }, - { "sfgt", "sgt", }, - { "sfle", "sle", }, - { "sflt", "slt", }, - { "sfneq", "sne", }, - { "suba", "suba.w", }, - { "subi", "subi.w", }, - { "subq", "subq.w", }, - { "sub", "sub.w", }, - { "subx", "subx.w", }, - { "swap.w", "swap", }, - { "tas.b", "tas", }, - { "tpcc", "trapcc", }, - { "tcc", "trapcc", }, - { "tst", "tst.w", }, - { "jbra", "jra", }, - { "jbhi", "jhi", }, - { "jbls", "jls", }, - { "jbcc", "jcc", }, - { "jbcs", "jcs", }, - { "jbne", "jne", }, - { "jbeq", "jeq", }, - { "jbvc", "jvc", }, - { "jbvs", "jvs", }, - { "jbpl", "jpl", }, - { "jbmi", "jmi", }, - { "jbge", "jge", }, - { "jblt", "jlt", }, - { "jbgt", "jgt", }, - { "jble", "jle", }, - { "movq.l", "moveq", }, - { "moveq.l", "moveq", }, - { "mov.l", "move.l", }, - { "movq", "moveq", }, - { "mova.l", "movea.l", }, - { "mova.w", "movea.w", }, - { "mov.b", "move.b", }, - { "movc", "movec", }, - { "movec.l", "movec", }, - { "movp.l", "movep.l", }, - { "mov.w", "move.w", }, - { "movs.b", "moves.b", }, - { "movs.l", "moves.l", }, - { "movs.w", "moves.w", }, - - { "tdivu.l", "divu.l", }, /* for m68k-svr4 */ - { "fmov.b", "fmove.b", }, - { "fsmov.b", "fsmove.b", }, - { "fdmov.b", "fdmove.b", }, - { "fmov.d", "fmove.d", }, - { "fsmov.d", "fsmove.d", }, - { "fmov.l", "fmove.l", }, - { "fsmov.l", "fsmove.l", }, - { "fdmov.l", "fdmove.l", }, - { "fmov.p", "fmove.p", }, - { "fsmov.p", "fsmove.p", }, - { "fdmov.p", "fdmove.p", }, - { "fmov.s", "fmove.s", }, - { "fsmov.s", "fsmove.s", }, - { "fdmov.s", "fdmove.s", }, - { "fmov.w", "fmove.w", }, - { "fsmov.w", "fsmove.w", }, - { "fdmov.w", "fdmove.w", }, - { "fmov.x", "fmove.x", }, - { "fsmov.x", "fsmove.x", }, - { "fdmov.x", "fdmove.x", }, - { "fmovcr", "fmovecr", }, - { "fmovcr.x", "fmovecr.x", }, - { "ftest.b", "ftst.b", }, - { "ftest.d", "ftst.d", }, - { "ftest.l", "ftst.l", }, - { "ftest.p", "ftst.p", }, - { "ftest.s", "ftst.s", }, - { "ftest.w", "ftst.w", }, - { "ftest.x", "ftst.x", }, -}; - -const int m68k_numaliases = - sizeof m68k_opcode_aliases / sizeof m68k_opcode_aliases[0]; diff --git a/cxmon/src/disass/m68k.h b/cxmon/src/disass/m68k.h deleted file mode 100644 index 4d27d7f7f..000000000 --- a/cxmon/src/disass/m68k.h +++ /dev/null @@ -1,315 +0,0 @@ -/* Opcode table header for m680[01234]0/m6888[12]/m68851. - Copyright 1989, 91, 92, 93, 94, 95, 96, 1997 Free Software Foundation. - -This file is part of GDB, GAS, and the GNU binutils. - -GDB, GAS, and the GNU binutils are free software; you can redistribute -them and/or modify them under the terms of the GNU General Public -License as published by the Free Software Foundation; either version -1, or (at your option) any later version. - -GDB, GAS, and the GNU binutils are distributed in the hope that they -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 file; see the file COPYING. If not, write to the Free -Software Foundation, 59 Temple Place - Suite 330, Boston, MA -02111-1307, USA. */ - -/* These are used as bit flags for the arch field in the m68k_opcode - structure. */ -#define _m68k_undef 0 -#define m68000 0x001 -#define m68008 m68000 /* synonym for -m68000. otherwise unused. */ -#define m68010 0x002 -#define m68020 0x004 -#define m68030 0x008 -#define m68ec030 m68030 /* similar enough to -m68030 to ignore differences; - gas will deal with the few differences. */ -#define m68040 0x010 -/* there is no 68050 */ -#define m68060 0x020 -#define m68881 0x040 -#define m68882 m68881 /* synonym for -m68881. otherwise unused. */ -#define m68851 0x080 -#define cpu32 0x100 /* e.g., 68332 */ -#define mcf5200 0x200 - - /* handy aliases */ -#define m68040up (m68040 | m68060) -#define m68030up (m68030 | m68040up) -#define m68020up (m68020 | m68030up) -#define m68010up (m68010 | cpu32 | m68020up) -#define m68000up (m68000 | m68010up) - -#define mfloat (m68881 | m68882 | m68040 | m68060) -#define mmmu (m68851 | m68030 | m68040 | m68060) - -/* The structure used to hold information for an opcode. */ - -struct m68k_opcode -{ - /* The opcode name. */ - const char *name; - /* The opcode itself. */ - unsigned long opcode; - /* The mask used by the disassembler. */ - unsigned long match; - /* The arguments. */ - const char *args; - /* The architectures which support this opcode. */ - unsigned int arch; -}; - -/* The structure used to hold information for an opcode alias. */ - -struct m68k_opcode_alias -{ - /* The alias name. */ - const char *alias; - /* The instruction for which this is an alias. */ - const char *primary; -}; - -/* We store four bytes of opcode for all opcodes because that is the - most any of them need. The actual length of an instruction is - always at least 2 bytes, and is as much longer as necessary to hold - the operands it has. - - The match field is a mask saying which bits must match particular - opcode in order for an instruction to be an instance of that - opcode. - - The args field is a string containing two characters for each - operand of the instruction. The first specifies the kind of - operand; the second, the place it is stored. */ - -/* Kinds of operands: - Characters used: AaBCcDdFfIJkLlMmnOopQqRrSsTtUVvWXYZ0123|*~%;@!&$?/<>#^+- - - D data register only. Stored as 3 bits. - A address register only. Stored as 3 bits. - a address register indirect only. Stored as 3 bits. - R either kind of register. Stored as 4 bits. - r either kind of register indirect only. Stored as 4 bits. - At the moment, used only for cas2 instruction. - F floating point coprocessor register only. Stored as 3 bits. - O an offset (or width): immediate data 0-31 or data register. - Stored as 6 bits in special format for BF... insns. - + autoincrement only. Stored as 3 bits (number of the address register). - - autodecrement only. Stored as 3 bits (number of the address register). - Q quick immediate data. Stored as 3 bits. - This matches an immediate operand only when value is in range 1 .. 8. - M moveq immediate data. Stored as 8 bits. - This matches an immediate operand only when value is in range -128..127 - T trap vector immediate data. Stored as 4 bits. - - k K-factor for fmove.p instruction. Stored as a 7-bit constant or - a three bit register offset, depending on the field type. - - # immediate data. Stored in special places (b, w or l) - which say how many bits to store. - ^ immediate data for floating point instructions. Special places - are offset by 2 bytes from '#'... - B pc-relative address, converted to an offset - that is treated as immediate data. - d displacement and register. Stores the register as 3 bits - and stores the displacement in the entire second word. - - C the CCR. No need to store it; this is just for filtering validity. - S the SR. No need to store, just as with CCR. - U the USP. No need to store, just as with CCR. - - I Coprocessor ID. Not printed if 1. The Coprocessor ID is always - extracted from the 'd' field of word one, which means that an extended - coprocessor opcode can be skipped using the 'i' place, if needed. - - s System Control register for the floating point coprocessor. - - J Misc register for movec instruction, stored in 'j' format. - Possible values: - 0x000 SFC Source Function Code reg [60, 40, 30, 20, 10] - 0x001 DFC Data Function Code reg [60, 40, 30, 20, 10] - 0x002 CACR Cache Control Register [60, 40, 30, 20] - 0x003 TC MMU Translation Control [60, 40] - 0x004 ITT0 Instruction Transparent - Translation reg 0 [60, 40] - 0x005 ITT1 Instruction Transparent - Translation reg 1 [60, 40] - 0x006 DTT0 Data Transparent - Translation reg 0 [60, 40] - 0x007 DTT1 Data Transparent - Translation reg 1 [60, 40] - 0x008 BUSCR Bus Control Register [60] - 0x800 USP User Stack Pointer [60, 40, 30, 20, 10] - 0x801 VBR Vector Base reg [60, 40, 30, 20, 10] - 0x802 CAAR Cache Address Register [ 30, 20] - 0x803 MSP Master Stack Pointer [ 40, 30, 20] - 0x804 ISP Interrupt Stack Pointer [ 40, 30, 20] - 0x805 MMUSR MMU Status reg [ 40] - 0x806 URP User Root Pointer [60, 40] - 0x807 SRP Supervisor Root Pointer [60, 40] - 0x808 PCR Processor Configuration reg [60] - 0xC00 ROMBAR ROM Base Address Register [520X] - 0xC04 RAMBAR0 RAM Base Address Register 0 [520X] - 0xC05 RAMBAR1 RAM Base Address Register 0 [520X] - 0xC0F MBAR0 RAM Base Address Register 0 [520X] - - L Register list of the type d0-d7/a0-a7 etc. - (New! Improved! Can also hold fp0-fp7, as well!) - The assembler tries to see if the registers match the insn by - looking at where the insn wants them stored. - - l Register list like L, but with all the bits reversed. - Used for going the other way. . . - - c cache identifier which may be "nc" for no cache, "ic" - for instruction cache, "dc" for data cache, or "bc" - for both caches. Used in cinv and cpush. Always - stored in position "d". - - The remainder are all stored as 6 bits using an address mode and a - register number; they differ in which addressing modes they match. - - * all (modes 0-6,7.0-4) - ~ alterable memory (modes 2-6,7.0,7.1) - (not 0,1,7.2-4) - % alterable (modes 0-6,7.0,7.1) - (not 7.2-4) - ; data (modes 0,2-6,7.0-4) - (not 1) - @ data, but not immediate (modes 0,2-6,7.0-3) - (not 1,7.4) - ! control (modes 2,5,6,7.0-3) - (not 0,1,3,4,7.4) - & alterable control (modes 2,5,6,7.0,7.1) - (not 0,1,7.2-4) - $ alterable data (modes 0,2-6,7.0,7.1) - (not 1,7.2-4) - ? alterable control, or data register (modes 0,2,5,6,7.0,7.1) - (not 1,3,4,7.2-4) - / control, or data register (modes 0,2,5,6,7.0-3) - (not 1,3,4,7.4) - > *save operands (modes 2,4,5,6,7.0,7.1) - (not 0,1,3,7.2-4) - < *restore operands (modes 2,3,5,6,7.0-3) - (not 0,1,4,7.4) - - coldfire move operands: - m (modes 0-4) - n (modes 5,7.2) - o (modes 6,7.0,7.1,7.3,7.4) - p (modes 0-5) - - coldfire bset/bclr/btst operands: - q (modes 0,2-5) - v (modes 0,2-5,7.0,7.1) -*/ - -/* For the 68851: */ -/* - I didn't use much imagination in choosing the - following codes, so many of them aren't very - mnemonic. -rab - - 0 32 bit pmmu register - Possible values: - 000 TC Translation Control Register (68030, 68851) - - 1 16 bit pmmu register - 111 AC Access Control (68851) - - 2 8 bit pmmu register - 100 CAL Current Access Level (68851) - 101 VAL Validate Access Level (68851) - 110 SCC Stack Change Control (68851) - - 3 68030-only pmmu registers (32 bit) - 010 TT0 Transparent Translation reg 0 - (aka Access Control reg 0 -- AC0 -- on 68ec030) - 011 TT1 Transparent Translation reg 1 - (aka Access Control reg 1 -- AC1 -- on 68ec030) - - W wide pmmu registers - Possible values: - 001 DRP Dma Root Pointer (68851) - 010 SRP Supervisor Root Pointer (68030, 68851) - 011 CRP Cpu Root Pointer (68030, 68851) - - f function code register (68030, 68851) - 0 SFC - 1 DFC - - V VAL register only (68851) - - X BADx, BACx (16 bit) - 100 BAD Breakpoint Acknowledge Data (68851) - 101 BAC Breakpoint Acknowledge Control (68851) - - Y PSR (68851) (MMUSR on 68030) (ACUSR on 68ec030) - Z PCSR (68851) - - | memory (modes 2-6, 7.*) - - t address test level (68030 only) - Stored as 3 bits, range 0-7. - Also used for breakpoint instruction now. - -*/ - -/* Places to put an operand, for non-general operands: - s source, low bits of first word. - d dest, shifted 9 in first word - 1 second word, shifted 12 - 2 second word, shifted 6 - 3 second word, shifted 0 - 4 third word, shifted 12 - 5 third word, shifted 6 - 6 third word, shifted 0 - 7 second word, shifted 7 - 8 second word, shifted 10 - 9 second word, shifted 5 - D store in both place 1 and place 3; for divul and divsl. - B first word, low byte, for branch displacements - W second word (entire), for branch displacements - L second and third words (entire), for branch displacements - (also overloaded for move16) - b second word, low byte - w second word (entire) [variable word/long branch offset for dbra] - W second word (entire) (must be signed 16 bit value) - l second and third word (entire) - g variable branch offset for bra and similar instructions. - The place to store depends on the magnitude of offset. - t store in both place 7 and place 8; for floating point operations - c branch offset for cpBcc operations. - The place to store is word two if bit six of word one is zero, - and words two and three if bit six of word one is one. - i Increment by two, to skip over coprocessor extended operands. Only - works with the 'I' format. - k Dynamic K-factor field. Bits 6-4 of word 2, used as a register number. - Also used for dynamic fmovem instruction. - C floating point coprocessor constant - 7 bits. Also used for static - K-factors... - j Movec register #, stored in 12 low bits of second word. - - Places to put operand, for general operands: - d destination, shifted 6 bits in first word - b source, at low bit of first word, and immediate uses one byte - w source, at low bit of first word, and immediate uses two bytes - l source, at low bit of first word, and immediate uses four bytes - s source, at low bit of first word. - Used sometimes in contexts where immediate is not allowed anyway. - f single precision float, low bit of 1st word, immediate uses 4 bytes - F double precision float, low bit of 1st word, immediate uses 8 bytes - x extended precision float, low bit of 1st word, immediate uses 12 bytes - p packed float, low bit of 1st word, immediate uses 12 bytes -*/ - -extern const struct m68k_opcode m68k_opcodes[]; -extern const struct m68k_opcode_alias m68k_opcode_aliases[]; - -extern const int m68k_numopcodes, m68k_numaliases; - -/* end of m68k-opcode.h */ diff --git a/cxmon/src/disass/opintl.h b/cxmon/src/disass/opintl.h deleted file mode 100644 index 1e3c318ee..000000000 --- a/cxmon/src/disass/opintl.h +++ /dev/null @@ -1,34 +0,0 @@ -/* opintl.h - opcodes specific header for gettext code. - Copyright (C) 1998 Free Software Foundation, Inc. - - Written by Tom Tromey - - This file is part of the opcodes library used by GAS and the GNU binutils. - - You should have received a copy of the GNU General Public License - along with GAS; see the file COPYING. If not, write to the Free - Software Foundation, 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ - -#ifdef ENABLE_NLS -# include -# define _(String) dgettext (PACKAGE, String) -# ifdef gettext_noop -# define N_(String) gettext_noop (String) -# else -# define N_(String) (String) -# endif -#else -/* Stubs that do something close enough. */ -# define textdomain(String) (String) -# define gettext(String) (String) -# define dgettext(Domain,Message) (Message) -# define dcgettext(Domain,Message,Type) (Message) -# define bindtextdomain(Domain,Directory) (Domain) -# define _(String) (String) -# define N_(String) (String) -/* In this case we don't care about the value. */ -# ifndef LC_MESSAGES -# define LC_MESSAGES 0 -# endif -#endif diff --git a/cxmon/src/main.cpp b/cxmon/src/main.cpp deleted file mode 100644 index 3f40d8a6b..000000000 --- a/cxmon/src/main.cpp +++ /dev/null @@ -1,118 +0,0 @@ -/* - * main.cpp - Wrapper program for standalone cxmon - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include "mon.h" - - -#ifdef __BEOS__ -#include -#include -#include -#include - -// Detect if program was launched from Shell or Tracker -static bool launched_from_tracker(void) -{ - char *cmd = getenv("_"); - if (cmd == NULL || strlen(cmd) < 7) - return false; - return !strcmp(cmd + strlen(cmd) - 7 , "Tracker"); -} - -// Open Terminal window with given title for stdio, returns false on error -static bool open_stdio(const char *title) -{ - // Create key - char key_name[64]; - bigtime_t t = system_time(); - sprintf(key_name, "%Ld", t); - - // Make pipe names - char out_pipe_name[64], in_pipe_name[64]; - sprintf(out_pipe_name, "/pipe/debug_out_%s", key_name); - sprintf(in_pipe_name, "/pipe/debug_in_%s", key_name); - - // Create semaphore - char sem_name[B_OS_NAME_LENGTH], sem_id_str[B_OS_NAME_LENGTH]; - sprintf(sem_name, "debug_glue_%s", key_name); - sem_id glue_sem = create_sem(0, sem_name); - sprintf(sem_id_str, "%d", glue_sem); - - // Make path for "Terminal" app - char term_path[B_PATH_NAME_LENGTH]; - find_directory(B_BEOS_APPS_DIRECTORY, -1, false, term_path, 1024); - strcat(term_path, "/Terminal"); - - // Load "Terminal" - const char *t_argv[6]; - t_argv[0] = term_path; - t_argv[1] = "-t"; - t_argv[2] = (char *)title; - t_argv[3] = "/bin/debug_glue"; - t_argv[4] = key_name; - t_argv[5] = sem_id_str; - thread_id th = load_image(6, t_argv, (const char **)environ); - if (th < 0) { - delete_sem(glue_sem); - return false; - } - - // Start "Terminal" - resume_thread(th); - status_t err = acquire_sem_etc(glue_sem, 1, B_TIMEOUT, 5000000); - delete_sem(glue_sem); - if (err) - return false; - - // Open input/output pipes - FILE *in = freopen(in_pipe_name, "rb", stdin); - if (in == NULL) - return false; - FILE *out = freopen(out_pipe_name, "wb", stdout); - if (out == NULL) { - fclose(in); - return false; - } - - // Set buffer modes - setvbuf(stdout, NULL, _IOLBF, 0); - return true; -} -#endif - -// Main program -int main(int argc, char **argv) -{ -#ifdef __BEOS__ - // Launched from Tracker? Then open terminal window - if (launched_from_tracker()) { - if (!open_stdio("mon")) - return 1; - } -#endif - - // Execute mon - mon_init(); - mon(argc, argv); - mon_exit(); - return 0; -} diff --git a/cxmon/src/mon.cpp b/cxmon/src/mon.cpp deleted file mode 100644 index f3c6c4e7a..000000000 --- a/cxmon/src/mon.cpp +++ /dev/null @@ -1,1255 +0,0 @@ -/* - * mon.cpp - cxmon main program - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include - -#if defined(HAVE_READLINE_H) -extern "C" { -#include -} -#elif defined(HAVE_READLINE_READLINE_H) -extern "C" { -#include -} -#endif - -#if defined(HAVE_HISTORY_H) -extern "C" { -#include -} -#elif defined(HAVE_READLINE_HISTORY_H) -extern "C" { -#include -} -#endif - -#include "mon.h" -#include "mon_cmd.h" -#include "mon_lowmem.h" - -#ifndef VERSION -#define VERSION "3" -#endif - - -// Buffer we're operating on -bool mon_use_real_mem = false; -uint32 mon_mem_size; -static uint8 *mem; - - -// Streams for input, output and error messages -FILE *monin, *monout, *monerr; - -// Input line -static char *input; -static char *in_ptr; -char *mon_args_ptr; - -// Current address, value of '.' in expressions -uintptr mon_dot_address; - -// Current value of ':' in expression -static uint32 colon_value; - - -// Scanner variables -enum Token mon_token; // Last token read -uintptr mon_number; // Contains the number if mon_token==T_NUMBER -char *mon_string; // Contains the string if mon_token==T_STRING -char *mon_name; // Contains the variable name if mon_token==T_NAME - - -// List of installed commands -struct CmdSpec { - const char *name; // Name of command - void (*func)(); // Function that executes this command -}; - -static CmdSpec *cmds; // Array of CmdSpecs -static int num_cmds; // Number of installed commands -static char *cmd_help; // Help text for commands - - -// List of variables -typedef std::map var_map; -static var_map vars; - - -// Prototypes -static void init_abort(); -static void exit_abort(); - -static void read_line(char *prompt); // Scanner -static char get_char(); -static void put_back(char c); -static enum Token get_hex_number(uintptr &i); -static enum Token get_dec_number(uintptr &i); -static enum Token get_char_number(uintptr &i); -static enum Token get_string(char *&str); -static enum Token get_hex_or_name(uintptr &i, char *&name); - -static bool eor_expr(uintptr *number); // Parser -static bool and_expr(uintptr *number); -static bool shift_expr(uintptr *number); -static bool add_expr(uintptr *number); -static bool mul_expr(uintptr *number); -static bool factor(uintptr *number); - - -/* - * Add command to mon - */ - -void mon_add_command(const char *name, void (*func)(), const char *help_text) -{ - num_cmds++; - if (cmds) - cmds = (CmdSpec *)realloc(cmds, num_cmds * sizeof(CmdSpec)); - else - cmds = (CmdSpec *)malloc(sizeof(CmdSpec)); - cmds[num_cmds - 1].name = name; - cmds[num_cmds - 1].func = func; - if (help_text) { - if (cmd_help) { - cmd_help = (char *)realloc(cmd_help, strlen(cmd_help) + strlen(help_text) + 1); - strcat(cmd_help, help_text); - } else - cmd_help = strdup(help_text); - } -} - - -/* - * Print error message - */ - -void mon_error(const char *s) -{ - fprintf(monerr, "*** %s\n", s); -} - - -/* - * CTRL-C pressed? - */ - -static bool was_aborted; -static struct sigaction my_sa; - -#ifdef __BEOS__ -static void handle_abort(int sig, void *arg, vregs *r) -#else -static void handle_abort(int sig) -#endif -{ - was_aborted = true; -} - -static void init_abort() -{ - was_aborted = false; - sigemptyset(&my_sa.sa_mask); -#ifdef __BEOS__ - my_sa.sa_handler = (__signal_func_ptr)handle_abort; - my_sa.sa_userdata = 0; -#else - my_sa.sa_handler = handle_abort; -#endif - my_sa.sa_flags = 0; - sigaction(SIGINT, &my_sa, NULL); -} - -static void exit_abort() -{ - my_sa.sa_handler = SIG_DFL; - sigaction(SIGINT, &my_sa, NULL); -} - -bool mon_aborted() -{ - bool ret = was_aborted; - was_aborted = false; - return ret; -} - - -/* - * Access to buffer - */ - -uint32 (*mon_read_byte)(uintptr adr); - -uint32 mon_read_byte_buffer(uintptr adr) -{ - return mem[adr % mon_mem_size]; -} - -uint32 mon_read_byte_real(uintptr adr) -{ - return *(uint8 *)adr; -} - -void (*mon_write_byte)(uintptr adr, uint32 b); - -void mon_write_byte_buffer(uintptr adr, uint32 b) -{ - mem[adr % mon_mem_size] = b; -} - -void mon_write_byte_real(uintptr adr, uint32 b) -{ - *(uint8 *)adr = b; -} - -uint32 mon_read_half(uintptr adr) -{ - return (mon_read_byte(adr) << 8) | mon_read_byte(adr+1); -} - -void mon_write_half(uintptr adr, uint32 w) -{ - mon_write_byte(adr, w >> 8); - mon_write_byte(adr+1, w); -} - -uint32 mon_read_word(uintptr adr) -{ - return (mon_read_byte(adr) << 24) | (mon_read_byte(adr+1) << 16) | (mon_read_byte(adr+2) << 8) | mon_read_byte(adr+3); -} - -void mon_write_word(uintptr adr, uint32 l) -{ - mon_write_byte(adr, l >> 24); - mon_write_byte(adr+1, l >> 16); - mon_write_byte(adr+2, l >> 8); - mon_write_byte(adr+3, l); -} - - -/* - * Read a line from the keyboard - */ - -static void read_line(char *prompt) -{ -#ifdef HAVE_LIBREADLINE - if (input) - free(input); - input = readline(prompt); - - if (input) { - if (*input) - add_history(input); - } else { - // EOF, quit cxmon - input = (char *)malloc(2); - input[0] = 'x'; - input[1] = 0; - fprintf(monout, "x\n"); - } - - in_ptr = input; -#else - static const unsigned INPUT_LENGTH = 256; - if (!input) - input = (char *)malloc(INPUT_LENGTH); - fprintf(monout, prompt); - fflush(monout); - fgets(in_ptr = input, INPUT_LENGTH, monin); - char *s = strchr(input, '\n'); - if (s != NULL) - *s = 0; -#endif -} - - -/* - * Read a character from the input line - */ - -static char get_char() -{ - return *in_ptr++; -} - - -/* - * Stuff back a character into the input line - */ - -static void put_back(char c) -{ - *(--in_ptr) = c; -} - - -/* - * Scanner: Get a token from the input line - */ - -enum Token mon_get_token() -{ - char c = get_char(); - - // Skip spaces - while (isspace(c)) - c = get_char(); - - switch (c) { - case 0: - return mon_token = T_END; - case '(': - return mon_token = T_LPAREN; - case ')': - return mon_token = T_RPAREN; - case '.': - return mon_token = T_DOT; - case ':': - return mon_token = T_COLON; - case ',': - return mon_token = T_COMMA; - case '+': - return mon_token = T_PLUS; - case '-': - return mon_token = T_MINUS; - case '*': - return mon_token = T_MUL; - case '/': - return mon_token = T_DIV; - case '%': - return mon_token = T_MOD; - case '&': - return mon_token = T_AND; - case '|': - return mon_token = T_OR; - case '^': - return mon_token = T_EOR; - case '<': - if (get_char() == '<') - return mon_token = T_SHIFTL; - else { - mon_error("Unrecognized token"); - return mon_token = T_NULL; - } - case '>': - if (get_char() == '>') - return mon_token = T_SHIFTR; - else { - mon_error("Unrecognized token"); - return mon_token = T_NULL; - } - case '~': - return mon_token = T_NOT; - case '=': - return mon_token = T_ASSIGN; - - case '$': - if ((mon_token = get_hex_number(mon_number)) == T_NULL) - mon_error("'$' must be followed by hexadecimal number"); - return mon_token; - case '_': - if ((mon_token = get_dec_number(mon_number)) == T_NULL) - mon_error("'_' must be followed by decimal number"); - return mon_token; - case '\'': - return mon_token = get_char_number(mon_number); - case '"': - return mon_token = get_string(mon_string); - - default: - if (isalnum(c)) { - put_back(c); - return mon_token = get_hex_or_name(mon_number, mon_name); - } - mon_error("Unrecognized token"); - return mon_token = T_NULL; - } -} - -static enum Token get_hex_number(uintptr &i) -{ - char c = get_char(); - - i = 0; - if (!isxdigit(c)) - return T_NULL; - - do { - c = tolower(c); - if (c < 'a') - i = (i << 4) + (c - '0'); - else - i = (i << 4) + (c - 'a' + 10); - c = get_char(); - } while (isxdigit(c)); - - if (isalnum(c)) - return T_NULL; - else { - put_back(c); - return T_NUMBER; - } -} - -static enum Token get_dec_number(uintptr &i) -{ - char c = get_char(); - - i = 0; - if (!isdigit(c)) - return T_NULL; - - do { - i = (i * 10) + (c - '0'); - c = get_char(); - } while (isdigit(c)); - - if (isalnum(c)) - return T_NULL; - else { - put_back(c); - return T_NUMBER; - } -} - -static enum Token get_char_number(uintptr &i) -{ - char c; - - i = 0; - while ((c = get_char()) != 0) { - if (c == '\'') - return T_NUMBER; - i = (i << 8) + (uint8)c; - } - - mon_error("Unterminated character constant"); - return T_NULL; -} - -static enum Token get_string(char *&str) -{ - // Remember start of string - char *old_in_ptr = in_ptr; - - // Determine string length - char c; - unsigned n = 0; - while ((c = get_char()) != 0) { - n++; - if (c == '"') - break; - } - if (c == 0) { - mon_error("Unterminated string"); - return T_NULL; - } - - // Allocate new buffer (n: size needed including terminating 0) - str = (char *)realloc(str, n); - - // Copy string to buffer - char *p = str; - in_ptr = old_in_ptr; - while (--n) - *p++ = get_char(); - *p++ = 0; - get_char(); // skip closing '"' - return T_STRING; -} - -static enum Token get_hex_or_name(uintptr &i, char *&name) -{ - // Remember start of token - char *old_in_ptr = in_ptr; - - // Try hex number first - if (get_hex_number(i) == T_NUMBER) - return T_NUMBER; - - // Not a hex number, must be a variable name; determine its length - in_ptr = old_in_ptr; - char c = get_char(); - unsigned n = 1; - do { - n++; - c = get_char(); - } while (isalnum(c)); - - // Allocate new buffer (n: size needed including terminating 0) - name = (char *)realloc(name, n); - - // Copy name to buffer - in_ptr = old_in_ptr; - char *p = name; - while (--n) - *p++ = get_char(); - *p = 0; - return T_NAME; -} - - -/* - * expression = eor_expr {OR eor_expr} - * true: OK, false: Error - */ - -bool mon_expression(uintptr *number) -{ - uintptr accu, expr; - - if (!eor_expr(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_OR: - mon_get_token(); - if (!eor_expr(&expr)) - return false; - accu |= expr; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * eor_expr = and_expr {EOR and_expr} - * true: OK, false: Error - */ - -static bool eor_expr(uintptr *number) -{ - uintptr accu, expr; - - if (!and_expr(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_EOR: - mon_get_token(); - if (!and_expr(&expr)) - return false; - accu ^= expr; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * and_expr = shift_expr {AND shift_expr} - * true: OK, false: Error - */ - -static bool and_expr(uintptr *number) -{ - uintptr accu, expr; - - if (!shift_expr(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_AND: - mon_get_token(); - if (!shift_expr(&expr)) - return false; - accu &= expr; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * shift_expr = add_expr {(SHIFTL | SHIFTR) add_expr} - * true: OK, false: Error - */ - -static bool shift_expr(uintptr *number) -{ - uintptr accu, expr; - - if (!add_expr(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_SHIFTL: - mon_get_token(); - if (!add_expr(&expr)) - return false; - accu <<= expr; - break; - - case T_SHIFTR: - mon_get_token(); - if (!add_expr(&expr)) - return false; - accu >>= expr; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * add_expr = mul_expr {(PLUS | MINUS) mul_expr} - * true: OK, false: Error - */ - -static bool add_expr(uintptr *number) -{ - uintptr accu, expr; - - if (!mul_expr(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_PLUS: - mon_get_token(); - if (!mul_expr(&expr)) - return false; - accu += expr; - break; - - case T_MINUS: - mon_get_token(); - if (!mul_expr(&expr)) - return false; - accu -= expr; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * mul_expr = factor {(MUL | DIV | MOD) factor} - * true: OK, false: Error - */ - -static bool mul_expr(uintptr *number) -{ - uintptr accu, fact; - - if (!factor(&accu)) - return false; - - for (;;) - switch (mon_token) { - case T_MUL: - mon_get_token(); - if (!factor(&fact)) - return false; - accu *= fact; - break; - - case T_DIV: - mon_get_token(); - if (!factor(&fact)) - return false; - if (fact == 0) { - mon_error("Division by 0"); - return false; - } - accu /= fact; - break; - - case T_MOD: - mon_get_token(); - if (!factor(&fact)) - return false; - if (fact == 0) { - mon_error("Division by 0"); - return false; - } - accu %= fact; - break; - - default: - *number = accu; - return true; - } -} - - -/* - * factor = NUMBER | NAME | DOT | COLON | (PLUS | MINUS | NOT) factor | LPAREN expression RPAREN - * true: OK, false: Error - */ - -static bool factor(uintptr *number) -{ - switch (mon_token) { - case T_NUMBER: - *number = mon_number; - mon_get_token(); - return true; - - case T_NAME:{ - var_map::const_iterator v = vars.find(mon_name); - if (v == vars.end()) - return false; - else { - *number = v->second; - mon_get_token(); - return true; - } - } - - case T_DOT: - *number = mon_dot_address; - mon_get_token(); - return true; - - case T_COLON: - *number = colon_value; - mon_get_token(); - return true; - - case T_PLUS: - mon_get_token(); - return factor(number); - - case T_MINUS: - mon_get_token(); - if (factor(number)) { - *number = -*number; - return true; - } else - return false; - - case T_NOT: - mon_get_token(); - if (factor(number)) { - *number = ~*number; - return true; - } else - return false; - - case T_LPAREN: - mon_get_token(); - if (mon_expression(number)) - if (mon_token == T_RPAREN) { - mon_get_token(); - return true; - } else { - mon_error("Missing ')'"); - return false; - } - else { - mon_error("Error in expression"); - return false; - } - - case T_END: - mon_error("Required argument missing"); - return false; - - default: - mon_error("'(' or number expected"); - return false; - } -} - - -/* - * Set/clear/show variables - * set [var[=value]] - */ - -static void set_var() -{ - if (mon_token == T_END) { - - // Show all variables - if (vars.empty()) - fprintf(monout, "No variables defined\n"); - else { - var_map::const_iterator v = vars.begin(), end = vars.end(); - for (v=vars.begin(); v!=end; ++v) - fprintf(monout, "%s = %08lx\n", v->first.c_str(), v->second); - } - - } else if (mon_token == T_NAME) { - std::string var_name = mon_name; - mon_get_token(); - if (mon_token == T_ASSIGN) { - - // Set variable - uintptr value; - mon_get_token(); - if (!mon_expression(&value)) - return; - if (mon_token != T_END) { - mon_error("Too many arguments"); - return; - } - vars[var_name] = value; - - } else if (mon_token == T_END) { - - // Clear variable - vars.erase(var_name); - - } else - mon_error("'=' expected"); - } else - mon_error("Variable name expected"); -} - - -/* - * Clear all variables - * cv - */ - -static void clear_vars() -{ - vars.clear(); -} - - -/* - * Display help - * h - */ - -static void help_or_hunt() -{ - if (mon_token != T_END) { - hunt(); - return; - } - fprintf(monout, "x Quit mon\n" - "h This help text\n"); - fprintf(monout, cmd_help); -} - - -/* - * Display command list - * ?? - */ - -static void mon_cmd_list() -{ - for (int i=0; i 0) { - if (strcmp(argv[0], "-h") == 0 || strcmp(argv[0], "--help") == 0) { - printf("Usage: %s [-m] [-r] [command...]\n", prg_name); - exit(0); - } else if (strcmp(argv[0], "-m") == 0) - mon_macos_mode = true; - else if (strcmp(argv[0], "-r") == 0) - mon_use_real_mem = true; - else - break; - argc--; argv++; - } - interactive = (argc == 0); - - // Set up memory access functions if not supplied by the user - if (mon_read_byte == NULL) { - if (mon_use_real_mem) - mon_read_byte = mon_read_byte_real; - else - mon_read_byte = mon_read_byte_buffer; - } - if (mon_write_byte == NULL) { - if (mon_use_real_mem) - mon_write_byte = mon_write_byte_real; - else - mon_write_byte = mon_write_byte_buffer; - } - - // Allocate buffer - if (!mon_use_real_mem) { - mon_mem_size = 0x100000; - mem = (uint8 *)malloc(mon_mem_size); - - // Print banner - if (interactive) - fprintf(monerr, "\n *** cxmon V" VERSION " by Christian Bauer and Marc Hellwig ***\n" - " *** Press 'h' for help ***\n\n"); - } - - // Clear variables - vars.clear(); - - // In MacOS mode, pull in the lowmem globals as variables - if (mon_macos_mode) { - const lowmem_info *l = lowmem; - while (l->name) { - vars[l->name] = l->addr; - l++; - } - } - - init_abort(); - - // Read and parse command line - char *cmd = NULL; - while (!done) { - if (interactive) { - char prompt[16]; - sprintf(prompt, "[%0*lx]-> ", int(2 * sizeof(mon_dot_address)), mon_dot_address); - read_line(prompt); - if (!input) { - done = true; - continue; - } - } else { - if (argc == 0) { - done = true; - break; - } else { - unsigned n = strlen(argv[0]) + 1; - input = (char *)realloc(input, n); - strcpy(in_ptr = input, argv[0]); - argc--; - argv++; - } - } - - // Skip leading spaces - char c = get_char(); - while (isspace(c)) - c = get_char(); - put_back(c); - if (!c) - continue; // blank line - - // Read command word - char *p = in_ptr; - while (isgraph(c)) - c = get_char(); - put_back(c); - unsigned n = in_ptr - p; - cmd = (char *)realloc(cmd, n + 1); - memcpy(cmd, p, n); - cmd[n] = 0; - - // Execute command - if (strcmp(cmd, "x") == 0) { // Exit - done = true; - continue; - } - for (int i=0; i - - -/* - * Initialization, deinitialization and invocation - */ - -void mon_init(); -void mon_exit(); -void mon(int argc, char **argv); - - -/* - * Definitions for adding commands to mon - */ - -// Input tokens -enum Token { - T_NULL, // Invalid token - T_END, // End of line - T_NUMBER, // Hexadecimal/decimal number (uint32) - T_STRING, // String enclosed in "" - T_NAME, // Variable name - T_DOT, // '.' - T_COLON, // ':' - T_COMMA, // ',' - T_LPAREN, // '(' - T_RPAREN, // ')' - T_PLUS, // '+' - T_MINUS, // '-' - T_MUL, // '*' - T_DIV, // '/' - T_MOD, // '%' - T_AND, // '&' - T_OR, // '|' - T_EOR, // '^' - T_SHIFTL, // '<<' - T_SHIFTR, // '>>' - T_NOT, // '~' - T_ASSIGN // '=' -}; - -// Scanner variables -extern enum Token mon_token; // Last token read -extern uintptr mon_number; // Contains the number if mon_token==T_NUMBER -extern char *mon_string; // Contains the string if mon_token==T_STRING -extern char *mon_name; // Contains the variable name if mon_token==T_NAME - -// Streams for input, output and error messages -extern FILE *monin, *monout, *monerr; - -// Current address, value of '.' in expressions -extern uintptr mon_dot_address; - -extern bool mon_use_real_mem; // Flag: mon is using real memory -extern uint32 mon_mem_size; // Size of mon buffer (if mon_use_real_mem = false) - -extern bool mon_macos_mode; // Flag: enable features in the disassembler for working with MacOS code - -// Add command to mon -extern void mon_add_command(const char *name, void (*func)(), const char *help_text); - -// Functions for commands -extern void mon_error(const char *s); // Print error message -extern enum Token mon_get_token(); // Get next token -extern bool mon_expression(uintptr *number); // Parse expression -extern bool mon_aborted(); // Check if Ctrl-C was pressed - -// Memory access -extern uint32 (*mon_read_byte)(uintptr adr); -extern void (*mon_write_byte)(uintptr adr, uint32 b); -extern uint32 mon_read_half(uintptr adr); -extern void mon_write_half(uintptr adr, uint32 w); -extern uint32 mon_read_word(uintptr adr); -extern void mon_write_word(uintptr adr, uint32 l); - -#endif diff --git a/cxmon/src/mon_6502.cpp b/cxmon/src/mon_6502.cpp deleted file mode 100644 index 1a2b6a312..000000000 --- a/cxmon/src/mon_6502.cpp +++ /dev/null @@ -1,232 +0,0 @@ -/* - * mon_6502.cpp - 6502 disassembler - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include "mon.h" -#include "mon_disass.h" - - -// Addressing modes -enum AddrMode { - A_IMPL, - A_ACCU, // A - A_IMM, // #zz - A_REL, // Branches - A_ZERO, // zz - A_ZEROX, // zz,x - A_ZEROY, // zz,y - A_ABS, // zzzz - A_ABSX, // zzzz,x - A_ABSY, // zzzz,y - A_IND, // (zzzz) - A_INDX, // (zz,x) - A_INDY // (zz),y -}; - -// Mnemonics -enum Mnemonic { - M_ADC, M_AND, M_ASL, M_BCC, M_BCS, M_BEQ, M_BIT, M_BMI, M_BNE, M_BPL, - M_BRK, M_BVC, M_BVS, M_CLC, M_CLD, M_CLI, M_CLV, M_CMP, M_CPX, M_CPY, - M_DEC, M_DEX, M_DEY, M_EOR, M_INC, M_INX, M_INY, M_JMP, M_JSR, M_LDA, - M_LDX, M_LDY, M_LSR, M_NOP, M_ORA, M_PHA, M_PHP, M_PLA, M_PLP, M_ROL, - M_ROR, M_RTI, M_RTS, M_SBC, M_SEC, M_SED, M_SEI, M_STA, M_STX, M_STY, - M_TAX, M_TAY, M_TSX, M_TXA, M_TXS, M_TYA, - - M_ILLEGAL, // Undocumented opcodes start here - - M_IANC, M_IANE, M_IARR, M_IASR, M_IDCP, M_IISB, M_IJAM, M_INOP, M_ILAS, - M_ILAX, M_ILXA, M_IRLA, M_IRRA, M_ISAX, M_ISBC, M_ISBX, M_ISHA, M_ISHS, - M_ISHX, M_ISHY, M_ISLO, M_ISRE, - - M_MAXIMUM // Highest element -}; - -// Mnemonic for each opcode -static const Mnemonic mnemonic[256] = { - M_BRK , M_ORA , M_IJAM, M_ISLO, M_INOP, M_ORA, M_ASL , M_ISLO, // 00 - M_PHP , M_ORA , M_ASL , M_IANC, M_INOP, M_ORA, M_ASL , M_ISLO, - M_BPL , M_ORA , M_IJAM, M_ISLO, M_INOP, M_ORA, M_ASL , M_ISLO, // 10 - M_CLC , M_ORA , M_INOP, M_ISLO, M_INOP, M_ORA, M_ASL , M_ISLO, - M_JSR , M_AND , M_IJAM, M_IRLA, M_BIT , M_AND, M_ROL , M_IRLA, // 20 - M_PLP , M_AND , M_ROL , M_IANC, M_BIT , M_AND, M_ROL , M_IRLA, - M_BMI , M_AND , M_IJAM, M_IRLA, M_INOP, M_AND, M_ROL , M_IRLA, // 30 - M_SEC , M_AND , M_INOP, M_IRLA, M_INOP, M_AND, M_ROL , M_IRLA, - M_RTI , M_EOR , M_IJAM, M_ISRE, M_INOP, M_EOR, M_LSR , M_ISRE, // 40 - M_PHA , M_EOR , M_LSR , M_IASR, M_JMP , M_EOR, M_LSR , M_ISRE, - M_BVC , M_EOR , M_IJAM, M_ISRE, M_INOP, M_EOR, M_LSR , M_ISRE, // 50 - M_CLI , M_EOR , M_INOP, M_ISRE, M_INOP, M_EOR, M_LSR , M_ISRE, - M_RTS , M_ADC , M_IJAM, M_IRRA, M_INOP, M_ADC, M_ROR , M_IRRA, // 60 - M_PLA , M_ADC , M_ROR , M_IARR, M_JMP , M_ADC, M_ROR , M_IRRA, - M_BVS , M_ADC , M_IJAM, M_IRRA, M_INOP, M_ADC, M_ROR , M_IRRA, // 70 - M_SEI , M_ADC , M_INOP, M_IRRA, M_INOP, M_ADC, M_ROR , M_IRRA, - M_INOP, M_STA , M_INOP, M_ISAX, M_STY , M_STA, M_STX , M_ISAX, // 80 - M_DEY , M_INOP, M_TXA , M_IANE, M_STY , M_STA, M_STX , M_ISAX, - M_BCC , M_STA , M_IJAM, M_ISHA, M_STY , M_STA, M_STX , M_ISAX, // 90 - M_TYA , M_STA , M_TXS , M_ISHS, M_ISHY, M_STA, M_ISHX, M_ISHA, - M_LDY , M_LDA , M_LDX , M_ILAX, M_LDY , M_LDA, M_LDX , M_ILAX, // a0 - M_TAY , M_LDA , M_TAX , M_ILXA, M_LDY , M_LDA, M_LDX , M_ILAX, - M_BCS , M_LDA , M_IJAM, M_ILAX, M_LDY , M_LDA, M_LDX , M_ILAX, // b0 - M_CLV , M_LDA , M_TSX , M_ILAS, M_LDY , M_LDA, M_LDX , M_ILAX, - M_CPY , M_CMP , M_INOP, M_IDCP, M_CPY , M_CMP, M_DEC , M_IDCP, // c0 - M_INY , M_CMP , M_DEX , M_ISBX, M_CPY , M_CMP, M_DEC , M_IDCP, - M_BNE , M_CMP , M_IJAM, M_IDCP, M_INOP, M_CMP, M_DEC , M_IDCP, // d0 - M_CLD , M_CMP , M_INOP, M_IDCP, M_INOP, M_CMP, M_DEC , M_IDCP, - M_CPX , M_SBC , M_INOP, M_IISB, M_CPX , M_SBC, M_INC , M_IISB, // e0 - M_INX , M_SBC , M_NOP , M_ISBC, M_CPX , M_SBC, M_INC , M_IISB, - M_BEQ , M_SBC , M_IJAM, M_IISB, M_INOP, M_SBC, M_INC , M_IISB, // f0 - M_SED , M_SBC , M_INOP, M_IISB, M_INOP, M_SBC, M_INC , M_IISB -}; - -// Addressing mode for each opcode -static const AddrMode adr_mode[256] = { - A_IMPL, A_INDX, A_IMPL, A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // 00 - A_IMPL, A_IMM , A_ACCU, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // 10 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX, - A_ABS , A_INDX, A_IMPL, A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // 20 - A_IMPL, A_IMM , A_ACCU, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // 30 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX, - A_IMPL, A_INDX, A_IMPL, A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // 40 - A_IMPL, A_IMM , A_ACCU, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // 50 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX, - A_IMPL, A_INDX, A_IMPL, A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // 60 - A_IMPL, A_IMM , A_ACCU, A_IMM , A_IND , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // 70 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX, - A_IMM , A_INDX, A_IMM , A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // 80 - A_IMPL, A_IMM , A_IMPL, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROY, A_ZEROY, // 90 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSY , A_ABSY, - A_IMM , A_INDX, A_IMM , A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // a0 - A_IMPL, A_IMM , A_IMPL, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROY, A_ZEROY, // b0 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSY , A_ABSY, - A_IMM , A_INDX, A_IMM , A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // c0 - A_IMPL, A_IMM , A_IMPL, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // d0 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX, - A_IMM , A_INDX, A_IMM , A_INDX, A_ZERO , A_ZERO , A_ZERO , A_ZERO, // e0 - A_IMPL, A_IMM , A_IMPL, A_IMM , A_ABS , A_ABS , A_ABS , A_ABS, - A_REL , A_INDY, A_IMPL, A_INDY, A_ZEROX, A_ZEROX, A_ZEROX, A_ZEROX, // f0 - A_IMPL, A_ABSY, A_IMPL, A_ABSY, A_ABSX , A_ABSX , A_ABSX , A_ABSX -}; - -// Chars for each mnemonic -static const char mnem_1[] = "aaabbbbbbbbbbcccccccdddeiiijjllllnopppprrrrssssssstttttt?aaaadijnlllrrsssssssss"; -static const char mnem_2[] = "dnscceimnprvvllllmppeeeonnnmsdddsorhhlloottbeeetttaasxxy?nnrscsaoaaxlrabbhhhhlr"; -static const char mnem_3[] = "cdlcsqtielkcscdivpxycxyrcxypraxyrpaapaplrisccdiaxyxyxasa?cerrpbmpsxaaaxcxasxyoe"; - -// Instruction length for each addressing mode -static const int adr_length[] = {1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 2, 2}; - - -/* - * Disassemble one instruction, return number of bytes - */ - -int disass_6502(FILE *f, uint32 adr, uint8 op, uint8 lo, uint8 hi) -{ - AddrMode mode = adr_mode[op]; - Mnemonic mnem = mnemonic[op]; - - // Display instruction bytes in hex - switch (adr_length[mode]) { - case 1: - fprintf(f, "%02x\t\t", op); - break; - - case 2: - fprintf(f, "%02x %02x\t\t", op, lo); - break; - - case 3: - fprintf(f, "%02x %02x %02x\t", op, lo, hi); - break; - } - - // Tag undocumented opcodes with an asterisk - if (mnem > M_ILLEGAL) - fputc('*', f); - else - fputc(' ', f); - - // Print mnemonic - fprintf(f, "%c%c%c ", mnem_1[mnem], mnem_2[mnem], mnem_3[mnem]); - - // Print argument - switch (mode) { - case A_IMPL: - break; - - case A_ACCU: - fprintf(f, "a"); - break; - - case A_IMM: - fprintf(f, "#$%02x", lo); - break; - - case A_REL: - fprintf(f, "$%04x", (adr + 2) + (int8)lo); - break; - - case A_ZERO: - fprintf(f, "$%02x", lo); - break; - - case A_ZEROX: - fprintf(f, "$%02x,x", lo); - break; - - case A_ZEROY: - fprintf(f, "$%02x,y", lo); - break; - - case A_ABS: - fprintf(f, "$%04x", (hi << 8) | lo); - break; - - case A_ABSX: - fprintf(f, "$%04x,x", (hi << 8) | lo); - break; - - case A_ABSY: - fprintf(f, "$%04x,y", (hi << 8) | lo); - break; - - case A_IND: - fprintf(f, "($%04x)", (hi << 8) | lo); - break; - - case A_INDX: - fprintf(f, "($%02x,x)", lo); - break; - - case A_INDY: - fprintf(f, "($%02x),y", lo); - break; - } - - fputc('\n', f); - return adr_length[mode]; -} diff --git a/cxmon/src/mon_atraps.h b/cxmon/src/mon_atraps.h deleted file mode 100644 index f18c41ce8..000000000 --- a/cxmon/src/mon_atraps.h +++ /dev/null @@ -1,1212 +0,0 @@ -/* - * mon_atraps.h - MacOS A-Line trap definitions - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 MON_ATRAPS_H -#define MON_ATRAPS_H - -struct atrap_info { - const char *name; - uint16 word; -}; - -// A-Traps in ascending order -static const atrap_info atraps[] = { - {"Open" , 0xA000}, - {"Close" , 0xA001}, - {"Read" , 0xA002}, - {"Write" , 0xA003}, - {"Control" , 0xA004}, - {"Status" , 0xA005}, - {"KillIO" , 0xA006}, - {"GetVolInfo" , 0xA007}, - {"Create" , 0xA008}, - {"Delete" , 0xA009}, - {"OpenRF" , 0xA00A}, - {"Rename" , 0xA00B}, - {"GetFileInfo" , 0xA00C}, - {"SetFileInfo" , 0xA00D}, - {"UnmountVol" , 0xA00E}, - {"MountVol" , 0xA00F}, - {"Allocate" , 0xA010}, - {"GetEOF" , 0xA011}, - {"SetEOF" , 0xA012}, - {"FlushVol" , 0xA013}, - {"GetVol" , 0xA014}, - {"SetVol" , 0xA015}, - {"FInitQueue" , 0xA016}, - {"Eject" , 0xA017}, - {"GetFPos" , 0xA018}, - {"InitZone" , 0xA019}, - {"SetZone" , 0xA01B}, - {"FreeMem" , 0xA01C}, - {"DisposePtr" , 0xA01F}, - {"SetPtrSize" , 0xA020}, - {"GetPtrSize" , 0xA021}, - {"DisposeHandle" , 0xA023}, - {"SetHandleSize" , 0xA024}, - {"GetHandleSize" , 0xA025}, - {"ReallocHandle" , 0xA027}, - {"HLock" , 0xA029}, - {"HUnlock" , 0xA02A}, - {"EmptyHandle" , 0xA02B}, - {"InitApplZone" , 0xA02C}, - {"SetApplLimit" , 0xA02D}, - {"BlockMove" , 0xA02E}, - {"PostEvent" , 0xA02F}, - {"OSEventAvail" , 0xA030}, - {"GetOSEvent" , 0xA031}, - {"FlushEvents" , 0xA032}, - {"VInstall" , 0xA033}, - {"VRemove" , 0xA034}, - {"OffLine" , 0xA035}, - {"MoreMasters" , 0xA036}, - {"ReadParam" , 0xA037}, - {"WriteParam" , 0xA038}, - {"ReadDateTime" , 0xA039}, - {"SetDateTime" , 0xA03A}, - {"Delay" , 0xA03B}, - {"CmpString" , 0xA03C}, - {"DrvrInstall" , 0xA03D}, - {"DrvrRemove" , 0xA03E}, - {"InitUtil" , 0xA03F}, - {"ResrvMem" , 0xA040}, - {"SetFilLock" , 0xA041}, - {"RstFilLock" , 0xA042}, - {"SetFilType" , 0xA043}, - {"SetFPos" , 0xA044}, - {"FlushFile" , 0xA045}, - {"SetTrapAddress" , 0xA047}, - {"HPurge" , 0xA049}, - {"HNoPurge" , 0xA04A}, - {"SetGrowZone" , 0xA04B}, - {"CompactMem" , 0xA04C}, - {"PurgeMem" , 0xA04D}, - {"AddDrive" , 0xA04E}, - {"RDrvrInstall" , 0xA04F}, - {"CompareString" , 0xA050}, - {"ReadXPRam" , 0xA051}, - {"WriteXPRam" , 0xA052}, - {"UprString" , 0xA054}, - {"StripAddress" , 0xA055}, - {"LowerText" , 0xA056}, - {"SetApplBase" , 0xA057}, - {"InsTime" , 0xA058}, - {"RmvTime" , 0xA059}, - {"PrimeTime" , 0xA05A}, - {"PowerOff" , 0xA05B}, - {"MemoryDispatch" , 0xA05C}, - {"SwapMMUMode" , 0xA05D}, - {"NMInstall" , 0xA05E}, - {"NMRemove" , 0xA05F}, - {"FSDispatch" , 0xA060}, - {"MaxBlock" , 0xA061}, - {"MaxApplZone" , 0xA063}, - {"MoveHHi" , 0xA064}, - {"StackSpace" , 0xA065}, - {"HSetRBit" , 0xA067}, - {"HClrRBit" , 0xA068}, - {"HGetState" , 0xA069}, - {"HSetState" , 0xA06A}, - {"TestManager" , 0xA06B}, - {"InitFS" , 0xA06C}, - {"InitEvents" , 0xA06D}, - {"SlotManager" , 0xA06E}, - {"SlotVInstall" , 0xA06F}, - {"SlotVRemove" , 0xA070}, - {"AttachVBL" , 0xA071}, - {"DoVBLTask" , 0xA072}, - {"OSReserved" , 0xA073}, - {"CacheMgr" , 0xA074}, - {"SIntInstall" , 0xA075}, - {"SIntRemove" , 0xA076}, - {"CountADBs" , 0xA077}, - {"GetIndADB" , 0xA078}, - {"GetADBInfo" , 0xA079}, - {"SetADBInfo" , 0xA07A}, - {"ADBReInit" , 0xA07B}, - {"ADBOp" , 0xA07C}, - {"GetDefaultStartup" , 0xA07D}, - {"SetDefaultStartup" , 0xA07E}, - {"InternalWait" , 0xA07F}, - {"GetVideoDefault" , 0xA080}, - {"SetVideoDefault" , 0xA081}, - {"DTInstall" , 0xA082}, - {"SetOSDefault" , 0xA083}, - {"GetOSDefault" , 0xA084}, - {"PMgrOp" , 0xA085}, - {"IOPInfoAccess" , 0xA086}, - {"IOPMsgRequest" , 0xA087}, - {"IOPMoveData" , 0xA088}, - {"SCSIAtomic" , 0xA089}, - {"Sleep" , 0xA08A}, - {"CommToolboxDispatch" , 0xA08B}, - {"Wakeup" , 0xA08C}, - {"DebugUtil" , 0xA08D}, - {"BTreeDispatch" , 0xA08E}, - {"DeferUserFn" , 0xA08F}, - {"SysEnvirons" , 0xA090}, - {"Translate24To32" , 0xA091}, - {"EgretDispatch" , 0xA092}, - {"Microseconds" , 0xA093}, - {"ServerDispatch" , 0xA094}, - {"POGOMPW" , 0xA095}, - {"SharedLibsMPW" , 0xA096}, - {"FPPriv" , 0xA097}, - {"XToolTable" , 0xA099}, - {"vProcHelper" , 0xA09A}, - {"Messager" , 0xA09B}, - {"NewPtrStartup" , 0xA09C}, - {"MoveHLow" , 0xA09D}, - {"PowerMgrDispatch" , 0xA09E}, - {"PowerDispatch" , 0xA09F}, - {"vMRdAddr" , 0xA0A0}, - {"vMRdData" , 0xA0A1}, - {"vMWrData" , 0xA0A2}, - {"HeapDispatch" , 0xA0A4}, - {"VisRegionChanged" , 0xA0A5}, - {"vStdEntry" , 0xA0A6}, - {"vStdExit" , 0xA0A7}, - {"FSM" , 0xA0AC}, - {"vADBProc" , 0xA0AE}, - {"vMtCheck" , 0xA0AF}, - {"vCheckReMount" , 0xA0B0}, - {"vDtrmV2" , 0xA0B1}, - {"vFindDrive" , 0xA0B2}, - {"vFClose" , 0xA0B3}, - {"vFlushMDB" , 0xA0B4}, - {"vGoDriver" , 0xA0B5}, - {"vWaitUntil" , 0xA0B6}, - {"vSyncWait" , 0xA0B7}, - {"vSoundDead" , 0xA0B8}, - {"vDisptch" , 0xA0B9}, - {"vIAZInit" , 0xA0BA}, - {"vIAZPostInit" , 0xA0BB}, - {"vLaunchInit" , 0xA0BC}, - {"vCacheFlush" , 0xA0BD}, - {"vSysUtil" , 0xA0BE}, - {"vLg2Phys" , 0xA0BF}, - {"vFlushCache" , 0xA0C0}, - {"vGetBlock" , 0xA0C1}, - {"vMarkBlock" , 0xA0C2}, - {"vRelBlock" , 0xA0C3}, - {"vTrashBlocks" , 0xA0C4}, - {"vTrashVBlks" , 0xA0C5}, - {"vCacheWrIP" , 0xA0C6}, - {"vCacheRdIP" , 0xA0C7}, - {"vBasicIO" , 0xA0C8}, - {"vRdBlocks" , 0xA0C9}, - {"vWrBlocks" , 0xA0CA}, - {"vSetUpTags" , 0xA0CB}, - {"vBTClose" , 0xA0CC}, - {"vBTDelete" , 0xA0CD}, - {"vBTFlush" , 0xA0CE}, - {"vBTGetRecord" , 0xA0CF}, - {"vBTInsert" , 0xA0D0}, - {"vBTOpen" , 0xA0D1}, - {"vBTSearch" , 0xA0D2}, - {"vBTUpdate" , 0xA0D3}, - {"vGetNode" , 0xA0D4}, - {"vRelNode" , 0xA0D5}, - {"vAllocNode" , 0xA0D6}, - {"vFreeNode" , 0xA0D7}, - {"vExtBTFile" , 0xA0D8}, - {"vDeallocFile" , 0xA0D9}, - {"vExtendFile" , 0xA0DA}, - {"vTruncateFile" , 0xA0DB}, - {"vCMSetup" , 0xA0DC}, - {"PPC" , 0xA0DD}, - {"vDtrmV1" , 0xA0DE}, - {"vBlkAlloc" , 0xA0DF}, - {"vBlkDeAlloc" , 0xA0E0}, - {"vFileOpen" , 0xA0E1}, - {"vPermssnChk" , 0xA0E2}, - {"vFndFilName" , 0xA0E3}, - {"vRfNCall" , 0xA0E4}, - {"vAdjEOF" , 0xA0E5}, - {"vPixel2Char" , 0xA0E6}, - {"vChar2Pixel" , 0xA0E7}, - {"vHiliteText" , 0xA0E8}, - {"vFileClose" , 0xA0E9}, - {"vFileRead" , 0xA0EA}, - {"vFileWrite" , 0xA0EB}, - {"DispatchHelper" , 0xA0EC}, - {"vUpdAltMDB" , 0xA0ED}, - {"vCkExtFS" , 0xA0EE}, - {"vDtrmV3" , 0xA0EF}, - {"vBMChk" , 0xA0F0}, - {"vTstMod" , 0xA0F1}, - {"vLocCRec" , 0xA0F2}, - {"vTreeSearch" , 0xA0F3}, - {"vMapFBlock" , 0xA0F4}, - {"vXFSearch" , 0xA0F5}, - {"vReadBM" , 0xA0F6}, - {"vDoEject" , 0xA0F7}, - {"vSegStack" , 0xA0F8}, - {"vSuperLoad" , 0xA0F9}, - {"vCmpFrm" , 0xA0FA}, - {"vNewMap" , 0xA0FB}, - {"vCheckLoad" , 0xA0FC}, - {"XTrimMeasure" , 0xA0FD}, - {"XFindWord" , 0xA0FE}, - {"XFindLine" , 0xA0FF}, - {"GetZone" , 0xA11A}, - {"MaxMem" , 0xA11D}, - {"NewPtr" , 0xA11E}, - {"NewHandle" , 0xA122}, - {"HandleZone" , 0xA126}, - {"RecoverHandle" , 0xA128}, - {"PPostEvent" , 0xA12F}, - {"DrvrInstall" , 0xA13D}, - {"GetTrapAddress" , 0xA146}, - {"PtrZone" , 0xA148}, - {"MemoryDispatch" , 0xA15C}, - {"PurgeSpace" , 0xA162}, - {"NewEmptyHandle" , 0xA166}, - {"Microseconds" , 0xA193}, - {"HWPriv" , 0xA198}, - {"Gestalt" , 0xA1AD}, - {"HOpen" , 0xA200}, - {"HGetVInfo" , 0xA207}, - {"HCreate" , 0xA208}, - {"HDelete" , 0xA209}, - {"HOpenRF" , 0xA20A}, - {"HRename" , 0xA20B}, - {"HGetFileInfo" , 0xA20C}, - {"HSetFileInfo" , 0xA20D}, - {"HUnmountVol" , 0xA20E}, - {"AllocContig" , 0xA210}, - {"HGetVol" , 0xA214}, - {"HSetVol" , 0xA215}, - {"BlockMoveData" , 0xA22E}, - {"HSetFLock" , 0xA241}, - {"HRstFLock" , 0xA242}, - {"SetOSTrapAddress" , 0xA247}, - {"StripText" , 0xA256}, - {"HFSDispatch" , 0xA260}, - {"IdleUpdate" , 0xA285}, - {"SleepQInstall" , 0xA28A}, - {"NewPtrClear" , 0xA31E}, - {"NewHandleClear" , 0xA322}, - {"GetOSTrapAddress" , 0xA346}, - {"NewGestalt" , 0xA3AD}, - {"DrvrInstallRsrvMem" , 0xA43D}, - {"UpperText" , 0xA456}, - {"InsXTime" , 0xA458}, - {"IdleState" , 0xA485}, - {"SleepQRemove" , 0xA48A}, - {"NewPtrSys" , 0xA51E}, - {"NewHandleSys" , 0xA522}, - {"DrvrInstallRsrvMem" , 0xA53D}, - {"PurgeSpaceSys" , 0xA562}, - {"ReplaceGestalt" , 0xA5AD}, - {"SetToolBoxTrapAddress" , 0xA647}, - {"StripUpperText" , 0xA656}, - {"SerialPower" , 0xA685}, - {"NewPtrSysClear" , 0xA71E}, - {"NewHandleSysClear" , 0xA722}, - {"GetToolBoxTrapAddress" , 0xA746}, - {"GetToolTrapAddress" , 0xA746}, - {"GetGestaltProcPtr" , 0xA7AD}, - {"SoundDispatch" , 0xA800}, - {"SndDisposeChannel" , 0xA801}, - {"SndAddModifier" , 0xA802}, - {"SndDoCommand" , 0xA803}, - {"SndDoImmediate" , 0xA804}, - {"SndPlay" , 0xA805}, - {"SndControl" , 0xA806}, - {"SndNewChannel" , 0xA807}, - {"InitProcMenu" , 0xA808}, - {"GetControlVariant" , 0xA809}, - {"GetWVariant" , 0xA80A}, - {"PopUpMenuSelect" , 0xA80B}, - {"RGetResource" , 0xA80C}, - {"Count1Resources" , 0xA80D}, - {"Get1IxResource" , 0xA80E}, - {"Get1IxType" , 0xA80F}, - {"Unique1ID" , 0xA810}, - {"TESelView" , 0xA811}, - {"TEPinScroll" , 0xA812}, - {"TEAutoView" , 0xA813}, - {"SetFractEnable" , 0xA814}, - {"SCSIDispatch" , 0xA815}, - {"Pack8" , 0xA816}, - {"CopyMask" , 0xA817}, - {"FixATan2" , 0xA818}, - {"XMunger" , 0xA819}, - {"HOpenResFile" , 0xA81A}, - {"HCreateResFile" , 0xA81B}, - {"Count1Types" , 0xA81C}, - {"InvalMenuBar" , 0xA81D}, - {"SaveRestoreBits" , 0xA81E}, - {"Get1Resource" , 0xA81F}, - {"Get1NamedResource" , 0xA820}, - {"MaxSizeRsrc" , 0xA821}, - {"ResourceDispatch" , 0xA822}, - {"AliasDispatch" , 0xA823}, - {"FSMgr" , 0xA824}, - {"MenuDispatch" , 0xA825}, - {"InsertMenuItem" , 0xA826}, - {"HideDialogItem" , 0xA827}, - {"ShowDialogItem" , 0xA828}, - {"LayerDispatch" , 0xA829}, - {"ComponentDispatch" , 0xA82A}, - {"Pack9" , 0xA82B}, - {"Pack10" , 0xA82C}, - {"Pack11" , 0xA82D}, - {"Pack12" , 0xA82E}, - {"Pack13" , 0xA82F}, - {"Pack14" , 0xA830}, - {"Pack15" , 0xA831}, - {"QuickDrawGX" , 0xA832}, - {"ScrnBitMap" , 0xA833}, - {"SetFScaleDisable" , 0xA834}, - {"FontMetrics" , 0xA835}, - {"GetMaskTable" , 0xA836}, - {"MeasureText" , 0xA837}, - {"CalcMask" , 0xA838}, - {"SeedFill" , 0xA839}, - {"ZoomWindow" , 0xA83A}, - {"TrackBox" , 0xA83B}, - {"TEGetOffset" , 0xA83C}, - {"TEDispatch" , 0xA83D}, - {"TEStyleNew" , 0xA83E}, - {"Long2Fix" , 0xA83F}, - {"Fix2Long" , 0xA840}, - {"Fix2Frac" , 0xA841}, - {"Frac2Fix" , 0xA842}, - {"Fix2X" , 0xA843}, - {"X2Fix" , 0xA844}, - {"Frac2X" , 0xA845}, - {"X2Frac" , 0xA846}, - {"FracCos" , 0xA847}, - {"FracSin" , 0xA848}, - {"FracSqrt" , 0xA849}, - {"FracMul" , 0xA84A}, - {"FracDiv" , 0xA84B}, - {"UserDelay" , 0xA84C}, - {"FixDiv" , 0xA84D}, - {"GetItemCmd" , 0xA84E}, - {"SetItemCmd" , 0xA84F}, - {"InitCursor" , 0xA850}, - {"SetCursor" , 0xA851}, - {"HideCursor" , 0xA852}, - {"ShowCursor" , 0xA853}, - {"FontDispatch" , 0xA854}, - {"ShieldCursor" , 0xA855}, - {"ObscureCursor" , 0xA856}, - {"SetEntry" , 0xA857}, - {"BitAnd" , 0xA858}, - {"BitXOr" , 0xA859}, - {"BitNot" , 0xA85A}, - {"BitOr" , 0xA85B}, - {"BitShift" , 0xA85C}, - {"BitTst" , 0xA85D}, - {"BitSet" , 0xA85E}, - {"BitClr" , 0xA85F}, - {"WaitNextEvent" , 0xA860}, - {"Random" , 0xA861}, - {"ForeColor" , 0xA862}, - {"BackColor" , 0xA863}, - {"ColorBit" , 0xA864}, - {"GetPixel" , 0xA865}, - {"StuffHex" , 0xA866}, - {"LongMul" , 0xA867}, - {"FixMul" , 0xA868}, - {"FixRatio" , 0xA869}, - {"HiWord" , 0xA86A}, - {"LoWord" , 0xA86B}, - {"FixRound" , 0xA86C}, - {"InitPort" , 0xA86D}, - {"InitGraf" , 0xA86E}, - {"OpenPort" , 0xA86F}, - {"LocalToGlobal" , 0xA870}, - {"GlobalToLocal" , 0xA871}, - {"GrafDevice" , 0xA872}, - {"SetPort" , 0xA873}, - {"GetPort" , 0xA874}, - {"SetPBits" , 0xA875}, - {"PortSize" , 0xA876}, - {"MovePortTo" , 0xA877}, - {"SetOrigin" , 0xA878}, - {"SetClip" , 0xA879}, - {"GetClip" , 0xA87A}, - {"ClipRect" , 0xA87B}, - {"BackPat" , 0xA87C}, - {"ClosePort" , 0xA87D}, - {"AddPt" , 0xA87E}, - {"SubPt" , 0xA87F}, - {"SetPt" , 0xA880}, - {"EqualPt" , 0xA881}, - {"StdText" , 0xA882}, - {"DrawChar" , 0xA883}, - {"DrawString" , 0xA884}, - {"DrawText" , 0xA885}, - {"TextWidth" , 0xA886}, - {"TextFont" , 0xA887}, - {"TextFace" , 0xA888}, - {"TextMode" , 0xA889}, - {"TextSize" , 0xA88A}, - {"GetFontInfo" , 0xA88B}, - {"StringWidth" , 0xA88C}, - {"CharWidth" , 0xA88D}, - {"SpaceExtra" , 0xA88E}, - {"OSDispatch" , 0xA88F}, - {"StdLine" , 0xA890}, - {"LineTo" , 0xA891}, - {"Line" , 0xA892}, - {"MoveTo" , 0xA893}, - {"Move" , 0xA894}, - {"ShutDown" , 0xA895}, - {"HidePen" , 0xA896}, - {"ShowPen" , 0xA897}, - {"GetPenState" , 0xA898}, - {"SetPenState" , 0xA899}, - {"GetPen" , 0xA89A}, - {"PenSize" , 0xA89B}, - {"PenMode" , 0xA89C}, - {"PenPat" , 0xA89D}, - {"PenNormal" , 0xA89E}, - {"Unimplemented" , 0xA89F}, - {"StdRect" , 0xA8A0}, - {"FrameRect" , 0xA8A1}, - {"PaintRect" , 0xA8A2}, - {"EraseRect" , 0xA8A3}, - {"InverRect" , 0xA8A4}, - {"FillRect" , 0xA8A5}, - {"EqualRect" , 0xA8A6}, - {"SetRect" , 0xA8A7}, - {"OffsetRect" , 0xA8A8}, - {"InsetRect" , 0xA8A9}, - {"SectRect" , 0xA8AA}, - {"UnionRect" , 0xA8AB}, - {"Pt2Rect" , 0xA8AC}, - {"PtInRect" , 0xA8AD}, - {"EmptyRect" , 0xA8AE}, - {"StdRRect" , 0xA8AF}, - {"FrameRoundRect" , 0xA8B0}, - {"PaintRoundRect" , 0xA8B1}, - {"EraseRoundRect" , 0xA8B2}, - {"InverRoundRect" , 0xA8B3}, - {"FillRoundRect" , 0xA8B4}, - {"ScriptUtil" , 0xA8B5}, - {"StdOval" , 0xA8B6}, - {"FrameOval" , 0xA8B7}, - {"PaintOval" , 0xA8B8}, - {"EraseOval" , 0xA8B9}, - {"InvertOval" , 0xA8BA}, - {"FillOval" , 0xA8BB}, - {"SlopeFromAngle" , 0xA8BC}, - {"StdArc" , 0xA8BD}, - {"FrameArc" , 0xA8BE}, - {"PaintArc" , 0xA8BF}, - {"EraseArc" , 0xA8C0}, - {"InvertArc" , 0xA8C1}, - {"FillArc" , 0xA8C2}, - {"PtToAngle" , 0xA8C3}, - {"AngleFromSlope" , 0xA8C4}, - {"StdPoly" , 0xA8C5}, - {"FramePoly" , 0xA8C6}, - {"PaintPoly" , 0xA8C7}, - {"ErasePoly" , 0xA8C8}, - {"InvertPoly" , 0xA8C9}, - {"FillPoly" , 0xA8CA}, - {"OpenPoly" , 0xA8CB}, - {"ClosePoly" , 0xA8CC}, - {"KillPoly" , 0xA8CD}, - {"OffsetPoly" , 0xA8CE}, - {"PackBits" , 0xA8CF}, - {"UnpackBits" , 0xA8D0}, - {"StdRgn" , 0xA8D1}, - {"FrameRgn" , 0xA8D2}, - {"PaintRgn" , 0xA8D3}, - {"EraseRgn" , 0xA8D4}, - {"InverRgn" , 0xA8D5}, - {"FillRgn" , 0xA8D6}, - {"BitMapToRegion" , 0xA8D7}, - {"NewRgn" , 0xA8D8}, - {"DisposeRgn" , 0xA8D9}, - {"OpenRgn" , 0xA8DA}, - {"CloseRgn" , 0xA8DB}, - {"CopyRgn" , 0xA8DC}, - {"SetEmptyRgn" , 0xA8DD}, - {"SetRecRgn" , 0xA8DE}, - {"RectRgn" , 0xA8DF}, - {"OffsetRgn" , 0xA8E0}, - {"InsetRgn" , 0xA8E1}, - {"EmptyRgn" , 0xA8E2}, - {"EqualRgn" , 0xA8E3}, - {"SectRgn" , 0xA8E4}, - {"UnionRgn" , 0xA8E5}, - {"DiffRgn" , 0xA8E6}, - {"XOrRgn" , 0xA8E7}, - {"PtInRgn" , 0xA8E8}, - {"RectInRgn" , 0xA8E9}, - {"SetStdProcs" , 0xA8EA}, - {"StdBits" , 0xA8EB}, - {"CopyBits" , 0xA8EC}, - {"StdTxMeas" , 0xA8ED}, - {"StdGetPic" , 0xA8EE}, - {"ScrollRect" , 0xA8EF}, - {"StdPutPic" , 0xA8F0}, - {"StdComment" , 0xA8F1}, - {"PicComment" , 0xA8F2}, - {"OpenPicture" , 0xA8F3}, - {"ClosePicture" , 0xA8F4}, - {"KillPicture" , 0xA8F5}, - {"DrawPicture" , 0xA8F6}, - {"Layout" , 0xA8F7}, - {"ScalePt" , 0xA8F8}, - {"MapPt" , 0xA8F9}, - {"MapRect" , 0xA8FA}, - {"MapRgn" , 0xA8FB}, - {"MapPoly" , 0xA8FC}, - {"PrGlue" , 0xA8FD}, - {"InitFonts" , 0xA8FE}, - {"GetFName" , 0xA8FF}, - {"GetFNum" , 0xA900}, - {"FMSwapFont" , 0xA901}, - {"RealFont" , 0xA902}, - {"SetFontLock" , 0xA903}, - {"DrawGrowIcon" , 0xA904}, - {"DragGrayRgn" , 0xA905}, - {"NewString" , 0xA906}, - {"SetString" , 0xA907}, - {"ShowHide" , 0xA908}, - {"CalcVis" , 0xA909}, - {"CalcVBehind" , 0xA90A}, - {"ClipAbove" , 0xA90B}, - {"PaintOne" , 0xA90C}, - {"PaintBehind" , 0xA90D}, - {"SaveOld" , 0xA90E}, - {"DrawNew" , 0xA90F}, - {"GetWMgrPort" , 0xA910}, - {"CheckUpDate" , 0xA911}, - {"InitWindows" , 0xA912}, - {"NewWindow" , 0xA913}, - {"DisposeWindow" , 0xA914}, - {"ShowWindow" , 0xA915}, - {"HideWindow" , 0xA916}, - {"GetWRefCon" , 0xA917}, - {"SetWRefCon" , 0xA918}, - {"GetWTitle" , 0xA919}, - {"SetWTitle" , 0xA91A}, - {"MoveWindow" , 0xA91B}, - {"HiliteWindow" , 0xA91C}, - {"SizeWindow" , 0xA91D}, - {"TrackGoAway" , 0xA91E}, - {"SelectWindow" , 0xA91F}, - {"BringToFront" , 0xA920}, - {"SendBehind" , 0xA921}, - {"BeginUpDate" , 0xA922}, - {"EndUpDate" , 0xA923}, - {"FrontWindow" , 0xA924}, - {"DragWindow" , 0xA925}, - {"DragTheRgn" , 0xA926}, - {"InvalRgn" , 0xA927}, - {"InvalRect" , 0xA928}, - {"ValidRgn" , 0xA929}, - {"ValidRect" , 0xA92A}, - {"GrowWindow" , 0xA92B}, - {"FindWindow" , 0xA92C}, - {"CloseWindow" , 0xA92D}, - {"SetWindowPic" , 0xA92E}, - {"GetWindowPic" , 0xA92F}, - {"InitMenus" , 0xA930}, - {"NewMenu" , 0xA931}, - {"DisposeMenu" , 0xA932}, - {"AppendMenu" , 0xA933}, - {"ClearMenuBar" , 0xA934}, - {"InsertMenu" , 0xA935}, - {"DeleteMenu" , 0xA936}, - {"DrawMenuBar" , 0xA937}, - {"HiliteMenu" , 0xA938}, - {"EnableItem" , 0xA939}, - {"DisableItem" , 0xA93A}, - {"GetMenuBar" , 0xA93B}, - {"SetMenuBar" , 0xA93C}, - {"MenuSelect" , 0xA93D}, - {"MenuKey" , 0xA93E}, - {"GetItmIcon" , 0xA93F}, - {"SetItmIcon" , 0xA940}, - {"GetItmStyle" , 0xA941}, - {"SetItmStyle" , 0xA942}, - {"GetItmMark" , 0xA943}, - {"SetItmMark" , 0xA944}, - {"CheckItem" , 0xA945}, - {"GetMenuItemText" , 0xA946}, - {"SetMenuItemText" , 0xA947}, - {"CalcMenuSize" , 0xA948}, - {"GetMenuHandle" , 0xA949}, - {"SetMFlash" , 0xA94A}, - {"PlotIcon" , 0xA94B}, - {"FlashMenuBar" , 0xA94C}, - {"AppendResMenu" , 0xA94D}, - {"PinRect" , 0xA94E}, - {"DeltaPoint" , 0xA94F}, - {"CountMItems" , 0xA950}, - {"InsertResMenu" , 0xA951}, - {"DeleteMenuItem" , 0xA952}, - {"UpdtControl" , 0xA953}, - {"NewControl" , 0xA954}, - {"DisposeControl" , 0xA955}, - {"KillControls" , 0xA956}, - {"ShowControl" , 0xA957}, - {"HideControl" , 0xA958}, - {"MoveControl" , 0xA959}, - {"GetControlReference" , 0xA95A}, - {"SetControlReference" , 0xA95B}, - {"SizeControl" , 0xA95C}, - {"HiliteControl" , 0xA95D}, - {"GetControlTitle" , 0xA95E}, - {"SetControlTitle" , 0xA95F}, - {"GetControlValue" , 0xA960}, - {"GetControlMinimum" , 0xA961}, - {"GetControlMaximum" , 0xA962}, - {"SetControlValue" , 0xA963}, - {"SetControlMinimum" , 0xA964}, - {"SetControlMaximum" , 0xA965}, - {"TestControl" , 0xA966}, - {"DragControl" , 0xA967}, - {"TrackControl" , 0xA968}, - {"DrawControls" , 0xA969}, - {"GetControlAction" , 0xA96A}, - {"SetControlAction" , 0xA96B}, - {"FindControl" , 0xA96C}, - {"Draw1Control" , 0xA96D}, - {"Dequeue" , 0xA96E}, - {"Enqueue" , 0xA96F}, - {"GetNextEvent" , 0xA970}, - {"EventAvail" , 0xA971}, - {"GetMouse" , 0xA972}, - {"StillDown" , 0xA973}, - {"Button" , 0xA974}, - {"TickCount" , 0xA975}, - {"GetKeys" , 0xA976}, - {"WaitMouseUp" , 0xA977}, - {"UpdtDialog" , 0xA978}, - {"CouldDialog" , 0xA979}, - {"FreeDialog" , 0xA97A}, - {"InitDialogs" , 0xA97B}, - {"GetNewDialog" , 0xA97C}, - {"NewDialog" , 0xA97D}, - {"SelectDialogItemText" , 0xA97E}, - {"IsDialogEvent" , 0xA97F}, - {"DialogSelect" , 0xA980}, - {"DrawDialog" , 0xA981}, - {"CloseDialog" , 0xA982}, - {"DisposeDialog" , 0xA983}, - {"FindDialogItem" , 0xA984}, - {"Alert" , 0xA985}, - {"StopAlert" , 0xA986}, - {"NoteAlert" , 0xA987}, - {"CautionAlert" , 0xA988}, - {"CouldAlert" , 0xA989}, - {"FreeAlert" , 0xA98A}, - {"ParamText" , 0xA98B}, - {"ErrorSound" , 0xA98C}, - {"GetDialogItem" , 0xA98D}, - {"SetDialogItem" , 0xA98E}, - {"SetDialogItemText" , 0xA98F}, - {"GetDialogItemText" , 0xA990}, - {"ModalDialog" , 0xA991}, - {"DetachResource" , 0xA992}, - {"SetResPurge" , 0xA993}, - {"CurResFile" , 0xA994}, - {"InitResources" , 0xA995}, - {"RsrcZoneInit" , 0xA996}, - {"OpenResFile" , 0xA997}, - {"UseResFile" , 0xA998}, - {"UpdateResFile" , 0xA999}, - {"CloseResFile" , 0xA99A}, - {"SetResLoad" , 0xA99B}, - {"CountResources" , 0xA99C}, - {"GetIndResource" , 0xA99D}, - {"CountTypes" , 0xA99E}, - {"GetIndType" , 0xA99F}, - {"GetResource" , 0xA9A0}, - {"GetNamedResource" , 0xA9A1}, - {"LoadResource" , 0xA9A2}, - {"ReleaseResource" , 0xA9A3}, - {"HomeResFile" , 0xA9A4}, - {"SizeRsrc" , 0xA9A5}, - {"GetResAttrs" , 0xA9A6}, - {"SetResAttrs" , 0xA9A7}, - {"GetResInfo" , 0xA9A8}, - {"SetResInfo" , 0xA9A9}, - {"ChangedResource" , 0xA9AA}, - {"AddResource" , 0xA9AB}, - {"AddReference" , 0xA9AC}, - {"RmveResource" , 0xA9AD}, - {"RmveReference" , 0xA9AE}, - {"ResError" , 0xA9AF}, - {"WriteResource" , 0xA9B0}, - {"CreateResFile" , 0xA9B1}, - {"SystemEvent" , 0xA9B2}, - {"SystemClick" , 0xA9B3}, - {"SystemTask" , 0xA9B4}, - {"SystemMenu" , 0xA9B5}, - {"OpenDeskAcc" , 0xA9B6}, - {"CloseDeskAcc" , 0xA9B7}, - {"GetPattern" , 0xA9B8}, - {"GetCursor" , 0xA9B9}, - {"GetString" , 0xA9BA}, - {"GetIcon" , 0xA9BB}, - {"GetPicture" , 0xA9BC}, - {"GetNewWindow" , 0xA9BD}, - {"GetNewControl" , 0xA9BE}, - {"GetRMenu" , 0xA9BF}, - {"GetNewMBar" , 0xA9C0}, - {"UniqueID" , 0xA9C1}, - {"SysEdit" , 0xA9C2}, - {"KeyTranslate" , 0xA9C3}, - {"OpenRFPerm" , 0xA9C4}, - {"RsrcMapEntry" , 0xA9C5}, - {"SecondsToDate" , 0xA9C6}, - {"DateToSeconds" , 0xA9C7}, - {"SysBeep" , 0xA9C8}, - {"SysError" , 0xA9C9}, - {"PutIcon" , 0xA9CA}, - {"TEGetText" , 0xA9CB}, - {"TEInit" , 0xA9CC}, - {"TEDispose" , 0xA9CD}, - {"TETextBox" , 0xA9CE}, - {"TESetText" , 0xA9CF}, - {"TECalText" , 0xA9D0}, - {"TESetSelect" , 0xA9D1}, - {"TENew" , 0xA9D2}, - {"TEUpdate" , 0xA9D3}, - {"TEClick" , 0xA9D4}, - {"TECopy" , 0xA9D5}, - {"TECut" , 0xA9D6}, - {"TEDelete" , 0xA9D7}, - {"TEActivate" , 0xA9D8}, - {"TEDeactivate" , 0xA9D9}, - {"TEIdle" , 0xA9DA}, - {"TEPaste" , 0xA9DB}, - {"TEKey" , 0xA9DC}, - {"TEScroll" , 0xA9DD}, - {"TEInsert" , 0xA9DE}, - {"TESetAlignment" , 0xA9DF}, - {"Munger" , 0xA9E0}, - {"HandToHand" , 0xA9E1}, - {"PtrToXHand" , 0xA9E2}, - {"PtrToHand" , 0xA9E3}, - {"HandAndHand" , 0xA9E4}, - {"InitPack" , 0xA9E5}, - {"InitAllPacks" , 0xA9E6}, - {"Pack0" , 0xA9E7}, - {"Pack1" , 0xA9E8}, - {"Pack2" , 0xA9E9}, - {"Pack3" , 0xA9EA}, - {"FP68K" , 0xA9EB}, - {"Elems68K" , 0xA9EC}, - {"Pack6" , 0xA9ED}, - {"DECSTR68K" , 0xA9EE}, - {"PtrAndHand" , 0xA9EF}, - {"LoadSeg" , 0xA9F0}, - {"UnLoadSeg" , 0xA9F1}, - {"Launch" , 0xA9F2}, - {"Chain" , 0xA9F3}, - {"ExitToShell" , 0xA9F4}, - {"GetAppParms" , 0xA9F5}, - {"GetResFileAttrs" , 0xA9F6}, - {"SetResFileAttrs" , 0xA9F7}, - {"MethodDispatch" , 0xA9F8}, - {"InfoScrap" , 0xA9F9}, - {"UnloadScrap" , 0xA9FA}, - {"LoadScrap" , 0xA9FB}, - {"ZeroScrap" , 0xA9FC}, - {"GetScrap" , 0xA9FD}, - {"PutScrap" , 0xA9FE}, - {"Debugger" , 0xA9FF}, - {"OpenCPort" , 0xAA00}, - {"InitCPort" , 0xAA01}, - {"CloseCPort" , 0xAA02}, - {"NewPixMap" , 0xAA03}, - {"DisposePixMap" , 0xAA04}, - {"CopyPixMap" , 0xAA05}, - {"SetPortPix" , 0xAA06}, - {"NewPixPat" , 0xAA07}, - {"DisposePixPat" , 0xAA08}, - {"CopyPixPat" , 0xAA09}, - {"PenPixPat" , 0xAA0A}, - {"BackPixPat" , 0xAA0B}, - {"GetPixPat" , 0xAA0C}, - {"MakeRGBPat" , 0xAA0D}, - {"FillCRect" , 0xAA0E}, - {"FillCOval" , 0xAA0F}, - {"FillCRoundRect" , 0xAA10}, - {"FillCArc" , 0xAA11}, - {"FillCRgn" , 0xAA12}, - {"FillCPoly" , 0xAA13}, - {"RGBForeColor" , 0xAA14}, - {"RGBBackColor" , 0xAA15}, - {"SetCPixel" , 0xAA16}, - {"GetCPixel" , 0xAA17}, - {"GetCTable" , 0xAA18}, - {"GetForeColor" , 0xAA19}, - {"GetBackColor" , 0xAA1A}, - {"GetCCursor" , 0xAA1B}, - {"SetCCursor" , 0xAA1C}, - {"AllocCursor" , 0xAA1D}, - {"GetCIcon" , 0xAA1E}, - {"PlotCIcon" , 0xAA1F}, - {"OpenCPicture" , 0xAA20}, - {"OpColor" , 0xAA21}, - {"HiliteColor" , 0xAA22}, - {"CharExtra" , 0xAA23}, - {"DisposeCTable" , 0xAA24}, - {"DisposeCIcon" , 0xAA25}, - {"DisposeCCursor" , 0xAA26}, - {"GetMaxDevice" , 0xAA27}, - {"GetCTSeed" , 0xAA28}, - {"GetDeviceList" , 0xAA29}, - {"GetMainDevice" , 0xAA2A}, - {"GetNextDevice" , 0xAA2B}, - {"TestDeviceAttribute" , 0xAA2C}, - {"SetDeviceAttribute" , 0xAA2D}, - {"InitGDevice" , 0xAA2E}, - {"NewGDevice" , 0xAA2F}, - {"DisposeGDevice" , 0xAA30}, - {"SetGDevice" , 0xAA31}, - {"GetGDevice" , 0xAA32}, - {"Color2Index" , 0xAA33}, - {"Index2Color" , 0xAA34}, - {"InvertColor" , 0xAA35}, - {"RealColor" , 0xAA36}, - {"GetSubTable" , 0xAA37}, - {"UpdatePixMap" , 0xAA38}, - {"MakeITable" , 0xAA39}, - {"AddSearch" , 0xAA3A}, - {"AddComp" , 0xAA3B}, - {"SetClientID" , 0xAA3C}, - {"ProtectEntry" , 0xAA3D}, - {"ReserveEntry" , 0xAA3E}, - {"SetEntries" , 0xAA3F}, - {"QDError" , 0xAA40}, - {"SetWinColor" , 0xAA41}, - {"GetAuxWin" , 0xAA42}, - {"SetControlColor" , 0xAA43}, - {"GetAuxiliaryControlRecord", 0xAA44}, - {"NewCWindow" , 0xAA45}, - {"GetNewCWindow" , 0xAA46}, - {"SetDeskCPat" , 0xAA47}, - {"GetCWMgrPort" , 0xAA48}, - {"SaveEntries" , 0xAA49}, - {"RestoreEntries" , 0xAA4A}, - {"NewColorDialog" , 0xAA4B}, - {"DelSearch" , 0xAA4C}, - {"DelComp" , 0xAA4D}, - {"SetStdCProcs" , 0xAA4E}, - {"CalcCMask" , 0xAA4F}, - {"SeedCFill" , 0xAA50}, - {"CopyDeepMask" , 0xAA51}, - {"HighLevelFSDispatch" , 0xAA52}, - {"DictionaryDispatch" , 0xAA53}, - {"TextServicesDispatch" , 0xAA54}, - {"KobeMgr" , 0xAA55}, - {"SpeechRecognitionDispatch", 0xAA56}, - {"DockingDispatch" , 0xAA57}, - {"NewKernelDispatch" , 0xAA58}, - {"MixedModeDispatch" , 0xAA59}, - {"CodeFragmentDispatch" , 0xAA5A}, - {"PBRemoteAccess" , 0xAA5B}, - {"OCEUtils" , 0xAA5C}, - {"DigitalSignature" , 0xAA5D}, - {"OCETBDispatch" , 0xAA5E}, - {"OCEAuthentication" , 0xAA5F}, - {"DeleteMCEntries" , 0xAA60}, - {"GetMCInfo" , 0xAA61}, - {"SetMCInfo" , 0xAA62}, - {"DisposeMCInfo" , 0xAA63}, - {"GetMCEntry" , 0xAA64}, - {"SetMCEntries" , 0xAA65}, - {"MenuChoice" , 0xAA66}, - {"ModalDialogMenuSetup" , 0xAA67}, - {"DialogDispatch" , 0xAA68}, - {"UserNameNotification" , 0xAA69}, - {"DeviceMgr" , 0xAA6A}, - {"PowerPCFuture" , 0xAA6B}, - {"PenMacMgr" , 0xAA6C}, - {"LanguageMgr" , 0xAA6D}, - {"AppleGuideDispatch" , 0xAA6E}, - {"InitPalettes" , 0xAA90}, - {"NewPalette" , 0xAA91}, - {"GetNewPalette" , 0xAA92}, - {"DisposePalette" , 0xAA93}, - {"ActivatePalette" , 0xAA94}, - {"SetPalette" , 0xAA95}, - {"GetPalette" , 0xAA96}, - {"PmForeColor" , 0xAA97}, - {"PmBackColor" , 0xAA98}, - {"AnimateEntry" , 0xAA99}, - {"AnimatePalette" , 0xAA9A}, - {"GetEntryColor" , 0xAA9B}, - {"SetEntryColor" , 0xAA9C}, - {"GetEntryUsage" , 0xAA9D}, - {"SetEntryUsage" , 0xAA9E}, - {"CTab2Palette" , 0xAA9F}, - {"Palette2CTab" , 0xAAA0}, - {"CopyPalette" , 0xAAA1}, - {"PaletteDispatch" , 0xAAA2}, - {"CodecDispatch" , 0xAAA3}, - {"ALMDispatch" , 0xAAA4}, - {"QuickTimeDispatch" , 0xAAAA}, - {"CursorDeviceDispatch" , 0xAADB}, - {"HumanInterfaceUtilsDispatch", 0xAADD}, - {"AppleScript" , 0xAAEE}, - {"PCCardDispatch" , 0xAAF0}, - {"ATAMgr" , 0xAAF1}, - {"ControlStripDispatch" , 0xAAF2}, - {"ExpansionBusDispatch" , 0xAAF3}, - {"InterruptMgr" , 0xAAF4}, - {"InitApplication" , 0xAAFA}, - {"CleanupApplication" , 0xAAFB}, - {"MixedModeMagic" , 0xAAFE}, - {"BitBlt" , 0xAB00}, - {"BitsToMap" , 0xAB01}, - {"BitsToPix" , 0xAB02}, - {"Jackson" , 0xAB03}, - {"ColorMap" , 0xAB04}, - {"CopyHandle" , 0xAB05}, - {"CullPoints" , 0xAB06}, - {"PutPicByte" , 0xAB07}, - {"PutPicOp" , 0xAB08}, - {"DrawArc" , 0xAB09}, - {"DrawLine" , 0xAB0A}, - {"DrawSlab" , 0xAB0B}, - {"FastSlabMode" , 0xAB0C}, - {"GetSeek" , 0xAB0D}, - {"MakeScaleTbl" , 0xAB0E}, - {"CheckPic" , 0xAB0F}, - {"DoLine" , 0xAB10}, - {"OldPatToNew" , 0xAB11}, - {"PackRgn" , 0xAB12}, - {"PatConvert" , 0xAB13}, - {"PatDither" , 0xAB14}, - {"PatExpand" , 0xAB15}, - {"PInit" , 0xAB16}, - {"PortToMap" , 0xAB17}, - {"PushVerb" , 0xAB18}, - {"PutLine" , 0xAB19}, - {"PutOval" , 0xAB1A}, - {"PutRgn" , 0xAB1B}, - {"NewTempBuffer" , 0xAB1C}, - {"QDExtensions" , 0xAB1D}, - {"DisposeTempBuffer" , 0xAB1E}, - {"RgnBlit" , 0xAB1F}, - {"RgnOp" , 0xAB20}, - {"RSect" , 0xAB21}, - {"SeekRgn" , 0xAB22}, - {"SetFillPat" , 0xAB23}, - {"SetUpStretch" , 0xAB24}, - {"SlabMode" , 0xAB25}, - {"SortPoints" , 0xAB26}, - {"StretchBits" , 0xAB27}, - {"StdDevLoop" , 0xAB28}, - {"TrimRect" , 0xAB29}, - {"XorSlab" , 0xAB2A}, - {"ExTblPtr" , 0xAB2B}, - {"NewTempHandle" , 0xAB2D}, - {"PatExTbl" , 0xAB2E}, - {"bMAIN0" , 0xAB30}, - {"bMAIN1" , 0xAB31}, - {"bMAIN2" , 0xAB32}, - {"bMAIN3" , 0xAB33}, - {"bSETUP8" , 0xAB34}, - {"bMAIN9" , 0xAB35}, - {"bSETUP10" , 0xAB36}, - {"bMAIN11" , 0xAB37}, - {"bXMAIN8" , 0xAB38}, - {"bXMAIN9" , 0xAB39}, - {"bXMAIN10" , 0xAB3A}, - {"bXMAIN11" , 0xAB3B}, - {"bcMain0" , 0xAB3C}, - {"bcMain1" , 0xAB3D}, - {"bHilite" , 0xAB3E}, - {"bcMain3" , 0xAB3F}, - {"bEND0" , 0xAB40}, - {"bEND1" , 0xAB41}, - {"bEND2" , 0xAB42}, - {"bEND3" , 0xAB43}, - {"bLONG8" , 0xAB44}, - {"bEND9" , 0xAB45}, - {"bEND10" , 0xAB46}, - {"bEND11" , 0xAB47}, - {"bXLONG8" , 0xAB48}, - {"bXEND9" , 0xAB49}, - {"bXEND10" , 0xAB4A}, - {"bXEND11" , 0xAB4B}, - {"bcEnd0" , 0xAB4C}, - {"bcEnd1" , 0xAB4D}, - {"bSlowHilite" , 0xAB4E}, - {"bcEnd" , 0xAB4F}, - {"bAvg" , 0xAB50}, - {"bAddPin" , 0xAB51}, - {"bAddOver" , 0xAB52}, - {"bSubPin" , 0xAB53}, - {"bTransparent" , 0xAB54}, - {"bMax" , 0xAB55}, - {"bSubOver" , 0xAB56}, - {"bMin" , 0xAB57}, - {"bSetup0" , 0xAB58}, - {"bLeft0" , 0xAB59}, - {"rMASK0" , 0xAB5A}, - {"rMASK1" , 0xAB5B}, - {"rMASK2" , 0xAB5C}, - {"rMASK3" , 0xAB5D}, - {"rMASK8" , 0xAB5E}, - {"rMASK9" , 0xAB5F}, - {"rMASK10" , 0xAB60}, - {"rMASK11" , 0xAB61}, - {"rXMASK8" , 0xAB62}, - {"rXMASK9" , 0xAB63}, - {"rXMASK10" , 0xAB64}, - {"rXMASK11" , 0xAB65}, - {"rAvg" , 0xAB66}, - {"rAddPin" , 0xAB67}, - {"rAddOver" , 0xAB68}, - {"rSubPin" , 0xAB69}, - {"rTransparent" , 0xAB6A}, - {"rMax" , 0xAB6B}, - {"rSubOver" , 0xAB6C}, - {"rMin" , 0xAB6D}, - {"rcMask0" , 0xAB6E}, - {"rcMask1" , 0xAB6F}, - {"rSlowHilite" , 0xAB70}, - {"rcMask3" , 0xAB71}, - {"rHilite" , 0xAB72}, - {"stMASK0" , 0xAB73}, - {"stMASK1" , 0xAB74}, - {"stMASK2" , 0xAB75}, - {"stMASK3" , 0xAB76}, - {"stAvg" , 0xAB77}, - {"stAddPin" , 0xAB78}, - {"stAddOver" , 0xAB79}, - {"stSubPin" , 0xAB7A}, - {"stTransparent" , 0xAB7B}, - {"stMax" , 0xAB7C}, - {"stSubOver" , 0xAB7D}, - {"stMin" , 0xAB7E}, - {"stHilite" , 0xAB7F}, - {"slMASK8" , 0xAB80}, - {"slMASK9" , 0xAB81}, - {"slMASK10" , 0xAB82}, - {"slMASK11" , 0xAB83}, - {"slXMASK8" , 0xAB84}, - {"slXMASK9" , 0xAB85}, - {"slXMASK10" , 0xAB86}, - {"slXMASK11" , 0xAB87}, - {"slAvg" , 0xAB88}, - {"slAddPin" , 0xAB89}, - {"slAddOver" , 0xAB8A}, - {"slSubPin" , 0xAB8B}, - {"slTransparent" , 0xAB8C}, - {"slMax" , 0xAB8D}, - {"slSubOver" , 0xAB8E}, - {"slMin" , 0xAB8F}, - {"slHilite" , 0xAB90}, - {"ITabMatch" , 0xAB91}, - {"ColorThing" , 0xAB92}, - {"Pollack" , 0xAB93}, - {"AllocRunBuf" , 0xAB94}, - {"InitRgn" , 0xAB95}, - {"ScaleBlt" , 0xAB96}, - {"stNoStack" , 0xAB97}, - {"BlitCase" , 0xAB98}, - {"stScanLoop" , 0xAB99}, - {"PicItem1" , 0xAB9A}, - {"MakeGrayITab" , 0xAB9B}, - {"FastLine" , 0xAB9C}, - {"FastSlant" , 0xAB9D}, - {"BitsDevLoop" , 0xAB9E}, - {"rArith16Tab" , 0xABA0}, - {"rArith32Tab" , 0xABA1}, - {"rHiliteTab" , 0xABA2}, - {"gsRunTbl" , 0xABA3}, - {"gsExpTbl" , 0xABA4}, - {"gsSeekTbl" , 0xABA5}, - {"stArith16Tab" , 0xABA6}, - {"stArith32Tab" , 0xABA7}, - {"stColorTab" , 0xABA8}, - {"stGrayTab" , 0xABA9}, - {"stSearchTab" , 0xABAA}, - {"ScaleIndToInd" , 0xABAB}, - {"scIndTab1" , 0xABAC}, - {"scIndTab2" , 0xABAD}, - {"scIndTab4" , 0xABAE}, - {"scIndTab8" , 0xABAF}, - {"scIndTab16" , 0xABB0}, - {"scIndTab32" , 0xABB1}, - {"scDirTab1" , 0xABB2}, - {"scDirTab2" , 0xABB3}, - {"scDirTab4" , 0xABB4}, - {"scDirTab8" , 0xABB5}, - {"scDirTab16" , 0xABB6}, - {"scDirTab32" , 0xABB7}, - {"bArith16Tab" , 0xABB8}, - {"bArith32Tab" , 0xABB9}, - {"bHiliteTab" , 0xABBA}, - {"bArith16Setup" , 0xABBB}, - {"bArith32Setup" , 0xABBC}, - {"slArith16Tab" , 0xABBD}, - {"slArith32Tab" , 0xABBE}, - {"32QD" , 0xABBF}, - {"QDAlphaDispatch" , 0xABC0}, - {"QDStreamToMask" , 0xABC1}, - {"QTMatrixMathDispatch" , 0xABC2}, - {"NQDMisc" , 0xABC3}, - {"GetPMData" , 0xABC4}, - {"32QD" , 0xABC5}, - {"32QD" , 0xABC6}, - {"32QD" , 0xABC7}, - {"StdOpcodeProc" , 0xABC8}, - {"IconDispatch" , 0xABC9}, - {"DeviceLoop" , 0xABCA}, - {"PBBlockMove" , 0xABCC}, - {"SnappingTurk" , 0xABCD}, - {"UnicodeMgr" , 0xABCE}, - {"ProcessMgr" , 0xABCF}, - {"ModemMgr" , 0xABEA}, - {"DisplayDispatch" , 0xABEB}, - {"ButtonMgr" , 0xABEC}, - {"DragDispatch" , 0xABED}, - {"ColorSync" , 0xABEE}, - {"TTSMgr" , 0xABEF}, - {"AROSE" , 0xABF0}, - {"GestaltValueDispatch" , 0xABF1}, - {"ThreadDispatch" , 0xABF2}, - {"EddyTrap" , 0xABF3}, - {"XTNDMgr" , 0xABF4}, - {"DSPManager" , 0xABF5}, - {"CollectionMgr" , 0xABF6}, - {"SynchIdleTime" , 0xABF7}, - {"StdOpcodeProc" , 0xABF8}, - {"AUXDispatch" , 0xABF9}, - {"AUXSysCall" , 0xABFA}, - {"MessageMgr" , 0xABFB}, - {"TranslationDispatch" , 0xABFC}, - {"TouchStone" , 0xABFD}, - {"GXPrinting" , 0xABFE}, - {"DebugStr" , 0xABFF}, - {"" , 0} -}; - -#endif diff --git a/cxmon/src/mon_cmd.cpp b/cxmon/src/mon_cmd.cpp deleted file mode 100644 index 4cb6a92b1..000000000 --- a/cxmon/src/mon_cmd.cpp +++ /dev/null @@ -1,669 +0,0 @@ -/* - * mon_cmd.cpp - cxmon standard commands - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include - -#include "mon.h" -#include "mon_cmd.h" -#include "mon_disass.h" - -#ifndef VERSION -#define VERSION "3" -#endif - - -/* - * range_args = [expression] [[COMMA] expression] END - * - * Read start address to "adr", end address to "end_adr". - * "adr" defaults to '.', "end_adr" defaults to '.'+def_range - * - * true: OK, false: Error - */ - -static bool range_args(uintptr *adr, uintptr *end_adr, uint32 def_range) -{ - *adr = mon_dot_address; - *end_adr = mon_dot_address + def_range; - - if (mon_token == T_END) - return true; - else { - if (!mon_expression(adr)) - return false; - *end_adr = *adr + def_range; - if (mon_token == T_END) - return true; - else { - if (mon_token == T_COMMA) mon_get_token(); - if (!mon_expression(end_adr)) - return false; - return mon_token == T_END; - } - } -} - - -/* - * byte_string = (expression | STRING) {COMMA (expression | STRING)} END - */ - -static bool byte_string(uint8 *&str, uintptr &len) -{ - uintptr value; - - static const int GRANULARITY = 16; // must be a power of 2 - str = NULL; - len = 0; - goto start; - - for (;;) { - if (mon_token == T_COMMA) { - mon_get_token(); - -start: - if (mon_token == T_STRING) { - unsigned n = strlen(mon_string); - str = (uint8 *)realloc(str, (len + n - 1 + GRANULARITY) & ~(GRANULARITY - 1)); - assert(str != NULL); - memcpy(str + len, mon_string, n); - len += n; - mon_get_token(); - } else if (mon_expression(&value)) { - str = (uint8 *)realloc(str, (len + GRANULARITY) & ~(GRANULARITY - 1)); - assert(str != NULL); - str[len] = value; - len++; - } else { - if (str) - free(str); - return false; - } - - } else if (mon_token == T_END) { - return true; - } else { - mon_error("',' expected"); - if (str) - free(str); - return false; - } - } -} - - -/* - * Convert character to printable character - */ - -static inline uint8 char2print(uint8 c) -{ - return (c >= 0x20 && c <= 0x7e) ? c : '.'; -} - - -/* - * Show version - * ver - */ - -void version(void) -{ - fprintf(monout, "cxmon V" VERSION "\n"); -} - - -/* - * Redirect output - * o [file] - */ - -void redir_output(void) -{ - // Close old file - if (monout != monerr) { - fclose(monout); - monout = monerr; - return; - } - - // No argument given? - if (mon_token == T_END) - return; - - // Otherwise open file - if (mon_token == T_STRING) { - mon_get_token(); - if (mon_token != T_END) { - mon_error("Too many arguments"); - return; - } - if (!(monout = fopen(mon_string, "w"))) - mon_error("Unable to open file"); - } else - mon_error("'\"' around file name expected"); -} - - -/* - * Compute and display expression - * ? expression - */ - -void print_expr(void) -{ - uintptr val; - - if (!mon_expression(&val)) - return; - if (mon_token != T_END) { - mon_error("Too many arguments"); - return; - } - - if (val > 0x7fffffff) { - fprintf(monout, "Hex unsigned: $%08x\n" - "Hex signed : -$%08x\n" - "Dec unsigned: %u\n" - "Dec signed : %d\n", val, -val, val, val); - fprintf(monout, "Char : '%c%c%c%c'\n", char2print(val >> 24), char2print(val >> 16), char2print(val >> 8), char2print(val)); - } else { - fprintf(monout, "Hex : $%08x\n" - "Dec : %d\n", val, val); - fprintf(monout, "Char: '%c%c%c%c'\n", char2print(val >> 24), char2print(val >> 16), char2print(val >> 8), char2print(val)); - } -} - - -/* - * Execute shell command - * \ "command" - */ - -void shell_command(void) -{ - if (mon_token != T_STRING) { - mon_error("'\"' around command expected"); - return; - } - mon_get_token(); - if (mon_token != T_END) { - mon_error("Too many arguments"); - return; - } - system(mon_string); -} - - -/* - * Memory dump - * m [start [end]] - */ - -#define MEMDUMP_BPL 16 // Bytes per line - -void memory_dump(void) -{ - uintptr adr, end_adr; - uint8 mem[MEMDUMP_BPL + 1]; - - mem[MEMDUMP_BPL] = 0; - - if (!range_args(&adr, &end_adr, 16 * MEMDUMP_BPL - 1)) // 16 lines unless end address specified - return; - - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx:", int(2 * sizeof(adr)), mon_use_real_mem ? adr: adr % mon_mem_size); - for (int i=0; i>=1, i++) - str[i] = (b & m) ? '*' : '.'; - fprintf(monout, " '%s'\n", str); - adr++; - } - - mon_dot_address = adr; -} - - -/* - * Disassemble - * d [start [end]] - * d65 [start [end]] - * d68 [start [end]] - * d80 [start [end]] - * d86 [start [end]] - * d8086 [start [end]] - */ - -enum CPUType { - CPU_PPC, - CPU_6502, - CPU_680x0, - CPU_Z80, - CPU_80x86_32, - CPU_80x86_16, - CPU_x86_64 -}; - -static void disassemble(CPUType type) -{ - uintptr adr, end_adr; - - if (!range_args(&adr, &end_adr, 16 * 4 - 1)) // 16 lines unless end address specified - return; - - switch (type) { - case CPU_PPC: - while (adr <= end_adr && !mon_aborted()) { - uint32 w = mon_read_word(adr); - fprintf(monout, "%0*lx: %08x\t", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size, w); - disass_ppc(monout, mon_use_real_mem ? adr : adr % mon_mem_size, w); - adr += 4; - } - break; - - case CPU_6502: - while (adr <= end_adr && !mon_aborted()) { - uint8 op = mon_read_byte(adr); - uint8 lo = mon_read_byte(adr + 1); - uint8 hi = mon_read_byte(adr + 2); - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_6502(monout, mon_use_real_mem ? adr : adr % mon_mem_size, op, lo, hi); - } - break; - - case CPU_680x0: - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_68k(monout, mon_use_real_mem ? adr : adr % mon_mem_size); - } - break; - - case CPU_Z80: - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_z80(monout, mon_use_real_mem ? adr : adr % mon_mem_size); - } - break; - - case CPU_x86_64: - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, 64); - } - break; - - case CPU_80x86_32: - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, 32); - } - break; - - case CPU_80x86_16: - while (adr <= end_adr && !mon_aborted()) { - fprintf(monout, "%0*lx: ", int(2 * sizeof(adr)), mon_use_real_mem ? adr : adr % mon_mem_size); - adr += disass_x86(monout, mon_use_real_mem ? adr : adr % mon_mem_size, 16); - } - } - - mon_dot_address = adr; -} - -void disassemble_ppc(void) -{ - disassemble(CPU_PPC); -} - -void disassemble_6502(void) -{ - disassemble(CPU_6502); -} - -void disassemble_680x0(void) -{ - disassemble(CPU_680x0); -} - -void disassemble_z80(void) -{ - disassemble(CPU_Z80); -} - -void disassemble_80x86_32(void) -{ - disassemble(CPU_80x86_32); -} - -void disassemble_80x86_16(void) -{ - disassemble(CPU_80x86_16); -} - -void disassemble_x86_64(void) -{ - disassemble(CPU_x86_64); -} - - -/* - * Modify memory - * : addr bytestring - */ - -void modify(void) -{ - uintptr adr, len, src_adr = 0; - uint8 *str; - - if (!mon_expression(&adr)) - return; - if (!byte_string(str, len)) - return; - - while (src_adr < len) - mon_write_byte(adr++, str[src_adr++]); - mon_dot_address = adr; - - free(str); -} - - -/* - * Fill - * f start end bytestring - */ - -void fill(void) -{ - uintptr adr, end_adr, len, src_adr = 0; - uint8 *str; - - if (!mon_expression(&adr)) - return; - if (!mon_expression(&end_adr)) - return; - if (!byte_string(str, len)) - return; - - while (adr <= end_adr) - mon_write_byte(adr++, str[src_adr++ % len]); - - free(str); -} - - -/* - * Transfer memory - * t start end dest - */ - -void transfer(void) -{ - uintptr adr, end_adr, dest; - int num; - - if (!mon_expression(&adr)) - return; - if (!mon_expression(&end_adr)) - return; - if (!mon_expression(&dest)) - return; - if (mon_token != T_END) { - mon_error("Too many arguments"); - return; - } - - num = end_adr - adr + 1; - - if (dest < adr) - for (int i=0; i - -#include "mon.h" -#include "mon_disass.h" - -#include "mon_atraps.h" -#include "mon_lowmem.h" - - -// Flag: enable MacOS A-Trap and LM globals lookup in 68k disassembler -bool mon_macos_mode = false; - - -/* - * GNU disassembler callbacks - */ - -extern "C" { -#include "disass/dis-asm.h" - -int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) -{ - while (length--) - *to++ = mon_read_byte(from++); - return 0; -} - -void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) -{ - info->fprintf_func(info->stream, "Unknown error %d\n", status); -} - -bool lookup_lowmem; - -void generic_print_address(bfd_vma addr, struct disassemble_info *info) -{ - if (lookup_lowmem && addr >= 0x100 && addr < 0x3000) { - if (((addr >= 0x400 && addr < 0x800) || (addr >= 0xe00 && addr < 0x1e00)) && ((addr & 3) == 0)) { - // Look for address in A-Trap table - uint16 opcode = (addr < 0xe00 ? 0xa000 + (addr - 0x400) / 4 : 0xa800 + (addr - 0xe00) / 4); - uint16 mask = (addr < 0xe00 ? 0xf8ff : 0xffff); - const atrap_info *p = atraps; - while (p->word) { - if ((p->word & mask) == opcode) { - info->fprintf_func(info->stream, p->name); - return; - } - p++; - } - } else { - // Look for address in low memory globals table - const lowmem_info *p = lowmem; - while (p->name) { - if (addr >= p[0].addr && addr < p[1].addr) { - if (addr == p[0].addr) - info->fprintf_func(info->stream, "%s", p->name); - else - info->fprintf_func(info->stream, "%s+%d", p->name, addr - p->addr); - return; - } - p++; - } - } - } - if (addr >= UVAL64(0x100000000)) - info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); - else - info->fprintf_func(info->stream, "$%08x", (uint32)addr); -} - -int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) -{ - return 0; -} - -void print_68k_invalid_opcode(unsigned long opcode, struct disassemble_info *info) -{ - if (mon_macos_mode) { - // Look for MacOS A-Trap - const atrap_info *p = atraps; - while (p->word) { - if (p->word == opcode) { - info->fprintf_func(info->stream, p->name); - return; - } - p++; - } - } - info->fprintf_func(info->stream, "?"); -} - -}; - - -/* - * sprintf into a "stream" - */ - -struct SFILE { - char *buffer; - char *current; -}; - -static int mon_sprintf(SFILE *f, const char *format, ...) -{ - int n; - va_list args; - va_start(args, format); - vsprintf(f->current, format, args); - f->current += n = strlen(f->current); - va_end(args); - return n; -} - - -/* - * Disassemble one instruction, return number of bytes - */ - -int disass_68k(FILE *f, uint32 adr) -{ - // Initialize info for GDB disassembler - disassemble_info info; - char buf[1024]; - SFILE sfile = {buf, buf}; - sfile.buffer = buf; - sfile.current = buf; - INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); - - // Disassemble instruction - lookup_lowmem = mon_macos_mode; - int num = print_insn_m68k(adr, &info); - - for (int i=0; i<6; i+=2) { - if (num > i) - fprintf(f, "%04x ", mon_read_half(adr + i)); - else - fprintf(f, " "); - } - if (num == 8) - fprintf(f, "%04x\t%s\n", mon_read_half(adr + 6), buf); - else if (num > 8) - fprintf(f, "...\t%s\n", buf); - else - fprintf(f, " \t%s\n", buf); - - return num; -} - -int disass_x86(FILE *f, uint32 adr, uint32 bits) -{ - // Initialize info for GDB disassembler - disassemble_info info; - char buf[1024]; - SFILE sfile = {buf, buf}; - sfile.buffer = buf; - sfile.current = buf; - INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); - if (bits == 16) - info.mach = bfd_mach_i386_i8086; - else if (bits == 64) - info.mach = bfd_mach_x86_64; - - // Disassemble instruction - lookup_lowmem = false; - int num = print_insn_i386_att(adr, &info); - - for (int i=0; i<6; i++) { - if (num > i) - fprintf(f, "%02x ", mon_read_byte(adr + i)); - else - fprintf(f, " "); - } - if (num == 7) - fprintf(f, "%02x\t%s\n", mon_read_byte(adr + 7), buf); - else if (num > 7) - fprintf(f, "..\t%s\n", buf); - else - fprintf(f, " \t%s\n", buf); - - return num; -} diff --git a/cxmon/src/mon_disass.h b/cxmon/src/mon_disass.h deleted file mode 100644 index 487a29653..000000000 --- a/cxmon/src/mon_disass.h +++ /dev/null @@ -1,30 +0,0 @@ -/* - * mon_disass.h - Disassemblers - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 MON_DISASS_H -#define MON_DISASS_H - -extern void disass_ppc(FILE *f, unsigned int adr, unsigned int w); -extern int disass_68k(FILE *f, uint32 adr); -extern int disass_x86(FILE *f, uint32 adr, uint32 bits = 32); -extern int disass_6502(FILE *f, uint32 adr, uint8 op, uint8 lo, uint8 hi); -extern int disass_z80(FILE *f, uint32 adr); - -#endif diff --git a/cxmon/src/mon_lowmem.cpp b/cxmon/src/mon_lowmem.cpp deleted file mode 100644 index e902352ba..000000000 --- a/cxmon/src/mon_lowmem.cpp +++ /dev/null @@ -1,579 +0,0 @@ -/* - * mon_lowmem.cpp - MacOS low memory globals definitions - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include "mon_lowmem.h" - -// Array of low memory globals in ascending order -const lowmem_info lowmem[] = { - {"MonkeyLives" , 0x100}, - {"ScrVRes" , 0x102}, - {"ScrHRes" , 0x104}, - {"ScreenRow" , 0x106}, - {"MemTop" , 0x108}, - {"BufPtr" , 0x10C}, - {"StkLowPt" , 0x110}, - {"HeapEnd" , 0x114}, - {"TheZone" , 0x118}, - {"UTableBase" , 0x11C}, - {"MacJump" , 0x120}, - {"DskRtnAdr" , 0x124}, - {"PollRtnAdr" , 0x128}, - {"DskVerify" , 0x12C}, - {"LoadTrap" , 0x12D}, - {"MmInOK" , 0x12E}, - {"CPUFlag" , 0x12F}, - {"ApplLimit" , 0x130}, - {"SonyVars" , 0x134}, - {"PWMValue" , 0x138}, - {"PollStack" , 0x13A}, - {"PollProc" , 0x13E}, - {"DskErr" , 0x142}, - {"SysEvtMask" , 0x144}, - {"SysEvtBuf" , 0x146}, - {"EventQueue" , 0x14A}, - {"EvtBufCnt" , 0x154}, - {"RndSeed" , 0x156}, - {"SysVersion" , 0x15A}, - {"SEvtEnb" , 0x15C}, - {"DSWndUpdate" , 0x15D}, - {"FontFlag" , 0x15E}, - {"IntFlag" , 0x15F}, - {"VBLQueue" , 0x160}, - {"Ticks" , 0x16A}, - {"MBTicks" , 0x16E}, - {"MBState" , 0x172}, - {"Tocks" , 0x173}, - {"KeyMap" , 0x174}, - {"KeypadMap" , 0x17C}, - {"KeyLast" , 0x184}, - {"KeyTime" , 0x186}, - {"KeyRepTime" , 0x18A}, - {"KeyThresh" , 0x18E}, - {"KeyRepThresh" , 0x190}, - {"Lvl1DT" , 0x192}, - {"Lvl2DT" , 0x1B2}, - {"UnitNtryCnt" , 0x1D2}, - {"VIA" , 0x1D4}, - {"SCCRd" , 0x1D8}, - {"SCCWr" , 0x1DC}, - {"IWM" , 0x1E0}, - {"GetParam" , 0x1E4}, - {"SysParam" , 0x1F8}, - {"SPValid" , 0x1F8}, - {"SPATalkA" , 0x1F9}, - {"SPATalkB" , 0x1FA}, - {"SPConfig" , 0x1FB}, - {"SPPortA" , 0x1FC}, - {"SPPortB" , 0x1FE}, - {"SPAlarm" , 0x200}, - {"SPFont" , 0x204}, - {"SPKbd" , 0x206}, - {"SPPrint" , 0x207}, - {"SPVolCtl" , 0x208}, - {"SPClikCaret" , 0x209}, - {"SPMisc1" , 0x20A}, - {"SPMisc2" , 0x20B}, - {"Time" , 0x20C}, - {"BootDrive" , 0x210}, - {"JShell" , 0x212}, - {"SFSaveDisk" , 0x214}, - {"KbdVars" , 0x216}, - {"KbdLast" , 0x218}, - {"JKybdTask" , 0x21A}, - {"KbdType" , 0x21E}, - {"AlarmState" , 0x21F}, - {"MemErr" , 0x220}, - {"JFigTrkSpd" , 0x222}, - {"JDiskPrime" , 0x226}, - {"JRdAddr" , 0x22A}, - {"JRdData" , 0x22E}, - {"JWrData" , 0x232}, - {"JSeek" , 0x236}, - {"JSetupPoll" , 0x23A}, - {"JRecal" , 0x23E}, - {"JControl" , 0x242}, - {"JWakeUp" , 0x246}, - {"JReSeek" , 0x24A}, - {"JMakeSpdTbl" , 0x24E}, - {"JAdrDisk" , 0x252}, - {"JSetSpeed" , 0x256}, - {"NiblTbl" , 0x25A}, - {"FlEvtMask" , 0x25E}, - {"SdVolume" , 0x260}, - {"SdEnable/Finder" , 0x261}, - {"SoundVars" , 0x262}, - {"SoundBase" , 0x266}, - {"SoundVBL" , 0x26A}, - {"SoundDCE" , 0x27A}, - {"SoundActive" , 0x27E}, - {"SoundLevel" , 0x27F}, - {"CurPitch" , 0x280}, - {"Switcher" , 0x282}, - {"SwitcherTPtr" , 0x286}, - {"RSDHndl" , 0x28A}, - {"ROM85" , 0x28E}, - {"PortAUse" , 0x290}, - {"PortBUse" , 0x291}, - {"ScreenVars" , 0x292}, - {"JGNEFilter" , 0x29A}, - {"Key1Trans" , 0x29E}, - {"Key2Trans" , 0x2A2}, - {"SysZone" , 0x2A6}, - {"ApplZone" , 0x2AA}, - {"ROMBase" , 0x2AE}, - {"RAMBase" , 0x2B2}, - {"ExpandMem" , 0x2B6}, - {"DSAlertTab" , 0x2BA}, - {"ExtStsDT" , 0x2BE}, - {"SCCASts" , 0x2CE}, - {"SCCBSts" , 0x2CF}, - {"SerialVars" , 0x2D0}, - {"ABusVars" , 0x2D8}, - {"ABusDCE" , 0x2DC}, - {"FinderName" , 0x2E0}, - {"DoubleTime" , 0x2F0}, - {"CaretTime" , 0x2F4}, - {"ScrDmpEnb" , 0x2F8}, - {"ScrDmpType" , 0x2F9}, - {"TagData" , 0x2FA}, - {"BufTgFNum" , 0x2FC}, - {"BufTgFFlg" , 0x300}, - {"BufTgFBkNum" , 0x302}, - {"BufTgDate" , 0x304}, - {"DrvQHdr" , 0x308}, - {"PWMBuf2" , 0x312}, - {"HpChk/MacPgm" , 0x316}, - {"Lo3Bytes" , 0x31A}, - {"MinStack" , 0x31E}, - {"DefltStack" , 0x322}, - {"MMDefFlags" , 0x326}, - {"GZRootHnd" , 0x328}, - {"GZRootPtr" , 0x32C}, - {"GZMoveHnd" , 0x330}, - {"DSDrawProc" , 0x334}, - {"EjectNotify" , 0x338}, - {"IAZNotify" , 0x33C}, - {"CurDB" , 0x340}, - {"NxtDB" , 0x342}, - {"MaxDB" , 0x344}, - {"FlushOnly" , 0x346}, - {"RegRsrc" , 0x347}, - {"FLckUnlck" , 0x348}, - {"FrcSync" , 0x349}, - {"NewMount" , 0x34A}, - {"NoEject" , 0x34B}, - {"DrMstrBlk" , 0x34C}, - {"FCBSPtr" , 0x34E}, - {"DefVCBPtr" , 0x352}, - {"VCBQHdr" , 0x356}, - {"FSQHdr" , 0x360}, - {"FSQHead" , 0x362}, - {"FSQTail" , 0x366}, - {"HFSStkTop" , 0x36A}, - {"HFSStkPtr" , 0x36E}, - {"WDCBsPtr" , 0x372}, - {"HFSFlags" , 0x376}, - {"CacheFlag" , 0x377}, - {"SysBMCPtr" , 0x378}, - {"SysVolCPtr" , 0x37C}, - {"SysCtlCPtr" , 0x380}, - {"DefVRefNum" , 0x384}, - {"PMSPPtr" , 0x386}, - {"HFSTagData" , 0x38A}, - {"HFSDSErr" , 0x392}, - {"CacheVars" , 0x394}, - {"CurDirStore" , 0x398}, - {"CacheCom" , 0x39C}, - {"FmtDefaults" , 0x39E}, - {"ErCode" , 0x3A2}, - {"Params" , 0x3A4}, - {"FSTemp8" , 0x3D6}, - {"FSIOErr" , 0x3DE}, - {"FSQueueHook" , 0x3E2}, - {"ExtFSHook" , 0x3E6}, - {"DskSwtchHook" , 0x3EA}, - {"ReqstVol" , 0x3EE}, - {"ToExtFS" , 0x3F2}, - {"FSFCBLen" , 0x3F6}, - {"DSAlertRect" , 0x3F8}, - {"JHideCrsr" , 0x800}, - {"JShowCrsr" , 0x804}, - {"JShieldCrsr" , 0x808}, - {"JScrnAddr" , 0x80C}, - {"JScrnSize" , 0x810}, - {"JInitCrsr" , 0x814}, - {"JSetCrsr" , 0x818}, - {"JCrsrObscure" , 0x81C}, - {"JUpdateProc" , 0x820}, - {"ScrnBase" , 0x824}, - {"MTemp" , 0x828}, - {"RawMouse" , 0x82C}, - {"Mouse" , 0x830}, - {"CrsrPin" , 0x834}, - {"CrsrRect" , 0x83C}, - {"TheCrsr" , 0x844}, - {"CrsrAddr" , 0x888}, - {"JAllocCrsr" , 0x88C}, - {"JSetCCrsr" , 0x890}, - {"JOpcodeProc" , 0x894}, - {"CrsrBase" , 0x898}, - {"CrsrDevice" , 0x89C}, - {"SrcDevice" , 0x8A0}, - {"MainDevice" , 0x8A4}, - {"DeviceList" , 0x8A8}, - {"CrsrRow" , 0x8AC}, - {"QDColors" , 0x8B0}, - {"CrsrVis" , 0x8CC}, - {"CrsrBusy" , 0x8CD}, - {"CrsrNew" , 0x8CE}, - {"CrsrCouple" , 0x8CF}, - {"CrsrState" , 0x8D0}, - {"CrsrObscure" , 0x8D2}, - {"CrsrScale" , 0x8D3}, - {"MouseMask" , 0x8D6}, - {"MouseOffset" , 0x8DA}, - {"JournalFlag" , 0x8DE}, - {"JSwapFont" , 0x8E0}, - {"JFontInfo" , 0x8E4}, - {"JournalRef" , 0x8E8}, - {"CrsrThresh" , 0x8EC}, - {"JCrsrTask" , 0x8EE}, - {"WWExist" , 0x8F2}, - {"QDExist" , 0x8F3}, - {"JFetch" , 0x8F4}, - {"JStash" , 0x8F8}, - {"JIODone" , 0x8FC}, - {"CurApRefNum" , 0x900}, - {"LaunchFlag" , 0x902}, - {"FondState" , 0x903}, - {"CurrentA5" , 0x904}, - {"CurStackBase" , 0x908}, - {"LoadFiller" , 0x90C}, - {"CurApName" , 0x910}, - {"SaveSegHandle" , 0x930}, - {"CurJTOffset" , 0x934}, - {"CurPageOption" , 0x936}, - {"HiliteMode" , 0x938}, - {"LoaderPBlock" , 0x93A}, - {"PrintErr" , 0x944}, - {"ChooserBits" , 0x946}, - {"PrFlags" , 0x946}, - {"PrType" , 0x947}, - {"PrRefNum" , 0x952}, - {"LastPGlobal" , 0x954}, - {"ScrapSize" , 0x960}, - {"ScrapHandle" , 0x964}, - {"ScrapCount" , 0x968}, - {"ScrapState" , 0x96A}, - {"ScrapName" , 0x96C}, - {"ScrapTag" , 0x970}, - {"RomFont0" , 0x980}, - {"AppFontID" , 0x984}, - {"SaveFondFlags" , 0x986}, - {"FMDefaultSize" , 0x987}, - {"CurFMFamily" , 0x988}, - {"CurFMSize" , 0x98A}, - {"CurFMFace" , 0x98C}, - {"CurFMNeedBits" , 0x98D}, - {"CurFMDevice" , 0x98E}, - {"CurFMNumer" , 0x990}, - {"CurFMDenom" , 0x994}, - {"FOutError" , 0x998}, - {"FOutFontHandle" , 0x99A}, - {"FOutBold" , 0x99E}, - {"FOutItalic" , 0x99F}, - {"FOutULOffset" , 0x9A0}, - {"FOutULShadow" , 0x9A1}, - {"FOutULThick" , 0x9A2}, - {"FOutShadow" , 0x9A3}, - {"FOutExtra" , 0x9A4}, - {"FOutAscent" , 0x9A5}, - {"FOutDescent" , 0x9A6}, - {"FOutWidMax" , 0x9A7}, - {"FOutLeading" , 0x9A8}, - {"FOutUnused" , 0x9A9}, - {"FOutNumer" , 0x9AA}, - {"FOutDenom" , 0x9AE}, - {"FMDotsPerInch" , 0x9B2}, - {"FMStyleTab" , 0x9B6}, - {"ToolScratch" , 0x9CE}, - {"WindowList" , 0x9D6}, - {"SaveUpdate" , 0x9DA}, - {"PaintWhite" , 0x9DC}, - {"WMgrPort" , 0x9DE}, - {"DeskPort" , 0x9E2}, - {"OldStructure" , 0x9E6}, - {"OldContent" , 0x9EA}, - {"GrayRgn" , 0x9EE}, - {"SaveVisRgn" , 0x9F2}, - {"DragHook" , 0x9F6}, - {"TempRect" , 0x9FA}, - {"OneOne" , 0xA02}, - {"MinusOne" , 0xA06}, - {"TopMenuItem" , 0xA0A}, - {"AtMenuBottom" , 0xA0C}, - {"IconBitmap" , 0xA0E}, - {"MenuList" , 0xA1C}, - {"MBarEnable" , 0xA20}, - {"CurDeKind" , 0xA22}, - {"MenuFlash" , 0xA24}, - {"TheMenu" , 0xA26}, - {"SavedHandle" , 0xA28}, - {"MBarHook" , 0xA2C}, - {"MenuHook" , 0xA30}, - {"DragPattern" , 0xA34}, - {"DeskPattern" , 0xA3C}, - {"DragFlag" , 0xA44}, - {"CurDragAction" , 0xA46}, - {"FPState" , 0xA4A}, - {"TopMapHndl" , 0xA50}, - {"SysMapHndl" , 0xA54}, - {"SysMap" , 0xA58}, - {"CurMap" , 0xA5A}, - {"ResReadOnly" , 0xA5C}, - {"ResLoad" , 0xA5E}, - {"ResErr" , 0xA60}, - {"TaskLock" , 0xA62}, - {"FScaleDisable" , 0xA63}, - {"CurActivate" , 0xA64}, - {"CurDeactive" , 0xA68}, - {"DeskHook" , 0xA6C}, - {"TEDoText" , 0xA70}, - {"TERecal" , 0xA74}, - {"ApplScratch" , 0xA78}, - {"GhostWindow" , 0xA84}, - {"CloseOrnHook" , 0xA88}, - {"ResumeProc" , 0xA8C}, - {"RestProc" , 0xA8C}, - {"SaveProc" , 0xA90}, - {"SaveSP" , 0xA94}, - {"ANumber" , 0xA98}, - {"ACount" , 0xA9A}, - {"DABeeper" , 0xA9C}, - {"DAStrings" , 0xAA0}, - {"TEScrpLength" , 0xAB0}, - {"TEScrpHandle" , 0xAB4}, - {"AppPacks" , 0xAB8}, - {"SysResName" , 0xAD8}, - {"SoundGlue" , 0xAE8}, - {"AppParmHandle" , 0xAEC}, - {"DSErrCode" , 0xAF0}, - {"ResErrProc" , 0xAF2}, - {"TEWdBreak" , 0xAF6}, - {"DlgFont" , 0xAFA}, - {"LastTGlobal" , 0xAFC}, - {"TrapAgain" , 0xB00}, - {"KeyMVars" , 0xB04}, - {"ROMMapHndl" , 0xB06}, - {"PWMBuf1" , 0xB0A}, - {"BootMask" , 0xB0E}, - {"WidthPtr" , 0xB10}, - {"ATalkHk1" , 0xB14}, - {"LAPMgrPtr" , 0xB18}, - {"FourDHack" , 0xB1C}, - {"UnSwitchedFlags" , 0xB20}, - {"SwitchedFlags" , 0xB21}, - {"HWCfgFlags" , 0xB22}, - {"TimeSCSIDB" , 0xB24}, - {"Top2MenuItem" , 0xB26}, - {"At2MenuBottom" , 0xB28}, - {"WidthTabHandle" , 0xB2A}, - {"SCSIDrvrs" , 0xB2E}, - {"TimeVars" , 0xB30}, - {"BtDskRfn" , 0xB34}, - {"BootTmp8" , 0xB36}, - {"NTSC" , 0xB3E}, - {"T1Arbitrate" , 0xB3F}, - {"JDiskSel" , 0xB40}, - {"JSendCmd" , 0xB44}, - {"JDCDReset" , 0xB48}, - {"LastSPExtra" , 0xB4C}, - {"FileShareVars" , 0xB50}, - {"MenuDisable" , 0xB54}, - {"MBDFHndl" , 0xB58}, - {"MBSaveLoc" , 0xB5C}, - {"BNMQHdr" , 0xB60}, - {"BackgrounderVars" , 0xB64}, - {"MenuLayer" , 0xB68}, - {"OmegaSANE" , 0xB6C}, - {"CarlByte" , 0xB72}, - {"SystemInfo" , 0xB73}, - {"VMGlobals" , 0xB78}, - {"Twitcher2" , 0xB7C}, - {"RMgrHiVars" , 0xB80}, - {"HSCHndl" , 0xB84}, - {"PadRsrc" , 0xB88}, - {"ResOneDeep" , 0xB9A}, - {"PadRsrc2" , 0xB9C}, - {"RomMapInsert" , 0xB9E}, - {"TmpResLoad" , 0xB9F}, - {"IntlSpec" , 0xBA0}, - {"RMgrPerm" , 0xBA4}, - {"WordRedraw" , 0xBA5}, - {"SysFontFam" , 0xBA6}, - {"DefFontSize" , 0xBA8}, - {"MBarHeight" , 0xBAA}, - {"TESysJust" , 0xBAC}, - {"HiHeapMark" , 0xBAE}, - {"SegHiEnable" , 0xBB2}, - {"FDevDisable" , 0xBB3}, - {"CommToolboxGlob" , 0xBB4}, - {"CMVector" , 0xBB4}, - {"ShutDwnQHdr" , 0xBBC}, - {"NewUnused" , 0xBC0}, - {"LastFOND" , 0xBC2}, - {"FONDID" , 0xBC6}, - {"App2Packs" , 0xBC8}, - {"MAErrProc" , 0xBE8}, - {"MASuperTab" , 0xBEC}, - {"MimeGlobs" , 0xBF0}, - {"FractEnable" , 0xBF4}, - {"UsedFWidth" , 0xBF5}, - {"FScaleHFact" , 0xBF6}, - {"FScaleVFact" , 0xBFA}, - {"SCCIOPFlag" , 0xBFE}, - {"MacJmpFlag" , 0xBFF}, - {"SCSIBase" , 0xC00}, - {"SCSIDMA" , 0xC04}, - {"SCSIHsk" , 0xC08}, - {"SCSIGlobals" , 0xC0C}, - {"RGBBlack" , 0xC10}, - {"RGBWhite" , 0xC16}, - {"FMSynth" , 0xC1C}, - {"RowBits" , 0xC20}, - {"ColLines" , 0xC22}, - {"ScreenBytes" , 0xC24}, - {"IOPMgrVars" , 0xC28}, - {"NMIFlag" , 0xC2C}, - {"VidType" , 0xC2D}, - {"VidMode" , 0xC2E}, - {"SCSIPoll" , 0xC2F}, - {"SEVarBase" , 0xC30}, - {"MacsBugSP" , 0xC6C}, - {"MacsBugPC" , 0xC70}, - {"MacsBugSR" , 0xC74}, - {"MMUFlags" , 0xCB0}, - {"MMUType" , 0xCB1}, - {"MMU32bit" , 0xCB2}, - {"MachineType" , 0xCB3}, - {"MMUTbl24" , 0xCB4}, - {"MMUTbl32" , 0xCB8}, - {"SInfoPtr" , 0xCBC}, - {"ASCBase" , 0xCC0}, - {"SMGlobals" , 0xCC4}, - {"TheGDevice" , 0xCC8}, - {"CQDGlobals" , 0xCCC}, - {"AuxWinHead" , 0xCD0}, - {"AuxCtlHead" , 0xCD4}, - {"DeskCPat" , 0xCD8}, - {"SetOSDefKey" , 0xCDC}, - {"LastBinPat" , 0xCE0}, - {"DeskPatEnable" , 0xCE8}, - {"TimeVIADB" , 0xCEA}, - {"VIA2Base" , 0xCEC}, - {"VMVectors" , 0xCF0}, - {"ADBBase" , 0xCF8}, - {"WarmStart" , 0xCFC}, - {"TimeDBRA" , 0xD00}, - {"TimeSCCDB" , 0xD02}, - {"SlotQDT" , 0xD04}, - {"SlotPrTbl" , 0xD08}, - {"SlotVBLQ" , 0xD0C}, - {"ScrnVBLPtr" , 0xD10}, - {"SlotTICKS" , 0xD14}, - {"PowerMgrVars" , 0xD18}, - {"AGBHandle" , 0xD1C}, - {"TableSeed" , 0xD20}, - {"SRsrcTblPtr" , 0xD24}, - {"JVBLTask" , 0xD28}, - {"WMgrCPort" , 0xD2C}, - {"VertRRate" , 0xD30}, - {"SynListHandle" , 0xD32}, - {"LastFore" , 0xD36}, - {"LastBG" , 0xD3A}, - {"LastMode" , 0xD3E}, - {"LastDepth" , 0xD40}, - {"FMExist" , 0xD42}, - {"SavedHilite" , 0xD43}, - {"ShieldDepth" , 0xD4C}, - {"MenuCInfo" , 0xD50}, - {"MBProcHndl" , 0xD54}, - {"MBFlash" , 0xD5C}, - {"ChunkyDepth" , 0xD60}, - {"CrsrPtr" , 0xD62}, - {"PortList" , 0xD66}, - {"MickeyBytes" , 0xD6A}, - {"QDErr" , 0xD6E}, - {"VIA2DT" , 0xD70}, - {"SInitFlags" , 0xD90}, - {"DTQueue" , 0xD92}, - {"DTQFlags" , 0xD92}, - {"DTskQHdr" , 0xD94}, - {"DTskQTail" , 0xD98}, - {"JDTInstall" , 0xD9C}, - {"HiliteRGB" , 0xDA0}, - {"OldTimeSCSIDB" , 0xDA6}, - {"DSCtrAdj" , 0xDA8}, - {"IconTLAddr" , 0xDAC}, - {"VideoInfoOK" , 0xDB0}, - {"EndSRTPtr" , 0xDB4}, - {"SDMJmpTblPtr" , 0xDB8}, - {"JSwapMMU" , 0xDBC}, - {"SdmBusErr" , 0xDC0}, - {"LastTxGDevice" , 0xDC4}, - {"PMgrHandle" , 0xDC8}, - {"LayerPalette" , 0xDCC}, - {"AddrMapFlags" , 0xDD0}, - {"UnivROMFlags" , 0xDD4}, - {"UniversalInfoPtr" , 0xDD8}, - {"BootGlobPtr" , 0xDDC}, - {"EgretGlobals" , 0xDE0}, - {"SaneTrapAddr" , 0xDE4}, - {"Warhol" , 0xDE8}, - {"MemVectors24" , 0x1E00}, - {"Mem2Vectors24" , 0x1EE0}, - {"Phys2Log" , 0x1EF0}, - {"RealMemTop" , 0x1EF4}, - {"PhysMemTop" , 0x1EF8}, - {"MMFlags" , 0x1EFC}, - {"MemVectors32" , 0x1F00}, - {"DrawCrsrVector" , 0x1FB8}, - {"EraseCrsrVector" , 0x1FBC}, - {"PSCIntTbl" , 0x1FC0}, - {"DSPGlobals" , 0x1FC4}, - {"FP040Vects" , 0x1FC8}, - {"FPBSUNVec" , 0x1FCC}, - {"FPUNFLVec" , 0x1FD0}, - {"FPOPERRVec" , 0x1FD4}, - {"FPOVFLVec" , 0x1FD8}, - {"FPSNANVec" , 0x1FDC}, - {"Mem2Vectors32" , 0x1FE0}, - {"SCSI2Base" , 0x1FF0}, - {"LockMemCt" , 0x1FF4}, - {"DockingGlobals" , 0x1FF8}, - {"VectorPtr" , 0x2000}, - {"BasesValid1" , 0x2400}, - {"BasesValid2" , 0x2404}, - {"ExtValid1" , 0x2408}, - {"ExtValid2" , 0x240C}, - {NULL , 0xFFFF} -}; diff --git a/cxmon/src/mon_lowmem.h b/cxmon/src/mon_lowmem.h deleted file mode 100644 index 55e058e87..000000000 --- a/cxmon/src/mon_lowmem.h +++ /dev/null @@ -1,32 +0,0 @@ -/* - * mon_lowmem.h - MacOS low memory globals definitions - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 MON_LOWMEM_H -#define MON_LOWMEM_H - -struct lowmem_info { - const char *name; - uint16 addr; -}; - -// Array of low memory globals in ascending order -extern const lowmem_info lowmem[]; - -#endif diff --git a/cxmon/src/mon_ppc.cpp b/cxmon/src/mon_ppc.cpp deleted file mode 100644 index 56683654a..000000000 --- a/cxmon/src/mon_ppc.cpp +++ /dev/null @@ -1,1129 +0,0 @@ -/* - * mon_ppc.cpp - PowerPC disassembler - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include "mon.h" -#include "mon_disass.h" - - -// Instruction fields -static int primop, exop, vxop, ra, rb, rc, rd; -static unsigned short imm; - - -// Codes for trap instructions -static char *to_code[32] = { - NULL, "lgt", "llt", NULL, "eq", "lge", "lle", NULL, - "gt", NULL, NULL, NULL, "ge", NULL, NULL, NULL, - "lt", NULL, NULL, NULL, "le", NULL, NULL, NULL, - "ne", NULL, NULL, NULL, NULL, NULL, NULL, "" -}; - - -// Macros for instruction forms -#define iform(s, t) fprintf(f, "%s\t$%08x\n", s, t) - -#define bform(s, t) \ - if (rd == 0) \ - fprintf(f, "bdnzf%s\t%d,$%08x\n", s, ra, t); \ - else if (rd == 2) \ - fprintf(f, "bdzf%s\t%d,$%08x\n", s, ra, t); \ - else if (rd == 4) { \ - if (ra == 0) \ - fprintf(f, "bge%s\t$%08x\n", s, t); \ - else if (ra == 1) \ - fprintf(f, "ble%s\t$%08x\n", s, t); \ - else if (ra == 2) \ - fprintf(f, "bne%s\t$%08x\n", s, t); \ - else \ - fprintf(f, "bf%s\t%d,$%08x\n", s, ra, t); \ - } else if (rd == 8) \ - fprintf(f, "bdnzt%s\t%d,$%08x\n", s, ra, t); \ - else if (rd == 10) \ - fprintf(f, "bdzt%s\t%d,$%08x\n", s, ra, t); \ - else if (rd == 12) { \ - if (ra == 0) \ - fprintf(f, "blt%s\t$%08x\n", s, t); \ - else if (ra == 1) \ - fprintf(f, "bgt%s\t$%08x\n", s, t); \ - else if (ra == 2) \ - fprintf(f, "beq%s\t$%08x\n", s, t); \ - else \ - fprintf(f, "bt%s\t%d,$%08x\n", s, ra, t); \ - } else if (rd == 16) \ - fprintf(f, "bdnz%s\t$%08x\n", s, t); \ - else if (rd == 18) \ - fprintf(f, "bdz%s\t$%08x\n", s, t); \ - else \ - fprintf(f, "bc%s\t%d,%d,$%08x\n", s, rd, ra, t) - -#define scform(s) fprintf(f, s "\n") - -#define dform_ls(s) \ - if (ra == 0) \ - fprintf(f, "%s\tr%d,$%08x\n", s, rd, short(imm)); \ - else \ - fprintf(f, "%s\tr%d,$%04x(r%d)\n", s, rd, short(imm), ra) -#define dform_fls(s) \ - if (ra == 0) \ - fprintf(f, "%s\tfr%d,$%08x\n", s, rd, short(imm)); \ - else \ - fprintf(f, "%s\tfr%d,$%04x(r%d)\n", s, rd, short(imm), ra) -#define dform_simm(s) fprintf(f, "%s\tr%d,r%d,$%04x\n", s, rd, ra, short(imm)) -#define dform_simmn(s) fprintf(f, "%s\tr%d,r%d,$%04x\n", s, rd, ra, (-imm) & 0xffff) -#define dform_uimm(s) fprintf(f, "%s\tr%d,r%d,$%04x\n", s, ra, rd, imm) -#define dform_crs(s) fprintf(f, "%s\tcrf%d,r%d,$%04x\n", s, rd >> 2, ra, short(imm)) -#define dform_cru(s) fprintf(f, "%s\tcrf%d,r%d,$%04x\n", s, rd >> 2, ra, imm) -#define dform_to(s) fprintf(f, "%s\t%d,r%d,$%04x\n", s, rd, ra, short(imm)) - -#define dsform(s) fprintf(f, "%s\tr%d,$%04x(r%d)\n", s, rd, short(imm & 0xfffc), ra) - -#define xform_vls(s) \ - if (ra == 0) \ - fprintf(f, "%s\tv%d,r%d\n", s, rd, rb); \ - else \ - fprintf(f, "%s\tv%d,r%d,r%d\n", s, rd, ra, rb) -#define xform_ls(s) \ - if (ra == 0) \ - fprintf(f, "%s\tr%d,r%d\n", s, rd, rb); \ - else \ - fprintf(f, "%s\tr%d,r%d,r%d\n", s, rd, ra, rb) -#define xform_fls(s) \ - if (ra == 0) \ - fprintf(f, "%s\tfr%d,r%d\n", s, rd, rb); \ - else \ - fprintf(f, "%s\tfr%d,r%d,r%d\n", s, rd, ra, rb) -#define xform_lsswi(s) \ - if (ra == 0) \ - fprintf(f, "%s\tr%d,%d\n", s, rd, rb ? rb : 32); \ - else \ - fprintf(f, "%s\tr%d,r%d,%d\n", s, rd, ra, rb ? rb : 32) -#define xform_db(s) fprintf(f, "%s\tr%d,r%d\n", s, rd, rb) -#define xform_d(s) fprintf(f, "%s\tr%d\n", s, rd) -#define xform_fsr(s) fprintf(f, s "\tr%d,%d\n", rd, ra & 0xf) -#define xform_sabc(s) fprintf(f, "%s%s\tr%d,r%d,r%d\n", s, w & 1 ? "." : "", ra, rd, rb) -#define xform_sac(s) fprintf(f, "%s%s\tr%d,r%d\n", s, w & 1 ? "." : "", ra, rd) -#define xform_tsr(s) fprintf(f, s "\t%d,r%d\n", ra & 0xf, rd) -#define xform_sash(s) fprintf(f, s "%s\tr%d,r%d,%d\n", w & 1 ? "." : "", ra, rd, rb) -#define xform_crlab(s) fprintf(f, "%s\tcrf%d,r%d,r%d\n", s, rd >> 2, ra, rb) -#define xform_fcrab(s) fprintf(f, "%s\tcrf%d,fr%d,fr%d\n", s, rd >> 2, ra, rb) -#define xform_crcr(s) fprintf(f, "%s\tcrf%d,crf%d\n", s, rd >> 2, ra >> 2) -#define xform_cr(s) fprintf(f, "%s\tcrf%d\n", s, rd >> 2) -#define xform_cri(s) fprintf(f, s "%s\tcrf%d,%d\n", w & 1 ? "." : "", rd >> 2, rb >> 1) -#define xform_to(s) fprintf(f, "%s\t%d,r%d,r%d\n", s, rd, ra, rb) -#define xform_fdb(s) fprintf(f, "%s%s\tfr%d,fr%d\n", s, w & 1 ? "." : "", rd, rb) -#define xform_fd(s) fprintf(f, "%s%s\tfr%d\n", s, w & 1 ? "." : "", rd) -#define xform_crb(s) fprintf(f, "%s%s\tcrb%d\n", s, w & 1 ? "." : "", rd) -#define xform_ab(s) fprintf(f, "%s\tr%d,r%d\n", s, ra, rb) -#define xform_b(s) fprintf(f, "%s\tr%d\n", s, rb) -#define xform(s) fprintf(f, s "\n") - -#define xlform_b(s) fprintf(f, "%s\t%d,%d\n", s, rd, ra) -#define xlform_cr(s) fprintf(f, "%s\tcrb%d,crb%d,crb%d\n", s, rd, ra, rb) -#define xlform_crcr(s) fprintf(f, "%s\tcrf%d,crf%d\n", s, rd >> 2, ra >> 2) -#define xlform(s) fprintf(f, s "\n") - -#define xfxform_fspr(s) fprintf(f, "%s\tr%d,SPR%d\n", s, rd, ra | (rb << 5)) -#define xfxform_crm(s) fprintf(f, s "\t$%02x,r%d\n", w >> 12 & 0xff, rd) -#define xfxform_tspr(s) fprintf(f, "%s\tSPR%d,r%d\n", s, ra | (rb << 5), rd) -#define xfxform_tb(s) fprintf(f, "%s\tr%d\n", s, rd) - -#define xflform(s) fprintf(f, s "%s\t$%02x,fr%d\n", w & 1 ? "." : "", w >> 17 & 0xff, rb) - -#define xsform(s) fprintf(f, s "%s\tr%d,r%d,%d\n", w & 1 ? "." : "", ra, rd, rb | (w & 2 ? 32 : 0)) - -#define xoform_dab(s) fprintf(f, "%s%s\tr%d,r%d,r%d\n", s, w & 1 ? "." : "", rd, ra, rb) -#define xoform_da(s) fprintf(f, "%s%s\tr%d,r%d\n", s, w & 1 ? "." : "", rd, ra) - -#define aform_dab(s) fprintf(f, "%s%s\tfr%d,fr%d,fr%d\n", s, w & 1 ? "." : "", rd, ra, rb) -#define aform_db(s) fprintf(f, "%s%s\tfr%d,fr%d\n", s, w & 1 ? "." : "", rd, rb) -#define aform_dac(s) fprintf(f, "%s%s\tfr%d,fr%d,fr%d\n", s, w & 1 ? "." : "", rd, ra, rc) -#define aform_dacb(s) fprintf(f, "%s%s\tfr%d,fr%d,fr%d,fr%d\n", s, w & 1 ? "." : "", rd, ra, rc, rb) - -#define mform(s) fprintf(f, "%s%s\tr%d,r%d,r%d,$%08x\n", s, w & 1 ? "." : "", ra, rd, rb, mbme2mask(w >> 6 & 31, w >>1 & 31)) -#define mform_i(s) fprintf(f, "%s%s\tr%d,r%d,%d,$%08x\n", s, w & 1 ? "." : "", ra, rd, rb, mbme2mask(w >> 6 & 31, w >>1 & 31)) - -#define mdform(s) fprintf(f, "%s%s\tr%d,r%d,%d,%d\n", s, w & 1 ? "." : "", ra, rd, rb | (w & 2 ? 32 : 0), rc | (w & 32 ? 32 : 0)) - -#define mdsform(s) fprintf(f, "%s%s\tr%d,r%d,r%d,%d\n", s, w & 1 ? "." : "", ra, rd, rb, rc | (w & 32 ? 32 : 0)) - -#define va_form(s) fprintf(f, "%s\tv%d,v%d,v%d,v%d\n", s, rd, ra, rb, rc) -#define vx_form(s) fprintf(f, "%s\tv%d,v%d,v%d\n", s, rd, ra, rb) -#define vxr_form(s) fprintf(f, "%s%s\tv%d,v%d,v%d\n", s, w & (1 << 10) ? "." : "", rd, ra, rb) -#define vxi_ra_form(s) fprintf(f, "%s\tv%d,v%d,%d\n", s, rd, rb, ra) -#define vx_raz_form(s) \ - if (ra == 0) \ - fprintf(f, "%s\tv%d,v%d\n", s, rd, rb); \ - else \ - fprintf(f, "?\n") -#define vxi_ras_rbz_form(s) \ - if (rb == 0) \ - fprintf(f, "%s\tv%d,%d\n", s, rd, ra - (ra & 0x10 ? 0x20 : 0)); \ - else \ - fprintf(f, "?\n") - -// Prototypes -static void disass4(FILE *f, unsigned int adr, unsigned int w); -static void disass19(FILE *f, unsigned int adr, unsigned int w); -static void disass31(FILE *f, unsigned int adr, unsigned int w); -static void disass59(FILE *f, unsigned int adr, unsigned int w); -static void disass63(FILE *f, unsigned int adr, unsigned int w); -static unsigned int mbme2mask(int mb, int me); -static char *get_spr(int reg); - - -/* - * Disassemble one instruction - */ - -void disass_ppc(FILE *f, unsigned int adr, unsigned int w) -{ - // Divide instruction into fields - primop = w >> 26; - rd = w >> 21 & 0x1f; - ra = w >> 16 & 0x1f; - rb = w >> 11 & 0x1f; - rc = w >> 6 & 0x1f; - exop = w >> 1 & 0x3ff; - vxop = w & 0x7ff; - imm = w & 0xffff; - - // Decode primary opcode - switch (primop) { - case 2: // 64 bit - if (to_code[rd] != NULL) - fprintf(f, "td%si\tr%d,$%04x\n", to_code[rd], ra, short(imm)); - else - dform_to("tdi"); - break; - - case 3: - if (to_code[rd] != NULL) - fprintf(f, "tw%si\tr%d,$%04x\n", to_code[rd], ra, short(imm)); - else - dform_to("twi"); - break; - - case 4: // AltiVec - disass4(f, adr, w); - break; - - case 7: dform_simm("mulli"); break; - case 8: dform_simm("subfic"); break; - - case 10: - if (rd & 1) - dform_cru("cmpldi"); // 64 bit - else - dform_cru("cmplwi"); - break; - - case 11: - if (rd & 1) - dform_crs("cmpdi"); // 64 bit - else - dform_crs("cmpwi"); - break; - - case 12: - if (imm < 0x8000) - dform_simm("addic"); - else - dform_simmn("subic"); - break; - - case 13: - if (imm < 0x8000) - dform_simm("addic."); - else - dform_simmn("subic."); - break; - - case 14: - if (ra == 0) - fprintf(f, "li\tr%d,$%04x\n", rd, short(imm)); - else - if (imm < 0x8000) - dform_simm("addi"); - else - dform_simmn("subi"); - break; - - case 15: - if (ra == 0) - fprintf(f, "lis\tr%d,$%04x\n", rd, imm); - else - if (imm < 0x8000) - dform_simm("addis"); - else - dform_simmn("subis"); - break; - - case 16: { - int target = short(imm & 0xfffc); - char *form; - if (w & 1) - if (w & 2) - form = "la"; - else { - form = "l"; - target += adr; - } - else - if (w & 2) - form = "a"; - else { - form = ""; - target += adr; - } - bform(form, target); - break; - } - - case 17: - if (w & 2) - scform("sc"); - else - fprintf(f, "?\n"); - break; - - case 18: { - int target = w & 0x03fffffc; - if (target & 0x02000000) - target |= 0xfc000000; - if (w & 1) - if (w & 2) - iform("bla", target); - else - iform("bl", adr + target); - else - if (w & 2) - iform("ba", target); - else - iform("b", adr + target); - break; - } - - case 19: disass19(f, adr, w); break; - case 20: mform_i("rlwimi"); break; - case 21: mform_i("rlwinm"); break; - case 23: mform("rlwnm"); break; - - case 24: - if (rd == 0 && ra == 0 && imm == 0) - fprintf(f, "nop\n"); - else - dform_uimm("ori"); - break; - - case 25: dform_uimm("oris"); break; - case 26: dform_uimm("xori"); break; - case 27: dform_uimm("xoris"); break; - case 28: dform_uimm("andi."); break; - case 29: dform_uimm("andis."); break; - - case 30: // 64 bit - switch (w >> 1 & 0xf) { - case 0: case 1: mdform("rldicl"); break; - case 2: case 3: mdform("rldicr"); break; - case 4: case 5: mdform("rldic"); break; - case 6: case 7: mdform("rldimi"); break; - case 8: mdsform("rldcl"); break; - case 9: mdsform("rldcr"); break; - default: - fprintf(f, "?\n"); - break; - }; - break; - - case 31: disass31(f, adr, w); break; - case 32: dform_ls("lwz"); break; - case 33: dform_ls("lwzu"); break; - case 34: dform_ls("lbz"); break; - case 35: dform_ls("lbzu"); break; - case 36: dform_ls("stw"); break; - case 37: dform_ls("stwu"); break; - case 38: dform_ls("stb"); break; - case 39: dform_ls("stbu"); break; - case 40: dform_ls("lhz"); break; - case 41: dform_ls("lhzu"); break; - case 42: dform_ls("lha"); break; - case 43: dform_ls("lhau"); break; - case 44: dform_ls("sth"); break; - case 45: dform_ls("sthu"); break; - case 46: dform_ls("lmw"); break; - case 47: dform_ls("stmw"); break; - case 48: dform_fls("lfs"); break; - case 49: dform_fls("lfsu"); break; - case 50: dform_fls("lfd"); break; - case 51: dform_fls("lfdu"); break; - case 52: dform_fls("stfs"); break; - case 53: dform_fls("stfsu"); break; - case 54: dform_fls("stfd"); break; - case 55: dform_fls("stfdu"); break; - - case 58: // 64 bit - switch (w & 3) { - case 0: dsform("ld"); break; - case 1: dsform("ldu"); break; - case 2: dsform("lwa"); break; - default: - fprintf(f, "?\n"); - break; - } - break; - - case 59: disass59(f, adr, w); break; - - case 62: // 64 bit - switch (w & 3) { - case 0: dsform("std"); break; - case 1: dsform("stdu"); break; - default: - fprintf(f, "?\n"); - break; - } - break; - - case 63: disass63(f, adr, w); break; - - default: - if (!w) - fprintf(f, "illegal\n"); - else - fprintf(f, "?\n"); - break; - } -} - - -/* - * Disassemble instruction with primary opcode = 4 (VX-Form) - */ - -static void disass4(FILE *f, unsigned int adr, unsigned int w) -{ - switch (vxop) { - case 1540: - if (ra == 0 && rb == 0) - fprintf(f, "mfvscr\tv%d\n", rd); - else - fprintf(f, "?\n"); - break; - case 1604: - if (rd == 0 && ra == 0) - fprintf(f, "mtvscr\tv%d\n", rb); - else - fprintf(f, "?\n"); - break; - case 384: vx_form("vaddcuw"); break; - case 10: vx_form("vaddfp"); break; - case 768: vx_form("vaddsbs"); break; - case 832: vx_form("vaddshs"); break; - case 896: vx_form("vaddsws"); break; - case 0: vx_form("vaddubm"); break; - case 512: vx_form("vaddubs"); break; - case 64: vx_form("vadduhm"); break; - case 576: vx_form("vadduhs"); break; - case 128: vx_form("vadduwm"); break; - case 640: vx_form("vadduws"); break; - case 1028: vx_form("vand"); break; - case 1092: vx_form("vandc"); break; - case 1282: vx_form("vavgsb"); break; - case 1346: vx_form("vavgsh"); break; - case 1410: vx_form("vavgsw"); break; - case 1026: vx_form("vavgub"); break; - case 1090: vx_form("vavguh"); break; - case 1154: vx_form("vavguw"); break; - case 842: vxi_ra_form("vcfsx"); break; - case 778: vxi_ra_form("vcfux"); break; - case 966: case 966+1024: vxr_form("vcmpbfp"); break; - case 198: case 198+1024: vxr_form("vcmpeqfp"); break; - case 6: case 6+1024: vxr_form("vcmpequb"); break; - case 70: case 70+1024: vxr_form("vcmpequh"); break; - case 134: case 134+1024: vxr_form("vcmpequw"); break; - case 454: case 454+1024: vxr_form("vcmpgefp"); break; - case 710: case 710+1024: vxr_form("vcmpgtfp"); break; - case 774: case 774+1024: vxr_form("vcmpgtsb"); break; - case 838: case 838+1024: vxr_form("vcmpgtsh"); break; - case 902: case 902+1024: vxr_form("vcmpgtsw"); break; - case 518: case 518+1024: vxr_form("vcmpgtub"); break; - case 582: case 582+1024: vxr_form("vcmpgtuh"); break; - case 646: case 646+1024: vxr_form("vcmpgtuw"); break; - case 970: vxi_ra_form("vctsxs"); break; - case 906: vxi_ra_form("vctuxs"); break; - case 394: vx_raz_form("vexptefp"); break; - case 458: vx_raz_form("vlogefp"); break; - case 1034: vx_form("vmaxfp"); break; - case 258: vx_form("vmaxsb"); break; - case 322: vx_form("vmaxsh"); break; - case 386: vx_form("vmaxsw"); break; - case 2: vx_form("vmaxub"); break; - case 66: vx_form("vmaxuh"); break; - case 130: vx_form("vmaxuw"); break; - case 1098: vx_form("vminfp"); break; - case 770: vx_form("vminsb"); break; - case 834: vx_form("vminsh"); break; - case 898: vx_form("vminsw"); break; - case 514: vx_form("vminub"); break; - case 578: vx_form("vminuh"); break; - case 642: vx_form("vminuw"); break; - case 12: vx_form("vmrghb"); break; - case 76: vx_form("vmrghh"); break; - case 140: vx_form("vmrghw"); break; - case 268: vx_form("vmrglb"); break; - case 332: vx_form("vmrglh"); break; - case 396: vx_form("vmrglw"); break; - case 776: vx_form("vmulesb"); break; - case 840: vx_form("vmulesh"); break; - case 520: vx_form("vmuleub"); break; - case 584: vx_form("vmuleuh"); break; - case 264: vx_form("vmulosb"); break; - case 328: vx_form("vmulosh"); break; - case 8: vx_form("vmuloub"); break; - case 72: vx_form("vmulouh"); break; - case 1284: vx_form("vnor"); break; - case 1156: vx_form("vor"); break; - case 782: vx_form("vpkpx"); break; - case 398: vx_form("vpkshss"); break; - case 270: vx_form("vpkshus"); break; - case 462: vx_form("vpkswss"); break; - case 334: vx_form("vpkswus"); break; - case 14: vx_form("vpkuhum"); break; - case 142: vx_form("vpkuhus"); break; - case 78: vx_form("vpkuwum"); break; - case 206: vx_form("vpkuwus"); break; - case 266: vx_raz_form("vrefp"); break; - case 714: vx_raz_form("vrfim"); break; - case 522: vx_raz_form("vrfin"); break; - case 650: vx_raz_form("vrfip"); break; - case 586: vx_raz_form("vrfiz"); break; - case 4: vx_form("vrlb"); break; - case 68: vx_form("vrlh"); break; - case 132: vx_form("vrlw"); break; - case 330: vx_raz_form("vrsqrtefp"); break; - case 452: vx_form("vsl"); break; - case 260: vx_form("vslb"); break; - case 324: vx_form("vslh"); break; - case 1036: vx_form("vslo"); break; - case 388: vx_form("vslw"); break; - case 524: vxi_ra_form("vspltb"); break; - case 588: vxi_ra_form("vsplth"); break; - case 780: vxi_ras_rbz_form("vspltisb"); break; - case 844: vxi_ras_rbz_form("vspltish"); break; - case 908: vxi_ras_rbz_form("vspltisw"); break; - case 652: vxi_ra_form("vspltw"); break; - case 708: vx_form("vsr"); break; - case 772: vx_form("vsrab"); break; - case 836: vx_form("vsrah"); break; - case 900: vx_form("vsraw"); break; - case 516: vx_form("vsrb"); break; - case 580: vx_form("vsrh"); break; - case 1100: vx_form("vsro"); break; - case 644: vx_form("vsrw"); break; - case 1408: vx_form("vsubcuw"); break; - case 74: vx_form("vsubfp"); break; - case 1792: vx_form("vsubsbs"); break; - case 1856: vx_form("vsubshs"); break; - case 1920: vx_form("vsubsws"); break; - case 1024: vx_form("vsububm"); break; - case 1536: vx_form("vsububs"); break; - case 1088: vx_form("vsubuhm"); break; - case 1600: vx_form("vsubuhs"); break; - case 1152: vx_form("vsubuwm"); break; - case 1664: vx_form("vsubuws"); break; - case 1928: vx_form("vsumsws"); break; - case 1672: vx_form("vsum2sws"); break; - case 1800: vx_form("vsum4sbs"); break; - case 1608: vx_form("vsum4shs"); break; - case 1544: vx_form("vsum4ubs"); break; - case 846: vx_raz_form("vupkhpx"); break; - case 526: vx_raz_form("vupkhsb"); break; - case 590: vx_raz_form("vupkhsh"); break; - case 974: vx_raz_form("vupklpx"); break; - case 654: vx_raz_form("vupklsb"); break; - case 718: vx_raz_form("vupklsh"); break; - case 1220: vx_form("vxor"); break; - default: - if ((vxop & 0x43f) == 44) { // vsldoi vD,vA,vB,SHB - fprintf(f, "vsldoi\tv%d,v%d,v%d,%d\n", rd, ra, rb, rc & 15); - break; - } - switch (vxop & 0x3f) { // VA-form, must come last - case 46: va_form("vmaddfp"); break; - case 32: va_form("vmhaddshs"); break; - case 33: va_form("vmhraddshs"); break; - case 34: va_form("vmladduhm"); break; - case 37: va_form("vmsummbm"); break; - case 40: va_form("vmsumshm"); break; - case 41: va_form("vmsumshs"); break; - case 36: va_form("vmsumubm"); break; - case 38: va_form("vmsumuhm"); break; - case 39: va_form("vmsumuhs"); break; - case 47: va_form("vnmsubfp"); break; - case 43: va_form("vperm"); break; - case 42: va_form("vsel"); break; - default: fprintf(f, "?\n"); break; - } - break; - } -} - - -/* - * Disassemble instruction with primary opcode = 19 (XL-Form) - */ - -static void disass19(FILE *f, unsigned int adr, unsigned int w) -{ - switch (exop) { - case 0: xlform_crcr("mcrf"); break; - - case 16: - if (w & 1) - if (rd == 20) - fprintf(f, "blrl\n"); - else - xlform_b("bclrl"); - else - if (rd == 20) - fprintf(f, "blr\n"); - else - xlform_b("bclr"); - break; - - case 33: - if (ra == rb) - fprintf(f, "crnot\tcrb%d,crb%d\n", rd, ra); - else - xlform_cr("crnor"); - break; - - case 50: xlform("rfi"); break; - case 129: xlform_cr("crandc"); break; - case 150: xlform("isync"); break; - - case 193: - if (ra == rd && rb == rd) - fprintf(f, "crclr\tcrb%d\n", rd); - else - xlform_cr("crxor"); - break; - - case 225: xlform_cr("crnand"); break; - case 257: xlform_cr("crand"); break; - - case 289: - if (ra == rd && rb == rd) - fprintf(f, "crset\tcrb%d\n", rd); - else - xlform_cr("creqv"); - break; - - case 417: xlform_cr("crorc"); break; - - case 449: - if (ra == rb) - fprintf(f, "crmove\tcrb%d,crb%d\n", rd, ra); - else - xlform_cr("cror"); - break; - - case 528: - if (w & 1) - if (rd == 20) - fprintf(f, "bctrl\n"); - else - xlform_b("bcctrl"); - else - if (rd == 20) - fprintf(f, "bctr\n"); - else - xlform_b("bcctr"); - break; - - default: - fprintf(f, "?\n"); - break; - } -} - - -/* - * Disassemble instruction with primary opcode = 31 (X-Form/XO-Form/XFX-Form/XS-Form) - */ - -static void disass31(FILE *f, unsigned int adr, unsigned int w) -{ - switch (exop) { - case 0: - if (rd & 1) - xform_crlab("cmpd"); // 64 bit - else - xform_crlab("cmpw"); - break; - - case 4: - if (rd == 31 && ra == 0 && rb == 0) - xform("trap"); - else if (to_code[rd] != NULL) - fprintf(f, "tw%s\tr%d,r%d\n", to_code[rd], ra, rb); - else - xform_to("tw"); - break; - - case 6: xform_vls("lvsl"); break; - case 7: xform_vls("lvebx"); break; - case 8: xoform_dab("subfc"); break; - case 8+512: xoform_dab("subfco"); break; - case 9: case 9+512: xoform_dab("mulhdu"); break; // 64 bit - case 10: xoform_dab("addc"); break; - case 10+512: xoform_dab("addco"); break; - case 11: case 11+512: xoform_dab("mulhwu"); break; - case 19: xform_d("mfcr"); break; - case 20: xform_ls("lwarx"); break; - case 21: xform_ls("ldx"); break; // 64 bit - case 23: xform_ls("lwzx"); break; - case 24: xform_sabc("slw"); break; - case 26: xform_sac("cntlzw"); break; - case 27: xform_sabc("sld"); break; // 64 bit - case 28: xform_sabc("and"); break; - - case 32: - if (rd & 1) - xform_crlab("cmpld"); // 64 bit - else - xform_crlab("cmplw"); - break; - - case 38: xform_vls("lvsr"); break; - case 39: xform_vls("lvehx"); break; - case 40: xoform_dab("subf"); break; - case 40+512: xoform_dab("subfo"); break; - case 53: xform_ls("ldux"); break; // 64 bit - case 54: xform_ab("dcbst"); break; - case 55: xform_ls("lwzux"); break; - case 58: xform_sac("cntlzd"); break; // 64 bit - case 60: xform_sabc("andc"); break; - - case 68: // 64 bit - if (to_code[rd] != NULL) - fprintf(f, "td%s\tr%d,r%d\n", to_code[rd], ra, rb); - else - xform_to("td"); - break; - - case 71: xform_vls("lvewx"); break; - case 73: case 73+512: xoform_dab("mulhd"); break; // 64 bit - case 75: case 75+512: xoform_dab("mulhw"); break; - case 83: xform_d("mfmsr"); break; - case 84: xform_ls("ldarx"); break; // 64 bit - case 86: xform_ab("dcbf"); break; - case 87: xform_ls("lbzx"); break; - case 103: xform_vls("lvx"); break; - case 104: xoform_da("neg"); break; - case 104+512: xoform_da("nego"); break; - case 119: xform_ls("lbzux"); break; - - case 124: - if (rd == rb) - fprintf(f, "not%s\tr%d,r%d\n", w & 1 ? "." : "", ra, rd); - else - xform_sabc("nor"); - break; - - case 135: xform_vls("stvebx"); break; - case 136: xoform_dab("subfe"); break; - case 136+512: xoform_dab("subfeo"); break; - case 138: xoform_dab("adde"); break; - case 138+512: xoform_dab("addeo"); break; - case 144: xfxform_crm("mtcrf"); break; - case 146: xform_d("mtmsr"); break; - case 149: xform_ls("stdx"); break; // 64 bit - - case 150: - if (w & 1) - xform_ls("stwcx."); - else - fprintf(f, "?\n"); - break; - - case 151: xform_ls("stwx"); break; - case 167: xform_vls("stvehx"); break; - case 181: xform_ls("stdux"); break; // 64 bit - case 183: xform_ls("stwux"); break; - case 199: xform_vls("stvewx"); break; - case 200: xoform_da("subfze"); break; - case 200+512: xoform_da("subfzeo"); break; - case 202: xoform_da("addze"); break; - case 202+512: xoform_da("addzeo"); break; - case 210: xform_tsr("mtsr"); break; - - case 214: // 64 bit - if (w & 1) - xform_ls("stdcx"); - else - fprintf(f, "?\n"); - break; - - case 215: xform_ls("stbx"); break; - case 231: xform_vls("stvx"); break; - case 232: xoform_da("subfme"); break; - case 232+512: xoform_da("subfmeo"); break; - case 233: xoform_dab("mulld"); break; // 64 bit - case 233+512: xoform_dab("mulldo"); break; // 64 bit - case 234: xoform_da("addme"); break; - case 234+512: xoform_da("addmeo"); break; - case 235: xoform_dab("mullw"); break; - case 235+512: xoform_dab("mullwo"); break; - case 242: xform_db("mtsrin"); break; - case 246: xform_ab("dcbtst"); break; - case 247: xform_ls("stbux"); break; - case 266: xoform_dab("add"); break; - case 266+512: xoform_dab("addo"); break; - case 278: xform_ab("dcbt"); break; - case 279: xform_ls("lhzx"); break; - case 284: xform_sabc("eqv"); break; - case 306: xform_b("tlbie"); break; - case 310: xform_ls("eciwx"); break; - case 311: xform_ls("lhzux"); break; - case 316: xform_sabc("xor"); break; - - case 339: - if ((ra | (rb << 5)) == 1) - fprintf(f, "mfxer\tr%d\n", rd); - else if ((ra | (rb << 5)) == 8) - fprintf(f, "mflr\tr%d\n", rd); - else if ((ra | (rb << 5)) == 9) - fprintf(f, "mfctr\tr%d\n", rd); - else if ((ra | (rb << 5)) == 256) - fprintf(f, "mfvrsave\tr%d\n", rd); - else { - char *spr = get_spr(ra | (rb << 5)); - if (spr) - fprintf(f, "mfspr\tr%d,%s\n", rd, spr); - else - xfxform_fspr("mfspr"); - } - break; - - case 341: xform_ls("lwax"); break; // 64 bit - case 343: xform_ls("lhax"); break; - case 359: xform_vls("lvxl"); break; - case 370: xform("tlbia"); break; - - case 822: // AltiVec - if ((rd & 0xc) == 0 && ra == 0 && rb == 0 && (w & 1) == 0) { - if (rd & 0x10) - fprintf(f, "dssall\n"); - else - fprintf(f, "dss\t%d\n", rd & 3); - } - else - fprintf(f, "?\n"); - break; - - case 342: // AltiVec - if ((rd & 0xc) == 0 && (w & 1) == 0) - fprintf(f, "dst%s\tr%d,r%d,%d\n", rd & 0x10 ? "t" : "", ra, rb, rd & 3); - else - fprintf(f, "?\n"); - break; - - case 374: // AltiVec - if ((rd & 0xc) == 0 && (w & 1) == 0) - fprintf(f, "dstst%s\tr%d,r%d,%d\n", rd & 0x10 ? "t" : "", ra, rb, rd & 3); - else - fprintf(f, "?\n"); - break; - - case 371: - if ((ra | (rb << 5)) == 268) - xfxform_tb("mftb"); - else if ((ra | (rb << 5)) == 269) - xfxform_tb("mftbu"); - else - fprintf(f, "?\n"); - break; - - case 373: xform_ls("lwaux"); break; // 64 bit - case 375: xform_ls("lhaux"); break; - case 407: xform_ls("sthx"); break; - case 412: xform_sabc("orc"); break; - case 434: xform_b("slbie"); break; // 64 bit - case 438: xform_ls("ecowx"); break; - case 439: xform_ls("sthux"); break; - - case 444: - if (rd == rb) - fprintf(f, "mr%s\tr%d,r%d\n", w & 1 ? "." : "", ra, rd); - else - xform_sabc("or"); - break; - - case 457: xoform_dab("divdu"); break; // 64 bit - case 457+512: xoform_dab("divduo"); break; // 64 bit - case 459: xoform_dab("divwu"); break; - case 459+512: xoform_dab("divwuo"); break; - - case 467: - if ((ra | (rb << 5)) == 1) - fprintf(f, "mtxer\tr%d\n", rd); - else if ((ra | (rb << 5)) == 8) - fprintf(f, "mtlr\tr%d\n", rd); - else if ((ra | (rb << 5)) == 9) - fprintf(f, "mtctr\tr%d\n", rd); - else if ((ra | (rb << 5)) == 256) - fprintf(f, "mtvrsave\tr%d\n", rd); - else { - char *spr = get_spr(ra | (rb << 5)); - if (spr) - fprintf(f, "mtspr\t%s,r%d\n", spr, rd); - else - xfxform_tspr("mtspr"); - } - break; - - case 470: xform_ab("dcbi"); break; - case 476: xform_sabc("nand"); break; - case 487: xform_vls("stvxl"); break; - case 489: xoform_dab("divd"); break; // 64 bit - case 489+512: xoform_dab("divdo"); break; // 64 bit - case 491: xoform_dab("divw"); break; - case 491+512: xoform_dab("divwo"); break; - case 498: xform("slbia"); break; // 64 bit - case 512: xform_cr("mcrxr"); break; - case 533: xform_ls("lswx"); break; - case 534: xform_ls("lwbrx"); break; - case 535: xform_fls("lfsx"); break; - case 536: xform_sabc("srw"); break; - case 539: xform_sabc("srd"); break; // 64 bit - case 566: xform("tlbsync"); break; - case 567: xform_fls("lfsux"); break; - case 595: xform_fsr("mfsr"); break; - case 597: xform_lsswi("lswi"); break; - case 598: xform("sync"); break; - case 599: xform_fls("lfdx"); break; - case 631: xform_fls("lfdux"); break; - case 659: xform_db("mfsrin"); break; - case 661: xform_ls("stswx"); break; - case 662: xform_ls("stwbrx"); break; - case 663: xform_fls("stfsx"); break; - case 695: xform_fls("stfsux"); break; - case 725: xform_lsswi("stswi"); break; - case 727: xform_fls("stfdx"); break; - case 758: xform_ab("dcba"); break; - case 759: xform_fls("stfdux"); break; - case 790: xform_ls("lhbrx"); break; - case 792: xform_sabc("sraw"); break; - case 794: xform_sabc("srad"); break; // 64 bit - case 824: xform_sash("srawi"); break; - case 826: case 827: xsform("sradi"); break; // 64 bit - case 854: xform("eieio"); break; - case 918: xform_ls("sthbrx"); break; - case 922: xform_sac("extsh"); break; - case 954: xform_sac("extsb"); break; - case 978: fprintf(f, "tlbld\tr%d\n", rb); break; // 603 - case 982: xform_ab("icbi"); break; - case 983: xform_fls("stfiwx"); break; - case 986: xform_sac("extsw"); break; // 64 bit - case 1010: fprintf(f, "tlbli\tr%d\n", rb); break; // 603 - case 1014: xform_ab("dcbz"); break; - - default: - fprintf(f, "?\n"); - break; - } -} - - -/* - * Disassemble instruction with primary opcode = 59 (A-Form) - */ - -static void disass59(FILE *f, unsigned int adr, unsigned int w) -{ - switch (exop & 0x1f) { - case 18: aform_dab("fdivs"); break; - case 20: aform_dab("fsubs"); break; - case 21: aform_dab("fadds"); break; - case 22: aform_db("fsqrts"); break; - case 24: aform_db("fres"); break; - case 25: aform_dac("fmuls"); break; - case 28: aform_dacb("fmsubs"); break; - case 29: aform_dacb("fmadds"); break; - case 30: aform_dacb("fnmsubs"); break; - case 31: aform_dacb("fnmadds"); break; - - default: - fprintf(f, "?\n"); - break; - } -} - - -/* - * Disassemble instruction with primary opcode = 63 (A-Form/X-Form/XFL-Form) - */ - -static void disass63(FILE *f, unsigned int adr, unsigned int w) -{ - if (exop & 0x10) - switch (exop & 0x1f) { - case 18: aform_dab("fdiv"); break; - case 20: aform_dab("fsub"); break; - case 21: aform_dab("fadd"); break; - case 22: aform_db("fsqrt"); break; - case 23: aform_dacb("fsel"); break; - case 25: aform_dac("fmul"); break; - case 26: aform_db("frsqrte"); break; - case 28: aform_dacb("fmsub"); break; - case 29: aform_dacb("fmadd"); break; - case 30: aform_dacb("fnmsub"); break; - case 31: aform_dacb("fnmadd"); break; - - default: - fprintf(f, "?\n"); - break; - } - else - switch (exop) { - case 0: xform_fcrab("fcmpu"); break; - case 12: xform_fdb("frsp"); break; - case 14: xform_fdb("fctiw"); break; - case 15: xform_fdb("fctiwz"); break; - case 32: xform_fcrab("fcmpo"); break; - case 38: xform_crb("mtfsb1"); break; - case 40: xform_fdb("fneg"); break; - case 64: xform_crcr("mcrfs"); break; - case 70: xform_crb("mtfsb0"); break; - case 72: xform_fdb("fmr"); break; - case 134: xform_cri("mtfsfi"); break; - case 136: xform_fdb("fnabs"); break; - case 264: xform_fdb("fabs"); break; - case 583: xform_fd("mffs"); break; - case 711: xflform("mtfsf"); break; - case 814: xform_fdb("fctid"); break; // 64 bit - case 815: xform_fdb("fctidz"); break; // 64 bit - case 846: xform_fdb("fcfid"); break; // 64 bit - - default: - fprintf(f, "?\n"); - break; - } -} - - -/* - * Convert mask begin/end to mask - */ - -static unsigned int mbme2mask(int mb, int me) -{ - unsigned int m = 0; - int i; - - if (mb <= me) - for (i=mb; i<=me; i++) - m |= 1 << (31-i); - else { - for (i=0; i<=me; i++) - m |= 1 << (31-i); - for (i=mb; i<=31; i++) - m |= 1 << (31-i); - } - return m; -} - - -/* - * Convert SPR number to register name - */ - -char *get_spr(int reg) -{ - switch (reg) { - case 1: return "xer"; - case 8: return "lr"; - case 9: return "ctr"; - case 18: return "dsisr"; - case 19: return "dar"; - case 22: return "dec"; - case 25: return "sdr1"; - case 26: return "srr0"; - case 27: return "srr1"; - case 272: return "sprg0"; - case 273: return "sprg1"; - case 274: return "sprg2"; - case 275: return "sprg3"; - case 280: return "asr"; // 64 bit - case 282: return "ear"; - case 284: return "tbl"; - case 285: return "tbu"; - case 287: return "pvr"; - case 528: return "ibat0u"; - case 529: return "ibat0l"; - case 530: return "ibat1u"; - case 531: return "ibat1l"; - case 532: return "ibat2u"; - case 533: return "ibat2l"; - case 534: return "ibat3u"; - case 535: return "ibat3l"; - case 536: return "dbat0u"; - case 537: return "dbat0l"; - case 538: return "dbat1u"; - case 539: return "dbat1l"; - case 540: return "dbat2u"; - case 541: return "dbat2l"; - case 542: return "dbat3u"; - case 543: return "dbat3l"; - case 1013: return "dabr"; - - case 0: return "mq"; // 601 - case 4: return "rtcu"; // 601 - case 5: return "rtcl"; // 601 - case 20: return "rtcu"; // 601 - case 21: return "rtcl"; // 601 - case 952: return "mmcr0"; // 604 - case 953: return "pmc1"; // 604 - case 954: return "pmc2"; // 604 - case 955: return "sia"; // 604 - case 956: return "mmcr1"; // 604e - case 957: return "pmc3"; // 604e - case 958: return "pmc4"; // 604e - case 959: return "sda"; // 604 - case 976: return "dmiss"; // 603 - case 977: return "dcmp"; // 603 - case 978: return "hash1"; // 603 - case 979: return "hash2"; // 603 - case 980: return "imiss"; // 603 - case 981: return "icmp"; // 603 - case 982: return "rpa"; // 603 - case 1008: return "hid0"; // 601/603/604 - case 1009: return "hid1"; // 601/603/604e - case 1010: return "iabr"; // 601/603 - case 1023: return "pir"; // 601/604 - - case 256: return "vrsave"; // AltiVec - - default: return NULL; - } -} diff --git a/cxmon/src/mon_z80.cpp b/cxmon/src/mon_z80.cpp deleted file mode 100644 index b103f5f05..000000000 --- a/cxmon/src/mon_z80.cpp +++ /dev/null @@ -1,604 +0,0 @@ -/* - * mon_z80.cpp - Z80 disassembler - * - * cxmon (C) 1997-2007 Christian Bauer, Marc Hellwig - * - * 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 "sysdeps.h" - -#include - -#include "mon.h" -#include "mon_disass.h" - - -// Addressing modes -enum AddrMode { - A_IMPL, - A_IMM8, // xx - A_IMM16, // xxxx - A_ABS8, // (xx) - A_ABS16, // (xxxx) - A_REL, // relative - A_A, // a - A_HL, // hl or ix or iy - A_SP, // sp - A_REG1, // 8-bit register (bits 0..2 of opcode) or (hl)/(ix+d)/(iy+d) - A_REG1X, // 8-bit register (bits 0..2 of opcode) or (hl)/(ix+d)/(iy+d), don't substitute h or l on prefixes - A_REG2, // 8-bit register (bits 3..5 of opcode) or (hl)/(ix+d)/(iy+d) - A_REG2X, // 8-bit register (bits 3..5 of opcode) or (hl)/(ix+d)/(iy+d), don't substitute h or l on prefixes - A_REG3, // 16-bit register (bits 4..5 of opcode) bc/de/hl/sp - A_REG4, // 16-bit register (bits 4..5 of opcode) bc/de/hl/af - A_COND, // condition code (bits 3..5 of opcode) - A_COND2, // condition code (bits 3..4 of opcode) - A_BIT, // bit number (bits 3..5 of opcode) - A_BIT_REG1, // bit number (bits 3..5 of opcode) followed by 8-bit register (bits 0..2 of opcode) - A_RST, // restart - A_BC_IND, // (bc) - A_DE_IND, // (de) - A_HL_IND, // (hl) or (ix) or (iy) - A_XY_IND, // (ix+d) or (iy+d) - A_SP_IND, // (sp) - A_DE_HL, // de,hl - A_AF_AF, // af,af' -}; - -// Mnemonics -enum Mnemonic { - M_ADC, M_ADD, M_AND, M_BIT, M_CALL, M_CCF, M_CP, M_CPD, M_CPDR, M_CPI, - M_CPIR, M_CPL, M_DAA, M_DEC, M_DI, M_DJNZ, M_EI, M_EX, M_EXX, M_HALT, - M_IM0, M_IM1, M_IM2, M_IN, M_INC, M_IND, M_INDR, M_INI, M_INIR, M_JP, - M_JR, M_LD, M_LDD, M_LDDR, M_LDI, M_LDIR, M_NEG, M_NOP, M_OR, M_OTDR, - M_OTIR, M_OUT, M_OUTD, M_OUTI, M_POP, M_PUSH, M_RES, M_RET, M_RETI, - M_RETN, M_RL, M_RLA, M_RLC, M_RLCA, M_RLD, M_RR, M_RRA, M_RRC, M_RRCA, - M_RRD, M_RST, M_SBC, M_SCF, M_SET, M_SL1, M_SLA, M_SRA, M_SRL, M_SUB, - M_XOR, - M_ILLEGAL, - - M_MAXIMUM -}; - -// Chars for each mnemonic -static const char mnem_1[] = "aaabccccccccddddeeehiiiiiiiiijjlllllnnoooooopprrrrrrrrrrrrrrrssssssssx?"; -static const char mnem_2[] = "ddniacppppppaeijixxammmnnnnnnprdddddeorttuuuoueeeelllllrrrrrsbcellrruo "; -static const char mnem_3[] = "cddtlf ddiilac n xl cddii ddiigp ditttpssttt accd accdtcft1aalbr "; -static const char mnem_4[] = " l r r z t012 r r r r rr di h in a a "; - -// Mnemonic for each opcode -static const Mnemonic mnemonic[256] = { - M_NOP , M_LD , M_LD , M_INC , M_INC , M_DEC , M_LD , M_RLCA, // 00 - M_EX , M_ADD, M_LD , M_DEC , M_INC , M_DEC , M_LD , M_RRCA, - M_DJNZ, M_LD , M_LD , M_INC , M_INC , M_DEC , M_LD , M_RLA , // 10 - M_JR , M_ADD, M_LD , M_DEC , M_INC , M_DEC , M_LD , M_RRA , - M_JR , M_LD , M_LD , M_INC , M_INC , M_DEC , M_LD , M_DAA , // 20 - M_JR , M_ADD, M_LD , M_DEC , M_INC , M_DEC , M_LD , M_CPL , - M_JR , M_LD , M_LD , M_INC , M_INC , M_DEC , M_LD , M_SCF , // 30 - M_JR , M_ADD, M_LD , M_DEC , M_INC , M_DEC , M_LD , M_CCF , - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , // 40 - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , // 50 - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , // 60 - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_HALT, M_LD , // 70 - M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , M_LD , - M_ADD , M_ADD, M_ADD, M_ADD , M_ADD , M_ADD , M_ADD , M_ADD , // 80 - M_ADC , M_ADC, M_ADC, M_ADC , M_ADC , M_ADC , M_ADC , M_ADC , - M_SUB , M_SUB, M_SUB, M_SUB , M_SUB , M_SUB , M_SUB , M_SUB , // 90 - M_SBC , M_SBC, M_SBC, M_SBC , M_SBC , M_SBC , M_SBC , M_SBC , - M_AND , M_AND, M_AND, M_AND , M_AND , M_AND , M_AND , M_AND , // a0 - M_XOR , M_XOR, M_XOR, M_XOR , M_XOR , M_XOR , M_XOR , M_XOR , - M_OR , M_OR , M_OR , M_OR , M_OR , M_OR , M_OR , M_OR , // b0 - M_CP , M_CP , M_CP , M_CP , M_CP , M_CP , M_CP , M_CP , - M_RET , M_POP, M_JP , M_JP , M_CALL, M_PUSH , M_ADD , M_RST , // c0 - M_RET , M_RET, M_JP , M_ILLEGAL, M_CALL, M_CALL , M_ADC , M_RST , - M_RET , M_POP, M_JP , M_OUT , M_CALL, M_PUSH , M_SUB , M_RST , // d0 - M_RET , M_EXX, M_JP , M_IN , M_CALL, M_ILLEGAL, M_SBC , M_RST , - M_RET , M_POP, M_JP , M_EX , M_CALL, M_PUSH , M_AND , M_RST , // e0 - M_RET , M_JP , M_JP , M_EX , M_CALL, M_ILLEGAL, M_XOR , M_RST , - M_RET , M_POP, M_JP , M_DI , M_CALL, M_PUSH , M_OR , M_RST , // f0 - M_RET , M_LD , M_JP , M_EI , M_CALL, M_ILLEGAL, M_CP , M_RST -}; - -// Source/destination addressing modes for each opcode -#define A(d,s) (((A_ ## d) << 8) | (A_ ## s)) - -static const int adr_mode[256] = { - A(IMPL,IMPL) , A(REG3,IMM16) , A(BC_IND,A) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , // 00 - A(AF_AF,IMPL) , A(HL,REG3) , A(A,BC_IND) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , - A(REL,IMPL) , A(REG3,IMM16) , A(DE_IND,A) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , // 10 - A(REL,IMPL) , A(HL,REG3) , A(A,DE_IND) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , - A(COND2,REL) , A(REG3,IMM16) , A(ABS16,HL) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , // 20 - A(COND2,REL) , A(HL,REG3) , A(HL,ABS16) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , - A(COND2,REL) , A(REG3,IMM16) , A(ABS16,A) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , // 30 - A(COND2,REL) , A(HL,REG3) , A(A,ABS16) , A(REG3,IMPL) , A(REG2,IMPL) , A(REG2,IMPL) , A(REG2,IMM8) , A(IMPL,IMPL) , - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , // 40 - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , // 50 - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , // 60 - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , - A(REG2,REG1X) , A(REG2,REG1X) , A(REG2,REG1X), A(REG2,REG1X), A(REG2,REG1X), A(REG2,REG1X), A(IMPL,IMPL) , A(REG2,REG1X), // 70 - A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2,REG1) , A(REG2X,REG1), A(REG2,REG1) , - A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , // 80 - A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , - A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , // 90 - A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , A(A,REG1) , - A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , // a0 - A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , - A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , // b0 - A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , A(REG1,IMPL) , - A(COND,IMPL) , A(REG4,IMPL) , A(COND,IMM16), A(IMM16,IMPL), A(COND,IMM16), A(REG4,IMPL) , A(A,IMM8) , A(RST,IMPL) , // c0 - A(COND,IMPL) , A(IMPL,IMPL) , A(COND,IMM16), A(IMPL,IMPL) , A(COND,IMM16), A(IMM16,IMPL), A(A,IMM8) , A(RST,IMPL) , - A(COND,IMPL) , A(REG4,IMPL) , A(COND,IMM16), A(ABS8,A) , A(COND,IMM16), A(REG4,IMPL) , A(IMM8,IMPL) , A(RST,IMPL) , // d0 - A(COND,IMPL) , A(IMPL,IMPL) , A(COND,IMM16), A(A,ABS8) , A(COND,IMM16), A(IMPL,IMPL) , A(A,IMM8) , A(RST,IMPL) , - A(COND,IMPL) , A(REG4,IMPL) , A(COND,IMM16), A(SP_IND,HL) , A(COND,IMM16), A(REG4,IMPL) , A(IMM8,IMPL) , A(RST,IMPL) , // e0 - A(COND,IMPL) , A(HL_IND,IMPL), A(COND,IMM16), A(DE_HL,IMPL), A(COND,IMM16), A(IMPL,IMPL) , A(IMM8,IMPL) , A(RST,IMPL) , - A(COND,IMPL) , A(REG4,IMPL) , A(COND,IMM16), A(IMPL,IMPL) , A(COND,IMM16), A(REG4,IMPL) , A(IMM8,IMPL) , A(RST,IMPL) , // f0 - A(COND,IMPL) , A(SP,HL) , A(COND,IMM16), A(IMPL,IMPL) , A(COND,IMM16), A(IMPL,IMPL) , A(IMM8,IMPL) , A(RST,IMPL) -}; - - -/* - * sprintf into a "stream" - */ - -struct SFILE { - char *buffer; - char *current; -}; - -static int mon_sprintf(SFILE *f, const char *format, ...) -{ - int n; - va_list args; - va_start(args, format); - vsprintf(f->current, format, args); - f->current += n = strlen(f->current); - va_end(args); - return n; -} - - -/* - * Disassemble one instruction, return number of bytes - */ - -static const char *reg_name[] = {"b", "c", "d", "e", "h", "l", "*", "a"}; -static const char *reg_name_ix[] = {"b", "c", "d", "e", "hx", "lx", "*", "a"}; // undoc -static const char *reg_name_iy[] = {"b", "c", "d", "e", "hy", "ly", "*", "a"}; // undoc -static const char *reg_name_16[] = {"bc", "de", "hl", "sp"}; -static const char *reg_name_16_2[] = {"bc", "de", "hl", "af"}; -static const char *cond_name[] = {"nz", "z", "nc", "c", "po", "pe", "p", "m"}; - -static void operand(SFILE *f, char mode, uint32 &adr, uint8 op, bool ix, bool iy) -{ - switch (mode) { - case A_IMPL: - break; - - case A_IMM8: - mon_sprintf(f, "$%02x", mon_read_byte(adr)); adr++; - break; - - case A_IMM16: - mon_sprintf(f, "$%04x", (mon_read_byte(adr + 1) << 8) | mon_read_byte(adr)); adr += 2; - break; - - case A_ABS8: - mon_sprintf(f, "($%02x)", mon_read_byte(adr)); adr++; - break; - - case A_ABS16: - mon_sprintf(f, "($%04x)", (mon_read_byte(adr + 1) << 8) | mon_read_byte(adr)); adr += 2; - break; - - case A_REL: - mon_sprintf(f, "$%04x", (adr + 1 + (int8)mon_read_byte(adr)) & 0xffff); adr++; - break; - - case A_A: - mon_sprintf(f, "a"); - break; - - case A_HL: - mon_sprintf(f, ix ? "ix" : (iy ? "iy" : "hl")); - break; - - case A_SP: - mon_sprintf(f, "sp"); - break; - - case A_REG1: - case A_REG1X: { - int reg = op & 7; - if (reg == 6) { - if (ix || iy) { - mon_sprintf(f, "(%s+$%02x)", ix ? "ix" : "iy", mon_read_byte(adr)); adr++; - } else { - mon_sprintf(f, "(hl)"); - } - } else if (mode == A_REG1) { - mon_sprintf(f, "%s", ix ? reg_name_ix[reg] : (iy ? reg_name_iy[reg] : reg_name[reg])); - } else { - mon_sprintf(f, "%s", reg_name[reg]); - } - break; - } - - case A_REG2: - case A_REG2X: { - int reg = (op >> 3) & 7; - if (reg == 6) { - if (ix || iy) { - mon_sprintf(f, "(%s+$%02x)", ix ? "ix" : "iy", mon_read_byte(adr)); adr++; - } else { - mon_sprintf(f, "(hl)"); - } - } else if (mode == A_REG2) { - mon_sprintf(f, "%s", ix ? reg_name_ix[reg] : (iy ? reg_name_iy[reg] : reg_name[reg])); - } else { - mon_sprintf(f, "%s", reg_name[reg]); - } - break; - } - - case A_REG3: { - int reg = (op >> 4) & 3; - if (reg == 2 && (ix || iy)) { - mon_sprintf(f, ix ? "ix" : "iy"); - } else { - mon_sprintf(f, reg_name_16[reg]); - } - break; - } - - case A_REG4: { - int reg = (op >> 4) & 3; - if (reg == 2 && (ix || iy)) { - mon_sprintf(f, ix ? "ix" : "iy"); - } else { - mon_sprintf(f, reg_name_16_2[reg]); - } - break; - } - - case A_COND: - mon_sprintf(f, cond_name[(op >> 3) & 7]); - break; - - case A_COND2: - mon_sprintf(f, cond_name[(op >> 3) & 3]); - break; - - case A_BIT: - mon_sprintf(f, "%d", (op >> 3) & 7); - break; - - case A_BIT_REG1: { // undoc - int reg = op & 7; - if (reg == 6) { - mon_sprintf(f, "%d", (op >> 3) & 7); - } else { - mon_sprintf(f, "%d,%s", (op >> 3) & 7, reg_name[reg]); - } - break; - } - - case A_RST: - mon_sprintf(f, "$%02x", op & 0x38); - break; - - case A_BC_IND: - mon_sprintf(f, "(bc)"); - break; - - case A_DE_IND: - mon_sprintf(f, "(de)"); - break; - - case A_HL_IND: - mon_sprintf(f, ix ? "(ix)" : (iy ? "(iy)" : "(hl)")); - break; - - case A_XY_IND: // undoc - mon_sprintf(f, "(%s+$%02x)", ix ? "ix" : "iy", mon_read_byte(adr)); adr++; - break; - - case A_SP_IND: - mon_sprintf(f, "(sp)"); - break; - - case A_DE_HL: - mon_sprintf(f, "de,hl"); - break; - - case A_AF_AF: - mon_sprintf(f, "af,af'"); - break; - } -} - -static int print_instr(SFILE *f, Mnemonic mnem, AddrMode dst_mode, AddrMode src_mode, uint32 adr, uint8 op, bool ix, bool iy) -{ - uint32 orig_adr = adr; - - // Print mnemonic - mon_sprintf(f, "%c%c%c%c ", mnem_1[mnem], mnem_2[mnem], mnem_3[mnem], mnem_4[mnem]); - - // Print destination operand - operand(f, dst_mode, adr, op, ix, iy); - - // Print source operand - if (src_mode != A_IMPL) - mon_sprintf(f, ","); - operand(f, src_mode, adr, op, ix, iy); - - return adr - orig_adr; -} - -static int disass_cb(SFILE *f, uint32 adr, bool ix, bool iy) -{ - int num; - - // Fetch opcode - uint8 op; - if (ix || iy) { - op = mon_read_byte(adr + 1); - num = 2; - } else { - op = mon_read_byte(adr); - num = 1; - } - - // Decode mnemonic and addressing modes - Mnemonic mnem = M_ILLEGAL; - AddrMode dst_mode = A_IMPL, src_mode = A_IMPL; - - switch (op & 0xc0) { - case 0x00: - dst_mode = A_REG1X; - if ((ix || iy) && ((op & 7) != 6)) - src_mode = A_XY_IND; - switch ((op >> 3) & 7) { - case 0: mnem = M_RLC; break; - case 1: mnem = M_RRC; break; - case 2: mnem = M_RL; break; - case 3: mnem = M_RR; break; - case 4: mnem = M_SLA; break; - case 5: mnem = M_SRA; break; - case 6: mnem = M_SL1; break; // undoc - case 7: mnem = M_SRL; break; - } - break; - case 0x40: - mnem = M_BIT; dst_mode = A_BIT; - if (ix || iy) - src_mode = A_XY_IND; - else - src_mode = A_REG1; - break; - case 0x80: - mnem = M_RES; - if (ix || iy) { - dst_mode = A_BIT_REG1; - src_mode = A_XY_IND; - } else { - dst_mode = A_BIT; - src_mode = A_REG1; - } - break; - case 0xc0: - mnem = M_SET; - if (ix || iy) { - dst_mode = A_BIT_REG1; - src_mode = A_XY_IND; - } else { - dst_mode = A_BIT; - src_mode = A_REG1; - } - break; - } - - // Print instruction - print_instr(f, mnem, dst_mode, src_mode, adr, op, ix, iy); - return num; -} - -static int disass_ed(SFILE *f, uint32 adr) -{ - // Fetch opcode - uint8 op = mon_read_byte(adr); - - // Decode mnemonic and addressing modes - Mnemonic mnem; - AddrMode dst_mode = A_IMPL, src_mode = A_IMPL; - - switch (op) { - case 0x40: - case 0x48: - case 0x50: - case 0x58: - case 0x60: - case 0x68: - case 0x78: - mon_sprintf(f, "in %s,(c)", reg_name[(op >> 3) & 7]); - return 1; - case 0x70: - mon_sprintf(f, "in (c)"); - return 1; - - case 0x41: - case 0x49: - case 0x51: - case 0x59: - case 0x61: - case 0x69: - case 0x79: - mon_sprintf(f, "out (c),%s", reg_name[(op >> 3) & 7]); - return 1; - case 0x71: // undoc - mon_sprintf(f, "out (c),0"); - return 1; - - case 0x42: - case 0x52: - case 0x62: - case 0x72: - mnem = M_SBC; dst_mode = A_HL; src_mode = A_REG3; - break; - - case 0x43: - case 0x53: - case 0x63: - case 0x73: - mnem = M_LD; dst_mode = A_ABS16; src_mode = A_REG3; - break; - - case 0x4a: - case 0x5a: - case 0x6a: - case 0x7a: - mnem = M_ADC; dst_mode = A_HL; src_mode = A_REG3; - break; - - case 0x4b: - case 0x5b: - case 0x6b: - case 0x7b: - mnem = M_LD; dst_mode = A_REG3; src_mode = A_ABS16; - break; - - case 0x44: - case 0x4c: // undoc - case 0x54: // undoc - case 0x5c: // undoc - case 0x64: // undoc - case 0x6c: // undoc - case 0x74: // undoc - case 0x7c: // undoc - mnem = M_NEG; - break; - - case 0x45: - case 0x55: // undoc - case 0x5d: // undoc - case 0x65: // undoc - case 0x6d: // undoc - case 0x75: // undoc - case 0x7d: // undoc - mnem = M_RETN; - break; - case 0x4d: mnem = M_RETI; break; - - case 0x46: - case 0x4e: // undoc - case 0x66: // undoc - case 0x6e: // undoc - mnem = M_IM0; - break; - case 0x56: - case 0x76: // undoc - mnem = M_IM1; - break; - case 0x5e: - case 0x7e: // undoc - mnem = M_IM2; - break; - - case 0x47: - mon_sprintf(f, "ld i,a"); - return 1; - case 0x4f: - mon_sprintf(f, "ld r,a"); - return 1; - case 0x57: - mon_sprintf(f, "ld a,i"); - return 1; - case 0x5f: - mon_sprintf(f, "ld a,r"); - return 1; - - case 0x67: mnem = M_RRD; break; - case 0x6f: mnem = M_RLD; break; - - case 0xa0: mnem = M_LDI; break; - case 0xa1: mnem = M_CPI; break; - case 0xa2: mnem = M_INI; break; - case 0xa3: mnem = M_OUTI; break; - case 0xa8: mnem = M_LDD; break; - case 0xa9: mnem = M_CPD; break; - case 0xaa: mnem = M_IND; break; - case 0xab: mnem = M_OUTD; break; - case 0xb0: mnem = M_LDIR; break; - case 0xb1: mnem = M_CPIR; break; - case 0xb2: mnem = M_INIR; break; - case 0xb3: mnem = M_OTIR; break; - case 0xb8: mnem = M_LDDR; break; - case 0xb9: mnem = M_CPDR; break; - case 0xba: mnem = M_INDR; break; - case 0xbb: mnem = M_OTDR; break; - - default: - mnem = M_NOP; - break; - } - - // Print instruction - return print_instr(f, mnem, dst_mode, src_mode, adr + 1, op, false, false) + 1; -} - -static int disass(SFILE *f, uint32 adr, bool ix, bool iy) -{ - uint8 op = mon_read_byte(adr); - if (op == 0xcb) - return disass_cb(f, adr + 1, ix, iy) + 1; - else - return print_instr(f, mnemonic[op], AddrMode(adr_mode[op] >> 8), AddrMode(adr_mode[op] & 0xff), adr + 1, op, ix, iy) + 1; -} - -int disass_z80(FILE *f, uint32 adr) -{ - int num; - char buf[64]; - SFILE sfile = {buf, buf}; - - switch (mon_read_byte(adr)) { - case 0xdd: // ix prefix - num = disass(&sfile, adr + 1, true, false) + 1; - break; - case 0xed: - num = disass_ed(&sfile, adr + 1) + 1; - break; - case 0xfd: // iy prefix - num = disass(&sfile, adr + 1, false, true) + 1; - break; - default: - num = disass(&sfile, adr, false, false); - break; - } - - for (int i=0; i<4; i++) { - if (num > i) - fprintf(f, "%02x ", mon_read_byte(adr + i)); - else - fprintf(f, " "); - } - - fprintf(f, "\t%s\n", buf); - return num; -} diff --git a/cxmon/src/sysdeps.h b/cxmon/src/sysdeps.h deleted file mode 100644 index 2b40d17cf..000000000 --- a/cxmon/src/sysdeps.h +++ /dev/null @@ -1,96 +0,0 @@ -/* - * sysdeps.h - System dependent definitions - * - * cxmon (C) 1997-2004 Christian Bauer, Marc Hellwig - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#ifndef __STDC__ -#error "Your compiler is not ANSI. Get a real one." -#endif - -#include "config.h" - -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - -#ifdef HAVE_UNISTD_H -# include -# include -#endif - -#include -#include -#include - -/* Data types */ - -#ifdef __BEOS__ - -#include - -#else - -typedef unsigned char uint8; -typedef signed char int8; -#if SIZEOF_SHORT == 2 -typedef unsigned short uint16; -typedef short int16; -#elif SIZEOF_INT == 2 -typedef unsigned int uint16; -typedef int int16; -#else -#error "No 2 byte type, you lose." -#endif -#if SIZEOF_INT == 4 -typedef unsigned int uint32; -typedef int int32; -#elif SIZEOF_LONG == 4 -typedef unsigned long uint32; -typedef long int32; -#else -#error "No 4 byte type, you lose." -#endif -#if SIZEOF_LONG == 8 -typedef unsigned long uint64; -typedef long int64; -#define VAL64(a) (a ## l) -#define UVAL64(a) (a ## ul) -#elif SIZEOF_LONG_LONG == 8 -typedef unsigned long long uint64; -typedef long long int64; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -#else -#error "No 8 byte type, you lose." -#endif -#if SIZEOF_VOID_P == 4 -typedef uint32 uintptr; -typedef int32 intptr; -#elif SIZEOF_VOID_P == 8 -typedef uint64 uintptr; -typedef int64 intptr; -#else -#error "Unsupported size of pointer" -#endif - -#endif // def __BEOS__ - -#endif From 1bf6e934614af4dedbbc7a2f9af7f92898134c9d Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 15 Apr 2018 17:33:50 -0500 Subject: [PATCH 207/534] Downgraded emulated UAE cpu --- BasiliskII/src/Unix/CMakeLists.txt | 4 +- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 42 +- BasiliskII/src/uae_cpu/build68k.c | 51 +- BasiliskII/src/uae_cpu/cpu_emulation.h | 15 +- BasiliskII/src/uae_cpu/cpuopti.c | 20 +- BasiliskII/src/uae_cpu/fpu/core.h | 259 --- BasiliskII/src/uae_cpu/fpu/exceptions.cpp | 188 -- BasiliskII/src/uae_cpu/fpu/exceptions.h | 149 -- BasiliskII/src/uae_cpu/fpu/flags.cpp | 169 -- BasiliskII/src/uae_cpu/fpu/flags.h | 217 -- BasiliskII/src/uae_cpu/fpu/fpu.h | 49 - BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp | 2369 --------------------- BasiliskII/src/uae_cpu/fpu/fpu_uae.h | 212 -- BasiliskII/src/uae_cpu/fpu/impl.h | 147 -- BasiliskII/src/uae_cpu/fpu/mathlib.cpp | 100 - BasiliskII/src/uae_cpu/fpu/mathlib.h | 1129 ---------- BasiliskII/src/uae_cpu/fpu/rounding.cpp | 64 - BasiliskII/src/uae_cpu/fpu/rounding.h | 154 -- BasiliskII/src/uae_cpu/fpu/types.h | 135 -- BasiliskII/src/uae_cpu/gencpu.c | 681 +++--- BasiliskII/src/uae_cpu/m68k.h | 396 +--- BasiliskII/src/uae_cpu/newcpu.cpp | 387 ++-- BasiliskII/src/uae_cpu/newcpu.h | 236 +- BasiliskII/src/uae_cpu/noflags.h | 142 -- BasiliskII/src/uae_cpu/readcpu.cpp | 228 +- BasiliskII/src/uae_cpu/readcpu.h | 36 +- BasiliskII/src/uae_cpu/spcflags.h | 103 - BasiliskII/src/uae_cpu/table68k | 398 ++-- 28 files changed, 985 insertions(+), 7095 deletions(-) delete mode 100644 BasiliskII/src/uae_cpu/fpu/core.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/flags.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/flags.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/impl.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.h delete mode 100644 BasiliskII/src/uae_cpu/fpu/types.h delete mode 100644 BasiliskII/src/uae_cpu/noflags.h delete mode 100644 BasiliskII/src/uae_cpu/spcflags.h diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index 0d3f9b9d1..fca7bca0d 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -76,7 +76,7 @@ set(BasiliskII_SRCS ../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp - ../uae_cpu/fpu/fpu_uae.cpp + # ../uae_cpu/fpp.cpp cpustbl.cpp cpudefs.cpp cpuemu.cpp @@ -87,7 +87,7 @@ set(BasiliskII_SRCS add_executable(BasiliskII ${BasiliskII_SRCS}) set_source_files_properties(${BasiliskII_SRCS} - PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DFPU_UAE -DDATADIR=\\\".\\\"") + PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DDATADIR=\\\".\\\"") target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 8dd7d173e..9d3448165 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -1,7 +1,7 @@ /* * basilisk_glue.cpp - Glue UAE CPU to Basilisk II CPU engine interface * - * Basilisk II (C) 1997-2008 Christian Bauer + * Basilisk II (C) 1997-1999 Christian Bauer * * 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 @@ -19,10 +19,8 @@ */ #include "sysdeps.h" - #include "cpu_emulation.h" #include "main.h" -#include "prefs.h" #include "emul_op.h" #include "rom_patches.h" #include "timer.h" @@ -31,26 +29,27 @@ #include "readcpu.h" #include "newcpu.h" - // RAM and ROM pointers -uint32 RAMBaseMac = 0; // RAM base (Mac address space) gb-- initializer is important +uint32 RAMBaseMac; // RAM base (Mac address space) uint8 *RAMBaseHost; // RAM base (host address space) uint32 RAMSize; // Size of RAM uint32 ROMBaseMac; // ROM base (Mac address space) uint8 *ROMBaseHost; // ROM base (host address space) uint32 ROMSize; // Size of ROM +#if !REAL_ADDRESSING // Mac frame buffer uint8 *MacFrameBaseHost; // Frame buffer base (host address space) uint32 MacFrameSize; // Size of frame buffer int MacFrameLayout; // Frame buffer layout +#endif #if DIRECT_ADDRESSING uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent #endif // From newcpu.cpp -extern bool quit_program; +extern int quit_program; /* @@ -59,7 +58,7 @@ extern bool quit_program; bool Init680x0(void) { -#if DIRECT_ADDRESSING +#if REAL_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() RAMBaseMac = 0; @@ -67,7 +66,6 @@ bool Init680x0(void) #endif init_m68k(); - return true; } @@ -78,20 +76,9 @@ bool Init680x0(void) void Exit680x0(void) { - - exit_m68k(); } -/* - * Initialize memory mapping of frame buffer (called upon video mode change) - */ - -void InitFrameBufferMapping(void) -{ - -} - /* * Reset and start 680x0 emulation (doesn't return) */ @@ -99,8 +86,7 @@ void InitFrameBufferMapping(void) void Start680x0(void) { m68k_reset(); - - m68k_execute(); + m68k_go(true); } @@ -111,7 +97,7 @@ void Start680x0(void) void TriggerInterrupt(void) { idle_resume(); - SPCFLAGS_SET( SPCFLAG_INT ); + regs.spcflags |= SPCFLAG_INT; } void TriggerNMI(void) @@ -157,8 +143,8 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) // Execute trap m68k_setpc(m68k_areg(regs, 7)); fill_prefetch_0(); - quit_program = false; - m68k_execute(); + quit_program = 0; + m68k_go(true); // Clean up stack m68k_areg(regs, 7) += 4; @@ -172,7 +158,7 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = false; + quit_program = 0; } @@ -204,8 +190,8 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) // Execute routine m68k_setpc(addr); fill_prefetch_0(); - quit_program = false; - m68k_execute(); + quit_program = 0; + m68k_go(true); // Clean up stack m68k_areg(regs, 7) += 2; @@ -219,5 +205,5 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = false; + quit_program = 0; } diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c index af5cac920..42a7de8b5 100644 --- a/BasiliskII/src/uae_cpu/build68k.c +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -4,20 +4,6 @@ * Read 68000 CPU specs from file "table68k" and build table68k.c * * Copyright 1995,1996 Bernd Schmidt - * - * 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 @@ -72,7 +58,15 @@ int main(int argc, char **argv) printf ("#include \"sysdeps.h\"\n"); printf ("#include \"readcpu.h\"\n"); printf ("struct instr_def defs68k[] = {\n"); +#if 0 + tablef = fopen("table68k","r"); + if (tablef == NULL) { + fprintf(stderr, "table68k not found\n"); + exit(1); + } +#else tablef = stdin; +#endif getnextch(); while (nextch != EOF) { int cpulevel, plevel, sduse; @@ -82,7 +76,6 @@ int main(int argc, char **argv) char opcstr[256]; int bitpos[16]; int flagset[5], flaguse[5]; - char cflow; unsigned int bitmask,bitpattern; int n_variable; @@ -114,8 +107,6 @@ int main(int argc, char **argv) case 'r': currbit = bitr; break; case 'R': currbit = bitR; break; case 'z': currbit = bitz; break; - case 'E': currbit = bitE; break; - case 'p': currbit = bitp; break; default: abort(); } if (!(bitmask & 1)) { @@ -164,6 +155,7 @@ int main(int argc, char **argv) getnextch(); switch(nextch){ case '-': flagset[i] = fa_unset; break; + case '/': flagset[i] = fa_isjmp; break; case '0': flagset[i] = fa_zero; break; case '1': flagset[i] = fa_one; break; case 'x': flagset[i] = fa_dontcare; break; @@ -183,31 +175,13 @@ int main(int argc, char **argv) getnextch(); switch(nextch){ case '-': flaguse[i] = fu_unused; break; + case '/': flaguse[i] = fu_isjmp; break; + case '+': flaguse[i] = fu_maybecc; break; case '?': flaguse[i] = fu_unknown; break; default: flaguse[i] = fu_used; break; } } - getnextch(); - while (isspace(nextch)) - getnextch(); - - if (nextch != ':') /* Get control flow information */ - abort(); - - cflow = 0; - for(i = 0; i < 2; i++) { - getnextch(); - switch(nextch){ - case '-': break; - case 'R': cflow |= fl_return; break; - case 'B': cflow |= fl_branch; break; - case 'J': cflow |= fl_jump; break; - case 'T': cflow |= fl_trap; break; - default: abort(); - } - } - getnextch(); while (isspace(nextch)) getnextch(); @@ -259,10 +233,9 @@ int main(int argc, char **argv) for(i = 0; i < 5; i++) { printf("{ %d, %d }%c ", flaguse[i], flagset[i], i == 4 ? ' ' : ','); } - printf("}, %d, %d, \"%s\"}", cflow, sduse, opstrp); + printf("}, %d, \"%s\"}", sduse, opstrp); } } printf("};\nint n_defs68k = %d;\n", no_insns); - fflush(stdout); return 0; } diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index 809959c9b..cc1d6e051 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -1,7 +1,7 @@ /* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.10 version) + * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.8 version) * - * Basilisk II (C) 1997-2008 Christian Bauer + * Basilisk II (C) 1997-1999 Christian Bauer * * 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 @@ -21,8 +21,6 @@ #ifndef CPU_EMULATION_H #define CPU_EMULATION_H -#include - /* * Memory system @@ -37,7 +35,15 @@ extern uint32 ROMBaseMac; // ROM base (Mac address space) extern uint8 *ROMBaseHost; // ROM base (host address space) extern uint32 ROMSize; // Size of ROM +#if !REAL_ADDRESSING +// If we are not using real addressing, the Mac frame buffer gets mapped to this location +// The memory must be allocated by VideoInit(). If multiple monitors are used, they must +// share the frame buffer +const uint32 MacFrameBaseMac = 0xa0000000; +extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) +extern uint32 MacFrameSize; // Size of frame buffer extern int MacFrameLayout; // Frame buffer layout (see defines below) +#endif // Possible frame buffer layouts enum { @@ -72,7 +78,6 @@ static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return me // Initialization extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation extern void Exit680x0(void); -extern void InitFrameBufferMapping(void); // 680x0 emulation functions struct M68kRegisters; diff --git a/BasiliskII/src/uae_cpu/cpuopti.c b/BasiliskII/src/uae_cpu/cpuopti.c index 28ba7c226..2dc105070 100644 --- a/BasiliskII/src/uae_cpu/cpuopti.c +++ b/BasiliskII/src/uae_cpu/cpuopti.c @@ -5,20 +5,6 @@ * Based on work by Tauno Taipaleenmaki * * Copyright 1996 Bernd Schmidt - * - * 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 @@ -41,7 +27,7 @@ struct func { static void oops(void) { fprintf(stderr, "Don't know how to optimize this file.\n"); - exit(1); + abort(); } static char * match(struct line *l, const char *m) @@ -60,7 +46,7 @@ static int insn_references_reg (struct line *l, char *reg) { if (reg[0] != 'e') { fprintf(stderr, "Unknown register?!?\n"); - exit(1); + abort(); } if (strstr (l->data, reg) != 0) return 1; @@ -135,7 +121,7 @@ static void do_function(struct func *f) l3 = l3->prev; } if (l3 == l2) - exit(1); + abort(); for (l4 = l2; l4 != l3; l4 = l4->prev) { /* The register may not be referenced by any of the insns that we * move the popl past */ diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu/fpu/core.h deleted file mode 100644 index 66358a2d8..000000000 --- a/BasiliskII/src/uae_cpu/fpu/core.h +++ /dev/null @@ -1,259 +0,0 @@ -/* - * fpu/core.h - base fpu context definition - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_CORE_H -#define FPU_CORE_H - -#include "sysdeps.h" -#include "fpu/types.h" - -/* Always use x87 FPU stack on IA-32. */ -#if defined(X86_ASSEMBLY) -#define USE_X87_ASSEMBLY 1 -#endif - -/* Only use x87 FPU on x86-64 if long double precision is requested. */ -#if defined(X86_64_ASSEMBLY) && USE_LONG_DOUBLE -#define USE_X87_ASSEMBLY 1 -#endif - -/* ========================================================================== */ -/* ========================= FPU CONTEXT DEFINITION ========================= */ -/* ========================================================================== */ - -/* We don't use all features of the C++ language so that we may still - * easily backport that code to C. - */ - -struct fpu_t { - - /* ---------------------------------------------------------------------- */ - /* --- Floating-Point Data Registers --- */ - /* ---------------------------------------------------------------------- */ - - /* The eight %fp0 .. %fp7 registers */ - fpu_register registers[8]; - - /* Used for lazy evalualation of FPU flags */ - fpu_register result; - - /* ---------------------------------------------------------------------- */ - /* --- Floating-Point Control Register --- */ - /* ---------------------------------------------------------------------- */ - - struct { - - /* Exception Enable Byte */ - uae_u32 exception_enable; - #define FPCR_EXCEPTION_ENABLE 0x0000ff00 - #define FPCR_EXCEPTION_BSUN 0x00008000 - #define FPCR_EXCEPTION_SNAN 0x00004000 - #define FPCR_EXCEPTION_OPERR 0x00002000 - #define FPCR_EXCEPTION_OVFL 0x00001000 - #define FPCR_EXCEPTION_UNFL 0x00000800 - #define FPCR_EXCEPTION_DZ 0x00000400 - #define FPCR_EXCEPTION_INEX2 0x00000200 - #define FPCR_EXCEPTION_INEX1 0x00000100 - - /* Mode Control Byte Mask */ - #define FPCR_MODE_CONTROL 0x000000ff - - /* Rounding precision */ - uae_u32 rounding_precision; - #define FPCR_ROUNDING_PRECISION 0x000000c0 - #define FPCR_PRECISION_SINGLE 0x00000040 - #define FPCR_PRECISION_DOUBLE 0x00000080 - #define FPCR_PRECISION_EXTENDED 0x00000000 - - /* Rounding mode */ - uae_u32 rounding_mode; - #define FPCR_ROUNDING_MODE 0x00000030 - #define FPCR_ROUND_NEAR 0x00000000 - #define FPCR_ROUND_ZERO 0x00000010 - #define FPCR_ROUND_MINF 0x00000020 - #define FPCR_ROUND_PINF 0x00000030 - - } fpcr; - - /* ---------------------------------------------------------------------- */ - /* --- Floating-Point Status Register --- */ - /* ---------------------------------------------------------------------- */ - - struct { - - /* Floating-Point Condition Code Byte */ - uae_u32 condition_codes; - #define FPSR_CCB 0xff000000 - #define FPSR_CCB_NEGATIVE 0x08000000 - #define FPSR_CCB_ZERO 0x04000000 - #define FPSR_CCB_INFINITY 0x02000000 - #define FPSR_CCB_NAN 0x01000000 - - /* Quotient Byte */ - uae_u32 quotient; - #define FPSR_QUOTIENT 0x00ff0000 - #define FPSR_QUOTIENT_SIGN 0x00800000 - #define FPSR_QUOTIENT_VALUE 0x007f0000 - - /* Exception Status Byte */ - uae_u32 exception_status; - #define FPSR_EXCEPTION_STATUS FPCR_EXCEPTION_ENABLE - #define FPSR_EXCEPTION_BSUN FPCR_EXCEPTION_BSUN - #define FPSR_EXCEPTION_SNAN FPCR_EXCEPTION_SNAN - #define FPSR_EXCEPTION_OPERR FPCR_EXCEPTION_OPERR - #define FPSR_EXCEPTION_OVFL FPCR_EXCEPTION_OVFL - #define FPSR_EXCEPTION_UNFL FPCR_EXCEPTION_UNFL - #define FPSR_EXCEPTION_DZ FPCR_EXCEPTION_DZ - #define FPSR_EXCEPTION_INEX2 FPCR_EXCEPTION_INEX2 - #define FPSR_EXCEPTION_INEX1 FPCR_EXCEPTION_INEX1 - - /* Accrued Exception Byte */ - uae_u32 accrued_exception; - #define FPSR_ACCRUED_EXCEPTION 0x000000ff - #define FPSR_ACCR_IOP 0x00000080 - #define FPSR_ACCR_OVFL 0x00000040 - #define FPSR_ACCR_UNFL 0x00000020 - #define FPSR_ACCR_DZ 0x00000010 - #define FPSR_ACCR_INEX 0x00000008 - - } fpsr; - - /* ---------------------------------------------------------------------- */ - /* --- Floating-Point Instruction Address Register --- */ - /* ---------------------------------------------------------------------- */ - - uae_u32 instruction_address; - - /* ---------------------------------------------------------------------- */ - /* --- Initialization / Finalization --- */ - /* ---------------------------------------------------------------------- */ - - /* Flag set if we emulate an integral 68040 FPU */ - bool is_integral; - - /* ---------------------------------------------------------------------- */ - /* --- Extra FPE-dependant defines --- */ - /* ---------------------------------------------------------------------- */ - - #if defined(FPU_X86) \ - || (defined(FPU_UAE) && defined(USE_X87_ASSEMBLY)) \ - || (defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY)) - - #define CW_RESET 0x0040 // initial CW value after RESET - #define CW_FINIT 0x037F // initial CW value after FINIT - #define SW_RESET 0x0000 // initial SW value after RESET - #define SW_FINIT 0x0000 // initial SW value after FINIT - #define TW_RESET 0x5555 // initial TW value after RESET - #define TW_FINIT 0x0FFF // initial TW value after FINIT - - #define CW_X 0x1000 // infinity control - #define CW_RC_ZERO 0x0C00 // rounding control toward zero - #define CW_RC_UP 0x0800 // rounding control toward + - #define CW_RC_DOWN 0x0400 // rounding control toward - - #define CW_RC_NEAR 0x0000 // rounding control toward even - #define CW_PC_EXTENDED 0x0300 // precision control 64bit - #define CW_PC_DOUBLE 0x0200 // precision control 53bit - #define CW_PC_RESERVED 0x0100 // precision control reserved - #define CW_PC_SINGLE 0x0000 // precision control 24bit - #define CW_PM 0x0020 // precision exception mask - #define CW_UM 0x0010 // underflow exception mask - #define CW_OM 0x0008 // overflow exception mask - #define CW_ZM 0x0004 // zero divide exception mask - #define CW_DM 0x0002 // denormalized operand exception mask - #define CW_IM 0x0001 // invalid operation exception mask - - #define SW_B 0x8000 // busy flag - #define SW_C3 0x4000 // condition code flag 3 - #define SW_TOP_7 0x3800 // top of stack = ST(7) - #define SW_TOP_6 0x3000 // top of stack = ST(6) - #define SW_TOP_5 0x2800 // top of stack = ST(5) - #define SW_TOP_4 0x2000 // top of stack = ST(4) - #define SW_TOP_3 0x1800 // top of stack = ST(3) - #define SW_TOP_2 0x1000 // top of stack = ST(2) - #define SW_TOP_1 0x0800 // top of stack = ST(1) - #define SW_TOP_0 0x0000 // top of stack = ST(0) - #define SW_C2 0x0400 // condition code flag 2 - #define SW_C1 0x0200 // condition code flag 1 - #define SW_C0 0x0100 // condition code flag 0 - #define SW_ES 0x0080 // error summary status flag - #define SW_SF 0x0040 // stack fault flag - #define SW_PE 0x0020 // precision exception flag - #define SW_UE 0x0010 // underflow exception flag - #define SW_OE 0x0008 // overflow exception flag - #define SW_ZE 0x0004 // zero divide exception flag - #define SW_DE 0x0002 // denormalized operand exception flag - #define SW_IE 0x0001 // invalid operation exception flag - - #define X86_ROUNDING_MODE 0x0C00 - #define X86_ROUNDING_PRECISION 0x0300 - - #endif /* FPU_X86 */ - -}; - -/* We handle only one global fpu */ -extern fpu_t fpu; - -/* Return the address of a particular register */ -inline fpu_register * const fpu_register_address(int i) - { return &fpu.registers[i]; } - -/* Dump functions for m68k_dumpstate */ -extern void fpu_dump_registers(void); -extern void fpu_dump_flags(void); - -/* Accessors to FPU Control Register */ -static inline uae_u32 get_fpcr(void); -static inline void set_fpcr(uae_u32 new_fpcr); - -/* Accessors to FPU Status Register */ -static inline uae_u32 get_fpsr(void); -static inline void set_fpsr(uae_u32 new_fpsr); - -/* Accessors to FPU Instruction Address Register */ -static inline uae_u32 get_fpiar(); -static inline void set_fpiar(uae_u32 new_fpiar); - -/* Initialization / Finalization */ -extern void fpu_init(bool integral_68040); -extern void fpu_exit(void); -extern void fpu_reset(void); - -/* Floating-point arithmetic instructions */ -void fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) REGPARAM; - -/* Floating-point program control operations */ -void fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) REGPARAM; -void fpuop_dbcc(uae_u32 opcode, uae_u32 extra) REGPARAM; -void fpuop_scc(uae_u32 opcode, uae_u32 extra) REGPARAM; - -/* Floating-point system control operations */ -void fpuop_save(uae_u32 opcode) REGPARAM; -void fpuop_restore(uae_u32 opcode) REGPARAM; -void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) REGPARAM; - -#endif /* FPU_CORE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp deleted file mode 100644 index 6aa6431aa..000000000 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp +++ /dev/null @@ -1,188 +0,0 @@ -/* - * fpu/exceptions.cpp - system-dependant FPU exceptions management - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 - */ - -#undef PRIVATE -#define PRIVATE /**/ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 exceptions --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_X86_EXCEPTIONS -void FFPU fpu_init_native_exceptions(void) -{ - // Mapping for "sw" -> fpsr exception byte - for (uae_u32 i = 0; i < 0x80; i++) { - exception_host2mac[i] = 0; - - if(i & SW_FAKE_BSUN) { - exception_host2mac[i] |= FPSR_EXCEPTION_BSUN; - } - // precision exception - if(i & SW_PE) { - exception_host2mac[i] |= FPSR_EXCEPTION_INEX2; - } - // underflow exception - if(i & SW_UE) { - exception_host2mac[i] |= FPSR_EXCEPTION_UNFL; - } - // overflow exception - if(i & SW_OE) { - exception_host2mac[i] |= FPSR_EXCEPTION_OVFL; - } - // zero divide exception - if(i & SW_ZE) { - exception_host2mac[i] |= FPSR_EXCEPTION_DZ; - } - // denormalized operand exception. - // wrong, but should not get here, normalization is done in elsewhere - if(i & SW_DE) { - exception_host2mac[i] |= FPSR_EXCEPTION_SNAN; - } - // invalid operation exception - if(i & SW_IE) { - exception_host2mac[i] |= FPSR_EXCEPTION_OPERR; - } - } - - // Mapping for fpsr exception byte -> "sw" - for (uae_u32 i = 0; i < 0x100; i++) { - uae_u32 fpsr = (i << 8); - exception_mac2host[i] = 0; - - // BSUN; make sure that you don't generate FPU stack faults. - if(fpsr & FPSR_EXCEPTION_BSUN) { - exception_mac2host[i] |= SW_FAKE_BSUN; - } - // precision exception - if(fpsr & FPSR_EXCEPTION_INEX2) { - exception_mac2host[i] |= SW_PE; - } - // underflow exception - if(fpsr & FPSR_EXCEPTION_UNFL) { - exception_mac2host[i] |= SW_UE; - } - // overflow exception - if(fpsr & FPSR_EXCEPTION_OVFL) { - exception_mac2host[i] |= SW_OE; - } - // zero divide exception - if(fpsr & FPSR_EXCEPTION_DZ) { - exception_mac2host[i] |= SW_ZE; - } - // denormalized operand exception - if(fpsr & FPSR_EXCEPTION_SNAN) { - exception_mac2host[i] |= SW_DE; //Wrong - } - // invalid operation exception - if(fpsr & FPSR_EXCEPTION_OPERR) { - exception_mac2host[i] |= SW_IE; - } - } -} -#endif - -#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS -void FFPU fpu_init_native_accrued_exceptions(void) -{ - /* - 68881/68040 accrued exceptions accumulate as follows: - Accrued.IOP |= (Exception.SNAN | Exception.OPERR) - Accrued.OVFL |= (Exception.OVFL) - Accrued.UNFL |= (Exception.UNFL | Exception.INEX2) - Accrued.DZ |= (Exception.DZ) - Accrued.INEX |= (Exception.INEX1 | Exception.INEX2 | Exception.OVFL) - */ - - // Mapping for "fpsr.accrued_exception" -> fpsr accrued exception byte - for (uae_u32 i = 0; i < 0x40; i++ ) { - accrued_exception_host2mac[i] = 0; - - // precision exception - if(i & SW_PE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_INEX; - } - // underflow exception - if(i & SW_UE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_UNFL; - } - // overflow exception - if(i & SW_OE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_OVFL; - } - // zero divide exception - if(i & SW_ZE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_DZ; - } - // denormalized operand exception - if(i & SW_DE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; //?????? - } - // invalid operation exception - if(i & SW_IE) { - accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; - } - } - - // Mapping for fpsr accrued exception byte -> "fpsr.accrued_exception" - for (uae_u32 i = 0; i < 0x20; i++) { - int fpsr = (i << 3); - accrued_exception_mac2host[i] = 0; - - // precision exception - if(fpsr & FPSR_ACCR_INEX) { - accrued_exception_mac2host[i] |= SW_PE; - } - // underflow exception - if(fpsr & FPSR_ACCR_UNFL) { - accrued_exception_mac2host[i] |= SW_UE; - } - // overflow exception - if(fpsr & FPSR_ACCR_OVFL) { - accrued_exception_mac2host[i] |= SW_OE; - } - // zero divide exception - if(fpsr & FPSR_ACCR_DZ) { - accrued_exception_mac2host[i] |= SW_ZE; - } - // What about SW_DE; //?????? - // invalid operation exception - if(fpsr & FPSR_ACCR_IOP) { - accrued_exception_mac2host[i] |= SW_IE; - } - } -} -#endif diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu/fpu/exceptions.h deleted file mode 100644 index 8c69a69d4..000000000 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.h +++ /dev/null @@ -1,149 +0,0 @@ -/* - * fpu/exceptions.h - system-dependant FPU exceptions management - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_EXCEPTIONS_H -#define FPU_EXCEPTIONS_H - -/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* Defaults to generic exceptions */ -#define FPU_USE_GENERIC_EXCEPTIONS -#define FPU_USE_GENERIC_ACCRUED_EXCEPTIONS - -/* -------------------------------------------------------------------------- */ -/* --- Selection of floating-point exceptions handling mode --- */ -/* -------------------------------------------------------------------------- */ - -/* Optimized i386 fpu core must use native exceptions */ -#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_EXCEPTIONS -# define FPU_USE_X86_EXCEPTIONS -#endif - -/* Optimized i386 fpu core must use native accrued exceptions */ -#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS -# define FPU_USE_X86_ACCRUED_EXCEPTIONS -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 Exceptions --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_X86_EXCEPTIONS - -/* Extend the SW_* codes */ -#define SW_FAKE_BSUN SW_SF - -/* Shorthand */ -#define SW_EXCEPTION_MASK (SW_ES|SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) -// #define SW_EXCEPTION_MASK (SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) - -/* Lookup tables */ -PRIVATE uae_u32 exception_host2mac[ 0x80 ]; -PRIVATE uae_u32 exception_mac2host[ 0x100 ]; - -/* Initialize native exception management */ -PUBLIC void FFPU fpu_init_native_exceptions(void); - -/* Return m68k floating-point exception status */ -PRIVATE inline uae_u32 FFPU get_exception_status(void) - { return exception_host2mac[FPU fpsr.exception_status & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } - -/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ -PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) - { FPU fpsr.exception_status = exception_mac2host[new_status >> 8]; } - -#endif /* FPU_USE_X86_EXCEPTIONS */ - -#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS - -/* Lookup tables */ -PRIVATE uae_u32 accrued_exception_host2mac[ 0x40 ]; -PRIVATE uae_u32 accrued_exception_mac2host[ 0x20 ]; - -/* Initialize native accrued exception management */ -PUBLIC void FFPU fpu_init_native_accrued_exceptions(void); - -/* Return m68k accrued exception byte */ -PRIVATE inline uae_u32 FFPU get_accrued_exception(void) - { return accrued_exception_host2mac[FPU fpsr.accrued_exception & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } - -/* Set new accrued exception byte */ -PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) - { FPU fpsr.accrued_exception = accrued_exception_mac2host[(new_status & 0xF8) >> 3]; } - -#endif /* FPU_USE_X86_ACCRUED_EXCEPTIONS */ - -/* -------------------------------------------------------------------------- */ -/* --- Default Exceptions Handling --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_GENERIC_EXCEPTIONS - -/* Initialize native exception management */ -static inline void FFPU fpu_init_native_exceptions(void) - { } - -/* Return m68k floating-point exception status */ -PRIVATE inline uae_u32 FFPU get_exception_status(void) - { return FPU fpsr.exception_status; } - -/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ -PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) - { FPU fpsr.exception_status = new_status; } - -#endif /* FPU_USE_GENERIC_EXCEPTIONS */ - -#ifdef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS - -/* Initialize native accrued exception management */ -PRIVATE inline void FFPU fpu_init_native_accrued_exceptions(void) - { } - -/* Return m68k accrued exception byte */ -PRIVATE inline uae_u32 FFPU get_accrued_exception(void) - { return FPU fpsr.accrued_exception; } - -/* Set new accrued exception byte */ -PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) - { FPU fpsr.accrued_exception = new_status; } - -#endif /* FPU_USE_GENERIC_ACCRUED_EXCEPTIONS */ - -#endif /* FPU_EXCEPTIONS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu/fpu/flags.cpp deleted file mode 100644 index 2eabef859..000000000 --- a/BasiliskII/src/uae_cpu/fpu/flags.cpp +++ /dev/null @@ -1,169 +0,0 @@ -/* - * fpu/flags.cpp - Floating-point flags - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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: this file shall be included only from fpu/fpu_*.cpp */ -#undef PRIVATE -#define PRIVATE /**/ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 floating-point flags --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_X86_FLAGS - -/* Initialization */ -void FFPU fpu_init_native_fflags(void) -{ - // Adapted from fpu_x86.cpp - #define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) - #define SW_Z (SW_C3) - #define SW_I (SW_C0|SW_C2) - #define SW_NAN (SW_C0) - #define SW_FINITE (SW_C2) - #define SW_EMPTY_REGISTER (SW_C0|SW_C3) - #define SW_DENORMAL (SW_C2|SW_C3) - #define SW_UNSUPPORTED (0) - #define SW_N (SW_C1) - - // Sanity checks - #if (SW_Z != NATIVE_FFLAG_ZERO) - #error "Incorrect X86 Z fflag" - #endif - #if (SW_I != NATIVE_FFLAG_INFINITY) - #error "Incorrect X86 I fflag" - #endif - #if (SW_N != NATIVE_FFLAG_NEGATIVE) - #error "Incorrect X86 N fflag" - #endif - #if (SW_NAN != NATIVE_FFLAG_NAN) - #error "Incorrect X86 NAN fflag" - #endif - - // Native status word to m68k mappings - for (uae_u32 i = 0; i < 0x48; i++) { - to_m68k_fpcond[i] = 0; - const uae_u32 native_fpcond = i << 8; - switch (native_fpcond & SW_Z_I_NAN_MASK) { -#ifndef FPU_UAE -// gb-- enabling it would lead to incorrect drawing of digits -// in Speedometer Performance Test - case SW_UNSUPPORTED: -#endif - case SW_NAN: - case SW_EMPTY_REGISTER: - to_m68k_fpcond[i] |= FPSR_CCB_NAN; - break; - case SW_FINITE: - case SW_DENORMAL: - break; - case SW_I: - to_m68k_fpcond[i] |= FPSR_CCB_INFINITY; - break; - case SW_Z: - to_m68k_fpcond[i] |= FPSR_CCB_ZERO; - break; - } - if (native_fpcond & SW_N) - to_m68k_fpcond[i] |= FPSR_CCB_NEGATIVE; - } - - // m68k to native status word mappings - for (uae_u32 i = 0; i < 0x10; i++) { - const uae_u32 m68k_fpcond = i << 24; - if (m68k_fpcond & FPSR_CCB_NAN) - to_host_fpcond[i] = SW_NAN; - else if (m68k_fpcond & FPSR_CCB_ZERO) - to_host_fpcond[i] = SW_Z; - else if (m68k_fpcond & FPSR_CCB_INFINITY) - to_host_fpcond[i] = SW_I; - else - to_host_fpcond[i] = SW_FINITE; - if (m68k_fpcond & FPSR_CCB_NEGATIVE) - to_host_fpcond[i] |= SW_N; - } - - // truth-table for FPU conditions - for (uae_u32 host_fpcond = 0; host_fpcond < 0x08; host_fpcond++) { - // host_fpcond: C3 on bit 2, C1 and C0 are respectively on bits 1 and 0 - const uae_u32 real_host_fpcond = ((host_fpcond & 4) << 12) | ((host_fpcond & 3) << 8); - const bool N = ((real_host_fpcond & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE); - const bool Z = ((real_host_fpcond & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO); - const bool NaN = ((real_host_fpcond & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN); - - int value; - for (uae_u32 m68k_fpcond = 0; m68k_fpcond < 0x20; m68k_fpcond++) { - switch (m68k_fpcond) { - case 0x00: value = 0; break; // False - case 0x01: value = Z; break; // Equal - case 0x02: value = !(NaN || Z || N); break; // Ordered Greater Than - case 0x03: value = Z || !(NaN || N); break; // Ordered Greater Than or Equal - case 0x04: value = N && !(NaN || Z); break; // Ordered Less Than - case 0x05: value = Z || (N && !NaN); break; // Ordered Less Than or Equal - case 0x06: value = !(NaN || Z); break; // Ordered Greater or Less Than - case 0x07: value = !NaN; break; // Ordered - case 0x08: value = NaN; break; // Unordered - case 0x09: value = NaN || Z; break; // Unordered or Equal - case 0x0a: value = NaN || !(N || Z); break; // Unordered or Greater Than - case 0x0b: value = NaN || Z || !N; break; // Unordered or Greater or Equal - case 0x0c: value = NaN || (N && !Z); break; // Unordered or Less Than - case 0x0d: value = NaN || Z || N; break; // Unordered or Less or Equal - case 0x0e: value = !Z; break; // Not Equal - case 0x0f: value = 1; break; // True - case 0x10: value = 0; break; // Signaling False - case 0x11: value = Z; break; // Signaling Equal - case 0x12: value = !(NaN || Z || N); break; // Greater Than - case 0x13: value = Z || !(NaN || N); break; // Greater Than or Equal - case 0x14: value = N && !(NaN || Z); break; // Less Than - case 0x15: value = Z || (N && !NaN); break; // Less Than or Equal - case 0x16: value = !(NaN || Z); break; // Greater or Less Than - case 0x17: value = !NaN; break; // Greater, Less or Equal - case 0x18: value = NaN; break; // Not Greater, Less or Equal - case 0x19: value = NaN || Z; break; // Not Greater or Less Than - case 0x1a: value = NaN || !(N || Z); break; // Not Less Than or Equal - case 0x1b: value = NaN || Z || !N; break; // Not Less Than - case 0x1c: value = NaN || (N && !Z); break; // Not Greater Than or Equal -// case 0x1c: value = !Z && (NaN || N); break; // Not Greater Than or Equal - case 0x1d: value = NaN || Z || N; break; // Not Greater Than - case 0x1e: value = !Z; break; // Signaling Not Equal - case 0x1f: value = 1; break; // Signaling True - default: value = -1; - } - fpcond_truth_table[m68k_fpcond][host_fpcond] = value; - } - } -} - -#endif diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h deleted file mode 100644 index 5983e15ee..000000000 --- a/BasiliskII/src/uae_cpu/fpu/flags.h +++ /dev/null @@ -1,217 +0,0 @@ -/* - * fpu/flags.h - Floating-point flags - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_FLAGS_H -#define FPU_FLAGS_H - -/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* Defaults to generic flags */ -#define FPU_USE_GENERIC_FLAGS - -/* -------------------------------------------------------------------------- */ -/* --- Selection of floating-point flags handling mode --- */ -/* -------------------------------------------------------------------------- */ - -/* Optimized i386 fpu core must use native flags */ -#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_FLAGS -# define FPU_USE_X86_FLAGS -#endif - -/* Old UAE FPU core can use native flags */ -#if defined(FPU_UAE) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_FLAGS -# define FPU_USE_X86_FLAGS -#endif - -/* IEEE-based implementation must use lazy flag evaluation */ -#if defined(FPU_IEEE) -# undef FPU_USE_GENERIC_FLAGS -# define FPU_USE_LAZY_FLAGS -#endif - -#ifdef FPU_IMPLEMENTATION - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 Floating-Point Flags --- */ -/* -------------------------------------------------------------------------- */ - -/* FPU_X86 has its own set of lookup functions */ - -#ifdef FPU_USE_X86_FLAGS - -#define FPU_USE_NATIVE_FLAGS - -#define NATIVE_FFLAG_NEGATIVE 0x0200 -#define NATIVE_FFLAG_ZERO 0x4000 -#define NATIVE_FFLAG_INFINITY 0x0500 -#define NATIVE_FFLAG_NAN 0x0100 - -/* Translation tables between native and m68k floating-point flags */ -PRIVATE uae_u32 to_m68k_fpcond[0x48]; -PRIVATE uae_u32 to_host_fpcond[0x10]; - -/* Truth table for floating-point condition codes */ -PRIVATE uae_u32 fpcond_truth_table[32][8]; // 32 m68k conditions x 8 host condition codes - -/* Initialization */ -PUBLIC void FFPU fpu_init_native_fflags(void); - -#ifdef FPU_UAE - -/* Native to m68k floating-point condition codes */ -PRIVATE inline uae_u32 FFPU get_fpccr(void) - { return to_m68k_fpcond[(FPU fpsr.condition_codes >> 8) & 0x47]; } - -/* M68k to native floating-point condition codes */ -PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) - /* Precondition: new_fpcond is only valid for floating-point condition codes */ - { FPU fpsr.condition_codes = to_host_fpcond[new_fpcond >> 24]; } - -/* Make FPSR according to the value passed in argument */ -PRIVATE inline void FFPU make_fpsr(fpu_register const & r) - { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=r" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } - -/* Return the corresponding ID of the current floating-point condition codes */ -/* NOTE: only valid for evaluation of a condition */ -PRIVATE inline int FFPU host_fpcond_id(void) - { return ((FPU fpsr.condition_codes >> 12) & 4) | ((FPU fpsr.condition_codes >> 8) & 3); } - -/* Return true if the floating-point condition is satisfied */ -PRIVATE inline bool FFPU fpcctrue(int condition) - { return fpcond_truth_table[condition][host_fpcond_id()]; } - -#endif /* FPU_UAE */ - -/* Return the address of the floating-point condition codes truth table */ -static inline uae_u8 * const FFPU address_of_fpcond_truth_table(void) - { return ((uae_u8*)&fpcond_truth_table[0][0]); } - -#endif /* FPU_X86_USE_NATIVE_FLAGS */ - -/* -------------------------------------------------------------------------- */ -/* --- Use Original M68K FPU Mappings --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_GENERIC_FLAGS - -#undef FPU_USE_NATIVE_FLAGS - -#define NATIVE_FFLAG_NEGATIVE 0x08000000 -#define NATIVE_FFLAG_ZERO 0x04000000 -#define NATIVE_FFLAG_INFINITY 0x02000000 -#define NATIVE_FFLAG_NAN 0x01000000 - -/* Initialization - NONE */ -PRIVATE inline void FFPU fpu_init_native_fflags(void) - { } - -/* Native to m68k floating-point condition codes - SELF */ -PRIVATE inline uae_u32 FFPU get_fpccr(void) - { return FPU fpsr.condition_codes; } - -/* M68k to native floating-point condition codes - SELF */ -PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) - { FPU fpsr.condition_codes = new_fpcond; } - -#endif /* FPU_USE_GENERIC_FLAGS */ - -/* -------------------------------------------------------------------------- */ -/* --- Use Lazy Flags Evaluation --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_LAZY_FLAGS - -#undef FPU_USE_NATIVE_FLAGS - -#define NATIVE_FFLAG_NEGATIVE 0x08000000 -#define NATIVE_FFLAG_ZERO 0x04000000 -#define NATIVE_FFLAG_INFINITY 0x02000000 -#define NATIVE_FFLAG_NAN 0x01000000 - -/* Initialization - NONE */ -PRIVATE inline void FFPU fpu_init_native_fflags(void) - { } - -/* Native to m68k floating-point condition codes - SELF */ -PRIVATE inline uae_u32 FFPU get_fpccr(void) -{ - uae_u32 fpccr = 0; - if (isnan(FPU result)) - fpccr |= FPSR_CCB_NAN; - else if (FPU result == 0.0) - fpccr |= FPSR_CCB_ZERO; - else if (FPU result < 0.0) - fpccr |= FPSR_CCB_NEGATIVE; - if (isinf(FPU result)) - fpccr |= FPSR_CCB_INFINITY; - return fpccr; -} - -/* M68k to native floating-point condition codes - SELF */ -PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) -{ - if (new_fpcond & FPSR_CCB_NAN) - make_nan(FPU result); - else if (new_fpcond & FPSR_CCB_ZERO) - FPU result = 0.0; - else if (new_fpcond & FPSR_CCB_NEGATIVE) - FPU result = -1.0; - else - FPU result = +1.0; - /* gb-- where is Infinity ? */ -} - -/* Make FPSR according to the value passed in argument */ -PRIVATE inline void FFPU make_fpsr(fpu_register const & r) - { FPU result = r; } - -#endif /* FPU_USE_LAZY_FLAGS */ - -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Common methods --- */ -/* -------------------------------------------------------------------------- */ - -/* Return the address of the floating-point condition codes register */ -static inline uae_u32 * const FFPU address_of_fpccr(void) - { return ((uae_u32 *)& FPU fpsr.condition_codes); } - -#endif /* FPU_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu/fpu/fpu.h deleted file mode 100644 index 3940a75b8..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu.h +++ /dev/null @@ -1,49 +0,0 @@ -/* - * fpu/fpu.h - public header - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_PUBLIC_HEADER_H -#define FPU_PUBLIC_HEADER_H - -#ifndef FPU_DEBUG -#define FPU_DEBUG 0 -#endif - -#if FPU_DEBUG -#define fpu_debug(args) printf args; -#define FPU_DUMP_REGISTERS 0 -#define FPU_DUMP_FIRST_BYTES 0 -#else -#define fpu_debug(args) ; -#undef FPU_DUMP_REGISTERS -#undef FPU_DUMP_FIRST_BYTES -#endif - -#include "sysdeps.h" -#include "fpu/types.h" -#include "fpu/core.h" - -#endif /* FPU_PUBLIC_HEADER_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp deleted file mode 100644 index ffc784a5b..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp +++ /dev/null @@ -1,2369 +0,0 @@ -/* - * fpu/fpu_uae.cpp - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 - */ - -/* - * Following fixes by Lauri Pesonen, July 1999: - * - * FMOVEM list handling: - * The lookup tables did not work correctly, rewritten. - * FINT: - * (int) cast does not work, fixed. - * Further, now honors the FPU fpcr rounding modes. - * FINTRZ: - * (int) cast cannot be used, fixed. - * FGETEXP: - * Input argument value 0 returned erroneous value. - * FMOD: - * (int) cast cannot be used. Replaced by proper rounding. - * Quotient byte handling was missing. - * FREM: - * (int) cast cannot be used. Replaced by proper rounding. - * Quotient byte handling was missing. - * FSCALE: - * Input argument value 0 was not handled correctly. - * FMOVEM Control Registers to/from address FPU registers An: - * A bug caused the code never been called. - * FMOVEM Control Registers pre-decrement: - * Moving of control regs from memory to FPP was not handled properly, - * if not all of the three FPU registers were moved. - * Condition code "Not Greater Than or Equal": - * Returned erroneous value. - * FSINCOS: - * Cosine must be loaded first if same register. - * FMOVECR: - * Status register was not updated (yes, this affects it). - * FMOVE -> reg: - * Status register was not updated (yes, this affects it). - * FMOVE reg -> reg: - * Status register was not updated. - * FDBcc: - * The loop termination condition was wrong. - * Possible leak from int16 to int32 fixed. - * get_fp_value: - * Immediate addressing mode && Operation Length == Byte -> - * Use the low-order byte of the extension word. - * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was - * written to them. - * - * Other: - * - Optimized single/double/extended to/from conversion functions. - * Huge speed boost, but not (necessarily) portable to other systems. - * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 - * - Optimized versions of FSCALE, FGETEXP, FGETMAN - * - Conversion routines now handle NaN and infinity better. - * - Some constants precalculated. Not all compilers can optimize the - * expressions previously used. - * - * TODO: - * - Floating point exceptions. - * - More Infinity/NaN/overflow/underflow checking. - * - FPU instruction_address (only needed when exceptions are implemented) - * - Should be written in assembly to support long doubles. - * - Precision rounding single/double - */ - -#include "sysdeps.h" -#include -#include -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "main.h" -#define FPU_IMPLEMENTATION -#include "fpu/fpu.h" -#include "fpu/fpu_uae.h" - -/* Global FPU context */ -fpu_t fpu; - -/* -------------------------------------------------------------------------- */ -/* --- Native Support --- */ -/* -------------------------------------------------------------------------- */ - -#include "fpu/flags.h" -#include "fpu/exceptions.h" -#include "fpu/rounding.h" -#include "fpu/impl.h" - -#include "fpu/flags.cpp" -#include "fpu/exceptions.cpp" - -/* -------------------------------------------------------------------------- */ -/* --- Scopes Definition --- */ -/* -------------------------------------------------------------------------- */ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- Debugging --- */ -/* -------------------------------------------------------------------------- */ - -PUBLIC void FFPU fpu_dump_registers(void) -{ - for (int i = 0; i < 8; i++){ - printf ("FP%d: %g ", i, fpu_get_register(i)); - if ((i & 3) == 3) - printf ("\n"); - } -} - -PUBLIC void FFPU fpu_dump_flags(void) -{ - printf ("N=%d Z=%d I=%d NAN=%d\n", - (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, - (get_fpsr() & FPSR_CCB_ZERO)!= 0, - (get_fpsr() & FPSR_CCB_INFINITY) != 0, - (get_fpsr() & FPSR_CCB_NAN) != 0); -} - -/* single : S 8*E 23*F */ -/* double : S 11*E 52*F */ -/* extended : S 15*E 64*F */ -/* E = 0 & F = 0 -> 0 */ -/* E = MAX & F = 0 -> Infin */ -/* E = MAX & F # 0 -> NotANumber */ -/* E = biased by 127 (single) ,1023 (double) ,16383 (extended) */ - -#if FPU_DEBUG - -PUBLIC void FFPU dump_registers(const char * str) -{ - char temp_str[512]; - - sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", - str, - get_register(0), get_register(1), get_register(2), get_register(3), - get_register(4), get_register(5), get_register(6), get_register(7) ); - - fpu_debug((temp_str)); -} - -PUBLIC void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) -{ - char temp_buf1[256], temp_buf2[10]; - int bytes = sizeof(temp_buf1)/3-1-3; - if (actual < bytes) - bytes = actual; - - temp_buf1[0] = 0; - for (int i = 0; i < bytes; i++) { - sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); - strcat(temp_buf1, temp_buf2); - } - - strcat(temp_buf1, "\n"); - fpu_debug((temp_buf1)); -} - -#else - -PUBLIC void FFPU dump_registers(const char *) -{ -} - -PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) -{ -} - -#endif - -PRIVATE inline fpu_register FFPU round_to_zero(fpu_register const & x) -{ - return (x < 0.0 ? ceil(x) : floor(x)); -} - -PRIVATE inline fpu_register FFPU round_to_nearest(fpu_register const & x) -{ - return floor(x + 0.5); -} - -#if FPU_HAVE_IEEE_DOUBLE - -#ifndef HAVE_ISNAN -#define isnan(x) do_isnan((x)) -#endif - -PRIVATE inline bool FFPU do_isnan(fpu_register const & r) -{ - uae_u32 * p = (uae_u32 *)&r; - if ((p[FHI] & 0x7FF00000) == 0x7FF00000) { - // logical or is faster here. - if ((p[FHI] & 0x000FFFFF) || p[FLO]) { - return true; - } - } - return false; -} - -#ifndef HAVE_ISINF -#define isinf(x) do_isinf((x)) -#endif - -PRIVATE inline bool FFPU do_isinf(fpu_register const & r) -{ - uae_u32 * p = (uae_u32 *)&r; - if (((p[FHI] & 0x7FF00000) == 0x7FF00000) && p[FLO] == 0) { - return true; - } - return false; -} - -#ifndef HAVE_ISNEG -#define isneg(x) do_isneg((x)) -#endif - -PRIVATE inline bool FFPU do_isneg(fpu_register const & r) -{ - uae_u32 * p = (uae_u32 *)&r; - return ((p[FHI] & 0x80000000) != 0); -} - -#ifndef HAVE_ISZERO -#define iszero(x) do_iszero((x)) -#endif - -PRIVATE inline bool FFPU do_iszero(fpu_register const & r) -{ - uae_u32 * p = (uae_u32 *)&r; - return (((p[FHI] & 0x7FF00000) == 0) && p[FLO] == 0); -} - -// May be optimized for particular processors -#ifndef FPU_USE_NATIVE_FLAGS -PRIVATE inline void FFPU make_fpsr(fpu_register const & r) -{ - FPU fpsr.condition_codes - = (iszero(r) ? NATIVE_FFLAG_ZERO : 0) - | (isneg(r) ? NATIVE_FFLAG_NEGATIVE : 0) - | (isnan(r) ? NATIVE_FFLAG_NAN : 0) - | (isinf(r) ? NATIVE_FFLAG_INFINITY : 0) - ; -} -#endif - -PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) -{ - fl_dest.negative = isneg(r); - fl_dest.zero = iszero(r); - fl_dest.infinity = isinf(r); - fl_dest.nan = isnan(r); - fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; -} - -PRIVATE inline void FFPU get_source_flags(fpu_register const & r) -{ - fl_source.negative = isneg(r); - fl_source.zero = iszero(r); - fl_source.infinity = isinf(r); - fl_source.nan = isnan(r); - fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; -} - -PRIVATE inline void FFPU make_nan(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0xffffffff; - p[FHI] = 0x7fffffff; -} - -PRIVATE inline void FFPU make_zero_positive(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = p[FHI] = 0; -} - -PRIVATE inline void FFPU make_zero_negative(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0x80000000; -} - -PRIVATE inline void FFPU make_inf_positive(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0x7FF00000; -} - -PRIVATE inline void FFPU make_inf_negative(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0xFFF00000; -} - -PRIVATE inline void FFPU fast_scale(fpu_register & r, int add) -{ - uae_u32 * const p = (uae_u32 *)&r; - int exp = (p[FHI] & 0x7FF00000) >> 20; - // TODO: overflow flags - exp += add; - if(exp >= 2047) { - make_inf_positive(r); - } else if(exp < 0) { - // keep sign (+/- 0) - p[FHI] &= 0x80000000; - } else { - p[FHI] = (p[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); - } -} - -PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - int exp = (p[FHI] & 0x7FF00000) >> 20; - return( exp - 1023 ); -} - -// Normalize to range 1..2 -PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FHI] = (p[FHI] & 0x800FFFFF) | 0x3FF00000; -} - -// The sign of the quotient is the exclusive-OR of the sign bits -// of the source and destination operands. -PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) -{ - uae_u32 * const a = (uae_u32 *)&ra; - uae_u32 * const b = (uae_u32 *)&rb; - return (((a[FHI] ^ b[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); -} - -// Quotient Byte is loaded with the sign and least significant -// seven bits of the quotient. -PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) -{ - uae_u32 lsb = (uae_u32)fabs(quotient) & 0x7f; - FPU fpsr.quotient = sign | (lsb << 16); -} - -// to_single -PRIVATE inline fpu_register FFPU make_single(uae_u32 value) -{ - if ((value & 0x7fffffff) == 0) - return (0.0); - - fpu_register result; - uae_u32 * p = (uae_u32 *)&result; - - uae_u32 sign = (value & 0x80000000); - uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - - p[FLO] = value << 29; - p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); - - fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); - - return(result); -} - -// from_single -PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) -{ - if (src == 0.0) - return 0; - - uae_u32 result; - uae_u32 *p = (uae_u32 *)&src; - - uae_u32 sign = (p[FHI] & 0x80000000); - uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; - - if(exp + 127 < 1023) { - exp = 0; - } else if(exp > 1023 + 127) { - exp = 255; - } else { - exp = exp + 127 - 1023; - } - - result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); - - fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); - - return (result); -} - -// to_exten -PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) - return 0.0; - - fpu_register result; - uae_u32 *p = (uae_u32 *)&result; - - uae_u32 sign = wrd1 & 0x80000000; - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - - // The explicit integer bit is not set, must normalize. - if((wrd2 & 0x80000000) == 0) { - fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); - if( wrd2 | wrd3 ) { - // mantissa, not fraction. - uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; - while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { - man <<= 1; - exp--; - } - wrd2 = (uae_u32)( man >> 32 ); - wrd3 = (uae_u32)( man & 0xFFFFFFFF ); - } else { - if(exp == 0x7FFF) { - // Infinity. - } else { - // Zero - exp = 16383 - 1023; - } - } - } - - if(exp < 16383 - 1023) { - // should set underflow. - exp = 0; - } else if(exp > 16383 + 1023) { - // should set overflow. - exp = 2047; - } else { - exp = exp + 1023 - 16383; - } - - // drop the explicit integer bit. - p[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); - - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); - - return(result); -} - -/* - Would be so much easier with full size floats :( - ... this is so vague. -*/ -// make_extended_no_normalize -PRIVATE inline void FFPU make_extended_no_normalize( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result -) -{ - // Is it zero? - if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { - make_zero_positive(result); - return; - } - - // Is it NaN? - if( (wrd1 & 0x7FFF0000) == 0x7FFF0000 ) { - if( (wrd1 & 0x0000FFFF) || wrd2 || wrd3 ) { - make_nan(result); - return; - } - } - - uae_u32 sign = wrd1 & 0x80000000; - uae_u32 exp = (wrd1 >> 16) & 0x7fff; - - if(exp < 16383 - 1023) { - // should set underflow. - exp = 0; - } else if(exp > 16383 + 1023) { - // should set overflow. - exp = 2047; - } else { - exp = exp + 1023 - 16383; - } - - // drop the explicit integer bit. - uae_u32 *p = (uae_u32 *)&result; - p[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); - - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(float)(*(double *)p))); -} - -// from_exten -PRIVATE inline void FFPU extract_extended(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -) -{ - if (src == 0.0) { - *wrd1 = *wrd2 = *wrd3 = 0; - return; - } - - uae_u32 *p = (uae_u32 *)&src; - - fpu_debug(("extract_extended (%X,%X)\n",p[FLO],p[FHI])); - - uae_u32 sign = p[FHI] & 0x80000000; - - uae_u32 exp = ((p[FHI] >> 20) & 0x7ff); - // Check for maximum - if(exp == 0x7FF) { - exp = 0x7FFF; - } else { - exp += 16383 - 1023; - } - - *wrd1 = sign | (exp << 16); - // always set the explicit integer bit. - *wrd2 = 0x80000000 | ((p[FHI] & 0x000FFFFF) << 11) | ((p[FLO] & 0xFFE00000) >> 21); - *wrd3 = p[FLO] << 11; - - fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); -} - -// to_double -PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) -{ - if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) - return 0.0; - - fpu_register result; - uae_u32 *p = (uae_u32 *)&result; - p[FLO] = wrd2; - p[FHI] = wrd1; - - fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); - - return(result); -} - -// from_double -PRIVATE inline void FFPU extract_double(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2 -) -{ -/* - if (src == 0.0) { - *wrd1 = *wrd2 = 0; - return; - } -*/ - uae_u32 *p = (uae_u32 *)&src; - *wrd2 = p[FLO]; - *wrd1 = p[FHI]; - - fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); -} - -#else // !FPU_HAVE_IEEE_DOUBLE - -#ifndef FPU_USE_NATIVE_FLAGS -PRIVATE inline void FFPU make_fpsr(fpu_register const & r) -{ - FPU fpsr.condition_codes - = ((r == 0.0) ? NATIVE_FFLAG_ZERO : 0) - | ((r < 0.0) ? NATIVE_FFLAG_NEGATIVE : 0) - ; -} -#endif - -// make_single -PRIVATE inline fpu_register FFPU make_single(uae_u32 value) -{ - if ((value & 0x7fffffff) == 0) - return (0.0); - - fpu_register frac = (fpu_register) ((value & 0x7fffff) | 0x800000) / 8388608.0; - if (value & 0x80000000) - frac = -frac; - - fpu_register result = ldexp (frac, (int)((value >> 23) & 0xff) - 127); - fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); - - return (result); -} - -// extract_single -PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) -{ - int expon; - uae_u32 tmp, result; - fpu_register frac; -#if FPU_DEBUG - fpu_register src0 = src; -#endif - - if (src == 0.0) - return 0; - if (src < 0) { - tmp = 0x80000000; - src = -src; - } else { - tmp = 0; - } - frac = frexp (src, &expon); - frac += 0.5 / 16777216.0; - if (frac >= 1.0) { - frac /= 2.0; - expon++; - } - result = tmp | (((expon + 127 - 1) & 0xff) << 23) | (((int) (frac * 16777216.0)) & 0x7fffff); - - // fpu_debug(("extract_single (%.04f) = %X\n",(float)src0,result)); - - return (result); -} - -// to exten -PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - fpu_register frac, result; - - if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) - return 0.0; - frac = (fpu_register) wrd2 / 2147483648.0 + - (fpu_register) wrd3 / 9223372036854775808.0; - if (wrd1 & 0x80000000) - frac = -frac; - result = ldexp (frac, (int)((wrd1 >> 16) & 0x7fff) - 16383); - - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); - - return result; -} - -// extract_extended -PRIVATE inline void FFPU extract_extended(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) -{ - int expon; - fpu_register frac; -#if FPU_DEBUG - fpu_register src0 = src; -#endif - - if (src == 0.0) { - *wrd1 = 0; - *wrd2 = 0; - *wrd3 = 0; - return; - } - if (src < 0) { - *wrd1 = 0x80000000; - src = -src; - } else { - *wrd1 = 0; - } - frac = frexp (src, &expon); - frac += 0.5 / 18446744073709551616.0; - if (frac >= 1.0) { - frac /= 2.0; - expon++; - } - *wrd1 |= (((expon + 16383 - 1) & 0x7fff) << 16); - *wrd2 = (uae_u32) (frac * 4294967296.0); - *wrd3 = (uae_u32) (frac * 18446744073709551616.0 - *wrd2 * 4294967296.0); - - // fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(float)src0,*wrd1,*wrd2,*wrd3)); -} - -// make_double -PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) -{ - if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) - return 0.0; - - fpu_register frac = - (fpu_register) ((wrd1 & 0xfffff) | 0x100000) / 1048576.0 + - (fpu_register) wrd2 / 4503599627370496.0; - - if (wrd1 & 0x80000000) - frac = -frac; - - fpu_register result = ldexp (frac, (int)((wrd1 >> 20) & 0x7ff) - 1023); - fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); - - return result; -} - -// extract_double -PRIVATE inline void FFPU extract_double(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2) -{ - int expon; - int tmp; - fpu_register frac frac; -#if FPU_DEBUG - fpu_register src0 = src; -#endif - - if (src == 0.0) { - *wrd1 = 0; - *wrd2 = 0; - return; - } - if (src < 0) { - *wrd1 = 0x80000000; - src = -src; - } else { - *wrd1 = 0; - } - frac = frexp (src, &expon); - frac += 0.5 / 9007199254740992.0; - if (frac >= 1.0) { - frac /= 2.0; - expon++; - } - tmp = (uae_u32) (frac * 2097152.0); - *wrd1 |= (((expon + 1023 - 1) & 0x7ff) << 20) | (tmp & 0xfffff); - *wrd2 = (uae_u32) (frac * 9007199254740992.0 - tmp * 4294967296.0); - - // fpu_debug(("extract_double (%.04f) = %X,%X\n",(float)src0,*wrd1,*wrd2)); -} - -#endif - -// to_pack -PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) -{ - fpu_double d; - char *cp; - char str[100]; - - cp = str; - if (wrd1 & 0x80000000) - *cp++ = '-'; - *cp++ = (char)((wrd1 & 0xf) + '0'); - *cp++ = '.'; - *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); - *cp++ = 'E'; - if (wrd1 & 0x40000000) - *cp++ = '-'; - *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); - *cp = 0; - sscanf(str, "%le", &d); - - fpu_debug(("make_packed str = %s\n",str)); - - fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); - return d; -} - -// from_pack -PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) -{ - int i; - int t; - char *cp; - char str[100]; - - sprintf(str, "%.16e", src); - - fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); - - cp = str; - *wrd1 = *wrd2 = *wrd3 = 0; - if (*cp == '-') { - cp++; - *wrd1 = 0x80000000; - } - if (*cp == '+') - cp++; - *wrd1 |= (*cp++ - '0'); - if (*cp == '.') - cp++; - for (i = 0; i < 8; i++) { - *wrd2 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd2 |= *cp++ - '0'; - } - for (i = 0; i < 8; i++) { - *wrd3 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd3 |= *cp++ - '0'; - } - if (*cp == 'e' || *cp == 'E') { - cp++; - if (*cp == '-') { - cp++; - *wrd1 |= 0x40000000; - } - if (*cp == '+') - cp++; - t = 0; - for (i = 0; i < 3; i++) { - if (*cp >= '0' && *cp <= '9') - t = (t << 4) | (*cp++ - '0'); - } - *wrd1 |= t << 16; - } - - fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); -} - -PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) -{ - uaecptr tmppc; - uae_u16 tmp; - int size; - int mode; - int reg; - uae_u32 ad = 0; - static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); - // dump_first_bytes( regs.pc_p-4, 16 ); - - if ((extra & 0x4000) == 0) { - src = FPU registers[(extra >> 10) & 7]; - return 1; - } - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - - fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); - - switch (mode) { - case 0: - switch (size) { - case 6: - src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); - break; - case 4: - src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); - break; - case 0: - src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); - break; - case 1: - src = make_single(m68k_dreg (regs, reg)); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - // Immediate addressing mode && Operation Length == Byte -> - // Use the low-order byte of the extension word. - if(size == 6) ad++; - break; - default: - return 0; - } - } - - fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); - fpu_debug(("get_fp_value ad=%X\n",ad)); - fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - dump_first_bytes( get_real_address(ad)-64, 64 ); - dump_first_bytes( get_real_address(ad), 64 ); - - switch (size) { - case 0: - src = (fpu_register) (uae_s32) get_long (ad); - break; - case 1: - src = make_single(get_long (ad)); - break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - src = make_extended(wrd1, wrd2, wrd3); - break; - } - case 3: { - uae_u32 wrd1, wrd2, wrd3; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - src = make_packed(wrd1, wrd2, wrd3); - break; - } - case 4: - src = (fpu_register) (uae_s16) get_word(ad); - break; - case 5: { - uae_u32 wrd1, wrd2; - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - src = make_double(wrd1, wrd2); - break; - } - case 6: - src = (fpu_register) (uae_s8) get_byte(ad); - break; - default: - return 0; - } - - // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); - return 1; -} - -PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) -{ - uae_u16 tmp; - uaecptr tmppc; - int size; - int mode; - int reg; - uae_u32 ad; - static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); - - if ((extra & 0x4000) == 0) { - int dest_reg = (extra >> 10) & 7; - FPU registers[dest_reg] = value; - make_fpsr(FPU registers[dest_reg]); - return 1; - } - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - ad = 0xffffffff; - switch (mode) { - case 0: - switch (size) { - case 6: - m68k_dreg (regs, reg) - = (((uae_s32) value & 0xff) - | (m68k_dreg (regs, reg) & ~0xff)); - break; - case 4: - m68k_dreg (regs, reg) - = (((uae_s32) value & 0xffff) - | (m68k_dreg (regs, reg) & ~0xffff)); - break; - case 0: - m68k_dreg (regs, reg) = (uae_s32) value; - break; - case 1: - m68k_dreg (regs, reg) = extract_single(value); - break; - default: - return 0; - } - return 1; - case 1: - return 0; - case 2: - ad = m68k_areg (regs, reg); - break; - case 3: - ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); - break; - case 5: - ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - ad = next_ilong(); - break; - case 2: - ad = m68k_getpc (); - ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - ad = m68k_getpc (); - m68k_setpc (ad + sz2[size]); - break; - default: - return 0; - } - } - switch (size) { - case 0: - put_long (ad, (uae_s32) value); - break; - case 1: - put_long (ad, extract_single(value)); - break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - extract_extended(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - break; - } - case 3: { - uae_u32 wrd1, wrd2, wrd3; - extract_packed(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - break; - } - case 4: - put_word(ad, (uae_s16) value); - break; - case 5: { - uae_u32 wrd1, wrd2; - extract_double(value, &wrd1, &wrd2); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - break; - } - case 6: - put_byte(ad, (uae_s8) value); - break; - default: - return 0; - } - return 1; -} - -PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) -{ - uae_u16 tmp; - uaecptr tmppc; - int mode; - int reg; - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - switch (mode) { - case 0: - case 1: - return 0; - case 2: - *ad = m68k_areg (regs, reg); - break; - case 3: - *ad = m68k_areg (regs, reg); - break; - case 4: - *ad = m68k_areg (regs, reg); - break; - case 5: - *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); - break; - case 6: - *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) { - case 0: - *ad = (uae_s32) (uae_s16) next_iword(); - break; - case 1: - *ad = next_ilong(); - break; - case 2: - *ad = m68k_getpc (); - *ad += (uae_s32) (uae_s16) next_iword(); - break; - case 3: - tmppc = m68k_getpc (); - tmp = (uae_u16)next_iword(); - *ad = get_disp_ea_020 (tmppc, tmp); - break; - default: - return 0; - } - } - return 1; -} - -#if FPU_DEBUG -# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) -#else -# define CONDRET(s,x) return (x) -#endif - -PRIVATE inline int FFPU fpp_cond(int condition) -{ -#if 1 -# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE) -# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO) -# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) == NATIVE_FFLAG_INFINITY) -# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN) -#else -# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) != 0) -# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) != 0) -# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) != 0) -# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) != 0) -#endif - -#if 0 - return fpcctrue(condition); -#else - switch (condition) { - case 0x00: CONDRET("False",0); - case 0x01: CONDRET("Equal",Z); - case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); - case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); - case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); - case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); - case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); - case 0x07: CONDRET("Ordered",!NaN); - case 0x08: CONDRET("Unordered",NaN); - case 0x09: CONDRET("Unordered or Equal",NaN || Z); - case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); - case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); - case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); - case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); - case 0x0e: CONDRET("Not Equal",!Z); - case 0x0f: CONDRET("True",1); - case 0x10: CONDRET("Signaling False",0); - case 0x11: CONDRET("Signaling Equal",Z); - case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); - case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); - case 0x14: CONDRET("Less Than",N && !(NaN || Z)); - case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); - case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); - case 0x17: CONDRET("Greater, Less or Equal",!NaN); - case 0x18: CONDRET("Not Greater, Less or Equal",NaN); - case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); - case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); - case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); - case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); -// case 0x1c: CONDRET("Not Greater Than or Equal",!Z && (NaN || N)); - case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); - case 0x1e: CONDRET("Signaling Not Equal",!Z); - case 0x1f: CONDRET("Signaling True",1); - default: CONDRET("",-1); - } -#endif - -# undef N -# undef Z -# undef I -# undef NaN -} - -void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) -{ - fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - uaecptr pc = (uae_u32) m68k_getpc (); - uae_s32 disp = (uae_s32) (uae_s16) next_iword(); - int cc = fpp_cond(extra & 0x3f); - if (cc == -1) { - m68k_setpc (pc - 4); - op_illg (opcode); - } else if (!cc) { - int reg = opcode & 0x7; - - // this may have leaked. - /* - m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) - | ((m68k_dreg (regs, reg) - 1) & 0xffff)); - */ - m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) - | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); - - - // condition reversed. - // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) - if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) - m68k_setpc (pc + disp); - } -} - -void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) -{ - fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - - uae_u32 ad; - int cc = fpp_cond(extra & 0x3f); - if (cc == -1) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - else if ((opcode & 0x38) == 0) { - m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | - (cc ? 0xff : 0x00); - } - else if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - else - put_byte(ad, cc ? 0xff : 0x00); -} - -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) -{ - fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); - - int cc = fpp_cond(opcode & 0x3f); - if (cc == -1) { - m68k_setpc (oldpc); - op_illg (opcode); - } - if (cc) - Exception(7, oldpc - 2); -} - -// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) -void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) -{ - fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); - - int cc = fpp_cond(opcode & 0x3f); - if (cc == -1) { - m68k_setpc (pc); - op_illg (opcode); - } - else if (cc) { - if ((opcode & 0x40) == 0) - extra = (uae_s32) (uae_s16) extra; - m68k_setpc (pc + extra); - } -} - -// FSAVE has no post-increment -// 0x1f180000 == IDLE state frame, coprocessor version number 1F -void FFPU fpuop_save(uae_u32 opcode) -{ - fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); - - uae_u32 ad; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - int i; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - if (CPUType == 4) { - // Put 4 byte 68040 IDLE frame. - if (incr < 0) { - ad -= 4; - put_long (ad, 0x41000000); - } - else { - put_long (ad, 0x41000000); - ad += 4; - } - } else { - // Put 28 byte 68881 IDLE frame. - if (incr < 0) { - fpu_debug(("fsave_opp pre-decrement\n")); - ad -= 4; - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - for (i = 0; i < 5; i++) { - ad -= 4; - put_long (ad, 0x00000000); - } - ad -= 4; - put_long (ad, 0x1f180000); // IDLE, vers 1f - } - else { - put_long (ad, 0x1f180000); // IDLE, vers 1f - ad += 4; - for (i = 0; i < 5; i++) { - put_long (ad, 0x00000000); - ad += 4; - } - // What's this? Some BIU flags, or (incorrectly placed) command/condition? - put_long (ad, 0x70000000); - ad += 4; - } - } - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - fpu_debug(("PROBLEM: fsave_opp post-increment\n")); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; - fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); - } -} - -// FRESTORE has no pre-decrement -void FFPU fpuop_restore(uae_u32 opcode) -{ - fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); - - uae_u32 ad; - uae_u32 d; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - if (CPUType == 4) { - // 68040 - if (incr < 0) { - fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); - ad -= 44; - } - else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad -= 92; - } - } - } - else { - d = get_long (ad); - fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); - ad += 4; - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP - fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); - ad += 44; - } - else if ((d & 0x00ff0000) == 0x00600000) { // BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad += 92; - } - } - } - } - else { - // 68881 - if (incr < 0) { - fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); - // this may be wrong, but it's never called. - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { - if ((d & 0x00ff0000) == 0x00180000) - ad -= 6 * 4; - else if ((d & 0x00ff0000) == 0x00380000) - ad -= 14 * 4; - else if ((d & 0x00ff0000) == 0x00b40000) - ad -= 45 * 4; - } - } - else { - d = get_long (ad); - fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); - ad += 4; - if ((d & 0xff000000) != 0) { // Not a NULL frame? - if ((d & 0x00ff0000) == 0x00180000) { // IDLE - fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); - ad += 6 * 4; - } - else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? - ad += 14 * 4; - fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); - } - else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY - fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); - ad += 45 * 4; - } - } - } - } - if ((opcode & 0x38) == 0x18) { - m68k_areg (regs, opcode & 7) = ad; - fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); - } - if ((opcode & 0x38) == 0x20) { - m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 - fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); - } -} - -void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) -{ - int reg; - fpu_register src; - - fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, - m68k_getpc () - 4)); - - dump_registers( "START"); - - switch ((extra >> 13) & 0x7) { - case 3: - fpu_debug(("FMOVE -> \n")); - if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - dump_registers( "END "); - return; - case 4: - case 5: - if ((opcode & 0x38) == 0) { - if (extra & 0x2000) { // dr bit - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; - fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); - } - if (extra & 0x0800) { - m68k_dreg (regs, opcode & 7) = get_fpsr(); - fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); - } - if (extra & 0x0400) { - m68k_dreg (regs, opcode & 7) = FPU instruction_address; - fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); - } - } - else { - if (extra & 0x1000) { - set_fpcr( m68k_dreg (regs, opcode & 7) ); - fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( m68k_dreg (regs, opcode & 7) ); - fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = m68k_dreg (regs, opcode & 7); - fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); - } - } -// } else if ((opcode & 0x38) == 1) { - } - else if ((opcode & 0x38) == 8) { - if (extra & 0x2000) { // dr bit - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; - fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); - } - if (extra & 0x0800) { - m68k_areg (regs, opcode & 7) = get_fpsr(); - fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); - } - if (extra & 0x0400) { - m68k_areg (regs, opcode & 7) = FPU instruction_address; - fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); - } - } else { - if (extra & 0x1000) { - set_fpcr( m68k_areg (regs, opcode & 7) ); - fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( m68k_areg (regs, opcode & 7) ); - fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = m68k_areg (regs, opcode & 7); - fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); - } - } - } - else if ((opcode & 0x3f) == 0x3c) { - if ((extra & 0x2000) == 0) { - if (extra & 0x1000) { - set_fpcr( next_ilong() ); - fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); - } - if (extra & 0x0800) { - set_fpsr( next_ilong() ); - fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); - } - if (extra & 0x0400) { - FPU instruction_address = next_ilong(); - fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); - } - } - } - else if (extra & 0x2000) { - /* FMOVEM FPP->memory */ - uae_u32 ad; - int incr = 0; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - if ((opcode & 0x38) == 0x20) { - if (extra & 0x1000) - incr += 4; - if (extra & 0x0800) - incr += 4; - if (extra & 0x0400) - incr += 4; - } - ad -= incr; - if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - put_long (ad, get_fpcr() & 0xFFFF); - fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); - ad += 4; - } - if (extra & 0x0800) { - put_long (ad, get_fpsr()); - fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); - ad += 4; - } - if (extra & 0x0400) { - put_long (ad, FPU instruction_address); - fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); - ad += 4; - } - ad -= incr; - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - else { - /* FMOVEM memory->FPP */ - uae_u32 ad; - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - - // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; - int incr = 0; - if((opcode & 0x38) == 0x20) { - if (extra & 0x1000) - incr += 4; - if (extra & 0x0800) - incr += 4; - if (extra & 0x0400) - incr += 4; - ad = ad - incr; - } - - if (extra & 0x1000) { - set_fpcr( get_long (ad) ); - fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); - ad += 4; - } - if (extra & 0x0800) { - set_fpsr( get_long (ad) ); - fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); - ad += 4; - } - if (extra & 0x0400) { - FPU instruction_address = get_long (ad); - fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); - ad += 4; - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? -// m68k_areg (regs, opcode & 7) = ad - 12; - m68k_areg (regs, opcode & 7) = ad - incr; - } - dump_registers( "END "); - return; - case 6: - case 7: { - uae_u32 ad, list = 0; - int incr = 0; - if (extra & 0x2000) { - /* FMOVEM FPP->memory */ - fpu_debug(("FMOVEM FPP->memory\n")); - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 1: /* dynamic pred */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 3: /* dynamic postinc */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = 1; - break; - } - - if (incr < 0) { - for(reg=7; reg>=0; reg--) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); - ad -= 4; - put_long (ad, wrd3); - ad -= 4; - put_long (ad, wrd2); - ad -= 4; - put_long (ad, wrd1); - } - list <<= 1; - } - } - else { - for(reg=0; reg<8; reg++) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); - ad += 4; - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - else { - /* FMOVEM memory->FPP */ - fpu_debug(("FMOVEM memory->FPP\n")); - - if (get_fp_ad(opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); - list = extra & 0xff; - incr = -1; - break; - case 1: /* dynamic pred */ - fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 3: /* dynamic postinc */ - list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; - incr = 1; - break; - } - - /**/ - if (incr < 0) { - // not reached - for(reg=7; reg>=0; reg--) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - ad -= 4; - wrd3 = get_long (ad); - ad -= 4; - wrd2 = get_long (ad); - ad -= 4; - wrd1 = get_long (ad); - // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); - make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); - } - list <<= 1; - } - } - else { - for(reg=0; reg<8; reg++) { - uae_u32 wrd1, wrd2, wrd3; - if( list & 0x80 ) { - wrd1 = get_long (ad); - ad += 4; - wrd2 = get_long (ad); - ad += 4; - wrd3 = get_long (ad); - ad += 4; - // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); - make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); - } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) // post-increment? - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) // pre-decrement? - m68k_areg (regs, opcode & 7) = ad; - } - dump_registers( "END "); - return; - } - case 0: - case 2: - reg = (extra >> 7) & 7; - if ((extra & 0xfc00) == 0x5c00) { - fpu_debug(("FMOVECR memory->FPP\n")); - switch (extra & 0x7f) { - case 0x00: - // FPU registers[reg] = 4.0 * atan(1.0); - FPU registers[reg] = 3.1415926535897932384626433832795; - fpu_debug(("FP const: Pi\n")); - break; - case 0x0b: - // FPU registers[reg] = log10 (2.0); - FPU registers[reg] = 0.30102999566398119521373889472449; - fpu_debug(("FP const: Log 10 (2)\n")); - break; - case 0x0c: - // FPU registers[reg] = exp (1.0); - FPU registers[reg] = 2.7182818284590452353602874713527; - fpu_debug(("FP const: e\n")); - break; - case 0x0d: - // FPU registers[reg] = log (exp (1.0)) / log (2.0); - FPU registers[reg] = 1.4426950408889634073599246810019; - fpu_debug(("FP const: Log 2 (e)\n")); - break; - case 0x0e: - // FPU registers[reg] = log (exp (1.0)) / log (10.0); - FPU registers[reg] = 0.43429448190325182765112891891661; - fpu_debug(("FP const: Log 10 (e)\n")); - break; - case 0x0f: - FPU registers[reg] = 0.0; - fpu_debug(("FP const: zero\n")); - break; - case 0x30: - // FPU registers[reg] = log (2.0); - FPU registers[reg] = 0.69314718055994530941723212145818; - fpu_debug(("FP const: ln(2)\n")); - break; - case 0x31: - // FPU registers[reg] = log (10.0); - FPU registers[reg] = 2.3025850929940456840179914546844; - fpu_debug(("FP const: ln(10)\n")); - break; - case 0x32: - // ?? - FPU registers[reg] = 1.0e0; - fpu_debug(("FP const: 1.0e0\n")); - break; - case 0x33: - FPU registers[reg] = 1.0e1; - fpu_debug(("FP const: 1.0e1\n")); - break; - case 0x34: - FPU registers[reg] = 1.0e2; - fpu_debug(("FP const: 1.0e2\n")); - break; - case 0x35: - FPU registers[reg] = 1.0e4; - fpu_debug(("FP const: 1.0e4\n")); - break; - case 0x36: - FPU registers[reg] = 1.0e8; - fpu_debug(("FP const: 1.0e8\n")); - break; - case 0x37: - FPU registers[reg] = 1.0e16; - fpu_debug(("FP const: 1.0e16\n")); - break; - case 0x38: - FPU registers[reg] = 1.0e32; - fpu_debug(("FP const: 1.0e32\n")); - break; - case 0x39: - FPU registers[reg] = 1.0e64; - fpu_debug(("FP const: 1.0e64\n")); - break; - case 0x3a: - FPU registers[reg] = 1.0e128; - fpu_debug(("FP const: 1.0e128\n")); - break; - case 0x3b: - FPU registers[reg] = 1.0e256; - fpu_debug(("FP const: 1.0e256\n")); - break; -#if 0 - case 0x3c: - FPU registers[reg] = 1.0e512; - fpu_debug(("FP const: 1.0e512\n")); - break; - case 0x3d: - FPU registers[reg] = 1.0e1024; - fpu_debug(("FP const: 1.0e1024\n")); - break; - case 0x3e: - FPU registers[reg] = 1.0e2048; - fpu_debug(("FP const: 1.0e2048\n")); - break; - case 0x3f: - FPU registers[reg] = 1.0e4096; - fpu_debug(("FP const: 1.0e4096\n")); - break; -#endif - default: - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - break; - } - // these *do* affect the status reg - make_fpsr(FPU registers[reg]); - dump_registers( "END "); - return; - } - - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); - - switch (extra & 0x7f) { - case 0x00: /* FMOVE */ - fpu_debug(("FMOVE %.04f\n",(double)src)); - FPU registers[reg] = src; - // -> reg DOES affect the status reg - make_fpsr(FPU registers[reg]); - break; - case 0x01: /* FINT */ - fpu_debug(("FINT %.04f\n",(double)src)); - // FPU registers[reg] = (int) (src + 0.5); - // FIXME: use native rounding mode flags - switch (get_fpcr() & 0x30) { - case FPCR_ROUND_ZERO: - FPU registers[reg] = round_to_zero(src); - break; - case FPCR_ROUND_MINF: - FPU registers[reg] = floor(src); - break; - case FPCR_ROUND_NEAR: - FPU registers[reg] = round_to_nearest(src); - break; - case FPCR_ROUND_PINF: - FPU registers[reg] = ceil(src); - break; - } - make_fpsr(FPU registers[reg]); - break; - case 0x02: /* FSINH */ - fpu_debug(("FSINH %.04f\n",(double)src)); - FPU registers[reg] = sinh (src); - make_fpsr(FPU registers[reg]); - break; - case 0x03: /* FINTRZ */ - fpu_debug(("FINTRZ %.04f\n",(double)src)); - // FPU registers[reg] = (int) src; - FPU registers[reg] = round_to_zero(src); - make_fpsr(FPU registers[reg]); - break; - case 0x04: /* FSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x06: /* FLOGNP1 */ - fpu_debug(("FLOGNP1 %.04f\n",(double)src)); - FPU registers[reg] = log (src + 1.0); - make_fpsr(FPU registers[reg]); - break; - case 0x08: /* FETOXM1 */ - fpu_debug(("FETOXM1 %.04f\n",(double)src)); - FPU registers[reg] = exp (src) - 1.0; - make_fpsr(FPU registers[reg]); - break; - case 0x09: /* FTANH */ - fpu_debug(("FTANH %.04f\n",(double)src)); - FPU registers[reg] = tanh (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0a: /* FATAN */ - fpu_debug(("FATAN %.04f\n",(double)src)); - FPU registers[reg] = atan (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0c: /* FASIN */ - fpu_debug(("FASIN %.04f\n",(double)src)); - FPU registers[reg] = asin (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0d: /* FATANH */ - fpu_debug(("FATANH %.04f\n",(double)src)); -#if HAVE_ATANH - FPU registers[reg] = atanh (src); -#else - /* The BeBox doesn't have atanh, and it isn't in the HPUX libm either */ - FPU registers[reg] = log ((1 + src) / (1 - src)) / 2; -#endif - make_fpsr(FPU registers[reg]); - break; - case 0x0e: /* FSIN */ - fpu_debug(("FSIN %.04f\n",(double)src)); - FPU registers[reg] = sin (src); - make_fpsr(FPU registers[reg]); - break; - case 0x0f: /* FTAN */ - fpu_debug(("FTAN %.04f\n",(double)src)); - FPU registers[reg] = tan (src); - make_fpsr(FPU registers[reg]); - break; - case 0x10: /* FETOX */ - fpu_debug(("FETOX %.04f\n",(double)src)); - FPU registers[reg] = exp (src); - make_fpsr(FPU registers[reg]); - break; - case 0x11: /* FTWOTOX */ - fpu_debug(("FTWOTOX %.04f\n",(double)src)); - FPU registers[reg] = pow(2.0, src); - make_fpsr(FPU registers[reg]); - break; - case 0x12: /* FTENTOX */ - fpu_debug(("FTENTOX %.04f\n",(double)src)); - FPU registers[reg] = pow(10.0, src); - make_fpsr(FPU registers[reg]); - break; - case 0x14: /* FLOGN */ - fpu_debug(("FLOGN %.04f\n",(double)src)); - FPU registers[reg] = log (src); - make_fpsr(FPU registers[reg]); - break; - case 0x15: /* FLOG10 */ - fpu_debug(("FLOG10 %.04f\n",(double)src)); - FPU registers[reg] = log10 (src); - make_fpsr(FPU registers[reg]); - break; - case 0x16: /* FLOG2 */ - fpu_debug(("FLOG2 %.04f\n",(double)src)); - FPU registers[reg] = log (src) / log (2.0); - make_fpsr(FPU registers[reg]); - break; - case 0x18: /* FABS */ - case 0x58: /* single precision rounding */ - case 0x5C: /* double precision rounding */ - fpu_debug(("FABS %.04f\n",(double)src)); - FPU registers[reg] = src < 0 ? -src : src; - make_fpsr(FPU registers[reg]); - break; - case 0x19: /* FCOSH */ - fpu_debug(("FCOSH %.04f\n",(double)src)); - FPU registers[reg] = cosh(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1a: /* FNEG */ - fpu_debug(("FNEG %.04f\n",(double)src)); - FPU registers[reg] = -src; - make_fpsr(FPU registers[reg]); - break; - case 0x1c: /* FACOS */ - fpu_debug(("FACOS %.04f\n",(double)src)); - FPU registers[reg] = acos(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1d: /* FCOS */ - fpu_debug(("FCOS %.04f\n",(double)src)); - FPU registers[reg] = cos(src); - make_fpsr(FPU registers[reg]); - break; - case 0x1e: /* FGETEXP */ - fpu_debug(("FGETEXP %.04f\n",(double)src)); -#if FPU_HAVE_IEEE_DOUBLE - if( isinf(src) ) { - make_nan( FPU registers[reg] ); - } - else { - FPU registers[reg] = fast_fgetexp( src ); - } -#else - if(src == 0) { - FPU registers[reg] = (fpu_register)0; - } - else { - int expon; - frexp (src, &expon); - FPU registers[reg] = (fpu_register) (expon - 1); - } -#endif - make_fpsr(FPU registers[reg]); - break; - case 0x1f: /* FGETMAN */ - fpu_debug(("FGETMAN %.04f\n",(double)src)); -#if FPU_HAVE_IEEE_DOUBLE - if( src == 0 ) { - FPU registers[reg] = 0; - } - else if( isinf(src) ) { - make_nan( FPU registers[reg] ); - } - else { - FPU registers[reg] = src; - fast_remove_exponent( FPU registers[reg] ); - } -#else - { - int expon; - FPU registers[reg] = frexp (src, &expon) * 2.0; - } -#endif - make_fpsr(FPU registers[reg]); - break; - case 0x20: /* FDIV */ - fpu_debug(("FDIV %.04f\n",(double)src)); - FPU registers[reg] /= src; - make_fpsr(FPU registers[reg]); - break; - case 0x21: /* FMOD */ - fpu_debug(("FMOD %.04f\n",(double)src)); - // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; - { - fpu_register quot = round_to_zero(FPU registers[reg] / src); -#if FPU_HAVE_IEEE_DOUBLE - uae_u32 sign = get_quotient_sign(FPU registers[reg],src); -#endif - FPU registers[reg] = FPU registers[reg] - quot * src; - make_fpsr(FPU registers[reg]); -#if FPU_HAVE_IEEE_DOUBLE - make_quotient(quot, sign); -#endif - } - break; - case 0x22: /* FADD */ - case 0x62: /* single */ - case 0x66: /* double */ - fpu_debug(("FADD %.04f\n",(double)src)); - FPU registers[reg] += src; - make_fpsr(FPU registers[reg]); - break; - case 0x23: /* FMUL */ - fpu_debug(("FMUL %.04f\n",(double)src)); -#if FPU_HAVE_IEEE_DOUBLE - get_dest_flags(FPU registers[reg]); - get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { - FPU registers[reg] *= src; - } - else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); - } - else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } - } - else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } - } -#else - fpu_debug(("FMUL %.04f\n",(double)src)); - FPU registers[reg] *= src; -#endif - make_fpsr(FPU registers[reg]); - break; - case 0x24: /* FSGLDIV */ - fpu_debug(("FSGLDIV %.04f\n",(double)src)); - // TODO: round to float. - FPU registers[reg] /= src; - make_fpsr(FPU registers[reg]); - break; - case 0x25: /* FREM */ - fpu_debug(("FREM %.04f\n",(double)src)); - // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; - { - fpu_register quot = round_to_nearest(FPU registers[reg] / src); -#if FPU_HAVE_IEEE_DOUBLE - uae_u32 sign = get_quotient_sign(FPU registers[reg],src); -#endif - FPU registers[reg] = FPU registers[reg] - quot * src; - make_fpsr(FPU registers[reg]); -#if FPU_HAVE_IEEE_DOUBLE - make_quotient(quot,sign); -#endif - } - break; - - case 0x26: /* FSCALE */ - fpu_debug(("FSCALE %.04f\n",(double)src)); - - // TODO: - // Overflow, underflow - -#if FPU_HAVE_IEEE_DOUBLE - if( isinf(FPU registers[reg]) ) { - make_nan( FPU registers[reg] ); - } - else { - // When the absolute value of the source operand is >= 2^14, - // an overflow or underflow always results. - // Here (int) cast is okay. - fast_scale( FPU registers[reg], (int)round_to_zero(src) ); - } -#else - if (src != 0) { // Manual says: src==0 -> FPn - FPU registers[reg] *= exp (log (2.0) * src); - } -#endif - make_fpsr(FPU registers[reg]); - break; - case 0x27: /* FSGLMUL */ - fpu_debug(("FSGLMUL %.04f\n",(double)src)); - FPU registers[reg] *= src; - make_fpsr(FPU registers[reg]); - break; - case 0x28: /* FSUB */ - fpu_debug(("FSUB %.04f\n",(double)src)); - FPU registers[reg] -= src; - make_fpsr(FPU registers[reg]); - break; - case 0x30: /* FSINCOS */ - case 0x31: - case 0x32: - case 0x33: - case 0x34: - case 0x35: - case 0x36: - case 0x37: - fpu_debug(("FSINCOS %.04f\n",(double)src)); - // Cosine must be calculated first if same register - FPU registers[extra & 7] = cos(src); - FPU registers[reg] = sin (src); - // Set FPU fpsr according to the sine result - make_fpsr(FPU registers[reg]); - break; - case 0x38: /* FCMP */ - fpu_debug(("FCMP %.04f\n",(double)src)); - - // The infinity bit is always cleared by the FCMP - // instruction since it is not used by any of the - // conditional predicate equations. - -#if FPU_HAVE_IEEE_DOUBLE - if( isinf(src) ) { - if( isneg(src) ) { - // negative infinity - if( isinf(FPU registers[reg]) && isneg(FPU registers[reg]) ) { - // Zero, Negative - FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO | NATIVE_FFLAG_NEGATIVE; - fpu_debug(("-INF cmp -INF -> NZ\n")); - } - else { - // None - FPU fpsr.condition_codes = 0; - fpu_debug(("x cmp -INF -> None\n")); - } - } - else { - // positive infinity - if( isinf(FPU registers[reg]) && !isneg(FPU registers[reg]) ) { - // Zero - FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO; - fpu_debug(("+INF cmp +INF -> Z\n")); - } - else { - // Negative - FPU fpsr.condition_codes = NATIVE_FFLAG_NEGATIVE; - fpu_debug(("X cmp +INF -> N\n")); - } - } - } - else { - fpu_register tmp = FPU registers[reg] - src; - FPU fpsr.condition_codes - = (iszero(tmp) ? NATIVE_FFLAG_ZERO : 0) - | (isneg(tmp) ? NATIVE_FFLAG_NEGATIVE : 0) - ; - } -#else - { - fpu_register tmp = FPU registers[reg] - src; - make_fpsr(tmp); - } -#endif - break; - case 0x3a: /* FTST */ - fpu_debug(("FTST %.04f\n",(double)src)); - // make_fpsr(FPU registers[reg]); - make_fpsr(src); - break; - default: - fpu_debug(("ILLEGAL F OP %X\n",opcode)); - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - break; - } - fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); - dump_registers( "END "); - return; - } - - fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); -} - -/* -------------------------- Initialization -------------------------- */ - -void FFPU fpu_init (bool integral_68040) -{ - fpu_debug(("fpu_init\n")); - - static bool initialized_lookup_tables = false; - if (!initialized_lookup_tables) { - fpu_init_native_fflags(); - fpu_init_native_exceptions(); - fpu_init_native_accrued_exceptions(); - initialized_lookup_tables = true; - } - - FPU is_integral = integral_68040; - set_fpcr(0); - set_fpsr(0); - FPU instruction_address = 0; -} - -void FFPU fpu_exit (void) -{ - fpu_debug(("fpu_exit\n")); -} - -void FFPU fpu_reset (void) -{ - fpu_debug(("fpu_reset\n")); - fpu_exit(); - fpu_init(FPU is_integral); -} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h deleted file mode 100644 index 7fc4ebbd9..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h +++ /dev/null @@ -1,212 +0,0 @@ -/* - * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_UAE_H -#define FPU_UAE_H - -// Only define if you have IEEE 64 bit doubles. -#define FPU_HAVE_IEEE_DOUBLE 1 - -/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -enum { -#ifdef WORDS_BIGENDIAN - FHI = 0, - FLO = 1 -#else - FHI = 1, - FLO = 0 -#endif -}; - -// Floating-point rounding support -PRIVATE inline fpu_register round_to_zero(fpu_register const & x); -PRIVATE inline fpu_register round_to_nearest(fpu_register const & x); - -#if FPU_HAVE_IEEE_DOUBLE - -// Lauri-- full words to avoid partial register stalls. -struct double_flags { - uae_u32 in_range; - uae_u32 zero; - uae_u32 infinity; - uae_u32 nan; - uae_u32 negative; -}; -PRIVATE double_flags fl_source; -PRIVATE double_flags fl_dest; -PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); -PRIVATE inline void FFPU get_source_flags(fpu_register const & r); - -PRIVATE inline bool FFPU do_isnan(fpu_register const & r); -PRIVATE inline bool FFPU do_isinf(fpu_register const & r); -PRIVATE inline bool FFPU do_isneg(fpu_register const & r); -PRIVATE inline bool FFPU do_iszero(fpu_register const & r); - -PRIVATE inline void FFPU make_nan(fpu_register & r); -PRIVATE inline void FFPU make_zero_positive(fpu_register & r); -PRIVATE inline void FFPU make_zero_negative(fpu_register & r); -PRIVATE inline void FFPU make_inf_positive(fpu_register & r); -PRIVATE inline void FFPU make_inf_negative(fpu_register & r); - -PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); -PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); - -// May be optimized for particular processors -#ifndef FPU_USE_NATIVE_FLAGS -PRIVATE inline void FFPU make_fpsr(fpu_register const & r); -#endif - -// Normalize to range 1..2 -PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); - -// The sign of the quotient is the exclusive-OR of the sign bits -// of the source and destination operands. -PRIVATE inline uae_u32 FFPU get_quotient_sign( - fpu_register const & ra, fpu_register const & rb -); - -// Quotient Byte is loaded with the sign and least significant -// seven bits of the quotient. -PRIVATE inline void FFPU make_quotient( - fpu_register const & quotient, uae_u32 sign -); - -// to_single -PRIVATE inline fpu_register FFPU make_single( - uae_u32 value -); - -// from_single -PRIVATE inline uae_u32 FFPU extract_single( - fpu_register const & src -); - -// to_exten -PRIVATE inline fpu_register FFPU make_extended( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 -); - -/* - Would be so much easier with full size floats :( - ... this is so vague. -*/ -// to_exten_no_normalize -PRIVATE inline void FFPU make_extended_no_normalize( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result -); - -// from_exten -PRIVATE inline void FFPU extract_extended(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -); - -// to_double -PRIVATE inline fpu_register FFPU make_double( - uae_u32 wrd1, uae_u32 wrd2 -); - -// from_double -PRIVATE inline void FFPU extract_double(fpu_register const & src, - uae_u32 * wrd1, uae_u32 * wrd2 -); - -#else /* !FPU_HAVE_IEEE_DOUBLE */ - -// FIXME: may be optimized for particular processors -#ifndef FPU_USE_NATIVE_FLAGS -PRIVATE inline void FFPU make_fpsr(fpu_register const & r); -#endif - -// to_single -PRIVATE inline fpu_register make_single( - uae_u32 value -); - -// from_single -PRIVATE inline uae_u32 FFPU extract_single( - fpu_register const & src -); - -// to exten -PRIVATE inline fpu_register FFPU make_extended( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 -); - -// from_exten -PRIVATE inline void FFPU extract_extended( - fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -); - -// to_double -PRIVATE inline fpu_register FFPU make_double( - uae_u32 wrd1, uae_u32 wrd2 -); - -// from_double -PRIVATE inline void FFPU extract_double( - fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2 -); - -#endif /* FPU_HAVE_IEEE_DOUBLE */ - -PRIVATE inline fpu_register FFPU make_packed( - uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 -); - -PRIVATE inline void FFPU extract_packed( - fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 -); - -PRIVATE inline int FFPU get_fp_value( - uae_u32 opcode, uae_u16 extra, fpu_register & src -); - -PRIVATE inline int FFPU put_fp_value( - uae_u32 opcode, uae_u16 extra, fpu_register const & value -); - -PRIVATE inline int FFPU get_fp_ad( - uae_u32 opcode, uae_u32 * ad -); - -PRIVATE inline int FFPU fpp_cond( - int condition -); - -#endif /* FPU_UAE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu/fpu/impl.h deleted file mode 100644 index c79d1f3f5..000000000 --- a/BasiliskII/src/uae_cpu/fpu/impl.h +++ /dev/null @@ -1,147 +0,0 @@ -/* - * fpu/impl.h - extra functions and inline implementations - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_IMPL_H -#define FPU_IMPL_H - -/* NOTE: this file shall be included from fpu/core.h */ -#undef PUBLIC -#define PUBLIC /**/ - -#undef PRIVATE -#define PRIVATE /**/ - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- X86 assembly fpu specific methods --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_X86 - -/* Return the floating-point status register in m68k format */ -static inline uae_u32 FFPU get_fpsr(void) -{ - return to_m68k_fpcond[(x86_status_word & 0x4700) >> 8] - | FPU fpsr.quotient - | exception_host2mac[x86_status_word & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] - | accrued_exception_host2mac[x86_status_word_accrued & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] - ; -} - -/* Set the floating-point status register from an m68k format */ -static inline void FFPU set_fpsr(uae_u32 new_fpsr) -{ - x86_status_word = to_host_fpcond[(new_fpsr & FPSR_CCB) >> 24 ] - | exception_mac2host[(new_fpsr & FPSR_EXCEPTION_STATUS) >> 8]; - x86_status_word_accrued = accrued_exception_mac2host[(new_fpsr & FPSR_ACCRUED_EXCEPTION) >> 3]; -} - -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Original UAE and IEEE FPU core methods --- */ -/* -------------------------------------------------------------------------- */ - -#ifndef FPU_X86 - -/* Return the floating-point status register in m68k format */ -static inline uae_u32 FFPU get_fpsr(void) -{ - uae_u32 condition_codes = get_fpccr(); - uae_u32 exception_status = get_exception_status(); - uae_u32 accrued_exception = get_accrued_exception(); - uae_u32 quotient = FPU fpsr.quotient; - return (condition_codes | quotient | exception_status | accrued_exception); -} - -/* Set the floating-point status register from an m68k format */ -static inline void FFPU set_fpsr(uae_u32 new_fpsr) -{ - set_fpccr ( new_fpsr & FPSR_CCB ); - set_exception_status ( new_fpsr & FPSR_EXCEPTION_STATUS ); - set_accrued_exception ( new_fpsr & FPSR_ACCRUED_EXCEPTION ); - FPU fpsr.quotient = new_fpsr & FPSR_QUOTIENT; -} - -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Common routines for control word --- */ -/* -------------------------------------------------------------------------- */ - -/* Return the floating-point control register in m68k format */ -static inline uae_u32 FFPU get_fpcr(void) -{ - uae_u32 rounding_precision = get_rounding_precision(); - uae_u32 rounding_mode = get_rounding_mode(); - return (rounding_precision | rounding_mode); -} - -/* Set the floating-point control register from an m68k format */ -static inline void FFPU set_fpcr(uae_u32 new_fpcr) -{ - set_rounding_precision ( new_fpcr & FPCR_ROUNDING_PRECISION); - set_rounding_mode ( new_fpcr & FPCR_ROUNDING_MODE ); - set_host_control_word(); -} - -/* -------------------------------------------------------------------------- */ -/* --- Specific part to X86 assembly FPU --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_X86 - -/* Retrieve a floating-point register value and convert it to double precision */ -static inline double FFPU fpu_get_register(int r) -{ - double f; - __asm__ __volatile__("fldt %1\n\tfstpl %0" : "=m" (f) : "m" (FPU registers[r])); - return f; -} - -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Specific to original UAE or new IEEE-based FPU core --- */ -/* -------------------------------------------------------------------------- */ - -#if defined(FPU_UAE) || defined(FPU_IEEE) - -/* Retrieve a floating-point register value and convert it to double precision */ -static inline double FFPU fpu_get_register(int r) -{ - return FPU registers[r]; -} - -#endif - -#endif /* FPU_IMPL_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp deleted file mode 100644 index eabb376e5..000000000 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp +++ /dev/null @@ -1,100 +0,0 @@ -/* - * fpu/mathlib.cpp - Floating-point math support library - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * 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: this file shall be included only from fpu/fpu_*.cpp */ -#undef PRIVATE -#define PRIVATE static - -#undef PUBLIC -#define PUBLIC /**/ - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) - -PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y) -{ - fpu_extended value, exponent; - uae_s64 p = (uae_s64)y; - - if (x == 0.0) { - if (y > 0.0) - return (y == (double) p && (p & 1) != 0 ? x : 0.0); - else if (y < 0.0) - return (y == (double) p && (-p & 1) != 0 ? 1.0 / x : 1.0 / fp_fabs (x)); - } - - if (y == (double) p) { - fpu_extended r = 1.0; - if (p == 0) - return 1.0; - if (p < 0) { - p = -p; - x = 1.0 / x; - } - while (1) { - if (p & 1) - r *= x; - p >>= 1; - if (p == 0) - return r; - x *= x; - } - } - - __asm__ __volatile__("fyl2x" : "=t" (value) : "0" (x), "u" (1.0) : "st(1)"); - __asm__ __volatile__("fmul %%st(1) # y * log2(x)\n\t" - "fst %%st(1)\n\t" - "frndint # int(y * log2(x))\n\t" - "fxch\n\t" - "fsub %%st(1) # fract(y * log2(x))\n\t" - "f2xm1 # 2^(fract(y * log2(x))) - 1\n\t" - : "=t" (value), "=u" (exponent) : "0" (y), "1" (value)); - value += 1.0; - __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); - return value; -} - -PRIVATE fpu_extended fp_do_log1p(fpu_extended x) -{ - // TODO: handle NaN and +inf/-inf - fpu_extended value; - // The fyl2xp1 can only be used for values in - // -1 + sqrt(2) / 2 <= x <= 1 - sqrt(2) / 2 - // 0.29 is a safe value. - if (fp_fabs(x) <= 0.29) - __asm__ __volatile__("fldln2; fxch; fyl2xp1" : "=t" (value) : "0" (x)); - else - __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x + 1.0)); - return value; -} - -#endif diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h deleted file mode 100644 index 755c43d9b..000000000 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.h +++ /dev/null @@ -1,1129 +0,0 @@ -/* - * fpu/mathlib.h - Floating-point math support library - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * 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 FPU_MATHLIB_H -#define FPU_MATHLIB_H - -/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -// Define the following macro if branches are expensive. If so, -// integer-based isnan() and isinf() functions are implemented. -// TODO: move to Makefile.in -#define BRANCHES_ARE_EXPENSIVE 1 - -// Use ISO C99 extended-precision math functions (glibc 2.1+) -#define FPU_USE_ISO_C99 1 - -// Use faster implementation of math functions, but this could cause -// some incorrect results (?) -#ifdef _MSC_VER -// MSVC uses intrinsics for all of the math functions, so it should still be fast -#define FPU_FAST_MATH 0 -#else -#define FPU_FAST_MATH 1 -#endif - -#if FPU_USE_ISO_C99 -// NOTE: no prior shall be included at this point -#define __USE_ISOC99 1 // for glibc 2.2.X and newer -#define __USE_ISOC9X 1 // for glibc 2.1.X -#include -#else -#include -using namespace std; -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Floating-point register types --- */ -/* -------------------------------------------------------------------------- */ - -// Single : S 8*E 23*F -#define FP_SINGLE_EXP_MAX 0xff -#define FP_SINGLE_EXP_BIAS 0x7f - -// Double : S 11*E 52*F -#define FP_DOUBLE_EXP_MAX 0x7ff -#define FP_DOUBLE_EXP_BIAS 0x3ff - -// Extended : S 15*E 64*F -#define FP_EXTENDED_EXP_MAX 0x7fff -#define FP_EXTENDED_EXP_BIAS 0x3fff - -// Zeroes : E = 0 & F = 0 -// Infinities : E = MAX & F = 0 -// Not-A-Number : E = MAX & F # 0 - -/* -------------------------------------------------------------------------- */ -/* --- Floating-point type shapes (IEEE-compliant) --- */ -/* -------------------------------------------------------------------------- */ - -// Taken from glibc 2.2.x: ieee754.h - -// IEEE-754 float format -union fpu_single_shape { - - fpu_single value; - - /* This is the IEEE 754 single-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:8; - unsigned int mantissa:23; -#else - unsigned int mantissa:23; - unsigned int exponent:8; - unsigned int negative:1; -#endif - } ieee; - - /* This format makes it easier to see if a NaN is a signalling NaN. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:8; - unsigned int quiet_nan:1; - unsigned int mantissa:22; -#else - unsigned int mantissa:22; - unsigned int quiet_nan:1; - unsigned int exponent:8; - unsigned int negative:1; -#endif - } ieee_nan; -}; - -// IEEE-754 double format -union fpu_double_shape { - fpu_double value; - - /* This is the IEEE 754 double-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:11; - /* Together these comprise the mantissa. */ - unsigned int mantissa0:20; - unsigned int mantissa1:32; -#else -# if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int mantissa0:20; - unsigned int exponent:11; - unsigned int negative:1; - unsigned int mantissa1:32; -# else - /* Together these comprise the mantissa. */ - unsigned int mantissa1:32; - unsigned int mantissa0:20; - unsigned int exponent:11; - unsigned int negative:1; -# endif -#endif - } ieee; - - /* This format makes it easier to see if a NaN is a signalling NaN. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:11; - unsigned int quiet_nan:1; - /* Together these comprise the mantissa. */ - unsigned int mantissa0:19; - unsigned int mantissa1:32; -#else -# if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int mantissa0:19; - unsigned int quiet_nan:1; - unsigned int exponent:11; - unsigned int negative:1; - unsigned int mantissa1:32; -# else - /* Together these comprise the mantissa. */ - unsigned int mantissa1:32; - unsigned int mantissa0:19; - unsigned int quiet_nan:1; - unsigned int exponent:11; - unsigned int negative:1; -# endif -#endif - } ieee_nan; - - /* This format is used to extract the sign_exponent and mantissa parts only */ - struct { -#if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int msw:32; - unsigned int lsw:32; -#else - unsigned int lsw:32; - unsigned int msw:32; -#endif - } parts; -}; - -#ifdef USE_LONG_DOUBLE -// IEEE-854 long double format -union fpu_extended_shape { - fpu_extended value; - - /* This is the IEEE 854 double-extended-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:15; - unsigned int empty:16; - unsigned int mantissa0:32; - unsigned int mantissa1:32; -#else -# if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int exponent:15; - unsigned int negative:1; - unsigned int empty:16; - unsigned int mantissa0:32; - unsigned int mantissa1:32; -# else - unsigned int mantissa1:32; - unsigned int mantissa0:32; - unsigned int exponent:15; - unsigned int negative:1; - unsigned int empty:16; -# endif -#endif - } ieee; - - /* This is for NaNs in the IEEE 854 double-extended-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:15; - unsigned int empty:16; - unsigned int one:1; - unsigned int quiet_nan:1; - unsigned int mantissa0:30; - unsigned int mantissa1:32; -#else -# if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int exponent:15; - unsigned int negative:1; - unsigned int empty:16; - unsigned int mantissa0:30; - unsigned int quiet_nan:1; - unsigned int one:1; - unsigned int mantissa1:32; -# else - unsigned int mantissa1:32; - unsigned int mantissa0:30; - unsigned int quiet_nan:1; - unsigned int one:1; - unsigned int exponent:15; - unsigned int negative:1; - unsigned int empty:16; -# endif -#endif - } ieee_nan; - - /* This format is used to extract the sign_exponent and mantissa parts only */ - struct { -#if HOST_FLOAT_WORDS_BIG_ENDIAN - unsigned int sign_exponent:16; - unsigned int empty:16; - unsigned int msw:32; - unsigned int lsw:32; -#else - unsigned int lsw:32; - unsigned int msw:32; - unsigned int sign_exponent:16; - unsigned int empty:16; -#endif - } parts; -}; -#endif - -#ifdef USE_QUAD_DOUBLE -// IEEE-854 quad double format -union fpu_extended_shape { - fpu_extended value; - - /* This is the IEEE 854 quad-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:15; - unsigned int mantissa0:16; - unsigned int mantissa1:32; - unsigned int mantissa2:32; - unsigned int mantissa3:32; -#else - unsigned int mantissa3:32; - unsigned int mantissa2:32; - unsigned int mantissa1:32; - unsigned int mantissa0:16; - unsigned int exponent:15; - unsigned int negative:1; -#endif - } ieee; - - /* This is for NaNs in the IEEE 854 quad-precision format. */ - struct { -#ifdef WORDS_BIGENDIAN - unsigned int negative:1; - unsigned int exponent:15; - unsigned int quiet_nan:1; - unsigned int mantissa0:15; - unsigned int mantissa1:30; - unsigned int mantissa2:32; - unsigned int mantissa3:32; -#else - unsigned int mantissa3:32; - unsigned int mantissa2:32; - unsigned int mantissa1:32; - unsigned int mantissa0:15; - unsigned int quiet_nan:1; - unsigned int exponent:15; - unsigned int negative:1; -#endif - } ieee_nan; - - /* This format is used to extract the sign_exponent and mantissa parts only */ -#if HOST_FLOAT_WORDS_BIG_ENDIAN - struct { - uae_u64 msw; - uae_u64 lsw; - } parts64; - struct { - uae_u32 w0; - uae_u32 w1; - uae_u32 w2; - uae_u32 w3; - } parts32; -#else - struct { - uae_u64 lsw; - uae_u64 msw; - } parts64; - struct { - uae_u32 w3; - uae_u32 w2; - uae_u32 w1; - uae_u32 w0; - } parts32; -#endif -}; -#endif - -// Declare and initialize a pointer to a shape of the requested FP type -#define fp_declare_init_shape(psvar, rfvar, ftype) \ - fpu_ ## ftype ## _shape * psvar = (fpu_ ## ftype ## _shape *)( &rfvar ) - -/* -------------------------------------------------------------------------- */ -/* --- Extra Math Functions --- */ -/* --- (most of them had to be defined before including ) --- */ -/* -------------------------------------------------------------------------- */ - -#undef isnan -#if 0 && defined(HAVE_ISNANL) -# define isnan(x) isnanl((x)) -#else -# define isnan(x) fp_do_isnan((x)) -#endif - -PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) -{ -#ifdef BRANCHES_ARE_EXPENSIVE -#ifndef USE_LONG_DOUBLE - fp_declare_init_shape(sxp, r, double); - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; - hx &= 0x7fffffff; - hx |= (uae_u32)(lx | (-lx)) >> 31; - hx = 0x7ff00000 - hx; - return (((uae_u32)hx) >> 31) != 0; -#elif USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - uae_s64 hx = sxp->parts64.msw; - uae_s64 lx = sxp->parts64.lsw; - hx &= 0x7fffffffffffffffLL; - hx |= (uae_u64)(lx | (-lx)) >> 63; - hx = 0x7fff000000000000LL - hx; - return ((uae_u64)hx >> 63) != 0; -#else - fp_declare_init_shape(sxp, r, extended); - uae_s32 se = sxp->parts.sign_exponent; - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; - se = (se & 0x7fff) << 1; - lx |= hx & 0x7fffffff; - se |= (uae_u32)(lx | (-lx)) >> 31; - se = 0xfffe - se; - // TODO: check whether rshift count is 16 or 31 - return (((uae_u32)(se)) >> 16) != 0; -#endif -#else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) -#else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) -#endif - && (sxp->ieee_nan.mantissa0 != 0) - && (sxp->ieee_nan.mantissa1 != 0) -#ifdef USE_QUAD_DOUBLE - && (sxp->ieee_nan.mantissa2 != 0) - && (sxp->ieee_nan.mantissa3 != 0) -#endif - ; -#endif -} - -#undef isinf -#if 0 && defined(HAVE_ISINFL) -# define isinf(x) isinfl((x)) -#else -# define isinf(x) fp_do_isinf((x)) -#endif - -PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) -{ -#ifdef BRANCHES_ARE_EXPENSIVE -#ifndef USE_LONG_DOUBLE - fp_declare_init_shape(sxp, r, double); - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; - lx |= (hx & 0x7fffffff) ^ 0x7ff00000; - lx |= -lx; - return (~(lx >> 31) & (hx >> 30)) != 0; -#elif USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - uae_s64 hx = sxp->parts64.msw; - uae_s64 lx = sxp->parts64.lsw; - lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; - lx |= -lx; - return (~(lx >> 63) & (hx >> 62)) != 0; -#else - fp_declare_init_shape(sxp, r, extended); - uae_s32 se = sxp->parts.sign_exponent; - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; - /* This additional ^ 0x80000000 is necessary because in Intel's - internal representation of the implicit one is explicit. - NOTE: anyway, this is equivalent to & 0x7fffffff in that case. */ -#ifdef __i386__ - lx |= (hx ^ 0x80000000) | ((se & 0x7fff) ^ 0x7fff); -#else - lx |= (hx & 0x7fffffff) | ((se & 0x7fff) ^ 0x7fff); -#endif - lx |= -lx; - se &= 0x8000; - return (~(lx >> 31) & (1 - (se >> 14))) != 0; -#endif -#else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) -#else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) -#endif - && (sxp->ieee_nan.mantissa0 == 0) - && (sxp->ieee_nan.mantissa1 == 0) -#ifdef USE_QUAD_DOUBLE - && (sxp->ieee_nan.mantissa2 == 0) - && (sxp->ieee_nan.mantissa3 == 0) -#endif - ; -#endif -} - -#undef isneg -#define isneg(x) fp_do_isneg((x)) - -PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); -#else - fp_declare_init_shape(sxp, r, double); -#endif - return sxp->ieee.negative; -} - -#undef iszero -#define iszero(x) fp_do_iszero((x)) - -PRIVATE inline bool FFPU fp_do_iszero(fpu_register const & r) -{ - // TODO: BRANCHES_ARE_EXPENSIVE -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); -#else - fp_declare_init_shape(sxp, r, double); -#endif - return (sxp->ieee.exponent == 0) - && (sxp->ieee.mantissa0 == 0) - && (sxp->ieee.mantissa1 == 0) -#ifdef USE_QUAD_DOUBLE - && (sxp->ieee.mantissa2 == 0) - && (sxp->ieee.mantissa3 == 0) -#endif - ; -} - -PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) -{ - fl_dest.negative = isneg(r); - fl_dest.zero = iszero(r); - fl_dest.infinity = isinf(r); - fl_dest.nan = isnan(r); - fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; -} - -PRIVATE inline void FFPU get_source_flags(fpu_register const & r) -{ - fl_source.negative = isneg(r); - fl_source.zero = iszero(r); - fl_source.infinity = isinf(r); - fl_source.nan = isnan(r); - fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; -} - -PRIVATE inline void FFPU make_nan(fpu_register & r) -{ - // FIXME: is that correct ? -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee.exponent = FP_EXTENDED_EXP_MAX; - sxp->ieee.mantissa0 = 0xffffffff; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee.exponent = FP_DOUBLE_EXP_MAX; - sxp->ieee.mantissa0 = 0xfffff; -#endif - sxp->ieee.mantissa1 = 0xffffffff; -#ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0xffffffff; - sxp->ieee.mantissa3 = 0xffffffff; -#endif -} - -PRIVATE inline void FFPU make_zero_positive(fpu_register & r) -{ -#if 1 - r = +0.0; -#else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); -#else - fp_declare_init_shape(sxp, r, double); -#endif - sxp->ieee.negative = 0; - sxp->ieee.exponent = 0; - sxp->ieee.mantissa0 = 0; - sxp->ieee.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0; - sxp->ieee.mantissa3 = 0; -#endif -#endif -} - -PRIVATE inline void FFPU make_zero_negative(fpu_register & r) -{ -#if 1 - r = -0.0; -#else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); -#else - fp_declare_init_shape(sxp, r, double); -#endif - sxp->ieee.negative = 1; - sxp->ieee.exponent = 0; - sxp->ieee.mantissa0 = 0; - sxp->ieee.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0; - sxp->ieee.mantissa3 = 0; -#endif -#endif -} - -PRIVATE inline void FFPU make_inf_positive(fpu_register & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.negative = 0; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee_nan.mantissa2 = 0; - sxp->ieee_nan.mantissa3 = 0; -#endif -} - -PRIVATE inline void FFPU make_inf_negative(fpu_register & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.negative = 1; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee_nan.mantissa2 = 0; - sxp->ieee_nan.mantissa3 = 0; -#endif -} - -PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee.exponent - FP_EXTENDED_EXP_BIAS); -#else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee.exponent - FP_DOUBLE_EXP_BIAS); -#endif -} - -// Normalize to range 1..2 -PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee.exponent = FP_EXTENDED_EXP_BIAS; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee.exponent = FP_DOUBLE_EXP_BIAS; -#endif -} - -// The sign of the quotient is the exclusive-OR of the sign bits -// of the source and destination operands. -PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sap, ra, extended); - fp_declare_init_shape(sbp, rb, extended); -#else - fp_declare_init_shape(sap, ra, double); - fp_declare_init_shape(sbp, rb, double); -#endif - return ((sap->ieee.negative ^ sbp->ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); -} - -/* -------------------------------------------------------------------------- */ -/* --- Math functions --- */ -/* -------------------------------------------------------------------------- */ - -#if FPU_USE_ISO_C99 -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE -# ifdef HAVE_LOGL -# define fp_log logl -# endif -# ifdef HAVE_LOG10L -# define fp_log10 log10l -# endif -# ifdef HAVE_EXPL -# define fp_exp expl -# endif -# ifdef HAVE_POWL -# define fp_pow powl -# endif -# ifdef HAVE_FABSL -# define fp_fabs fabsl -# endif -# ifdef HAVE_SQRTL -# define fp_sqrt sqrtl -# endif -# ifdef HAVE_SINL -# define fp_sin sinl -# endif -# ifdef HAVE_COSL -# define fp_cos cosl -# endif -# ifdef HAVE_TANL -# define fp_tan tanl -# endif -# ifdef HAVE_SINHL -# define fp_sinh sinhl -# endif -# ifdef HAVE_COSHL -# define fp_cosh coshl -# endif -# ifdef HAVE_TANHL -# define fp_tanh tanhl -# endif -# ifdef HAVE_ASINL -# define fp_asin asinl -# endif -# ifdef HAVE_ACOSL -# define fp_acos acosl -# endif -# ifdef HAVE_ATANL -# define fp_atan atanl -# endif -# ifdef HAVE_ASINHL -# define fp_asinh asinhl -# endif -# ifdef HAVE_ACOSHL -# define fp_acosh acoshl -# endif -# ifdef HAVE_ATANHL -# define fp_atanh atanhl -# endif -# ifdef HAVE_FLOORL -# define fp_floor floorl -# endif -# ifdef HAVE_CEILL -# define fp_ceil ceill -# endif -#endif - -#ifndef fp_log -# define fp_log log -#endif -#ifndef fp_log10 -# define fp_log10 log10 -#endif -#ifndef fp_exp -# define fp_exp exp -#endif -#ifndef fp_pow -# define fp_pow pow -#endif -#ifndef fp_fabs -# define fp_fabs fabs -#endif -#ifndef fp_sqrt -# define fp_sqrt sqrt -#endif -#ifndef fp_sin -# define fp_sin sin -#endif -#ifndef fp_cos -# define fp_cos cos -#endif -#ifndef fp_tan -# define fp_tan tan -#endif -#ifndef fp_sinh -# define fp_sinh sinh -#endif -#ifndef fp_cosh -# define fp_cosh cosh -#endif -#ifndef fp_tanh -# define fp_tanh tanh -#endif -#ifndef fp_asin -# define fp_asin asin -#endif -#ifndef fp_acos -# define fp_acos acos -#endif -#ifndef fp_atan -# define fp_atan atan -#endif -#ifndef fp_asinh -# define fp_asinh asinh -#endif -#ifndef fp_acosh -# define fp_acosh acosh -#endif -#ifndef fp_atanh -# define fp_atanh atanh -#endif -#ifndef fp_floor -# define fp_floor floor -#endif -#ifndef fp_ceil -# define fp_ceil ceil -#endif - -#elif defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) -// Assembly optimized support functions. Taken from glibc 2.2.2 - -#undef fp_log -#define fp_log fp_do_log - -#if !FPU_FAST_MATH -PRIVATE fpu_extended fp_do_log(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_log(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); - return value; -} -#endif - -#undef fp_log10 -#define fp_log10 fp_do_log10 - -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_log10(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_log10(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fldlg2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); - return value; -} -#endif - -#undef fp_exp -#define fp_exp fp_do_exp - -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_exp(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) -{ - fpu_extended value, exponent; - __asm__ __volatile__("fldl2e # e^x = 2^(x * log2(e))\n\t" - "fmul %%st(1) # x * log2(e)\n\t" - "fst %%st(1)\n\t" - "frndint # int(x * log2(e))\n\t" - "fxch\n\t" - "fsub %%st(1) # fract(x * log2(e))\n\t" - "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" - : "=t" (value), "=u" (exponent) : "0" (x)); - value += 1.0; - __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); - return value; -} -#endif - -#undef fp_pow -#define fp_pow fp_do_pow - -PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y); - -#undef fp_fabs -#define fp_fabs fp_do_fabs - -PRIVATE inline fpu_extended fp_do_fabs(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fabs" : "=t" (value) : "0" (x)); - return value; -} - -#undef fp_sqrt -#define fp_sqrt fp_do_sqrt - -PRIVATE inline fpu_extended fp_do_sqrt(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fsqrt" : "=t" (value) : "0" (x)); - return value; -} - -#undef fp_sin -#define fp_sin fp_do_sin - -PRIVATE inline fpu_extended fp_do_sin(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fsin" : "=t" (value) : "0" (x)); - return value; -} - -#undef fp_cos -#define fp_cos fp_do_cos - -PRIVATE inline fpu_extended fp_do_cos(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fcos" : "=t" (value) : "0" (x)); - return value; -} - -#undef fp_tan -#define fp_tan fp_do_tan - -PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fptan" : "=t" (value) : "0" (x)); - return value; -} - -#undef fp_expm1 -#define fp_expm1 fp_do_expm1 - -// Returns: exp(X) - 1.0 -PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) -{ - fpu_extended value, exponent, temp; - __asm__ __volatile__("fldl2e # e^x - 1 = 2^(x * log2(e)) - 1\n\t" - "fmul %%st(1) # x * log2(e)\n\t" - "fst %%st(1)\n\t" - "frndint # int(x * log2(e))\n\t" - "fxch\n\t" - "fsub %%st(1) # fract(x * log2(e))\n\t" - "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" - "fscale # 2^(x * log2(e)) - 2^(int(x * log2(e)))\n\t" - : "=t" (value), "=u" (exponent) : "0" (x)); - __asm__ __volatile__("fscale" : "=t" (temp) : "0" (1.0), "u" (exponent)); - temp -= 1.0; - return temp + value ? temp + value : x; -} - -#undef fp_sgn1 -#define fp_sgn1 fp_do_sgn1 - -PRIVATE inline fpu_extended fp_do_sgn1(fpu_extended x) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, x, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; - sxp->ieee_nan.one = 1; -#else - fp_declare_init_shape(sxp, x, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.quiet_nan = 0; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; - return x; -} - -#undef fp_sinh -#define fp_sinh fp_do_sinh - -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_sinh(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) -{ - fpu_extended exm1 = fp_expm1(fp_fabs(x)); - return 0.5 * (exm1 / (exm1 + 1.0) + exm1) * fp_sgn1(x); -} -#endif - -#undef fp_cosh -#define fp_cosh fp_do_cosh - -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_cosh(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) -{ - fpu_extended ex = fp_exp(x); - return 0.5 * (ex + 1.0 / ex); -} -#endif - -#undef fp_tanh -#define fp_tanh fp_do_tanh - -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_tanh(fpu_extended x); -#else -PRIVATE inline fpu_extended fp_do_tanh(fpu_extended x) -{ - fpu_extended exm1 = fp_expm1(-fp_fabs(x + x)); - return exm1 / (exm1 + 2.0) * fp_sgn1(-x); -} -#endif - -#undef fp_atan2 -#define fp_atan2 fp_do_atan2 - -PRIVATE inline fpu_extended fp_do_atan2(fpu_extended y, fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fpatan" : "=t" (value) : "0" (x), "u" (y) : "st(1)"); - return value; -} - -#undef fp_asin -#define fp_asin fp_do_asin - -PRIVATE inline fpu_extended fp_do_asin(fpu_extended x) -{ - return fp_atan2(x, fp_sqrt(1.0 - x * x)); -} - -#undef fp_acos -#define fp_acos fp_do_acos - -PRIVATE inline fpu_extended fp_do_acos(fpu_extended x) -{ - return fp_atan2(fp_sqrt(1.0 - x * x), x); -} - -#undef fp_atan -#define fp_atan fp_do_atan - -PRIVATE inline fpu_extended fp_do_atan(fpu_extended x) -{ - fpu_extended value; - __asm__ __volatile__("fld1; fpatan" : "=t" (value) : "0" (x) : "st(1)"); - return value; -} - -#undef fp_log1p -#define fp_log1p fp_do_log1p - -// Returns: ln(1.0 + X) -PRIVATE fpu_extended fp_do_log1p(fpu_extended x); - -#undef fp_asinh -#define fp_asinh fp_do_asinh - -PRIVATE inline fpu_extended fp_do_asinh(fpu_extended x) -{ - fpu_extended y = fp_fabs(x); - return (fp_log1p(y * y / (fp_sqrt(y * y + 1.0) + 1.0) + y) * fp_sgn1(x)); -} - -#undef fp_acosh -#define fp_acosh fp_do_acosh - -PRIVATE inline fpu_extended fp_do_acosh(fpu_extended x) -{ - return fp_log(x + fp_sqrt(x - 1.0) * fp_sqrt(x + 1.0)); -} - -#undef fp_atanh -#define fp_atanh fp_do_atanh - -PRIVATE inline fpu_extended fp_do_atanh(fpu_extended x) -{ - fpu_extended y = fp_fabs(x); - return -0.5 * fp_log1p(-(y + y) / (1.0 + y)) * fp_sgn1(x); -} - -#undef fp_floor -#define fp_floor fp_do_floor - -PRIVATE inline fpu_extended fp_do_floor(fpu_extended x) -{ - volatile unsigned int cw; - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0400; // rounding down - __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); - fpu_extended value; - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); - __asm__ __volatile__("fldcw %0" : : "m" (cw)); - return value; -} - -#undef fp_ceil -#define fp_ceil fp_do_ceil - -PRIVATE inline fpu_extended fp_do_ceil(fpu_extended x) -{ - volatile unsigned int cw; - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0800; // rounding up - __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); - fpu_extended value; - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); - __asm__ __volatile__("fldcw %0" : : "m" (cw)); - return value; -} - -#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ -PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended x) \ -{ \ - volatile unsigned int cw; \ - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); \ - volatile unsigned int cw_temp = (cw & 0xf3ff) | (rounding_mode); \ - __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); \ - fpu_extended value; \ - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); \ - __asm__ __volatile__("fldcw %0" : : "m" (cw)); \ - return value; \ -} - -#undef fp_round_to_minus_infinity -#define fp_round_to_minus_infinity fp_do_round_to_minus_infinity - -DEFINE_ROUND_FUNC(minus_infinity, 0x400) - -#undef fp_round_to_plus_infinity -#define fp_round_to_plus_infinity fp_do_round_to_plus_infinity - -DEFINE_ROUND_FUNC(plus_infinity, 0x800) - -#undef fp_round_to_zero -#define fp_round_to_zero fp_do_round_to_zero - -DEFINE_ROUND_FUNC(zero, 0xc00) - -#undef fp_round_to_nearest -#define fp_round_to_nearest fp_do_round_to_nearest - -DEFINE_ROUND_FUNC(nearest, 0x000) - -#endif /* USE_X87_ASSEMBLY */ - -#ifndef fp_round_to_minus_infinity -#define fp_round_to_minus_infinity(x) fp_floor(x) -#endif - -#ifndef fp_round_to_plus_infinity -#define fp_round_to_plus_infinity(x) fp_ceil(x) -#endif - -#ifndef fp_round_to_zero -#define fp_round_to_zero(x) ((int)(x)) -#endif - -#ifndef fp_round_to_nearest -#define fp_round_to_nearest(x) ((int)((x) + 0.5)) -#endif - -#endif /* FPU_MATHLIB_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu/fpu/rounding.cpp deleted file mode 100644 index 1f8b36183..000000000 --- a/BasiliskII/src/uae_cpu/fpu/rounding.cpp +++ /dev/null @@ -1,64 +0,0 @@ -/* - * fpu/rounding.cpp - system-dependant FPU rounding mode and precision - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 - */ - -#undef PRIVATE -#define PRIVATE /**/ - -#undef PUBLIC -#define PUBLIC /**/ - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 Rounding Mode --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_X86_ROUNDING_MODE -const uae_u32 FFPU x86_control_word_rm_mac2host[] = { - CW_RC_NEAR, - CW_RC_ZERO, - CW_RC_DOWN, - CW_RC_UP -}; -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Native X86 Rounding Precision --- */ -/* -------------------------------------------------------------------------- */ - -#ifdef FPU_USE_X86_ROUNDING_PRECISION -const uae_u32 FFPU x86_control_word_rp_mac2host[] = { - CW_PC_EXTENDED, - CW_PC_SINGLE, - CW_PC_DOUBLE, - CW_PC_RESERVED -}; -#endif diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu/fpu/rounding.h deleted file mode 100644 index 67db55190..000000000 --- a/BasiliskII/src/uae_cpu/fpu/rounding.h +++ /dev/null @@ -1,154 +0,0 @@ -/* - * fpu/rounding.h - system-dependant FPU rounding mode and precision - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_ROUNDING_H -#define FPU_ROUNDING_H - -/* NOTE: this file shall be included from fpu/fpu_*.cpp */ -#undef PUBLIC -#define PUBLIC extern - -#undef PRIVATE -#define PRIVATE static - -#undef FFPU -#define FFPU /**/ - -#undef FPU -#define FPU fpu. - -/* Defaults to generic rounding mode and precision handling */ -#define FPU_USE_GENERIC_ROUNDING_MODE -#define FPU_USE_GENERIC_ROUNDING_PRECISION - -/* -------------------------------------------------------------------------- */ -/* --- Selection of floating-point rounding mode and precision --- */ -/* -------------------------------------------------------------------------- */ - -/* Optimized i386 fpu core must use native rounding mode */ -#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_ROUNDING_MODE -# define FPU_USE_X86_ROUNDING_MODE -#endif - -/* Optimized i386 fpu core must use native rounding precision */ -#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_ROUNDING_PRECISION -# define FPU_USE_X86_ROUNDING_PRECISION -#endif - -#if 0 // gb-- FIXME: that doesn't work -/* IEEE-based fpu core can have native rounding mode on i386 */ -#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_ROUNDING_MODE -# define FPU_USE_X86_ROUNDING_MODE -#endif - -/* IEEE-based fpu core can have native rounding precision on i386 */ -#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) -# undef FPU_USE_GENERIC_ROUNDING_PRECISION -# define FPU_USE_X86_ROUNDING_PRECISION -#endif -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Sanity checks --- */ -/* -------------------------------------------------------------------------- */ - -/* X86 rounding mode and precision work together */ -#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) -# define FPU_USE_X86_ROUNDING -# define CW_INITIAL (CW_RESET|CW_X|CW_PC_EXTENDED|CW_RC_NEAR|CW_PM|CW_UM|CW_OM|CW_ZM|CW_DM|CW_IM) - PRIVATE uae_u32 x86_control_word; -#endif - -/* Control word -- rounding mode */ -#ifdef FPU_USE_X86_ROUNDING_MODE -PUBLIC const uae_u32 x86_control_word_rm_mac2host[]; -#endif - -/* Control word -- rounding precision */ -#ifdef FPU_USE_X86_ROUNDING_PRECISION -PUBLIC const uae_u32 x86_control_word_rp_mac2host[]; -#endif - -#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) -/* Set host control word for rounding mode and rounding precision */ -PRIVATE inline void set_host_control_word(void) -{ - /* - Exception enable byte is ignored, but the same value is returned - that was previously set. - */ - x86_control_word - = (x86_control_word & ~(X86_ROUNDING_MODE|X86_ROUNDING_PRECISION)) - | x86_control_word_rm_mac2host[(FPU fpcr.rounding_mode & FPCR_ROUNDING_MODE) >> 4] - | x86_control_word_rp_mac2host[(FPU fpcr.rounding_precision & FPCR_ROUNDING_PRECISION) >> 6] - ; - __asm__ __volatile__("fldcw %0" : : "m" (x86_control_word)); -} -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Generic rounding mode and precision --- */ -/* -------------------------------------------------------------------------- */ - -#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) -/* Set host control word for rounding mode and rounding precision */ -PRIVATE inline void set_host_control_word(void) - { } -#endif - -/* -------------------------------------------------------------------------- */ -/* --- Common rounding mode and precision --- */ -/* -------------------------------------------------------------------------- */ - -#if defined(FPU_USE_GENERIC_ROUNDING_MODE) || defined(FPU_USE_X86_ROUNDING_MODE) - -/* Return the current rounding mode in m68k format */ -static inline uae_u32 FFPU get_rounding_mode(void) - { return FPU fpcr.rounding_mode; } - -/* Convert and set to native rounding mode */ -static inline void FFPU set_rounding_mode(uae_u32 new_rounding_mode) - { FPU fpcr.rounding_mode = new_rounding_mode; } - -#endif - -#if defined(FPU_USE_GENERIC_ROUNDING_PRECISION) || defined(FPU_USE_X86_ROUNDING_PRECISION) - -/* Return the current rounding precision in m68k format */ -static inline uae_u32 FFPU get_rounding_precision(void) - { return FPU fpcr.rounding_precision; } - -/* Convert and set to native rounding precision */ -static inline void FFPU set_rounding_precision(uae_u32 new_rounding_precision) - { FPU fpcr.rounding_precision = new_rounding_precision; } - -#endif - -#endif /* FPU_ROUNDING_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h deleted file mode 100644 index 5f7080483..000000000 --- a/BasiliskII/src/uae_cpu/fpu/types.h +++ /dev/null @@ -1,135 +0,0 @@ -/* - * types.h - basic types for fpu registers - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 FPU_TYPES_H -#define FPU_TYPES_H - -#include "sysdeps.h" - -/* Default behavior is *not* to use long doubles */ -#undef USE_LONG_DOUBLE -#undef USE_QUAD_DOUBLE - -/* -------------------------------------------------------------------------- */ -/* --- Original UAE fpu core --- */ -/* -------------------------------------------------------------------------- */ - -#if defined(FPU_UAE) - -/* 4-byte floats */ -typedef float uae_f32; - -/* 8-byte floats */ -typedef double uae_f64; - -/* Original UAE FPU registers are only 8 bytes long */ -typedef uae_f64 fpu_register; -typedef fpu_register fpu_extended; -typedef uae_f64 fpu_double; -typedef uae_f32 fpu_single; - -/* -------------------------------------------------------------------------- */ -/* --- Optimized core for x86 --- */ -/* -------------------------------------------------------------------------- */ - -#elif defined(FPU_X86) - -/* 4-byte floats */ -typedef float uae_f32; - -/* 8-byte floats */ -typedef double uae_f64; - -/* At least 10-byte floats are required */ -#if SIZEOF_LONG_DOUBLE >= 10 -typedef long double fpu_register; -#else -#error "No float type at least 10 bytes long, you lose." -#endif - -/* X86 FPU has a custom register type that maps to a native X86 register */ -typedef fpu_register fpu_extended; -typedef uae_f64 fpu_double; -typedef uae_f32 fpu_single; - -/* -------------------------------------------------------------------------- */ -/* --- C99 implementation --- */ -/* -------------------------------------------------------------------------- */ - -#elif defined(FPU_IEEE) - -#if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT -#error "No IEEE float format, you lose." -#endif - -/* 4-byte floats */ -#if SIZEOF_FLOAT == 4 -typedef float uae_f32; -#elif SIZEOF_DOUBLE == 4 -typedef double uae_f32; -#else -#error "No 4 byte float type, you lose." -#endif - -/* 8-byte floats */ -#if SIZEOF_DOUBLE == 8 -typedef double uae_f64; -#elif SIZEOF_LONG_DOUBLE == 8 -typedef long double uae_f64; -#else -#error "No 8 byte float type, you lose." -#endif - -/* 12-byte or 16-byte floats */ -#if SIZEOF_LONG_DOUBLE == 12 -typedef long double uae_f96; -typedef uae_f96 fpu_register; -#define USE_LONG_DOUBLE 1 -#elif SIZEOF_LONG_DOUBLE == 16 && (defined(__i386__) || defined(__x86_64__)) -/* Long doubles on x86-64 are really held in old x87 FPU stack. */ -typedef long double uae_f128; -typedef uae_f128 fpu_register; -#define USE_LONG_DOUBLE 1 -#elif 0 -/* Disable for now and probably for good as (i) the emulator - implementation is not correct, (ii) I don't know of any CPU which - handles this kind of format *natively* with conformance to IEEE. */ -typedef long double uae_f128; -typedef uae_f128 fpu_register; -#define USE_QUAD_DOUBLE 1 -#else -typedef uae_f64 fpu_register; -#endif - -/* We need all those floating-point types */ -typedef fpu_register fpu_extended; -typedef uae_f64 fpu_double; -typedef uae_f32 fpu_single; - -#endif - -#endif /* FPU_TYPES_H */ diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 3030258f7..8e2502a36 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -14,21 +14,6 @@ * take care of this. * * Copyright 1995, 1996 Bernd Schmidt - * - * 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 @@ -45,9 +30,6 @@ #define BOOL_TYPE "int" -/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ -#define xBCD_KEEPS_NV_FLAGS 4 - static FILE *headerfile; static FILE *stblfile; @@ -239,8 +221,7 @@ static void sync_m68k_pc (void) } /* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, - * the calling routine handles Apdi and Aipi modes. - * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ + * the calling routine handles Apdi and Aipi modes. */ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) { start_brace (); @@ -586,7 +567,7 @@ static void duplicate_carry (void) } typedef enum { - flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, flag_addx, flag_subx, flag_z, flag_zn, + flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, flag_addx, flag_subx, flag_zn, flag_av, flag_sv } flagtypes; @@ -640,7 +621,6 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * switch (type) { case flag_logical_noclobber: case flag_logical: - case flag_z: case flag_zn: case flag_av: case flag_sv: @@ -662,7 +642,6 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * switch (type) { case flag_logical_noclobber: case flag_logical: - case flag_z: case flag_zn: break; @@ -696,9 +675,6 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * case flag_sv: printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); break; - case flag_z: - printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); - break; case flag_zn: printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); printf ("\tSET_NFLG (%s < 0);\n", vstr); @@ -738,16 +714,163 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * static void genflags (flagtypes type, wordsizes size, char *value, char *src, char *dst) { - /* Temporarily deleted 68k/ARM flag optimizations. I'd prefer to have - them in the appropriate m68k.h files and use just one copy of this - code here. The API can be changed if necessary. */ -#ifdef OPTIMIZED_FLAGS +#ifdef SPARC_V8_ASSEMBLY + switch(type) + { + case flag_add: + start_brace(); + printf("\tuae_u32 %s;\n", value); + switch(size) + { + case sz_byte: + printf("\t%s = sparc_v8_flag_add_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_word: + printf("\t%s = sparc_v8_flag_add_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_long: + printf("\t%s = sparc_v8_flag_add_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + } + return; + + case flag_sub: + start_brace(); + printf("\tuae_u32 %s;\n", value); + switch(size) + { + case sz_byte: + printf("\t%s = sparc_v8_flag_sub_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_word: + printf("\t%s = sparc_v8_flag_sub_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_long: + printf("\t%s = sparc_v8_flag_sub_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + } + return; + + case flag_cmp: + switch(size) + { + case sz_byte: +// printf("\tsparc_v8_flag_cmp_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + break; + case sz_word: +// printf("\tsparc_v8_flag_cmp_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + break; + case sz_long: +#if 1 + printf("\tsparc_v8_flag_cmp_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + return; +#endif + break; + } +// return; + break; + } +#elif defined(SPARC_V9_ASSEMBLY) + switch(type) + { + case flag_add: + start_brace(); + printf("\tuae_u32 %s;\n", value); + switch(size) + { + case sz_byte: + printf("\t%s = sparc_v9_flag_add_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_word: + printf("\t%s = sparc_v9_flag_add_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_long: + printf("\t%s = sparc_v9_flag_add_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + } + return; + + case flag_sub: + start_brace(); + printf("\tuae_u32 %s;\n", value); + switch(size) + { + case sz_byte: + printf("\t%s = sparc_v9_flag_sub_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_word: + printf("\t%s = sparc_v9_flag_sub_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + case sz_long: + printf("\t%s = sparc_v9_flag_sub_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); + break; + } + return; + + case flag_cmp: + switch(size) + { + case sz_byte: + printf("\tsparc_v9_flag_cmp_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + break; + case sz_word: + printf("\tsparc_v9_flag_cmp_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + break; + case sz_long: + printf("\tsparc_v9_flag_cmp_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); + break; + } + return; + + case flag_logical: + if (strcmp(value, "0") == 0) { + printf("\tregflags.nzvc = 0x04;\n"); + } else { + switch(size) { + case sz_byte: + printf("\tsparc_v9_flag_test_8(®flags, (uae_u32)(%s));\n", value); + break; + case sz_word: + printf("\tsparc_v9_flag_test_16(®flags, (uae_u32)(%s));\n", value); + break; + case sz_long: + printf("\tsparc_v9_flag_test_32(®flags, (uae_u32)(%s));\n", value); + break; + } + } + return; + +#if 0 + case flag_logical_noclobber: + printf("\t{uae_u32 old_flags = regflags.nzvc & ~0x0C;\n"); + if (strcmp(value, "0") == 0) { + printf("\tregflags.nzvc = old_flags | 0x04;\n"); + } else { + switch(size) { + case sz_byte: + printf("\tsparc_v9_flag_test_8(®flags, (uae_u32)(%s));\n", value); + break; + case sz_word: + printf("\tsparc_v9_flag_test_16(®flags, (uae_u32)(%s));\n", value); + break; + case sz_long: + printf("\tsparc_v9_flag_test_32(®flags, (uae_u32)(%s));\n", value); + break; + } + printf("\tregflags.nzvc |= old_flags;\n"); + } + printf("\t}\n"); + return; +#endif + } +#elif defined(X86_ASSEMBLY) switch (type) { case flag_add: case flag_sub: start_brace (); printf ("\tuae_u32 %s;\n", value); break; + default: break; } @@ -755,59 +878,231 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch /* At least some of those casts are fairly important! */ switch (type) { case flag_logical_noclobber: - printf ("\t{uae_u32 oldcznv = GET_CZNV & ~(FLAGVAL_Z | FLAGVAL_N);\n"); + printf ("\t{uae_u32 oldcznv = regflags.cznv & ~0xC0;\n"); if (strcmp (value, "0") == 0) { - printf ("\tSET_CZNV (olcznv | FLAGVAL_Z);\n"); + printf ("\tregflags.cznv = olcznv | 64;\n"); } else { switch (size) { - case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; - case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; - case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; + case sz_byte: printf ("\tx86_flag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\tx86_flag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\tx86_flag_testl ((uae_s32)(%s));\n", value); break; } - printf ("\tIOR_CZNV (oldcznv);\n"); + printf ("\tregflags.cznv |= oldcznv;\n"); } printf ("\t}\n"); return; - case flag_logical: if (strcmp (value, "0") == 0) { - printf ("\tSET_CZNV (FLAGVAL_Z);\n"); + printf ("\tregflags.cznv = 64;\n"); } else { switch (size) { - case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; - case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; - case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; + case sz_byte: printf ("\tx86_flag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\tx86_flag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\tx86_flag_testl ((uae_s32)(%s));\n", value); break; } } return; case flag_add: switch (size) { - case sz_byte: printf ("\toptflag_addb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; - case sz_word: printf ("\toptflag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; - case sz_long: printf ("\toptflag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + case sz_byte: printf ("\tx86_flag_addb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\tx86_flag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\tx86_flag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } return; case flag_sub: switch (size) { - case sz_byte: printf ("\toptflag_subb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; - case sz_word: printf ("\toptflag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; - case sz_long: printf ("\toptflag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + case sz_byte: printf ("\tx86_flag_subb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\tx86_flag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\tx86_flag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } return; case flag_cmp: switch (size) { - case sz_byte: printf ("\toptflag_cmpb ((uae_s8)(%s), (uae_s8)(%s));\n", src, dst); break; - case sz_word: printf ("\toptflag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; - case sz_long: printf ("\toptflag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; + case sz_byte: printf ("\tx86_flag_cmpb ((uae_s8)(%s), (uae_s8)(%s));\n", src, dst); break; + case sz_word: printf ("\tx86_flag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; + case sz_long: printf ("\tx86_flag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; } return; default: break; } +#elif defined(M68K_FLAG_OPT) + /* sam: here I'm cloning what X86_ASSEMBLY does */ +#define EXT(size) (size==sz_byte?"b":(size==sz_word?"w":"l")) +#define CAST(size) (size==sz_byte?"uae_s8":(size==sz_word?"uae_s16":"uae_s32")) + switch (type) { + case flag_add: + case flag_sub: + start_brace (); + printf ("\tuae_u32 %s;\n", value); + break; + + default: + break; + } + + switch (type) { + case flag_logical: + if (strcmp (value, "0") == 0) { + printf ("\t*(uae_u16 *)®flags = 4;\n"); /* Z = 1 */ + } else { + printf ("\tm68k_flag_tst (%s, (%s)(%s));\n", + EXT (size), CAST (size), value); + } + return; + + case flag_add: + printf ("\t{uae_u16 ccr;\n"); + printf ("\tm68k_flag_add (%s, (%s)%s, (%s)(%s), (%s)(%s));\n", + EXT (size), CAST (size), value, CAST (size), src, CAST (size), dst); + printf ("\t((uae_u16*)®flags)[1]=((uae_u16*)®flags)[0]=ccr;}\n"); + return; + + case flag_sub: + printf ("\t{uae_u16 ccr;\n"); + printf ("\tm68k_flag_sub (%s, (%s)%s, (%s)(%s), (%s)(%s));\n", + EXT (size), CAST (size), value, CAST (size), src, CAST (size), dst); + printf ("\t((uae_u16*)®flags)[1]=((uae_u16*)®flags)[0]=ccr;}\n"); + return; + + case flag_cmp: + printf ("\tm68k_flag_cmp (%s, (%s)(%s), (%s)(%s));\n", + EXT (size), CAST (size), src, CAST (size), dst); + return; + + default: + break; + } +#elif defined(ACORN_FLAG_OPT) && defined(__GNUC_MINOR__) +/* + * This is new. Might be quite buggy. + */ + switch (type) { + case flag_av: + case flag_sv: + case flag_zn: + case flag_addx: + case flag_subx: + break; + + case flag_logical: + if (strcmp (value, "0") == 0) { + /* v=c=n=0 z=1 */ + printf ("\t*(ULONG*)®flags = 0x40000000;\n"); + return; + } else { + start_brace (); + switch (size) { + case sz_byte: + printf ("\tUBYTE ccr;\n"); + printf ("\tULONG shift;\n"); + printf ("\t__asm__(\"mov %%2,%%1,lsl#24\n\ttst %%2,%%2\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" + "\t: \"=r\" (ccr) : \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + return; + case sz_word: + printf ("\tUBYTE ccr;\n"); + printf ("\tULONG shift;\n"); + printf ("\t__asm__(\"mov %%2,%%1,lsl#16\n\ttst %%2,%%2\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" + "\t: \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + return; + case sz_long: + printf ("\tUBYTE ccr;\n"); + printf ("\t__asm__(\"tst %%1,%%1\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" + "\t: \"=r\" (ccr) : \"r\" ((LONG)%s) : \"cc\" );\n", value); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + return; + } + } + break; + case flag_add: + if (strcmp (dst, "0") == 0) { + printf ("/* Error! Hier muss Peter noch was machen !!! (ADD-Flags) */"); + } else { + start_brace (); + switch (size) { + case sz_byte: + printf ("\tULONG ccr, shift, %s;\n", value); + printf ("\t__asm__(\"mov %%4,%%3,lsl#24\n\tadds %%0,%%4,%%2,lsl#24\n\tmov %%0,%%0,asr#24\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + case sz_word: + printf ("\tULONG ccr, shift, %s;\n", value); + printf ("\t__asm__(\"mov %%4,%%3,lsl#16\n\tadds %%0,%%4,%%2,lsl#16\n\tmov %%0,%%0,asr#16\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + case sz_long: + printf ("\tULONG ccr, %s;\n", value); + printf ("\t__asm__(\"adds %%0,%%3,%%2\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + } + } + break; + case flag_sub: + if (strcmp (dst, "0") == 0) { + printf ("/* Error! Hier muss Peter noch was machen !!! (SUB-Flags) */"); + } else { + start_brace (); + switch (size) { + case sz_byte: + printf ("\tULONG ccr, shift, %s;\n", value); + printf ("\t__asm__(\"mov %%4,%%3,lsl#24\n\tsubs %%0,%%4,%%2,lsl#24\n\tmov %%0,%%0,asr#24\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + case sz_word: + printf ("\tULONG ccr, shift, %s;\n", value); + printf ("\t__asm__(\"mov %%4,%%3,lsl#16\n\tsubs %%0,%%4,%%2,lsl#16\n\tmov %%0,%%0,asr#16\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + case sz_long: + printf ("\tULONG ccr, %s;\n", value); + printf ("\t__asm__(\"subs %%0,%%3,%%2\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" + "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", value, src, dst); + printf ("\t*(ULONG*)®flags = ccr;\n"); + return; + } + } + break; + case flag_cmp: + if (strcmp (dst, "0") == 0) { + printf ("/*Error! Hier muss Peter noch was machen !!! (CMP-Flags)*/"); + } else { + start_brace (); + switch (size) { + case sz_byte: + printf ("\tULONG shift, ccr;\n"); + printf ("\t__asm__(\"mov %%3,%%2,lsl#24\n\tcmp %%3,%%1,lsl#24\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" + "\t: \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", src, dst); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + return; + case sz_word: + printf ("\tULONG shift, ccr;\n"); + printf ("\t__asm__(\"mov %%3,%%2,lsl#16\n\tcmp %%3,%%1,lsl#16\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" + "\t: \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", src, dst); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + return; + case sz_long: + printf ("\tULONG ccr;\n"); + printf ("\t__asm__(\"cmp %%2,%%1\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" + "\t: \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", src, dst); + printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); + /*printf ("\tprintf (\"%%08x %%08x %%08x\\n\", %s, %s, *((ULONG*)®flags));\n", src, dst); */ + return; + } + } + break; + } #endif genflags_normal (type, size, value, src, dst); } @@ -932,28 +1227,21 @@ static void gen_opcode (unsigned long int opcode) genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_SBCD: + /* Let's hope this works... */ genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); - printf ("\tuae_u16 newv, tmp_newv;\n"); - printf ("\tint bcd = 0;\n"); - printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); - printf ("\tif (newv_lo & 0xF0) { newv -= 6; bcd = 6; };\n"); - printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); - printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF);\n"); + printf ("\tuae_u16 newv;\n"); + printf ("\tint cflg;\n"); + printf ("\tif (newv_lo > 9) { newv_lo-=6; newv_hi-=0x10; }\n"); + printf ("\tnewv = newv_hi + (newv_lo & 0xF);"); + printf ("\tSET_CFLG (cflg = (newv_hi & 0x1F0) > 0x90);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } - else { - genflags (flag_zn, curi->size, "newv", "", ""); - printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); - } + printf ("\tif (cflg) newv -= 0x60;\n"); + genflags (flag_zn, curi->size, "newv", "", ""); + genflags (flag_sv, curi->size, "newv", "src", "dst"); genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_ADD: @@ -985,24 +1273,15 @@ static void gen_opcode (unsigned long int opcode) start_brace (); printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); - printf ("\tuae_u16 newv, tmp_newv;\n"); + printf ("\tuae_u16 newv;\n"); printf ("\tint cflg;\n"); - printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); - printf ("\tif (newv_lo > 9) { newv += 6; }\n"); - printf ("\tcflg = (newv & 0x3F0) > 0x90;\n"); - printf ("\tif (cflg) newv += 0x60;\n"); - printf ("\tSET_CFLG (cflg);\n"); + printf ("\tif (newv_lo > 9) { newv_lo +=6; }\n"); + printf ("\tnewv = newv_hi + newv_lo;"); + printf ("\tSET_CFLG (cflg = (newv & 0x1F0) > 0x90);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } - else { - genflags (flag_zn, curi->size, "newv", "", ""); - printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); - } + printf ("\tif (cflg) newv += 0x60;\n"); + genflags (flag_zn, curi->size, "newv", "", ""); + genflags (flag_sv, curi->size, "newv", "src", "dst"); genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_NEG: @@ -1026,21 +1305,12 @@ static void gen_opcode (unsigned long int opcode) printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); printf ("\tuae_u16 newv;\n"); printf ("\tint cflg;\n"); - printf ("\tif (newv_lo > 9) { newv_lo -= 6; }\n"); - printf ("\tnewv = newv_hi + newv_lo;\n"); - printf ("\tcflg = (newv & 0x1F0) > 0x90;\n"); - printf ("\tif (cflg) newv -= 0x60;\n"); - printf ("\tSET_CFLG (cflg);\n"); + printf ("\tif (newv_lo > 9) { newv_lo-=6; newv_hi-=0x10; }\n"); + printf ("\tnewv = newv_hi + (newv_lo & 0xF);"); + printf ("\tSET_CFLG (cflg = (newv_hi & 0x1F0) > 0x90);\n"); duplicate_carry(); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } - else { - genflags (flag_zn, curi->size, "newv", "", ""); - } + printf ("\tif (cflg) newv -= 0x60;\n"); + genflags (flag_zn, curi->size, "newv", "", ""); genastore ("newv", curi->smode, "srcreg", curi->size, "src"); break; case i_CLR: @@ -1076,7 +1346,7 @@ static void gen_opcode (unsigned long int opcode) else printf ("\tsrc &= 31;\n"); printf ("\tdst ^= (1 << src);\n"); - printf ("\tSET_ZFLG (((uae_u32)dst & (1 << src)) >> src);\n"); + printf ("\tSET_ZFLG ((dst & (1 << src)) >> src);\n"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; case i_BCLR: @@ -1199,10 +1469,10 @@ static void gen_opcode (unsigned long int opcode) curi->size == sz_word ? sz_word : sz_long, "src"); break; case i_MVMEL: - genmovemel ((uae_u16)opcode); + genmovemel (opcode); break; case i_MVMLE: - genmovemle ((uae_u16)opcode); + genmovemle (opcode); break; case i_TRAP: genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); @@ -1247,7 +1517,6 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); - /* gb-- the next two lines are deleted in Bernie's gencpu.c */ printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); @@ -1336,18 +1605,6 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_Bcc: - if (0 && !using_prefetch && !using_exception_3 && (cpu_level >= 2)) { - /* gb-- variant probably more favorable to compiler optimizations - also assumes no prefetch buffer is used - Hmm, that would make sense with processors capable of conditional moves */ - if (curi->size == sz_long && next_cpu_level < 1) - next_cpu_level = 1; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tm68k_incpc (cctrue(%d) ? ((uae_s32)src + 2) : %d);\n", curi->cc, m68k_pc_offset); - m68k_pc_offset = 0; - } - else { - /* original code for branch instructions */ if (curi->size == sz_long) { if (cpu_level < 2) { printf ("\tm68k_incpc(2);\n"); @@ -1373,10 +1630,9 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tm68k_incpc ((uae_s32)src + 2);\n"); fill_prefetch_0 (); - printf ("return;\n"); + printf ("\tgoto %s;\n", endlabelstr); printf ("didnt_jump:;\n"); need_endlabel = 1; - } break; case i_LEA: genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); @@ -1406,7 +1662,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\t\t\tm68k_incpc((uae_s32)offs + 2);\n"); fill_prefetch_0 (); - printf ("return;\n"); + printf ("\t\tgoto %s;\n", endlabelstr); printf ("\t\t}\n"); printf ("\t}\n"); need_endlabel = 1; @@ -1421,10 +1677,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tuaecptr oldpc = m68k_getpc();\n"); genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - sync_m68k_pc (); - /* Clear V flag when dividing by zero - Alcatraz Odyssey demo depends - * on this (actually, it's doing a DIVS). */ - printf ("\tif (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto %s; } else {\n", endlabelstr); + printf ("\tif(src == 0) { Exception(5,oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;\n"); printf ("\tuae_u32 rem = (uae_u32)dst %% (uae_u32)(uae_u16)src;\n"); /* The N flag appears to be set each time there is an overflow. @@ -1442,8 +1695,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tuaecptr oldpc = m68k_getpc();\n"); genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - sync_m68k_pc (); - printf ("\tif (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto %s; } else {\n", endlabelstr); + printf ("\tif(src == 0) { Exception(5,oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;\n"); printf ("\tuae_u16 rem = (uae_s32)dst %% (uae_s32)(uae_s16)src;\n"); printf ("\tif ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); @@ -1504,7 +1756,7 @@ static void gen_opcode (unsigned long int opcode) abort (); } printf ("\tSET_ZFLG (upper == reg || lower == reg);\n"); - printf ("\tSET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); + printf ("\tSET_CFLG (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); printf ("\tif ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); need_endlabel = 1; break; @@ -1523,7 +1775,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); - printf ("\t\tval = %s & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size)); + printf ("\t\tval = %s & (uae_u32)-sign;\n", bit_mask (curi->size)); printf ("\t\tSET_CFLG (sign);\n"); duplicate_carry (); if (source_is_imm1_8 (curi)) @@ -1534,7 +1786,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tSET_CFLG (val & 1);\n"); duplicate_carry (); printf ("\t\tval >>= 1;\n"); - printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-(uae_s32)sign;\n", + printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-sign;\n", bit_mask (curi->size), bit_size (curi->size)); printf ("\t\tval &= %s;\n", bit_mask (curi->size)); @@ -1703,12 +1955,12 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); + if (! source_is_imm1_8 (curi)) + force_range_for_rox ("cnt", curi->size); if (source_is_imm1_8 (curi)) printf ("{"); - else { - force_range_for_rox ("cnt", curi->size); + else printf ("\tif (cnt > 0) {\n"); - } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 loval = val >> (%d - cnt);\n", bit_size (curi->size) - 1); @@ -1733,12 +1985,12 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); + if (! source_is_imm1_8 (curi)) + force_range_for_rox ("cnt", curi->size); if (source_is_imm1_8 (curi)) printf ("{"); - else { - force_range_for_rox ("cnt", curi->size); + else printf ("\tif (cnt > 0) {\n"); - } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 hival = (val << 1) | GET_XFLG;\n"); @@ -1894,14 +2146,14 @@ static void gen_opcode (unsigned long int opcode) start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (! m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tm68k_movec2(src & 0xFFF, regp);\n"); break; case i_MOVE2C: genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (! m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tm68k_move2c(src & 0xFFF, regp);\n"); break; case i_CAS: { @@ -2041,7 +2293,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\ttmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7)));\n"); } printf ("\ttmp >>= (32 - width);\n"); - printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0);\n"); + printf ("\tSET_NFLG (tmp & (1 << (width-1)) ? 1 : 0);\n"); printf ("\tSET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);\n"); switch (curi->mnemo) { case i_BFTST: @@ -2069,8 +2321,6 @@ static void gen_opcode (unsigned long int opcode) break; case i_BFINS: printf ("\ttmp = m68k_dreg(regs, (extra >> 12) & 7);\n"); - printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0);\n"); - printf ("\tSET_ZFLG (tmp == 0);\n"); break; default: break; @@ -2141,19 +2391,19 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_arithmetic(opcode, extra);\n"); + printf ("\tfpp_opp(opcode,extra);\n"); break; case i_FDBcc: genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_dbcc(opcode, extra);\n"); + printf ("\tfdbcc_opp(opcode,extra);\n"); break; case i_FScc: genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_scc(opcode,extra);\n"); + printf ("\tfscc_opp(opcode,extra);\n"); break; case i_FTRAPcc: sync_m68k_pc (); @@ -2163,7 +2413,7 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_trapcc(opcode,oldpc);\n"); + printf ("\tftrapcc_opp(opcode,oldpc);\n"); break; case i_FBcc: sync_m68k_pc (); @@ -2172,59 +2422,35 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->dmode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_bcc(opcode,pc,extra);\n"); + printf ("\tfbcc_opp(opcode,pc,extra);\n"); break; case i_FSAVE: sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_save(opcode);\n"); + printf ("\tfsave_opp(opcode);\n"); break; case i_FRESTORE: sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_restore(opcode);\n"); + printf ("\tfrestore_opp(opcode);\n"); break; case i_CINVL: case i_CINVP: case i_CINVA: - /* gb-- srcreg now contains the cache field */ - - break; case i_CPUSHL: case i_CPUSHP: case i_CPUSHA: - /* gb-- srcreg now contains the cache field */ - break; case i_MOVE16: - if ((opcode & 0xfff8) == 0xf620) { - /* MOVE16 (Ax)+,(Ay)+ */ - printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); - printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); - printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); - printf ("\tput_long(memd, get_long(mems));\n"); - printf ("\tput_long(memd+4, get_long(mems+4));\n"); - printf ("\tput_long(memd+8, get_long(mems+8));\n"); - printf ("\tput_long(memd+12, get_long(mems+12));\n"); - printf ("\tif (srcreg != dstreg)\n"); - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } - else { - /* Other variants */ - genamode (curi->smode, "srcreg", curi->size, "mems", 0, 2); - genamode (curi->dmode, "dstreg", curi->size, "memd", 0, 2); - printf ("\tmemsa &= ~15;\n"); - printf ("\tmemda &= ~15;\n"); - printf ("\tput_long(memda, get_long(memsa));\n"); - printf ("\tput_long(memda+4, get_long(memsa+4));\n"); - printf ("\tput_long(memda+8, get_long(memsa+8));\n"); - printf ("\tput_long(memda+12, get_long(memsa+12));\n"); - if ((opcode & 0xfff8) == 0xf600) - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - else if ((opcode & 0xfff8) == 0xf608) - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } + printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); + printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); + printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); + printf ("\tput_long(memd, get_long(mems));\n"); + printf ("\tput_long(memd+4, get_long(mems+4));\n"); + printf ("\tput_long(memd+8, get_long(mems+8));\n"); + printf ("\tput_long(memd+12, get_long(mems+12));\n"); + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); break; case i_MMUOP: genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); @@ -2232,18 +2458,6 @@ static void gen_opcode (unsigned long int opcode) swap_opcode (); printf ("\tmmu_op(opcode,extra);\n"); break; - - case i_EMULOP_RETURN: - printf ("\tm68k_emulop_return();\n"); - m68k_pc_offset = 0; - break; - - case i_EMULOP: - printf ("\n"); - swap_opcode (); - printf ("\tm68k_emulop(opcode);\n"); - break; - default: abort (); break; @@ -2255,71 +2469,41 @@ static void gen_opcode (unsigned long int opcode) static void generate_includes (FILE * f) { fprintf (f, "#include \"sysdeps.h\"\n"); - fprintf (f, "#include \"m68k.h\"\n"); fprintf (f, "#include \"memory.h\"\n"); fprintf (f, "#include \"readcpu.h\"\n"); fprintf (f, "#include \"newcpu.h\"\n"); - fprintf (f, "#include \"fpu/fpu.h\"\n"); fprintf (f, "#include \"cputbl.h\"\n"); - - fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); - fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); - fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); - fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); - fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); - - fprintf (f, "#ifdef NOFLAGS\n"); - fprintf (f, "# include \"noflags.h\"\n"); - fprintf (f, "#endif\n"); } static int postfix; static void generate_one_opcode (int rp) { + int i; uae_u16 smsk, dmsk; long int opcode = opcode_map[rp]; - const char *opcode_str; if (table68k[opcode].mnemo == i_ILLG - || table68k[opcode].clev > (unsigned)cpu_level) + || table68k[opcode].clev > cpu_level) return; + for (i = 0; lookuptab[i].name[0]; i++) { + if (table68k[opcode].mnemo == lookuptab[i].mnemo) + break; + } + if (table68k[opcode].handler != -1) return; - opcode_str = get_instruction_string (opcode); - if (opcode_next_clev[rp] != cpu_level) { - if (table68k[opcode].flagdead == 0) - /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ - fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], - opcode, opcode_str); - else - fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], - opcode, opcode_str); + fprintf (stblfile, "{ op_%lx_%d, 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], + opcode, lookuptab[i].name); return; } - - if (table68k[opcode].flagdead == 0) - /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ - fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); - else - fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); - - fprintf (headerfile, "extern cpuop_func op_%lx_%d_nf;\n", opcode, postfix); - fprintf (headerfile, "extern cpuop_func op_%lx_%d_ff;\n", opcode, postfix); - - /* gb-- The "nf" variant for an instruction that doesn't set the condition - codes at all is the same as the "ff" variant, so we don't need the "nf" - variant to be compiled since it is mapped to the "ff" variant in the - smalltbl. */ - if (table68k[opcode].flagdead == 0) - printf ("#ifndef NOFLAGS\n"); - - printf ("void REGPARAM2 CPUFUNC(op_%lx_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); - printf ("\tcpuop_begin();\n"); + fprintf (stblfile, "{ op_%lx_%d, 0, %ld }, /* %s */\n", opcode, postfix, opcode, lookuptab[i].name); + fprintf (headerfile, "extern cpuop_func op_%lx_%d;\n", opcode, postfix); + printf ("void REGPARAM2 op_%lx_%d(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, lookuptab[i].name); switch (table68k[opcode].stype) { case 0: smsk = 7; break; @@ -2328,8 +2512,6 @@ static void generate_one_opcode (int rp) case 3: smsk = 7; break; case 4: smsk = 7; break; case 5: smsk = 63; break; - case 6: smsk = 255; break; - case 7: smsk = 3; break; default: abort (); } dmsk = 7; @@ -2339,12 +2521,7 @@ static void generate_one_opcode (int rp) && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 && table68k[opcode].smode != absw && table68k[opcode].smode != absl - && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16 - /* gb-- We don't want to fetch the EmulOp code since the EmulOp() - routine uses the whole opcode value. Maybe all the EmulOps - could be expanded out but I don't think it is an improvement */ - && table68k[opcode].stype != 6 - ) + && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16) { if (table68k[opcode].spos == -1) { if (((int) table68k[opcode].sreg) >= 128) @@ -2440,10 +2617,7 @@ static void generate_one_opcode (int rp) gen_opcode (opcode); if (need_endlabel) printf ("%s: ;\n", endlabelstr); - printf ("\tcpuop_end();\n"); printf ("}\n"); - if (table68k[opcode].flagdead == 0) - printf ("\n#endif\n"); opcode_next_clev[rp] = next_cpu_level; opcode_last_postfix[rp] = postfix; } @@ -2454,13 +2628,7 @@ static void generate_func (void) using_prefetch = 0; using_exception_3 = 0; -#if !USE_PREFETCH_BUFFER - /* gb-- No need for a prefetch buffer, nor exception 3 handling */ - /* Anyway, Basilisk2 does not use the op_smalltbl_5 table... */ - for (i = 0; i <= 4; i++) { -#else for (i = 0; i < 6; i++) { -#endif cpu_level = 4 - i; if (i == 5) { cpu_level = 0; @@ -2470,18 +2638,12 @@ static void generate_func (void) opcode_next_clev[rp] = 0; } postfix = i; - fprintf (stblfile, "struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); - - /* Disable spurious warnings. */ - printf ("\n" - "#ifdef _MSC_VER\n" - "#pragma warning(disable:4102) /* unreferenced label */\n" - "#endif\n"); + fprintf (stblfile, "struct cputbl op_smalltbl_%d[] = {\n", postfix); /* sam: this is for people with low memory (eg. me :)) */ printf ("\n" "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_3) && !defined(PART_4) && " "!defined(PART_5) && !defined(PART_6) && " "!defined(PART_7) && !defined(PART_8)" "\n" @@ -2510,7 +2672,6 @@ static void generate_func (void) int main (int argc, char **argv) { - FILE *out; read_table68k (); do_merges (); @@ -2524,9 +2685,9 @@ int main (int argc, char **argv) * cputbl.h that way), but cpuopti can't cope. That could be fixed, but * I don't dare to touch the 68k version. */ - headerfile = fopen ("cputbl.h", "w"); - stblfile = fopen ("cpustbl.cpp", "w"); - out = freopen ("cpuemu.cpp", "w", stdout); + headerfile = fopen ("cputbl.h", "wb"); + stblfile = fopen ("cpustbl.cpp", "wb"); + freopen ("cpuemu.cpp", "wb", stdout); generate_includes (stdout); generate_includes (stblfile); @@ -2534,9 +2695,5 @@ int main (int argc, char **argv) generate_func (); free (table68k); - fclose (headerfile); - fclose (stblfile); - fflush (out); - return 0; } diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index f329cb3ed..f1ff69775 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -1,65 +1,34 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - machine dependent bits - * - * Copyright 1996 Bernd Schmidt - * - * 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 M68K_FLAGS_H -#define M68K_FLAGS_H - -#ifdef OPTIMIZED_FLAGS - -#if defined(X86_ASSEMBLY) || defined(X86_64_ASSEMBLY) || defined(MSVC_INTRINSICS) - -#ifndef SAHF_SETO_PROFITABLE - -/* PUSH/POP instructions are naturally 64-bit sized on x86-64, thus - unsigned long hereunder is either 64-bit or 32-bit wide depending - on the target. */ -struct flag_struct { - unsigned long cznv; - unsigned long x; -}; + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation - machine dependent bits + * + * Copyright 1996 Bernd Schmidt + */ -#define FLAGVAL_Z 0x40 -#define FLAGVAL_N 0x80 +#if defined(__i386__) && defined(X86_ASSEMBLY) -#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x40) | (((y) & 1) << 6)) -#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x800) | (((y) & 1) << 11)) -#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x80) | (((y) & 1) << 7)) -#define SET_XFLG(y) (regflags.x = (y)) +struct flag_struct { + unsigned int cznv; + unsigned int x; +}; -#define GET_ZFLG ((regflags.cznv >> 6) & 1) -#define GET_CFLG (regflags.cznv & 1) -#define GET_VFLG ((regflags.cznv >> 11) & 1) -#define GET_NFLG ((regflags.cznv >> 7) & 1) -#define GET_XFLG (regflags.x & 1) +#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x40) | (((y) & 1) << 6)) +#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x800) | (((y) & 1) << 11)) +#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x80) | (((y) & 1) << 7)) +#define SET_XFLG(y) (regflags.x = (y)) -#define CLEAR_CZNV (regflags.cznv = 0) -#define GET_CZNV (regflags.cznv) -#define IOR_CZNV(X) (regflags.cznv |= (X)) -#define SET_CZNV(X) (regflags.cznv = (X)) +#define GET_ZFLG ((regflags.cznv >> 6) & 1) +#define GET_CFLG (regflags.cznv & 1) +#define GET_VFLG ((regflags.cznv >> 11) & 1) +#define GET_NFLG ((regflags.cznv >> 7) & 1) +#define GET_XFLG (regflags.x & 1) -#define COPY_CARRY (regflags.x = regflags.cznv) +#define CLEAR_CZNV (regflags.cznv = 0) +#define COPY_CARRY (regflags.x = regflags.cznv) -extern struct flag_struct regflags ASM_SYM ("regflags"); +extern struct flag_struct regflags __asm__ ("regflags"); static __inline__ int cctrue(int cc) { @@ -89,270 +58,91 @@ static __inline__ int cctrue(int cc) return 0; } -#define optflag_testl(v) \ - __asm__ __volatile__ ("andl %1,%1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ +#define x86_flag_testl(v) \ + __asm__ __volatile__ ("testl %1,%1\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "r" (v) : "cc") -#define optflag_testw(v) \ - __asm__ __volatile__ ("andw %w1,%w1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ +#define x86_flag_testw(v) \ + __asm__ __volatile__ ("testw %w1,%w1\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "r" (v) : "cc") -#define optflag_testb(v) \ - __asm__ __volatile__ ("andb %b1,%b1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ +#define x86_flag_testb(v) \ + __asm__ __volatile__ ("testb %b1,%b1\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "q" (v) : "cc") -#define optflag_addl(v, s, d) do { \ +#define x86_flag_addl(v, s, d) do { \ __asm__ __volatile__ ("addl %k2,%k1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_addw(v, s, d) do { \ +#define x86_flag_addw(v, s, d) do { \ __asm__ __volatile__ ("addw %w2,%w1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_addb(v, s, d) do { \ +#define x86_flag_addb(v, s, d) do { \ __asm__ __volatile__ ("addb %b2,%b1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_subl(v, s, d) do { \ +#define x86_flag_subl(v, s, d) do { \ __asm__ __volatile__ ("subl %k2,%k1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_subw(v, s, d) do { \ +#define x86_flag_subw(v, s, d) do { \ __asm__ __volatile__ ("subw %w2,%w1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_subb(v, s, d) do { \ +#define x86_flag_subb(v, s, d) do { \ __asm__ __volatile__ ("subb %b2,%b1\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define optflag_cmpl(s, d) \ +#define x86_flag_cmpl(s, d) \ __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") -#define optflag_cmpw(s, d) \ +#define x86_flag_cmpw(s, d) \ __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") -#define optflag_cmpb(s, d) \ +#define x86_flag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \ - "pushf\n\t" \ - "pop %0\n\t" \ + "pushfl\n\t" \ + "popl %0\n\t" \ : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc") -#else - -struct flag_struct { - uae_u32 cznv; - uae_u32 x; -}; - -#define FLAGVAL_Z 0x4000 -#define FLAGVAL_N 0x8000 - -#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x4000) | (((y) & 1) << 14)) -#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~0x100) | (((y) & 1) << 8)) -#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x1) | (((y) & 1))) -#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x8000) | (((y) & 1) << 15)) -#define SET_XFLG(y) (regflags.x = (y)) - -#define GET_ZFLG ((regflags.cznv >> 14) & 1) -#define GET_CFLG ((regflags.cznv >> 8) & 1) -#define GET_VFLG ((regflags.cznv >> 0) & 1) -#define GET_NFLG ((regflags.cznv >> 15) & 1) -#define GET_XFLG (regflags.x & 1) - -#define CLEAR_CZNV (regflags.cznv = 0) -#define GET_CZNV (regflags.cznv) -#define IOR_CZNV(X) (regflags.cznv |= (X)) -#define SET_CZNV(X) (regflags.cznv = (X)) - -#define COPY_CARRY (regflags.x = (regflags.cznv)>>8) - -extern struct flag_struct regflags ASM_SYM("regflags"); - -static __inline__ int cctrue(int cc) -{ - uae_u32 cznv = regflags.cznv; - switch(cc){ - case 0: return 1; /* T */ - case 1: return 0; /* F */ - case 2: return (cznv & 0x4100) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ - case 3: return (cznv & 0x4100) != 0; /* GET_CFLG || GET_ZFLG; LS */ - case 4: return (cznv & 0x100) == 0; /* !GET_CFLG; CC */ - case 5: return (cznv & 0x100) != 0; /* GET_CFLG; CS */ - case 6: return (cznv & 0x4000) == 0; /* !GET_ZFLG; NE */ - case 7: return (cznv & 0x4000) != 0; /* GET_ZFLG; EQ */ - case 8: return (cznv & 0x01) == 0; /* !GET_VFLG; VC */ - case 9: return (cznv & 0x01) != 0; /* GET_VFLG; VS */ - case 10:return (cznv & 0x8000) == 0; /* !GET_NFLG; PL */ - case 11:return (cznv & 0x8000) != 0; /* GET_NFLG; MI */ - case 12:return (((cznv << 15) ^ cznv) & 0x8000) == 0; /* GET_NFLG == GET_VFLG; GE */ - case 13:return (((cznv << 15) ^ cznv) & 0x8000) != 0;/* GET_NFLG != GET_VFLG; LT */ - case 14: - cznv &= 0xc001; - return (((cznv << 15) ^ cznv) & 0xc000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ - case 15: - cznv &= 0xc001; - return (((cznv << 15) ^ cznv) & 0xc000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ - } - abort(); - return 0; -} - -/* Manually emit LAHF instruction so that 64-bit assemblers can grok it */ -#if defined __x86_64__ && defined __GNUC__ -#define ASM_LAHF ".byte 0x9f" -#else -#define ASM_LAHF "lahf" -#endif - -/* Is there any way to do this without declaring *all* memory clobbered? - I.e. any way to tell gcc that some byte-sized value is in %al? */ -#define optflag_testl(v) \ - __asm__ __volatile__ ("andl %0,%0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "r" (v) : "%eax","cc","memory") - -#define optflag_testw(v) \ - __asm__ __volatile__ ("andw %w0,%w0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "r" (v) : "%eax","cc","memory") - -#define optflag_testb(v) \ - __asm__ __volatile__ ("andb %b0,%b0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "q" (v) : "%eax","cc","memory") - -#define optflag_addl(v, s, d) do { \ - __asm__ __volatile__ ("addl %k1,%k0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_addw(v, s, d) do { \ - __asm__ __volatile__ ("addw %w1,%w0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_addb(v, s, d) do { \ - __asm__ __volatile__ ("addb %b1,%b0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_subl(v, s, d) do { \ - __asm__ __volatile__ ("subl %k1,%k0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_subw(v, s, d) do { \ - __asm__ __volatile__ ("subw %w1,%w0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_subb(v, s, d) do { \ - __asm__ __volatile__ ("subb %b1,%b0\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ - } while (0) - -#define optflag_cmpl(s, d) \ - __asm__ __volatile__ ("cmpl %k0,%k1\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "rmi" (s), "r" (d) : "%eax","cc","memory") - -#define optflag_cmpw(s, d) \ - __asm__ __volatile__ ("cmpw %w0,%w1\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "rmi" (s), "r" (d) : "%eax","cc","memory"); - -#define optflag_cmpb(s, d) \ - __asm__ __volatile__ ("cmpb %b0,%b1\n\t" \ - ASM_LAHF "\n\t" \ - "seto %%al\n\t" \ - "movb %%al,regflags\n\t" \ - "movb %%ah,regflags+1\n\t" \ - : : "qmi" (s), "q" (d) : "%eax","cc","memory") - -#endif - -#elif defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) +#elif defined(__sparc__) && (defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY)) struct flag_struct { unsigned char nzvc; @@ -361,26 +151,19 @@ struct flag_struct { extern struct flag_struct regflags; -#define FLAGVAL_Z 0x04 -#define FLAGVAL_N 0x08 - -#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) -#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) -#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) -#define SET_XFLG(y) (regflags.x = (y)) +#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) +#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) +#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) +#define SET_XFLG(y) (regflags.x = (y)) -#define GET_ZFLG ((regflags.nzvc >> 2) & 1) -#define GET_CFLG (regflags.nzvc & 1) -#define GET_VFLG ((regflags.nzvc >> 1) & 1) -#define GET_NFLG ((regflags.nzvc >> 3) & 1) -#define GET_XFLG (regflags.x & 1) - -#define CLEAR_CZNV (regflags.nzvc = 0) -#define GET_CZNV (reflags.nzvc) -#define IOR_CZNV(X) (refglags.nzvc |= (X)) -#define SET_CZNV(X) (regflags.nzvc = (X)) +#define GET_ZFLG ((regflags.nzvc >> 2) & 1) +#define GET_CFLG (regflags.nzvc & 1) +#define GET_VFLG ((regflags.nzvc >> 1) & 1) +#define GET_NFLG ((regflags.nzvc >> 3) & 1) +#define GET_XFLG (regflags.x & 1) +#define CLEAR_CZNV (regflags.nzvc = 0) #define COPY_CARRY (regflags.x = regflags.nzvc) static __inline__ int cctrue(int cc) @@ -1004,8 +787,6 @@ static inline uae_u32 sparc_v9_flag_addx_32(flag_struct *flags, uae_u32 src, uae #endif /* SPARC_V9_ASSEMBLY */ -#endif - #else struct flag_struct { @@ -1024,27 +805,6 @@ extern struct flag_struct regflags; #define VFLG (regflags.v) #define XFLG (regflags.x) -#define SET_CFLG(x) (CFLG = (x)) -#define SET_NFLG(x) (NFLG = (x)) -#define SET_VFLG(x) (VFLG = (x)) -#define SET_ZFLG(x) (ZFLG = (x)) -#define SET_XFLG(x) (XFLG = (x)) - -#define GET_CFLG CFLG -#define GET_NFLG NFLG -#define GET_VFLG VFLG -#define GET_ZFLG ZFLG -#define GET_XFLG XFLG - -#define CLEAR_CZNV do { \ - SET_CFLG (0); \ - SET_ZFLG (0); \ - SET_NFLG (0); \ - SET_VFLG (0); \ -} while (0) - -#define COPY_CARRY (SET_XFLG (GET_CFLG)) - static __inline__ int cctrue(const int cc) { switch(cc){ @@ -1068,6 +828,4 @@ static __inline__ int cctrue(const int cc) return 0; } -#endif /* OPTIMIZED_FLAGS */ - -#endif /* M68K_FLAGS_H */ +#endif diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index a88ebf5ea..4adf0cc80 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -1,24 +1,10 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * (c) 1995 Bernd Schmidt - * - * 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 - */ + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * (c) 1995 Bernd Schmidt + */ #include #include @@ -36,14 +22,9 @@ extern int intlev(void); // From baisilisk_glue.cpp #include "memory.h" #include "readcpu.h" #include "newcpu.h" -#include "fpu/fpu.h" - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) -B2_mutex *spcflags_lock = NULL; -#endif - -bool quit_program = false; +int quit_program = 0; +int debugging = 0; struct flag_struct regflags; /* Opcode of faulting instruction */ @@ -60,69 +41,11 @@ int movem_index1[256]; int movem_index2[256]; int movem_next[256]; -cpuop_func *cpufunctbl[65536]; - -#if FLIGHT_RECORDER -struct rec_step { - uae_u32 pc; -#if FLIGHT_RECORDER >= 2 - uae_u32 d[8]; - uae_u32 a[8]; -#endif -}; - -const int LOG_SIZE = 32768; -static rec_step log[LOG_SIZE]; -static int log_ptr = -1; // First time initialization - -static const char *log_filename(void) -{ - const char *name = getenv("M68K_LOG_FILE"); - return name ? name : "log.68k"; -} - -void m68k_record_step(uaecptr pc) -{ -#if FLIGHT_RECORDER >= 2 - /* XXX: if LSB is set, we are recording from generated code and we - don't support registers recording yet. */ - if ((pc & 1) == 0) { - for (int i = 0; i < 8; i++) { - log[log_ptr].d[i] = m68k_dreg(regs, i); - log[log_ptr].a[i] = m68k_areg(regs, i); - } - } -#endif - log[log_ptr].pc = pc; - log_ptr = (log_ptr + 1) % LOG_SIZE; -} - -static void dump_log(void) -{ - FILE *f = fopen(log_filename(), "w"); - if (f == NULL) - return; - for (int i = 0; i < LOG_SIZE; i++) { - int j = (i + log_ptr) % LOG_SIZE; - uae_u32 pc = log[j].pc & ~1; - fprintf(f, "pc %08x", pc); -#if FLIGHT_RECORDER >= 2 - fprintf(f, "\n"); - if ((log[j].pc & 1) == 0) { - fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", log[j].d[0], log[j].d[1], log[j].d[2], log[j].d[3]); - fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", log[j].d[4], log[j].d[5], log[j].d[6], log[j].d[7]); - fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", log[j].a[0], log[j].a[1], log[j].a[2], log[j].a[3]); - fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", log[j].a[4], log[j].a[5], log[j].a[6], log[j].a[7]); - } -#else - fprintf(f, " | "); -#endif - - } - fclose(f); -} -#endif +int fpp_movem_index1[256]; +int fpp_movem_index2[256]; +int fpp_movem_next[256]; +cpuop_func *cpufunctbl[65536]; #define COUNT_INSTRS 0 @@ -187,9 +110,9 @@ static __inline__ unsigned int cft_map (unsigned int f) #endif } -void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; +static void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; -void REGPARAM2 op_illg_1 (uae_u32 opcode) +static void REGPARAM2 op_illg_1 (uae_u32 opcode) { op_illg (cft_map (opcode)); } @@ -198,7 +121,7 @@ static void build_cpufunctbl (void) { int i; unsigned long opcode; - unsigned int cpu_level = 0; // 68000 (default) + int cpu_level = 0; // 68000 (default) if (CPUType == 4) cpu_level = 4; // 68040 with FPU else { @@ -210,11 +133,11 @@ static void build_cpufunctbl (void) cpu_level = 1; } struct cputbl *tbl = ( - cpu_level == 4 ? op_smalltbl_0_ff - : cpu_level == 3 ? op_smalltbl_1_ff - : cpu_level == 2 ? op_smalltbl_2_ff - : cpu_level == 1 ? op_smalltbl_3_ff - : op_smalltbl_4_ff); + cpu_level == 4 ? op_smalltbl_0 + : cpu_level == 3 ? op_smalltbl_1 + : cpu_level == 2 ? op_smalltbl_2 + : cpu_level == 1 ? op_smalltbl_3 + : op_smalltbl_4); for (opcode = 0; opcode < 65536; opcode++) cpufunctbl[cft_map (opcode)] = op_illg_1; @@ -254,6 +177,15 @@ void init_m68k (void) movem_index2[i] = 7-j; movem_next[i] = i & (~(1 << j)); } + for (i = 0 ; i < 256 ; i++) { + int j; + for (j = 7 ; j >= 0 ; j--) { + if (i & (1 << j)) break; + } + fpp_movem_index1[i] = 7-j; + fpp_movem_index2[i] = j; + fpp_movem_next[i] = i & (~(1 << j)); + } #if COUNT_INSTRS { FILE *f = fopen (icountfilename (), "r"); @@ -274,19 +206,6 @@ void init_m68k (void) do_merges (); build_cpufunctbl (); - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - spcflags_lock = B2_create_mutex(); -#endif - fpu_init(CPUType == 4); -} - -void exit_m68k (void) -{ - fpu_exit (); -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - B2_delete_mutex(spcflags_lock); -#endif } struct regstruct regs, lastint_regs; @@ -295,15 +214,9 @@ static int backup_pointer = 0; static long int m68kpc_offset; int lastint_no; -#if DIRECT_ADDRESSING -#define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) -#define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) -#define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) -#else #define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1) #define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) #define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) -#endif uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf) { @@ -722,18 +635,15 @@ void MakeFromSR (void) } } - SPCFLAGS_SET( SPCFLAG_INT ); + regs.spcflags |= SPCFLAG_INT; if (regs.t1 || regs.t0) - SPCFLAGS_SET( SPCFLAG_TRACE ); + regs.spcflags |= SPCFLAG_TRACE; else - /* Keep SPCFLAG_DOTRACE, we still want a trace exception for - SR-modifying instructions (including STOP). */ - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + regs.spcflags &= ~(SPCFLAG_TRACE | SPCFLAG_DOTRACE); } void Exception(int nr, uaecptr oldpc) { - uae_u32 currpc = m68k_getpc (); MakeSR(); if (!regs.s) { regs.usp = m68k_areg(regs, 7); @@ -762,7 +672,7 @@ void Exception(int nr, uaecptr oldpc) m68k_areg(regs, 7) -= 2; put_word (m68k_areg(regs, 7), nr * 4); m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), currpc); + put_long (m68k_areg(regs, 7), m68k_getpc ()); m68k_areg(regs, 7) -= 2; put_word (m68k_areg(regs, 7), regs.sr); regs.sr |= (1 << 13); @@ -788,15 +698,14 @@ void Exception(int nr, uaecptr oldpc) } } m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), currpc); + put_long (m68k_areg(regs, 7), m68k_getpc ()); kludge_me_do: m68k_areg(regs, 7) -= 2; put_word (m68k_areg(regs, 7), regs.sr); m68k_setpc (get_long (regs.vbr + 4*nr)); - SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); fill_prefetch_0 (); regs.t1 = regs.t0 = regs.m = 0; - SPCFLAGS_CLEAR( SPCFLAG_TRACE | SPCFLAG_DOTRACE ); + regs.spcflags &= ~(SPCFLAG_TRACE | SPCFLAG_DOTRACE); } static void Interrupt(int nr) @@ -807,48 +716,20 @@ static void Interrupt(int nr) Exception(nr+24, 0); regs.intmask = nr; - SPCFLAGS_SET( SPCFLAG_INT ); + regs.spcflags |= SPCFLAG_INT; } -static int caar, cacr, tc, itt0, itt1, dtt0, dtt1, mmusr, urp, srp; - -static int movec_illg (int regno) -{ - switch (CPUType) { - case 1: - if ((regno & 0x7ff) <= 1) - return 0; - break; - case 2: - case 3: - if ((regno & 0x7ff) <= 2) - return 0; - if (regno == 3 || regno == 4) - return 0; - break; - case 4: - if ((regno & 0x7ff) <= 7) { - if (regno != 0x802) - return 0; - } - break; - } - return 1; -} +static int caar, cacr, tc, itt0, itt1, dtt0, dtt1; -int m68k_move2c (int regno, uae_u32 *regp) +void m68k_move2c (int regno, uae_u32 *regp) { - if (movec_illg (regno)) { + if (CPUType == 1 && (regno & 0x7FF) > 1) op_illg (0x4E7B); - return 0; - } else { + else switch (regno) { case 0: regs.sfc = *regp & 7; break; case 1: regs.dfc = *regp & 7; break; - case 2: - cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); - - break; + case 2: cacr = *regp & 0x3; break; /* ignore C and CE */ case 3: tc = *regp & 0xc000; break; case 4: itt0 = *regp & 0xffffe364; break; case 5: itt1 = *regp & 0xffffe364; break; @@ -859,24 +740,17 @@ int m68k_move2c (int regno, uae_u32 *regp) case 0x802: caar = *regp &0xfc; break; case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; - case 0x805: mmusr = *regp; break; - case 0x806: urp = *regp; break; - case 0x807: srp = *regp; break; default: op_illg (0x4E7B); - return 0; + break; } - } - return 1; } -int m68k_movec2 (int regno, uae_u32 *regp) +void m68k_movec2 (int regno, uae_u32 *regp) { - if (movec_illg (regno)) - { + if (CPUType == 1 && (regno & 0x7FF) > 1) op_illg (0x4E7A); - return 0; - } else { + else switch (regno) { case 0: *regp = regs.sfc; break; case 1: *regp = regs.dfc; break; @@ -891,15 +765,10 @@ int m68k_movec2 (int regno, uae_u32 *regp) case 0x802: *regp = caar; break; case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; - case 0x805: *regp = mmusr; break; - case 0x806: *regp = urp; break; - case 0x807: *regp = srp; break; default: op_illg (0x4E7A); - return 0; - } + break; } - return 1; } static __inline__ int @@ -957,8 +826,8 @@ void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) SET_CFLG (0); SET_ZFLG (((uae_s32)quot) == 0); SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = (uae_u32)rem; - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; } } else { /* unsigned */ @@ -980,8 +849,8 @@ void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) SET_CFLG (0); SET_ZFLG (((uae_s32)quot) == 0); SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = (uae_u32)rem; - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; } } #else @@ -1157,16 +1026,12 @@ static char* ccnames[] = { "T ","F ","HI","LS","CC","CS","NE","EQ", "VC","VS","PL","MI","GE","LT","GT","LE" }; -// If value is greater than zero, this means we are still processing an EmulOp -// because the counter is incremented only in m68k_execute(), i.e. interpretive -// execution only -static int m68k_execute_depth = 0; - void m68k_reset (void) { m68k_areg (regs, 7) = 0x2000; m68k_setpc (ROMBaseMac + 0x2a); fill_prefetch_0 (); + regs.kick_mask = 0xF80000; regs.s = 1; regs.m = 0; regs.stopped = 0; @@ -1177,29 +1042,29 @@ void m68k_reset (void) SET_CFLG (0); SET_VFLG (0); SET_NFLG (0); - SPCFLAGS_INIT( 0 ); + regs.spcflags = 0; regs.intmask = 7; regs.vbr = regs.sfc = regs.dfc = 0; - fpu_reset(); - -#if FLIGHT_RECORDER - log_ptr = 0; - memset(log, 0, sizeof(log)); -#endif - + regs.fpcr = regs.fpsr = regs.fpiar = 0; } -void m68k_emulop_return(void) +void REGPARAM2 op_illg (uae_u32 opcode) { - SPCFLAGS_SET( SPCFLAG_BRK ); - quit_program = true; -} + uaecptr pc = m68k_getpc (); -void m68k_emulop(uae_u32 opcode) -{ + + if ((opcode & 0xFF00) == 0x7100) { struct M68kRegisters r; int i; + // Return from Execute68k()? + if (opcode == M68K_EXEC_RETURN) { + regs.spcflags |= SPCFLAG_BRK; + quit_program = 1; + return; + } + + // Call EMUL_OP opcode for (i=0; i<8; i++) { r.d[i] = m68k_dreg(regs, i); r.a[i] = m68k_areg(regs, i); @@ -1213,17 +1078,18 @@ void m68k_emulop(uae_u32 opcode) } regs.sr = r.sr; MakeFromSR(); -} - -void REGPARAM2 op_illg (uae_u32 opcode) -{ - uaecptr pc = m68k_getpc (); + m68k_incpc(2); + fill_prefetch_0 (); + return; + } if ((opcode & 0xF000) == 0xA000) { Exception(0xA,0); return; } +// write_log ("Illegal instruction: %04x at %08lx\n", opcode, pc); + if ((opcode & 0xF000) == 0xF000) { Exception(0xB,0); return; @@ -1232,18 +1098,16 @@ void REGPARAM2 op_illg (uae_u32 opcode) write_log ("Illegal instruction: %04x at %08lx\n", opcode, pc); Exception (4,0); - return; } void mmu_op(uae_u32 opcode, uae_u16 extra) { - if ((opcode & 0xFE0) == 0x0500) { - /* PFLUSH */ - mmusr = 0; - } else if ((opcode & 0x0FD8) == 0x548) { - /* PTEST */ + if ((extra & 0xB000) == 0) { /* PMOVE instruction */ + + } else if ((extra & 0xF000) == 0x2000) { /* PLOAD instruction */ + } else if ((extra & 0xF000) == 0x8000) { /* PTEST instruction */ } else - op_illg (opcode); + op_illg (opcode); } static int n_insns = 0, n_spcinsns = 0; @@ -1252,14 +1116,14 @@ static uaecptr last_trace_ad = 0; static void do_trace (void) { - if (regs.t0 && CPUType >= 2) { + if (regs.t0) { uae_u16 opcode; /* should also include TRAP, CHK, SR modification FPcc */ /* probably never used so why bother */ /* We can afford this to be inefficient... */ m68k_setpc (m68k_getpc ()); fill_prefetch_0 (); - opcode = get_word(m68k_getpc()); + opcode = get_word (regs.pc); if (opcode == 0x4e72 /* RTE */ || opcode == 0x4e74 /* RTD */ || opcode == 0x4e75 /* RTS */ @@ -1275,80 +1139,97 @@ static void do_trace (void) && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) { last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); + regs.spcflags &= ~SPCFLAG_TRACE; + regs.spcflags |= SPCFLAG_DOTRACE; } } else if (regs.t1) { last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); + regs.spcflags &= ~SPCFLAG_TRACE; + regs.spcflags |= SPCFLAG_DOTRACE; } } -int m68k_do_specialties (void) -{ - if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { +static int do_specialties (void) +{ + /*n_spcinsns++;*/ + if (regs.spcflags & SPCFLAG_DOTRACE) { Exception (9,last_trace_ad); } - while (SPCFLAGS_TEST( SPCFLAG_STOP )) { - if (SPCFLAGS_TEST( SPCFLAG_INT | SPCFLAG_DOINT )){ - SPCFLAGS_CLEAR( SPCFLAG_INT | SPCFLAG_DOINT ); + while (regs.spcflags & SPCFLAG_STOP) { + if (regs.spcflags & (SPCFLAG_INT | SPCFLAG_DOINT)){ int intr = intlev (); + regs.spcflags &= ~(SPCFLAG_INT | SPCFLAG_DOINT); if (intr != -1 && intr > regs.intmask) { Interrupt (intr); regs.stopped = 0; - SPCFLAGS_CLEAR( SPCFLAG_STOP ); + regs.spcflags &= ~SPCFLAG_STOP; } } } - if (SPCFLAGS_TEST( SPCFLAG_TRACE )) + if (regs.spcflags & SPCFLAG_TRACE) do_trace (); - if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { - SPCFLAGS_CLEAR( SPCFLAG_DOINT ); + if (regs.spcflags & SPCFLAG_DOINT) { int intr = intlev (); + regs.spcflags &= ~SPCFLAG_DOINT; if (intr != -1 && intr > regs.intmask) { Interrupt (intr); regs.stopped = 0; } } - if (SPCFLAGS_TEST( SPCFLAG_INT )) { - SPCFLAGS_CLEAR( SPCFLAG_INT ); - SPCFLAGS_SET( SPCFLAG_DOINT ); + if (regs.spcflags & SPCFLAG_INT) { + regs.spcflags &= ~SPCFLAG_INT; + regs.spcflags |= SPCFLAG_DOINT; } - if (SPCFLAGS_TEST( SPCFLAG_BRK )) { - SPCFLAGS_CLEAR( SPCFLAG_BRK ); + if (regs.spcflags & (SPCFLAG_BRK | SPCFLAG_MODE_CHANGE)) { + regs.spcflags &= ~(SPCFLAG_BRK | SPCFLAG_MODE_CHANGE); return 1; } return 0; } -void m68k_do_execute (void) +static void m68k_run_1 (void) { for (;;) { uae_u32 opcode = GET_OPCODE; -#if FLIGHT_RECORDER - m68k_record_step(m68k_getpc()); -#endif (*cpufunctbl[opcode])(opcode); - cpu_check_ticks(); - if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { - if (m68k_do_specialties()) + if (regs.spcflags) { + if (do_specialties()) return; } } } -void m68k_execute (void) -{ +#define m68k_run1 m68k_run_1 + +int in_m68k_go = 0; +void m68k_go (int may_quit) +{ +// m68k_go() must be reentrant for Execute68k() and Execute68kTrap() to work +/* + if (in_m68k_go || !may_quit) { + write_log("Bug! m68k_go is not reentrant.\n"); + abort(); + } +*/ + in_m68k_go++; for (;;) { - if (quit_program) + if (quit_program > 0) { + if (quit_program == 1) break; - m68k_do_execute(); + quit_program = 0; + m68k_reset (); + } + m68k_run1(); } - + if (debugging) { + uaecptr nextpc; + m68k_dumpstate(&nextpc); + exit(1); + } + in_m68k_go--; } static void m68k_verify (uaecptr addr, uaecptr *nextpc) @@ -1457,10 +1338,16 @@ void m68k_dumpstate (uaecptr *nextpc) printf ("T=%d%d S=%d M=%d X=%d N=%d Z=%d V=%d C=%d IMASK=%d\n", regs.t1, regs.t0, regs.s, regs.m, GET_XFLG, GET_NFLG, GET_ZFLG, GET_VFLG, GET_CFLG, regs.intmask); - - fpu_dump_registers(); - fpu_dump_flags(); - + for (i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, regs.fp[i]); + if ((i & 3) == 3) printf ("\n"); + } + printf ("N=%d Z=%d I=%d NAN=%d\n", + (regs.fpsr & 0x8000000) != 0, + (regs.fpsr & 0x4000000) != 0, + (regs.fpsr & 0x2000000) != 0, + (regs.fpsr & 0x1000000) != 0); + m68k_disasm(m68k_getpc (), nextpc, 1); if (nextpc) printf ("next PC: %08lx\n", *nextpc); diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index a15d79d80..dc174a783 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -1,36 +1,47 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * Copyright 1995 Bernd Schmidt - * - * 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 NEWCPU_H -#define NEWCPU_H - -#ifndef FLIGHT_RECORDER -#define FLIGHT_RECORDER 0 + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + */ + +#define SPCFLAG_STOP 2 +#define SPCFLAG_DISK 4 +#define SPCFLAG_INT 8 +#define SPCFLAG_BRK 16 +#define SPCFLAG_EXTRA_CYCLES 32 +#define SPCFLAG_TRACE 64 +#define SPCFLAG_DOTRACE 128 +#define SPCFLAG_DOINT 256 +#define SPCFLAG_BLTNASTY 512 +#define SPCFLAG_EXEC 1024 +#define SPCFLAG_MODE_CHANGE 8192 + +#ifndef SET_CFLG + +#define SET_CFLG(x) (CFLG = (x)) +#define SET_NFLG(x) (NFLG = (x)) +#define SET_VFLG(x) (VFLG = (x)) +#define SET_ZFLG(x) (ZFLG = (x)) +#define SET_XFLG(x) (XFLG = (x)) + +#define GET_CFLG CFLG +#define GET_NFLG NFLG +#define GET_VFLG VFLG +#define GET_ZFLG ZFLG +#define GET_XFLG XFLG + +#define CLEAR_CZNV do { \ + SET_CFLG (0); \ + SET_ZFLG (0); \ + SET_NFLG (0); \ + SET_VFLG (0); \ +} while (0) + +#define COPY_CARRY (SET_XFLG (GET_CFLG)) #endif -#include "m68k.h" -#include "readcpu.h" -#include "spcflags.h" - extern int areg_byteinc[]; extern int imm8_table[]; @@ -38,66 +49,56 @@ extern int movem_index1[256]; extern int movem_index2[256]; extern int movem_next[256]; -extern int broken_in; +extern int fpp_movem_index1[256]; +extern int fpp_movem_index2[256]; +extern int fpp_movem_next[256]; -#ifdef X86_ASSEMBLY -/* This hack seems to force all register saves (pushl %reg) to be moved to the - begining of the function, thus making it possible to cpuopti to remove them - since m68k_run_1 will save those registers before calling the instruction - handler */ -# define cpuop_tag(tag) __asm__ __volatile__ ( "#cpuop_" tag ) -#else -# define cpuop_tag(tag) ; -#endif - -#define cpuop_begin() do { cpuop_tag("begin"); } while (0) -#define cpuop_end() do { cpuop_tag("end"); } while (0) +extern int broken_in; typedef void REGPARAM2 cpuop_func (uae_u32) REGPARAM; - + struct cputbl { cpuop_func *handler; - uae_u16 specific; + int specific; uae_u16 opcode; }; -extern cpuop_func *cpufunctbl[65536] ASM_SYM("cpufunctbl"); - extern void REGPARAM2 op_illg (uae_u32) REGPARAM; typedef char flagtype; -struct regstruct { - uae_u32 regs[16]; +extern struct regstruct +{ + uae_u32 regs[16]; + uaecptr usp,isp,msp; + uae_u16 sr; + flagtype t1; + flagtype t0; + flagtype s; + flagtype m; + flagtype x; + flagtype stopped; + int intmask; + + uae_u32 pc; + uae_u8 *pc_p; + uae_u8 *pc_oldp; - uae_u32 pc; - uae_u8 * pc_p; - uae_u8 * pc_oldp; + uae_u32 vbr,sfc,dfc; - spcflags_t spcflags; - int intmask; + double fp[8]; + uae_u32 fpcr,fpsr,fpiar; - uae_u32 vbr, sfc, dfc; - uaecptr usp, isp, msp; - uae_u16 sr; - flagtype t1; - flagtype t0; - flagtype s; - flagtype m; - flagtype x; - flagtype stopped; + uae_u32 spcflags; + uae_u32 kick_mask; -#if USE_PREFETCH_BUFFER /* Fellow sources say this is 4 longwords. That's impossible. It needs * to be at least a longword. The HRM has some cryptic comment about two * instructions being on the same longword boundary. * The way this is implemented now seems like a good compromise. */ uae_u32 prefetch; -#endif -}; - -extern regstruct regs, lastint_regs; +} regs, lastint_regs; #define m68k_dreg(r,num) ((r).regs[(num)]) #define m68k_areg(r,num) (((r).regs + 8)[(num)]) @@ -112,7 +113,6 @@ extern regstruct regs, lastint_regs; #define GET_OPCODE (get_iword (0)) #endif -#if USE_PREFETCH_BUFFER static __inline__ uae_u32 get_ibyte_prefetch (uae_s32 o) { if (o > 3 || o < 0) @@ -135,13 +135,11 @@ static __inline__ uae_u32 get_ilong_prefetch (uae_s32 o) return do_get_mem_long(®s.prefetch); return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4)); } -#endif #define m68k_incpc(o) (regs.pc_p += (o)) static __inline__ void fill_prefetch_0 (void) { -#if USE_PREFETCH_BUFFER uae_u32 r; #ifdef UNALIGNED_PROFITABLE r = *(uae_u32 *)regs.pc_p; @@ -150,7 +148,6 @@ static __inline__ void fill_prefetch_0 (void) r = do_get_mem_long ((uae_u32 *)regs.pc_p); do_put_mem_long (®s.prefetch, r); #endif -#endif } #if 0 @@ -190,54 +187,49 @@ static __inline__ uae_u32 next_ilong (void) static __inline__ void m68k_setpc (uaecptr newpc) { -#if DIRECT_ADDRESSING - regs.pc_p = get_real_address(newpc); -#else regs.pc_p = regs.pc_oldp = get_real_address(newpc); regs.pc = newpc; -#endif } static __inline__ uaecptr m68k_getpc (void) { -#if DIRECT_ADDRESSING - return get_virtual_address(regs.pc_p); -#else return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); -#endif } -#define m68k_setpc_fast m68k_setpc -#define m68k_setpc_bcc m68k_setpc -#define m68k_setpc_rte m68k_setpc +static __inline__ uaecptr m68k_getpc_p (uae_u8 *p) +{ + return regs.pc + ((char *)p - (char *)regs.pc_oldp); +} static __inline__ void m68k_do_rts(void) { - m68k_setpc(get_long(m68k_areg(regs, 7))); - m68k_areg(regs, 7) += 4; + m68k_setpc(get_long(m68k_areg(regs, 7))); + m68k_areg(regs, 7) += 4; } - + static __inline__ void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) { - m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); - m68k_incpc(offset); + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_incpc(offset); } - + static __inline__ void m68k_do_jsr(uaecptr oldpc, uaecptr dest) { - m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); - m68k_setpc(dest); + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_setpc(dest); } +#define m68k_setpc_fast m68k_setpc +#define m68k_setpc_bcc m68k_setpc +#define m68k_setpc_rte m68k_setpc + static __inline__ void m68k_setstopped (int stop) { regs.stopped = stop; - /* A traced STOP instruction drops through immediately without - actually stopping. */ - if (stop && (regs.spcflags & SPCFLAG_DOTRACE) == 0) - SPCFLAGS_SET( SPCFLAG_STOP ); + if (stop) + regs.spcflags |= SPCFLAG_STOP; } extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); @@ -249,22 +241,27 @@ extern void MakeSR (void); extern void MakeFromSR (void); extern void Exception (int, uaecptr); extern void dump_counts (void); -extern int m68k_move2c (int, uae_u32 *); -extern int m68k_movec2 (int, uae_u32 *); +extern void m68k_move2c (int, uae_u32 *); +extern void m68k_movec2 (int, uae_u32 *); extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr); extern void m68k_mull (uae_u32, uae_u32, uae_u16); -extern void m68k_emulop (uae_u32); -extern void m68k_emulop_return (void); extern void init_m68k (void); -extern void exit_m68k (void); +extern void m68k_go (int); extern void m68k_dumpstate (uaecptr *); extern void m68k_disasm (uaecptr, uaecptr *, int); extern void m68k_reset (void); extern void m68k_enter_debugger(void); -extern int m68k_do_specialties(void); extern void mmu_op (uae_u32, uae_u16); +extern void fpp_opp (uae_u32, uae_u16); +extern void fdbcc_opp (uae_u32, uae_u16); +extern void fscc_opp (uae_u32, uae_u16); +extern void ftrapcc_opp (uae_u32,uaecptr); +extern void fbcc_opp (uae_u32, uaecptr, uae_u32); +extern void fsave_opp (uae_u32); +extern void frestore_opp (uae_u32); + /* Opcode of faulting instruction */ extern uae_u16 last_op_for_exception_3; /* PC at fault time */ @@ -275,34 +272,15 @@ extern uaecptr last_fault_for_exception_3; #define CPU_OP_NAME(a) op ## a /* 68020 + 68881 */ -extern struct cputbl op_smalltbl_0_ff[]; +extern struct cputbl op_smalltbl_0[]; /* 68020 */ -extern struct cputbl op_smalltbl_1_ff[]; +extern struct cputbl op_smalltbl_1[]; /* 68010 */ -extern struct cputbl op_smalltbl_2_ff[]; +extern struct cputbl op_smalltbl_2[]; /* 68000 */ -extern struct cputbl op_smalltbl_3_ff[]; +extern struct cputbl op_smalltbl_3[]; /* 68000 slow but compatible. */ -extern struct cputbl op_smalltbl_4_ff[]; - -#if FLIGHT_RECORDER -extern void m68k_record_step(uaecptr) REGPARAM; -#endif -extern void m68k_do_execute(void); -extern void m68k_execute(void); +extern struct cputbl op_smalltbl_4[]; -#ifdef USE_CPU_EMUL_SERVICES -extern int32 emulated_ticks; -extern void cpu_do_check_ticks(void); +extern cpuop_func *cpufunctbl[65536]; -static inline void cpu_check_ticks(void) -{ - if (--emulated_ticks <= 0) - cpu_do_check_ticks(); -} -#else -#define cpu_check_ticks() -#define cpu_do_check_ticks() -#endif - -#endif /* NEWCPU_H */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h deleted file mode 100644 index eacbc2148..000000000 --- a/BasiliskII/src/uae_cpu/noflags.h +++ /dev/null @@ -1,142 +0,0 @@ -#ifndef NOFLAGS_H -#define NOFLAGS_H - -/* Undefine everything that will *set* flags. Note: Leave *reading* - flags alone ;-). We assume that nobody does something like - SET_ZFLG(a=b+c), i.e. expect side effects of the macros. That would - be a stupid thing to do when using macros. -*/ - -/* Gwenole Beauchesne pointed out that CAS and CAS2 use flag_cmp to set - flags that are then used internally, and that thus the noflags versions - of those instructions were broken. Oops! - Easy fix: Leave flag_cmp alone. It is only used by CMP* and CAS* - instructions. For CAS*, noflags is a bad idea. For CMP*, which has - setting flags as its only function, the noflags version is kinda pointless, - anyway. - Note that this will only work while using the optflag_* routines --- - as we do on all (one ;-) platforms that will ever use the noflags - versions, anyway. - However, if you try to compile without optimized flags, the "SET_ZFLAG" - macro will be left unchanged, to make CAS and CAS2 work right. Of course, - this is contrary to the whole idea of noflags, but better be right than - be fast. - - Another problem exists with one of the bitfield operations. Once again, - one of the operations sets a flag, and looks at it later. And the CHK2 - instruction does so as well. For those, a different solution is possible. - the *_ALWAYS versions of the SET_?FLG macros shall remain untouched by - the redefinitions in this file. - Unfortunately, they are defined in terms of the macros we *do* redefine. - So here comes a bit of trickery.... -*/ -#define NOFLAGS_CMP 0 - -#undef SET_NFLG_ALWAYS -static __inline__ void SET_NFLG_ALWAYS(uae_u32 x) -{ - SET_NFLG(x); /* This has not yet been redefined */ -} - -#undef SET_CFLG_ALWAYS -static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) -{ - SET_CFLG(x); /* This has not yet been redefined */ -} - -#undef CPUFUNC -#define CPUFUNC(x) x##_nf - -#ifndef OPTIMIZED_FLAGS -#undef SET_ZFLG -#define SET_ZFLG(y) do {uae_u32 dummy=(y); } while (0) -#endif - -#undef SET_CFLG -#define SET_CFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_VFLG -#define SET_VFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_NFLG -#define SET_NFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_XFLG -#define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) - -#undef CLEAR_CZNV -#define CLEAR_CZNV -#undef IOR_CZNV -#define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_CZNV -#define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) -#undef COPY_CARRY -#define COPY_CARRY - -#ifdef optflag_testl -#undef optflag_testl -#endif - -#ifdef optflag_testw -#undef optflag_testw -#endif - -#ifdef optflag_testb -#undef optflag_testb -#endif - -#ifdef optflag_addl -#undef optflag_addl -#endif - -#ifdef optflag_addw -#undef optflag_addw -#endif - -#ifdef optflag_addb -#undef optflag_addb -#endif - -#ifdef optflag_subl -#undef optflag_subl -#endif - -#ifdef optflag_subw -#undef optflag_subw -#endif - -#ifdef optflag_subb -#undef optflag_subb -#endif - -#if NOFLAGS_CMP -#ifdef optflag_cmpl -#undef optflag_cmpl -#endif - -#ifdef optflag_cmpw -#undef optflag_cmpw -#endif - -#ifdef optflag_cmpb -#undef optflag_cmpb -#endif -#endif - -#define optflag_testl(v) do { } while (0) -#define optflag_testw(v) do { } while (0) -#define optflag_testb(v) do { } while (0) - -#define optflag_addl(v, s, d) (v = (uae_s32)(d) + (uae_s32)(s)) -#define optflag_addw(v, s, d) (v = (uae_s16)(d) + (uae_s16)(s)) -#define optflag_addb(v, s, d) (v = (uae_s8)(d) + (uae_s8)(s)) - -#define optflag_subl(v, s, d) (v = (uae_s32)(d) - (uae_s32)(s)) -#define optflag_subw(v, s, d) (v = (uae_s16)(d) - (uae_s16)(s)) -#define optflag_subb(v, s, d) (v = (uae_s8)(d) - (uae_s8)(s)) - -#if NOFLAGS_CMP -/* These are just for completeness sake */ -#define optflag_cmpl(s, d) do { } while (0) -#define optflag_cmpw(s, d) do { } while (0) -#define optflag_cmpb(s, d) do { } while (0) -#endif - -#endif diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu/readcpu.cpp index 3fccdfb73..abb3faae9 100644 --- a/BasiliskII/src/uae_cpu/readcpu.cpp +++ b/BasiliskII/src/uae_cpu/readcpu.cpp @@ -4,20 +4,6 @@ * Read 68000 CPU specs from file "table68k" * * Copyright 1995,1996 Bernd Schmidt - * - * 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 @@ -153,9 +139,6 @@ struct mnemolookup lookuptab[] = { { i_CPUSHA, "CPUSHA" }, { i_MOVE16, "MOVE16" }, - { i_EMULOP_RETURN, "EMULOP_RETURN" }, - { i_EMULOP, "EMULOP" }, - { i_MMUOP, "MMUOP" }, { i_ILLG, "" }, }; @@ -212,34 +195,16 @@ static void build_insn (int insn) int variants; struct instr_def id; const char *opcstr; - int i, n; + int i; int flaglive = 0, flagdead = 0; - int cflow = 0; id = defs68k[insn]; - // Control flow information - cflow = id.cflow; - - // Mask of flags set/used - unsigned char flags_set(0), flags_used(0); - - for (i = 0, n = 4; i < 5; i++, n--) { - switch (id.flaginfo[i].flagset) { - case fa_unset: case fa_isjmp: break; - default: flags_set |= (1 << n); - } - - switch (id.flaginfo[i].flaguse) { - case fu_unused: case fu_isjmp: break; - default: flags_used |= (1 << n); - } - } - for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flagset){ case fa_unset: break; + case fa_isjmp: break; case fa_zero: flagdead |= 1 << i; break; case fa_one: flagdead |= 1 << i; break; case fa_dontcare: flagdead |= 1 << i; break; @@ -252,6 +217,8 @@ static void build_insn (int insn) for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flaguse) { case fu_unused: break; + case fu_isjmp: flaglive |= 1 << i; break; + case fu_maybecc: flaglive |= 1 << i; break; case fu_unknown: flaglive = -1; goto out2; case fu_used: flaglive |= 1 << i; break; } @@ -269,7 +236,7 @@ static void build_insn (int insn) int pos = 0; int mnp = 0; int bitno = 0; - char mnemonic[64]; + char mnemonic[10]; wordsizes sz = sz_long; int srcgather = 0, dstgather = 0; @@ -306,8 +273,6 @@ static void build_insn (int insn) continue; if (bitcnt[bitI] && (bitval[bitI] == 0x00 || bitval[bitI] == 0xff)) continue; - if (bitcnt[bitE] && (bitval[bitE] == 0x00)) - continue; /* bitI and bitC get copied to biti and bitc */ if (bitcnt[bitI]) { @@ -346,11 +311,6 @@ static void build_insn (int insn) } } mnp++; - if ((unsigned)mnp >= sizeof(mnemonic) - 1) { - mnemonic[sizeof(mnemonic) - 1] = 0; - fprintf(stderr, "Instruction %s overflow\n", mnemonic); - abort(); - } } pos++; } @@ -388,9 +348,6 @@ static void build_insn (int insn) case 'P': srcmode = Aipi; pos++; break; } break; - case 'L': - srcmode = absl; - break; case '#': switch (opcstr[pos++]) { case 'z': srcmode = imm; break; @@ -436,22 +393,6 @@ static void build_insn (int insn) srcpos = bitpos[bitK]; } break; - case 'E': srcmode = immi; srcreg = bitval[bitE]; - if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? - /* 1..255 */ - srcgather = 1; - srctype = 6; - srcpos = bitpos[bitE]; - } - break; - case 'p': srcmode = immi; srcreg = bitval[bitp]; - if (CPU_EMU_SIZE < 5) { - /* 0..3 */ - srcgather = 1; - srctype = 7; - srcpos = bitpos[bitp]; - } - break; default: abort(); } break; @@ -576,27 +517,19 @@ static void build_insn (int insn) case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; default: abort(); } - if (dstpos < 0 || dstpos >= 32) - abort(); break; case 'A': destmode = Areg; switch (opcstr[pos++]) { case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; - case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; default: abort(); } - if (dstpos < 0 || dstpos >= 32) - abort(); switch (opcstr[pos]) { case 'p': destmode = Apdi; pos++; break; case 'P': destmode = Aipi; pos++; break; } break; - case 'L': - destmode = absl; - break; case '#': switch (opcstr[pos++]) { case 'z': destmode = imm; break; @@ -767,44 +700,8 @@ static void build_insn (int insn) table68k[opc].flaginfo[i].flaguse = id.flaginfo[i].flaguse; } #endif - - // Fix flags used information for Scc, Bcc, TRAPcc, DBcc instructions - if ( table68k[opc].mnemo == i_Scc - || table68k[opc].mnemo == i_Bcc - || table68k[opc].mnemo == i_DBcc - || table68k[opc].mnemo == i_TRAPcc - ) { - switch (table68k[opc].cc) { - // CC mask: XNZVC - // 8421 - case 0: flags_used = 0x00; break; /* T */ - case 1: flags_used = 0x00; break; /* F */ - case 2: flags_used = 0x05; break; /* HI */ - case 3: flags_used = 0x05; break; /* LS */ - case 4: flags_used = 0x01; break; /* CC */ - case 5: flags_used = 0x01; break; /* CS */ - case 6: flags_used = 0x04; break; /* NE */ - case 7: flags_used = 0x04; break; /* EQ */ - case 8: flags_used = 0x02; break; /* VC */ - case 9: flags_used = 0x02; break; /* VS */ - case 10:flags_used = 0x08; break; /* PL */ - case 11:flags_used = 0x08; break; /* MI */ - case 12:flags_used = 0x0A; break; /* GE */ - case 13:flags_used = 0x0A; break; /* LT */ - case 14:flags_used = 0x0E; break; /* GT */ - case 15:flags_used = 0x0E; break; /* LE */ - } - } - -#if 1 - /* gb-- flagdead and flaglive would not have correct information */ - table68k[opc].flagdead = flags_set; - table68k[opc].flaglive = flags_used; -#else table68k[opc].flagdead = flagdead; table68k[opc].flaglive = flaglive; -#endif - table68k[opc].cflow = cflow; nomatch: /* FOO! */; } @@ -850,10 +747,6 @@ static void handle_merges (long int opcode) smsk = 7; sbitdst = 8; break; case 5: smsk = 63; sbitdst = 64; break; - case 6: - smsk = 255; sbitdst = 256; break; - case 7: - smsk = 3; sbitdst = 4; break; default: smsk = 0; sbitdst = 0; abort(); @@ -869,7 +762,7 @@ static void handle_merges (long int opcode) } for (srcreg=0; srcreg < sbitdst; srcreg++) { for (dstreg=0; dstreg < dstend; dstreg++) { - uae_u16 code = uae_u16(opcode); + uae_u16 code = opcode; code = (code & ~smsk) | (srcreg << table68k[opcode].spos); code = (code & ~dmsk) | (dstreg << table68k[opcode].dpos); @@ -922,112 +815,3 @@ int get_no_mismatches (void) { return mismatch; } - -const char *get_instruction_name (unsigned int opcode) -{ - struct instr *ins = &table68k[opcode]; - for (int i = 0; lookuptab[i].name[0]; i++) { - if (ins->mnemo == lookuptab[i].mnemo) - return lookuptab[i].name; - } - abort(); - return NULL; -} - -static char *get_ea_string (amodes mode, wordsizes size) -{ - static char buffer[80]; - - buffer[0] = 0; - switch (mode){ - case Dreg: - strcpy (buffer,"Dn"); - break; - case Areg: - strcpy (buffer,"An"); - break; - case Aind: - strcpy (buffer,"(An)"); - break; - case Aipi: - strcpy (buffer,"(An)+"); - break; - case Apdi: - strcpy (buffer,"-(An)"); - break; - case Ad16: - strcpy (buffer,"(d16,An)"); - break; - case Ad8r: - strcpy (buffer,"(d8,An,Xn)"); - break; - case PC16: - strcpy (buffer,"(d16,PC)"); - break; - case PC8r: - strcpy (buffer,"(d8,PC,Xn)"); - break; - case absw: - strcpy (buffer,"(xxx).W"); - break; - case absl: - strcpy (buffer,"(xxx).L"); - break; - case imm: - switch (size){ - case sz_byte: - strcpy (buffer,"#.B"); - break; - case sz_word: - strcpy (buffer,"#.W"); - break; - case sz_long: - strcpy (buffer,"#.L"); - break; - default: - break; - } - break; - case imm0: - strcpy (buffer,"#.B"); - break; - case imm1: - strcpy (buffer,"#.W"); - break; - case imm2: - strcpy (buffer,"#.L"); - break; - case immi: - strcpy (buffer,"#"); - break; - - default: - break; - } - return buffer; -} - -const char *get_instruction_string (unsigned int opcode) -{ - static char out[100]; - struct instr *ins; - - strcpy (out, get_instruction_name (opcode)); - - ins = &table68k[opcode]; - if (ins->size == sz_byte) - strcat (out,".B"); - if (ins->size == sz_word) - strcat (out,".W"); - if (ins->size == sz_long) - strcat (out,".L"); - strcat (out," "); - if (ins->suse) - strcat (out, get_ea_string (amodes(ins->smode), wordsizes(ins->size))); - if (ins->duse) { - if (ins->suse) - strcat (out,","); - strcat (out, get_ea_string (amodes(ins->dmode), wordsizes(ins->size))); - } - return out; -} diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu/readcpu.h index 6fba3c393..4f225f133 100644 --- a/BasiliskII/src/uae_cpu/readcpu.h +++ b/BasiliskII/src/uae_cpu/readcpu.h @@ -1,6 +1,3 @@ -#ifndef READCPU_H -#define READCPU_H - #ifdef __cplusplus extern "C" { #endif @@ -35,8 +32,7 @@ ENUMDECL { i_PACK, i_UNPK, i_TAS, i_BKPT, i_CALLM, i_RTM, i_TRAPcc, i_MOVES, i_FPP, i_FDBcc, i_FScc, i_FTRAPcc, i_FBcc, i_FSAVE, i_FRESTORE, i_CINVL, i_CINVP, i_CINVA, i_CPUSHL, i_CPUSHP, i_CPUSHA, i_MOVE16, - i_MMUOP, - i_EMULOP_RETURN, i_EMULOP + i_MMUOP } ENUMNAME (instrmnem); extern struct mnemolookup { @@ -56,21 +52,9 @@ ENUMDECL { fu_used, fu_unused, fu_maybecc, fu_unknown, fu_isjmp } ENUMNAME (flaguse); -ENUMDECL { - fl_normal = 0, - fl_branch = 1, - fl_jump = 2, - fl_return = 3, - fl_trap = 4, - fl_const_jump = 8, - - /* Instructions that can trap don't mark the end of a block */ - fl_end_block = 3 -} ENUMNAME (cflow_t); - ENUMDECL { bit0, bit1, bitc, bitC, bitf, biti, bitI, bitj, bitJ, bitk, bitK, - bits, bitS, bitd, bitD, bitr, bitR, bitz, bitE, bitp, lastbit + bits, bitS, bitd, bitD, bitr, bitR, bitz, lastbit } ENUMNAME (bitvals); struct instr_def { @@ -84,7 +68,6 @@ struct instr_def { unsigned int flaguse:3; unsigned int flagset:3; } flaginfo[5]; - unsigned char cflow; unsigned char sduse; const char *opcstr; }; @@ -103,16 +86,22 @@ extern struct instr { unsigned int mnemo:8; unsigned int cc:4; unsigned int plev:2; +#ifdef sgi + wordsizes size:2; + amodes smode:5; + unsigned int stype:3; + amodes dmode:5; +#else unsigned int size:2; unsigned int smode:5; unsigned int stype:3; unsigned int dmode:5; +#endif unsigned int suse:1; unsigned int duse:1; unsigned int unused1:1; unsigned int clev:3; - unsigned int cflow:3; - unsigned int unused2:2; + unsigned int unused2:5; } *table68k; extern void read_table68k (void); @@ -120,11 +109,6 @@ extern void do_merges (void); extern int get_no_mismatches (void); extern int nr_cpuop_funcs; -extern const char *get_instruction_name (unsigned int opcode); -extern const char *get_instruction_string (unsigned int opcode); - #ifdef __cplusplus } #endif - -#endif /* READCPU_H */ diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h deleted file mode 100644 index 494f4fccc..000000000 --- a/BasiliskII/src/uae_cpu/spcflags.h +++ /dev/null @@ -1,103 +0,0 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * Copyright 1995 Bernd Schmidt - * - * 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 SPCFLAGS_H -#define SPCFLAGS_H - -typedef uae_u32 spcflags_t; - -enum { - SPCFLAG_STOP = 0x01, - SPCFLAG_INT = 0x02, - SPCFLAG_BRK = 0x04, - SPCFLAG_TRACE = 0x08, - SPCFLAG_DOTRACE = 0x10, - SPCFLAG_DOINT = 0x20, - - SPCFLAG_JIT_END_COMPILE = 0, - SPCFLAG_JIT_EXEC_RETURN = 0, - - SPCFLAG_ALL = SPCFLAG_STOP - | SPCFLAG_INT - | SPCFLAG_BRK - | SPCFLAG_TRACE - | SPCFLAG_DOTRACE - | SPCFLAG_DOINT - | SPCFLAG_JIT_END_COMPILE - | SPCFLAG_JIT_EXEC_RETURN - , - - SPCFLAG_ALL_BUT_EXEC_RETURN = SPCFLAG_ALL & ~SPCFLAG_JIT_EXEC_RETURN -}; - -#define SPCFLAGS_TEST(m) \ - ((regs.spcflags & (m)) != 0) - -/* Macro only used in m68k_reset() */ -#define SPCFLAGS_INIT(m) do { \ - regs.spcflags = (m); \ -} while (0) - -#if !(ENABLE_EXCLUSIVE_SPCFLAGS) - -#define SPCFLAGS_SET(m) do { \ - regs.spcflags |= (m); \ -} while (0) - -#define SPCFLAGS_CLEAR(m) do { \ - regs.spcflags &= ~(m); \ -} while (0) - -#elif defined(X86_ASSEMBLY) - -#define HAVE_HARDWARE_LOCKS - -#define SPCFLAGS_SET(m) do { \ - __asm__ __volatile__("lock\n\torl %1,%0" : "=m" (regs.spcflags) : "i" ((m))); \ -} while (0) - -#define SPCFLAGS_CLEAR(m) do { \ - __asm__ __volatile__("lock\n\tandl %1,%0" : "=m" (regs.spcflags) : "i" (~(m))); \ -} while (0) - -#else - -#undef HAVE_HARDWARE_LOCKS - -#include "main.h" -extern B2_mutex *spcflags_lock; - -#define SPCFLAGS_SET(m) do { \ - B2_lock_mutex(spcflags_lock); \ - regs.spcflags |= (m); \ - B2_unlock_mutex(spcflags_lock); \ -} while (0) - -#define SPCFLAGS_CLEAR(m) do { \ - B2_lock_mutex(spcflags_lock); \ - regs.spcflags &= ~(m); \ - B2_unlock_mutex(spcflags_lock); \ -} while (0) - -#endif - -#endif /* SPCFLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu/table68k index ab9eabe18..54f7c5f34 100644 --- a/BasiliskII/src/uae_cpu/table68k +++ b/BasiliskII/src/uae_cpu/table68k @@ -4,13 +4,11 @@ % C: condition codes, except F % f: direction % i: immediate -% E: immediate, except 00 (for EmulOp instructions) % I: immediate, except 00 and ff % j: immediate 1..8 % J: immediate 0..15 % k: immediate 0..7 % K: immediate 0..63 -% p: immediate 0..3 (CINV and CPUSH instructions: Cache Field) % s: source mode % S: source reg % d: dest mode @@ -26,7 +24,6 @@ % % Arp: --> -(Ar) % ArP: --> (Ar)+ -% L: --> (xxx.L) % % Fields on a line: % 16 chars bitpattern : @@ -46,17 +43,10 @@ % 0 means flag reset % 1 means flag set % ? means programmer was too lazy to check or instruction may trap +% + means instruction is conditional branch % everything else means flag set/used +% / means instruction is unconditional branch/call % x means flag is unknown and well-behaved programs shouldn't check it -% -% Control flow -% two letters, combination of -% - nothing -% T the instruction may trap or cause an exception -% B branch instruction -% J jump instruction -% R return instruction -% % srcaddr status destaddr status : % bitmasks of % 1 means fetched @@ -66,209 +56,197 @@ % instruction % -0000 0000 0011 1100:00:XNZVC:XNZVC:--:10: ORSR.B #1 -0000 0000 0111 1100:02:XNZVC:XNZVC:T-:10: ORSR.W #1 -0000 0zz0 11ss sSSS:20:-?Z?C:-----:T-:11: CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd] -0000 0000 zzdd dDDD:00:-NZ00:-----:--:13: OR.z #z,d[!Areg] -0000 0010 0011 1100:00:XNZVC:XNZVC:--:10: ANDSR.B #1 -0000 0010 0111 1100:02:XNZVC:XNZVC:T-:10: ANDSR.W #1 -0000 0010 zzdd dDDD:00:-NZ00:-----:--:13: AND.z #z,d[!Areg] -0000 0100 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #z,d[!Areg] -0000 0110 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #z,d[!Areg] -0000 0110 11ss sSSS:20:-----:XNZVC:--:10: CALLM s[!Dreg,Areg,Aipi,Apdi,Immd] -0000 0110 11ss sSSS:20:XNZVC:-----:-R:10: RTM s[Dreg,Areg] -0000 1000 00ss sSSS:00:--Z--:-----:--:11: BTST #1,s[!Areg] -0000 1000 01ss sSSS:00:--Z--:-----:--:13: BCHG #1,s[!Areg,Immd] -0000 1000 10ss sSSS:00:--Z--:-----:--:13: BCLR #1,s[!Areg,Immd] -0000 1000 11ss sSSS:00:--Z--:-----:--:13: BSET #1,s[!Areg,Immd] -0000 1010 0011 1100:00:XNZVC:XNZVC:--:10: EORSR.B #1 -0000 1010 0111 1100:02:XNZVC:XNZVC:T-:10: EORSR.W #1 -0000 1010 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z #z,d[!Areg] -0000 1100 zzss sSSS:00:-NZVC:-----:--:11: CMP.z #z,s[!Areg,Immd] - -0000 1010 11ss sSSS:20:-NZVC:-----:--:13: CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1100 11ss sSSS:20:-NZVC:-----:--:13: CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1100 1111 1100:20:-NZVC:-----:--:10: CAS2.W #2 -0000 1110 zzss sSSS:22:-----:-----:T-:13: MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1110 11ss sSSS:20:-NZVC:-----:--:13: CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1110 1111 1100:20:-NZVC:-----:--:10: CAS2.L #2 - -0000 rrr1 00dd dDDD:00:-----:-----:--:12: MVPMR.W d[Areg-Ad16],Dr -0000 rrr1 01dd dDDD:00:-----:-----:--:12: MVPMR.L d[Areg-Ad16],Dr -0000 rrr1 10dd dDDD:00:-----:-----:--:12: MVPRM.W Dr,d[Areg-Ad16] -0000 rrr1 11dd dDDD:00:-----:-----:--:12: MVPRM.L Dr,d[Areg-Ad16] -0000 rrr1 00ss sSSS:00:--Z--:-----:--:11: BTST Dr,s[!Areg] -0000 rrr1 01ss sSSS:00:--Z--:-----:--:13: BCHG Dr,s[!Areg,Immd] -0000 rrr1 10ss sSSS:00:--Z--:-----:--:13: BCLR Dr,s[!Areg,Immd] -0000 rrr1 11ss sSSS:00:--Z--:-----:--:13: BSET Dr,s[!Areg,Immd] - -0001 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.B s,d[!Areg] -0010 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.L s,d[Areg] -0010 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.L s,d[!Areg] -0011 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.W s,d[Areg] -0011 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.W s,d[!Areg] - -0100 0000 zzdd dDDD:00:XxZxC:X-Z--:--:30: NEGX.z d[!Areg] -0100 0000 11dd dDDD:01:-----:XNZVC:T-:10: MVSR2.W d[!Areg] -0100 0010 zzdd dDDD:00:-0100:-----:--:20: CLR.z d[!Areg] -0100 0010 11dd dDDD:10:-----:XNZVC:--:10: MVSR2.B d[!Areg] -0100 0100 zzdd dDDD:00:XNZVC:-----:--:30: NEG.z d[!Areg] -0100 0100 11ss sSSS:00:XNZVC:-----:--:10: MV2SR.B s[!Areg] -0100 0110 zzdd dDDD:00:-NZ00:-----:--:30: NOT.z d[!Areg] -0100 0110 11ss sSSS:02:XNZVC:XNZVC:T-:10: MV2SR.W s[!Areg] -0100 1000 0000 1rrr:20:-----:-----:--:31: LINK.L Ar,#2 -0100 1000 00dd dDDD:00:X?Z?C:X-Z--:--:30: NBCD.B d[!Areg] -0100 1000 0100 1kkk:20:-----:-----:T-:10: BKPT #k -0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] -0100 1000 01ss sSSS:00:-----:-----:--:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] -0100 1000 10dd dDDD:00:-----:-----:--:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] -0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] -0100 1000 11dd dDDD:00:-----:-----:--:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] -0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] -0100 1010 zzss sSSS:00:-NZ00:-----:--:10: TST.z s -0100 1010 11dd dDDD:00:-NZ00:-----:--:30: TAS.B d[!Areg] -0100 1010 1111 1100:00:-----:-----:T-:00: ILLEGAL -0100 1100 00ss sSSS:20:-NZVC:-----:--:13: MULL.L #1,s[!Areg] -0100 1100 01ss sSSS:20:-NZV0:-----:T-:13: DIVL.L #1,s[!Areg] -0100 1100 10ss sSSS:00:-----:-----:--:01: MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd] -0100 1100 11ss sSSS:00:-----:-----:--:01: MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd] -0100 1110 0100 JJJJ:00:-----:XNZVC:--:10: TRAP #J -0100 1110 0101 0rrr:00:-----:-----:--:31: LINK.W Ar,#1 -0100 1110 0101 1rrr:00:-----:-----:--:30: UNLK.L Ar -0100 1110 0110 0rrr:02:-----:-----:T-:10: MVR2USP.L Ar -0100 1110 0110 1rrr:02:-----:-----:T-:20: MVUSP2R.L Ar -0100 1110 0111 0000:02:-----:-----:T-:00: RESET -0100 1110 0111 0001:00:-----:-----:--:00: NOP -0100 1110 0111 0010:02:XNZVC:-----:T-:10: STOP #1 -0100 1110 0111 0011:02:XNZVC:-----:TR:00: RTE -0100 1110 0111 0100:00:-----:-----:-R:10: RTD #1 -0100 1110 0111 0101:00:-----:-----:-R:00: RTS -0100 1110 0111 0110:00:-----:XNZVC:T-:00: TRAPV -0100 1110 0111 0111:00:XNZVC:-----:-R:00: RTR -0100 1110 0111 1010:12:-----:-----:T-:10: MOVEC2 #1 -0100 1110 0111 1011:12:-----:-----:T-:10: MOVE2C #1 -0100 1110 10ss sSSS:00:-----:-----:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 rrr1 00ss sSSS:00:-N???:-----:T-:11: CHK.L s[!Areg],Dr -0100 rrr1 10ss sSSS:00:-N???:-----:T-:11: CHK.W s[!Areg],Dr -0100 1110 11ss sSSS:00:-----:-----:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 rrr1 11ss sSSS:00:-----:-----:--:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar - -0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] -0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] -0101 jjj0 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #j,d[!Areg] -0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] -0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] -0101 jjj1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #j,d[!Areg] - -0101 cccc 1100 1rrr:00:-----:-????:-B:31: DBcc.W Dr,#1 -0101 cccc 11dd dDDD:00:-----:-????:--:20: Scc.B d[!Areg] -0101 cccc 1111 1010:20:-----:-????:T-:10: TRAPcc #1 -0101 cccc 1111 1011:20:-----:-????:T-:10: TRAPcc #2 -0101 cccc 1111 1100:20:-----:-????:T-:00: TRAPcc +0000 0000 0011 1100:00:XNZVC:XNZVC:10: ORSR.B #1 +0000 0000 0111 1100:02:?????:?????:10: ORSR.W #1 +0000 0zz0 11ss sSSS:20:?????:?????:11: CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0000 zzdd dDDD:00:-NZ00:-----:13: OR.z #z,d[!Areg] +0000 0010 0011 1100:00:XNZVC:XNZVC:10: ANDSR.B #1 +0000 0010 0111 1100:02:?????:?????:10: ANDSR.W #1 +0000 0010 zzdd dDDD:00:-NZ00:-----:13: AND.z #z,d[!Areg] +0000 0100 zzdd dDDD:00:XNZVC:-----:13: SUB.z #z,d[!Areg] +0000 0110 zzdd dDDD:00:XNZVC:-----:13: ADD.z #z,d[!Areg] +0000 0110 11ss sSSS:20:?????:?????:10: CALLM s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0110 11ss sSSS:20:?????:?????:10: RTM s[Dreg,Areg] +0000 1000 00ss sSSS:00:--Z--:-----:11: BTST #1,s[!Areg] +0000 1000 01ss sSSS:00:--Z--:-----:13: BCHG #1,s[!Areg,Immd] +0000 1000 10ss sSSS:00:--Z--:-----:13: BCLR #1,s[!Areg,Immd] +0000 1000 11ss sSSS:00:--Z--:-----:13: BSET #1,s[!Areg,Immd] +0000 1010 0011 1100:00:XNZVC:XNZVC:10: EORSR.B #1 +0000 1010 0111 1100:02:?????:?????:10: EORSR.W #1 +0000 1010 zzdd dDDD:00:-NZ00:-----:13: EOR.z #z,d[!Areg] +0000 1100 zzss sSSS:00:-NZVC:-----:11: CMP.z #z,s[!Areg,Immd] + +0000 1010 11ss sSSS:20:?????:?????:13: CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 11ss sSSS:20:?????:?????:13: CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 1111 1100:20:?????:?????:10: CAS2.W #2 +0000 1110 zzss sSSS:22:?????:?????:13: MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 11ss sSSS:20:?????:?????:13: CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 1111 1100:20:?????:?????:10: CAS2.L #2 + +0000 rrr1 00dd dDDD:00:-----:-----:12: MVPMR.W d[Areg-Ad16],Dr +0000 rrr1 01dd dDDD:00:-----:-----:12: MVPMR.L d[Areg-Ad16],Dr +0000 rrr1 10dd dDDD:00:-----:-----:12: MVPRM.W Dr,d[Areg-Ad16] +0000 rrr1 11dd dDDD:00:-----:-----:12: MVPRM.L Dr,d[Areg-Ad16] +0000 rrr1 00ss sSSS:00:--Z--:-----:11: BTST Dr,s[!Areg] +0000 rrr1 01ss sSSS:00:--Z--:-----:13: BCHG Dr,s[!Areg,Immd] +0000 rrr1 10ss sSSS:00:--Z--:-----:13: BCLR Dr,s[!Areg,Immd] +0000 rrr1 11ss sSSS:00:--Z--:-----:13: BSET Dr,s[!Areg,Immd] + +0001 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.B s,d[!Areg] +0010 DDDd ddss sSSS:00:-----:-----:12: MOVEA.L s,d[Areg] +0010 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.L s,d[!Areg] +0011 DDDd ddss sSSS:00:-----:-----:12: MOVEA.W s,d[Areg] +0011 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.W s,d[!Areg] + +0100 0000 zzdd dDDD:00:XxZxC:-----:30: NEGX.z d[!Areg] +0100 0000 11dd dDDD:01:?????:?????:10: MVSR2.W d[!Areg] +0100 0010 zzdd dDDD:00:-0100:-----:20: CLR.z d[!Areg] +0100 0010 11dd dDDD:10:?????:?????:10: MVSR2.B d[!Areg] +0100 0100 zzdd dDDD:00:XNZVC:-----:30: NEG.z d[!Areg] +0100 0100 11ss sSSS:00:XNZVC:-----:10: MV2SR.B s[!Areg] +0100 0110 zzdd dDDD:00:-NZ00:-----:30: NOT.z d[!Areg] +0100 0110 11ss sSSS:02:?????:?????:10: MV2SR.W s[!Areg] +0100 1000 0000 1rrr:20:-----:-----:31: LINK.L Ar,#2 +0100 1000 00dd dDDD:00:X?Z?C:X-Z--:30: NBCD.B d[!Areg] +0100 1000 0100 1kkk:20:?????:?????:10: BKPT #k +0100 1000 01ss sSSS:00:-NZ00:-----:30: SWAP.W s[Dreg] +0100 1000 01ss sSSS:00:-----:-----:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1000 10dd dDDD:00:-NZ00:-----:30: EXT.W d[Dreg] +0100 1000 10dd dDDD:00:-----:-----:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] +0100 1000 11dd dDDD:00:-NZ00:-----:30: EXT.L d[Dreg] +0100 1000 11dd dDDD:00:-----:-----:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] +0100 1001 11dd dDDD:00:-NZ00:-----:30: EXT.B d[Dreg] +0100 1010 zzss sSSS:00:-NZ00:-----:10: TST.z s +0100 1010 11dd dDDD:00:?????:?????:30: TAS.B d[!Areg] +0100 1010 1111 1100:00:?????:?????:00: ILLEGAL +0100 1100 00ss sSSS:20:-NZVC:-----:13: MULL.L #1,s[!Areg] +0100 1100 01ss sSSS:20:?????:?????:13: DIVL.L #1,s[!Areg] +0100 1100 10ss sSSS:00:-----:-----:01: MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd] +0100 1100 11ss sSSS:00:-----:-----:01: MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd] +0100 1110 0100 JJJJ:00:-----:XNZVC:10: TRAP #J +0100 1110 0101 0rrr:00:-----:-----:31: LINK.W Ar,#1 +0100 1110 0101 1rrr:00:-----:-----:30: UNLK.L Ar +0100 1110 0110 0rrr:02:-----:-----:10: MVR2USP.L Ar +0100 1110 0110 1rrr:02:-----:-----:20: MVUSP2R.L Ar +0100 1110 0111 0000:02:-----:-----:00: RESET +0100 1110 0111 0001:00:-----:-----:00: NOP +0100 1110 0111 0010:02:XNZVC:-----:10: STOP #1 +0100 1110 0111 0011:02:XNZVC:-----:00: RTE +0100 1110 0111 0100:00:?????:?????:10: RTD #1 +0100 1110 0111 0101:00:-----:-----:00: RTS +0100 1110 0111 0110:00:-----:XNZVC:00: TRAPV +0100 1110 0111 0111:00:XNZVC:-----:00: RTR +0100 1110 0111 1010:12:?????:?????:10: MOVEC2 #1 +0100 1110 0111 1011:12:?????:?????:10: MOVE2C #1 +0100 1110 10ss sSSS:00://///://///:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 00ss sSSS:00:?????:?????:11: CHK.L s[!Areg],Dr +0100 rrr1 10ss sSSS:00:?????:?????:11: CHK.W s[!Areg],Dr +0100 1110 11ss sSSS:00://///://///:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 11ss sSSS:00:-----:-----:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar + +0101 jjj0 zzdd dDDD:00:-----:-----:13: ADDA.z #j,d[Areg] +0101 jjj0 zzdd dDDD:00:XNZVC:-----:13: ADD.z #j,d[!Areg] +0101 jjj1 zzdd dDDD:00:-----:-----:13: SUBA.z #j,d[Areg] +0101 jjj1 zzdd dDDD:00:XNZVC:-----:13: SUB.z #j,d[!Areg] +0101 cccc 1100 1rrr:00:-----:+++++:31: DBcc.W Dr,#1 +0101 cccc 11dd dDDD:00:-----:+++++:20: Scc.B d[!Areg] +0101 cccc 1111 1010:20:?????:?????:10: TRAPcc #1 +0101 cccc 1111 1011:20:?????:?????:10: TRAPcc #2 +0101 cccc 1111 1100:20:?????:?????:00: TRAPcc % Bxx.L is 68020 only, but setting the CPU level to 2 would give illegal % instruction exceptions when compiling a 68000 only emulation, which isn't % what we want either. -0110 0001 0000 0000:00:-----:-----:-B:40: BSR.W #1 -0110 0001 IIII IIII:00:-----:-----:-B:40: BSR.B #i -0110 0001 1111 1111:00:-----:-----:-B:40: BSR.L #2 -0110 CCCC 0000 0000:00:-----:-????:-B:40: Bcc.W #1 -0110 CCCC IIII IIII:00:-----:-????:-B:40: Bcc.B #i -0110 CCCC 1111 1111:00:-----:-????:-B:40: Bcc.L #2 - -0111 rrr0 iiii iiii:00:-NZ00:-----:--:12: MOVE.L #i,Dr - -1000 rrr0 zzss sSSS:00:-NZ00:-----:--:13: OR.z s[!Areg],Dr -1000 rrr0 11ss sSSS:00:-NZV0:-----:T-:13: DIVU.W s[!Areg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Dreg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp -1000 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: OR.z Dr,d[!Areg,Dreg] -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp -1000 rrr1 11ss sSSS:00:-NZV0:-----:T-:13: DIVS.W s[!Areg],Dr - -1001 rrr0 zzss sSSS:00:XNZVC:-----:--:13: SUB.z s,Dr -1001 rrr0 11ss sSSS:00:-----:-----:--:13: SUBA.W s,Ar -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp -1001 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z Dr,d[!Areg,Dreg] -1001 rrr1 11ss sSSS:00:-----:-----:--:13: SUBA.L s,Ar - -1011 rrr0 zzss sSSS:00:-NZVC:-----:--:11: CMP.z s,Dr -1011 rrr0 11ss sSSS:00:-NZVC:-----:--:11: CMPA.W s,Ar -1011 rrr1 11ss sSSS:00:-NZVC:-----:--:11: CMPA.L s,Ar -1011 rrr1 zzdd dDDD:00:-NZVC:-----:--:11: CMPM.z d[Areg-Aipi],ArP -1011 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z Dr,d[!Areg] - -1100 rrr0 zzss sSSS:00:-NZ00:-----:--:13: AND.z s[!Areg],Dr -1100 rrr0 11ss sSSS:00:-NZ00:-----:--:13: MULU.W s[!Areg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Dreg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp -1100 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: AND.z Dr,d[!Areg,Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] -1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] -1100 rrr1 11ss sSSS:00:-NZ00:-----:--:13: MULS.W s[!Areg],Dr - -1101 rrr0 zzss sSSS:00:XNZVC:-----:--:13: ADD.z s,Dr -1101 rrr0 11ss sSSS:00:-----:-----:--:13: ADDA.W s,Ar -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp -1101 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z Dr,d[!Areg,Dreg] -1101 rrr1 11ss sSSS:00:-----:-----:--:13: ADDA.L s,Ar - -1110 jjjf zz00 0RRR:00:XNZVC:-----:--:13: ASf.z #j,DR -1110 jjjf zz00 1RRR:00:XNZ0C:-----:--:13: LSf.z #j,DR -1110 jjjf zz01 0RRR:00:XNZ0C:X----:--:13: ROXf.z #j,DR -1110 jjjf zz01 1RRR:00:-NZ0C:-----:--:13: ROf.z #j,DR -1110 rrrf zz10 0RRR:00:XNZVC:-----:--:13: ASf.z Dr,DR -1110 rrrf zz10 1RRR:00:XNZ0C:-----:--:13: LSf.z Dr,DR -1110 rrrf zz11 0RRR:00:XNZ0C:X----:--:13: ROXf.z Dr,DR -1110 rrrf zz11 1RRR:00:-NZ0C:-----:--:13: ROf.z Dr,DR -1110 000f 11dd dDDD:00:XNZVC:-----:--:13: ASfW.W d[!Dreg,Areg] -1110 001f 11dd dDDD:00:XNZ0C:-----:--:13: LSfW.W d[!Dreg,Areg] -1110 010f 11dd dDDD:00:XNZ0C:X----:--:13: ROXfW.W d[!Dreg,Areg] -1110 011f 11dd dDDD:00:-NZ0C:-----:--:13: ROfW.W d[!Dreg,Areg] - -1110 1000 11ss sSSS:20:-NZ00:-----:--:11: BFTST #1,s[!Areg,Apdi,Aipi,Immd] -1110 1001 11ss sSSS:20:-NZ00:-----:--:11: BFEXTU #1,s[!Areg,Apdi,Aipi,Immd] -1110 1010 11ss sSSS:20:-NZ00:-----:--:13: BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1011 11ss sSSS:20:-NZ00:-----:--:11: BFEXTS #1,s[!Areg,Apdi,Aipi,Immd] -1110 1100 11ss sSSS:20:-NZ00:-----:--:13: BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1101 11ss sSSS:20:-NZ00:-----:--:11: BFFFO #1,s[!Areg,Apdi,Aipi,Immd] -1110 1110 11ss sSSS:20:-NZ00:-----:--:13: BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1111 11ss sSSS:20:-NZ00:-----:--:13: BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +0110 0001 0000 0000:00://///://///:40: BSR.W #1 +0110 0001 IIII IIII:00://///://///:40: BSR.B #i +0110 0001 1111 1111:00://///://///:40: BSR.L #2 +0110 CCCC 0000 0000:00:-----:+++++:40: Bcc.W #1 +0110 CCCC IIII IIII:00:-----:+++++:40: Bcc.B #i +0110 CCCC 1111 1111:00:-----:+++++:40: Bcc.L #2 + +0111 rrr0 iiii iiii:00:-NZ00:-----:12: MOVE.L #i,Dr + +1000 rrr0 zzss sSSS:00:-NZ00:-----:13: OR.z s[!Areg],Dr +1000 rrr0 11ss sSSS:00:?????:?????:13: DIVU.W s[!Areg],Dr +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: SBCD.B d[Dreg],Dr +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: SBCD.B d[Areg-Apdi],Arp +1000 rrr1 zzdd dDDD:00:-NZ00:-----:13: OR.z Dr,d[!Areg,Dreg] +1000 rrr1 01dd dDDD:20:?????:?????:12: PACK d[Dreg],Dr +1000 rrr1 01dd dDDD:20:?????:?????:12: PACK d[Areg-Apdi],Arp +1000 rrr1 10dd dDDD:20:?????:?????:12: UNPK d[Dreg],Dr +1000 rrr1 10dd dDDD:20:?????:?????:12: UNPK d[Areg-Apdi],Arp +1000 rrr1 11ss sSSS:00:?????:?????:13: DIVS.W s[!Areg],Dr + +1001 rrr0 zzss sSSS:00:XNZVC:-----:13: SUB.z s,Dr +1001 rrr0 11ss sSSS:00:-----:-----:13: SUBA.W s,Ar +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: SUBX.z d[Dreg],Dr +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: SUBX.z d[Areg-Apdi],Arp +1001 rrr1 zzdd dDDD:00:XNZVC:-----:13: SUB.z Dr,d[!Areg,Dreg] +1001 rrr1 11ss sSSS:00:-----:-----:13: SUBA.L s,Ar + +1011 rrr0 zzss sSSS:00:-NZVC:-----:11: CMP.z s,Dr +1011 rrr0 11ss sSSS:00:-NZVC:-----:11: CMPA.W s,Ar +1011 rrr1 11ss sSSS:00:-NZVC:-----:11: CMPA.L s,Ar +1011 rrr1 zzdd dDDD:00:-NZVC:-----:11: CMPM.z d[Areg-Aipi],ArP +1011 rrr1 zzdd dDDD:00:-NZ00:-----:13: EOR.z Dr,d[!Areg] + +1100 rrr0 zzss sSSS:00:-NZ00:-----:13: AND.z s[!Areg],Dr +1100 rrr0 11ss sSSS:00:-NZ00:-----:13: MULU.W s[!Areg],Dr +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: ABCD.B d[Dreg],Dr +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: ABCD.B d[Areg-Apdi],Arp +1100 rrr1 zzdd dDDD:00:-NZ00:-----:13: AND.z Dr,d[!Areg,Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:33: EXG.L Dr,d[Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:33: EXG.L Ar,d[Areg] +1100 rrr1 10dd dDDD:00:-----:-----:33: EXG.L Dr,d[Areg] +1100 rrr1 11ss sSSS:00:-NZ00:-----:13: MULS.W s[!Areg],Dr + +1101 rrr0 zzss sSSS:00:XNZVC:-----:13: ADD.z s,Dr +1101 rrr0 11ss sSSS:00:-----:-----:13: ADDA.W s,Ar +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: ADDX.z d[Dreg],Dr +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: ADDX.z d[Areg-Apdi],Arp +1101 rrr1 zzdd dDDD:00:XNZVC:-----:13: ADD.z Dr,d[!Areg,Dreg] +1101 rrr1 11ss sSSS:00:-----:-----:13: ADDA.L s,Ar + +1110 jjjf zz00 0RRR:00:XNZVC:-----:13: ASf.z #j,DR +1110 jjjf zz00 1RRR:00:XNZ0C:-----:13: LSf.z #j,DR +1110 jjjf zz01 0RRR:00:XNZ0C:X----:13: ROXf.z #j,DR +1110 jjjf zz01 1RRR:00:-NZ0C:-----:13: ROf.z #j,DR +1110 rrrf zz10 0RRR:00:XNZVC:X----:13: ASf.z Dr,DR +1110 rrrf zz10 1RRR:00:XNZ0C:X----:13: LSf.z Dr,DR +1110 rrrf zz11 0RRR:00:XNZ0C:X----:13: ROXf.z Dr,DR +1110 rrrf zz11 1RRR:00:-NZ0C:-----:13: ROf.z Dr,DR +1110 000f 11dd dDDD:00:XNZVC:-----:13: ASfW.W d[!Dreg,Areg] +1110 001f 11dd dDDD:00:XNZ0C:-----:13: LSfW.W d[!Dreg,Areg] +1110 010f 11dd dDDD:00:XNZ0C:X----:13: ROXfW.W d[!Dreg,Areg] +1110 011f 11dd dDDD:00:-NZ0C:-----:13: ROfW.W d[!Dreg,Areg] + +1110 1000 11ss sSSS:20:?????:?????:11: BFTST #1,s[!Areg,Apdi,Aipi,Immd] +1110 1001 11ss sSSS:20:?????:?????:11: BFEXTU #1,s[!Areg,Apdi,Aipi,Immd] +1110 1010 11ss sSSS:20:?????:?????:13: BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1011 11ss sSSS:20:?????:?????:11: BFEXTS #1,s[!Areg,Apdi,Aipi,Immd] +1110 1100 11ss sSSS:20:?????:?????:13: BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1101 11ss sSSS:20:?????:?????:11: BFFFO #1,s[!Areg,Apdi,Aipi,Immd] +1110 1110 11ss sSSS:20:?????:?????:13: BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1111 11ss sSSS:20:?????:?????:13: BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] % floating point co processor -1111 0010 00ss sSSS:30:-----:-----:--:11: FPP #1,s -1111 0010 01ss sSSS:30:-----:-----:-B:11: FDBcc #1,s[Areg-Dreg] -1111 0010 01ss sSSS:30:-----:-----:--:11: FScc #1,s[!Areg,Immd,PC8r,PC16] -1111 0010 0111 1010:30:-----:-----:T-:10: FTRAPcc #1 -1111 0010 0111 1011:30:-----:-----:T-:10: FTRAPcc #2 -1111 0010 0111 1100:30:-----:-----:T-:00: FTRAPcc -1111 0010 10KK KKKK:30:-----:-----:-B:11: FBcc #K,#1 -1111 0010 11KK KKKK:30:-----:-----:-B:11: FBcc #K,#2 -1111 0011 00ss sSSS:32:-----:-----:--:20: FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16] -1111 0011 01ss sSSS:32:-----:-----:--:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] +% TODO: FPU is currently commented out +% 1111 0010 00ss sSSS:30:?????:?????:11: FPP #1,s +% 1111 0010 01ss sSSS:30:?????:?????:11: FDBcc #1,s[Areg-Dreg] +% 1111 0010 01ss sSSS:30:?????:?????:11: FScc #1,s[!Areg,Immd,PC8r,PC16] +% 1111 0010 0111 1010:30:?????:?????:10: FTRAPcc #1 +% 1111 0010 0111 1011:30:?????:?????:10: FTRAPcc #2 +% 1111 0010 0111 1100:30:?????:?????:00: FTRAPcc +% 1111 0010 10KK KKKK:30:?????:?????:11: FBcc #K,#1 +% 1111 0010 11KK KKKK:30:?????:?????:11: FBcc #K,#2 +% 1111 0011 00ss sSSS:32:?????:?????:20: FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16] +% 1111 0011 01ss sSSS:32:?????:?????:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] % 68040 instructions -1111 0101 iiii iSSS:40:-----:-----:T-:11: MMUOP #i,s -1111 0100 pp00 1rrr:42:-----:-----:T-:02: CINVL #p,Ar -1111 0100 pp01 0rrr:42:-----:-----:T-:02: CINVP #p,Ar -1111 0100 pp01 1rrr:42:-----:-----:T-:00: CINVA #p -1111 0100 pp10 1rrr:42:-----:-----:T-:02: CPUSHL #p,Ar -1111 0100 pp11 0rrr:42:-----:-----:T-:02: CPUSHP #p,Ar -1111 0100 pp11 1rrr:42:-----:-----:T-:00: CPUSHA #p -% destination register number is encoded in the following word -1111 0110 0010 0rrr:40:-----:-----:--:12: MOVE16 ArP,AxP -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],L -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Areg-Aipi] -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],L -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Aipi-Aind] - -% EmulOp instructions -0111 0001 0000 0000:00:-----:-----:-R:00: EMULOP_RETURN -0111 0001 EEEE EEEE:00:-----:-----:-J:10: EMULOP #E +1111 0100 ii00 1rrr:42:-----:-----:02: CINVL #i,Ar +1111 0100 ii01 0rrr:42:-----:-----:02: CINVP #i,Ar +1111 0100 ii01 1rrr:42:-----:-----:00: CINVA #i +1111 0100 ii10 1rrr:42:-----:-----:02: CPUSHL #i,Ar +1111 0100 ii11 0rrr:42:-----:-----:02: CPUSHP #i,Ar +1111 0100 ii11 1rrr:42:-----:-----:00: CPUSHA #i +1111 0110 0010 0rrr:40:-----:-----:12: MOVE16 ArP,ARP From 1758ef58b5b677daf9d0ae9df3751177ce7e718d Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 15 Apr 2018 20:23:12 -0500 Subject: [PATCH 208/534] Port of CPU code from ARAnyM (currently hangs) --- BasiliskII/src/Unix/CMakeLists.txt | 9 +- BasiliskII/src/Unix/main_unix.cpp | 5 +- BasiliskII/src/Unix/sysdeps.h | 11 + BasiliskII/src/include/main.h | 7 - BasiliskII/src/uae_cpu/Makefile.am | 80 + BasiliskII/src/uae_cpu/aranym_glue.cpp | 327 + BasiliskII/src/uae_cpu/basilisk_glue.cpp | 81 +- BasiliskII/src/uae_cpu/build68k.c | 71 +- .../src/uae_cpu/compiler/codegen_arm.cpp | 2872 +++++++ BasiliskII/src/uae_cpu/compiler/codegen_arm.h | 1292 ++++ .../src/uae_cpu/compiler/codegen_x86.cpp | 5372 +++++++++++++ BasiliskII/src/uae_cpu/compiler/codegen_x86.h | 1996 +++++ BasiliskII/src/uae_cpu/compiler/compemu.h | 543 ++ BasiliskII/src/uae_cpu/compiler/compemu1.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu2.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu3.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu4.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu5.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu6.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu7.cpp | 2 + BasiliskII/src/uae_cpu/compiler/compemu8.cpp | 2 + .../src/uae_cpu/compiler/compemu_fpp.cpp | 1638 ++++ .../uae_cpu/compiler/compemu_midfunc_arm.cpp | 2106 +++++ .../uae_cpu/compiler/compemu_midfunc_arm.h | 184 + .../uae_cpu/compiler/compemu_midfunc_arm2.cpp | 5428 +++++++++++++ .../uae_cpu/compiler/compemu_midfunc_arm2.h | 348 + .../uae_cpu/compiler/compemu_midfunc_x86.cpp | 2982 ++++++++ .../uae_cpu/compiler/compemu_midfunc_x86.h | 252 + .../src/uae_cpu/compiler/compemu_support.cpp | 5111 +++++++++++++ BasiliskII/src/uae_cpu/compiler/compstbla.cpp | 5 + BasiliskII/src/uae_cpu/compiler/flags_arm.h | 52 + BasiliskII/src/uae_cpu/compiler/flags_x86.h | 52 + BasiliskII/src/uae_cpu/compiler/gencomp.c | 3619 +++++++++ BasiliskII/src/uae_cpu/compiler/gencomp_arm.c | 4981 ++++++++++++ .../src/uae_cpu/compiler/test_codegen_arm.c | 264 + .../src/uae_cpu/compiler/test_codegen_x86.cpp | 1008 +++ BasiliskII/src/uae_cpu/cpu_emulation.h | 16 +- BasiliskII/src/uae_cpu/cpudefsa.cpp | 5 + BasiliskII/src/uae_cpu/cpuemu1.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu1_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu2.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu2_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu3.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu3_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu4.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu4_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu5.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu5_nf.cpp | 4 + BasiliskII/src/uae_cpu/cpuemu6.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu6_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu7.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu7_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu8.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu8_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpufunctbla.cpp | 5 + BasiliskII/src/uae_cpu/cpummu.cpp | 1096 +++ BasiliskII/src/uae_cpu/cpummu.h | 267 + BasiliskII/src/uae_cpu/cpuopti.c | 298 - BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 + BasiliskII/src/uae_cpu/cpustbla.cpp | 5 + BasiliskII/src/uae_cpu/debug.cpp | 82 + BasiliskII/src/uae_cpu/fpu/core.h | 268 + BasiliskII/src/uae_cpu/fpu/exceptions.cpp | 193 + BasiliskII/src/uae_cpu/fpu/exceptions.h | 154 + BasiliskII/src/uae_cpu/fpu/flags.cpp | 174 + BasiliskII/src/uae_cpu/fpu/flags.h | 228 + BasiliskII/src/uae_cpu/fpu/fpu.h | 59 + BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 2330 ++++++ BasiliskII/src/uae_cpu/fpu/fpu_ieee.h | 154 + BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp | 2110 +++++ BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp | 2553 +++++++ BasiliskII/src/uae_cpu/fpu/fpu_uae.h | 217 + BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp | 6791 +++++++++++++++++ BasiliskII/src/uae_cpu/fpu/fpu_x86.h | 384 + BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h | 104 + BasiliskII/src/uae_cpu/fpu/impl.h | 159 + BasiliskII/src/uae_cpu/fpu/mathlib.cpp | 105 + BasiliskII/src/uae_cpu/fpu/mathlib.h | 1185 +++ BasiliskII/src/uae_cpu/fpu/rounding.cpp | 69 + BasiliskII/src/uae_cpu/fpu/rounding.h | 159 + BasiliskII/src/uae_cpu/fpu/types.h | 181 + BasiliskII/src/uae_cpu/gencpu.c | 1764 +++-- BasiliskII/src/uae_cpu/m68k.h | 711 +- BasiliskII/src/uae_cpu/memory-uae.h | 606 ++ BasiliskII/src/uae_cpu/memory.cpp | 59 + BasiliskII/src/uae_cpu/memory.h | 45 + BasiliskII/src/uae_cpu/newcpu.cpp | 1711 +++-- BasiliskII/src/uae_cpu/newcpu.h | 348 +- BasiliskII/src/uae_cpu/noflags.h | 142 + BasiliskII/src/uae_cpu/readcpu.cpp | 143 +- BasiliskII/src/uae_cpu/readcpu.h | 59 +- BasiliskII/src/uae_cpu/readcpua.cpp | 5 + BasiliskII/src/uae_cpu/registers.h | 116 + BasiliskII/src/uae_cpu/spcflags.h | 104 + BasiliskII/src/uae_cpu/table68k | 418 +- 95 files changed, 63970 insertions(+), 2367 deletions(-) create mode 100644 BasiliskII/src/uae_cpu/Makefile.am create mode 100644 BasiliskII/src/uae_cpu/aranym_glue.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_arm.h create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu1.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu2.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu3.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu4.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu5.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu6.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu7.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu8.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_support.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compstbla.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/flags_arm.h create mode 100644 BasiliskII/src/uae_cpu/compiler/flags_x86.h create mode 100644 BasiliskII/src/uae_cpu/compiler/gencomp.c create mode 100644 BasiliskII/src/uae_cpu/compiler/gencomp_arm.c create mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c create mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/cpudefsa.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu1.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu1_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu2.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu2_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu3.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu3_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu4.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu4_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu5.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu5_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu6.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu6_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu7.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu7_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu8.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu8_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpufunctbla.cpp create mode 100644 BasiliskII/src/uae_cpu/cpummu.cpp create mode 100644 BasiliskII/src/uae_cpu/cpummu.h delete mode 100644 BasiliskII/src/uae_cpu/cpuopti.c create mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpustbla.cpp create mode 100644 BasiliskII/src/uae_cpu/debug.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/core.h create mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.h create mode 100644 BasiliskII/src/uae_cpu/fpu/flags.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/flags.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h create mode 100644 BasiliskII/src/uae_cpu/fpu/impl.h create mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.h create mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.h create mode 100644 BasiliskII/src/uae_cpu/fpu/types.h create mode 100644 BasiliskII/src/uae_cpu/memory-uae.h create mode 100644 BasiliskII/src/uae_cpu/memory.cpp create mode 100644 BasiliskII/src/uae_cpu/noflags.h create mode 100644 BasiliskII/src/uae_cpu/readcpua.cpp create mode 100644 BasiliskII/src/uae_cpu/registers.h create mode 100644 BasiliskII/src/uae_cpu/spcflags.h diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index fca7bca0d..65a607f89 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -15,7 +15,7 @@ add_custom_command(OUTPUT cpudefs.cpp add_executable(gencpu ../uae_cpu/gencpu.c ../uae_cpu/readcpu.cpp cpudefs.cpp) -add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp COMMAND gencpu DEPENDS gencpu) +add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp cpufunctbl.cpp COMMAND gencpu DEPENDS gencpu) set(BasiliskII_SRCS ../main.cpp @@ -76,10 +76,11 @@ set(BasiliskII_SRCS ../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp - # ../uae_cpu/fpp.cpp + ../uae_cpu/fpu/fpu_uae.cpp cpustbl.cpp cpudefs.cpp cpuemu.cpp + cpufunctbl.cpp #addressing mode =direct -DDIRECT_ADDRESSING #includes ) @@ -87,8 +88,10 @@ set(BasiliskII_SRCS add_executable(BasiliskII ${BasiliskII_SRCS}) set_source_files_properties(${BasiliskII_SRCS} - PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DDATADIR=\\\".\\\"") + PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DFPU_UAE -DDATADIR=\\\".\\\"") target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) + + #keycodes -> ../SDL/keycodes diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 644c215b3..3affe2366 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -199,9 +199,8 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) fprintf(stderr, " [IP=%p]", fault_instruction); fprintf(stderr, "\n"); #if EMULATED_68K - uaecptr nextpc; - extern void m68k_dumpstate(uaecptr *nextpc); - m68k_dumpstate(&nextpc); + extern void m68k_dumpstate (FILE *, uaecptr *); + m68k_dumpstate(stderr, 0); #endif VideoQuitFullScreen(); diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 8dd77b1d5..56b7a71d6 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -712,6 +712,17 @@ static inline uae_u32 do_byteswap_16(uae_u32 v) #endif #define REGPARAM2 + +#if __GNUC__ < 3 +# define __builtin_expect(foo,bar) (foo) +#endif +#define likely(x) __builtin_expect(!!(x), 1) +#define unlikely(x) __builtin_expect(!!(x), 0) +#define ALWAYS_INLINE inline __attribute__((always_inline)) + +#define memptr uint32 + + #endif /* NEED_CONFIG_H_ONLY */ #endif diff --git a/BasiliskII/src/include/main.h b/BasiliskII/src/include/main.h index 1ba7b6acb..b55ddc6d2 100644 --- a/BasiliskII/src/include/main.h +++ b/BasiliskII/src/include/main.h @@ -31,13 +31,6 @@ extern int FPUType; // Flag: 24-bit-addressing? extern bool TwentyFourBitAddressing; -// 68k register structure (for Execute68k()) -struct M68kRegisters { - uint32 d[8]; - uint32 a[8]; - uint16 sr; -}; - // General functions extern bool InitAll(const char *vmdir); extern void ExitAll(void); diff --git a/BasiliskII/src/uae_cpu/Makefile.am b/BasiliskII/src/uae_cpu/Makefile.am new file mode 100644 index 000000000..0f27219d5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/Makefile.am @@ -0,0 +1,80 @@ +# +# Note: this Makefile only contains rules for the source +# generator tools. +# + +# +# suppress warnings about overriding LDFLAGS and CPPFLAGS +# +AUTOMAKE_OPTIONS = -Wno-gnu + +AM_CPPFLAGS = $(DEFINES) \ + "-I$(srcdir)/../include" \ + "-I$(srcdir)/../Unix" \ + "-I$(builddir)/.." \ + "-I$(builddir)" \ + "-I$(srcdir)" + +CC = $(CC_FOR_BUILD) +CXX = $(CXX_FOR_BUILD) + +LDFLAGS = $(LDFLAGS_FOR_BUILD) +CPPFLAGS = $(CPPFLAGS_FOR_BUILD) +CFLAGS = $(CFLAGS_FOR_BUILD) +CXXFLAGS = $(CXXFLAGS_FOR_BUILD) +LIBS=-lm + +CFLAGS_NOWARN = $(DBGSP) +AM_CFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) +AM_CXXFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) + +noinst_PROGRAMS = build68k gencpu +if USE_JIT +noinst_PROGRAMS += gencomp +endif + +BUILT_SOURCES = \ + cpudefs.cpp \ + cpuemu.cpp \ + cpustbl.cpp \ + cpufunctbl.cpp \ + cputbl.h \ + $(empty) + +build68k_SOURCES = build68k.c +gencpu_SOURCES = gencpu.c m68k.h readcpu.cpp readcpu.h cpudefs.cpp +gencomp_SOURCES = +if GENCOMP_ARCH_X86 +gencomp_SOURCES += compiler/gencomp.c +endif +if GENCOMP_ARCH_ARM +gencomp_SOURCES += compiler/gencomp_arm.c +endif +gencomp_SOURCES += readcpu.cpp cpudefs.cpp + +if USE_JIT +BUILT_SOURCES += compemu.cpp compstbl.cpp comptbl.h +endif + + +cpudefs.cpp: build68k$(EXEEXT) $(srcdir)/table68k + ./build68k <$(srcdir)/table68k > $@ +cpuemu.cpp: gencpu$(EXEEXT) + ./gencpu$(EXEEXT) +cpustbl.cpp cpufunctbl.cpp cputbl.h: cpuemu.cpp +compemu.cpp: gencomp$(EXEEXT) + ./gencomp$(EXEEXT) +compstbl.cpp comptbl.h: compemu.cpp + +CLEANFILES = $(BUILT_SOURCES) + +EXTRA_DIST = \ + table68k \ + compiler/codegen_arm.cpp compiler/codegen_arm.h \ + compiler/compemu_midfunc_arm.cpp compiler/compemu_midfunc_arm.h \ + compiler/compemu_midfunc_arm2.cpp compiler/compemu_midfunc_arm2.h \ + compiler/test_codegen_arm.c \ + compiler/codegen_x86.cpp compiler/codegen_x86.h \ + compiler/compemu_midfunc_x86.cpp compiler/compemu_midfunc_x86.h \ + compiler/test_codegen_x86.cpp \ + $(empty) diff --git a/BasiliskII/src/uae_cpu/aranym_glue.cpp b/BasiliskII/src/uae_cpu/aranym_glue.cpp new file mode 100644 index 000000000..7148d446e --- /dev/null +++ b/BasiliskII/src/uae_cpu/aranym_glue.cpp @@ -0,0 +1,327 @@ +/* + * aranym_glue.cpp - CPU interface + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "sysdeps.h" + +#include "cpu_emulation.h" +#include "newcpu.h" +#include "hardware.h" +#include "input.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif +#include "nf_objs.h" + +#include "debug.h" + +// RAM and ROM pointers +memptr RAMBase = 0; // RAM base (Atari address space) gb-- init is important +uint8 *RAMBaseHost; // RAM base (host address space) +uint32 RAMSize = 0x00e00000; // Size of RAM + +memptr ROMBase = 0x00e00000; // ROM base (Atari address space) +uint8 *ROMBaseHost; // ROM base (host address space) +uint32 ROMSize = 0x00100000; // Size of ROM + +uint32 RealROMSize; // Real size of ROM + +memptr HWBase = 0x00f00000; // HW base (Atari address space) +uint8 *HWBaseHost; // HW base (host address space) +uint32 HWSize = 0x00100000; // Size of HW space + +memptr FastRAMBase = 0x01000000; // Fast-RAM base (Atari address space) +uint8 *FastRAMBaseHost; // Fast-RAM base (host address space) + +#ifdef HW_SIGSEGV +uint8 *FakeIOBaseHost; +#endif + +#ifdef FIXED_VIDEORAM +memptr VideoRAMBase = ARANYMVRAMSTART; // VideoRAM base (Atari address space) +#else +memptr VideoRAMBase; // VideoRAM base (Atari address space) +#endif +uint8 *VideoRAMBaseHost;// VideoRAM base (host address space) +//uint32 VideoRAMSize; // Size of VideoRAM + +#ifndef NOT_MALLOC +uintptr MEMBaseDiff; // Global offset between a Atari address and its Host equivalent +uintptr ROMBaseDiff; +uintptr FastRAMBaseDiff; +#endif + +uintptr VMEMBaseDiff; // Global offset between a Atari VideoRAM address and /dev/fb0 mmap + +// From newcpu.cpp +extern int quit_program; + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) +SDL_mutex *spcflags_lock; +#endif +#if defined(ENABLE_REALSTOP) +SDL_cond *stop_condition; +#endif + + +/* + * Initialize 680x0 emulation + */ + +bool InitMEM() { + InitMEMBaseDiff(RAMBaseHost, RAMBase); + InitROMBaseDiff(ROMBaseHost, ROMBase); + InitFastRAMBaseDiff(FastRAMBaseHost, FastRAMBase); + InitVMEMBaseDiff(VideoRAMBaseHost, VideoRAMBase); + return true; +} + +bool Init680x0(void) +{ + init_m68k(); + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + if ((spcflags_lock = SDL_CreateMutex()) == NULL) { + panicbug("Error by SDL_CreateMutex()"); + exit(EXIT_FAILURE); + } +#endif + +#if ENABLE_REALSTOP + if ((stop_condition = SDL_CreateCond()) == NULL) { + panicbug("Error by SDL_CreateCond()"); + exit(EXIT_FAILURE); + } +#endif + +#ifdef USE_JIT + if (bx_options.jit.jit) compiler_init(); +#endif + return true; +} + +/* + * Instr. RESET + */ + +void AtariReset(void) +{ + // reset Atari hardware here + HWReset(); + // reset NatFeats here + NFReset(); + // reset the input devices (input.cpp) + InputReset(); + +} + +/* + * Reset CPU + */ + +void Reset680x0(void) +{ + m68k_reset(); +} + +/* + * Deinitialize 680x0 emulation + */ + +void Exit680x0(void) +{ +#ifdef USE_JIT + if (bx_options.jit.jit) compiler_exit(); +#endif + exit_m68k(); +} + + +/* + * Reset and start 680x0 emulation + */ + +void Start680x0(void) +{ + m68k_reset(); +#ifdef USE_JIT + if (bx_options.jit.jit) { + m68k_compile_execute(); + } + else +#endif + m68k_execute(); +} + +/* + * Restart running 680x0 emulation safely from different thread + */ +void Restart680x0(void) +{ + quit_program = 2; + TriggerNMI(); +} + +/* + * Quit 680x0 emulation safely from different thread + */ +void Quit680x0(void) +{ + quit_program = 1; + TriggerNMI(); +} + + +int MFPdoInterrupt(void) +{ + return getMFP()->doInterrupt(); +} + +int SCCdoInterrupt(void) +{ + return getSCC()->doInterrupt(); +} + +/* + * Trigger interrupts + */ +void TriggerInternalIRQ(void) +{ + SPCFLAGS_SET( SPCFLAG_INTERNAL_IRQ ); +} + +void TriggerInt3(void) +{ + SPCFLAGS_SET( SPCFLAG_INT3 ); +} + +void TriggerVBL(void) +{ + SPCFLAGS_SET( SPCFLAG_VBL ); +} + +void TriggerInt5(void) +{ + SPCFLAGS_SET( SPCFLAG_INT5 ); +} + +void TriggerSCC(bool enable) +{ + if (enable) + SPCFLAGS_SET( SPCFLAG_SCC ); + else + SPCFLAGS_CLEAR( SPCFLAG_SCC ); +} + +void TriggerMFP(bool enable) +{ + if (enable) + SPCFLAGS_SET( SPCFLAG_MFP ); + else + SPCFLAGS_CLEAR( SPCFLAG_MFP ); +} + +void TriggerNMI(void) +{ + SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI +} + +#ifndef REBOOT_OR_HALT +#define REBOOT_OR_HALT 0 // halt by default +#endif + +#if REBOOT_OR_HALT == 1 +# define CPU_MSG "CPU: Rebooting" +# define CPU_ACTION Restart680x0() +#else +# define CPU_MSG "CPU: Halting" +# define CPU_ACTION Quit680x0() +#endif + +#ifdef ENABLE_EPSLIMITER + +#ifndef EPS_LIMIT +# define EPS_LIMIT 10000 /* this might be too high if ARAnyM is slowed down by printing the bus errors on console */ +#endif + +void check_eps_limit(uaecptr pc) +{ + static long last_exception_time=-1; + static long exception_per_sec=0; + static long exception_per_sec_pc=0; + static uaecptr prevpc = 0; + + if (bx_options.cpu.eps_enabled) { + if (last_exception_time == -1) { + last_exception_time = SDL_GetTicks(); + } + + exception_per_sec++; + + if (pc == prevpc) { + /* BUS ERRORs occur at the same PC - watch out! */ + exception_per_sec_pc++; + } + else { + exception_per_sec_pc = 0; + prevpc = pc; + } + + if (SDL_GetTicks() - last_exception_time > 1000) { + last_exception_time = SDL_GetTicks(); + if (exception_per_sec_pc > bx_options.cpu.eps_max || + exception_per_sec > EPS_LIMIT /* make it configurable */) { + panicbug("CPU: Exception per second limit reached: %ld/%ld", + exception_per_sec_pc, exception_per_sec); + /* would be cool to open SDL dialog here: */ + /* [Exception per seconds limit reached. XXXXX exception + occured in the last second. The limit is set to YYYYY + in your config file. Do you want to continue emulation, + reset ARAnyM or quit ?][Continue] [Reset] [Quit] + */ + panicbug(CPU_MSG); + CPU_ACTION; + } + exception_per_sec = 0; + exception_per_sec_pc = 0; + } + } +} +#endif + +void report_double_bus_error() +{ + panicbug("CPU: Double bus fault detected !"); + /* would be cool to open SDL dialog here: */ + /* [Double bus fault detected. The emulated system crashed badly. + Do you want to reset ARAnyM or quit ?] [Reset] [Quit]" + */ + panicbug(CPU_MSG); + CPU_ACTION; +} + +#ifdef FLIGHT_RECORDER +extern bool cpu_flight_recorder_active; +void cpu_flight_recorder(int activate) { cpu_flight_recorder_active = activate; } +#endif diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 9d3448165..1b03160ae 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -1,7 +1,7 @@ /* * basilisk_glue.cpp - Glue UAE CPU to Basilisk II CPU engine interface * - * Basilisk II (C) 1997-1999 Christian Bauer + * Basilisk II (C) 1997-2008 Christian Bauer * * 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 @@ -19,8 +19,10 @@ */ #include "sysdeps.h" + #include "cpu_emulation.h" #include "main.h" +#include "prefs.h" #include "emul_op.h" #include "rom_patches.h" #include "timer.h" @@ -28,9 +30,11 @@ #include "memory.h" #include "readcpu.h" #include "newcpu.h" +#include "compiler/compemu.h" + // RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) +uint32 RAMBaseMac = 0; // RAM base (Mac address space) gb-- initializer is important uint8 *RAMBaseHost; // RAM base (host address space) uint32 RAMSize; // Size of RAM uint32 ROMBaseMac; // ROM base (Mac address space) @@ -48,8 +52,12 @@ int MacFrameLayout; // Frame buffer layout uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent #endif +#if USE_JIT +bool UseJIT = false; +#endif + // From newcpu.cpp -extern int quit_program; +extern bool quit_program; /* @@ -59,13 +67,41 @@ extern int quit_program; bool Init680x0(void) { #if REAL_ADDRESSING + // Mac address space = host address space + RAMBaseMac = (uintptr)RAMBaseHost; + ROMBaseMac = (uintptr)ROMBaseHost; +#elif DIRECT_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() RAMBaseMac = 0; ROMBaseMac = Host2MacAddr(ROMBaseHost); +#else + // Initialize UAE memory banks + RAMBaseMac = 0; + switch (ROMVersion) { + case ROM_VERSION_64K: + case ROM_VERSION_PLUS: + case ROM_VERSION_CLASSIC: + ROMBaseMac = 0x00400000; + break; + case ROM_VERSION_II: + ROMBaseMac = 0x00a00000; + break; + case ROM_VERSION_32: + ROMBaseMac = 0x40800000; + break; + default: + return false; + } + memory_init(); #endif init_m68k(); +#if USE_JIT + UseJIT = compiler_use_jit(); + if (UseJIT) + compiler_init(); +#endif return true; } @@ -76,9 +112,25 @@ bool Init680x0(void) void Exit680x0(void) { +#if USE_JIT + if (UseJIT) + compiler_exit(); +#endif + exit_m68k(); } +/* + * Initialize memory mapping of frame buffer (called upon video mode change) + */ + +void InitFrameBufferMapping(void) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + memory_init(); +#endif +} + /* * Reset and start 680x0 emulation (doesn't return) */ @@ -86,7 +138,12 @@ void Exit680x0(void) void Start680x0(void) { m68k_reset(); - m68k_go(true); +#if USE_JIT + if (UseJIT) + m68k_compile_execute(); + else +#endif + m68k_execute(); } @@ -97,7 +154,7 @@ void Start680x0(void) void TriggerInterrupt(void) { idle_resume(); - regs.spcflags |= SPCFLAG_INT; + SPCFLAGS_SET( SPCFLAG_INT ); } void TriggerNMI(void) @@ -143,8 +200,8 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) // Execute trap m68k_setpc(m68k_areg(regs, 7)); fill_prefetch_0(); - quit_program = 0; - m68k_go(true); + quit_program = false; + m68k_execute(); // Clean up stack m68k_areg(regs, 7) += 4; @@ -158,7 +215,7 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = 0; + quit_program = false; } @@ -190,8 +247,8 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) // Execute routine m68k_setpc(addr); fill_prefetch_0(); - quit_program = 0; - m68k_go(true); + quit_program = false; + m68k_execute(); // Clean up stack m68k_areg(regs, 7) += 2; @@ -205,5 +262,7 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = 0; + quit_program = false; } + +void report_double_bus_error() {} diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c index 42a7de8b5..e996758d0 100644 --- a/BasiliskII/src/uae_cpu/build68k.c +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -1,3 +1,27 @@ +/* + * build68k.c - m68k CPU builder + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * @@ -6,13 +30,15 @@ * Copyright 1995,1996 Bernd Schmidt */ -#include -#include -#include - -#include "sysdeps.h" #include "readcpu.h" +#include +#include +#include +#include +#include +#undef abort + static FILE *tablef; static int nextch = 0; @@ -51,7 +77,7 @@ static int nextchtohex(void) } } -int main(int argc, char **argv) +int main() { int no_insns = 0; @@ -76,6 +102,7 @@ int main(int argc, char **argv) char opcstr[256]; int bitpos[16]; int flagset[5], flaguse[5]; + char cflow; unsigned int bitmask,bitpattern; int n_variable; @@ -107,6 +134,8 @@ int main(int argc, char **argv) case 'r': currbit = bitr; break; case 'R': currbit = bitR; break; case 'z': currbit = bitz; break; + case 'E': currbit = bitE; break; + case 'p': currbit = bitp; break; default: abort(); } if (!(bitmask & 1)) { @@ -121,6 +150,7 @@ int main(int argc, char **argv) patbits[i] = nextch; getnextch(); } + (void) patbits; while (isspace(nextch) || nextch == ':') /* Get CPU and privilege level */ getnextch(); @@ -156,6 +186,7 @@ int main(int argc, char **argv) switch(nextch){ case '-': flagset[i] = fa_unset; break; case '/': flagset[i] = fa_isjmp; break; + case '+': flagset[i] = fa_isbranch; break; case '0': flagset[i] = fa_zero; break; case '1': flagset[i] = fa_one; break; case 'x': flagset[i] = fa_dontcare; break; @@ -182,6 +213,26 @@ int main(int argc, char **argv) } } + getnextch(); + while (isspace(nextch)) + getnextch(); + + if (nextch != ':') /* Get control flow information */ + abort(); + + cflow = 0; + for(i = 0; i < 2; i++) { + getnextch(); + switch(nextch){ + case '-': break; + case 'R': cflow |= fl_return; break; + case 'B': cflow |= fl_branch; break; + case 'J': cflow |= fl_jump; break; + case 'T': cflow |= fl_trap; break; + default: abort(); + } + } + getnextch(); while (isspace(nextch)) getnextch(); @@ -201,7 +252,7 @@ int main(int argc, char **argv) if (nextch != ':') abort(); - fgets(opcstr, 250, tablef); + assert(fgets(opcstr, 250, tablef) != NULL); getnextch(); { int j; @@ -209,12 +260,12 @@ int main(int argc, char **argv) char *opstrp = opcstr, *osendp; int slen = 0; - while (isspace(*opstrp)) + while (isspace((int)*opstrp)) opstrp++; osendp = opstrp; while (*osendp) { - if (!isspace (*osendp)) + if (!isspace ((int)*osendp)) slen = osendp - opstrp + 1; osendp++; } @@ -233,7 +284,7 @@ int main(int argc, char **argv) for(i = 0; i < 5; i++) { printf("{ %d, %d }%c ", flaguse[i], flagset[i], i == 4 ? ' ' : ','); } - printf("}, %d, \"%s\"}", sduse, opstrp); + printf("}, %d, %d, \"%s\"}", cflow, sduse, opstrp); } } printf("};\nint n_defs68k = %d;\n", no_insns); diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp new file mode 100644 index 000000000..fb7e69c70 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp @@ -0,0 +1,2872 @@ +/* + * compiler/codegen_arm.cpp - ARM code generator + * + * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> ARM + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * 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 + * + * Current state: + * - Experimental + * - Still optimizable + * - Not clock cycle optimized + * - as a first step this compiler emulates x86 instruction to be compatible + * with gencomp. Better would be a specialized version of gencomp compiling + * 68k instructions to ARM compatible instructions. This is a step for the + * future + * + */ + +#include "flags_arm.h" + +// Declare the built-in __clear_cache function. +extern void __clear_cache (char*, char*); + +/************************************************************************* + * Some basic information about the the target CPU * + *************************************************************************/ + +#define R0_INDEX 0 +#define R1_INDEX 1 +#define R2_INDEX 2 +#define R3_INDEX 3 +#define R4_INDEX 4 +#define R5_INDEX 5 +#define R6_INDEX 6 +#define R7_INDEX 7 +#define R8_INDEX 8 +#define R9_INDEX 9 +#define R10_INDEX 10 +#define R11_INDEX 11 +#define R12_INDEX 12 +#define R13_INDEX 13 +#define R14_INDEX 14 +#define R15_INDEX 15 + +#define RSP_INDEX 13 +#define RLR_INDEX 14 +#define RPC_INDEX 15 + +/* The register in which subroutines return an integer return value */ +#define REG_RESULT R0_INDEX + +/* The registers subroutines take their first and second argument in */ +#define REG_PAR1 R0_INDEX +#define REG_PAR2 R1_INDEX + +#define REG_WORK1 R2_INDEX +#define REG_WORK2 R3_INDEX + +//#define REG_DATAPTR R10_INDEX + +#define REG_PC_PRE R0_INDEX /* The register we use for preloading regs.pc_p */ +#define REG_PC_TMP R1_INDEX /* Another register that is not the above */ + +#define SHIFTCOUNT_NREG R1_INDEX /* Register that can be used for shiftcount. + -1 if any reg will do. Normally this can be set to -1 but compemu_support is tied to 1 */ +#define MUL_NREG1 R0_INDEX /* %r4 will hold the low 32 bits after a 32x32 mul */ +#define MUL_NREG2 R1_INDEX /* %r5 will hold the high 32 bits */ + +#define STACK_ALIGN 4 +#define STACK_OFFSET sizeof(void *) +#define STACK_SHADOW_SPACE 0 + +uae_s8 always_used[]={2,3,-1}; +uae_s8 can_byte[]={0,1,4,5,6,7,8,9,10,11,12,-1}; +uae_s8 can_word[]={0,1,4,5,6,7,8,9,10,11,12,-1}; + +uae_u8 call_saved[]={0,0,0,0,1,1,1,1,1,1,1,1,0,1,1,1}; + +/* This *should* be the same as call_saved. But: + - We might not really know which registers are saved, and which aren't, + so we need to preserve some, but don't want to rely on everyone else + also saving those registers + - Special registers (such like the stack pointer) should not be "preserved" + by pushing, even though they are "saved" across function calls +*/ +static const uae_u8 need_to_preserve[]={0,0,0,0,1,1,1,1,1,1,1,1,1,0,0,0}; +static const uae_u32 PRESERVE_MASK = ((1<=-128 && x<=127); +} + +static inline int is8bit(uae_s32 x) +{ + return (x>=-255 && x<=255); +} + +static inline int isword(uae_s32 x) +{ + return (x>=-32768 && x<=32767); +} + +#define jit_unimplemented(fmt, ...) do{ panicbug("**** Unimplemented ****"); panicbug(fmt, ## __VA_ARGS__); abort(); }while (0) + +#if 0 /* currently unused */ +static void jit_fail(const char *msg, const char *file, int line, const char *function) +{ + panicbug("JIT failure in function %s from file %s at line %d: %s", + function, file, line, msg); + abort(); +} +#endif + +LOWFUNC(NONE,WRITE,1,raw_push_l_r,(RR4 r)) +{ + PUSH(r); +} +LENDFUNC(NONE,WRITE,1,raw_push_l_r,(RR4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_r,(RR4 r)) +{ + POP(r); +} +LENDFUNC(NONE,READ,1,raw_pop_l_r,(RR4 r)) + +LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) +{ + MVN_ri(REG_WORK1, 0); // mvn r2,#0 + LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 + ORR_rrrLSRi(REG_WORK2, REG_WORK2, REG_WORK1, 8); // orr r3, r3, r2, lsr #8 + LSL_rri(REG_WORK1, s, 24); // lsl r2, %[s], #24 + + ADCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adcs r3, r3, r2 + + BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], R3 LSR #24 +} +LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) +{ + MVN_ri(REG_WORK1, 0); // mvn r2,#0 + LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 + ORR_rrrLSRi(REG_WORK2, REG_WORK2, REG_WORK1, 16); // orr r3, r3, r2, lsr #16 + LSL_rri(REG_WORK1, s, 16); // lsl r2, %[s], #16 + + ADCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 +#ifdef ARMV6_ASSEMBLY + PKHTB_rrrASRi(d,d,REG_WORK2,16); +#else + BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff + BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr %[d], %[d], r3, lsr #16 +#endif +} +LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, RR4 s)) +{ + ADCS_rrr(d, d, s); // adcs %[d],%[d],%[s] +} +LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) +{ + LSL_rri(REG_WORK1, s, 24); // lsl r2, %[s], #24 + LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 + + ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 + + BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3 LSR #24 +} +LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) +{ + LSL_rri(REG_WORK1, s, 16); // lsl r2, %[s], #16 + LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 + + ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 + +#ifdef ARMV6_ASSEMBLY + PKHTB_rrrASRi(d,d,REG_WORK2,16); +#else + BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff + BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3, LSR #16 +#endif +} +LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, RR4 s)) +{ + ADDS_rrr(d, d, s); // adds %[d], %[d], %[s] +} +LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_word_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldrh r2, [pc, #offs] +#else +# ifdef ARMV6_ASSEMBLY + LDRH_rRI(REG_WORK1, RPC_INDEX, 24); // ldrh r2, [pc, #24] ; +# else + LDRH_rRI(REG_WORK1, RPC_INDEX, 16); // ldrh r2, [pc, #16] ; +# endif +#endif + LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 + LSL_rri(REG_WORK1, REG_WORK1, 16); // lsl r2, r2, #16 + + ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 + +#ifdef ARMV6_ASSEMBLY + PKHTB_rrrASRi(d,d,REG_WORK2,16); +#else + BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff + BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr %[d],%[d], r3, LSR #16 +#endif + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_word(i); + skip_word(0); + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) +{ + LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 + + ADDS_rri(REG_WORK2, REG_WORK2, i << 24); // adds r3, r3, #0x12000000 + + BIC_rri(d, d, 0xFF); // bic %[d],%[d], #0xFF + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3, lsr #24 +} +LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + ADDS_rrr(d, d, REG_WORK1); // adds %[d], %[d], r2 +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + ADDS_rrr(d, d, REG_WORK1); // adds %[d], %[d], r2 + B_i(0); // b + + //: + emit_long(i); + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) +{ + MVN_rrLSLi(REG_WORK1, s, 24); // mvn r2, %[s], lsl #24 + MVN_rrLSRi(REG_WORK1, REG_WORK1, 24); // mvn r2, %[s], lsr #24 + AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 + + LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) +{ + MVN_rrLSLi(REG_WORK1, s, 16); // mvn r2, %[s], lsl #16 + MVN_rrLSRi(REG_WORK1, REG_WORK1, 16); // mvn r2, %[s], lsr #16 + AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 + + LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) +{ + ANDS_rrr(d, d, s); // ands r7, r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; +#endif + ANDS_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(i); + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) +{ + MOV_rr(REG_WORK1, s); // mov r2,%[s] + RSB_rri(REG_WORK2, REG_WORK1, 0); // rsb r3,r2,#0 + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // and r2,r2,r3 + CLZ_rr(REG_WORK2, REG_WORK1); // clz r3,r2 + MOV_ri(d, 32); // mov %[d],#32 + SUB_rrr(d, d, REG_WORK2); // sub %[d],%[d],r3 + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TEQ_ri(d, 0); // teq %[d],#0 + CC_SUBS_rri(NATIVE_CC_NE, d,d,1); // sub %[d],%[d],#1 + CC_BIC_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_Z_FLAG); // bic r3,r3,#0x40000000 + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_Z_FLAG); // orr r3,r3,#0x40000000 + MSR_CPSR_r(REG_WORK2); // msr cpsr,r3 +} +LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) +{ +#if defined(ARMV6_ASSEMBLY) + REVSH_rr(REG_WORK1,r); // revsh r2,%[r] + UXTH_rr(REG_WORK1, REG_WORK1); // utxh r2,r2 + LSR_rri(r, r, 16); + ORR_rrrLSLi(r, REG_WORK1, r, 16); // orr %[r], %[r], r2 +#else + MOV_rr(REG_WORK1, r); // mov r2, r6 + BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 + BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // bic r2, r2, #0xff000000 + + EOR_rrr(r, r, REG_WORK1); // eor r6, r6, r2 + + ORR_rrrLSRi(r, r, REG_WORK1, 8); // orr r6, r6, r2, lsr #8 + BIC_rri(REG_WORK1, REG_WORK1, 0xff00); // bic r2, r2, #0xff00 + ORR_rrrLSLi(r,r,REG_WORK1, 8); // orr r6, r6, r2, lsl #8 +#endif +} +LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) + +LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) +{ +#if defined(ARMV6_ASSEMBLY) + REV_rr(r,r); // rev %[r],%[r] +#else + EOR_rrrRORi(REG_WORK1, r, r, 16); // eor r2, r6, r6, ror #16 + BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 + ROR_rri(r, r, 8); // ror r6, r6, #8 + EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 +#endif +} +LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) +{ + int imm = (1 << (i & 0x1f)); + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_ri(r, imm); // tst r6, #0x1000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) +{ + AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f + LSR_rrr(REG_WORK1, r, REG_WORK2); // lsr r2, r6, r3 + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_ri(REG_WORK1, 1); // tst r2, #1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) +{ + MOV_ri(REG_WORK1, 1); // mov r2, #1 + AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f + LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_rr(r, REG_WORK1); // tst r6, r2 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + EOR_rrr(r, r, REG_WORK1); // eor r6, r6, r2 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) +{ + MOV_ri(REG_WORK1, 1); // mov r2, #1 + AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f + LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_rr(r, REG_WORK1); // tst r6, r2 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + BIC_rrr(r, r, REG_WORK1); // bic r6, r6, r2 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) +{ + MOV_ri(REG_WORK1, 1); // mov r2, #1 + AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f + LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_rr(r, REG_WORK1); // tst r6, r2 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + ORR_rrr(r, r, REG_WORK1); // orr r6, r6, r2 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) + +LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) +{ + switch (cc) { + case 9: // LS + BEQ_i(0); // beq Z != 0 + BCC_i(0); // bcc C == 0 + + //: + MOV_rr(d, s); // mov r7,r6 + break; + + case 8: // HI + BEQ_i(1); // beq Z != 0 + BCS_i(0); // bcs C != 0 + MOV_rr(d, s); // mov r7,#0 + break; + + default: + CC_MOV_rr(cc, d, s); // MOVcc R7,#1 + break; + } + //: +} +LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + SXTB_rr(REG_WORK1, d); // sxtb r2,%[d] + SXTB_rr(REG_WORK2, s); // sxtb r3,%[s] +#else + LSL_rri(REG_WORK1, d, 24); // lsl r2,r6,#24 + LSL_rri(REG_WORK2, s, 24); // lsl r3,r7,#24 +#endif + CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + SXTH_rr(REG_WORK1, d); // sxtb r2,%[d] + SXTH_rr(REG_WORK2, s); // sxtb r3,%[s] +#else + LSL_rri(REG_WORK1, d, 16); // lsl r6, r1, #16 + LSL_rri(REG_WORK2, s, 16); // lsl r7, r2, #16 +#endif + + CMP_rr(REG_WORK1, REG_WORK2); // cmp r7, r6, asr #16 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) +{ + CMP_rr(d, s); // cmp r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, RR4 s)) +{ + SMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // smull r2,r3,r7,r6 + MOV_rr(d, REG_WORK1); // mov r7,r2 +} +LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, RR4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) +{ + SMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // smull r2,r3,r7,r6 + MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 + MOV_rr(MUL_NREG2, REG_WORK2); +} +LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) +{ + int shft; + switch(factor) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // LDR R2,[PC, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // LDR R2,[PC, #8] +#endif + ADD_rrr(REG_WORK1, s, REG_WORK1); // ADD R7,R6,R2 + ADD_rrrLSLi(d, REG_WORK1, index, shft); // ADD R7,R7,R5,LSL #2 +#if !defined(USE_DATA_BUFFER) + B_i(0); // B jp + + emit_long(offset); + //; +#endif +} +LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) +{ + int shft; + switch(factor) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + + ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 +} +LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) + +LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; +#endif + LDRB_rRR(REG_WORK1, REG_WORK1, s); // ldrb r2, [r2, r6] + + BIC_rri(d, d, 0xff); // bic r7, r7, #0xff + ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] + STRB_rRR(s, d, REG_WORK1); // strb r6,[r7, r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] + STRB_rRR(s, d, REG_WORK1); // strb r6,[r7, r2] + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; +#endif + MOV_ri(REG_WORK2, s & 0xFF); // mov r3, #0x34 + STRB_rR(REG_WORK2, REG_WORK1); // strb r3, [r2] +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //d: + emit_long(d); + + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + STRB_rR(s, REG_WORK1); // strb r6, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STRB_rR(s, REG_WORK1); // strb r6, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) +{ + BIC_rri(d, d, 0xff); // bic %[d], %[d], #0xff + ORR_rri(d, d, (s & 0xff)); // orr %[d], %[d], #%[s] +} +LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) + +LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; +#endif + LDRB_rR(REG_WORK2, REG_WORK1); // ldrb r2, [r2] + BIC_rri(d, d, 0xff); // bic r7, r7, #0xff + ORR_rrr(d, REG_WORK2, d); // orr r7, r2, r7 +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(s); + //: +#endif +} +LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) +{ + AND_rri(REG_WORK1, s, 0xff); // and r2,r2, #0xff + BIC_rri(d, d, 0x0ff); // bic %[d], %[d], #0xff + ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 +} +LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) + +LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + LDR_rRR(d, REG_WORK1, s); // ldr r7, [r2, r6] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + LDR_rRR(d, REG_WORK1, s); // ldr r7, [r2, r6] + + B_i(0); // b + + emit_long(offset); //: + //: +#endif +} +LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] + STR_rRR(s, d, REG_WORK1); // str R6,[R7, r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] ; + STR_rRR(s, d, REG_WORK1); // str R6,[R7, r2] + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) +{ + // TODO: optimize imm + +#if defined(USE_DATA_BUFFER) + data_check_end(8, 12); + long offs = data_long_offs(d); + + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + + offs = data_long_offs(s); + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s + + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; + LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] + B_i(1); // b + + emit_long(d); //: + emit_long(s); //: + + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else +# ifdef ARMV6_ASSEMBLY + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #16] ; +# else + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; +# endif +#endif + LDRH_rRR(REG_WORK1, REG_WORK1, s); // ldrh r2, [r2, r6] + +#ifdef ARMV6_ASSEMBLY + PKHBT_rrr(d,REG_WORK1,d); +#else + BIC_rri(d, d, 0xff); // bic r7, r7, #0xff + BIC_rri(d, d, 0xff00); // bic r7, r7, #0xff00 + ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 +#endif + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + emit_long(offset); //: + //: +#endif +} +LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] + STRH_rRR(s, d, REG_WORK1); // strh r6,[r7, r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] + STRH_rRR(s, d, REG_WORK1); // strh r6,[r7, r2] + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc,#offs] + STRH_rR(s, REG_WORK1); // strh r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STRH_rR(s, REG_WORK1); // strh r3, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_word_offs(s); + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldrh r3, [pc, #offs] +#else +# ifdef ARMV6_ASSEMBLY + LDRH_rRI(REG_WORK2, RPC_INDEX, 12); // ldrh r3, [pc, #12] ; +# else + LDRH_rRI(REG_WORK2, RPC_INDEX, 4); // ldrh r3, [pc, #12] ; +# endif +#endif + +#ifdef ARMV6_ASSEMBLY + PKHBT_rrr(d,REG_WORK2,d); +#else + BIC_rri(REG_WORK1, d, 0xff); // bic r2, r7, #0xff + BIC_rri(REG_WORK1, REG_WORK1, 0xff00); // bic r2, r2, #0xff00 + ORR_rrr(d, REG_WORK2, REG_WORK1); // orr r7, r3, r2 +#endif + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_word(s); + skip_word(0); + //: +#endif +} +LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) +{ + // TODO: optimize imm + +#if defined(USE_DATA_BUFFER) + data_check_end(8, 12); + long offs = data_long_offs(d); + + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; + + offs = data_word_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + + STRH_rR(REG_WORK1, REG_WORK2); // strh r2, [r3] +#else + LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; + LDRH_rRI(REG_WORK1, RPC_INDEX, 8); // ldrh r2, [pc, #8] ; + STRH_rR(REG_WORK1, REG_WORK2); // strh r2, [r3] + B_i(1); // b + + //mem: + emit_long(d); + //imm: + emit_word(s); + skip_word(0); // Alignment + + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + STR_rR(s, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STR_rR(s, REG_WORK1); // str r3, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + +#if defined(USE_DATA_BUFFER) + long offs = data_word_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDRH_rRI(REG_WORK1, RPC_INDEX, 4); // ldrh r2, [pc, #4] ; +#endif + if (offset >= 0) + STRH_rRI(REG_WORK1, d, offset); // strh r2, [r7, #0x54] + else + STRH_rRi(REG_WORK1, d, -offset);// strh r2, [r7, #-0x54] +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_word(i); + skip_word(0); + //: +#endif +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; +#endif + LDRH_rR(REG_WORK1, REG_WORK1); // ldrh r2, [r2] + LSR_rri(d, d, 16); // lsr r7, r7, #16 + ORR_rrrLSLi(d, REG_WORK1, d, 16); // orr r7, r2, r7, lsl #16 +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(s); + //: +#endif +} +LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) +{ + LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 + ORR_rrrLSRi(d, REG_WORK1, d, 16); // orr r7, r2, r7, lsr #16 + ROR_rri(d, d, 16); // ror r7, r7, #16 +} +LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) + +LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + + if (offset >= 0) + LDRH_rRI(REG_WORK1, s, offset); // ldrh r2, [r6, #12] + else + LDRH_rRi(REG_WORK1, s, -offset); // ldrh r2, [r6, #-12] + +#ifdef ARMV6_ASSEMBLY + PKHBT_rrr(d,REG_WORK1,d); +#else + BIC_rri(d, d, 0xff); // bic r7, r7, #0xff + BIC_rri(d, d, 0xff00); // bic r7, r7, #0xff00 + ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 +#endif +} +LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + + if (offset >= 0) + STRH_rRI(s, d, offset); // strh r6, [r7, #0x7f] + else + STRH_rRi(s, d, -offset);// strh r6, [r7, #-0x7f] +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) + +LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [r10, #offs] + LDR_rR(d, REG_WORK1); // ldr r7, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + LDR_rR(d, REG_WORK1); // ldr r7, [r2] + B_i(0); // b + + emit_long(s); //: + + //: +#endif +} +LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor)) +{ + int shft; + switch(factor) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(base); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] + LDR_rRR_LSLi(d, REG_WORK1, index, shft); // ldr %[d], [r2, %[index], lsl #[shift]] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + LDR_rRR_LSLi(d, REG_WORK1, index, shft); // ldr %[d], [r2, %[index], lsl #[shift]] + + B_i(0); // b + emit_long(base); //: + //: +#endif +} +LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset8)) +{ + Dif(!isbyte(offset8)) abort(); + +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; +#endif + if (offset8 >= 0) + STR_rRI(REG_WORK1, d, offset8); // str r2, [r7, #0x54] + else + STR_rRi(REG_WORK1, d, -offset8); // str r2, [r7, #-0x54] +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(i); + //: +#endif +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + + if (offset >= 0) { + LDR_rRI(d, s, offset); // ldr r2, [r1, #-12] + } else + LDR_rRi(d, s, -offset); // ldr r2, [r1, #12] +} +LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, RR4 s)) +{ + MOV_rr(d, s); // mov %[d], %[s] +} +LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, RR4 s)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + + if (offset >= 0) + STR_rRI(s, d, offset); // str r6, [r7, #12] + else + STR_rRi(s, d, -offset); // str r6, [r7, #-12] +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) +{ + UMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // umull r2,r3,r7,r6 + MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 + MOV_rr(MUL_NREG2, REG_WORK2); +} +LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) +{ + AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF + ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 + LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] +#else + BIC_rri(REG_WORK1, s, 0xff000000); // bic r2, %[s], #0xff000000 + BIC_rri(REG_WORK1, REG_WORK1, 0x00ff0000); // bic r2, r2, #0x00ff0000 +#endif + ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 + LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) +{ + ORRS_rrr(d, d, s); // orrs r7, r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // LDR r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // LDR r2, [pc,#16] ; +#endif + ORRS_rrr(d, d, REG_WORK1); // ORRS r7,r7,r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + // value: + emit_long(i); + //jp: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + int imm = 32 - (i & 0x1f); + + MOV_rrLSLi(REG_WORK1, r, 24); // mov r2,r7,lsl #24 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 + + RORS_rri(REG_WORK1, REG_WORK1, imm); // rors r2,r2,#(32 - (i & 0x1f)) + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(REG_WORK1, 1); // tst r2,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(r, r, 0xff); // bic r7,r7,#0xff + ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + + MOV_ri(REG_WORK2, 32); // mov r3,#32 + AND_rri(REG_WORK1, r, 0x1f); // and r2,r6,#0x1f + SUB_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // sub r3,r3,r2 + + MOV_rrLSLi(REG_WORK1, d, 24); // mov r2,r7,lsl #24 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 + + RORS_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // rors r2,r2,r3 + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(REG_WORK1, 1); // tst r2,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(d, d, 0xff); // bic r7,r7,#0xff + + ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + int imm = 32 - (i & 0x1f); + + MOV_rrLSLi(REG_WORK1, r, 16); // mov r2,r7,lsl #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + + RORS_rri(REG_WORK1, REG_WORK1, imm); // rors r2,r2,#(32 - (i & 0x1f)) + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(REG_WORK1, 1); // tst r2,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); + + BIC_rri(r, r, 0xff00); // bic r2,r2,#0xff00 + BIC_rri(r, r, 0xff); // bic r2,r2,#0xff + + ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + + MOV_ri(REG_WORK2, 32); // mov r3,#32 + AND_rri(REG_WORK1, r, 0x1f); // and r2,r6,#0x1f + SUB_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // sub r3,r3,r2 + + MOV_rrLSLi(REG_WORK1, d, 16); // mov r2,r7,lsl #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + + RORS_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // rors r2,r2,r3 + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(REG_WORK1, 1); // tst r2,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); + + BIC_rri(d, d, 0xff00); // bic r2,r2,#0xff00 + BIC_rri(d, d, 0xff); // bic r2,r2,#0xff + + ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r2,r2,r7,lsr #16 +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + int imm = 32 - (i & 0x1f); + + RORS_rri(r, r, imm); // rors r7,r7,#(32 - (i & 0x1f)) + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(r, 1); // tst r7,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) +{ + RORS_rri(r, r, i & 0x1F); // RORS r7,r7,#12 +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) +{ + // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly + + MOV_ri(REG_WORK1, 32); // mov r2,#32 + AND_rri(REG_WORK2, r, 0x1f); // and r3,r6,#0x1f + SUB_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // sub r2,r2,r3 + + RORS_rrr(d, d, REG_WORK1); // rors r7,r7,r2 + + MRS_CPSR(REG_WORK2); // mrs r3,cpsr + TST_ri(d, 1); // tst r7,#1 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 + MSR_CPSR_r(REG_WORK2); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, RR1 r)) +{ + RORS_rrr(d, d, r); // RORS r7,r7,r6 +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) +{ + MOV_rrLSLi(REG_WORK1, r, 24); // mov r2,r7,lsl #24 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 + + RORS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // rors r2,r2,#12 + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(r, r, 0xff); // bic r7,r7,#0xff + ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) +{ + MOV_rrLSLi(REG_WORK1, d, 24); // mov r2,r7,lsl #24 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 + + RORS_rrr(REG_WORK1, REG_WORK1, r); // rors r2,r2,r6 + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(d, d, 0xff); // bic r7,r7,#0xff + ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) +{ + MOV_rrLSLi(REG_WORK1, r, 16); // mov r2,r7,lsl #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + + RORS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // RORS r2,r2,#12 + + BIC_rri(r, r, 0xff00); // bic r7,r7,#0xff00 + BIC_rri(r, r, 0xff); // bic r7,r7,#0xff + + ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) +{ + MOV_rrLSLi(REG_WORK1, d, 16); // mov r2,r7,lsl #16 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 + + RORS_rrr(REG_WORK1, REG_WORK1, r); // RORS r2,r2,r6 + + BIC_rri(d, d, 0xff00); // bic r7,r7,#0xff00 + BIC_rri(d, d, 0xff); // bic r7,r7,#0xff + + ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) + +LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) +{ + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + + LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 + LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 + + SBCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + BIC_rri(d, d, 0xFF); + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) +{ + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + + SBCS_rrr(d, d, s); // sbcs r7, r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) +{ + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + + LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #24 + LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 + + SBCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + BIC_rri(d,d, 0xff); + BIC_rri(d,d, 0xff00); + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) + +LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) +{ + switch (cc) { + case 9: // LS + BEQ_i(0); // beq + BCC_i(1); // bcs + + MOV_ri(d, 1); // mov r7,#0 + B_i(0); // b + + //: + MOV_ri(d, 0); // mov r7,#1 + break; + + case 8: // HI + BEQ_i(2); // beq Z != 0 + BCS_i(1); // bcc C = 0 + + //: + MOV_ri(d, 1); // mov r7,#0 + B_i(0); // b + + //: + MOV_ri(d, 0); // mov r7,#1 + break; + + default: + CC_MOV_ri(cc, d, 1); // MOVcc R7,#1 + CC_MOV_ri(cc^1, d, 0); // MOVcc^1 R7,#0 + break; + } + //: +} +LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) + +LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) +{ + switch (cc) { + case 9: // LS + BEQ_i(0); // beq + BCC_i(1); // bcs + + MOV_ri(REG_WORK1, 1); // mov r2,#0 + B_i(0); // b + + //: + MOV_ri(REG_WORK1, 0); // mov r2,#1 + break; + + case 8: // HI + BEQ_i(2); // beq Z != 0 + BCS_i(1); // bcc C = 0 + + MOV_ri(REG_WORK1, 1); // mov r2,#0 + B_i(0); // b + + //: + MOV_ri(REG_WORK1, 0); // mov r2,#1 + break; + + default: + CC_MOV_ri(cc, REG_WORK1, 1); // MOVcc R2,#1 + CC_MOV_ri(cc^1, REG_WORK1, 0); // MOVcc^1 R2,#0 + break; + } + //: +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // LDR R3,[PC, #offs] +#else + LDR_rRI(REG_WORK2, RPC_INDEX, 4); // LDR R3,[PC, #4] +#endif + STRB_rR(REG_WORK1, REG_WORK2); // STRB R2,[R3] +#if !defined(USE_DATA_BUFFER) + B_i(0); // B + + emit_long(d); + //: +#endif +} +LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) +{ + LSL_rri(REG_WORK1, r, 24); // LSL r2,r7,#24 + + LSLS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSLS r2,r2,#12 + + BIC_rri(r, r, 0xff); // BIC r7,r7,0xff + ORR_rrrLSRi(r, r, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) +{ + LSL_rri(REG_WORK1, d, 24); // LSL r2,r7,#24 + LSLS_rrr(REG_WORK1, REG_WORK1, r); // LSLS r2,r2,r6 + BIC_rri(d, d, 0xff); // BIC r7,r7,#0xff + ORR_rrrLSRi(d, d, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) +{ + LSLS_rri(r,r, i & 0x1f); // lsls r7,r7,#12 +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, RR1 r)) +{ + LSLS_rrr(d, d, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) +{ + LSL_rri(REG_WORK1, r, 16); // LSL r2,r7,#16 + LSLS_rri(REG_WORK1, REG_WORK1, i&0x1f); // LSLS r2,r2,#12 + + ORR_rrrLSRi(REG_WORK1, REG_WORK1, r, 16); // ORR r2,r2,r7,lsr #16 + + ROR_rri(r, REG_WORK1, 16); // ROR r7,r2,#16 +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) +{ + LSL_rri(REG_WORK1, d, 16); // LSL r2,r7,#16 + LSLS_rrr(REG_WORK1, REG_WORK1, r); // LSLS r2,r2,r6 + ORR_rrrLSRi(REG_WORK1, REG_WORK1, d, 16); // ORR r2,r2,r7,lsr #16 + ROR_rri(d, REG_WORK1, 16); // ROR r7,r2,#16 +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) +{ + LSL_rri(REG_WORK1, r, 24); // lsl r2,r7,#24 + ASR_rri(REG_WORK1, REG_WORK1, 24); // asr r2,r2,#24 + + ASRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // asrs r2,r2,#12 + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(r,r, 0xff); // bic r7,r7,#0xff + ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) +{ + LSL_rri(REG_WORK1, d, 24); // lsl r2,r7,#24 + ASR_rri(REG_WORK1, REG_WORK1, 24); // asr r2,r2,#24 + + ASRS_rrr(REG_WORK1, REG_WORK1, r); // asrs r2,r2,r6 + + AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff + BIC_rri(d,d, 0xff); // bic r7,r7,#0xff + + ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) +{ + LSL_rri(REG_WORK1, r, 16); // lsl r2,r7,#16 + ASR_rri(REG_WORK1, REG_WORK1, 16); // asr r2,r2,#16 + + ASRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // asrs r2,r2,#12 + +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, REG_WORK1); +#else + BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); + BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); +#endif + + BIC_rri(r,r,0xff00); // bic r7,r7,#0xff00 + BIC_rri(r,r,0xff); // bic r7,r7,#0xff + + ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) +{ + LSL_rri(REG_WORK1, d, 16); // lsl r2,r7,#16 + ASR_rri(REG_WORK1, REG_WORK1, 16); // asr r2,r2,#16 + + ASRS_rrr(REG_WORK1, REG_WORK1, r); // asrs r2,r2,r6 + +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, REG_WORK1); +#else + BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // bic r2,r2,#0xff000000 + BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2,r2,#0xff0000 +#endif + + BIC_rri(d,d, 0xff00); // bic r7,r7,#0xff00 + BIC_rri(d,d, 0xff); // bic r7,r7,#0xff + + ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) +{ + ASRS_rri(r, r, i & 0x1f); // ASRS r7,r7,#12 +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, RR1 r)) +{ + ASRS_rrr(d, d, r); // ASRS r7,r7,r6 +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) +{ + AND_rri(REG_WORK1, r, 0xff); // AND r2,r7,#0xFF + + LSRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSRS r2,r2,r6 + + BIC_rri(r, r, 0xFF); // BIC r7,r7,#0xff + ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) +{ + AND_rri(REG_WORK1, d, 0xff); // AND r2,r7,#0xFF + + LSRS_rrr(REG_WORK1, REG_WORK1, r); // LSRS r2,r2,r6 + + BIC_rri(d, d, 0xFF); // BIC r7,r7,#0xff + ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) +{ + LSRS_rri(r, r, i & 0x1f); // LSRS r7,r7,#12 +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, r); +#else + BIC_rri(REG_WORK1, r, 0xff0000); // BIC r2,r7,#0xff0000 + BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // BIC r2,r2,#0xff000000 +#endif + + LSRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSRS r2,r2,#12 + + BIC_rri(r, r, 0xFF); // BIC r7,r7,#0xff + BIC_rri(r, r, 0xFF00); // BIC r7,r7,#0xff00 + ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, d); +#else + BIC_rri(REG_WORK1, d, 0xff0000); // BIC r2,r7,#0xff0000 + BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // BIC r2,r2,#0xff000000 +#endif + + LSRS_rrr(REG_WORK1, REG_WORK1, r); // LSRS r2,r2,r6 + + BIC_rri(d, d, 0xFF); // BIC r7,r7,#0xff + BIC_rri(d, d, 0xFF00); // BIC r7,r7,#0xff00 + ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, RR1 r)) +{ + LSRS_rrr(d, d, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, RR1 r)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) +{ + LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 + LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 + + SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + BIC_rri(d, d, 0xFF); + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) +{ + LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 + + SUBS_rri(REG_WORK2, REG_WORK2, i << 24); // subs r3, r3, #0x12000000 + BIC_rri(d, d, 0xFF); // bic r7, r7, #0xFF + ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3, lsr #24 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) +{ + SUBS_rrr(d, d, s); // subs r7, r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; +#endif + SUBS_rrr(d, d, REG_WORK1); // subs r7, r7, r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(i); + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) +{ + LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 + LSL_rri(REG_WORK2, d, 16); // lsl r3, r7, #16 + + SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + BIC_rri(d, d, 0xff); + BIC_rri(d, d, 0xff00); + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) +{ + // TODO: optimize_imm + +#if defined(USE_DATA_BUFFER) + long offs = data_word_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; +#else + LDRH_rRI(REG_WORK1, RPC_INDEX, 36); // ldrh r2, [pc, #36] ; +#endif + LSL_rri(REG_WORK1, REG_WORK1, 16); // lsl r2, r2, #16 + LSL_rri(REG_WORK2, d, 16); // lsl r3, r6, #16 + + SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + BIC_rri(d, d, 0xff); + BIC_rri(d, d, 0xff00); + ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r6, r3, r6, lsr #16 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + emit_word(i); + skip_word(0); //: + + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + SXTB_rr(REG_WORK1, s); + SXTB_rr(REG_WORK2, d); +#else + LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 + LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 +#endif + + TST_rr(REG_WORK2, REG_WORK1); // tst r3, r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; +#endif + TST_rr(d, REG_WORK1); // tst r7, r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(i); + //: +#endif +} +LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) +{ + TST_rr(d, s); // tst r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) +{ +#ifdef ARMV6_ASSEMBLY + SXTH_rr(REG_WORK1, s); + SXTH_rr(REG_WORK2, d); +#else + LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 + LSL_rri(REG_WORK2, d, 16); // lsl r3, r7, #16 +#endif + + TST_rr(REG_WORK2, REG_WORK1); // tst r3, r2 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) +{ + AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF + EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 + LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] +#else + BIC_rri(REG_WORK1, s, 0xff000000); // bic r2, %[s], #0xff000000 + BIC_rri(REG_WORK1, REG_WORK1, 0x00ff0000); // bic r2, r2, #0x00ff0000 +#endif + EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 + LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) +{ + EORS_rrr(d, d, s); // eors r7, r7, r6 + + MRS_CPSR(REG_WORK1); // mrs r2, CPSR + BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 + MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 +} +LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + SXTH_rr(d, s); // sxth %[d],%[s] +#else + LSL_rri(d, s, 16); // lsl r6, r7, #16 + ASR_rri(d, d, 16); // asr r6, r6, #16 +#endif +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + SXTB_rr(d, s); // SXTB %[d],%[s] +#else + ROR_rri(d, s, 8); // ror r6, r7, #8 + ASR_rri(d, d, 24); // asr r6, r6, #24 +#endif +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(d, s); // UXTB %[d], %[s] +#else + ROR_rri(d, s, 8); // ror r2, r1, #8 + LSR_rri(d, d, 24); // lsr r2, r2, #24 +#endif +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(d, s); // UXTH %[d], %[s] +#else + BIC_rri(d, s, 0xff000000); // bic %[d], %[s], #0xff000000 + BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 +#endif +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) + +static inline void raw_dec_sp(int off) +{ + if (off) { + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + SUB_rrr(RSP_INDEX, RSP_INDEX, REG_WORK1); // sub r7, r7, r2 + B_i(0); // b + //: + emit_long(off); + } +} + +static inline void raw_inc_sp(int off) +{ + if (off) { + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + ADD_rrr(RSP_INDEX, RSP_INDEX, REG_WORK1); // sub r7, r7, r2 + B_i(0); // b + //: + emit_long(off); + } +} + +static inline void raw_push_regs_to_preserve(void) { + PUSH_REGS(PRESERVE_MASK); +} + +static inline void raw_pop_preserved_regs(void) { + POP_REGS(PRESERVE_MASK); +} + +// Verify!!! +/* FLAGX is byte sized, and we *do* write it at that size */ +static inline void raw_load_flagx(uae_u32 t, uae_u32 r) +{ + raw_mov_l_rm(t,(uintptr)live.state[r].mem); +} + +static inline void raw_flags_evicted(int r) +{ + //live.state[FLAGTMP].status=CLEAN; + live.state[FLAGTMP].status=INMEM; + live.state[FLAGTMP].realreg=-1; + /* We just "evicted" FLAGTMP. */ + if (live.nat[r].nholds!=1) { + /* Huh? */ + abort(); + } + live.nat[r].nholds=0; +} + +static inline void raw_flags_init(void) { +} + +static __inline__ void raw_flags_set_zero(int s, int tmp) +{ + raw_mov_l_rr(tmp,s); + MRS_CPSR(s); + BIC_rri(s,s,ARM_Z_FLAG); + AND_rri(tmp,tmp,ARM_Z_FLAG); + EOR_rri(tmp,tmp,ARM_Z_FLAG); + ORR_rrr(s,s,tmp); + MSR_CPSR_r(s); +} + +static inline void raw_flags_to_reg(int r) +{ + MRS_CPSR(r); + raw_mov_l_mr((uintptr)live.state[FLAGTMP].mem,r); + raw_flags_evicted(r); +} + +static inline void raw_reg_to_flags(int r) +{ + MSR_CPSR_r(r); // msr CPSR_fc, %r +} + +/* Apparently, there are enough instructions between flag store and + flag reload to avoid the partial memory stall */ +static inline void raw_load_flagreg(uae_u32 t, uae_u32 r) +{ + raw_mov_l_rm(t,(uintptr)live.state[r].mem); +} + +/* %eax register is clobbered if target processor doesn't support fucomi */ +#define FFLAG_NREG_CLOBBER_CONDITION !have_cmov +#define FFLAG_NREG R0_INDEX +#define FLAG_NREG2 -1 +#define FLAG_NREG1 -1 +#define FLAG_NREG3 -1 + +static inline void raw_fflags_into_flags(int r) +{ + jit_unimplemented("raw_fflags_into_flags %x", r); +} + +static inline void raw_fp_init(void) +{ + int i; + + for (i=0;i=1) { +// emit_byte(0xde); +// emit_byte(0xd9); + live.tos-=2; + } + while (live.tos>=0) { +// emit_byte(0xdd); +// emit_byte(0xd8); + live.tos--; + } + raw_fp_init(); +} + +LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) +{ + jit_unimplemented("raw_fmov_mr_drop %x %x", m, r); +} +LENDFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) + +LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) +{ + jit_unimplemented("raw_fmov_mr %x %x", m, r); +} +LENDFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) + +LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) +{ + jit_unimplemented("raw_fmov_rm %x %x", r, m); +} +LENDFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) + +LOWFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) +{ + jit_unimplemented("raw_fmov_rr %x %x", d, s); +} +LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) + +static inline void raw_emit_nop_filler(int nbytes) +{ + nbytes >>= 2; + while(nbytes--) { NOP(); } +} + +static inline void raw_emit_nop(void) +{ + NOP(); +} + +#ifdef UAE +static +#endif +void compiler_status() { + jit_log("compiled code starts at %p, current at %p (size 0x%x)", compiled_code, current_compile_p, (unsigned int)(current_compile_p - compiled_code)); +} + +// +// ARM doesn't have bsf, but clz is a good alternative instruction for it +// +static bool target_check_bsf(void) +{ + return false; +} + +static void raw_init_cpu(void) +{ + /* Have CMOV support, because ARM support conditions for all instructions */ + have_cmov = true; + + align_loops = 0; + align_jumps = 0; + + raw_flags_init(); +} + +// +// Arm instructions +// +LOWFUNC(WRITE,NONE,2,raw_ADD_l_rr,(RW4 d, RR4 s)) +{ + ADD_rrr(d, d, s); +} +LENDFUNC(WRITE,NONE,2,raw_ADD_l_rr,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_ADD_l_rri,(RW4 d, RR4 s, IMM i)) +{ + ADD_rri(d, s, i); +} +LENDFUNC(WRITE,NONE,2,raw_ADD_l_rri,(RW4 d, RR4 s, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_SUB_l_rri,(RW4 d, RR4 s, IMM i)) +{ + SUB_rri(d, s, i); +} +LENDFUNC(WRITE,NONE,2,raw_SUB_l_rri,(RW4 d, RR4 s, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) +{ + MVN_rrLSLi(REG_WORK1, s, 24); // mvn r2, %[s], lsl #24 + MVN_rrLSRi(REG_WORK1, REG_WORK1, 24); // mvn r2, %[s], lsr #24 + AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 +} +LENDFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_AND_l_rr,(RW4 d, RR4 s)) +{ + AND_rrr(d, d, s); +} +LENDFUNC(WRITE,NONE,2,raw_AND_l_rr,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_AND_l_ri,(RW4 d, IMM i)) +{ + AND_rri(d, d, i); +} +LENDFUNC(WRITE,NONE,2,raw_AND_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) +{ + MVN_rrLSLi(REG_WORK1, s, 16); // mvn r2, %[s], lsl #16 + MVN_rrLSRi(REG_WORK1, REG_WORK1, 16); // mvn r2, %[s], lsr #16 + AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 +} +LENDFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(REG_WORK1, s); // UXTH r2, %[s] +#else + AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF +#endif + EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 +} +LENDFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_EOR_l_rr,(RW4 d, RR4 s)) +{ + EOR_rrr(d, d, s); // eors r7, r7, r6 +} +LENDFUNC(WRITE,NONE,2,raw_EOR_l_rr,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] + EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 +#else + LSL_rri(REG_WORK1, s, 16); // bic r2, %[s], #0xff000000 + EOR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 +#endif +} +LENDFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_LDR_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(d, RPC_INDEX, offs); // ldr r2, [pc, #offs] +#else + LDR_rR(d, RPC_INDEX); + B_i(0); + emit_long(i); +#endif +} +LENDFUNC(WRITE,NONE,2,raw_LDR_l_rr,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_MOV_l_ri8,(RW4 d, IMM i)) +{ + MOV_ri(d, i); +} +LENDFUNC(WRITE,NONE,2,raw_MOV_l_ri8,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(REG_WORK1, s); // UXTH r2, %[s] +#else + AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF +#endif + ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 +} +LENDFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) + +LOWFUNC(WRITE,NONE,2,raw_ORR_l_rr,(RW4 d, RR4 s)) +{ + ORR_rrr(d, d, s); +} +LENDFUNC(WRITE,NONE,2,raw_ORR_l_rr,(RW4 d, RR4 s)) + +LOWFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] + ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 +#else + LSL_rri(REG_WORK1, s, 16); // bic r2, %[s], #0xff000000 + ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 +#endif +} +LENDFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) + +LOWFUNC(WRITE,NONE,2,raw_ROR_l_ri,(RW4 r, IMM i)) +{ + ROR_rri(r, r, i); +} +LENDFUNC(WRITE,NONE,2,raw_ROR_l_ri,(RW4 r, IMM i)) + +// +// compuemu_support used raw calls +// +LOWFUNC(WRITE,RMW,2,compemu_raw_add_l_mi,(IMM d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + data_check_end(8, 24); + long target = data_long(d, 24); + long offs = get_data_offset(target); + + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] + + offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; s + + ADD_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 + + offs = get_data_offset(target); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 20); // ldr r2, [pc, #20] ; + LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] + + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; + + ADD_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 + + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] + + B_i(1); // b + + //: + emit_long(d); + //: + emit_long(s); + //: +#endif +} +LENDFUNC(WRITE,RMW,2,compemu_raw_add_l_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(i); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + AND_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #16] ; + AND_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 + B_i(0); + emit_long(i); +#endif +} +LENDFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) +{ +#if defined(ARMV6_ASSEMBLY) + REV_rr(r,r); // rev %[r],%[r] +#else + EOR_rrrRORi(REG_WORK1, r, r, 16); // eor r2, r6, r6, ror #16 + BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 + ROR_rri(r, r, 8); // ror r6, r6, #8 + EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 +#endif +} +LENDFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) +{ + int imm = (1 << (i & 0x1f)); + + MRS_CPSR(REG_WORK2); // mrs r3, CPSR + TST_ri(r, imm); // tst r6, #0x1000000 + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 + MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 +} +LENDFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) + +LOWFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor, IMM cond)) +{ + int shft; + switch(factor) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + + switch (cond) { + case 9: // LS + jit_unimplemented("cmov LS not implemented"); + abort(); + case 8: // HI + jit_unimplemented("cmov HI not implemented"); + abort(); + default: +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(base); + CC_LDR_rRI(cond, REG_WORK1, RPC_INDEX, offs); // ldrcc r2, [pc, #offs] ; + CC_LDR_rRR_LSLi(cond, d, REG_WORK1, index, shft); // ldrcc %[d], [r2, %[index], lsl #[shift]] +#else + CC_LDR_rRI(cond, REG_WORK1, RPC_INDEX, 4); // ldrcc r2, [pc, #4] ; + CC_LDR_rRR_LSLi(cond, d, REG_WORK1, index, shft); // ldrcc %[d], [r2, %[index], lsl #[shift]] + B_i(0); // b +#endif + break; + } +#if !defined(USE_DATA_BUFFER) + emit_long(base); // : + //: +#endif +} +LENDFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor, IMM cond)) + +LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + data_check_end(8, 16); + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] + + offs = data_long_offs(s); + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s + + CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 + +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #24] ; + LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] + + LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #20] ; + + CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 + + B_i(1); // b + + //: + emit_long(d); + //: + emit_long(s); + //: +#endif +} +LENDFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; +#endif + LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] + + CMP_ri(REG_WORK1, s); // cmp r2, r3 + +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) + +LOWFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(offset); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 + B_i(0); // b + + //: + emit_long(offset); + //: +#endif +} +LENDFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) + +LOWFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) +{ + int shft; + switch(factor) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + + ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 +} +LENDFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + STRB_rR(s, REG_WORK1); // strb r6, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STRB_rR(s, REG_WORK1); // strb r6, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) + +LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) +{ + // TODO: optimize imm + +#if defined(USE_DATA_BUFFER) + data_check_end(8, 12); + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + offs = data_long_offs(s); + LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; + LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] + B_i(1); // b + + emit_long(d); //: + emit_long(s); //: + + //: +#endif +} +LENDFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + STR_rR(s, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STR_rR(s, REG_WORK1); // str r3, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) + +LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(s); + LDR_rRI(d, RPC_INDEX, offs); // ldr %[d], [pc, #offs] ; +#else + LDR_rR(d, RPC_INDEX); // ldr %[d], [pc] ; + B_i(0); // b + + //: + emit_long(s); + //: +#endif +} +LENDFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) + +LOWFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + LDR_rR(d, REG_WORK1); // ldr r7, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + LDR_rR(d, REG_WORK1); // ldr r7, [r2] + B_i(0); // b + + emit_long(s); //: + //: +#endif +} +LENDFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_rr,(W4 d, RR4 s)) +{ + MOV_rr(d, s); // mov %[d], %[s] +} +LENDFUNC(NONE,NONE,2,compemu_raw_mov_l_rr,(W4 d, RR4 s)) + +LOWFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(d); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; + STRH_rR(s, REG_WORK1); // strh r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; + STRH_rR(s, REG_WORK1); // strh r3, [r2] + B_i(0); // b + + //: + emit_long(d); + //: +#endif +} +LENDFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) + +LOWFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) +{ +#if defined(USE_DATA_BUFFER) + data_check_end(8, 24); + long target = data_long(d, 24); + long offs = get_data_offset(target); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] + + offs = data_long_offs(s); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; s + + SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + + offs = get_data_offset(target); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 20); // ldr r2, [pc, #32] ; + LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] + + LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #28] ; + + SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 + + LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #16] ; + STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] + + B_i(1); // b + + //: + emit_long(d); + //: + emit_long(s); + //: +#endif +} +LENDFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,NONE,2,compemu_raw_test_l_rr,(RR4 d, RR4 s)) +{ + TST_rr(d, s); // tst r7, r6 +} +LENDFUNC(WRITE,NONE,2,compemu_raw_test_l_rr,(RR4 d, RR4 s)) + +LOWFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) +{ +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(d, s); // UXTH %[d], %[s] +#else + BIC_rri(d, s, 0xff000000); // bic %[d], %[s], #0xff000000 + BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 +#endif +} +LENDFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) + +static inline void compemu_raw_call(uae_u32 t) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(t); + LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; +#else + LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; +#endif + PUSH(RLR_INDEX); // push {lr} + BLX_r(REG_WORK1); // blx r2 + POP(RLR_INDEX); // pop {lr} +#if !defined(USE_DATA_BUFFER) + B_i(0); // b + + //: + emit_long(t); + //: +#endif +} + +static inline void compemu_raw_call_r(RR4 r) +{ + PUSH(RLR_INDEX); // push {lr} + BLX_r(r); // blx r0 + POP(RLR_INDEX); // pop {lr} +} + +static inline void compemu_raw_jcc_l_oponly(int cc) +{ + switch (cc) { + case 9: // LS + BEQ_i(0); // beq + BCC_i(2); // bcc + + //: + LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; + BX_r(REG_WORK1); // bx r2 + break; + + case 8: // HI + BEQ_i(3); // beq + BCS_i(2); // bcs + + //: + LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; + BX_r(REG_WORK1); // bx r2 + break; + + default: + CC_LDR_rRI(cc, REG_WORK1, RPC_INDEX, 4); // ldrlt r2, [pc, #4] ; + CC_BX_r(cc, REG_WORK1); // bxlt r2 + B_i(0); // b + break; + } + // emit of target will be done by caller +} + +static inline void compemu_raw_jl(uae_u32 t) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(t); + CC_LDR_rRI(NATIVE_CC_LT, RPC_INDEX, RPC_INDEX, offs); // ldrlt pc, [pc, offs] +#else + CC_LDR_rR(NATIVE_CC_LT, RPC_INDEX, RPC_INDEX); // ldrlt pc, [pc] + B_i(0); // b + + //: + emit_long(t); + //: +#endif +} + +static inline void compemu_raw_jmp(uae_u32 t) +{ + LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] + BX_r(REG_WORK1); // bx r2 + emit_long(t); +} + +static inline void compemu_raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) +{ + int shft; + switch(m) { + case 1: shft=0; break; + case 2: shft=1; break; + case 4: shft=2; break; + case 8: shft=3; break; + default: abort(); + } + + LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; + LDR_rRR_LSLi(RPC_INDEX, REG_WORK1, r, shft); // ldr pc, [r2, r6, lsl #3] + emit_long(base); +} + +static inline void compemu_raw_jmp_r(RR4 r) +{ + BX_r(r); +} + +static inline void compemu_raw_jnz(uae_u32 t) +{ +#if defined(USE_DATA_BUFFER) + long offs = data_long_offs(t); + CC_LDR_rRI(NATIVE_CC_NE, RPC_INDEX, RPC_INDEX, offs); // ldrne pc, [pc, offs] +#else + CC_LDR_rR(NATIVE_CC_NE, RPC_INDEX, RPC_INDEX); // ldrne pc, [pc] + B_i(0); // b + + emit_long(t); + //: +#endif +} + +static inline void compemu_raw_jz_b_oponly(void) +{ + BNE_i(2); // bne jp + LDRSB_rRI(REG_WORK1, RPC_INDEX, 3); // ldrsb r2,[pc,#3] + ADD_rrr(RPC_INDEX, RPC_INDEX, REG_WORK1); // add pc,pc,r2 + + skip_n_bytes(3); + + // +} + +static inline void compemu_raw_branch(IMM d) +{ + B_i((d >> 2) - 1); +} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.h b/BasiliskII/src/uae_cpu/compiler/codegen_arm.h new file mode 100644 index 000000000..f92bb1dae --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_arm.h @@ -0,0 +1,1292 @@ +/* + * compiler/codegen_arm.h - IA-32 and AMD64 code generator + * + * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> ARM + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * This file is derived from CCG, copyright 1999-2003 Ian Piumarta + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * 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 ARM_RTASM_H +#define ARM_RTASM_H + +/* NOTES + * + */ + +/* --- Configuration ------------------------------------------------------- */ + +/* CPSR flags */ + +#define ARM_N_FLAG 0x80000000 +#define ARM_Z_FLAG 0x40000000 +#define ARM_C_FLAG 0x20000000 +#define ARM_V_FLAG 0x10000000 +#define ARM_Q_FLAG 0x08000000 +#define ARM_CV_FLAGS (ARM_C_FLAG|ARM_V_FLAG) + +#define ARM_GE3 0x00080000 +#define ARM_GE2 0x00040000 +#define ARM_GE1 0x00020000 +#define ARM_GE0 0x00010000 + +/* --- Macros -------------------------------------------------------------- */ + +/* ========================================================================= */ +/* --- UTILITY ------------------------------------------------------------- */ +/* ========================================================================= */ + +#define _W(c) emit_long(c) +#define _LS2_ADDR(a) (((a) & 0x01f0000f) | (((a) & 0xf0) << 4)) + +/* ========================================================================= */ +/* --- ENCODINGS ----------------------------------------------------------- */ +/* ========================================================================= */ + +#define IMM32(c) ((c & 0xffffff00) == 0 ? c : \ + (c & 0x3fffffc0) == 0 ? (0x100 | ((c >> 30) & 0x3) | ((c << 2) & 0xfc)) : \ + (c & 0x0ffffff0) == 0 ? (0x200 | ((c >> 28) & 0xf) | ((c << 4) & 0xf0)) : \ + (c & 0x03fffffc) == 0 ? (0x300 | ((c >> 26) & 0x3f) | ((c << 6) & 0xc0) ) : \ + (c & 0x00ffffff) == 0 ? (0x400 | ((c >> 24) & 0xff)) : \ + (c & 0xc03fffff) == 0 ? (0x500 | (c >> 22)) : \ + (c & 0xf00fffff) == 0 ? (0x600 | (c >> 20)) : \ + (c & 0xfc03ffff) == 0 ? (0x700 | (c >> 18)) : \ + (c & 0xff00ffff) == 0 ? (0x800 | (c >> 16)) : \ + (c & 0xffc03fff) == 0 ? (0x900 | (c >> 14)) : \ + (c & 0xfff00fff) == 0 ? (0xa00 | (c >> 12)) : \ + (c & 0xfffc03ff) == 0 ? (0xb00 | (c >> 10)) : \ + (c & 0xffff00ff) == 0 ? (0xc00 | (c >> 8)) : \ + (c & 0xffffc03f) == 0 ? (0xd00 | (c >> 6)) : \ + (c & 0xfffff00f) == 0 ? (0xe00 | (c >> 4)) : \ + (c & 0xfffffc03) == 0 ? (0xf00 | (c >> 2)) : \ + 0\ + ) + +#define SHIFT_IMM(c) (0x02000000 | (IMM32((c)))) + +#define UNSHIFTED_IMM8(c) (0x02000000 | (c)) +#define SHIFT_IMM8_ROR(c,r) (0x02000000 | (c) | ((r >> 1) << 8)) + +#define SHIFT_REG(Rm) (Rm) +#define SHIFT_LSL_i(Rm,s) ((Rm) | ((s) << 7)) +#define SHIFT_LSL_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x10) +#define SHIFT_LSR_i(Rm,s) ((Rm) | ((s) << 7) | 0x20) +#define SHIFT_LSR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x30) +#define SHIFT_ASR_i(Rm,s) ((Rm) | ((s) << 7) | 0x40) +#define SHIFT_ASR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x50) +#define SHIFT_ROR_i(Rm,s) ((Rm) | ((s) << 7) | 0x60) +#define SHIFT_ROR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x70) +#define SHIFT_RRX(Rm) ((Rm) | 0x60) +#define SHIFT_PK(Rm,s) ((Rm) | ((s) << 7)) + +// Load/Store addressings +#define ADR_ADD(v) ((1 << 23) | (v)) +#define ADR_SUB(v) (v) + +#define ADR_IMM(v) ((v) | (1 << 24)) +#define ADR_IMMPOST(v) (v) +#define ADR_REG(Rm) ((1 << 25) | (1 << 24) | (Rm)) +#define ADR_REGPOST(Rm) ((1 << 25) | (Rm)) + +#define ADD_IMM(i) ADR_ADD(ADR_IMM(i)) +#define SUB_IMM(i) ADR_SUB(ADR_IMM(i)) + +#define ADD_REG(Rm) ADR_ADD(ADR_REG(Rm)) +#define SUB_REG(Rm) ADR_SUB(ADR_REG(Rm)) + +#define ADD_LSL(Rm,i) ADR_ADD(ADR_REG(Rm) | ((i) << 7)) +#define SUB_LSL(Rm,i) ADR_SUB(ADR_REG(Rm) | ((i) << 7)) + +#define ADD_LSR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (1 << 5)) +#define SUB_LSR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (1 << 5)) + +#define ADD_ASR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (2 << 5)) +#define SUB_ASR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (2 << 5)) + +#define ADD_ROR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (3 << 5)) +#define SUB_ROR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (3 << 5)) + +#define ADD_RRX(Rm) ADR_ADD(ADR_REG(Rm) | (3 << 5)) +#define SUB_RRX(Rm) ADR_SUB(ADR_REG(Rm) | (3 << 5)) + +#define ADD2_IMM(i) ADR_ADD(i | (1 << 22)) +#define SUB2_IMM(i) ADR_SUB(i | (1 << 22)) + +#define ADD2_REG(Rm) ADR_ADD(Rm) +#define SUB2_REG(Rm) ADR_SUB(Rm) + +// MOV, MVN +#define _OP1(cc,op,s,Rd,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rd) << 12) | (shift)) + +// CMP, CMN, TST, TEQ +#define _OP2(cc,op,Rn,shift) _W(((cc) << 28) | ((op) << 21) | (1 << 20) | ((Rn) << 16) | (shift)) + +// ADD, SUB, RSB, ADC, SBC, RSC, AND, BIC, EOR, ORR +#define _OP3(cc,op,s,Rd,Rn,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rn) << 16) | ((Rd) << 12) | (shift)) + +// LDR, STR +#define _LS1(cc,l,b,Rd,Rn,a) _W(((cc) << 28) | (0x01 << 26) | ((l) << 20) | ((b) << 22) | ((Rn) << 16) | ((Rd) << 12) | (a)) +#define _LS2(cc,p,l,s,h,Rd,Rn,a) _W(((cc) << 28) | ((p) << 24) | ((l) << 20) | ((Rn) << 16) | ((Rd) << 12) | ((s) << 6) | ((h) << 5) | 0x90 | _LS2_ADDR((a))) + +/* ========================================================================= */ +/* --- OPCODES ------------------------------------------------------------- */ +/* ========================================================================= */ + +/* Branch instructions */ +#ifndef __ANDROID__ +enum { + _B, _BL, _BLX, _BX, _BXJ +}; +#endif + +/* Data processing instructions */ +enum { + _AND = 0, + _EOR, + _SUB, + _RSB, + _ADD, + _ADC, + _SBC, + _RSC, + _TST, + _TEQ, + _CMP, + _CMN, + _ORR, + _MOV, + _BIC, + _MVN +}; + +/* Single instruction Multiple Data (SIMD) instructions */ + +/* Multiply instructions */ + +/* Parallel instructions */ + +/* Extend instructions */ + +/* Miscellaneous arithmetic instrations */ + +/* Status register transfer instructions */ + +/* Load and Store instructions */ + +/* Coprocessor instructions */ + +/* Exception generation instructions */ + +/* ========================================================================= */ +/* --- ASSEMBLER ----------------------------------------------------------- */ +/* ========================================================================= */ + +#define NOP() _W(0xe1a00000) +#define SETEND_BE() _W(0xf1010200) +#define SETEND_LE() _W(0xf1010000) + +/* Data processing instructions */ + +/* Opcodes Type 1 */ +// MOVcc rd,#i +#define CC_MOV_ri8(cc,Rd,i) _OP1(cc,_MOV,0,Rd,UNSHIFTED_IMM8(i)) +// MOVcc Rd,#i ROR #s +#define CC_MOV_ri8RORi(cc,Rd,i,s) _OP1(cc,_MOV,0,Rd,SHIFT_IMM8_ROR(i,s)) +#define CC_MOV_ri(cc,Rd,i) _OP1(cc,_MOV,0,Rd,SHIFT_IMM(i)) +#define CC_MOV_rr(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_REG(Rm)) +#define CC_MOV_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_LSL_i(Rm,i)) +#define CC_MOV_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_LSL_r(Rm,Rs)) +#define CC_MOV_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_LSR_i(Rm,i)) +#define CC_MOV_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_LSR_r(Rm,Rs)) +#define CC_MOV_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_ASR_i(Rm,i)) +#define CC_MOV_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_ASR_r(Rm,Rs)) +#define CC_MOV_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_ROR_i(Rm,i)) +#define CC_MOV_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_ROR_r(Rm,Rs)) +#define CC_MOV_rrRRX(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_RRX(Rm)) + +// MOV rd,#i +#define MOV_ri8(Rd,i) CC_MOV_ri8(NATIVE_CC_AL,Rd,i) +// MOV Rd,#i ROR #s +#define MOV_ri8RORi(Rd,i,s) CC_MOV_ri8RORi(NATIVE_CC_AL,Rd,i,s) +#define MOV_ri(Rd,i) CC_MOV_ri(NATIVE_CC_AL,Rd,i) +#define MOV_rr(Rd,Rm) CC_MOV_rr(NATIVE_CC_AL,Rd,Rm) +#define MOV_rrLSLi(Rd,Rm,i) CC_MOV_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) +#define MOV_rrLSLr(Rd,Rm,Rs) CC_MOV_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOV_rrLSRi(Rd,Rm,i) CC_MOV_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) +#define MOV_rrLSRr(Rd,Rm,Rs) CC_MOV_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOV_rrASRi(Rd,Rm,i) CC_MOV_rrASRi(NATIVE_CC_AL,Rd,Rm,i) +#define MOV_rrASRr(Rd,Rm,Rs) CC_MOV_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOV_rrRORi(Rd,Rm,i) CC_MOV_rrRORi(NATIVE_CC_AL,Rd,Rm,i) +#define MOV_rrRORr(Rd,Rm,Rs) CC_MOV_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOV_rrRRX(Rd,Rm) CC_MOV_rrRRX(NATIVE_CC_AL,Rd,Rm) + +#define CC_MOVS_ri(cc,Rd,i) _OP1(cc,_MOV,1,Rd,SHIFT_IMM(i)) +#define CC_MOVS_rr(cc,Rd,Rm) _OP1(cc,_MOV,1,Rd,SHIFT_REG(Rm)) +#define CC_MOVS_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_LSL_i(Rm,i)) +#define CC_MOVS_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_LSL_r(Rm,Rs)) +#define CC_MOVS_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_LSR_i(Rm,i)) +#define CC_MOVS_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_LSR_r(Rm,Rs)) +#define CC_MOVS_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_ASR_i(Rm,i)) +#define CC_MOVS_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_ASR_r(Rm,Rs)) +#define CC_MOVS_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_ROR_i(Rm,i)) +#define CC_MOVS_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_ROR_r(Rm,Rs)) +#define CC_MOVS_rrRRX(cc,Rd,Rm) _OP1(cc,_MOV,1,Rd,SHIFT_RRX(Rm)) + +#define MOVS_ri(Rd,i) CC_MOVS_ri(NATIVE_CC_AL,Rd,i) +#define MOVS_rr(Rd,Rm) CC_MOVS_rr(NATIVE_CC_AL,Rd,Rm) +#define MOVS_rrLSLi(Rd,Rm,i) CC_MOVS_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) +#define MOVS_rrLSLr(Rd,Rm,Rs) CC_MOVS_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOVS_rrLSRi(Rd,Rm,i) CC_MOVS_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) +#define MOVS_rrLSRr(Rd,Rm,Rs) CC_MOVS_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOVS_rrASRi(Rd,Rm,i) CC_MOVS_rrASRi(NATIVE_CC_AL,Rd,Rm,i) +#define MOVS_rrASRr(Rd,Rm,Rs) CC_MOVS_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOVS_rrRORi(Rd,Rm,i) CC_MOVS_rrRORi(NATIVE_CC_AL,Rd,Rm,i) +#define MOVS_rrRORr(Rd,Rm,Rs) CC_MOVS_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MOVS_rrRRX(Rd,Rm) CC_MOVS_rrRRX(NATIVE_CC_AL,Rd,Rm) + +// MVNcc rd,#i +#define CC_MVN_ri8(cc,Rd,i) _OP1(cc,_MVN,0,Rd,UNSHIFTED_IMM8(i)) +// MVNcc Rd,#i ROR #s +#define CC_MVN_ri8RORi(cc,Rd,i,s) _OP1(cc,_MVN,0,Rd,SHIFT_IMM8_ROR(i,s)) +#define CC_MVN_ri(cc,Rd,i) _OP1(cc,_MVN,0,Rd,SHIFT_IMM(i)) +#define CC_MVN_rr(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_REG(Rm)) +#define CC_MVN_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_LSL_i(Rm,i)) +#define CC_MVN_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_LSL_r(Rm,Rs)) +#define CC_MVN_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_LSR_i(Rm,i)) +#define CC_MVN_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_LSR_r(Rm,Rs)) +#define CC_MVN_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_ASR_i(Rm,i)) +#define CC_MVN_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_ASR_r(Rm,Rs)) +#define CC_MVN_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_ROR_i(Rm,i)) +#define CC_MVN_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_ROR_r(Rm,Rs)) +#define CC_MVN_rrRRX(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_RRX(Rm)) + +// MVN rd,#i +#define MVN_ri8(Rd,i) CC_MVN_ri8(NATIVE_CC_AL,Rd,i) +// MVN Rd,#i ROR #s +#define MVN_ri8RORi(Rd,i,s) CC_MVN_ri8RORi(NATIVE_CC_AL,Rd,i,s) +#define MVN_ri(Rd,i) CC_MVN_ri(NATIVE_CC_AL,Rd,i) +#define MVN_rr(Rd,Rm) CC_MVN_rr(NATIVE_CC_AL,Rd,Rm) +#define MVN_rrLSLi(Rd,Rm,i) CC_MVN_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) +#define MVN_rrLSLr(Rd,Rm,Rs) CC_MVN_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVN_rrLSRi(Rd,Rm,i) CC_MVN_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) +#define MVN_rrLSRr(Rd,Rm,Rs) CC_MVN_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVN_rrASRi(Rd,Rm,i) CC_MVN_rrASRi(NATIVE_CC_AL,Rd,Rm,i) +#define MVN_rrASRr(Rd,Rm,Rs) CC_MVN_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVN_rrRORi(Rd,Rm,i) CC_MVN_rrRORi(NATIVE_CC_AL,Rd,Rm,i) +#define MVN_rrRORr(Rd,Rm,Rs) CC_MVN_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVN_rrRRX(Rd,Rm) CC_MVN_rrRRX(NATIVE_CC_AL,Rd,Rm) + +#define CC_MVNS_ri(cc,Rd,i) _OP1(cc,_MVN,1,Rd,SHIFT_IMM(i)) +#define CC_MVNS_rr(cc,Rd,Rm) _OP1(cc,_MVN,1,Rd,SHIFT_REG(Rm)) +#define CC_MVNS_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_LSL_i(Rm,i)) +#define CC_MVNS_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_LSL_r(Rm,Rs)) +#define CC_MVNS_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_LSR_i(Rm,i)) +#define CC_MVNS_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_LSR_r(Rm,Rs)) +#define CC_MVNS_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_ASR_i(Rm,i)) +#define CC_MVNS_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_ASR_r(Rm,Rs)) +#define CC_MVNS_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_ROR_i(Rm,i)) +#define CC_MVNS_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_ROR_r(Rm,Rs)) +#define CC_MVNS_rrRRX(cc,Rd,Rm) _OP1(cc,_MVN,1,Rd,SHIFT_RRX(Rm)) + +#define MVNS_ri(Rd,i) CC_MVNS_ri(NATIVE_CC_AL,Rd,i) +#define MVNS_rr(Rd,Rm) CC_MVNS_rr(NATIVE_CC_AL,Rd,Rm) +#define MVNS_rrLSLi(Rd,Rm,i) CC_MVNS_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) +#define MVNS_rrLSLr(Rd,Rm,Rs) CC_MVNS_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVNS_rrLSRi(Rd,Rm,i) CC_MVNS_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) +#define MVNS_rrLSRr(Rd,Rm,Rs) CC_MVNS_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVNS_rrASRi(Rd,Rm,i) CC_MVNS_rrASRi(NATIVE_CC_AL,Rd,Rm,i) +#define MVNS_rrASRr(Rd,Rm,Rs) CC_MVNS_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVNS_rrRORi(Rd,Rm,i) CC_MVNS_rrRORi(NATIVE_CC_AL,Rd,Rm,i) +#define MVNS_rrRORr(Rd,Rm,Rs) CC_MVNS_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) +#define MVNS_rrRRX(Rd,Rm) CC_MVNS_rrRRX(NATIVE_CC_AL,Rd,Rm) + +/* Opcodes Type 2 */ +#define CC_CMP_ri(cc,Rn,i) _OP2(cc,_CMP,Rn,SHIFT_IMM(i)) +#define CC_CMP_rr(cc,Rn,Rm) _OP2(cc,_CMP,Rn,SHIFT_REG(Rm)) +#define CC_CMP_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_CMP_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_CMP_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_CMP_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_CMP_rrASRi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_CMP_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_CMP_rrRORi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_CMP_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_CMP_rrRRX(cc,Rn,Rm) _OP2(cc,_CMP,Rn,SHIFT_RRX(Rm)) + +#define CMP_ri(Rn,i) CC_CMP_ri(NATIVE_CC_AL,Rn,i) +#define CMP_rr(Rn,Rm) CC_CMP_rr(NATIVE_CC_AL,Rn,Rm) +#define CMP_rrLSLi(Rn,Rm,i) CC_CMP_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) +#define CMP_rrLSLr(Rn,Rm,Rs) CC_CMP_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMP_rrLSRi(Rn,Rm,i) CC_CMP_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) +#define CMP_rrLSRr(Rn,Rm,Rs) CC_CMP_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMP_rrASRi(Rn,Rm,i) CC_CMP_rrASRi(NATIVE_CC_AL,Rn,Rm,i) +#define CMP_rrASRr(Rn,Rm,Rs) CC_CMP_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMP_rrRORi(Rn,Rm,i) CC_CMP_rrRORi(NATIVE_CC_AL,Rn,Rm,i) +#define CMP_rrRORr(Rn,Rm,Rs) CC_CMP_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMP_rrRRX(Rn,Rm) CC_CMP_rrRRX(NATIVE_CC_AL,Rn,Rm) + +#define CC_CMN_ri(cc,Rn,i) _OP2(cc,_CMN,Rn,SHIFT_IMM(i)) +#define CC_CMN_rr(cc,Rn,r) _OP2(cc,_CMN,Rn,SHIFT_REG(r)) +#define CC_CMN_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_CMN_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_CMN_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_CMN_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_CMN_rrASRi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_CMN_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_CMN_rrRORi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_CMN_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_CMN_rrRRX(cc,Rn,Rm) _OP2(cc,_CMN,Rn,SHIFT_RRX(Rm)) + +#define CMN_ri(Rn,i) CC_CMN_ri(NATIVE_CC_AL,Rn,i) +#define CMN_rr(Rn,r) CC_CMN_rr(NATIVE_CC_AL,Rn,r) +#define CMN_rrLSLi(Rn,Rm,i) CC_CMN_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) +#define CMN_rrLSLr(Rn,Rm,Rs) CC_CMN_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMN_rrLSRi(Rn,Rm,i) CC_CMN_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) +#define CMN_rrLSRr(Rn,Rm,Rs) CC_CMN_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMN_rrASRi(Rn,Rm,i) CC_CMN_rrASRi(NATIVE_CC_AL,Rn,Rm,i) +#define CMN_rrASRr(Rn,Rm,Rs) CC_CMN_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMN_rrRORi(Rn,Rm,i) CC_CMN_rrRORi(NATIVE_CC_AL,Rn,Rm,i) +#define CMN_rrRORr(Rn,Rm,Rs) CC_CMN_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) +#define CMN_rrRRX(Rn,Rm) CC_CMN_rrRRX(NATIVE_CC_AL,Rn,Rm) + +#define CC_TST_ri(cc,Rn,i) _OP2(cc,_TST,Rn,SHIFT_IMM(i)) +#define CC_TST_rr(cc,Rn,r) _OP2(cc,_TST,Rn,SHIFT_REG(r)) +#define CC_TST_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_TST_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_TST_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_TST_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_TST_rrASRi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_TST_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_TST_rrRORi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_TST_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_TST_rrRRX(cc,Rn,Rm) _OP2(cc,_TST,Rn,SHIFT_RRX(Rm)) + +#define TST_ri(Rn,i) CC_TST_ri(NATIVE_CC_AL,Rn,i) +#define TST_rr(Rn,r) CC_TST_rr(NATIVE_CC_AL,Rn,r) +#define TST_rrLSLi(Rn,Rm,i) CC_TST_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) +#define TST_rrLSLr(Rn,Rm,Rs) CC_TST_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TST_rrLSRi(Rn,Rm,i) CC_TST_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) +#define TST_rrLSRr(Rn,Rm,Rs) CC_TST_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TST_rrASRi(Rn,Rm,i) CC_TST_rrASRi(NATIVE_CC_AL,Rn,Rm,i) +#define TST_rrASRr(Rn,Rm,Rs) CC_TST_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TST_rrRORi(Rn,Rm,i) CC_TST_rrRORi(NATIVE_CC_AL,Rn,Rm,i) +#define TST_rrRORr(Rn,Rm,Rs) CC_TST_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TST_rrRRX(Rn,Rm) CC_TST_rrRRX(NATIVE_CC_AL,Rn,Rm) + +#define CC_TEQ_ri(cc,Rn,i) _OP2(cc,_TEQ,Rn,SHIFT_IMM(i)) +#define CC_TEQ_rr(cc,Rn,r) _OP2(cc,_TEQ,Rn,SHIFT_REG(r)) +#define CC_TEQ_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_TEQ_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_TEQ_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_TEQ_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_TEQ_rrASRi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_TEQ_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_TEQ_rrRORi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_TEQ_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_TEQ_rrRRX(cc,Rn,Rm) _OP2(cc,_TEQ,Rn,SHIFT_RRX(Rm)) + +#define TEQ_ri(Rn,i) CC_TEQ_ri(NATIVE_CC_AL,Rn,i) +#define TEQ_rr(Rn,r) CC_TEQ_rr(NATIVE_CC_AL,Rn,r) +#define TEQ_rrLSLi(Rn,Rm,i) CC_TEQ_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) +#define TEQ_rrLSLr(Rn,Rm,Rs) CC_TEQ_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TEQ_rrLSRi(Rn,Rm,i) CC_TEQ_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) +#define TEQ_rrLSRr(Rn,Rm,Rs) CC_TEQ_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TEQ_rrASRi(Rn,Rm,i) CC_TEQ_rrASRi(NATIVE_CC_AL,Rn,Rm,i) +#define TEQ_rrASRr(Rn,Rm,Rs) CC_TEQ_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TEQ_rrRORi(Rn,Rm,i) CC_TEQ_rrRORi(NATIVE_CC_AL,Rn,Rm,i) +#define TEQ_rrRORr(Rn,Rm,Rs) CC_TEQ_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) +#define TEQ_rrRRX(Rn,Rm) CC_TEQ_rrRRX(NATIVE_CC_AL,Rn,Rm) + +/* Opcodes Type 3 */ +#define CC_AND_rri(cc,Rd,Rn,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_AND_rrr(cc,Rd,Rn,Rm) _OP3(cc,_AND,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_AND_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_AND_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_AND_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_AND_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_AND_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_AND_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_AND_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_AND_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_AND_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_AND,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define AND_rri(Rd,Rn,i) CC_AND_rri(NATIVE_CC_AL,Rd,Rn,i) +#define AND_rrr(Rd,Rn,Rm) CC_AND_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define AND_rrrLSLi(Rd,Rn,Rm,i) CC_AND_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define AND_rrrLSLr(Rd,Rn,Rm,Rs) CC_AND_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define AND_rrrLSRi(Rd,Rn,Rm,i) CC_AND_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define AND_rrrLSRr(Rd,Rn,Rm,Rs) CC_AND_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define AND_rrrASRi(Rd,Rn,Rm,i) CC_AND_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define AND_rrrASRr(Rd,Rn,Rm,Rs) CC_AND_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define AND_rrrRORi(Rd,Rn,Rm,i) CC_AND_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define AND_rrrRORr(Rd,Rn,Rm,Rs) CC_AND_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define AND_rrrRRX(Rd,Rn,Rm) CC_AND_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ANDS_rri(cc,Rd,Rn,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_ANDS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_AND,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ANDS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ANDS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ANDS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ANDS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ANDS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ANDS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ANDS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ANDS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ANDS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_AND,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define ANDS_rri(Rd,Rn,i) CC_ANDS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ANDS_rrr(Rd,Rn,Rm) CC_ANDS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ANDS_rrrLSLi(Rd,Rn,Rm,i) CC_ANDS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ANDS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ANDS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ANDS_rrrLSRi(Rd,Rn,Rm,i) CC_ANDS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ANDS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ANDS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ANDS_rrrASRi(Rd,Rn,Rm,i) CC_ANDS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ANDS_rrrASRr(Rd,Rn,Rm,Rs) CC_ANDS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ANDS_rrrRORi(Rd,Rn,Rm,i) CC_ANDS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ANDS_rrrRORr(Rd,Rn,Rm,Rs) CC_ANDS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ANDS_rrrRRX(Rd,Rn,Rm) CC_ANDS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_EOR_rri(cc,Rd,Rn,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_EOR_rrr(cc,Rd,Rn,Rm) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_EOR_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_EOR_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_EOR_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_EOR_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_EOR_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_EOR_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_EOR_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_EOR_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_EOR_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define EOR_rri(Rd,Rn,i) CC_EOR_rri(NATIVE_CC_AL,Rd,Rn,i) +#define EOR_rrr(Rd,Rn,Rm) CC_EOR_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define EOR_rrrLSLi(Rd,Rn,Rm,i) CC_EOR_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EOR_rrrLSLr(Rd,Rn,Rm,Rs) CC_EOR_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EOR_rrrLSRi(Rd,Rn,Rm,i) CC_EOR_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EOR_rrrLSRr(Rd,Rn,Rm,Rs) CC_EOR_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EOR_rrrASRi(Rd,Rn,Rm,i) CC_EOR_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EOR_rrrASRr(Rd,Rn,Rm,Rs) CC_EOR_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EOR_rrrRORi(Rd,Rn,Rm,i) CC_EOR_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EOR_rrrRORr(Rd,Rn,Rm,Rs) CC_EOR_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EOR_rrrRRX(Rd,Rn,Rm) CC_EOR_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_EORS_rri(cc,Rd,Rn,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_EORS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_EORS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_EORS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_EORS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_EORS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_EORS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_EORS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_EORS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_EORS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_EORS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define EORS_rri(Rd,Rn,i) CC_EORS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define EORS_rrr(Rd,Rn,Rm) CC_EORS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define EORS_rrrLSLi(Rd,Rn,Rm,i) CC_EORS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EORS_rrrLSLr(Rd,Rn,Rm,Rs) CC_EORS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EORS_rrrLSRi(Rd,Rn,Rm,i) CC_EORS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EORS_rrrLSRr(Rd,Rn,Rm,Rs) CC_EORS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EORS_rrrASRi(Rd,Rn,Rm,i) CC_EORS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EORS_rrrASRr(Rd,Rn,Rm,Rs) CC_EORS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EORS_rrrRORi(Rd,Rn,Rm,i) CC_EORS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define EORS_rrrRORr(Rd,Rn,Rm,Rs) CC_EORS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define EORS_rrrRRX(Rd,Rn,Rm) CC_EORS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_SUB_rri(cc,Rd,Rn,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_SUB_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_SUB_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_SUB_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_SUB_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_SUB_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_SUB_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_SUB_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_SUB_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_SUB_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_SUB_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define SUB_rri(Rd,Rn,i) CC_SUB_rri(NATIVE_CC_AL,Rd,Rn,i) +#define SUB_rrr(Rd,Rn,Rm) CC_SUB_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define SUB_rrrLSLi(Rd,Rn,Rm,i) CC_SUB_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUB_rrrLSLr(Rd,Rn,Rm,Rs) CC_SUB_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUB_rrrLSRi(Rd,Rn,Rm,i) CC_SUB_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUB_rrrLSRr(Rd,Rn,Rm,Rs) CC_SUB_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUB_rrrASRi(Rd,Rn,Rm,i) CC_SUB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUB_rrrASRr(Rd,Rn,Rm,Rs) CC_SUB_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUB_rrrRORi(Rd,Rn,Rm,i) CC_SUB_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUB_rrrRORr(Rd,Rn,Rm,Rs) CC_SUB_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUB_rrrRRX(Rd,Rn,Rm) CC_SUB_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_SUBS_rri(cc,Rd,Rn,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_SUBS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_SUBS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_SUBS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_SUBS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_SUBS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_SUBS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_SUBS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_SUBS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_SUBS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_SUBS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define SUBS_rri(Rd,Rn,i) CC_SUBS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define SUBS_rrr(Rd,Rn,Rm) CC_SUBS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define SUBS_rrrLSLi(Rd,Rn,Rm,i) CC_SUBS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUBS_rrrLSLr(Rd,Rn,Rm,Rs) CC_SUBS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUBS_rrrLSRi(Rd,Rn,Rm,i) CC_SUBS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUBS_rrrLSRr(Rd,Rn,Rm,Rs) CC_SUBS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUBS_rrrASRi(Rd,Rn,Rm,i) CC_SUBS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUBS_rrrASRr(Rd,Rn,Rm,Rs) CC_SUBS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUBS_rrrRORi(Rd,Rn,Rm,i) CC_SUBS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SUBS_rrrRORr(Rd,Rn,Rm,Rs) CC_SUBS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SUBS_rrrRRX(Rd,Rn,Rm) CC_SUBS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_RSB_rri(cc,Rd,Rn,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_RSB_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_RSB_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_RSB_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_RSB_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_RSB_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_RSB_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_RSB_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_RSB_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_RSB_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_RSB_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define RSB_rri(Rd,Rn,i) CC_RSB_rri(NATIVE_CC_AL,Rd,Rn,i) +#define RSB_rrr(Rd,Rn,Rm) CC_RSB_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define RSB_rrrLSLi(Rd,Rn,Rm,i) CC_RSB_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSB_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSB_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSB_rrrLSRi(Rd,Rn,Rm,i) CC_RSB_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSB_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSB_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSB_rrrASRi(Rd,Rn,Rm,i) CC_RSB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSB_rrrASRr(Rd,Rn,Rm,Rs) CC_RSB_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSB_rrrRORi(Rd,Rn,Rm,i) CC_RSB_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSB_rrrRORr(Rd,Rn,Rm,Rs) CC_RSB_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSB_rrrRRX(Rd,Rn,Rm) CC_RSB_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_RSBS_rri(cc,Rd,Rn,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_RSBS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_RSBS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_RSBS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_RSBS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_RSBS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_RSBS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_RSBS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_RSBS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_RSBS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_RSBS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define RSBS_rri(Rd,Rn,i) CC_RSBS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define RSBS_rrr(Rd,Rn,Rm) CC_RSBS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define RSBS_rrrLSLi(Rd,Rn,Rm,i) CC_RSBS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSBS_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSBS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSBS_rrrLSRi(Rd,Rn,Rm,i) CC_RSBS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSBS_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSBS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSBS_rrrASRi(Rd,Rn,Rm,i) CC_RSBS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSBS_rrrASRr(Rd,Rn,Rm,Rs) CC_RSBS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSBS_rrrRORi(Rd,Rn,Rm,i) CC_RSBS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSBS_rrrRORr(Rd,Rn,Rm,Rs) CC_RSBS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSBS_rrrRRX(Rd,Rn,Rm) CC_RSBS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ADD_rri8(cc,Rd,Rn,i) _OP3(cc,_ADD,0,Rd,Rn,UNSHIFT_IMM8(i)) +#define CC_ADD_rri8RORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_IMM8_ROR(Rm,i)) + +#define CC_ADD_rri(cc,Rd,Rn,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_ADD_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ADD_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ADD_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ADD_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ADD_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ADD_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ADD_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ADD_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ADD_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ADD_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define ADD_rri8(cc,Rd,Rn,i) CC_ADD_rri8(NATIVE_CC_AL,Rd,Rn,i) +#define ADD_rri8RORi(cc,Rd,Rn,Rm,i) CC_ADD_rri8RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) + +#define ADD_rri(Rd,Rn,i) CC_ADD_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ADD_rrr(Rd,Rn,Rm) CC_ADD_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ADD_rrrLSLi(Rd,Rn,Rm,i) CC_ADD_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADD_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADD_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADD_rrrLSRi(Rd,Rn,Rm,i) CC_ADD_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADD_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADD_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADD_rrrASRi(Rd,Rn,Rm,i) CC_ADD_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADD_rrrASRr(Rd,Rn,Rm,Rs) CC_ADD_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADD_rrrRORi(Rd,Rn,Rm,i) CC_ADD_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADD_rrrRORr(Rd,Rn,Rm,Rs) CC_ADD_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADD_rrrRRX(Rd,Rn,Rm) CC_ADD_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ADDS_rri(cc,Rd,Rn,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_ADDS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ADDS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ADDS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ADDS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ADDS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ADDS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ADDS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ADDS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ADDS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ADDS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define ADDS_rri(Rd,Rn,i) CC_ADDS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ADDS_rrr(Rd,Rn,Rm) CC_ADDS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ADDS_rrrLSLi(Rd,Rn,Rm,i) CC_ADDS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADDS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADDS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADDS_rrrLSRi(Rd,Rn,Rm,i) CC_ADDS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADDS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADDS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADDS_rrrASRi(Rd,Rn,Rm,i) CC_ADDS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADDS_rrrASRr(Rd,Rn,Rm,Rs) CC_ADDS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADDS_rrrRORi(Rd,Rn,Rm,i) CC_ADDS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADDS_rrrRORr(Rd,Rn,Rm,Rs) CC_ADDS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADDS_rrrRRX(Rd,Rn,Rm) CC_ADDS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ADC_rri(cc,Rd,Rn,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_ADC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ADC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ADC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ADC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ADC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ADC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ADC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ADC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ADC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ADC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define ADC_rri(Rd,Rn,i) CC_ADC_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ADC_rrr(Rd,Rn,Rm) CC_ADC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ADC_rrrLSLi(Rd,Rn,Rm,i) CC_ADC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADC_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADC_rrrLSRi(Rd,Rn,Rm,i) CC_ADC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADC_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADC_rrrASRi(Rd,Rn,Rm,i) CC_ADC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADC_rrrASRr(Rd,Rn,Rm,Rs) CC_ADC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADC_rrrRORi(Rd,Rn,Rm,i) CC_ADC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADC_rrrRORr(Rd,Rn,Rm,Rs) CC_ADC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADC_rrrRRX(Rd,Rn,Rm) CC_ADC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ADCS_rri(cc,Rd,Rn,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_ADCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ADCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ADCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ADCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ADCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ADCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ADCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ADCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ADCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ADCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define ADCS_rri(Rd,Rn,i) CC_ADCS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ADCS_rrr(Rd,Rn,Rm) CC_ADCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ADCS_rrrLSLi(Rd,Rn,Rm,i) CC_ADCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADCS_rrrLSRi(Rd,Rn,Rm,i) CC_ADCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADCS_rrrASRi(Rd,Rn,Rm,i) CC_ADCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADCS_rrrASRr(Rd,Rn,Rm,Rs) CC_ADCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADCS_rrrRORi(Rd,Rn,Rm,i) CC_ADCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ADCS_rrrRORr(Rd,Rn,Rm,Rs) CC_ADCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ADCS_rrrRRX(Rd,Rn,Rm) CC_ADCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_SBC_rri(cc,Rd,Rn,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_SBC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_SBC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_SBC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_SBC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_SBC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_SBC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_SBC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_SBC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_SBC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_SBC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define SBC_rri(Rd,Rn,i) CC_SBC_rri(NATIVE_CC_AL,Rd,Rn,i) +#define SBC_rrr(Rd,Rn,Rm) CC_SBC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define SBC_rrrLSLi(Rd,Rn,Rm,i) CC_SBC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBC_rrrLSLr(Rd,Rn,Rm,Rs) CC_SBC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBC_rrrLSRi(Rd,Rn,Rm,i) CC_SBC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBC_rrrLSRr(Rd,Rn,Rm,Rs) CC_SBC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBC_rrrASRi(Rd,Rn,Rm,i) CC_SBC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBC_rrrASRr(Rd,Rn,Rm,Rs) CC_SBC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBC_rrrRORi(Rd,Rn,Rm,i) CC_SBC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBC_rrrRORr(Rd,Rn,Rm,Rs) CC_SBC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBC_rrrRRX(Rd,Rn,Rm) CC_SBC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_SBCS_rri(cc,Rd,Rn,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_SBCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_SBCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_SBCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_SBCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_SBCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_SBCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_SBCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_SBCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_SBCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_SBCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define SBCS_rri(Rd,Rn,i) CC_SBCS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define SBCS_rrr(Rd,Rn,Rm) CC_SBCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define SBCS_rrrLSLi(Rd,Rn,Rm,i) CC_SBCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_SBCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBCS_rrrLSRi(Rd,Rn,Rm,i) CC_SBCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_SBCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBCS_rrrASRi(Rd,Rn,Rm,i) CC_SBCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBCS_rrrASRr(Rd,Rn,Rm,Rs) CC_SBCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBCS_rrrRORi(Rd,Rn,Rm,i) CC_SBCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define SBCS_rrrRORr(Rd,Rn,Rm,Rs) CC_SBCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define SBCS_rrrRRX(Rd,Rn,Rm) CC_SBCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_RSC_rri(cc,Rd,Rn,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_RSC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_RSC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_RSC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_RSC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_RSC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_RSC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_RSC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_RSC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_RSC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_RSC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define RSC_rri(Rd,Rn,i) CC_RSC_rri(NATIVE_CC_AL,Rd,Rn,i) +#define RSC_rrr(Rd,Rn,Rm) CC_RSC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define RSC_rrrLSLi(Rd,Rn,Rm,i) CC_RSC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSC_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSC_rrrLSRi(Rd,Rn,Rm,i) CC_RSC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSC_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSC_rrrASRi(Rd,Rn,Rm,i) CC_RSC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSC_rrrASRr(Rd,Rn,Rm,Rs) CC_RSC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSC_rrrRORi(Rd,Rn,Rm,i) CC_RSC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSC_rrrRORr(Rd,Rn,Rm,Rs) CC_RSC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSC_rrrRRX(Rd,Rn,Rm) CC_RSC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_RSCS_rri(cc,Rd,Rn,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_RSCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_RSCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_RSCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_RSCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_RSCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_RSCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_RSCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_RSCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_RSCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_RSCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define RSCS_rri(Rd,Rn,i) CC_RSCS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define RSCS_rrr(Rd,Rn,Rm) CC_RSCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define RSCS_rrrLSLi(Rd,Rn,Rm,i) CC_RSCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSCS_rrrLSRi(Rd,Rn,Rm,i) CC_RSCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSCS_rrrASRi(Rd,Rn,Rm,i) CC_RSCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSCS_rrrASRr(Rd,Rn,Rm,Rs) CC_RSCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSCS_rrrRORi(Rd,Rn,Rm,i) CC_RSCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define RSCS_rrrRORr(Rd,Rn,Rm,Rs) CC_RSCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define RSCS_rrrRRX(Rd,Rn,Rm) CC_RSCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +// ORRcc Rd,Rn,#i +#define CC_ORR_rri8(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,UNSHIFTED_IMM8(i)) +// ORRcc Rd,Rn,#i ROR #s +#define CC_ORR_rri8RORi(cc,Rd,Rn,i,s) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM8_ROR(i,s)) + +#define CC_ORR_rri(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_ORR_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ORR_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ORR_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ORR_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ORR_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ORR_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ORR_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ORR_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ORR_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ORR_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_RRX(Rm)) + +// ORR Rd,Rn,#i +#define ORR_rri8(Rd,Rn,i) CC_ORR_rri8(NATIVE_CC_AL,Rd,Rn,i) +// ORR Rd,Rn,#i ROR #s +#define ORR_rri8RORi(Rd,Rn,i,s) CC_ORR_rri8RORi(NATIVE_CC_AL,Rd,Rn,i,s) + +#define ORR_rri(Rd,Rn,i) CC_ORR_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ORR_rrr(Rd,Rn,Rm) CC_ORR_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ORR_rrrLSLi(Rd,Rn,Rm,i) CC_ORR_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORR_rrrLSLr(Rd,Rn,Rm,Rs) CC_ORR_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORR_rrrLSRi(Rd,Rn,Rm,i) CC_ORR_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORR_rrrLSRr(Rd,Rn,Rm,Rs) CC_ORR_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORR_rrrASRi(Rd,Rn,Rm,i) CC_ORR_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORR_rrrASRr(Rd,Rn,Rm,Rs) CC_ORR_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORR_rrrRORi(Rd,Rn,Rm,i) CC_ORR_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORR_rrrRORr(Rd,Rn,Rm,Rs) CC_ORR_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORR_rrrRRX(Rd,Rn,Rm) CC_ORR_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_ORRS_rri(cc,Rd,Rn,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_ORRS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_ORRS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_ORRS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_ORRS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_ORRS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_ORRS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_ORRS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_ORRS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_ORRS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_ORRS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define ORRS_rri(Rd,Rn,i) CC_ORRS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define ORRS_rrr(Rd,Rn,Rm) CC_ORRS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define ORRS_rrrLSLi(Rd,Rn,Rm,i) CC_ORRS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORRS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ORRS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORRS_rrrLSRi(Rd,Rn,Rm,i) CC_ORRS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORRS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ORRS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORRS_rrrASRi(Rd,Rn,Rm,i) CC_ORRS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORRS_rrrASRr(Rd,Rn,Rm,Rs) CC_ORRS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORRS_rrrRORi(Rd,Rn,Rm,i) CC_ORRS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define ORRS_rrrRORr(Rd,Rn,Rm,Rs) CC_ORRS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define ORRS_rrrRRX(Rd,Rn,Rm) CC_ORRS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_BIC_rri(cc,Rd,Rn,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_IMM(i)) +#define CC_BIC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_REG(Rm)) +#define CC_BIC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_BIC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_BIC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_BIC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_BIC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_BIC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_BIC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_BIC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_BIC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_RRX(Rm)) + +#define BIC_rri(Rd,Rn,i) CC_BIC_rri(NATIVE_CC_AL,Rd,Rn,i) +#define BIC_rrr(Rd,Rn,Rm) CC_BIC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define BIC_rrrLSLi(Rd,Rn,Rm,i) CC_BIC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BIC_rrrLSLr(Rd,Rn,Rm,Rs) CC_BIC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BIC_rrrLSRi(Rd,Rn,Rm,i) CC_BIC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BIC_rrrLSRr(Rd,Rn,Rm,Rs) CC_BIC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BIC_rrrASRi(Rd,Rn,Rm,i) CC_BIC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BIC_rrrASRr(Rd,Rn,Rm,Rs) CC_BIC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BIC_rrrRORi(Rd,Rn,Rm,i) CC_BIC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BIC_rrrRORr(Rd,Rn,Rm,Rs) CC_BIC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BIC_rrrRRX(Rd,Rn,Rm) CC_BIC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_BICS_rri(cc,Rd,Rn,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_IMM(i)) +#define CC_BICS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_REG(Rm)) +#define CC_BICS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) +#define CC_BICS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) +#define CC_BICS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) +#define CC_BICS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) +#define CC_BICS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) +#define CC_BICS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) +#define CC_BICS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) +#define CC_BICS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) +#define CC_BICS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_RRX(Rm)) + +#define BICS_rri(Rd,Rn,i) CC_BICS_rri(NATIVE_CC_AL,Rd,Rn,i) +#define BICS_rrr(Rd,Rn,Rm) CC_BICS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define BICS_rrrLSLi(Rd,Rn,Rm,i) CC_BICS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BICS_rrrLSLr(Rd,Rn,Rm,Rs) CC_BICS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BICS_rrrLSRi(Rd,Rn,Rm,i) CC_BICS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BICS_rrrLSRr(Rd,Rn,Rm,Rs) CC_BICS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BICS_rrrASRi(Rd,Rn,Rm,i) CC_BICS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BICS_rrrASRr(Rd,Rn,Rm,Rs) CC_BICS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BICS_rrrRORi(Rd,Rn,Rm,i) CC_BICS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define BICS_rrrRORr(Rd,Rn,Rm,Rs) CC_BICS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) +#define BICS_rrrRRX(Rd,Rn,Rm) CC_BICS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) + +/* Branch instructions */ +#define CC_B_i(cc,i) _W(((cc) << 28) | (10 << 24) | (i)) +#define CC_BL_i(cc,i) _W(((cc) << 28) | (11 << 24) | (i)) +#define CC_BLX_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (3 << 4) | (0xfff << 8) | (r)) +#define CC_BX_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (1 << 4) | (0xfff << 8) | (r)) +#define CC_BXJ_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (2 << 4) | (0xfff << 8) | (r)) + +#define BEQ_i(i) CC_B_i(NATIVE_CC_EQ,i) +#define BNE_i(i) CC_B_i(NATIVE_CC_NE,i) +#define BCS_i(i) CC_B_i(NATIVE_CC_CS,i) +#define BCC_i(i) CC_B_i(NATIVE_CC_CC,i) +#define BMI_i(i) CC_B_i(NATIVE_CC_MI,i) +#define BPL_i(i) CC_B_i(NATIVE_CC_PL,i) +#define BVS_i(i) CC_B_i(NATIVE_CC_VS,i) +#define BVC_i(i) CC_B_i(NATIVE_CC_VC,i) +#define BHI_i(i) CC_B_i(NATIVE_CC_HI,i) +#define BLS_i(i) CC_B_i(NATIVE_CC_LS,i) +#define BGE_i(i) CC_B_i(NATIVE_CC_GE,i) +#define BLT_i(i) CC_B_i(NATIVE_CC_LT,i) +#define BGT_i(i) CC_B_i(NATIVE_CC_GT,i) +#define BLE_i(i) CC_B_i(NATIVE_CC_LE,i) +#define B_i(i) CC_B_i(NATIVE_CC_AL,i) + +#define BL_i(i) CC_BL_i(NATIVE_CC_AL,i) +#define BLX_i(i) _W((NATIVE_CC_AL << 28) | (10 << 24) | (i)) +#define BLX_r(r) CC_BLX_r(NATIVE_CC_AL,r) +#define BX_r(r) CC_BX_r(NATIVE_CC_AL,r) +#define BXJ_r(r) CC_BXJ_r(NATIVE_CC_AL,r) + +/* Status register instructions */ +#define CC_MRS_CPSR(cc,Rd) _W(((cc) << 28) | (0x10 << 20) | ((Rd) << 12) | (0xf << 16)) +#define MRS_CPSR(Rd) CC_MRS_CPSR(NATIVE_CC_AL,Rd) +#define CC_MRS_SPSR(cc,Rd) _W(((cc) << 28) | (0x14 << 20) | ((Rd) << 12) | (0xf << 16)) +#define MRS_SPSR(Rd) CC_MRS_SPSR(NATIVE_CC_AL,Rd) + +#define CC_MSR_CPSR_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x9 << 16) | (0xf << 12) | SHIFT_IMM(i)) +#define CC_MSR_CPSR_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x9 << 16) | (0xf << 12) | (Rm)) + +#define MSR_CPSR_i(i) CC_MSR_CPSR_i(NATIVE_CC_AL,(i)) +#define MSR_CPSR_r(Rm) CC_MSR_CPSR_r(NATIVE_CC_AL,(Rm)) + +#define CC_MSR_CPSRf_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x8 << 16) | (0xf << 12) | SHIFT_IMM(i)) +#define CC_MSR_CPSRf_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x8 << 16) | (0xf << 12) | (Rm)) + +#define MSR_CPSRf_i(i) CC_MSR_CPSRf_i(NATIVE_CC_AL,(i)) +#define MSR_CPSRf_r(Rm) CC_MSR_CPSRf_r(NATIVE_CC_AL,(Rm)) + +#define CC_MSR_CPSRc_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x1 << 16) | (0xf << 12) | SHIFT_IMM(i)) +#define CC_MSR_CPSRc_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x1 << 16) | (0xf << 12) | (Rm)) + +#define MSR_CPSRc_i(i) CC_MSR_CPSRc_i(NATIVE_CC_AL,(i)) +#define MSR_CPSRc_r(Rm) CC_MSR_CPSRc_r(NATIVE_CC_AL,(Rm)) + +/* Load Store instructions */ + +#define CC_PUSH(cc,r) _W(((cc) << 28) | (0x92d << 16) | (1 << (r))) +#define PUSH(r) CC_PUSH(NATIVE_CC_AL, r) + +#define CC_PUSH_REGS(cc,r) _W(((cc) << 28) | (0x92d << 16) | (r)) +#define PUSH_REGS(r) CC_PUSH_REGS(NATIVE_CC_AL, r) + +#define CC_POP(cc,r) _W(((cc) << 28) | (0x8bd << 16) | (1 << (r))) +#define POP(r) CC_POP(NATIVE_CC_AL, r) + +#define CC_POP_REGS(cc,r) _W(((cc) << 28) | (0x8bd << 16) | (r)) +#define POP_REGS(r) CC_POP_REGS(NATIVE_CC_AL, r) + +#define CC_LDR_rR(cc,Rd,Rn) _LS1(cc,1,0,Rd,Rn,ADD_IMM(0)) +#define CC_LDR_rRI(cc,Rd,Rn,i) _LS1(cc,1,0,Rd,Rn,(i) >= 0 ? ADD_IMM(i) : SUB_IMM(-(i))) +#define CC_LDR_rRi(cc,Rd,Rn,i) _LS1(cc,1,0,Rd,Rn,SUB_IMM(i)) +#define CC_LDR_rRR(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,ADD_REG(Rm)) +#define CC_LDR_rRr(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,SUB_REG(Rm)) +#define CC_LDR_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_LSL(Rm,i)) +#define CC_LDR_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_LSL(Rm,i)) +#define CC_LDR_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_LSR(Rm,i)) +#define CC_LDR_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_LSR(Rm,i)) +#define CC_LDR_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_ASR(Rm,i)) +#define CC_LDR_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_ASR(Rm,i)) +#define CC_LDR_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_ROR(Rm,i)) +#define CC_LDR_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_ROR(Rm,i)) +#define CC_LDR_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,ADD_RRX(Rm)) +#define CC_LDR_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,SUB_RRX(Rm)) + +#define LDR_rR(Rd,Rn) CC_LDR_rR(NATIVE_CC_AL,Rd,Rn) +#define LDR_rRI(Rd,Rn,i) CC_LDR_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDR_rRi(Rd,Rn,i) CC_LDR_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDR_rRR(Rd,Rn,Rm) CC_LDR_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDR_rRr(Rd,Rn,Rm) CC_LDR_rRr(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDR_rRR_LSLi(Rd,Rn,Rm,i) CC_LDR_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRr_LSLi(Rd,Rn,Rm,i) CC_LDR_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRR_LSRi(Rd,Rn,Rm,i) CC_LDR_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRr_LSRi(Rd,Rn,Rm,i) CC_LDR_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRR_ASRi(Rd,Rn,Rm,i) CC_LDR_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRr_ASRi(Rd,Rn,Rm,i) CC_LDR_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRR_RORi(Rd,Rn,Rm,i) CC_LDR_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRr_RORi(Rd,Rn,Rm,i) CC_LDR_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDR_rRR_RRX(Rd,Rn,Rm) CC_LDR_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDR_rRr_RRX(Rd,Rn,Rm) CC_LDR_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_STR_rR(cc,Rd,Rn) _LS1(cc,0,0,Rd,Rn,ADD_IMM(0)) +#define CC_STR_rRI(cc,Rd,Rn,i) _LS1(cc,0,0,Rd,Rn,ADD_IMM(i)) +#define CC_STR_rRi(cc,Rd,Rn,i) _LS1(cc,0,0,Rd,Rn,SUB_IMM(i)) +#define CC_STR_rRR(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,ADD_REG(Rm)) +#define CC_STR_rRr(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,SUB_REG(Rm)) +#define CC_STR_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_LSL(Rm,i)) +#define CC_STR_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_LSL(Rm,i)) +#define CC_STR_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_LSR(Rm,i)) +#define CC_STR_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_LSR(Rm,i)) +#define CC_STR_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_ASR(Rm,i)) +#define CC_STR_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_ASR(Rm,i)) +#define CC_STR_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_ROR(Rm,i)) +#define CC_STR_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_ROR(Rm,i)) +#define CC_STR_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,ADD_RRX(Rm)) +#define CC_STR_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,SUB_RRX(Rm)) + +#define STR_rR(Rd,Rn) CC_STR_rR(NATIVE_CC_AL,Rd,Rn) +#define STR_rRI(Rd,Rn,i) CC_STR_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define STR_rRi(Rd,Rn,i) CC_STR_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define STR_rRR(Rd,Rn,Rm) CC_STR_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define STR_rRr(Rd,Rn,Rm) CC_STR_rRr(NATIVE_CC_AL,Rd,Rn,Rm) +#define STR_rRR_LSLi(Rd,Rn,Rm,i) CC_STR_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRr_LSLi(Rd,Rn,Rm,i) CC_STR_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRR_LSRi(Rd,Rn,Rm,i) CC_STR_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRr_LSRi(Rd,Rn,Rm,i) CC_STR_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRR_ASRi(Rd,Rn,Rm,i) CC_STR_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRr_ASRi(Rd,Rn,Rm,i) CC_STR_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRR_RORi(Rd,Rn,Rm,i) CC_STR_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRr_RORi(Rd,Rn,Rm,i) CC_STR_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STR_rRR_RRX(Rd,Rn,Rm) CC_STR_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) +#define STR_rRr_RRX(Rd,Rn,Rm) CC_STR_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_LDRB_rR(cc,Rd,Rn) _LS1(cc,1,1,Rd,Rn,ADD_IMM(0)) +#define CC_LDRB_rRI(cc,Rd,Rn,i) _LS1(cc,1,1,Rd,Rn,ADD_IMM(i)) +#define CC_LDRB_rRi(cc,Rd,Rn,i) _LS1(cc,1,1,Rd,Rn,SUB_IMM(i)) +#define CC_LDRB_rRR(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,ADD_REG(Rm)) +#define CC_LDRB_rRr(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,SUB_REG(Rm)) +#define CC_LDRB_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_LSL(Rm,i)) +#define CC_LDRB_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_LSL(Rm,i)) +#define CC_LDRB_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_LSR(Rm,i)) +#define CC_LDRB_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_LSR(Rm,i)) +#define CC_LDRB_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_ASR(Rm,i)) +#define CC_LDRB_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_ASR(Rm,i)) +#define CC_LDRB_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_ROR(Rm,i)) +#define CC_LDRB_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_ROR(Rm,i)) +#define CC_LDRB_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,ADD_RRX(Rm)) +#define CC_LDRB_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,SUB_RRX(Rm)) + +#define LDRB_rR(Rd,Rn) CC_LDRB_rR(NATIVE_CC_AL,Rd,Rn) +#define LDRB_rRI(Rd,Rn,i) CC_LDRB_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDRB_rRi(Rd,Rn,i) CC_LDRB_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDRB_rRR(Rd,Rn,Rm) CC_LDRB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRB_rRr(Rd,Rn,Rm) CC_LDRB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRB_rRR_LSLi(Rd,Rn,Rm,i) CC_LDRB_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRr_LSLi(Rd,Rn,Rm,i) CC_LDRB_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRR_LSRi(Rd,Rn,Rm,i) CC_LDRB_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRr_LSRi(Rd,Rn,Rm,i) CC_LDRB_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRR_ASRi(Rd,Rn,Rm,i) CC_LDRB_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRr_ASRi(Rd,Rn,Rm,i) CC_LDRB_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRR_RORi(Rd,Rn,Rm,i) CC_LDRB_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRr_RORi(Rd,Rn,Rm,i) CC_LDRB_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define LDRB_rRR_RRX(Rd,Rn,Rm) CC_LDRB_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRB_rRr_RRX(Rd,Rn,Rm) CC_LDRB_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_STRB_rR(cc,Rd,Rn) _LS1(cc,0,1,Rd,Rn,ADD_IMM(0)) +#define CC_STRB_rRI(cc,Rd,Rn,i) _LS1(cc,0,1,Rd,Rn,ADD_IMM(i)) +#define CC_STRB_rRi(cc,Rd,Rn,i) _LS1(cc,0,1,Rd,Rn,SUB_IMM(i)) +#define CC_STRB_rRR(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,ADD_REG(Rm)) +#define CC_STRB_rRr(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,SUB_REG(Rm)) +#define CC_STRB_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_LSL(Rm,i)) +#define CC_STRB_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_LSL(Rm,i)) +#define CC_STRB_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_LSR(Rm,i)) +#define CC_STRB_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_LSR(Rm,i)) +#define CC_STRB_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_ASR(Rm,i)) +#define CC_STRB_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_ASR(Rm,i)) +#define CC_STRB_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_ROR(Rm,i)) +#define CC_STRB_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_ROR(Rm,i)) +#define CC_STRB_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,ADD_RRX(Rm)) +#define CC_STRB_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,SUB_RRX(Rm)) + +#define STRB_rR(Rd,Rn) CC_STRB_rR(NATIVE_CC_AL,Rd,Rn) +#define STRB_rRI(Rd,Rn,i) CC_STRB_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define STRB_rRi(Rd,Rn,i) CC_STRB_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define STRB_rRR(Rd,Rn,Rm) CC_STRB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define STRB_rRr(Rd,Rn,Rm) CC_STRB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) +#define STRB_rRR_LSLi(Rd,Rn,Rm,i) CC_STRB_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRr_LSLi(Rd,Rn,Rm,i) CC_STRB_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRR_LSRi(Rd,Rn,Rm,i) CC_STRB_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRr_LSRi(Rd,Rn,Rm,i) CC_STRB_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRR_ASRi(Rd,Rn,Rm,i) CC_STRB_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRr_ASRi(Rd,Rn,Rm,i) CC_STRB_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRR_RORi(Rd,Rn,Rm,i) CC_STRB_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRr_RORi(Rd,Rn,Rm,i) CC_STRB_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) +#define STRB_rRR_RRX(Rd,Rn,Rm) CC_STRB_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) +#define STRB_rRr_RRX(Rd,Rn,Rm) CC_STRB_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_LDRSH_rR(cc,Rd,Rn) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_IMM(0)) +#define CC_LDRSH_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_IMM(i)) +#define CC_LDRSH_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,1,1,Rd,Rn,SUB2_IMM(i)) +#define CC_LDRSH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_REG(Rm)) +#define CC_LDRSH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,1,Rd,Rn,SUB2_REG(Rm)) + +#define LDRSH_rR(Rd,Rn) CC_LDRSH_rR(NATIVE_CC_AL,Rd,Rn) +#define LDRSH_rRI(Rd,Rn,i) CC_LDRSH_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDRSH_rRi(Rd,Rn,i) CC_LDRSH_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDRSH_rRR(Rd,Rn,Rm) CC_LDRSH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRSH_rRr(Rd,Rn,Rm) CC_LDRSH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_LDRH_rR(cc,Rd,Rn) _LS2(cc,1,1,0,1,Rd,Rn,ADD2_IMM(0)) +#define CC_LDRH_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,0,1,Rd,Rn,(i) >= 0 ? ADD2_IMM(i) : SUB2_IMM(-(i))) +#define CC_LDRH_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,0,1,Rd,Rn,SUB2_IMM(i)) +#define CC_LDRH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,0,1,Rd,Rn,ADD2_REG(Rm)) +#define CC_LDRH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,0,1,Rd,Rn,SUB2_REG(Rm)) + +#define LDRH_rR(Rd,Rn) CC_LDRH_rR(NATIVE_CC_AL,Rd,Rn) +#define LDRH_rRI(Rd,Rn,i) CC_LDRH_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDRH_rRi(Rd,Rn,i) CC_LDRH_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDRH_rRR(Rd,Rn,Rm) CC_LDRH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRH_rRr(Rd,Rn,Rm) CC_LDRH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_STRD_rR(cc,Rd,Rn) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_IMM(0)) +#define CC_STRD_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_IMM(i)) +#define CC_STRD_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,1,1,Rd,Rn,SUB2_IMM(i)) +#define CC_STRD_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_REG(Rm)) +#define CC_STRD_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,1,Rd,Rn,SUB2_REG(Rm)) + +#define STRD_rR(Rd,Rn) CC_STRD_rR(NATIVE_CC_AL,Rd,Rn) +#define STRD_rRI(Rd,Rn,i) CC_STRD_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define STRD_rRi(Rd,Rn,i) CC_STRD_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define STRD_rRR(Rd,Rn,Rm) CC_STRD_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define STRD_rRr(Rd,Rn,Rm) CC_STRD_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_STRH_rR(cc,Rd,Rn) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_IMM(0)) +#define CC_STRH_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_IMM(i)) +#define CC_STRH_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,0,1,Rd,Rn,SUB2_IMM(i)) +#define CC_STRH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_REG(Rm)) +#define CC_STRH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,0,1,Rd,Rn,SUB2_REG(Rm)) + +#define STRH_rR(Rd,Rn) CC_STRH_rR(NATIVE_CC_AL,Rd,Rn) +#define STRH_rRI(Rd,Rn,i) CC_STRH_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define STRH_rRi(Rd,Rn,i) CC_STRH_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define STRH_rRR(Rd,Rn,Rm) CC_STRH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define STRH_rRr(Rd,Rn,Rm) CC_STRH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_LDRSB_rR(cc,Rd,Rn) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_IMM(0)) +#define CC_LDRSB_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_IMM(i)) +#define CC_LDRSB_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,1,0,Rd,Rn,SUB2_IMM(i)) +#define CC_LDRSB_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_REG(Rm)) +#define CC_LDRSB_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,0,Rd,Rn,SUB2_REG(Rm)) + +#define LDRSB_rR(Rd,Rn) CC_LDRSB_rR(NATIVE_CC_AL,Rd,Rn) +#define LDRSB_rRI(Rd,Rn,i) CC_LDRSB_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDRSB_rRi(Rd,Rn,i) CC_LDRSB_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDRSB_rRR(Rd,Rn,Rm) CC_LDRSB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRSB_rRr(Rd,Rn,Rm) CC_LDRSB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +#define CC_LDRD_rR(cc,Rd,Rn) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_IMM(0)) +#define CC_LDRD_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_IMM(i)) +#define CC_LDRD_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,1,0,Rd,Rn,SUB2_IMM(i)) +#define CC_LDRD_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_REG(Rm)) +#define CC_LDRD_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,0,Rd,Rn,SUB2_REG(Rm)) + +#define LDRD_rR(Rd,Rn) CC_LDRD_rR(NATIVE_CC_AL,Rd,Rn) +#define LDRD_rRI(Rd,Rn,i) CC_LDRD_rRI(NATIVE_CC_AL,Rd,Rn,i) +#define LDRD_rRi(Rd,Rn,i) CC_LDRD_rRi(NATIVE_CC_AL,Rd,Rn,i) +#define LDRD_rRR(Rd,Rn,Rm) CC_LDRD_rRR(NATIVE_CC_AL,Rd,Rn,Rm) +#define LDRD_rRr(Rd,Rn,Rm) CC_LDRD_rRr(NATIVE_CC_AL,Rd,Rn,Rm) + +/* Multiply */ +#define CC_SMULL_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x0C << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define SMULL_rrrr(RdLo,RdHi,Rm,Rs) CC_SMULL_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) +#define CC_SMULLS_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x0D << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define SMULLS_rrrr(RdLo,RdHi,Rm,Rs) CC_SMULLS_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) +#define CC_MUL_rrr(cc, Rd, Rm, Rs) _W(((cc) << 28) | (0x00 << 20) | ((Rd) << 16) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define MUL_rrr(Rd, Rm, Rs) CC_MUL_rrr(NATIVE_CC_AL, Rd, Rm, Rs) +#define CC_MULS_rrr(cc, Rd, Rm, Rs) _W(((cc) << 28) | (0x01 << 20) | ((Rd) << 16) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define MULS_rrr(Rd, Rm, Rs) CC_MULS_rrr(NATIVE_CC_AL, Rd, Rm, Rs) + +#define CC_UMULL_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x08 << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define UMULL_rrrr(RdLo,RdHi,Rm,Rs) CC_UMULL_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) +#define CC_UMULLS_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x09 << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) +#define UMULLS_rrrr(RdLo,RdHi,Rm,Rs) CC_UMULLS_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) + +/* Others */ +#define CC_CLZ_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x16 << 20) | (0xf << 16) | ((Rd) << 12) | (0xf << 8) | (0x1 << 4) | SHIFT_REG(Rm)) +#define CLZ_rr(Rd,Rm) CC_CLZ_rr(NATIVE_CC_AL,Rd,Rm) + +/* Alias */ +#define LSL_rri(Rd,Rm,i) MOV_rrLSLi(Rd,Rm,i) +#define LSL_rrr(Rd,Rm,Rs) MOV_rrLSLr(Rd,Rm,Rs) +#define LSR_rri(Rd,Rm,i) MOV_rrLSRi(Rd,Rm,i) +#define LSR_rrr(Rd,Rm,Rs) MOV_rrLSRr(Rd,Rm,Rs) +#define ASR_rri(Rd,Rm,i) MOV_rrASRi(Rd,Rm,i) +#define ASR_rrr(Rd,Rm,Rs) MOV_rrASRr(Rd,Rm,Rs) +#define ROR_rri(Rd,Rm,i) MOV_rrRORi(Rd,Rm,i) +#define ROR_rrr(Rd,Rm,Rs) MOV_rrRORr(Rd,Rm,Rs) +#define RRX_rr(Rd,Rm) MOV_rrRRX(Rd,Rm) +#define LSLS_rri(Rd,Rm,i) MOVS_rrLSLi(Rd,Rm,i) +#define LSLS_rrr(Rd,Rm,Rs) MOVS_rrLSLr(Rd,Rm,Rs) +#define LSRS_rri(Rd,Rm,i) MOVS_rrLSRi(Rd,Rm,i) +#define LSRS_rrr(Rd,Rm,Rs) MOVS_rrLSRr(Rd,Rm,Rs) +#define ASRS_rri(Rd,Rm,i) MOVS_rrASRi(Rd,Rm,i) +#define ASRS_rrr(Rd,Rm,Rs) MOVS_rrASRr(Rd,Rm,Rs) +#define RORS_rri(Rd,Rm,i) MOVS_rrRORi(Rd,Rm,i) +#define RORS_rrr(Rd,Rm,Rs) MOVS_rrRORr(Rd,Rm,Rs) +#define RRXS_rr(Rd,Rm) MOVS_rrRRX(Rd,Rm) + +/* ARMV6 ops */ +#define CC_SXTB_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTB_rr(Rd,Rm) CC_SXTB_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTB_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTB_rr_ROR8(Rd,Rm) CC_SXTB_rr_ROR8(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTB_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTB_rr_ROR16(Rd,Rm) CC_SXTB_rr_ROR16(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTB_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTB_rr_ROR24(Rd,Rm) CC_SXTB_rr_ROR24(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTH_rr(Rd,Rm) CC_SXTH_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTH_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTH_rr_ROR8(Rd,Rm) CC_SXTH_rr_ROR8(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTH_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTH_rr_ROR16(Rd,Rm) CC_SXTH_rr_ROR16(NATIVE_CC_AL,Rd,Rm) + +#define CC_SXTH_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define SXTH_rr_ROR24(Rd,Rm) CC_SXTH_rr_ROR24(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTB_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTB_rr(Rd,Rm) CC_UXTB_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTB_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTB_rr_ROR8(Rd,Rm) CC_UXTB_rr_ROR8(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTB_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTB_rr_ROR16(Rd,Rm) CC_UXTB_rr_ROR16(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTB_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTB_rr_ROR24(Rd,Rm) CC_UXTB_rr_ROR24(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTH_rr(Rd,Rm) CC_UXTH_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTH_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTH_rr_ROR8(Rd,Rm) CC_UXTH_rr_ROR8(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTH_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTH_rr_ROR16(Rd,Rm) CC_UXTH_rr_ROR16(NATIVE_CC_AL,Rd,Rm) + +#define CC_UXTH_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) +#define UXTH_rr_ROR24(Rd,Rm) CC_UXTH_rr_ROR24(NATIVE_CC_AL,Rd,Rm) + +#define CC_REV_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0x3 << 4) | SHIFT_REG(Rm)) +#define REV_rr(Rd,Rm) CC_REV_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_REV16_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0xB << 4) | SHIFT_REG(Rm)) +#define REV16_rr(Rd,Rm) CC_REV16_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_REVSH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0xB << 4) | SHIFT_REG(Rm)) +#define REVSH_rr(Rd,Rm) CC_REVSH_rr(NATIVE_CC_AL,Rd,Rm) + +#define CC_PKHBT_rrr(cc,Rd,Rn,Rm) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x1 << 4) | (Rm)) +#define CC_PKHBT_rrrLSLi(cc,Rd,Rn,Rm,s) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x1 << 4) | SHIFT_PK(Rm, s)) +#define PKHBT_rrr(Rd,Rn,Rm) CC_PKHBT_rrr(NATIVE_CC_AL,Rd,Rn,Rm) +#define PKHBT_rrrLSLi(Rd,Rn,Rm,s) CC_PKHBT_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,s) + +#define CC_PKHTB_rrrASRi(cc,Rd,Rn,Rm,s) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x5 << 4) | SHIFT_PK(Rm, s)) +#define PKHTB_rrrASRi(Rd,Rn,Rm,s) CC_PKHTB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,s) + +#endif /* ARM_RTASM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp new file mode 100644 index 000000000..32e6982a0 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -0,0 +1,5372 @@ +/* + * compiler/codegen_x86.cpp - IA-32 and AMD64 code generator + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> IA-32 and AMD64 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * 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 + */ + +/* This should eventually end up in machdep/, but for now, x86 is the + only target, and it's easier this way... */ + +#include "flags_x86.h" + +/************************************************************************* + * Some basic information about the the target CPU * + *************************************************************************/ + +#define R1 RR1 +#define R2 RR2 +#define R4 RR4 + +#define EAX_INDEX 0 +#define ECX_INDEX 1 +#define EDX_INDEX 2 +#define EBX_INDEX 3 +#define ESP_INDEX 4 +#define EBP_INDEX 5 +#define ESI_INDEX 6 +#define EDI_INDEX 7 +#if defined(CPU_x86_64) +#define R8_INDEX 8 +#define R9_INDEX 9 +#define R10_INDEX 10 +#define R11_INDEX 11 +#define R12_INDEX 12 +#define R13_INDEX 13 +#define R14_INDEX 14 +#define R15_INDEX 15 +#endif +/* XXX this has to match X86_Reg8H_Base + 4 */ +#define AH_INDEX (0x10+4+EAX_INDEX) +#define CH_INDEX (0x10+4+ECX_INDEX) +#define DH_INDEX (0x10+4+EDX_INDEX) +#define BH_INDEX (0x10+4+EBX_INDEX) + +/* The register in which subroutines return an integer return value */ +#define REG_RESULT EAX_INDEX + +/* The registers subroutines take their first and second argument in */ +#ifdef _WIN32 +/* Handle the _fastcall parameters of ECX and EDX */ +#define REG_PAR1 ECX_INDEX +#define REG_PAR2 EDX_INDEX +#elif defined(CPU_x86_64) +#define REG_PAR1 EDI_INDEX +#define REG_PAR2 ESI_INDEX +#else +#define REG_PAR1 EAX_INDEX +#define REG_PAR2 EDX_INDEX +#endif + +#define REG_PC_PRE EAX_INDEX /* The register we use for preloading regs.pc_p */ +#ifdef _WIN32 +#define REG_PC_TMP ECX_INDEX +#else +#define REG_PC_TMP ECX_INDEX /* Another register that is not the above */ +#endif + +#define SHIFTCOUNT_NREG ECX_INDEX /* Register that can be used for shiftcount. + -1 if any reg will do */ +#define MUL_NREG1 EAX_INDEX /* %eax will hold the low 32 bits after a 32x32 mul */ +#define MUL_NREG2 EDX_INDEX /* %edx will hold the high 32 bits */ + +#define STACK_ALIGN 16 +#define STACK_OFFSET sizeof(void *) +#ifdef _WIN64 +/* In the Microsoft x64 calling convention, it's the caller's responsibility + * to allocate 32 bytes of "shadow space" on the stack right before calling + * the function (regardless of the actual number of parameters used). */ +#define STACK_SHADOW_SPACE 32 +#else +#define STACK_SHADOW_SPACE 0 +#endif + +#if defined(CPU_x86_64) +#ifdef UAE +uae_s8 always_used[] = { ESP_INDEX, R12_INDEX, -1 }; +#else +uae_s8 always_used[] = { ESP_INDEX, -1 }; +#endif +uae_s8 can_byte[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; +uae_s8 can_word[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; +#else +uae_s8 always_used[] = { ESP_INDEX, -1 }; +uae_s8 can_byte[]={0,1,2,3,-1}; +uae_s8 can_word[]={0,1,2,3,5,6,7,-1}; +#endif +static bool have_lahf_lm = true; // target has LAHF supported in long mode ? + +#if USE_OPTIMIZED_CALLS +/* Make sure interpretive core does not use cpuopti */ +uae_u8 call_saved[]={0,0,0,1,1,1,1,1}; +#error FIXME: code not ready +#else +/* cpuopti mutate instruction handlers to assume registers are saved + by the caller */ +uae_u8 call_saved[]={0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0}; +#endif + +/* This *should* be the same as call_saved. But: + - We might not really know which registers are saved, and which aren't, + so we need to preserve some, but don't want to rely on everyone else + also saving those registers + - Special registers (such like the stack pointer) should not be "preserved" + by pushing, even though they are "saved" across function calls +*/ +#if defined(CPU_x86_64) +#ifdef _WIN64 +/* https://msdn.microsoft.com/en-us/library/6t169e9c.aspx: + * "The registers RBX, RBP, RDI, RSI, RSP, R12, R13, R14, and R15 are + * considered nonvolatile and must be saved and restored by a function that + * uses them". Also saving r11 for now (see comment below). */ +static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,1,1,0,0,0,1,1,1,1,1}; +#else +/* callee-saved registers as defined by Linux AMD64 ABI: rbx, rbp, rsp, r12 - r15 */ +/* preserve r11 because it's generally used to hold pointers to functions */ +/* FIXME: not really sure what the point of saving r11 is (??). If functions + * cannot assume calle preserves it, it will not be used across calls anyway? */ +static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,0,0,0,0,0,1,1,1,1,1}; +#endif +#else +/* callee-saved registers as defined by System V IA-32 ABI: edi, esi, ebx, ebp */ +static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,1,1}; +#endif + +/* Whether classes of instructions do or don't clobber the native flags */ +#define CLOBBER_MOV +#define CLOBBER_LEA +#define CLOBBER_CMOV +#define CLOBBER_POP +#define CLOBBER_PUSH +#define CLOBBER_SUB clobber_flags() +#define CLOBBER_SBB clobber_flags() +#define CLOBBER_CMP clobber_flags() +#define CLOBBER_ADD clobber_flags() +#define CLOBBER_ADC clobber_flags() +#define CLOBBER_AND clobber_flags() +#define CLOBBER_OR clobber_flags() +#define CLOBBER_XOR clobber_flags() + +#define CLOBBER_ROL clobber_flags() +#define CLOBBER_ROR clobber_flags() +#define CLOBBER_SHLL clobber_flags() +#define CLOBBER_SHRL clobber_flags() +#define CLOBBER_SHRA clobber_flags() +#define CLOBBER_TEST clobber_flags() +#define CLOBBER_CL16 +#define CLOBBER_CL8 +#define CLOBBER_SE32 +#define CLOBBER_SE16 +#define CLOBBER_SE8 +#define CLOBBER_ZE32 +#define CLOBBER_ZE16 +#define CLOBBER_ZE8 +#define CLOBBER_SW16 clobber_flags() +#define CLOBBER_SW32 +#define CLOBBER_SETCC +#define CLOBBER_MUL clobber_flags() +#define CLOBBER_BT clobber_flags() +#define CLOBBER_BSF clobber_flags() + +/* The older code generator is now deprecated. */ +#define USE_NEW_RTASM 1 + +#if USE_NEW_RTASM + +#if defined(CPU_x86_64) +#define X86_TARGET_64BIT 1 +/* The address override prefix causes a 5 cycles penalty on Intel Core + processors. Another solution would be to decompose the load in an LEA, + MOV (to zero-extend), MOV (from memory): is it better? */ +#define ADDR32 x86_emit_byte(0x67), +#else +#define ADDR32 +#endif +#define X86_FLAT_REGISTERS 0 +#define X86_OPTIMIZE_ALU 1 +#define X86_OPTIMIZE_ROTSHI 1 +#include "codegen_x86.h" + +#define x86_emit_byte(B) emit_byte(B) +#define x86_emit_word(W) emit_word(W) +#define x86_emit_long(L) emit_long(L) +#define x86_emit_quad(Q) emit_quad(Q) +#define x86_get_target() get_target() +#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) + +static inline void x86_64_addr32(void) +{ +#ifdef CPU_x86_64 + emit_byte(0x67); +#endif +} + +static inline void x86_64_rex(bool /* w */, uae_u32 * /* r */, uae_u32 * /* x */, uae_u32 *b) +{ +#ifdef CPU_x86_64 + int rex_byte = 0x40; + if (*b >= R8_INDEX) { + *b -= R8_INDEX; + rex_byte |= 1; + } + if (rex_byte != 0x40) { + emit_byte(rex_byte); + } +#else + UNUSED(b); +#endif +} + +static inline void x86_64_prefix( + bool addr32, bool w, uae_u32 *r, uae_u32 *x, uae_u32 *b) +{ + if (addr32) { + x86_64_addr32(); + } + x86_64_rex(w, r, x, b); +} + +// Some mappings to mark compemu_support calls as only used by compemu +// These are still mainly x86 minded. Should be more CPU independent in the future +#define compemu_raw_add_l_mi(a,b) raw_add_l_mi(a,b) +#define compemu_raw_and_l_ri(a,b) raw_and_l_ri(a,b) +#define compemu_raw_bswap_32(a) raw_bswap_32(a) +#define compemu_raw_bt_l_ri(a,b) raw_bt_l_ri(a,b) +#define compemu_raw_call(a) raw_call(a) +#define compemu_raw_cmov_l_rm_indexed(a,b,c,d,e) raw_cmov_l_rm_indexed(a,b,c,d,e) +#define compemu_raw_cmp_l_mi(a,b) raw_cmp_l_mi(a,b) +#define compemu_raw_cmp_l_mi8(a,b) raw_cmp_l_mi(a,b) +#define compemu_raw_jcc_b_oponly(a) raw_jcc_b_oponly(a) +#define compemu_raw_jcc_l_oponly(a) raw_jcc_l_oponly(a) +#define compemu_raw_jl(a) raw_jl(a) +#define compemu_raw_jmp(a) raw_jmp(a) +#define compemu_raw_jmp_m_indexed(a,b,c) raw_jmp_m_indexed(a,b,c) +#define compemu_raw_jmp_r(a) raw_jmp_r(a) +#define compemu_raw_jnz(a) raw_jnz(a) +#define compemu_raw_jz_b_oponly() raw_jz_b_oponly() +#define compemu_raw_lea_l_brr(a,b,c) raw_lea_l_brr(a,b,c) +#define compemu_raw_lea_l_brr_indexed(a,b,c,d,e) raw_lea_l_brr_indexed(a,b,c,d,e) +#define compemu_raw_mov_b_mr(a,b) raw_mov_b_mr(a,b) +#define compemu_raw_mov_l_mi(a,b) raw_mov_l_mi(a,b) +#define compemu_raw_mov_l_mr(a,b) raw_mov_l_mr(a,b) +#define compemu_raw_mov_l_ri(a,b) raw_mov_l_ri(a,b) +#define compemu_raw_mov_l_rm(a,b) raw_mov_l_rm(a,b) +#define compemu_raw_mov_l_rr(a,b) raw_mov_l_rr(a,b) +#define compemu_raw_mov_w_mr(a,b) raw_mov_w_mr(a,b) +#define compemu_raw_sub_l_mi(a,b) raw_sub_l_mi(a,b) +#define compemu_raw_test_l_rr(a,b) raw_test_l_rr(a,b) +#define compemu_raw_zero_extend_16_rr(a,b) raw_zero_extend_16_rr(a,b) +#define compemu_raw_lea_l_rr_indexed(a,b,c,d) raw_lea_l_rr_indexed(a,b,c,d) + +static void jit_fail(const char *msg, const char *file, int line, const char *function) +{ + jit_abort("failure in function %s from file %s at line %d: %s", + function, file, line, msg); +} + +LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) +{ +#if defined(CPU_x86_64) + PUSHQr(r); +#else + PUSHLr(r); +#endif +} +LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) +{ +#if defined(CPU_x86_64) + POPQr(r); +#else + POPLr(r); +#endif +} +LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) +{ +#if defined(CPU_x86_64) + POPQm(d, X86_NOREG, X86_NOREG, 1); +#else + POPLm(d, X86_NOREG, X86_NOREG, 1); +#endif +} +LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) +{ + BTLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) +{ + BTLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) +{ + BTCLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) +{ + BTCLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) +{ + BTRLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) +{ + BTRLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) +{ + BTSLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) +{ + BTSLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) +{ + SUBWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) + +LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) +{ + ADDR32 MOVLmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) +{ + ADDR32 MOVLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) +{ + ADDR32 MOVWim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) +{ + ADDR32 MOVBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) +{ + ADDR32 ROLBim(i, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) +{ + ROLBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) +{ + ROLWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) +{ + ROLLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) +{ + ROLLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) +{ + ROLWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) +{ + ROLBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) +{ + SHLLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) +{ + SHLWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) +{ + SHLBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) +{ + RORBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) +{ + RORWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) +{ + ADDR32 ORLmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) +{ + RORLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) +{ + RORLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) +{ + RORWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) +{ + RORBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) +{ + SHRLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) +{ + SHRWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) +{ + SHRBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) +{ + SARLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) +{ + SARWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) +{ + SARBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) +{ + SHLLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) +{ + SHLWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) +{ + SHLBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) +{ + SHRLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) +{ + SHRWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) +{ + SHRBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) +{ + SARLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) +{ + SARWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) +{ + SARBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,1,raw_sahf,(R2)) +{ + SAHF(); +} +LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) + +LOWFUNC(NONE,NONE,1,raw_cpuid,(R4)) +{ + CPUID(); +} +LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) + +LOWFUNC(READ,NONE,1,raw_lahf,(W2)) +{ + LAHF(); +} +LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) + +LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) +{ + SETCCir(cc, d); +} +LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) + +LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) +{ + ADDR32 SETCCim(cc, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) +{ + if (have_cmov) + CMOVLrr(cc, s, d); + else { /* replacement using branch and mov */ + uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; + JCCSii(cc^1, 0); + MOVLrr(s, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) +{ + BSFLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) +{ + MOVSLQrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) +{ + MOVSWLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) +{ + MOVSBLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) +{ + MOVZWLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) +{ + MOVZBLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) +{ + IMULLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + jit_abort("Bad register in IMUL: d=%d, s=%d",d,s); + } + IMULLr(s); +} +LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + jit_abort("Bad register in MUL: d=%d, s=%d",d,s); + } + MULLr(s); +} +LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4, R4)) +{ + abort(); /* %^$&%^$%#^ x86! */ +} +LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) +{ + MOVBrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) +{ + MOVWrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVWmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVBmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) +{ + ADDR32 MOVLrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) +{ + ADDR32 MOVWrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) +{ + ADDR32 MOVBrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) +{ + ADDR32 MOVLrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) +{ + ADDR32 MOVWrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) +{ + ADDR32 MOVBrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVWmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVBmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) +{ + if (have_cmov) + ADDR32 CMOVLmr(cond, base, X86_NOREG, index, factor, d); + else { /* replacement using branch and mov */ + uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) +{ + if (have_cmov) + CMOVLmr(cond, mem, X86_NOREG, X86_NOREG, 1, d); + else { /* replacement using branch and mov */ + uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + ADDR32 MOVLmr(mem, X86_NOREG, X86_NOREG, 1, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) +{ + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) +{ + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) +{ + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) +{ + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVLim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVWim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVBim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) +{ + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) +{ + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) +{ + ADDR32 LEALmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) +{ + ADDR32 LEALmr(offset, s, index, factor, d); +} +LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) +{ + ADDR32 LEALmr(0, s, index, factor, d); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) +{ + ADDR32 LEALmr(0, X86_NOREG, index, factor, d); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) +{ + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) +{ + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) +{ + BSWAPLr(r); +} +LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) +{ + ROLWir(8, r); +} +LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) +{ + MOVLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) +{ + ADDR32 MOVLrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) +{ + ADDR32 MOVWrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) + +LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) +{ + ADDR32 MOVWmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) +{ + ADDR32 MOVBrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) + +LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) +{ + ADDR32 MOVBmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) +{ + MOVLir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) +{ + MOVWir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) +{ + MOVBir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) + +LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) +{ + ADDR32 ADCLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) +{ + ADDR32 ADDLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) +{ + ADDR32 ADDWim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) +{ + ADDR32 ADDBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) +{ + TESTLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) +{ + TESTLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) +{ + TESTWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) +{ + TESTBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) +{ + XORLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) +{ + ANDLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) +{ + ANDWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) +{ + ANDLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) +{ + ANDWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) +{ + ANDBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) +{ + ORLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) +{ + ORLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) +{ + ORWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) +{ + ORBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) +{ + ADCLrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) +{ + ADCWrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) +{ + ADCBrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) +{ + ADDLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) +{ + ADDWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) +{ + ADDBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) +{ + SUBLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) +{ + SUBBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) +{ + ADDLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) +{ + ADDWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) +{ + ADDBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) + +LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) +{ + SBBLrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) +{ + SBBWrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) +{ + SBBBrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) +{ + SUBLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) +{ + SUBWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) +{ + SUBBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) +{ + CMPLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) +{ + CMPLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) +{ + CMPWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) +{ + ADDR32 CMPBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) +{ + CMPBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) +{ + CMPBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) + +LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) +{ + ADDR32 CMPLmr(offset, X86_NOREG, index, factor, d); +} +LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) +{ + XORLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) +{ + XORWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) +{ + XORBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) +{ + ADDR32 SUBLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) +{ + ADDR32 CMPLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) +{ + XCHGLrr(r2, r1); +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) +{ + XCHGBrr(r2, r1); +} +LENDFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) +{ + PUSHF(); +} +LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) + +LOWFUNC(WRITE,READ,0,raw_popfl,(void)) +{ + POPF(); +} +LENDFUNC(WRITE,READ,0,raw_popfl,(void)) + +/* Generate floating-point instructions */ +static inline void x86_fadd_m(MEMR s) +{ + ADDR32 FADDLm(s,X86_NOREG,X86_NOREG,1); +} + +#else + +const bool optimize_accum = true; +const bool optimize_imm8 = true; +const bool optimize_shift_once = true; + +/************************************************************************* + * Actual encoding of the instructions on the target CPU * + *************************************************************************/ + +static inline int isaccum(int r) +{ + return (r == EAX_INDEX); +} + +static inline int isbyte(uae_s32 x) +{ + return (x>=-128 && x<=127); +} + +static inline int isword(uae_s32 x) +{ + return (x>=-32768 && x<=32767); +} + +LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) +{ + emit_byte(0x50+r); +} +LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) +{ + emit_byte(0x58+r); +} +LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) +{ + emit_byte(0x8f); + emit_byte(0x05); + emit_long(d); +} +LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xe0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xa3); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xf8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xbb); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) + + +LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xf0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xb3); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xe8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xab); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x2d); + else { + emit_byte(0x81); + emit_byte(0xe8+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) + + +LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) +{ + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) +{ + emit_byte(0xc7); + emit_byte(0x05); + emit_long(d); + emit_long(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0xc7); + emit_byte(0x05); + emit_long(d); + emit_word(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) +{ + emit_byte(0xc6); + emit_byte(0x05); + emit_long(d); + emit_byte(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0x05); + emit_long(d); + } + else { + emit_byte(0xc0); + emit_byte(0x05); + emit_long(d); + emit_byte(i); + } +} +LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xc0+r); + } + else { + emit_byte(0xc0); + emit_byte(0xc0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xc0+r); + } + else { + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xc8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xc8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) + +// gb-- used for making an fpcr value in compemu_fpp.cpp +LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) +{ + emit_byte(0x0b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xc8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xc8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xe0+r); + } + else { + emit_byte(0xc1); + emit_byte(0xe0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xe0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xe0+r); + } + else { + emit_byte(0xc0); + emit_byte(0xe0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xe8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xe8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xe8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xe8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xe8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xf8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xf8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xf8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xf8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xf8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) +{ + emit_byte(0x9e); +} +LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) + +LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) +{ + emit_byte(0x0f); + emit_byte(0xa2); +} +LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) + +LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) +{ + emit_byte(0x9f); +} +LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) + +LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) +{ + emit_byte(0x0f); + emit_byte(0x90+cc); + emit_byte(0xc0+d); +} +LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) + +LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) +{ + emit_byte(0x0f); + emit_byte(0x90+cc); + emit_byte(0x05); + emit_long(d); +} +LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) +{ + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cc); + emit_byte(0xc0+8*d+s); + } + else { /* replacement using branch and mov */ + int uncc=(cc^1); + emit_byte(0x70+uncc); + emit_byte(2); /* skip next 2 bytes if not cc=true */ + emit_byte(0x89); + emit_byte(0xc0+8*s+d); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) +{ + emit_byte(0x0f); + emit_byte(0xbc); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) +{ + emit_byte(0x0f); + emit_byte(0xbf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) +{ + emit_byte(0x0f); + emit_byte(0xbe); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) +{ + emit_byte(0x0f); + emit_byte(0xb7); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) +{ + emit_byte(0x0f); + emit_byte(0xb6); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) +{ + emit_byte(0x0f); + emit_byte(0xaf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + jit_abort("Bad register in IMUL: d=%d, s=%d\n",d,s); + } + emit_byte(0xf7); + emit_byte(0xea); +} +LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + jit_abort("Bad register in MUL: d=%d, s=%d",d,s); + } + emit_byte(0xf7); + emit_byte(0xe2); +} +LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) +{ + jit_abort("unsupported MUL"); /* %^$&%^$%#^ x86! */ + emit_byte(0x0f); + emit_byte(0xaf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) +{ + emit_byte(0x88); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) +{ + int isebp=(baser==5)?0x40:0; + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + + emit_byte(0x8b); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x8a); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + + isebp=(baser==5)?0x40:0; + + emit_byte(0x89); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x88); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x89); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x88); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8b); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8a); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) +{ + int fi; + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: + jit_abort("Bad factor %d in mov_l_rm_indexed!",factor); + } + emit_byte(0x8b); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) +{ + int fi; + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: + jit_abort("Bad factor %d in mov_l_rm_indexed!",factor); + } + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cond); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); + } + else { /* replacement using branch and mov */ + int uncc=(cond^1); + emit_byte(0x70+uncc); + emit_byte(7); /* skip next 7 bytes if not cc=true */ + emit_byte(0x8b); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); + } +} +LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) +{ + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cond); + emit_byte(0x05+8*d); + emit_long(mem); + } + else { /* replacement using branch and mov */ + int uncc=(cond^1); + emit_byte(0x70+uncc); + emit_byte(6); /* skip next 6 bytes if not cc=true */ + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(mem); + } +} +LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x8b); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x8a); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) +{ + emit_byte(0x8b); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) +{ + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) +{ + emit_byte(0x8a); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0xc7); + emit_byte(0x40+d); + emit_byte(offset); + emit_long(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0xc7); + emit_byte(0x40+d); + emit_byte(offset); + emit_word(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0xc6); + emit_byte(0x40+d); + emit_byte(offset); + emit_byte(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x88); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x8d); + emit_byte(0x40+8*d+s); + emit_byte(offset); + } + else { + emit_byte(0x8d); + emit_byte(0x80+8*d+s); + emit_long(offset); + } +} +LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x8d); + emit_byte(0x44+8*d); + emit_byte(0x40*fi+8*index+s); + emit_byte(offset); + } + else { + emit_byte(0x8d); + emit_byte(0x84+8*d); + emit_byte(0x40*fi+8*index+s); + emit_long(offset); + } +} +LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) +{ + int isebp=(s==5)?0x40:0; + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8d); + emit_byte(0x04+8*d+isebp); + emit_byte(0x40*fi+8*index+s); + if (isebp) + emit_byte(0); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); + } + else { + emit_byte(0x89); + emit_byte(0x80+8*s+d); + emit_long(offset); + } +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x80+8*s+d); + emit_long(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x88); + emit_byte(0x40+8*s+d); + emit_byte(offset); + } + else { + emit_byte(0x88); + emit_byte(0x80+8*s+d); + emit_long(offset); + } +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) +{ + emit_byte(0x0f); + emit_byte(0xc8+r); +} +LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(0x08); +} +LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) +{ + emit_byte(0x89); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) +{ + emit_byte(0x89); + emit_byte(0x05+8*s); + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x05+8*s); + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) + +LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) +{ + emit_byte(0x88); + emit_byte(0x05+8*(s&0xf)); /* XXX this handles %ah case (defined as 0x10+4) and others */ + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) + +LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) +{ + emit_byte(0x8a); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) +{ + emit_byte(0xb8+d); + emit_long(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0xb8+d); + emit_word(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) +{ + emit_byte(0xb0+d); + emit_byte(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) + +LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) +{ + emit_byte(0x81); + emit_byte(0x15); + emit_long(d); + emit_long(s); +} +LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x05); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x05); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0x81); + emit_byte(0x05); + emit_long(d); + emit_word(s); +} +LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) +{ + emit_byte(0x80); + emit_byte(0x05); + emit_long(d); + emit_byte(s); +} +LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0xa9); + else { + emit_byte(0xf7); + emit_byte(0xc0+d); + } + emit_long(i); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) +{ + emit_byte(0x85); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x85); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) +{ + emit_byte(0x84); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) +{ + emit_byte(0x81); + emit_byte(0xf0+d); + emit_long(i); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x25); + else { + emit_byte(0x81); + emit_byte(0xe0+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x25); + else { + emit_byte(0x81); + emit_byte(0xe0+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) +{ + emit_byte(0x21); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x21); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) +{ + emit_byte(0x20); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x0d); + else { + emit_byte(0x81); + emit_byte(0xc8+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) +{ + emit_byte(0x09); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x09); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) +{ + emit_byte(0x08); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) +{ + emit_byte(0x11); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x11); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) +{ + emit_byte(0x10); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) +{ + emit_byte(0x01); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x01); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) +{ + emit_byte(0x00); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) +{ + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x2d); + else { + emit_byte(0x81); + emit_byte(0xe8+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x2c); + else { + emit_byte(0x80); + emit_byte(0xe8+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) +{ + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x05); + else { + emit_byte(0x81); + emit_byte(0xc0+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x05); + else { + emit_byte(0x81); + emit_byte(0xc0+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x04); + else { + emit_byte(0x80); + emit_byte(0xc0+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) + +LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) +{ + emit_byte(0x19); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x19); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) +{ + emit_byte(0x18); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) +{ + emit_byte(0x29); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x29); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) +{ + emit_byte(0x28); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) +{ + emit_byte(0x39); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xf8+r); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(r)) + emit_byte(0x3d); + else { + emit_byte(0x81); + emit_byte(0xf8+r); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x39); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) +{ + emit_byte(0x80); + emit_byte(0x3d); + emit_long(d); + emit_byte(s); +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x3c); + else { + emit_byte(0x80); + emit_byte(0xf8+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) +{ + emit_byte(0x38); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) + +LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + emit_byte(0x39); + emit_byte(0x04+8*d); + emit_byte(5+8*index+0x40*fi); + emit_long(offset); +} +LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) +{ + emit_byte(0x31); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x31); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) +{ + emit_byte(0x30); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x2d); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x2d); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x3d); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x3d); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) +{ + emit_byte(0x87); + emit_byte(0xc0+8*r1+r2); +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) +{ + emit_byte(0x86); + emit_byte(0xc0+8*(r1&0xf)+(r2&0xf)); /* XXX this handles upper-halves registers (e.g. %ah defined as 0x10+4) */ +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +/************************************************************************* + * FIXME: mem access modes probably wrong * + *************************************************************************/ + +LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) +{ + emit_byte(0x9c); +} +LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) + +LOWFUNC(WRITE,READ,0,raw_popfl,(void)) +{ + emit_byte(0x9d); +} +LENDFUNC(WRITE,READ,0,raw_popfl,(void)) + +/* Generate floating-point instructions */ +static inline void x86_fadd_m(MEMR s) +{ + emit_byte(0xdc); + emit_byte(0x05); + emit_long(s); +} + +#endif + +/************************************************************************* + * Unoptimizable stuff --- jump * + *************************************************************************/ + +static inline void raw_call_r(R4 r) +{ +#if USE_NEW_RTASM + CALLsr(r); +#else + emit_byte(0xff); + emit_byte(0xd0+r); +#endif +} + +static inline void raw_call_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) +{ +#if USE_NEW_RTASM + ADDR32 CALLsm(base, X86_NOREG, r, m); +#else + int mu; + switch(m) { + case 1: mu=0; break; + case 2: mu=1; break; + case 4: mu=2; break; + case 8: mu=3; break; + default: abort(); + } + emit_byte(0xff); + emit_byte(0x14); + emit_byte(0x05+8*r+0x40*mu); + emit_long(base); +#endif +} + +static inline void raw_jmp_r(R4 r) +{ +#if USE_NEW_RTASM + JMPsr(r); +#else + emit_byte(0xff); + emit_byte(0xe0+r); +#endif +} + +static inline void raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) +{ +#if USE_NEW_RTASM + ADDR32 JMPsm(base, X86_NOREG, r, m); +#else + int mu; + switch (m) { + case 1: mu=0; break; + case 2: mu=1; break; + case 4: mu=2; break; + case 8: mu=3; break; + default: abort(); + } + emit_byte(0xff); + emit_byte(0x24); + emit_byte(0x05+8*r+0x40*mu); + emit_long(base); +#endif +} + +static inline void raw_jmp_m(uae_u32 base) +{ + emit_byte(0xff); + emit_byte(0x25); + emit_long(base); +} + + +static inline void raw_call(uae_u32 t) +{ +#if USE_NEW_RTASM + ADDR32 CALLm(t); +#else + emit_byte(0xe8); + emit_long(t-(uintptr)target-4); +#endif +} + +static inline void raw_jmp(uae_u32 t) +{ +#if USE_NEW_RTASM + ADDR32 JMPm(t); +#else + emit_byte(0xe9); + emit_long(t-(uintptr)target-4); +#endif +} + +static inline void raw_jl(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x8c); + emit_long(t-(uintptr)target-4); +} + +static inline void raw_jz(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x84); + emit_long(t-(uintptr)target-4); +} + +static inline void raw_jnz(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x85); + emit_long(t-(uintptr)target-4); +} + +static inline void raw_jnz_l_oponly(void) +{ + emit_byte(0x0f); + emit_byte(0x85); +} + +static inline void raw_jcc_l_oponly(int cc) +{ + emit_byte(0x0f); + emit_byte(0x80+cc); +} + +static inline void raw_jnz_b_oponly(void) +{ + emit_byte(0x75); +} + +static inline void raw_jz_b_oponly(void) +{ + emit_byte(0x74); +} + +static inline void raw_jcc_b_oponly(int cc) +{ + emit_byte(0x70+cc); +} + +static inline void raw_jmp_l_oponly(void) +{ + emit_byte(0xe9); +} + +static inline void raw_jmp_b_oponly(void) +{ + emit_byte(0xeb); +} + +static inline void raw_ret(void) +{ + emit_byte(0xc3); +} + +static inline void raw_emit_nop(void) +{ + emit_byte(0x90); +} + +static inline void raw_emit_nop_filler(int nbytes) +{ + +#if defined(CPU_x86_64) + /* The recommended way to pad 64bit code is to use NOPs preceded by + maximally four 0x66 prefixes. Balance the size of nops. */ + static const uae_u8 prefixes[4] = { 0x66, 0x66, 0x66, 0x66 }; + if (nbytes == 0) + return; + + int i; + int nnops = (nbytes + 3) / 4; + int len = nbytes / nnops; + int remains = nbytes - nnops * len; + + for (i = 0; i < remains; i++) { + emit_block(prefixes, len); + raw_emit_nop(); + } + for (; i < nnops; i++) { + emit_block(prefixes, len - 1); + raw_emit_nop(); + } +#else + /* Source: GNU Binutils 2.12.90.0.15 */ + /* Various efficient no-op patterns for aligning code labels. + Note: Don't try to assemble the instructions in the comments. + 0L and 0w are not legal. */ + static const uae_u8 f32_1[] = + {0x90}; /* nop */ + static const uae_u8 f32_2[] = + {0x89,0xf6}; /* movl %esi,%esi */ + static const uae_u8 f32_3[] = + {0x8d,0x76,0x00}; /* leal 0(%esi),%esi */ + static const uae_u8 f32_4[] = + {0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ + static const uae_u8 f32_5[] = + {0x90, /* nop */ + 0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ + static const uae_u8 f32_6[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00}; /* leal 0L(%esi),%esi */ + static const uae_u8 f32_7[] = + {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ + static const uae_u8 f32_8[] = + {0x90, /* nop */ + 0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ + static const uae_u8 f32_9[] = + {0x89,0xf6, /* movl %esi,%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_10[] = + {0x8d,0x76,0x00, /* leal 0(%esi),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_11[] = + {0x8d,0x74,0x26,0x00, /* leal 0(%esi,1),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_12[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ + 0x8d,0xbf,0x00,0x00,0x00,0x00}; /* leal 0L(%edi),%edi */ + static const uae_u8 f32_13[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_14[] = + {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00, /* leal 0L(%esi,1),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_15[] = + {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ + 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; + static const uae_u8 f32_16[] = + {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ + 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; + static const uae_u8 *const f32_patt[] = { + f32_1, f32_2, f32_3, f32_4, f32_5, f32_6, f32_7, f32_8, + f32_9, f32_10, f32_11, f32_12, f32_13, f32_14, f32_15 + }; + + int nloops = nbytes / 16; + while (nloops-- > 0) + emit_block(f32_16, sizeof(f32_16)); + + nbytes %= 16; + if (nbytes) + emit_block(f32_patt[nbytes - 1], nbytes); +#endif +} + + +/************************************************************************* + * Flag handling, to and fro UAE flag register * + *************************************************************************/ + +static inline void raw_flags_evicted(int r) +{ + //live.state[FLAGTMP].status=CLEAN; + live.state[FLAGTMP].status=INMEM; + live.state[FLAGTMP].realreg=-1; + /* We just "evicted" FLAGTMP. */ + if (live.nat[r].nholds!=1) { + /* Huh? */ + abort(); + } + live.nat[r].nholds=0; +} + +#define FLAG_NREG1_FLAGREG 0 /* Set to -1 if any register will do */ +static inline void raw_flags_to_reg_FLAGREG(int r) +{ + raw_lahf(0); /* Most flags in AH */ + //raw_setcc(r,0); /* V flag in AL */ + raw_setcc_m((uintptr)live.state[FLAGTMP].mem,0); + +#if 1 /* Let's avoid those nasty partial register stalls */ + //raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,r); + raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,AH_INDEX); + raw_flags_evicted(r); +#endif +} + +#define FLAG_NREG2_FLAGREG 0 /* Set to -1 if any register will do */ +static inline void raw_reg_to_flags_FLAGREG(int r) +{ + raw_cmp_b_ri(r,-127); /* set V */ + raw_sahf(0); +} + +#define FLAG_NREG3_FLAGREG 0 /* Set to -1 if any register will do */ +static __inline__ void raw_flags_set_zero_FLAGREG(int s, int tmp) +{ + raw_mov_l_rr(tmp,s); + raw_lahf(s); /* flags into ah */ + raw_and_l_ri(s,0xffffbfff); + raw_and_l_ri(tmp,0x00004000); + raw_xor_l_ri(tmp,0x00004000); + raw_or_l(s,tmp); + raw_sahf(s); +} + +static inline void raw_flags_init_FLAGREG(void) { } + +#define FLAG_NREG1_FLAGSTK -1 /* Set to -1 if any register will do */ +static inline void raw_flags_to_reg_FLAGSTK(int r) +{ + raw_pushfl(); + raw_pop_l_r(r); + raw_mov_l_mr((uintptr)live.state[FLAGTMP].mem,r); + raw_flags_evicted(r); +} + +#define FLAG_NREG2_FLAGSTK -1 /* Set to -1 if any register will do */ +static inline void raw_reg_to_flags_FLAGSTK(int r) +{ + raw_push_l_r(r); + raw_popfl(); +} + +#define FLAG_NREG3_FLAGSTK -1 /* Set to -1 if any register will do */ +static inline void raw_flags_set_zero_FLAGSTK(int s, int tmp) +{ + raw_mov_l_rr(tmp,s); + raw_pushfl(); + raw_pop_l_r(s); + raw_and_l_ri(s,0xffffffbf); + raw_and_l_ri(tmp,0x00000040); + raw_xor_l_ri(tmp,0x00000040); + raw_or_l(s,tmp); + raw_push_l_r(s); + raw_popfl(); +} + +static inline void raw_flags_init_FLAGSTK(void) { } + +#if defined(CPU_x86_64) +/* Try to use the LAHF/SETO method on x86_64 since it is faster. + This can't be the default because some older CPUs don't support + LAHF/SAHF in long mode. */ +static int FLAG_NREG1_FLAGGEN = 0; +static inline void raw_flags_to_reg_FLAGGEN(int r) +{ + if (have_lahf_lm) { + // NOTE: the interpreter uses the normal EFLAGS layout + // pushf/popf CF(0) ZF( 6) SF( 7) OF(11) + // sahf/lahf CF(8) ZF(14) SF(15) OF( 0) + assert(r == 0); + raw_setcc(r,0); /* V flag in AL */ + raw_lea_l_r_scaled(0,0,8); /* move it to its EFLAGS location */ + raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,0); + raw_lahf(0); /* most flags in AH */ + raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,AH_INDEX); + raw_flags_evicted(r); + } + else + raw_flags_to_reg_FLAGSTK(r); +} + +static int FLAG_NREG2_FLAGGEN = 0; +static inline void raw_reg_to_flags_FLAGGEN(int r) +{ + if (have_lahf_lm) { + raw_xchg_b_rr(0,AH_INDEX); + raw_cmp_b_ri(r,-120); /* set V */ + raw_sahf(0); + } + else + raw_reg_to_flags_FLAGSTK(r); +} + +static int FLAG_NREG3_FLAGGEN = 0; +static inline void raw_flags_set_zero_FLAGGEN(int s, int tmp) +{ + if (have_lahf_lm) + raw_flags_set_zero_FLAGREG(s, tmp); + else + raw_flags_set_zero_FLAGSTK(s, tmp); +} + +static inline void raw_flags_init_FLAGGEN(void) +{ + if (have_lahf_lm) { + FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGREG; + FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGREG; + FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGREG; + } + else { + FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGSTK; + FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGSTK; + FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGSTK; + } +} +#endif + +#ifdef SAHF_SETO_PROFITABLE +#define FLAG_SUFFIX FLAGREG +#elif defined CPU_x86_64 +#define FLAG_SUFFIX FLAGGEN +#else +#define FLAG_SUFFIX FLAGSTK +#endif + +#define FLAG_GLUE_2(x, y) x ## _ ## y +#define FLAG_GLUE_1(x, y) FLAG_GLUE_2(x, y) +#define FLAG_GLUE(x) FLAG_GLUE_1(x, FLAG_SUFFIX) + +#define raw_flags_init FLAG_GLUE(raw_flags_init) +#define FLAG_NREG1 FLAG_GLUE(FLAG_NREG1) +#define raw_flags_to_reg FLAG_GLUE(raw_flags_to_reg) +#define FLAG_NREG2 FLAG_GLUE(FLAG_NREG2) +#define raw_reg_to_flags FLAG_GLUE(raw_reg_to_flags) +#define FLAG_NREG3 FLAG_GLUE(FLAG_NREG3) +#define raw_flags_set_zero FLAG_GLUE(raw_flags_set_zero) + +/* Apparently, there are enough instructions between flag store and + flag reload to avoid the partial memory stall */ +static inline void raw_load_flagreg(uae_u32 target, uae_u32 r) +{ +#if 1 + raw_mov_l_rm(target,(uintptr)live.state[r].mem); +#else + raw_mov_b_rm(target,(uintptr)live.state[r].mem); + raw_mov_b_rm(target+4,((uintptr)live.state[r].mem)+1); +#endif +} + +#ifdef UAE +/* FLAGX is word-sized */ +#else +/* FLAGX is byte sized, and we *do* write it at that size */ +#endif +static inline void raw_load_flagx(uae_u32 target, uae_u32 r) +{ +#ifdef UAE + if (live.nat[target].canword) +#else + if (live.nat[target].canbyte) + raw_mov_b_rm(target,(uintptr)live.state[r].mem); + else if (live.nat[target].canword) +#endif + raw_mov_w_rm(target,(uintptr)live.state[r].mem); + else + raw_mov_l_rm(target,(uintptr)live.state[r].mem); +} + +static inline void raw_dec_sp(int off) +{ + if (off) { +#ifdef CPU_x86_64 + emit_byte(0x48); /* REX prefix */ +#endif + raw_sub_l_ri(ESP_INDEX,off); + } +} + +static inline void raw_inc_sp(int off) +{ + if (off) { +#ifdef CPU_x86_64 + emit_byte(0x48); /* REX prefix */ +#endif + raw_add_l_ri(ESP_INDEX,off); + } +} + +static inline void raw_push_regs_to_preserve(void) { + for (int i=N_REGS;i--;) { + if (need_to_preserve[i]) + raw_push_l_r(i); + } +} + +static inline void raw_pop_preserved_regs(void) { + for (int i=0;ix86_vendor_id; + + if (!strcmp(v, "GenuineIntel")) + c->x86_vendor = X86_VENDOR_INTEL; + else if (!strcmp(v, "AuthenticAMD")) + c->x86_vendor = X86_VENDOR_AMD; + else if (!strcmp(v, "CyrixInstead")) + c->x86_vendor = X86_VENDOR_CYRIX; + else if (!strcmp(v, "Geode by NSC")) + c->x86_vendor = X86_VENDOR_NSC; + else if (!strcmp(v, "UMC UMC UMC ")) + c->x86_vendor = X86_VENDOR_UMC; + else if (!strcmp(v, "CentaurHauls")) + c->x86_vendor = X86_VENDOR_CENTAUR; + else if (!strcmp(v, "NexGenDriven")) + c->x86_vendor = X86_VENDOR_NEXGEN; + else if (!strcmp(v, "RiseRiseRise")) + c->x86_vendor = X86_VENDOR_RISE; + else if (!strcmp(v, "GenuineTMx86") || !strcmp(v, "TransmetaCPU")) + c->x86_vendor = X86_VENDOR_TRANSMETA; + else + c->x86_vendor = X86_VENDOR_UNKNOWN; +} + +/* + * Generic CPUID function + * clear %ecx since some cpus (Cyrix MII) do not set or clear %ecx + * resulting in stale register contents being returned. + */ +/* Some CPUID calls want 'count' to be placed in ecx */ +#ifdef __GNUC__ +static void cpuid_count(uae_u32 op, uae_u32 count, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) +{ + uae_u32 _eax, _ebx, _ecx, _edx; + _eax = op; + _ecx = count; + __asm__ __volatile__( + " movl %0,%%eax \n" + " movl %2,%%ecx \n" + " cpuid \n" + " movl %%eax,%0 \n" + " movl %%ebx,%1 \n" + " movl %%ecx,%2 \n" + " movl %%edx,%3 \n" + : "+m" (_eax), + "=m" (_ebx), + "+m" (_ecx), + "=m" (_edx) + : + : "eax", "ebx", "ecx", "edx"); + *eax = _eax; + *ebx = _ebx; + *ecx = _ecx; + *edx = _edx; +} +#endif + +#ifdef _MSC_VER +#include +static void cpuid_count(uae_u32 op, uae_u32 count, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) +{ + int cpuinfo[4]; + cpuinfo[0] = op; + cpuinfo[1] = 0; + cpuinfo[2] = count; + cpuinfo[3] = 0; + __cpuidex(cpuinfo, op, count); + *eax = cpuinfo[0]; + *ebx = cpuinfo[1]; + *ecx = cpuinfo[2]; + *edx = cpuinfo[3]; +} +#endif + +static void +cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) +{ + cpuid_count(op, 0, eax, ebx, ecx, edx); +} + +static void +raw_init_cpu(void) +{ + struct cpuinfo_x86 *c = &cpuinfo; + uae_u32 dummy; + + /* Defaults */ + c->x86_processor = X86_PROCESSOR_max; + c->x86_vendor = X86_VENDOR_UNKNOWN; + c->cpuid_level = -1; /* CPUID not detected */ + c->x86_model = c->x86_mask = 0; /* So far unknown... */ + c->x86_vendor_id[0] = '\0'; /* Unset */ + c->x86_hwcap = 0; +#ifdef CPU_x86_64 + c->x86_clflush_size = 64; +#else + c->x86_clflush_size = 32; +#endif + + /* Get vendor name */ + c->x86_vendor_id[12] = '\0'; + cpuid(0x00000000, + (uae_u32 *)&c->cpuid_level, + (uae_u32 *)&c->x86_vendor_id[0], + (uae_u32 *)&c->x86_vendor_id[8], + (uae_u32 *)&c->x86_vendor_id[4]); + x86_get_cpu_vendor(c); + + /* Intel-defined flags: level 0x00000001 */ + c->x86_brand_id = 0; + if ( c->cpuid_level >= 0x00000001 ) { + uae_u32 tfms, brand_id; + cpuid(0x00000001, &tfms, &brand_id, &dummy, &c->x86_hwcap); + c->x86 = (tfms >> 8) & 15; + if (c->x86 == 0xf) + c->x86 += (tfms >> 20) & 0xff; /* extended family */ + c->x86_model = (tfms >> 4) & 15; + if (c->x86_model == 0xf) + c->x86_model |= (tfms >> 12) & 0xf0; /* extended model */ + c->x86_brand_id = brand_id & 0xff; + c->x86_mask = tfms & 15; + if (c->x86_hwcap & (1 << 19)) + { + c->x86_clflush_size = ((brand_id >> 8) & 0xff) * 8; + } + } else { + /* Have CPUID level 0 only - unheard of */ + c->x86 = 4; + } + + /* AMD-defined flags: level 0x80000001 */ + uae_u32 xlvl; + cpuid(0x80000000, &xlvl, &dummy, &dummy, &dummy); + if ( (xlvl & 0xffff0000) == 0x80000000 ) { + if ( xlvl >= 0x80000001 ) { + uae_u32 features, extra_features; + cpuid(0x80000001, &dummy, &dummy, &extra_features, &features); + if (features & (1 << 29)) { + /* Assume x86-64 if long mode is supported */ + c->x86_processor = X86_PROCESSOR_X86_64; + } + if (extra_features & (1 << 0)) + have_lahf_lm = true; + } + } + + /* Canonicalize processor ID */ + switch (c->x86) { + case 3: + c->x86_processor = X86_PROCESSOR_I386; + break; + case 4: + c->x86_processor = X86_PROCESSOR_I486; + break; + case 5: + if (c->x86_vendor == X86_VENDOR_AMD) + c->x86_processor = X86_PROCESSOR_K6; + else + c->x86_processor = X86_PROCESSOR_PENTIUM; + break; + case 6: + if (c->x86_vendor == X86_VENDOR_AMD) + c->x86_processor = X86_PROCESSOR_ATHLON; + else + c->x86_processor = X86_PROCESSOR_PENTIUMPRO; + break; + case 15: + if (c->x86_processor == X86_PROCESSOR_max) { + switch (c->x86_vendor) { + case X86_VENDOR_INTEL: + c->x86_processor = X86_PROCESSOR_PENTIUM4; + break; + case X86_VENDOR_AMD: + /* Assume a 32-bit Athlon processor if not in long mode */ + c->x86_processor = X86_PROCESSOR_ATHLON; + break; + } + } + break; + } + if (c->x86_processor == X86_PROCESSOR_max) { + c->x86_processor = X86_PROCESSOR_I386; + jit_log("Error: unknown processor type"); + jit_log(" Family : %d", c->x86); + jit_log(" Model : %d", c->x86_model); + jit_log(" Mask : %d", c->x86_mask); + jit_log(" Vendor : %s [%d]", c->x86_vendor_id, c->x86_vendor); + if (c->x86_brand_id) + { + jit_log(" BrandID : %02x", c->x86_brand_id); + } + } + + /* Have CMOV support? */ + have_cmov = (c->x86_hwcap & (1 << 15)) != 0; +#if defined(CPU_x86_64) + if (!have_cmov) { + jit_abort("x86-64 implementations are bound to have CMOV!"); + } +#endif + + c->x86_has_xmm2 = (c->x86_hwcap & (1 << 26)) != 0; + + /* Can the host CPU suffer from partial register stalls? */ + // non-RAT_STALL mode is currently broken + have_rat_stall = true; //(c->x86_vendor == X86_VENDOR_INTEL); +#if 0 + /* It appears that partial register writes are a bad idea even on + AMD K7 cores, even though they are not supposed to have the + dreaded rat stall. Why? Anyway, that's why we lie about it ;-) */ + if (c->x86_processor == X86_PROCESSOR_ATHLON) + have_rat_stall = true; +#endif + + /* Alignments */ + if (tune_alignment) { + align_loops = x86_alignments[c->x86_processor].align_loop; + align_jumps = x86_alignments[c->x86_processor].align_jump; + } + + jit_log(" : Max CPUID level=%d Processor is %s [%s]", + c->cpuid_level, c->x86_vendor_id, + x86_processor_string_table[c->x86_processor]); + + raw_flags_init(); +} + +#ifndef UAE +static void __attribute_noinline__ prevent_redzone_use(void) {} + +static bool target_check_bsf(void) +{ + bool mismatch = false; + for (int g_ZF = 0; g_ZF <= 1; g_ZF++) { + for (int g_CF = 0; g_CF <= 1; g_CF++) { + for (int g_OF = 0; g_OF <= 1; g_OF++) { + for (int g_SF = 0; g_SF <= 1; g_SF++) { + for (int value = -1; value <= 1; value++) { + uintptr flags = (g_SF << 7) | (g_OF << 11) | (g_ZF << 6) | g_CF; + intptr tmp = value; + prevent_redzone_use(); + __asm__ __volatile__ ("push %0; popf; bsf %1,%1; pushf; pop %0" + : "+r" (flags), "+r" (tmp) : : "cc"); + int OF = (flags >> 11) & 1; + int SF = (flags >> 7) & 1; + int ZF = (flags >> 6) & 1; + int CF = flags & 1; + tmp = (value == 0); + if (ZF != tmp || SF != g_SF || OF != g_OF || CF != g_CF) + mismatch = true; + } + } + } + } + } + if (mismatch) + { + jit_log(" : Target CPU defines all flags on BSF instruction"); + } + return !mismatch; +} +#endif + +/************************************************************************* + * FPU stuff * + *************************************************************************/ + + +static inline void raw_fp_init(void) +{ + int i; + + for (i=0;i1) { + emit_byte(0x9b); + emit_byte(0xdb); + emit_byte(0xe3); + live.tos=-1; + } +#endif + while (live.tos>=1) { + emit_byte(0xde); + emit_byte(0xd9); + live.tos-=2; + } + while (live.tos>=0) { + emit_byte(0xdd); + emit_byte(0xd8); + live.tos--; + } + raw_fp_init(); +} + +static inline void make_tos(int r) +{ + int p,q; + + if (live.spos[r]<0) { /* Register not yet on stack */ + emit_byte(0xd9); + emit_byte(0xe8); /* Push '1' on the stack, just to grow it */ + live.tos++; + live.spos[r]=live.tos; + live.onstack[live.tos]=r; + return; + } + /* Register is on stack */ + if (live.tos==live.spos[r]) + return; + p=live.spos[r]; + q=live.onstack[live.tos]; + + emit_byte(0xd9); + emit_byte(0xc8+live.tos-live.spos[r]); /* exchange it with top of stack */ + live.onstack[live.tos]=r; + live.spos[r]=live.tos; + live.onstack[p]=q; + live.spos[q]=p; +} + +static inline void make_tos2(int r, int r2) +{ + int q; + + make_tos(r2); /* Put the reg that's supposed to end up in position2 on top */ + + if (live.spos[r]<0) { /* Register not yet on stack */ + make_tos(r); /* This will extend the stack */ + return; + } + /* Register is on stack */ + emit_byte(0xd9); + emit_byte(0xc9); /* Move r2 into position 2 */ + + q=live.onstack[live.tos-1]; + live.onstack[live.tos]=q; + live.spos[q]=live.tos; + live.onstack[live.tos-1]=r2; + live.spos[r2]=live.tos-1; + + make_tos(r); /* And r into 1 */ +} + +static inline int stackpos(int r) +{ + if (live.spos[r]<0) + abort(); + if (live.tos=0) { + /* source is on top of stack, and we already have the dest */ + int dd=stackpos(d); + emit_byte(0xdd); + emit_byte(0xd0+dd); + } + else { + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source on tos */ + tos_make(d); /* store to destination, pop if necessary */ + } +} +LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) + +LOWFUNC(NONE,READ,2,raw_fldcw_m_indexed,(R4 index, IMM base)) +{ + x86_64_prefix(true, false, NULL, NULL, &index); + emit_byte(0xd9); + emit_byte(0xa8 + index); + emit_long(base); +} +LENDFUNC(NONE,READ,2,raw_fldcw_m_indexed,(R4 index, IMM base)) + +LOWFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xfa); /* take square root */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfa); /* take square root */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe1); /* take fabs */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xe1); /* take fabs */ + } +} +LENDFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xfc); /* take frndint */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfc); /* take frndint */ + } +} +LENDFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xff); /* take cos */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xff); /* take cos */ + } +} +LENDFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xfe); /* fsin sin(x) */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfe); /* fsin y=sin(x) */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) + +static const double one = 1; + +LOWFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x) */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* subtract rounded from original */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 */ + x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ + emit_byte(0xd9); + emit_byte(0xfd); /* and scale it */ + emit_byte(0xdd); + emit_byte(0xd9); /* take he rounded value off */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e log2(e) */ + emit_byte(0xde); + emit_byte(0xc9); /* fmulp --- multiply source by log2(e) */ + + emit_byte(0xd9); + emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ + emit_byte(0xd9); + emit_byte(0xfc); /* rndint */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* subtract rounded from original */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 */ + x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ + emit_byte(0xd9); + emit_byte(0xfd); /* and scale it */ + emit_byte(0xdd); + emit_byte(0xd9); /* take he rounded value off */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe8); /* push '1' */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two */ + emit_byte(0xd9); + emit_byte(0xf1); /* take 1*log2(x) */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) + + +LOWFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe0); /* take fchs */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xe0); /* take fchs */ + } +} +LENDFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xc0+ds); /* add source to dest*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xc0+ds); /* add source to dest*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xe8+ds); /* sub source from dest*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xe0+ds); /* sub src from dest */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos(d); + ds=stackpos(s); + + emit_byte(0xdd); + emit_byte(0xe0+ds); /* cmp dest with source*/ +} +LENDFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xc8+ds); /* mul dest by source*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xc8+ds); /* mul dest by source*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xf8+ds); /* div dest by source */ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xf0+ds); /* div dest by source*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos2(d,s); + ds=stackpos(s); + + if (ds!=1) { + jit_abort("Failed horribly in raw_frem_rr! ds is %d",ds); + } + emit_byte(0xd9); + emit_byte(0xf8); /* take rem from dest by source */ +} +LENDFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos2(d,s); + ds=stackpos(s); + + if (ds!=1) { + jit_abort("Failed horribly in raw_frem1_rr! ds is %d",ds); + } + emit_byte(0xd9); + emit_byte(0xf5); /* take rem1 from dest by source */ +} +LENDFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) + + +LOWFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) +{ + make_tos(r); + emit_byte(0xd9); /* ftst */ + emit_byte(0xe4); +} +LENDFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) + +LOWFUNC(NONE,NONE,2,raw_fetoxM1_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e log2(e) */ + emit_byte(0xd8); + emit_byte(0xc9); /* fmul x*log2(e) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy up */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub x*log2(e) - int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + emit_byte(0xd9); + emit_byte(0xfd); /* fscale ((2^frac(x))-1)*2^int(x*log2(e)) */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy & pop */ + if (s!=d) + tos_make(d); /* store y=(e^x)-1 */ +} +LENDFUNC(NONE,NONE,2,raw_fetoxM1_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_ftentox_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xe9); /* fldl2t log2(10) */ + emit_byte(0xd8); + emit_byte(0xc9); /* fmul x*log2(10) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy up */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x*log2(10)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub x*log2(10) - int(x*log2(10)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(10)) */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy & pop */ + if (s!=d) + tos_make(d); /* store y=10^x */ +} +LENDFUNC(NONE,NONE,2,raw_ftentox_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,3,raw_fsincos_rr,(FW d, FW c, FR s)) +{ + int ds; + + if (s==d) { + //write_log (_T("FSINCOS src = dest\n")); + make_tos(s); + emit_byte(0xd9); + emit_byte(0xfb); /* fsincos sin(x) push cos(x) */ + tos_make(c); /* store cos(x) to c */ + return; + } + + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xfb); /* fsincos sin(x) push cos(x) */ + if (live.spos[c]<0) { + if (live.spos[d]<0) { /* occupy both regs directly */ + live.tos++; + live.spos[d]=live.tos; + live.onstack[live.tos]=d; /* sin(x) comes first */ + live.tos++; + live.spos[c]=live.tos; + live.onstack[live.tos]=c; + } + else { + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap cos(x) with sin(x) */ + emit_byte(0xdd); /* store sin(x) to d & pop */ + emit_byte(0xd8+(live.tos+2)-live.spos[d]); + live.tos++; /* occupy a reg for cos(x) here */ + live.spos[c]=live.tos; + live.onstack[live.tos]=c; + } + } + else { + emit_byte(0xdd); /* store cos(x) to c & pop */ + emit_byte(0xd8+(live.tos+2)-live.spos[c]); + tos_make(d); /* store sin(x) to destination */ + } +} +LENDFUNC(NONE,NONE,3,raw_fsincos_rr,(FW d, FW c, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fscale_rr,(FRW d, FR s)) +{ + int ds; + + if (live.spos[d]==live.tos && live.spos[s]==live.tos-1) { + //write_log (_T("fscale found x in TOS-1 and y in TOS\n")); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale y*(2^x) */ + } + else { + make_tos(s); /* tos=x */ + ds=stackpos(d); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld y */ + emit_byte(0xd9); + emit_byte(0xfd); /* fscale y*(2^x) */ + tos_make(d); /* store y=y*(2^x) */ + } +} +LENDFUNC(NONE,NONE,2,raw_fscale_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_ftan_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xf2); /* fptan tan(x)=y/1.0 */ + emit_byte(0xdd); + emit_byte(0xd8); /* fstp pop 1.0 */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xf2); /* fptan tan(x)=y/1.0 */ + emit_byte(0xdd); + emit_byte(0xd8); /* fstp pop 1.0 */ + } +} +LENDFUNC(NONE,NONE,2,raw_ftan_rr,(FW d, FR s)) + +#ifdef CPU_x86_64 +#define REX64() emit_byte(0x48) +#else +#define REX64() +#endif + +LOWFUNC(NONE,NONE,1,raw_fcuts_r,(FRW r)) +{ + make_tos(r); /* TOS = r */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0xfc); /* add -4 to esp */ + emit_byte(0xd9); + emit_byte(0x1c); + emit_byte(0x24); /* fstp store r as SINGLE to [esp] and pop */ + emit_byte(0xd9); + emit_byte(0x04); + emit_byte(0x24); /* fld load r as SINGLE from [esp] */ + emit_byte(0x9b); /* let the CPU wait on FPU exceptions */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0x04); /* add +4 to esp */ +} +LENDFUNC(NONE,NONE,1,raw_fcuts_r,(FRW r)) + +LOWFUNC(NONE,NONE,1,raw_fcut_r,(FRW r)) +{ + make_tos(r); /* TOS = r */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0xf8); /* add -8 to esp */ + emit_byte(0xdd); + emit_byte(0x1c); + emit_byte(0x24); /* fstp store r as DOUBLE to [esp] and pop */ + emit_byte(0xdd); + emit_byte(0x04); + emit_byte(0x24); /* fld load r as DOUBLE from [esp] */ + emit_byte(0x9b); /* let the CPU wait on FPU exceptions */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0x08); /* add +8 to esp */ +} +LENDFUNC(NONE,NONE,1,raw_fcut_r,(FRW r)) + +LOWFUNC(NONE,NONE,2,raw_fgetexp_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xf4); /* fxtract exp push man */ + emit_byte(0xdd); + emit_byte(0xd8); /* fstp just pop man */ + tos_make(d); /* store exp to destination */ + } + else { + make_tos(d); /* tos=x=y */ + emit_byte(0xd9); + emit_byte(0xf4); /* fxtract exp push man */ + emit_byte(0xdd); + emit_byte(0xd8); /* fstp just pop man */ + } +} +LENDFUNC(NONE,NONE,2,raw_fgetexp_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fgetman_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xf4); /* fxtract exp push man */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy man up & pop */ + tos_make(d); /* store man to destination */ + } + else { + make_tos(d); /* tos=x=y */ + emit_byte(0xd9); + emit_byte(0xf4); /* fxtract exp push man */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy man up & pop */ + } +} +LENDFUNC(NONE,NONE,2,raw_fgetman_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_flogN_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xed); /* fldln2 logN(2) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap logN(2) with x */ + emit_byte(0xd9); + emit_byte(0xf1); /* fyl2x logN(2)*log2(x) */ + if (s!=d) + tos_make(d); /* store y=logN(x) */ +} +LENDFUNC(NONE,NONE,2,raw_flogN_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_flogNP1_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xed); /* fldln2 logN(2) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap logN(2) with x */ + emit_byte(0xd9); + emit_byte(0xf9); /* fyl2xp1 logN(2)*log2(x+1) */ + if (s!=d) + tos_make(d); /* store y=logN(x+1) */ +} +LENDFUNC(NONE,NONE,2,raw_flogNP1_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_flog10_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xec); /* fldlg2 log10(2) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap log10(2) with x */ + emit_byte(0xd9); + emit_byte(0xf1); /* fyl2x log10(2)*log2(x) */ + if (s!=d) + tos_make(d); /* store y=log10(x) */ +} +LENDFUNC(NONE,NONE,2,raw_flog10_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fasin_rr,(FW d, FR s)) +{ + int ds; + + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd8); + emit_byte(0xc8); /* fmul x*x */ + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xde); + emit_byte(0xe1); /* fsubrp 1 - (x^2) */ + emit_byte(0xd9); + emit_byte(0xfa); /* fsqrt sqrt(1-(x^2)) */ + emit_byte(0xd9); + emit_byte(0xc1+ds); /* fld x again */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap x with sqrt(1-(x^2)) */ + emit_byte(0xd9); + emit_byte(0xf3); /* fpatan atan(x/sqrt(1-(x^2))) & pop */ + tos_make(d); /* store y=asin(x) */ +} +LENDFUNC(NONE,NONE,2,raw_fasin_rr,(FW d, FR s)) + +static uae_u32 pihalf[] = {0x2168c234, 0xc90fdaa2, 0x3fff}; // LSB=0 to get acos(1)=0 + +LOWFUNC(NONE,NONE,2,raw_facos_rr,(FW d, FR s)) +{ + int ds; + + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd8); + emit_byte(0xc8); /* fmul x*x */ + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xde); + emit_byte(0xe1); /* fsubrp 1 - (x^2) */ + emit_byte(0xd9); + emit_byte(0xfa); /* fsqrt sqrt(1-(x^2)) */ + emit_byte(0xd9); + emit_byte(0xc1+ds); /* fld x again */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap x with sqrt(1-(x^2)) */ + emit_byte(0xd9); + emit_byte(0xf3); /* fpatan atan(x/sqrt(1-(x^2))) & pop */ + raw_fldt((uintptr) &pihalf); /* fld load pi/2 from pihalf */ + emit_byte(0xde); + emit_byte(0xe1); /* fsubrp pi/2 - asin(x) & pop */ + tos_make(d); /* store y=acos(x) */ +} +LENDFUNC(NONE,NONE,2,raw_facos_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fatan_rr,(FW d, FR s)) +{ + int ds; + + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xd9); + emit_byte(0xf3); /* fpatan atan(x)/1 & pop*/ + if (s!=d) + tos_make(d); /* store y=atan(x) */ +} +LENDFUNC(NONE,NONE,2,raw_fatan_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fatanh_rr,(FW d, FR s)) +{ + int ds; + + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xdc); + emit_byte(0xc1); /* fadd 1 + x */ + emit_byte(0xd8); + emit_byte(0xe2+ds); /* fsub 1 - x */ + emit_byte(0xde); + emit_byte(0xf9); /* fdivp (1+x)/(1-x) */ + emit_byte(0xd9); + emit_byte(0xed); /* fldl2e logN(2) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap logN(2) with (1+x)/(1-x) */ + emit_byte(0xd9); + emit_byte(0xf1); /* fyl2x logN(2)*log2((1+x)/(1-x)) pop */ + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -1.0 */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd9); + emit_byte(0xfd); /* fscale logN((1+x)/(1-x)) * 2^(-1) */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy & pop */ + tos_make(d); /* store y=atanh(x) */ +} +LENDFUNC(NONE,NONE,2,raw_fatanh_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fsinh_rr,(FW d, FR s)) +{ + int ds,tr; + + tr=live.onstack[live.tos+3]; + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e log2(e) */ + emit_byte(0xd8); + emit_byte(0xc9); /* fmul x*log2(e) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + if (tr>=0) { + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap with temp-reg */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0xf4); /* add -12 to esp */ + emit_byte(0xdb); + emit_byte(0x3c); + emit_byte(0x24); /* fstp store temp-reg to [esp] & pop */ + } + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xc0); /* fld -x*log2(e) again */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub -x*log2(e) - int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap e^-x with x*log2(e) in tr */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub x*log2(e) - int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy e^x & pop */ + if (tr>=0) { + emit_byte(0xdb); + emit_byte(0x2c); + emit_byte(0x24); /* fld load temp-reg from [esp] */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap temp-reg with e^-x in tr */ + emit_byte(0xde); + emit_byte(0xe9); /* fsubp (e^x)-(e^-x) */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0x0c); /* delayed add +12 to esp */ + } + else { + emit_byte(0xde); + emit_byte(0xe1); /* fsubrp (e^x)-(e^-x) */ + } + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -1.0 */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd9); + emit_byte(0xfd); /* fscale ((e^x)-(e^-x))/2 */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy & pop */ + if (s!=d) + tos_make(d); /* store y=sinh(x) */ +} +LENDFUNC(NONE,NONE,2,raw_fsinh_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fcosh_rr,(FW d, FR s)) +{ + int ds,tr; + + tr=live.onstack[live.tos+3]; + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e log2(e) */ + emit_byte(0xd8); + emit_byte(0xc9); /* fmul x*log2(e) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + if (tr>=0) { + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap with temp-reg */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0xf4); /* add -12 to esp */ + emit_byte(0xdb); + emit_byte(0x3c); + emit_byte(0x24); /* fstp store temp-reg to [esp] & pop */ + } + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xc0); /* fld -x*log2(e) again */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub -x*log2(e) - int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap e^-x with x*log2(e) in tr */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub x*log2(e) - int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy e^x & pop */ + if (tr>=0) { + emit_byte(0xdb); + emit_byte(0x2c); + emit_byte(0x24); /* fld load temp-reg from [esp] */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap temp-reg with e^-x in tr */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0x0c); /* delayed add +12 to esp */ + } + emit_byte(0xde); + emit_byte(0xc1); /* faddp (e^x)+(e^-x) */ + emit_byte(0xd9); + emit_byte(0xe8); /* fld 1.0 */ + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -1.0 */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd9); + emit_byte(0xfd); /* fscale ((e^x)+(e^-x))/2 */ + emit_byte(0xdd); + emit_byte(0xd9); /* fstp copy & pop */ + if (s!=d) + tos_make(d); /* store y=cosh(x) */ +} +LENDFUNC(NONE,NONE,2,raw_fcosh_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_ftanh_rr,(FW d, FR s)) +{ + int ds,tr; + + tr=live.onstack[live.tos+3]; + if (s==d) + make_tos(s); + else { + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* fld x */ + } + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e log2(e) */ + emit_byte(0xd8); + emit_byte(0xc9); /* fmul x*log2(e) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + if (tr>=0) { + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap with temp-reg */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0xf4); /* add -12 to esp */ + emit_byte(0xdb); + emit_byte(0x3c); + emit_byte(0x24); /* fstp store temp-reg to [esp] & pop */ + } + emit_byte(0xd9); + emit_byte(0xe0); /* fchs -x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xc0); /* fld -x*log2(e) again */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub -x*log2(e) - int(-x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap e^-x with x*log2(e) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy x*log2(e) */ + emit_byte(0xd9); + emit_byte(0xfc); /* frndint int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xc9); /* fxch swap */ + emit_byte(0xd8); + emit_byte(0xe1); /* fsub x*log2(e) - int(x*log2(e)) */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); + emit_byte(0xd9); + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x*log2(e)) */ + emit_byte(0xdd); + emit_byte(0xd1); /* fst copy e^x */ + emit_byte(0xd8); + emit_byte(0xc2); /* fadd (e^x)+(e^-x) */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap with e^-x */ + emit_byte(0xde); + emit_byte(0xe9); /* fsubp (e^x)-(e^-x) */ + if (tr>=0) { + emit_byte(0xdb); + emit_byte(0x2c); + emit_byte(0x24); /* fld load temp-reg from [esp] */ + emit_byte(0xd9); + emit_byte(0xca); /* fxch swap temp-reg with e^-x in tr */ + emit_byte(0xde); + emit_byte(0xf9); /* fdivp ((e^x)-(e^-x))/((e^x)+(e^-x)) */ + REX64(); + emit_byte(0x83); + emit_byte(0xc4); + emit_byte(0x0c); /* delayed add +12 to esp */ + } + else { + emit_byte(0xde); + emit_byte(0xf1); /* fdivrp ((e^x)-(e^-x))/((e^x)+(e^-x)) */ + } + if (s!=d) + tos_make(d); /* store y=tanh(x) */ +} +LENDFUNC(NONE,NONE,2,raw_ftanh_rr,(FW d, FR s)) + +/* %eax register is clobbered if target processor doesn't support fucomi */ +#define FFLAG_NREG_CLOBBER_CONDITION !have_cmov +#define FFLAG_NREG EAX_INDEX + +static inline void raw_fflags_into_flags(int r) +{ + int p; + + usereg(r); + p=stackpos(r); + + emit_byte(0xd9); + emit_byte(0xee); /* Push 0 */ + emit_byte(0xd9); + emit_byte(0xc9+p); /* swap top two around */ + if (have_cmov) { + // gb-- fucomi is for P6 cores only, not K6-2 then... + emit_byte(0xdb); + emit_byte(0xe9+p); /* fucomi them */ + } + else { + emit_byte(0xdd); + emit_byte(0xe1+p); /* fucom them */ + emit_byte(0x9b); + emit_byte(0xdf); + emit_byte(0xe0); /* fstsw ax */ + raw_sahf(0); /* sahf */ + } + emit_byte(0xdd); + emit_byte(0xd9+p); /* store value back, and get rid of 0 */ +} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h new file mode 100644 index 000000000..6743392d4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h @@ -0,0 +1,1996 @@ +/* + * compiler/codegen_x86.h - IA-32 and AMD64 code generator + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> IA-32 and AMD64 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * This file is derived from CCG, copyright 1999-2003 Ian Piumarta + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * 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 X86_RTASM_H +#define X86_RTASM_H + +/* NOTES + * + * o Best viewed on a 1024x768 screen with fixed-6x10 font ;-) + * + * TODO + * + * o Fix FIXMEs + * o i387 FPU instructions + * o SSE instructions + * o Optimize for cases where register numbers are not integral constants + */ + +/* --- Configuration ------------------------------------------------------- */ + +/* Define to settle a "flat" register set, i.e. different regno for + each size variant. */ +#ifndef X86_FLAT_REGISTERS +#define X86_FLAT_REGISTERS 1 +#endif + +/* Define to generate x86-64 code. */ +#ifndef X86_TARGET_64BIT +#define X86_TARGET_64BIT 0 +#endif + +/* Define to optimize ALU instructions. */ +#ifndef X86_OPTIMIZE_ALU +#define X86_OPTIMIZE_ALU 1 +#endif + +/* Define to optimize rotate/shift instructions. */ +#ifndef X86_OPTIMIZE_ROTSHI +#define X86_OPTIMIZE_ROTSHI 1 +#endif + +/* Define to optimize absolute addresses for RIP relative addressing. */ +#ifndef X86_RIP_RELATIVE_ADDR +#define X86_RIP_RELATIVE_ADDR 1 +#endif + + +/* --- Macros -------------------------------------------------------------- */ + +/* Functions used to emit code. + * + * x86_emit_byte(B) + * x86_emit_word(W) + * x86_emit_long(L) + */ + +/* Get pointer to current code + * + * x86_get_target() + */ + +/* Abort assembler, fatal failure. + * + * x86_emit_failure(MSG) + */ + +#define x86_emit_failure0(MSG) (x86_emit_failure(MSG),0) + + +/* --- Register set -------------------------------------------------------- */ + +enum { + X86_RIP = -2, +#if X86_FLAT_REGISTERS + X86_NOREG = 0, + X86_Reg8L_Base = 0x10, + X86_Reg8H_Base = 0x20, + X86_Reg16_Base = 0x30, + X86_Reg32_Base = 0x40, + X86_Reg64_Base = 0x50, + X86_RegMMX_Base = 0x60, + X86_RegXMM_Base = 0x70, +#else + X86_NOREG = -1, + X86_Reg8L_Base = 0, + X86_Reg8H_Base = 16, + X86_Reg16_Base = 0, + X86_Reg32_Base = 0, + X86_Reg64_Base = 0, + X86_RegMMX_Base = 0, + X86_RegXMM_Base = 0, +#endif +}; + +enum { + X86_AL = X86_Reg8L_Base, + X86_CL, X86_DL, X86_BL, + X86_SPL, X86_BPL, X86_SIL, X86_DIL, + X86_R8B, X86_R9B, X86_R10B, X86_R11B, + X86_R12B, X86_R13B, X86_R14B, X86_R15B, + X86_AH = X86_Reg8H_Base + 4, + X86_CH, X86_DH, X86_BH +}; + +enum { + X86_AX = X86_Reg16_Base, + X86_CX, X86_DX, X86_BX, + X86_SP, X86_BP, X86_SI, X86_DI, + X86_R8W, X86_R9W, X86_R10W, X86_R11W, + X86_R12W, X86_R13W, X86_R14W, X86_R15W +}; + +enum { + X86_EAX = X86_Reg32_Base, + X86_ECX, X86_EDX, X86_EBX, + X86_ESP, X86_EBP, X86_ESI, X86_EDI, + X86_R8D, X86_R9D, X86_R10D, X86_R11D, + X86_R12D, X86_R13D, X86_R14D, X86_R15D +}; + +enum { + X86_RAX = X86_Reg64_Base, + X86_RCX, X86_RDX, X86_RBX, + X86_RSP, X86_RBP, X86_RSI, X86_RDI, + X86_R8, X86_R9, X86_R10, X86_R11, + X86_R12, X86_R13, X86_R14, X86_R15 +}; + +enum { + X86_MM0 = X86_RegMMX_Base, + X86_MM1, X86_MM2, X86_MM3, + X86_MM4, X86_MM5, X86_MM6, X86_MM7, +}; + +enum { + X86_XMM0 = X86_RegXMM_Base, + X86_XMM1, X86_XMM2, X86_XMM3, + X86_XMM4, X86_XMM5, X86_XMM6, X86_XMM7, + X86_XMM8, X86_XMM9, X86_XMM10, X86_XMM11, + X86_XMM12, X86_XMM13, X86_XMM14, X86_XMM15 +}; + +/* Register control and access + * + * _r0P(R) Null register? + * _rIP(R) RIP register? + * _rXP(R) Extended register? + * + * _rC(R) Class of register (only valid if X86_FLAT_REGISTERS) + * _rR(R) Full register number + * _rN(R) Short register number for encoding + * + * _r1(R) 8-bit register ID + * _r2(R) 16-bit register ID + * _r4(R) 32-bit register ID + * _r8(R) 64-bit register ID + * _rM(R) MMX register ID + * _rX(R) XMM register ID + * _rA(R) Address register ID used for EA calculation + */ + +#define _r0P(R) ((int)(R) == (int)X86_NOREG) +#define _rIP(R) ((int)(R) == (int)X86_RIP) + +#if X86_FLAT_REGISTERS +#define _rC(R) ((R) & 0xf0) +#define _rR(R) ((R) & 0x0f) +#define _rN(R) ((R) & 0x07) +#define _rXP(R) ((R) > 0 && _rR(R) > 7) +#else +#define _rN(R) ((R) & 0x07) +#define _rR(R) (int(R)) +#define _rXP(R) (_rR(R) > 7 && _rR(R) < 16) +#endif + +#if !defined(_ASM_SAFETY) || ! X86_FLAT_REGISTERS +#define _r1(R) _rN(R) +#define _r2(R) _rN(R) +#define _r4(R) _rN(R) +#define _r8(R) _rN(R) +#define _rA(R) _rN(R) +#define _rM(R) _rN(R) +#define _rX(R) _rN(R) +#else +#define _r1(R) ( ((_rC(R) & (X86_Reg8L_Base | X86_Reg8H_Base)) != 0) ? _rN(R) : x86_emit_failure0( "8-bit register required")) +#define _r2(R) ( (_rC(R) == X86_Reg16_Base) ? _rN(R) : x86_emit_failure0("16-bit register required")) +#define _r4(R) ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("32-bit register required")) +#define _r8(R) ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("64-bit register required")) +#define _rA(R) ( X86_TARGET_64BIT ? \ + ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("not a valid 64-bit base/index expression")) : \ + ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("not a valid 32-bit base/index expression")) ) +#define _rM(R) ( (_rC(R) == X86_RegMMX_Base) ? _rN(R) : x86_emit_failure0("MMX register required")) +#define _rX(R) ( (_rC(R) == X86_RegXMM_Base) ? _rN(R) : x86_emit_failure0("SSE register required")) +#endif + +#define _rSP() (X86_TARGET_64BIT ? (int)X86_RSP : (int)X86_ESP) +#define _r1e8lP(R) (int(R) >= X86_SPL && int(R) <= X86_DIL) +#define _rbpP(R) (_rR(R) == _rR(X86_RBP)) +#define _rspP(R) (_rR(R) == _rR(X86_RSP)) +#define _rbp13P(R) (_rN(R) == _rN(X86_RBP)) +#define _rsp12P(R) (_rN(R) == _rN(X86_RSP)) + + +/* ========================================================================= */ +/* --- UTILITY ------------------------------------------------------------- */ +/* ========================================================================= */ + +typedef signed char _sc; +typedef unsigned char _uc; +typedef signed short _ss; +typedef unsigned short _us; +typedef signed int _sl; +typedef unsigned int _ul; + +#define _UC(X) ((_uc )(uintptr_t)(X)) +#define _US(X) ((_us )(uintptr_t)(X)) +#define _SL(X) ((_sl )(uintptr_t)(X)) +#define _UL(X) ((_ul )(uintptr_t)(X)) + +#define _PUC(X) ((_uc *)(X)) +#define _PUS(X) ((_us *)(X)) +#define _PSL(X) ((_sl *)(X)) +#define _PUL(X) ((_ul *)(X)) + +#undef _B +#undef _W +#undef _L +#undef _Q + +#define _B(B) x86_emit_byte((B)) +#define _W(W) x86_emit_word((W)) +#define _L(L) x86_emit_long((L)) +#define _Q(Q) x86_emit_quad((Q)) + +#define _MASK(N) ((unsigned)((1<<(N)))-1) +#define _siP(N,I) (!((((unsigned)(I))^(((unsigned)(I))<<1))&~_MASK(N))) +#define _uiP(N,I) (!(((unsigned)(I))&~_MASK(N))) +#define _suiP(N,I) (_siP(N,I) | _uiP(N,I)) + +#ifndef _ASM_SAFETY +#define _ck_s(W,I) (_UL(I) & _MASK(W)) +#define _ck_u(W,I) (_UL(I) & _MASK(W)) +#define _ck_su(W,I) (_UL(I) & _MASK(W)) +#define _ck_d(W,I) (_UL(I) & _MASK(W)) +#else +#define _ck_s(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "signed integer `"#I"' too large for "#W"-bit field")) +#define _ck_u(W,I) (_uiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0("unsigned integer `"#I"' too large for "#W"-bit field")) +#define _ck_su(W,I) (_suiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "integer `"#I"' too large for "#W"-bit field")) +#define _ck_d(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "displacement `"#I"' too large for "#W"-bit field")) +#endif + +#define _s0P(I) ((I)==0) +#define _s8P(I) _siP(8,I) +#define _s16P(I) _siP(16,I) +#define _u8P(I) _uiP(8,I) +#define _u16P(I) _uiP(16,I) + +#define _su8(I) _ck_su(8,I) +#define _su16(I) _ck_su(16,I) + +#define _s1(I) _ck_s( 1,I) +#define _s2(I) _ck_s( 2,I) +#define _s3(I) _ck_s( 3,I) +#define _s4(I) _ck_s( 4,I) +#define _s5(I) _ck_s( 5,I) +#define _s6(I) _ck_s( 6,I) +#define _s7(I) _ck_s( 7,I) +#define _s8(I) _ck_s( 8,I) +#define _s9(I) _ck_s( 9,I) +#define _s10(I) _ck_s(10,I) +#define _s11(I) _ck_s(11,I) +#define _s12(I) _ck_s(12,I) +#define _s13(I) _ck_s(13,I) +#define _s14(I) _ck_s(14,I) +#define _s15(I) _ck_s(15,I) +#define _s16(I) _ck_s(16,I) +#define _s17(I) _ck_s(17,I) +#define _s18(I) _ck_s(18,I) +#define _s19(I) _ck_s(19,I) +#define _s20(I) _ck_s(20,I) +#define _s21(I) _ck_s(21,I) +#define _s22(I) _ck_s(22,I) +#define _s23(I) _ck_s(23,I) +#define _s24(I) _ck_s(24,I) +#define _s25(I) _ck_s(25,I) +#define _s26(I) _ck_s(26,I) +#define _s27(I) _ck_s(27,I) +#define _s28(I) _ck_s(28,I) +#define _s29(I) _ck_s(29,I) +#define _s30(I) _ck_s(30,I) +#define _s31(I) _ck_s(31,I) +#define _u1(I) _ck_u( 1,I) +#define _u2(I) _ck_u( 2,I) +#define _u3(I) _ck_u( 3,I) +#define _u4(I) _ck_u( 4,I) +#define _u5(I) _ck_u( 5,I) +#define _u6(I) _ck_u( 6,I) +#define _u7(I) _ck_u( 7,I) +#define _u8(I) _ck_u( 8,I) +#define _u9(I) _ck_u( 9,I) +#define _u10(I) _ck_u(10,I) +#define _u11(I) _ck_u(11,I) +#define _u12(I) _ck_u(12,I) +#define _u13(I) _ck_u(13,I) +#define _u14(I) _ck_u(14,I) +#define _u15(I) _ck_u(15,I) +#define _u16(I) _ck_u(16,I) +#define _u17(I) _ck_u(17,I) +#define _u18(I) _ck_u(18,I) +#define _u19(I) _ck_u(19,I) +#define _u20(I) _ck_u(20,I) +#define _u21(I) _ck_u(21,I) +#define _u22(I) _ck_u(22,I) +#define _u23(I) _ck_u(23,I) +#define _u24(I) _ck_u(24,I) +#define _u25(I) _ck_u(25,I) +#define _u26(I) _ck_u(26,I) +#define _u27(I) _ck_u(27,I) +#define _u28(I) _ck_u(28,I) +#define _u29(I) _ck_u(29,I) +#define _u30(I) _ck_u(30,I) +#define _u31(I) _ck_u(31,I) + +/* ========================================================================= */ +/* --- ASSEMBLER ----------------------------------------------------------- */ +/* ========================================================================= */ + +#define _b00 0 +#define _b01 1 +#define _b10 2 +#define _b11 3 + +#define _b000 0 +#define _b001 1 +#define _b010 2 +#define _b011 3 +#define _b100 4 +#define _b101 5 +#define _b110 6 +#define _b111 7 + +#define _OFF4(D) (_UL(D) - _UL(x86_get_target())) +#define _CKD8(D) _ck_d(8, ((_uc) _OFF4(D)) ) + +#define _D8(D) (_B(0), ((*(_PUC(x86_get_target())-1))= _CKD8(D))) +#define _D32(D) (_L(0), ((*(_PUL(x86_get_target())-1))= _OFF4(D))) + +#ifndef _ASM_SAFETY +# define _M(M) (M) +# define _r(R) (R) +# define _m(M) (M) +# define _s(S) (S) +# define _i(I) (I) +# define _b(B) (B) +#else +# define _M(M) (((M)>3) ? x86_emit_failure0("internal error: mod = " #M) : (M)) +# define _r(R) (((R)>7) ? x86_emit_failure0("internal error: reg = " #R) : (R)) +# define _m(M) (((M)>7) ? x86_emit_failure0("internal error: r/m = " #M) : (M)) +# define _s(S) (((S)>3) ? x86_emit_failure0("internal error: memory scale = " #S) : (S)) +# define _i(I) (((I)>7) ? x86_emit_failure0("internal error: memory index = " #I) : (I)) +# define _b(B) (((B)>7) ? x86_emit_failure0("internal error: memory base = " #B) : (B)) +#endif + +#define _Mrm(Md,R,M) _B((_M(Md)<<6)|(_r(R)<<3)|_m(M)) +#define _SIB(Sc,I, B) _B((_s(Sc)<<6)|(_i(I)<<3)|_b(B)) + +#define _SCL(S) ((((S)==1) ? _b00 : \ + (((S)==2) ? _b01 : \ + (((S)==4) ? _b10 : \ + (((S)==8) ? _b11 : x86_emit_failure0("illegal scale: " #S)))))) + + +/* --- Memory subformats - urgh! ------------------------------------------- */ + +/* _r_D() is RIP addressing mode if X86_TARGET_64BIT, use _r_DSIB() instead */ +#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((long)(D))) +#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((long)(D))) +#define _r_0B( R, B ) (_Mrm(_b00,_rN(R),_rA(B)) ) +#define _r_0BIS(R, B,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)) ) +#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((long)(D))) +#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((long)(D))) +#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((long)(D))) +#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((long)(D))) +#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((long)(D))) + +#define _r_DB( R, D,B ) ((_s0P(D) && (!_rbp13P(B)) ? _r_0B (R, B ) : (_s8P(D) ? _r_1B( R,D,B ) : _r_4B( R,D,B )))) +#define _r_DBIS(R, D,B,I,S) ((_s0P(D) && (!_rbp13P(B)) ? _r_0BIS(R, B,I,S) : (_s8P(D) ? _r_1BIS(R,D,B,I,S) : _r_4BIS(R,D,B,I,S)))) + +/* Use RIP-addressing in 64-bit mode, if possible */ +#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && \ + ((uintptr)x86_get_target() + 4 + (O) - (D) <= 0xffffffff)) + +#define _r_X( R, D,B,I,S,O) (_r0P(I) ? (_r0P(B) ? (!X86_TARGET_64BIT ? _r_D(R,D) : \ + (_x86_RIP_addressing_possible(D, O) ? \ + _r_D(R, (D) - ((uintptr)x86_get_target() + 4 + (O))) : \ + _r_DSIB(R,D))) : \ + (_rIP(B) ? _r_D (R,D ) : \ + (_rsp12P(B) ? _r_DBIS(R,D,_rSP(),_rSP(),1) : \ + _r_DB (R,D, B )))) : \ + (_r0P(B) ? _r_4IS (R,D, I,S) : \ + (!_rspP(I) ? _r_DBIS(R,D, B, I,S) : \ + x86_emit_failure("illegal index register: %esp")))) + + +/* --- Instruction formats ------------------------------------------------- */ + +#define _m32only(X) (! X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 64-bit mode")) +#define _m64only(X) ( X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 32-bit mode")) +#define _m64(X) ( X86_TARGET_64BIT ? X : ((void)0) ) + +/* _format Opcd ModR/M dN(rB,rI,Sc) imm... */ + +#define _d16() ( _B(0x66 ) ) +#define _O( OP ) ( _B( OP ) ) +#define _Or( OP,R ) ( _B( (OP)|_r(R)) ) +#define _OO( OP ) ( _B((OP)>>8), _B( (uae_u8)(OP) ) ) +#define _OOr( OP,R ) ( _B((OP)>>8), _B( (OP)|_r(R)) ) +#define _Os( OP,B ) ( _s8P(B) ? _B(((OP)|_b10)) : _B(OP) ) +#define _sW( W ) ( _s8P(W) ? _B(W):_W(W) ) +#define _sL( L ) ( _s8P(L) ? _B(L):_L(L) ) +#define _sWO( W ) ( _s8P(W) ? 1 : 2 ) +#define _sLO( L ) ( _s8P(L) ? 1 : 4 ) +#define _O_B( OP ,B ) ( _O ( OP ) ,_B(B) ) +#define _O_W( OP ,W ) ( _O ( OP ) ,_W(W) ) +#define _O_L( OP ,L ) ( _O ( OP ) ,_L(L) ) +#define _O_D8( OP ,D ) ( _O ( OP ) ,_D8(D) ) +#define _O_D32( OP ,D ) ( _O ( OP ) ,_D32(D) ) +#define _OO_D32( OP ,D ) ( _OO ( OP ) ,_D32(D) ) +#define _Os_sW( OP ,W ) ( _Os ( OP,W) ,_sW(W) ) +#define _Os_sL( OP ,L ) ( _Os ( OP,L) ,_sL(L) ) +#define _O_W_B( OP ,W,B) ( _O ( OP ) ,_W(W),_B(B)) +#define _Or_B( OP,R ,B ) ( _Or ( OP,R) ,_B(B) ) +#define _Or_W( OP,R ,W ) ( _Or ( OP,R) ,_W(W) ) +#define _Or_L( OP,R ,L ) ( _Or ( OP,R) ,_L(L) ) +#define _Or_Q( OP,R ,Q ) ( _Or ( OP,R) ,_Q(Q) ) +#define _O_Mrm( OP ,MO,R,M ) ( _O ( OP ),_Mrm(MO,R,M ) ) +#define _OO_Mrm( OP ,MO,R,M ) ( _OO ( OP ),_Mrm(MO,R,M ) ) +#define _O_Mrm_B( OP ,MO,R,M ,B ) ( _O ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _O_Mrm_W( OP ,MO,R,M ,W ) ( _O ( OP ),_Mrm(MO,R,M ) ,_W(W) ) +#define _O_Mrm_L( OP ,MO,R,M ,L ) ( _O ( OP ),_Mrm(MO,R,M ) ,_L(L) ) +#define _OO_Mrm_B( OP ,MO,R,M ,B ) ( _OO ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _Os_Mrm_sW(OP ,MO,R,M ,W ) ( _Os ( OP,W),_Mrm(MO,R,M ),_sW(W) ) +#define _Os_Mrm_sL(OP ,MO,R,M ,L ) ( _Os ( OP,L),_Mrm(MO,R,M ),_sL(L) ) +#define _O_r_X( OP ,R ,MD,MB,MI,MS ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _OO_r_X( OP ,R ,MD,MB,MI,MS ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _O_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _O_r_X_W( OP ,R ,MD,MB,MI,MS,W ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,2) ,_W(W) ) +#define _O_r_X_L( OP ,R ,MD,MB,MI,MS,L ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,4) ,_L(L) ) +#define _OO_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _Os_r_X_sW(OP ,R ,MD,MB,MI,MS,W ) ( _Os ( OP,W),_r_X( R ,MD,MB,MI,MS,_sWO(W)),_sW(W)) +#define _Os_r_X_sL(OP ,R ,MD,MB,MI,MS,L ) ( _Os ( OP,L),_r_X( R ,MD,MB,MI,MS,_sLO(L)),_sL(L)) +#define _O_X_B( OP ,MD,MB,MI,MS,B ) ( _O_r_X_B( OP ,0 ,MD,MB,MI,MS ,B) ) +#define _O_X_W( OP ,MD,MB,MI,MS,W ) ( _O_r_X_W( OP ,0 ,MD,MB,MI,MS ,W) ) +#define _O_X_L( OP ,MD,MB,MI,MS,L ) ( _O_r_X_L( OP ,0 ,MD,MB,MI,MS ,L) ) + + +/* --- REX prefixes -------------------------------------------------------- */ + +#undef _VOID + +#define _VOID() ((void)0) +#define _BIT(X) (!!(X)) +#define _d64(W,R,X,B) (_B(0x40|(W)<<3|(R)<<2|(X)<<1|(B))) + +#define __REXwrxb(L,W,R,X,B) ((W|R|X|B) || (L) ? _d64(W,R,X,B) : _VOID()) +#define __REXwrx_(L,W,R,X,MR) (__REXwrxb(L,W,R,X,_BIT(_rIP(MR)?0:_rXP(MR)))) +#define __REXw_x_(L,W,R,X,MR) (__REXwrx_(L,W,_BIT(_rXP(R)),X,MR)) +#define __REX_reg(RR) (__REXwrxb(0,0,0,00,_BIT(_rXP(RR)))) +#define __REX_mem(MB,MI) (__REXwrxb(0,0,0,_BIT(_rXP(MI)),_BIT(_rXP(MB)))) + +// FIXME: can't mix new (SPL,BPL,SIL,DIL) with (AH,BH,CH,DH) +#define _REXBrr(RR,MR) _m64(__REXw_x_(_r1e8lP(RR)||_r1e8lP(MR),0,RR,0,MR)) +#define _REXBmr(MB,MI,RD) _m64(__REXw_x_(_r1e8lP(RD)||_r1e8lP(MB),0,RD,_BIT(_rXP(MI)),MB)) +#define _REXBrm(RS,MB,MI) _REXBmr(MB,MI,RS) + +#define _REXBLrr(RR,MR) _m64(__REXw_x_(_r1e8lP(MR),0,RR,0,MR)) +#define _REXLrr(RR,MR) _m64(__REXw_x_(0,0,RR,0,MR)) +#define _REXLmr(MB,MI,RD) _m64(__REXw_x_(0,0,RD,_BIT(_rXP(MI)),MB)) +#define _REXLrm(RS,MB,MI) _REXLmr(MB,MI,RS) +#define _REXLr(RR) _m64(__REX_reg(RR)) +#define _REXLm(MB,MI) _m64(__REX_mem(MB,MI)) + +#define _REXQrr(RR,MR) _m64only(__REXw_x_(0,1,RR,0,MR)) +#define _REXQmr(MB,MI,RD) _m64only(__REXw_x_(0,1,RD,_BIT(_rXP(MI)),MB)) +#define _REXQrm(RS,MB,MI) _REXQmr(MB,MI,RS) +#define _REXQr(RR) _m64only(__REX_reg(RR)) +#define _REXQm(MB,MI) _m64only(__REX_mem(MB,MI)) + + +/* ========================================================================= */ +/* --- Fully-qualified intrinsic instructions ------------------------------ */ +/* ========================================================================= */ + +/* OPCODE + i = immediate operand + * + r = register operand + * + m = memory operand (disp,base,index,scale) + * + sr/sm = a star preceding a register or memory + * + 0 = top of stack register (for FPU instructions) + * + * NOTE in x86-64 mode: a memory operand with only a valid + * displacement value will lead to the expect absolute mode. If + * RIP addressing is necessary, X86_RIP shall be used as the base + * register argument. + */ + +/* --- ALU instructions ---------------------------------------------------- */ + +enum { + X86_ADD = 0, + X86_OR = 1, + X86_ADC = 2, + X86_SBB = 3, + X86_AND = 4, + X86_SUB = 5, + X86_XOR = 6, + X86_CMP = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ALUBrr(OP,RS, RD) (_REXBrr(RS, RD), _O_Mrm (((OP) << 3) ,_b11,_r1(RS),_r1(RD) )) +#define _ALUBmr(OP, MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (((OP) << 3) + 2,_r1(RD) ,MD,MB,MI,MS )) +#define _ALUBrm(OP, RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (((OP) << 3) , ,_r1(RS) ,MD,MB,MI,MS )) +#define _ALUBir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (((OP) << 3) + 4 ,_su8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0x80 ,_b11,OP ,_r1(RD) ,_su8(IM))) ) +#define _ALUBim(OP, IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0x80 ,OP ,MD,MB,MI,MS ,_su8(IM))) + +#define _ALUWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r2(RS),_r2(RD) )) +#define _ALUWmr(OP, MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r2(RD) ,MD,MB,MI,MS )) +#define _ALUWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r2(RS) ,MD,MB,MI,MS )) +#define _ALUWir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (((OP) << 3) + 5 ,_su16(IM))) : \ + (_d16(), _REXLrr(0, RD), _Os_Mrm_sW (0x81 ,_b11,OP ,_r2(RD) ,_su16(IM))) ) +#define _ALUWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _Os_r_X_sW (0x81 ,OP ,MD,MB,MI,MS ,_su16(IM))) + +#define _ALULrr(OP, RS, RD) (_REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r4(RS),_r4(RD) )) +#define _ALULmr(OP, MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r4(RD) ,MD,MB,MI,MS )) +#define _ALULrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r4(RS) ,MD,MB,MI,MS )) +#define _ALULir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXLrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r4(RD) ,IM )) ) +#define _ALULim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define _ALUQrr(OP, RS, RD) (_REXQrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r8(RS),_r8(RD) )) +#define _ALUQmr(OP, MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r8(RD) ,MD,MB,MI,MS )) +#define _ALUQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r8(RS) ,MD,MB,MI,MS )) +#define _ALUQir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXQrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r8(RD) ,IM )) ) +#define _ALUQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define ADCBrr(RS, RD) _ALUBrr(X86_ADC, RS, RD) +#define ADCBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCBir(IM, RD) _ALUBir(X86_ADC, IM, RD) +#define ADCBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCWrr(RS, RD) _ALUWrr(X86_ADC, RS, RD) +#define ADCWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCWir(IM, RD) _ALUWir(X86_ADC, IM, RD) +#define ADCWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCLrr(RS, RD) _ALULrr(X86_ADC, RS, RD) +#define ADCLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCLir(IM, RD) _ALULir(X86_ADC, IM, RD) +#define ADCLim(IM, MD, MB, MI, MS) _ALULim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCQrr(RS, RD) _ALUQrr(X86_ADC, RS, RD) +#define ADCQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCQir(IM, RD) _ALUQir(X86_ADC, IM, RD) +#define ADCQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADDBrr(RS, RD) _ALUBrr(X86_ADD, RS, RD) +#define ADDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDBir(IM, RD) _ALUBir(X86_ADD, IM, RD) +#define ADDBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDWrr(RS, RD) _ALUWrr(X86_ADD, RS, RD) +#define ADDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDWir(IM, RD) _ALUWir(X86_ADD, IM, RD) +#define ADDWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDLrr(RS, RD) _ALULrr(X86_ADD, RS, RD) +#define ADDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDLir(IM, RD) _ALULir(X86_ADD, IM, RD) +#define ADDLim(IM, MD, MB, MI, MS) _ALULim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDQrr(RS, RD) _ALUQrr(X86_ADD, RS, RD) +#define ADDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDQir(IM, RD) _ALUQir(X86_ADD, IM, RD) +#define ADDQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADD, IM, MD, MB, MI, MS) + +#define ANDBrr(RS, RD) _ALUBrr(X86_AND, RS, RD) +#define ANDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDBir(IM, RD) _ALUBir(X86_AND, IM, RD) +#define ANDBim(IM, MD, MB, MI, MS) _ALUBim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDWrr(RS, RD) _ALUWrr(X86_AND, RS, RD) +#define ANDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDWir(IM, RD) _ALUWir(X86_AND, IM, RD) +#define ANDWim(IM, MD, MB, MI, MS) _ALUWim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDLrr(RS, RD) _ALULrr(X86_AND, RS, RD) +#define ANDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDLir(IM, RD) _ALULir(X86_AND, IM, RD) +#define ANDLim(IM, MD, MB, MI, MS) _ALULim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDQrr(RS, RD) _ALUQrr(X86_AND, RS, RD) +#define ANDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDQir(IM, RD) _ALUQir(X86_AND, IM, RD) +#define ANDQim(IM, MD, MB, MI, MS) _ALUQim(X86_AND, IM, MD, MB, MI, MS) + +#define CMPBrr(RS, RD) _ALUBrr(X86_CMP, RS, RD) +#define CMPBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPBir(IM, RD) _ALUBir(X86_CMP, IM, RD) +#define CMPBim(IM, MD, MB, MI, MS) _ALUBim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPWrr(RS, RD) _ALUWrr(X86_CMP, RS, RD) +#define CMPWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPWir(IM, RD) _ALUWir(X86_CMP, IM, RD) +#define CMPWim(IM, MD, MB, MI, MS) _ALUWim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPLrr(RS, RD) _ALULrr(X86_CMP, RS, RD) +#define CMPLmr(MD, MB, MI, MS, RD) _ALULmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPLrm(RS, MD, MB, MI, MS) _ALULrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPLir(IM, RD) _ALULir(X86_CMP, IM, RD) +#define CMPLim(IM, MD, MB, MI, MS) _ALULim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPQrr(RS, RD) _ALUQrr(X86_CMP, RS, RD) +#define CMPQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPQir(IM, RD) _ALUQir(X86_CMP, IM, RD) +#define CMPQim(IM, MD, MB, MI, MS) _ALUQim(X86_CMP, IM, MD, MB, MI, MS) + +#define ORBrr(RS, RD) _ALUBrr(X86_OR, RS, RD) +#define ORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_OR, MD, MB, MI, MS, RD) +#define ORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_OR, RS, MD, MB, MI, MS) +#define ORBir(IM, RD) _ALUBir(X86_OR, IM, RD) +#define ORBim(IM, MD, MB, MI, MS) _ALUBim(X86_OR, IM, MD, MB, MI, MS) + +#define ORWrr(RS, RD) _ALUWrr(X86_OR, RS, RD) +#define ORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_OR, MD, MB, MI, MS, RD) +#define ORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_OR, RS, MD, MB, MI, MS) +#define ORWir(IM, RD) _ALUWir(X86_OR, IM, RD) +#define ORWim(IM, MD, MB, MI, MS) _ALUWim(X86_OR, IM, MD, MB, MI, MS) + +#define ORLrr(RS, RD) _ALULrr(X86_OR, RS, RD) +#define ORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_OR, MD, MB, MI, MS, RD) +#define ORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_OR, RS, MD, MB, MI, MS) +#define ORLir(IM, RD) _ALULir(X86_OR, IM, RD) +#define ORLim(IM, MD, MB, MI, MS) _ALULim(X86_OR, IM, MD, MB, MI, MS) + +#define ORQrr(RS, RD) _ALUQrr(X86_OR, RS, RD) +#define ORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_OR, MD, MB, MI, MS, RD) +#define ORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_OR, RS, MD, MB, MI, MS) +#define ORQir(IM, RD) _ALUQir(X86_OR, IM, RD) +#define ORQim(IM, MD, MB, MI, MS) _ALUQim(X86_OR, IM, MD, MB, MI, MS) + +#define SBBBrr(RS, RD) _ALUBrr(X86_SBB, RS, RD) +#define SBBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBBir(IM, RD) _ALUBir(X86_SBB, IM, RD) +#define SBBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBWrr(RS, RD) _ALUWrr(X86_SBB, RS, RD) +#define SBBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBWir(IM, RD) _ALUWir(X86_SBB, IM, RD) +#define SBBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBLrr(RS, RD) _ALULrr(X86_SBB, RS, RD) +#define SBBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBLir(IM, RD) _ALULir(X86_SBB, IM, RD) +#define SBBLim(IM, MD, MB, MI, MS) _ALULim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBQrr(RS, RD) _ALUQrr(X86_SBB, RS, RD) +#define SBBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBQir(IM, RD) _ALUQir(X86_SBB, IM, RD) +#define SBBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SBB, IM, MD, MB, MI, MS) + +#define SUBBrr(RS, RD) _ALUBrr(X86_SUB, RS, RD) +#define SUBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBBir(IM, RD) _ALUBir(X86_SUB, IM, RD) +#define SUBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBWrr(RS, RD) _ALUWrr(X86_SUB, RS, RD) +#define SUBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBWir(IM, RD) _ALUWir(X86_SUB, IM, RD) +#define SUBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBLrr(RS, RD) _ALULrr(X86_SUB, RS, RD) +#define SUBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBLir(IM, RD) _ALULir(X86_SUB, IM, RD) +#define SUBLim(IM, MD, MB, MI, MS) _ALULim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBQrr(RS, RD) _ALUQrr(X86_SUB, RS, RD) +#define SUBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBQir(IM, RD) _ALUQir(X86_SUB, IM, RD) +#define SUBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SUB, IM, MD, MB, MI, MS) + +#define XORBrr(RS, RD) _ALUBrr(X86_XOR, RS, RD) +#define XORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORBir(IM, RD) _ALUBir(X86_XOR, IM, RD) +#define XORBim(IM, MD, MB, MI, MS) _ALUBim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORWrr(RS, RD) _ALUWrr(X86_XOR, RS, RD) +#define XORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORWir(IM, RD) _ALUWir(X86_XOR, IM, RD) +#define XORWim(IM, MD, MB, MI, MS) _ALUWim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORLrr(RS, RD) _ALULrr(X86_XOR, RS, RD) +#define XORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORLir(IM, RD) _ALULir(X86_XOR, IM, RD) +#define XORLim(IM, MD, MB, MI, MS) _ALULim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORQrr(RS, RD) _ALUQrr(X86_XOR, RS, RD) +#define XORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORQir(IM, RD) _ALUQir(X86_XOR, IM, RD) +#define XORQim(IM, MD, MB, MI, MS) _ALUQim(X86_XOR, IM, MD, MB, MI, MS) + + +/* --- Shift/Rotate instructions ------------------------------------------- */ + +enum { + X86_ROL = 0, + X86_ROR = 1, + X86_RCL = 2, + X86_RCR = 3, + X86_SHL = 4, + X86_SHR = 5, + X86_SAR = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ROTSHIBir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrr(0, RD), _O_Mrm (0xd0 ,_b11,OP,_r1(RD) )) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xc0 ,_b11,OP,_r1(RD) ,_u8(IM))) ) +#define _ROTSHIBim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrm(0, MB, MI), _O_r_X (0xd0 ,OP ,MD,MB,MI,MS )) : \ + (_REXBrm(0, MB, MI), _O_r_X_B (0xc0 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIBrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXBrr(RS, RD), _O_Mrm (0xd2 ,_b11,OP,_r1(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIBrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXBrm(RS, MB, MI), _O_r_X (0xd2 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIWir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r2(RD) ,_u8(IM))) ) +#define _ROTSHIWim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIWrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_d16(), _REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r2(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIWrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHILir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r4(RD) )) : \ + (_REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r4(RD) ,_u8(IM))) ) +#define _ROTSHILim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHILrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r4(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHILrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIQir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r8(RD) )) : \ + (_REXQrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r8(RD) ,_u8(IM))) ) +#define _ROTSHIQim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXQrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIQrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXQrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r8(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIQrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXQrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define ROLBir(IM, RD) _ROTSHIBir(X86_ROL, IM, RD) +#define ROLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLBrr(RS, RD) _ROTSHIBrr(X86_ROL, RS, RD) +#define ROLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLWir(IM, RD) _ROTSHIWir(X86_ROL, IM, RD) +#define ROLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLWrr(RS, RD) _ROTSHIWrr(X86_ROL, RS, RD) +#define ROLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLLir(IM, RD) _ROTSHILir(X86_ROL, IM, RD) +#define ROLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLLrr(RS, RD) _ROTSHILrr(X86_ROL, RS, RD) +#define ROLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLQir(IM, RD) _ROTSHIQir(X86_ROL, IM, RD) +#define ROLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLQrr(RS, RD) _ROTSHIQrr(X86_ROL, RS, RD) +#define ROLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROL, RS, MD, MB, MI, MS) + +#define RORBir(IM, RD) _ROTSHIBir(X86_ROR, IM, RD) +#define RORBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROR, IM, MD, MB, MI, MS) +#define RORBrr(RS, RD) _ROTSHIBrr(X86_ROR, RS, RD) +#define RORBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORWir(IM, RD) _ROTSHIWir(X86_ROR, IM, RD) +#define RORWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROR, IM, MD, MB, MI, MS) +#define RORWrr(RS, RD) _ROTSHIWrr(X86_ROR, RS, RD) +#define RORWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORLir(IM, RD) _ROTSHILir(X86_ROR, IM, RD) +#define RORLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROR, IM, MD, MB, MI, MS) +#define RORLrr(RS, RD) _ROTSHILrr(X86_ROR, RS, RD) +#define RORLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORQir(IM, RD) _ROTSHIQir(X86_ROR, IM, RD) +#define RORQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROR, IM, MD, MB, MI, MS) +#define RORQrr(RS, RD) _ROTSHIQrr(X86_ROR, RS, RD) +#define RORQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RCLBir(IM, RD) _ROTSHIBir(X86_RCL, IM, RD) +#define RCLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLBrr(RS, RD) _ROTSHIBrr(X86_RCL, RS, RD) +#define RCLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLWir(IM, RD) _ROTSHIWir(X86_RCL, IM, RD) +#define RCLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLWrr(RS, RD) _ROTSHIWrr(X86_RCL, RS, RD) +#define RCLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLLir(IM, RD) _ROTSHILir(X86_RCL, IM, RD) +#define RCLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLLrr(RS, RD) _ROTSHILrr(X86_RCL, RS, RD) +#define RCLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLQir(IM, RD) _ROTSHIQir(X86_RCL, IM, RD) +#define RCLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLQrr(RS, RD) _ROTSHIQrr(X86_RCL, RS, RD) +#define RCLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCRBir(IM, RD) _ROTSHIBir(X86_RCR, IM, RD) +#define RCRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRBrr(RS, RD) _ROTSHIBrr(X86_RCR, RS, RD) +#define RCRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRWir(IM, RD) _ROTSHIWir(X86_RCR, IM, RD) +#define RCRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRWrr(RS, RD) _ROTSHIWrr(X86_RCR, RS, RD) +#define RCRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRLir(IM, RD) _ROTSHILir(X86_RCR, IM, RD) +#define RCRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRLrr(RS, RD) _ROTSHILrr(X86_RCR, RS, RD) +#define RCRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRQir(IM, RD) _ROTSHIQir(X86_RCR, IM, RD) +#define RCRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRQrr(RS, RD) _ROTSHIQrr(X86_RCR, RS, RD) +#define RCRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCR, RS, MD, MB, MI, MS) + +#define SHLBir(IM, RD) _ROTSHIBir(X86_SHL, IM, RD) +#define SHLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLBrr(RS, RD) _ROTSHIBrr(X86_SHL, RS, RD) +#define SHLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLWir(IM, RD) _ROTSHIWir(X86_SHL, IM, RD) +#define SHLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLWrr(RS, RD) _ROTSHIWrr(X86_SHL, RS, RD) +#define SHLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLLir(IM, RD) _ROTSHILir(X86_SHL, IM, RD) +#define SHLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLLrr(RS, RD) _ROTSHILrr(X86_SHL, RS, RD) +#define SHLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLQir(IM, RD) _ROTSHIQir(X86_SHL, IM, RD) +#define SHLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLQrr(RS, RD) _ROTSHIQrr(X86_SHL, RS, RD) +#define SHLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHRBir(IM, RD) _ROTSHIBir(X86_SHR, IM, RD) +#define SHRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRBrr(RS, RD) _ROTSHIBrr(X86_SHR, RS, RD) +#define SHRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRWir(IM, RD) _ROTSHIWir(X86_SHR, IM, RD) +#define SHRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRWrr(RS, RD) _ROTSHIWrr(X86_SHR, RS, RD) +#define SHRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRLir(IM, RD) _ROTSHILir(X86_SHR, IM, RD) +#define SHRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRLrr(RS, RD) _ROTSHILrr(X86_SHR, RS, RD) +#define SHRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRQir(IM, RD) _ROTSHIQir(X86_SHR, IM, RD) +#define SHRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRQrr(RS, RD) _ROTSHIQrr(X86_SHR, RS, RD) +#define SHRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SALBir SHLBir +#define SALBim SHLBim +#define SALBrr SHLBrr +#define SALBrm SHLBrm + +#define SALWir SHLWir +#define SALWim SHLWim +#define SALWrr SHLWrr +#define SALWrm SHLWrm + +#define SALLir SHLLir +#define SALLim SHLLim +#define SALLrr SHLLrr +#define SALLrm SHLLrm + +#define SALQir SHLQir +#define SALQim SHLQim +#define SALQrr SHLQrr +#define SALQrm SHLQrm + +#define SARBir(IM, RD) _ROTSHIBir(X86_SAR, IM, RD) +#define SARBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SAR, IM, MD, MB, MI, MS) +#define SARBrr(RS, RD) _ROTSHIBrr(X86_SAR, RS, RD) +#define SARBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARWir(IM, RD) _ROTSHIWir(X86_SAR, IM, RD) +#define SARWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SAR, IM, MD, MB, MI, MS) +#define SARWrr(RS, RD) _ROTSHIWrr(X86_SAR, RS, RD) +#define SARWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARLir(IM, RD) _ROTSHILir(X86_SAR, IM, RD) +#define SARLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SAR, IM, MD, MB, MI, MS) +#define SARLrr(RS, RD) _ROTSHILrr(X86_SAR, RS, RD) +#define SARLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARQir(IM, RD) _ROTSHIQir(X86_SAR, IM, RD) +#define SARQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SAR, IM, MD, MB, MI, MS) +#define SARQrr(RS, RD) _ROTSHIQrr(X86_SAR, RS, RD) +#define SARQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SAR, RS, MD, MB, MI, MS) + + +/* --- Bit test instructions ----------------------------------------------- */ + +enum { + X86_BT = 4, + X86_BTS = 5, + X86_BTR = 6, + X86_BTC = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _BTWir(OP, IM, RD) (_d16(), _REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r2(RD) ,_u8(IM))) +#define _BTWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r2(RS),_r2(RD) )) +#define _BTWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r2(RS) ,MD,MB,MI,MS )) + +#define _BTLir(OP, IM, RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r4(RD) ,_u8(IM))) +#define _BTLim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTLrr(OP, RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r4(RS),_r4(RD) )) +#define _BTLrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r4(RS) ,MD,MB,MI,MS )) + +#define _BTQir(OP, IM, RD) (_REXQrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r8(RD) ,_u8(IM))) +#define _BTQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTQrr(OP, RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r8(RS),_r8(RD) )) +#define _BTQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r8(RS) ,MD,MB,MI,MS )) + +#define BTWir(IM, RD) _BTWir(X86_BT, IM, RD) +#define BTWim(IM, MD, MB, MI, MS) _BTWim(X86_BT, IM, MD, MI, MS) +#define BTWrr(RS, RD) _BTWrr(X86_BT, RS, RD) +#define BTWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTLir(IM, RD) _BTLir(X86_BT, IM, RD) +#define BTLim(IM, MD, MB, MI, MS) _BTLim(X86_BT, IM, MD, MB, MI, MS) +#define BTLrr(RS, RD) _BTLrr(X86_BT, RS, RD) +#define BTLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTQir(IM, RD) _BTQir(X86_BT, IM, RD) +#define BTQim(IM, MD, MB, MI, MS) _BTQim(X86_BT, IM, MD, MB, MI, MS) +#define BTQrr(RS, RD) _BTQrr(X86_BT, RS, RD) +#define BTQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTCWir(IM, RD) _BTWir(X86_BTC, IM, RD) +#define BTCWim(IM, MD, MB, MI, MS) _BTWim(X86_BTC, IM, MD, MI, MS) +#define BTCWrr(RS, RD) _BTWrr(X86_BTC, RS, RD) +#define BTCWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCLir(IM, RD) _BTLir(X86_BTC, IM, RD) +#define BTCLim(IM, MD, MB, MI, MS) _BTLim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCLrr(RS, RD) _BTLrr(X86_BTC, RS, RD) +#define BTCLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCQir(IM, RD) _BTQir(X86_BTC, IM, RD) +#define BTCQim(IM, MD, MB, MI, MS) _BTQim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCQrr(RS, RD) _BTQrr(X86_BTC, RS, RD) +#define BTCQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTRWir(IM, RD) _BTWir(X86_BTR, IM, RD) +#define BTRWim(IM, MD, MB, MI, MS) _BTWim(X86_BTR, IM, MD, MI, MS) +#define BTRWrr(RS, RD) _BTWrr(X86_BTR, RS, RD) +#define BTRWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRLir(IM, RD) _BTLir(X86_BTR, IM, RD) +#define BTRLim(IM, MD, MB, MI, MS) _BTLim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRLrr(RS, RD) _BTLrr(X86_BTR, RS, RD) +#define BTRLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRQir(IM, RD) _BTQir(X86_BTR, IM, RD) +#define BTRQim(IM, MD, MB, MI, MS) _BTQim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRQrr(RS, RD) _BTQrr(X86_BTR, RS, RD) +#define BTRQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTSWir(IM, RD) _BTWir(X86_BTS, IM, RD) +#define BTSWim(IM, MD, MB, MI, MS) _BTWim(X86_BTS, IM, MD, MI, MS) +#define BTSWrr(RS, RD) _BTWrr(X86_BTS, RS, RD) +#define BTSWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSLir(IM, RD) _BTLir(X86_BTS, IM, RD) +#define BTSLim(IM, MD, MB, MI, MS) _BTLim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSLrr(RS, RD) _BTLrr(X86_BTS, RS, RD) +#define BTSLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSQir(IM, RD) _BTQir(X86_BTS, IM, RD) +#define BTSQim(IM, MD, MB, MI, MS) _BTQim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSQrr(RS, RD) _BTQrr(X86_BTS, RS, RD) +#define BTSQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTS, RS, MD, MB, MI, MS) + + +/* --- Move instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x88 ,_b11,_r1(RS),_r1(RD) )) +#define MOVBmr(MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (0x8a ,_r1(RD) ,MD,MB,MI,MS )) +#define MOVBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x88 ,_r1(RS) ,MD,MB,MI,MS )) +#define MOVBir(IM, R) (_REXBrr(0, R), _Or_B (0xb0,_r1(R) ,_su8(IM))) +#define MOVBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_X_B (0xc6 ,MD,MB,MI,MS ,_su8(IM))) + +#define MOVWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r2(RS),_r2(RD) )) +#define MOVWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r2(RS) ,MD,MB,MI,MS )) +#define MOVWir(IM, R) (_d16(), _REXLrr(0, R), _Or_W (0xb8,_r2(R) ,_su16(IM))) +#define MOVWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_X_W (0xc7 ,MD,MB,MI,MS ,_su16(IM))) + +#define MOVLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r4(RS),_r4(RD) )) +#define MOVLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r4(RS) ,MD,MB,MI,MS )) +#define MOVLir(IM, R) (_REXLrr(0, R), _Or_L (0xb8,_r4(R) ,IM )) +#define MOVLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + +#define MOVQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x89 ,_b11,_r8(RS),_r8(RD) )) +#define MOVQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8b ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x89 ,_r8(RS) ,MD,MB,MI,MS )) +#define MOVQir(IM, R) (_REXQrr(0, R), _Or_Q (0xb8,_r8(R) ,IM )) +#define MOVQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + + +/* --- Unary and Multiply/Divide instructions ------------------------------ */ + +enum { + X86_NOT = 2, + X86_NEG = 3, + X86_MUL = 4, + X86_IMUL = 5, + X86_DIV = 6, + X86_IDIV = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _UNARYBr(OP, RS) (_REXBrr(0, RS), _O_Mrm (0xf6 ,_b11,OP ,_r1(RS) )) +#define _UNARYBm(OP, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xf6 ,OP ,MD,MB,MI,MS )) +#define _UNARYWr(OP, RS) (_d16(), _REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r2(RS) )) +#define _UNARYWm(OP, MD, MB, MI, MS) (_d16(), _REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYLr(OP, RS) (_REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r4(RS) )) +#define _UNARYLm(OP, MD, MB, MI, MS) (_REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYQr(OP, RS) (_REXQrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r8(RS) )) +#define _UNARYQm(OP, MD, MB, MI, MS) (_REXQmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) + +#define NOTBr(RS) _UNARYBr(X86_NOT, RS) +#define NOTBm(MD, MB, MI, MS) _UNARYBm(X86_NOT, MD, MB, MI, MS) +#define NOTWr(RS) _UNARYWr(X86_NOT, RS) +#define NOTWm(MD, MB, MI, MS) _UNARYWm(X86_NOT, MD, MB, MI, MS) +#define NOTLr(RS) _UNARYLr(X86_NOT, RS) +#define NOTLm(MD, MB, MI, MS) _UNARYLm(X86_NOT, MD, MB, MI, MS) +#define NOTQr(RS) _UNARYQr(X86_NOT, RS) +#define NOTQm(MD, MB, MI, MS) _UNARYQm(X86_NOT, MD, MB, MI, MS) + +#define NEGBr(RS) _UNARYBr(X86_NEG, RS) +#define NEGBm(MD, MB, MI, MS) _UNARYBm(X86_NEG, MD, MB, MI, MS) +#define NEGWr(RS) _UNARYWr(X86_NEG, RS) +#define NEGWm(MD, MB, MI, MS) _UNARYWm(X86_NEG, MD, MB, MI, MS) +#define NEGLr(RS) _UNARYLr(X86_NEG, RS) +#define NEGLm(MD, MB, MI, MS) _UNARYLm(X86_NEG, MD, MB, MI, MS) +#define NEGQr(RS) _UNARYQr(X86_NEG, RS) +#define NEGQm(MD, MB, MI, MS) _UNARYQm(X86_NEG, MD, MB, MI, MS) + +#define MULBr(RS) _UNARYBr(X86_MUL, RS) +#define MULBm(MD, MB, MI, MS) _UNARYBm(X86_MUL, MD, MB, MI, MS) +#define MULWr(RS) _UNARYWr(X86_MUL, RS) +#define MULWm(MD, MB, MI, MS) _UNARYWm(X86_MUL, MD, MB, MI, MS) +#define MULLr(RS) _UNARYLr(X86_MUL, RS) +#define MULLm(MD, MB, MI, MS) _UNARYLm(X86_MUL, MD, MB, MI, MS) +#define MULQr(RS) _UNARYQr(X86_MUL, RS) +#define MULQm(MD, MB, MI, MS) _UNARYQm(X86_MUL, MD, MB, MI, MS) + +#define IMULBr(RS) _UNARYBr(X86_IMUL, RS) +#define IMULBm(MD, MB, MI, MS) _UNARYBm(X86_IMUL, MD, MB, MI, MS) +#define IMULWr(RS) _UNARYWr(X86_IMUL, RS) +#define IMULWm(MD, MB, MI, MS) _UNARYWm(X86_IMUL, MD, MB, MI, MS) +#define IMULLr(RS) _UNARYLr(X86_IMUL, RS) +#define IMULLm(MD, MB, MI, MS) _UNARYLm(X86_IMUL, MD, MB, MI, MS) +#define IMULQr(RS) _UNARYQr(X86_IMUL, RS) +#define IMULQm(MD, MB, MI, MS) _UNARYQm(X86_IMUL, MD, MB, MI, MS) + +#define DIVBr(RS) _UNARYBr(X86_DIV, RS) +#define DIVBm(MD, MB, MI, MS) _UNARYBm(X86_DIV, MD, MB, MI, MS) +#define DIVWr(RS) _UNARYWr(X86_DIV, RS) +#define DIVWm(MD, MB, MI, MS) _UNARYWm(X86_DIV, MD, MB, MI, MS) +#define DIVLr(RS) _UNARYLr(X86_DIV, RS) +#define DIVLm(MD, MB, MI, MS) _UNARYLm(X86_DIV, MD, MB, MI, MS) +#define DIVQr(RS) _UNARYQr(X86_DIV, RS) +#define DIVQm(MD, MB, MI, MS) _UNARYQm(X86_DIV, MD, MB, MI, MS) + +#define IDIVBr(RS) _UNARYBr(X86_IDIV, RS) +#define IDIVBm(MD, MB, MI, MS) _UNARYBm(X86_IDIV, MD, MB, MI, MS) +#define IDIVWr(RS) _UNARYWr(X86_IDIV, RS) +#define IDIVWm(MD, MB, MI, MS) _UNARYWm(X86_IDIV, MD, MB, MI, MS) +#define IDIVLr(RS) _UNARYLr(X86_IDIV, RS) +#define IDIVLm(MD, MB, MI, MS) _UNARYLm(X86_IDIV, MD, MB, MI, MS) +#define IDIVQr(RS) _UNARYQr(X86_IDIV, RS) +#define IDIVQm(MD, MB, MI, MS) _UNARYQm(X86_IDIV, MD, MB, MI, MS) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define IMULWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r2(RD),_r2(RS) )) +#define IMULWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r2(RD) ,MD,MB,MI,MS )) + +#define IMULWirr(IM,RS,RD) (_d16(), _REXLrr(RS, RD), _Os_Mrm_sW (0x69 ,_b11,_r2(RS),_r2(RD) ,_su16(IM) )) +#define IMULWimr(IM,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _Os_r_X_sW (0x69 ,_r2(RD) ,MD,MB,MI,MS ,_su16(IM) )) + +#define IMULLir(IM, RD) (_REXLrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RD),_r4(RD) ,IM )) +#define IMULLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r4(RD),_r4(RS) )) +#define IMULLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r4(RD) ,MD,MB,MI,MS )) + +#define IMULQir(IM, RD) (_REXQrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RD),_r8(RD) ,IM )) +#define IMULQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r8(RD),_r8(RS) )) +#define IMULQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0faf ,_r8(RD) ,MD,MB,MI,MS )) + +#define IMULLirr(IM,RS,RD) (_REXLrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RS),_r4(RD) ,IM )) +#define IMULLimr(IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r4(RD) ,MD,MB,MI,MS ,IM )) + +#define IMULQirr(IM,RS,RD) (_REXQrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RS),_r8(RD) ,IM )) +#define IMULQimr(IM,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r8(RD) ,MD,MB,MI,MS ,IM )) + + +/* --- Control Flow related instructions ----------------------------------- */ + +enum { + X86_CC_O = 0x0, + X86_CC_NO = 0x1, + X86_CC_NAE = 0x2, + X86_CC_B = 0x2, + X86_CC_C = 0x2, + X86_CC_AE = 0x3, + X86_CC_NB = 0x3, + X86_CC_NC = 0x3, + X86_CC_E = 0x4, + X86_CC_Z = 0x4, + X86_CC_NE = 0x5, + X86_CC_NZ = 0x5, + X86_CC_BE = 0x6, + X86_CC_NA = 0x6, + X86_CC_A = 0x7, + X86_CC_NBE = 0x7, + X86_CC_S = 0x8, + X86_CC_NS = 0x9, + X86_CC_P = 0xa, + X86_CC_PE = 0xa, + X86_CC_NP = 0xb, + X86_CC_PO = 0xb, + X86_CC_L = 0xc, + X86_CC_NGE = 0xc, + X86_CC_GE = 0xd, + X86_CC_NL = 0xd, + X86_CC_LE = 0xe, + X86_CC_NG = 0xe, + X86_CC_G = 0xf, + X86_CC_NLE = 0xf, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define CALLm(M) _O_D32 (0xe8 ,(int)(M) ) +#define _CALLLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r4(R) )) +#define _CALLQsr(R) (_REXQrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r8(R) )) +#define CALLsr(R) ( X86_TARGET_64BIT ? _CALLQsr(R) : _CALLLsr(R)) +#define CALLsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b010 ,(int)(D),B,I,S )) + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define JMPSm(M) _O_D8 (0xeb ,(int)(M) ) +#define JMPm(M) _O_D32 (0xe9 ,(int)(M) ) +#define _JMPLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r4(R) )) +#define _JMPQsr(R) (_REXQrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r8(R) )) +#define JMPsr(R) ( X86_TARGET_64BIT ? _JMPQsr(R) : _JMPLsr(R)) +#define JMPsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b100 ,(int)(D),B,I,S )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCSii(CC, D) _O_B (0x70|(CC) ,(_sc)(int)(D) ) +#define JCCSim(CC, D) _O_D8 (0x70|(CC) ,(int)(D) ) +#define JOSm(D) JCCSim(0x0, D) +#define JNOSm(D) JCCSim(0x1, D) +#define JBSm(D) JCCSim(0x2, D) +#define JNAESm(D) JCCSim(0x2, D) +#define JNBSm(D) JCCSim(0x3, D) +#define JAESm(D) JCCSim(0x3, D) +#define JESm(D) JCCSim(0x4, D) +#define JZSm(D) JCCSim(0x4, D) +#define JNESm(D) JCCSim(0x5, D) +#define JNZSm(D) JCCSim(0x5, D) +#define JBESm(D) JCCSim(0x6, D) +#define JNASm(D) JCCSim(0x6, D) +#define JNBESm(D) JCCSim(0x7, D) +#define JASm(D) JCCSim(0x7, D) +#define JSSm(D) JCCSim(0x8, D) +#define JNSSm(D) JCCSim(0x9, D) +#define JPSm(D) JCCSim(0xa, D) +#define JPESm(D) JCCSim(0xa, D) +#define JNPSm(D) JCCSim(0xb, D) +#define JPOSm(D) JCCSim(0xb, D) +#define JLSm(D) JCCSim(0xc, D) +#define JNGESm(D) JCCSim(0xc, D) +#define JNLSm(D) JCCSim(0xd, D) +#define JGESm(D) JCCSim(0xd, D) +#define JLESm(D) JCCSim(0xe, D) +#define JNGSm(D) JCCSim(0xe, D) +#define JNLESm(D) JCCSim(0xf, D) +#define JGSm(D) JCCSim(0xf, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCii(CC, D) _OO_L (0x0f80|(CC) ,(int)(D) ) +#define JCCim(CC, D) _OO_D32 (0x0f80|(CC) ,(int)(D) ) +#define JOm(D) JCCim(0x0, D) +#define JNOm(D) JCCim(0x1, D) +#define JBm(D) JCCim(0x2, D) +#define JNAEm(D) JCCim(0x2, D) +#define JNBm(D) JCCim(0x3, D) +#define JAEm(D) JCCim(0x3, D) +#define JEm(D) JCCim(0x4, D) +#define JZm(D) JCCim(0x4, D) +#define JNEm(D) JCCim(0x5, D) +#define JNZm(D) JCCim(0x5, D) +#define JBEm(D) JCCim(0x6, D) +#define JNAm(D) JCCim(0x6, D) +#define JNBEm(D) JCCim(0x7, D) +#define JAm(D) JCCim(0x7, D) +#define JSm(D) JCCim(0x8, D) +#define JNSm(D) JCCim(0x9, D) +#define JPm(D) JCCim(0xa, D) +#define JPEm(D) JCCim(0xa, D) +#define JNPm(D) JCCim(0xb, D) +#define JPOm(D) JCCim(0xb, D) +#define JLm(D) JCCim(0xc, D) +#define JNGEm(D) JCCim(0xc, D) +#define JNLm(D) JCCim(0xd, D) +#define JGEm(D) JCCim(0xd, D) +#define JLEm(D) JCCim(0xe, D) +#define JNGm(D) JCCim(0xe, D) +#define JNLEm(D) JCCim(0xf, D) +#define JGm(D) JCCim(0xf, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCir(CC, RD) (_REXBrr(0, RD), _OO_Mrm (0x0f90|(CC) ,_b11,_b000,_r1(RD) )) +#define SETOr(RD) SETCCir(0x0,RD) +#define SETNOr(RD) SETCCir(0x1,RD) +#define SETBr(RD) SETCCir(0x2,RD) +#define SETNAEr(RD) SETCCir(0x2,RD) +#define SETNBr(RD) SETCCir(0x3,RD) +#define SETAEr(RD) SETCCir(0x3,RD) +#define SETEr(RD) SETCCir(0x4,RD) +#define SETZr(RD) SETCCir(0x4,RD) +#define SETNEr(RD) SETCCir(0x5,RD) +#define SETNZr(RD) SETCCir(0x5,RD) +#define SETBEr(RD) SETCCir(0x6,RD) +#define SETNAr(RD) SETCCir(0x6,RD) +#define SETNBEr(RD) SETCCir(0x7,RD) +#define SETAr(RD) SETCCir(0x7,RD) +#define SETSr(RD) SETCCir(0x8,RD) +#define SETNSr(RD) SETCCir(0x9,RD) +#define SETPr(RD) SETCCir(0xa,RD) +#define SETPEr(RD) SETCCir(0xa,RD) +#define SETNPr(RD) SETCCir(0xb,RD) +#define SETPOr(RD) SETCCir(0xb,RD) +#define SETLr(RD) SETCCir(0xc,RD) +#define SETNGEr(RD) SETCCir(0xc,RD) +#define SETNLr(RD) SETCCir(0xd,RD) +#define SETGEr(RD) SETCCir(0xd,RD) +#define SETLEr(RD) SETCCir(0xe,RD) +#define SETNGr(RD) SETCCir(0xe,RD) +#define SETNLEr(RD) SETCCir(0xf,RD) +#define SETGr(RD) SETCCir(0xf,RD) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCim(CC,MD,MB,MI,MS) (_REXBrm(0, MB, MI), _OO_r_X (0x0f90|(CC) ,_b000 ,MD,MB,MI,MS )) +#define SETOm(D, B, I, S) SETCCim(0x0, D, B, I, S) +#define SETNOm(D, B, I, S) SETCCim(0x1, D, B, I, S) +#define SETBm(D, B, I, S) SETCCim(0x2, D, B, I, S) +#define SETNAEm(D, B, I, S) SETCCim(0x2, D, B, I, S) +#define SETNBm(D, B, I, S) SETCCim(0x3, D, B, I, S) +#define SETAEm(D, B, I, S) SETCCim(0x3, D, B, I, S) +#define SETEm(D, B, I, S) SETCCim(0x4, D, B, I, S) +#define SETZm(D, B, I, S) SETCCim(0x4, D, B, I, S) +#define SETNEm(D, B, I, S) SETCCim(0x5, D, B, I, S) +#define SETNZm(D, B, I, S) SETCCim(0x5, D, B, I, S) +#define SETBEm(D, B, I, S) SETCCim(0x6, D, B, I, S) +#define SETNAm(D, B, I, S) SETCCim(0x6, D, B, I, S) +#define SETNBEm(D, B, I, S) SETCCim(0x7, D, B, I, S) +#define SETAm(D, B, I, S) SETCCim(0x7, D, B, I, S) +#define SETSm(D, B, I, S) SETCCim(0x8, D, B, I, S) +#define SETNSm(D, B, I, S) SETCCim(0x9, D, B, I, S) +#define SETPm(D, B, I, S) SETCCim(0xa, D, B, I, S) +#define SETPEm(D, B, I, S) SETCCim(0xa, D, B, I, S) +#define SETNPm(D, B, I, S) SETCCim(0xb, D, B, I, S) +#define SETPOm(D, B, I, S) SETCCim(0xb, D, B, I, S) +#define SETLm(D, B, I, S) SETCCim(0xc, D, B, I, S) +#define SETNGEm(D, B, I, S) SETCCim(0xc, D, B, I, S) +#define SETNLm(D, B, I, S) SETCCim(0xd, D, B, I, S) +#define SETGEm(D, B, I, S) SETCCim(0xd, D, B, I, S) +#define SETLEm(D, B, I, S) SETCCim(0xe, D, B, I, S) +#define SETNGm(D, B, I, S) SETCCim(0xe, D, B, I, S) +#define SETNLEm(D, B, I, S) SETCCim(0xf, D, B, I, S) +#define SETGm(D, B, I, S) SETCCim(0xf, D, B, I, S) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define CMOVWrr(CC,RS,RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r2(RD),_r2(RS) )) +#define CMOVWmr(CC,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r2(RD) ,MD,MB,MI,MS )) +#define CMOVLrr(CC,RS,RD) (_REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r4(RD),_r4(RS) )) +#define CMOVLmr(CC,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r4(RD) ,MD,MB,MI,MS )) +#define CMOVQrr(CC,RS,RD) (_REXQrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r8(RD),_r8(RS) )) +#define CMOVQmr(CC,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r8(RD) ,MD,MB,MI,MS )) + + +/* --- Push/Pop instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define POPWr(RD) _m32only((_d16(), _Or (0x58,_r2(RD) ))) +#define POPWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define POPLr(RD) _m32only( _Or (0x58,_r4(RD) )) +#define POPLm(MD, MB, MI, MS) _m32only( _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS )) + +#define POPQr(RD) _m64only((_REXQr(RD), _Or (0x58,_r8(RD) ))) +#define POPQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define PUSHWr(RS) _m32only((_d16(), _Or (0x50,_r2(RS) ))) +#define PUSHWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0xff, ,_b110 ,MD,MB,MI,MS ))) +#define PUSHWi(IM) _m32only((_d16(), _Os_sW (0x68 ,IM ))) + +#define PUSHLr(RS) _m32only( _Or (0x50,_r4(RS) )) +#define PUSHLm(MD, MB, MI, MS) _m32only( _O_r_X (0xff ,_b110 ,MD,MB,MI,MS )) +#define PUSHLi(IM) _m32only( _Os_sL (0x68 ,IM )) + +#define PUSHQr(RS) _m64only((_REXQr(RS), _Or (0x50,_r8(RS) ))) +#define PUSHQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0xff ,_b110 ,MD,MB,MI,MS ))) +#define PUSHQi(IM) _m64only( _Os_sL (0x68 ,IM )) + +#define POPA() (_d16(), _O (0x61 )) +#define POPAD() _O (0x61 ) + +#define PUSHA() (_d16(), _O (0x60 )) +#define PUSHAD() _O (0x60 ) + +#define POPF() _O (0x9d ) +#define PUSHF() _O (0x9c ) + + +/* --- Test instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define TESTBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x84 ,_b11,_r1(RS),_r1(RD) )) +#define TESTBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x84 ,_r1(RS) ,MD,MB,MI,MS )) +#define TESTBir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (0xa8 ,_u8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xf6 ,_b11,_b000 ,_r1(RD) ,_u8(IM))) ) +#define TESTBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0xf6 ,_b000 ,MD,MB,MI,MS ,_u8(IM))) + +#define TESTWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r2(RS),_r2(RD) )) +#define TESTWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r2(RS) ,MD,MB,MI,MS )) +#define TESTWir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (0xa9 ,_u16(IM))) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_W (0xf7 ,_b11,_b000 ,_r2(RD) ,_u16(IM))) ) +#define TESTWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X_W (0xf7 ,_b000 ,MD,MB,MI,MS ,_u16(IM))) + +#define TESTLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r4(RS),_r4(RD) )) +#define TESTLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r4(RS) ,MD,MB,MI,MS )) +#define TESTLir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXLrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r4(RD) ,IM )) ) +#define TESTLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + +#define TESTQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x85 ,_b11,_r8(RS),_r8(RD) )) +#define TESTQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x85 ,_r8(RS) ,MD,MB,MI,MS )) +#define TESTQir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXQrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r8(RD) ,IM )) ) +#define TESTQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + + +/* --- Exchange instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CMPXCHGBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fb0 ,_b11,_r1(RS),_r1(RD) )) +#define CMPXCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fb0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r2(RS),_r2(RD) )) +#define CMPXCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r4(RS),_r4(RD) )) +#define CMPXCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r8(RS),_r8(RD) )) +#define CMPXCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XADDBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fc0 ,_b11,_r1(RS),_r1(RD) )) +#define XADDBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fc0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XADDWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r2(RS),_r2(RD) )) +#define XADDWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XADDLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r4(RS),_r4(RD) )) +#define XADDLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XADDQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r8(RS),_r8(RD) )) +#define XADDQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XCHGBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x86 ,_b11,_r1(RS),_r1(RD) )) +#define XCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x86 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r2(RS),_r2(RD) )) +#define XCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XCHGLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r4(RS),_r4(RD) )) +#define XCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XCHGQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x87 ,_b11,_r8(RS),_r8(RD) )) +#define XCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x87 ,_r8(RS) ,MD,MB,MI,MS )) + + +/* --- Increment/Decrement instructions ------------------------------------ */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define DECBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b001 ,MD,MB,MI,MS )) +#define DECBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b001 ,_r1(RD) )) + +#define DECWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x48,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r2(RD) ))) + +#define DECLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECLr(RD) (! X86_TARGET_64BIT ? _Or (0x48,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r4(RD) ))) + +#define DECQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r8(RD) )) + +#define INCBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b000 ,MD,MB,MI,MS )) +#define INCBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b000 ,_r1(RD) )) + +#define INCWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x40,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r2(RD) )) ) + +#define INCLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCLr(RD) (! X86_TARGET_64BIT ? _Or (0x40,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r4(RD) ))) + +#define INCQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r8(RD) )) + + +/* --- Misc instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define BSFWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r2(RD),_r2(RS) )) +#define BSFWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r2(RD) ,MD,MB,MI,MS )) +#define BSRWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r2(RD),_r2(RS) )) +#define BSRWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r2(RD) ,MD,MB,MI,MS )) + +#define BSFLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r4(RD),_r4(RS) )) +#define BSFLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r4(RD) ,MD,MB,MI,MS )) +#define BSRLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r4(RD),_r4(RS) )) +#define BSRLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSFQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r8(RD),_r8(RS) )) +#define BSFQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r8(RD) ,MD,MB,MI,MS )) +#define BSRQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r8(RD),_r8(RS) )) +#define BSRQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r8(RD) ,MD,MB,MI,MS )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVSBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r2(RD),_r1(RS) )) +#define MOVSBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVZBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r2(RD),_r1(RS) )) +#define MOVZBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r2(RD) ,MD,MB,MI,MS )) + +#define MOVSBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r4(RD),_r1(RS) )) +#define MOVSBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r4(RD),_r1(RS) )) +#define MOVZBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r8(RD),_r1(RS) )) +#define MOVSBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVZBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r8(RD),_r1(RS) )) +#define MOVZBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r8(RD) ,MD,MB,MI,MS )) + +#define MOVSWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r4(RD),_r2(RS) )) +#define MOVSWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r4(RD),_r2(RS) )) +#define MOVZWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSWQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r8(RD),_r2(RS) )) +#define MOVSWQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVZWQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r8(RD),_r2(RS) )) +#define MOVZWQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r8(RD) ,MD,MB,MI,MS )) + +#define MOVSLQrr(RS, RD) _m64only((_REXQrr(RD, RS), _O_Mrm (0x63 ,_b11,_r8(RD),_r4(RS) ))) +#define MOVSLQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _O_r_X (0x63 ,_r8(RD) ,MD,MB,MI,MS ))) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define LEALmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSWAPLr(R) (_REXLrr(0, R), _OOr (0x0fc8,_r4(R) )) +#define BSWAPQr(R) (_REXQrr(0, R), _OOr (0x0fc8,_r8(R) )) + +#define CLC() _O (0xf8 ) +#define STC() _O (0xf9 ) + +#define CMC() _O (0xf5 ) +#define CLD() _O (0xfc ) +#define STD() _O (0xfd ) + +#define CBTW() (_d16(), _O (0x98 )) +#define CWTL() _O (0x98 ) +#define CLTQ() _m64only(_REXQrr(0, 0), _O (0x98 )) + +#define CBW CBTW +#define CWDE CWTL +#define CDQE CLTQ + +#define CWTD() (_d16(), _O (0x99 )) +#define CLTD() _O (0x99 ) +#define CQTO() _m64only(_REXQrr(0, 0), _O (0x99 )) + +#define CWD CWTD +#define CDQ CLTD +#define CQO CQTO + +#define LAHF() _O (0x9f ) +#define SAHF() _O (0x9e ) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CPUID() _OO (0x0fa2 ) +#define RDTSC() _OO (0xff31 ) + +#define ENTERii(W, B) _O_W_B (0xc8 ,_su16(W),_su8(B)) + +#define LEAVE() _O (0xc9 ) +#define RET() _O (0xc3 ) +#define RETi(IM) _O_W (0xc2 ,_su16(IM)) + +#define NOP() _O (0x90 ) + + +/* --- Media 128-bit instructions ------------------------------------------ */ + +enum { + X86_SSE_CVTIS = 0x2a, + X86_SSE_CVTSI = 0x2d, + X86_SSE_UCOMI = 0x2e, + X86_SSE_COMI = 0x2f, + X86_SSE_SQRT = 0x51, + X86_SSE_RSQRT = 0x52, + X86_SSE_RCP = 0x53, + X86_SSE_AND = 0x54, + X86_SSE_ANDN = 0x55, + X86_SSE_OR = 0x56, + X86_SSE_XOR = 0x57, + X86_SSE_ADD = 0x58, + X86_SSE_MUL = 0x59, + X86_SSE_CVTSD = 0x5a, + X86_SSE_CVTDT = 0x5b, + X86_SSE_SUB = 0x5c, + X86_SSE_MIN = 0x5d, + X86_SSE_DIV = 0x5e, + X86_SSE_MAX = 0x5f, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define __SSELrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSELmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSELrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define __SSEQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSEQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSEQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define _SSELrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSELrr(OP, RS, RSA, RD, RDA)) +#define _SSELmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSELmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSELrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSELrm(OP, RS, RSA, MD, MB, MI, MS)) + +#define _SSEQrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSEQrr(OP, RS, RSA, RD, RDA)) +#define _SSEQmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSEQmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSEQrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSEQrm(OP, RS, RSA, MD, MB, MI, MS)) + +#define _SSEPSrr(OP,RS,RD) __SSELrr( OP, RS,_rX, RD,_rX) +#define _SSEPSmr(OP,MD,MB,MI,MS,RD) __SSELmr( OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPSrm(OP,RS,MD,MB,MI,MS) __SSELrm( OP, RS,_rX, MD, MB, MI, MS) + +#define _SSEPDrr(OP,RS,RD) _SSELrr(0x66, OP, RS,_rX, RD,_rX) +#define _SSEPDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0x66, OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0x66, OP, RS,_rX, MD, MB, MI, MS) + +#define _SSESSrr(OP,RS,RD) _SSELrr(0xf3, OP, RS,_rX, RD,_rX) +#define _SSESSmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf3, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESSrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf3, OP, RS,_rX, MD, MB, MI, MS) + +#define _SSESDrr(OP,RS,RD) _SSELrr(0xf2, OP, RS,_rX, RD,_rX) +#define _SSESDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf2, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf2, OP, RS,_rX, MD, MB, MI, MS) + +#define ADDPSrr(RS, RD) _SSEPSrr(X86_SSE_ADD, RS, RD) +#define ADDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDPDrr(RS, RD) _SSEPDrr(X86_SSE_ADD, RS, RD) +#define ADDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ADDSSrr(RS, RD) _SSESSrr(X86_SSE_ADD, RS, RD) +#define ADDSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDSDrr(RS, RD) _SSESDrr(X86_SSE_ADD, RS, RD) +#define ADDSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ANDNPSrr(RS, RD) _SSEPSrr(X86_SSE_ANDN, RS, RD) +#define ANDNPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) +#define ANDNPDrr(RS, RD) _SSEPDrr(X86_SSE_ANDN, RS, RD) +#define ANDNPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) + +#define ANDPSrr(RS, RD) _SSEPSrr(X86_SSE_AND, RS, RD) +#define ANDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_AND, MD, MB, MI, MS, RD) +#define ANDPDrr(RS, RD) _SSEPDrr(X86_SSE_AND, RS, RD) +#define ANDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_AND, MD, MB, MI, MS, RD) + +#define DIVPSrr(RS, RD) _SSEPSrr(X86_SSE_DIV, RS, RD) +#define DIVPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVPDrr(RS, RD) _SSEPDrr(X86_SSE_DIV, RS, RD) +#define DIVPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define DIVSSrr(RS, RD) _SSESSrr(X86_SSE_DIV, RS, RD) +#define DIVSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVSDrr(RS, RD) _SSESDrr(X86_SSE_DIV, RS, RD) +#define DIVSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define MAXPSrr(RS, RD) _SSEPSrr(X86_SSE_MAX, RS, RD) +#define MAXPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXPDrr(RS, RD) _SSEPDrr(X86_SSE_MAX, RS, RD) +#define MAXPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MAXSSrr(RS, RD) _SSESSrr(X86_SSE_MAX, RS, RD) +#define MAXSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXSDrr(RS, RD) _SSESDrr(X86_SSE_MAX, RS, RD) +#define MAXSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MINPSrr(RS, RD) _SSEPSrr(X86_SSE_MIN, RS, RD) +#define MINPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINPDrr(RS, RD) _SSEPDrr(X86_SSE_MIN, RS, RD) +#define MINPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MINSSrr(RS, RD) _SSESSrr(X86_SSE_MIN, RS, RD) +#define MINSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINSDrr(RS, RD) _SSESDrr(X86_SSE_MIN, RS, RD) +#define MINSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MULPSrr(RS, RD) _SSEPSrr(X86_SSE_MUL, RS, RD) +#define MULPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULPDrr(RS, RD) _SSEPDrr(X86_SSE_MUL, RS, RD) +#define MULPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define MULSSrr(RS, RD) _SSESSrr(X86_SSE_MUL, RS, RD) +#define MULSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULSDrr(RS, RD) _SSESDrr(X86_SSE_MUL, RS, RD) +#define MULSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define ORPSrr(RS, RD) _SSEPSrr(X86_SSE_OR, RS, RD) +#define ORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_OR, MD, MB, MI, MS, RD) +#define ORPDrr(RS, RD) _SSEPDrr(X86_SSE_OR, RS, RD) +#define ORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_OR, MD, MB, MI, MS, RD) + +#define RCPPSrr(RS, RD) _SSEPSrr(X86_SSE_RCP, RS, RD) +#define RCPPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) +#define RCPSSrr(RS, RD) _SSESSrr(X86_SSE_RCP, RS, RD) +#define RCPSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) + +#define RSQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) +#define RSQRTSSrr(RS, RD) _SSESSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) + +#define SQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_SQRT, RS, RD) +#define SQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTPDrr(RS, RD) _SSEPDrr(X86_SSE_SQRT, RS, RD) +#define SQRTPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SQRTSSrr(RS, RD) _SSESSrr(X86_SSE_SQRT, RS, RD) +#define SQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTSDrr(RS, RD) _SSESDrr(X86_SSE_SQRT, RS, RD) +#define SQRTSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SUBPSrr(RS, RD) _SSEPSrr(X86_SSE_SUB, RS, RD) +#define SUBPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBPDrr(RS, RD) _SSEPDrr(X86_SSE_SUB, RS, RD) +#define SUBPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define SUBSSrr(RS, RD) _SSESSrr(X86_SSE_SUB, RS, RD) +#define SUBSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBSDrr(RS, RD) _SSESDrr(X86_SSE_SUB, RS, RD) +#define SUBSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define XORPSrr(RS, RD) _SSEPSrr(X86_SSE_XOR, RS, RD) +#define XORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_XOR, MD, MB, MI, MS, RD) +#define XORPDrr(RS, RD) _SSEPDrr(X86_SSE_XOR, RS, RD) +#define XORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_XOR, MD, MB, MI, MS, RD) + +#define COMISSrr(RS, RD) _SSESSrr(X86_SSE_COMI, RS, RD) +#define COMISSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_COMI, MD, MB, MI, MS, RD) +#define COMISDrr(RS, RD) _SSESDrr(X86_SSE_COMI, RS, RD) +#define COMISDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_COMI, MD, MB, MI, MS, RD) + +#define UCOMISSrr(RS, RD) _SSESSrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) +#define UCOMISDrr(RS, RD) _SSESDrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) + +#define MOVAPSrr(RS, RD) _SSEPSrr(0x28, RS, RD) +#define MOVAPSmr(MD, MB, MI, MS, RD) _SSEPSmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPSrm(RS, MD, MB, MI, MS) _SSEPSrm(0x29, RS, MD, MB, MI, MS) + +#define MOVAPDrr(RS, RD) _SSEPDrr(0x28, RS, RD) +#define MOVAPDmr(MD, MB, MI, MS, RD) _SSEPDmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPDrm(RS, MD, MB, MI, MS) _SSEPDrm(0x29, RS, MD, MB, MI, MS) + +#define CVTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTSI, RS,_rX, RD,_rM) +#define CVTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTSI, MD, MB, MI, MS, RD,_rM) +#define CVTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTSI, RS,_rX, RD,_rM) +#define CVTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTSI, MD, MB, MI, MS, RD,_rM) + +#define CVTPI2PSrr(RS, RD) __SSELrr( X86_SSE_CVTIS, RS,_rM, RD,_rX) +#define CVTPI2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) +#define CVTPI2PDrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTIS, RS,_rM, RD,_rX) +#define CVTPI2PDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) + +#define CVTPS2PDrr(RS, RD) __SSELrr( X86_SSE_CVTSD, RS,_rX, RD,_rX) +#define CVTPS2PDmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTSD, MD, MB, MI, MS, RD,_rX) +#define CVTPD2PSrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTSD, RS,_rX, RD,_rX) +#define CVTPD2PSmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTSD, MD, MB, MI, MS, RD,_rX) + +#define CVTSS2SDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSD, RS,_rX, RD,_rX) +#define CVTSS2SDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSD, MD, MB, MI, MS, RD,_rX) +#define CVTSD2SSrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD, RS,_rX, RD,_rX) +#define CVTSD2SSmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD, MD, MB, MI, MS, RD,_rX) + +#define CVTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSI, RS,_rX, RD,_r4) +#define CVTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSI, MD, MB, MI, MS, RD,_r4) +#define CVTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSI, RS,_rX, RD,_r4) +#define CVTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSI, MD, MB, MI, MS, RD,_r4) + +#define CVTSI2SSLrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTIS, RS,_r4, RD,_rX) +#define CVTSI2SSLmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDLrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTIS, RS,_r4, RD,_rX) +#define CVTSI2SDLmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) + +#define CVTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSI, RS,_rX, RD,_r8) +#define CVTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSI, MD, MB, MI, MS, RD,_r8) +#define CVTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSI, RS,_rX, RD,_r8) +#define CVTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSI, MD, MB, MI, MS, RD,_r8) + +#define CVTSI2SSQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTIS, RS,_r8, RD,_rX) +#define CVTSI2SSQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTIS, RS,_r8, RD,_rX) +#define CVTSI2SDQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTIS, MD, MB, MI, MS, RD,_rX) + +#define MOVDLXrr(RS, RD) _SSELrr(0x66, 0x6e, RS,_r4, RD,_rX) +#define MOVDLXmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) +#define MOVDQXrr(RS, RD) _SSEQrr(0x66, 0x6e, RS,_r8, RD,_rX) +#define MOVDQXmr(MD, MB, MI, MS, RD) _SSEQmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) + +#define MOVDXLrr(RS, RD) _SSELrr(0x66, 0x7e, RS,_rX, RD,_r4) +#define MOVDXLrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) +#define MOVDXQrr(RS, RD) _SSEQrr(0x66, 0x7e, RS,_rX, RD,_r8) +#define MOVDXQrm(RS, MD, MB, MI, MS) _SSEQrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) + +#define MOVDLMrr(RS, RD) __SSELrr( 0x6e, RS,_r4, RD,_rM) +#define MOVDLMmr(MD, MB, MI, MS, RD) __SSELmr( 0x6e, MD, MB, MI, MS, RD,_rM) +#define MOVDQMrr(RS, RD) __SSEQrr( 0x6e, RS,_r8, RD,_rM) +#define MOVDQMmr(MD, MB, MI, MS, RD) __SSEQmr( 0x6e, MD, MB, MI, MS, RD,_rM) + +#define MOVDMLrr(RS, RD) __SSELrr( 0x7e, RS,_rM, RD,_r4) +#define MOVDMLrm(RS, MD, MB, MI, MS) __SSELrm( 0x7e, RS,_rM, MD, MB, MI, MS) +#define MOVDMQrr(RS, RD) __SSEQrr( 0x7e, RS,_rM, RD,_r8) +#define MOVDMQrm(RS, MD, MB, MI, MS) __SSEQrm( 0x7e, RS,_rM, MD, MB, MI, MS) + +#define MOVDQ2Qrr(RS, RD) _SSELrr(0xf2, 0xd6, RS,_rX, RD,_rM) +#define MOVHLPSrr(RS, RD) __SSELrr( 0x12, RS,_rX, RD,_rX) +#define MOVLHPSrr(RS, RD) __SSELrr( 0x16, RS,_rX, RD,_rX) + +#define MOVDQArr(RS, RD) _SSELrr(0x66, 0x6f, RS,_rX, RD,_rX) +#define MOVDQAmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQArm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVDQUrr(RS, RD) _SSELrr(0xf3, 0x6f, RS,_rX, RD,_rX) +#define MOVDQUmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQUrm(RS, MD, MB, MI, MS) _SSELrm(0xf3, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVHPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x17, RS,_rX, MD, MB, MI, MS) +#define MOVHPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x17, RS,_rX, MD, MB, MI, MS) + +#define MOVLPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x13, RS,_rX, MD, MB, MI, MS) +#define MOVLPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x13, RS,_rX, MD, MB, MI, MS) + + +/* --- FLoating-Point instructions ----------------------------------------- */ + +#define _ESCmi(D,B,I,S,OP) (_REXLrm(0,B,I), _O_r_X(0xd8|(OP & 7), (OP >> 3), D,B,I,S)) + +#define FLDr(R) _OOr(0xd9c0,_rN(R)) +#define FLDLm(D,B,I,S) _ESCmi(D,B,I,S,005) +#define FLDSm(D,B,I,S) _ESCmi(D,B,I,S,001) +#define FLDTm(D,B,I,S) _ESCmi(D,B,I,S,053) + +#define FSTr(R) _OOr(0xddd0,_rN(R)) +#define FSTSm(D,B,I,S) _ESCmi(D,B,I,S,021) +#define FSTLm(D,B,I,S) _ESCmi(D,B,I,S,025) + +#define FSTPr(R) _OOr(0xddd8,_rN(R)) +#define FSTPSm(D,B,I,S) _ESCmi(D,B,I,S,031) +#define FSTPLm(D,B,I,S) _ESCmi(D,B,I,S,035) +#define FSTPTm(D,B,I,S) _ESCmi(D,B,I,S,073) + +#define FADDr0(R) _OOr(0xd8c0,_rN(R)) +#define FADD0r(R) _OOr(0xdcc0,_rN(R)) +#define FADDP0r(R) _OOr(0xdec0,_rN(R)) +#define FADDSm(D,B,I,S) _ESCmi(D,B,I,S,000) +#define FADDLm(D,B,I,S) _ESCmi(D,B,I,S,004) + +#define FSUBSm(D,B,I,S) _ESCmi(D,B,I,S,040) +#define FSUBLm(D,B,I,S) _ESCmi(D,B,I,S,044) +#define FSUBr0(R) _OOr(0xd8e0,_rN(R)) +#define FSUB0r(R) _OOr(0xdce8,_rN(R)) +#define FSUBP0r(R) _OOr(0xdee8,_rN(R)) + +#define FSUBRr0(R) _OOr(0xd8e8,_rN(R)) +#define FSUBR0r(R) _OOr(0xdce0,_rN(R)) +#define FSUBRP0r(R) _OOr(0xdee0,_rN(R)) +#define FSUBRSm(D,B,I,S) _ESCmi(D,B,I,S,050) +#define FSUBRLm(D,B,I,S) _ESCmi(D,B,I,S,054) + +#define FMULr0(R) _OOr(0xd8c8,_rN(R)) +#define FMUL0r(R) _OOr(0xdcc8,_rN(R)) +#define FMULP0r(R) _OOr(0xdec8,_rN(R)) +#define FMULSm(D,B,I,S) _ESCmi(D,B,I,S,010) +#define FMULLm(D,B,I,S) _ESCmi(D,B,I,S,014) + +#define FDIVr0(R) _OOr(0xd8f0,_rN(R)) +#define FDIV0r(R) _OOr(0xdcf8,_rN(R)) +#define FDIVP0r(R) _OOr(0xdef8,_rN(R)) +#define FDIVSm(D,B,I,S) _ESCmi(D,B,I,S,060) +#define FDIVLm(D,B,I,S) _ESCmi(D,B,I,S,064) + +#define FDIVRr0(R) _OOr(0xd8f8,_rN(R)) +#define FDIVR0r(R) _OOr(0xdcf0,_rN(R)) +#define FDIVRP0r(R) _OOr(0xdef0,_rN(R)) +#define FDIVRSm(D,B,I,S) _ESCmi(D,B,I,S,070) +#define FDIVRLm(D,B,I,S) _ESCmi(D,B,I,S,074) + +#define FCMOVBr0(R) _OOr(0xdac0,_rN(R)) +#define FCMOVBEr0(R) _OOr(0xdad0,_rN(R)) +#define FCMOVEr0(R) _OOr(0xdac8,_rN(R)) +#define FCMOVNBr0(R) _OOr(0xdbc0,_rN(R)) +#define FCMOVNBEr0(R) _OOr(0xdbd0,_rN(R)) +#define FCMOVNEr0(R) _OOr(0xdbc8,_rN(R)) +#define FCMOVNUr0(R) _OOr(0xdbd8,_rN(R)) +#define FCMOVUr0(R) _OOr(0xdad8,_rN(R)) +#define FCOMIr0(R) _OOr(0xdbf0,_rN(R)) +#define FCOMIPr0(R) _OOr(0xdff0,_rN(R)) + +#define FCOMr(R) _OOr(0xd8d0,_rN(R)) +#define FCOMSm(D,B,I,S) _ESCmi(D,B,I,S,020) +#define FCOMLm(D,B,I,S) _ESCmi(D,B,I,S,024) + +#define FCOMPr(R) _OOr(0xd8d8,_rN(R)) +#define FCOMPSm(D,B,I,S) _ESCmi(D,B,I,S,030) +#define FCOMPLm(D,B,I,S) _ESCmi(D,B,I,S,034) + +#define FUCOMIr0(R) _OOr(0xdbe8,_rN(R)) +#define FUCOMIPr0(R) _OOr(0xdfe8,_rN(R)) +#define FUCOMPr(R) _OOr(0xdde8,_rN(R)) +#define FUCOMr(R) _OOr(0xdde0,_rN(R)) + +#define FIADDLm(D,B,I,S) _ESCmi(D,B,I,S,002) +#define FICOMLm(D,B,I,S) _ESCmi(D,B,I,S,022) +#define FICOMPLm(D,B,I,S) _ESCmi(D,B,I,S,032) +#define FIDIVLm(D,B,I,S) _ESCmi(D,B,I,S,062) +#define FIDIVRLm(D,B,I,S) _ESCmi(D,B,I,S,072) +#define FILDLm(D,B,I,S) _ESCmi(D,B,I,S,003) +#define FILDQm(D,B,I,S) _ESCmi(D,B,I,S,057) +#define FIMULLm(D,B,I,S) _ESCmi(D,B,I,S,012) +#define FISTLm(D,B,I,S) _ESCmi(D,B,I,S,023) +#define FISTPLm(D,B,I,S) _ESCmi(D,B,I,S,033) +#define FISTPQm(D,B,I,S) _ESCmi(D,B,I,S,077) +#define FISUBLm(D,B,I,S) _ESCmi(D,B,I,S,042) +#define FISUBRLm(D,B,I,S) _ESCmi(D,B,I,S,052) + +#define FREEr(R) _OOr(0xddc0,_rN(R)) +#define FXCHr(R) _OOr(0xd9c8,_rN(R)) + +#endif /* X86_RTASM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h new file mode 100644 index 000000000..6e3abb1e0 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -0,0 +1,543 @@ +/* + * compiler/compemu.h - Public interface and definitions + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> IA-32 and AMD64 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef COMPEMU_H +#define COMPEMU_H + +// #include "sysconfig.h" +#include "newcpu.h" + +#ifdef UAE +#ifdef CPU_64_BIT +typedef uae_u64 uintptr; +#else +typedef uae_u32 uintptr; +#endif +/* FIXME: cpummu.cpp also checks for USE_JIT, possibly others */ +// #define USE_JIT +#endif + +#ifdef USE_JIT + +#ifdef JIT_DEBUG +/* dump some information (m68k block, x86 block addresses) about the compiler state */ +extern void compiler_dumpstate(void); +#endif + +/* Now that we do block chaining, and also have linked lists on each tag, + TAGMASK can be much smaller and still do its job. Saves several megs + of memory! */ +#define TAGMASK 0x0000ffff +#define TAGSIZE (TAGMASK+1) +#define MAXRUN 1024 +#define cacheline(x) (((uintptr)x)&TAGMASK) + +extern uae_u8* start_pc_p; +extern uae_u32 start_pc; + +struct blockinfo_t; + +struct cpu_history { + uae_u16* location; +#ifdef UAE + uae_u8 specmem; +#endif +}; + +union cacheline { + cpuop_func* handler; + blockinfo_t * bi; +}; + +/* Use new spill/reload strategy when calling external functions */ +#define USE_OPTIMIZED_CALLS 0 +#if USE_OPTIMIZED_CALLS +#error implementation in progress +#endif + +/* (gb) When on, this option can save save up to 30% compilation time + * when many lazy flushes occur (e.g. apps in MacOS 8.x). + */ +#define USE_SEPARATE_BIA 1 + +/* Use chain of checksum_info_t to compute the block checksum */ +#define USE_CHECKSUM_INFO 1 + +/* Use code inlining, aka follow-up of constant jumps */ +#define USE_INLINING 1 + +/* Inlining requires the chained checksuming information */ +#if USE_INLINING +#undef USE_CHECKSUM_INFO +#define USE_CHECKSUM_INFO 1 +#endif + +/* Does flush_icache_range() only check for blocks falling in the requested range? */ +#define LAZY_FLUSH_ICACHE_RANGE 0 + +#define USE_F_ALIAS 1 +#define USE_OFFSET 1 +#define COMP_DEBUG 1 + +#if COMP_DEBUG +#define Dif(x) if (x) +#else +#define Dif(x) if (0) +#endif + +#define SCALE 2 + +#define BYTES_PER_INST 10240 /* paranoid ;-) */ +#if defined(CPU_arm) +#define LONGEST_68K_INST 256 /* The number of bytes the longest possible + 68k instruction takes */ +#else +#define LONGEST_68K_INST 16 /* The number of bytes the longest possible + 68k instruction takes */ +#endif +#define MAX_CHECKSUM_LEN 2048 /* The maximum size we calculate checksums + for. Anything larger will be flushed + unconditionally even with SOFT_FLUSH */ +#define MAX_HOLD_BI 3 /* One for the current block, and up to two + for jump targets */ + +#define INDIVIDUAL_INST 0 +#define FLAG_X 0x0010 +#define FLAG_N 0x0008 +#define FLAG_Z 0x0004 +#define FLAG_V 0x0002 +#define FLAG_C 0x0001 +#define FLAG_CZNV (FLAG_C | FLAG_Z | FLAG_N | FLAG_V) +#define FLAG_ALL (FLAG_C | FLAG_Z | FLAG_N | FLAG_V | FLAG_X) +#define FLAG_ZNV (FLAG_Z | FLAG_N | FLAG_V) + +#define KILLTHERAT 1 /* Set to 1 to avoid some partial_rat_stalls */ + +#if defined(CPU_arm) +#define USE_DATA_BUFFER +#define N_REGS 13 /* really 16, but 13 to 15 are SP, LR, PC */ +#else +#if defined(CPU_x86_64) +#define N_REGS 16 /* really only 15, but they are numbered 0-3,5-15 */ +#else +#define N_REGS 8 /* really only 7, but they are numbered 0,1,2,3,5,6,7 */ +#endif +#endif +#define N_FREGS 6 /* That leaves us two positions on the stack to play with */ + +/* Functions exposed to newcpu, or to what was moved from newcpu.c to + * compemu_support.c */ +#ifdef WINUAE_ARANYM +extern void compiler_init(void); +extern void compiler_exit(void); +extern bool compiler_use_jit(void); +#endif +extern void init_comp(void); +extern void flush(int save_regs); +extern void small_flush(int save_regs); +extern void set_target(uae_u8* t); +extern uae_u8* get_target(void); +extern void freescratch(void); +extern void build_comp(void); +extern void set_cache_state(int enabled); +extern int get_cache_state(void); +extern uae_u32 get_jitted_size(void); +#ifdef JIT +#ifdef WINUAE_ARANYM +extern void (*flush_icache)(int n); +#else +extern void flush_icache(int n); +#endif +#endif +extern void alloc_cache(void); +extern int check_for_cache_miss(void); + +/* JIT FPU compilation */ +extern void comp_fpp_opp (uae_u32 opcode, uae_u16 extra); +extern void comp_fbcc_opp (uae_u32 opcode); +extern void comp_fscc_opp (uae_u32 opcode, uae_u16 extra); +void comp_fdbcc_opp (uae_u32 opcode, uae_u16 extra); +void comp_ftrapcc_opp (uae_u32 opcode, uaecptr oldpc); +void comp_fsave_opp (uae_u32 opcode); +void comp_frestore_opp (uae_u32 opcode); + +extern uae_u32 needed_flags; +extern uae_u8* comp_pc_p; +extern void* pushall_call_handler; + +#define VREGS 32 +#define VFREGS 16 + +#define INMEM 1 +#define CLEAN 2 +#define DIRTY 3 +#define UNDEF 4 +#define ISCONST 5 + +typedef struct { + uae_u32* mem; + uae_u32 val; + uae_u8 is_swapped; + uae_u8 status; + uae_s8 realreg; /* gb-- realreg can hold -1 */ + uae_u8 realind; /* The index in the holds[] array */ + uae_u8 needflush; + uae_u8 validsize; + uae_u8 dirtysize; + uae_u8 dummy; +} reg_status; + +typedef struct { + uae_u32* mem; + double val; + uae_u8 status; + uae_s8 realreg; /* gb-- realreg can hold -1 */ + uae_u8 realind; + uae_u8 needflush; +} freg_status; + +#define PC_P 16 +#define FLAGX 17 +#define FLAGTMP 18 +#define NEXT_HANDLER 19 +#define S1 20 +#define S2 21 +#define S3 22 +#define S4 23 +#define S5 24 +#define S6 25 +#define S7 26 +#define S8 27 +#define S9 28 +#define S10 29 +#define S11 30 +#define S12 31 + +#define FP_RESULT 8 +#define FS1 9 +#define FS2 10 +#define FS3 11 + +typedef struct { + uae_u32 touched; + uae_s8 holds[VREGS]; + uae_u8 nholds; + uae_u8 canbyte; + uae_u8 canword; + uae_u8 locked; +} n_status; + +typedef struct { + uae_u32 touched; + uae_s8 holds[VFREGS]; + uae_u8 nholds; + uae_u8 locked; +} fn_status; + +/* For flag handling */ +#define NADA 1 +#define TRASH 2 +#define VALID 3 + +/* needflush values */ +#define NF_SCRATCH 0 +#define NF_TOMEM 1 +#define NF_HANDLER 2 + +typedef struct { + /* Integer part */ + reg_status state[VREGS]; + n_status nat[N_REGS]; + uae_u32 flags_on_stack; + uae_u32 flags_in_flags; + uae_u32 flags_are_important; + /* FPU part */ + freg_status fate[VFREGS]; + fn_status fat[N_FREGS]; + + /* x86 FPU part */ + uae_s8 spos[N_FREGS]; + uae_s8 onstack[6]; + uae_s8 tos; +} bigstate; + +typedef struct { + /* Integer part */ + uae_s8 virt[VREGS]; + uae_s8 nat[N_REGS]; +} smallstate; + +extern int touchcnt; + +#define IMM uae_s32 +#define RR1 uae_u32 +#define RR2 uae_u32 +#define RR4 uae_u32 +/* + R1, R2, R4 collides with ARM registers defined in ucontext +#define R1 uae_u32 +#define R2 uae_u32 +#define R4 uae_u32 +*/ +#define W1 uae_u32 +#define W2 uae_u32 +#define W4 uae_u32 +#define RW1 uae_u32 +#define RW2 uae_u32 +#define RW4 uae_u32 +#define MEMR uae_u32 +#define MEMW uae_u32 +#define MEMRW uae_u32 + +#define FW uae_u32 +#define FR uae_u32 +#define FRW uae_u32 + +#define MIDFUNC(nargs,func,args) void func args +#define MENDFUNC(nargs,func,args) +#define COMPCALL(func) func + +#define LOWFUNC(flags,mem,nargs,func,args) static inline void func args +#define LENDFUNC(flags,mem,nargs,func,args) + +/* What we expose to the outside */ +#define DECLARE_MIDFUNC(func) extern void func + +#if defined(CPU_arm) + +#include "compemu_midfunc_arm.h" + +#if defined(USE_JIT2) +#include "compemu_midfunc_arm2.h" +#endif +#endif + +#if defined(CPU_i386) || defined(CPU_x86_64) +#include "compemu_midfunc_x86.h" +#endif + +#undef DECLARE_MIDFUNC + +extern int failure; +#define FAIL(x) do { failure|=x; } while (0) + +/* Convenience functions exposed to gencomp */ +extern uae_u32 m68k_pc_offset; +extern void readbyte(int address, int dest, int tmp); +extern void readword(int address, int dest, int tmp); +extern void readlong(int address, int dest, int tmp); +extern void writebyte(int address, int source, int tmp); +extern void writeword(int address, int source, int tmp); +extern void writelong(int address, int source, int tmp); +extern void writeword_clobber(int address, int source, int tmp); +extern void writelong_clobber(int address, int source, int tmp); +extern void get_n_addr(int address, int dest, int tmp); +extern void get_n_addr_jmp(int address, int dest, int tmp); +extern void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp); +/* Set native Z flag only if register is zero */ +extern void set_zero(int r, int tmp); +extern int kill_rodent(int r); +#define SYNC_PC_OFFSET 100 +extern void sync_m68k_pc(void); +extern uae_u32 get_const(int r); +extern int is_const(int r); +extern void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond); + +#define comp_get_ibyte(o) do_get_mem_byte((uae_u8 *)(comp_pc_p + (o) + 1)) +#define comp_get_iword(o) do_get_mem_word((uae_u16 *)(comp_pc_p + (o))) +#define comp_get_ilong(o) do_get_mem_long((uae_u32 *)(comp_pc_p + (o))) + +struct blockinfo_t; + +typedef struct dep_t { + uae_u32* jmp_off; + struct blockinfo_t* target; + struct blockinfo_t* source; + struct dep_t** prev_p; + struct dep_t* next; +} dependency; + +typedef struct checksum_info_t { + uae_u8 *start_p; + uae_u32 length; + struct checksum_info_t *next; +} checksum_info; + +typedef struct blockinfo_t { + uae_s32 count; + cpuop_func* direct_handler_to_use; + cpuop_func* handler_to_use; + /* The direct handler does not check for the correct address */ + + cpuop_func* handler; + cpuop_func* direct_handler; + + cpuop_func* direct_pen; + cpuop_func* direct_pcc; + +#ifdef UAE + uae_u8* nexthandler; +#endif + uae_u8* pc_p; + + uae_u32 c1; + uae_u32 c2; +#if USE_CHECKSUM_INFO + checksum_info *csi; +#else + uae_u32 len; + uae_u32 min_pcp; +#endif + + struct blockinfo_t* next_same_cl; + struct blockinfo_t** prev_same_cl_p; + struct blockinfo_t* next; + struct blockinfo_t** prev_p; + + uae_u8 optlevel; + uae_u8 needed_flags; + uae_u8 status; + uae_u8 havestate; + + dependency dep[2]; /* Holds things we depend on */ + dependency* deplist; /* List of things that depend on this */ + smallstate env; + +#ifdef JIT_DEBUG + /* (gb) size of the compiled block (direct handler) */ + uae_u32 direct_handler_size; +#endif +} blockinfo; + +#define BI_INVALID 0 +#define BI_ACTIVE 1 +#define BI_NEED_RECOMP 2 +#define BI_NEED_CHECK 3 +#define BI_CHECKING 4 +#define BI_COMPILING 5 +#define BI_FINALIZING 6 + +void execute_normal(void); +void exec_nostats(void); +void do_nothing(void); + +#else + +static inline void flush_icache(int) { } +static inline void build_comp() { } + +#endif /* !USE_JIT */ + +#ifdef UAE + +typedef struct { + uae_u8 type; + uae_u8 reg; + uae_u32 next; +} regacc; + +#define JIT_EXCEPTION_HANDLER +// #define JIT_ALWAYS_DISTRUST + +/* ARAnyM uses fpu_register name, used in scratch_t */ +/* FIXME: check that no ARAnyM code assumes different floating point type */ +typedef fptype fpu_register; + +extern void compile_block(cpu_history* pc_hist, int blocklen, int totcyles); + +#define MAXCYCLES (1000 * CYCLE_UNIT) +#define scaled_cycles(x) (currprefs.m68k_speed<0?(((x)/SCALE)?(((x)/SCALE (uintptr_t) 0xffffffff) { + jit_abort("JIT: 64-bit pointer (0x%llx) at %s:%d (fatal)", + (unsigned long long)address, file, line); + } + return (uae_u32) address; +} +#define uae_p32(x) (check_uae_p32((uintptr)(x), __FILE__, __LINE__)) +#else +#define uae_p32(x) ((uae_u32)(x)) +#endif + +#endif /* COMPEMU_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu1.cpp b/BasiliskII/src/uae_cpu/compiler/compemu1.cpp new file mode 100644 index 000000000..297c62505 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu1.cpp @@ -0,0 +1,2 @@ +#define PART_1 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu2.cpp b/BasiliskII/src/uae_cpu/compiler/compemu2.cpp new file mode 100644 index 000000000..8c0ddeacd --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu2.cpp @@ -0,0 +1,2 @@ +#define PART_2 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu3.cpp b/BasiliskII/src/uae_cpu/compiler/compemu3.cpp new file mode 100644 index 000000000..975e0669d --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu3.cpp @@ -0,0 +1,2 @@ +#define PART_3 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu4.cpp b/BasiliskII/src/uae_cpu/compiler/compemu4.cpp new file mode 100644 index 000000000..a49b5444e --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu4.cpp @@ -0,0 +1,2 @@ +#define PART_4 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu5.cpp b/BasiliskII/src/uae_cpu/compiler/compemu5.cpp new file mode 100644 index 000000000..41e872f68 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu5.cpp @@ -0,0 +1,2 @@ +#define PART_5 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu6.cpp b/BasiliskII/src/uae_cpu/compiler/compemu6.cpp new file mode 100644 index 000000000..9156e5974 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu6.cpp @@ -0,0 +1,2 @@ +#define PART_6 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu7.cpp b/BasiliskII/src/uae_cpu/compiler/compemu7.cpp new file mode 100644 index 000000000..63108e047 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu7.cpp @@ -0,0 +1,2 @@ +#define PART_7 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu8.cpp b/BasiliskII/src/uae_cpu/compiler/compemu8.cpp new file mode 100644 index 000000000..543f9dfd7 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu8.cpp @@ -0,0 +1,2 @@ +#define PART_8 +#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp new file mode 100644 index 000000000..cef6d43e5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -0,0 +1,1638 @@ +/* + * compiler/compemu_fpp.cpp - Dynamic translation of FPU instructions + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> IA-32 and AMD64 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68881 emulation + * + * Copyright 1996 Herman ten Brugge + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + */ + +#include "sysdeps.h" + +# include +# include +# include + +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" + +#define DEBUG 0 +#include "debug.h" + +// gb-- WARNING: get_fpcr() and set_fpcr() support is experimental +#define HANDLE_FPCR 0 + +// - IEEE-based fpu core must be used +#if defined(FPU_IEEE) +# define CAN_HANDLE_FPCR +#endif + +// - Generic rounding mode and precision modes are supported if set together +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) +# define CAN_HANDLE_FPCR +#endif + +// - X86 rounding mode and precision modes are *not* supported but might work (?!) +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +# define CAN_HANDLE_FPCR +#endif + +#if HANDLE_FPCR && !defined(CAN_HANDLE_FPCR) +# warning "Can't handle FPCR, will FAIL(1) at runtime" +# undef HANDLE_FPCR +# define HANDLE_FPCR 0 +#endif + +#define STATIC_INLINE static inline +#define MAKE_FPSR(r) do { fmov_rr(FP_RESULT,r); } while (0) + +#define delay nop() ;nop() +#define delay2 nop() ;nop() + +#define UNKNOWN_EXTRA 0xFFFFFFFF +static void fpuop_illg(uae_u32 opcode, uae_u32 /* extra */) +{ +/* + if (extra == UNKNOWN_EXTRA) + printf("FPU opcode %x, extra UNKNOWN_EXTRA\n",opcode & 0xFFFF); + else + printf("FPU opcode %x, extra %x\n",opcode & 0xFFFF,extra & 0xFFFF); +*/ + op_illg(opcode); +} + +uae_s32 temp_fp[4]; /* To convert between FP/integer */ + +/* return register number, or -1 for failure */ +STATIC_INLINE int get_fp_value (uae_u32 opcode, uae_u16 extra) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) { + return ((extra >> 10) & 7); + } + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + switch (mode) { + case 0: + switch (size) { + case 6: + sign_extend_8_rr(S1,reg); + mov_l_mr((uintptr)temp_fp,S1); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 4: + sign_extend_16_rr(S1,reg); + mov_l_mr((uintptr)temp_fp,S1); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 0: + mov_l_mr((uintptr)temp_fp,reg); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 1: + mov_l_mr((uintptr)temp_fp,reg); + delay2; + fmovs_rm(FS1,(uintptr)temp_fp); + return FS1; + default: + return -1; + } + return -1; /* Should be unreachable */ + case 1: + return -1; /* Genuine invalid instruction */ + default: + break; + } + /* OK, we *will* have to load something from an address. Let's make + sure we know how to handle that, or quit early --- i.e. *before* + we do any postincrement/predecrement that we may regret */ + + switch (size) { + case 3: + return -1; + case 0: + case 1: + case 2: + case 4: + case 5: + case 6: + break; + default: + return -1; + } + + switch (mode) { + case 2: + ad=S1; /* We will change it, anyway ;-) */ + mov_l_rr(ad,reg+8); + break; + case 3: + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); + break; + case 4: + ad=S1; + + lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); + mov_l_rr(ad,reg+8); + break; + case 5: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(ad,ad,off); + break; + } + case 6: + { + uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + calc_disp_ea_020(reg+8,dp,ad,S2); + break; + } + case 7: + switch (reg) { + case 0: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 1: + { + uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 2: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,address+PC16off); + break; + } + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ m68k_pc_offset; + ad=S1; + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if (size == 6) address++; + mov_l_ri(ad,address); + m68k_pc_offset+=sz2[size]; + break; + } + default: + return -1; + } + } + + switch (size) { + case 0: + readlong(ad,S2,S3); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + case 1: + readlong(ad,S2,S3); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovs_rm(FS1,(uintptr)temp_fp); + break; + case 2: + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + delay2; + fmov_ext_rm(FS1,(uintptr)(temp_fp)); + break; + case 3: + return -1; /* Some silly "packed" stuff */ + case 4: + readword(ad,S2,S3); + sign_extend_16_rr(S2,S2); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + case 5: + readlong(ad,S2,S3); + mov_l_mr(((uintptr)temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + delay2; + fmov_rm(FS1,(uintptr)(temp_fp)); + break; + case 6: + readbyte(ad,S2,S3); + sign_extend_8_rr(S2,S2); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + default: + return -1; + } + return FS1; +} + +/* return of -1 means failure, >=0 means OK */ +STATIC_INLINE int put_fp_value (int val, uae_u32 opcode, uae_u16 extra) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) { + const int dest_reg = (extra >> 10) & 7; + fmov_rr(dest_reg, val); + // gb-- status register is affected + MAKE_FPSR(dest_reg); + return 0; + } + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = (uae_u32)-1; + switch (mode) { + case 0: + switch (size) { + case 6: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_b_rm(reg,(uintptr)temp_fp); + return 0; + case 4: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_w_rm(reg,(uintptr)temp_fp); + return 0; + case 0: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(reg,(uintptr)temp_fp); + return 0; + case 1: + fmovs_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(reg,(uintptr)temp_fp); + return 0; + default: + return -1; + } + case 1: + return -1; /* genuine invalid instruction */ + default: break; + } + + /* Let's make sure we get out *before* doing something silly if + we can't handle the size */ + switch (size) { + case 0: + case 4: + case 5: + case 6: + case 2: + case 1: + break; + case 3: + default: + return -1; + } + + switch (mode) { + case 2: + ad=S1; + mov_l_rr(ad,reg+8); + break; + case 3: + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); + break; + case 4: + ad=S1; + lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); + mov_l_rr(ad,reg+8); + break; + case 5: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_rr(ad,reg+8); + add_l_ri(ad,off); + break; + } + case 6: + { + uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + calc_disp_ea_020(reg+8,dp,ad,S2); + break; + } + case 7: + switch (reg) { + case 0: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 1: + { + uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 2: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,address+PC16off); + break; + } + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + ad=S1; + mov_l_ri(ad,address); + m68k_pc_offset+=sz2[size]; + break; + } + default: + return -1; + } + } + switch (size) { + case 0: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 1: + fmovs_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 2: + fmov_ext_mr((uintptr)temp_fp,val); + delay; + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 3: return -1; /* Packed */ + + case 4: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writeword_clobber(ad,S2,S3); + break; + case 5: + fmov_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 6: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writebyte(ad,S2,S3); + break; + default: + return -1; + } + return 0; +} + +/* return -1 for failure, or register number for success */ +STATIC_INLINE int get_fp_ad (uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + uae_s32 off; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return -1; + case 2: + case 3: + case 4: + mov_l_rr(S1,8+reg); + return S1; + *ad = m68k_areg (regs, reg); + break; + case 5: + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + + mov_l_rr(S1,8+reg); + add_l_ri(S1,off); + return S1; + case 6: + return -1; + break; + case 7: + switch (reg) { + case 0: + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + mov_l_ri(S1,off); + return S1; + case 1: + off=comp_get_ilong((m68k_pc_offset+=4)-4); + mov_l_ri(S1,off); + return S1; + case 2: + return -1; +// *ad = m68k_getpc (); +// *ad += (uae_s32) (uae_s16) next_iword (); + off=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset; + off+=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + mov_l_ri(S1,off); + return S1; + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return -1; + } + } + abort(); +} + +void comp_fdbcc_opp (uae_u32 /* opcode */, uae_u16 /* extra */) +{ + FAIL(1); + return; +} + +void comp_fscc_opp (uae_u32 opcode, uae_u16 extra) +{ + uae_u32 ad; + int cc; + int reg; + +#ifdef DEBUG_FPP + printf ("fscc_opp at %08lx\n", m68k_getpc ()); + fflush (stdout); +#endif + + + if (extra&0x20) { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode & 0x38) != 0) { /* We can only do to integer register */ + FAIL(1); + return; + } + + fflags_into_flags(S2); + reg=(opcode&7); + + mov_l_ri(S1,255); + mov_l_ri(S4,0); + switch(extra&0x0f) { /* according to fpp.c, the 0x10 bit is ignored + */ + case 0: break; /* set never */ + case 1: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,4); + cmov_l_rr(S4,S2,10); break; + case 2: cmov_l_rr(S4,S1,7); break; + case 3: cmov_l_rr(S4,S1,3); break; + case 4: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,2); + cmov_l_rr(S4,S2,10); break; + case 5: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,6); + cmov_l_rr(S4,S2,10); break; + case 6: cmov_l_rr(S4,S1,5); break; + case 7: cmov_l_rr(S4,S1,11); break; + case 8: cmov_l_rr(S4,S1,10); break; + case 9: cmov_l_rr(S4,S1,4); break; + case 10: cmov_l_rr(S4,S1,10); cmov_l_rr(S4,S1,7); break; + case 11: cmov_l_rr(S4,S1,4); cmov_l_rr(S4,S1,3); break; + case 12: cmov_l_rr(S4,S1,2); break; + case 13: cmov_l_rr(S4,S1,6); break; + case 14: cmov_l_rr(S4,S1,5); cmov_l_rr(S4,S1,10); break; + case 15: mov_l_rr(S4,S1); break; + } + + if ((opcode & 0x38) == 0) { + mov_b_rr(reg,S4); + } else { + abort(); + if (get_fp_ad (opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); + } else + put_byte (ad, cc ? 0xff : 0x00); + } +} + +void comp_ftrapcc_opp (uae_u32 /* opcode */, uaecptr /* oldpc */) +{ + FAIL(1); + return; +} + +void comp_fbcc_opp (uae_u32 opcode) +{ + uae_u32 start_68k_offset=m68k_pc_offset; + uae_u32 off; + uae_u32 v1; + uae_u32 v2; + int cc; + + // comp_pc_p is expected to be bound to 32-bit addresses + assert((uintptr)comp_pc_p <= 0xffffffffUL); + + if (opcode&0x20) { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode&0x40)==0) { + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + } + else { + off=comp_get_ilong((m68k_pc_offset+=4)-4); + } + mov_l_ri(S1,(uintptr) + (comp_pc_p+off-(m68k_pc_offset-start_68k_offset))); + mov_l_ri(PC_P,(uintptr)comp_pc_p); + + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + add_l_ri(S1,m68k_pc_offset); + add_l_ri(PC_P,m68k_pc_offset); + m68k_pc_offset=0; + + /* according to fpp.c, the 0x10 bit is ignored + (it handles exception handling, which we don't + do, anyway ;-) */ + cc=opcode&0x0f; + v1=get_const(PC_P); + v2=get_const(S1); + fflags_into_flags(S2); + + switch(cc) { + case 0: break; /* jump never */ + case 1: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,4); + cmov_l_rr(PC_P,S2,10); break; + case 2: register_branch(v1,v2,7); break; + case 3: register_branch(v1,v2,3); break; + case 4: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,2); + cmov_l_rr(PC_P,S2,10); break; + case 5: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,6); + cmov_l_rr(PC_P,S2,10); break; + case 6: register_branch(v1,v2,5); break; + case 7: register_branch(v1,v2,11); break; + case 8: register_branch(v1,v2,10); break; + case 9: register_branch(v1,v2,4); break; + case 10: + cmov_l_rr(PC_P,S1,10); + cmov_l_rr(PC_P,S1,7); break; + case 11: + cmov_l_rr(PC_P,S1,4); + cmov_l_rr(PC_P,S1,3); break; + case 12: register_branch(v1,v2,2); break; + case 13: register_branch(v1,v2,6); break; + case 14: + cmov_l_rr(PC_P,S1,5); + cmov_l_rr(PC_P,S1,10); break; + case 15: mov_l_rr(PC_P,S1); break; + } +} + + /* Floating point conditions + The "NotANumber" part could be problematic; Howver, when NaN is + encountered, the ftst instruction sets bot N and Z to 1 on the x87, + so quite often things just fall into place. This is probably not + accurate wrt the 68k FPU, but it is *as* accurate as this was before. + However, some more thought should go into fixing this stuff up so + it accurately emulates the 68k FPU. +>==> 13) & 0x7) { + case 3: /* 2nd most common */ + if (put_fp_value ((extra >> 7)&7 , opcode, extra) < 0) { + FAIL(1); + return; + + } + return; + case 6: + case 7: + { + uae_u32 ad, list = 0; + int incr = 0; + if (extra & 0x2000) { + + /* FMOVEM FPP->memory */ + switch ((extra >> 11) & 3) { /* Get out early if failure */ + case 0: + case 2: + break; + case 1: + case 3: + default: + FAIL(1); return; + } + ad=get_fp_ad (opcode, &ad); + if ((uae_s32)ad<0) { + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); + } + if (incr < 0) { /* Predecrement */ + for (reg = 7; reg >= 0; reg--) { + if (list & 0x80) { + fmov_ext_mr((uintptr)temp_fp,reg); + delay; + sub_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + sub_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + sub_l_ri(ad,4); + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + } + list <<= 1; + } + } + else { /* Postincrement */ + for (reg = 0; reg < 8; reg++) { + if (list & 0x80) { + fmov_ext_mr((uintptr)temp_fp,reg); + delay; + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7)+8,ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7)+8,ad); + } else { + /* FMOVEM memory->FPP */ + + uae_u32 ad; + switch ((extra >> 11) & 3) { /* Get out early if failure */ + case 0: + case 2: + break; + case 1: + case 3: + default: + FAIL(1); return; + } + ad=get_fp_ad (opcode, &ad); + if ((uae_s32)ad<0) { + m68k_setpc (m68k_getpc () - 4); + D(bug("no ad\n")); + fpuop_illg (opcode,extra); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); + } + + if (incr < 0) { + // not reached + for (reg = 7; reg >= 0; reg--) { + if (list & 0x80) { + sub_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + sub_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + sub_l_ri(ad,4); + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + delay2; + fmov_ext_rm(reg,(uintptr)(temp_fp)); + } + list <<= 1; + } + } + else { + for (reg = 0; reg < 8; reg++) { + if (list & 0x80) { + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + add_l_ri(ad,4); + delay2; + fmov_ext_rm(reg,(uintptr)(temp_fp)); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7)+8,ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7)+8,ad); + } + } + return; + + case 4: + case 5: /* rare */ + if ((opcode & 0x30) == 0) { + if (extra & 0x2000) { + if (extra & 0x1000) { +#if HANDLE_FPCR + mov_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_mode); + or_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_precision); +#else + FAIL(1); + return; +#endif + } + if (extra & 0x0800) { + FAIL(1); + return; + } + if (extra & 0x0400) { + mov_l_rm(opcode & 15,(uintptr)&fpu.instruction_address); + return; + } + } else { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) { + // set_fpsr(m68k_dreg (regs, opcode & 15)); + FAIL(1); + return; + } + if (extra & 0x1000) { +#if HANDLE_FPCR +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) + FAIL(1); + return; +#endif + mov_l_rr(S1,opcode & 15); + mov_l_rr(S2,opcode & 15); + and_l_ri(S1,FPCR_ROUNDING_PRECISION); + and_l_ri(S2,FPCR_ROUNDING_MODE); + mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); + mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); +#else + FAIL(1); + return; +#endif +// return; gb-- FMOVEM could also operate on fpiar + } + if (extra & 0x0400) { + mov_l_mr((uintptr)&fpu.instruction_address,opcode & 15); +// return; gb-- we have to process all FMOVEM bits before returning + } + return; + } + } else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) { + FAIL(1); + return; + } + if (extra & 0x1000) { + comp_get_ilong((m68k_pc_offset+=4)-4); +#if HANDLE_FPCR +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) + FAIL(1); + return; +#endif +// mov_l_mi((uintptr)®s.fpcr,val); + mov_l_ri(S1,val); + mov_l_ri(S2,val); + and_l_ri(S1,FPCR_ROUNDING_PRECISION); + and_l_ri(S2,FPCR_ROUNDING_MODE); + mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); + mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); +#else + FAIL(1); + return; +#endif +// return; gb-- FMOVEM could also operate on fpiar + } + if (extra & 0x0400) { + uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); + mov_l_mi((uintptr)&fpu.instruction_address,val); +// return; gb-- we have to process all FMOVEM bits before returning + } + return; + } + FAIL(1); + return; + } else if (extra & 0x2000) { + FAIL(1); + return; + } else { + FAIL(1); + return; + } + FAIL(1); + return; + + case 0: + case 2: /* Extremely common */ + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + switch (extra & 0x7f) { + case 0x00: + fmov_pi(reg); + break; + case 0x0b: + fmov_log10_2(reg); + break; + case 0x0c: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_e); +#else + fmov_rm(reg,(uintptr)&const_e); +#endif + break; + case 0x0d: + fmov_log2_e(reg); + break; + case 0x0e: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_log10_e); +#else + fmov_rm(reg,(uintptr)&const_log10_e); +#endif + break; + case 0x0f: + fmov_0(reg); + break; + case 0x30: + fmov_loge_2(reg); + break; + case 0x31: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_loge_10); +#else + fmov_rm(reg,(uintptr)&const_loge_10); +#endif + break; + case 0x32: + fmov_1(reg); + break; + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + case 0x38: + case 0x39: + case 0x3a: + case 0x3b: +#if USE_LONG_DOUBLE + case 0x3c: + case 0x3d: + case 0x3e: + case 0x3f: + fmov_ext_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); +#else + fmov_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); +#endif + break; + default: + /* This is not valid, so we fail */ + FAIL(1); + return; + } + return; + } + + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + case 0x40: /* Explicit rounding. This is just a quick fix. Same + * for all other cases that have three choices */ + case 0x44: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(reg,src); + MAKE_FPSR (src); + break; + case 0x01: /* FINT */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x02: /* FSINH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x03: /* FINTRZ */ +#ifdef USE_X86_FPUCW + /* If we have control over the CW, we can do this */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + mov_l_ri(S1,16); /* Switch to "round to zero" mode */ + fldcw_m_indexed(S1,(uae_u32)x86_fpucw); + + frndint_rr(reg,src); + + /* restore control word */ + mov_l_rm(S1,(uintptr)®s.fpcr); + and_l_ri(S1,0x000000f0); + fldcw_m_indexed(S1,(uintptr)x86_fpucw); + + MAKE_FPSR (reg); + break; +#endif + FAIL(1); + return; + break; + case 0x04: /* FSQRT */ + case 0x41: + case 0x45: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsqrt_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x06: /* FLOGNP1 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x08: /* FETOXM1 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x09: /* FTANH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0a: /* FATAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0c: /* FASIN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0d: /* FATANH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0e: /* FSIN */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsin_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x0f: /* FTAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x10: /* FETOX */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fetox_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x11: /* FTWOTOX */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + ftwotox_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x12: /* FTENTOX */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x14: /* FLOGN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x15: /* FLOG10 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x16: /* FLOG2 */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + flog2_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x18: /* FABS */ + case 0x58: + case 0x5c: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fabs_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x19: /* FCOSH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1a: /* FNEG */ + case 0x5a: + case 0x5e: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fneg_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x1c: /* FACOS */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1d: /* FCOS */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fcos_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x1e: /* FGETEXP */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1f: /* FGETMAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x20: /* FDIV */ + case 0x60: + case 0x64: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fdiv_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x21: /* FMOD */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + frem_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x22: /* FADD */ + case 0x62: + case 0x66: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fadd_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x23: /* FMUL */ + case 0x63: + case 0x67: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmul_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x24: /* FSGLDIV */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fdiv_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x25: /* FREM */ + // gb-- disabled because the quotient byte must be computed + // otherwise, free rotation in ClarisWorks doesn't work. + FAIL(1); + return; + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + frem1_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x26: /* FSCALE */ + dont_care_fflags(); + FAIL(1); + return; + break; + case 0x27: /* FSGLMUL */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmul_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x28: /* FSUB */ + case 0x68: + case 0x6c: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsub_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x38: /* FCMP */ + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT,reg); + fsub_rr(FP_RESULT,src); /* Right way? */ + break; + case 0x3a: /* FTST */ + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT,src); + break; + default: + FAIL(1); + return; + break; + } + return; + } + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); +} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp new file mode 100644 index 000000000..6c1ede097 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp @@ -0,0 +1,2106 @@ +/* + * compiler/compemu_midfunc_arm.cpp - Native MIDFUNCS for ARM + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu_support.cpp + * + */ + +/******************************************************************** + * CPU functions exposed to gencomp. Both CREATE and EMIT time * + ********************************************************************/ + +/* + * RULES FOR HANDLING REGISTERS: + * + * * In the function headers, order the parameters + * - 1st registers written to + * - 2nd read/modify/write registers + * - 3rd registers read from + * * Before calling raw_*, you must call readreg, writereg or rmw for + * each register + * * The order for this is + * - 1st call remove_offset for all registers written to with size<4 + * - 2nd call readreg for all registers read without offset + * - 3rd call rmw for all rmw registers + * - 4th call readreg_offset for all registers that can handle offsets + * - 5th call get_offset for all the registers from the previous step + * - 6th call writereg for all written-to registers + * - 7th call raw_* + * - 8th unlock2 all registers that were locked + */ + +MIDFUNC(0,live_flags,(void)) +{ + live.flags_on_stack=TRASH; + live.flags_in_flags=VALID; + live.flags_are_important=1; +} +MENDFUNC(0,live_flags,(void)) + +MIDFUNC(0,dont_care_flags,(void)) +{ + live.flags_are_important=0; +} +MENDFUNC(0,dont_care_flags,(void)) + +MIDFUNC(0,duplicate_carry,(void)) +{ + evict(FLAGX); + make_flags_live_internal(); + COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem,NATIVE_CC_CS); + log_vwrite(FLAGX); +} +MENDFUNC(0,duplicate_carry,(void)) + +MIDFUNC(0,restore_carry,(void)) +{ +#if defined(USE_JIT2) + RR4 r=readreg(FLAGX,4); + MRS_CPSR(REG_WORK1); + TEQ_ri(r,1); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_C_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSRf_r(REG_WORK1); + unlock2(r); +#else + if (!have_rat_stall) { /* Not a P6 core, i.e. no partial stalls */ + bt_l_ri_noclobber(FLAGX,0); + } + else { /* Avoid the stall the above creates. + This is slow on non-P6, though. + */ + COMPCALL(rol_b_ri(FLAGX,8)); + isclean(FLAGX); + } +#endif +} +MENDFUNC(0,restore_carry,(void)) + +MIDFUNC(0,start_needflags,(void)) +{ + needflags=1; +} +MENDFUNC(0,start_needflags,(void)) + +MIDFUNC(0,end_needflags,(void)) +{ + needflags=0; +} +MENDFUNC(0,end_needflags,(void)) + +MIDFUNC(0,make_flags_live,(void)) +{ + make_flags_live_internal(); +} +MENDFUNC(0,make_flags_live,(void)) + +MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ +{ + int size=4; + if (i<16) + size=2; + CLOBBER_BT; + r=readreg(r,size); + raw_bt_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ + +MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ +{ + CLOBBER_BT; + r=readreg(r,4); + b=readreg(b,4); + raw_bt_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ + +MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_btc_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_btr_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_bts_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,4); + raw_mov_l_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_l_rm,(W4 d, IMM s)) + +MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) +{ + CLOBBER_MOV; + index=readreg(index,4); + d=writereg(d,4); + raw_mov_l_rm_indexed(d,base,index,factor); + unlock2(index); + unlock2(d); +} +MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) + +MIDFUNC(2,mov_l_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_l_mi(d,s); +} +MENDFUNC(2,mov_l_mi,(IMM d, IMM s)) + +MIDFUNC(2,mov_w_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_w_mi(d,s); +} +MENDFUNC(2,mov_w_mi,(IMM d, IMM s)) + +MIDFUNC(2,mov_b_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_b_mi(d,s); +} +MENDFUNC(2,mov_b_mi,(IMM d, IMM s)) + +MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,1,1); + raw_rol_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,2,2); + raw_rol_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,4,4); + raw_rol_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(rol_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROL; + r=readreg(r,1); + d=rmw(d,4,4); + raw_rol_l_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(rol_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROL; + r=readreg(r,1); + d=rmw(d,2,2); + raw_rol_w_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(rol_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROL; + r=readreg(r,1); + d=rmw(d,1,1); + raw_rol_b_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) + +MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shll_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHLL; + r=readreg(r,1); + d=rmw(d,4,4); + raw_shll_l_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shll_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHLL; + r=readreg(r,1); + d=rmw(d,2,2); + raw_shll_w_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shll_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHLL; + r=readreg(r,1); + d=rmw(d,1,1); + raw_shll_b_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) + +MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,1,1); + raw_ror_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_b_ri,(RR1 r, IMM i)) + +MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,2,2); + raw_ror_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_w_ri,(RR2 r, IMM i)) + +MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,4,4); + raw_ror_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_l_ri,(RR4 r, IMM i)) + +MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROR; + r=readreg(r,1); + d=rmw(d,4,4); + raw_ror_l_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) + +MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROR; + r=readreg(r,1); + d=rmw(d,2,2); + raw_ror_w_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) + +MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_ROR; + r=readreg(r,1); + d=rmw(d,1,1); + raw_ror_b_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) + +MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shrl_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRL; + r=readreg(r,1); + d=rmw(d,4,4); + raw_shrl_l_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shrl_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRL; + r=readreg(r,1); + d=rmw(d,2,2); + raw_shrl_w_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shrl_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHRL; + r=readreg(r,1); + d=rmw(d,1,1); + raw_shrl_b_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) + +MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(r) && !needflags) { + live.state[r].val<<=i; + return; + } + CLOBBER_SHLL; + r=rmw(r,4,4); + raw_shll_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHLL; + r=rmw(r,2,2); + raw_shll_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHLL; + r=rmw(r,1,1); + raw_shll_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(r) && !needflags) { + live.state[r].val>>=i; + return; + } + CLOBBER_SHRL; + r=rmw(r,4,4); + raw_shrl_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,2,2); + raw_shrl_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,1,1); + raw_shrl_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,4,4); + raw_shra_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,2,2); + raw_shra_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,1,1); + raw_shra_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg(r,1); + d=rmw(d,4,4); + raw_shra_l_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg(r,1); + d=rmw(d,2,2); + raw_shra_w_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHRA; + r=readreg(r,1); + d=rmw(d,1,1); + raw_shra_b_rr(d,r); + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) + +MIDFUNC(2,setcc,(W1 d, IMM cc)) +{ + CLOBBER_SETCC; + d=writereg(d,1); + raw_setcc(d,cc); + unlock2(d); +} +MENDFUNC(2,setcc,(W1 d, IMM cc)) + +MIDFUNC(2,setcc_m,(IMM d, IMM cc)) +{ + CLOBBER_SETCC; + raw_setcc_m(d,cc); +} +MENDFUNC(2,setcc_m,(IMM d, IMM cc)) + +MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) +{ + if (d==s) + return; + CLOBBER_CMOV; + s=readreg(s,4); + d=rmw(d,4,4); + raw_cmov_l_rr(d,s,cc); + unlock2(s); + unlock2(d); +} +MENDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) + +MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) +{ + CLOBBER_BSF; + s = readreg(s, 4); + d = writereg(d, 4); + raw_bsf_l_rr(d, s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,bsf_l_rr,(W4 d, W4 s)) + +/* Set the Z flag depending on the value in s. Note that the + value has to be 0 or -1 (or, more precisely, for non-zero + values, bit 14 must be set)! */ +MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) +{ + CLOBBER_BSF; + s=rmw_specific(s,4,4,FLAG_NREG3); + tmp=writereg(tmp,4); + raw_flags_set_zero(s, tmp); + unlock2(tmp); + unlock2(s); +} +MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) + +MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) +{ + CLOBBER_MUL; + s=readreg(s,4); + d=rmw(d,4,4); + raw_imul_32_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_32_32,(RW4 d, RR4 s)) + +MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_imul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_mul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s16)live.state[s].val); + return; + } + + CLOBBER_SE16; + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_sign_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) + +MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_SE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_sign_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) + +MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u16)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE16; + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_zero_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) + +MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) +{ + int isrmw; + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_zero_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) + +MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=writereg(d,1); + raw_mov_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_b_rr,(W1 d, RR1 s)) + +MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=writereg(d,2); + raw_mov_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_w_rr,(W2 d, RR2 s)) + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,4); + + raw_mov_l_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,2); + + raw_mov_w_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,4); + + raw_mov_l_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,2); + + raw_mov_w_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_b_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,1); + + raw_mov_b_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) + +MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_l_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) + +MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_w_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) + +/* Warning! OFFSET is byte sized only! */ +MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_l_Ri)(d,live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg(d,4); + + raw_mov_l_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) + +MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_w_Ri)(d,(uae_u16)live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg(d,4); + raw_mov_w_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) + +MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val+offset); + return; + } +#if USE_OFFSET + if (d==s) { + add_offset(d,offset); + return; + } +#endif + CLOBBER_LEA; + s=readreg(s,4); + d=writereg(d,4); + raw_lea_l_brr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) + +MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) +{ + if (!offset) { + COMPCALL(lea_l_rr_indexed)(d,s,index,factor); + return; + } + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_brr_indexed(d,s,index,factor,offset); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) + +MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) +{ + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_rr_indexed(d,s,index,factor); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) + +/* write d to the long at the address contained in s+offset */ +MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + + raw_mov_l_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) + +/* write the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) +{ + int dreg=d; + + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) + +MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_b_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_b_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) + +MIDFUNC(1,mid_bswap_32,(RW4 r)) +{ + + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=reverse32(oldv); + return; + } + + CLOBBER_SW32; + r=rmw(r,4,4); + raw_bswap_32(r); + unlock2(r); +} +MENDFUNC(1,mid_bswap_32,(RW4 r)) + +MIDFUNC(1,mid_bswap_16,(RW2 r)) +{ + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=((oldv>>8)&0xff) | ((oldv<<8)&0xff00) | + (oldv&0xffff0000); + return; + } + + CLOBBER_SW16; + r=rmw(r,2,2); + + raw_bswap_16(r); + unlock2(r); +} +MENDFUNC(1,mid_bswap_16,(RW2 r)) + +MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) +{ + int olds; + + if (d==s) { /* How pointless! */ + return; + } + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val); + return; + } + olds=s; + disassociate(d); + s=readreg_offset(s,4); + live.state[d].realreg=s; + live.state[d].realind=live.nat[s].nholds; + live.state[d].val=live.state[olds].val; + live.state[d].validsize=4; + live.state[d].dirtysize=4; + set_status(d,DIRTY); + + live.nat[s].holds[live.nat[s].nholds]=d; + live.nat[s].nholds++; + log_clobberreg(d); + D2(panicbug("Added %d to nreg %d(%d), now holds %d regs", d,s,live.state[d].realind,live.nat[s].nholds)); + unlock2(s); +} +MENDFUNC(2,mov_l_rr,(W4 d, RR4 s)) + +MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(mov_l_mi)(d,live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + + raw_mov_l_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_l_mr,(IMM d, RR4 s)) + +MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(mov_w_mi)(d,(uae_u16)live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,2); + + raw_mov_w_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_w_mr,(IMM d, RR2 s)) + +MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(mov_b_mi)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + + raw_mov_b_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_b_mr,(IMM d, RR1 s)) + +MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) + +MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) +{ + set_const(d,s); + return; +} +MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) + +MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) + +MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) +{ + CLOBBER_TEST; + d=readreg(d,4); + + raw_test_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,test_l_ri,(RR4 d, IMM i)) + +MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) +{ + CLOBBER_TEST; + d=readreg(d,4); + s=readreg(s,4); + + raw_test_l_rr(d,s);; + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_l_rr,(RR4 d, RR4 s)) + +MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) +{ + CLOBBER_TEST; + d=readreg(d,2); + s=readreg(s,2); + + raw_test_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_w_rr,(RR2 d, RR2 s)) + +MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) +{ + CLOBBER_TEST; + d=readreg(d,1); + s=readreg(s,1); + + raw_test_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_b_rr,(RR1 d, RR1 s)) + +MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val &= i; + return; + } + + CLOBBER_AND; + d=rmw(d,4,4); + + raw_and_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,and_l,(RW4 d, RR4 s)) +{ + CLOBBER_AND; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_and_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_l,(RW4 d, RR4 s)) + +MIDFUNC(2,and_w,(RW2 d, RR2 s)) +{ + CLOBBER_AND; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_and_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_w,(RW2 d, RR2 s)) + +MIDFUNC(2,and_b,(RW1 d, RR1 s)) +{ + CLOBBER_AND; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_and_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_b,(RW1 d, RR1 s)) + +MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val|=i; + return; + } + CLOBBER_OR; + d=rmw(d,4,4); + + raw_or_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,or_l,(RW4 d, RR4 s)) +{ + if (isconst(d) && isconst(s) && !needflags) { + live.state[d].val|=live.state[s].val; + return; + } + CLOBBER_OR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_or_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_l,(RW4 d, RR4 s)) + +MIDFUNC(2,or_w,(RW2 d, RR2 s)) +{ + CLOBBER_OR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_or_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_w,(RW2 d, RR2 s)) + +MIDFUNC(2,or_b,(RW1 d, RR1 s)) +{ + CLOBBER_OR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_or_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_b,(RW1 d, RR1 s)) + +MIDFUNC(2,adc_l,(RW4 d, RR4 s)) +{ + CLOBBER_ADC; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_adc_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_l,(RW4 d, RR4 s)) + +MIDFUNC(2,adc_w,(RW2 d, RR2 s)) +{ + CLOBBER_ADC; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_adc_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_w,(RW2 d, RR2 s)) + +MIDFUNC(2,adc_b,(RW1 d, RR1 s)) +{ + CLOBBER_ADC; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_adc_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_b,(RW1 d, RR1 s)) + +MIDFUNC(2,add_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(add_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_add_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_l,(RW4 d, RR4 s)) + +MIDFUNC(2,add_w,(RW2 d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(add_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_add_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_w,(RW2 d, RR2 s)) + +MIDFUNC(2,add_b,(RW1 d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(add_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_add_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_b,(RW1 d, RR1 s)) + +MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val-=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,-i); + return; + } +#endif + + CLOBBER_SUB; + d=rmw(d,4,4); + + raw_sub_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,2,2); + + raw_sub_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,1,1); + + raw_sub_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val+=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,i); + return; + } +#endif + CLOBBER_ADD; + d=rmw(d,4,4); + raw_add_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,2,2); + + raw_add_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,1,1); + + raw_add_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) +{ + CLOBBER_SBB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sbb_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_l,(RW4 d, RR4 s)) + +MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) +{ + CLOBBER_SBB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sbb_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_w,(RW2 d, RR2 s)) + +MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) +{ + CLOBBER_SBB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sbb_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_b,(RW1 d, RR1 s)) + +MIDFUNC(2,sub_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(sub_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sub_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_l,(RW4 d, RR4 s)) + +MIDFUNC(2,sub_w,(RW2 d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(sub_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sub_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_w,(RW2 d, RR2 s)) + +MIDFUNC(2,sub_b,(RW1 d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(sub_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sub_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_b,(RW1 d, RR1 s)) + +MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) +{ + CLOBBER_CMP; + s=readreg(s,4); + d=readreg(d,4); + + raw_cmp_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_l,(RR4 d, RR4 s)) + +MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) +{ + CLOBBER_CMP; + s=readreg(s,2); + d=readreg(d,2); + + raw_cmp_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_w,(RR2 d, RR2 s)) + +MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) +{ + CLOBBER_CMP; + s=readreg(s,1); + d=readreg(d,1); + + raw_cmp_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_b,(RR1 d, RR1 s)) + +MIDFUNC(2,xor_l,(RW4 d, RR4 s)) +{ + CLOBBER_XOR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_xor_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_l,(RW4 d, RR4 s)) + +MIDFUNC(2,xor_w,(RW2 d, RR2 s)) +{ + CLOBBER_XOR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_xor_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_w,(RW2 d, RR2 s)) + +MIDFUNC(2,xor_b,(RW1 d, RR1 s)) +{ + CLOBBER_XOR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_xor_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_b,(RW1 d, RR1 s)) + +MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) +{ + clobber_flags(); + in1=readreg_specific(in1,isize1,REG_PAR1); + in2=readreg_specific(in2,isize2,REG_PAR2); + r=readreg(r,4); + prepare_for_call_1(); + unlock2(r); + unlock2(in1); + unlock2(in2); + prepare_for_call_2(); + compemu_raw_call_r(r); +} +MENDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) + +MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) +{ + clobber_flags(); + + if (osize==4) { + if (out1!=in1 && out1!=r) { + COMPCALL(forget_about)(out1); + } + } + else { + tomem_c(out1); + } + + in1=readreg_specific(in1,isize,REG_PAR1); + r=readreg(r,4); + + prepare_for_call_1(); + unlock2(in1); + unlock2(r); + + prepare_for_call_2(); + + compemu_raw_call_r(r); + + live.nat[REG_RESULT].holds[0]=out1; + live.nat[REG_RESULT].nholds=1; + live.nat[REG_RESULT].touched=touchcnt++; + + live.state[out1].realreg=REG_RESULT; + live.state[out1].realind=0; + live.state[out1].val=0; + live.state[out1].validsize=osize; + live.state[out1].dirtysize=osize; + set_status(out1,DIRTY); +} +MENDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) + +MIDFUNC(0,nop,(void)) +{ + raw_emit_nop(); +} +MENDFUNC(0,nop,(void)) + +/* forget_about() takes a mid-layer register */ +MIDFUNC(1,forget_about,(W4 r)) +{ + if (isinreg(r)) + disassociate(r); + live.state[r].val=0; + set_status(r,UNDEF); +} +MENDFUNC(1,forget_about,(W4 r)) + +MIDFUNC(1,f_forget_about,(FW r)) +{ + if (f_isinreg(r)) + f_disassociate(r); + live.fate[r].status=UNDEF; +} +MENDFUNC(1,f_forget_about,(FW r)) + +// ARM optimized functions + +MIDFUNC(2,arm_ADD_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(arm_ADD_l_ri)(d,live.state[s].val); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + raw_ADD_l_rr(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_ADD_l,(RW4 d, RR4 s)) + +MIDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) +{ + if (!i) return; + if (isconst(d)) { + live.state[d].val+=i; + return; + } +#if USE_OFFSET + add_offset(d,i); + return; +#endif + d=rmw(d,4,4); + + raw_LDR_l_ri(REG_WORK1, i); + raw_ADD_l_rr(d,REG_WORK1); + unlock2(d); +} +MENDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) +{ + if (!i) return; + if (isconst(d)) { + live.state[d].val+=i; + return; + } +#if USE_OFFSET + add_offset(d,i); + return; +#endif + d=rmw(d,4,4); + + raw_ADD_l_rri(d,d,i); + unlock2(d); +} +MENDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) + +MIDFUNC(2,arm_SUB_l_ri8,(RW4 d, IMM i)) +{ + if (!i) return; + if (isconst(d)) { + live.state[d].val-=i; + return; + } +#if USE_OFFSET + add_offset(d,-i); + return; +#endif + d=rmw(d,4,4); + + raw_SUB_l_rri(d,d,i); + unlock2(d); +} +MENDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) + +MIDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + raw_AND_l_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) + +MIDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) +{ + s=readreg(s,2); + d=rmw(d,2,2); + + raw_AND_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) + +MIDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) +{ + s=readreg(s,1); + d=rmw(d,1,1); + + raw_AND_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) + +MIDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) +{ + if (isconst(d)) { + live.state[d].val &= i; + return; + } + + d=rmw(d,4,4); + + raw_AND_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) + +MIDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) +{ + s=readreg(s,1); + d=rmw(d,1,1); + + raw_EOR_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) + +MIDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + raw_EOR_l_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) + +MIDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) +{ + s=readreg(s,2); + d=rmw(d,2,2); + + raw_EOR_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) + +MIDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) +{ + s=readreg(s,1); + d=rmw(d,1,1); + + raw_ORR_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) + +MIDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) +{ + if (isconst(d) && isconst(s)) { + live.state[d].val|=live.state[s].val; + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + raw_ORR_l_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) + +MIDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) +{ + s=readreg(s,2); + d=rmw(d,2,2); + + raw_ORR_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) + +MIDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) +{ + if (!i) + return; + + r=rmw(r,4,4); + raw_ROR_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) + +// Other +static inline void flush_cpu_icache(void *start, void *stop) +{ + + register void *_beg __asm ("a1") = start; + register void *_end __asm ("a2") = stop; + register void *_flg __asm ("a3") = 0; +#ifdef __ARM_EABI__ + register unsigned long _scno __asm ("r7") = 0xf0002; + __asm __volatile ("swi 0x0 @ sys_cacheflush" + : "=r" (_beg) + : "0" (_beg), "r" (_end), "r" (_flg), "r" (_scno)); +#else + __asm __volatile ("swi 0x9f0002 @ sys_cacheflush" + : "=r" (_beg) + : "0" (_beg), "r" (_end), "r" (_flg)); +#endif +} + +static inline void write_jmp_target(uae_u32* jmpaddr, cpuop_func* a) { + *(jmpaddr) = (uae_u32) a; + flush_cpu_icache((void *) jmpaddr, (void *) &jmpaddr[1]); +} + +static inline void emit_jmp_target(uae_u32 a) { + emit_long((uae_u32) a); +} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h new file mode 100644 index 000000000..525413266 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h @@ -0,0 +1,184 @@ +/* + * compiler/compemu_midfunc_arm.h - Native MIDFUNCS for ARM + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu.h + * + */ + +// Arm optimized midfunc +DECLARE_MIDFUNC(arm_ADD_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(arm_ADD_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(arm_ADD_l_ri8(RW4 d, IMM i)); +DECLARE_MIDFUNC(arm_SUB_l_ri8(RW4 d, IMM i)); +DECLARE_MIDFUNC(arm_AND_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(arm_AND_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(arm_AND_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(arm_AND_l_ri8(RW4 d, IMM i)); +DECLARE_MIDFUNC(arm_EOR_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(arm_EOR_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(arm_EOR_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(arm_ORR_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(arm_ORR_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(arm_ORR_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(arm_ROR_l_ri8(RW4 r, IMM i)); + +// Emulated midfunc +DECLARE_MIDFUNC(bt_l_ri(RR4 r, IMM i)); +DECLARE_MIDFUNC(bt_l_rr(RR4 r, RR4 b)); +DECLARE_MIDFUNC(btc_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(bts_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(btr_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(mov_l_rm(W4 d, IMM s)); +DECLARE_MIDFUNC(mov_l_rm_indexed(W4 d, IMM base, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_w_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_b_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(rol_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(rol_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(rol_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(rol_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shll_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shll_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shll_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(ror_b_ri(RR1 r, IMM i)); +DECLARE_MIDFUNC(ror_w_ri(RR2 r, IMM i)); +DECLARE_MIDFUNC(ror_l_ri(RR4 r, IMM i)); +DECLARE_MIDFUNC(ror_l_rr(RR4 d, RR1 r)); +DECLARE_MIDFUNC(ror_w_rr(RR2 d, RR1 r)); +DECLARE_MIDFUNC(ror_b_rr(RR1 d, RR1 r)); +DECLARE_MIDFUNC(shrl_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shrl_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shrl_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shra_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shra_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shra_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shll_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shll_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shll_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shrl_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shrl_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shrl_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shra_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shra_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shra_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(setcc(W1 d, IMM cc)); +DECLARE_MIDFUNC(setcc_m(IMM d, IMM cc)); +DECLARE_MIDFUNC(cmov_l_rr(RW4 d, RR4 s, IMM cc)); +DECLARE_MIDFUNC(bsf_l_rr(W4 d, RR4 s)); +DECLARE_MIDFUNC(pop_l(W4 d)); +DECLARE_MIDFUNC(push_l(RR4 s)); +DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, RR2 s)); +DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, RR1 s)); +DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, RR2 s)); +DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, RR1 s)); +DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(imul_32_32(RW4 d, RR4 s)); +DECLARE_MIDFUNC(mov_b_rr(W1 d, RR1 s)); +DECLARE_MIDFUNC(mov_w_rr(W2 d, RR2 s)); +DECLARE_MIDFUNC(mov_l_rR(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_rR(W2 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_brR(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_brR(W2 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_brR(W1 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_Ri(RR4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_w_Ri(RR4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_l_Rr(RR4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_Rr(RR4 d, RR2 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr_indexed(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)); +DECLARE_MIDFUNC(lea_l_rr_indexed(W4 d, RR4 s, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_bRr(RR4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_bRr(RR4 d, RR2 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_bRr(RR4 d, RR1 s, IMM offset)); +DECLARE_MIDFUNC(mid_bswap_32(RW4 r)); +DECLARE_MIDFUNC(mid_bswap_16(RW2 r)); +DECLARE_MIDFUNC(mov_l_rr(W4 d, RR4 s)); +DECLARE_MIDFUNC(mov_l_mr(IMM d, RR4 s)); +DECLARE_MIDFUNC(mov_w_mr(IMM d, RR2 s)); +DECLARE_MIDFUNC(mov_w_rm(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_mr(IMM d, RR1 s)); +DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); +DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); +DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); +DECLARE_MIDFUNC(test_l_ri(RR4 d, IMM i)); +DECLARE_MIDFUNC(test_l_rr(RR4 d, RR4 s)); +DECLARE_MIDFUNC(test_w_rr(RR2 d, RR2 s)); +DECLARE_MIDFUNC(test_b_rr(RR1 d, RR1 s)); +DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(and_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(and_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(and_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(or_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(or_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(or_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(or_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(adc_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(adc_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(adc_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(add_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(add_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(add_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(sub_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(sub_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(sub_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(add_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(add_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(add_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(sbb_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(sbb_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(sbb_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(sub_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(sub_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(sub_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(cmp_l(RR4 d, RR4 s)); +DECLARE_MIDFUNC(cmp_w(RR2 d, RR2 s)); +DECLARE_MIDFUNC(cmp_b(RR1 d, RR1 s)); +DECLARE_MIDFUNC(xor_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(xor_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(xor_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(call_r_02(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)); +DECLARE_MIDFUNC(call_r_11(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)); +DECLARE_MIDFUNC(live_flags(void)); +DECLARE_MIDFUNC(dont_care_flags(void)); +DECLARE_MIDFUNC(duplicate_carry(void)); +DECLARE_MIDFUNC(restore_carry(void)); +DECLARE_MIDFUNC(start_needflags(void)); +DECLARE_MIDFUNC(end_needflags(void)); +DECLARE_MIDFUNC(make_flags_live(void)); +DECLARE_MIDFUNC(forget_about(W4 r)); +DECLARE_MIDFUNC(nop(void)); + +DECLARE_MIDFUNC(f_forget_about(FW r)); + + + + diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp new file mode 100644 index 000000000..9da2c058c --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp @@ -0,0 +1,5428 @@ +/* + * compiler/compemu_midfunc_arm.cpp - Native MIDFUNCS for ARM (JIT v2) + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu_support.cpp + * + */ + +const uae_u32 ARM_CCR_MAP[] = { 0, ARM_C_FLAG, // 1 C + ARM_V_FLAG, // 2 V + ARM_C_FLAG | ARM_V_FLAG, // 3 VC + ARM_Z_FLAG, // 4 Z + ARM_Z_FLAG | ARM_C_FLAG, // 5 ZC + ARM_Z_FLAG | ARM_V_FLAG, // 6 ZV + ARM_Z_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 7 ZVC + ARM_N_FLAG, // 8 N + ARM_N_FLAG | ARM_C_FLAG, // 9 NC + ARM_N_FLAG | ARM_V_FLAG, // 10 NV + ARM_N_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 11 NVC + ARM_N_FLAG | ARM_Z_FLAG, // 12 NZ + ARM_N_FLAG | ARM_Z_FLAG | ARM_C_FLAG, // 13 NZC + ARM_N_FLAG | ARM_Z_FLAG | ARM_V_FLAG, // 14 NZV + ARM_N_FLAG | ARM_Z_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 15 NZVC + }; + +// First we start with some helper functions (may be moved to codegen_arm) +static inline void UNSIGNED8_IMM_2_REG(W4 r, IMM v) { + MOV_ri8(r, (uint8) v); +} + +static inline void SIGNED8_IMM_2_REG(W4 r, IMM v) { + if (v & 0x80) { + MVN_ri8(r, (uint8) ~v); + } else { + MOV_ri8(r, (uint8) v); + } +} + +static inline void UNSIGNED16_IMM_2_REG(W4 r, IMM v) { + MOV_ri8(r, (uint8) v); + ORR_rri8RORi(r, r, (uint8)(v >> 8), 24); +} + +static inline void SIGNED16_IMM_2_REG(W4 r, IMM v) { +#if defined(ARMV6_ASSEMBLY) + MOV_ri8(r, (uint8) v); + ORR_rri8RORi(r, r, (uint8)(v >> 8), 24); + SXTH_rr(r, r); +#else + MOV_ri8(r, (uint8)(v << 16)); + ORR_rri8RORi(r, r, (uint8)(v >> 8), 8); + ASR_rri(r, r, 16); +#endif +} + +static inline void UNSIGNED8_REG_2_REG(W4 d, RR4 s) { +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(d, s); +#else + ROR_rri(d, s, 8); + LSR_rri(d, d, 24); +#endif +} + +static inline void SIGNED8_REG_2_REG(W4 d, RR4 s) { +#if defined(ARMV6_ASSEMBLY) + SXTB_rr(d, s); +#else + ROR_rri(d, s, 8); + ASR_rri(d, d, 24); +#endif +} + +static inline void UNSIGNED16_REG_2_REG(W4 d, RR4 s) { +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(d, s); +#else + LSL_rri(d, s, 16); + LSR_rri(d, d, 16); +#endif +} + +static inline void SIGNED16_REG_2_REG(W4 d, RR4 s) { +#if defined(ARMV6_ASSEMBLY) + SXTH_rr(d, s); +#else + LSL_rri(d, s, 16); + ASR_rri(d, d, 16); +#endif +} + +#define ZERO_EXTEND_8_REG_2_REG(d,s) UNSIGNED8_REG_2_REG(d,s) +#define ZERO_EXTEND_16_REG_2_REG(d,s) UNSIGNED16_REG_2_REG(d,s) +#define SIGN_EXTEND_8_REG_2_REG(d,s) SIGNED8_REG_2_REG(d,s) +#define SIGN_EXTEND_16_REG_2_REG(d,s) SIGNED16_REG_2_REG(d,s) + +MIDFUNC(0,restore_inverted_carry,(void)) +{ + RR4 r=readreg(FLAGX,4); + MRS_CPSR(REG_WORK1); + TEQ_ri(r,1); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_C_FLAG); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSRf_r(REG_WORK1); + unlock2(r); +} +MENDFUNC(0,restore_inverted_carry,(void)) + +/* + * ADD + * Operand Syntax: , Dn + * Dn, + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if an overflow is generated. Cleared otherwise. + * C Set if a carry is generated. Cleared otherwise. + * + */ +MIDFUNC(3,jnf_ADD_imm,(W4 d, RR4 s, IMM v)) +{ + if (isconst(s)) { + set_const(d,live.state[s].val+v); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + compemu_raw_mov_l_ri(REG_WORK1, v); + ADD_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ADD_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jnf_ADD_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + ADD_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_IMM_2_REG(REG_WORK2, (uint8)v); + SIGNED8_REG_2_REG(REG_WORK1, s); + ADDS_rrr(d,REG_WORK1,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) + +MIDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) +{ + if (isconst(v)) { + COMPCALL(jff_ADD_b_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + ADDS_rrr(d,REG_WORK1,REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_IMM_2_REG(REG_WORK2, (uint16)v); + SIGNED16_REG_2_REG(REG_WORK1, s); + ADDS_rrr(d,REG_WORK1,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) + +MIDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) +{ + if (isconst(v)) { + COMPCALL(jff_ADD_w_imm)(d,s,live.state[v].val); + return; + } + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + ADDS_rrr(d,REG_WORK1,REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + compemu_raw_mov_l_ri(REG_WORK2, v); + ADDS_rrr(d,s,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jff_ADD_l_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + ADDS_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) + +/* + * ADDA + * Operand Syntax: , An + * + * Operand Size: 16,32 + * + * Flags: Not affected. + * + */ +MIDFUNC(2,jnf_ADDA_b,(W4 d, RR1 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + SIGNED8_REG_2_REG(REG_WORK1,s); + ADD_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ADDA_b,(W4 d, RR1 s)) + +MIDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + SIGNED16_REG_2_REG(REG_WORK1,s); + ADD_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) + +MIDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + ADD_rrr(d,d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) + +/* + * ADDX + * Operand Syntax: Dy, Dx + * -(Ay), -(Ax) + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Cleared if the result is nonzero; unchanged otherwise. + * V Set if an overflow is generated. Cleared otherwise. + * C Set if a carry is generated. Cleared otherwise. + * + * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise + * + */ +MIDFUNC(3,jnf_ADDX,(W4 d, RR4 s, RR4 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + ADC_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_ADDX,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + PUSH(REG_WORK2); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + ADCS_rrr(d,REG_WORK1,REG_WORK2); + + POP(REG_WORK2); + MRS_CPSR(REG_WORK1); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + PUSH(REG_WORK2); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + ADCS_rrr(d,REG_WORK1,REG_WORK2); + + POP(REG_WORK2); + MRS_CPSR(REG_WORK1); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + PUSH(REG_WORK2); + + ADCS_rrr(d,s,v); + + POP(REG_WORK2); + MRS_CPSR(REG_WORK1); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) + +/* + * ANDI + * Operand Syntax: #, CCR + * + * Operand Size: 8 + * + * X Cleared if bit 4 of immediate operand is zero. Unchanged otherwise. + * N Cleared if bit 3 of immediate operand is zero. Unchanged otherwise. + * Z Cleared if bit 2 of immediate operand is zero. Unchanged otherwise. + * V Cleared if bit 1 of immediate operand is zero. Unchanged otherwise. + * C Cleared if bit 0 of immediate operand is zero. Unchanged otherwise. + * + */ +MIDFUNC(1,jff_ANDSR,(IMM s, IMM x)) +{ + MRS_CPSR(REG_WORK1); + AND_rri(REG_WORK1, REG_WORK1, s); + MSR_CPSRf_r(REG_WORK1); + + if (!x) { + compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); + MOV_ri(REG_WORK2, 0); + STRB_rR(REG_WORK2, REG_WORK1); + } +} +MENDFUNC(1,jff_ANDSR,(IMM s)) + +/* + * AND + * Operand Syntax: , Dn + * Dn, + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the most significant bit of the result is set. + * Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(3,jnf_AND,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(s) && isconst(v)) { + set_const(d, + live.state[s].val&live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + AND_rrr(d, s, v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_AND,(RW4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_AND_b,(W4 d, RR1 s, RR1 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + ANDS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_AND_b,(RW4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_AND_w,(W4 d, RR2 s, RR2 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + ANDS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_AND_w,(RW4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_AND_l,(W4 d, RR4 s, RR4 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + ANDS_rrr(d, s,v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_AND_l,(RW4 d, RR4 s, RR4 v)) + +/* + * ASL + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. + * C Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * + */ +MIDFUNC(3,jff_ASL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d, s, 24); + if (i) { + MRS_CPSR(REG_WORK1); // store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except N & Z + PUSH(REG_WORK1); + + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rri(REG_WORK2, REG_WORK2, (i+1)); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, d, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// restore flags + + LSLS_rri(d,d,i); + } else { + MSR_CPSRf_i(0); + TST_rr(d,d); + } + REV_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d, s, 16); + if (i) { + MRS_CPSR(REG_WORK1); // store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except N & Z + PUSH(REG_WORK1); + + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rri(REG_WORK2, REG_WORK2, (i+1)); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, d, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// retore flags + + LSLS_rri(d,d,i); + } else { + MSR_CPSRf_i(0); + TST_rr(d,d); + } + ASR_rri(d,d, 16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i) { + MRS_CPSR(REG_WORK1); // store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C + PUSH(REG_WORK1); + + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rri(REG_WORK2, REG_WORK2, (i+1)); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, s, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// retore flags + + LSLS_rri(d,s,i); + } else { + MSR_CPSRf_i(0); + MOVS_rr(d, s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + // Calculate V Flag + MRS_CPSR(REG_WORK1);// store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C + PUSH(REG_WORK1); + + LSL_rri(d, s, 24); + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rrr(REG_WORK2, REG_WORK2, i); + LSR_rri(REG_WORK2, REG_WORK2, 1); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, d, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// retore flags + + AND_rri(REG_WORK2, i, 63); + LSLS_rrr(d,d,REG_WORK2); + ASR_rri(d,d, 24); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + // Calculate V Flag + MRS_CPSR(REG_WORK1);// store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except c + PUSH(REG_WORK1); + + LSL_rri(d, s, 16); + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rrr(REG_WORK2, REG_WORK2, i); + LSR_rri(REG_WORK2, REG_WORK2, 1); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, d, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// retore flags + + AND_rri(REG_WORK2, i, 63); + LSLS_rrr(d,d,REG_WORK2); + ASR_rri(d,d, 16); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + // Calculate V Flag + MRS_CPSR(REG_WORK1);// store flags + BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C + PUSH(REG_WORK1); + + // Calculate V Flag + MVN_ri(REG_WORK2, 0); + LSR_rrr(REG_WORK2, REG_WORK2, i); + LSR_rri(REG_WORK2, REG_WORK2, 1); + MVN_rr(REG_WORK2, REG_WORK2); + AND_rrr(REG_WORK1, s, REG_WORK2); + TST_rr(REG_WORK1, REG_WORK1); + CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); + POP(REG_WORK1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + + MSR_CPSRf_r(REG_WORK1);// retore flags + + AND_rri(REG_WORK2, i, 63); + LSLS_rrr(d,s,REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) + +/* + * ASLW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Set according to the last bit shifted out of the operand. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. + * C Set according to the last bit shifted out of the operand. + * + */ +MIDFUNC(2,jnf_ASLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ASLW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_ASLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + LSLS_rri(d,s,17); + + MRS_CPSR(REG_WORK1); + CC_ORR_rri(NATIVE_CC_MI, REG_WORK1, REG_WORK1, ARM_V_FLAG); + CC_EOR_rri(NATIVE_CC_CS, REG_WORK1, REG_WORK1, ARM_V_FLAG); + MSR_CPSRf_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_ASLW,(W4 d, RR4 s)) + +/* + * ASR + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. + * C Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * + */ +MIDFUNC(3,jnf_ASR_b_imm,(W4 d, RR4 s, IMM i)) +{ + if (!i) return; + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + ASR_rri(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ASR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) +{ + if (!i) return; + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + ASR_rri(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) +{ + if (!i) return; + + s=readreg(s,4); + d=writereg(d,4); + + ASR_rri(d,s,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + if (i) { + MSR_CPSRf_i(0); + ASRS_rri(d,d,i); + } else { + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + TST_rr(d,d); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + if (i) { + MSR_CPSRf_i(0); + ASRS_rri(d,d,i); + } else { + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + TST_rr(d,d); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i) { + MSR_CPSRf_i(0); + ASRS_rri(d,s,i); + } else { + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + TST_rr(s,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + AND_rri(REG_WORK1, i, 63); + ASR_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + AND_rri(REG_WORK1, i, 63); + ASR_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 63); + ASR_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + ASRS_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + ASRS_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + ASRS_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) + +/* + * ASRW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Set according to the last bit shifted out of the operand. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. + * C Set according to the last bit shifted out of the operand. + * + */ +MIDFUNC(2,jnf_ASRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + ASR_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ASRW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_ASRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + MSR_CPSRf_i(0); + ASR_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_ASRW,(W4 d, RR4 s)) + +/* + * BCHG + * Operand Syntax: Dn, + * #, + * + * Operand Size: 8,32 + * + * X Not affected. + * N Not affected. + * Z Set if the bit tested is zero. Cleared otherwise. + * V Not affected. + * C Not affected. + * + */ +MIDFUNC(2,jnf_BCHG_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + EOR_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BCHG_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + EOR_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BCHG_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + EOR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BCHG_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + EOR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + EOR_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + EOR_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BCHG_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + EOR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BCHG_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + EOR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) + +/* + * BCLR + * Operand Syntax: Dn, + * #, + * + * Operand Size: 8,32 + * + * X Not affected. + * N Not affected. + * Z Set if the bit tested is zero. Cleared otherwise. + * V Not affected. + * C Not affected. + * + */ +MIDFUNC(2,jnf_BCLR_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + BIC_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BCLR_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + BIC_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BCLR_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + BIC_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BCLR_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + BIC_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + BIC_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + BIC_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BCLR_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + BIC_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BCLR_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + BIC_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) + +/* + * BSET + * Operand Syntax: Dn, + * #, + * + * Operand Size: 8,32 + * + * X Not affected. + * N Not affected. + * Z Set if the bit tested is zero. Cleared otherwise. + * V Not affected. + * C Not affected. + * + */ +MIDFUNC(2,jnf_BSET_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + ORR_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BSET_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + ORR_rri(d,d,(1 << s)); + unlock2(d); +} +MENDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BSET_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + ORR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jnf_BSET_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + ORR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + ORR_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) +{ + d=rmw(d,4,4); + + uae_u32 v = (1 << s); + MRS_CPSR(REG_WORK1); + TST_ri(d,v); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + ORR_rri(d,d,v); + + unlock2(d); +} +MENDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) + +MIDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BSET_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + ORR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BSET_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=rmw(d,4,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + ORR_rrr(d,d,REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) + +/* + * BTST + * Operand Syntax: Dn, + * #, + * + * Operand Size: 8,32 + * + * X Not affected + * N Not affected + * Z Set if the bit tested is zero. Cleared otherwise + * V Not affected + * C Not affected + * + */ +MIDFUNC(2,jff_BTST_b_imm,(RR4 d, IMM s)) +{ + d=readreg(d,4); + + MRS_CPSR(REG_WORK1); + TST_ri(d,(1 << s)); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); +} +MENDFUNC(2,jff_BTST_b_imm,(RR4 d, IMM s)) + +MIDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) +{ + d=readreg(d,4); + + MRS_CPSR(REG_WORK1); + TST_ri(d,(1 << s)); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); +} +MENDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) + +MIDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BTST_b_imm)(d,live.state[s].val&7); + return; + } + s=readreg(s,4); + d=readreg(d,4); + + AND_rri(REG_WORK1, s, 7); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) + +MIDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_BTST_l_imm)(d,live.state[s].val&31); + return; + } + + s=readreg(s,4); + d=readreg(d,4); + + AND_rri(REG_WORK1, s, 31); + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + MRS_CPSR(REG_WORK1); + TST_rr(d,REG_WORK2); + CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) + +/* + * CLR + * Operand Syntax: + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Always cleared. + * Z Always set. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(1,jnf_CLR,(W4 d)) +{ + d=writereg(d,4); + MOV_ri(d,0); + unlock2(d); +} +MENDFUNC(1,jnf_CLR,(W4 d)) + +MIDFUNC(1,jff_CLR,(W4 d)) +{ + d=writereg(d,4); + MOV_ri(d,0); + MSR_CPSR_i(ARM_Z_FLAG); + unlock2(d); +} +MENDFUNC(1,jff_CLR,(W4 d)) + +/* + * CMP + * Operand Syntax: , Dn + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if an overflow occurs. Cleared otherwise. + * C Set if a borrow occurs. Cleared otherwise. + * + */ +MIDFUNC(2,jff_CMP_b,(RR1 d, RR1 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + SIGNED8_REG_2_REG(REG_WORK1, d); + SIGNED8_REG_2_REG(REG_WORK2, s); + CMP_rr(REG_WORK1,REG_WORK2); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // inverted_carry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMP_b,(RR1 d, RR1 s)) + +MIDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + SIGNED16_REG_2_REG(REG_WORK1, d); + SIGNED16_REG_2_REG(REG_WORK2, s); + CMP_rr(REG_WORK1,REG_WORK2); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // inverted_carry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) + +MIDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + CMP_rr(d,s); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // inverted_carry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) + +/* + * CMPA + * Operand Syntax: , An + * + * Operand Size: 16,32 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if an overflow occurs. Cleared otherwise. + * C Set if a borrow occurs. Cleared otherwise. + * + */ +MIDFUNC(2,jff_CMPA_b,(RR1 d, RR1 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + SIGNED8_REG_2_REG(REG_WORK2, s); + CMP_rr(d,REG_WORK2); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // invertedcarry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMPA_b,(RR1 d, RR1 s)) + +MIDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + SIGNED16_REG_2_REG(REG_WORK2, s); + CMP_rr(d,REG_WORK2); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // invertedcarry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) + +MIDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) +{ + d=readreg(d,4); + s=readreg(s,4); + + CMP_rr(d,s); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + // invertedcarry = true; + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) + +/* + * EOR + * Operand Syntax: Dn, + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the most significant bit of the result is set. + * Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(3,jnf_EOR,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(s) && isconst(v)) { + set_const(d, + live.state[s].val^live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + EOR_rrr(d, s, v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_EOR,(RW4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_EOR_b,(W4 d, RR1 s, RR1 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + EORS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_EOR_b,(RW4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_EOR_w,(W4 d, RR2 s, RR2 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + EORS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_EOR_w,(RW4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_EOR_l,(W4 d, RR4 s, RR4 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + EORS_rrr(d, s,v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_EOR_l,(RW4 d, RR4 s, RR4 v)) + +/* + * EORI + * Operand Syntax: #, CCR + * + * Operand Size: 8 + * + * X — Changed if bit 4 of immediate operand is one; unchanged otherwise. + * N — Changed if bit 3 of immediate operand is one; unchanged otherwise. + * Z — Changed if bit 2 of immediate operand is one; unchanged otherwise. + * V — Changed if bit 1 of immediate operand is one; unchanged otherwise. + * C — Changed if bit 0 of immediate operand is one; unchanged otherwise. + * + */ +MIDFUNC(1,jff_EORSR,(IMM s, IMM x)) +{ + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, s); + MSR_CPSRf_r(REG_WORK1); + + if (x) { + compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); + LDRB_rR(REG_WORK2, REG_WORK1); + EOR_rri(REG_WORK2, REG_WORK2, 1); + STRB_rR(REG_WORK2, REG_WORK1); + } +} +MENDFUNC(1,jff_EORSR,(IMM s)) + +/* + * EXT + * Operand Syntax: + * + * Operand Size: 16,32 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(2,jnf_EXT_b,(W4 d, RR4 s)) +{ + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s8)live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_EXT_b,(W4 d, RR4 s)) + +MIDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) +{ + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s8)live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) + +MIDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) +{ + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s16)live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) + +MIDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) +{ + if (isconst(s)) { + d=writereg(d,4); + SIGNED8_IMM_2_REG(d, (uint8)live.state[s].val); + } else { + s=readreg(s,4); + d=writereg(d,4); + SIGNED8_REG_2_REG(d, s); + unlock2(s); + } + + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) + +MIDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) +{ + if (isconst(s)) { + d=writereg(d,4); + SIGNED8_IMM_2_REG(d, (uint8)live.state[s].val); + } else { + s=readreg(s,4); + d=writereg(d,4); + SIGNED8_REG_2_REG(d, s); + unlock2(s); + } + + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) + +MIDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) +{ + if (isconst(s)) { + d=writereg(d,4); + SIGNED16_IMM_2_REG(d, (uint16)live.state[s].val); + } else { + s=readreg(s,4); + d=writereg(d,4); + SIGNED16_REG_2_REG(d, s); + unlock2(s); + } + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) + +/* + * LSL + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. + * + */ +MIDFUNC(3,jnf_LSL_imm,(W4 d, RR4 s, IMM i)) +{ + if (!i) return; + + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_LSL_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 63); + LSL_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED8_REG_2_REG(d, s); + MSR_CPSRf_i(0); + + REV_rr(d,d); + if (i) { + LSLS_rri(d,d,i); + } else { + TST_rr(d,d); + } + REV_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + + LSL_rri(d,s,16); + if (i) { + LSLS_rri(d,d,i); + } else { + TST_rr(d,d); + } + LSR_rri(d,d,16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + if (i) { + LSLS_rri(d,s,i); + } else { + MOV_rr(d,s); + TST_rr(d,d); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED8_REG_2_REG(d,s); + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + REV_rr(d,d); + AND_rri(REG_WORK1, i, 63); + LSLS_rrr(d,d,REG_WORK1); + REV_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + LSL_rri(d, s, 16); + AND_rri(REG_WORK1, i, 63); + LSLS_rrr(d,d,REG_WORK1); + LSR_rri(d, d, 16); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) +{ + i=readreg(i,4); + s=readreg(s,4); + d=writereg(d,4); + + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + LSLS_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) + +/* + * LSLW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. + * + */ +MIDFUNC(2,jnf_LSLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_LSLW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_LSLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + LSLS_rri(d,s,17); + LSR_rri(d,d,16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_LSLW,(W4 d, RR4 s)) + +/* + * LSR + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit shifted out of the operand. + * Unaffected for a shift count of zero. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit shifted out of the operand. + * Cleared for a shift count of zero. + * + */ +MIDFUNC(3,jnf_LSR_b_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + if (!i) + return; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED8_REG_2_REG(d, s); + LSR_rri(d,d,i); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jnf_LSR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + if (!i) + return; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED16_REG_2_REG(d, s); + LSR_rri(d,d,i); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + if (!i) + return; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + LSR_rri(d,s,i); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED8_REG_2_REG(d, s); + MSR_CPSRf_i(0); + if (i) { + LSRS_rri(d,d,i); + } else { + TST_rr(d,d); + } + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED16_REG_2_REG(d, s); + MSR_CPSRf_i(0); + if (i) { + LSRS_rri(d,d,i); + } else { + TST_rr(d,d); + } + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) +{ + int isrmw; + + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + MSR_CPSRf_i(0); + if (i) { + LSRS_rri(d,s,i); + } else { + TST_rr(s,s); + } + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED8_REG_2_REG(d, s); + AND_rri(REG_WORK1, i, 63); + LSR_rrr(d,d,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED16_REG_2_REG(d, s); + AND_rri(REG_WORK1, i, 63); + LSR_rrr(d,d,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + AND_rri(REG_WORK1, i, 63); + LSR_rrr(d,s,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED8_REG_2_REG(d, s); + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + LSRS_rrr(d,d,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + UNSIGNED16_REG_2_REG(d, s); + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + LSRS_rrr(d,d,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) +{ + int isrmw; + + i=readreg(i,4); + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { + s=d=rmw(s,4,4); + } + + CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C + CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C + AND_rri(REG_WORK1, i, 63); + LSRS_rrr(d,s,REG_WORK1); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } + unlock2(i); +} +MENDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) + +/* + * LSRW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. + * + */ +MIDFUNC(2,jnf_LSRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d, s); + LSR_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_LSRW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_LSRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d, s); + MSR_CPSRf_i(0); + LSR_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_LSRW,(W4 d, RR4 s)) + +/* + * MOVE + * Operand Syntax: , + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(2,jnf_MOVE,(W4 d, RR4 s)) +{ + if (isconst(s)) { + set_const(d,live.state[s].val); + return; + } + s=readreg(s,4); + d=writereg(d,4); + + MOV_rr(d, s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_MOVE,(W4 d, RR4 s)) + +MIDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) +{ + d=writereg(d,4); + + SIGNED8_IMM_2_REG(d, (uint8)s); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) + +MIDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) +{ + d=writereg(d,4); + + SIGNED16_IMM_2_REG(d, (uint16)s); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) + +MIDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) +{ + d=writereg(d,4); + + compemu_raw_mov_l_ri(d, s); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) + +MIDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(jff_MOVE_b_imm)(d,live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(d, s); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) + +MIDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(jff_MOVE_w_imm)(d,live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d, s); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) + +MIDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(jff_MOVE_l_imm)(d,live.state[s].val); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + MOVS_rr(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) + +/* + * MOVE16 + * + * Flags: Not affected. + * + */ +MIDFUNC(2,jnf_MOVE16,(RR4 d, RR4 s)) +{ + s=readreg(s,4); + d=readreg(d,4); + + BIC_rri(s, s, 0x000000FF); + BIC_rri(d, d, 0x000000FF); + + compemu_raw_mov_l_ri(REG_WORK1, (IMM)MEMBaseDiff); + ADD_rrr(s, s, REG_WORK1); + ADD_rrr(d, d, REG_WORK1); + + LDR_rRI(REG_WORK1, s, 8); + LDR_rRI(REG_WORK2, s, 12); + + PUSH_REGS((1<, An + * + * Operand Size: 16,32 + * + * Flags: Not affected. + * + */ +MIDFUNC(2,jnf_MOVEA_w,(W4 d, RR2 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_MOVEA_w,(W4 d, RR2 s)) + +MIDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MOV_rr(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) + +/* + * MULS + * Operand Syntax: , Dn + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if overflow. Cleared otherwise. (32 Bit multiply only) + * C Always cleared. + * + */ +MIDFUNC(2,jnf_MULS,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + SIGN_EXTEND_16_REG_2_REG(d,d); + SIGN_EXTEND_16_REG_2_REG(REG_WORK1,s); + MUL_rrr(d, d, REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULS,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_MULS,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + SIGN_EXTEND_16_REG_2_REG(d,d); + SIGN_EXTEND_16_REG_2_REG(REG_WORK1,s); + + MSR_CPSRf_i(0); + MULS_rrr(d, d, REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULS,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + MUL_rrr(d, d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + MSR_CPSRf_i(0); + // L, H, + SMULLS_rrrr(d, REG_WORK2, d, s); + MRS_CPSR(REG_WORK1); + TEQ_rrASRi(REG_WORK2,d,31); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + MSR_CPSRf_r(REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) +{ + s = rmw(s, 4, 4); + d = rmw(d, 4, 4); + + // L, H, + SMULL_rrrr(d, s, d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) + +MIDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) +{ + s = rmw(s, 4, 4); + d = rmw(d, 4, 4); + + MSR_CPSRf_i(0); + // L, H, + SMULLS_rrrr(d, s, d, s); + MRS_CPSR(REG_WORK1); + TEQ_rrASRi(s,d,31); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + MSR_CPSRf_r(REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) + +/* + * MULU + * Operand Syntax: , Dn + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if overflow. Cleared otherwise. (32 Bit multiply only) + * C Always cleared. + * + */ +MIDFUNC(2,jnf_MULU,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + ZERO_EXTEND_16_REG_2_REG(d,d); + ZERO_EXTEND_16_REG_2_REG(REG_WORK1,s); + + MUL_rrr(d, d, REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULU,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_MULU,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + ZERO_EXTEND_16_REG_2_REG(d,d); + ZERO_EXTEND_16_REG_2_REG(REG_WORK1, s); + + MSR_CPSRf_i(0); + MULS_rrr(d, d, REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULU,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + MUL_rrr(d, d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) + +MIDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) +{ + s = readreg(s, 4); + d = rmw(d, 4, 4); + + // L, H, + MSR_CPSRf_i(0); + UMULLS_rrrr(d, REG_WORK2, d, s); + MRS_CPSR(REG_WORK1); + TST_rr(REG_WORK2,REG_WORK2); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + MSR_CPSRf_r(REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) + +MIDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) +{ + s = rmw(s, 4, 4); + d = rmw(d, 4, 4); + + // L, H, + UMULL_rrrr(d, s, d, s); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) + +MIDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) +{ + s = rmw(s, 4, 4); + d = rmw(d, 4, 4); + + // L, H, + MSR_CPSRf_i(0); + UMULLS_rrrr(d, s, d, s); + MRS_CPSR(REG_WORK1); + TST_rr(s,s); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); + MSR_CPSRf_r(REG_WORK1); + + unlock2(s); + unlock2(d); +} +MENDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) + +/* + * NEG + * Operand Syntax: + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if an overflow occurs. Cleared otherwise. + * C Cleared if the result is zero. Set otherwise. + * + */ +MIDFUNC(2,jnf_NEG,(W4 d, RR4 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + RSB_rri(d,s,0); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_NEG,(W4 d, RR4 s)) + +MIDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + RSBS_rri(d,REG_WORK1,0); + + // inverted_carry = true; + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) + +MIDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + RSBS_rri(d,REG_WORK1,0); + + // inverted_carry = true; + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) + +MIDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + RSBS_rri(d,s,0); + + // inverted_carry = true; + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) + +/* + * NEGX + * Operand Syntax: + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Cleared if the result is nonzero; unchanged otherwise. + * V Set if an overflow occurs. Cleared otherwise. + * C Cleared if the result is zero. Set otherwise. + * + * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise + * + */ +MIDFUNC(2,jnf_NEGX,(W4 d, RR4 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + RSC_rri(d,s,0); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_NEGX,(W4 d, RR4 s)) + +MIDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + MRS_CPSR(REG_WORK2); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + + SIGNED8_REG_2_REG(REG_WORK1, s); + RSCS_rri(d,REG_WORK1,0); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) + +MIDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + MRS_CPSR(REG_WORK2); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + + SIGNED16_REG_2_REG(REG_WORK1, s); + RSCS_rri(d,REG_WORK1,0); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) + +MIDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) +{ + d=writereg(d,4); + s=readreg(s,4); + + MRS_CPSR(REG_WORK2); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + + RSCS_rri(d,s,0); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) + +/* + * NOT + * Operand Syntax: + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(2,jnf_NOT,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MVN_rr(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_NOT,(W4 d, RR4 s)) + +MIDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED8_REG_2_REG(d,s); + MSR_CPSRf_i(0); // Clear flags + MVNS_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) + +MIDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d,s); + MSR_CPSRf_i(0); // Clear flags + MVNS_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) + +MIDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); // Clear flags + MVNS_rr(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) + +/* + * OR + * Operand Syntax: , Dn + * Dn, + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(3,jnf_OR,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(s) && isconst(v)) { + set_const(d, + live.state[s].val|live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + ORR_rrr(d, s, v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_OR,(RW4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_OR_b,(W4 d, RR1 s, RR1 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + ORRS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_OR_b,(RW4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_OR_w,(W4 d, RR2 s, RR2 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + MSR_CPSRf_i(0); + ORRS_rrr(d, REG_WORK1, REG_WORK2); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_OR_w,(RW4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_OR_l,(W4 d, RR4 s, RR4 v)) +{ + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + ORRS_rrr(d, s,v); + + unlock2(v); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_OR_l,(RW4 d, RR4 s, RR4 v)) + +/* + * ORI + * Operand Syntax: #, CCR + * + * Operand Size: 8 + * + * X — Set if bit 4 of immediate operand is one; unchanged otherwise. + * N — Set if bit 3 of immediate operand is one; unchanged otherwise. + * Z — Set if bit 2 of immediate operand is one; unchanged otherwise. + * V — Set if bit 1 of immediate operand is one; unchanged otherwise. + * C — Set if bit 0 of immediate operand is one; unchanged otherwise. + * + */ +MIDFUNC(1,jff_ORSR,(IMM s, IMM x)) +{ + MRS_CPSR(REG_WORK1); + ORR_rri(REG_WORK1, REG_WORK1, s); + MSR_CPSRf_r(REG_WORK1); + + if (x) { + compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); + MOV_ri(REG_WORK2, 1); + STRB_rR(REG_WORK2, REG_WORK1); + } +} +MENDFUNC(1,jff_ORSR,(IMM s)) + +/* + * ROL + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * + */ +MIDFUNC(3,jnf_ROL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,(32-(i&0x1f))); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,(32-(i&0x1f))); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + ROR_rri(d,s,(32-(i&0x1f))); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + if (i) { + RORS_rri(d,d,(32-(i&0x1f))); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + } else { + TST_rr(d,d); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + if (i) { + RORS_rri(d,d,(32-(i&0x1f))); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + } else { + TST_rr(d,d); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + if (i) { + RORS_rri(d,s,(32-(i&0x1f))); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + } else { + MOVS_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROL_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + ROR_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROL_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROL_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + ROR_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROL_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rrr(d,d,REG_WORK1); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROL_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rrr(d,d,REG_WORK1); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROL_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + AND_rri(REG_WORK1, i, 0x1f); + RSB_rri(REG_WORK1, REG_WORK1, 32); + + MSR_CPSRf_i(0); + RORS_rrr(d,s,REG_WORK1); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) + +/* + * ROLW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * + */ +MIDFUNC(2,jnf_ROLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,(32-1)); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ROLW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_ROLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rri(d,d,(32-1)); + + MRS_CPSR(REG_WORK2); + TST_ri(d, 1); + CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); + CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); + MSR_CPSR_r(REG_WORK2); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_ROLW,(W4 d, RR4 s)) + +/* + * RORW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. + * + */ +MIDFUNC(2,jnf_RORW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_RORW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_RORW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rri(d,d,1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_RORW,(W4 d, RR4 s)) + +/* + * ROXL + * Operand Syntax: Dx, Dy + * #, Dy + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * + */ +MIDFUNC(3,jnf_ROXL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED8_REG_2_REG(d,s); + LSL_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,d,9); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED16_REG_2_REG(d,s); + LSL_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,d,17); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSL_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,s,(32-i)); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED8_REG_2_REG(d,s); + LSL_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,d,9); + TST_ri(s, (1<<(8-i))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + SIGNED8_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED16_REG_2_REG(d,s); + LSL_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,d,17); + TST_ri(s, (1<<(16-i))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + SIGNED16_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSL_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); + if (i > 1) ORR_rrrLSRi(d,d,s,(32-i)); + TST_ri(s, (1<<(32-i))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXL_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 36); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); + CMP_ri(REG_WORK1, 18); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); + CMP_ri(REG_WORK1, 9); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); + CMP_ri(REG_WORK1, 0); +#if defined(ARMV6_ASSEMBLY) + BLE_i(8-1); +#else + BLE_i(9-1); +#endif + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 8); +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(REG_WORK2, s); +#else + ROR_rri(REG_WORK2, s, 8); + LSR_rri(REG_WORK2, REG_WORK2, 24); +#endif + ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXL_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d,s); + MRS_CPSR(REG_WORK2); + + CMP_ri(REG_WORK1, 34); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); + CMP_ri(REG_WORK1, 17); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); + CMP_ri(REG_WORK1, 0); +#if defined(ARMV6_ASSEMBLY) + BLE_i(8-1); +#else + BLE_i(9-1); +#endif + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 16); +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK2, s); +#else + LSL_rri(REG_WORK2, s, 16); + LSR_rri(REG_WORK2, REG_WORK2, 16); +#endif + ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXL_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + CMP_ri(REG_WORK1, 33); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); + CMP_ri(REG_WORK1, 0); + BLE_i(7-1); + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 32); + ORR_rrrLSRr(d,d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXL_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 36); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); + CMP_ri(REG_WORK1, 18); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); + CMP_ri(REG_WORK1, 9); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); + CMP_ri(REG_WORK1, 0); +#if defined(ARMV6_ASSEMBLY) + BLE_i(16-1); // label +#else + BLE_i(17-1); // label +#endif + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 0x80); + LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + PUSH(REG_WORK2); + + RSB_rri(REG_WORK1, REG_WORK1, 8); +#if defined(ARMV6_ASSEMBLY) + UXTB_rr(REG_WORK2, s); +#else + ROR_rri(REG_WORK2, s, 8); + LSR_rri(REG_WORK2, REG_WORK2, 24); +#endif + ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); + + POP(REG_WORK2); + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0); // label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + raw_sign_extend_8_rr(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXL_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 34); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); + CMP_ri(REG_WORK1, 17); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); + CMP_ri(REG_WORK1, 0); +#if defined(ARMV6_ASSEMBLY) + BLE_i(16-1); // label +#else + BLE_i(17-1); // label +#endif + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 0x8000); + LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + PUSH(REG_WORK2); + +#if defined(ARMV6_ASSEMBLY) + UXTH_rr(REG_WORK2, s); +#else + LSL_rri(REG_WORK2, s, 16); + LSR_rri(REG_WORK2, REG_WORK2, 16); +#endif + + RSB_rri(REG_WORK1, REG_WORK1, 16); + ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); + + POP(REG_WORK2); + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0); // label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + SIGNED16_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXL_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 33); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); + CMP_ri(REG_WORK1, 0); + BLE_i(13-1); // label + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSL_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,1); + LSL_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 0x80000000); + LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + RSB_rri(REG_WORK1, REG_WORK1, 32); + ORR_rrrLSRr(d,d,s,REG_WORK1); + + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0);// label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) + +/* + * ROXLW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. + * + */ +MIDFUNC(2,jnf_ROXLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,1); + ADC_rri(d,d,0); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ROXLW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,1); + ADC_rri(d,d,0); + MSR_CPSRf_i(0); + LSLS_rri(d,d,15); + LSR_rri(d,d,16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) + +/* + * ROR + * Operand Syntax: Dx, Dy + * #, Dy + * + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * + */ +MIDFUNC(3,jnf_ROR_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rri(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + ROR_rri(d,s,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rri(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + RORS_rrr(d,d,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + RORS_rrr(d,s,i); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROR_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + ROR_rrr(d,d,i); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROR_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + ROR_rrr(d,d,i); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROR_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + ROR_rrr(d,s,i); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROR_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + LSL_rri(d,s,24); + ORR_rrrLSRi(d,d,d,8); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + AND_rri(REG_WORK1, i, 63); + RORS_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROR_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + ORR_rrrLSRi(d,d,d,16); + MSR_CPSRf_i(0); + AND_rri(REG_WORK1, i, 63); + RORS_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROR_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MSR_CPSRf_i(0); + AND_rri(REG_WORK1, i, 63); + RORS_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) + +/* + * ROXR + * Operand Syntax: Dx, Dy + * #, Dy + * + * Operand Size: 8,16,32 + * + * X Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. + * + */ +MIDFUNC(3,jnf_ROXR_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSR_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(9-i)); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSR_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x8000 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(17-i)); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSR_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80000000 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(33-i)); + } else { + MOV_rr(d,s); + } + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED8_REG_2_REG(d,s); + LSR_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(9-i)); + TST_ri(s, (1<<(i-1))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + SIGNED8_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + UNSIGNED16_REG_2_REG(d,s); + LSR_rri(d,d,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x8000 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(17-i)); + TST_ri(s, (1<<(i-1))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + SIGNED16_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) +{ + s=readreg(s,4); + d=writereg(d,4); + + if (i > 0) { + LSR_rri(d,s,i); + CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80000000 >> (i - 1))); + if (i > 1) ORR_rrrLSLi(d,d,s,(33-i)); + TST_ri(s, (1<<(i-1))); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + } else { + MOV_rr(d,s); + MSR_CPSRf_i(0); + } + + TST_rr(d,d); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) + +MIDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXR_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + UNSIGNED8_REG_2_REG(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 36); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); + CMP_ri(REG_WORK1, 18); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); + CMP_ri(REG_WORK1, 9); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); + CMP_ri(REG_WORK1, 0); + BLE_i(7-1); + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x80); + LSR_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 8); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXR_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d,s); + MRS_CPSR(REG_WORK2); + + CMP_ri(REG_WORK1, 34); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); + CMP_ri(REG_WORK1, 17); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); + CMP_ri(REG_WORK1, 0); + BLE_i(7-1); + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x8000); + LSR_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 16); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jnf_ROXR_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + CMP_ri(REG_WORK1, 33); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); + CMP_ri(REG_WORK1, 0); + BLE_i(7-1); + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x80000000); + LSR_rrr(d, d, REG_WORK1); + RSB_rri(REG_WORK1, REG_WORK1, 32); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXR_b_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + UNSIGNED8_REG_2_REG(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 36); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); + CMP_ri(REG_WORK1, 18); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); + CMP_ri(REG_WORK1, 9); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); + CMP_ri(REG_WORK1, 0); + BLE_i(13-1); // label + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x80); + LSR_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + RSB_rri(REG_WORK1, REG_WORK1, 8); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0);// label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + SIGNED8_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXR_w_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + UNSIGNED16_REG_2_REG(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 34); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); + CMP_ri(REG_WORK1, 17); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); + CMP_ri(REG_WORK1, 0); + BLE_i(13-1); // label + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x8000); + LSR_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + RSB_rri(REG_WORK1, REG_WORK1, 16); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0);// label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + SIGNED16_REG_2_REG(d,d); + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) + +MIDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) +{ + if (isconst(i)) { + COMPCALL(jff_ROXR_l_imm)(d,s,(uae_u8)live.state[i].val); + return; + } + + s=readreg(s,4); + i=readreg(i,4); + d=writereg(d,4); + + MOV_rr(d,s); + MRS_CPSR(REG_WORK2); + + AND_rri(REG_WORK1, i, 0x3f); + CMP_ri(REG_WORK1, 33); + CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); + CMP_ri(REG_WORK1, 0); + BLE_i(13-1); // label + + SUB_rri(REG_WORK1, REG_WORK1, 1); + LSR_rri(d, d, 1); + MSR_CPSRf_r(REG_WORK2); + CC_ORR_rri(NATIVE_CC_CS, d,d,0x80000000); + LSR_rrr(d, d, REG_WORK1); + + MOV_ri(REG_WORK2, 1); + LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); + + RSB_rri(REG_WORK1, REG_WORK1, 32); + ORR_rrrLSLr(d,d,s,REG_WORK1); + + TST_rr(s, REG_WORK2); + CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); + CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); + B_i(0);// label2 + +// label: + MSR_CPSRf_i(0); + +// label2: + TST_rr(d,d); + + unlock2(d); + unlock2(s); + unlock2(i); +} +MENDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) + +/* + * ROXRW + * Operand Syntax: + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the most significant bit of the result is set. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Always cleared. + * C Set according to the last bit rotated out of the operand. + * + */ +MIDFUNC(2,jnf_ROXRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + RRX_rr(d,d); + LSR_rri(d,d,16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_ROXRW,(W4 d, RR4 s)) + +MIDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=writereg(d,4); + + LSL_rri(d,s,16); + MSR_CPSRf_i(0); + RRXS_rr(d,d); + LSR_rri(d,d,16); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) + +/* + * SUB + * Operand Syntax: , Dn + * Dn, + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Set if the result is zero. Cleared otherwise. + * V Set if an overflow is generated. Cleared otherwise. + * C Set if a carry is generated. Cleared otherwise. + * + */ +MIDFUNC(3,jnf_SUB_b_imm,(W4 d, RR4 s, IMM v)) +{ + if (isconst(s)) { + set_const(d,live.state[s].val-v); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED8_IMM_2_REG(REG_WORK1, (uint8)v); + SUB_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_SUB_b_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jnf_SUB_b_imm)(d,s,live.state[v].val); + return; + } + + // d has to be different to s and v + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SUB_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) +{ + if (isconst(s)) { + set_const(d,live.state[s].val-v); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + UNSIGNED16_IMM_2_REG(REG_WORK1, (uint16)v); + SUB_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jnf_SUB_w_imm)(d,s,live.state[v].val); + return; + } + + // d has to be different to s and v + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SUB_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) +{ + if (isconst(s)) { + set_const(d,live.state[s].val-v); + return; + } + + s=readreg(s,4); + d=writereg(d,4); + + compemu_raw_mov_l_ri(REG_WORK1, v); + SUB_rrr(d,s,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jnf_SUB_l_imm)(d,s,live.state[v].val); + return; + } + + // d has to be different to s and v + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SUB_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_IMM_2_REG(REG_WORK2, (uint8)v); + SIGNED8_REG_2_REG(REG_WORK1, s); + SUBS_rrr(d,REG_WORK1,REG_WORK2); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) + +MIDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) +{ + if (isconst(v)) { + COMPCALL(jff_SUB_b_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + SUBS_rrr(d,REG_WORK1,REG_WORK2); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_SUB_w_imm,(W4 d, RR2 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_IMM_2_REG(REG_WORK2, (uint16)v); + SIGNED16_REG_2_REG(REG_WORK1, s); + SUBS_rrr(d,REG_WORK1,REG_WORK2); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jitc_SUB_ff_w2l_rri,(W4 d, RR2 s, IMM v)) + +MIDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) +{ + if (isconst(v)) { + COMPCALL(jff_SUB_w_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + SUBS_rrr(d,REG_WORK1,REG_WORK2); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) +{ + s=readreg(s,4); + d=writereg(d,4); + + compemu_raw_mov_l_ri(REG_WORK2, v); + SUBS_rrr(d,s,REG_WORK2); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); +} +MENDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) + +MIDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) +{ + if (isconst(v)) { + COMPCALL(jff_SUB_l_imm)(d,s,live.state[v].val); + return; + } + + v=readreg(v,4); + s=readreg(s,4); + d=writereg(d,4); + + SUBS_rrr(d,s,v); + + // Todo: Handle this with inverted carry + MRS_CPSR(REG_WORK1);// mrs r2, CPSR + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 + MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 + // inverted_carry = true; + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) + +/* + * SUBA + * + * Operand Syntax: , Dn + * + * Operand Size: 16,32 + * + * Flags: Not affected. + * + */ +MIDFUNC(2,jnf_SUBA_b,(W4 d, RR1 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + SIGNED8_REG_2_REG(REG_WORK1,s); + SUB_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_SUBA_b,(W4 d, RR1 s)) + +MIDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + SIGNED16_REG_2_REG(REG_WORK1,s); + SUB_rrr(d,d,REG_WORK1); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) + +MIDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) +{ + s=readreg(s,4); + d=rmw(d,4,4); + + SUB_rrr(d,d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) + +/* + * SUBX + * Operand Syntax: Dy, Dx + * -(Ay), -(Ax) + * + * Operand Size: 8,16,32 + * + * X Set the same as the carry bit. + * N Set if the result is negative. Cleared otherwise. + * Z Cleared if the result is nonzero. Unchanged otherwise. + * V Set if an overflow is generated. Cleared otherwise. + * C Set if a carry is generated. Cleared otherwise. + * + * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise + * + */ +MIDFUNC(3,jnf_SUBX,(W4 d, RR4 s, RR4 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + SBC_rrr(d,s,v); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jnf_SUBX,(W4 d, RR4 s, RR4 v)) + +MIDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + MRS_CPSR(REG_WORK1); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK1, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK1, ARM_Z_FLAG); + PUSH(REG_WORK1); + + SIGNED8_REG_2_REG(REG_WORK1, s); + SIGNED8_REG_2_REG(REG_WORK2, v); + SBCS_rrr(d,REG_WORK1,REG_WORK2); + + POP(REG_WORK2); + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) + +MIDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + MRS_CPSR(REG_WORK1); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK1, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK1, ARM_Z_FLAG); + PUSH(REG_WORK1); + + SIGNED16_REG_2_REG(REG_WORK1, s); + SIGNED16_REG_2_REG(REG_WORK2, v); + SBCS_rrr(d,REG_WORK1,REG_WORK2); + + POP(REG_WORK2); + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) + +MIDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) +{ + s=readreg(s,4); + v=readreg(v,4); + d=writereg(d,4); + + MRS_CPSR(REG_WORK2); + CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); + CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); + + SBCS_rrr(d,s,v); + + MRS_CPSR(REG_WORK1); + EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); + AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); + MSR_CPSR_r(REG_WORK1); + + unlock2(d); + unlock2(s); + unlock2(v); +} +MENDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) + +/* + * SWAP + * Operand Syntax: Dn + * + * Operand Size: 16 + * + * X Not affected. + * N Set if the most significant bit of the 32-bit result is set. Cleared otherwise. + * Z Set if the 32-bit result is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(1,jnf_SWAP,(RW4 d)) +{ + d=rmw(d,4,4); + + ROR_rri(d,d,16); + + unlock2(d); +} +MENDFUNC(1,jnf_SWAP,(RW4 d)) + +MIDFUNC(1,jff_SWAP,(RW4 d)) +{ + d=rmw(d,4,4); + + ROR_rri(d,d,16); + MSR_CPSRf_i(0); + TST_rr(d,d); + + unlock2(d); +} +MENDFUNC(1,jff_SWAP,(RW4 d)) + +/* + * TST + * Operand Syntax: + * + * Operand Size: 8,16,32 + * + * X Not affected. + * N Set if the operand is negative. Cleared otherwise. + * Z Set if the operand is zero. Cleared otherwise. + * V Always cleared. + * C Always cleared. + * + */ +MIDFUNC(1,jff_TST_b,(RR1 s)) +{ + if (isconst(s)) { + SIGNED8_IMM_2_REG(REG_WORK1, (uint8)live.state[s].val); + } else { + s=readreg(s,4); + SIGNED8_REG_2_REG(REG_WORK1, s); + unlock2(s); + } + MSR_CPSRf_i(0); + TST_rr(REG_WORK1,REG_WORK1); +} +MENDFUNC(1,jff_TST_b,(RR1 s)) + +MIDFUNC(1,jff_TST_w,(RR2 s)) +{ + if (isconst(s)) { + SIGNED16_IMM_2_REG(REG_WORK1, (uint16)live.state[s].val); + } else { + s=readreg(s,4); + SIGNED16_REG_2_REG(REG_WORK1, s); + unlock2(s); + } + MSR_CPSRf_i(0); + TST_rr(REG_WORK1,REG_WORK1); +} +MENDFUNC(1,jff_TST_w,(RR2 s)) + +MIDFUNC(1,jff_TST_l,(RR4 s)) +{ + MSR_CPSRf_i(0); + + if (isconst(s)) { + compemu_raw_mov_l_ri(REG_WORK1, live.state[s].val); + TST_rr(REG_WORK1,REG_WORK1); + } + else { + s=readreg(s,4); + TST_rr(s,s); + unlock2(s); + } +} +MENDFUNC(1,jff_TST_l,(RR4 s)) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h new file mode 100644 index 000000000..ecbc2fdfe --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h @@ -0,0 +1,348 @@ +/* + * compiler/compemu_midfunc_arm2.h - Native MIDFUNCS for ARM (JIT v2) + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu.h + * + */ + +// Arm optimized midfunc +extern const uae_u32 ARM_CCR_MAP[]; + +DECLARE_MIDFUNC(restore_inverted_carry(void)); + +// ADD +DECLARE_MIDFUNC(jnf_ADD(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jnf_ADD_imm(W4 d, RR4 s, IMM v)); +DECLARE_MIDFUNC(jff_ADD_b(W4 d, RR1 s, RR1 v)); +DECLARE_MIDFUNC(jff_ADD_w(W4 d, RR2 s, RR2 v)); +DECLARE_MIDFUNC(jff_ADD_l(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_ADD_b_imm(W4 d, RR1 s, IMM v)); +DECLARE_MIDFUNC(jff_ADD_w_imm(W4 d, RR2 s, IMM v)); +DECLARE_MIDFUNC(jff_ADD_l_imm(W4 d, RR4 s, IMM v)); + +// ADDA +DECLARE_MIDFUNC(jnf_ADDA_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jnf_ADDA_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jnf_ADDA_l(W4 d, RR4 s)); + +// ADDX +DECLARE_MIDFUNC(jnf_ADDX(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_ADDX_b(W4 d, RR1 s, RR4 v)); +DECLARE_MIDFUNC(jff_ADDX_w(W4 d, RR2 s, RR4 v)); +DECLARE_MIDFUNC(jff_ADDX_l(W4 d, RR4 s, RR4 v)); + +// AND +DECLARE_MIDFUNC(jnf_AND(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_AND_b(W4 d, RR1 s, RR1 v)); +DECLARE_MIDFUNC(jff_AND_w(W4 d, RR2 s, RR2 v)); +DECLARE_MIDFUNC(jff_AND_l(W4 d, RR4 s, RR4 v)); + +// ANDSR +DECLARE_MIDFUNC(jff_ANDSR(IMM s, IMM x)); + +// ASL +DECLARE_MIDFUNC(jff_ASL_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASL_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASL_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASL_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ASL_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ASL_l_reg(W4 d, RR4 s, RR4 i)); + +// ASLW +DECLARE_MIDFUNC(jff_ASLW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_ASLW(W4 d, RR4 s)); + +// ASR +DECLARE_MIDFUNC(jnf_ASR_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_ASR_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_ASR_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASR_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASR_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_ASR_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_ASR_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ASR_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ASR_l_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ASR_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ASR_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ASR_l_reg(W4 d, RR4 s, RR4 i)); + +// ASRW +DECLARE_MIDFUNC(jff_ASRW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_ASRW(W4 d, RR4 s)); + +// BCHG +DECLARE_MIDFUNC(jnf_BCHG_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jnf_BCHG_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jff_BCHG_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jff_BCHG_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jnf_BCHG_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_BCHG_l(RW4 d, RR4 s)); + +DECLARE_MIDFUNC(jff_BCHG_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jff_BCHG_l(RW4 d, RR4 s)); + +// BCLR +DECLARE_MIDFUNC(jnf_BCLR_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jnf_BCLR_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jnf_BCLR_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_BCLR_l(RW4 d, RR4 s)); + +DECLARE_MIDFUNC(jff_BCLR_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jff_BCLR_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jff_BCLR_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jff_BCLR_l(RW4 d, RR4 s)); + +// BSET +DECLARE_MIDFUNC(jnf_BSET_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jnf_BSET_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jnf_BSET_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_BSET_l(RW4 d, RR4 s)); + +DECLARE_MIDFUNC(jff_BSET_b_imm(RW4 d, IMM s)); +DECLARE_MIDFUNC(jff_BSET_l_imm(RW4 d, IMM s)); + +DECLARE_MIDFUNC(jff_BSET_b(RW4 d, RR4 s)); +DECLARE_MIDFUNC(jff_BSET_l(RW4 d, RR4 s)); + +// BTST +DECLARE_MIDFUNC(jff_BTST_b_imm(RR4 d, IMM s)); +DECLARE_MIDFUNC(jff_BTST_l_imm(RR4 d, IMM s)); + +DECLARE_MIDFUNC(jff_BTST_b(RR4 d, RR4 s)); +DECLARE_MIDFUNC(jff_BTST_l(RR4 d, RR4 s)); + +// CLR +DECLARE_MIDFUNC (jnf_CLR(W4 d)); +DECLARE_MIDFUNC (jff_CLR(W4 d)); + +// CMP +DECLARE_MIDFUNC(jff_CMP_b(RR1 d, RR1 s)); +DECLARE_MIDFUNC(jff_CMP_w(RR2 d, RR2 s)); +DECLARE_MIDFUNC(jff_CMP_l(RR4 d, RR4 s)); + +// CMPA +DECLARE_MIDFUNC(jff_CMPA_b(RR1 d, RR1 s)); +DECLARE_MIDFUNC(jff_CMPA_w(RR2 d, RR2 s)); +DECLARE_MIDFUNC(jff_CMPA_l(RR4 d, RR4 s)); + +// EOR +DECLARE_MIDFUNC(jnf_EOR(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_EOR_b(W4 d, RR1 s, RR1 v)); +DECLARE_MIDFUNC(jff_EOR_w(W4 d, RR2 s, RR2 v)); +DECLARE_MIDFUNC(jff_EOR_l(W4 d, RR4 s, RR4 v)); + +// EORSR +DECLARE_MIDFUNC(jff_EORSR(IMM s, IMM x)); + +// EXT +DECLARE_MIDFUNC(jnf_EXT_b(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_EXT_w(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_EXT_l(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_EXT_b(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_EXT_w(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_EXT_l(W4 d, RR4 s)); + +// LSL +DECLARE_MIDFUNC(jnf_LSL_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_LSL_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSL_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSL_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSL_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSL_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSL_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSL_l_reg(W4 d, RR4 s, RR4 i)); + +// LSLW +DECLARE_MIDFUNC(jff_LSLW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_LSLW(W4 d, RR4 s)); + +// LSR +DECLARE_MIDFUNC(jnf_LSR_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_LSR_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_LSR_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSR_b_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSR_w_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jff_LSR_l_imm(W4 d, RR4 s, IMM i)); +DECLARE_MIDFUNC(jnf_LSR_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_LSR_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_LSR_l_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSR_b_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSR_w_reg(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_LSR_l_reg(W4 d, RR4 s, RR4 i)); + +// LSRW +DECLARE_MIDFUNC(jff_LSRW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_LSRW(W4 d, RR4 s)); + +// MOVE +DECLARE_MIDFUNC(jnf_MOVE(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_MOVE_b_imm(W4 d, IMM i)); +DECLARE_MIDFUNC(jff_MOVE_w_imm(W4 d, IMM i)); +DECLARE_MIDFUNC(jff_MOVE_l_imm(W4 d, IMM i)); +DECLARE_MIDFUNC(jff_MOVE_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jff_MOVE_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jff_MOVE_l(W4 d, RR4 s)); + +// MOVE16 +DECLARE_MIDFUNC(jnf_MOVE16(RR4 d, RR4 s)); + +// MOVEA +DECLARE_MIDFUNC(jnf_MOVEA_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jnf_MOVEA_l(W4 d, RR4 s)); + +// MULS +DECLARE_MIDFUNC (jnf_MULS(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jff_MULS(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jnf_MULS32(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jff_MULS32(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jnf_MULS64(RW4 d, RW4 s)); +DECLARE_MIDFUNC (jff_MULS64(RW4 d, RW4 s)); + +// MULU +DECLARE_MIDFUNC (jnf_MULU(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jff_MULU(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jnf_MULU32(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jff_MULU32(RW4 d, RR4 s)); +DECLARE_MIDFUNC (jnf_MULU64(RW4 d, RW4 s)); +DECLARE_MIDFUNC (jff_MULU64(RW4 d, RW4 s)); + +// NEG +DECLARE_MIDFUNC(jnf_NEG(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_NEG_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jff_NEG_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jff_NEG_l(W4 d, RR4 s)); + +// NEGX +DECLARE_MIDFUNC(jnf_NEGX(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_NEGX_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jff_NEGX_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jff_NEGX_l(W4 d, RR4 s)); + +// NOT +DECLARE_MIDFUNC(jnf_NOT(W4 d, RR4 s)); +DECLARE_MIDFUNC(jff_NOT_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jff_NOT_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jff_NOT_l(W4 d, RR4 s)); + +// OR +DECLARE_MIDFUNC(jnf_OR(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_OR_b(W4 d, RR1 s, RR1 v)); +DECLARE_MIDFUNC(jff_OR_w(W4 d, RR2 s, RR2 v)); +DECLARE_MIDFUNC(jff_OR_l(W4 d, RR4 s, RR4 v)); + +// ORSR +DECLARE_MIDFUNC(jff_ORSR(IMM s, IMM x)); + +// ROL +DECLARE_MIDFUNC(jnf_ROL_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROL_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROL_l(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROL_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROL_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROL_l(W4 d, RR4 s, RR4 i)); + +// ROLW +DECLARE_MIDFUNC(jff_ROLW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_ROLW(W4 d, RR4 s)); + +// RORW +DECLARE_MIDFUNC(jff_RORW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_RORW(W4 d, RR4 s)); + +// ROXL +DECLARE_MIDFUNC(jnf_ROXL_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROXL_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROXL_l(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXL_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXL_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXL_l(W4 d, RR4 s, RR4 i)); + +// ROXLW +DECLARE_MIDFUNC(jff_ROXLW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_ROXLW(W4 d, RR4 s)); + +// ROR +DECLARE_MIDFUNC(jnf_ROR_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROR_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROR_l(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROR_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROR_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROR_l(W4 d, RR4 s, RR4 i)); + +// ROXR +DECLARE_MIDFUNC(jnf_ROXR_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROXR_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jnf_ROXR_l(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXR_b(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXR_w(W4 d, RR4 s, RR4 i)); +DECLARE_MIDFUNC(jff_ROXR_l(W4 d, RR4 s, RR4 i)); + +// ROXRW +DECLARE_MIDFUNC(jff_ROXRW(W4 d, RR4 s)); +DECLARE_MIDFUNC(jnf_ROXRW(W4 d, RR4 s)); + +// SUB +DECLARE_MIDFUNC(jnf_SUB_b_imm(W4 d, RR4 s, IMM v)); +DECLARE_MIDFUNC(jnf_SUB_b(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jnf_SUB_w_imm(W4 d, RR4 s, IMM v)); +DECLARE_MIDFUNC(jnf_SUB_w(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jnf_SUB_l_imm(W4 d, RR4 s, IMM v)); +DECLARE_MIDFUNC(jnf_SUB_l(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_SUB_b(W4 d, RR1 s, RR1 v)); +DECLARE_MIDFUNC(jff_SUB_w(W4 d, RR2 s, RR2 v)); +DECLARE_MIDFUNC(jff_SUB_l(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_SUB_b_imm(W4 d, RR1 s, IMM v)); +DECLARE_MIDFUNC(jff_SUB_w_imm(W4 d, RR2 s, IMM v)); +DECLARE_MIDFUNC(jff_SUB_l_imm(W4 d, RR4 s, IMM v)); + +// SUBA +DECLARE_MIDFUNC(jnf_SUBA_b(W4 d, RR1 s)); +DECLARE_MIDFUNC(jnf_SUBA_w(W4 d, RR2 s)); +DECLARE_MIDFUNC(jnf_SUBA_l(W4 d, RR4 s)); + +// SUBX +DECLARE_MIDFUNC(jnf_SUBX(W4 d, RR4 s, RR4 v)); +DECLARE_MIDFUNC(jff_SUBX_b(W4 d, RR1 s, RR4 v)); +DECLARE_MIDFUNC(jff_SUBX_w(W4 d, RR2 s, RR4 v)); +DECLARE_MIDFUNC(jff_SUBX_l(W4 d, RR4 s, RR4 v)); + +// SWAP +DECLARE_MIDFUNC (jnf_SWAP(RW4 d)); +DECLARE_MIDFUNC (jff_SWAP(RW4 d)); + +// TST +DECLARE_MIDFUNC (jff_TST_b(RR1 s)); +DECLARE_MIDFUNC (jff_TST_w(RR2 s)); +DECLARE_MIDFUNC (jff_TST_l(RR4 s)); + diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp new file mode 100644 index 000000000..d5e2e053e --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp @@ -0,0 +1,2982 @@ +/* + * compiler/compemu_midfunc_arm.cpp - Native MIDFUNCS for IA-32 and AMD64 + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu_support.cpp + * + */ + +static int f_rmw(int r) +{ + int n; + + f_make_exclusive(r,0); + if (f_isinreg(r)) { + n=live.fate[r].realreg; + } + else + n=f_alloc_reg(r,0); + live.fate[r].status=DIRTY; + live.fat[n].locked++; + live.fat[n].touched=touchcnt++; + return n; +} + +static void fflags_into_flags_internal(uae_u32 tmp) +{ + int r; + + clobber_flags(); + r=f_readreg(FP_RESULT); + if (FFLAG_NREG_CLOBBER_CONDITION) { + int tmp2=tmp; + tmp=writereg_specific(tmp,4,FFLAG_NREG); + raw_fflags_into_flags(r); + unlock2(tmp); + forget_about(tmp2); + } + else + raw_fflags_into_flags(r); + f_unlock(r); + live_flags(); +} + + +/******************************************************************** + * CPU functions exposed to gencomp. Both CREATE and EMIT time * + ********************************************************************/ + + +/* + * RULES FOR HANDLING REGISTERS: + * + * * In the function headers, order the parameters + * - 1st registers written to + * - 2nd read/modify/write registers + * - 3rd registers read from + * * Before calling raw_*, you must call readreg, writereg or rmw for + * each register + * * The order for this is + * - 1st call remove_offset for all registers written to with size<4 + * - 2nd call readreg for all registers read without offset + * - 3rd call rmw for all rmw registers + * - 4th call readreg_offset for all registers that can handle offsets + * - 5th call get_offset for all the registers from the previous step + * - 6th call writereg for all written-to registers + * - 7th call raw_* + * - 8th unlock2 all registers that were locked + */ + +MIDFUNC(0,live_flags,(void)) +{ + live.flags_on_stack=TRASH; + live.flags_in_flags=VALID; + live.flags_are_important=1; +} +MENDFUNC(0,live_flags,(void)) + +MIDFUNC(0,dont_care_flags,(void)) +{ + live.flags_are_important=0; +} +MENDFUNC(0,dont_care_flags,(void)) + +MIDFUNC(0,duplicate_carry,(void)) +{ + evict(FLAGX); + make_flags_live_internal(); +#ifdef UAE + COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem + 1, NATIVE_CC_CS); +#else + COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem, NATIVE_CC_CS); +#endif + log_vwrite(FLAGX); +} +MENDFUNC(0,duplicate_carry,(void)) + +MIDFUNC(0,restore_carry,(void)) +{ + if (!have_rat_stall) { /* Not a P6 core, i.e. no partial stalls */ +#ifdef UAE + bt_l_ri_noclobber(FLAGX, 8); +#else + bt_l_ri_noclobber(FLAGX, 0); +#endif + } + else { /* Avoid the stall the above creates. + This is slow on non-P6, though. + */ +#ifdef UAE + COMPCALL(rol_w_ri(FLAGX, 8)); +#else + COMPCALL(rol_b_ri(FLAGX, 8)); +#endif + isclean(FLAGX); + } +} +MENDFUNC(0,restore_carry,(void)) + +MIDFUNC(0,start_needflags,(void)) +{ + needflags=1; +} +MENDFUNC(0,start_needflags,(void)) + +MIDFUNC(0,end_needflags,(void)) +{ + needflags=0; +} +MENDFUNC(0,end_needflags,(void)) + +MIDFUNC(0,make_flags_live,(void)) +{ + make_flags_live_internal(); +} +MENDFUNC(0,make_flags_live,(void)) + +MIDFUNC(1,fflags_into_flags,(W2 tmp)) +{ + clobber_flags(); + fflags_into_flags_internal(tmp); +} +MENDFUNC(1,fflags_into_flags,(W2 tmp)) + +MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ +{ + int size=4; + if (i<16) + size=2; + CLOBBER_BT; + r=readreg(r,size); + raw_bt_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ + +MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ +{ + CLOBBER_BT; + r=readreg(r,4); + b=readreg(b,4); + raw_bt_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ + +MIDFUNC(2,btc_l_ri,(RW4 r, IMM i)) +{ + int size=4; + if (i<16) + size=2; + CLOBBER_BT; + r=rmw(r,size,size); + raw_btc_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,btc_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_btc_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,btr_l_ri,(RW4 r, IMM i)) +{ + int size=4; + if (i<16) + size=2; + CLOBBER_BT; + r=rmw(r,size,size); + raw_btr_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,btr_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_btr_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,bts_l_ri,(RW4 r, IMM i)) +{ + int size=4; + if (i<16) + size=2; + CLOBBER_BT; + r=rmw(r,size,size); + raw_bts_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,bts_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) +{ + CLOBBER_BT; + b=readreg(b,4); + r=rmw(r,4,4); + raw_bts_l_rr(r,b); + unlock2(r); + unlock2(b); +} +MENDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) + +MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,4); + raw_mov_l_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_l_rm,(W4 d, IMM s)) + +MIDFUNC(1,call_r,(RR4 r)) /* Clobbering is implicit */ +{ + r=readreg(r,4); + raw_dec_sp(STACK_SHADOW_SPACE); + raw_call_r(r); + raw_inc_sp(STACK_SHADOW_SPACE); + unlock2(r); +} +MENDFUNC(1,call_r,(RR4 r)) /* Clobbering is implicit */ + +MIDFUNC(2,sub_l_mi,(IMM d, IMM s)) +{ + CLOBBER_SUB; + raw_sub_l_mi(d,s) ; +} +MENDFUNC(2,sub_l_mi,(IMM d, IMM s)) + +MIDFUNC(2,mov_l_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_l_mi(d,s) ; +} +MENDFUNC(2,mov_l_mi,(IMM d, IMM s)) + +MIDFUNC(2,mov_w_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_w_mi(d,s) ; +} +MENDFUNC(2,mov_w_mi,(IMM d, IMM s)) + +MIDFUNC(2,mov_b_mi,(IMM d, IMM s)) +{ + CLOBBER_MOV; + raw_mov_b_mi(d,s) ; +} +MENDFUNC(2,mov_b_mi,(IMM d, IMM s)) + +MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,1,1); + raw_rol_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,2,2); + raw_rol_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROL; + r=rmw(r,4,4); + raw_rol_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,rol_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(rol_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_rol_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(rol_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_rol_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(rol_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_ROL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_rol_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) + + +MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shll_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHLL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_shll_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shll_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHLL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shll_b",r); + } + raw_shll_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shll_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHLL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shll_b",r); + } + raw_shll_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) + + +MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,1,1); + raw_ror_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_b_ri,(RR1 r, IMM i)) + +MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,2,2); + raw_ror_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_w_ri,(RR2 r, IMM i)) + +MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_ROR; + r=rmw(r,4,4); + raw_ror_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,ror_l_ri,(RR4 r, IMM i)) + +MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROR; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + raw_ror_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) + +MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_ROR; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + raw_ror_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) + +MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(ror_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_ROR; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + raw_ror_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) + +MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shrl_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_shrl_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shrl_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shrl_b",r); + } + raw_shrl_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shrl_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHRL; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shrl_b",r); + } + raw_shrl_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) + + + +MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(r) && !needflags) { + live.state[r].val<<=i; + return; + } + CLOBBER_SHLL; + r=rmw(r,4,4); + raw_shll_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHLL; + r=rmw(r,2,2); + raw_shll_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHLL; + r=rmw(r,1,1); + raw_shll_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shll_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(r) && !needflags) { + live.state[r].val>>=i; + return; + } + CLOBBER_SHRL; + r=rmw(r,4,4); + raw_shrl_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,2,2); + raw_shrl_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,1,1); + raw_shrl_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,4,4); + raw_shra_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,2,2); + raw_shra_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,1,1); + raw_shra_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) +{ + if (isconst(r)) { + COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_rol_b",r); + } + raw_shra_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) + +MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shra_b",r); + } + raw_shra_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) + +MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + Dif (r!=1) { + jit_abort("Illegal register %d in raw_shra_b",r); + } + raw_shra_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) + + +MIDFUNC(2,setcc,(W1 d, IMM cc)) +{ + CLOBBER_SETCC; + d=writereg(d,1); + raw_setcc(d,cc); + unlock2(d); +} +MENDFUNC(2,setcc,(W1 d, IMM cc)) + +MIDFUNC(2,setcc_m,(IMM d, IMM cc)) +{ + CLOBBER_SETCC; + raw_setcc_m(d,cc); +} +MENDFUNC(2,setcc_m,(IMM d, IMM cc)) + +MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) +{ + if (d==s) + return; + CLOBBER_CMOV; + s=readreg(s,4); + d=rmw(d,4,4); + raw_cmov_l_rr(d,s,cc); + unlock2(s); + unlock2(d); +} +MENDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) + +MIDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) +{ + CLOBBER_CMOV; + d=rmw(d,4,4); + raw_cmov_l_rm(d,s,cc); + unlock2(d); +} +MENDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) + +MIDFUNC(2,bsf_l_rr,(W4 d, RR4 s)) +{ + CLOBBER_BSF; + s = readreg(s, 4); + d = writereg(d, 4); + raw_bsf_l_rr(d, s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,bsf_l_rr,(W4 d, RR4 s)) + +/* Set the Z flag depending on the value in s. Note that the + value has to be 0 or -1 (or, more precisely, for non-zero + values, bit 14 must be set)! */ +MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) +{ + CLOBBER_BSF; + s=rmw_specific(s,4,4,FLAG_NREG3); + tmp=writereg(tmp,4); + raw_flags_set_zero(s, tmp); + unlock2(tmp); + unlock2(s); +} +MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) + +MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) +{ + CLOBBER_MUL; + s=readreg(s,4); + d=rmw(d,4,4); + raw_imul_32_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_32_32,(RW4 d, RR4 s)) + +MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_imul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_mul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,mul_32_32,(RW4 d, RR4 s)) +{ + CLOBBER_MUL; + s=readreg(s,4); + d=rmw(d,4,4); + raw_mul_32_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,mul_32_32,(RW4 d, RR4 s)) + +#if SIZEOF_VOID_P == 8 +MIDFUNC(2,sign_extend_32_rr,(W4 d, RR2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)live.state[s].val); + return; + } + + CLOBBER_SE32; + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,4); + } + raw_sign_extend_32_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_32_rr,(W4 d, RR2 s)) +#endif + +MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s16)live.state[s].val); + return; + } + + CLOBBER_SE16; + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_sign_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) + +MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_SE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_sign_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) + + +MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u16)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE16; + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_zero_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) + +MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) +{ + int isrmw; + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_zero_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) + +MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=writereg(d,1); + raw_mov_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_b_rr,(W1 d, RR1 s)) + +MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=writereg(d,2); + raw_mov_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_w_rr,(W2 d, RR2 s)) + +MIDFUNC(4,mov_l_rrm_indexed,(W4 d,RR4 baser, RR4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_mov_l_rrm_indexed(d,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_l_rrm_indexed,(W4 d,RR4 baser, RR4 index, IMM factor)) + +MIDFUNC(4,mov_w_rrm_indexed,(W2 d, RR4 baser, RR4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,2); + + raw_mov_w_rrm_indexed(d,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_w_rrm_indexed,(W2 d, RR4 baser, RR4 index, IMM factor)) + +MIDFUNC(4,mov_b_rrm_indexed,(W1 d, RR4 baser, RR4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,1); + + raw_mov_b_rrm_indexed(d,baser,index,factor); + + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_b_rrm_indexed,(W1 d, RR4 baser, RR4 index, IMM factor)) + + +MIDFUNC(4,mov_l_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR4 s)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + s=readreg(s,4); + + Dif (baser==s || index==s) + jit_abort("mov_l_mrr_indexed"); + + + raw_mov_l_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_l_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR4 s)) + +MIDFUNC(4,mov_w_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR2 s)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + s=readreg(s,2); + + raw_mov_w_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_w_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR2 s)) + +MIDFUNC(4,mov_b_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR1 s)) +{ + CLOBBER_MOV; + s=readreg(s,1); + baser=readreg(baser,4); + index=readreg(index,4); + + raw_mov_b_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_b_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR1 s)) + + +MIDFUNC(5,mov_l_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,4); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_l_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_l_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s)) + +MIDFUNC(5,mov_w_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,2); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_w_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_w_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s)) + +MIDFUNC(5,mov_b_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_b_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_b_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s)) + + + +/* Read a long from base+baser+factor*index */ +MIDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, RR4 baser, RR4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,4); + raw_mov_l_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, RR4 baser, RR4 index, IMM factor)) + + +MIDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + remove_offset(d,-1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,2); + raw_mov_w_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)) + + +MIDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + remove_offset(d,-1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,1); + raw_mov_b_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)) + +/* Read a long from base+factor*index */ +MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) +{ + int indexreg=index; + + if (isconst(index)) { + COMPCALL(mov_l_rm)(d,base+factor*live.state[index].val); + return; + } + + CLOBBER_MOV; + index=readreg_offset(index,4); + base+=get_offset(indexreg)*factor; + d=writereg(d,4); + + raw_mov_l_rm_indexed(d,base,index,factor); + unlock2(index); + unlock2(d); +} +MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,4); + + raw_mov_l_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,2); + + raw_mov_w_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_b_rR,(W1 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_b_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,1); + + raw_mov_b_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_rR,(W1 d, RR4 s, IMM offset)) + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,4); + + raw_mov_l_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,2); + + raw_mov_w_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_b_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,1); + + raw_mov_b_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) + +MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_l_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) + +MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_w_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) + +MIDFUNC(3,mov_b_Ri,(RR4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_b_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_b_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_b_Ri,(RR4 d, IMM i, IMM offset)) + +/* Warning! OFFSET is byte sized only! */ +MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_l_Ri)(d,live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg(d,4); + + raw_mov_l_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) + +MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_w_Ri)(d,(uae_u16)live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg(d,4); + raw_mov_w_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) + +MIDFUNC(3,mov_b_Rr,(RR4 d, RR1 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_b_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_b_Ri)(d,(uae_u8)live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=readreg(d,4); + raw_mov_b_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_Rr,(RR4 d, RR1 s, IMM offset)) + +MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val+offset); + return; + } +#if USE_OFFSET + if (d==s) { + add_offset(d,offset); + return; + } +#endif + CLOBBER_LEA; + s=readreg(s,4); + d=writereg(d,4); + raw_lea_l_brr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) + +MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) +{ + if (!offset) { + COMPCALL(lea_l_rr_indexed)(d,s,index,factor); + return; + } + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_brr_indexed(d,s,index,factor,offset); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) + +MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) +{ + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_rr_indexed(d,s,index,factor); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) + +/* write d to the long at the address contained in s+offset */ +MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + + raw_mov_l_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) + +/* write the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) +{ + int dreg=d; + + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) + +MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_b_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_b_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) + +MIDFUNC(1,mid_bswap_32,(RW4 r)) +{ + + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=reverse32(oldv); + return; + } + + CLOBBER_SW32; + r=rmw(r,4,4); + raw_bswap_32(r); + unlock2(r); +} +MENDFUNC(1,mid_bswap_32,(RW4 r)) + +MIDFUNC(1,mid_bswap_16,(RW2 r)) +{ + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=((oldv>>8)&0xff) | ((oldv<<8)&0xff00) | (oldv&0xffff0000); + return; + } + + CLOBBER_SW16; + r=rmw(r,2,2); + + raw_bswap_16(r); + unlock2(r); +} +MENDFUNC(1,mid_bswap_16,(RW2 r)) + + + +MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) +{ + int olds; + + if (d==s) { /* How pointless! */ + return; + } + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val); + return; + } + olds=s; + disassociate(d); + s=readreg_offset(s,4); + live.state[d].realreg=s; + live.state[d].realind=live.nat[s].nholds; + live.state[d].val=live.state[olds].val; + live.state[d].validsize=4; + live.state[d].dirtysize=4; + set_status(d,DIRTY); + + live.nat[s].holds[live.nat[s].nholds]=d; + live.nat[s].nholds++; + log_clobberreg(d); + jit_log2("Added %d to nreg %d(%d), now holds %d regs", d,s,live.state[d].realind,live.nat[s].nholds); + unlock2(s); +} +MENDFUNC(2,mov_l_rr,(W4 d, RR4 s)) + +MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(mov_l_mi)(d,live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + + raw_mov_l_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_l_mr,(IMM d, RR4 s)) + + +MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(mov_w_mi)(d,(uae_u16)live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,2); + + raw_mov_w_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_w_mr,(IMM d, RR2 s)) + +MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(mov_b_mi)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + + raw_mov_b_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_b_mr,(IMM d, RR1 s)) + +MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) + +MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) +{ + set_const(d,s); + return; +} +MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) + +MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) + +MIDFUNC(2,add_l_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_l_mi(d,s) ; +} +MENDFUNC(2,add_l_mi,(IMM d, IMM s)) + +MIDFUNC(2,add_w_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_w_mi(d,s) ; +} +MENDFUNC(2,add_w_mi,(IMM d, IMM s)) + +MIDFUNC(2,add_b_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_b_mi(d,s) ; +} +MENDFUNC(2,add_b_mi,(IMM d, IMM s)) + +MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) +{ + CLOBBER_TEST; + d=readreg(d,4); + + raw_test_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,test_l_ri,(RR4 d, IMM i)) + +MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) +{ + CLOBBER_TEST; + d=readreg(d,4); + s=readreg(s,4); + + raw_test_l_rr(d,s);; + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_l_rr,(RR4 d, RR4 s)) + +MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) +{ + CLOBBER_TEST; + d=readreg(d,2); + s=readreg(s,2); + + raw_test_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_w_rr,(RR2 d, RR2 s)) + +MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) +{ + CLOBBER_TEST; + d=readreg(d,1); + s=readreg(s,1); + + raw_test_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_b_rr,(RR1 d, RR1 s)) + + +MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val &= i; + return; + } + + CLOBBER_AND; + d=rmw(d,4,4); + + raw_and_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,and_l,(RW4 d, RR4 s)) +{ + CLOBBER_AND; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_and_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_l,(RW4 d, RR4 s)) + +MIDFUNC(2,and_w,(RW2 d, RR2 s)) +{ + CLOBBER_AND; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_and_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_w,(RW2 d, RR2 s)) + +MIDFUNC(2,and_b,(RW1 d, RR1 s)) +{ + CLOBBER_AND; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_and_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_b,(RW1 d, RR1 s)) + +// gb-- used for making an fpcr value in compemu_fpp.cpp +MIDFUNC(2,or_l_rm,(RW4 d, IMM s)) +{ + CLOBBER_OR; + d=rmw(d,4,4); + + raw_or_l_rm(d,s); + unlock2(d); +} +MENDFUNC(2,or_l_rm,(RW4 d, IMM s)) + +MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val|=i; + return; + } + CLOBBER_OR; + d=rmw(d,4,4); + + raw_or_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,or_l,(RW4 d, RR4 s)) +{ + if (isconst(d) && isconst(s) && !needflags) { + live.state[d].val|=live.state[s].val; + return; + } + CLOBBER_OR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_or_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_l,(RW4 d, RR4 s)) + +MIDFUNC(2,or_w,(RW2 d, RR2 s)) +{ + CLOBBER_OR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_or_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_w,(RW2 d, RR2 s)) + +MIDFUNC(2,or_b,(RW1 d, RR1 s)) +{ + CLOBBER_OR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_or_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_b,(RW1 d, RR1 s)) + +MIDFUNC(2,adc_l,(RW4 d, RR4 s)) +{ + CLOBBER_ADC; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_adc_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_l,(RW4 d, RR4 s)) + +MIDFUNC(2,adc_w,(RW2 d, RR2 s)) +{ + CLOBBER_ADC; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_adc_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_w,(RW2 d, RR2 s)) + +MIDFUNC(2,adc_b,(RW1 d, RR1 s)) +{ + CLOBBER_ADC; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_adc_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_b,(RW1 d, RR1 s)) + +MIDFUNC(2,add_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(add_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_add_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_l,(RW4 d, RR4 s)) + +MIDFUNC(2,add_w,(RW2 d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(add_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_add_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_w,(RW2 d, RR2 s)) + +MIDFUNC(2,add_b,(RW1 d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(add_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_add_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_b,(RW1 d, RR1 s)) + +MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val-=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,-i); + return; + } +#endif + + CLOBBER_SUB; + d=rmw(d,4,4); + + raw_sub_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,2,2); + + raw_sub_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,1,1); + + raw_sub_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val+=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,i); + return; + } +#endif + CLOBBER_ADD; + d=rmw(d,4,4); + raw_add_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,2,2); + + raw_add_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,1,1); + + raw_add_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) +{ + CLOBBER_SBB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sbb_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_l,(RW4 d, RR4 s)) + +MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) +{ + CLOBBER_SBB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sbb_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_w,(RW2 d, RR2 s)) + +MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) +{ + CLOBBER_SBB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sbb_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_b,(RW1 d, RR1 s)) + +MIDFUNC(2,sub_l,(RW4 d, RR4 s)) +{ + if (isconst(s)) { + COMPCALL(sub_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sub_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_l,(RW4 d, RR4 s)) + +MIDFUNC(2,sub_w,(RW2 d, RR2 s)) +{ + if (isconst(s)) { + COMPCALL(sub_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sub_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_w,(RW2 d, RR2 s)) + +MIDFUNC(2,sub_b,(RW1 d, RR1 s)) +{ + if (isconst(s)) { + COMPCALL(sub_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sub_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_b,(RW1 d, RR1 s)) + +MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) +{ + CLOBBER_CMP; + s=readreg(s,4); + d=readreg(d,4); + + raw_cmp_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_l,(RR4 d, RR4 s)) + +MIDFUNC(2,cmp_l_ri,(RR4 r, IMM i)) +{ + CLOBBER_CMP; + r=readreg(r,4); + + raw_cmp_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,cmp_l_ri,(RR4 r, IMM i)) + +MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) +{ + CLOBBER_CMP; + s=readreg(s,2); + d=readreg(d,2); + + raw_cmp_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_w,(RR2 d, RR2 s)) + +MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) +{ + CLOBBER_CMP; + s=readreg(s,1); + d=readreg(d,1); + + raw_cmp_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_b,(RR1 d, RR1 s)) + + +MIDFUNC(2,xor_l,(RW4 d, RR4 s)) +{ + CLOBBER_XOR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_xor_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_l,(RW4 d, RR4 s)) + +MIDFUNC(2,xor_w,(RW2 d, RR2 s)) +{ + CLOBBER_XOR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_xor_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_w,(RW2 d, RR2 s)) + +MIDFUNC(2,xor_b,(RW1 d, RR1 s)) +{ + CLOBBER_XOR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_xor_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_b,(RW1 d, RR1 s)) + +MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) +{ + clobber_flags(); + remove_all_offsets(); + if (osize==4) { + if (out1!=in1 && out1!=r) { + COMPCALL(forget_about)(out1); + } + } + else { + tomem_c(out1); + } + + in1=readreg_specific(in1,isize,REG_PAR1); + r=readreg(r,4); + prepare_for_call_1(); /* This should ensure that there won't be + any need for swapping nregs in prepare_for_call_2 + */ +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(in1); +#endif + unlock2(in1); + unlock2(r); + + prepare_for_call_2(); + raw_dec_sp(STACK_SHADOW_SPACE); + raw_call_r(r); + raw_inc_sp(STACK_SHADOW_SPACE); + +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(4); +#endif + + + live.nat[REG_RESULT].holds[0]=out1; + live.nat[REG_RESULT].nholds=1; + live.nat[REG_RESULT].touched=touchcnt++; + + live.state[out1].realreg=REG_RESULT; + live.state[out1].realind=0; + live.state[out1].val=0; + live.state[out1].validsize=osize; + live.state[out1].dirtysize=osize; + set_status(out1,DIRTY); +} +MENDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) + +MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) +{ + clobber_flags(); + remove_all_offsets(); + in1=readreg_specific(in1,isize1,REG_PAR1); + in2=readreg_specific(in2,isize2,REG_PAR2); + r=readreg(r,4); + prepare_for_call_1(); /* This should ensure that there won't be + any need for swapping nregs in prepare_for_call_2 + */ +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(in2); + raw_push_l_r(in1); +#endif + unlock2(r); + unlock2(in1); + unlock2(in2); + prepare_for_call_2(); + raw_dec_sp(STACK_SHADOW_SPACE); + raw_call_r(r); + raw_inc_sp(STACK_SHADOW_SPACE); +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(8); +#endif +} +MENDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) + +/* forget_about() takes a mid-layer register */ +MIDFUNC(1,forget_about,(W4 r)) +{ + if (isinreg(r)) + disassociate(r); + live.state[r].val=0; + set_status(r,UNDEF); +} +MENDFUNC(1,forget_about,(W4 r)) + +MIDFUNC(0,nop,(void)) +{ + raw_emit_nop(); +} +MENDFUNC(0,nop,(void)) + +MIDFUNC(1,f_forget_about,(FW r)) +{ + if (f_isinreg(r)) + f_disassociate(r); + live.fate[r].status=UNDEF; +} +MENDFUNC(1,f_forget_about,(FW r)) + +MIDFUNC(1,fmov_pi,(FW r)) +{ + r=f_writereg(r); + raw_fmov_pi(r); + f_unlock(r); +} +MENDFUNC(1,fmov_pi,(FW r)) + +MIDFUNC(1,fmov_log10_2,(FW r)) +{ + r=f_writereg(r); + raw_fmov_log10_2(r); + f_unlock(r); +} +MENDFUNC(1,fmov_log10_2,(FW r)) + +MIDFUNC(1,fmov_log2_e,(FW r)) +{ + r=f_writereg(r); + raw_fmov_log2_e(r); + f_unlock(r); +} +MENDFUNC(1,fmov_log2_e,(FW r)) + +MIDFUNC(1,fmov_loge_2,(FW r)) +{ + r=f_writereg(r); + raw_fmov_loge_2(r); + f_unlock(r); +} +MENDFUNC(1,fmov_loge_2,(FW r)) + +MIDFUNC(1,fmov_1,(FW r)) +{ + r=f_writereg(r); + raw_fmov_1(r); + f_unlock(r); +} +MENDFUNC(1,fmov_1,(FW r)) + +MIDFUNC(1,fmov_0,(FW r)) +{ + r=f_writereg(r); + raw_fmov_0(r); + f_unlock(r); +} +MENDFUNC(1,fmov_0,(FW r)) + +MIDFUNC(2,fmov_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmov_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmov_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovi_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmovi_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmovi_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovi_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmovi_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmovi_mr,(MEMW m, FR r)) + +MIDFUNC(3,fmovi_mrb,(MEMW m, FR r, double *bounds)) +{ + r=f_readreg(r); + raw_fmovi_mrb(m,r,bounds); + f_unlock(r); +} +MENDFUNC(3,fmovi_mrb,(MEMW m, FR r, double *bounds)) + +MIDFUNC(2,fmovs_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmovs_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmovs_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovs_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmovs_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmovs_mr,(MEMW m, FR r)) + +MIDFUNC(1,fcuts_r,(FRW r)) +{ + r=f_rmw(r); + raw_fcuts_r(r); + f_unlock(r); +} +MENDFUNC(1,fcuts_r,(FRW r)) + +MIDFUNC(1,fcut_r,(FRW r)) +{ + r=f_rmw(r); + raw_fcut_r(r); + f_unlock(r); +} +MENDFUNC(1,fcut_r,(FRW r)) + +MIDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmov_ext_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmov_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmov_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmov_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmov_ext_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmov_rr,(FW d, FR s)) +{ + if (d==s) { /* How pointless! */ + return; + } +#if USE_F_ALIAS + f_disassociate(d); + s=f_readreg(s); + live.fate[d].realreg=s; + live.fate[d].realind=live.fat[s].nholds; + live.fate[d].status=DIRTY; + live.fat[s].holds[live.fat[s].nholds]=d; + live.fat[s].nholds++; + f_unlock(s); +#else + s=f_readreg(s); + d=f_writereg(d); + raw_fmov_rr(d,s); + f_unlock(s); + f_unlock(d); +#endif +} +MENDFUNC(2,fmov_rr,(FW d, FR s)) + +MIDFUNC(2,fldcw_m_indexed,(RR4 index, IMM base)) +{ + index=readreg(index,4); + + raw_fldcw_m_indexed(index,base); + unlock2(index); +} +MENDFUNC(2,fldcw_m_indexed,(RR4 index, IMM base)) + +MIDFUNC(1,ftst_r,(FR r)) +{ + r=f_readreg(r); + raw_ftst_r(r); + f_unlock(r); +} +MENDFUNC(1,ftst_r,(FR r)) + +MIDFUNC(0,dont_care_fflags,(void)) +{ + f_disassociate(FP_RESULT); +} +MENDFUNC(0,dont_care_fflags,(void)) + +MIDFUNC(2,fsqrt_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fsqrt_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsqrt_rr,(FW d, FR s)) + +MIDFUNC(2,fabs_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fabs_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fabs_rr,(FW d, FR s)) + +MIDFUNC(2,fgetexp_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fgetexp_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fgetexp_rr,(FW d, FR s)) + +MIDFUNC(2,fgetman_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fgetman_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fgetman_rr,(FW d, FR s)) + +MIDFUNC(2,fsin_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fsin_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsin_rr,(FW d, FR s)) + +MIDFUNC(2,fcos_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fcos_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fcos_rr,(FW d, FR s)) + +MIDFUNC(2,ftan_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_ftan_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,ftan_rr,(FW d, FR s)) + +MIDFUNC(3,fsincos_rr,(FW d, FW c, FR s)) +{ + s=f_readreg(s); /* s for source */ + d=f_writereg(d); /* d for sine */ + c=f_writereg(c); /* c for cosine */ + raw_fsincos_rr(d,c,s); + f_unlock(s); + f_unlock(d); + f_unlock(c); +} +MENDFUNC(3,fsincos_rr,(FW d, FW c, FR s)) + +MIDFUNC(2,fscale_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fscale_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fscale_rr,(FRW d, FR s)) + +MIDFUNC(2,ftwotox_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_ftwotox_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,ftwotox_rr,(FW d, FR s)) + +MIDFUNC(2,fetox_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fetox_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fetox_rr,(FW d, FR s)) + +MIDFUNC(2,frndint_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_frndint_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frndint_rr,(FW d, FR s)) + +MIDFUNC(2,fetoxM1_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fetoxM1_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fetoxM1_rr,(FW d, FR s)) + +MIDFUNC(2,ftentox_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_ftentox_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,ftentox_rr,(FW d, FR s)) + +MIDFUNC(2,flog2_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_flog2_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,flog2_rr,(FW d, FR s)) + +MIDFUNC(2,flogN_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_flogN_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,flogN_rr,(FW d, FR s)) + +MIDFUNC(2,flogNP1_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_flogNP1_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,flogNP1_rr,(FW d, FR s)) + +MIDFUNC(2,flog10_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_flog10_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,flog10_rr,(FW d, FR s)) + +MIDFUNC(2,fasin_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fasin_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fasin_rr,(FW d, FR s)) + +MIDFUNC(2,facos_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_facos_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,facos_rr,(FW d, FR s)) + +MIDFUNC(2,fatan_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fatan_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fatan_rr,(FW d, FR s)) + +MIDFUNC(2,fatanh_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fatanh_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fatanh_rr,(FW d, FR s)) + +MIDFUNC(2,fsinh_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fsinh_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsinh_rr,(FW d, FR s)) + +MIDFUNC(2,fcosh_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fcosh_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fcosh_rr,(FW d, FR s)) + +MIDFUNC(2,ftanh_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_ftanh_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,ftanh_rr,(FW d, FR s)) + +MIDFUNC(2,fneg_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fneg_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fneg_rr,(FW d, FR s)) + +MIDFUNC(2,fadd_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fadd_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fadd_rr,(FRW d, FR s)) + +MIDFUNC(2,fsub_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fsub_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsub_rr,(FRW d, FR s)) + +MIDFUNC(2,fcmp_rr,(FR d, FR s)) +{ + d=f_readreg(d); + s=f_readreg(s); + raw_fcmp_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fcmp_rr,(FR d, FR s)) + +MIDFUNC(2,fdiv_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fdiv_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fdiv_rr,(FRW d, FR s)) + +MIDFUNC(2,frem_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_frem_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frem_rr,(FRW d, FR s)) + +MIDFUNC(2,frem1_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_frem1_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frem1_rr,(FRW d, FR s)) + +MIDFUNC(2,fmul_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fmul_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fmul_rr,(FRW d, FR s)) + +#ifdef __GNUC__ + +static inline void mfence(void) +{ +#ifdef CPU_i386 + if (!cpuinfo.x86_has_xmm2) + __asm__ __volatile__("lock; addl $0,0(%%esp)":::"memory"); + else +#endif + __asm__ __volatile__("mfence":::"memory"); +} + +static inline void clflush(volatile void *__p) +{ + __asm__ __volatile__("clflush %0" : "+m" (*(volatile char *)__p)); +} + +static inline void flush_cpu_icache(void *start, void *stop) +{ + mfence(); + if (cpuinfo.x86_clflush_size != 0) + { + volatile char *vaddr = (volatile char *)(((uintptr)start / cpuinfo.x86_clflush_size) * cpuinfo.x86_clflush_size); + volatile char *vend = (volatile char *)((((uintptr)stop + cpuinfo.x86_clflush_size - 1) / cpuinfo.x86_clflush_size) * cpuinfo.x86_clflush_size); + while (vaddr < vend) + { + clflush(vaddr); + vaddr += cpuinfo.x86_clflush_size; + } + } + mfence(); +} + +#else + +static inline void flush_cpu_icache(void *start, void *stop) +{ + UNUSED(start); + UNUSED(stop); +} + +#endif + +static inline void write_jmp_target(uae_u32 *jmpaddr, cpuop_func* a) { + uintptr rel = (uintptr) a - ((uintptr) jmpaddr + 4); + *(jmpaddr) = (uae_u32) rel; + flush_cpu_icache((void *) jmpaddr, (void *) &jmpaddr[1]); +} + +static inline void emit_jmp_target(uae_u32 a) { + emit_long(a-((uintptr)target+4)); +} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h new file mode 100644 index 000000000..a0f5cf92c --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h @@ -0,0 +1,252 @@ +/* + * compiler/compemu_midfunc_x86.h - Native MIDFUNCS for IA-32 and AMD64 + * + * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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: + * File is included by compemu.h + * + */ + +DECLARE_MIDFUNC(bt_l_ri(RR4 r, IMM i)); +DECLARE_MIDFUNC(bt_l_rr(RR4 r, RR4 b)); +DECLARE_MIDFUNC(btc_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(btc_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(bts_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(bts_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(btr_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(btr_l_rr(RW4 r, RR4 b)); +DECLARE_MIDFUNC(mov_l_rm(W4 d, IMM s)); +DECLARE_MIDFUNC(call_r(RR4 r)); +DECLARE_MIDFUNC(sub_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_w_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_b_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(rol_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(rol_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(rol_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(rol_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(rol_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shll_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shll_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shll_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(ror_b_ri(RR1 r, IMM i)); +DECLARE_MIDFUNC(ror_w_ri(RR2 r, IMM i)); +DECLARE_MIDFUNC(ror_l_ri(RR4 r, IMM i)); +DECLARE_MIDFUNC(ror_l_rr(RR4 d, RR1 r)); +DECLARE_MIDFUNC(ror_w_rr(RR2 d, RR1 r)); +DECLARE_MIDFUNC(ror_b_rr(RR1 d, RR1 r)); +DECLARE_MIDFUNC(shrl_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shrl_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shrl_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shra_l_rr(RW4 d, RR1 r)); +DECLARE_MIDFUNC(shra_w_rr(RW2 d, RR1 r)); +DECLARE_MIDFUNC(shra_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(shll_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shll_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shll_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shrl_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shrl_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shrl_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shra_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shra_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shra_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(setcc(W1 d, IMM cc)); +DECLARE_MIDFUNC(setcc_m(IMM d, IMM cc)); +DECLARE_MIDFUNC(cmov_l_rr(RW4 d, RR4 s, IMM cc)); +DECLARE_MIDFUNC(cmov_l_rm(RW4 d, IMM s, IMM cc)); +DECLARE_MIDFUNC(bsf_l_rr(W4 d, RR4 s)); +DECLARE_MIDFUNC(pop_m(IMM d)); +DECLARE_MIDFUNC(push_m(IMM d)); +DECLARE_MIDFUNC(pop_l(W4 d)); +DECLARE_MIDFUNC(push_l_i(IMM i)); +DECLARE_MIDFUNC(push_l(RR4 s)); +DECLARE_MIDFUNC(clear_16(RW4 r)); +DECLARE_MIDFUNC(clear_8(RW4 r)); +DECLARE_MIDFUNC(sign_extend_32_rr(W4 d, RR2 s)); +DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, RR2 s)); +DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, RR1 s)); +DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, RR2 s)); +DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, RR1 s)); +DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(simulate_bsf(W4 tmp, RW4 s)); +DECLARE_MIDFUNC(imul_32_32(RW4 d, RR4 s)); +DECLARE_MIDFUNC(mul_32_32(RW4 d, RR4 s)); +DECLARE_MIDFUNC(mov_b_rr(W1 d, RR1 s)); +DECLARE_MIDFUNC(mov_w_rr(W2 d, RR2 s)); +DECLARE_MIDFUNC(mov_l_rrm_indexed(W4 d,RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_w_rrm_indexed(W2 d, RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_b_rrm_indexed(W1 d, RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_mrr_indexed(RR4 baser, RR4 index, IMM factor, RR4 s)); +DECLARE_MIDFUNC(mov_w_mrr_indexed(RR4 baser, RR4 index, IMM factor, RR2 s)); +DECLARE_MIDFUNC(mov_b_mrr_indexed(RR4 baser, RR4 index, IMM factor, RR1 s)); +DECLARE_MIDFUNC(mov_l_bmrr_indexed(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s)); +DECLARE_MIDFUNC(mov_w_bmrr_indexed(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s)); +DECLARE_MIDFUNC(mov_b_bmrr_indexed(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s)); +DECLARE_MIDFUNC(mov_l_brrm_indexed(W4 d, IMM base, RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_w_brrm_indexed(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_b_brrm_indexed(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_rm_indexed(W4 d, IMM base, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_rR(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_rR(W2 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_rR(W1 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_brR(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_brR(W2 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_brR(W1 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_Ri(RR4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_w_Ri(RR4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_b_Ri(RR4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_l_Rr(RR4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_Rr(RR4 d, RR2 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_Rr(RR4 d, RR1 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr(W4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr_indexed(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)); +DECLARE_MIDFUNC(lea_l_rr_indexed(W4 d, RR4 s, RR4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_bRr(RR4 d, RR4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_bRr(RR4 d, RR2 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_bRr(RR4 d, RR1 s, IMM offset)); +DECLARE_MIDFUNC(mid_bswap_32(RW4 r)); +DECLARE_MIDFUNC(mid_bswap_16(RW2 r)); +DECLARE_MIDFUNC(mov_l_rr(W4 d, RR4 s)); +DECLARE_MIDFUNC(mov_l_mr(IMM d, RR4 s)); +DECLARE_MIDFUNC(mov_w_mr(IMM d, RR2 s)); +DECLARE_MIDFUNC(mov_w_rm(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_mr(IMM d, RR1 s)); +DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); +DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); +DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); +DECLARE_MIDFUNC(add_l_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(add_w_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(add_b_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(test_l_ri(RR4 d, IMM i)); +DECLARE_MIDFUNC(test_l_rr(RR4 d, RR4 s)); +DECLARE_MIDFUNC(test_w_rr(RR2 d, RR2 s)); +DECLARE_MIDFUNC(test_b_rr(RR1 d, RR1 s)); +DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(and_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(and_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(and_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(or_l_rm(RW4 d, IMM s)); +DECLARE_MIDFUNC(or_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(or_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(or_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(or_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(adc_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(adc_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(adc_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(add_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(add_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(add_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(sub_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(sub_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(sub_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(add_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(add_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(add_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(sbb_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(sbb_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(sbb_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(sub_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(sub_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(sub_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(cmp_l(RR4 d, RR4 s)); +DECLARE_MIDFUNC(cmp_l_ri(RR4 r, IMM i)); +DECLARE_MIDFUNC(cmp_w(RR2 d, RR2 s)); +DECLARE_MIDFUNC(cmp_b(RR1 d, RR1 s)); +DECLARE_MIDFUNC(xor_l(RW4 d, RR4 s)); +DECLARE_MIDFUNC(xor_w(RW2 d, RR2 s)); +DECLARE_MIDFUNC(xor_b(RW1 d, RR1 s)); +DECLARE_MIDFUNC(live_flags(void)); +DECLARE_MIDFUNC(dont_care_flags(void)); +DECLARE_MIDFUNC(duplicate_carry(void)); +DECLARE_MIDFUNC(restore_carry(void)); +DECLARE_MIDFUNC(start_needflags(void)); +DECLARE_MIDFUNC(end_needflags(void)); +DECLARE_MIDFUNC(make_flags_live(void)); +DECLARE_MIDFUNC(call_r_11(RR4 r, W4 out1, RR4 in1, IMM osize, IMM isize)); +DECLARE_MIDFUNC(call_r_02(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)); +DECLARE_MIDFUNC(forget_about(W4 r)); +DECLARE_MIDFUNC(nop(void)); + +DECLARE_MIDFUNC(f_forget_about(FW r)); +DECLARE_MIDFUNC(fmov_pi(FW r)); +DECLARE_MIDFUNC(fmov_log10_2(FW r)); +DECLARE_MIDFUNC(fmov_log2_e(FW r)); +DECLARE_MIDFUNC(fmov_loge_2(FW r)); +DECLARE_MIDFUNC(fmov_1(FW r)); +DECLARE_MIDFUNC(fmov_0(FW r)); +DECLARE_MIDFUNC(fmov_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmov_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmovi_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmovi_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmovi_mrb(MEMW m, FR r, double *bounds)); +DECLARE_MIDFUNC(fmovs_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmovs_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fcuts_r(FRW r)); +DECLARE_MIDFUNC(fcut_r(FRW r)); +DECLARE_MIDFUNC(fmov_ext_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmov_ext_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmov_rr(FW d, FR s)); +DECLARE_MIDFUNC(fldcw_m_indexed(RR4 index, IMM base)); +DECLARE_MIDFUNC(ftst_r(FR r)); +DECLARE_MIDFUNC(dont_care_fflags(void)); +DECLARE_MIDFUNC(fsqrt_rr(FW d, FR s)); +DECLARE_MIDFUNC(fabs_rr(FW d, FR s)); +DECLARE_MIDFUNC(frndint_rr(FW d, FR s)); +DECLARE_MIDFUNC(fgetexp_rr(FW d, FR s)); +DECLARE_MIDFUNC(fgetman_rr(FW d, FR s)); +DECLARE_MIDFUNC(fsin_rr(FW d, FR s)); +DECLARE_MIDFUNC(fcos_rr(FW d, FR s)); +DECLARE_MIDFUNC(ftan_rr(FW d, FR s)); +DECLARE_MIDFUNC(fsincos_rr(FW d, FW c, FR s)); +DECLARE_MIDFUNC(fscale_rr(FRW d, FR s)); +DECLARE_MIDFUNC(ftwotox_rr(FW d, FR s)); +DECLARE_MIDFUNC(fetox_rr(FW d, FR s)); +DECLARE_MIDFUNC(fetoxM1_rr(FW d, FR s)); +DECLARE_MIDFUNC(ftentox_rr(FW d, FR s)); +DECLARE_MIDFUNC(flog2_rr(FW d, FR s)); +DECLARE_MIDFUNC(flogN_rr(FW d, FR s)); +DECLARE_MIDFUNC(flogNP1_rr(FW d, FR s)); +DECLARE_MIDFUNC(flog10_rr(FW d, FR s)); +DECLARE_MIDFUNC(fasin_rr(FW d, FR s)); +DECLARE_MIDFUNC(facos_rr(FW d, FR s)); +DECLARE_MIDFUNC(fatan_rr(FW d, FR s)); +DECLARE_MIDFUNC(fatanh_rr(FW d, FR s)); +DECLARE_MIDFUNC(fsinh_rr(FW d, FR s)); +DECLARE_MIDFUNC(fcosh_rr(FW d, FR s)); +DECLARE_MIDFUNC(ftanh_rr(FW d, FR s)); +DECLARE_MIDFUNC(fneg_rr(FW d, FR s)); +DECLARE_MIDFUNC(fadd_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fsub_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fmul_rr(FRW d, FR s)); +DECLARE_MIDFUNC(frem_rr(FRW d, FR s)); +DECLARE_MIDFUNC(frem1_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fdiv_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fcmp_rr(FR d, FR s)); +DECLARE_MIDFUNC(fflags_into_flags(W2 tmp)); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp new file mode 100644 index 000000000..c7b942448 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -0,0 +1,5111 @@ +/* + * compiler/compemu_support.cpp - Core dynamic translation engine + * + * Copyright (c) 2001-2009 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * JIT compiler m68k -> IA-32 and AMD64 / ARM + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifdef UAE + +#define writemem_special writemem +#define readmem_special readmem + +#else +#if !FIXED_ADDRESSING +#error "Only Fixed Addressing is supported with the JIT Compiler" +#endif + +#if defined(X86_ASSEMBLY) && !SAHF_SETO_PROFITABLE +#error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" +#endif + +/* NOTE: support for AMD64 assumes translation cache and other code + * buffers are allocated into a 32-bit address space because (i) B2/JIT + * code is not 64-bit clean and (ii) it's faster to resolve branches + * that way. + */ +#if !defined(CPU_i386) && !defined(CPU_x86_64) && !defined(CPU_arm) +#error "Only IA-32, X86-64 and ARM v6 targets are supported with the JIT Compiler" +#endif +#endif + +#define USE_MATCH 0 + +/* kludge for Brian, so he can compile under MSVC++ */ +#define USE_NORMAL_CALLING_CONVENTION 0 + +#include "sysconfig.h" +#include "sysdeps.h" + +#ifdef JIT + +#ifdef UAE +#include "options.h" +#include "events.h" +#include "memory.h" +#include "custom.h" +#else +#include "cpu_emulation.h" +#include "main.h" +#include "vm_alloc.h" + +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#endif +#include "newcpu.h" +#include "comptbl.h" +#ifdef UAE +#include "compemu.h" +#else +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "fpu/flags.h" +#include "parameters.h" +#endif +#include "verify.h" + +#ifdef UAE +#include "uae/log.h" + +#include "uae/vm.h" +#define VM_PAGE_READ UAE_VM_READ +#define VM_PAGE_WRITE UAE_VM_WRITE +#define VM_PAGE_EXECUTE UAE_VM_EXECUTE +#define VM_MAP_FAILED UAE_VM_ALLOC_FAILED +#define VM_MAP_DEFAULT 1 +#define VM_MAP_32BIT 1 +#define vm_protect(address, size, protect) uae_vm_protect(address, size, protect) +#define vm_release(address, size) uae_vm_free(address, size) + +static inline void *vm_acquire(size_t size, int options = VM_MAP_DEFAULT) +{ + assert(options == (VM_MAP_DEFAULT | VM_MAP_32BIT)); + return uae_vm_alloc(size, UAE_VM_32BIT, UAE_VM_READ_WRITE); +} + +#define UNUSED(x) +#include "uae.h" +#include "uae/log.h" +#define jit_log(format, ...) \ + uae_log("JIT: " format "\n", ##__VA_ARGS__); +#define jit_log2(format, ...) + +#define MEMBaseDiff uae_p32(NATMEM_OFFSET) + +#ifdef NATMEM_OFFSET +#define FIXED_ADDRESSING 1 +#endif + +#define SAHF_SETO_PROFITABLE + +// %%% BRIAN KING WAS HERE %%% +extern bool canbang; + +#include "compemu_prefs.cpp" + +#define uint32 uae_u32 +#define uint8 uae_u8 + +static inline int distrust_check(int value) +{ +#ifdef JIT_ALWAYS_DISTRUST + return 1; +#else + int distrust = value; + return distrust; +#endif +} + +static inline int distrust_byte(void) +{ + return distrust_check(currprefs.comptrustbyte); +} + +static inline int distrust_word(void) +{ + return distrust_check(currprefs.comptrustword); +} + +static inline int distrust_long(void) +{ + return distrust_check(currprefs.comptrustlong); +} + +static inline int distrust_addr(void) +{ + return distrust_check(currprefs.comptrustnaddr); +} + +#else +#define DEBUG 0 +#include "debug.h" + +#define NATMEM_OFFSET MEMBaseDiff +#define canbang 1 +#define op_illg op_illg_1 + +#ifdef WINUAE_ARANYM +void jit_abort(const char *format, ...) +{ + va_list args; + va_start(args, format); + ndebug::pdbvprintf(format, args); + va_end(args); + abort(); +} +#endif + +#if DEBUG +#define PROFILE_COMPILE_TIME 1 +#define PROFILE_UNTRANSLATED_INSNS 1 +#endif +#endif + +# include +# include +# include +# include + +#if defined(CPU_x86_64) && 0 +#define RECORD_REGISTER_USAGE 1 +#endif + +#ifdef JIT_DEBUG +#undef abort +#define abort() do { \ + fprintf(stderr, "Abort in file %s at line %d\n", __FILE__, __LINE__); \ + compiler_dumpstate(); \ + exit(EXIT_FAILURE); \ +} while (0) +#endif + +#ifdef RECORD_REGISTER_USAGE +static uint64 reg_count[16]; +static int reg_count_local[16]; + +static int reg_count_compare(const void *ap, const void *bp) +{ + const int a = *((int *)ap); + const int b = *((int *)bp); + return reg_count[b] - reg_count[a]; +} +#endif + +#ifdef PROFILE_COMPILE_TIME +#include +static uae_u32 compile_count = 0; +static clock_t compile_time = 0; +static clock_t emul_start_time = 0; +static clock_t emul_end_time = 0; +#endif + +#ifdef PROFILE_UNTRANSLATED_INSNS +static const int untranslated_top_ten = 20; +static uae_u32 raw_cputbl_count[65536] = { 0, }; +static uae_u16 opcode_nums[65536]; + + +static int untranslated_compfn(const void *e1, const void *e2) +{ + return raw_cputbl_count[*(const uae_u16 *)e1] < raw_cputbl_count[*(const uae_u16 *)e2]; +} +#endif + +static compop_func *compfunctbl[65536]; +static compop_func *nfcompfunctbl[65536]; +#ifdef NOFLAGS_SUPPORT +static cpuop_func *nfcpufunctbl[65536]; +#endif +uae_u8* comp_pc_p; + +#ifdef UAE +/* defined in uae.h */ +#else +// External variables +// newcpu.cpp +extern int quit_program; +#endif + +// gb-- Extra data for Basilisk II/JIT +#ifdef JIT_DEBUG +static bool JITDebug = false; // Enable runtime disassemblers through mon? +#endif +#if USE_INLINING +#ifdef UAE +#define follow_const_jumps (currprefs.comp_constjump != 0) +#else +static bool follow_const_jumps = true; // Flag: translation through constant jumps +#endif +#else +const bool follow_const_jumps = false; +#endif + +const uae_u32 MIN_CACHE_SIZE = 1024; // Minimal translation cache size (1 MB) +static uae_u32 cache_size = 0; // Size of total cache allocated for compiled blocks +static uae_u32 current_cache_size = 0; // Cache grows upwards: how much has been consumed already +static bool lazy_flush = true; // Flag: lazy translation cache invalidation +#ifdef UAE +#ifdef USE_JIT_FPU +#define avoid_fpu (!currprefs.compfpu) +#else +#define avoid_fpu (true) +#endif +#else +static bool avoid_fpu = true; // Flag: compile FPU instructions ? +#endif +static bool have_cmov = false; // target has CMOV instructions ? +static bool have_rat_stall = true; // target has partial register stalls ? +const bool tune_alignment = true; // Tune code alignments for running CPU ? +const bool tune_nop_fillers = true; // Tune no-op fillers for architecture +static bool setzflg_uses_bsf = false; // setzflg virtual instruction can use native BSF instruction correctly? +static int align_loops = 32; // Align the start of loops +static int align_jumps = 32; // Align the start of jumps +static int optcount[10] = { +#ifdef UAE + 4, // How often a block has to be executed before it is translated +#else + 10, // How often a block has to be executed before it is translated +#endif + 0, // How often to use naive translation + 0, 0, 0, 0, + -1, -1, -1, -1 +}; + +#ifdef UAE +/* FIXME: op_properties is currently in compemu.h */ + +op_properties prop[65536]; + +static inline bool is_const_jump(uae_u32 opcode) +{ + return prop[opcode].is_const_jump != 0; +} +#else +struct op_properties { + uae_u8 use_flags; + uae_u8 set_flags; + uae_u8 is_addx; + uae_u8 cflow; +}; +static op_properties prop[65536]; + +static inline int end_block(uae_u32 opcode) +{ + return (prop[opcode].cflow & fl_end_block); +} + +static inline bool is_const_jump(uae_u32 opcode) +{ + return (prop[opcode].cflow == fl_const_jump); +} + +#if 0 +static inline bool may_trap(uae_u32 opcode) +{ + return (prop[opcode].cflow & fl_trap); +} +#endif + +#endif + +static inline unsigned int cft_map (unsigned int f) +{ +#ifdef UAE + return f; +#else +#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU) + return f; +#else + return ((f >> 8) & 255) | ((f & 255) << 8); +#endif +#endif +} + +uae_u8* start_pc_p; +uae_u32 start_pc; +uae_u32 current_block_pc_p; +static uintptr current_block_start_target; +uae_u32 needed_flags; +static uintptr next_pc_p; +static uintptr taken_pc_p; +static int branch_cc; +static int redo_current_block; + +int segvcount=0; +int soft_flush_count=0; +int hard_flush_count=0; +int checksum_count=0; +static uae_u8* current_compile_p=NULL; +static uae_u8* max_compile_start; +static uae_u8* compiled_code=NULL; +static uae_s32 reg_alloc_run; +const int POPALLSPACE_SIZE = 2048; /* That should be enough space */ +static uae_u8 *popallspace=NULL; + +void* pushall_call_handler=NULL; +static void* popall_do_nothing=NULL; +static void* popall_exec_nostats=NULL; +static void* popall_execute_normal=NULL; +static void* popall_cache_miss=NULL; +static void* popall_recompile_block=NULL; +static void* popall_check_checksum=NULL; + +/* The 68k only ever executes from even addresses. So right now, we + * waste half the entries in this array + * UPDATE: We now use those entries to store the start of the linked + * lists that we maintain for each hash result. + */ +static cacheline cache_tags[TAGSIZE]; +int letit=0; +static blockinfo* hold_bi[MAX_HOLD_BI]; +static blockinfo* active; +static blockinfo* dormant; + +#ifdef NOFLAGS_SUPPORT +/* 68040 */ +extern const struct cputbl op_smalltbl_0_nf[]; +#endif +extern const struct comptbl op_smalltbl_0_comp_nf[]; +extern const struct comptbl op_smalltbl_0_comp_ff[]; + +#ifdef NOFLAGS_SUPPORT +/* 68020 + 68881 */ +extern const struct cputbl op_smalltbl_1_nf[]; +/* 68020 */ +extern const struct cputbl op_smalltbl_2_nf[]; +/* 68010 */ +extern const struct cputbl op_smalltbl_3_nf[]; +/* 68000 */ +extern const struct cputbl op_smalltbl_4_nf[]; +/* 68000 slow but compatible. */ +extern const struct cputbl op_smalltbl_5_nf[]; +#endif + +#ifdef WINUAE_ARANYM +static void flush_icache_hard(int n); +static void flush_icache_lazy(int n); +static void flush_icache_none(int n); +void (*flush_icache)(int n) = flush_icache_none; +#endif + +static bigstate live; +static smallstate empty_ss; +static smallstate default_ss; +static int optlev; + +static int writereg(int r, int size); +static void unlock2(int r); +static void setlock(int r); +static int readreg_specific(int r, int size, int spec); +static int writereg_specific(int r, int size, int spec); +static void prepare_for_call_1(void); +static void prepare_for_call_2(void); +static void align_target(uae_u32 a); + +static void inline flush_cpu_icache(void *from, void *to); +static void inline write_jmp_target(uae_u32 *jmpaddr, cpuop_func* a); +static void inline emit_jmp_target(uae_u32 a); + +uae_u32 m68k_pc_offset; + +/* Some arithmetic operations can be optimized away if the operands + * are known to be constant. But that's only a good idea when the + * side effects they would have on the flags are not important. This + * variable indicates whether we need the side effects or not + */ +uae_u32 needflags=0; + +/* Flag handling is complicated. + * + * x86 instructions create flags, which quite often are exactly what we + * want. So at times, the "68k" flags are actually in the x86 flags. + * + * Then again, sometimes we do x86 instructions that clobber the x86 + * flags, but don't represent a corresponding m68k instruction. In that + * case, we have to save them. + * + * We used to save them to the stack, but now store them back directly + * into the regflags.cznv of the traditional emulation. Thus some odd + * names. + * + * So flags can be in either of two places (used to be three; boy were + * things complicated back then!); And either place can contain either + * valid flags or invalid trash (and on the stack, there was also the + * option of "nothing at all", now gone). A couple of variables keep + * track of the respective states. + * + * To make things worse, we might or might not be interested in the flags. + * by default, we are, but a call to dont_care_flags can change that + * until the next call to live_flags. If we are not, pretty much whatever + * is in the register and/or the native flags is seen as valid. + */ + +static inline blockinfo* get_blockinfo(uae_u32 cl) +{ + return cache_tags[cl+1].bi; +} + +static inline blockinfo* get_blockinfo_addr(void* addr) +{ + blockinfo* bi=get_blockinfo(cacheline(addr)); + + while (bi) { + if (bi->pc_p==addr) + return bi; + bi=bi->next_same_cl; + } + return NULL; +} + +#ifdef WINUAE_ARANYM +/******************************************************************* + * Disassembler support * + *******************************************************************/ + +#define TARGET_M68K 0 +#define TARGET_POWERPC 1 +#define TARGET_X86 2 +#define TARGET_X86_64 3 +#define TARGET_ARM 4 +#if defined(CPU_i386) +#define TARGET_NATIVE TARGET_X86 +#endif +#if defined(CPU_powerpc) +#define TARGET_NATIVE TARGET_POWERPC +#endif +#if defined(CPU_x86_64) +#define TARGET_NATIVE TARGET_X86_64 +#endif +#if defined(CPU_arm) +#define TARGET_NATIVE TARGET_ARM +#endif +#include "disasm-glue.h" + +#ifdef JIT_DEBUG +static void disasm_block(int disasm_target, const uint8 *start, size_t length) +{ + UNUSED(start); + UNUSED(length); + switch (disasm_target) + { + case TARGET_M68K: +#if defined(HAVE_DISASM_M68K) + { + char buf[256]; + + disasm_info.memory_vma = ((memptr)((uintptr_t)(start) - MEMBaseDiff)); + while (length > 0) + { + int isize = m68k_disasm_to_buf(&disasm_info, buf); + bug("%s", buf); + if (isize < 0) + break; + if ((uintptr)isize > length) + break; + length -= isize; + } + } +#endif + break; + case TARGET_X86: + case TARGET_X86_64: +#if defined(HAVE_DISASM_X86) + { + const uint8 *end = start + length; + char buf[256]; + + while (start < end) + { + start = x86_disasm(start, buf); + bug("%s", buf); + } + } +#endif + break; + case TARGET_ARM: +#if defined(HAVE_DISASM_ARM) + { + const uint8 *end = start + length; + char buf[256]; + + while (start < end) + { + start = arm_disasm(start, buf); + bug("%s", buf); + } + } +#endif + break; + } +} + +static inline void disasm_native_block(const uint8 *start, size_t length) +{ + disasm_block(TARGET_NATIVE, start, length); +} + +static inline void disasm_m68k_block(const uint8 *start, size_t length) +{ + disasm_block(TARGET_M68K, start, length); +} +#endif +#endif + + +/******************************************************************* + * All sorts of list related functions for all of the lists * + *******************************************************************/ + +static inline void remove_from_cl_list(blockinfo* bi) +{ + uae_u32 cl=cacheline(bi->pc_p); + + if (bi->prev_same_cl_p) + *(bi->prev_same_cl_p)=bi->next_same_cl; + if (bi->next_same_cl) + bi->next_same_cl->prev_same_cl_p=bi->prev_same_cl_p; + if (cache_tags[cl+1].bi) + cache_tags[cl].handler=cache_tags[cl+1].bi->handler_to_use; + else + cache_tags[cl].handler=(cpuop_func*)popall_execute_normal; +} + +static inline void remove_from_list(blockinfo* bi) +{ + if (bi->prev_p) + *(bi->prev_p)=bi->next; + if (bi->next) + bi->next->prev_p=bi->prev_p; +} + +#if 0 +static inline void remove_from_lists(blockinfo* bi) +{ + remove_from_list(bi); + remove_from_cl_list(bi); +} +#endif + +static inline void add_to_cl_list(blockinfo* bi) +{ + uae_u32 cl=cacheline(bi->pc_p); + + if (cache_tags[cl+1].bi) + cache_tags[cl+1].bi->prev_same_cl_p=&(bi->next_same_cl); + bi->next_same_cl=cache_tags[cl+1].bi; + + cache_tags[cl+1].bi=bi; + bi->prev_same_cl_p=&(cache_tags[cl+1].bi); + + cache_tags[cl].handler=bi->handler_to_use; +} + +static inline void raise_in_cl_list(blockinfo* bi) +{ + remove_from_cl_list(bi); + add_to_cl_list(bi); +} + +static inline void add_to_active(blockinfo* bi) +{ + if (active) + active->prev_p=&(bi->next); + bi->next=active; + + active=bi; + bi->prev_p=&active; +} + +static inline void add_to_dormant(blockinfo* bi) +{ + if (dormant) + dormant->prev_p=&(bi->next); + bi->next=dormant; + + dormant=bi; + bi->prev_p=&dormant; +} + +static inline void remove_dep(dependency* d) +{ + if (d->prev_p) + *(d->prev_p)=d->next; + if (d->next) + d->next->prev_p=d->prev_p; + d->prev_p=NULL; + d->next=NULL; +} + +/* This block's code is about to be thrown away, so it no longer + depends on anything else */ +static inline void remove_deps(blockinfo* bi) +{ + remove_dep(&(bi->dep[0])); + remove_dep(&(bi->dep[1])); +} + +static inline void adjust_jmpdep(dependency* d, cpuop_func* a) +{ + write_jmp_target(d->jmp_off, a); +} + +/******************************************************************** + * Soft flush handling support functions * + ********************************************************************/ + +static inline void set_dhtu(blockinfo* bi, cpuop_func *dh) +{ + jit_log2("bi is %p",bi); + if (dh!=bi->direct_handler_to_use) { + dependency* x=bi->deplist; + jit_log2("bi->deplist=%p",bi->deplist); + while (x) { + jit_log2("x is %p",x); + jit_log2("x->next is %p",x->next); + jit_log2("x->prev_p is %p",x->prev_p); + + if (x->jmp_off) { + adjust_jmpdep(x,dh); + } + x=x->next; + } + bi->direct_handler_to_use=dh; + } +} + +static inline void invalidate_block(blockinfo* bi) +{ + int i; + + bi->optlevel=0; + bi->count=optcount[0]-1; + bi->handler=NULL; + bi->handler_to_use=(cpuop_func*)popall_execute_normal; + bi->direct_handler=NULL; + set_dhtu(bi,bi->direct_pen); + bi->needed_flags=0xff; + bi->status=BI_INVALID; + for (i=0;i<2;i++) { + bi->dep[i].jmp_off=NULL; + bi->dep[i].target=NULL; + } + remove_deps(bi); +} + +static inline void create_jmpdep(blockinfo* bi, int i, uae_u32* jmpaddr, uae_u32 target) +{ + blockinfo* tbi=get_blockinfo_addr((void*)(uintptr)target); + + Dif(!tbi) { + jit_abort("Could not create jmpdep!"); + } + bi->dep[i].jmp_off=jmpaddr; + bi->dep[i].source=bi; + bi->dep[i].target=tbi; + bi->dep[i].next=tbi->deplist; + if (bi->dep[i].next) + bi->dep[i].next->prev_p=&(bi->dep[i].next); + bi->dep[i].prev_p=&(tbi->deplist); + tbi->deplist=&(bi->dep[i]); +} + +static inline void block_need_recompile(blockinfo * bi) +{ + uae_u32 cl = cacheline(bi->pc_p); + + set_dhtu(bi, bi->direct_pen); + bi->direct_handler = bi->direct_pen; + + bi->handler_to_use = (cpuop_func *)popall_execute_normal; + bi->handler = (cpuop_func *)popall_execute_normal; + if (bi == cache_tags[cl + 1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; + bi->status = BI_NEED_RECOMP; +} + +#if USE_MATCH +static inline void mark_callers_recompile(blockinfo * bi) +{ + dependency *x = bi->deplist; + + while (x) { + dependency *next = x->next; /* This disappears when we mark for + * recompilation and thus remove the + * blocks from the lists */ + if (x->jmp_off) { + blockinfo *cbi = x->source; + + Dif(cbi->status == BI_INVALID) { + jit_log("invalid block in dependency list"); // FIXME? + // abort(); + } + if (cbi->status == BI_ACTIVE || cbi->status == BI_NEED_CHECK) { + block_need_recompile(cbi); + mark_callers_recompile(cbi); + } + else if (cbi->status == BI_COMPILING) { + redo_current_block = 1; + } + else if (cbi->status == BI_NEED_RECOMP) { + /* nothing */ + } + else { + jit_log2("Status %d in mark_callers",cbi->status); // FIXME? + } + } + x = next; + } +} +#endif + +static inline blockinfo* get_blockinfo_addr_new(void* addr, int /* setstate */) +{ + blockinfo* bi=get_blockinfo_addr(addr); + int i; + + if (!bi) { + for (i=0;ipc_p=(uae_u8*)addr; + invalidate_block(bi); + add_to_active(bi); + add_to_cl_list(bi); + + } + } + } + if (!bi) { + jit_abort("Looking for blockinfo, can't find free one"); + } + return bi; +} + +static void prepare_block(blockinfo* bi); + +/* Managment of blockinfos. + + A blockinfo struct is allocated whenever a new block has to be + compiled. If the list of free blockinfos is empty, we allocate a new + pool of blockinfos and link the newly created blockinfos altogether + into the list of free blockinfos. Otherwise, we simply pop a structure + of the free list. + + Blockinfo are lazily deallocated, i.e. chained altogether in the + list of free blockinfos whenvever a translation cache flush (hard or + soft) request occurs. +*/ + +template< class T > +class LazyBlockAllocator +{ + enum { + kPoolSize = 1 + (16384 - sizeof(T) - sizeof(void *)) / sizeof(T) + }; + struct Pool { + T chunk[kPoolSize]; + Pool * next; + }; + Pool * mPools; + T * mChunks; +public: + LazyBlockAllocator() : mPools(0), mChunks(0) { } +#ifdef UAE +#else + ~LazyBlockAllocator(); +#endif + T * acquire(); + void release(T * const); +}; + +#ifdef UAE +/* uae_vm_release may do logging, which isn't safe to do when the application + * is shutting down. Better to release memory manually with a function call + * to a release_all method on shutdown, or even simpler, just let the OS + * handle it (we're shutting down anyway). */ +#else +template< class T > +LazyBlockAllocator::~LazyBlockAllocator() +{ + Pool * currentPool = mPools; + while (currentPool) { + Pool * deadPool = currentPool; + currentPool = currentPool->next; + vm_release(deadPool, sizeof(Pool)); + } +} +#endif + +template< class T > +T * LazyBlockAllocator::acquire() +{ + if (!mChunks) { + // There is no chunk left, allocate a new pool and link the + // chunks into the free list + Pool * newPool = (Pool *)vm_acquire(sizeof(Pool), VM_MAP_DEFAULT | VM_MAP_32BIT); + if (newPool == VM_MAP_FAILED) { + jit_abort("Could not allocate block pool!"); + } + for (T * chunk = &newPool->chunk[0]; chunk < &newPool->chunk[kPoolSize]; chunk++) { + chunk->next = mChunks; + mChunks = chunk; + } + newPool->next = mPools; + mPools = newPool; + } + T * chunk = mChunks; + mChunks = chunk->next; + return chunk; +} + +template< class T > +void LazyBlockAllocator::release(T * const chunk) +{ + chunk->next = mChunks; + mChunks = chunk; +} + +template< class T > +class HardBlockAllocator +{ +public: + T * acquire() { + T * data = (T *)current_compile_p; + current_compile_p += sizeof(T); + return data; + } + + void release(T * const ) { + // Deallocated on invalidation + } +}; + +#if USE_SEPARATE_BIA +static LazyBlockAllocator BlockInfoAllocator; +static LazyBlockAllocator ChecksumInfoAllocator; +#else +static HardBlockAllocator BlockInfoAllocator; +static HardBlockAllocator ChecksumInfoAllocator; +#endif + +static inline checksum_info *alloc_checksum_info(void) +{ + checksum_info *csi = ChecksumInfoAllocator.acquire(); + csi->next = NULL; + return csi; +} + +static inline void free_checksum_info(checksum_info *csi) +{ + csi->next = NULL; + ChecksumInfoAllocator.release(csi); +} + +static inline void free_checksum_info_chain(checksum_info *csi) +{ + while (csi != NULL) { + checksum_info *csi2 = csi->next; + free_checksum_info(csi); + csi = csi2; + } +} + +static inline blockinfo *alloc_blockinfo(void) +{ + blockinfo *bi = BlockInfoAllocator.acquire(); +#if USE_CHECKSUM_INFO + bi->csi = NULL; +#endif + return bi; +} + +static inline void free_blockinfo(blockinfo *bi) +{ +#if USE_CHECKSUM_INFO + free_checksum_info_chain(bi->csi); + bi->csi = NULL; +#endif + BlockInfoAllocator.release(bi); +} + +static inline void alloc_blockinfos(void) +{ + int i; + blockinfo* bi; + + for (i=0;i>24)&0xff) | ((v>>8)&0xff00) | ((v<<8)&0xff0000) | ((v<<24)&0xff000000); +#endif +} + +void set_target(uae_u8* t) +{ + target=t; +} + +static inline uae_u8* get_target_noopt(void) +{ + return target; +} + +inline uae_u8* get_target(void) +{ + return get_target_noopt(); +} + +/******************************************************************** + * New version of data buffer: interleave data and code * + ********************************************************************/ +#if defined(USE_DATA_BUFFER) + +#define DATA_BUFFER_SIZE 1024 // Enlarge POPALLSPACE_SIZE if this value is greater than 768 +#define DATA_BUFFER_MAXOFFSET 4096 - 32 // max range between emit of data and use of data +static uae_u8* data_writepos = 0; +static uae_u8* data_endpos = 0; +#if DEBUG +static long data_wasted = 0; +#endif + +static inline void compemu_raw_branch(IMM d); + +static inline void data_check_end(long n, long codesize) +{ + if(data_writepos + n > data_endpos || get_target_noopt() + codesize - data_writepos > DATA_BUFFER_MAXOFFSET) + { + // Start new buffer +#if DEBUG + if(data_writepos < data_endpos) + data_wasted += data_endpos - data_writepos; +#endif + compemu_raw_branch(DATA_BUFFER_SIZE); + data_writepos = get_target_noopt(); + data_endpos = data_writepos + DATA_BUFFER_SIZE; + set_target(get_target_noopt() + DATA_BUFFER_SIZE); + } +} + +static inline long data_word_offs(uae_u16 x) +{ + data_check_end(4, 4); +#ifdef WORDS_BIGENDIAN + *((uae_u16*)data_writepos)=x; + data_writepos += 2; + *((uae_u16*)data_writepos)=0; + data_writepos += 2; +#else + *((uae_u32*)data_writepos)=x; + data_writepos += 4; +#endif + return (long)data_writepos - (long)get_target_noopt() - 12; +} + +static inline long data_long(uae_u32 x, long codesize) +{ + data_check_end(4, codesize); + *((uae_u32*)data_writepos)=x; + data_writepos += 4; + return (long)data_writepos - 4; +} + +static inline long data_long_offs(uae_u32 x) +{ + data_check_end(4, 4); + *((uae_u32*)data_writepos)=x; + data_writepos += 4; + return (long)data_writepos - (long)get_target_noopt() - 12; +} + +static inline long get_data_offset(long t) +{ + return t - (long)get_target_noopt() - 8; +} + +static inline void reset_data_buffer(void) +{ + data_writepos = 0; + data_endpos = 0; +} + +#endif +/******************************************************************** + * Getting the information about the target CPU * + ********************************************************************/ + +#if defined(CPU_arm) +#include "codegen_arm.cpp" +#endif +#if defined(CPU_i386) || defined(CPU_x86_64) +#include "codegen_x86.cpp" +#endif + + +/******************************************************************** + * Flags status handling. EMIT TIME! * + ********************************************************************/ + +static void bt_l_ri_noclobber(RR4 r, IMM i); + +static void make_flags_live_internal(void) +{ + if (live.flags_in_flags==VALID) + return; + Dif (live.flags_on_stack==TRASH) { + jit_abort("Want flags, got something on stack, but it is TRASH"); + } + if (live.flags_on_stack==VALID) { + int tmp; + tmp=readreg_specific(FLAGTMP,4,FLAG_NREG2); + raw_reg_to_flags(tmp); + unlock2(tmp); + + live.flags_in_flags=VALID; + return; + } + jit_abort("Huh? live.flags_in_flags=%d, live.flags_on_stack=%d, but need to make live", + live.flags_in_flags,live.flags_on_stack); +} + +static void flags_to_stack(void) +{ + if (live.flags_on_stack==VALID) + return; + if (!live.flags_are_important) { + live.flags_on_stack=VALID; + return; + } + Dif (live.flags_in_flags!=VALID) + jit_abort("flags_to_stack != VALID"); + else { + int tmp; + tmp=writereg_specific(FLAGTMP,4,FLAG_NREG1); + raw_flags_to_reg(tmp); + unlock2(tmp); + } + live.flags_on_stack=VALID; +} + +static inline void clobber_flags(void) +{ + if (live.flags_in_flags==VALID && live.flags_on_stack!=VALID) + flags_to_stack(); + live.flags_in_flags=TRASH; +} + +/* Prepare for leaving the compiled stuff */ +static inline void flush_flags(void) +{ + flags_to_stack(); + return; +} + +int touchcnt; + +/******************************************************************** + * Partial register flushing for optimized calls * + ********************************************************************/ + +struct regusage { + uae_u16 rmask; + uae_u16 wmask; +}; + +#if 0 +static inline void ru_set(uae_u16 *mask, int reg) +{ +#if USE_OPTIMIZED_CALLS + *mask |= 1 << reg; +#else + UNUSED(mask); + UNUSED(reg); +#endif +} + +static inline bool ru_get(const uae_u16 *mask, int reg) +{ +#if USE_OPTIMIZED_CALLS + return (*mask & (1 << reg)); +#else + UNUSED(mask); + UNUSED(reg); + /* Default: instruction reads & write to register */ + return true; +#endif +} + +static inline void ru_set_read(regusage *ru, int reg) +{ + ru_set(&ru->rmask, reg); +} + +static inline void ru_set_write(regusage *ru, int reg) +{ + ru_set(&ru->wmask, reg); +} + +static inline bool ru_read_p(const regusage *ru, int reg) +{ + return ru_get(&ru->rmask, reg); +} + +static inline bool ru_write_p(const regusage *ru, int reg) +{ + return ru_get(&ru->wmask, reg); +} + +static void ru_fill_ea(regusage *ru, int reg, amodes mode, + wordsizes size, int write_mode) +{ + switch (mode) { + case Areg: + reg += 8; + /* fall through */ + case Dreg: + ru_set(write_mode ? &ru->wmask : &ru->rmask, reg); + break; + case Ad16: + /* skip displacment */ + m68k_pc_offset += 2; + case Aind: + case Aipi: + case Apdi: + ru_set_read(ru, reg+8); + break; + case Ad8r: + ru_set_read(ru, reg+8); + /* fall through */ + case PC8r: { + uae_u16 dp = comp_get_iword((m68k_pc_offset+=2)-2); + reg = (dp >> 12) & 15; + ru_set_read(ru, reg); + if (dp & 0x100) + m68k_pc_offset += (((dp & 0x30) >> 3) & 7) + ((dp & 3) * 2); + break; + } + case PC16: + case absw: + case imm0: + case imm1: + m68k_pc_offset += 2; + break; + case absl: + case imm2: + m68k_pc_offset += 4; + break; + case immi: + m68k_pc_offset += (size == sz_long) ? 4 : 2; + break; + } +} + +/* TODO: split into a static initialization part and a dynamic one + (instructions depending on extension words) */ + +static void ru_fill(regusage *ru, uae_u32 opcode) +{ + m68k_pc_offset += 2; + + /* Default: no register is used or written to */ + ru->rmask = 0; + ru->wmask = 0; + + uae_u32 real_opcode = cft_map(opcode); + struct instr *dp = &table68k[real_opcode]; + + bool rw_dest = true; + bool handled = false; + + /* Handle some instructions specifically */ + uae_u16 ext; + switch (dp->mnemo) { + case i_BFCHG: + case i_BFCLR: + case i_BFEXTS: + case i_BFEXTU: + case i_BFFFO: + case i_BFINS: + case i_BFSET: + case i_BFTST: + ext = comp_get_iword((m68k_pc_offset+=2)-2); + if (ext & 0x800) ru_set_read(ru, (ext >> 6) & 7); + if (ext & 0x020) ru_set_read(ru, ext & 7); + ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); + if (dp->dmode == Dreg) + ru_set_read(ru, dp->dreg); + switch (dp->mnemo) { + case i_BFEXTS: + case i_BFEXTU: + case i_BFFFO: + ru_set_write(ru, (ext >> 12) & 7); + break; + case i_BFINS: + ru_set_read(ru, (ext >> 12) & 7); + /* fall through */ + case i_BFCHG: + case i_BFCLR: + case i_BSET: + if (dp->dmode == Dreg) + ru_set_write(ru, dp->dreg); + break; + } + handled = true; + rw_dest = false; + break; + + case i_BTST: + rw_dest = false; + break; + + case i_CAS: + { + ext = comp_get_iword((m68k_pc_offset+=2)-2); + int Du = ext & 7; + ru_set_read(ru, Du); + int Dc = (ext >> 6) & 7; + ru_set_read(ru, Dc); + ru_set_write(ru, Dc); + break; + } + case i_CAS2: + { + int Dc1, Dc2, Du1, Du2, Rn1, Rn2; + ext = comp_get_iword((m68k_pc_offset+=2)-2); + Rn1 = (ext >> 12) & 15; + Du1 = (ext >> 6) & 7; + Dc1 = ext & 7; + ru_set_read(ru, Rn1); + ru_set_read(ru, Du1); + ru_set_read(ru, Dc1); + ru_set_write(ru, Dc1); + ext = comp_get_iword((m68k_pc_offset+=2)-2); + Rn2 = (ext >> 12) & 15; + Du2 = (ext >> 6) & 7; + Dc2 = ext & 7; + ru_set_read(ru, Rn2); + ru_set_read(ru, Du2); + ru_set_write(ru, Dc2); + break; + } + case i_DIVL: case i_MULL: + m68k_pc_offset += 2; + break; + case i_LEA: + case i_MOVE: case i_MOVEA: case i_MOVE16: + rw_dest = false; + break; + case i_PACK: case i_UNPK: + rw_dest = false; + m68k_pc_offset += 2; + break; + case i_TRAPcc: + m68k_pc_offset += (dp->size == sz_long) ? 4 : 2; + break; + case i_RTR: + /* do nothing, just for coverage debugging */ + break; + /* TODO: handle EXG instruction */ + } + + /* Handle A-Traps better */ + if ((real_opcode & 0xf000) == 0xa000) { + handled = true; + } + + /* Handle EmulOps better */ + if ((real_opcode & 0xff00) == 0x7100) { + handled = true; + ru->rmask = 0xffff; + ru->wmask = 0; + } + + if (dp->suse && !handled) + ru_fill_ea(ru, dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); + + if (dp->duse && !handled) + ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); + + if (rw_dest) + ru->rmask |= ru->wmask; + + handled = handled || dp->suse || dp->duse; + + /* Mark all registers as used/written if the instruction may trap */ + if (may_trap(opcode)) { + handled = true; + ru->rmask = 0xffff; + ru->wmask = 0xffff; + } + + if (!handled) { + jit_abort("ru_fill: %04x = { %04x, %04x }", + real_opcode, ru->rmask, ru->wmask); + } +} +#endif + +/******************************************************************** + * register allocation per block logging * + ********************************************************************/ + +static uae_s8 vstate[VREGS]; +static uae_s8 vwritten[VREGS]; +static uae_s8 nstate[N_REGS]; + +#define L_UNKNOWN -127 +#define L_UNAVAIL -1 +#define L_NEEDED -2 +#define L_UNNEEDED -3 + +#if USE_MATCH +static inline void big_to_small_state(bigstate * /* b */, smallstate * s) +{ + int i; + + for (i = 0; i < VREGS; i++) + s->virt[i] = vstate[i]; + for (i = 0; i < N_REGS; i++) + s->nat[i] = nstate[i]; +} + +static inline int callers_need_recompile(bigstate * /* b */, smallstate * s) +{ + int i; + int reverse = 0; + + for (i = 0; i < VREGS; i++) { + if (vstate[i] != L_UNNEEDED && s->virt[i] == L_UNNEEDED) + return 1; + if (vstate[i] == L_UNNEEDED && s->virt[i] != L_UNNEEDED) + reverse++; + } + for (i = 0; i < N_REGS; i++) { + if (nstate[i] >= 0 && nstate[i] != s->nat[i]) + return 1; + if (nstate[i] < 0 && s->nat[i] >= 0) + reverse++; + } + if (reverse >= 2 && USE_MATCH) + return 1; /* In this case, it might be worth recompiling the + * callers */ + return 0; +} +#endif + +static inline void log_startblock(void) +{ + int i; + + for (i = 0; i < VREGS; i++) { + vstate[i] = L_UNKNOWN; + vwritten[i] = 0; + } + for (i = 0; i < N_REGS; i++) + nstate[i] = L_UNKNOWN; +} + +/* Using an n-reg for a temp variable */ +static inline void log_isused(int n) +{ + if (nstate[n] == L_UNKNOWN) + nstate[n] = L_UNAVAIL; +} + +static inline void log_visused(int r) +{ + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_NEEDED; +} + +static inline void do_load_reg(int n, int r) +{ + if (r == FLAGTMP) + raw_load_flagreg(n, r); + else if (r == FLAGX) + raw_load_flagx(n, r); + else + compemu_raw_mov_l_rm(n, (uintptr) live.state[r].mem); +} + +#if 0 +static inline void check_load_reg(int n, int r) +{ + compemu_raw_mov_l_rm(n, (uintptr) live.state[r].mem); +} +#endif + +static inline void log_vwrite(int r) +{ + vwritten[r] = 1; +} + +/* Using an n-reg to hold a v-reg */ +static inline void log_isreg(int n, int r) +{ + if (nstate[n] == L_UNKNOWN && r < 16 && !vwritten[r] && USE_MATCH) + nstate[n] = r; + else { + do_load_reg(n, r); + if (nstate[n] == L_UNKNOWN) + nstate[n] = L_UNAVAIL; + } + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_NEEDED; +} + +static inline void log_clobberreg(int r) +{ + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_UNNEEDED; +} + +/* This ends all possibility of clever register allocation */ + +static inline void log_flush(void) +{ + int i; + + for (i = 0; i < VREGS; i++) + if (vstate[i] == L_UNKNOWN) + vstate[i] = L_NEEDED; + for (i = 0; i < N_REGS; i++) + if (nstate[i] == L_UNKNOWN) + nstate[i] = L_UNAVAIL; +} + +static inline void log_dump(void) +{ + int i; + + return; + + jit_log("----------------------"); + for (i = 0; i < N_REGS; i++) { + switch (nstate[i]) { + case L_UNKNOWN: + jit_log("Nat %d : UNKNOWN", i); + break; + case L_UNAVAIL: + jit_log("Nat %d : UNAVAIL", i); + break; + default: + jit_log("Nat %d : %d", i, nstate[i]); + break; + } + } + for (i = 0; i < VREGS; i++) { + if (vstate[i] == L_UNNEEDED) { + jit_log("Virt %d: UNNEEDED", i); + } + } +} + +/******************************************************************** + * register status handling. EMIT TIME! * + ********************************************************************/ + +static inline void set_status(int r, int status) +{ + if (status == ISCONST) + log_clobberreg(r); + live.state[r].status=status; +} + +static inline int isinreg(int r) +{ + return live.state[r].status==CLEAN || live.state[r].status==DIRTY; +} + +static inline void adjust_nreg(int r, uae_u32 val) +{ + if (!val) + return; + compemu_raw_lea_l_brr(r,r,val); +} + +static void tomem(int r) +{ + int rr=live.state[r].realreg; + + if (isinreg(r)) { + if (live.state[r].val && live.nat[rr].nholds==1 + && !live.nat[rr].locked) { + jit_log2("RemovingA offset %x from reg %d (%d) at %p", live.state[r].val,r,rr,target); + adjust_nreg(rr,live.state[r].val); + live.state[r].val=0; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + } + } + + if (live.state[r].status==DIRTY) { + switch (live.state[r].dirtysize) { + case 1: compemu_raw_mov_b_mr((uintptr)live.state[r].mem,rr); break; + case 2: compemu_raw_mov_w_mr((uintptr)live.state[r].mem,rr); break; + case 4: compemu_raw_mov_l_mr((uintptr)live.state[r].mem,rr); break; + default: abort(); + } + log_vwrite(r); + set_status(r,CLEAN); + live.state[r].dirtysize=0; + } +} + +static inline int isconst(int r) +{ + return live.state[r].status==ISCONST; +} + +int is_const(int r) +{ + return isconst(r); +} + +static inline void writeback_const(int r) +{ + if (!isconst(r)) + return; + Dif (live.state[r].needflush==NF_HANDLER) { + jit_abort("Trying to write back constant NF_HANDLER!"); + } + + compemu_raw_mov_l_mi((uintptr)live.state[r].mem,live.state[r].val); + log_vwrite(r); + live.state[r].val=0; + set_status(r,INMEM); +} + +static inline void tomem_c(int r) +{ + if (isconst(r)) { + writeback_const(r); + } + else + tomem(r); +} + +static void evict(int r) +{ + int rr; + + if (!isinreg(r)) + return; + tomem(r); + rr=live.state[r].realreg; + + Dif (live.nat[rr].locked && + live.nat[rr].nholds==1) { + jit_abort("register %d in nreg %d is locked!",r,live.state[r].realreg); + } + + live.nat[rr].nholds--; + if (live.nat[rr].nholds!=live.state[r].realind) { /* Was not last */ + int topreg=live.nat[rr].holds[live.nat[rr].nholds]; + int thisind=live.state[r].realind; + + live.nat[rr].holds[thisind]=topreg; + live.state[topreg].realind=thisind; + } + live.state[r].realreg=-1; + set_status(r,INMEM); +} + +static inline void free_nreg(int r) +{ + int i=live.nat[r].nholds; + + while (i) { + int vr; + + --i; + vr=live.nat[r].holds[i]; + evict(vr); + } + Dif (live.nat[r].nholds!=0) { + jit_abort("Failed to free nreg %d, nholds is %d",r,live.nat[r].nholds); + } +} + +/* Use with care! */ +static inline void isclean(int r) +{ + if (!isinreg(r)) + return; + live.state[r].validsize=4; + live.state[r].dirtysize=0; + live.state[r].val=0; + set_status(r,CLEAN); +} + +static inline void disassociate(int r) +{ + isclean(r); + evict(r); +} + +static inline void set_const(int r, uae_u32 val) +{ + disassociate(r); + live.state[r].val=val; + set_status(r,ISCONST); +} + +static inline uae_u32 get_offset(int r) +{ + return live.state[r].val; +} + +static int alloc_reg_hinted(int r, int size, int willclobber, int hint) +{ + int bestreg; + uae_s32 when; + int i; + uae_s32 badness=0; /* to shut up gcc */ + bestreg=-1; + when=2000000000; + + /* XXX use a regalloc_order table? */ + for (i=0;i0) { + free_nreg(bestreg); + } + if (isinreg(r)) { + int rr=live.state[r].realreg; + /* This will happen if we read a partially dirty register at a + bigger size */ + Dif (willclobber || live.state[r].validsize>=size) + jit_abort("willclobber || live.state[r].validsize>=size"); + Dif (live.nat[rr].nholds!=1) + jit_abort("live.nat[rr].nholds!=1"); + if (size==4 && live.state[r].validsize==2) { + log_isused(bestreg); + log_visused(r); + compemu_raw_mov_l_rm(bestreg,(uintptr)live.state[r].mem); + compemu_raw_bswap_32(bestreg); + compemu_raw_zero_extend_16_rr(rr,rr); + compemu_raw_zero_extend_16_rr(bestreg,bestreg); + compemu_raw_bswap_32(bestreg); + compemu_raw_lea_l_rr_indexed(rr, rr, bestreg, 1); + live.state[r].validsize=4; + live.nat[rr].touched=touchcnt++; + return rr; + } + if (live.state[r].validsize==1) { + /* Nothing yet */ + } + evict(r); + } + + if (!willclobber) { + if (live.state[r].status!=UNDEF) { + if (isconst(r)) { + compemu_raw_mov_l_ri(bestreg,live.state[r].val); + live.state[r].val=0; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + log_isused(bestreg); + } + else { + log_isreg(bestreg, r); /* This will also load it! */ + live.state[r].dirtysize=0; + set_status(r,CLEAN); + } + } + else { + live.state[r].val=0; + live.state[r].dirtysize=0; + set_status(r,CLEAN); + log_isused(bestreg); + } + live.state[r].validsize=4; + } + else { /* this is the easiest way, but not optimal. FIXME! */ + /* Now it's trickier, but hopefully still OK */ + if (!isconst(r) || size==4) { + live.state[r].validsize=size; + live.state[r].dirtysize=size; + live.state[r].val=0; + set_status(r,DIRTY); + if (size == 4) { + log_clobberreg(r); + log_isused(bestreg); + } + else { + log_visused(r); + log_isused(bestreg); + } + } + else { + if (live.state[r].status!=UNDEF) + compemu_raw_mov_l_ri(bestreg,live.state[r].val); + live.state[r].val=0; + live.state[r].validsize=4; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + log_isused(bestreg); + } + } + live.state[r].realreg=bestreg; + live.state[r].realind=live.nat[bestreg].nholds; + live.nat[bestreg].touched=touchcnt++; + live.nat[bestreg].holds[live.nat[bestreg].nholds]=r; + live.nat[bestreg].nholds++; + + return bestreg; +} + +/* +static int alloc_reg(int r, int size, int willclobber) +{ + return alloc_reg_hinted(r,size,willclobber,-1); +} +*/ + +static void unlock2(int r) +{ + Dif (!live.nat[r].locked) + jit_abort("unlock2 %d not locked", r); + live.nat[r].locked--; +} + +static void setlock(int r) +{ + live.nat[r].locked++; +} + + +static void mov_nregs(int d, int s) +{ + int nd=live.nat[d].nholds; + int i; + + if (s==d) + return; + + if (nd>0) + free_nreg(d); + + log_isused(d); + compemu_raw_mov_l_rr(d,s); + + for (i=0;i=size) { + n=live.state[r].realreg; + switch(size) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + answer=n; + } + break; + case 4: + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,spec>=0?4:size,0,spec); + } + + if (spec>=0 && spec!=answer) { + /* Too bad */ + mov_nregs(spec,answer); + answer=spec; + } + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + return answer; +} + + + +static int readreg(int r, int size) +{ + return readreg_general(r,size,-1,0); +} + +static int readreg_specific(int r, int size, int spec) +{ + return readreg_general(r,size,spec,0); +} + +static int readreg_offset(int r, int size) +{ + return readreg_general(r,size,-1,1); +} + +/* writereg_general(r, size, spec) + * + * INPUT + * - r : mid-layer register + * - size : requested size (1/2/4) + * - spec : -1 if find or make a register free, otherwise specifies + * the physical register to use in any case + * + * OUTPUT + * - hard (physical, x86 here) register allocated to virtual register r + */ +static inline int writereg_general(int r, int size, int spec) +{ + int n; + int answer=-1; + + record_register(r); + if (size<4) { + remove_offset(r,spec); + } + + make_exclusive(r,size,spec); + if (isinreg(r)) { + int nvsize=size>live.state[r].validsize?size:live.state[r].validsize; + int ndsize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; + n=live.state[r].realreg; + + Dif (live.nat[n].nholds!=1) + jit_abort("live.nat[%d].nholds!=1", n); + switch(size) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + } + break; + case 4: + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,size,1,spec); + } + if (spec>=0 && spec!=answer) { + mov_nregs(spec,answer); + answer=spec; + } + if (live.state[r].status==UNDEF) + live.state[r].validsize=4; + live.state[r].dirtysize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; + live.state[r].validsize=size>live.state[r].validsize?size:live.state[r].validsize; + + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + if (size==4) { + live.state[r].val=0; + } + else { + Dif (live.state[r].val) { + jit_abort("Problem with val"); + } + } + set_status(r,DIRTY); + return answer; +} + +static int writereg(int r, int size) +{ + return writereg_general(r,size,-1); +} + +static int writereg_specific(int r, int size, int spec) +{ + return writereg_general(r,size,spec); +} + +static inline int rmw_general(int r, int wsize, int rsize, int spec) +{ + int n; + int answer=-1; + + record_register(r); + if (live.state[r].status==UNDEF) { + jit_log("WARNING: Unexpected read of undefined register %d",r); + } + remove_offset(r,spec); + make_exclusive(r,0,spec); + + Dif (wsize=rsize) { + n=live.state[r].realreg; + Dif (live.nat[n].nholds!=1) + jit_abort("live.nat[%d].nholds!=1", n); + + switch(rsize) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + answer=n; + } + break; + case 4: + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,spec>=0?4:rsize,0,spec); + } + + if (spec>=0 && spec!=answer) { + /* Too bad */ + mov_nregs(spec,answer); + answer=spec; + } + if (wsize>live.state[r].dirtysize) + live.state[r].dirtysize=wsize; + if (wsize>live.state[r].validsize) + live.state[r].validsize=wsize; + set_status(r,DIRTY); + + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + + Dif (live.state[r].val) { + jit_abort("Problem with val(rmw)"); + } + return answer; +} + +static int rmw(int r, int wsize, int rsize) +{ + return rmw_general(r,wsize,rsize,-1); +} + +static int rmw_specific(int r, int wsize, int rsize, int spec) +{ + return rmw_general(r,wsize,rsize,spec); +} + + +/* needed for restoring the carry flag on non-P6 cores */ +static void bt_l_ri_noclobber(RR4 r, IMM i) +{ + int size=4; + if (i<16) + size=2; + r=readreg(r,size); + compemu_raw_bt_l_ri(r,i); + unlock2(r); +} + +/******************************************************************** + * FPU register status handling. EMIT TIME! * + ********************************************************************/ + +static void f_tomem(int r) +{ + if (live.fate[r].status==DIRTY) { +#if defined(USE_LONG_DOUBLE) + raw_fmov_ext_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); +#else + raw_fmov_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); +#endif + live.fate[r].status=CLEAN; + } +} + +static void f_tomem_drop(int r) +{ + if (live.fate[r].status==DIRTY) { +#if defined(USE_LONG_DOUBLE) + raw_fmov_ext_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); +#else + raw_fmov_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); +#endif + live.fate[r].status=INMEM; + } +} + + +static inline int f_isinreg(int r) +{ + return live.fate[r].status==CLEAN || live.fate[r].status==DIRTY; +} + +static void f_evict(int r) +{ + int rr; + + if (!f_isinreg(r)) + return; + rr=live.fate[r].realreg; + if (live.fat[rr].nholds==1) + f_tomem_drop(r); + else + f_tomem(r); + + Dif (live.fat[rr].locked && + live.fat[rr].nholds==1) { + jit_abort("FPU register %d in nreg %d is locked!",r,live.fate[r].realreg); + } + + live.fat[rr].nholds--; + if (live.fat[rr].nholds!=live.fate[r].realind) { /* Was not last */ + int topreg=live.fat[rr].holds[live.fat[rr].nholds]; + int thisind=live.fate[r].realind; + live.fat[rr].holds[thisind]=topreg; + live.fate[topreg].realind=thisind; + } + live.fate[r].status=INMEM; + live.fate[r].realreg=-1; +} + +static inline void f_free_nreg(int r) +{ + int i=live.fat[r].nholds; + + while (i) { + int vr; + + --i; + vr=live.fat[r].holds[i]; + f_evict(vr); + } + Dif (live.fat[r].nholds!=0) { + jit_abort("Failed to free nreg %d, nholds is %d",r,live.fat[r].nholds); + } +} + + +/* Use with care! */ +static inline void f_isclean(int r) +{ + if (!f_isinreg(r)) + return; + live.fate[r].status=CLEAN; +} + +static inline void f_disassociate(int r) +{ + f_isclean(r); + f_evict(r); +} + + + +static int f_alloc_reg(int r, int willclobber) +{ + int bestreg; + uae_s32 when; + int i; + uae_s32 badness; + bestreg=-1; + when=2000000000; + for (i=N_FREGS;i--;) { + badness=live.fat[i].touched; + if (live.fat[i].nholds==0) + badness=0; + + if (!live.fat[i].locked && badness0) { + f_free_nreg(bestreg); + } + if (f_isinreg(r)) { + f_evict(r); + } + + if (!willclobber) { + if (live.fate[r].status!=UNDEF) { +#if defined(USE_LONG_DOUBLE) + raw_fmov_ext_rm(bestreg,(uintptr)live.fate[r].mem); +#else + raw_fmov_rm(bestreg,(uintptr)live.fate[r].mem); +#endif + } + live.fate[r].status=CLEAN; + } + else { + live.fate[r].status=DIRTY; + } + live.fate[r].realreg=bestreg; + live.fate[r].realind=live.fat[bestreg].nholds; + live.fat[bestreg].touched=touchcnt++; + live.fat[bestreg].holds[live.fat[bestreg].nholds]=r; + live.fat[bestreg].nholds++; + + return bestreg; +} + +static void f_unlock(int r) +{ + Dif (!live.fat[r].locked) + jit_abort ("unlock %d", r); + live.fat[r].locked--; +} + +static void f_setlock(int r) +{ + live.fat[r].locked++; +} + +static inline int f_readreg(int r) +{ + int n; + int answer=-1; + + if (f_isinreg(r)) { + n=live.fate[r].realreg; + answer=n; + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) + answer=f_alloc_reg(r,0); + + live.fat[answer].locked++; + live.fat[answer].touched=touchcnt++; + return answer; +} + +static inline void f_make_exclusive(int r, int clobber) +{ + freg_status oldstate; + int rr=live.fate[r].realreg; + int nr; + int nind; + int ndirt=0; + int i; + + if (!f_isinreg(r)) + return; + if (live.fat[rr].nholds==1) + return; + for (i=0;i : enable runtime disassemblers : %s", JITDebug ? "yes" : "no"); + +#ifdef USE_JIT_FPU + // Use JIT compiler for FPU instructions ? + avoid_fpu = !bx_options.jit.jitfpu; +#else + // JIT FPU is always disabled + avoid_fpu = true; +#endif + jit_log(" : compile FPU instructions : %s", !avoid_fpu ? "yes" : "no"); + + // Get size of the translation cache (in KB) + cache_size = bx_options.jit.jitcachesize; + jit_log(" : requested translation cache size : %d KB", cache_size); + + // Initialize target CPU (check for features, e.g. CMOV, rat stalls) + raw_init_cpu(); + setzflg_uses_bsf = target_check_bsf(); + jit_log(" : target processor has CMOV instructions : %s", have_cmov ? "yes" : "no"); + jit_log(" : target processor can suffer from partial register stalls : %s", have_rat_stall ? "yes" : "no"); + jit_log(" : alignment for loops, jumps are %d, %d", align_loops, align_jumps); +#if defined(CPU_i386) || defined(CPU_x86_64) + jit_log(" : target processor has SSE2 instructions : %s", cpuinfo.x86_has_xmm2 ? "yes" : "no"); + jit_log(" : cache linesize is %lu", (unsigned long)cpuinfo.x86_clflush_size); +#endif + + // Translation cache flush mechanism + lazy_flush = (bx_options.jit.jitlazyflush == 0) ? false : true; + jit_log(" : lazy translation cache invalidation : %s", str_on_off(lazy_flush)); + flush_icache = lazy_flush ? flush_icache_lazy : flush_icache_hard; + + // Compiler features + jit_log(" : register aliasing : %s", str_on_off(1)); + jit_log(" : FP register aliasing : %s", str_on_off(USE_F_ALIAS)); + jit_log(" : lazy constant offsetting : %s", str_on_off(USE_OFFSET)); +#if USE_INLINING + follow_const_jumps = bx_options.jit.jitinline; +#endif + jit_log(" : block inlining : %s", str_on_off(follow_const_jumps)); + jit_log(" : separate blockinfo allocation : %s", str_on_off(USE_SEPARATE_BIA)); + + // Build compiler tables + build_comp(); +#endif + + initialized = true; + +#ifdef PROFILE_UNTRANSLATED_INSNS + jit_log(" : gather statistics on untranslated insns count"); +#endif + +#ifdef PROFILE_COMPILE_TIME + jit_log(" : gather statistics on translation time"); + emul_start_time = clock(); +#endif +} + +#ifdef UAE +static +#endif +void compiler_exit(void) +{ +#ifdef PROFILE_COMPILE_TIME + emul_end_time = clock(); +#endif + +#ifdef UAE +#else +#if DEBUG +#if defined(USE_DATA_BUFFER) + jit_log("data_wasted = %d bytes", data_wasted); +#endif +#endif + + // Deallocate translation cache + if (compiled_code) { + vm_release(compiled_code, cache_size * 1024); + compiled_code = 0; + } + + // Deallocate popallspace + if (popallspace) { + vm_release(popallspace, POPALLSPACE_SIZE); + popallspace = 0; + } +#endif + +#ifdef PROFILE_COMPILE_TIME + jit_log("### Compile Block statistics"); + jit_log("Number of calls to compile_block : %d", compile_count); + uae_u32 emul_time = emul_end_time - emul_start_time; + jit_log("Total emulation time : %.1f sec", double(emul_time)/double(CLOCKS_PER_SEC)); + jit_log("Total compilation time : %.1f sec (%.1f%%)", double(compile_time)/double(CLOCKS_PER_SEC), 100.0*double(compile_time)/double(emul_time)); +#endif + +#ifdef PROFILE_UNTRANSLATED_INSNS + uae_u64 untranslated_count = 0; + for (int i = 0; i < 65536; i++) { + opcode_nums[i] = i; + untranslated_count += raw_cputbl_count[i]; + } + jit_log("Sorting out untranslated instructions count..."); + qsort(opcode_nums, 65536, sizeof(uae_u16), untranslated_compfn); + jit_log("Rank Opc Count Name"); + for (int i = 0; i < untranslated_top_ten; i++) { + uae_u32 count = raw_cputbl_count[opcode_nums[i]]; + struct instr *dp; + struct mnemolookup *lookup; + if (!count) + break; + dp = table68k + opcode_nums[i]; + for (lookup = lookuptab; lookup->mnemo != (instrmnem)dp->mnemo; lookup++) + ; + jit_log("%03d: %04x %10u %s", i, opcode_nums[i], count, lookup->name); + } +#endif + +#ifdef RECORD_REGISTER_USAGE + int reg_count_ids[16]; + uint64 tot_reg_count = 0; + for (int i = 0; i < 16; i++) { + reg_count_ids[i] = i; + tot_reg_count += reg_count[i]; + } + qsort(reg_count_ids, 16, sizeof(int), reg_count_compare); + uint64 cum_reg_count = 0; + for (int i = 0; i < 16; i++) { + int r = reg_count_ids[i]; + cum_reg_count += reg_count[r]; + jit_log("%c%d : %16ld %2.1f%% [%2.1f]", r < 8 ? 'D' : 'A', r % 8, + reg_count[r], + 100.0*double(reg_count[r])/double(tot_reg_count), + 100.0*double(cum_reg_count)/double(tot_reg_count)); + } +#endif +} + +#ifdef UAE +#else +bool compiler_use_jit(void) +{ + // Check for the "jit" prefs item + if (!bx_options.jit.jit) + return false; + + // Don't use JIT if translation cache size is less then MIN_CACHE_SIZE KB + if (bx_options.jit.jitcachesize < MIN_CACHE_SIZE) { + panicbug(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); + return false; + } + + return true; +} +#endif + +void init_comp(void) +{ + int i; + uae_s8* cb=can_byte; + uae_s8* cw=can_word; + uae_s8* au=always_used; + +#ifdef RECORD_REGISTER_USAGE + for (i=0;i<16;i++) + reg_count_local[i] = 0; +#endif + + for (i=0;i= uae_p32(kickmem_bank.baseaddr) && + addr < uae_p32(kickmem_bank.baseaddr + 8 * 65536)); +#else + return ((addr >= (uintptr)ROMBaseHost) && (addr < (uintptr)ROMBaseHost + ROMSize)); +#endif +} + +static void flush_all(void) +{ + int i; + + log_flush(); + for (i=0;i0) + free_nreg(i); + + for (i=0;i0) + f_free_nreg(i); + + live.flags_in_flags=TRASH; /* Note: We assume we already rescued the + flags at the very start of the call_r + functions! */ +} + +/******************************************************************** + * Memory access and related functions, CREATE time * + ********************************************************************/ + +void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond) +{ + next_pc_p=not_taken; + taken_pc_p=taken; + branch_cc=cond; +} + +/* Note: get_handler may fail in 64 Bit environments, if direct_handler_to_use is + * outside 32 bit + */ +static uintptr get_handler(uintptr addr) +{ + blockinfo* bi=get_blockinfo_addr_new((void*)(uintptr)addr,0); + return (uintptr)bi->direct_handler_to_use; +} + +/* This version assumes that it is writing *real* memory, and *will* fail + * if that assumption is wrong! No branches, no second chances, just + * straight go-for-it attitude */ + +static void writemem_real(int address, int source, int size, int tmp, int clobber) +{ + int f=tmp; + +#ifdef NATMEM_OFFSET + if (canbang) { /* Woohoo! go directly at the memory! */ + if (clobber) + f=source; + + switch(size) { + case 1: mov_b_bRr(address,source,MEMBaseDiff); break; + case 2: mov_w_rr(f,source); mid_bswap_16(f); mov_w_bRr(address,f,MEMBaseDiff); break; + case 4: mov_l_rr(f,source); mid_bswap_32(f); mov_l_bRr(address,f,MEMBaseDiff); break; + } + forget_about(tmp); + forget_about(f); + return; + } +#endif + +#ifdef UAE + mov_l_rr(f,address); + shrl_l_ri(f,16); /* The index into the baseaddr table */ + mov_l_rm_indexed(f,uae_p32(baseaddr),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + + if (address==source) { /* IBrowse does this! */ + if (size > 1) { + add_l(f,address); /* f now holds the final address */ + switch (size) { + case 2: mid_bswap_16(source); mov_w_Rr(f,source,0); + mid_bswap_16(source); return; + case 4: mid_bswap_32(source); mov_l_Rr(f,source,0); + mid_bswap_32(source); return; + } + } + } + switch (size) { /* f now holds the offset */ + case 1: mov_b_mrr_indexed(address,f,1,source); break; + case 2: mid_bswap_16(source); mov_w_mrr_indexed(address,f,1,source); + mid_bswap_16(source); break; /* base, index, source */ + case 4: mid_bswap_32(source); mov_l_mrr_indexed(address,f,1,source); + mid_bswap_32(source); break; + } +#endif +} + +#ifdef UAE +static inline void writemem(int address, int source, int offset, int size, int tmp) +{ + int f=tmp; + + mov_l_rr(f,address); + shrl_l_ri(f,16); /* The index into the mem bank table */ + mov_l_rm_indexed(f,uae_p32(mem_banks),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + /* Now f holds a pointer to the actual membank */ + mov_l_rR(f,f,offset); + /* Now f holds the address of the b/w/lput function */ + call_r_02(f,address,source,4,size); + forget_about(tmp); +} +#endif + +void writebyte(int address, int source, int tmp) +{ +#ifdef UAE + if ((special_mem & S_WRITE) || distrust_byte()) + writemem_special(address, source, 5 * SIZEOF_VOID_P, 1, tmp); + else +#endif + writemem_real(address,source,1,tmp,0); +} + +static inline void writeword_general(int address, int source, int tmp, + int clobber) +{ +#ifdef UAE + if ((special_mem & S_WRITE) || distrust_word()) + writemem_special(address, source, 4 * SIZEOF_VOID_P, 2, tmp); + else +#endif + writemem_real(address,source,2,tmp,clobber); +} + +void writeword_clobber(int address, int source, int tmp) +{ + writeword_general(address,source,tmp,1); +} + +void writeword(int address, int source, int tmp) +{ + writeword_general(address,source,tmp,0); +} + +static inline void writelong_general(int address, int source, int tmp, + int clobber) +{ +#ifdef UAE + if ((special_mem & S_WRITE) || distrust_long()) + writemem_special(address, source, 3 * SIZEOF_VOID_P, 4, tmp); + else +#endif + writemem_real(address,source,4,tmp,clobber); +} + +void writelong_clobber(int address, int source, int tmp) +{ + writelong_general(address,source,tmp,1); +} + +void writelong(int address, int source, int tmp) +{ + writelong_general(address,source,tmp,0); +} + + + +/* This version assumes that it is reading *real* memory, and *will* fail + * if that assumption is wrong! No branches, no second chances, just + * straight go-for-it attitude */ + +static void readmem_real(int address, int dest, int size, int tmp) +{ + int f=tmp; + + if (size==4 && address!=dest) + f=dest; + +#ifdef NATMEM_OFFSET + if (canbang) { /* Woohoo! go directly at the memory! */ + switch(size) { + case 1: mov_b_brR(dest,address,MEMBaseDiff); break; + case 2: mov_w_brR(dest,address,MEMBaseDiff); mid_bswap_16(dest); break; + case 4: mov_l_brR(dest,address,MEMBaseDiff); mid_bswap_32(dest); break; + } + forget_about(tmp); + (void) f; + return; + } +#endif + +#ifdef UAE + mov_l_rr(f,address); + shrl_l_ri(f,16); /* The index into the baseaddr table */ + mov_l_rm_indexed(f,uae_p32(baseaddr),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + /* f now holds the offset */ + + switch(size) { + case 1: mov_b_rrm_indexed(dest,address,f,1); break; + case 2: mov_w_rrm_indexed(dest,address,f,1); mid_bswap_16(dest); break; + case 4: mov_l_rrm_indexed(dest,address,f,1); mid_bswap_32(dest); break; + } + forget_about(tmp); +#endif +} + + + +#ifdef UAE +static inline void readmem(int address, int dest, int offset, int size, int tmp) +{ + int f=tmp; + + mov_l_rr(f,address); + shrl_l_ri(f,16); /* The index into the mem bank table */ + mov_l_rm_indexed(f,uae_p32(mem_banks),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + /* Now f holds a pointer to the actual membank */ + mov_l_rR(f,f,offset); + /* Now f holds the address of the b/w/lget function */ + call_r_11(dest,f,address,size,4); + forget_about(tmp); +} +#endif + +void readbyte(int address, int dest, int tmp) +{ +#ifdef UAE + if ((special_mem & S_READ) || distrust_byte()) + readmem_special(address, dest, 2 * SIZEOF_VOID_P, 1, tmp); + else +#endif + readmem_real(address,dest,1,tmp); +} + +void readword(int address, int dest, int tmp) +{ +#ifdef UAE + if ((special_mem & S_READ) || distrust_word()) + readmem_special(address, dest, 1 * SIZEOF_VOID_P, 2, tmp); + else +#endif + readmem_real(address,dest,2,tmp); +} + +void readlong(int address, int dest, int tmp) +{ +#ifdef UAE + if ((special_mem & S_READ) || distrust_long()) + readmem_special(address, dest, 0 * SIZEOF_VOID_P, 4, tmp); + else +#endif + readmem_real(address,dest,4,tmp); +} + +void get_n_addr(int address, int dest, int tmp) +{ +#ifdef UAE + if (special_mem || distrust_addr()) { + /* This one might appear a bit odd... */ + readmem(address, dest, 6 * SIZEOF_VOID_P, 4, tmp); + return; + } +#endif + + // a is the register containing the virtual address + // after the offset had been fetched + int a=tmp; + + // f is the register that will contain the offset + int f=tmp; + + // a == f == tmp if (address == dest) + if (address!=dest) { + a=address; + f=dest; + } + +#ifdef NATMEM_OFFSET + if (canbang) { +#if FIXED_ADDRESSING + lea_l_brr(dest,address,MEMBaseDiff); +#else +# error "Only fixed adressing mode supported" +#endif + forget_about(tmp); + (void) f; + (void) a; + return; + } +#endif + +#ifdef UAE + mov_l_rr(f,address); + mov_l_rr(dest,address); // gb-- nop if dest==address + shrl_l_ri(f,16); + mov_l_rm_indexed(f,uae_p32(baseaddr),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + add_l(dest,f); + forget_about(tmp); +#endif +} + +void get_n_addr_jmp(int address, int dest, int tmp) +{ +#ifdef WINUAE_ARANYM + /* For this, we need to get the same address as the rest of UAE + would --- otherwise we end up translating everything twice */ + get_n_addr(address,dest,tmp); +#else + int f=tmp; + if (address!=dest) + f=dest; + mov_l_rr(f,address); + shrl_l_ri(f,16); /* The index into the baseaddr bank table */ + mov_l_rm_indexed(dest,uae_p32(baseaddr),f,SIZEOF_VOID_P); /* FIXME: is SIZEOF_VOID_P correct? */ + add_l(dest,address); + and_l_ri (dest, ~1); + forget_about(tmp); +#endif +} + + +/* base is a register, but dp is an actual value. + target is a register, as is tmp */ +void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp) +{ + int reg = (dp >> 12) & 15; + int regd_shift=(dp >> 9) & 3; + + if (dp & 0x100) { + int ignorebase=(dp&0x80); + int ignorereg=(dp&0x40); + int addbase=0; + int outer=0; + + if ((dp & 0x30) == 0x20) addbase = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + if ((dp & 0x30) == 0x30) addbase = comp_get_ilong((m68k_pc_offset+=4)-4); + + if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + if ((dp & 0x3) == 0x3) outer = comp_get_ilong((m68k_pc_offset+=4)-4); + + if ((dp & 0x4) == 0) { /* add regd *before* the get_long */ + if (!ignorereg) { + if ((dp & 0x800) == 0) + sign_extend_16_rr(target,reg); + else + mov_l_rr(target,reg); + shll_l_ri(target,regd_shift); + } + else + mov_l_ri(target,0); + + /* target is now regd */ + if (!ignorebase) + add_l(target,base); + add_l_ri(target,addbase); + if (dp&0x03) readlong(target,target,tmp); + } else { /* do the getlong first, then add regd */ + if (!ignorebase) { + mov_l_rr(target,base); + add_l_ri(target,addbase); + } + else + mov_l_ri(target,addbase); + if (dp&0x03) readlong(target,target,tmp); + + if (!ignorereg) { + if ((dp & 0x800) == 0) + sign_extend_16_rr(tmp,reg); + else + mov_l_rr(tmp,reg); + shll_l_ri(tmp,regd_shift); + /* tmp is now regd */ + add_l(target,tmp); + } + } + add_l_ri(target,outer); + } + else { /* 68000 version */ + if ((dp & 0x800) == 0) { /* Sign extend */ + sign_extend_16_rr(target,reg); + lea_l_brr_indexed(target,base,target,1<= CODE_ALLOC_MAX_ATTEMPTS) + return NULL; + + return do_alloc_code(size, depth + 1); +#else + UNUSED(depth); + uint8 *code = (uint8 *)vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); + return code == VM_MAP_FAILED ? NULL : code; +#endif +} + +static inline uint8 *alloc_code(uint32 size) +{ + uint8 *ptr = do_alloc_code(size, 0); + /* allocated code must fit in 32-bit boundaries */ + assert((uintptr)ptr <= 0xffffffff); + return ptr; +} + +void alloc_cache(void) +{ + if (compiled_code) { + flush_icache_hard(6); + vm_release(compiled_code, cache_size * 1024); + compiled_code = 0; + } + +#ifdef UAE + cache_size = currprefs.cachesize; +#endif + if (cache_size == 0) + return; + + while (!compiled_code && cache_size) { + if ((compiled_code = alloc_code(cache_size * 1024)) == NULL) { + compiled_code = 0; + cache_size /= 2; + } + } + vm_protect(compiled_code, cache_size * 1024, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); + + if (compiled_code) { + jit_log(" : actual translation cache size : %d KB at %p-%p", cache_size, compiled_code, compiled_code + cache_size*1024); +#ifdef USE_DATA_BUFFER + max_compile_start = compiled_code + cache_size*1024 - BYTES_PER_INST - DATA_BUFFER_SIZE; +#else + max_compile_start = compiled_code + cache_size*1024 - BYTES_PER_INST; +#endif + current_compile_p = compiled_code; + current_cache_size = 0; +#if defined(USE_DATA_BUFFER) + reset_data_buffer(); +#endif + } +} + +static void calc_checksum(blockinfo* bi, uae_u32* c1, uae_u32* c2) +{ + uae_u32 k1 = 0; + uae_u32 k2 = 0; + +#if USE_CHECKSUM_INFO + checksum_info *csi = bi->csi; + Dif(!csi) abort(); + while (csi) { + uae_s32 len = csi->length; + uintptr tmp = (uintptr)csi->start_p; +#else + uae_s32 len = bi->len; + uintptr tmp = (uintptr)bi->min_pcp; +#endif + uae_u32* pos; + + len += (tmp & 3); + tmp &= ~((uintptr)3); + pos = (uae_u32 *)tmp; + + if (len >= 0 && len <= MAX_CHECKSUM_LEN) { + while (len > 0) { + k1 += *pos; + k2 ^= *pos; + pos++; + len -= 4; + } + } + +#if USE_CHECKSUM_INFO + csi = csi->next; + } +#endif + + *c1 = k1; + *c2 = k2; +} + +#if 0 +static void show_checksum(CSI_TYPE* csi) +{ + uae_u32 k1=0; + uae_u32 k2=0; + uae_s32 len=CSI_LENGTH(csi); + uae_u32 tmp=(uintptr)CSI_START_P(csi); + uae_u32* pos; + + len+=(tmp&3); + tmp&=(~3); + pos=(uae_u32*)tmp; + + if (len<0 || len>MAX_CHECKSUM_LEN) { + return; + } + else { + while (len>0) { + jit_log("%08x ",*pos); + pos++; + len-=4; + } + jit_log(" bla"); + } +} +#endif + + +int check_for_cache_miss(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + + if (bi) { + int cl=cacheline(regs.pc_p); + if (bi!=cache_tags[cl+1].bi) { + raise_in_cl_list(bi); + return 1; + } + } + return 0; +} + + +static void recompile_block(void) +{ + /* An existing block's countdown code has expired. We need to make + sure that execute_normal doesn't refuse to recompile due to a + perceived cache miss... */ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + + Dif (!bi) + jit_abort("recompile_block"); + raise_in_cl_list(bi); + execute_normal(); + return; +} +static void cache_miss(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); +#if COMP_DEBUG + uae_u32 cl=cacheline(regs.pc_p); + blockinfo* bi2=get_blockinfo(cl); +#endif + + if (!bi) { + execute_normal(); /* Compile this block now */ + return; + } + Dif (!bi2 || bi==bi2) { + jit_abort("Unexplained cache miss %p %p",bi,bi2); + } + raise_in_cl_list(bi); + return; +} + +static int called_check_checksum(blockinfo* bi); + +static inline int block_check_checksum(blockinfo* bi) +{ + uae_u32 c1,c2; + bool isgood; + + if (bi->status!=BI_NEED_CHECK) + return 1; /* This block is in a checked state */ + + checksum_count++; + + if (bi->c1 || bi->c2) + calc_checksum(bi,&c1,&c2); + else { + c1=c2=1; /* Make sure it doesn't match */ + } + + isgood=(c1==bi->c1 && c2==bi->c2); + + if (isgood) { + /* This block is still OK. So we reactivate. Of course, that + means we have to move it into the needs-to-be-flushed list */ + bi->handler_to_use=bi->handler; + set_dhtu(bi,bi->direct_handler); + bi->status=BI_CHECKING; + isgood=called_check_checksum(bi) != 0; + } + if (isgood) { + jit_log2("reactivate %p/%p (%x %x/%x %x)",bi,bi->pc_p, c1,c2,bi->c1,bi->c2); + remove_from_list(bi); + add_to_active(bi); + raise_in_cl_list(bi); + bi->status=BI_ACTIVE; + } + else { + /* This block actually changed. We need to invalidate it, + and set it up to be recompiled */ + jit_log2("discard %p/%p (%x %x/%x %x)",bi,bi->pc_p, c1,c2,bi->c1,bi->c2); + invalidate_block(bi); + raise_in_cl_list(bi); + } + return isgood; +} + +static int called_check_checksum(blockinfo* bi) +{ + int isgood=1; + int i; + + for (i=0;i<2 && isgood;i++) { + if (bi->dep[i].jmp_off) { + isgood=block_check_checksum(bi->dep[i].target); + } + } + return isgood; +} + +static void check_checksum(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + uae_u32 cl=cacheline(regs.pc_p); + blockinfo* bi2=get_blockinfo(cl); + + /* These are not the droids you are looking for... */ + if (!bi) { + /* Whoever is the primary target is in a dormant state, but + calling it was accidental, and we should just compile this + new block */ + execute_normal(); + return; + } + if (bi!=bi2) { + /* The block was hit accidentally, but it does exist. Cache miss */ + cache_miss(); + return; + } + + if (!block_check_checksum(bi)) + execute_normal(); +} + +static inline void match_states(blockinfo* bi) +{ + int i; + smallstate* s=&(bi->env); + + if (bi->status==BI_NEED_CHECK) { + block_check_checksum(bi); + } + if (bi->status==BI_ACTIVE || + bi->status==BI_FINALIZING) { /* Deal with the *promises* the + block makes (about not using + certain vregs) */ + for (i=0;i<16;i++) { + if (s->virt[i]==L_UNNEEDED) { + jit_log2("unneeded reg %d at %p",i,target); + COMPCALL(forget_about)(i); // FIXME + } + } + } + flush(1); + + /* And now deal with the *demands* the block makes */ + for (i=0;inat[i]; + if (v>=0) { + // printf("Loading reg %d into %d at %p\n",v,i,target); + readreg_specific(v,4,i); + // do_load_reg(i,v); + // setlock(i); + } + } + for (i=0;inat[i]; + if (v>=0) { + unlock2(i); + } + } +} + +static inline void create_popalls(void) +{ + int i,r; + + if (popallspace == NULL) { + if ((popallspace = alloc_code(POPALLSPACE_SIZE)) == NULL) { + jit_log("WARNING: Could not allocate popallspace!"); +#ifdef UAE + if (currprefs.cachesize > 0) +#endif + { + jit_abort("Could not allocate popallspace!"); + } +#ifdef UAE + /* This is not fatal if JIT is not used. If JIT is + * turned on, it will crash, but it would have crashed + * anyway. */ + return; +#endif + } + } + vm_protect(popallspace, POPALLSPACE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE); + + int stack_space = STACK_OFFSET; + for (i=0;idirect_pen=(cpuop_func*)get_target(); + compemu_raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); + compemu_raw_mov_l_mr((uintptr)®s.pc_p,0); + compemu_raw_jmp((uintptr)popall_execute_normal); + + align_target(align_jumps); + bi->direct_pcc=(cpuop_func*)get_target(); + compemu_raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); + compemu_raw_mov_l_mr((uintptr)®s.pc_p,0); + compemu_raw_jmp((uintptr)popall_check_checksum); + flush_cpu_icache((void *)current_compile_p, (void *)target); + current_compile_p=get_target(); + + bi->deplist=NULL; + for (i=0;i<2;i++) { + bi->dep[i].prev_p=NULL; + bi->dep[i].next=NULL; + } + bi->env=default_ss; + bi->status=BI_INVALID; + bi->havestate=0; + //bi->env=empty_ss; +} + +#ifdef UAE +void compemu_reset(void) +{ + set_cache_state(0); +} +#endif + +#ifdef UAE +#else +// OPCODE is in big endian format, use cft_map() beforehand, if needed. +#endif +static inline void reset_compop(int opcode) +{ + compfunctbl[opcode] = NULL; + nfcompfunctbl[opcode] = NULL; +} + +static int read_opcode(const char *p) +{ + int opcode = 0; + for (int i = 0; i < 4; i++) { + int op = p[i]; + switch (op) { + case '0': case '1': case '2': case '3': case '4': + case '5': case '6': case '7': case '8': case '9': + opcode = (opcode << 4) | (op - '0'); + break; + case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': + opcode = (opcode << 4) | ((op - 'a') + 10); + break; + case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': + opcode = (opcode << 4) | ((op - 'A') + 10); + break; + default: + return -1; + } + } + return opcode; +} + +static bool merge_blacklist() +{ +#ifdef UAE + const char *blacklist = ""; +#else + const char *blacklist = bx_options.jit.jitblacklist; +#endif + if (blacklist[0] != '\0') { + const char *p = blacklist; + for (;;) { + if (*p == 0) + return true; + + int opcode1 = read_opcode(p); + if (opcode1 < 0) + return false; + p += 4; + + int opcode2 = opcode1; + if (*p == '-') { + p++; + opcode2 = read_opcode(p); + if (opcode2 < 0) + return false; + p += 4; + } + + if (*p == 0 || *p == ',') { + jit_log(" : blacklist opcodes : %04x-%04x", opcode1, opcode2); + for (int opcode = opcode1; opcode <= opcode2; opcode++) + reset_compop(cft_map(opcode)); + + if (*(p++) == ',') + continue; + + return true; + } + + return false; + } + } + return true; +} + +void build_comp(void) +{ + int i; + unsigned long opcode; + const struct comptbl* tbl=op_smalltbl_0_comp_ff; + const struct comptbl* nftbl=op_smalltbl_0_comp_nf; + int count; +#ifdef WINUAE_ARANYM + unsigned int cpu_level = 4; // 68040 + const struct cputbl *nfctbl = op_smalltbl_0_nf; +#else +#ifdef NOFLAGS_SUPPORT + struct comptbl *nfctbl = (currprefs.cpu_level >= 5 ? op_smalltbl_0_nf + : currprefs.cpu_level == 4 ? op_smalltbl_1_nf + : (currprefs.cpu_level == 2 || currprefs.cpu_level == 3) ? op_smalltbl_2_nf + : currprefs.cpu_level == 1 ? op_smalltbl_3_nf + : ! currprefs.cpu_compatible ? op_smalltbl_4_nf + : op_smalltbl_5_nf); +#endif +#endif + +#ifdef NATMEM_OFFSET +#ifdef UAE +#ifdef JIT_EXCEPTION_HANDLER + install_exception_handler(); +#endif +#endif +#endif + + jit_log(" : building compiler function tables"); + + for (opcode = 0; opcode < 65536; opcode++) { + reset_compop(opcode); +#ifdef NOFLAGS_SUPPORT + nfcpufunctbl[opcode] = op_illg; +#endif + prop[opcode].use_flags = FLAG_ALL; + prop[opcode].set_flags = FLAG_ALL; +#ifdef UAE + prop[opcode].is_jump=1; +#else + prop[opcode].cflow = fl_trap; // ILLEGAL instructions do trap +#endif + } + + for (i = 0; tbl[i].opcode < 65536; i++) { +#ifdef UAE + int isjmp = (tbl[i].specific & COMP_OPCODE_ISJUMP); + int isaddx = (tbl[i].specific & COMP_OPCODE_ISADDX); + int iscjmp = (tbl[i].specific & COMP_OPCODE_ISCJUMP); + + prop[cft_map(tbl[i].opcode)].is_jump = isjmp; + prop[cft_map(tbl[i].opcode)].is_const_jump = iscjmp; + prop[cft_map(tbl[i].opcode)].is_addx = isaddx; +#else + int cflow = table68k[tbl[i].opcode].cflow; + if (follow_const_jumps && (tbl[i].specific & COMP_OPCODE_ISCJUMP)) + cflow = fl_const_jump; + else + cflow &= ~fl_const_jump; + prop[cft_map(tbl[i].opcode)].cflow = cflow; +#endif + + bool uses_fpu = (tbl[i].specific & COMP_OPCODE_USES_FPU) != 0; + if (uses_fpu && avoid_fpu) + compfunctbl[cft_map(tbl[i].opcode)] = NULL; + else + compfunctbl[cft_map(tbl[i].opcode)] = tbl[i].handler; + } + + for (i = 0; nftbl[i].opcode < 65536; i++) { + bool uses_fpu = (tbl[i].specific & COMP_OPCODE_USES_FPU) != 0; + if (uses_fpu && avoid_fpu) + nfcompfunctbl[cft_map(nftbl[i].opcode)] = NULL; + else + nfcompfunctbl[cft_map(nftbl[i].opcode)] = nftbl[i].handler; +#ifdef NOFLAGS_SUPPORT + nfcpufunctbl[cft_map(nftbl[i].opcode)] = nfctbl[i].handler; +#endif + } + +#ifdef NOFLAGS_SUPPORT + for (i = 0; nfctbl[i].handler; i++) { + nfcpufunctbl[cft_map(nfctbl[i].opcode)] = nfctbl[i].handler; + } +#endif + + for (opcode = 0; opcode < 65536; opcode++) { + compop_func *f; + compop_func *nff; +#ifdef NOFLAGS_SUPPORT + cpuop_func *nfcf; +#endif + int isaddx; +#ifdef UAE + int isjmp,iscjmp; +#else + int cflow; +#endif + +#ifdef UAE + int cpu_level = (currprefs.cpu_model - 68000) / 10; + if (cpu_level > 4) + cpu_level--; +#endif + if ((instrmnem)table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) + continue; + + if (table68k[opcode].handler != -1) { + f = compfunctbl[cft_map(table68k[opcode].handler)]; + nff = nfcompfunctbl[cft_map(table68k[opcode].handler)]; +#ifdef NOFLAGS_SUPPORT + nfcf = nfcpufunctbl[cft_map(table68k[opcode].handler)]; +#endif + isaddx = prop[cft_map(table68k[opcode].handler)].is_addx; + prop[cft_map(opcode)].is_addx = isaddx; +#ifdef UAE + isjmp = prop[cft_map(table68k[opcode].handler)].is_jump; + iscjmp = prop[cft_map(table68k[opcode].handler)].is_const_jump; + prop[cft_map(opcode)].is_jump = isjmp; + prop[cft_map(opcode)].is_const_jump = iscjmp; +#else + cflow = prop[cft_map(table68k[opcode].handler)].cflow; + prop[cft_map(opcode)].cflow = cflow; +#endif + compfunctbl[cft_map(opcode)] = f; + nfcompfunctbl[cft_map(opcode)] = nff; +#ifdef NOFLAGS_SUPPORT + Dif (nfcf == op_illg) + abort(); + nfcpufunctbl[cft_map(opcode)] = nfcf; +#endif + } + prop[cft_map(opcode)].set_flags = table68k[opcode].flagdead; + prop[cft_map(opcode)].use_flags = table68k[opcode].flaglive; + /* Unconditional jumps don't evaluate condition codes, so they + * don't actually use any flags themselves */ +#ifdef UAE + if (prop[cft_map(opcode)].is_const_jump) +#else + if (prop[cft_map(opcode)].cflow & fl_const_jump) +#endif + prop[cft_map(opcode)].use_flags = 0; + } +#ifdef NOFLAGS_SUPPORT + for (i = 0; nfctbl[i].handler != NULL; i++) { + if (nfctbl[i].specific) + nfcpufunctbl[cft_map(tbl[i].opcode)] = nfctbl[i].handler; + } +#endif + + /* Merge in blacklist */ + if (!merge_blacklist()) + { + jit_log(" : blacklist merge failure!"); + } + + count=0; + for (opcode = 0; opcode < 65536; opcode++) { + if (compfunctbl[cft_map(opcode)]) + count++; + } + jit_log(" : supposedly %d compileable opcodes!",count); + + /* Initialise state */ + create_popalls(); + alloc_cache(); + reset_lists(); + + for (i=0;ipc_p)].handler=(cpuop_func*)popall_execute_normal; + cache_tags[cacheline(bi->pc_p)+1].bi=NULL; + dbi=bi; bi=bi->next; + free_blockinfo(dbi); + } + bi=dormant; + while(bi) { + cache_tags[cacheline(bi->pc_p)].handler=(cpuop_func*)popall_execute_normal; + cache_tags[cacheline(bi->pc_p)+1].bi=NULL; + dbi=bi; bi=bi->next; + free_blockinfo(dbi); + } + + reset_lists(); + if (!compiled_code) + return; + +#if defined(USE_DATA_BUFFER) + reset_data_buffer(); +#endif + + current_compile_p=compiled_code; +#ifdef UAE + set_special(0); /* To get out of compiled code */ +#else + SPCFLAGS_SET( SPCFLAG_JIT_EXEC_RETURN ); /* To get out of compiled code */ +#endif +} + + +/* "Soft flushing" --- instead of actually throwing everything away, + we simply mark everything as "needs to be checked". +*/ + +#ifdef WINUAE_ARANYM +static inline void flush_icache_lazy(int) +#else +void flush_icache(int n) +#endif +{ + blockinfo* bi; + blockinfo* bi2; + +#ifdef UAE + if (currprefs.comp_hardflush) { + flush_icache_hard(n); + return; + } +#endif + soft_flush_count++; + if (!active) + return; + + bi=active; + while (bi) { + uae_u32 cl=cacheline(bi->pc_p); + if (bi->status==BI_INVALID || + bi->status==BI_NEED_RECOMP) { + if (bi==cache_tags[cl+1].bi) + cache_tags[cl].handler=(cpuop_func*)popall_execute_normal; + bi->handler_to_use=(cpuop_func*)popall_execute_normal; + set_dhtu(bi,bi->direct_pen); + bi->status=BI_INVALID; + } + else { + if (bi==cache_tags[cl+1].bi) + cache_tags[cl].handler=(cpuop_func*)popall_check_checksum; + bi->handler_to_use=(cpuop_func*)popall_check_checksum; + set_dhtu(bi,bi->direct_pcc); + bi->status=BI_NEED_CHECK; + } + bi2=bi; + bi=bi->next; + } + /* bi2 is now the last entry in the active list */ + bi2->next=dormant; + if (dormant) + dormant->prev_p=&(bi2->next); + + dormant=active; + active->prev_p=&dormant; + active=NULL; +} + +#ifdef UAE +static +#endif +void flush_icache_range(uae_u32 start, uae_u32 length) +{ + if (!active) + return; + +#if LAZY_FLUSH_ICACHE_RANGE + uae_u8 *start_p = get_real_address(start); + blockinfo *bi = active; + while (bi) { +#if USE_CHECKSUM_INFO + bool invalidate = false; + for (checksum_info *csi = bi->csi; csi && !invalidate; csi = csi->next) + invalidate = (((start_p - csi->start_p) < csi->length) || + ((csi->start_p - start_p) < length)); +#else + // Assume system is consistent and would invalidate the right range + const bool invalidate = (bi->pc_p - start_p) < length; +#endif + if (invalidate) { + uae_u32 cl = cacheline(bi->pc_p); + if (bi == cache_tags[cl + 1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; + bi->handler_to_use = (cpuop_func *)popall_execute_normal; + set_dhtu(bi, bi->direct_pen); + bi->status = BI_NEED_RECOMP; + } + bi = bi->next; + } + return; +#else + UNUSED(start); + UNUSED(length); +#endif + flush_icache(-1); +} + +/* +static void catastrophe(void) +{ + jit_abort("catastprophe"); +} +*/ + +int failure; + +#ifdef UAE +static inline unsigned int get_opcode_cft_map(unsigned int f) +{ + return ((f >> 8) & 255) | ((f & 255) << 8); +} +#define DO_GET_OPCODE(a) (get_opcode_cft_map((uae_u16)*(a))) +#else +#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU) +# define DO_GET_OPCODE(a) (do_get_mem_word_unswapped((uae_u16 *)(a))) +#else +# define DO_GET_OPCODE(a) (do_get_mem_word((uae_u16 *)(a))) +#endif +#endif + +#ifdef JIT_DEBUG +static uae_u8 *last_regs_pc_p = 0; +static uae_u8 *last_compiled_block_addr = 0; + +void compiler_dumpstate(void) +{ + if (!JITDebug) + return; + + bug("### Host addresses"); + bug("MEM_BASE : %lx", (unsigned long)MEMBaseDiff); + bug("PC_P : %p", ®s.pc_p); + bug("SPCFLAGS : %p", ®s.spcflags); + bug("D0-D7 : %p-%p", ®s.regs[0], ®s.regs[7]); + bug("A0-A7 : %p-%p", ®s.regs[8], ®s.regs[15]); + bug(" "); + + bug("### M68k processor state"); + m68k_dumpstate(stderr, 0); + bug(" "); + + bug("### Block in Atari address space"); + bug("M68K block : %p", + (void *)(uintptr)last_regs_pc_p); + if (last_regs_pc_p != 0) { + bug("Native block : %p (%d bytes)", + (void *)last_compiled_block_addr, + get_blockinfo_addr(last_regs_pc_p)->direct_handler_size); + } + bug(" "); +} +#endif + +#ifdef UAE +void compile_block(cpu_history *pc_hist, int blocklen, int totcycles) +{ + if (letit && compiled_code && currprefs.cpu_model >= 68020) { +#else +static void compile_block(cpu_history* pc_hist, int blocklen) +{ + if (letit && compiled_code) { +#endif +#ifdef PROFILE_COMPILE_TIME + compile_count++; + clock_t start_time = clock(); +#endif +#ifdef JIT_DEBUG + bool disasm_block = true; +#endif + + /* OK, here we need to 'compile' a block */ + int i; + int r; + int was_comp=0; + uae_u8 liveflags[MAXRUN+1]; +#if USE_CHECKSUM_INFO + bool trace_in_rom = isinrom((uintptr)pc_hist[0].location) != 0; + uintptr max_pcp=(uintptr)pc_hist[blocklen - 1].location; + uintptr min_pcp=max_pcp; +#else + uintptr max_pcp=(uintptr)pc_hist[0].location; + uintptr min_pcp=max_pcp; +#endif + uae_u32 cl=cacheline(pc_hist[0].location); + void* specflags=(void*)®s.spcflags; + blockinfo* bi=NULL; + blockinfo* bi2; + int extra_len=0; + + redo_current_block=0; + if (current_compile_p >= MAX_COMPILE_PTR) + flush_icache_hard(7); + + alloc_blockinfos(); + + bi=get_blockinfo_addr_new(pc_hist[0].location,0); + bi2=get_blockinfo(cl); + + optlev=bi->optlevel; + if (bi->status!=BI_INVALID) { + Dif (bi!=bi2) { + /* I don't think it can happen anymore. Shouldn't, in + any case. So let's make sure... */ + jit_abort("WOOOWOO count=%d, ol=%d %p %p", bi->count,bi->optlevel,bi->handler_to_use, cache_tags[cl].handler); + } + + Dif (bi->count!=-1 && bi->status!=BI_NEED_RECOMP) { + jit_abort("bi->count=%d, bi->status=%d,bi->optlevel=%d",bi->count,bi->status,bi->optlevel); + /* What the heck? We are not supposed to be here! */ + } + } + if (bi->count==-1) { + optlev++; + while (!optcount[optlev]) + optlev++; + bi->count=optcount[optlev]-1; + } + current_block_pc_p=(uintptr)pc_hist[0].location; + + remove_deps(bi); /* We are about to create new code */ + bi->optlevel=optlev; + bi->pc_p=(uae_u8*)pc_hist[0].location; +#if USE_CHECKSUM_INFO + free_checksum_info_chain(bi->csi); + bi->csi = NULL; +#endif + + liveflags[blocklen]=FLAG_ALL; /* All flags needed afterwards */ + i=blocklen; + while (i--) { + uae_u16* currpcp=pc_hist[i].location; + uae_u32 op=DO_GET_OPCODE(currpcp); + +#if USE_CHECKSUM_INFO + trace_in_rom = trace_in_rom && isinrom((uintptr)currpcp); + if (follow_const_jumps && is_const_jump(op)) { + checksum_info *csi = alloc_checksum_info(); + csi->start_p = (uae_u8 *)min_pcp; + csi->length = max_pcp - min_pcp + LONGEST_68K_INST; + csi->next = bi->csi; + bi->csi = csi; + max_pcp = (uintptr)currpcp; + } + min_pcp = (uintptr)currpcp; +#else + if ((uintptr)currpcpmax_pcp) + max_pcp=(uintptr)currpcp; +#endif + +#ifdef UAE + if (!currprefs.compnf) { + liveflags[i]=FLAG_ALL; + } + else +#endif + { + liveflags[i] = ((liveflags[i+1] & (~prop[op].set_flags))|prop[op].use_flags); + if (prop[op].is_addx && (liveflags[i+1]&FLAG_Z)==0) + liveflags[i]&= ~FLAG_Z; + } + } + +#if USE_CHECKSUM_INFO + checksum_info *csi = alloc_checksum_info(); + csi->start_p = (uae_u8 *)min_pcp; + csi->length = max_pcp - min_pcp + LONGEST_68K_INST; + csi->next = bi->csi; + bi->csi = csi; +#endif + + bi->needed_flags=liveflags[0]; + + align_target(align_loops); + was_comp=0; + + bi->direct_handler=(cpuop_func*)get_target(); + set_dhtu(bi,bi->direct_handler); + bi->status=BI_COMPILING; + current_block_start_target=(uintptr)get_target(); + + log_startblock(); + + if (bi->count>=0) { /* Need to generate countdown code */ + compemu_raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + compemu_raw_sub_l_mi((uintptr)&(bi->count),1); + compemu_raw_jl((uintptr)popall_recompile_block); + } + if (optlev==0) { /* No need to actually translate */ + /* Execute normally without keeping stats */ + compemu_raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + compemu_raw_jmp((uintptr)popall_exec_nostats); + } + else { + reg_alloc_run=0; + next_pc_p=0; + taken_pc_p=0; + branch_cc=0; // Only to be initialized. Will be set together with next_pc_p + + comp_pc_p=(uae_u8*)pc_hist[0].location; + init_comp(); + was_comp=1; + +#ifdef USE_CPU_EMUL_SERVICES + compemu_raw_sub_l_mi((uintptr)&emulated_ticks,blocklen); + compemu_raw_jcc_b_oponly(NATIVE_CC_GT); + uae_s8 *branchadd=(uae_s8*)get_target(); + skip_byte(); + raw_dec_sp(STACK_SHADOW_SPACE); + compemu_raw_call((uintptr)cpu_do_check_ticks); + raw_inc_sp(STACK_SHADOW_SPACE); + *branchadd=(uintptr)get_target()-((uintptr)branchadd+1); +#endif + +#ifdef JIT_DEBUG + if (JITDebug) { + compemu_raw_mov_l_mi((uintptr)&last_regs_pc_p,(uintptr)pc_hist[0].location); + compemu_raw_mov_l_mi((uintptr)&last_compiled_block_addr,current_block_start_target); + } +#endif + + for (i=0;i1) { + failure=0; + if (!was_comp) { + comp_pc_p=(uae_u8*)pc_hist[i].location; + init_comp(); + } + was_comp=1; + + bool isnop = do_get_mem_word(pc_hist[i].location) == 0x4e71 || + ((i + 1) < blocklen && do_get_mem_word(pc_hist[i+1].location) == 0x4e71); + + if (isnop) + compemu_raw_mov_l_mi((uintptr)®s.fault_pc, ((uintptr)(pc_hist[i].location)) - MEMBaseDiff); + + comptbl[opcode](opcode); + freescratch(); + if (!(liveflags[i+1] & FLAG_CZNV)) { + /* We can forget about flags */ + dont_care_flags(); + } +#if INDIVIDUAL_INST + flush(1); + nop(); + flush(1); + was_comp=0; +#endif + /* + * workaround for buserror handling: on a "nop", write registers back + */ + if (isnop) + { + flush(1); + nop(); + was_comp=0; + } + } + + if (failure) { + if (was_comp) { + flush(1); + was_comp=0; + } + compemu_raw_mov_l_ri(REG_PAR1,(uae_u32)opcode); +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(REG_PAR1); +#endif + compemu_raw_mov_l_mi((uintptr)®s.pc_p, + (uintptr)pc_hist[i].location); + raw_dec_sp(STACK_SHADOW_SPACE); + compemu_raw_call((uintptr)cputbl[opcode]); + raw_inc_sp(STACK_SHADOW_SPACE); +#ifdef PROFILE_UNTRANSLATED_INSNS + // raw_cputbl_count[] is indexed with plain opcode (in m68k order) + compemu_raw_add_l_mi((uintptr)&raw_cputbl_count[cft_map(opcode)],1); +#endif +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(4); +#endif + + if (i < blocklen - 1) { + uae_s8* branchadd; + + /* if (SPCFLAGS_TEST(SPCFLAG_STOP)) popall_do_nothing() */ + compemu_raw_mov_l_rm(0,(uintptr)specflags); + compemu_raw_test_l_rr(0,0); +#if defined(USE_DATA_BUFFER) + data_check_end(8, 64); // just a pessimistic guess... +#endif + compemu_raw_jz_b_oponly(); + branchadd=(uae_s8*)get_target(); + skip_byte(); +#ifdef UAE + raw_sub_l_mi(uae_p32(&countdown),scaled_cycles(totcycles)); +#endif + compemu_raw_jmp((uintptr)popall_do_nothing); + *branchadd=(uintptr)get_target()-(uintptr)branchadd-1; + } + } + } +#if 1 /* This isn't completely kosher yet; It really needs to be + be integrated into a general inter-block-dependency scheme */ + if (next_pc_p && taken_pc_p && + was_comp && taken_pc_p==current_block_pc_p) + { + blockinfo* bi1=get_blockinfo_addr_new((void*)next_pc_p,0); + blockinfo* bi2=get_blockinfo_addr_new((void*)taken_pc_p,0); + uae_u8 x=bi1->needed_flags; + + if (x==0xff || 1) { /* To be on the safe side */ + uae_u16* next=(uae_u16*)next_pc_p; + uae_u32 op=DO_GET_OPCODE(next); + + x=FLAG_ALL; + x&=(~prop[op].set_flags); + x|=prop[op].use_flags; + } + + x|=bi2->needed_flags; + if (!(x & FLAG_CZNV)) { + /* We can forget about flags */ + dont_care_flags(); + extra_len+=2; /* The next instruction now is part of this block */ + } + } +#endif + log_flush(); + + if (next_pc_p) { /* A branch was registered */ + uintptr t1=next_pc_p; + uintptr t2=taken_pc_p; + int cc=branch_cc; + + uae_u32* branchadd; + uae_u32* tba; + bigstate tmp; + blockinfo* tbi; + + if (taken_pc_penv))) { + mark_callers_recompile(bi); + } + + big_to_small_state(&live,&(bi->env)); +#endif + +#if USE_CHECKSUM_INFO + remove_from_list(bi); + if (trace_in_rom) { + // No need to checksum that block trace on cache invalidation + free_checksum_info_chain(bi->csi); + bi->csi = NULL; + add_to_dormant(bi); + } + else { + calc_checksum(bi,&(bi->c1),&(bi->c2)); + add_to_active(bi); + } +#else + if (next_pc_p+extra_len>=max_pcp && + next_pc_p+extra_lenlen=max_pcp-min_pcp; + bi->min_pcp=min_pcp; + + remove_from_list(bi); + if (isinrom(min_pcp) && isinrom(max_pcp)) { + add_to_dormant(bi); /* No need to checksum it on cache flush. + Please don't start changing ROMs in + flight! */ + } + else { + calc_checksum(bi,&(bi->c1),&(bi->c2)); + add_to_active(bi); + } +#endif + + current_cache_size += get_target() - (uae_u8 *)current_compile_p; + +#ifdef JIT_DEBUG + bi->direct_handler_size = get_target() - (uae_u8 *)current_block_start_target; + + if (JITDebug && disasm_block) { + uaecptr block_addr = start_pc + ((char *)pc_hist[0].location - (char *)start_pc_p); + jit_log("M68K block @ 0x%08x (%d insns)", block_addr, blocklen); + uae_u32 block_size = ((uae_u8 *)pc_hist[blocklen - 1].location - (uae_u8 *)pc_hist[0].location) + 1; + disasm_m68k_block((const uae_u8 *)pc_hist[0].location, block_size); + jit_log("Compiled block @ %p", pc_hist[0].location); + disasm_native_block((const uae_u8 *)current_block_start_target, bi->direct_handler_size); + UNUSED(block_addr); + } +#endif + + log_dump(); + align_target(align_jumps); + +#ifdef UAE +#ifdef USE_UDIS86 + UDISFN(current_block_start_target, target) +#endif +#endif + + /* This is the non-direct handler */ + bi->handler= + bi->handler_to_use=(cpuop_func *)get_target(); + compemu_raw_cmp_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + compemu_raw_jnz((uintptr)popall_cache_miss); + comp_pc_p=(uae_u8*)pc_hist[0].location; + + bi->status=BI_FINALIZING; + init_comp(); + match_states(bi); + flush(1); + + compemu_raw_jmp((uintptr)bi->direct_handler); + + flush_cpu_icache((void *)current_block_start_target, (void *)target); + current_compile_p=get_target(); + raise_in_cl_list(bi); +#ifdef UAE + bi->nexthandler=current_compile_p; +#endif + + /* We will flush soon, anyway, so let's do it now */ + if (current_compile_p >= MAX_COMPILE_PTR) + flush_icache_hard(7); + + bi->status=BI_ACTIVE; + if (redo_current_block) + block_need_recompile(bi); + +#ifdef PROFILE_COMPILE_TIME + compile_time += (clock() - start_time); +#endif +#ifdef UAE + /* Account for compilation time */ + do_extra_cycles(totcycles); +#endif + } + +#ifndef UAE + /* Account for compilation time */ + cpu_do_check_ticks(); +#endif +} + +#ifdef UAE + /* Slightly different function defined in newcpu.cpp */ +#else +void do_nothing(void) +{ + /* What did you expect this to do? */ +} +#endif + +#ifdef UAE + /* Different implementation in newcpu.cpp */ +#else +void exec_nostats(void) +{ + for (;;) { + uae_u32 opcode = GET_OPCODE; +#ifdef FLIGHT_RECORDER + m68k_record_step(m68k_getpc(), opcode); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL)) { + return; /* We will deal with the spcflags in the caller */ + } + } +} +#endif + +#ifdef UAE +/* FIXME: check differences against UAE execute_normal (newcpu.cpp) */ +#else +void execute_normal(void) +{ + if (!check_for_cache_miss()) { + cpu_history pc_hist[MAXRUN]; + int blocklen = 0; +#if 0 && FIXED_ADDRESSING + start_pc_p = regs.pc_p; + start_pc = get_virtual_address(regs.pc_p); +#else + start_pc_p = regs.pc_oldp; + start_pc = regs.pc; +#endif + for (;;) { /* Take note: This is the do-it-normal loop */ + pc_hist[blocklen++].location = (uae_u16 *)regs.pc_p; + uae_u32 opcode = GET_OPCODE; +#ifdef FLIGHT_RECORDER + m68k_record_step(m68k_getpc(), opcode); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL) || blocklen>=MAXRUN) { + compile_block(pc_hist, blocklen); + return; /* We will deal with the spcflags in the caller */ + } + /* No need to check regs.spcflags, because if they were set, + we'd have ended up inside that "if" */ + } + } +} +#endif + +typedef void (*compiled_handler)(void); + +#ifdef UAE +/* FIXME: check differences against UAE m68k_do_compile_execute */ +#else +void m68k_do_compile_execute(void) +{ + for (;;) { + ((compiled_handler)(pushall_call_handler))(); + /* Whenever we return from that, we should check spcflags */ + if (SPCFLAGS_TEST(SPCFLAG_ALL)) { + if (m68k_do_specialties ()) + return; + } + } +} +#endif + +#ifdef UAE +/* FIXME: check differences against UAE m68k_compile_execute */ +#else +void m68k_compile_execute (void) +{ +setjmpagain: + TRY(prb) { + for (;;) { + if (quit_program > 0) { + if (quit_program == 1) { +#ifdef FLIGHT_RECORDER + dump_flight_recorder(); +#endif + break; + } + quit_program = 0; + m68k_reset (); + } + m68k_do_compile_execute(); + } + } + CATCH(prb) { + jit_log("m68k_compile_execute: exception %d pc=%08x (%08x+%p-%p) fault_pc=%08x addr=%08x -> %08x sp=%08x", + int(prb), + m68k_getpc(), + regs.pc, regs.pc_p, regs.pc_oldp, + regs.fault_pc, + regs.mmu_fault_addr, get_long (regs.vbr + 4*prb), + regs.regs[15]); + flush_icache(0); + Exception(prb, 0); + goto setjmpagain; + } +} +#endif + +#endif /* JIT */ diff --git a/BasiliskII/src/uae_cpu/compiler/compstbla.cpp b/BasiliskII/src/uae_cpu/compiler/compstbla.cpp new file mode 100644 index 000000000..e2f36d1e6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compstbla.cpp @@ -0,0 +1,5 @@ +/* + * compstbl.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "compstbl.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/flags_arm.h b/BasiliskII/src/uae_cpu/compiler/flags_arm.h new file mode 100644 index 000000000..c9a604901 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/flags_arm.h @@ -0,0 +1,52 @@ +/* + * compiler/flags_arm.h - Native flags definitions for ARM + * + * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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 NATIVE_FLAGS_ARM_H +#define NATIVE_FLAGS_ARM_H + +/* Native integer code conditions */ +enum { + NATIVE_CC_EQ = 0, + NATIVE_CC_NE = 1, + NATIVE_CC_CS = 2, + NATIVE_CC_CC = 3, + NATIVE_CC_MI = 4, + NATIVE_CC_PL = 5, + NATIVE_CC_VS = 6, + NATIVE_CC_VC = 7, + NATIVE_CC_HI = 8, + NATIVE_CC_LS = 9, + NATIVE_CC_GE = 10, + NATIVE_CC_LT = 11, + NATIVE_CC_GT = 12, + NATIVE_CC_LE = 13, + NATIVE_CC_AL = 14 +}; + +#endif /* NATIVE_FLAGS_ARM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/flags_x86.h b/BasiliskII/src/uae_cpu/compiler/flags_x86.h new file mode 100644 index 000000000..310dbcc33 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/flags_x86.h @@ -0,0 +1,52 @@ +/* + * compiler/flags_x86.h - Native flags definitions for IA-32 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2002 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2002 Christian Bauer + * + * 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 NATIVE_FLAGS_X86_H +#define NATIVE_FLAGS_X86_H + +/* Native integer code conditions */ +enum { + NATIVE_CC_HI = 7, + NATIVE_CC_LS = 6, + NATIVE_CC_CC = 3, + NATIVE_CC_CS = 2, + NATIVE_CC_NE = 5, + NATIVE_CC_EQ = 4, + NATIVE_CC_VC = 1, + NATIVE_CC_VS = 0, + NATIVE_CC_PL = 9, + NATIVE_CC_MI = 8, + NATIVE_CC_GE = 13, + NATIVE_CC_LT = 12, + NATIVE_CC_GT = 15, + NATIVE_CC_LE = 14 +}; + +/* FIXME: include/flags_x86.h in UAE had the following values: + NATIVE_CC_VC = 11, + NATIVE_CC_VS = 10, +*/ + +#endif /* NATIVE_FLAGS_X86_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c new file mode 100644 index 000000000..a7c4ee2b2 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -0,0 +1,3619 @@ +/* + * compiler/gencomp.c - MC680x0 compilation generator + * + * Based on work Copyright 1995, 1996 Bernd Schmidt + * Changes for UAE-JIT Copyright 2000 Bernd Meyer + * + * Adaptation for ARAnyM/ARM, copyright 2001-2014 + * Milan Jurik, Jens Heitmann + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2005 Christian Bauer + * + * 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 CC_FOR_BUILD 1 +#include "sysconfig.h" + +#include "sysdeps.h" +#include "readcpu.h" + +#undef NDEBUG +#include +#include +#include +#include +#include +#include +#undef abort + +#ifdef UAE +/* +#define DISABLE_I_OR_AND_EOR +#define DISABLE_I_SUB +#define DISABLE_I_SUBA +#define DISABLE_I_SUBX +#define DISABLE_I_ADD +#define DISABLE_I_ADDA +#define DISABLE_I_ADDX +#define DISABLE_I_NEG +#define DISABLE_I_NEGX +#define DISABLE_I_CLR +#define DISABLE_I_NOT +#define DISABLE_I_TST +#define DISABLE_I_BCHG_BCLR_BSET_BTST +#define DISABLE_I_CMPM_CMP +#define DISABLE_I_CMPA +#define DISABLE_I_MOVE +#define DISABLE_I_MOVEA +#define DISABLE_I_SWAP +#define DISABLE_I_EXG +#define DISABLE_I_EXT +#define DISABLE_I_MVEL +#define DISABLE_I_MVMLE +#define DISABLE_I_RTD +#define DISABLE_I_LINK +#define DISABLE_I_UNLK +#define DISABLE_I_RTS +#define DISABLE_I_JSR +#define DISABLE_I_JMP +#define DISABLE_I_BSR +#define DISABLE_I_BCC +#define DISABLE_I_LEA +#define DISABLE_I_PEA +#define DISABLE_I_DBCC +#define DISABLE_I_SCC +#define DISABLE_I_MULU +#define DISABLE_I_MULS +#define DISABLE_I_ASR +#define DISABLE_I_ASL +#define DISABLE_I_LSR +#define DISABLE_I_LSL +#define DISABLE_I_ROL +#define DISABLE_I_ROR +#define DISABLE_I_MULL +#define DISABLE_I_FPP +#define DISABLE_I_FBCC +#define DISABLE_I_FSCC +#define DISABLE_I_MOVE16 +*/ +#endif /* UAE */ + +#ifdef UAE +#define JIT_PATH "jit/" +#define GEN_PATH "jit/" +#define RETURN "return 0;" +#define RETTYPE "uae_u32" +#define NEXT_CPU_LEVEL 5 +#else +#define JIT_PATH "compiler/" +#define GEN_PATH "" +#define RETURN "return;" +#define RETTYPE "void" +#define NEXT_CPU_LEVEL 4 +#define ua(s) s +#endif + +#define BOOL_TYPE "int" +#define failure global_failure=1 +#define FAILURE global_failure=1 +#define isjump global_isjump=1 +#define is_const_jump global_iscjump=1 +#define isaddx global_isaddx=1 +#define uses_cmov global_cmov=1 +#define mayfail global_mayfail=1 +#define uses_fpu global_fpu=1 + +int hack_opcode; + +static int global_failure; +static int global_isjump; +static int global_iscjump; +static int global_isaddx; +static int global_cmov; +static int long_opcode; +static int global_mayfail; +static int global_fpu; + +static char endstr[1000]; +static char lines[100000]; +static int comp_index=0; + +#include "flags_x86.h" + +#ifndef __attribute__ +# ifndef __GNUC__ +# define __attribute__(x) +# endif +#endif + + +static int cond_codes[]={-1,-1, + NATIVE_CC_HI,NATIVE_CC_LS, + NATIVE_CC_CC,NATIVE_CC_CS, + NATIVE_CC_NE,NATIVE_CC_EQ, + -1,-1, + NATIVE_CC_PL,NATIVE_CC_MI, + NATIVE_CC_GE,NATIVE_CC_LT, + NATIVE_CC_GT,NATIVE_CC_LE + }; + +__attribute__((format(printf, 1, 2))) +static void comprintf(const char *format, ...) +{ + va_list args; + + va_start(args, format); + comp_index += vsprintf(lines + comp_index, format, args); + va_end(args); +} + +static void com_discard(void) +{ + comp_index = 0; +} + +static void com_flush(void) +{ + int i; + for (i = 0; i < comp_index; i++) + putchar(lines[i]); + com_discard(); +} + + +static FILE *headerfile; +static FILE *stblfile; + +static int using_prefetch; +static int using_exception_3; +static int cpu_level; +static int noflags; + +/* For the current opcode, the next lower level that will have different code. + * Initialized to -1 for each opcode. If it remains unchanged, indicates we + * are done with that opcode. */ +static int next_cpu_level; + +static int *opcode_map; +static int *opcode_next_clev; +static int *opcode_last_postfix; +static unsigned long *counts; + +static void read_counts(void) +{ + FILE *file; + unsigned long opcode, count, total; + char name[20]; + int nr = 0; + memset (counts, 0, 65536 * sizeof *counts); + + file = fopen ("frequent.68k", "r"); + if (file) + { + if (fscanf (file, "Total: %lu\n", &total) != 1) { + assert(0); + } + while (fscanf (file, "%lx: %lu %s\n", &opcode, &count, name) == 3) + { + opcode_next_clev[nr] = NEXT_CPU_LEVEL; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + fclose (file); + } + if (nr == nr_cpuop_funcs) + return; + for (opcode = 0; opcode < 0x10000; opcode++) + { + if (table68k[opcode].handler == -1 && table68k[opcode].mnemo != i_ILLG + && counts[opcode] == 0) + { + opcode_next_clev[nr] = NEXT_CPU_LEVEL; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + } + assert (nr == nr_cpuop_funcs); +} + +static int n_braces = 0; +static int insn_n_cycles; + +static void +start_brace (void) +{ + n_braces++; + comprintf ("{"); +} + +static void +close_brace (void) +{ + assert (n_braces > 0); + n_braces--; + comprintf ("}"); +} + +static void +finish_braces (void) +{ + while (n_braces > 0) + close_brace (); +} + +static inline void gen_update_next_handler(void) +{ + return; /* Can anything clever be done here? */ +} + +static void gen_writebyte(const char *address, const char *source) +{ + comprintf("\twritebyte(%s, %s, scratchie);\n", address, source); +} + +static void gen_writeword(const char *address, const char *source) +{ + comprintf("\twriteword(%s, %s, scratchie);\n", address, source); +} + +static void gen_writelong(const char *address, const char *source) +{ + comprintf("\twritelong(%s, %s, scratchie);\n", address, source); +} + +static void gen_readbyte(const char *address, const char* dest) +{ + comprintf("\treadbyte(%s, %s, scratchie);\n", address, dest); +} + +static void gen_readword(const char *address, const char *dest) +{ + comprintf("\treadword(%s,%s,scratchie);\n", address, dest); +} + +static void gen_readlong(const char *address, const char *dest) +{ + comprintf("\treadlong(%s, %s, scratchie);\n", address, dest); +} + + + +static const char * +gen_nextilong (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)"); + insn_n_cycles += 4; + + long_opcode=1; + return buffer; +} + +static const char * +gen_nextiword (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_iword((m68k_pc_offset+=2)-2)"); + insn_n_cycles+=2; + + long_opcode=1; + return buffer; +} + +static const char * +gen_nextibyte (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)"); + insn_n_cycles += 2; + + long_opcode=1; + return buffer; +} + + +static void +swap_opcode (void) +{ +#ifdef UAE + /* no-op */ +#else + comprintf("#ifdef USE_JIT_FPU\n"); + comprintf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + comprintf("\topcode = do_byteswap_16(opcode);\n"); + comprintf("#endif\n"); + comprintf("#endif\n"); +#endif +} + +static void +sync_m68k_pc (void) +{ + comprintf("\t if (m68k_pc_offset > SYNC_PC_OFFSET) sync_m68k_pc();\n"); +} + + +/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, + * the calling routine handles Apdi and Aipi modes. + * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ +static void genamode(amodes mode, const char *reg, wordsizes size, const char *name, int getv, int movem) +{ + start_brace(); + switch (mode) + { + case Dreg: /* Do we need to check dodgy here? */ + assert (!movem); + if (getv == 1 || getv == 2) + { + /* We generate the variable even for getv==2, so we can use + it as a destination for MOVE */ + comprintf("\tint %s = %s;\n", name, reg); + } + return; + + case Areg: + assert (!movem); + if (getv == 1 || getv == 2) + { + /* see above */ + comprintf("\tint %s = dodgy ? scratchie++ : %s + 8;\n", name, reg); + if (getv == 1) + { + comprintf("\tif (dodgy) \n"); + comprintf("\t\tmov_l_rr(%s, %s + 8);\n", name, reg); + } + } + return; + + case Aind: + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, %s + 8);\n", name, reg); + break; + case Aipi: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_rr(%sa, %s + 8);\n", name, reg); + break; + case Apdi: + switch (size) + { + case sz_byte: + if (movem) + { + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, (uae_s32)-areg_byteinc[%s]);\n", reg, reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + case sz_word: + if (movem) + { + comprintf("\tint %sa=dodgy?scratchie++:%s+8;\n", name, reg); + comprintf("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, -2);\n", reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + case sz_long: + if (movem) + { + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, -4);\n", reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + default: + assert(0); + break; + } + break; + case Ad16: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + comprintf("\tlea_l_brr(%sa, %sa, (uae_s32)(uae_s16)%s);\n", name, name, gen_nextiword()); + break; + case Ad8r: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tcalc_disp_ea_020(%s + 8, %s, %sa, scratchie);\n", reg, gen_nextiword(), name); + break; + + case PC16: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); + comprintf("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword()); + comprintf("\tmov_l_ri(%sa, address + PC16off);\n", name); + break; + + case PC8r: + comprintf("\tint pctmp = scratchie++;\n"); + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); + start_brace(); + comprintf("\tmov_l_ri(pctmp,address);\n"); + + comprintf("\tcalc_disp_ea_020(pctmp, %s, %sa, scratchie);\n", gen_nextiword(), name); + break; + case absw: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_ri(%sa, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + break; + case absl: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_ri(%sa, %s); /* absl */\n", name, gen_nextilong()); + break; + case imm: + assert (getv == 1); + switch (size) + { + case sz_byte: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); + break; + case sz_word: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + break; + case sz_long: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); + break; + default: + assert(0); + break; + } + return; + case imm0: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); + return; + case imm1: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + return; + case imm2: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); + return; + case immi: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, reg); + return; + default: + assert(0); + break; + } + + /* We get here for all non-reg non-immediate addressing modes to + * actually fetch the value. */ + if (getv == 1) + { + char astring[80]; + sprintf(astring, "%sa", name); + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + break; + case sz_word: + insn_n_cycles += 2; + break; + case sz_long: + insn_n_cycles += 4; + break; + default: + assert(0); + break; + } + start_brace(); + comprintf("\tint %s = scratchie++;\n", name); + switch (size) + { + case sz_byte: + gen_readbyte(astring, name); + break; + case sz_word: + gen_readword(astring, name); + break; + case sz_long: + gen_readlong(astring, name); + break; + default: + assert(0); + break; + } + } + + /* We now might have to fix up the register for pre-dec or post-inc + * addressing modes. */ + if (!movem) + { + switch (mode) + { + case Aipi: + switch (size) + { + case sz_byte: + comprintf("\tlea_l_brr(%s + 8,%s + 8, areg_byteinc[%s]);\n", reg, reg, reg); + break; + case sz_word: + comprintf("\tlea_l_brr(%s + 8, %s + 8, 2);\n", reg, reg); + break; + case sz_long: + comprintf("\tlea_l_brr(%s + 8, %s + 8, 4);\n", reg, reg); + break; + default: + assert(0); + break; + } + break; + case Apdi: + break; + default: + break; + } + } +} + +static void genastore(const char *from, amodes mode, const char *reg, wordsizes size, const char *to) +{ + switch (mode) + { + case Dreg: + switch (size) + { + case sz_byte: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_b_rr(%s, %s);\n", reg, from); + break; + case sz_word: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_w_rr(%s, %s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_l_rr(%s, %s);\n", reg, from); + break; + default: + assert(0); + break; + } + break; + case Areg: + switch (size) + { + case sz_word: + comprintf("\tif(%s + 8 != %s)\n", reg, from); + comprintf("\t\tmov_w_rr(%s + 8, %s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s + 8 != %s)\n", reg, from); + comprintf("\t\tmov_l_rr(%s + 8, %s);\n", reg, from); + break; + default: + assert(0); + break; + } + break; + + case Apdi: + case absw: + case PC16: + case PC8r: + case Ad16: + case Ad8r: + case Aipi: + case Aind: + case absl: + { + char astring[80]; + sprintf(astring, "%sa", to); + + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + gen_writebyte(astring, from); + break; + case sz_word: + insn_n_cycles += 2; + gen_writeword(astring, from); + break; + case sz_long: + insn_n_cycles += 4; + gen_writelong(astring, from); + break; + default: + assert(0); + break; + } + } + break; + case imm: + case imm0: + case imm1: + case imm2: + case immi: + assert(0); + break; + default: + assert(0); + break; + } +} + +static void genmov16(uae_u32 opcode, struct instr *curi) +{ + comprintf("\tint src=scratchie++;\n"); + comprintf("\tint dst=scratchie++;\n"); + + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword()); + comprintf("\tmov_l_rr(src,8+srcreg);\n"); + comprintf("\tmov_l_rr(dst,8+dstreg);\n"); + } + else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "src", 0, 2); + genamode (curi->dmode, "dstreg", curi->size, "dst", 0, 2); + comprintf("\tmov_l_rr(src,srca);\n"); + comprintf("\tmov_l_rr(dst,dsta);\n"); + } + + /* Align on 16-byte boundaries */ + comprintf("\tand_l_ri(src,~15);\n"); + comprintf("\tand_l_ri(dst,~15);\n"); + + if ((opcode & 0xfff8) == 0xf620) { + comprintf("\tif (srcreg != dstreg)\n"); + comprintf("\tadd_l_ri(srcreg+8,16);\n"); + comprintf("\tadd_l_ri(dstreg+8,16);\n"); + } + else if ((opcode & 0xfff8) == 0xf600) + comprintf("\tadd_l_ri(srcreg+8,16);\n"); + else if ((opcode & 0xfff8) == 0xf608) + comprintf("\tadd_l_ri(dstreg+8,16);\n"); + +#ifdef UAE + comprintf("\tif (special_mem) {\n"); + comprintf("\t\tint tmp=scratchie;\n"); + comprintf("\tscratchie+=4;\n" + "\treadlong(src,tmp,scratchie);\n" + "\twritelong_clobber(dst,tmp,scratchie);\n" + "\tadd_l_ri(src,4);\n" + "\tadd_l_ri(dst,4);\n" + "\treadlong(src,tmp,scratchie);\n" + "\twritelong_clobber(dst,tmp,scratchie);\n" + "\tadd_l_ri(src,4);\n" + "\tadd_l_ri(dst,4);\n" + "\treadlong(src,tmp,scratchie);\n" + "\twritelong_clobber(dst,tmp,scratchie);\n" + "\tadd_l_ri(src,4);\n" + "\tadd_l_ri(dst,4);\n" + "\treadlong(src,tmp,scratchie);\n" + "\twritelong_clobber(dst,tmp,scratchie);\n"); + comprintf("\t} else {\n"); +#endif + comprintf("\tint tmp=scratchie;\n"); + comprintf("\tscratchie+=4;\n" + "\tget_n_addr(src,src,scratchie);\n" + "\tget_n_addr(dst,dst,scratchie);\n" + "\tmov_l_rR(tmp+0,src,0);\n" + "\tmov_l_rR(tmp+1,src,4);\n" + "\tmov_l_rR(tmp+2,src,8);\n" + "\tmov_l_rR(tmp+3,src,12);\n" + "\tmov_l_Rr(dst,tmp+0,0);\n" + "\tforget_about(tmp+0);\n" + "\tmov_l_Rr(dst,tmp+1,4);\n" + "\tforget_about(tmp+1);\n" + "\tmov_l_Rr(dst,tmp+2,8);\n" + "\tforget_about(tmp+2);\n" + "\tmov_l_Rr(dst,tmp+3,12);\n"); +#ifdef UAE + comprintf("\t}\n"); +#endif +} + +static void +genmovemel (uae_u16 opcode) +{ + comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + comprintf ("\tint native=scratchie++;\n"); + comprintf ("\tint i;\n"); + comprintf ("\tsigned char offset=0;\n"); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); +#ifdef UAE + if (table68k[opcode].size == sz_long) + comprintf("\tif (1 && !special_mem) {\n"); + else + comprintf("\tif (1 && !special_mem) {\n"); +#endif + + /* Fast but unsafe... */ + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rR(i,native,offset);\n" + "\t\t\tmid_bswap_32(i);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_w_rR(i,native,offset);\n" + "\t\t\tmid_bswap_16(i);\n" + "\t\t\tsign_extend_16_rr(i,i);\n" + "\t\t\toffset+=2;\n"); + break; + default: assert(0); + } + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Aipi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n"); + } + /* End fast but unsafe. */ + +#ifdef UAE + comprintf("\t} else {\n"); + + comprintf ("\t\tint tmp=scratchie++;\n"); + + comprintf("\t\tmov_l_rr(tmp,srca);\n"); + comprintf("\t\tfor (i=0;i<16;i++) {\n" + "\t\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\t\treadlong(tmp,i,scratchie);\n" + "\t\t\t\tadd_l_ri(tmp,4);\n"); + break; + case sz_word: + comprintf("\t\t\t\treadword(tmp,i,scratchie);\n" + "\t\t\t\tadd_l_ri(tmp,2);\n"); + break; + default: assert(0); + } + + comprintf("\t\t\t}\n" + "\t\t}\n"); + if (table68k[opcode].dmode == Aipi) { + comprintf("\t\tmov_l_rr(8+dstreg,tmp);\n"); + } + comprintf("\t}\n"); +#endif + +} + + +static void +genmovemle (uae_u16 opcode) +{ + comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + comprintf ("\tint native=scratchie++;\n"); + comprintf ("\tint i;\n"); + comprintf ("\tint tmp=scratchie++;\n"); + comprintf ("\tsigned char offset=0;\n"); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + +#ifdef UAE + /* *Sigh* Some clever geek realized that the fastest way to copy a + buffer from main memory to the gfx card is by using movmle. Good + on her, but unfortunately, gfx mem isn't "real" mem, and thus that + act of cleverness means that movmle must pay attention to special_mem, + or Genetic Species is a rather boring-looking game ;-) */ + if (table68k[opcode].size == sz_long) + comprintf("\tif (1 && !special_mem) {\n"); + else + comprintf("\tif (1 && !special_mem) {\n"); +#endif + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + if (table68k[opcode].dmode!=Apdi) { + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tmid_bswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tmid_bswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n" + "\t\t\toffset+=2;\n"); + break; + default: assert(0); + } + } + else { /* Pre-decrement */ + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\toffset-=4;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tmid_bswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n" + ); + break; + case sz_word: + comprintf("\t\t\toffset-=2;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tmid_bswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n" + ); + break; + default: assert(0); + } + } + + + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Apdi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n"); + } +#ifdef UAE + comprintf("\t} else {\n"); + + if (table68k[opcode].dmode!=Apdi) { + comprintf("\tmov_l_rr(tmp,srca);\n"); + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\twritelong(tmp,i,scratchie);\n" + "\t\t\tadd_l_ri(tmp,4);\n"); + break; + case sz_word: + comprintf("\t\t\twriteword(tmp,i,scratchie);\n" + "\t\t\tadd_l_ri(tmp,2);\n"); + break; + default: assert(0); + } + } + else { /* Pre-decrement */ + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tsub_l_ri(srca,4);\n" + "\t\t\twritelong(srca,15-i,scratchie);\n"); + break; + case sz_word: + comprintf("\t\t\tsub_l_ri(srca,2);\n" + "\t\t\twriteword(srca,15-i,scratchie);\n"); + break; + default: assert(0); + } + } + + + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Apdi) { + comprintf("\t\t\tmov_l_rr(8+dstreg,srca);\n"); + } + comprintf("\t}\n"); +#endif +} + + +static void +duplicate_carry (void) +{ + comprintf ("\tif (needed_flags&FLAG_X) duplicate_carry();\n"); +} + +typedef enum +{ + flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, + flag_addx, flag_subx, flag_zn, flag_av, flag_sv, flag_and, flag_or, + flag_eor, flag_mov +} +flagtypes; + + +static void +genflags (flagtypes type, wordsizes size, const char *value, const char *src, const char *dst) +{ + if (noflags) { + switch(type) { + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + comprintf("/* Weird --- CMP with noflags ;-) */\n"); + return; + case flag_add: + case flag_sub: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch(type) { + case flag_add: op="add"; break; + case flag_sub: op="sub"; break; + default: assert(0); + } + switch (size) + { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + return; + } + break; + + case flag_and: + comprintf("\tdont_care_flags();\n"); + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); + comprintf("\tand_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tand_b(%s,%s);\n",dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); + comprintf("\tand_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tand_w(%s,%s);\n",dst,src); + break; + case sz_long: + comprintf("\tand_l(%s,%s);\n",dst,src); + break; + } + return; + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\tand_l_ri(%s,0xffffff00);\n",dst); + comprintf("\tor_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_b_rr(%s,%s);\n",dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\tand_l_ri(%s,0xffff0000);\n",dst); + comprintf("\tor_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_w_rr(%s,%s);\n",dst,src); + break; + case sz_long: + comprintf("\tmov_l_rr(%s,%s);\n",dst,src); + break; + } + return; + + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + const char* op; + switch(type) { + case flag_or: op="or"; break; + case flag_eor: op="xor"; break; + default: assert(0); + } + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\t%s_l(%s,scratchie);\n",op,dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\t%s_l(%s,scratchie);\n",op,dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + close_brace(); + return; + } + + + case flag_addx: + case flag_subx: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch(type) { + case flag_addx: op="adc"; break; + case flag_subx: op="sbb"; break; + default: assert(0); + } + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) + { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + return; + } + break; + default: return; + } + } + + /* Need the flags, but possibly not all of them */ + switch (type) + { + case flag_logical_noclobber: + failure; + /* fall through */ + + case flag_and: + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + const char* op; + switch(type) { + case flag_and: op="and"; break; + case flag_or: op="or"; break; + case flag_eor: op="xor"; break; + default: assert(0); + } + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + switch (size) + { + case sz_byte: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_b_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_b(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_b_rr(%s,%s);\n",dst,src); + comprintf("\ttest_b_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + case sz_word: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_w_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_w(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_w_rr(%s,%s);\n",dst,src); + comprintf("\ttest_w_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + case sz_long: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_l_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_l(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_l_rr(%s,%s);\n",dst,src); + comprintf("\ttest_l_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_logical: + comprintf("\tdont_care_flags();\n"); + start_brace(); + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\ttest_b_rr(%s,%s);\n",value,value); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\ttest_w_rr(%s,%s);\n",value,value); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\ttest_l_rr(%s,%s);\n",value,value); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + + + case flag_add: + case flag_sub: + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch(type) { + case flag_add: op="add"; break; + case flag_sub: op="sub"; break; + case flag_cmp: op="cmp"; break; + default: assert(0); + } + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (type!=flag_cmp) { + duplicate_carry(); + } + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + + return; + } + + case flag_addx: + case flag_subx: + uses_cmov; + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch(type) { + case flag_addx: op="adc"; break; + case flag_subx: op="sbb"; break; + default: assert(0); + } + start_brace(); + comprintf("\tint zero=scratchie++;\n" + "\tint one=scratchie++;\n" + "\tif (needed_flags&FLAG_Z) {\n" + "\tmov_l_ri(zero,0);\n" + "\tmov_l_ri(one,-1);\n" + "\tmake_flags_live();\n" + "\tcmov_l_rr(zero,one,%d);\n" + "\t}\n",NATIVE_CC_NE); + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tif (needed_flags&FLAG_Z) {\n" + "\tcmov_l_rr(zero,one,%d);\n" + "\tset_zero(zero, one);\n" /* No longer need one */ + "\tlive_flags();\n" + "\t}\n",NATIVE_CC_NE); + comprintf("\tend_needflags();\n"); + duplicate_carry(); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + return; + } + default: + failure; + break; + } +} + +static int /* returns zero for success, non-zero for failure */ +gen_opcode (unsigned int opcode) +{ + struct instr *curi = table68k + opcode; + const char* ssize=NULL; + + insn_n_cycles = 2; + global_failure=0; + long_opcode=0; + global_isjump=0; + global_iscjump=0; + global_isaddx=0; + global_cmov=0; + global_fpu=0; + global_mayfail=0; + hack_opcode=opcode; + endstr[0]=0; + + start_brace (); + comprintf("\tuae_u8 scratchie=S1;\n"); + switch (curi->plev) + { + case 0: /* not privileged */ + break; + case 1: /* unprivileged only on 68000 */ + if (cpu_level == 0) + break; + if (next_cpu_level < 0) + next_cpu_level = 0; + + /* fall through */ + case 2: /* priviledged */ + failure; /* Easy ones first */ + break; + case 3: /* privileged if size == word */ + if (curi->size == sz_byte) + break; + failure; + break; + } + switch (curi->size) { + case sz_byte: ssize="b"; break; + case sz_word: ssize="w"; break; + case sz_long: ssize="l"; break; + default: assert(0); + } + (void)ssize; + + switch (curi->mnemo) + { + case i_OR: + case i_AND: + case i_EOR: +#ifdef DISABLE_I_OR_AND_EOR + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + switch(curi->mnemo) { + case i_OR: genflags (flag_or, curi->size, "", "src", "dst"); break; + case i_AND: genflags (flag_and, curi->size, "", "src", "dst"); break; + case i_EOR: genflags (flag_eor, curi->size, "", "src", "dst"); break; + } + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_ORSR: + case i_EORSR: + failure; + isjump; + break; + + case i_ANDSR: + failure; + isjump; + break; + + case i_SUB: +#ifdef DISABLE_I_SUB + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_sub, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_SUBA: +#ifdef DISABLE_I_SUBA + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; + case sz_long: comprintf("\ttmp=src;\n"); break; + default: assert(0); + } + comprintf("\tsub_l(dst,tmp);\n"); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_SUBX: +#ifdef DISABLE_I_SUBX + failure; +#endif + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_subx, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_SBCD: + failure; + /* I don't think so! */ + break; + + case i_ADD: +#ifdef DISABLE_I_ADD + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_add, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_ADDA: +#ifdef DISABLE_I_ADDA + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; + case sz_long: comprintf("\ttmp=src;\n"); break; + default: assert(0); + } + comprintf("\tadd_l(dst,tmp);\n"); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_ADDX: +#ifdef DISABLE_I_ADDX + failure; +#endif + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + genflags (flag_addx, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_ABCD: + failure; + /* No BCD maths for me.... */ + break; + + case i_NEG: +#ifdef DISABLE_I_NEG + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_sub, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_NEGX: +#ifdef DISABLE_I_NEGX + failure; +#endif + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_subx, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_NBCD: + failure; + /* Nope! */ + break; + + case i_CLR: +#ifdef DISABLE_I_CLR + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_logical, curi->size, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_NOT: +#ifdef DISABLE_I_NOT + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0xffffffff);\n"); + genflags (flag_eor, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_TST: +#ifdef DISABLE_I_TST + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genflags (flag_logical, curi->size, "src", "", ""); + break; + case i_BCHG: + case i_BCLR: + case i_BSET: + case i_BTST: +#ifdef DISABLE_I_BCHG_BCLR_BSET_BTST + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + { + const char* op; + int need_write=1; + + switch(curi->mnemo) { + case i_BCHG: op="btc"; break; + case i_BCLR: op="btr"; break; + case i_BSET: op="bts"; break; + case i_BTST: op="bt"; need_write=0; break; + default: op=""; assert(0); + } + comprintf("\t%s_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n",op); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } + if (need_write) + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + } + break; + + case i_CMPM: + case i_CMP: +#ifdef DISABLE_I_CMPM_CMP + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + genflags (flag_cmp, curi->size, "", "src", "dst"); + break; + + case i_CMPA: +#ifdef DISABLE_I_CMPA + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmps,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmps,src);\n"); break; + case sz_long: comprintf("tmps=src;\n"); break; + default: assert(0); + } + genflags (flag_cmp, sz_long, "", "tmps", "dst"); + break; + /* The next two are coded a little unconventional, but they are doing + * weird things... */ + + case i_MVPRM: + isjump; + failure; + break; + + case i_MVPMR: + isjump; + failure; + break; + + case i_MOVE: +#ifdef DISABLE_I_MOVE + failure; +#endif + switch(curi->dmode) { + case Dreg: + case Areg: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags (flag_mov, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + default: /* It goes to memory, not a register */ + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags (flag_logical, curi->size, "src", "", ""); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + } + break; + + case i_MOVEA: +#ifdef DISABLE_I_MOVEA + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch(curi->size) { + case sz_word: comprintf("\tsign_extend_16_rr(dst,src);\n"); break; + case sz_long: comprintf("\tmov_l_rr(dst,src);\n"); break; + default: assert(0); + } + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_MVSR2: + isjump; + failure; + break; + + case i_MV2SR: + isjump; + failure; + break; + + case i_SWAP: +#ifdef DISABLE_I_SWAP + failure; +#endif + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + comprintf("\trol_l_ri(src,16);\n"); + genflags (flag_logical, sz_long, "src", "", ""); + genastore ("src", curi->smode, "srcreg", sz_long, "src"); + break; + + case i_EXG: +#ifdef DISABLE_I_EXG + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tmov_l_rr(tmp,src);\n"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("tmp", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_EXT: +#ifdef DISABLE_I_EXT + failure; +#endif + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + start_brace (); + switch (curi->size) + { + case sz_byte: + comprintf ("\tint dst = src;\n" + "\tsign_extend_8_rr(src,src);\n"); + break; + case sz_word: + comprintf ("\tint dst = scratchie++;\n" + "\tsign_extend_8_rr(dst,src);\n"); + break; + case sz_long: + comprintf ("\tint dst = src;\n" + "\tsign_extend_16_rr(src,src);\n"); + break; + default: + assert(0); + } + genflags (flag_logical, + curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", + curi->size == sz_word ? sz_word : sz_long, "src"); + break; + + case i_MVMEL: +#ifdef DISABLE_I_MVEL + failure; +#endif + genmovemel (opcode); + break; + + case i_MVMLE: +#ifdef DISABLE_I_MVMLE + failure; +#endif + genmovemle (opcode); + break; + + case i_TRAP: + isjump; + failure; + break; + + case i_MVR2USP: + isjump; + failure; + break; + + case i_MVUSP2R: + isjump; + failure; + break; + + case i_RESET: + isjump; + failure; + break; + + case i_NOP: + break; + + case i_STOP: + isjump; + failure; + break; + + case i_RTE: + isjump; + failure; + break; + + case i_RTD: +#ifdef DISABLE_I_RTD + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + /* offs is constant */ + comprintf("\tadd_l_ri(offs,4);\n"); + start_brace(); + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tadd_l(15,offs);\n"); + gen_update_next_handler(); + isjump; + break; + + case i_LINK: +#ifdef DISABLE_I_LINK + failure; +#endif + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + comprintf("\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,src,scratchie);\n" + "\tmov_l_rr(src,15);\n"); + if (curi->size==sz_word) + comprintf("\tsign_extend_16_rr(offs,offs);\n"); + comprintf("\tadd_l(15,offs);\n"); + genastore ("src", curi->smode, "srcreg", sz_long, "src"); + break; + + case i_UNLK: +#ifdef DISABLE_I_UNLK + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + comprintf("\tmov_l_rr(15,src);\n" + "\treadlong(15,src,scratchie);\n" + "\tadd_l_ri(15,4);\n"); + genastore ("src", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_RTS: +#ifdef DISABLE_I_RTS + failure; +#endif + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tlea_l_brr(15,15,4);\n"); + gen_update_next_handler(); + isjump; + break; + + case i_TRAPV: + isjump; + failure; + break; + + case i_RTR: + isjump; + failure; + break; + + case i_JSR: +#ifdef DISABLE_I_JSR + failure; +#endif + isjump; + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + start_brace(); + comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + + case i_JMP: +#ifdef DISABLE_I_JMP + failure; +#endif + isjump; + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + + case i_BSR: +#ifdef DISABLE_I_BSR + failure; +#endif + is_const_jump; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tadd_l_ri(src,m68k_pc_offset_thisinst+2);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + comprintf("\tadd_l(PC_P,src);\n"); + + comprintf("\tcomp_pc_p=(uae_u8*)(uintptr)get_const(PC_P);\n"); + break; + + case i_Bcc: +#ifdef DISABLE_I_BCC + failure; +#endif + comprintf("\tuae_u32 v,v1,v2;\n"); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + /* That source is an immediate, so we can clobber it with abandon */ + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(src,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(src,src);\n"); break; + case sz_long: break; + } + comprintf("\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + /* Leave the following as "add" --- it will allow it to be optimized + away due to src being a constant ;-) */ + comprintf("\tadd_l_ri(src,(uintptr)comp_pc_p);\n"); + comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n"); + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + comprintf("\tadd_l_ri(src,m68k_pc_offset);\n"); + comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + if (curi->cc>=2) { + comprintf("\tv1=get_const(PC_P);\n" + "\tv2=get_const(src);\n" + "\tregister_branch(v1,v2,%d);\n", + cond_codes[curi->cc]); + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + isjump; + } + else { + is_const_jump; + } + + switch(curi->cc) { + case 0: /* Unconditional jump */ + comprintf("\tmov_l_rr(PC_P,src);\n"); + comprintf("\tcomp_pc_p=(uae_u8*)(uintptr)get_const(PC_P);\n"); + break; + case 1: break; /* This is silly! */ + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + break; + default: assert(0); + } + break; + + case i_LEA: +#ifdef DISABLE_I_LEA + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_PEA: +#ifdef DISABLE_I_PEA + failure; +#endif + if (table68k[opcode].smode==Areg || + table68k[opcode].smode==Aind || + table68k[opcode].smode==Aipi || + table68k[opcode].smode==Apdi || + table68k[opcode].smode==Ad16 || + table68k[opcode].smode==Ad8r) + comprintf("if (srcreg==7) dodgy=1;\n"); + + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (Apdi, "7", sz_long, "dst", 2, 0); + genastore ("srca", Apdi, "7", sz_long, "dst"); + break; + + case i_DBcc: +#ifdef DISABLE_I_DBCC + failure; +#endif + isjump; + uses_cmov; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + + /* That offs is an immediate, so we can clobber it with abandon */ + switch(curi->size) { + case sz_word: comprintf("\tsign_extend_16_rr(offs,offs);\n"); break; + default: assert(0); /* Seems this only comes in word flavour */ + } + comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + comprintf("\tadd_l_ri(offs,(uintptr)comp_pc_p);\n"); /* New PC, + once the + offset_68k is + * also added */ + /* Let's fold in the m68k_pc_offset at this point */ + comprintf("\tadd_l_ri(offs,m68k_pc_offset);\n"); + comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + start_brace(); + comprintf("\tint nsrc=scratchie++;\n"); + + if (curi->cc>=2) { + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + } + + assert (curi->size==sz_word); + + switch(curi->cc) { + case 0: /* This is an elaborate nop? */ + break; + case 1: + comprintf("\tstart_needflags();\n"); + comprintf("\tsub_w_ri(src,1);\n"); + comprintf("\t end_needflags();\n"); + start_brace(); + comprintf("\tuae_u32 v2,v;\n" + "\tuae_u32 v1=get_const(PC_P);\n"); + comprintf("\tv2=get_const(offs);\n" + "\tregister_branch(v1,v2,%d);\n", NATIVE_CC_CC); + break; + + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmov_l_rr(nsrc,src);\n"); + comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n" + "\tmov_w_rr(src,scratchie);\n"); + comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", + cond_codes[curi->cc]); + comprintf("\tcmov_l_rr(src,nsrc,%d);\n", + cond_codes[curi->cc]); + /* OK, now for cc=true, we have src==nsrc and offs==PC_P, + so whether we move them around doesn't matter. However, + if cc=false, we have offs==jump_pc, and src==nsrc-1 */ + + comprintf("\t start_needflags();\n"); + comprintf("\ttest_w_rr(nsrc,nsrc);\n"); + comprintf("\t end_needflags();\n"); + comprintf("\tcmov_l_rr(PC_P,offs,%d);\n", NATIVE_CC_NE); + break; + default: assert(0); + } + genastore ("src", curi->smode, "srcreg", curi->size, "src"); + gen_update_next_handler(); + break; + + case i_Scc: +#ifdef DISABLE_I_SCC + failure; +#endif + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace (); + comprintf ("\tint val = scratchie++;\n"); + + /* We set val to 0 if we really should use 255, and to 1 for real 0 */ + switch(curi->cc) { + case 0: /* Unconditional set */ + comprintf("\tmov_l_ri(val,0);\n"); + break; + case 1: + /* Unconditional not-set */ + comprintf("\tmov_l_ri(val,1);\n"); + break; + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + /* All condition codes can be inverted by changing the LSB */ + comprintf("\tsetcc(val,%d);\n", + cond_codes[curi->cc]^1); break; + default: assert(0); + } + comprintf("\tsub_b_ri(val,1);\n"); + genastore ("val", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_DIVU: + isjump; + failure; + break; + + case i_DIVS: + isjump; + failure; + break; + + case i_MULU: +#ifdef DISABLE_I_MULU + failure; +#endif + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + /* To do 16x16 unsigned multiplication, we actually use + 32x32 signed, and zero-extend the registers first. + That solves the problem of MUL needing dedicated registers + on the x86 */ + comprintf("\tzero_extend_16_rr(scratchie,src);\n" + "\tzero_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags (flag_logical, sz_long, "dst", "", ""); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_MULS: +#ifdef DISABLE_I_MULS + failure; +#endif + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + comprintf("\tsign_extend_16_rr(scratchie,src);\n" + "\tsign_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags (flag_logical, sz_long, "dst", "", ""); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_CHK: + isjump; + failure; + break; + + case i_CHK2: + isjump; + failure; + break; + + case i_ASR: +#ifdef DISABLE_I_ASR + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint width;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n" + "\tint highshift=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" + "\thighmask=0x38;\n" + "\twidth=8;\n"); + break; + case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" + "\thighmask=0x30;\n" + "\twidth=16;\n"); + break; + case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" + "\thighmask=0x20;\n" + "\twidth=32;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(highshift,0);\n" + "mov_l_ri(scratchie,width/2);\n" + "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); + /* The x86 masks out bits, so we now make sure that things + really get shifted as much as planned */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: assert(0); + } + /* And again */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: assert(0); + } + + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshra_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshra_l_rr(cdata,tmpcnt);\n");break; + default: assert(0); + } + /* If the shift count was higher than the width, we need + to pick up the sign from data */ + comprintf("test_l_ri(tmpcnt,highmask);\n" + "cmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint width;\n" + "\tint highshift=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" + "\thighmask=0x38;\n" + "\twidth=8;\n"); + break; + case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" + "\thighmask=0x30;\n" + "\twidth=16;\n"); + break; + case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" + "\thighmask=0x20;\n" + "\twidth=32;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(highshift,0);\n" + "mov_l_ri(scratchie,width/2);\n" + "cmov_l_rr(highshift,scratchie,%d);\n",NATIVE_CC_NE); + /* The x86 masks out bits, so we now make sure that things + really get shifted as much as planned */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: assert(0); + } + /* And again */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: assert(0); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_word: comprintf("\tshra_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_long: comprintf("\tshra_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + default: assert(0); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_ASL: +#ifdef DISABLE_I_ASL + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + /* Except for the handling of the V flag, this is identical to + LSL. The handling of V is, uhm, unpleasant, so if it's needed, + let the normal emulation handle it. Shoulders of giants kinda + thing ;-) */ + comprintf("if (needed_flags & FLAG_V) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; + default: assert(0); + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,7);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,15);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,31);\n"); break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); break; + default: assert(0); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_LSR: +#ifdef DISABLE_I_LSR + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshrl_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshrl_l_rr(cdata,tmpcnt);\n");break; + default: assert(0); + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_word: comprintf("\tshrl_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_long: comprintf("\tshrl_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + default: assert(0); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_LSL: +#ifdef DISABLE_I_LSL + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; + default: assert(0); + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,7);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,15);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,31);\n"); break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: assert(0); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: assert(0); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); break; + default: assert(0); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_ROL: +#ifdef DISABLE_I_ROL + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + + switch(curi->size) { + case sz_long: comprintf("\t rol_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\t rol_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\t rol_b_rr(data,cnt);\n"); break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + break; + + case i_ROR: +#ifdef DISABLE_I_ROR + failure; +#endif + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + + switch(curi->size) { + case sz_long: comprintf("\t ror_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\t ror_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\t ror_b_rr(data,cnt);\n"); break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + switch(curi->size) { + case sz_byte: comprintf("\t bt_l_ri(data,0x07);\n"); break; + case sz_word: comprintf("\t bt_l_ri(data,0x0f);\n"); break; + case sz_long: comprintf("\t bt_l_ri(data,0x1f);\n"); break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + break; + + case i_ROXL: + failure; + break; + + case i_ROXR: + failure; + break; + + case i_ASRW: + failure; + break; + + case i_ASLW: + failure; + break; + + case i_LSRW: + failure; + break; + + case i_LSLW: + failure; + break; + + case i_ROLW: + failure; + break; + + case i_RORW: + failure; + break; + + case i_ROXLW: + failure; + break; + + case i_ROXRW: + failure; + break; + + case i_MOVEC2: + isjump; + failure; + break; + + case i_MOVE2C: + isjump; + failure; + break; + + case i_CAS: + failure; + break; + + case i_CAS2: + failure; + break; + + case i_MOVES: /* ignore DFC and SFC because we have no MMU */ + isjump; + failure; + break; + + case i_BKPT: /* only needed for hardware emulators */ + isjump; + failure; + break; + + case i_CALLM: /* not present in 68030 */ + isjump; + failure; + break; + + case i_RTM: /* not present in 68030 */ + isjump; + failure; + break; + + case i_TRAPcc: + isjump; + failure; + break; + + case i_DIVL: + isjump; + failure; + break; + + case i_MULL: +#ifdef DISABLE_I_MULL + failure; +#endif + if (!noflags) { + failure; + break; + } + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + comprintf("\tint r2=(extra>>12)&7;\n" + "\tint tmp=scratchie++;\n"); + + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + /* The two operands are in dst and r2 */ + comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ + "\tint r3=(extra&7);\n" + "\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ + comprintf("\tif (extra&0x0800) { \n" /* signed */ + "\t\timul_64_32(r2,r3);\n" + "\t} else { \n" + "\t\tmul_64_32(r2,r3);\n" + "\t} \n"); + /* The result is in r2/tmp, with r2 holding the lower 32 bits */ + comprintf("\t} else {\n"); /* Only want 32 bit result */ + /* operands in dst and r2, result foes into r2 */ + /* shouldn't matter whether it's signed or unsigned?!? */ + comprintf("\timul_32_32(r2,dst);\n" + "\t}\n"); + break; + + case i_BFTST: + case i_BFEXTU: + case i_BFCHG: + case i_BFEXTS: + case i_BFCLR: + case i_BFFFO: + case i_BFSET: + case i_BFINS: + failure; + break; + + case i_PACK: + failure; + break; + + case i_UNPK: + failure; + break; + + case i_TAS: + failure; + break; + + case i_FPP: +#ifdef DISABLE_I_FPP + failure; +#endif + uses_fpu; + mayfail; + comprintf("#ifdef USE_JIT_FPU\n"); + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fpp_opp(opcode,extra);\n"); + comprintf("#else\n"); + comprintf("\tfailure = 1;\n"); + comprintf("#endif\n"); + break; + + case i_FBcc: +#ifdef DISABLE_I_FBCC + failure; +#endif + uses_fpu; + isjump; + uses_cmov; + mayfail; + comprintf("#ifdef USE_JIT_FPU\n"); + swap_opcode(); + comprintf("\tcomp_fbcc_opp(opcode);\n"); + comprintf("#else\n"); + comprintf("\tfailure = 1;\n"); + comprintf("#endif\n"); + break; + + case i_FDBcc: + uses_fpu; + isjump; + failure; + break; + + case i_FScc: +#ifdef DISABLE_I_FSCC + failure; +#endif + uses_fpu; + mayfail; + uses_cmov; + comprintf("#ifdef USE_JIT_FPU\n"); + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fscc_opp(opcode,extra);\n"); + comprintf("#else\n"); + comprintf("\tfailure = 1;\n"); + comprintf("#endif\n"); + break; + + case i_FTRAPcc: + uses_fpu; + isjump; + failure; + break; + + case i_FSAVE: + uses_fpu; + failure; + break; + + case i_FRESTORE: + uses_fpu; + failure; + break; + + case i_CINVL: + case i_CINVP: + case i_CINVA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + comprintf ("\tflush_icache();\n"); /* Differentiate a bit more? */ + break; + + case i_CPUSHL: + case i_CPUSHP: + case i_CPUSHA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + break; + + case i_MOVE16: +#ifdef DISABLE_I_MOVE16 + failure; +#endif + genmov16(opcode,curi); + break; + +#ifdef UAE + case i_MMUOP030: + case i_PFLUSHN: + case i_PFLUSH: + case i_PFLUSHAN: + case i_PFLUSHA: + case i_PLPAR: + case i_PLPAW: + case i_PTESTR: + case i_PTESTW: + case i_LPSTOP: + isjump; + failure; + break; +#endif + +#ifdef WINUAE_ARANYM + case i_EMULOP_RETURN: + isjump; + failure; + break; + + case i_EMULOP: + failure; + break; + + case i_NATFEAT_ID: + case i_NATFEAT_CALL: + failure; + break; + + case i_MMUOP: + isjump; + failure; + break; +#endif + + default: + assert(0); + break; + } + comprintf("%s",endstr); + finish_braces (); + sync_m68k_pc (); + if (global_mayfail) + comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); + return global_failure; +} + +static void +generate_includes (FILE * f) +{ + fprintf (f, "#include \"sysconfig.h\"\n"); + fprintf (f, "#if defined(JIT)\n"); + fprintf (f, "#include \"sysdeps.h\"\n"); +#ifdef UAE + fprintf (f, "#include \"options.h\"\n"); + fprintf (f, "#include \"memory.h\"\n"); +#else + fprintf (f, "#include \"m68k.h\"\n"); + fprintf (f, "#include \"memory.h\"\n"); +#endif + fprintf (f, "#include \"readcpu.h\"\n"); + fprintf (f, "#include \"newcpu.h\"\n"); + fprintf (f, "#include \"comptbl.h\"\n"); + fprintf (f, "#include \"debug.h\"\n"); +} + +static int postfix; + + +#ifdef UAE +static char *decodeEA (amodes mode, wordsizes size) +{ + static char buffer[80]; + + buffer[0] = 0; + switch (mode){ + case Dreg: + strcpy (buffer,"Dn"); + break; + case Areg: + strcpy (buffer,"An"); + break; + case Aind: + strcpy (buffer,"(An)"); + break; + case Aipi: + strcpy (buffer,"(An)+"); + break; + case Apdi: + strcpy (buffer,"-(An)"); + break; + case Ad16: + strcpy (buffer,"(d16,An)"); + break; + case Ad8r: + strcpy (buffer,"(d8,An,Xn)"); + break; + case PC16: + strcpy (buffer,"(d16,PC)"); + break; + case PC8r: + strcpy (buffer,"(d8,PC,Xn)"); + break; + case absw: + strcpy (buffer,"(xxx).W"); + break; + case absl: + strcpy (buffer,"(xxx).L"); + break; + case imm: + switch (size){ + case sz_byte: + strcpy (buffer,"#.B"); + break; + case sz_word: + strcpy (buffer,"#.W"); + break; + case sz_long: + strcpy (buffer,"#.L"); + break; + default: + break; + } + break; + case imm0: + strcpy (buffer,"#.B"); + break; + case imm1: + strcpy (buffer,"#.W"); + break; + case imm2: + strcpy (buffer,"#.L"); + break; + case immi: + strcpy (buffer,"#"); + break; + + default: + break; + } + return buffer; +} + +static char *outopcode (int opcode) +{ + static char out[100]; + struct instr *ins; + int i; + + ins = &table68k[opcode]; + for (i = 0; lookuptab[i].name[0]; i++) { + if (ins->mnemo == lookuptab[i].mnemo) + break; + } + { + char *s = ua (lookuptab[i].name); + strcpy (out, s); + xfree (s); + } + if (ins->smode == immi) + strcat (out, "Q"); + if (ins->size == sz_byte) + strcat (out,".B"); + if (ins->size == sz_word) + strcat (out,".W"); + if (ins->size == sz_long) + strcat (out,".L"); + strcat (out," "); + if (ins->suse) + strcat (out, decodeEA (ins->smode, ins->size)); + if (ins->duse) { + if (ins->suse) strcat (out,","); + strcat (out, decodeEA (ins->dmode, ins->size)); + } + return out; +} +#endif + + +static void +generate_one_opcode (int rp, int noflags) +{ + int i; + uae_u16 smsk, dmsk; + unsigned int opcode = opcode_map[rp]; + int aborted=0; + int have_srcreg=0; + int have_dstreg=0; +#ifdef UAE + char *name; +#else + const char *name; +#endif + + if (table68k[opcode].mnemo == i_ILLG + || table68k[opcode].clev > cpu_level) + return; + + for (i = 0; lookuptab[i].name[0]; i++) + { + if (table68k[opcode].mnemo == lookuptab[i].mnemo) + break; + } + + if (table68k[opcode].handler != -1) + return; + + switch (table68k[opcode].stype) + { + case 0: + smsk = 7; + break; + case 1: + smsk = 255; + break; + case 2: + smsk = 15; + break; + case 3: + smsk = 7; + break; + case 4: + smsk = 7; + break; + case 5: + smsk = 63; + break; +#ifndef UAE + case 6: + smsk = 255; + break; +#endif + case 7: + smsk = 3; + break; + default: + smsk = 0; + assert(0); + } + dmsk = 7; + + next_cpu_level = -1; + if (table68k[opcode].suse + && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 + && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 + && table68k[opcode].smode != absw && table68k[opcode].smode != absl + && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16) + { + have_srcreg=1; + if (table68k[opcode].spos == -1) + { + if (((int) table68k[opcode].sreg) >= 128) + comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].sreg); + else + comprintf ("\tuae_s32 srcreg = %d;\n", (int) table68k[opcode].sreg); + } + else + { + char source[100]; + int pos = table68k[opcode].spos; + +#ifndef UAE + comprintf ("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + + if (pos < 8 && (smsk >> (8 - pos)) != 0) + sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf ("\tuae_u32 srcreg = %s;\n", source); + + comprintf ("#else\n"); +#endif + + if (pos) + sprintf (source, "((opcode >> %d) & %d)", pos, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf ("\tuae_s32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf ("\tuae_s32 srcreg = %s;\n", source); + +#ifndef UAE + comprintf ("#endif\n"); +#endif + } + } + if (table68k[opcode].duse + /* Yes, the dmode can be imm, in case of LINK or DBcc */ + && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 + && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 + && table68k[opcode].dmode != absw && table68k[opcode].dmode != absl) + { + have_dstreg=1; + if (table68k[opcode].dpos == -1) + { + if (((int) table68k[opcode].dreg) >= 128) + comprintf ("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].dreg); + else + comprintf ("\tuae_s32 dstreg = %d;\n", (int) table68k[opcode].dreg); + } + else + { + int pos = table68k[opcode].dpos; + +#ifndef UAE + comprintf ("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + comprintf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos ^ 8, dmsk); + else + comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + comprintf ("#else\n"); +#endif + + if (pos) + comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos, dmsk); + else + comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + +#ifndef UAE + comprintf ("#endif\n"); +#endif + } + } + + if (have_srcreg && have_dstreg && + (table68k[opcode].dmode==Areg || + table68k[opcode].dmode==Aind || + table68k[opcode].dmode==Aipi || + table68k[opcode].dmode==Apdi || + table68k[opcode].dmode==Ad16 || + table68k[opcode].dmode==Ad8r) && + (table68k[opcode].smode==Areg || + table68k[opcode].smode==Aind || + table68k[opcode].smode==Aipi || + table68k[opcode].smode==Apdi || + table68k[opcode].smode==Ad16 || + table68k[opcode].smode==Ad8r) + ) { + comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n"); + } + else { + comprintf("\tuae_u32 dodgy=0;\n"); + } + comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n"); + comprintf("\tm68k_pc_offset+=2;\n"); + + aborted=gen_opcode (opcode); + { + char flags[64 * 6]; + *flags = '\0'; + if (global_isjump) strcat(flags, "COMP_OPCODE_ISJUMP|"); + if (long_opcode) strcat(flags, "COMP_OPCODE_LONG_OPCODE|"); + if (global_cmov) strcat(flags, "COMP_OPCODE_CMOV|"); + if (global_isaddx) strcat(flags, "COMP_OPCODE_ISADDX|"); + if (global_iscjump) strcat(flags, "COMP_OPCODE_ISCJUMP|"); + if (global_fpu) strcat(flags, "COMP_OPCODE_USES_FPU|"); + if (*flags) + flags[strlen(flags) - 1] = '\0'; + else + strcpy(flags, "0"); + +#ifdef UAE + comprintf ("return 0;\n"); +#endif + comprintf ("}\n"); + +#ifdef UAE + name = ua (lookuptab[i].name); +#else + name = lookuptab[i].name; +#endif + if (aborted) { + fprintf (stblfile, "{ NULL, %u, %s }, /* %s */\n", opcode, flags, name); + com_discard(); + } else { + const char *tbl = noflags ? "nf" : "ff"; +#ifdef UAE + printf ("/* %s */\n", outopcode (opcode)); +#else + printf ("/* %s */\n", name); +#endif + fprintf (stblfile, "{ op_%x_%d_comp_%s, %u, %s }, /* %s */\n", opcode, postfix, tbl, opcode, flags, name); + fprintf (headerfile, "extern compop_func op_%x_%d_comp_%s;\n", opcode, postfix, tbl); + printf (RETTYPE " REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode)\n{\n", opcode, postfix, tbl); + com_flush(); + } +#ifdef UAE + xfree (name); +#endif + } + opcode_next_clev[rp] = next_cpu_level; + opcode_last_postfix[rp] = postfix; +} + +static void +generate_func (int noflags) +{ + int i, j, rp; + const char *tbl = noflags ? "nf" : "ff"; + + using_prefetch = 0; + using_exception_3 = 0; + for (i = 0; i < 1; i++) /* We only do one level! */ + { + cpu_level = NEXT_CPU_LEVEL - i; + postfix = i; + + fprintf (stblfile, "const struct comptbl op_smalltbl_%d_comp_%s[] = {\n", postfix, tbl); + + /* sam: this is for people with low memory (eg. me :)) */ + printf ("\n" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" + "\n" + "#define PART_1 1\n" + "#define PART_2 1\n" + "#define PART_3 1\n" + "#define PART_4 1\n" + "#define PART_5 1\n" + "#define PART_6 1\n" + "#define PART_7 1\n" + "#define PART_8 1\n" + "#endif\n\n"); +#ifdef UAE + printf ("extern void comp_fpp_opp();\n" + "extern void comp_fscc_opp();\n" + "extern void comp_fbcc_opp();\n\n"); +#endif + + rp = 0; + for (j = 1; j <= 8; ++j) + { + int k = (j * nr_cpuop_funcs) / 8; + printf ("#ifdef PART_%d\n", j); + for (; rp < k; rp++) + generate_one_opcode (rp,noflags); + printf ("#endif\n\n"); + } + + fprintf (stblfile, "{ 0, 65536, 0 }};\n"); + } + +} + +#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) +void cygwin_mingw_abort() +{ +#undef abort + abort(); +} +#endif + +int main(void) +{ + read_table68k (); + do_merges (); + + opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); + read_counts (); + + /* It would be a lot nicer to put all in one file (we'd also get rid of + * cputbl.h that way), but cpuopti can't cope. That could be fixed, but + * I don't dare to touch the 68k version. */ + + headerfile = fopen (GEN_PATH "comptbl.h", "wb"); + fprintf (headerfile, "" + "extern const struct comptbl op_smalltbl_0_comp_nf[];\n" + "extern const struct comptbl op_smalltbl_0_comp_ff[];\n" + ""); + + stblfile = fopen (GEN_PATH "compstbl.cpp", "wb"); + if (freopen (GEN_PATH "compemu.cpp", "wb", stdout) == NULL) { + abort(); + } + + generate_includes (stdout); + generate_includes (stblfile); + + printf("#include \"" JIT_PATH "compemu.h\"\n"); + + noflags=0; + generate_func (noflags); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); + read_counts (); + noflags=1; + generate_func (noflags); + + printf ("#endif\n"); + fprintf (stblfile, "#endif\n"); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + free (table68k); + fclose (stblfile); + fclose (headerfile); + return 0; +} + +#ifdef UAE +void write_log (const TCHAR *format,...) +{ +} +#endif diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c new file mode 100644 index 000000000..13e2776e6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c @@ -0,0 +1,4981 @@ +/* + * compiler/gencomp_arm2.c - MC680x0 compilation generator (ARM Adaption JIT v1 & JIT v2) + * + * Based on work Copyright 1995, 1996 Bernd Schmidt + * Changes for UAE-JIT Copyright 2000 Bernd Meyer + * + * Adaptation for ARAnyM/ARM, copyright 2001-2015 + * Milan Jurik, Jens Heitmann + * + * Basilisk II (C) 1997-2005 Christian Bauer + * + * 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 + * + * Notes + * ===== + * + * Advantages of JIT v2 + * - Processor independent style + * - Reduced overhead + * - Easier to understand / read + * - Easier to optimize + * - More precise flag handling + * - Better optimization for different CPU version ARM, ARMv6 etc.. + * + * Disadvantages of JIT v2 + * - Less generated + * - Requires more code implementation by hand (MidFunc) + * - MIDFUNCS are more CPU minded (closer to raw) + * - Separate code for each instruction (but this could be also an advantage, because you can concentrate on it) + * + * Additional note: + * - current using jnf_xxx calls for non-flag operations and + * jff_xxx for flag operations + * + * Still todo: + * - Optimize genamode, genastore, gen_writeXXX, gen_readXXX, genmovemXXX + * + */ + +#define CC_FOR_BUILD 1 +#include "sysconfig.h" + +#include "sysdeps.h" +#include "readcpu.h" + +#include +#include +#include +#include +#include +#include +#undef abort + +#define BOOL_TYPE "int" +#define failure global_failure=1 +#define FAILURE global_failure=1 +#define isjump global_isjump=1 +#define is_const_jump global_iscjump=1 +#define isaddx global_isaddx=1 +#define uses_cmov global_cmov=1 +#define mayfail global_mayfail=1 +#define uses_fpu global_fpu=1 + +int hack_opcode; + +static int global_failure; +static int global_isjump; +static int global_iscjump; +static int global_isaddx; +static int global_cmov; +static int long_opcode; +static int global_mayfail; +static int global_fpu; + +static char endstr[1000]; +static char lines[100000]; +static int comp_index = 0; + +#include "flags_arm.h" + +#ifndef __attribute__ +# ifndef __GNUC__ +# define __attribute__(x) +# endif +#endif + + +static int cond_codes[] = { // + NATIVE_CC_AL, -1, // + NATIVE_CC_HI, NATIVE_CC_LS, // + NATIVE_CC_CC, NATIVE_CC_CS, // + NATIVE_CC_NE, NATIVE_CC_EQ, // + NATIVE_CC_VC, NATIVE_CC_VS, // + NATIVE_CC_PL, NATIVE_CC_MI, // + NATIVE_CC_GE, NATIVE_CC_LT, // + NATIVE_CC_GT, NATIVE_CC_LE // + }; + +__attribute__((format(printf, 1, 2))) +static void comprintf(const char *format, ...) +{ + va_list args; + + va_start(args, format); + comp_index += vsprintf(lines + comp_index, format, args); + va_end(args); +} + +static void com_discard(void) +{ + comp_index = 0; +} + +static void com_flush(void) +{ + int i; + for (i = 0; i < comp_index; i++) + putchar(lines[i]); + com_discard(); +} + + +static FILE *headerfile; +static FILE *stblfile; + +static int using_prefetch; +static int using_exception_3; +static int cpu_level; +static int noflags; + +/* For the current opcode, the next lower level that will have different code. + * Initialized to -1 for each opcode. If it remains unchanged, indicates we + * are done with that opcode. */ +static int next_cpu_level; + +static int *opcode_map; +static int *opcode_next_clev; +static int *opcode_last_postfix; +static unsigned long *counts; + +static void read_counts(void) +{ + FILE *file; + unsigned long opcode, count, total; + char name[20]; + int nr = 0; + memset(counts, 0, 65536 * sizeof *counts); + + file = fopen("frequent.68k", "r"); + if (file) { + if (fscanf(file, "Total: %lu\n", &total) != 1) + { + assert(0); + } + while (fscanf(file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { + opcode_next_clev[nr] = 4; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + fclose(file); + } + if (nr == nr_cpuop_funcs) + return; + for (opcode = 0; opcode < 0x10000; opcode++) { + if (table68k[opcode].handler == -1 && table68k[opcode].mnemo != i_ILLG + && counts[opcode] == 0) { + opcode_next_clev[nr] = 4; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + } + assert (nr == nr_cpuop_funcs); +} + +static int n_braces = 0; +static int insn_n_cycles; + +static void start_brace(void) { + n_braces++; + comprintf("{"); +} + +static void close_brace(void) { + assert(n_braces > 0); + n_braces--; + comprintf("}"); +} + +static void finish_braces(void) { + while (n_braces > 0) + close_brace(); +} + +static inline void gen_update_next_handler(void) { + return; /* Can anything clever be done here? */ +} + +static void gen_writebyte(const char *address, const char *source) +{ + comprintf("\twritebyte(%s, %s, scratchie);\n", address, source); +} + +static void gen_writeword(const char *address, const char *source) +{ + comprintf("\twriteword(%s, %s, scratchie);\n", address, source); +} + +static void gen_writelong(const char *address, const char *source) +{ + comprintf("\twritelong(%s, %s, scratchie);\n", address, source); +} + +static void gen_readbyte(const char *address, const char* dest) +{ + comprintf("\treadbyte(%s, %s, scratchie);\n", address, dest); +} + +static void gen_readword(const char *address, const char *dest) +{ + comprintf("\treadword(%s,%s,scratchie);\n", address, dest); +} + +static void gen_readlong(const char *address, const char *dest) +{ + comprintf("\treadlong(%s, %s, scratchie);\n", address, dest); +} + +static const char * +gen_nextilong(void) { + static char buffer[80]; + + sprintf(buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)"); + insn_n_cycles += 4; + + long_opcode = 1; + return buffer; +} + +static const char * +gen_nextiword(void) { + static char buffer[80]; + + sprintf(buffer, "comp_get_iword((m68k_pc_offset+=2)-2)"); + insn_n_cycles += 2; + + long_opcode = 1; + return buffer; +} + +static const char * +gen_nextibyte(void) { + static char buffer[80]; + + sprintf(buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)"); + insn_n_cycles += 2; + + long_opcode = 1; + return buffer; +} + +#if defined(USE_JIT_FPU) +// Only used by FPU (future), get rid of unused warning +static void +swap_opcode (void) +{ + comprintf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + comprintf("\topcode = do_byteswap_16(opcode);\n"); + comprintf("#endif\n"); +} +#endif + +static void sync_m68k_pc(void) { + comprintf("\t if (m68k_pc_offset>SYNC_PC_OFFSET) sync_m68k_pc();\n"); +} + +/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, + * the calling routine handles Apdi and Aipi modes. + * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ +static void genamode(amodes mode, const char *reg, wordsizes size, const char *name, int getv, int movem) +{ + start_brace(); + switch (mode) + { + case Dreg: /* Do we need to check dodgy here? */ + assert (!movem); + if (getv == 1 || getv == 2) + { + /* We generate the variable even for getv==2, so we can use + it as a destination for MOVE */ + comprintf("\tint %s = %s;\n", name, reg); + } + return; + + case Areg: + assert (!movem); + if (getv == 1 || getv == 2) + { + /* see above */ + comprintf("\tint %s = dodgy ? scratchie++ : %s + 8;\n", name, reg); + if (getv == 1) + { + comprintf("\tif (dodgy) \n"); + comprintf("\t\tmov_l_rr(%s, %s + 8);\n", name, reg); + } + } + return; + + case Aind: + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, %s + 8);\n", name, reg); + break; + case Aipi: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_rr(%sa, %s + 8);\n", name, reg); + break; + case Apdi: + switch (size) + { + case sz_byte: + if (movem) + { + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, (uae_s32)-areg_byteinc[%s]);\n", reg, reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + case sz_word: + if (movem) + { + comprintf("\tint %sa=dodgy?scratchie++:%s+8;\n", name, reg); + comprintf("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, -2);\n", reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + case sz_long: + if (movem) + { + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } else + { + start_brace(); + comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); + comprintf("\tlea_l_brr(%s + 8, %s + 8, -4);\n", reg, reg); + comprintf("\tif (dodgy)\n"); + comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + } + break; + default: + assert(0); + break; + } + break; + case Ad16: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_rr(%sa, 8 + %s);\n", name, reg); + comprintf("\tlea_l_brr(%sa, %sa, (uae_s32)(uae_s16)%s);\n", name, name, gen_nextiword()); + break; + case Ad8r: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tcalc_disp_ea_020(%s + 8, %s, %sa, scratchie);\n", reg, gen_nextiword(), name); + break; + + case PC16: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); + comprintf("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword()); + comprintf("\tmov_l_ri(%sa, address + PC16off);\n", name); + break; + + case PC8r: + comprintf("\tint pctmp = scratchie++;\n"); + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); + start_brace(); + comprintf("\tmov_l_ri(pctmp,address);\n"); + + comprintf("\tcalc_disp_ea_020(pctmp, %s, %sa, scratchie);\n", gen_nextiword(), name); + break; + case absw: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_ri(%sa, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + break; + case absl: + comprintf("\tint %sa = scratchie++;\n", name); + comprintf("\tmov_l_ri(%sa, %s); /* absl */\n", name, gen_nextilong()); + break; + case imm: + assert (getv == 1); + switch (size) + { + case sz_byte: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); + break; + case sz_word: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + break; + case sz_long: + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); + break; + default: + assert(0); + break; + } + return; + case imm0: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); + return; + case imm1: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); + return; + case imm2: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); + return; + case immi: + assert (getv == 1); + comprintf("\tint %s = scratchie++;\n", name); + comprintf("\tmov_l_ri(%s, %s);\n", name, reg); + return; + default: + assert(0); + break; + } + + /* We get here for all non-reg non-immediate addressing modes to + * actually fetch the value. */ + if (getv == 1) + { + char astring[80]; + sprintf(astring, "%sa", name); + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + break; + case sz_word: + insn_n_cycles += 2; + break; + case sz_long: + insn_n_cycles += 4; + break; + default: + assert(0); + break; + } + start_brace(); + comprintf("\tint %s = scratchie++;\n", name); + switch (size) + { + case sz_byte: + gen_readbyte(astring, name); + break; + case sz_word: + gen_readword(astring, name); + break; + case sz_long: + gen_readlong(astring, name); + break; + default: + assert(0); + break; + } + } + + /* We now might have to fix up the register for pre-dec or post-inc + * addressing modes. */ + if (!movem) + { + switch (mode) + { + case Aipi: + switch (size) + { + case sz_byte: + comprintf("\tlea_l_brr(%s + 8,%s + 8, areg_byteinc[%s]);\n", reg, reg, reg); + break; + case sz_word: + comprintf("\tlea_l_brr(%s + 8, %s + 8, 2);\n", reg, reg); + break; + case sz_long: + comprintf("\tlea_l_brr(%s + 8, %s + 8, 4);\n", reg, reg); + break; + default: + assert(0); + break; + } + break; + case Apdi: + break; + default: + break; + } + } +} + +static void genastore(const char *from, amodes mode, const char *reg, wordsizes size, const char *to) +{ + switch (mode) + { + case Dreg: + switch (size) + { + case sz_byte: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_b_rr(%s, %s);\n", reg, from); + break; + case sz_word: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_w_rr(%s, %s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s != %s)\n", reg, from); + comprintf("\t\tmov_l_rr(%s, %s);\n", reg, from); + break; + default: + assert(0); + break; + } + break; + case Areg: + switch (size) + { + case sz_word: + comprintf("\tif(%s + 8 != %s)\n", reg, from); + comprintf("\t\tmov_w_rr(%s + 8, %s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s + 8 != %s)\n", reg, from); + comprintf("\t\tmov_l_rr(%s + 8, %s);\n", reg, from); + break; + default: + assert(0); + break; + } + break; + + case Apdi: + case absw: + case PC16: + case PC8r: + case Ad16: + case Ad8r: + case Aipi: + case Aind: + case absl: + { + char astring[80]; + sprintf(astring, "%sa", to); + + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + gen_writebyte(astring, from); + break; + case sz_word: + insn_n_cycles += 2; + gen_writeword(astring, from); + break; + case sz_long: + insn_n_cycles += 4; + gen_writelong(astring, from); + break; + default: + assert(0); + break; + } + } + break; + case imm: + case imm0: + case imm1: + case imm2: + case immi: + assert(0); + break; + default: + assert(0); + break; + } +} + +static void gen_move16(uae_u32 opcode, struct instr *curi) { +#if defined(USE_JIT2) + comprintf("\tint src=scratchie++;\n"); + comprintf("\tint dst=scratchie++;\n"); + + uae_u32 masked_op = (opcode & 0xfff8); + if (masked_op == 0xf620) { + // POSTINCREMENT SOURCE AND DESTINATION version + comprintf("\t uae_u16 dstreg = ((%s)>>12) & 0x07;\n", gen_nextiword()); + comprintf("\t jnf_MOVE(src, srcreg + 8);"); + comprintf("\t jnf_MOVE(dst, dstreg + 8);"); + comprintf("\t if (srcreg != dstreg)\n"); + comprintf("\t jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);"); + comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);"); + } else { + /* Other variants */ + genamode(curi->smode, "srcreg", curi->size, "src", 0, 2); + genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2); + switch (masked_op) { + case 0xf600: + comprintf("\t jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);"); + break; + case 0xf608: + comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);"); + break; + } + } + comprintf("\t jnf_MOVE16(dst, src);"); +#else + comprintf("\tint src=scratchie++;\n"); + comprintf("\tint dst=scratchie++;\n"); + + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword()); + comprintf("\tmov_l_rr(src,8+srcreg);\n"); + comprintf("\tmov_l_rr(dst,8+dstreg);\n"); + } else { + /* Other variants */ + genamode(curi->smode, "srcreg", curi->size, "src", 0, 2); + genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2); + comprintf("\tmov_l_rr(src,srca);\n"); + comprintf("\tmov_l_rr(dst,dsta);\n"); + } + + /* Align on 16-byte boundaries */ + comprintf("\tand_l_ri(src,~15);\n"); + comprintf("\tand_l_ri(dst,~15);\n"); + + if ((opcode & 0xfff8) == 0xf620) { + comprintf("\tif (srcreg != dstreg)\n"); + comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n"); + comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n"); + } else if ((opcode & 0xfff8) == 0xf600) + comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n"); + else if ((opcode & 0xfff8) == 0xf608) + comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n"); + + comprintf("\tint tmp=scratchie;\n"); + comprintf("\tscratchie+=4;\n"); + + comprintf("\tget_n_addr(src,src,scratchie);\n" + "\tget_n_addr(dst,dst,scratchie);\n" + "\tmov_l_rR(tmp+0,src,0);\n" + "\tmov_l_rR(tmp+1,src,4);\n" + "\tmov_l_rR(tmp+2,src,8);\n" + "\tmov_l_rR(tmp+3,src,12);\n" + "\tmov_l_Rr(dst,tmp+0,0);\n" + "\tforget_about(tmp+0);\n" + "\tmov_l_Rr(dst,tmp+1,4);\n" + "\tforget_about(tmp+1);\n" + "\tmov_l_Rr(dst,tmp+2,8);\n" + "\tforget_about(tmp+2);\n" + "\tmov_l_Rr(dst,tmp+3,12);\n"); +#endif +} + +static void genmovemel(uae_u16 opcode) { + comprintf("\tuae_u16 mask = %s;\n", gen_nextiword()); + comprintf("\tint native=scratchie++;\n"); + comprintf("\tint i;\n"); + comprintf("\tsigned char offset=0;\n"); + genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, + 1); + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch (table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rR(i,native,offset);\n" + "\t\t\tmid_bswap_32(i);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_w_rR(i,native,offset);\n" + "\t\t\tmid_bswap_16(i);\n" + "\t\t\tsign_extend_16_rr(i,i);\n" + "\t\t\toffset+=2;\n"); + break; + default: + assert(0); + break; + } + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Aipi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n"); + } +} + +static void genmovemle(uae_u16 opcode) { + comprintf("\tuae_u16 mask = %s;\n", gen_nextiword()); + comprintf("\tint native=scratchie++;\n"); + comprintf("\tint i;\n"); + comprintf("\tint tmp=scratchie++;\n"); + comprintf("\tsigned char offset=0;\n"); + genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, + 1); + + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + if (table68k[opcode].dmode != Apdi) { + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch (table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tmid_bswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tmid_bswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n" + "\t\t\toffset+=2;\n"); + break; + default: + assert(0); + break; + } + } else { /* Pre-decrement */ + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch (table68k[opcode].size) { + case sz_long: + comprintf("\t\t\toffset-=4;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tmid_bswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n"); + break; + case sz_word: + comprintf("\t\t\toffset-=2;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tmid_bswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n"); + break; + default: + assert(0); + break; + } + } + + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Apdi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n"); + } +} + +static void duplicate_carry(void) { + comprintf("\tif (needed_flags&FLAG_X) duplicate_carry();\n"); +} + +typedef enum { + flag_logical_noclobber, + flag_logical, + flag_add, + flag_sub, + flag_cmp, + flag_addx, + flag_subx, + flag_zn, + flag_av, + flag_sv, + flag_and, + flag_or, + flag_eor, + flag_mov +} flagtypes; + +#if !defined(USE_JIT2) +static void genflags(flagtypes type, wordsizes size, const char *value, const char *src, const char *dst) +{ + if (noflags) { + switch (type) { + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + comprintf("/* Weird --- CMP with noflags ;-) */\n"); + return; + case flag_add: + case flag_sub: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch (type) { + case flag_add: + op = "add"; + break; // nf + case flag_sub: + op = "sub"; + break; // nf + default: + assert(0); + break; + } + switch (size) { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n", op, dst, src); + break; + } + return; + } + break; + + case flag_and: + comprintf("\tdont_care_flags();\n"); + switch (size) { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); + comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); // nf + comprintf("\tarm_AND_l(%s,scratchie);\n", dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tarm_AND_b(%s,%s);\n", dst, src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); + comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); // nf + comprintf("\tarm_AND_l(%s,scratchie);\n", dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tarm_AND_w(%s,%s);\n", dst, src); + break; + case sz_long: + comprintf("\tarm_AND_l(%s,%s);\n", dst, src); + break; + } + return; + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + switch (size) { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); + comprintf("\tand_l_ri(%s,0xffffff00);\n", dst); // nf + comprintf("\tarm_ORR_l(%s,scratchie);\n", dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_b_rr(%s,%s);\n", dst, src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); + comprintf("\tand_l_ri(%s,0xffff0000);\n", dst); // nf + comprintf("\tarm_ORR_l(%s,scratchie);\n", dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_w_rr(%s,%s);\n", dst, src); + break; + case sz_long: + comprintf("\tmov_l_rr(%s,%s);\n", dst, src); + break; + } + return; + + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + const char* op; + switch (type) { + case flag_or: + op = "ORR"; + break; // nf + case flag_eor: + op = "EOR"; + break; // nf + default: + assert(0); + break; + } + switch (size) { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); + comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tarm_%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); + comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tarm_%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\tarm_%s_l(%s,%s);\n", op, dst, src); + break; + } + close_brace(); + return; + } + + case flag_addx: + case flag_subx: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch (type) { + case flag_addx: + op = "adc"; + break; + case flag_subx: + op = "sbb"; + break; + default: + assert(0); + break; + } + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n", op, dst, src); + break; + } + return; + } + break; + default: + return; + } + } + + /* Need the flags, but possibly not all of them */ + switch (type) { + case flag_logical_noclobber: + failure; + /* fall through */ + + case flag_and: + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + const char* op; + switch (type) { + case flag_and: + op = "and"; + break; + case flag_or: + op = "or"; + break; + case flag_eor: + op = "xor"; + break; + default: + assert(0); + break; + } + switch (size) { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n", op, dst, src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + switch (size) { + case sz_byte: + comprintf("\tif (%s!=%s) {\n", src, dst); + comprintf("\tmov_b_ri(%s,0);\n" + "\tstart_needflags();\n", dst); + comprintf("\tor_b(%s,%s);\n", dst, src); + comprintf("\t} else {\n"); + comprintf("\tmov_b_rr(%s,%s);\n", dst, src); + comprintf("\ttest_b_rr(%s,%s);\n", dst, dst); + comprintf("\t}\n"); + break; + case sz_word: + comprintf("\tif (%s!=%s) {\n", src, dst); + comprintf("\tmov_w_ri(%s,0);\n" + "\tstart_needflags();\n", dst); + comprintf("\tor_w(%s,%s);\n", dst, src); + comprintf("\t} else {\n"); + comprintf("\tmov_w_rr(%s,%s);\n", dst, src); + comprintf("\ttest_w_rr(%s,%s);\n", dst, dst); + comprintf("\t}\n"); + break; + case sz_long: + comprintf("\tif (%s!=%s) {\n", src, dst); + comprintf("\tmov_l_ri(%s,0);\n" + "\tstart_needflags();\n", dst); + comprintf("\tor_l(%s,%s);\n", dst, src); + comprintf("\t} else {\n"); + comprintf("\tmov_l_rr(%s,%s);\n", dst, src); + comprintf("\ttest_l_rr(%s,%s);\n", dst, dst); + comprintf("\t}\n"); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_logical: + comprintf("\tdont_care_flags();\n"); + start_brace(); + switch (size) { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\ttest_b_rr(%s,%s);\n", value, value); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\ttest_w_rr(%s,%s);\n", value, value); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\ttest_l_rr(%s,%s);\n", value, value); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + + case flag_add: + case flag_sub: + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch (type) { + case flag_add: + op = "add"; + break; + case flag_sub: + op = "sub"; + break; + case flag_cmp: + op = "cmp"; + break; + default: + assert(0); + break; + } + switch (size) { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n", op, dst, src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (type != flag_cmp) { + duplicate_carry(); + } + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + + return; + } + + case flag_addx: + case flag_subx: + uses_cmov; + comprintf("\tdont_care_flags();\n"); + { + const char* op; + switch (type) { + case flag_addx: + op = "adc"; + break; + case flag_subx: + op = "sbb"; + break; + default: + assert(0); + break; + } + start_brace(); + comprintf("\tint zero=scratchie++;\n" + "\tint one=scratchie++;\n" + "\tif (needed_flags&FLAG_Z) {\n" + "\tmov_l_ri(zero,0);\n" + "\tmov_l_ri(one,-1);\n" + "\tmake_flags_live();\n" + "\tcmov_l_rr(zero,one,%d);\n" + "\t}\n", NATIVE_CC_NE); + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n", op, dst, src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n", op, dst, src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n", op, dst, src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tif (needed_flags&FLAG_Z) {\n" + "\tcmov_l_rr(zero,one,%d);\n" + "\tset_zero(zero, one);\n" /* No longer need one */ + "\tlive_flags();\n" + "\t}\n", NATIVE_CC_NE); + comprintf("\tend_needflags();\n"); + duplicate_carry(); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + return; + } + default: + failure; + break; + } +} +#endif + +static void gen_abcd(uae_u32 opcode, struct instr *curi, const char* ssize) { +#if 0 +#else + (void) opcode; + (void) curi; + (void) ssize; + failure; + /* No BCD maths for me.... */ +#endif +} + +static void gen_add(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + // Use tmp register to avoid destroying upper part in .B., .W cases + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ADD_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_ADD(tmp,dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_add, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_adda(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\t jnf_ADDA_%s(dst, src);\n", ssize); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tsign_extend_8_rr(tmp,src);\n"); + break; + case sz_word: + comprintf("\tsign_extend_16_rr(tmp,src);\n"); + break; + case sz_long: + comprintf("\ttmp=src;\n"); + break; + default: + assert(0); + break; + } + comprintf("\tarm_ADD_l(dst,tmp);\n"); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#endif +} + +static void gen_addx(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + + // Use tmp register to avoid destroying upper part in .B., .W cases + comprintf("\t dont_care_flags();\n"); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ADDX_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_ADDX(tmp,dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + genflags(flag_addx, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_and(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + + comprintf("\t dont_care_flags();\n"); + comprintf("\t int tmp=scratchie++;\n"); + start_brace(); + if (!noflags) { + comprintf("\t jff_AND_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_AND(tmp,dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_and, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_andsr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ANDSR(ARM_CCR_MAP[src & 0xF], (src & 0x10));\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } +#else + (void) curi; + failure; + isjump; +#endif +} + +static void gen_asl(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\t dont_care_flags();\n"); + comprintf("\t int tmp=scratchie++;\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + + if (curi->smode != immi) { + if (!noflags) { + start_brace(); + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ASL_%s_reg(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + start_brace(); + comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n"); + } + } else { + start_brace(); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ASL_%s_imm(tmp,data,srcreg);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n"); + } + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) ssize; + + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + /* Except for the handling of the V flag, this is identical to + LSL. The handling of V is, uhm, unpleasant, so if it's needed, + let the normal emulation handle it. Shoulders of giants kinda + thing ;-) */ + comprintf("if (needed_flags & FLAG_V) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode != immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,7);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,15);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,31);\n"); + break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } + } else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); + break; + case sz_word: + comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); + break; + case sz_long: + comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); + break; + default: + assert(0); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } +#endif +} + +static void gen_aslw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ASLW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_ASLW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_asr(uae_u32 opcode, struct instr *curi, const char* ssize) { +#if defined(USE_JIT2) + (void)opcode; + + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\t dont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (curi->smode != immi) { + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ASR_%s_reg(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_ASR_%s_reg(tmp,data,cnt);\n", ssize); + } + } else { + char *op; + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + op = "ff"; + } else + op = "nf"; + + comprintf("\t j%s_ASR_%s_imm(tmp,data,srcreg);\n", op, ssize); + if (!noflags) { + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) opcode; + (void) ssize; + + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode != immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint width;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n" + "\tint highshift=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,cnt);\n" + "\thighmask=0x38;\n" + "\twidth=8;\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,cnt);\n" + "\thighmask=0x30;\n" + "\twidth=16;\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,cnt);\n" + "\thighmask=0x20;\n" + "\twidth=32;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(highshift,0);\n" + "mov_l_ri(scratchie,width/2);\n" + "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); + /* The x86 masks out bits, so we now make sure that things + really get shifted as much as planned */ + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,highshift);\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,highshift);\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,highshift);\n"); + break; + default: + assert(0); + break; + } + /* And again */ + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,highshift);\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,highshift);\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,highshift);\n"); + break; + default: + assert(0); + break; + } + + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(cdata,tmpcnt);\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(cdata,tmpcnt);\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(cdata,tmpcnt);\n"); + break; + default: + assert(0); + break; + } + /* If the shift count was higher than the width, we need + to pick up the sign from data */ + comprintf("test_l_ri(tmpcnt,highmask);\n" + "cmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint width;\n" + "\tint highshift=scratchie++;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,cnt);\n" + "\thighmask=0x38;\n" + "\twidth=8;\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,cnt);\n" + "\thighmask=0x30;\n" + "\twidth=16;\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,cnt);\n" + "\thighmask=0x20;\n" + "\twidth=32;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(highshift,0);\n" + "mov_l_ri(scratchie,width/2);\n" + "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); + /* The x86 masks out bits, so we now make sure that things + really get shifted as much as planned */ + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,highshift);\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,highshift);\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,highshift);\n"); + break; + default: + assert(0); + break; + } + /* And again */ + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_rr(data,highshift);\n"); + break; + case sz_word: + comprintf("\tshra_w_rr(data,highshift);\n"); + break; + case sz_long: + comprintf("\tshra_l_rr(data,highshift);\n"); + break; + default: + assert(0); + break; + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } + } else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshra_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + case sz_word: + comprintf("\tshra_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + case sz_long: + comprintf("\tshra_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + default: + assert(0); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } +#endif +} + +static void gen_asrw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ASRW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_ASRW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_bchg(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_BCHG_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_BCHG_%s(dst,src);\n", ssize); + comprintf("\t dont_care_flags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + comprintf("\tbtc_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n"); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_bclr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_BCLR_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_BCLR_%s(dst,src);\n", ssize); + comprintf("\t dont_care_flags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + comprintf("\tbtr_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n"); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_bset(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_BSET_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_BSET_%s(dst,src);\n", ssize); + comprintf("\t dont_care_flags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + comprintf("\tbts_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n"); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_btst(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + + // If we are not interested in flags it is not necessary to do + // anything with the data + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_BTST_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t dont_care_flags();\n"); + } +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + comprintf("\tbt_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n"); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } +#endif +} + +static void gen_clr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_CLR(tmp);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_CLR(tmp);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags(flag_logical, curi->size, "dst", "", ""); + genastore("dst", curi->smode, "srcreg", curi->size, "src"); +#endif +} + +static void gen_cmp(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\t dont_care_flags();\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_CMP_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("/* Weird --- CMP with noflags ;-) */\n"); + } +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + genflags(flag_cmp, curi->size, "", "src", "dst"); +#endif +} + +static void gen_cmpa(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + if (!noflags) { + comprintf("\t dont_care_flags();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_CMPA_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\tdont_care_flags();\n"); + comprintf("/* Weird --- CMP with noflags ;-) */\n"); + } +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tsign_extend_8_rr(tmps,src);\n"); + break; + case sz_word: + comprintf("\tsign_extend_16_rr(tmps,src);\n"); + break; + case sz_long: + comprintf("tmps=src;\n"); + break; + default: + assert(0); + break; + } + genflags(flag_cmp, sz_long, "", "tmps", "dst"); +#endif +} + +static void gen_dbcc(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if 0 + isjump; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); + + comprintf("uae_u32 voffs;\n"); + comprintf("voffs = get_const(offs);\n"); + /* That offs is an immediate, so we can clobber it with abandon */ + switch (curi->size) { + case sz_word: + comprintf("\t voffs = (uae_s32)((uae_s16)voffs);\n"); + break; + default: + assert(0); /* Seems this only comes in word flavour */ + break; + } + comprintf("\t voffs -= m68k_pc_offset - m68k_pc_offset_thisinst - 2;\n"); + comprintf("\t voffs += (uintptr)comp_pc_p + m68k_pc_offset;\n"); + + comprintf("\t add_const_v(PC_P, m68k_pc_offset);\n"); + comprintf("\t m68k_pc_offset = 0;\n"); + + start_brace(); + + if (curi->cc >= 2) { + comprintf("\t make_flags_live();\n"); /* Load the flags */ + } + + assert(curi->size == sz_word); + + switch (curi->cc) { + case 0: /* This is an elaborate nop? */ + break; + case 1: + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 8: + case 9: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\t start_needflags();\n"); + comprintf("\t jnf_DBcc(src,voffs,%d);\n", curi->cc); + comprintf("\t end_needflags();\n"); + break; + default: + assert(0); + break; + } + genastore("src", curi->smode, "srcreg", curi->size, "src"); + gen_update_next_handler(); +#else + isjump; + uses_cmov; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); + + /* That offs is an immediate, so we can clobber it with abandon */ + switch (curi->size) { + case sz_word: + comprintf("\tsign_extend_16_rr(offs,offs);\n"); + break; + default: + assert(0); /* Seems this only comes in word flavour */ + break; + } + comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + comprintf("\tarm_ADD_l_ri(offs,(uintptr)comp_pc_p);\n"); + /* New PC, + once the + offset_68k is + * also added */ + /* Let's fold in the m68k_pc_offset at this point */ + comprintf("\tarm_ADD_l_ri(offs,m68k_pc_offset);\n"); + comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + start_brace(); + comprintf("\tint nsrc=scratchie++;\n"); + + if (curi->cc >= 2) { + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + } + + assert (curi->size == sz_word); + + switch (curi->cc) { + case 0: /* This is an elaborate nop? */ + break; + case 1: + comprintf("\tstart_needflags();\n"); + comprintf("\tsub_w_ri(src,1);\n"); + comprintf("\t end_needflags();\n"); + start_brace(); + comprintf("\tuae_u32 v2,v;\n" + "\tuae_u32 v1=get_const(PC_P);\n"); + comprintf("\tv2=get_const(offs);\n" + "\tregister_branch(v1,v2,%d);\n", NATIVE_CC_CC); + break; + + case 8: + failure; + break; /* Work out details! FIXME */ + case 9: + failure; + break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmov_l_rr(nsrc,src);\n"); + comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n" + "\tmov_w_rr(src,scratchie);\n"); + comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", cond_codes[curi->cc]); + comprintf("\tcmov_l_rr(src,nsrc,%d);\n", cond_codes[curi->cc]); + /* OK, now for cc=true, we have src==nsrc and offs==PC_P, + so whether we move them around doesn't matter. However, + if cc=false, we have offs==jump_pc, and src==nsrc-1 */ + + comprintf("\t start_needflags();\n"); + comprintf("\ttest_w_rr(nsrc,nsrc);\n"); + comprintf("\t end_needflags();\n"); + comprintf("\tcmov_l_rr(PC_P,offs,%d);\n", NATIVE_CC_NE); + break; + default: + assert(0); + break; + } + genastore("src", curi->smode, "srcreg", curi->size, "src"); + gen_update_next_handler(); +#endif +} + +static void gen_eor(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t jff_EOR_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_EOR(tmp,dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_eor, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_eorsr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_EORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } +#else + (void) curi; + failure; + isjump; +#endif +} + +static void gen_exg(uae_u32 opcode, struct instr *curi, const char* ssize) { +#if 0 +#else + (void) opcode; + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tmov_l_rr(tmp,src);\n"); + genastore("dst", curi->smode, "srcreg", curi->size, "src"); + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_ext(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_EXT_%s(tmp,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_EXT_%s(tmp,src);\n", ssize); + } + genastore("tmp", curi->smode, "srcreg", + curi->size == sz_word ? sz_word : sz_long, "src"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + start_brace(); + switch (curi->size) { + case sz_byte: + comprintf("\tint dst = src;\n" + "\tsign_extend_8_rr(src,src);\n"); + break; + case sz_word: + comprintf("\tint dst = scratchie++;\n" + "\tsign_extend_8_rr(dst,src);\n"); + break; + case sz_long: + comprintf("\tint dst = src;\n" + "\tsign_extend_16_rr(src,src);\n"); + break; + default: + assert(0); + break; + } + genflags(flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "", + ""); + genastore("dst", curi->smode, "srcreg", + curi->size == sz_word ? sz_word : sz_long, "src"); +#endif +} + +static void gen_lsl(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + comprintf("\t int tmp=scratchie++;\n"); + if (curi->smode != immi) { + if (!noflags) { + start_brace(); + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_LSL_%s_reg(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + start_brace(); + comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n"); + } + } else { + start_brace(); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_LSL_%s_imm(tmp,data,srcreg);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n"); + } + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode != immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,7);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,15);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,31);\n"); + break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } + } else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); + break; + case sz_word: + comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); + break; + case sz_long: + comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); + break; + default: + assert(0); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } +#endif +} + +static void gen_lslw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_LSLW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_LSLW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_lsr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\t dont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + comprintf("\t int tmp=scratchie++;\n"); + if (curi->smode != immi) { + if (!noflags) { + start_brace(); + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_LSR_%s_reg(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + start_brace(); + comprintf("\t jnf_LSR_%s_reg(tmp,data,cnt);\n", ssize); + } + } else { + start_brace(); + char *op; + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + op = "ff"; + } else + op = "nf"; + + comprintf("\t j%s_LSR_%s_imm(tmp,data,srcreg);\n", op, ssize); + + if (!noflags) { + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) ssize; + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode != immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch (curi->size) { + case sz_byte: + comprintf("\tshrl_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshrl_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshrl_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshrl_b_rr(cdata,tmpcnt);\n"); + break; + case sz_word: + comprintf("\tshrl_w_rr(cdata,tmpcnt);\n"); + break; + case sz_long: + comprintf("\tshrl_l_rr(cdata,tmpcnt);\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshrl_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: + comprintf("\tshrl_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: + comprintf("\tshrl_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: + assert(0); + break; + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); + switch (curi->size) { + case sz_byte: + comprintf("\tmov_b_rr(data,scratchie);\n"); + break; + case sz_word: + comprintf("\tmov_w_rr(data,scratchie);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(data,scratchie);\n"); + break; + default: + assert(0); + break; + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } + } else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tshrl_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + case sz_word: + comprintf("\tshrl_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + case sz_long: + comprintf("\tshrl_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); + break; + default: + assert(0); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); + } +#endif +} + +static void gen_lsrw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_LSRW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_LSRW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_move(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + switch (curi->dmode) { + case Dreg: + case Areg: + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags && curi->dmode == Dreg) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_MOVE_%s(tmp, src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t tmp = src;\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); + break; + + default: /* It goes to memory, not a register */ + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_TST_%s(src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + } +#else + (void) ssize; + + switch (curi->dmode) { + case Dreg: + case Areg: + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags(flag_mov, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + default: /* It goes to memory, not a register */ + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags(flag_logical, curi->size, "src", "", ""); + genastore("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + } +#endif +} + +static void gen_movea(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + + start_brace(); + comprintf("\t jnf_MOVEA_%s(dst, src);\n", ssize); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#else + (void) ssize; + + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch (curi->size) { + case sz_word: + comprintf("\tsign_extend_16_rr(dst,src);\n"); + break; + case sz_long: + comprintf("\tmov_l_rr(dst,src);\n"); + break; + default: + assert(0); + break; + } + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#endif +} + +static void gen_mull(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t uae_u16 extra=%s;\n", gen_nextiword()); + comprintf("\t int r2=(extra>>12)&7;\n" + "\t int tmp=scratchie++;\n"); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + /* The two operands are in dst and r2 */ + if (!noflags) { + comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */ + comprintf("\t int r3=(extra & 7);\n"); + comprintf("\t mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ + comprintf("\t if (extra & 0x0800) { \n"); /* signed */ + comprintf("\t\t jff_MULS64(r2,r3);\n"); + comprintf("\t } else { \n"); + comprintf("\t\t jff_MULU64(r2,r3);\n"); + comprintf("\t } \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */ + comprintf("\t } else {\n"); /* Only want 32 bit result */ + /* operands in dst and r2, result goes into r2 */ + /* shouldn't matter whether it's signed or unsigned?!? */ + comprintf("\t if (extra & 0x0800) { \n"); /* signed */ + comprintf("\t jff_MULS32(r2,dst);\n"); + comprintf("\t } else { \n"); + comprintf("\t\t jff_MULU32(r2,dst);\n"); + comprintf("\t } \n"); /* The result is in r2, with r2 holding the lower 32 bits */ + comprintf("\t }\n"); + } else { + comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */ + comprintf("\t int r3=(extra & 7);\n"); + comprintf("\t mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ + comprintf("\t if (extra & 0x0800) { \n"); /* signed */ + comprintf("\t\t jnf_MULS64(r2,r3);\n"); + comprintf("\t } else { \n"); + comprintf("\t\t jnf_MULU64(r2,r3);\n"); + comprintf("\t } \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */ + comprintf("\t } else {\n"); /* Only want 32 bit result */ + /* operands in dst and r2, result foes into r2 */ + /* shouldn't matter whether it's signed or unsigned?!? */ + comprintf("\t if (extra & 0x0800) { \n"); /* signed */ + comprintf("\t jnf_MULS32(r2,dst);\n"); + comprintf("\t } else { \n"); + comprintf("\t\t jnf_MULU32(r2,dst);\n"); + comprintf("\t } \n"); /* The result is in r2, with r2 holding the lower 32 bits */ + comprintf("\t }\n"); + } +#else + if (!noflags) { + failure; + return; + } + comprintf("\tuae_u16 extra=%s;\n", gen_nextiword()); + comprintf("\tint r2=(extra>>12)&7;\n" + "\tint tmp=scratchie++;\n"); + + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + /* The two operands are in dst and r2 */ + comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ + "\tint r3=(extra&7);\n" + "\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ + comprintf("\tif (extra&0x0800) { \n" /* signed */ + "\t\timul_64_32(r2,r3);\n" + "\t} else { \n" + "\t\tmul_64_32(r2,r3);\n" + "\t} \n"); + /* The result is in r2/tmp, with r2 holding the lower 32 bits */ + comprintf("\t} else {\n"); /* Only want 32 bit result */ + /* operands in dst and r2, result foes into r2 */ + /* shouldn't matter whether it's signed or unsigned?!? */ + comprintf("\timul_32_32(r2,dst);\n" + "\t}\n"); +#endif +} + +static void gen_muls(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); + start_brace(); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_MULS(dst,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_MULS(dst,src);\n"); + } + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#else + comprintf("\tdont_care_flags();\n"); + genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); + comprintf("\tsign_extend_16_rr(scratchie,src);\n" + "\tsign_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags(flag_logical, sz_long, "dst", "", ""); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#endif +} + +static void gen_mulu(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); + start_brace(); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_MULU(dst,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_MULU(dst,src);\n"); + } + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#else + comprintf("\tdont_care_flags();\n"); + genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); + /* To do 16x16 unsigned multiplication, we actually use + 32x32 signed, and zero-extend the registers first. + That solves the problem of MUL needing dedicated registers + on the x86 */ + comprintf("\tzero_extend_16_rr(scratchie,src);\n" + "\tzero_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags(flag_logical, sz_long, "dst", "", ""); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); + +#endif +} + +static void gen_nbcd(uae_u32 opcode, struct instr *curi, const char* ssize) { +#if 0 +#else + (void) opcode; + (void) curi; + (void) ssize; + failure; + /* Nope! */ +#endif +} + +static void gen_neg(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_NEG_%s(tmp,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_NEG(tmp,src);\n"); + } + + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags(flag_sub, curi->size, "", "src", "dst"); + genastore("dst", curi->smode, "srcreg", curi->size, "src"); +#endif +} + +static void gen_negx(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int dst=scratchie++;\n"); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_NEGX_%s(dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_NEGX(dst,src);\n"); + } + + genastore("dst", curi->smode, "srcreg", curi->size, "src"); +#else + (void) ssize; + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags(flag_subx, curi->size, "", "src", "dst"); + genastore("dst", curi->smode, "srcreg", curi->size, "src"); +#endif +} + +static void gen_not(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_NOT_%s(tmp,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_NOT(tmp,src);\n", ssize); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0xffffffff);\n"); + genflags(flag_eor, curi->size, "", "src", "dst"); + genastore("dst", curi->smode, "srcreg", curi->size, "src"); +#endif +} + +static void gen_or(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + + comprintf("\t dont_care_flags();\n"); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t jff_OR_%s(tmp, dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_OR(tmp, dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_or, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_orsr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } +#else + (void) curi; + failure; + isjump; +#endif +} + +static void gen_rol(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROL_%s(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_ROL_%s(tmp,data,cnt);\n", ssize); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) ssize; + + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + + switch (curi->size) { + case sz_long: + comprintf("\t rol_l_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\t rol_w_rr(data,cnt);\n"); + break; + case sz_byte: + comprintf("\t rol_b_rr(data,cnt);\n"); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); +#endif +} + +static void gen_rolw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROLW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_ROLW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_ror(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROR_%s(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_ROR_%s(tmp,data,cnt);\n", ssize); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) ssize; + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + + switch (curi->size) { + case sz_long: + comprintf("\t ror_l_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\t ror_w_rr(data,cnt);\n"); + break; + case sz_byte: + comprintf("\t ror_b_rr(data,cnt);\n"); + break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch (curi->size) { + case sz_byte: + comprintf("\t test_b_rr(data,data);\n"); + break; + case sz_word: + comprintf("\t test_w_rr(data,data);\n"); + break; + case sz_long: + comprintf("\t test_l_rr(data,data);\n"); + break; + } + switch (curi->size) { + case sz_byte: + comprintf("\t bt_l_ri(data,0x07);\n"); + break; + case sz_word: + comprintf("\t bt_l_ri(data,0x0f);\n"); + break; + case sz_long: + comprintf("\t bt_l_ri(data,0x1f);\n"); + break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore("data", curi->dmode, "dstreg", curi->size, "data"); +#endif +} + +static void gen_rorw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_RORW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } else { + comprintf("\t jnf_RORW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_roxl(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + isaddx; + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROXL_%s(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + } else { + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_ROXL_%s(tmp,data,cnt);\n", ssize); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) curi; + (void) ssize; + failure; +#endif +} + +static void gen_roxlw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + isaddx; + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROXLW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + } else { + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_ROXLW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_roxr(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + mayfail; + if (curi->smode == Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + isaddx; + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace(); + comprintf("\t int tmp=scratchie++;\n"); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROXR_%s(tmp,data,cnt);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + } else { + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_ROXR_%s(tmp,data,cnt);\n", ssize); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); +#else + (void) curi; + failure; +#endif +} + +static void gen_roxrw(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + isaddx; + comprintf("\t dont_care_flags();\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\t int tmp = scratchie++;\n"); + + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_ROXRW(tmp,src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + } else { + comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_ROXRW(tmp,src);\n"); + } + genastore("tmp", curi->smode, "srcreg", curi->size, "src"); +#else + (void) curi; + failure; +#endif +} + +static void gen_sbcd(uae_u32 opcode, struct instr *curi, const char* ssize) { +#if 0 +#else + (void) opcode; + (void) curi; + (void) ssize; + failure; + /* I don't think so! */ +#endif +} + +static void gen_scc(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if 0 + genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace(); + comprintf("\t int val = scratchie++;\n"); + switch (curi->cc) { + case 0: /* Unconditional set */ + case 1: + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 8: + case 9: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\t make_flags_live();\n"); /* Load the flags */ + comprintf("\t jnf_Scc_ri(val,%d);\n", curi->cc); + break; + default: + assert(0); + break; + } + genastore("val", curi->smode, "srcreg", curi->size, "src"); +#else + genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace(); + comprintf("\tint val = scratchie++;\n"); + + /* We set val to 0 if we really should use 255, and to 1 for real 0 */ + switch (curi->cc) { + case 0: /* Unconditional set */ + comprintf("\tmov_l_ri(val,0);\n"); + break; + case 1: + /* Unconditional not-set */ + comprintf("\tmov_l_ri(val,1);\n"); + break; + case 8: + failure; + break; /* Work out details! FIXME */ + case 9: + failure; + break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + /* All condition codes can be inverted by changing the LSB */ + comprintf("\tsetcc(val,%d);\n", cond_codes[curi->cc] ^ 1); + break; + default: + assert(0); + break; + } + comprintf("\tsub_b_ri(val,1);\n"); + genastore("val", curi->smode, "srcreg", curi->size, "src"); +#endif +} + +static void gen_sub(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + + comprintf("\t dont_care_flags();\n"); + start_brace(); + // Use tmp register to avoid destroying upper part in .B., .W cases + comprintf("\t int tmp=scratchie++;\n"); + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_SUB_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf( + "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_SUB_%s(tmp,dst,src);\n", ssize); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_sub, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_suba(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\t jnf_SUBA_%s(dst, src);\n", ssize); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#else + (void) ssize; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch (curi->size) { + case sz_byte: + comprintf("\tsign_extend_8_rr(tmp,src);\n"); + break; + case sz_word: + comprintf("\tsign_extend_16_rr(tmp,src);\n"); + break; + case sz_long: + comprintf("\ttmp=src;\n"); + break; + default: + assert(0); + break; + } + comprintf("\tsub_l(dst,tmp);\n"); + genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); +#endif +} + +static void gen_subx(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; +#if defined(USE_JIT2) + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + comprintf("\tdont_care_flags();\n"); + if (!noflags) { + comprintf("\t make_flags_live();\n"); + comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ + comprintf("\t start_needflags();\n"); + comprintf("\t jff_SUBX_%s(tmp,dst,src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + duplicate_carry(); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ + comprintf("\t jnf_SUBX(tmp,dst,src);\n"); + } + genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); +#else + (void) ssize; + isaddx; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags(flag_subx, curi->size, "", "src", "dst"); + genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); +#endif +} + +static void gen_swap(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\t dont_care_flags();\n"); + start_brace(); + + if (!noflags) { + comprintf("\t start_needflags();\n"); + comprintf("\t jff_SWAP(src);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } else { + comprintf("\t jnf_SWAP(src);\n"); + } + genastore("src", curi->smode, "srcreg", sz_long, "src"); +#else + genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + comprintf("\tarm_ROR_l_ri8(src,16);\n"); + genflags(flag_logical, sz_long, "src", "", ""); + genastore("src", curi->smode, "srcreg", sz_long, "src"); +#endif +} + +static void gen_tst(uae_u32 opcode, struct instr *curi, const char* ssize) { + (void) opcode; + (void) ssize; +#if defined(USE_JIT2) + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + comprintf("\t dont_care_flags();\n"); + if (!noflags) { + start_brace(); + comprintf("\t start_needflags();\n"); + comprintf("\t jff_TST_%s(src);\n", ssize); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } +#else + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + genflags(flag_logical, curi->size, "src", "", ""); +#endif +} + +static int /* returns zero for success, non-zero for failure */ +gen_opcode(unsigned long int opcode) { + struct instr *curi = table68k + opcode; + const char* ssize = NULL; + + insn_n_cycles = 2; + global_failure = 0; + long_opcode = 0; + global_isjump = 0; + global_iscjump = 0; + global_isaddx = 0; + global_cmov = 0; + global_fpu = 0; + global_mayfail = 0; + hack_opcode = opcode; + endstr[0] = 0; + + start_brace(); + comprintf("\tuae_u8 scratchie=S1;\n"); + switch (curi->plev) { + case 0: /* not privileged */ + break; + case 1: /* unprivileged only on 68000 */ + if (cpu_level == 0) + break; + if (next_cpu_level < 0) + next_cpu_level = 0; + + /* fall through */ + case 2: /* priviledged */ + failure; /* Easy ones first */ + break; + case 3: /* privileged if size == word */ + if (curi->size == sz_byte) + break; + failure; + break; + } + switch (curi->size) { + case sz_byte: + ssize = "b"; + break; + case sz_word: + ssize = "w"; + break; + case sz_long: + ssize = "l"; + break; + default: + assert(0); + break; + } + (void) ssize; + + switch (curi->mnemo) { + case i_AND: + gen_and(opcode, curi, ssize); + break; + + case i_OR: + gen_or(opcode, curi, ssize); + break; + + case i_EOR: + gen_eor(opcode, curi, ssize); + break; + + case i_ORSR: + gen_orsr(opcode, curi, ssize); + break; + + case i_EORSR: + gen_eorsr(opcode, curi, ssize); + break; + + case i_ANDSR: + gen_andsr(opcode, curi, ssize); + break; + + case i_SUB: + gen_sub(opcode, curi, ssize); + break; + + case i_SUBA: + gen_suba(opcode, curi, ssize); + break; + + case i_SUBX: + gen_subx(opcode, curi, ssize); + break; + + case i_SBCD: + gen_sbcd(opcode, curi, ssize); + break; + + case i_ADD: + gen_add(opcode, curi, ssize); + break; + + case i_ADDA: + gen_adda(opcode, curi, ssize); + break; + + case i_ADDX: + gen_addx(opcode, curi, ssize); + break; + + case i_ABCD: + gen_abcd(opcode, curi, ssize); + break; + + case i_NEG: + gen_neg(opcode, curi, ssize); + break; + + case i_NEGX: + gen_negx(opcode, curi, ssize); + break; + + case i_NBCD: + gen_nbcd(opcode, curi, ssize); + break; + + case i_CLR: + gen_clr(opcode, curi, ssize); + break; + + case i_NOT: + gen_not(opcode, curi, ssize); + break; + + case i_TST: + gen_tst(opcode, curi, ssize); + break; + + case i_BCHG: + gen_bchg(opcode, curi, ssize); + break; + + case i_BCLR: + gen_bclr(opcode, curi, ssize); + break; + + case i_BSET: + gen_bset(opcode, curi, ssize); + break; + + case i_BTST: + gen_btst(opcode, curi, ssize); + break; + + case i_CMPM: + case i_CMP: + gen_cmp(opcode, curi, ssize); + break; + + case i_CMPA: + gen_cmpa(opcode, curi, ssize); + break; + + /* The next two are coded a little unconventional, but they are doing + * weird things... */ + case i_MVPRM: + isjump; + failure; + break; + + case i_MVPMR: + isjump; + failure; + break; + + case i_MOVE: + gen_move(opcode, curi, ssize); + break; + + case i_MOVEA: + gen_movea(opcode, curi, ssize); + break; + + case i_MVSR2: + isjump; + failure; + break; + + case i_MV2SR: + isjump; + failure; + break; + + case i_SWAP: + gen_swap(opcode, curi, ssize); + break; + + case i_EXG: + gen_exg(opcode, curi, ssize); + break; + + case i_EXT: + gen_ext(opcode, curi, ssize); + break; + + case i_MVMEL: + genmovemel(opcode); + break; + + case i_MVMLE: + genmovemle(opcode); + break; + + case i_TRAP: + isjump; + failure; + break; + + case i_MVR2USP: + isjump; + failure; + break; + + case i_MVUSP2R: + isjump; + failure; + break; + + case i_RESET: + isjump; + failure; + break; + + case i_NOP: + break; + + case i_STOP: + isjump; + failure; + break; + + case i_RTE: + isjump; + failure; + break; + + case i_RTD: + genamode(curi->smode, "srcreg", curi->size, "offs", 1, 0); + /* offs is constant */ + comprintf("\tarm_ADD_l_ri8(offs,4);\n"); + start_brace(); + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tarm_ADD_l(15,offs);\n"); + gen_update_next_handler(); + isjump; + break; + + case i_LINK: + genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); + comprintf("\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,src,scratchie);\n" + "\tmov_l_rr(src,15);\n"); + if (curi->size == sz_word) + comprintf("\tsign_extend_16_rr(offs,offs);\n"); + comprintf("\tarm_ADD_l(15,offs);\n"); + genastore("src", curi->smode, "srcreg", sz_long, "src"); + break; + + case i_UNLK: + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + comprintf("\tmov_l_rr(15,src);\n" + "\treadlong(15,src,scratchie);\n" + "\tarm_ADD_l_ri8(15,4);\n"); + genastore("src", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_RTS: + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tlea_l_brr(15,15,4);\n"); + gen_update_next_handler(); + isjump; + break; + + case i_TRAPV: + isjump; + failure; + break; + + case i_RTR: + isjump; + failure; + break; + + case i_JSR: + isjump; + genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); + start_brace(); + comprintf( + "\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + + case i_JMP: + isjump; + genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + + case i_BSR: + is_const_jump; + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf( + "\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset_thisinst+2);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + comprintf("\tarm_ADD_l(PC_P,src);\n"); + comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); + break; + + case i_Bcc: + comprintf("\tuae_u32 v,v1,v2;\n"); + genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); + /* That source is an immediate, so we can clobber it with abandon */ + switch (curi->size) { + case sz_byte: + comprintf("\tsign_extend_8_rr(src,src);\n"); + break; + case sz_word: + comprintf("\tsign_extend_16_rr(src,src);\n"); + break; + case sz_long: + break; + } + comprintf( + "\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + /* Leave the following as "add" --- it will allow it to be optimized + away due to src being a constant ;-) */ + comprintf("\tarm_ADD_l_ri(src,(uintptr)comp_pc_p);\n"); + comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n"); + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset);\n"); + comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + if (curi->cc >= 2) { + comprintf("\tv1=get_const(PC_P);\n" + "\tv2=get_const(src);\n" + "\tregister_branch(v1,v2,%d);\n", cond_codes[curi->cc]); + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + isjump; + } else { + is_const_jump; + } + + switch (curi->cc) { + case 0: /* Unconditional jump */ + comprintf("\tmov_l_rr(PC_P,src);\n"); + comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); + break; + case 1: + break; /* This is silly! */ + case 8: + failure; + break; /* Work out details! FIXME */ + case 9: + failure; + break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + break; + default: + assert(0); + break; + } + break; + + case i_LEA: + genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore("srca", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_PEA: + if (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind + || table68k[opcode].smode == Aipi + || table68k[opcode].smode == Apdi + || table68k[opcode].smode == Ad16 + || table68k[opcode].smode == Ad8r) + comprintf("if (srcreg==7) dodgy=1;\n"); + + genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode(Apdi, "7", sz_long, "dst", 2, 0); + genastore("srca", Apdi, "7", sz_long, "dst"); + break; + + case i_DBcc: + gen_dbcc(opcode, curi, ssize); + break; + + case i_Scc: + gen_scc(opcode, curi, ssize); + break; + + case i_DIVU: + isjump; + failure; + break; + + case i_DIVS: + isjump; + failure; + break; + + case i_MULU: + gen_mulu(opcode, curi, ssize); + break; + + case i_MULS: + gen_muls(opcode, curi, ssize); + break; + + case i_CHK: + isjump; + failure; + break; + + case i_CHK2: + isjump; + failure; + break; + + case i_ASR: + gen_asr(opcode, curi, ssize); + break; + + case i_ASL: + gen_asl(opcode, curi, ssize); + break; + + case i_LSR: + gen_lsr(opcode, curi, ssize); + break; + + case i_LSL: + gen_lsl(opcode, curi, ssize); + break; + + case i_ROL: + gen_rol(opcode, curi, ssize); + break; + + case i_ROR: + gen_ror(opcode, curi, ssize); + break; + + case i_ROXL: + gen_roxl(opcode, curi, ssize); + break; + + case i_ROXR: + gen_roxr(opcode, curi, ssize); + break; + + case i_ASRW: + gen_asrw(opcode, curi, ssize); + break; + + case i_ASLW: + gen_aslw(opcode, curi, ssize); + break; + + case i_LSRW: + gen_lsrw(opcode, curi, ssize); + break; + + case i_LSLW: + gen_lslw(opcode, curi, ssize); + break; + + case i_ROLW: + gen_rolw(opcode, curi, ssize); + break; + + case i_RORW: + gen_rorw(opcode, curi, ssize); + break; + + case i_ROXLW: + gen_roxlw(opcode, curi, ssize); + break; + + case i_ROXRW: + gen_roxrw(opcode, curi, ssize); + break; + + case i_MOVEC2: + isjump; + failure; + break; + + case i_MOVE2C: + isjump; + failure; + break; + + case i_CAS: + failure; + break; + + case i_CAS2: + failure; + break; + + case i_MOVES: + /* ignore DFC and SFC because we have no MMU */ + isjump; + failure; + break; + + case i_BKPT: + /* only needed for hardware emulators */ + isjump; + failure; + break; + + case i_CALLM: + /* not present in 68030 */ + isjump; + failure; + break; + + case i_RTM: + /* not present in 68030 */ + isjump; + failure; + break; + + case i_TRAPcc: + isjump; + failure; + break; + + case i_DIVL: + isjump; + failure; + break; + + case i_MULL: + gen_mull(opcode, curi, ssize); + break; + + case i_BFTST: + case i_BFEXTU: + case i_BFCHG: + case i_BFEXTS: + case i_BFCLR: + case i_BFFFO: + case i_BFSET: + case i_BFINS: + failure; + break; + case i_PACK: + failure; + break; + case i_UNPK: + failure; + break; + case i_TAS: + failure; + break; + case i_FPP: + uses_fpu; +#ifdef USE_JIT_FPU + mayfail; + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fpp_opp(opcode,extra);\n"); +#else + failure; +#endif + break; + case i_FBcc: + uses_fpu; +#ifdef USE_JIT_FPU + isjump; + uses_cmov; + mayfail; + swap_opcode(); + comprintf("\tcomp_fbcc_opp(opcode);\n"); +#else + isjump; + failure; +#endif + break; + case i_FDBcc: + uses_fpu; + isjump; + failure; + break; + case i_FScc: + uses_fpu; +#ifdef USE_JIT_FPU + mayfail; + uses_cmov; + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fscc_opp(opcode,extra);\n"); +#else + failure; +#endif + break; + case i_FTRAPcc: + uses_fpu; + isjump; + failure; + break; + case i_FSAVE: + uses_fpu; + failure; + break; + case i_FRESTORE: + uses_fpu; + failure; + break; + + case i_CINVL: + case i_CINVP: + case i_CINVA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + comprintf("\tflush_icache();\n"); /* Differentiate a bit more? */ + break; + case i_CPUSHL: + case i_CPUSHP: + case i_CPUSHA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + break; + + case i_MOVE16: + gen_move16(opcode, curi); + break; + + case i_EMULOP_RETURN: + isjump; + failure; + break; + + case i_EMULOP: + failure; + break; + + case i_NATFEAT_ID: + case i_NATFEAT_CALL: + failure; + break; + + case i_MMUOP: + isjump; + failure; + break; + default: + assert(0); + break; + } + comprintf("%s", endstr); + finish_braces(); + sync_m68k_pc(); + if (global_mayfail) + comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); + return global_failure; +} + +static void generate_includes(FILE * f) { + fprintf(f, "#include \"sysdeps.h\"\n"); + fprintf(f, "#include \"m68k.h\"\n"); + fprintf(f, "#include \"memory.h\"\n"); + fprintf(f, "#include \"readcpu.h\"\n"); + fprintf(f, "#include \"newcpu.h\"\n"); + fprintf(f, "#include \"comptbl.h\"\n"); + fprintf(f, "#include \"debug.h\"\n"); +} + +static int postfix; + +static void generate_one_opcode(int rp, int noflags) { + int i; + uae_u16 smsk, dmsk; + int opcode = opcode_map[rp]; + int aborted = 0; + int have_srcreg = 0; + int have_dstreg = 0; + const char *name; + + if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) + return; + + for (i = 0; lookuptab[i].name[0]; i++) { + if (table68k[opcode].mnemo == lookuptab[i].mnemo) + break; + } + + if (table68k[opcode].handler != -1) + return; + + switch (table68k[opcode].stype) { + case 0: + smsk = 7; + break; + case 1: + smsk = 255; + break; + case 2: + smsk = 15; + break; + case 3: + smsk = 7; + break; + case 4: + smsk = 7; + break; + case 5: + smsk = 63; + break; + case 6: + smsk = 255; + break; + case 7: + smsk = 3; + break; + default: + assert(0); + break; + } + dmsk = 7; + + next_cpu_level = -1; + if (table68k[opcode].suse && table68k[opcode].smode != imm + && table68k[opcode].smode != imm0 && table68k[opcode].smode != imm1 + && table68k[opcode].smode != imm2 && table68k[opcode].smode != absw + && table68k[opcode].smode != absl && table68k[opcode].smode != PC8r + && table68k[opcode].smode != PC16) { + have_srcreg = 1; + if (table68k[opcode].spos == -1) { + if (((int) table68k[opcode].sreg) >= 128) + comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n", + (int) table68k[opcode].sreg); + else + comprintf("\tuae_s32 srcreg = %d;\n", + (int) table68k[opcode].sreg); + } else { + char source[100]; + int pos = table68k[opcode].spos; + + comprintf( + "#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + + if (pos < 8 && (smsk >> (8 - pos)) != 0) + sprintf(source, "(((opcode >> %d) | (opcode << %d)) & %d)", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + sprintf(source, "((opcode >> %d) & %d)", pos ^ 8, smsk); + else + sprintf(source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf("\tuae_u32 srcreg = %s;\n", source); + + comprintf("#else\n"); + + if (pos) + sprintf(source, "((opcode >> %d) & %d)", pos, smsk); + else + sprintf(source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf("\tuae_s32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf("\tuae_s32 srcreg = %s;\n", source); + + comprintf("#endif\n"); + } + } + if (table68k[opcode].duse + /* Yes, the dmode can be imm, in case of LINK or DBcc */ + && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 + && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 + && table68k[opcode].dmode != absw + && table68k[opcode].dmode != absl) { + have_dstreg = 1; + if (table68k[opcode].dpos == -1) { + if (((int) table68k[opcode].dreg) >= 128) + comprintf("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n", + (int) table68k[opcode].dreg); + else + comprintf("\tuae_s32 dstreg = %d;\n", + (int) table68k[opcode].dreg); + } else { + int pos = table68k[opcode].dpos; + + comprintf( + "#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + comprintf( + "\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos ^ 8, + dmsk); + else + comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + comprintf("#else\n"); + + if (pos) + comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos, + dmsk); + else + comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + comprintf("#endif\n"); + } + } + + if (have_srcreg && have_dstreg + && (table68k[opcode].dmode == Areg || table68k[opcode].dmode == Aind + || table68k[opcode].dmode == Aipi + || table68k[opcode].dmode == Apdi + || table68k[opcode].dmode == Ad16 + || table68k[opcode].dmode == Ad8r) + && (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind + || table68k[opcode].smode == Aipi + || table68k[opcode].smode == Apdi + || table68k[opcode].smode == Ad16 + || table68k[opcode].smode == Ad8r)) { + comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n"); + } else { + comprintf("\tuae_u32 dodgy=0;\n"); + } + comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n"); + comprintf("\tm68k_pc_offset+=2;\n"); + + aborted = gen_opcode(opcode); + { + int flags = 0; + if (global_isjump) + flags |= 1; + if (long_opcode) + flags |= 2; + if (global_cmov) + flags |= 4; + if (global_isaddx) + flags |= 8; + if (global_iscjump) + flags |= 16; + if (global_fpu) + flags |= 32; + + comprintf("}\n"); + + name = lookuptab[i].name; + if (aborted) { + fprintf(stblfile, "{ NULL, 0x%08x, %d }, /* %s */\n", opcode, flags, name); + com_discard(); + } else { + const char *tbl = noflags ? "nf" : "ff"; + fprintf(stblfile, + "{ op_%x_%d_comp_%s, %d, 0x%08x }, /* %s */\n", + opcode, postfix, tbl, opcode, flags, name); + fprintf(headerfile, "extern compop_func op_%x_%d_comp_%s;\n", + opcode, postfix, tbl); + printf( + "void REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode) /* %s */\n{\n", + opcode, postfix, tbl, name); + com_flush(); + } + } + opcode_next_clev[rp] = next_cpu_level; + opcode_last_postfix[rp] = postfix; +} + +static void generate_func(int noflags) { + int i, j, rp; + const char *tbl = noflags ? "nf" : "ff"; + + using_prefetch = 0; + using_exception_3 = 0; + for (i = 0; i < 1; i++) /* We only do one level! */ + { + cpu_level = 4 - i; + postfix = i; + + fprintf(stblfile, "const struct comptbl op_smalltbl_%d_comp_%s[] = {\n", + postfix, tbl); + + /* sam: this is for people with low memory (eg. me :)) */ + printf("\n" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" + "\n" + "#define PART_1 1\n" + "#define PART_2 1\n" + "#define PART_3 1\n" + "#define PART_4 1\n" + "#define PART_5 1\n" + "#define PART_6 1\n" + "#define PART_7 1\n" + "#define PART_8 1\n" + "#endif\n\n"); + + rp = 0; + for (j = 1; j <= 8; ++j) { + int k = (j * nr_cpuop_funcs) / 8; + printf("#ifdef PART_%d\n", j); + for (; rp < k; rp++) + generate_one_opcode(rp, noflags); + printf("#endif\n\n"); + } + + fprintf(stblfile, "{ 0, 65536, 0 }};\n"); + } + +} + +#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) +void cygwin_mingw_abort() +{ +#undef abort + abort(); +} +#endif + +int main(void) +{ + read_table68k(); + do_merges(); + + opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc(65536 * sizeof(unsigned long)); + read_counts(); + + /* It would be a lot nicer to put all in one file (we'd also get rid of + * cputbl.h that way), but cpuopti can't cope. That could be fixed, but + * I don't dare to touch the 68k version. */ + + headerfile = fopen("comptbl.h", "wb"); + fprintf (headerfile, "" + "extern const struct comptbl op_smalltbl_0_comp_nf[];\n" + "extern const struct comptbl op_smalltbl_0_comp_ff[];\n" + ""); + + stblfile = fopen("compstbl.cpp", "wb"); + if (freopen("compemu.cpp", "wb", stdout) == NULL) + { + assert(0); + } + + generate_includes(stdout); + generate_includes(stblfile); + + printf("#include \"compiler/compemu.h\"\n"); + + noflags = 0; + generate_func(noflags); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc(65536 * sizeof(unsigned long)); + read_counts(); + noflags = 1; + generate_func(noflags); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + free(table68k); + fclose(stblfile); + fclose(headerfile); + return 0; +} diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c b/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c new file mode 100644 index 000000000..227a99d30 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c @@ -0,0 +1,264 @@ +/* Example of using sigaction() to setup a signal handler with 3 arguments + * including siginfo_t. + */ +#include +#include +#include +#include + +#include "flags_arm.h" +#include "codegen_arm.h" + +#define TEST(c,ex,s) { c; if (opcode != ex) printf("(%s) Invalid opcode %x expected %x\n", s, opcode, ex); } + +int opcode; + +void emit_long(v) { + opcode = v; +} + +int main (int argc, char *argv[]) +{ +TEST(MOV_ri(8, 15), 0xe3a0800f, "mov r8,#15"); +TEST(MOV_rr(8,9), 0xe1a08009, "mov r8, r9"); +TEST(MOV_rrLSLi(8,9,5), 0xe1a08289, "lsl r8, r9, #5"); +TEST(MOV_rrLSLr(8,9,7), 0xe1a08719, "lsl r8, r9, r7"); +TEST(MOV_rrLSRi(8,9,5), 0xe1a082a9, "lsr r8, r9, #5"); +TEST(MOV_rrLSRr(8,9,7), 0xe1a08739, "lsr r8, r9, r7"); +TEST(MOV_rrASRi(8,9,5), 0xe1a082c9, "asr r8, r9, #5"); +TEST(MOV_rrASRr(8,9,7), 0xe1a08759, "asr r8, r9, r7"); +TEST(MOV_rrRORi(8,9,5), 0xe1a082e9, "ror r8, r9, #5"); +TEST(MOV_rrRORr(8,9,7), 0xe1a08779, "ror r8, r9, r7"); +TEST(MOV_rrRRX(8,9), 0xe1a08069, "rrx r8, r9"); + +TEST(MOVS_ri(8, 15), 0xe3b0800f, "movs r8,#15"); +TEST(MOVS_rr(8,9), 0xe1b08009, "movs r8, r9"); +TEST(MOVS_rrLSLi(8,9,5), 0xe1b08289, "lsls r8, r9, #5"); +TEST(MOVS_rrLSLr(8,9,7), 0xe1b08719, "lsls r8, r9, r7"); +TEST(MOVS_rrLSRi(8,9,5), 0xe1b082a9, "lsrs r8, r9, #5"); +TEST(MOVS_rrLSRr(8,9,7), 0xe1b08739, "lsrs r8, r9, r7"); +TEST(MOVS_rrASRi(8,9,5), 0xe1b082c9, "asrs r8, r9, #5"); +TEST(MOVS_rrASRr(8,9,7), 0xe1b08759, "asrs r8, r9, r7"); +TEST(MOVS_rrRORi(8,9,5), 0xe1b082e9, "rors r8, r9, #5"); +TEST(MOVS_rrRORr(8,9,7), 0xe1b08779, "rors r8, r9, r7"); +TEST(MOVS_rrRRX(8,9), 0xe1b08069, "rrxs r8, r9"); + +TEST(MVN_ri(8, 15), 0xe3e0800f, "mvn r8,#15"); +TEST(MVN_rr(8,9), 0xe1e08009, "mvn r8, r9"); +TEST(MVN_rrLSLi(8,9,5), 0xe1e08289, "mvn r8, r9, lsl #5"); +TEST(MVN_rrLSLr(8,9,7), 0xe1e08719, "mvn r8, r9, lsl r7"); +TEST(MVN_rrLSRi(8,9,5), 0xe1e082a9, "mvn r8, r9, lsr #5"); +TEST(MVN_rrLSRr(8,9,7), 0xe1e08739, "mvn r8, r9, lsr r7"); +TEST(MVN_rrASRi(8,9,5), 0xe1e082c9, "mvn r8, r9, asr #5"); +TEST(MVN_rrASRr(8,9,7), 0xe1e08759, "mvn r8, r9, asr r7"); +TEST(MVN_rrRORi(8,9,5), 0xe1e082e9, "mvn r8, r9, ror #5"); +TEST(MVN_rrRORr(8,9,7), 0xe1e08779, "mvn r8, r9, ror r7"); +TEST(MVN_rrRRX(8,9), 0xe1e08069, "mvn r8, r9, rrx"); + +TEST(CMP_ri(8, 15), 0xe358000f, "cmp r8,#15"); +TEST(CMP_rr(8,9), 0xe1580009, "cmp r8, r9"); +TEST(CMP_rrLSLi(8,9,5), 0xe1580289, "cmp r8, r9, #5"); +TEST(CMP_rrLSLr(8,9,7), 0xe1580719, "cmp r8, r9, r7"); +TEST(CMP_rrLSRi(8,9,5), 0xe15802a9, "cmp r8, r9, #5"); +TEST(CMP_rrLSRr(8,9,7), 0xe1580739, "cmp r8, r9, r7"); +TEST(CMP_rrASRi(8,9,5), 0xe15802c9, "cmp r8, r9, #5"); +TEST(CMP_rrASRr(8,9,7), 0xe1580759, "cmp r8, r9, r7"); +TEST(CMP_rrRORi(8,9,5), 0xe15802e9, "cmp r8, r9, #5"); +TEST(CMP_rrRORr(8,9,7), 0xe1580779, "cmp r8, r9, r7"); +TEST(CMP_rrRRX(8,9), 0xe1580069, "cmp r8, r9"); + +TEST(CMP_ri(8, 0x81), 0xe3580081, "cmp r8,#0x81"); +TEST(CMP_ri(8, 0x204), 0xe3580f81, "cmp r8,#0x204"); +TEST(CMP_ri(8, 0x810), 0xe3580e81, "cmp r8,#0x8100"); +TEST(CMP_ri(8, 0x2040), 0xe3580d81, "cmp r8,#0x2040"); +TEST(CMP_ri(8, 0x8100), 0xe3580c81, "cmp r8,#0x8100"); +TEST(CMP_ri(8, 0x20400), 0xe3580b81, "cmp r8,#0x20400"); +TEST(CMP_ri(8, 0x81000), 0xe3580a81, "cmp r8,#0x81000"); +TEST(CMP_ri(8, 0x204000), 0xe3580981, "cmp r8,#0x204000"); +TEST(CMP_ri(8, 0x810000), 0xe3580881, "cmp r8,#0x810000"); +TEST(CMP_ri(8, 0x2040000), 0xe3580781, "cmp r8,#0x2040000"); +TEST(CMP_ri(8, 0x8100000), 0xe3580681, "cmp r8,#0x8100000"); +TEST(CMP_ri(8, 0x20400000), 0xe3580581, "cmp r8,#0x20400000"); +TEST(CMP_ri(8, 0x81000000), 0xe3580481, "cmp r8,#0x81000000"); +TEST(CMP_ri(8, 0x04000002), 0xe3580381, "cmp r8,#0x04000002"); +TEST(CMP_ri(8, 0x10000008), 0xe3580281, "cmp r8,#0x10000008"); +TEST(CMP_ri(8, 0x40000020), 0xe3580181, "cmp r8,#0x40000020"); + +TEST(CMP_ri(8, 0x1200), 0xe3580c12, "cmp r8,#0x1200"); +TEST(CMP_ri(8, 0x120000), 0xe3580812, "cmp r8,#0x120000"); +TEST(CMP_ri(8, 0x12000000), 0xe3580412, "cmp r8,#0x12000000"); + +TEST(BEQ_i(5), 0x0a000005, "beq #5"); +TEST(BNE_i(5), 0x1a000005, "bne #5"); +TEST(BCS_i(5), 0x2a000005, "bcs #5"); +TEST(BCC_i(5), 0x3a000005, "bcc #5"); +TEST(BMI_i(5), 0x4a000005, "bmi #5"); +TEST(BPL_i(5), 0x5a000005, "bpl #5"); +TEST(BVS_i(5), 0x6a000005, "bvs #5"); +TEST(BVC_i(5), 0x7a000005, "bvc #5"); +TEST(BHI_i(5), 0x8a000005, "bhi #5"); +TEST(BLS_i(5), 0x9a000005, "bls #5"); +TEST(BGE_i(5), 0xaa000005, "bge #5"); +TEST(BLT_i(5), 0xba000005, "blt #5"); +TEST(BGT_i(5), 0xca000005, "bgt #5"); +TEST(BLE_i(5), 0xda000005, "ble #5"); +TEST(B_i(5), 0xea000005, "b #5"); + +TEST(BL_i(5), 0xeb000005, "bl #5"); +TEST(BLX_r(8), 0xe12fff38, "blx r8"); +TEST(BX_r(8), 0xe12fff18, "bx r8"); + +TEST(EOR_rri(6, 8, 15), 0xe228600f, "eor r6, r8,#15"); +TEST(EOR_rrr(6, 8,9), 0xe0286009, "eor r6, r8, r9"); +TEST(EOR_rrrLSLi(6,8,9,5), 0xe0286289, "eor r6, r8, r9, lsl #5"); +TEST(EOR_rrrLSLr(6,8,9,7), 0xe0286719, "eor r6, r8, r9, lsl r7"); +TEST(EOR_rrrLSRi(6,8,9,5), 0xe02862a9, "eor r6, r8, r9, lsr #5"); +TEST(EOR_rrrLSRr(6,8,9,7), 0xe0286739, "eor r6, r8, r9, lsr r7"); +TEST(EOR_rrrASRi(6,8,9,5), 0xe02862c9, "eor r6, r8, r9, asr #5"); +TEST(EOR_rrrASRr(6,8,9,7), 0xe0286759, "eor r6, r8, r9, asr r7"); +TEST(EOR_rrrRORi(6,8,9,5), 0xe02862e9, "eor r6, r8, r9, ror #5"); +TEST(EOR_rrrRORr(6,8,9,7), 0xe0286779, "eor r6, r8, r9, ror r7"); +TEST(EOR_rrrRRX(6,8,9), 0xe0286069, "eor r6, r8, r9, rrx"); + +TEST(EORS_rri(6, 8, 15), 0xe238600f, "eors r6, r8,#15"); +TEST(EORS_rrr(6, 8,9), 0xe0386009, "eors r6, r8, r9"); +TEST(EORS_rrrLSLi(6,8,9,5), 0xe0386289, "eors r6, r8, r9, lsl #5"); +TEST(EORS_rrrLSLr(6,8,9,7), 0xe0386719, "eors r6, r8, r9, lsr r7"); +TEST(EORS_rrrLSRi(6,8,9,5), 0xe03862a9, "eors r6, r8, r9, lsr #5"); +TEST(EORS_rrrLSRr(6,8,9,7), 0xe0386739, "eors r6, r8, r9, lsr r7"); +TEST(EORS_rrrASRi(6,8,9,5), 0xe03862c9, "eors r6, r8, r9, asr #5"); +TEST(EORS_rrrASRr(6,8,9,7), 0xe0386759, "eors r6, r8, r9, asr r7"); +TEST(EORS_rrrRORi(6,8,9,5), 0xe03862e9, "eors r6, r8, r9, ror #5"); +TEST(EORS_rrrRORr(6,8,9,7), 0xe0386779, "eors r6, r8, r9, ror r7"); +TEST(EORS_rrrRRX(6,8,9), 0xe0386069, "eors r6, r8, r9, rrx"); + +TEST(MRS_CPSR(6), 0xe10f6000, "mrs r6, CPSR"); +TEST(MRS_SPSR(6), 0xe14f6000, "mrs r6, SPSR"); + +TEST(MSR_CPSR_i(5), 0xe329f005, "msr CPSR_fc, #5"); +TEST(MSR_CPSR_r(5), 0xe129f005, "msr CPSR_fc, r5"); + +TEST(MSR_CPSRf_i(5), 0xe328f005, "msr CPSR_f, #5"); +TEST(MSR_CPSRf_r(5), 0xe128f005, "msr CPSR_f, r5"); + +TEST(MSR_CPSRc_i(5), 0xe321f005, "msr CPSR_c, #5"); +TEST(MSR_CPSRc_r(5), 0xe121f005, "msr CPSR_c, r5"); + +TEST(PUSH(6), 0xe92d0040, "push {r6}"); +TEST(POP(6), 0xe8bd0040, "pop {r6}"); + +TEST(BIC_rri(0, 0, 0x9f000000), 0xe3c0049f, "bic r0, r0, #0x9f000000"); +TEST(BIC_rri(2, 3, 0xff00), 0xe3c32cff, "bic r2, r3, #0xff00"); +TEST(BIC_rri(3, 4, 0xff), 0xe3c430ff, "bic r3, r4, #0xff"); + +TEST(ORR_rrrLSRi(0, 1, 2, 16), 0xe1810822, "orr r0, r1, r2, lsr #16"); +TEST(ORR_rrrLSRi(0, 1, 2, 24), 0xe1810c22, "orr r0, r1, r2, lsr #24"); + +TEST(LDR_rR(8, 9), 0xe5998000, "ldr r8, [r9]"); +TEST(LDR_rRI(8, 9, 4), 0xe5998004, "ldr r8, [r9, #4]"); +TEST(LDR_rRi(8, 9, 4), 0xe5198004, "ldr r8, [r9, #-4]"); +TEST(LDR_rRR(8, 9, 7), 0xe7998007, "ldr r8, [r9, r7]"); +TEST(LDR_rRr(8, 9, 7), 0xe7198007, "ldr r8, [r9, -r7]"); +TEST(LDR_rRR_LSLi(8, 9, 7, 5), 0xe7998287, "ldr r8, [r9, r7, lsl #5]"); +TEST(LDR_rRr_LSLi(8, 9, 7, 5), 0xe7198287, "ldr r8, [r9, -r7, lsl #5]"); +TEST(LDR_rRR_LSRi(8, 9, 7, 5), 0xe79982a7, "ldr r8, [r9, r7, lsr #5]"); +TEST(LDR_rRr_LSRi(8, 9, 7, 5), 0xe71982a7, "ldr r8, [r9, -r7, lsr #5]"); +TEST(LDR_rRR_ASRi(8, 9, 7, 5), 0xe79982c7, "ldr r8, [r9, r7, asr #5]"); +TEST(LDR_rRr_ASRi(8, 9, 7, 5), 0xe71982c7, "ldr r8, [r9, -r7, asr #5]"); +TEST(LDR_rRR_RORi(8, 9, 7, 5), 0xe79982e7, "ldr r8, [r9, r7, ror #5]"); +TEST(LDR_rRr_RORi(8, 9, 7, 5), 0xe71982e7, "ldr r8, [r9, -r7, ror #5]"); +TEST(LDR_rRR_RRX(8, 9, 7), 0xe7998067, "ldr r8, [r9, r7, rrx]"); +TEST(LDR_rRr_RRX(8, 9, 7), 0xe7198067, "ldr r8, [r9, -r7, rrx]"); + +TEST(LDRB_rR(8, 9), 0xe5d98000, "ldrb r8, [r9]"); +TEST(LDRB_rRI(8, 9, 4), 0xe5d98004, "ldrb r8, [r9, #4]"); +TEST(LDRB_rRi(8, 9, 4), 0xe5598004, "ldrb r8, [r9, #-4]"); +TEST(LDRB_rRR(8, 9, 7), 0xe7d98007, "ldrb r8, [r9, r7]"); +TEST(LDRB_rRr(8, 9, 7), 0xe7598007, "ldrb r8, [r9, -r7]"); +TEST(LDRB_rRR_LSLi(8, 9, 7, 5), 0xe7d98287, "ldrb r8, [r9, r7, lsl #5]"); +TEST(LDRB_rRr_LSLi(8, 9, 7, 5), 0xe7598287, "ldrb r8, [r9, -r7, lsl #5]"); +TEST(LDRB_rRR_LSRi(8, 9, 7, 5), 0xe7d982a7, "ldrb r8, [r9, r7, lsr #5]"); +TEST(LDRB_rRr_LSRi(8, 9, 7, 5), 0xe75982a7, "ldrb r8, [r9, -r7, lsr #5]"); +TEST(LDRB_rRR_ASRi(8, 9, 7, 5), 0xe7d982c7, "ldrb r8, [r9, r7, asr #5]"); +TEST(LDRB_rRr_ASRi(8, 9, 7, 5), 0xe75982c7, "ldrb r8, [r9, -r7, asr #5]"); +TEST(LDRB_rRR_RORi(8, 9, 7, 5), 0xe7d982e7, "ldrb r8, [r9, r7, ror #5]"); +TEST(LDRB_rRr_RORi(8, 9, 7, 5), 0xe75982e7, "ldrb r8, [r9, -r7, ror #5]"); +TEST(LDRB_rRR_RRX(8, 9, 7), 0xe7d98067, "ldrb r8, [r9, r7, rrx]"); +TEST(LDRB_rRr_RRX(8, 9, 7), 0xe7598067, "ldrb r8, [r9, -r7, rrx]"); + +TEST(LDRSB_rR(8, 9), 0xe1d980d0, "ldrsb r8, [r9]"); +TEST(LDRSB_rRI(8, 9, 4), 0xe1d980d4, "ldrsb r8, [r9, #4]"); +TEST(LDRSB_rRi(8, 9, 4), 0xe15980d4, "ldrsb r8, [r9, #-4]"); +TEST(LDRSB_rRR(8, 9, 7), 0xe19980d7, "ldrsb r8, [r9, r7]"); +TEST(LDRSB_rRr(8, 9, 7), 0xe11980d7, "ldrsb r8, [r9, -r7]"); + +TEST(LDRSH_rR(8, 9), 0xe1d980f0, "ldrsh r8, [r9]"); +TEST(LDRSH_rRI(8, 9, 4), 0xe1d980f4, "ldrsh r8, [r9, #4]"); +TEST(LDRSH_rRi(8, 9, 4), 0xe15980f4, "ldrsh r8, [r9, #-4]"); +TEST(LDRSH_rRR(8, 9, 7), 0xe19980f7, "ldrsh r8, [r9, r7]"); +TEST(LDRSH_rRr(8, 9, 7), 0xe11980f7, "ldrsh r8, [r9, -r7]"); + +TEST(LDRH_rR(8, 9), 0xe1d980b0, "ldrh r8, [r9]"); +TEST(LDRH_rRI(8, 9, 4), 0xe1d980b4, "ldrh r8, [r9, #4]"); +TEST(LDRH_rRi(8, 9, 4), 0xe15980b4, "ldrh r8, [r9, #-4]"); +TEST(LDRH_rRR(8, 9, 7), 0xe19980b7, "ldrh r8, [r9, r7]"); +TEST(LDRH_rRr(8, 9, 7), 0xe11980b7, "ldrh r8, [r9, -r7]"); + +TEST(STR_rRR(8,9,7), 0xe7898007, "str r8, [r9, r7]"); +TEST(STR_rRr(8,9,7), 0xe7098007, "str r8, [r9, -r7]"); + +TEST(STRB_rR(5, 6), 0xe5c65000, "strb r5,[r6]"); + +TEST(STRH_rR(8, 9), 0xe1c980b0, "strh r8, [r9]"); +TEST(STRH_rRI(8, 9, 4), 0xe1c980b4, "strh r8, [r9, #4]"); +TEST(STRH_rRi(8, 9, 4), 0xe14980b4, "strh r8, [r9, #-4]"); +TEST(STRH_rRR(8, 9, 7), 0xe18980b7, "strh r8, [r9, r7]"); +TEST(STRH_rRr(8, 9, 7), 0xe10980b7, "strh r8, [r9, -r7]"); + +TEST(CLZ_rr(2, 3), 0xe16f2f13, "clz r2,r3"); +TEST(REV_rr(2, 3), 0xe6bf2f33, "rev r2, r3"); +TEST(REV16_rr(2, 3), 0xe6bf2fb3, "rev16 r2, r3"); +TEST(REVSH_rr(2, 3), 0xe6ff2fb3, "revsh r2, r3"); + +TEST(SXTB_rr(2,3), 0xe6af2073, "sxtb r2,r3"); +TEST(SXTB_rr(3,4), 0xe6af3074, "sxtb r3,r4"); + +TEST(SXTB_rr_ROR8(2,3), 0xe6af2473, "sxtb r2, r3, ror #8"); +TEST(SXTB_rr_ROR16(2,3), 0xe6af2873, "sxtb r2, r3, ror #16"); +TEST(SXTB_rr_ROR24(2,3), 0xe6af2c73, "sxtb r2, r3, ror #24"); +TEST(SXTH_rr(2,3), 0xe6bf2073, "sxth r2, r3"); +TEST(SXTH_rr_ROR8(2,3), 0xe6bf2473, "sxth r2, r3, ror #8"); +TEST(SXTH_rr_ROR16(2,3), 0xe6bf2873, "sxth r2, r3, ror #16"); +TEST(SXTH_rr_ROR24(2,3), 0xe6bf2c73, "sxth r2, r3, ror #24"); +TEST(UXTB_rr(2,3), 0xe6ef2073, "uxtb r2, r3"); +TEST(UXTB_rr_ROR8(2,3), 0xe6ef2473, "uxtb r2, r3, ror #8"); +TEST(UXTB_rr_ROR16(2,3), 0xe6ef2873, "uxtb r2, r3, ror #16"); +TEST(UXTB_rr_ROR24(2,3), 0xe6ef2c73, "uxtb r2, r3, ror #24"); +TEST(UXTH_rr(2,3), 0xe6ff2073, "uxth r2, r3"); +TEST(UXTH_rr_ROR8(2,3), 0xe6ff2473, "uxth r2, r3, ror #8"); +TEST(UXTH_rr_ROR16(2,3), 0xe6ff2873, "uxth r2, r3, ror #16"); +TEST(UXTH_rr_ROR24(2,3), 0xe6ff2c73, "uxth r2, r3, ror #24"); + +TEST(REV_rr(2,3), 0xe6bf2f33, "rev r2, r3"); +TEST(REV16_rr(2,3), 0xe6bf2fb3, "rev16 r2, r3"); +TEST(REVSH_rr(2,3), 0xe6ff2fb3, "revsh r2, r3"); + +TEST(CC_MOV_ri(NATIVE_CC_CS, 4,1), 0x23a04001, "movcs r4, #1"); +TEST(CC_MOV_ri(NATIVE_CC_CC, 4,1), 0x33a04001, "movcc r4, #1"); + +int imm = 0x9f; +TEST(ADDS_rri(0, 0, imm << 24), 0xe290049f, "adds r0, r0, 0x9f000000"); + +TEST(PKHBT_rrr(1, 2, 3), 0xe6821013, "pkhbt r1,r2,r3"); +TEST(MVN_ri8(1,2), 0xe3e01002, "mvn r1,#2"); + +TEST(ORR_rri8RORi(1,2,0x12,24), 0xe3821c12, "orr r1, r2, #0x1200"); +TEST(PKHTB_rrrASRi(1, 2, 3, 4), 0xe6821253, "pkhtb r1,r2,r3,ASR #4"); +TEST(PKHBT_rrrLSLi(1, 2, 3, 4), 0xe6821213, "pkhbt r1,r2,r3,LSL #4"); + +TEST(MUL_rrr(1,2,3), 0xe0010392, "mul r1, r2, r3"); +TEST(MULS_rrr(1,2,3), 0xe0110392, "muls r1, r2, r3"); + + +} + diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp new file mode 100644 index 000000000..216effe59 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp @@ -0,0 +1,1008 @@ +/******************** -*- mode: C; tab-width: 8 -*- ******************** + * + * Dumb and Brute Force Run-time assembler verifier for IA-32 and AMD64 + * + ***********************************************************************/ + + +/*********************************************************************** + * + * Copyright 2004 Gwenole Beauchesne + * + * 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 + * + ***********************************************************************/ + +/* + * STATUS: 5.5M variations covering unary register based operations, + * reg/reg operations, imm/reg operations. + * + * TODO: + * - Rewrite to use internal BFD/opcodes format instead of string compares + * - Add reg/mem, imm/mem variations + */ + +#define _BSD_SOURCE 1 +#include +#include +#include +#include +#include +#include + +#include "sysdeps.h" + +#undef abort +#define abort() do { \ + fprintf(stderr, "ABORT: %s, line %d\n", __FILE__, __LINE__); \ + (abort)(); \ +} while (0) + +#define X86_TARGET_64BIT 1 +#define X86_FLAT_REGISTERS 0 +#define X86_OPTIMIZE_ALU 1 +#define X86_OPTIMIZE_ROTSHI 1 +#include "compiler/codegen_x86.h" + +#define x86_emit_byte(B) emit_byte(B) +#define x86_emit_word(W) emit_word(W) +#define x86_emit_long(L) emit_long(L) +#define x86_emit_quad(Q) emit_quad(Q) +#define x86_get_target() get_target() +#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) + +static void jit_fail(const char *msg, const char *file, int line, const char *function) +{ + fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", + function, file, line, msg); + abort(); +} + +static uint8 *target; + +static inline void emit_byte(uint8 x) +{ + *target++ = x; +} + +static inline void emit_word(uint16 x) +{ + *((uint16 *)target) = x; + target += 2; +} + +static inline void emit_long(uint32 x) +{ + *((uint32 *)target) = x; + target += 4; +} + +static inline void emit_quad(uint64 x) +{ + *((uint64 *)target) = x; + target += 8; +} + +static inline void set_target(uint8 *t) +{ + target = t; +} + +static inline uint8 *get_target(void) +{ + return target; +} + +static uint32 mon_read_byte(uintptr addr) +{ + uint8 *m = (uint8 *)addr; + return (uint32)(*m); +} + +extern "C" { +#include "disass/dis-asm.h" + +int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) +{ + while (length--) + *to++ = mon_read_byte(from++); + return 0; +} + +void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) +{ + info->fprintf_func(info->stream, "Unknown error %d\n", status); +} + +void generic_print_address(bfd_vma addr, struct disassemble_info *info) +{ + if (addr >= UVAL64(0x100000000)) + info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); + else + info->fprintf_func(info->stream, "$%08x", (uint32)addr); +} + +int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) +{ + return 0; +} +} + +struct SFILE { + char *buffer; + char *current; +}; + +static int mon_sprintf(SFILE *f, const char *format, ...) +{ + int n; + va_list args; + va_start(args, format); + vsprintf(f->current, format, args); + f->current += n = strlen(f->current); + va_end(args); + return n; +} + +static int disass_x86(char *buf, uintptr adr) +{ + disassemble_info info; + SFILE sfile; + sfile.buffer = buf; + sfile.current = buf; + INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); + info.mach = bfd_mach_x86_64; + info.disassembler_options = "suffix"; + return print_insn_i386(adr, &info); +} + +enum { + op_disp, + op_reg, + op_base, + op_index, + op_scale, + op_imm, +}; +struct operand_t { + int32 disp; + int8 reg; + int8 base; + int8 index; + int8 scale; + int64 imm; + + void clear() { + disp = imm = 0; + reg = base = index = -1; + scale = 1; + } + + void fill(int optype, int value) { + switch (optype) { + case op_disp: disp = value; break; + case op_reg: reg = value; break; + case op_base: base = value; break; + case op_index: index = value; break; + case op_scale: scale = value; break; + case op_imm: imm = value; break; + default: abort(); + } + } +}; + +struct insn_t { + char name[16]; + int n_operands; +#define MAX_OPERANDS 3 + operand_t operands[MAX_OPERANDS]; + + void clear() { + memset(name, 0, sizeof(name)); + n_operands = 0; + for (int i = 0; i < MAX_OPERANDS; i++) + operands[i].clear(); + } + + void pretty_print() { + printf("%s, %d operands\n", name, n_operands); + for (int i = 0; i < n_operands; i++) { + operand_t *op = &operands[i]; + if (op->reg != -1) + printf(" reg r%d\n", op->reg); + else { + printf(" mem 0x%08x(", op->disp); + if (op->base != -1) + printf("r%d", op->base); + printf(","); + if (op->index != -1) + printf("r%d", op->index); + printf(","); + if (op->base != -1 || op->index != -1) + printf("%d", op->scale); + printf(")\n"); + } + } + } +}; + +static const struct { + const char *name; + int reg; +} +regnames[] = { +#define _(REG) { #REG, X86_##REG } + + _(AL), _(CL), _(DL), _(BL), + _(AH), _(CH), _(DH), _(BH), + _(SPL), _(BPL), _(SIL), _(DIL), + _(R8B), _(R9B), _(R10B), _(R11B), _(R12B), _(R13B), _(R14B), _(R15B), + + _(AX), _(CX), _(DX), _(BX), _(SP), _(BP), _(SI), _(DI), + _(R8W), _(R9W), _(R10W), _(R11W), _(R12W), _(R13W), _(R14W), _(R15W), + + _(EAX), _(ECX), _(EDX), _(EBX), _(ESP), _(EBP), _(ESI), _(EDI), + _(R8D), _(R9D), _(R10D), _(R11D), _(R12D), _(R13D), _(R14D), _(R15D), + + _(RAX), _(RCX), _(RDX), _(RBX), _(RSP), _(RBP), _(RSI), _(RDI), + _(R8), _(R9), _(R10), _(R11), _(R12), _(R13), _(R14), _(R15), + + { NULL, -1 } +#undef _ +}; + +static int parse_reg(operand_t *op, int optype, char *buf) +{ + for (int i = 0; regnames[i].name; i++) { + int len = strlen(regnames[i].name); + if (strncasecmp(regnames[i].name, buf, len) == 0) { + op->fill(optype, regnames[i].reg); + return len; + } + } + return 0; +} + +static int parse_mem(operand_t *op, char *buf) +{ + char *p = buf; + + if (strncmp(buf, "0x", 2) == 0) { + unsigned long val = strtoul(buf, &p, 16); + if (val == 0 && errno == EINVAL) + abort(); + op->disp = val; + } + + if (*p == '(') { + p++; + + if (*p == '%') { + p++; + + int n = parse_reg(op, op_base, p); + if (n <= 0) + return -3; + p += n; + } + + if (*p == ',') { + p++; + + if (*p == '%') { + int n = parse_reg(op, op_index, ++p); + if (n <= 0) + return -4; + p += n; + + if (*p != ',') + return -5; + p++; + + goto do_parse_scale; + } + else if (isdigit(*p)) { + do_parse_scale: + long val = strtol(p, &p, 10); + if (val == 0 && errno == EINVAL) + abort(); + op->scale = val; + } + } + + if (*p != ')') + return -6; + p++; + } + + return p - buf; +} + +static void parse_insn(insn_t *ii, char *buf) +{ + char *p = buf; + ii->clear(); + + for (int i = 0; !isspace(*p); i++) + ii->name[i] = *p++; + + while (*p && isspace(*p)) + p++; + if (*p == '\0') + return; + + int n_operands = 0; + int optype = op_reg; + bool done = false; + while (!done) { + int n; + switch (*p) { + case '%': + n = parse_reg(&ii->operands[n_operands], optype, ++p); + if (n <= 0) { + fprintf(stderr, "parse_reg(%s) error %d\n", p, n); + abort(); + } + p += n; + break; + case '0': case '(': + n = parse_mem(&ii->operands[n_operands], p); + if (n <= 0) { + fprintf(stderr, "parse_mem(%s) error %d\n", p, n); + abort(); + } + p += n; + break; + case '$': { + unsigned long val = strtoul(++p, &p, 16); + if (val == 0 && errno == EINVAL) + abort(); + ii->operands[n_operands].imm = val; + break; + } + case '*': + p++; + break; + case ',': + n_operands++; + p++; + break; + case ' ': case '\t': + p++; + break; + case '\0': + done = true; + break; + default: + fprintf(stderr, "parse error> %s\n", p); + abort(); + } + } + ii->n_operands = n_operands + 1; +} + +static long n_tests, n_failures; +static long n_all_tests, n_all_failures; + +static bool check_reg(insn_t *ii, const char *name, int r) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 1) { + fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); + return false; + } + + int reg = ii->operands[0].reg; + + if (reg != r) { + fprintf(stderr, "ERROR: instruction expected r%d as source, got ", r); + if (reg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "%d\n", reg); + return false; + } + + return true; +} + +static bool check_reg_reg(insn_t *ii, const char *name, int s, int d) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + int srcreg = ii->operands[0].reg; + int dstreg = ii->operands[1].reg; + + if (srcreg != s) { + fprintf(stderr, "ERROR: instruction expected r%d as source, got ", s); + if (srcreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "%d\n", srcreg); + return false; + } + + if (dstreg != d) { + fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); + if (dstreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "%d\n", dstreg); + return false; + } + + return true; +} + +static bool check_imm_reg(insn_t *ii, const char *name, uint32 v, int d, int mode = -1) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + uint32 imm = ii->operands[0].imm; + int dstreg = ii->operands[1].reg; + + if (mode == -1) { + char suffix = name[strlen(name) - 1]; + switch (suffix) { + case 'b': mode = 1; break; + case 'w': mode = 2; break; + case 'l': mode = 4; break; + case 'q': mode = 8; break; + } + } + switch (mode) { + case 1: v &= 0xff; break; + case 2: v &= 0xffff; break; + } + + if (imm != v) { + fprintf(stderr, "ERROR: instruction expected 0x%08x as immediate, got ", v); + if (imm == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "0x%08x\n", imm); + return false; + } + + if (dstreg != d) { + fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); + if (dstreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "%d\n", dstreg); + return false; + } + + return true; +} + +static bool check_mem_reg(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + operand_t *mem = &ii->operands[0]; + operand_t *reg = &ii->operands[1]; + + uint32 d = mem->disp; + int b = mem->base; + int i = mem->index; + int s = mem->scale; + int r = reg->reg; + + if (d != D) { + fprintf(stderr, "ERROR: instruction expected 0x%08x as displacement, got 0x%08x\n", D, d); + return false; + } + + if (b != B) { + fprintf(stderr, "ERROR: instruction expected r%d as base, got r%d\n", B, b); + return false; + } + + if (i != I) { + fprintf(stderr, "ERROR: instruction expected r%d as index, got r%d\n", I, i); + return false; + } + + if (s != S) { + fprintf(stderr, "ERROR: instruction expected %d as scale factor, got %d\n", S, s); + return false; + } + + if (r != R) { + fprintf(stderr, "ERROR: instruction expected r%d as reg operand, got r%d\n", R, r); + return false; + } + + return true; +} + +static int verbose = 2; + +int main(void) +{ + static char buffer[1024]; +#define MAX_INSN_LENGTH 16 +#define MAX_INSNS 1024 + static uint8 block[MAX_INSNS * MAX_INSN_LENGTH]; + static char *insns[MAX_INSNS]; + static int modes[MAX_INSNS]; + n_all_tests = n_all_failures = 0; + + printf("Testing reg forms\n"); + n_tests = n_failures = 0; + for (int r = 0; r < 16; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##r(r); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN(INSN "q", GENOP##Q); \ +} while (0) + GENA("not", NOT); + GENA("neg", NEG); + GENA("mul", MUL); + GENA("imul", IMUL); + GENA("div", DIV); + GENA("idiv", IDIV); + GENA("dec", DEC); + GENA("inc", INC); + GEN("callq", CALLs); + GEN("jmpq", JMPs); + GEN("pushl", PUSHQ); // FIXME: disass bug? wrong suffix + GEN("popl", POPQ); // FIXME: disass bug? wrong suffix + GEN("bswap", BSWAPL); // FIXME: disass bug? no suffix + GEN("bswap", BSWAPQ); // FIXME: disass bug? no suffix + GEN("seto", SETO); + GEN("setno", SETNO); + GEN("setb", SETB); + GEN("setae", SETAE); + GEN("sete", SETE); + GEN("setne", SETNE); + GEN("setbe", SETBE); + GEN("seta", SETA); + GEN("sets", SETS); + GEN("setns", SETNS); + GEN("setp", SETP); + GEN("setnp", SETNP); + GEN("setl", SETL); + GEN("setge", SETGE); + GEN("setle", SETLE); + GEN("setg", SETG); +#undef GENA +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg(&ii, insns[i], r)) { + if (verbose > 1) + fprintf(stderr, "%s\n", buffer); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; + + printf("Testing reg,reg forms\n"); + n_tests = n_failures = 0; + for (int s = 0; s < 16; s++) { + for (int d = 0; d < 16; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##rr(s, d); \ +} while (0) +#define GEN1(INSN, GENOP, OP) do { \ + insns[i++] = INSN; \ + GENOP##rr(OP, s, d); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN(INSN "q", GENOP##Q); \ +} while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GEN("btw", BTW); + GEN("btl", BTL); + GEN("btq", BTQ); + GEN("btcw", BTCW); + GEN("btcl", BTCL); + GEN("btcq", BTCQ); + GEN("btrw", BTRW); + GEN("btrl", BTRL); + GEN("btrq", BTRQ); + GEN("btsw", BTSW); + GEN("btsl", BTSL); + GEN("btsq", BTSQ); + GEN("imulw", IMULW); + GEN("imull", IMULL); + GEN("imulq", IMULQ); + GEN1("cmove", CMOVW, X86_CC_Z); + GEN1("cmove", CMOVL, X86_CC_Z); + GEN1("cmove", CMOVQ, X86_CC_Z); + GENA("test", TEST); + GENA("cmpxchg", CMPXCHG); + GENA("xadd", XADD); + GENA("xchg", XCHG); + GEN("bsfw", BSFW); + GEN("bsfl", BSFL); + GEN("bsfq", BSFQ); + GEN("bsrw", BSRW); + GEN("bsrl", BSRL); + GEN("bsrq", BSRQ); + GEN("movsbw", MOVSBW); + GEN("movsbl", MOVSBL); + GEN("movsbq", MOVSBQ); + GEN("movzbw", MOVZBW); + GEN("movzbl", MOVZBL); + GEN("movzbq", MOVZBQ); + GEN("movswl", MOVSWL); + GEN("movswq", MOVSWQ); + GEN("movzwl", MOVZWL); + GEN("movzwq", MOVZWQ); + GEN("movslq", MOVSLQ); +#undef GENA +#undef GEN1 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], s, d)) { + if (verbose > 1) + fprintf(stderr, "%s\n", buffer); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; + + printf("Testing cl,reg forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < 16; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##rr(X86_CL, d); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN(INSN "q", GENOP##Q); \ +} while (0) + GENA("rol", ROL); + GENA("ror", ROR); + GENA("rcl", RCL); + GENA("rcr", RCR); + GENA("shl", SHL); + GENA("shr", SHR); + GENA("sar", SAR); +#undef GENA +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], X86_CL, d)) { + if (verbose > 1) + fprintf(stderr, "%s\n", buffer); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; + + printf("Testing imm,reg forms\n"); + static const uint32 imm_table[] = { + 0x00000000, 0x00000001, 0x00000002, 0x00000004, + 0x00000008, 0x00000010, 0x00000020, 0x00000040, + 0x00000080, 0x000000fe, 0x000000ff, 0x00000100, + 0x00000101, 0x00000102, 0xfffffffe, 0xffffffff, + 0x00000000, 0x10000000, 0x20000000, 0x30000000, + 0x40000000, 0x50000000, 0x60000000, 0x70000000, + 0x80000000, 0x90000000, 0xa0000000, 0xb0000000, + 0xc0000000, 0xd0000000, 0xe0000000, 0xf0000000, + 0xfffffffd, 0xfffffffe, 0xffffffff, 0x00000001, + 0x00000002, 0x00000003, 0x11111111, 0x22222222, + 0x33333333, 0x44444444, 0x55555555, 0x66666666, + 0x77777777, 0x88888888, 0x99999999, 0xaaaaaaaa, + 0xbbbbbbbb, 0xcccccccc, 0xdddddddd, 0xeeeeeeee, + }; + const int n_imm_tab_count = sizeof(imm_table)/sizeof(imm_table[0]); + n_tests = n_failures = 0; + for (int j = 0; j < n_imm_tab_count; j++) { + const uint32 value = imm_table[j]; + for (int d = 0; d < 16; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = -1; \ + i++; GENOP##ir(value, d); \ + } while (0) +#define GENM(INSN, GENOP, MODE) do { \ + insns[i] = INSN; \ + modes[i] = MODE; \ + i++; GENOP##ir(value, d); \ + } while (0) +#define GENA(INSN, GENOP) do { \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN(INSN "q", GENOP##Q); \ + } while (0) +#define GENAM(INSN, GENOP, MODE) do { \ + GENM(INSN "b", GENOP##B, MODE); \ + GENM(INSN "w", GENOP##W, MODE); \ + GENM(INSN "l", GENOP##L, MODE); \ + GENM(INSN "q", GENOP##Q, MODE); \ + } while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GENM("btw", BTW, 1); + GENM("btl", BTL, 1); + GENM("btq", BTQ, 1); + GENM("btcw", BTCW, 1); + GENM("btcl", BTCL, 1); + GENM("btcq", BTCQ, 1); + GENM("btrw", BTRW, 1); + GENM("btrl", BTRL, 1); + GENM("btrq", BTRQ, 1); + GENM("btsw", BTSW, 1); + GENM("btsl", BTSL, 1); + GENM("btsq", BTSQ, 1); + if (value != 1) { + GENAM("rol", ROL, 1); + GENAM("ror", ROR, 1); + GENAM("rcl", RCL, 1); + GENAM("rcr", RCR, 1); + GENAM("shl", SHL, 1); + GENAM("shr", SHR, 1); + GENAM("sar", SAR, 1); + } + GENA("test", TEST); +#undef GENAM +#undef GENA +#undef GENM +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { + if (verbose > 1) + fprintf(stderr, "%s\n", buffer); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; + + printf("Testing mem,reg forms\n"); + n_tests = n_failures = 0; + static const uint32 off_table[] = { + 0x00000000, + 0x00000001, + 0x00000040, + 0x00000080, + 0x000000ff, + 0x00000100, + 0xfffffffe, + 0xffffffff, + }; + const int off_table_count = sizeof(off_table) / sizeof(off_table[0]); + for (int d = 0; d < off_table_count; d++) { + const uint32 D = off_table[d]; + for (int B = -1; B < 16; B++) { + for (int I = -1; I < 16; I++) { + if (I == X86_RSP) + continue; + for (int S = 1; S < 8; S *= 2) { + if (I == -1) + continue; + for (int r = 0; r < 16; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##mr(D, B, I, S, r); \ + } while (0) +#define GENA(INSN, GENOP) do { \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN(INSN "q", GENOP##Q); \ + } while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GEN("imulw", IMULW); + GEN("imull", IMULL); + GEN("imulq", IMULQ); + GEN("bsfw", BSFW); + GEN("bsfl", BSFL); + GEN("bsfq", BSFQ); + GEN("bsrw", BSRW); + GEN("bsrl", BSRL); + GEN("bsrq", BSRQ); + GEN("movsbw", MOVSBW); + GEN("movsbl", MOVSBL); + GEN("movsbq", MOVSBQ); + GEN("movzbw", MOVZBW); + GEN("movzbl", MOVZBL); + GEN("movzbq", MOVZBQ); + GEN("movswl", MOVSWL); + GEN("movswq", MOVSWQ); + GEN("movzwl", MOVZWL); + GEN("movzwq", MOVZWQ); + GEN("movslq", MOVSLQ); +#undef GENA +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { + if (verbose > 1) + fprintf(stderr, "%s\n", buffer); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + } + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; + + printf("\n"); + printf("All %ld tests run, %ld failures\n", n_all_tests, n_all_failures); +} diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index cc1d6e051..2e9268748 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -80,7 +80,13 @@ extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType extern void Exit680x0(void); // 680x0 emulation functions -struct M68kRegisters; +struct M68kRegisters { + uint32 d[8]; + memptr a[8]; + uint16 sr; + memptr usp, isp, msp; + memptr pc; +}; extern void Start680x0(void); // Reset and start 680x0 extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine @@ -89,4 +95,12 @@ extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS extern void TriggerInterrupt(void); // Trigger interrupt level 1 (InterruptFlag must be set first) extern void TriggerNMI(void); // Trigger interrupt level 7 +// CPU looping handlers +void check_eps_limit(uaecptr); +void report_double_bus_error(void); + +extern int intlev(void); + +static inline void AtariReset(void) {} + #endif diff --git a/BasiliskII/src/uae_cpu/cpudefsa.cpp b/BasiliskII/src/uae_cpu/cpudefsa.cpp new file mode 100644 index 000000000..ad7d69795 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpudefsa.cpp @@ -0,0 +1,5 @@ +/* + * cpudefs.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpudefs.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1.cpp b/BasiliskII/src/uae_cpu/cpuemu1.cpp new file mode 100644 index 000000000..089eefd47 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu1.cpp @@ -0,0 +1,2 @@ +#define PART_1 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp new file mode 100644 index 000000000..58acf4442 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_1 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2.cpp b/BasiliskII/src/uae_cpu/cpuemu2.cpp new file mode 100644 index 000000000..1e18b587b --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu2.cpp @@ -0,0 +1,2 @@ +#define PART_2 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp new file mode 100644 index 000000000..8e5136c4a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_2 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3.cpp b/BasiliskII/src/uae_cpu/cpuemu3.cpp new file mode 100644 index 000000000..0385e2f03 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu3.cpp @@ -0,0 +1,2 @@ +#define PART_3 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp new file mode 100644 index 000000000..6565dc8c3 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_3 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4.cpp b/BasiliskII/src/uae_cpu/cpuemu4.cpp new file mode 100644 index 000000000..13d27e7a5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu4.cpp @@ -0,0 +1,2 @@ +#define PART_4 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp new file mode 100644 index 000000000..a16c36cb7 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_4 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5.cpp b/BasiliskII/src/uae_cpu/cpuemu5.cpp new file mode 100644 index 000000000..9b33a6543 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu5.cpp @@ -0,0 +1,2 @@ +#define PART_5 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp new file mode 100644 index 000000000..5bf24360a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp @@ -0,0 +1,4 @@ +#define NOFLAGS 1 +#define PART_5 +#include "cpuemu.cpp" + diff --git a/BasiliskII/src/uae_cpu/cpuemu6.cpp b/BasiliskII/src/uae_cpu/cpuemu6.cpp new file mode 100644 index 000000000..e4b1efb0c --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu6.cpp @@ -0,0 +1,2 @@ +#define PART_6 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp new file mode 100644 index 000000000..7afe15d4a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_6 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7.cpp b/BasiliskII/src/uae_cpu/cpuemu7.cpp new file mode 100644 index 000000000..faec7ef88 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu7.cpp @@ -0,0 +1,2 @@ +#define PART_7 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp new file mode 100644 index 000000000..1e404dea8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_7 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8.cpp b/BasiliskII/src/uae_cpu/cpuemu8.cpp new file mode 100644 index 000000000..c4efcfa39 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu8.cpp @@ -0,0 +1,2 @@ +#define PART_8 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp new file mode 100644 index 000000000..7c7f8f6e6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_8 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpufunctbla.cpp b/BasiliskII/src/uae_cpu/cpufunctbla.cpp new file mode 100644 index 000000000..17dd0d3f4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpufunctbla.cpp @@ -0,0 +1,5 @@ +/* + * cpufunctbl.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpufunctbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpummu.cpp b/BasiliskII/src/uae_cpu/cpummu.cpp new file mode 100644 index 000000000..1630bc78b --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpummu.cpp @@ -0,0 +1,1096 @@ +/* + * cpummu.cpp - MMU emulation + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by UAE MMU patch + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#define DEBUG 0 +#include "sysdeps.h" + +#include "cpummu.h" +#include "memory.h" +#include "newcpu.h" +#include "debug.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif + +#define DBG_MMU_VERBOSE 1 +#define DBG_MMU_SANITY 1 + +#ifdef FULLMMU + +mmu_atc_l1_array atc_l1[2]; +mmu_atc_l1_array *current_atc; +struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; + +# ifdef ATC_STATS +static unsigned int mmu_atc_hits[ATC_L2_SIZE]; +# endif + + +static void mmu_dump_ttr(const char * label, uae_u32 ttr) +{ + DUNUSED(label); +#if DEBUG + uae_u32 from_addr, to_addr; + + from_addr = ttr & MMU_TTR_LOGICAL_BASE; + to_addr = (ttr & MMU_TTR_LOGICAL_MASK) << 8; + + D(bug("%s: [%08x] %08x - %08x enabled=%d supervisor=%d wp=%d cm=%02d", + label, ttr, + from_addr, to_addr, + ttr & MMU_TTR_BIT_ENABLED ? 1 : 0, + (ttr & (MMU_TTR_BIT_SFIELD_ENABLED | MMU_TTR_BIT_SFIELD_SUPER)) >> MMU_TTR_SFIELD_SHIFT, + ttr & MMU_TTR_BIT_WRITE_PROTECT ? 1 : 0, + (ttr & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT + )); +#else + DUNUSED(ttr); +#endif +} + +void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode) +{ + uae_u32 * ttr; + uae_u32 * ttr0 = datamode ? ®s.dtt0 : ®s.itt0; + uae_u32 * ttr1 = datamode ? ®s.dtt1 : ®s.itt1; + + if ((*ttr1 & MMU_TTR_BIT_ENABLED) == 0) + ttr = ttr1; + else if ((*ttr0 & MMU_TTR_BIT_ENABLED) == 0) + ttr = ttr0; + else + return; + + *ttr = baseaddr & MMU_TTR_LOGICAL_BASE; + *ttr |= ((baseaddr + size - 1) & MMU_TTR_LOGICAL_BASE) >> 8; + *ttr |= MMU_TTR_BIT_ENABLED; + + D(bug("MMU: map transparent mapping of %08x", *ttr)); +} + +/* check if an address matches a ttr */ +static int mmu_do_match_ttr(uae_u32 ttr, uaecptr addr, int super) +{ + if (ttr & MMU_TTR_BIT_ENABLED) { /* TTR enabled */ + uae_u8 msb, mask; + + msb = ((addr ^ ttr) & MMU_TTR_LOGICAL_BASE) >> 24; + mask = (ttr & MMU_TTR_LOGICAL_MASK) >> 16; + + if (!(msb & ~mask)) { + + if ((ttr & MMU_TTR_BIT_SFIELD_ENABLED) == 0) { + if (((ttr & MMU_TTR_BIT_SFIELD_SUPER) == 0) != (super == 0)) { + return TTR_NO_MATCH; + } + } + + return (ttr & MMU_TTR_BIT_WRITE_PROTECT) ? TTR_NO_WRITE : TTR_OK_MATCH; + } + } + return TTR_NO_MATCH; +} + +static inline int mmu_match_ttr(uaecptr addr, int super, int data) +{ + int res; + + if (data) { + res = mmu_do_match_ttr(regs.dtt0, addr, super); + if (res == TTR_NO_MATCH) + res = mmu_do_match_ttr(regs.dtt1, addr, super); + } else { + res = mmu_do_match_ttr(regs.itt0, addr, super); + if (res == TTR_NO_MATCH) + res = mmu_do_match_ttr(regs.itt1, addr, super); + } + return res; +} + +#if DEBUG +/* {{{ mmu_dump_table */ +static void mmu_dump_table(const char * label, uaecptr root_ptr) +{ + DUNUSED(label); + const int ROOT_TABLE_SIZE = 128, + PTR_TABLE_SIZE = 128, + PAGE_TABLE_SIZE = regs.mmu_pagesize_8k ? 32 : 64, + ROOT_INDEX_SHIFT = 25, + PTR_INDEX_SHIFT = 18; + const uae_u32 ptr_addr_mask = (regs.mmu_pagesize_8k ? MMU_PTR_PAGE_ADDR_MASK_8 : MMU_PTR_PAGE_ADDR_MASK_4); + const uae_u32 page_addr_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_ADDR_MASK_8 : MMU_PAGE_ADDR_MASK_4); + const uae_u32 page_ur_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_UR_MASK_8 : MMU_PAGE_UR_MASK_4); + const uae_u32 page_size = (regs.mmu_pagesize_8k ? (1 << 13) : (1 << 12)); + int root_idx, ptr_idx, page_idx; + uae_u32 root_des, ptr_des, page_des; + uaecptr ptr_des_addr, page_addr, + root_log, ptr_log, page_log; + + D(bug("%s: root=%x", label, root_ptr)); + + for (root_idx = 0; root_idx < ROOT_TABLE_SIZE; root_idx++) { + root_des = phys_get_long(root_ptr + (root_idx << 2)); + + if ((root_des & 2) == 0) + continue; /* invalid */ + + D(bug("ROOT: %03d U=%d W=%d UDT=%02d", root_idx, + root_des & 8 ? 1 : 0, + root_des & 4 ? 1 : 0, + root_des & 3 + )); + + root_log = root_idx << ROOT_INDEX_SHIFT; + + ptr_des_addr = root_des & MMU_ROOT_PTR_ADDR_MASK; + + for (ptr_idx = 0; ptr_idx < PTR_TABLE_SIZE; ptr_idx++) { + struct { + uaecptr log, phys; + int start_idx, n_pages; /* number of pages covered by this entry */ + uae_u32 match; + } page_info[PAGE_TABLE_SIZE]; + int n_pages_used; + + ptr_des = phys_get_long(ptr_des_addr + (ptr_idx << 2)); + ptr_log = root_log | (ptr_idx << PTR_INDEX_SHIFT); + + if ((ptr_des & 2) == 0) + continue; /* invalid */ + + page_addr = ptr_des & ptr_addr_mask; + + n_pages_used = -1; + for (page_idx = 0; page_idx < PAGE_TABLE_SIZE; page_idx++) { + + page_des = phys_get_long(page_addr + (page_idx << 2)); + page_log = ptr_log | (page_idx * page_size); + + switch (page_des & 3) { + case 0: /* invalid */ + continue; + case 1: case 3: /* resident */ + case 2: /* indirect */ + if (n_pages_used == -1 || + (page_info[n_pages_used].match & ~page_addr_mask) != (page_des & ~page_addr_mask) || + page_info[n_pages_used].phys + (page_info[n_pages_used].n_pages * page_size) != (page_des & page_addr_mask)) + { + /* use the next entry */ + n_pages_used++; + + page_info[n_pages_used].match = page_des; + page_info[n_pages_used].n_pages = 1; + page_info[n_pages_used].start_idx = page_idx; + page_info[n_pages_used].log = page_log; + page_info[n_pages_used].phys = page_des & page_addr_mask; + } else { + page_info[n_pages_used].n_pages++; + } + break; + } + } + + if (n_pages_used == -1) + continue; + + D(bug(" PTR: %03d U=%d W=%d UDT=%02d", ptr_idx, + ptr_des & 8 ? 1 : 0, + ptr_des & 4 ? 1 : 0, + ptr_des & 3 + )); + + + for (page_idx = 0; page_idx <= n_pages_used; page_idx++) { + page_des = page_info[page_idx].match; + + if ((page_des & MMU_PDT_MASK) == 2) { + D(bug(" PAGE: %03d-%03d log=%08x INDIRECT --> addr=%08x", + page_info[page_idx].start_idx, + page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, + page_info[page_idx].log, + page_des & MMU_PAGE_INDIRECT_MASK + )); + + } else { + D(bug(" PAGE: %03d-%03d log=%08x addr=%08x UR=%02d G=%d U1/0=%d S=%d CM=%d M=%d U=%d W=%d", + page_info[page_idx].start_idx, + page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, + page_info[page_idx].log, + page_info[page_idx].phys, + (page_des & page_ur_mask) >> MMU_PAGE_UR_SHIFT, + page_des & MMU_DES_GLOBAL ? 1 : 0, + (page_des & MMU_TTR_UX_MASK) >> MMU_TTR_UX_SHIFT, + page_des & MMU_DES_SUPER ? 1 : 0, + (page_des & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT, + page_des & MMU_DES_MODIFIED ? 1 : 0, + page_des & MMU_DES_USED ? 1 : 0, + page_des & MMU_DES_WP ? 1 : 0 + )); + } + } + } + + } +} +/* }}} */ +#endif + +/* {{{ mmu_dump_atc */ +void mmu_dump_atc(void) +{ + int i, j; + for (i = 0; i < 2; i++) { + for (j = 0; j < ATC_L2_SIZE; j++) { + if (atc_l2[i][j].tag == 0x8000) + continue; + D(bug("ATC[%02d] G=%d TT=%d M=%d WP=%d VD=%d VI=%d tag=%08x --> phys=%08x", + j, atc_l2[i][j].global, atc_l2[i][j].tt, atc_l2[i][j].modified, + atc_l2[i][j].write_protect, atc_l2[i][j].valid_data, atc_l2[i][j].valid_inst, + atc_l2[i][j].tag, atc_l2[i][j].phys)); + } + } +} +/* }}} */ + +/* {{{ mmu_dump_tables */ +void mmu_dump_tables(void) +{ + D(bug("URP: %08x SRP: %08x MMUSR: %x TC: %x", regs.urp, regs.srp, regs.mmusr, regs.tc)); + mmu_dump_ttr("DTT0", regs.dtt0); + mmu_dump_ttr("DTT1", regs.dtt1); + mmu_dump_ttr("ITT0", regs.itt0); + mmu_dump_ttr("ITT1", regs.itt1); + mmu_dump_atc(); + //mmu_dump_table("SRP", regs.srp); +} +/* }}} */ + +static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write); + +static ALWAYS_INLINE int mmu_get_fc(bool super, bool data) +{ + return (super ? 4 : 0) | (data ? 1 : 2); +} + +static void mmu_bus_error(uaecptr addr, int fc, int write, int size) +{ + uae_u16 ssw = 0; + + ssw |= fc & MMU_SSW_TM; /* Copy TM */ + switch (size) { + case sz_byte: + ssw |= MMU_SSW_SIZE_B; + break; + case sz_word: + ssw |= MMU_SSW_SIZE_W; + break; + case sz_long: + ssw |= MMU_SSW_SIZE_L; + break; + } + + regs.wb3_status = write ? 0x80 | ssw : 0; + if (!write) + ssw |= MMU_SSW_RW; + + regs.mmu_fault_addr = addr; + regs.mmu_ssw = ssw | MMU_SSW_ATC; + + D(bug("BUS ERROR: fc=%d w=%d log=%08x ssw=%04x", fc, write, addr, ssw)); + + breakpt(); + THROW(2); +} + +/* + * Update the atc line for a given address by doing a mmu lookup. + */ +static uaecptr mmu_fill_atc_l2(uaecptr addr, int super, int data, int write, + struct mmu_atc_line *l) +{ + int res; + uae_u32 desc; + + l->tag = ATC_TAG(addr); + l->hw = l->bus_fault = 0; + + /* check ttr0 */ + res = mmu_match_ttr(addr, super, data); + if (res != TTR_NO_MATCH) { + l->tt = 1; + if (data) { + l->valid_data = 1; + l->valid_inst = mmu_match_ttr(addr, super, 0) == res; + } else { + l->valid_inst = 1; + l->valid_data = mmu_match_ttr(addr, super, 1) == res; + } + l->global = 1; + l->modified = 1; + l->write_protect = (res == TTR_NO_WRITE); + l->phys = 0; + + return 0; + } + + l->tt = 0; + if (!regs.mmu_enabled) { + l->valid_data = l->valid_inst = 1; + l->global = 1; + l->modified = 1; + l->write_protect = 0; + l->phys = 0; + return 0; + } + + SAVE_EXCEPTION; + TRY(prb) { + desc = mmu_lookup_pagetable(addr, super, write); + D(bug("translate: %x,%u,%u,%u -> %x", addr, super, write, data, desc)); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + /* bus error during table search */ + desc = 0; + goto fail; + } + + if ((desc & 1) == 0 || (!super && desc & MMU_MMUSR_S)) { + fail: + l->valid_data = l->valid_inst = 0; + l->global = 0; + } else { + l->valid_data = l->valid_inst = 1; + if (regs.mmu_pagesize_8k) + l->phys = (desc & ~0x1fff) - (addr & ~0x1fff); + else + l->phys = (desc & ~0xfff) - (addr & ~0xfff); + l->global = (desc & MMU_MMUSR_G) != 0; + l->modified = (desc & MMU_MMUSR_M) != 0; + l->write_protect = (desc & MMU_MMUSR_W) != 0; + } + + return desc; +} + +static ALWAYS_INLINE bool +mmu_fill_atc_l1(uaecptr addr, int super, int data, int write, + struct mmu_atc_line *l1) +{ + int idx = ATC_L2_INDEX(addr); + int tag = ATC_TAG(addr); + struct mmu_atc_line *l = &atc_l2[super][idx]; + uaecptr phys_addr; + + if (l->tag != tag) { + restart: + mmu_fill_atc_l2(addr, super, data, write, l); + } + if (!(data ? l->valid_data : l->valid_inst)) { + D(bug("MMU: non-resident page (%x,%x,%x)!", addr, regs.pc, regs.fault_pc)); + goto fail; + } + if (write) { + if (l->write_protect) { + D(bug("MMU: write protected (via %s) %x", l->tt ? "ttr" : "atc", addr)); + goto fail; + } + if (!l->modified) + goto restart; + } + *l1 = *l; + + phys_addr = addr + l1->phys; + if ((phys_addr & 0xfff00000) == 0x00f00000) { + l1->hw = 1; + goto fail; + } + if ((phys_addr & 0xfff00000) == 0xfff00000) { + l1->hw = 1; + l1->phys -= 0xff000000; + goto fail; + } + + if (!test_ram_boundary(phys_addr, 1, super, write)) { + l1->bus_fault = 1; + goto fail; + } + + return true; + +fail: + l1->tag = ~l1->tag; + return false; +} + +uaecptr mmu_translate(uaecptr addr, int super, int data, int write) +{ + struct mmu_atc_line *l; + + l = &atc_l2[super][ATC_L2_INDEX(addr)]; + mmu_fill_atc_l2(addr, super, data, write, l); + if (!(data ? l->valid_data : l->valid_inst)) + { + breakpt(); + THROW(2); + } + + return addr + l->phys; +} + +/* + * Lookup the address by walking the page table and updating + * the page descriptors accordingly. Returns the found descriptor + * or produces a bus error. + */ +static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write) +{ + uae_u32 desc, desc_addr, wp; + int i; + + wp = 0; + desc = super ? regs.srp : regs.urp; + + /* fetch root table descriptor */ + i = (addr >> 23) & 0x1fc; + desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; + desc = phys_get_long(desc_addr); + if ((desc & 2) == 0) { + D(bug("MMU: invalid root descriptor for %x", addr)); + return 0; + } + + wp |= desc; + if ((desc & MMU_DES_USED) == 0) + phys_put_long(desc_addr, desc | MMU_DES_USED); + + /* fetch pointer table descriptor */ + i = (addr >> 16) & 0x1fc; + desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; + desc = phys_get_long(desc_addr); + if ((desc & 2) == 0) { + D(bug("MMU: invalid ptr descriptor for %x", addr)); + return 0; + } + wp |= desc; + if ((desc & MMU_DES_USED) == 0) + phys_put_long(desc_addr, desc | MMU_DES_USED); + + /* fetch page table descriptor */ + if (regs.mmu_pagesize_8k) { + i = (addr >> 11) & 0x7c; + desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_8) | i; + } else { + i = (addr >> 10) & 0xfc; + desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_4) | i; + } + + desc = phys_get_long(desc_addr); + if ((desc & 3) == 2) { + /* indirect */ + desc_addr = desc & MMU_PAGE_INDIRECT_MASK; + desc = phys_get_long(desc_addr); + } + if ((desc & 1) == 0) { + D(bug("MMU: invalid page descriptor log=%08x desc=%08x @%08x", addr, desc, desc_addr)); + return desc; + } + + desc |= wp & MMU_DES_WP; + if (write) { + if (desc & MMU_DES_WP) { + if ((desc & MMU_DES_USED) == 0) { + desc |= MMU_DES_USED; + phys_put_long(desc_addr, desc); + } + } else if ((desc & (MMU_DES_USED|MMU_DES_MODIFIED)) != + (MMU_DES_USED|MMU_DES_MODIFIED)) { + desc |= MMU_DES_USED|MMU_DES_MODIFIED; + phys_put_long(desc_addr, desc); + } + } else { + if ((desc & MMU_DES_USED) == 0) { + desc |= MMU_DES_USED; + phys_put_long(desc_addr, desc); + } + } + return desc; +} + +uae_u16 mmu_get_word_unaligned(uaecptr addr, int data) +{ + uae_u16 res; + + res = (uae_u16)mmu_get_byte(addr, data, sz_word) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_byte(addr + 1, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + return res; +} + +uae_u32 mmu_get_long_unaligned(uaecptr addr, int data) +{ + uae_u32 res; + + if (likely(!(addr & 1))) { + res = (uae_u32)mmu_get_word(addr, data, sz_long) << 16; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_word(addr + 2, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } else { + res = (uae_u32)mmu_get_byte(addr, data, sz_long) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res = (res | mmu_get_byte(addr + 1, data, sz_long)) << 8; + res = (res | mmu_get_byte(addr + 2, data, sz_long)) << 8; + res |= mmu_get_byte(addr + 3, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } + return res; +} + +uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_b(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); +} + +uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_w(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); +} + +uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_l(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); +} + + +uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, + struct mmu_atc_line *cl) +{ + uae_u64 h = mmu_get_long_slow(addr, super, data, sz_long, cl); + uae_u64 l = mmu_get_long_slow(addr + 4, super, data, sz_long, cl); + return (h << 32) | l; +} + +REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data) +{ + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!(addr & 1))) { + mmu_put_word(addr, val >> 16, data, sz_long); + mmu_put_word(addr + 2, val, data, sz_long); + } else { + mmu_put_byte(addr, val >> 24, data, sz_long); + mmu_put_byte(addr + 1, val >> 16, data, sz_long); + mmu_put_byte(addr + 2, val >> 8, data, sz_long); + mmu_put_byte(addr + 3, val, data, sz_long); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data) +{ + SAVE_EXCEPTION; + TRY(prb) { + mmu_put_byte(addr, val >> 8, data, sz_word); + mmu_put_byte(addr + 1, val, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_b(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_w(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_l(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, + struct mmu_atc_line *cl) +{ + mmu_put_long_slow(addr, (uae_u32)(val >> 32), super, data, sz_long, cl); + mmu_put_long_slow(addr + 4, (uae_u32)(val), super, data, sz_long, cl); +} + +uae_u32 sfc_get_long(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + uae_u32 res; + + if (likely(!is_unaligned(addr, 4))) + return mmu_get_user_long(addr, super, data, sz_long); + + if (likely(!(addr & 1))) { + res = (uae_u32)mmu_get_user_word(addr, super, data, sz_long) << 16; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_user_word(addr + 2, super, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } else { + res = (uae_u32)mmu_get_user_byte(addr, super, data, sz_long) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res = (res | mmu_get_user_byte(addr + 1, super, data, sz_long)) << 8; + res = (res | mmu_get_user_byte(addr + 2, super, data, sz_long)) << 8; + res |= mmu_get_user_byte(addr + 3, super, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } + return res; +} + +uae_u16 sfc_get_word(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + uae_u16 res; + + if (likely(!is_unaligned(addr, 2))) + return mmu_get_user_word(addr, super, data, sz_word); + + res = (uae_u16)mmu_get_user_byte(addr, super, data, sz_word) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_user_byte(addr + 1, super, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + return res; +} + +uae_u8 sfc_get_byte(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + + return mmu_get_user_byte(addr, super, data, sz_byte); +} + +void dfc_put_long(uaecptr addr, uae_u32 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!is_unaligned(addr, 4))) + mmu_put_user_long(addr, val, super, data, sz_long); + else if (likely(!(addr & 1))) { + mmu_put_user_word(addr, val >> 16, super, data, sz_long); + mmu_put_user_word(addr + 2, val, super, data, sz_long); + } else { + mmu_put_user_byte(addr, val >> 24, super, data, sz_long); + mmu_put_user_byte(addr + 1, val >> 16, super, data, sz_long); + mmu_put_user_byte(addr + 2, val >> 8, super, data, sz_long); + mmu_put_user_byte(addr + 3, val, super, data, sz_long); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +void dfc_put_word(uaecptr addr, uae_u16 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!is_unaligned(addr, 2))) + mmu_put_user_word(addr, val, super, data, sz_word); + else { + mmu_put_user_byte(addr, val >> 8, super, data, sz_word); + mmu_put_user_byte(addr + 1, val, super, data, sz_word); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +void dfc_put_byte(uaecptr addr, uae_u8 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + mmu_put_user_byte(addr, val, super, data, sz_byte); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + breakpt(); + THROW_AGAIN(prb); + } +} + +void mmu_op(uae_u32 opcode, uae_u16 extra) +{ + int super = (regs.dfc & 4) != 0; + DUNUSED(extra); + if ((opcode & 0xFE0) == 0x0500) { + int regno, glob; + //D(didflush = 0); + uae_u32 addr; + /* PFLUSH */ + regno = opcode & 7; + glob = (opcode & 8) != 0; + + if (opcode & 16) { + D(bug("pflusha(%u,%u)", glob, regs.dfc)); + mmu_flush_atc_all(glob); + } else { + addr = m68k_areg(regs, regno); + D(bug("pflush(%u,%u,%x)", glob, regs.dfc, addr)); + mmu_flush_atc(addr, super, glob); + } + flush_internals(); +#ifdef USE_JIT + flush_icache(0); +#endif + } else if ((opcode & 0x0FD8) == 0x548) { + int write, regno; + uae_u32 addr; + + regno = opcode & 7; + write = (opcode & 32) == 0; + addr = m68k_areg(regs, regno); + //bug("ptest(%u,%u,%x)", write, regs.dfc, addr); + D(bug("PTEST%c (A%d) %08x DFC=%d", write ? 'W' : 'R', regno, addr, regs.dfc)); + mmu_flush_atc(addr, super, true); + SAVE_EXCEPTION; + TRY(prb) { + struct mmu_atc_line *l; + uae_u32 desc; + bool data = (regs.dfc & 3) != 2; + + l = &atc_l2[super][ATC_L2_INDEX(addr)]; + desc = mmu_fill_atc_l2(addr, super, data, write, l); + if (!(data ? l->valid_data : l->valid_inst)) + regs.mmusr = MMU_MMUSR_B; + else if (l->tt) + regs.mmusr = MMU_MMUSR_T | MMU_MMUSR_R; + else { + regs.mmusr = desc & (~0xfff|MMU_MMUSR_G|MMU_MMUSR_Ux|MMU_MMUSR_S| + MMU_MMUSR_CM|MMU_MMUSR_M|MMU_MMUSR_W); + regs.mmusr |= MMU_MMUSR_R; + } + } + CATCH(prb) { + regs.mmusr = MMU_MMUSR_B; + } + RESTORE_EXCEPTION; + D(bug("PTEST result: mmusr %08x", regs.mmusr)); + } else + op_illg (opcode); +} + +void mmu_flush_atc(uaecptr addr, bool super, bool global) +{ + struct mmu_atc_line *l; + int i, j; + + l = atc_l1[super][0][0]; + i = ATC_L1_INDEX(addr); + for (j = 0; j < 4; j++) { + if (global || !l[i].global) + l[i].tag = 0x8000; + l += ATC_L1_SIZE; + } + if (regs.mmu_pagesize_8k) { + i = ATC_L1_INDEX(addr) ^ 1; + for (j = 0; j < 4; j++) { + if (global || !l[i].global) + l[i].tag = 0x8000; + l += ATC_L1_SIZE; + } + } + l = atc_l2[super]; + i = ATC_L2_INDEX(addr); + if (global || !l[i].global) + l[i].tag = 0x8000; + if (regs.mmu_pagesize_8k) { + i ^= 1; + if (global || !l[i].global) + l[i].tag = 0x8000; + } +} + +void mmu_flush_atc_all(bool global) +{ + struct mmu_atc_line *l; + unsigned int i; + + l = atc_l1[0][0][0]; + for (i = 0; i < sizeof(atc_l1) / sizeof(*l); l++, i++) { + if (global || !l->global) + l->tag = 0x8000; + } + + l = atc_l2[0]; + for (i = 0; i < sizeof(atc_l2) / sizeof(*l); l++, i++) { + if (global || !l->global) + l->tag = 0x8000; + } +} + +void mmu_reset(void) +{ + mmu_flush_atc_all(true); + + regs.urp = regs.srp = 0; + regs.itt0 = regs.itt1 = 0; + regs.dtt0 = regs.dtt1 = 0; + regs.mmusr = 0; +} + + +void mmu_set_tc(uae_u16 tc) +{ + if (regs.tc == tc) + return; + + regs.tc = tc; + regs.mmu_enabled = tc & 0x8000 ? 1 : 0; + regs.mmu_pagesize_8k = tc & 0x4000 ? 1 : 0; + mmu_flush_atc_all(true); + + D(bug("MMU: enabled=%d page8k=%d\n", regs.mmu_enabled, regs.mmu_pagesize_8k)); +} + +void mmu_set_super(bool super) +{ + current_atc = &atc_l1[super]; +} + +#else + +void mmu_op(uae_u32 opcode, uae_u16 /*extra*/) +{ + if ((opcode & 0xFE0) == 0x0500) { + /* PFLUSH instruction */ + flush_internals(); + } else if ((opcode & 0x0FD8) == 0x548) { + /* PTEST instruction */ + } else + op_illg(opcode); +} + +#endif + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/cpummu.h b/BasiliskII/src/uae_cpu/cpummu.h new file mode 100644 index 000000000..01359f6f5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpummu.h @@ -0,0 +1,267 @@ +/* + * cpummu.h - MMU emulation + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by UAE MMU patch + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef CPUMMU_H +#define CPUMMU_H + +#include "registers.h" + +# include + +#define MMU_TEST_PTEST 1 +#define MMU_TEST_VERBOSE 2 +#define MMU_TEST_FORCE_TABLE_SEARCH 4 +#define MMU_TEST_NO_BUSERR 8 + +extern void mmu_dump_tables(void); + +#define MMU_TTR_LOGICAL_BASE 0xff000000 +#define MMU_TTR_LOGICAL_MASK 0x00ff0000 +#define MMU_TTR_BIT_ENABLED (1 << 15) +#define MMU_TTR_BIT_SFIELD_ENABLED (1 << 14) +#define MMU_TTR_BIT_SFIELD_SUPER (1 << 13) +#define MMU_TTR_SFIELD_SHIFT 13 +#define MMU_TTR_UX_MASK ((1 << 9) | (1 << 8)) +#define MMU_TTR_UX_SHIFT 8 +#define MMU_TTR_CACHE_MASK ((1 << 6) | (1 << 5)) +#define MMU_TTR_CACHE_SHIFT 5 +#define MMU_TTR_BIT_WRITE_PROTECT (1 << 2) + +#define MMU_UDT_MASK 3 +#define MMU_PDT_MASK 3 + +#define MMU_DES_WP 4 +#define MMU_DES_USED 8 + +/* page descriptors only */ +#define MMU_DES_MODIFIED 16 +#define MMU_DES_SUPER (1 << 7) +#define MMU_DES_GLOBAL (1 << 10) + +#define MMU_ROOT_PTR_ADDR_MASK 0xfffffe00 +#define MMU_PTR_PAGE_ADDR_MASK_8 0xffffff80 +#define MMU_PTR_PAGE_ADDR_MASK_4 0xffffff00 + +#define MMU_PAGE_INDIRECT_MASK 0xfffffffc +#define MMU_PAGE_ADDR_MASK_8 0xffffe000 +#define MMU_PAGE_ADDR_MASK_4 0xfffff000 +#define MMU_PAGE_UR_MASK_8 ((1 << 12) | (1 << 11)) +#define MMU_PAGE_UR_MASK_4 (1 << 11) +#define MMU_PAGE_UR_SHIFT 11 + +#define MMU_MMUSR_ADDR_MASK 0xfffff000 +#define MMU_MMUSR_B (1 << 11) +#define MMU_MMUSR_G (1 << 10) +#define MMU_MMUSR_U1 (1 << 9) +#define MMU_MMUSR_U0 (1 << 8) +#define MMU_MMUSR_Ux (MMU_MMUSR_U1 | MMU_MMUSR_U0) +#define MMU_MMUSR_S (1 << 7) +#define MMU_MMUSR_CM ((1 << 6) | ( 1 << 5)) +#define MMU_MMUSR_M (1 << 4) +#define MMU_MMUSR_W (1 << 2) +#define MMU_MMUSR_T (1 << 1) +#define MMU_MMUSR_R (1 << 0) + +/* special status word (access error stack frame) */ +#define MMU_SSW_TM 0x0007 +#define MMU_SSW_TT 0x0018 +#define MMU_SSW_SIZE 0x0060 +#define MMU_SSW_SIZE_B 0x0020 +#define MMU_SSW_SIZE_W 0x0040 +#define MMU_SSW_SIZE_L 0x0000 +#define MMU_SSW_RW 0x0100 +#define MMU_SSW_LK 0x0200 +#define MMU_SSW_ATC 0x0400 +#define MMU_SSW_MA 0x0800 + +#define TTR_I0 4 +#define TTR_I1 5 +#define TTR_D0 6 +#define TTR_D1 7 + +#define TTR_NO_MATCH 0 +#define TTR_NO_WRITE 1 +#define TTR_OK_MATCH 2 + +struct mmu_atc_line { + uae_u16 tag; + unsigned tt : 1; + unsigned valid_data : 1; + unsigned valid_inst : 1; + unsigned global : 1; + unsigned modified : 1; + unsigned write_protect : 1; + unsigned hw : 1; + unsigned bus_fault : 1; + uaecptr phys; +}; + +/* + * We don't need to store the whole logical address in the atc cache, as part of + * it is encoded as index into the cache. 14 bits of the address are stored in + * the tag, this means at least 6 bits must go into the index. The upper two + * bits of the tag define the type of data in the atc line: + * - 00: a normal memory address + * - 11: invalid memory address or hardware access + * (generated via ~ATC_TAG(addr) in the slow path) + * - 10: empty atc line + */ + +#define ATC_TAG_SHIFT 18 +#define ATC_TAG(addr) ((uae_u32)(addr) >> ATC_TAG_SHIFT) + + +#define ATC_L1_SIZE_LOG 8 +#define ATC_L1_SIZE (1 << ATC_L1_SIZE_LOG) + +#define ATC_L1_INDEX(addr) (((addr) >> 12) % ATC_L1_SIZE) + +/* + * first level atc cache + * indexed by [super][data][rw][idx] + */ + +typedef struct mmu_atc_line mmu_atc_l1_array[2][2][ATC_L1_SIZE]; +extern mmu_atc_l1_array atc_l1[2]; +extern mmu_atc_l1_array *current_atc; + +#define ATC_L2_SIZE_LOG 12 +#define ATC_L2_SIZE (1 << ATC_L2_SIZE_LOG) + +#define ATC_L2_INDEX(addr) ((((addr) >> 12) ^ ((addr) >> (32 - ATC_L2_SIZE_LOG))) % ATC_L2_SIZE) + +extern struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; + +/* + * lookup address in the level 1 atc cache, + * the data and write arguments are constant in the common, + * thus allows gcc to generate a constant offset. + */ +static ALWAYS_INLINE int mmu_lookup(uaecptr addr, bool data, bool write, + struct mmu_atc_line **cl) +{ + addr >>= 12; + *cl = &(*current_atc)[data][write][addr % ATC_L1_SIZE]; + return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); +} + +/* + * similiar to mmu_user_lookup, but for the use of the moves instruction + */ +static ALWAYS_INLINE int mmu_user_lookup(uaecptr addr, bool super, bool data, + bool write, struct mmu_atc_line **cl) +{ + addr >>= 12; + *cl = &atc_l1[super][data][write][addr % ATC_L1_SIZE]; + return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); +} + +extern REGPARAM2 uae_u16 mmu_get_word_unaligned(uaecptr addr, int data); +extern REGPARAM2 uae_u32 mmu_get_long_unaligned(uaecptr addr, int data); + +extern REGPARAM2 uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, + struct mmu_atc_line *cl); + +extern REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data); +extern REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data); + +extern REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, + struct mmu_atc_line *cl); + +extern void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode); + +static inline void mmu_set_ttr(int regno, uae_u32 val) +{ + uae_u32 * ttr; + switch(regno) { + case TTR_I0: ttr = ®s.itt0; break; + case TTR_I1: ttr = ®s.itt1; break; + case TTR_D0: ttr = ®s.dtt0; break; + case TTR_D1: ttr = ®s.dtt1; break; + default: abort(); + } + *ttr = val; +} + +static inline void mmu_set_mmusr(uae_u32 val) +{ + regs.mmusr = val; +} + +#define FC_DATA (regs.s ? 5 : 1) +#define FC_INST (regs.s ? 6 : 2) + +extern uaecptr REGPARAM2 mmu_translate(uaecptr addr, int super, int data, int write); + +extern uae_u32 REGPARAM2 sfc_get_long(uaecptr addr); +extern uae_u16 REGPARAM2 sfc_get_word(uaecptr addr); +extern uae_u8 REGPARAM2 sfc_get_byte(uaecptr addr); +extern void REGPARAM2 dfc_put_long(uaecptr addr, uae_u32 val); +extern void REGPARAM2 dfc_put_word(uaecptr addr, uae_u16 val); +extern void REGPARAM2 dfc_put_byte(uaecptr addr, uae_u8 val); + + +extern void REGPARAM2 mmu_flush_atc(uaecptr addr, bool super, bool global); +extern void REGPARAM2 mmu_flush_atc_all(bool global); +extern void REGPARAM2 mmu_op(uae_u32 opcode, uae_u16 extra); + +#ifdef FULLMMU + +extern void REGPARAM2 mmu_reset(void); +extern void REGPARAM2 mmu_set_tc(uae_u16 tc); +extern void REGPARAM2 mmu_set_super(bool super); + +#else + +static inline void mmu_reset(void) +{ +} + +static inline void mmu_set_tc(uae_u16 /*tc*/) +{ +} + +static inline void mmu_set_super(bool /*super*/) +{ +} + +#endif + +#endif /* CPUMMU_H */ +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/cpuopti.c b/BasiliskII/src/uae_cpu/cpuopti.c deleted file mode 100644 index 2dc105070..000000000 --- a/BasiliskII/src/uae_cpu/cpuopti.c +++ /dev/null @@ -1,298 +0,0 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * cpuopti.c - Small optimizer for cpu*.s files - * Based on work by Tauno Taipaleenmaki - * - * Copyright 1996 Bernd Schmidt - */ - -#include -#include -#include - -#include "sysdeps.h" - -struct line { - struct line *next, *prev; - int delet; - char *data; -}; - -struct func { - struct line *first_line, *last_line; - int initial_offset; -}; - -static void oops(void) -{ - fprintf(stderr, "Don't know how to optimize this file.\n"); - abort(); -} - -static char * match(struct line *l, const char *m) -{ - char *str = l->data; - int len = strlen(m); - while (isspace(*str)) - str++; - - if (strncmp(str, m, len) != 0) - return NULL; - return str + len; -} - -static int insn_references_reg (struct line *l, char *reg) -{ - if (reg[0] != 'e') { - fprintf(stderr, "Unknown register?!?\n"); - abort(); - } - if (strstr (l->data, reg) != 0) - return 1; - if (strstr (l->data, reg+1) != 0) - return 1; - if (strcmp (reg, "eax") == 0 - && (strstr (l->data, "%al") != 0 || strstr (l->data, "%ah") != 0)) - return 1; - if (strcmp (reg, "ebx") == 0 - && (strstr (l->data, "%bl") != 0 || strstr (l->data, "%bh") != 0)) - return 1; - if (strcmp (reg, "ecx") == 0 - && (strstr (l->data, "%cl") != 0 || strstr (l->data, "%ch") != 0)) - return 1; - if (strcmp (reg, "edx") == 0 - && (strstr (l->data, "%dl") != 0 || strstr (l->data, "%dh") != 0)) - return 1; - return 0; -} - -static void do_function(struct func *f) -{ - int v; - int pops_at_end = 0; - struct line *l, *l1, *fl, *l2; - char *s, *s2; - int in_pop_area = 1; - - f->initial_offset = 0; - - l = f->last_line; - fl = f->first_line; - - if (match(l,".LFE")) - l = l->prev; - if (!match(l,"ret")) - oops(); - - while (!match(fl, "op_")) - fl = fl->next; - fl = fl->next; - - /* Try reordering the insns at the end of the function so that the - * pops are all at the end. */ - l2 = l->prev; - /* Tolerate one stack adjustment */ - if (match (l2, "addl $") && strstr(l2->data, "esp") != 0) - l2 = l2->prev; - for (;;) { - char *forbidden_reg; - struct line *l3, *l4; - - while (match (l2, "popl %")) - l2 = l2->prev; - - l3 = l2; - for (;;) { - forbidden_reg = match (l3, "popl %"); - if (forbidden_reg) - break; - if (l3 == fl) - goto reordered; - /* Jumps and labels put an end to our attempts... */ - if (strstr (l3->data, ".L") != 0) - goto reordered; - /* Likewise accesses to the stack pointer... */ - if (strstr (l3->data, "esp") != 0) - goto reordered; - /* Function calls... */ - if (strstr (l3->data, "call") != 0) - goto reordered; - l3 = l3->prev; - } - if (l3 == l2) - abort(); - for (l4 = l2; l4 != l3; l4 = l4->prev) { - /* The register may not be referenced by any of the insns that we - * move the popl past */ - if (insn_references_reg (l4, forbidden_reg)) - goto reordered; - } - l3->prev->next = l3->next; - l3->next->prev = l3->prev; - l2->next->prev = l3; - l3->next = l2->next; - l2->next = l3; - l3->prev = l2; - } -reordered: - - l = l->prev; - - s = match (l, "addl $"); - s2 = match (fl, "subl $"); - - l1 = l; - if (s == 0) { - char *t = match (l, "popl %"); - if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { - s = "4,%esp"; - l = l->prev; - t = match (l, "popl %"); - if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { - s = "8,%esp"; - l = l->prev; - } - } - } else { - l = l->prev; - } - - if (s && s2) { - int v = 0; - if (strcmp (s, s2) != 0) { - fprintf (stderr, "Stack adjustment not matching.\n"); - return; - } - - while (isdigit(*s)) { - v = v * 10 + (*s) - '0'; - s++; - } - - if (strcmp (s, ",%esp") != 0) { - fprintf (stderr, "Not adjusting the stack pointer.\n"); - return; - } - f->initial_offset = v; - fl->delet = 3; - fl = fl->next; - l1->delet = 2; - l1 = l1->prev; - while (l1 != l) { - l1->delet = 1; - l1 = l1->prev; - } - } - - while (in_pop_area) { - char *popm, *pushm; - popm = match (l, "popl %"); - pushm = match (fl, "pushl %"); - if (popm && pushm && strcmp(pushm, popm) == 0) { - pops_at_end++; - fl->delet = l->delet = 1; - } else - in_pop_area = 0; - l = l->prev; - fl = fl->next; - } - if (f->initial_offset) - f->initial_offset += 4 * pops_at_end; -} - -static void output_function(struct func *f) -{ - struct line *l = f->first_line; - - while (l) { - switch (l->delet) { - case 1: - break; - case 0: - printf("%s\n", l->data); - break; - case 2: - if (f->initial_offset) - printf("\taddl $%d,%%esp\n", f->initial_offset); - break; - case 3: - if (f->initial_offset) - printf("\tsubl $%d,%%esp\n", f->initial_offset); - break; - } - l = l->next; - } -} - -int main(int argc, char **argv) -{ - FILE *infile = stdin; - char tmp[4096]; - -#ifdef __mc68000__ - if(system("perl machdep/cpuopti")==-1) { - perror("perl machdep/cpuopti"); - return 10; - } else return 0; -#endif - - /* For debugging... */ - if (argc == 2) - infile = fopen (argv[1], "r"); - - for(;;) { - char *s; - - if ((fgets(tmp, 4095, infile)) == NULL) - break; - - s = strchr (tmp, '\n'); - if (s != NULL) - *s = 0; - - if (strncmp(tmp, ".globl op_", 10) == 0) { - struct line *first_line = NULL, *prev = NULL; - struct line **nextp = &first_line; - struct func f; - int nr_rets = 0; - int can_opt = 1; - - do { - struct line *current; - - if (strcmp (tmp, "#APP") != 0 && strcmp (tmp, "#NO_APP") != 0) { - current = *nextp = (struct line *)malloc(sizeof (struct line)); - nextp = ¤t->next; - current->prev = prev; prev = current; - current->next = NULL; - current->delet = 0; - current->data = strdup (tmp); - if (match (current, "movl %esp,%ebp") || match (current, "enter")) { - fprintf (stderr, "GCC failed to eliminate fp: %s\n", first_line->data); - can_opt = 0; - } - - if (match (current, "ret")) - nr_rets++; - } - if ((fgets(tmp, 4095, infile)) == NULL) - oops(); - s = strchr (tmp, '\n'); - if (s != NULL) - *s = 0; - } while (strncmp (tmp,".Lfe", 4) != 0); - - f.first_line = first_line; - f.last_line = prev; - - if (nr_rets == 1 && can_opt) - do_function(&f); - /*else - fprintf(stderr, "Too many RET instructions: %s\n", first_line->data);*/ - output_function(&f); - } - printf("%s\n", tmp); - } - return 0; -} diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp new file mode 100644 index 000000000..0ea660105 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp @@ -0,0 +1,2 @@ +#define NOFLAGS 1 +#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbla.cpp b/BasiliskII/src/uae_cpu/cpustbla.cpp new file mode 100644 index 000000000..f3f8e320c --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbla.cpp @@ -0,0 +1,5 @@ +/* + * cpustbl.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/debug.cpp b/BasiliskII/src/uae_cpu/debug.cpp new file mode 100644 index 000000000..8b2f14e00 --- /dev/null +++ b/BasiliskII/src/uae_cpu/debug.cpp @@ -0,0 +1,82 @@ +/* + * debug.cpp - CPU debugger + * + * Copyright (c) 2001-2010 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Bernd Schmidt's UAE + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +/* + * UAE - The Un*x Amiga Emulator + * + * Debugger + * + * (c) 1995 Bernd Schmidt + * + */ + +#include "sysdeps.h" + +#include "memory.h" +#include "newcpu.h" +#include "debug.h" + +#include "input.h" +#include "cpu_emulation.h" + +#include "main.h" + +static int debugger_active = 0; +int debugging = 0; +int irqindebug = 0; + +int ignore_irq = 0; + + +void activate_debugger (void) +{ +#ifdef DEBUGGER + ndebug::do_skip = false; +#endif + debugger_active = 1; + SPCFLAGS_SET( SPCFLAG_BRK ); + debugging = 1; + /* use_debugger = 1; */ +} + +void deactivate_debugger(void) +{ + debugging = 0; + debugger_active = 0; +} + +void debug (void) +{ + if (ignore_irq && regs.s && !regs.m ) { + SPCFLAGS_SET( SPCFLAG_BRK ); + return; + } +#ifdef DEBUGGER + ndebug::run(); +#endif +} + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu/fpu/core.h new file mode 100644 index 000000000..1801ff7c0 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/core.h @@ -0,0 +1,268 @@ +/* + * fpu/core.h - base fpu context definition + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_CORE_H +#define FPU_CORE_H + +#include "sysdeps.h" +#include "fpu/types.h" + +/* Always use x87 FPU stack on IA-32. */ +#if defined(X86_ASSEMBLY) +#define USE_X87_ASSEMBLY 1 +#ifndef USE_JIT_FPU +#define ACCURATE_SIN_COS_TAN 1 +#endif +#endif + +/* Only use x87 FPU on x86-64 if long double precision is requested. */ +#if defined(X86_64_ASSEMBLY) && defined(USE_LONG_DOUBLE) +#define USE_X87_ASSEMBLY 1 +#define ACCURATE_SIN_COS_TAN 1 +#endif + +/* ========================================================================== */ +/* ========================= FPU CONTEXT DEFINITION ========================= */ +/* ========================================================================== */ + +/* We don't use all features of the C++ language so that we may still + * easily backport that code to C. + */ + +struct fpu_t { + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Data Registers --- */ + /* ---------------------------------------------------------------------- */ + + /* The eight %fp0 .. %fp7 registers */ + fpu_register registers[8]; + + /* Used for lazy evalualation of FPU flags */ + fpu_register result; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Control Register --- */ + /* ---------------------------------------------------------------------- */ + + struct { + + /* Exception Enable Byte */ + uae_u32 exception_enable; + #define FPCR_EXCEPTION_ENABLE 0x0000ff00 + #define FPCR_EXCEPTION_BSUN 0x00008000 + #define FPCR_EXCEPTION_SNAN 0x00004000 + #define FPCR_EXCEPTION_OPERR 0x00002000 + #define FPCR_EXCEPTION_OVFL 0x00001000 + #define FPCR_EXCEPTION_UNFL 0x00000800 + #define FPCR_EXCEPTION_DZ 0x00000400 + #define FPCR_EXCEPTION_INEX2 0x00000200 + #define FPCR_EXCEPTION_INEX1 0x00000100 + + /* Mode Control Byte Mask */ + #define FPCR_MODE_CONTROL 0x000000ff + + /* Rounding precision */ + uae_u32 rounding_precision; + #define FPCR_ROUNDING_PRECISION 0x000000c0 + #define FPCR_PRECISION_SINGLE 0x00000040 + #define FPCR_PRECISION_DOUBLE 0x00000080 + #define FPCR_PRECISION_EXTENDED 0x00000000 + + /* Rounding mode */ + uae_u32 rounding_mode; + #define FPCR_ROUNDING_MODE 0x00000030 + #define FPCR_ROUND_NEAR 0x00000000 + #define FPCR_ROUND_ZERO 0x00000010 + #define FPCR_ROUND_MINF 0x00000020 + #define FPCR_ROUND_PINF 0x00000030 + + } fpcr; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Status Register --- */ + /* ---------------------------------------------------------------------- */ + + struct { + + /* Floating-Point Condition Code Byte */ + uae_u32 condition_codes; + #define FPSR_CCB 0x0f000000 + #define FPSR_CCB_NEGATIVE 0x08000000 + #define FPSR_CCB_ZERO 0x04000000 + #define FPSR_CCB_INFINITY 0x02000000 + #define FPSR_CCB_NAN 0x01000000 + + /* Quotient Byte */ + uae_u32 quotient; + #define FPSR_QUOTIENT 0x00ff0000 + #define FPSR_QUOTIENT_SIGN 0x00800000 + #define FPSR_QUOTIENT_VALUE 0x007f0000 + + /* Exception Status Byte */ + uae_u32 exception_status; + #define FPSR_EXCEPTION_STATUS FPCR_EXCEPTION_ENABLE + #define FPSR_EXCEPTION_BSUN FPCR_EXCEPTION_BSUN + #define FPSR_EXCEPTION_SNAN FPCR_EXCEPTION_SNAN + #define FPSR_EXCEPTION_OPERR FPCR_EXCEPTION_OPERR + #define FPSR_EXCEPTION_OVFL FPCR_EXCEPTION_OVFL + #define FPSR_EXCEPTION_UNFL FPCR_EXCEPTION_UNFL + #define FPSR_EXCEPTION_DZ FPCR_EXCEPTION_DZ + #define FPSR_EXCEPTION_INEX2 FPCR_EXCEPTION_INEX2 + #define FPSR_EXCEPTION_INEX1 FPCR_EXCEPTION_INEX1 + + /* Accrued Exception Byte */ + uae_u32 accrued_exception; + #define FPSR_ACCRUED_EXCEPTION 0x000000ff + #define FPSR_ACCR_IOP 0x00000080 + #define FPSR_ACCR_OVFL 0x00000040 + #define FPSR_ACCR_UNFL 0x00000020 + #define FPSR_ACCR_DZ 0x00000010 + #define FPSR_ACCR_INEX 0x00000008 + + } fpsr; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Instruction Address Register --- */ + /* ---------------------------------------------------------------------- */ + + uae_u32 instruction_address; + + /* ---------------------------------------------------------------------- */ + /* --- Initialization / Finalization --- */ + /* ---------------------------------------------------------------------- */ + + /* Flag set if we emulate an integral 68040 FPU */ + bool is_integral; + + /* ---------------------------------------------------------------------- */ + /* --- Extra FPE-dependant defines --- */ + /* ---------------------------------------------------------------------- */ + + #if defined(FPU_X86) \ + || (defined(FPU_UAE) && defined(USE_X87_ASSEMBLY)) \ + || (defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY)) + + #define CW_RESET 0x0040 // initial CW value after RESET + #define CW_FINIT 0x037F // initial CW value after FINIT + #define SW_RESET 0x0000 // initial SW value after RESET + #define SW_FINIT 0x0000 // initial SW value after FINIT + #define TW_RESET 0x5555 // initial TW value after RESET + #define TW_FINIT 0x0FFF // initial TW value after FINIT + + #define CW_X 0x1000 // infinity control + #define CW_RC_ZERO 0x0C00 // rounding control toward zero + #define CW_RC_UP 0x0800 // rounding control toward + + #define CW_RC_DOWN 0x0400 // rounding control toward - + #define CW_RC_NEAR 0x0000 // rounding control toward even + #define CW_PC_EXTENDED 0x0300 // precision control 64bit + #define CW_PC_DOUBLE 0x0200 // precision control 53bit + #define CW_PC_RESERVED 0x0100 // precision control reserved + #define CW_PC_SINGLE 0x0000 // precision control 24bit + #define CW_PM 0x0020 // precision exception mask + #define CW_UM 0x0010 // underflow exception mask + #define CW_OM 0x0008 // overflow exception mask + #define CW_ZM 0x0004 // zero divide exception mask + #define CW_DM 0x0002 // denormalized operand exception mask + #define CW_IM 0x0001 // invalid operation exception mask + + #define SW_B 0x8000 // busy flag + #define SW_C3 0x4000 // condition code flag 3 + #define SW_TOP_7 0x3800 // top of stack = ST(7) + #define SW_TOP_6 0x3000 // top of stack = ST(6) + #define SW_TOP_5 0x2800 // top of stack = ST(5) + #define SW_TOP_4 0x2000 // top of stack = ST(4) + #define SW_TOP_3 0x1800 // top of stack = ST(3) + #define SW_TOP_2 0x1000 // top of stack = ST(2) + #define SW_TOP_1 0x0800 // top of stack = ST(1) + #define SW_TOP_0 0x0000 // top of stack = ST(0) + #define SW_C2 0x0400 // condition code flag 2 + #define SW_C1 0x0200 // condition code flag 1 + #define SW_C0 0x0100 // condition code flag 0 + #define SW_ES 0x0080 // error summary status flag + #define SW_SF 0x0040 // stack fault flag + #define SW_PE 0x0020 // precision exception flag + #define SW_UE 0x0010 // underflow exception flag + #define SW_OE 0x0008 // overflow exception flag + #define SW_ZE 0x0004 // zero divide exception flag + #define SW_DE 0x0002 // denormalized operand exception flag + #define SW_IE 0x0001 // invalid operation exception flag + + #define X86_ROUNDING_MODE 0x0C00 + #define X86_ROUNDING_PRECISION 0x0300 + + #endif /* FPU_X86 */ + +}; + +/* We handle only one global fpu */ +extern fpu_t fpu; + +/* Return the address of a particular register */ +inline fpu_register * fpu_register_address(int i) + { return &fpu.registers[i]; } + +/* Dump functions for m68k_dumpstate */ +extern void fpu_dump_registers(void); +extern void fpu_dump_flags(void); + +/* Accessors to FPU Control Register */ +//static inline uae_u32 get_fpcr(void); +//static inline void set_fpcr(uae_u32 new_fpcr); + +/* Accessors to FPU Status Register */ +//static inline uae_u32 get_fpsr(void); +//static inline void set_fpsr(uae_u32 new_fpsr); + +/* Accessors to FPU Instruction Address Register */ +//static inline uae_u32 get_fpiar(); +//static inline void set_fpiar(uae_u32 new_fpiar); + +/* Initialization / Finalization */ +extern void fpu_init(bool integral_68040); +extern void fpu_exit(void); +extern void fpu_reset(void); + +/* Floating-point arithmetic instructions */ +void fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) REGPARAM; + +/* Floating-point program control operations */ +void fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) REGPARAM; +void fpuop_dbcc(uae_u32 opcode, uae_u32 extra) REGPARAM; +void fpuop_scc(uae_u32 opcode, uae_u32 extra) REGPARAM; + +/* Floating-point system control operations */ +void fpuop_save(uae_u32 opcode) REGPARAM; +void fpuop_restore(uae_u32 opcode) REGPARAM; +void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) REGPARAM; + +#endif /* FPU_CORE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp new file mode 100644 index 000000000..2a597997d --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp @@ -0,0 +1,193 @@ +/* + * fpu/exceptions.cpp - system-dependant FPU exceptions management + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 exceptions --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_EXCEPTIONS +void FFPU fpu_init_native_exceptions(void) +{ + // Mapping for "sw" -> fpsr exception byte + for (uae_u32 i = 0; i < 0x80; i++) { + exception_host2mac[i] = 0; + + if(i & SW_FAKE_BSUN) { + exception_host2mac[i] |= FPSR_EXCEPTION_BSUN; + } + // precision exception + if(i & SW_PE) { + exception_host2mac[i] |= FPSR_EXCEPTION_INEX2; + } + // underflow exception + if(i & SW_UE) { + exception_host2mac[i] |= FPSR_EXCEPTION_UNFL; + } + // overflow exception + if(i & SW_OE) { + exception_host2mac[i] |= FPSR_EXCEPTION_OVFL; + } + // zero divide exception + if(i & SW_ZE) { + exception_host2mac[i] |= FPSR_EXCEPTION_DZ; + } + // denormalized operand exception. + // wrong, but should not get here, normalization is done in elsewhere + if(i & SW_DE) { + exception_host2mac[i] |= FPSR_EXCEPTION_SNAN; + } + // invalid operation exception + if(i & SW_IE) { + exception_host2mac[i] |= FPSR_EXCEPTION_OPERR; + } + } + + // Mapping for fpsr exception byte -> "sw" + for (uae_u32 i = 0; i < 0x100; i++) { + uae_u32 fpsr = (i << 8); + exception_mac2host[i] = 0; + + // BSUN; make sure that you don't generate FPU stack faults. + if(fpsr & FPSR_EXCEPTION_BSUN) { + exception_mac2host[i] |= SW_FAKE_BSUN; + } + // precision exception + if(fpsr & FPSR_EXCEPTION_INEX2) { + exception_mac2host[i] |= SW_PE; + } + // underflow exception + if(fpsr & FPSR_EXCEPTION_UNFL) { + exception_mac2host[i] |= SW_UE; + } + // overflow exception + if(fpsr & FPSR_EXCEPTION_OVFL) { + exception_mac2host[i] |= SW_OE; + } + // zero divide exception + if(fpsr & FPSR_EXCEPTION_DZ) { + exception_mac2host[i] |= SW_ZE; + } + // denormalized operand exception + if(fpsr & FPSR_EXCEPTION_SNAN) { + exception_mac2host[i] |= SW_DE; //Wrong + } + // invalid operation exception + if(fpsr & FPSR_EXCEPTION_OPERR) { + exception_mac2host[i] |= SW_IE; + } + } +} +#endif + +#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS +void FFPU fpu_init_native_accrued_exceptions(void) +{ + /* + 68881/68040 accrued exceptions accumulate as follows: + Accrued.IOP |= (Exception.SNAN | Exception.OPERR) + Accrued.OVFL |= (Exception.OVFL) + Accrued.UNFL |= (Exception.UNFL | Exception.INEX2) + Accrued.DZ |= (Exception.DZ) + Accrued.INEX |= (Exception.INEX1 | Exception.INEX2 | Exception.OVFL) + */ + + // Mapping for "fpsr.accrued_exception" -> fpsr accrued exception byte + for (uae_u32 i = 0; i < 0x40; i++ ) { + accrued_exception_host2mac[i] = 0; + + // precision exception + if(i & SW_PE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_INEX; + } + // underflow exception + if(i & SW_UE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_UNFL; + } + // overflow exception + if(i & SW_OE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_OVFL; + } + // zero divide exception + if(i & SW_ZE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_DZ; + } + // denormalized operand exception + if(i & SW_DE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; //?????? + } + // invalid operation exception + if(i & SW_IE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; + } + } + + // Mapping for fpsr accrued exception byte -> "fpsr.accrued_exception" + for (uae_u32 i = 0; i < 0x20; i++) { + int fpsr = (i << 3); + accrued_exception_mac2host[i] = 0; + + // precision exception + if(fpsr & FPSR_ACCR_INEX) { + accrued_exception_mac2host[i] |= SW_PE; + } + // underflow exception + if(fpsr & FPSR_ACCR_UNFL) { + accrued_exception_mac2host[i] |= SW_UE; + } + // overflow exception + if(fpsr & FPSR_ACCR_OVFL) { + accrued_exception_mac2host[i] |= SW_OE; + } + // zero divide exception + if(fpsr & FPSR_ACCR_DZ) { + accrued_exception_mac2host[i] |= SW_ZE; + } + // What about SW_DE; //?????? + // invalid operation exception + if(fpsr & FPSR_ACCR_IOP) { + accrued_exception_mac2host[i] |= SW_IE; + } + } +} +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu/fpu/exceptions.h new file mode 100644 index 000000000..f943da04f --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.h @@ -0,0 +1,154 @@ +/* + * fpu/exceptions.h - system-dependant FPU exceptions management + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_EXCEPTIONS_H +#define FPU_EXCEPTIONS_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic exceptions */ +#define FPU_USE_GENERIC_EXCEPTIONS +#define FPU_USE_GENERIC_ACCRUED_EXCEPTIONS + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point exceptions handling mode --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native exceptions */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_EXCEPTIONS +# define FPU_USE_X86_EXCEPTIONS +#endif + +/* Optimized i386 fpu core must use native accrued exceptions */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS +# define FPU_USE_X86_ACCRUED_EXCEPTIONS +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Exceptions --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_EXCEPTIONS + +/* Extend the SW_* codes */ +#define SW_FAKE_BSUN SW_SF + +/* Shorthand */ +#define SW_EXCEPTION_MASK (SW_ES|SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) +// #define SW_EXCEPTION_MASK (SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) + +/* Lookup tables */ +PRIVATE uae_u32 exception_host2mac[ 0x80 ]; +PRIVATE uae_u32 exception_mac2host[ 0x100 ]; + +/* Initialize native exception management */ +PUBLIC void FFPU fpu_init_native_exceptions(void); + +/* Return m68k floating-point exception status */ +PRIVATE inline uae_u32 FFPU get_exception_status(void) + { return exception_host2mac[FPU fpsr.exception_status & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } + +/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ +PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) + { FPU fpsr.exception_status = exception_mac2host[new_status >> 8]; } + +#endif /* FPU_USE_X86_EXCEPTIONS */ + +#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS + +/* Lookup tables */ +PRIVATE uae_u32 accrued_exception_host2mac[ 0x40 ]; +PRIVATE uae_u32 accrued_exception_mac2host[ 0x20 ]; + +/* Initialize native accrued exception management */ +PUBLIC void FFPU fpu_init_native_accrued_exceptions(void); + +/* Return m68k accrued exception byte */ +PRIVATE inline uae_u32 FFPU get_accrued_exception(void) + { return accrued_exception_host2mac[FPU fpsr.accrued_exception & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } + +/* Set new accrued exception byte */ +PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) + { FPU fpsr.accrued_exception = accrued_exception_mac2host[(new_status & 0xF8) >> 3]; } + +#endif /* FPU_USE_X86_ACCRUED_EXCEPTIONS */ + +/* -------------------------------------------------------------------------- */ +/* --- Default Exceptions Handling --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_GENERIC_EXCEPTIONS + +/* Initialize native exception management */ +static inline void FFPU fpu_init_native_exceptions(void) + { } + +/* Return m68k floating-point exception status */ +PRIVATE inline uae_u32 FFPU get_exception_status(void) + { return FPU fpsr.exception_status; } + +/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ +PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) + { FPU fpsr.exception_status = new_status; } + +#endif /* FPU_USE_GENERIC_EXCEPTIONS */ + +#ifdef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS + +/* Initialize native accrued exception management */ +PRIVATE inline void FFPU fpu_init_native_accrued_exceptions(void) + { } + +/* Return m68k accrued exception byte */ +PRIVATE inline uae_u32 FFPU get_accrued_exception(void) + { return FPU fpsr.accrued_exception; } + +/* Set new accrued exception byte */ +PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) + { FPU fpsr.accrued_exception = new_status; } + +#endif /* FPU_USE_GENERIC_ACCRUED_EXCEPTIONS */ + +#endif /* FPU_EXCEPTIONS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu/fpu/flags.cpp new file mode 100644 index 000000000..4b0972df3 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/flags.cpp @@ -0,0 +1,174 @@ +/* + * fpu/flags.cpp - Floating-point flags + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 floating-point flags --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_FLAGS + +/* Initialization */ +void FFPU fpu_init_native_fflags(void) +{ + // Adapted from fpu_x86.cpp + #define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) + #define SW_Z (SW_C3) + #define SW_I (SW_C0|SW_C2) + #define SW_NAN (SW_C0) + #define SW_FINITE (SW_C2) + #define SW_EMPTY_REGISTER (SW_C0|SW_C3) + #define SW_DENORMAL (SW_C2|SW_C3) + #define SW_UNSUPPORTED (0) + #define SW_N (SW_C1) + + // Sanity checks + #if (SW_Z != NATIVE_FFLAG_ZERO) + #error "Incorrect X86 Z fflag" + #endif + #if (SW_I != NATIVE_FFLAG_INFINITY) + #error "Incorrect X86 I fflag" + #endif + #if (SW_N != NATIVE_FFLAG_NEGATIVE) + #error "Incorrect X86 N fflag" + #endif + #if (SW_NAN != NATIVE_FFLAG_NAN) + #error "Incorrect X86 NAN fflag" + #endif + + // Native status word to m68k mappings + for (uae_u32 i = 0; i < 0x48; i++) { + to_m68k_fpcond[i] = 0; + const uae_u32 native_fpcond = i << 8; + switch (native_fpcond & SW_Z_I_NAN_MASK) { +#ifndef FPU_UAE +// gb-- enabling it would lead to incorrect drawing of digits +// in Speedometer Performance Test + case SW_UNSUPPORTED: +#endif + case SW_NAN: + case SW_EMPTY_REGISTER: + to_m68k_fpcond[i] |= FPSR_CCB_NAN; + break; + case SW_FINITE: + case SW_DENORMAL: + break; + case SW_I: + to_m68k_fpcond[i] |= FPSR_CCB_INFINITY; + break; + case SW_Z: + to_m68k_fpcond[i] |= FPSR_CCB_ZERO; + break; + } + if (native_fpcond & SW_N) + to_m68k_fpcond[i] |= FPSR_CCB_NEGATIVE; + } + + // m68k to native status word mappings + for (uae_u32 i = 0; i < 0x10; i++) { + const uae_u32 m68k_fpcond = i << 24; + if (m68k_fpcond & FPSR_CCB_NAN) + to_host_fpcond[i] = SW_NAN; + else if (m68k_fpcond & FPSR_CCB_ZERO) + to_host_fpcond[i] = SW_Z; + else if (m68k_fpcond & FPSR_CCB_INFINITY) + to_host_fpcond[i] = SW_I; + else + to_host_fpcond[i] = SW_FINITE; + if (m68k_fpcond & FPSR_CCB_NEGATIVE) + to_host_fpcond[i] |= SW_N; + } + + // truth-table for FPU conditions + for (uae_u32 host_fpcond = 0; host_fpcond < 0x08; host_fpcond++) { + // host_fpcond: C3 on bit 2, C1 and C0 are respectively on bits 1 and 0 + const uae_u32 real_host_fpcond = ((host_fpcond & 4) << 12) | ((host_fpcond & 3) << 8); + const bool N = ((real_host_fpcond & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE); + const bool Z = ((real_host_fpcond & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO); + const bool NaN = ((real_host_fpcond & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN); + + int value; + for (uae_u32 m68k_fpcond = 0; m68k_fpcond < 0x20; m68k_fpcond++) { + switch (m68k_fpcond) { + case 0x00: value = 0; break; // False + case 0x01: value = Z; break; // Equal + case 0x02: value = !(NaN || Z || N); break; // Ordered Greater Than + case 0x03: value = Z || !(NaN || N); break; // Ordered Greater Than or Equal + case 0x04: value = N && !(NaN || Z); break; // Ordered Less Than + case 0x05: value = Z || (N && !NaN); break; // Ordered Less Than or Equal + case 0x06: value = !(NaN || Z); break; // Ordered Greater or Less Than + case 0x07: value = !NaN; break; // Ordered + case 0x08: value = NaN; break; // Unordered + case 0x09: value = NaN || Z; break; // Unordered or Equal + case 0x0a: value = NaN || !(N || Z); break; // Unordered or Greater Than + case 0x0b: value = NaN || Z || !N; break; // Unordered or Greater or Equal + case 0x0c: value = NaN || (N && !Z); break; // Unordered or Less Than + case 0x0d: value = NaN || Z || N; break; // Unordered or Less or Equal + case 0x0e: value = !Z; break; // Not Equal + case 0x0f: value = 1; break; // True + case 0x10: value = 0; break; // Signaling False + case 0x11: value = Z; break; // Signaling Equal + case 0x12: value = !(NaN || Z || N); break; // Greater Than + case 0x13: value = Z || !(NaN || N); break; // Greater Than or Equal + case 0x14: value = N && !(NaN || Z); break; // Less Than + case 0x15: value = Z || (N && !NaN); break; // Less Than or Equal + case 0x16: value = !(NaN || Z); break; // Greater or Less Than + case 0x17: value = !NaN; break; // Greater, Less or Equal + case 0x18: value = NaN; break; // Not Greater, Less or Equal + case 0x19: value = NaN || Z; break; // Not Greater or Less Than + case 0x1a: value = NaN || !(N || Z); break; // Not Less Than or Equal + case 0x1b: value = NaN || Z || !N; break; // Not Less Than + case 0x1c: value = NaN || (N && !Z); break; // Not Greater Than or Equal +// case 0x1c: value = !Z && (NaN || N); break; // Not Greater Than or Equal + case 0x1d: value = NaN || Z || N; break; // Not Greater Than + case 0x1e: value = !Z; break; // Signaling Not Equal + case 0x1f: value = 1; break; // Signaling True + default: value = -1; + } + fpcond_truth_table[m68k_fpcond][host_fpcond] = value; + } + } +} + +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h new file mode 100644 index 000000000..3d144ac2c --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/flags.h @@ -0,0 +1,228 @@ +/* + * fpu/flags.h - Floating-point flags + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_FLAGS_H +#define FPU_FLAGS_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic flags */ +#define FPU_USE_GENERIC_FLAGS + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point flags handling mode --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native flags */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_X86_FLAGS +#endif + +/* Old UAE FPU core can use native flags */ +#if defined(FPU_UAE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_X86_FLAGS +#endif + +/* IEEE-based implementation must use lazy flag evaluation */ +#if defined(FPU_IEEE) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_LAZY_FLAGS +#endif + +/* JIT Compilation for FPU only works with lazy evaluation of FPU flags */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) && defined(USE_JIT_FPU) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_LAZY_FLAGS +#endif + +#ifdef FPU_IMPLEMENTATION + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Floating-Point Flags --- */ +/* -------------------------------------------------------------------------- */ + +/* FPU_X86 has its own set of lookup functions */ + +#ifdef FPU_USE_X86_FLAGS + +#define FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x0200 +#define NATIVE_FFLAG_ZERO 0x4000 +#define NATIVE_FFLAG_INFINITY 0x0500 +#define NATIVE_FFLAG_NAN 0x0100 + +/* Translation tables between native and m68k floating-point flags */ +PRIVATE uae_u32 to_m68k_fpcond[0x48]; +PRIVATE uae_u32 to_host_fpcond[0x10]; + +/* Truth table for floating-point condition codes */ +PRIVATE uae_u32 fpcond_truth_table[32][8]; // 32 m68k conditions x 8 host condition codes + +/* Initialization */ +PUBLIC void FFPU fpu_init_native_fflags(void); + +#ifdef FPU_UAE + +/* Native to m68k floating-point condition codes */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) + { return to_m68k_fpcond[(FPU fpsr.condition_codes >> 8) & 0x47]; } + +/* M68k to native floating-point condition codes */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) + /* Precondition: new_fpcond is only valid for floating-point condition codes */ + { FPU fpsr.condition_codes = to_host_fpcond[new_fpcond >> 24]; } + +/* Make FPSR according to the value passed in argument */ +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) + { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=a" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } + +/* Return the corresponding ID of the current floating-point condition codes */ +/* NOTE: only valid for evaluation of a condition */ +PRIVATE inline int FFPU host_fpcond_id(void) + { return ((FPU fpsr.condition_codes >> 12) & 4) | ((FPU fpsr.condition_codes >> 8) & 3); } + +/* Return true if the floating-point condition is satisfied */ +PRIVATE inline bool FFPU fpcctrue(int condition) + { return fpcond_truth_table[condition][host_fpcond_id()]; } + +#endif /* FPU_UAE */ + +/* Return the address of the floating-point condition codes truth table */ +static inline uae_u8 * const FFPU address_of_fpcond_truth_table(void) + { return ((uae_u8*)&fpcond_truth_table[0][0]); } + +#endif /* FPU_X86_USE_NATIVE_FLAGS */ + +/* -------------------------------------------------------------------------- */ +/* --- Use Original M68K FPU Mappings --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_GENERIC_FLAGS + +#undef FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x08000000 +#define NATIVE_FFLAG_ZERO 0x04000000 +#define NATIVE_FFLAG_INFINITY 0x02000000 +#define NATIVE_FFLAG_NAN 0x01000000 + +/* Initialization - NONE */ +PRIVATE inline void FFPU fpu_init_native_fflags(void) + { } + +/* Native to m68k floating-point condition codes - SELF */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) + { return FPU fpsr.condition_codes; } + +/* M68k to native floating-point condition codes - SELF */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) + { FPU fpsr.condition_codes = new_fpcond; } + +#endif /* FPU_USE_GENERIC_FLAGS */ + +/* -------------------------------------------------------------------------- */ +/* --- Use Lazy Flags Evaluation --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_LAZY_FLAGS + +#undef FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x08000000 +#define NATIVE_FFLAG_ZERO 0x04000000 +#define NATIVE_FFLAG_INFINITY 0x02000000 +#define NATIVE_FFLAG_NAN 0x01000000 + +/* Initialization - NONE */ +PRIVATE inline void FFPU fpu_init_native_fflags(void) + { } + +/* Native to m68k floating-point condition codes - SELF */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) +{ + uae_u32 fpccr = 0; + if (isnan(FPU result)) + fpccr |= FPSR_CCB_NAN; + else if (FPU result == 0.0) + fpccr |= FPSR_CCB_ZERO; + else if (FPU result < 0.0) + fpccr |= FPSR_CCB_NEGATIVE; + if (isinf(FPU result)) + fpccr |= FPSR_CCB_INFINITY; + return fpccr; +} + +/* M68k to native floating-point condition codes - SELF */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) +{ + if (new_fpcond & FPSR_CCB_NAN) + make_nan(FPU result); + else if (new_fpcond & FPSR_CCB_ZERO) + FPU result = 0.0; + else if (new_fpcond & FPSR_CCB_NEGATIVE) + FPU result = -1.0; + else + FPU result = +1.0; + /* gb-- where is Infinity ? */ +} + +/* Make FPSR according to the value passed in argument */ +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) + { FPU result = r; } + +#endif /* FPU_USE_LAZY_FLAGS */ + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common methods --- */ +/* -------------------------------------------------------------------------- */ + +/* Return the address of the floating-point condition codes register */ +static inline uae_u32 * FFPU address_of_fpccr(void) + { return ((uae_u32 *)& FPU fpsr.condition_codes); } + +#endif /* FPU_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu/fpu/fpu.h new file mode 100644 index 000000000..d1fe6dd25 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu.h @@ -0,0 +1,59 @@ +/* + * fpu/fpu.h - public header + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_PUBLIC_HEADER_H +#define FPU_PUBLIC_HEADER_H + +#ifndef FPU_DEBUG +#define FPU_DEBUG 0 +#endif + +#if FPU_DEBUG +#define fpu_debug(args) printf args; +#define FPU_DUMP_REGISTERS 0 +#define FPU_DUMP_FIRST_BYTES 0 +#else +#define fpu_debug(args) ; +#undef FPU_DUMP_REGISTERS +#undef FPU_DUMP_FIRST_BYTES +#endif + +#include "sysdeps.h" +#include "fpu/types.h" +#include "fpu/core.h" + +void fpu_set_fpsr(uae_u32 new_fpsr); +uae_u32 fpu_get_fpsr(void); +void fpu_set_fpcr(uae_u32 new_fpcr); +uae_u32 fpu_get_fpcr(void); + +#endif /* FPU_PUBLIC_HEADER_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp new file mode 100644 index 000000000..5fa1ad0b4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -0,0 +1,2330 @@ +/* + * fpu_ieee.cpp - the IEEE FPU + * + * Copyright (c) 2001-2008 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68881/MC68040 emulation + * + * Copyright 1996 Herman ten Brugge + * + * + * Following fixes by Lauri Pesonen, July 1999: + * + * FMOVEM list handling: + * The lookup tables did not work correctly, rewritten. + * FINT: + * (int) cast does not work, fixed. + * Further, now honors the FPU fpcr rounding modes. + * FINTRZ: + * (int) cast cannot be used, fixed. + * FGETEXP: + * Input argument value 0 returned erroneous value. + * FMOD: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FREM: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FSCALE: + * Input argument value 0 was not handled correctly. + * FMOVEM Control Registers to/from address FPU registers An: + * A bug caused the code never been called. + * FMOVEM Control Registers pre-decrement: + * Moving of control regs from memory to FPP was not handled properly, + * if not all of the three FPU registers were moved. + * Condition code "Not Greater Than or Equal": + * Returned erroneous value. + * FSINCOS: + * Cosine must be loaded first if same register. + * FMOVECR: + * Status register was not updated (yes, this affects it). + * FMOVE -> reg: + * Status register was not updated (yes, this affects it). + * FMOVE reg -> reg: + * Status register was not updated. + * FDBcc: + * The loop termination condition was wrong. + * Possible leak from int16 to int32 fixed. + * get_fp_value: + * Immediate addressing mode && Operation Length == Byte -> + * Use the low-order byte of the extension word. + * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was + * written to them. + * + * Other: + * - Optimized single/double/extended to/from conversion functions. + * Huge speed boost, but not (necessarily) portable to other systems. + * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 + * - Optimized versions of FSCALE, FGETEXP, FGETMAN + * - Conversion routines now handle NaN and infinity better. + * - Some constants precalculated. Not all compilers can optimize the + * expressions previously used. + * + * TODO: + * - Floating point exceptions. + * - More Infinity/NaN/overflow/underflow checking. + * - FPU instruction_address (only needed when exceptions are implemented) + * - Should be written in assembly to support long doubles. + * - Precision rounding single/double + */ + +#include "sysdeps.h" +#include +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_ieee.h" + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/mathlib.h" +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/mathlib.cpp" +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" +#include "fpu/rounding.cpp" + +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +#define LD(x) x ## L +#ifdef HAVE_POWL +#define POWL(x, y) powl(x, y) +#else +#define POWL(x, y) pow(x, y) +#endif +#ifdef HAVE_LOG10L +#define LOG10L(x) log10l(x) +#else +#define LOG10L(x) log10(x) +#endif +#else +#define LD(x) x +#define POWL(x, y) pow(x, y) +#define LOG10L(x) log10(x) +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Debugging --- */ +/* -------------------------------------------------------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +#if FPU_DEBUG && FPU_DUMP_REGISTERS +PRIVATE void FFPU dump_registers(const char * str) +{ + char temp_str[512]; + + sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", + str, + fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), + fpu_get_register(3), fpu_get_register(4), fpu_get_register(5), + fpu_get_register(6), fpu_get_register(7) ); + + fpu_debug((temp_str)); +#else +PRIVATE void FFPU dump_registers(const char *) +{ +#endif +} + +#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES +PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) +{ + char temp_buf1[256], temp_buf2[10]; + int bytes = sizeof(temp_buf1)/3-1-3; + if (actual < bytes) + bytes = actual; + + temp_buf1[0] = 0; + for (int i = 0; i < bytes; i++) { + sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); + strcat(temp_buf1, temp_buf2); + } + + strcat(temp_buf1, "\n"); + fpu_debug((temp_buf1)); +#else + PRIVATE void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ +#endif +} + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) +{ + uae_u32 lsb = (uae_u32)fp_fabs(quotient) & 0x7f; + FPU fpsr.quotient = sign | (lsb << 16); +} + +// to_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ +#if 1 + // Use a single, otherwise some checks for NaN, Inf, Zero would have to + // be performed + fpu_single result = 0; + fp_declare_init_shape(srp, single); + srp.ieee.negative = (value >> 31) & 1; + srp.ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; + srp.ieee.mantissa = value & 0x007fffff; + result = srp.value; + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + return result; +#elif 0 /* Original code */ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register result; + fpu_register_parts *p = (fpu_register_parts *)&result; + + uae_u32 sign = (value & 0x80000000); + uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; + + p->parts[FLO] = value << 29; + p->parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return(result); +#endif +} + +// from_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ +#if 1 + fpu_single input = (fpu_single) src; + fp_declare_init_shape(sip, single); + sip.value = input; + uae_u32 result = (sip.ieee.negative << 31) + | (sip.ieee.exponent << 23) + | sip.ieee.mantissa; + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + return result; +#elif 0 /* Original code */ + if (src == 0.0) + return 0; + + uae_u32 result; + fpu_register_parts const *p = (fpu_register_parts const *)&src; + + uae_u32 sign = (p->parts[FHI] & 0x80000000); + uae_u32 exp = (p->parts[FHI] & 0x7FF00000) >> 20; + + if(exp + 127 < 1023) { + exp = 0; + } else if(exp > 1023 + 127) { + exp = 255; + } else { + exp = exp + 127 - 1023; + } + + result = sign | (exp << 23) | ((p->parts[FHI] & 0x000FFFFF) << 3) | (p->parts[FLO] >> 29); + + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + + return (result); +#endif +} + +// to_exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + // is it zero? + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return (wrd1 & 0x80000000) ? -0.0 : 0.0; + + fpu_register result; +#if defined(USE_QUAD_DOUBLE) + // is it NaN? + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + make_nan(result); + return result; + } + // is it inf? + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + if ((wrd1 & 0x80000000) == 0) + make_inf_positive(result); + else + make_inf_negative(result); + return result; + } + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp.ieee.mantissa3 = 0; +#elif defined(USE_LONG_DOUBLE) + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = wrd2; + srp.ieee.mantissa1 = wrd3; + +#else + uae_u32 sgn = (wrd1 >> 31) & 1; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // the explicit integer bit is not set, must normalize + if ((wrd2 & 0x80000000) == 0) { + fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); + if (wrd2 | wrd3) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while (exp > 0 && (man & UVAL64(0x8000000000000000)) == 0) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)(man >> 32); + wrd3 = (uae_u32)(man & 0xFFFFFFFF); + } + else if (exp != 0x7fff) // zero + exp = FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; + } + + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + + fp_declare_init_shape(srp, double); + srp.ieee.negative = sgn; + srp.ieee.exponent = exp; + // drop the explicit integer bit + srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); +#endif + result = srp.value; + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + return result; +} + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// make_extended_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +) +{ + // is it zero? + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + if (wrd1 & 0x80000000) + make_zero_negative(result); + else + make_zero_positive(result); + return; + } + // is it NaN? + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + make_nan(result); + return; + } +#if defined(USE_QUAD_DOUBLE) + // is it inf? + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + if ((wrd1 & 0x80000000) == 0) + make_inf_positive(result); + else + make_inf_negative(result); + return; + } + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp.ieee.mantissa3 = 0; +#elif defined(USE_LONG_DOUBLE) + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = wrd2; + srp.ieee.mantissa1 = wrd3; +#else + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + + fp_declare_init_shape(srp, double); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = exp; + // drop the explicit integer bit + srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); +#endif + result = srp.value; + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); +} + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +) +{ + if (src == 0.0) { + *wrd1 = *wrd2 = *wrd3 = 0; + return; + } +#if defined(USE_QUAD_DOUBLE) + // FIXME: deal with denormals? + fp_declare_init_shape(srp, extended); + srp.value = src; + *wrd1 = (srp.ieee.negative << 31) | (srp.ieee.exponent << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 15) | ((srp.ieee.mantissa1 & 0xfffe0000) >> 17); + *wrd3 = (srp.ieee.mantissa1 << 15) | ((srp.ieee.mantissa2 & 0xfffe0000) >> 17); +#elif defined(USE_LONG_DOUBLE) + fpu_register_parts p = { src }; +#ifdef WORDS_BIGENDIAN + *wrd1 = p.parts[0]; + *wrd2 = p.parts[1]; + *wrd3 = p.parts[2]; +#else + *wrd3 = p.parts[0]; + *wrd2 = p.parts[1]; + *wrd1 = (p.parts[2] & 0xffff) << 16; +#endif +#else + fp_declare_init_shape(srp, double); + srp.value = src; + fpu_debug(("extract_extended (%d,%d,%X,%X)\n", + srp.ieee.negative , srp.ieee.exponent, + srp.ieee.mantissa0, srp.ieee.mantissa1)); + + uae_u32 exp = srp.ieee.exponent; + + if (exp == FP_DOUBLE_EXP_MAX) + exp = FP_EXTENDED_EXP_MAX; + else + exp += FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; + + *wrd1 = (srp.ieee.negative << 31) | (exp << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 11) | ((srp.ieee.mantissa1 & 0xffe00000) >> 21); + *wrd3 = srp.ieee.mantissa1 << 11; +#endif + fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +// to_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + union { + fpu_double value; + uae_u32 parts[2]; + } dest; +#ifdef WORDS_BIGENDIAN + dest.parts[0] = wrd1; + dest.parts[1] = wrd2; +#else + dest.parts[0] = wrd2; + dest.parts[1] = wrd1; +#endif + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,dest.value)); + return (fpu_register)(dest.value); +} + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +) +{ + union { + fpu_double value; + uae_u32 parts[2]; + } dest; + dest.value = (fpu_double)src; +#ifdef WORDS_BIGENDIAN + *wrd1 = dest.parts[0]; + *wrd2 = dest.parts[1]; +#else + *wrd2 = dest.parts[0]; + *wrd1 = dest.parts[1]; +#endif + fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); +} + +// to_pack +PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_register d; + bool sm = (wrd1 & 0x80000000) != 0; + bool se = (wrd1 & 0x40000000) != 0; + int exp = (wrd1 & 0x7fff0000) >> 16; + unsigned int dig; + fpu_register pwr; + + if (exp == 0x7fff) + { + if (wrd2 == 0 && wrd3 == 0) + { + sm ? make_inf_negative(d) : make_inf_positive(d); + } else + { + make_nan(d); + } + return d; + } + dig = wrd1 & 0x0000000f; + if (dig == 0 && wrd2 == 0 && wrd3 == 0) + { + sm ? make_zero_negative(d) : make_zero_positive(d); + return d; + } + + /* + * Convert the bcd exponent to binary by successive adds and + * muls. Set the sign according to SE. Subtract 16 to compensate + * for the mantissa which is to be interpreted as 17 integer + * digits, rather than 1 integer and 16 fraction digits. + * Note: this operation can never overflow. + */ + exp = ((wrd1 >> 24) & 0xf); + exp = exp * 10 + ((wrd1 >> 20) & 0xf); + exp = exp * 10 + ((wrd1 >> 16) & 0xf); + if (se) + exp = -exp; + /* sub to compensate for shift of mant */ + exp = exp - 16; + + /* + * Convert the bcd mantissa to binary by successive + * adds and muls. Set the sign according to SM. + * The mantissa digits will be converted with the decimal point + * assumed following the least-significant digit. + * Note: this operation can never overflow. + */ + d = wrd1 & 0xf; + d = (d * LD(10.0)) + ((wrd2 >> 28) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 24) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 20) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 16) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 12) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 8) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 4) & 0xf); + d = (d * LD(10.0)) + ((wrd2 ) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 28) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 24) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 20) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 16) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 12) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 8) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 4) & 0xf); + d = (d * LD(10.0)) + ((wrd3 ) & 0xf); + + /* Check the sign of the mant and make the value in fp0 the same sign. */ + if (sm) + d = -d; + + /* + * Calculate power-of-ten factor from exponent. + */ + if (exp < 0) + { + exp = -exp; + pwr = POWL(LD(10.0), exp); + d = d / pwr; + } else + { + pwr = POWL(LD(10.0), exp); + d = d * pwr; + } + + fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); + return d; +} + +// from_pack +PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + fpu_register pwr; + int exp; + fpu_register d; + bool sm, se; + int dig; + + *wrd1 = *wrd2 = *wrd3 = 0; + + d = src; + sm = false; + if (isneg(src)) + { + d = -d; + sm = true; + } + + if (isnan(src)) + { + *wrd1 = sm ? 0xffff0000 : 0x7fff0000; + *wrd2 = 0xffffffff; + *wrd3 = 0xffffffff; + return; + } + if (isinf(src)) + { + *wrd1 = sm ? 0xffff0000 : 0x7fff0000; + *wrd2 = *wrd3 = 0; + return; + } + if (iszero(src)) + { + *wrd1 = sm ? 0x80000000 : 0x00000000; + *wrd2 = *wrd3 = 0; + return; + } + sm = false; + if (isneg(src)) + { + d = -d; + sm = true; + } + exp = (int)floor(LOG10L(d)); + se = false; + if (exp < 0) + { + exp = -exp; + se = true; + pwr = POWL(LD(10.0), exp); + d = d * pwr; + } else + { + pwr = POWL(LD(10.0), exp); + d = d / pwr; + } + dig = (int)d; d = LD(10) * (d - dig); *wrd1 |= dig; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 28; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 24; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 20; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 16; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 12; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 8; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 4; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 28; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 24; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 20; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 16; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 12; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 8; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 4; + dig = (int)d; *wrd3 |= dig; + + dig = (exp / 100) % 10; + *wrd1 |= dig << 24; + dig = (exp / 10) % 10; + *wrd1 |= dig << 20; + dig = (exp) % 10; + *wrd1 |= dig << 16; + if (sm) + *wrd1 |= 0x80000000; + if (se) + *wrd1 |= 0x40000000; + fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + src = FPU registers[(extra >> 10) & 7]; + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + + fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); + + switch (mode) { + case 0: + switch (size) { + case 6: + src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); + break; + case 4: + src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); + break; + case 0: + src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); + break; + case 1: + src = make_single(m68k_dreg (regs, reg)); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + break; + case 4: + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if(size == 6) ad++; + break; + default: + return 0; + } + } + + fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + fpu_debug(("get_fp_value ad=%X\n",ad)); + fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); + //dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); + //dump_first_bytes( get_real_address(ad, 0, 0), 64 ); + + switch (size) { + case 0: + src = (fpu_register) (uae_s32) get_long (ad); + break; + case 1: + src = make_single(get_long (ad)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_extended(wrd1, wrd2, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_packed(wrd1, wrd2, wrd3); + break; + } + case 4: + src = (fpu_register) (uae_s16) get_word(ad); + break; + case 5: { + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + src = make_double(wrd1, wrd2); + break; + } + case 6: + src = (fpu_register) (uae_s8) get_byte(ad); + break; + default: + return 0; + } + + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); + return 1; +} + +/* Convert the FP value to integer according to the current m68k rounding mode */ +PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) +{ + fpu_register result; + switch (get_fpcr() & FPCR_ROUNDING_MODE) { + case FPCR_ROUND_ZERO: + result = fp_round_to_zero(src); + break; + case FPCR_ROUND_MINF: + result = fp_round_to_minus_infinity(src); + break; + case FPCR_ROUND_NEAR: + result = fp_round_to_nearest(src); + break; + case FPCR_ROUND_PINF: + result = fp_round_to_plus_infinity(src); + break; + default: + result = src; /* should never be reached */ + break; + } + return (uae_s32)result; +} + +PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + FPU registers[dest_reg] = value; + make_fpsr(FPU registers[dest_reg]); + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = 0xffffffff; + switch (mode) { + case 0: + switch (size) { + case 6: + m68k_dreg (regs, reg) = ((toint(value) & 0xff) + | (m68k_dreg (regs, reg) & ~0xff)); + break; + case 4: + m68k_dreg (regs, reg) = ((toint(value) & 0xffff) + | (m68k_dreg (regs, reg) & ~0xffff)); + break; + case 0: + m68k_dreg (regs, reg) = toint(value); + break; + case 1: + m68k_dreg (regs, reg) = extract_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch (size) { + case 0: + put_long (ad, toint(value)); + break; + case 1: + put_long (ad, extract_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + extract_extended(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + extract_packed(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 4: + put_word(ad, (uae_s16) toint(value)); + break; + case 5: { + uae_u32 wrd1, wrd2; + extract_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + break; + } + case 6: + put_byte(ad, (uae_s8) toint(value)); + break; + default: + return 0; + } + return 1; +} + +PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) +#else +# define CONDRET(s,x) return (x) +#endif + +PRIVATE inline int FFPU fpp_cond(int condition) +{ + int N = (FPU result < 0.0); + int Z = (FPU result == 0.0); + int NaN = isnan(FPU result); + + if (NaN) + N = Z = 0; + + switch (condition & 0x1f) { + case 0x00: CONDRET("False",0); + case 0x01: CONDRET("Equal",Z); + case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); + case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); + case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); + case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); + case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); + case 0x07: CONDRET("Ordered",!NaN); + case 0x08: CONDRET("Unordered",NaN); + case 0x09: CONDRET("Unordered or Equal",NaN || Z); + case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); + case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); + case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); + case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); + case 0x0e: CONDRET("Not Equal",!Z); + case 0x0f: CONDRET("True",1); + case 0x10: CONDRET("Signaling False",0); + case 0x11: CONDRET("Signaling Equal",Z); + case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); + case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); + case 0x14: CONDRET("Less Than",N && !(NaN || Z)); + case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); + case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); + case 0x17: CONDRET("Greater, Less or Equal",!NaN); + case 0x18: CONDRET("Not Greater, Less or Equal",NaN); + case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); + case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); + case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); + case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); + case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); + case 0x1e: CONDRET("Signaling Not Equal",!Z); + case 0x1f: CONDRET("Signaling True",1); + default: CONDRET("",-1); + } +} + +void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // this may have leaked. + /* + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) + | ((m68k_dreg (regs, reg) - 1) & 0xffff)); + */ + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) + | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); + + + // condition reversed. + // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) + if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) + m68k_setpc (pc + disp); + } +} + +void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uae_u32 ad = 0; + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else if ((opcode & 0x38) == 0) { + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } + else if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + put_byte(ad, cc ? 0xff : 0x00); +} + +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +{ + fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (oldpc); + op_illg (opcode); + } + if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (pc); + op_illg (opcode); + } + else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +void FFPU fpuop_save(uae_u32 opcode) +{ + fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad = 0; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } + else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + fpu_debug(("fsave_opp pre-decrement\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } + else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: fsave_opp post-increment\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); + } +} + +// FRESTORE has no pre-decrement +void FFPU fpuop_restore(uae_u32 opcode) +{ + fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad = 0; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // 68040 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad -= 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad -= 92; + } + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad += 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 92; + } + } + } + } + else { + // 68881 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { + if ((d & 0x00ff0000) == 0x00180000) + ad -= 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad -= 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad -= 45 * 4; + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0x00180000) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + ad += 6 * 4; + } + else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 45 * 4; + } + } + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); + } +} + +void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + int reg; + fpu_register src; + + fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, + m68k_getpc () - 4)); + + dump_registers( "START"); + + switch ((extra >> 13) & 0x7) { + case 3: + fpu_debug(("FMOVE -> \n")); + if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + dump_registers( "END "); + return; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_dreg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); + } + } + else { + if (extra & 0x1000) { + set_fpcr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_dreg (regs, opcode & 7); + fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } +// } else if ((opcode & 0x38) == 1) { + } + else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_areg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_areg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); + } + } else { + if (extra & 0x1000) { + set_fpcr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_areg (regs, opcode & 7); + fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } + } + else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + if (extra & 0x1000) { + set_fpcr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = next_ilong(); + fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); + } + } + } + else if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + uae_u32 ad = 0; + int incr = 0; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + if ((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + } + ad -= incr; + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + put_long (ad, get_fpcr() & 0xFFFF); + fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); + ad += 4; + } + if (extra & 0x0800) { + put_long (ad, get_fpsr()); + fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); + ad += 4; + } + if (extra & 0x0400) { + put_long (ad, FPU instruction_address); + fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); + ad += 4; + } + ad -= incr; + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + uae_u32 ad = 0; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + + // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; + int incr = 0; + if((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + ad = ad - incr; + } + + if (extra & 0x1000) { + set_fpcr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); + ad += 4; + } + if (extra & 0x0800) { + set_fpsr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); + ad += 4; + } + if (extra & 0x0400) { + FPU instruction_address = get_long (ad); + fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); + ad += 4; + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? +// m68k_areg (regs, opcode & 7) = ad - 12; + m68k_areg (regs, opcode & 7) = ad - incr; + } + dump_registers( "END "); + return; + case 6: + case 7: { + uae_u32 ad = 0, list = 0; + int incr = 0; + if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + fpu_debug(("FMOVEM FPP->memory\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + if (incr < 0) { + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + fpu_debug(("FMOVEM memory->FPP\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + /**/ + if (incr < 0) { + // not reached + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + dump_registers( "END "); + return; + } + case 0: + case 2: + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + fpu_debug(("FMOVECR memory->FPP\n")); + switch (extra & 0x7f) { + case 0x00: + // FPU registers[reg] = 4.0 * atan(1.0); + FPU registers[reg] = LD(3.1415926535897932384626433832795029); + fpu_debug(("FP const: Pi\n")); + break; + case 0x0b: + // FPU registers[reg] = log10 (2.0); + FPU registers[reg] = LD(0.30102999566398119521); // 0.3010299956639811952137388947244930L + fpu_debug(("FP const: Log 10 (2)\n")); + break; + case 0x0c: + // FPU registers[reg] = exp (1.0); + FPU registers[reg] = LD(2.7182818284590452353); // 2.7182818284590452353602874713526625L + fpu_debug(("FP const: e\n")); + break; + case 0x0d: + // FPU registers[reg] = log (exp (1.0)) / log (2.0); + FPU registers[reg] = LD(1.4426950408889634073599246810019); + fpu_debug(("FP const: Log 2 (e)\n")); + break; + case 0x0e: + // FPU registers[reg] = log (exp (1.0)) / log (10.0); + FPU registers[reg] = LD(0.4342944819032518276511289189166051); + fpu_debug(("FP const: Log 10 (e)\n")); + break; + case 0x0f: + FPU registers[reg] = 0.0; + fpu_debug(("FP const: zero\n")); + break; + case 0x30: + // FPU registers[reg] = log (2.0); + FPU registers[reg] = LD(0.6931471805599453094172321214581766); + fpu_debug(("FP const: ln(2)\n")); + break; + case 0x31: + // FPU registers[reg] = log (10.0); + FPU registers[reg] = LD(2.3025850929940456840179914546843642); + fpu_debug(("FP const: ln(10)\n")); + break; + case 0x32: + // ?? + FPU registers[reg] = LD(1.0e0); + fpu_debug(("FP const: 1.0e0\n")); + break; + case 0x33: + FPU registers[reg] = LD(1.0e1); + fpu_debug(("FP const: 1.0e1\n")); + break; + case 0x34: + FPU registers[reg] = LD(1.0e2); + fpu_debug(("FP const: 1.0e2\n")); + break; + case 0x35: + FPU registers[reg] = LD(1.0e4); + fpu_debug(("FP const: 1.0e4\n")); + break; + case 0x36: + FPU registers[reg] = LD(1.0e8); + fpu_debug(("FP const: 1.0e8\n")); + break; + case 0x37: + FPU registers[reg] = LD(1.0e16); + fpu_debug(("FP const: 1.0e16\n")); + break; + case 0x38: + FPU registers[reg] = LD(1.0e32); + fpu_debug(("FP const: 1.0e32\n")); + break; + case 0x39: + FPU registers[reg] = LD(1.0e64); + fpu_debug(("FP const: 1.0e64\n")); + break; + case 0x3a: + FPU registers[reg] = LD(1.0e128); + fpu_debug(("FP const: 1.0e128\n")); + break; + case 0x3b: + FPU registers[reg] = LD(1.0e256); + fpu_debug(("FP const: 1.0e256\n")); + break; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + case 0x3c: + FPU registers[reg] = LD(1.0e512); + fpu_debug(("FP const: 1.0e512\n")); + break; + case 0x3d: + FPU registers[reg] = LD(1.0e1024); + fpu_debug(("FP const: 1.0e1024\n")); + break; + case 0x3e: + FPU registers[reg] = LD(1.0e2048); + fpu_debug(("FP const: 1.0e2048\n")); + break; + case 0x3f: + FPU registers[reg] = LD(1.0e4096); + fpu_debug(("FP const: 1.0e4096\n")); +#endif + break; + default: + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + // these *do* affect the status reg + make_fpsr(FPU registers[reg]); + dump_registers( "END "); + return; + } + + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + + if (FPU is_integral) { + // 68040-specific operations + switch (extra & 0x7f) { + case 0x40: /* FSMOVE */ + fpu_debug(("FSMOVE %.04f\n",(double)src)); + FPU registers[reg] = (float)src; + make_fpsr(FPU registers[reg]); + break; + case 0x44: /* FDMOVE */ + fpu_debug(("FDMOVE %.04f\n",(double)src)); + FPU registers[reg] = (double)src; + make_fpsr(FPU registers[reg]); + break; + case 0x41: /* FSSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (float)fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x45: /* FDSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (double)fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x58: /* FSABS */ + fpu_debug(("FSABS %.04f\n",(double)src)); + FPU registers[reg] = (float)fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5c: /* FDABS */ + fpu_debug(("FDABS %.04f\n",(double)src)); + FPU registers[reg] = (double)fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5a: /* FSNEG */ + fpu_debug(("FSNEG %.04f\n",(double)src)); + FPU registers[reg] = (float)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x5e: /* FDNEG */ + fpu_debug(("FDNEG %.04f\n",(double)src)); + FPU registers[reg] = (double)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x60: /* FSDIV */ + fpu_debug(("FSDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x64: /* FDDIV */ + fpu_debug(("FDDIV %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x62: /* FSADD */ + fpu_debug(("FSADD %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x66: /* FDADD */ + fpu_debug(("FDADD %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x68: /* FSSUB */ + fpu_debug(("FSSUB %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x6c: /* FDSUB */ + fpu_debug(("FDSUB %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x63: /* FSMUL */ + case 0x67: /* FDMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if (fl_dest.in_range && fl_source.in_range) { + if ((extra & 0x7f) == 0x63) + FPU registers[reg] = (float)(FPU registers[reg] * src); + else + FPU registers[reg] = (double)(FPU registers[reg] * src); + } + else if (fl_dest.nan || fl_source.nan || + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if ( (fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative) ) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if ( (fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative) ) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } + make_fpsr(FPU registers[reg]); + break; + default: + // Continue decode-execute 6888x instructions below + goto process_6888x_instructions; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + process_6888x_instructions: + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + fpu_debug(("FMOVE %.04f\n",(double)src)); + FPU registers[reg] = src; + make_fpsr(FPU registers[reg]); + break; + case 0x01: /* FINT */ + fpu_debug(("FINT %.04f\n",(double)src)); + FPU registers[reg] = toint(src); + make_fpsr(FPU registers[reg]); + break; + case 0x02: /* FSINH */ + fpu_debug(("FSINH %.04f\n",(double)src)); + FPU registers[reg] = fp_sinh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x03: /* FINTRZ */ + fpu_debug(("FINTRZ %.04f\n",(double)src)); + FPU registers[reg] = fp_round_to_zero(src); + make_fpsr(FPU registers[reg]); + break; + case 0x04: /* FSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x06: /* FLOGNP1 */ + fpu_debug(("FLOGNP1 %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src + 1.0); + make_fpsr(FPU registers[reg]); + break; + case 0x08: /* FETOXM1 */ + fpu_debug(("FETOXM1 %.04f\n",(double)src)); + FPU registers[reg] = fp_exp (src) - 1.0; + make_fpsr(FPU registers[reg]); + break; + case 0x09: /* FTANH */ + fpu_debug(("FTANH %.04f\n",(double)src)); + FPU registers[reg] = fp_tanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0a: /* FATAN */ + fpu_debug(("FATAN %.04f\n",(double)src)); + FPU registers[reg] = fp_atan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0c: /* FASIN */ + fpu_debug(("FASIN %.04f\n",(double)src)); + FPU registers[reg] = fp_asin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0d: /* FATANH */ + fpu_debug(("FATANH %.04f\n",(double)src)); + FPU registers[reg] = fp_atanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0e: /* FSIN */ + fpu_debug(("FSIN %.04f\n",(double)src)); + FPU registers[reg] = fp_sin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0f: /* FTAN */ + fpu_debug(("FTAN %.04f\n",(double)src)); + FPU registers[reg] = fp_tan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x10: /* FETOX */ + fpu_debug(("FETOX %.04f\n",(double)src)); + FPU registers[reg] = fp_exp (src); + make_fpsr(FPU registers[reg]); + break; + case 0x11: /* FTWOTOX */ + fpu_debug(("FTWOTOX %.04f\n",(double)src)); + FPU registers[reg] = fp_pow(2.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x12: /* FTENTOX */ + fpu_debug(("FTENTOX %.04f\n",(double)src)); + FPU registers[reg] = fp_pow(10.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x14: /* FLOGN */ + fpu_debug(("FLOGN %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src); + make_fpsr(FPU registers[reg]); + break; + case 0x15: /* FLOG10 */ + fpu_debug(("FLOG10 %.04f\n",(double)src)); + FPU registers[reg] = fp_log10 (src); + make_fpsr(FPU registers[reg]); + break; + case 0x16: /* FLOG2 */ + fpu_debug(("FLOG2 %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src) / fp_log (2.0); + make_fpsr(FPU registers[reg]); + break; + case 0x18: /* FABS */ + fpu_debug(("FABS %.04f\n",(double)src)); + FPU registers[reg] = fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x19: /* FCOSH */ + fpu_debug(("FCOSH %.04f\n",(double)src)); + FPU registers[reg] = fp_cosh(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1a: /* FNEG */ + fpu_debug(("FNEG %.04f\n",(double)src)); + FPU registers[reg] = -src; + make_fpsr(FPU registers[reg]); + break; + case 0x1c: /* FACOS */ + fpu_debug(("FACOS %.04f\n",(double)src)); + FPU registers[reg] = fp_acos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1d: /* FCOS */ + fpu_debug(("FCOS %.04f\n",(double)src)); + FPU registers[reg] = fp_cos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1e: /* FGETEXP */ + fpu_debug(("FGETEXP %.04f\n",(double)src)); + if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = fast_fgetexp( src ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x1f: /* FGETMAN */ + fpu_debug(("FGETMAN %.04f\n",(double)src)); + if( src == 0 ) { + FPU registers[reg] = 0; + } + else if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = src; + fast_remove_exponent( FPU registers[reg] ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x20: /* FDIV */ + fpu_debug(("FDIV %.04f\n",(double)src)); + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x21: /* FMOD */ + fpu_debug(("FMOD %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; + { + fpu_register quot = fp_round_to_zero(FPU registers[reg] / src); + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); + make_quotient(quot, sign); + } + break; + case 0x23: /* FMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if (fl_dest.in_range && fl_source.in_range) { + FPU registers[reg] *= src; + if (unlikely(isinf(FPU registers[reg]))) + { + isneg(FPU registers[reg]) ? make_inf_negative(FPU registers[reg]) : make_inf_positive(FPU registers[reg]); + } + } + else if (fl_dest.nan || fl_source.nan || + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if ( (fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative) ) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if ( (fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative) ) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } + make_fpsr(FPU registers[reg]); + break; + case 0x24: /* FSGLDIV */ + fpu_debug(("FSGLDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x25: /* FREM */ + fpu_debug(("FREM %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; + { + fpu_register quot = fp_round_to_nearest(FPU registers[reg] / src); + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); + make_quotient(quot,sign); + } + break; + + case 0x26: /* FSCALE */ + fpu_debug(("FSCALE %.04f\n",(double)src)); + // TODO: overflow flags + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if (fl_source.in_range && fl_dest.in_range) { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + // Here (int) cast is okay. + int scale_factor = (int)fp_round_to_zero(src); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = FPU registers[reg]; + sxp.ieee.exponent += scale_factor; + FPU registers[reg] = sxp.value; +#else + fp_declare_init_shape(sxp, double); + sxp.value = FPU registers[reg]; + uae_u32 exp = sxp.ieee.exponent + scale_factor; + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + sxp.ieee.exponent = exp; + FPU registers[reg] = sxp.value; +#endif + } + else if (fl_source.infinity) { + // Returns NaN for any Infinity source + make_nan( FPU registers[reg] ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x27: /* FSGLMUL */ + fpu_debug(("FSGLMUL %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] * src); + make_fpsr(FPU registers[reg]); + break; + case 0x28: /* FSUB */ + fpu_debug(("FSUB %.04f\n",(double)src)); + FPU registers[reg] -= src; + make_fpsr(FPU registers[reg]); + break; + case 0x22: /* FADD */ + fpu_debug(("FADD %.04f\n",(double)src)); + FPU registers[reg] += src; + if (unlikely(isinf(FPU registers[reg]))) + { + isneg(FPU registers[reg]) ? make_inf_negative(FPU registers[reg]) : make_inf_positive(FPU registers[reg]); + } + make_fpsr(FPU registers[reg]); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpu_debug(("FSINCOS %.04f\n",(double)src)); + // Cosine must be calculated first if same register + FPU registers[extra & 7] = fp_cos(src); + FPU registers[reg] = fp_sin (src); + // Set FPU fpsr according to the sine result + make_fpsr(FPU registers[reg]); + break; + case 0x38: /* FCMP */ + fpu_debug(("FCMP %.04f\n",(double)src)); + set_fpsr(0); + if (isinf(FPU registers[reg])) + { + if (isinf(src) && isneg(FPU registers[reg]) == isneg (src)) + make_fpsr(0); + else + make_fpsr(FPU registers[reg]); + } + else if (isinf(src)) + make_fpsr(-src); + else + make_fpsr(FPU registers[reg] - src); + break; + case 0x3a: /* FTST */ + fpu_debug(("FTST %.04f\n",(double)src)); + set_fpsr(0); + make_fpsr(src); + break; + default: + fpu_debug(("ILLEGAL F OP %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + +/* -------------------------- Initialization -------------------------- */ + +PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 + +PUBLIC void FFPU fpu_init (bool integral_68040) +{ + fpu_debug(("fpu_init\n")); + + static bool initialized_lookup_tables = false; + if (!initialized_lookup_tables) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); + initialized_lookup_tables = true; + } + + FPU is_integral = integral_68040; + FPU instruction_address = 0; + FPU fpsr.quotient = 0; + set_fpcr(0); + set_fpsr(0); + +#if defined(FPU_USE_X86_ROUNDING) + // Initial state after boot, reset and frestore(null frame) + x86_control_word = CW_INITIAL; +#elif defined(USE_X87_ASSEMBLY) + volatile unsigned short int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + cw &= ~0x0300; cw |= 0x0300; // CW_PC_EXTENDED + cw &= ~0x0C00; cw |= 0x0000; // CW_RC_NEAR + __asm__ __volatile__("fldcw %0" : : "m" (cw)); +#endif + + FPU result = 1; + + for (int i = 0; i < 8; i++) + make_nan(FPU registers[i]); +} + +PUBLIC void FFPU fpu_exit (void) +{ + fpu_debug(("fpu_exit\n")); +} + +PUBLIC void FFPU fpu_reset (void) +{ + fpu_debug(("fpu_reset\n")); + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h new file mode 100644 index 000000000..3321891af --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h @@ -0,0 +1,154 @@ +/* + * fpu/fpu_ieee.h - Extra Definitions for the IEEE FPU core + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_IEEE_H +#define FPU_IEEE_H + +/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Lauri-- full words to avoid partial register stalls. +struct double_flags { + uae_u32 in_range; + uae_u32 zero; + uae_u32 infinity; + uae_u32 nan; + uae_u32 negative; +}; +PRIVATE double_flags fl_source; +PRIVATE double_flags fl_dest; +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); +PRIVATE inline void FFPU get_source_flags(fpu_register const & r); + +PRIVATE inline void FFPU make_nan(fpu_register & r); +PRIVATE inline void FFPU make_zero_positive(fpu_register & r); +PRIVATE inline void FFPU make_zero_negative(fpu_register & r); +PRIVATE inline void FFPU make_inf_positive(fpu_register & r); +PRIVATE inline void FFPU make_inf_negative(fpu_register & r); + +// MJ PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign( + fpu_register const & ra, fpu_register const & rb +); + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient( + fpu_register const & quotient, uae_u32 sign +); + +// to_single +PRIVATE inline fpu_register FFPU make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to_exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// to_exten_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +); + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +); + +PRIVATE inline fpu_register FFPU make_packed( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +PRIVATE inline void FFPU extract_packed( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +PRIVATE inline int FFPU get_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register & src +); + +PRIVATE inline int FFPU put_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register const & value +); + +PRIVATE inline int FFPU get_fp_ad( + uae_u32 opcode, uae_u32 * ad +); + +PRIVATE inline int FFPU fpp_cond( + int condition +); + +#endif /* FPU_IEEE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp new file mode 100644 index 000000000..1975aba8d --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp @@ -0,0 +1,2110 @@ +/* + * fpu_mpfr.cpp - emulate 68881/68040 fpu with mpfr + * + * Copyright (c) 2012, 2013 Andreas Schwab + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "sysdeps.h" +#include +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#define SINGLE_PREC 24 +#define SINGLE_MIN_EXP -126 +#define SINGLE_MAX_EXP 127 +#define SINGLE_BIAS 127 +#define DOUBLE_PREC 53 +#define DOUBLE_MIN_EXP -1022 +#define DOUBLE_MAX_EXP 1023 +#define DOUBLE_BIAS 1023 +#define EXTENDED_PREC 64 +#define EXTENDED_MIN_EXP -16383 +#define EXTENDED_MAX_EXP 16383 +#define EXTENDED_BIAS 16383 + +fpu_t fpu; +// The constant ROM +// Constants 48 to 63 are mapped to index 16 to 31 +const int num_fpu_constants = 32; +static mpfr_t fpu_constant_rom[num_fpu_constants]; +#define FPU_CONSTANT_ONE fpu_constant_rom[18] +// Exceptions generated during execution in addition to the ones +// maintained by mpfr +static uae_u32 cur_exceptions; +static uaecptr cur_instruction_address; + +static void +set_format (int prec) +{ + // MPFR represents numbers as 0.m*2^e + switch (prec) + { + case SINGLE_PREC: + mpfr_set_emin (SINGLE_MIN_EXP + 1 - (SINGLE_PREC - 1)); + mpfr_set_emax (SINGLE_MAX_EXP + 1); + break; + case DOUBLE_PREC: + mpfr_set_emin (DOUBLE_MIN_EXP + 1 - (DOUBLE_PREC - 1)); + mpfr_set_emax (DOUBLE_MAX_EXP + 1); + break; + case EXTENDED_PREC: + mpfr_set_emin (EXTENDED_MIN_EXP + 1 - (EXTENDED_PREC - 1)); + mpfr_set_emax (EXTENDED_MAX_EXP + 1); + break; + } +} + +static mpfr_rnd_t +get_cur_rnd () +{ + switch (get_rounding_mode ()) + { + default: + case FPCR_ROUND_NEAR: + return MPFR_RNDN; + case FPCR_ROUND_ZERO: + return MPFR_RNDZ; + case FPCR_ROUND_MINF: + return MPFR_RNDD; + case FPCR_ROUND_PINF: + return MPFR_RNDU; + } +} + +static mpfr_prec_t +get_cur_prec () +{ + switch (get_rounding_precision ()) + { + default: + case FPCR_PRECISION_EXTENDED: + return EXTENDED_PREC; + case FPCR_PRECISION_SINGLE: + return SINGLE_PREC; + case FPCR_PRECISION_DOUBLE: + return DOUBLE_PREC; + } +} + +#define DEFAULT_NAN_BITS 0xffffffffffffffffULL + +static void +set_nan (fpu_register ®, uae_u64 nan_bits, int nan_sign) +{ + mpfr_set_nan (reg.f); + reg.nan_bits = nan_bits; + reg.nan_sign = nan_sign; +} + +static void +set_nan (fpu_register ®) +{ + set_nan (reg, DEFAULT_NAN_BITS, 0); +} + +static bool fpu_inited; + +void +fpu_init (bool integral_68040) +{ + fpu.is_integral = integral_68040; + + mpfr_set_default_prec (EXTENDED_PREC); + mpfr_set_default_rounding_mode (MPFR_RNDN); + set_format (EXTENDED_PREC); + + for (int i = 0; i < 8; i++) + mpfr_init (fpu.registers[i].f); + mpfr_init (fpu.result.f); + + // Initialize constant ROM + for (int i = 0; i < num_fpu_constants; i++) + mpfr_init (fpu_constant_rom[i]); + + // 0: pi + mpfr_const_pi (fpu_constant_rom[0], MPFR_RNDN); + // 11: log10 (2) + mpfr_set_ui (fpu_constant_rom[11], 2, MPFR_RNDN); + mpfr_log10 (fpu_constant_rom[11], fpu_constant_rom[11], MPFR_RNDZ); + // 12: e + mpfr_set_ui (fpu_constant_rom[12], 1, MPFR_RNDN); + mpfr_exp (fpu_constant_rom[12], fpu_constant_rom[12], MPFR_RNDZ); + // 13: log2 (e) + mpfr_log2 (fpu_constant_rom[13], fpu_constant_rom[12], MPFR_RNDU); + // 14: log10 (e) + mpfr_log10 (fpu_constant_rom[14], fpu_constant_rom[12], MPFR_RNDU); + // 15: 0 + mpfr_set_zero (fpu_constant_rom[15], 0); + // 48: ln (2) + mpfr_const_log2 (fpu_constant_rom[16], MPFR_RNDN); + // 49: ln (10) + mpfr_set_ui (fpu_constant_rom[17], 10, MPFR_RNDN); + mpfr_log (fpu_constant_rom[17], fpu_constant_rom[17], MPFR_RNDN); + // 50 to 63: powers of 10 + mpfr_set_ui (fpu_constant_rom[18], 1, MPFR_RNDN); + for (int i = 19; i < 32; i++) + { + mpfr_set_ui (fpu_constant_rom[i], 1L << (i - 19) , MPFR_RNDN); + mpfr_exp10 (fpu_constant_rom[i], fpu_constant_rom[i], MPFR_RNDN); + } + + fpu_inited = true; + + fpu_reset (); +} + +void +fpu_exit () +{ + if (!fpu_inited) return; + + for (int i = 0; i < 8; i++) + mpfr_clear (fpu.registers[i].f); + mpfr_clear (fpu.result.f); + for (int i = 0; i < num_fpu_constants; i++) + mpfr_clear (fpu_constant_rom[i]); +} + +void +fpu_reset () +{ + set_fpcr (0); + set_fpsr (0); + fpu.instruction_address = 0; + + for (int i = 0; i < 8; i++) + set_nan (fpu.registers[i]); +} + +fpu_register::operator long double () +{ + return mpfr_get_ld (f, MPFR_RNDN); +} + +fpu_register & +fpu_register::operator= (long double x) +{ + mpfr_set_ld (f, x, MPFR_RNDN); + nan_bits = DEFAULT_NAN_BITS; + nan_sign = 0; + return *this; +} + +static bool +get_fp_addr (uae_u32 opcode, uae_u32 *addr, bool write) +{ + uaecptr pc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) + { + case 0: + case 1: + return false; + case 2: + *addr = m68k_areg (regs, reg); + break; + case 3: + *addr = m68k_areg (regs, reg); + break; + case 4: + *addr = m68k_areg (regs, reg); + break; + case 5: + *addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); + break; + case 6: + *addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) + { + case 0: + *addr = (uae_s16) next_iword(); + break; + case 1: + *addr = next_ilong(); + break; + case 2: + if (write) + return false; + pc = m68k_getpc (); + *addr = pc + (uae_s16) next_iword(); + break; + case 3: + if (write) + return false; + pc = m68k_getpc (); + *addr = get_disp_ea_020 (pc, next_iword()); + break; + default: + return false; + } + } + return true; +} + +static void +set_from_single (fpu_register &value, uae_u32 data) +{ + int s = data >> 31; + int e = (data >> 23) & 0xff; + uae_u32 m = data & 0x7fffff; + + if (e == 0xff) + { + if (m != 0) + { + if (!(m & 0x400000)) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, (uae_u64) (m | 0xc00000) << (32 + 8), s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (e != 0) + // Add integer bit + m |= 0x800000; + else + e++; + // Remove bias + e -= SINGLE_BIAS; + mpfr_set_ui_2exp (value.f, m, e - (SINGLE_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +static void +set_from_double (fpu_register &value, uae_u32 words[2]) +{ + int s = words[0] >> 31; + int e = (words[0] >> 20) & 0x7ff; + uae_u32 m = words[0] & 0xfffff; + + if (e == 0x7ff) + { + if ((m | words[1]) != 0) + { + if (!(m & 0x80000)) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, (((uae_u64) (m | 0x180000) << (32 + 11)) + | ((uae_u64) words[1] << 11)), s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (e != 0) + // Add integer bit + m |= 0x100000; + else + e++; + // Remove bias + e -= DOUBLE_BIAS; + mpfr_set_uj_2exp (value.f, ((uintmax_t) m << 32) | words[1], + e - (DOUBLE_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +static void +set_from_extended (fpu_register &value, uae_u32 words[3], bool check_snan) +{ + int s = words[0] >> 31; + int e = (words[0] >> 16) & 0x7fff; + + if (e == 0x7fff) + { + if (((words[1] & 0x7fffffff) | words[2]) != 0) + { + if (check_snan) + { + if ((words[1] & 0x40000000) == 0) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + words[1] |= 0x40000000; + } + set_nan (value, ((uae_u64) words[1] << 32) | words[2], s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + // Remove bias + e -= EXTENDED_BIAS; + mpfr_set_uj_2exp (value.f, ((uintmax_t) words[1] << 32) | words[2], + e - (EXTENDED_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +#define from_bcd(d) ((d) < 10 ? (d) : (d) - 10) + +static void +set_from_packed (fpu_register &value, uae_u32 words[3]) +{ + char str[32], *p = str; + int sm = words[0] >> 31; + int se = (words[0] >> 30) & 1; + int i; + + if (((words[0] >> 16) & 0x7fff) == 0x7fff) + { + if ((words[1] | words[2]) != 0) + { + if ((words[1] & 0x40000000) == 0) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, ((uae_u64) (words[1] | 0x40000000) << 32) | words[2], + sm); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (sm) + *p++ = '-'; + *p++ = from_bcd (words[0] & 15) + '0'; + *p++ = '.'; + for (i = 0; i < 8; i++) + { + p[i] = from_bcd ((words[1] >> (28 - i * 4)) & 15) + '0'; + p[i + 8] = from_bcd ((words[2] >> (28 - i * 4)) & 15) + '0'; + } + p += 16; + *p++ = 'e'; + if (se) + *p++ = '-'; + *p++ = from_bcd ((words[0] >> 24) & 15) + '0'; + *p++ = from_bcd ((words[0] >> 20) & 15) + '0'; + *p++ = from_bcd ((words[0] >> 16) & 15) + '0'; + *p = 0; + mpfr_set_str (value.f, str, 10, MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, sm, MPFR_RNDN); +} + +static bool +get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register &value) +{ + int mode, reg, size; + uaecptr pc; + uae_u32 addr; + uae_u32 words[3]; + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + if ((extra & 0x4000) == 0) + { + mpfr_set (value.f, fpu.registers[(extra >> 10) & 7].f, MPFR_RNDN); + value.nan_bits = fpu.registers[(extra >> 10) & 7].nan_bits; + value.nan_sign = fpu.registers[(extra >> 10) & 7].nan_sign; + /* Check for SNaN. */ + if (mpfr_nan_p (value.f) && (value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + return true; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + switch (mode) + { + case 0: + switch (size) + { + case 6: + mpfr_set_si (value.f, (uae_s8) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 4: + mpfr_set_si (value.f, (uae_s16) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 0: + mpfr_set_si (value.f, (uae_s32) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 1: + set_from_single (value, m68k_dreg (regs, reg)); + break; + default: + return false; + } + return true; + case 1: + return false; + case 2: + case 3: + addr = m68k_areg (regs, reg); + break; + case 4: + addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + addr = m68k_areg (regs, reg) + (uae_s16) next_iword (); + break; + case 6: + addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword ()); + break; + case 7: + switch (reg) + { + case 0: + addr = (uae_s16) next_iword (); + break; + case 1: + addr = next_ilong (); + break; + case 2: + pc = m68k_getpc (); + addr = pc + (uae_s16) next_iword (); + break; + case 3: + pc = m68k_getpc (); + addr = get_disp_ea_020 (pc, next_iword ()); + break; + case 4: + addr = m68k_getpc (); + m68k_incpc (sz2[size]); + if (size == 6) // Immediate byte + addr++; + break; + default: + return false; + } + } + + switch (size) + { + case 0: + mpfr_set_si (value.f, (uae_s32) get_long (addr), MPFR_RNDN); + break; + case 1: + set_from_single (value, get_long (addr)); + break; + case 2: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + set_from_extended (value, words, true); + break; + case 3: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + set_from_packed (value, words); + break; + case 4: + mpfr_set_si (value.f, (uae_s16) get_word (addr), MPFR_RNDN); + break; + case 5: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + set_from_double (value, words); + break; + case 6: + mpfr_set_si (value.f, (uae_s8) get_byte (addr), MPFR_RNDN); + break; + default: + return false; + } + + switch (mode) + { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + return true; +} + +static void +update_exceptions () +{ + uae_u32 exc, aexc; + + exc = cur_exceptions; + // Add any mpfr detected exceptions + if (mpfr_underflow_p ()) + exc |= FPSR_EXCEPTION_UNFL; + if (mpfr_overflow_p ()) + exc |= FPSR_EXCEPTION_OVFL; + if (mpfr_inexflag_p ()) + exc |= FPSR_EXCEPTION_INEX2; + set_exception_status (exc); + + aexc = get_accrued_exception (); + if (exc & (FPSR_EXCEPTION_SNAN|FPSR_EXCEPTION_OPERR)) + aexc |= FPSR_ACCR_IOP; + if (exc & FPSR_EXCEPTION_OVFL) + aexc |= FPSR_ACCR_OVFL; + if ((exc & (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) + == (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) + aexc |= FPSR_ACCR_UNFL; + if (exc & FPSR_EXCEPTION_DZ) + aexc |= FPSR_ACCR_DZ; + if (exc & (FPSR_EXCEPTION_INEX1|FPSR_EXCEPTION_INEX2|FPSR_EXCEPTION_OVFL)) + aexc |= FPSR_ACCR_INEX; + set_accrued_exception (aexc); + + if ((fpu.fpcr.exception_enable & exc) != 0) + { + fpu.instruction_address = cur_instruction_address; + // TODO: raise exceptions + // Problem: FPSP040 depends on proper FPU stack frames, it would suffer + // undefined behaviour with our dummy FSAVE implementation + } +} + +static void +set_fp_register (int reg, mpfr_t value, uae_u64 nan_bits, int nan_sign, + int t, mpfr_rnd_t rnd, bool do_flags) +{ + mpfr_subnormalize (value, t, rnd); + mpfr_set (fpu.registers[reg].f, value, rnd); + fpu.registers[reg].nan_bits = nan_bits; + fpu.registers[reg].nan_sign = nan_sign; + if (do_flags) + { + uae_u32 flags = 0; + + if (mpfr_zero_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_ZERO; + if (mpfr_signbit (fpu.registers[reg].f)) + flags |= FPSR_CCB_NEGATIVE; + if (mpfr_nan_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_NAN; + if (mpfr_inf_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_INFINITY; + set_fpccr (flags); + } +} + +static void +set_fp_register (int reg, mpfr_t value, int t, mpfr_rnd_t rnd, bool do_flags) +{ + set_fp_register (reg, value, DEFAULT_NAN_BITS, 0, t, rnd, do_flags); +} + +static void +set_fp_register (int reg, fpu_register &value, int t, mpfr_rnd_t rnd, + bool do_flags) +{ + set_fp_register (reg, value.f, value.nan_bits, value.nan_sign, t, rnd, + do_flags); +} + +static uae_u32 +extract_to_single (fpu_register &value) +{ + uae_u32 word; + int t; + mpfr_rnd_t rnd = get_cur_rnd (); + MPFR_DECL_INIT (single, SINGLE_PREC); + + set_format (SINGLE_PREC); + // Round to single + t = mpfr_set (single, value.f, rnd); + t = mpfr_check_range (single, t, rnd); + mpfr_subnormalize (single, t, rnd); + set_format (EXTENDED_PREC); + + if (mpfr_inf_p (single)) + word = 0x7f800000; + else if (mpfr_nan_p (single)) + { + if ((value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + word = 0x7f800000 | ((value.nan_bits >> (32 + 8)) & 0x7fffff); + if (value.nan_sign) + word |= 0x80000000; + } + else if (mpfr_zero_p (single)) + word = 0; + else + { + int e; + mpz_t f; + mpz_init (f); + word = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, single); + // Move binary point + e += SINGLE_PREC - 1; + // Add bias + e += SINGLE_BIAS; + if (e <= 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e + 1); + e = 0; + } + mpz_export (&word, 0, 1, 4, 0, 0, f); + // Remove integer bit + word &= 0x7fffff; + word |= e << 23; + mpz_clear (f); + } + if (mpfr_signbit (single)) + word |= 0x80000000; + return word; +} + +static void +extract_to_double (fpu_register &value, uint32_t *words) +{ + int t; + mpfr_rnd_t rnd = get_cur_rnd (); + MPFR_DECL_INIT (dbl, DOUBLE_PREC); + + set_format (DOUBLE_PREC); + // Round to double + t = mpfr_set (dbl, value.f, rnd); + t = mpfr_check_range (dbl, t, rnd); + mpfr_subnormalize (dbl, t, rnd); + set_format (EXTENDED_PREC); + + if (mpfr_inf_p (dbl)) + { + words[0] = 0x7ff00000; + words[1] = 0; + } + else if (mpfr_nan_p (dbl)) + { + if ((value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + words[0] = 0x7ff00000 | ((value.nan_bits >> (32 + 11)) & 0xfffff); + words[1] = value.nan_bits >> 11; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (dbl)) + { + words[0] = 0; + words[1] = 0; + } + else + { + int e, off = 0; + mpz_t f; + mpz_init (f); + words[0] = words[1] = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, dbl); + // Move binary point + e += DOUBLE_PREC - 1; + // Add bias + e += DOUBLE_BIAS; + if (e <= 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e + 1); + if (e <= -20) + // No more than 32 bits left + off = 1; + e = 0; + } + mpz_export (&words[off], 0, 1, 4, 0, 0, f); + // Remove integer bit + words[0] &= 0xfffff; + words[0] |= e << 20; + mpz_clear (f); + } + if (mpfr_signbit (dbl)) + words[0] |= 0x80000000; +} + +static void +extract_to_extended (fpu_register &value, uint32_t *words) +{ + if (mpfr_inf_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = 0; + words[2] = 0; + } + else if (mpfr_nan_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = value.nan_bits >> 32; + words[2] = value.nan_bits; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (value.f)) + { + words[0] = 0; + words[1] = 0; + words[2] = 0; + } + else + { + int e, off = 0; + mpz_t f; + + mpz_init (f); + words[0] = words[1] = words[2] = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, value.f); + // Move binary point + e += EXTENDED_PREC - 1; + // Add bias + e += EXTENDED_BIAS; + if (e < 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e); + if (e <= -32) + // No more than 32 bits left + off = 1; + e = 0; + } + mpz_export (&words[1 + off], 0, 1, 4, 0, 0, f); + words[0] = e << 16; + mpz_clear (f); + } + if (mpfr_signbit (value.f)) + words[0] |= 0x80000000; +} + +static void +extract_to_packed (fpu_register &value, int k, uae_u32 *words) +{ + if (mpfr_inf_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = 0; + words[2] = 0; + } + else if (mpfr_nan_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = value.nan_bits >> 32; + words[2] = value.nan_bits; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (value.f)) + { + words[0] = 0; + words[1] = 0; + words[2] = 0; + } + else + { + char str[100], *p = str; + mpfr_exp_t e; + mpfr_rnd_t rnd = get_cur_rnd (); + + words[0] = words[1] = words[2] = 0; + if (k >= 64) + k -= 128; + else if (k >= 18) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + if (k <= 0) + { + MPFR_DECL_INIT (temp, 16); + + mpfr_log10 (temp, value.f, rnd); + k = mpfr_get_si (temp, MPFR_RNDZ) - k + 1; + } + if (k <= 0) + k = 1; + else if (k >= 18) + k = 17; + mpfr_get_str (str, &e, 10, k, value.f, rnd); + e--; + if (*p == '-') + p++; + // Pad to 17 digits + while (k < 17) + p[k++] = '0'; + if (e < 0) + { + words[0] |= 0x40000000; + e = -e; + } + words[0] |= (e % 10) << 16; + e /= 10; + words[0] |= (e % 10) << 20; + e /= 10; + words[0] |= (e % 10) << 24; + e /= 10; + if (e) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + words[0] |= e << 12; + words[0] |= *p++ & 15; + for (k = 0; k < 8; k++) + words[1] = (words[1] << 4) | (*p++ & 15); + for (k = 0; k < 8; k++) + words[2] = (words[2] << 4) | (*p++ & 15); + + } + if (mpfr_signbit (value.f)) + words[0] |= 0x80000000; +} + +static long +extract_to_integer (mpfr_t value, long min, long max) +{ + long result; + mpfr_rnd_t rnd = get_cur_rnd (); + + if (mpfr_fits_slong_p (value, rnd)) + { + result = mpfr_get_si (value, rnd); + if (result > max) + { + result = max; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (result < min) + { + result = min; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + } + else + { + if (!mpfr_signbit (value)) + result = max; + else + result = min; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + return result; +} + +static bool +fpuop_fmove_memory (uae_u32 opcode, uae_u32 extra) +{ + int mode, reg, size; + uaecptr pc; + uae_u32 addr; + uae_u32 words[3]; + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + mpfr_clear_flags (); + cur_exceptions = 0; + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + fpu_register &value = fpu.registers[(extra >> 7) & 7]; + + switch (mode) + { + case 0: + switch (size) + { + case 0: + m68k_dreg (regs, reg) = extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff); + break; + case 1: + m68k_dreg (regs, reg) = extract_to_single (value); + break; + case 4: + m68k_dreg (regs, reg) &= ~0xffff; + m68k_dreg (regs, reg) |= extract_to_integer (value.f, -32768, 32767) & 0xffff; + break; + case 6: + m68k_dreg (regs, reg) &= ~0xff; + m68k_dreg (regs, reg) |= extract_to_integer (value.f, -128, 127) & 0xff; + break; + default: + return false; + } + update_exceptions (); + return true; + case 1: + return false; + case 2: + addr = m68k_areg (regs, reg); + break; + case 3: + addr = m68k_areg (regs, reg); + break; + case 4: + addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); + break; + case 6: + addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) + { + case 0: + addr = (uae_s16) next_iword(); + break; + case 1: + addr = next_ilong(); + break; + case 2: + pc = m68k_getpc (); + addr = pc + (uae_s16) next_iword(); + break; + case 3: + pc = m68k_getpc (); + addr = get_disp_ea_020 (pc, next_iword ()); + break; + case 4: + addr = m68k_getpc (); + m68k_incpc (sz2[size]); + break; + default: + return false; + } + } + + switch (size) + { + case 0: + put_long (addr, extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff)); + break; + case 1: + put_long (addr, extract_to_single (value)); + break; + case 2: + extract_to_extended (value, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + case 3: + extract_to_packed (value, extra & 0x7f, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + case 4: + put_word (addr, extract_to_integer (value.f, -32768, 32767)); + break; + case 5: + extract_to_double (value, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + break; + case 6: + put_byte (addr, extract_to_integer (value.f, -128, 127)); + break; + case 7: + extract_to_packed (value, m68k_dreg (regs, (extra >> 4) & 7) & 0x7f, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + } + + switch (mode) + { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + update_exceptions (); + return true; +} + +static bool +fpuop_fmovem_control (uae_u32 opcode, uae_u32 extra) +{ + int list, mode, reg; + uae_u32 addr; + + list = (extra >> 10) & 7; + mode = (opcode >> 3) & 7; + reg = opcode & 7; + + if (list == 0) + return false; + + if (extra & 0x2000) + { + // FMOVEM to + if (mode == 0) + { + switch (list) + { + case 1: + m68k_dreg (regs, reg) = fpu.instruction_address; + break; + case 2: + m68k_dreg (regs, reg) = get_fpsr (); + break; + case 4: + m68k_dreg (regs, reg) = get_fpcr (); + break; + default: + return false; + } + } + else if (mode == 1) + { + if (list != 1) + return false; + m68k_areg (regs, reg) = fpu.instruction_address; + } + else + { + int nwords; + + if (!get_fp_addr (opcode, &addr, true)) + return false; + nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); + if (mode == 4) + addr -= nwords * 4; + if (list & 4) + { + put_long (addr, get_fpcr ()); + addr += 4; + } + if (list & 2) + { + put_long (addr, get_fpsr ()); + addr += 4; + } + if (list & 1) + { + put_long (addr, fpu.instruction_address); + addr += 4; + } + if (mode == 4) + m68k_areg (regs, reg) = addr - nwords * 4; + else if (mode == 3) + m68k_areg (regs, reg) = addr; + } + } + else + { + // FMOVEM from + + if (mode == 0) + { + switch (list) + { + case 1: + fpu.instruction_address = m68k_dreg (regs, reg); + break; + case 2: + set_fpsr (m68k_dreg (regs, reg)); + break; + case 4: + set_fpcr (m68k_dreg (regs, reg)); + break; + default: + return false; + } + } + else if (mode == 1) + { + if (list != 1) + return false; + fpu.instruction_address = m68k_areg (regs, reg); + } + else if ((opcode & 077) == 074) + { + switch (list) + { + case 1: + fpu.instruction_address = next_ilong (); + break; + case 2: + set_fpsr (next_ilong ()); + break; + case 4: + set_fpcr (next_ilong ()); + break; + default: + return false; + } + } + else + { + int nwords; + + if (!get_fp_addr (opcode, &addr, false)) + return false; + nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); + if (mode == 4) + addr -= nwords * 4; + if (list & 4) + { + set_fpcr (get_long (addr)); + addr += 4; + } + if (list & 2) + { + set_fpsr (get_long (addr)); + addr += 4; + } + if (list & 1) + { + fpu.instruction_address = get_long (addr); + addr += 4; + } + if (mode == 4) + m68k_areg (regs, reg) = addr - nwords * 4; + else if (mode == 3) + m68k_areg (regs, reg) = addr; + } + } + + return true; +} + +static bool +fpuop_fmovem_register (uae_u32 opcode, uae_u32 extra) +{ + uae_u32 addr; + uae_u32 words[3]; + int list; + int i; + + set_format (EXTENDED_PREC); + if (!get_fp_addr (opcode, &addr, extra & 0x2000)) + return false; + if (extra & 0x800) + list = m68k_dreg (regs, (extra >> 4) & 7) & 0xff; + else + list = extra & 0xff; + + if (extra & 0x2000) + { + // FMOVEM to memory + + switch (opcode & 070) + { + case 030: + return false; + case 040: + if (extra & 0x1000) + return false; + for (i = 7; i >= 0; i--) + if (list & (1 << i)) + { + extract_to_extended (fpu.registers[i], words); + addr -= 12; + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + } + m68k_areg (regs, opcode & 7) = addr; + break; + default: + if ((extra & 0x1000) == 0) + return false; + for (i = 0; i < 8; i++) + if (list & (0x80 >> i)) + { + extract_to_extended (fpu.registers[i], words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + addr += 12; + } + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; + break; + } + } + else + { + // FMOVEM from memory + + if ((opcode & 070) == 040) + return false; + + if ((extra & 0x1000) == 0) + return false; + for (i = 0; i < 8; i++) + if (list & (0x80 >> i)) + { + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + addr += 12; + set_from_extended (fpu.registers[i], words, false); + } + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; + } + return true; +} + +static int +do_getexp (mpfr_t value, mpfr_rnd_t rnd) +{ + int t = 0; + + if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) + t = mpfr_set_si (value, mpfr_get_exp (value) - 1, rnd); + return t; +} + +static int +do_getman (mpfr_t value) +{ + if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) + mpfr_set_exp (value, 1); + return 0; +} + +static int +do_scale (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + long scale; + int t = 0; + + if (mpfr_nan_p (value)) + ; + else if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_fits_slong_p (value, rnd)) + { + scale = mpfr_get_si (value, MPFR_RNDZ); + mpfr_clear_inexflag (); + t = mpfr_mul_2si (value, reg, scale, rnd); + } + else + mpfr_set_inf (value, -mpfr_signbit (value)); + return t; +} + +static int +do_remainder (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + long quo; + int t = 0; + + if (mpfr_nan_p (value) || mpfr_nan_p (reg)) + ; + else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_remquo (value, &quo, reg, value, rnd); + if (quo < 0) + quo = (-quo & 0x7f) | 0x80; + else + quo &= 0x7f; + fpu.fpsr.quotient = quo << 16; + return t; +} + +// Unfortunately, mpfr_fmod does not return the quotient bits, so we +// have to reimplement it here +static int +mpfr_rem1 (mpfr_t rem, int *quo, mpfr_t x, mpfr_t y, mpfr_rnd_t rnd) +{ + mpfr_exp_t ex, ey; + int inex, sign, signx = mpfr_signbit (x); + mpz_t mx, my, r; + + mpz_init (mx); + mpz_init (my); + mpz_init (r); + + ex = mpfr_get_z_2exp (mx, x); /* x = mx*2^ex */ + ey = mpfr_get_z_2exp (my, y); /* y = my*2^ey */ + + /* to get rid of sign problems, we compute it separately: + quo(-x,-y) = quo(x,y), rem(-x,-y) = -rem(x,y) + quo(-x,y) = -quo(x,y), rem(-x,y) = -rem(x,y) + thus quo = sign(x/y)*quo(|x|,|y|), rem = sign(x)*rem(|x|,|y|) */ + sign = (signx != mpfr_signbit (y)); + mpz_abs (mx, mx); + mpz_abs (my, my); + + /* divide my by 2^k if possible to make operations mod my easier */ + { + unsigned long k = mpz_scan1 (my, 0); + ey += k; + mpz_fdiv_q_2exp (my, my, k); + } + + if (ex <= ey) + { + /* q = x/y = mx/(my*2^(ey-ex)) */ + mpz_mul_2exp (my, my, ey - ex); /* divide mx by my*2^(ey-ex) */ + /* 0 <= |r| <= |my|, r has the same sign as mx */ + mpz_tdiv_qr (mx, r, mx, my); + /* mx is the quotient */ + mpz_tdiv_r_2exp (mx, mx, 7); + *quo = mpz_get_si (mx); + } + else /* ex > ey */ + { + /* to get the low 7 more bits of the quotient, we first compute + R = X mod Y*2^7, where X and Y are defined below. Then the + low 7 of the quotient are floor(R/Y). */ + mpz_mul_2exp (my, my, 7); /* 2^7*Y */ + + mpz_set_ui (r, 2); + mpz_powm_ui (r, r, ex - ey, my); /* 2^(ex-ey) mod my */ + mpz_mul (r, r, mx); + mpz_mod (r, r, my); + + /* now 0 <= r < 2^7*Y */ + mpz_fdiv_q_2exp (my, my, 7); /* back to Y */ + mpz_tdiv_qr (mx, r, r, my); + /* oldr = mx*my + newr */ + *quo = mpz_get_si (mx); + + /* now 0 <= |r| < |my| */ + } + + if (mpz_cmp_ui (r, 0) == 0) + { + inex = mpfr_set_ui (rem, 0, MPFR_RNDN); + /* take into account sign of x */ + if (signx) + mpfr_neg (rem, rem, MPFR_RNDN); + } + else + { + /* take into account sign of x */ + if (signx) + mpz_neg (r, r); + inex = mpfr_set_z_2exp (rem, r, ex > ey ? ey : ex, rnd); + } + + if (sign) + *quo |= 0x80; + + mpz_clear (mx); + mpz_clear (my); + mpz_clear (r); + + return inex; +} + +static int +do_fmod (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + int t = 0; + + if (mpfr_nan_p (value) || mpfr_nan_p (reg)) + mpfr_set_nan (value); + else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_zero_p (reg) || mpfr_inf_p (value)) + { + fpu.fpsr.quotient = 0; + t = mpfr_set (value, reg, rnd); + } + else + { + int quo; + + t = mpfr_rem1 (value, &quo, reg, value, rnd); + fpu.fpsr.quotient = quo << 16; + } + return t; +} + +static void +do_fcmp (mpfr_t source, mpfr_t dest) +{ + uae_u32 flags = 0; + + if (mpfr_nan_p (source) || mpfr_nan_p (dest)) + flags |= FPSR_CCB_NAN; + else + { + int cmp = mpfr_cmp (dest, source); + if (cmp < 0) + flags |= FPSR_CCB_NEGATIVE; + else if (cmp == 0) + { + flags |= FPSR_CCB_ZERO; + if ((mpfr_zero_p (dest) || mpfr_inf_p (dest)) && mpfr_signbit (dest)) + flags |= FPSR_CCB_NEGATIVE; + } + } + set_fpccr (flags); +} + +static void +do_ftst (mpfr_t value) +{ + uae_u32 flags = 0; + + if (mpfr_signbit (value)) + flags |= FPSR_CCB_NEGATIVE; + if (mpfr_nan_p (value)) + flags |= FPSR_CCB_NAN; + else if (mpfr_zero_p (value)) + flags |= FPSR_CCB_ZERO; + else if (mpfr_inf_p (value)) + flags |= FPSR_CCB_INFINITY; + set_fpccr (flags); +} + +static bool +fpuop_general (uae_u32 opcode, uae_u32 extra) +{ + mpfr_prec_t prec = get_cur_prec (); + mpfr_rnd_t rnd = get_cur_rnd (); + int reg = (extra >> 7) & 7; + int t = 0; + fpu_register value; + bool ret; + + mpfr_init2 (value.f, prec); + value.nan_bits = DEFAULT_NAN_BITS; + value.nan_sign = 0; + + mpfr_clear_flags (); + set_format (prec); + cur_exceptions = 0; + cur_instruction_address = m68k_getpc () - 4; + if ((extra & 0xfc00) == 0x5c00) + { + // FMOVECR + int rom_index = extra & 0x7f; + if (rom_index == 0 || (rom_index >= 11 && rom_index <= 15)) + t = mpfr_set (value.f, fpu_constant_rom[rom_index], rnd); + else if (rom_index >= 48 && rom_index <= 63) + t = mpfr_set (value.f, fpu_constant_rom[rom_index - 32], rnd); + else + mpfr_set_zero (value.f, 0); + set_fp_register (reg, value, t, rnd, true); + } + else if (extra & 0x40) + { + static const char valid[64] = + { + 1, 1, 0, 0, 1, 1, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, + 1, 0, 1, 0, 1, 0, 1, 0, + 1, 0, 1, 1, 1, 0, 1, 1, + 1, 0, 0, 0, 1, 0, 0, 0 + }; + + if (extra & 4) + // FD... + prec = DOUBLE_PREC; + else + // FS... + prec = SINGLE_PREC; + set_format (prec); + MPFR_DECL_INIT (value2, prec); + + if (!fpu.is_integral) + { + ret = false; + goto out; + } + if (!valid[extra & 0x3b]) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + switch (extra & 0x3f) + { + case 0: // FSMOVE + case 4: // FDMOVE + mpfr_set (value2, value.f, rnd); + break; + case 1: // FSSQRT + case 5: // FDSQRT + if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sqrt (value2, value.f, rnd); + break; + case 24: // FSABS + case 28: // FDABS + t = mpfr_abs (value2, value.f, rnd); + break; + case 26: // FSNEG + case 30: // FDNEG + t = mpfr_neg (value2, value.f, rnd); + break; + case 32: // FSDIV + case 36: // FDDIV + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 34: // FSADD + case 38: // FDADD + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_add (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 35: // FSMUL + case 39: // FDMUL + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 40: // FSSUB + case 44: // FDSUB + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sub (value2, fpu.registers[reg].f, value.f, rnd); + break; + } + set_fp_register (reg, value2, t, rnd, true); + } + else if ((extra & 0x30) == 0x30) + { + if ((extra & 15) > 10 || (extra & 15) == 9) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + if ((extra & 15) < 8) + { + // FSINCOS + int reg2 = extra & 7; + MPFR_DECL_INIT (value2, prec); + + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sin_cos (value.f, value2, value.f, rnd); + if (reg2 != reg) + set_fp_register (reg2, value2, t >> 2, rnd, false); + set_fp_register (reg, value, t & 3, rnd, true); + } + else if ((extra & 15) == 8) + // FCMP + do_fcmp (value.f, fpu.registers[reg].f); + else + // FTST + do_ftst (value.f); + } + else + { + static const char valid[64] = + { + 1, 1, 1, 1, 1, 0, 1, 0, + 1, 1, 1, 0, 1, 1, 1, 1, + 1, 1, 1, 0, 1, 1, 1, 0, + 1, 1, 1, 0, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, + 1 + }; + if (!valid[extra & 0x3f]) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + switch (extra & 0x3f) + { + case 0: // FMOVE + break; + case 1: // FINT + t = mpfr_rint (value.f, value.f, rnd); + break; + case 2: // FSINH + t = mpfr_sinh (value.f, value.f, rnd); + break; + case 3: // FINTRZ + t = mpfr_rint (value.f, value.f, MPFR_RNDZ); + break; + case 4: // FSQRT + if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sqrt (value.f, value.f, rnd); + break; + case 6: // FLOGNP1 + if (!mpfr_nan_p (value.f)) + { + int cmp = mpfr_cmp_si (value.f, -1); + if (cmp == 0) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (cmp < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + t = mpfr_log1p (value.f, value.f, rnd); + break; + case 8: // FETOXM1 + t = mpfr_expm1 (value.f, value.f, rnd); + break; + case 9: // FTANH + t = mpfr_tanh (value.f, value.f, rnd); + break; + case 10: // FATAN + t = mpfr_atan (value.f, value.f, rnd); + break; + case 12: // FASIN + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_asin (value.f, value.f, rnd); + break; + case 13: // FATANH + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_atanh (value.f, value.f, rnd); + break; + case 14: // FSIN + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sin (value.f, value.f, rnd); + break; + case 15: // FTAN + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_tan (value.f, value.f, rnd); + break; + case 16: // FETOX + t = mpfr_exp (value.f, value.f, rnd); + break; + case 17: // FTWOTOX + t = mpfr_ui_pow (value.f, 2, value.f, rnd); + break; + case 18: // FTENTOX + t = mpfr_ui_pow (value.f, 10, value.f, rnd); + break; + case 20: // FLOGN + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log (value.f, value.f, rnd); + break; + case 21: // FLOG10 + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log10 (value.f, value.f, rnd); + break; + case 22: // FLOG2 + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log2 (value.f, value.f, rnd); + break; + case 24: // FABS + t = mpfr_abs (value.f, value.f, rnd); + value.nan_sign = 0; + break; + case 25: // FCOSH + t = mpfr_cosh (value.f, value.f, rnd); + break; + case 26: // FNEG + t = mpfr_neg (value.f, value.f, rnd); + value.nan_sign = !value.nan_sign; + break; + case 28: // FACOS + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_acos (value.f, value.f, rnd); + break; + case 29: // FCOS + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_cos (value.f, value.f, rnd); + break; + case 30: // FGETEXP + t = do_getexp (value.f, rnd); + break; + case 31: // FGETMAN + t = do_getman (value.f); + break; + case 32: // FDIV + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 33: // FMOD + t = do_fmod (value.f, fpu.registers[reg].f, rnd); + break; + case 34: // FADD + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_add (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 35: // FMUL + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 36: // FSGLDIV + { + MPFR_DECL_INIT (value2, SINGLE_PREC); + + set_format (SINGLE_PREC); + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); + mpfr_set (value.f, value2, rnd); + } + break; + case 37: // FREM + t = do_remainder (value.f, fpu.registers[reg].f, rnd); + break; + case 38: // FSCALE + t = do_scale (value.f, fpu.registers[reg].f, rnd); + break; + case 39: // FSGLMUL + { + MPFR_DECL_INIT (value2, SINGLE_PREC); + + set_format (SINGLE_PREC); + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); + mpfr_set (value.f, value2, rnd); + } + break; + case 40: // FSUB + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sub (value.f, fpu.registers[reg].f, value.f, rnd); + break; + } + set_fp_register (reg, value, t, rnd, true); + } + update_exceptions (); + ret = true; + out: + mpfr_clear (value.f); + return ret; +} + +void +fpuop_arithmetic (uae_u32 opcode, uae_u32 extra) +{ + bool valid; + + switch ((extra >> 13) & 7) + { + case 3: + valid = fpuop_fmove_memory (opcode, extra); + break; + case 4: + case 5: + valid = fpuop_fmovem_control (opcode, extra); + break; + case 6: + case 7: + valid = fpuop_fmovem_register (opcode, extra); + break; + case 0: + case 2: + valid = fpuop_general (opcode, extra); + break; + default: + valid = false; + break; + } + + if (!valid) + { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } +} + +static bool +check_fp_cond (uae_u32 pred) +{ + uae_u32 fpcc = get_fpccr (); + + if ((pred & 16) != 0 && (fpcc & FPSR_CCB_NAN) != 0) + { + // IEEE non-aware test + set_exception_status (get_exception_status () | FPSR_EXCEPTION_BSUN); + set_accrued_exception (get_accrued_exception () | FPSR_ACCR_IOP); + } + + switch (pred & 15) + { + case 0: // F / SF + return false; + case 1: // EQ /SEQ + return (fpcc & FPSR_CCB_ZERO) != 0; + case 2: // OGT / GT + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) == 0; + case 3: // OGE / GE + return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NAN | FPSR_CCB_NEGATIVE)) == 0; + case 4: // OLT / LT + return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; + case 5: // OLE / LE + return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN)) == FPSR_CCB_NEGATIVE; + case 6: // OGL / GL + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) == 0; + case 7: // OR / GLE + return (fpcc & FPSR_CCB_NAN) == 0; + case 8: // UN / NGLE + return (fpcc & FPSR_CCB_NAN) != 0; + case 9: // UEQ / NGL + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) != 0; + case 10: // UGT / NLE + return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == 0; + case 11: // UGE / NLT + return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) != FPSR_CCB_NEGATIVE; + case 12: // ULT / NGE + return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; + case 13: // ULE / NGT + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) != 0; + case 14: // NE / SNE + return (fpcc & FPSR_CCB_ZERO) == 0; + case 15: // T / ST + return true; + default: + return false; + } +} + +void +fpuop_bcc (uae_u32 opcode, uaecptr pc, uae_u32 disp) +{ + if (check_fp_cond (opcode)) + { + if (!(opcode & (1 << 6))) + disp = (uae_s16) disp; + m68k_setpc (pc + disp); + } +} + +void +fpuop_scc (uae_u32 opcode, uae_u32 extra) +{ + uae_u32 addr; + int value = check_fp_cond (extra) ? 0xff : 0; + if ((opcode & 070) == 0) + { + int reg = opcode & 7; + m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xff) | value; + } + else if (!get_fp_addr (opcode, &addr, true)) + { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + { + switch (opcode & 070) + { + case 030: + m68k_areg (regs, opcode & 7) += (opcode & 7) == 7 ? 2 : 1; + break; + case 040: + addr -= (opcode & 7) == 7 ? 2 : 1; + m68k_areg (regs, opcode & 7) = addr; + } + put_byte (addr, value); + } +} + +void +fpuop_dbcc (uae_u32 opcode, uae_u32 extra) +{ + uaecptr pc = m68k_getpc (); + uae_s16 disp = next_iword (); + + if (!check_fp_cond (extra)) + { + int reg = opcode & 7; + uae_u16 cnt = (m68k_dreg (regs, reg) & 0xffff) - 1; + m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xffff) | cnt; + if (cnt != 0xffff) + m68k_setpc (pc + disp); + } +} + +void +fpuop_trapcc (uae_u32, uaecptr oldpc, uae_u32 extra) +{ + if (check_fp_cond (extra)) + Exception (7, oldpc - 2); +} + +void +fpuop_save (uae_u32 opcode) +{ + uae_u32 addr; + + if ((opcode & 070) == 030 + || !get_fp_addr (opcode, &addr, true)) + { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (fpu.is_integral) + { + // 4 byte 68040 IDLE frame + // FIXME: generate proper FPU stack frames that does not result + // in undefined behaviour from FPSP040 + if ((opcode & 070) == 040) + { + addr -= 4; + m68k_areg (regs, opcode & 7) = addr; + } + put_long (addr, 0x41000000); + } + else + { + // 28 byte 68881 IDLE frame + if ((opcode & 070) == 040) + { + addr -= 28; + m68k_areg (regs, opcode & 7) = addr; + } + put_long (addr, 0x1f180000); + for (int i = 0; i < 6; i++) + { + addr += 4; + put_long (addr, 0); + } + } +} + +void +fpuop_restore (uae_u32 opcode) +{ + uae_u32 addr; + uae_u32 format; + + if ((opcode & 070) == 040 + || !get_fp_addr (opcode, &addr, false)) + { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + format = get_long (addr); + addr += 4; + if ((format & 0xff000000) == 0) + // NULL frame + fpu_reset (); + else + addr += (format & 0xff0000) >> 16; + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; +} + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp new file mode 100644 index 000000000..23efd8ef5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp @@ -0,0 +1,2553 @@ +/* + * fpu/fpu_uae.cpp - the old UAE FPU + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68881 emulation + * + * Copyright 1996 Herman ten Brugge + * + * + * Following fixes by Lauri Pesonen, July 1999: + * + * FMOVEM list handling: + * The lookup tables did not work correctly, rewritten. + * FINT: + * (int) cast does not work, fixed. + * Further, now honors the FPU fpcr rounding modes. + * FINTRZ: + * (int) cast cannot be used, fixed. + * FGETEXP: + * Input argument value 0 returned erroneous value. + * FMOD: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FREM: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FSCALE: + * Input argument value 0 was not handled correctly. + * FMOVEM Control Registers to/from address FPU registers An: + * A bug caused the code never been called. + * FMOVEM Control Registers pre-decrement: + * Moving of control regs from memory to FPP was not handled properly, + * if not all of the three FPU registers were moved. + * Condition code "Not Greater Than or Equal": + * Returned erroneous value. + * FSINCOS: + * Cosine must be loaded first if same register. + * FMOVECR: + * Status register was not updated (yes, this affects it). + * FMOVE -> reg: + * Status register was not updated (yes, this affects it). + * FMOVE reg -> reg: + * Status register was not updated. + * FDBcc: + * The loop termination condition was wrong. + * Possible leak from int16 to int32 fixed. + * get_fp_value: + * Immediate addressing mode && Operation Length == Byte -> + * Use the low-order byte of the extension word. + * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was + * written to them. + * + * Other: + * - Optimized single/double/extended to/from conversion functions. + * Huge speed boost, but not (necessarily) portable to other systems. + * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 + * - Optimized versions of FSCALE, FGETEXP, FGETMAN + * - Conversion routines now handle NaN and infinity better. + * - Some constants precalculated. Not all compilers can optimize the + * expressions previously used. + * + * TODO: + * - Floating point exceptions. + * - More Infinity/NaN/overflow/underflow checking. + * - FPU instruction_address (only needed when exceptions are implemented) + * - Should be written in assembly to support long doubles. + * - Precision rounding single/double + */ + + +#include "sysdeps.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_uae.h" + +#ifdef HAVE_NEW_HEADERS +#define _GLIBCPP_USE_C99 1 +# include +# include +using namespace __gnu_cxx; +#undef _GLIBCPP_USE_C99 +#else +# include +# include +#endif + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Debugging --- */ +/* -------------------------------------------------------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +/* single : S 8*E 23*F */ +/* double : S 11*E 52*F */ +/* extended : S 15*E 64*F */ +/* E = 0 & F = 0 -> 0 */ +/* E = MAX & F = 0 -> Infin */ +/* E = MAX & F # 0 -> NotANumber */ +/* E = biased by 127 (single) ,1023 (double) ,16383 (extended) */ + +#if FPU_DEBUG + +PUBLIC void FFPU dump_registers(const char * str) +{ + char temp_str[512]; + + sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", + str, + fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), fpu_get_register(3), + fpu_get_register(4), fpu_get_register(5), fpu_get_register(6), fpu_get_register(7) ); + + fpu_debug((temp_str)); +} + +PUBLIC void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) +{ + char temp_buf1[256], temp_buf2[10]; + int bytes = sizeof(temp_buf1)/3-1-3; + if (actual < bytes) + bytes = actual; + + temp_buf1[0] = 0; + for (int i = 0; i < bytes; i++) { + sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); + strcat(temp_buf1, temp_buf2); + } + + strcat(temp_buf1, "\n"); + fpu_debug((temp_buf1)); +} + +#else + +PUBLIC void FFPU dump_registers(const char *) +{ +} + +#define dump_first_bytes(a,b) + +#endif + +PRIVATE inline fpu_register FFPU round_to_zero(fpu_register const & x) +{ + return (x < 0.0 ? ceil(x) : floor(x)); +} + +PRIVATE inline fpu_register FFPU round_to_nearest(fpu_register const & x) +{ + return floor(x + 0.5); +} + +#if FPU_HAVE_IEEE_DOUBLE + +#ifndef HAVE_ISNAN +#define isnan(x) do_isnan((x)) +#endif + +PRIVATE inline bool FFPU do_isnan(fpu_register const & r) +{ + fpu_register_parts const p = { r }; + if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000) { + // logical or is faster here. + if ((p.parts[FHI] & 0x000FFFFF) || p.parts[FLO]) { + return true; + } + } + return false; +} + +#ifndef HAVE_ISINF +#define isinf(x) do_isinf((x)) +#endif + +PRIVATE inline bool FFPU do_isinf(fpu_register const & r) +{ + fpu_register_parts const p = { r }; + if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000 && p.parts[FLO] == 0) { + return true; + } + return false; +} + +#ifndef HAVE_ISNEG +#define isneg(x) do_isneg((x)) +#endif + +PRIVATE inline bool FFPU do_isneg(fpu_register const & r) +{ + fpu_register_parts const p = { r }; + return ((p.parts[FHI] & 0x80000000) != 0); +} + +#ifndef HAVE_ISZERO +#define iszero(x) do_iszero((x)) +#endif + +PRIVATE inline bool FFPU do_iszero(fpu_register const & r) +{ + fpu_register_parts const p = { r }; + return (((p.parts[FHI] & 0x7FF00000) == 0) && p.parts[FLO] == 0); +} + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) +{ + FPU fpsr.condition_codes + = (iszero(r) ? NATIVE_FFLAG_ZERO : 0) + | (isneg(r) ? NATIVE_FFLAG_NEGATIVE : 0) + | (isnan(r) ? NATIVE_FFLAG_NAN : 0) + | (isinf(r) ? NATIVE_FFLAG_INFINITY : 0) + ; +} +#endif + +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) +{ + fl_dest.negative = isneg(r); + fl_dest.zero = iszero(r); + fl_dest.infinity = isinf(r); + fl_dest.nan = isnan(r); + fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; +} + +PRIVATE inline void FFPU get_source_flags(fpu_register const & r) +{ + fl_source.negative = isneg(r); + fl_source.zero = iszero(r); + fl_source.infinity = isinf(r); + fl_source.nan = isnan(r); + fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; +} + +PRIVATE inline void FFPU make_nan(fpu_register & r) +{ + fpu_register_parts p; + p.parts[FLO] = 0xffffffff; + p.parts[FHI] = 0x7fffffff; + r = p.val; +} + +PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +{ + fpu_register_parts p; + p.parts[FLO] = p.parts[FHI] = 0; + r = p.val; +} + +PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +{ + fpu_register_parts p; + p.parts[FLO] = 0; + p.parts[FHI] = 0x80000000; + r = p.val; +} + +PRIVATE inline void FFPU make_inf_positive(fpu_register & r) +{ + fpu_register_parts p; + p.parts[FLO] = 0; + p.parts[FHI] = 0x7FF00000; + r = p.val; +} + +PRIVATE inline void FFPU make_inf_negative(fpu_register & r) +{ + fpu_register_parts p; + p.parts[FLO] = 0; + p.parts[FHI] = 0xFFF00000; + r = p.val; +} + +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add) +{ + fpu_register_parts p = { r }; + int exp = (p.parts[FHI] & 0x7FF00000) >> 20; + // TODO: overflow flags + exp += add; + if(exp >= 2047) { + make_inf_positive(r); + return; + } else if(exp < 0) { + // keep sign (+/- 0) + p.parts[FHI] &= 0x80000000; + } else { + p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); + } + r = p.val; +} + +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) +{ + fpu_register_parts const p = { r }; + int exp = (p.parts[FHI] & 0x7FF00000) >> 20; + return( exp - 1023 ); +} + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) +{ + fpu_register_parts p = { r }; + p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | 0x3FF00000; + r = p.val; +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) +{ + fpu_register_parts const a = { ra }; + fpu_register_parts const b = { rb }; + return (((a.parts[FHI] ^ b.parts[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); +} + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) +{ + uae_u32 lsb = (uae_u32)fabs(quotient) & 0x7f; + FPU fpsr.quotient = sign | (lsb << 16); +} + +// to_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register result; + fpu_register_parts p; + + uae_u32 sign = (value & 0x80000000); + uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; + + p.parts[FLO] = value << 29; + p.parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + + result = p.val; + + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return(result); +} + +// from_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ + if (src == 0.0) + return 0; + + uae_u32 result; + fpu_register_parts const p = { src }; + + uae_u32 sign = (p.parts[FHI] & 0x80000000); + uae_u32 exp = (p.parts[FHI] & 0x7FF00000) >> 20; + + if(exp + 127 < 1023) { + exp = 0; + } else if(exp > 1023 + 127) { + exp = 255; + } else { + exp = exp + 127 - 1023; + } + + result = sign | (exp << 23) | ((p.parts[FHI] & 0x000FFFFF) << 3) | (p.parts[FLO] >> 29); + + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + + return (result); +} + +// to_exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return 0.0; + + fpu_register result; + fpu_register_parts p; + + uae_u32 sign = wrd1 & 0x80000000; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // The explicit integer bit is not set, must normalize. + if((wrd2 & 0x80000000) == 0) { + fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); + if( wrd2 | wrd3 ) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)( man >> 32 ); + wrd3 = (uae_u32)( man & 0xFFFFFFFF ); + } else { + if(exp == 0x7FFF) { + // Infinity. + } else { + // Zero + exp = 16383 - 1023; + } + } + } + + if(exp < 16383 - 1023) { + // should set underflow. + exp = 0; + } else if(exp > 16383 + 1023) { + // should set overflow. + exp = 2047; + } else { + exp = exp + 1023 - 16383; + } + + // drop the explicit integer bit. + p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + result = p.val; + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + + return(result); +} + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// make_extended_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +) +{ + // Is it zero? + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + make_zero_positive(result); + return; + } + + // Is it NaN? + if( (wrd1 & 0x7FFF0000) == 0x7FFF0000 ) { + if( (wrd1 & 0x0000FFFF) || wrd2 || wrd3 ) { + make_nan(result); + return; + } + } + + uae_u32 sign = wrd1 & 0x80000000; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + if(exp < 16383 - 1023) { + // should set underflow. + exp = 0; + } else if(exp > 16383 + 1023) { + // should set overflow. + exp = 2047; + } else { + exp = exp + 1023 - 16383; + } + + // drop the explicit integer bit. + fpu_register_parts p; + p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + result = p.val; + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); +} + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +) +{ + if (src == 0.0) { + *wrd1 = *wrd2 = *wrd3 = 0; + return; + } + + fpu_register_parts const p = { src }; + + fpu_debug(("extract_extended (%X,%X)\n",p.parts[FLO],p.parts[FHI])); + + uae_u32 sign = p.parts[FHI] & 0x80000000; + + uae_u32 exp = ((p.parts[FHI] >> 20) & 0x7ff); + // Check for maximum + if(exp == 0x7FF) { + exp = 0x7FFF; + } else { + exp += 16383 - 1023; + } + + *wrd1 = sign | (exp << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | ((p.parts[FHI] & 0x000FFFFF) << 11) | ((p.parts[FLO] & 0xFFE00000) >> 21); + *wrd3 = p.parts[FLO] << 11; + + fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +// to_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) + return 0.0; + + fpu_register result; + fpu_register_parts p; + p.parts[FLO] = wrd2; + p.parts[FHI] = wrd1; + + result = p.val; + + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); + + return(result); +} + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +) +{ +/* + if (src == 0.0) { + *wrd1 = *wrd2 = 0; + return; + } +*/ + fpu_register_parts const p = { src }; + *wrd2 = p.parts[FLO]; + *wrd1 = p.parts[FHI]; + + fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); +} + +#else // !FPU_HAVE_IEEE_DOUBLE + +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) +{ + FPU fpsr.condition_codes + = ((r == 0.0) ? NATIVE_FFLAG_ZERO : 0) + | ((r < 0.0) ? NATIVE_FFLAG_NEGATIVE : 0) + ; +} +#endif + +// make_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register frac = (fpu_register) ((value & 0x7fffff) | 0x800000) / 8388608.0; + if (value & 0x80000000) + frac = -frac; + + fpu_register result = ldexp (frac, (int)((value >> 23) & 0xff) - 127); + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return (result); +} + +// extract_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ + int expon; + uae_u32 tmp, result; + fpu_register frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) + return 0; + if (src < 0) { + tmp = 0x80000000; + src = -src; + } else { + tmp = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 16777216.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + result = tmp | (((expon + 127 - 1) & 0xff) << 23) | (((int) (frac * 16777216.0)) & 0x7fffff); + + // fpu_debug(("extract_single (%.04f) = %X\n",(float)src0,result)); + + return (result); +} + +// to exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_register frac, result; + + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return 0.0; + frac = (fpu_register) wrd2 / 2147483648.0 + + (fpu_register) wrd3 / 9223372036854775808.0; + if (wrd1 & 0x80000000) + frac = -frac; + result = ldexp (frac, (int)((wrd1 >> 16) & 0x7fff) - 16383); + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + + return result; +} + +// extract_extended +PRIVATE inline void FFPU extract_extended(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + int expon; + fpu_register frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) { + *wrd1 = 0; + *wrd2 = 0; + *wrd3 = 0; + return; + } + if (src < 0) { + *wrd1 = 0x80000000; + src = -src; + } else { + *wrd1 = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 18446744073709551616.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + *wrd1 |= (((expon + 16383 - 1) & 0x7fff) << 16); + *wrd2 = (uae_u32) (frac * 4294967296.0); + *wrd3 = (uae_u32) (frac * 18446744073709551616.0 - *wrd2 * 4294967296.0); + + // fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(float)src0,*wrd1,*wrd2,*wrd3)); +} + +// make_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) + return 0.0; + + fpu_register frac = + (fpu_register) ((wrd1 & 0xfffff) | 0x100000) / 1048576.0 + + (fpu_register) wrd2 / 4503599627370496.0; + + if (wrd1 & 0x80000000) + frac = -frac; + + fpu_register result = ldexp (frac, (int)((wrd1 >> 20) & 0x7ff) - 1023); + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); + + return result; +} + +// extract_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2) +{ + int expon; + int tmp; + fpu_register frac frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) { + *wrd1 = 0; + *wrd2 = 0; + return; + } + if (src < 0) { + *wrd1 = 0x80000000; + src = -src; + } else { + *wrd1 = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 9007199254740992.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + tmp = (uae_u32) (frac * 2097152.0); + *wrd1 |= (((expon + 1023 - 1) & 0x7ff) << 20) | (tmp & 0xfffff); + *wrd2 = (uae_u32) (frac * 9007199254740992.0 - tmp * 4294967296.0); + + // fpu_debug(("extract_double (%.04f) = %X,%X\n",(float)src0,*wrd1,*wrd2)); +} + +#endif + +// to_pack +PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + fpu_debug(("make_packed str = %s\n",str)); + + fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); + return d; +} + +// from_pack +PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + int i; + int t; + char *cp; + char str[100]; + + sprintf(str, "%.16e", src); + + fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; + } + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; + } + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; + } + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') + t = (t << 4) | (*cp++ - '0'); + } + *wrd1 |= t << 16; + } + + fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + src = FPU registers[(extra >> 10) & 7]; + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + + fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); + + switch (mode) { + case 0: + switch (size) { + case 6: + src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); + break; + case 4: + src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); + break; + case 0: + src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); + break; + case 1: + src = make_single(m68k_dreg (regs, reg)); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + break; + case 4: + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if(size == 6) ad++; + break; + default: + return 0; + } + } + + fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + fpu_debug(("get_fp_value ad=%X\n",ad)); + fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); + dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); + dump_first_bytes( get_real_address(ad, 0, 0), 64 ); + + switch (size) { + case 0: + src = (fpu_register) (uae_s32) get_long (ad); + break; + case 1: + src = make_single(get_long (ad)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_extended(wrd1, wrd2, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_packed(wrd1, wrd2, wrd3); + break; + } + case 4: + src = (fpu_register) (uae_s16) get_word(ad); + break; + case 5: { + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + src = make_double(wrd1, wrd2); + break; + } + case 6: + src = (fpu_register) (uae_s8) get_byte(ad); + break; + default: + return 0; + } + + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); + return 1; +} + +PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + FPU registers[dest_reg] = value; + make_fpsr(FPU registers[dest_reg]); + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = 0xffffffff; + switch (mode) { + case 0: + switch (size) { + case 6: + m68k_dreg (regs, reg) + = (((uae_s32) value & 0xff) + | (m68k_dreg (regs, reg) & ~0xff)); + break; + case 4: + m68k_dreg (regs, reg) + = (((uae_s32) value & 0xffff) + | (m68k_dreg (regs, reg) & ~0xffff)); + break; + case 0: + m68k_dreg (regs, reg) = (uae_s32) value; + break; + case 1: + m68k_dreg (regs, reg) = extract_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch (size) { + case 0: + put_long (ad, (uae_s32) value); + break; + case 1: + put_long (ad, extract_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + extract_extended(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + extract_packed(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 4: + put_word(ad, (uae_s16) value); + break; + case 5: { + uae_u32 wrd1, wrd2; + extract_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + break; + } + case 6: + put_byte(ad, (uae_s8) value); + break; + default: + return 0; + } + return 1; +} + +PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) +#else +# define CONDRET(s,x) return (x) +#endif + +PRIVATE inline int FFPU fpp_cond(int condition) +{ +#if 1 +# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE) +# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO) +# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) == NATIVE_FFLAG_INFINITY) +# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN) +#else +# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) != 0) +# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) != 0) +# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) != 0) +# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) != 0) +#endif + +#if 0 + return fpcctrue(condition); +#else + switch (condition & 0x1f) { + case 0x00: CONDRET("False",0); + case 0x01: CONDRET("Equal",Z); + case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); + case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); + case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); + case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); + case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); + case 0x07: CONDRET("Ordered",!NaN); + case 0x08: CONDRET("Unordered",NaN); + case 0x09: CONDRET("Unordered or Equal",NaN || Z); + case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); + case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); + case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); + case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); + case 0x0e: CONDRET("Not Equal",!Z); + case 0x0f: CONDRET("True",1); + case 0x10: CONDRET("Signaling False",0); + case 0x11: CONDRET("Signaling Equal",Z); + case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); + case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); + case 0x14: CONDRET("Less Than",N && !(NaN || Z)); + case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); + case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); + case 0x17: CONDRET("Greater, Less or Equal",!NaN); + case 0x18: CONDRET("Not Greater, Less or Equal",NaN); + case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); + case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); + case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); + case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); +// case 0x1c: CONDRET("Not Greater Than or Equal",!Z && (NaN || N)); + case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); + case 0x1e: CONDRET("Signaling Not Equal",!Z); + case 0x1f: CONDRET("Signaling True",1); + default: CONDRET("",-1); + } +#endif + +# undef N +# undef Z +# undef I +# undef NaN +} + +void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // this may have leaked. + /* + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) + | ((m68k_dreg (regs, reg) - 1) & 0xffff)); + */ + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) + | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); + + + // condition reversed. + // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) + if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) + m68k_setpc (pc + disp); + } +} + +void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uae_u32 ad; + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else if ((opcode & 0x38) == 0) { + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } + else if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + put_byte(ad, cc ? 0xff : 0x00); +} + +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +{ + fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (oldpc); + op_illg (opcode); + } + if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (pc); + op_illg (opcode); + } + else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +void FFPU fpuop_save(uae_u32 opcode) +{ + fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } + else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + fpu_debug(("fsave_opp pre-decrement\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } + else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: fsave_opp post-increment\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); + } +} + +// FRESTORE has no pre-decrement +void FFPU fpuop_restore(uae_u32 opcode) +{ + fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // 68040 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad -= 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad -= 92; + } + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad += 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 92; + } + } + } + } + else { + // 68881 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { + if ((d & 0x00ff0000) == 0x00180000) + ad -= 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad -= 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad -= 45 * 4; + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0x00180000) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + ad += 6 * 4; + } + else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 45 * 4; + } + } + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); + } +} + +void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + int reg; + fpu_register src; + + fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, + m68k_getpc () - 4)); + + dump_registers( "START"); + + switch ((extra >> 13) & 0x7) { + case 3: + fpu_debug(("FMOVE -> \n")); + if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + dump_registers( "END "); + return; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_dreg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); + } + } + else { + if (extra & 0x1000) { + set_fpcr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_dreg (regs, opcode & 7); + fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } +// } else if ((opcode & 0x38) == 1) { + } + else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_areg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_areg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); + } + } else { + if (extra & 0x1000) { + set_fpcr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_areg (regs, opcode & 7); + fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } + } + else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + if (extra & 0x1000) { + set_fpcr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = next_ilong(); + fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); + } + } + } + else if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + uae_u32 ad; + int incr = 0; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + if ((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + } + ad -= incr; + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + put_long (ad, get_fpcr() & 0xFFFF); + fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); + ad += 4; + } + if (extra & 0x0800) { + put_long (ad, get_fpsr()); + fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); + ad += 4; + } + if (extra & 0x0400) { + put_long (ad, FPU instruction_address); + fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); + ad += 4; + } + ad -= incr; + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + uae_u32 ad; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + + // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; + int incr = 0; + if((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + ad = ad - incr; + } + + if (extra & 0x1000) { + set_fpcr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); + ad += 4; + } + if (extra & 0x0800) { + set_fpsr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); + ad += 4; + } + if (extra & 0x0400) { + FPU instruction_address = get_long (ad); + fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); + ad += 4; + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? +// m68k_areg (regs, opcode & 7) = ad - 12; + m68k_areg (regs, opcode & 7) = ad - incr; + } + dump_registers( "END "); + return; + case 6: + case 7: { + uae_u32 ad, list = 0; + int incr = 0; + if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + fpu_debug(("FMOVEM FPP->memory\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + if (incr < 0) { + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + fpu_debug(("FMOVEM memory->FPP\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + /**/ + if (incr < 0) { + // not reached + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + dump_registers( "END "); + return; + } + case 0: + case 2: + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + fpu_debug(("FMOVECR memory->FPP\n")); + switch (extra & 0x7f) { + case 0x00: + // FPU registers[reg] = 4.0 * atan(1.0); + FPU registers[reg] = 3.1415926535897932384626433832795; + fpu_debug(("FP const: Pi\n")); + break; + case 0x0b: + // FPU registers[reg] = log10 (2.0); + FPU registers[reg] = 0.30102999566398119521373889472449; + fpu_debug(("FP const: Log 10 (2)\n")); + break; + case 0x0c: + // FPU registers[reg] = exp (1.0); + FPU registers[reg] = 2.7182818284590452353602874713527; + fpu_debug(("FP const: e\n")); + break; + case 0x0d: + // FPU registers[reg] = log (exp (1.0)) / log (2.0); + FPU registers[reg] = 1.4426950408889634073599246810019; + fpu_debug(("FP const: Log 2 (e)\n")); + break; + case 0x0e: + // FPU registers[reg] = log (exp (1.0)) / log (10.0); + FPU registers[reg] = 0.43429448190325182765112891891661; + fpu_debug(("FP const: Log 10 (e)\n")); + break; + case 0x0f: + FPU registers[reg] = 0.0; + fpu_debug(("FP const: zero\n")); + break; + case 0x30: + // FPU registers[reg] = log (2.0); + FPU registers[reg] = 0.69314718055994530941723212145818; + fpu_debug(("FP const: ln(2)\n")); + break; + case 0x31: + // FPU registers[reg] = log (10.0); + FPU registers[reg] = 2.3025850929940456840179914546844; + fpu_debug(("FP const: ln(10)\n")); + break; + case 0x32: + // ?? + FPU registers[reg] = 1.0e0; + fpu_debug(("FP const: 1.0e0\n")); + break; + case 0x33: + FPU registers[reg] = 1.0e1; + fpu_debug(("FP const: 1.0e1\n")); + break; + case 0x34: + FPU registers[reg] = 1.0e2; + fpu_debug(("FP const: 1.0e2\n")); + break; + case 0x35: + FPU registers[reg] = 1.0e4; + fpu_debug(("FP const: 1.0e4\n")); + break; + case 0x36: + FPU registers[reg] = 1.0e8; + fpu_debug(("FP const: 1.0e8\n")); + break; + case 0x37: + FPU registers[reg] = 1.0e16; + fpu_debug(("FP const: 1.0e16\n")); + break; + case 0x38: + FPU registers[reg] = 1.0e32; + fpu_debug(("FP const: 1.0e32\n")); + break; + case 0x39: + FPU registers[reg] = 1.0e64; + fpu_debug(("FP const: 1.0e64\n")); + break; + case 0x3a: + FPU registers[reg] = 1.0e128; + fpu_debug(("FP const: 1.0e128\n")); + break; + case 0x3b: + FPU registers[reg] = 1.0e256; + fpu_debug(("FP const: 1.0e256\n")); + break; + + // Valid for 64 bits only (see fpu.cpp) +#if 0 + case 0x3c: + FPU registers[reg] = 1.0e512; + fpu_debug(("FP const: 1.0e512\n")); + break; + case 0x3d: + FPU registers[reg] = 1.0e1024; + fpu_debug(("FP const: 1.0e1024\n")); + break; + case 0x3e: + FPU registers[reg] = 1.0e2048; + fpu_debug(("FP const: 1.0e2048\n")); + break; + case 0x3f: + FPU registers[reg] = 1.0e4096; + fpu_debug(("FP const: 1.0e4096\n")); + break; +#endif + default: + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + // these *do* affect the status reg + make_fpsr(FPU registers[reg]); + dump_registers( "END "); + return; + } + + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); +#if 0 // MJ added, not tested now + if (FPU is_integral) { + // 68040-specific operations + switch (extra & 0x7f) { + case 0x40: /* FSMOVE */ + fpu_debug(("FSMOVE %.04f\n",(double)src)); + FPU registers[reg] = (float)src; + make_fpsr(FPU registers[reg]); + break; + case 0x44: /* FDMOVE */ + fpu_debug(("FDMOVE %.04f\n",(double)src)); + FPU registers[reg] = (double)src; + make_fpsr(FPU registers[reg]); + break; + case 0x41: /* FSSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (float)sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x45: /* FDSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (double)sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x58: /* FSABS */ + fpu_debug(("FSABS %.04f\n",(double)src)); + FPU registers[reg] = (float)fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5c: /* FDABS */ + fpu_debug(("FDABS %.04f\n",(double)src)); + FPU registers[reg] = (double)fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5a: /* FSNEG */ + fpu_debug(("FSNEG %.04f\n",(double)src)); + FPU registers[reg] = (float)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x5e: /* FDNEG */ + fpu_debug(("FDNEG %.04f\n",(double)src)); + FPU registers[reg] = (double)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x60: /* FSDIV */ + fpu_debug(("FSDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x64: /* FDDIV */ + fpu_debug(("FDDIV %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x62: /* FSADD */ + fpu_debug(("FSADD %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x66: /* FDADD */ + fpu_debug(("FDADD %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x68: /* FSSUB */ + fpu_debug(("FSSUB %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x6c: /* FDSUB */ + fpu_debug(("FDSUB %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x63: /* FSMUL */ + case 0x67: /* FDMUL */ + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + if ((extra & 0x7f) == 0x63) + FPU registers[reg] = (float)(FPU registers[reg] * src); + else + FPU registers[reg] = (double)(FPU registers[reg] * src); + } + else if (fl_dest.nan || fl_source.nan || + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } + make_fpsr(FPU registers[reg]); + break; + default: + // Continue decode-execute 6888x instructions below + goto process_6888x_instructions; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + process_6888x_instructions: +#endif + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + fpu_debug(("FMOVE %.04f\n",(double)src)); + FPU registers[reg] = src; + // -> reg DOES affect the status reg + make_fpsr(FPU registers[reg]); + break; + case 0x01: /* FINT */ + fpu_debug(("FINT %.04f\n",(double)src)); + // FPU registers[reg] = (int) (src + 0.5); + // FIXME: use native rounding mode flags + switch (get_fpcr() & 0x30) { + case FPCR_ROUND_ZERO: + FPU registers[reg] = round_to_zero(src); + break; + case FPCR_ROUND_MINF: + FPU registers[reg] = floor(src); + break; + case FPCR_ROUND_NEAR: + FPU registers[reg] = round_to_nearest(src); + break; + case FPCR_ROUND_PINF: + FPU registers[reg] = ceil(src); + break; + } + make_fpsr(FPU registers[reg]); + break; + case 0x02: /* FSINH */ + fpu_debug(("FSINH %.04f\n",(double)src)); + FPU registers[reg] = sinh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x03: /* FINTRZ */ + fpu_debug(("FINTRZ %.04f\n",(double)src)); + // FPU registers[reg] = (int) src; + FPU registers[reg] = round_to_zero(src); + make_fpsr(FPU registers[reg]); + break; + case 0x04: /* FSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x06: /* FLOGNP1 */ + fpu_debug(("FLOGNP1 %.04f\n",(double)src)); + FPU registers[reg] = log (src + 1.0); + make_fpsr(FPU registers[reg]); + break; + case 0x08: /* FETOXM1 */ + fpu_debug(("FETOXM1 %.04f\n",(double)src)); + FPU registers[reg] = exp (src) - 1.0; + make_fpsr(FPU registers[reg]); + break; + case 0x09: /* FTANH */ + fpu_debug(("FTANH %.04f\n",(double)src)); + FPU registers[reg] = tanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0a: /* FATAN */ + fpu_debug(("FATAN %.04f\n",(double)src)); + FPU registers[reg] = atan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0c: /* FASIN */ + fpu_debug(("FASIN %.04f\n",(double)src)); + FPU registers[reg] = asin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0d: /* FATANH */ + fpu_debug(("FATANH %.04f\n",(double)src)); +#if HAVE_ATANH + FPU registers[reg] = atanh (src); +#else + /* The BeBox doesn't have atanh, and it isn't in the HPUX libm either */ + FPU registers[reg] = log ((1 + src) / (1 - src)) / 2; +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x0e: /* FSIN */ + fpu_debug(("FSIN %.04f\n",(double)src)); + FPU registers[reg] = sin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0f: /* FTAN */ + fpu_debug(("FTAN %.04f\n",(double)src)); + FPU registers[reg] = tan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x10: /* FETOX */ + fpu_debug(("FETOX %.04f\n",(double)src)); + FPU registers[reg] = exp (src); + make_fpsr(FPU registers[reg]); + break; + case 0x11: /* FTWOTOX */ + fpu_debug(("FTWOTOX %.04f\n",(double)src)); + FPU registers[reg] = pow(2.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x12: /* FTENTOX */ + fpu_debug(("FTENTOX %.04f\n",(double)src)); + FPU registers[reg] = pow(10.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x14: /* FLOGN */ + fpu_debug(("FLOGN %.04f\n",(double)src)); + FPU registers[reg] = log (src); + make_fpsr(FPU registers[reg]); + break; + case 0x15: /* FLOG10 */ + fpu_debug(("FLOG10 %.04f\n",(double)src)); + FPU registers[reg] = log10 (src); + make_fpsr(FPU registers[reg]); + break; + case 0x16: /* FLOG2 */ + fpu_debug(("FLOG2 %.04f\n",(double)src)); + FPU registers[reg] = log (src) / log (2.0); + make_fpsr(FPU registers[reg]); + break; + case 0x18: /* FABS */ + case 0x58: /* single precision rounding */ + case 0x5C: /* double precision rounding */ + fpu_debug(("FABS %.04f\n",(double)src)); + FPU registers[reg] = src < 0 ? -src : src; + make_fpsr(FPU registers[reg]); + break; + case 0x19: /* FCOSH */ + fpu_debug(("FCOSH %.04f\n",(double)src)); + FPU registers[reg] = cosh(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1a: /* FNEG */ + fpu_debug(("FNEG %.04f\n",(double)src)); + FPU registers[reg] = -src; + make_fpsr(FPU registers[reg]); + break; + case 0x1c: /* FACOS */ + fpu_debug(("FACOS %.04f\n",(double)src)); + FPU registers[reg] = acos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1d: /* FCOS */ + fpu_debug(("FCOS %.04f\n",(double)src)); + FPU registers[reg] = cos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1e: /* FGETEXP */ + fpu_debug(("FGETEXP %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = fast_fgetexp( src ); + } +#else + if(src == 0) { + FPU registers[reg] = (fpu_register)0; + } + else { + int expon; + frexp (src, &expon); + FPU registers[reg] = (fpu_register) (expon - 1); + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x1f: /* FGETMAN */ + fpu_debug(("FGETMAN %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + if( src == 0 ) { + FPU registers[reg] = 0; + } + else if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = src; + fast_remove_exponent( FPU registers[reg] ); + } +#else + { + int expon; + FPU registers[reg] = frexp (src, &expon) * 2.0; + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x20: /* FDIV */ + fpu_debug(("FDIV %.04f\n",(double)src)); + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x21: /* FMOD */ + fpu_debug(("FMOD %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; + { + fpu_register quot = round_to_zero(FPU registers[reg] / src); +#if FPU_HAVE_IEEE_DOUBLE + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); +#endif + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); +#if FPU_HAVE_IEEE_DOUBLE + make_quotient(quot, sign); +#endif + } + break; + case 0x22: /* FADD */ + case 0x62: /* single */ + case 0x66: /* double */ + fpu_debug(("FADD %.04f\n",(double)src)); + FPU registers[reg] += src; + make_fpsr(FPU registers[reg]); + break; + case 0x23: /* FMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + FPU registers[reg] *= src; + } + else if (fl_dest.nan || fl_source.nan || + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if (( fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative)) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if(( fl_dest.negative && !fl_source.negative) || + (!fl_dest.negative && fl_source.negative)) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } +#else + fpu_debug(("FMUL %.04f\n",(double)src)); + FPU registers[reg] *= src; +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x24: /* FSGLDIV */ + fpu_debug(("FSGLDIV %.04f\n",(double)src)); + // TODO: round to float. + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x25: /* FREM */ + fpu_debug(("FREM %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; + { + fpu_register quot = round_to_nearest(FPU registers[reg] / src); +#if FPU_HAVE_IEEE_DOUBLE + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); +#endif + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); +#if FPU_HAVE_IEEE_DOUBLE + make_quotient(quot,sign); +#endif + } + break; + + case 0x26: /* FSCALE */ + fpu_debug(("FSCALE %.04f\n",(double)src)); + + // TODO: + // Overflow, underflow + +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(FPU registers[reg]) ) { + make_nan( FPU registers[reg] ); + } + else { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + // Here (int) cast is okay. + fast_scale( FPU registers[reg], (int)round_to_zero(src) ); + } +#else + if (src != 0) { // Manual says: src==0 -> FPn + FPU registers[reg] *= exp (log (2.0) * src); + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x27: /* FSGLMUL */ + fpu_debug(("FSGLMUL %.04f\n",(double)src)); + FPU registers[reg] *= src; + make_fpsr(FPU registers[reg]); + break; + case 0x28: /* FSUB */ + fpu_debug(("FSUB %.04f\n",(double)src)); + FPU registers[reg] -= src; + make_fpsr(FPU registers[reg]); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpu_debug(("FSINCOS %.04f\n",(double)src)); + // Cosine must be calculated first if same register + FPU registers[extra & 7] = cos(src); + FPU registers[reg] = sin (src); + // Set FPU fpsr according to the sine result + make_fpsr(FPU registers[reg]); + break; + case 0x38: /* FCMP */ + fpu_debug(("FCMP %.04f\n",(double)src)); + + // The infinity bit is always cleared by the FCMP + // instruction since it is not used by any of the + // conditional predicate equations. + +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(src) ) { + if( isneg(src) ) { + // negative infinity + if( isinf(FPU registers[reg]) && isneg(FPU registers[reg]) ) { + // Zero, Negative + FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO | NATIVE_FFLAG_NEGATIVE; + fpu_debug(("-INF cmp -INF -> NZ\n")); + } + else { + // None + FPU fpsr.condition_codes = 0; + fpu_debug(("x cmp -INF -> None\n")); + } + } + else { + // positive infinity + if( isinf(FPU registers[reg]) && !isneg(FPU registers[reg]) ) { + // Zero + FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO; + fpu_debug(("+INF cmp +INF -> Z\n")); + } + else { + // Negative + FPU fpsr.condition_codes = NATIVE_FFLAG_NEGATIVE; + fpu_debug(("X cmp +INF -> N\n")); + } + } + } + else { + fpu_register tmp = FPU registers[reg] - src; + FPU fpsr.condition_codes + = (iszero(tmp) ? NATIVE_FFLAG_ZERO : 0) + | (isneg(tmp) ? NATIVE_FFLAG_NEGATIVE : 0) + ; + } +#else + { + fpu_register tmp = FPU registers[reg] - src; + make_fpsr(tmp); + } +#endif + break; + case 0x3a: /* FTST */ + fpu_debug(("FTST %.04f\n",(double)src)); + // make_fpsr(FPU registers[reg]); + make_fpsr(src); + break; + default: + fpu_debug(("ILLEGAL F OP %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + +/* -------------------------- Initialization -------------------------- */ + +void FFPU fpu_init (bool integral_68040) +{ + fpu_debug(("fpu_init\n")); + + static bool initialized_lookup_tables = false; + if (!initialized_lookup_tables) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); + initialized_lookup_tables = true; + } + + FPU is_integral = integral_68040; + set_fpcr(0); + set_fpsr(0); + FPU instruction_address = 0; +} + +void FFPU fpu_exit (void) +{ + fpu_debug(("fpu_exit\n")); +} + +void FFPU fpu_reset (void) +{ + fpu_debug(("fpu_reset\n")); + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h new file mode 100644 index 000000000..d8930e32e --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h @@ -0,0 +1,217 @@ +/* + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_UAE_H +#define FPU_UAE_H + +// Only define if you have IEEE 64 bit doubles. +#define FPU_HAVE_IEEE_DOUBLE 1 + +/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +enum { +#ifdef WORDS_BIGENDIAN + FHI = 0, + FLO = 1 +#else + FHI = 1, + FLO = 0 +#endif +}; + +// Floating-point rounding support +PRIVATE inline fpu_register round_to_zero(fpu_register const & x); +PRIVATE inline fpu_register round_to_nearest(fpu_register const & x); + +#if FPU_HAVE_IEEE_DOUBLE + +// Lauri-- full words to avoid partial register stalls. +struct double_flags { + uae_u32 in_range; + uae_u32 zero; + uae_u32 infinity; + uae_u32 nan; + uae_u32 negative; +}; +PRIVATE double_flags fl_source; +PRIVATE double_flags fl_dest; +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); +PRIVATE inline void FFPU get_source_flags(fpu_register const & r); + +PRIVATE inline bool FFPU do_isnan(fpu_register const & r); +PRIVATE inline bool FFPU do_isinf(fpu_register const & r); +PRIVATE inline bool FFPU do_isneg(fpu_register const & r); +PRIVATE inline bool FFPU do_iszero(fpu_register const & r); + +PRIVATE inline void FFPU make_nan(fpu_register & r); +PRIVATE inline void FFPU make_zero_positive(fpu_register & r); +PRIVATE inline void FFPU make_zero_negative(fpu_register & r); +PRIVATE inline void FFPU make_inf_positive(fpu_register & r); +PRIVATE inline void FFPU make_inf_negative(fpu_register & r); + +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign( + fpu_register const & ra, fpu_register const & rb +); + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient( + fpu_register const & quotient, uae_u32 sign +); + +// to_single +PRIVATE inline fpu_register FFPU make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to_exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// to_exten_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +); + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +); + +#else /* !FPU_HAVE_IEEE_DOUBLE */ + +// FIXME: may be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// to_single +PRIVATE inline fpu_register make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +// from_exten +PRIVATE inline void FFPU extract_extended( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2 +); + +#endif /* FPU_HAVE_IEEE_DOUBLE */ + +PRIVATE inline fpu_register FFPU make_packed( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +PRIVATE inline void FFPU extract_packed( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +PRIVATE inline int FFPU get_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register & src +); + +PRIVATE inline int FFPU put_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register const & value +); + +PRIVATE inline int FFPU get_fp_ad( + uae_u32 opcode, uae_u32 * ad +); + +PRIVATE inline int FFPU fpp_cond( + int condition +); + +#endif /* FPU_UAE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp new file mode 100644 index 000000000..a4c6af2d9 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp @@ -0,0 +1,6791 @@ +/* + * fpu/fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * + * + * Interface + * Almost the same as original. Please see the comments in "fpu.h". + * + * + * Why assembly? + * The reason is not really speed, but to get infinities, + * NANs and flags finally working. + * + * + * How to maintain Mac and x86 FPU flags -- plan B + * + * regs.piar is not updated. + * + * regs.FPU fpcr always contains the real 68881/68040 control word. + * + * regs.FPU fpsr is not kept up-to-date, for efficiency reasons. + * Most of the FPU commands update this in a way or another, but it is not + * read nearly that often. Therefore, three host-specific words hold the + * status byte and exception byte ("x86_status_word"), accrued exception + * byte ("x86_status_word_accrued") and the quotient byte ("FPU fpsr.quotient"), + * as explained below. + * + * CONDITION CODE - QUOTIENT - EXCEPTION STATUS - ACCRUED EXCEPTION + * CONDITION CODE (N,Z,I,NAN) + * - updated after each opcode, if needed. + * - x86 assembly opcodes call FXAM and store the status word to + * "x86_status_word". + * - When regs.FPU fpsr is actually used, the value of "x86_status_word" + * is translated. + * QUOTIENT BYTE + * - Updated by frem, fmod, frestore(null frame) + * - Stored in "FPU fpsr.quotient" in correct bit position, combined when + * regs.FPU fpsr is actually used. + * EXCEPTION STATUS (BSUN,SNAN,OPERR,OVFL,UNFL,DZ,INEX2,INEX1) + * - updated after each opcode, if needed. + * - Saved in x86 form in "x86_status_word". + * - When regs.FPU fpsr is actually used, the value of "x86_status_word" + * is translated. + * - Only fcc_op can set BSUN + * ACCRUED EXCEPTION (ACCR_IOP,ACCR_OVFL,ACCR_UNFL,ACCR_DZ,ACCR_INEX) + * - updated after each opcode, if needed. + * - Logically OR'ed in x86 form to "x86_status_word_accrued". + * - When regs.FPU fpsr is actually used, the value of + * "x86_status_word_accrued" is translated. + * + * When "x86_status_word" and "x86_status_word_accrued" are stored, + * all pending x86 FPU exceptions are cleared, if there are any. + * + * Writing to "regs.FPU fpsr" reverse-maps to x86 status/exception values and + * stores the values in "x86_status_word", "x86_status_word_accrued" + * and "FPU fpsr.quotient". + * + * So, "x86_status_word" and "x86_status_word_accrued" are not in + * correct bit positions and have x86 values, but "FPU fpsr.quotient" is at + * correct position. + * + * Note that it does not matter that the reverse-mapping is not exact + * (both SW_IE and SW_DE are mapped to ACCR_IOP, but ACCR_IOP maps to + * SW_IE only), the MacOS always sees the correct exception bits. + * + * Also note the usage of the fake BSUN flag SW_FAKE_BSUN. If you change + * the x86 FPU code, you must make sure that you don't generate any FPU + * stack faults. + * + * + * x86 co-processor initialization: + * + * Bit Code Use + * 0 IM Invalid operation exception mask 1 Disabled + * 1 DM Denormalized operand exception mask 1 Disabled + * 2 ZM Zerodivide exception mask 1 Disabled + * 3 OM Overflow exception mask 1 Disabled + * 4 UM Underflow exception mask 1 Disabled + * 5 PM Precision exception mask 1 Disabled + * 6 - - - - + * 7 IEM Interrupt enable mask 0 Enabled + * 8 PC Precision control\ 1 - 64 bits + * 9 PC Precision control/ 1 / + * 10 RC Rounding control\ 0 - Nearest even + * 11 RC Rounding control/ 0 / + * 12 IC Infinity control 1 Affine + * 13 - - - - + * 14 - - - - + * 15 - - - - + * + * + * TODO: + * - Exceptions are not implemented. + * - All tbyte variables should be aligned to 16-byte boundaries. + * (for best efficiency). + * - FTRAPcc code looks like broken. + * - If USE_3_BIT_QUOTIENT is 0, exceptions should be checked after + * float -> int rounding (frem,fmod). + * - The speed can be greatly improved. Do this only after you are sure + * that there are no major bugs. + * - Support for big-endian byte order (but all assembly code needs to + * be rewritten anyway) + * I have some non-portable code like *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; + * Sorry about that, you need to change these. I could do it myself, but better + * not, I would have no way to test them out. + * I tried to mark all spots with a comment TODO_BIGENDIAN. + * - to_double() may need renormalization code. Or then again, maybe not. + * - Signaling NANs should be handled better. The current mapping of + * signaling nan exception to denormalized operand exception is only + * based on the idea that the (possible) handler sees that "something + * seriously wrong" and takes the same action. Should not really get (m)any + * of those since normalization is handled on to_exten() + * + */ + +# include +# include + +#include "sysdeps.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_x86.h" +#include "fpu/fpu_x86_asm.h" + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" +#include "fpu/rounding.cpp" + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* ---------------------------- Compatibility ---------------------------- */ + +#define BYTE uint8 +#define WORD uint16 +#define DWORD uint32 +#define min(a, b) (((a) < (b)) ? (a) : (b)) + +/* ---------------------------- Configuration ---------------------------- */ + +/* +If USE_3_BIT_QUOTIENT is set to 1, FREM and FMOD use a faster version +with only 3 quotient bits (those provided by the x86 FPU). If set to 0, +they calculate the same 7 bits that m68k does. It seems (as for now) that +3 bits suffice for all Mac programs I have tried. + +If you decide that you need all 7 bits (USE_3_BIT_QUOTIENT is 0), +consider checking the host exception flags after FISTP (search for +"TODO:Quotient". The result may be too large to fit into a dword. +*/ +/* +gb-- I only tested the following configurations: + USE_3_BIT_QUOTIENT 1 -- still changes to apply if no 3-bit quotient + FPU_DEBUG 1 or 0 + USE_CONSISTENCY_CHECKING 0 + I3_ON_ILLEGAL_FPU_OP 0 -- and this won't change + I3_ON_FTRAPCC 0 -- and this won't change +*/ +#define USE_3_BIT_QUOTIENT 1 + +//#define FPU_DEBUG 0 -- now defined in "fpu/fpu.h" +#define USE_CONSISTENCY_CHECKING 0 + +#define I3_ON_ILLEGAL_FPU_OP 0 +#define I3_ON_FTRAPCC 0 + +/* ---------------------------- Debugging ---------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +#include "debug.h" + +#if FPU_DEBUG + +PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual) +{ + char bb[10]; + int32 i, bytes = min(actual,100); + + *b = 0; + for (i=0; i= 10) _ix = 0; + + sprintf( _s[_ix], "%.04f", (float)f ); + return( _s[_ix] ); +} + +PUBLIC void FFPU dump_registers(const char *s) +{ + char b[512]; + + sprintf( + b, + "%s: %s, %s, %s, %s, %s, %s, %s, %s\r\n", + s, + etos(FPU registers[0]), + etos(FPU registers[1]), + etos(FPU registers[2]), + etos(FPU registers[3]), + etos(FPU registers[4]), + etos(FPU registers[5]), + etos(FPU registers[6]), + etos(FPU registers[7]) + ); + D(bug((char*)b)); +} + +#else + +PUBLIC void FFPU dump_registers(const char *) +{ +} + +PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ +} + +#endif + + +/* ---------------------------- FPU consistency ---------------------------- */ + +#if USE_CONSISTENCY_CHECKING +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) +{ +/* _asm { + FNSTSW checked_sw_atstart + } */ + __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_atstart)); +} + +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name) +{ + uae_u16 checked_sw_atend; +// _asm FNSTSW checked_sw_atend + __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_attend)); + char msg[256]; + + // Check for FPU stack overflows/underflows. + if( (checked_sw_atend & 0x3800) != (checked_sw_atstart & 0x3800) ) { + wsprintf( + msg, + "FPU stack leak at %s, %X, %X\r\n", + name, + (int)(checked_sw_atstart & 0x3800) >> 11, + (int)(checked_sw_atend & 0x3800) >> 11 + ); + OutputDebugString(msg); + } + + // Observe status mapping. + /* + if(checked_sw_atstart != 0x400 || checked_sw_atend != 0x400) { + wsprintf( + msg, "Op %s, x86_status_word before=%X, x86_status_word after=%X\r\n", + name, (int)checked_sw_atstart, (int)checked_sw_atend + ); + OutputDebugString(msg); + } + */ +} +#else +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) +{ +} + +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *) +{ +} +#endif + + +/* ---------------------------- Status byte ---------------------------- */ + +// Map x86 FXAM codes -> m68k fpu status byte +#define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) +#define SW_Z (SW_C3) +#define SW_I (SW_C0|SW_C2) +#define SW_NAN (SW_C0) +#define SW_FINITE (SW_C2) +#define SW_EMPTY_REGISTER (SW_C0|SW_C3) +#define SW_DENORMAL (SW_C2|SW_C3) +#define SW_UNSUPPORTED (0) +#define SW_N (SW_C1) + +// Initial state after boot, reset and frestore(null frame) +#define SW_INITIAL SW_FINITE + + +/* ---------------------------- Status functions ---------------------------- */ + +PRIVATE void inline FFPU SET_BSUN_ON_NAN () +{ + if( (x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN ) { + x86_status_word |= SW_FAKE_BSUN; + x86_status_word_accrued |= SW_IE; + } +} + +PRIVATE void inline FFPU build_ex_status () +{ + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } +} + +// TODO_BIGENDIAN; all of these. +/* ---------------------------- Type functions ---------------------------- */ + +/* +When the FPU creates a NAN, the NAN always contains the same bit pattern +in the mantissa. All bits of the mantissa are ones for any precision. +When the user creates a NAN, any nonzero bit pattern can be stored in the mantissa. +*/ +PRIVATE inline void FFPU MAKE_NAN (fpu_register & f) +{ + // Make it non-signaling. + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0xFF, sizeof(fpu_register) - 1 ); + p[9] = 0x7F; +} + +/* +For single- and double-precision infinities the fraction is a zero. +For extended-precision infinities, the mantissa�s MSB, the explicit +integer bit, can be either one or zero. +*/ +PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { + if ((*((uae_u32 *)&p[0]) == 0) && + ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) == 0)) + return(1); + } + return(0); +} + +PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { + if ((*((uae_u32 *)&p[0]) == 0) && + ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) != 0)) + return(1); + } + return(0); +} + +PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + return *((uae_u32 *)p) == 0 && + *((uae_u32 *)&p[4]) == 0 && + ( *((uae_u16 *)&p[8]) & 0x7FFF ) == 0; +} + +PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f) +{ + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0, sizeof(fpu_register)-2 ); + *((uae_u16 *)&p[8]) = 0x7FFF; +} + +PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f) +{ + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0, sizeof(fpu_register)-2 ); + *((uae_u16 *)&p[8]) = 0xFFFF; +} + +PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) +{ + uae_u32 * const p = (uae_u32 *) &f; + memset( p, 0, sizeof(fpu_register) ); +} + +PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) +{ + uae_u32 * const p = (uae_u32 *) &f; + memset( p, 0, sizeof(fpu_register) ); + *((uae_u32 *)&p[4]) = 0x80000000; +} + +PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + return( (p[9] & 0x80) != 0 ); +} + + +/* ---------------------------- Conversions ---------------------------- */ + +PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + +/* _asm { + MOV ESI, [f] + FILD DWORD PTR [x] + FSTP TBYTE PTR [ESI] + } */ + + __asm__ __volatile__("fildl %1\n\tfstpt %0" : "=m" (f) : "m" (x)); + D(bug("signed_to_extended (%X) = %s\r\n",(int)x,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("signed_to_extended"); +} + +PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s32 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP DWORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistpl %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + // Setting the value to zero might not be the right way to go, + // but I'll leave it like this for now. + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + D(bug("extended_to_signed_32 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_32"); + return tmp; +} + +PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s16 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP WORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistp %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + D(bug("extended_to_signed_16 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_16"); + return tmp; +} + +PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s16 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP WORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistp %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + if(tmp > 127 || tmp < -128) { // OPERR + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + } + + D(bug("extended_to_signed_8 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_8"); + return (uae_s8)tmp; +} + +PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + +/* _asm { + MOV EDI, [f] + FLD QWORD PTR [x] + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (x) + ); + + FPU_CONSISTENCY_CHECK_STOP("double_to_extended"); +} + +PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + double result; + +/* _asm { + MOV ESI, [f] + FLD TBYTE PTR [ESI] + FSTP QWORD PTR result + } */ + + __asm__ __volatile__( + "fldt %1\n" + "fstpl %0\n" + : "=m" (result) + : "m" (f) + ); + + FPU_CONSISTENCY_CHECK_STOP("extended_to_double"); + return result; +} + +PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [f] + FLD DWORD PTR src + FSTP TBYTE PTR [ESI] + } */ + + __asm__ __volatile__( + "flds %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (src) + ); + + D(bug("to_single (%X) = %s\r\n",src,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_single"); +} + +// TODO_BIGENDIAN +PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + + uae_u32 sign = (wrd1 & 0x80000000) >> 16; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + p[0] = wrd3; + p[1] = wrd2; + *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); + + D(bug("to_exten_no_normalize (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_exten_no_normalize"); +} + +PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + + uae_u32 sign = (wrd1 & 0x80000000) >> 16; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // The explicit integer bit is not set, must normalize. + // Don't do it for zeroes, infinities or nans. + if( (wrd2 & 0x80000000) == 0 && exp != 0 && exp != 0x7FFF ) { + D(bug("to_exten denormalized mantissa (%X,%X,%X)\r\n",wrd1,wrd2,wrd3)); + if( wrd2 | wrd3 ) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)( man >> 32 ); + wrd3 = (uae_u32)( man & 0xFFFFFFFF ); + if( exp == 0 || (wrd2 & 0x80000000) == 0 ) { + // underflow + wrd2 = wrd3 = exp = 0; + sign = 0; + } + } else { + if(exp != 0x7FFF && exp != 0) { + // Make a non-signaling nan. + exp = 0x7FFF; + sign = 0; + wrd2 = 0x80000000; + } + } + } + + p[0] = wrd3; + p[1] = wrd2; + *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); + + D(bug("to_exten (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_exten"); +} + +PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + + // gb-- make GCC happy + union { + uae_u64 q; + uae_u32 l[2]; + } src; + + // Should renormalize if needed. I'm not sure that x86 and m68k FPU's + // do it the sama way. This should be extremely rare however. + // to_exten() is often called with denormalized values. + + src.l[0] = wrd2; + src.l[1] = wrd1; + +/* _asm { + FLD QWORD PTR src + MOV EDI, [f] + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (src.q) + ); + + D(bug("to_double (%X,%X) = %s\r\n",wrd1,wrd2,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_double"); +} + +PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_u32 dest; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FSTP DWORD PTR dest + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fstps %0\n" + "fnstsw %1\n" + : "=m" (dest), "=m" (sw_temp) + : "m" (f) + ); + + sw_temp &= SW_EXCEPTION_MASK; + if(sw_temp) { +// _asm FNCLEX + asm("fnclex"); + x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; + x86_status_word_accrued |= sw_temp; + } + + D(bug("from_single (%s) = %X\r\n",etos(f),dest)); + FPU_CONSISTENCY_CHECK_STOP("from_single"); + return dest; +} + +// TODO_BIGENDIAN +PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + *wrd3 = p[0]; + *wrd2 = p[1]; + *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; + + D(bug("from_exten (%s) = %X,%X,%X\r\n",etos(f),*wrd1,*wrd2,*wrd3)); + FPU_CONSISTENCY_CHECK_STOP("from_exten"); +} + +PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_u32 dest[2]; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FSTP QWORD PTR dest + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fstpl %0\n" + "fnstsw %1\n" + : "=m" (dest), "=m" (sw_temp) + : "m" (f) + ); + + sw_temp &= SW_EXCEPTION_MASK; + if(sw_temp) { +// _asm FNCLEX + asm("fnclex"); + x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; + x86_status_word_accrued |= sw_temp; + } + + // TODO: There is a partial memory stall, nothing happens until FSTP retires. + // On PIII, could use MMX move w/o any penalty. + *wrd2 = dest[0]; + *wrd1 = dest[1]; + + D(bug("from_double (%s) = %X,%X\r\n",etos(f),dest[1],dest[0])); + FPU_CONSISTENCY_CHECK_STOP("from_double"); +} + +PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fmove"); +} + +PRIVATE void FFPU do_fsmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fsmove"); +} + +PRIVATE void FFPU do_fdmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fdmove"); +} + +/* +PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSTP TBYTE PTR [EDI] + } + FPU_CONSISTENCY_CHECK_STOP("do_fmove_no_status"); +} +*/ + + +/* ---------------------------- Operations ---------------------------- */ + +PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FRNDINT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "frndint\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fint"); +} + +PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_MODE + or cw_temp, CW_RC_ZERO + FLDCW cw_temp + FLD TBYTE PTR [ESI] + FRNDINT + FXAM + FNSTSW x86_status_word + FLDCW x86_control_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_MODE), %0\n" + "orl $CW_RC_ZERO, %0\n" + "fldcw %0\n" + "fldt %3\n" + "frndint\n" + "fxam \n" + "fnstsw %1\n" + "fldcw %4\n" + "fstpt %2\n" + : "+m" (cw_temp), "=m" (x86_status_word), "=m" (dest) + : "m" (src), "m" (x86_control_word) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fintrz"); +} + +PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSQRT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsqrt"); +} + +PRIVATE void FFPU do_fssqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fssqrt"); +} + +PRIVATE void FFPU do_fdsqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdsqrt"); +} + +PRIVATE void FFPU do_ftst ( fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + FLD TBYTE PTR [ESI] + FXAM + FNSTSW x86_status_word + FSTP ST(0) + } */ + + __asm__ __volatile__( + "fldt %1\n" + "fxam \n" + "fnstsw %0\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_ftst"); +} + +// These functions are calculated in 53 bits accuracy only. +// Exception checking is not complete. +PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = sinh(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fsinh"); +} + +PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x + 1.0); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flognp1"); +} + +PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = exp (x) - 1.0; + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fetoxm1"); +} + +PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = tanh (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftanh"); +} + +PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = atan (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fatan"); +} + +PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = asin (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fasin"); +} + +PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log ((1 + x) / (1 - x)) / 2; + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fatanh"); +} + +PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = exp (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fetox"); +} + +PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = pow(2.0, x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftwotox"); +} + +PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = pow(10.0, x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftentox"); +} + +PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flogn"); +} + +PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log10 (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flog10"); +} + +PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x) / log (2.0); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flog2"); +} + +PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = acos(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_facos"); +} + +PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = cosh(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fcosh"); +} + +PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSIN + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fsin \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsin"); +} + +// TODO: Should check for out-of-range condition (partial tangent) +PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FPTAN + FSTP ST(0) ; pop 1.0 (the 8087/287 compatibility thing) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fptan \n" + "fstp %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_ftan"); +} + +PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FABS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fabs"); +} + +PRIVATE void FFPU do_fsabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsabs"); +} + +PRIVATE void FFPU do_fdabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdabs"); +} + +PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FCHS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fneg"); +} + +PRIVATE void FFPU do_fsneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsneg"); +} + +PRIVATE void FFPU do_fdneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdneg"); +} + +PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FCOS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fcos \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fcos"); +} + +PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXTRACT + FSTP ST(0) ; pop mantissa + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fxtract\n" + "fstp %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fgetexp"); +} + +PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXTRACT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) ; pop exponent + } */ + __asm__ __volatile__( + "fldt %2\n" + "fxtract\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fgetman"); +} + +PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdiv"); +} + +PRIVATE void FFPU do_fsdiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsdiv"); +} + +PRIVATE void FFPU do_fddiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fddiv"); +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. + +PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; +#if !USE_3_BIT_QUOTIENT + WORD cw_temp; +#endif + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + +#if !USE_3_BIT_QUOTIENT + MOV CX, x86_control_word + AND CX, ~X86_ROUNDING_MODE + OR CX, CW_RC_ZERO + MOV cw_temp, CX + FLDCW cw_temp + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + FLDCW x86_control_word + // TODO:Quotient + // Should clear any possible exceptions here +#endif + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + + FXAM + FNSTSW x86_status_word + + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + +#if !USE_3_BIT_QUOTIENT + + __asm__ __volatile__( + "movl %6, %%ecx\n" // %6: x86_control_word (read) + "andl $(~X86_ROUNDING_MODE), %%ecx\n" + "orl $CW_RC_ZERO, %%ecx\n" + "movl %%ecx, %0\n" // %0: cw_temp (read/write) + "fldcw %0\n" + "fldt %5\n" + "fldt %4\n" + "fdiv %%st(1), %%st(0)\n" + "fabs \n" + "fistpl %1\n" // %1: quot (read/write) + "fstp %%st(0)\n" + "fldcw %6\n" + "fldt %5\n" + "fldt %4\n" + "0:\n" // partial_loop + "fprem \n" + "fnstsw %2\n" // %2: status (read/write) + "testl $SW_C2, %2\n" + "jne 0b\n" + "fxam \n" + "fnstsw %3\n" // %3: x86_status_word (write) + "fstpt %4\n" + "fstp %%st(0)\n" + : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + : "ecx" + ); + +#else + + __asm__ __volatile__( + "fldt %3\n" + "fldt %2\n" + "0:\n" // partial_loop + "fprem \n" + "fnstsw %0\n" // %0: status (read/write) + "testl $SW_C2, %0\n" + "jne 0b\n" + "fxam \n" + "fnstsw %1\n" // %1: x86_status_word (write) + "fstpt %2\n" + "fstp %%st(0)\n" + : "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + +#endif + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + +#if USE_3_BIT_QUOTIENT + // SW_C1 Set to least significant bit of quotient (Q0). + // SW_C3 Set to bit 1 (Q1) of the quotient. + // SW_C0 Set to bit 2 (Q2) of the quotient. + quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); + FPU fpsr.quotient = (sign | quot) << 16; +#else + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; +#endif + + FPU_CONSISTENCY_CHECK_STOP("do_fmod"); +} + +PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; +#if !USE_3_BIT_QUOTIENT + WORD cw_temp; +#endif + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + +#if !USE_3_BIT_QUOTIENT + MOV CX, x86_control_word + AND CX, ~X86_ROUNDING_MODE + OR CX, CW_RC_NEAR + MOV cw_temp, CX + FLDCW cw_temp + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + FLDCW x86_control_word + // TODO:Quotient + // Should clear any possible exceptions here +#endif + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM1 + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + +#if !USE_3_BIT_QUOTIENT + + __asm__ __volatile__( + "movl %6, %%ecx\n" // %6: x86_control_word (read) + "andl $(~X86_ROUNDING_MODE), %%ecx\n" + "orl $CW_RC_NEAR, %%ecx\n" + "movl %%ecx, %0\n" // %0: cw_temp (read/write) + "fldcw %0\n" + "fldt %5\n" + "fldt %4\n" + "fdiv %%st(1), %%st(0)\n" + "fabs \n" + "fistpl %1\n" // %1: quot (read/write) + "fstp %%st(0)\n" + "fldcw %6\n" + "fldt %5\n" + "fldt %4\n" + "0:\n" // partial_loop + "fprem1 \n" + "fnstsw %2\n" // %2: status (read/write) + "testl $SW_C2, %2\n" + "jne 0b\n" + "fxam \n" + "fnstsw %3\n" // %3: x86_status_word (write) + "fstpt %4\n" + "fstp %%st(0)\n" + : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + : "ecx" + ); + +#else + + __asm__ __volatile__( + "fldt %3\n" + "fldt %2\n" + "0:\n" // partial_loop + "fprem1 \n" + "fnstsw %0\n" // %0: status (read/write) + "testl $SW_C2, %0\n" + "jne 0b\n" + "fxam \n" + "fnstsw %1\n" // %1: x86_status_word (write) + "fstpt %2\n" + "fstp %%st(0)\n" + : "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + +#endif + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + +#if USE_3_BIT_QUOTIENT + // SW_C1 Set to least significant bit of quotient (Q0). + // SW_C3 Set to bit 1 (Q1) of the quotient. + // SW_C0 Set to bit 2 (Q2) of the quotient. + quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); + FPU fpsr.quotient = (sign | quot) << 16; +#else + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; +#endif + + FPU_CONSISTENCY_CHECK_STOP("do_frem"); +} + +// Faster versions. The current rounding mode is already correct. +#if !USE_3_BIT_QUOTIENT +PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + + _asm { + MOV ESI, [src] + MOV EDI, [dest] + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + // TODO:Quotient + // Should clear any possible exceptions here + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } + if(x86_status_word & SW_EXCEPTION_MASK) { + _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; + FPU_CONSISTENCY_CHECK_STOP("do_fmod_dont_set_cw"); +} + +PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + + _asm { + MOV ESI, [src] + MOV EDI, [dest] + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + // TODO:Quotient + // Should clear any possible exceptions here + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM1 + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } + if(x86_status_word & SW_EXCEPTION_MASK) { + _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; + FPU_CONSISTENCY_CHECK_STOP("do_frem_dont_set_cw"); +} +#endif //USE_3_BIT_QUOTIENT + +PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FADD + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fadd"); +} + +PRIVATE void FFPU do_fsadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsadd"); +} + +PRIVATE void FFPU do_fdadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdadd"); +} + +PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FMUL + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fmul"); +} + +PRIVATE void FFPU do_fsmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsmul"); +} + +PRIVATE void FFPU do_fdmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdmul"); +} + +PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; +/* _asm { + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_PRECISION + or cw_temp, PRECISION_CONTROL_SINGLE + FLDCW cw_temp + + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + FLDCW x86_control_word + } */ + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_PRECISION), %0\n" + "orl $PRECISION_CONTROL_SINGLE, %0\n" + "fldcw %0\n" + "fldt %3\n" + "fldt %2\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %1\n" + "fstpt %2\n" + "fstp %%st(0)\n" + "fldcw %4\n" + : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsgldiv"); +} + +PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSCALE + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fscale \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_UE - SW_OE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fscale"); +} + +PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; + +/* _asm { + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_PRECISION + or cw_temp, PRECISION_CONTROL_SINGLE + FLDCW cw_temp + + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FMUL + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + + FLDCW x86_control_word + } */ + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_PRECISION), %0\n" + "orl $PRECISION_CONTROL_SINGLE, %0\n" + "fldcw %0\n" + "fldt %3\n" + "fldt %2\n" + "fmul \n" + "fxam \n" + "fnstsw %1\n" + "fstpt %2\n" + "fldcw %4\n" + : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_status_word) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsglmul"); +} + +PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSUB ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsub"); +} + +PRIVATE void FFPU do_fssub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fssub"); +} + +PRIVATE void FFPU do_fdsub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdsub"); +} + +PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest_cos] + FLD TBYTE PTR [ESI] + FSINCOS + FSTP TBYTE PTR [EDI] + FXAM + MOV EDI, [dest_sin] + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %3\n" + "fsincos\n" + "fstpt %1\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %2\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "=m" (dest_cos), "=m" (dest_sin) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsincos"); +} + +PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSUB ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP ST(0) + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstp %%st(0)\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word) + : "m" (dest), "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fcmp"); +} + +// More or less original. Should be reviewed. +PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + FPU_CONSISTENCY_CHECK_START(); + + double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + D(bug("to_pack str = %s\r\n",str)); + + D(bug("to_pack(%X,%X,%X) = %.04f\r\n",wrd1,wrd2,wrd3,(float)d)); + + FPU_CONSISTENCY_CHECK_STOP("to_pack"); + + return d; +} + +// More or less original. Should be reviewed. +PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + FPU_CONSISTENCY_CHECK_START(); + + int i; + int t; + char *cp; + char str[100]; + int exponent_digit_count = 0; + + sprintf(str, "%.16e", src); + + D(bug("from_pack(%.04f,%s)\r\n",(float)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; + } + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; + } + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; + } + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') { + t = (t << 4) | (*cp++ - '0'); + exponent_digit_count++; + } + } + *wrd1 |= t << 16; + } + + D(bug("from_pack(%.04f) = %X,%X,%X\r\n",(float)src,*wrd1,*wrd2,*wrd3)); + + WORD sw_temp; +// _asm FNSTSW sw_temp + __asm__ __volatile__("fnstsw %0" : "=m" (sw_temp)); + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + /* + OPERR is set if the k-factor > + 17 or the magnitude of + the decimal exponent exceeds three digits; + cleared otherwise. + */ + if(exponent_digit_count > 3) { + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + } + + FPU_CONSISTENCY_CHECK_STOP("from_pack"); +} + +PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) +{ + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // D(bug("get_fp_value(%X,%X)\r\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + memcpy( &src, &FPU registers[(extra >> 10) & 7], sizeof(fpu_register) ); +// do_fmove_no_status( src, FPU registers[(extra >> 10) & 7] ); + return 1; + } + + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + int size = (extra >> 10) & 7; + uae_u32 ad = 0; + + // D(bug("get_fp_value mode=%d, reg=%d, size=%d\r\n",(int)mode,(int)reg,(int)size)); + + switch ((uae_u8)mode) { + case 0: + switch ((uae_u8)size) { + case 6: + signed_to_extended( (uae_s32)(uae_s8) m68k_dreg (regs, reg), src ); + break; + case 4: + signed_to_extended( (uae_s32)(uae_s16) m68k_dreg (regs, reg), src ); + break; + case 0: + signed_to_extended( (uae_s32) m68k_dreg (regs, reg), src ); + break; + case 1: + to_single( m68k_dreg (regs, reg), src ); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + break; + case 4: + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ((uae_u8)reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + } + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + + /* + +0000 000004 FSCALE.B #$01,FP2 | F23C 5926 0001 + F23C 1111001000111100 + 5926 0101100100100110 + 0001 0000000000000001 + mode = 7 + reg = 4 + size = 6 + */ + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + + if(size == 6) ad++; + + // May be faster on a PII(I), sz2[size] is already in register + // ad += sz2[size] - sz1[size]; + + break; + default: + return 0; + } + } + + switch ((uae_u8)size) { + case 0: + signed_to_extended( (uae_s32) get_long (ad), src ); + break; + case 1: + to_single( get_long (ad), src ); + break; + + case 2:{ + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + to_exten( wrd1, wrd2, wrd3, src ); + } + break; + case 3:{ + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + double_to_extended( to_pack(wrd1, wrd2, wrd3), src ); + } + break; + case 4: + signed_to_extended( (uae_s32)(uae_s16) get_word(ad), src ); + break; + case 5:{ + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + to_double(wrd1, wrd2, src); + } + break; + case 6: + signed_to_extended( (uae_s32)(uae_s8) get_byte(ad), src ); + break; + default: + return 0; + } + + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + // D(bug("get_fp_value result = %.04f\r\n",(float)src)); + + return 1; +} + +PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) +{ + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // D(bug("put_fp_value(%.04f,%X,%X)\r\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + do_fmove( FPU registers[dest_reg], value ); + build_ex_status(); + return 1; + } + + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + int size = (extra >> 10) & 7; + uae_u32 ad = 0xffffffff; + + // Clear exception status + x86_status_word &= ~SW_EXCEPTION_MASK; + + switch ((uae_u8)mode) { + case 0: + switch ((uae_u8)size) { + case 6: + *((uae_u8 *)&m68k_dreg(regs, reg)) = extended_to_signed_8(value); + break; + case 4: + // TODO_BIGENDIAN + *((uae_u16 *)&m68k_dreg(regs, reg)) = extended_to_signed_16(value); + break; + case 0: + m68k_dreg (regs, reg) = extended_to_signed_32(value); + break; + case 1: + m68k_dreg (regs, reg) = from_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ((uae_u8)reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + } + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch ((uae_u8)size) { + case 0: + put_long (ad, (uae_s32) extended_to_signed_32(value)); + break; + case 1: + put_long (ad, from_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + from_exten(value, &wrd1, &wrd2, &wrd3); + + x86_status_word &= ~SW_EXCEPTION_MASK; + if(wrd3) { // TODO: not correct! Just a "smart" guess. + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } + break; + case 3: { + uae_u32 wrd1, wrd2, wrd3; + from_pack(extended_to_double(value), &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } + break; + case 4: + put_word(ad, extended_to_signed_16(value)); + break; + case 5:{ + uae_u32 wrd1, wrd2; + from_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + } + break; + case 6: + put_byte(ad, extended_to_signed_8(value)); + + break; + default: + return 0; + } + return 1; +} + +PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + switch ( (uae_u8)mode ) { + case 0: + case 1: + if( (opcode & 0xFF00) == 0xF300 ) { + // fsave, frestore + m68k_setpc (m68k_getpc () - 2); + } else { + m68k_setpc (m68k_getpc () - 4); + } + op_illg (opcode); + dump_registers( "END "); + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ( (uae_u8)reg ) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + } + break; + default: + if( (opcode & 0xFF00) == 0xF300 ) { + // fsave, frestore + m68k_setpc (m68k_getpc () - 2); + } else { + m68k_setpc (m68k_getpc () - 4); + } + op_illg (opcode); + dump_registers( "END "); + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +#define CONDRET(s,x) D(bug("fpp_cond %s = %d\r\n",s,(uint32)(x))); return (x) +#else +#define CONDRET(s,x) return (x) +#endif + +PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) +{ + +#define N (x86_status_word & SW_N) +#define Z ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_Z) +#define I ((x86_status_word & (SW_Z_I_NAN_MASK)) == (SW_I)) +#define NotANumber ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN) + + switch (condition & 0x1f) { + // Common Tests, no BSUN + case 0x01: + CONDRET("Equal",Z); + case 0x0e: + CONDRET("Not Equal",!Z); + + // IEEE Nonaware Tests, BSUN + case 0x12: + SET_BSUN_ON_NAN(); + CONDRET("Greater Than",!(NotANumber || Z || N)); + case 0x1d: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater Than",NotANumber || Z || N); + case 0x13: + SET_BSUN_ON_NAN(); + CONDRET("Greater Than or Equal",Z || !(NotANumber || N)); + case 0x1c: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater Than or Equal",!Z && (NotANumber || N)); + case 0x14: + SET_BSUN_ON_NAN(); + CONDRET("Less Than",N && !(NotANumber || Z)); + case 0x1b: + SET_BSUN_ON_NAN(); + CONDRET("Not Less Than",NotANumber || Z || !N); + case 0x15: + SET_BSUN_ON_NAN(); + CONDRET("Less Than or Equal",Z || (N && !NotANumber)); + case 0x1a: + SET_BSUN_ON_NAN(); + CONDRET("Not Less Than or Equal",NotANumber || !(N || Z)); + case 0x16: + SET_BSUN_ON_NAN(); + CONDRET("Greater or Less Than",!(NotANumber || Z)); + case 0x19: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater or Less Than",NotANumber || Z); + case 0x17: + CONDRET("Greater, Less or Equal",!NotANumber); + case 0x18: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater, Less or Equal",NotANumber); + + // IEEE Aware Tests, no BSUN + case 0x02: + CONDRET("Ordered Greater Than",!(NotANumber || Z || N)); + case 0x0d: + CONDRET("Unordered or Less or Equal",NotANumber || Z || N); + case 0x03: + CONDRET("Ordered Greater Than or Equal",Z || !(NotANumber || N)); + case 0x0c: + CONDRET("Unordered or Less Than",NotANumber || (N && !Z)); + case 0x04: + CONDRET("Ordered Less Than",N && !(NotANumber || Z)); + case 0x0b: + CONDRET("Unordered or Greater or Equal",NotANumber || Z || !N); + case 0x05: + CONDRET("Ordered Less Than or Equal",Z || (N && !NotANumber)); + case 0x0a: + CONDRET("Unordered or Greater Than",NotANumber || !(N || Z)); + case 0x06: + CONDRET("Ordered Greater or Less Than",!(NotANumber || Z)); + case 0x09: + CONDRET("Unordered or Equal",NotANumber || Z); + case 0x07: + CONDRET("Ordered",!NotANumber); + case 0x08: + CONDRET("Unordered",NotANumber); + + // Miscellaneous Tests, no BSUN + case 0x00: + CONDRET("False",0); + case 0x0f: + CONDRET("True",1); + + // Miscellaneous Tests, BSUN + case 0x10: + SET_BSUN_ON_NAN(); + CONDRET("Signaling False",0); + case 0x1f: + SET_BSUN_ON_NAN(); + CONDRET("Signaling True",1); + case 0x11: + SET_BSUN_ON_NAN(); + CONDRET("Signaling Equal",Z); + case 0x1e: + SET_BSUN_ON_NAN(); + CONDRET("Signaling Not Equal",!Z); + } + CONDRET("",-1); + +#undef N +#undef Z +#undef I +#undef NotANumber + +} + +PUBLIC void REGPARAM2 FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc; + + D(bug("fdbcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + cc = fpp_cond(opcode, extra & 0x3f); + if (cc < 0) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // TODO_BIGENDIAN + uae_u16 newv = (uae_u16)(m68k_dreg (regs, reg) & 0xffff) - 1; + *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; + + if (newv != 0xffff) + m68k_setpc (pc + disp); + } +} + +PUBLIC void REGPARAM2 FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + uae_u32 ad; + int cc; + + D(bug("fscc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + cc = fpp_cond(opcode, extra & 0x3f); + if (cc < 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } else if ((opcode & 0x38) == 0) { + // TODO_BIGENDIAN + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } else { + if (get_fp_ad(opcode, &ad)) { + put_byte(ad, cc ? 0xff : 0x00); + } + } +} + +PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +{ + int cc; + + D(bug("ftrapcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + +#if I3_ON_FTRAPCC +#error "FIXME: _asm int 3" + _asm int 3 +#endif + + // This must be broken. + cc = fpp_cond(opcode, extra & 0x3f); + + if (cc < 0) { + m68k_setpc (oldpc); + op_illg (opcode); + } else if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +PUBLIC void REGPARAM2 FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + int cc; + + D(bug("fbcc_opp %X, %X at %08lx, jumpto=%X\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + cc = fpp_cond(opcode, opcode & 0x3f); + if (cc < 0) { + m68k_setpc (pc); + op_illg (opcode); + } else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +PUBLIC void REGPARAM2 FFPU fpuop_save(uae_u32 opcode) +{ + uae_u32 ad; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + D(bug("fsave_opp at %08lx\r\n", m68k_getpc ())); + + if (get_fp_ad(opcode, &ad)) { + if (FPU is_integral) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + D(bug("fsave_opp pre-decrement\r\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + D(bug("PROBLEM: fsave_opp post-increment\r\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + D(bug("fsave_opp pre-decrement %X -> A%d\r\n",ad,opcode & 7)); + } + } +} + +PRIVATE void FFPU do_null_frestore () +{ + // A null-restore operation sets FP7-FP0 positive, nonsignaling NANs. + for( int i=0; i<8; i++ ) { + MAKE_NAN( FPU registers[i] ); + } + + FPU instruction_address = 0; + set_fpcr(0); + set_fpsr(0); + + x86_status_word = SW_INITIAL; + x86_status_word_accrued = 0; + FPU fpsr.quotient = 0; + + x86_control_word = CW_INITIAL; +/* _asm FLDCW x86_control_word + _asm FNCLEX */ + __asm__ __volatile__("fldcw %0\n\tfnclex" : : "m" (x86_control_word)); +} + +// FSAVE has no pre-decrement +PUBLIC void REGPARAM2 FFPU fpuop_restore(uae_u32 opcode) +{ + uae_u32 ad; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + D(bug("frestore_opp at %08lx\r\n", m68k_getpc ())); + + if (get_fp_ad(opcode, &ad)) { + if (FPU is_integral) { + // 68040 + if (incr < 0) { + D(bug("PROBLEM: frestore_opp incr < 0\r\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); + ad -= 44; + } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad -= 92; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } else { + d = get_long (ad); + D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); + ad += 4; + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); + ad += 44; + } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad += 92; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } + } else { + // 68881 + if (incr < 0) { + D(bug("PROBLEM: frestore_opp incr < 0\r\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) == 0) { // NULL + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0x00180000) { + ad -= 6 * 4; + } else if ((d & 0x00ff0000) == 0x00380000) { + ad -= 14 * 4; + } else if ((d & 0x00ff0000) == 0x00b40000) { + ad -= 45 * 4; + } + } else { + d = get_long (ad); + D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); + ad += 4; + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0x00180000) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + ad += 6 * 4; + } else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + D(bug("PROBLEM: frestore_opp found UNIMP? frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad += 45 * 4; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } + } + + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + D(bug("frestore_opp post-increment %X -> A%d\r\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + D(bug("PROBLEM: frestore_opp pre-decrement\r\n")); + } + } +} + + +/* ---------------------------- Old-style interface ---------------------------- */ + +// #ifndef OPTIMIZED_8BIT_MEMORY_ACCESS +PUBLIC void REGPARAM2 FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); + (*fpufunctbl[mask])(opcode,extra); +} +// #endif + + +/* ---------------------------- Illegal ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("ILLEGAL F OP 2 %X\r\n",opcode)); + +#if I3_ON_ILLEGAL_FPU_OP +#error "FIXME: asm int 3" + _asm int 3 +#endif + + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + + +/* ---------------------------- FPP -> ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVE -> \r\n")); + + if (put_fp_value (FPU registers[(extra >> 7) & 7], opcode, extra) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + + /* + Needed (among other things) by some Pack5/Elems68k transcendental + functions, they require the ACCR_INEX flag after a "MOVE.D, Dreg". + However, now put_fp_value() is responsible of clearing the exceptions + and merging statuses. + */ + + /* + WORD sw_temp; + _asm FNSTSW sw_temp + if(sw_temp & SW_PE) { + _asm FNCLEX + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + */ + + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> Dreg ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM control(none) -> D%d\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + + +/* ---------------------------- Dreg -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM D%d -> control(none)\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> Areg ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM control(none) -> A%d\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + + +/* ---------------------------- Areg -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM A%d -> control(none)\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> --MEMORY---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 12; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + dump_registers( "END "); + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + m68k_areg (regs, opcode & 7) = ad+12; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + dump_registers( "END "); + } +} + + +/* ---------------------------- --MEMORY -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM --Mem -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 12; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Mem++ -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+12; + dump_registers( "END "); + } +} + + +/* ---------------------------- MEMORY -> CONTROL REGS ---------------------------- */ +/* ---------------------------- and ---------------------------- */ +/* ---------------------------- IMMEDIATE -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Mem -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + } + } + dump_registers( "END "); +} + + +/* ---------------------------- FMOVEM MEMORY -> FPP ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + + +/* ---------------------------- FPP -> FMOVEM MEMORY ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + dump_registers( "END "); + } +} + + +/* ---------------------------- FMOVEM CONSTANT ROM -> FPP ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Pi\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_pi, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 10 (2)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_lg2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: e\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 2 (e)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_l2e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 10 (e)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_log_10_e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: zero\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_z, sizeof(fpu_register) ); + x86_status_word = SW_Z; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: ln(2)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_ln2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: ln(10)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_ln_10, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e0\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e1\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e1, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e2\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e4\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e4, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e8\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e8, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; // Is it really FPSR_EXCEPTION_INEX2? + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e16\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e16, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e32\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e32, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e64\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e64, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e128\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e128, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e256\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e256, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e512\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e512, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e1024\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e1024, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e2048\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e2048, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e4096\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e4096, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + + +/* -------------------------- 040 ALU -------------------------- */ +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMOVE %s\r\n",etos(src))); + do_fsmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDMOVE %s\r\n",etos(src))); + do_fdmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSSQRT %s\r\n",etos(src))); + do_fssqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDSQRT %s\r\n",etos(src))); + do_fdsqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSABS %s\r\n",etos(src))); + do_fsabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDABS %s\r\n",etos(src))); + do_fdabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSNEG %s\r\n",etos(src))); + do_fsneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDNEG %s\r\n",etos(src))); + do_fdneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSDIV %s\r\n",etos(src))); + do_fsdiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDDIV %s\r\n",etos(src))); + do_fddiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSADD %s\r\n",etos(src))); + do_fsadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDADD %s\r\n",etos(src))); + do_fdadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSSUB %s\r\n",etos(src))); + do_fssub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDSUB %s\r\n",etos(src))); + do_fdsub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMUL %s\r\n",etos(src))); + do_fsmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMUL %s\r\n",etos(src))); + do_fsmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +/* ---------------------------- ALU ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMOVE %s\r\n",etos(src))); + do_fmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FINT %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); + do_fint( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSINH %s\r\n",etos(src))); + do_fsinh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FINTRZ %s\r\n",etos(src))); + do_fintrz( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSQRT %s\r\n",etos(src))); + do_fsqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOGNP1 %s\r\n",etos(src))); + do_flognp1( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FETOXM1 %s\r\n",etos(src))); + do_fetoxm1( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTANH %s\r\n",etos(src))); + do_ftanh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FATAN %s\r\n",etos(src))); + do_fatan( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FASIN %s\r\n",etos(src))); + do_fasin( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FATANH %s\r\n",etos(src))); + do_fatanh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSIN %s\r\n",etos(src))); + do_fsin( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTAN %s\r\n",etos(src))); + do_ftan( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FETOX %s\r\n",etos(src))); + do_fetox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTWOTOX %s\r\n",etos(src))); + do_ftwotox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTENTOX %s\r\n",etos(src))); + do_ftentox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOGN %s\r\n",etos(src))); + do_flogn( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOG10 %s\r\n",etos(src))); + do_flog10( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOG2 %s\r\n",etos(src))); + do_flog2( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FABS %s\r\n",etos(src))); + do_fabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCOSH %s\r\n",etos(src))); + do_fcosh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FNEG %s\r\n",etos(src))); + do_fneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FACOS %s\r\n",etos(src))); + do_facos( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCOS %s\r\n",etos(src))); + do_fcos( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FGETEXP %s\r\n",etos(src))); + + if( IS_INFINITY(src) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + do_fgetexp( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FGETMAN %s\r\n",etos(src))); + if( IS_INFINITY(src) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + do_fgetman( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDIV %s\r\n",etos(src))); + do_fdiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMOD %s\r\n",etos(src))); + +#if USE_3_BIT_QUOTIENT + do_fmod( FPU registers[reg], src ); +#else + if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_ZERO ) { + do_fmod_dont_set_cw( FPU registers[reg], src ); + } else { + do_fmod( FPU registers[reg], src ); + } +#endif + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FREM %s\r\n",etos(src))); +#if USE_3_BIT_QUOTIENT + do_frem( FPU registers[reg], src ); +#else + if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_NEAR ) { + do_frem_dont_set_cw( FPU registers[reg], src ); + } else { + do_frem( FPU registers[reg], src ); + } +#endif + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FADD %s\r\n",etos(src))); + do_fadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMUL %s\r\n",etos(src))); + do_fmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSGLDIV %s\r\n",etos(src))); + do_fsgldiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSCALE %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); + if( IS_INFINITY(FPU registers[reg]) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + do_fscale( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSGLMUL %s\r\n",etos(src))); + do_fsglmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSUB %s\r\n",etos(src))); + do_fsub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSINCOS %s\r\n",etos(src))); + do_fsincos( FPU registers[reg], FPU registers[extra & 7], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCMP %s\r\n",etos(src))); + + if( IS_INFINITY(src) ) { + if( IS_NEGATIVE(src) ) { + if( IS_INFINITY(FPU registers[reg]) && IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_Z | SW_N; + D(bug("-INF FCMP -INF -> NZ\r\n")); + } else { + x86_status_word = SW_FINITE; + D(bug("X FCMP -INF -> None\r\n")); + } + } else { + if( IS_INFINITY(FPU registers[reg]) && !IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_Z; + D(bug("+INF FCMP +INF -> Z\r\n")); + } else { + x86_status_word = SW_N; + D(bug("X FCMP +INF -> N\r\n")); + } + } + } else if( IS_INFINITY(FPU registers[reg]) ) { + if( IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_N; + D(bug("-INF FCMP X -> Negative\r\n")); + } else { + x86_status_word = SW_FINITE; + D(bug("+INF FCMP X -> None\r\n")); + } + } else { + do_fcmp( FPU registers[reg], src ); + } + + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTST %s\r\n",etos(src))); + do_ftst( src ); + build_ex_status(); + dump_registers( "END "); +} + + + +/* ---------------------------- SETUP TABLES ---------------------------- */ + +PRIVATE void FFPU build_fpp_opp_lookup_table () +{ + for( uae_u32 opcode=0; opcode<=0x38; opcode+=8 ) { + for( uae_u32 extra=0; extra<65536; extra++ ) { + uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); + fpufunctbl[mask] = & FFPU fpuop_illg; + + switch ((extra >> 13) & 0x7) { + case 3: + fpufunctbl[mask] = & FFPU fpuop_fmove_2_ea; + break; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Dreg; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Dreg; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Dreg; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Dreg; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_none; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpiar; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar; + break; + } + } + } else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Areg; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Areg; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Areg; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Areg; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Areg; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Areg; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Areg; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_none; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpiar; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr_fpiar; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpiar; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar; + break; + } + } + } else if (extra & 0x2000) { + if ((opcode & 0x38) == 0x20) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_predecrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_predecrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_predecrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_predecrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement; + break; + } + } else if ((opcode & 0x38) == 0x18) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_postincrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_postincrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_postincrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_postincrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem; + break; + } + } + } else { + if ((opcode & 0x38) == 0x20) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_predecrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_predecrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_predecrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_predecrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement; + break; + } + } else if ((opcode & 0x38) == 0x18) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_postincrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_postincrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_postincrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_postincrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_2_Mem; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem; + break; + } + } + break; + case 6: + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred; + break; + case 1: /* dynamic pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred; + break; + case 2: /* static postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc; + break; + case 3: /* dynamic postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc; + break; + } + break; + case 7: + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred; + break; + case 1: /* dynamic pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred; + break; + case 2: /* static postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc; + break; + case 3: /* dynamic postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc; + break; + } + break; + case 0: + case 2: + if ((extra & 0xfc00) == 0x5c00) { + switch (extra & 0x7f) { + case 0x00: + fpufunctbl[mask] = & FFPU fpuop_do_fldpi; + break; + case 0x0b: + fpufunctbl[mask] = & FFPU fpuop_do_fldlg2; + break; + case 0x0c: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_e; + break; + case 0x0d: + fpufunctbl[mask] = & FFPU fpuop_do_fldl2e; + break; + case 0x0e: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_log_10_e; + break; + case 0x0f: + fpufunctbl[mask] = & FFPU fpuop_do_fldz; + break; + case 0x30: + fpufunctbl[mask] = & FFPU fpuop_do_fldln2; + break; + case 0x31: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_ln_10; + break; + case 0x32: + fpufunctbl[mask] = & FFPU fpuop_do_fld1; + break; + case 0x33: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1; + break; + case 0x34: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2; + break; + case 0x35: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4; + break; + case 0x36: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e8; + break; + case 0x37: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e16; + break; + case 0x38: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e32; + break; + case 0x39: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e64; + break; + case 0x3a: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e128; + break; + case 0x3b: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e256; + break; + case 0x3c: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e512; + break; + case 0x3d: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1024; + break; + case 0x3e: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2048; + break; + case 0x3f: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4096; + break; + } + break; + } + + if (FPU is_integral) { + switch (extra & 0x7f) { + case 0x40: + fpufunctbl[mask] = & FFPU fpuop_do_fsmove; + break; + case 0x44: + fpufunctbl[mask] = & FFPU fpuop_do_fdmove; + break; + case 0x41: + fpufunctbl[mask] = & FFPU fpuop_do_fssqrt; + break; + case 0x45: + fpufunctbl[mask] = & FFPU fpuop_do_fdsqrt; + break; + case 0x58: + fpufunctbl[mask] = & FFPU fpuop_do_fsabs; + break; + case 0x5c: + fpufunctbl[mask] = & FFPU fpuop_do_fdabs; + break; + case 0x5a: + fpufunctbl[mask] = & FFPU fpuop_do_fsneg; + break; + case 0x5e: + fpufunctbl[mask] = & FFPU fpuop_do_fdneg; + break; + case 0x60: + fpufunctbl[mask] = & FFPU fpuop_do_fsdiv; + break; + case 0x64: + fpufunctbl[mask] = & FFPU fpuop_do_fddiv; + break; + case 0x62: + fpufunctbl[mask] = & FFPU fpuop_do_fsadd; + break; + case 0x66: + fpufunctbl[mask] = & FFPU fpuop_do_fdadd; + break; + case 0x68: + fpufunctbl[mask] = & FFPU fpuop_do_fssub; + break; + case 0x6c: + fpufunctbl[mask] = & FFPU fpuop_do_fdsub; + break; + case 0x63: + fpufunctbl[mask] = & FFPU fpuop_do_fsmul; + break; + case 0x67: + fpufunctbl[mask] = & FFPU fpuop_do_fdmul; + break; + default: + break; + } + } + + switch (extra & 0x7f) { + case 0x00: + fpufunctbl[mask] = & FFPU fpuop_do_fmove; + break; + case 0x01: + fpufunctbl[mask] = & FFPU fpuop_do_fint; + break; + case 0x02: + fpufunctbl[mask] = & FFPU fpuop_do_fsinh; + break; + case 0x03: + fpufunctbl[mask] = & FFPU fpuop_do_fintrz; + break; + case 0x04: + fpufunctbl[mask] = & FFPU fpuop_do_fsqrt; + break; + case 0x06: + fpufunctbl[mask] = & FFPU fpuop_do_flognp1; + break; + case 0x08: + fpufunctbl[mask] = & FFPU fpuop_do_fetoxm1; + break; + case 0x09: + fpufunctbl[mask] = & FFPU fpuop_do_ftanh; + break; + case 0x0a: + fpufunctbl[mask] = & FFPU fpuop_do_fatan; + break; + case 0x0c: + fpufunctbl[mask] = & FFPU fpuop_do_fasin; + break; + case 0x0d: + fpufunctbl[mask] = & FFPU fpuop_do_fatanh; + break; + case 0x0e: + fpufunctbl[mask] = & FFPU fpuop_do_fsin; + break; + case 0x0f: + fpufunctbl[mask] = & FFPU fpuop_do_ftan; + break; + case 0x10: + fpufunctbl[mask] = & FFPU fpuop_do_fetox; + break; + case 0x11: + fpufunctbl[mask] = & FFPU fpuop_do_ftwotox; + break; + case 0x12: + fpufunctbl[mask] = & FFPU fpuop_do_ftentox; + break; + case 0x14: + fpufunctbl[mask] = & FFPU fpuop_do_flogn; + break; + case 0x15: + fpufunctbl[mask] = & FFPU fpuop_do_flog10; + break; + case 0x16: + fpufunctbl[mask] = & FFPU fpuop_do_flog2; + break; + case 0x18: + fpufunctbl[mask] = & FFPU fpuop_do_fabs; + break; + case 0x19: + fpufunctbl[mask] = & FFPU fpuop_do_fcosh; + break; + case 0x1a: + fpufunctbl[mask] = & FFPU fpuop_do_fneg; + break; + case 0x1c: + fpufunctbl[mask] = & FFPU fpuop_do_facos; + break; + case 0x1d: + fpufunctbl[mask] = & FFPU fpuop_do_fcos; + break; + case 0x1e: + fpufunctbl[mask] = & FFPU fpuop_do_fgetexp; + break; + case 0x1f: + fpufunctbl[mask] = & FFPU fpuop_do_fgetman; + break; + case 0x20: + fpufunctbl[mask] = & FFPU fpuop_do_fdiv; + break; + case 0x21: + fpufunctbl[mask] = & FFPU fpuop_do_fmod; + break; + case 0x22: + fpufunctbl[mask] = & FFPU fpuop_do_fadd; + break; + case 0x23: + fpufunctbl[mask] = & FFPU fpuop_do_fmul; + break; + case 0x24: + fpufunctbl[mask] = & FFPU fpuop_do_fsgldiv; + break; + case 0x25: + fpufunctbl[mask] = & FFPU fpuop_do_frem; + break; + case 0x26: + fpufunctbl[mask] = & FFPU fpuop_do_fscale; + break; + case 0x27: + fpufunctbl[mask] = & FFPU fpuop_do_fsglmul; + break; + case 0x28: + fpufunctbl[mask] = & FFPU fpuop_do_fsub; + break; + case 0x30: + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpufunctbl[mask] = & FFPU fpuop_do_fsincos; + break; + case 0x38: + fpufunctbl[mask] = & FFPU fpuop_do_fcmp; + break; + case 0x3a: + fpufunctbl[mask] = & FFPU fpuop_do_ftst; + break; + } + } + } + } + } +} + +/* ---------------------------- CONSTANTS ---------------------------- */ + +PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ) +{ + FPU_CONSISTENCY_CHECK_START(); + if(mult == 1) { +/* _asm { + MOV ESI, [f] + FLD QWORD PTR [value] + FSTP TBYTE PTR [ESI] + } */ + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (value) + ); + } else { +/* _asm { + MOV ESI, [f] + FILD DWORD PTR [mult] + FLD QWORD PTR [value] + FMUL + FSTP TBYTE PTR [ESI] + } */ + __asm__ __volatile__( + "fildl %2\n" + "fldl %1\n" + "fmul \n" + "fstpt %0\n" + : "=m" (f) + : "m" (value), "m" (mult) + ); + } + D(bug("set_constant (%s,%.04f) = %s\r\n",name,(float)value,etos(f))); + FPU_CONSISTENCY_CHECK_STOP( mult==1 ? "set_constant(mult==1)" : "set_constant(mult>1)" ); +} + +PRIVATE void FFPU do_fldpi ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDPI + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldpi \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldpi"); +} + +PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDLG2 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldlg2 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldlg2"); +} + +PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDL2E + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldl2e \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldl2e"); +} + +PRIVATE void FFPU do_fldz ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDZ + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldz \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldz"); +} + +PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDLN2 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldln2 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldln2"); +} + +PRIVATE void FFPU do_fld1 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLD1 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fld1 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fld1"); +} + + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + +/* ---------------------------- MAIN INIT ---------------------------- */ + +#ifdef HAVE_SIGACTION +// Mega hackaround-that-happens-to-work: the following way to handle +// SIGFPE just happens to make the "fsave" below in fpu_init() *NOT* +// to abort with a floating point exception. However, we never +// actually reach sigfpe_handler(). +static void sigfpe_handler(int code, siginfo_t *sip, void *) +{ + if (code == SIGFPE && sip->si_code == FPE_FLTINV) { + fprintf(stderr, "Invalid floating point operation\n"); + abort(); + } +} +#endif + +PUBLIC void FFPU fpu_init( bool integral_68040 ) +{ + static bool done_first_time_initialization = false; + if (!done_first_time_initialization) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); +#ifdef HAVE_SIGACTION + struct sigaction fpe_sa; + sigemptyset(&fpe_sa.sa_mask); + fpe_sa.sa_sigaction = sigfpe_handler; + fpe_sa.sa_flags = SA_SIGINFO; + sigaction(SIGFPE, &fpe_sa, 0); +#endif + done_first_time_initialization = true; + } + + __asm__ __volatile__("fsave %0" : "=m" (m_fpu_state_original)); + + FPU is_integral = integral_68040; + FPU instruction_address = 0; + set_fpcr(0); + set_fpsr(0); + + x86_control_word = CW_INITIAL; + x86_status_word = SW_INITIAL; + x86_status_word_accrued = 0; + FPU fpsr.quotient = 0; + + for( int i=0; i<8; i++ ) { + MAKE_NAN( FPU registers[i] ); + } + + build_fpp_opp_lookup_table(); + +/* _asm { + FNINIT + FLDCW x86_control_word + } */ + __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); + + do_fldpi( const_pi ); + do_fldlg2( const_lg2 ); + do_fldl2e( const_l2e ); + do_fldz( const_z ); + do_fldln2( const_ln2 ); + do_fld1( const_1 ); + + set_constant( const_e, "e", exp (1.0), 1 ); + set_constant( const_log_10_e, "Log 10 (e)", log (exp (1.0)) / log (10.0), 1 ); + set_constant( const_ln_10, "ln(10)", log (10.0), 1 ); + set_constant( const_1e1, "1.0e1", 1.0e1, 1 ); + set_constant( const_1e2, "1.0e2", 1.0e2, 1 ); + set_constant( const_1e4, "1.0e4", 1.0e4, 1 ); + set_constant( const_1e8, "1.0e8", 1.0e8, 1 ); + set_constant( const_1e16, "1.0e16", 1.0e16, 1 ); + set_constant( const_1e32, "1.0e32", 1.0e32, 1 ); + set_constant( const_1e64, "1.0e64", 1.0e64, 1 ) ; + set_constant( const_1e128, "1.0e128", 1.0e128, 1 ); + set_constant( const_1e256, "1.0e256", 1.0e256, 1 ); + set_constant( const_1e512, "1.0e512", 1.0e256, 10 ); + set_constant( const_1e1024, "1.0e1024", 1.0e256, 100 ); + set_constant( const_1e2048, "1.0e2048", 1.0e256, 1000 ); + set_constant( const_1e4096, "1.0e4096", 1.0e256, 10000 ); + + // Just in case. +/* _asm { + FNINIT + FLDCW x86_control_word + } */ + __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); +} + +PUBLIC void FFPU fpu_exit( void ) +{ + __asm__ __volatile__("frstor %0" : : "m" (m_fpu_state_original)); +} + +PUBLIC void FFPU fpu_reset( void ) +{ + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h new file mode 100644 index 000000000..52a2f310d --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h @@ -0,0 +1,384 @@ +/* + * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_X86_H +#define FPU_X86_H + +/* NOTE: this file shall be included from fpu/fpu_x86.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Status word +PRIVATE uae_u32 x86_status_word; +PRIVATE uae_u32 x86_status_word_accrued; + +// FPU jump table +typedef void REGPARAM2 ( *fpuop_func )( uae_u32, uae_u32 ); +PRIVATE fpuop_func fpufunctbl[65536]; + +// FPU consistency +PRIVATE uae_u32 checked_sw_atstart; + +// FMOVECR constants supported byt x86 FPU +PRIVATE fpu_register const_pi; +PRIVATE fpu_register const_lg2; +PRIVATE fpu_register const_l2e; +PRIVATE fpu_register const_z; +PRIVATE fpu_register const_ln2; +PRIVATE fpu_register const_1; + +// FMOVECR constants not not suported by x86 FPU +PRIVATE fpu_register const_e; +PRIVATE fpu_register const_log_10_e; +PRIVATE fpu_register const_ln_10; +PRIVATE fpu_register const_1e1; +PRIVATE fpu_register const_1e2; +PRIVATE fpu_register const_1e4; +PRIVATE fpu_register const_1e8; +PRIVATE fpu_register const_1e16; +PRIVATE fpu_register const_1e32; +PRIVATE fpu_register const_1e64; +PRIVATE fpu_register const_1e128; +PRIVATE fpu_register const_1e256; +PRIVATE fpu_register const_1e512; +PRIVATE fpu_register const_1e1024; +PRIVATE fpu_register const_1e2048; +PRIVATE fpu_register const_1e4096; + +// Saved host FPU state +PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 + +/* -------------------------------------------------------------------------- */ +/* --- Methods --- */ +/* -------------------------------------------------------------------------- */ + +// Debug support functions +PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual); +PRIVATE char * FFPU etos(fpu_register const & e) REGPARAM; + +// FPU consistency +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void); +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name); + +// Get special floating-point value class +PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); + +// Make a special floating-point value +PRIVATE inline void FFPU MAKE_NAN (fpu_register & f); +PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); + +// Conversion from extended floating-point values +PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) REGPARAM; +PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) REGPARAM; +PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) REGPARAM; +PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) REGPARAM; +PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) REGPARAM; +PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) REGPARAM; +PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) REGPARAM; +PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) REGPARAM; + +// Conversion to extended floating-point values +PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) REGPARAM; +PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) REGPARAM; +PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) REGPARAM; + +// Atomic floating-point arithmetic operations +PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftst ( fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fldpi ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldz ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fld1 ( fpu_register & dest ) REGPARAM; + +// Instructions handlers +PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ); + +// 040 +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ); + +// Get & Put floating-point values +PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) REGPARAM; +PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) REGPARAM; +PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) REGPARAM; + +// Floating-point condition-based instruction handlers +PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) REGPARAM; + +// Misc functions +PRIVATE void inline FFPU set_host_fpu_control_word (); +PRIVATE void inline FFPU SET_BSUN_ON_NAN (); +PRIVATE void inline FFPU build_ex_status (); +PRIVATE void FFPU do_null_frestore (); +PRIVATE void FFPU build_fpp_opp_lookup_table (); +PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ); + +#endif /* FPU_X86_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h new file mode 100644 index 000000000..6e5a37667 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h @@ -0,0 +1,104 @@ +/* + * fpu/fpu_x86_asm.h - Extra Definitions for the X86 assembly FPU core + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#define DEFINE_X86_MACRO(name, value) \ + asm(".local " #name "\n\t" #name " = " #value) + +DEFINE_X86_MACRO(BSUN, 0x00008000); +DEFINE_X86_MACRO(SNAN, 0x00004000); +DEFINE_X86_MACRO(OPERR, 0x00002000); +DEFINE_X86_MACRO(OVFL, 0x00001000); +DEFINE_X86_MACRO(UNFL, 0x00000800); +DEFINE_X86_MACRO(DZ, 0x00000400); +DEFINE_X86_MACRO(INEX2, 0x00000200); +DEFINE_X86_MACRO(INEX1, 0x00000100); +DEFINE_X86_MACRO(ACCR_IOP, 0x80); +DEFINE_X86_MACRO(ACCR_OVFL, 0x40); +DEFINE_X86_MACRO(ACCR_UNFL, 0x20); +DEFINE_X86_MACRO(ACCR_DZ, 0x10); +DEFINE_X86_MACRO(ACCR_INEX, 0x08); +DEFINE_X86_MACRO(ROUND_CONTROL_MASK, 0x30); +DEFINE_X86_MACRO(ROUND_TO_NEAREST, 0); +DEFINE_X86_MACRO(ROUND_TO_ZERO, 0x10); +DEFINE_X86_MACRO(ROUND_TO_NEGATIVE_INFINITY, 0x20); +DEFINE_X86_MACRO(ROUND_TO_POSITIVE_INFINITY, 0x30); +DEFINE_X86_MACRO(PRECISION_CONTROL_MASK, 0xC0); +DEFINE_X86_MACRO(PRECISION_CONTROL_EXTENDED, 0); +DEFINE_X86_MACRO(PRECISION_CONTROL_DOUBLE, 0x80); +DEFINE_X86_MACRO(PRECISION_CONTROL_SINGLE, 0x40); +DEFINE_X86_MACRO(PRECISION_CONTROL_UNDEFINED, 0xC0); +DEFINE_X86_MACRO(CW_RESET, 0x0040); +DEFINE_X86_MACRO(CW_FINIT, 0x037F); +DEFINE_X86_MACRO(SW_RESET, 0x0000); +DEFINE_X86_MACRO(SW_FINIT, 0x0000); +DEFINE_X86_MACRO(TW_RESET, 0x5555); +DEFINE_X86_MACRO(TW_FINIT, 0x0FFF); +DEFINE_X86_MACRO(CW_X, 0x1000); +DEFINE_X86_MACRO(CW_RC_ZERO, 0x0C00); +DEFINE_X86_MACRO(CW_RC_UP, 0x0800); +DEFINE_X86_MACRO(CW_RC_DOWN, 0x0400); +DEFINE_X86_MACRO(CW_RC_NEAR, 0x0000); +DEFINE_X86_MACRO(CW_PC_EXTENDED, 0x0300); +DEFINE_X86_MACRO(CW_PC_DOUBLE, 0x0200); +DEFINE_X86_MACRO(CW_PC_RESERVED, 0x0100); +DEFINE_X86_MACRO(CW_PC_SINGLE, 0x0000); +DEFINE_X86_MACRO(CW_PM, 0x0020); +DEFINE_X86_MACRO(CW_UM, 0x0010); +DEFINE_X86_MACRO(CW_OM, 0x0008); +DEFINE_X86_MACRO(CW_ZM, 0x0004); +DEFINE_X86_MACRO(CW_DM, 0x0002); +DEFINE_X86_MACRO(CW_IM, 0x0001); +DEFINE_X86_MACRO(SW_B, 0x8000); +DEFINE_X86_MACRO(SW_C3, 0x4000); +DEFINE_X86_MACRO(SW_TOP_7, 0x3800); +DEFINE_X86_MACRO(SW_TOP_6, 0x3000); +DEFINE_X86_MACRO(SW_TOP_5, 0x2800); +DEFINE_X86_MACRO(SW_TOP_4, 0x2000); +DEFINE_X86_MACRO(SW_TOP_3, 0x1800); +DEFINE_X86_MACRO(SW_TOP_2, 0x1000); +DEFINE_X86_MACRO(SW_TOP_1, 0x0800); +DEFINE_X86_MACRO(SW_TOP_0, 0x0000); +DEFINE_X86_MACRO(SW_C2, 0x0400); +DEFINE_X86_MACRO(SW_C1, 0x0200); +DEFINE_X86_MACRO(SW_C0, 0x0100); +DEFINE_X86_MACRO(SW_ES, 0x0080); +DEFINE_X86_MACRO(SW_SF, 0x0040); +DEFINE_X86_MACRO(SW_PE, 0x0020); +DEFINE_X86_MACRO(SW_UE, 0x0010); +DEFINE_X86_MACRO(SW_OE, 0x0008); +DEFINE_X86_MACRO(SW_ZE, 0x0004); +DEFINE_X86_MACRO(SW_DE, 0x0002); +DEFINE_X86_MACRO(SW_IE, 0x0001); +DEFINE_X86_MACRO(X86_ROUNDING_MODE, 0x0C00); +DEFINE_X86_MACRO(X86_ROUNDING_PRECISION, 0x0300); + +#undef DEFINE_X86_MACRO diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu/fpu/impl.h new file mode 100644 index 000000000..af7946a3b --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/impl.h @@ -0,0 +1,159 @@ +/* + * fpu/impl.h - extra functions and inline implementations + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_IMPL_H +#define FPU_IMPL_H + +/* NOTE: this file shall be included from fpu/core.h */ +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- X86 assembly fpu specific methods --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_X86 + +/* Return the floating-point status register in m68k format */ +static inline uae_u32 FFPU get_fpsr(void) +{ + return to_m68k_fpcond[(x86_status_word & 0x4700) >> 8] + | FPU fpsr.quotient + | exception_host2mac[x86_status_word & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] + | accrued_exception_host2mac[x86_status_word_accrued & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] + ; +} + +/* Set the floating-point status register from an m68k format */ +static inline void FFPU set_fpsr(uae_u32 new_fpsr) +{ + x86_status_word = to_host_fpcond[(new_fpsr & FPSR_CCB) >> 24 ] + | exception_mac2host[(new_fpsr & FPSR_EXCEPTION_STATUS) >> 8]; + x86_status_word_accrued = accrued_exception_mac2host[(new_fpsr & FPSR_ACCRUED_EXCEPTION) >> 3]; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Original UAE and IEEE FPU core methods --- */ +/* -------------------------------------------------------------------------- */ + +#ifndef FPU_X86 + +/* Return the floating-point status register in m68k format */ +static inline uae_u32 FFPU get_fpsr(void) +{ + uae_u32 condition_codes = get_fpccr(); + uae_u32 exception_status = get_exception_status(); + uae_u32 accrued_exception = get_accrued_exception(); + uae_u32 quotient = FPU fpsr.quotient; + return (condition_codes | quotient | exception_status | accrued_exception); +} + +/* Set the floating-point status register from an m68k format */ +static inline void FFPU set_fpsr(uae_u32 new_fpsr) +{ + set_fpccr ( new_fpsr & FPSR_CCB ); + set_exception_status ( new_fpsr & FPSR_EXCEPTION_STATUS ); + set_accrued_exception ( new_fpsr & FPSR_ACCRUED_EXCEPTION ); + FPU fpsr.quotient = new_fpsr & FPSR_QUOTIENT; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common routines for control word --- */ +/* -------------------------------------------------------------------------- */ + +/* Return the floating-point control register in m68k format */ +static inline uae_u32 FFPU get_fpcr(void) +{ + uae_u32 rounding_precision = get_rounding_precision(); + uae_u32 rounding_mode = get_rounding_mode(); + uae_u32 exception_enable = FPU fpcr.exception_enable; + return (rounding_precision | rounding_mode | exception_enable); +} + +/* Set the floating-point control register from an m68k format */ +static inline void FFPU set_fpcr(uae_u32 new_fpcr) +{ + set_rounding_precision ( new_fpcr & FPCR_ROUNDING_PRECISION); + set_rounding_mode ( new_fpcr & FPCR_ROUNDING_MODE ); + set_host_control_word(); + FPU fpcr.exception_enable = new_fpcr & FPCR_EXCEPTION_ENABLE; +} + +/* -------------------------------------------------------------------------- */ +/* --- Specific part to X86 assembly FPU --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_X86 + +/* Retrieve a floating-point register value and convert it to double precision */ +static inline double FFPU fpu_get_register(int r) +{ + double f; + __asm__ __volatile__("fldt %1\n\tfstpl %0" : "=m" (f) : "m" (FPU registers[r])); + return f; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Specific to original UAE or new IEEE-based FPU core --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_UAE) || defined(FPU_IEEE) + +/* Retrieve a floating-point register value and convert it to double precision */ +static inline double FFPU fpu_get_register(int r) +{ + return FPU registers[r]; +} + +#endif + +#endif /* FPU_IMPL_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp new file mode 100644 index 000000000..46d43c95b --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp @@ -0,0 +1,105 @@ +/* + * fpu/mathlib.cpp - Floating-point math support library + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PRIVATE +#define PRIVATE static + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) + +PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y) +{ + fpu_extended value, exponent; + uae_s64 p = (uae_s64)y; + + if (x == 0.0) { + if (y > 0.0) + return (y == (double) p && (p & 1) != 0 ? x : 0.0); + else if (y < 0.0) + return (y == (double) p && (-p & 1) != 0 ? 1.0 / x : 1.0 / fp_fabs (x)); + } + + if (y == (double) p) { + fpu_extended r = 1.0; + if (p == 0) + return 1.0; + if (p < 0) { + p = -p; + x = 1.0 / x; + } + while (1) { + if (p & 1) + r *= x; + p >>= 1; + if (p == 0) + return r; + x *= x; + } + } + + __asm__ __volatile__("fyl2x" : "=t" (value) : "0" (x), "u" (1.0) : "st(1)"); + __asm__ __volatile__("fmul %%st(1) # y * log2(x)\n\t" + "fst %%st(1)\n\t" + "frndint # int(y * log2(x))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(y * log2(x))\n\t" + "f2xm1 # 2^(fract(y * log2(x))) - 1\n\t" + : "=t" (value), "=u" (exponent) : "0" (y), "1" (value)); + value += 1.0; + __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); + return value; +} + +PRIVATE fpu_extended fp_do_log1p(fpu_extended x) +{ + // TODO: handle NaN and +inf/-inf + fpu_extended value; + // The fyl2xp1 can only be used for values in + // -1 + sqrt(2) / 2 <= x <= 1 - sqrt(2) / 2 + // 0.29 is a safe value. + if (fp_fabs(x) <= 0.29) + __asm__ __volatile__("fldln2; fxch; fyl2xp1" : "=t" (value) : "0" (x)); + else + __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x + 1.0)); + return value; +} + +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h new file mode 100644 index 000000000..c9a1951c8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -0,0 +1,1185 @@ +/* + * fpu/mathlib.h - Floating-point math support library + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_MATHLIB_H +#define FPU_MATHLIB_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Define the following macro if branches are expensive. If so, +// integer-based isnan() and isinf() functions are implemented. +// TODO: move to Makefile.in +#define BRANCHES_ARE_EXPENSIVE 1 + +// Use ISO C99 extended-precision math functions (glibc 2.1+) +#define FPU_USE_ISO_C99 1 + +// NOTE: this is irrelevant on Win32 platforms since the MS libraries +// don't support extended-precision floating-point computations +#ifdef WIN32 +#undef FPU_USE_ISO_C99 +#endif + +// Use faster implementation of math functions, but this could cause +// some incorrect results (?) +// TODO: actually implement the slower but safer versions +#define FPU_FAST_MATH 1 + +#if defined(FPU_USE_ISO_C99) +// NOTE: no prior shall be included at this point +#define __USE_ISOC99 1 // for glibc 2.2.X and newer +#define __USE_ISOC9X 1 // for glibc 2.1.X +#include +#else +#include +using namespace std; +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Floating-point register types --- */ +/* -------------------------------------------------------------------------- */ + +// Single : S 8*E 23*F +#define FP_SINGLE_EXP_MAX 0xff +#define FP_SINGLE_EXP_BIAS 0x7f + +// Double : S 11*E 52*F +#define FP_DOUBLE_EXP_MAX 0x7ff +#define FP_DOUBLE_EXP_BIAS 0x3ff + +// Extended : S 15*E 64*F +#define FP_EXTENDED_EXP_MAX 0x7fff +#define FP_EXTENDED_EXP_BIAS 0x3fff + +// Zeroes : E = 0 & F = 0 +// Infinities : E = MAX & F = 0 +// Not-A-Number : E = MAX & F # 0 + +/* -------------------------------------------------------------------------- */ +/* --- Floating-point type shapes (IEEE-compliant) --- */ +/* -------------------------------------------------------------------------- */ + +// Taken from glibc 2.2.x: ieee754.h + +// IEEE-754 float format +union fpu_single_shape { + + fpu_single value; + + /* This is the IEEE 754 single-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:8; + unsigned int mantissa:23; +#else + unsigned int mantissa:23; + unsigned int exponent:8; + unsigned int negative:1; +#endif + } ieee; + + /* This format makes it easier to see if a NaN is a signalling NaN. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:8; + unsigned int quiet_nan:1; + unsigned int mantissa:22; +#else + unsigned int mantissa:22; + unsigned int quiet_nan:1; + unsigned int exponent:8; + unsigned int negative:1; +#endif + } ieee_nan; +}; + +// IEEE-754 double format +union fpu_double_shape { + fpu_double value; + + /* This is the IEEE 754 double-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:11; + /* Together these comprise the mantissa. */ + unsigned int mantissa0:20; + unsigned int mantissa1:32; +#else +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int mantissa0:20; + unsigned int exponent:11; + unsigned int negative:1; + unsigned int mantissa1:32; +# else + /* Together these comprise the mantissa. */ + unsigned int mantissa1:32; + unsigned int mantissa0:20; + unsigned int exponent:11; + unsigned int negative:1; +# endif +#endif + } ieee; + + /* This format makes it easier to see if a NaN is a signalling NaN. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:11; + unsigned int quiet_nan:1; + /* Together these comprise the mantissa. */ + unsigned int mantissa0:19; + unsigned int mantissa1:32; +#else +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int mantissa0:19; + unsigned int quiet_nan:1; + unsigned int exponent:11; + unsigned int negative:1; + unsigned int mantissa1:32; +# else + /* Together these comprise the mantissa. */ + unsigned int mantissa1:32; + unsigned int mantissa0:19; + unsigned int quiet_nan:1; + unsigned int exponent:11; + unsigned int negative:1; +# endif +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ + struct { +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int msw:32; + unsigned int lsw:32; +#else + unsigned int lsw:32; + unsigned int msw:32; +#endif + } parts; +}; + +#ifdef USE_LONG_DOUBLE +// IEEE-854 long double format +union fpu_extended_shape { + fpu_extended value; + + /* This is the IEEE 854 double-extended-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int empty:16; + unsigned int mantissa0:32; + unsigned int mantissa1:32; +#else +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; + unsigned int mantissa0:32; + unsigned int mantissa1:32; +# else + unsigned int mantissa1:32; + unsigned int mantissa0:32; + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; +# endif +#endif + } ieee; + + /* This is for NaNs in the IEEE 854 double-extended-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int empty:16; + unsigned int one:1; + unsigned int quiet_nan:1; + unsigned int mantissa0:30; + unsigned int mantissa1:32; +#else +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; + unsigned int mantissa0:30; + unsigned int quiet_nan:1; + unsigned int one:1; + unsigned int mantissa1:32; +# else + unsigned int mantissa1:32; + unsigned int mantissa0:30; + unsigned int quiet_nan:1; + unsigned int one:1; + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; +# endif +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ + struct { +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int sign_exponent:16; + unsigned int empty:16; + unsigned int msw:32; + unsigned int lsw:32; +#else + unsigned int lsw:32; + unsigned int msw:32; + unsigned int sign_exponent:16; + unsigned int empty:16; +#endif + } parts; +}; +#endif + +#ifdef USE_QUAD_DOUBLE +// IEEE-854 quad double format +union fpu_extended_shape { + fpu_extended value; + + /* This is the IEEE 854 quad-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int mantissa0:16; + unsigned int mantissa1:32; + unsigned int mantissa2:32; + unsigned int mantissa3:32; +#else + unsigned int mantissa3:32; + unsigned int mantissa2:32; + unsigned int mantissa1:32; + unsigned int mantissa0:16; + unsigned int exponent:15; + unsigned int negative:1; +#endif + } ieee; + + /* This is for NaNs in the IEEE 854 quad-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int quiet_nan:1; + unsigned int mantissa0:15; + unsigned int mantissa1:32; + unsigned int mantissa2:32; + unsigned int mantissa3:32; +#else + unsigned int mantissa3:32; + unsigned int mantissa2:32; + unsigned int mantissa1:32; + unsigned int mantissa0:15; + unsigned int quiet_nan:1; + unsigned int exponent:15; + unsigned int negative:1; +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN + struct { + uae_u64 msw; + uae_u64 lsw; + } parts64; + struct { + uae_u32 w0; + uae_u32 w1; + uae_u32 w2; + uae_u32 w3; + } parts32; +#else + struct { + uae_u64 lsw; + uae_u64 msw; + } parts64; + struct { + uae_u32 w3; + uae_u32 w2; + uae_u32 w1; + uae_u32 w0; + } parts32; +#endif +}; +#endif + +// Declare a shape of the requested FP type +#define fp_declare_init_shape(psvar, ftype) \ + fpu_ ## ftype ## _shape psvar + +/* -------------------------------------------------------------------------- */ +/* --- Extra Math Functions --- */ +/* --- (most of them had to be defined before including ) --- */ +/* -------------------------------------------------------------------------- */ + +#undef isnan +#if 0 && defined(HAVE_ISNANL) +# define isnan(x) isnanl((x)) +#else +# define isnan(x) fp_do_isnan((x)) +#endif + +PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) +{ +#ifdef BRANCHES_ARE_EXPENSIVE +#if !defined(USE_LONG_DOUBLE) + fp_declare_init_shape(sxp, double); + sxp.value = r; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; + hx &= 0x7fffffff; + hx |= (uae_u32)(lx | (-lx)) >> 31; + hx = 0x7ff00000 - hx; + return (int)(((uae_u32)hx) >> 31); +#elif defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s64 hx = sxp.parts64.msw; + uae_s64 lx = sxp.parts64.lsw; + hx &= 0x7fffffffffffffffLL; + hx |= (uae_u64)(lx | (-lx)) >> 63; + hx = 0x7fff000000000000LL - hx; + return (int)((uae_u64)hx >> 63); +#else + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s32 se = sxp.parts.sign_exponent; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; + se = (se & 0x7fff) << 1; + lx |= hx & 0x7fffffff; + se |= (uae_u32)(lx | (-lx)) >> 31; + se = 0xfffe - se; + return (int)(((uae_u32)(se)) >> 31); +#endif +#else +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#else + fp_declare_init_shape(sxp, double); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_DOUBLE_EXP_MAX) +#endif + && (sxp.ieee_nan.mantissa0 != 0) + && (sxp.ieee_nan.mantissa1 != 0) +#ifdef USE_QUAD_DOUBLE + && (sxp.ieee_nan.mantissa2 != 0) + && (sxp.ieee_nan.mantissa3 != 0) +#endif + ; +#endif +} + +#undef isinf +#if 0 && defined(HAVE_ISINFL) +# define isinf(x) isinfl((x)) +#else +# define isinf(x) fp_do_isinf((x)) +#endif + +PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) +{ +#ifdef BRANCHES_ARE_EXPENSIVE +#if !defined(USE_LONG_DOUBLE) + fp_declare_init_shape(sxp, double); + sxp.value = r; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; + lx |= (hx & 0x7fffffff) ^ 0x7ff00000; + lx |= -lx; + return ~(lx >> 31) & (hx >> 30); +#elif defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s64 hx = sxp.parts64.msw; + uae_s64 lx = sxp.parts64.lsw; + lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; + lx |= -lx; + return ~(lx >> 63) & (hx >> 62); +#else + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s32 se = sxp.parts.sign_exponent; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; + /* This additional ^ 0x80000000 is necessary because in Intel's + internal representation of the implicit one is explicit. + NOTE: anyway, this is equivalent to & 0x7fffffff in that case. */ +#ifdef CPU_i386 + lx |= (hx ^ 0x80000000) | ((se & 0x7fff) ^ 0x7fff); +#else + lx |= (hx & 0x7fffffff) | ((se & 0x7fff) ^ 0x7fff); +#endif + lx |= -lx; + se &= 0x8000; + return ~(lx >> 31) & (1 - (se >> 14)); +#endif +#else +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#else + fp_declare_init_shape(sxp, double); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_DOUBLE_EXP_MAX) +#endif + && (sxp.ieee_nan.mantissa0 == 0) + && (sxp.ieee_nan.mantissa1 == 0) +#ifdef USE_QUAD_DOUBLE + && (sxp.ieee_nan.mantissa2 == 0) + && (sxp.ieee_nan.mantissa3 == 0) +#endif + ; +#endif +} + +#undef isneg +#define isneg(x) fp_do_isneg((x)) + +PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); +#else + fp_declare_init_shape(sxp, double); +#endif + sxp.value = r; + return sxp.ieee.negative; +} + +#undef iszero +#define iszero(x) fp_do_iszero((x)) + +PRIVATE inline bool FFPU fp_do_iszero(fpu_register const & r) +{ + // TODO: BRANCHES_ARE_EXPENSIVE +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); +#else + fp_declare_init_shape(sxp, double); +#endif + sxp.value = r; + return (sxp.ieee.exponent == 0) + && (sxp.ieee.mantissa0 == 0) + && (sxp.ieee.mantissa1 == 0) +#ifdef USE_QUAD_DOUBLE + && (sxp.ieee.mantissa2 == 0) + && (sxp.ieee.mantissa3 == 0) +#endif + ; +} + +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) +{ + fl_dest.negative = isneg(r); + fl_dest.zero = iszero(r); + fl_dest.infinity = isinf(r); + fl_dest.nan = isnan(r); + fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; +} + +PRIVATE inline void FFPU get_source_flags(fpu_register const & r) +{ + fl_source.negative = isneg(r); + fl_source.zero = iszero(r); + fl_source.infinity = isinf(r); + fl_source.nan = isnan(r); + fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; +} + +PRIVATE inline void FFPU make_nan(fpu_register & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee.exponent = FP_EXTENDED_EXP_MAX; + sxp.ieee.mantissa0 = 0xffffffff; +#else + fp_declare_init_shape(sxp, double); + sxp.ieee.exponent = FP_DOUBLE_EXP_MAX; + sxp.ieee.mantissa0 = 0xfffff; +#endif + sxp.ieee.mantissa1 = 0xffffffff; +#ifdef USE_QUAD_DOUBLE + sxp.ieee.mantissa2 = 0xffffffff; + sxp.ieee.mantissa3 = 0xffffffff; +#endif + r = sxp.value; +} + +PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +{ +#if 1 + r = +0.0; +#else +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); +#else + fp_declare_init_shape(sxp, double); +#endif + sxp.ieee.negative = 0; + sxp.ieee.exponent = 0; + sxp.ieee.mantissa0 = 0; + sxp.ieee.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp.ieee.mantissa2 = 0; + sxp.ieee.mantissa3 = 0; +#endif + r = sxp.value; +#endif +} + +PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +{ +#if 1 + r = -0.0; +#else +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); +#else + fp_declare_init_shape(sxp, double); +#endif + sxp.ieee.negative = 1; + sxp.ieee.exponent = 0; + sxp.ieee.mantissa0 = 0; + sxp.ieee.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp.ieee.mantissa2 = 0; + sxp.ieee.mantissa3 = 0; +#endif + r = sxp.value; +#endif +} + +PRIVATE inline void FFPU make_inf_positive(fpu_register & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#else + fp_declare_init_shape(sxp, double); + sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp.ieee_nan.negative = 0; + sxp.ieee_nan.mantissa0 = 0; + sxp.ieee_nan.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp.ieee_nan.mantissa2 = 0; + sxp.ieee_nan.mantissa3 = 0; +#endif + r = sxp.value; +} + +PRIVATE inline void FFPU make_inf_negative(fpu_register & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#else + fp_declare_init_shape(sxp, double); + sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp.ieee_nan.negative = 1; + sxp.ieee_nan.mantissa0 = 0; + sxp.ieee_nan.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp.ieee_nan.mantissa2 = 0; + sxp.ieee_nan.mantissa3 = 0; +#endif + r = sxp.value; +} + +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return ((int) sxp.ieee.exponent - FP_EXTENDED_EXP_BIAS); +#else + fp_declare_init_shape(sxp, double); + sxp.value = r; + return ((int) sxp.ieee.exponent - FP_DOUBLE_EXP_BIAS); +#endif +} + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + sxp.ieee.exponent = FP_EXTENDED_EXP_BIAS; +#else + fp_declare_init_shape(sxp, double); + sxp.value = r; + sxp.ieee.exponent = FP_DOUBLE_EXP_BIAS; +#endif + r = sxp.value; +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sap, extended); + fp_declare_init_shape(sbp, extended); +#else + fp_declare_init_shape(sap, double); + fp_declare_init_shape(sbp, double); +#endif + sap.value = ra; + sbp.value = rb; + return ((sap.ieee.negative ^ sbp.ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); +} + +/* -------------------------------------------------------------------------- */ +/* --- Math functions --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_USE_ISO_C99) && (defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE)) +# ifdef HAVE_LOGL +# define fp_log logl +# endif +# ifdef HAVE_LOG10L +# define fp_log10 log10l +# endif +# ifdef HAVE_EXPL +# define fp_exp expl +# endif +# ifdef HAVE_POWL +# define fp_pow powl +# endif +# ifdef HAVE_FABSL +# define fp_fabs fabsl +# endif +# ifdef HAVE_SQRTL +# define fp_sqrt sqrtl +# endif +# ifdef HAVE_SINL +# define fp_sin sinl +# endif +# ifdef HAVE_COSL +# define fp_cos cosl +# endif +# ifdef HAVE_TANL +# define fp_tan tanl +# endif +# ifdef HAVE_SINHL +# define fp_sinh sinhl +# endif +# ifdef HAVE_COSHL +# define fp_cosh coshl +# endif +# ifdef HAVE_TANHL +# define fp_tanh tanhl +# endif +# ifdef HAVE_ASINL +# define fp_asin asinl +# endif +# ifdef HAVE_ACOSL +# define fp_acos acosl +# endif +# ifdef HAVE_ATANL +# define fp_atan atanl +# endif +# ifdef HAVE_ASINHL +# define fp_asinh asinhl +# endif +# ifdef HAVE_ACOSHL +# define fp_acosh acoshl +# endif +# ifdef HAVE_ATANHL +# define fp_atanh atanhl +# endif +# ifdef HAVE_FLOORL +# define fp_floor floorl +# endif +# ifdef HAVE_CEILL +# define fp_ceil ceill +# endif +#endif + +#ifndef fp_log +# define fp_log log +#endif +#ifndef fp_log10 +# define fp_log10 log10 +#endif +#ifndef fp_exp +# define fp_exp exp +#endif +#ifndef fp_pow +# define fp_pow pow +#endif +#ifndef fp_fabs +# define fp_fabs fabs +#endif +#ifndef fp_sqrt +# define fp_sqrt sqrt +#endif +#ifndef fp_sin +# define fp_sin sin +#endif +#ifndef fp_cos +# define fp_cos cos +#endif +#ifndef fp_tan +# define fp_tan tan +#endif +#ifndef fp_sinh +# define fp_sinh sinh +#endif +#ifndef fp_cosh +# define fp_cosh cosh +#endif +#ifndef fp_tanh +# define fp_tanh tanh +#endif +#ifndef fp_asin +# define fp_asin asin +#endif +#ifndef fp_acos +# define fp_acos acos +#endif +#ifndef fp_atan +# define fp_atan atan +#endif +#ifndef fp_asinh +# define fp_asinh asinh +#endif +#ifndef fp_acosh +# define fp_acosh acosh +#endif +#ifndef fp_atanh +# define fp_atanh atanh +#endif +#ifndef fp_floor +# define fp_floor floor +#endif +#ifndef fp_ceil +# define fp_ceil ceil +#endif + +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +// Assembly optimized support functions. Taken from glibc 2.2.2 + +#undef fp_log +#define fp_log fp_do_log + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_log(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_log(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} +#endif + +#undef fp_log10 +#define fp_log10 fp_do_log10 + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_log10(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_log10(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fldlg2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} +#endif + +#undef fp_exp +#define fp_exp fp_do_exp + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_exp(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) +{ + fpu_extended value, exponent; + if (isinf(x)) + { + if(isneg(x)) + return 0.; + else + return x; + } + __asm__ __volatile__("fldl2e # e^x = 2^(x * log2(e))\n\t" + "fmul %%st(1) # x * log2(e)\n\t" + "fst %%st(1)\n\t" + "frndint # int(x * log2(e))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(x * log2(e))\n\t" + "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" + : "=t" (value), "=u" (exponent) : "0" (x)); + value += 1.0; + __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); + return value; +} +#endif + +#undef fp_pow +#define fp_pow fp_do_pow + +PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y); + +#undef fp_fabs +#define fp_fabs fp_do_fabs + +PRIVATE inline fpu_extended fp_do_fabs(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fabs" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_sqrt +#define fp_sqrt fp_do_sqrt + +PRIVATE inline fpu_extended fp_do_sqrt(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fsqrt" : "=t" (value) : "0" (x)); + return value; +} + +#ifndef ACCURATE_SIN_COS_TAN +#undef fp_sin +#define fp_sin fp_do_sin + +PRIVATE inline fpu_extended fp_do_sin(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fsin" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_cos +#define fp_cos fp_do_cos + +PRIVATE inline fpu_extended fp_do_cos(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fcos" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_tan +#define fp_tan fp_do_tan + +PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) +{ + fpu_extended value, value2; + __asm__ __volatile__("fptan" : "=t" (value2), "=u" (value) : "0" (x)); + return value; +} +#endif /* ACCURATE_SIN_COS_TAN */ + +#undef fp_expm1 +#define fp_expm1 fp_do_expm1 + +// Returns: exp(X) - 1.0 +PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) +{ + fpu_extended value, exponent, temp, temp2; + if (isinf(x)) + { + if(isneg(x)) + return -1.; + else + return x; + } + __asm__ __volatile__("fldl2e # e^x - 1 = 2^(x * log2(e)) - 1\n\t" + "fmul %%st(1) # x * log2(e)\n\t" + "fst %%st(1)\n\t" + "frndint # int(x * log2(e))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(x * log2(e))\n\t" + "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" + "fscale # 2^(x * log2(e)) - 2^(int(x * log2(e)))\n\t" + : "=t" (value), "=u" (exponent) : "0" (x)); + __asm__ __volatile__("fld1 \n\t" + "fscale \n\t" + : "=t" (temp), "=u" (temp2) : "0" (exponent)); + temp -= 1.0; + return temp + value ? temp + value : x; +} + +#undef fp_sgn1 +#define fp_sgn1 fp_do_sgn1 + +PRIVATE inline fpu_extended fp_do_sgn1(fpu_extended x) +{ +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = x; + sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX>>1; + sxp.ieee_nan.one = 1; +#else + fp_declare_init_shape(sxp, double); + sxp.value = x; + sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX>>1; +#endif + sxp.ieee_nan.quiet_nan = 0; + sxp.ieee_nan.mantissa0 = 0; + sxp.ieee_nan.mantissa1 = 0; + x = sxp.value; + return x; +} + +#undef fp_sinh +#define fp_sinh fp_do_sinh + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_sinh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) +{ + if (isinf(x)) return x; + fpu_extended exm1 = fp_expm1(fp_fabs(x)); + return 0.5 * (exm1 / (exm1 + 1.0) + exm1) * fp_sgn1(x); +} +#endif + +#undef fp_cosh +#define fp_cosh fp_do_cosh + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_cosh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) +{ + fpu_extended ex = fp_exp(x); + return 0.5 * (ex + 1.0 / ex); +} +#endif + +#undef fp_tanh +#define fp_tanh fp_do_tanh + +#ifndef FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_tanh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_tanh(fpu_extended x) +{ + fpu_extended exm1 = fp_expm1(-fp_fabs(x + x)); + return exm1 / (exm1 + 2.0) * fp_sgn1(-x); +} +#endif + +#undef fp_atan2 +#define fp_atan2 fp_do_atan2 + +PRIVATE inline fpu_extended fp_do_atan2(fpu_extended y, fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fpatan" : "=t" (value) : "0" (x), "u" (y) : "st(1)"); + return value; +} + +#undef fp_asin +#define fp_asin fp_do_asin + +PRIVATE inline fpu_extended fp_do_asin(fpu_extended x) +{ + return fp_atan2(x, fp_sqrt(1.0 - x * x)); +} + +#undef fp_acos +#define fp_acos fp_do_acos + +PRIVATE inline fpu_extended fp_do_acos(fpu_extended x) +{ + return fp_atan2(fp_sqrt(1.0 - x * x), x); +} + +#undef fp_atan +#define fp_atan fp_do_atan + +PRIVATE inline fpu_extended fp_do_atan(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fld1; fpatan" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} + +#undef fp_log1p +#define fp_log1p fp_do_log1p + +// Returns: ln(1.0 + X) +PRIVATE fpu_extended fp_do_log1p(fpu_extended x); + +#undef fp_asinh +#define fp_asinh fp_do_asinh + +PRIVATE inline fpu_extended fp_do_asinh(fpu_extended x) +{ + fpu_extended y = fp_fabs(x); + return (fp_log1p(y * y / (fp_sqrt(y * y + 1.0) + 1.0) + y) * fp_sgn1(x)); +} + +#undef fp_acosh +#define fp_acosh fp_do_acosh + +PRIVATE inline fpu_extended fp_do_acosh(fpu_extended x) +{ + return fp_log(x + fp_sqrt(x - 1.0) * fp_sqrt(x + 1.0)); +} + +#undef fp_atanh +#define fp_atanh fp_do_atanh + +PRIVATE inline fpu_extended fp_do_atanh(fpu_extended x) +{ + fpu_extended y = fp_fabs(x); + return -0.5 * fp_log1p(-(y + y) / (1.0 + y)) * fp_sgn1(x); +} + + +/* + * LLVM 2.9 crashes on first definition, + * clang with LLVM 3.x crashes on 2nd definition... sigh + */ +#if defined(__clang__) || !defined(__llvm__) +#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ +PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended __x) \ +{ \ + register long double __value; \ + register int __ignore; \ + volatile unsigned short __cw; \ + volatile unsigned short __cwtmp; \ + __asm __volatile ("fnstcw %3\n\t" \ + "movzwl %3, %1\n\t" \ + "andl $0xf3ff, %1\n\t" \ + "orl %5, %1\n\t" \ + "movw %w1, %2\n\t" \ + "fldcw %2\n\t" \ + "frndint\n\t" \ + "fldcw %3" \ + : "=t" (__value), "=&q" (__ignore), "=m" (__cwtmp), \ + "=m" (__cw) \ + : "0" (__x), "i"(rounding_mode)); \ + return __value; \ +} +#else +#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ +PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended x) \ +{ \ + volatile unsigned short cw; \ + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); \ + volatile unsigned short cw_temp = (cw & 0xf3ff) | (rounding_mode); \ + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); \ + fpu_extended value; \ + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); \ + __asm__ __volatile__("fldcw %0" : : "m" (cw)); \ + return value; \ +} +#endif + +#undef fp_round_to_minus_infinity +#define fp_round_to_minus_infinity fp_do_round_to_minus_infinity + +DEFINE_ROUND_FUNC(minus_infinity, 0x400) + +#undef fp_round_to_plus_infinity +#define fp_round_to_plus_infinity fp_do_round_to_plus_infinity + +DEFINE_ROUND_FUNC(plus_infinity, 0x800) + +#undef fp_round_to_zero +#define fp_round_to_zero fp_do_round_to_zero + +DEFINE_ROUND_FUNC(zero, 0xc00) + +#undef fp_round_to_nearest +#define fp_round_to_nearest fp_do_round_to_nearest + +DEFINE_ROUND_FUNC(nearest, 0x000) + +#undef fp_ceil +#define fp_ceil fp_do_round_to_plus_infinity + +#undef fp_floor +#define fp_floor fp_do_round_to_minus_infinity + + +#endif /* USE_X87_ASSEMBLY */ + +#ifndef fp_round_to_minus_infinity +#define fp_round_to_minus_infinity(x) fp_floor(x) +#endif + +#ifndef fp_round_to_plus_infinity +#define fp_round_to_plus_infinity(x) fp_ceil(x) +#endif + +#ifndef fp_round_to_zero +#define fp_round_to_zero(x) ((int)(x)) +#endif + +#ifndef fp_round_to_nearest +#define fp_round_to_nearest(x) ((int)((x) + 0.5)) +#endif + +#endif /* FPU_MATHLIB_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu/fpu/rounding.cpp new file mode 100644 index 000000000..9942d4e89 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/rounding.cpp @@ -0,0 +1,69 @@ +/* + * fpu/rounding.cpp - system-dependant FPU rounding mode and precision + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Rounding Mode --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_ROUNDING_MODE +const uae_u32 FFPU x86_control_word_rm_mac2host[] = { + CW_RC_NEAR, + CW_RC_ZERO, + CW_RC_DOWN, + CW_RC_UP +}; +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Rounding Precision --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_ROUNDING_PRECISION +const uae_u32 FFPU x86_control_word_rp_mac2host[] = { + CW_PC_EXTENDED, + CW_PC_SINGLE, + CW_PC_DOUBLE, + CW_PC_RESERVED +}; +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu/fpu/rounding.h new file mode 100644 index 000000000..60c4baff1 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/rounding.h @@ -0,0 +1,159 @@ +/* + * fpu/rounding.h - system-dependant FPU rounding mode and precision + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_ROUNDING_H +#define FPU_ROUNDING_H + +/* NOTE: this file shall be included from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic rounding mode and precision handling */ +#define FPU_USE_GENERIC_ROUNDING_MODE +#define FPU_USE_GENERIC_ROUNDING_PRECISION + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native rounding mode */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_MODE +# define FPU_USE_X86_ROUNDING_MODE +#endif + +/* Optimized i386 fpu core must use native rounding precision */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_PRECISION +# define FPU_USE_X86_ROUNDING_PRECISION +#endif + +#if 0 // gb-- FIXME: that doesn't work +/* IEEE-based fpu core can have native rounding mode on i386 */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_MODE +# define FPU_USE_X86_ROUNDING_MODE +#endif + +/* IEEE-based fpu core can have native rounding precision on i386 */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_PRECISION +# define FPU_USE_X86_ROUNDING_PRECISION +#endif +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Sanity checks --- */ +/* -------------------------------------------------------------------------- */ + +/* X86 rounding mode and precision work together */ +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +# define FPU_USE_X86_ROUNDING +# define CW_INITIAL (CW_RESET|CW_X|CW_PC_EXTENDED|CW_RC_NEAR|CW_PM|CW_UM|CW_OM|CW_ZM|CW_DM|CW_IM) + PRIVATE uae_u32 x86_control_word; +#endif + +/* Control word -- rounding mode */ +#ifdef FPU_USE_X86_ROUNDING_MODE +PUBLIC const uae_u32 x86_control_word_rm_mac2host[]; +#endif + +/* Control word -- rounding precision */ +#ifdef FPU_USE_X86_ROUNDING_PRECISION +PUBLIC const uae_u32 x86_control_word_rp_mac2host[]; +#endif + +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +/* Set host control word for rounding mode and rounding precision */ +PRIVATE inline void set_host_control_word(void) +{ + /* + Exception enable byte is ignored, but the same value is returned + that was previously set. + */ + x86_control_word + = (x86_control_word & ~(X86_ROUNDING_MODE|X86_ROUNDING_PRECISION)) + | x86_control_word_rm_mac2host[(FPU fpcr.rounding_mode & FPCR_ROUNDING_MODE) >> 4] + | x86_control_word_rp_mac2host[(FPU fpcr.rounding_precision & FPCR_ROUNDING_PRECISION) >> 6] + ; + __asm__ __volatile__("fldcw %0" : : "m" (x86_control_word)); +} +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Generic rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) +/* Set host control word for rounding mode and rounding precision */ +PRIVATE inline void set_host_control_word(void) + { } +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) || defined(FPU_USE_X86_ROUNDING_MODE) + +/* Return the current rounding mode in m68k format */ +static inline uae_u32 FFPU get_rounding_mode(void) + { return FPU fpcr.rounding_mode; } + +/* Convert and set to native rounding mode */ +static inline void FFPU set_rounding_mode(uae_u32 new_rounding_mode) + { FPU fpcr.rounding_mode = new_rounding_mode; } + +#endif + +#if defined(FPU_USE_GENERIC_ROUNDING_PRECISION) || defined(FPU_USE_X86_ROUNDING_PRECISION) + +/* Return the current rounding precision in m68k format */ +static inline uae_u32 FFPU get_rounding_precision(void) + { return FPU fpcr.rounding_precision; } + +/* Convert and set to native rounding precision */ +static inline void FFPU set_rounding_precision(uae_u32 new_rounding_precision) + { FPU fpcr.rounding_precision = new_rounding_precision; } + +#endif + +#endif /* FPU_ROUNDING_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h new file mode 100644 index 000000000..afd3ab28a --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/types.h @@ -0,0 +1,181 @@ +/* + * fpu/types.h - basic types for fpu registers + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef FPU_TYPES_H +#define FPU_TYPES_H + +#include "sysdeps.h" + +/* Default behavior is *not* to use long doubles */ +#undef USE_LONG_DOUBLE +#undef USE_QUAD_DOUBLE + +/* -------------------------------------------------------------------------- */ +/* --- Original UAE fpu core --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_UAE) + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef double uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef long double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* Original UAE FPU registers are only 8 bytes long */ +typedef uae_f64 fpu_register; +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +/* -------------------------------------------------------------------------- */ +/* --- Optimized core for x86 --- */ +/* -------------------------------------------------------------------------- */ + +#elif defined(FPU_X86) + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef float uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* At least 10-byte floats are required */ +#if SIZEOF_LONG_DOUBLE >= 10 +typedef long double fpu_register; +#else +#error "No float type at least 10 bytes long, you lose." +#endif + +/* X86 FPU has a custom register type that maps to a native X86 register */ +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +/* -------------------------------------------------------------------------- */ +/* --- C99 implementation --- */ +/* -------------------------------------------------------------------------- */ + +#elif defined(FPU_IEEE) + +#if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT +#error "No IEEE float format, you lose." +#endif + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef double uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef long double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* 12-byte or 16-byte floats */ +#if SIZEOF_LONG_DOUBLE == 12 +typedef long double uae_f96; +typedef uae_f96 fpu_register; +#define USE_LONG_DOUBLE 1 +#elif SIZEOF_LONG_DOUBLE == 16 && (defined(CPU_i386) || defined(CPU_x86_64) || defined(CPU_ia64)) +/* Long doubles on x86-64 are really held in old x87 FPU stack. */ +typedef long double uae_f128; +typedef uae_f128 fpu_register; +#define USE_LONG_DOUBLE 1 +#elif 0 +/* Disable for now and probably for good as (i) the emulator + implementation is not correct, (ii) I don't know of any CPU which + handles this kind of format *natively* with conformance to IEEE. */ +typedef long double uae_f128; +typedef uae_f128 fpu_register; +#define USE_QUAD_DOUBLE 1 +#else +typedef uae_f64 fpu_register; +#endif + +/* We need all those floating-point types */ +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +#elif defined(FPU_MPFR) + +#include + +struct fpu_register { + mpfr_t f; + uae_u64 nan_bits; + int nan_sign; + operator long double (); + fpu_register &operator=(long double); +}; + +#endif + +union fpu_register_parts { + fpu_register val; + uae_u32 parts[sizeof(fpu_register) / 4]; +}; + +#endif /* FPU_TYPES_H */ diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 8e2502a36..8db740013 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -1,3 +1,27 @@ +/* + * gencpu.c - m68k emulation generator + * + * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * @@ -16,22 +40,24 @@ * Copyright 1995, 1996 Bernd Schmidt */ -#include -#include -#include -#include +#define CC_FOR_BUILD 1 #include "sysdeps.h" #include "readcpu.h" -#if defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) -#define SPARC_ASSEMBLY 0 -#endif +#include +#include +#include +#include +#include +#undef abort #define BOOL_TYPE "int" +#define VERIFY_MMU_GENAMODE 0 static FILE *headerfile; static FILE *stblfile; +static FILE *functblfile; static int using_prefetch; static int using_exception_3; @@ -47,6 +73,23 @@ static int *opcode_next_clev; static int *opcode_last_postfix; static unsigned long *counts; +#define GENA_GETV_NO_FETCH 0 +#define GENA_GETV_FETCH 1 +#define GENA_GETV_FETCH_ALIGN 2 +#define GENA_MOVEM_DO_INC 0 +#define GENA_MOVEM_NO_INC 1 +#define GENA_MOVEM_MOVE16 2 + +#define XLATE_LOG 0 +#define XLATE_PHYS 1 +#define XLATE_SFC 2 +#define XLATE_DFC 3 +static char * mem_prefix[4] = { "", "phys_", "sfc_", "dfc_" }; + +/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ +#define xBCD_KEEPS_N_FLAG 4 +#define xBCD_KEEPS_V_FLAG 3 + static void read_counts (void) { FILE *file; @@ -57,7 +100,8 @@ static void read_counts (void) file = fopen ("frequent.68k", "r"); if (file) { - fscanf (file, "Total: %lu\n", &total); + int c = fscanf (file, "Total: %lu\n", &total); + assert(c == 1); while (fscanf (file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { opcode_next_clev[nr] = 4; opcode_last_postfix[nr] = -1; @@ -88,7 +132,6 @@ static int need_endlabel; static int n_braces = 0; static int m68k_pc_offset = 0; -static int insn_n_cycles; static void start_brace (void) { @@ -141,9 +184,8 @@ static const char *gen_nextilong (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 4; - insn_n_cycles += 4; + m68k_pc_offset += 4; if (using_prefetch) sprintf (buffer, "get_ilong_prefetch(%d)", r); @@ -156,9 +198,8 @@ static const char *gen_nextiword (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 2; - insn_n_cycles += 2; + m68k_pc_offset += 2; if (using_prefetch) sprintf (buffer, "get_iword_prefetch(%d)", r); @@ -173,8 +214,6 @@ static const char *gen_nextibyte (void) int r = m68k_pc_offset; m68k_pc_offset += 2; - insn_n_cycles += 2; - if (using_prefetch) sprintf (buffer, "get_ibyte_prefetch(%d)", r); else @@ -196,9 +235,22 @@ static void fill_prefetch_2 (void) static void swap_opcode (void) { - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - printf ("\topcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF);\n"); - printf ("#endif\n"); + printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + printf ("\topcode = do_byteswap_16(opcode);\n"); + printf("#endif\n"); +} + +static void real_opcode (int *have) +{ + if (!*have) + { + printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + printf ("\tuae_u32 real_opcode = do_byteswap_16(opcode);\n"); + printf("#else\n"); + printf ("\tuae_u32 real_opcode = opcode;\n"); + printf("#endif\n"); + *have = 1; + } } static void sync_m68k_pc (void) @@ -220,32 +272,49 @@ static void sync_m68k_pc (void) m68k_pc_offset = 0; } +static void gen_set_fault_pc (void) +{ + sync_m68k_pc(); + printf ("regs.fault_pc = m68k_getpc ();\n"); + m68k_pc_offset = 0; +} + /* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, - * the calling routine handles Apdi and Aipi modes. */ -static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) + * the calling routine handles Apdi and Aipi modes. + * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ + +/* fixup indicates if we want to fix up adress registers in pre decrement + * or post increment mode now (0) or later (1). A value of 2 will then be + * used to do the actual fix up. This allows to do all memory readings + * before any register is modified, and so to rerun operation without + * side effect in case a bus fault is generated by any memory access. + * XJ - 2006/11/13 */ +static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag, int fixup) { + if (fixup != 2) + { start_brace (); switch (mode) { case Dreg: if (movem) abort (); - if (getv == 1) + if (getv == GENA_GETV_FETCH) switch (size) { case sz_byte: -#if defined(AMIGA) && !defined(WARPUP) + printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); /* sam: I don't know why gcc.2.7.2.1 produces a code worse */ /* if it is not done like that: */ printf ("\tuae_s8 %s = ((uae_u8*)&m68k_dreg(regs, %s))[3];\n", name, reg); -#else + printf("#else\n"); printf ("\tuae_s8 %s = m68k_dreg(regs, %s);\n", name, reg); -#endif + printf("#endif\n"); break; case sz_word: -#if defined(AMIGA) && !defined(WARPUP) + printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); printf ("\tuae_s16 %s = ((uae_s16*)&m68k_dreg(regs, %s))[1];\n", name, reg); -#else + printf("#else\n"); printf ("\tuae_s16 %s = m68k_dreg(regs, %s);\n", name, reg); -#endif + printf("#endif\n"); break; case sz_long: printf ("\tuae_s32 %s = m68k_dreg(regs, %s);\n", name, reg); @@ -257,7 +326,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge case Areg: if (movem) abort (); - if (getv == 1) + if (getv == GENA_GETV_FETCH) switch (size) { case sz_word: printf ("\tuae_s16 %s = m68k_areg(regs, %s);\n", name, reg); @@ -284,10 +353,16 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge printf ("\tuaecptr %sa = m68k_areg(regs, %s) - areg_byteinc[%s];\n", name, reg, reg); break; case sz_word: - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 2); + if (movem) + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + else + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 2;\n", name, reg); break; case sz_long: - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 4); + if (movem) + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + else + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 4;\n", name, reg); break; default: abort (); @@ -332,7 +407,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge printf ("\tuaecptr %sa = %s;\n", name, gen_nextilong ()); break; case imm: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); switch (size) { case sz_byte: @@ -349,22 +424,22 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge } return; case imm0: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s8 %s = %s;\n", name, gen_nextibyte ()); return; case imm1: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s16 %s = %s;\n", name, gen_nextiword ()); return; case imm2: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s32 %s = %s;\n", name, gen_nextilong ()); return; case immi: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_u32 %s = %s;\n", name, reg); return; @@ -375,7 +450,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge /* We get here for all non-reg non-immediate addressing modes to * actually fetch the value. */ - if (using_exception_3 && getv != 0 && size != sz_byte) { + if (using_exception_3 && getv != GENA_GETV_NO_FETCH && size != sz_byte) { printf ("\tif ((%sa & 1) != 0) {\n", name); printf ("\t\tlast_fault_for_exception_3 = %sa;\n", name); printf ("\t\tlast_op_for_exception_3 = opcode;\n"); @@ -387,20 +462,29 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge start_brace (); } - if (getv == 1) { + if (getv == GENA_GETV_FETCH) { switch (size) { - case sz_byte: insn_n_cycles += 2; break; - case sz_word: insn_n_cycles += 2; break; - case sz_long: insn_n_cycles += 4; break; + case sz_byte: break; + case sz_word: break; + case sz_long: break; default: abort (); } start_brace (); + printf("\n#ifdef FULLMMU\n"); + switch (size) { + case sz_byte: printf ("\tuae_s8 %s = %sget_byte(%sa);\n", name, mem_prefix[xlateflag], name); break; + case sz_word: printf ("\tuae_s16 %s = %sget_word(%sa);\n", name, mem_prefix[xlateflag], name); break; + case sz_long: printf ("\tuae_s32 %s = %sget_long(%sa);\n", name, mem_prefix[xlateflag], name); break; + default: abort (); + } + printf("#else\n"); switch (size) { - case sz_byte: printf ("\tuae_s8 %s = get_byte(%sa);\n", name, name); break; - case sz_word: printf ("\tuae_s16 %s = get_word(%sa);\n", name, name); break; - case sz_long: printf ("\tuae_s32 %s = get_long(%sa);\n", name, name); break; + case sz_byte: printf ("\tuae_s8 %s = phys_get_byte(%sa);\n", name, name); break; + case sz_word: printf ("\tuae_s16 %s = phys_get_word(%sa);\n", name, name); break; + case sz_long: printf ("\tuae_s32 %s = phys_get_long(%sa);\n", name, name); break; default: abort (); } + printf("#endif\n"); } /* We now might have to fix up the register for pre-dec or post-inc @@ -408,6 +492,12 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge if (!movem) switch (mode) { case Aipi: + if (fixup == 1) + { + printf ("\tfixup.flag = 1;\n"); + printf ("\tfixup.reg = %s;\n", reg); + printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); + } switch (size) { case sz_byte: printf ("\tm68k_areg(regs, %s) += areg_byteinc[%s];\n", reg, reg); @@ -423,14 +513,39 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge } break; case Apdi: + if (fixup == 1) + { + printf ("\tfixup.flag = 1;\n"); + printf ("\tfixup.reg = %s;\n", reg); + printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); + } printf ("\tm68k_areg (regs, %s) = %sa;\n", reg, name); break; default: break; } + + } + else /* (fixup != 2) */ + { + if (!movem) + switch (mode) { + case Aipi: + case Apdi: + printf ("\tfixup.flag = 0;\n"); + break; + default: + break; + } + } } -static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) +static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag) +{ + genamode2 (mode, reg, size, name, getv, movem, xlateflag, 0); +} + +static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to, int xlateflag) { switch (mode) { case Dreg: @@ -470,28 +585,32 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char case absl: case PC16: case PC8r: - if (using_prefetch) - sync_m68k_pc (); + gen_set_fault_pc (); + printf("#ifdef FULLMMU\n"); switch (size) { case sz_byte: - insn_n_cycles += 2; + printf ("\t%sput_byte(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_byte(%sa,%s);\n", to, from); break; case sz_word: - insn_n_cycles += 2; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); + printf ("\t%sput_word(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_word(%sa,%s);\n", to, from); break; case sz_long: - insn_n_cycles += 4; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); + printf ("\t%sput_long(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_long(%sa,%s);\n", to, from); break; default: abort (); } + printf("#endif\n"); break; case imm: case imm0: @@ -507,23 +626,33 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char static void genmovemel (uae_u16 opcode) { - char getcode[100]; + char getcode1[100]; + char getcode2[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; - + if (table68k[opcode].size == sz_long) { - strcpy (getcode, "get_long(srca)"); + strcpy (getcode1, ""); + strcpy (getcode2, "get_long(srca)"); } else { - strcpy (getcode, "(uae_s32)(uae_s16)get_word(srca)"); + strcpy (getcode1, "(uae_s32)(uae_s16)"); + strcpy (getcode2, "get_word(srca)"); } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); printf ("\tunsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); start_brace (); - printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s; srca += %d; dmask = movem_next[dmask]; }\n", - getcode, size); - printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s; srca += %d; amask = movem_next[amask]; }\n", - getcode, size); + printf("\n#ifdef FULLMMU\n"); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s%s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode1, getcode2, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s%s; srca += %d; amask = movem_next[amask]; }\n", + getcode1, getcode2, size); + printf("#else\n"); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %sphys_%s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode1, getcode2, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %sphys_%s; srca += %d; amask = movem_next[amask]; }\n", + getcode1, getcode2, size); + printf("#endif\n"); if (table68k[opcode].dmode == Aipi) printf ("\tm68k_areg(regs, dstreg) = srca;\n"); @@ -533,6 +662,7 @@ static void genmovemle (uae_u16 opcode) { char putcode[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; + if (table68k[opcode].size == sz_long) { strcpy (putcode, "put_long(srca,"); } else { @@ -540,24 +670,38 @@ static void genmovemle (uae_u16 opcode) } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); - if (using_prefetch) - sync_m68k_pc (); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", + GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); + sync_m68k_pc (); start_brace (); if (table68k[opcode].dmode == Apdi) { printf ("\tuae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;\n"); + printf("#ifdef FULLMMU\n"); printf ("\twhile (amask) { srca -= %d; %s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", size, putcode); printf ("\twhile (dmask) { srca -= %d; %s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", size, putcode); + printf("#else\n"); + printf ("\twhile (amask) { srca -= %d; phys_%s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", + size, putcode); + printf ("\twhile (dmask) { srca -= %d; phys_%s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", + size, putcode); + printf("#endif\n"); printf ("\tm68k_areg(regs, dstreg) = srca;\n"); } else { printf ("\tuae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); + printf("#ifdef FULLMMU\n"); printf ("\twhile (dmask) { %s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", putcode, size); printf ("\twhile (amask) { %s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", putcode, size); + printf("#else\n"); + printf ("\twhile (dmask) { phys_%s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", + putcode, size); + printf ("\twhile (amask) { phys_%s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", + putcode, size); + printf("#endif\n"); } } @@ -567,7 +711,7 @@ static void duplicate_carry (void) } typedef enum { - flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, flag_addx, flag_subx, flag_zn, + flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, flag_addx, flag_subx, flag_z, flag_zn, flag_av, flag_sv } flagtypes; @@ -621,6 +765,7 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * switch (type) { case flag_logical_noclobber: case flag_logical: + case flag_z: case flag_zn: case flag_av: case flag_sv: @@ -629,12 +774,10 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * break; case flag_add: - start_brace (); printf ("uae_u32 %s = %s + %s;\n", value, dstr, sstr); break; case flag_sub: case flag_cmp: - start_brace (); printf ("uae_u32 %s = %s - %s;\n", value, dstr, sstr); break; } @@ -642,6 +785,7 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * switch (type) { case flag_logical_noclobber: case flag_logical: + case flag_z: case flag_zn: break; @@ -652,7 +796,6 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * case flag_cmp: case flag_av: case flag_sv: - start_brace (); printf ("\t" BOOL_TYPE " flgs = %s < 0;\n", sstr); printf ("\t" BOOL_TYPE " flgo = %s < 0;\n", dstr); printf ("\t" BOOL_TYPE " flgn = %s < 0;\n", vstr); @@ -675,6 +818,9 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * case flag_sv: printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); break; + case flag_z: + printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); + break; case flag_zn: printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); printf ("\tSET_NFLG (%s < 0);\n", vstr); @@ -714,163 +860,18 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * static void genflags (flagtypes type, wordsizes size, char *value, char *src, char *dst) { -#ifdef SPARC_V8_ASSEMBLY - switch(type) - { - case flag_add: - start_brace(); - printf("\tuae_u32 %s;\n", value); - switch(size) - { - case sz_byte: - printf("\t%s = sparc_v8_flag_add_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_word: - printf("\t%s = sparc_v8_flag_add_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_long: - printf("\t%s = sparc_v8_flag_add_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - } - return; - - case flag_sub: - start_brace(); - printf("\tuae_u32 %s;\n", value); - switch(size) - { - case sz_byte: - printf("\t%s = sparc_v8_flag_sub_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_word: - printf("\t%s = sparc_v8_flag_sub_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_long: - printf("\t%s = sparc_v8_flag_sub_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - } - return; - - case flag_cmp: - switch(size) - { - case sz_byte: -// printf("\tsparc_v8_flag_cmp_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - break; - case sz_word: -// printf("\tsparc_v8_flag_cmp_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - break; - case sz_long: -#if 1 - printf("\tsparc_v8_flag_cmp_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - return; -#endif - break; - } -// return; - break; - } -#elif defined(SPARC_V9_ASSEMBLY) - switch(type) - { - case flag_add: - start_brace(); - printf("\tuae_u32 %s;\n", value); - switch(size) - { - case sz_byte: - printf("\t%s = sparc_v9_flag_add_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_word: - printf("\t%s = sparc_v9_flag_add_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_long: - printf("\t%s = sparc_v9_flag_add_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - } - return; - - case flag_sub: - start_brace(); - printf("\tuae_u32 %s;\n", value); - switch(size) - { - case sz_byte: - printf("\t%s = sparc_v9_flag_sub_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_word: - printf("\t%s = sparc_v9_flag_sub_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - case sz_long: - printf("\t%s = sparc_v9_flag_sub_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", value, src, dst); - break; - } - return; - - case flag_cmp: - switch(size) - { - case sz_byte: - printf("\tsparc_v9_flag_cmp_8(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - break; - case sz_word: - printf("\tsparc_v9_flag_cmp_16(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - break; - case sz_long: - printf("\tsparc_v9_flag_cmp_32(®flags, (uae_u32)(%s), (uae_u32)(%s));\n", src, dst); - break; - } - return; - - case flag_logical: - if (strcmp(value, "0") == 0) { - printf("\tregflags.nzvc = 0x04;\n"); - } else { - switch(size) { - case sz_byte: - printf("\tsparc_v9_flag_test_8(®flags, (uae_u32)(%s));\n", value); - break; - case sz_word: - printf("\tsparc_v9_flag_test_16(®flags, (uae_u32)(%s));\n", value); - break; - case sz_long: - printf("\tsparc_v9_flag_test_32(®flags, (uae_u32)(%s));\n", value); - break; - } - } - return; - -#if 0 - case flag_logical_noclobber: - printf("\t{uae_u32 old_flags = regflags.nzvc & ~0x0C;\n"); - if (strcmp(value, "0") == 0) { - printf("\tregflags.nzvc = old_flags | 0x04;\n"); - } else { - switch(size) { - case sz_byte: - printf("\tsparc_v9_flag_test_8(®flags, (uae_u32)(%s));\n", value); - break; - case sz_word: - printf("\tsparc_v9_flag_test_16(®flags, (uae_u32)(%s));\n", value); - break; - case sz_long: - printf("\tsparc_v9_flag_test_32(®flags, (uae_u32)(%s));\n", value); - break; - } - printf("\tregflags.nzvc |= old_flags;\n"); - } - printf("\t}\n"); - return; -#endif - } -#elif defined(X86_ASSEMBLY) + /* Temporarily deleted 68k/ARM flag optimizations. I'd prefer to have + them in the appropriate m68k.h files and use just one copy of this + code here. The API can be changed if necessary. */ + int done = 0; + + start_brace (); + printf("\n#ifdef OPTIMIZED_FLAGS\n"); switch (type) { case flag_add: case flag_sub: - start_brace (); printf ("\tuae_u32 %s;\n", value); break; - default: break; } @@ -878,233 +879,71 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch /* At least some of those casts are fairly important! */ switch (type) { case flag_logical_noclobber: - printf ("\t{uae_u32 oldcznv = regflags.cznv & ~0xC0;\n"); + printf ("\t{uae_u32 oldcznv = GET_CZNV & ~(FLAGVAL_Z | FLAGVAL_N);\n"); if (strcmp (value, "0") == 0) { - printf ("\tregflags.cznv = olcznv | 64;\n"); + printf ("\tSET_CZNV (olcznv | FLAGVAL_Z);\n"); } else { switch (size) { - case sz_byte: printf ("\tx86_flag_testb ((uae_s8)(%s));\n", value); break; - case sz_word: printf ("\tx86_flag_testw ((uae_s16)(%s));\n", value); break; - case sz_long: printf ("\tx86_flag_testl ((uae_s32)(%s));\n", value); break; + case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; } - printf ("\tregflags.cznv |= oldcznv;\n"); + printf ("\tIOR_CZNV (oldcznv);\n"); } printf ("\t}\n"); - return; + done = 1; + break; + case flag_logical: if (strcmp (value, "0") == 0) { - printf ("\tregflags.cznv = 64;\n"); + printf ("\tSET_CZNV (FLAGVAL_Z);\n"); } else { switch (size) { - case sz_byte: printf ("\tx86_flag_testb ((uae_s8)(%s));\n", value); break; - case sz_word: printf ("\tx86_flag_testw ((uae_s16)(%s));\n", value); break; - case sz_long: printf ("\tx86_flag_testl ((uae_s32)(%s));\n", value); break; + case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; } } - return; + done = 1; + break; case flag_add: switch (size) { - case sz_byte: printf ("\tx86_flag_addb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; - case sz_word: printf ("\tx86_flag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; - case sz_long: printf ("\tx86_flag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + case sz_byte: printf ("\toptflag_addb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\toptflag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\toptflag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - return; + done = 1; + break; case flag_sub: switch (size) { - case sz_byte: printf ("\tx86_flag_subb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; - case sz_word: printf ("\tx86_flag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; - case sz_long: printf ("\tx86_flag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + case sz_byte: printf ("\toptflag_subb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\toptflag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\toptflag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - return; + done = 1; + break; case flag_cmp: switch (size) { - case sz_byte: printf ("\tx86_flag_cmpb ((uae_s8)(%s), (uae_s8)(%s));\n", src, dst); break; - case sz_word: printf ("\tx86_flag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; - case sz_long: printf ("\tx86_flag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; + case sz_byte: printf ("\toptflag_cmpb ((uae_s8)(%s), (uae_s8)(%s));\n", src, dst); break; + case sz_word: printf ("\toptflag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; + case sz_long: printf ("\toptflag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; } - return; - - default: + done = 1; break; - } -#elif defined(M68K_FLAG_OPT) - /* sam: here I'm cloning what X86_ASSEMBLY does */ -#define EXT(size) (size==sz_byte?"b":(size==sz_word?"w":"l")) -#define CAST(size) (size==sz_byte?"uae_s8":(size==sz_word?"uae_s16":"uae_s32")) - switch (type) { - case flag_add: - case flag_sub: - start_brace (); - printf ("\tuae_u32 %s;\n", value); - break; - - default: - break; - } - - switch (type) { - case flag_logical: - if (strcmp (value, "0") == 0) { - printf ("\t*(uae_u16 *)®flags = 4;\n"); /* Z = 1 */ - } else { - printf ("\tm68k_flag_tst (%s, (%s)(%s));\n", - EXT (size), CAST (size), value); - } - return; - - case flag_add: - printf ("\t{uae_u16 ccr;\n"); - printf ("\tm68k_flag_add (%s, (%s)%s, (%s)(%s), (%s)(%s));\n", - EXT (size), CAST (size), value, CAST (size), src, CAST (size), dst); - printf ("\t((uae_u16*)®flags)[1]=((uae_u16*)®flags)[0]=ccr;}\n"); - return; - - case flag_sub: - printf ("\t{uae_u16 ccr;\n"); - printf ("\tm68k_flag_sub (%s, (%s)%s, (%s)(%s), (%s)(%s));\n", - EXT (size), CAST (size), value, CAST (size), src, CAST (size), dst); - printf ("\t((uae_u16*)®flags)[1]=((uae_u16*)®flags)[0]=ccr;}\n"); - return; - - case flag_cmp: - printf ("\tm68k_flag_cmp (%s, (%s)(%s), (%s)(%s));\n", - EXT (size), CAST (size), src, CAST (size), dst); - return; - + default: break; } -#elif defined(ACORN_FLAG_OPT) && defined(__GNUC_MINOR__) -/* - * This is new. Might be quite buggy. - */ - switch (type) { - case flag_av: - case flag_sv: - case flag_zn: - case flag_addx: - case flag_subx: - break; - - case flag_logical: - if (strcmp (value, "0") == 0) { - /* v=c=n=0 z=1 */ - printf ("\t*(ULONG*)®flags = 0x40000000;\n"); - return; - } else { - start_brace (); - switch (size) { - case sz_byte: - printf ("\tUBYTE ccr;\n"); - printf ("\tULONG shift;\n"); - printf ("\t__asm__(\"mov %%2,%%1,lsl#24\n\ttst %%2,%%2\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" - "\t: \"=r\" (ccr) : \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - return; - case sz_word: - printf ("\tUBYTE ccr;\n"); - printf ("\tULONG shift;\n"); - printf ("\t__asm__(\"mov %%2,%%1,lsl#16\n\ttst %%2,%%2\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" - "\t: \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - return; - case sz_long: - printf ("\tUBYTE ccr;\n"); - printf ("\t__asm__(\"tst %%1,%%1\n\tmov %%0,r15,lsr#24\n\tbic %%0,%%0,#0x30\"\n" - "\t: \"=r\" (ccr) : \"r\" ((LONG)%s) : \"cc\" );\n", value); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - return; - } - } - break; - case flag_add: - if (strcmp (dst, "0") == 0) { - printf ("/* Error! Hier muss Peter noch was machen !!! (ADD-Flags) */"); - } else { - start_brace (); - switch (size) { - case sz_byte: - printf ("\tULONG ccr, shift, %s;\n", value); - printf ("\t__asm__(\"mov %%4,%%3,lsl#24\n\tadds %%0,%%4,%%2,lsl#24\n\tmov %%0,%%0,asr#24\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - case sz_word: - printf ("\tULONG ccr, shift, %s;\n", value); - printf ("\t__asm__(\"mov %%4,%%3,lsl#16\n\tadds %%0,%%4,%%2,lsl#16\n\tmov %%0,%%0,asr#16\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - case sz_long: - printf ("\tULONG ccr, %s;\n", value); - printf ("\t__asm__(\"adds %%0,%%3,%%2\n\tmov %%1,r15\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - } - } - break; - case flag_sub: - if (strcmp (dst, "0") == 0) { - printf ("/* Error! Hier muss Peter noch was machen !!! (SUB-Flags) */"); - } else { - start_brace (); - switch (size) { - case sz_byte: - printf ("\tULONG ccr, shift, %s;\n", value); - printf ("\t__asm__(\"mov %%4,%%3,lsl#24\n\tsubs %%0,%%4,%%2,lsl#24\n\tmov %%0,%%0,asr#24\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - case sz_word: - printf ("\tULONG ccr, shift, %s;\n", value); - printf ("\t__asm__(\"mov %%4,%%3,lsl#16\n\tsubs %%0,%%4,%%2,lsl#16\n\tmov %%0,%%0,asr#16\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - case sz_long: - printf ("\tULONG ccr, %s;\n", value); - printf ("\t__asm__(\"subs %%0,%%3,%%2\n\tmov %%1,r15\n\teor %%1,%%1,#0x20000000\n\torr %%1,%%1,%%1,lsr#29\"\n" - "\t: \"=r\" (%s), \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", value, src, dst); - printf ("\t*(ULONG*)®flags = ccr;\n"); - return; - } - } - break; - case flag_cmp: - if (strcmp (dst, "0") == 0) { - printf ("/*Error! Hier muss Peter noch was machen !!! (CMP-Flags)*/"); - } else { - start_brace (); - switch (size) { - case sz_byte: - printf ("\tULONG shift, ccr;\n"); - printf ("\t__asm__(\"mov %%3,%%2,lsl#24\n\tcmp %%3,%%1,lsl#24\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" - "\t: \"=r\" (ccr) : \"r\" (%s), \"r\" (%s), \"r\" (shift) : \"cc\" );\n", src, dst); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - return; - case sz_word: - printf ("\tULONG shift, ccr;\n"); - printf ("\t__asm__(\"mov %%3,%%2,lsl#16\n\tcmp %%3,%%1,lsl#16\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" - "\t: \"=r\" (ccr) : \"r\" ((WORD)%s), \"r\" ((WORD)%s), \"r\" (shift) : \"cc\" );\n", src, dst); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - return; - case sz_long: - printf ("\tULONG ccr;\n"); - printf ("\t__asm__(\"cmp %%2,%%1\n\tmov %%0,r15,lsr#24\n\teor %%0,%%0,#0x20\"\n" - "\t: \"=r\" (ccr) : \"r\" ((LONG)%s), \"r\" ((LONG)%s) : \"cc\" );\n", src, dst); - printf ("\t*((UBYTE*)®flags+3) = ccr;\n"); - /*printf ("\tprintf (\"%%08x %%08x %%08x\\n\", %s, %s, *((ULONG*)®flags));\n", src, dst); */ - return; - } - } - break; - } -#endif + if (done) + printf("#else\n"); + else + printf("#endif\n"); genflags_normal (type, size, value, src, dst); + if (done) + printf("#endif\n"); } static void force_range_for_rox (const char *var, wordsizes size) @@ -1132,7 +971,7 @@ static const char *cmask (wordsizes size) case sz_byte: return "0x80"; case sz_word: return "0x8000"; case sz_long: return "0x80000000"; - default: abort (); + default: abort (); return NULL; } } @@ -1144,11 +983,10 @@ static int source_is_imm1_8 (struct instr *i) static void gen_opcode (unsigned long int opcode) { struct instr *curi = table68k + opcode; - insn_n_cycles = 2; start_brace (); #if 0 - printf ("uae_u8 *m68k_pc = regs.pc_p;\n"); + printf ("uae_u8 *m68k_pc = m68k_getpc();\n"); #endif m68k_pc_offset = 2; switch (curi->plev) { @@ -1178,16 +1016,16 @@ static void gen_opcode (unsigned long int opcode) case i_OR: case i_AND: case i_EOR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tsrc %c= dst;\n", curi->mnemo == i_OR ? '|' : curi->mnemo == i_AND ? '&' : '^'); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ORSR: case i_EORSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) { printf ("\tsrc &= 0xFF;\n"); } @@ -1196,7 +1034,7 @@ static void gen_opcode (unsigned long int opcode) break; case i_ANDSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) { printf ("\tsrc |= 0xFF00;\n"); } @@ -1204,134 +1042,177 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SUB: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_sub, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_SUBA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = dst - src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_SUBX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); printf ("\tuae_u32 newv = dst - src - (GET_XFLG ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_SBCD: - /* Let's hope this works... */ - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); - printf ("\tuae_u16 newv;\n"); - printf ("\tint cflg;\n"); - printf ("\tif (newv_lo > 9) { newv_lo-=6; newv_hi-=0x10; }\n"); - printf ("\tnewv = newv_hi + (newv_lo & 0xF);"); - printf ("\tSET_CFLG (cflg = (newv_hi & 0x1F0) > 0x90);\n"); + printf ("\tuae_u16 newv, tmp_newv;\n"); + printf ("\tint bcd = 0;\n"); + printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); + printf ("\tif (newv_lo & 0xF0) { newv -= 6; bcd = 6; };\n"); + printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); + printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF);\n"); duplicate_carry (); - printf ("\tif (cflg) newv -= 0x60;\n"); - genflags (flag_zn, curi->size, "newv", "", ""); - genflags (flag_sv, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); + } + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + } + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ADD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_add, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ADDA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = dst + src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_ADDX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); printf ("\tuae_u32 newv = dst + src + (GET_XFLG ? 1 : 0);\n"); genflags (flag_addx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ABCD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); - printf ("\tuae_u16 newv;\n"); + printf ("\tuae_u16 newv, tmp_newv;\n"); printf ("\tint cflg;\n"); - printf ("\tif (newv_lo > 9) { newv_lo +=6; }\n"); - printf ("\tnewv = newv_hi + newv_lo;"); - printf ("\tSET_CFLG (cflg = (newv & 0x1F0) > 0x90);\n"); - duplicate_carry (); + printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); + printf ("\tif (newv_lo > 9) { newv += 6; }\n"); + printf ("\tcflg = (newv & 0x3F0) > 0x90;\n"); printf ("\tif (cflg) newv += 0x60;\n"); - genflags (flag_zn, curi->size, "newv", "", ""); - genflags (flag_sv, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + printf ("\tSET_CFLG (cflg);\n"); + duplicate_carry (); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); + } + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); + } + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_NEG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_sub, curi->size, "dst", "src", "0"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NEGX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "0"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NBCD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); printf ("\tuae_u16 newv;\n"); - printf ("\tint cflg;\n"); - printf ("\tif (newv_lo > 9) { newv_lo-=6; newv_hi-=0x10; }\n"); - printf ("\tnewv = newv_hi + (newv_lo & 0xF);"); - printf ("\tSET_CFLG (cflg = (newv_hi & 0x1F0) > 0x90);\n"); - duplicate_carry(); + printf ("\tint cflg, tmp_newv;\n"); + printf ("\ttmp_newv = newv_hi + newv_lo;\n"); + printf ("\tif (newv_lo > 9) { newv_lo -= 6; }\n"); + printf ("\tnewv = newv_hi + newv_lo;\n"); + printf ("\tcflg = (newv & 0x1F0) > 0x90;\n"); printf ("\tif (cflg) newv -= 0x60;\n"); - genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + printf ("\tSET_CFLG (cflg);\n"); + duplicate_carry(); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); + } + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + } + genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_CLR: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "0", "", ""); - genastore ("0", curi->smode, "srcreg", curi->size, "src"); + genastore ("0", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NOT: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 dst = ~src;\n"); genflags (flag_logical, curi->size, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_TST: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "src", "", ""); break; case i_BTST: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else @@ -1339,55 +1220,55 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); break; case i_BCHG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tdst ^= (1 << src);\n"); - printf ("\tSET_ZFLG ((dst & (1 << src)) >> src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + printf ("\tSET_ZFLG (((uae_u32)dst & (1 << src)) >> src);\n"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_BCLR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst &= ~(1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_BSET: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst |= (1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_CMPM: case i_CMP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_cmp, curi->size, "newv", "src", "dst"); break; case i_CMPA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_cmp, sz_long, "newv", "src", "dst"); break; /* The next two are coded a little unconventional, but they are doing * weird things... */ case i_MVPRM: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tuaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); if (curi->size == sz_word) { @@ -1399,41 +1280,45 @@ static void gen_opcode (unsigned long int opcode) break; case i_MVPMR: printf ("\tuaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_word) { - printf ("\tuae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2);\n"); + printf ("\tuae_u16 val = get_byte(memp) << 8;\n"); + printf ("\t val |= get_byte(memp + 2);\n"); } else { - printf ("\tuae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16)\n"); - printf (" + (get_byte(memp + 4) << 8) + get_byte(memp + 6);\n"); + printf ("\tuae_u32 val = get_byte(memp) << 24;\n"); + printf ("\t val |= get_byte(memp + 2) << 16;\n"); + printf ("\t val |= get_byte(memp + 4) << 8;\n"); + printf ("\t val |= get_byte(memp + 6);\n"); } - genastore ("val", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("val", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_MOVE: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_MOVEA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_word) { printf ("\tuae_u32 val = (uae_s32)(uae_s16)src;\n"); } else { printf ("\tuae_u32 val = src;\n"); } - genastore ("val", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("val", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_MVSR2: - genamode (curi->smode, "srcreg", sz_word, "src", 2, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tMakeSR();\n"); if (curi->size == sz_byte) - genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src"); + genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); else - genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src"); + genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); break; case i_MV2SR: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tMakeSR();\n\tregs.sr &= 0xFF00;\n\tregs.sr |= src & 0xFF;\n"); else { @@ -1442,31 +1327,31 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SWAP: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16);\n"); genflags (flag_logical, sz_long, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", sz_long, "src"); + genastore ("dst", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); break; case i_EXG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_EXT: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { - case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; - case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; - default: abort (); + case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; + case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; + default: abort (); } genflags (flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); genastore ("dst", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src"); + curi->size == sz_word ? sz_word : sz_long, "src", XLATE_LOG); break; case i_MVMEL: genmovemel (opcode); @@ -1475,33 +1360,51 @@ static void gen_opcode (unsigned long int opcode) genmovemle (opcode); break; case i_TRAP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - sync_m68k_pc (); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + gen_set_fault_pc (); printf ("\tException(src+32,0);\n"); - m68k_pc_offset = 0; break; case i_MVR2USP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tregs.usp = src;\n"); break; case i_MVUSP2R: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); - genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_RESET: + printf ("\tAtariReset();\n"); break; case i_NOP: break; case i_STOP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tregs.sr = src;\n"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + /* + * STOP undocumented features: + * if SR is not set: + * 68000 (68010?): Update SR, increase PC and then cause privilege violation exception (handled in newcpu) + * 68000 (68010?): Traced STOP also runs 4 cycles faster. + * 68020 68030: STOP works normally + * 68040 68060: Immediate privilege violation exception + */ + printf ("\tuae_u16 sr = src;\n"); + if (cpu_level >= 4) { + printf("\tif (!(sr & 0x2000)) {\n"); + printf ("m68k_incpc(%d);\n", m68k_pc_offset); + printf("\t\tException(8,0); goto %s;\n", endlabelstr); + printf("\t}\n"); + } + printf("\tregs.sr = sr;\n"); printf ("\tMakeFromSR();\n"); printf ("\tm68k_setstopped(1);\n"); + sync_m68k_pc (); + /* STOP does not prefetch anything */ + /* did_prefetch = -1; */ break; case i_RTE: if (cpu_level == 0) { - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tregs.sr = sr; m68k_setpc_rte(pc);\n"); fill_prefetch_0 (); printf ("\tMakeFromSR();\n"); @@ -1510,14 +1413,14 @@ static void gen_opcode (unsigned long int opcode) if (next_cpu_level < 0) next_cpu_level = 0; printf ("\tuae_u16 newsr; uae_u32 newpc; for (;;) {\n"); - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); - genamode (Aipi, "7", sz_word, "format", 1, 0); + genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_word, "format", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tnewsr = sr; newpc = pc;\n"); printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); +// printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; }\n"); @@ -1535,8 +1438,8 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_RTD: - genamode (Aipi, "7", sz_long, "pc", 1, 0); - genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tm68k_areg(regs, 7) += offs;\n"); printf ("\tm68k_setpc_rte(pc);\n"); fill_prefetch_0 (); @@ -1544,18 +1447,18 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_LINK: - genamode (Apdi, "7", sz_long, "old", 2, 0); - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - genastore ("src", Apdi, "7", sz_long, "old"); - genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src"); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Apdi, "7", sz_long, "old", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); printf ("\tm68k_areg(regs, 7) += offs;\n"); + genastore ("src", Apdi, "7", sz_long, "old", XLATE_LOG); break; case i_UNLK: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tm68k_areg(regs, 7) = src;\n"); - genamode (Aipi, "7", sz_long, "old", 1, 0); - genastore ("old", curi->smode, "srcreg", curi->size, "src"); + genamode (Aipi, "7", sz_long, "old", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("old", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_RTS: printf ("\tm68k_do_rts();\n"); @@ -1563,14 +1466,16 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_TRAPV: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); sync_m68k_pc (); - printf ("\tif (GET_VFLG) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); + printf ("\tif (GET_VFLG) { Exception(7,oldpc); goto %s; }\n", endlabelstr); need_endlabel = 1; break; case i_RTR: printf ("\tMakeSR();\n"); - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); printf ("\tregs.sr &= 0xFF00; sr &= 0xFF;\n"); printf ("\tregs.sr |= sr; m68k_setpc(pc);\n"); fill_prefetch_0 (); @@ -1578,19 +1483,19 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_JSR: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tm68k_do_jsr(m68k_getpc() + %d, srca);\n", m68k_pc_offset); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_JMP: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tm68k_setpc(srca);\n"); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_BSR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tuae_s32 s = (uae_s32)src + 2;\n"); if (using_exception_3) { printf ("\tif (src & 1) {\n"); @@ -1618,8 +1523,8 @@ static void gen_opcode (unsigned long int opcode) next_cpu_level = 1; } } - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tif (!cctrue(%d)) goto didnt_jump;\n", curi->cc); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); + printf ("\tif (!cctrue(%d)) goto didnt_jump_%lx;\n", curi->cc, opcode); if (using_exception_3) { printf ("\tif (src & 1) {\n"); printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); @@ -1630,26 +1535,26 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tm68k_incpc ((uae_s32)src + 2);\n"); fill_prefetch_0 (); - printf ("\tgoto %s;\n", endlabelstr); - printf ("didnt_jump:;\n"); + printf ("return;\n"); + printf ("didnt_jump_%lx:;\n", opcode); need_endlabel = 1; break; case i_LEA: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_PEA: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (Apdi, "7", sz_long, "dst", 2, 0); - genastore ("srca", Apdi, "7", sz_long, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Apdi, "7", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("srca", Apdi, "7", sz_long, "dst", XLATE_LOG); break; case i_DBcc: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tif (!cctrue(%d)) {\n", curi->cc); - genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src"); + genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); printf ("\t\tif (src) {\n"); if (using_exception_3) { @@ -1662,22 +1567,25 @@ static void gen_opcode (unsigned long int opcode) } printf ("\t\t\tm68k_incpc((uae_s32)offs + 2);\n"); fill_prefetch_0 (); - printf ("\t\tgoto %s;\n", endlabelstr); + printf ("return;\n"); printf ("\t\t}\n"); printf ("\t}\n"); need_endlabel = 1; break; case i_Scc: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint val = cctrue(%d) ? 0xff : 0;\n", curi->cc); - genastore ("val", curi->smode, "srcreg", curi->size, "src"); + genastore ("val", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_DIVU: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - printf ("\tif(src == 0) { Exception(5,oldpc); goto %s; } else {\n", endlabelstr); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + sync_m68k_pc (); + /* Clear V flag when dividing by zero - Alcatraz Odyssey demo depends + * on this (actually, it's doing a DIVS). */ + printf ("\tif (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;\n"); printf ("\tuae_u32 rem = (uae_u32)dst %% (uae_u32)(uae_u16)src;\n"); /* The N flag appears to be set each time there is an overflow. @@ -1685,51 +1593,48 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); printf ("\t}\n"); printf ("\t}\n"); - insn_n_cycles += 68; need_endlabel = 1; break; case i_DIVS: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); - printf ("\tif(src == 0) { Exception(5,oldpc); goto %s; } else {\n", endlabelstr); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + sync_m68k_pc (); + printf ("\tif (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;\n"); printf ("\tuae_u16 rem = (uae_s32)dst %% (uae_s32)(uae_s16)src;\n"); printf ("\tif ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); printf ("\tif (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); printf ("\t}\n"); printf ("\t}\n"); - insn_n_cycles += 72; need_endlabel = 1; break; case i_MULU: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); - insn_n_cycles += 32; + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_MULS: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); - insn_n_cycles += 32; + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_CHK: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tif ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto %s; }\n", endlabelstr); printf ("\telse if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto %s; }\n", endlabelstr); need_endlabel = 1; @@ -1737,8 +1642,8 @@ static void gen_opcode (unsigned long int opcode) case i_CHK2: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\t{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];\n"); switch (curi->size) { case sz_byte: @@ -1756,14 +1661,14 @@ static void gen_opcode (unsigned long int opcode) abort (); } printf ("\tSET_ZFLG (upper == reg || lower == reg);\n"); - printf ("\tSET_CFLG (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); + printf ("\tSET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); printf ("\tif ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); need_endlabel = 1; break; case i_ASR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1792,11 +1697,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ASL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1828,11 +1733,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_LSR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1857,11 +1762,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval >>= 1;\n"); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_LSL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1887,11 +1792,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1914,11 +1819,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG (val & 1);\n"); printf ("}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1941,11 +1846,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROXL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1955,12 +1860,12 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); - if (! source_is_imm1_8 (curi)) - force_range_for_rox ("cnt", curi->size); if (source_is_imm1_8 (curi)) printf ("{"); - else + else { + force_range_for_rox ("cnt", curi->size); printf ("\tif (cnt > 0) {\n"); + } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 loval = val >> (%d - cnt);\n", bit_size (curi->size) - 1); @@ -1971,11 +1876,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t} }\n"); printf ("\tSET_CFLG (GET_XFLG);\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROXR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1985,12 +1890,12 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); - if (! source_is_imm1_8 (curi)) - force_range_for_rox ("cnt", curi->size); if (source_is_imm1_8 (curi)) printf ("{"); - else + else { + force_range_for_rox ("cnt", curi->size); printf ("\tif (cnt > 0) {\n"); + } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 hival = (val << 1) | GET_XFLG;\n"); @@ -2004,10 +1909,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\t} }\n"); printf ("\tSET_CFLG (GET_XFLG);\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ASRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -2021,10 +1926,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ASLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -2041,10 +1946,10 @@ static void gen_opcode (unsigned long int opcode) duplicate_carry (); printf ("\tSET_VFLG (GET_VFLG | (sign2 != sign));\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_LSRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -2057,10 +1962,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_LSLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2073,10 +1978,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2089,10 +1994,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= 1;\n"); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_RORW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2105,10 +2010,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= %s;\n", cmask (curi->size)); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROXLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2122,10 +2027,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROXRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2139,103 +2044,129 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_MOVEC2: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tm68k_movec2(src & 0xFFF, regp);\n"); + printf ("\tif (!m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_MOVE2C: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tm68k_move2c(src & 0xFFF, regp);\n"); + printf ("\tif (!m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_CAS: { int old_brace_level; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint ru = (src >> 6) & 7;\n"); printf ("\tint rc = src & 7;\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc)", "dst"); + sync_m68k_pc (); printf ("\tif (GET_ZFLG)"); old_brace_level = n_braces; start_brace (); - genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); pop_braces (old_brace_level); printf ("else"); start_brace (); - printf ("m68k_dreg(regs, rc) = dst;\n"); + switch (curi->size) { + case sz_byte: + printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);\n"); + break; + case sz_word: + printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);\n"); + break; + default: + printf ("\tm68k_dreg(regs, rc) = dst;\n"); + break; + } pop_braces (old_brace_level); } break; case i_CAS2: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tuae_u32 rn1 = regs.regs[(extra >> 28) & 15];\n"); printf ("\tuae_u32 rn2 = regs.regs[(extra >> 12) & 15];\n"); if (curi->size == sz_word) { int old_brace_level = n_braces; + printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); + printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); printf ("\tif (GET_ZFLG) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); printf ("\tif (GET_ZFLG) {\n"); printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_word(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); printf ("\tif (! GET_ZFLG) {\n"); - printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);\n"); - printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, rc2) = (m68k_dreg(regs, rc2) & ~0xffff) | (dst2 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, rc1) = (m68k_dreg(regs, rc1) & ~0xffff) | (dst1 & 0xffff);\n"); printf ("\t}\n"); } else { int old_brace_level = n_braces; + printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); + printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); printf ("\tif (GET_ZFLG) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); printf ("\tif (GET_ZFLG) {\n"); printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_long(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); printf ("\tif (! GET_ZFLG) {\n"); - printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = dst1;\n"); - printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = dst2;\n"); + printf ("\tm68k_dreg(regs, rc2) = dst2;\n"); + printf ("\tm68k_dreg(regs, rc1) = dst1;\n"); printf ("\t}\n"); } break; - case i_MOVES: /* ignore DFC and SFC because we have no MMU */ + case i_MOVES: { - int old_brace_level; - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - printf ("\tif (extra & 0x800)\n"); - old_brace_level = n_braces; - start_brace (); - printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); - pop_braces (old_brace_level); - printf ("else"); - start_brace (); - genamode (curi->dmode, "dstreg", curi->size, "src", 1, 0); - printf ("\tif (extra & 0x8000) {\n"); - switch (curi->size) { - case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; - case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; - default: abort (); - } - printf ("\t} else {\n"); - genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, ""); - printf ("\t}\n"); - pop_braces (old_brace_level); + int old_brace_level; + + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + start_brace(); + printf ("\tif (extra & 0x0800)\n"); /* from reg to ea */ + { + int old_m68k_pc_offset = m68k_pc_offset; + /* use DFC */ + old_brace_level = n_braces; + start_brace (); + printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_DFC); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_DFC); + pop_braces (old_brace_level); + m68k_pc_offset = old_m68k_pc_offset; + } + printf ("else"); /* from ea to reg */ + { + /* use SFC */ + start_brace (); + genamode (curi->dmode, "dstreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_SFC); + printf ("\tif (extra & 0x8000) {\n"); /* address/data */ + switch (curi->size) { + case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; + case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; + default: abort (); + } + printf ("\t} else {\n"); + genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, "", XLATE_LOG); + printf ("\t}\n"); + sync_m68k_pc(); + pop_braces (old_brace_level); + } } break; case i_BKPT: /* only needed for hardware emulators */ @@ -2251,23 +2182,23 @@ static void gen_opcode (unsigned long int opcode) printf ("\top_illg(opcode);\n"); break; case i_TRAPcc: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); - printf ("\tif (cctrue(%d)) { Exception(7,m68k_getpc()); goto %s; }\n", curi->cc, endlabelstr); + genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + sync_m68k_pc (); + printf ("\tif (cctrue(%d)) { Exception(7,oldpc); goto %s; }\n", curi->cc, endlabelstr); need_endlabel = 1; break; case i_DIVL: - sync_m68k_pc (); - start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); printf ("\tm68k_divl(opcode, dst, extra, oldpc);\n"); break; case i_MULL: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); printf ("\tm68k_mull(opcode, dst, extra);\n"); break; @@ -2279,34 +2210,37 @@ static void gen_opcode (unsigned long int opcode) case i_BFFFO: case i_BFSET: case i_BFINS: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); + printf ("\tuae_u32 bdata[2];"); printf ("\tuae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;\n"); printf ("\tint width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;\n"); if (curi->dmode == Dreg) { - printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f);\n"); + printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg);\n"); + printf ("\toffset &= 0x1f;\n"); + printf ("\ttmp = (tmp << offset) | (tmp >> (32 - offset));\n"); + printf ("\tbdata[0] = tmp & ((1 << (32 - width)) - 1);\n"); } else { - printf ("\tuae_u32 tmp,bf0,bf1;\n"); - printf ("\tdsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0);\n"); - printf ("\tbf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff;\n"); - printf ("\ttmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7)));\n"); + printf ("\tuae_u32 tmp;\n"); + printf ("\tdsta += offset >> 3;\n"); + printf ("\ttmp = get_bitfield(dsta, bdata, offset, width);\n"); } - printf ("\ttmp >>= (32 - width);\n"); - printf ("\tSET_NFLG (tmp & (1 << (width-1)) ? 1 : 0);\n"); + printf ("\tSET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);\n"); + if (curi->mnemo == i_BFEXTS) + printf ("\ttmp = (uae_s32)tmp >> (32 - width);\n"); + else + printf ("\ttmp >>= (32 - width);\n"); printf ("\tSET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);\n"); switch (curi->mnemo) { case i_BFTST: break; case i_BFEXTU: + case i_BFEXTS: printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); break; case i_BFCHG: - printf ("\ttmp = ~tmp;\n"); - break; - case i_BFEXTS: - printf ("\tif (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width);\n"); - printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); + printf ("\ttmp = tmp ^ (0xffffffffu >> (32 - width));\n"); break; case i_BFCLR: printf ("\ttmp = 0;\n"); @@ -2317,10 +2251,13 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = offset;\n"); break; case i_BFSET: - printf ("\ttmp = 0xffffffff;\n"); + printf ("\ttmp = 0xffffffffu >> (32 - width);\n"); break; case i_BFINS: printf ("\ttmp = m68k_dreg(regs, (extra >> 12) & 7);\n"); + printf ("\ttmp = tmp & (0xffffffffu >> (32 - width));\n"); + printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0);\n"); + printf ("\tSET_ZFLG (tmp == 0);\n"); break; default: break; @@ -2328,26 +2265,12 @@ static void gen_opcode (unsigned long int opcode) if (curi->mnemo == i_BFCHG || curi->mnemo == i_BFCLR || curi->mnemo == i_BFSET - || curi->mnemo == i_BFINS) - { - printf ("\ttmp <<= (32 - width);\n"); + || curi->mnemo == i_BFINS) { if (curi->dmode == Dreg) { - printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 :\n"); - printf ("\t\t(0xffffffff << (32 - (offset & 0x1f))))) |\n"); - printf ("\t\t(tmp >> (offset & 0x1f)) |\n"); - printf ("\t\t(((offset & 0x1f) + width) >= 32 ? 0 :\n"); - printf (" (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width))));\n"); + printf ("\ttmp = bdata[0] | (tmp << (32 - width));\n"); + printf ("\tm68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));\n"); } else { - printf ("\tbf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) |\n"); - printf ("\t\t(tmp >> (offset & 7)) |\n"); - printf ("\t\t(((offset & 7) + width) >= 32 ? 0 :\n"); - printf ("\t\t (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width))));\n"); - printf ("\tput_long(dsta,bf0 );\n"); - printf ("\tif (((offset & 7) + width) > 32) {\n"); - printf ("\t\tbf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) |\n"); - printf ("\t\t\t(tmp << (8 - (offset & 7)));\n"); - printf ("\t\tput_byte(dsta+4,bf1);\n"); - printf ("\t}\n"); + printf ("\tput_bitfield(dsta, bdata, tmp, offset, width);\n"); } } break; @@ -2357,11 +2280,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + %s;\n", gen_nextiword ()); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); + printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg) - 2 * areg_byteinc[srcreg]) << 8)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_areg(regs, srcreg) -= 2;\n"); printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + gen_set_fault_pc (); printf ("\tput_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf));\n"); } break; @@ -2372,92 +2295,167 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); - printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); - printf ("\tput_byte(m68k_areg(regs, dstreg),val);\n"); - printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); - printf ("\tput_byte(m68k_areg(regs, dstreg),val >> 8);\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tm68k_areg(regs, dstreg) -= 2;\n"); + gen_set_fault_pc (); + printf ("\tput_word(m68k_areg(regs, dstreg), val);\n"); } break; case i_TAS: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "src", "", ""); printf ("\tsrc |= 0x80;\n"); - genastore ("src", curi->smode, "srcreg", curi->size, "src"); + genastore ("src", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_FPP: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfpp_opp(opcode,extra);\n"); + printf ("\tfpuop_arithmetic(opcode, extra);\n"); break; case i_FDBcc: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfdbcc_opp(opcode,extra);\n"); + printf ("\tfpuop_dbcc(opcode, extra);\n"); break; case i_FScc: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfscc_opp(opcode,extra);\n"); + printf ("\tfpuop_scc(opcode, extra);\n"); break; case i_FTRAPcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); + printf ("\tuae_u16 extra = %s;\n", gen_nextiword()); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tftrapcc_opp(opcode,oldpc);\n"); + printf ("\tfpuop_trapcc(opcode, oldpc, extra);\n"); break; case i_FBcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr pc = m68k_getpc();\n"); - genamode (curi->dmode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfbcc_opp(opcode,pc,extra);\n"); + printf ("\tfpuop_bcc(opcode, pc, extra);\n"); break; case i_FSAVE: sync_m68k_pc (); swap_opcode (); - printf ("\tfsave_opp(opcode);\n"); + printf ("\tfpuop_save(opcode);\n"); break; case i_FRESTORE: sync_m68k_pc (); swap_opcode (); - printf ("\tfrestore_opp(opcode);\n"); + printf ("\tfpuop_restore(opcode);\n"); break; case i_CINVL: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(31);\n"); + printf("#endif\n"); + break; case i_CINVP: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(32);\n"); + printf("#endif\n"); + break; case i_CINVA: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(33);\n"); + printf("#endif\n"); + break; case i_CPUSHL: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(41);\n"); + printf("#endif\n"); + break; case i_CPUSHP: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(42);\n"); + printf("#endif\n"); + break; case i_CPUSHA: + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache(43);\n"); + printf("#endif\n"); break; case i_MOVE16: - printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); - printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); - printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); - printf ("\tput_long(memd, get_long(mems));\n"); - printf ("\tput_long(memd+4, get_long(mems+4));\n"); - printf ("\tput_long(memd+8, get_long(mems+8));\n"); - printf ("\tput_long(memd+12, get_long(mems+12));\n"); - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - break; + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); + printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); + printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); + printf ("\tput_long(memd, get_long(mems));\n"); + printf ("\tput_long(memd+4, get_long(mems+4));\n"); + printf ("\tput_long(memd+8, get_long(mems+8));\n"); + printf ("\tput_long(memd+12, get_long(mems+12));\n"); + printf ("\tif (srcreg != dstreg)\n"); + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "mems", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "memd", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); + printf ("\tmemsa &= ~15;\n"); + printf ("\tmemda &= ~15;\n"); + printf ("\tput_long(memda, get_long(memsa));\n"); + printf ("\tput_long(memda+4, get_long(memsa+4));\n"); + printf ("\tput_long(memda+8, get_long(memsa+8));\n"); + printf ("\tput_long(memda+12, get_long(memsa+12));\n"); + if ((opcode & 0xfff8) == 0xf600) + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + else if ((opcode & 0xfff8) == 0xf608) + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + break; case i_MMUOP: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); printf ("\tmmu_op(opcode,extra);\n"); break; + + case i_EMULOP_RETURN: + printf ("\tm68k_emulop_return();\n"); + m68k_pc_offset = 0; + break; + + case i_EMULOP: + printf ("\n"); + swap_opcode (); + printf ("\tm68k_emulop(opcode);\n"); + break; + + case i_NATFEAT_ID: + printf ("\n"); + printf ("\tm68k_natfeat_id();\n"); + break; + + case i_NATFEAT_CALL: + printf ("\n"); + printf ("\tm68k_natfeat_call();\n"); + break; + default: abort (); break; @@ -2473,17 +2471,43 @@ static void generate_includes (FILE * f) fprintf (f, "#include \"memory.h\"\n"); fprintf (f, "#include \"readcpu.h\"\n"); fprintf (f, "#include \"newcpu.h\"\n"); + fprintf (f, "#ifdef USE_JIT\n"); + fprintf (f, "#include \"compiler/compemu.h\"\n"); + fprintf (f, "#endif\n"); + fprintf (f, "#include \"fpu/fpu.h\"\n"); fprintf (f, "#include \"cputbl.h\"\n"); + fprintf (f, "#include \"cpu_emulation.h\"\n"); + fprintf (f, "#include \"debug.h\"\n"); + + fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); + fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); + fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); + fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); + fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); + + fprintf (f, "#ifdef NOFLAGS\n"); + fprintf (f, "# include \"noflags.h\"\n"); + fprintf (f, "#endif\n"); } static int postfix; +struct gencputbl { + char handler[80]; + uae_u16 specific; + uae_u16 opcode; + int namei; +}; +struct gencputbl cpustbl[65536]; +static int n_cpustbl; + static void generate_one_opcode (int rp) { int i; uae_u16 smsk, dmsk; - long int opcode = opcode_map[rp]; - + int opcode = opcode_map[rp]; + int have_realopcode = 0; + if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) return; @@ -2497,13 +2521,37 @@ static void generate_one_opcode (int rp) return; if (opcode_next_clev[rp] != cpu_level) { - fprintf (stblfile, "{ op_%lx_%d, 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], - opcode, lookuptab[i].name); + sprintf(cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, opcode_last_postfix[rp]); + cpustbl[n_cpustbl].specific = 0; + cpustbl[n_cpustbl].opcode = opcode; + cpustbl[n_cpustbl].namei = i; + fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, lookuptab[i].name); + n_cpustbl++; return; } - fprintf (stblfile, "{ op_%lx_%d, 0, %ld }, /* %s */\n", opcode, postfix, opcode, lookuptab[i].name); - fprintf (headerfile, "extern cpuop_func op_%lx_%d;\n", opcode, postfix); - printf ("void REGPARAM2 op_%lx_%d(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, lookuptab[i].name); + + if (table68k[opcode].flagdead == 0) + /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ + sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC_FF(op_%x_%d)", opcode, postfix); + else + sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, postfix); + cpustbl[n_cpustbl].specific = 0; + cpustbl[n_cpustbl].opcode = opcode; + cpustbl[n_cpustbl].namei = i; + fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, lookuptab[i].name); + n_cpustbl++; + + fprintf (headerfile, "extern cpuop_func op_%x_%d_nf;\n", opcode, postfix); + fprintf (headerfile, "extern cpuop_func op_%x_%d_ff;\n", opcode, postfix); + + printf ("void REGPARAM2 CPUFUNC(op_%x_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, lookuptab[i].name); + printf ("\tcpuop_begin();\n"); + /* gb-- The "nf" variant for an instruction that doesn't set the condition + codes at all is the same as the "ff" variant, so we don't need the "nf" + variant to be compiled since it is mapped to the "ff" variant in the + smalltbl. */ + if (table68k[opcode].flagdead == 0) + printf ("#ifndef NOFLAGS\n"); switch (table68k[opcode].stype) { case 0: smsk = 7; break; @@ -2512,6 +2560,8 @@ static void generate_one_opcode (int rp) case 3: smsk = 7; break; case 4: smsk = 7; break; case 5: smsk = 63; break; + case 6: smsk = 255; break; + case 7: smsk = 3; break; default: abort (); } dmsk = 7; @@ -2521,7 +2571,12 @@ static void generate_one_opcode (int rp) && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 && table68k[opcode].smode != absw && table68k[opcode].smode != absl - && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16) + && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16 + /* gb-- We don't want to fetch the EmulOp code since the EmulOp() + routine uses the whole opcode value. Maybe all the EmulOps + could be expanded out but I don't think it is an improvement */ + && table68k[opcode].stype != 6 + ) { if (table68k[opcode].spos == -1) { if (((int) table68k[opcode].sreg) >= 128) @@ -2537,38 +2592,17 @@ static void generate_one_opcode (int rp) if (pos < 8 && (smsk >> (8 - pos)) != 0) abort (); #endif - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (smsk >> (8 - pos)) != 0) - sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); - else - sprintf (source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - printf ("\tuae_u32 srcreg = %s;\n", source); - - printf ("#else\n"); - + real_opcode(&have_realopcode); if (pos) - sprintf (source, "((opcode >> %d) & %d)", pos, smsk); + sprintf (source, "((real_opcode >> %d) & %d)", pos, smsk); else - sprintf (source, "(opcode & %d)", smsk); - + sprintf (source, "(real_opcode & %d)", smsk); if (table68k[opcode].stype == 3) printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); else if (table68k[opcode].stype == 1) printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); else printf ("\tuae_u32 srcreg = %s;\n", source); - - printf ("#endif\n"); } } if (table68k[opcode].duse @@ -2588,27 +2622,13 @@ static void generate_one_opcode (int rp) /* Check that we can do the little endian optimization safely. */ if (pos < 8 && (dmsk >> (8 - pos)) != 0) abort (); -#endif - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (dmsk >> (8 - pos)) != 0) - printf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", - pos ^ 8, dmsk); - else - printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - printf ("#else\n"); - +#endif + real_opcode(&have_realopcode); if (pos) - printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + printf ("\tuae_u32 dstreg = (real_opcode >> %d) & %d;\n", pos, dmsk); else - printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - printf ("#endif\n"); + printf ("\tuae_u32 dstreg = real_opcode & %d;\n", dmsk); } } need_endlabel = 0; @@ -2617,6 +2637,9 @@ static void generate_one_opcode (int rp) gen_opcode (opcode); if (need_endlabel) printf ("%s: ;\n", endlabelstr); + if (table68k[opcode].flagdead == 0) + printf ("\n#endif\n"); + printf ("\tcpuop_end();\n"); printf ("}\n"); opcode_next_clev[rp] = next_cpu_level; opcode_last_postfix[rp] = postfix; @@ -2628,24 +2651,18 @@ static void generate_func (void) using_prefetch = 0; using_exception_3 = 0; - for (i = 0; i < 6; i++) { + + for (i = 0; i < 1; i++) { cpu_level = 4 - i; - if (i == 5) { - cpu_level = 0; - using_prefetch = 1; - using_exception_3 = 1; - for (rp = 0; rp < nr_cpuop_funcs; rp++) - opcode_next_clev[rp] = 0; - } postfix = i; - fprintf (stblfile, "struct cputbl op_smalltbl_%d[] = {\n", postfix); + fprintf (stblfile, "const struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); /* sam: this is for people with low memory (eg. me :)) */ printf ("\n" - "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " - "!defined(PART_5) && !defined(PART_6) && " - "!defined(PART_7) && !defined(PART_8)" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" "\n" "#define PART_1 1\n" "#define PART_2 1\n" @@ -2656,8 +2673,8 @@ static void generate_func (void) "#define PART_7 1\n" "#define PART_8 1\n" "#endif\n\n"); - rp = 0; + n_cpustbl = 0; for(j=1;j<=8;++j) { int k = (j*nr_cpuop_funcs)/8; printf ("#ifdef PART_%d\n",j); @@ -2665,12 +2682,88 @@ static void generate_func (void) generate_one_opcode (rp); printf ("#endif\n\n"); } - fprintf (stblfile, "{ 0, 0, 0 }};\n"); } } -int main (int argc, char **argv) +static struct { + const char *handler; + const char *name; +} cpufunctbl[65536]; +static char const op_illg_1[] = "op_illg_1"; +static char const illegal[] = "ILLEGAL"; + +static void generate_functbl (void) +{ + int i; + unsigned int opcode; + int cpu_level = 4; + struct gencputbl *tbl = cpustbl; + + for (opcode = 0; opcode < 65536; opcode++) + { + cpufunctbl[opcode].handler = op_illg_1; + cpufunctbl[opcode].name = illegal; + } + for (i = 0; i < n_cpustbl; i++) + { + if (! tbl[i].specific) + { + cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; + cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; + } + } + for (opcode = 0; opcode < 65536; opcode++) + { + const char *f; + + if (table68k[opcode].mnemo == i_ILLG || (unsigned)table68k[opcode].clev > (unsigned)cpu_level) + continue; + + if (table68k[opcode].handler != -1) + { + f = cpufunctbl[table68k[opcode].handler].handler; + if (f == op_illg_1) + abort(); + cpufunctbl[opcode].handler = f; + cpufunctbl[opcode].name = cpufunctbl[table68k[opcode].handler].name; + } + } + for (i = 0; i < n_cpustbl; i++) + { + if (tbl[i].specific) + { + cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; + cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; + } + } + + fprintf(functblfile, "\n"); + fprintf(functblfile, "cpuop_func *cpufunctbl[65536] = {\n"); + fprintf(functblfile, "#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU)\n"); + for (opcode = 0; opcode < 65536; opcode++) + { + fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[opcode].handler, opcode < 65535 ? "," : "", cpufunctbl[opcode].name); + } + fprintf(functblfile, "#else\n"); + for (opcode = 0; opcode < 65536; opcode++) + { + unsigned int map = do_byteswap_16(opcode); + fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[map].handler, opcode < 65535 ? "," : "", cpufunctbl[map].name); + } + fprintf(functblfile, "#endif\n"); + fprintf(functblfile, "};\n"); +} + +#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) +void cygwin_mingw_abort() +{ +#undef abort + abort(); +} +#endif + +int main () { read_table68k (); do_merges (); @@ -2685,15 +2778,28 @@ int main (int argc, char **argv) * cputbl.h that way), but cpuopti can't cope. That could be fixed, but * I don't dare to touch the 68k version. */ - headerfile = fopen ("cputbl.h", "wb"); - stblfile = fopen ("cpustbl.cpp", "wb"); - freopen ("cpuemu.cpp", "wb", stdout); + if ((headerfile = fopen ("cputbl.h", "wb")) == NULL) + abort(); + if ((stblfile = fopen ("cpustbl.cpp", "wb")) == NULL) + abort(); + if ((functblfile = fopen ("cpufunctbl.cpp", "wb")) == NULL) + abort(); + if (freopen ("cpuemu.cpp", "wb", stdout) == NULL) + abort(); generate_includes (stdout); + fprintf(stdout, "#ifdef HAVE_CFLAG_NO_REDZONE\n"); + fprintf(stdout, "#ifndef NOFLAGS\n"); + fprintf(stdout, "#pragma GCC option \"-mno-red-zone\"\n"); + fprintf(stdout, "#endif\n"); + fprintf(stdout, "#endif\n"); generate_includes (stblfile); - + generate_includes (functblfile); generate_func (); - + generate_functbl (); free (table68k); + fclose(headerfile); + fclose(stblfile); + fclose(functblfile); return 0; } diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index f1ff69775..dc79136bc 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -1,36 +1,85 @@ +/* + * m68k.h - machine dependent bits + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * * MC68000 emulation - machine dependent bits * * Copyright 1996 Bernd Schmidt + * */ -#if defined(__i386__) && defined(X86_ASSEMBLY) +#ifndef M68K_FLAGS_H +#define M68K_FLAGS_H + +#ifdef OPTIMIZED_FLAGS + +#if (defined(CPU_i386) && defined(X86_ASSEMBLY)) || (defined(CPU_x86_64) && defined(X86_64_ASSEMBLY)) + +# include +#ifndef SAHF_SETO_PROFITABLE + +/* PUSH/POP instructions are naturally 64-bit sized on x86-64, thus + unsigned long hereunder is either 64-bit or 32-bit wide depending + on the target. */ struct flag_struct { - unsigned int cznv; - unsigned int x; +#if defined(CPU_x86_64) + uint64 cznv; + uint64 x; +#else + uint32 cznv; + uint32 x; +#endif }; -#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x40) | (((y) & 1) << 6)) -#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x800) | (((y) & 1) << 11)) -#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x80) | (((y) & 1) << 7)) -#define SET_XFLG(y) (regflags.x = (y)) +#define FLAGVAL_Z 0x40 +#define FLAGVAL_N 0x80 + +#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x40) | (((y) & 1) << 6)) +#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x800) | (((y) & 1) << 11)) +#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x80) | (((y) & 1) << 7)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_ZFLG ((regflags.cznv >> 6) & 1) +#define GET_CFLG (regflags.cznv & 1) +#define GET_VFLG ((regflags.cznv >> 11) & 1) +#define GET_NFLG ((regflags.cznv >> 7) & 1) +#define GET_XFLG (regflags.x & 1) -#define GET_ZFLG ((regflags.cznv >> 6) & 1) -#define GET_CFLG (regflags.cznv & 1) -#define GET_VFLG ((regflags.cznv >> 11) & 1) -#define GET_NFLG ((regflags.cznv >> 7) & 1) -#define GET_XFLG (regflags.x & 1) +#define CLEAR_CZNV (regflags.cznv = 0) +#define GET_CZNV (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) -#define CLEAR_CZNV (regflags.cznv = 0) -#define COPY_CARRY (regflags.x = regflags.cznv) +#define COPY_CARRY (regflags.x = regflags.cznv) extern struct flag_struct regflags __asm__ ("regflags"); -static __inline__ int cctrue(int cc) +static inline int cctrue(int cc) { uae_u32 cznv = regflags.cznv; switch(cc){ @@ -58,91 +107,553 @@ static __inline__ int cctrue(int cc) return 0; } -#define x86_flag_testl(v) \ - __asm__ __volatile__ ("testl %1,%1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "r" (v) : "cc") - -#define x86_flag_testw(v) \ - __asm__ __volatile__ ("testw %w1,%w1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "r" (v) : "cc") - -#define x86_flag_testb(v) \ - __asm__ __volatile__ ("testb %b1,%b1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "q" (v) : "cc") - -#define x86_flag_addl(v, s, d) do { \ +#define optflag_testl(v) \ + __asm__ __volatile__ ("andl %1,%1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") + +#define optflag_testw(v) \ + __asm__ __volatile__ ("andw %w1,%w1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") + +#define optflag_testb(v) \ + __asm__ __volatile__ ("andb %b1,%b1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "q" (v) : "memory", "cc") + +#define optflag_addl(v, s, d) do { \ __asm__ __volatile__ ("addl %k2,%k1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_addw(v, s, d) do { \ +#define optflag_addw(v, s, d) do { \ __asm__ __volatile__ ("addw %w2,%w1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_addb(v, s, d) do { \ +#define optflag_addb(v, s, d) do { \ __asm__ __volatile__ ("addb %b2,%b1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_subl(v, s, d) do { \ +#define optflag_subl(v, s, d) do { \ __asm__ __volatile__ ("subl %k2,%k1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_subw(v, s, d) do { \ +#define optflag_subw(v, s, d) do { \ __asm__ __volatile__ ("subw %w2,%w1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_subb(v, s, d) do { \ +#define optflag_subb(v, s, d) do { \ __asm__ __volatile__ ("subb %b2,%b1\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "memory", "cc"); \ COPY_CARRY; \ } while (0) -#define x86_flag_cmpl(s, d) \ +#define optflag_cmpl(s, d) \ __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") -#define x86_flag_cmpw(s, d) \ +#define optflag_cmpw(s, d) \ __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") -#define x86_flag_cmpb(s, d) \ +#define optflag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \ - "pushfl\n\t" \ - "popl %0\n\t" \ - : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc") + "pushf\n\t" \ + "pop %0\n\t" \ + : "=rm" (regflags.cznv) : "qmi" (s), "q" (d) : "memory", "cc") + +#else + +struct flag_struct { + uae_u32 cznv; + uae_u32 x; +}; + +#define FLAGVAL_Z 0x4000 +#define FLAGVAL_N 0x8000 + +#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x4000) | (((y) & 1) << 14)) +#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~0x100) | (((y) & 1) << 8)) +#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x1) | (((y) & 1))) +#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x8000) | (((y) & 1) << 15)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_ZFLG ((regflags.cznv >> 14) & 1) +#define GET_CFLG ((regflags.cznv >> 8) & 1) +#define GET_VFLG ((regflags.cznv >> 0) & 1) +#define GET_NFLG ((regflags.cznv >> 15) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.cznv = 0) +#define GET_CZNV (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) + +#define COPY_CARRY (regflags.x = (regflags.cznv)>>8) + +extern struct flag_struct regflags __asm__ ("regflags"); + +static inline int cctrue(int cc) +{ + uae_u32 cznv = regflags.cznv; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & 0x4100) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (cznv & 0x4100) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (cznv & 0x100) == 0; /* !GET_CFLG; CC */ + case 5: return (cznv & 0x100) != 0; /* GET_CFLG; CS */ + case 6: return (cznv & 0x4000) == 0; /* !GET_ZFLG; NE */ + case 7: return (cznv & 0x4000) != 0; /* GET_ZFLG; EQ */ + case 8: return (cznv & 0x01) == 0; /* !GET_VFLG; VC */ + case 9: return (cznv & 0x01) != 0; /* GET_VFLG; VS */ + case 10:return (cznv & 0x8000) == 0; /* !GET_NFLG; PL */ + case 11:return (cznv & 0x8000) != 0; /* GET_NFLG; MI */ + case 12:return (((cznv << 15) ^ cznv) & 0x8000) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((cznv << 15) ^ cznv) & 0x8000) != 0;/* GET_NFLG != GET_VFLG; LT */ + case 14: + cznv &= 0xc001; + return (((cznv << 15) ^ cznv) & 0xc000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: + cznv &= 0xc001; + return (((cznv << 15) ^ cznv) & 0xc000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + abort(); + return 0; +} + +/* Manually emit LAHF instruction so that 64-bit assemblers can grok it */ +#if defined CPU_x86_64 && defined __GNUC__ +#define ASM_LAHF ".byte 0x9f" +#else +#define ASM_LAHF "lahf" +#endif + +/* Is there any way to do this without declaring *all* memory clobbered? + I.e. any way to tell gcc that some byte-sized value is in %al? */ +#define optflag_testl(v) \ + __asm__ __volatile__ ("andl %0,%0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "r" (v) : "%eax","cc","memory") + +#define optflag_testw(v) \ + __asm__ __volatile__ ("andw %w0,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "r" (v) : "%eax","cc","memory") + +#define optflag_testb(v) \ + __asm__ __volatile__ ("andb %b0,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "q" (v) : "%eax","cc","memory") + +#define optflag_addl(v, s, d) do { \ + __asm__ __volatile__ ("addl %k1,%k0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("addw %w1,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("addb %b1,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subl(v, s, d) do { \ + __asm__ __volatile__ ("subl %k1,%k0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("subw %w1,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("subb %b1,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) -#elif defined(__sparc__) && (defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY)) +#define optflag_cmpl(s, d) \ + __asm__ __volatile__ ("cmpl %k0,%k1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "rmi" (s), "r" (d) : "%eax","cc","memory") + +#define optflag_cmpw(s, d) \ + __asm__ __volatile__ ("cmpw %w0,%w1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "rmi" (s), "r" (d) : "%eax","cc","memory") + +#define optflag_cmpb(s, d) \ + __asm__ __volatile__ ("cmpb %b0,%b1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "qmi" (s), "q" (d) : "%eax","cc","memory") + +#endif + +#elif defined(CPU_arm) && defined(ARM_ASSEMBLY) + +struct flag_struct { + uae_u32 nzcv; + uae_u32 x; +}; + +#define FLAGVAL_Q 0x08000000 +#define FLAGVAL_V 0x10000000 +#define FLAGVAL_C 0x20000000 +#define FLAGVAL_Z 0x40000000 +#define FLAGVAL_N 0x80000000 + +#define SET_NFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x80000000) | (((y) & 1) << 31)) +#define SET_ZFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x40000000) | (((y) & 1) << 30)) +#define SET_CFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x20000000) | (((y) & 1) << 29)) +#define SET_VFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x10000000) | (((y) & 1) << 28)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_NFLG ((regflags.nzcv >> 31) & 1) +#define GET_ZFLG ((regflags.nzcv >> 30) & 1) +#define GET_CFLG ((regflags.nzcv >> 29) & 1) +#define GET_VFLG ((regflags.nzcv >> 28) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.nzcv = 0) +#define GET_CZNV (regflags.nzcv) +#define IOR_CZNV(X) (regflags.nzcv |= (X)) +#define SET_CZNV(X) (regflags.nzcv = (X)) + +#define COPY_CARRY (regflags.x = (regflags.nzcv)>>29) + +extern struct flag_struct regflags __asm__ ("regflags"); + +static inline int cctrue(int cc) +{ + unsigned int nzcv = regflags.nzcv; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (nzcv & 0x60000000) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (nzcv & 0x60000000) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (nzcv & 0x20000000) == 0; /* !GET_CFLG; CC */ + case 5: return (nzcv & 0x20000000) != 0; /* GET_CFLG; CS */ + case 6: return (nzcv & 0x40000000) == 0; /* !GET_ZFLG; NE */ + case 7: return (nzcv & 0x40000000) != 0; /* GET_ZFLG; EQ */ + case 8: return (nzcv & 0x10000000) == 0; /* !GET_VFLG; VC */ + case 9: return (nzcv & 0x10000000) != 0; /* GET_VFLG; VS */ + case 10:return (nzcv & 0x80000000) == 0; /* !GET_NFLG; PL */ + case 11:return (nzcv & 0x80000000) != 0; /* GET_NFLG; MI */ + case 12:return (((nzcv << 3) ^ nzcv) & 0x80000000) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((nzcv << 3) ^ nzcv) & 0x80000000) != 0; /* GET_NFLG != GET_VFLG; LT */ + case 14: + nzcv &= 0xd0000000; + return (((nzcv << 3) ^ nzcv) & 0xc0000000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: + nzcv &= 0xd0000000; + return (((nzcv << 3) ^ nzcv) & 0xc0000000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + return 0; +} + +#define optflag_testl(v) do {\ + __asm__ __volatile__ ("tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "r" (v) \ + : "cc"); \ + } while(0) + +#define optflag_addl(v, s, d) do { \ + __asm__ __volatile__ ("adds %[rv],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_subl(v, s, d) do { \ + __asm__ __volatile__ ("subs %[rv],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_cmpl(s, d) do { \ + __asm__ __volatile__ ("cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#if defined(ARMV6_ASSEMBLY) + +// #pragma message "ARM/v6 Assembly optimized flags" + +#define optflag_testw(v) do { \ + __asm__ __volatile__ ("sxth %[rv],%[rv]\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_testb(v) do {\ + __asm__ __volatile__ ("sxtb %[rv],%[rv]\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "adds %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "adds %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "subs %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "subs %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_cmpw(s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#define optflag_cmpb(s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#else + +// #pragma message "ARM/generic Assembly optimized flags" + +#define optflag_testw(v) do { \ + __asm__ __volatile__ ("lsl %[rv],%[rv],#16\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_testb(v) do {\ + __asm__ __volatile__ ("lsl %[rv],%[rv],#24\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "adds %[rd],%[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "lsr %[rv],%[rd],#16\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "adds %[rd],%[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "lsr %[rv],%[rd],#24\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "subs %[rd],%[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + "lsr %[rv],%[rd],#16\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "subs %[rd],%[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + "lsr %[rv],%[rd],#24\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY; \ + } while(0) + +#define optflag_cmpw(s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "cmp %[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#define optflag_cmpb(s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "cmp %[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#endif + +#elif defined(CPU_sparc) && (defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY)) struct flag_struct { unsigned char nzvc; @@ -151,22 +662,29 @@ struct flag_struct { extern struct flag_struct regflags; -#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) -#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) -#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) -#define SET_XFLG(y) (regflags.x = (y)) +#define FLAGVAL_Z 0x04 +#define FLAGVAL_N 0x08 + +#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) +#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) +#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) +#define SET_XFLG(y) (regflags.x = (y)) -#define GET_ZFLG ((regflags.nzvc >> 2) & 1) -#define GET_CFLG (regflags.nzvc & 1) -#define GET_VFLG ((regflags.nzvc >> 1) & 1) -#define GET_NFLG ((regflags.nzvc >> 3) & 1) -#define GET_XFLG (regflags.x & 1) +#define GET_ZFLG ((regflags.nzvc >> 2) & 1) +#define GET_CFLG (regflags.nzvc & 1) +#define GET_VFLG ((regflags.nzvc >> 1) & 1) +#define GET_NFLG ((regflags.nzvc >> 3) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.nzvc = 0) +#define GET_CZNV (reflags.nzvc) +#define IOR_CZNV(X) (refglags.nzvc |= (X)) +#define SET_CZNV(X) (regflags.nzvc = (X)) -#define CLEAR_CZNV (regflags.nzvc = 0) #define COPY_CARRY (regflags.x = regflags.nzvc) -static __inline__ int cctrue(int cc) +static inline int cctrue(int cc) { uae_u32 nzvc = regflags.nzvc; switch(cc){ @@ -787,6 +1305,8 @@ static inline uae_u32 sparc_v9_flag_addx_32(flag_struct *flags, uae_u32 src, uae #endif /* SPARC_V9_ASSEMBLY */ +#endif + #else struct flag_struct { @@ -805,7 +1325,28 @@ extern struct flag_struct regflags; #define VFLG (regflags.v) #define XFLG (regflags.x) -static __inline__ int cctrue(const int cc) +#define SET_CFLG(x) (CFLG = (x)) +#define SET_NFLG(x) (NFLG = (x)) +#define SET_VFLG(x) (VFLG = (x)) +#define SET_ZFLG(x) (ZFLG = (x)) +#define SET_XFLG(x) (XFLG = (x)) + +#define GET_CFLG CFLG +#define GET_NFLG NFLG +#define GET_VFLG VFLG +#define GET_ZFLG ZFLG +#define GET_XFLG XFLG + +#define CLEAR_CZNV do { \ + SET_CFLG (0); \ + SET_ZFLG (0); \ + SET_NFLG (0); \ + SET_VFLG (0); \ +} while (0) + +#define COPY_CARRY (SET_XFLG (GET_CFLG)) + +static inline int cctrue(const int cc) { switch(cc){ case 0: return 1; /* T */ @@ -828,4 +1369,6 @@ static __inline__ int cctrue(const int cc) return 0; } -#endif +#endif /* OPTIMIZED_FLAGS */ + +#endif /* M68K_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/memory-uae.h b/BasiliskII/src/uae_cpu/memory-uae.h new file mode 100644 index 000000000..c93aeb371 --- /dev/null +++ b/BasiliskII/src/uae_cpu/memory-uae.h @@ -0,0 +1,606 @@ +/* + * memory.h - memory management + * + * Copyright (c) 2001-2006 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + /* + * UAE - The Un*x Amiga Emulator + * + * memory management + * + * Copyright 1995 Bernd Schmidt + */ + +#ifndef UAE_MEMORY_H +#define UAE_MEMORY_H + +#include "sysdeps.h" +#include "string.h" +#include "hardware.h" +#include "parameters.h" +#include "registers.h" +#include "cpummu.h" +#include "readcpu.h" + +# include + +// newcpu.h +extern void Exception (int, uaecptr); +#ifdef EXCEPTIONS_VIA_LONGJMP + extern JMP_BUF excep_env; + #define SAVE_EXCEPTION \ + JMP_BUF excep_env_old; \ + memcpy(excep_env_old, excep_env, sizeof(JMP_BUF)) + #define RESTORE_EXCEPTION \ + memcpy(excep_env, excep_env_old, sizeof(JMP_BUF)) + #define TRY(var) int var = SETJMP(excep_env); if (!var) + #define CATCH(var) else + #define THROW(n) LONGJMP(excep_env, n) + #define THROW_AGAIN(var) LONGJMP(excep_env, var) + #define VOLATILE volatile +#else + struct m68k_exception { + int prb; + m68k_exception (int exc) : prb (exc) {} + operator int() { return prb; } + }; + #define SAVE_EXCEPTION + #define RESTORE_EXCEPTION + #define TRY(var) try + #define CATCH(var) catch(m68k_exception var) + #define THROW(n) throw m68k_exception(n) + #define THROW_AGAIN(var) throw + #define VOLATILE +#endif /* EXCEPTIONS_VIA_LONGJMP */ +extern int in_exception_2; + +#define STRAM_END 0x0e00000UL // should be replaced by global ROMBase as soon as ROMBase will be a constant +#define ROM_END 0x0e80000UL // should be replaced by ROMBase + RealROMSize if we are going to work with larger TOS ROMs than 512 kilobytes +#define FastRAM_BEGIN 0x1000000UL // should be replaced by global FastRAMBase as soon as FastRAMBase will be a constant +#ifdef FixedSizeFastRAM +#define FastRAM_SIZE (FixedSizeFastRAM * 1024 * 1024) +#else +#define FastRAM_SIZE FastRAMSize +#endif + +#ifdef FIXED_VIDEORAM +#define ARANYMVRAMSTART 0xf0000000UL +#endif + +#define ARANYMVRAMSIZE 0x00100000 // should be a variable to protect VGA card offscreen memory + +#ifdef FIXED_VIDEORAM +extern uintptr VMEMBaseDiff; +#else +extern uae_u32 VideoRAMBase; +#endif + +#ifdef ARAM_PAGE_CHECK +extern uaecptr pc_page, read_page, write_page; +extern uintptr pc_offset, read_offset, write_offset; +# ifdef PROTECT2K +# define ARAM_PAGE_MASK 0x7ff +# else +# ifdef FULLMMU +# define ARAM_PAGE_MASK 0xfff +# else +# define ARAM_PAGE_MASK 0xfffff +# endif +# endif +#endif + +extern uintptr MEMBaseDiff; +extern uintptr ROMBaseDiff; +extern uintptr FastRAMBaseDiff; +# define InitMEMBaseDiff(va, ra) (MEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +# define InitROMBaseDiff(va, ra) (ROMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +# define InitFastRAMBaseDiff(va, ra) (FastRAMBaseDiff = (uintptr)(va) - (uintptr)(ra)) + +#ifdef FIXED_VIDEORAM +#define InitVMEMBaseDiff(va, ra) (VMEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +#else +#define InitVMEMBaseDiff(va, ra) (ra = (uintptr)(va) + MEMBaseDiff) +#endif + +extern "C" void breakpt(void); + + +static inline uae_u64 do_get_mem_quad(uae_u64 *a) {return SDL_SwapBE64(*a);} +static inline void do_put_mem_quad(uae_u64 *a, uae_u64 v) {*a = SDL_SwapBE64(v);} + + +#ifndef NOCHECKBOUNDARY +static ALWAYS_INLINE bool test_ram_boundary(uaecptr addr, int size, bool super, bool write) +{ + if (addr <= (FastRAM_BEGIN + FastRAM_SIZE - size)) { +#ifdef PROTECT2K + // protect first 2kB of RAM - access in supervisor mode only + if (!super && addr < 0x00000800UL) + return false; +#endif + // check for write access to protected areas: + // - first two longwords of ST-RAM are non-writable (ROM shadow) + // - non-writable area between end of ST-RAM and begin of FastRAM + if (!write || addr >= FastRAM_BEGIN || (addr >= 8 && addr <= (STRAM_END - size))) + return true; + } +#ifdef FIXED_VIDEORAM + return addr >= ARANYMVRAMSTART && addr <= (ARANYMVRAMSTART + ARANYMVRAMSIZE - size); +#else + return addr >= VideoRAMBase && addr <= (VideoRAMBase + ARANYMVRAMSIZE - size); +#endif +} +/* + * "size" is the size of the memory access (byte = 1, word = 2, long = 4) + */ +static ALWAYS_INLINE void check_ram_boundary(uaecptr addr, int size, bool write) +{ + if (test_ram_boundary(addr, size, regs.s, write)) + return; + + // D(bug("BUS ERROR %s at $%x\n", (write ? "writing" : "reading"), addr)); + regs.mmu_fault_addr = addr; + regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); + breakpt(); + THROW(2); +} + +#else +static inline bool test_ram_boundary(uaecptr, int, bool, bool) { return 1; } +static inline void check_ram_boundary(uaecptr, int, bool) { } +#endif + +#ifdef FIXED_VIDEORAM +# define do_get_real_address(a) ((uae_u8 *)(((uaecptr)(a) < ARANYMVRAMSTART) ? ((uaecptr)(a) + MEMBaseDiff) : ((uaecptr)(a) + VMEMBaseDiff))) +#else +# define do_get_real_address(a) ((uae_u8 *)((uintptr)(a) + MEMBaseDiff)) +#endif + +static inline uae_u8 *phys_get_real_address(uaecptr addr) +{ + return do_get_real_address(addr); +} + +#ifndef NOCHECKBOUNDARY +static inline bool phys_valid_address(uaecptr addr, bool write, int sz) +{ + return test_ram_boundary(addr, sz, regs.s, write); +} +#else +static inline bool phys_valid_address(uaecptr, bool, int) { return true; } +#endif + +static inline uae_u64 phys_get_quad(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_quad((uae_u64*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); /* TODO: must be HWget_q */ +#endif + check_ram_boundary(addr, 8, false); + uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_quad(m); +} + +static inline uae_u32 phys_get_long(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_long((uae_u32*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); +#endif + check_ram_boundary(addr, 4, false); + uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_long(m); +} + +static inline uae_u32 phys_get_word(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_word((uae_u16*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_w(addr); +#endif + check_ram_boundary(addr, 2, false); + uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_word(m); +} + +static inline uae_u32 phys_get_byte(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_byte((uae_u8*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_b(addr); +#endif + check_ram_boundary(addr, 1, false); + uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_byte(m); +} + +static inline void phys_put_quad(uaecptr addr, uae_u64 l) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_quad((uae_u64*)(addr + write_offset), l); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_l(addr, l); /* TODO: must be HWput_q */ + return; + } +#endif + check_ram_boundary(addr, 8, true); + uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_quad(m, l); +} + +static inline void phys_put_long(uaecptr addr, uae_u32 l) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_long((uae_u32*)(addr + write_offset), l); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_l(addr, l); + return; + } +#endif + check_ram_boundary(addr, 4, true); + uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_long(m, l); +} + +static inline void phys_put_word(uaecptr addr, uae_u32 w) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_word((uae_u16*)(addr + write_offset), w); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_w(addr, w); + return; + } +#endif + check_ram_boundary(addr, 2, true); + uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_word(m, w); +} + +static inline void phys_put_byte(uaecptr addr, uae_u32 b) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_byte((uae_u8*)(addr + write_offset), b); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_b(addr, b); + return; + } +#endif + check_ram_boundary(addr, 1, true); + uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_byte(m, b); +} + +#ifdef FULLMMU +static ALWAYS_INLINE bool is_unaligned(uaecptr addr, int size) +{ + return unlikely((addr & (size - 1)) && (addr ^ (addr + size - 1)) & 0x1000); +} + +static ALWAYS_INLINE uae_u8 *mmu_get_real_address(uaecptr addr, struct mmu_atc_line *cl) +{ + return do_get_real_address(cl->phys + addr); +} + +static ALWAYS_INLINE uae_u32 mmu_get_quad(uaecptr addr, int data) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl)); + return mmu_get_quad_slow(addr, regs.s, data, cl); +} + +static ALWAYS_INLINE uae_u64 get_quad(uaecptr addr) +{ + return mmu_get_quad(addr, 1); +} + +static ALWAYS_INLINE uae_u32 mmu_get_long(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); + return mmu_get_long_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u32 get_long(uaecptr addr) +{ + if (unlikely(is_unaligned(addr, 4))) + return mmu_get_long_unaligned(addr, 1); + return mmu_get_long(addr, 1, sz_long); +} + +static ALWAYS_INLINE uae_u16 mmu_get_word(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); + return mmu_get_word_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u16 get_word(uaecptr addr) +{ + if (unlikely(is_unaligned(addr, 2))) + return mmu_get_word_unaligned(addr, 1); + return mmu_get_word(addr, 1, sz_word); +} + +static ALWAYS_INLINE uae_u8 mmu_get_byte(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); + return mmu_get_byte_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u8 get_byte(uaecptr addr) +{ + return mmu_get_byte(addr, 1, sz_byte); +} + +static ALWAYS_INLINE void mmu_put_quad(uaecptr addr, uae_u64 val, int data) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_quad_slow(addr, val, regs.s, data, cl); +} + +static ALWAYS_INLINE void put_quad(uaecptr addr, uae_u32 val) +{ + mmu_put_quad(addr, val, 1); +} + +static ALWAYS_INLINE void mmu_put_long(uaecptr addr, uae_u32 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_long_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_long(uaecptr addr, uae_u32 val) +{ + if (unlikely(is_unaligned(addr, 4))) + mmu_put_long_unaligned(addr, val, 1); + else + mmu_put_long(addr, val, 1, sz_long); +} + +static ALWAYS_INLINE void mmu_put_word(uaecptr addr, uae_u16 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_word_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_word(uaecptr addr, uae_u16 val) +{ + if (unlikely(is_unaligned(addr, 2))) + mmu_put_word_unaligned(addr, val, 1); + else + mmu_put_word(addr, val, 1, sz_word); +} + +static ALWAYS_INLINE void mmu_put_byte(uaecptr addr, uae_u8 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_byte_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_byte(uaecptr addr, uae_u8 val) +{ + mmu_put_byte(addr, val, 1, sz_byte); +} + +static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) +{ + (void)sz; + return phys_get_real_address(mmu_translate(addr, regs.s, 1, write)); +} + +static ALWAYS_INLINE uae_u32 mmu_get_user_long(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); + return mmu_get_long_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE uae_u16 mmu_get_user_word(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); + return mmu_get_word_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE uae_u8 mmu_get_user_byte(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); + return mmu_get_byte_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_long(uaecptr addr, uae_u32 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_long_slow(addr, val, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_word(uaecptr addr, uae_u16 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_word_slow(addr, val, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_byte(uaecptr addr, uae_u8 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_byte_slow(addr, val, super, data, size, cl); +} + +static inline bool valid_address(uaecptr addr, bool write, int sz) +{ + SAVE_EXCEPTION; + TRY(prb) { + (void)sz; + check_ram_boundary(mmu_translate(addr, regs.s, 1, (write ? 1 : 0)), sz, write); + RESTORE_EXCEPTION; + return true; + } + CATCH(prb) { + RESTORE_EXCEPTION; + return false; + } +} + +#else + +# define get_quad(a) phys_get_quad(a) +# define get_long(a) phys_get_long(a) +# define get_word(a) phys_get_word(a) +# define get_byte(a) phys_get_byte(a) +# define put_quad(a,b) phys_put_quad(a,b) +# define put_long(a,b) phys_put_long(a,b) +# define put_word(a,b) phys_put_word(a,b) +# define put_byte(a,b) phys_put_byte(a,b) +# define get_real_address(a,w,s) phys_get_real_address(a) + +#define valid_address(a,w,s) phys_valid_address(a,w,s) +#endif + +static inline void flush_internals() { +#ifdef ARAM_PAGE_CHECK + pc_page = 0xeeeeeeee; + read_page = 0xeeeeeeee; + write_page = 0xeeeeeeee; +#endif +} + +#endif /* MEMORY_H */ + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp new file mode 100644 index 000000000..e56f993d6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -0,0 +1,59 @@ +/* + * memory.cpp - memory management + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + /* + * UAE - The Un*x Amiga Emulator + * + * Memory management + * + * (c) 1995 Bernd Schmidt + */ + +#include "sysdeps.h" + +#include "memory.h" +#define DEBUG 0 +#include "debug.h" + +#ifdef ARAM_PAGE_CHECK +uaecptr pc_page = 0xeeeeeeee; +uintptr pc_offset = 0; +uaecptr read_page = 0xeeeeeeee; +uintptr read_offset = 0; +uaecptr write_page = 0xeeeeeeee; +uintptr write_offset = 0; +#endif + +extern "C" void breakpt(void) +{ + // bug("bus err: pc=%08x, sp=%08x, addr=%08x", m68k_getpc(), regs.regs[15], regs.mmu_fault_addr); +} + +#if !KNOWN_ALLOC && !NORMAL_ADDRESSING +// This part need rewrite for ARAnyM !! +// It can be taken from hatari. + +#error Not prepared for your platform, maybe you need memory banks from hatari + +#endif /* !KNOWN_ALLOC && !NORMAL_ADDRESSING */ diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 670c2ee75..f7bab41de 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -27,6 +27,34 @@ extern uintptr MEMBaseDiff; #endif +extern void Exception (int, uaecptr); +#ifdef EXCEPTIONS_VIA_LONGJMP + extern JMP_BUF excep_env; + #define SAVE_EXCEPTION \ + JMP_BUF excep_env_old; \ + memcpy(excep_env_old, excep_env, sizeof(JMP_BUF)) + #define RESTORE_EXCEPTION \ + memcpy(excep_env, excep_env_old, sizeof(JMP_BUF)) + #define TRY(var) int var = SETJMP(excep_env); if (!var) + #define CATCH(var) else + #define THROW(n) LONGJMP(excep_env, n) + #define THROW_AGAIN(var) LONGJMP(excep_env, var) + #define VOLATILE volatile +#else + struct m68k_exception { + int prb; + m68k_exception (int exc) : prb (exc) {} + operator int() { return prb; } + }; + #define SAVE_EXCEPTION + #define RESTORE_EXCEPTION + #define TRY(var) try + #define CATCH(var) catch(m68k_exception var) + #define THROW(n) throw m68k_exception(n) + #define THROW_AGAIN(var) throw + #define VOLATILE +#endif /* EXCEPTIONS_VIA_LONGJMP */ + #if DIRECT_ADDRESSING static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { @@ -41,40 +69,57 @@ static __inline__ uae_u32 get_long(uaecptr addr) uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); return do_get_mem_long(m); } +#define phys_get_long get_long static __inline__ uae_u32 get_word(uaecptr addr) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); return do_get_mem_word(m); } +#define phys_get_word get_word static __inline__ uae_u32 get_byte(uaecptr addr) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); return do_get_mem_byte(m); } +#define phys_get_byte get_byte static __inline__ void put_long(uaecptr addr, uae_u32 l) { uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); do_put_mem_long(m, l); } +#define phys_put_long put_long static __inline__ void put_word(uaecptr addr, uae_u32 w) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); do_put_mem_word(m, w); } +#define phys_put_word put_word static __inline__ void put_byte(uaecptr addr, uae_u32 b) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); do_put_mem_byte(m, b); } +#define phys_put_byte put_byte static __inline__ uae_u8 *get_real_address(uaecptr addr) { return do_get_real_address(addr); } +static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) +{ + return do_get_real_address(addr); +} +static inline uae_u8 *phys_get_real_address(uaecptr addr) +{ + return do_get_real_address(addr); +} static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) { return do_get_virtual_address(addr); } #endif /* DIRECT_ADDRESSING */ +static __inline__ void check_ram_boundary(uaecptr addr, int size, bool write) {} +static inline void flush_internals() {} + #endif /* MEMORY_H */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index 4adf0cc80..ac1505f5c 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -1,3 +1,28 @@ +/* + * newcpu.cpp - CPU emulation + * + * Copyright (c) 2010 ARAnyM dev team (see AUTHORS) + * + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * @@ -6,27 +31,44 @@ * (c) 1995 Bernd Schmidt */ -#include -#include -#include - #include "sysdeps.h" +#include #include "cpu_emulation.h" #include "main.h" #include "emul_op.h" - -extern int intlev(void); // From baisilisk_glue.cpp - #include "m68k.h" #include "memory.h" #include "readcpu.h" #include "newcpu.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif +#include "fpu/fpu.h" +#include "cpummu.h" +// #include "natfeats.h" +// #include "disasm-glue.h" + +#include + +#define DEBUG 0 +#include "debug.h" + +#define SANITY_CHECK_ATC 1 + +struct fixup fixup = {0, 0, 0}; int quit_program = 0; -int debugging = 0; + +// For instruction $7139 +bool cpu_debugging = false; + struct flag_struct regflags; +/* LongJump buffers */ +#ifdef EXCEPTIONS_VIA_LONGJMP +JMP_BUF excep_env; +#endif /* Opcode of faulting instruction */ uae_u16 last_op_for_exception_3; /* PC at fault time */ @@ -41,128 +83,132 @@ int movem_index1[256]; int movem_index2[256]; int movem_next[256]; -int fpp_movem_index1[256]; -int fpp_movem_index2[256]; -int fpp_movem_next[256]; - -cpuop_func *cpufunctbl[65536]; - -#define COUNT_INSTRS 0 - -#if COUNT_INSTRS -static unsigned long int instrcount[65536]; -static uae_u16 opcodenums[65536]; +#ifdef FLIGHT_RECORDER + +// feel free to edit the following defines to customize the dump +#define FRLOG_HOTKEY 1 /* 1 = dump only when hotkey is held down */ +#define FRLOG_ALL 1 /* 1 = dump continuously to ever growing log */ +#define FRLOG_IRQ 0 /* 1 = dump also CPU in interrupts */ +#define FRLOG_REGS 0 /* 1 = dump also all data/address registers */ +#define FRLOG_SIZE 8192 /* this many instructions in single dump */ + +struct rec_step { + uae_u32 d[8]; + uae_u32 a[8]; + uae_u32 pc; + uae_u16 sr; + uae_u32 usp; + uae_u32 msp; + uae_u32 isp; + uae_u16 instr; +}; + +bool cpu_flight_recorder_active = false; + +#if FRLOG_ALL +const int LOG_SIZE = 10; +#else +const int LOG_SIZE = FRLOG_SIZE; +#endif +static rec_step frlog[LOG_SIZE]; +static int log_ptr = -1; // First time initialization -static int compfn (const void *el1, const void *el2) +static const char *log_filename(void) { - return instrcount[*(const uae_u16 *)el1] < instrcount[*(const uae_u16 *)el2]; + const char *name = getenv("M68K_LOG_FILE"); + return name ? name : "log.68k"; } -static char *icountfilename (void) +void dump_flight_recorder(void) { - char *name = getenv ("INSNCOUNT"); - if (name) - return name; - return COUNT_INSTRS == 2 ? "frequent.68k" : "insncount"; +#if FRLOG_ALL + FILE *f = fopen(log_filename(), "a"); +#else + FILE *f = fopen(log_filename(), "w"); +#endif + if (f == NULL) + return; + for (int i = 0; i < LOG_SIZE; i++) { + int j = (i + log_ptr) % LOG_SIZE; + fprintf(f, "pc %08x instr %04x sr %04x usp %08x msp %08x isp %08x\n", frlog[j].pc, frlog[j].instr, frlog[j].sr, frlog[j].usp, frlog[j].msp, frlog[j].isp); + // adding a simple opcode -> assembler conversion table would help +#if FRLOG_REGS + fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", frlog[j].d[0], frlog[j].d[1], frlog[j].d[2], frlog[j].d[3]); + fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", frlog[j].d[4], frlog[j].d[5], frlog[j].d[6], frlog[j].d[7]); + fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", frlog[j].a[0], frlog[j].a[1], frlog[j].a[2], frlog[j].a[3]); + fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", frlog[j].a[4], frlog[j].a[5], frlog[j].a[6], frlog[j].a[7]); +#endif + } + fclose(f); } -void dump_counts (void) +void m68k_record_step(uaecptr pc, int opcode) { - FILE *f = fopen (icountfilename (), "w"); - unsigned long int total; - int i; + static bool last_state = false; - write_log ("Writing instruction count file...\n"); - for (i = 0; i < 65536; i++) { - opcodenums[i] = i; - total += instrcount[i]; - } - qsort (opcodenums, 65536, sizeof(uae_u16), compfn); - - fprintf (f, "Total: %lu\n", total); - for (i=0; i < 65536; i++) { - unsigned long int cnt = instrcount[opcodenums[i]]; - struct instr *dp; - struct mnemolookup *lookup; - if (!cnt) - break; - dp = table68k + opcodenums[i]; - for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) - ; - fprintf (f, "%04x: %lu %s\n", opcodenums[i], cnt, lookup->name); - } - fclose (f); -} -#else -void dump_counts (void) -{ -} +#if FRLOG_HOTKEY + if (! cpu_flight_recorder_active) { + if (last_state) { + // dump log out + dump_flight_recorder(); + + // remember last state + last_state = false; + } + return; + } +#endif + + if (! last_state) { + // reset old log + log_ptr = 0; + memset(frlog, 0, sizeof(frlog)); + // remember last state + last_state = true; + } + +#if FRLOG_REGS + for (int i = 0; i < 8; i++) { + frlog[log_ptr].d[i] = m68k_dreg(regs, i); + frlog[log_ptr].a[i] = m68k_areg(regs, i); + } +#endif + frlog[log_ptr].pc = pc; + + MakeSR(); +#if ! FRLOG_IRQ + // is CPU in interrupt handler? Quit if should not be logged. + if (regs.s && !regs.m) return; #endif + frlog[log_ptr].sr = regs.sr; + frlog[log_ptr].usp = regs.usp; + frlog[log_ptr].msp = regs.msp; + frlog[log_ptr].isp = regs.isp; + frlog[log_ptr].instr = opcode; + + log_ptr = (log_ptr + 1) % LOG_SIZE; +#if FRLOG_ALL + if (log_ptr == 0) dump_flight_recorder(); +#endif +} +#endif /* FLIGHT_RECORDER */ int broken_in; -static __inline__ unsigned int cft_map (unsigned int f) +static inline unsigned int cft_map (unsigned int f) { -#ifndef HAVE_GET_WORD_UNSWAPPED +#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU) return f; #else - return ((f >> 8) & 255) | ((f & 255) << 8); + return do_byteswap_16(f); #endif } -static void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; - -static void REGPARAM2 op_illg_1 (uae_u32 opcode) +void REGPARAM2 op_illg_1 (uae_u32 opcode) { op_illg (cft_map (opcode)); } -static void build_cpufunctbl (void) -{ - int i; - unsigned long opcode; - int cpu_level = 0; // 68000 (default) - if (CPUType == 4) - cpu_level = 4; // 68040 with FPU - else { - if (FPUType) - cpu_level = 3; // 68020 with FPU - else if (CPUType >= 2) - cpu_level = 2; // 68020 - else if (CPUType == 1) - cpu_level = 1; - } - struct cputbl *tbl = ( - cpu_level == 4 ? op_smalltbl_0 - : cpu_level == 3 ? op_smalltbl_1 - : cpu_level == 2 ? op_smalltbl_2 - : cpu_level == 1 ? op_smalltbl_3 - : op_smalltbl_4); - - for (opcode = 0; opcode < 65536; opcode++) - cpufunctbl[cft_map (opcode)] = op_illg_1; - for (i = 0; tbl[i].handler != NULL; i++) { - if (! tbl[i].specific) - cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; - } - for (opcode = 0; opcode < 65536; opcode++) { - cpuop_func *f; - - if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) - continue; - - if (table68k[opcode].handler != -1) { - f = cpufunctbl[cft_map (table68k[opcode].handler)]; - if (f == op_illg_1) - abort(); - cpufunctbl[cft_map (opcode)] = f; - } - } - for (i = 0; tbl[i].handler != NULL; i++) { - if (tbl[i].specific) - cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; - } -} void init_m68k (void) { @@ -177,343 +223,123 @@ void init_m68k (void) movem_index2[i] = 7-j; movem_next[i] = i & (~(1 << j)); } - for (i = 0 ; i < 256 ; i++) { - int j; - for (j = 7 ; j >= 0 ; j--) { - if (i & (1 << j)) break; - } - fpp_movem_index1[i] = 7-j; - fpp_movem_index2[i] = j; - fpp_movem_next[i] = i & (~(1 << j)); - } -#if COUNT_INSTRS - { - FILE *f = fopen (icountfilename (), "r"); - memset (instrcount, 0, sizeof instrcount); - if (f) { - uae_u32 opcode, count, total; - char name[20]; - write_log ("Reading instruction count file...\n"); - fscanf (f, "Total: %lu\n", &total); - while (fscanf (f, "%lx: %lu %s\n", &opcode, &count, name) == 3) { - instrcount[opcode] = count; - } - fclose(f); - } - } -#endif +#ifdef USE_JIT + /* still needed by build_comp(); FIXME */ read_table68k (); do_merges (); +#endif + fpu_init (CPUType == 4); +} + +void exit_m68k (void) +{ + fpu_exit (); - build_cpufunctbl (); + free(table68k); + table68k = NULL; } struct regstruct regs, lastint_regs; -static struct regstruct regs_backup[16]; -static int backup_pointer = 0; -static long int m68kpc_offset; +// MJ static struct regstruct regs_backup[16]; +// MJ static int backup_pointer = 0; int lastint_no; -#define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1) -#define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) -#define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) -uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf) +#ifdef FULLMMU +static inline uae_u8 get_ibyte_1(uae_u32 o) { - uae_u16 dp; - uae_s8 disp8; - uae_s16 disp16; - int r; - uae_u32 dispreg; - uaecptr addr; - uae_s32 offset = 0; - char buffer[80]; - - switch (mode){ - case Dreg: - sprintf (buffer,"D%d", reg); - break; - case Areg: - sprintf (buffer,"A%d", reg); - break; - case Aind: - sprintf (buffer,"(A%d)", reg); - break; - case Aipi: - sprintf (buffer,"(A%d)+", reg); - break; - case Apdi: - sprintf (buffer,"-(A%d)", reg); - break; - case Ad16: - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr = m68k_areg(regs,reg) + (uae_s16)disp16; - sprintf (buffer,"(A%d,$%04x) == $%08lx", reg, disp16 & 0xffff, - (unsigned long)addr); - break; - case Ad8r: - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0, disp = 0; - uae_s32 base = m68k_areg(regs,reg); - char name[10]; - sprintf (name,"A%d, ",reg); - if (dp & 0x80) { base = 0; name[0] = 0; } - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - sprintf (buffer,"(%s%c%d.%c*%d+%ld)+%ld == $%08lx", name, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), - disp,outer, - (unsigned long)addr); - } else { - addr = m68k_areg(regs,reg) + (uae_s32)((uae_s8)disp8) + dispreg; - sprintf (buffer,"(A%d, %c%d.%c*%d, $%02x) == $%08lx", reg, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), disp8, - (unsigned long)addr); - } - break; - case PC16: - addr = m68k_getpc () + m68kpc_offset; - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr += (uae_s16)disp16; - sprintf (buffer,"(PC,$%04x) == $%08lx", disp16 & 0xffff,(unsigned long)addr); - break; - case PC8r: - addr = m68k_getpc () + m68kpc_offset; - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0,disp = 0; - uae_s32 base = addr; - char name[10]; - sprintf (name,"PC, "); - if (dp & 0x80) { base = 0; name[0] = 0; } - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - sprintf (buffer,"(%s%c%d.%c*%d+%ld)+%ld == $%08lx", name, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), - disp,outer, - (unsigned long)addr); - } else { - addr += (uae_s32)((uae_s8)disp8) + dispreg; - sprintf (buffer,"(PC, %c%d.%c*%d, $%02x) == $%08lx", dp & 0x8000 ? 'A' : 'D', - (int)r, dp & 0x800 ? 'L' : 'W', 1 << ((dp >> 9) & 3), - disp8, (unsigned long)addr); - } - break; - case absw: - sprintf (buffer,"$%08lx", (unsigned long)(uae_s32)(uae_s16)get_iword_1 (m68kpc_offset)); - m68kpc_offset += 2; - break; - case absl: - sprintf (buffer,"$%08lx", (unsigned long)get_ilong_1 (m68kpc_offset)); - m68kpc_offset += 4; - break; - case imm: - switch (size){ - case sz_byte: - sprintf (buffer,"#$%02x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xff)); - m68kpc_offset += 2; - break; - case sz_word: - sprintf (buffer,"#$%04x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xffff)); - m68kpc_offset += 2; - break; - case sz_long: - sprintf (buffer,"#$%08lx", (unsigned long)(get_ilong_1 (m68kpc_offset))); - m68kpc_offset += 4; - break; - default: - break; - } - break; - case imm0: - offset = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - sprintf (buffer,"#$%02x", (unsigned int)(offset & 0xff)); - break; - case imm1: - offset = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - sprintf (buffer,"#$%04x", (unsigned int)(offset & 0xffff)); - break; - case imm2: - offset = (uae_s32)get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - sprintf (buffer,"#$%08lx", (unsigned long)offset); - break; - case immi: - offset = (uae_s32)(uae_s8)(reg & 0xff); - sprintf (buffer,"#$%08lx", (unsigned long)offset); - break; - default: - break; - } - if (buf == 0) - printf ("%s", buffer); - else - strcat (buf, buffer); - return offset; + return get_ibyte(o); } +static inline uae_u16 get_iword_1(uae_u32 o) +{ + return get_iword(o); +} +static inline uae_u32 get_ilong_1(uae_u32 o) +{ + return get_ilong(o); +} +#else +# define get_ibyte_1(o) get_byte(m68k_getpc() + (o) + 1) +# define get_iword_1(o) get_word(m68k_getpc() + (o)) +# define get_ilong_1(o) get_long(m68k_getpc() + (o)) +#endif -/* The plan is that this will take over the job of exception 3 handling - - * the CPU emulation functions will just do a longjmp to m68k_go whenever - * they hit an odd address. */ -static int verify_ea (int reg, amodes mode, wordsizes size, uae_u32 *val) +/* + * extract bitfield data from memory and return it in the MSBs + * bdata caches the unmodified data for put_bitfield() + */ +uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width) { - uae_u16 dp; - uae_s8 disp8; - uae_s16 disp16; - int r; - uae_u32 dispreg; - uaecptr addr; - uae_s32 offset = 0; - - switch (mode){ - case Dreg: - *val = m68k_dreg (regs, reg); - return 1; - case Areg: - *val = m68k_areg (regs, reg); - return 1; - - case Aind: - case Aipi: - addr = m68k_areg (regs, reg); - break; - case Apdi: - addr = m68k_areg (regs, reg); - break; - case Ad16: - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr = m68k_areg(regs,reg) + (uae_s16)disp16; - break; - case Ad8r: - addr = m68k_areg (regs, reg); - d8r_common: - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0, disp = 0; - uae_s32 base = addr; - if (dp & 0x80) base = 0; - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - } else { - addr += (uae_s32)((uae_s8)disp8) + dispreg; - } - break; - case PC16: - addr = m68k_getpc () + m68kpc_offset; - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr += (uae_s16)disp16; - break; - case PC8r: - addr = m68k_getpc () + m68kpc_offset; - goto d8r_common; - case absw: - addr = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - break; - case absl: - addr = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - break; - case imm: - switch (size){ - case sz_byte: - *val = get_iword_1 (m68kpc_offset) & 0xff; - m68kpc_offset += 2; - break; - case sz_word: - *val = get_iword_1 (m68kpc_offset) & 0xffff; - m68kpc_offset += 2; - break; - case sz_long: - *val = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - break; - default: - break; + uae_u32 tmp, res, mask; + + offset &= 7; + mask = 0xffffffffu << (32 - width); + switch ((offset + width + 7) >> 3) { + case 1: + tmp = get_byte(src); + res = tmp << (24 + offset); + bdata[0] = tmp & ~(mask >> (24 + offset)); + break; + case 2: + tmp = get_word(src); + res = tmp << (16 + offset); + bdata[0] = tmp & ~(mask >> (16 + offset)); + break; + case 3: + tmp = get_word(src); + res = tmp << (16 + offset); + bdata[0] = tmp & ~(mask >> (16 + offset)); + tmp = get_byte(src + 2); + res |= tmp << (8 + offset); + bdata[1] = tmp & ~(mask >> (8 + offset)); + break; + case 4: + tmp = get_long(src); + res = tmp << offset; + bdata[0] = tmp & ~(mask >> offset); + break; + case 5: + tmp = get_long(src); + res = tmp << offset; + bdata[0] = tmp & ~(mask >> offset); + tmp = get_byte(src + 4); + res |= tmp >> (8 - offset); + bdata[1] = tmp & ~(mask << (8 - offset)); + break; + default: + /* Panic? */ + res = 0; + break; } - return 1; - case imm0: - *val = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - return 1; - case imm1: - *val = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - return 1; - case imm2: - *val = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - return 1; - case immi: - *val = (uae_s32)(uae_s8)(reg & 0xff); - return 1; - default: - addr = 0; - break; - } - if ((addr & 1) == 0) - return 1; + return res; +} - last_addr_for_exception_3 = m68k_getpc () + m68kpc_offset; - last_fault_for_exception_3 = addr; - return 0; +/* + * write bitfield data (in the LSBs) back to memory, upper bits + * must be cleared already. + */ +void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width) +{ + offset = (offset & 7) + width; + switch ((offset + 7) >> 3) { + case 1: + put_byte(dst, bdata[0] | (val << (8 - offset))); + break; + case 2: + put_word(dst, bdata[0] | (val << (16 - offset))); + break; + case 3: + put_word(dst, bdata[0] | (val >> (offset - 16))); + put_byte(dst + 2, bdata[1] | (val << (24 - offset))); + break; + case 4: + put_long(dst, bdata[0] | (val << (32 - offset))); + break; + case 5: + put_long(dst, bdata[0] | (val >> (offset - 32))); + put_byte(dst + 4, bdata[1] | (val << (40 - offset))); + break; + } } uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp) @@ -595,6 +421,7 @@ void MakeFromSR (void) regs.t1 = (regs.sr >> 15) & 1; regs.t0 = (regs.sr >> 14) & 1; regs.s = (regs.sr >> 13) & 1; + mmu_set_super(regs.s); regs.m = (regs.sr >> 12) & 1; regs.intmask = (regs.sr >> 8) & 7; SET_XFLG ((regs.sr >> 4) & 1); @@ -602,7 +429,6 @@ void MakeFromSR (void) SET_ZFLG ((regs.sr >> 2) & 1); SET_VFLG ((regs.sr >> 1) & 1); SET_CFLG (regs.sr & 1); - if (CPUType >= 2) { if (olds != regs.s) { if (olds) { if (oldm) @@ -623,89 +449,149 @@ void MakeFromSR (void) m68k_areg(regs, 7) = regs.msp; } } - } else { - if (olds != regs.s) { - if (olds) { - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.usp; - } else { - regs.usp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - } - } - } - regs.spcflags |= SPCFLAG_INT; + SPCFLAGS_SET( SPCFLAG_INT ); if (regs.t1 || regs.t0) - regs.spcflags |= SPCFLAG_TRACE; + SPCFLAGS_SET( SPCFLAG_TRACE ); else - regs.spcflags &= ~(SPCFLAG_TRACE | SPCFLAG_DOTRACE); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); } +/* for building exception frames */ +static inline void exc_push_word(uae_u16 w) +{ + m68k_areg(regs, 7) -= 2; + put_word(m68k_areg(regs, 7), w); +} +static inline void exc_push_long(uae_u32 l) +{ + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), l); +} + +static inline void exc_make_frame( + int format, + uae_u16 sr, + uae_u32 currpc, + int nr, + uae_u32 x0, + uae_u32 x1 +) +{ + switch(format) { + case 4: + exc_push_long(x1); + exc_push_long(x0); + break; + case 3: + case 2: + exc_push_long(x0); + break; + } + + exc_push_word((format << 12) + (nr * 4)); /* format | vector */ + exc_push_long(currpc); + exc_push_word(sr); +} + +#ifdef EXCEPTIONS_VIA_LONGJMP +static int building_bus_fault_stack_frame=0; +#endif + void Exception(int nr, uaecptr oldpc) { + uae_u32 currpc = m68k_getpc (); MakeSR(); + + if (fixup.flag) + { + m68k_areg(regs, fixup.reg) = fixup.value; + fixup.flag = 0; + } + if (!regs.s) { regs.usp = m68k_areg(regs, 7); - if (CPUType >= 2) - m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; - else - m68k_areg(regs, 7) = regs.isp; + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; regs.s = 1; + mmu_set_super(1); } - if (CPUType > 0) { - if (nr == 2 || nr == 3) { - int i; - /* @@@ this is probably wrong (?) */ - for (i = 0 ; i < 12 ; i++) { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0); - } - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0xa000 + nr * 4); - } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), oldpc); - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0x2000 + nr * 4); - } else if (regs.m && nr >= 24 && nr < 32) { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), nr * 4); - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), m68k_getpc ()); - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), regs.sr); - regs.sr |= (1 << 13); - regs.msp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0x1000 + nr * 4); - } else { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), nr * 4); + + if (nr == 2) { + /* BUS ERROR handler begins */ +#ifdef ENABLE_EPSLIMITER + check_eps_limit(currpc); +#endif + // panicbug("Exception Nr. %d CPC: %08lx NPC: %08lx SP=%08lx Addr: %08lx", nr, currpc, get_long (regs.vbr + 4*nr), m68k_areg(regs, 7), regs.mmu_fault_addr); + +#ifdef EXCEPTIONS_VIA_LONGJMP + if (!building_bus_fault_stack_frame) +#else + try +#endif + { +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 1; +#endif + /* 68040 */ + exc_push_long(0); /* PD3 */ + exc_push_long(0); /* PD2 */ + exc_push_long(0); /* PD1 */ + exc_push_long(0); /* PD0/WB1D */ + exc_push_long(0); /* WB1A */ + exc_push_long(0); /* WB2D */ + exc_push_long(0); /* WB2A */ + exc_push_long(regs.wb3_data); /* WB3D */ + exc_push_long(regs.mmu_fault_addr); /* WB3A */ + exc_push_long(regs.mmu_fault_addr); + exc_push_word(0); /* WB1S */ + exc_push_word(0); /* WB2S */ + exc_push_word(regs.wb3_status); /* WB3S */ + regs.wb3_status = 0; + exc_push_word(regs.mmu_ssw); + exc_push_long(regs.mmu_fault_addr); /* EA */ + exc_make_frame(7, regs.sr, regs.fault_pc, 2, 0, 0); + } +#ifdef EXCEPTIONS_VIA_LONGJMP + else +#else + catch (m68k_exception) +#endif + { + report_double_bus_error(); +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 0; +#endif + return; + } + +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 0; +#endif + /* end of BUS ERROR handler */ + } else if (nr == 3) { + exc_make_frame(2, regs.sr, last_addr_for_exception_3, nr, + last_fault_for_exception_3 & 0xfffffffe, 0); + } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { + /* div by zero, CHK, TRAP or TRACE */ + exc_make_frame(2, regs.sr, currpc, nr, oldpc, 0); + } else if (regs.m && nr >= 24 && nr < 32) { + /* interrupts! */ + exc_make_frame(0, regs.sr, currpc, nr, 0, 0); + regs.sr |= (1 << 13); + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + + exc_make_frame(1, /* throwaway */ + regs.sr, currpc, nr, 0, 0); } else { - if (nr == 2 || nr == 3) { - m68k_areg(regs, 7) -= 12; - /* ??????? */ - if (nr == 3) { - put_long (m68k_areg(regs, 7), last_fault_for_exception_3); - put_word (m68k_areg(regs, 7)+4, last_op_for_exception_3); - put_long (m68k_areg(regs, 7)+8, last_addr_for_exception_3); - } - write_log ("Exception!\n"); - goto kludge_me_do; - } + exc_make_frame(0, regs.sr, currpc, nr, 0, 0); } - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), m68k_getpc ()); -kludge_me_do: - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), regs.sr); m68k_setpc (get_long (regs.vbr + 4*nr)); + SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); fill_prefetch_0 (); regs.t1 = regs.t0 = regs.m = 0; - regs.spcflags &= ~(SPCFLAG_TRACE | SPCFLAG_DOTRACE); + SPCFLAGS_CLEAR(SPCFLAG_TRACE | SPCFLAG_DOTRACE); } static void Interrupt(int nr) @@ -716,62 +602,90 @@ static void Interrupt(int nr) Exception(nr+24, 0); regs.intmask = nr; - regs.spcflags |= SPCFLAG_INT; + SPCFLAGS_SET( SPCFLAG_INT ); } -static int caar, cacr, tc, itt0, itt1, dtt0, dtt1; +static void SCCInterrupt(int nr) +{ + // fprintf(stderr, "CPU: in SCCInterrupt\n"); + lastint_regs = regs; + lastint_no = 5;// ex 5 + Exception(nr, 0); + + regs.intmask = 5;// ex 5 +} -void m68k_move2c (int regno, uae_u32 *regp) +static void MFPInterrupt(int nr) +{ + // fprintf(stderr, "CPU: in MFPInterrupt\n"); + lastint_regs = regs; + lastint_no = 6; + Exception(nr, 0); + + regs.intmask = 6; +} + +int m68k_move2c (int regno, uae_u32 *regp) { - if (CPUType == 1 && (regno & 0x7FF) > 1) - op_illg (0x4E7B); - else switch (regno) { case 0: regs.sfc = *regp & 7; break; case 1: regs.dfc = *regp & 7; break; - case 2: cacr = *regp & 0x3; break; /* ignore C and CE */ - case 3: tc = *regp & 0xc000; break; - case 4: itt0 = *regp & 0xffffe364; break; - case 5: itt1 = *regp & 0xffffe364; break; - case 6: dtt0 = *regp & 0xffffe364; break; - case 7: dtt1 = *regp & 0xffffe364; break; + case 2: regs.cacr = *regp & 0x80008000; +#ifdef USE_JIT + set_cache_state(regs.cacr & 0x8000); + if (*regp & 0x08) { /* Just to be on the safe side */ + flush_icache(2); + } +#endif + break; + case 3: mmu_set_tc(*regp & 0xc000); break; + case 4: + case 5: + case 6: + case 7: mmu_set_ttr(regno, *regp & 0xffffe364); break; case 0x800: regs.usp = *regp; break; case 0x801: regs.vbr = *regp; break; - case 0x802: caar = *regp &0xfc; break; + case 0x802: regs.caar = *regp & 0xfc; break; case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; + case 0x805: mmu_set_mmusr(*regp); break; + case 0x806: regs.urp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; + case 0x807: regs.srp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; default: op_illg (0x4E7B); - break; + return 0; } + return 1; } -void m68k_movec2 (int regno, uae_u32 *regp) +int m68k_movec2 (int regno, uae_u32 *regp) { - if (CPUType == 1 && (regno & 0x7FF) > 1) - op_illg (0x4E7A); - else switch (regno) { case 0: *regp = regs.sfc; break; case 1: *regp = regs.dfc; break; - case 2: *regp = cacr; break; - case 3: *regp = tc; break; - case 4: *regp = itt0; break; - case 5: *regp = itt1; break; - case 6: *regp = dtt0; break; - case 7: *regp = dtt1; break; + case 2: *regp = regs.cacr; break; + case 3: *regp = regs.tc; break; + case 4: *regp = regs.itt0; break; + case 5: *regp = regs.itt1; break; + case 6: *regp = regs.dtt0; break; + case 7: *regp = regs.dtt1; break; case 0x800: *regp = regs.usp; break; case 0x801: *regp = regs.vbr; break; - case 0x802: *regp = caar; break; + case 0x802: *regp = regs.caar; break; case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; + case 0x805: *regp = regs.mmusr; break; + case 0x806: *regp = regs.urp; break; + case 0x807: *regp = regs.srp; break; default: op_illg (0x4E7A); - break; + return 0; } + return 1; } -static __inline__ int +#if !defined(uae_s64) +static inline int div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem) { uae_u32 q = 0, cbit = 0; @@ -795,8 +709,9 @@ div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem = src_hi; return 0; } +#endif -void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) +void m68k_divl (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra, uaecptr oldpc) { #if defined(uae_s64) if (src == 0) { @@ -917,7 +832,8 @@ void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) #endif } -static __inline__ void +#if !defined(uae_s64) +static inline void mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) { uae_u32 r0 = (src1 & 0xffff) * (src2 & 0xffff); @@ -935,8 +851,9 @@ mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) *dst_lo = lo; *dst_hi = r3; } +#endif -void m68k_mull (uae_u32 opcode, uae_u32 src, uae_u16 extra) +void m68k_mull (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra) { #if defined(uae_s64) if (extra & 0x800) { @@ -1022,16 +939,16 @@ void m68k_mull (uae_u32 opcode, uae_u32 src, uae_u16 extra) } #endif } -static char* ccnames[] = -{ "T ","F ","HI","LS","CC","CS","NE","EQ", - "VC","VS","PL","MI","GE","LT","GT","LE" }; + +// If value is greater than zero, this means we are still processing an EmulOp +// because the counter is incremented only in m68k_execute(), i.e. interpretive +// execution only +#ifdef USE_JIT +static int m68k_execute_depth = 0; +#endif void m68k_reset (void) { - m68k_areg (regs, 7) = 0x2000; - m68k_setpc (ROMBaseMac + 0x2a); - fill_prefetch_0 (); - regs.kick_mask = 0xF80000; regs.s = 1; regs.m = 0; regs.stopped = 0; @@ -1042,75 +959,241 @@ void m68k_reset (void) SET_CFLG (0); SET_VFLG (0); SET_NFLG (0); - regs.spcflags = 0; + SPCFLAGS_INIT( 0 ); regs.intmask = 7; regs.vbr = regs.sfc = regs.dfc = 0; - regs.fpcr = regs.fpsr = regs.fpiar = 0; + + // need to ensure the following order of initialization is correct + // (it is definitely better than what it was before this commit + // since it was reading from 0x00000000 in User mode and with active MMU) + mmu_set_tc(regs.tc & ~0x8000); /* disable mmu */ + m68k_areg (regs, 7) = phys_get_long(0x00000000); + m68k_setpc (phys_get_long(0x00000004)); + fill_prefetch_0 (); + + /* gb-- moved into {fpp,fpu_x86}.cpp::fpu_init() + regs.fpcr = regs.fpsr = regs.fpiar = 0; */ + fpu_reset(); + // MMU + mmu_reset(); + mmu_set_super(1); + // Cache + regs.cacr = 0; + regs.caar = 0; +#ifdef FLIGHT_RECORDER + log_ptr = 0; + memset(frlog, 0, sizeof(frlog)); +#endif } -void REGPARAM2 op_illg (uae_u32 opcode) +void m68k_emulop_return(void) +{ + SPCFLAGS_SET( SPCFLAG_BRK ); + quit_program = 1; +} + +static void save_regs(struct M68kRegisters &r) +{ + int i; + + for (i=0; i<8; i++) { + r.d[i] = m68k_dreg(regs, i); + r.a[i] = m68k_areg(regs, i); + } + r.pc = m68k_getpc(); + MakeSR(); + r.sr = regs.sr; + r.isp = regs.isp; + r.usp = regs.usp; + r.msp = regs.msp; + if ((r.sr & 0x2000) == 0) + r.usp = r.a[7]; + else if ((r.sr & 0x1000) != 0) + r.msp = r.a[7]; + else + r.isp = r.a[7]; +} + +static void restore_regs(struct M68kRegisters &r) { - uaecptr pc = m68k_getpc (); + int i; + + for (i=0; i<8; i++) { + m68k_dreg(regs, i) = r.d[i]; + m68k_areg(regs, i) = r.a[i]; + } + regs.isp = r.isp; + regs.usp = r.usp; + regs.msp = r.msp; + regs.sr = r.sr; + MakeFromSR(); +} +void m68k_emulop(uae_u32 opcode) +{ + struct M68kRegisters r; + save_regs(r); + EmulOp(opcode, &r); + restore_regs(r); +} - if ((opcode & 0xFF00) == 0x7100) { - struct M68kRegisters r; - int i; +// void m68k_natfeat_id(void) +// { +// struct M68kRegisters r; - // Return from Execute68k()? - if (opcode == M68K_EXEC_RETURN) { - regs.spcflags |= SPCFLAG_BRK; - quit_program = 1; - return; - } +// /* is it really necessary to save all registers? */ +// save_regs(r); - // Call EMUL_OP opcode - for (i=0; i<8; i++) { - r.d[i] = m68k_dreg(regs, i); - r.a[i] = m68k_areg(regs, i); - } - MakeSR(); - r.sr = regs.sr; - EmulOp(opcode, &r); - for (i=0; i<8; i++) { - m68k_dreg(regs, i) = r.d[i]; - m68k_areg(regs, i) = r.a[i]; - } - regs.sr = r.sr; - MakeFromSR(); - m68k_incpc(2); - fill_prefetch_0 (); - return; - } +// memptr stack = r.a[7] + 4; /* skip return address */ +// r.d[0] = nf_get_id(stack); - if ((opcode & 0xF000) == 0xA000) { - Exception(0xA,0); - return; - } +// restore_regs(r); +// } -// write_log ("Illegal instruction: %04x at %08lx\n", opcode, pc); +// void m68k_natfeat_call(void) +// { +// struct M68kRegisters r; - if ((opcode & 0xF000) == 0xF000) { - Exception(0xB,0); - return; - } +// /* is it really necessary to save all registers? */ +// save_regs(r); + +// memptr stack = r.a[7] + 4; /* skip return address */ +// bool isSupervisorMode = ((r.sr & 0x2000) == 0x2000); +// r.d[0] = nf_call(stack, isSupervisorMode); - write_log ("Illegal instruction: %04x at %08lx\n", opcode, pc); +// restore_regs(r); +// } - Exception (4,0); +static int m68k_call(uae_u32 pc) +{ + VOLATILE int exc = 0; + m68k_setpc(pc); + TRY(prb) { +#ifdef USE_JIT + if (bx_options.jit.jit) { + exec_nostats(); + // m68k_do_compile_execute(); + // The above call to m68k_do_compile_execute fails with BadAccess in sigsegv_handler (MAC, if it is executed after the first compile_block) + // (NULL pointer to addr_instr). + // Call exec_nostats avoids calling compile_block, because stack modification is only temporary + // which will fill up compile cache with BOGUS data. + // we can call exec_nostats directly, do our code, and return back here. + } + else +#endif + m68k_do_execute(); + } + CATCH(prb) { + exc = int(prb); + } + return exc; } -void mmu_op(uae_u32 opcode, uae_u16 extra) +static uae_u32 m68k_alloca(int size) { - if ((extra & 0xB000) == 0) { /* PMOVE instruction */ + uae_u32 sp = (m68k_areg(regs, 7) - size) & ~1; + m68k_areg(regs, 7) = sp; + if ((regs.sr & 0x2000) == 0) + regs.usp = sp; + else if ((regs.sr & 0x1000) != 0) + regs.msp = sp; + else + regs.isp = sp; + return sp; +} - } else if ((extra & 0xF000) == 0x2000) { /* PLOAD instruction */ - } else if ((extra & 0xF000) == 0x8000) { /* PTEST instruction */ - } else - op_illg (opcode); +// uae_u32 linea68000(volatile uae_u16 opcode) +// { +// sigjmp_buf jmp; +// struct M68kRegisters r; +// volatile uae_u32 abase = 0; + +// SAVE_EXCEPTION; +// save_regs(r); + +// const int sz = 8 + sizeof(void *); +// volatile uae_u32 sp = 0; +// uae_u32 backup[(sz + 3) / 4]; + +// if (sigsetjmp(jmp, 1) == 0) +// { +// void *p = jmp; +// uae_u8 *sp_p; +// int exc; + +// sp = m68k_alloca(sz); +// memcpy(backup, phys_get_real_address(sp), sz); + +// WriteHWMemInt16(sp, opcode); +// WriteHWMemInt16(sp + 2, 0xa0ff); +// WriteHWMemInt32(sp + 4, 13); +// sp_p = phys_get_real_address(sp + 8); +// *((void **)sp_p) = p; +// if ((exc = m68k_call(sp)) != 0) +// { +// panicbug("exception %d in LINEA", exc); +// m68k_dreg(regs, 0) = 0; +// } +// } else +// { +// abase = m68k_dreg(regs, 0); +// } + +// if (sp) { +// memcpy(phys_get_real_address(sp), backup, sz); +// } +// restore_regs(r); +// m68k_setpc(r.pc); +// RESTORE_EXCEPTION; +// return abase; +// } + + +static void rts68000() +{ + uae_u32 SP = m68k_getpc() + 6; + sigjmp_buf *p; + uae_u8 *sp_p = phys_get_real_address(SP); + + p = (sigjmp_buf *)(*((void **)sp_p)); + SP += sizeof(void *); + m68k_areg(regs, 7) = SP; + siglongjmp(*p, 1); } -static int n_insns = 0, n_spcinsns = 0; +void REGPARAM2 op_illg (uae_u32 opcode) +{ + uaecptr pc = m68k_getpc (); + + if ((opcode & 0xF000) == 0xA000) { + // if (opcode == 0xa0ff) + // { + // uae_u32 call = ReadHWMemInt32(pc + 2); + // switch (call) + // { + // case 13: + // rts68000(); + // return; + // } + // m68k_setpc(pc + 6); + // } + Exception(0xA,0); + return; + } + + if ((opcode & 0xF000) == 0xF000) { + Exception(0xB,0); + return; + } + + D(bug("Illegal instruction: %04x at %08x", opcode, pc)); +#if defined(USE_JIT) && defined(JIT_DEBUG) + compiler_dumpstate(); +#endif + + Exception (4,0); + return; +} static uaecptr last_trace_ad = 0; @@ -1123,7 +1206,7 @@ static void do_trace (void) /* We can afford this to be inefficient... */ m68k_setpc (m68k_getpc ()); fill_prefetch_0 (); - opcode = get_word (regs.pc); + opcode = get_word(m68k_getpc()); if (opcode == 0x4e72 /* RTE */ || opcode == 0x4e74 /* RTD */ || opcode == 0x4e75 /* RTS */ @@ -1139,216 +1222,362 @@ static void do_trace (void) && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) { last_trace_ad = m68k_getpc (); - regs.spcflags &= ~SPCFLAG_TRACE; - regs.spcflags |= SPCFLAG_DOTRACE; + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); } } else if (regs.t1) { last_trace_ad = m68k_getpc (); - regs.spcflags &= ~SPCFLAG_TRACE; - regs.spcflags |= SPCFLAG_DOTRACE; + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); } } - -static int do_specialties (void) +// #define SERVE_VBL_MFP(resetStop) \ +// { \ +// if (SPCFLAGS_TEST( SPCFLAG_INT3|SPCFLAG_VBL|SPCFLAG_INT5|SPCFLAG_SCC|SPCFLAG_MFP )) { \ +// if (SPCFLAGS_TEST( SPCFLAG_INT3 )) { \ +// if (3 > regs.intmask) { \ +// Interrupt(3); \ +// regs.stopped = 0; \ +// SPCFLAGS_CLEAR( SPCFLAG_INT3 ); \ +// if (resetStop) \ +// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ +// } \ +// } \ +// if (SPCFLAGS_TEST( SPCFLAG_VBL )) { \ +// if (4 > regs.intmask) { \ +// Interrupt(4); \ +// regs.stopped = 0; \ +// SPCFLAGS_CLEAR( SPCFLAG_VBL ); \ +// if (resetStop) \ +// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ +// } \ +// } \ +// if (SPCFLAGS_TEST( SPCFLAG_INT5 )) { \ +// if (5 > regs.intmask) { \ +// Interrupt(5); \ +// regs.stopped = 0; \ +// SPCFLAGS_CLEAR( SPCFLAG_INT5 ); \ +// if (resetStop) \ +// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ +// } \ +// } \ +// if (SPCFLAGS_TEST( SPCFLAG_SCC )) { \ +// if (5 > regs.intmask) { \ +// int vector_number=SCCdoInterrupt(); \ +// if(vector_number){ \ +// SCCInterrupt(vector_number); \ +// regs.stopped = 0; \ +// SPCFLAGS_CLEAR( SPCFLAG_SCC); \ +// if (resetStop) \ +// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ +// } \ +// else \ +// SPCFLAGS_CLEAR( SPCFLAG_SCC ); \ +// } \ +// } \ +// if (SPCFLAGS_TEST( SPCFLAG_MFP )) { \ +// if (6 > regs.intmask) { \ +// int vector_number = MFPdoInterrupt(); \ +// if (vector_number) { \ +// MFPInterrupt(vector_number); \ +// regs.stopped = 0; \ +// if (resetStop) \ +// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ +// } \ +// else \ +// SPCFLAGS_CLEAR( SPCFLAG_MFP ); \ +// } \ +// } \ +// } \ +// } + +// #define SERVE_INTERNAL_IRQ() \ +// { \ +// if (SPCFLAGS_TEST( SPCFLAG_INTERNAL_IRQ )) { \ +// SPCFLAGS_CLEAR( SPCFLAG_INTERNAL_IRQ ); \ +// invoke200HzInterrupt(); \ +// } \ +// } + +int m68k_do_specialties(void) { - /*n_spcinsns++;*/ - if (regs.spcflags & SPCFLAG_DOTRACE) { - Exception (9,last_trace_ad); - } - while (regs.spcflags & SPCFLAG_STOP) { - if (regs.spcflags & (SPCFLAG_INT | SPCFLAG_DOINT)){ - int intr = intlev (); - regs.spcflags &= ~(SPCFLAG_INT | SPCFLAG_DOINT); - if (intr != -1 && intr > regs.intmask) { - Interrupt (intr); - regs.stopped = 0; - regs.spcflags &= ~SPCFLAG_STOP; - } + // SERVE_INTERNAL_IRQ(); +#ifdef USE_JIT + // Block was compiled + SPCFLAGS_CLEAR( SPCFLAG_JIT_END_COMPILE ); + + // Retain the request to get out of compiled code until + // we reached the toplevel execution, i.e. the one that + // can compile then run compiled code. This also means + // we processed all (nested) EmulOps + if ((m68k_execute_depth == 0) && SPCFLAGS_TEST( SPCFLAG_JIT_EXEC_RETURN )) + SPCFLAGS_CLEAR( SPCFLAG_JIT_EXEC_RETURN ); +#endif + /*n_spcinsns++;*/ + if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { + Exception (9,last_trace_ad); } - } - if (regs.spcflags & SPCFLAG_TRACE) - do_trace (); - - if (regs.spcflags & SPCFLAG_DOINT) { - int intr = intlev (); - regs.spcflags &= ~SPCFLAG_DOINT; - if (intr != -1 && intr > regs.intmask) { - Interrupt (intr); - regs.stopped = 0; +#if 0 /* not for ARAnyM; emulating 040 only */ + if ((regs.spcflags & SPCFLAG_STOP) && regs.s == 0 && currprefs.cpu_model <= 68010) { + // 68000/68010 undocumented special case: + // if STOP clears S-bit and T was not set: + // cause privilege violation exception, PC pointing to following instruction. + // If T was set before STOP: STOP works as documented. + m68k_unset_stop(); + Exception(8, 0); } - } - if (regs.spcflags & SPCFLAG_INT) { - regs.spcflags &= ~SPCFLAG_INT; - regs.spcflags |= SPCFLAG_DOINT; - } - if (regs.spcflags & (SPCFLAG_BRK | SPCFLAG_MODE_CHANGE)) { - regs.spcflags &= ~(SPCFLAG_BRK | SPCFLAG_MODE_CHANGE); - return 1; - } - return 0; -} - -static void m68k_run_1 (void) -{ - for (;;) { - uae_u32 opcode = GET_OPCODE; - (*cpufunctbl[opcode])(opcode); - if (regs.spcflags) { - if (do_specialties()) - return; +#endif + while (SPCFLAGS_TEST( SPCFLAG_STOP )) { + //TODO: Check + if ((regs.sr & 0x700) == 0x700) + { + // panicbug("STOPed with interrupts disabled, exiting; pc=$%08x", m68k_getpc()); + m68k_dumpstate (stderr, NULL); +#if 0 + quit_program = 1; +#endif +#ifdef FULL_HISTORY + ndebug::showHistory(20, false); + m68k_dumpstate (stderr, NULL); +#endif + return 1; + } + if (SPCFLAGS_TEST( SPCFLAG_INT | SPCFLAG_DOINT )){ + SPCFLAGS_CLEAR( SPCFLAG_INT | SPCFLAG_DOINT ); + int intr = intlev (); + if (intr != -1 && intr > regs.intmask) { + Interrupt (intr); + regs.stopped = 0; + SPCFLAGS_CLEAR( SPCFLAG_STOP ); + } } + + // SERVE_INTERNAL_IRQ(); + // SERVE_VBL_MFP(true); + if (SPCFLAGS_TEST( SPCFLAG_BRK )) + break; } -} + if (SPCFLAGS_TEST( SPCFLAG_TRACE )) + do_trace (); -#define m68k_run1 m68k_run_1 + // SERVE_VBL_MFP(false); -int in_m68k_go = 0; + if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { + SPCFLAGS_CLEAR( SPCFLAG_DOINT ); + int intr = intlev (); + if (intr != -1 && intr > regs.intmask) { + Interrupt (intr); + regs.stopped = 0; + } + } -void m68k_go (int may_quit) -{ -// m68k_go() must be reentrant for Execute68k() and Execute68kTrap() to work -/* - if (in_m68k_go || !may_quit) { - write_log("Bug! m68k_go is not reentrant.\n"); - abort(); - } -*/ - in_m68k_go++; - for (;;) { - if (quit_program > 0) { - if (quit_program == 1) - break; - quit_program = 0; - m68k_reset (); + if (SPCFLAGS_TEST( SPCFLAG_INT )) { + SPCFLAGS_CLEAR( SPCFLAG_INT ); + SPCFLAGS_SET( SPCFLAG_DOINT ); } - m68k_run1(); - } - if (debugging) { - uaecptr nextpc; - m68k_dumpstate(&nextpc); - exit(1); + + if (SPCFLAGS_TEST( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ )) { + SPCFLAGS_CLEAR( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ ); + return 1; } - in_m68k_go--; + + return 0; } -static void m68k_verify (uaecptr addr, uaecptr *nextpc) +void m68k_do_execute (void) { - uae_u32 opcode, val; - struct instr *dp; + uae_u32 pc; + uae_u32 opcode; + for (;;) { + regs.fault_pc = pc = m68k_getpc(); +#ifdef FULL_HISTORY +#ifdef NEED_TO_DEBUG_BADLY + history[lasthist] = regs; + historyf[lasthist] = regflags; +#else + history[lasthist] = m68k_getpc(); +#endif + if (++lasthist == MAX_HIST) lasthist = 0; + if (lasthist == firsthist) { + if (++firsthist == MAX_HIST) firsthist = 0; + } +#endif - opcode = get_iword_1(0); - last_op_for_exception_3 = opcode; - m68kpc_offset = 2; +#ifndef FULLMMU +#ifdef ARAM_PAGE_CHECK + if (((pc ^ pc_page) > ARAM_PAGE_MASK)) { + check_ram_boundary(pc, 2, false); + pc_page = pc; + pc_offset = (uintptr)get_real_address(pc, 0, sz_word) - pc; + } +#else + check_ram_boundary(pc, 2, false); +#endif +#endif + opcode = GET_OPCODE; +#ifdef FLIGHT_RECORDER + m68k_record_step(m68k_getpc(), opcode); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + regs.fault_pc = m68k_getpc(); - if (cpufunctbl[cft_map (opcode)] == op_illg_1) { - opcode = 0x4AFC; + if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { + if (m68k_do_specialties()) + return; + } } - dp = table68k + opcode; +} - if (dp->suse) { - if (!verify_ea (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, &val)) { - Exception (3, 0); - return; +void m68k_execute (void) +{ +#ifdef USE_JIT + m68k_execute_depth++; +#endif +#ifdef DEBUGGER + VOLATILE bool after_exception = false; +#endif + +setjmpagain: + TRY(prb) { + for (;;) { + if (quit_program > 0) { + if (quit_program == 1) { +#ifdef FLIGHT_RECORDER + dump_flight_recorder(); +#endif + break; + } + quit_program = 0; + m68k_reset (); + } +#ifdef DEBUGGER + if (debugging && !after_exception) debug(); + after_exception = false; +#endif + m68k_do_execute(); } } - if (dp->duse) { - if (!verify_ea (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, &val)) { - Exception (3, 0); - return; - } + CATCH(prb) { + Exception(prb, 0); +#ifdef DEBUGGER + after_exception = true; +#endif + goto setjmpagain; } + +#ifdef USE_JIT + m68k_execute_depth--; +#endif } -void m68k_disasm (uaecptr addr, uaecptr *nextpc, int cnt) +void m68k_disasm (FILE *f, uaecptr addr, uaecptr *nextpc, int cnt) { - uaecptr newpc = 0; - m68kpc_offset = addr - m68k_getpc (); +#ifdef HAVE_DISASM_M68K + char buf[256]; + int size; + + disasm_info.memory_vma = addr; while (cnt-- > 0) { - char instrname[20],*ccpt; - int opwords; - uae_u32 opcode; - struct mnemolookup *lookup; - struct instr *dp; - printf ("%08lx: ", m68k_getpc () + m68kpc_offset); - for (opwords = 0; opwords < 5; opwords++){ - printf ("%04x ", get_iword_1 (m68kpc_offset + opwords*2)); - } - opcode = get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - if (cpufunctbl[cft_map (opcode)] == op_illg_1) { - opcode = 0x4AFC; - } - dp = table68k + opcode; - for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) - ; - - strcpy (instrname, lookup->name); - ccpt = strstr (instrname, "cc"); - if (ccpt != 0) { - strncpy (ccpt, ccnames[dp->cc], 2); - } - printf ("%s", instrname); - switch (dp->size){ - case sz_byte: printf (".B "); break; - case sz_word: printf (".W "); break; - case sz_long: printf (".L "); break; - default: printf (" "); break; + size = m68k_disasm_to_buf(&disasm_info, buf); + fprintf(f, "%s\n", buf); + if (size < 0) + break; } + if (nextpc) + *nextpc = disasm_info.memory_vma; +#else + if (nextpc) + *nextpc = addr; + (void) f; + (void) cnt; +#endif +} - if (dp->suse) { - newpc = m68k_getpc () + m68kpc_offset; - newpc += ShowEA (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); - } - if (dp->suse && dp->duse) - printf (","); - if (dp->duse) { - newpc = m68k_getpc () + m68kpc_offset; - newpc += ShowEA (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 0); - } - if (ccpt != 0) { - if (cctrue(dp->cc)) - printf (" == %08lx (TRUE)", newpc); - else - printf (" == %08lx (FALSE)", newpc); - } else if ((opcode & 0xff00) == 0x6100) /* BSR */ - printf (" == %08lx", newpc); - printf ("\n"); +#ifdef DEBUGGER +void newm68k_disasm(FILE *f, uaecptr addr, uaecptr *nextpc, unsigned int cnt) +{ +#ifdef HAVE_DISASM_M68K + char buf[256]; + + disasm_info.memory_vma = addr; + if (cnt == 0) { + m68k_disasm_to_buf(&disasm_info, buf); + } else { + while (cnt-- > 0) { + m68k_disasm_to_buf(&disasm_info, buf); + fprintf(f, "%s\n", buf); + } } if (nextpc) - *nextpc = m68k_getpc () + m68kpc_offset; + *nextpc = disasm_info.memory_vma; +#else + if (nextpc) + *nextpc = addr; + (void) cnt; +#endif +} + +#endif /* DEBUGGER */ + +#ifdef FULL_HISTORY +void showDisasm(uaecptr addr) { +#ifdef HAVE_DISASM_M68K + char buf[256]; + + disasm_info.memory_vma = addr; + m68k_disasm_to_buf(&disasm_info, buf); + bug("%s", buf); +#else + (void) addr; +#endif } +#endif /* FULL_HISTORY */ -void m68k_dumpstate (uaecptr *nextpc) +void m68k_dumpstate (FILE *out, uaecptr *nextpc) { int i; for (i = 0; i < 8; i++){ - printf ("D%d: %08lx ", i, m68k_dreg(regs, i)); - if ((i & 3) == 3) printf ("\n"); + fprintf (out, "D%d: %08lx ", i, (unsigned long)m68k_dreg(regs, i)); + if ((i & 3) == 3) fprintf (out, "\n"); } for (i = 0; i < 8; i++){ - printf ("A%d: %08lx ", i, m68k_areg(regs, i)); - if ((i & 3) == 3) printf ("\n"); + fprintf (out, "A%d: %08lx ", i, (unsigned long)m68k_areg(regs, i)); + if ((i & 3) == 3) fprintf (out, "\n"); } if (regs.s == 0) regs.usp = m68k_areg(regs, 7); if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); - printf ("USP=%08lx ISP=%08lx MSP=%08lx VBR=%08lx\n", - regs.usp,regs.isp,regs.msp,regs.vbr); - printf ("T=%d%d S=%d M=%d X=%d N=%d Z=%d V=%d C=%d IMASK=%d\n", + fprintf (out, "USP=%08lx ISP=%08lx MSP=%08lx VBR=%08lx\n", + (unsigned long)regs.usp, (unsigned long)regs.isp, + (unsigned long)regs.msp, (unsigned long)regs.vbr); + fprintf (out, "T=%d%d S=%d M=%d X=%d N=%d Z=%d V=%d C=%d IMASK=%d TCE=%d TCP=%d\n", regs.t1, regs.t0, regs.s, regs.m, - GET_XFLG, GET_NFLG, GET_ZFLG, GET_VFLG, GET_CFLG, regs.intmask); + (int)GET_XFLG, (int)GET_NFLG, (int)GET_ZFLG, (int)GET_VFLG, (int)GET_CFLG, regs.intmask, + regs.mmu_enabled, regs.mmu_pagesize_8k); + fprintf (out, "CACR=%08lx CAAR=%08lx URP=%08lx SRP=%08lx\n", + (unsigned long)regs.cacr, + (unsigned long)regs.caar, + (unsigned long)regs.urp, + (unsigned long)regs.srp); + fprintf (out, "DTT0=%08lx DTT1=%08lx ITT0=%08lx ITT1=%08lx\n", + (unsigned long)regs.dtt0, + (unsigned long)regs.dtt1, + (unsigned long)regs.itt0, + (unsigned long)regs.itt1); for (i = 0; i < 8; i++){ - printf ("FP%d: %g ", i, regs.fp[i]); - if ((i & 3) == 3) printf ("\n"); + fprintf (out, "FP%d: %g ", i, (double)fpu.registers[i]); + if ((i & 3) == 3) fprintf (out, "\n"); } - printf ("N=%d Z=%d I=%d NAN=%d\n", +#if 0 + fprintf (out, "N=%d Z=%d I=%d NAN=%d\n", (regs.fpsr & 0x8000000) != 0, (regs.fpsr & 0x4000000) != 0, (regs.fpsr & 0x2000000) != 0, (regs.fpsr & 0x1000000) != 0); - - m68k_disasm(m68k_getpc (), nextpc, 1); +#endif + m68k_disasm(out, m68k_getpc (), nextpc, 1); if (nextpc) - printf ("next PC: %08lx\n", *nextpc); + fprintf (out, "next PC: %08lx\n", (unsigned long)*nextpc); } diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index dc174a783..13a51b82b 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -1,3 +1,27 @@ +/* + * newcpu.h - CPU emulation + * + * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * @@ -6,41 +30,22 @@ * Copyright 1995 Bernd Schmidt */ -#define SPCFLAG_STOP 2 -#define SPCFLAG_DISK 4 -#define SPCFLAG_INT 8 -#define SPCFLAG_BRK 16 -#define SPCFLAG_EXTRA_CYCLES 32 -#define SPCFLAG_TRACE 64 -#define SPCFLAG_DOTRACE 128 -#define SPCFLAG_DOINT 256 -#define SPCFLAG_BLTNASTY 512 -#define SPCFLAG_EXEC 1024 -#define SPCFLAG_MODE_CHANGE 8192 - -#ifndef SET_CFLG - -#define SET_CFLG(x) (CFLG = (x)) -#define SET_NFLG(x) (NFLG = (x)) -#define SET_VFLG(x) (VFLG = (x)) -#define SET_ZFLG(x) (ZFLG = (x)) -#define SET_XFLG(x) (XFLG = (x)) - -#define GET_CFLG CFLG -#define GET_NFLG NFLG -#define GET_VFLG VFLG -#define GET_ZFLG ZFLG -#define GET_XFLG XFLG - -#define CLEAR_CZNV do { \ - SET_CFLG (0); \ - SET_ZFLG (0); \ - SET_NFLG (0); \ - SET_VFLG (0); \ -} while (0) - -#define COPY_CARRY (SET_XFLG (GET_CFLG)) -#endif +#ifndef NEWCPU_H +#define NEWCPU_H + +#include "sysdeps.h" +#include "registers.h" +#include "spcflags.h" +#include "m68k.h" +#include "memory.h" + +# include + +extern struct fixup { + int flag; + uae_u32 reg; + uaecptr value; +}fixup; extern int areg_byteinc[]; extern int imm8_table[]; @@ -49,112 +54,126 @@ extern int movem_index1[256]; extern int movem_index2[256]; extern int movem_next[256]; -extern int fpp_movem_index1[256]; -extern int fpp_movem_index2[256]; -extern int fpp_movem_next[256]; - extern int broken_in; +#ifdef X86_ASSEMBLY +/* This hack seems to force all register saves (pushl %reg) to be moved to the + begining of the function, thus making it possible to cpuopti to remove them + since m68k_run_1 will save those registers before calling the instruction + handler */ +# define cpuop_tag(tag) __asm__ __volatile__ ( "#cpuop_" tag ) +#else +# define cpuop_tag(tag) ; +#endif + +#define cpuop_begin() do { cpuop_tag("begin"); } while (0) +#define cpuop_end() do { cpuop_tag("end"); } while (0) + typedef void REGPARAM2 cpuop_func (uae_u32) REGPARAM; struct cputbl { cpuop_func *handler; - int specific; + uae_u16 specific; uae_u16 opcode; }; -extern void REGPARAM2 op_illg (uae_u32) REGPARAM; +extern cpuop_func *cpufunctbl[65536]; -typedef char flagtype; +#ifdef USE_JIT +typedef void compop_func (uae_u32) REGPARAM; + +struct comptbl { + compop_func *handler; + uae_u32 opcode; + uae_u32 specific; +#define COMP_OPCODE_ISJUMP 0x0001 +#define COMP_OPCODE_LONG_OPCODE 0x0002 +#define COMP_OPCODE_CMOV 0x0004 +#define COMP_OPCODE_ISADDX 0x0008 +#define COMP_OPCODE_ISCJUMP 0x0010 +#define COMP_OPCODE_USES_FPU 0x0020 +}; +#endif -extern struct regstruct -{ - uae_u32 regs[16]; - uaecptr usp,isp,msp; - uae_u16 sr; - flagtype t1; - flagtype t0; - flagtype s; - flagtype m; - flagtype x; - flagtype stopped; - int intmask; - - uae_u32 pc; - uae_u8 *pc_p; - uae_u8 *pc_oldp; - - uae_u32 vbr,sfc,dfc; - - double fp[8]; - uae_u32 fpcr,fpsr,fpiar; - - uae_u32 spcflags; - uae_u32 kick_mask; - - /* Fellow sources say this is 4 longwords. That's impossible. It needs - * to be at least a longword. The HRM has some cryptic comment about two - * instructions being on the same longword boundary. - * The way this is implemented now seems like a good compromise. - */ - uae_u32 prefetch; -} regs, lastint_regs; +extern void REGPARAM2 op_illg (uae_u32) REGPARAM; #define m68k_dreg(r,num) ((r).regs[(num)]) #define m68k_areg(r,num) (((r).regs + 8)[(num)]) -#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1)) -#define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o))) -#define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o))) +#ifdef FULLMMU +static ALWAYS_INLINE uae_u8 get_ibyte(uae_u32 o) +{ + return mmu_get_byte(m68k_getpc() + o + 1, 0, sz_byte); +} +static ALWAYS_INLINE uae_u16 get_iword(uae_u32 o) +{ + return mmu_get_word(m68k_getpc() + o, 0, sz_word); +} +static ALWAYS_INLINE uae_u32 get_ilong(uae_u32 o) +{ + uaecptr addr = m68k_getpc() + o; + + if (unlikely(is_unaligned(addr, 4))) + return mmu_get_long_unaligned(addr, 0); + return mmu_get_long(addr, 0, sz_long); +} -#ifdef HAVE_GET_WORD_UNSWAPPED -#define GET_OPCODE (do_get_mem_word_unswapped (regs.pc_p)) #else -#define GET_OPCODE (get_iword (0)) +#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(get_real_address(m68k_getpc(), 0, sz_byte) + (o) + 1)) +#define get_iword(o) do_get_mem_word((uae_u16 *)(get_real_address(m68k_getpc(), 0, sz_word) + (o))) +#define get_ilong(o) do_get_mem_long((uae_u32 *)(get_real_address(m68k_getpc(), 0, sz_long) + (o))) #endif -static __inline__ uae_u32 get_ibyte_prefetch (uae_s32 o) +#if 0 +static inline uae_u32 get_ibyte_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1)); + return do_get_mem_byte((uae_u8 *)(do_get_real_address(regs.pcp, false, false) + o + 1)); return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1)); } -static __inline__ uae_u32 get_iword_prefetch (uae_s32 o) +static inline uae_u32 get_iword_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_word((uae_u16 *)(regs.pc_p + o)); + return do_get_mem_word((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + o)); return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o)); } -static __inline__ uae_u32 get_ilong_prefetch (uae_s32 o) +static inline uae_u32 get_ilong_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_long((uae_u32 *)(regs.pc_p + o)); + return do_get_mem_long((uae_u32 *)(do_get_real_address(regs.pcp, false, false) + o)); if (o == 0) return do_get_mem_long(®s.prefetch); - return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4)); + return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + 4)); } +#endif +#ifdef FULLMMU +#define m68k_incpc(o) (regs.pc += (o)) +#else #define m68k_incpc(o) (regs.pc_p += (o)) +#endif -static __inline__ void fill_prefetch_0 (void) +static inline void fill_prefetch_0 (void) { +#if USE_PREFETCH_BUFFER uae_u32 r; #ifdef UNALIGNED_PROFITABLE - r = *(uae_u32 *)regs.pc_p; + r = *(uae_u32 *)do_get_real_address(m68k_getpc(), false, false); regs.prefetch = r; #else - r = do_get_mem_long ((uae_u32 *)regs.pc_p); + r = do_get_mem_long ((uae_u32 *)do_get_real_address(m68k_getpc(), false, false)); do_put_mem_long (®s.prefetch, r); #endif +#endif } #if 0 -static __inline__ void fill_prefetch_2 (void) +static inline void fill_prefetch_2 (void) { uae_u32 r = do_get_mem_long (®s.prefetch) << 16; - uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1); + uae_u32 r2 = do_get_mem_word (((uae_u16 *)do_get_real_address(regs.pcp, false, false)) + 1); r |= r2; do_put_mem_long (®s.prefetch, r); } @@ -164,103 +183,114 @@ static __inline__ void fill_prefetch_2 (void) /* These are only used by the 68020/68881 code, and therefore don't * need to handle prefetch. */ -static __inline__ uae_u32 next_ibyte (void) +static inline uae_u32 next_ibyte (void) { uae_u32 r = get_ibyte (0); m68k_incpc (2); return r; } -static __inline__ uae_u32 next_iword (void) +static inline uae_u32 next_iword (void) { uae_u32 r = get_iword (0); m68k_incpc (2); return r; } -static __inline__ uae_u32 next_ilong (void) +static inline uae_u32 next_ilong (void) { uae_u32 r = get_ilong (0); m68k_incpc (4); return r; } -static __inline__ void m68k_setpc (uaecptr newpc) -{ - regs.pc_p = regs.pc_oldp = get_real_address(newpc); - regs.pc = newpc; -} - -static __inline__ uaecptr m68k_getpc (void) +static inline void m68k_setpc (uaecptr newpc) { - return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); +#ifndef FULLMMU + regs.pc_p = regs.pc_oldp = get_real_address(newpc, 0, sz_word); +#endif + regs.fault_pc = regs.pc = newpc; } -static __inline__ uaecptr m68k_getpc_p (uae_u8 *p) -{ - return regs.pc + ((char *)p - (char *)regs.pc_oldp); -} +#define m68k_setpc_fast m68k_setpc +#define m68k_setpc_bcc m68k_setpc +#define m68k_setpc_rte m68k_setpc -static __inline__ void m68k_do_rts(void) +static inline void m68k_do_rts(void) { m68k_setpc(get_long(m68k_areg(regs, 7))); m68k_areg(regs, 7) += 4; } - -static __inline__ void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) + +static inline void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) { + put_long(m68k_areg(regs, 7) - 4, oldpc); m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); m68k_incpc(offset); } - -static __inline__ void m68k_do_jsr(uaecptr oldpc, uaecptr dest) + +static inline void m68k_do_jsr(uaecptr oldpc, uaecptr dest) { + put_long(m68k_areg(regs, 7) - 4, oldpc); m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); m68k_setpc(dest); } -#define m68k_setpc_fast m68k_setpc -#define m68k_setpc_bcc m68k_setpc -#define m68k_setpc_rte m68k_setpc - -static __inline__ void m68k_setstopped (int stop) +static inline void m68k_setstopped (int stop) { regs.stopped = stop; - if (stop) - regs.spcflags |= SPCFLAG_STOP; + /* A traced STOP instruction drops through immediately without + actually stopping. */ + if (stop && !( SPCFLAGS_TEST( SPCFLAG_DOTRACE ))) + SPCFLAGS_SET( SPCFLAG_STOP ); } -extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); -extern uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); +#ifdef FULLMMU +# define GET_OPCODE (get_iword (0)) +#elif defined ARAM_PAGE_CHECK +# ifdef HAVE_GET_WORD_UNSWAPPED +# define GET_OPCODE (do_get_mem_word_unswapped((uae_u16*)(pc + pc_offset))); +# else +# define GET_OPCODE (do_get_mem_word((uae_u16*)(pc + pc_offset))); +# endif +#else +# ifdef HAVE_GET_WORD_UNSWAPPED +# define GET_OPCODE (do_get_mem_word_unswapped ((uae_u16*)get_real_address(m68k_getpc(), 0, sz_word))) +# else +# define GET_OPCODE (get_iword (0)) +# endif +#endif + +extern REGPARAM uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); +extern REGPARAM uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); +extern REGPARAM uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width); +extern REGPARAM void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width); + -extern uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf); extern void MakeSR (void); extern void MakeFromSR (void); extern void Exception (int, uaecptr); extern void dump_counts (void); -extern void m68k_move2c (int, uae_u32 *); -extern void m68k_movec2 (int, uae_u32 *); +extern int m68k_move2c (int, uae_u32 *); +extern int m68k_movec2 (int, uae_u32 *); extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr); extern void m68k_mull (uae_u32, uae_u32, uae_u16); +extern void m68k_emulop (uae_u32); +extern void m68k_emulop_return (void); +extern void m68k_natfeat_id(void); +extern void m68k_natfeat_call(void); extern void init_m68k (void); -extern void m68k_go (int); -extern void m68k_dumpstate (uaecptr *); -extern void m68k_disasm (uaecptr, uaecptr *, int); +extern void exit_m68k (void); +extern void m68k_dumpstate (FILE *, uaecptr *); +extern void m68k_disasm (FILE *, uaecptr, uaecptr *, int); +extern void newm68k_disasm(FILE *, uaecptr, uaecptr *, unsigned int); +extern void showDisasm(uaecptr); extern void m68k_reset (void); extern void m68k_enter_debugger(void); - -extern void mmu_op (uae_u32, uae_u16); - -extern void fpp_opp (uae_u32, uae_u16); -extern void fdbcc_opp (uae_u32, uae_u16); -extern void fscc_opp (uae_u32, uae_u16); -extern void ftrapcc_opp (uae_u32,uaecptr); -extern void fbcc_opp (uae_u32, uaecptr, uae_u32); -extern void fsave_opp (uae_u32); -extern void frestore_opp (uae_u32); +extern int m68k_do_specialties(void); +extern void m68k_instr_set(void); +uae_u32 linea68000(uae_u16 opcode); /* Opcode of faulting instruction */ extern uae_u16 last_op_for_exception_3; @@ -271,16 +301,34 @@ extern uaecptr last_fault_for_exception_3; #define CPU_OP_NAME(a) op ## a -/* 68020 + 68881 */ -extern struct cputbl op_smalltbl_0[]; -/* 68020 */ -extern struct cputbl op_smalltbl_1[]; -/* 68010 */ -extern struct cputbl op_smalltbl_2[]; -/* 68000 */ -extern struct cputbl op_smalltbl_3[]; -/* 68000 slow but compatible. */ -extern struct cputbl op_smalltbl_4[]; +/* 68040+ 68881 */ +extern const struct cputbl op_smalltbl_0_ff[]; +extern const struct cputbl op_smalltbl_0_nf[]; -extern cpuop_func *cpufunctbl[65536]; +#ifdef FLIGHT_RECORDER +extern void m68k_record_step(uaecptr, int); +#endif + +extern void m68k_do_execute(void); +extern void m68k_execute(void); +#ifdef USE_JIT +extern void m68k_compile_execute(void); +extern void m68k_do_compile_execute(void); +#endif +#ifdef USE_CPU_EMUL_SERVICES +extern int32 emulated_ticks; +extern void cpu_do_check_ticks(void); + +static inline void cpu_check_ticks(void) +{ + if (--emulated_ticks <= 0) + cpu_do_check_ticks(); +} +#else +#define cpu_check_ticks() +#define cpu_do_check_ticks() +#endif + +cpuop_func op_illg_1; +#endif /* NEWCPU_H */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h new file mode 100644 index 000000000..d680b200c --- /dev/null +++ b/BasiliskII/src/uae_cpu/noflags.h @@ -0,0 +1,142 @@ +#ifndef NOFLAGS_H +#define NOFLAGS_H + +/* Undefine everything that will *set* flags. Note: Leave *reading* + flags alone ;-). We assume that nobody does something like + SET_ZFLG(a=b+c), i.e. expect side effects of the macros. That would + be a stupid thing to do when using macros. +*/ + +/* Gwenole Beauchesne pointed out that CAS and CAS2 use flag_cmp to set + flags that are then used internally, and that thus the noflags versions + of those instructions were broken. Oops! + Easy fix: Leave flag_cmp alone. It is only used by CMP* and CAS* + instructions. For CAS*, noflags is a bad idea. For CMP*, which has + setting flags as its only function, the noflags version is kinda pointless, + anyway. + Note that this will only work while using the optflag_* routines --- + as we do on all (one ;-) platforms that will ever use the noflags + versions, anyway. + However, if you try to compile without optimized flags, the "SET_ZFLAG" + macro will be left unchanged, to make CAS and CAS2 work right. Of course, + this is contrary to the whole idea of noflags, but better be right than + be fast. + + Another problem exists with one of the bitfield operations. Once again, + one of the operations sets a flag, and looks at it later. And the CHK2 + instruction does so as well. For those, a different solution is possible. + the *_ALWAYS versions of the SET_?FLG macros shall remain untouched by + the redefinitions in this file. + Unfortunately, they are defined in terms of the macros we *do* redefine. + So here comes a bit of trickery.... +*/ +#define NOFLAGS_CMP 0 + +#undef SET_NFLG_ALWAYS +static inline void SET_NFLG_ALWAYS(uae_u32 x) +{ + SET_NFLG(x); /* This has not yet been redefined */ +} + +#undef SET_CFLG_ALWAYS +static inline void SET_CFLG_ALWAYS(uae_u32 x) +{ + SET_CFLG(x); /* This has not yet been redefined */ +} + +#undef CPUFUNC +#define CPUFUNC(x) x##_nf + +#ifndef OPTIMIZED_FLAGS +#undef SET_ZFLG +#define SET_ZFLG(y) do {uae_u32 dummy=(y); } while (0) +#endif + +#undef SET_CFLG +#define SET_CFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_VFLG +#define SET_VFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_NFLG +#define SET_NFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_XFLG +#define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) + +#undef CLEAR_CZNV +#define CLEAR_CZNV +#undef IOR_CZNV +#define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_CZNV +#define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) +#undef COPY_CARRY +#define COPY_CARRY + +#ifdef optflag_testl +#undef optflag_testl +#endif + +#ifdef optflag_testw +#undef optflag_testw +#endif + +#ifdef optflag_testb +#undef optflag_testb +#endif + +#ifdef optflag_addl +#undef optflag_addl +#endif + +#ifdef optflag_addw +#undef optflag_addw +#endif + +#ifdef optflag_addb +#undef optflag_addb +#endif + +#ifdef optflag_subl +#undef optflag_subl +#endif + +#ifdef optflag_subw +#undef optflag_subw +#endif + +#ifdef optflag_subb +#undef optflag_subb +#endif + +#if NOFLAGS_CMP +#ifdef optflag_cmpl +#undef optflag_cmpl +#endif + +#ifdef optflag_cmpw +#undef optflag_cmpw +#endif + +#ifdef optflag_cmpb +#undef optflag_cmpb +#endif +#endif + +#define optflag_testl(v) do { } while (0) +#define optflag_testw(v) do { } while (0) +#define optflag_testb(v) do { } while (0) + +#define optflag_addl(v, s, d) (v = (uae_s32)(d) + (uae_s32)(s)) +#define optflag_addw(v, s, d) (v = (uae_s16)(d) + (uae_s16)(s)) +#define optflag_addb(v, s, d) (v = (uae_s8)(d) + (uae_s8)(s)) + +#define optflag_subl(v, s, d) (v = (uae_s32)(d) - (uae_s32)(s)) +#define optflag_subw(v, s, d) (v = (uae_s16)(d) - (uae_s16)(s)) +#define optflag_subb(v, s, d) (v = (uae_s8)(d) - (uae_s8)(s)) + +#if NOFLAGS_CMP +/* These are just for completeness sake */ +#define optflag_cmpl(s, d) do { } while (0) +#define optflag_cmpw(s, d) do { } while (0) +#define optflag_cmpb(s, d) do { } while (0) +#endif + +#endif diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu/readcpu.cpp index abb3faae9..1c385b983 100644 --- a/BasiliskII/src/uae_cpu/readcpu.cpp +++ b/BasiliskII/src/uae_cpu/readcpu.cpp @@ -1,3 +1,4 @@ +/* 2002 MJ */ /* * UAE - The Un*x Amiga Emulator * @@ -6,14 +7,21 @@ * Copyright 1995,1996 Bernd Schmidt */ -#include -#include -#include -#include - #include "sysdeps.h" #include "readcpu.h" +#include +#include +#include +#include + +using std::strncmp; +using std::abort; +using std::fprintf; +using std::strcmp; +using std::strlen; +using std::malloc; + int nr_cpuop_funcs; struct mnemolookup lookuptab[] = { @@ -139,13 +147,20 @@ struct mnemolookup lookuptab[] = { { i_CPUSHA, "CPUSHA" }, { i_MOVE16, "MOVE16" }, + { i_EMULOP_RETURN, "EMULOP_RETURN" }, + { i_EMULOP, "EMULOP" }, + { i_MMUOP, "MMUOP" }, + + {i_NATFEAT_ID, "NATFEAT_ID" }, + {i_NATFEAT_CALL, "NATFEAT_CALL" }, + { i_ILLG, "" }, }; struct instr *table68k; -static __inline__ amodes mode_from_str (const char *str) +static inline amodes mode_from_str (const char *str) { if (strncmp (str, "Dreg", 4) == 0) return Dreg; if (strncmp (str, "Areg", 4) == 0) return Areg; @@ -163,7 +178,7 @@ static __inline__ amodes mode_from_str (const char *str) return (amodes)0; } -static __inline__ amodes mode_from_mr (int mode, int reg) +static inline amodes mode_from_mr (int mode, int reg) { switch (mode) { case 0: return Dreg; @@ -195,12 +210,31 @@ static void build_insn (int insn) int variants; struct instr_def id; const char *opcstr; - int i; + int i, n; int flaglive = 0, flagdead = 0; + int cflow = 0; id = defs68k[insn]; + // Control flow information + cflow = id.cflow; + + // Mask of flags set/used + unsigned char flags_set(0), flags_used(0); + + for (i = 0, n = 4; i < 5; i++, n--) { + switch (id.flaginfo[i].flagset) { + case fa_unset: case fa_isjmp: break; + default: flags_set |= (1 << n); + } + + switch (id.flaginfo[i].flaguse) { + case fu_unused: case fu_isjmp: break; + default: flags_used |= (1 << n); + } + } + for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flagset){ case fa_unset: break; @@ -236,7 +270,7 @@ static void build_insn (int insn) int pos = 0; int mnp = 0; int bitno = 0; - char mnemonic[10]; + char mnemonic[64]; wordsizes sz = sz_long; int srcgather = 0, dstgather = 0; @@ -274,6 +308,9 @@ static void build_insn (int insn) if (bitcnt[bitI] && (bitval[bitI] == 0x00 || bitval[bitI] == 0xff)) continue; + if (bitcnt[bitE] && (bitval[bitE] == 0x00)) + continue; + /* bitI and bitC get copied to biti and bitc */ if (bitcnt[bitI]) { bitval[biti] = bitval[bitI]; bitpos[biti] = bitpos[bitI]; @@ -311,6 +348,11 @@ static void build_insn (int insn) } } mnp++; + if ((unsigned)mnp >= (sizeof(mnemonic)-1)) { + mnemonic[sizeof(mnemonic)-1] = '\0'; + fprintf(stderr, "WTF!!! Instruction '%s' overflow\n", mnemonic); + abort(); + } } pos++; } @@ -339,6 +381,7 @@ static void build_insn (int insn) case 'A': srcmode = Areg; switch (opcstr[pos++]) { + case 'l': srcmode = absl; break; case 'r': srcreg = bitval[bitr]; srcgather = 1; srcpos = bitpos[bitr]; break; case 'R': srcreg = bitval[bitR]; srcgather = 1; srcpos = bitpos[bitR]; break; default: abort(); @@ -348,6 +391,11 @@ static void build_insn (int insn) case 'P': srcmode = Aipi; pos++; break; } break; +#if 0 + case 'L': + srcmode = absl; + break; +#endif case '#': switch (opcstr[pos++]) { case 'z': srcmode = imm; break; @@ -393,6 +441,22 @@ static void build_insn (int insn) srcpos = bitpos[bitK]; } break; + case 'E': srcmode = immi; srcreg = bitval[bitE]; + if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? + /* 1..255 */ + srcgather = 1; + srctype = 6; + srcpos = bitpos[bitE]; + } + break; + case 'p': srcmode = immi; srcreg = bitval[bitp]; + if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? + /* 0..3 */ + srcgather = 1; + srctype = 7; + srcpos = bitpos[bitp]; + } + break; default: abort(); } break; @@ -517,12 +581,16 @@ static void build_insn (int insn) case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; default: abort(); } + if (dstpos < 0 || dstpos >= 32) + abort(); break; case 'A': destmode = Areg; switch (opcstr[pos++]) { + case 'l': destmode = absl; break; case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; + case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; default: abort(); } switch (opcstr[pos]) { @@ -530,6 +598,11 @@ static void build_insn (int insn) case 'P': destmode = Aipi; pos++; break; } break; +#if 0 + case 'L': + destmode = absl; + break; +#endif case '#': switch (opcstr[pos++]) { case 'z': destmode = imm; break; @@ -700,8 +773,44 @@ static void build_insn (int insn) table68k[opc].flaginfo[i].flaguse = id.flaginfo[i].flaguse; } #endif + + // Fix flags used information for Scc, Bcc, TRAPcc, DBcc instructions + if ( table68k[opc].mnemo == i_Scc + || table68k[opc].mnemo == i_Bcc + || table68k[opc].mnemo == i_DBcc + || table68k[opc].mnemo == i_TRAPcc + ) { + switch (table68k[opc].cc) { + // CC mask: XNZVC + // 8421 + case 0: flags_used = 0x00; break; /* T */ + case 1: flags_used = 0x00; break; /* F */ + case 2: flags_used = 0x05; break; /* HI */ + case 3: flags_used = 0x05; break; /* LS */ + case 4: flags_used = 0x01; break; /* CC */ + case 5: flags_used = 0x01; break; /* CS */ + case 6: flags_used = 0x04; break; /* NE */ + case 7: flags_used = 0x04; break; /* EQ */ + case 8: flags_used = 0x02; break; /* VC */ + case 9: flags_used = 0x02; break; /* VS */ + case 10:flags_used = 0x08; break; /* PL */ + case 11:flags_used = 0x08; break; /* MI */ + case 12:flags_used = 0x0A; break; /* GE */ + case 13:flags_used = 0x0A; break; /* LT */ + case 14:flags_used = 0x0E; break; /* GT */ + case 15:flags_used = 0x0E; break; /* LE */ + } + } + +#if 1 + /* gb-- flagdead and flaglive would not have correct information */ + table68k[opc].flagdead = flags_set; + table68k[opc].flaglive = flags_used; +#else table68k[opc].flagdead = flagdead; table68k[opc].flaglive = flaglive; +#endif + table68k[opc].cflow = cflow; nomatch: /* FOO! */; } @@ -722,7 +831,7 @@ void read_table68k (void) } } -static int mismatch; +static int readcpu_mismatch; static void handle_merges (long int opcode) { @@ -747,6 +856,10 @@ static void handle_merges (long int opcode) smsk = 7; sbitdst = 8; break; case 5: smsk = 63; sbitdst = 64; break; + case 6: + smsk = 255; sbitdst = 256; break; + case 7: + smsk = 3; sbitdst = 4; break; default: smsk = 0; sbitdst = 0; abort(); @@ -775,20 +888,20 @@ static void handle_merges (long int opcode) || table68k[code].suse != table68k[opcode].suse || table68k[code].duse != table68k[opcode].duse) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (table68k[opcode].suse && (table68k[opcode].spos != table68k[code].spos || table68k[opcode].smode != table68k[code].smode || table68k[opcode].stype != table68k[code].stype)) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (table68k[opcode].duse && (table68k[opcode].dpos != table68k[code].dpos || table68k[opcode].dmode != table68k[code].dmode)) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (code != opcode) @@ -801,7 +914,7 @@ void do_merges (void) { long int opcode; int nr = 0; - mismatch = 0; + readcpu_mismatch = 0; for (opcode = 0; opcode < 65536; opcode++) { if (table68k[opcode].handler != -1 || table68k[opcode].mnemo == i_ILLG) continue; @@ -813,5 +926,5 @@ void do_merges (void) int get_no_mismatches (void) { - return mismatch; + return readcpu_mismatch; } diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu/readcpu.h index 4f225f133..7855ecc7d 100644 --- a/BasiliskII/src/uae_cpu/readcpu.h +++ b/BasiliskII/src/uae_cpu/readcpu.h @@ -1,13 +1,17 @@ +/* 2002 MJ */ +#ifndef READCPU_H +#define READCPU_H + #ifdef __cplusplus extern "C" { #endif -ENUMDECL { +typedef enum { Dreg, Areg, Aind, Aipi, Apdi, Ad16, Ad8r, absw, absl, PC16, PC8r, imm, imm0, imm1, imm2, immi, am_unknown, am_illg -} ENUMNAME (amodes); +} amodes; -ENUMDECL { +typedef enum { i_ILLG, i_OR, i_AND, i_EOR, i_ORSR, i_ANDSR, i_EORSR, @@ -32,30 +36,42 @@ ENUMDECL { i_PACK, i_UNPK, i_TAS, i_BKPT, i_CALLM, i_RTM, i_TRAPcc, i_MOVES, i_FPP, i_FDBcc, i_FScc, i_FTRAPcc, i_FBcc, i_FSAVE, i_FRESTORE, i_CINVL, i_CINVP, i_CINVA, i_CPUSHL, i_CPUSHP, i_CPUSHA, i_MOVE16, - i_MMUOP -} ENUMNAME (instrmnem); + i_MMUOP, i_EMULOP_RETURN, i_EMULOP, i_NATFEAT_ID, i_NATFEAT_CALL +} instrmnem; extern struct mnemolookup { instrmnem mnemo; const char *name; } lookuptab[]; -ENUMDECL { +typedef enum { sz_byte, sz_word, sz_long -} ENUMNAME (wordsizes); +} wordsizes; -ENUMDECL { - fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp -} ENUMNAME (flagaffect); +typedef enum { + fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp, + fa_isbranch +} flagaffect; -ENUMDECL { +typedef enum { fu_used, fu_unused, fu_maybecc, fu_unknown, fu_isjmp -} ENUMNAME (flaguse); +} flaguse; + +typedef enum { + fl_normal = 0, + fl_branch = 1, + fl_jump = 2, + fl_return = 3, + fl_trap = 4, + fl_const_jump = 8, + /* Instructions that can trap don't mark the end of a block */ + fl_end_block = 3 +} cflow_t; -ENUMDECL { +typedef enum { bit0, bit1, bitc, bitC, bitf, biti, bitI, bitj, bitJ, bitk, bitK, - bits, bitS, bitd, bitD, bitr, bitR, bitz, lastbit -} ENUMNAME (bitvals); + bits, bitS, bitd, bitD, bitr, bitR, bitz, bitE, bitp, lastbit +} bitvals; struct instr_def { unsigned int bits; @@ -68,6 +84,7 @@ struct instr_def { unsigned int flaguse:3; unsigned int flagset:3; } flaginfo[5]; + unsigned char cflow; unsigned char sduse; const char *opcstr; }; @@ -86,22 +103,16 @@ extern struct instr { unsigned int mnemo:8; unsigned int cc:4; unsigned int plev:2; -#ifdef sgi wordsizes size:2; amodes smode:5; unsigned int stype:3; amodes dmode:5; -#else - unsigned int size:2; - unsigned int smode:5; - unsigned int stype:3; - unsigned int dmode:5; -#endif unsigned int suse:1; unsigned int duse:1; unsigned int unused1:1; unsigned int clev:3; - unsigned int unused2:5; + unsigned int cflow:3; + unsigned int unused2:2; } *table68k; extern void read_table68k (void); @@ -112,3 +123,5 @@ extern int nr_cpuop_funcs; #ifdef __cplusplus } #endif + +#endif diff --git a/BasiliskII/src/uae_cpu/readcpua.cpp b/BasiliskII/src/uae_cpu/readcpua.cpp new file mode 100644 index 000000000..521c241f2 --- /dev/null +++ b/BasiliskII/src/uae_cpu/readcpua.cpp @@ -0,0 +1,5 @@ +/* + * readcpu.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "readcpu.cpp" diff --git a/BasiliskII/src/uae_cpu/registers.h b/BasiliskII/src/uae_cpu/registers.h new file mode 100644 index 000000000..f7daef1fc --- /dev/null +++ b/BasiliskII/src/uae_cpu/registers.h @@ -0,0 +1,116 @@ +/* 2001 MJ */ + +#ifndef REGISTERS_H +#define REGISTERS_H + +#include "sysdeps.h" +#include "spcflags.h" +typedef char flagtype; + + +struct xttrx { + uae_u32 log_addr_base : 8; + uae_u32 log_addr_mask : 8; + uae_u32 enable : 1; + uae_u32 s_field : 2; + uae_u32 : 3; + uae_u32 usr1 : 1; + uae_u32 usr0 : 1; + uae_u32 : 1; + uae_u32 cmode : 2; + uae_u32 : 2; + uae_u32 write : 1; + uae_u32 : 2; +}; + +struct mmusr_t { + uae_u32 phys_addr : 20; + uae_u32 bus_err : 1; + uae_u32 global : 1; + uae_u32 usr1 : 1; + uae_u32 usr0 : 1; + uae_u32 super : 1; + uae_u32 cmode : 2; + uae_u32 modif : 1; + uae_u32 : 1; + uae_u32 write : 1; + uae_u32 ttrhit : 1; + uae_u32 resident : 1; +}; + +struct log_addr4 { + uae_u32 rif : 7; + uae_u32 pif : 7; + uae_u32 paif : 6; + uae_u32 poff : 12; +}; + +struct log_addr8 { + uae_u32 rif : 7; + uae_u32 pif : 7; + uae_u32 paif : 5; + uae_u32 poff : 13; +}; + +extern struct regstruct +{ + uae_u32 regs[16]; + uaecptr usp,isp,msp; + uae_u16 sr; + flagtype t1; + flagtype t0; + flagtype s; + flagtype m; + flagtype x; + flagtype stopped; + int intmask; + + uae_u32 pc; + uae_u32 fault_pc; + uae_u8 *pc_p; + uae_u8 *pc_oldp; + + uae_u32 vbr,sfc,dfc; + + volatile uae_u32 spcflags; + +#if 0 + uae_u32 kick_mask; + + /* Fellow sources say this is 4 longwords. That's impossible. It needs + * to be at least a longword. The HRM has some cryptic comment about two + * instructions being on the same longword boundary. + * The way this is implemented now seems like a good compromise. + */ + uae_u32 prefetch; +#endif + + /* MMU reg*/ + uae_u32 urp,srp; + uae_u32 tc; + + int mmu_enabled; /* flagtype tce; */ + int mmu_pagesize_8k; /* flagtype tcp; */ + + uae_u32 dtt0,dtt1,itt0,itt1; + uae_u32 mmusr; + + uae_u32 mmu_fslw, mmu_fault_addr; + uae_u16 mmu_ssw; + uae_u32 wb3_data; + uae_u16 wb3_status; + + /* Cache reg*/ + uae_u32 cacr,caar; +} regs, lastint_regs; + +static inline uaecptr m68k_getpc (void) +{ +#ifdef FULLMMU + return regs.pc; +#else + return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); +#endif +} + +#endif diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h new file mode 100644 index 000000000..b20843726 --- /dev/null +++ b/BasiliskII/src/uae_cpu/spcflags.h @@ -0,0 +1,104 @@ + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + */ + +#ifndef SPCFLAGS_H +#define SPCFLAGS_H + +typedef uae_u32 spcflags_t; + +enum { + SPCFLAG_STOP = 0x01, + SPCFLAG_INT = 0x02, + SPCFLAG_BRK = 0x04, + SPCFLAG_TRACE = 0x08, + SPCFLAG_DOTRACE = 0x10, + SPCFLAG_DOINT = 0x20, +#ifdef USE_JIT + SPCFLAG_JIT_END_COMPILE = 0x40, + SPCFLAG_JIT_EXEC_RETURN = 0x80, +#else + SPCFLAG_JIT_END_COMPILE = 0, + SPCFLAG_JIT_EXEC_RETURN = 0, +#endif + SPCFLAG_VBL = 0x100, + SPCFLAG_MFP = 0x200, + SPCFLAG_INT3 = 0x800, + SPCFLAG_INT5 = 0x1000, + SPCFLAG_SCC = 0x2000, +// SPCFLAG_MODE_CHANGE = 0x4000, + SPCFLAG_ALL = SPCFLAG_STOP + | SPCFLAG_INT + | SPCFLAG_BRK + | SPCFLAG_TRACE + | SPCFLAG_DOTRACE + | SPCFLAG_DOINT + | SPCFLAG_JIT_END_COMPILE + | SPCFLAG_JIT_EXEC_RETURN + | SPCFLAG_INT3 + | SPCFLAG_VBL + | SPCFLAG_INT5 + | SPCFLAG_SCC + | SPCFLAG_MFP + , + + SPCFLAG_ALL_BUT_EXEC_RETURN = SPCFLAG_ALL & ~SPCFLAG_JIT_EXEC_RETURN + +}; + +#define SPCFLAGS_TEST(m) \ + ((regs.spcflags & (m)) != 0) + +/* Macro only used in m68k_reset() */ +#define SPCFLAGS_INIT(m) do { \ + regs.spcflags = (m); \ +} while (0) + +#if !(ENABLE_EXCLUSIVE_SPCFLAGS) + +#define SPCFLAGS_SET(m) do { \ + regs.spcflags |= (m); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + regs.spcflags &= ~(m); \ +} while (0) + +#elif defined(X86_ASSEMBLY) + +#define HAVE_HARDWARE_LOCKS + +#define SPCFLAGS_SET(m) do { \ + __asm__ __volatile__("lock\n\torl %1,%0" : "=m" (regs.spcflags) : "i" ((m))); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + __asm__ __volatile__("lock\n\tandl %1,%0" : "=m" (regs.spcflags) : "i" (~(m))); \ +} while (0) + +#else + +#undef HAVE_HARDWARE_LOCKS + +#include "main.h" +extern B2_mutex *spcflags_lock; + +#define SPCFLAGS_SET(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags |= (m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags &= ~(m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#endif + +#endif /* SPCFLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu/table68k index 54f7c5f34..4445cb509 100644 --- a/BasiliskII/src/uae_cpu/table68k +++ b/BasiliskII/src/uae_cpu/table68k @@ -4,11 +4,13 @@ % C: condition codes, except F % f: direction % i: immediate +% E: immediate, except 00 (for EmulOp instructions) % I: immediate, except 00 and ff % j: immediate 1..8 % J: immediate 0..15 % k: immediate 0..7 % K: immediate 0..63 +% p: immediate 0..3 (CINV and CPUSH: cache field) % s: source mode % S: source reg % d: dest mode @@ -24,15 +26,17 @@ % % Arp: --> -(Ar) % ArP: --> (Ar)+ +% L: --> (xxx.L) % -% Fields on a line: -% 16 chars bitpattern : -% CPU level / privilege level : +% Fields on a line: +% 16 chars bitpattern : +% CPU level / privildge level : % CPU level 0: 68000 % 1: 68010 % 2: 68020 % 3: 68020/68881 % 4: 68040 +% 5: 68060 % privilege level 0: not privileged % 1: unprivileged only on 68000 (check regs.s) % 2: privileged (check regs.s) @@ -43,10 +47,19 @@ % 0 means flag reset % 1 means flag set % ? means programmer was too lazy to check or instruction may trap -% + means instruction is conditional branch -% everything else means flag set/used -% / means instruction is unconditional branch/call +% + means instruction is conditional branch (ignored, only for sync) +% / means instruction is unconditional branch/call (ignored, only for sync) % x means flag is unknown and well-behaved programs shouldn't check it +% everything else means flag set/used +% +% Control flow +% two letters, combination of +% - nothing +% T the instruction may trap or cause an exception +% B branch instruction +% J jump instruction +% R return instruction +% % srcaddr status destaddr status : % bitmasks of % 1 means fetched @@ -56,197 +69,218 @@ % instruction % -0000 0000 0011 1100:00:XNZVC:XNZVC:10: ORSR.B #1 -0000 0000 0111 1100:02:?????:?????:10: ORSR.W #1 -0000 0zz0 11ss sSSS:20:?????:?????:11: CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd] -0000 0000 zzdd dDDD:00:-NZ00:-----:13: OR.z #z,d[!Areg] -0000 0010 0011 1100:00:XNZVC:XNZVC:10: ANDSR.B #1 -0000 0010 0111 1100:02:?????:?????:10: ANDSR.W #1 -0000 0010 zzdd dDDD:00:-NZ00:-----:13: AND.z #z,d[!Areg] -0000 0100 zzdd dDDD:00:XNZVC:-----:13: SUB.z #z,d[!Areg] -0000 0110 zzdd dDDD:00:XNZVC:-----:13: ADD.z #z,d[!Areg] -0000 0110 11ss sSSS:20:?????:?????:10: CALLM s[!Dreg,Areg,Aipi,Apdi,Immd] -0000 0110 11ss sSSS:20:?????:?????:10: RTM s[Dreg,Areg] -0000 1000 00ss sSSS:00:--Z--:-----:11: BTST #1,s[!Areg] -0000 1000 01ss sSSS:00:--Z--:-----:13: BCHG #1,s[!Areg,Immd] -0000 1000 10ss sSSS:00:--Z--:-----:13: BCLR #1,s[!Areg,Immd] -0000 1000 11ss sSSS:00:--Z--:-----:13: BSET #1,s[!Areg,Immd] -0000 1010 0011 1100:00:XNZVC:XNZVC:10: EORSR.B #1 -0000 1010 0111 1100:02:?????:?????:10: EORSR.W #1 -0000 1010 zzdd dDDD:00:-NZ00:-----:13: EOR.z #z,d[!Areg] -0000 1100 zzss sSSS:00:-NZVC:-----:11: CMP.z #z,s[!Areg,Immd] - -0000 1010 11ss sSSS:20:?????:?????:13: CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1100 11ss sSSS:20:?????:?????:13: CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1100 1111 1100:20:?????:?????:10: CAS2.W #2 -0000 1110 zzss sSSS:22:?????:?????:13: MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1110 11ss sSSS:20:?????:?????:13: CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16] -0000 1110 1111 1100:20:?????:?????:10: CAS2.L #2 - -0000 rrr1 00dd dDDD:00:-----:-----:12: MVPMR.W d[Areg-Ad16],Dr -0000 rrr1 01dd dDDD:00:-----:-----:12: MVPMR.L d[Areg-Ad16],Dr -0000 rrr1 10dd dDDD:00:-----:-----:12: MVPRM.W Dr,d[Areg-Ad16] -0000 rrr1 11dd dDDD:00:-----:-----:12: MVPRM.L Dr,d[Areg-Ad16] -0000 rrr1 00ss sSSS:00:--Z--:-----:11: BTST Dr,s[!Areg] -0000 rrr1 01ss sSSS:00:--Z--:-----:13: BCHG Dr,s[!Areg,Immd] -0000 rrr1 10ss sSSS:00:--Z--:-----:13: BCLR Dr,s[!Areg,Immd] -0000 rrr1 11ss sSSS:00:--Z--:-----:13: BSET Dr,s[!Areg,Immd] - -0001 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.B s,d[!Areg] -0010 DDDd ddss sSSS:00:-----:-----:12: MOVEA.L s,d[Areg] -0010 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.L s,d[!Areg] -0011 DDDd ddss sSSS:00:-----:-----:12: MOVEA.W s,d[Areg] -0011 DDDd ddss sSSS:00:-NZ00:-----:12: MOVE.W s,d[!Areg] - -0100 0000 zzdd dDDD:00:XxZxC:-----:30: NEGX.z d[!Areg] -0100 0000 11dd dDDD:01:?????:?????:10: MVSR2.W d[!Areg] -0100 0010 zzdd dDDD:00:-0100:-----:20: CLR.z d[!Areg] -0100 0010 11dd dDDD:10:?????:?????:10: MVSR2.B d[!Areg] -0100 0100 zzdd dDDD:00:XNZVC:-----:30: NEG.z d[!Areg] -0100 0100 11ss sSSS:00:XNZVC:-----:10: MV2SR.B s[!Areg] -0100 0110 zzdd dDDD:00:-NZ00:-----:30: NOT.z d[!Areg] -0100 0110 11ss sSSS:02:?????:?????:10: MV2SR.W s[!Areg] -0100 1000 0000 1rrr:20:-----:-----:31: LINK.L Ar,#2 -0100 1000 00dd dDDD:00:X?Z?C:X-Z--:30: NBCD.B d[!Areg] -0100 1000 0100 1kkk:20:?????:?????:10: BKPT #k -0100 1000 01ss sSSS:00:-NZ00:-----:30: SWAP.W s[Dreg] -0100 1000 01ss sSSS:00:-----:-----:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 1000 10dd dDDD:00:-NZ00:-----:30: EXT.W d[Dreg] -0100 1000 10dd dDDD:00:-----:-----:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] -0100 1000 11dd dDDD:00:-NZ00:-----:30: EXT.L d[Dreg] -0100 1000 11dd dDDD:00:-----:-----:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] -0100 1001 11dd dDDD:00:-NZ00:-----:30: EXT.B d[Dreg] -0100 1010 zzss sSSS:00:-NZ00:-----:10: TST.z s -0100 1010 11dd dDDD:00:?????:?????:30: TAS.B d[!Areg] -0100 1010 1111 1100:00:?????:?????:00: ILLEGAL -0100 1100 00ss sSSS:20:-NZVC:-----:13: MULL.L #1,s[!Areg] -0100 1100 01ss sSSS:20:?????:?????:13: DIVL.L #1,s[!Areg] -0100 1100 10ss sSSS:00:-----:-----:01: MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd] -0100 1100 11ss sSSS:00:-----:-----:01: MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd] -0100 1110 0100 JJJJ:00:-----:XNZVC:10: TRAP #J -0100 1110 0101 0rrr:00:-----:-----:31: LINK.W Ar,#1 -0100 1110 0101 1rrr:00:-----:-----:30: UNLK.L Ar -0100 1110 0110 0rrr:02:-----:-----:10: MVR2USP.L Ar -0100 1110 0110 1rrr:02:-----:-----:20: MVUSP2R.L Ar -0100 1110 0111 0000:02:-----:-----:00: RESET -0100 1110 0111 0001:00:-----:-----:00: NOP -0100 1110 0111 0010:02:XNZVC:-----:10: STOP #1 -0100 1110 0111 0011:02:XNZVC:-----:00: RTE -0100 1110 0111 0100:00:?????:?????:10: RTD #1 -0100 1110 0111 0101:00:-----:-----:00: RTS -0100 1110 0111 0110:00:-----:XNZVC:00: TRAPV -0100 1110 0111 0111:00:XNZVC:-----:00: RTR -0100 1110 0111 1010:12:?????:?????:10: MOVEC2 #1 -0100 1110 0111 1011:12:?????:?????:10: MOVE2C #1 -0100 1110 10ss sSSS:00://///://///:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 rrr1 00ss sSSS:00:?????:?????:11: CHK.L s[!Areg],Dr -0100 rrr1 10ss sSSS:00:?????:?????:11: CHK.W s[!Areg],Dr -0100 1110 11ss sSSS:00://///://///:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 rrr1 11ss sSSS:00:-----:-----:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar - -0101 jjj0 zzdd dDDD:00:-----:-----:13: ADDA.z #j,d[Areg] -0101 jjj0 zzdd dDDD:00:XNZVC:-----:13: ADD.z #j,d[!Areg] -0101 jjj1 zzdd dDDD:00:-----:-----:13: SUBA.z #j,d[Areg] -0101 jjj1 zzdd dDDD:00:XNZVC:-----:13: SUB.z #j,d[!Areg] -0101 cccc 1100 1rrr:00:-----:+++++:31: DBcc.W Dr,#1 -0101 cccc 11dd dDDD:00:-----:+++++:20: Scc.B d[!Areg] -0101 cccc 1111 1010:20:?????:?????:10: TRAPcc #1 -0101 cccc 1111 1011:20:?????:?????:10: TRAPcc #2 -0101 cccc 1111 1100:20:?????:?????:00: TRAPcc +0000 0000 0011 1100:00:XNZVC:XNZVC:--:10: ORSR.B #1 +0000 0000 0111 1100:02:XNZVC:XNZVC:T-:10: ORSR.W #1 +0000 0zz0 11ss sSSS:20:-?Z?C:-----:T-:11: CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0000 zzdd dDDD:00:-NZ00:-----:--:13: OR.z #z,d[!Areg] +0000 0010 0011 1100:00:XNZVC:XNZVC:--:10: ANDSR.B #1 +0000 0010 0111 1100:02:XNZVC:XNZVC:T-:10: ANDSR.W #1 +0000 0010 zzdd dDDD:00:-NZ00:-----:--:13: AND.z #z,d[!Areg] +0000 0100 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #z,d[!Areg] +0000 0110 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #z,d[!Areg] +0000 0110 11ss sSSS:20:-----:XNZVC:--:10: CALLM s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0110 11ss sSSS:20:XNZVC:-----:-R:10: RTM s[Dreg,Areg] +0000 1000 00ss sSSS:00:--Z--:-----:--:11: BTST #1,s[!Areg] +0000 1000 01ss sSSS:00:--Z--:-----:--:13: BCHG #1,s[!Areg,Immd] +0000 1000 10ss sSSS:00:--Z--:-----:--:13: BCLR #1,s[!Areg,Immd] +0000 1000 11ss sSSS:00:--Z--:-----:--:13: BSET #1,s[!Areg,Immd] +0000 1010 0011 1100:00:XNZVC:XNZVC:--:10: EORSR.B #1 +0000 1010 0111 1100:02:XNZVC:XNZVC:T-:10: EORSR.W #1 +0000 1010 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z #z,d[!Areg] +0000 1100 zzss sSSS:00:-NZVC:-----:--:11: CMP.z #z,s[!Areg,Immd] + +0000 1010 11ss sSSS:20:-NZVC:-----:--:13: CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 11ss sSSS:20:-NZVC:-----:--:13: CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 1111 1100:20:-NZVC:-----:--:10: CAS2.W #2 +0000 1110 zzss sSSS:22:-----:-----:T-:13: MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 11ss sSSS:20:-NZVC:-----:--:13: CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 1111 1100:20:-NZVC:-----:--:10: CAS2.L #2 + +0000 rrr1 00dd dDDD:00:-----:-----:--:12: MVPMR.W d[Areg-Ad16],Dr +0000 rrr1 01dd dDDD:00:-----:-----:--:12: MVPMR.L d[Areg-Ad16],Dr +0000 rrr1 10dd dDDD:00:-----:-----:--:12: MVPRM.W Dr,d[Areg-Ad16] +0000 rrr1 11dd dDDD:00:-----:-----:--:12: MVPRM.L Dr,d[Areg-Ad16] +0000 rrr1 00ss sSSS:00:--Z--:-----:--:11: BTST Dr,s[!Areg] +0000 rrr1 01ss sSSS:00:--Z--:-----:--:13: BCHG Dr,s[!Areg,Immd] +0000 rrr1 10ss sSSS:00:--Z--:-----:--:13: BCLR Dr,s[!Areg,Immd] +0000 rrr1 11ss sSSS:00:--Z--:-----:--:13: BSET Dr,s[!Areg,Immd] + +0001 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.B s,d[!Areg] +0010 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.L s,d[Areg] +0010 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.L s,d[!Areg] +0011 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.W s,d[Areg] +0011 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.W s,d[!Areg] + +0100 0000 zzdd dDDD:00:XNZVC:X-Z--:--:30: NEGX.z d[!Areg] +0100 0000 11dd dDDD:01:-----:XNZVC:T-:10: MVSR2.W d[!Areg] +0100 0010 zzdd dDDD:00:-0100:-----:--:20: CLR.z d[!Areg] +0100 0010 11dd dDDD:10:-----:XNZVC:--:10: MVSR2.B d[!Areg] +0100 0100 zzdd dDDD:00:XNZVC:-----:--:30: NEG.z d[!Areg] +0100 0100 11ss sSSS:00:XNZVC:-----:--:10: MV2SR.B s[!Areg] +0100 0110 zzdd dDDD:00:-NZ00:-----:--:30: NOT.z d[!Areg] +0100 0110 11ss sSSS:02:XNZVC:XNZVC:T-:10: MV2SR.W s[!Areg] +0100 1000 0000 1rrr:20:-----:-----:--:31: LINK.L Ar,#2 +0100 1000 00dd dDDD:00:X?Z?C:X-Z--:--:30: NBCD.B d[!Areg] +0100 1000 0100 1kkk:20:-----:-----:T-:10: BKPT #k +0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] +0100 1000 01ss sSSS:00:-----:-----:--:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] +0100 1000 10dd dDDD:00:-----:-----:--:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] +0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] +0100 1000 11dd dDDD:00:-----:-----:--:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] +0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] +0100 1010 zzss sSSS:00:-NZ00:-----:--:10: TST.z s +0100 1010 11dd dDDD:00:-NZ00:-----:--:30: TAS.B d[!Areg] +0100 1010 1111 1100:00:-----:-----:T-:00: ILLEGAL +0100 1100 00ss sSSS:20:-NZVC:-----:--:13: MULL.L #1,s[!Areg] +0100 1100 01ss sSSS:20:-NZV0:-----:T-:13: DIVL.L #1,s[!Areg] +0100 1100 10ss sSSS:00:-----:-----:--:01: MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd] +0100 1100 11ss sSSS:00:-----:-----:--:01: MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd] +0100 1110 0100 JJJJ:00:-----:XNZVC:--:10: TRAP #J +0100 1110 0101 0rrr:00:-----:-----:--:31: LINK.W Ar,#1 +0100 1110 0101 1rrr:00:-----:-----:--:30: UNLK.L Ar +0100 1110 0110 0rrr:02:-----:-----:T-:10: MVR2USP.L Ar +0100 1110 0110 1rrr:02:-----:-----:T-:20: MVUSP2R.L Ar +0100 1110 0111 0000:02:-----:-----:T-:00: RESET +0100 1110 0111 0001:00:-----:-----:--:00: NOP +0100 1110 0111 0010:02:XNZVC:-----:T-:10: STOP #1 +0100 1110 0111 0011:02:XNZVC:-----:TR:00: RTE +0100 1110 0111 0100:00:-----:-----:-R:10: RTD #1 +0100 1110 0111 0101:00:-----:-----:-R:00: RTS +0100 1110 0111 0110:00:-----:XNZVC:T-:00: TRAPV +0100 1110 0111 0111:00:XNZVC:-----:-R:00: RTR +0100 1110 0111 1010:12:-----:-----:T-:10: MOVEC2 #1 +0100 1110 0111 1011:12:-----:-----:T-:10: MOVE2C #1 +0100 1110 10ss sSSS:00://///://///:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 00ss sSSS:00:-N???:-----:T-:11: CHK.L s[!Areg],Dr +0100 rrr1 10ss sSSS:00:-N???:-----:T-:11: CHK.W s[!Areg],Dr +0100 1110 11ss sSSS:00://///://///:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 11ss sSSS:00:-----:-----:--:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar + +% This variant of ADDQ is word and long sized only +0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] +0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] +0101 jjj0 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #j,d[!Areg] + +% This variant of SUBQ is word and long sized only +0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] +0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] +0101 jjj1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #j,d[!Areg] + +0101 cccc 1100 1rrr:00:-----:-++++:-B:31: DBcc.W Dr,#1 +0101 cccc 11dd dDDD:00:-----:-++++:--:20: Scc.B d[!Areg] +0101 cccc 1111 1010:20:-----:-????:T-:10: TRAPcc #1 +0101 cccc 1111 1011:20:-----:-????:T-:10: TRAPcc #2 +0101 cccc 1111 1100:20:-----:-????:T-:00: TRAPcc % Bxx.L is 68020 only, but setting the CPU level to 2 would give illegal % instruction exceptions when compiling a 68000 only emulation, which isn't % what we want either. -0110 0001 0000 0000:00://///://///:40: BSR.W #1 -0110 0001 IIII IIII:00://///://///:40: BSR.B #i -0110 0001 1111 1111:00://///://///:40: BSR.L #2 -0110 CCCC 0000 0000:00:-----:+++++:40: Bcc.W #1 -0110 CCCC IIII IIII:00:-----:+++++:40: Bcc.B #i -0110 CCCC 1111 1111:00:-----:+++++:40: Bcc.L #2 - -0111 rrr0 iiii iiii:00:-NZ00:-----:12: MOVE.L #i,Dr - -1000 rrr0 zzss sSSS:00:-NZ00:-----:13: OR.z s[!Areg],Dr -1000 rrr0 11ss sSSS:00:?????:?????:13: DIVU.W s[!Areg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: SBCD.B d[Dreg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: SBCD.B d[Areg-Apdi],Arp -1000 rrr1 zzdd dDDD:00:-NZ00:-----:13: OR.z Dr,d[!Areg,Dreg] -1000 rrr1 01dd dDDD:20:?????:?????:12: PACK d[Dreg],Dr -1000 rrr1 01dd dDDD:20:?????:?????:12: PACK d[Areg-Apdi],Arp -1000 rrr1 10dd dDDD:20:?????:?????:12: UNPK d[Dreg],Dr -1000 rrr1 10dd dDDD:20:?????:?????:12: UNPK d[Areg-Apdi],Arp -1000 rrr1 11ss sSSS:00:?????:?????:13: DIVS.W s[!Areg],Dr - -1001 rrr0 zzss sSSS:00:XNZVC:-----:13: SUB.z s,Dr -1001 rrr0 11ss sSSS:00:-----:-----:13: SUBA.W s,Ar -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: SUBX.z d[Dreg],Dr -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: SUBX.z d[Areg-Apdi],Arp -1001 rrr1 zzdd dDDD:00:XNZVC:-----:13: SUB.z Dr,d[!Areg,Dreg] -1001 rrr1 11ss sSSS:00:-----:-----:13: SUBA.L s,Ar - -1011 rrr0 zzss sSSS:00:-NZVC:-----:11: CMP.z s,Dr -1011 rrr0 11ss sSSS:00:-NZVC:-----:11: CMPA.W s,Ar -1011 rrr1 11ss sSSS:00:-NZVC:-----:11: CMPA.L s,Ar -1011 rrr1 zzdd dDDD:00:-NZVC:-----:11: CMPM.z d[Areg-Aipi],ArP -1011 rrr1 zzdd dDDD:00:-NZ00:-----:13: EOR.z Dr,d[!Areg] - -1100 rrr0 zzss sSSS:00:-NZ00:-----:13: AND.z s[!Areg],Dr -1100 rrr0 11ss sSSS:00:-NZ00:-----:13: MULU.W s[!Areg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: ABCD.B d[Dreg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:13: ABCD.B d[Areg-Apdi],Arp -1100 rrr1 zzdd dDDD:00:-NZ00:-----:13: AND.z Dr,d[!Areg,Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:33: EXG.L Dr,d[Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:33: EXG.L Ar,d[Areg] -1100 rrr1 10dd dDDD:00:-----:-----:33: EXG.L Dr,d[Areg] -1100 rrr1 11ss sSSS:00:-NZ00:-----:13: MULS.W s[!Areg],Dr - -1101 rrr0 zzss sSSS:00:XNZVC:-----:13: ADD.z s,Dr -1101 rrr0 11ss sSSS:00:-----:-----:13: ADDA.W s,Ar -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: ADDX.z d[Dreg],Dr -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:13: ADDX.z d[Areg-Apdi],Arp -1101 rrr1 zzdd dDDD:00:XNZVC:-----:13: ADD.z Dr,d[!Areg,Dreg] -1101 rrr1 11ss sSSS:00:-----:-----:13: ADDA.L s,Ar - -1110 jjjf zz00 0RRR:00:XNZVC:-----:13: ASf.z #j,DR -1110 jjjf zz00 1RRR:00:XNZ0C:-----:13: LSf.z #j,DR -1110 jjjf zz01 0RRR:00:XNZ0C:X----:13: ROXf.z #j,DR -1110 jjjf zz01 1RRR:00:-NZ0C:-----:13: ROf.z #j,DR -1110 rrrf zz10 0RRR:00:XNZVC:X----:13: ASf.z Dr,DR -1110 rrrf zz10 1RRR:00:XNZ0C:X----:13: LSf.z Dr,DR -1110 rrrf zz11 0RRR:00:XNZ0C:X----:13: ROXf.z Dr,DR -1110 rrrf zz11 1RRR:00:-NZ0C:-----:13: ROf.z Dr,DR -1110 000f 11dd dDDD:00:XNZVC:-----:13: ASfW.W d[!Dreg,Areg] -1110 001f 11dd dDDD:00:XNZ0C:-----:13: LSfW.W d[!Dreg,Areg] -1110 010f 11dd dDDD:00:XNZ0C:X----:13: ROXfW.W d[!Dreg,Areg] -1110 011f 11dd dDDD:00:-NZ0C:-----:13: ROfW.W d[!Dreg,Areg] - -1110 1000 11ss sSSS:20:?????:?????:11: BFTST #1,s[!Areg,Apdi,Aipi,Immd] -1110 1001 11ss sSSS:20:?????:?????:11: BFEXTU #1,s[!Areg,Apdi,Aipi,Immd] -1110 1010 11ss sSSS:20:?????:?????:13: BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1011 11ss sSSS:20:?????:?????:11: BFEXTS #1,s[!Areg,Apdi,Aipi,Immd] -1110 1100 11ss sSSS:20:?????:?????:13: BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1101 11ss sSSS:20:?????:?????:11: BFFFO #1,s[!Areg,Apdi,Aipi,Immd] -1110 1110 11ss sSSS:20:?????:?????:13: BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] -1110 1111 11ss sSSS:20:?????:?????:13: BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +0110 0001 0000 0000:00://///://///:-B:40: BSR.W #1 +0110 0001 IIII IIII:00://///://///:-B:40: BSR.B #i +0110 0001 1111 1111:00://///://///:-B:40: BSR.L #2 +0110 CCCC 0000 0000:00:-----:-++++:-B:40: Bcc.W #1 +0110 CCCC IIII IIII:00:-----:-++++:-B:40: Bcc.B #i +0110 CCCC 1111 1111:00:-----:-++++:-B:40: Bcc.L #2 + +0111 rrr0 iiii iiii:00:-NZ00:-----:--:12: MOVE.L #i,Dr + +1000 rrr0 zzss sSSS:00:-NZ00:-----:--:13: OR.z s[!Areg],Dr +1000 rrr0 11ss sSSS:00:-NZV0:-----:T-:13: DIVU.W s[!Areg],Dr +1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Dreg],Dr +1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp +1000 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: OR.z Dr,d[!Areg,Dreg] +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp +1000 rrr1 11ss sSSS:00:-NZV0:-----:T-:13: DIVS.W s[!Areg],Dr + +1001 rrr0 zzss sSSS:00:XNZVC:-----:--:13: SUB.z s,Dr +1001 rrr0 11ss sSSS:00:-----:-----:--:13: SUBA.W s,Ar +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp +1001 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z Dr,d[!Areg,Dreg] +1001 rrr1 11ss sSSS:00:-----:-----:--:13: SUBA.L s,Ar + +1011 rrr0 zzss sSSS:00:-NZVC:-----:--:11: CMP.z s,Dr +1011 rrr0 11ss sSSS:00:-NZVC:-----:--:11: CMPA.W s,Ar +1011 rrr1 11ss sSSS:00:-NZVC:-----:--:11: CMPA.L s,Ar +1011 rrr1 zzdd dDDD:00:-NZVC:-----:--:11: CMPM.z d[Areg-Aipi],ArP +1011 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z Dr,d[!Areg] + +1100 rrr0 zzss sSSS:00:-NZ00:-----:--:13: AND.z s[!Areg],Dr +1100 rrr0 11ss sSSS:00:-NZ00:-----:--:13: MULU.W s[!Areg],Dr +1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Dreg],Dr +1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp +1100 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: AND.z Dr,d[!Areg,Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] +1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] +1100 rrr1 11ss sSSS:00:-NZ00:-----:--:13: MULS.W s[!Areg],Dr + +1101 rrr0 zzss sSSS:00:XNZVC:-----:--:13: ADD.z s,Dr +1101 rrr0 11ss sSSS:00:-----:-----:--:13: ADDA.W s,Ar +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp +1101 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z Dr,d[!Areg,Dreg] +1101 rrr1 11ss sSSS:00:-----:-----:--:13: ADDA.L s,Ar + +1110 jjjf zz00 0RRR:00:XNZVC:-----:--:13: ASf.z #j,DR +1110 jjjf zz00 1RRR:00:XNZ0C:-----:--:13: LSf.z #j,DR +1110 jjjf zz01 0RRR:00:XNZ0C:X----:--:13: ROXf.z #j,DR +1110 jjjf zz01 1RRR:00:-NZ0C:-----:--:13: ROf.z #j,DR +1110 rrrf zz10 0RRR:00:XNZVC:X----:--:13: ASf.z Dr,DR +1110 rrrf zz10 1RRR:00:XNZ0C:X----:--:13: LSf.z Dr,DR +1110 rrrf zz11 0RRR:00:XNZ0C:X----:--:13: ROXf.z Dr,DR +1110 rrrf zz11 1RRR:00:-NZ0C:-----:--:13: ROf.z Dr,DR +1110 000f 11dd dDDD:00:XNZVC:-----:--:13: ASfW.W d[!Dreg,Areg] +1110 001f 11dd dDDD:00:XNZ0C:-----:--:13: LSfW.W d[!Dreg,Areg] +1110 010f 11dd dDDD:00:XNZ0C:X----:--:13: ROXfW.W d[!Dreg,Areg] +1110 011f 11dd dDDD:00:-NZ0C:-----:--:13: ROfW.W d[!Dreg,Areg] + +1110 1000 11ss sSSS:20:-NZ00:-----:--:11: BFTST #1,s[!Areg,Apdi,Aipi,Immd] +1110 1001 11ss sSSS:20:-NZ00:-----:--:11: BFEXTU #1,s[!Areg,Apdi,Aipi,Immd] +1110 1010 11ss sSSS:20:-NZ00:-----:--:13: BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1011 11ss sSSS:20:-NZ00:-----:--:11: BFEXTS #1,s[!Areg,Apdi,Aipi,Immd] +1110 1100 11ss sSSS:20:-NZ00:-----:--:13: BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1101 11ss sSSS:20:-NZ00:-----:--:11: BFFFO #1,s[!Areg,Apdi,Aipi,Immd] +1110 1110 11ss sSSS:20:-NZ00:-----:--:13: BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1111 11ss sSSS:20:-NZ00:-----:--:13: BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] % floating point co processor -% TODO: FPU is currently commented out -% 1111 0010 00ss sSSS:30:?????:?????:11: FPP #1,s -% 1111 0010 01ss sSSS:30:?????:?????:11: FDBcc #1,s[Areg-Dreg] -% 1111 0010 01ss sSSS:30:?????:?????:11: FScc #1,s[!Areg,Immd,PC8r,PC16] -% 1111 0010 0111 1010:30:?????:?????:10: FTRAPcc #1 -% 1111 0010 0111 1011:30:?????:?????:10: FTRAPcc #2 -% 1111 0010 0111 1100:30:?????:?????:00: FTRAPcc -% 1111 0010 10KK KKKK:30:?????:?????:11: FBcc #K,#1 -% 1111 0010 11KK KKKK:30:?????:?????:11: FBcc #K,#2 -% 1111 0011 00ss sSSS:32:?????:?????:20: FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16] -% 1111 0011 01ss sSSS:32:?????:?????:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] +1111 0010 00ss sSSS:30:-----:-----:--:11: FPP #1,s +1111 0010 01ss sSSS:30:-----:-----:-B:11: FDBcc #1,s[Areg-Dreg] +1111 0010 01ss sSSS:30:-----:-----:--:11: FScc #1,s[!Areg,Immd,PC8r,PC16] +1111 0010 0111 1010:30:-----:-----:T-:10: FTRAPcc #1 +1111 0010 0111 1011:30:-----:-----:T-:10: FTRAPcc #2 +1111 0010 0111 1100:30:-----:-----:T-:00: FTRAPcc +1111 0010 10KK KKKK:30:-----:-----:-B:11: FBcc #K,#1 +1111 0010 11KK KKKK:30:-----:-----:-B:11: FBcc #K,#2 +1111 0011 00ss sSSS:32:-----:-----:--:20: FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16] +1111 0011 01ss sSSS:32:-----:-----:--:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] % 68040 instructions -1111 0100 ii00 1rrr:42:-----:-----:02: CINVL #i,Ar -1111 0100 ii01 0rrr:42:-----:-----:02: CINVP #i,Ar -1111 0100 ii01 1rrr:42:-----:-----:00: CINVA #i -1111 0100 ii10 1rrr:42:-----:-----:02: CPUSHL #i,Ar -1111 0100 ii11 0rrr:42:-----:-----:02: CPUSHP #i,Ar -1111 0100 ii11 1rrr:42:-----:-----:00: CPUSHA #i -1111 0110 0010 0rrr:40:-----:-----:12: MOVE16 ArP,ARP +1111 0100 pp00 1rrr:42:-----:-----:T-:02: CINVL #p,Ar +1111 0100 pp01 0rrr:42:-----:-----:T-:02: CINVP #p,Ar +1111 0100 pp01 1rrr:42:-----:-----:T-:00: CINVA #p +1111 0100 pp10 1rrr:42:-----:-----:T-:02: CPUSHL #p,Ar +1111 0100 pp11 0rrr:42:-----:-----:T-:02: CPUSHP #p,Ar +1111 0100 pp11 1rrr:42:-----:-----:T-:00: CPUSHA #p +% destination register number is encoded in the following word +1111 0110 0010 0rrr:40:-----:-----:--:12: MOVE16 ArP,AxP +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],Al +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Areg-Aipi] +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],Al +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Aipi-Aind] + +% MMU disabled +% 1111 0101 iiii iSSS:42:?????:?????:T-:11: MMUOP #i,s + +% EmulOp instructions (deprecated, to be removed) +0111 0001 0000 0000:02:-----:-----:-R:00: EMULOP_RETURN +0111 0001 EEEE EEEE:02:-----:-----:-J:10: EMULOP #E + +% NatFea instructions (do I have the srcaddr correct?) disabled +% 0111 0011 0000 0000:00:-----:-----:-J:00: NATFEAT_ID +% 0111 0011 0000 0001:00:-----:-----:-J:00: NATFEAT_CALL From 77e20bda2abeebc62646c0674daddaa8192eeb50 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 22 Apr 2018 20:39:37 -0500 Subject: [PATCH 209/534] Back to BasiliskII uae_cpu but with ARAnyM JIT --- BasiliskII/src/CrossPlatform/video_blit.h | 21 +- BasiliskII/src/CrossPlatform/video_vosf.h | 647 ----- BasiliskII/src/SDL/video_sdl.cpp | 477 +--- BasiliskII/src/Unix/CMakeLists.txt | 25 +- BasiliskII/src/Unix/main_unix.cpp | 24 +- BasiliskII/src/Unix/sysdeps.h | 7 +- BasiliskII/src/include/main.h | 7 + BasiliskII/src/include/prefs.h | 6 - BasiliskII/src/prefs.cpp | 10 - BasiliskII/src/prefs_items.cpp | 10 + BasiliskII/src/uae_cpu/Makefile.am | 80 - BasiliskII/src/uae_cpu/aranym_glue.cpp | 327 --- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 2 - BasiliskII/src/uae_cpu/build68k.c | 56 +- .../src/uae_cpu/compiler/codegen_x86.cpp | 6 +- BasiliskII/src/uae_cpu/compiler/compemu.h | 4 +- .../src/uae_cpu/compiler/compemu_support.cpp | 130 +- BasiliskII/src/uae_cpu/compiler/gencomp.c | 13 +- BasiliskII/src/uae_cpu/compiler/gencomp_arm.c | 2 +- BasiliskII/src/uae_cpu/cpu_emulation.h | 40 +- BasiliskII/src/uae_cpu/cpudefsa.cpp | 5 - BasiliskII/src/uae_cpu/cpuemu1.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu1_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu2.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu2_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu3.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu3_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu4.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu4_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu5.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu5_nf.cpp | 4 - BasiliskII/src/uae_cpu/cpuemu6.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu6_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu7.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu7_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu8.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu8_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpufunctbla.cpp | 5 - BasiliskII/src/uae_cpu/cpummu.cpp | 1096 -------- BasiliskII/src/uae_cpu/cpummu.h | 267 -- BasiliskII/src/uae_cpu/cpuopti.c | 312 +++ BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 - BasiliskII/src/uae_cpu/cpustbla.cpp | 5 - BasiliskII/src/uae_cpu/debug.cpp | 82 - BasiliskII/src/uae_cpu/fpu/core.h | 69 +- BasiliskII/src/uae_cpu/fpu/exceptions.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/exceptions.h | 45 +- BasiliskII/src/uae_cpu/fpu/flags.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/flags.h | 49 +- BasiliskII/src/uae_cpu/fpu/fpu.h | 50 +- BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 656 ++--- BasiliskII/src/uae_cpu/fpu/fpu_ieee.h | 47 +- BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp | 2110 --------------- BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp | 410 +-- BasiliskII/src/uae_cpu/fpu/fpu_uae.h | 45 +- BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp | 749 +----- BasiliskII/src/uae_cpu/fpu/fpu_x86.h | 87 +- BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h | 32 - BasiliskII/src/uae_cpu/fpu/impl.h | 52 +- BasiliskII/src/uae_cpu/fpu/mathlib.cpp | 43 +- BasiliskII/src/uae_cpu/fpu/mathlib.h | 486 ++-- BasiliskII/src/uae_cpu/fpu/rounding.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/rounding.h | 45 +- BasiliskII/src/uae_cpu/fpu/types.h | 70 +- BasiliskII/src/uae_cpu/gencpu.c | 1443 +++++----- BasiliskII/src/uae_cpu/m68k.h | 361 +-- BasiliskII/src/uae_cpu/memory-uae.h | 606 ----- BasiliskII/src/uae_cpu/memory.cpp | 649 ++++- BasiliskII/src/uae_cpu/memory.h | 153 +- BasiliskII/src/uae_cpu/newcpu.cpp | 2360 ++++++++--------- BasiliskII/src/uae_cpu/newcpu.h | 355 ++- BasiliskII/src/uae_cpu/noflags.h | 4 +- BasiliskII/src/uae_cpu/readcpu.cpp | 239 +- BasiliskII/src/uae_cpu/readcpu.h | 67 +- BasiliskII/src/uae_cpu/readcpua.cpp | 5 - BasiliskII/src/uae_cpu/registers.h | 116 - BasiliskII/src/uae_cpu/spcflags.h | 83 +- BasiliskII/src/uae_cpu/table68k | 110 +- 78 files changed, 4471 insertions(+), 10969 deletions(-) delete mode 100644 BasiliskII/src/uae_cpu/Makefile.am delete mode 100644 BasiliskII/src/uae_cpu/aranym_glue.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpudefsa.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu1.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu1_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu2.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu2_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu3.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu3_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu4.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu4_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu5.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu5_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu6.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu6_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu7.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu7_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu8.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu8_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpufunctbla.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpummu.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpummu.h create mode 100644 BasiliskII/src/uae_cpu/cpuopti.c delete mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpustbla.cpp delete mode 100644 BasiliskII/src/uae_cpu/debug.cpp delete mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp delete mode 100644 BasiliskII/src/uae_cpu/memory-uae.h delete mode 100644 BasiliskII/src/uae_cpu/readcpua.cpp delete mode 100644 BasiliskII/src/uae_cpu/registers.h diff --git a/BasiliskII/src/CrossPlatform/video_blit.h b/BasiliskII/src/CrossPlatform/video_blit.h index 9ca19ad6a..1b6cb68be 100644 --- a/BasiliskII/src/CrossPlatform/video_blit.h +++ b/BasiliskII/src/CrossPlatform/video_blit.h @@ -36,25 +36,7 @@ extern void (*Screen_blit)(uint8 * dest, const uint8 * source, uint32 length); extern bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_order, int mac_depth); extern uint32 ExpandMap[256]; -// Glue for SheepShaver and BasiliskII -#ifdef SHEEPSHAVER -enum { - VIDEO_DEPTH_1BIT = APPLE_1_BIT, - VIDEO_DEPTH_2BIT = APPLE_2_BIT, - VIDEO_DEPTH_4BIT = APPLE_4_BIT, - VIDEO_DEPTH_8BIT = APPLE_8_BIT, - VIDEO_DEPTH_16BIT = APPLE_16_BIT, - VIDEO_DEPTH_32BIT = APPLE_32_BIT -}; -#define VIDEO_MODE VideoInfo -#define VIDEO_MODE_INIT VideoInfo const & mode = VModes[cur_mode] -#define VIDEO_MODE_INIT_MONITOR VIDEO_MODE_INIT -#define VIDEO_MODE_ROW_BYTES mode.viRowBytes -#define VIDEO_MODE_X mode.viXsize -#define VIDEO_MODE_Y mode.viYsize -#define VIDEO_MODE_RESOLUTION mode.viAppleID -#define VIDEO_MODE_DEPTH mode.viAppleMode -#else +// Glue for BasiliskII enum { VIDEO_DEPTH_1BIT = VDEPTH_1BIT, VIDEO_DEPTH_2BIT = VDEPTH_2BIT, @@ -71,7 +53,6 @@ enum { #define VIDEO_MODE_Y mode.y #define VIDEO_MODE_RESOLUTION mode.resolution_id #define VIDEO_MODE_DEPTH mode.depth -#endif #endif /* VIDEO_BLIT_H */ diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index 148a9e6f5..980ea34d6 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -21,651 +21,4 @@ #ifndef VIDEO_VOSF_H #define VIDEO_VOSF_H -// Note: this file must be #include'd only in video_x.cpp -#ifdef ENABLE_VOSF - -#include "sigsegv.h" -#include "vm_alloc.h" - -// Glue for SDL and X11 support -#ifdef TEST_VOSF_PERFORMANCE -#define MONITOR_INIT /* nothing */ -#else -#ifdef USE_SDL_VIDEO -#define MONITOR_INIT SDL_monitor_desc &monitor -#define VIDEO_DRV_WIN_INIT driver_base *drv -#define VIDEO_DRV_DGA_INIT driver_base *drv -#define VIDEO_DRV_LOCK_PIXELS SDL_VIDEO_LOCK_SURFACE(drv->s) -#define VIDEO_DRV_UNLOCK_PIXELS SDL_VIDEO_UNLOCK_SURFACE(drv->s) -#define VIDEO_DRV_DEPTH drv->s->format->BitsPerPixel -#define VIDEO_DRV_WIDTH drv->s->w -#define VIDEO_DRV_HEIGHT drv->s->h -#define VIDEO_DRV_ROW_BYTES drv->s->pitch -#else -#ifdef SHEEPSHAVER -#define MONITOR_INIT /* nothing */ -#define VIDEO_DRV_WIN_INIT /* nothing */ -#define VIDEO_DRV_DGA_INIT /* nothing */ -#define VIDEO_DRV_WINDOW the_win -#define VIDEO_DRV_GC the_gc -#define VIDEO_DRV_IMAGE img -#define VIDEO_DRV_HAVE_SHM have_shm -#else -#define MONITOR_INIT X11_monitor_desc &monitor -#define VIDEO_DRV_WIN_INIT driver_window *drv -#define VIDEO_DRV_DGA_INIT driver_dga *drv -#define VIDEO_DRV_WINDOW drv->w -#define VIDEO_DRV_GC drv->gc -#define VIDEO_DRV_IMAGE drv->img -#define VIDEO_DRV_HAVE_SHM drv->have_shm -#endif -#define VIDEO_DRV_LOCK_PIXELS /* nothing */ -#define VIDEO_DRV_UNLOCK_PIXELS /* nothing */ -#define VIDEO_DRV_DEPTH VIDEO_DRV_IMAGE->depth -#define VIDEO_DRV_WIDTH VIDEO_DRV_IMAGE->width -#define VIDEO_DRV_HEIGHT VIDEO_DRV_IMAGE->height -#define VIDEO_DRV_ROW_BYTES VIDEO_DRV_IMAGE->bytes_per_line -#endif -#endif - -// Prototypes -static void vosf_do_set_dirty_area(uintptr first, uintptr last); -static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row); - -// Variables for Video on SEGV support -static uint8 *the_host_buffer; // Host frame buffer in VOSF mode - -struct ScreenPageInfo { - unsigned top, bottom; // Mapping between this virtual page and Mac scanlines -}; - -struct ScreenInfo { - uintptr memStart; // Start address aligned to page boundary - uint32 memLength; // Length of the memory addressed by the screen pages - - uintptr pageSize; // Size of a page - int pageBits; // Shift count to get the page number - uint32 pageCount; // Number of pages allocated to the screen - - bool dirty; // Flag: set if the frame buffer was touched - bool very_dirty; // Flag: set if the frame buffer was completely modified (e.g. colormap changes) - char * dirtyPages; // Table of flags set if page was altered - ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines -}; - -static ScreenInfo mainBuffer; - -#define PFLAG_SET_VALUE 0x00 -#define PFLAG_CLEAR_VALUE 0x01 -#define PFLAG_SET_VALUE_4 0x00000000 -#define PFLAG_CLEAR_VALUE_4 0x01010101 -#define PFLAG_SET(page) mainBuffer.dirtyPages[page] = PFLAG_SET_VALUE -#define PFLAG_CLEAR(page) mainBuffer.dirtyPages[page] = PFLAG_CLEAR_VALUE -#define PFLAG_ISSET(page) (mainBuffer.dirtyPages[page] == PFLAG_SET_VALUE) -#define PFLAG_ISCLEAR(page) (mainBuffer.dirtyPages[page] != PFLAG_SET_VALUE) - -#ifdef UNALIGNED_PROFITABLE -# define PFLAG_ISSET_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_SET_VALUE_4) -# define PFLAG_ISCLEAR_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_CLEAR_VALUE_4) -#else -# define PFLAG_ISSET_4(page) \ - PFLAG_ISSET(page ) && PFLAG_ISSET(page+1) \ - && PFLAG_ISSET(page+2) && PFLAG_ISSET(page+3) -# define PFLAG_ISCLEAR_4(page) \ - PFLAG_ISCLEAR(page ) && PFLAG_ISCLEAR(page+1) \ - && PFLAG_ISCLEAR(page+2) && PFLAG_ISCLEAR(page+3) -#endif - -// Set the selected page range [ first_page, last_page [ into the SET state -#define PFLAG_SET_RANGE(first_page, last_page) \ - memset(mainBuffer.dirtyPages + (first_page), PFLAG_SET_VALUE, \ - (last_page) - (first_page)) - -// Set the selected page range [ first_page, last_page [ into the CLEAR state -#define PFLAG_CLEAR_RANGE(first_page, last_page) \ - memset(mainBuffer.dirtyPages + (first_page), PFLAG_CLEAR_VALUE, \ - (last_page) - (first_page)) - -#define PFLAG_SET_ALL do { \ - PFLAG_SET_RANGE(0, mainBuffer.pageCount); \ - mainBuffer.dirty = true; \ -} while (0) - -#define PFLAG_CLEAR_ALL do { \ - PFLAG_CLEAR_RANGE(0, mainBuffer.pageCount); \ - mainBuffer.dirty = false; \ - mainBuffer.very_dirty = false; \ -} while (0) - -#define PFLAG_SET_VERY_DIRTY do { \ - mainBuffer.very_dirty = true; \ -} while (0) - -// Set the following macro definition to 1 if your system -// provides a really fast strchr() implementation -//#define HAVE_FAST_STRCHR 0 - -static inline unsigned find_next_page_set(unsigned page) -{ -#if HAVE_FAST_STRCHR - char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_SET_VALUE); - return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; -#else - while (PFLAG_ISCLEAR_4(page)) - page += 4; - while (PFLAG_ISCLEAR(page)) - page++; - return page; -#endif -} - -static inline unsigned find_next_page_clear(unsigned page) -{ -#if HAVE_FAST_STRCHR - char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_CLEAR_VALUE); - return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; -#else - while (PFLAG_ISSET_4(page)) - page += 4; - while (PFLAG_ISSET(page)) - page++; - return page; -#endif -} - -#if defined(HAVE_PTHREADS) -static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF pthread_mutex_lock(&vosf_lock); -#define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock); -#elif defined(HAVE_SPINLOCKS) -static spinlock_t vosf_lock = SPIN_LOCK_UNLOCKED; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF spin_lock(&vosf_lock) -#define UNLOCK_VOSF spin_unlock(&vosf_lock) -#else -#define LOCK_VOSF -#define UNLOCK_VOSF -#endif - -static int log_base_2(uint32 x) -{ - uint32 mask = 0x80000000; - int l = 31; - while (l >= 0 && (x & mask) == 0) { - mask >>= 1; - l--; - } - return l; -} - -// Extend size to page boundary -static uint32 page_extend(uint32 size) -{ - const uint32 page_size = vm_get_page_size(); - const uint32 page_mask = page_size - 1; - return (size + page_mask) & ~page_mask; -} - - -/* - * Check if VOSF acceleration is profitable on this platform - */ - -#ifndef VOSF_PROFITABLE_TRIES -#define VOSF_PROFITABLE_TRIES VOSF_PROFITABLE_TRIES_DFL -#endif -const int VOSF_PROFITABLE_TRIES_DFL = 3; // Make 3 attempts for full screen update -const int VOSF_PROFITABLE_THRESHOLD = 16667/2; // 60 Hz (half of the quantum) - -static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faults_p = NULL) -{ - uint32 duration = 0; - uint32 n_tries = VOSF_PROFITABLE_TRIES; - const uint32 n_page_faults = mainBuffer.pageCount * n_tries; - -#ifdef SHEEPSHAVER - const bool accel = PrefsFindBool("gfxaccel"); -#else - const bool accel = false; -#endif - - for (uint32 i = 0; i < n_tries; i++) { - uint64 start = GetTicks_usec(); - for (uint32 p = 0; p < mainBuffer.pageCount; p++) { - uint8 *addr = (uint8 *)(mainBuffer.memStart + (p * mainBuffer.pageSize)); - if (accel) - vosf_do_set_dirty_area((uintptr)addr, (uintptr)addr + mainBuffer.pageSize - 1); - else - addr[0] = 0; // Trigger Screen_fault_handler() - } - duration += uint32(GetTicks_usec() - start); - - PFLAG_CLEAR_ALL; - mainBuffer.dirty = false; - if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) - return false; - } - - if (duration_p) - *duration_p = duration; - if (n_page_faults_p) - *n_page_faults_p = n_page_faults; - - D(bug("Triggered %d page faults in %ld usec (%.1f usec per fault)\n", n_page_faults, duration, double(duration) / double(n_page_faults))); - return ((duration / n_tries) < (VOSF_PROFITABLE_THRESHOLD * (frame_skip ? frame_skip : 1))); -} - - -/* - * Initialize the VOSF system (mainBuffer structure, SIGSEGV handler) - */ - -static bool video_vosf_init(MONITOR_INIT) -{ - VIDEO_MODE_INIT_MONITOR; - - const uintptr page_size = vm_get_page_size(); - const uintptr page_mask = page_size - 1; - - // Round up frame buffer base to page boundary - mainBuffer.memStart = (((uintptr) the_buffer) + page_mask) & ~page_mask; - - // The frame buffer size shall already be aligned to page boundary (use page_extend) - mainBuffer.memLength = the_buffer_size; - - mainBuffer.pageSize = page_size; - mainBuffer.pageBits = log_base_2(mainBuffer.pageSize); - mainBuffer.pageCount = (mainBuffer.memLength + page_mask)/mainBuffer.pageSize; - - // The "2" more bytes requested are a safety net to insure the - // loops in the update routines will terminate. - // See "How can we deal with array overrun conditions ?" hereunder for further details. - mainBuffer.dirtyPages = (char *) malloc(mainBuffer.pageCount + 2); - if (mainBuffer.dirtyPages == NULL) - return false; - - PFLAG_CLEAR_ALL; - PFLAG_CLEAR(mainBuffer.pageCount); - PFLAG_SET(mainBuffer.pageCount+1); - - // Allocate and fill in pageInfo with start and end (inclusive) row in number of bytes - mainBuffer.pageInfo = (ScreenPageInfo *) malloc(mainBuffer.pageCount * sizeof(ScreenPageInfo)); - if (mainBuffer.pageInfo == NULL) - return false; - - uint32 a = 0; - for (unsigned i = 0; i < mainBuffer.pageCount; i++) { - unsigned y1 = a / VIDEO_MODE_ROW_BYTES; - if (y1 >= VIDEO_MODE_Y) - y1 = VIDEO_MODE_Y - 1; - - unsigned y2 = (a + mainBuffer.pageSize) / VIDEO_MODE_ROW_BYTES; - if (y2 >= VIDEO_MODE_Y) - y2 = VIDEO_MODE_Y - 1; - - mainBuffer.pageInfo[i].top = y1; - mainBuffer.pageInfo[i].bottom = y2; - - a += mainBuffer.pageSize; - if (a > mainBuffer.memLength) - a = mainBuffer.memLength; - } - - // We can now write-protect the frame buffer - if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) - return false; - - // The frame buffer is sane, i.e. there is no write to it yet - mainBuffer.dirty = false; - return true; -} - - -/* - * Deinitialize VOSF system - */ - -static void video_vosf_exit(void) -{ - if (mainBuffer.pageInfo) { - free(mainBuffer.pageInfo); - mainBuffer.pageInfo = NULL; - } - if (mainBuffer.dirtyPages) { - free(mainBuffer.dirtyPages); - mainBuffer.dirtyPages = NULL; - } -} - - -/* - * Update VOSF state with specified dirty area - */ - -static void vosf_do_set_dirty_area(uintptr first, uintptr last) -{ - const int first_page = (first - mainBuffer.memStart) >> mainBuffer.pageBits; - const int last_page = (last - mainBuffer.memStart) >> mainBuffer.pageBits; - uint8 *addr = (uint8 *)(first & ~(mainBuffer.pageSize - 1)); - for (int i = first_page; i <= last_page; i++) { - if (PFLAG_ISCLEAR(i)) { - PFLAG_SET(i); - vm_protect(addr, mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); - } - addr += mainBuffer.pageSize; - } -} - -static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row) -{ - if (x < 0) { - w -= -x; - x = 0; - } - if (y < 0) { - h -= -y; - y = 0; - } - if (w <= 0 || h <= 0) - return; - if (unsigned(x + w) > screen_width) - w -= unsigned(x + w) - screen_width; - if (unsigned(y + h) > screen_height) - h -= unsigned(y + h) - screen_height; - LOCK_VOSF; - if (bytes_per_row >= screen_width) { - const int bytes_per_pixel = bytes_per_row / screen_width; - if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) * bytes_per_pixel; - vosf_do_set_dirty_area(a0, a1); - } else { - for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = a0 + (w - 1) * bytes_per_pixel; - vosf_do_set_dirty_area(a0, a1); - } - } - } else { - const int pixels_per_byte = screen_width / bytes_per_row; - if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) / pixels_per_byte; - vosf_do_set_dirty_area(a0, a1); - } else { - for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + j * bytes_per_row + (x + w - 1) / pixels_per_byte; - vosf_do_set_dirty_area(a0, a1); - } - } - } - mainBuffer.dirty = true; - UNLOCK_VOSF; -} - - -/* - * Screen fault handler - */ - -bool Screen_fault_handler(sigsegv_info_t *sip) -{ - const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); - - /* Someone attempted to write to the frame buffer. Make it writeable - * now so that the data could actually be written to. It will be made - * read-only back in one of the screen update_*() functions. - */ - if (((uintptr)addr - mainBuffer.memStart) < mainBuffer.memLength) { - const int page = ((uintptr)addr - mainBuffer.memStart) >> mainBuffer.pageBits; - LOCK_VOSF; - if (PFLAG_ISCLEAR(page)) { - PFLAG_SET(page); - vm_protect((char *)(addr & ~(mainBuffer.pageSize - 1)), mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); - } - mainBuffer.dirty = true; - UNLOCK_VOSF; - return true; - } - - /* Otherwise, we don't know how to handle the fault, let it crash */ - return false; -} - - -/* - * Update display for Windowed mode and VOSF - */ - -/* How can we deal with array overrun conditions ? - - The state of the framebuffer pages that have been touched are maintained - in the dirtyPages[] table. That table is (pageCount + 2) bytes long. - -Terminology - - "Last Page" denotes the pageCount-nth page, i.e. dirtyPages[pageCount - 1]. - "CLEAR Page Guard" refers to the page following the Last Page but is always - in the CLEAR state. "SET Page Guard" refers to the page following the CLEAR - Page Guard but is always in the SET state. - -Rough process - - The update routines must determine which pages have to be blitted to the - screen. This job consists in finding the first_page that was touched. - i.e. find the next page that is SET. Then, finding how many pages were - touched starting from first_page. i.e. find the next page that is CLEAR. - -There are two cases to check: - - - Last Page is CLEAR: find_next_page_set() will reach the SET Page Guard - but it is beyond the valid pageCount value. Therefore, we exit from the - update routine. - - - Last Page is SET: first_page equals (pageCount - 1) and - find_next_page_clear() will reach the CLEAR Page Guard. We blit the last - page to the screen. On the next iteration, page equals pageCount and - find_next_page_set() will reach the SET Page Guard. We still safely exit - from the update routine because the SET Page Guard position is greater - than pageCount. -*/ - -#ifndef TEST_VOSF_PERFORMANCE -static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) -{ - VIDEO_MODE_INIT; - - unsigned page = 0; - for (;;) { - const unsigned first_page = find_next_page_set(page); - if (first_page >= mainBuffer.pageCount) - break; - - page = find_next_page_clear(first_page); - PFLAG_CLEAR_RANGE(first_page, page); - - // Make the dirty pages read-only again - const int32 offset = first_page << mainBuffer.pageBits; - const uint32 length = (page - first_page) << mainBuffer.pageBits; - vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); - - // There is at least one line to update - const int y1 = mainBuffer.pageInfo[first_page].top; - const int y2 = mainBuffer.pageInfo[page - 1].bottom; - const int height = y2 - y1 + 1; - - // Update the_host_buffer - VIDEO_DRV_LOCK_PIXELS; - const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; - const int dst_bytes_per_row = VIDEO_DRV_ROW_BYTES; - int i1 = y1 * src_bytes_per_row, i2 = y1 * dst_bytes_per_row, j; - for (j = y1; j <= y2; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); - i1 += src_bytes_per_row; - i2 += dst_bytes_per_row; - } - VIDEO_DRV_UNLOCK_PIXELS; - -#ifdef USE_SDL_VIDEO - SDL_UpdateRect(drv->s, 0, y1, VIDEO_MODE_X, height); -#else - if (VIDEO_DRV_HAVE_SHM) - XShmPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height, 0); - else - XPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height); -#endif - } - mainBuffer.dirty = false; -} -#endif - - -/* - * Update display for DGA mode and VOSF - * (only in Real or Direct Addressing mode) - */ - -#ifndef TEST_VOSF_PERFORMANCE -#if DIRECT_ADDRESSING -static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) -{ - VIDEO_MODE_INIT; - - // Compute number of bytes per row, take care to virtual screens - const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; - const int dst_bytes_per_row = TrivialBytesPerRow(VIDEO_MODE_X, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); - const int scr_bytes_per_row = VIDEO_DRV_ROW_BYTES; - assert(dst_bytes_per_row <= scr_bytes_per_row); - const int scr_bytes_left = scr_bytes_per_row - dst_bytes_per_row; - - // Full screen update requested? - if (mainBuffer.very_dirty) { - PFLAG_CLEAR_ALL; - vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ); - memcpy(the_buffer_copy, the_buffer, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - VIDEO_DRV_LOCK_PIXELS; - int i1 = 0, i2 = 0; - for (uint32_t j = 0; j < VIDEO_MODE_Y; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); - i1 += src_bytes_per_row; - i2 += scr_bytes_per_row; - } -#ifdef USE_SDL_VIDEO - SDL_UpdateRect(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); -#endif - VIDEO_DRV_UNLOCK_PIXELS; - return; - } - - // Setup partial blitter (use 64-pixel wide chunks) - const uint32 n_pixels = 64; - const uint32 n_chunks = VIDEO_MODE_X / n_pixels; - const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); - const uint32 src_chunk_size = src_bytes_per_row / n_chunks; - const uint32 dst_chunk_size = dst_bytes_per_row / n_chunks; - const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); - const uint32 dst_chunk_size_left = dst_bytes_per_row - (n_chunks * dst_chunk_size); - - unsigned page = 0; - uint32 last_scanline = uint32(-1); - for (;;) { - const unsigned first_page = find_next_page_set(page); - if (first_page >= mainBuffer.pageCount) - break; - - page = find_next_page_clear(first_page); - PFLAG_CLEAR_RANGE(first_page, page); - - // Make the dirty pages read-only again - const int32 offset = first_page << mainBuffer.pageBits; - const uint32 length = (page - first_page) << mainBuffer.pageBits; - vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); - - // Optimized for scanlines, don't process overlapping lines again - uint32 y1 = mainBuffer.pageInfo[first_page].top; - uint32 y2 = mainBuffer.pageInfo[page - 1].bottom; - if (last_scanline != uint32(-1)) { - if (y1 <= last_scanline && ++y1 >= VIDEO_MODE_Y) - continue; - if (y2 <= last_scanline && ++y2 >= VIDEO_MODE_Y) - continue; - } - last_scanline = y2; - - // Update the_host_buffer and copy of the_buffer, one line at a time - uint32 i1 = y1 * src_bytes_per_row; - uint32 i2 = y1 * scr_bytes_per_row; -#ifdef USE_SDL_VIDEO - int bbi = 0; - SDL_Rect bb[3] = { - { Sint16(VIDEO_MODE_X), Sint16(y1), 0, 0 }, - { Sint16(VIDEO_MODE_X), -1, 0, 0 }, - { Sint16(VIDEO_MODE_X), -1, 0, 0 } - }; -#endif - VIDEO_DRV_LOCK_PIXELS; - for (uint32 j = y1; j <= y2; j++) { - for (uint32 i = 0; i < n_chunks; i++) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size); -#ifdef USE_SDL_VIDEO - const int x = i * n_pixels; - if (x < bb[bbi].x) { - if (bb[bbi].w) - bb[bbi].w += bb[bbi].x - x; - else - bb[bbi].w = n_pixels; - bb[bbi].x = x; - } - else if (x >= bb[bbi].x + bb[bbi].w) - bb[bbi].w = x + n_pixels - bb[bbi].x; -#endif - } - i1 += src_chunk_size; - i2 += dst_chunk_size; - } - if (src_chunk_size_left && dst_chunk_size_left) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size_left); - } - i1 += src_chunk_size_left; - i2 += dst_chunk_size_left; -#ifdef USE_SDL_VIDEO - const int x = n_chunks * n_pixels; - if (x < bb[bbi].x) { - if (bb[bbi].w) - bb[bbi].w += bb[bbi].x - x; - else - bb[bbi].w = n_pixels_left; - bb[bbi].x = x; - } - else if (x >= bb[bbi].x + bb[bbi].w) - bb[bbi].w = x + n_pixels_left - bb[bbi].x; -#endif - } - i2 += scr_bytes_left; -#ifdef USE_SDL_VIDEO - bb[bbi].h++; - if (bb[bbi].w && (j == y1 || j == y2 - 1 || j == y2)) { - bbi++; - assert(bbi <= 3); - if (j != y2) - bb[bbi].y = j + 1; - } -#endif - } -#ifdef USE_SDL_VIDEO - SDL_UpdateRects(drv->s, bbi, bb); -#endif - VIDEO_DRV_UNLOCK_PIXELS; - } - mainBuffer.dirty = false; -} -#endif -#endif - -#endif /* ENABLE_VOSF */ - #endif /* VIDEO_VOSF_H */ diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 9b2855daa..9158d729b 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -67,19 +67,11 @@ using std::vector; static vector VideoModes; // Display types -#ifdef SHEEPSHAVER -enum { - DISPLAY_WINDOW = DIS_WINDOW, // windowed display - DISPLAY_SCREEN = DIS_SCREEN // fullscreen display -}; -extern int display_type; // See enum above -#else enum { DISPLAY_WINDOW, // windowed display DISPLAY_SCREEN // fullscreen display }; static int display_type = DISPLAY_WINDOW; // See enum above -#endif // Constants const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; @@ -102,11 +94,7 @@ static volatile bool thread_stop_req = false; static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req #endif -#ifdef ENABLE_VOSF -static bool use_vosf = false; // Flag: VOSF enabled -#else static const bool use_vosf = false; // VOSF not possible -#endif static bool ctrl_down = false; // Flag: Ctrl key pressed static bool caps_on = false; // Flag: Caps Lock on @@ -160,14 +148,7 @@ extern void SysMountFirstFloppy(void); * SDL surface locking glue */ -#ifdef ENABLE_VOSF -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ - the_host_buffer = (uint8 *)(SURFACE)->pixels; \ -} while (0) -#else #define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) -#endif #define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ if (SDL_MUSTLOCK(SURFACE)) { \ @@ -209,83 +190,6 @@ static inline void vm_release_framebuffer(void *fb, uint32 size) } - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -// Color depth modes type -typedef int video_depth; - -// 1, 2, 4 and 8 bit depths use a color palette -static inline bool IsDirectMode(VIDEO_MODE const & mode) -{ - return IsDirectMode(mode.viAppleMode); -} - -// Abstract base class representing one (possibly virtual) monitor -// ("monitor" = rectangular display with a contiguous frame buffer) -class monitor_desc { -public: - monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} - virtual ~monitor_desc() {} - - // Get current Mac frame buffer base address - uint32 get_mac_frame_base(void) const {return screen_base;} - - // Set Mac frame buffer base address (called from switch_to_mode()) - void set_mac_frame_base(uint32 base) {screen_base = base;} - - // Get current video mode - const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} - - // Called by the video driver to switch the video mode on this display - // (must call set_mac_frame_base()) - virtual void switch_to_current_mode(void) = 0; - - // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) - virtual void set_palette(uint8 *pal, int num) = 0; -}; - -// Vector of pointers to available monitor descriptions, filled by VideoInit() -static vector VideoMonitors; - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - if (xsize == 640 && ysize == 480) - return APPLE_640x480; - if (xsize == 800 && ysize == 600) - return APPLE_800x600; - if (xsize == 1024 && ysize == 768) - return APPLE_1024x768; - if (xsize == 1152 && ysize == 768) - return APPLE_1152x768; - if (xsize == 1152 && ysize == 900) - return APPLE_1152x900; - if (xsize == 1280 && ysize == 1024) - return APPLE_1280x1024; - if (xsize == 1600 && ysize == 1200) - return APPLE_1600x1200; - return APPLE_CUSTOM; -} - -// Display error alert -static void ErrorAlert(int error) -{ - ErrorAlert(GetString(error)); -} - -// Display warning alert -static void WarningAlert(int warning) -{ - WarningAlert(GetString(warning)); -} -#endif - - /* * monitor_desc subclass for SDL display */ @@ -417,11 +321,6 @@ static inline int sdl_display_height(void) // Check wether specified mode is available static bool has_mode(int type, int width, int height, int depth) { -#ifdef SHEEPSHAVER - // Filter out Classic resolutions - if (width == 512 && height == 384) - return false; -#endif // Filter out out-of-bounds resolutions if (width > sdl_display_width() || height > sdl_display_height()) @@ -442,10 +341,6 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt // Fill in VideoMode entry VIDEO_MODE mode; -#ifdef SHEEPSHAVER - resolution_id = find_apple_resolution(width, height); - mode.viType = type; -#endif VIDEO_MODE_X = width; VIDEO_MODE_Y = height; VIDEO_MODE_RESOLUTION = resolution_id; @@ -483,50 +378,7 @@ static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) // Migrate preferences items (XXX to be handled in MigratePrefs()) static void migrate_screen_prefs(void) { -#ifdef SHEEPSHAVER - // Look-up priorities are: "screen", "screenmodes", "windowmodes". - if (PrefsFindString("screen")) - return; - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - int width = 0, height = 0; - if (screen_modes) { - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (width < modes[i].width && height < modes[i].height) { - width = modes[i].width; - height = modes[i].height; - } - } - } - } else { - if (window_modes & 1) - width = 640, height = 480; - if (window_modes & 2) - width = 800, height = 600; - } - if (width && height) { - char str[32]; - sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); - PrefsReplaceString("screen", str); - } -#endif } @@ -563,17 +415,10 @@ class driver_base { SDL_Surface *s; // The surface we draw into }; -#ifdef ENABLE_VOSF -static void update_display_window_vosf(driver_base *drv); -#endif static void update_display_static(driver_base *drv); static driver_base *drv = NULL; // Pointer to currently used driver object -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - driver_base::driver_base(SDL_monitor_desc &m) : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) { @@ -587,9 +432,6 @@ void driver_base::set_video_mode(int flags) if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, SDL_HWSURFACE | flags)) == NULL) return; -#ifdef ENABLE_VOSF - the_host_buffer = (uint8 *)s->pixels; -#endif } void driver_base::init() @@ -597,30 +439,6 @@ void driver_base::init() set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); int aligned_height = (VIDEO_MODE_Y + 15) & ~15; -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - - // Check whether we can initialize the VOSF subsystem and it's profitable - if (!video_vosf_init(monitor)) { - WarningAlert(STR_VOSF_INIT_ERR); - use_vosf = false; - } - else if (!video_vosf_profitable()) { - video_vosf_exit(); - printf("VOSF acceleration is not profitable on this platform, disabling it\n"); - use_vosf = false; - } - if (!use_vosf) { - free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); - the_host_buffer = NULL; - } -#endif if (!use_vosf) { // Allocate memory for frame buffer the_buffer_size = (aligned_height + 2) * s->pitch; @@ -654,18 +472,6 @@ void driver_base::adapt_to_video_mode() { bool hardware_cursor = false; -#ifdef SHEEPSHAVER - hardware_cursor = video_can_change_cursor(); - if (hardware_cursor) { - // Create cursor - if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { - SDL_SetCursor(sdl_cursor); - } - } - // Tell the video driver there's a change in cursor type - if (private_data) - private_data->cursorHardware = hardware_cursor; -#endif // Hide cursor SDL_ShowCursor(hardware_cursor); @@ -698,18 +504,6 @@ driver_base::~driver_base() the_buffer_copy = NULL; } } -#ifdef ENABLE_VOSF - else { - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - - // Deinitialize VOSF - video_vosf_exit(); - } -#endif SDL_ShowCursor(1); } @@ -892,22 +686,10 @@ bool SDL_monitor_desc::video_open(void) return true; } -#ifdef SHEEPSHAVER -bool VideoInit(void) -{ - const bool classic = false; -#else bool VideoInit(bool classic) { -#endif classic_mode = classic; -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - // Create Mutexes if ((sdl_events_lock = SDL_CreateMutex()) == NULL) return false; @@ -1035,10 +817,6 @@ bool VideoInit(bool classic) const VIDEO_MODE & mode = (*i); if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - std::vector::const_iterator begin = VideoModes.begin(); - cur_mode = distance(begin, i); -#endif break; } } @@ -1046,22 +824,8 @@ bool VideoInit(bool classic) const VIDEO_MODE & mode = VideoModes[0]; default_depth = VIDEO_MODE_DEPTH; default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - cur_mode = 0; -#endif } -#ifdef SHEEPSHAVER - for (int i = 0; i < VideoModes.size(); i++) - VModes[i] = VideoModes[i]; - VideoInfo *p = &VModes[VideoModes.size()]; - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; -#endif - #if DEBUG D(bug("Available video modes:\n")); for (i = VideoModes.begin(); i != end; ++i) { @@ -1162,9 +926,6 @@ static void do_toggle_fullscreen(void) drv->adapt_to_video_mode(); // reset the palette -#ifdef SHEEPSHAVER - video_set_palette(); -#endif drv->update_palette(); // restore the screen contents @@ -1196,26 +957,6 @@ static void do_toggle_fullscreen(void) * Execute video VBL routine */ -#ifdef SHEEPSHAVER -void VideoVBL(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} -#else void VideoInterrupt(void) { // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() @@ -1233,28 +974,12 @@ void VideoInterrupt(void) UNLOCK_FRAME_BUFFER; LOCK_FRAME_BUFFER; } -#endif /* * Set palette */ -#ifdef SHEEPSHAVER -void video_set_palette(void) -{ - monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); - uint8 pal[256 * 3]; - for (int c = 0; c < n_colors; c++) { - pal[c*3 + 0] = mac_pal[c].red; - pal[c*3 + 1] = mac_pal[c].green; - pal[c*3 + 2] = mac_pal[c].blue; - } - monitor->set_palette(pal, n_colors); -} -#endif - void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) { const VIDEO_MODE &mode = get_current_mode(); @@ -1284,15 +1009,6 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); } -#ifdef ENABLE_VOSF - if (use_vosf) { - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - } -#endif } // Tell redraw thread to change palette @@ -1306,46 +1022,6 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) * Switch video mode */ -#ifdef SHEEPSHAVER -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - DisableInterrupt(); - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; - - cur_mode = i; - monitor_desc *monitor = VideoMonitors[0]; - monitor->switch_to_current_mode(); - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - thread_stop_req = false; - EnableInterrupt(); - return noErr; - } - } - return paramErr; -} -#endif - void SDL_monitor_desc::switch_to_current_mode(void) { // Close and reopen display @@ -1360,77 +1036,6 @@ void SDL_monitor_desc::switch_to_current_mode(void) } } - -/* - * Can we set the MacOS cursor image into the window? - */ - -#ifdef SHEEPSHAVER -bool video_can_change_cursor(void) -{ - if (display_type != DISPLAY_WINDOW) - return false; - -#if defined(__APPLE__) - static char driver[] = "Quartz?"; - static int quartzok = -1; - - if (quartzok < 0) { - if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) - quartzok = true; - else { - // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. - const SDL_version *vp = SDL_Linked_Version(); - int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); - quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); - } - } - - return quartzok; -#else - return true; -#endif -} -#endif - - -/* - * Set cursor image for window - */ - -#ifdef SHEEPSHAVER -void video_set_cursor(void) -{ - // Set new cursor image if it was changed - if (sdl_cursor) { - SDL_FreeCursor(sdl_cursor); - sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); - if (sdl_cursor) { - SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); - SDL_SetCursor(sdl_cursor); - - // XXX Windows apparently needs an extra mouse event to - // make the new cursor image visible. - // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the - // mouse, we have to put it back. - bool move = false; -#if defined(__APPLE__) - move = mouse_grabbed; -#endif - if (move) { - int visible = SDL_ShowCursor(-1); - if (visible) { - int x, y; - SDL_GetMouseState(&x, &y); - SDL_WarpMouse(x, y); - } - } - } - } -} -#endif - - /* * Keyboard-related utilify functions */ @@ -1609,13 +1214,6 @@ static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) static void force_complete_window_refresh() { if (display_type == DISPLAY_WINDOW) { -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - } -#endif // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; @@ -2017,43 +1615,6 @@ static void video_refresh_dga(void) video_refresh_window_static(); } -#ifdef ENABLE_VOSF -#if DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif // def ENABLE_VOSF static void video_refresh_window_static(void) { @@ -2081,20 +1642,10 @@ static void VideoRefreshInit(void) { // TODO: set up specialised 8bpp VideoRefresh handlers ? if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; + video_refresh = video_refresh_dga; } else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - video_refresh = video_refresh_window_static; + video_refresh = video_refresh_window_static; } } @@ -2159,27 +1710,3 @@ static int redraw_func(void *arg) return 0; } #endif - - -/* - * Record dirty area from NQD - */ - -#ifdef SHEEPSHAVER -void video_set_dirty_area(int x, int y, int w, int h) -{ -#ifdef ENABLE_VOSF - const VIDEO_MODE &mode = drv->mode; - const unsigned screen_width = VIDEO_MODE_X; - const unsigned screen_height = VIDEO_MODE_Y; - const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; - - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} -#endif diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index 65a607f89..9bc6431fb 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -5,7 +5,7 @@ project(BasiliskII) find_package(SDL REQUIRED) find_library(COREFOUNDATION_LIBRARY CoreFoundation) find_library(IOKIT_LIBRARY IOKit) -include_directories(../include . ../CrossPlatform ../uae_cpu ${SDL_INCLUDE_DIR}) +include_directories(../include . ../CrossPlatform ../uae_cpu ${SDL_INCLUDE_DIR} ${CMAKE_CURRENT_BINARY_DIR}) add_executable(build68k ../uae_cpu/build68k.c) @@ -15,7 +15,12 @@ add_custom_command(OUTPUT cpudefs.cpp add_executable(gencpu ../uae_cpu/gencpu.c ../uae_cpu/readcpu.cpp cpudefs.cpp) -add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp cpufunctbl.cpp COMMAND gencpu DEPENDS gencpu) +#add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp cpufunctbl.cpp COMMAND gencpu DEPENDS gencpu) +add_custom_command(OUTPUT cpuemu.cpp cpuemu_nf.cpp cpustbl.cpp cpustbl_nf.cpp COMMAND gencpu DEPENDS gencpu) + +add_executable(gencomp ../uae_cpu/compiler/gencomp.c ../uae_cpu/readcpu.cpp cpudefs.cpp) + +add_custom_command(OUTPUT compemu.cpp compstbl.cpp comptbl.h COMMAND gencomp DEPENDS gencomp) set(BasiliskII_SRCS ../main.cpp @@ -76,11 +81,16 @@ set(BasiliskII_SRCS ../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp - ../uae_cpu/fpu/fpu_uae.cpp + ../uae_cpu/fpu/fpu_ieee.cpp cpustbl.cpp cpudefs.cpp cpuemu.cpp - cpufunctbl.cpp + compemu.cpp + compstbl.cpp + ../uae_cpu/compiler/compemu_support.cpp + ../uae_cpu/compiler/compemu_fpp.cpp + cpustbl_nf.cpp + cpuemu_nf.cpp #addressing mode =direct -DDIRECT_ADDRESSING #includes ) @@ -88,10 +98,15 @@ set(BasiliskII_SRCS add_executable(BasiliskII ${BasiliskII_SRCS}) set_source_files_properties(${BasiliskII_SRCS} - PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DFPU_UAE -DDATADIR=\\\".\\\"") + PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DCPU_x86_64 -DFIXED_ADDRESSING -DCPU_64_BIT -DNOFLAGS_SUPPORT -DFPU_IEEE -DUSE_JIT -DJIT -DX86_64_ASSEMBLY -DOPTIMIZED_FLAGS -DWINUAE_ARANYM -DUSE_JIT_FPU -DUSE_INLINING -DDATADIR=\\\".\\\"") + +# set_property(SOURCE compemu_support.cpp APPEND_STRING PROPERTY COMPILE_FLAGS " -O0 ") target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) +SET( CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -pagezero_size 0x2000" ) + +add_definitions(-march=native) #keycodes -> ../SDL/keycodes diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 3affe2366..60824593e 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -57,6 +57,10 @@ using std::string; #include "sigsegv.h" #include "rpc.h" +#if USE_JIT +extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp +#endif + #define DEBUG 0 #include "debug.h" @@ -166,12 +170,6 @@ static int vm_acquire_mac_fixed(void *addr, size_t size) static sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) { const uintptr fault_address = (uintptr)sigsegv_get_fault_address(sip); -#if ENABLE_VOSF - // Handle screen fault - extern bool Screen_fault_handler(sigsegv_info_t *sip); - if (Screen_fault_handler(sip)) - return SIGSEGV_RETURN_SUCCESS; -#endif #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION // Ignore writes to ROM @@ -199,10 +197,13 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) fprintf(stderr, " [IP=%p]", fault_instruction); fprintf(stderr, "\n"); #if EMULATED_68K - extern void m68k_dumpstate (FILE *, uaecptr *); - m68k_dumpstate(stderr, 0); + extern void m68k_dumpstate (uaecptr *); + m68k_dumpstate(0); +#endif +#if USE_JIT && JIT_DEBUG + extern void compiler_dumpstate(void); + compiler_dumpstate(); #endif - VideoQuitFullScreen(); QuitEmulator(); @@ -652,7 +653,10 @@ void QuitEmulator(void) void FlushCodeCache(void *start, uint32 size) { - +#if USE_JIT + if (UseJIT) + flush_icache_range((uint8 *)start, size); +#endif } diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 56b7a71d6..68deb7b6e 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -21,7 +21,9 @@ #ifndef SYSDEPS_H #define SYSDEPS_H - +#ifndef UNUSED +#define UNUSED(x) ((void)x) +#endif #if 1 @@ -35,9 +37,6 @@ /* Define if your system supports TUN/TAP devices. */ /* #undef ENABLE_TUNTAP */ -/* Define if using video enabled on SEGV signals. */ -#define ENABLE_VOSF 1 - /* Define to 1 if you have the header file. */ #define HAVE_ARPA_INET_H 1 diff --git a/BasiliskII/src/include/main.h b/BasiliskII/src/include/main.h index b55ddc6d2..1ba7b6acb 100644 --- a/BasiliskII/src/include/main.h +++ b/BasiliskII/src/include/main.h @@ -31,6 +31,13 @@ extern int FPUType; // Flag: 24-bit-addressing? extern bool TwentyFourBitAddressing; +// 68k register structure (for Execute68k()) +struct M68kRegisters { + uint32 d[8]; + uint32 a[8]; + uint16 sr; +}; + // General functions extern bool InitAll(const char *vmdir); extern void ExitAll(void); diff --git a/BasiliskII/src/include/prefs.h b/BasiliskII/src/include/prefs.h index 216137f2a..bce4a6e0e 100644 --- a/BasiliskII/src/include/prefs.h +++ b/BasiliskII/src/include/prefs.h @@ -53,12 +53,6 @@ extern int32 PrefsFindInt32(const char *name); extern void PrefsRemoveItem(const char *name, int index = 0); -#ifdef SHEEPSHAVER -// Platform specific functions: -extern void prefs_init(); -extern void prefs_exit(); -#endif - /* * Definition of preferences items */ diff --git a/BasiliskII/src/prefs.cpp b/BasiliskII/src/prefs.cpp index 434992ce3..27131b74f 100644 --- a/BasiliskII/src/prefs.cpp +++ b/BasiliskII/src/prefs.cpp @@ -121,11 +121,6 @@ void PrefsInit(const char *vmdir, int &argc, char **&argv) argc -= k; } } - -#ifdef SHEEPSHAVER - // System specific initialization - prefs_init(); -#endif } @@ -135,11 +130,6 @@ void PrefsInit(const char *vmdir, int &argc, char **&argv) void PrefsExit(void) { -#ifdef SHEEPSHAVER - // System specific deinitialization - prefs_exit(); -#endif - // Free prefs list prefs_node *p = the_prefs, *next; while (p) { diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index afb692b9e..4a7f1a347 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -92,7 +92,17 @@ void AddPrefsDefaults(void) PrefsAddBool("noclipconversion", false); PrefsAddBool("nogui", false); +#if USE_JIT + // JIT compiler specific options + PrefsAddBool("jit", true); + PrefsAddBool("jitfpu", true); + PrefsAddBool("jitdebug", false); + PrefsAddInt32("jitcachesize", 8192); + PrefsAddBool("jitlazyflush", true); + PrefsAddBool("jitinline", true); +#else PrefsAddBool("jit", false); +#endif PrefsAddInt32("keyboardtype", 5); } diff --git a/BasiliskII/src/uae_cpu/Makefile.am b/BasiliskII/src/uae_cpu/Makefile.am deleted file mode 100644 index 0f27219d5..000000000 --- a/BasiliskII/src/uae_cpu/Makefile.am +++ /dev/null @@ -1,80 +0,0 @@ -# -# Note: this Makefile only contains rules for the source -# generator tools. -# - -# -# suppress warnings about overriding LDFLAGS and CPPFLAGS -# -AUTOMAKE_OPTIONS = -Wno-gnu - -AM_CPPFLAGS = $(DEFINES) \ - "-I$(srcdir)/../include" \ - "-I$(srcdir)/../Unix" \ - "-I$(builddir)/.." \ - "-I$(builddir)" \ - "-I$(srcdir)" - -CC = $(CC_FOR_BUILD) -CXX = $(CXX_FOR_BUILD) - -LDFLAGS = $(LDFLAGS_FOR_BUILD) -CPPFLAGS = $(CPPFLAGS_FOR_BUILD) -CFLAGS = $(CFLAGS_FOR_BUILD) -CXXFLAGS = $(CXXFLAGS_FOR_BUILD) -LIBS=-lm - -CFLAGS_NOWARN = $(DBGSP) -AM_CFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) -AM_CXXFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) - -noinst_PROGRAMS = build68k gencpu -if USE_JIT -noinst_PROGRAMS += gencomp -endif - -BUILT_SOURCES = \ - cpudefs.cpp \ - cpuemu.cpp \ - cpustbl.cpp \ - cpufunctbl.cpp \ - cputbl.h \ - $(empty) - -build68k_SOURCES = build68k.c -gencpu_SOURCES = gencpu.c m68k.h readcpu.cpp readcpu.h cpudefs.cpp -gencomp_SOURCES = -if GENCOMP_ARCH_X86 -gencomp_SOURCES += compiler/gencomp.c -endif -if GENCOMP_ARCH_ARM -gencomp_SOURCES += compiler/gencomp_arm.c -endif -gencomp_SOURCES += readcpu.cpp cpudefs.cpp - -if USE_JIT -BUILT_SOURCES += compemu.cpp compstbl.cpp comptbl.h -endif - - -cpudefs.cpp: build68k$(EXEEXT) $(srcdir)/table68k - ./build68k <$(srcdir)/table68k > $@ -cpuemu.cpp: gencpu$(EXEEXT) - ./gencpu$(EXEEXT) -cpustbl.cpp cpufunctbl.cpp cputbl.h: cpuemu.cpp -compemu.cpp: gencomp$(EXEEXT) - ./gencomp$(EXEEXT) -compstbl.cpp comptbl.h: compemu.cpp - -CLEANFILES = $(BUILT_SOURCES) - -EXTRA_DIST = \ - table68k \ - compiler/codegen_arm.cpp compiler/codegen_arm.h \ - compiler/compemu_midfunc_arm.cpp compiler/compemu_midfunc_arm.h \ - compiler/compemu_midfunc_arm2.cpp compiler/compemu_midfunc_arm2.h \ - compiler/test_codegen_arm.c \ - compiler/codegen_x86.cpp compiler/codegen_x86.h \ - compiler/compemu_midfunc_x86.cpp compiler/compemu_midfunc_x86.h \ - compiler/test_codegen_x86.cpp \ - $(empty) diff --git a/BasiliskII/src/uae_cpu/aranym_glue.cpp b/BasiliskII/src/uae_cpu/aranym_glue.cpp deleted file mode 100644 index 7148d446e..000000000 --- a/BasiliskII/src/uae_cpu/aranym_glue.cpp +++ /dev/null @@ -1,327 +0,0 @@ -/* - * aranym_glue.cpp - CPU interface - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#include "sysdeps.h" - -#include "cpu_emulation.h" -#include "newcpu.h" -#include "hardware.h" -#include "input.h" -#ifdef USE_JIT -# include "compiler/compemu.h" -#endif -#include "nf_objs.h" - -#include "debug.h" - -// RAM and ROM pointers -memptr RAMBase = 0; // RAM base (Atari address space) gb-- init is important -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize = 0x00e00000; // Size of RAM - -memptr ROMBase = 0x00e00000; // ROM base (Atari address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize = 0x00100000; // Size of ROM - -uint32 RealROMSize; // Real size of ROM - -memptr HWBase = 0x00f00000; // HW base (Atari address space) -uint8 *HWBaseHost; // HW base (host address space) -uint32 HWSize = 0x00100000; // Size of HW space - -memptr FastRAMBase = 0x01000000; // Fast-RAM base (Atari address space) -uint8 *FastRAMBaseHost; // Fast-RAM base (host address space) - -#ifdef HW_SIGSEGV -uint8 *FakeIOBaseHost; -#endif - -#ifdef FIXED_VIDEORAM -memptr VideoRAMBase = ARANYMVRAMSTART; // VideoRAM base (Atari address space) -#else -memptr VideoRAMBase; // VideoRAM base (Atari address space) -#endif -uint8 *VideoRAMBaseHost;// VideoRAM base (host address space) -//uint32 VideoRAMSize; // Size of VideoRAM - -#ifndef NOT_MALLOC -uintptr MEMBaseDiff; // Global offset between a Atari address and its Host equivalent -uintptr ROMBaseDiff; -uintptr FastRAMBaseDiff; -#endif - -uintptr VMEMBaseDiff; // Global offset between a Atari VideoRAM address and /dev/fb0 mmap - -// From newcpu.cpp -extern int quit_program; - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) -SDL_mutex *spcflags_lock; -#endif -#if defined(ENABLE_REALSTOP) -SDL_cond *stop_condition; -#endif - - -/* - * Initialize 680x0 emulation - */ - -bool InitMEM() { - InitMEMBaseDiff(RAMBaseHost, RAMBase); - InitROMBaseDiff(ROMBaseHost, ROMBase); - InitFastRAMBaseDiff(FastRAMBaseHost, FastRAMBase); - InitVMEMBaseDiff(VideoRAMBaseHost, VideoRAMBase); - return true; -} - -bool Init680x0(void) -{ - init_m68k(); - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - if ((spcflags_lock = SDL_CreateMutex()) == NULL) { - panicbug("Error by SDL_CreateMutex()"); - exit(EXIT_FAILURE); - } -#endif - -#if ENABLE_REALSTOP - if ((stop_condition = SDL_CreateCond()) == NULL) { - panicbug("Error by SDL_CreateCond()"); - exit(EXIT_FAILURE); - } -#endif - -#ifdef USE_JIT - if (bx_options.jit.jit) compiler_init(); -#endif - return true; -} - -/* - * Instr. RESET - */ - -void AtariReset(void) -{ - // reset Atari hardware here - HWReset(); - // reset NatFeats here - NFReset(); - // reset the input devices (input.cpp) - InputReset(); - -} - -/* - * Reset CPU - */ - -void Reset680x0(void) -{ - m68k_reset(); -} - -/* - * Deinitialize 680x0 emulation - */ - -void Exit680x0(void) -{ -#ifdef USE_JIT - if (bx_options.jit.jit) compiler_exit(); -#endif - exit_m68k(); -} - - -/* - * Reset and start 680x0 emulation - */ - -void Start680x0(void) -{ - m68k_reset(); -#ifdef USE_JIT - if (bx_options.jit.jit) { - m68k_compile_execute(); - } - else -#endif - m68k_execute(); -} - -/* - * Restart running 680x0 emulation safely from different thread - */ -void Restart680x0(void) -{ - quit_program = 2; - TriggerNMI(); -} - -/* - * Quit 680x0 emulation safely from different thread - */ -void Quit680x0(void) -{ - quit_program = 1; - TriggerNMI(); -} - - -int MFPdoInterrupt(void) -{ - return getMFP()->doInterrupt(); -} - -int SCCdoInterrupt(void) -{ - return getSCC()->doInterrupt(); -} - -/* - * Trigger interrupts - */ -void TriggerInternalIRQ(void) -{ - SPCFLAGS_SET( SPCFLAG_INTERNAL_IRQ ); -} - -void TriggerInt3(void) -{ - SPCFLAGS_SET( SPCFLAG_INT3 ); -} - -void TriggerVBL(void) -{ - SPCFLAGS_SET( SPCFLAG_VBL ); -} - -void TriggerInt5(void) -{ - SPCFLAGS_SET( SPCFLAG_INT5 ); -} - -void TriggerSCC(bool enable) -{ - if (enable) - SPCFLAGS_SET( SPCFLAG_SCC ); - else - SPCFLAGS_CLEAR( SPCFLAG_SCC ); -} - -void TriggerMFP(bool enable) -{ - if (enable) - SPCFLAGS_SET( SPCFLAG_MFP ); - else - SPCFLAGS_CLEAR( SPCFLAG_MFP ); -} - -void TriggerNMI(void) -{ - SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI -} - -#ifndef REBOOT_OR_HALT -#define REBOOT_OR_HALT 0 // halt by default -#endif - -#if REBOOT_OR_HALT == 1 -# define CPU_MSG "CPU: Rebooting" -# define CPU_ACTION Restart680x0() -#else -# define CPU_MSG "CPU: Halting" -# define CPU_ACTION Quit680x0() -#endif - -#ifdef ENABLE_EPSLIMITER - -#ifndef EPS_LIMIT -# define EPS_LIMIT 10000 /* this might be too high if ARAnyM is slowed down by printing the bus errors on console */ -#endif - -void check_eps_limit(uaecptr pc) -{ - static long last_exception_time=-1; - static long exception_per_sec=0; - static long exception_per_sec_pc=0; - static uaecptr prevpc = 0; - - if (bx_options.cpu.eps_enabled) { - if (last_exception_time == -1) { - last_exception_time = SDL_GetTicks(); - } - - exception_per_sec++; - - if (pc == prevpc) { - /* BUS ERRORs occur at the same PC - watch out! */ - exception_per_sec_pc++; - } - else { - exception_per_sec_pc = 0; - prevpc = pc; - } - - if (SDL_GetTicks() - last_exception_time > 1000) { - last_exception_time = SDL_GetTicks(); - if (exception_per_sec_pc > bx_options.cpu.eps_max || - exception_per_sec > EPS_LIMIT /* make it configurable */) { - panicbug("CPU: Exception per second limit reached: %ld/%ld", - exception_per_sec_pc, exception_per_sec); - /* would be cool to open SDL dialog here: */ - /* [Exception per seconds limit reached. XXXXX exception - occured in the last second. The limit is set to YYYYY - in your config file. Do you want to continue emulation, - reset ARAnyM or quit ?][Continue] [Reset] [Quit] - */ - panicbug(CPU_MSG); - CPU_ACTION; - } - exception_per_sec = 0; - exception_per_sec_pc = 0; - } - } -} -#endif - -void report_double_bus_error() -{ - panicbug("CPU: Double bus fault detected !"); - /* would be cool to open SDL dialog here: */ - /* [Double bus fault detected. The emulated system crashed badly. - Do you want to reset ARAnyM or quit ?] [Reset] [Quit]" - */ - panicbug(CPU_MSG); - CPU_ACTION; -} - -#ifdef FLIGHT_RECORDER -extern bool cpu_flight_recorder_active; -void cpu_flight_recorder(int activate) { cpu_flight_recorder_active = activate; } -#endif diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 1b03160ae..b29c77026 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -264,5 +264,3 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->a[i] = m68k_areg(regs, i); quit_program = false; } - -void report_double_bus_error() {} diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c index e996758d0..8ec3ab552 100644 --- a/BasiliskII/src/uae_cpu/build68k.c +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -1,43 +1,31 @@ /* - * build68k.c - m68k CPU builder + * UAE - The Un*x Amiga Emulator * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Read 68000 CPU specs from file "table68k" and build table68k.c * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * Copyright 1995,1996 Bernd Schmidt * - * ARAnyM is free software; you can redistribute it and/or modify + * 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. * - * ARAnyM is distributed in the hope that it will be useful, + * 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 ARAnyM; if not, write to the Free Software + * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ -/* - * UAE - The Un*x Amiga Emulator - * - * Read 68000 CPU specs from file "table68k" and build table68k.c - * - * Copyright 1995,1996 Bernd Schmidt - */ - -#include "readcpu.h" -#include -#include -#include -#include #include -#undef abort +#include +#include + +#include "sysdeps.h" +#include "readcpu.h" static FILE *tablef; static int nextch = 0; @@ -77,15 +65,15 @@ static int nextchtohex(void) } } -int main() +int main(int argc, char **argv) { int no_insns = 0; printf ("#include \"sysdeps.h\"\n"); printf ("#include \"readcpu.h\"\n"); printf ("struct instr_def defs68k[] = {\n"); -#if 0 - tablef = fopen("table68k","r"); +#ifdef WIN32 + tablef = fopen(argc > 1 ? argv[1] : "table68k","r"); if (tablef == NULL) { fprintf(stderr, "table68k not found\n"); exit(1); @@ -134,8 +122,8 @@ int main() case 'r': currbit = bitr; break; case 'R': currbit = bitR; break; case 'z': currbit = bitz; break; - case 'E': currbit = bitE; break; - case 'p': currbit = bitp; break; + case 'E': currbit = bitE; break; + case 'p': currbit = bitp; break; default: abort(); } if (!(bitmask & 1)) { @@ -150,7 +138,6 @@ int main() patbits[i] = nextch; getnextch(); } - (void) patbits; while (isspace(nextch) || nextch == ':') /* Get CPU and privilege level */ getnextch(); @@ -185,8 +172,6 @@ int main() getnextch(); switch(nextch){ case '-': flagset[i] = fa_unset; break; - case '/': flagset[i] = fa_isjmp; break; - case '+': flagset[i] = fa_isbranch; break; case '0': flagset[i] = fa_zero; break; case '1': flagset[i] = fa_one; break; case 'x': flagset[i] = fa_dontcare; break; @@ -206,8 +191,6 @@ int main() getnextch(); switch(nextch){ case '-': flaguse[i] = fu_unused; break; - case '/': flaguse[i] = fu_isjmp; break; - case '+': flaguse[i] = fu_maybecc; break; case '?': flaguse[i] = fu_unknown; break; default: flaguse[i] = fu_used; break; } @@ -252,7 +235,7 @@ int main() if (nextch != ':') abort(); - assert(fgets(opcstr, 250, tablef) != NULL); + fgets(opcstr, 250, tablef); getnextch(); { int j; @@ -260,12 +243,12 @@ int main() char *opstrp = opcstr, *osendp; int slen = 0; - while (isspace((int)*opstrp)) + while (isspace(*opstrp)) opstrp++; osendp = opstrp; while (*osendp) { - if (!isspace ((int)*osendp)) + if (!isspace (*osendp)) slen = osendp - opstrp + 1; osendp++; } @@ -288,5 +271,6 @@ int main() } } printf("};\nint n_defs68k = %d;\n", no_insns); + fflush(stdout); return 0; } diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp index 32e6982a0..24cfb5486 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -3629,7 +3629,7 @@ enum { X86_PROCESSOR_max }; -#if defined(UAE) || (defined(DEBUG) && DEBUG) +// #if defined(UAE) || (defined(DEBUG) && DEBUG) static const char * x86_processor_string_table[X86_PROCESSOR_max] = { "80386", "80486", @@ -3640,7 +3640,7 @@ static const char * x86_processor_string_table[X86_PROCESSOR_max] = { "Pentium4", "x86-64" }; -#endif +// #endif static struct ptt { const int align_loop; @@ -3890,7 +3890,7 @@ raw_init_cpu(void) } #ifndef UAE -static void __attribute_noinline__ prevent_redzone_use(void) {} +static void inline prevent_redzone_use(void) {} static bool target_check_bsf(void) { diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index 6e3abb1e0..15edd1029 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -42,7 +42,7 @@ typedef uae_u64 uintptr; typedef uae_u32 uintptr; #endif /* FIXME: cpummu.cpp also checks for USE_JIT, possibly others */ -// #define USE_JIT +#define USE_JIT #endif #ifdef USE_JIT @@ -515,7 +515,7 @@ void jit_abort(const TCHAR *format, ...); #else #ifdef WINUAE_ARANYM -#define jit_log(format, ...) D(bug(format, ##__VA_ARGS__)) +#define jit_log(format, ...) write_log(format"\n", ##__VA_ARGS__) #define jit_log2(format, ...) D2(bug(format, ##__VA_ARGS__)) void jit_abort(const char *format,...) __attribute__((format(printf, 1, 2))) __attribute__((__noreturn__)); #else diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index c7b942448..62fcfd36c 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -58,7 +58,7 @@ /* kludge for Brian, so he can compile under MSVC++ */ #define USE_NORMAL_CALLING_CONVENTION 0 -#include "sysconfig.h" +// #include "sysconfig.h" #include "sysdeps.h" #ifdef JIT @@ -71,6 +71,7 @@ #else #include "cpu_emulation.h" #include "main.h" +#include "prefs.h" #include "vm_alloc.h" #include "m68k.h" @@ -85,9 +86,14 @@ #include "compiler/compemu.h" #include "fpu/fpu.h" #include "fpu/flags.h" -#include "parameters.h" +// #include "parameters.h" #endif -#include "verify.h" +// #include "verify.h" + +// #define jit_log(format, ...) \ +// uae_log("JIT: " format "\n", ##__VA_ARGS__); +#define D2 D + #ifdef UAE #include "uae/log.h" @@ -174,7 +180,7 @@ void jit_abort(const char *format, ...) { va_list args; va_start(args, format); - ndebug::pdbvprintf(format, args); + vprintf(format, args); va_end(args); abort(); } @@ -254,6 +260,8 @@ extern int quit_program; // gb-- Extra data for Basilisk II/JIT #ifdef JIT_DEBUG static bool JITDebug = false; // Enable runtime disassemblers through mon? +#else +const bool JITDebug = false; #endif #if USE_INLINING #ifdef UAE @@ -504,7 +512,7 @@ static inline blockinfo* get_blockinfo_addr(void* addr) #if defined(CPU_arm) #define TARGET_NATIVE TARGET_ARM #endif -#include "disasm-glue.h" +// #include "disasm-glue.h" #ifdef JIT_DEBUG static void disasm_block(int disasm_target, const uint8 *start, size_t length) @@ -2642,13 +2650,13 @@ void compiler_init(void) #else #ifdef JIT_DEBUG // JIT debug mode ? - JITDebug = bx_options.jit.jitdebug; + JITDebug = PrefsFindBool("jitdebug"); #endif jit_log(" : enable runtime disassemblers : %s", JITDebug ? "yes" : "no"); #ifdef USE_JIT_FPU // Use JIT compiler for FPU instructions ? - avoid_fpu = !bx_options.jit.jitfpu; + avoid_fpu = !PrefsFindBool("jitfpu"); #else // JIT FPU is always disabled avoid_fpu = true; @@ -2656,7 +2664,7 @@ void compiler_init(void) jit_log(" : compile FPU instructions : %s", !avoid_fpu ? "yes" : "no"); // Get size of the translation cache (in KB) - cache_size = bx_options.jit.jitcachesize; + cache_size = PrefsFindInt32("jitcachesize"); jit_log(" : requested translation cache size : %d KB", cache_size); // Initialize target CPU (check for features, e.g. CMOV, rat stalls) @@ -2671,7 +2679,7 @@ void compiler_init(void) #endif // Translation cache flush mechanism - lazy_flush = (bx_options.jit.jitlazyflush == 0) ? false : true; + lazy_flush = PrefsFindBool("jitlazyflush"); jit_log(" : lazy translation cache invalidation : %s", str_on_off(lazy_flush)); flush_icache = lazy_flush ? flush_icache_lazy : flush_icache_hard; @@ -2680,7 +2688,7 @@ void compiler_init(void) jit_log(" : FP register aliasing : %s", str_on_off(USE_F_ALIAS)); jit_log(" : lazy constant offsetting : %s", str_on_off(USE_OFFSET)); #if USE_INLINING - follow_const_jumps = bx_options.jit.jitinline; + follow_const_jumps = PrefsFindBool("jitinline"); #endif jit_log(" : block inlining : %s", str_on_off(follow_const_jumps)); jit_log(" : separate blockinfo allocation : %s", str_on_off(USE_SEPARATE_BIA)); @@ -2786,12 +2794,12 @@ void compiler_exit(void) bool compiler_use_jit(void) { // Check for the "jit" prefs item - if (!bx_options.jit.jit) + if (!PrefsFindBool("jit")) return false; // Don't use JIT if translation cache size is less then MIN_CACHE_SIZE KB - if (bx_options.jit.jitcachesize < MIN_CACHE_SIZE) { - panicbug(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); + if (PrefsFindInt32("jitcachesize") < MIN_CACHE_SIZE) { + write_log(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); return false; } @@ -3579,6 +3587,8 @@ void alloc_cache(void) } } +extern void op_illg_1 (uae_u32 opcode) REGPARAM; + static void calc_checksum(blockinfo* bi, uae_u32* c1, uae_u32* c2) { uae_u32 k1 = 0; @@ -3869,7 +3879,7 @@ static inline void create_popalls(void) r=REG_PC_TMP; compemu_raw_mov_l_rm(r, uae_p32(®s.pc_p)); compemu_raw_and_l_ri(r,TAGMASK); - verify(sizeof(cache_tags[0]) == sizeof(void *)); + assert(sizeof(cache_tags[0]) == sizeof(void *)); compemu_raw_jmp_m_indexed(uae_p32(cache_tags), r, sizeof(void *)); /* now the exit points */ @@ -4009,7 +4019,7 @@ static bool merge_blacklist() #ifdef UAE const char *blacklist = ""; #else - const char *blacklist = bx_options.jit.jitblacklist; + const char *blacklist = PrefsFindString("jitblacklist"); #endif if (blacklist[0] != '\0') { const char *p = blacklist; @@ -4346,38 +4356,86 @@ void flush_icache(int n) #ifdef UAE static #endif -void flush_icache_range(uae_u32 start, uae_u32 length) +// void flush_icache_range(uae_u32 start, uae_u32 length) +// { +// if (!active) +// return; + +// #if LAZY_FLUSH_ICACHE_RANGE +// uae_u8 *start_p = get_real_address(start); +// blockinfo *bi = active; +// while (bi) { +// #if USE_CHECKSUM_INFO +// bool invalidate = false; +// for (checksum_info *csi = bi->csi; csi && !invalidate; csi = csi->next) +// invalidate = (((start_p - csi->start_p) < csi->length) || +// ((csi->start_p - start_p) < length)); +// #else +// // Assume system is consistent and would invalidate the right range +// const bool invalidate = (bi->pc_p - start_p) < length; +// #endif +// if (invalidate) { +// uae_u32 cl = cacheline(bi->pc_p); +// if (bi == cache_tags[cl + 1].bi) +// cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; +// bi->handler_to_use = (cpuop_func *)popall_execute_normal; +// set_dhtu(bi, bi->direct_pen); +// bi->status = BI_NEED_RECOMP; +// } +// bi = bi->next; +// } +// return; +// #else +// UNUSED(start); +// UNUSED(length); +// #endif +// flush_icache(-1); +// } + +void flush_icache_range(uae_u8 *start_p, uae_u32 length) { if (!active) return; #if LAZY_FLUSH_ICACHE_RANGE - uae_u8 *start_p = get_real_address(start); blockinfo *bi = active; while (bi) { #if USE_CHECKSUM_INFO - bool invalidate = false; - for (checksum_info *csi = bi->csi; csi && !invalidate; csi = csi->next) - invalidate = (((start_p - csi->start_p) < csi->length) || - ((csi->start_p - start_p) < length)); + bool candidate = false; + for (checksum_info *csi = bi->csi; csi; csi = csi->next) { + if (((start_p - csi->start_p) < csi->length) || + ((csi->start_p - start_p) < length)) { + candidate = true; + break; + } + } #else // Assume system is consistent and would invalidate the right range - const bool invalidate = (bi->pc_p - start_p) < length; + const bool candidate = (bi->pc_p - start_p) < length; #endif - if (invalidate) { - uae_u32 cl = cacheline(bi->pc_p); - if (bi == cache_tags[cl + 1].bi) + blockinfo *dbi = bi; + bi = bi->next; + if (candidate) { + uae_u32 cl = cacheline(dbi->pc_p); + if (dbi->status == BI_INVALID || dbi->status == BI_NEED_RECOMP) { + if (dbi == cache_tags[cl+1].bi) cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; - bi->handler_to_use = (cpuop_func *)popall_execute_normal; - set_dhtu(bi, bi->direct_pen); - bi->status = BI_NEED_RECOMP; + dbi->handler_to_use = (cpuop_func *)popall_execute_normal; + set_dhtu(dbi, dbi->direct_pen); + dbi->status = BI_INVALID; + } + else { + if (dbi == cache_tags[cl+1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_check_checksum; + dbi->handler_to_use = (cpuop_func *)popall_check_checksum; + set_dhtu(dbi, dbi->direct_pcc); + dbi->status = BI_NEED_CHECK; + } + remove_from_list(dbi); + add_to_dormant(dbi); } - bi = bi->next; } return; -#else - UNUSED(start); - UNUSED(length); #endif flush_icache(-1); } @@ -4631,7 +4689,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) comptbl=compfunctbl; } -#ifdef FLIGHT_RECORDER +#if FLIGHT_RECORDER { /* store also opcode to second register */ clobber_flags(); @@ -5008,7 +5066,7 @@ void exec_nostats(void) { for (;;) { uae_u32 opcode = GET_OPCODE; -#ifdef FLIGHT_RECORDER +#if FLIGHT_RECORDER m68k_record_step(m68k_getpc(), opcode); #endif (*cpufunctbl[opcode])(opcode); @@ -5038,7 +5096,7 @@ void execute_normal(void) for (;;) { /* Take note: This is the do-it-normal loop */ pc_hist[blocklen++].location = (uae_u16 *)regs.pc_p; uae_u32 opcode = GET_OPCODE; -#ifdef FLIGHT_RECORDER +#if FLIGHT_RECORDER m68k_record_step(m68k_getpc(), opcode); #endif (*cpufunctbl[opcode])(opcode); @@ -5082,7 +5140,7 @@ void m68k_compile_execute (void) for (;;) { if (quit_program > 0) { if (quit_program == 1) { -#ifdef FLIGHT_RECORDER +#if FLIGHT_RECORDER dump_flight_recorder(); #endif break; diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index a7c4ee2b2..febeddc90 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -28,7 +28,8 @@ */ #define CC_FOR_BUILD 1 -#include "sysconfig.h" +// #include "sysconfig.h" +#define WINUAE_ARANYM #include "sysdeps.h" #include "readcpu.h" @@ -3101,10 +3102,10 @@ gen_opcode (unsigned int opcode) failure; break; - case i_NATFEAT_ID: - case i_NATFEAT_CALL: - failure; - break; + // case i_NATFEAT_ID: + // case i_NATFEAT_CALL: + // failure; + // break; case i_MMUOP: isjump; @@ -3127,7 +3128,7 @@ gen_opcode (unsigned int opcode) static void generate_includes (FILE * f) { - fprintf (f, "#include \"sysconfig.h\"\n"); + // fprintf (f, "#include \"sysconfig.h\"\n"); fprintf (f, "#if defined(JIT)\n"); fprintf (f, "#include \"sysdeps.h\"\n"); #ifdef UAE diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c index 13e2776e6..e9bf9bb48 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c @@ -50,7 +50,7 @@ */ #define CC_FOR_BUILD 1 -#include "sysconfig.h" +// #include "sysconfig.h" #include "sysdeps.h" #include "readcpu.h" diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index 2e9268748..cd588ec10 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -1,7 +1,7 @@ /* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.8 version) + * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.10 version) * - * Basilisk II (C) 1997-1999 Christian Bauer + * Basilisk II (C) 1997-2008 Christian Bauer * * 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 @@ -21,6 +21,8 @@ #ifndef CPU_EMULATION_H #define CPU_EMULATION_H +#include + /* * Memory system @@ -35,15 +37,15 @@ extern uint32 ROMBaseMac; // ROM base (Mac address space) extern uint8 *ROMBaseHost; // ROM base (host address space) extern uint32 ROMSize; // Size of ROM -#if !REAL_ADDRESSING -// If we are not using real addressing, the Mac frame buffer gets mapped to this location -// The memory must be allocated by VideoInit(). If multiple monitors are used, they must -// share the frame buffer +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +// If we are not using real or direct addressing, the Mac frame buffer gets +// mapped to this location. The memory must be allocated by VideoInit(). +// If multiple monitors are used, they must share the frame buffer const uint32 MacFrameBaseMac = 0xa0000000; extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) extern uint32 MacFrameSize; // Size of frame buffer -extern int MacFrameLayout; // Frame buffer layout (see defines below) #endif +extern int MacFrameLayout; // Frame buffer layout (see defines below) // Possible frame buffer layouts enum { @@ -78,15 +80,17 @@ static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return me // Initialization extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation extern void Exit680x0(void); +extern void InitFrameBufferMapping(void); + +// 680x0 dynamic recompilation activation flag +#if USE_JIT +extern bool UseJIT; +#else +const bool UseJIT = false; +#endif // 680x0 emulation functions -struct M68kRegisters { - uint32 d[8]; - memptr a[8]; - uint16 sr; - memptr usp, isp, msp; - memptr pc; -}; +struct M68kRegisters; extern void Start680x0(void); // Reset and start 680x0 extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine @@ -95,12 +99,4 @@ extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS extern void TriggerInterrupt(void); // Trigger interrupt level 1 (InterruptFlag must be set first) extern void TriggerNMI(void); // Trigger interrupt level 7 -// CPU looping handlers -void check_eps_limit(uaecptr); -void report_double_bus_error(void); - -extern int intlev(void); - -static inline void AtariReset(void) {} - #endif diff --git a/BasiliskII/src/uae_cpu/cpudefsa.cpp b/BasiliskII/src/uae_cpu/cpudefsa.cpp deleted file mode 100644 index ad7d69795..000000000 --- a/BasiliskII/src/uae_cpu/cpudefsa.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpudefs.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpudefs.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1.cpp b/BasiliskII/src/uae_cpu/cpuemu1.cpp deleted file mode 100644 index 089eefd47..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu1.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_1 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp deleted file mode 100644 index 58acf4442..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_1 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2.cpp b/BasiliskII/src/uae_cpu/cpuemu2.cpp deleted file mode 100644 index 1e18b587b..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu2.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_2 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp deleted file mode 100644 index 8e5136c4a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_2 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3.cpp b/BasiliskII/src/uae_cpu/cpuemu3.cpp deleted file mode 100644 index 0385e2f03..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu3.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_3 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp deleted file mode 100644 index 6565dc8c3..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_3 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4.cpp b/BasiliskII/src/uae_cpu/cpuemu4.cpp deleted file mode 100644 index 13d27e7a5..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu4.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_4 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp deleted file mode 100644 index a16c36cb7..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_4 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5.cpp b/BasiliskII/src/uae_cpu/cpuemu5.cpp deleted file mode 100644 index 9b33a6543..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu5.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_5 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp deleted file mode 100644 index 5bf24360a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp +++ /dev/null @@ -1,4 +0,0 @@ -#define NOFLAGS 1 -#define PART_5 -#include "cpuemu.cpp" - diff --git a/BasiliskII/src/uae_cpu/cpuemu6.cpp b/BasiliskII/src/uae_cpu/cpuemu6.cpp deleted file mode 100644 index e4b1efb0c..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu6.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_6 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp deleted file mode 100644 index 7afe15d4a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_6 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7.cpp b/BasiliskII/src/uae_cpu/cpuemu7.cpp deleted file mode 100644 index faec7ef88..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu7.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_7 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp deleted file mode 100644 index 1e404dea8..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_7 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8.cpp b/BasiliskII/src/uae_cpu/cpuemu8.cpp deleted file mode 100644 index c4efcfa39..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu8.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_8 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp deleted file mode 100644 index 7c7f8f6e6..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_8 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpufunctbla.cpp b/BasiliskII/src/uae_cpu/cpufunctbla.cpp deleted file mode 100644 index 17dd0d3f4..000000000 --- a/BasiliskII/src/uae_cpu/cpufunctbla.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpufunctbl.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpufunctbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpummu.cpp b/BasiliskII/src/uae_cpu/cpummu.cpp deleted file mode 100644 index 1630bc78b..000000000 --- a/BasiliskII/src/uae_cpu/cpummu.cpp +++ /dev/null @@ -1,1096 +0,0 @@ -/* - * cpummu.cpp - MMU emulation - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by UAE MMU patch - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#define DEBUG 0 -#include "sysdeps.h" - -#include "cpummu.h" -#include "memory.h" -#include "newcpu.h" -#include "debug.h" -#ifdef USE_JIT -# include "compiler/compemu.h" -#endif - -#define DBG_MMU_VERBOSE 1 -#define DBG_MMU_SANITY 1 - -#ifdef FULLMMU - -mmu_atc_l1_array atc_l1[2]; -mmu_atc_l1_array *current_atc; -struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; - -# ifdef ATC_STATS -static unsigned int mmu_atc_hits[ATC_L2_SIZE]; -# endif - - -static void mmu_dump_ttr(const char * label, uae_u32 ttr) -{ - DUNUSED(label); -#if DEBUG - uae_u32 from_addr, to_addr; - - from_addr = ttr & MMU_TTR_LOGICAL_BASE; - to_addr = (ttr & MMU_TTR_LOGICAL_MASK) << 8; - - D(bug("%s: [%08x] %08x - %08x enabled=%d supervisor=%d wp=%d cm=%02d", - label, ttr, - from_addr, to_addr, - ttr & MMU_TTR_BIT_ENABLED ? 1 : 0, - (ttr & (MMU_TTR_BIT_SFIELD_ENABLED | MMU_TTR_BIT_SFIELD_SUPER)) >> MMU_TTR_SFIELD_SHIFT, - ttr & MMU_TTR_BIT_WRITE_PROTECT ? 1 : 0, - (ttr & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT - )); -#else - DUNUSED(ttr); -#endif -} - -void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode) -{ - uae_u32 * ttr; - uae_u32 * ttr0 = datamode ? ®s.dtt0 : ®s.itt0; - uae_u32 * ttr1 = datamode ? ®s.dtt1 : ®s.itt1; - - if ((*ttr1 & MMU_TTR_BIT_ENABLED) == 0) - ttr = ttr1; - else if ((*ttr0 & MMU_TTR_BIT_ENABLED) == 0) - ttr = ttr0; - else - return; - - *ttr = baseaddr & MMU_TTR_LOGICAL_BASE; - *ttr |= ((baseaddr + size - 1) & MMU_TTR_LOGICAL_BASE) >> 8; - *ttr |= MMU_TTR_BIT_ENABLED; - - D(bug("MMU: map transparent mapping of %08x", *ttr)); -} - -/* check if an address matches a ttr */ -static int mmu_do_match_ttr(uae_u32 ttr, uaecptr addr, int super) -{ - if (ttr & MMU_TTR_BIT_ENABLED) { /* TTR enabled */ - uae_u8 msb, mask; - - msb = ((addr ^ ttr) & MMU_TTR_LOGICAL_BASE) >> 24; - mask = (ttr & MMU_TTR_LOGICAL_MASK) >> 16; - - if (!(msb & ~mask)) { - - if ((ttr & MMU_TTR_BIT_SFIELD_ENABLED) == 0) { - if (((ttr & MMU_TTR_BIT_SFIELD_SUPER) == 0) != (super == 0)) { - return TTR_NO_MATCH; - } - } - - return (ttr & MMU_TTR_BIT_WRITE_PROTECT) ? TTR_NO_WRITE : TTR_OK_MATCH; - } - } - return TTR_NO_MATCH; -} - -static inline int mmu_match_ttr(uaecptr addr, int super, int data) -{ - int res; - - if (data) { - res = mmu_do_match_ttr(regs.dtt0, addr, super); - if (res == TTR_NO_MATCH) - res = mmu_do_match_ttr(regs.dtt1, addr, super); - } else { - res = mmu_do_match_ttr(regs.itt0, addr, super); - if (res == TTR_NO_MATCH) - res = mmu_do_match_ttr(regs.itt1, addr, super); - } - return res; -} - -#if DEBUG -/* {{{ mmu_dump_table */ -static void mmu_dump_table(const char * label, uaecptr root_ptr) -{ - DUNUSED(label); - const int ROOT_TABLE_SIZE = 128, - PTR_TABLE_SIZE = 128, - PAGE_TABLE_SIZE = regs.mmu_pagesize_8k ? 32 : 64, - ROOT_INDEX_SHIFT = 25, - PTR_INDEX_SHIFT = 18; - const uae_u32 ptr_addr_mask = (regs.mmu_pagesize_8k ? MMU_PTR_PAGE_ADDR_MASK_8 : MMU_PTR_PAGE_ADDR_MASK_4); - const uae_u32 page_addr_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_ADDR_MASK_8 : MMU_PAGE_ADDR_MASK_4); - const uae_u32 page_ur_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_UR_MASK_8 : MMU_PAGE_UR_MASK_4); - const uae_u32 page_size = (regs.mmu_pagesize_8k ? (1 << 13) : (1 << 12)); - int root_idx, ptr_idx, page_idx; - uae_u32 root_des, ptr_des, page_des; - uaecptr ptr_des_addr, page_addr, - root_log, ptr_log, page_log; - - D(bug("%s: root=%x", label, root_ptr)); - - for (root_idx = 0; root_idx < ROOT_TABLE_SIZE; root_idx++) { - root_des = phys_get_long(root_ptr + (root_idx << 2)); - - if ((root_des & 2) == 0) - continue; /* invalid */ - - D(bug("ROOT: %03d U=%d W=%d UDT=%02d", root_idx, - root_des & 8 ? 1 : 0, - root_des & 4 ? 1 : 0, - root_des & 3 - )); - - root_log = root_idx << ROOT_INDEX_SHIFT; - - ptr_des_addr = root_des & MMU_ROOT_PTR_ADDR_MASK; - - for (ptr_idx = 0; ptr_idx < PTR_TABLE_SIZE; ptr_idx++) { - struct { - uaecptr log, phys; - int start_idx, n_pages; /* number of pages covered by this entry */ - uae_u32 match; - } page_info[PAGE_TABLE_SIZE]; - int n_pages_used; - - ptr_des = phys_get_long(ptr_des_addr + (ptr_idx << 2)); - ptr_log = root_log | (ptr_idx << PTR_INDEX_SHIFT); - - if ((ptr_des & 2) == 0) - continue; /* invalid */ - - page_addr = ptr_des & ptr_addr_mask; - - n_pages_used = -1; - for (page_idx = 0; page_idx < PAGE_TABLE_SIZE; page_idx++) { - - page_des = phys_get_long(page_addr + (page_idx << 2)); - page_log = ptr_log | (page_idx * page_size); - - switch (page_des & 3) { - case 0: /* invalid */ - continue; - case 1: case 3: /* resident */ - case 2: /* indirect */ - if (n_pages_used == -1 || - (page_info[n_pages_used].match & ~page_addr_mask) != (page_des & ~page_addr_mask) || - page_info[n_pages_used].phys + (page_info[n_pages_used].n_pages * page_size) != (page_des & page_addr_mask)) - { - /* use the next entry */ - n_pages_used++; - - page_info[n_pages_used].match = page_des; - page_info[n_pages_used].n_pages = 1; - page_info[n_pages_used].start_idx = page_idx; - page_info[n_pages_used].log = page_log; - page_info[n_pages_used].phys = page_des & page_addr_mask; - } else { - page_info[n_pages_used].n_pages++; - } - break; - } - } - - if (n_pages_used == -1) - continue; - - D(bug(" PTR: %03d U=%d W=%d UDT=%02d", ptr_idx, - ptr_des & 8 ? 1 : 0, - ptr_des & 4 ? 1 : 0, - ptr_des & 3 - )); - - - for (page_idx = 0; page_idx <= n_pages_used; page_idx++) { - page_des = page_info[page_idx].match; - - if ((page_des & MMU_PDT_MASK) == 2) { - D(bug(" PAGE: %03d-%03d log=%08x INDIRECT --> addr=%08x", - page_info[page_idx].start_idx, - page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, - page_info[page_idx].log, - page_des & MMU_PAGE_INDIRECT_MASK - )); - - } else { - D(bug(" PAGE: %03d-%03d log=%08x addr=%08x UR=%02d G=%d U1/0=%d S=%d CM=%d M=%d U=%d W=%d", - page_info[page_idx].start_idx, - page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, - page_info[page_idx].log, - page_info[page_idx].phys, - (page_des & page_ur_mask) >> MMU_PAGE_UR_SHIFT, - page_des & MMU_DES_GLOBAL ? 1 : 0, - (page_des & MMU_TTR_UX_MASK) >> MMU_TTR_UX_SHIFT, - page_des & MMU_DES_SUPER ? 1 : 0, - (page_des & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT, - page_des & MMU_DES_MODIFIED ? 1 : 0, - page_des & MMU_DES_USED ? 1 : 0, - page_des & MMU_DES_WP ? 1 : 0 - )); - } - } - } - - } -} -/* }}} */ -#endif - -/* {{{ mmu_dump_atc */ -void mmu_dump_atc(void) -{ - int i, j; - for (i = 0; i < 2; i++) { - for (j = 0; j < ATC_L2_SIZE; j++) { - if (atc_l2[i][j].tag == 0x8000) - continue; - D(bug("ATC[%02d] G=%d TT=%d M=%d WP=%d VD=%d VI=%d tag=%08x --> phys=%08x", - j, atc_l2[i][j].global, atc_l2[i][j].tt, atc_l2[i][j].modified, - atc_l2[i][j].write_protect, atc_l2[i][j].valid_data, atc_l2[i][j].valid_inst, - atc_l2[i][j].tag, atc_l2[i][j].phys)); - } - } -} -/* }}} */ - -/* {{{ mmu_dump_tables */ -void mmu_dump_tables(void) -{ - D(bug("URP: %08x SRP: %08x MMUSR: %x TC: %x", regs.urp, regs.srp, regs.mmusr, regs.tc)); - mmu_dump_ttr("DTT0", regs.dtt0); - mmu_dump_ttr("DTT1", regs.dtt1); - mmu_dump_ttr("ITT0", regs.itt0); - mmu_dump_ttr("ITT1", regs.itt1); - mmu_dump_atc(); - //mmu_dump_table("SRP", regs.srp); -} -/* }}} */ - -static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write); - -static ALWAYS_INLINE int mmu_get_fc(bool super, bool data) -{ - return (super ? 4 : 0) | (data ? 1 : 2); -} - -static void mmu_bus_error(uaecptr addr, int fc, int write, int size) -{ - uae_u16 ssw = 0; - - ssw |= fc & MMU_SSW_TM; /* Copy TM */ - switch (size) { - case sz_byte: - ssw |= MMU_SSW_SIZE_B; - break; - case sz_word: - ssw |= MMU_SSW_SIZE_W; - break; - case sz_long: - ssw |= MMU_SSW_SIZE_L; - break; - } - - regs.wb3_status = write ? 0x80 | ssw : 0; - if (!write) - ssw |= MMU_SSW_RW; - - regs.mmu_fault_addr = addr; - regs.mmu_ssw = ssw | MMU_SSW_ATC; - - D(bug("BUS ERROR: fc=%d w=%d log=%08x ssw=%04x", fc, write, addr, ssw)); - - breakpt(); - THROW(2); -} - -/* - * Update the atc line for a given address by doing a mmu lookup. - */ -static uaecptr mmu_fill_atc_l2(uaecptr addr, int super, int data, int write, - struct mmu_atc_line *l) -{ - int res; - uae_u32 desc; - - l->tag = ATC_TAG(addr); - l->hw = l->bus_fault = 0; - - /* check ttr0 */ - res = mmu_match_ttr(addr, super, data); - if (res != TTR_NO_MATCH) { - l->tt = 1; - if (data) { - l->valid_data = 1; - l->valid_inst = mmu_match_ttr(addr, super, 0) == res; - } else { - l->valid_inst = 1; - l->valid_data = mmu_match_ttr(addr, super, 1) == res; - } - l->global = 1; - l->modified = 1; - l->write_protect = (res == TTR_NO_WRITE); - l->phys = 0; - - return 0; - } - - l->tt = 0; - if (!regs.mmu_enabled) { - l->valid_data = l->valid_inst = 1; - l->global = 1; - l->modified = 1; - l->write_protect = 0; - l->phys = 0; - return 0; - } - - SAVE_EXCEPTION; - TRY(prb) { - desc = mmu_lookup_pagetable(addr, super, write); - D(bug("translate: %x,%u,%u,%u -> %x", addr, super, write, data, desc)); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - /* bus error during table search */ - desc = 0; - goto fail; - } - - if ((desc & 1) == 0 || (!super && desc & MMU_MMUSR_S)) { - fail: - l->valid_data = l->valid_inst = 0; - l->global = 0; - } else { - l->valid_data = l->valid_inst = 1; - if (regs.mmu_pagesize_8k) - l->phys = (desc & ~0x1fff) - (addr & ~0x1fff); - else - l->phys = (desc & ~0xfff) - (addr & ~0xfff); - l->global = (desc & MMU_MMUSR_G) != 0; - l->modified = (desc & MMU_MMUSR_M) != 0; - l->write_protect = (desc & MMU_MMUSR_W) != 0; - } - - return desc; -} - -static ALWAYS_INLINE bool -mmu_fill_atc_l1(uaecptr addr, int super, int data, int write, - struct mmu_atc_line *l1) -{ - int idx = ATC_L2_INDEX(addr); - int tag = ATC_TAG(addr); - struct mmu_atc_line *l = &atc_l2[super][idx]; - uaecptr phys_addr; - - if (l->tag != tag) { - restart: - mmu_fill_atc_l2(addr, super, data, write, l); - } - if (!(data ? l->valid_data : l->valid_inst)) { - D(bug("MMU: non-resident page (%x,%x,%x)!", addr, regs.pc, regs.fault_pc)); - goto fail; - } - if (write) { - if (l->write_protect) { - D(bug("MMU: write protected (via %s) %x", l->tt ? "ttr" : "atc", addr)); - goto fail; - } - if (!l->modified) - goto restart; - } - *l1 = *l; - - phys_addr = addr + l1->phys; - if ((phys_addr & 0xfff00000) == 0x00f00000) { - l1->hw = 1; - goto fail; - } - if ((phys_addr & 0xfff00000) == 0xfff00000) { - l1->hw = 1; - l1->phys -= 0xff000000; - goto fail; - } - - if (!test_ram_boundary(phys_addr, 1, super, write)) { - l1->bus_fault = 1; - goto fail; - } - - return true; - -fail: - l1->tag = ~l1->tag; - return false; -} - -uaecptr mmu_translate(uaecptr addr, int super, int data, int write) -{ - struct mmu_atc_line *l; - - l = &atc_l2[super][ATC_L2_INDEX(addr)]; - mmu_fill_atc_l2(addr, super, data, write, l); - if (!(data ? l->valid_data : l->valid_inst)) - { - breakpt(); - THROW(2); - } - - return addr + l->phys; -} - -/* - * Lookup the address by walking the page table and updating - * the page descriptors accordingly. Returns the found descriptor - * or produces a bus error. - */ -static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write) -{ - uae_u32 desc, desc_addr, wp; - int i; - - wp = 0; - desc = super ? regs.srp : regs.urp; - - /* fetch root table descriptor */ - i = (addr >> 23) & 0x1fc; - desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; - desc = phys_get_long(desc_addr); - if ((desc & 2) == 0) { - D(bug("MMU: invalid root descriptor for %x", addr)); - return 0; - } - - wp |= desc; - if ((desc & MMU_DES_USED) == 0) - phys_put_long(desc_addr, desc | MMU_DES_USED); - - /* fetch pointer table descriptor */ - i = (addr >> 16) & 0x1fc; - desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; - desc = phys_get_long(desc_addr); - if ((desc & 2) == 0) { - D(bug("MMU: invalid ptr descriptor for %x", addr)); - return 0; - } - wp |= desc; - if ((desc & MMU_DES_USED) == 0) - phys_put_long(desc_addr, desc | MMU_DES_USED); - - /* fetch page table descriptor */ - if (regs.mmu_pagesize_8k) { - i = (addr >> 11) & 0x7c; - desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_8) | i; - } else { - i = (addr >> 10) & 0xfc; - desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_4) | i; - } - - desc = phys_get_long(desc_addr); - if ((desc & 3) == 2) { - /* indirect */ - desc_addr = desc & MMU_PAGE_INDIRECT_MASK; - desc = phys_get_long(desc_addr); - } - if ((desc & 1) == 0) { - D(bug("MMU: invalid page descriptor log=%08x desc=%08x @%08x", addr, desc, desc_addr)); - return desc; - } - - desc |= wp & MMU_DES_WP; - if (write) { - if (desc & MMU_DES_WP) { - if ((desc & MMU_DES_USED) == 0) { - desc |= MMU_DES_USED; - phys_put_long(desc_addr, desc); - } - } else if ((desc & (MMU_DES_USED|MMU_DES_MODIFIED)) != - (MMU_DES_USED|MMU_DES_MODIFIED)) { - desc |= MMU_DES_USED|MMU_DES_MODIFIED; - phys_put_long(desc_addr, desc); - } - } else { - if ((desc & MMU_DES_USED) == 0) { - desc |= MMU_DES_USED; - phys_put_long(desc_addr, desc); - } - } - return desc; -} - -uae_u16 mmu_get_word_unaligned(uaecptr addr, int data) -{ - uae_u16 res; - - res = (uae_u16)mmu_get_byte(addr, data, sz_word) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_byte(addr + 1, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - return res; -} - -uae_u32 mmu_get_long_unaligned(uaecptr addr, int data) -{ - uae_u32 res; - - if (likely(!(addr & 1))) { - res = (uae_u32)mmu_get_word(addr, data, sz_long) << 16; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_word(addr + 2, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } else { - res = (uae_u32)mmu_get_byte(addr, data, sz_long) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res = (res | mmu_get_byte(addr + 1, data, sz_long)) << 8; - res = (res | mmu_get_byte(addr + 2, data, sz_long)) << 8; - res |= mmu_get_byte(addr + 3, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } - return res; -} - -uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_b(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); -} - -uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_w(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); -} - -uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_l(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); -} - - -uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, - struct mmu_atc_line *cl) -{ - uae_u64 h = mmu_get_long_slow(addr, super, data, sz_long, cl); - uae_u64 l = mmu_get_long_slow(addr + 4, super, data, sz_long, cl); - return (h << 32) | l; -} - -REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data) -{ - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!(addr & 1))) { - mmu_put_word(addr, val >> 16, data, sz_long); - mmu_put_word(addr + 2, val, data, sz_long); - } else { - mmu_put_byte(addr, val >> 24, data, sz_long); - mmu_put_byte(addr + 1, val >> 16, data, sz_long); - mmu_put_byte(addr + 2, val >> 8, data, sz_long); - mmu_put_byte(addr + 3, val, data, sz_long); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data) -{ - SAVE_EXCEPTION; - TRY(prb) { - mmu_put_byte(addr, val >> 8, data, sz_word); - mmu_put_byte(addr + 1, val, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_b(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_w(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_l(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, - struct mmu_atc_line *cl) -{ - mmu_put_long_slow(addr, (uae_u32)(val >> 32), super, data, sz_long, cl); - mmu_put_long_slow(addr + 4, (uae_u32)(val), super, data, sz_long, cl); -} - -uae_u32 sfc_get_long(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - uae_u32 res; - - if (likely(!is_unaligned(addr, 4))) - return mmu_get_user_long(addr, super, data, sz_long); - - if (likely(!(addr & 1))) { - res = (uae_u32)mmu_get_user_word(addr, super, data, sz_long) << 16; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_user_word(addr + 2, super, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } else { - res = (uae_u32)mmu_get_user_byte(addr, super, data, sz_long) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res = (res | mmu_get_user_byte(addr + 1, super, data, sz_long)) << 8; - res = (res | mmu_get_user_byte(addr + 2, super, data, sz_long)) << 8; - res |= mmu_get_user_byte(addr + 3, super, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } - return res; -} - -uae_u16 sfc_get_word(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - uae_u16 res; - - if (likely(!is_unaligned(addr, 2))) - return mmu_get_user_word(addr, super, data, sz_word); - - res = (uae_u16)mmu_get_user_byte(addr, super, data, sz_word) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_user_byte(addr + 1, super, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - return res; -} - -uae_u8 sfc_get_byte(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - - return mmu_get_user_byte(addr, super, data, sz_byte); -} - -void dfc_put_long(uaecptr addr, uae_u32 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!is_unaligned(addr, 4))) - mmu_put_user_long(addr, val, super, data, sz_long); - else if (likely(!(addr & 1))) { - mmu_put_user_word(addr, val >> 16, super, data, sz_long); - mmu_put_user_word(addr + 2, val, super, data, sz_long); - } else { - mmu_put_user_byte(addr, val >> 24, super, data, sz_long); - mmu_put_user_byte(addr + 1, val >> 16, super, data, sz_long); - mmu_put_user_byte(addr + 2, val >> 8, super, data, sz_long); - mmu_put_user_byte(addr + 3, val, super, data, sz_long); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -void dfc_put_word(uaecptr addr, uae_u16 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!is_unaligned(addr, 2))) - mmu_put_user_word(addr, val, super, data, sz_word); - else { - mmu_put_user_byte(addr, val >> 8, super, data, sz_word); - mmu_put_user_byte(addr + 1, val, super, data, sz_word); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -void dfc_put_byte(uaecptr addr, uae_u8 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - mmu_put_user_byte(addr, val, super, data, sz_byte); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - breakpt(); - THROW_AGAIN(prb); - } -} - -void mmu_op(uae_u32 opcode, uae_u16 extra) -{ - int super = (regs.dfc & 4) != 0; - DUNUSED(extra); - if ((opcode & 0xFE0) == 0x0500) { - int regno, glob; - //D(didflush = 0); - uae_u32 addr; - /* PFLUSH */ - regno = opcode & 7; - glob = (opcode & 8) != 0; - - if (opcode & 16) { - D(bug("pflusha(%u,%u)", glob, regs.dfc)); - mmu_flush_atc_all(glob); - } else { - addr = m68k_areg(regs, regno); - D(bug("pflush(%u,%u,%x)", glob, regs.dfc, addr)); - mmu_flush_atc(addr, super, glob); - } - flush_internals(); -#ifdef USE_JIT - flush_icache(0); -#endif - } else if ((opcode & 0x0FD8) == 0x548) { - int write, regno; - uae_u32 addr; - - regno = opcode & 7; - write = (opcode & 32) == 0; - addr = m68k_areg(regs, regno); - //bug("ptest(%u,%u,%x)", write, regs.dfc, addr); - D(bug("PTEST%c (A%d) %08x DFC=%d", write ? 'W' : 'R', regno, addr, regs.dfc)); - mmu_flush_atc(addr, super, true); - SAVE_EXCEPTION; - TRY(prb) { - struct mmu_atc_line *l; - uae_u32 desc; - bool data = (regs.dfc & 3) != 2; - - l = &atc_l2[super][ATC_L2_INDEX(addr)]; - desc = mmu_fill_atc_l2(addr, super, data, write, l); - if (!(data ? l->valid_data : l->valid_inst)) - regs.mmusr = MMU_MMUSR_B; - else if (l->tt) - regs.mmusr = MMU_MMUSR_T | MMU_MMUSR_R; - else { - regs.mmusr = desc & (~0xfff|MMU_MMUSR_G|MMU_MMUSR_Ux|MMU_MMUSR_S| - MMU_MMUSR_CM|MMU_MMUSR_M|MMU_MMUSR_W); - regs.mmusr |= MMU_MMUSR_R; - } - } - CATCH(prb) { - regs.mmusr = MMU_MMUSR_B; - } - RESTORE_EXCEPTION; - D(bug("PTEST result: mmusr %08x", regs.mmusr)); - } else - op_illg (opcode); -} - -void mmu_flush_atc(uaecptr addr, bool super, bool global) -{ - struct mmu_atc_line *l; - int i, j; - - l = atc_l1[super][0][0]; - i = ATC_L1_INDEX(addr); - for (j = 0; j < 4; j++) { - if (global || !l[i].global) - l[i].tag = 0x8000; - l += ATC_L1_SIZE; - } - if (regs.mmu_pagesize_8k) { - i = ATC_L1_INDEX(addr) ^ 1; - for (j = 0; j < 4; j++) { - if (global || !l[i].global) - l[i].tag = 0x8000; - l += ATC_L1_SIZE; - } - } - l = atc_l2[super]; - i = ATC_L2_INDEX(addr); - if (global || !l[i].global) - l[i].tag = 0x8000; - if (regs.mmu_pagesize_8k) { - i ^= 1; - if (global || !l[i].global) - l[i].tag = 0x8000; - } -} - -void mmu_flush_atc_all(bool global) -{ - struct mmu_atc_line *l; - unsigned int i; - - l = atc_l1[0][0][0]; - for (i = 0; i < sizeof(atc_l1) / sizeof(*l); l++, i++) { - if (global || !l->global) - l->tag = 0x8000; - } - - l = atc_l2[0]; - for (i = 0; i < sizeof(atc_l2) / sizeof(*l); l++, i++) { - if (global || !l->global) - l->tag = 0x8000; - } -} - -void mmu_reset(void) -{ - mmu_flush_atc_all(true); - - regs.urp = regs.srp = 0; - regs.itt0 = regs.itt1 = 0; - regs.dtt0 = regs.dtt1 = 0; - regs.mmusr = 0; -} - - -void mmu_set_tc(uae_u16 tc) -{ - if (regs.tc == tc) - return; - - regs.tc = tc; - regs.mmu_enabled = tc & 0x8000 ? 1 : 0; - regs.mmu_pagesize_8k = tc & 0x4000 ? 1 : 0; - mmu_flush_atc_all(true); - - D(bug("MMU: enabled=%d page8k=%d\n", regs.mmu_enabled, regs.mmu_pagesize_8k)); -} - -void mmu_set_super(bool super) -{ - current_atc = &atc_l1[super]; -} - -#else - -void mmu_op(uae_u32 opcode, uae_u16 /*extra*/) -{ - if ((opcode & 0xFE0) == 0x0500) { - /* PFLUSH instruction */ - flush_internals(); - } else if ((opcode & 0x0FD8) == 0x548) { - /* PTEST instruction */ - } else - op_illg(opcode); -} - -#endif - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/cpummu.h b/BasiliskII/src/uae_cpu/cpummu.h deleted file mode 100644 index 01359f6f5..000000000 --- a/BasiliskII/src/uae_cpu/cpummu.h +++ /dev/null @@ -1,267 +0,0 @@ -/* - * cpummu.h - MMU emulation - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by UAE MMU patch - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#ifndef CPUMMU_H -#define CPUMMU_H - -#include "registers.h" - -# include - -#define MMU_TEST_PTEST 1 -#define MMU_TEST_VERBOSE 2 -#define MMU_TEST_FORCE_TABLE_SEARCH 4 -#define MMU_TEST_NO_BUSERR 8 - -extern void mmu_dump_tables(void); - -#define MMU_TTR_LOGICAL_BASE 0xff000000 -#define MMU_TTR_LOGICAL_MASK 0x00ff0000 -#define MMU_TTR_BIT_ENABLED (1 << 15) -#define MMU_TTR_BIT_SFIELD_ENABLED (1 << 14) -#define MMU_TTR_BIT_SFIELD_SUPER (1 << 13) -#define MMU_TTR_SFIELD_SHIFT 13 -#define MMU_TTR_UX_MASK ((1 << 9) | (1 << 8)) -#define MMU_TTR_UX_SHIFT 8 -#define MMU_TTR_CACHE_MASK ((1 << 6) | (1 << 5)) -#define MMU_TTR_CACHE_SHIFT 5 -#define MMU_TTR_BIT_WRITE_PROTECT (1 << 2) - -#define MMU_UDT_MASK 3 -#define MMU_PDT_MASK 3 - -#define MMU_DES_WP 4 -#define MMU_DES_USED 8 - -/* page descriptors only */ -#define MMU_DES_MODIFIED 16 -#define MMU_DES_SUPER (1 << 7) -#define MMU_DES_GLOBAL (1 << 10) - -#define MMU_ROOT_PTR_ADDR_MASK 0xfffffe00 -#define MMU_PTR_PAGE_ADDR_MASK_8 0xffffff80 -#define MMU_PTR_PAGE_ADDR_MASK_4 0xffffff00 - -#define MMU_PAGE_INDIRECT_MASK 0xfffffffc -#define MMU_PAGE_ADDR_MASK_8 0xffffe000 -#define MMU_PAGE_ADDR_MASK_4 0xfffff000 -#define MMU_PAGE_UR_MASK_8 ((1 << 12) | (1 << 11)) -#define MMU_PAGE_UR_MASK_4 (1 << 11) -#define MMU_PAGE_UR_SHIFT 11 - -#define MMU_MMUSR_ADDR_MASK 0xfffff000 -#define MMU_MMUSR_B (1 << 11) -#define MMU_MMUSR_G (1 << 10) -#define MMU_MMUSR_U1 (1 << 9) -#define MMU_MMUSR_U0 (1 << 8) -#define MMU_MMUSR_Ux (MMU_MMUSR_U1 | MMU_MMUSR_U0) -#define MMU_MMUSR_S (1 << 7) -#define MMU_MMUSR_CM ((1 << 6) | ( 1 << 5)) -#define MMU_MMUSR_M (1 << 4) -#define MMU_MMUSR_W (1 << 2) -#define MMU_MMUSR_T (1 << 1) -#define MMU_MMUSR_R (1 << 0) - -/* special status word (access error stack frame) */ -#define MMU_SSW_TM 0x0007 -#define MMU_SSW_TT 0x0018 -#define MMU_SSW_SIZE 0x0060 -#define MMU_SSW_SIZE_B 0x0020 -#define MMU_SSW_SIZE_W 0x0040 -#define MMU_SSW_SIZE_L 0x0000 -#define MMU_SSW_RW 0x0100 -#define MMU_SSW_LK 0x0200 -#define MMU_SSW_ATC 0x0400 -#define MMU_SSW_MA 0x0800 - -#define TTR_I0 4 -#define TTR_I1 5 -#define TTR_D0 6 -#define TTR_D1 7 - -#define TTR_NO_MATCH 0 -#define TTR_NO_WRITE 1 -#define TTR_OK_MATCH 2 - -struct mmu_atc_line { - uae_u16 tag; - unsigned tt : 1; - unsigned valid_data : 1; - unsigned valid_inst : 1; - unsigned global : 1; - unsigned modified : 1; - unsigned write_protect : 1; - unsigned hw : 1; - unsigned bus_fault : 1; - uaecptr phys; -}; - -/* - * We don't need to store the whole logical address in the atc cache, as part of - * it is encoded as index into the cache. 14 bits of the address are stored in - * the tag, this means at least 6 bits must go into the index. The upper two - * bits of the tag define the type of data in the atc line: - * - 00: a normal memory address - * - 11: invalid memory address or hardware access - * (generated via ~ATC_TAG(addr) in the slow path) - * - 10: empty atc line - */ - -#define ATC_TAG_SHIFT 18 -#define ATC_TAG(addr) ((uae_u32)(addr) >> ATC_TAG_SHIFT) - - -#define ATC_L1_SIZE_LOG 8 -#define ATC_L1_SIZE (1 << ATC_L1_SIZE_LOG) - -#define ATC_L1_INDEX(addr) (((addr) >> 12) % ATC_L1_SIZE) - -/* - * first level atc cache - * indexed by [super][data][rw][idx] - */ - -typedef struct mmu_atc_line mmu_atc_l1_array[2][2][ATC_L1_SIZE]; -extern mmu_atc_l1_array atc_l1[2]; -extern mmu_atc_l1_array *current_atc; - -#define ATC_L2_SIZE_LOG 12 -#define ATC_L2_SIZE (1 << ATC_L2_SIZE_LOG) - -#define ATC_L2_INDEX(addr) ((((addr) >> 12) ^ ((addr) >> (32 - ATC_L2_SIZE_LOG))) % ATC_L2_SIZE) - -extern struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; - -/* - * lookup address in the level 1 atc cache, - * the data and write arguments are constant in the common, - * thus allows gcc to generate a constant offset. - */ -static ALWAYS_INLINE int mmu_lookup(uaecptr addr, bool data, bool write, - struct mmu_atc_line **cl) -{ - addr >>= 12; - *cl = &(*current_atc)[data][write][addr % ATC_L1_SIZE]; - return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); -} - -/* - * similiar to mmu_user_lookup, but for the use of the moves instruction - */ -static ALWAYS_INLINE int mmu_user_lookup(uaecptr addr, bool super, bool data, - bool write, struct mmu_atc_line **cl) -{ - addr >>= 12; - *cl = &atc_l1[super][data][write][addr % ATC_L1_SIZE]; - return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); -} - -extern REGPARAM2 uae_u16 mmu_get_word_unaligned(uaecptr addr, int data); -extern REGPARAM2 uae_u32 mmu_get_long_unaligned(uaecptr addr, int data); - -extern REGPARAM2 uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, - struct mmu_atc_line *cl); - -extern REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data); -extern REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data); - -extern REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, - int size, struct mmu_atc_line *cl); -extern REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, - struct mmu_atc_line *cl); - -extern void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode); - -static inline void mmu_set_ttr(int regno, uae_u32 val) -{ - uae_u32 * ttr; - switch(regno) { - case TTR_I0: ttr = ®s.itt0; break; - case TTR_I1: ttr = ®s.itt1; break; - case TTR_D0: ttr = ®s.dtt0; break; - case TTR_D1: ttr = ®s.dtt1; break; - default: abort(); - } - *ttr = val; -} - -static inline void mmu_set_mmusr(uae_u32 val) -{ - regs.mmusr = val; -} - -#define FC_DATA (regs.s ? 5 : 1) -#define FC_INST (regs.s ? 6 : 2) - -extern uaecptr REGPARAM2 mmu_translate(uaecptr addr, int super, int data, int write); - -extern uae_u32 REGPARAM2 sfc_get_long(uaecptr addr); -extern uae_u16 REGPARAM2 sfc_get_word(uaecptr addr); -extern uae_u8 REGPARAM2 sfc_get_byte(uaecptr addr); -extern void REGPARAM2 dfc_put_long(uaecptr addr, uae_u32 val); -extern void REGPARAM2 dfc_put_word(uaecptr addr, uae_u16 val); -extern void REGPARAM2 dfc_put_byte(uaecptr addr, uae_u8 val); - - -extern void REGPARAM2 mmu_flush_atc(uaecptr addr, bool super, bool global); -extern void REGPARAM2 mmu_flush_atc_all(bool global); -extern void REGPARAM2 mmu_op(uae_u32 opcode, uae_u16 extra); - -#ifdef FULLMMU - -extern void REGPARAM2 mmu_reset(void); -extern void REGPARAM2 mmu_set_tc(uae_u16 tc); -extern void REGPARAM2 mmu_set_super(bool super); - -#else - -static inline void mmu_reset(void) -{ -} - -static inline void mmu_set_tc(uae_u16 /*tc*/) -{ -} - -static inline void mmu_set_super(bool /*super*/) -{ -} - -#endif - -#endif /* CPUMMU_H */ -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/cpuopti.c b/BasiliskII/src/uae_cpu/cpuopti.c new file mode 100644 index 000000000..28ba7c226 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuopti.c @@ -0,0 +1,312 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * cpuopti.c - Small optimizer for cpu*.s files + * Based on work by Tauno Taipaleenmaki + * + * Copyright 1996 Bernd Schmidt + * + * 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 +#include +#include + +#include "sysdeps.h" + +struct line { + struct line *next, *prev; + int delet; + char *data; +}; + +struct func { + struct line *first_line, *last_line; + int initial_offset; +}; + +static void oops(void) +{ + fprintf(stderr, "Don't know how to optimize this file.\n"); + exit(1); +} + +static char * match(struct line *l, const char *m) +{ + char *str = l->data; + int len = strlen(m); + while (isspace(*str)) + str++; + + if (strncmp(str, m, len) != 0) + return NULL; + return str + len; +} + +static int insn_references_reg (struct line *l, char *reg) +{ + if (reg[0] != 'e') { + fprintf(stderr, "Unknown register?!?\n"); + exit(1); + } + if (strstr (l->data, reg) != 0) + return 1; + if (strstr (l->data, reg+1) != 0) + return 1; + if (strcmp (reg, "eax") == 0 + && (strstr (l->data, "%al") != 0 || strstr (l->data, "%ah") != 0)) + return 1; + if (strcmp (reg, "ebx") == 0 + && (strstr (l->data, "%bl") != 0 || strstr (l->data, "%bh") != 0)) + return 1; + if (strcmp (reg, "ecx") == 0 + && (strstr (l->data, "%cl") != 0 || strstr (l->data, "%ch") != 0)) + return 1; + if (strcmp (reg, "edx") == 0 + && (strstr (l->data, "%dl") != 0 || strstr (l->data, "%dh") != 0)) + return 1; + return 0; +} + +static void do_function(struct func *f) +{ + int v; + int pops_at_end = 0; + struct line *l, *l1, *fl, *l2; + char *s, *s2; + int in_pop_area = 1; + + f->initial_offset = 0; + + l = f->last_line; + fl = f->first_line; + + if (match(l,".LFE")) + l = l->prev; + if (!match(l,"ret")) + oops(); + + while (!match(fl, "op_")) + fl = fl->next; + fl = fl->next; + + /* Try reordering the insns at the end of the function so that the + * pops are all at the end. */ + l2 = l->prev; + /* Tolerate one stack adjustment */ + if (match (l2, "addl $") && strstr(l2->data, "esp") != 0) + l2 = l2->prev; + for (;;) { + char *forbidden_reg; + struct line *l3, *l4; + + while (match (l2, "popl %")) + l2 = l2->prev; + + l3 = l2; + for (;;) { + forbidden_reg = match (l3, "popl %"); + if (forbidden_reg) + break; + if (l3 == fl) + goto reordered; + /* Jumps and labels put an end to our attempts... */ + if (strstr (l3->data, ".L") != 0) + goto reordered; + /* Likewise accesses to the stack pointer... */ + if (strstr (l3->data, "esp") != 0) + goto reordered; + /* Function calls... */ + if (strstr (l3->data, "call") != 0) + goto reordered; + l3 = l3->prev; + } + if (l3 == l2) + exit(1); + for (l4 = l2; l4 != l3; l4 = l4->prev) { + /* The register may not be referenced by any of the insns that we + * move the popl past */ + if (insn_references_reg (l4, forbidden_reg)) + goto reordered; + } + l3->prev->next = l3->next; + l3->next->prev = l3->prev; + l2->next->prev = l3; + l3->next = l2->next; + l2->next = l3; + l3->prev = l2; + } +reordered: + + l = l->prev; + + s = match (l, "addl $"); + s2 = match (fl, "subl $"); + + l1 = l; + if (s == 0) { + char *t = match (l, "popl %"); + if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { + s = "4,%esp"; + l = l->prev; + t = match (l, "popl %"); + if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { + s = "8,%esp"; + l = l->prev; + } + } + } else { + l = l->prev; + } + + if (s && s2) { + int v = 0; + if (strcmp (s, s2) != 0) { + fprintf (stderr, "Stack adjustment not matching.\n"); + return; + } + + while (isdigit(*s)) { + v = v * 10 + (*s) - '0'; + s++; + } + + if (strcmp (s, ",%esp") != 0) { + fprintf (stderr, "Not adjusting the stack pointer.\n"); + return; + } + f->initial_offset = v; + fl->delet = 3; + fl = fl->next; + l1->delet = 2; + l1 = l1->prev; + while (l1 != l) { + l1->delet = 1; + l1 = l1->prev; + } + } + + while (in_pop_area) { + char *popm, *pushm; + popm = match (l, "popl %"); + pushm = match (fl, "pushl %"); + if (popm && pushm && strcmp(pushm, popm) == 0) { + pops_at_end++; + fl->delet = l->delet = 1; + } else + in_pop_area = 0; + l = l->prev; + fl = fl->next; + } + if (f->initial_offset) + f->initial_offset += 4 * pops_at_end; +} + +static void output_function(struct func *f) +{ + struct line *l = f->first_line; + + while (l) { + switch (l->delet) { + case 1: + break; + case 0: + printf("%s\n", l->data); + break; + case 2: + if (f->initial_offset) + printf("\taddl $%d,%%esp\n", f->initial_offset); + break; + case 3: + if (f->initial_offset) + printf("\tsubl $%d,%%esp\n", f->initial_offset); + break; + } + l = l->next; + } +} + +int main(int argc, char **argv) +{ + FILE *infile = stdin; + char tmp[4096]; + +#ifdef __mc68000__ + if(system("perl machdep/cpuopti")==-1) { + perror("perl machdep/cpuopti"); + return 10; + } else return 0; +#endif + + /* For debugging... */ + if (argc == 2) + infile = fopen (argv[1], "r"); + + for(;;) { + char *s; + + if ((fgets(tmp, 4095, infile)) == NULL) + break; + + s = strchr (tmp, '\n'); + if (s != NULL) + *s = 0; + + if (strncmp(tmp, ".globl op_", 10) == 0) { + struct line *first_line = NULL, *prev = NULL; + struct line **nextp = &first_line; + struct func f; + int nr_rets = 0; + int can_opt = 1; + + do { + struct line *current; + + if (strcmp (tmp, "#APP") != 0 && strcmp (tmp, "#NO_APP") != 0) { + current = *nextp = (struct line *)malloc(sizeof (struct line)); + nextp = ¤t->next; + current->prev = prev; prev = current; + current->next = NULL; + current->delet = 0; + current->data = strdup (tmp); + if (match (current, "movl %esp,%ebp") || match (current, "enter")) { + fprintf (stderr, "GCC failed to eliminate fp: %s\n", first_line->data); + can_opt = 0; + } + + if (match (current, "ret")) + nr_rets++; + } + if ((fgets(tmp, 4095, infile)) == NULL) + oops(); + s = strchr (tmp, '\n'); + if (s != NULL) + *s = 0; + } while (strncmp (tmp,".Lfe", 4) != 0); + + f.first_line = first_line; + f.last_line = prev; + + if (nr_rets == 1 && can_opt) + do_function(&f); + /*else + fprintf(stderr, "Too many RET instructions: %s\n", first_line->data);*/ + output_function(&f); + } + printf("%s\n", tmp); + } + return 0; +} diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp deleted file mode 100644 index 0ea660105..000000000 --- a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define NOFLAGS 1 -#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbla.cpp b/BasiliskII/src/uae_cpu/cpustbla.cpp deleted file mode 100644 index f3f8e320c..000000000 --- a/BasiliskII/src/uae_cpu/cpustbla.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpustbl.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/debug.cpp b/BasiliskII/src/uae_cpu/debug.cpp deleted file mode 100644 index 8b2f14e00..000000000 --- a/BasiliskII/src/uae_cpu/debug.cpp +++ /dev/null @@ -1,82 +0,0 @@ -/* - * debug.cpp - CPU debugger - * - * Copyright (c) 2001-2010 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Bernd Schmidt's UAE - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ -/* - * UAE - The Un*x Amiga Emulator - * - * Debugger - * - * (c) 1995 Bernd Schmidt - * - */ - -#include "sysdeps.h" - -#include "memory.h" -#include "newcpu.h" -#include "debug.h" - -#include "input.h" -#include "cpu_emulation.h" - -#include "main.h" - -static int debugger_active = 0; -int debugging = 0; -int irqindebug = 0; - -int ignore_irq = 0; - - -void activate_debugger (void) -{ -#ifdef DEBUGGER - ndebug::do_skip = false; -#endif - debugger_active = 1; - SPCFLAGS_SET( SPCFLAG_BRK ); - debugging = 1; - /* use_debugger = 1; */ -} - -void deactivate_debugger(void) -{ - debugging = 0; - debugger_active = 0; -} - -void debug (void) -{ - if (ignore_irq && regs.s && !regs.m ) { - SPCFLAGS_SET( SPCFLAG_BRK ); - return; - } -#ifdef DEBUGGER - ndebug::run(); -#endif -} - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu/fpu/core.h index 1801ff7c0..66358a2d8 100644 --- a/BasiliskII/src/uae_cpu/fpu/core.h +++ b/BasiliskII/src/uae_cpu/fpu/core.h @@ -1,33 +1,28 @@ /* - * fpu/core.h - base fpu context definition + * fpu/core.h - base fpu context definition * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_CORE_H @@ -39,15 +34,11 @@ /* Always use x87 FPU stack on IA-32. */ #if defined(X86_ASSEMBLY) #define USE_X87_ASSEMBLY 1 -#ifndef USE_JIT_FPU -#define ACCURATE_SIN_COS_TAN 1 -#endif #endif /* Only use x87 FPU on x86-64 if long double precision is requested. */ -#if defined(X86_64_ASSEMBLY) && defined(USE_LONG_DOUBLE) +#if defined(X86_64_ASSEMBLY) && USE_LONG_DOUBLE #define USE_X87_ASSEMBLY 1 -#define ACCURATE_SIN_COS_TAN 1 #endif /* ========================================================================== */ @@ -116,7 +107,7 @@ struct fpu_t { /* Floating-Point Condition Code Byte */ uae_u32 condition_codes; - #define FPSR_CCB 0x0f000000 + #define FPSR_CCB 0xff000000 #define FPSR_CCB_NEGATIVE 0x08000000 #define FPSR_CCB_ZERO 0x04000000 #define FPSR_CCB_INFINITY 0x02000000 @@ -228,7 +219,7 @@ struct fpu_t { extern fpu_t fpu; /* Return the address of a particular register */ -inline fpu_register * fpu_register_address(int i) +inline fpu_register * const fpu_register_address(int i) { return &fpu.registers[i]; } /* Dump functions for m68k_dumpstate */ @@ -236,16 +227,16 @@ extern void fpu_dump_registers(void); extern void fpu_dump_flags(void); /* Accessors to FPU Control Register */ -//static inline uae_u32 get_fpcr(void); -//static inline void set_fpcr(uae_u32 new_fpcr); +static inline uae_u32 get_fpcr(void); +static inline void set_fpcr(uae_u32 new_fpcr); /* Accessors to FPU Status Register */ -//static inline uae_u32 get_fpsr(void); -//static inline void set_fpsr(uae_u32 new_fpsr); +static inline uae_u32 get_fpsr(void); +static inline void set_fpsr(uae_u32 new_fpsr); /* Accessors to FPU Instruction Address Register */ -//static inline uae_u32 get_fpiar(); -//static inline void set_fpiar(uae_u32 new_fpiar); +static inline uae_u32 get_fpiar(); +static inline void set_fpiar(uae_u32 new_fpiar); /* Initialization / Finalization */ extern void fpu_init(bool integral_68040); @@ -263,6 +254,6 @@ void fpuop_scc(uae_u32 opcode, uae_u32 extra) REGPARAM; /* Floating-point system control operations */ void fpuop_save(uae_u32 opcode) REGPARAM; void fpuop_restore(uae_u32 opcode) REGPARAM; -void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) REGPARAM; +void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) REGPARAM; #endif /* FPU_CORE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp index 2a597997d..6aa6431aa 100644 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp @@ -1,33 +1,28 @@ /* - * fpu/exceptions.cpp - system-dependant FPU exceptions management + * fpu/exceptions.cpp - system-dependant FPU exceptions management * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 */ #undef PRIVATE diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu/fpu/exceptions.h index f943da04f..8c69a69d4 100644 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.h +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.h @@ -1,33 +1,28 @@ /* - * fpu/exceptions.h - system-dependant FPU exceptions management + * fpu/exceptions.h - system-dependant FPU exceptions management * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_EXCEPTIONS_H diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu/fpu/flags.cpp index 4b0972df3..2eabef859 100644 --- a/BasiliskII/src/uae_cpu/fpu/flags.cpp +++ b/BasiliskII/src/uae_cpu/fpu/flags.cpp @@ -1,33 +1,28 @@ /* - * fpu/flags.cpp - Floating-point flags + * fpu/flags.cpp - Floating-point flags * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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: this file shall be included only from fpu/fpu_*.cpp */ diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h index 3d144ac2c..7c0c5b748 100644 --- a/BasiliskII/src/uae_cpu/fpu/flags.h +++ b/BasiliskII/src/uae_cpu/fpu/flags.h @@ -1,33 +1,28 @@ /* - * fpu/flags.h - Floating-point flags + * fpu/flags.h - Floating-point flags * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_FLAGS_H @@ -117,7 +112,7 @@ PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) /* Make FPSR according to the value passed in argument */ PRIVATE inline void FFPU make_fpsr(fpu_register const & r) - { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=a" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } + { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=r" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } /* Return the corresponding ID of the current floating-point condition codes */ /* NOTE: only valid for evaluation of a condition */ @@ -222,7 +217,7 @@ PRIVATE inline void FFPU make_fpsr(fpu_register const & r) /* -------------------------------------------------------------------------- */ /* Return the address of the floating-point condition codes register */ -static inline uae_u32 * FFPU address_of_fpccr(void) +static inline uae_u32 * const FFPU address_of_fpccr(void) { return ((uae_u32 *)& FPU fpsr.condition_codes); } #endif /* FPU_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu/fpu/fpu.h index d1fe6dd25..3940a75b8 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu.h @@ -1,33 +1,28 @@ /* - * fpu/fpu.h - public header + * fpu/fpu.h - public header * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_PUBLIC_HEADER_H @@ -51,9 +46,4 @@ #include "fpu/types.h" #include "fpu/core.h" -void fpu_set_fpsr(uae_u32 new_fpsr); -uae_u32 fpu_get_fpsr(void); -void fpu_set_fpcr(uae_u32 new_fpcr); -uae_u32 fpu_get_fpcr(void); - #endif /* FPU_PUBLIC_HEADER_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp index 5fa1ad0b4..f5a1aeb49 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -1,42 +1,31 @@ /* - * fpu_ieee.cpp - the IEEE FPU + * fpu/fpu_ieee.cpp * - * Copyright (c) 2001-2008 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation * - * MC68881/68040 fpu emulation + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * 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. * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 */ + /* - * UAE - The Un*x Amiga Emulator - * - * MC68881/MC68040 emulation - * - * Copyright 1996 Herman ten Brugge - * - * * Following fixes by Lauri Pesonen, July 1999: * * FMOVEM list handling: @@ -98,7 +87,7 @@ */ #include "sysdeps.h" -#include +#include #include "memory.h" #include "readcpu.h" #include "newcpu.h" @@ -141,24 +130,6 @@ fpu_t fpu; #include "fpu/exceptions.cpp" #include "fpu/rounding.cpp" -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) -#define LD(x) x ## L -#ifdef HAVE_POWL -#define POWL(x, y) powl(x, y) -#else -#define POWL(x, y) pow(x, y) -#endif -#ifdef HAVE_LOG10L -#define LOG10L(x) log10l(x) -#else -#define LOG10L(x) log10(x) -#endif -#else -#define LD(x) x -#define POWL(x, y) pow(x, y) -#define LOG10L(x) log10(x) -#endif - /* -------------------------------------------------------------------------- */ /* --- Debugging --- */ /* -------------------------------------------------------------------------- */ @@ -181,9 +152,9 @@ PUBLIC void FFPU fpu_dump_flags(void) (get_fpsr() & FPSR_CCB_NAN) != 0); } -#if FPU_DEBUG && FPU_DUMP_REGISTERS PRIVATE void FFPU dump_registers(const char * str) { +#if FPU_DEBUG && FPU_DUMP_REGISTERS char temp_str[512]; sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", @@ -193,15 +164,12 @@ PRIVATE void FFPU dump_registers(const char * str) fpu_get_register(6), fpu_get_register(7) ); fpu_debug((temp_str)); -#else -PRIVATE void FFPU dump_registers(const char *) -{ #endif } -#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) { +#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES char temp_buf1[256], temp_buf2[10]; int bytes = sizeof(temp_buf1)/3-1-3; if (actual < bytes) @@ -215,9 +183,6 @@ PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) strcat(temp_buf1, "\n"); fpu_debug((temp_buf1)); -#else - PRIVATE void FFPU dump_first_bytes(uae_u8 *, uae_s32) -{ #endif } @@ -235,12 +200,11 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) #if 1 // Use a single, otherwise some checks for NaN, Inf, Zero would have to // be performed - fpu_single result = 0; - fp_declare_init_shape(srp, single); - srp.ieee.negative = (value >> 31) & 1; - srp.ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; - srp.ieee.mantissa = value & 0x007fffff; - result = srp.value; + fpu_single result = 0; // = 0 to workaround a compiler bug on SPARC + fp_declare_init_shape(srp, result, single); + srp->ieee.negative = (value >> 31) & 1; + srp->ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; + srp->ieee.mantissa = value & 0x007fffff; fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); return result; #elif 0 /* Original code */ @@ -248,13 +212,13 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) return (0.0); fpu_register result; - fpu_register_parts *p = (fpu_register_parts *)&result; + uae_u32 * p = (uae_u32 *)&result; uae_u32 sign = (value & 0x80000000); uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - p->parts[FLO] = value << 29; - p->parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + p[FLO] = value << 29; + p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); @@ -267,11 +231,10 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) { #if 1 fpu_single input = (fpu_single) src; - fp_declare_init_shape(sip, single); - sip.value = input; - uae_u32 result = (sip.ieee.negative << 31) - | (sip.ieee.exponent << 23) - | sip.ieee.mantissa; + fp_declare_init_shape(sip, input, single); + uae_u32 result = (sip->ieee.negative << 31) + | (sip->ieee.exponent << 23) + | sip->ieee.mantissa; fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); return result; #elif 0 /* Original code */ @@ -279,10 +242,10 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) return 0; uae_u32 result; - fpu_register_parts const *p = (fpu_register_parts const *)&src; + uae_u32 *p = (uae_u32 *)&src; - uae_u32 sign = (p->parts[FHI] & 0x80000000); - uae_u32 exp = (p->parts[FHI] & 0x7FF00000) >> 20; + uae_u32 sign = (p[FHI] & 0x80000000); + uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; if(exp + 127 < 1023) { exp = 0; @@ -292,7 +255,7 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) exp = exp + 127 - 1023; } - result = sign | (exp << 23) | ((p->parts[FHI] & 0x000FFFFF) << 3) | (p->parts[FLO] >> 29); + result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); @@ -305,37 +268,36 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u { // is it zero? if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) - return (wrd1 & 0x80000000) ? -0.0 : 0.0; + return 0.0; fpu_register result; -#if defined(USE_QUAD_DOUBLE) +#if USE_QUAD_DOUBLE // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { make_nan(result); return result; } // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { if ((wrd1 & 0x80000000) == 0) make_inf_positive(result); else make_inf_negative(result); return result; } - fp_declare_init_shape(srp, extended); - srp.ieee.negative = (wrd1 >> 31) & 1; - srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp.ieee.mantissa3 = 0; -#elif defined(USE_LONG_DOUBLE) - fp_declare_init_shape(srp, extended); - srp.ieee.negative = (wrd1 >> 31) & 1; - srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp.ieee.mantissa0 = wrd2; - srp.ieee.mantissa1 = wrd3; - + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp->ieee.mantissa3 = 0; +#elif USE_LONG_DOUBLE + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = wrd2; + srp->ieee.mantissa1 = wrd3; #else uae_u32 sgn = (wrd1 >> 31) & 1; uae_u32 exp = (wrd1 >> 16) & 0x7fff; @@ -364,14 +326,13 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - fp_declare_init_shape(srp, double); - srp.ieee.negative = sgn; - srp.ieee.exponent = exp; + fp_declare_init_shape(srp, result, double); + srp->ieee.negative = sgn; + srp->ieee.exponent = exp; // drop the explicit integer bit - srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); + srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); #endif - result = srp.value; fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); return result; } @@ -386,40 +347,37 @@ PRIVATE inline void FFPU make_extended_no_normalize( ) { // is it zero? - if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { - if (wrd1 & 0x80000000) - make_zero_negative(result); - else - make_zero_positive(result); + if ((wrd1 && 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + make_zero_positive(result); return; } // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { make_nan(result); return; } -#if defined(USE_QUAD_DOUBLE) +#if USE_QUAD_DOUBLE // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { if ((wrd1 & 0x80000000) == 0) make_inf_positive(result); else make_inf_negative(result); return; } - fp_declare_init_shape(srp, extended); - srp.ieee.negative = (wrd1 >> 31) & 1; - srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp.ieee.mantissa3 = 0; -#elif defined(USE_LONG_DOUBLE) - fp_declare_init_shape(srp, extended); - srp.ieee.negative = (wrd1 >> 31) & 1; - srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp.ieee.mantissa0 = wrd2; - srp.ieee.mantissa1 = wrd3; + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp->ieee.mantissa3 = 0; +#elif USE_LONG_DOUBLE + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = wrd2; + srp->ieee.mantissa1 = wrd3; #else uae_u32 exp = (wrd1 >> 16) & 0x7fff; if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) @@ -429,14 +387,13 @@ PRIVATE inline void FFPU make_extended_no_normalize( else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - fp_declare_init_shape(srp, double); - srp.ieee.negative = (wrd1 >> 31) & 1; - srp.ieee.exponent = exp; + fp_declare_init_shape(srp, result, double); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = exp; // drop the explicit integer bit - srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); + srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); #endif - result = srp.value; fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); } @@ -449,43 +406,41 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = *wrd2 = *wrd3 = 0; return; } -#if defined(USE_QUAD_DOUBLE) +#if USE_QUAD_DOUBLE // FIXME: deal with denormals? - fp_declare_init_shape(srp, extended); - srp.value = src; - *wrd1 = (srp.ieee.negative << 31) | (srp.ieee.exponent << 16); + fp_declare_init_shape(srp, src, extended); + *wrd1 = (srp->ieee.negative << 31) | (srp->ieee.exponent << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 15) | ((srp.ieee.mantissa1 & 0xfffe0000) >> 17); - *wrd3 = (srp.ieee.mantissa1 << 15) | ((srp.ieee.mantissa2 & 0xfffe0000) >> 17); -#elif defined(USE_LONG_DOUBLE) - fpu_register_parts p = { src }; + *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 15) | ((srp->ieee.mantissa1 & 0xfffe0000) >> 17); + *wrd3 = (srp->ieee.mantissa1 << 15) | ((srp->ieee.mantissa2 & 0xfffe0000) >> 17); +#elif USE_LONG_DOUBLE + uae_u32 *p = (uae_u32 *)&src; #ifdef WORDS_BIGENDIAN - *wrd1 = p.parts[0]; - *wrd2 = p.parts[1]; - *wrd3 = p.parts[2]; + *wrd1 = p[0]; + *wrd2 = p[1]; + *wrd3 = p[2]; #else - *wrd3 = p.parts[0]; - *wrd2 = p.parts[1]; - *wrd1 = (p.parts[2] & 0xffff) << 16; + *wrd3 = p[0]; + *wrd2 = p[1]; + *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; #endif #else - fp_declare_init_shape(srp, double); - srp.value = src; + fp_declare_init_shape(srp, src, double); fpu_debug(("extract_extended (%d,%d,%X,%X)\n", - srp.ieee.negative , srp.ieee.exponent, - srp.ieee.mantissa0, srp.ieee.mantissa1)); + srp->ieee.negative , srp->ieee.exponent, + srp->ieee.mantissa0, srp->ieee.mantissa1)); - uae_u32 exp = srp.ieee.exponent; + uae_u32 exp = srp->ieee.exponent; if (exp == FP_DOUBLE_EXP_MAX) exp = FP_EXTENDED_EXP_MAX; else exp += FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; - *wrd1 = (srp.ieee.negative << 31) | (exp << 16); + *wrd1 = (srp->ieee.negative << 31) | (exp << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 11) | ((srp.ieee.mantissa1 & 0xffe00000) >> 21); - *wrd3 = srp.ieee.mantissa1 << 11; + *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 11) | ((srp->ieee.mantissa1 & 0xffe00000) >> 21); + *wrd3 = srp->ieee.mantissa1 << 11; #endif fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -531,88 +486,41 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, // to_pack PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) { - fpu_register d; - bool sm = (wrd1 & 0x80000000) != 0; - bool se = (wrd1 & 0x40000000) != 0; - int exp = (wrd1 & 0x7fff0000) >> 16; - unsigned int dig; - fpu_register pwr; - - if (exp == 0x7fff) - { - if (wrd2 == 0 && wrd3 == 0) - { - sm ? make_inf_negative(d) : make_inf_positive(d); - } else - { - make_nan(d); - } - return d; - } - dig = wrd1 & 0x0000000f; - if (dig == 0 && wrd2 == 0 && wrd3 == 0) - { - sm ? make_zero_negative(d) : make_zero_positive(d); - return d; - } - - /* - * Convert the bcd exponent to binary by successive adds and - * muls. Set the sign according to SE. Subtract 16 to compensate - * for the mantissa which is to be interpreted as 17 integer - * digits, rather than 1 integer and 16 fraction digits. - * Note: this operation can never overflow. - */ - exp = ((wrd1 >> 24) & 0xf); - exp = exp * 10 + ((wrd1 >> 20) & 0xf); - exp = exp * 10 + ((wrd1 >> 16) & 0xf); - if (se) - exp = -exp; - /* sub to compensate for shift of mant */ - exp = exp - 16; - - /* - * Convert the bcd mantissa to binary by successive - * adds and muls. Set the sign according to SM. - * The mantissa digits will be converted with the decimal point - * assumed following the least-significant digit. - * Note: this operation can never overflow. - */ - d = wrd1 & 0xf; - d = (d * LD(10.0)) + ((wrd2 >> 28) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 24) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 20) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 16) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 12) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 8) & 0xf); - d = (d * LD(10.0)) + ((wrd2 >> 4) & 0xf); - d = (d * LD(10.0)) + ((wrd2 ) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 28) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 24) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 20) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 16) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 12) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 8) & 0xf); - d = (d * LD(10.0)) + ((wrd3 >> 4) & 0xf); - d = (d * LD(10.0)) + ((wrd3 ) & 0xf); - - /* Check the sign of the mant and make the value in fp0 the same sign. */ - if (sm) - d = -d; - - /* - * Calculate power-of-ten factor from exponent. - */ - if (exp < 0) - { - exp = -exp; - pwr = POWL(LD(10.0), exp); - d = d / pwr; - } else - { - pwr = POWL(LD(10.0), exp); - d = d * pwr; - } + fpu_double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + fpu_debug(("make_packed str = %s\n",str)); fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); return d; @@ -621,88 +529,52 @@ PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 // from_pack PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) { - fpu_register pwr; - int exp; - fpu_register d; - bool sm, se; - int dig; - - *wrd1 = *wrd2 = *wrd3 = 0; - - d = src; - sm = false; - if (isneg(src)) - { - d = -d; - sm = true; - } + int i; + int t; + char *cp; + char str[100]; - if (isnan(src)) - { - *wrd1 = sm ? 0xffff0000 : 0x7fff0000; - *wrd2 = 0xffffffff; - *wrd3 = 0xffffffff; - return; - } - if (isinf(src)) - { - *wrd1 = sm ? 0xffff0000 : 0x7fff0000; - *wrd2 = *wrd3 = 0; - return; + sprintf(str, "%.16e", src); + + fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; } - if (iszero(src)) - { - *wrd1 = sm ? 0x80000000 : 0x00000000; - *wrd2 = *wrd3 = 0; - return; + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; } - sm = false; - if (isneg(src)) - { - d = -d; - sm = true; + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; } - exp = (int)floor(LOG10L(d)); - se = false; - if (exp < 0) - { - exp = -exp; - se = true; - pwr = POWL(LD(10.0), exp); - d = d * pwr; - } else - { - pwr = POWL(LD(10.0), exp); - d = d / pwr; + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') + t = (t << 4) | (*cp++ - '0'); + } + *wrd1 |= t << 16; } - dig = (int)d; d = LD(10) * (d - dig); *wrd1 |= dig; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 28; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 24; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 20; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 16; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 12; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 8; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 4; - dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 28; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 24; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 20; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 16; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 12; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 8; - dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 4; - dig = (int)d; *wrd3 |= dig; - - dig = (exp / 100) % 10; - *wrd1 |= dig << 24; - dig = (exp / 10) % 10; - *wrd1 |= dig << 20; - dig = (exp) % 10; - *wrd1 |= dig << 16; - if (sm) - *wrd1 |= 0x80000000; - if (se) - *wrd1 |= 0x40000000; + fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -756,9 +628,11 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe break; case 3: ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -799,8 +673,8 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); fpu_debug(("get_fp_value ad=%X\n",ad)); fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - //dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); - //dump_first_bytes( get_real_address(ad, 0, 0), 64 ); + dump_first_bytes( get_real_address(ad)-64, 64 ); + dump_first_bytes( get_real_address(ad), 64 ); switch (size) { case 0: @@ -847,15 +721,6 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe return 0; } - switch (mode) { - case 3: - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - break; - } - // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); return 1; } @@ -864,7 +729,7 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) { fpu_register result; - switch (get_fpcr() & FPCR_ROUNDING_MODE) { + switch (get_fpcr() & 0x30) { case FPCR_ROUND_ZERO: result = fp_round_to_zero(src); break; @@ -1086,7 +951,7 @@ PRIVATE inline int FFPU fpp_cond(int condition) if (NaN) N = Z = 0; - switch (condition & 0x1f) { + switch (condition) { case 0x00: CONDRET("False",0); case 0x01: CONDRET("Equal",Z); case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); @@ -1156,7 +1021,7 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) { fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - uae_u32 ad = 0; + uae_u32 ad; int cc = fpp_cond(extra & 0x3f); if (cc == -1) { m68k_setpc (m68k_getpc () - 4); @@ -1174,11 +1039,11 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) put_byte(ad, cc ? 0xff : 0x00); } -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) { - fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); - int cc = fpp_cond(extra & 0x3f); + int cc = fpp_cond(opcode & 0x3f); if (cc == -1) { m68k_setpc (oldpc); op_illg (opcode); @@ -1210,7 +1075,7 @@ void FFPU fpuop_save(uae_u32 opcode) { fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); - uae_u32 ad = 0; + uae_u32 ad; int incr = (opcode & 0x38) == 0x20 ? -1 : 1; int i; @@ -1271,7 +1136,7 @@ void FFPU fpuop_restore(uae_u32 opcode) { fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); - uae_u32 ad = 0; + uae_u32 ad; uae_u32 d; int incr = (opcode & 0x38) == 0x20 ? -1 : 1; @@ -1468,7 +1333,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } else if (extra & 0x2000) { /* FMOVEM FPP->memory */ - uae_u32 ad = 0; + uae_u32 ad; int incr = 0; if (get_fp_ad(opcode, &ad) == 0) { @@ -1510,7 +1375,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } else { /* FMOVEM memory->FPP */ - uae_u32 ad = 0; + uae_u32 ad; if (get_fp_ad(opcode, &ad) == 0) { m68k_setpc (m68k_getpc () - 4); @@ -1556,7 +1421,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) return; case 6: case 7: { - uae_u32 ad = 0, list = 0; + uae_u32 ad, list = 0; int incr = 0; if (extra & 0x2000) { /* FMOVEM FPP->memory */ @@ -1703,27 +1568,27 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) switch (extra & 0x7f) { case 0x00: // FPU registers[reg] = 4.0 * atan(1.0); - FPU registers[reg] = LD(3.1415926535897932384626433832795029); + FPU registers[reg] = 3.1415926535897932384626433832795; fpu_debug(("FP const: Pi\n")); break; case 0x0b: // FPU registers[reg] = log10 (2.0); - FPU registers[reg] = LD(0.30102999566398119521); // 0.3010299956639811952137388947244930L + FPU registers[reg] = 0.30102999566398119521373889472449; fpu_debug(("FP const: Log 10 (2)\n")); break; case 0x0c: // FPU registers[reg] = exp (1.0); - FPU registers[reg] = LD(2.7182818284590452353); // 2.7182818284590452353602874713526625L + FPU registers[reg] = 2.7182818284590452353602874713527; fpu_debug(("FP const: e\n")); break; case 0x0d: // FPU registers[reg] = log (exp (1.0)) / log (2.0); - FPU registers[reg] = LD(1.4426950408889634073599246810019); + FPU registers[reg] = 1.4426950408889634073599246810019; fpu_debug(("FP const: Log 2 (e)\n")); break; case 0x0e: // FPU registers[reg] = log (exp (1.0)) / log (10.0); - FPU registers[reg] = LD(0.4342944819032518276511289189166051); + FPU registers[reg] = 0.43429448190325182765112891891661; fpu_debug(("FP const: Log 10 (e)\n")); break; case 0x0f: @@ -1732,70 +1597,70 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x30: // FPU registers[reg] = log (2.0); - FPU registers[reg] = LD(0.6931471805599453094172321214581766); + FPU registers[reg] = 0.69314718055994530941723212145818; fpu_debug(("FP const: ln(2)\n")); break; case 0x31: // FPU registers[reg] = log (10.0); - FPU registers[reg] = LD(2.3025850929940456840179914546843642); + FPU registers[reg] = 2.3025850929940456840179914546844; fpu_debug(("FP const: ln(10)\n")); break; case 0x32: // ?? - FPU registers[reg] = LD(1.0e0); + FPU registers[reg] = 1.0e0; fpu_debug(("FP const: 1.0e0\n")); break; case 0x33: - FPU registers[reg] = LD(1.0e1); + FPU registers[reg] = 1.0e1; fpu_debug(("FP const: 1.0e1\n")); break; case 0x34: - FPU registers[reg] = LD(1.0e2); + FPU registers[reg] = 1.0e2; fpu_debug(("FP const: 1.0e2\n")); break; case 0x35: - FPU registers[reg] = LD(1.0e4); + FPU registers[reg] = 1.0e4; fpu_debug(("FP const: 1.0e4\n")); break; case 0x36: - FPU registers[reg] = LD(1.0e8); + FPU registers[reg] = 1.0e8; fpu_debug(("FP const: 1.0e8\n")); break; case 0x37: - FPU registers[reg] = LD(1.0e16); + FPU registers[reg] = 1.0e16; fpu_debug(("FP const: 1.0e16\n")); break; case 0x38: - FPU registers[reg] = LD(1.0e32); + FPU registers[reg] = 1.0e32; fpu_debug(("FP const: 1.0e32\n")); break; case 0x39: - FPU registers[reg] = LD(1.0e64); + FPU registers[reg] = 1.0e64; fpu_debug(("FP const: 1.0e64\n")); break; case 0x3a: - FPU registers[reg] = LD(1.0e128); + FPU registers[reg] = 1.0e128; fpu_debug(("FP const: 1.0e128\n")); break; case 0x3b: - FPU registers[reg] = LD(1.0e256); + FPU registers[reg] = 1.0e256; fpu_debug(("FP const: 1.0e256\n")); break; -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE case 0x3c: - FPU registers[reg] = LD(1.0e512); + FPU registers[reg] = 1.0e512L; fpu_debug(("FP const: 1.0e512\n")); break; case 0x3d: - FPU registers[reg] = LD(1.0e1024); + FPU registers[reg] = 1.0e1024L; fpu_debug(("FP const: 1.0e1024\n")); break; case 0x3e: - FPU registers[reg] = LD(1.0e2048); + FPU registers[reg] = 1.0e2048L; fpu_debug(("FP const: 1.0e2048\n")); break; case 0x3f: - FPU registers[reg] = LD(1.0e4096); + FPU registers[reg] = 1.0e4096L; fpu_debug(("FP const: 1.0e4096\n")); #endif break; @@ -1896,20 +1761,20 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FMUL %.04f\n",(double)src)); get_dest_flags(FPU registers[reg]); get_source_flags(src); - if (fl_dest.in_range && fl_source.in_range) { + if(fl_dest.in_range && fl_source.in_range) { if ((extra & 0x7f) == 0x63) FPU registers[reg] = (float)(FPU registers[reg] * src); else FPU registers[reg] = (double)(FPU registers[reg] * src); } else if (fl_dest.nan || fl_source.nan || - (fl_dest.zero && fl_source.infinity) || - (fl_dest.infinity && fl_source.zero) ) { + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { make_nan( FPU registers[reg] ); } else if (fl_dest.zero || fl_source.zero ) { - if ( (fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative) ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_zero_negative(FPU registers[reg]); } else { @@ -1917,8 +1782,8 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } } else { - if ( (fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative) ) { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_inf_negative(FPU registers[reg]); } else { @@ -2102,21 +1967,17 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FMUL %.04f\n",(double)src)); get_dest_flags(FPU registers[reg]); get_source_flags(src); - if (fl_dest.in_range && fl_source.in_range) { + if(fl_dest.in_range && fl_source.in_range) { FPU registers[reg] *= src; - if (unlikely(isinf(FPU registers[reg]))) - { - isneg(FPU registers[reg]) ? make_inf_negative(FPU registers[reg]) : make_inf_positive(FPU registers[reg]); - } } else if (fl_dest.nan || fl_source.nan || - (fl_dest.zero && fl_source.infinity) || - (fl_dest.infinity && fl_source.zero) ) { + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { make_nan( FPU registers[reg] ); } else if (fl_dest.zero || fl_source.zero ) { - if ( (fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative) ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_zero_negative(FPU registers[reg]); } else { @@ -2124,8 +1985,8 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } } else { - if ( (fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative) ) { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_inf_negative(FPU registers[reg]); } else { @@ -2161,23 +2022,19 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) // an overflow or underflow always results. // Here (int) cast is okay. int scale_factor = (int)fp_round_to_zero(src); -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = FPU registers[reg]; - sxp.ieee.exponent += scale_factor; - FPU registers[reg] = sxp.value; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, FPU registers[reg], extended); + sxp->ieee.exponent += scale_factor; #else - fp_declare_init_shape(sxp, double); - sxp.value = FPU registers[reg]; - uae_u32 exp = sxp.ieee.exponent + scale_factor; + fp_declare_init_shape(sxp, FPU registers[reg], double); + uae_u32 exp = sxp->ieee.exponent + scale_factor; if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) exp = 0; else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) exp = FP_DOUBLE_EXP_MAX; else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - sxp.ieee.exponent = exp; - FPU registers[reg] = sxp.value; + sxp->ieee.exponent = exp; #endif } else if (fl_source.infinity) { @@ -2199,10 +2056,6 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x22: /* FADD */ fpu_debug(("FADD %.04f\n",(double)src)); FPU registers[reg] += src; - if (unlikely(isinf(FPU registers[reg]))) - { - isneg(FPU registers[reg]) ? make_inf_negative(FPU registers[reg]) : make_inf_positive(FPU registers[reg]); - } make_fpsr(FPU registers[reg]); break; case 0x30: /* FSINCOS */ @@ -2223,17 +2076,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x38: /* FCMP */ fpu_debug(("FCMP %.04f\n",(double)src)); set_fpsr(0); - if (isinf(FPU registers[reg])) - { - if (isinf(src) && isneg(FPU registers[reg]) == isneg (src)) - make_fpsr(0); - else - make_fpsr(FPU registers[reg]); - } - else if (isinf(src)) - make_fpsr(-src); - else - make_fpsr(FPU registers[reg] - src); + make_fpsr(FPU registers[reg] - src); break; case 0x3a: /* FTST */ fpu_debug(("FTST %.04f\n",(double)src)); @@ -2257,27 +2100,6 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) dump_registers( "END "); } - -void fpu_set_fpsr(uae_u32 new_fpsr) -{ - set_fpsr(new_fpsr); -} - -uae_u32 fpu_get_fpsr(void) -{ - return get_fpsr(); -} - -void fpu_set_fpcr(uae_u32 new_fpcr) -{ - set_fpcr(new_fpcr); -} - -uae_u32 fpu_get_fpcr(void) -{ - return get_fpcr(); -} - /* -------------------------- Initialization -------------------------- */ PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h index 3321891af..895019569 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h @@ -1,33 +1,28 @@ /* - * fpu/fpu_ieee.h - Extra Definitions for the IEEE FPU core + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_IEEE_H @@ -65,7 +60,7 @@ PRIVATE inline void FFPU make_zero_negative(fpu_register & r); PRIVATE inline void FFPU make_inf_positive(fpu_register & r); PRIVATE inline void FFPU make_inf_negative(fpu_register & r); -// MJ PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); // May be optimized for particular processors diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp deleted file mode 100644 index 1975aba8d..000000000 --- a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp +++ /dev/null @@ -1,2110 +0,0 @@ -/* - * fpu_mpfr.cpp - emulate 68881/68040 fpu with mpfr - * - * Copyright (c) 2012, 2013 Andreas Schwab - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#include "sysdeps.h" -#include -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" -#include "main.h" -#define FPU_IMPLEMENTATION -#include "fpu/fpu.h" - -#include "fpu/flags.h" -#include "fpu/exceptions.h" -#include "fpu/rounding.h" -#include "fpu/impl.h" - -#define SINGLE_PREC 24 -#define SINGLE_MIN_EXP -126 -#define SINGLE_MAX_EXP 127 -#define SINGLE_BIAS 127 -#define DOUBLE_PREC 53 -#define DOUBLE_MIN_EXP -1022 -#define DOUBLE_MAX_EXP 1023 -#define DOUBLE_BIAS 1023 -#define EXTENDED_PREC 64 -#define EXTENDED_MIN_EXP -16383 -#define EXTENDED_MAX_EXP 16383 -#define EXTENDED_BIAS 16383 - -fpu_t fpu; -// The constant ROM -// Constants 48 to 63 are mapped to index 16 to 31 -const int num_fpu_constants = 32; -static mpfr_t fpu_constant_rom[num_fpu_constants]; -#define FPU_CONSTANT_ONE fpu_constant_rom[18] -// Exceptions generated during execution in addition to the ones -// maintained by mpfr -static uae_u32 cur_exceptions; -static uaecptr cur_instruction_address; - -static void -set_format (int prec) -{ - // MPFR represents numbers as 0.m*2^e - switch (prec) - { - case SINGLE_PREC: - mpfr_set_emin (SINGLE_MIN_EXP + 1 - (SINGLE_PREC - 1)); - mpfr_set_emax (SINGLE_MAX_EXP + 1); - break; - case DOUBLE_PREC: - mpfr_set_emin (DOUBLE_MIN_EXP + 1 - (DOUBLE_PREC - 1)); - mpfr_set_emax (DOUBLE_MAX_EXP + 1); - break; - case EXTENDED_PREC: - mpfr_set_emin (EXTENDED_MIN_EXP + 1 - (EXTENDED_PREC - 1)); - mpfr_set_emax (EXTENDED_MAX_EXP + 1); - break; - } -} - -static mpfr_rnd_t -get_cur_rnd () -{ - switch (get_rounding_mode ()) - { - default: - case FPCR_ROUND_NEAR: - return MPFR_RNDN; - case FPCR_ROUND_ZERO: - return MPFR_RNDZ; - case FPCR_ROUND_MINF: - return MPFR_RNDD; - case FPCR_ROUND_PINF: - return MPFR_RNDU; - } -} - -static mpfr_prec_t -get_cur_prec () -{ - switch (get_rounding_precision ()) - { - default: - case FPCR_PRECISION_EXTENDED: - return EXTENDED_PREC; - case FPCR_PRECISION_SINGLE: - return SINGLE_PREC; - case FPCR_PRECISION_DOUBLE: - return DOUBLE_PREC; - } -} - -#define DEFAULT_NAN_BITS 0xffffffffffffffffULL - -static void -set_nan (fpu_register ®, uae_u64 nan_bits, int nan_sign) -{ - mpfr_set_nan (reg.f); - reg.nan_bits = nan_bits; - reg.nan_sign = nan_sign; -} - -static void -set_nan (fpu_register ®) -{ - set_nan (reg, DEFAULT_NAN_BITS, 0); -} - -static bool fpu_inited; - -void -fpu_init (bool integral_68040) -{ - fpu.is_integral = integral_68040; - - mpfr_set_default_prec (EXTENDED_PREC); - mpfr_set_default_rounding_mode (MPFR_RNDN); - set_format (EXTENDED_PREC); - - for (int i = 0; i < 8; i++) - mpfr_init (fpu.registers[i].f); - mpfr_init (fpu.result.f); - - // Initialize constant ROM - for (int i = 0; i < num_fpu_constants; i++) - mpfr_init (fpu_constant_rom[i]); - - // 0: pi - mpfr_const_pi (fpu_constant_rom[0], MPFR_RNDN); - // 11: log10 (2) - mpfr_set_ui (fpu_constant_rom[11], 2, MPFR_RNDN); - mpfr_log10 (fpu_constant_rom[11], fpu_constant_rom[11], MPFR_RNDZ); - // 12: e - mpfr_set_ui (fpu_constant_rom[12], 1, MPFR_RNDN); - mpfr_exp (fpu_constant_rom[12], fpu_constant_rom[12], MPFR_RNDZ); - // 13: log2 (e) - mpfr_log2 (fpu_constant_rom[13], fpu_constant_rom[12], MPFR_RNDU); - // 14: log10 (e) - mpfr_log10 (fpu_constant_rom[14], fpu_constant_rom[12], MPFR_RNDU); - // 15: 0 - mpfr_set_zero (fpu_constant_rom[15], 0); - // 48: ln (2) - mpfr_const_log2 (fpu_constant_rom[16], MPFR_RNDN); - // 49: ln (10) - mpfr_set_ui (fpu_constant_rom[17], 10, MPFR_RNDN); - mpfr_log (fpu_constant_rom[17], fpu_constant_rom[17], MPFR_RNDN); - // 50 to 63: powers of 10 - mpfr_set_ui (fpu_constant_rom[18], 1, MPFR_RNDN); - for (int i = 19; i < 32; i++) - { - mpfr_set_ui (fpu_constant_rom[i], 1L << (i - 19) , MPFR_RNDN); - mpfr_exp10 (fpu_constant_rom[i], fpu_constant_rom[i], MPFR_RNDN); - } - - fpu_inited = true; - - fpu_reset (); -} - -void -fpu_exit () -{ - if (!fpu_inited) return; - - for (int i = 0; i < 8; i++) - mpfr_clear (fpu.registers[i].f); - mpfr_clear (fpu.result.f); - for (int i = 0; i < num_fpu_constants; i++) - mpfr_clear (fpu_constant_rom[i]); -} - -void -fpu_reset () -{ - set_fpcr (0); - set_fpsr (0); - fpu.instruction_address = 0; - - for (int i = 0; i < 8; i++) - set_nan (fpu.registers[i]); -} - -fpu_register::operator long double () -{ - return mpfr_get_ld (f, MPFR_RNDN); -} - -fpu_register & -fpu_register::operator= (long double x) -{ - mpfr_set_ld (f, x, MPFR_RNDN); - nan_bits = DEFAULT_NAN_BITS; - nan_sign = 0; - return *this; -} - -static bool -get_fp_addr (uae_u32 opcode, uae_u32 *addr, bool write) -{ - uaecptr pc; - int mode; - int reg; - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - switch (mode) - { - case 0: - case 1: - return false; - case 2: - *addr = m68k_areg (regs, reg); - break; - case 3: - *addr = m68k_areg (regs, reg); - break; - case 4: - *addr = m68k_areg (regs, reg); - break; - case 5: - *addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); - break; - case 6: - *addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) - { - case 0: - *addr = (uae_s16) next_iword(); - break; - case 1: - *addr = next_ilong(); - break; - case 2: - if (write) - return false; - pc = m68k_getpc (); - *addr = pc + (uae_s16) next_iword(); - break; - case 3: - if (write) - return false; - pc = m68k_getpc (); - *addr = get_disp_ea_020 (pc, next_iword()); - break; - default: - return false; - } - } - return true; -} - -static void -set_from_single (fpu_register &value, uae_u32 data) -{ - int s = data >> 31; - int e = (data >> 23) & 0xff; - uae_u32 m = data & 0x7fffff; - - if (e == 0xff) - { - if (m != 0) - { - if (!(m & 0x400000)) - cur_exceptions |= FPSR_EXCEPTION_SNAN; - set_nan (value, (uae_u64) (m | 0xc00000) << (32 + 8), s); - } - else - mpfr_set_inf (value.f, 0); - } - else - { - if (e != 0) - // Add integer bit - m |= 0x800000; - else - e++; - // Remove bias - e -= SINGLE_BIAS; - mpfr_set_ui_2exp (value.f, m, e - (SINGLE_PREC - 1), MPFR_RNDN); - } - mpfr_setsign (value.f, value.f, s, MPFR_RNDN); -} - -static void -set_from_double (fpu_register &value, uae_u32 words[2]) -{ - int s = words[0] >> 31; - int e = (words[0] >> 20) & 0x7ff; - uae_u32 m = words[0] & 0xfffff; - - if (e == 0x7ff) - { - if ((m | words[1]) != 0) - { - if (!(m & 0x80000)) - cur_exceptions |= FPSR_EXCEPTION_SNAN; - set_nan (value, (((uae_u64) (m | 0x180000) << (32 + 11)) - | ((uae_u64) words[1] << 11)), s); - } - else - mpfr_set_inf (value.f, 0); - } - else - { - if (e != 0) - // Add integer bit - m |= 0x100000; - else - e++; - // Remove bias - e -= DOUBLE_BIAS; - mpfr_set_uj_2exp (value.f, ((uintmax_t) m << 32) | words[1], - e - (DOUBLE_PREC - 1), MPFR_RNDN); - } - mpfr_setsign (value.f, value.f, s, MPFR_RNDN); -} - -static void -set_from_extended (fpu_register &value, uae_u32 words[3], bool check_snan) -{ - int s = words[0] >> 31; - int e = (words[0] >> 16) & 0x7fff; - - if (e == 0x7fff) - { - if (((words[1] & 0x7fffffff) | words[2]) != 0) - { - if (check_snan) - { - if ((words[1] & 0x40000000) == 0) - cur_exceptions |= FPSR_EXCEPTION_SNAN; - words[1] |= 0x40000000; - } - set_nan (value, ((uae_u64) words[1] << 32) | words[2], s); - } - else - mpfr_set_inf (value.f, 0); - } - else - { - // Remove bias - e -= EXTENDED_BIAS; - mpfr_set_uj_2exp (value.f, ((uintmax_t) words[1] << 32) | words[2], - e - (EXTENDED_PREC - 1), MPFR_RNDN); - } - mpfr_setsign (value.f, value.f, s, MPFR_RNDN); -} - -#define from_bcd(d) ((d) < 10 ? (d) : (d) - 10) - -static void -set_from_packed (fpu_register &value, uae_u32 words[3]) -{ - char str[32], *p = str; - int sm = words[0] >> 31; - int se = (words[0] >> 30) & 1; - int i; - - if (((words[0] >> 16) & 0x7fff) == 0x7fff) - { - if ((words[1] | words[2]) != 0) - { - if ((words[1] & 0x40000000) == 0) - cur_exceptions |= FPSR_EXCEPTION_SNAN; - set_nan (value, ((uae_u64) (words[1] | 0x40000000) << 32) | words[2], - sm); - } - else - mpfr_set_inf (value.f, 0); - } - else - { - if (sm) - *p++ = '-'; - *p++ = from_bcd (words[0] & 15) + '0'; - *p++ = '.'; - for (i = 0; i < 8; i++) - { - p[i] = from_bcd ((words[1] >> (28 - i * 4)) & 15) + '0'; - p[i + 8] = from_bcd ((words[2] >> (28 - i * 4)) & 15) + '0'; - } - p += 16; - *p++ = 'e'; - if (se) - *p++ = '-'; - *p++ = from_bcd ((words[0] >> 24) & 15) + '0'; - *p++ = from_bcd ((words[0] >> 20) & 15) + '0'; - *p++ = from_bcd ((words[0] >> 16) & 15) + '0'; - *p = 0; - mpfr_set_str (value.f, str, 10, MPFR_RNDN); - } - mpfr_setsign (value.f, value.f, sm, MPFR_RNDN); -} - -static bool -get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register &value) -{ - int mode, reg, size; - uaecptr pc; - uae_u32 addr; - uae_u32 words[3]; - static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - if ((extra & 0x4000) == 0) - { - mpfr_set (value.f, fpu.registers[(extra >> 10) & 7].f, MPFR_RNDN); - value.nan_bits = fpu.registers[(extra >> 10) & 7].nan_bits; - value.nan_sign = fpu.registers[(extra >> 10) & 7].nan_sign; - /* Check for SNaN. */ - if (mpfr_nan_p (value.f) && (value.nan_bits & (1ULL << 62)) == 0) - { - value.nan_bits |= 1ULL << 62; - cur_exceptions |= FPSR_EXCEPTION_SNAN; - } - return true; - } - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - switch (mode) - { - case 0: - switch (size) - { - case 6: - mpfr_set_si (value.f, (uae_s8) m68k_dreg (regs, reg), MPFR_RNDN); - break; - case 4: - mpfr_set_si (value.f, (uae_s16) m68k_dreg (regs, reg), MPFR_RNDN); - break; - case 0: - mpfr_set_si (value.f, (uae_s32) m68k_dreg (regs, reg), MPFR_RNDN); - break; - case 1: - set_from_single (value, m68k_dreg (regs, reg)); - break; - default: - return false; - } - return true; - case 1: - return false; - case 2: - case 3: - addr = m68k_areg (regs, reg); - break; - case 4: - addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); - break; - case 5: - addr = m68k_areg (regs, reg) + (uae_s16) next_iword (); - break; - case 6: - addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword ()); - break; - case 7: - switch (reg) - { - case 0: - addr = (uae_s16) next_iword (); - break; - case 1: - addr = next_ilong (); - break; - case 2: - pc = m68k_getpc (); - addr = pc + (uae_s16) next_iword (); - break; - case 3: - pc = m68k_getpc (); - addr = get_disp_ea_020 (pc, next_iword ()); - break; - case 4: - addr = m68k_getpc (); - m68k_incpc (sz2[size]); - if (size == 6) // Immediate byte - addr++; - break; - default: - return false; - } - } - - switch (size) - { - case 0: - mpfr_set_si (value.f, (uae_s32) get_long (addr), MPFR_RNDN); - break; - case 1: - set_from_single (value, get_long (addr)); - break; - case 2: - words[0] = get_long (addr); - words[1] = get_long (addr + 4); - words[2] = get_long (addr + 8); - set_from_extended (value, words, true); - break; - case 3: - words[0] = get_long (addr); - words[1] = get_long (addr + 4); - words[2] = get_long (addr + 8); - set_from_packed (value, words); - break; - case 4: - mpfr_set_si (value.f, (uae_s16) get_word (addr), MPFR_RNDN); - break; - case 5: - words[0] = get_long (addr); - words[1] = get_long (addr + 4); - set_from_double (value, words); - break; - case 6: - mpfr_set_si (value.f, (uae_s8) get_byte (addr), MPFR_RNDN); - break; - default: - return false; - } - - switch (mode) - { - case 3: - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - break; - } - - return true; -} - -static void -update_exceptions () -{ - uae_u32 exc, aexc; - - exc = cur_exceptions; - // Add any mpfr detected exceptions - if (mpfr_underflow_p ()) - exc |= FPSR_EXCEPTION_UNFL; - if (mpfr_overflow_p ()) - exc |= FPSR_EXCEPTION_OVFL; - if (mpfr_inexflag_p ()) - exc |= FPSR_EXCEPTION_INEX2; - set_exception_status (exc); - - aexc = get_accrued_exception (); - if (exc & (FPSR_EXCEPTION_SNAN|FPSR_EXCEPTION_OPERR)) - aexc |= FPSR_ACCR_IOP; - if (exc & FPSR_EXCEPTION_OVFL) - aexc |= FPSR_ACCR_OVFL; - if ((exc & (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) - == (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) - aexc |= FPSR_ACCR_UNFL; - if (exc & FPSR_EXCEPTION_DZ) - aexc |= FPSR_ACCR_DZ; - if (exc & (FPSR_EXCEPTION_INEX1|FPSR_EXCEPTION_INEX2|FPSR_EXCEPTION_OVFL)) - aexc |= FPSR_ACCR_INEX; - set_accrued_exception (aexc); - - if ((fpu.fpcr.exception_enable & exc) != 0) - { - fpu.instruction_address = cur_instruction_address; - // TODO: raise exceptions - // Problem: FPSP040 depends on proper FPU stack frames, it would suffer - // undefined behaviour with our dummy FSAVE implementation - } -} - -static void -set_fp_register (int reg, mpfr_t value, uae_u64 nan_bits, int nan_sign, - int t, mpfr_rnd_t rnd, bool do_flags) -{ - mpfr_subnormalize (value, t, rnd); - mpfr_set (fpu.registers[reg].f, value, rnd); - fpu.registers[reg].nan_bits = nan_bits; - fpu.registers[reg].nan_sign = nan_sign; - if (do_flags) - { - uae_u32 flags = 0; - - if (mpfr_zero_p (fpu.registers[reg].f)) - flags |= FPSR_CCB_ZERO; - if (mpfr_signbit (fpu.registers[reg].f)) - flags |= FPSR_CCB_NEGATIVE; - if (mpfr_nan_p (fpu.registers[reg].f)) - flags |= FPSR_CCB_NAN; - if (mpfr_inf_p (fpu.registers[reg].f)) - flags |= FPSR_CCB_INFINITY; - set_fpccr (flags); - } -} - -static void -set_fp_register (int reg, mpfr_t value, int t, mpfr_rnd_t rnd, bool do_flags) -{ - set_fp_register (reg, value, DEFAULT_NAN_BITS, 0, t, rnd, do_flags); -} - -static void -set_fp_register (int reg, fpu_register &value, int t, mpfr_rnd_t rnd, - bool do_flags) -{ - set_fp_register (reg, value.f, value.nan_bits, value.nan_sign, t, rnd, - do_flags); -} - -static uae_u32 -extract_to_single (fpu_register &value) -{ - uae_u32 word; - int t; - mpfr_rnd_t rnd = get_cur_rnd (); - MPFR_DECL_INIT (single, SINGLE_PREC); - - set_format (SINGLE_PREC); - // Round to single - t = mpfr_set (single, value.f, rnd); - t = mpfr_check_range (single, t, rnd); - mpfr_subnormalize (single, t, rnd); - set_format (EXTENDED_PREC); - - if (mpfr_inf_p (single)) - word = 0x7f800000; - else if (mpfr_nan_p (single)) - { - if ((value.nan_bits & (1ULL << 62)) == 0) - { - value.nan_bits |= 1ULL << 62; - cur_exceptions |= FPSR_EXCEPTION_SNAN; - } - word = 0x7f800000 | ((value.nan_bits >> (32 + 8)) & 0x7fffff); - if (value.nan_sign) - word |= 0x80000000; - } - else if (mpfr_zero_p (single)) - word = 0; - else - { - int e; - mpz_t f; - mpz_init (f); - word = 0; - // Get exponent and mantissa - e = mpfr_get_z_2exp (f, single); - // Move binary point - e += SINGLE_PREC - 1; - // Add bias - e += SINGLE_BIAS; - if (e <= 0) - { - // Denormalized number - mpz_tdiv_q_2exp (f, f, -e + 1); - e = 0; - } - mpz_export (&word, 0, 1, 4, 0, 0, f); - // Remove integer bit - word &= 0x7fffff; - word |= e << 23; - mpz_clear (f); - } - if (mpfr_signbit (single)) - word |= 0x80000000; - return word; -} - -static void -extract_to_double (fpu_register &value, uint32_t *words) -{ - int t; - mpfr_rnd_t rnd = get_cur_rnd (); - MPFR_DECL_INIT (dbl, DOUBLE_PREC); - - set_format (DOUBLE_PREC); - // Round to double - t = mpfr_set (dbl, value.f, rnd); - t = mpfr_check_range (dbl, t, rnd); - mpfr_subnormalize (dbl, t, rnd); - set_format (EXTENDED_PREC); - - if (mpfr_inf_p (dbl)) - { - words[0] = 0x7ff00000; - words[1] = 0; - } - else if (mpfr_nan_p (dbl)) - { - if ((value.nan_bits & (1ULL << 62)) == 0) - { - value.nan_bits |= 1ULL << 62; - cur_exceptions |= FPSR_EXCEPTION_SNAN; - } - words[0] = 0x7ff00000 | ((value.nan_bits >> (32 + 11)) & 0xfffff); - words[1] = value.nan_bits >> 11; - if (value.nan_sign) - words[0] |= 0x80000000; - } - else if (mpfr_zero_p (dbl)) - { - words[0] = 0; - words[1] = 0; - } - else - { - int e, off = 0; - mpz_t f; - mpz_init (f); - words[0] = words[1] = 0; - // Get exponent and mantissa - e = mpfr_get_z_2exp (f, dbl); - // Move binary point - e += DOUBLE_PREC - 1; - // Add bias - e += DOUBLE_BIAS; - if (e <= 0) - { - // Denormalized number - mpz_tdiv_q_2exp (f, f, -e + 1); - if (e <= -20) - // No more than 32 bits left - off = 1; - e = 0; - } - mpz_export (&words[off], 0, 1, 4, 0, 0, f); - // Remove integer bit - words[0] &= 0xfffff; - words[0] |= e << 20; - mpz_clear (f); - } - if (mpfr_signbit (dbl)) - words[0] |= 0x80000000; -} - -static void -extract_to_extended (fpu_register &value, uint32_t *words) -{ - if (mpfr_inf_p (value.f)) - { - words[0] = 0x7fff0000; - words[1] = 0; - words[2] = 0; - } - else if (mpfr_nan_p (value.f)) - { - words[0] = 0x7fff0000; - words[1] = value.nan_bits >> 32; - words[2] = value.nan_bits; - if (value.nan_sign) - words[0] |= 0x80000000; - } - else if (mpfr_zero_p (value.f)) - { - words[0] = 0; - words[1] = 0; - words[2] = 0; - } - else - { - int e, off = 0; - mpz_t f; - - mpz_init (f); - words[0] = words[1] = words[2] = 0; - // Get exponent and mantissa - e = mpfr_get_z_2exp (f, value.f); - // Move binary point - e += EXTENDED_PREC - 1; - // Add bias - e += EXTENDED_BIAS; - if (e < 0) - { - // Denormalized number - mpz_tdiv_q_2exp (f, f, -e); - if (e <= -32) - // No more than 32 bits left - off = 1; - e = 0; - } - mpz_export (&words[1 + off], 0, 1, 4, 0, 0, f); - words[0] = e << 16; - mpz_clear (f); - } - if (mpfr_signbit (value.f)) - words[0] |= 0x80000000; -} - -static void -extract_to_packed (fpu_register &value, int k, uae_u32 *words) -{ - if (mpfr_inf_p (value.f)) - { - words[0] = 0x7fff0000; - words[1] = 0; - words[2] = 0; - } - else if (mpfr_nan_p (value.f)) - { - words[0] = 0x7fff0000; - words[1] = value.nan_bits >> 32; - words[2] = value.nan_bits; - if (value.nan_sign) - words[0] |= 0x80000000; - } - else if (mpfr_zero_p (value.f)) - { - words[0] = 0; - words[1] = 0; - words[2] = 0; - } - else - { - char str[100], *p = str; - mpfr_exp_t e; - mpfr_rnd_t rnd = get_cur_rnd (); - - words[0] = words[1] = words[2] = 0; - if (k >= 64) - k -= 128; - else if (k >= 18) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - if (k <= 0) - { - MPFR_DECL_INIT (temp, 16); - - mpfr_log10 (temp, value.f, rnd); - k = mpfr_get_si (temp, MPFR_RNDZ) - k + 1; - } - if (k <= 0) - k = 1; - else if (k >= 18) - k = 17; - mpfr_get_str (str, &e, 10, k, value.f, rnd); - e--; - if (*p == '-') - p++; - // Pad to 17 digits - while (k < 17) - p[k++] = '0'; - if (e < 0) - { - words[0] |= 0x40000000; - e = -e; - } - words[0] |= (e % 10) << 16; - e /= 10; - words[0] |= (e % 10) << 20; - e /= 10; - words[0] |= (e % 10) << 24; - e /= 10; - if (e) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - words[0] |= e << 12; - words[0] |= *p++ & 15; - for (k = 0; k < 8; k++) - words[1] = (words[1] << 4) | (*p++ & 15); - for (k = 0; k < 8; k++) - words[2] = (words[2] << 4) | (*p++ & 15); - - } - if (mpfr_signbit (value.f)) - words[0] |= 0x80000000; -} - -static long -extract_to_integer (mpfr_t value, long min, long max) -{ - long result; - mpfr_rnd_t rnd = get_cur_rnd (); - - if (mpfr_fits_slong_p (value, rnd)) - { - result = mpfr_get_si (value, rnd); - if (result > max) - { - result = max; - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (result < min) - { - result = min; - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - } - else - { - if (!mpfr_signbit (value)) - result = max; - else - result = min; - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - return result; -} - -static bool -fpuop_fmove_memory (uae_u32 opcode, uae_u32 extra) -{ - int mode, reg, size; - uaecptr pc; - uae_u32 addr; - uae_u32 words[3]; - static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; - static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; - - mpfr_clear_flags (); - cur_exceptions = 0; - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - fpu_register &value = fpu.registers[(extra >> 7) & 7]; - - switch (mode) - { - case 0: - switch (size) - { - case 0: - m68k_dreg (regs, reg) = extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff); - break; - case 1: - m68k_dreg (regs, reg) = extract_to_single (value); - break; - case 4: - m68k_dreg (regs, reg) &= ~0xffff; - m68k_dreg (regs, reg) |= extract_to_integer (value.f, -32768, 32767) & 0xffff; - break; - case 6: - m68k_dreg (regs, reg) &= ~0xff; - m68k_dreg (regs, reg) |= extract_to_integer (value.f, -128, 127) & 0xff; - break; - default: - return false; - } - update_exceptions (); - return true; - case 1: - return false; - case 2: - addr = m68k_areg (regs, reg); - break; - case 3: - addr = m68k_areg (regs, reg); - break; - case 4: - addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); - break; - case 5: - addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); - break; - case 6: - addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); - break; - case 7: - switch (reg) - { - case 0: - addr = (uae_s16) next_iword(); - break; - case 1: - addr = next_ilong(); - break; - case 2: - pc = m68k_getpc (); - addr = pc + (uae_s16) next_iword(); - break; - case 3: - pc = m68k_getpc (); - addr = get_disp_ea_020 (pc, next_iword ()); - break; - case 4: - addr = m68k_getpc (); - m68k_incpc (sz2[size]); - break; - default: - return false; - } - } - - switch (size) - { - case 0: - put_long (addr, extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff)); - break; - case 1: - put_long (addr, extract_to_single (value)); - break; - case 2: - extract_to_extended (value, words); - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - put_long (addr + 8, words[2]); - break; - case 3: - extract_to_packed (value, extra & 0x7f, words); - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - put_long (addr + 8, words[2]); - break; - case 4: - put_word (addr, extract_to_integer (value.f, -32768, 32767)); - break; - case 5: - extract_to_double (value, words); - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - break; - case 6: - put_byte (addr, extract_to_integer (value.f, -128, 127)); - break; - case 7: - extract_to_packed (value, m68k_dreg (regs, (extra >> 4) & 7) & 0x7f, words); - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - put_long (addr + 8, words[2]); - break; - } - - switch (mode) - { - case 3: - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - break; - } - - update_exceptions (); - return true; -} - -static bool -fpuop_fmovem_control (uae_u32 opcode, uae_u32 extra) -{ - int list, mode, reg; - uae_u32 addr; - - list = (extra >> 10) & 7; - mode = (opcode >> 3) & 7; - reg = opcode & 7; - - if (list == 0) - return false; - - if (extra & 0x2000) - { - // FMOVEM to - if (mode == 0) - { - switch (list) - { - case 1: - m68k_dreg (regs, reg) = fpu.instruction_address; - break; - case 2: - m68k_dreg (regs, reg) = get_fpsr (); - break; - case 4: - m68k_dreg (regs, reg) = get_fpcr (); - break; - default: - return false; - } - } - else if (mode == 1) - { - if (list != 1) - return false; - m68k_areg (regs, reg) = fpu.instruction_address; - } - else - { - int nwords; - - if (!get_fp_addr (opcode, &addr, true)) - return false; - nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); - if (mode == 4) - addr -= nwords * 4; - if (list & 4) - { - put_long (addr, get_fpcr ()); - addr += 4; - } - if (list & 2) - { - put_long (addr, get_fpsr ()); - addr += 4; - } - if (list & 1) - { - put_long (addr, fpu.instruction_address); - addr += 4; - } - if (mode == 4) - m68k_areg (regs, reg) = addr - nwords * 4; - else if (mode == 3) - m68k_areg (regs, reg) = addr; - } - } - else - { - // FMOVEM from - - if (mode == 0) - { - switch (list) - { - case 1: - fpu.instruction_address = m68k_dreg (regs, reg); - break; - case 2: - set_fpsr (m68k_dreg (regs, reg)); - break; - case 4: - set_fpcr (m68k_dreg (regs, reg)); - break; - default: - return false; - } - } - else if (mode == 1) - { - if (list != 1) - return false; - fpu.instruction_address = m68k_areg (regs, reg); - } - else if ((opcode & 077) == 074) - { - switch (list) - { - case 1: - fpu.instruction_address = next_ilong (); - break; - case 2: - set_fpsr (next_ilong ()); - break; - case 4: - set_fpcr (next_ilong ()); - break; - default: - return false; - } - } - else - { - int nwords; - - if (!get_fp_addr (opcode, &addr, false)) - return false; - nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); - if (mode == 4) - addr -= nwords * 4; - if (list & 4) - { - set_fpcr (get_long (addr)); - addr += 4; - } - if (list & 2) - { - set_fpsr (get_long (addr)); - addr += 4; - } - if (list & 1) - { - fpu.instruction_address = get_long (addr); - addr += 4; - } - if (mode == 4) - m68k_areg (regs, reg) = addr - nwords * 4; - else if (mode == 3) - m68k_areg (regs, reg) = addr; - } - } - - return true; -} - -static bool -fpuop_fmovem_register (uae_u32 opcode, uae_u32 extra) -{ - uae_u32 addr; - uae_u32 words[3]; - int list; - int i; - - set_format (EXTENDED_PREC); - if (!get_fp_addr (opcode, &addr, extra & 0x2000)) - return false; - if (extra & 0x800) - list = m68k_dreg (regs, (extra >> 4) & 7) & 0xff; - else - list = extra & 0xff; - - if (extra & 0x2000) - { - // FMOVEM to memory - - switch (opcode & 070) - { - case 030: - return false; - case 040: - if (extra & 0x1000) - return false; - for (i = 7; i >= 0; i--) - if (list & (1 << i)) - { - extract_to_extended (fpu.registers[i], words); - addr -= 12; - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - put_long (addr + 8, words[2]); - } - m68k_areg (regs, opcode & 7) = addr; - break; - default: - if ((extra & 0x1000) == 0) - return false; - for (i = 0; i < 8; i++) - if (list & (0x80 >> i)) - { - extract_to_extended (fpu.registers[i], words); - put_long (addr, words[0]); - put_long (addr + 4, words[1]); - put_long (addr + 8, words[2]); - addr += 12; - } - if ((opcode & 070) == 030) - m68k_areg (regs, opcode & 7) = addr; - break; - } - } - else - { - // FMOVEM from memory - - if ((opcode & 070) == 040) - return false; - - if ((extra & 0x1000) == 0) - return false; - for (i = 0; i < 8; i++) - if (list & (0x80 >> i)) - { - words[0] = get_long (addr); - words[1] = get_long (addr + 4); - words[2] = get_long (addr + 8); - addr += 12; - set_from_extended (fpu.registers[i], words, false); - } - if ((opcode & 070) == 030) - m68k_areg (regs, opcode & 7) = addr; - } - return true; -} - -static int -do_getexp (mpfr_t value, mpfr_rnd_t rnd) -{ - int t = 0; - - if (mpfr_inf_p (value)) - { - mpfr_set_nan (value); - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) - t = mpfr_set_si (value, mpfr_get_exp (value) - 1, rnd); - return t; -} - -static int -do_getman (mpfr_t value) -{ - if (mpfr_inf_p (value)) - { - mpfr_set_nan (value); - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) - mpfr_set_exp (value, 1); - return 0; -} - -static int -do_scale (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) -{ - long scale; - int t = 0; - - if (mpfr_nan_p (value)) - ; - else if (mpfr_inf_p (value)) - { - mpfr_set_nan (value); - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (mpfr_fits_slong_p (value, rnd)) - { - scale = mpfr_get_si (value, MPFR_RNDZ); - mpfr_clear_inexflag (); - t = mpfr_mul_2si (value, reg, scale, rnd); - } - else - mpfr_set_inf (value, -mpfr_signbit (value)); - return t; -} - -static int -do_remainder (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) -{ - long quo; - int t = 0; - - if (mpfr_nan_p (value) || mpfr_nan_p (reg)) - ; - else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_remquo (value, &quo, reg, value, rnd); - if (quo < 0) - quo = (-quo & 0x7f) | 0x80; - else - quo &= 0x7f; - fpu.fpsr.quotient = quo << 16; - return t; -} - -// Unfortunately, mpfr_fmod does not return the quotient bits, so we -// have to reimplement it here -static int -mpfr_rem1 (mpfr_t rem, int *quo, mpfr_t x, mpfr_t y, mpfr_rnd_t rnd) -{ - mpfr_exp_t ex, ey; - int inex, sign, signx = mpfr_signbit (x); - mpz_t mx, my, r; - - mpz_init (mx); - mpz_init (my); - mpz_init (r); - - ex = mpfr_get_z_2exp (mx, x); /* x = mx*2^ex */ - ey = mpfr_get_z_2exp (my, y); /* y = my*2^ey */ - - /* to get rid of sign problems, we compute it separately: - quo(-x,-y) = quo(x,y), rem(-x,-y) = -rem(x,y) - quo(-x,y) = -quo(x,y), rem(-x,y) = -rem(x,y) - thus quo = sign(x/y)*quo(|x|,|y|), rem = sign(x)*rem(|x|,|y|) */ - sign = (signx != mpfr_signbit (y)); - mpz_abs (mx, mx); - mpz_abs (my, my); - - /* divide my by 2^k if possible to make operations mod my easier */ - { - unsigned long k = mpz_scan1 (my, 0); - ey += k; - mpz_fdiv_q_2exp (my, my, k); - } - - if (ex <= ey) - { - /* q = x/y = mx/(my*2^(ey-ex)) */ - mpz_mul_2exp (my, my, ey - ex); /* divide mx by my*2^(ey-ex) */ - /* 0 <= |r| <= |my|, r has the same sign as mx */ - mpz_tdiv_qr (mx, r, mx, my); - /* mx is the quotient */ - mpz_tdiv_r_2exp (mx, mx, 7); - *quo = mpz_get_si (mx); - } - else /* ex > ey */ - { - /* to get the low 7 more bits of the quotient, we first compute - R = X mod Y*2^7, where X and Y are defined below. Then the - low 7 of the quotient are floor(R/Y). */ - mpz_mul_2exp (my, my, 7); /* 2^7*Y */ - - mpz_set_ui (r, 2); - mpz_powm_ui (r, r, ex - ey, my); /* 2^(ex-ey) mod my */ - mpz_mul (r, r, mx); - mpz_mod (r, r, my); - - /* now 0 <= r < 2^7*Y */ - mpz_fdiv_q_2exp (my, my, 7); /* back to Y */ - mpz_tdiv_qr (mx, r, r, my); - /* oldr = mx*my + newr */ - *quo = mpz_get_si (mx); - - /* now 0 <= |r| < |my| */ - } - - if (mpz_cmp_ui (r, 0) == 0) - { - inex = mpfr_set_ui (rem, 0, MPFR_RNDN); - /* take into account sign of x */ - if (signx) - mpfr_neg (rem, rem, MPFR_RNDN); - } - else - { - /* take into account sign of x */ - if (signx) - mpz_neg (r, r); - inex = mpfr_set_z_2exp (rem, r, ex > ey ? ey : ex, rnd); - } - - if (sign) - *quo |= 0x80; - - mpz_clear (mx); - mpz_clear (my); - mpz_clear (r); - - return inex; -} - -static int -do_fmod (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) -{ - int t = 0; - - if (mpfr_nan_p (value) || mpfr_nan_p (reg)) - mpfr_set_nan (value); - else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) - { - mpfr_set_nan (value); - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (mpfr_zero_p (reg) || mpfr_inf_p (value)) - { - fpu.fpsr.quotient = 0; - t = mpfr_set (value, reg, rnd); - } - else - { - int quo; - - t = mpfr_rem1 (value, &quo, reg, value, rnd); - fpu.fpsr.quotient = quo << 16; - } - return t; -} - -static void -do_fcmp (mpfr_t source, mpfr_t dest) -{ - uae_u32 flags = 0; - - if (mpfr_nan_p (source) || mpfr_nan_p (dest)) - flags |= FPSR_CCB_NAN; - else - { - int cmp = mpfr_cmp (dest, source); - if (cmp < 0) - flags |= FPSR_CCB_NEGATIVE; - else if (cmp == 0) - { - flags |= FPSR_CCB_ZERO; - if ((mpfr_zero_p (dest) || mpfr_inf_p (dest)) && mpfr_signbit (dest)) - flags |= FPSR_CCB_NEGATIVE; - } - } - set_fpccr (flags); -} - -static void -do_ftst (mpfr_t value) -{ - uae_u32 flags = 0; - - if (mpfr_signbit (value)) - flags |= FPSR_CCB_NEGATIVE; - if (mpfr_nan_p (value)) - flags |= FPSR_CCB_NAN; - else if (mpfr_zero_p (value)) - flags |= FPSR_CCB_ZERO; - else if (mpfr_inf_p (value)) - flags |= FPSR_CCB_INFINITY; - set_fpccr (flags); -} - -static bool -fpuop_general (uae_u32 opcode, uae_u32 extra) -{ - mpfr_prec_t prec = get_cur_prec (); - mpfr_rnd_t rnd = get_cur_rnd (); - int reg = (extra >> 7) & 7; - int t = 0; - fpu_register value; - bool ret; - - mpfr_init2 (value.f, prec); - value.nan_bits = DEFAULT_NAN_BITS; - value.nan_sign = 0; - - mpfr_clear_flags (); - set_format (prec); - cur_exceptions = 0; - cur_instruction_address = m68k_getpc () - 4; - if ((extra & 0xfc00) == 0x5c00) - { - // FMOVECR - int rom_index = extra & 0x7f; - if (rom_index == 0 || (rom_index >= 11 && rom_index <= 15)) - t = mpfr_set (value.f, fpu_constant_rom[rom_index], rnd); - else if (rom_index >= 48 && rom_index <= 63) - t = mpfr_set (value.f, fpu_constant_rom[rom_index - 32], rnd); - else - mpfr_set_zero (value.f, 0); - set_fp_register (reg, value, t, rnd, true); - } - else if (extra & 0x40) - { - static const char valid[64] = - { - 1, 1, 0, 0, 1, 1, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, - 1, 0, 1, 0, 1, 0, 1, 0, - 1, 0, 1, 1, 1, 0, 1, 1, - 1, 0, 0, 0, 1, 0, 0, 0 - }; - - if (extra & 4) - // FD... - prec = DOUBLE_PREC; - else - // FS... - prec = SINGLE_PREC; - set_format (prec); - MPFR_DECL_INIT (value2, prec); - - if (!fpu.is_integral) - { - ret = false; - goto out; - } - if (!valid[extra & 0x3b]) - { - ret = false; - goto out; - } - if (!get_fp_value (opcode, extra, value)) - { - ret = false; - goto out; - } - - switch (extra & 0x3f) - { - case 0: // FSMOVE - case 4: // FDMOVE - mpfr_set (value2, value.f, rnd); - break; - case 1: // FSSQRT - case 5: // FDSQRT - if (mpfr_sgn (value.f) < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sqrt (value2, value.f, rnd); - break; - case 24: // FSABS - case 28: // FDABS - t = mpfr_abs (value2, value.f, rnd); - break; - case 26: // FSNEG - case 30: // FDNEG - t = mpfr_neg (value2, value.f, rnd); - break; - case 32: // FSDIV - case 36: // FDDIV - if (mpfr_zero_p (value.f)) - { - if (mpfr_regular_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_zero_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); - break; - case 34: // FSADD - case 38: // FDADD - if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) - && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_add (value2, fpu.registers[reg].f, value.f, rnd); - break; - case 35: // FSMUL - case 39: // FDMUL - if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); - break; - case 40: // FSSUB - case 44: // FDSUB - if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) - && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sub (value2, fpu.registers[reg].f, value.f, rnd); - break; - } - set_fp_register (reg, value2, t, rnd, true); - } - else if ((extra & 0x30) == 0x30) - { - if ((extra & 15) > 10 || (extra & 15) == 9) - { - ret = false; - goto out; - } - if (!get_fp_value (opcode, extra, value)) - { - ret = false; - goto out; - } - - if ((extra & 15) < 8) - { - // FSINCOS - int reg2 = extra & 7; - MPFR_DECL_INIT (value2, prec); - - if (mpfr_inf_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sin_cos (value.f, value2, value.f, rnd); - if (reg2 != reg) - set_fp_register (reg2, value2, t >> 2, rnd, false); - set_fp_register (reg, value, t & 3, rnd, true); - } - else if ((extra & 15) == 8) - // FCMP - do_fcmp (value.f, fpu.registers[reg].f); - else - // FTST - do_ftst (value.f); - } - else - { - static const char valid[64] = - { - 1, 1, 1, 1, 1, 0, 1, 0, - 1, 1, 1, 0, 1, 1, 1, 1, - 1, 1, 1, 0, 1, 1, 1, 0, - 1, 1, 1, 0, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, - 1 - }; - if (!valid[extra & 0x3f]) - { - ret = false; - goto out; - } - if (!get_fp_value (opcode, extra, value)) - { - ret = false; - goto out; - } - - switch (extra & 0x3f) - { - case 0: // FMOVE - break; - case 1: // FINT - t = mpfr_rint (value.f, value.f, rnd); - break; - case 2: // FSINH - t = mpfr_sinh (value.f, value.f, rnd); - break; - case 3: // FINTRZ - t = mpfr_rint (value.f, value.f, MPFR_RNDZ); - break; - case 4: // FSQRT - if (mpfr_sgn (value.f) < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sqrt (value.f, value.f, rnd); - break; - case 6: // FLOGNP1 - if (!mpfr_nan_p (value.f)) - { - int cmp = mpfr_cmp_si (value.f, -1); - if (cmp == 0) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (cmp < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - t = mpfr_log1p (value.f, value.f, rnd); - break; - case 8: // FETOXM1 - t = mpfr_expm1 (value.f, value.f, rnd); - break; - case 9: // FTANH - t = mpfr_tanh (value.f, value.f, rnd); - break; - case 10: // FATAN - t = mpfr_atan (value.f, value.f, rnd); - break; - case 12: // FASIN - if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_asin (value.f, value.f, rnd); - break; - case 13: // FATANH - if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_atanh (value.f, value.f, rnd); - break; - case 14: // FSIN - if (mpfr_inf_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sin (value.f, value.f, rnd); - break; - case 15: // FTAN - if (mpfr_inf_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_tan (value.f, value.f, rnd); - break; - case 16: // FETOX - t = mpfr_exp (value.f, value.f, rnd); - break; - case 17: // FTWOTOX - t = mpfr_ui_pow (value.f, 2, value.f, rnd); - break; - case 18: // FTENTOX - t = mpfr_ui_pow (value.f, 10, value.f, rnd); - break; - case 20: // FLOGN - if (mpfr_zero_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_sgn (value.f) < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_log (value.f, value.f, rnd); - break; - case 21: // FLOG10 - if (mpfr_zero_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_sgn (value.f) < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_log10 (value.f, value.f, rnd); - break; - case 22: // FLOG2 - if (mpfr_zero_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_sgn (value.f) < 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_log2 (value.f, value.f, rnd); - break; - case 24: // FABS - t = mpfr_abs (value.f, value.f, rnd); - value.nan_sign = 0; - break; - case 25: // FCOSH - t = mpfr_cosh (value.f, value.f, rnd); - break; - case 26: // FNEG - t = mpfr_neg (value.f, value.f, rnd); - value.nan_sign = !value.nan_sign; - break; - case 28: // FACOS - if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_acos (value.f, value.f, rnd); - break; - case 29: // FCOS - if (mpfr_inf_p (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_cos (value.f, value.f, rnd); - break; - case 30: // FGETEXP - t = do_getexp (value.f, rnd); - break; - case 31: // FGETMAN - t = do_getman (value.f); - break; - case 32: // FDIV - if (mpfr_zero_p (value.f)) - { - if (mpfr_regular_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_zero_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_div (value.f, fpu.registers[reg].f, value.f, rnd); - break; - case 33: // FMOD - t = do_fmod (value.f, fpu.registers[reg].f, rnd); - break; - case 34: // FADD - if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) - && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_add (value.f, fpu.registers[reg].f, value.f, rnd); - break; - case 35: // FMUL - if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_mul (value.f, fpu.registers[reg].f, value.f, rnd); - break; - case 36: // FSGLDIV - { - MPFR_DECL_INIT (value2, SINGLE_PREC); - - set_format (SINGLE_PREC); - if (mpfr_zero_p (value.f)) - { - if (mpfr_regular_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_DZ; - else if (mpfr_zero_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - } - else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); - mpfr_set (value.f, value2, rnd); - } - break; - case 37: // FREM - t = do_remainder (value.f, fpu.registers[reg].f, rnd); - break; - case 38: // FSCALE - t = do_scale (value.f, fpu.registers[reg].f, rnd); - break; - case 39: // FSGLMUL - { - MPFR_DECL_INIT (value2, SINGLE_PREC); - - set_format (SINGLE_PREC); - if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) - || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); - mpfr_set (value.f, value2, rnd); - } - break; - case 40: // FSUB - if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) - && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) - cur_exceptions |= FPSR_EXCEPTION_OPERR; - t = mpfr_sub (value.f, fpu.registers[reg].f, value.f, rnd); - break; - } - set_fp_register (reg, value, t, rnd, true); - } - update_exceptions (); - ret = true; - out: - mpfr_clear (value.f); - return ret; -} - -void -fpuop_arithmetic (uae_u32 opcode, uae_u32 extra) -{ - bool valid; - - switch ((extra >> 13) & 7) - { - case 3: - valid = fpuop_fmove_memory (opcode, extra); - break; - case 4: - case 5: - valid = fpuop_fmovem_control (opcode, extra); - break; - case 6: - case 7: - valid = fpuop_fmovem_register (opcode, extra); - break; - case 0: - case 2: - valid = fpuop_general (opcode, extra); - break; - default: - valid = false; - break; - } - - if (!valid) - { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } -} - -static bool -check_fp_cond (uae_u32 pred) -{ - uae_u32 fpcc = get_fpccr (); - - if ((pred & 16) != 0 && (fpcc & FPSR_CCB_NAN) != 0) - { - // IEEE non-aware test - set_exception_status (get_exception_status () | FPSR_EXCEPTION_BSUN); - set_accrued_exception (get_accrued_exception () | FPSR_ACCR_IOP); - } - - switch (pred & 15) - { - case 0: // F / SF - return false; - case 1: // EQ /SEQ - return (fpcc & FPSR_CCB_ZERO) != 0; - case 2: // OGT / GT - return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) == 0; - case 3: // OGE / GE - return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NAN | FPSR_CCB_NEGATIVE)) == 0; - case 4: // OLT / LT - return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; - case 5: // OLE / LE - return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN)) == FPSR_CCB_NEGATIVE; - case 6: // OGL / GL - return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) == 0; - case 7: // OR / GLE - return (fpcc & FPSR_CCB_NAN) == 0; - case 8: // UN / NGLE - return (fpcc & FPSR_CCB_NAN) != 0; - case 9: // UEQ / NGL - return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) != 0; - case 10: // UGT / NLE - return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == 0; - case 11: // UGE / NLT - return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) != FPSR_CCB_NEGATIVE; - case 12: // ULT / NGE - return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; - case 13: // ULE / NGT - return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) != 0; - case 14: // NE / SNE - return (fpcc & FPSR_CCB_ZERO) == 0; - case 15: // T / ST - return true; - default: - return false; - } -} - -void -fpuop_bcc (uae_u32 opcode, uaecptr pc, uae_u32 disp) -{ - if (check_fp_cond (opcode)) - { - if (!(opcode & (1 << 6))) - disp = (uae_s16) disp; - m68k_setpc (pc + disp); - } -} - -void -fpuop_scc (uae_u32 opcode, uae_u32 extra) -{ - uae_u32 addr; - int value = check_fp_cond (extra) ? 0xff : 0; - if ((opcode & 070) == 0) - { - int reg = opcode & 7; - m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xff) | value; - } - else if (!get_fp_addr (opcode, &addr, true)) - { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - } - else - { - switch (opcode & 070) - { - case 030: - m68k_areg (regs, opcode & 7) += (opcode & 7) == 7 ? 2 : 1; - break; - case 040: - addr -= (opcode & 7) == 7 ? 2 : 1; - m68k_areg (regs, opcode & 7) = addr; - } - put_byte (addr, value); - } -} - -void -fpuop_dbcc (uae_u32 opcode, uae_u32 extra) -{ - uaecptr pc = m68k_getpc (); - uae_s16 disp = next_iword (); - - if (!check_fp_cond (extra)) - { - int reg = opcode & 7; - uae_u16 cnt = (m68k_dreg (regs, reg) & 0xffff) - 1; - m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xffff) | cnt; - if (cnt != 0xffff) - m68k_setpc (pc + disp); - } -} - -void -fpuop_trapcc (uae_u32, uaecptr oldpc, uae_u32 extra) -{ - if (check_fp_cond (extra)) - Exception (7, oldpc - 2); -} - -void -fpuop_save (uae_u32 opcode) -{ - uae_u32 addr; - - if ((opcode & 070) == 030 - || !get_fp_addr (opcode, &addr, true)) - { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - if (fpu.is_integral) - { - // 4 byte 68040 IDLE frame - // FIXME: generate proper FPU stack frames that does not result - // in undefined behaviour from FPSP040 - if ((opcode & 070) == 040) - { - addr -= 4; - m68k_areg (regs, opcode & 7) = addr; - } - put_long (addr, 0x41000000); - } - else - { - // 28 byte 68881 IDLE frame - if ((opcode & 070) == 040) - { - addr -= 28; - m68k_areg (regs, opcode & 7) = addr; - } - put_long (addr, 0x1f180000); - for (int i = 0; i < 6; i++) - { - addr += 4; - put_long (addr, 0); - } - } -} - -void -fpuop_restore (uae_u32 opcode) -{ - uae_u32 addr; - uae_u32 format; - - if ((opcode & 070) == 040 - || !get_fp_addr (opcode, &addr, false)) - { - m68k_setpc (m68k_getpc () - 2); - op_illg (opcode); - return; - } - - format = get_long (addr); - addr += 4; - if ((format & 0xff000000) == 0) - // NULL frame - fpu_reset (); - else - addr += (format & 0xff0000) >> 16; - if ((opcode & 070) == 030) - m68k_areg (regs, opcode & 7) = addr; -} - -void fpu_set_fpsr(uae_u32 new_fpsr) -{ - set_fpsr(new_fpsr); -} - -uae_u32 fpu_get_fpsr(void) -{ - return get_fpsr(); -} - -void fpu_set_fpcr(uae_u32 new_fpcr) -{ - set_fpcr(new_fpcr); -} - -uae_u32 fpu_get_fpcr(void) -{ - return get_fpcr(); -} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp index 23efd8ef5..ffc784a5b 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp @@ -1,42 +1,31 @@ /* - * fpu/fpu_uae.cpp - the old UAE FPU + * fpu/fpu_uae.cpp * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation * - * MC68881/68040 fpu emulation + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * 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. * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 */ + /* - * UAE - The Un*x Amiga Emulator - * - * MC68881 emulation - * - * Copyright 1996 Herman ten Brugge - * - * * Following fixes by Lauri Pesonen, July 1999: * * FMOVEM list handling: @@ -97,8 +86,9 @@ * - Precision rounding single/double */ - #include "sysdeps.h" +#include +#include #include "memory.h" #include "readcpu.h" #include "newcpu.h" @@ -107,17 +97,6 @@ #include "fpu/fpu.h" #include "fpu/fpu_uae.h" -#ifdef HAVE_NEW_HEADERS -#define _GLIBCPP_USE_C99 1 -# include -# include -using namespace __gnu_cxx; -#undef _GLIBCPP_USE_C99 -#else -# include -# include -#endif - /* Global FPU context */ fpu_t fpu; @@ -187,8 +166,8 @@ PUBLIC void FFPU dump_registers(const char * str) sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", str, - fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), fpu_get_register(3), - fpu_get_register(4), fpu_get_register(5), fpu_get_register(6), fpu_get_register(7) ); + get_register(0), get_register(1), get_register(2), get_register(3), + get_register(4), get_register(5), get_register(6), get_register(7) ); fpu_debug((temp_str)); } @@ -216,7 +195,9 @@ PUBLIC void FFPU dump_registers(const char *) { } -#define dump_first_bytes(a,b) +PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ +} #endif @@ -238,10 +219,10 @@ PRIVATE inline fpu_register FFPU round_to_nearest(fpu_register const & x) PRIVATE inline bool FFPU do_isnan(fpu_register const & r) { - fpu_register_parts const p = { r }; - if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000) { + uae_u32 * p = (uae_u32 *)&r; + if ((p[FHI] & 0x7FF00000) == 0x7FF00000) { // logical or is faster here. - if ((p.parts[FHI] & 0x000FFFFF) || p.parts[FLO]) { + if ((p[FHI] & 0x000FFFFF) || p[FLO]) { return true; } } @@ -254,8 +235,8 @@ PRIVATE inline bool FFPU do_isnan(fpu_register const & r) PRIVATE inline bool FFPU do_isinf(fpu_register const & r) { - fpu_register_parts const p = { r }; - if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000 && p.parts[FLO] == 0) { + uae_u32 * p = (uae_u32 *)&r; + if (((p[FHI] & 0x7FF00000) == 0x7FF00000) && p[FLO] == 0) { return true; } return false; @@ -267,8 +248,8 @@ PRIVATE inline bool FFPU do_isinf(fpu_register const & r) PRIVATE inline bool FFPU do_isneg(fpu_register const & r) { - fpu_register_parts const p = { r }; - return ((p.parts[FHI] & 0x80000000) != 0); + uae_u32 * p = (uae_u32 *)&r; + return ((p[FHI] & 0x80000000) != 0); } #ifndef HAVE_ISZERO @@ -277,8 +258,8 @@ PRIVATE inline bool FFPU do_isneg(fpu_register const & r) PRIVATE inline bool FFPU do_iszero(fpu_register const & r) { - fpu_register_parts const p = { r }; - return (((p.parts[FHI] & 0x7FF00000) == 0) && p.parts[FLO] == 0); + uae_u32 * p = (uae_u32 *)&r; + return (((p[FHI] & 0x7FF00000) == 0) && p[FLO] == 0); } // May be optimized for particular processors @@ -314,83 +295,75 @@ PRIVATE inline void FFPU get_source_flags(fpu_register const & r) PRIVATE inline void FFPU make_nan(fpu_register & r) { - fpu_register_parts p; - p.parts[FLO] = 0xffffffff; - p.parts[FHI] = 0x7fffffff; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0xffffffff; + p[FHI] = 0x7fffffff; } PRIVATE inline void FFPU make_zero_positive(fpu_register & r) { - fpu_register_parts p; - p.parts[FLO] = p.parts[FHI] = 0; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = p[FHI] = 0; } PRIVATE inline void FFPU make_zero_negative(fpu_register & r) { - fpu_register_parts p; - p.parts[FLO] = 0; - p.parts[FHI] = 0x80000000; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0x80000000; } PRIVATE inline void FFPU make_inf_positive(fpu_register & r) { - fpu_register_parts p; - p.parts[FLO] = 0; - p.parts[FHI] = 0x7FF00000; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0x7FF00000; } PRIVATE inline void FFPU make_inf_negative(fpu_register & r) { - fpu_register_parts p; - p.parts[FLO] = 0; - p.parts[FHI] = 0xFFF00000; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0xFFF00000; } PRIVATE inline void FFPU fast_scale(fpu_register & r, int add) { - fpu_register_parts p = { r }; - int exp = (p.parts[FHI] & 0x7FF00000) >> 20; + uae_u32 * const p = (uae_u32 *)&r; + int exp = (p[FHI] & 0x7FF00000) >> 20; // TODO: overflow flags exp += add; if(exp >= 2047) { make_inf_positive(r); - return; } else if(exp < 0) { // keep sign (+/- 0) - p.parts[FHI] &= 0x80000000; + p[FHI] &= 0x80000000; } else { - p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); + p[FHI] = (p[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); } - r = p.val; } PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) { - fpu_register_parts const p = { r }; - int exp = (p.parts[FHI] & 0x7FF00000) >> 20; + uae_u32 * const p = (uae_u32 *)&r; + int exp = (p[FHI] & 0x7FF00000) >> 20; return( exp - 1023 ); } // Normalize to range 1..2 PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) { - fpu_register_parts p = { r }; - p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | 0x3FF00000; - r = p.val; + uae_u32 * const p = (uae_u32 *)&r; + p[FHI] = (p[FHI] & 0x800FFFFF) | 0x3FF00000; } // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) { - fpu_register_parts const a = { ra }; - fpu_register_parts const b = { rb }; - return (((a.parts[FHI] ^ b.parts[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); + uae_u32 * const a = (uae_u32 *)&ra; + uae_u32 * const b = (uae_u32 *)&rb; + return (((a[FHI] ^ b[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); } // Quotient Byte is loaded with the sign and least significant @@ -408,15 +381,13 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) return (0.0); fpu_register result; - fpu_register_parts p; + uae_u32 * p = (uae_u32 *)&result; uae_u32 sign = (value & 0x80000000); uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - p.parts[FLO] = value << 29; - p.parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); - - result = p.val; + p[FLO] = value << 29; + p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); @@ -430,10 +401,10 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) return 0; uae_u32 result; - fpu_register_parts const p = { src }; + uae_u32 *p = (uae_u32 *)&src; - uae_u32 sign = (p.parts[FHI] & 0x80000000); - uae_u32 exp = (p.parts[FHI] & 0x7FF00000) >> 20; + uae_u32 sign = (p[FHI] & 0x80000000); + uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; if(exp + 127 < 1023) { exp = 0; @@ -443,7 +414,7 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) exp = exp + 127 - 1023; } - result = sign | (exp << 23) | ((p.parts[FHI] & 0x000FFFFF) << 3) | (p.parts[FLO] >> 29); + result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); @@ -457,8 +428,8 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u return 0.0; fpu_register result; - fpu_register_parts p; - + uae_u32 *p = (uae_u32 *)&result; + uae_u32 sign = wrd1 & 0x80000000; uae_u32 exp = (wrd1 >> 16) & 0x7fff; @@ -495,10 +466,8 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u } // drop the explicit integer bit. - p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); - - result = p.val; + p[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); @@ -542,13 +511,11 @@ PRIVATE inline void FFPU make_extended_no_normalize( } // drop the explicit integer bit. - fpu_register_parts p; - p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + uae_u32 *p = (uae_u32 *)&result; + p[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); - result = p.val; - - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(float)(*(double *)p))); } // from_exten @@ -560,14 +527,14 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = *wrd2 = *wrd3 = 0; return; } - - fpu_register_parts const p = { src }; - fpu_debug(("extract_extended (%X,%X)\n",p.parts[FLO],p.parts[FHI])); + uae_u32 *p = (uae_u32 *)&src; + + fpu_debug(("extract_extended (%X,%X)\n",p[FLO],p[FHI])); - uae_u32 sign = p.parts[FHI] & 0x80000000; + uae_u32 sign = p[FHI] & 0x80000000; - uae_u32 exp = ((p.parts[FHI] >> 20) & 0x7ff); + uae_u32 exp = ((p[FHI] >> 20) & 0x7ff); // Check for maximum if(exp == 0x7FF) { exp = 0x7FFF; @@ -577,8 +544,8 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = sign | (exp << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | ((p.parts[FHI] & 0x000FFFFF) << 11) | ((p.parts[FLO] & 0xFFE00000) >> 21); - *wrd3 = p.parts[FLO] << 11; + *wrd2 = 0x80000000 | ((p[FHI] & 0x000FFFFF) << 11) | ((p[FLO] & 0xFFE00000) >> 21); + *wrd3 = p[FLO] << 11; fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -590,11 +557,9 @@ PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) return 0.0; fpu_register result; - fpu_register_parts p; - p.parts[FLO] = wrd2; - p.parts[FHI] = wrd1; - - result = p.val; + uae_u32 *p = (uae_u32 *)&result; + p[FLO] = wrd2; + p[FHI] = wrd1; fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); @@ -612,9 +577,9 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, return; } */ - fpu_register_parts const p = { src }; - *wrd2 = p.parts[FLO]; - *wrd1 = p.parts[FHI]; + uae_u32 *p = (uae_u32 *)&src; + *wrd2 = p[FLO]; + *wrd1 = p[FHI]; fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); } @@ -657,25 +622,25 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) fpu_register src0 = src; #endif - if (src == 0.0) + if (src == 0.0) return 0; - if (src < 0) { + if (src < 0) { tmp = 0x80000000; src = -src; - } else { + } else { tmp = 0; - } - frac = frexp (src, &expon); - frac += 0.5 / 16777216.0; - if (frac >= 1.0) { + } + frac = frexp (src, &expon); + frac += 0.5 / 16777216.0; + if (frac >= 1.0) { frac /= 2.0; expon++; - } + } result = tmp | (((expon + 127 - 1) & 0xff) << 23) | (((int) (frac * 16777216.0)) & 0x7fffff); // fpu_debug(("extract_single (%.04f) = %X\n",(float)src0,result)); - return (result); + return (result); } // to exten @@ -930,9 +895,11 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe break; case 3: ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -973,8 +940,8 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); fpu_debug(("get_fp_value ad=%X\n",ad)); fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); - dump_first_bytes( get_real_address(ad, 0, 0), 64 ); + dump_first_bytes( get_real_address(ad)-64, 64 ); + dump_first_bytes( get_real_address(ad), 64 ); switch (size) { case 0: @@ -1021,15 +988,6 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe return 0; } - switch (mode) { - case 3: - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - break; - } - // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); return 1; } @@ -1246,7 +1204,7 @@ PRIVATE inline int FFPU fpp_cond(int condition) #if 0 return fpcctrue(condition); #else - switch (condition & 0x1f) { + switch (condition) { case 0x00: CONDRET("False",0); case 0x01: CONDRET("Equal",Z); case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); @@ -1341,11 +1299,11 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) put_byte(ad, cc ? 0xff : 0x00); } -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) { - fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); - int cc = fpp_cond(extra & 0x3f); + int cc = fpp_cond(opcode & 0x3f); if (cc == -1) { m68k_setpc (oldpc); op_illg (opcode); @@ -1948,8 +1906,6 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) FPU registers[reg] = 1.0e256; fpu_debug(("FP const: 1.0e256\n")); break; - - // Valid for 64 bits only (see fpu.cpp) #if 0 case 0x3c: FPU registers[reg] = 1.0e512; @@ -1986,126 +1942,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) return; } fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); -#if 0 // MJ added, not tested now - if (FPU is_integral) { - // 68040-specific operations - switch (extra & 0x7f) { - case 0x40: /* FSMOVE */ - fpu_debug(("FSMOVE %.04f\n",(double)src)); - FPU registers[reg] = (float)src; - make_fpsr(FPU registers[reg]); - break; - case 0x44: /* FDMOVE */ - fpu_debug(("FDMOVE %.04f\n",(double)src)); - FPU registers[reg] = (double)src; - make_fpsr(FPU registers[reg]); - break; - case 0x41: /* FSSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = (float)sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x45: /* FDSQRT */ - fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = (double)sqrt (src); - make_fpsr(FPU registers[reg]); - break; - case 0x58: /* FSABS */ - fpu_debug(("FSABS %.04f\n",(double)src)); - FPU registers[reg] = (float)fabs(src); - make_fpsr(FPU registers[reg]); - break; - case 0x5c: /* FDABS */ - fpu_debug(("FDABS %.04f\n",(double)src)); - FPU registers[reg] = (double)fabs(src); - make_fpsr(FPU registers[reg]); - break; - case 0x5a: /* FSNEG */ - fpu_debug(("FSNEG %.04f\n",(double)src)); - FPU registers[reg] = (float)-src; - make_fpsr(FPU registers[reg]); - break; - case 0x5e: /* FDNEG */ - fpu_debug(("FDNEG %.04f\n",(double)src)); - FPU registers[reg] = (double)-src; - make_fpsr(FPU registers[reg]); - break; - case 0x60: /* FSDIV */ - fpu_debug(("FSDIV %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] / src); - make_fpsr(FPU registers[reg]); - break; - case 0x64: /* FDDIV */ - fpu_debug(("FDDIV %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] / src); - make_fpsr(FPU registers[reg]); - break; - case 0x62: /* FSADD */ - fpu_debug(("FSADD %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] + src); - make_fpsr(FPU registers[reg]); - break; - case 0x66: /* FDADD */ - fpu_debug(("FDADD %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] + src); - make_fpsr(FPU registers[reg]); - break; - case 0x68: /* FSSUB */ - fpu_debug(("FSSUB %.04f\n",(double)src)); - FPU registers[reg] = (float)(FPU registers[reg] - src); - make_fpsr(FPU registers[reg]); - break; - case 0x6c: /* FDSUB */ - fpu_debug(("FDSUB %.04f\n",(double)src)); - FPU registers[reg] = (double)(FPU registers[reg] - src); - make_fpsr(FPU registers[reg]); - break; - case 0x63: /* FSMUL */ - case 0x67: /* FDMUL */ - get_dest_flags(FPU registers[reg]); - get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { - if ((extra & 0x7f) == 0x63) - FPU registers[reg] = (float)(FPU registers[reg] * src); - else - FPU registers[reg] = (double)(FPU registers[reg] * src); - } - else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); - } - else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } - } - else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } - } - make_fpsr(FPU registers[reg]); - break; - default: - // Continue decode-execute 6888x instructions below - goto process_6888x_instructions; - } - fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); - dump_registers( "END "); - return; - } - process_6888x_instructions: -#endif switch (extra & 0x7f) { case 0x00: /* FMOVE */ fpu_debug(("FMOVE %.04f\n",(double)src)); @@ -2329,13 +2166,13 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) FPU registers[reg] *= src; } else if (fl_dest.nan || fl_source.nan || - (fl_dest.zero && fl_source.infinity) || - (fl_dest.infinity && fl_source.zero) ) { + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { make_nan( FPU registers[reg] ); } else if (fl_dest.zero || fl_source.zero ) { - if (( fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative)) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_zero_negative(FPU registers[reg]); } else { @@ -2343,8 +2180,8 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } } else { - if(( fl_dest.negative && !fl_source.negative) || - (!fl_dest.negative && fl_source.negative)) { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { make_inf_negative(FPU registers[reg]); } else { @@ -2499,27 +2336,6 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) dump_registers( "END "); } - -void fpu_set_fpsr(uae_u32 new_fpsr) -{ - set_fpsr(new_fpsr); -} - -uae_u32 fpu_get_fpsr(void) -{ - return get_fpsr(); -} - -void fpu_set_fpcr(uae_u32 new_fpcr) -{ - set_fpcr(new_fpcr); -} - -uae_u32 fpu_get_fpcr(void) -{ - return get_fpcr(); -} - /* -------------------------- Initialization -------------------------- */ void FFPU fpu_init (bool integral_68040) diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h index d8930e32e..7fc4ebbd9 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h @@ -1,33 +1,28 @@ /* - * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_UAE_H diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp index a4c6af2d9..70e590860 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp @@ -1,33 +1,27 @@ /* - * fpu/fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. + * fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation * - * MC68881/68040 fpu emulation + * Based on UAE FPU, original copyright 1996 Herman ten Brugge, + * rewritten for x86 by Lauri Pesonen 1999-2000, + * accomodated to GCC's Extended Asm syntax by Gwenole Beauchesne 2000. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * 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. * - * ARAnyM 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. * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 * * * Interface @@ -140,8 +134,10 @@ * */ -# include -# include +#include +#include +#include +#include #include "sysdeps.h" #include "memory.h" @@ -242,6 +238,8 @@ PUBLIC void FFPU fpu_dump_flags(void) #include "debug.h" #if FPU_DEBUG +#undef __inline__ +#define __inline__ PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual) { @@ -392,7 +390,7 @@ PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *) /* ---------------------------- Status functions ---------------------------- */ -PRIVATE void inline FFPU SET_BSUN_ON_NAN () +PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN () { if( (x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN ) { x86_status_word |= SW_FAKE_BSUN; @@ -400,7 +398,7 @@ PRIVATE void inline FFPU SET_BSUN_ON_NAN () } } -PRIVATE void inline FFPU build_ex_status () +PRIVATE void __inline__ FFPU build_ex_status () { if(x86_status_word & SW_EXCEPTION_MASK) { // _asm FNCLEX @@ -417,7 +415,7 @@ When the FPU creates a NAN, the NAN always contains the same bit pattern in the mantissa. All bits of the mantissa are ones for any precision. When the user creates a NAN, any nonzero bit pattern can be stored in the mantissa. */ -PRIVATE inline void FFPU MAKE_NAN (fpu_register & f) +PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f) { // Make it non-signaling. uae_u8 * p = (uae_u8 *) &f; @@ -427,10 +425,10 @@ PRIVATE inline void FFPU MAKE_NAN (fpu_register & f) /* For single- and double-precision infinities the fraction is a zero. -For extended-precision infinities, the mantissa�s MSB, the explicit +For extended-precision infinities, the mantissa’s MSB, the explicit integer bit, can be either one or zero. */ -PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f) +PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { @@ -441,7 +439,7 @@ PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f) return(0); } -PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f) +PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { @@ -452,7 +450,7 @@ PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f) return(0); } -PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f) +PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; return *((uae_u32 *)p) == 0 && @@ -460,34 +458,34 @@ PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f) ( *((uae_u16 *)&p[8]) & 0x7FFF ) == 0; } -PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f) +PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f) { uae_u8 * p = (uae_u8 *) &f; memset( p, 0, sizeof(fpu_register)-2 ); *((uae_u16 *)&p[8]) = 0x7FFF; } -PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f) +PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f) { uae_u8 * p = (uae_u8 *) &f; memset( p, 0, sizeof(fpu_register)-2 ); *((uae_u16 *)&p[8]) = 0xFFFF; } -PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) +PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) { uae_u32 * const p = (uae_u32 *) &f; memset( p, 0, sizeof(fpu_register) ); } -PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) +PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) { uae_u32 * const p = (uae_u32 *) &f; memset( p, 0, sizeof(fpu_register) ); *((uae_u32 *)&p[4]) = 0x80000000; } -PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) +PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; return( (p[9] & 0x80) != 0 ); @@ -902,34 +900,6 @@ PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fmove"); } -PRIVATE void FFPU do_fsmove ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fsmove"); -} - -PRIVATE void FFPU do_fdmove ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - FPU_CONSISTENCY_CHECK_STOP("do_fdmove"); -} - /* PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) { @@ -1053,50 +1023,6 @@ PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fsqrt"); } -PRIVATE void FFPU do_fssqrt ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fsqrt \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fssqrt"); -} - -PRIVATE void FFPU do_fdsqrt ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fsqrt \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdsqrt"); -} - PRIVATE void FFPU do_ftst ( fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1385,48 +1311,6 @@ PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fabs"); } -PRIVATE void FFPU do_fsabs ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fabs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fabs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsabs"); -} - -PRIVATE void FFPU do_fdabs ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fabs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fabs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdabs"); -} - PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1457,48 +1341,6 @@ PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fneg"); } -PRIVATE void FFPU do_fsneg ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fchs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fchs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsneg"); -} - -PRIVATE void FFPU do_fdneg ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fchs \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "=m" (dest) - : "m" (src) - ); - // x86 fchs should not rise any exceptions (except stack underflow) - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~SW_EXCEPTION_MASK; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdneg"); -} - PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1624,50 +1466,6 @@ PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fdiv"); } -PRIVATE void FFPU do_fsdiv ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fdiv %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsdiv"); -} - -PRIVATE void FFPU do_fddiv ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fdiv %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fddiv"); -} - // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. // Quotient Byte is loaded with the sign and least significant @@ -2053,48 +1851,6 @@ PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fadd"); } -PRIVATE void FFPU do_fsadd ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fadd \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsadd"); -} - -PRIVATE void FFPU do_fdadd ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fadd \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdadd"); -} - PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -2126,48 +1882,6 @@ PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fmul"); } -PRIVATE void FFPU do_fsmul ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fmul \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fsmul"); -} - -PRIVATE void FFPU do_fdmul ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fmul \n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdmul"); -} - PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -2326,52 +2040,6 @@ PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fsub"); } -PRIVATE void FFPU do_fssub ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fsub %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fssub"); -} - -PRIVATE void FFPU do_fdsub ( fpu_register & dest, fpu_register const & src ) -{ - FPU_CONSISTENCY_CHECK_START(); - __asm__ __volatile__( - "fldt %2\n" - "fldt %1\n" - "fsub %%st(1), %%st(0)\n" - "fxam \n" - "fnstsw %0\n" - "fstpt %1\n" - "fstp %%st(0)\n" - : "=m" (x86_status_word), "+m" (dest) - : "m" (src) - ); - if(x86_status_word & SW_EXCEPTION_MASK) { -// _asm FNCLEX - __asm__ __volatile__("fnclex"); - x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); - x86_status_word_accrued |= x86_status_word; - } - FPU_CONSISTENCY_CHECK_STOP("do_fdsub"); -} - PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -2616,9 +2284,11 @@ PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src break; case 3: ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -2717,15 +2387,6 @@ PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src return 0; } - switch (mode) { - case 3: - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; - break; - case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - break; - } - // D(bug("get_fp_value result = %.04f\r\n",(float)src)); return 1; @@ -2951,7 +2612,7 @@ PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) #define I ((x86_status_word & (SW_Z_I_NAN_MASK)) == (SW_I)) #define NotANumber ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN) - switch (condition & 0x1f) { + switch (condition) { // Common Tests, no BSUN case 0x01: CONDRET("Equal",Z); @@ -3096,11 +2757,11 @@ PUBLIC void REGPARAM2 FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) } } -PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) +PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) { int cc; - D(bug("ftrapcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + D(bug("ftrapcc_opp %X at %08lx\r\n", (uae_u32)opcode, m68k_getpc ())); #if I3_ON_FTRAPCC #error "FIXME: _asm int 3" @@ -3108,7 +2769,7 @@ PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 e #endif // This must be broken. - cc = fpp_cond(opcode, extra & 0x3f); + cc = fpp_cond(opcode, opcode & 0x3f); if (cc < 0) { m68k_setpc (oldpc); @@ -4985,249 +4646,6 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 } -/* -------------------------- 040 ALU -------------------------- */ -PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSMOVE %s\r\n",etos(src))); - do_fsmove( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDMOVE %s\r\n",etos(src))); - do_fdmove( FPU registers[reg], src ); - build_ex_status(); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSSQRT %s\r\n",etos(src))); - do_fssqrt( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDSQRT %s\r\n",etos(src))); - do_fdsqrt( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSABS %s\r\n",etos(src))); - do_fsabs( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDABS %s\r\n",etos(src))); - do_fdabs( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSNEG %s\r\n",etos(src))); - do_fsneg( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDNEG %s\r\n",etos(src))); - do_fdneg( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSDIV %s\r\n",etos(src))); - do_fsdiv( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDDIV %s\r\n",etos(src))); - do_fddiv( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSADD %s\r\n",etos(src))); - do_fsadd( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDADD %s\r\n",etos(src))); - do_fdadd( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSSUB %s\r\n",etos(src))); - do_fssub( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FDSUB %s\r\n",etos(src))); - do_fdsub( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSMUL %s\r\n",etos(src))); - do_fsmul( FPU registers[reg], src ); - dump_registers( "END "); -} - -PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ) -{ - int reg = (extra >> 7) & 7; - fpu_register src; - if (get_fp_value (opcode, extra, src) == 0) { - m68k_setpc (m68k_getpc () - 4); - op_illg (opcode); - dump_registers( "END "); - return; - } - D(bug("FSMUL %s\r\n",etos(src))); - do_fsmul( FPU registers[reg], src ); - dump_registers( "END "); -} - /* ---------------------------- ALU ---------------------------- */ PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ) @@ -6326,61 +5744,6 @@ PRIVATE void FFPU build_fpp_opp_lookup_table () } break; } - - if (FPU is_integral) { - switch (extra & 0x7f) { - case 0x40: - fpufunctbl[mask] = & FFPU fpuop_do_fsmove; - break; - case 0x44: - fpufunctbl[mask] = & FFPU fpuop_do_fdmove; - break; - case 0x41: - fpufunctbl[mask] = & FFPU fpuop_do_fssqrt; - break; - case 0x45: - fpufunctbl[mask] = & FFPU fpuop_do_fdsqrt; - break; - case 0x58: - fpufunctbl[mask] = & FFPU fpuop_do_fsabs; - break; - case 0x5c: - fpufunctbl[mask] = & FFPU fpuop_do_fdabs; - break; - case 0x5a: - fpufunctbl[mask] = & FFPU fpuop_do_fsneg; - break; - case 0x5e: - fpufunctbl[mask] = & FFPU fpuop_do_fdneg; - break; - case 0x60: - fpufunctbl[mask] = & FFPU fpuop_do_fsdiv; - break; - case 0x64: - fpufunctbl[mask] = & FFPU fpuop_do_fddiv; - break; - case 0x62: - fpufunctbl[mask] = & FFPU fpuop_do_fsadd; - break; - case 0x66: - fpufunctbl[mask] = & FFPU fpuop_do_fdadd; - break; - case 0x68: - fpufunctbl[mask] = & FFPU fpuop_do_fssub; - break; - case 0x6c: - fpufunctbl[mask] = & FFPU fpuop_do_fdsub; - break; - case 0x63: - fpufunctbl[mask] = & FFPU fpuop_do_fsmul; - break; - case 0x67: - fpufunctbl[mask] = & FFPU fpuop_do_fdmul; - break; - default: - break; - } - } switch (extra & 0x7f) { case 0x00: @@ -6670,26 +6033,6 @@ PRIVATE void FFPU do_fld1 ( fpu_register & dest ) } -void fpu_set_fpsr(uae_u32 new_fpsr) -{ - set_fpsr(new_fpsr); -} - -uae_u32 fpu_get_fpsr(void) -{ - return get_fpsr(); -} - -void fpu_set_fpcr(uae_u32 new_fpcr) -{ - set_fpcr(new_fpcr); -} - -uae_u32 fpu_get_fpcr(void) -{ - return get_fpcr(); -} - /* ---------------------------- MAIN INIT ---------------------------- */ #ifdef HAVE_SIGACTION @@ -6741,10 +6084,6 @@ PUBLIC void FFPU fpu_init( bool integral_68040 ) build_fpp_opp_lookup_table(); -/* _asm { - FNINIT - FLDCW x86_control_word - } */ __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); do_fldpi( const_pi ); @@ -6772,10 +6111,6 @@ PUBLIC void FFPU fpu_init( bool integral_68040 ) set_constant( const_1e4096, "1.0e4096", 1.0e256, 10000 ); // Just in case. -/* _asm { - FNINIT - FLDCW x86_control_word - } */ __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); } diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h index 52a2f310d..96f1d9598 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h @@ -1,33 +1,28 @@ /* - * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core + * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_X86_H @@ -99,17 +94,17 @@ PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void); PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name); // Get special floating-point value class -PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f); -PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f); -PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f); -PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); // Make a special floating-point value -PRIVATE inline void FFPU MAKE_NAN (fpu_register & f); -PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f); -PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f); -PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); -PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); // Conversion from extended floating-point values PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) REGPARAM; @@ -347,24 +342,6 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ); PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ); PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ); -// 040 -PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ); -PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ); - // Get & Put floating-point values PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) REGPARAM; PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) REGPARAM; @@ -374,9 +351,9 @@ PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) REGPARAM; PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) REGPARAM; // Misc functions -PRIVATE void inline FFPU set_host_fpu_control_word (); -PRIVATE void inline FFPU SET_BSUN_ON_NAN (); -PRIVATE void inline FFPU build_ex_status (); +PRIVATE void __inline__ FFPU set_host_fpu_control_word (); +PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN (); +PRIVATE void __inline__ FFPU build_ex_status (); PRIVATE void FFPU do_null_frestore (); PRIVATE void FFPU build_fpp_opp_lookup_table (); PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ); diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h index 6e5a37667..ecdecfbc9 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h @@ -1,35 +1,3 @@ -/* - * fpu/fpu_x86_asm.h - Extra Definitions for the X86 assembly FPU core - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - #define DEFINE_X86_MACRO(name, value) \ asm(".local " #name "\n\t" #name " = " #value) diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu/fpu/impl.h index af7946a3b..c79d1f3f5 100644 --- a/BasiliskII/src/uae_cpu/fpu/impl.h +++ b/BasiliskII/src/uae_cpu/fpu/impl.h @@ -1,38 +1,28 @@ /* * fpu/impl.h - extra functions and inline implementations * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * 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. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_IMPL_H @@ -113,8 +103,7 @@ static inline uae_u32 FFPU get_fpcr(void) { uae_u32 rounding_precision = get_rounding_precision(); uae_u32 rounding_mode = get_rounding_mode(); - uae_u32 exception_enable = FPU fpcr.exception_enable; - return (rounding_precision | rounding_mode | exception_enable); + return (rounding_precision | rounding_mode); } /* Set the floating-point control register from an m68k format */ @@ -123,7 +112,6 @@ static inline void FFPU set_fpcr(uae_u32 new_fpcr) set_rounding_precision ( new_fpcr & FPCR_ROUNDING_PRECISION); set_rounding_mode ( new_fpcr & FPCR_ROUNDING_MODE ); set_host_control_word(); - FPU fpcr.exception_enable = new_fpcr & FPCR_EXCEPTION_ENABLE; } /* -------------------------------------------------------------------------- */ diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp index 46d43c95b..eabb376e5 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp @@ -1,33 +1,28 @@ /* * fpu/mathlib.cpp - Floating-point math support library * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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: this file shall be included only from fpu/fpu_*.cpp */ diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h index c9a1951c8..2363af56d 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.h +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -1,33 +1,28 @@ /* - * fpu/mathlib.h - Floating-point math support library + * fpu/mathlib.h - Floating-point math support library * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_MATHLIB_H @@ -56,16 +51,20 @@ // NOTE: this is irrelevant on Win32 platforms since the MS libraries // don't support extended-precision floating-point computations -#ifdef WIN32 +#if defined(WIN32) && USE_LONG_DOUBLE #undef FPU_USE_ISO_C99 #endif // Use faster implementation of math functions, but this could cause // some incorrect results (?) -// TODO: actually implement the slower but safer versions +#ifdef _MSC_VER +// MSVC uses intrinsics for all of the math functions, so it should still be fast +#define FPU_FAST_MATH 0 +#else #define FPU_FAST_MATH 1 +#endif -#if defined(FPU_USE_ISO_C99) +#if FPU_USE_ISO_C99 // NOTE: no prior shall be included at this point #define __USE_ISOC99 1 // for glibc 2.2.X and newer #define __USE_ISOC9X 1 // for glibc 2.1.X @@ -148,7 +147,7 @@ union fpu_double_shape { unsigned int mantissa0:20; unsigned int mantissa1:32; #else -# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +# if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int mantissa0:20; unsigned int exponent:11; unsigned int negative:1; @@ -173,7 +172,7 @@ union fpu_double_shape { unsigned int mantissa0:19; unsigned int mantissa1:32; #else -# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +# if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int mantissa0:19; unsigned int quiet_nan:1; unsigned int exponent:11; @@ -192,7 +191,7 @@ union fpu_double_shape { /* This format is used to extract the sign_exponent and mantissa parts only */ struct { -#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +#if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int msw:32; unsigned int lsw:32; #else @@ -216,7 +215,7 @@ union fpu_extended_shape { unsigned int mantissa0:32; unsigned int mantissa1:32; #else -# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +# if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int exponent:15; unsigned int negative:1; unsigned int empty:16; @@ -243,7 +242,7 @@ union fpu_extended_shape { unsigned int mantissa0:30; unsigned int mantissa1:32; #else -# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +# if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int exponent:15; unsigned int negative:1; unsigned int empty:16; @@ -265,7 +264,7 @@ union fpu_extended_shape { /* This format is used to extract the sign_exponent and mantissa parts only */ struct { -#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +#if HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int sign_exponent:16; unsigned int empty:16; unsigned int msw:32; @@ -311,7 +310,7 @@ union fpu_extended_shape { unsigned int exponent:15; unsigned int quiet_nan:1; unsigned int mantissa0:15; - unsigned int mantissa1:32; + unsigned int mantissa1:30; unsigned int mantissa2:32; unsigned int mantissa3:32; #else @@ -326,7 +325,7 @@ union fpu_extended_shape { } ieee_nan; /* This format is used to extract the sign_exponent and mantissa parts only */ -#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN +#if HOST_FLOAT_WORDS_BIG_ENDIAN struct { uae_u64 msw; uae_u64 lsw; @@ -352,9 +351,9 @@ union fpu_extended_shape { }; #endif -// Declare a shape of the requested FP type -#define fp_declare_init_shape(psvar, ftype) \ - fpu_ ## ftype ## _shape psvar +// Declare and initialize a pointer to a shape of the requested FP type +#define fp_declare_init_shape(psvar, rfvar, ftype) \ + fpu_ ## ftype ## _shape * psvar = (fpu_ ## ftype ## _shape *)( &rfvar ) /* -------------------------------------------------------------------------- */ /* --- Extra Math Functions --- */ @@ -371,51 +370,47 @@ union fpu_extended_shape { PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) { #ifdef BRANCHES_ARE_EXPENSIVE -#if !defined(USE_LONG_DOUBLE) - fp_declare_init_shape(sxp, double); - sxp.value = r; - uae_s32 hx = sxp.parts.msw; - uae_s32 lx = sxp.parts.lsw; +#ifndef USE_LONG_DOUBLE + fp_declare_init_shape(sxp, r, double); + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; hx &= 0x7fffffff; hx |= (uae_u32)(lx | (-lx)) >> 31; hx = 0x7ff00000 - hx; - return (int)(((uae_u32)hx) >> 31); -#elif defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - uae_s64 hx = sxp.parts64.msw; - uae_s64 lx = sxp.parts64.lsw; + return (((uae_u32)hx) >> 31) != 0; +#elif USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + uae_s64 hx = sxp->parts64.msw; + uae_s64 lx = sxp->parts64.lsw; hx &= 0x7fffffffffffffffLL; hx |= (uae_u64)(lx | (-lx)) >> 63; hx = 0x7fff000000000000LL - hx; - return (int)((uae_u64)hx >> 63); + return ((uae_u64)hx >> 63) != 0; #else - fp_declare_init_shape(sxp, extended); - sxp.value = r; - uae_s32 se = sxp.parts.sign_exponent; - uae_s32 hx = sxp.parts.msw; - uae_s32 lx = sxp.parts.lsw; + fp_declare_init_shape(sxp, r, extended); + uae_s32 se = sxp->parts.sign_exponent; + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; se = (se & 0x7fff) << 1; lx |= hx & 0x7fffffff; se |= (uae_u32)(lx | (-lx)) >> 31; se = 0xfffe - se; - return (int)(((uae_u32)(se)) >> 31); + // TODO: check whether rshift count is 16 or 31 + return (((uae_u32)(se)) >> 16) != 0; #endif #else -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - return (sxp.ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) #else - fp_declare_init_shape(sxp, double); - sxp.value = r; - return (sxp.ieee_nan.exponent == FP_DOUBLE_EXP_MAX) + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) #endif - && (sxp.ieee_nan.mantissa0 != 0) - && (sxp.ieee_nan.mantissa1 != 0) + && (sxp->ieee_nan.mantissa0 != 0) + && (sxp->ieee_nan.mantissa1 != 0) #ifdef USE_QUAD_DOUBLE - && (sxp.ieee_nan.mantissa2 != 0) - && (sxp.ieee_nan.mantissa3 != 0) + && (sxp->ieee_nan.mantissa2 != 0) + && (sxp->ieee_nan.mantissa3 != 0) #endif ; #endif @@ -431,55 +426,50 @@ PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) { #ifdef BRANCHES_ARE_EXPENSIVE -#if !defined(USE_LONG_DOUBLE) - fp_declare_init_shape(sxp, double); - sxp.value = r; - uae_s32 hx = sxp.parts.msw; - uae_s32 lx = sxp.parts.lsw; +#ifndef USE_LONG_DOUBLE + fp_declare_init_shape(sxp, r, double); + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; lx |= (hx & 0x7fffffff) ^ 0x7ff00000; lx |= -lx; - return ~(lx >> 31) & (hx >> 30); -#elif defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - uae_s64 hx = sxp.parts64.msw; - uae_s64 lx = sxp.parts64.lsw; + return (~(lx >> 31) & (hx >> 30)) != 0; +#elif USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + uae_s64 hx = sxp->parts64.msw; + uae_s64 lx = sxp->parts64.lsw; lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; lx |= -lx; - return ~(lx >> 63) & (hx >> 62); + return (~(lx >> 63) & (hx >> 62)) != 0; #else - fp_declare_init_shape(sxp, extended); - sxp.value = r; - uae_s32 se = sxp.parts.sign_exponent; - uae_s32 hx = sxp.parts.msw; - uae_s32 lx = sxp.parts.lsw; + fp_declare_init_shape(sxp, r, extended); + uae_s32 se = sxp->parts.sign_exponent; + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; /* This additional ^ 0x80000000 is necessary because in Intel's internal representation of the implicit one is explicit. NOTE: anyway, this is equivalent to & 0x7fffffff in that case. */ -#ifdef CPU_i386 +#ifdef __i386__ lx |= (hx ^ 0x80000000) | ((se & 0x7fff) ^ 0x7fff); #else lx |= (hx & 0x7fffffff) | ((se & 0x7fff) ^ 0x7fff); #endif lx |= -lx; se &= 0x8000; - return ~(lx >> 31) & (1 - (se >> 14)); + return (~(lx >> 31) & (1 - (se >> 14))) != 0; #endif #else -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - return (sxp.ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) #else - fp_declare_init_shape(sxp, double); - sxp.value = r; - return (sxp.ieee_nan.exponent == FP_DOUBLE_EXP_MAX) + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) #endif - && (sxp.ieee_nan.mantissa0 == 0) - && (sxp.ieee_nan.mantissa1 == 0) + && (sxp->ieee_nan.mantissa0 == 0) + && (sxp->ieee_nan.mantissa1 == 0) #ifdef USE_QUAD_DOUBLE - && (sxp.ieee_nan.mantissa2 == 0) - && (sxp.ieee_nan.mantissa3 == 0) + && (sxp->ieee_nan.mantissa2 == 0) + && (sxp->ieee_nan.mantissa3 == 0) #endif ; #endif @@ -490,13 +480,12 @@ PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); #else - fp_declare_init_shape(sxp, double); + fp_declare_init_shape(sxp, r, double); #endif - sxp.value = r; - return sxp.ieee.negative; + return sxp->ieee.negative; } #undef iszero @@ -505,18 +494,17 @@ PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) PRIVATE inline bool FFPU fp_do_iszero(fpu_register const & r) { // TODO: BRANCHES_ARE_EXPENSIVE -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); #else - fp_declare_init_shape(sxp, double); + fp_declare_init_shape(sxp, r, double); #endif - sxp.value = r; - return (sxp.ieee.exponent == 0) - && (sxp.ieee.mantissa0 == 0) - && (sxp.ieee.mantissa1 == 0) + return (sxp->ieee.exponent == 0) + && (sxp->ieee.mantissa0 == 0) + && (sxp->ieee.mantissa1 == 0) #ifdef USE_QUAD_DOUBLE - && (sxp.ieee.mantissa2 == 0) - && (sxp.ieee.mantissa3 == 0) + && (sxp->ieee.mantissa2 == 0) + && (sxp->ieee.mantissa3 == 0) #endif ; } @@ -541,21 +529,21 @@ PRIVATE inline void FFPU get_source_flags(fpu_register const & r) PRIVATE inline void FFPU make_nan(fpu_register & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.ieee.exponent = FP_EXTENDED_EXP_MAX; - sxp.ieee.mantissa0 = 0xffffffff; + // FIXME: is that correct ? +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee.exponent = FP_EXTENDED_EXP_MAX; + sxp->ieee.mantissa0 = 0xffffffff; #else - fp_declare_init_shape(sxp, double); - sxp.ieee.exponent = FP_DOUBLE_EXP_MAX; - sxp.ieee.mantissa0 = 0xfffff; + fp_declare_init_shape(sxp, r, double); + sxp->ieee.exponent = FP_DOUBLE_EXP_MAX; + sxp->ieee.mantissa0 = 0xfffff; #endif - sxp.ieee.mantissa1 = 0xffffffff; + sxp->ieee.mantissa1 = 0xffffffff; #ifdef USE_QUAD_DOUBLE - sxp.ieee.mantissa2 = 0xffffffff; - sxp.ieee.mantissa3 = 0xffffffff; + sxp->ieee.mantissa2 = 0xffffffff; + sxp->ieee.mantissa3 = 0xffffffff; #endif - r = sxp.value; } PRIVATE inline void FFPU make_zero_positive(fpu_register & r) @@ -563,20 +551,19 @@ PRIVATE inline void FFPU make_zero_positive(fpu_register & r) #if 1 r = +0.0; #else -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); #else - fp_declare_init_shape(sxp, double); + fp_declare_init_shape(sxp, r, double); #endif - sxp.ieee.negative = 0; - sxp.ieee.exponent = 0; - sxp.ieee.mantissa0 = 0; - sxp.ieee.mantissa1 = 0; + sxp->ieee.negative = 0; + sxp->ieee.exponent = 0; + sxp->ieee.mantissa0 = 0; + sxp->ieee.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp.ieee.mantissa2 = 0; - sxp.ieee.mantissa3 = 0; + sxp->ieee.mantissa2 = 0; + sxp->ieee.mantissa3 = 0; #endif - r = sxp.value; #endif } @@ -585,110 +572,101 @@ PRIVATE inline void FFPU make_zero_negative(fpu_register & r) #if 1 r = -0.0; #else -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); #else - fp_declare_init_shape(sxp, double); + fp_declare_init_shape(sxp, r, double); #endif - sxp.ieee.negative = 1; - sxp.ieee.exponent = 0; - sxp.ieee.mantissa0 = 0; - sxp.ieee.mantissa1 = 0; + sxp->ieee.negative = 1; + sxp->ieee.exponent = 0; + sxp->ieee.mantissa0 = 0; + sxp->ieee.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp.ieee.mantissa2 = 0; - sxp.ieee.mantissa3 = 0; + sxp->ieee.mantissa2 = 0; + sxp->ieee.mantissa3 = 0; #endif - r = sxp.value; #endif } PRIVATE inline void FFPU make_inf_positive(fpu_register & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; #else - fp_declare_init_shape(sxp, double); - sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX; + fp_declare_init_shape(sxp, r, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; #endif - sxp.ieee_nan.negative = 0; - sxp.ieee_nan.mantissa0 = 0; - sxp.ieee_nan.mantissa1 = 0; + sxp->ieee_nan.negative = 0; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp.ieee_nan.mantissa2 = 0; - sxp.ieee_nan.mantissa3 = 0; + sxp->ieee_nan.mantissa2 = 0; + sxp->ieee_nan.mantissa3 = 0; #endif - r = sxp.value; } PRIVATE inline void FFPU make_inf_negative(fpu_register & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; #else - fp_declare_init_shape(sxp, double); - sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX; + fp_declare_init_shape(sxp, r, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; #endif - sxp.ieee_nan.negative = 1; - sxp.ieee_nan.mantissa0 = 0; - sxp.ieee_nan.mantissa1 = 0; + sxp->ieee_nan.negative = 1; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp.ieee_nan.mantissa2 = 0; - sxp.ieee_nan.mantissa3 = 0; + sxp->ieee_nan.mantissa2 = 0; + sxp->ieee_nan.mantissa3 = 0; #endif - r = sxp.value; } PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - return ((int) sxp.ieee.exponent - FP_EXTENDED_EXP_BIAS); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee.exponent - FP_EXTENDED_EXP_BIAS); #else - fp_declare_init_shape(sxp, double); - sxp.value = r; - return ((int) sxp.ieee.exponent - FP_DOUBLE_EXP_BIAS); + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee.exponent - FP_DOUBLE_EXP_BIAS); #endif } // Normalize to range 1..2 PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = r; - sxp.ieee.exponent = FP_EXTENDED_EXP_BIAS; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee.exponent = FP_EXTENDED_EXP_BIAS; #else - fp_declare_init_shape(sxp, double); - sxp.value = r; - sxp.ieee.exponent = FP_DOUBLE_EXP_BIAS; + fp_declare_init_shape(sxp, r, double); + sxp->ieee.exponent = FP_DOUBLE_EXP_BIAS; #endif - r = sxp.value; } // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sap, extended); - fp_declare_init_shape(sbp, extended); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sap, ra, extended); + fp_declare_init_shape(sbp, rb, extended); #else - fp_declare_init_shape(sap, double); - fp_declare_init_shape(sbp, double); + fp_declare_init_shape(sap, ra, double); + fp_declare_init_shape(sbp, rb, double); #endif - sap.value = ra; - sbp.value = rb; - return ((sap.ieee.negative ^ sbp.ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); + return ((sap->ieee.negative ^ sbp->ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); } /* -------------------------------------------------------------------------- */ /* --- Math functions --- */ /* -------------------------------------------------------------------------- */ -#if defined(FPU_USE_ISO_C99) && (defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE)) +#if FPU_USE_ISO_C99 +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE # ifdef HAVE_LOGL # define fp_log logl # endif @@ -812,14 +790,13 @@ PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_regis # define fp_ceil ceil #endif -#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +#elif defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) // Assembly optimized support functions. Taken from glibc 2.2.2 #undef fp_log #define fp_log fp_do_log -#ifndef FPU_FAST_MATH -// FIXME: unimplemented +#if !FPU_FAST_MATH PRIVATE fpu_extended fp_do_log(fpu_extended x); #else PRIVATE inline fpu_extended fp_do_log(fpu_extended x) @@ -833,7 +810,7 @@ PRIVATE inline fpu_extended fp_do_log(fpu_extended x) #undef fp_log10 #define fp_log10 fp_do_log10 -#ifndef FPU_FAST_MATH +#if !FPU_FAST_MATH // FIXME: unimplemented PRIVATE fpu_extended fp_do_log10(fpu_extended x); #else @@ -848,20 +825,13 @@ PRIVATE inline fpu_extended fp_do_log10(fpu_extended x) #undef fp_exp #define fp_exp fp_do_exp -#ifndef FPU_FAST_MATH +#if !FPU_FAST_MATH // FIXME: unimplemented PRIVATE fpu_extended fp_do_exp(fpu_extended x); #else PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) { fpu_extended value, exponent; - if (isinf(x)) - { - if(isneg(x)) - return 0.; - else - return x; - } __asm__ __volatile__("fldl2e # e^x = 2^(x * log2(e))\n\t" "fmul %%st(1) # x * log2(e)\n\t" "fst %%st(1)\n\t" @@ -901,7 +871,6 @@ PRIVATE inline fpu_extended fp_do_sqrt(fpu_extended x) return value; } -#ifndef ACCURATE_SIN_COS_TAN #undef fp_sin #define fp_sin fp_do_sin @@ -927,11 +896,10 @@ PRIVATE inline fpu_extended fp_do_cos(fpu_extended x) PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) { - fpu_extended value, value2; - __asm__ __volatile__("fptan" : "=t" (value2), "=u" (value) : "0" (x)); + fpu_extended value; + __asm__ __volatile__("fptan" : "=t" (value) : "0" (x)); return value; } -#endif /* ACCURATE_SIN_COS_TAN */ #undef fp_expm1 #define fp_expm1 fp_do_expm1 @@ -939,14 +907,7 @@ PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) // Returns: exp(X) - 1.0 PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) { - fpu_extended value, exponent, temp, temp2; - if (isinf(x)) - { - if(isneg(x)) - return -1.; - else - return x; - } + fpu_extended value, exponent, temp; __asm__ __volatile__("fldl2e # e^x - 1 = 2^(x * log2(e)) - 1\n\t" "fmul %%st(1) # x * log2(e)\n\t" "fst %%st(1)\n\t" @@ -956,9 +917,7 @@ PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" "fscale # 2^(x * log2(e)) - 2^(int(x * log2(e)))\n\t" : "=t" (value), "=u" (exponent) : "0" (x)); - __asm__ __volatile__("fld1 \n\t" - "fscale \n\t" - : "=t" (temp), "=u" (temp2) : "0" (exponent)); + __asm__ __volatile__("fscale" : "=t" (temp) : "0" (1.0), "u" (exponent)); temp -= 1.0; return temp + value ? temp + value : x; } @@ -968,33 +927,29 @@ PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) PRIVATE inline fpu_extended fp_do_sgn1(fpu_extended x) { -#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) - fp_declare_init_shape(sxp, extended); - sxp.value = x; - sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX>>1; - sxp.ieee_nan.one = 1; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, x, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; + sxp->ieee_nan.one = 1; #else - fp_declare_init_shape(sxp, double); - sxp.value = x; - sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX>>1; -#endif - sxp.ieee_nan.quiet_nan = 0; - sxp.ieee_nan.mantissa0 = 0; - sxp.ieee_nan.mantissa1 = 0; - x = sxp.value; + fp_declare_init_shape(sxp, x, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp->ieee_nan.quiet_nan = 0; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; return x; } #undef fp_sinh #define fp_sinh fp_do_sinh -#ifndef FPU_FAST_MATH +#if !FPU_FAST_MATH // FIXME: unimplemented PRIVATE fpu_extended fp_do_sinh(fpu_extended x); #else PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) { - if (isinf(x)) return x; fpu_extended exm1 = fp_expm1(fp_fabs(x)); return 0.5 * (exm1 / (exm1 + 1.0) + exm1) * fp_sgn1(x); } @@ -1003,7 +958,7 @@ PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) #undef fp_cosh #define fp_cosh fp_do_cosh -#ifndef FPU_FAST_MATH +#if !FPU_FAST_MATH // FIXME: unimplemented PRIVATE fpu_extended fp_do_cosh(fpu_extended x); #else @@ -1017,7 +972,7 @@ PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) #undef fp_tanh #define fp_tanh fp_do_tanh -#ifndef FPU_FAST_MATH +#if !FPU_FAST_MATH // FIXME: unimplemented PRIVATE fpu_extended fp_do_tanh(fpu_extended x); #else @@ -1096,46 +1051,48 @@ PRIVATE inline fpu_extended fp_do_atanh(fpu_extended x) return -0.5 * fp_log1p(-(y + y) / (1.0 + y)) * fp_sgn1(x); } +#undef fp_floor +#define fp_floor fp_do_floor -/* - * LLVM 2.9 crashes on first definition, - * clang with LLVM 3.x crashes on 2nd definition... sigh - */ -#if defined(__clang__) || !defined(__llvm__) -#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ -PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended __x) \ -{ \ - register long double __value; \ - register int __ignore; \ - volatile unsigned short __cw; \ - volatile unsigned short __cwtmp; \ - __asm __volatile ("fnstcw %3\n\t" \ - "movzwl %3, %1\n\t" \ - "andl $0xf3ff, %1\n\t" \ - "orl %5, %1\n\t" \ - "movw %w1, %2\n\t" \ - "fldcw %2\n\t" \ - "frndint\n\t" \ - "fldcw %3" \ - : "=t" (__value), "=&q" (__ignore), "=m" (__cwtmp), \ - "=m" (__cw) \ - : "0" (__x), "i"(rounding_mode)); \ - return __value; \ +PRIVATE inline fpu_extended fp_do_floor(fpu_extended x) +{ + volatile unsigned int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0400; // rounding down + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); + fpu_extended value; + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); + __asm__ __volatile__("fldcw %0" : : "m" (cw)); + return value; } -#else + +#undef fp_ceil +#define fp_ceil fp_do_ceil + +PRIVATE inline fpu_extended fp_do_ceil(fpu_extended x) +{ + volatile unsigned int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0800; // rounding up + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); + fpu_extended value; + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); + __asm__ __volatile__("fldcw %0" : : "m" (cw)); + return value; +} + #define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended x) \ { \ - volatile unsigned short cw; \ + volatile unsigned int cw; \ __asm__ __volatile__("fnstcw %0" : "=m" (cw)); \ - volatile unsigned short cw_temp = (cw & 0xf3ff) | (rounding_mode); \ + volatile unsigned int cw_temp = (cw & 0xf3ff) | (rounding_mode); \ __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); \ fpu_extended value; \ __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); \ __asm__ __volatile__("fldcw %0" : : "m" (cw)); \ return value; \ } -#endif #undef fp_round_to_minus_infinity #define fp_round_to_minus_infinity fp_do_round_to_minus_infinity @@ -1157,13 +1114,6 @@ DEFINE_ROUND_FUNC(zero, 0xc00) DEFINE_ROUND_FUNC(nearest, 0x000) -#undef fp_ceil -#define fp_ceil fp_do_round_to_plus_infinity - -#undef fp_floor -#define fp_floor fp_do_round_to_minus_infinity - - #endif /* USE_X87_ASSEMBLY */ #ifndef fp_round_to_minus_infinity diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu/fpu/rounding.cpp index 9942d4e89..1f8b36183 100644 --- a/BasiliskII/src/uae_cpu/fpu/rounding.cpp +++ b/BasiliskII/src/uae_cpu/fpu/rounding.cpp @@ -1,33 +1,28 @@ /* - * fpu/rounding.cpp - system-dependant FPU rounding mode and precision + * fpu/rounding.cpp - system-dependant FPU rounding mode and precision * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 */ #undef PRIVATE diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu/fpu/rounding.h index 60c4baff1..67db55190 100644 --- a/BasiliskII/src/uae_cpu/fpu/rounding.h +++ b/BasiliskII/src/uae_cpu/fpu/rounding.h @@ -1,33 +1,28 @@ /* - * fpu/rounding.h - system-dependant FPU rounding mode and precision + * fpu/rounding.h - system-dependant FPU rounding mode and precision * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_ROUNDING_H diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h index afd3ab28a..778567a98 100644 --- a/BasiliskII/src/uae_cpu/fpu/types.h +++ b/BasiliskII/src/uae_cpu/fpu/types.h @@ -1,33 +1,28 @@ /* - * fpu/types.h - basic types for fpu registers + * types.h - basic types for fpu registers * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Basilisk II (C) 1997-2008 Christian Bauer * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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. * - * MC68881/68040 fpu emulation + * 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. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * 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 FPU_TYPES_H @@ -111,9 +106,9 @@ typedef uae_f32 fpu_single; #elif defined(FPU_IEEE) -#if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT -#error "No IEEE float format, you lose." -#endif +// #if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT +// #error "No IEEE float format, you lose." +// #endif /* 4-byte floats */ #if SIZEOF_FLOAT == 4 @@ -138,7 +133,7 @@ typedef long double uae_f64; typedef long double uae_f96; typedef uae_f96 fpu_register; #define USE_LONG_DOUBLE 1 -#elif SIZEOF_LONG_DOUBLE == 16 && (defined(CPU_i386) || defined(CPU_x86_64) || defined(CPU_ia64)) +#elif SIZEOF_LONG_DOUBLE == 16 && (defined(__i386__) || defined(__x86_64__)) /* Long doubles on x86-64 are really held in old x87 FPU stack. */ typedef long double uae_f128; typedef uae_f128 fpu_register; @@ -159,23 +154,6 @@ typedef fpu_register fpu_extended; typedef uae_f64 fpu_double; typedef uae_f32 fpu_single; -#elif defined(FPU_MPFR) - -#include - -struct fpu_register { - mpfr_t f; - uae_u64 nan_bits; - int nan_sign; - operator long double (); - fpu_register &operator=(long double); -}; - #endif -union fpu_register_parts { - fpu_register val; - uae_u32 parts[sizeof(fpu_register) / 4]; -}; - #endif /* FPU_TYPES_H */ diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 8db740013..1653adab9 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -1,27 +1,3 @@ -/* - * gencpu.c - m68k emulation generator - * - * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ /* * UAE - The Un*x Amiga Emulator * @@ -38,26 +14,42 @@ * take care of this. * * Copyright 1995, 1996 Bernd Schmidt + * + * 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 CC_FOR_BUILD 1 - -#include "sysdeps.h" -#include "readcpu.h" - #include #include #include #include -#include -#undef abort + +#include "sysdeps.h" +#include "readcpu.h" + +#if defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) +#define SPARC_ASSEMBLY 0 +#endif #define BOOL_TYPE "int" -#define VERIFY_MMU_GENAMODE 0 + +/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ +#define xBCD_KEEPS_NV_FLAGS 4 static FILE *headerfile; static FILE *stblfile; -static FILE *functblfile; static int using_prefetch; static int using_exception_3; @@ -73,23 +65,6 @@ static int *opcode_next_clev; static int *opcode_last_postfix; static unsigned long *counts; -#define GENA_GETV_NO_FETCH 0 -#define GENA_GETV_FETCH 1 -#define GENA_GETV_FETCH_ALIGN 2 -#define GENA_MOVEM_DO_INC 0 -#define GENA_MOVEM_NO_INC 1 -#define GENA_MOVEM_MOVE16 2 - -#define XLATE_LOG 0 -#define XLATE_PHYS 1 -#define XLATE_SFC 2 -#define XLATE_DFC 3 -static char * mem_prefix[4] = { "", "phys_", "sfc_", "dfc_" }; - -/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ -#define xBCD_KEEPS_N_FLAG 4 -#define xBCD_KEEPS_V_FLAG 3 - static void read_counts (void) { FILE *file; @@ -100,8 +75,7 @@ static void read_counts (void) file = fopen ("frequent.68k", "r"); if (file) { - int c = fscanf (file, "Total: %lu\n", &total); - assert(c == 1); + fscanf (file, "Total: %lu\n", &total); while (fscanf (file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { opcode_next_clev[nr] = 4; opcode_last_postfix[nr] = -1; @@ -132,6 +106,7 @@ static int need_endlabel; static int n_braces = 0; static int m68k_pc_offset = 0; +static int insn_n_cycles; static void start_brace (void) { @@ -184,9 +159,10 @@ static const char *gen_nextilong (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 4; + insn_n_cycles += 4; + if (using_prefetch) sprintf (buffer, "get_ilong_prefetch(%d)", r); else @@ -198,9 +174,10 @@ static const char *gen_nextiword (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 2; + insn_n_cycles += 2; + if (using_prefetch) sprintf (buffer, "get_iword_prefetch(%d)", r); else @@ -214,6 +191,8 @@ static const char *gen_nextibyte (void) int r = m68k_pc_offset; m68k_pc_offset += 2; + insn_n_cycles += 2; + if (using_prefetch) sprintf (buffer, "get_ibyte_prefetch(%d)", r); else @@ -235,22 +214,9 @@ static void fill_prefetch_2 (void) static void swap_opcode (void) { - printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); - printf ("\topcode = do_byteswap_16(opcode);\n"); - printf("#endif\n"); -} - -static void real_opcode (int *have) -{ - if (!*have) - { - printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); - printf ("\tuae_u32 real_opcode = do_byteswap_16(opcode);\n"); - printf("#else\n"); - printf ("\tuae_u32 real_opcode = opcode;\n"); - printf("#endif\n"); - *have = 1; - } + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + printf ("\topcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF);\n"); + printf ("#endif\n"); } static void sync_m68k_pc (void) @@ -272,49 +238,33 @@ static void sync_m68k_pc (void) m68k_pc_offset = 0; } -static void gen_set_fault_pc (void) -{ - sync_m68k_pc(); - printf ("regs.fault_pc = m68k_getpc ();\n"); - m68k_pc_offset = 0; -} - /* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, * the calling routine handles Apdi and Aipi modes. * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ - -/* fixup indicates if we want to fix up adress registers in pre decrement - * or post increment mode now (0) or later (1). A value of 2 will then be - * used to do the actual fix up. This allows to do all memory readings - * before any register is modified, and so to rerun operation without - * side effect in case a bus fault is generated by any memory access. - * XJ - 2006/11/13 */ -static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag, int fixup) +static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) { - if (fixup != 2) - { start_brace (); switch (mode) { case Dreg: if (movem) abort (); - if (getv == GENA_GETV_FETCH) + if (getv == 1) switch (size) { case sz_byte: - printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); +#if defined(AMIGA) && !defined(WARPUP) /* sam: I don't know why gcc.2.7.2.1 produces a code worse */ /* if it is not done like that: */ printf ("\tuae_s8 %s = ((uae_u8*)&m68k_dreg(regs, %s))[3];\n", name, reg); - printf("#else\n"); +#else printf ("\tuae_s8 %s = m68k_dreg(regs, %s);\n", name, reg); - printf("#endif\n"); +#endif break; case sz_word: - printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); +#if defined(AMIGA) && !defined(WARPUP) printf ("\tuae_s16 %s = ((uae_s16*)&m68k_dreg(regs, %s))[1];\n", name, reg); - printf("#else\n"); +#else printf ("\tuae_s16 %s = m68k_dreg(regs, %s);\n", name, reg); - printf("#endif\n"); +#endif break; case sz_long: printf ("\tuae_s32 %s = m68k_dreg(regs, %s);\n", name, reg); @@ -326,7 +276,7 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g case Areg: if (movem) abort (); - if (getv == GENA_GETV_FETCH) + if (getv == 1) switch (size) { case sz_word: printf ("\tuae_s16 %s = m68k_areg(regs, %s);\n", name, reg); @@ -353,16 +303,10 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g printf ("\tuaecptr %sa = m68k_areg(regs, %s) - areg_byteinc[%s];\n", name, reg, reg); break; case sz_word: - if (movem) - printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); - else - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 2;\n", name, reg); + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 2); break; case sz_long: - if (movem) - printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); - else - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 4;\n", name, reg); + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 4); break; default: abort (); @@ -407,7 +351,7 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g printf ("\tuaecptr %sa = %s;\n", name, gen_nextilong ()); break; case imm: - if (getv != GENA_GETV_FETCH) + if (getv != 1) abort (); switch (size) { case sz_byte: @@ -424,22 +368,22 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g } return; case imm0: - if (getv != GENA_GETV_FETCH) + if (getv != 1) abort (); printf ("\tuae_s8 %s = %s;\n", name, gen_nextibyte ()); return; case imm1: - if (getv != GENA_GETV_FETCH) + if (getv != 1) abort (); printf ("\tuae_s16 %s = %s;\n", name, gen_nextiword ()); return; case imm2: - if (getv != GENA_GETV_FETCH) + if (getv != 1) abort (); printf ("\tuae_s32 %s = %s;\n", name, gen_nextilong ()); return; case immi: - if (getv != GENA_GETV_FETCH) + if (getv != 1) abort (); printf ("\tuae_u32 %s = %s;\n", name, reg); return; @@ -450,7 +394,7 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g /* We get here for all non-reg non-immediate addressing modes to * actually fetch the value. */ - if (using_exception_3 && getv != GENA_GETV_NO_FETCH && size != sz_byte) { + if (using_exception_3 && getv != 0 && size != sz_byte) { printf ("\tif ((%sa & 1) != 0) {\n", name); printf ("\t\tlast_fault_for_exception_3 = %sa;\n", name); printf ("\t\tlast_op_for_exception_3 = opcode;\n"); @@ -462,29 +406,20 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g start_brace (); } - if (getv == GENA_GETV_FETCH) { + if (getv == 1) { switch (size) { - case sz_byte: break; - case sz_word: break; - case sz_long: break; + case sz_byte: insn_n_cycles += 2; break; + case sz_word: insn_n_cycles += 2; break; + case sz_long: insn_n_cycles += 4; break; default: abort (); } start_brace (); - printf("\n#ifdef FULLMMU\n"); - switch (size) { - case sz_byte: printf ("\tuae_s8 %s = %sget_byte(%sa);\n", name, mem_prefix[xlateflag], name); break; - case sz_word: printf ("\tuae_s16 %s = %sget_word(%sa);\n", name, mem_prefix[xlateflag], name); break; - case sz_long: printf ("\tuae_s32 %s = %sget_long(%sa);\n", name, mem_prefix[xlateflag], name); break; - default: abort (); - } - printf("#else\n"); switch (size) { - case sz_byte: printf ("\tuae_s8 %s = phys_get_byte(%sa);\n", name, name); break; - case sz_word: printf ("\tuae_s16 %s = phys_get_word(%sa);\n", name, name); break; - case sz_long: printf ("\tuae_s32 %s = phys_get_long(%sa);\n", name, name); break; + case sz_byte: printf ("\tuae_s8 %s = get_byte(%sa);\n", name, name); break; + case sz_word: printf ("\tuae_s16 %s = get_word(%sa);\n", name, name); break; + case sz_long: printf ("\tuae_s32 %s = get_long(%sa);\n", name, name); break; default: abort (); } - printf("#endif\n"); } /* We now might have to fix up the register for pre-dec or post-inc @@ -492,12 +427,6 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g if (!movem) switch (mode) { case Aipi: - if (fixup == 1) - { - printf ("\tfixup.flag = 1;\n"); - printf ("\tfixup.reg = %s;\n", reg); - printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); - } switch (size) { case sz_byte: printf ("\tm68k_areg(regs, %s) += areg_byteinc[%s];\n", reg, reg); @@ -513,39 +442,14 @@ static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int g } break; case Apdi: - if (fixup == 1) - { - printf ("\tfixup.flag = 1;\n"); - printf ("\tfixup.reg = %s;\n", reg); - printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); - } printf ("\tm68k_areg (regs, %s) = %sa;\n", reg, name); break; default: break; } - - } - else /* (fixup != 2) */ - { - if (!movem) - switch (mode) { - case Aipi: - case Apdi: - printf ("\tfixup.flag = 0;\n"); - break; - default: - break; - } - } -} - -static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag) -{ - genamode2 (mode, reg, size, name, getv, movem, xlateflag, 0); } -static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to, int xlateflag) +static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) { switch (mode) { case Dreg: @@ -585,32 +489,28 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char case absl: case PC16: case PC8r: - gen_set_fault_pc (); - printf("#ifdef FULLMMU\n"); + if (using_prefetch) + sync_m68k_pc (); switch (size) { case sz_byte: - printf ("\t%sput_byte(%sa,%s);\n", mem_prefix[xlateflag], to, from); - printf("#else\n"); + insn_n_cycles += 2; printf ("\tput_byte(%sa,%s);\n", to, from); break; case sz_word: + insn_n_cycles += 2; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); - printf ("\t%sput_word(%sa,%s);\n", mem_prefix[xlateflag], to, from); - printf("#else\n"); printf ("\tput_word(%sa,%s);\n", to, from); break; case sz_long: + insn_n_cycles += 4; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); - printf ("\t%sput_long(%sa,%s);\n", mem_prefix[xlateflag], to, from); - printf("#else\n"); printf ("\tput_long(%sa,%s);\n", to, from); break; default: abort (); } - printf("#endif\n"); break; case imm: case imm0: @@ -626,33 +526,23 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char static void genmovemel (uae_u16 opcode) { - char getcode1[100]; - char getcode2[100]; + char getcode[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; - + if (table68k[opcode].size == sz_long) { - strcpy (getcode1, ""); - strcpy (getcode2, "get_long(srca)"); + strcpy (getcode, "get_long(srca)"); } else { - strcpy (getcode1, "(uae_s32)(uae_s16)"); - strcpy (getcode2, "get_word(srca)"); + strcpy (getcode, "(uae_s32)(uae_s16)get_word(srca)"); } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); printf ("\tunsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); start_brace (); - printf("\n#ifdef FULLMMU\n"); - printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s%s; srca += %d; dmask = movem_next[dmask]; }\n", - getcode1, getcode2, size); - printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s%s; srca += %d; amask = movem_next[amask]; }\n", - getcode1, getcode2, size); - printf("#else\n"); - printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %sphys_%s; srca += %d; dmask = movem_next[dmask]; }\n", - getcode1, getcode2, size); - printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %sphys_%s; srca += %d; amask = movem_next[amask]; }\n", - getcode1, getcode2, size); - printf("#endif\n"); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s; srca += %d; amask = movem_next[amask]; }\n", + getcode, size); if (table68k[opcode].dmode == Aipi) printf ("\tm68k_areg(regs, dstreg) = srca;\n"); @@ -662,7 +552,6 @@ static void genmovemle (uae_u16 opcode) { char putcode[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; - if (table68k[opcode].size == sz_long) { strcpy (putcode, "put_long(srca,"); } else { @@ -670,38 +559,24 @@ static void genmovemle (uae_u16 opcode) } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", - GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); - sync_m68k_pc (); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + if (using_prefetch) + sync_m68k_pc (); start_brace (); if (table68k[opcode].dmode == Apdi) { printf ("\tuae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;\n"); - printf("#ifdef FULLMMU\n"); printf ("\twhile (amask) { srca -= %d; %s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", size, putcode); printf ("\twhile (dmask) { srca -= %d; %s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", size, putcode); - printf("#else\n"); - printf ("\twhile (amask) { srca -= %d; phys_%s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", - size, putcode); - printf ("\twhile (dmask) { srca -= %d; phys_%s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", - size, putcode); - printf("#endif\n"); printf ("\tm68k_areg(regs, dstreg) = srca;\n"); } else { printf ("\tuae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); - printf("#ifdef FULLMMU\n"); printf ("\twhile (dmask) { %s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", putcode, size); printf ("\twhile (amask) { %s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", putcode, size); - printf("#else\n"); - printf ("\twhile (dmask) { phys_%s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", - putcode, size); - printf ("\twhile (amask) { phys_%s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", - putcode, size); - printf("#endif\n"); } } @@ -774,10 +649,12 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * break; case flag_add: + start_brace (); printf ("uae_u32 %s = %s + %s;\n", value, dstr, sstr); break; case flag_sub: case flag_cmp: + start_brace (); printf ("uae_u32 %s = %s - %s;\n", value, dstr, sstr); break; } @@ -796,6 +673,7 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * case flag_cmp: case flag_av: case flag_sv: + start_brace (); printf ("\t" BOOL_TYPE " flgs = %s < 0;\n", sstr); printf ("\t" BOOL_TYPE " flgo = %s < 0;\n", dstr); printf ("\t" BOOL_TYPE " flgn = %s < 0;\n", vstr); @@ -863,13 +741,11 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch /* Temporarily deleted 68k/ARM flag optimizations. I'd prefer to have them in the appropriate m68k.h files and use just one copy of this code here. The API can be changed if necessary. */ - int done = 0; - - start_brace (); - printf("\n#ifdef OPTIMIZED_FLAGS\n"); +#ifdef OPTIMIZED_FLAGS switch (type) { case flag_add: case flag_sub: + start_brace (); printf ("\tuae_u32 %s;\n", value); break; default: @@ -891,9 +767,8 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch printf ("\tIOR_CZNV (oldcznv);\n"); } printf ("\t}\n"); - done = 1; - break; - + return; + case flag_logical: if (strcmp (value, "0") == 0) { printf ("\tSET_CZNV (FLAGVAL_Z);\n"); @@ -904,8 +779,7 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; } } - done = 1; - break; + return; case flag_add: switch (size) { @@ -913,8 +787,7 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; case sz_long: printf ("\toptflag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - done = 1; - break; + return; case flag_sub: switch (size) { @@ -922,8 +795,7 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; case sz_long: printf ("\toptflag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - done = 1; - break; + return; case flag_cmp: switch (size) { @@ -931,19 +803,13 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; case sz_long: printf ("\toptflag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; } - done = 1; - break; + return; default: break; } - if (done) - printf("#else\n"); - else - printf("#endif\n"); +#endif genflags_normal (type, size, value, src, dst); - if (done) - printf("#endif\n"); } static void force_range_for_rox (const char *var, wordsizes size) @@ -971,7 +837,7 @@ static const char *cmask (wordsizes size) case sz_byte: return "0x80"; case sz_word: return "0x8000"; case sz_long: return "0x80000000"; - default: abort (); return NULL; + default: abort (); } } @@ -983,10 +849,11 @@ static int source_is_imm1_8 (struct instr *i) static void gen_opcode (unsigned long int opcode) { struct instr *curi = table68k + opcode; + insn_n_cycles = 2; start_brace (); #if 0 - printf ("uae_u8 *m68k_pc = m68k_getpc();\n"); + printf ("uae_u8 *m68k_pc = regs.pc_p;\n"); #endif m68k_pc_offset = 2; switch (curi->plev) { @@ -1016,16 +883,16 @@ static void gen_opcode (unsigned long int opcode) case i_OR: case i_AND: case i_EOR: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); printf ("\tsrc %c= dst;\n", curi->mnemo == i_OR ? '|' : curi->mnemo == i_AND ? '&' : '^'); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); break; case i_ORSR: case i_EORSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); if (curi->size == sz_byte) { printf ("\tsrc &= 0xFF;\n"); } @@ -1034,7 +901,7 @@ static void gen_opcode (unsigned long int opcode) break; case i_ANDSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); if (curi->size == sz_byte) { printf ("\tsrc |= 0xFF00;\n"); } @@ -1042,33 +909,31 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SUB: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); genflags (flag_sub, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_SUBA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = dst - src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); break; case i_SUBX: - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = dst - src - (GET_XFLG ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_SBCD: - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); @@ -1079,50 +944,44 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ - if (cpu_level >= xBCD_KEEPS_N_FLAG) { - if (next_cpu_level < xBCD_KEEPS_N_FLAG) - next_cpu_level = xBCD_KEEPS_N_FLAG - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } else { - genflags (flag_zn, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); } - if (cpu_level >= xBCD_KEEPS_V_FLAG) { - if (next_cpu_level < xBCD_KEEPS_V_FLAG) - next_cpu_level = xBCD_KEEPS_V_FLAG - 1; - } else { - printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + else { + genflags (flag_zn, curi->size, "newv", "", ""); + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); } - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_ADD: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); genflags (flag_add, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_ADDA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = dst + src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); break; case i_ADDX: - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = dst + src + (GET_XFLG ? 1 : 0);\n"); genflags (flag_addx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_ABCD: - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); @@ -1134,85 +993,75 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (cflg) newv += 0x60;\n"); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ - if (cpu_level >= xBCD_KEEPS_N_FLAG) { - if (next_cpu_level < xBCD_KEEPS_N_FLAG) - next_cpu_level = xBCD_KEEPS_N_FLAG - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } else { - genflags (flag_zn, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); } - if (cpu_level >= xBCD_KEEPS_V_FLAG) { - if (next_cpu_level < xBCD_KEEPS_V_FLAG) - next_cpu_level = xBCD_KEEPS_V_FLAG - 1; - } else { - printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); + else { + genflags (flag_zn, curi->size, "newv", "", ""); + printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); } - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); break; case i_NEG: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); genflags (flag_sub, curi->size, "dst", "src", "0"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); break; case i_NEGX: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tuae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "0"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("newv", curi->smode, "srcreg", curi->size, "src"); break; case i_NBCD: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); printf ("\tuae_u16 newv;\n"); - printf ("\tint cflg, tmp_newv;\n"); - printf ("\ttmp_newv = newv_hi + newv_lo;\n"); + printf ("\tint cflg;\n"); printf ("\tif (newv_lo > 9) { newv_lo -= 6; }\n"); printf ("\tnewv = newv_hi + newv_lo;\n"); printf ("\tcflg = (newv & 0x1F0) > 0x90;\n"); printf ("\tif (cflg) newv -= 0x60;\n"); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry(); - /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ - if (cpu_level >= xBCD_KEEPS_N_FLAG) { - if (next_cpu_level < xBCD_KEEPS_N_FLAG) - next_cpu_level = xBCD_KEEPS_N_FLAG - 1; - genflags (flag_z, curi->size, "newv", "", ""); - } else { - genflags (flag_zn, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); } - if (cpu_level >= xBCD_KEEPS_V_FLAG) { - if (next_cpu_level < xBCD_KEEPS_V_FLAG) - next_cpu_level = xBCD_KEEPS_V_FLAG - 1; - } else { - printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + else { + genflags (flag_zn, curi->size, "newv", "", ""); } - genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("newv", curi->smode, "srcreg", curi->size, "src"); break; case i_CLR: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); genflags (flag_logical, curi->size, "0", "", ""); - genastore ("0", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("0", curi->smode, "srcreg", curi->size, "src"); break; case i_NOT: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tuae_u32 dst = ~src;\n"); genflags (flag_logical, curi->size, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); break; case i_TST: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genflags (flag_logical, curi->size, "src", "", ""); break; case i_BTST: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else @@ -1220,55 +1069,55 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); break; case i_BCHG: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tdst ^= (1 << src);\n"); printf ("\tSET_ZFLG (((uae_u32)dst & (1 << src)) >> src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; case i_BCLR: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst &= ~(1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; case i_BSET: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst |= (1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; case i_CMPM: case i_CMP: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); genflags (flag_cmp, curi->size, "newv", "src", "dst"); break; case i_CMPA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); start_brace (); genflags (flag_cmp, sz_long, "newv", "src", "dst"); break; /* The next two are coded a little unconventional, but they are doing * weird things... */ case i_MVPRM: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); printf ("\tuaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); if (curi->size == sz_word) { @@ -1280,45 +1129,41 @@ static void gen_opcode (unsigned long int opcode) break; case i_MVPMR: printf ("\tuaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); if (curi->size == sz_word) { - printf ("\tuae_u16 val = get_byte(memp) << 8;\n"); - printf ("\t val |= get_byte(memp + 2);\n"); + printf ("\tuae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2);\n"); } else { - printf ("\tuae_u32 val = get_byte(memp) << 24;\n"); - printf ("\t val |= get_byte(memp + 2) << 16;\n"); - printf ("\t val |= get_byte(memp + 4) << 8;\n"); - printf ("\t val |= get_byte(memp + 6);\n"); + printf ("\tuae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16)\n"); + printf (" + (get_byte(memp + 4) << 8) + get_byte(memp + 6);\n"); } - genastore ("val", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "dst"); break; case i_MOVE: - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); break; case i_MOVEA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); if (curi->size == sz_word) { printf ("\tuae_u32 val = (uae_s32)(uae_s16)src;\n"); } else { printf ("\tuae_u32 val = src;\n"); } - genastore ("val", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", sz_long, "dst"); break; case i_MVSR2: - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 2, 0); printf ("\tMakeSR();\n"); if (curi->size == sz_byte) - genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); + genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src"); else - genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); + genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src"); break; case i_MV2SR: - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); if (curi->size == sz_byte) printf ("\tMakeSR();\n\tregs.sr &= 0xFF00;\n\tregs.sr |= src & 0xFF;\n"); else { @@ -1327,84 +1172,66 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SWAP: - genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); start_brace (); printf ("\tuae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16);\n"); genflags (flag_logical, sz_long, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); + genastore ("dst", curi->smode, "srcreg", sz_long, "src"); break; case i_EXG: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); break; case i_EXT: - genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); start_brace (); switch (curi->size) { - case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; - case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; - default: abort (); + case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; + case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; + default: abort (); } genflags (flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); genastore ("dst", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src", XLATE_LOG); + curi->size == sz_word ? sz_word : sz_long, "src"); break; case i_MVMEL: - genmovemel (opcode); + genmovemel ((uae_u16)opcode); break; case i_MVMLE: - genmovemle (opcode); + genmovemle ((uae_u16)opcode); break; case i_TRAP: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - gen_set_fault_pc (); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + sync_m68k_pc (); printf ("\tException(src+32,0);\n"); + m68k_pc_offset = 0; break; case i_MVR2USP: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); printf ("\tregs.usp = src;\n"); break; case i_MVUSP2R: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src"); break; case i_RESET: - printf ("\tAtariReset();\n"); break; case i_NOP: break; case i_STOP: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - /* - * STOP undocumented features: - * if SR is not set: - * 68000 (68010?): Update SR, increase PC and then cause privilege violation exception (handled in newcpu) - * 68000 (68010?): Traced STOP also runs 4 cycles faster. - * 68020 68030: STOP works normally - * 68040 68060: Immediate privilege violation exception - */ - printf ("\tuae_u16 sr = src;\n"); - if (cpu_level >= 4) { - printf("\tif (!(sr & 0x2000)) {\n"); - printf ("m68k_incpc(%d);\n", m68k_pc_offset); - printf("\t\tException(8,0); goto %s;\n", endlabelstr); - printf("\t}\n"); - } - printf("\tregs.sr = sr;\n"); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tregs.sr = src;\n"); printf ("\tMakeFromSR();\n"); printf ("\tm68k_setstopped(1);\n"); - sync_m68k_pc (); - /* STOP does not prefetch anything */ - /* did_prefetch = -1; */ break; case i_RTE: if (cpu_level == 0) { - genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); printf ("\tregs.sr = sr; m68k_setpc_rte(pc);\n"); fill_prefetch_0 (); printf ("\tMakeFromSR();\n"); @@ -1413,14 +1240,15 @@ static void gen_opcode (unsigned long int opcode) if (next_cpu_level < 0) next_cpu_level = 0; printf ("\tuae_u16 newsr; uae_u32 newpc; for (;;) {\n"); - genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_word, "format", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (Aipi, "7", sz_word, "format", 1, 0); printf ("\tnewsr = sr; newpc = pc;\n"); printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); -// printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); + /* gb-- the next two lines are deleted in Bernie's gencpu.c */ + printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; }\n"); @@ -1438,8 +1266,8 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_RTD: - genamode (curi->smode, "srcreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); printf ("\tm68k_areg(regs, 7) += offs;\n"); printf ("\tm68k_setpc_rte(pc);\n"); fill_prefetch_0 (); @@ -1447,18 +1275,18 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_LINK: - genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Apdi, "7", sz_long, "old", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); + genamode (Apdi, "7", sz_long, "old", 2, 0); + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genastore ("src", Apdi, "7", sz_long, "old"); + genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src"); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); printf ("\tm68k_areg(regs, 7) += offs;\n"); - genastore ("src", Apdi, "7", sz_long, "old", XLATE_LOG); break; case i_UNLK: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); printf ("\tm68k_areg(regs, 7) = src;\n"); - genamode (Aipi, "7", sz_long, "old", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("old", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genamode (Aipi, "7", sz_long, "old", 1, 0); + genastore ("old", curi->smode, "srcreg", curi->size, "src"); break; case i_RTS: printf ("\tm68k_do_rts();\n"); @@ -1466,16 +1294,14 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_TRAPV: - printf ("\tuaecptr oldpc = m68k_getpc();\n"); sync_m68k_pc (); - printf ("\tif (GET_VFLG) { Exception(7,oldpc); goto %s; }\n", endlabelstr); + printf ("\tif (GET_VFLG) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); need_endlabel = 1; break; case i_RTR: printf ("\tMakeSR();\n"); - genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); - genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); printf ("\tregs.sr &= 0xFF00; sr &= 0xFF;\n"); printf ("\tregs.sr |= sr; m68k_setpc(pc);\n"); fill_prefetch_0 (); @@ -1483,19 +1309,19 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_JSR: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); printf ("\tm68k_do_jsr(m68k_getpc() + %d, srca);\n", m68k_pc_offset); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_JMP: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); printf ("\tm68k_setpc(srca);\n"); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_BSR: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); printf ("\tuae_s32 s = (uae_s32)src + 2;\n"); if (using_exception_3) { printf ("\tif (src & 1) {\n"); @@ -1510,6 +1336,18 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_Bcc: + if (0 && !using_prefetch && !using_exception_3 && (cpu_level >= 2)) { + /* gb-- variant probably more favorable to compiler optimizations + also assumes no prefetch buffer is used + Hmm, that would make sense with processors capable of conditional moves */ + if (curi->size == sz_long && next_cpu_level < 1) + next_cpu_level = 1; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tm68k_incpc (cctrue(%d) ? ((uae_s32)src + 2) : %d);\n", curi->cc, m68k_pc_offset); + m68k_pc_offset = 0; + } + else { + /* original code for branch instructions */ if (curi->size == sz_long) { if (cpu_level < 2) { printf ("\tm68k_incpc(2);\n"); @@ -1523,8 +1361,8 @@ static void gen_opcode (unsigned long int opcode) next_cpu_level = 1; } } - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); - printf ("\tif (!cctrue(%d)) goto didnt_jump_%lx;\n", curi->cc, opcode); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tif (!cctrue(%d)) goto didnt_jump;\n", curi->cc); if (using_exception_3) { printf ("\tif (src & 1) {\n"); printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); @@ -1536,25 +1374,26 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_incpc ((uae_s32)src + 2);\n"); fill_prefetch_0 (); printf ("return;\n"); - printf ("didnt_jump_%lx:;\n", opcode); + printf ("didnt_jump:;\n"); need_endlabel = 1; + } break; case i_LEA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("srca", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); break; case i_PEA: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Apdi, "7", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); - genastore ("srca", Apdi, "7", sz_long, "dst", XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (Apdi, "7", sz_long, "dst", 2, 0); + genastore ("srca", Apdi, "7", sz_long, "dst"); break; case i_DBcc: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); printf ("\tif (!cctrue(%d)) {\n", curi->cc); - genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src"); printf ("\t\tif (src) {\n"); if (using_exception_3) { @@ -1573,15 +1412,15 @@ static void gen_opcode (unsigned long int opcode) need_endlabel = 1; break; case i_Scc: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); start_brace (); printf ("\tint val = cctrue(%d) ? 0xff : 0;\n", curi->cc); - genastore ("val", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "src"); break; case i_DIVU: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); sync_m68k_pc (); /* Clear V flag when dividing by zero - Alcatraz Odyssey demo depends * on this (actually, it's doing a DIVS). */ @@ -1593,15 +1432,16 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); printf ("\t}\n"); printf ("\t}\n"); + insn_n_cycles += 68; need_endlabel = 1; break; case i_DIVS: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); sync_m68k_pc (); printf ("\tif (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;\n"); @@ -1610,31 +1450,34 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); printf ("\t}\n"); printf ("\t}\n"); + insn_n_cycles += 72; need_endlabel = 1; break; case i_MULU: - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + insn_n_cycles += 32; break; case i_MULS: - genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); start_brace (); printf ("\tuae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + insn_n_cycles += 32; break; case i_CHK: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); printf ("\tif ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto %s; }\n", endlabelstr); printf ("\telse if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto %s; }\n", endlabelstr); need_endlabel = 1; @@ -1642,8 +1485,8 @@ static void gen_opcode (unsigned long int opcode) case i_CHK2: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); printf ("\t{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];\n"); switch (curi->size) { case sz_byte: @@ -1667,8 +1510,8 @@ static void gen_opcode (unsigned long int opcode) break; case i_ASR: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1680,7 +1523,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV;\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); - printf ("\t\tval = %s & (uae_u32)-sign;\n", bit_mask (curi->size)); + printf ("\t\tval = %s & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size)); printf ("\t\tSET_CFLG (sign);\n"); duplicate_carry (); if (source_is_imm1_8 (curi)) @@ -1691,17 +1534,17 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tSET_CFLG (val & 1);\n"); duplicate_carry (); printf ("\t\tval >>= 1;\n"); - printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-sign;\n", + printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size), bit_size (curi->size)); printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ASL: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1733,11 +1576,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_LSR: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1762,11 +1605,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval >>= 1;\n"); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_LSL: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1792,11 +1635,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ROL: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1819,11 +1662,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG (val & 1);\n"); printf ("}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ROR: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1846,11 +1689,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ROXL: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1876,11 +1719,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t} }\n"); printf ("\tSET_CFLG (GET_XFLG);\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ROXR: - genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1909,10 +1752,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\t} }\n"); printf ("\tSET_CFLG (GET_XFLG);\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; case i_ASRW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1926,10 +1769,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_ASLW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1946,10 +1789,10 @@ static void gen_opcode (unsigned long int opcode) duplicate_carry (); printf ("\tSET_VFLG (GET_VFLG | (sign2 != sign));\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_LSRW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1962,10 +1805,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_LSLW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1978,10 +1821,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_ROLW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1994,10 +1837,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= 1;\n"); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_RORW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2010,10 +1853,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= %s;\n", cmask (curi->size)); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_ROXLW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2027,10 +1870,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_ROXRW: - genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -2044,129 +1887,103 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_MOVEC2: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (!m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tif (! m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_MOVE2C: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (!m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tif (! m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_CAS: { int old_brace_level; - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); printf ("\tint ru = (src >> 6) & 7;\n"); printf ("\tint rc = src & 7;\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc)", "dst"); - sync_m68k_pc (); printf ("\tif (GET_ZFLG)"); old_brace_level = n_braces; start_brace (); - genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); + genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst"); pop_braces (old_brace_level); printf ("else"); start_brace (); - switch (curi->size) { - case sz_byte: - printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);\n"); - break; - case sz_word: - printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);\n"); - break; - default: - printf ("\tm68k_dreg(regs, rc) = dst;\n"); - break; - } + printf ("m68k_dreg(regs, rc) = dst;\n"); pop_braces (old_brace_level); } break; case i_CAS2: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); printf ("\tuae_u32 rn1 = regs.regs[(extra >> 28) & 15];\n"); printf ("\tuae_u32 rn2 = regs.regs[(extra >> 12) & 15];\n"); if (curi->size == sz_word) { int old_brace_level = n_braces; - printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); - printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); printf ("\tif (GET_ZFLG) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); printf ("\tif (GET_ZFLG) {\n"); printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_word(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); printf ("\tif (! GET_ZFLG) {\n"); - printf ("\tm68k_dreg(regs, rc2) = (m68k_dreg(regs, rc2) & ~0xffff) | (dst2 & 0xffff);\n"); - printf ("\tm68k_dreg(regs, rc1) = (m68k_dreg(regs, rc1) & ~0xffff) | (dst1 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);\n"); printf ("\t}\n"); } else { int old_brace_level = n_braces; - printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); - printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); printf ("\tif (GET_ZFLG) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); printf ("\tif (GET_ZFLG) {\n"); printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_long(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); printf ("\tif (! GET_ZFLG) {\n"); - printf ("\tm68k_dreg(regs, rc2) = dst2;\n"); - printf ("\tm68k_dreg(regs, rc1) = dst1;\n"); + printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = dst1;\n"); + printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = dst2;\n"); printf ("\t}\n"); } break; - case i_MOVES: + case i_MOVES: /* ignore DFC and SFC because we have no MMU */ { - int old_brace_level; - - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - start_brace(); - printf ("\tif (extra & 0x0800)\n"); /* from reg to ea */ - { - int old_m68k_pc_offset = m68k_pc_offset; - /* use DFC */ - old_brace_level = n_braces; - start_brace (); - printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_DFC); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_DFC); - pop_braces (old_brace_level); - m68k_pc_offset = old_m68k_pc_offset; - } - printf ("else"); /* from ea to reg */ - { - /* use SFC */ - start_brace (); - genamode (curi->dmode, "dstreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_SFC); - printf ("\tif (extra & 0x8000) {\n"); /* address/data */ - switch (curi->size) { - case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; - case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; - default: abort (); - } - printf ("\t} else {\n"); - genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, "", XLATE_LOG); - printf ("\t}\n"); - sync_m68k_pc(); - pop_braces (old_brace_level); - } + int old_brace_level; + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + printf ("\tif (extra & 0x800)\n"); + old_brace_level = n_braces; + start_brace (); + printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + pop_braces (old_brace_level); + printf ("else"); + start_brace (); + genamode (curi->dmode, "dstreg", curi->size, "src", 1, 0); + printf ("\tif (extra & 0x8000) {\n"); + switch (curi->size) { + case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; + case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; + default: abort (); + } + printf ("\t} else {\n"); + genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, ""); + printf ("\t}\n"); + pop_braces (old_brace_level); } break; case i_BKPT: /* only needed for hardware emulators */ @@ -2182,23 +1999,23 @@ static void gen_opcode (unsigned long int opcode) printf ("\top_illg(opcode);\n"); break; case i_TRAPcc: - printf ("\tuaecptr oldpc = m68k_getpc();\n"); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - sync_m68k_pc (); - printf ("\tif (cctrue(%d)) { Exception(7,oldpc); goto %s; }\n", curi->cc, endlabelstr); + genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); + printf ("\tif (cctrue(%d)) { Exception(7,m68k_getpc()); goto %s; }\n", curi->cc, endlabelstr); need_endlabel = 1; break; case i_DIVL: + sync_m68k_pc (); + start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); sync_m68k_pc (); printf ("\tm68k_divl(opcode, dst, extra, oldpc);\n"); break; case i_MULL: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); sync_m68k_pc (); printf ("\tm68k_mull(opcode, dst, extra);\n"); break; @@ -2210,37 +2027,34 @@ static void gen_opcode (unsigned long int opcode) case i_BFFFO: case i_BFSET: case i_BFINS: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 2, 0); start_brace (); - printf ("\tuae_u32 bdata[2];"); printf ("\tuae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;\n"); printf ("\tint width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;\n"); if (curi->dmode == Dreg) { - printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg);\n"); - printf ("\toffset &= 0x1f;\n"); - printf ("\ttmp = (tmp << offset) | (tmp >> (32 - offset));\n"); - printf ("\tbdata[0] = tmp & ((1 << (32 - width)) - 1);\n"); + printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f);\n"); } else { - printf ("\tuae_u32 tmp;\n"); - printf ("\tdsta += offset >> 3;\n"); - printf ("\ttmp = get_bitfield(dsta, bdata, offset, width);\n"); + printf ("\tuae_u32 tmp,bf0,bf1;\n"); + printf ("\tdsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0);\n"); + printf ("\tbf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff;\n"); + printf ("\ttmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7)));\n"); } - printf ("\tSET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);\n"); - if (curi->mnemo == i_BFEXTS) - printf ("\ttmp = (uae_s32)tmp >> (32 - width);\n"); - else - printf ("\ttmp >>= (32 - width);\n"); + printf ("\ttmp >>= (32 - width);\n"); + printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0);\n"); printf ("\tSET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);\n"); switch (curi->mnemo) { case i_BFTST: break; case i_BFEXTU: - case i_BFEXTS: printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); break; case i_BFCHG: - printf ("\ttmp = tmp ^ (0xffffffffu >> (32 - width));\n"); + printf ("\ttmp = ~tmp;\n"); + break; + case i_BFEXTS: + printf ("\tif (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width);\n"); + printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); break; case i_BFCLR: printf ("\ttmp = 0;\n"); @@ -2251,11 +2065,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = offset;\n"); break; case i_BFSET: - printf ("\ttmp = 0xffffffffu >> (32 - width);\n"); + printf ("\ttmp = 0xffffffff;\n"); break; case i_BFINS: printf ("\ttmp = m68k_dreg(regs, (extra >> 12) & 7);\n"); - printf ("\ttmp = tmp & (0xffffffffu >> (32 - width));\n"); printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0);\n"); printf ("\tSET_ZFLG (tmp == 0);\n"); break; @@ -2265,12 +2078,26 @@ static void gen_opcode (unsigned long int opcode) if (curi->mnemo == i_BFCHG || curi->mnemo == i_BFCLR || curi->mnemo == i_BFSET - || curi->mnemo == i_BFINS) { + || curi->mnemo == i_BFINS) + { + printf ("\ttmp <<= (32 - width);\n"); if (curi->dmode == Dreg) { - printf ("\ttmp = bdata[0] | (tmp << (32 - width));\n"); - printf ("\tm68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));\n"); + printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 :\n"); + printf ("\t\t(0xffffffff << (32 - (offset & 0x1f))))) |\n"); + printf ("\t\t(tmp >> (offset & 0x1f)) |\n"); + printf ("\t\t(((offset & 0x1f) + width) >= 32 ? 0 :\n"); + printf (" (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width))));\n"); } else { - printf ("\tput_bitfield(dsta, bdata, tmp, offset, width);\n"); + printf ("\tbf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) |\n"); + printf ("\t\t(tmp >> (offset & 7)) |\n"); + printf ("\t\t(((offset & 7) + width) >= 32 ? 0 :\n"); + printf ("\t\t (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width))));\n"); + printf ("\tput_long(dsta,bf0 );\n"); + printf ("\tif (((offset & 7) + width) > 32) {\n"); + printf ("\t\tbf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) |\n"); + printf ("\t\t\t(tmp << (8 - (offset & 7)));\n"); + printf ("\t\tput_byte(dsta+4,bf1);\n"); + printf ("\t}\n"); } } break; @@ -2280,11 +2107,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); - printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg) - 2 * areg_byteinc[srcreg]) << 8)) + %s;\n", gen_nextiword ()); - printf ("\tm68k_areg(regs, srcreg) -= 2;\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + %s;\n", gen_nextiword ()); printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); - gen_set_fault_pc (); printf ("\tput_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf));\n"); } break; @@ -2295,57 +2122,57 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); - printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tm68k_areg(regs, dstreg) -= 2;\n"); - gen_set_fault_pc (); - printf ("\tput_word(m68k_areg(regs, dstreg), val);\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + printf ("\tput_byte(m68k_areg(regs, dstreg),val);\n"); + printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + printf ("\tput_byte(m68k_areg(regs, dstreg),val >> 8);\n"); } break; case i_TAS: - genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genflags (flag_logical, curi->size, "src", "", ""); printf ("\tsrc |= 0x80;\n"); - genastore ("src", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("src", curi->smode, "srcreg", curi->size, "src"); break; case i_FPP: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); printf ("\tfpuop_arithmetic(opcode, extra);\n"); break; case i_FDBcc: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); printf ("\tfpuop_dbcc(opcode, extra);\n"); break; case i_FScc: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_scc(opcode, extra);\n"); + printf ("\tfpuop_scc(opcode,extra);\n"); break; case i_FTRAPcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); - printf ("\tuae_u16 extra = %s;\n", gen_nextiword()); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_trapcc(opcode, oldpc, extra);\n"); + printf ("\tfpuop_trapcc(opcode,oldpc);\n"); break; case i_FBcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr pc = m68k_getpc();\n"); - genamode (curi->dmode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_bcc(opcode, pc, extra);\n"); + printf ("\tfpuop_bcc(opcode,pc,extra);\n"); break; case i_FSAVE: sync_m68k_pc (); @@ -2358,104 +2185,67 @@ static void gen_opcode (unsigned long int opcode) printf ("\tfpuop_restore(opcode);\n"); break; case i_CINVL: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(31);\n"); - printf("#endif\n"); - break; case i_CINVP: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(32);\n"); - printf("#endif\n"); - break; case i_CINVA: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(33);\n"); - printf("#endif\n"); + /* gb-- srcreg now contains the cache field */ + printf ("\tif (srcreg&0x2)\n"); + printf ("\t\tflush_icache(%d);\n", 30 + ((opcode >> 3) & 3)); break; case i_CPUSHL: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(41);\n"); - printf("#endif\n"); - break; case i_CPUSHP: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(42);\n"); - printf("#endif\n"); - break; case i_CPUSHA: - printf ("\tflush_internals();\n"); - printf("#ifdef USE_JIT\n"); - printf ("\tif (opcode&0x80)\n" - "\t\tflush_icache(43);\n"); - printf("#endif\n"); + /* gb-- srcreg now contains the cache field */ + printf ("\tif (srcreg&0x2)\n"); + printf ("\t\tflush_icache(%d);\n", 40 + ((opcode >> 3) & 3)); break; case i_MOVE16: - if ((opcode & 0xfff8) == 0xf620) { - /* MOVE16 (Ax)+,(Ay)+ */ - printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); - printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); - printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); - printf ("\tput_long(memd, get_long(mems));\n"); - printf ("\tput_long(memd+4, get_long(mems+4));\n"); - printf ("\tput_long(memd+8, get_long(mems+8));\n"); - printf ("\tput_long(memd+12, get_long(mems+12));\n"); - printf ("\tif (srcreg != dstreg)\n"); - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } else { - /* Other variants */ - genamode (curi->smode, "srcreg", curi->size, "mems", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); - genamode (curi->dmode, "dstreg", curi->size, "memd", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); - printf ("\tmemsa &= ~15;\n"); - printf ("\tmemda &= ~15;\n"); - printf ("\tput_long(memda, get_long(memsa));\n"); - printf ("\tput_long(memda+4, get_long(memsa+4));\n"); - printf ("\tput_long(memda+8, get_long(memsa+8));\n"); - printf ("\tput_long(memda+12, get_long(memsa+12));\n"); - if ((opcode & 0xfff8) == 0xf600) - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - else if ((opcode & 0xfff8) == 0xf608) - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } - break; + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); + printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); + printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); + printf ("\tput_long(memd, get_long(mems));\n"); + printf ("\tput_long(memd+4, get_long(mems+4));\n"); + printf ("\tput_long(memd+8, get_long(mems+8));\n"); + printf ("\tput_long(memd+12, get_long(mems+12));\n"); + printf ("\tif (srcreg != dstreg)\n"); + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "mems", 0, 2); + genamode (curi->dmode, "dstreg", curi->size, "memd", 0, 2); + printf ("\tmemsa &= ~15;\n"); + printf ("\tmemda &= ~15;\n"); + printf ("\tput_long(memda, get_long(memsa));\n"); + printf ("\tput_long(memda+4, get_long(memsa+4));\n"); + printf ("\tput_long(memda+8, get_long(memsa+8));\n"); + printf ("\tput_long(memda+12, get_long(memsa+12));\n"); + if ((opcode & 0xfff8) == 0xf600) + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + else if ((opcode & 0xfff8) == 0xf608) + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + break; case i_MMUOP: - genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); sync_m68k_pc (); swap_opcode (); printf ("\tmmu_op(opcode,extra);\n"); break; - - case i_EMULOP_RETURN: + + case i_EMULOP_RETURN: printf ("\tm68k_emulop_return();\n"); m68k_pc_offset = 0; break; - case i_EMULOP: + case i_EMULOP: printf ("\n"); swap_opcode (); printf ("\tm68k_emulop(opcode);\n"); break; - - case i_NATFEAT_ID: - printf ("\n"); - printf ("\tm68k_natfeat_id();\n"); - break; - - case i_NATFEAT_CALL: - printf ("\n"); - printf ("\tm68k_natfeat_call();\n"); - break; - + default: abort (); break; @@ -2467,92 +2257,73 @@ static void gen_opcode (unsigned long int opcode) static void generate_includes (FILE * f) { fprintf (f, "#include \"sysdeps.h\"\n"); + fprintf (f, "#include \"m68k.h\"\n"); fprintf (f, "#include \"memory.h\"\n"); fprintf (f, "#include \"readcpu.h\"\n"); fprintf (f, "#include \"newcpu.h\"\n"); - fprintf (f, "#ifdef USE_JIT\n"); fprintf (f, "#include \"compiler/compemu.h\"\n"); - fprintf (f, "#endif\n"); fprintf (f, "#include \"fpu/fpu.h\"\n"); fprintf (f, "#include \"cputbl.h\"\n"); - fprintf (f, "#include \"cpu_emulation.h\"\n"); - fprintf (f, "#include \"debug.h\"\n"); - - fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); - fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); - fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); - fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); - fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); - fprintf (f, "#ifdef NOFLAGS\n"); - fprintf (f, "# include \"noflags.h\"\n"); - fprintf (f, "#endif\n"); + fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); + fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); + fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); + fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); + fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); + + fprintf (f, "#ifdef NOFLAGS\n"); + fprintf (f, "# include \"noflags.h\"\n"); + fprintf (f, "#endif\n"); } static int postfix; -struct gencputbl { - char handler[80]; - uae_u16 specific; - uae_u16 opcode; - int namei; -}; -struct gencputbl cpustbl[65536]; -static int n_cpustbl; - static void generate_one_opcode (int rp) { - int i; uae_u16 smsk, dmsk; - int opcode = opcode_map[rp]; - int have_realopcode = 0; - + long int opcode = opcode_map[rp]; + const char *opcode_str; + if (table68k[opcode].mnemo == i_ILLG - || table68k[opcode].clev > cpu_level) + || table68k[opcode].clev > (unsigned)cpu_level) return; - for (i = 0; lookuptab[i].name[0]; i++) { - if (table68k[opcode].mnemo == lookuptab[i].mnemo) - break; - } - if (table68k[opcode].handler != -1) return; + opcode_str = get_instruction_string (opcode); + if (opcode_next_clev[rp] != cpu_level) { - sprintf(cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, opcode_last_postfix[rp]); - cpustbl[n_cpustbl].specific = 0; - cpustbl[n_cpustbl].opcode = opcode; - cpustbl[n_cpustbl].namei = i; - fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, lookuptab[i].name); - n_cpustbl++; + if (table68k[opcode].flagdead == 0) + /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ + fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], + opcode, opcode_str); + else + fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], + opcode, opcode_str); return; } - + if (table68k[opcode].flagdead == 0) /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ - sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC_FF(op_%x_%d)", opcode, postfix); + fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); else - sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, postfix); - cpustbl[n_cpustbl].specific = 0; - cpustbl[n_cpustbl].opcode = opcode; - cpustbl[n_cpustbl].namei = i; - fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, lookuptab[i].name); - n_cpustbl++; - - fprintf (headerfile, "extern cpuop_func op_%x_%d_nf;\n", opcode, postfix); - fprintf (headerfile, "extern cpuop_func op_%x_%d_ff;\n", opcode, postfix); - - printf ("void REGPARAM2 CPUFUNC(op_%x_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, lookuptab[i].name); - printf ("\tcpuop_begin();\n"); + fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); + + fprintf (headerfile, "extern cpuop_func op_%lx_%d_nf;\n", opcode, postfix); + fprintf (headerfile, "extern cpuop_func op_%lx_%d_ff;\n", opcode, postfix); + /* gb-- The "nf" variant for an instruction that doesn't set the condition codes at all is the same as the "ff" variant, so we don't need the "nf" variant to be compiled since it is mapped to the "ff" variant in the smalltbl. */ - if (table68k[opcode].flagdead == 0) + if (table68k[opcode].flagdead == 0) printf ("#ifndef NOFLAGS\n"); + printf ("void REGPARAM2 CPUFUNC(op_%lx_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); + printf ("\tcpuop_begin();\n"); + switch (table68k[opcode].stype) { case 0: smsk = 7; break; case 1: smsk = 255; break; @@ -2560,8 +2331,8 @@ static void generate_one_opcode (int rp) case 3: smsk = 7; break; case 4: smsk = 7; break; case 5: smsk = 63; break; - case 6: smsk = 255; break; - case 7: smsk = 3; break; + case 6: smsk = 255; break; + case 7: smsk = 3; break; default: abort (); } dmsk = 7; @@ -2592,17 +2363,38 @@ static void generate_one_opcode (int rp) if (pos < 8 && (smsk >> (8 - pos)) != 0) abort (); #endif - real_opcode(&have_realopcode); + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (smsk >> (8 - pos)) != 0) + sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + printf ("\tuae_u32 srcreg = %s;\n", source); + + printf ("#else\n"); + if (pos) - sprintf (source, "((real_opcode >> %d) & %d)", pos, smsk); + sprintf (source, "((opcode >> %d) & %d)", pos, smsk); else - sprintf (source, "(real_opcode & %d)", smsk); + sprintf (source, "(opcode & %d)", smsk); + if (table68k[opcode].stype == 3) printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); else if (table68k[opcode].stype == 1) printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); else printf ("\tuae_u32 srcreg = %s;\n", source); + + printf ("#endif\n"); } } if (table68k[opcode].duse @@ -2622,13 +2414,27 @@ static void generate_one_opcode (int rp) /* Check that we can do the little endian optimization safely. */ if (pos < 8 && (dmsk >> (8 - pos)) != 0) abort (); -#endif - real_opcode(&have_realopcode); +#endif + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + printf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos ^ 8, dmsk); + else + printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + printf ("#else\n"); + if (pos) - printf ("\tuae_u32 dstreg = (real_opcode >> %d) & %d;\n", + printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos, dmsk); else - printf ("\tuae_u32 dstreg = real_opcode & %d;\n", dmsk); + printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + printf ("#endif\n"); } } need_endlabel = 0; @@ -2637,10 +2443,10 @@ static void generate_one_opcode (int rp) gen_opcode (opcode); if (need_endlabel) printf ("%s: ;\n", endlabelstr); - if (table68k[opcode].flagdead == 0) - printf ("\n#endif\n"); - printf ("\tcpuop_end();\n"); + printf ("\tcpuop_end();\n"); printf ("}\n"); + if (table68k[opcode].flagdead == 0) + printf ("\n#endif\n"); opcode_next_clev[rp] = next_cpu_level; opcode_last_postfix[rp] = postfix; } @@ -2651,18 +2457,36 @@ static void generate_func (void) using_prefetch = 0; using_exception_3 = 0; - - for (i = 0; i < 1; i++) { +#if !USE_PREFETCH_BUFFER + /* gb-- No need for a prefetch buffer, nor exception 3 handling */ + /* Anyway, Basilisk2 does not use the op_smalltbl_5 table... */ + for (i = 0; i <= 4; i++) { +#else + for (i = 0; i < 6; i++) { +#endif cpu_level = 4 - i; + if (i == 5) { + cpu_level = 0; + using_prefetch = 1; + using_exception_3 = 1; + for (rp = 0; rp < nr_cpuop_funcs; rp++) + opcode_next_clev[rp] = 0; + } postfix = i; - fprintf (stblfile, "const struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); + fprintf (stblfile, "struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); + + /* Disable spurious warnings. */ + printf ("\n" + "#ifdef _MSC_VER\n" + "#pragma warning(disable:4102) /* unreferenced label */\n" + "#endif\n"); /* sam: this is for people with low memory (eg. me :)) */ printf ("\n" - "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " - "!defined(PART_5) && !defined(PART_6) && " - "!defined(PART_7) && !defined(PART_8)" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" "\n" "#define PART_1 1\n" "#define PART_2 1\n" @@ -2673,8 +2497,8 @@ static void generate_func (void) "#define PART_7 1\n" "#define PART_8 1\n" "#endif\n\n"); + rp = 0; - n_cpustbl = 0; for(j=1;j<=8;++j) { int k = (j*nr_cpuop_funcs)/8; printf ("#ifdef PART_%d\n",j); @@ -2682,89 +2506,14 @@ static void generate_func (void) generate_one_opcode (rp); printf ("#endif\n\n"); } + fprintf (stblfile, "{ 0, 0, 0 }};\n"); } } -static struct { - const char *handler; - const char *name; -} cpufunctbl[65536]; -static char const op_illg_1[] = "op_illg_1"; -static char const illegal[] = "ILLEGAL"; - -static void generate_functbl (void) -{ - int i; - unsigned int opcode; - int cpu_level = 4; - struct gencputbl *tbl = cpustbl; - - for (opcode = 0; opcode < 65536; opcode++) - { - cpufunctbl[opcode].handler = op_illg_1; - cpufunctbl[opcode].name = illegal; - } - for (i = 0; i < n_cpustbl; i++) - { - if (! tbl[i].specific) - { - cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; - cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; - } - } - for (opcode = 0; opcode < 65536; opcode++) - { - const char *f; - - if (table68k[opcode].mnemo == i_ILLG || (unsigned)table68k[opcode].clev > (unsigned)cpu_level) - continue; - - if (table68k[opcode].handler != -1) - { - f = cpufunctbl[table68k[opcode].handler].handler; - if (f == op_illg_1) - abort(); - cpufunctbl[opcode].handler = f; - cpufunctbl[opcode].name = cpufunctbl[table68k[opcode].handler].name; - } - } - for (i = 0; i < n_cpustbl; i++) - { - if (tbl[i].specific) - { - cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; - cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; - } - } - - fprintf(functblfile, "\n"); - fprintf(functblfile, "cpuop_func *cpufunctbl[65536] = {\n"); - fprintf(functblfile, "#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU)\n"); - for (opcode = 0; opcode < 65536; opcode++) - { - fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[opcode].handler, opcode < 65535 ? "," : "", cpufunctbl[opcode].name); - } - fprintf(functblfile, "#else\n"); - for (opcode = 0; opcode < 65536; opcode++) - { - unsigned int map = do_byteswap_16(opcode); - fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[map].handler, opcode < 65535 ? "," : "", cpufunctbl[map].name); - } - fprintf(functblfile, "#endif\n"); - fprintf(functblfile, "};\n"); -} - -#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) -void cygwin_mingw_abort() -{ -#undef abort - abort(); -} -#endif - -int main () +int main (int argc, char **argv) { + FILE *out; read_table68k (); do_merges (); @@ -2778,28 +2527,32 @@ int main () * cputbl.h that way), but cpuopti can't cope. That could be fixed, but * I don't dare to touch the 68k version. */ - if ((headerfile = fopen ("cputbl.h", "wb")) == NULL) - abort(); - if ((stblfile = fopen ("cpustbl.cpp", "wb")) == NULL) - abort(); - if ((functblfile = fopen ("cpufunctbl.cpp", "wb")) == NULL) - abort(); - if (freopen ("cpuemu.cpp", "wb", stdout) == NULL) - abort(); + headerfile = fopen ("cputbl.h", "w"); + stblfile = fopen ("cpustbl.cpp", "w"); + out = freopen ("cpuemu.cpp", "w", stdout); generate_includes (stdout); - fprintf(stdout, "#ifdef HAVE_CFLAG_NO_REDZONE\n"); - fprintf(stdout, "#ifndef NOFLAGS\n"); - fprintf(stdout, "#pragma GCC option \"-mno-red-zone\"\n"); - fprintf(stdout, "#endif\n"); - fprintf(stdout, "#endif\n"); generate_includes (stblfile); - generate_includes (functblfile); + generate_func (); - generate_functbl (); + free (table68k); - fclose(headerfile); - fclose(stblfile); - fclose(functblfile); + fclose (headerfile); + fclose (stblfile); + fflush (out); + + /* For build systems (IDEs mainly) that don't make it easy to compile the + * same file twice with different settings. */ + stblfile = fopen ("cpustbl_nf.cpp", "w"); + out = freopen ("cpuemu_nf.cpp", "w", stdout); + + fprintf (stblfile, "#define NOFLAGS\n"); + fprintf (stblfile, "#include \"cpustbl.cpp\"\n"); + fclose (stblfile); + + printf ("#define NOFLAGS\n"); + printf ("#include \"cpuemu.cpp\"\n"); + fflush (out); + return 0; } diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index dc79136bc..f329cb3ed 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -1,44 +1,31 @@ -/* - * m68k.h - machine dependent bits - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) +/* + * UAE - The Un*x Amiga Emulator * - * Inspired by Christian Bauer's Basilisk II + * MC68000 emulation - machine dependent bits * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * Copyright 1996 Bernd Schmidt * - * ARAnyM is free software; you can redistribute it and/or modify + * 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. * - * ARAnyM is distributed in the hope that it will be useful, + * 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 ARAnyM; if not, write to the Free Software + * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - machine dependent bits - * - * Copyright 1996 Bernd Schmidt - * - */ #ifndef M68K_FLAGS_H #define M68K_FLAGS_H #ifdef OPTIMIZED_FLAGS -#if (defined(CPU_i386) && defined(X86_ASSEMBLY)) || (defined(CPU_x86_64) && defined(X86_64_ASSEMBLY)) - -# include +#if defined(X86_ASSEMBLY) || defined(X86_64_ASSEMBLY) || defined(MSVC_INTRINSICS) #ifndef SAHF_SETO_PROFITABLE @@ -46,13 +33,8 @@ unsigned long hereunder is either 64-bit or 32-bit wide depending on the target. */ struct flag_struct { -#if defined(CPU_x86_64) - uint64 cznv; - uint64 x; -#else - uint32 cznv; - uint32 x; -#endif + unsigned long cznv; + unsigned long x; }; #define FLAGVAL_Z 0x40 @@ -77,9 +59,9 @@ struct flag_struct { #define COPY_CARRY (regflags.x = regflags.cznv) -extern struct flag_struct regflags __asm__ ("regflags"); +extern struct flag_struct regflags ASM_SYM ("regflags"); -static inline int cctrue(int cc) +static __inline__ int cctrue(int cc) { uae_u32 cznv = regflags.cznv; switch(cc){ @@ -111,25 +93,25 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("andl %1,%1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") + : "=r" (regflags.cznv) : "r" (v) : "cc") #define optflag_testw(v) \ __asm__ __volatile__ ("andw %w1,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") + : "=r" (regflags.cznv) : "r" (v) : "cc") #define optflag_testb(v) \ __asm__ __volatile__ ("andb %b1,%b1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "q" (v) : "memory", "cc") + : "=r" (regflags.cznv) : "q" (v) : "cc") #define optflag_addl(v, s, d) do { \ __asm__ __volatile__ ("addl %k2,%k1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) @@ -137,7 +119,7 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("addw %w2,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) @@ -153,7 +135,7 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("subl %k2,%k1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) @@ -161,7 +143,7 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("subw %w2,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) @@ -169,7 +151,7 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("subb %b2,%b1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "memory", "cc"); \ + : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ COPY_CARRY; \ } while (0) @@ -177,19 +159,19 @@ static inline int cctrue(int cc) __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") + : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") #define optflag_cmpw(s, d) \ __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") + : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") #define optflag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=rm" (regflags.cznv) : "qmi" (s), "q" (d) : "memory", "cc") + : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc") #else @@ -220,9 +202,9 @@ struct flag_struct { #define COPY_CARRY (regflags.x = (regflags.cznv)>>8) -extern struct flag_struct regflags __asm__ ("regflags"); +extern struct flag_struct regflags ASM_SYM("regflags"); -static inline int cctrue(int cc) +static __inline__ int cctrue(int cc) { uae_u32 cznv = regflags.cznv; switch(cc){ @@ -252,7 +234,7 @@ static inline int cctrue(int cc) } /* Manually emit LAHF instruction so that 64-bit assemblers can grok it */ -#if defined CPU_x86_64 && defined __GNUC__ +#if defined __x86_64__ && defined __GNUC__ #define ASM_LAHF ".byte 0x9f" #else #define ASM_LAHF "lahf" @@ -358,7 +340,7 @@ static inline int cctrue(int cc) "seto %%al\n\t" \ "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ - : : "rmi" (s), "r" (d) : "%eax","cc","memory") + : : "rmi" (s), "r" (d) : "%eax","cc","memory"); #define optflag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b0,%b1\n\t" \ @@ -370,290 +352,7 @@ static inline int cctrue(int cc) #endif -#elif defined(CPU_arm) && defined(ARM_ASSEMBLY) - -struct flag_struct { - uae_u32 nzcv; - uae_u32 x; -}; - -#define FLAGVAL_Q 0x08000000 -#define FLAGVAL_V 0x10000000 -#define FLAGVAL_C 0x20000000 -#define FLAGVAL_Z 0x40000000 -#define FLAGVAL_N 0x80000000 - -#define SET_NFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x80000000) | (((y) & 1) << 31)) -#define SET_ZFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x40000000) | (((y) & 1) << 30)) -#define SET_CFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x20000000) | (((y) & 1) << 29)) -#define SET_VFLG(y) (regflags.nzcv = (regflags.nzcv & ~0x10000000) | (((y) & 1) << 28)) -#define SET_XFLG(y) (regflags.x = (y)) - -#define GET_NFLG ((regflags.nzcv >> 31) & 1) -#define GET_ZFLG ((regflags.nzcv >> 30) & 1) -#define GET_CFLG ((regflags.nzcv >> 29) & 1) -#define GET_VFLG ((regflags.nzcv >> 28) & 1) -#define GET_XFLG (regflags.x & 1) - -#define CLEAR_CZNV (regflags.nzcv = 0) -#define GET_CZNV (regflags.nzcv) -#define IOR_CZNV(X) (regflags.nzcv |= (X)) -#define SET_CZNV(X) (regflags.nzcv = (X)) - -#define COPY_CARRY (regflags.x = (regflags.nzcv)>>29) - -extern struct flag_struct regflags __asm__ ("regflags"); - -static inline int cctrue(int cc) -{ - unsigned int nzcv = regflags.nzcv; - switch(cc){ - case 0: return 1; /* T */ - case 1: return 0; /* F */ - case 2: return (nzcv & 0x60000000) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ - case 3: return (nzcv & 0x60000000) != 0; /* GET_CFLG || GET_ZFLG; LS */ - case 4: return (nzcv & 0x20000000) == 0; /* !GET_CFLG; CC */ - case 5: return (nzcv & 0x20000000) != 0; /* GET_CFLG; CS */ - case 6: return (nzcv & 0x40000000) == 0; /* !GET_ZFLG; NE */ - case 7: return (nzcv & 0x40000000) != 0; /* GET_ZFLG; EQ */ - case 8: return (nzcv & 0x10000000) == 0; /* !GET_VFLG; VC */ - case 9: return (nzcv & 0x10000000) != 0; /* GET_VFLG; VS */ - case 10:return (nzcv & 0x80000000) == 0; /* !GET_NFLG; PL */ - case 11:return (nzcv & 0x80000000) != 0; /* GET_NFLG; MI */ - case 12:return (((nzcv << 3) ^ nzcv) & 0x80000000) == 0; /* GET_NFLG == GET_VFLG; GE */ - case 13:return (((nzcv << 3) ^ nzcv) & 0x80000000) != 0; /* GET_NFLG != GET_VFLG; LT */ - case 14: - nzcv &= 0xd0000000; - return (((nzcv << 3) ^ nzcv) & 0xc0000000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ - case 15: - nzcv &= 0xd0000000; - return (((nzcv << 3) ^ nzcv) & 0xc0000000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ - } - return 0; -} - -#define optflag_testl(v) do {\ - __asm__ __volatile__ ("tst %[rv],%[rv]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "bic %[nzcv],#0x30000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rv] "r" (v) \ - : "cc"); \ - } while(0) - -#define optflag_addl(v, s, d) do { \ - __asm__ __volatile__ ("adds %[rv],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_subl(v, s, d) do { \ - __asm__ __volatile__ ("subs %[rv],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_cmpl(s, d) do { \ - __asm__ __volatile__ ("cmp %[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rs] "ri" (s), [rd] "0" (d) \ - : "cc"); \ - } while(0) - -#if defined(ARMV6_ASSEMBLY) - -// #pragma message "ARM/v6 Assembly optimized flags" - -#define optflag_testw(v) do { \ - __asm__ __volatile__ ("sxth %[rv],%[rv]\n\t" \ - "tst %[rv],%[rv]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "bic %[nzcv],#0x30000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rv] "0" (v) \ - : "cc"); \ - }while(0) - -#define optflag_testb(v) do {\ - __asm__ __volatile__ ("sxtb %[rv],%[rv]\n\t" \ - "tst %[rv],%[rv]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "bic %[nzcv],#0x30000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rv] "0" (v) \ - : "cc"); \ - }while(0) - -#define optflag_addw(v, s, d) do { \ - __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ - "sxth %[rs],%[rs]\n\t" \ - "adds %[rd],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_addb(v, s, d) do { \ - __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ - "sxtb %[rs],%[rs]\n\t" \ - "adds %[rd],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_subw(v, s, d) do { \ - __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ - "sxth %[rs],%[rs]\n\t" \ - "subs %[rd],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_subb(v, s, d) do { \ - __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ - "sxtb %[rs],%[rs]\n\t" \ - "subs %[rd],%[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_cmpw(s, d) do { \ - __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ - "sxth %[rs],%[rs]\n\t" \ - "cmp %[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rs] "ri" (s), [rd] "0" (d) \ - : "cc"); \ - } while(0) - -#define optflag_cmpb(s, d) do { \ - __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ - "sxtb %[rs],%[rs]\n\t" \ - "cmp %[rd],%[rs]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rs] "ri" (s), [rd] "0" (d) \ - : "cc"); \ - } while(0) - -#else - -// #pragma message "ARM/generic Assembly optimized flags" - -#define optflag_testw(v) do { \ - __asm__ __volatile__ ("lsl %[rv],%[rv],#16\n\t" \ - "tst %[rv],%[rv]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "bic %[nzcv],#0x30000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rv] "0" (v) \ - : "cc"); \ - }while(0) - -#define optflag_testb(v) do {\ - __asm__ __volatile__ ("lsl %[rv],%[rv],#24\n\t" \ - "tst %[rv],%[rv]\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "bic %[nzcv],#0x30000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rv] "0" (v) \ - : "cc"); \ - }while(0) - -#define optflag_addw(v, s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ - "adds %[rd],%[rd],%[rs],lsl #16\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "lsr %[rv],%[rd],#16\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_addb(v, s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ - "adds %[rd],%[rd],%[rs],lsl #24\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "lsr %[rv],%[rd],#24\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_subw(v, s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ - "subs %[rd],%[rd],%[rs],lsl #16\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - "lsr %[rv],%[rd],#16\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_subb(v, s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ - "subs %[rd],%[rd],%[rs],lsl #24\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - "lsr %[rv],%[rd],#24\n\t" \ - : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ - : [rs] "ri" (s), [rd] "1" (d) \ - : "cc"); \ - COPY_CARRY; \ - } while(0) - -#define optflag_cmpw(s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ - "cmp %[rd],%[rs],lsl #16\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rs] "ri" (s), [rd] "0" (d) \ - : "cc"); \ - } while(0) - -#define optflag_cmpb(s, d) do { \ - __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ - "cmp %[rd],%[rs],lsl #24\n\t" \ - "mrs %[nzcv],cpsr\n\t" \ - "eor %[nzcv],#0x20000000\n\t" \ - : [nzcv] "=r" (regflags.nzcv) \ - : [rs] "ri" (s), [rd] "0" (d) \ - : "cc"); \ - } while(0) - -#endif - -#elif defined(CPU_sparc) && (defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY)) +#elif defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) struct flag_struct { unsigned char nzvc; @@ -684,7 +383,7 @@ extern struct flag_struct regflags; #define COPY_CARRY (regflags.x = regflags.nzvc) -static inline int cctrue(int cc) +static __inline__ int cctrue(int cc) { uae_u32 nzvc = regflags.nzvc; switch(cc){ @@ -1346,7 +1045,7 @@ extern struct flag_struct regflags; #define COPY_CARRY (SET_XFLG (GET_CFLG)) -static inline int cctrue(const int cc) +static __inline__ int cctrue(const int cc) { switch(cc){ case 0: return 1; /* T */ diff --git a/BasiliskII/src/uae_cpu/memory-uae.h b/BasiliskII/src/uae_cpu/memory-uae.h deleted file mode 100644 index c93aeb371..000000000 --- a/BasiliskII/src/uae_cpu/memory-uae.h +++ /dev/null @@ -1,606 +0,0 @@ -/* - * memory.h - memory management - * - * Copyright (c) 2001-2006 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - /* - * UAE - The Un*x Amiga Emulator - * - * memory management - * - * Copyright 1995 Bernd Schmidt - */ - -#ifndef UAE_MEMORY_H -#define UAE_MEMORY_H - -#include "sysdeps.h" -#include "string.h" -#include "hardware.h" -#include "parameters.h" -#include "registers.h" -#include "cpummu.h" -#include "readcpu.h" - -# include - -// newcpu.h -extern void Exception (int, uaecptr); -#ifdef EXCEPTIONS_VIA_LONGJMP - extern JMP_BUF excep_env; - #define SAVE_EXCEPTION \ - JMP_BUF excep_env_old; \ - memcpy(excep_env_old, excep_env, sizeof(JMP_BUF)) - #define RESTORE_EXCEPTION \ - memcpy(excep_env, excep_env_old, sizeof(JMP_BUF)) - #define TRY(var) int var = SETJMP(excep_env); if (!var) - #define CATCH(var) else - #define THROW(n) LONGJMP(excep_env, n) - #define THROW_AGAIN(var) LONGJMP(excep_env, var) - #define VOLATILE volatile -#else - struct m68k_exception { - int prb; - m68k_exception (int exc) : prb (exc) {} - operator int() { return prb; } - }; - #define SAVE_EXCEPTION - #define RESTORE_EXCEPTION - #define TRY(var) try - #define CATCH(var) catch(m68k_exception var) - #define THROW(n) throw m68k_exception(n) - #define THROW_AGAIN(var) throw - #define VOLATILE -#endif /* EXCEPTIONS_VIA_LONGJMP */ -extern int in_exception_2; - -#define STRAM_END 0x0e00000UL // should be replaced by global ROMBase as soon as ROMBase will be a constant -#define ROM_END 0x0e80000UL // should be replaced by ROMBase + RealROMSize if we are going to work with larger TOS ROMs than 512 kilobytes -#define FastRAM_BEGIN 0x1000000UL // should be replaced by global FastRAMBase as soon as FastRAMBase will be a constant -#ifdef FixedSizeFastRAM -#define FastRAM_SIZE (FixedSizeFastRAM * 1024 * 1024) -#else -#define FastRAM_SIZE FastRAMSize -#endif - -#ifdef FIXED_VIDEORAM -#define ARANYMVRAMSTART 0xf0000000UL -#endif - -#define ARANYMVRAMSIZE 0x00100000 // should be a variable to protect VGA card offscreen memory - -#ifdef FIXED_VIDEORAM -extern uintptr VMEMBaseDiff; -#else -extern uae_u32 VideoRAMBase; -#endif - -#ifdef ARAM_PAGE_CHECK -extern uaecptr pc_page, read_page, write_page; -extern uintptr pc_offset, read_offset, write_offset; -# ifdef PROTECT2K -# define ARAM_PAGE_MASK 0x7ff -# else -# ifdef FULLMMU -# define ARAM_PAGE_MASK 0xfff -# else -# define ARAM_PAGE_MASK 0xfffff -# endif -# endif -#endif - -extern uintptr MEMBaseDiff; -extern uintptr ROMBaseDiff; -extern uintptr FastRAMBaseDiff; -# define InitMEMBaseDiff(va, ra) (MEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -# define InitROMBaseDiff(va, ra) (ROMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -# define InitFastRAMBaseDiff(va, ra) (FastRAMBaseDiff = (uintptr)(va) - (uintptr)(ra)) - -#ifdef FIXED_VIDEORAM -#define InitVMEMBaseDiff(va, ra) (VMEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -#else -#define InitVMEMBaseDiff(va, ra) (ra = (uintptr)(va) + MEMBaseDiff) -#endif - -extern "C" void breakpt(void); - - -static inline uae_u64 do_get_mem_quad(uae_u64 *a) {return SDL_SwapBE64(*a);} -static inline void do_put_mem_quad(uae_u64 *a, uae_u64 v) {*a = SDL_SwapBE64(v);} - - -#ifndef NOCHECKBOUNDARY -static ALWAYS_INLINE bool test_ram_boundary(uaecptr addr, int size, bool super, bool write) -{ - if (addr <= (FastRAM_BEGIN + FastRAM_SIZE - size)) { -#ifdef PROTECT2K - // protect first 2kB of RAM - access in supervisor mode only - if (!super && addr < 0x00000800UL) - return false; -#endif - // check for write access to protected areas: - // - first two longwords of ST-RAM are non-writable (ROM shadow) - // - non-writable area between end of ST-RAM and begin of FastRAM - if (!write || addr >= FastRAM_BEGIN || (addr >= 8 && addr <= (STRAM_END - size))) - return true; - } -#ifdef FIXED_VIDEORAM - return addr >= ARANYMVRAMSTART && addr <= (ARANYMVRAMSTART + ARANYMVRAMSIZE - size); -#else - return addr >= VideoRAMBase && addr <= (VideoRAMBase + ARANYMVRAMSIZE - size); -#endif -} -/* - * "size" is the size of the memory access (byte = 1, word = 2, long = 4) - */ -static ALWAYS_INLINE void check_ram_boundary(uaecptr addr, int size, bool write) -{ - if (test_ram_boundary(addr, size, regs.s, write)) - return; - - // D(bug("BUS ERROR %s at $%x\n", (write ? "writing" : "reading"), addr)); - regs.mmu_fault_addr = addr; - regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); - breakpt(); - THROW(2); -} - -#else -static inline bool test_ram_boundary(uaecptr, int, bool, bool) { return 1; } -static inline void check_ram_boundary(uaecptr, int, bool) { } -#endif - -#ifdef FIXED_VIDEORAM -# define do_get_real_address(a) ((uae_u8 *)(((uaecptr)(a) < ARANYMVRAMSTART) ? ((uaecptr)(a) + MEMBaseDiff) : ((uaecptr)(a) + VMEMBaseDiff))) -#else -# define do_get_real_address(a) ((uae_u8 *)((uintptr)(a) + MEMBaseDiff)) -#endif - -static inline uae_u8 *phys_get_real_address(uaecptr addr) -{ - return do_get_real_address(addr); -} - -#ifndef NOCHECKBOUNDARY -static inline bool phys_valid_address(uaecptr addr, bool write, int sz) -{ - return test_ram_boundary(addr, sz, regs.s, write); -} -#else -static inline bool phys_valid_address(uaecptr, bool, int) { return true; } -#endif - -static inline uae_u64 phys_get_quad(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_quad((uae_u64*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); /* TODO: must be HWget_q */ -#endif - check_ram_boundary(addr, 8, false); - uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_quad(m); -} - -static inline uae_u32 phys_get_long(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_long((uae_u32*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); -#endif - check_ram_boundary(addr, 4, false); - uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_long(m); -} - -static inline uae_u32 phys_get_word(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_word((uae_u16*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_w(addr); -#endif - check_ram_boundary(addr, 2, false); - uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_word(m); -} - -static inline uae_u32 phys_get_byte(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_byte((uae_u8*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_b(addr); -#endif - check_ram_boundary(addr, 1, false); - uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_byte(m); -} - -static inline void phys_put_quad(uaecptr addr, uae_u64 l) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_quad((uae_u64*)(addr + write_offset), l); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_l(addr, l); /* TODO: must be HWput_q */ - return; - } -#endif - check_ram_boundary(addr, 8, true); - uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_quad(m, l); -} - -static inline void phys_put_long(uaecptr addr, uae_u32 l) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_long((uae_u32*)(addr + write_offset), l); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_l(addr, l); - return; - } -#endif - check_ram_boundary(addr, 4, true); - uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_long(m, l); -} - -static inline void phys_put_word(uaecptr addr, uae_u32 w) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_word((uae_u16*)(addr + write_offset), w); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_w(addr, w); - return; - } -#endif - check_ram_boundary(addr, 2, true); - uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_word(m, w); -} - -static inline void phys_put_byte(uaecptr addr, uae_u32 b) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_byte((uae_u8*)(addr + write_offset), b); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_b(addr, b); - return; - } -#endif - check_ram_boundary(addr, 1, true); - uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_byte(m, b); -} - -#ifdef FULLMMU -static ALWAYS_INLINE bool is_unaligned(uaecptr addr, int size) -{ - return unlikely((addr & (size - 1)) && (addr ^ (addr + size - 1)) & 0x1000); -} - -static ALWAYS_INLINE uae_u8 *mmu_get_real_address(uaecptr addr, struct mmu_atc_line *cl) -{ - return do_get_real_address(cl->phys + addr); -} - -static ALWAYS_INLINE uae_u32 mmu_get_quad(uaecptr addr, int data) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl)); - return mmu_get_quad_slow(addr, regs.s, data, cl); -} - -static ALWAYS_INLINE uae_u64 get_quad(uaecptr addr) -{ - return mmu_get_quad(addr, 1); -} - -static ALWAYS_INLINE uae_u32 mmu_get_long(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); - return mmu_get_long_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u32 get_long(uaecptr addr) -{ - if (unlikely(is_unaligned(addr, 4))) - return mmu_get_long_unaligned(addr, 1); - return mmu_get_long(addr, 1, sz_long); -} - -static ALWAYS_INLINE uae_u16 mmu_get_word(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); - return mmu_get_word_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u16 get_word(uaecptr addr) -{ - if (unlikely(is_unaligned(addr, 2))) - return mmu_get_word_unaligned(addr, 1); - return mmu_get_word(addr, 1, sz_word); -} - -static ALWAYS_INLINE uae_u8 mmu_get_byte(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); - return mmu_get_byte_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u8 get_byte(uaecptr addr) -{ - return mmu_get_byte(addr, 1, sz_byte); -} - -static ALWAYS_INLINE void mmu_put_quad(uaecptr addr, uae_u64 val, int data) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_quad_slow(addr, val, regs.s, data, cl); -} - -static ALWAYS_INLINE void put_quad(uaecptr addr, uae_u32 val) -{ - mmu_put_quad(addr, val, 1); -} - -static ALWAYS_INLINE void mmu_put_long(uaecptr addr, uae_u32 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_long_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_long(uaecptr addr, uae_u32 val) -{ - if (unlikely(is_unaligned(addr, 4))) - mmu_put_long_unaligned(addr, val, 1); - else - mmu_put_long(addr, val, 1, sz_long); -} - -static ALWAYS_INLINE void mmu_put_word(uaecptr addr, uae_u16 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_word_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_word(uaecptr addr, uae_u16 val) -{ - if (unlikely(is_unaligned(addr, 2))) - mmu_put_word_unaligned(addr, val, 1); - else - mmu_put_word(addr, val, 1, sz_word); -} - -static ALWAYS_INLINE void mmu_put_byte(uaecptr addr, uae_u8 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_byte_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_byte(uaecptr addr, uae_u8 val) -{ - mmu_put_byte(addr, val, 1, sz_byte); -} - -static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) -{ - (void)sz; - return phys_get_real_address(mmu_translate(addr, regs.s, 1, write)); -} - -static ALWAYS_INLINE uae_u32 mmu_get_user_long(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); - return mmu_get_long_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE uae_u16 mmu_get_user_word(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); - return mmu_get_word_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE uae_u8 mmu_get_user_byte(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); - return mmu_get_byte_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_long(uaecptr addr, uae_u32 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_long_slow(addr, val, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_word(uaecptr addr, uae_u16 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_word_slow(addr, val, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_byte(uaecptr addr, uae_u8 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_byte_slow(addr, val, super, data, size, cl); -} - -static inline bool valid_address(uaecptr addr, bool write, int sz) -{ - SAVE_EXCEPTION; - TRY(prb) { - (void)sz; - check_ram_boundary(mmu_translate(addr, regs.s, 1, (write ? 1 : 0)), sz, write); - RESTORE_EXCEPTION; - return true; - } - CATCH(prb) { - RESTORE_EXCEPTION; - return false; - } -} - -#else - -# define get_quad(a) phys_get_quad(a) -# define get_long(a) phys_get_long(a) -# define get_word(a) phys_get_word(a) -# define get_byte(a) phys_get_byte(a) -# define put_quad(a,b) phys_put_quad(a,b) -# define put_long(a,b) phys_put_long(a,b) -# define put_word(a,b) phys_put_word(a,b) -# define put_byte(a,b) phys_put_byte(a,b) -# define get_real_address(a,w,s) phys_get_real_address(a) - -#define valid_address(a,w,s) phys_valid_address(a,w,s) -#endif - -static inline void flush_internals() { -#ifdef ARAM_PAGE_CHECK - pc_page = 0xeeeeeeee; - read_page = 0xeeeeeeee; - write_page = 0xeeeeeeee; -#endif -} - -#endif /* MEMORY_H */ - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp index e56f993d6..7483f5064 100644 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -1,59 +1,642 @@ /* - * memory.cpp - memory management + * UAE - The Un*x Amiga Emulator * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * Memory management * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * (c) 1995 Bernd Schmidt * - * ARAnyM is free software; you can redistribute it and/or modify + * 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. * - * ARAnyM is distributed in the hope that it will be useful, + * 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 ARAnyM; if not, write to the Free Software + * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* - * UAE - The Un*x Amiga Emulator - * - * Memory management - * - * (c) 1995 Bernd Schmidt - */ + +#include +#include #include "sysdeps.h" +#include "cpu_emulation.h" +#include "main.h" +#include "video.h" + +#include "m68k.h" #include "memory.h" -#define DEBUG 0 -#include "debug.h" - -#ifdef ARAM_PAGE_CHECK -uaecptr pc_page = 0xeeeeeeee; -uintptr pc_offset = 0; -uaecptr read_page = 0xeeeeeeee; -uintptr read_offset = 0; -uaecptr write_page = 0xeeeeeeee; -uintptr write_offset = 0; +#include "readcpu.h" +#include "newcpu.h" + +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + +static bool illegal_mem = false; + +#ifdef SAVE_MEMORY_BANKS +addrbank *mem_banks[65536]; +#else +addrbank mem_banks[65536]; +#endif + +#ifdef WORDS_BIGENDIAN +# define swap_words(X) (X) +#else +# define swap_words(X) (((X) >> 16) | ((X) << 16)) +#endif + +#ifdef NO_INLINE_MEMORY_ACCESS +uae_u32 longget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).lget, addr); +} +uae_u32 wordget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).wget, addr); +} +uae_u32 byteget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).bget, addr); +} +void longput (uaecptr addr, uae_u32 l) +{ + call_mem_put_func (get_mem_bank (addr).lput, addr, l); +} +void wordput (uaecptr addr, uae_u32 w) +{ + call_mem_put_func (get_mem_bank (addr).wput, addr, w); +} +void byteput (uaecptr addr, uae_u32 b) +{ + call_mem_put_func (get_mem_bank (addr).bput, addr, b); +} #endif -extern "C" void breakpt(void) +/* A dummy bank that only contains zeros */ + +static uae_u32 REGPARAM2 dummy_lget (uaecptr) REGPARAM; +static uae_u32 REGPARAM2 dummy_wget (uaecptr) REGPARAM; +static uae_u32 REGPARAM2 dummy_bget (uaecptr) REGPARAM; +static void REGPARAM2 dummy_lput (uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 dummy_wput (uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 dummy_bput (uaecptr, uae_u32) REGPARAM; + +uae_u32 REGPARAM2 dummy_lget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal lget at %08x\n", addr); + + return 0; +} + +uae_u32 REGPARAM2 dummy_wget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal wget at %08x\n", addr); + + return 0; +} + +uae_u32 REGPARAM2 dummy_bget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal bget at %08x\n", addr); + + return 0; +} + +void REGPARAM2 dummy_lput (uaecptr addr, uae_u32 l) +{ + if (illegal_mem) + write_log ("Illegal lput at %08x\n", addr); +} +void REGPARAM2 dummy_wput (uaecptr addr, uae_u32 w) +{ + if (illegal_mem) + write_log ("Illegal wput at %08x\n", addr); +} +void REGPARAM2 dummy_bput (uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal bput at %08x\n", addr); +} + +/* Mac RAM (32 bit addressing) */ + +static uae_u32 REGPARAM2 ram_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram_bget(uaecptr) REGPARAM; +static void REGPARAM2 ram_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) REGPARAM; + +static uintptr RAMBaseDiff; // RAMBaseHost - RAMBaseMac + +uae_u32 REGPARAM2 ram_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 ram_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 ram_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(RAMBaseDiff + addr); +} + +void REGPARAM2 ram_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + addr); + do_put_mem_long(m, l); +} + +void REGPARAM2 ram_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + addr); + do_put_mem_word(m, w); +} + +void REGPARAM2 ram_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(RAMBaseDiff + addr) = b; +} + +uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) +{ + return (uae_u8 *)(RAMBaseDiff + addr); +} + +/* Mac RAM (24 bit addressing) */ + +static uae_u32 REGPARAM2 ram24_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram24_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram24_bget(uaecptr) REGPARAM; +static void REGPARAM2 ram24_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram24_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram24_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) REGPARAM; + +uae_u32 REGPARAM2 ram24_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 ram24_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 ram24_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); +} + +void REGPARAM2 ram24_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_long(m, l); +} + +void REGPARAM2 ram24_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_word(m, w); +} + +void REGPARAM2 ram24_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; +} + +uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) +{ + return (uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); +} + +/* Mac ROM (32 bit addressing) */ + +static uae_u32 REGPARAM2 rom_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom_bget(uaecptr) REGPARAM; +static void REGPARAM2 rom_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 rom_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 rom_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) REGPARAM; + +static uintptr ROMBaseDiff; // ROMBaseHost - ROMBaseMac + +uae_u32 REGPARAM2 rom_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(ROMBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 rom_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(ROMBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 rom_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(ROMBaseDiff + addr); +} + +void REGPARAM2 rom_lput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM lput at %08x\n", addr); +} + +void REGPARAM2 rom_wput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM wput at %08x\n", addr); +} + +void REGPARAM2 rom_bput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM bput at %08x\n", addr); +} + +uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) +{ + return (uae_u8 *)(ROMBaseDiff + addr); +} + +/* Mac ROM (24 bit addressing) */ + +static uae_u32 REGPARAM2 rom24_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom24_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom24_bget(uaecptr) REGPARAM; +static uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) REGPARAM; + +uae_u32 REGPARAM2 rom24_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(ROMBaseDiff + (addr & 0xffffff)); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 rom24_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(ROMBaseDiff + (addr & 0xffffff)); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 rom24_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); +} + +uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) +{ + return (uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); +} + +/* Frame buffer */ + +static uae_u32 REGPARAM2 frame_direct_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_direct_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_direct_bget(uaecptr) REGPARAM; +static void REGPARAM2 frame_direct_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_direct_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_direct_bput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_555_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_host_555_wget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_555_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_host_555_wput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_565_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_host_565_wget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_565_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_host_565_wput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_888_lget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_888_lput(uaecptr, uae_u32) REGPARAM; + +static uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) REGPARAM; + +static uintptr FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac + +uae_u32 REGPARAM2 frame_direct_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 frame_direct_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 frame_direct_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(FrameBaseDiff + addr); +} + +void REGPARAM2 frame_direct_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + do_put_mem_long(m, l); +} + +void REGPARAM2 frame_direct_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + do_put_mem_word(m, w); +} + +void REGPARAM2 frame_direct_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(FrameBaseDiff + addr) = b; +} + +uae_u32 REGPARAM2 frame_host_555_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = *m; + return swap_words(l); +} + +uae_u32 REGPARAM2 frame_host_555_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + return *m; +} + +void REGPARAM2 frame_host_555_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + *m = swap_words(l); +} + +void REGPARAM2 frame_host_555_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + *m = w; +} + +uae_u32 REGPARAM2 frame_host_565_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = *m; + l = (l & 0x001f001f) | ((l >> 1) & 0x7fe07fe0); + return swap_words(l); +} + +uae_u32 REGPARAM2 frame_host_565_wget(uaecptr addr) +{ + uae_u16 *m, w; + m = (uae_u16 *)(FrameBaseDiff + addr); + w = *m; + return (w & 0x1f) | ((w >> 1) & 0x7fe0); +} + +void REGPARAM2 frame_host_565_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = (l & 0x001f001f) | ((l << 1) & 0xffc0ffc0); + *m = swap_words(l); +} + +void REGPARAM2 frame_host_565_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + *m = (w & 0x1f) | ((w << 1) & 0xffc0); +} + +uae_u32 REGPARAM2 frame_host_888_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + return *m; +} + +void REGPARAM2 frame_host_888_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(MacFrameBaseHost + addr - MacFrameBaseMac); + *m = l; +} + +uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) +{ + return (uae_u8 *)(FrameBaseDiff + addr); +} + +/* Mac framebuffer RAM (24 bit addressing) + * + * This works by duplicating appropriate writes to the 32-bit + * address-space framebuffer. + */ + +static void REGPARAM2 fram24_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 fram24_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 fram24_bput(uaecptr, uae_u32) REGPARAM; + +void REGPARAM2 fram24_lput(uaecptr addr, uae_u32 l) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + uae_u32 *fm; + fm = (uae_u32 *)(MacFrameBaseHost + page_off - 0xa700); + do_put_mem_long(fm, l); + } + + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_long(m, l); +} + +void REGPARAM2 fram24_wput(uaecptr addr, uae_u32 w) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + uae_u16 *fm; + fm = (uae_u16 *)(MacFrameBaseHost + page_off - 0xa700); + do_put_mem_word(fm, w); + } + + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_word(m, w); +} + +void REGPARAM2 fram24_bput(uaecptr addr, uae_u32 b) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + *(uae_u8 *)(MacFrameBaseHost + page_off - 0xa700) = b; + } + + *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; +} + +/* Default memory access functions */ + +uae_u8 *REGPARAM2 default_xlate (uaecptr a) +{ + write_log("Your Mac program just did something terribly stupid\n"); + return NULL; +} + +/* Address banks */ + +addrbank dummy_bank = { + dummy_lget, dummy_wget, dummy_bget, + dummy_lput, dummy_wput, dummy_bput, + default_xlate +}; + +addrbank ram_bank = { + ram_lget, ram_wget, ram_bget, + ram_lput, ram_wput, ram_bput, + ram_xlate +}; + +addrbank ram24_bank = { + ram24_lget, ram24_wget, ram24_bget, + ram24_lput, ram24_wput, ram24_bput, + ram24_xlate +}; + +addrbank rom_bank = { + rom_lget, rom_wget, rom_bget, + rom_lput, rom_wput, rom_bput, + rom_xlate +}; + +addrbank rom24_bank = { + rom24_lget, rom24_wget, rom24_bget, + rom_lput, rom_wput, rom_bput, + rom24_xlate +}; + +addrbank frame_direct_bank = { + frame_direct_lget, frame_direct_wget, frame_direct_bget, + frame_direct_lput, frame_direct_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_555_bank = { + frame_host_555_lget, frame_host_555_wget, frame_direct_bget, + frame_host_555_lput, frame_host_555_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_565_bank = { + frame_host_565_lget, frame_host_565_wget, frame_direct_bget, + frame_host_565_lput, frame_host_565_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_888_bank = { + frame_host_888_lget, frame_direct_wget, frame_direct_bget, + frame_host_888_lput, frame_direct_wput, frame_direct_bput, + frame_xlate +}; + +addrbank fram24_bank = { + ram24_lget, ram24_wget, ram24_bget, + fram24_lput, fram24_wput, fram24_bput, + ram24_xlate +}; + +void memory_init(void) { - // bug("bus err: pc=%08x, sp=%08x, addr=%08x", m68k_getpc(), regs.regs[15], regs.mmu_fault_addr); + for(long i=0; i<65536; i++) + put_mem_bank(i<<16, &dummy_bank); + + // Limit RAM size to not overlap ROM + uint32 ram_size = RAMSize > ROMBaseMac ? ROMBaseMac : RAMSize; + + RAMBaseDiff = (uintptr)RAMBaseHost - (uintptr)RAMBaseMac; + ROMBaseDiff = (uintptr)ROMBaseHost - (uintptr)ROMBaseMac; + FrameBaseDiff = (uintptr)MacFrameBaseHost - (uintptr)MacFrameBaseMac; + + // Map RAM, ROM and display + if (TwentyFourBitAddressing) { + map_banks(&ram24_bank, RAMBaseMac >> 16, ram_size >> 16); + map_banks(&rom24_bank, ROMBaseMac >> 16, ROMSize >> 16); + + // Map frame buffer at end of RAM. + map_banks(&fram24_bank, ((RAMBaseMac + ram_size) >> 16) - 1, 1); + } else { + map_banks(&ram_bank, RAMBaseMac >> 16, ram_size >> 16); + map_banks(&rom_bank, ROMBaseMac >> 16, ROMSize >> 16); + + // Map frame buffer + switch (MacFrameLayout) { + case FLAYOUT_DIRECT: + map_banks(&frame_direct_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_555: + map_banks(&frame_host_555_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_565: + map_banks(&frame_host_565_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_888: + map_banks(&frame_host_888_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + } + } } -#if !KNOWN_ALLOC && !NORMAL_ADDRESSING -// This part need rewrite for ARAnyM !! -// It can be taken from hatari. +void map_banks(addrbank *bank, int start, int size) +{ + int bnr; + unsigned long int hioffs = 0, endhioffs = 0x100; + + if (start >= 0x100) { + for (bnr = start; bnr < start + size; bnr++) + put_mem_bank (bnr << 16, bank); + return; + } + if (TwentyFourBitAddressing) endhioffs = 0x10000; + for (hioffs = 0; hioffs < endhioffs; hioffs += 0x100) + for (bnr = start; bnr < start+size; bnr++) + put_mem_bank((bnr + hioffs) << 16, bank); +} -#error Not prepared for your platform, maybe you need memory banks from hatari +#endif /* !REAL_ADDRESSING && !DIRECT_ADDRESSING */ -#endif /* !KNOWN_ALLOC && !NORMAL_ADDRESSING */ diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index f7bab41de..26b3c5f10 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -23,10 +23,6 @@ #ifndef UAE_MEMORY_H #define UAE_MEMORY_H -#if DIRECT_ADDRESSING -extern uintptr MEMBaseDiff; -#endif - extern void Exception (int, uaecptr); #ifdef EXCEPTIONS_VIA_LONGJMP extern JMP_BUF excep_env; @@ -54,8 +50,109 @@ extern void Exception (int, uaecptr); #define THROW_AGAIN(var) throw #define VOLATILE #endif /* EXCEPTIONS_VIA_LONGJMP */ +extern int in_exception_2; + +#if !DIRECT_ADDRESSING && !REAL_ADDRESSING + +/* Enabling this adds one additional native memory reference per 68k memory + * access, but saves one shift (on the x86). Enabling this is probably + * better for the cache. My favourite benchmark (PP2) doesn't show a + * difference, so I leave this enabled. */ + +#if 1 || defined SAVE_MEMORY +#define SAVE_MEMORY_BANKS +#endif + +typedef uae_u32 (REGPARAM2 *mem_get_func)(uaecptr) REGPARAM; +typedef void (REGPARAM2 *mem_put_func)(uaecptr, uae_u32) REGPARAM; +typedef uae_u8 *(REGPARAM2 *xlate_func)(uaecptr) REGPARAM; + +#undef DIRECT_MEMFUNCS_SUCCESSFUL + +#ifndef CAN_MAP_MEMORY +#undef USE_COMPILER +#endif + +#if defined(USE_COMPILER) && !defined(USE_MAPPED_MEMORY) +#define USE_MAPPED_MEMORY +#endif + +typedef struct { + /* These ones should be self-explanatory... */ + mem_get_func lget, wget, bget; + mem_put_func lput, wput, bput; + /* Use xlateaddr to translate an Amiga address to a uae_u8 * that can + * be used to address memory without calling the wget/wput functions. + * This doesn't work for all memory banks, so this function may call + * abort(). */ + xlate_func xlateaddr; +} addrbank; + +extern uae_u8 filesysory[65536]; + +extern addrbank ram_bank; // Mac RAM +extern addrbank rom_bank; // Mac ROM +extern addrbank frame_bank; // Frame buffer + +/* Default memory access functions */ + +extern uae_u8 *REGPARAM2 default_xlate(uaecptr addr) REGPARAM; + +#define bankindex(addr) (((uaecptr)(addr)) >> 16) + +#ifdef SAVE_MEMORY_BANKS +extern addrbank *mem_banks[65536]; +#define get_mem_bank(addr) (*mem_banks[bankindex(addr)]) +#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = (b)) +#else +extern addrbank mem_banks[65536]; +#define get_mem_bank(addr) (mem_banks[bankindex(addr)]) +#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = *(b)) +#endif + +extern void memory_init(void); +extern void map_banks(addrbank *bank, int first, int count); + +#ifndef NO_INLINE_MEMORY_ACCESS + +#define longget(addr) (call_mem_get_func(get_mem_bank(addr).lget, addr)) +#define wordget(addr) (call_mem_get_func(get_mem_bank(addr).wget, addr)) +#define byteget(addr) (call_mem_get_func(get_mem_bank(addr).bget, addr)) +#define longput(addr,l) (call_mem_put_func(get_mem_bank(addr).lput, addr, l)) +#define wordput(addr,w) (call_mem_put_func(get_mem_bank(addr).wput, addr, w)) +#define byteput(addr,b) (call_mem_put_func(get_mem_bank(addr).bput, addr, b)) + +#else + +extern uae_u32 longget(uaecptr addr); +extern uae_u32 wordget(uaecptr addr); +extern uae_u32 byteget(uaecptr addr); +extern void longput(uaecptr addr, uae_u32 l); +extern void wordput(uaecptr addr, uae_u32 w); +extern void byteput(uaecptr addr, uae_u32 b); + +#endif + +#ifndef MD_HAVE_MEM_1_FUNCS -#if DIRECT_ADDRESSING +#define longget_1 longget +#define wordget_1 wordget +#define byteget_1 byteget +#define longput_1 longput +#define wordput_1 wordput +#define byteput_1 byteput + +#endif + +#endif /* !DIRECT_ADDRESSING && !REAL_ADDRESSING */ + +#if REAL_ADDRESSING +const uintptr MEMBaseDiff = 0; +#elif DIRECT_ADDRESSING +extern uintptr MEMBaseDiff; +#endif + +#if REAL_ADDRESSING || DIRECT_ADDRESSING static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { return (uae_u8 *)MEMBaseDiff + addr; @@ -69,57 +166,71 @@ static __inline__ uae_u32 get_long(uaecptr addr) uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); return do_get_mem_long(m); } -#define phys_get_long get_long static __inline__ uae_u32 get_word(uaecptr addr) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); return do_get_mem_word(m); } -#define phys_get_word get_word static __inline__ uae_u32 get_byte(uaecptr addr) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); return do_get_mem_byte(m); } -#define phys_get_byte get_byte static __inline__ void put_long(uaecptr addr, uae_u32 l) { uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); do_put_mem_long(m, l); } -#define phys_put_long put_long static __inline__ void put_word(uaecptr addr, uae_u32 w) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); do_put_mem_word(m, w); } -#define phys_put_word put_word static __inline__ void put_byte(uaecptr addr, uae_u32 b) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); do_put_mem_byte(m, b); } -#define phys_put_byte put_byte static __inline__ uae_u8 *get_real_address(uaecptr addr) { return do_get_real_address(addr); } -static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) +static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) { - return do_get_real_address(addr); + return do_get_virtual_address(addr); } -static inline uae_u8 *phys_get_real_address(uaecptr addr) +#else +static __inline__ uae_u32 get_long(uaecptr addr) { - return do_get_real_address(addr); + return longget_1(addr); } -static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) +static __inline__ uae_u32 get_word(uaecptr addr) { - return do_get_virtual_address(addr); + return wordget_1(addr); } -#endif /* DIRECT_ADDRESSING */ - -static __inline__ void check_ram_boundary(uaecptr addr, int size, bool write) {} -static inline void flush_internals() {} +static __inline__ uae_u32 get_byte(uaecptr addr) +{ + return byteget_1(addr); +} +static __inline__ void put_long(uaecptr addr, uae_u32 l) +{ + longput_1(addr, l); +} +static __inline__ void put_word(uaecptr addr, uae_u32 w) +{ + wordput_1(addr, w); +} +static __inline__ void put_byte(uaecptr addr, uae_u32 b) +{ + byteput_1(addr, b); +} +static __inline__ uae_u8 *get_real_address(uaecptr addr) +{ + return get_mem_bank(addr).xlateaddr(addr); +} +/* gb-- deliberately not implemented since it shall not be used... */ +extern uae_u32 get_virtual_address(uae_u8 *addr); +#endif /* DIRECT_ADDRESSING || REAL_ADDRESSING */ #endif /* MEMORY_H */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index ac1505f5c..e9d0b88d5 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -1,74 +1,51 @@ /* - * newcpu.cpp - CPU emulation + * UAE - The Un*x Amiga Emulator * - * Copyright (c) 2010 ARAnyM dev team (see AUTHORS) - * + * MC68000 emulation * - * Inspired by Christian Bauer's Basilisk II + * (c) 1995 Bernd Schmidt * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM is free software; you can redistribute it and/or modify + * 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. * - * ARAnyM is distributed in the hope that it will be useful, + * 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 ARAnyM; if not, write to the Free Software + * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * (c) 1995 Bernd Schmidt - */ + +#include +#include +#include #include "sysdeps.h" -#include #include "cpu_emulation.h" #include "main.h" #include "emul_op.h" + +extern int intlev(void); // From baisilisk_glue.cpp + #include "m68k.h" #include "memory.h" #include "readcpu.h" #include "newcpu.h" -#ifdef USE_JIT -# include "compiler/compemu.h" -#endif +#include "compiler/compemu.h" #include "fpu/fpu.h" -#include "cpummu.h" -// #include "natfeats.h" -// #include "disasm-glue.h" - -#include -#define DEBUG 0 -#include "debug.h" - -#define SANITY_CHECK_ATC 1 - -struct fixup fixup = {0, 0, 0}; - -int quit_program = 0; - -// For instruction $7139 -bool cpu_debugging = false; +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) +B2_mutex *spcflags_lock = NULL; +#endif +bool quit_program = false; struct flag_struct regflags; -/* LongJump buffers */ -#ifdef EXCEPTIONS_VIA_LONGJMP -JMP_BUF excep_env; -#endif /* Opcode of faulting instruction */ uae_u16 last_op_for_exception_3; /* PC at fault time */ @@ -83,34 +60,19 @@ int movem_index1[256]; int movem_index2[256]; int movem_next[256]; -#ifdef FLIGHT_RECORDER - -// feel free to edit the following defines to customize the dump -#define FRLOG_HOTKEY 1 /* 1 = dump only when hotkey is held down */ -#define FRLOG_ALL 1 /* 1 = dump continuously to ever growing log */ -#define FRLOG_IRQ 0 /* 1 = dump also CPU in interrupts */ -#define FRLOG_REGS 0 /* 1 = dump also all data/address registers */ -#define FRLOG_SIZE 8192 /* this many instructions in single dump */ +cpuop_func *cpufunctbl[65536]; +#if FLIGHT_RECORDER struct rec_step { + uae_u32 pc; +#if FLIGHT_RECORDER >= 2 uae_u32 d[8]; uae_u32 a[8]; - uae_u32 pc; - uae_u16 sr; - uae_u32 usp; - uae_u32 msp; - uae_u32 isp; - uae_u16 instr; +#endif }; -bool cpu_flight_recorder_active = false; - -#if FRLOG_ALL -const int LOG_SIZE = 10; -#else -const int LOG_SIZE = FRLOG_SIZE; -#endif -static rec_step frlog[LOG_SIZE]; +const int LOG_SIZE = 32768; +static rec_step log[LOG_SIZE]; static int log_ptr = -1; // First time initialization static const char *log_filename(void) @@ -119,580 +81,848 @@ static const char *log_filename(void) return name ? name : "log.68k"; } -void dump_flight_recorder(void) +void m68k_record_step(uaecptr pc) { -#if FRLOG_ALL - FILE *f = fopen(log_filename(), "a"); -#else - FILE *f = fopen(log_filename(), "w"); +#if FLIGHT_RECORDER >= 2 + /* XXX: if LSB is set, we are recording from generated code and we + don't support registers recording yet. */ + if ((pc & 1) == 0) { + for (int i = 0; i < 8; i++) { + log[log_ptr].d[i] = m68k_dreg(regs, i); + log[log_ptr].a[i] = m68k_areg(regs, i); + } + } #endif + log[log_ptr].pc = pc; + log_ptr = (log_ptr + 1) % LOG_SIZE; +} + +static void dump_log(void) +{ + FILE *f = fopen(log_filename(), "w"); if (f == NULL) return; for (int i = 0; i < LOG_SIZE; i++) { int j = (i + log_ptr) % LOG_SIZE; - fprintf(f, "pc %08x instr %04x sr %04x usp %08x msp %08x isp %08x\n", frlog[j].pc, frlog[j].instr, frlog[j].sr, frlog[j].usp, frlog[j].msp, frlog[j].isp); - // adding a simple opcode -> assembler conversion table would help -#if FRLOG_REGS - fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", frlog[j].d[0], frlog[j].d[1], frlog[j].d[2], frlog[j].d[3]); - fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", frlog[j].d[4], frlog[j].d[5], frlog[j].d[6], frlog[j].d[7]); - fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", frlog[j].a[0], frlog[j].a[1], frlog[j].a[2], frlog[j].a[3]); - fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", frlog[j].a[4], frlog[j].a[5], frlog[j].a[6], frlog[j].a[7]); + uae_u32 pc = log[j].pc & ~1; + fprintf(f, "pc %08x", pc); +#if FLIGHT_RECORDER >= 2 + fprintf(f, "\n"); + if ((log[j].pc & 1) == 0) { + fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", log[j].d[0], log[j].d[1], log[j].d[2], log[j].d[3]); + fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", log[j].d[4], log[j].d[5], log[j].d[6], log[j].d[7]); + fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", log[j].a[0], log[j].a[1], log[j].a[2], log[j].a[3]); + fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", log[j].a[4], log[j].a[5], log[j].a[6], log[j].a[7]); + } +#else + fprintf(f, " | "); +#endif +#if ENABLE_MON + disass_68k(f, pc); #endif } fclose(f); } +#endif -void m68k_record_step(uaecptr pc, int opcode) +#if ENABLE_MON +static void dump_regs(void) { - static bool last_state = false; + m68k_dumpstate(NULL); +} +#endif -#if FRLOG_HOTKEY - if (! cpu_flight_recorder_active) { - if (last_state) { - // dump log out - dump_flight_recorder(); +#define COUNT_INSTRS 0 - // remember last state - last_state = false; - } - return; - } -#endif +#if COUNT_INSTRS +static unsigned long int instrcount[65536]; +static uae_u16 opcodenums[65536]; - if (! last_state) { - // reset old log - log_ptr = 0; - memset(frlog, 0, sizeof(frlog)); - // remember last state - last_state = true; - } +static int compfn (const void *el1, const void *el2) +{ + return instrcount[*(const uae_u16 *)el1] < instrcount[*(const uae_u16 *)el2]; +} -#if FRLOG_REGS - for (int i = 0; i < 8; i++) { - frlog[log_ptr].d[i] = m68k_dreg(regs, i); - frlog[log_ptr].a[i] = m68k_areg(regs, i); - } -#endif - frlog[log_ptr].pc = pc; +static char *icountfilename (void) +{ + char *name = getenv ("INSNCOUNT"); + if (name) + return name; + return COUNT_INSTRS == 2 ? "frequent.68k" : "insncount"; +} - MakeSR(); -#if ! FRLOG_IRQ - // is CPU in interrupt handler? Quit if should not be logged. - if (regs.s && !regs.m) return; -#endif - frlog[log_ptr].sr = regs.sr; - frlog[log_ptr].usp = regs.usp; - frlog[log_ptr].msp = regs.msp; - frlog[log_ptr].isp = regs.isp; - frlog[log_ptr].instr = opcode; +void dump_counts (void) +{ + FILE *f = fopen (icountfilename (), "w"); + unsigned long int total; + int i; - log_ptr = (log_ptr + 1) % LOG_SIZE; -#if FRLOG_ALL - if (log_ptr == 0) dump_flight_recorder(); -#endif + write_log ("Writing instruction count file...\n"); + for (i = 0; i < 65536; i++) { + opcodenums[i] = i; + total += instrcount[i]; + } + qsort (opcodenums, 65536, sizeof(uae_u16), compfn); + + fprintf (f, "Total: %lu\n", total); + for (i=0; i < 65536; i++) { + unsigned long int cnt = instrcount[opcodenums[i]]; + struct instr *dp; + struct mnemolookup *lookup; + if (!cnt) + break; + dp = table68k + opcodenums[i]; + for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) + ; + fprintf (f, "%04x: %lu %s\n", opcodenums[i], cnt, lookup->name); + } + fclose (f); +} +#else +void dump_counts (void) +{ } -#endif /* FLIGHT_RECORDER */ +#endif int broken_in; -static inline unsigned int cft_map (unsigned int f) +static __inline__ unsigned int cft_map (unsigned int f) { -#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU) - return f; +#ifndef HAVE_GET_WORD_UNSWAPPED + return f; #else - return do_byteswap_16(f); + return ((f >> 8) & 255) | ((f & 255) << 8); #endif } +void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; + void REGPARAM2 op_illg_1 (uae_u32 opcode) { - op_illg (cft_map (opcode)); + op_illg (cft_map (opcode)); } +static void build_cpufunctbl (void) +{ + int i; + unsigned long opcode; + unsigned int cpu_level = 0; // 68000 (default) + if (CPUType == 4) + cpu_level = 4; // 68040 with FPU + else { + if (FPUType) + cpu_level = 3; // 68020 with FPU + else if (CPUType >= 2) + cpu_level = 2; // 68020 + else if (CPUType == 1) + cpu_level = 1; + } + struct cputbl *tbl = ( + cpu_level == 4 ? op_smalltbl_0_ff + : cpu_level == 3 ? op_smalltbl_1_ff + : cpu_level == 2 ? op_smalltbl_2_ff + : cpu_level == 1 ? op_smalltbl_3_ff + : op_smalltbl_4_ff); + + for (opcode = 0; opcode < 65536; opcode++) + cpufunctbl[cft_map (opcode)] = op_illg_1; + for (i = 0; tbl[i].handler != NULL; i++) { + if (! tbl[i].specific) + cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; + } + for (opcode = 0; opcode < 65536; opcode++) { + cpuop_func *f; + + if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) + continue; + + if (table68k[opcode].handler != -1) { + f = cpufunctbl[cft_map (table68k[opcode].handler)]; + if (f == op_illg_1) + abort(); + cpufunctbl[cft_map (opcode)] = f; + } + } + for (i = 0; tbl[i].handler != NULL; i++) { + if (tbl[i].specific) + cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; + } +} void init_m68k (void) { - int i; + int i; - for (i = 0 ; i < 256 ; i++) { - int j; - for (j = 0 ; j < 8 ; j++) { - if (i & (1 << j)) break; + for (i = 0 ; i < 256 ; i++) { + int j; + for (j = 0 ; j < 8 ; j++) { + if (i & (1 << j)) break; + } + movem_index1[i] = j; + movem_index2[i] = 7-j; + movem_next[i] = i & (~(1 << j)); } - movem_index1[i] = j; - movem_index2[i] = 7-j; - movem_next[i] = i & (~(1 << j)); - } -#ifdef USE_JIT - /* still needed by build_comp(); FIXME */ - read_table68k (); - do_merges (); +#if COUNT_INSTRS + { + FILE *f = fopen (icountfilename (), "r"); + memset (instrcount, 0, sizeof instrcount); + if (f) { + uae_u32 opcode, count, total; + char name[20]; + write_log ("Reading instruction count file...\n"); + fscanf (f, "Total: %lu\n", &total); + while (fscanf (f, "%lx: %lu %s\n", &opcode, &count, name) == 3) { + instrcount[opcode] = count; + } + fclose(f); + } + } +#endif + read_table68k (); + do_merges (); + + build_cpufunctbl (); + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + spcflags_lock = B2_create_mutex(); #endif - fpu_init (CPUType == 4); + fpu_init(CPUType == 4); } void exit_m68k (void) { fpu_exit (); - - free(table68k); - table68k = NULL; +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + B2_delete_mutex(spcflags_lock); +#endif } struct regstruct regs, lastint_regs; -// MJ static struct regstruct regs_backup[16]; -// MJ static int backup_pointer = 0; +static struct regstruct regs_backup[16]; +static int backup_pointer = 0; +static long int m68kpc_offset; int lastint_no; - -#ifdef FULLMMU -static inline uae_u8 get_ibyte_1(uae_u32 o) -{ - return get_ibyte(o); -} -static inline uae_u16 get_iword_1(uae_u32 o) -{ - return get_iword(o); -} -static inline uae_u32 get_ilong_1(uae_u32 o) -{ - return get_ilong(o); -} +#if REAL_ADDRESSING || DIRECT_ADDRESSING +#define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) +#define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) +#define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) #else -# define get_ibyte_1(o) get_byte(m68k_getpc() + (o) + 1) -# define get_iword_1(o) get_word(m68k_getpc() + (o)) -# define get_ilong_1(o) get_long(m68k_getpc() + (o)) +#define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1) +#define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) +#define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) #endif -/* - * extract bitfield data from memory and return it in the MSBs - * bdata caches the unmodified data for put_bitfield() - */ -uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width) +uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf) { - uae_u32 tmp, res, mask; - - offset &= 7; - mask = 0xffffffffu << (32 - width); - switch ((offset + width + 7) >> 3) { - case 1: - tmp = get_byte(src); - res = tmp << (24 + offset); - bdata[0] = tmp & ~(mask >> (24 + offset)); + uae_u16 dp; + uae_s8 disp8; + uae_s16 disp16; + int r; + uae_u32 dispreg; + uaecptr addr; + uae_s32 offset = 0; + char buffer[80]; + + switch (mode){ + case Dreg: + sprintf (buffer,"D%d", reg); break; - case 2: - tmp = get_word(src); - res = tmp << (16 + offset); - bdata[0] = tmp & ~(mask >> (16 + offset)); + case Areg: + sprintf (buffer,"A%d", reg); break; - case 3: - tmp = get_word(src); - res = tmp << (16 + offset); - bdata[0] = tmp & ~(mask >> (16 + offset)); - tmp = get_byte(src + 2); - res |= tmp << (8 + offset); - bdata[1] = tmp & ~(mask >> (8 + offset)); + case Aind: + sprintf (buffer,"(A%d)", reg); break; - case 4: - tmp = get_long(src); - res = tmp << offset; - bdata[0] = tmp & ~(mask >> offset); + case Aipi: + sprintf (buffer,"(A%d)+", reg); break; - case 5: - tmp = get_long(src); - res = tmp << offset; - bdata[0] = tmp & ~(mask >> offset); - tmp = get_byte(src + 4); - res |= tmp >> (8 - offset); - bdata[1] = tmp & ~(mask << (8 - offset)); + case Apdi: + sprintf (buffer,"-(A%d)", reg); + break; + case Ad16: + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr = m68k_areg(regs,reg) + (uae_s16)disp16; + sprintf (buffer,"(A%d,$%04x) == $%08lx", reg, disp16 & 0xffff, + (unsigned long)addr); + break; + case Ad8r: + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0, disp = 0; + uae_s32 base = m68k_areg(regs,reg); + char name[10]; + sprintf (name,"A%d, ",reg); + if (dp & 0x80) { base = 0; name[0] = 0; } + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), + disp,outer, + (unsigned long)addr); + } else { + addr = m68k_areg(regs,reg) + (uae_s32)((uae_s8)disp8) + dispreg; + sprintf (buffer,"(A%d, %c%d.%c*%d, $%02x) == $%08lx", reg, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), disp8, + (unsigned long)addr); + } + break; + case PC16: + addr = m68k_getpc () + m68kpc_offset; + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr += (uae_s16)disp16; + sprintf (buffer,"(PC,$%04x) == $%08lx", disp16 & 0xffff,(unsigned long)addr); + break; + case PC8r: + addr = m68k_getpc () + m68kpc_offset; + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0,disp = 0; + uae_s32 base = addr; + char name[10]; + sprintf (name,"PC, "); + if (dp & 0x80) { base = 0; name[0] = 0; } + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), + disp,outer, + (unsigned long)addr); + } else { + addr += (uae_s32)((uae_s8)disp8) + dispreg; + sprintf (buffer,"(PC, %c%d.%c*%d, $%02x) == $%08lx", dp & 0x8000 ? 'A' : 'D', + (int)r, dp & 0x800 ? 'L' : 'W', 1 << ((dp >> 9) & 3), + disp8, (unsigned long)addr); + } + break; + case absw: + sprintf (buffer,"$%08lx", (unsigned long)(uae_s32)(uae_s16)get_iword_1 (m68kpc_offset)); + m68kpc_offset += 2; + break; + case absl: + sprintf (buffer,"$%08lx", (unsigned long)get_ilong_1 (m68kpc_offset)); + m68kpc_offset += 4; + break; + case imm: + switch (size){ + case sz_byte: + sprintf (buffer,"#$%02x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xff)); + m68kpc_offset += 2; + break; + case sz_word: + sprintf (buffer,"#$%04x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xffff)); + m68kpc_offset += 2; + break; + case sz_long: + sprintf (buffer,"#$%08lx", (unsigned long)(get_ilong_1 (m68kpc_offset))); + m68kpc_offset += 4; + break; + default: + break; + } + break; + case imm0: + offset = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + sprintf (buffer,"#$%02x", (unsigned int)(offset & 0xff)); + break; + case imm1: + offset = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + sprintf (buffer,"#$%04x", (unsigned int)(offset & 0xffff)); + break; + case imm2: + offset = (uae_s32)get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + sprintf (buffer,"#$%08lx", (unsigned long)offset); + break; + case immi: + offset = (uae_s32)(uae_s8)(reg & 0xff); + sprintf (buffer,"#$%08lx", (unsigned long)offset); break; default: - /* Panic? */ - res = 0; break; } - return res; + if (buf == 0) + printf ("%s", buffer); + else + strcat (buf, buffer); + return offset; } -/* - * write bitfield data (in the LSBs) back to memory, upper bits - * must be cleared already. - */ -void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width) +/* The plan is that this will take over the job of exception 3 handling - + * the CPU emulation functions will just do a longjmp to m68k_go whenever + * they hit an odd address. */ +static int verify_ea (int reg, amodes mode, wordsizes size, uae_u32 *val) { - offset = (offset & 7) + width; - switch ((offset + 7) >> 3) { - case 1: - put_byte(dst, bdata[0] | (val << (8 - offset))); + uae_u16 dp; + uae_s8 disp8; + uae_s16 disp16; + int r; + uae_u32 dispreg; + uaecptr addr; + uae_s32 offset = 0; + + switch (mode){ + case Dreg: + *val = m68k_dreg (regs, reg); + return 1; + case Areg: + *val = m68k_areg (regs, reg); + return 1; + + case Aind: + case Aipi: + addr = m68k_areg (regs, reg); break; - case 2: - put_word(dst, bdata[0] | (val << (16 - offset))); + case Apdi: + addr = m68k_areg (regs, reg); break; - case 3: - put_word(dst, bdata[0] | (val >> (offset - 16))); - put_byte(dst + 2, bdata[1] | (val << (24 - offset))); + case Ad16: + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr = m68k_areg(regs,reg) + (uae_s16)disp16; break; - case 4: - put_long(dst, bdata[0] | (val << (32 - offset))); + case Ad8r: + addr = m68k_areg (regs, reg); +d8r_common: + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0, disp = 0; + uae_s32 base = addr; + if (dp & 0x80) base = 0; + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + } else { + addr += (uae_s32)((uae_s8)disp8) + dispreg; + } + break; + case PC16: + addr = m68k_getpc () + m68kpc_offset; + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr += (uae_s16)disp16; break; - case 5: - put_long(dst, bdata[0] | (val >> (offset - 32))); - put_byte(dst + 4, bdata[1] | (val << (40 - offset))); + case PC8r: + addr = m68k_getpc () + m68kpc_offset; + goto d8r_common; + case absw: + addr = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + break; + case absl: + addr = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + break; + case imm: + switch (size){ + case sz_byte: + *val = get_iword_1 (m68kpc_offset) & 0xff; + m68kpc_offset += 2; + break; + case sz_word: + *val = get_iword_1 (m68kpc_offset) & 0xffff; + m68kpc_offset += 2; + break; + case sz_long: + *val = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + break; + default: + break; + } + return 1; + case imm0: + *val = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + return 1; + case imm1: + *val = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + return 1; + case imm2: + *val = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + return 1; + case immi: + *val = (uae_s32)(uae_s8)(reg & 0xff); + return 1; + default: + addr = 0; break; } + if ((addr & 1) == 0) + return 1; + + last_addr_for_exception_3 = m68k_getpc () + m68kpc_offset; + last_fault_for_exception_3 = addr; + return 0; } uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp) { - int reg = (dp >> 12) & 15; - uae_s32 regd = regs.regs[reg]; - if ((dp & 0x800) == 0) - regd = (uae_s32)(uae_s16)regd; - regd <<= (dp >> 9) & 3; - if (dp & 0x100) { - uae_s32 outer = 0; - if (dp & 0x80) base = 0; - if (dp & 0x40) regd = 0; - - if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)next_iword(); - if ((dp & 0x30) == 0x30) base += next_ilong(); - - if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)next_iword(); - if ((dp & 0x3) == 0x3) outer = next_ilong(); - - if ((dp & 0x4) == 0) base += regd; - if (dp & 0x3) base = get_long (base); - if (dp & 0x4) base += regd; - - return base + outer; - } else { - return base + (uae_s32)((uae_s8)dp) + regd; - } + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + regd <<= (dp >> 9) & 3; + if (dp & 0x100) { + uae_s32 outer = 0; + if (dp & 0x80) base = 0; + if (dp & 0x40) regd = 0; + + if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x30) == 0x30) base += next_ilong(); + + if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x3) == 0x3) outer = next_ilong(); + + if ((dp & 0x4) == 0) base += regd; + if (dp & 0x3) base = get_long (base); + if (dp & 0x4) base += regd; + + return base + outer; + } else { + return base + (uae_s32)((uae_s8)dp) + regd; + } } uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp) { - int reg = (dp >> 12) & 15; - uae_s32 regd = regs.regs[reg]; + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; #if 1 - if ((dp & 0x800) == 0) - regd = (uae_s32)(uae_s16)regd; - return base + (uae_s8)dp + regd; + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + return base + (uae_s8)dp + regd; #else - /* Branch-free code... benchmark this again now that - * things are no longer inline. */ - uae_s32 regd16; - uae_u32 mask; - mask = ((dp & 0x800) >> 11) - 1; - regd16 = (uae_s32)(uae_s16)regd; - regd16 &= mask; - mask = ~mask; - base += (uae_s8)dp; - regd &= mask; - regd |= regd16; - return base + regd; + /* Branch-free code... benchmark this again now that + * things are no longer inline. */ + uae_s32 regd16; + uae_u32 mask; + mask = ((dp & 0x800) >> 11) - 1; + regd16 = (uae_s32)(uae_s16)regd; + regd16 &= mask; + mask = ~mask; + base += (uae_s8)dp; + regd &= mask; + regd |= regd16; + return base + regd; #endif } void MakeSR (void) { #if 0 - assert((regs.t1 & 1) == regs.t1); - assert((regs.t0 & 1) == regs.t0); - assert((regs.s & 1) == regs.s); - assert((regs.m & 1) == regs.m); - assert((XFLG & 1) == XFLG); - assert((NFLG & 1) == NFLG); - assert((ZFLG & 1) == ZFLG); - assert((VFLG & 1) == VFLG); - assert((CFLG & 1) == CFLG); + assert((regs.t1 & 1) == regs.t1); + assert((regs.t0 & 1) == regs.t0); + assert((regs.s & 1) == regs.s); + assert((regs.m & 1) == regs.m); + assert((XFLG & 1) == XFLG); + assert((NFLG & 1) == NFLG); + assert((ZFLG & 1) == ZFLG); + assert((VFLG & 1) == VFLG); + assert((CFLG & 1) == CFLG); #endif - regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) - | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) - | (GET_XFLG << 4) | (GET_NFLG << 3) | (GET_ZFLG << 2) | (GET_VFLG << 1) - | GET_CFLG); + regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) + | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) + | (GET_XFLG << 4) | (GET_NFLG << 3) | (GET_ZFLG << 2) | (GET_VFLG << 1) + | GET_CFLG); } void MakeFromSR (void) { - int oldm = regs.m; - int olds = regs.s; - - regs.t1 = (regs.sr >> 15) & 1; - regs.t0 = (regs.sr >> 14) & 1; - regs.s = (regs.sr >> 13) & 1; - mmu_set_super(regs.s); - regs.m = (regs.sr >> 12) & 1; - regs.intmask = (regs.sr >> 8) & 7; - SET_XFLG ((regs.sr >> 4) & 1); - SET_NFLG ((regs.sr >> 3) & 1); - SET_ZFLG ((regs.sr >> 2) & 1); - SET_VFLG ((regs.sr >> 1) & 1); - SET_CFLG (regs.sr & 1); - if (olds != regs.s) { - if (olds) { - if (oldm) - regs.msp = m68k_areg(regs, 7); - else - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.usp; - } else { - regs.usp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; - } - } else if (olds && oldm != regs.m) { - if (oldm) { - regs.msp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - } else { - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.msp; - } + int oldm = regs.m; + int olds = regs.s; + + regs.t1 = (regs.sr >> 15) & 1; + regs.t0 = (regs.sr >> 14) & 1; + regs.s = (regs.sr >> 13) & 1; + regs.m = (regs.sr >> 12) & 1; + regs.intmask = (regs.sr >> 8) & 7; + SET_XFLG ((regs.sr >> 4) & 1); + SET_NFLG ((regs.sr >> 3) & 1); + SET_ZFLG ((regs.sr >> 2) & 1); + SET_VFLG ((regs.sr >> 1) & 1); + SET_CFLG (regs.sr & 1); + if (CPUType >= 2) { + if (olds != regs.s) { + if (olds) { + if (oldm) + regs.msp = m68k_areg(regs, 7); + else + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.usp; + } else { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + } + } else if (olds && oldm != regs.m) { + if (oldm) { + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + } else { + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.msp; + } + } + } else { + if (olds != regs.s) { + if (olds) { + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.usp; + } else { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + } + } } - SPCFLAGS_SET( SPCFLAG_INT ); - if (regs.t1 || regs.t0) - SPCFLAGS_SET( SPCFLAG_TRACE ); - else - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); -} - -/* for building exception frames */ -static inline void exc_push_word(uae_u16 w) -{ - m68k_areg(regs, 7) -= 2; - put_word(m68k_areg(regs, 7), w); -} -static inline void exc_push_long(uae_u32 l) -{ - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), l); -} - -static inline void exc_make_frame( - int format, - uae_u16 sr, - uae_u32 currpc, - int nr, - uae_u32 x0, - uae_u32 x1 -) -{ - switch(format) { - case 4: - exc_push_long(x1); - exc_push_long(x0); - break; - case 3: - case 2: - exc_push_long(x0); - break; - } - - exc_push_word((format << 12) + (nr * 4)); /* format | vector */ - exc_push_long(currpc); - exc_push_word(sr); + SPCFLAGS_SET( SPCFLAG_INT ); + if (regs.t1 || regs.t0) + SPCFLAGS_SET( SPCFLAG_TRACE ); + else + /* Keep SPCFLAG_DOTRACE, we still want a trace exception for + SR-modifying instructions (including STOP). */ + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); } -#ifdef EXCEPTIONS_VIA_LONGJMP -static int building_bus_fault_stack_frame=0; -#endif - void Exception(int nr, uaecptr oldpc) { - uae_u32 currpc = m68k_getpc (); - MakeSR(); - - if (fixup.flag) - { - m68k_areg(regs, fixup.reg) = fixup.value; - fixup.flag = 0; - } - - if (!regs.s) { - regs.usp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; - regs.s = 1; - mmu_set_super(1); - } - - if (nr == 2) { - /* BUS ERROR handler begins */ -#ifdef ENABLE_EPSLIMITER - check_eps_limit(currpc); -#endif - // panicbug("Exception Nr. %d CPC: %08lx NPC: %08lx SP=%08lx Addr: %08lx", nr, currpc, get_long (regs.vbr + 4*nr), m68k_areg(regs, 7), regs.mmu_fault_addr); - -#ifdef EXCEPTIONS_VIA_LONGJMP - if (!building_bus_fault_stack_frame) -#else - try -#endif - { -#ifdef EXCEPTIONS_VIA_LONGJMP - building_bus_fault_stack_frame= 1; -#endif - /* 68040 */ - exc_push_long(0); /* PD3 */ - exc_push_long(0); /* PD2 */ - exc_push_long(0); /* PD1 */ - exc_push_long(0); /* PD0/WB1D */ - exc_push_long(0); /* WB1A */ - exc_push_long(0); /* WB2D */ - exc_push_long(0); /* WB2A */ - exc_push_long(regs.wb3_data); /* WB3D */ - exc_push_long(regs.mmu_fault_addr); /* WB3A */ - exc_push_long(regs.mmu_fault_addr); - exc_push_word(0); /* WB1S */ - exc_push_word(0); /* WB2S */ - exc_push_word(regs.wb3_status); /* WB3S */ - regs.wb3_status = 0; - exc_push_word(regs.mmu_ssw); - exc_push_long(regs.mmu_fault_addr); /* EA */ - exc_make_frame(7, regs.sr, regs.fault_pc, 2, 0, 0); - + uae_u32 currpc = m68k_getpc (); + MakeSR(); + if (!regs.s) { + regs.usp = m68k_areg(regs, 7); + if (CPUType >= 2) + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + else + m68k_areg(regs, 7) = regs.isp; + regs.s = 1; } -#ifdef EXCEPTIONS_VIA_LONGJMP - else -#else - catch (m68k_exception) -#endif - { - report_double_bus_error(); -#ifdef EXCEPTIONS_VIA_LONGJMP - building_bus_fault_stack_frame= 0; -#endif - return; - } - -#ifdef EXCEPTIONS_VIA_LONGJMP - building_bus_fault_stack_frame= 0; -#endif - /* end of BUS ERROR handler */ - } else if (nr == 3) { - exc_make_frame(2, regs.sr, last_addr_for_exception_3, nr, - last_fault_for_exception_3 & 0xfffffffe, 0); - } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { - /* div by zero, CHK, TRAP or TRACE */ - exc_make_frame(2, regs.sr, currpc, nr, oldpc, 0); - } else if (regs.m && nr >= 24 && nr < 32) { - /* interrupts! */ - exc_make_frame(0, regs.sr, currpc, nr, 0, 0); - regs.sr |= (1 << 13); - regs.msp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - - exc_make_frame(1, /* throwaway */ - regs.sr, currpc, nr, 0, 0); - } else { - exc_make_frame(0, regs.sr, currpc, nr, 0, 0); - } - m68k_setpc (get_long (regs.vbr + 4*nr)); - SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); - fill_prefetch_0 (); - regs.t1 = regs.t0 = regs.m = 0; - SPCFLAGS_CLEAR(SPCFLAG_TRACE | SPCFLAG_DOTRACE); + if (CPUType > 0) { + if (nr == 2 || nr == 3) { + int i; + /* @@@ this is probably wrong (?) */ + for (i = 0 ; i < 12 ; i++) { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0); + } + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0xa000 + nr * 4); + } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), oldpc); + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0x2000 + nr * 4); + } else if (regs.m && nr >= 24 && nr < 32) { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), nr * 4); + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), currpc); + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), regs.sr); + regs.sr |= (1 << 13); + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0x1000 + nr * 4); + } else { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), nr * 4); + } + } else { + if (nr == 2 || nr == 3) { + m68k_areg(regs, 7) -= 12; + /* ??????? */ + if (nr == 3) { + put_long (m68k_areg(regs, 7), last_fault_for_exception_3); + put_word (m68k_areg(regs, 7)+4, last_op_for_exception_3); + put_long (m68k_areg(regs, 7)+8, last_addr_for_exception_3); + } + write_log ("Exception!\n"); + goto kludge_me_do; + } + } + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), currpc); +kludge_me_do: + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), regs.sr); + m68k_setpc (get_long (regs.vbr + 4*nr)); + SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); + fill_prefetch_0 (); + regs.t1 = regs.t0 = regs.m = 0; + SPCFLAGS_CLEAR( SPCFLAG_TRACE | SPCFLAG_DOTRACE ); } static void Interrupt(int nr) { - assert(nr < 8 && nr >= 0); - lastint_regs = regs; - lastint_no = nr; - Exception(nr+24, 0); + assert(nr < 8 && nr >= 0); + lastint_regs = regs; + lastint_no = nr; + Exception(nr+24, 0); - regs.intmask = nr; - SPCFLAGS_SET( SPCFLAG_INT ); + regs.intmask = nr; + SPCFLAGS_SET( SPCFLAG_INT ); } -static void SCCInterrupt(int nr) -{ - // fprintf(stderr, "CPU: in SCCInterrupt\n"); - lastint_regs = regs; - lastint_no = 5;// ex 5 - Exception(nr, 0); +static int caar, cacr, tc, itt0, itt1, dtt0, dtt1, mmusr, urp, srp; - regs.intmask = 5;// ex 5 -} - -static void MFPInterrupt(int nr) +static int movec_illg (int regno) { - // fprintf(stderr, "CPU: in MFPInterrupt\n"); - lastint_regs = regs; - lastint_no = 6; - Exception(nr, 0); - - regs.intmask = 6; + switch (CPUType) { + case 1: + if ((regno & 0x7ff) <= 1) + return 0; + break; + case 2: + case 3: + if ((regno & 0x7ff) <= 2) + return 0; + if (regno == 3 || regno == 4) + return 0; + break; + case 4: + if ((regno & 0x7ff) <= 7) { + if (regno != 0x802) + return 0; + } + break; + } + return 1; } int m68k_move2c (int regno, uae_u32 *regp) { - switch (regno) { - case 0: regs.sfc = *regp & 7; break; - case 1: regs.dfc = *regp & 7; break; - case 2: regs.cacr = *regp & 0x80008000; -#ifdef USE_JIT - set_cache_state(regs.cacr & 0x8000); - if (*regp & 0x08) { /* Just to be on the safe side */ - flush_icache(2); - } + if (movec_illg (regno)) { + op_illg (0x4E7B); + return 0; + } else { + switch (regno) { + case 0: regs.sfc = *regp & 7; break; + case 1: regs.dfc = *regp & 7; break; + case 2: + cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); +#if USE_JIT + set_cache_state(regs.cacr & 0x8000); + if (*regp & 0x08) { /* Just to be on the safe side */ + flush_icache(2); + } #endif - break; - case 3: mmu_set_tc(*regp & 0xc000); break; - case 4: - case 5: - case 6: - case 7: mmu_set_ttr(regno, *regp & 0xffffe364); break; - case 0x800: regs.usp = *regp; break; - case 0x801: regs.vbr = *regp; break; - case 0x802: regs.caar = *regp & 0xfc; break; - case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; - case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; - case 0x805: mmu_set_mmusr(*regp); break; - case 0x806: regs.urp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; - case 0x807: regs.srp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; - default: - op_illg (0x4E7B); - return 0; + break; + case 3: tc = *regp & 0xc000; break; + case 4: itt0 = *regp & 0xffffe364; break; + case 5: itt1 = *regp & 0xffffe364; break; + case 6: dtt0 = *regp & 0xffffe364; break; + case 7: dtt1 = *regp & 0xffffe364; break; + case 0x800: regs.usp = *regp; break; + case 0x801: regs.vbr = *regp; break; + case 0x802: caar = *regp &0xfc; break; + case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; + case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; + case 0x805: mmusr = *regp; break; + case 0x806: urp = *regp; break; + case 0x807: srp = *regp; break; + default: + op_illg (0x4E7B); + return 0; + } } - return 1; + return 1; } int m68k_movec2 (int regno, uae_u32 *regp) { - switch (regno) { - case 0: *regp = regs.sfc; break; - case 1: *regp = regs.dfc; break; - case 2: *regp = regs.cacr; break; - case 3: *regp = regs.tc; break; - case 4: *regp = regs.itt0; break; - case 5: *regp = regs.itt1; break; - case 6: *regp = regs.dtt0; break; - case 7: *regp = regs.dtt1; break; - case 0x800: *regp = regs.usp; break; - case 0x801: *regp = regs.vbr; break; - case 0x802: *regp = regs.caar; break; - case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; - case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; - case 0x805: *regp = regs.mmusr; break; - case 0x806: *regp = regs.urp; break; - case 0x807: *regp = regs.srp; break; - default: - op_illg (0x4E7A); - return 0; + if (movec_illg (regno)) + { + op_illg (0x4E7A); + return 0; + } else { + switch (regno) { + case 0: *regp = regs.sfc; break; + case 1: *regp = regs.dfc; break; + case 2: *regp = cacr; break; + case 3: *regp = tc; break; + case 4: *regp = itt0; break; + case 5: *regp = itt1; break; + case 6: *regp = dtt0; break; + case 7: *regp = dtt1; break; + case 0x800: *regp = regs.usp; break; + case 0x801: *regp = regs.vbr; break; + case 0x802: *regp = caar; break; + case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; + case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; + case 0x805: *regp = mmusr; break; + case 0x806: *regp = urp; break; + case 0x807: *regp = srp; break; + default: + op_illg (0x4E7A); + return 0; + } } - return 1; + return 1; } -#if !defined(uae_s64) -static inline int +static __inline__ int div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem) { uae_u32 q = 0, cbit = 0; int i; if (div <= src_hi) { - return 1; + return 1; } for (i = 0 ; i < 32 ; i++) { cbit = src_hi & 0x80000000ul; @@ -709,131 +939,129 @@ div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem = src_hi; return 0; } -#endif -void m68k_divl (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra, uaecptr oldpc) +void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) { #if defined(uae_s64) - if (src == 0) { - Exception (5, oldpc); - return; - } - if (extra & 0x800) { - /* signed variant */ - uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - uae_s64 quot, rem; - - if (extra & 0x400) { - a &= 0xffffffffu; - a |= (uae_s64)m68k_dreg(regs, extra & 7) << 32; - } - rem = a % (uae_s64)(uae_s32)src; - quot = a / (uae_s64)(uae_s32)src; - if ((quot & UVAL64(0xffffffff80000000)) != 0 - && (quot & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) - { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - if (((uae_s32)rem < 0) != ((uae_s64)a < 0)) rem = -rem; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; - } - } else { - /* unsigned */ - uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - uae_u64 quot, rem; - - if (extra & 0x400) { - a &= 0xffffffffu; - a |= (uae_u64)m68k_dreg(regs, extra & 7) << 32; + if (src == 0) { + Exception (5, oldpc); + return; } - rem = a % (uae_u64)src; - quot = a / (uae_u64)src; - if (quot > 0xffffffffu) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_s64)m68k_dreg(regs, extra & 7) << 32; + } + rem = a % (uae_s64)(uae_s32)src; + quot = a / (uae_s64)(uae_s32)src; + if ((quot & UVAL64(0xffffffff80000000)) != 0 + && (quot & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + if (((uae_s32)rem < 0) != ((uae_s64)a < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = (uae_u32)rem; + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + } } else { - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_u64)m68k_dreg(regs, extra & 7) << 32; + } + rem = a % (uae_u64)src; + quot = a / (uae_u64)src; + if (quot > 0xffffffffu) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = (uae_u32)rem; + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + } } - } #else - if (src == 0) { - Exception (5, oldpc); - return; - } - if (extra & 0x800) { - /* signed variant */ - uae_s32 lo = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - uae_s32 hi = lo < 0 ? -1 : 0; - uae_s32 save_high; - uae_u32 quot, rem; - uae_u32 sign; - - if (extra & 0x400) { - hi = (uae_s32)m68k_dreg(regs, extra & 7); - } - save_high = hi; - sign = (hi ^ src); - if (hi < 0) { - hi = ~hi; - lo = -lo; - if (lo == 0) hi++; - } - if ((uae_s32)src < 0) src = -src; - if (div_unsigned(hi, lo, src, ", &rem) || - (sign & 0x80000000) ? quot > 0x80000000 : quot > 0x7fffffff) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - if (sign & 0x80000000) quot = -quot; - if (((uae_s32)rem < 0) != (save_high < 0)) rem = -rem; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; - } - } else { - /* unsigned */ - uae_u32 lo = (uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - uae_u32 hi = 0; - uae_u32 quot, rem; - - if (extra & 0x400) { - hi = (uae_u32)m68k_dreg(regs, extra & 7); + if (src == 0) { + Exception (5, oldpc); + return; } - if (div_unsigned(hi, lo, src, ", &rem)) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); + if (extra & 0x800) { + /* signed variant */ + uae_s32 lo = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s32 hi = lo < 0 ? -1 : 0; + uae_s32 save_high; + uae_u32 quot, rem; + uae_u32 sign; + + if (extra & 0x400) { + hi = (uae_s32)m68k_dreg(regs, extra & 7); + } + save_high = hi; + sign = (hi ^ src); + if (hi < 0) { + hi = ~hi; + lo = -lo; + if (lo == 0) hi++; + } + if ((uae_s32)src < 0) src = -src; + if (div_unsigned(hi, lo, src, ", &rem) || + (sign & 0x80000000) ? quot > 0x80000000 : quot > 0x7fffffff) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + if (sign & 0x80000000) quot = -quot; + if (((uae_s32)rem < 0) != (save_high < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } } else { - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; + /* unsigned */ + uae_u32 lo = (uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u32 hi = 0; + uae_u32 quot, rem; + + if (extra & 0x400) { + hi = (uae_u32)m68k_dreg(regs, extra & 7); + } + if (div_unsigned(hi, lo, src, ", &rem)) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } } - } #endif } -#if !defined(uae_s64) -static inline void +static __inline__ void mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) { uae_u32 r0 = (src1 & 0xffff) * (src2 & 0xffff); @@ -851,332 +1079,171 @@ mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) *dst_lo = lo; *dst_hi = r3; } -#endif -void m68k_mull (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra) +void m68k_mull (uae_u32 opcode, uae_u32 src, uae_u16 extra) { #if defined(uae_s64) - if (extra & 0x800) { - /* signed variant */ - uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - - a *= (uae_s64)(uae_s32)src; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (a == 0); - SET_NFLG (a < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = a >> 32; - else if ((a & UVAL64(0xffffffff80000000)) != 0 - && (a & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) - { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; - } else { - /* unsigned */ - uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - - a *= (uae_u64)src; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (a == 0); - SET_NFLG (((uae_s64)a) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = a >> 32; - else if ((a & UVAL64(0xffffffff00000000)) != 0) { - SET_VFLG (1); + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_s64)(uae_s32)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (a < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff80000000)) != 0 + && (a & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + } else { + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_u64)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (((uae_s64)a) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff00000000)) != 0) { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; } - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; - } #else - if (extra & 0x800) { - /* signed variant */ - uae_s32 src1,src2; - uae_u32 dst_lo,dst_hi; - uae_u32 sign; - - src1 = (uae_s32)src; - src2 = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - sign = (src1 ^ src2); - if (src1 < 0) src1 = -src1; - if (src2 < 0) src2 = -src2; - mul_unsigned((uae_u32)src1,(uae_u32)src2,&dst_hi,&dst_lo); - if (sign & 0x80000000) { - dst_hi = ~dst_hi; - dst_lo = -dst_lo; - if (dst_lo == 0) dst_hi++; - } - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (dst_hi == 0 && dst_lo == 0); - SET_NFLG (((uae_s32)dst_hi) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = dst_hi; - else if ((dst_hi != 0 || (dst_lo & 0x80000000) != 0) - && ((dst_hi & 0xffffffff) != 0xffffffff - || (dst_lo & 0x80000000) != 0x80000000)) - { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; - } else { - /* unsigned */ - uae_u32 dst_lo,dst_hi; - - mul_unsigned(src,(uae_u32)m68k_dreg(regs, (extra >> 12) & 7),&dst_hi,&dst_lo); - - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (dst_hi == 0 && dst_lo == 0); - SET_NFLG (((uae_s32)dst_hi) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = dst_hi; - else if (dst_hi != 0) { - SET_VFLG (1); + if (extra & 0x800) { + /* signed variant */ + uae_s32 src1,src2; + uae_u32 dst_lo,dst_hi; + uae_u32 sign; + + src1 = (uae_s32)src; + src2 = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + sign = (src1 ^ src2); + if (src1 < 0) src1 = -src1; + if (src2 < 0) src2 = -src2; + mul_unsigned((uae_u32)src1,(uae_u32)src2,&dst_hi,&dst_lo); + if (sign & 0x80000000) { + dst_hi = ~dst_hi; + dst_lo = -dst_lo; + if (dst_lo == 0) dst_hi++; + } + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if ((dst_hi != 0 || (dst_lo & 0x80000000) != 0) + && ((dst_hi & 0xffffffff) != 0xffffffff + || (dst_lo & 0x80000000) != 0x80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + } else { + /* unsigned */ + uae_u32 dst_lo,dst_hi; + + mul_unsigned(src,(uae_u32)m68k_dreg(regs, (extra >> 12) & 7),&dst_hi,&dst_lo); + + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if (dst_hi != 0) { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; } - m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; - } #endif } +static const char* ccnames[] = +{ "T ","F ","HI","LS","CC","CS","NE","EQ", + "VC","VS","PL","MI","GE","LT","GT","LE" }; // If value is greater than zero, this means we are still processing an EmulOp // because the counter is incremented only in m68k_execute(), i.e. interpretive // execution only -#ifdef USE_JIT static int m68k_execute_depth = 0; -#endif void m68k_reset (void) { - regs.s = 1; - regs.m = 0; - regs.stopped = 0; - regs.t1 = 0; - regs.t0 = 0; - SET_ZFLG (0); - SET_XFLG (0); - SET_CFLG (0); - SET_VFLG (0); - SET_NFLG (0); - SPCFLAGS_INIT( 0 ); - regs.intmask = 7; - regs.vbr = regs.sfc = regs.dfc = 0; - - // need to ensure the following order of initialization is correct - // (it is definitely better than what it was before this commit - // since it was reading from 0x00000000 in User mode and with active MMU) - mmu_set_tc(regs.tc & ~0x8000); /* disable mmu */ - m68k_areg (regs, 7) = phys_get_long(0x00000000); - m68k_setpc (phys_get_long(0x00000004)); - fill_prefetch_0 (); - - /* gb-- moved into {fpp,fpu_x86}.cpp::fpu_init() - regs.fpcr = regs.fpsr = regs.fpiar = 0; */ - fpu_reset(); - // MMU - mmu_reset(); - mmu_set_super(1); - // Cache - regs.cacr = 0; - regs.caar = 0; -#ifdef FLIGHT_RECORDER + m68k_areg (regs, 7) = 0x2000; + m68k_setpc (ROMBaseMac + 0x2a); + fill_prefetch_0 (); + regs.s = 1; + regs.m = 0; + regs.stopped = 0; + regs.t1 = 0; + regs.t0 = 0; + SET_ZFLG (0); + SET_XFLG (0); + SET_CFLG (0); + SET_VFLG (0); + SET_NFLG (0); + SPCFLAGS_INIT( 0 ); + regs.intmask = 7; + regs.vbr = regs.sfc = regs.dfc = 0; + fpu_reset(); + +#if FLIGHT_RECORDER log_ptr = 0; - memset(frlog, 0, sizeof(frlog)); + memset(log, 0, sizeof(log)); +#endif + +#if ENABLE_MON + static bool first_time = true; + if (first_time) { + first_time = false; + mon_add_command("regs", dump_regs, "regs Dump m68k emulator registers\n"); +#if FLIGHT_RECORDER + // Install "log" command in mon + mon_add_command("log", dump_log, "log Dump m68k emulation log\n"); +#endif + } #endif } void m68k_emulop_return(void) { SPCFLAGS_SET( SPCFLAG_BRK ); - quit_program = 1; + quit_program = true; } -static void save_regs(struct M68kRegisters &r) +void m68k_emulop(uae_u32 opcode) { + struct M68kRegisters r; int i; - + for (i=0; i<8; i++) { r.d[i] = m68k_dreg(regs, i); r.a[i] = m68k_areg(regs, i); } - r.pc = m68k_getpc(); MakeSR(); r.sr = regs.sr; - r.isp = regs.isp; - r.usp = regs.usp; - r.msp = regs.msp; - if ((r.sr & 0x2000) == 0) - r.usp = r.a[7]; - else if ((r.sr & 0x1000) != 0) - r.msp = r.a[7]; - else - r.isp = r.a[7]; -} - -static void restore_regs(struct M68kRegisters &r) -{ - int i; - + EmulOp(opcode, &r); for (i=0; i<8; i++) { m68k_dreg(regs, i) = r.d[i]; m68k_areg(regs, i) = r.a[i]; } - regs.isp = r.isp; - regs.usp = r.usp; - regs.msp = r.msp; regs.sr = r.sr; MakeFromSR(); } -void m68k_emulop(uae_u32 opcode) -{ - struct M68kRegisters r; - save_regs(r); - EmulOp(opcode, &r); - restore_regs(r); -} - -// void m68k_natfeat_id(void) -// { -// struct M68kRegisters r; - -// /* is it really necessary to save all registers? */ -// save_regs(r); - -// memptr stack = r.a[7] + 4; /* skip return address */ -// r.d[0] = nf_get_id(stack); - -// restore_regs(r); -// } - -// void m68k_natfeat_call(void) -// { -// struct M68kRegisters r; - -// /* is it really necessary to save all registers? */ -// save_regs(r); - -// memptr stack = r.a[7] + 4; /* skip return address */ -// bool isSupervisorMode = ((r.sr & 0x2000) == 0x2000); -// r.d[0] = nf_call(stack, isSupervisorMode); - -// restore_regs(r); -// } - -static int m68k_call(uae_u32 pc) -{ - VOLATILE int exc = 0; - m68k_setpc(pc); - TRY(prb) { -#ifdef USE_JIT - if (bx_options.jit.jit) { - exec_nostats(); - // m68k_do_compile_execute(); - // The above call to m68k_do_compile_execute fails with BadAccess in sigsegv_handler (MAC, if it is executed after the first compile_block) - // (NULL pointer to addr_instr). - // Call exec_nostats avoids calling compile_block, because stack modification is only temporary - // which will fill up compile cache with BOGUS data. - // we can call exec_nostats directly, do our code, and return back here. - } - else -#endif - m68k_do_execute(); - } - CATCH(prb) { - exc = int(prb); - } - return exc; -} - -static uae_u32 m68k_alloca(int size) -{ - uae_u32 sp = (m68k_areg(regs, 7) - size) & ~1; - m68k_areg(regs, 7) = sp; - if ((regs.sr & 0x2000) == 0) - regs.usp = sp; - else if ((regs.sr & 0x1000) != 0) - regs.msp = sp; - else - regs.isp = sp; - return sp; -} - -// uae_u32 linea68000(volatile uae_u16 opcode) -// { -// sigjmp_buf jmp; -// struct M68kRegisters r; -// volatile uae_u32 abase = 0; - -// SAVE_EXCEPTION; -// save_regs(r); - -// const int sz = 8 + sizeof(void *); -// volatile uae_u32 sp = 0; -// uae_u32 backup[(sz + 3) / 4]; - -// if (sigsetjmp(jmp, 1) == 0) -// { -// void *p = jmp; -// uae_u8 *sp_p; -// int exc; - -// sp = m68k_alloca(sz); -// memcpy(backup, phys_get_real_address(sp), sz); - -// WriteHWMemInt16(sp, opcode); -// WriteHWMemInt16(sp + 2, 0xa0ff); -// WriteHWMemInt32(sp + 4, 13); -// sp_p = phys_get_real_address(sp + 8); -// *((void **)sp_p) = p; -// if ((exc = m68k_call(sp)) != 0) -// { -// panicbug("exception %d in LINEA", exc); -// m68k_dreg(regs, 0) = 0; -// } -// } else -// { -// abase = m68k_dreg(regs, 0); -// } - -// if (sp) { -// memcpy(phys_get_real_address(sp), backup, sz); -// } -// restore_regs(r); -// m68k_setpc(r.pc); -// RESTORE_EXCEPTION; -// return abase; -// } - - -static void rts68000() -{ - uae_u32 SP = m68k_getpc() + 6; - sigjmp_buf *p; - uae_u8 *sp_p = phys_get_real_address(SP); - - p = (sigjmp_buf *)(*((void **)sp_p)); - SP += sizeof(void *); - m68k_areg(regs, 7) = SP; - siglongjmp(*p, 1); -} - void REGPARAM2 op_illg (uae_u32 opcode) { uaecptr pc = m68k_getpc (); if ((opcode & 0xF000) == 0xA000) { - // if (opcode == 0xa0ff) - // { - // uae_u32 call = ReadHWMemInt32(pc + 2); - // switch (call) - // { - // case 13: - // rts68000(); - // return; - // } - // m68k_setpc(pc + 6); - // } Exception(0xA,0); return; } @@ -1186,8 +1253,8 @@ void REGPARAM2 op_illg (uae_u32 opcode) return; } - D(bug("Illegal instruction: %04x at %08x", opcode, pc)); -#if defined(USE_JIT) && defined(JIT_DEBUG) + write_log ("Illegal instruction: %04x at %08x\n", opcode, pc); +#if USE_JIT && JIT_DEBUG compiler_dumpstate(); #endif @@ -1195,115 +1262,59 @@ void REGPARAM2 op_illg (uae_u32 opcode) return; } +void mmu_op(uae_u32 opcode, uae_u16 extra) +{ + if ((opcode & 0xFE0) == 0x0500) { + /* PFLUSH */ + mmusr = 0; + } else if ((opcode & 0x0FD8) == 0x548) { + /* PTEST */ + } else + op_illg (opcode); +} + +static int n_insns = 0, n_spcinsns = 0; + static uaecptr last_trace_ad = 0; static void do_trace (void) { - if (regs.t0) { - uae_u16 opcode; - /* should also include TRAP, CHK, SR modification FPcc */ - /* probably never used so why bother */ - /* We can afford this to be inefficient... */ - m68k_setpc (m68k_getpc ()); - fill_prefetch_0 (); - opcode = get_word(m68k_getpc()); - if (opcode == 0x4e72 /* RTE */ - || opcode == 0x4e74 /* RTD */ - || opcode == 0x4e75 /* RTS */ - || opcode == 0x4e77 /* RTR */ - || opcode == 0x4e76 /* TRAPV */ - || (opcode & 0xffc0) == 0x4e80 /* JSR */ - || (opcode & 0xffc0) == 0x4ec0 /* JMP */ - || (opcode & 0xff00) == 0x6100 /* BSR */ - || ((opcode & 0xf000) == 0x6000 /* Bcc */ - && cctrue((opcode >> 8) & 0xf)) - || ((opcode & 0xf0f0) == 0x5050 /* DBcc */ - && !cctrue((opcode >> 8) & 0xf) - && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) - { - last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); + if (regs.t0 && CPUType >= 2) { + uae_u16 opcode; + /* should also include TRAP, CHK, SR modification FPcc */ + /* probably never used so why bother */ + /* We can afford this to be inefficient... */ + m68k_setpc (m68k_getpc ()); + fill_prefetch_0 (); + opcode = get_word(m68k_getpc()); + if (opcode == 0x4e72 /* RTE */ + || opcode == 0x4e74 /* RTD */ + || opcode == 0x4e75 /* RTS */ + || opcode == 0x4e77 /* RTR */ + || opcode == 0x4e76 /* TRAPV */ + || (opcode & 0xffc0) == 0x4e80 /* JSR */ + || (opcode & 0xffc0) == 0x4ec0 /* JMP */ + || (opcode & 0xff00) == 0x6100 /* BSR */ + || ((opcode & 0xf000) == 0x6000 /* Bcc */ + && cctrue((opcode >> 8) & 0xf)) + || ((opcode & 0xf0f0) == 0x5050 /* DBcc */ + && !cctrue((opcode >> 8) & 0xf) + && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) + { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); + } + } else if (regs.t1) { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); } - } else if (regs.t1) { - last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); - } } -// #define SERVE_VBL_MFP(resetStop) \ -// { \ -// if (SPCFLAGS_TEST( SPCFLAG_INT3|SPCFLAG_VBL|SPCFLAG_INT5|SPCFLAG_SCC|SPCFLAG_MFP )) { \ -// if (SPCFLAGS_TEST( SPCFLAG_INT3 )) { \ -// if (3 > regs.intmask) { \ -// Interrupt(3); \ -// regs.stopped = 0; \ -// SPCFLAGS_CLEAR( SPCFLAG_INT3 ); \ -// if (resetStop) \ -// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ -// } \ -// } \ -// if (SPCFLAGS_TEST( SPCFLAG_VBL )) { \ -// if (4 > regs.intmask) { \ -// Interrupt(4); \ -// regs.stopped = 0; \ -// SPCFLAGS_CLEAR( SPCFLAG_VBL ); \ -// if (resetStop) \ -// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ -// } \ -// } \ -// if (SPCFLAGS_TEST( SPCFLAG_INT5 )) { \ -// if (5 > regs.intmask) { \ -// Interrupt(5); \ -// regs.stopped = 0; \ -// SPCFLAGS_CLEAR( SPCFLAG_INT5 ); \ -// if (resetStop) \ -// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ -// } \ -// } \ -// if (SPCFLAGS_TEST( SPCFLAG_SCC )) { \ -// if (5 > regs.intmask) { \ -// int vector_number=SCCdoInterrupt(); \ -// if(vector_number){ \ -// SCCInterrupt(vector_number); \ -// regs.stopped = 0; \ -// SPCFLAGS_CLEAR( SPCFLAG_SCC); \ -// if (resetStop) \ -// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ -// } \ -// else \ -// SPCFLAGS_CLEAR( SPCFLAG_SCC ); \ -// } \ -// } \ -// if (SPCFLAGS_TEST( SPCFLAG_MFP )) { \ -// if (6 > regs.intmask) { \ -// int vector_number = MFPdoInterrupt(); \ -// if (vector_number) { \ -// MFPInterrupt(vector_number); \ -// regs.stopped = 0; \ -// if (resetStop) \ -// SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ -// } \ -// else \ -// SPCFLAGS_CLEAR( SPCFLAG_MFP ); \ -// } \ -// } \ -// } \ -// } - -// #define SERVE_INTERNAL_IRQ() \ -// { \ -// if (SPCFLAGS_TEST( SPCFLAG_INTERNAL_IRQ )) { \ -// SPCFLAGS_CLEAR( SPCFLAG_INTERNAL_IRQ ); \ -// invoke200HzInterrupt(); \ -// } \ -// } - -int m68k_do_specialties(void) +int m68k_do_specialties (void) { - // SERVE_INTERNAL_IRQ(); -#ifdef USE_JIT +#if USE_JIT // Block was compiled SPCFLAGS_CLEAR( SPCFLAG_JIT_END_COMPILE ); @@ -1314,35 +1325,11 @@ int m68k_do_specialties(void) if ((m68k_execute_depth == 0) && SPCFLAGS_TEST( SPCFLAG_JIT_EXEC_RETURN )) SPCFLAGS_CLEAR( SPCFLAG_JIT_EXEC_RETURN ); #endif - /*n_spcinsns++;*/ + if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { Exception (9,last_trace_ad); } -#if 0 /* not for ARAnyM; emulating 040 only */ - if ((regs.spcflags & SPCFLAG_STOP) && regs.s == 0 && currprefs.cpu_model <= 68010) { - // 68000/68010 undocumented special case: - // if STOP clears S-bit and T was not set: - // cause privilege violation exception, PC pointing to following instruction. - // If T was set before STOP: STOP works as documented. - m68k_unset_stop(); - Exception(8, 0); - } -#endif while (SPCFLAGS_TEST( SPCFLAG_STOP )) { - //TODO: Check - if ((regs.sr & 0x700) == 0x700) - { - // panicbug("STOPed with interrupts disabled, exiting; pc=$%08x", m68k_getpc()); - m68k_dumpstate (stderr, NULL); -#if 0 - quit_program = 1; -#endif -#ifdef FULL_HISTORY - ndebug::showHistory(20, false); - m68k_dumpstate (stderr, NULL); -#endif - return 1; - } if (SPCFLAGS_TEST( SPCFLAG_INT | SPCFLAG_DOINT )){ SPCFLAGS_CLEAR( SPCFLAG_INT | SPCFLAG_DOINT ); int intr = intlev (); @@ -1352,17 +1339,10 @@ int m68k_do_specialties(void) SPCFLAGS_CLEAR( SPCFLAG_STOP ); } } - - // SERVE_INTERNAL_IRQ(); - // SERVE_VBL_MFP(true); - if (SPCFLAGS_TEST( SPCFLAG_BRK )) - break; } if (SPCFLAGS_TEST( SPCFLAG_TRACE )) do_trace (); - // SERVE_VBL_MFP(false); - if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { SPCFLAGS_CLEAR( SPCFLAG_DOINT ); int intr = intlev (); @@ -1371,213 +1351,159 @@ int m68k_do_specialties(void) regs.stopped = 0; } } - if (SPCFLAGS_TEST( SPCFLAG_INT )) { SPCFLAGS_CLEAR( SPCFLAG_INT ); SPCFLAGS_SET( SPCFLAG_DOINT ); } - - if (SPCFLAGS_TEST( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ )) { - SPCFLAGS_CLEAR( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ ); + if (SPCFLAGS_TEST( SPCFLAG_BRK )) { + SPCFLAGS_CLEAR( SPCFLAG_BRK ); return 1; } - return 0; } void m68k_do_execute (void) { - uae_u32 pc; - uae_u32 opcode; - for (;;) { - regs.fault_pc = pc = m68k_getpc(); -#ifdef FULL_HISTORY -#ifdef NEED_TO_DEBUG_BADLY - history[lasthist] = regs; - historyf[lasthist] = regflags; -#else - history[lasthist] = m68k_getpc(); -#endif - if (++lasthist == MAX_HIST) lasthist = 0; - if (lasthist == firsthist) { - if (++firsthist == MAX_HIST) firsthist = 0; - } -#endif - -#ifndef FULLMMU -#ifdef ARAM_PAGE_CHECK - if (((pc ^ pc_page) > ARAM_PAGE_MASK)) { - check_ram_boundary(pc, 2, false); - pc_page = pc; - pc_offset = (uintptr)get_real_address(pc, 0, sz_word) - pc; - } -#else - check_ram_boundary(pc, 2, false); -#endif -#endif - opcode = GET_OPCODE; -#ifdef FLIGHT_RECORDER - m68k_record_step(m68k_getpc(), opcode); + for (;;) { + uae_u32 opcode = GET_OPCODE; +#if FLIGHT_RECORDER + m68k_record_step(m68k_getpc()); #endif - (*cpufunctbl[opcode])(opcode); - cpu_check_ticks(); - regs.fault_pc = m68k_getpc(); - - if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { - if (m68k_do_specialties()) - return; + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { + if (m68k_do_specialties()) + return; + } } - } } void m68k_execute (void) { -#ifdef USE_JIT - m68k_execute_depth++; -#endif -#ifdef DEBUGGER - VOLATILE bool after_exception = false; +#if USE_JIT + ++m68k_execute_depth; #endif - -setjmpagain: - TRY(prb) { for (;;) { - if (quit_program > 0) { - if (quit_program == 1) { -#ifdef FLIGHT_RECORDER - dump_flight_recorder(); -#endif - break; - } - quit_program = 0; - m68k_reset (); - } -#ifdef DEBUGGER - if (debugging && !after_exception) debug(); - after_exception = false; -#endif - m68k_do_execute(); + if (quit_program) + break; + m68k_do_execute(); } - } - CATCH(prb) { - Exception(prb, 0); -#ifdef DEBUGGER - after_exception = true; -#endif - goto setjmpagain; - } - -#ifdef USE_JIT - m68k_execute_depth--; +#if USE_JIT + --m68k_execute_depth; #endif } -void m68k_disasm (FILE *f, uaecptr addr, uaecptr *nextpc, int cnt) +static void m68k_verify (uaecptr addr, uaecptr *nextpc) { -#ifdef HAVE_DISASM_M68K - char buf[256]; - int size; - - disasm_info.memory_vma = addr; - while (cnt-- > 0) { - size = m68k_disasm_to_buf(&disasm_info, buf); - fprintf(f, "%s\n", buf); - if (size < 0) - break; + uae_u32 opcode, val; + struct instr *dp; + + opcode = get_iword_1(0); + last_op_for_exception_3 = opcode; + m68kpc_offset = 2; + + if (cpufunctbl[cft_map (opcode)] == op_illg_1) { + opcode = 0x4AFC; } - if (nextpc) - *nextpc = disasm_info.memory_vma; -#else - if (nextpc) - *nextpc = addr; - (void) f; - (void) cnt; -#endif -} + dp = table68k + opcode; -#ifdef DEBUGGER -void newm68k_disasm(FILE *f, uaecptr addr, uaecptr *nextpc, unsigned int cnt) -{ -#ifdef HAVE_DISASM_M68K - char buf[256]; - - disasm_info.memory_vma = addr; - if (cnt == 0) { - m68k_disasm_to_buf(&disasm_info, buf); - } else { - while (cnt-- > 0) { - m68k_disasm_to_buf(&disasm_info, buf); - fprintf(f, "%s\n", buf); - } - } - if (nextpc) - *nextpc = disasm_info.memory_vma; -#else - if (nextpc) - *nextpc = addr; - (void) cnt; -#endif + if (dp->suse) { + if (!verify_ea (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, &val)) { + Exception (3, 0); + return; + } + } + if (dp->duse) { + if (!verify_ea (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, &val)) { + Exception (3, 0); + return; + } + } } -#endif /* DEBUGGER */ - -#ifdef FULL_HISTORY -void showDisasm(uaecptr addr) { -#ifdef HAVE_DISASM_M68K - char buf[256]; +void m68k_disasm (uaecptr addr, uaecptr *nextpc, int cnt) +{ + uaecptr newpc = 0; + m68kpc_offset = addr - m68k_getpc (); + while (cnt-- > 0) { + char instrname[20],*ccpt; + int opwords; + uae_u32 opcode; + struct mnemolookup *lookup; + struct instr *dp; + printf ("%08lx: ", m68k_getpc () + m68kpc_offset); + for (opwords = 0; opwords < 5; opwords++){ + printf ("%04x ", get_iword_1 (m68kpc_offset + opwords*2)); + } + opcode = get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + if (cpufunctbl[cft_map (opcode)] == op_illg_1) { + opcode = 0x4AFC; + } + dp = table68k + opcode; + for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) + ; + + strcpy (instrname, lookup->name); + ccpt = strstr (instrname, "cc"); + if (ccpt != 0) { + strncpy (ccpt, ccnames[dp->cc], 2); + } + printf ("%s", instrname); + switch (dp->size){ + case sz_byte: printf (".B "); break; + case sz_word: printf (".W "); break; + case sz_long: printf (".L "); break; + default: printf (" "); break; + } - disasm_info.memory_vma = addr; - m68k_disasm_to_buf(&disasm_info, buf); - bug("%s", buf); -#else - (void) addr; -#endif + if (dp->suse) { + newpc = m68k_getpc () + m68kpc_offset; + newpc += ShowEA (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); + } + if (dp->suse && dp->duse) + printf (","); + if (dp->duse) { + newpc = m68k_getpc () + m68kpc_offset; + newpc += ShowEA (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 0); + } + if (ccpt != 0) { + if (cctrue(dp->cc)) + printf (" == %08x (TRUE)", newpc); + else + printf (" == %08x (FALSE)", newpc); + } else if ((opcode & 0xff00) == 0x6100) /* BSR */ + printf (" == %08x", newpc); + printf ("\n"); + } + if (nextpc) + *nextpc = m68k_getpc () + m68kpc_offset; } -#endif /* FULL_HISTORY */ -void m68k_dumpstate (FILE *out, uaecptr *nextpc) +void m68k_dumpstate (uaecptr *nextpc) { - int i; - for (i = 0; i < 8; i++){ - fprintf (out, "D%d: %08lx ", i, (unsigned long)m68k_dreg(regs, i)); - if ((i & 3) == 3) fprintf (out, "\n"); - } - for (i = 0; i < 8; i++){ - fprintf (out, "A%d: %08lx ", i, (unsigned long)m68k_areg(regs, i)); - if ((i & 3) == 3) fprintf (out, "\n"); - } - if (regs.s == 0) regs.usp = m68k_areg(regs, 7); - if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); - if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); - fprintf (out, "USP=%08lx ISP=%08lx MSP=%08lx VBR=%08lx\n", - (unsigned long)regs.usp, (unsigned long)regs.isp, - (unsigned long)regs.msp, (unsigned long)regs.vbr); - fprintf (out, "T=%d%d S=%d M=%d X=%d N=%d Z=%d V=%d C=%d IMASK=%d TCE=%d TCP=%d\n", - regs.t1, regs.t0, regs.s, regs.m, - (int)GET_XFLG, (int)GET_NFLG, (int)GET_ZFLG, (int)GET_VFLG, (int)GET_CFLG, regs.intmask, - regs.mmu_enabled, regs.mmu_pagesize_8k); - fprintf (out, "CACR=%08lx CAAR=%08lx URP=%08lx SRP=%08lx\n", - (unsigned long)regs.cacr, - (unsigned long)regs.caar, - (unsigned long)regs.urp, - (unsigned long)regs.srp); - fprintf (out, "DTT0=%08lx DTT1=%08lx ITT0=%08lx ITT1=%08lx\n", - (unsigned long)regs.dtt0, - (unsigned long)regs.dtt1, - (unsigned long)regs.itt0, - (unsigned long)regs.itt1); - for (i = 0; i < 8; i++){ - fprintf (out, "FP%d: %g ", i, (double)fpu.registers[i]); - if ((i & 3) == 3) fprintf (out, "\n"); - } -#if 0 - fprintf (out, "N=%d Z=%d I=%d NAN=%d\n", - (regs.fpsr & 0x8000000) != 0, - (regs.fpsr & 0x4000000) != 0, - (regs.fpsr & 0x2000000) != 0, - (regs.fpsr & 0x1000000) != 0); -#endif - m68k_disasm(out, m68k_getpc (), nextpc, 1); - if (nextpc) - fprintf (out, "next PC: %08lx\n", (unsigned long)*nextpc); + int i; + for (i = 0; i < 8; i++){ + printf ("D%d: %08x ", i, m68k_dreg(regs, i)); + if ((i & 3) == 3) printf ("\n"); + } + for (i = 0; i < 8; i++){ + printf ("A%d: %08x ", i, m68k_areg(regs, i)); + if ((i & 3) == 3) printf ("\n"); + } + if (regs.s == 0) regs.usp = m68k_areg(regs, 7); + if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); + if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); + printf ("USP=%08x ISP=%08x MSP=%08x VBR=%08x\n", + regs.usp,regs.isp,regs.msp,regs.vbr); + printf ("T=%d%d S=%d M=%d X=%ld N=%ld Z=%ld V=%ld C=%ld IMASK=%d\n", + regs.t1, regs.t0, regs.s, regs.m, + GET_XFLG, GET_NFLG, GET_ZFLG, GET_VFLG, GET_CFLG, regs.intmask); + + fpu_dump_registers(); + fpu_dump_flags(); + + m68k_disasm(m68k_getpc (), nextpc, 1); + if (nextpc) + printf ("next PC: %08x\n", *nextpc); } diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index 13a51b82b..97731f592 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -1,51 +1,41 @@ /* - * newcpu.h - CPU emulation + * UAE - The Un*x Amiga Emulator * - * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II + * MC68000 emulation * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * Copyright 1995 Bernd Schmidt * - * ARAnyM is free software; you can redistribute it and/or modify + * 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. * - * ARAnyM is distributed in the hope that it will be useful, + * 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 ARAnyM; if not, write to the Free Software + * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * Copyright 1995 Bernd Schmidt - */ #ifndef NEWCPU_H #define NEWCPU_H -#include "sysdeps.h" -#include "registers.h" -#include "spcflags.h" +#ifndef FLIGHT_RECORDER +#define FLIGHT_RECORDER 0 +#endif + #include "m68k.h" -#include "memory.h" +#include "readcpu.h" +#include "spcflags.h" -# include +#if ENABLE_MON +#include "mon.h" +#include "mon_disass.h" +#endif -extern struct fixup { - int flag; - uae_u32 reg; - uaecptr value; -}fixup; extern int areg_byteinc[]; extern int imm8_table[]; @@ -67,25 +57,27 @@ extern int broken_in; #endif #define cpuop_begin() do { cpuop_tag("begin"); } while (0) -#define cpuop_end() do { cpuop_tag("end"); } while (0) +#define cpuop_end() do { cpuop_tag("end"); } while (0) typedef void REGPARAM2 cpuop_func (uae_u32) REGPARAM; - + struct cputbl { cpuop_func *handler; uae_u16 specific; uae_u16 opcode; }; -extern cpuop_func *cpufunctbl[65536]; +extern cpuop_func *cpufunctbl[65536] ASM_SYM("cpufunctbl"); -#ifdef USE_JIT +#if USE_JIT typedef void compop_func (uae_u32) REGPARAM; +//NOTE: The "opcode" and "specific" fields were switched in the original source code! + struct comptbl { compop_func *handler; - uae_u32 opcode; - uae_u32 specific; + uae_u32 opcode; + uae_u32 specific; #define COMP_OPCODE_ISJUMP 0x0001 #define COMP_OPCODE_LONG_OPCODE 0x0002 #define COMP_OPCODE_CMOV 0x0004 @@ -96,84 +88,151 @@ struct comptbl { #endif extern void REGPARAM2 op_illg (uae_u32) REGPARAM; +extern void m68k_dumpstate(uaecptr *nextpc); + +typedef char flagtype; + +// struct regstruct { +// uae_u32 regs[16]; + +// uae_u32 pc; +// uae_u8 * pc_p; +// uae_u8 * pc_oldp; + +// spcflags_t spcflags; +// int intmask; + +// uae_u32 vbr, sfc, dfc; +// uaecptr usp, isp, msp; +// uae_u16 sr; +// flagtype t1; +// flagtype t0; +// flagtype s; +// flagtype m; +// flagtype x; +// flagtype stopped; + +// #if USE_PREFETCH_BUFFER +// /* Fellow sources say this is 4 longwords. That's impossible. It needs +// * to be at least a longword. The HRM has some cryptic comment about two +// * instructions being on the same longword boundary. +// * The way this is implemented now seems like a good compromise. +// */ +// uae_u32 prefetch; +// #endif +// }; + +struct regstruct +{ + uae_u32 regs[16]; + uaecptr usp,isp,msp; + uae_u16 sr; + flagtype t1; + flagtype t0; + flagtype s; + flagtype m; + flagtype x; + flagtype stopped; + int intmask; + + uae_u32 pc; + uae_u32 fault_pc; + uae_u8 *pc_p; + uae_u8 *pc_oldp; + + uae_u32 vbr,sfc,dfc; + + volatile uae_u32 spcflags; + +#if 1 + uae_u32 kick_mask; + + /* Fellow sources say this is 4 longwords. That's impossible. It needs + * to be at least a longword. The HRM has some cryptic comment about two + * instructions being on the same longword boundary. + * The way this is implemented now seems like a good compromise. + */ + uae_u32 prefetch; +#endif + + /* MMU reg*/ + uae_u32 urp,srp; + uae_u32 tc; + + int mmu_enabled; /* flagtype tce; */ + int mmu_pagesize_8k; /* flagtype tcp; */ + + uae_u32 dtt0,dtt1,itt0,itt1; + uae_u32 mmusr; + + uae_u32 mmu_fslw, mmu_fault_addr; + uae_u16 mmu_ssw; + uae_u32 wb3_data; + uae_u16 wb3_status; + + /* Cache reg*/ + uae_u32 cacr,caar; +}; + +extern regstruct regs, lastint_regs; #define m68k_dreg(r,num) ((r).regs[(num)]) #define m68k_areg(r,num) (((r).regs + 8)[(num)]) -#ifdef FULLMMU -static ALWAYS_INLINE uae_u8 get_ibyte(uae_u32 o) -{ - return mmu_get_byte(m68k_getpc() + o + 1, 0, sz_byte); -} -static ALWAYS_INLINE uae_u16 get_iword(uae_u32 o) -{ - return mmu_get_word(m68k_getpc() + o, 0, sz_word); -} -static ALWAYS_INLINE uae_u32 get_ilong(uae_u32 o) -{ - uaecptr addr = m68k_getpc() + o; - - if (unlikely(is_unaligned(addr, 4))) - return mmu_get_long_unaligned(addr, 0); - return mmu_get_long(addr, 0, sz_long); -} +#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1)) +#define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o))) +#define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o))) +#ifdef HAVE_GET_WORD_UNSWAPPED +#define GET_OPCODE (do_get_mem_word_unswapped (regs.pc_p)) #else -#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(get_real_address(m68k_getpc(), 0, sz_byte) + (o) + 1)) -#define get_iword(o) do_get_mem_word((uae_u16 *)(get_real_address(m68k_getpc(), 0, sz_word) + (o))) -#define get_ilong(o) do_get_mem_long((uae_u32 *)(get_real_address(m68k_getpc(), 0, sz_long) + (o))) +#define GET_OPCODE (get_iword (0)) #endif -#if 0 -static inline uae_u32 get_ibyte_prefetch (uae_s32 o) +#if USE_PREFETCH_BUFFER +static __inline__ uae_u32 get_ibyte_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_byte((uae_u8 *)(do_get_real_address(regs.pcp, false, false) + o + 1)); + return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1)); return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1)); } -static inline uae_u32 get_iword_prefetch (uae_s32 o) +static __inline__ uae_u32 get_iword_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_word((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + o)); + return do_get_mem_word((uae_u16 *)(regs.pc_p + o)); return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o)); } -static inline uae_u32 get_ilong_prefetch (uae_s32 o) +static __inline__ uae_u32 get_ilong_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_long((uae_u32 *)(do_get_real_address(regs.pcp, false, false) + o)); + return do_get_mem_long((uae_u32 *)(regs.pc_p + o)); if (o == 0) return do_get_mem_long(®s.prefetch); - return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + 4)); + return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4)); } #endif -#ifdef FULLMMU -#define m68k_incpc(o) (regs.pc += (o)) -#else -#define m68k_incpc(o) (regs.pc_p += (o)) -#endif - -static inline void fill_prefetch_0 (void) +static __inline__ void fill_prefetch_0 (void) { #if USE_PREFETCH_BUFFER uae_u32 r; #ifdef UNALIGNED_PROFITABLE - r = *(uae_u32 *)do_get_real_address(m68k_getpc(), false, false); + r = *(uae_u32 *)regs.pc_p; regs.prefetch = r; #else - r = do_get_mem_long ((uae_u32 *)do_get_real_address(m68k_getpc(), false, false)); + r = do_get_mem_long ((uae_u32 *)regs.pc_p); do_put_mem_long (®s.prefetch, r); #endif #endif } #if 0 -static inline void fill_prefetch_2 (void) +static __inline__ void fill_prefetch_2 (void) { uae_u32 r = do_get_mem_long (®s.prefetch) << 16; - uae_u32 r2 = do_get_mem_word (((uae_u16 *)do_get_real_address(regs.pcp, false, false)) + 1); + uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1); r |= r2; do_put_mem_long (®s.prefetch, r); } @@ -181,92 +240,115 @@ static inline void fill_prefetch_2 (void) #define fill_prefetch_2 fill_prefetch_0 #endif +static __inline__ uaecptr m68k_getpc (void) +{ +#if REAL_ADDRESSING || DIRECT_ADDRESSING + return get_virtual_address(regs.pc_p); +#else + return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); +#endif +} + +static __inline__ void m68k_setpc (uaecptr newpc) +{ +#if ENABLE_MON + uae_u32 previous_pc = m68k_getpc(); +#endif + +#if REAL_ADDRESSING || DIRECT_ADDRESSING + regs.pc_p = get_real_address(newpc); +#else + regs.pc_p = regs.pc_oldp = get_real_address(newpc); + regs.pc = newpc; +#endif + +#if ENABLE_MON + if (IS_BREAK_POINT(newpc)) { + printf("Stopped at break point address: %08x. Last PC: %08x\n", newpc, previous_pc); + m68k_dumpstate(NULL); + const char *arg[4] = {"mon", "-m", "-r", NULL}; + mon(3, arg); + } +#endif // end of #if ENABLE_MON +} + +static __inline__ void m68k_incpc (uae_s32 delta) +{ +#if ENABLE_MON + uae_u32 previous_pc = m68k_getpc(); +#endif + regs.pc_p += (delta); +#if ENABLE_MON + uaecptr next_pc = m68k_getpc(); + if (IS_BREAK_POINT(next_pc)) { + printf("Stopped at break point address: %08x. Last PC: %08x\n", next_pc, previous_pc); + m68k_dumpstate(NULL); + const char *arg[4] = {"mon", "-m", "-r", NULL}; + mon(3, arg); + } +#endif // end of #if ENABLE_MON +} + /* These are only used by the 68020/68881 code, and therefore don't * need to handle prefetch. */ -static inline uae_u32 next_ibyte (void) +static __inline__ uae_u32 next_ibyte (void) { uae_u32 r = get_ibyte (0); m68k_incpc (2); return r; } -static inline uae_u32 next_iword (void) +static __inline__ uae_u32 next_iword (void) { uae_u32 r = get_iword (0); m68k_incpc (2); return r; } -static inline uae_u32 next_ilong (void) +static __inline__ uae_u32 next_ilong (void) { uae_u32 r = get_ilong (0); m68k_incpc (4); return r; } -static inline void m68k_setpc (uaecptr newpc) -{ -#ifndef FULLMMU - regs.pc_p = regs.pc_oldp = get_real_address(newpc, 0, sz_word); -#endif - regs.fault_pc = regs.pc = newpc; -} - #define m68k_setpc_fast m68k_setpc #define m68k_setpc_bcc m68k_setpc #define m68k_setpc_rte m68k_setpc -static inline void m68k_do_rts(void) +static __inline__ void m68k_do_rts(void) { - m68k_setpc(get_long(m68k_areg(regs, 7))); - m68k_areg(regs, 7) += 4; + m68k_setpc(get_long(m68k_areg(regs, 7))); + m68k_areg(regs, 7) += 4; } -static inline void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) +static __inline__ void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) { - put_long(m68k_areg(regs, 7) - 4, oldpc); - m68k_areg(regs, 7) -= 4; - m68k_incpc(offset); + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_incpc(offset); } -static inline void m68k_do_jsr(uaecptr oldpc, uaecptr dest) +static __inline__ void m68k_do_jsr(uaecptr oldpc, uaecptr dest) { - put_long(m68k_areg(regs, 7) - 4, oldpc); - m68k_areg(regs, 7) -= 4; - m68k_setpc(dest); + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_setpc(dest); } -static inline void m68k_setstopped (int stop) +static __inline__ void m68k_setstopped (int stop) { regs.stopped = stop; /* A traced STOP instruction drops through immediately without actually stopping. */ - if (stop && !( SPCFLAGS_TEST( SPCFLAG_DOTRACE ))) - SPCFLAGS_SET( SPCFLAG_STOP ); + if (stop && (regs.spcflags & SPCFLAG_DOTRACE) == 0) + SPCFLAGS_SET( SPCFLAG_STOP ); } -#ifdef FULLMMU -# define GET_OPCODE (get_iword (0)) -#elif defined ARAM_PAGE_CHECK -# ifdef HAVE_GET_WORD_UNSWAPPED -# define GET_OPCODE (do_get_mem_word_unswapped((uae_u16*)(pc + pc_offset))); -# else -# define GET_OPCODE (do_get_mem_word((uae_u16*)(pc + pc_offset))); -# endif -#else -# ifdef HAVE_GET_WORD_UNSWAPPED -# define GET_OPCODE (do_get_mem_word_unswapped ((uae_u16*)get_real_address(m68k_getpc(), 0, sz_word))) -# else -# define GET_OPCODE (get_iword (0)) -# endif -#endif - -extern REGPARAM uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); -extern REGPARAM uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); -extern REGPARAM uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width); -extern REGPARAM void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width); - +extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); +extern uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); +extern uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf); extern void MakeSR (void); extern void MakeFromSR (void); @@ -278,19 +360,15 @@ extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr); extern void m68k_mull (uae_u32, uae_u32, uae_u16); extern void m68k_emulop (uae_u32); extern void m68k_emulop_return (void); -extern void m68k_natfeat_id(void); -extern void m68k_natfeat_call(void); extern void init_m68k (void); extern void exit_m68k (void); -extern void m68k_dumpstate (FILE *, uaecptr *); -extern void m68k_disasm (FILE *, uaecptr, uaecptr *, int); -extern void newm68k_disasm(FILE *, uaecptr, uaecptr *, unsigned int); -extern void showDisasm(uaecptr); +extern void m68k_dumpstate (uaecptr *); +extern void m68k_disasm (uaecptr, uaecptr *, int); extern void m68k_reset (void); extern void m68k_enter_debugger(void); extern int m68k_do_specialties(void); -extern void m68k_instr_set(void); -uae_u32 linea68000(uae_u16 opcode); + +extern void mmu_op (uae_u32, uae_u16); /* Opcode of faulting instruction */ extern uae_u16 last_op_for_exception_3; @@ -301,19 +379,24 @@ extern uaecptr last_fault_for_exception_3; #define CPU_OP_NAME(a) op ## a -/* 68040+ 68881 */ -extern const struct cputbl op_smalltbl_0_ff[]; -extern const struct cputbl op_smalltbl_0_nf[]; - -#ifdef FLIGHT_RECORDER -extern void m68k_record_step(uaecptr, int); +/* 68020 + 68881 */ +extern struct cputbl op_smalltbl_0_ff[]; +/* 68020 */ +extern struct cputbl op_smalltbl_1_ff[]; +/* 68010 */ +extern struct cputbl op_smalltbl_2_ff[]; +/* 68000 */ +extern struct cputbl op_smalltbl_3_ff[]; +/* 68000 slow but compatible. */ +extern struct cputbl op_smalltbl_4_ff[]; + +#if FLIGHT_RECORDER +extern void m68k_record_step(uaecptr) REGPARAM; #endif - extern void m68k_do_execute(void); extern void m68k_execute(void); -#ifdef USE_JIT +#if USE_JIT extern void m68k_compile_execute(void); -extern void m68k_do_compile_execute(void); #endif #ifdef USE_CPU_EMUL_SERVICES extern int32 emulated_ticks; @@ -328,7 +411,5 @@ static inline void cpu_check_ticks(void) #define cpu_check_ticks() #define cpu_do_check_ticks() #endif - -cpuop_func op_illg_1; - + #endif /* NEWCPU_H */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h index d680b200c..eacbc2148 100644 --- a/BasiliskII/src/uae_cpu/noflags.h +++ b/BasiliskII/src/uae_cpu/noflags.h @@ -33,13 +33,13 @@ #define NOFLAGS_CMP 0 #undef SET_NFLG_ALWAYS -static inline void SET_NFLG_ALWAYS(uae_u32 x) +static __inline__ void SET_NFLG_ALWAYS(uae_u32 x) { SET_NFLG(x); /* This has not yet been redefined */ } #undef SET_CFLG_ALWAYS -static inline void SET_CFLG_ALWAYS(uae_u32 x) +static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) { SET_CFLG(x); /* This has not yet been redefined */ } diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu/readcpu.cpp index 1c385b983..3fccdfb73 100644 --- a/BasiliskII/src/uae_cpu/readcpu.cpp +++ b/BasiliskII/src/uae_cpu/readcpu.cpp @@ -1,27 +1,33 @@ -/* 2002 MJ */ /* * UAE - The Un*x Amiga Emulator * * Read 68000 CPU specs from file "table68k" * * Copyright 1995,1996 Bernd Schmidt + * + * 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 +#include +#include +#include + #include "sysdeps.h" #include "readcpu.h" -#include -#include -#include -#include - -using std::strncmp; -using std::abort; -using std::fprintf; -using std::strcmp; -using std::strlen; -using std::malloc; - int nr_cpuop_funcs; struct mnemolookup lookuptab[] = { @@ -147,20 +153,16 @@ struct mnemolookup lookuptab[] = { { i_CPUSHA, "CPUSHA" }, { i_MOVE16, "MOVE16" }, - { i_EMULOP_RETURN, "EMULOP_RETURN" }, - { i_EMULOP, "EMULOP" }, - + { i_EMULOP_RETURN, "EMULOP_RETURN" }, + { i_EMULOP, "EMULOP" }, + { i_MMUOP, "MMUOP" }, - - {i_NATFEAT_ID, "NATFEAT_ID" }, - {i_NATFEAT_CALL, "NATFEAT_CALL" }, - { i_ILLG, "" }, }; struct instr *table68k; -static inline amodes mode_from_str (const char *str) +static __inline__ amodes mode_from_str (const char *str) { if (strncmp (str, "Dreg", 4) == 0) return Dreg; if (strncmp (str, "Areg", 4) == 0) return Areg; @@ -178,7 +180,7 @@ static inline amodes mode_from_str (const char *str) return (amodes)0; } -static inline amodes mode_from_mr (int mode, int reg) +static __inline__ amodes mode_from_mr (int mode, int reg) { switch (mode) { case 0: return Dreg; @@ -213,32 +215,31 @@ static void build_insn (int insn) int i, n; int flaglive = 0, flagdead = 0; - int cflow = 0; + int cflow = 0; id = defs68k[insn]; - // Control flow information - cflow = id.cflow; - - // Mask of flags set/used - unsigned char flags_set(0), flags_used(0); - - for (i = 0, n = 4; i < 5; i++, n--) { - switch (id.flaginfo[i].flagset) { - case fa_unset: case fa_isjmp: break; - default: flags_set |= (1 << n); - } - - switch (id.flaginfo[i].flaguse) { - case fu_unused: case fu_isjmp: break; - default: flags_used |= (1 << n); + // Control flow information + cflow = id.cflow; + + // Mask of flags set/used + unsigned char flags_set(0), flags_used(0); + + for (i = 0, n = 4; i < 5; i++, n--) { + switch (id.flaginfo[i].flagset) { + case fa_unset: case fa_isjmp: break; + default: flags_set |= (1 << n); + } + + switch (id.flaginfo[i].flaguse) { + case fu_unused: case fu_isjmp: break; + default: flags_used |= (1 << n); + } } - } - + for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flagset){ case fa_unset: break; - case fa_isjmp: break; case fa_zero: flagdead |= 1 << i; break; case fa_one: flagdead |= 1 << i; break; case fa_dontcare: flagdead |= 1 << i; break; @@ -251,8 +252,6 @@ static void build_insn (int insn) for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flaguse) { case fu_unused: break; - case fu_isjmp: flaglive |= 1 << i; break; - case fu_maybecc: flaglive |= 1 << i; break; case fu_unknown: flaglive = -1; goto out2; case fu_used: flaglive |= 1 << i; break; } @@ -307,7 +306,6 @@ static void build_insn (int insn) continue; if (bitcnt[bitI] && (bitval[bitI] == 0x00 || bitval[bitI] == 0xff)) continue; - if (bitcnt[bitE] && (bitval[bitE] == 0x00)) continue; @@ -348,9 +346,9 @@ static void build_insn (int insn) } } mnp++; - if ((unsigned)mnp >= (sizeof(mnemonic)-1)) { - mnemonic[sizeof(mnemonic)-1] = '\0'; - fprintf(stderr, "WTF!!! Instruction '%s' overflow\n", mnemonic); + if ((unsigned)mnp >= sizeof(mnemonic) - 1) { + mnemonic[sizeof(mnemonic) - 1] = 0; + fprintf(stderr, "Instruction %s overflow\n", mnemonic); abort(); } } @@ -381,7 +379,6 @@ static void build_insn (int insn) case 'A': srcmode = Areg; switch (opcstr[pos++]) { - case 'l': srcmode = absl; break; case 'r': srcreg = bitval[bitr]; srcgather = 1; srcpos = bitpos[bitr]; break; case 'R': srcreg = bitval[bitR]; srcgather = 1; srcpos = bitpos[bitR]; break; default: abort(); @@ -391,11 +388,9 @@ static void build_insn (int insn) case 'P': srcmode = Aipi; pos++; break; } break; -#if 0 case 'L': srcmode = absl; break; -#endif case '#': switch (opcstr[pos++]) { case 'z': srcmode = imm; break; @@ -441,7 +436,7 @@ static void build_insn (int insn) srcpos = bitpos[bitK]; } break; - case 'E': srcmode = immi; srcreg = bitval[bitE]; + case 'E': srcmode = immi; srcreg = bitval[bitE]; if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? /* 1..255 */ srcgather = 1; @@ -449,8 +444,8 @@ static void build_insn (int insn) srcpos = bitpos[bitE]; } break; - case 'p': srcmode = immi; srcreg = bitval[bitp]; - if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? + case 'p': srcmode = immi; srcreg = bitval[bitp]; + if (CPU_EMU_SIZE < 5) { /* 0..3 */ srcgather = 1; srctype = 7; @@ -587,22 +582,21 @@ static void build_insn (int insn) case 'A': destmode = Areg; switch (opcstr[pos++]) { - case 'l': destmode = absl; break; case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; - case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; + case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; default: abort(); } + if (dstpos < 0 || dstpos >= 32) + abort(); switch (opcstr[pos]) { case 'p': destmode = Apdi; pos++; break; case 'P': destmode = Aipi; pos++; break; } break; -#if 0 case 'L': destmode = absl; break; -#endif case '#': switch (opcstr[pos++]) { case 'z': destmode = imm; break; @@ -773,7 +767,7 @@ static void build_insn (int insn) table68k[opc].flaginfo[i].flaguse = id.flaginfo[i].flaguse; } #endif - + // Fix flags used information for Scc, Bcc, TRAPcc, DBcc instructions if ( table68k[opc].mnemo == i_Scc || table68k[opc].mnemo == i_Bcc @@ -801,7 +795,7 @@ static void build_insn (int insn) case 15:flags_used = 0x0E; break; /* LE */ } } - + #if 1 /* gb-- flagdead and flaglive would not have correct information */ table68k[opc].flagdead = flags_set; @@ -831,7 +825,7 @@ void read_table68k (void) } } -static int readcpu_mismatch; +static int mismatch; static void handle_merges (long int opcode) { @@ -857,9 +851,9 @@ static void handle_merges (long int opcode) case 5: smsk = 63; sbitdst = 64; break; case 6: - smsk = 255; sbitdst = 256; break; + smsk = 255; sbitdst = 256; break; case 7: - smsk = 3; sbitdst = 4; break; + smsk = 3; sbitdst = 4; break; default: smsk = 0; sbitdst = 0; abort(); @@ -875,7 +869,7 @@ static void handle_merges (long int opcode) } for (srcreg=0; srcreg < sbitdst; srcreg++) { for (dstreg=0; dstreg < dstend; dstreg++) { - uae_u16 code = opcode; + uae_u16 code = uae_u16(opcode); code = (code & ~smsk) | (srcreg << table68k[opcode].spos); code = (code & ~dmsk) | (dstreg << table68k[opcode].dpos); @@ -888,20 +882,20 @@ static void handle_merges (long int opcode) || table68k[code].suse != table68k[opcode].suse || table68k[code].duse != table68k[opcode].duse) { - readcpu_mismatch++; continue; + mismatch++; continue; } if (table68k[opcode].suse && (table68k[opcode].spos != table68k[code].spos || table68k[opcode].smode != table68k[code].smode || table68k[opcode].stype != table68k[code].stype)) { - readcpu_mismatch++; continue; + mismatch++; continue; } if (table68k[opcode].duse && (table68k[opcode].dpos != table68k[code].dpos || table68k[opcode].dmode != table68k[code].dmode)) { - readcpu_mismatch++; continue; + mismatch++; continue; } if (code != opcode) @@ -914,7 +908,7 @@ void do_merges (void) { long int opcode; int nr = 0; - readcpu_mismatch = 0; + mismatch = 0; for (opcode = 0; opcode < 65536; opcode++) { if (table68k[opcode].handler != -1 || table68k[opcode].mnemo == i_ILLG) continue; @@ -926,5 +920,114 @@ void do_merges (void) int get_no_mismatches (void) { - return readcpu_mismatch; + return mismatch; +} + +const char *get_instruction_name (unsigned int opcode) +{ + struct instr *ins = &table68k[opcode]; + for (int i = 0; lookuptab[i].name[0]; i++) { + if (ins->mnemo == lookuptab[i].mnemo) + return lookuptab[i].name; + } + abort(); + return NULL; +} + +static char *get_ea_string (amodes mode, wordsizes size) +{ + static char buffer[80]; + + buffer[0] = 0; + switch (mode){ + case Dreg: + strcpy (buffer,"Dn"); + break; + case Areg: + strcpy (buffer,"An"); + break; + case Aind: + strcpy (buffer,"(An)"); + break; + case Aipi: + strcpy (buffer,"(An)+"); + break; + case Apdi: + strcpy (buffer,"-(An)"); + break; + case Ad16: + strcpy (buffer,"(d16,An)"); + break; + case Ad8r: + strcpy (buffer,"(d8,An,Xn)"); + break; + case PC16: + strcpy (buffer,"(d16,PC)"); + break; + case PC8r: + strcpy (buffer,"(d8,PC,Xn)"); + break; + case absw: + strcpy (buffer,"(xxx).W"); + break; + case absl: + strcpy (buffer,"(xxx).L"); + break; + case imm: + switch (size){ + case sz_byte: + strcpy (buffer,"#.B"); + break; + case sz_word: + strcpy (buffer,"#.W"); + break; + case sz_long: + strcpy (buffer,"#.L"); + break; + default: + break; + } + break; + case imm0: + strcpy (buffer,"#.B"); + break; + case imm1: + strcpy (buffer,"#.W"); + break; + case imm2: + strcpy (buffer,"#.L"); + break; + case immi: + strcpy (buffer,"#"); + break; + + default: + break; + } + return buffer; +} + +const char *get_instruction_string (unsigned int opcode) +{ + static char out[100]; + struct instr *ins; + + strcpy (out, get_instruction_name (opcode)); + + ins = &table68k[opcode]; + if (ins->size == sz_byte) + strcat (out,".B"); + if (ins->size == sz_word) + strcat (out,".W"); + if (ins->size == sz_long) + strcat (out,".L"); + strcat (out," "); + if (ins->suse) + strcat (out, get_ea_string (amodes(ins->smode), wordsizes(ins->size))); + if (ins->duse) { + if (ins->suse) + strcat (out,","); + strcat (out, get_ea_string (amodes(ins->dmode), wordsizes(ins->size))); + } + return out; } diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu/readcpu.h index 7855ecc7d..6fba3c393 100644 --- a/BasiliskII/src/uae_cpu/readcpu.h +++ b/BasiliskII/src/uae_cpu/readcpu.h @@ -1,4 +1,3 @@ -/* 2002 MJ */ #ifndef READCPU_H #define READCPU_H @@ -6,12 +5,12 @@ extern "C" { #endif -typedef enum { +ENUMDECL { Dreg, Areg, Aind, Aipi, Apdi, Ad16, Ad8r, absw, absl, PC16, PC8r, imm, imm0, imm1, imm2, immi, am_unknown, am_illg -} amodes; +} ENUMNAME (amodes); -typedef enum { +ENUMDECL { i_ILLG, i_OR, i_AND, i_EOR, i_ORSR, i_ANDSR, i_EORSR, @@ -36,42 +35,43 @@ typedef enum { i_PACK, i_UNPK, i_TAS, i_BKPT, i_CALLM, i_RTM, i_TRAPcc, i_MOVES, i_FPP, i_FDBcc, i_FScc, i_FTRAPcc, i_FBcc, i_FSAVE, i_FRESTORE, i_CINVL, i_CINVP, i_CINVA, i_CPUSHL, i_CPUSHP, i_CPUSHA, i_MOVE16, - i_MMUOP, i_EMULOP_RETURN, i_EMULOP, i_NATFEAT_ID, i_NATFEAT_CALL -} instrmnem; + i_MMUOP, + i_EMULOP_RETURN, i_EMULOP +} ENUMNAME (instrmnem); extern struct mnemolookup { instrmnem mnemo; const char *name; } lookuptab[]; -typedef enum { +ENUMDECL { sz_byte, sz_word, sz_long -} wordsizes; +} ENUMNAME (wordsizes); -typedef enum { - fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp, - fa_isbranch -} flagaffect; +ENUMDECL { + fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp +} ENUMNAME (flagaffect); -typedef enum { +ENUMDECL { fu_used, fu_unused, fu_maybecc, fu_unknown, fu_isjmp -} flaguse; +} ENUMNAME (flaguse); -typedef enum { - fl_normal = 0, +ENUMDECL { + fl_normal = 0, fl_branch = 1, - fl_jump = 2, - fl_return = 3, - fl_trap = 4, - fl_const_jump = 8, - /* Instructions that can trap don't mark the end of a block */ - fl_end_block = 3 -} cflow_t; - -typedef enum { + fl_jump = 2, + fl_return = 3, + fl_trap = 4, + fl_const_jump = 8, + + /* Instructions that can trap don't mark the end of a block */ + fl_end_block = 3 +} ENUMNAME (cflow_t); + +ENUMDECL { bit0, bit1, bitc, bitC, bitf, biti, bitI, bitj, bitJ, bitk, bitK, bits, bitS, bitd, bitD, bitr, bitR, bitz, bitE, bitp, lastbit -} bitvals; +} ENUMNAME (bitvals); struct instr_def { unsigned int bits; @@ -84,7 +84,7 @@ struct instr_def { unsigned int flaguse:3; unsigned int flagset:3; } flaginfo[5]; - unsigned char cflow; + unsigned char cflow; unsigned char sduse; const char *opcstr; }; @@ -103,15 +103,15 @@ extern struct instr { unsigned int mnemo:8; unsigned int cc:4; unsigned int plev:2; - wordsizes size:2; - amodes smode:5; + unsigned int size:2; + unsigned int smode:5; unsigned int stype:3; - amodes dmode:5; + unsigned int dmode:5; unsigned int suse:1; unsigned int duse:1; unsigned int unused1:1; unsigned int clev:3; - unsigned int cflow:3; + unsigned int cflow:3; unsigned int unused2:2; } *table68k; @@ -120,8 +120,11 @@ extern void do_merges (void); extern int get_no_mismatches (void); extern int nr_cpuop_funcs; +extern const char *get_instruction_name (unsigned int opcode); +extern const char *get_instruction_string (unsigned int opcode); + #ifdef __cplusplus } #endif -#endif +#endif /* READCPU_H */ diff --git a/BasiliskII/src/uae_cpu/readcpua.cpp b/BasiliskII/src/uae_cpu/readcpua.cpp deleted file mode 100644 index 521c241f2..000000000 --- a/BasiliskII/src/uae_cpu/readcpua.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * readcpu.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "readcpu.cpp" diff --git a/BasiliskII/src/uae_cpu/registers.h b/BasiliskII/src/uae_cpu/registers.h deleted file mode 100644 index f7daef1fc..000000000 --- a/BasiliskII/src/uae_cpu/registers.h +++ /dev/null @@ -1,116 +0,0 @@ -/* 2001 MJ */ - -#ifndef REGISTERS_H -#define REGISTERS_H - -#include "sysdeps.h" -#include "spcflags.h" -typedef char flagtype; - - -struct xttrx { - uae_u32 log_addr_base : 8; - uae_u32 log_addr_mask : 8; - uae_u32 enable : 1; - uae_u32 s_field : 2; - uae_u32 : 3; - uae_u32 usr1 : 1; - uae_u32 usr0 : 1; - uae_u32 : 1; - uae_u32 cmode : 2; - uae_u32 : 2; - uae_u32 write : 1; - uae_u32 : 2; -}; - -struct mmusr_t { - uae_u32 phys_addr : 20; - uae_u32 bus_err : 1; - uae_u32 global : 1; - uae_u32 usr1 : 1; - uae_u32 usr0 : 1; - uae_u32 super : 1; - uae_u32 cmode : 2; - uae_u32 modif : 1; - uae_u32 : 1; - uae_u32 write : 1; - uae_u32 ttrhit : 1; - uae_u32 resident : 1; -}; - -struct log_addr4 { - uae_u32 rif : 7; - uae_u32 pif : 7; - uae_u32 paif : 6; - uae_u32 poff : 12; -}; - -struct log_addr8 { - uae_u32 rif : 7; - uae_u32 pif : 7; - uae_u32 paif : 5; - uae_u32 poff : 13; -}; - -extern struct regstruct -{ - uae_u32 regs[16]; - uaecptr usp,isp,msp; - uae_u16 sr; - flagtype t1; - flagtype t0; - flagtype s; - flagtype m; - flagtype x; - flagtype stopped; - int intmask; - - uae_u32 pc; - uae_u32 fault_pc; - uae_u8 *pc_p; - uae_u8 *pc_oldp; - - uae_u32 vbr,sfc,dfc; - - volatile uae_u32 spcflags; - -#if 0 - uae_u32 kick_mask; - - /* Fellow sources say this is 4 longwords. That's impossible. It needs - * to be at least a longword. The HRM has some cryptic comment about two - * instructions being on the same longword boundary. - * The way this is implemented now seems like a good compromise. - */ - uae_u32 prefetch; -#endif - - /* MMU reg*/ - uae_u32 urp,srp; - uae_u32 tc; - - int mmu_enabled; /* flagtype tce; */ - int mmu_pagesize_8k; /* flagtype tcp; */ - - uae_u32 dtt0,dtt1,itt0,itt1; - uae_u32 mmusr; - - uae_u32 mmu_fslw, mmu_fault_addr; - uae_u16 mmu_ssw; - uae_u32 wb3_data; - uae_u16 wb3_status; - - /* Cache reg*/ - uae_u32 cacr,caar; -} regs, lastint_regs; - -static inline uaecptr m68k_getpc (void) -{ -#ifdef FULLMMU - return regs.pc; -#else - return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); -#endif -} - -#endif diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h index b20843726..3c3fc0322 100644 --- a/BasiliskII/src/uae_cpu/spcflags.h +++ b/BasiliskII/src/uae_cpu/spcflags.h @@ -1,10 +1,24 @@ - /* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * Copyright 1995 Bernd Schmidt - */ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + * + * 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 SPCFLAGS_H #define SPCFLAGS_H @@ -12,42 +26,31 @@ typedef uae_u32 spcflags_t; enum { - SPCFLAG_STOP = 0x01, - SPCFLAG_INT = 0x02, - SPCFLAG_BRK = 0x04, - SPCFLAG_TRACE = 0x08, - SPCFLAG_DOTRACE = 0x10, - SPCFLAG_DOINT = 0x20, -#ifdef USE_JIT - SPCFLAG_JIT_END_COMPILE = 0x40, - SPCFLAG_JIT_EXEC_RETURN = 0x80, + SPCFLAG_STOP = 0x01, + SPCFLAG_INT = 0x02, + SPCFLAG_BRK = 0x04, + SPCFLAG_TRACE = 0x08, + SPCFLAG_DOTRACE = 0x10, + SPCFLAG_DOINT = 0x20, +#if USE_JIT + SPCFLAG_JIT_END_COMPILE = 0x40, + SPCFLAG_JIT_EXEC_RETURN = 0x80, #else - SPCFLAG_JIT_END_COMPILE = 0, - SPCFLAG_JIT_EXEC_RETURN = 0, + SPCFLAG_JIT_END_COMPILE = 0, + SPCFLAG_JIT_EXEC_RETURN = 0, #endif - SPCFLAG_VBL = 0x100, - SPCFLAG_MFP = 0x200, - SPCFLAG_INT3 = 0x800, - SPCFLAG_INT5 = 0x1000, - SPCFLAG_SCC = 0x2000, -// SPCFLAG_MODE_CHANGE = 0x4000, - SPCFLAG_ALL = SPCFLAG_STOP - | SPCFLAG_INT - | SPCFLAG_BRK - | SPCFLAG_TRACE - | SPCFLAG_DOTRACE - | SPCFLAG_DOINT - | SPCFLAG_JIT_END_COMPILE - | SPCFLAG_JIT_EXEC_RETURN - | SPCFLAG_INT3 - | SPCFLAG_VBL - | SPCFLAG_INT5 - | SPCFLAG_SCC - | SPCFLAG_MFP - , - + + SPCFLAG_ALL = SPCFLAG_STOP + | SPCFLAG_INT + | SPCFLAG_BRK + | SPCFLAG_TRACE + | SPCFLAG_DOTRACE + | SPCFLAG_DOINT + | SPCFLAG_JIT_END_COMPILE + | SPCFLAG_JIT_EXEC_RETURN + , + SPCFLAG_ALL_BUT_EXEC_RETURN = SPCFLAG_ALL & ~SPCFLAG_JIT_EXEC_RETURN - }; #define SPCFLAGS_TEST(m) \ diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu/table68k index 4445cb509..ab9eabe18 100644 --- a/BasiliskII/src/uae_cpu/table68k +++ b/BasiliskII/src/uae_cpu/table68k @@ -10,7 +10,7 @@ % J: immediate 0..15 % k: immediate 0..7 % K: immediate 0..63 -% p: immediate 0..3 (CINV and CPUSH: cache field) +% p: immediate 0..3 (CINV and CPUSH instructions: Cache Field) % s: source mode % S: source reg % d: dest mode @@ -28,15 +28,14 @@ % ArP: --> (Ar)+ % L: --> (xxx.L) % -% Fields on a line: -% 16 chars bitpattern : -% CPU level / privildge level : +% Fields on a line: +% 16 chars bitpattern : +% CPU level / privilege level : % CPU level 0: 68000 % 1: 68010 % 2: 68020 % 3: 68020/68881 % 4: 68040 -% 5: 68060 % privilege level 0: not privileged % 1: unprivileged only on 68000 (check regs.s) % 2: privileged (check regs.s) @@ -47,10 +46,8 @@ % 0 means flag reset % 1 means flag set % ? means programmer was too lazy to check or instruction may trap -% + means instruction is conditional branch (ignored, only for sync) -% / means instruction is unconditional branch/call (ignored, only for sync) -% x means flag is unknown and well-behaved programs shouldn't check it % everything else means flag set/used +% x means flag is unknown and well-behaved programs shouldn't check it % % Control flow % two letters, combination of @@ -111,7 +108,7 @@ 0011 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.W s,d[Areg] 0011 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.W s,d[!Areg] -0100 0000 zzdd dDDD:00:XNZVC:X-Z--:--:30: NEGX.z d[!Areg] +0100 0000 zzdd dDDD:00:XxZxC:X-Z--:--:30: NEGX.z d[!Areg] 0100 0000 11dd dDDD:01:-----:XNZVC:T-:10: MVSR2.W d[!Areg] 0100 0010 zzdd dDDD:00:-0100:-----:--:20: CLR.z d[!Areg] 0100 0010 11dd dDDD:10:-----:XNZVC:--:10: MVSR2.B d[!Areg] @@ -122,13 +119,13 @@ 0100 1000 0000 1rrr:20:-----:-----:--:31: LINK.L Ar,#2 0100 1000 00dd dDDD:00:X?Z?C:X-Z--:--:30: NBCD.B d[!Areg] 0100 1000 0100 1kkk:20:-----:-----:T-:10: BKPT #k -0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] +0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] 0100 1000 01ss sSSS:00:-----:-----:--:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] +0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] 0100 1000 10dd dDDD:00:-----:-----:--:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] -0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] +0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] 0100 1000 11dd dDDD:00:-----:-----:--:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] -0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] +0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] 0100 1010 zzss sSSS:00:-NZ00:-----:--:10: TST.z s 0100 1010 11dd dDDD:00:-NZ00:-----:--:30: TAS.B d[!Areg] 0100 1010 1111 1100:00:-----:-----:T-:00: ILLEGAL @@ -151,24 +148,21 @@ 0100 1110 0111 0111:00:XNZVC:-----:-R:00: RTR 0100 1110 0111 1010:12:-----:-----:T-:10: MOVEC2 #1 0100 1110 0111 1011:12:-----:-----:T-:10: MOVE2C #1 -0100 1110 10ss sSSS:00://///://///:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1110 10ss sSSS:00:-----:-----:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] 0100 rrr1 00ss sSSS:00:-N???:-----:T-:11: CHK.L s[!Areg],Dr 0100 rrr1 10ss sSSS:00:-N???:-----:T-:11: CHK.W s[!Areg],Dr -0100 1110 11ss sSSS:00://///://///:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1110 11ss sSSS:00:-----:-----:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] 0100 rrr1 11ss sSSS:00:-----:-----:--:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar -% This variant of ADDQ is word and long sized only -0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] -0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] +0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] +0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] 0101 jjj0 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #j,d[!Areg] - -% This variant of SUBQ is word and long sized only -0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] -0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] +0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] +0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] 0101 jjj1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #j,d[!Areg] -0101 cccc 1100 1rrr:00:-----:-++++:-B:31: DBcc.W Dr,#1 -0101 cccc 11dd dDDD:00:-----:-++++:--:20: Scc.B d[!Areg] +0101 cccc 1100 1rrr:00:-----:-????:-B:31: DBcc.W Dr,#1 +0101 cccc 11dd dDDD:00:-----:-????:--:20: Scc.B d[!Areg] 0101 cccc 1111 1010:20:-----:-????:T-:10: TRAPcc #1 0101 cccc 1111 1011:20:-----:-????:T-:10: TRAPcc #2 0101 cccc 1111 1100:20:-----:-????:T-:00: TRAPcc @@ -176,30 +170,30 @@ % Bxx.L is 68020 only, but setting the CPU level to 2 would give illegal % instruction exceptions when compiling a 68000 only emulation, which isn't % what we want either. -0110 0001 0000 0000:00://///://///:-B:40: BSR.W #1 -0110 0001 IIII IIII:00://///://///:-B:40: BSR.B #i -0110 0001 1111 1111:00://///://///:-B:40: BSR.L #2 -0110 CCCC 0000 0000:00:-----:-++++:-B:40: Bcc.W #1 -0110 CCCC IIII IIII:00:-----:-++++:-B:40: Bcc.B #i -0110 CCCC 1111 1111:00:-----:-++++:-B:40: Bcc.L #2 +0110 0001 0000 0000:00:-----:-----:-B:40: BSR.W #1 +0110 0001 IIII IIII:00:-----:-----:-B:40: BSR.B #i +0110 0001 1111 1111:00:-----:-----:-B:40: BSR.L #2 +0110 CCCC 0000 0000:00:-----:-????:-B:40: Bcc.W #1 +0110 CCCC IIII IIII:00:-----:-????:-B:40: Bcc.B #i +0110 CCCC 1111 1111:00:-----:-????:-B:40: Bcc.L #2 0111 rrr0 iiii iiii:00:-NZ00:-----:--:12: MOVE.L #i,Dr 1000 rrr0 zzss sSSS:00:-NZ00:-----:--:13: OR.z s[!Areg],Dr 1000 rrr0 11ss sSSS:00:-NZV0:-----:T-:13: DIVU.W s[!Areg],Dr -1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Dreg],Dr -1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Dreg],Dr +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp 1000 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: OR.z Dr,d[!Areg,Dreg] -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp 1000 rrr1 11ss sSSS:00:-NZV0:-----:T-:13: DIVS.W s[!Areg],Dr 1001 rrr0 zzss sSSS:00:XNZVC:-----:--:13: SUB.z s,Dr 1001 rrr0 11ss sSSS:00:-----:-----:--:13: SUBA.W s,Ar -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp 1001 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z Dr,d[!Areg,Dreg] 1001 rrr1 11ss sSSS:00:-----:-----:--:13: SUBA.L s,Ar @@ -211,18 +205,18 @@ 1100 rrr0 zzss sSSS:00:-NZ00:-----:--:13: AND.z s[!Areg],Dr 1100 rrr0 11ss sSSS:00:-NZ00:-----:--:13: MULU.W s[!Areg],Dr -1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Dreg],Dr -1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Dreg],Dr +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp 1100 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: AND.z Dr,d[!Areg,Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] -1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] +1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] 1100 rrr1 11ss sSSS:00:-NZ00:-----:--:13: MULS.W s[!Areg],Dr 1101 rrr0 zzss sSSS:00:XNZVC:-----:--:13: ADD.z s,Dr 1101 rrr0 11ss sSSS:00:-----:-----:--:13: ADDA.W s,Ar -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp 1101 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z Dr,d[!Areg,Dreg] 1101 rrr1 11ss sSSS:00:-----:-----:--:13: ADDA.L s,Ar @@ -230,8 +224,8 @@ 1110 jjjf zz00 1RRR:00:XNZ0C:-----:--:13: LSf.z #j,DR 1110 jjjf zz01 0RRR:00:XNZ0C:X----:--:13: ROXf.z #j,DR 1110 jjjf zz01 1RRR:00:-NZ0C:-----:--:13: ROf.z #j,DR -1110 rrrf zz10 0RRR:00:XNZVC:X----:--:13: ASf.z Dr,DR -1110 rrrf zz10 1RRR:00:XNZ0C:X----:--:13: LSf.z Dr,DR +1110 rrrf zz10 0RRR:00:XNZVC:-----:--:13: ASf.z Dr,DR +1110 rrrf zz10 1RRR:00:XNZ0C:-----:--:13: LSf.z Dr,DR 1110 rrrf zz11 0RRR:00:XNZ0C:X----:--:13: ROXf.z Dr,DR 1110 rrrf zz11 1RRR:00:-NZ0C:-----:--:13: ROf.z Dr,DR 1110 000f 11dd dDDD:00:XNZVC:-----:--:13: ASfW.W d[!Dreg,Areg] @@ -261,6 +255,7 @@ 1111 0011 01ss sSSS:32:-----:-----:--:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] % 68040 instructions +1111 0101 iiii iSSS:40:-----:-----:T-:11: MMUOP #i,s 1111 0100 pp00 1rrr:42:-----:-----:T-:02: CINVL #p,Ar 1111 0100 pp01 0rrr:42:-----:-----:T-:02: CINVP #p,Ar 1111 0100 pp01 1rrr:42:-----:-----:T-:00: CINVA #p @@ -269,18 +264,11 @@ 1111 0100 pp11 1rrr:42:-----:-----:T-:00: CPUSHA #p % destination register number is encoded in the following word 1111 0110 0010 0rrr:40:-----:-----:--:12: MOVE16 ArP,AxP -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],Al -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Areg-Aipi] -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],Al -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Aipi-Aind] - -% MMU disabled -% 1111 0101 iiii iSSS:42:?????:?????:T-:11: MMUOP #i,s - -% EmulOp instructions (deprecated, to be removed) -0111 0001 0000 0000:02:-----:-----:-R:00: EMULOP_RETURN -0111 0001 EEEE EEEE:02:-----:-----:-J:10: EMULOP #E +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],L +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Areg-Aipi] +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],L +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Aipi-Aind] -% NatFea instructions (do I have the srcaddr correct?) disabled -% 0111 0011 0000 0000:00:-----:-----:-J:00: NATFEAT_ID -% 0111 0011 0000 0001:00:-----:-----:-J:00: NATFEAT_CALL +% EmulOp instructions +0111 0001 0000 0000:00:-----:-----:-R:00: EMULOP_RETURN +0111 0001 EEEE EEEE:00:-----:-----:-J:10: EMULOP #E From 8353a9ed44f20737764656978c92a86d01c6481c Mon Sep 17 00:00:00 2001 From: uyjulian Date: Wed, 6 Jun 2018 23:11:08 -0500 Subject: [PATCH 210/534] Hope it works --- BasiliskII/src/Unix/CMakeLists.txt | 2 + BasiliskII/src/Unix/main_unix.cpp | 241 ++---------------- BasiliskII/src/Unix/timer_unix.cpp | 116 +++++---- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 2 +- BasiliskII/src/uae_cpu/compiler/compemu.h | 5 + .../src/uae_cpu/compiler/compemu_support.cpp | 61 ++--- BasiliskII/src/uae_cpu/newcpu.cpp | 7 +- 7 files changed, 125 insertions(+), 309 deletions(-) diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index 9bc6431fb..4454d69a3 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -104,6 +104,8 @@ set_source_files_properties(${BasiliskII_SRCS} target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) +# set(CMAKE_POSITION_INDEPENDENT_CODE OFF) + SET( CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -pagezero_size 0x2000" ) add_definitions(-march=native) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 60824593e..05f9717d8 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -83,27 +83,17 @@ bool TwentyFourBitAddressing; static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes -#ifdef HAVE_PTHREADS - static bool xpram_thread_active = false; // Flag: XPRAM watchdog installed static volatile bool xpram_thread_cancel = false; // Flag: Cancel XPRAM thread -static pthread_t xpram_thread; // XPRAM watchdog +static SDL_Thread *xpram_thread = NULL; // XPRAM watchdog static bool tick_thread_active = false; // Flag: 60Hz thread installed static volatile bool tick_thread_cancel = false; // Flag: Cancel 60Hz thread -static pthread_t tick_thread; // 60Hz thread -static pthread_attr_t tick_thread_attr; // 60Hz thread attributes - -static pthread_mutex_t intflag_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect InterruptFlags -#define LOCK_INTFLAGS pthread_mutex_lock(&intflag_lock) -#define UNLOCK_INTFLAGS pthread_mutex_unlock(&intflag_lock) +static SDL_Thread *tick_thread; // 60Hz thread -#else - -#define LOCK_INTFLAGS -#define UNLOCK_INTFLAGS - -#endif +static SDL_mutex *intflag_lock = NULL; // Mutex to protect InterruptFlags +#define LOCK_INTFLAGS SDL_LockMutex(intflag_lock) +#define UNLOCK_INTFLAGS SDL_UnlockMutex(intflag_lock) #if USE_SCRATCHMEM_SUBTERFUGE uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes @@ -124,8 +114,8 @@ static const char *gui_connection_path = NULL; // GUI connection identifier // Prototypes -static void *xpram_func(void *arg); -static void *tick_func(void *arg); +static int xpram_func(void *arg); +static int tick_func(void *arg); static void one_tick(...); @@ -482,11 +472,10 @@ int main(int argc, char **argv) #ifndef USE_CPU_EMUL_SERVICES -#if defined(HAVE_PTHREADS) +#ifdef USE_SDL - // POSIX threads available, start 60Hz thread - Set_pthread_attr(&tick_thread_attr, 0); - tick_thread_active = (pthread_create(&tick_thread, &tick_thread_attr, tick_func, NULL) == 0); + // SDL threads available, start 60Hz thread + tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL)) != NULL); if (!tick_thread_active) { sprintf(str, GetString(STR_TICK_THREAD_ERR), strerror(errno)); ErrorAlert(str); @@ -494,60 +483,13 @@ int main(int argc, char **argv) } D(bug("60Hz thread started\n")); -#elif defined(HAVE_TIMER_CREATE) && defined(_POSIX_REALTIME_SIGNALS) - - // POSIX.4 timers and real-time signals available, start 60Hz timer - sigemptyset(&timer_sa.sa_mask); - timer_sa.sa_sigaction = (void (*)(int, siginfo_t *, void *))one_tick; - timer_sa.sa_flags = SA_SIGINFO | SA_RESTART; - if (sigaction(SIG_TIMER, &timer_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIG_TIMER", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - struct sigevent timer_event; - timer_event.sigev_notify = SIGEV_SIGNAL; - timer_event.sigev_signo = SIG_TIMER; - if (timer_create(CLOCK_REALTIME, &timer_event, &timer) < 0) { - sprintf(str, GetString(STR_TIMER_CREATE_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - struct itimerspec req; - req.it_value.tv_sec = 0; - req.it_value.tv_nsec = 16625000; - req.it_interval.tv_sec = 0; - req.it_interval.tv_nsec = 16625000; - if (timer_settime(timer, 0, &req, NULL) < 0) { - sprintf(str, GetString(STR_TIMER_SETTIME_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - D(bug("60Hz timer started\n")); - -#else - - // Start 60Hz timer - sigemptyset(&timer_sa.sa_mask); // Block virtual 68k interrupts during SIGARLM handling - timer_sa.sa_handler = one_tick; - timer_sa.sa_flags = SA_ONSTACK | SA_RESTART; - if (sigaction(SIGALRM, &timer_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGALRM", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - struct itimerval req; - req.it_interval.tv_sec = req.it_value.tv_sec = 0; - req.it_interval.tv_usec = req.it_value.tv_usec = 16625; - setitimer(ITIMER_REAL, &req, NULL); - #endif #endif -#ifdef USE_PTHREADS_SERVICES +#ifdef USE_SDL // Start XPRAM watchdog thread memcpy(last_xpram, XPRAM, XPRAM_SIZE); - xpram_thread_active = (pthread_create(&xpram_thread, NULL, xpram_func, NULL) == 0); + xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL)) != NULL); D(bug("XPRAM thread started\n")); #endif @@ -573,41 +515,17 @@ void QuitEmulator(void) Exit680x0(); #endif -#if defined(USE_CPU_EMUL_SERVICES) - // Show statistics - uint64 emulated_ticks_end = GetTicks_usec(); - D(bug("%ld ticks in %ld usec = %f ticks/sec [%ld tick checks]\n", - (long)emulated_ticks_count, (long)(emulated_ticks_end - emulated_ticks_start), - emulated_ticks_count * 1000000.0 / (emulated_ticks_end - emulated_ticks_start), (long)n_check_ticks)); -#elif defined(USE_PTHREADS_SERVICES) // Stop 60Hz thread if (tick_thread_active) { tick_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(tick_thread); -#endif - pthread_join(tick_thread, NULL); + SDL_WaitThread(tick_thread, NULL); } -#elif defined(HAVE_TIMER_CREATE) && defined(_POSIX_REALTIME_SIGNALS) - // Stop 60Hz timer - timer_delete(timer); -#else - struct itimerval req; - req.it_interval.tv_sec = req.it_value.tv_sec = 0; - req.it_interval.tv_usec = req.it_value.tv_usec = 0; - setitimer(ITIMER_REAL, &req, NULL); -#endif -#ifdef USE_PTHREADS_SERVICES // Stop XPRAM watchdog thread if (xpram_thread_active) { xpram_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(xpram_thread); -#endif - pthread_join(xpram_thread, NULL); + SDL_WaitThread(xpram_thread, NULL); } -#endif // Deinitialize everything ExitAll(); @@ -659,71 +577,14 @@ void FlushCodeCache(void *start, uint32 size) #endif } - - -#ifdef HAVE_PTHREADS -/* - * Pthread configuration - */ - -void Set_pthread_attr(pthread_attr_t *attr, int priority) -{ - pthread_attr_init(attr); -#if defined(_POSIX_THREAD_PRIORITY_SCHEDULING) - // Some of these only work for superuser - if (geteuid() == 0) { - pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED); - pthread_attr_setschedpolicy(attr, SCHED_FIFO); - struct sched_param fifo_param; - fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) + - sched_get_priority_max(SCHED_FIFO)) / 2 + - priority); - pthread_attr_setschedparam(attr, &fifo_param); - } - if (pthread_attr_setscope(attr, PTHREAD_SCOPE_SYSTEM) != 0) { -#ifdef PTHREAD_SCOPE_BOUND_NP - // If system scope is not available (eg. we're not running - // with CAP_SCHED_MGT capability on an SGI box), try bound - // scope. It exposes pthread scheduling to the kernel, - // without setting realtime priority. - pthread_attr_setscope(attr, PTHREAD_SCOPE_BOUND_NP); -#endif - } -#endif -} -#endif // HAVE_PTHREADS - - /* * Mutexes */ -#ifdef HAVE_PTHREADS - struct B2_mutex { - B2_mutex() { - pthread_mutexattr_t attr; - pthread_mutexattr_init(&attr); - // Initialize the mutex for priority inheritance -- - // required for accurate timing. -#if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__) - pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT); -#endif -#if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL) - pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_NORMAL); -#endif -#ifdef HAVE_PTHREAD_MUTEXATTR_SETPSHARED - pthread_mutexattr_setpshared(&attr, PTHREAD_PROCESS_PRIVATE); -#endif - pthread_mutex_init(&m, &attr); - pthread_mutexattr_destroy(&attr); - } - ~B2_mutex() { - pthread_mutex_trylock(&m); // Make sure it's locked before - pthread_mutex_unlock(&m); // unlocking it. - pthread_mutex_destroy(&m); - } - pthread_mutex_t m; + B2_mutex() { m = SDL_CreateMutex(); } + ~B2_mutex() { if (m) SDL_DestroyMutex(m); } + SDL_mutex *m; }; B2_mutex *B2_create_mutex(void) @@ -733,12 +594,14 @@ B2_mutex *B2_create_mutex(void) void B2_lock_mutex(B2_mutex *mutex) { - pthread_mutex_lock(&mutex->m); + if (mutex) + SDL_LockMutex(mutex->m); } void B2_unlock_mutex(B2_mutex *mutex) { - pthread_mutex_unlock(&mutex->m); + if (mutex) + SDL_UnlockMutex(mutex->m); } void B2_delete_mutex(B2_mutex *mutex) @@ -746,33 +609,6 @@ void B2_delete_mutex(B2_mutex *mutex) delete mutex; } -#else - -struct B2_mutex { - int dummy; -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - -#endif - - /* * Interrupt flags (must be handled atomically!) */ @@ -808,17 +644,15 @@ static void xpram_watchdog(void) } } -#ifdef USE_PTHREADS_SERVICES -static void *xpram_func(void *arg) +static int xpram_func(void *arg) { while (!xpram_thread_cancel) { for (int i=0; i<60 && !xpram_thread_cancel; i++) Delay_usec(999999); // Only wait 1 second so we quit promptly when xpram_thread_cancel becomes true xpram_watchdog(); } - return NULL; + return 0; } -#endif /* @@ -832,14 +666,6 @@ static void one_second(void) SetInterruptFlag(INTFLAG_1HZ); TriggerInterrupt(); - -#ifndef USE_PTHREADS_SERVICES - static int second_counter = 0; - if (++second_counter > 60) { - second_counter = 0; - xpram_watchdog(); - } -#endif } static void one_tick(...) @@ -850,16 +676,6 @@ static void one_tick(...) one_second(); } -#ifndef USE_PTHREADS_SERVICES - // Threads not used to trigger interrupts, perform video refresh from here - VideoRefresh(); -#endif - -#ifndef HAVE_PTHREADS - // No threads available, perform networking from here - SetInterruptFlag(INTFLAG_ETHER); -#endif - // Trigger 60Hz interrupt if (ROMVersion != ROM_VERSION_CLASSIC || HasMacStarted()) { SetInterruptFlag(INTFLAG_60HZ); @@ -867,8 +683,7 @@ static void one_tick(...) } } -#ifdef USE_PTHREADS_SERVICES -static void *tick_func(void *arg) +static int tick_func(void *arg) { uint64 start = GetTicks_usec(); int64 ticks = 0; @@ -878,17 +693,15 @@ static void *tick_func(void *arg) next += 16625; int64 delay = next - GetTicks_usec(); if (delay > 0) - Delay_usec(delay); + Delay_usec(uint32(delay)); else if (delay < -16625) next = GetTicks_usec(); ticks++; } uint64 end = GetTicks_usec(); - D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return NULL; + D(bug("%Ld ticks in %Ld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); + return 0; } -#endif - /* * Display error alert diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index a73e42806..f6db115e8 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -315,51 +315,54 @@ void Delay_usec(uint32 usec) * Suspend emulator thread, virtual CPU in idle mode */ -#ifdef HAVE_PTHREADS -#if defined(HAVE_PTHREAD_COND_INIT) -#define IDLE_USES_COND_WAIT 1 -static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; -static pthread_cond_t idle_cond = PTHREAD_COND_INITIALIZER; -#elif defined(HAVE_SEM_INIT) -#define IDLE_USES_SEMAPHORE 1 -#include -#ifdef HAVE_SPINLOCKS -static spinlock_t idle_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_IDLE spin_lock(&idle_lock) -#define UNLOCK_IDLE spin_unlock(&idle_lock) -#else -static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_IDLE pthread_mutex_lock(&idle_lock) -#define UNLOCK_IDLE pthread_mutex_unlock(&idle_lock) -#endif -static sem_t idle_sem; -static int idle_sem_ok = -1; -#endif -#endif +// #ifdef HAVE_PTHREADS +// #if defined(HAVE_PTHREAD_COND_INIT) +// #define IDLE_USES_COND_WAIT 1 +// static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; +// static pthread_cond_t idle_cond = PTHREAD_COND_INITIALIZER; +// #elif defined(HAVE_SEM_INIT) +// #define IDLE_USES_SEMAPHORE 1 +// #include +// #ifdef HAVE_SPINLOCKS +// static spinlock_t idle_lock = SPIN_LOCK_UNLOCKED; +// #define LOCK_IDLE spin_lock(&idle_lock) +// #define UNLOCK_IDLE spin_unlock(&idle_lock) +// #else +// static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; +// #define LOCK_IDLE pthread_mutex_lock(&idle_lock) +// #define UNLOCK_IDLE pthread_mutex_unlock(&idle_lock) +// #endif +// static sem_t idle_sem; +// static int idle_sem_ok = -1; +// #endif +// #endif void idle_wait(void) { -#ifdef IDLE_USES_COND_WAIT - pthread_mutex_lock(&idle_lock); - pthread_cond_wait(&idle_cond, &idle_lock); - pthread_mutex_unlock(&idle_lock); -#else -#ifdef IDLE_USES_SEMAPHORE - LOCK_IDLE; - if (idle_sem_ok < 0) - idle_sem_ok = (sem_init(&idle_sem, 0, 0) == 0); - if (idle_sem_ok > 0) { - idle_sem_ok++; - UNLOCK_IDLE; - sem_wait(&idle_sem); - return; - } - UNLOCK_IDLE; -#endif - - // Fallback: sleep 10 ms - Delay_usec(10000); -#endif + //This causes events to not process randomly in JIT so commented out + usleep(10); + +// #ifdef IDLE_USES_COND_WAIT +// pthread_mutex_lock(&idle_lock); +// pthread_cond_wait(&idle_cond, &idle_lock); +// pthread_mutex_unlock(&idle_lock); +// #else +// #ifdef IDLE_USES_SEMAPHORE +// LOCK_IDLE; +// if (idle_sem_ok < 0) +// idle_sem_ok = (sem_init(&idle_sem, 0, 0) == 0); +// if (idle_sem_ok > 0) { +// idle_sem_ok++; +// UNLOCK_IDLE; +// sem_wait(&idle_sem); +// return; +// } +// UNLOCK_IDLE; +// #endif + +// // Fallback: sleep 10 ms +// Delay_usec(10000); +// #endif } @@ -369,18 +372,19 @@ void idle_wait(void) void idle_resume(void) { -#ifdef IDLE_USES_COND_WAIT - pthread_cond_signal(&idle_cond); -#else -#ifdef IDLE_USES_SEMAPHORE - LOCK_IDLE; - if (idle_sem_ok > 1) { - idle_sem_ok--; - UNLOCK_IDLE; - sem_post(&idle_sem); - return; - } - UNLOCK_IDLE; -#endif -#endif + //This causes events to not process randomly in JIT so commented out +// #ifdef IDLE_USES_COND_WAIT +// pthread_cond_signal(&idle_cond); +// #else +// #ifdef IDLE_USES_SEMAPHORE +// LOCK_IDLE; +// if (idle_sem_ok > 1) { +// idle_sem_ok--; +// UNLOCK_IDLE; +// sem_post(&idle_sem); +// return; +// } +// UNLOCK_IDLE; +// #endif +// #endif } diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index b29c77026..6bfadb9d2 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -159,7 +159,7 @@ void TriggerInterrupt(void) void TriggerNMI(void) { - //!! not implemented yet + SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI } diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index 15edd1029..118251c8e 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -35,6 +35,11 @@ // #include "sysconfig.h" #include "newcpu.h" +#ifdef __x86_64__ +#define CPU_64_BIT 1 +#define CPU_x86_64 1 +#endif + #ifdef UAE #ifdef CPU_64_BIT typedef uae_u64 uintptr; diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 62fcfd36c..068123b80 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -43,6 +43,12 @@ #error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" #endif +//TODO: detect i386 and arm platforms + +#ifdef __x86_64__ +#define CPU_x86_64 1 +#endif + /* NOTE: support for AMD64 assumes translation cache and other code * buffers are allocated into a 32-bit address space because (i) B2/JIT * code is not 64-bit clean and (ii) it's faster to resolve branches @@ -254,7 +260,7 @@ uae_u8* comp_pc_p; #else // External variables // newcpu.cpp -extern int quit_program; +extern bool quit_program; #endif // gb-- Extra data for Basilisk II/JIT @@ -4401,41 +4407,28 @@ void flush_icache_range(uae_u8 *start_p, uae_u32 length) blockinfo *bi = active; while (bi) { #if USE_CHECKSUM_INFO - bool candidate = false; - for (checksum_info *csi = bi->csi; csi; csi = csi->next) { - if (((start_p - csi->start_p) < csi->length) || - ((csi->start_p - start_p) < length)) { - candidate = true; - break; - } - } + bool invalidate = false; + for (checksum_info *csi = bi->csi; csi && !invalidate; csi = csi->next) + invalidate = (((start_p - csi->start_p) < csi->length) || + ((csi->start_p - start_p) < length)); #else // Assume system is consistent and would invalidate the right range - const bool candidate = (bi->pc_p - start_p) < length; + const bool invalidate = (bi->pc_p - start_p) < length; #endif - blockinfo *dbi = bi; - bi = bi->next; - if (candidate) { - uae_u32 cl = cacheline(dbi->pc_p); - if (dbi->status == BI_INVALID || dbi->status == BI_NEED_RECOMP) { - if (dbi == cache_tags[cl+1].bi) + if (invalidate) { + uae_u32 cl = cacheline(bi->pc_p); + if (bi == cache_tags[cl + 1].bi) cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; - dbi->handler_to_use = (cpuop_func *)popall_execute_normal; - set_dhtu(dbi, dbi->direct_pen); - dbi->status = BI_INVALID; - } - else { - if (dbi == cache_tags[cl+1].bi) - cache_tags[cl].handler = (cpuop_func *)popall_check_checksum; - dbi->handler_to_use = (cpuop_func *)popall_check_checksum; - set_dhtu(dbi, dbi->direct_pcc); - dbi->status = BI_NEED_CHECK; - } - remove_from_list(dbi); - add_to_dormant(dbi); + bi->handler_to_use = (cpuop_func *)popall_execute_normal; + set_dhtu(bi, bi->direct_pen); + bi->status = BI_NEED_RECOMP; } + bi = bi->next; } return; +#else + // UNUSED(start); + // UNUSED(length); #endif flush_icache(-1); } @@ -5138,15 +5131,11 @@ void m68k_compile_execute (void) setjmpagain: TRY(prb) { for (;;) { - if (quit_program > 0) { - if (quit_program == 1) { + if (quit_program == 1) { #if FLIGHT_RECORDER - dump_flight_recorder(); + dump_flight_recorder(); #endif - break; - } - quit_program = 0; - m68k_reset (); + break; } m68k_do_compile_execute(); } diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index e9d0b88d5..e981aa2b0 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -854,11 +854,11 @@ int m68k_move2c (int regno, uae_u32 *regp) case 0: regs.sfc = *regp & 7; break; case 1: regs.dfc = *regp & 7; break; case 2: - cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); + regs.cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); #if USE_JIT set_cache_state(regs.cacr & 0x8000); if (*regp & 0x08) { /* Just to be on the safe side */ - flush_icache(2); + flush_icache(1); } #endif break; @@ -1267,6 +1267,9 @@ void mmu_op(uae_u32 opcode, uae_u16 extra) if ((opcode & 0xFE0) == 0x0500) { /* PFLUSH */ mmusr = 0; +#ifdef USE_JIT + flush_icache(0); +#endif } else if ((opcode & 0x0FD8) == 0x548) { /* PTEST */ } else From 685ce533f86707256a3971a81db011f0d9d02e39 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 7 Jun 2018 22:21:31 +0900 Subject: [PATCH 211/534] delete symlink --- SheepShaver/src/MacOSX/clip_macosx64.mm | 1 - 1 file changed, 1 deletion(-) delete mode 120000 SheepShaver/src/MacOSX/clip_macosx64.mm diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm deleted file mode 120000 index 18640812d..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx64.mm +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/MacOSX/clip_macosx64.mm \ No newline at end of file From bb4611b4658b3cab2707bb8e93b310d05f9bf7c5 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 7 Jun 2018 22:23:22 +0900 Subject: [PATCH 212/534] clip_macosx64.mm copied from BasiliskII --- SheepShaver/src/MacOSX/clip_macosx64.mm | 1286 +++++++++++++++++++++++ 1 file changed, 1286 insertions(+) create mode 100644 SheepShaver/src/MacOSX/clip_macosx64.mm diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm new file mode 100644 index 000000000..23261890a --- /dev/null +++ b/SheepShaver/src/MacOSX/clip_macosx64.mm @@ -0,0 +1,1286 @@ +/* + * clip_macosx64.mm - Clipboard handling, MacOS X (Pasteboard Manager) implementation + * + * (C) 2012 Jean-Pierre Stierlin + * (C) 2012 Alexei Svitkine + * (C) 2012 Charles Srstka + * + * 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 "sysdeps.h" +#define _UINT64 +#import +#include + +#include "clip.h" +#include "main.h" +#include "cpu_emulation.h" +#include "emul_op.h" +#include "autorelease.h" +#include "pict.h" + +#define DEBUG 0 +#include "debug.h" + +#ifndef FOURCC +#define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) +#endif + +#define TYPE_PICT FOURCC('P','I','C','T') +#define TYPE_TEXT FOURCC('T','E','X','T') +#define TYPE_STYL FOURCC('s','t','y','l') +#define TYPE_UTXT FOURCC('u','t','x','t') +#define TYPE_UT16 FOURCC('u','t','1','6') +#define TYPE_USTL FOURCC('u','s','t','l') +#define TYPE_MOOV FOURCC('m','o','o','v') +#define TYPE_SND FOURCC('s','n','d',' ') +#define TYPE_ICNS FOURCC('i','c','n','s') + +static NSPasteboard *g_pboard; +static NSInteger g_pb_change_count = 0; + +// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the MacOS X side +static bool we_put_this_data = false; + +static bool should_clear = false; + +static NSMutableDictionary *g_macScrap; + +// flavor UTIs + +static NSString * const UTF16_TEXT_FLAVOR_NAME = @"public.utf16-plain-text"; +static NSString * const TEXT_FLAVOR_NAME = @"com.apple.traditional-mac-plain-text"; +static NSString * const STYL_FLAVOR_NAME = @"net.cebix.basilisk.styl-data"; + +// font face types + +enum { + FONT_FACE_PLAIN = 0, + FONT_FACE_BOLD = 1, + FONT_FACE_ITALIC = 2, + FONT_FACE_UNDERLINE = 4, + FONT_FACE_OUTLINE = 8, + FONT_FACE_SHADOW = 16, + FONT_FACE_CONDENSED = 32, + FONT_FACE_EXTENDED = 64 +}; + +// Script Manager constants + +#define smRoman 0 +#define smMacSysScript 18 +#define smMacRegionCode 40 + +static NSString *UTIForFlavor(uint32_t type) +{ + switch (type) { + case TYPE_MOOV: + return (NSString *)kUTTypeQuickTimeMovie; + case TYPE_SND: + return (NSString *)kUTTypeAudio; + case TYPE_ICNS: + return (NSString *)kUTTypeAppleICNS; + default: { + CFStringRef typeString = UTCreateStringForOSType(type); + NSString *uti = (NSString *)UTTypeCreatePreferredIdentifierForTag(kUTTagClassOSType, typeString, NULL); + + CFRelease(typeString); + + if (uti == nil || [uti hasPrefix:@"dyn."]) { + // The docs threaten that this may stop working at some unspecified point in the future. + // However, it seems to work on Lion and Mountain Lion, and there's no other way to do this + // that I can see. Most likely, whichever release eventually breaks this will probably also + // drop support for the 32-bit applications which typically use these 32-bit scrap types anyway, + // making it irrelevant. When this happens, we should include a version check for the version of + // OS X that dropped this support, and leave uti alone in that case. + + [uti release]; + uti = [[NSString alloc] initWithFormat:@"CorePasteboardFlavorType 0x%08x", type]; + } + + return [uti autorelease]; + } + } +} + +static uint32_t FlavorForUTI(NSString *uti) +{ + CFStringRef typeTag = UTTypeCopyPreferredTagWithClass((CFStringRef)uti, kUTTagClassOSType); + + if (!typeTag) + return 0; + + uint32_t type = UTGetOSTypeFromString(typeTag); + + CFRelease(typeTag); + + return type; +} + +/* + * Get current system script encoding on Mac + */ + +static int GetMacScriptManagerVariable(uint16_t varID) +{ + int ret = -1; + M68kRegisters r; + static uint8_t proc[] = { + 0x59, 0x4f, // subq.w #4,sp + 0x3f, 0x3c, 0x00, 0x00, // move.w #varID,-(sp) + 0x2f, 0x3c, 0x84, 0x02, 0x00, 0x08, // move.l #-2080243704,-(sp) + 0xa8, 0xb5, // ScriptUtil() + 0x20, 0x1f, // move.l (a7)+,d0 + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + WriteMacInt16(proc_area + 4, varID); + Execute68k(proc_area, &r); + ret = r.d[0]; + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } + return ret; +} + +static ScriptCode ScriptNumberForFontID(int16_t fontID) +{ + ScriptCode ret = -1; + M68kRegisters r; + static uint8_t proc[] = { + 0x55, 0x4f, // subq.w #2,sp + 0x3f, 0x3c, 0x00, 0x00, // move.w #fontID,-(sp) + 0x2f, 0x3c, 0x82, 0x02, 0x00, 0x06, // move.l #-2113798138,-(sp) + 0xa8, 0xb5, // ScriptUtil() + 0x30, 0x1f, // move.w (sp)+,d0 + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + WriteMacInt16(proc_area + 4, fontID); + Execute68k(proc_area, &r); + ret = r.d[0]; + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } + return ret; +} + +/* + * Get Mac's default text encoding + */ + +static TextEncoding MacDefaultTextEncoding() +{ + int script = GetMacScriptManagerVariable(smMacSysScript); + int region = GetMacScriptManagerVariable(smMacRegionCode); + TextEncoding encoding; + + if (UpgradeScriptInfoToTextEncoding(script, kTextLanguageDontCare, region, NULL, &encoding)) + encoding = kTextEncodingMacRoman; + + return encoding; +} + +static NSData *ConvertToMacTextEncoding(NSAttributedString *aStr, NSArray **styleAndScriptRuns) +{ + NSUInteger length = [aStr length]; + + NSMutableArray *styleRuns = [NSMutableArray array]; + + for (NSUInteger index = 0; index < length;) { + NSRange attrRange; + NSDictionary *attrs = [aStr attributesAtIndex:index effectiveRange:&attrRange]; + + [styleRuns addObject:[NSDictionary dictionaryWithObjectsAndKeys: + [NSNumber numberWithUnsignedInteger:index], @"offset", + attrs, @"attributes", nil]]; + + index = NSMaxRange(attrRange); + } + + UnicodeToTextRunInfo info; + + OSStatus err = CreateUnicodeToTextRunInfoByScriptCode(0, NULL, &info); + + if (err != noErr) { + if (styleAndScriptRuns) + *styleAndScriptRuns = styleRuns; + + return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; + } + + unichar chars[length]; + + [[aStr string] getCharacters:chars range:NSMakeRange(0, length)]; + + NSUInteger unicodeLength = length * sizeof(unichar); + NSUInteger bufLen = unicodeLength * 2; + uint8_t buf[bufLen]; + ByteCount bytesRead; + + ItemCount scriptRunCount = 1601; // max number of allowed style changes + ScriptCodeRun scriptRuns[scriptRunCount]; + + ItemCount inOffsetCount = [styleRuns count]; + ByteOffset inOffsets[inOffsetCount]; + + if (inOffsetCount) { + for (NSUInteger i = 0; i < inOffsetCount; i++) { + NSDictionary *eachRun = [styleRuns objectAtIndex:i]; + + inOffsets[i] = [[eachRun objectForKey:@"offset"] unsignedLongValue] * 2; + } + } + + ItemCount offsetCount; + ByteOffset offsets[inOffsetCount]; + + err = ConvertFromUnicodeToScriptCodeRun(info, unicodeLength, chars, + kUnicodeTextRunMask | kUnicodeUseFallbacksMask | kUnicodeLooseMappingsMask, + inOffsetCount, inOffsets, &offsetCount, offsets, + bufLen, &bytesRead, &bufLen, buf, + scriptRunCount, &scriptRunCount, scriptRuns); + + if (err != noErr) { + if (styleAndScriptRuns) + *styleAndScriptRuns = styleRuns; + + return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; + } + + if (styleAndScriptRuns) { + NSMutableArray *runs = [NSMutableArray array]; + NSUInteger currentStyleRun = 0; + NSUInteger currentScriptRun = 0; + + for (NSUInteger currentOffset = 0; currentOffset < bufLen;) { + ScriptCodeRun scriptRun = scriptRuns[currentScriptRun]; + NSDictionary *attrs = [[styleRuns objectAtIndex:currentStyleRun] objectForKey:@"attributes"]; + + NSUInteger nextStyleOffset = (currentStyleRun < offsetCount - 1) ? offsets[currentStyleRun + 1] : bufLen; + NSUInteger nextScriptOffset = (currentScriptRun < scriptRunCount - 1) ? scriptRuns[currentScriptRun + 1].offset : bufLen; + + [runs addObject:[NSDictionary dictionaryWithObjectsAndKeys: + [NSNumber numberWithUnsignedInteger:currentOffset], @"offset", + [NSNumber numberWithShort:scriptRun.script], @"script", + attrs, @"attributes", nil]]; + + if (nextStyleOffset == nextScriptOffset) { + currentStyleRun++; + currentScriptRun++; + currentOffset = nextStyleOffset; + } else if (nextStyleOffset < nextScriptOffset) { + currentStyleRun++; + currentOffset = nextStyleOffset; + } else { + currentScriptRun++; + currentOffset = nextScriptOffset; + } + } + + *styleAndScriptRuns = runs; + } + + return [NSData dataWithBytes:buf length:bufLen]; +} + +/* + * Count all Mac font IDs on the system + */ + +static NSUInteger CountMacFonts() +{ + M68kRegisters r; + static uint8_t proc[] = { + 0x55, 0x4f, // subq.w #2,sp + 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) + 0xa9, 0x9c, // CountResources() + 0x30, 0x1f, // move.w (sp)+,D0 + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + int16_t fontCount = 0; + + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + Execute68k(proc_area, &r); + + fontCount = r.d[0]; + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } + + if (fontCount < 0) { + fontCount = 0; + } + + return fontCount; +} + +/* + * Get Mac font ID at index + */ + +static int16_t MacFontIDAtIndex(NSUInteger index) +{ + M68kRegisters r; + static uint8_t get_res_handle_proc[] = { + 0x42, 0x27, // clr.b -(sp) + 0xa9, 0x9b, // SetResLoad() + 0x59, 0x4f, // subq.w #4,sp + 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) + 0x3f, 0x3c, 0, 0, // move.w #index,-(sp) + 0xa9, 0x9d, // GetIndResource() + 0x26, 0x5f, // movea.l (sp)+,A3 + 0x1f, 0x3c, 0x00, 0x01, // move.b #1,-(sp) + 0xa9, 0x9b, // SetResLoad() + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(get_res_handle_proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + + uint32_t res_handle = 0; + int16_t fontID = 0; + + if (proc_area) { + Host2Mac_memcpy(proc_area, get_res_handle_proc, sizeof(get_res_handle_proc)); + WriteMacInt16(proc_area + 14, (uint16_t)(index + 1)); + + Execute68k(proc_area, &r); + + res_handle = r.a[3]; + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr() + } + + if (res_handle) { + static uint8_t get_info_proc[] = { + 0x2f, 0x0a, // move.l A2,-(sp) + 0x2f, 0x0b, // move.l A3,-(sp) + 0x42, 0xa7, // clr.l -(sp) + 0x42, 0xa7, // clr.l -(sp) + 0xa9, 0xa8, // GetResInfo() + 0x2f, 0x0a, // move.l A2,-(sp) + 0xa9, 0xa3, // ReleaseResource() + M68K_RTS >> 8, M68K_RTS & 0xff, + 0, 0 + }; + + r.d[0] = sizeof(get_info_proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + proc_area = r.a[0]; + + if (proc_area) { + Host2Mac_memcpy(proc_area, get_info_proc, sizeof(get_info_proc)); + r.a[2] = res_handle; + r.a[3] = proc_area + 16; + + Execute68k(proc_area, &r); + + fontID = ReadMacInt16(proc_area + 16); + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr() + } + } + + return fontID; +} + +/* + * List all font IDs on the system + */ + +static NSArray *ListMacFonts() +{ + NSUInteger fontCount = CountMacFonts(); + NSMutableArray *fontIDs = [NSMutableArray array]; + + for (NSUInteger i = 0; i < fontCount; i++) { + int16_t eachFontID = MacFontIDAtIndex(i); + + [fontIDs addObject:[NSNumber numberWithShort:eachFontID]]; + } + + return fontIDs; +} + +/* + * List all font IDs having a certain script + */ + +static NSArray *ListMacFontsForScript(ScriptCode script) +{ + NSMutableArray *fontIDs = [NSMutableArray array]; + + for (NSNumber *eachFontIDNum in ListMacFonts()) { + if (ScriptNumberForFontID([eachFontIDNum shortValue]) == script) + [fontIDs addObject:eachFontIDNum]; + } + + return fontIDs; +} + +/* + * Convert Mac font ID to font name + */ + +static NSString *FontNameFromFontID(int16_t fontID) +{ + M68kRegisters r; + r.d[0] = 256; // Str255: 255 characters + length byte + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t name_area = r.a[0]; + + if (!name_area) + return nil; + + uint8_t proc[] = { + 0x3f, 0x3c, 0, 0, // move.w #fontID,-(sp) + 0x2f, 0x0a, // move.l A2,-(sp) + 0xa8, 0xff, // GetFontName() + M68K_RTS >> 8, M68K_RTS & 0xff + }; + + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + WriteMacInt16(proc_area + 2, fontID); + r.a[2] = name_area; + Execute68k(proc_area, &r); + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } + + uint8_t * const namePtr = Mac2HostAddr(name_area); + + NSString *name = (NSString *)CFStringCreateWithPascalString(kCFAllocatorDefault, namePtr, kCFStringEncodingMacRoman); + + r.a[0] = name_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + + return [name autorelease]; +} + +/* + * Convert font name to Mac font ID + */ + +static int16_t FontIDFromFontName(NSString *fontName) +{ + M68kRegisters r; + r.d[0] = 256; // Str255: 255 characters + length byte + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t name_area = r.a[0]; + + if (!name_area) + return 0; + + uint8_t * const namePtr = Mac2HostAddr(name_area); + + CFStringGetPascalString((CFStringRef)fontName, namePtr, 256, kCFStringEncodingMacRoman); + + uint8_t proc[] = { + 0x2f, 0x0a, // move.l A2,-(sp) + 0x2f, 0x0b, // move.l A3,-(sp) + 0xa9, 0x00, // GetFNum() + M68K_RTS >> 8, M68K_RTS & 0xff, + 0, 0 + }; + + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + int16_t fontID = 0; + + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + r.a[2] = name_area; + r.a[3] = proc_area + 8; + + Execute68k(proc_area, &r); + + fontID = ReadMacInt16(proc_area + 8); + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } + + r.a[0] = name_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + + return fontID; +} + +/* + * Get font ID in desired script if possible; otherwise, try to get some font in the desired script. + */ + +static int16_t FontIDFromFontNameAndScript(NSString *fontName, ScriptCode script) +{ + int16_t fontID = FontIDFromFontName(fontName); + + if (ScriptNumberForFontID(fontID) == script) + return fontID; + + NSArray *fontIDs = ListMacFontsForScript(script); + + if ([fontIDs count] == 0) + return fontID; // no fonts are going to work; might as well return the original one + + if (fontName) { + // look for a localized version of our font; e.g. "Helvetica CE" if our font is Helvetica + for (NSNumber *eachFontIDNum in fontIDs) { + int16_t eachFontID = [eachFontIDNum shortValue]; + + if ([FontNameFromFontID(eachFontID) hasPrefix:fontName]) + return eachFontID; + } + } + + // Give up and just return a font that will work + return [[fontIDs objectAtIndex:0] shortValue]; +} + +/* + * Convert Mac TEXT/styl to attributed string + */ + +static NSAttributedString *AttributedStringFromMacTEXTAndStyl(NSData *textData, NSData *stylData) +{ + NSMutableAttributedString *aStr = [[[NSMutableAttributedString alloc] init] autorelease]; + + if (aStr == nil) + return nil; + + const uint8_t *bytes = (const uint8_t *)[stylData bytes]; + NSUInteger length = [stylData length]; + + if (length < 2) + return nil; + + uint16_t elements = CFSwapInt16BigToHost(*(uint16_t *)bytes); + const NSUInteger elementSize = 20; + + if (length < elements * elementSize) + return nil; + + NSUInteger cursor = 2; + + for (NSUInteger i = 0; i < elements; i++) AUTORELEASE_POOL { + int32_t startChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); cursor += 4; + int16_t height __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + int16_t ascent __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + int16_t fontID = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + uint8_t face = bytes[cursor]; cursor += 2; + int16_t size = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + uint16_t red = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + uint16_t green = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + uint16_t blue = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; + + int32_t nextChar; + + if (i + 1 == elements) + nextChar = [textData length]; + else + nextChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); + + NSMutableDictionary *attrs = [[NSMutableDictionary alloc] init]; + NSColor *color = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:1.0]; + NSFont *font; + TextEncoding encoding; + + if (fontID == 0) { // System font + CGFloat fontSize = (size == 0) ? [NSFont systemFontSize] : (CGFloat)size; + font = [NSFont systemFontOfSize:fontSize]; + } else if (fontID == 1) { // Application font + font = [NSFont userFontOfSize:(CGFloat)size]; + } else { + NSString *fontName = FontNameFromFontID(fontID); + font = [NSFont fontWithName:fontName size:(CGFloat)size]; + + if (font == nil) { + // Convert localized variants of fonts; e.g. "Helvetica CE" to "Helvetica" + + NSRange wsRange = [fontName rangeOfCharacterFromSet:[NSCharacterSet whitespaceCharacterSet] options:NSBackwardsSearch]; + + if (wsRange.length) { + fontName = [fontName substringToIndex:wsRange.location]; + font = [NSFont fontWithName:fontName size:(CGFloat)size]; + } + } + } + + if (font == nil) + font = [NSFont userFontOfSize:(CGFloat)size]; + + if (UpgradeScriptInfoToTextEncoding(ScriptNumberForFontID(fontID), kTextLanguageDontCare, kTextRegionDontCare, NULL, &encoding)) + encoding = MacDefaultTextEncoding(); + + NSFontManager *fm = [NSFontManager sharedFontManager]; + + if (face & FONT_FACE_BOLD) + font = [fm convertFont:font toHaveTrait:NSBoldFontMask]; + + if (face & FONT_FACE_ITALIC) + font = [fm convertFont:font toHaveTrait:NSItalicFontMask]; + + if (face & FONT_FACE_CONDENSED) + font = [fm convertFont:font toHaveTrait:NSCondensedFontMask]; + + if (face & FONT_FACE_EXTENDED) + font = [fm convertFont:font toHaveTrait:NSExpandedFontMask]; + + [attrs setObject:font forKey:NSFontAttributeName]; + + if (face & FONT_FACE_UNDERLINE) + [attrs setObject:[NSNumber numberWithInteger:NSUnderlineStyleSingle] forKey:NSUnderlineStyleAttributeName]; + + if (face & FONT_FACE_OUTLINE) { + [attrs setObject:color forKey:NSStrokeColorAttributeName]; + [attrs setObject:[NSNumber numberWithInteger:3] forKey:NSStrokeWidthAttributeName]; + } + + if (face & FONT_FACE_SHADOW) { + NSShadow *shadow = [[NSShadow alloc] init]; + NSColor *shadowColor = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:0.5]; + + [shadow setShadowColor:shadowColor]; + [shadow setShadowOffset:NSMakeSize(2, -2.0)]; + + [attrs setObject:shadow forKey:NSShadowAttributeName]; + + [shadow release]; + } + + [attrs setObject:color forKey:NSForegroundColorAttributeName]; + + NSData *partialData = [textData subdataWithRange:NSMakeRange(startChar, nextChar - startChar)]; + NSString *partialString = [[NSString alloc] initWithData:partialData encoding:CFStringConvertEncodingToNSStringEncoding(encoding)]; + + if (partialString) { + NSAttributedString *partialAttribString = [[NSAttributedString alloc] initWithString:partialString attributes:attrs]; + + [aStr appendAttributedString:partialAttribString]; + + [partialAttribString release]; + } + + [partialString release]; + [attrs release]; + } + + return aStr; +} + +/* + * Append styl data for one text run + */ + +static void AppendStylRunData(NSMutableData *stylData, NSDictionary *attrs, ScriptCode script) +{ + NSFontManager *fontManager = [NSFontManager sharedFontManager]; + NSLayoutManager *layoutManager = [[NSLayoutManager alloc] init]; + + NSFont *font = [attrs objectForKey:NSFontAttributeName]; + NSColor *color = [[attrs objectForKey:NSForegroundColorAttributeName] colorUsingColorSpaceName:NSDeviceRGBColorSpace device:nil]; + NSFontTraitMask traits = [fontManager traitsOfFont:font]; + NSNumber *underlineStyle = [attrs objectForKey:NSUnderlineStyleAttributeName]; + NSNumber *strokeWidth = [attrs objectForKey:NSStrokeWidthAttributeName]; + NSShadow *shadow = [attrs objectForKey:NSShadowAttributeName]; + + int16_t hostFontID = FontIDFromFontNameAndScript([font familyName], script); + + if (hostFontID == 0) { + hostFontID = [font isFixedPitch] ? 4 /* Monaco */ : 1 /* Application font */; + } + + int16_t height = CFSwapInt16HostToBig((int16_t)rint([layoutManager defaultLineHeightForFont:font])); + int16_t ascent = CFSwapInt16HostToBig((int16_t)rint([font ascender])); + int16_t fontID = CFSwapInt16HostToBig(hostFontID); + uint8_t face = 0; + int16_t size = CFSwapInt16HostToBig((int16_t)rint([font pointSize])); + uint16_t red = CFSwapInt16HostToBig((int16_t)rint([color redComponent] * 65535.0)); + uint16_t green = CFSwapInt16HostToBig((int16_t)rint([color greenComponent] * 65535.0)); + uint16_t blue = CFSwapInt16HostToBig((int16_t)rint([color blueComponent] * 65535.0)); + + if (traits & NSBoldFontMask) { + face |= FONT_FACE_BOLD; + } + + if (traits & NSItalicFontMask) { + face |= FONT_FACE_ITALIC; + } + + if (traits & NSCondensedFontMask) { + face |= FONT_FACE_CONDENSED; + } + + if (traits & NSExpandedFontMask) { + face |= FONT_FACE_EXTENDED; + } + + if (underlineStyle && [underlineStyle integerValue] != NSUnderlineStyleNone) { + face |= FONT_FACE_UNDERLINE; + } + + if (strokeWidth && [strokeWidth doubleValue] > 0.0) { + face |= FONT_FACE_OUTLINE; + } + + if (shadow) { + face |= FONT_FACE_SHADOW; + } + + [stylData appendBytes:&height length:2]; + [stylData appendBytes:&ascent length:2]; + [stylData appendBytes:&fontID length:2]; + [stylData appendBytes:&face length:1]; + [stylData increaseLengthBy:1]; + [stylData appendBytes:&size length:2]; + [stylData appendBytes:&red length:2]; + [stylData appendBytes:&green length:2]; + [stylData appendBytes:&blue length:2]; + + [layoutManager release]; +} + +/* + * Convert attributed string to TEXT/styl + */ + +static NSData *ConvertToMacTEXTAndStyl(NSAttributedString *aStr, NSData **outStylData) +{ + // Limitations imposed by the Mac TextEdit system. + const NSUInteger charLimit = 32 * 1024; + const NSUInteger elementLimit = 1601; + + NSUInteger length = [aStr length]; + + if (length > charLimit) { + aStr = [aStr attributedSubstringFromRange:NSMakeRange(0, charLimit)]; + } + + NSArray *runs = nil; + + NSData *textData = ConvertToMacTextEncoding(aStr, &runs); + + NSMutableData *stylData = [NSMutableData dataWithLength:2]; // number of styles to be filled in at the end + + NSUInteger elements = 0; + + for (NSDictionary *eachRun in runs) { + if (elements >= elementLimit) + break; + + NSUInteger offset = [[eachRun objectForKey:@"offset"] unsignedIntegerValue]; + ScriptCode script = [[eachRun objectForKey:@"script"] shortValue]; + NSDictionary *attrs = [eachRun objectForKey:@"attributes"]; + + int32_t startChar = CFSwapInt32HostToBig((int32_t)offset); + [stylData appendBytes:&startChar length:4]; + + AppendStylRunData(stylData, attrs, script); + + elements++; + } + + uint16_t bigEndianElements = CFSwapInt16HostToBig((uint16_t)elements); + + [stylData replaceBytesInRange:NSMakeRange(0, 2) withBytes:&bigEndianElements length:2]; + + if (outStylData) + *outStylData = stylData; + + return textData; +} + +/* + * Get data of a particular flavor from the pasteboard + */ + +static NSData *DataFromPasteboard(NSPasteboard *pboard, NSString *flavor) +{ + return [pboard dataForType:flavor]; +} + +/* + * Convert Mac TEXT/styl to RTF + */ + +static void WriteMacTEXTAndStylToPasteboard(NSPasteboard *pboard, NSData *textData, NSData *stylData) +{ + NSMutableAttributedString *aStr = [AttributedStringFromMacTEXTAndStyl(textData, stylData) mutableCopy]; + + if (!aStr) { + NSString *string = [[NSString alloc] initWithData:textData encoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; + + if (!string) + return; + + aStr = [[NSMutableAttributedString alloc] initWithString:string attributes:nil]; + + [string release]; + } + + // fix line endings + [[aStr mutableString] replaceOccurrencesOfString:@"\r" withString:@"\n" options:NSLiteralSearch range:NSMakeRange(0, [aStr length])]; + + [pboard writeObjects:[NSArray arrayWithObject:aStr]]; + + [aStr release]; +} + +/* + * Convert RTF to Mac TEXT/styl + */ + +static NSData *MacTEXTAndStylDataFromPasteboard(NSPasteboard *pboard, NSData **outStylData) +{ + NSMutableAttributedString *aStr; + + NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSAttributedString class]] options:nil]; + + if ([objs count]) { + aStr = [[objs objectAtIndex:0] mutableCopy]; + } else { + objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSString class]] options:nil]; + + if (![objs count]) + return nil; + + aStr = [[NSMutableAttributedString alloc] initWithString:[objs objectAtIndex:0]]; + } + + // fix line endings + [[aStr mutableString] replaceOccurrencesOfString:@"\n" withString:@"\r" options:NSLiteralSearch range:NSMakeRange(0, [[aStr mutableString] length])]; + + NSData *stylData = nil; + NSData *textData = ConvertToMacTEXTAndStyl(aStr, &stylData); + + [aStr release]; + + if (outStylData) + *outStylData = stylData; + + return textData; +} + +/* + * Initialization + */ + +void ClipInit(void) +{ + g_pboard = [[NSPasteboard generalPasteboard] retain]; + if (!g_pboard) { + D(bug("could not create Pasteboard\n")); + } + + g_macScrap = [[NSMutableDictionary alloc] init]; +} + + +/* + * Deinitialization + */ + +void ClipExit(void) +{ + [g_pboard release]; + g_pboard = nil; + + [g_macScrap release]; + g_macScrap = nil; +} + +/* + * Convert an NSImage to PICT format. + */ + +static NSData *ConvertImageToPICT(NSImage *image) { + if ([[image representations] count] == 0) { + return nil; + } + + NSImageRep *rep = [[image representations] objectAtIndex:0]; + NSUInteger width; + NSUInteger height; + + if ([rep isKindOfClass:[NSBitmapImageRep class]]) { + width = [rep pixelsWide]; + height = [rep pixelsHigh]; + } else { + width = lrint([image size].width); + height = lrint([image size].height); + } + + // create a new bitmap image rep in our desired format, following the advice here: + // https://developer.apple.com/library/mac/#releasenotes/Cocoa/AppKitOlderNotes.html#X10_6Notes + + NSBitmapImageRep *bitmap = [[NSBitmapImageRep alloc] initWithBitmapDataPlanes:NULL + pixelsWide:width + pixelsHigh:height + bitsPerSample:8 + samplesPerPixel:4 + hasAlpha:YES + isPlanar:NO + colorSpaceName:NSCalibratedRGBColorSpace + bytesPerRow:width * 4 + bitsPerPixel:32]; + + [NSGraphicsContext saveGraphicsState]; + [NSGraphicsContext setCurrentContext:[NSGraphicsContext graphicsContextWithBitmapImageRep:bitmap]]; + [rep draw]; + [NSGraphicsContext restoreGraphicsState]; + + unsigned char *rgba = [bitmap bitmapData]; + + long bufSize = ConvertRGBAToPICT(NULL, 0, rgba, width, height); + + NSData *pictData = nil; + + if (bufSize > 0) { + uint8_t *buf = (uint8_t *)malloc(bufSize); + + long pictSize = ConvertRGBAToPICT(buf, bufSize, rgba, width, height); + + if (pictSize > 0) + pictData = [NSData dataWithBytes:buf length:pictSize]; + + free(buf); + } + + [bitmap release]; + + return pictData; +} + +/* + * Convert any images that may be on the clipboard to PICT format if possible. + */ + +static NSData *MacPICTDataFromPasteboard(NSPasteboard *pboard) +{ + // check if there's any PICT data on the pasteboard + NSData *pictData = DataFromPasteboard(pboard, (NSString *)kUTTypePICT); + + if (pictData) + return pictData; + + // now check to see if any images on the pasteboard have PICT representations + NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSImage class]] options:nil]; + + for (NSImage *eachImage in objs) { + for (NSImageRep *eachRep in [eachImage representations]) { + + if ([eachRep isKindOfClass:[NSPICTImageRep class]]) + return [(NSPICTImageRep *)eachRep PICTRepresentation]; + } + } + + // Give up and perform the conversion ourselves + if ([objs count]) + return ConvertImageToPICT([objs objectAtIndex:0]); + + // If none of that worked, sorry, we're out of options + return nil; +} + +/* + * Zero Mac clipboard + */ + +static void ZeroMacClipboard() +{ + D(bug("Zeroing Mac clipboard\n")); + M68kRegisters r; + static uint8_t proc[] = { + 0x59, 0x8f, // subq.l #4,sp + 0xa9, 0xfc, // ZeroScrap() + 0x58, 0x8f, // addq.l #4,sp + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + Execute68k(proc_area, &r); + + [g_macScrap removeAllObjects]; + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } +} + +/* + * Write data to Mac clipboard + */ + +static void WriteDataToMacClipboard(NSData *pbData, uint32_t type) +{ + D(bug("Writing data %s to Mac clipboard with type '%c%c%c%c'\n", [[pbData description] UTF8String], + (type >> 24) & 0xff, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff)); + + if ([pbData length] == 0) + return; + + NSNumber *typeNum = [NSNumber numberWithInteger:type]; + + if ([g_macScrap objectForKey:typeNum]) { + // the classic Mac OS can't have more than one object of the same type on the clipboard + return; + } + + // Allocate space for new scrap in MacOS side + M68kRegisters r; + r.d[0] = [pbData length]; + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t scrap_area = r.a[0]; + + // Get the native clipboard data + if (scrap_area) { + uint8_t * const data = Mac2HostAddr(scrap_area); + + memcpy(data, [pbData bytes], [pbData length]); + + // Add new data to clipboard + static uint8_t proc[] = { + 0x59, 0x8f, // subq.l #4,sp + 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) + 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) + 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) + 0xa9, 0xfe, // PutScrap() + 0x58, 0x8f, // addq.l #4,sp + M68K_RTS >> 8, M68K_RTS & 0xff + }; + r.d[0] = sizeof(proc); + Execute68kTrap(0xa71e, &r); // NewPtrSysClear() + uint32_t proc_area = r.a[0]; + + if (proc_area) { + Host2Mac_memcpy(proc_area, proc, sizeof(proc)); + WriteMacInt32(proc_area + 4, [pbData length]); + WriteMacInt32(proc_area + 10, type); + WriteMacInt32(proc_area + 16, scrap_area); + we_put_this_data = true; + Execute68k(proc_area, &r); + + r.a[0] = proc_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + + [g_macScrap setObject:pbData forKey:typeNum]; + } + + r.a[0] = scrap_area; + Execute68kTrap(0xa01f, &r); // DisposePtr + } +} + +/* + * Take all the data on host pasteboard and convert it to something the Mac understands if possible + */ + +static void ConvertHostPasteboardToMacScrap() +{ + D(bug("ConvertHostPasteboardToMacScrap\n")); + + ZeroMacClipboard(); + + NSData *stylData = nil; + NSData *textData = MacTEXTAndStylDataFromPasteboard(g_pboard, &stylData); + + if (textData) { + if (stylData) + WriteDataToMacClipboard(stylData, TYPE_STYL); + + WriteDataToMacClipboard(textData, TYPE_TEXT); + } + + NSData *pictData = MacPICTDataFromPasteboard(g_pboard); + + if (pictData) + WriteDataToMacClipboard(pictData, TYPE_PICT); + + for (NSString *eachType in [g_pboard types]) { + if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeText)) { + // text types are already handled + continue; + } + + if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeImage)) { + // image types are already handled + continue; + } + + uint32_t type = FlavorForUTI(eachType); + + // skip styl and ustl as well; those fall under text, which is handled already + if (!type || type == TYPE_STYL || type == TYPE_USTL) + continue; + + WriteDataToMacClipboard(DataFromPasteboard(g_pboard, eachType), type); + } +} + +/* + * Take all the data on the Mac clipbord and convert it to something the host pasteboard understands if possible + */ + +static void ConvertMacScrapToHostPasteboard() +{ + D(bug("ConvertMacScrapToHostPasteboard\n")); + + BOOL wroteText = NO; + + [g_pboard clearContents]; + + for (NSNumber *eachTypeNum in g_macScrap) AUTORELEASE_POOL { + uint32_t eachType = [eachTypeNum integerValue]; + + if (eachType == TYPE_TEXT || eachType == TYPE_STYL || eachType == TYPE_UTXT || eachType == TYPE_UT16 || eachType == TYPE_USTL) { + if (wroteText) + continue; + + NSData *textData; + NSData *stylData; + + textData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_TEXT]]; + stylData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_STYL]]; + + if (textData) { + WriteMacTEXTAndStylToPasteboard(g_pboard, textData, stylData); + wroteText = YES; + } + + // sometime, it might be interesting to write a converter for utxt/ustl if possible + + continue; + } + + NSData *pbData = [g_macScrap objectForKey:eachTypeNum]; + + if (pbData) { + NSString *typeStr = UTIForFlavor(eachType); + + if (!typeStr) + continue; + + [g_pboard setData:pbData forType:typeStr]; + } + } +} + +/* + * Check whether the pasteboard has changed since our last check; if it has, write it to the emulated pasteboard + */ + +static void ConvertHostPasteboardToMacScrapIfChanged() +{ + if (!g_pboard) + return; + + if ([g_pboard changeCount] > g_pb_change_count) { + ConvertHostPasteboardToMacScrap(); + g_pb_change_count = [g_pboard changeCount]; + } +} + +/* + * Mac application reads clipboard + */ + +void GetScrap(void **handle, uint32_t type, int32_t offset) +{ + D(bug("GetScrap handle %p, type %4.4s, offset %d\n", handle, (char *)&type, offset)); + + AUTORELEASE_POOL { + ConvertHostPasteboardToMacScrapIfChanged(); + } +} + +/* + * ZeroScrap() is called before a Mac application writes to the clipboard; clears out the previous contents + */ + +void ZeroScrap() +{ + D(bug("ZeroScrap\n")); + + we_put_this_data = false; + + // Defer clearing the host pasteboard until the Mac tries to put something on it. + // This prevents us from clearing the pasteboard when ZeroScrap() is called during startup. + should_clear = true; +} + +/* + * Mac application wrote to clipboard + */ + +void PutScrap(uint32_t type, void *scrap, int32_t length) +{ + D(bug("PutScrap type %4.4s, data %p, length %ld\n", (char *)&type, scrap, (long)length)); + + AUTORELEASE_POOL { + if (!g_pboard) + return; + + if (we_put_this_data) { + we_put_this_data = false; + return; + } + + if (length <= 0) + return; + + if (should_clear) { + [g_macScrap removeAllObjects]; + should_clear = false; + } + + NSData *pbData = [NSData dataWithBytes:scrap length:length]; + if (!pbData) + return; + + [g_macScrap setObject:pbData forKey:[NSNumber numberWithInteger:type]]; + + ConvertMacScrapToHostPasteboard(); + + // So that our PutScrap() patch won't bounce the data we just wrote back to the Mac clipboard + g_pb_change_count = [g_pboard changeCount]; + } +} From cc058a18816338b056f08463f864c5b6b1e4bb91 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 7 Jun 2018 22:30:06 +0900 Subject: [PATCH 213/534] clipboard-exchange enabled --- .../project.pbxproj | 22 ++++++++++--------- SheepShaver/src/MacOSX/clip_macosx64.mm | 8 ++++--- .../src/Unix/dyngen_precompiled/patch_jit.pl | 2 +- 3 files changed, 18 insertions(+), 14 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index da3bc3254..58580afa1 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -101,9 +101,10 @@ 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */; }; 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; - 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; + E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; + E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */; }; E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */; }; E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */; }; /* End PBXBuildFile section */ @@ -258,7 +259,6 @@ 0856CE0314A99EEF000B1711 /* utils-cpuinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-cpuinfo.hpp"; sourceTree = ""; }; 0856CE0414A99EEF000B1711 /* utils-sentinel.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-sentinel.hpp"; sourceTree = ""; }; 0856CE0514A99EEF000B1711 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = clip_macosx.cpp; sourceTree = ""; }; 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util_macosx.h; sourceTree = ""; }; 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = prefs_macosx.mm; sourceTree = ""; }; @@ -360,7 +360,6 @@ 0873A80014AC515D004F12B7 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; 0873A80114AC515D004F12B7 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; 0879BD5B15A88F6300DC277D /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; - 0879BD5D15A88F7600DC277D /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = SOURCE_ROOT; }; 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-ppc_32.h"; sourceTree = ""; }; 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-x86_32.h"; sourceTree = ""; }; 0879BDAF15A8B1AA00DC277D /* Info.plist.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.xml; path = Info.plist.in; sourceTree = ""; }; @@ -373,10 +372,11 @@ 087B91BD1B780FFC00825F7F /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = vm_alloc.h; path = ../CrossPlatform/vm_alloc.h; sourceTree = SOURCE_ROOT; }; 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; - 08D93A15159FE174003B04EC /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; + E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; /* End PBXFileReference section */ @@ -470,7 +470,7 @@ 0856CE0614A99EEF000B1711 /* MacOSX */, 0856CE8814A99EF0000B1711 /* main.cpp */, 0856CE8914A99EF0000B1711 /* name_registry.cpp */, - 0879BD5D15A88F7600DC277D /* pict.c */, + E444DC1420C8F06700DD29C9 /* pict.c */, 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */, 0856CE8B14A99EF0000B1711 /* prefs.cpp */, 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */, @@ -716,8 +716,7 @@ children = ( 0873A76514ABD151004F12B7 /* config */, 0856D2D614A9A704000B1711 /* Launcher */, - 0856CE2C14A99EF0000B1711 /* clip_macosx.cpp */, - 08D93A15159FE174003B04EC /* clip_macosx64.mm */, + E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */, 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */, 0879BDAF15A8B1AA00DC277D /* Info.plist.in */, 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */, @@ -1074,7 +1073,6 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( - 08E877521E0640E800A90A2C /* clip_macosx.cpp in Sources */, 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */, @@ -1090,6 +1088,7 @@ 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, + E444DC1520C8F06700DD29C9 /* pict.c in Sources */, 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, @@ -1113,6 +1112,7 @@ 0856D07314A99EF1000B1711 /* socket.c in Sources */, 0856D07414A99EF1000B1711 /* tcp_input.c in Sources */, 0856D07514A99EF1000B1711 /* tcp_output.c in Sources */, + E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, 0856D07614A99EF1000B1711 /* tcp_subr.c in Sources */, 0856D07714A99EF1000B1711 /* tcp_timer.c in Sources */, 0856D07814A99EF1000B1711 /* tftp.c in Sources */, @@ -1179,7 +1179,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = NO; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; @@ -1190,6 +1190,7 @@ GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; INSTALL_PATH = /usr/local/bin; + ONLY_ACTIVE_ARCH = NO; PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; @@ -1200,7 +1201,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_BIT)"; + ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; COPY_PHASE_STRIP = YES; GCC_ENABLE_FIX_AND_CONTINUE = NO; GCC_ENABLE_PASCAL_STRINGS = NO; @@ -1209,6 +1210,7 @@ GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; INSTALL_PATH = /usr/local/bin; + ONLY_ACTIVE_ARCH = NO; PREBINDING = NO; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = lowmem; diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm index 23261890a..f5e7fd954 100644 --- a/SheepShaver/src/MacOSX/clip_macosx64.mm +++ b/SheepShaver/src/MacOSX/clip_macosx64.mm @@ -234,8 +234,8 @@ static TextEncoding MacDefaultTextEncoding() [[aStr string] getCharacters:chars range:NSMakeRange(0, length)]; - NSUInteger unicodeLength = length * sizeof(unichar); - NSUInteger bufLen = unicodeLength * 2; + ByteCount unicodeLength = length * sizeof(unichar); + ByteCount bufLen = unicodeLength * 2; uint8_t buf[bufLen]; ByteCount bytesRead; @@ -807,6 +807,8 @@ static void AppendStylRunData(NSMutableData *stylData, NSDictionary *attrs, Scri ScriptCode script = [[eachRun objectForKey:@"script"] shortValue]; NSDictionary *attrs = [eachRun objectForKey:@"attributes"]; + if (![attrs count]) continue; + int32_t startChar = CFSwapInt32HostToBig((int32_t)offset); [stylData appendBytes:&startChar length:4]; @@ -1124,7 +1126,7 @@ static void ConvertHostPasteboardToMacScrap() NSData *textData = MacTEXTAndStylDataFromPasteboard(g_pboard, &stylData); if (textData) { - if (stylData) + if (stylData && [stylData length] > 2) WriteDataToMacClipboard(stylData, TYPE_STYL); WriteDataToMacClipboard(textData, TYPE_TEXT); diff --git a/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl b/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl index 97d0a8089..47b8b3507 100755 --- a/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl +++ b/SheepShaver/src/Unix/dyngen_precompiled/patch_jit.pl @@ -122,7 +122,7 @@ sub patch { $n += 2; if (length($key) == 8) { $n++; - printf "0x%02s, ", shift @code if length($key) == 8; + printf "0x%02s, ", shift @code; } printf "0x%02s, ", shift @code; printf "0x%02x,\n", hex(shift @code) - ($keys_add{$key} =~ /RAX/ ? 4 : 2); From e99d4e579cf77157223add0eb7be890eddaf21e8 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Thu, 7 Jun 2018 15:01:48 -0500 Subject: [PATCH 214/534] Remove low memory globals hack (it doesn't work) --- BasiliskII/src/Unix/Darwin/gtk-osx.patch | 179 ---------------- BasiliskII/src/Unix/Darwin/lowmem.c | 253 ----------------------- BasiliskII/src/Unix/Darwin/mkstandalone | 89 -------- BasiliskII/src/Unix/Darwin/pagezero.c | 31 --- BasiliskII/src/Unix/Darwin/testlmem.sh | 34 --- 5 files changed, 586 deletions(-) delete mode 100644 BasiliskII/src/Unix/Darwin/gtk-osx.patch delete mode 100644 BasiliskII/src/Unix/Darwin/lowmem.c delete mode 100755 BasiliskII/src/Unix/Darwin/mkstandalone delete mode 100644 BasiliskII/src/Unix/Darwin/pagezero.c delete mode 100755 BasiliskII/src/Unix/Darwin/testlmem.sh diff --git a/BasiliskII/src/Unix/Darwin/gtk-osx.patch b/BasiliskII/src/Unix/Darwin/gtk-osx.patch deleted file mode 100644 index b8b45c18d..000000000 --- a/BasiliskII/src/Unix/Darwin/gtk-osx.patch +++ /dev/null @@ -1,179 +0,0 @@ -2006-05-05 Gwenole Beauchesne - - * gtk/gtkaqua.c (gtk_aqua_draw_focus): Don't crash if "detail" is - NULL. - - * gdk/MacCarbonEvents.c (mouse_motion_handler): Another NULL - pointer check. - -2006-04-17 Gwenole Beauchesne - - * glib-1.2.10/gmain.c (g_main_run): Don't block in - RunApplicationEventLoop(), code inspired from Inside Mac - technote. - - This patch only suits Basilisk II needs. i.e. this may not work - for other programs. - -2006-04-17 Gwenole Beauchesne - - * glib-1.2.10/glibconfig.h (G_VA_COPY): Don't redefine. - ---- gtk-osx-0.7/gdk/MacCarbonEvents.c Sat May 8 16:59:12 2004 -+++ gtk-osx-0.7/gdk/MacCarbonEvents.c Fri May 5 07:48:45 2006 -@@ -227,7 +227,7 @@ mouse_motion_handler (EventHandlerCallRe - local_point.v = global_point.v; - } - -- if (gdk_window != g_win_containing_mouse) -+ if (gdk_window && gdk_window != g_win_containing_mouse) - { - - if(GDK_LEAVE_NOTIFY_MASK & ((GdkWindowPrivate*) g_win_containing_mouse)->event_mask) { ---- gtk-osx-0.7/glib-1.2.10/glibconfig.h Thu Jan 2 05:29:18 2003 -+++ gtk-osx-0.7/glib-1.2.10/glibconfig.h Mon Apr 17 21:12:34 2006 -@@ -62,8 +62,9 @@ G_GNUC_EXTENSION typedef unsigned long l - #define GLIB_MINOR_VERSION 2 - #define GLIB_MICRO_VERSION 10 - -- -+#ifndef G_VA_COPY - #define G_VA_COPY __va_copy -+#endif - - #ifdef __cplusplus - #define G_HAVE_INLINE 1 ---- gtk-osx-0.7/glib-1.2.10/gmain.c Sat Dec 27 22:23:06 2003 -+++ gtk-osx-0.7/glib-1.2.10/gmain.c Mon Apr 17 22:12:15 2006 -@@ -145,6 +145,7 @@ static gboolean g_idle_dispatch ( - gpointer user_data); - - #ifdef MAC_CARBON_EVENTS -+static void mac_run_application_event_loop (GMainLoop *loop); - static void mac_handle_idle_action (EventLoopTimerRef timer_ref, - EventLoopIdleTimerMessage state, - void* user_data); -@@ -1116,7 +1117,7 @@ g_main_run (GMainLoop *loop) - loop->is_running = TRUE; - - #ifdef MAC_CARBON_EVENTS -- RunApplicationEventLoop (); -+ mac_run_application_event_loop (loop); - #else - while (loop->is_running) - g_main_iterate (TRUE, TRUE); -@@ -1870,4 +1871,94 @@ mac_handle_g_main_iteration_action (Even - #endif - } - --#endif /* MAC_CARBON_EVENTS */ -\ No newline at end of file -+static EventHandlerUPP g_quit_event_handler_upp; -+ -+static pascal OSStatus QuitEventHandler(EventHandlerCallRef inHandlerCallRef, -+ EventRef inEvent, void *inUserData) -+{ -+ OSStatus err; -+ -+ if ((err = CallNextEventHandler(inHandlerCallRef, inEvent)) == noErr) -+ *((Boolean *)inUserData) = TRUE; -+ -+ return err; -+} -+ -+static EventHandlerUPP g_event_loop_event_handler_upp; -+ -+static pascal OSStatus EventLoopEventHandler(EventHandlerCallRef inHandlerCallRef, -+ EventRef inEvent, void *inUserData) -+{ -+ OSStatus err; -+ OSStatus junk; -+ EventHandlerRef installedHandler; -+ EventTargetRef theTarget; -+ EventRef theEvent; -+ EventTimeout timeToWaitForEvent; -+ Boolean quitNow; -+ GMainLoop * loop = (GMainLoop *)inUserData; -+ static const EventTypeSpec eventSpec = {kEventClassApplication, kEventAppQuit}; -+ -+ quitNow = false; -+ -+ err = InstallEventHandler(GetApplicationEventTarget(), -+ g_quit_event_handler_upp, -+ 1, &eventSpec, &quitNow, &installedHandler); -+ if (err == noErr) { -+ theTarget = GetEventDispatcherTarget(); -+ do { -+ timeToWaitForEvent = kEventDurationNoWait; -+ err = ReceiveNextEvent(0, NULL, timeToWaitForEvent, -+ true, &theEvent); -+ if (err == noErr) { -+ SendEventToEventTarget(theEvent, theTarget); -+ ReleaseEvent(theEvent); -+ } -+ YieldToAnyThread(); -+ } while ( loop->is_running && ! quitNow ); -+ junk = RemoveEventHandler(installedHandler); -+ } -+ -+ return err; -+} -+ -+static void -+mac_run_application_event_loop (GMainLoop *loop) -+{ -+ static const EventTypeSpec eventSpec = {'KWIN', 'KWIN' }; -+ OSStatus err; -+ OSStatus junk; -+ EventHandlerRef installedHandler; -+ EventRef dummyEvent; -+ -+ dummyEvent = nil; -+ -+ err = noErr; -+ if (g_event_loop_event_handler_upp == nil) -+ g_event_loop_event_handler_upp = NewEventHandlerUPP(EventLoopEventHandler); -+ if (g_quit_event_handler_upp == nil) -+ g_quit_event_handler_upp = NewEventHandlerUPP(QuitEventHandler); -+ if (g_event_loop_event_handler_upp == nil || g_quit_event_handler_upp == nil) -+ err = memFullErr; -+ -+ if (err == noErr) { -+ err = InstallEventHandler(GetApplicationEventTarget(), -+ g_event_loop_event_handler_upp, -+ 1, &eventSpec, loop, &installedHandler); -+ if (err == noErr) { -+ err = MacCreateEvent(nil, 'KWIN', 'KWIN', GetCurrentEventTime(), -+ kEventAttributeNone, &dummyEvent); -+ if (err == noErr) -+ err = PostEventToQueue(GetMainEventQueue(), dummyEvent, -+ kEventPriorityHigh); -+ if (err == noErr) -+ RunApplicationEventLoop(); -+ -+ junk = RemoveEventHandler(installedHandler); -+ } -+ } -+ -+ if (dummyEvent != nil) -+ ReleaseEvent(dummyEvent); -+} -+#endif /* MAC_CARBON_EVENTS */ ---- gtk-osx-0.7/gtk/gtkaqua.c Sat Dec 27 23:33:36 2003 -+++ gtk-osx-0.7/gtk/gtkaqua.c Fri May 5 07:13:30 2006 -@@ -2183,11 +2183,12 @@ gtk_aqua_draw_focus (GtkStyle *styl - g_return_if_fail (window != NULL); - - // aqua button focus is not just a simple rectangle, so we don't draw anything here -- if ( strcmp( detail, "button" ) == 0 ) { -+ if (detail) { -+ if ( strcmp( detail, "button" ) == 0 ) - return; -- } else if ( strcmp( detail, "checkbutton" ) == 0 ) { -+ else if ( strcmp( detail, "checkbutton" ) == 0 ) - return; -- } else if ( strcmp( detail, "togglebutton" ) == 0 ) { -+ else if ( strcmp( detail, "togglebutton" ) == 0 ) - return; - } - diff --git a/BasiliskII/src/Unix/Darwin/lowmem.c b/BasiliskII/src/Unix/Darwin/lowmem.c deleted file mode 100644 index 297f52f7e..000000000 --- a/BasiliskII/src/Unix/Darwin/lowmem.c +++ /dev/null @@ -1,253 +0,0 @@ -/* - * lowmem.c - enable access to low memory globals on Darwin - * - * Copyright (c) 2003 Michael Z. Sliczniak - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -static const char progname[] = "lowmem"; -static const char *filename; - -static int do_swap = 0; - -static uint32_t target_uint32(uint32_t value) -{ - if (do_swap) - value = OSSwapInt32(value); - return value; -} - -void pagezero_32(struct mach_header *machhead) -{ - struct segment_command *sc_cmd; - - if (target_uint32(machhead->filetype) != MH_EXECUTE) { - (void)fprintf(stderr, "%s: %s does not appear to be an executable file\n", - progname, filename); - exit(1); - } - if (machhead->ncmds == 0) { - (void)fprintf(stderr, "%s: %s does not contain any load commands\n", - progname, filename); - exit(1); - } - sc_cmd = (void *)&machhead[1]; - if (target_uint32(sc_cmd->cmd) != LC_SEGMENT){ - (void)fprintf(stderr, "%s: load segment not first command in %s\n", - progname, filename); - exit(1); - } - if (strncmp(sc_cmd->segname, "__PAGEZERO", sizeof (*sc_cmd->segname))) { - (void)fprintf(stderr, "%s: zero page not first segment in %s\n", - progname, filename); - exit(1); - } - /* change the permissions */ - sc_cmd->maxprot = target_uint32(VM_PROT_ALL); - sc_cmd->initprot = target_uint32(VM_PROT_ALL); - -#ifdef MH_PIE - /* disable pie in header */ - machhead->flags = target_uint32(target_uint32(machhead->flags) & ~MH_PIE); -#endif -} - -#if defined(MH_MAGIC_64) -void pagezero_64(struct mach_header_64 *machhead) -{ - struct segment_command_64 *sc_cmd; - - if (target_uint32(machhead->filetype) != MH_EXECUTE) { - (void)fprintf(stderr, "%s: %s does not appear to be an executable file\n", - progname, filename); - exit(1); - } - if (machhead->ncmds == 0) { - (void)fprintf(stderr, "%s: %s does not contain any load commands\n", - progname, filename); - exit(1); - } - sc_cmd = (void *)&machhead[1]; - if (target_uint32(sc_cmd->cmd) != LC_SEGMENT_64) { - (void)fprintf(stderr, "%s: load segment not first command in %s\n", - progname, filename); - exit(1); - } - if (strncmp(sc_cmd->segname, "__PAGEZERO", sizeof(*sc_cmd->segname))) { - (void)fprintf(stderr, "%s: zero page not first segment in %s\n", - progname, filename); - exit(1); - } - /* change the permissions */ - sc_cmd->maxprot = target_uint32(VM_PROT_ALL); - sc_cmd->initprot = target_uint32(VM_PROT_ALL); -} -#endif - -/* - * Under Mach there is very little assumed about the memory map of object - * files. It is the job of the loader to create the initial memory map of an - * executable. In a Mach-O executable there will be numerous loader commands - * that the loader must process. Some of these will create the initial memory - * map used by the executable. Under Darwin the static object file linker, - * ld, automatically adds the __PAGEZERO segment to all executables. The - * default size of this segment is the page size of the target system and - * the initial and maximum permissions are set to allow no access. This is so - * that all programs fault on a NULL pointer dereference. Arguably this is - * incorrect and the maximum permissions shoould be rwx so that programs can - * change this default behavior. Then programs could be written that assume - * a null string at the null address, which was the convention on some - * systems. In our case we need to have 8K mapped at zero for the low memory - * globals and this program modifies the segment load command in the - * basiliskII executable so that it can be used for data. - */ - -int -main(int argc, const char *argv[]) -{ - int fd; - char *addr; - off_t file_size; - struct mach_header *machhead; -#if defined(MH_MAGIC_64) - struct mach_header_64 *machhead64; -#endif - struct fat_header *fathead; - struct stat f; - - if (argc != 2) { - (void)fprintf(stderr, "Usage: %s executable\n", progname); - exit(1); - } - - filename = argv[1]; - - if (stat(filename, &f)) { - (void)fprintf(stderr, "%s: could not stat %s: %s\n", - progname, filename, strerror(errno)); - exit(1); - } - file_size = f.st_size; - - fd = open(filename, O_RDWR, 0); - if (fd == -1) { - (void)fprintf(stderr, "%s: could not open %s: %s\n", - progname, filename, strerror(errno)); - exit(1); - } - - /* - * Size does not really matter, it will be rounded-up to a multiple - * of the page size automatically. - */ - addr = mmap(NULL, file_size, PROT_READ | PROT_WRITE, - MAP_FILE | MAP_SHARED, fd, 0); - if (addr == NULL || addr == MAP_FAILED) { - (void)fprintf(stderr, "%s: could not mmap %s: %s\n", - progname, filename, strerror(errno)); - exit(1); - } - - /* - * Check to see if the Mach-O magic bytes are in the header. - */ - machhead = (void *)addr; -#if defined(MH_MAGIC_64) - machhead64 = (void *)addr; -#endif - fathead = (void *)addr; - -#if defined(MH_MAGIC_64) - do_swap = machhead->magic == MH_CIGAM || fathead->magic == FAT_CIGAM || machhead64->magic == MH_CIGAM_64; -#else - do_swap = machhead->magic == MH_CIGAM || fathead->magic == FAT_CIGAM; -#endif - - if (target_uint32(machhead->magic) == MH_MAGIC) { - pagezero_32(machhead); -#if defined(MH_MAGIC_64) - } else if (target_uint32(machhead64->magic) == MH_MAGIC_64) { - pagezero_64(machhead64); -#endif - } else if (target_uint32(fathead->magic) == FAT_MAGIC) { - struct fat_arch *arch = (void *)&fathead[1]; - int saved_swap = do_swap; - int i; - for (i = 0; i < target_uint32(fathead->nfat_arch); ++i, ++arch) { - machhead = (void *)(addr + target_uint32(arch->offset)); -#if defined(MH_MAGIC_64) - machhead64 = (void *)(addr + target_uint32(arch->offset)); -#endif -#if defined(MH_MAGIC_64) - do_swap = machhead->magic == MH_CIGAM || machhead64->magic == MH_CIGAM_64; -#else - do_swap = machhead->magic == MH_CIGAM; -#endif - if (target_uint32(machhead->magic) == MH_MAGIC) { - pagezero_32(machhead); -#if defined(MH_MAGIC_64) - } else if (target_uint32(machhead64->magic) == MH_MAGIC_64) { - pagezero_64(machhead64); -#endif - } else { - (void)fprintf(stderr, "%s: %s does not appear to be a Mach-O object file\n", - progname, filename); - exit(1); - } - do_swap = saved_swap; - } - } else { - (void)fprintf(stderr, "%s: %s does not appear to be a Mach-O object file\n", - progname, filename); - exit(1); - } - - /* - * We do not make __PAGEZERO 8K in this program because then - * all of the offsets would be wrong in the object file after - * this segment. Instead we use the -pagezero_size option - * to link the executable. - */ - if (msync(addr, file_size, MS_SYNC) == -1) { - (void)fprintf(stderr, "%s: could not sync %s: %s\n", - progname, filename, strerror(errno)); - exit(1); - } - - if (munmap(addr, file_size) == -1) { - (void)fprintf(stderr, "%s: could not unmap %s: %s\n", - progname, filename, strerror(errno)); - exit(1); - } - - (void)close(fd); - - exit(0); -} diff --git a/BasiliskII/src/Unix/Darwin/mkstandalone b/BasiliskII/src/Unix/Darwin/mkstandalone deleted file mode 100755 index 7da10e38d..000000000 --- a/BasiliskII/src/Unix/Darwin/mkstandalone +++ /dev/null @@ -1,89 +0,0 @@ -#!/bin/sh -# -# mkstandalone - Make a standalone bundle with GTK runtime -# -# Basilisk II (C) 1997-2006 Christian Bauer -# -# mkstandalone Copyright (C) 2006 Gwenole Beauchesne -# -# 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 - -PROG="${1%.app}" - -[ -n "$PROG" ] || { - echo "Usage: ${0##*/} " - exit 1 -} - -[ -d "$PROG.app" ] || { - echo "ERROR: $PROG.app bundle does not exist" - exit 1 -} - -[ -x "$PROG.app/Contents/MacOS/$PROG" ] || { - echo "ERROR: $PROG.app is not a properly formed bundle" - exit 1 -} - -echo "Processing bundle $PROG.app" - -FRAMEWORKS="GLib GDK GTK" - -rm -r -f $PROG.app/Contents/Frameworks -mkdir -p $PROG.app/Contents/Frameworks - -int_args="" -for fmk_path in `otool -L $PROG.app/Contents/MacOS/$PROG | \ - sed -n '/ *\(\/.*\.framework\/.*\) ([^)]*)/s//\1/p'` -do - fmk_spath="${fmk_path%/Versions/*}" - fmk="${fmk_spath%.framework}" - fmk="${fmk##*/}" - - case " $FRAMEWORKS " in - (*" $fmk "*) ;; - (*) continue ;; - esac - - echo " Linking in framework $fmk" - fmk_dpath=$PROG.app/Contents/Frameworks/$fmk.framework - rm -rf $fmk_dpath - cp -Rf $fmk_spath $fmk_dpath - find $fmk_dpath -name "*Headers*" | xargs rm -rf - fmk_vpath="${fmk_path##*.framework/}" - - # change library dependency - install_name_tool -change \ - $fmk_spath/$fmk_vpath \ - @executable_path/../Frameworks/$fmk.framework/$fmk_vpath \ - $PROG.app/Contents/MacOS/$PROG - - # change shared library id name - fmk_newid="@executable_path/../Frameworks/${fmk_path#*/Frameworks/}" - install_name_tool -id $fmk_newid $fmk_dpath/$fmk_vpath - - # expand final install_name_tool args list - int_args="$int_args -change $fmk_path $fmk_newid" - - # strip shared library - strip -x $fmk_dpath/$fmk_vpath -done - -# change remaining dependency libs names -for f in $FRAMEWORKS; do - install_name_tool $int_args $PROG.app/Contents/Frameworks/$f.framework/$f -done - -exit 0 diff --git a/BasiliskII/src/Unix/Darwin/pagezero.c b/BasiliskII/src/Unix/Darwin/pagezero.c deleted file mode 100644 index 6f3f061e8..000000000 --- a/BasiliskII/src/Unix/Darwin/pagezero.c +++ /dev/null @@ -1,31 +0,0 @@ -/* - * pagezero.c - test to see if low memory globals can be accessed - * - * Copyright (c) 2003 Michael Z. Sliczniak - * - * Basilisk II (C) 1997-2003 Christian Bauer - * - * 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 - */ - -int -main(int argc, const char *argv[]) -{ - volatile char *pagezero = (void *)0; - - pagezero[0x1234] = pagezero[0x123]; - - return (0); -} diff --git a/BasiliskII/src/Unix/Darwin/testlmem.sh b/BasiliskII/src/Unix/Darwin/testlmem.sh deleted file mode 100755 index 3c07f4375..000000000 --- a/BasiliskII/src/Unix/Darwin/testlmem.sh +++ /dev/null @@ -1,34 +0,0 @@ -#!/bin/sh - -# testlmem.sh - test whether the Mach-O hack works -# -# Basilisk II (C) 1997-2005 Christian Bauer -# -# testlmem.sh Copyright (C) 2003 Michael Z. Sliczniak -# -# 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 - -PAGEZERO_SIZE=0x2000 -[[ -n "$1" ]] && PAGEZERO_SIZE=$1 -# You want all the output to go to stderr so that configure is quiet but -# config.log is verbose. -{ echo 'building lowmem utility' && \ -make -f /dev/null Darwin/lowmem && \ -echo 'building pagezero test' && \ -make -f /dev/null LDFLAGS="-pagezero_size $PAGEZERO_SIZE" Darwin/pagezero && \ -echo 'enabling low memory globals in pagezero' && \ -Darwin/lowmem Darwin/pagezero && \ -echo 'running pagezero test' && \ -Darwin/pagezero; } 1>&2 From 8c0a84c536f429dd2ff068c5f5515e1512940fd6 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Thu, 7 Jun 2018 15:06:41 -0500 Subject: [PATCH 215/534] Removed more unused files --- BasiliskII/src/Unix/CMakeLists.txt | 2 - BasiliskII/src/Unix/main_unix.cpp | 41 - BasiliskII/src/Unix/posix_sem.cpp | 143 ---- BasiliskII/src/Unix/rpc.h | 102 --- BasiliskII/src/Unix/rpc_unix.cpp | 1257 ---------------------------- BasiliskII/src/Unix/semaphore.h | 44 - 6 files changed, 1589 deletions(-) delete mode 100644 BasiliskII/src/Unix/posix_sem.cpp delete mode 100644 BasiliskII/src/Unix/rpc.h delete mode 100644 BasiliskII/src/Unix/rpc_unix.cpp delete mode 100644 BasiliskII/src/Unix/semaphore.h diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index 4454d69a3..c47046b33 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -48,7 +48,6 @@ set(BasiliskII_SRCS ../extfs.cpp ../user_strings.cpp user_strings_unix.cpp - rpc_unix.cpp # XPLAT_SRCS ../CrossPlatform/vm_alloc.cpp ../CrossPlatform/sigsegv.cpp @@ -67,7 +66,6 @@ set(BasiliskII_SRCS ../dummy/scsi_dummy.cpp #audio src ../SDL/audio_sdl.cpp - #sem src: posix_sem.cpp #ui src ../dummy/prefs_editor_dummy.cpp #extra sys diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 05f9717d8..36814ffa4 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -55,7 +55,6 @@ using std::string; #include "main.h" #include "vm_alloc.h" #include "sigsegv.h" -#include "rpc.h" #if USE_JIT extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp @@ -108,11 +107,6 @@ static timer_t timer; // 60Hz timer #endif #endif // !HAVE_PTHREADS - -static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI -static const char *gui_connection_path = NULL; // GUI connection identifier - - // Prototypes static int xpram_func(void *arg); static int tick_func(void *arg); @@ -300,12 +294,6 @@ int main(int argc, char **argv) for (int i=1; i -#include -#include -#include -#include - -#include "semaphore.h" - -extern "C" { - -int sem_init(sem_t* sem, int pshared, unsigned int value) -{ - if(sem==NULL||value>SEM_VALUE_MAX) { - errno = EINVAL; - return -1; - } - if(pshared) { - errno = ENOSYS; - return -1; - } - pthread_mutex_init(&sem->sem_lock, NULL); - sem->sem_value = value; - sem->sem_waiting = 0; - return 0; -} - - -int sem_destroy(sem_t* sem) -{ - if(sem==NULL) { - errno = EINVAL; - return -1; - } - if(sem->sem_waiting) { - errno = EBUSY; - return -1; - } - pthread_mutex_destroy(&sem->sem_lock); - sem->sem_waiting = 0; - sem->sem_value = 0; - return 0; -} - -sem_t sem_open(const char* name, int oflag, ...) -{ - errno = ENOSYS; - return *(sem_t*)NULL; -} - -int sem_close(sem_t* sem) -{ - errno = ENOSYS; - return -1; -} - -int sem_unlink(const char* name) -{ - errno = ENOSYS; - return -1; -} - -int sem_wait(sem_t* sem) -{ - struct timespec req = { 1, 0 }; - - if(sem==NULL) { - errno = EINVAL; - return -1; - } - pthread_mutex_lock(&sem->sem_lock); - sem->sem_waiting++; - if(sem->sem_value > 0) { - --sem->sem_value; - return 0; - } - while(!sem->sem_value) nanosleep(NULL, &req); - pthread_mutex_unlock(&sem->sem_lock); - return 0; -} - -int sem_trywait(sem_t* sem) -{ - errno = ENOSYS; - return -1; -} - -int sem_post(sem_t* sem) -{ - if(sem==NULL) { - errno = EINVAL; - return -1; - } - if(!sem->sem_waiting) { - if(sem->sem_value >= SEM_VALUE_MAX) { - errno = ERANGE; - pthread_mutex_unlock(&sem->sem_lock); - return -1; - } - ++sem->sem_value; - pthread_mutex_unlock(&sem->sem_lock); - } - else { - sem->sem_waiting--; - ++sem->sem_value; -// pthread_mutex_unlock(&sem->sem_lock); - } - return 0; -} - -int sem_getvalue(sem_t* sem, int* sval) -{ - errno = ENOSYS; - return -1; -} - -} diff --git a/BasiliskII/src/Unix/rpc.h b/BasiliskII/src/Unix/rpc.h deleted file mode 100644 index a43dfaefa..000000000 --- a/BasiliskII/src/Unix/rpc.h +++ /dev/null @@ -1,102 +0,0 @@ -/* - * rpc.h - Remote Procedure Calls - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Contributed by Gwenole Beauchesne - * - * 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 RPC_H -#define RPC_H - -// Error Types -enum { - RPC_ERROR_NO_ERROR = 0, - RPC_ERROR_GENERIC = -1000, - RPC_ERROR_ERRNO_SET = -1001, - RPC_ERROR_NO_MEMORY = -1002, - RPC_ERROR_CONNECTION_NULL = -1003, - RPC_ERROR_CONNECTION_TYPE_MISMATCH = -1004, - RPC_ERROR_MESSAGE_TRUNCATED = -1005, - RPC_ERROR_MESSAGE_ARGUMENT_MISMATCH = -1006, - RPC_ERROR_MESSAGE_ARGUMENT_UNKNOWN = -1007, -}; - -// Connection Handling -typedef struct rpc_connection_t rpc_connection_t; -extern rpc_connection_t *rpc_init_server(const char *ident); -extern rpc_connection_t *rpc_init_client(const char *ident); -extern int rpc_exit(rpc_connection_t *connection); -extern int rpc_listen_socket(rpc_connection_t *connection); -extern int rpc_listen(rpc_connection_t *connection); -extern int rpc_dispatch(rpc_connection_t *connection); -extern int rpc_wait_dispatch(rpc_connection_t *connection, int timeout); -extern int rpc_connection_busy(rpc_connection_t *connection); - -// Message Passing -enum { - RPC_TYPE_INVALID = 0, - RPC_TYPE_CHAR = -2000, - RPC_TYPE_BOOLEAN = -2001, - RPC_TYPE_INT32 = -2002, - RPC_TYPE_UINT32 = -2003, - RPC_TYPE_STRING = -2004, - RPC_TYPE_ARRAY = -2005, -}; -typedef struct rpc_message_t rpc_message_t; -extern int rpc_message_send_char(rpc_message_t *message, char c); -extern int rpc_message_send_int32(rpc_message_t *message, int32_t value); -extern int rpc_message_send_uint32(rpc_message_t *message, uint32_t value); -extern int rpc_message_send_string(rpc_message_t *message, const char *str); -extern int rpc_message_send_bytes(rpc_message_t *message, unsigned char *bytes, int count); -extern int rpc_message_recv_char(rpc_message_t *message, char *ret); -extern int rpc_message_recv_int32(rpc_message_t *message, int32_t *ret); -extern int rpc_message_recv_uint32(rpc_message_t *message, uint32_t *ret); -extern int rpc_message_recv_string(rpc_message_t *message, char **ret); -extern int rpc_message_recv_bytes(rpc_message_t *message, unsigned char *bytes, int count); -typedef int (*rpc_message_callback_t)(rpc_message_t *message, void *p_value); -typedef struct { - int id; - int size; - rpc_message_callback_t send_callback; - rpc_message_callback_t recv_callback; -} rpc_message_descriptor_t; -extern int rpc_message_add_callbacks(const rpc_message_descriptor_t *descs, int n_descs); - -// Method Callbacks Handling -typedef int (*rpc_method_callback_t)(rpc_connection_t *connection); -typedef struct { - int id; - rpc_method_callback_t callback; -} rpc_method_descriptor_t; -extern int rpc_method_add_callbacks(rpc_connection_t *connection, const rpc_method_descriptor_t *descs, int n_descs); -extern int rpc_method_remove_callback_id(rpc_connection_t *connection, int id); -extern int rpc_method_remove_callbacks(rpc_connection_t *connection, const rpc_method_descriptor_t *descs, int n_descs); - -// Remote Procedure Call (method invocation) -extern int rpc_method_invoke(rpc_connection_t *connection, int method, ...); -extern int rpc_method_wait_for_reply(rpc_connection_t *connection, ...); -extern int rpc_method_get_args(rpc_connection_t *connection, ...); -extern int rpc_method_send_reply(rpc_connection_t *connection, ...); - -// Message Protocol -enum { - RPC_METHOD_ERROR_ALERT = 1, - RPC_METHOD_WARNING_ALERT, - RPC_METHOD_EXIT -}; - -#endif /* RPC_H */ diff --git a/BasiliskII/src/Unix/rpc_unix.cpp b/BasiliskII/src/Unix/rpc_unix.cpp deleted file mode 100644 index cbc23b60e..000000000 --- a/BasiliskII/src/Unix/rpc_unix.cpp +++ /dev/null @@ -1,1257 +0,0 @@ -/* - * rpc_unix.cpp - Remote Procedure Calls, Unix specific backend - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Contributed by Gwenole Beauchesne - * - * 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 - */ - -/* - * NOTES: - * - this is subject to rewrite but the API is to be kept intact - * - this RPC system is very minimal and only suited for 1:1 communication - * - * TODO: - * - better failure conditions - * - windows rpc - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "rpc.h" - -#define DEBUG 0 -#include "debug.h" - -#define NON_BLOCKING_IO 0 - -/* ====================================================================== */ -/* === PThreads Glue === */ -/* ====================================================================== */ - -//#define USE_THREADS - -#ifndef USE_THREADS -#define pthread_t void * -#define pthread_cancel(th) -#define pthread_join(th, ret) -#define pthread_testcancel() -#define pthread_create(th, attr, start, arg) dummy_thread_create() -static inline int dummy_thread_create(void) { errno = ENOSYS; return -1; } - -#undef pthread_mutex_t -#define pthread_mutex_t volatile int -#undef pthread_mutex_lock -#define pthread_mutex_lock(m) -1 -#undef pthread_mutex_unlock -#define pthread_mutex_unlock(m) -1 -#undef PTHREAD_MUTEX_INITIALIZER -#define PTHREAD_MUTEX_INITIALIZER 0 -#endif - - -/* ====================================================================== */ -/* === RPC Connection Handling === */ -/* ====================================================================== */ - -// Connection type -enum { - RPC_CONNECTION_SERVER, - RPC_CONNECTION_CLIENT, -}; - -// Connection status -enum { - RPC_STATUS_IDLE, - RPC_STATUS_BUSY, -}; - -// Client / Server connection -struct rpc_connection_t { - int type; - int status; - int socket; - char *socket_path; - int server_socket; - int server_thread_active; - pthread_t server_thread; - rpc_method_descriptor_t *callbacks; - int n_callbacks; - int send_offset; - char send_buffer[BUFSIZ]; -}; - -#define return_error(ERROR) do { error = (ERROR); goto do_return; } while (0) - -// Set connection status (XXX protect connection with a lock?) -static inline void rpc_connection_set_status(rpc_connection_t *connection, int status) -{ - connection->status = status; -} - -// Returns TRUE if the connection is busy (e.g. waiting for a reply) -int rpc_connection_busy(rpc_connection_t *connection) -{ - return connection && connection->status == RPC_STATUS_BUSY; -} - -// Prepare socket path for addr.sun_path[] -static int _rpc_socket_path(char **pathp, const char *ident) -{ - int i, len; - len = strlen(ident); - - if (pathp == NULL) - return 0; - - char *path; -#if USE_ABSTRACT_NAMESPACES - const int len_bias = 1; - if ((path = (char *)malloc(len + len_bias + 1)) == NULL) - return 0; - path[0] = 0; - strcpy(&path[len_bias], ident); -#else - const int len_bias = 5; - if ((path = (char *)malloc(len + len_bias + 1)) == NULL) - return 0; - strcpy(path, "/tmp/"); - for (i = 0; i < len; i++) { - char ch = ident[i]; - if (ch == '/') - ch = '_'; - path[len_bias + i] = ch; - } -#endif - len += len_bias; - path[len] = '\0'; - if (*pathp) - free(*pathp); - *pathp = path; - return len; -} - -// Initialize server-side RPC system -rpc_connection_t *rpc_init_server(const char *ident) -{ - D(bug("rpc_init_server ident='%s'\n", ident)); - - rpc_connection_t *connection; - struct sockaddr_un addr; - socklen_t addr_len; - - if (ident == NULL) - return NULL; - - connection = (rpc_connection_t *)malloc(sizeof(*connection)); - if (connection == NULL) - return NULL; - connection->type = RPC_CONNECTION_SERVER; - connection->status = RPC_STATUS_IDLE; - connection->socket = -1; - connection->server_thread_active = 0; - connection->callbacks = NULL; - connection->n_callbacks = 0; - - if ((connection->server_socket = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) { - perror("server socket"); - free(connection); - return NULL; - } - - memset(&addr, 0, sizeof(addr)); - addr.sun_family = AF_UNIX; - connection->socket_path = NULL; - addr_len = _rpc_socket_path(&connection->socket_path, ident); - memcpy(&addr.sun_path[0], connection->socket_path, addr_len); - addr_len += sizeof(struct sockaddr_un) - sizeof(addr.sun_path); - - if (bind(connection->server_socket, (struct sockaddr *)&addr, addr_len) < 0) { - perror("server bind"); - close(connection->socket); - free(connection); - return NULL; - } - - if (listen(connection->server_socket, 1) < 0) { - perror("server listen"); - close(connection->socket); - free(connection); - return NULL; - } - - return connection; -} - -// Initialize client-side RPC system -rpc_connection_t *rpc_init_client(const char *ident) -{ - D(bug("rpc_init_client ident='%s'\n", ident)); - - rpc_connection_t *connection; - struct sockaddr_un addr; - socklen_t addr_len; - - if (ident == NULL) - return NULL; - - connection = (rpc_connection_t *)malloc(sizeof(*connection)); - if (connection == NULL) - return NULL; - connection->type = RPC_CONNECTION_CLIENT; - connection->status = RPC_STATUS_IDLE; - connection->server_socket = -1; - connection->callbacks = NULL; - connection->n_callbacks = 0; - - if ((connection->socket = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) { - perror("client socket"); - free(connection); - return NULL; - } - - memset(&addr, 0, sizeof(addr)); - addr.sun_family = AF_UNIX; - connection->socket_path = NULL; - addr_len = _rpc_socket_path(&connection->socket_path, ident); - memcpy(&addr.sun_path[0], connection->socket_path, addr_len); - addr_len += sizeof(struct sockaddr_un) - sizeof(addr.sun_path); - - // Wait at most 5 seconds for server to initialize - const int N_CONNECT_WAIT_DELAY = 10; - int n_connect_attempts = 5000 / N_CONNECT_WAIT_DELAY; - if (n_connect_attempts == 0) - n_connect_attempts = 1; - while (n_connect_attempts > 0) { - if (connect(connection->socket, (struct sockaddr *)&addr, addr_len) == 0) - break; - if (n_connect_attempts > 1 && errno != ECONNREFUSED && errno != ENOENT) { - perror("client_connect"); - close(connection->socket); - free(connection); - return NULL; - } - n_connect_attempts--; - usleep(N_CONNECT_WAIT_DELAY); - } - if (n_connect_attempts == 0) { - close(connection->socket); - free(connection); - return NULL; - } - - return connection; -} - -// Close RPC connection -int rpc_exit(rpc_connection_t *connection) -{ - D(bug("rpc_exit\n")); - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - - if (connection->socket_path) { - if (connection->socket_path[0]) - unlink(connection->socket_path); - free(connection->socket_path); - } - - if (connection->type == RPC_CONNECTION_SERVER) { - if (connection->server_thread_active) { - pthread_cancel(connection->server_thread); - pthread_join(connection->server_thread, NULL); - } - if (connection->socket != -1) - close(connection->socket); - if (connection->server_socket != -1) - close(connection->server_socket); - } - else { - if (connection->socket != -1) - close(connection->socket); - } - - if (connection->callbacks) - free(connection->callbacks); - free(connection); - - return RPC_ERROR_NO_ERROR; -} - -// Wait for a message to arrive on the connection port -static inline int _rpc_wait_dispatch(rpc_connection_t *connection, int timeout) -{ - struct timeval tv; - tv.tv_sec = timeout / 1000000; - tv.tv_usec = timeout % 1000000; - - fd_set rfds; - FD_ZERO(&rfds); - FD_SET(connection->socket, &rfds); - return select(connection->socket + 1, &rfds, NULL, NULL, &tv); -} - -int rpc_wait_dispatch(rpc_connection_t *connection, int timeout) -{ - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - return _rpc_wait_dispatch(connection, timeout); -} - -#ifdef USE_THREADS -// Process incoming messages in the background -static void *rpc_server_func(void *arg) -{ - rpc_connection_t *connection = (rpc_connection_t *)arg; - - int ret = rpc_listen_socket(connection); - if (ret < 0) - return NULL; - - connection->server_thread_active = 1; - for (;;) { - // XXX broken MacOS X doesn't implement cancellation points correctly - pthread_testcancel(); - - // wait for data to arrive - int ret = _rpc_wait_dispatch(connection, 50000); - if (ret == 0) - continue; - if (ret < 0) - break; - - rpc_dispatch(connection); - } - connection->server_thread_active = 0; - return NULL; -} -#endif - -// Return listen socket of RPC connection -int rpc_listen_socket(rpc_connection_t *connection) -{ - D(bug("rpc_listen_socket\n")); - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - struct sockaddr_un addr; - socklen_t addr_len = sizeof(addr); - if ((connection->socket = accept(connection->server_socket, (struct sockaddr *)&addr, &addr_len)) < 0) { - perror("server accept"); - return RPC_ERROR_ERRNO_SET; - } - -#if NON_BLOCKING_IO - int val = fcntl(connection->socket, F_GETFL, 0); - if (val < 0) { - perror("server fcntl F_GETFL"); - return RPC_ERROR_ERRNO_SET; - } - if (fcntl(connection->socket, F_SETFL, val | O_NONBLOCK) < 0) { - perror("server fcntl F_SETFL"); - return RPC_ERROR_ERRNO_SET; - } -#endif - - return connection->socket; -} - -// Listen for incoming messages on RPC connection -#ifdef USE_THREADS -int rpc_listen(rpc_connection_t *connection) -{ - D(bug("rpc_listen\n")); - - if (pthread_create(&connection->server_thread, NULL, rpc_server_func, connection) != 0) { - perror("server thread"); - return RPC_ERROR_ERRNO_SET; - } - - return RPC_ERROR_NO_ERROR; -} -#endif - - -/* ====================================================================== */ -/* === Message Passing === */ -/* ====================================================================== */ - -// Message markers -enum { - RPC_MESSAGE_START = -3000, - RPC_MESSAGE_END = -3001, - RPC_MESSAGE_ACK = -3002, - RPC_MESSAGE_REPLY = -3003, - RPC_MESSAGE_FAILURE = -3004, -}; - -// Message type -struct rpc_message_t { - int socket; - int offset; - unsigned char buffer[BUFSIZ]; -}; - -// User-defined marshalers -static struct { - rpc_message_descriptor_t *descs; - int last; - int count; -} g_message_descriptors = { NULL, 0, 0 }; -static pthread_mutex_t g_message_descriptors_lock = PTHREAD_MUTEX_INITIALIZER; - -// Add a user-defined marshaler -static int rpc_message_add_callback(const rpc_message_descriptor_t *desc) -{ - D(bug("rpc_message_add_callback\n")); - - const int N_ENTRIES_ALLOC = 8; - int error = RPC_ERROR_NO_ERROR; - - pthread_mutex_lock(&g_message_descriptors_lock); - if (g_message_descriptors.descs == NULL) { - g_message_descriptors.count = N_ENTRIES_ALLOC; - if ((g_message_descriptors.descs = (rpc_message_descriptor_t *)malloc(g_message_descriptors.count * sizeof(g_message_descriptors.descs[0]))) == NULL) { - pthread_mutex_unlock(&g_message_descriptors_lock); - return RPC_ERROR_NO_MEMORY; - } - g_message_descriptors.last = 0; - } - else if (g_message_descriptors.last >= g_message_descriptors.count) { - g_message_descriptors.count += N_ENTRIES_ALLOC; - if ((g_message_descriptors.descs = (rpc_message_descriptor_t *)realloc(g_message_descriptors.descs, g_message_descriptors.count * sizeof(g_message_descriptors.descs[0]))) == NULL) { - pthread_mutex_unlock(&g_message_descriptors_lock); - return RPC_ERROR_NO_MEMORY; - } - } - - // XXX only one callback per ID - int i; - for (i = 0; i < g_message_descriptors.last; i++) { - if (g_message_descriptors.descs[i].id == desc->id) { - pthread_mutex_unlock(&g_message_descriptors_lock); - return RPC_ERROR_NO_ERROR; - } - } - - g_message_descriptors.descs[g_message_descriptors.last++] = *desc; - pthread_mutex_unlock(&g_message_descriptors_lock); - return error; -} - -// Add user-defined marshalers -int rpc_message_add_callbacks(const rpc_message_descriptor_t *descs, int n_descs) -{ - D(bug("rpc_message_add_callbacks\n")); - - int i, error; - for (i = 0; i < n_descs; i++) { - if ((error = rpc_message_add_callback(&descs[i])) < 0) - return error; - } - - return RPC_ERROR_NO_ERROR; -} - -// Find user-defined marshaler -static rpc_message_descriptor_t *rpc_message_find_descriptor(int id) -{ - D(bug("rpc_message_find_descriptor\n")); - - if (g_message_descriptors.descs) { - int i; - for (i = 0; i < g_message_descriptors.count; i++) { - if (g_message_descriptors.descs[i].id == id) - return &g_message_descriptors.descs[i]; - } - } - - return NULL; -} - -// Initialize message -static inline void rpc_message_init(rpc_message_t *message, rpc_connection_t *connection) -{ - message->socket = connection->socket; - message->offset = 0; -} - -// Send BYTES -static inline int _rpc_message_send_bytes(rpc_message_t *message, unsigned char *bytes, int count) -{ - if (send(message->socket, bytes, count, 0) != count) - return RPC_ERROR_ERRNO_SET; - return RPC_ERROR_NO_ERROR; -} - -// Send message on wire -static inline int rpc_message_flush(rpc_message_t *message) -{ - int error = _rpc_message_send_bytes(message, message->buffer, message->offset); - message->offset = 0; - return error; -} - -// Send BYTES (public interface, may need to flush internal buffer) -int rpc_message_send_bytes(rpc_message_t *message, unsigned char *bytes, int count) -{ - if (message->offset > 0) { - int error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - return _rpc_message_send_bytes(message, bytes, count); -} - -// Send BYTES (buffered) -static inline void _rpc_message_send_bytes_buffered(rpc_message_t *message, unsigned char *bytes, int count) -{ - memcpy(&message->buffer[message->offset], bytes, count); - message->offset += count; -} - -// Send CHAR -int rpc_message_send_char(rpc_message_t *message, char c) -{ - D(bug(" send CHAR '%c'\n", c)); - - unsigned char e_value = c; - if (message->offset + sizeof(e_value) >= sizeof(message->buffer)) { - int error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - _rpc_message_send_bytes_buffered(message, (unsigned char *)&e_value, sizeof(e_value)); - return RPC_ERROR_NO_ERROR; -} - -// Send INT32 -int rpc_message_send_int32(rpc_message_t *message, int32_t value) -{ - D(bug(" send INT32 %d\n", value)); - - int32_t e_value = htonl(value); - if (message->offset + sizeof(e_value) >= sizeof(message->buffer)) { - int error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - _rpc_message_send_bytes_buffered(message, (unsigned char *)&e_value, sizeof(e_value)); - return RPC_ERROR_NO_ERROR; -} - -// Send UINT32 -int rpc_message_send_uint32(rpc_message_t *message, uint32_t value) -{ - D(bug(" send UINT32 %u\n", value)); - - uint32_t e_value = htonl(value); - if (message->offset + sizeof(e_value) >= sizeof(message->buffer)) { - int error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - _rpc_message_send_bytes_buffered(message, (unsigned char *)&e_value, sizeof(e_value)); - return RPC_ERROR_NO_ERROR; -} - -// Send STRING -int rpc_message_send_string(rpc_message_t *message, const char *str) -{ - D(bug(" send STRING \"%s\"\n", str)); - - int error, length = str ? strlen(str) : 0; - uint32_t e_value = htonl(length); - if (message->offset + sizeof(e_value) >= sizeof(message->buffer)) { - error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - _rpc_message_send_bytes_buffered(message, (unsigned char *)&e_value, sizeof(e_value)); - error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - D(bug("str=%p\n", str)); - return _rpc_message_send_bytes(message, (unsigned char *)str, length); -} - -// Send message arguments -static int rpc_message_send_args(rpc_message_t *message, va_list args) -{ - int type; - rpc_message_descriptor_t *desc; - while ((type = va_arg(args, int)) != RPC_TYPE_INVALID) { - int error = rpc_message_send_int32(message, type); - if (error != RPC_ERROR_NO_ERROR) - return error; - switch (type) { - case RPC_TYPE_CHAR: - error = rpc_message_send_char(message, (char )va_arg(args, int)); - break; - case RPC_TYPE_BOOLEAN: - case RPC_TYPE_INT32: - error = rpc_message_send_int32(message, va_arg(args, int)); - break; - case RPC_TYPE_UINT32: - error = rpc_message_send_uint32(message, va_arg(args, unsigned int)); - break; - case RPC_TYPE_STRING: - error = rpc_message_send_string(message, va_arg(args, char *)); - break; - case RPC_TYPE_ARRAY: { - int i; - int array_type = va_arg(args, int32_t); - int array_size = va_arg(args, uint32_t); - if ((error = rpc_message_send_int32(message, array_type)) < 0) - return error; - if ((error = rpc_message_send_uint32(message, array_size)) < 0) - return error; - switch (array_type) { - case RPC_TYPE_CHAR: { - unsigned char *array = va_arg(args, unsigned char *); - error = rpc_message_flush(message); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = _rpc_message_send_bytes(message, array, array_size); - break; - } - case RPC_TYPE_BOOLEAN: - case RPC_TYPE_INT32: { - int32_t *array = va_arg(args, int32_t *); - for (i = 0; i < array_size; i++) { - if ((error = rpc_message_send_int32(message, array[i])) < 0) - break; - } - break; - } - case RPC_TYPE_UINT32: { - uint32_t *array = va_arg(args, uint32_t *); - for (i = 0; i < array_size; i++) { - if ((error = rpc_message_send_uint32(message, array[i])) < 0) - break; - } - break; - } - case RPC_TYPE_STRING: { - char **array = va_arg(args, char **); - for (i = 0; i < array_size; i++) { - if ((error = rpc_message_send_string(message, array[i])) < 0) - break; - } - break; - } - default: - if ((desc = rpc_message_find_descriptor(array_type)) != NULL) { - uint8_t *array = va_arg(args, uint8_t *); - for (i = 0; i < array_size; i++) { - if ((error = desc->send_callback(message, &array[i * desc->size])) < 0) - break; - } - } - else { - fprintf(stderr, "unknown array arg type %d to send\n", type); - error = RPC_ERROR_MESSAGE_ARGUMENT_UNKNOWN; - } - break; - } - break; - } - default: - if ((desc = rpc_message_find_descriptor(type)) != NULL) - error = desc->send_callback(message, va_arg(args, uint8_t *)); - else { - fprintf(stderr, "unknown arg type %d to send\n", type); - error = RPC_ERROR_MESSAGE_ARGUMENT_UNKNOWN; - } - break; - } - if (error != RPC_ERROR_NO_ERROR) - return error; - } - return RPC_ERROR_NO_ERROR; -} - -// Receive raw BYTES -static inline int _rpc_message_recv_bytes(rpc_message_t *message, unsigned char *bytes, int count) -{ - do { - int n = recv(message->socket, bytes, count, 0); - if (n > 0) { - count -= n; - bytes += n; - } - else if (n == -1 && errno == EINTR) - continue; - else { -#if NON_BLOCKING_IO - if (errno == EAGAIN || errno == EWOULDBLOCK) { - // wait for data to arrive - fd_set rfds; - FD_ZERO(&rfds); - FD_SET(message->socket, &rfds); - int ret = select(message->socket + 1, &rfds, NULL, NULL, NULL); - if (ret > 0) - continue; - } -#endif - return RPC_ERROR_ERRNO_SET; - } - } while (count > 0); - return RPC_ERROR_NO_ERROR; -} - -int rpc_message_recv_bytes(rpc_message_t *message, unsigned char *bytes, int count) -{ - return _rpc_message_recv_bytes(message, bytes, count); -} - -// Receive CHAR -int rpc_message_recv_char(rpc_message_t *message, char *ret) -{ - char r_value; - int error; - if ((error = _rpc_message_recv_bytes(message, (unsigned char *)&r_value, sizeof(r_value))) < 0) - return error; - *ret = r_value; - D(bug(" recv CHAR '%c'\n", *ret)); - return RPC_ERROR_NO_ERROR; -} - -// Receive INT32 -int rpc_message_recv_int32(rpc_message_t *message, int32_t *ret) -{ - int32_t r_value; - int error; - if ((error = _rpc_message_recv_bytes(message, (unsigned char *)&r_value, sizeof(r_value))) < 0) - return error; - *ret = ntohl(r_value); - D(bug(" recv INT32 %d\n", *ret)); - return RPC_ERROR_NO_ERROR; -} - -// Receive UINT32 -int rpc_message_recv_uint32(rpc_message_t *message, uint32_t *ret) -{ - uint32_t r_value; - int error; - if ((error = _rpc_message_recv_bytes(message, (unsigned char *)&r_value, sizeof(r_value))) < 0) - return error; - *ret = ntohl(r_value); - D(bug(" recv UINT32 %u\n", *ret)); - return RPC_ERROR_NO_ERROR; -} - -// Receive STRING -int rpc_message_recv_string(rpc_message_t *message, char **ret) -{ - char *str; - int length; - uint32_t r_value; - int error; - if ((error = _rpc_message_recv_bytes(message, (unsigned char *)&r_value, sizeof(r_value))) < 0) - return error; - length = ntohl(r_value); - if (length == 0) { - str = NULL; - } else { - if ((str = (char *)malloc(length + 1)) == NULL) - return RPC_ERROR_NO_MEMORY; - if ((error = _rpc_message_recv_bytes(message, (unsigned char *)str, length)) < 0) { - free(str); - return error; - } - str[length] = '\0'; - } - *ret = str; - D(bug(" recv STRING \"%s\"\n", *ret)); - return RPC_ERROR_NO_ERROR; -} - -// Receive message arguments -static int rpc_message_recv_args(rpc_message_t *message, va_list args) -{ - int expected_type, error; - rpc_message_descriptor_t *desc; - - while ((expected_type = va_arg(args, int)) != RPC_TYPE_INVALID) { - void *p_value = va_arg(args, void *); - int32_t type; - if ((error = rpc_message_recv_int32(message, &type)) < 0) - return error; - if (type != expected_type) - return RPC_ERROR_MESSAGE_ARGUMENT_MISMATCH; - switch (type) { - case RPC_TYPE_CHAR: - error = rpc_message_recv_char(message, (char *)p_value); - break; - case RPC_TYPE_BOOLEAN: - case RPC_TYPE_INT32: - error = rpc_message_recv_int32(message, (int32_t *)p_value); - break; - case RPC_TYPE_UINT32: - error = rpc_message_recv_uint32(message, (uint32_t *)p_value); - break; - case RPC_TYPE_STRING: - error = rpc_message_recv_string(message, (char **)p_value); - break; - case RPC_TYPE_ARRAY: { - int i; - int32_t array_type; - uint32_t array_size; - if ((error = rpc_message_recv_int32(message, &array_type)) < 0) - return error; - if ((error = rpc_message_recv_uint32(message, &array_size)) < 0) - return error; - p_value = va_arg(args, void *); - *((uint32_t *)p_value) = array_size; - p_value = va_arg(args, void *); - switch (array_type) { - case RPC_TYPE_CHAR: { - unsigned char *array; - if ((array = (unsigned char *)malloc(array_size * sizeof(*array))) == NULL) - return RPC_ERROR_NO_MEMORY; - error = _rpc_message_recv_bytes(message, array, array_size); - if (error != RPC_ERROR_NO_ERROR) { - free(array); - return error; - } - *((void **)p_value) = (void *)array; - break; - } - case RPC_TYPE_BOOLEAN: - case RPC_TYPE_INT32: { - int *array; - if ((array = (int *)malloc(array_size * sizeof(*array))) == NULL) - return RPC_ERROR_NO_MEMORY; - for (i = 0; i < array_size; i++) { - int32_t value; - if ((error = rpc_message_recv_int32(message, &value)) < 0) { - free(array); - return error; - } - array[i] = value; - } - *((void **)p_value) = (void *)array; - break; - } - case RPC_TYPE_UINT32: { - unsigned int *array; - if ((array = (unsigned int *)malloc(array_size * sizeof(*array))) == NULL) - return RPC_ERROR_NO_MEMORY; - for (i = 0; i < array_size; i++) { - uint32_t value; - if ((error = rpc_message_recv_uint32(message, &value)) < 0) { - free(array); - return error; - } - array[i] = value; - } - *((void **)p_value) = (void *)array; - break; - } - case RPC_TYPE_STRING: { - char **array; - if ((array = (char **)malloc(array_size * sizeof(*array))) == NULL) - return RPC_ERROR_NO_MEMORY; - for (i = 0; i < array_size; i++) { - char *str; - if ((error = rpc_message_recv_string(message, &str)) < 0) { - free(array); - return error; - } - array[i] = str; - } - *((void **)p_value) = (void *)array; - break; - } - default: - if ((desc = rpc_message_find_descriptor(array_type)) != NULL) { - char *array; - if ((array = (char *)malloc(array_size * desc->size)) == NULL) - return RPC_ERROR_NO_MEMORY; - for (i = 0; i < array_size; i++) { - if ((error = desc->recv_callback(message, &array[i * desc->size])) < 0) { - free(array); - return error; - } - } - *((void **)p_value) = array; - } - else { - fprintf(stderr, "unknown array arg type %d to receive\n", type); - error = RPC_ERROR_MESSAGE_ARGUMENT_UNKNOWN; - } - break; - } - break; - } - default: - if ((desc = rpc_message_find_descriptor(type)) != NULL) - error = desc->recv_callback(message, p_value); - else { - fprintf(stderr, "unknown arg type %d to send\n", type); - error = RPC_ERROR_MESSAGE_ARGUMENT_UNKNOWN; - } - break; - } - if (error != RPC_ERROR_NO_ERROR) - return error; - } - return RPC_ERROR_NO_ERROR; -} - -// Skip message argument -static int rpc_message_skip_arg(rpc_message_t *message, int type) -{ - unsigned char dummy[BUFSIZ]; - int error = RPC_ERROR_GENERIC; - switch (type) { - case RPC_TYPE_CHAR: - error = _rpc_message_recv_bytes(message, dummy, 1); - break; - case RPC_TYPE_BOOLEAN: - case RPC_TYPE_INT32: - case RPC_TYPE_UINT32: - error = _rpc_message_recv_bytes(message, dummy, 4); - break; - case RPC_TYPE_STRING: { - int32_t length; - if ((error = rpc_message_recv_int32(message, &length)) < 0) - return error; - while (length >= sizeof(dummy)) { - if ((error = _rpc_message_recv_bytes(message, dummy, sizeof(dummy))) < 0) - return error; - length -= sizeof(dummy); - } - if (length > 0) { - if ((error = _rpc_message_recv_bytes(message, dummy, length)) < 0) - return error; - } - break; - } - default: - fprintf(stderr, "unknown arg type %d to receive\n", type); - break; - } - return error; -} - -// Dispatch message received in the server loop -int rpc_dispatch(rpc_connection_t *connection) -{ - rpc_message_t message; - rpc_message_init(&message, connection); - - int32_t method, value, ret = RPC_MESSAGE_FAILURE; - if (rpc_message_recv_int32(&message, &value) != RPC_ERROR_NO_ERROR || - value != RPC_MESSAGE_START) - return ret; - - D(bug("receiving message\n")); - if (rpc_message_recv_int32(&message, &method) == RPC_ERROR_NO_ERROR && - connection->callbacks != NULL) { - int i; - for (i = 0; i < connection->n_callbacks; i++) { - if (connection->callbacks[i].id == method) { - if (connection->callbacks[i].callback && - connection->callbacks[i].callback(connection) == RPC_ERROR_NO_ERROR) { - if (rpc_message_recv_int32(&message, &value) == RPC_ERROR_NO_ERROR && value == RPC_MESSAGE_END) - ret = RPC_MESSAGE_ACK; - else { - fprintf(stderr, "corrupted message handler %d\n", method); - for (;;) { - if (rpc_message_skip_arg(&message, value) != RPC_ERROR_NO_ERROR) - break; - if (rpc_message_recv_int32(&message, &value) != RPC_ERROR_NO_ERROR) - break; - if (value == RPC_MESSAGE_END) - break; - } - } - break; - } - } - } - } - rpc_message_send_int32(&message, ret); - rpc_message_flush(&message); - D(bug(" -- message received\n")); - return ret == RPC_MESSAGE_ACK ? method : ret; -} - - -/* ====================================================================== */ -/* === Method Callbacks Handling === */ -/* ====================================================================== */ - -// Add a user-defined method callback (server side) -static int rpc_method_add_callback(rpc_connection_t *connection, const rpc_method_descriptor_t *desc) -{ - const int N_ENTRIES_ALLOC = 8; - int i; - - // pre-allocate up to N_ENTRIES_ALLOC entries - if (connection->callbacks == NULL) { - if ((connection->callbacks = (rpc_method_descriptor_t *)calloc(N_ENTRIES_ALLOC, sizeof(connection->callbacks[0]))) == NULL) - return RPC_ERROR_NO_MEMORY; - connection->n_callbacks = N_ENTRIES_ALLOC; - } - - // look for a free slot - for (i = connection->n_callbacks - 1; i >= 0; i--) { - if (connection->callbacks[i].callback == NULL) - break; - } - - // none found, reallocate - if (i < 0) { - if ((connection->callbacks = (rpc_method_descriptor_t *)realloc(connection->callbacks, (connection->n_callbacks + N_ENTRIES_ALLOC) * sizeof(connection->callbacks[0]))) == NULL) - return RPC_ERROR_NO_MEMORY; - i = connection->n_callbacks; - memset(&connection->callbacks[i], 0, N_ENTRIES_ALLOC * sizeof(connection->callbacks[0])); - connection->n_callbacks += N_ENTRIES_ALLOC; - } - - D(bug("rpc_method_add_callback for method %d in slot %d\n", desc->id, i)); - connection->callbacks[i] = *desc; - return RPC_ERROR_NO_ERROR; -} - -// Add user-defined method callbacks (server side) -int rpc_method_add_callbacks(rpc_connection_t *connection, const rpc_method_descriptor_t *descs, int n_descs) -{ - D(bug("rpc_method_add_callbacks\n")); - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - while (--n_descs >= 0) { - int error = rpc_method_add_callback(connection, &descs[n_descs]); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - - return RPC_ERROR_NO_ERROR; -} - -// Remove a user-defined method callback (common code) -int rpc_method_remove_callback_id(rpc_connection_t *connection, int id) -{ - D(bug("rpc_method_remove_callback_id\n")); - - if (connection->callbacks) { - int i; - for (i = 0; i < connection->n_callbacks; i++) { - if (connection->callbacks[i].id == id) { - connection->callbacks[i].callback = NULL; - return RPC_ERROR_NO_ERROR; - } - } - } - - return RPC_ERROR_GENERIC; -} - -// Remove user-defined method callbacks (server side) -int rpc_method_remove_callbacks(rpc_connection_t *connection, const rpc_method_descriptor_t *callbacks, int n_callbacks) -{ - D(bug("rpc_method_remove_callbacks\n")); - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - while (--n_callbacks >= 0) { - int error = rpc_method_remove_callback_id(connection, callbacks[n_callbacks].id); - if (error != RPC_ERROR_NO_ERROR) - return error; - } - - return RPC_ERROR_NO_ERROR; -} - - -/* ====================================================================== */ -/* === Remote Procedure Call (method invocation) === */ -/* ====================================================================== */ - -// Invoke remote procedure (client side) -int rpc_method_invoke(rpc_connection_t *connection, int method, ...) -{ - D(bug("rpc_method_invoke method=%d\n", method)); - - rpc_message_t message; - int error; - va_list args; - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_CLIENT) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - rpc_message_init(&message, connection); - error = rpc_message_send_int32(&message, RPC_MESSAGE_START); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = rpc_message_send_int32(&message, method); - if (error != RPC_ERROR_NO_ERROR) - return error; - va_start(args, method); - error = rpc_message_send_args(&message, args); - va_end(args); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = rpc_message_send_int32(&message, RPC_MESSAGE_END); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = rpc_message_flush(&message); - if (error != RPC_ERROR_NO_ERROR) - return error; - return RPC_ERROR_NO_ERROR; -} - -// Retrieve procedure arguments (server side) -int rpc_method_get_args(rpc_connection_t *connection, ...) -{ - D(bug("rpc_method_get_args\n")); - - int error; - va_list args; - rpc_message_t message; - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - rpc_message_init(&message, connection); - va_start(args, connection); - error = rpc_message_recv_args(&message, args); - va_end(args); - - return error; -} - -// Wait for a reply from the remote procedure (client side) -int rpc_method_wait_for_reply(rpc_connection_t *connection, ...) -{ - D(bug("rpc_method_wait_for_reply\n")); - - int error, type; - int32_t ret; - va_list args; - rpc_message_t message; - - if (connection == NULL) - return RPC_ERROR_CONNECTION_NULL; - if (connection->type != RPC_CONNECTION_CLIENT) - return RPC_ERROR_CONNECTION_TYPE_MISMATCH; - - rpc_connection_set_status(connection, RPC_STATUS_BUSY); - - rpc_message_init(&message, connection); - va_start(args, connection); - type = va_arg(args, int); - va_end(args); - - if (type != RPC_TYPE_INVALID) { - error = rpc_message_recv_int32(&message, &ret); - if (error != RPC_ERROR_NO_ERROR) - return_error(error); - if (ret != RPC_MESSAGE_REPLY) { - D(bug("TRUNCATED 1 [%d]\n", ret)); - return_error(RPC_ERROR_MESSAGE_TRUNCATED); - } - va_start(args, connection); - error = rpc_message_recv_args(&message, args); - va_end(args); - if (error != RPC_ERROR_NO_ERROR) - return_error(error); - error = rpc_message_recv_int32(&message, &ret); - if (error != RPC_ERROR_NO_ERROR) - return_error(error); - if (ret != RPC_MESSAGE_END) { - D(bug("TRUNCATED 2 [%d]\n", ret)); - return_error(RPC_ERROR_MESSAGE_TRUNCATED); - } - } - - error = rpc_message_recv_int32(&message, &ret); - if (error != RPC_ERROR_NO_ERROR) - return_error(error); - if (ret != RPC_MESSAGE_ACK) { - D(bug("TRUNCATED 3 [%d]\n", ret)); - return_error(RPC_ERROR_MESSAGE_TRUNCATED); - } - - return_error(RPC_ERROR_NO_ERROR); - - do_return: - rpc_connection_set_status(connection, RPC_STATUS_IDLE); - return error; -} - -// Send a reply to the client (server side) -int rpc_method_send_reply(rpc_connection_t *connection, ...) -{ - D(bug("rpc_method_send_reply\n")); - - rpc_message_t message; - int error; - va_list args; - - if (connection == NULL) - return RPC_ERROR_GENERIC; - if (connection->type != RPC_CONNECTION_SERVER) - return RPC_ERROR_GENERIC; - - rpc_message_init(&message, connection); - error = rpc_message_send_int32(&message, RPC_MESSAGE_REPLY); - if (error != RPC_ERROR_NO_ERROR) - return error; - va_start(args, connection); - error = rpc_message_send_args(&message, args); - va_end(args); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = rpc_message_send_int32(&message, RPC_MESSAGE_END); - if (error != RPC_ERROR_NO_ERROR) - return error; - error = rpc_message_flush(&message); - if (error != RPC_ERROR_NO_ERROR) - return error; - return RPC_ERROR_NO_ERROR; -} diff --git a/BasiliskII/src/Unix/semaphore.h b/BasiliskII/src/Unix/semaphore.h deleted file mode 100644 index fc9954f96..000000000 --- a/BasiliskII/src/Unix/semaphore.h +++ /dev/null @@ -1,44 +0,0 @@ -#ifndef __SEMAPHORE_H -#define __SEMAPHORE_H - -#define SEM_VALUE_MAX 64 - -#if defined(c_plusplus) || defined(__cplusplus) -extern "C" { -#endif /* c_plusplus || __cplusplus */ - -/* MacOS X doesn't implement unnamed POSIX semaphores, event though - the libc defines them! */ -#if (defined(__MACH__) && defined(__APPLE__)) -#include -#include -#include - -#define sem_t semaphore_t -#define sem_init(SEM,UNUSED,VALUE) semaphore_create(current_task(), (SEM), SYNC_POLICY_FIFO, (VALUE)) -#define sem_destroy(SEM) semaphore_destroy(current_task(), *(SEM)) -#define sem_wait(SEM) semaphore_wait(*(SEM)) -#define sem_post(SEM) semaphore_signal(*(SEM)) -#else -typedef struct psem { - pthread_mutex_t sem_lock; - int sem_value; - int sem_waiting; -} sem_t; - -int sem_init(sem_t* sem, int pshared, unsigned int value); -int sem_destroy(sem_t* sem); -sem_t sem_open(const char* name, int oflag, ...); -int sem_close(sem_t* sem); -int sem_unlink(const char* name); -int sem_wait(sem_t* sem); -int sem_trywait(sem_t* sem); -int sem_post(sem_t* sem); -int sem_getvalue(sem_t* sem, int* sval); -#endif - -#if defined(c_plusplus) || defined(__cplusplus) -}; -#endif /* c_plusplus || __cplusplus */ - -#endif /* __SEMAPHORE_H */ From 693343e73d15ffcb52a04abba0ab2257e4b29acf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 8 Jun 2018 14:00:59 +0900 Subject: [PATCH 216/534] screen width&height of pref issue fixed --- SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm index ceed49ff2..49a10cb22 100755 --- a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm +++ b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm @@ -156,8 +156,8 @@ - (void) setupGUI } [videoType selectItemAtIndex: display_type ]; - [width setIntValue: dis_width ]; - [height setIntValue: dis_height ]; + [width setStringValue:[NSString stringWithFormat:@"%d", dis_width]]; + [height setStringValue:[NSString stringWithFormat:@"%d", dis_height]]; int frameskip = PrefsFindInt32("frameskip"); int item = -1; From 06c7fc3a7e77090056e20224ef00ba99a4b37937 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 14 Jun 2018 17:19:30 +0900 Subject: [PATCH 217/534] delete SheepShaver/src/slirp/* --- SheepShaver/src/slirp/COPYRIGHT | 61 - SheepShaver/src/slirp/VERSION | 2 - SheepShaver/src/slirp/bootp.c | 242 ---- SheepShaver/src/slirp/bootp.h | 121 -- SheepShaver/src/slirp/cksum.c | 137 -- SheepShaver/src/slirp/ctl.h | 7 - SheepShaver/src/slirp/debug.c | 376 ------ SheepShaver/src/slirp/debug.h | 50 - SheepShaver/src/slirp/icmp_var.h | 65 - SheepShaver/src/slirp/if.c | 322 ----- SheepShaver/src/slirp/if.h | 50 - SheepShaver/src/slirp/ip.h | 317 ----- SheepShaver/src/slirp/ip_icmp.c | 371 ------ SheepShaver/src/slirp/ip_icmp.h | 168 --- SheepShaver/src/slirp/ip_input.c | 705 ----------- SheepShaver/src/slirp/ip_output.c | 201 --- SheepShaver/src/slirp/libslirp.h | 41 - SheepShaver/src/slirp/main.h | 54 - SheepShaver/src/slirp/mbuf.c | 247 ---- SheepShaver/src/slirp/mbuf.h | 143 --- SheepShaver/src/slirp/misc.c | 913 -------------- SheepShaver/src/slirp/misc.h | 87 -- SheepShaver/src/slirp/sbuf.c | 202 --- SheepShaver/src/slirp/sbuf.h | 31 - SheepShaver/src/slirp/slirp.c | 670 ---------- SheepShaver/src/slirp/slirp.h | 367 ------ SheepShaver/src/slirp/slirp_config.h | 135 -- SheepShaver/src/slirp/socket.c | 722 ----------- SheepShaver/src/slirp/socket.h | 104 -- SheepShaver/src/slirp/tcp.h | 181 --- SheepShaver/src/slirp/tcp_input.c | 1722 -------------------------- SheepShaver/src/slirp/tcp_output.c | 601 --------- SheepShaver/src/slirp/tcp_subr.c | 1324 -------------------- SheepShaver/src/slirp/tcp_timer.c | 322 ----- SheepShaver/src/slirp/tcp_timer.h | 138 --- SheepShaver/src/slirp/tcp_var.h | 227 ---- SheepShaver/src/slirp/tcpip.h | 77 -- SheepShaver/src/slirp/tftp.c | 334 ----- SheepShaver/src/slirp/tftp.h | 40 - SheepShaver/src/slirp/udp.c | 675 ---------- SheepShaver/src/slirp/udp.h | 113 -- 41 files changed, 12665 deletions(-) delete mode 100644 SheepShaver/src/slirp/COPYRIGHT delete mode 100644 SheepShaver/src/slirp/VERSION delete mode 100755 SheepShaver/src/slirp/bootp.c delete mode 100755 SheepShaver/src/slirp/bootp.h delete mode 100755 SheepShaver/src/slirp/cksum.c delete mode 100755 SheepShaver/src/slirp/ctl.h delete mode 100755 SheepShaver/src/slirp/debug.c delete mode 100755 SheepShaver/src/slirp/debug.h delete mode 100755 SheepShaver/src/slirp/icmp_var.h delete mode 100755 SheepShaver/src/slirp/if.c delete mode 100755 SheepShaver/src/slirp/if.h delete mode 100755 SheepShaver/src/slirp/ip.h delete mode 100755 SheepShaver/src/slirp/ip_icmp.c delete mode 100755 SheepShaver/src/slirp/ip_icmp.h delete mode 100755 SheepShaver/src/slirp/ip_input.c delete mode 100755 SheepShaver/src/slirp/ip_output.c delete mode 100755 SheepShaver/src/slirp/libslirp.h delete mode 100755 SheepShaver/src/slirp/main.h delete mode 100755 SheepShaver/src/slirp/mbuf.c delete mode 100755 SheepShaver/src/slirp/mbuf.h delete mode 100755 SheepShaver/src/slirp/misc.c delete mode 100755 SheepShaver/src/slirp/misc.h delete mode 100755 SheepShaver/src/slirp/sbuf.c delete mode 100755 SheepShaver/src/slirp/sbuf.h delete mode 100755 SheepShaver/src/slirp/slirp.c delete mode 100755 SheepShaver/src/slirp/slirp.h delete mode 100755 SheepShaver/src/slirp/slirp_config.h delete mode 100755 SheepShaver/src/slirp/socket.c delete mode 100755 SheepShaver/src/slirp/socket.h delete mode 100755 SheepShaver/src/slirp/tcp.h delete mode 100755 SheepShaver/src/slirp/tcp_input.c delete mode 100755 SheepShaver/src/slirp/tcp_output.c delete mode 100755 SheepShaver/src/slirp/tcp_subr.c delete mode 100755 SheepShaver/src/slirp/tcp_timer.c delete mode 100755 SheepShaver/src/slirp/tcp_timer.h delete mode 100755 SheepShaver/src/slirp/tcp_var.h delete mode 100755 SheepShaver/src/slirp/tcpip.h delete mode 100755 SheepShaver/src/slirp/tftp.c delete mode 100755 SheepShaver/src/slirp/tftp.h delete mode 100755 SheepShaver/src/slirp/udp.c delete mode 100755 SheepShaver/src/slirp/udp.h diff --git a/SheepShaver/src/slirp/COPYRIGHT b/SheepShaver/src/slirp/COPYRIGHT deleted file mode 100644 index b7d6568ea..000000000 --- a/SheepShaver/src/slirp/COPYRIGHT +++ /dev/null @@ -1,61 +0,0 @@ -Slirp was written by Danny Gasparovski. -Copyright (c), 1995,1996 All Rights Reserved. - -Slirp is maintained by Kelly Price - -Slirp is free software; "free" as in you don't have to pay for it, and you -are free to do whatever you want with it. I do not accept any donations, -monetary or otherwise, for Slirp. Instead, I would ask you to pass this -potential donation to your favorite charity. In fact, I encourage -*everyone* who finds Slirp useful to make a small donation to their -favorite charity (for example, GreenPeace). This is not a requirement, but -a suggestion from someone who highly values the service they provide. - -The copyright terms and conditions: - ----BEGIN--- - - Copyright (c) 1995,1996 Danny Gasparovski. All rights reserved. - - Redistribution and use in source and binary forms, with or without - modification, are permitted provided that the following conditions - are met: - 1. Redistributions of source code must retain the above copyright - notice, this list of conditions and the following disclaimer. - 2. Redistributions in binary form must reproduce the above copyright - notice, this list of conditions and the following disclaimer in the - documentation and/or other materials provided with the distribution. - - THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, - INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY - AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL - DANNY GASPAROVSKI OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, - INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT - NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, - DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY - THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT - (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF - THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. - ----END--- - -This basically means you can do anything you want with the software, except -1) call it your own, and 2) claim warranty on it. There is no warranty for -this software. None. Nada. If you lose a million dollars while using -Slirp, that's your loss not mine. So, ***USE AT YOUR OWN RISK!***. - -If these conditions cannot be met due to legal restrictions (E.g. where it -is against the law to give out Software without warranty), you must cease -using the software and delete all copies you have. - -Slirp uses code that is copyrighted by the following people/organizations: - -Juha Pirkola. -Gregory M. Christy. -The Regents of the University of California. -Carnegie Mellon University. -The Australian National University. -RSA Data Security, Inc. - -Please read the top of each source file for the details on the various -copyrights. diff --git a/SheepShaver/src/slirp/VERSION b/SheepShaver/src/slirp/VERSION deleted file mode 100644 index 12adff9bb..000000000 --- a/SheepShaver/src/slirp/VERSION +++ /dev/null @@ -1,2 +0,0 @@ -qemu 0.9.0 (2007/02/05) -Plus 64 Bits Patchs \ No newline at end of file diff --git a/SheepShaver/src/slirp/bootp.c b/SheepShaver/src/slirp/bootp.c deleted file mode 100755 index a51b80c95..000000000 --- a/SheepShaver/src/slirp/bootp.c +++ /dev/null @@ -1,242 +0,0 @@ -/* - * QEMU BOOTP/DHCP server - * - * Copyright (c) 2004 Fabrice Bellard - * - * 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 - * THE AUTHORS OR COPYRIGHT HOLDERS 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. - */ -#include - -/* XXX: only DHCP is supported */ - -#define NB_ADDR 16 - -#define START_ADDR 15 - -#define LEASE_TIME (24 * 3600) - -typedef struct { - uint8_t allocated; - uint8_t macaddr[6]; -} BOOTPClient; - -BOOTPClient bootp_clients[NB_ADDR]; - -static const uint8_t rfc1533_cookie[] = { RFC1533_COOKIE }; - -static BOOTPClient *get_new_addr(struct in_addr *paddr) -{ - BOOTPClient *bc; - int i; - - for(i = 0; i < NB_ADDR; i++) { - if (!bootp_clients[i].allocated) - goto found; - } - return NULL; - found: - bc = &bootp_clients[i]; - bc->allocated = 1; - paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); - return bc; -} - -static BOOTPClient *find_addr(struct in_addr *paddr, const uint8_t *macaddr) -{ - BOOTPClient *bc; - int i; - - for(i = 0; i < NB_ADDR; i++) { - if (!memcmp(macaddr, bootp_clients[i].macaddr, 6)) - goto found; - } - return NULL; - found: - bc = &bootp_clients[i]; - bc->allocated = 1; - paddr->s_addr = htonl(ntohl(special_addr.s_addr) | (i + START_ADDR)); - return bc; -} - -static void dhcp_decode(const uint8_t *buf, int size, - int *pmsg_type) -{ - const uint8_t *p, *p_end; - int len, tag; - - *pmsg_type = 0; - - p = buf; - p_end = buf + size; - if (size < 5) - return; - if (memcmp(p, rfc1533_cookie, 4) != 0) - return; - p += 4; - while (p < p_end) { - tag = p[0]; - if (tag == RFC1533_PAD) { - p++; - } else if (tag == RFC1533_END) { - break; - } else { - p++; - if (p >= p_end) - break; - len = *p++; - - switch(tag) { - case RFC2132_MSG_TYPE: - if (len >= 1) - *pmsg_type = p[0]; - break; - default: - break; - } - p += len; - } - } -} - -static void bootp_reply(struct bootp_t *bp) -{ - BOOTPClient *bc; - struct mbuf *m; - struct bootp_t *rbp; - struct sockaddr_in saddr, daddr; - struct in_addr dns_addr; - int dhcp_msg_type, val; - uint8_t *q; - - /* extract exact DHCP msg type */ - dhcp_decode(bp->bp_vend, DHCP_OPT_LEN, &dhcp_msg_type); - - if (dhcp_msg_type == 0) - dhcp_msg_type = DHCPREQUEST; /* Force reply for old BOOTP clients */ - - if (dhcp_msg_type != DHCPDISCOVER && - dhcp_msg_type != DHCPREQUEST) - return; - /* XXX: this is a hack to get the client mac address */ - memcpy(client_ethaddr, bp->bp_hwaddr, 6); - - if ((m = m_get()) == NULL) - return; - m->m_data += if_maxlinkhdr; - rbp = (struct bootp_t *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - memset(rbp, 0, sizeof(struct bootp_t)); - - if (dhcp_msg_type == DHCPDISCOVER) { - new_addr: - bc = get_new_addr(&daddr.sin_addr); - if (!bc) - return; - memcpy(bc->macaddr, client_ethaddr, 6); - } else { - bc = find_addr(&daddr.sin_addr, bp->bp_hwaddr); - if (!bc) { - /* if never assigned, behaves as if it was already - assigned (windows fix because it remembers its address) */ - goto new_addr; - } - } - - saddr.sin_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_ALIAS); - saddr.sin_port = htons(BOOTP_SERVER); - - daddr.sin_port = htons(BOOTP_CLIENT); - - rbp->bp_op = BOOTP_REPLY; - rbp->bp_xid = bp->bp_xid; - rbp->bp_htype = 1; - rbp->bp_hlen = 6; - memcpy(rbp->bp_hwaddr, bp->bp_hwaddr, 6); - - rbp->bp_yiaddr = daddr.sin_addr; /* Client IP address */ - rbp->bp_siaddr = saddr.sin_addr; /* Server IP address */ - - q = rbp->bp_vend; - memcpy(q, rfc1533_cookie, 4); - q += 4; - - if (dhcp_msg_type == DHCPDISCOVER) { - *q++ = RFC2132_MSG_TYPE; - *q++ = 1; - *q++ = DHCPOFFER; - } else if (dhcp_msg_type == DHCPREQUEST) { - *q++ = RFC2132_MSG_TYPE; - *q++ = 1; - *q++ = DHCPACK; - } - - if (dhcp_msg_type == DHCPDISCOVER || - dhcp_msg_type == DHCPREQUEST) { - *q++ = RFC2132_SRV_ID; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_NETMASK; - *q++ = 4; - *q++ = 0xff; - *q++ = 0xff; - *q++ = 0xff; - *q++ = 0x00; - - *q++ = RFC1533_GATEWAY; - *q++ = 4; - memcpy(q, &saddr.sin_addr, 4); - q += 4; - - *q++ = RFC1533_DNS; - *q++ = 4; - dns_addr.s_addr = htonl(ntohl(special_addr.s_addr) | CTL_DNS); - memcpy(q, &dns_addr, 4); - q += 4; - - *q++ = RFC2132_LEASE_TIME; - *q++ = 4; - val = htonl(LEASE_TIME); - memcpy(q, &val, 4); - q += 4; - - if (*slirp_hostname) { - val = strlen(slirp_hostname); - *q++ = RFC1533_HOSTNAME; - *q++ = val; - memcpy(q, slirp_hostname, val); - q += val; - } - } - *q++ = RFC1533_END; - - m->m_len = sizeof(struct bootp_t) - - sizeof(struct ip) - sizeof(struct udphdr); - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); -} - -void bootp_input(struct mbuf *m) -{ - struct bootp_t *bp = mtod(m, struct bootp_t *); - - if (bp->bp_op == BOOTP_REQUEST) { - bootp_reply(bp); - } -} diff --git a/SheepShaver/src/slirp/bootp.h b/SheepShaver/src/slirp/bootp.h deleted file mode 100755 index 5c2e62ab0..000000000 --- a/SheepShaver/src/slirp/bootp.h +++ /dev/null @@ -1,121 +0,0 @@ -/* bootp/dhcp defines */ - -#define BOOTP_SERVER 67 -#define BOOTP_CLIENT 68 - -#define BOOTP_REQUEST 1 -#define BOOTP_REPLY 2 - -#define RFC1533_COOKIE 99, 130, 83, 99 -#define RFC1533_PAD 0 -#define RFC1533_NETMASK 1 -#define RFC1533_TIMEOFFSET 2 -#define RFC1533_GATEWAY 3 -#define RFC1533_TIMESERVER 4 -#define RFC1533_IEN116NS 5 -#define RFC1533_DNS 6 -#define RFC1533_LOGSERVER 7 -#define RFC1533_COOKIESERVER 8 -#define RFC1533_LPRSERVER 9 -#define RFC1533_IMPRESSSERVER 10 -#define RFC1533_RESOURCESERVER 11 -#define RFC1533_HOSTNAME 12 -#define RFC1533_BOOTFILESIZE 13 -#define RFC1533_MERITDUMPFILE 14 -#define RFC1533_DOMAINNAME 15 -#define RFC1533_SWAPSERVER 16 -#define RFC1533_ROOTPATH 17 -#define RFC1533_EXTENSIONPATH 18 -#define RFC1533_IPFORWARDING 19 -#define RFC1533_IPSOURCEROUTING 20 -#define RFC1533_IPPOLICYFILTER 21 -#define RFC1533_IPMAXREASSEMBLY 22 -#define RFC1533_IPTTL 23 -#define RFC1533_IPMTU 24 -#define RFC1533_IPMTUPLATEAU 25 -#define RFC1533_INTMTU 26 -#define RFC1533_INTLOCALSUBNETS 27 -#define RFC1533_INTBROADCAST 28 -#define RFC1533_INTICMPDISCOVER 29 -#define RFC1533_INTICMPRESPOND 30 -#define RFC1533_INTROUTEDISCOVER 31 -#define RFC1533_INTROUTESOLICIT 32 -#define RFC1533_INTSTATICROUTES 33 -#define RFC1533_LLTRAILERENCAP 34 -#define RFC1533_LLARPCACHETMO 35 -#define RFC1533_LLETHERNETENCAP 36 -#define RFC1533_TCPTTL 37 -#define RFC1533_TCPKEEPALIVETMO 38 -#define RFC1533_TCPKEEPALIVEGB 39 -#define RFC1533_NISDOMAIN 40 -#define RFC1533_NISSERVER 41 -#define RFC1533_NTPSERVER 42 -#define RFC1533_VENDOR 43 -#define RFC1533_NBNS 44 -#define RFC1533_NBDD 45 -#define RFC1533_NBNT 46 -#define RFC1533_NBSCOPE 47 -#define RFC1533_XFS 48 -#define RFC1533_XDM 49 - -#define RFC2132_REQ_ADDR 50 -#define RFC2132_LEASE_TIME 51 -#define RFC2132_MSG_TYPE 53 -#define RFC2132_SRV_ID 54 -#define RFC2132_PARAM_LIST 55 -#define RFC2132_MAX_SIZE 57 -#define RFC2132_RENEWAL_TIME 58 -#define RFC2132_REBIND_TIME 59 - -#define DHCPDISCOVER 1 -#define DHCPOFFER 2 -#define DHCPREQUEST 3 -#define DHCPACK 5 - -#define RFC1533_VENDOR_MAJOR 0 -#define RFC1533_VENDOR_MINOR 0 - -#define RFC1533_VENDOR_MAGIC 128 -#define RFC1533_VENDOR_ADDPARM 129 -#define RFC1533_VENDOR_ETHDEV 130 -#define RFC1533_VENDOR_HOWTO 132 -#define RFC1533_VENDOR_MNUOPTS 160 -#define RFC1533_VENDOR_SELECTION 176 -#define RFC1533_VENDOR_MOTD 184 -#define RFC1533_VENDOR_NUMOFMOTD 8 -#define RFC1533_VENDOR_IMG 192 -#define RFC1533_VENDOR_NUMOFIMG 16 - -#define RFC1533_END 255 -#define BOOTP_VENDOR_LEN 64 -#define DHCP_OPT_LEN 312 - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct bootp_t { - struct ip ip; - struct udphdr udp; - uint8_t bp_op; - uint8_t bp_htype; - uint8_t bp_hlen; - uint8_t bp_hops; - uint32_t bp_xid; - uint16_t bp_secs; - uint16_t unused; - struct in_addr bp_ciaddr; - struct in_addr bp_yiaddr; - struct in_addr bp_siaddr; - struct in_addr bp_giaddr; - uint8_t bp_hwaddr[16]; - uint8_t bp_sname[64]; - uint8_t bp_file[128]; - uint8_t bp_vend[DHCP_OPT_LEN]; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -void bootp_input(struct mbuf *m); diff --git a/SheepShaver/src/slirp/cksum.c b/SheepShaver/src/slirp/cksum.c deleted file mode 100755 index 66d3f230a..000000000 --- a/SheepShaver/src/slirp/cksum.c +++ /dev/null @@ -1,137 +0,0 @@ -/* - * Copyright (c) 1988, 1992, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)in_cksum.c 8.1 (Berkeley) 6/10/93 - * in_cksum.c,v 1.2 1994/08/02 07:48:16 davidg Exp - */ - -#include - -/* - * Checksum routine for Internet Protocol family headers (Portable Version). - * - * This routine is very heavily used in the network - * code and should be modified for each CPU to be as fast as possible. - * - * XXX Since we will never span more than 1 mbuf, we can optimise this - */ - -#define ADDCARRY(x) (x > 65535 ? x -= 65535 : x) -#define REDUCE {l_util.l = sum; sum = l_util.s[0] + l_util.s[1]; ADDCARRY(sum);} - -int cksum(struct mbuf *m, int len) -{ - register u_int16_t *w; - register int sum = 0; - register int mlen = 0; - int byte_swapped = 0; - - union { - u_int8_t c[2]; - u_int16_t s; - } s_util; - union { - u_int16_t s[2]; - u_int32_t l; - } l_util; - - if (m->m_len == 0) - goto cont; - w = mtod(m, u_int16_t *); - - mlen = m->m_len; - - if (len < mlen) - mlen = len; - len -= mlen; - /* - * Force to even boundary. - */ - if ((1 & (long) w) && (mlen > 0)) { - REDUCE; - sum <<= 8; - s_util.c[0] = *(u_int8_t *)w; - w = (u_int16_t *)((int8_t *)w + 1); - mlen--; - byte_swapped = 1; - } - /* - * Unroll the loop to make overhead from - * branches &c small. - */ - while ((mlen -= 32) >= 0) { - sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; - sum += w[4]; sum += w[5]; sum += w[6]; sum += w[7]; - sum += w[8]; sum += w[9]; sum += w[10]; sum += w[11]; - sum += w[12]; sum += w[13]; sum += w[14]; sum += w[15]; - w += 16; - } - mlen += 32; - while ((mlen -= 8) >= 0) { - sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3]; - w += 4; - } - mlen += 8; - if (mlen == 0 && byte_swapped == 0) - goto cont; - REDUCE; - while ((mlen -= 2) >= 0) { - sum += *w++; - } - - if (byte_swapped) { - REDUCE; - sum <<= 8; - byte_swapped = 0; - if (mlen == -1) { - s_util.c[1] = *(u_int8_t *)w; - sum += s_util.s; - mlen = 0; - } else - - mlen = -1; - } else if (mlen == -1) - s_util.c[0] = *(u_int8_t *)w; - -cont: -#ifdef DEBUG - if (len) { - DEBUG_ERROR((dfd, "cksum: out of data\n")); - DEBUG_ERROR((dfd, " len = %d\n", len)); - } -#endif - if (mlen == -1) { - /* The last mbuf has odd # of bytes. Follow the - standard (the odd byte may be shifted left by 8 bits - or not as determined by endian-ness of the machine) */ - s_util.c[1] = 0; - sum += s_util.s; - } - REDUCE; - return (~sum & 0xffff); -} diff --git a/SheepShaver/src/slirp/ctl.h b/SheepShaver/src/slirp/ctl.h deleted file mode 100755 index 4a8576dc1..000000000 --- a/SheepShaver/src/slirp/ctl.h +++ /dev/null @@ -1,7 +0,0 @@ -#define CTL_CMD 0 -#define CTL_EXEC 1 -#define CTL_ALIAS 2 -#define CTL_DNS 3 - -#define CTL_SPECIAL "10.0.2.0" -#define CTL_LOCAL "10.0.2.15" diff --git a/SheepShaver/src/slirp/debug.c b/SheepShaver/src/slirp/debug.c deleted file mode 100755 index d3d8c5796..000000000 --- a/SheepShaver/src/slirp/debug.c +++ /dev/null @@ -1,376 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * Portions copyright (c) 2000 Kelly Price. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -FILE *dfd = NULL; -#ifdef DEBUG -int dostats = 1; -#else -int dostats = 0; -#endif -int slirp_debug = 0; - -extern char *strerror _P((int)); - -/* Carry over one item from main.c so that the tty's restored. - * Only done when the tty being used is /dev/tty --RedWolf */ -extern struct termios slirp_tty_settings; -extern int slirp_tty_restore; - - -void -debug_init(file, dbg) - char *file; - int dbg; -{ - /* Close the old debugging file */ - if (dfd) - fclose(dfd); - - dfd = fopen(file,"w"); - if (dfd != NULL) { -#if 0 - fprintf(dfd,"Slirp %s - Debugging Started.\n", SLIRP_VERSION); -#endif - fprintf(dfd,"Debugging Started level %i.\r\n",dbg); - fflush(dfd); - slirp_debug = dbg; - } else { - lprint("Error: Debugging file \"%s\" could not be opened: %s\r\n", - file, strerror(errno)); - } -} - -/* - * Dump a packet in the same format as tcpdump -x - */ -#ifdef DEBUG -void -dump_packet(dat, n) - void *dat; - int n; -{ - u_char *pptr = (u_char *)dat; - int j,k; - - n /= 16; - n++; - DEBUG_MISC((dfd, "PACKET DUMPED: \n")); - for(j = 0; j < n; j++) { - for(k = 0; k < 6; k++) - DEBUG_MISC((dfd, "%02x ", *pptr++)); - DEBUG_MISC((dfd, "\n")); - fflush(dfd); - } -} -#endif - -#if 0 -/* - * Statistic routines - * - * These will print statistics to the screen, the debug file (dfd), or - * a buffer, depending on "type", so that the stats can be sent over - * the link as well. - */ - -void -ttystats(ttyp) - struct ttys *ttyp; -{ - struct slirp_ifstats *is = &ttyp->ifstats; - char buff[512]; - - lprint(" \r\n"); - - if (if_comp & IF_COMPRESS) - strcpy(buff, "on"); - else if (if_comp & IF_NOCOMPRESS) - strcpy(buff, "off"); - else - strcpy(buff, "off (for now)"); - lprint("Unit %d:\r\n", ttyp->unit); - lprint(" using %s encapsulation (VJ compression is %s)\r\n", ( -#ifdef USE_PPP - ttyp->proto==PROTO_PPP?"PPP": -#endif - "SLIP"), buff); - lprint(" %d baudrate\r\n", ttyp->baud); - lprint(" interface is %s\r\n", ttyp->up?"up":"down"); - lprint(" using fd %d, guardian pid is %d\r\n", ttyp->fd, ttyp->pid); -#ifndef FULL_BOLT - lprint(" towrite is %d bytes\r\n", ttyp->towrite); -#endif - if (ttyp->zeros) - lprint(" %d zeros have been typed\r\n", ttyp->zeros); - else if (ttyp->ones) - lprint(" %d ones have been typed\r\n", ttyp->ones); - lprint("Interface stats:\r\n"); - lprint(" %6d output packets sent (%d bytes)\r\n", is->out_pkts, is->out_bytes); - lprint(" %6d output packets dropped (%d bytes)\r\n", is->out_errpkts, is->out_errbytes); - lprint(" %6d input packets received (%d bytes)\r\n", is->in_pkts, is->in_bytes); - lprint(" %6d input packets dropped (%d bytes)\r\n", is->in_errpkts, is->in_errbytes); - lprint(" %6d bad input packets\r\n", is->in_mbad); -} - -void -allttystats() -{ - struct ttys *ttyp; - - for (ttyp = ttys; ttyp; ttyp = ttyp->next) - ttystats(ttyp); -} -#endif - -void -ipstats() -{ - lprint(" \r\n"); - - lprint("IP stats:\r\n"); - lprint(" %6d total packets received (%d were unaligned)\r\n", - ipstat.ips_total, ipstat.ips_unaligned); - lprint(" %6d with incorrect version\r\n", ipstat.ips_badvers); - lprint(" %6d with bad header checksum\r\n", ipstat.ips_badsum); - lprint(" %6d with length too short (len < sizeof(iphdr))\r\n", ipstat.ips_tooshort); - lprint(" %6d with length too small (len < ip->len)\r\n", ipstat.ips_toosmall); - lprint(" %6d with bad header length\r\n", ipstat.ips_badhlen); - lprint(" %6d with bad packet length\r\n", ipstat.ips_badlen); - lprint(" %6d fragments received\r\n", ipstat.ips_fragments); - lprint(" %6d fragments dropped\r\n", ipstat.ips_fragdropped); - lprint(" %6d fragments timed out\r\n", ipstat.ips_fragtimeout); - lprint(" %6d packets reassembled ok\r\n", ipstat.ips_reassembled); - lprint(" %6d outgoing packets fragmented\r\n", ipstat.ips_fragmented); - lprint(" %6d total outgoing fragments\r\n", ipstat.ips_ofragments); - lprint(" %6d with bad protocol field\r\n", ipstat.ips_noproto); - lprint(" %6d total packets delivered\r\n", ipstat.ips_delivered); -} - -#if 0 -void -vjstats() -{ - lprint(" \r\n"); - - lprint("VJ compression stats:\r\n"); - - lprint(" %6d outbound packets (%d compressed)\r\n", - comp_s.sls_packets, comp_s.sls_compressed); - lprint(" %6d searches for connection stats (%d misses)\r\n", - comp_s.sls_searches, comp_s.sls_misses); - lprint(" %6d inbound uncompressed packets\r\n", comp_s.sls_uncompressedin); - lprint(" %6d inbound compressed packets\r\n", comp_s.sls_compressedin); - lprint(" %6d inbound unknown type packets\r\n", comp_s.sls_errorin); - lprint(" %6d inbound packets tossed due to error\r\n", comp_s.sls_tossed); -} -#endif - -void -tcpstats() -{ - lprint(" \r\n"); - - lprint("TCP stats:\r\n"); - - lprint(" %6d packets sent\r\n", tcpstat.tcps_sndtotal); - lprint(" %6d data packets (%d bytes)\r\n", - tcpstat.tcps_sndpack, tcpstat.tcps_sndbyte); - lprint(" %6d data packets retransmitted (%d bytes)\r\n", - tcpstat.tcps_sndrexmitpack, tcpstat.tcps_sndrexmitbyte); - lprint(" %6d ack-only packets (%d delayed)\r\n", - tcpstat.tcps_sndacks, tcpstat.tcps_delack); - lprint(" %6d URG only packets\r\n", tcpstat.tcps_sndurg); - lprint(" %6d window probe packets\r\n", tcpstat.tcps_sndprobe); - lprint(" %6d window update packets\r\n", tcpstat.tcps_sndwinup); - lprint(" %6d control (SYN/FIN/RST) packets\r\n", tcpstat.tcps_sndctrl); - lprint(" %6d times tcp_output did nothing\r\n", tcpstat.tcps_didnuttin); - - lprint(" %6d packets received\r\n", tcpstat.tcps_rcvtotal); - lprint(" %6d acks (for %d bytes)\r\n", - tcpstat.tcps_rcvackpack, tcpstat.tcps_rcvackbyte); - lprint(" %6d duplicate acks\r\n", tcpstat.tcps_rcvdupack); - lprint(" %6d acks for unsent data\r\n", tcpstat.tcps_rcvacktoomuch); - lprint(" %6d packets received in sequence (%d bytes)\r\n", - tcpstat.tcps_rcvpack, tcpstat.tcps_rcvbyte); - lprint(" %6d completely duplicate packets (%d bytes)\r\n", - tcpstat.tcps_rcvduppack, tcpstat.tcps_rcvdupbyte); - - lprint(" %6d packets with some duplicate data (%d bytes duped)\r\n", - tcpstat.tcps_rcvpartduppack, tcpstat.tcps_rcvpartdupbyte); - lprint(" %6d out-of-order packets (%d bytes)\r\n", - tcpstat.tcps_rcvoopack, tcpstat.tcps_rcvoobyte); - lprint(" %6d packets of data after window (%d bytes)\r\n", - tcpstat.tcps_rcvpackafterwin, tcpstat.tcps_rcvbyteafterwin); - lprint(" %6d window probes\r\n", tcpstat.tcps_rcvwinprobe); - lprint(" %6d window update packets\r\n", tcpstat.tcps_rcvwinupd); - lprint(" %6d packets received after close\r\n", tcpstat.tcps_rcvafterclose); - lprint(" %6d discarded for bad checksums\r\n", tcpstat.tcps_rcvbadsum); - lprint(" %6d discarded for bad header offset fields\r\n", - tcpstat.tcps_rcvbadoff); - - lprint(" %6d connection requests\r\n", tcpstat.tcps_connattempt); - lprint(" %6d connection accepts\r\n", tcpstat.tcps_accepts); - lprint(" %6d connections established (including accepts)\r\n", tcpstat.tcps_connects); - lprint(" %6d connections closed (including %d drop)\r\n", - tcpstat.tcps_closed, tcpstat.tcps_drops); - lprint(" %6d embryonic connections dropped\r\n", tcpstat.tcps_conndrops); - lprint(" %6d segments we tried to get rtt (%d succeeded)\r\n", - tcpstat.tcps_segstimed, tcpstat.tcps_rttupdated); - lprint(" %6d retransmit timeouts\r\n", tcpstat.tcps_rexmttimeo); - lprint(" %6d connections dropped by rxmt timeout\r\n", - tcpstat.tcps_timeoutdrop); - lprint(" %6d persist timeouts\r\n", tcpstat.tcps_persisttimeo); - lprint(" %6d keepalive timeouts\r\n", tcpstat.tcps_keeptimeo); - lprint(" %6d keepalive probes sent\r\n", tcpstat.tcps_keepprobe); - lprint(" %6d connections dropped by keepalive\r\n", tcpstat.tcps_keepdrops); - lprint(" %6d correct ACK header predictions\r\n", tcpstat.tcps_predack); - lprint(" %6d correct data packet header predictions\n", tcpstat.tcps_preddat); - lprint(" %6d TCP cache misses\r\n", tcpstat.tcps_socachemiss); - - -/* lprint(" Packets received too short: %d\r\n", tcpstat.tcps_rcvshort); */ -/* lprint(" Segments dropped due to PAWS: %d\r\n", tcpstat.tcps_pawsdrop); */ - -} - -void -udpstats() -{ - lprint(" \r\n"); - - lprint("UDP stats:\r\n"); - lprint(" %6d datagrams received\r\n", udpstat.udps_ipackets); - lprint(" %6d with packets shorter than header\r\n", udpstat.udps_hdrops); - lprint(" %6d with bad checksums\r\n", udpstat.udps_badsum); - lprint(" %6d with data length larger than packet\r\n", udpstat.udps_badlen); - lprint(" %6d UDP socket cache misses\r\n", udpstat.udpps_pcbcachemiss); - lprint(" %6d datagrams sent\r\n", udpstat.udps_opackets); -} - -void -icmpstats() -{ - lprint(" \r\n"); - lprint("ICMP stats:\r\n"); - lprint(" %6d ICMP packets received\r\n", icmpstat.icps_received); - lprint(" %6d were too short\r\n", icmpstat.icps_tooshort); - lprint(" %6d with bad checksums\r\n", icmpstat.icps_checksum); - lprint(" %6d with type not supported\r\n", icmpstat.icps_notsupp); - lprint(" %6d with bad type feilds\r\n", icmpstat.icps_badtype); - lprint(" %6d ICMP packets sent in reply\r\n", icmpstat.icps_reflect); -} - -void -mbufstats() -{ - struct mbuf *m; - int i; - - lprint(" \r\n"); - - lprint("Mbuf stats:\r\n"); - - lprint(" %6d mbufs allocated (%d max)\r\n", mbuf_alloced, mbuf_max); - - i = 0; - for (m = m_freelist.m_next; m != &m_freelist; m = m->m_next) - i++; - lprint(" %6d mbufs on free list\r\n", i); - - i = 0; - for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) - i++; - lprint(" %6d mbufs on used list\r\n", i); - lprint(" %6d mbufs queued as packets\r\n\r\n", if_queued); -} - -void -sockstats() -{ - char buff[256]; - int n; - struct socket *so; - - lprint(" \r\n"); - - lprint( - "Proto[state] Sock Local Address, Port Remote Address, Port RecvQ SendQ\r\n"); - - for (so = tcb.so_next; so != &tcb; so = so->so_next) { - - n = sprintf(buff, "tcp[%s]", so->so_tcpcb?tcpstates[so->so_tcpcb->t_state]:"NONE"); - while (n < 17) - buff[n++] = ' '; - buff[17] = 0; - lprint("%s %3d %15s %5d ", - buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); - lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), - so->so_rcv.sb_cc, so->so_snd.sb_cc); - } - - for (so = udb.so_next; so != &udb; so = so->so_next) { - - n = sprintf(buff, "udp[%d sec]", (so->so_expire - curtime) / 1000); - while (n < 17) - buff[n++] = ' '; - buff[17] = 0; - lprint("%s %3d %15s %5d ", - buff, so->s, - inet_ntoa(so->so_laddr), ntohs(so->so_lport)); - lprint("%15s %5d %5d %5d\r\n", - inet_ntoa(so->so_faddr), ntohs(so->so_fport), - so->so_rcv.sb_cc, so->so_snd.sb_cc); - } -} - -#if 0 -void -slirp_exit(exit_status) - int exit_status; -{ - struct ttys *ttyp; - - DEBUG_CALL("slirp_exit"); - DEBUG_ARG("exit_status = %d", exit_status); - - if (dostats) { - lprint_print = (int (*) _P((void *, const char *, va_list)))vfprintf; - if (!dfd) - debug_init("slirp_stats", 0xf); - lprint_arg = (char **)&dfd; - - ipstats(); - tcpstats(); - udpstats(); - icmpstats(); - mbufstats(); - sockstats(); - allttystats(); - vjstats(); - } - - for (ttyp = ttys; ttyp; ttyp = ttyp->next) - tty_detached(ttyp, 1); - - if (slirp_forked) { - /* Menendez time */ - if (kill(getppid(), SIGQUIT) < 0) - lprint("Couldn't kill parent process %ld!\n", - (long) getppid()); - } - - /* Restore the terminal if we gotta */ - if(slirp_tty_restore) - tcsetattr(0,TCSANOW, &slirp_tty_settings); /* NOW DAMMIT! */ - exit(exit_status); -} -#endif diff --git a/SheepShaver/src/slirp/debug.h b/SheepShaver/src/slirp/debug.h deleted file mode 100755 index 6e8444dab..000000000 --- a/SheepShaver/src/slirp/debug.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define PRN_STDERR 1 -#define PRN_SPRINTF 2 - -extern FILE *dfd; -extern FILE *lfd; -extern int dostats; -extern int slirp_debug; - -#define DBG_CALL 0x1 -#define DBG_MISC 0x2 -#define DBG_ERROR 0x4 -#define DEBUG_DEFAULT DBG_CALL|DBG_MISC|DBG_ERROR - -#ifdef DEBUG -#define DEBUG_CALL(x) if (slirp_debug & DBG_CALL) { fprintf(dfd, "%s...\n", x); fflush(dfd); } -#define DEBUG_ARG(x, y) if (slirp_debug & DBG_CALL) { fputc(' ', dfd); fprintf(dfd, x, y); fputc('\n', dfd); fflush(dfd); } -#define DEBUG_ARGS(x) if (slirp_debug & DBG_CALL) { fprintf x ; fflush(dfd); } -#define DEBUG_MISC(x) if (slirp_debug & DBG_MISC) { fprintf x ; fflush(dfd); } -#define DEBUG_ERROR(x) if (slirp_debug & DBG_ERROR) {fprintf x ; fflush(dfd); } - - -#else - -#define DEBUG_CALL(x) -#define DEBUG_ARG(x, y) -#define DEBUG_ARGS(x) -#define DEBUG_MISC(x) -#define DEBUG_ERROR(x) - -#endif - -void debug_init _P((char *, int)); -//void ttystats _P((struct ttys *)); -void allttystats _P((void)); -void ipstats _P((void)); -void vjstats _P((void)); -void tcpstats _P((void)); -void udpstats _P((void)); -void icmpstats _P((void)); -void mbufstats _P((void)); -void sockstats _P((void)); -void slirp_exit _P((int)); - diff --git a/SheepShaver/src/slirp/icmp_var.h b/SheepShaver/src/slirp/icmp_var.h deleted file mode 100755 index 9af222fb7..000000000 --- a/SheepShaver/src/slirp/icmp_var.h +++ /dev/null @@ -1,65 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)icmp_var.h 8.1 (Berkeley) 6/10/93 - * icmp_var.h,v 1.4 1995/02/16 00:27:40 wollman Exp - */ - -#ifndef _NETINET_ICMP_VAR_H_ -#define _NETINET_ICMP_VAR_H_ - -/* - * Variables related to this implementation - * of the internet control message protocol. - */ -struct icmpstat { -/* statistics related to input messages processed */ - u_long icps_received; /* #ICMP packets received */ - u_long icps_tooshort; /* packet < ICMP_MINLEN */ - u_long icps_checksum; /* bad checksum */ - u_long icps_notsupp; /* #ICMP packets not supported */ - u_long icps_badtype; /* #with bad type feild */ - u_long icps_reflect; /* number of responses */ -}; - -/* - * Names for ICMP sysctl objects - */ -#define ICMPCTL_MASKREPL 1 /* allow replies to netmask requests */ -#define ICMPCTL_STATS 2 /* statistics (read-only) */ -#define ICMPCTL_MAXID 3 - -#define ICMPCTL_NAMES { \ - { 0, 0 }, \ - { "maskrepl", CTLTYPE_INT }, \ - { "stats", CTLTYPE_STRUCT }, \ -} - -extern struct icmpstat icmpstat; - -#endif diff --git a/SheepShaver/src/slirp/if.c b/SheepShaver/src/slirp/if.c deleted file mode 100755 index eab8a46ea..000000000 --- a/SheepShaver/src/slirp/if.c +++ /dev/null @@ -1,322 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -int if_mtu, if_mru; -int if_comp; -int if_maxlinkhdr; -int if_queued = 0; /* Number of packets queued so far */ -int if_thresh = 10; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ - -struct mbuf if_fastq; /* fast queue (for interactive data) */ -struct mbuf if_batchq; /* queue for non-interactive data */ -struct mbuf *next_m; /* Pointer to next mbuf to output */ - -#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) - -void -ifs_insque(ifm, ifmhead) - struct mbuf *ifm, *ifmhead; -{ - ifm->ifs_next = ifmhead->ifs_next; - ifmhead->ifs_next = ifm; - ifm->ifs_prev = ifmhead; - ifm->ifs_next->ifs_prev = ifm; -} - -void -ifs_remque(ifm) - struct mbuf *ifm; -{ - ifm->ifs_prev->ifs_next = ifm->ifs_next; - ifm->ifs_next->ifs_prev = ifm->ifs_prev; -} - -void -if_init() -{ -#if 0 - /* - * Set if_maxlinkhdr to 48 because it's 40 bytes for TCP/IP, - * and 8 bytes for PPP, but need to have it on an 8byte boundary - */ -#ifdef USE_PPP - if_maxlinkhdr = 48; -#else - if_maxlinkhdr = 40; -#endif -#else - /* 2 for alignment, 14 for ethernet, 40 for TCP/IP */ - if_maxlinkhdr = 2 + 14 + 40; -#endif - if_mtu = 1500; - if_mru = 1500; - if_comp = IF_AUTOCOMP; - if_fastq.ifq_next = if_fastq.ifq_prev = &if_fastq; - if_batchq.ifq_next = if_batchq.ifq_prev = &if_batchq; - // sl_compress_init(&comp_s); - next_m = &if_batchq; -} - -#if 0 -/* - * This shouldn't be needed since the modem is blocking and - * we don't expect any signals, but what the hell.. - */ -inline int -writen(fd, bptr, n) - int fd; - char *bptr; - int n; -{ - int ret; - int total; - - /* This should succeed most of the time */ - ret = send(fd, bptr, n,0); - if (ret == n || ret <= 0) - return ret; - - /* Didn't write everything, go into the loop */ - total = ret; - while (n > total) { - ret = send(fd, bptr+total, n-total,0); - if (ret <= 0) - return ret; - total += ret; - } - return total; -} - -/* - * if_input - read() the tty, do "top level" processing (ie: check for any escapes), - * and pass onto (*ttyp->if_input) - * - * XXXXX Any zeros arriving by themselves are NOT placed into the arriving packet. - */ -#define INBUFF_SIZE 2048 /* XXX */ -void -if_input(ttyp) - struct ttys *ttyp; -{ - u_char if_inbuff[INBUFF_SIZE]; - int if_n; - - DEBUG_CALL("if_input"); - DEBUG_ARG("ttyp = %lx", (long)ttyp); - - if_n = recv(ttyp->fd, (char *)if_inbuff, INBUFF_SIZE,0); - - DEBUG_MISC((dfd, " read %d bytes\n", if_n)); - - if (if_n <= 0) { - if (if_n == 0 || (errno != EINTR && errno != EAGAIN)) { - if (ttyp->up) - link_up--; - tty_detached(ttyp, 0); - } - return; - } - if (if_n == 1) { - if (*if_inbuff == '0') { - ttyp->ones = 0; - if (++ttyp->zeros >= 5) - slirp_exit(0); - return; - } - if (*if_inbuff == '1') { - ttyp->zeros = 0; - if (++ttyp->ones >= 5) - tty_detached(ttyp, 0); - return; - } - } - ttyp->ones = ttyp->zeros = 0; - - (*ttyp->if_input)(ttyp, if_inbuff, if_n); -} -#endif - -/* - * if_output: Queue packet into an output queue. - * There are 2 output queue's, if_fastq and if_batchq. - * Each output queue is a doubly linked list of double linked lists - * of mbufs, each list belonging to one "session" (socket). This - * way, we can output packets fairly by sending one packet from each - * session, instead of all the packets from one session, then all packets - * from the next session, etc. Packets on the if_fastq get absolute - * priority, but if one session hogs the link, it gets "downgraded" - * to the batchq until it runs out of packets, then it'll return - * to the fastq (eg. if the user does an ls -alR in a telnet session, - * it'll temporarily get downgraded to the batchq) - */ -void -if_output(so, ifm) - struct socket *so; - struct mbuf *ifm; -{ - struct mbuf *ifq; - int on_fastq = 1; - - DEBUG_CALL("if_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("ifm = %lx", (long)ifm); - - /* - * First remove the mbuf from m_usedlist, - * since we're gonna use m_next and m_prev ourselves - * XXX Shouldn't need this, gotta change dtom() etc. - */ - if (ifm->m_flags & M_USEDLIST) { - remque(ifm); - ifm->m_flags &= ~M_USEDLIST; - } - - /* - * See if there's already a batchq list for this session. - * This can include an interactive session, which should go on fastq, - * but gets too greedy... hence it'll be downgraded from fastq to batchq. - * We mustn't put this packet back on the fastq (or we'll send it out of order) - * XXX add cache here? - */ - for (ifq = if_batchq.ifq_prev; ifq != &if_batchq; ifq = ifq->ifq_prev) { - if (so == ifq->ifq_so) { - /* A match! */ - ifm->ifq_so = so; - ifs_insque(ifm, ifq->ifs_prev); - goto diddit; - } - } - - /* No match, check which queue to put it on */ - if (so && (so->so_iptos & IPTOS_LOWDELAY)) { - ifq = if_fastq.ifq_prev; - on_fastq = 1; - /* - * Check if this packet is a part of the last - * packet's session - */ - if (ifq->ifq_so == so) { - ifm->ifq_so = so; - ifs_insque(ifm, ifq->ifs_prev); - goto diddit; - } - } else - ifq = if_batchq.ifq_prev; - - /* Create a new doubly linked list for this session */ - ifm->ifq_so = so; - ifs_init(ifm); - insque(ifm, ifq); - -diddit: - ++if_queued; - - if (so) { - /* Update *_queued */ - so->so_queued++; - so->so_nqueued++; - /* - * Check if the interactive session should be downgraded to - * the batchq. A session is downgraded if it has queued 6 - * packets without pausing, and at least 3 of those packets - * have been sent over the link - * (XXX These are arbitrary numbers, probably not optimal..) - */ - if (on_fastq && ((so->so_nqueued >= 6) && - (so->so_nqueued - so->so_queued) >= 3)) { - - /* Remove from current queue... */ - remque(ifm->ifs_next); - - /* ...And insert in the new. That'll teach ya! */ - insque(ifm->ifs_next, &if_batchq); - } - } - -#ifndef FULL_BOLT - /* - * This prevents us from malloc()ing too many mbufs - */ - if (link_up) { - /* if_start will check towrite */ - if_start(); - } -#endif -} - -/* - * Send a packet - * We choose a packet based on it's position in the output queues; - * If there are packets on the fastq, they are sent FIFO, before - * everything else. Otherwise we choose the first packet from the - * batchq and send it. the next packet chosen will be from the session - * after this one, then the session after that one, and so on.. So, - * for example, if there are 3 ftp session's fighting for bandwidth, - * one packet will be sent from the first session, then one packet - * from the second session, then one packet from the third, then back - * to the first, etc. etc. - */ -void -if_start(void) -{ - struct mbuf *ifm, *ifqt; - - DEBUG_CALL("if_start"); - - if (if_queued == 0) - return; /* Nothing to do */ - - again: - /* check if we can really output */ - if (!slirp_can_output()) - return; - - /* - * See which queue to get next packet from - * If there's something in the fastq, select it immediately - */ - if (if_fastq.ifq_next != &if_fastq) { - ifm = if_fastq.ifq_next; - } else { - /* Nothing on fastq, see if next_m is valid */ - if (next_m != &if_batchq) - ifm = next_m; - else - ifm = if_batchq.ifq_next; - - /* Set which packet to send on next iteration */ - next_m = ifm->ifq_next; - } - /* Remove it from the queue */ - ifqt = ifm->ifq_prev; - remque(ifm); - --if_queued; - - /* If there are more packets for this session, re-queue them */ - if (ifm->ifs_next != /* ifm->ifs_prev != */ ifm) { - insque(ifm->ifs_next, ifqt); - ifs_remque(ifm); - } - - /* Update so_queued */ - if (ifm->ifq_so) { - if (--ifm->ifq_so->so_queued == 0) - /* If there's no more queued, reset nqueued */ - ifm->ifq_so->so_nqueued = 0; - } - - /* Encapsulate the packet for sending */ - if_encap((uint8_t*)ifm->m_data, ifm->m_len); - - m_free(ifm); - - if (if_queued) - goto again; -} diff --git a/SheepShaver/src/slirp/if.h b/SheepShaver/src/slirp/if.h deleted file mode 100755 index 5d96a9034..000000000 --- a/SheepShaver/src/slirp/if.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _IF_H_ -#define _IF_H_ - -#define IF_COMPRESS 0x01 /* We want compression */ -#define IF_NOCOMPRESS 0x02 /* Do not do compression */ -#define IF_AUTOCOMP 0x04 /* Autodetect (default) */ -#define IF_NOCIDCOMP 0x08 /* CID compression */ - -/* Needed for FreeBSD */ -#undef if_mtu -extern int if_mtu; -extern int if_mru; /* MTU and MRU */ -extern int if_comp; /* Flags for compression */ -extern int if_maxlinkhdr; -extern int if_queued; /* Number of packets queued so far */ -extern int if_thresh; /* Number of packets queued before we start sending - * (to prevent allocing too many mbufs) */ - -extern struct mbuf if_fastq; /* fast queue (for interactive data) */ -extern struct mbuf if_batchq; /* queue for non-interactive data */ -extern struct mbuf *next_m; - -#define ifs_init(ifm) ((ifm)->ifs_next = (ifm)->ifs_prev = (ifm)) - -/* Interface statistics */ -struct slirp_ifstats { - u_int out_pkts; /* Output packets */ - u_int out_bytes; /* Output bytes */ - u_int out_errpkts; /* Output Error Packets */ - u_int out_errbytes; /* Output Error Bytes */ - u_int in_pkts; /* Input packets */ - u_int in_bytes; /* Input bytes */ - u_int in_errpkts; /* Input Error Packets */ - u_int in_errbytes; /* Input Error Bytes */ - - u_int bytes_saved; /* Number of bytes that compression "saved" */ - /* ie: number of bytes that didn't need to be sent over the link - * because of compression */ - - u_int in_mbad; /* Bad incoming packets */ -}; - -#endif diff --git a/SheepShaver/src/slirp/ip.h b/SheepShaver/src/slirp/ip.h deleted file mode 100755 index 94dcc6063..000000000 --- a/SheepShaver/src/slirp/ip.h +++ /dev/null @@ -1,317 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip.h 8.1 (Berkeley) 6/10/93 - * ip.h,v 1.3 1994/08/21 05:27:30 paul Exp - */ - -#ifndef _IP_H_ -#define _IP_H_ - -#ifdef WORDS_BIGENDIAN -# ifndef NTOHL -# define NTOHL(d) -# endif -# ifndef NTOHS -# define NTOHS(d) -# endif -# ifndef HTONL -# define HTONL(d) -# endif -# ifndef HTONS -# define HTONS(d) -# endif -#else -# ifndef NTOHL -# define NTOHL(d) ((d) = ntohl((d))) -# endif -# ifndef NTOHS -# define NTOHS(d) ((d) = ntohs((u_int16_t)(d))) -# endif -# ifndef HTONL -# define HTONL(d) ((d) = htonl((d))) -# endif -# ifndef HTONS -# define HTONS(d) ((d) = htons((u_int16_t)(d))) -# endif -#endif - -typedef u_int32_t n_long; /* long as received from the net */ - -/* - * Definitions for internet protocol version 4. - * Per RFC 791, September 1981. - */ -#define IPVERSION 4 - -/* - * Structure of an internet header, naked of options. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ip { -#ifdef WORDS_BIGENDIAN - u_char ip_v:4, /* version */ - ip_hl:4; /* header length */ -#else - u_char ip_hl:4, /* header length */ - ip_v:4; /* version */ -#endif - u_int8_t ip_tos; /* type of service */ - u_int16_t ip_len; /* total length */ - u_int16_t ip_id; /* identification */ - u_int16_t ip_off; /* fragment offset field */ -#define IP_DF 0x4000 /* don't fragment flag */ -#define IP_MF 0x2000 /* more fragments flag */ -#define IP_OFFMASK 0x1fff /* mask for fragmenting bits */ - u_int8_t ip_ttl; /* time to live */ - u_int8_t ip_p; /* protocol */ - u_int16_t ip_sum; /* checksum */ - struct in_addr ip_src,ip_dst; /* source and dest address */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -#define IP_MAXPACKET 65535 /* maximum packet size */ - -/* - * Definitions for IP type of service (ip_tos) - */ -#define IPTOS_LOWDELAY 0x10 -#define IPTOS_THROUGHPUT 0x08 -#define IPTOS_RELIABILITY 0x04 - -/* - * Definitions for options. - */ -#define IPOPT_COPIED(o) ((o)&0x80) -#define IPOPT_CLASS(o) ((o)&0x60) -#define IPOPT_NUMBER(o) ((o)&0x1f) - -#define IPOPT_CONTROL 0x00 -#define IPOPT_RESERVED1 0x20 -#define IPOPT_DEBMEAS 0x40 -#define IPOPT_RESERVED2 0x60 - -#define IPOPT_EOL 0 /* end of option list */ -#define IPOPT_NOP 1 /* no operation */ - -#define IPOPT_RR 7 /* record packet route */ -#define IPOPT_TS 68 /* timestamp */ -#define IPOPT_SECURITY 130 /* provide s,c,h,tcc */ -#define IPOPT_LSRR 131 /* loose source route */ -#define IPOPT_SATID 136 /* satnet id */ -#define IPOPT_SSRR 137 /* strict source route */ - -/* - * Offsets to fields in options other than EOL and NOP. - */ -#define IPOPT_OPTVAL 0 /* option ID */ -#define IPOPT_OLEN 1 /* option length */ -#define IPOPT_OFFSET 2 /* offset within option */ -#define IPOPT_MINOFF 4 /* min value of above */ - -/* - * Time stamp option structure. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ip_timestamp { - u_int8_t ipt_code; /* IPOPT_TS */ - u_int8_t ipt_len; /* size of structure (variable) */ - u_int8_t ipt_ptr; /* index of current entry */ -#ifdef WORDS_BIGENDIAN - u_char ipt_oflw:4, /* overflow counter */ - ipt_flg:4; /* flags, see below */ -#else - u_char ipt_flg:4, /* flags, see below */ - ipt_oflw:4; /* overflow counter */ -#endif - union ipt_timestamp { - n_long ipt_time[1]; - struct ipt_ta { - struct in_addr ipt_addr; - n_long ipt_time; - } ipt_ta[1]; - } ipt_timestamp; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -/* flag bits for ipt_flg */ -#define IPOPT_TS_TSONLY 0 /* timestamps only */ -#define IPOPT_TS_TSANDADDR 1 /* timestamps and addresses */ -#define IPOPT_TS_PRESPEC 3 /* specified modules only */ - -/* bits for security (not byte swapped) */ -#define IPOPT_SECUR_UNCLASS 0x0000 -#define IPOPT_SECUR_CONFID 0xf135 -#define IPOPT_SECUR_EFTO 0x789a -#define IPOPT_SECUR_MMMM 0xbc4d -#define IPOPT_SECUR_RESTR 0xaf13 -#define IPOPT_SECUR_SECRET 0xd788 -#define IPOPT_SECUR_TOPSECRET 0x6bc5 - -/* - * Internet implementation parameters. - */ -#define MAXTTL 255 /* maximum time to live (seconds) */ -#define IPDEFTTL 64 /* default ttl, from RFC 1340 */ -#define IPFRAGTTL 60 /* time to live for frags, slowhz */ -#define IPTTLDEC 1 /* subtracted when forwarding */ - -#define IP_MSS 576 /* default maximum segment size */ - -#if SIZEOF_CHAR_P == 4 - struct mbuf_ptr { - struct mbuf *mptr; - uint32_t dummy; - }; -#else - struct mbuf_ptr { - struct mbuf *mptr; - }; -#endif -struct qlink { - void *next, *prev; -}; - -/* - * Overlay for ip header used by other protocols (tcp, udp). - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct ipovly { - struct mbuf_ptr ih_mbuf; /* backpointer to mbuf */ - u_int8_t ih_x1; /* (unused) */ - u_int8_t ih_pr; /* protocol */ - u_int16_t ih_len; /* protocol length */ - struct in_addr ih_src; /* source internet address */ - struct in_addr ih_dst; /* destination internet address */ -} __attribute__((packed)); - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -/* - * Ip reassembly queue structure. Each fragment - * being reassembled is attached to one of these structures. - * They are timed out after ipq_ttl drops to 0, and may also - * be reclaimed if memory becomes tight. - * size 28 bytes - */ -struct ipq { - struct qlink frag_link; /* to ip headers of fragments */ - struct qlink ip_link; /* to other reass headers */ - - u_int8_t ipq_ttl; /* time for reass q to live */ - u_int8_t ipq_p; /* protocol of this fragment */ - u_int16_t ipq_id; /* sequence id for reassembly */ - - struct in_addr ipq_src,ipq_dst; -}; - -/* - * Ip header, when holding a fragment. - * - * Note: ipf_next must be at same offset as ipq_next above - */ -struct ipasfrag { - struct qlink ipf_link; - struct ip ipf_ip; -}; - -#define ipf_off ipf_ip.ip_off -#define ipf_tos ipf_ip.ip_tos -#define ipf_len ipf_ip.ip_len -#define ipf_next ipf_link.next -#define ipf_prev ipf_link.prev - -/* - * Structure stored in mbuf in inpcb.ip_options - * and passed to ip_output when ip options are in use. - * The actual length of the options (including ipopt_dst) - * is in m_len. - */ -#define MAX_IPOPTLEN 40 - -struct ipoption { - struct in_addr ipopt_dst; /* first-hop dst if source routed */ - int8_t ipopt_list[MAX_IPOPTLEN]; /* options proper */ -}; - -/* - * Structure attached to inpcb.ip_moptions and - * passed to ip_output when IP multicast options are in use. - */ - -struct ipstat { - u_long ips_total; /* total packets received */ - u_long ips_badsum; /* checksum bad */ - u_long ips_tooshort; /* packet too short */ - u_long ips_toosmall; /* not enough data */ - u_long ips_badhlen; /* ip header length < data size */ - u_long ips_badlen; /* ip length < ip header length */ - u_long ips_fragments; /* fragments received */ - u_long ips_fragdropped; /* frags dropped (dups, out of space) */ - u_long ips_fragtimeout; /* fragments timed out */ - u_long ips_forward; /* packets forwarded */ - u_long ips_cantforward; /* packets rcvd for unreachable dest */ - u_long ips_redirectsent; /* packets forwarded on same net */ - u_long ips_noproto; /* unknown or unsupported protocol */ - u_long ips_delivered; /* datagrams delivered to upper level*/ - u_long ips_localout; /* total ip packets generated here */ - u_long ips_odropped; /* lost packets due to nobufs, etc. */ - u_long ips_reassembled; /* total packets reassembled ok */ - u_long ips_fragmented; /* datagrams successfully fragmented */ - u_long ips_ofragments; /* output fragments created */ - u_long ips_cantfrag; /* don't fragment flag was set, etc. */ - u_long ips_badoptions; /* error in option processing */ - u_long ips_noroute; /* packets discarded due to no route */ - u_long ips_badvers; /* ip version != 4 */ - u_long ips_rawout; /* total raw ip packets generated */ - u_long ips_unaligned; /* times the ip packet was not aligned */ -}; - -extern struct ipstat ipstat; -extern struct ipq ipq; /* ip reass. queue */ -extern u_int16_t ip_id; /* ip packet ctr, for ids */ -extern int ip_defttl; /* default IP ttl */ - -#endif diff --git a/SheepShaver/src/slirp/ip_icmp.c b/SheepShaver/src/slirp/ip_icmp.c deleted file mode 100755 index 7cbda7906..000000000 --- a/SheepShaver/src/slirp/ip_icmp.c +++ /dev/null @@ -1,371 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_icmp.c 8.2 (Berkeley) 1/4/94 - * ip_icmp.c,v 1.7 1995/05/30 08:09:42 rgrimes Exp - */ - -#include "slirp.h" -#include "ip_icmp.h" - -struct icmpstat icmpstat; - -/* The message sent when emulating PING */ -/* Be nice and tell them it's just a psuedo-ping packet */ -char icmp_ping_msg[] = "This is a psuedo-PING packet used by Slirp to emulate ICMP ECHO-REQUEST packets.\n"; - -/* list of actions for icmp_error() on RX of an icmp message */ -static int icmp_flush[19] = { -/* ECHO REPLY (0) */ 0, - 1, - 1, -/* DEST UNREACH (3) */ 1, -/* SOURCE QUENCH (4)*/ 1, -/* REDIRECT (5) */ 1, - 1, - 1, -/* ECHO (8) */ 0, -/* ROUTERADVERT (9) */ 1, -/* ROUTERSOLICIT (10) */ 1, -/* TIME EXCEEDED (11) */ 1, -/* PARAMETER PROBLEM (12) */ 1, -/* TIMESTAMP (13) */ 0, -/* TIMESTAMP REPLY (14) */ 0, -/* INFO (15) */ 0, -/* INFO REPLY (16) */ 0, -/* ADDR MASK (17) */ 0, -/* ADDR MASK REPLY (18) */ 0 -}; - -/* - * Process a received ICMP message. - */ -void -icmp_input(m, hlen) - struct mbuf *m; - int hlen; -{ - register struct icmp *icp; - register struct ip *ip=mtod(m, struct ip *); - int icmplen=ip->ip_len; - /* int code; */ - - DEBUG_CALL("icmp_input"); - DEBUG_ARG("m = %lx", (long )m); - DEBUG_ARG("m_len = %d", m->m_len); - - icmpstat.icps_received++; - - /* - * Locate icmp structure in mbuf, and check - * that its not corrupted and of at least minimum length. - */ - if (icmplen < ICMP_MINLEN) { /* min 8 bytes payload */ - icmpstat.icps_tooshort++; - freeit: - m_freem(m); - goto end_error; - } - - m->m_len -= hlen; - m->m_data += hlen; - icp = mtod(m, struct icmp *); - if (cksum(m, icmplen)) { - icmpstat.icps_checksum++; - goto freeit; - } - m->m_len += hlen; - m->m_data -= hlen; - - /* icmpstat.icps_inhist[icp->icmp_type]++; */ - /* code = icp->icmp_code; */ - - DEBUG_ARG("icmp_type = %d", icp->icmp_type); - switch (icp->icmp_type) { - case ICMP_ECHO: - icp->icmp_type = ICMP_ECHOREPLY; - ip->ip_len += hlen; /* since ip_input subtracts this */ - if (ip->ip_dst.s_addr == alias_addr.s_addr) { - icmp_reflect(m); - } else { - struct socket *so; - struct sockaddr_in addr; - if ((so = socreate()) == NULL) goto freeit; - if(udp_attach(so) == -1) { - DEBUG_MISC((dfd,"icmp_input udp_attach errno = %d-%s\n", - errno,strerror(errno))); - sofree(so); - m_free(m); - goto end_error; - } - so->so_m = m; - so->so_faddr = ip->ip_dst; - so->so_fport = htons(7); - so->so_laddr = ip->ip_src; - so->so_lport = htons(9); - so->so_iptos = ip->ip_tos; - so->so_type = IPPROTO_ICMP; - so->so_state = SS_ISFCONNECTED; - - /* Send the packet */ - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else { - addr.sin_addr = so->so_faddr; - } - addr.sin_port = so->so_fport; - if(sendto(so->s, icmp_ping_msg, strlen(icmp_ping_msg), 0, - (struct sockaddr *)&addr, sizeof(addr)) == -1) { - DEBUG_MISC((dfd,"icmp_input udp sendto tx errno = %d-%s\n", - errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); - udp_detach(so); - } - } /* if ip->ip_dst.s_addr == alias_addr.s_addr */ - break; - case ICMP_UNREACH: - /* XXX? report error? close socket? */ - case ICMP_TIMXCEED: - case ICMP_PARAMPROB: - case ICMP_SOURCEQUENCH: - case ICMP_TSTAMP: - case ICMP_MASKREQ: - case ICMP_REDIRECT: - icmpstat.icps_notsupp++; - m_freem(m); - break; - - default: - icmpstat.icps_badtype++; - m_freem(m); - } /* swith */ - -end_error: - /* m is m_free()'d xor put in a socket xor or given to ip_send */ - return; -} - - -/* - * Send an ICMP message in response to a situation - * - * RFC 1122: 3.2.2 MUST send at least the IP header and 8 bytes of header. MAY send more (we do). - * MUST NOT change this header information. - * MUST NOT reply to a multicast/broadcast IP address. - * MUST NOT reply to a multicast/broadcast MAC address. - * MUST reply to only the first fragment. - */ -/* - * Send ICMP_UNREACH back to the source regarding msrc. - * mbuf *msrc is used as a template, but is NOT m_free()'d. - * It is reported as the bad ip packet. The header should - * be fully correct and in host byte order. - * ICMP fragmentation is illegal. All machines must accept 576 bytes in one - * packet. The maximum payload is 576-20(ip hdr)-8(icmp hdr)=548 - */ - -#define ICMP_MAXDATALEN (IP_MSS-28) -void -icmp_error(msrc, type, code, minsize, message) - struct mbuf *msrc; - u_char type; - u_char code; - int minsize; - char *message; -{ - unsigned hlen, shlen, s_ip_len; - register struct ip *ip; - register struct icmp *icp; - register struct mbuf *m; - - DEBUG_CALL("icmp_error"); - DEBUG_ARG("msrc = %lx", (long )msrc); - DEBUG_ARG("msrc_len = %d", msrc->m_len); - - if(type!=ICMP_UNREACH && type!=ICMP_TIMXCEED) goto end_error; - - /* check msrc */ - if(!msrc) goto end_error; - ip = mtod(msrc, struct ip *); -#if DEBUG - { char bufa[20], bufb[20]; - strcpy(bufa, inet_ntoa(ip->ip_src)); - strcpy(bufb, inet_ntoa(ip->ip_dst)); - DEBUG_MISC((dfd, " %.16s to %.16s\n", bufa, bufb)); - } -#endif - if(ip->ip_off & IP_OFFMASK) goto end_error; /* Only reply to fragment 0 */ - - shlen=ip->ip_hl << 2; - s_ip_len=ip->ip_len; - if(ip->ip_p == IPPROTO_ICMP) { - icp = (struct icmp *)((char *)ip + shlen); - /* - * Assume any unknown ICMP type is an error. This isn't - * specified by the RFC, but think about it.. - */ - if(icp->icmp_type>18 || icmp_flush[icp->icmp_type]) goto end_error; - } - - /* make a copy */ - if(!(m=m_get())) goto end_error; /* get mbuf */ - { int new_m_size; - new_m_size=sizeof(struct ip )+ICMP_MINLEN+msrc->m_len+ICMP_MAXDATALEN; - if(new_m_size>m->m_size) m_inc(m, new_m_size); - } - memcpy(m->m_data, msrc->m_data, msrc->m_len); - m->m_len = msrc->m_len; /* copy msrc to m */ - - /* make the header of the reply packet */ - ip = mtod(m, struct ip *); - hlen= sizeof(struct ip ); /* no options in reply */ - - /* fill in icmp */ - m->m_data += hlen; - m->m_len -= hlen; - - icp = mtod(m, struct icmp *); - - if(minsize) s_ip_len=shlen+ICMP_MINLEN; /* return header+8b only */ - else if(s_ip_len>ICMP_MAXDATALEN) /* maximum size */ - s_ip_len=ICMP_MAXDATALEN; - - m->m_len=ICMP_MINLEN+s_ip_len; /* 8 bytes ICMP header */ - - /* min. size = 8+sizeof(struct ip)+8 */ - - icp->icmp_type = type; - icp->icmp_code = code; - icp->icmp_id = 0; - icp->icmp_seq = 0; - - memcpy(&icp->icmp_ip, msrc->m_data, s_ip_len); /* report the ip packet */ - HTONS(icp->icmp_ip.ip_len); - HTONS(icp->icmp_ip.ip_id); - HTONS(icp->icmp_ip.ip_off); - -#if DEBUG - if(message) { /* DEBUG : append message to ICMP packet */ - int message_len; - char *cpnt; - message_len=strlen(message); - if(message_len>ICMP_MAXDATALEN) message_len=ICMP_MAXDATALEN; - cpnt=(char *)m->m_data+m->m_len; - memcpy(cpnt, message, message_len); - m->m_len+=message_len; - } -#endif - - icp->icmp_cksum = 0; - icp->icmp_cksum = cksum(m, m->m_len); - - m->m_data -= hlen; - m->m_len += hlen; - - /* fill in ip */ - ip->ip_hl = hlen >> 2; - ip->ip_len = m->m_len; - - ip->ip_tos=((ip->ip_tos & 0x1E) | 0xC0); /* high priority for errors */ - - ip->ip_ttl = MAXTTL; - ip->ip_p = IPPROTO_ICMP; - ip->ip_dst = ip->ip_src; /* ip adresses */ - ip->ip_src = alias_addr; - - (void ) ip_output((struct socket *)NULL, m); - - icmpstat.icps_reflect++; - -end_error: - return; -} -#undef ICMP_MAXDATALEN - -/* - * Reflect the ip packet back to the source - */ -void -icmp_reflect(m) - struct mbuf *m; -{ - register struct ip *ip = mtod(m, struct ip *); - int hlen = ip->ip_hl << 2; - int optlen = hlen - sizeof(struct ip ); - register struct icmp *icp; - - /* - * Send an icmp packet back to the ip level, - * after supplying a checksum. - */ - m->m_data += hlen; - m->m_len -= hlen; - icp = mtod(m, struct icmp *); - - icp->icmp_cksum = 0; - icp->icmp_cksum = cksum(m, ip->ip_len - hlen); - - m->m_data -= hlen; - m->m_len += hlen; - - /* fill in ip */ - if (optlen > 0) { - /* - * Strip out original options by copying rest of first - * mbuf's data back, and adjust the IP length. - */ - memmove((caddr_t)(ip + 1), (caddr_t)ip + hlen, - (unsigned )(m->m_len - hlen)); - hlen -= optlen; - ip->ip_hl = hlen >> 2; - ip->ip_len -= optlen; - m->m_len -= optlen; - } - - ip->ip_ttl = MAXTTL; - { /* swap */ - struct in_addr icmp_dst; - icmp_dst = ip->ip_dst; - ip->ip_dst = ip->ip_src; - ip->ip_src = icmp_dst; - } - - (void ) ip_output((struct socket *)NULL, m); - - icmpstat.icps_reflect++; -} diff --git a/SheepShaver/src/slirp/ip_icmp.h b/SheepShaver/src/slirp/ip_icmp.h deleted file mode 100755 index 6968daa71..000000000 --- a/SheepShaver/src/slirp/ip_icmp.h +++ /dev/null @@ -1,168 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_icmp.h 8.1 (Berkeley) 6/10/93 - * ip_icmp.h,v 1.4 1995/05/30 08:09:43 rgrimes Exp - */ - -#ifndef _NETINET_IP_ICMP_H_ -#define _NETINET_IP_ICMP_H_ - -/* - * Interface Control Message Protocol Definitions. - * Per RFC 792, September 1981. - */ - -typedef u_int32_t n_time; - -/* - * Structure of an icmp header. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct icmp { - u_char icmp_type; /* type of message, see below */ - u_char icmp_code; /* type sub code */ - u_short icmp_cksum; /* ones complement cksum of struct */ - union { - u_char ih_pptr; /* ICMP_PARAMPROB */ - struct in_addr ih_gwaddr; /* ICMP_REDIRECT */ - struct ih_idseq { - u_short icd_id; - u_short icd_seq; - } ih_idseq; - int ih_void; - - /* ICMP_UNREACH_NEEDFRAG -- Path MTU Discovery (RFC1191) */ - struct ih_pmtu { - u_short ipm_void; - u_short ipm_nextmtu; - } ih_pmtu; - } icmp_hun; -#define icmp_pptr icmp_hun.ih_pptr -#define icmp_gwaddr icmp_hun.ih_gwaddr -#define icmp_id icmp_hun.ih_idseq.icd_id -#define icmp_seq icmp_hun.ih_idseq.icd_seq -#define icmp_void icmp_hun.ih_void -#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void -#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu - union { - struct id_ts { - n_time its_otime; - n_time its_rtime; - n_time its_ttime; - } id_ts; - struct id_ip { - struct ip idi_ip; - /* options and then 64 bits of data */ - } id_ip; - uint32_t id_mask; - char id_data[1]; - } icmp_dun; -#define icmp_otime icmp_dun.id_ts.its_otime -#define icmp_rtime icmp_dun.id_ts.its_rtime -#define icmp_ttime icmp_dun.id_ts.its_ttime -#define icmp_ip icmp_dun.id_ip.idi_ip -#define icmp_mask icmp_dun.id_mask -#define icmp_data icmp_dun.id_data -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -/* - * Lower bounds on packet lengths for various types. - * For the error advice packets must first insure that the - * packet is large enought to contain the returned ip header. - * Only then can we do the check to see if 64 bits of packet - * data have been returned, since we need to check the returned - * ip header length. - */ -#define ICMP_MINLEN 8 /* abs minimum */ -#define ICMP_TSLEN (8 + 3 * sizeof (n_time)) /* timestamp */ -#define ICMP_MASKLEN 12 /* address mask */ -#define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8) /* min */ -#define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8) - /* N.B.: must separately check that ip_hl >= 5 */ - -/* - * Definition of type and code field values. - */ -#define ICMP_ECHOREPLY 0 /* echo reply */ -#define ICMP_UNREACH 3 /* dest unreachable, codes: */ -#define ICMP_UNREACH_NET 0 /* bad net */ -#define ICMP_UNREACH_HOST 1 /* bad host */ -#define ICMP_UNREACH_PROTOCOL 2 /* bad protocol */ -#define ICMP_UNREACH_PORT 3 /* bad port */ -#define ICMP_UNREACH_NEEDFRAG 4 /* IP_DF caused drop */ -#define ICMP_UNREACH_SRCFAIL 5 /* src route failed */ -#define ICMP_UNREACH_NET_UNKNOWN 6 /* unknown net */ -#define ICMP_UNREACH_HOST_UNKNOWN 7 /* unknown host */ -#define ICMP_UNREACH_ISOLATED 8 /* src host isolated */ -#define ICMP_UNREACH_NET_PROHIB 9 /* prohibited access */ -#define ICMP_UNREACH_HOST_PROHIB 10 /* ditto */ -#define ICMP_UNREACH_TOSNET 11 /* bad tos for net */ -#define ICMP_UNREACH_TOSHOST 12 /* bad tos for host */ -#define ICMP_SOURCEQUENCH 4 /* packet lost, slow down */ -#define ICMP_REDIRECT 5 /* shorter route, codes: */ -#define ICMP_REDIRECT_NET 0 /* for network */ -#define ICMP_REDIRECT_HOST 1 /* for host */ -#define ICMP_REDIRECT_TOSNET 2 /* for tos and net */ -#define ICMP_REDIRECT_TOSHOST 3 /* for tos and host */ -#define ICMP_ECHO 8 /* echo service */ -#define ICMP_ROUTERADVERT 9 /* router advertisement */ -#define ICMP_ROUTERSOLICIT 10 /* router solicitation */ -#define ICMP_TIMXCEED 11 /* time exceeded, code: */ -#define ICMP_TIMXCEED_INTRANS 0 /* ttl==0 in transit */ -#define ICMP_TIMXCEED_REASS 1 /* ttl==0 in reass */ -#define ICMP_PARAMPROB 12 /* ip header bad */ -#define ICMP_PARAMPROB_OPTABSENT 1 /* req. opt. absent */ -#define ICMP_TSTAMP 13 /* timestamp request */ -#define ICMP_TSTAMPREPLY 14 /* timestamp reply */ -#define ICMP_IREQ 15 /* information request */ -#define ICMP_IREQREPLY 16 /* information reply */ -#define ICMP_MASKREQ 17 /* address mask request */ -#define ICMP_MASKREPLY 18 /* address mask reply */ - -#define ICMP_MAXTYPE 18 - -#define ICMP_INFOTYPE(type) \ - ((type) == ICMP_ECHOREPLY || (type) == ICMP_ECHO || \ - (type) == ICMP_ROUTERADVERT || (type) == ICMP_ROUTERSOLICIT || \ - (type) == ICMP_TSTAMP || (type) == ICMP_TSTAMPREPLY || \ - (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ - (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) - -void icmp_input _P((struct mbuf *, int)); -void icmp_error _P((struct mbuf *, u_char, u_char, int, char *)); -void icmp_reflect _P((struct mbuf *)); - -#endif diff --git a/SheepShaver/src/slirp/ip_input.c b/SheepShaver/src/slirp/ip_input.c deleted file mode 100755 index 7c995c98d..000000000 --- a/SheepShaver/src/slirp/ip_input.c +++ /dev/null @@ -1,705 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_input.c 8.2 (Berkeley) 1/4/94 - * ip_input.c,v 1.11 1994/11/16 10:17:08 jkh Exp - */ - -/* - * Changes and additions relating to SLiRP are - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include -#include -#include - -#define container_of(ptr, type, member) ({ \ - const typeof(((type *) 0)->member) *__mptr = (ptr); \ - (type *) ((char *) __mptr - offsetof(type, member));}) - - -#include -#include "ip_icmp.h" - -int ip_defttl; -struct ipstat ipstat; -struct ipq ipq; - -/* - * IP initialization: fill in IP protocol switch table. - * All protocols not implemented in kernel go to raw IP protocol handler. - */ -void -ip_init() -{ - ipq.ip_link.next = ipq.ip_link.prev = &ipq.ip_link; - ip_id = tt.tv_sec & 0xffff; - udp_init(); - tcp_init(); - ip_defttl = IPDEFTTL; -} - -/* - * Ip input routine. Checksum and byte swap header. If fragmented - * try to reassemble. Process options. Pass to next level. - */ -void -ip_input(m) - struct mbuf *m; -{ - register struct ip *ip; - int hlen; - - DEBUG_CALL("ip_input"); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m_len = %d", m->m_len); - - ipstat.ips_total++; - - if (m->m_len < sizeof (struct ip)) { - ipstat.ips_toosmall++; - return; - } - - ip = mtod(m, struct ip *); - - if (ip->ip_v != IPVERSION) { - ipstat.ips_badvers++; - goto bad; - } - - hlen = ip->ip_hl << 2; - if (hlenm->m_len) {/* min header length */ - ipstat.ips_badhlen++; /* or packet too short */ - goto bad; - } - - /* keep ip header intact for ICMP reply - * ip->ip_sum = cksum(m, hlen); - * if (ip->ip_sum) { - */ - if(cksum(m,hlen)) { - ipstat.ips_badsum++; - goto bad; - } - - /* - * Convert fields to host representation. - */ - NTOHS(ip->ip_len); - if (ip->ip_len < hlen) { - ipstat.ips_badlen++; - goto bad; - } - NTOHS(ip->ip_id); - NTOHS(ip->ip_off); - - /* - * Check that the amount of data in the buffers - * is as at least much as the IP header would have us expect. - * Trim mbufs if longer than we expect. - * Drop packet if shorter than we expect. - */ - if (m->m_len < ip->ip_len) { - ipstat.ips_tooshort++; - goto bad; - } - /* Should drop packet if mbuf too long? hmmm... */ - if (m->m_len > ip->ip_len) - m_adj(m, ip->ip_len - m->m_len); - - /* check ip_ttl for a correct ICMP reply */ - if(ip->ip_ttl==0 || ip->ip_ttl==1) { - icmp_error(m, ICMP_TIMXCEED,ICMP_TIMXCEED_INTRANS, 0,"ttl"); - goto bad; - } - - /* - * Process options and, if not destined for us, - * ship it on. ip_dooptions returns 1 when an - * error was detected (causing an icmp message - * to be sent and the original packet to be freed). - */ -/* We do no IP options */ -/* if (hlen > sizeof (struct ip) && ip_dooptions(m)) - * goto next; - */ - /* - * If offset or IP_MF are set, must reassemble. - * Otherwise, nothing need be done. - * (We could look in the reassembly queue to see - * if the packet was previously fragmented, - * but it's not worth the time; just let them time out.) - * - * XXX This should fail, don't fragment yet - */ - if (ip->ip_off &~ IP_DF) { - register struct ipq *fp; - struct qlink *l; - /* - * Look for queue of fragments - * of this datagram. - */ - for (l = ipq.ip_link.next; l != &ipq.ip_link; l = l->next) { - fp = container_of(l, struct ipq, ip_link); - if (ip->ip_id == fp->ipq_id && - ip->ip_src.s_addr == fp->ipq_src.s_addr && - ip->ip_dst.s_addr == fp->ipq_dst.s_addr && - ip->ip_p == fp->ipq_p) - goto found; - } - fp = NULL; - found: - - /* - * Adjust ip_len to not reflect header, - * set ip_mff if more fragments are expected, - * convert offset of this to bytes. - */ - ip->ip_len -= hlen; - if (ip->ip_off & IP_MF) - ip->ip_tos |= 1; - else - ip->ip_tos &= ~1; - - ip->ip_off <<= 3; - - /* - * If datagram marked as having more fragments - * or if this is not the first fragment, - * attempt reassembly; if it succeeds, proceed. - */ - if (ip->ip_tos & 1 || ip->ip_off) { - ipstat.ips_fragments++; - ip = ip_reass(ip, fp); - if (ip == 0) - return; - ipstat.ips_reassembled++; - m = dtom(ip); - } else - if (fp) - ip_freef(fp); - - } else - ip->ip_len -= hlen; - - /* - * Switch out to protocol's input routine. - */ - ipstat.ips_delivered++; - switch (ip->ip_p) { - case IPPROTO_TCP: - tcp_input(m, hlen, (struct socket *)NULL); - break; - case IPPROTO_UDP: - udp_input(m, hlen); - break; - case IPPROTO_ICMP: - icmp_input(m, hlen); - break; - default: - ipstat.ips_noproto++; - m_free(m); - } - return; -bad: - m_freem(m); - return; -} - -#define iptofrag(P) ((struct ipasfrag *)(((char*)(P)) - sizeof(struct qlink))) -#define fragtoip(P) ((struct ip*)(((char*)(P)) + sizeof(struct qlink))) -/* - * Take incoming datagram fragment and try to - * reassemble it into whole datagram. If a chain for - * reassembly of this datagram already exists, then it - * is given as fp; otherwise have to make a chain. - */ -static struct ip * -ip_reass(register struct ip *ip, register struct ipq *fp) -{ - register struct mbuf *m = dtom(ip); - register struct ipasfrag *q; - int hlen = ip->ip_hl << 2; - u_int16_t i, next; - - DEBUG_CALL("ip_reass"); - DEBUG_ARG("ip = %lx", (long)ip); - DEBUG_ARG("fp = %lx", (long)fp); - DEBUG_ARG("m = %lx", (long)m); - - /* - * Presence of header sizes in mbufs - * would confuse code below. - * Fragment m_data is concatenated. - */ - m->m_data += hlen; - m->m_len -= hlen; - - /* - * If first fragment to arrive, create a reassembly queue. - */ - if (fp == 0) { - struct mbuf *t; - if ((t = m_get()) == NULL) goto dropfrag; - fp = mtod(t, struct ipq *); - insque(&fp->ip_link, &ipq.ip_link); - fp->ipq_ttl = IPFRAGTTL; - fp->ipq_p = ip->ip_p; - fp->ipq_id = ip->ip_id; - fp->frag_link.next = fp->frag_link.prev = &fp->frag_link; - fp->ipq_src = ip->ip_src; - fp->ipq_dst = ip->ip_dst; - q = (struct ipasfrag *)fp; - goto insert; - } - - /* - * Find a segment which begins after this one does. - */ - for (q = fp->frag_link.next; q != (struct ipasfrag *)&fp->frag_link; - q = q->ipf_next) - if (q->ipf_off > ip->ip_off) - break; - - /* - * If there is a preceding segment, it may provide some of - * our data already. If so, drop the data from the incoming - * segment. If it provides all of our data, drop us. - */ - if (q->ipf_prev != &fp->frag_link) { - struct ipasfrag *pq = q->ipf_prev; - i = pq->ipf_off + pq->ipf_len - ip->ip_off; - if (i > 0) { - if (i >= ip->ip_len) - goto dropfrag; - m_adj(dtom(ip), i); - ip->ip_off += i; - ip->ip_len -= i; - } - } - - /* - * While we overlap succeeding segments trim them or, - * if they are completely covered, dequeue them. - */ - while (q != (struct ipasfrag*)&fp->frag_link && - ip->ip_off + ip->ip_len > q->ipf_off) { - i = (ip->ip_off + ip->ip_len) - q->ipf_off; - if (i < q->ipf_len) { - q->ipf_len -= i; - q->ipf_off += i; - m_adj(dtom(q), i); - break; - } - q = q->ipf_next; - m_freem(dtom(q->ipf_prev)); - ip_deq(q->ipf_prev); - } - -insert: - /* - * Stick new segment in its place; - * check for complete reassembly. - */ - ip_enq(iptofrag(ip), q->ipf_prev); - next = 0; - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; - q = q->ipf_next) { - if (q->ipf_off != next) - return (0); - next += q->ipf_len; - } - if (((struct ipasfrag *)(q->ipf_prev))->ipf_tos & 1) - return (0); - - /* - * Reassembly is complete; concatenate fragments. - */ - q = fp->frag_link.next; - m = dtom(q); - - q = (struct ipasfrag *) q->ipf_next; - while (q != (struct ipasfrag*)&fp->frag_link) { - struct mbuf *t = dtom(q); - q = (struct ipasfrag *) q->ipf_next; - m_cat(m, t); - } - - /* - * Create header for new ip packet by - * modifying header of first packet; - * dequeue and discard fragment reassembly header. - * Make header visible. - */ - q = fp->frag_link.next; - - /* - * If the fragments concatenated to an mbuf that's - * bigger than the total size of the fragment, then and - * m_ext buffer was alloced. But fp->ipq_next points to - * the old buffer (in the mbuf), so we must point ip - * into the new buffer. - */ - if (m->m_flags & M_EXT) { - int delta; - delta = (char *)q - m->m_dat; - q = (struct ipasfrag *)(m->m_ext + delta); - } - - /* DEBUG_ARG("ip = %lx", (long)ip); - * ip=(struct ipasfrag *)m->m_data; */ - - ip = fragtoip(q); - ip->ip_len = next; - ip->ip_tos &= ~1; - ip->ip_src = fp->ipq_src; - ip->ip_dst = fp->ipq_dst; - remque(&fp->ip_link); - (void) m_free(dtom(fp)); - m->m_len += (ip->ip_hl << 2); - m->m_data -= (ip->ip_hl << 2); - - return ip; - -dropfrag: - ipstat.ips_fragdropped++; - m_freem(m); - return (0); -} - -/* - * Free a fragment reassembly header and all - * associated datagrams. - */ -void -ip_freef(fp) - struct ipq *fp; -{ - register struct ipasfrag *q, *p; - - for (q = fp->frag_link.next; q != (struct ipasfrag*)&fp->frag_link; q = p) { - p = q->ipf_next; - ip_deq(q); - m_freem(dtom(q)); - } - remque(&fp->ip_link); - (void) m_free(dtom(fp)); -} - -/* - * Put an ip fragment on a reassembly chain. - * Like insque, but pointers in middle of structure. - */ -void -ip_enq(p, prev) - register struct ipasfrag *p, *prev; -{ - DEBUG_CALL("ip_enq"); - DEBUG_ARG("prev = %lx", (long)prev); - p->ipf_prev = prev; - p->ipf_next = prev->ipf_next; - ((struct ipasfrag *)(prev->ipf_next))->ipf_prev = p; - prev->ipf_next = p; -} - -/* - * To ip_enq as remque is to insque. - */ -void -ip_deq(p) - register struct ipasfrag *p; -{ - ((struct ipasfrag *)(p->ipf_prev))->ipf_next = p->ipf_next; - ((struct ipasfrag *)(p->ipf_next))->ipf_prev = p->ipf_prev; -} - -/* - * IP timer processing; - * if a timer expires on a reassembly - * queue, discard it. - */ -void -ip_slowtimo() -{ - struct qlink *l; - - DEBUG_CALL("ip_slowtimo"); - - l = ipq.ip_link.next; - - if (l == 0) - return; - - while (l != &ipq.ip_link) { - struct ipq *fp = container_of(l, struct ipq, ip_link); - l = l->next; - if (--fp->ipq_ttl == 0) { - ipstat.ips_fragtimeout++; - ip_freef(fp); - } - } -} - -/* - * Do option processing on a datagram, - * possibly discarding it if bad options are encountered, - * or forwarding it if source-routed. - * Returns 1 if packet has been forwarded/freed, - * 0 if the packet should be processed further. - */ - -#ifdef notdef - -int -ip_dooptions(m) - struct mbuf *m; -{ - register struct ip *ip = mtod(m, struct ip *); - register u_char *cp; - register struct ip_timestamp *ipt; - register struct in_ifaddr *ia; -/* int opt, optlen, cnt, off, code, type = ICMP_PARAMPROB, forward = 0; */ - int opt, optlen, cnt, off, code, type, forward = 0; - struct in_addr *sin, dst; -typedef u_int32_t n_time; - n_time ntime; - - dst = ip->ip_dst; - cp = (u_char *)(ip + 1); - cnt = (ip->ip_hl << 2) - sizeof (struct ip); - for (; cnt > 0; cnt -= optlen, cp += optlen) { - opt = cp[IPOPT_OPTVAL]; - if (opt == IPOPT_EOL) - break; - if (opt == IPOPT_NOP) - optlen = 1; - else { - optlen = cp[IPOPT_OLEN]; - if (optlen <= 0 || optlen > cnt) { - code = &cp[IPOPT_OLEN] - (u_char *)ip; - goto bad; - } - } - switch (opt) { - - default: - break; - - /* - * Source routing with record. - * Find interface with current destination address. - * If none on this machine then drop if strictly routed, - * or do nothing if loosely routed. - * Record interface address and bring up next address - * component. If strictly routed make sure next - * address is on directly accessible net. - */ - case IPOPT_LSRR: - case IPOPT_SSRR: - if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { - code = &cp[IPOPT_OFFSET] - (u_char *)ip; - goto bad; - } - ipaddr.sin_addr = ip->ip_dst; - ia = (struct in_ifaddr *) - ifa_ifwithaddr((struct sockaddr *)&ipaddr); - if (ia == 0) { - if (opt == IPOPT_SSRR) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_SRCFAIL; - goto bad; - } - /* - * Loose routing, and not at next destination - * yet; nothing to do except forward. - */ - break; - } - off--; / * 0 origin * / - if (off > optlen - sizeof(struct in_addr)) { - /* - * End of source route. Should be for us. - */ - save_rte(cp, ip->ip_src); - break; - } - /* - * locate outgoing interface - */ - bcopy((caddr_t)(cp + off), (caddr_t)&ipaddr.sin_addr, - sizeof(ipaddr.sin_addr)); - if (opt == IPOPT_SSRR) { -#define INA struct in_ifaddr * -#define SA struct sockaddr * - if ((ia = (INA)ifa_ifwithdstaddr((SA)&ipaddr)) == 0) - ia = (INA)ifa_ifwithnet((SA)&ipaddr); - } else - ia = ip_rtaddr(ipaddr.sin_addr); - if (ia == 0) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_SRCFAIL; - goto bad; - } - ip->ip_dst = ipaddr.sin_addr; - bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), - (caddr_t)(cp + off), sizeof(struct in_addr)); - cp[IPOPT_OFFSET] += sizeof(struct in_addr); - /* - * Let ip_intr's mcast routing check handle mcast pkts - */ - forward = !IN_MULTICAST(ntohl(ip->ip_dst.s_addr)); - break; - - case IPOPT_RR: - if ((off = cp[IPOPT_OFFSET]) < IPOPT_MINOFF) { - code = &cp[IPOPT_OFFSET] - (u_char *)ip; - goto bad; - } - /* - * If no space remains, ignore. - */ - off--; * 0 origin * - if (off > optlen - sizeof(struct in_addr)) - break; - bcopy((caddr_t)(&ip->ip_dst), (caddr_t)&ipaddr.sin_addr, - sizeof(ipaddr.sin_addr)); - /* - * locate outgoing interface; if we're the destination, - * use the incoming interface (should be same). - */ - if ((ia = (INA)ifa_ifwithaddr((SA)&ipaddr)) == 0 && - (ia = ip_rtaddr(ipaddr.sin_addr)) == 0) { - type = ICMP_UNREACH; - code = ICMP_UNREACH_HOST; - goto bad; - } - bcopy((caddr_t)&(IA_SIN(ia)->sin_addr), - (caddr_t)(cp + off), sizeof(struct in_addr)); - cp[IPOPT_OFFSET] += sizeof(struct in_addr); - break; - - case IPOPT_TS: - code = cp - (u_char *)ip; - ipt = (struct ip_timestamp *)cp; - if (ipt->ipt_len < 5) - goto bad; - if (ipt->ipt_ptr > ipt->ipt_len - sizeof (int32_t)) { - if (++ipt->ipt_oflw == 0) - goto bad; - break; - } - sin = (struct in_addr *)(cp + ipt->ipt_ptr - 1); - switch (ipt->ipt_flg) { - - case IPOPT_TS_TSONLY: - break; - - case IPOPT_TS_TSANDADDR: - if (ipt->ipt_ptr + sizeof(n_time) + - sizeof(struct in_addr) > ipt->ipt_len) - goto bad; - ipaddr.sin_addr = dst; - ia = (INA)ifaof_ i f p foraddr((SA)&ipaddr, - m->m_pkthdr.rcvif); - if (ia == 0) - continue; - bcopy((caddr_t)&IA_SIN(ia)->sin_addr, - (caddr_t)sin, sizeof(struct in_addr)); - ipt->ipt_ptr += sizeof(struct in_addr); - break; - - case IPOPT_TS_PRESPEC: - if (ipt->ipt_ptr + sizeof(n_time) + - sizeof(struct in_addr) > ipt->ipt_len) - goto bad; - bcopy((caddr_t)sin, (caddr_t)&ipaddr.sin_addr, - sizeof(struct in_addr)); - if (ifa_ifwithaddr((SA)&ipaddr) == 0) - continue; - ipt->ipt_ptr += sizeof(struct in_addr); - break; - - default: - goto bad; - } - ntime = iptime(); - bcopy((caddr_t)&ntime, (caddr_t)cp + ipt->ipt_ptr - 1, - sizeof(n_time)); - ipt->ipt_ptr += sizeof(n_time); - } - } - if (forward) { - ip_forward(m, 1); - return (1); - } - } - } - return (0); -bad: - /* ip->ip_len -= ip->ip_hl << 2; XXX icmp_error adds in hdr length */ - -/* Not yet */ - icmp_error(m, type, code, 0, 0); - - ipstat.ips_badoptions++; - return (1); -} - -#endif /* notdef */ - -/* - * Strip out IP options, at higher - * level protocol in the kernel. - * Second argument is buffer to which options - * will be moved, and return value is their length. - * (XXX) should be deleted; last arg currently ignored. - */ -void -ip_stripoptions(m, mopt) - register struct mbuf *m; - struct mbuf *mopt; -{ - register int i; - struct ip *ip = mtod(m, struct ip *); - register caddr_t opts; - int olen; - - olen = (ip->ip_hl<<2) - sizeof (struct ip); - opts = (caddr_t)(ip + 1); - i = m->m_len - (sizeof (struct ip) + olen); - memcpy(opts, opts + olen, (unsigned)i); - m->m_len -= olen; - - ip->ip_hl = sizeof(struct ip) >> 2; -} diff --git a/SheepShaver/src/slirp/ip_output.c b/SheepShaver/src/slirp/ip_output.c deleted file mode 100755 index 0d1ae1b2c..000000000 --- a/SheepShaver/src/slirp/ip_output.c +++ /dev/null @@ -1,201 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)ip_output.c 8.3 (Berkeley) 1/21/94 - * ip_output.c,v 1.9 1994/11/16 10:17:10 jkh Exp - */ - -/* - * Changes and additions relating to SLiRP are - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -u_int16_t ip_id; - -/* - * IP output. The packet in mbuf chain m contains a skeletal IP - * header (with len, off, ttl, proto, tos, src, dst). - * The mbuf chain containing the packet will be freed. - * The mbuf opt, if present, will not be freed. - */ -int -ip_output(so, m0) - struct socket *so; - struct mbuf *m0; -{ - register struct ip *ip; - register struct mbuf *m = m0; - register int hlen = sizeof(struct ip ); - int len, off, error = 0; - - DEBUG_CALL("ip_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m0 = %lx", (long)m0); - - /* We do no options */ -/* if (opt) { - * m = ip_insertoptions(m, opt, &len); - * hlen = len; - * } - */ - ip = mtod(m, struct ip *); - /* - * Fill in IP header. - */ - ip->ip_v = IPVERSION; - ip->ip_off &= IP_DF; - ip->ip_id = htons(ip_id++); - ip->ip_hl = hlen >> 2; - ipstat.ips_localout++; - - /* - * Verify that we have any chance at all of being able to queue - * the packet or packet fragments - */ - /* XXX Hmmm... */ -/* if (if_queued > if_thresh && towrite <= 0) { - * error = ENOBUFS; - * goto bad; - * } - */ - - /* - * If small enough for interface, can just send directly. - */ - if ((u_int16_t)ip->ip_len <= if_mtu) { - ip->ip_len = htons((u_int16_t)ip->ip_len); - ip->ip_off = htons((u_int16_t)ip->ip_off); - ip->ip_sum = 0; - ip->ip_sum = cksum(m, hlen); - - if_output(so, m); - goto done; - } - - /* - * Too large for interface; fragment if possible. - * Must be able to put at least 8 bytes per fragment. - */ - if (ip->ip_off & IP_DF) { - error = -1; - ipstat.ips_cantfrag++; - goto bad; - } - - len = (if_mtu - hlen) &~ 7; /* ip databytes per packet */ - if (len < 8) { - error = -1; - goto bad; - } - - { - int mhlen, firstlen = len; - struct mbuf **mnext = &m->m_nextpkt; - - /* - * Loop through length of segment after first fragment, - * make new header and copy data of each part and link onto chain. - */ - m0 = m; - mhlen = sizeof (struct ip); - for (off = hlen + len; off < (u_int16_t)ip->ip_len; off += len) { - register struct ip *mhip; - m = m_get(); - if (m == 0) { - error = -1; - ipstat.ips_odropped++; - goto sendorfree; - } - m->m_data += if_maxlinkhdr; - mhip = mtod(m, struct ip *); - *mhip = *ip; - - /* No options */ -/* if (hlen > sizeof (struct ip)) { - * mhlen = ip_optcopy(ip, mhip) + sizeof (struct ip); - * mhip->ip_hl = mhlen >> 2; - * } - */ - m->m_len = mhlen; - mhip->ip_off = ((off - hlen) >> 3) + (ip->ip_off & ~IP_MF); - if (ip->ip_off & IP_MF) - mhip->ip_off |= IP_MF; - if (off + len >= (u_int16_t)ip->ip_len) - len = (u_int16_t)ip->ip_len - off; - else - mhip->ip_off |= IP_MF; - mhip->ip_len = htons((u_int16_t)(len + mhlen)); - - if (m_copy(m, m0, off, len) < 0) { - error = -1; - goto sendorfree; - } - - mhip->ip_off = htons((u_int16_t)mhip->ip_off); - mhip->ip_sum = 0; - mhip->ip_sum = cksum(m, mhlen); - *mnext = m; - mnext = &m->m_nextpkt; - ipstat.ips_ofragments++; - } - /* - * Update first fragment by trimming what's been copied out - * and updating header, then send each fragment (in order). - */ - m = m0; - m_adj(m, hlen + firstlen - (u_int16_t)ip->ip_len); - ip->ip_len = htons((u_int16_t)m->m_len); - ip->ip_off = htons((u_int16_t)(ip->ip_off | IP_MF)); - ip->ip_sum = 0; - ip->ip_sum = cksum(m, hlen); -sendorfree: - for (m = m0; m; m = m0) { - m0 = m->m_nextpkt; - m->m_nextpkt = 0; - if (error == 0) - if_output(so, m); - else - m_freem(m); - } - - if (error == 0) - ipstat.ips_fragmented++; - } - -done: - return (error); - -bad: - m_freem(m0); - goto done; -} diff --git a/SheepShaver/src/slirp/libslirp.h b/SheepShaver/src/slirp/libslirp.h deleted file mode 100755 index 8a1aa31e6..000000000 --- a/SheepShaver/src/slirp/libslirp.h +++ /dev/null @@ -1,41 +0,0 @@ -#ifndef _LIBSLIRP_H -#define _LIBSLIRP_H - -#ifdef _WIN32 -#include -int inet_aton(const char *cp, struct in_addr *ia); -#else -#include -#include -#endif - -#ifdef __cplusplus -extern "C" { -#endif - -int slirp_init(void); - -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds); - -void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds); - -void slirp_input(const uint8 *pkt, int pkt_len); - -/* you must provide the following functions: */ -int slirp_can_output(void); -void slirp_output(const uint8 *pkt, int pkt_len); - -int slirp_redir(int is_udp, int host_port, - struct in_addr guest_addr, int guest_port); -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, - int guest_port); - -extern const char *tftp_prefix; -extern char slirp_hostname[33]; - -#ifdef __cplusplus -} -#endif - -#endif diff --git a/SheepShaver/src/slirp/main.h b/SheepShaver/src/slirp/main.h deleted file mode 100755 index 181b6ae88..000000000 --- a/SheepShaver/src/slirp/main.h +++ /dev/null @@ -1,54 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifdef HAVE_SYS_SELECT_H -#include -#endif - -#define TOWRITEMAX 512 - -extern struct timeval tt; -extern int link_up; -extern int slirp_socket; -extern int slirp_socket_unit; -extern int slirp_socket_port; -extern u_int32_t slirp_socket_addr; -extern char *slirp_socket_passwd; -extern int ctty_closed; - -/* - * Get the difference in 2 times from updtim() - * Allow for wraparound times, "just in case" - * x is the greater of the 2 (current time) and y is - * what it's being compared against. - */ -#define TIME_DIFF(x,y) (x)-(y) < 0 ? ~0-(y)+(x) : (x)-(y) - -extern char *slirp_tty; -extern char *exec_shell; -extern u_int curtime; -extern fd_set *global_readfds, *global_writefds, *global_xfds; -extern struct in_addr ctl_addr; -extern struct in_addr special_addr; -extern struct in_addr alias_addr; -extern struct in_addr our_addr; -extern struct in_addr loopback_addr; -extern struct in_addr dns_addr; -extern char *username; -extern char *socket_path; -extern int towrite_max; -extern int ppp_exit; -extern int so_options; -extern int tcp_keepintvl; -extern uint8_t client_ethaddr[6]; - -#define PROTO_SLIP 0x1 -#ifdef USE_PPP -#define PROTO_PPP 0x2 -#endif - -void if_encap(const uint8_t *ip_data, int ip_data_len); diff --git a/SheepShaver/src/slirp/mbuf.c b/SheepShaver/src/slirp/mbuf.c deleted file mode 100755 index 2b53bc3e9..000000000 --- a/SheepShaver/src/slirp/mbuf.c +++ /dev/null @@ -1,247 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -/* - * mbuf's in SLiRP are much simpler than the real mbufs in - * FreeBSD. They are fixed size, determined by the MTU, - * so that one whole packet can fit. Mbuf's cannot be - * chained together. If there's more data than the mbuf - * could hold, an external malloced buffer is pointed to - * by m_ext (and the data pointers) and M_EXT is set in - * the flags - */ - -#include -#include - -struct mbuf *mbutl; -char *mclrefcnt; -int mbuf_alloced = 0; -struct mbuf m_freelist, m_usedlist; -int mbuf_thresh = 30; -int mbuf_max = 0; -int msize; - -void -m_init() -{ - m_freelist.m_next = m_freelist.m_prev = &m_freelist; - m_usedlist.m_next = m_usedlist.m_prev = &m_usedlist; - msize_init(); -} - -void -msize_init() -{ - /* - * Find a nice value for msize - * XXX if_maxlinkhdr already in mtu - */ - msize = (if_mtu>if_mru?if_mtu:if_mru) + - if_maxlinkhdr + sizeof(struct m_hdr ) + 6; -} - -/* - * Get an mbuf from the free list, if there are none - * malloc one - * - * Because fragmentation can occur if we alloc new mbufs and - * free old mbufs, we mark all mbufs above mbuf_thresh as M_DOFREE, - * which tells m_free to actually free() it - */ -struct mbuf * -m_get() -{ - register struct mbuf *m; - int flags = 0; - - DEBUG_CALL("m_get"); - - if (m_freelist.m_next == &m_freelist) { - m = (struct mbuf *)malloc(msize); - if (m == NULL) goto end_error; - mbuf_alloced++; - if (mbuf_alloced > mbuf_thresh) - flags = M_DOFREE; - if (mbuf_alloced > mbuf_max) - mbuf_max = mbuf_alloced; - } else { - m = m_freelist.m_next; - remque(m); - } - - /* Insert it in the used list */ - insque(m,&m_usedlist); - m->m_flags = (flags | M_USEDLIST); - - /* Initialise it */ - m->m_size = msize - sizeof(struct m_hdr); - m->m_data = m->m_dat; - m->m_len = 0; - m->m_nextpkt = 0; - m->m_prevpkt = 0; -end_error: - DEBUG_ARG("m = %lx", (long )m); - return m; -} - -void -m_free(m) - struct mbuf *m; -{ - - DEBUG_CALL("m_free"); - DEBUG_ARG("m = %lx", (long )m); - - if(m) { - /* Remove from m_usedlist */ - if (m->m_flags & M_USEDLIST) - remque(m); - - /* If it's M_EXT, free() it */ - if (m->m_flags & M_EXT) - free(m->m_ext); - - /* - * Either free() it or put it on the free list - */ - if (m->m_flags & M_DOFREE) { - free(m); - mbuf_alloced--; - } else if ((m->m_flags & M_FREELIST) == 0) { - insque(m,&m_freelist); - m->m_flags = M_FREELIST; /* Clobber other flags */ - } - } /* if(m) */ -} - -/* - * Copy data from one mbuf to the end of - * the other.. if result is too big for one mbuf, malloc() - * an M_EXT data segment - */ -void -m_cat(m, n) - register struct mbuf *m, *n; -{ - /* - * If there's no room, realloc - */ - if (M_FREEROOM(m) < n->m_len) - m_inc(m,m->m_size+MINCSIZE); - - memcpy(m->m_data+m->m_len, n->m_data, n->m_len); - m->m_len += n->m_len; - - m_free(n); -} - - -/* make m size bytes large */ -void -m_inc(m, size) - struct mbuf *m; - int size; -{ - int datasize; - - /* some compiles throw up on gotos. This one we can fake. */ - if(m->m_size>size) return; - - if (m->m_flags & M_EXT) { - datasize = m->m_data - m->m_ext; - m->m_ext = (char *)realloc(m->m_ext,size); -/* if (m->m_ext == NULL) - * return (struct mbuf *)NULL; - */ - m->m_data = m->m_ext + datasize; - } else { - char *dat; - datasize = m->m_data - m->m_dat; - dat = (char *)malloc(size); -/* if (dat == NULL) - * return (struct mbuf *)NULL; - */ - memcpy(dat, m->m_dat, m->m_size); - - m->m_ext = dat; - m->m_data = m->m_ext + datasize; - m->m_flags |= M_EXT; - } - - m->m_size = size; - -} - - - -void -m_adj(m, len) - struct mbuf *m; - int len; -{ - if (m == NULL) - return; - if (len >= 0) { - /* Trim from head */ - m->m_data += len; - m->m_len -= len; - } else { - /* Trim from tail */ - len = -len; - m->m_len -= len; - } -} - - -/* - * Copy len bytes from m, starting off bytes into n - */ -int -m_copy(n, m, off, len) - struct mbuf *n, *m; - int off, len; -{ - if (len > M_FREEROOM(n)) - return -1; - - memcpy((n->m_data + n->m_len), (m->m_data + off), len); - n->m_len += len; - return 0; -} - - -/* - * Given a pointer into an mbuf, return the mbuf - * XXX This is a kludge, I should eliminate the need for it - * Fortunately, it's not used often - */ -struct mbuf * -dtom(dat) - void *dat; -{ - struct mbuf *m; - - DEBUG_CALL("dtom"); - DEBUG_ARG("dat = %lx", (long )dat); - - /* bug corrected for M_EXT buffers */ - for (m = m_usedlist.m_next; m != &m_usedlist; m = m->m_next) { - if (m->m_flags & M_EXT) { - if( (char *)dat>=m->m_ext && (char *)dat<(m->m_ext + m->m_size) ) - return m; - } else { - if( (char *)dat >= m->m_dat && (char *)dat<(m->m_dat + m->m_size) ) - return m; - } - } - - DEBUG_ERROR((dfd, "dtom failed")); - - return (struct mbuf *)0; -} - diff --git a/SheepShaver/src/slirp/mbuf.h b/SheepShaver/src/slirp/mbuf.h deleted file mode 100755 index 183254a08..000000000 --- a/SheepShaver/src/slirp/mbuf.h +++ /dev/null @@ -1,143 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)mbuf.h 8.3 (Berkeley) 1/21/94 - * mbuf.h,v 1.9 1994/11/14 13:54:20 bde Exp - */ - -#ifndef _MBUF_H_ -#define _MBUF_H_ - -#define m_freem m_free - - -#define MINCSIZE 4096 /* Amount to increase mbuf if too small */ - -/* - * Macros for type conversion - * mtod(m,t) - convert mbuf pointer to data pointer of correct type - * dtom(x) - convert data pointer within mbuf to mbuf pointer (XXX) - */ -#define mtod(m,t) ((t)(m)->m_data) -/* #define dtom(x) ((struct mbuf *)((int)(x) & ~(M_SIZE-1))) */ - -/* XXX About mbufs for slirp: - * Only one mbuf is ever used in a chain, for each "cell" of data. - * m_nextpkt points to the next packet, if fragmented. - * If the data is too large, the M_EXT is used, and a larger block - * is alloced. Therefore, m_free[m] must check for M_EXT and if set - * free the m_ext. This is inefficient memory-wise, but who cares. - */ - -/* XXX should union some of these! */ -/* header at beginning of each mbuf: */ -struct m_hdr { - struct mbuf *mh_next; /* Linked list of mbufs */ - struct mbuf *mh_prev; - struct mbuf *mh_nextpkt; /* Next packet in queue/record */ - struct mbuf *mh_prevpkt; /* Flags aren't used in the output queue */ - int mh_flags; /* Misc flags */ - - int mh_size; /* Size of data */ - struct socket *mh_so; - - caddr_t mh_data; /* Location of data */ - int mh_len; /* Amount of data in this mbuf */ -}; - -/* - * How much room is in the mbuf, from m_data to the end of the mbuf - */ -#define M_ROOM(m) ((m->m_flags & M_EXT)? \ - (((m)->m_ext + (m)->m_size) - (m)->m_data) \ - : \ - (((m)->m_dat + (m)->m_size) - (m)->m_data)) - -/* - * How much free room there is - */ -#define M_FREEROOM(m) (M_ROOM(m) - (m)->m_len) -#define M_TRAILINGSPACE M_FREEROOM - -struct mbuf { - struct m_hdr m_hdr; - union M_dat { - char m_dat_[1]; /* ANSI don't like 0 sized arrays */ - char *m_ext_; - } M_dat; -}; - -#define m_next m_hdr.mh_next -#define m_prev m_hdr.mh_prev -#define m_nextpkt m_hdr.mh_nextpkt -#define m_prevpkt m_hdr.mh_prevpkt -#define m_flags m_hdr.mh_flags -#define m_len m_hdr.mh_len -#define m_data m_hdr.mh_data -#define m_size m_hdr.mh_size -#define m_dat M_dat.m_dat_ -#define m_ext M_dat.m_ext_ -#define m_so m_hdr.mh_so - -#define ifq_prev m_prev -#define ifq_next m_next -#define ifs_prev m_prevpkt -#define ifs_next m_nextpkt -#define ifq_so m_so - -#define M_EXT 0x01 /* m_ext points to more (malloced) data */ -#define M_FREELIST 0x02 /* mbuf is on free list */ -#define M_USEDLIST 0x04 /* XXX mbuf is on used list (for dtom()) */ -#define M_DOFREE 0x08 /* when m_free is called on the mbuf, free() - * it rather than putting it on the free list */ - -/* - * Mbuf statistics. XXX - */ - -struct mbstat { - int mbs_alloced; /* Number of mbufs allocated */ - -}; - -extern struct mbstat mbstat; -extern int mbuf_alloced; -extern struct mbuf m_freelist, m_usedlist; -extern int mbuf_max; - -void m_init _P((void)); -void msize_init _P((void)); -struct mbuf * m_get _P((void)); -void m_free _P((struct mbuf *)); -void m_cat _P((register struct mbuf *, register struct mbuf *)); -void m_inc _P((struct mbuf *, int)); -void m_adj _P((struct mbuf *, int)); -int m_copy _P((struct mbuf *, struct mbuf *, int, int)); -struct mbuf * dtom _P((void *)); - -#endif diff --git a/SheepShaver/src/slirp/misc.c b/SheepShaver/src/slirp/misc.c deleted file mode 100755 index 9438af382..000000000 --- a/SheepShaver/src/slirp/misc.c +++ /dev/null @@ -1,913 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include - -u_int curtime, time_fasttimo, last_slowtimo, detach_time; -u_int detach_wait = 600000; /* 10 minutes */ - -#if 0 -int x_port = -1; -int x_display = 0; -int x_screen = 0; - -int -show_x(buff, inso) - char *buff; - struct socket *inso; -{ - if (x_port < 0) { - lprint("X Redir: X not being redirected.\r\n"); - } else { - lprint("X Redir: In sh/bash/zsh/etc. type: DISPLAY=%s:%d.%d; export DISPLAY\r\n", - inet_ntoa(our_addr), x_port, x_screen); - lprint("X Redir: In csh/tcsh/etc. type: setenv DISPLAY %s:%d.%d\r\n", - inet_ntoa(our_addr), x_port, x_screen); - if (x_display) - lprint("X Redir: Redirecting to display %d\r\n", x_display); - } - - return CFG_OK; -} - - -/* - * XXX Allow more than one X redirection? - */ -void -redir_x(inaddr, start_port, display, screen) - u_int32_t inaddr; - int start_port; - int display; - int screen; -{ - int i; - - if (x_port >= 0) { - lprint("X Redir: X already being redirected.\r\n"); - show_x(0, 0); - } else { - for (i = 6001 + (start_port-1); i <= 6100; i++) { - if (solisten(htons(i), inaddr, htons(6000 + display), 0)) { - /* Success */ - x_port = i - 6000; - x_display = display; - x_screen = screen; - show_x(0, 0); - return; - } - } - lprint("X Redir: Error: Couldn't redirect a port for X. Weird.\r\n"); - } -} -#endif - -#ifndef HAVE_INET_ATON -int -inet_aton(cp, ia) - const char *cp; - struct in_addr *ia; -{ - u_int32_t addr = inet_addr(cp); - if (addr == 0xffffffff) - return 0; - ia->s_addr = addr; - return 1; -} -#endif - -/* - * Get our IP address and put it in our_addr - */ -void -getouraddr() -{ - char buff[256]; - struct hostent *he = NULL; - - if (gethostname(buff,256) == 0) - he = gethostbyname(buff); - if (he) - our_addr = *(struct in_addr *)he->h_addr; - if (our_addr.s_addr == 0) - our_addr.s_addr = loopback_addr.s_addr; -} - -struct quehead { - struct quehead *qh_link; - struct quehead *qh_rlink; -}; - -void -insque(a, b) - void *a, *b; -{ - register struct quehead *element = (struct quehead *) a; - register struct quehead *head = (struct quehead *) b; - element->qh_link = head->qh_link; - head->qh_link = (struct quehead *)element; - element->qh_rlink = (struct quehead *)head; - ((struct quehead *)(element->qh_link))->qh_rlink - = (struct quehead *)element; -} - -void -remque(a) - void *a; -{ - register struct quehead *element = (struct quehead *) a; - ((struct quehead *)(element->qh_link))->qh_rlink = element->qh_rlink; - ((struct quehead *)(element->qh_rlink))->qh_link = element->qh_link; - element->qh_rlink = NULL; - /* element->qh_link = NULL; TCP FIN1 crashes if you do this. Why ? */ -} - -/* #endif */ - - -int -add_exec(ex_ptr, do_pty, exec, addr, port) - struct ex_list **ex_ptr; - int do_pty; - char *exec; - int addr; - int port; -{ - struct ex_list *tmp_ptr; - - /* First, check if the port is "bound" */ - for (tmp_ptr = *ex_ptr; tmp_ptr; tmp_ptr = tmp_ptr->ex_next) { - if (port == tmp_ptr->ex_fport && addr == tmp_ptr->ex_addr) - return -1; - } - - tmp_ptr = *ex_ptr; - *ex_ptr = (struct ex_list *)malloc(sizeof(struct ex_list)); - (*ex_ptr)->ex_fport = port; - (*ex_ptr)->ex_addr = addr; - (*ex_ptr)->ex_pty = do_pty; - (*ex_ptr)->ex_exec = strdup(exec); - (*ex_ptr)->ex_next = tmp_ptr; - return 0; -} - -#ifndef HAVE_STRERROR - -/* - * For systems with no strerror - */ - -extern int sys_nerr; -extern char *sys_errlist[]; - -char * -strerror(error) - int error; -{ - if (error < sys_nerr) - return sys_errlist[error]; - else - return "Unknown error."; -} - -#endif - - -#ifdef _WIN32 - -int -fork_exec(so, ex, do_pty) - struct socket *so; - char *ex; - int do_pty; -{ - /* not implemented */ - return 0; -} - -#else - -int -slirp_openpty(amaster, aslave) - int *amaster, *aslave; -{ - register int master, slave; - -#ifdef HAVE_GRANTPT - char *ptr; - - if ((master = open("/dev/ptmx", O_RDWR)) < 0 || - grantpt(master) < 0 || - unlockpt(master) < 0 || - (ptr = ptsname(master)) == NULL) { - close(master); - return -1; - } - - if ((slave = open(ptr, O_RDWR)) < 0 || - ioctl(slave, I_PUSH, "ptem") < 0 || - ioctl(slave, I_PUSH, "ldterm") < 0 || - ioctl(slave, I_PUSH, "ttcompat") < 0) { - close(master); - close(slave); - return -1; - } - - *amaster = master; - *aslave = slave; - return 0; - -#else - - static char line[] = "/dev/ptyXX"; - register const char *cp1, *cp2; - - for (cp1 = "pqrsPQRS"; *cp1; cp1++) { - line[8] = *cp1; - for (cp2 = "0123456789abcdefghijklmnopqrstuv"; *cp2; cp2++) { - line[9] = *cp2; - if ((master = open(line, O_RDWR, 0)) == -1) { - if (errno == ENOENT) - return (-1); /* out of ptys */ - } else { - line[5] = 't'; - /* These will fail */ - (void) chown(line, getuid(), 0); - (void) chmod(line, S_IRUSR|S_IWUSR|S_IWGRP); -#ifdef HAVE_REVOKE - (void) revoke(line); -#endif - if ((slave = open(line, O_RDWR, 0)) != -1) { - *amaster = master; - *aslave = slave; - return 0; - } - (void) close(master); - line[5] = 'p'; - } - } - } - errno = ENOENT; /* out of ptys */ - return (-1); -#endif -} - -/* - * XXX This is ugly - * We create and bind a socket, then fork off to another - * process, which connects to this socket, after which we - * exec the wanted program. If something (strange) happens, - * the accept() call could block us forever. - * - * do_pty = 0 Fork/exec inetd style - * do_pty = 1 Fork/exec using slirp.telnetd - * do_ptr = 2 Fork/exec using pty - */ -int -fork_exec(so, ex, do_pty) - struct socket *so; - char *ex; - int do_pty; -{ - int s; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); - int opt; - int master; - char *argv[256]; -#if 0 - char buff[256]; -#endif - /* don't want to clobber the original */ - char *bptr; - char *curarg; - int c, i, ret; - - DEBUG_CALL("fork_exec"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("ex = %lx", (long)ex); - DEBUG_ARG("do_pty = %lx", (long)do_pty); - - if (do_pty == 2) { - if (slirp_openpty(&master, &s) == -1) { - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } - } else { - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_port = 0; - addr.sin_addr.s_addr = INADDR_ANY; - - if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0 || - bind(s, (struct sockaddr *)&addr, addrlen) < 0 || - listen(s, 1) < 0) { - lprint("Error: inet socket: %s\n", strerror(errno)); - closesocket(s); - - return 0; - } - } - - switch(fork()) { - case -1: - lprint("Error: fork failed: %s\n", strerror(errno)); - close(s); - if (do_pty == 2) - close(master); - return 0; - - case 0: - /* Set the DISPLAY */ - if (do_pty == 2) { - (void) close(master); -#ifdef TIOCSCTTY /* XXXXX */ - (void) setsid(); - ioctl(s, TIOCSCTTY, (char *)NULL); -#endif - } else { - getsockname(s, (struct sockaddr *)&addr, &addrlen); - close(s); - /* - * Connect to the socket - * XXX If any of these fail, we're in trouble! - */ - s = socket(AF_INET, SOCK_STREAM, 0); - addr.sin_addr = loopback_addr; - do { - ret = connect(s, (struct sockaddr *)&addr, addrlen); - } while (ret < 0 && errno == EINTR); - } - -#if 0 - if (x_port >= 0) { -#ifdef HAVE_SETENV - sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - setenv("DISPLAY", buff, 1); -#else - sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - putenv(buff); -#endif - } -#endif - dup2(s, 0); - dup2(s, 1); - dup2(s, 2); - for (s = 3; s <= 255; s++) - close(s); - - i = 0; - bptr = strdup(ex); /* No need to free() this */ - if (do_pty == 1) { - /* Setup "slirp.telnetd -x" */ - argv[i++] = "slirp.telnetd"; - argv[i++] = "-x"; - argv[i++] = bptr; - } else - do { - /* Change the string into argv[] */ - curarg = bptr; - while (*bptr != ' ' && *bptr != (char)0) - bptr++; - c = *bptr; - *bptr++ = (char)0; - argv[i++] = strdup(curarg); - } while (c); - - argv[i] = 0; - execvp(argv[0], argv); - - /* Ooops, failed, let's tell the user why */ - { - char buff[256]; - - sprintf(buff, "Error: execvp of %s failed: %s\n", - argv[0], strerror(errno)); - write(2, buff, strlen(buff)+1); - } - close(0); close(1); close(2); /* XXX */ - exit(1); - - default: - if (do_pty == 2) { - close(s); - so->s = master; - } else { - /* - * XXX this could block us... - * XXX Should set a timer here, and if accept() doesn't - * return after X seconds, declare it a failure - * The only reason this will block forever is if socket() - * of connect() fail in the child process - */ - do { - so->s = accept(s, (struct sockaddr *)&addr, &addrlen); - } while (so->s < 0 && errno == EINTR); - closesocket(s); - opt = 1; - setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - } - fd_nonblock(so->s); - - /* Append the telnet options now */ - if (so->so_m != 0 && do_pty == 1) { - sbappend(so, so->so_m); - so->so_m = 0; - } - - return 1; - } -} -#endif - -#ifndef HAVE_STRDUP -char * -strdup(str) - const char *str; -{ - char *bptr; - - bptr = (char *)malloc(strlen(str)+1); - strcpy(bptr, str); - - return bptr; -} -#endif - -#if 0 -void -snooze_hup(num) - int num; -{ - int s, ret; -#ifndef NO_UNIX_SOCKETS - struct sockaddr_un sock_un; -#endif - struct sockaddr_in sock_in; - char buff[256]; - - ret = -1; - if (slirp_socket_passwd) { - s = socket(AF_INET, SOCK_STREAM, 0); - if (s < 0) - slirp_exit(1); - sock_in.sin_family = AF_INET; - sock_in.sin_addr.s_addr = slirp_socket_addr; - sock_in.sin_port = htons(slirp_socket_port); - if (connect(s, (struct sockaddr *)&sock_in, sizeof(sock_in)) != 0) - slirp_exit(1); /* just exit...*/ - sprintf(buff, "kill %s:%d", slirp_socket_passwd, slirp_socket_unit); - write(s, buff, strlen(buff)+1); - } -#ifndef NO_UNIX_SOCKETS - else { - s = socket(AF_UNIX, SOCK_STREAM, 0); - if (s < 0) - slirp_exit(1); - sock_un.sun_family = AF_UNIX; - strcpy(sock_un.sun_path, socket_path); - if (connect(s, (struct sockaddr *)&sock_un, - sizeof(sock_un.sun_family) + sizeof(sock_un.sun_path)) != 0) - slirp_exit(1); - sprintf(buff, "kill none:%d", slirp_socket_unit); - write(s, buff, strlen(buff)+1); - } -#endif - slirp_exit(0); -} - - -void -snooze() -{ - sigset_t s; - int i; - - /* Don't need our data anymore */ - /* XXX This makes SunOS barf */ -/* brk(0); */ - - /* Close all fd's */ - for (i = 255; i >= 0; i--) - close(i); - - signal(SIGQUIT, slirp_exit); - signal(SIGHUP, snooze_hup); - sigemptyset(&s); - - /* Wait for any signal */ - sigsuspend(&s); - - /* Just in case ... */ - exit(255); -} - -void -relay(s) - int s; -{ - char buf[8192]; - int n; - fd_set readfds; - struct ttys *ttyp; - - /* Don't need our data anymore */ - /* XXX This makes SunOS barf */ -/* brk(0); */ - - signal(SIGQUIT, slirp_exit); - signal(SIGHUP, slirp_exit); - signal(SIGINT, slirp_exit); - signal(SIGTERM, slirp_exit); - - /* Fudge to get term_raw and term_restore to work */ - if (NULL == (ttyp = tty_attach (0, slirp_tty))) { - lprint ("Error: tty_attach failed in misc.c:relay()\r\n"); - slirp_exit (1); - } - ttyp->fd = 0; - ttyp->flags |= TTY_CTTY; - term_raw(ttyp); - - while (1) { - FD_ZERO(&readfds); - - FD_SET(0, &readfds); - FD_SET(s, &readfds); - - n = select(s+1, &readfds, (fd_set *)0, (fd_set *)0, (struct timeval *)0); - - if (n <= 0) - slirp_exit(0); - - if (FD_ISSET(0, &readfds)) { - n = read(0, buf, 8192); - if (n <= 0) - slirp_exit(0); - n = writen(s, buf, n); - if (n <= 0) - slirp_exit(0); - } - - if (FD_ISSET(s, &readfds)) { - n = read(s, buf, 8192); - if (n <= 0) - slirp_exit(0); - n = writen(0, buf, n); - if (n <= 0) - slirp_exit(0); - } - } - - /* Just in case.... */ - exit(1); -} -#endif - -int (*lprint_print) _P((void *, const char *, va_list)); -char *lprint_ptr, *lprint_ptr2, **lprint_arg; - -void -#ifdef __STDC__ -lprint(const char *format, ...) -#else -lprint(va_alist) va_dcl -#endif -{ - va_list args; - -#ifdef __STDC__ - va_start(args, format); -#else - char *format; - va_start(args); - format = va_arg(args, char *); -#endif -#if 0 - /* If we're printing to an sbuf, make sure there's enough room */ - /* XXX +100? */ - if (lprint_sb) { - if ((lprint_ptr - lprint_sb->sb_wptr) >= - (lprint_sb->sb_datalen - (strlen(format) + 100))) { - int deltaw = lprint_sb->sb_wptr - lprint_sb->sb_data; - int deltar = lprint_sb->sb_rptr - lprint_sb->sb_data; - int deltap = lprint_ptr - lprint_sb->sb_data; - - lprint_sb->sb_data = (char *)realloc(lprint_sb->sb_data, - lprint_sb->sb_datalen + TCP_SNDSPACE); - - /* Adjust all values */ - lprint_sb->sb_wptr = lprint_sb->sb_data + deltaw; - lprint_sb->sb_rptr = lprint_sb->sb_data + deltar; - lprint_ptr = lprint_sb->sb_data + deltap; - - lprint_sb->sb_datalen += TCP_SNDSPACE; - } - } -#endif - if (lprint_print) - lprint_ptr += (*lprint_print)(*lprint_arg, format, args); - - /* Check if they want output to be logged to file as well */ - if (lfd) { - /* - * Remove \r's - * otherwise you'll get ^M all over the file - */ - int len = strlen(format); - char *bptr1, *bptr2; - - bptr1 = bptr2 = strdup(format); - - while (len--) { - if (*bptr1 == '\r') - memcpy(bptr1, bptr1+1, len+1); - else - bptr1++; - } - vfprintf(lfd, bptr2, args); - free(bptr2); - } - va_end(args); -} - -void -add_emu(buff) - char *buff; -{ - u_int lport, fport; - u_int8_t tos = 0, emu = 0; - char buff1[256], buff2[256], buff4[128]; - char *buff3 = buff4; - struct emu_t *emup; - struct socket *so; - - if (sscanf(buff, "%256s %256s", buff2, buff1) != 2) { - lprint("Error: Bad arguments\r\n"); - return; - } - - if (sscanf(buff1, "%d:%d", &lport, &fport) != 2) { - lport = 0; - if (sscanf(buff1, "%d", &fport) != 1) { - lprint("Error: Bad first argument\r\n"); - return; - } - } - - if (sscanf(buff2, "%128[^:]:%128s", buff1, buff3) != 2) { - buff3 = 0; - if (sscanf(buff2, "%256s", buff1) != 1) { - lprint("Error: Bad second argument\r\n"); - return; - } - } - - if (buff3) { - if (strcmp(buff3, "lowdelay") == 0) - tos = IPTOS_LOWDELAY; - else if (strcmp(buff3, "throughput") == 0) - tos = IPTOS_THROUGHPUT; - else { - lprint("Error: Expecting \"lowdelay\"/\"throughput\"\r\n"); - return; - } - } - - if (strcmp(buff1, "ftp") == 0) - emu = EMU_FTP; - else if (strcmp(buff1, "irc") == 0) - emu = EMU_IRC; - else if (strcmp(buff1, "none") == 0) - emu = EMU_NONE; /* ie: no emulation */ - else { - lprint("Error: Unknown service\r\n"); - return; - } - - /* First, check that it isn't already emulated */ - for (emup = tcpemu; emup; emup = emup->next) { - if (emup->lport == lport && emup->fport == fport) { - lprint("Error: port already emulated\r\n"); - return; - } - } - - /* link it */ - emup = (struct emu_t *)malloc(sizeof (struct emu_t)); - emup->lport = (u_int16_t)lport; - emup->fport = (u_int16_t)fport; - emup->tos = tos; - emup->emu = emu; - emup->next = tcpemu; - tcpemu = emup; - - /* And finally, mark all current sessions, if any, as being emulated */ - for (so = tcb.so_next; so != &tcb; so = so->so_next) { - if ((lport && lport == ntohs(so->so_lport)) || - (fport && fport == ntohs(so->so_fport))) { - if (emu) - so->so_emu = emu; - if (tos) - so->so_iptos = tos; - } - } - - lprint("Adding emulation for %s to port %d/%d\r\n", buff1, emup->lport, emup->fport); -} - -#ifdef BAD_SPRINTF - -#undef vsprintf -#undef sprintf - -/* - * Some BSD-derived systems have a sprintf which returns char * - */ - -int -vsprintf_len(string, format, args) - char *string; - const char *format; - va_list args; -{ - vsprintf(string, format, args); - return strlen(string); -} - -int -#ifdef __STDC__ -sprintf_len(char *string, const char *format, ...) -#else -sprintf_len(va_alist) va_dcl -#endif -{ - va_list args; -#ifdef __STDC__ - va_start(args, format); -#else - char *string; - char *format; - va_start(args); - string = va_arg(args, char *); - format = va_arg(args, char *); -#endif - vsprintf(string, format, args); - return strlen(string); -} - -#endif - -void -u_sleep(usec) - int usec; -{ - struct timeval t; - fd_set fdset; - - FD_ZERO(&fdset); - - t.tv_sec = 0; - t.tv_usec = usec * 1000; - - select(0, &fdset, &fdset, &fdset, &t); -} - -/* - * Set fd blocking and non-blocking - */ - -void -fd_nonblock(fd) - int fd; -{ -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 1; - - ioctlsocket(fd, FIONBIO, &opt); -#else - int opt; - - opt = fcntl(fd, F_GETFL, 0); - opt |= O_NONBLOCK; - fcntl(fd, F_SETFL, opt); -#endif -} - -void -fd_block(fd) - int fd; -{ -#if defined USE_FIONBIO && defined FIONBIO - ioctlsockopt_t opt = 0; - - ioctlsocket(fd, FIONBIO, &opt); -#else - int opt; - - opt = fcntl(fd, F_GETFL, 0); - opt &= ~O_NONBLOCK; - fcntl(fd, F_SETFL, opt); -#endif -} - - -#if 0 -/* - * invoke RSH - */ -int -rsh_exec(so,ns, user, host, args) - struct socket *so; - struct socket *ns; - char *user; - char *host; - char *args; -{ - int fd[2]; - int fd0[2]; - int s; - char buff[256]; - - DEBUG_CALL("rsh_exec"); - DEBUG_ARG("so = %lx", (long)so); - - if (pipe(fd)<0) { - lprint("Error: pipe failed: %s\n", strerror(errno)); - return 0; - } -/* #ifdef HAVE_SOCKETPAIR */ -#if 1 - if (socketpair(PF_UNIX,SOCK_STREAM,0, fd0) == -1) { - close(fd[0]); - close(fd[1]); - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } -#else - if (slirp_openpty(&fd0[0], &fd0[1]) == -1) { - close(fd[0]); - close(fd[1]); - lprint("Error: openpty failed: %s\n", strerror(errno)); - return 0; - } -#endif - - switch(fork()) { - case -1: - lprint("Error: fork failed: %s\n", strerror(errno)); - close(fd[0]); - close(fd[1]); - close(fd0[0]); - close(fd0[1]); - return 0; - - case 0: - close(fd[0]); - close(fd0[0]); - - /* Set the DISPLAY */ - if (x_port >= 0) { -#ifdef HAVE_SETENV - sprintf(buff, "%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - setenv("DISPLAY", buff, 1); -#else - sprintf(buff, "DISPLAY=%s:%d.%d", inet_ntoa(our_addr), x_port, x_screen); - putenv(buff); -#endif - } - - dup2(fd0[1], 0); - dup2(fd0[1], 1); - dup2(fd[1], 2); - for (s = 3; s <= 255; s++) - close(s); - - execlp("rsh","rsh","-l", user, host, args, NULL); - - /* Ooops, failed, let's tell the user why */ - - sprintf(buff, "Error: execlp of %s failed: %s\n", - "rsh", strerror(errno)); - write(2, buff, strlen(buff)+1); - close(0); close(1); close(2); /* XXX */ - exit(1); - - default: - close(fd[1]); - close(fd0[1]); - ns->s=fd[0]; - so->s=fd0[0]; - - return 1; - } -} -#endif diff --git a/SheepShaver/src/slirp/misc.h b/SheepShaver/src/slirp/misc.h deleted file mode 100755 index efea9ff8b..000000000 --- a/SheepShaver/src/slirp/misc.h +++ /dev/null @@ -1,87 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _MISC_H_ -#define _MISC_H_ - -struct ex_list { - int ex_pty; /* Do we want a pty? */ - int ex_addr; /* The last byte of the address */ - int ex_fport; /* Port to telnet to */ - char *ex_exec; /* Command line of what to exec */ - struct ex_list *ex_next; -}; - -extern struct ex_list *exec_list; -extern u_int curtime, time_fasttimo, last_slowtimo, detach_time, detach_wait; - -extern int (*lprint_print) _P((void *, const char *, va_list)); -extern char *lprint_ptr, *lprint_ptr2, **lprint_arg; -extern struct sbuf *lprint_sb; - -#ifndef HAVE_STRDUP -char *strdup _P((const char *)); -#endif - -void do_wait _P((int)); - -#define EMU_NONE 0x0 - -/* TCP emulations */ -#define EMU_CTL 0x1 -#define EMU_FTP 0x2 -#define EMU_KSH 0x3 -#define EMU_IRC 0x4 -#define EMU_REALAUDIO 0x5 -#define EMU_RLOGIN 0x6 -#define EMU_IDENT 0x7 -#define EMU_RSH 0x8 - -#define EMU_NOCONNECT 0x10 /* Don't connect */ - -/* UDP emulations */ -#define EMU_TALK 0x1 -#define EMU_NTALK 0x2 -#define EMU_CUSEEME 0x3 - -struct tos_t { - u_int16_t lport; - u_int16_t fport; - u_int8_t tos; - u_int8_t emu; -}; - -struct emu_t { - u_int16_t lport; - u_int16_t fport; - u_int8_t tos; - u_int8_t emu; - struct emu_t *next; -}; - -extern struct emu_t *tcpemu; - -extern int x_port, x_server, x_display; - -int show_x _P((char *, struct socket *)); -void redir_x _P((u_int32_t, int, int, int)); -void getouraddr _P((void)); -void slirp_insque _P((void *, void *)); -void slirp_remque _P((void *)); -int add_exec _P((struct ex_list **, int, char *, int, int)); -int slirp_openpty _P((int *, int *)); -int fork_exec _P((struct socket *, char *, int)); -void snooze_hup _P((int)); -void snooze _P((void)); -void relay _P((int)); -void add_emu _P((char *)); -void u_sleep _P((int)); -void fd_nonblock _P((int)); -void fd_block _P((int)); -int rsh_exec _P((struct socket *, struct socket *, char *, char *, char *)); - -#endif diff --git a/SheepShaver/src/slirp/sbuf.c b/SheepShaver/src/slirp/sbuf.c deleted file mode 100755 index 0d8800920..000000000 --- a/SheepShaver/src/slirp/sbuf.c +++ /dev/null @@ -1,202 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -// #include -#include - -/* Done as a macro in socket.h */ -/* int - * sbspace(struct sockbuff *sb) - * { - * return SB_DATALEN - sb->sb_cc; - * } - */ - -void -sbfree(sb) - struct sbuf *sb; -{ - free(sb->sb_data); -} - -void -sbdrop(sb, num) - struct sbuf *sb; - int num; -{ - /* - * We can only drop how much we have - * This should never succeed - */ - if(num > sb->sb_cc) - num = sb->sb_cc; - sb->sb_cc -= num; - sb->sb_rptr += num; - if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen) - sb->sb_rptr -= sb->sb_datalen; - -} - -void -sbreserve(sb, size) - struct sbuf *sb; - int size; -{ - if (sb->sb_data) { - /* Already alloced, realloc if necessary */ - if (sb->sb_datalen != size) { - sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)realloc(sb->sb_data, size); - sb->sb_cc = 0; - if (sb->sb_wptr) - sb->sb_datalen = size; - else - sb->sb_datalen = 0; - } - } else { - sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)malloc(size); - sb->sb_cc = 0; - if (sb->sb_wptr) - sb->sb_datalen = size; - else - sb->sb_datalen = 0; - } -} - -/* - * Try and write() to the socket, whatever doesn't get written - * append to the buffer... for a host with a fast net connection, - * this prevents an unnecessary copy of the data - * (the socket is non-blocking, so we won't hang) - */ -void -sbappend(so, m) - struct socket *so; - struct mbuf *m; -{ - int ret = 0; - - DEBUG_CALL("sbappend"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("m->m_len = %d", m->m_len); - - /* Shouldn't happen, but... e.g. foreign host closes connection */ - if (m->m_len <= 0) { - m_free(m); - return; - } - - /* - * If there is urgent data, call sosendoob - * if not all was sent, sowrite will take care of the rest - * (The rest of this function is just an optimisation) - */ - if (so->so_urgc) { - sbappendsb(&so->so_rcv, m); - m_free(m); - sosendoob(so); - return; - } - - /* - * We only write if there's nothing in the buffer, - * ottherwise it'll arrive out of order, and hence corrupt - */ - if (!so->so_rcv.sb_cc) - ret = send(so->s, m->m_data, m->m_len, 0); - - if (ret <= 0) { - /* - * Nothing was written - * It's possible that the socket has closed, but - * we don't need to check because if it has closed, - * it will be detected in the normal way by soread() - */ - sbappendsb(&so->so_rcv, m); - } else if (ret != m->m_len) { - /* - * Something was written, but not everything.. - * sbappendsb the rest - */ - m->m_len -= ret; - m->m_data += ret; - sbappendsb(&so->so_rcv, m); - } /* else */ - /* Whatever happened, we free the mbuf */ - m_free(m); -} - -/* - * Copy the data from m into sb - * The caller is responsible to make sure there's enough room - */ -void -sbappendsb(sb, m) - struct sbuf *sb; - struct mbuf *m; -{ - int len, n, nn; - - len = m->m_len; - - if (sb->sb_wptr < sb->sb_rptr) { - n = sb->sb_rptr - sb->sb_wptr; - if (n > len) n = len; - memcpy(sb->sb_wptr, m->m_data, n); - } else { - /* Do the right edge first */ - n = sb->sb_data + sb->sb_datalen - sb->sb_wptr; - if (n > len) n = len; - memcpy(sb->sb_wptr, m->m_data, n); - len -= n; - if (len) { - /* Now the left edge */ - nn = sb->sb_rptr - sb->sb_data; - if (nn > len) nn = len; - memcpy(sb->sb_data,m->m_data+n,nn); - n += nn; - } - } - - sb->sb_cc += n; - sb->sb_wptr += n; - if (sb->sb_wptr >= sb->sb_data + sb->sb_datalen) - sb->sb_wptr -= sb->sb_datalen; -} - -/* - * Copy data from sbuf to a normal, straight buffer - * Don't update the sbuf rptr, this will be - * done in sbdrop when the data is acked - */ -void -sbcopy(sb, off, len, to) - struct sbuf *sb; - int off; - int len; - char *to; -{ - char *from; - - from = sb->sb_rptr + off; - if (from >= sb->sb_data + sb->sb_datalen) - from -= sb->sb_datalen; - - if (from < sb->sb_wptr) { - if (len > sb->sb_cc) len = sb->sb_cc; - memcpy(to,from,len); - } else { - /* re-use off */ - off = (sb->sb_data + sb->sb_datalen) - from; - if (off > len) off = len; - memcpy(to,from,off); - len -= off; - if (len) - memcpy(to+off,sb->sb_data,len); - } -} - diff --git a/SheepShaver/src/slirp/sbuf.h b/SheepShaver/src/slirp/sbuf.h deleted file mode 100755 index 161e0bb76..000000000 --- a/SheepShaver/src/slirp/sbuf.h +++ /dev/null @@ -1,31 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#ifndef _SBUF_H_ -#define _SBUF_H_ - -#define sbflush(sb) sbdrop((sb),(sb)->sb_cc) -#define sbspace(sb) ((sb)->sb_datalen - (sb)->sb_cc) - -struct sbuf { - u_int sb_cc; /* actual chars in buffer */ - u_int sb_datalen; /* Length of data */ - char *sb_wptr; /* write pointer. points to where the next - * bytes should be written in the sbuf */ - char *sb_rptr; /* read pointer. points to where the next - * byte should be read from the sbuf */ - char *sb_data; /* Actual data */ -}; - -void sbfree _P((struct sbuf *)); -void sbdrop _P((struct sbuf *, int)); -void sbreserve _P((struct sbuf *, int)); -void sbappend _P((struct socket *, struct mbuf *)); -void sbappendsb _P((struct sbuf *, struct mbuf *)); -void sbcopy _P((struct sbuf *, int, int, char *)); - -#endif diff --git a/SheepShaver/src/slirp/slirp.c b/SheepShaver/src/slirp/slirp.c deleted file mode 100755 index 44f777d08..000000000 --- a/SheepShaver/src/slirp/slirp.c +++ /dev/null @@ -1,670 +0,0 @@ -#include "slirp.h" - -/* host address */ -struct in_addr our_addr; -/* host dns address */ -struct in_addr dns_addr; -/* host loopback address */ -struct in_addr loopback_addr; - -/* address for slirp virtual addresses */ -struct in_addr special_addr; -/* virtual address alias for host */ -struct in_addr alias_addr; - -const uint8_t special_ethaddr[6] = { - 0x52, 0x54, 0x00, 0x12, 0x35, 0x00 -}; - -uint8_t client_ethaddr[6]; - -int do_slowtimo; -int link_up; -struct timeval tt; -FILE *lfd; -struct ex_list *exec_list; - -/* XXX: suppress those select globals */ -fd_set *global_readfds, *global_writefds, *global_xfds; - -char slirp_hostname[33]; - -#ifdef _WIN32 - -static int get_dns_addr(struct in_addr *pdns_addr) -{ - FIXED_INFO *FixedInfo=NULL; - ULONG BufLen; - DWORD ret; - IP_ADDR_STRING *pIPAddr; - struct in_addr tmp_addr; - - FixedInfo = (FIXED_INFO *)GlobalAlloc(GPTR, sizeof(FIXED_INFO)); - BufLen = sizeof(FIXED_INFO); - - if (ERROR_BUFFER_OVERFLOW == GetNetworkParams(FixedInfo, &BufLen)) { - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - FixedInfo = GlobalAlloc(GPTR, BufLen); - } - - if ((ret = GetNetworkParams(FixedInfo, &BufLen)) != ERROR_SUCCESS) { - printf("GetNetworkParams failed. ret = %08x\n", (u_int)ret ); - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - return -1; - } - - pIPAddr = &(FixedInfo->DnsServerList); - inet_aton(pIPAddr->IpAddress.String, &tmp_addr); - *pdns_addr = tmp_addr; -#if 0 - printf( "DNS Servers:\n" ); - printf( "DNS Addr:%s\n", pIPAddr->IpAddress.String ); - - pIPAddr = FixedInfo -> DnsServerList.Next; - while ( pIPAddr ) { - printf( "DNS Addr:%s\n", pIPAddr ->IpAddress.String ); - pIPAddr = pIPAddr ->Next; - } -#endif - if (FixedInfo) { - GlobalFree(FixedInfo); - FixedInfo = NULL; - } - return 0; -} - -#else - -static int get_dns_addr(struct in_addr *pdns_addr) -{ - char buff[512]; - char buff2[256]; - FILE *f; - int found = 0; - struct in_addr tmp_addr; - - f = fopen("/etc/resolv.conf", "r"); - if (!f) - return -1; - - lprint("IP address of your DNS(s): "); - while (fgets(buff, 512, f) != NULL) { - if (sscanf(buff, "nameserver%*[ \t]%256s", buff2) == 1) { - if (!inet_aton(buff2, &tmp_addr)) - continue; - if (tmp_addr.s_addr == loopback_addr.s_addr) - tmp_addr = our_addr; - /* If it's the first one, set it to dns_addr */ - if (!found) - *pdns_addr = tmp_addr; - else - lprint(", "); - if (++found > 3) { - lprint("(more)"); - break; - } else - lprint("%s", inet_ntoa(tmp_addr)); - } - } - fclose(f); - if (!found) - return -1; - return 0; -} - -#endif - -#ifdef _WIN32 -void slirp_cleanup(void) -{ - WSACleanup(); -} -#endif - -int slirp_init(void) -{ - // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); - -#ifdef _WIN32 - { - WSADATA Data; - WSAStartup(MAKEWORD(2,0), &Data); - atexit(slirp_cleanup); - } -#endif - - link_up = 1; - - if_init(); - ip_init(); - - /* Initialise mbufs *after* setting the MTU */ - m_init(); - - /* set default addresses */ - inet_aton("127.0.0.1", &loopback_addr); - - if (get_dns_addr(&dns_addr) < 0) - return -1; - - inet_aton(CTL_SPECIAL, &special_addr); - alias_addr.s_addr = special_addr.s_addr | htonl(CTL_ALIAS); - getouraddr(); - return 0; -} - -#define CONN_CANFSEND(so) (((so)->so_state & (SS_FCANTSENDMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) -#define CONN_CANFRCV(so) (((so)->so_state & (SS_FCANTRCVMORE|SS_ISFCONNECTED)) == SS_ISFCONNECTED) -#define UPD_NFDS(x) if (nfds < (x)) nfds = (x) - -/* - * curtime kept to an accuracy of 1ms - */ -#ifdef _WIN32 -static void updtime(void) -{ - struct _timeb tb; - - _ftime(&tb); - curtime = (u_int)tb.time * (u_int)1000; - curtime += (u_int)tb.millitm; -} -#else -static void updtime(void) -{ - gettimeofday(&tt, 0); - - curtime = (u_int)tt.tv_sec * (u_int)1000; - curtime += (u_int)tt.tv_usec / (u_int)1000; - - if ((tt.tv_usec % 1000) >= 500) - curtime++; -} -#endif - -int slirp_select_fill(int *pnfds, - fd_set *readfds, fd_set *writefds, fd_set *xfds) -{ - struct socket *so, *so_next; - int nfds; - int timeout, tmp_time; - - /* fail safe */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; - - nfds = *pnfds; - /* - * First, TCP sockets - */ - do_slowtimo = 0; - if (link_up) { - /* - * *_slowtimo needs calling if there are IP fragments - * in the fragment queue, or there are TCP connections active - */ - do_slowtimo = ((tcb.so_next != &tcb) || - (&ipq.ip_link != ipq.ip_link.next)); - - for (so = tcb.so_next; so != &tcb; so = so_next) { - so_next = so->so_next; - - /* - * See if we need a tcp_fasttimo - */ - if (time_fasttimo == 0 && so->so_tcpcb->t_flags & TF_DELACK) - time_fasttimo = curtime; /* Flag when we want a fasttimo */ - - /* - * NOFDREF can include still connecting to local-host, - * newly socreated() sockets etc. Don't want to select these. - */ - if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - - /* - * Set for reading sockets which are accepting - */ - if (so->so_state & SS_FACCEPTCONN) { - FD_SET(so->s, readfds); - UPD_NFDS(so->s); - continue; - } - - /* - * Set for writing sockets which are connecting - */ - if (so->so_state & SS_ISFCONNECTING) { - FD_SET(so->s, writefds); - UPD_NFDS(so->s); - continue; - } - - /* - * Set for writing if we are connected, can send more, and - * we have something to send - */ - if (CONN_CANFSEND(so) && so->so_rcv.sb_cc) { - FD_SET(so->s, writefds); - UPD_NFDS(so->s); - } - - /* - * Set for reading (and urgent data) if we are connected, can - * receive more, and we have room for it XXX /2 ? - */ - if (CONN_CANFRCV(so) && (so->so_snd.sb_cc < (so->so_snd.sb_datalen/2))) { - FD_SET(so->s, readfds); - FD_SET(so->s, xfds); - UPD_NFDS(so->s); - } - } - - /* - * UDP sockets - */ - for (so = udb.so_next; so != &udb; so = so_next) { - so_next = so->so_next; - - /* - * See if it's timed out - */ - if (so->so_expire) { - if (so->so_expire <= curtime) { - udp_detach(so); - continue; - } else - do_slowtimo = 1; /* Let socket expire */ - } - - /* - * When UDP packets are received from over the - * link, they're sendto()'d straight away, so - * no need for setting for writing - * Limit the number of packets queued by this session - * to 4. Note that even though we try and limit this - * to 4 packets, the session could have more queued - * if the packets needed to be fragmented - * (XXX <= 4 ?) - */ - if ((so->so_state & SS_ISFCONNECTED) && so->so_queued <= 4) { - FD_SET(so->s, readfds); - UPD_NFDS(so->s); - } - } - } - - /* - * Setup timeout to use minimum CPU usage, especially when idle - */ - - timeout = -1; - - /* - * If a slowtimo is needed, set timeout to 5ms from the last - * slow timeout. If a fast timeout is needed, set timeout within - * 2ms of when it was requested. - */ -# define SLOW_TIMO 5 -# define FAST_TIMO 2 - if (do_slowtimo) { - timeout = (SLOW_TIMO - (curtime - last_slowtimo)) * 1000; - if (timeout < 0) - timeout = 0; - else if (timeout > (SLOW_TIMO * 1000)) - timeout = SLOW_TIMO * 1000; - - /* Can only fasttimo if we also slowtimo */ - if (time_fasttimo) { - tmp_time = (FAST_TIMO - (curtime - time_fasttimo)) * 1000; - if (tmp_time < 0) - tmp_time = 0; - - /* Choose the smallest of the 2 */ - if (tmp_time < timeout) - timeout = tmp_time; - } - } - *pnfds = nfds; - - /* - * Adjust the timeout to make the minimum timeout - * 2ms (XXX?) to lessen the CPU load - */ - if (timeout < (FAST_TIMO * 1000)) - timeout = FAST_TIMO * 1000; - - return timeout; -} - -void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) -{ - struct socket *so, *so_next; - int ret; - - global_readfds = readfds; - global_writefds = writefds; - global_xfds = xfds; - - /* Update time */ - updtime(); - - /* - * See if anything has timed out - */ - if (link_up) { - if (time_fasttimo && ((curtime - time_fasttimo) >= FAST_TIMO)) { - tcp_fasttimo(); - time_fasttimo = 0; - } - if (do_slowtimo && ((curtime - last_slowtimo) >= SLOW_TIMO)) { - ip_slowtimo(); - tcp_slowtimo(); - last_slowtimo = curtime; - } - } - - /* - * Check sockets - */ - if (link_up) { - /* - * Check TCP sockets - */ - for (so = tcb.so_next; so != &tcb; so = so_next) { - so_next = so->so_next; - - /* - * FD_ISSET is meaningless on these sockets - * (and they can crash the program) - */ - if (so->so_state & SS_NOFDREF || so->s == -1) - continue; - - /* - * Check for URG data - * This will soread as well, so no need to - * test for readfds below if this succeeds - */ - if (FD_ISSET(so->s, xfds)) - sorecvoob(so); - /* - * Check sockets for reading - */ - else if (FD_ISSET(so->s, readfds)) { - /* - * Check for incoming connections - */ - if (so->so_state & SS_FACCEPTCONN) { - tcp_connect(so); - continue; - } /* else */ - ret = soread(so); - - /* Output it if we read something */ - if (ret > 0) - tcp_output(sototcpcb(so)); - } - - /* - * Check sockets for writing - */ - if (FD_ISSET(so->s, writefds)) { - /* - * Check for non-blocking, still-connecting sockets - */ - if (so->so_state & SS_ISFCONNECTING) { - /* Connected */ - so->so_state &= ~SS_ISFCONNECTING; - - ret = send(so->s, &ret, 0, 0); - if (ret < 0) { - /* XXXXX Must fix, zero bytes is a NOP */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - - /* else failed */ - so->so_state = SS_NOFDREF; - } - /* else so->so_state &= ~SS_ISFCONNECTING; */ - - /* - * Continue tcp_input - */ - tcp_input((struct mbuf *)NULL, sizeof(struct ip), so); - /* continue; */ - } else - ret = sowrite(so); - /* - * XXXXX If we wrote something (a lot), there - * could be a need for a window update. - * In the worst case, the remote will send - * a window probe to get things going again - */ - } - - /* - * Probe a still-connecting, non-blocking socket - * to check if it's still alive - */ -#ifdef PROBE_CONN - if (so->so_state & SS_ISFCONNECTING) { - ret = recv(so->s, (char *)&ret, 0,0); - - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; /* Still connecting, continue */ - - /* else failed */ - so->so_state = SS_NOFDREF; - - /* tcp_input will take care of it */ - } else { - ret = send(so->s, &ret, 0,0); - if (ret < 0) { - /* XXX */ - if (errno == EAGAIN || errno == EWOULDBLOCK || - errno == EINPROGRESS || errno == ENOTCONN) - continue; - /* else failed */ - so->so_state = SS_NOFDREF; - } else - so->so_state &= ~SS_ISFCONNECTING; - - } - tcp_input((struct mbuf *)NULL, sizeof(struct ip),so); - } /* SS_ISFCONNECTING */ -#endif - } - - /* - * Now UDP sockets. - * Incoming packets are sent straight away, they're not buffered. - * Incoming UDP data isn't buffered either. - */ - for (so = udb.so_next; so != &udb; so = so_next) { - so_next = so->so_next; - - if (so->s != -1 && FD_ISSET(so->s, readfds)) { - sorecvfrom(so); - } - } - } - - /* - * See if we can start outputting - */ - if (if_queued && link_up) - if_start(); - - /* clear global file descriptor sets. - * these reside on the stack in vl.c - * so they're unusable if we're not in - * slirp_select_fill or slirp_select_poll. - */ - global_readfds = NULL; - global_writefds = NULL; - global_xfds = NULL; -} - -#define ETH_ALEN 6 -#define ETH_HLEN 14 - -#define ETH_P_IP 0x0800 /* Internet Protocol packet */ -#define ETH_P_ARP 0x0806 /* Address Resolution packet */ - -#define ARPOP_REQUEST 1 /* ARP request */ -#define ARPOP_REPLY 2 /* ARP reply */ - -struct ethhdr -{ - unsigned char h_dest[ETH_ALEN]; /* destination eth addr */ - unsigned char h_source[ETH_ALEN]; /* source ether addr */ - unsigned short h_proto; /* packet type ID field */ -}; - -struct arphdr -{ - unsigned short ar_hrd; /* format of hardware address */ - unsigned short ar_pro; /* format of protocol address */ - unsigned char ar_hln; /* length of hardware address */ - unsigned char ar_pln; /* length of protocol address */ - unsigned short ar_op; /* ARP opcode (command) */ - - /* - * Ethernet looks like this : This bit is variable sized however... - */ - unsigned char ar_sha[ETH_ALEN]; /* sender hardware address */ - unsigned char ar_sip[4]; /* sender IP address */ - unsigned char ar_tha[ETH_ALEN]; /* target hardware address */ - unsigned char ar_tip[4]; /* target IP address */ -}; - -void arp_input(const uint8_t *pkt, int pkt_len) -{ - struct ethhdr *eh = (struct ethhdr *)pkt; - struct arphdr *ah = (struct arphdr *)(pkt + ETH_HLEN); - uint8_t arp_reply[ETH_HLEN + sizeof(struct arphdr)]; - struct ethhdr *reh = (struct ethhdr *)arp_reply; - struct arphdr *rah = (struct arphdr *)(arp_reply + ETH_HLEN); - int ar_op; - struct ex_list *ex_ptr; - - ar_op = ntohs(ah->ar_op); - switch(ar_op) { - case ARPOP_REQUEST: - if (!memcmp(ah->ar_tip, &special_addr, 3)) { - if (ah->ar_tip[3] == CTL_DNS || ah->ar_tip[3] == CTL_ALIAS) - goto arp_ok; - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_addr == ah->ar_tip[3]) - goto arp_ok; - } - return; - arp_ok: - /* XXX: make an ARP request to have the client address */ - memcpy(client_ethaddr, eh->h_source, ETH_ALEN); - - /* ARP request for alias/dns mac address */ - memcpy(reh->h_dest, pkt + ETH_ALEN, ETH_ALEN); - memcpy(reh->h_source, special_ethaddr, ETH_ALEN - 1); - reh->h_source[5] = ah->ar_tip[3]; - reh->h_proto = htons(ETH_P_ARP); - - rah->ar_hrd = htons(1); - rah->ar_pro = htons(ETH_P_IP); - rah->ar_hln = ETH_ALEN; - rah->ar_pln = 4; - rah->ar_op = htons(ARPOP_REPLY); - memcpy(rah->ar_sha, reh->h_source, ETH_ALEN); - memcpy(rah->ar_sip, ah->ar_tip, 4); - memcpy(rah->ar_tha, ah->ar_sha, ETH_ALEN); - memcpy(rah->ar_tip, ah->ar_sip, 4); - slirp_output(arp_reply, sizeof(arp_reply)); - } - break; - default: - break; - } -} - -void slirp_input(const uint8_t *pkt, int pkt_len) -{ - struct mbuf *m; - int proto; - - if (pkt_len < ETH_HLEN) - return; - - proto = (pkt[12] << 8) | pkt[13]; - switch(proto) { - case ETH_P_ARP: - arp_input(pkt, pkt_len); - break; - case ETH_P_IP: - m = m_get(); - if (!m) - return; - /* Note: we add to align the IP header */ - m->m_len = pkt_len + 2; - memcpy(m->m_data + 2, pkt, pkt_len); - - m->m_data += 2 + ETH_HLEN; - m->m_len -= 2 + ETH_HLEN; - - ip_input(m); - break; - default: - break; - } -} - -/* output the IP packet to the ethernet device */ -void if_encap(const uint8_t *ip_data, int ip_data_len) -{ - uint8_t buf[1600]; - struct ethhdr *eh = (struct ethhdr *)buf; - - if (ip_data_len + ETH_HLEN > sizeof(buf)) - return; - - memcpy(eh->h_dest, client_ethaddr, ETH_ALEN); - memcpy(eh->h_source, special_ethaddr, ETH_ALEN - 1); - /* XXX: not correct */ - eh->h_source[5] = CTL_ALIAS; - eh->h_proto = htons(ETH_P_IP); - memcpy(buf + sizeof(struct ethhdr), ip_data, ip_data_len); - slirp_output(buf, ip_data_len + ETH_HLEN); -} - -int slirp_redir(int is_udp, int host_port, - struct in_addr guest_addr, int guest_port) -{ - if (is_udp) { - if (!udp_listen(htons(host_port), guest_addr.s_addr, - htons(guest_port), 0)) - return -1; - } else { - if (!solisten(htons(host_port), guest_addr.s_addr, - htons(guest_port), 0)) - return -1; - } - return 0; -} - -int slirp_add_exec(int do_pty, const char *args, int addr_low_byte, - int guest_port) -{ - return add_exec(&exec_list, do_pty, (char *)args, - addr_low_byte, htons(guest_port)); -} diff --git a/SheepShaver/src/slirp/slirp.h b/SheepShaver/src/slirp/slirp.h deleted file mode 100755 index 16266f6c1..000000000 --- a/SheepShaver/src/slirp/slirp.h +++ /dev/null @@ -1,367 +0,0 @@ -#ifndef __COMMON_H__ -#define __COMMON_H__ - -#define CONFIG_QEMU - -#define DEBUG 1 - -#ifndef CONFIG_QEMU -#include "version.h" -#endif -#include "config.h" -#include "slirp_config.h" - -#ifdef _WIN32 -# include - -typedef uint8_t u_int8_t; -typedef uint16_t u_int16_t; -typedef uint32_t u_int32_t; -typedef uint64_t u_int64_t; -typedef char *caddr_t; -typedef int socklen_t; -typedef unsigned long ioctlsockopt_t; - -# include -# include -# include -# include - -# define USE_FIONBIO 1 -# define EWOULDBLOCK WSAEWOULDBLOCK -# define EINPROGRESS WSAEINPROGRESS -# define ENOTCONN WSAENOTCONN -# define EHOSTUNREACH WSAEHOSTUNREACH -# define ENETUNREACH WSAENETUNREACH -# define ECONNREFUSED WSAECONNREFUSED - -/* Basilisk II Router defines those */ -# define udp_read_completion slirp_udp_read_completion -# define write_udp slirp_write_udp -# define init_udp slirp_init_udp -# define final_udp slirp_final_udp -#else -# define WSAGetLastError() (int)(errno) -# define WSASetLastError(e) (void)(errno = (e)) -# define WSAEWOULDBLOCK EWOULDBLOCK -# define WSAEINPROGRESS EINPROGRESS -# define WSAENOTCONN ENOTCONN -# define WSAEHOSTUNREACH EHOSTUNREACH -# define WSAENETUNREACH ENETUNREACH -# define WSAECONNREFUSED ECONNREFUSED -typedef int ioctlsockopt_t; -# define ioctlsocket ioctl -# define closesocket(s) close(s) -# define O_BINARY 0 -#endif - -#include -#ifdef HAVE_SYS_BITYPES_H -# include -#endif -#ifdef HAVE_STDINT_H -# include -#endif - -#ifndef _WIN32 -#include -#endif - -#ifdef NEED_TYPEDEFS -typedef char int8_t; -typedef unsigned char u_int8_t; - -# if SIZEOF_SHORT == 2 - typedef short int16_t; - typedef unsigned short u_int16_t; -# else -# if SIZEOF_INT == 2 - typedef int int16_t; - typedef unsigned int u_int16_t; -# else - #error Cannot find a type with sizeof() == 2 -# endif -# endif - -# if SIZEOF_SHORT == 4 - typedef short int32_t; - typedef unsigned short u_int32_t; -# else -# if SIZEOF_INT == 4 - typedef int int32_t; - typedef unsigned int u_int32_t; -# else - #error Cannot find a type with sizeof() == 4 -# endif -# endif -#endif /* NEED_TYPEDEFS */ - -/* Basilisk II types glue */ -typedef u_int8_t uint8; -typedef u_int16_t uint16; -typedef u_int32_t uint32; - -#ifdef HAVE_UNISTD_H -# include -#endif - -#ifdef HAVE_STDLIB_H -# include -#endif - -#include -#include - -#ifndef HAVE_MEMMOVE -#define memmove(x, y, z) bcopy(y, x, z) -#endif - -#if TIME_WITH_SYS_TIME -# include -# include -#else -# if HAVE_SYS_TIME_H -# include -# else -# include -# endif -#endif - -#ifdef HAVE_STRING_H -# include -#else -# include -#endif - -#ifndef _WIN32 -#include -#include -#include -#endif - -#ifndef _P -#ifndef NO_PROTOTYPES -# define _P(x) x -#else -# define _P(x) () -#endif -#endif - - -#ifdef GETTIMEOFDAY_ONE_ARG -#define gettimeofday(x, y) gettimeofday(x) -#endif - -/* Systems lacking strdup() definition in . */ -#if defined(ultrix) -char *strdup _P((const char *)); -#endif - -/* Systems lacking malloc() definition in . */ -#if defined(ultrix) || defined(hcx) -void *malloc _P((size_t arg)); -void free _P((void *ptr)); -#endif - -#ifndef HAVE_INET_ATON -int inet_aton _P((const char *cp, struct in_addr *ia)); -#endif - -#include -#ifndef NO_UNIX_SOCKETS -#include -#endif -#include -#ifdef HAVE_SYS_SIGNAL_H -# include -#endif -#ifndef _WIN32 -#include -#endif - -#if defined(HAVE_SYS_IOCTL_H) -# include -#endif - -#ifdef HAVE_SYS_SELECT_H -# include -#endif - -#ifdef HAVE_SYS_WAIT_H -# include -#endif - -#ifdef HAVE_SYS_FILIO_H -# include -#endif - -#ifdef USE_PPP -#include -#endif - -#ifdef __STDC__ -#include -#else -#include -#endif - -#include - -/* Avoid conflicting with the libc insque() and remque(), which - have different prototypes. */ -#define insque slirp_insque -#define remque slirp_remque - -#ifdef HAVE_SYS_STROPTS_H -#include -#endif - -#include "debug.h" - -#if defined __GNUC__ -#define PACKED__ __attribute__ ((packed)) -#elif defined __sgi -#define PRAGMA_PACK_SUPPORTED 1 -#define PACKED__ -#else -#error "Packed attribute or pragma shall be supported" -#endif - -#include "ip.h" -#include "tcp.h" -#include "tcp_timer.h" -#include "tcp_var.h" -#include "tcpip.h" -#include "udp.h" -#include "icmp_var.h" -#include "mbuf.h" -#include "sbuf.h" -#include "socket.h" -#include "if.h" -#include "main.h" -#include "misc.h" -#include "ctl.h" -#ifdef USE_PPP -#include "ppp/pppd.h" -#include "ppp/ppp.h" -#endif - -#include "bootp.h" -#include "tftp.h" -#include "libslirp.h" - -extern struct ttys *ttys_unit[MAX_INTERFACES]; - -#ifndef NULL -#define NULL (void *)0 -#endif - -#ifndef FULL_BOLT -void if_start _P((void)); -#else -void if_start _P((struct ttys *)); -#endif - -#ifdef BAD_SPRINTF -# define vsprintf vsprintf_len -# define sprintf sprintf_len - extern int vsprintf_len _P((char *, const char *, va_list)); - extern int sprintf_len _P((char *, const char *, ...)); -#endif - -#ifdef DECLARE_SPRINTF -# ifndef BAD_SPRINTF - extern int vsprintf _P((char *, const char *, va_list)); -# endif - extern int vfprintf _P((FILE *, const char *, va_list)); -#endif - -#ifndef HAVE_STRERROR - extern char *strerror _P((int error)); -#endif - -#ifndef HAVE_INDEX - char *index _P((const char *, int)); -#endif - -#ifndef HAVE_GETHOSTID - long gethostid _P((void)); -#endif - -void lprint _P((const char *, ...)); - -extern int do_echo; - -#ifndef _WIN32 -#include -#endif - -#define DEFAULT_BAUD 115200 - -/* cksum.c */ -int cksum(struct mbuf *m, int len); - -/* if.c */ -void if_init _P((void)); -void if_output _P((struct socket *, struct mbuf *)); - -/* ip_input.c */ -void ip_init _P((void)); -void ip_input _P((struct mbuf *)); -static struct ip * -ip_reass(register struct ip *ip, register struct ipq *); -void ip_freef _P((struct ipq *)); -void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); -void ip_deq _P((register struct ipasfrag *)); -void ip_slowtimo _P((void)); -void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); - -/* ip_output.c */ -int ip_output _P((struct socket *, struct mbuf *)); - -/* tcp_input.c */ -int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); -void tcp_input _P((register struct mbuf *, int, struct socket *)); -void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); -void tcp_xmit_timer _P((register struct tcpcb *, int)); -int tcp_mss _P((register struct tcpcb *, u_int)); - -/* tcp_output.c */ -int tcp_output _P((register struct tcpcb *)); -void tcp_setpersist _P((register struct tcpcb *)); - -/* tcp_subr.c */ -void tcp_init _P((void)); -void tcp_template _P((struct tcpcb *)); -void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); -struct tcpcb * tcp_newtcpcb _P((struct socket *)); -struct tcpcb * tcp_close _P((register struct tcpcb *)); -void tcp_drain _P((void)); -void tcp_sockclosed _P((struct tcpcb *)); -int tcp_fconnect _P((struct socket *)); -void tcp_connect _P((struct socket *)); -int tcp_attach _P((struct socket *)); -u_int8_t tcp_tos _P((struct socket *)); -int tcp_emu _P((struct socket *, struct mbuf *)); -int tcp_ctl _P((struct socket *)); -struct tcpcb *tcp_drop(struct tcpcb *tp, int err); - -#ifdef USE_PPP -#define MIN_MRU MINMRU -#define MAX_MRU MAXMRU -#else -#define MIN_MRU 128 -#define MAX_MRU 16384 -#endif - -#ifndef _WIN32 -#define min(x,y) ((x) < (y) ? (x) : (y)) -#define max(x,y) ((x) > (y) ? (x) : (y)) -#endif - -#ifdef _WIN32 -#undef errno -#define errno (WSAGetLastError()) -#endif - -#endif diff --git a/SheepShaver/src/slirp/slirp_config.h b/SheepShaver/src/slirp/slirp_config.h deleted file mode 100755 index e583dcc80..000000000 --- a/SheepShaver/src/slirp/slirp_config.h +++ /dev/null @@ -1,135 +0,0 @@ -/* - * User definable configuration options - */ - -/* Undefine if you don't want talk emulation */ -#undef EMULATE_TALK - -/* Define if you want the connection to be probed */ -/* XXX Not working yet, so ignore this for now */ -#undef PROBE_CONN - -/* Define to 1 if you want KEEPALIVE timers */ -#define DO_KEEPALIVE 0 - -/* Define to MAX interfaces you expect to use at once */ -/* MAX_INTERFACES determines the max. TOTAL number of interfaces (SLIP and PPP) */ -/* MAX_PPP_INTERFACES determines max. number of PPP interfaces */ -#define MAX_INTERFACES 1 -#define MAX_PPP_INTERFACES 1 - -/* Define if you want slirp's socket in /tmp */ -/* XXXXXX Do this in ./configure */ -#undef USE_TMPSOCKET - -/* Define if you want slirp to use cfsetXspeed() on the terminal */ -#undef DO_CFSETSPEED - -/* Define this if you want slirp to write to the tty as fast as it can */ -/* This should only be set if you are using load-balancing, slirp does a */ -/* pretty good job on single modems already, and seting this will make */ -/* interactive sessions less responsive */ -/* XXXXX Talk about having fast modem as unit 0 */ -#undef FULL_BOLT - -/* - * Define if you want slirp to use less CPU - * You will notice a small lag in interactive sessions, but it's not that bad - * Things like Netscape/ftp/etc. are completely unaffected - * This is mainly for sysadmins who have many slirp users - */ -#undef USE_LOWCPU - -/* Define this if your compiler doesn't like prototypes */ -#ifndef __STDC__ -#define NO_PROTOTYPES -#endif - -/*********************************************************/ -/* - * Autoconf defined configuration options - * You shouldn't need to touch any of these - */ - -/* Ignore this */ -#undef DUMMY_PPP - -/* XXX: Define according to how time.h should be included */ -#undef TIME_WITH_SYS_TIME -#define TIME_WITH_SYS_TIME 0 -#undef HAVE_SYS_TIME_H - -/* Define if your sprintf returns char * instead of int */ -#undef BAD_SPRINTF - -/* Define if you have readv */ -#undef HAVE_READV - -/* Define if iovec needs to be declared */ -#undef DECLARE_IOVEC -#ifdef _WIN32 -#define DECLARE_IOVEC -#endif - -/* Define if a declaration of sprintf/fprintf is needed */ -#undef DECLARE_SPRINTF - -/* Define if you have sys/stropts.h */ -#undef HAVE_SYS_STROPTS_H - -/* Define if your compiler doesn't like prototypes */ -#undef NO_PROTOTYPES - -/* Define if you don't have u_int32_t etc. typedef'd */ -#undef NEED_TYPEDEFS -#ifdef __sun__ -#define NEED_TYPEDEFS -#endif - -/* Define to sizeof(char *) */ -#define SIZEOF_CHAR_P SIZEOF_VOID_P - -/* Define if you have random() */ -#undef HAVE_RANDOM - -/* Define if you have srandom() */ -#undef HAVE_SRANDOM - -/* Define if you have setenv */ -#undef HAVE_SETENV - -/* Define if you have index() */ -#undef HAVE_INDEX - -/* Define if you have bcmp() */ -#undef HAVE_BCMP - -/* Define if you have drand48 */ -#undef HAVE_DRAND48 - -/* Define if you have memmove */ -#define HAVE_MEMMOVE - -/* Define if you have gethostid */ -#undef HAVE_GETHOSTID - -/* Define if you DON'T have unix-domain sockets */ -#undef NO_UNIX_SOCKETS -#ifdef _WIN32 -#define NO_UNIX_SOCKETS -#endif - -/* Define if gettimeofday only takes one argument */ -#undef GETTIMEOFDAY_ONE_ARG - -/* Define if you have revoke() */ -#undef HAVE_REVOKE - -/* Define if you have the sysv method of opening pty's (/dev/ptmx, etc.) */ -#undef HAVE_GRANTPT - -/* Define if you have fchmod */ -#undef HAVE_FCHMOD - -/* Define if you have */ -#undef HAVE_SYS_TYPES32_H diff --git a/SheepShaver/src/slirp/socket.c b/SheepShaver/src/slirp/socket.c deleted file mode 100755 index f3d10e538..000000000 --- a/SheepShaver/src/slirp/socket.c +++ /dev/null @@ -1,722 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include -#include "ip_icmp.h" -#include "main.h" -#ifdef __sun__ -#include -#endif - -void -so_init() -{ - /* Nothing yet */ -} - - -struct socket * -solookup(head, laddr, lport, faddr, fport) - struct socket *head; - struct in_addr laddr; - u_int lport; - struct in_addr faddr; - u_int fport; -{ - struct socket *so; - - for (so = head->so_next; so != head; so = so->so_next) { - if (so->so_lport == lport && - so->so_laddr.s_addr == laddr.s_addr && - so->so_faddr.s_addr == faddr.s_addr && - so->so_fport == fport) - break; - } - - if (so == head) - return (struct socket *)NULL; - return so; - -} - -/* - * Create a new socket, initialise the fields - * It is the responsibility of the caller to - * insque() it into the correct linked-list - */ -struct socket * -socreate() -{ - struct socket *so; - - so = (struct socket *)malloc(sizeof(struct socket)); - if(so) { - memset(so, 0, sizeof(struct socket)); - so->so_state = SS_NOFDREF; - so->s = -1; - } - return(so); -} - -/* - * remque and free a socket, clobber cache - */ -void -sofree(so) - struct socket *so; -{ - if (so->so_emu==EMU_RSH && so->extra) { - sofree(so->extra); - so->extra=NULL; - } - if (so == tcp_last_so) - tcp_last_so = &tcb; - else if (so == udp_last_so) - udp_last_so = &udb; - - m_free(so->so_m); - - if(so->so_next && so->so_prev) - remque(so); /* crashes if so is not in a queue */ - - free(so); -} - -/* - * Read from so's socket into sb_snd, updating all relevant sbuf fields - * NOTE: This will only be called if it is select()ed for reading, so - * a read() of 0 (or less) means it's disconnected - */ -int -soread(so) - struct socket *so; -{ - int n, nn, lss, total; - struct sbuf *sb = &so->so_snd; - int len = sb->sb_datalen - sb->sb_cc; - struct iovec iov[2]; - int mss = so->so_tcpcb->t_maxseg; - - DEBUG_CALL("soread"); - DEBUG_ARG("so = %lx", (long )so); - - /* - * No need to check if there's enough room to read. - * soread wouldn't have been called if there weren't - */ - - len = sb->sb_datalen - sb->sb_cc; - - iov[0].iov_base = sb->sb_wptr; - if (sb->sb_wptr < sb->sb_rptr) { - iov[0].iov_len = sb->sb_rptr - sb->sb_wptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) - iov[0].iov_len = len; - if (iov[0].iov_len > mss) - iov[0].iov_len -= iov[0].iov_len%mss; - n = 1; - } else { - iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_wptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) iov[0].iov_len = len; - len -= iov[0].iov_len; - if (len) { - iov[1].iov_base = sb->sb_data; - iov[1].iov_len = sb->sb_rptr - sb->sb_data; - if(iov[1].iov_len > len) - iov[1].iov_len = len; - total = iov[0].iov_len + iov[1].iov_len; - if (total > mss) { - lss = total%mss; - if (iov[1].iov_len > lss) { - iov[1].iov_len -= lss; - n = 2; - } else { - lss -= iov[1].iov_len; - iov[0].iov_len -= lss; - n = 1; - } - } else - n = 2; - } else { - if (iov[0].iov_len > mss) - iov[0].iov_len -= iov[0].iov_len%mss; - n = 1; - } - } - -#ifdef HAVE_READV - nn = readv(so->s, (struct iovec *)iov, n); - DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); -#else - nn = recv(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif - if (nn <= 0) { - if (nn < 0 && (errno == EINTR || errno == EAGAIN)) - return 0; - else { - DEBUG_MISC((dfd, " --- soread() disconnected, nn = %d, errno = %d-%s\n", nn, errno,strerror(errno))); - sofcantrcvmore(so); - tcp_sockclosed(sototcpcb(so)); - return -1; - } - } - -#ifndef HAVE_READV - /* - * If there was no error, try and read the second time round - * We read again if n = 2 (ie, there's another part of the buffer) - * and we read as much as we could in the first read - * We don't test for <= 0 this time, because there legitimately - * might not be any more data (since the socket is non-blocking), - * a close will be detected on next iteration. - * A return of -1 wont (shouldn't) happen, since it didn't happen above - */ - if (n == 2 && nn == iov[0].iov_len) { - int ret; - ret = recv(so->s, iov[1].iov_base, iov[1].iov_len,0); - if (ret > 0) - nn += ret; - } - - DEBUG_MISC((dfd, " ... read nn = %d bytes\n", nn)); -#endif - - /* Update fields */ - sb->sb_cc += nn; - sb->sb_wptr += nn; - if (sb->sb_wptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_wptr -= sb->sb_datalen; - return nn; -} - -/* - * Get urgent data - * - * When the socket is created, we set it SO_OOBINLINE, - * so when OOB data arrives, we soread() it and everything - * in the send buffer is sent as urgent data - */ -void -sorecvoob(so) - struct socket *so; -{ - struct tcpcb *tp = sototcpcb(so); - - DEBUG_CALL("sorecvoob"); - DEBUG_ARG("so = %lx", (long)so); - - /* - * We take a guess at how much urgent data has arrived. - * In most situations, when urgent data arrives, the next - * read() should get all the urgent data. This guess will - * be wrong however if more data arrives just after the - * urgent data, or the read() doesn't return all the - * urgent data. - */ - soread(so); - tp->snd_up = tp->snd_una + so->so_snd.sb_cc; - tp->t_force = 1; - tcp_output(tp); - tp->t_force = 0; -} - -/* - * Send urgent data - * There's a lot duplicated code here, but... - */ -int -sosendoob(so) - struct socket *so; -{ - struct sbuf *sb = &so->so_rcv; - char buff[2048]; /* XXX Shouldn't be sending more oob data than this */ - - int n, len; - - DEBUG_CALL("sosendoob"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("sb->sb_cc = %d", sb->sb_cc); - - if (so->so_urgc > 2048) - so->so_urgc = 2048; /* XXXX */ - - if (sb->sb_rptr < sb->sb_wptr) { - /* We can send it directly */ - n = send(so->s, sb->sb_rptr, so->so_urgc, (MSG_OOB)); /* |MSG_DONTWAIT)); */ - so->so_urgc -= n; - - DEBUG_MISC((dfd, " --- sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); - } else { - /* - * Since there's no sendv or sendtov like writev, - * we must copy all data to a linear buffer then - * send it all - */ - len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; - if (len > so->so_urgc) len = so->so_urgc; - memcpy(buff, sb->sb_rptr, len); - so->so_urgc -= len; - if (so->so_urgc) { - n = sb->sb_wptr - sb->sb_data; - if (n > so->so_urgc) n = so->so_urgc; - memcpy((buff + len), sb->sb_data, n); - so->so_urgc -= n; - len += n; - } - n = send(so->s, buff, len, (MSG_OOB)); /* |MSG_DONTWAIT)); */ -#ifdef DEBUG - if (n != len) - DEBUG_ERROR((dfd, "Didn't send all data urgently XXXXX\n")); -#endif - DEBUG_MISC((dfd, " ---2 sent %d bytes urgent data, %d urgent bytes left\n", n, so->so_urgc)); - } - - sb->sb_cc -= n; - sb->sb_rptr += n; - if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_rptr -= sb->sb_datalen; - - return n; -} - -/* - * Write data from so_rcv to so's socket, - * updating all sbuf field as necessary - */ -int -sowrite(so) - struct socket *so; -{ - int n,nn; - struct sbuf *sb = &so->so_rcv; - int len = sb->sb_cc; - struct iovec iov[2]; - - DEBUG_CALL("sowrite"); - DEBUG_ARG("so = %lx", (long)so); - - if (so->so_urgc) { - sosendoob(so); - if (sb->sb_cc == 0) - return 0; - } - - /* - * No need to check if there's something to write, - * sowrite wouldn't have been called otherwise - */ - - len = sb->sb_cc; - - iov[0].iov_base = sb->sb_rptr; - if (sb->sb_rptr < sb->sb_wptr) { - iov[0].iov_len = sb->sb_wptr - sb->sb_rptr; - /* Should never succeed, but... */ - if (iov[0].iov_len > len) iov[0].iov_len = len; - n = 1; - } else { - iov[0].iov_len = (sb->sb_data + sb->sb_datalen) - sb->sb_rptr; - if (iov[0].iov_len > len) iov[0].iov_len = len; - len -= iov[0].iov_len; - if (len) { - iov[1].iov_base = sb->sb_data; - iov[1].iov_len = sb->sb_wptr - sb->sb_data; - if (iov[1].iov_len > len) iov[1].iov_len = len; - n = 2; - } else - n = 1; - } - /* Check if there's urgent data to send, and if so, send it */ - -#ifdef HAVE_READV - nn = writev(so->s, (const struct iovec *)iov, n); - - DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); -#else - nn = send(so->s, iov[0].iov_base, iov[0].iov_len,0); -#endif - /* This should never happen, but people tell me it does *shrug* */ - if (nn < 0 && (errno == EAGAIN || errno == EINTR)) - return 0; - - if (nn <= 0) { - DEBUG_MISC((dfd, " --- sowrite disconnected, so->so_state = %x, errno = %d\n", - so->so_state, errno)); - sofcantsendmore(so); - tcp_sockclosed(sototcpcb(so)); - return -1; - } - -#ifndef HAVE_READV - if (n == 2 && nn == iov[0].iov_len) { - int ret; - ret = send(so->s, iov[1].iov_base, iov[1].iov_len,0); - if (ret > 0) - nn += ret; - } - DEBUG_MISC((dfd, " ... wrote nn = %d bytes\n", nn)); -#endif - - /* Update sbuf */ - sb->sb_cc -= nn; - sb->sb_rptr += nn; - if (sb->sb_rptr >= (sb->sb_data + sb->sb_datalen)) - sb->sb_rptr -= sb->sb_datalen; - - /* - * If in DRAIN mode, and there's no more data, set - * it CANTSENDMORE - */ - if ((so->so_state & SS_FWDRAIN) && sb->sb_cc == 0) - sofcantsendmore(so); - - return nn; -} - -/* - * recvfrom() a UDP socket - */ -void -sorecvfrom(so) - struct socket *so; -{ - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - - DEBUG_CALL("sorecvfrom"); - DEBUG_ARG("so = %lx", (long)so); - - if (so->so_type == IPPROTO_ICMP) { /* This is a "ping" reply */ - char buff[256]; - int len; - - len = recvfrom(so->s, buff, 256, 0, - (struct sockaddr *)&addr, &addrlen); - /* XXX Check if reply is "correct"? */ - - if(len == -1 || len == 0) { - u_char code=ICMP_UNREACH_PORT; - - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; - - DEBUG_MISC((dfd," udp icmp rx errno = %d-%s\n", - errno,strerror(errno))); - icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); - } else { - icmp_reflect(so->so_m); - so->so_m = 0; /* Don't m_free() it again! */ - } - /* No need for this socket anymore, udp_detach it */ - udp_detach(so); - } else { /* A "normal" UDP packet */ - struct mbuf *m; - int len; - ioctlsockopt_t n; - - if (!(m = m_get())) return; - m->m_data += if_maxlinkhdr; - - /* - * XXX Shouldn't FIONREAD packets destined for port 53, - * but I don't know the max packet size for DNS lookups - */ - len = M_FREEROOM(m); - /* if (so->so_fport != htons(53)) { */ - ioctlsocket(so->s, FIONREAD, &n); - - if (n > len) { - n = (m->m_data - m->m_dat) + m->m_len + n + 1; - m_inc(m, n); - len = M_FREEROOM(m); - } - /* } */ - - m->m_len = recvfrom(so->s, m->m_data, len, 0, - (struct sockaddr *)&addr, &addrlen); - DEBUG_MISC((dfd, " did recvfrom %d, errno = %d-%s\n", - m->m_len, errno,strerror(errno))); - if(m->m_len<0) { - u_char code=ICMP_UNREACH_PORT; - - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - else if(errno == ENETUNREACH) code=ICMP_UNREACH_NET; - - DEBUG_MISC((dfd," rx error, tx icmp ICMP_UNREACH:%i\n", code)); - icmp_error(so->so_m, ICMP_UNREACH,code, 0,strerror(errno)); - m_free(m); - } else { - /* - * Hack: domain name lookup will be used the most for UDP, - * and since they'll only be used once there's no need - * for the 4 minute (or whatever) timeout... So we time them - * out much quicker (10 seconds for now...) - */ - if (so->so_expire) { - if (so->so_fport == htons(53)) - so->so_expire = curtime + SO_EXPIREFAST; - else - so->so_expire = curtime + SO_EXPIRE; - } - - /* if (m->m_len == len) { - * m_inc(m, MINCSIZE); - * m->m_len = 0; - * } - */ - - /* - * If this packet was destined for CTL_ADDR, - * make it look like that's where it came from, done by udp_output - */ - udp_output(so, m, &addr); - } /* rx error */ - } /* if ping packet */ -} - -/* - * sendto() a socket - */ -int -sosendto(so, m) - struct socket *so; - struct mbuf *m; -{ - int ret; - struct sockaddr_in addr; - - DEBUG_CALL("sosendto"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else - addr.sin_addr = so->so_faddr; - addr.sin_port = so->so_fport; - - DEBUG_MISC((dfd, " sendto()ing, addr.sin_port=%d, addr.sin_addr.s_addr=%.16s\n", ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); - - /* Don't care what port we get */ - ret = sendto(so->s, m->m_data, m->m_len, 0, - (struct sockaddr *)&addr, sizeof (struct sockaddr)); - if (ret < 0) - return -1; - - /* - * Kill the socket if there's no reply in 4 minutes, - * but only if it's an expirable socket - */ - if (so->so_expire) - so->so_expire = curtime + SO_EXPIRE; - so->so_state = SS_ISFCONNECTED; /* So that it gets select()ed */ - return 0; -} - -/* - * XXX This should really be tcp_listen - */ -struct socket * -solisten(port, laddr, lport, flags) - u_int port; - u_int32_t laddr; - u_int lport; - int flags; -{ - struct sockaddr_in addr; - struct socket *so; - int s; - socklen_t addrlen = sizeof(addr); - int opt = 1; - - DEBUG_CALL("solisten"); - DEBUG_ARG("port = %d", port); - DEBUG_ARG("laddr = %x", laddr); - DEBUG_ARG("lport = %d", lport); - DEBUG_ARG("flags = %x", flags); - - if ((so = socreate()) == NULL) { - /* free(so); Not sofree() ??? free(NULL) == NOP */ - return NULL; - } - - /* Don't tcp_attach... we don't need so_snd nor so_rcv */ - if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) { - free(so); - return NULL; - } - insque(so,&tcb); - - /* - * SS_FACCEPTONCE sockets must time out. - */ - if (flags & SS_FACCEPTONCE) - so->so_tcpcb->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT*2; - - so->so_state = (SS_FACCEPTCONN|flags); - so->so_lport = lport; /* Kept in network format */ - so->so_laddr.s_addr = laddr; /* Ditto */ - - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_addr.s_addr = INADDR_ANY; - addr.sin_port = port; - - if (((s = socket(AF_INET,SOCK_STREAM,0)) < 0) || - (setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)) < 0) || - (bind(s,(struct sockaddr *)&addr, sizeof(addr)) < 0) || - (listen(s,1) < 0)) { - int tmperrno = errno; /* Don't clobber the real reason we failed */ - - close(s); - sofree(so); - /* Restore the real errno */ -#ifdef _WIN32 - WSASetLastError(tmperrno); -#else - errno = tmperrno; -#endif - return NULL; - } - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - - getsockname(s,(struct sockaddr *)&addr,&addrlen); - so->so_fport = addr.sin_port; - if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - else - so->so_faddr = addr.sin_addr; - - so->s = s; - return so; -} - -/* - * Data is available in so_rcv - * Just write() the data to the socket - * XXX not yet... - */ -void -sorwakeup(so) - struct socket *so; -{ -/* sowrite(so); */ -/* FD_CLR(so->s,&writefds); */ -} - -/* - * Data has been freed in so_snd - * We have room for a read() if we want to - * For now, don't read, it'll be done in the main loop - */ -void -sowwakeup(so) - struct socket *so; -{ - /* Nothing, yet */ -} - -/* - * Various session state calls - * XXX Should be #define's - * The socket state stuff needs work, these often get call 2 or 3 - * times each when only 1 was needed - */ -void -soisfconnecting(so) - register struct socket *so; -{ - so->so_state &= ~(SS_NOFDREF|SS_ISFCONNECTED|SS_FCANTRCVMORE| - SS_FCANTSENDMORE|SS_FWDRAIN); - so->so_state |= SS_ISFCONNECTING; /* Clobber other states */ -} - -void -soisfconnected(so) - register struct socket *so; -{ - so->so_state &= ~(SS_ISFCONNECTING|SS_FWDRAIN|SS_NOFDREF); - so->so_state |= SS_ISFCONNECTED; /* Clobber other states */ -} - -void -sofcantrcvmore(so) - struct socket *so; -{ - if ((so->so_state & SS_NOFDREF) == 0) { - shutdown(so->s,0); - if(global_writefds) { - FD_CLR(so->s,global_writefds); - } - } - so->so_state &= ~(SS_ISFCONNECTING); - if (so->so_state & SS_FCANTSENDMORE) - so->so_state = SS_NOFDREF; /* Don't select it */ /* XXX close() here as well? */ - else - so->so_state |= SS_FCANTRCVMORE; -} - -void -sofcantsendmore(so) - struct socket *so; -{ - if ((so->so_state & SS_NOFDREF) == 0) { - shutdown(so->s,1); /* send FIN to fhost */ - if (global_readfds) { - FD_CLR(so->s,global_readfds); - } - if (global_xfds) { - FD_CLR(so->s,global_xfds); - } - } - so->so_state &= ~(SS_ISFCONNECTING); - if (so->so_state & SS_FCANTRCVMORE) - so->so_state = SS_NOFDREF; /* as above */ - else - so->so_state |= SS_FCANTSENDMORE; -} - -void -soisfdisconnected(so) - struct socket *so; -{ -/* so->so_state &= ~(SS_ISFCONNECTING|SS_ISFCONNECTED); */ -/* close(so->s); */ -/* so->so_state = SS_ISFDISCONNECTED; */ - /* - * XXX Do nothing ... ? - */ -} - -/* - * Set write drain mode - * Set CANTSENDMORE once all data has been write()n - */ -void -sofwdrain(so) - struct socket *so; -{ - if (so->so_rcv.sb_cc) - so->so_state |= SS_FWDRAIN; - else - sofcantsendmore(so); -} - diff --git a/SheepShaver/src/slirp/socket.h b/SheepShaver/src/slirp/socket.h deleted file mode 100755 index d05354c8c..000000000 --- a/SheepShaver/src/slirp/socket.h +++ /dev/null @@ -1,104 +0,0 @@ -/* - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -/* MINE */ - -#ifndef _SLIRP_SOCKET_H_ -#define _SLIRP_SOCKET_H_ - -#define SO_EXPIRE 240000 -#define SO_EXPIREFAST 10000 - -/* - * Our socket structure - */ - -struct socket { - struct socket *so_next,*so_prev; /* For a linked list of sockets */ - - int s; /* The actual socket */ - - /* XXX union these with not-yet-used sbuf params */ - struct mbuf *so_m; /* Pointer to the original SYN packet, - * for non-blocking connect()'s, and - * PING reply's */ - struct tcpiphdr *so_ti; /* Pointer to the original ti within - * so_mconn, for non-blocking connections */ - int so_urgc; - struct in_addr so_faddr; /* foreign host table entry */ - struct in_addr so_laddr; /* local host table entry */ - u_int16_t so_fport; /* foreign port */ - u_int16_t so_lport; /* local port */ - - u_int8_t so_iptos; /* Type of service */ - u_int8_t so_emu; /* Is the socket emulated? */ - - u_char so_type; /* Type of socket, UDP or TCP */ - int so_state; /* internal state flags SS_*, below */ - - struct tcpcb *so_tcpcb; /* pointer to TCP protocol control block */ - u_int so_expire; /* When the socket will expire */ - - int so_queued; /* Number of packets queued from this socket */ - int so_nqueued; /* Number of packets queued in a row - * Used to determine when to "downgrade" a session - * from fastq to batchq */ - - struct sbuf so_rcv; /* Receive buffer */ - struct sbuf so_snd; /* Send buffer */ - void * extra; /* Extra pointer */ -}; - - -/* - * Socket state bits. (peer means the host on the Internet, - * local host means the host on the other end of the modem) - */ -#define SS_NOFDREF 0x001 /* No fd reference */ - -#define SS_ISFCONNECTING 0x002 /* Socket is connecting to peer (non-blocking connect()'s) */ -#define SS_ISFCONNECTED 0x004 /* Socket is connected to peer */ -#define SS_FCANTRCVMORE 0x008 /* Socket can't receive more from peer (for half-closes) */ -#define SS_FCANTSENDMORE 0x010 /* Socket can't send more to peer (for half-closes) */ -/* #define SS_ISFDISCONNECTED 0x020*/ /* Socket has disconnected from peer, in 2MSL state */ -#define SS_FWDRAIN 0x040 /* We received a FIN, drain data and set SS_FCANTSENDMORE */ - -#define SS_CTL 0x080 -#define SS_FACCEPTCONN 0x100 /* Socket is accepting connections from a host on the internet */ -#define SS_FACCEPTONCE 0x200 /* If set, the SS_FACCEPTCONN socket will die after one accept */ - -extern struct socket tcb; - - -#if defined(DECLARE_IOVEC) && !defined(HAVE_READV) -struct iovec { - char *iov_base; - size_t iov_len; -}; -#endif - -void so_init _P((void)); -struct socket * solookup _P((struct socket *, struct in_addr, u_int, struct in_addr, u_int)); -struct socket * socreate _P((void)); -void sofree _P((struct socket *)); -int soread _P((struct socket *)); -void sorecvoob _P((struct socket *)); -int sosendoob _P((struct socket *)); -int sowrite _P((struct socket *)); -void sorecvfrom _P((struct socket *)); -int sosendto _P((struct socket *, struct mbuf *)); -struct socket * solisten _P((u_int, u_int32_t, u_int, int)); -void sorwakeup _P((struct socket *)); -void sowwakeup _P((struct socket *)); -void soisfconnecting _P((register struct socket *)); -void soisfconnected _P((register struct socket *)); -void sofcantrcvmore _P((struct socket *)); -void sofcantsendmore _P((struct socket *)); -void soisfdisconnected _P((struct socket *)); -void sofwdrain _P((struct socket *)); - -#endif /* _SOCKET_H_ */ diff --git a/SheepShaver/src/slirp/tcp.h b/SheepShaver/src/slirp/tcp.h deleted file mode 100755 index 5f03f9e17..000000000 --- a/SheepShaver/src/slirp/tcp.h +++ /dev/null @@ -1,181 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp.h 8.1 (Berkeley) 6/10/93 - * tcp.h,v 1.3 1994/08/21 05:27:34 paul Exp - */ - -#ifndef _TCP_H_ -#define _TCP_H_ - -typedef u_int32_t tcp_seq; - -#define PR_SLOWHZ 2 /* 2 slow timeouts per second (approx) */ -#define PR_FASTHZ 5 /* 5 fast timeouts per second (not important) */ - -extern int tcp_rcvspace; -extern int tcp_sndspace; -extern struct socket *tcp_last_so; - -#define TCP_SNDSPACE 8192 -#define TCP_RCVSPACE 8192 - -/* - * TCP header. - * Per RFC 793, September, 1981. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct tcphdr { - u_int16_t th_sport; /* source port */ - u_int16_t th_dport; /* destination port */ - tcp_seq th_seq; /* sequence number */ - tcp_seq th_ack; /* acknowledgement number */ -#ifdef WORDS_BIGENDIAN - u_char th_off:4, /* data offset */ - th_x2:4; /* (unused) */ -#else - u_char th_x2:4, /* (unused) */ - th_off:4; /* data offset */ -#endif - u_int8_t th_flags; -#define TH_FIN 0x01 -#define TH_SYN 0x02 -#define TH_RST 0x04 -#define TH_PUSH 0x08 -#define TH_ACK 0x10 -#define TH_URG 0x20 - u_int16_t th_win; /* window */ - u_int16_t th_sum; /* checksum */ - u_int16_t th_urp; /* urgent pointer */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -#include "tcp_var.h" - -#define TCPOPT_EOL 0 -#define TCPOPT_NOP 1 -#define TCPOPT_MAXSEG 2 -#define TCPOLEN_MAXSEG 4 -#define TCPOPT_WINDOW 3 -#define TCPOLEN_WINDOW 3 -#define TCPOPT_SACK_PERMITTED 4 /* Experimental */ -#define TCPOLEN_SACK_PERMITTED 2 -#define TCPOPT_SACK 5 /* Experimental */ -#define TCPOPT_TIMESTAMP 8 -#define TCPOLEN_TIMESTAMP 10 -#define TCPOLEN_TSTAMP_APPA (TCPOLEN_TIMESTAMP+2) /* appendix A */ - -#define TCPOPT_TSTAMP_HDR \ - (TCPOPT_NOP<<24|TCPOPT_NOP<<16|TCPOPT_TIMESTAMP<<8|TCPOLEN_TIMESTAMP) - -/* - * Default maximum segment size for TCP. - * With an IP MSS of 576, this is 536, - * but 512 is probably more convenient. - * This should be defined as MIN(512, IP_MSS - sizeof (struct tcpiphdr)). - * - * We make this 1460 because we only care about Ethernet in the qemu context. - */ -#define TCP_MSS 1460 - -#define TCP_MAXWIN 65535 /* largest value for (unscaled) window */ - -#define TCP_MAX_WINSHIFT 14 /* maximum window shift */ - -/* - * User-settable options (used with setsockopt). - * - * We don't use the system headers on unix because we have conflicting - * local structures. We can't avoid the system definitions on Windows, - * so we undefine them. - */ -#undef TCP_NODELAY -#define TCP_NODELAY 0x01 /* don't delay send to coalesce packets */ -#undef TCP_MAXSEG -/* #define TCP_MAXSEG 0x02 */ /* set maximum segment size */ - -/* - * TCP FSM state definitions. - * Per RFC793, September, 1981. - */ - -#define TCP_NSTATES 11 - -#define TCPS_CLOSED 0 /* closed */ -#define TCPS_LISTEN 1 /* listening for connection */ -#define TCPS_SYN_SENT 2 /* active, have sent syn */ -#define TCPS_SYN_RECEIVED 3 /* have send and received syn */ -/* states < TCPS_ESTABLISHED are those where connections not established */ -#define TCPS_ESTABLISHED 4 /* established */ -#define TCPS_CLOSE_WAIT 5 /* rcvd fin, waiting for close */ -/* states > TCPS_CLOSE_WAIT are those where user has closed */ -#define TCPS_FIN_WAIT_1 6 /* have closed, sent fin */ -#define TCPS_CLOSING 7 /* closed xchd FIN; await FIN ACK */ -#define TCPS_LAST_ACK 8 /* had fin and close; await FIN ACK */ -/* states > TCPS_CLOSE_WAIT && < TCPS_FIN_WAIT_2 await ACK of FIN */ -#define TCPS_FIN_WAIT_2 9 /* have closed, fin is acked */ -#define TCPS_TIME_WAIT 10 /* in 2*msl quiet wait after close */ - -#define TCPS_HAVERCVDSYN(s) ((s) >= TCPS_SYN_RECEIVED) -#define TCPS_HAVEESTABLISHED(s) ((s) >= TCPS_ESTABLISHED) -#define TCPS_HAVERCVDFIN(s) ((s) >= TCPS_TIME_WAIT) - -/* - * TCP sequence numbers are 32 bit integers operated - * on with modular arithmetic. These macros can be - * used to compare such integers. - */ -#define SEQ_LT(a,b) ((int)((a)-(b)) < 0) -#define SEQ_LEQ(a,b) ((int)((a)-(b)) <= 0) -#define SEQ_GT(a,b) ((int)((a)-(b)) > 0) -#define SEQ_GEQ(a,b) ((int)((a)-(b)) >= 0) - -/* - * Macros to initialize tcp sequence numbers for - * send and receive from initial send and receive - * sequence numbers. - */ -#define tcp_rcvseqinit(tp) \ - (tp)->rcv_adv = (tp)->rcv_nxt = (tp)->irs + 1 - -#define tcp_sendseqinit(tp) \ - (tp)->snd_una = (tp)->snd_nxt = (tp)->snd_max = (tp)->snd_up = (tp)->iss - -#define TCP_ISSINCR (125*1024) /* increment for tcp_iss each second */ - -extern tcp_seq tcp_iss; /* tcp initial send seq # */ - -extern char *tcpstates[]; - -#endif diff --git a/SheepShaver/src/slirp/tcp_input.c b/SheepShaver/src/slirp/tcp_input.c deleted file mode 100755 index fc7c0bc01..000000000 --- a/SheepShaver/src/slirp/tcp_input.c +++ /dev/null @@ -1,1722 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993, 1994 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_input.c 8.5 (Berkeley) 4/10/94 - * tcp_input.c,v 1.10 1994/10/13 18:36:32 wollman Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include -#include "ip_icmp.h" - -struct socket tcb; - -int tcprexmtthresh = 3; -struct socket *tcp_last_so = &tcb; - -tcp_seq tcp_iss; /* tcp initial send seq # */ - -#define TCP_PAWS_IDLE (24 * 24 * 60 * 60 * PR_SLOWHZ) - -/* for modulo comparisons of timestamps */ -#define TSTMP_LT(a,b) ((int)((a)-(b)) < 0) -#define TSTMP_GEQ(a,b) ((int)((a)-(b)) >= 0) - -/* - * Insert segment ti into reassembly queue of tcp with - * control block tp. Return TH_FIN if reassembly now includes - * a segment with FIN. The macro form does the common case inline - * (segment is the next to be received on an established connection, - * and the queue is empty), avoiding linkage into and removal - * from the queue and repetition of various conversions. - * Set DELACK for segments received in order, but ack immediately - * when segments are out of order (so fast retransmit can work). - */ -#ifdef TCP_ACK_HACK -#define TCP_REASS(tp, ti, m, so, flags) {\ - if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ - (tp)->t_state == TCPS_ESTABLISHED) {\ - if (ti->ti_flags & TH_PUSH) \ - tp->t_flags |= TF_ACKNOW; \ - else \ - tp->t_flags |= TF_DELACK; \ - (tp)->rcv_nxt += (ti)->ti_len; \ - flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ - if (so->so_emu) { \ - if (tcp_emu((so),(m))) sbappend((so), (m)); \ - } else \ - sbappend((so), (m)); \ -/* sorwakeup(so); */ \ - } else {\ - (flags) = tcp_reass((tp), (ti), (m)); \ - tp->t_flags |= TF_ACKNOW; \ - } \ -} -#else -#define TCP_REASS(tp, ti, m, so, flags) { \ - if ((ti)->ti_seq == (tp)->rcv_nxt && \ - tcpfrag_list_empty(tp) && \ - (tp)->t_state == TCPS_ESTABLISHED) { \ - tp->t_flags |= TF_DELACK; \ - (tp)->rcv_nxt += (ti)->ti_len; \ - flags = (ti)->ti_flags & TH_FIN; \ - tcpstat.tcps_rcvpack++;\ - tcpstat.tcps_rcvbyte += (ti)->ti_len;\ - if (so->so_emu) { \ - if (tcp_emu((so),(m))) sbappend(so, (m)); \ - } else \ - sbappend((so), (m)); \ -/* sorwakeup(so); */ \ - } else { \ - (flags) = tcp_reass((tp), (ti), (m)); \ - tp->t_flags |= TF_ACKNOW; \ - } \ -} -#endif - -int -tcp_reass(tp, ti, m) - register struct tcpcb *tp; - register struct tcpiphdr *ti; - struct mbuf *m; -{ - register struct tcpiphdr *q; - struct socket *so = tp->t_socket; - int flags; - - /* - * Call with ti==0 after become established to - * force pre-ESTABLISHED data up to user socket. - */ - if (ti == 0) - goto present; - - /* - * Find a segment which begins after this one does. - */ - for (q = tcpfrag_list_first(tp); !tcpfrag_list_end(q, tp); - q = tcpiphdr_next(q)) - if (SEQ_GT(q->ti_seq, ti->ti_seq)) - break; - - /* - * If there is a preceding segment, it may provide some of - * our data already. If so, drop the data from the incoming - * segment. If it provides all of our data, drop us. - */ - if (!tcpfrag_list_end(tcpiphdr_prev(q), tp)) { - register int i; - q = tcpiphdr_prev(q); - /* conversion to int (in i) handles seq wraparound */ - i = q->ti_seq + q->ti_len - ti->ti_seq; - if (i > 0) { - if (i >= ti->ti_len) { - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += ti->ti_len; - m_freem(m); - /* - * Try to present any queued data - * at the left window edge to the user. - * This is needed after the 3-WHS - * completes. - */ - goto present; /* ??? */ - } - m_adj(m, i); - ti->ti_len -= i; - ti->ti_seq += i; - } - q = tcpiphdr_next(q); - } - tcpstat.tcps_rcvoopack++; - tcpstat.tcps_rcvoobyte += ti->ti_len; - ti->ti_mbuf = m; - - /* - * While we overlap succeeding segments trim them or, - * if they are completely covered, dequeue them. - */ - while (!tcpfrag_list_end(q, tp)) { - register int i = (ti->ti_seq + ti->ti_len) - q->ti_seq; - if (i <= 0) - break; - if (i < q->ti_len) { - q->ti_seq += i; - q->ti_len -= i; - m_adj(q->ti_mbuf, i); - break; - } - q = tcpiphdr_next(q); - m = tcpiphdr_prev(q)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(q))); - m_freem(m); - } - - /* - * Stick new segment in its place. - */ - insque(tcpiphdr2qlink(ti), tcpiphdr2qlink(tcpiphdr_prev(q))); -present: - /* - * Present data to user, advancing rcv_nxt through - * completed sequence space. - */ - if (!TCPS_HAVEESTABLISHED(tp->t_state)) - return (0); - ti = tcpfrag_list_first(tp); - if (tcpfrag_list_end(ti, tp) || ti->ti_seq != tp->rcv_nxt) - return (0); - if (tp->t_state == TCPS_SYN_RECEIVED && ti->ti_len) - return (0); - do { - tp->rcv_nxt += ti->ti_len; - flags = ti->ti_flags & TH_FIN; - remque(tcpiphdr2qlink(ti)); - m = ti->ti_mbuf; - ti = tcpiphdr_next(ti); -/* if (so->so_state & SS_FCANTRCVMORE) */ - if (so->so_state & SS_FCANTSENDMORE) - m_freem(m); - else { - if (so->so_emu) { - if (tcp_emu(so,m)) sbappend(so, m); - } else - sbappend(so, m); - } - } while (ti != (struct tcpiphdr *)tp && ti->ti_seq == tp->rcv_nxt); -/* sorwakeup(so); */ - return (flags); -} - -/* - * TCP input routine, follows pages 65-76 of the - * protocol specification dated September, 1981 very closely. - */ -void -tcp_input(m, iphlen, inso) - register struct mbuf *m; - int iphlen; - struct socket *inso; -{ - struct ip save_ip, *ip; - register struct tcpiphdr *ti; - caddr_t optp = NULL; - int optlen = 0; - int len, tlen, off; - register struct tcpcb *tp = 0; - register int tiflags; - struct socket *so = 0; - int todrop, acked, ourfinisacked, needoutput = 0; -/* int dropsocket = 0; */ - int iss = 0; - u_long tiwin; - int ret; -/* int ts_present = 0; */ - - DEBUG_CALL("tcp_input"); - DEBUG_ARGS((dfd," m = %8lx iphlen = %2d inso = %lx\n", - (long )m, iphlen, (long )inso )); - - /* - * If called with m == 0, then we're continuing the connect - */ - if (m == NULL) { - so = inso; - - /* Re-set a few variables */ - tp = sototcpcb(so); - m = so->so_m; - so->so_m = 0; - ti = so->so_ti; - tiwin = ti->ti_win; - tiflags = ti->ti_flags; - - goto cont_conn; - } - - - tcpstat.tcps_rcvtotal++; - /* - * Get IP and TCP header together in first mbuf. - * Note: IP leaves IP header in first mbuf. - */ - ti = mtod(m, struct tcpiphdr *); - if (iphlen > sizeof(struct ip )) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen=sizeof(struct ip ); - } - /* XXX Check if too short */ - - - /* - * Save a copy of the IP header in case we want restore it - * for sending an ICMP error message in response. - */ - ip=mtod(m, struct ip *); - save_ip = *ip; - save_ip.ip_len+= iphlen; - - /* - * Checksum extended TCP header and data. - */ - tlen = ((struct ip *)ti)->ip_len; - tcpiphdr2qlink(ti)->next = tcpiphdr2qlink(ti)->prev = 0; - memset(&ti->ti_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - ti->ti_x1 = 0; - ti->ti_len = htons((u_int16_t)tlen); - len = sizeof(struct ip ) + tlen; - /* keep checksum for ICMP reply - * ti->ti_sum = cksum(m, len); - * if (ti->ti_sum) { */ - if(cksum(m, len)) { - tcpstat.tcps_rcvbadsum++; - goto drop; - } - - /* - * Check that TCP offset makes sense, - * pull out TCP options and adjust length. XXX - */ - off = ti->ti_off << 2; - if (off < sizeof (struct tcphdr) || off > tlen) { - tcpstat.tcps_rcvbadoff++; - goto drop; - } - tlen -= off; - ti->ti_len = tlen; - if (off > sizeof (struct tcphdr)) { - optlen = off - sizeof (struct tcphdr); - optp = mtod(m, caddr_t) + sizeof (struct tcpiphdr); - - /* - * Do quick retrieval of timestamp options ("options - * prediction?"). If timestamp is the only option and it's - * formatted as recommended in RFC 1323 appendix A, we - * quickly get the values now and not bother calling - * tcp_dooptions(), etc. - */ -/* if ((optlen == TCPOLEN_TSTAMP_APPA || - * (optlen > TCPOLEN_TSTAMP_APPA && - * optp[TCPOLEN_TSTAMP_APPA] == TCPOPT_EOL)) && - * *(u_int32_t *)optp == htonl(TCPOPT_TSTAMP_HDR) && - * (ti->ti_flags & TH_SYN) == 0) { - * ts_present = 1; - * ts_val = ntohl(*(u_int32_t *)(optp + 4)); - * ts_ecr = ntohl(*(u_int32_t *)(optp + 8)); - * optp = NULL; / * we've parsed the options * / - * } - */ - } - tiflags = ti->ti_flags; - - /* - * Convert TCP protocol specific fields to host format. - */ - NTOHL(ti->ti_seq); - NTOHL(ti->ti_ack); - NTOHS(ti->ti_win); - NTOHS(ti->ti_urp); - - /* - * Drop TCP, IP headers and TCP options. - */ - m->m_data += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - - /* - * Locate pcb for segment. - */ -findso: - so = tcp_last_so; - if (so->so_fport != ti->ti_dport || - so->so_lport != ti->ti_sport || - so->so_laddr.s_addr != ti->ti_src.s_addr || - so->so_faddr.s_addr != ti->ti_dst.s_addr) { - so = solookup(&tcb, ti->ti_src, ti->ti_sport, - ti->ti_dst, ti->ti_dport); - if (so) - tcp_last_so = so; - ++tcpstat.tcps_socachemiss; - } - - /* - * If the state is CLOSED (i.e., TCB does not exist) then - * all data in the incoming segment is discarded. - * If the TCB exists but is in CLOSED state, it is embryonic, - * but should either do a listen or a connect soon. - * - * state == CLOSED means we've done socreate() but haven't - * attached it to a protocol yet... - * - * XXX If a TCB does not exist, and the TH_SYN flag is - * the only flag set, then create a session, mark it - * as if it was LISTENING, and continue... - */ - if (so == 0) { - if ((tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) != TH_SYN) - goto dropwithreset; - - if ((so = socreate()) == NULL) - goto dropwithreset; - if (tcp_attach(so) < 0) { - free(so); /* Not sofree (if it failed, it's not insqued) */ - goto dropwithreset; - } - - sbreserve(&so->so_snd, tcp_sndspace); - sbreserve(&so->so_rcv, tcp_rcvspace); - - /* tcp_last_so = so; */ /* XXX ? */ - /* tp = sototcpcb(so); */ - - so->so_laddr = ti->ti_src; - so->so_lport = ti->ti_sport; - so->so_faddr = ti->ti_dst; - so->so_fport = ti->ti_dport; - - if ((so->so_iptos = tcp_tos(so)) == 0) - so->so_iptos = ((struct ip *)ti)->ip_tos; - - tp = sototcpcb(so); - tp->t_state = TCPS_LISTEN; - } - - /* - * If this is a still-connecting socket, this probably - * a retransmit of the SYN. Whether it's a retransmit SYN - * or something else, we nuke it. - */ - if (so->so_state & SS_ISFCONNECTING) - goto drop; - - tp = sototcpcb(so); - - /* XXX Should never fail */ - if (tp == 0) - goto dropwithreset; - if (tp->t_state == TCPS_CLOSED) - goto drop; - - /* Unscale the window into a 32-bit value. */ -/* if ((tiflags & TH_SYN) == 0) - * tiwin = ti->ti_win << tp->snd_scale; - * else - */ - tiwin = ti->ti_win; - - /* - * Segment received on connection. - * Reset idle time and keep-alive timer. - */ - tp->t_idle = 0; - if (so_options) - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; - else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; - - /* - * Process options if not in LISTEN state, - * else do it below (after getting remote address). - */ - if (optp && tp->t_state != TCPS_LISTEN) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); -/* , */ -/* &ts_present, &ts_val, &ts_ecr); */ - - /* - * Header prediction: check for the two common cases - * of a uni-directional data xfer. If the packet has - * no control flags, is in-sequence, the window didn't - * change and we're not retransmitting, it's a - * candidate. If the length is zero and the ack moved - * forward, we're the sender side of the xfer. Just - * free the data acked & wake any higher level process - * that was blocked waiting for space. If the length - * is non-zero and the ack didn't move, we're the - * receiver side. If we're getting packets in-order - * (the reassembly queue is empty), add the data to - * the socket buffer and note that we need a delayed ack. - * - * XXX Some of these tests are not needed - * eg: the tiwin == tp->snd_wnd prevents many more - * predictions.. with no *real* advantage.. - */ - if (tp->t_state == TCPS_ESTABLISHED && - (tiflags & (TH_SYN|TH_FIN|TH_RST|TH_URG|TH_ACK)) == TH_ACK && -/* (!ts_present || TSTMP_GEQ(ts_val, tp->ts_recent)) && */ - ti->ti_seq == tp->rcv_nxt && - tiwin && tiwin == tp->snd_wnd && - tp->snd_nxt == tp->snd_max) { - /* - * If last ACK falls within this segment's sequence numbers, - * record the timestamp. - */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len)) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ - if (ti->ti_len == 0) { - if (SEQ_GT(ti->ti_ack, tp->snd_una) && - SEQ_LEQ(ti->ti_ack, tp->snd_max) && - tp->snd_cwnd >= tp->snd_wnd) { - /* - * this is a pure ack for outstanding data. - */ - ++tcpstat.tcps_predack; -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ if (tp->t_rtt && - SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp, tp->t_rtt); - acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; - sbdrop(&so->so_snd, acked); - tp->snd_una = ti->ti_ack; - m_freem(m); - - /* - * If all outstanding data are acked, stop - * retransmit timer, otherwise restart timer - * using current (possibly backed-off) value. - * If process is waiting for space, - * wakeup/selwakeup/signal. If data - * are ready to send, let tcp_output - * decide between more output or persist. - */ - if (tp->snd_una == tp->snd_max) - tp->t_timer[TCPT_REXMT] = 0; - else if (tp->t_timer[TCPT_PERSIST] == 0) - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - - /* - * There's room in so_snd, sowwakup will read() - * from the socket if we can - */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - /* - * This is called because sowwakeup might have - * put data into so_snd. Since we don't so sowwakeup, - * we don't need this.. XXX??? - */ - if (so->so_snd.sb_cc) - (void) tcp_output(tp); - - return; - } - } else if (ti->ti_ack == tp->snd_una && - tcpfrag_list_empty(tp) && - ti->ti_len <= sbspace(&so->so_rcv)) { - /* - * this is a pure, in-sequence data packet - * with nothing on the reassembly queue and - * we have enough buffer space to take it. - */ - ++tcpstat.tcps_preddat; - tp->rcv_nxt += ti->ti_len; - tcpstat.tcps_rcvpack++; - tcpstat.tcps_rcvbyte += ti->ti_len; - /* - * Add data to socket buffer. - */ - if (so->so_emu) { - if (tcp_emu(so,m)) sbappend(so, m); - } else - sbappend(so, m); - - /* - * XXX This is called when data arrives. Later, check - * if we can actually write() to the socket - * XXX Need to check? It's be NON_BLOCKING - */ -/* sorwakeup(so); */ - - /* - * If this is a short packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * It is better to not delay acks at all to maximize - * TCP throughput. See RFC 2581. - */ - tp->t_flags |= TF_ACKNOW; - tcp_output(tp); - return; - } - } /* header prediction */ - /* - * Calculate amount of space in receive window, - * and then do TCP input processing. - * Receive window is amount of space in rcv queue, - * but not less than advertised window. - */ - { int win; - win = sbspace(&so->so_rcv); - if (win < 0) - win = 0; - tp->rcv_wnd = max(win, (int)(tp->rcv_adv - tp->rcv_nxt)); - } - - switch (tp->t_state) { - - /* - * If the state is LISTEN then ignore segment if it contains an RST. - * If the segment contains an ACK then it is bad and send a RST. - * If it does not contain a SYN then it is not interesting; drop it. - * Don't bother responding if the destination was a broadcast. - * Otherwise initialize tp->rcv_nxt, and tp->irs, select an initial - * tp->iss, and send a segment: - * - * Also initialize tp->snd_nxt to tp->iss+1 and tp->snd_una to tp->iss. - * Fill in remote peer address fields if not previously specified. - * Enter SYN_RECEIVED state, and process any other fields of this - * segment in this state. - */ - case TCPS_LISTEN: { - - if (tiflags & TH_RST) - goto drop; - if (tiflags & TH_ACK) - goto dropwithreset; - if ((tiflags & TH_SYN) == 0) - goto drop; - - /* - * This has way too many gotos... - * But a bit of spaghetti code never hurt anybody :) - */ - - /* - * If this is destined for the control address, then flag to - * tcp_ctl once connected, otherwise connect - */ - if ((so->so_faddr.s_addr&htonl(0xffffff00)) == special_addr.s_addr) { - int lastbyte=ntohl(so->so_faddr.s_addr) & 0xff; - if (lastbyte!=CTL_ALIAS && lastbyte!=CTL_DNS) { -#if 0 - if(lastbyte==CTL_CMD || lastbyte==CTL_EXEC) { - /* Command or exec adress */ - so->so_state |= SS_CTL; - } else -#endif - { - /* May be an add exec */ - struct ex_list *ex_ptr; - for(ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if(ex_ptr->ex_fport == so->so_fport && - lastbyte == ex_ptr->ex_addr) { - so->so_state |= SS_CTL; - break; - } - } - } - if(so->so_state & SS_CTL) goto cont_input; - } - /* CTL_ALIAS: Do nothing, tcp_fconnect will be called on it */ - } - - if (so->so_emu & EMU_NOCONNECT) { - so->so_emu &= ~EMU_NOCONNECT; - goto cont_input; - } - - if((tcp_fconnect(so) == -1) && (errno != EINPROGRESS) && (errno != EWOULDBLOCK)) { - u_char code=ICMP_UNREACH_NET; - DEBUG_MISC((dfd," tcp fconnect errno = %d-%s\n", - errno,strerror(errno))); - if(errno == ECONNREFUSED) { - /* ACK the SYN, send RST to refuse the connection */ - tcp_respond(tp, ti, m, ti->ti_seq+1, (tcp_seq)0, - TH_RST|TH_ACK); - } else { - if(errno == EHOSTUNREACH) code=ICMP_UNREACH_HOST; - HTONL(ti->ti_seq); /* restore tcp header */ - HTONL(ti->ti_ack); - HTONS(ti->ti_win); - HTONS(ti->ti_urp); - m->m_data -= sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - m->m_len += sizeof(struct tcpiphdr)+off-sizeof(struct tcphdr); - *ip=save_ip; - icmp_error(m, ICMP_UNREACH,code, 0,strerror(errno)); - } - tp = tcp_close(tp); - m_free(m); - } else { - /* - * Haven't connected yet, save the current mbuf - * and ti, and return - * XXX Some OS's don't tell us whether the connect() - * succeeded or not. So we must time it out. - */ - so->so_m = m; - so->so_ti = ti; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->t_state = TCPS_SYN_RECEIVED; - } - return; - - cont_conn: - /* m==NULL - * Check if the connect succeeded - */ - if (so->so_state & SS_NOFDREF) { - tp = tcp_close(tp); - goto dropwithreset; - } - cont_input: - tcp_template(tp); - - if (optp) - tcp_dooptions(tp, (u_char *)optp, optlen, ti); - /* , */ - /* &ts_present, &ts_val, &ts_ecr); */ - - if (iss) - tp->iss = iss; - else - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tp->irs = ti->ti_seq; - tcp_sendseqinit(tp); - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - tp->t_state = TCPS_SYN_RECEIVED; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tcpstat.tcps_accepts++; - goto trimthenstep6; - } /* case TCPS_LISTEN */ - - /* - * If the state is SYN_SENT: - * if seg contains an ACK, but not for our SYN, drop the input. - * if seg contains a RST, then drop the connection. - * if seg does not contain SYN, then drop it. - * Otherwise this is an acceptable SYN segment - * initialize tp->rcv_nxt and tp->irs - * if seg contains ack then advance tp->snd_una - * if SYN has been acked change to ESTABLISHED else SYN_RCVD state - * arrange for segment to be acked (eventually) - * continue processing rest of data/controls, beginning with URG - */ - case TCPS_SYN_SENT: - if ((tiflags & TH_ACK) && - (SEQ_LEQ(ti->ti_ack, tp->iss) || - SEQ_GT(ti->ti_ack, tp->snd_max))) - goto dropwithreset; - - if (tiflags & TH_RST) { - if (tiflags & TH_ACK) - tp = tcp_drop(tp,0); /* XXX Check t_softerror! */ - goto drop; - } - - if ((tiflags & TH_SYN) == 0) - goto drop; - if (tiflags & TH_ACK) { - tp->snd_una = ti->ti_ack; - if (SEQ_LT(tp->snd_nxt, tp->snd_una)) - tp->snd_nxt = tp->snd_una; - } - - tp->t_timer[TCPT_REXMT] = 0; - tp->irs = ti->ti_seq; - tcp_rcvseqinit(tp); - tp->t_flags |= TF_ACKNOW; - if (tiflags & TH_ACK && SEQ_GT(tp->snd_una, tp->iss)) { - tcpstat.tcps_connects++; - soisfconnected(so); - tp->t_state = TCPS_ESTABLISHED; - - /* Do window scaling on this connection? */ -/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == - * (TF_RCVD_SCALE|TF_REQ_SCALE)) { - * tp->snd_scale = tp->requested_s_scale; - * tp->rcv_scale = tp->request_r_scale; - * } - */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, - (struct mbuf *)0); - /* - * if we didn't have to retransmit the SYN, - * use its rtt as our initial srtt & rtt var. - */ - if (tp->t_rtt) - tcp_xmit_timer(tp, tp->t_rtt); - } else - tp->t_state = TCPS_SYN_RECEIVED; - -trimthenstep6: - /* - * Advance ti->ti_seq to correspond to first data byte. - * If data, trim to stay within window, - * dropping FIN if necessary. - */ - ti->ti_seq++; - if (ti->ti_len > tp->rcv_wnd) { - todrop = ti->ti_len - tp->rcv_wnd; - m_adj(m, -todrop); - ti->ti_len = tp->rcv_wnd; - tiflags &= ~TH_FIN; - tcpstat.tcps_rcvpackafterwin++; - tcpstat.tcps_rcvbyteafterwin += todrop; - } - tp->snd_wl1 = ti->ti_seq - 1; - tp->rcv_up = ti->ti_seq; - goto step6; - } /* switch tp->t_state */ - /* - * States other than LISTEN or SYN_SENT. - * First check timestamp, if present. - * Then check that at least some bytes of segment are within - * receive window. If segment begins before rcv_nxt, - * drop leading data (and SYN); if nothing left, just ack. - * - * RFC 1323 PAWS: If we have a timestamp reply on this segment - * and it's less than ts_recent, drop it. - */ -/* if (ts_present && (tiflags & TH_RST) == 0 && tp->ts_recent && - * TSTMP_LT(ts_val, tp->ts_recent)) { - * - */ /* Check to see if ts_recent is over 24 days old. */ -/* if ((int)(tcp_now - tp->ts_recent_age) > TCP_PAWS_IDLE) { - */ /* - * * Invalidate ts_recent. If this segment updates - * * ts_recent, the age will be reset later and ts_recent - * * will get a valid value. If it does not, setting - * * ts_recent to zero will at least satisfy the - * * requirement that zero be placed in the timestamp - * * echo reply when ts_recent isn't valid. The - * * age isn't reset until we get a valid ts_recent - * * because we don't want out-of-order segments to be - * * dropped when ts_recent is old. - * */ -/* tp->ts_recent = 0; - * } else { - * tcpstat.tcps_rcvduppack++; - * tcpstat.tcps_rcvdupbyte += ti->ti_len; - * tcpstat.tcps_pawsdrop++; - * goto dropafterack; - * } - * } - */ - - todrop = tp->rcv_nxt - ti->ti_seq; - if (todrop > 0) { - if (tiflags & TH_SYN) { - tiflags &= ~TH_SYN; - ti->ti_seq++; - if (ti->ti_urp > 1) - ti->ti_urp--; - else - tiflags &= ~TH_URG; - todrop--; - } - /* - * Following if statement from Stevens, vol. 2, p. 960. - */ - if (todrop > ti->ti_len - || (todrop == ti->ti_len && (tiflags & TH_FIN) == 0)) { - /* - * Any valid FIN must be to the left of the window. - * At this point the FIN must be a duplicate or out - * of sequence; drop it. - */ - tiflags &= ~TH_FIN; - - /* - * Send an ACK to resynchronize and drop any data. - * But keep on processing for RST or ACK. - */ - tp->t_flags |= TF_ACKNOW; - todrop = ti->ti_len; - tcpstat.tcps_rcvduppack++; - tcpstat.tcps_rcvdupbyte += todrop; - } else { - tcpstat.tcps_rcvpartduppack++; - tcpstat.tcps_rcvpartdupbyte += todrop; - } - m_adj(m, todrop); - ti->ti_seq += todrop; - ti->ti_len -= todrop; - if (ti->ti_urp > todrop) - ti->ti_urp -= todrop; - else { - tiflags &= ~TH_URG; - ti->ti_urp = 0; - } - } - /* - * If new data are received on a connection after the - * user processes are gone, then RST the other end. - */ - if ((so->so_state & SS_NOFDREF) && - tp->t_state > TCPS_CLOSE_WAIT && ti->ti_len) { - tp = tcp_close(tp); - tcpstat.tcps_rcvafterclose++; - goto dropwithreset; - } - - /* - * If segment ends after window, drop trailing data - * (and PUSH and FIN); if nothing left, just ACK. - */ - todrop = (ti->ti_seq+ti->ti_len) - (tp->rcv_nxt+tp->rcv_wnd); - if (todrop > 0) { - tcpstat.tcps_rcvpackafterwin++; - if (todrop >= ti->ti_len) { - tcpstat.tcps_rcvbyteafterwin += ti->ti_len; - /* - * If a new connection request is received - * while in TIME_WAIT, drop the old connection - * and start over if the sequence numbers - * are above the previous ones. - */ - if (tiflags & TH_SYN && - tp->t_state == TCPS_TIME_WAIT && - SEQ_GT(ti->ti_seq, tp->rcv_nxt)) { - iss = tp->rcv_nxt + TCP_ISSINCR; - tp = tcp_close(tp); - goto findso; - } - /* - * If window is closed can only take segments at - * window edge, and have to drop data and PUSH from - * incoming segments. Continue processing, but - * remember to ack. Otherwise, drop segment - * and ack. - */ - if (tp->rcv_wnd == 0 && ti->ti_seq == tp->rcv_nxt) { - tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_rcvwinprobe++; - } else - goto dropafterack; - } else - tcpstat.tcps_rcvbyteafterwin += todrop; - m_adj(m, -todrop); - ti->ti_len -= todrop; - tiflags &= ~(TH_PUSH|TH_FIN); - } - - /* - * If last ACK falls within this segment's sequence numbers, - * record its timestamp. - */ -/* if (ts_present && SEQ_LEQ(ti->ti_seq, tp->last_ack_sent) && - * SEQ_LT(tp->last_ack_sent, ti->ti_seq + ti->ti_len + - * ((tiflags & (TH_SYN|TH_FIN)) != 0))) { - * tp->ts_recent_age = tcp_now; - * tp->ts_recent = ts_val; - * } - */ - - /* - * If the RST bit is set examine the state: - * SYN_RECEIVED STATE: - * If passive open, return to LISTEN state. - * If active open, inform user that connection was refused. - * ESTABLISHED, FIN_WAIT_1, FIN_WAIT2, CLOSE_WAIT STATES: - * Inform user that connection was reset, and close tcb. - * CLOSING, LAST_ACK, TIME_WAIT STATES - * Close the tcb. - */ - if (tiflags&TH_RST) switch (tp->t_state) { - - case TCPS_SYN_RECEIVED: -/* so->so_error = ECONNREFUSED; */ - goto close; - - case TCPS_ESTABLISHED: - case TCPS_FIN_WAIT_1: - case TCPS_FIN_WAIT_2: - case TCPS_CLOSE_WAIT: -/* so->so_error = ECONNRESET; */ - close: - tp->t_state = TCPS_CLOSED; - tcpstat.tcps_drops++; - tp = tcp_close(tp); - goto drop; - - case TCPS_CLOSING: - case TCPS_LAST_ACK: - case TCPS_TIME_WAIT: - tp = tcp_close(tp); - goto drop; - } - - /* - * If a SYN is in the window, then this is an - * error and we send an RST and drop the connection. - */ - if (tiflags & TH_SYN) { - tp = tcp_drop(tp,0); - goto dropwithreset; - } - - /* - * If the ACK bit is off we drop the segment and return. - */ - if ((tiflags & TH_ACK) == 0) goto drop; - - /* - * Ack processing. - */ - switch (tp->t_state) { - /* - * In SYN_RECEIVED state if the ack ACKs our SYN then enter - * ESTABLISHED state and continue processing, otherwise - * send an RST. una<=ack<=max - */ - case TCPS_SYN_RECEIVED: - - if (SEQ_GT(tp->snd_una, ti->ti_ack) || - SEQ_GT(ti->ti_ack, tp->snd_max)) - goto dropwithreset; - tcpstat.tcps_connects++; - tp->t_state = TCPS_ESTABLISHED; - /* - * The sent SYN is ack'ed with our sequence number +1 - * The first data byte already in the buffer will get - * lost if no correction is made. This is only needed for - * SS_CTL since the buffer is empty otherwise. - * tp->snd_una++; or: - */ - tp->snd_una=ti->ti_ack; - if (so->so_state & SS_CTL) { - /* So tcp_ctl reports the right state */ - ret = tcp_ctl(so); - if (ret == 1) { - soisfconnected(so); - so->so_state &= ~SS_CTL; /* success XXX */ - } else if (ret == 2) { - so->so_state = SS_NOFDREF; /* CTL_CMD */ - } else { - needoutput = 1; - tp->t_state = TCPS_FIN_WAIT_1; - } - } else { - soisfconnected(so); - } - - /* Do window scaling? */ -/* if ((tp->t_flags & (TF_RCVD_SCALE|TF_REQ_SCALE)) == - * (TF_RCVD_SCALE|TF_REQ_SCALE)) { - * tp->snd_scale = tp->requested_s_scale; - * tp->rcv_scale = tp->request_r_scale; - * } - */ - (void) tcp_reass(tp, (struct tcpiphdr *)0, (struct mbuf *)0); - tp->snd_wl1 = ti->ti_seq - 1; - /* Avoid ack processing; snd_una==ti_ack => dup ack */ - goto synrx_to_est; - /* fall into ... */ - - /* - * In ESTABLISHED state: drop duplicate ACKs; ACK out of range - * ACKs. If the ack is in the range - * tp->snd_una < ti->ti_ack <= tp->snd_max - * then advance tp->snd_una to ti->ti_ack and drop - * data from the retransmission queue. If this ACK reflects - * more up to date window information we update our window information. - */ - case TCPS_ESTABLISHED: - case TCPS_FIN_WAIT_1: - case TCPS_FIN_WAIT_2: - case TCPS_CLOSE_WAIT: - case TCPS_CLOSING: - case TCPS_LAST_ACK: - case TCPS_TIME_WAIT: - - if (SEQ_LEQ(ti->ti_ack, tp->snd_una)) { - if (ti->ti_len == 0 && tiwin == tp->snd_wnd) { - tcpstat.tcps_rcvdupack++; - DEBUG_MISC((dfd," dup ack m = %lx so = %lx \n", - (long )m, (long )so)); - /* - * If we have outstanding data (other than - * a window probe), this is a completely - * duplicate ack (ie, window info didn't - * change), the ack is the biggest we've - * seen and we've seen exactly our rexmt - * threshold of them, assume a packet - * has been dropped and retransmit it. - * Kludge snd_nxt & the congestion - * window so we send only this one - * packet. - * - * We know we're losing at the current - * window size so do congestion avoidance - * (set ssthresh to half the current window - * and pull our congestion window back to - * the new ssthresh). - * - * Dup acks mean that packets have left the - * network (they're now cached at the receiver) - * so bump cwnd by the amount in the receiver - * to keep a constant cwnd packets in the - * network. - */ - if (tp->t_timer[TCPT_REXMT] == 0 || - ti->ti_ack != tp->snd_una) - tp->t_dupacks = 0; - else if (++tp->t_dupacks == tcprexmtthresh) { - tcp_seq onxt = tp->snd_nxt; - u_int win = - min(tp->snd_wnd, tp->snd_cwnd) / 2 / - tp->t_maxseg; - - if (win < 2) - win = 2; - tp->snd_ssthresh = win * tp->t_maxseg; - tp->t_timer[TCPT_REXMT] = 0; - tp->t_rtt = 0; - tp->snd_nxt = ti->ti_ack; - tp->snd_cwnd = tp->t_maxseg; - (void) tcp_output(tp); - tp->snd_cwnd = tp->snd_ssthresh + - tp->t_maxseg * tp->t_dupacks; - if (SEQ_GT(onxt, tp->snd_nxt)) - tp->snd_nxt = onxt; - goto drop; - } else if (tp->t_dupacks > tcprexmtthresh) { - tp->snd_cwnd += tp->t_maxseg; - (void) tcp_output(tp); - goto drop; - } - } else - tp->t_dupacks = 0; - break; - } - synrx_to_est: - /* - * If the congestion window was inflated to account - * for the other side's cached packets, retract it. - */ - if (tp->t_dupacks > tcprexmtthresh && - tp->snd_cwnd > tp->snd_ssthresh) - tp->snd_cwnd = tp->snd_ssthresh; - tp->t_dupacks = 0; - if (SEQ_GT(ti->ti_ack, tp->snd_max)) { - tcpstat.tcps_rcvacktoomuch++; - goto dropafterack; - } - acked = ti->ti_ack - tp->snd_una; - tcpstat.tcps_rcvackpack++; - tcpstat.tcps_rcvackbyte += acked; - - /* - * If we have a timestamp reply, update smoothed - * round trip time. If no timestamp is present but - * transmit timer is running and timed sequence - * number was acked, update smoothed round trip time. - * Since we now have an rtt measurement, cancel the - * timer backoff (cf., Phil Karn's retransmit alg.). - * Recompute the initial retransmit timer. - */ -/* if (ts_present) - * tcp_xmit_timer(tp, tcp_now-ts_ecr+1); - * else - */ - if (tp->t_rtt && SEQ_GT(ti->ti_ack, tp->t_rtseq)) - tcp_xmit_timer(tp,tp->t_rtt); - - /* - * If all outstanding data is acked, stop retransmit - * timer and remember to restart (more output or persist). - * If there is more data to be acked, restart retransmit - * timer, using current (possibly backed-off) value. - */ - if (ti->ti_ack == tp->snd_max) { - tp->t_timer[TCPT_REXMT] = 0; - needoutput = 1; - } else if (tp->t_timer[TCPT_PERSIST] == 0) - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* - * When new data is acked, open the congestion window. - * If the window gives us less than ssthresh packets - * in flight, open exponentially (maxseg per packet). - * Otherwise open linearly: maxseg per window - * (maxseg^2 / cwnd per packet). - */ - { - register u_int cw = tp->snd_cwnd; - register u_int incr = tp->t_maxseg; - - if (cw > tp->snd_ssthresh) - incr = incr * incr / cw; - tp->snd_cwnd = min(cw + incr, TCP_MAXWIN<snd_scale); - } - if (acked > so->so_snd.sb_cc) { - tp->snd_wnd -= so->so_snd.sb_cc; - sbdrop(&so->so_snd, (int )so->so_snd.sb_cc); - ourfinisacked = 1; - } else { - sbdrop(&so->so_snd, acked); - tp->snd_wnd -= acked; - ourfinisacked = 0; - } - /* - * XXX sowwakup is called when data is acked and there's room for - * for more data... it should read() the socket - */ -/* if (so->so_snd.sb_flags & SB_NOTIFY) - * sowwakeup(so); - */ - tp->snd_una = ti->ti_ack; - if (SEQ_LT(tp->snd_nxt, tp->snd_una)) - tp->snd_nxt = tp->snd_una; - - switch (tp->t_state) { - - /* - * In FIN_WAIT_1 STATE in addition to the processing - * for the ESTABLISHED state if our FIN is now acknowledged - * then enter FIN_WAIT_2. - */ - case TCPS_FIN_WAIT_1: - if (ourfinisacked) { - /* - * If we can't receive any more - * data, then closing user can proceed. - * Starting the timer is contrary to the - * specification, but if we don't get a FIN - * we'll hang forever. - */ - if (so->so_state & SS_FCANTRCVMORE) { - soisfdisconnected(so); - tp->t_timer[TCPT_2MSL] = tcp_maxidle; - } - tp->t_state = TCPS_FIN_WAIT_2; - } - break; - - /* - * In CLOSING STATE in addition to the processing for - * the ESTABLISHED state if the ACK acknowledges our FIN - * then enter the TIME-WAIT state, otherwise ignore - * the segment. - */ - case TCPS_CLOSING: - if (ourfinisacked) { - tp->t_state = TCPS_TIME_WAIT; - tcp_canceltimers(tp); - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - soisfdisconnected(so); - } - break; - - /* - * In LAST_ACK, we may still be waiting for data to drain - * and/or to be acked, as well as for the ack of our FIN. - * If our FIN is now acknowledged, delete the TCB, - * enter the closed state and return. - */ - case TCPS_LAST_ACK: - if (ourfinisacked) { - tp = tcp_close(tp); - goto drop; - } - break; - - /* - * In TIME_WAIT state the only thing that should arrive - * is a retransmission of the remote FIN. Acknowledge - * it and restart the finack timer. - */ - case TCPS_TIME_WAIT: - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - goto dropafterack; - } - } /* switch(tp->t_state) */ - -step6: - /* - * Update window information. - * Don't look at window if no ACK: TAC's send garbage on first SYN. - */ - if ((tiflags & TH_ACK) && - (SEQ_LT(tp->snd_wl1, ti->ti_seq) || - (tp->snd_wl1 == ti->ti_seq && (SEQ_LT(tp->snd_wl2, ti->ti_ack) || - (tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd))))) { - /* keep track of pure window updates */ - if (ti->ti_len == 0 && - tp->snd_wl2 == ti->ti_ack && tiwin > tp->snd_wnd) - tcpstat.tcps_rcvwinupd++; - tp->snd_wnd = tiwin; - tp->snd_wl1 = ti->ti_seq; - tp->snd_wl2 = ti->ti_ack; - if (tp->snd_wnd > tp->max_sndwnd) - tp->max_sndwnd = tp->snd_wnd; - needoutput = 1; - } - - /* - * Process segments with URG. - */ - if ((tiflags & TH_URG) && ti->ti_urp && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { - /* - * This is a kludge, but if we receive and accept - * random urgent pointers, we'll crash in - * soreceive. It's hard to imagine someone - * actually wanting to send this much urgent data. - */ - if (ti->ti_urp + so->so_rcv.sb_cc > so->so_rcv.sb_datalen) { - ti->ti_urp = 0; - tiflags &= ~TH_URG; - goto dodata; - } - /* - * If this segment advances the known urgent pointer, - * then mark the data stream. This should not happen - * in CLOSE_WAIT, CLOSING, LAST_ACK or TIME_WAIT STATES since - * a FIN has been received from the remote side. - * In these states we ignore the URG. - * - * According to RFC961 (Assigned Protocols), - * the urgent pointer points to the last octet - * of urgent data. We continue, however, - * to consider it to indicate the first octet - * of data past the urgent section as the original - * spec states (in one of two places). - */ - if (SEQ_GT(ti->ti_seq+ti->ti_urp, tp->rcv_up)) { - tp->rcv_up = ti->ti_seq + ti->ti_urp; - so->so_urgc = so->so_rcv.sb_cc + - (tp->rcv_up - tp->rcv_nxt); /* -1; */ - tp->rcv_up = ti->ti_seq + ti->ti_urp; - - } - } else - /* - * If no out of band data is expected, - * pull receive urgent pointer along - * with the receive window. - */ - if (SEQ_GT(tp->rcv_nxt, tp->rcv_up)) - tp->rcv_up = tp->rcv_nxt; -dodata: - - /* - * Process the segment text, merging it into the TCP sequencing queue, - * and arranging for acknowledgment of receipt if necessary. - * This process logically involves adjusting tp->rcv_wnd as data - * is presented to the user (this happens in tcp_usrreq.c, - * case PRU_RCVD). If a FIN has already been received on this - * connection then we just ignore the text. - */ - if ((ti->ti_len || (tiflags&TH_FIN)) && - TCPS_HAVERCVDFIN(tp->t_state) == 0) { - TCP_REASS(tp, ti, m, so, tiflags); - /* - * Note the amount of data that peer has sent into - * our window, in order to estimate the sender's - * buffer size. - */ - len = so->so_rcv.sb_datalen - (tp->rcv_adv - tp->rcv_nxt); - } else { - m_free(m); - tiflags &= ~TH_FIN; - } - - /* - * If FIN is received ACK the FIN and let the user know - * that the connection is closing. - */ - if (tiflags & TH_FIN) { - if (TCPS_HAVERCVDFIN(tp->t_state) == 0) { - /* - * If we receive a FIN we can't send more data, - * set it SS_FDRAIN - * Shutdown the socket if there is no rx data in the - * buffer. - * soread() is called on completion of shutdown() and - * will got to TCPS_LAST_ACK, and use tcp_output() - * to send the FIN. - */ -/* sofcantrcvmore(so); */ - sofwdrain(so); - - tp->t_flags |= TF_ACKNOW; - tp->rcv_nxt++; - } - switch (tp->t_state) { - - /* - * In SYN_RECEIVED and ESTABLISHED STATES - * enter the CLOSE_WAIT state. - */ - case TCPS_SYN_RECEIVED: - case TCPS_ESTABLISHED: - if(so->so_emu == EMU_CTL) /* no shutdown on socket */ - tp->t_state = TCPS_LAST_ACK; - else - tp->t_state = TCPS_CLOSE_WAIT; - break; - - /* - * If still in FIN_WAIT_1 STATE FIN has not been acked so - * enter the CLOSING state. - */ - case TCPS_FIN_WAIT_1: - tp->t_state = TCPS_CLOSING; - break; - - /* - * In FIN_WAIT_2 state enter the TIME_WAIT state, - * starting the time-wait timer, turning off the other - * standard timers. - */ - case TCPS_FIN_WAIT_2: - tp->t_state = TCPS_TIME_WAIT; - tcp_canceltimers(tp); - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - soisfdisconnected(so); - break; - - /* - * In TIME_WAIT state restart the 2 MSL time_wait timer. - */ - case TCPS_TIME_WAIT: - tp->t_timer[TCPT_2MSL] = 2 * TCPTV_MSL; - break; - } - } - - /* - * If this is a small packet, then ACK now - with Nagel - * congestion avoidance sender won't send more until - * he gets an ACK. - * - * See above. - */ -/* if (ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg) { - */ -/* if ((ti->ti_len && (unsigned)ti->ti_len < tp->t_maxseg && - * (so->so_iptos & IPTOS_LOWDELAY) == 0) || - * ((so->so_iptos & IPTOS_LOWDELAY) && - * ((struct tcpiphdr_2 *)ti)->first_char == (char)27)) { - */ - if (ti->ti_len && (unsigned)ti->ti_len <= 5 && - ((struct tcpiphdr_2 *)ti)->first_char == (char)27) { - tp->t_flags |= TF_ACKNOW; - } - - /* - * Return any desired output. - */ - if (needoutput || (tp->t_flags & TF_ACKNOW)) { - (void) tcp_output(tp); - } - return; - -dropafterack: - /* - * Generate an ACK dropping incoming segment if it occupies - * sequence space, where the ACK reflects our state. - */ - if (tiflags & TH_RST) - goto drop; - m_freem(m); - tp->t_flags |= TF_ACKNOW; - (void) tcp_output(tp); - return; - -dropwithreset: - /* reuses m if m!=NULL, m_free() unnecessary */ - if (tiflags & TH_ACK) - tcp_respond(tp, ti, m, (tcp_seq)0, ti->ti_ack, TH_RST); - else { - if (tiflags & TH_SYN) ti->ti_len++; - tcp_respond(tp, ti, m, ti->ti_seq+ti->ti_len, (tcp_seq)0, - TH_RST|TH_ACK); - } - - return; - -drop: - /* - * Drop space held by incoming segment and return. - */ - m_free(m); - - return; -} - - /* , ts_present, ts_val, ts_ecr) */ -/* int *ts_present; - * u_int32_t *ts_val, *ts_ecr; - */ -void -tcp_dooptions(tp, cp, cnt, ti) - struct tcpcb *tp; - u_char *cp; - int cnt; - struct tcpiphdr *ti; -{ - u_int16_t mss; - int opt, optlen; - - DEBUG_CALL("tcp_dooptions"); - DEBUG_ARGS((dfd," tp = %lx cnt=%i \n", (long )tp, cnt)); - - for (; cnt > 0; cnt -= optlen, cp += optlen) { - opt = cp[0]; - if (opt == TCPOPT_EOL) - break; - if (opt == TCPOPT_NOP) - optlen = 1; - else { - optlen = cp[1]; - if (optlen <= 0) - break; - } - switch (opt) { - - default: - continue; - - case TCPOPT_MAXSEG: - if (optlen != TCPOLEN_MAXSEG) - continue; - if (!(ti->ti_flags & TH_SYN)) - continue; - memcpy((char *) &mss, (char *) cp + 2, sizeof(mss)); - NTOHS(mss); - (void) tcp_mss(tp, mss); /* sets t_maxseg */ - break; - -/* case TCPOPT_WINDOW: - * if (optlen != TCPOLEN_WINDOW) - * continue; - * if (!(ti->ti_flags & TH_SYN)) - * continue; - * tp->t_flags |= TF_RCVD_SCALE; - * tp->requested_s_scale = min(cp[2], TCP_MAX_WINSHIFT); - * break; - */ -/* case TCPOPT_TIMESTAMP: - * if (optlen != TCPOLEN_TIMESTAMP) - * continue; - * *ts_present = 1; - * memcpy((char *) ts_val, (char *)cp + 2, sizeof(*ts_val)); - * NTOHL(*ts_val); - * memcpy((char *) ts_ecr, (char *)cp + 6, sizeof(*ts_ecr)); - * NTOHL(*ts_ecr); - * - */ /* - * * A timestamp received in a SYN makes - * * it ok to send timestamp requests and replies. - * */ -/* if (ti->ti_flags & TH_SYN) { - * tp->t_flags |= TF_RCVD_TSTMP; - * tp->ts_recent = *ts_val; - * tp->ts_recent_age = tcp_now; - * } - */ break; - } - } -} - - -/* - * Pull out of band byte out of a segment so - * it doesn't appear in the user's data queue. - * It is still reflected in the segment length for - * sequencing purposes. - */ - -#ifdef notdef - -void -tcp_pulloutofband(so, ti, m) - struct socket *so; - struct tcpiphdr *ti; - register struct mbuf *m; -{ - int cnt = ti->ti_urp - 1; - - while (cnt >= 0) { - if (m->m_len > cnt) { - char *cp = mtod(m, caddr_t) + cnt; - struct tcpcb *tp = sototcpcb(so); - - tp->t_iobc = *cp; - tp->t_oobflags |= TCPOOB_HAVEDATA; - memcpy(sp, cp+1, (unsigned)(m->m_len - cnt - 1)); - m->m_len--; - return; - } - cnt -= m->m_len; - m = m->m_next; /* XXX WRONG! Fix it! */ - if (m == 0) - break; - } - panic("tcp_pulloutofband"); -} - -#endif /* notdef */ - -/* - * Collect new round-trip time estimate - * and update averages and current timeout. - */ - -void -tcp_xmit_timer(tp, rtt) - register struct tcpcb *tp; - int rtt; -{ - register short delta; - - DEBUG_CALL("tcp_xmit_timer"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("rtt = %d", rtt); - - tcpstat.tcps_rttupdated++; - if (tp->t_srtt != 0) { - /* - * srtt is stored as fixed point with 3 bits after the - * binary point (i.e., scaled by 8). The following magic - * is equivalent to the smoothing algorithm in rfc793 with - * an alpha of .875 (srtt = rtt/8 + srtt*7/8 in fixed - * point). Adjust rtt to origin 0. - */ - delta = rtt - 1 - (tp->t_srtt >> TCP_RTT_SHIFT); - if ((tp->t_srtt += delta) <= 0) - tp->t_srtt = 1; - /* - * We accumulate a smoothed rtt variance (actually, a - * smoothed mean difference), then set the retransmit - * timer to smoothed rtt + 4 times the smoothed variance. - * rttvar is stored as fixed point with 2 bits after the - * binary point (scaled by 4). The following is - * equivalent to rfc793 smoothing with an alpha of .75 - * (rttvar = rttvar*3/4 + |delta| / 4). This replaces - * rfc793's wired-in beta. - */ - if (delta < 0) - delta = -delta; - delta -= (tp->t_rttvar >> TCP_RTTVAR_SHIFT); - if ((tp->t_rttvar += delta) <= 0) - tp->t_rttvar = 1; - } else { - /* - * No rtt measurement yet - use the unsmoothed rtt. - * Set the variance to half the rtt (so our first - * retransmit happens at 3*rtt). - */ - tp->t_srtt = rtt << TCP_RTT_SHIFT; - tp->t_rttvar = rtt << (TCP_RTTVAR_SHIFT - 1); - } - tp->t_rtt = 0; - tp->t_rxtshift = 0; - - /* - * the retransmit should happen at rtt + 4 * rttvar. - * Because of the way we do the smoothing, srtt and rttvar - * will each average +1/2 tick of bias. When we compute - * the retransmit timer, we want 1/2 tick of rounding and - * 1 extra tick because of +-1/2 tick uncertainty in the - * firing of the timer. The bias will give us exactly the - * 1.5 tick we need. But, because the bias is - * statistical, we have to test that we don't drop below - * the minimum feasible timer (which is 2 ticks). - */ - TCPT_RANGESET(tp->t_rxtcur, TCP_REXMTVAL(tp), - (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - - /* - * We received an ack for a packet that wasn't retransmitted; - * it is probably safe to discard any error indications we've - * received recently. This isn't quite right, but close enough - * for now (a route might have failed after we sent a segment, - * and the return path might not be symmetrical). - */ - tp->t_softerror = 0; -} - -/* - * Determine a reasonable value for maxseg size. - * If the route is known, check route for mtu. - * If none, use an mss that can be handled on the outgoing - * interface without forcing IP to fragment; if bigger than - * an mbuf cluster (MCLBYTES), round down to nearest multiple of MCLBYTES - * to utilize large mbufs. If no route is found, route has no mtu, - * or the destination isn't local, use a default, hopefully conservative - * size (usually 512 or the default IP max size, but no more than the mtu - * of the interface), as we can't discover anything about intervening - * gateways or networks. We also initialize the congestion/slow start - * window to be a single segment if the destination isn't local. - * While looking at the routing entry, we also initialize other path-dependent - * parameters from pre-set or cached values in the routing entry. - */ - -int -tcp_mss(tp, offer) - register struct tcpcb *tp; - u_int offer; -{ - struct socket *so = tp->t_socket; - int mss; - - DEBUG_CALL("tcp_mss"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("offer = %d", offer); - - mss = min(if_mtu, if_mru) - sizeof(struct tcpiphdr); - if (offer) - mss = min(mss, offer); - mss = max(mss, 32); - if (mss < tp->t_maxseg || offer != 0) - tp->t_maxseg = mss; - - tp->snd_cwnd = mss; - - sbreserve(&so->so_snd, tcp_sndspace+((tcp_sndspace%mss)?(mss-(tcp_sndspace%mss)):0)); - sbreserve(&so->so_rcv, tcp_rcvspace+((tcp_rcvspace%mss)?(mss-(tcp_rcvspace%mss)):0)); - - DEBUG_MISC((dfd, " returning mss = %d\n", mss)); - - return mss; -} diff --git a/SheepShaver/src/slirp/tcp_output.c b/SheepShaver/src/slirp/tcp_output.c deleted file mode 100755 index 5cb1a61e3..000000000 --- a/SheepShaver/src/slirp/tcp_output.c +++ /dev/null @@ -1,601 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_output.c 8.3 (Berkeley) 12/30/93 - * tcp_output.c,v 1.3 1994/09/15 10:36:55 davidg Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include - -/* - * Since this is only used in "stats socket", we give meaning - * names instead of the REAL names - */ -char *tcpstates[] = { -/* "CLOSED", "LISTEN", "SYN_SENT", "SYN_RCVD", */ - "REDIRECT", "LISTEN", "SYN_SENT", "SYN_RCVD", - "ESTABLISHED", "CLOSE_WAIT", "FIN_WAIT_1", "CLOSING", - "LAST_ACK", "FIN_WAIT_2", "TIME_WAIT", -}; - -u_char tcp_outflags[TCP_NSTATES] = { - TH_RST|TH_ACK, 0, TH_SYN, TH_SYN|TH_ACK, - TH_ACK, TH_ACK, TH_FIN|TH_ACK, TH_FIN|TH_ACK, - TH_FIN|TH_ACK, TH_ACK, TH_ACK, -}; - - -#define MAX_TCPOPTLEN 32 /* max # bytes that go in options */ - -/* - * Tcp output routine: figure out what should be sent and send it. - */ -int -tcp_output(tp) - register struct tcpcb *tp; -{ - register struct socket *so = tp->t_socket; - register long len, win; - int off, flags, error; - register struct mbuf *m; - register struct tcpiphdr *ti; - u_char opt[MAX_TCPOPTLEN]; - unsigned optlen, hdrlen; - int idle, sendalot; - - DEBUG_CALL("tcp_output"); - DEBUG_ARG("tp = %lx", (long )tp); - - /* - * Determine length of data that should be transmitted, - * and flags that will be used. - * If there is some data or critical controls (SYN, RST) - * to send, then transmit; otherwise, investigate further. - */ - idle = (tp->snd_max == tp->snd_una); - if (idle && tp->t_idle >= tp->t_rxtcur) - /* - * We have been idle for "a while" and no acks are - * expected to clock out any data we send -- - * slow start to get ack "clock" running again. - */ - tp->snd_cwnd = tp->t_maxseg; -again: - sendalot = 0; - off = tp->snd_nxt - tp->snd_una; - win = min(tp->snd_wnd, tp->snd_cwnd); - - flags = tcp_outflags[tp->t_state]; - - DEBUG_MISC((dfd, " --- tcp_output flags = 0x%x\n",flags)); - - /* - * If in persist timeout with window of 0, send 1 byte. - * Otherwise, if window is small but nonzero - * and timer expired, we will send what we can - * and go to transmit state. - */ - if (tp->t_force) { - if (win == 0) { - /* - * If we still have some data to send, then - * clear the FIN bit. Usually this would - * happen below when it realizes that we - * aren't sending all the data. However, - * if we have exactly 1 byte of unset data, - * then it won't clear the FIN bit below, - * and if we are in persist state, we wind - * up sending the packet without recording - * that we sent the FIN bit. - * - * We can't just blindly clear the FIN bit, - * because if we don't have any more data - * to send then the probe will be the FIN - * itself. - */ - if (off < so->so_snd.sb_cc) - flags &= ~TH_FIN; - win = 1; - } else { - tp->t_timer[TCPT_PERSIST] = 0; - tp->t_rxtshift = 0; - } - } - - len = min(so->so_snd.sb_cc, win) - off; - - if (len < 0) { - /* - * If FIN has been sent but not acked, - * but we haven't been called to retransmit, - * len will be -1. Otherwise, window shrank - * after we sent into it. If window shrank to 0, - * cancel pending retransmit and pull snd_nxt - * back to (closed) window. We will enter persist - * state below. If the window didn't close completely, - * just wait for an ACK. - */ - len = 0; - if (win == 0) { - tp->t_timer[TCPT_REXMT] = 0; - tp->snd_nxt = tp->snd_una; - } - } - - if (len > tp->t_maxseg) { - len = tp->t_maxseg; - sendalot = 1; - } - if (SEQ_LT(tp->snd_nxt + len, tp->snd_una + so->so_snd.sb_cc)) - flags &= ~TH_FIN; - - win = sbspace(&so->so_rcv); - - /* - * Sender silly window avoidance. If connection is idle - * and can send all data, a maximum segment, - * at least a maximum default-size segment do it, - * or are forced, do it; otherwise don't bother. - * If peer's buffer is tiny, then send - * when window is at least half open. - * If retransmitting (possibly after persist timer forced us - * to send into a small window), then must resend. - */ - if (len) { - if (len == tp->t_maxseg) - goto send; - if ((1 || idle || tp->t_flags & TF_NODELAY) && - len + off >= so->so_snd.sb_cc) - goto send; - if (tp->t_force) - goto send; - if (len >= tp->max_sndwnd / 2 && tp->max_sndwnd > 0) - goto send; - if (SEQ_LT(tp->snd_nxt, tp->snd_max)) - goto send; - } - - /* - * Compare available window to amount of window - * known to peer (as advertised window less - * next expected input). If the difference is at least two - * max size segments, or at least 50% of the maximum possible - * window, then want to send a window update to peer. - */ - if (win > 0) { - /* - * "adv" is the amount we can increase the window, - * taking into account that we are limited by - * TCP_MAXWIN << tp->rcv_scale. - */ - long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) - - (tp->rcv_adv - tp->rcv_nxt); - - if (adv >= (long) (2 * tp->t_maxseg)) - goto send; - if (2 * adv >= (long) so->so_rcv.sb_datalen) - goto send; - } - - /* - * Send if we owe peer an ACK. - */ - if (tp->t_flags & TF_ACKNOW) - goto send; - if (flags & (TH_SYN|TH_RST)) - goto send; - if (SEQ_GT(tp->snd_up, tp->snd_una)) - goto send; - /* - * If our state indicates that FIN should be sent - * and we have not yet done so, or we're retransmitting the FIN, - * then we need to send. - */ - if (flags & TH_FIN && - ((tp->t_flags & TF_SENTFIN) == 0 || tp->snd_nxt == tp->snd_una)) - goto send; - - /* - * TCP window updates are not reliable, rather a polling protocol - * using ``persist'' packets is used to insure receipt of window - * updates. The three ``states'' for the output side are: - * idle not doing retransmits or persists - * persisting to move a small or zero window - * (re)transmitting and thereby not persisting - * - * tp->t_timer[TCPT_PERSIST] - * is set when we are in persist state. - * tp->t_force - * is set when we are called to send a persist packet. - * tp->t_timer[TCPT_REXMT] - * is set when we are retransmitting - * The output side is idle when both timers are zero. - * - * If send window is too small, there is data to transmit, and no - * retransmit or persist is pending, then go to persist state. - * If nothing happens soon, send when timer expires: - * if window is nonzero, transmit what we can, - * otherwise force out a byte. - */ - if (so->so_snd.sb_cc && tp->t_timer[TCPT_REXMT] == 0 && - tp->t_timer[TCPT_PERSIST] == 0) { - tp->t_rxtshift = 0; - tcp_setpersist(tp); - } - - /* - * No reason to send a segment, just return. - */ - tcpstat.tcps_didnuttin++; - - return (0); - -send: - /* - * Before ESTABLISHED, force sending of initial options - * unless TCP set not to do any options. - * NOTE: we assume that the IP/TCP header plus TCP options - * always fit in a single mbuf, leaving room for a maximum - * link header, i.e. - * max_linkhdr + sizeof (struct tcpiphdr) + optlen <= MHLEN - */ - optlen = 0; - hdrlen = sizeof (struct tcpiphdr); - if (flags & TH_SYN) { - tp->snd_nxt = tp->iss; - if ((tp->t_flags & TF_NOOPT) == 0) { - u_int16_t mss; - - opt[0] = TCPOPT_MAXSEG; - opt[1] = 4; - mss = htons((u_int16_t) tcp_mss(tp, 0)); - memcpy((caddr_t)(opt + 2), (caddr_t)&mss, sizeof(mss)); - optlen = 4; - -/* if ((tp->t_flags & TF_REQ_SCALE) && - * ((flags & TH_ACK) == 0 || - * (tp->t_flags & TF_RCVD_SCALE))) { - * *((u_int32_t *) (opt + optlen)) = htonl( - * TCPOPT_NOP << 24 | - * TCPOPT_WINDOW << 16 | - * TCPOLEN_WINDOW << 8 | - * tp->request_r_scale); - * optlen += 4; - * } - */ - } - } - - /* - * Send a timestamp and echo-reply if this is a SYN and our side - * wants to use timestamps (TF_REQ_TSTMP is set) or both our side - * and our peer have sent timestamps in our SYN's. - */ -/* if ((tp->t_flags & (TF_REQ_TSTMP|TF_NOOPT)) == TF_REQ_TSTMP && - * (flags & TH_RST) == 0 && - * ((flags & (TH_SYN|TH_ACK)) == TH_SYN || - * (tp->t_flags & TF_RCVD_TSTMP))) { - * u_int32_t *lp = (u_int32_t *)(opt + optlen); - * - * / * Form timestamp option as shown in appendix A of RFC 1323. * / - * *lp++ = htonl(TCPOPT_TSTAMP_HDR); - * *lp++ = htonl(tcp_now); - * *lp = htonl(tp->ts_recent); - * optlen += TCPOLEN_TSTAMP_APPA; - * } - */ - hdrlen += optlen; - - /* - * Adjust data length if insertion of options will - * bump the packet length beyond the t_maxseg length. - */ - if (len > tp->t_maxseg - optlen) { - len = tp->t_maxseg - optlen; - sendalot = 1; - } - - /* - * Grab a header mbuf, attaching a copy of data to - * be transmitted, and initialize the header from - * the template for sends on this connection. - */ - if (len) { - if (tp->t_force && len == 1) - tcpstat.tcps_sndprobe++; - else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) { - tcpstat.tcps_sndrexmitpack++; - tcpstat.tcps_sndrexmitbyte += len; - } else { - tcpstat.tcps_sndpack++; - tcpstat.tcps_sndbyte += len; - } - - m = m_get(); - if (m == NULL) { -/* error = ENOBUFS; */ - error = 1; - goto out; - } - m->m_data += if_maxlinkhdr; - m->m_len = hdrlen; - - /* - * This will always succeed, since we make sure our mbufs - * are big enough to hold one MSS packet + header + ... etc. - */ -/* if (len <= MHLEN - hdrlen - max_linkhdr) { */ - - sbcopy(&so->so_snd, off, (int) len, mtod(m, caddr_t) + hdrlen); - m->m_len += len; - -/* } else { - * m->m_next = m_copy(so->so_snd.sb_mb, off, (int) len); - * if (m->m_next == 0) - * len = 0; - * } - */ - /* - * If we're sending everything we've got, set PUSH. - * (This will keep happy those implementations which only - * give data to the user when a buffer fills or - * a PUSH comes in.) - */ - if (off + len == so->so_snd.sb_cc) - flags |= TH_PUSH; - } else { - if (tp->t_flags & TF_ACKNOW) - tcpstat.tcps_sndacks++; - else if (flags & (TH_SYN|TH_FIN|TH_RST)) - tcpstat.tcps_sndctrl++; - else if (SEQ_GT(tp->snd_up, tp->snd_una)) - tcpstat.tcps_sndurg++; - else - tcpstat.tcps_sndwinup++; - - m = m_get(); - if (m == NULL) { -/* error = ENOBUFS; */ - error = 1; - goto out; - } - m->m_data += if_maxlinkhdr; - m->m_len = hdrlen; - } - - ti = mtod(m, struct tcpiphdr *); - - memcpy((caddr_t)ti, &tp->t_template, sizeof (struct tcpiphdr)); - - /* - * Fill in fields, remembering maximum advertised - * window for use in delaying messages about window sizes. - * If resending a FIN, be sure not to use a new sequence number. - */ - if (flags & TH_FIN && tp->t_flags & TF_SENTFIN && - tp->snd_nxt == tp->snd_max) - tp->snd_nxt--; - /* - * If we are doing retransmissions, then snd_nxt will - * not reflect the first unsent octet. For ACK only - * packets, we do not want the sequence number of the - * retransmitted packet, we want the sequence number - * of the next unsent octet. So, if there is no data - * (and no SYN or FIN), use snd_max instead of snd_nxt - * when filling in ti_seq. But if we are in persist - * state, snd_max might reflect one byte beyond the - * right edge of the window, so use snd_nxt in that - * case, since we know we aren't doing a retransmission. - * (retransmit and persist are mutually exclusive...) - */ - if (len || (flags & (TH_SYN|TH_FIN)) || tp->t_timer[TCPT_PERSIST]) - ti->ti_seq = htonl(tp->snd_nxt); - else - ti->ti_seq = htonl(tp->snd_max); - ti->ti_ack = htonl(tp->rcv_nxt); - if (optlen) { - memcpy((caddr_t)(ti + 1), (caddr_t)opt, optlen); - ti->ti_off = (sizeof (struct tcphdr) + optlen) >> 2; - } - ti->ti_flags = flags; - /* - * Calculate receive window. Don't shrink window, - * but avoid silly window syndrome. - */ - if (win < (long)(so->so_rcv.sb_datalen / 4) && win < (long)tp->t_maxseg) - win = 0; - if (win > (long)TCP_MAXWIN << tp->rcv_scale) - win = (long)TCP_MAXWIN << tp->rcv_scale; - if (win < (long)(tp->rcv_adv - tp->rcv_nxt)) - win = (long)(tp->rcv_adv - tp->rcv_nxt); - ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale)); - - if (SEQ_GT(tp->snd_up, tp->snd_una)) { - ti->ti_urp = htons((u_int16_t)(tp->snd_up - ntohl(ti->ti_seq))); -#ifdef notdef - if (SEQ_GT(tp->snd_up, tp->snd_nxt)) { - ti->ti_urp = htons((u_int16_t)(tp->snd_up - tp->snd_nxt)); -#endif - ti->ti_flags |= TH_URG; - } else - /* - * If no urgent pointer to send, then we pull - * the urgent pointer to the left edge of the send window - * so that it doesn't drift into the send window on sequence - * number wraparound. - */ - tp->snd_up = tp->snd_una; /* drag it along */ - - /* - * Put TCP length in extended header, and then - * checksum extended header and data. - */ - if (len + optlen) - ti->ti_len = htons((u_int16_t)(sizeof (struct tcphdr) + - optlen + len)); - ti->ti_sum = cksum(m, (int)(hdrlen + len)); - - /* - * In transmit state, time the transmission and arrange for - * the retransmit. In persist state, just set snd_max. - */ - if (tp->t_force == 0 || tp->t_timer[TCPT_PERSIST] == 0) { - tcp_seq startseq = tp->snd_nxt; - - /* - * Advance snd_nxt over sequence space of this segment. - */ - if (flags & (TH_SYN|TH_FIN)) { - if (flags & TH_SYN) - tp->snd_nxt++; - if (flags & TH_FIN) { - tp->snd_nxt++; - tp->t_flags |= TF_SENTFIN; - } - } - tp->snd_nxt += len; - if (SEQ_GT(tp->snd_nxt, tp->snd_max)) { - tp->snd_max = tp->snd_nxt; - /* - * Time this transmission if not a retransmission and - * not currently timing anything. - */ - if (tp->t_rtt == 0) { - tp->t_rtt = 1; - tp->t_rtseq = startseq; - tcpstat.tcps_segstimed++; - } - } - - /* - * Set retransmit timer if not currently set, - * and not doing an ack or a keep-alive probe. - * Initial value for retransmit timer is smoothed - * round-trip time + 2 * round-trip time variance. - * Initialize shift counter which is used for backoff - * of retransmit time. - */ - if (tp->t_timer[TCPT_REXMT] == 0 && - tp->snd_nxt != tp->snd_una) { - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - if (tp->t_timer[TCPT_PERSIST]) { - tp->t_timer[TCPT_PERSIST] = 0; - tp->t_rxtshift = 0; - } - } - } else - if (SEQ_GT(tp->snd_nxt + len, tp->snd_max)) - tp->snd_max = tp->snd_nxt + len; - - /* - * Fill in IP length and desired time to live and - * send to IP level. There should be a better way - * to handle ttl and tos; we could keep them in - * the template, but need a way to checksum without them. - */ - m->m_len = hdrlen + len; /* XXX Needed? m_len should be correct */ - - { - - ((struct ip *)ti)->ip_len = m->m_len; - - ((struct ip *)ti)->ip_ttl = ip_defttl; - ((struct ip *)ti)->ip_tos = so->so_iptos; - -/* #if BSD >= 43 */ - /* Don't do IP options... */ -/* error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route, - * so->so_options & SO_DONTROUTE, 0); - */ - error = ip_output(so, m); - -/* #else - * error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route, - * so->so_options & SO_DONTROUTE); - * #endif - */ - } - if (error) { -out: -/* if (error == ENOBUFS) { - * tcp_quench(tp->t_inpcb, 0); - * return (0); - * } - */ -/* if ((error == EHOSTUNREACH || error == ENETDOWN) - * && TCPS_HAVERCVDSYN(tp->t_state)) { - * tp->t_softerror = error; - * return (0); - * } - */ - return (error); - } - tcpstat.tcps_sndtotal++; - - /* - * Data sent (as far as we can tell). - * If this advertises a larger window than any other segment, - * then remember the size of the advertised window. - * Any pending ACK has now been sent. - */ - if (win > 0 && SEQ_GT(tp->rcv_nxt+win, tp->rcv_adv)) - tp->rcv_adv = tp->rcv_nxt + win; - tp->last_ack_sent = tp->rcv_nxt; - tp->t_flags &= ~(TF_ACKNOW|TF_DELACK); - if (sendalot) - goto again; - - return (0); -} - -void -tcp_setpersist(tp) - register struct tcpcb *tp; -{ - int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> 1; - -/* if (tp->t_timer[TCPT_REXMT]) - * panic("tcp_output REXMT"); - */ - /* - * Start/restart persistence timer. - */ - TCPT_RANGESET(tp->t_timer[TCPT_PERSIST], - t * tcp_backoff[tp->t_rxtshift], - TCPTV_PERSMIN, TCPTV_PERSMAX); - if (tp->t_rxtshift < TCP_MAXRXTSHIFT) - tp->t_rxtshift++; -} diff --git a/SheepShaver/src/slirp/tcp_subr.c b/SheepShaver/src/slirp/tcp_subr.c deleted file mode 100755 index 391350802..000000000 --- a/SheepShaver/src/slirp/tcp_subr.c +++ /dev/null @@ -1,1324 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_subr.c 8.1 (Berkeley) 6/10/93 - * tcp_subr.c,v 1.5 1994/10/08 22:39:58 phk Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#define WANT_SYS_IOCTL_H -#include -#include - -/* patchable/settable parameters for tcp */ -int tcp_mssdflt = TCP_MSS; -int tcp_rttdflt = TCPTV_SRTTDFLT / PR_SLOWHZ; -int tcp_do_rfc1323 = 0; /* Don't do rfc1323 performance enhancements */ -int tcp_rcvspace; /* You may want to change this */ -int tcp_sndspace; /* Keep small if you have an error prone link */ - -/* - * Tcp initialization - */ -void -tcp_init() -{ - tcp_iss = 1; /* wrong */ - tcb.so_next = tcb.so_prev = &tcb; - - /* tcp_rcvspace = our Window we advertise to the remote */ - tcp_rcvspace = TCP_RCVSPACE; - tcp_sndspace = TCP_SNDSPACE; - - /* Make sure tcp_sndspace is at least 2*MSS */ - if (tcp_sndspace < 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr))) - tcp_sndspace = 2*(min(if_mtu, if_mru) - sizeof(struct tcpiphdr)); -} - -/* - * Create template to be used to send tcp packets on a connection. - * Call after host entry created, fills - * in a skeletal tcp/ip header, minimizing the amount of work - * necessary when the connection is used. - */ -/* struct tcpiphdr * */ -void -tcp_template(tp) - struct tcpcb *tp; -{ - struct socket *so = tp->t_socket; - register struct tcpiphdr *n = &tp->t_template; - - n->ti_mbuf = NULL; - n->ti_x1 = 0; - n->ti_pr = IPPROTO_TCP; - n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); - n->ti_src = so->so_faddr; - n->ti_dst = so->so_laddr; - n->ti_sport = so->so_fport; - n->ti_dport = so->so_lport; - - n->ti_seq = 0; - n->ti_ack = 0; - n->ti_x2 = 0; - n->ti_off = 5; - n->ti_flags = 0; - n->ti_win = 0; - n->ti_sum = 0; - n->ti_urp = 0; -} - -/* - * Send a single message to the TCP at address specified by - * the given TCP/IP header. If m == 0, then we make a copy - * of the tcpiphdr at ti and send directly to the addressed host. - * This is used to force keep alive messages out using the TCP - * template for a connection tp->t_template. If flags are given - * then we send a message back to the TCP which originated the - * segment ti, and discard the mbuf containing it and any other - * attached mbufs. - * - * In any case the ack and sequence number of the transmitted - * segment are as specified by the parameters. - */ -void -tcp_respond(tp, ti, m, ack, seq, flags) - struct tcpcb *tp; - register struct tcpiphdr *ti; - register struct mbuf *m; - tcp_seq ack, seq; - int flags; -{ - register int tlen; - int win = 0; - - DEBUG_CALL("tcp_respond"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("ti = %lx", (long)ti); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("ack = %u", ack); - DEBUG_ARG("seq = %u", seq); - DEBUG_ARG("flags = %x", flags); - - if (tp) - win = sbspace(&tp->t_socket->so_rcv); - if (m == 0) { - if ((m = m_get()) == NULL) - return; -#ifdef TCP_COMPAT_42 - tlen = 1; -#else - tlen = 0; -#endif - m->m_data += if_maxlinkhdr; - *mtod(m, struct tcpiphdr *) = *ti; - ti = mtod(m, struct tcpiphdr *); - flags = TH_ACK; - } else { - /* - * ti points into m so the next line is just making - * the mbuf point to ti - */ - m->m_data = (caddr_t)ti; - - m->m_len = sizeof (struct tcpiphdr); - tlen = 0; -#define xchg(a,b,type) { type t; t=a; a=b; b=t; } - xchg(ti->ti_dst.s_addr, ti->ti_src.s_addr, u_int32_t); - xchg(ti->ti_dport, ti->ti_sport, u_int16_t); -#undef xchg - } - ti->ti_len = htons((u_short)(sizeof (struct tcphdr) + tlen)); - tlen += sizeof (struct tcpiphdr); - m->m_len = tlen; - - ti->ti_mbuf = 0; - ti->ti_x1 = 0; - ti->ti_seq = htonl(seq); - ti->ti_ack = htonl(ack); - ti->ti_x2 = 0; - ti->ti_off = sizeof (struct tcphdr) >> 2; - ti->ti_flags = flags; - if (tp) - ti->ti_win = htons((u_int16_t) (win >> tp->rcv_scale)); - else - ti->ti_win = htons((u_int16_t)win); - ti->ti_urp = 0; - ti->ti_sum = 0; - ti->ti_sum = cksum(m, tlen); - ((struct ip *)ti)->ip_len = tlen; - - if(flags & TH_RST) - ((struct ip *)ti)->ip_ttl = MAXTTL; - else - ((struct ip *)ti)->ip_ttl = ip_defttl; - - (void) ip_output((struct socket *)0, m); -} - -/* - * Create a new TCP control block, making an - * empty reassembly queue and hooking it to the argument - * protocol control block. - */ -struct tcpcb * -tcp_newtcpcb(so) - struct socket *so; -{ - register struct tcpcb *tp; - - tp = (struct tcpcb *)malloc(sizeof(*tp)); - if (tp == NULL) - return ((struct tcpcb *)0); - - memset((char *) tp, 0, sizeof(struct tcpcb)); - tp->seg_next = tp->seg_prev = (struct tcpiphdr*)tp; - tp->t_maxseg = tcp_mssdflt; - - tp->t_flags = tcp_do_rfc1323 ? (TF_REQ_SCALE|TF_REQ_TSTMP) : 0; - tp->t_socket = so; - - /* - * Init srtt to TCPTV_SRTTBASE (0), so we can tell that we have no - * rtt estimate. Set rttvar so that srtt + 2 * rttvar gives - * reasonable initial retransmit time. - */ - tp->t_srtt = TCPTV_SRTTBASE; - tp->t_rttvar = tcp_rttdflt * PR_SLOWHZ << 2; - tp->t_rttmin = TCPTV_MIN; - - TCPT_RANGESET(tp->t_rxtcur, - ((TCPTV_SRTTBASE >> 2) + (TCPTV_SRTTDFLT << 2)) >> 1, - TCPTV_MIN, TCPTV_REXMTMAX); - - tp->snd_cwnd = TCP_MAXWIN << TCP_MAX_WINSHIFT; - tp->snd_ssthresh = TCP_MAXWIN << TCP_MAX_WINSHIFT; - tp->t_state = TCPS_CLOSED; - - so->so_tcpcb = tp; - - return (tp); -} - -/* - * Drop a TCP connection, reporting - * the specified error. If connection is synchronized, - * then send a RST to peer. - */ -struct tcpcb *tcp_drop(struct tcpcb *tp, int err) -{ -/* tcp_drop(tp, errno) - register struct tcpcb *tp; - int errno; -{ -*/ - - DEBUG_CALL("tcp_drop"); - DEBUG_ARG("tp = %lx", (long)tp); - DEBUG_ARG("errno = %d", errno); - - if (TCPS_HAVERCVDSYN(tp->t_state)) { - tp->t_state = TCPS_CLOSED; - (void) tcp_output(tp); - tcpstat.tcps_drops++; - } else - tcpstat.tcps_conndrops++; -/* if (errno == ETIMEDOUT && tp->t_softerror) - * errno = tp->t_softerror; - */ -/* so->so_error = errno; */ - return (tcp_close(tp)); -} - -/* - * Close a TCP control block: - * discard all space held by the tcp - * discard internet protocol block - * wake up any sleepers - */ -struct tcpcb * -tcp_close(tp) - register struct tcpcb *tp; -{ - register struct tcpiphdr *t; - struct socket *so = tp->t_socket; - register struct mbuf *m; - - DEBUG_CALL("tcp_close"); - DEBUG_ARG("tp = %lx", (long )tp); - - /* free the reassembly queue, if any */ - t = tcpfrag_list_first(tp); - while (!tcpfrag_list_end(t, tp)) { - t = tcpiphdr_next(t); - m = tcpiphdr_prev(t)->ti_mbuf; - remque(tcpiphdr2qlink(tcpiphdr_prev(t))); - m_freem(m); - } - /* It's static */ -/* if (tp->t_template) - * (void) m_free(dtom(tp->t_template)); - */ -/* free(tp, M_PCB); */ - free(tp); - so->so_tcpcb = 0; - soisfdisconnected(so); - /* clobber input socket cache if we're closing the cached connection */ - if (so == tcp_last_so) - tcp_last_so = &tcb; - closesocket(so->s); - sbfree(&so->so_rcv); - sbfree(&so->so_snd); - sofree(so); - tcpstat.tcps_closed++; - return ((struct tcpcb *)0); -} - -void -tcp_drain() -{ - /* XXX */ -} - -/* - * When a source quench is received, close congestion window - * to one segment. We will gradually open it again as we proceed. - */ - -#ifdef notdef - -void -tcp_quench(i, errno) - - int errno; -{ - struct tcpcb *tp = intotcpcb(inp); - - if (tp) - tp->snd_cwnd = tp->t_maxseg; -} - -#endif /* notdef */ - -/* - * TCP protocol interface to socket abstraction. - */ - -/* - * User issued close, and wish to trail through shutdown states: - * if never received SYN, just forget it. If got a SYN from peer, - * but haven't sent FIN, then go to FIN_WAIT_1 state to send peer a FIN. - * If already got a FIN from peer, then almost done; go to LAST_ACK - * state. In all other cases, have already sent FIN to peer (e.g. - * after PRU_SHUTDOWN), and just have to play tedious game waiting - * for peer to send FIN or not respond to keep-alives, etc. - * We can let the user exit from the close as soon as the FIN is acked. - */ -void -tcp_sockclosed(tp) - struct tcpcb *tp; -{ - - DEBUG_CALL("tcp_sockclosed"); - DEBUG_ARG("tp = %lx", (long)tp); - - switch (tp->t_state) { - - case TCPS_CLOSED: - case TCPS_LISTEN: - case TCPS_SYN_SENT: - tp->t_state = TCPS_CLOSED; - tp = tcp_close(tp); - break; - - case TCPS_SYN_RECEIVED: - case TCPS_ESTABLISHED: - tp->t_state = TCPS_FIN_WAIT_1; - break; - - case TCPS_CLOSE_WAIT: - tp->t_state = TCPS_LAST_ACK; - break; - } -/* soisfdisconnecting(tp->t_socket); */ - if (tp && tp->t_state >= TCPS_FIN_WAIT_2) - soisfdisconnected(tp->t_socket); - if (tp) - tcp_output(tp); -} - -/* - * Connect to a host on the Internet - * Called by tcp_input - * Only do a connect, the tcp fields will be set in tcp_input - * return 0 if there's a result of the connect, - * else return -1 means we're still connecting - * The return value is almost always -1 since the socket is - * nonblocking. Connect returns after the SYN is sent, and does - * not wait for ACK+SYN. - */ -int tcp_fconnect(so) - struct socket *so; -{ - int ret=0; - - DEBUG_CALL("tcp_fconnect"); - DEBUG_ARG("so = %lx", (long )so); - - if( (ret=so->s=socket(AF_INET,SOCK_STREAM,0)) >= 0) { - int opt, s=so->s; - struct sockaddr_in addr; - memset(&addr, 0, sizeof(struct sockaddr_in)); - - fd_nonblock(s); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(opt )); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(opt )); - - addr.sin_family = AF_INET; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - /* It's an alias */ - switch(ntohl(so->so_faddr.s_addr) & 0xff) { - case CTL_DNS: - addr.sin_addr = dns_addr; - break; - case CTL_ALIAS: - default: - addr.sin_addr = loopback_addr; - break; - } - } else - addr.sin_addr = so->so_faddr; - addr.sin_port = so->so_fport; - - DEBUG_MISC((dfd, " connect()ing, addr.sin_port=%d, " - "addr.sin_addr.s_addr=%.16s\n", - ntohs(addr.sin_port), inet_ntoa(addr.sin_addr))); - /* We don't care what port we get */ - ret = connect(s,(struct sockaddr *)&addr,sizeof (addr)); - - /* - * If it's not in progress, it failed, so we just return 0, - * without clearing SS_NOFDREF - */ - soisfconnecting(so); - } - - return(ret); -} - -/* - * Accept the socket and connect to the local-host - * - * We have a problem. The correct thing to do would be - * to first connect to the local-host, and only if the - * connection is accepted, then do an accept() here. - * But, a) we need to know who's trying to connect - * to the socket to be able to SYN the local-host, and - * b) we are already connected to the foreign host by - * the time it gets to accept(), so... We simply accept - * here and SYN the local-host. - */ -void -tcp_connect(inso) - struct socket *inso; -{ - struct socket *so; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - struct tcpcb *tp; - int s, opt; - - DEBUG_CALL("tcp_connect"); - DEBUG_ARG("inso = %lx", (long)inso); - - /* - * If it's an SS_ACCEPTONCE socket, no need to socreate() - * another socket, just use the accept() socket. - */ - if (inso->so_state & SS_FACCEPTONCE) { - /* FACCEPTONCE already have a tcpcb */ - so = inso; - } else { - if ((so = socreate()) == NULL) { - /* If it failed, get rid of the pending connection */ - closesocket(accept(inso->s,(struct sockaddr *)&addr,&addrlen)); - return; - } - if (tcp_attach(so) < 0) { - free(so); /* NOT sofree */ - return; - } - so->so_laddr = inso->so_laddr; - so->so_lport = inso->so_lport; - } - - (void) tcp_mss(sototcpcb(so), 0); - - if ((s = accept(inso->s,(struct sockaddr *)&addr,&addrlen)) < 0) { - tcp_close(sototcpcb(so)); /* This will sofree() as well */ - return; - } - fd_nonblock(s); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); - opt = 1; - setsockopt(s,IPPROTO_TCP,TCP_NODELAY,(char *)&opt,sizeof(int)); - - so->so_fport = addr.sin_port; - so->so_faddr = addr.sin_addr; - /* Translate connections from localhost to the real hostname */ - if (so->so_faddr.s_addr == 0 || so->so_faddr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - - /* Close the accept() socket, set right state */ - if (inso->so_state & SS_FACCEPTONCE) { - closesocket(so->s); /* If we only accept once, close the accept() socket */ - so->so_state = SS_NOFDREF; /* Don't select it yet, even though we have an FD */ - /* if it's not FACCEPTONCE, it's already NOFDREF */ - } - so->s = s; - - so->so_iptos = tcp_tos(so); - tp = sototcpcb(so); - - tcp_template(tp); - - /* Compute window scaling to request. */ -/* while (tp->request_r_scale < TCP_MAX_WINSHIFT && - * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) - * tp->request_r_scale++; - */ - -/* soisconnecting(so); */ /* NOFDREF used instead */ - tcpstat.tcps_connattempt++; - - tp->t_state = TCPS_SYN_SENT; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tcp_sendseqinit(tp); - tcp_output(tp); -} - -/* - * Attach a TCPCB to a socket. - */ -int -tcp_attach(so) - struct socket *so; -{ - if ((so->so_tcpcb = tcp_newtcpcb(so)) == NULL) - return -1; - - insque(so, &tcb); - - return 0; -} - -/* - * Set the socket's type of service field - */ -struct tos_t tcptos[] = { - {0, 20, IPTOS_THROUGHPUT, 0}, /* ftp data */ - {21, 21, IPTOS_LOWDELAY, EMU_FTP}, /* ftp control */ - {0, 23, IPTOS_LOWDELAY, 0}, /* telnet */ - {0, 80, IPTOS_THROUGHPUT, 0}, /* WWW */ - {0, 513, IPTOS_LOWDELAY, EMU_RLOGIN|EMU_NOCONNECT}, /* rlogin */ - {0, 514, IPTOS_LOWDELAY, EMU_RSH|EMU_NOCONNECT}, /* shell */ - {0, 544, IPTOS_LOWDELAY, EMU_KSH}, /* kshell */ - {0, 543, IPTOS_LOWDELAY, 0}, /* klogin */ - {0, 6667, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC */ - {0, 6668, IPTOS_THROUGHPUT, EMU_IRC}, /* IRC undernet */ - {0, 7070, IPTOS_LOWDELAY, EMU_REALAUDIO }, /* RealAudio control */ - {0, 113, IPTOS_LOWDELAY, EMU_IDENT }, /* identd protocol */ - {0, 0, 0, 0} -}; - -struct emu_t *tcpemu = 0; - -/* - * Return TOS according to the above table - */ -u_int8_t -tcp_tos(so) - struct socket *so; -{ - int i = 0; - struct emu_t *emup; - - while(tcptos[i].tos) { - if ((tcptos[i].fport && (ntohs(so->so_fport) == tcptos[i].fport)) || - (tcptos[i].lport && (ntohs(so->so_lport) == tcptos[i].lport))) { - so->so_emu = tcptos[i].emu; - return tcptos[i].tos; - } - i++; - } - - /* Nope, lets see if there's a user-added one */ - for (emup = tcpemu; emup; emup = emup->next) { - if ((emup->fport && (ntohs(so->so_fport) == emup->fport)) || - (emup->lport && (ntohs(so->so_lport) == emup->lport))) { - so->so_emu = emup->emu; - return emup->tos; - } - } - - return 0; -} - -int do_echo = -1; - -/* - * Emulate programs that try and connect to us - * This includes ftp (the data connection is - * initiated by the server) and IRC (DCC CHAT and - * DCC SEND) for now - * - * NOTE: It's possible to crash SLiRP by sending it - * unstandard strings to emulate... if this is a problem, - * more checks are needed here - * - * XXX Assumes the whole command came in one packet - * - * XXX Some ftp clients will have their TOS set to - * LOWDELAY and so Nagel will kick in. Because of this, - * we'll get the first letter, followed by the rest, so - * we simply scan for ORT instead of PORT... - * DCC doesn't have this problem because there's other stuff - * in the packet before the DCC command. - * - * Return 1 if the mbuf m is still valid and should be - * sbappend()ed - * - * NOTE: if you return 0 you MUST m_free() the mbuf! - */ -int -tcp_emu(so, m) - struct socket *so; - struct mbuf *m; -{ - u_int n1, n2, n3, n4, n5, n6; - char buff[256]; - u_int32_t laddr; - u_int lport; - char *bptr; - - DEBUG_CALL("tcp_emu"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - - switch(so->so_emu) { - int x, i; - - case EMU_IDENT: - /* - * Identification protocol as per rfc-1413 - */ - - { - struct socket *tmpso; - struct sockaddr_in addr; - socklen_t addrlen = sizeof(struct sockaddr_in); - struct sbuf *so_rcv = &so->so_rcv; - - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m->m_data[m->m_len] = 0; /* NULL terminate */ - if (strchr(m->m_data, '\r') || strchr(m->m_data, '\n')) { - if (sscanf(so_rcv->sb_data, "%d%*[ ,]%d", &n1, &n2) == 2) { - HTONS(n1); - HTONS(n2); - /* n2 is the one on our host */ - for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_laddr.s_addr == so->so_laddr.s_addr && - tmpso->so_lport == n2 && - tmpso->so_faddr.s_addr == so->so_faddr.s_addr && - tmpso->so_fport == n1) { - if (getsockname(tmpso->s, - (struct sockaddr *)&addr, &addrlen) == 0) - n2 = ntohs(addr.sin_port); - break; - } - } - } - so_rcv->sb_cc = sprintf(so_rcv->sb_data, "%d,%d\r\n", n1, n2); - so_rcv->sb_rptr = so_rcv->sb_data; - so_rcv->sb_wptr = so_rcv->sb_data + so_rcv->sb_cc; - } - m_free(m); - return 0; - } - -#if 0 - case EMU_RLOGIN: - /* - * Rlogin emulation - * First we accumulate all the initial option negotiation, - * then fork_exec() rlogin according to the options - */ - { - int i, i2, n; - char *ptr; - char args[100]; - char term[100]; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* First check if they have a priveladged port, or too much data has arrived */ - if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || - (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - m_free(m); - return 0; - } - - /* Append the current data */ - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m_free(m); - - /* - * Check if we have all the initial options, - * and build argument list to rlogin while we're here - */ - n = 0; - ptr = so_rcv->sb_data; - args[0] = 0; - term[0] = 0; - while (ptr < so_rcv->sb_wptr) { - if (*ptr++ == 0) { - n++; - if (n == 2) { - sprintf(args, "rlogin -l %s %s", - ptr, inet_ntoa(so->so_faddr)); - } else if (n == 3) { - i2 = so_rcv->sb_wptr - ptr; - for (i = 0; i < i2; i++) { - if (ptr[i] == '/') { - ptr[i] = 0; -#ifdef HAVE_SETENV - sprintf(term, "%s", ptr); -#else - sprintf(term, "TERM=%s", ptr); -#endif - ptr[i] = '/'; - break; - } - } - } - } - } - - if (n != 4) - return 0; - - /* We have it, set our term variable and fork_exec() */ -#ifdef HAVE_SETENV - setenv("TERM", term, 1); -#else - putenv(term); -#endif - fork_exec(so, args, 2); - term[0] = 0; - so->so_emu = 0; - - /* And finally, send the client a 0 character */ - so_snd->sb_wptr[0] = 0; - so_snd->sb_wptr++; - so_snd->sb_cc++; - - return 0; - } - - case EMU_RSH: - /* - * rsh emulation - * First we accumulate all the initial option negotiation, - * then rsh_exec() rsh according to the options - */ - { - int n; - char *ptr; - char *user; - char *args; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* First check if they have a priveladged port, or too much data has arrived */ - if (ntohs(so->so_lport) > 1023 || ntohs(so->so_lport) < 512 || - (m->m_len + so_rcv->sb_wptr) > (so_rcv->sb_data + so_rcv->sb_datalen)) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - m_free(m); - return 0; - } - - /* Append the current data */ - memcpy(so_rcv->sb_wptr, m->m_data, m->m_len); - so_rcv->sb_wptr += m->m_len; - so_rcv->sb_rptr += m->m_len; - m_free(m); - - /* - * Check if we have all the initial options, - * and build argument list to rlogin while we're here - */ - n = 0; - ptr = so_rcv->sb_data; - user=""; - args=""; - if (so->extra==NULL) { - struct socket *ns; - struct tcpcb* tp; - int port=atoi(ptr); - if (port <= 0) return 0; - if (port > 1023 || port < 512) { - memcpy(so_snd->sb_wptr, "Permission denied\n", 18); - so_snd->sb_wptr += 18; - so_snd->sb_cc += 18; - tcp_sockclosed(sototcpcb(so)); - return 0; - } - if ((ns=socreate()) == NULL) - return 0; - if (tcp_attach(ns)<0) { - free(ns); - return 0; - } - - ns->so_laddr=so->so_laddr; - ns->so_lport=htons(port); - - (void) tcp_mss(sototcpcb(ns), 0); - - ns->so_faddr=so->so_faddr; - ns->so_fport=htons(IPPORT_RESERVED-1); /* Use a fake port. */ - - if (ns->so_faddr.s_addr == 0 || - ns->so_faddr.s_addr == loopback_addr.s_addr) - ns->so_faddr = alias_addr; - - ns->so_iptos = tcp_tos(ns); - tp = sototcpcb(ns); - - tcp_template(tp); - - /* Compute window scaling to request. */ - /* while (tp->request_r_scale < TCP_MAX_WINSHIFT && - * (TCP_MAXWIN << tp->request_r_scale) < so->so_rcv.sb_hiwat) - * tp->request_r_scale++; - */ - - /*soisfconnecting(ns);*/ - - tcpstat.tcps_connattempt++; - - tp->t_state = TCPS_SYN_SENT; - tp->t_timer[TCPT_KEEP] = TCPTV_KEEP_INIT; - tp->iss = tcp_iss; - tcp_iss += TCP_ISSINCR/2; - tcp_sendseqinit(tp); - tcp_output(tp); - so->extra=ns; - } - while (ptr < so_rcv->sb_wptr) { - if (*ptr++ == 0) { - n++; - if (n == 2) { - user=ptr; - } else if (n == 3) { - args=ptr; - } - } - } - - if (n != 4) - return 0; - - rsh_exec(so,so->extra, user, inet_ntoa(so->so_faddr), args); - so->so_emu = 0; - so->extra=NULL; - - /* And finally, send the client a 0 character */ - so_snd->sb_wptr[0] = 0; - so_snd->sb_wptr++; - so_snd->sb_cc++; - - return 0; - } - - case EMU_CTL: - { - int num; - struct sbuf *so_snd = &so->so_snd; - struct sbuf *so_rcv = &so->so_rcv; - - /* - * If there is binary data here, we save it in so->so_m - */ - if (!so->so_m) { - int rxlen; - char *rxdata; - rxdata=mtod(m, char *); - for (rxlen=m->m_len; rxlen; rxlen--) { - if (*rxdata++ & 0x80) { - so->so_m = m; - return 0; - } - } - } /* if(so->so_m==NULL) */ - - /* - * Append the line - */ - sbappendsb(so_rcv, m); - - /* To avoid going over the edge of the buffer, we reset it */ - if (so_snd->sb_cc == 0) - so_snd->sb_wptr = so_snd->sb_rptr = so_snd->sb_data; - - /* - * A bit of a hack: - * If the first packet we get here is 1 byte long, then it - * was done in telnet character mode, therefore we must echo - * the characters as they come. Otherwise, we echo nothing, - * because in linemode, the line is already echoed - * XXX two or more control connections won't work - */ - if (do_echo == -1) { - if (m->m_len == 1) do_echo = 1; - else do_echo = 0; - } - if (do_echo) { - sbappendsb(so_snd, m); - m_free(m); - tcp_output(sototcpcb(so)); /* XXX */ - } else - m_free(m); - - num = 0; - while (num < so->so_rcv.sb_cc) { - if (*(so->so_rcv.sb_rptr + num) == '\n' || - *(so->so_rcv.sb_rptr + num) == '\r') { - int n; - - *(so_rcv->sb_rptr + num) = 0; - if (ctl_password && !ctl_password_ok) { - /* Need a password */ - if (sscanf(so_rcv->sb_rptr, "pass %256s", buff) == 1) { - if (strcmp(buff, ctl_password) == 0) { - ctl_password_ok = 1; - n = sprintf(so_snd->sb_wptr, - "Password OK.\r\n"); - goto do_prompt; - } - } - n = sprintf(so_snd->sb_wptr, - "Error: Password required, log on with \"pass PASSWORD\"\r\n"); - goto do_prompt; - } - cfg_quitting = 0; - n = do_config(so_rcv->sb_rptr, so, PRN_SPRINTF); - if (!cfg_quitting) { - /* Register the printed data */ -do_prompt: - so_snd->sb_cc += n; - so_snd->sb_wptr += n; - /* Add prompt */ - n = sprintf(so_snd->sb_wptr, "Slirp> "); - so_snd->sb_cc += n; - so_snd->sb_wptr += n; - } - /* Drop so_rcv data */ - so_rcv->sb_cc = 0; - so_rcv->sb_wptr = so_rcv->sb_rptr = so_rcv->sb_data; - tcp_output(sototcpcb(so)); /* Send the reply */ - } - num++; - } - return 0; - } -#endif - case EMU_FTP: /* ftp */ - *(m->m_data+m->m_len) = 0; /* NULL terminate for strstr */ - if ((bptr = (char *)strstr(m->m_data, "ORT")) != NULL) { - /* - * Need to emulate the PORT command - */ - x = sscanf(bptr, "ORT %d,%d,%d,%d,%d,%d\r\n%256[^\177]", - &n1, &n2, &n3, &n4, &n5, &n6, buff); - if (x < 6) - return 1; - - laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); - lport = htons((n5 << 8) | (n6)); - - if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) - return 1; - - n6 = ntohs(so->so_fport); - - n5 = (n6 >> 8) & 0xff; - n6 &= 0xff; - - laddr = ntohl(so->so_faddr.s_addr); - - n1 = ((laddr >> 24) & 0xff); - n2 = ((laddr >> 16) & 0xff); - n3 = ((laddr >> 8) & 0xff); - n4 = (laddr & 0xff); - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"ORT %d,%d,%d,%d,%d,%d\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); - return 1; - } else if ((bptr = (char *)strstr(m->m_data, "27 Entering")) != NULL) { - /* - * Need to emulate the PASV response - */ - x = sscanf(bptr, "27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%256[^\177]", - &n1, &n2, &n3, &n4, &n5, &n6, buff); - if (x < 6) - return 1; - - laddr = htonl((n1 << 24) | (n2 << 16) | (n3 << 8) | (n4)); - lport = htons((n5 << 8) | (n6)); - - if ((so = solisten(0, laddr, lport, SS_FACCEPTONCE)) == NULL) - return 1; - - n6 = ntohs(so->so_fport); - - n5 = (n6 >> 8) & 0xff; - n6 &= 0xff; - - laddr = ntohl(so->so_faddr.s_addr); - - n1 = ((laddr >> 24) & 0xff); - n2 = ((laddr >> 16) & 0xff); - n3 = ((laddr >> 8) & 0xff); - n4 = (laddr & 0xff); - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr,"27 Entering Passive Mode (%d,%d,%d,%d,%d,%d)\r\n%s", - n1, n2, n3, n4, n5, n6, x==7?buff:""); - - return 1; - } - - return 1; - - case EMU_KSH: - /* - * The kshell (Kerberos rsh) and shell services both pass - * a local port port number to carry signals to the server - * and stderr to the client. It is passed at the beginning - * of the connection as a NUL-terminated decimal ASCII string. - */ - so->so_emu = 0; - for (lport = 0, i = 0; i < m->m_len-1; ++i) { - if (m->m_data[i] < '0' || m->m_data[i] > '9') - return 1; /* invalid number */ - lport *= 10; - lport += m->m_data[i] - '0'; - } - if (m->m_data[m->m_len-1] == '\0' && lport != 0 && - (so = solisten(0, so->so_laddr.s_addr, htons(lport), SS_FACCEPTONCE)) != NULL) - m->m_len = sprintf(m->m_data, "%d", ntohs(so->so_fport))+1; - return 1; - - case EMU_IRC: - /* - * Need to emulate DCC CHAT, DCC SEND and DCC MOVE - */ - *(m->m_data+m->m_len) = 0; /* NULL terminate the string for strstr */ - if ((bptr = (char *)strstr(m->m_data, "DCC")) == NULL) - return 1; - - /* The %256s is for the broken mIRC */ - if (sscanf(bptr, "DCC CHAT %256s %u %u", buff, &laddr, &lport) == 3) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC CHAT chat %lu %u%c\n", - (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), 1); - } else if (sscanf(bptr, "DCC SEND %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC SEND %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); - } else if (sscanf(bptr, "DCC MOVE %256s %u %u %u", buff, &laddr, &lport, &n1) == 4) { - if ((so = solisten(0, htonl(laddr), htons(lport), SS_FACCEPTONCE)) == NULL) - return 1; - - m->m_len = bptr - m->m_data; /* Adjust length */ - m->m_len += sprintf(bptr, "DCC MOVE %s %lu %u %u%c\n", - buff, (unsigned long)ntohl(so->so_faddr.s_addr), - ntohs(so->so_fport), n1, 1); - } - return 1; - - case EMU_REALAUDIO: - /* - * RealAudio emulation - JP. We must try to parse the incoming - * data and try to find the two characters that contain the - * port number. Then we redirect an udp port and replace the - * number with the real port we got. - * - * The 1.0 beta versions of the player are not supported - * any more. - * - * A typical packet for player version 1.0 (release version): - * - * 0000:50 4E 41 00 05 - * 0000:00 01 00 02 1B D7 00 00 67 E6 6C DC 63 00 12 50 .....×..gælÜc..P - * 0010:4E 43 4C 49 45 4E 54 20 31 30 31 20 41 4C 50 48 NCLIENT 101 ALPH - * 0020:41 6C 00 00 52 00 17 72 61 66 69 6C 65 73 2F 76 Al..R..rafiles/v - * 0030:6F 61 2F 65 6E 67 6C 69 73 68 5F 2E 72 61 79 42 oa/english_.rayB - * - * Now the port number 0x1BD7 is found at offset 0x04 of the - * Now the port number 0x1BD7 is found at offset 0x04 of the - * second packet. This time we received five bytes first and - * then the rest. You never know how many bytes you get. - * - * A typical packet for player version 2.0 (beta): - * - * 0000:50 4E 41 00 06 00 02 00 00 00 01 00 02 1B C1 00 PNA...........Á. - * 0010:00 67 75 78 F5 63 00 0A 57 69 6E 32 2E 30 2E 30 .guxõc..Win2.0.0 - * 0020:2E 35 6C 00 00 52 00 1C 72 61 66 69 6C 65 73 2F .5l..R..rafiles/ - * 0030:77 65 62 73 69 74 65 2F 32 30 72 65 6C 65 61 73 website/20releas - * 0040:65 2E 72 61 79 53 00 00 06 36 42 e.rayS...6B - * - * Port number 0x1BC1 is found at offset 0x0d. - * - * This is just a horrible switch statement. Variable ra tells - * us where we're going. - */ - - bptr = m->m_data; - while (bptr < m->m_data + m->m_len) { - u_short p; - static int ra = 0; - char ra_tbl[4]; - - ra_tbl[0] = 0x50; - ra_tbl[1] = 0x4e; - ra_tbl[2] = 0x41; - ra_tbl[3] = 0; - - switch (ra) { - case 0: - case 2: - case 3: - if (*bptr++ != ra_tbl[ra]) { - ra = 0; - continue; - } - break; - - case 1: - /* - * We may get 0x50 several times, ignore them - */ - if (*bptr == 0x50) { - ra = 1; - bptr++; - continue; - } else if (*bptr++ != ra_tbl[ra]) { - ra = 0; - continue; - } - break; - - case 4: - /* - * skip version number - */ - bptr++; - break; - - case 5: - /* - * The difference between versions 1.0 and - * 2.0 is here. For future versions of - * the player this may need to be modified. - */ - if (*(bptr + 1) == 0x02) - bptr += 8; - else - bptr += 4; - break; - - case 6: - /* This is the field containing the port - * number that RA-player is listening to. - */ - lport = (((u_char*)bptr)[0] << 8) - + ((u_char *)bptr)[1]; - if (lport < 6970) - lport += 256; /* don't know why */ - if (lport < 6970 || lport > 7170) - return 1; /* failed */ - - /* try to get udp port between 6970 - 7170 */ - for (p = 6970; p < 7071; p++) { - if (udp_listen( htons(p), - so->so_laddr.s_addr, - htons(lport), - SS_FACCEPTONCE)) { - break; - } - } - if (p == 7071) - p = 0; - *(u_char *)bptr++ = (p >> 8) & 0xff; - *(u_char *)bptr++ = p & 0xff; - ra = 0; - return 1; /* port redirected, we're done */ - break; - - default: - ra = 0; - } - ra++; - } - return 1; - - default: - /* Ooops, not emulated, won't call tcp_emu again */ - so->so_emu = 0; - return 1; - } -} - -/* - * Do misc. config of SLiRP while its running. - * Return 0 if this connections is to be closed, 1 otherwise, - * return 2 if this is a command-line connection - */ -int -tcp_ctl(so) - struct socket *so; -{ - struct sbuf *sb = &so->so_snd; - int command; - struct ex_list *ex_ptr; - int do_pty; - // struct socket *tmpso; - - DEBUG_CALL("tcp_ctl"); - DEBUG_ARG("so = %lx", (long )so); - -#if 0 - /* - * Check if they're authorised - */ - if (ctl_addr.s_addr && (ctl_addr.s_addr == -1 || (so->so_laddr.s_addr != ctl_addr.s_addr))) { - sb->sb_cc = sprintf(sb->sb_wptr,"Error: Permission denied.\r\n"); - sb->sb_wptr += sb->sb_cc; - return 0; - } -#endif - command = (ntohl(so->so_faddr.s_addr) & 0xff); - - switch(command) { - default: /* Check for exec's */ - - /* - * Check if it's pty_exec - */ - for (ex_ptr = exec_list; ex_ptr; ex_ptr = ex_ptr->ex_next) { - if (ex_ptr->ex_fport == so->so_fport && - command == ex_ptr->ex_addr) { - do_pty = ex_ptr->ex_pty; - goto do_exec; - } - } - - /* - * Nothing bound.. - */ - /* tcp_fconnect(so); */ - - /* FALLTHROUGH */ - case CTL_ALIAS: - sb->sb_cc = sprintf(sb->sb_wptr, - "Error: No application configured.\r\n"); - sb->sb_wptr += sb->sb_cc; - return(0); - - do_exec: - DEBUG_MISC((dfd, " executing %s \n",ex_ptr->ex_exec)); - return(fork_exec(so, ex_ptr->ex_exec, do_pty)); - -#if 0 - case CTL_CMD: - for (tmpso = tcb.so_next; tmpso != &tcb; tmpso = tmpso->so_next) { - if (tmpso->so_emu == EMU_CTL && - !(tmpso->so_tcpcb? - (tmpso->so_tcpcb->t_state & (TCPS_TIME_WAIT|TCPS_LAST_ACK)) - :0)) { - /* Ooops, control connection already active */ - sb->sb_cc = sprintf(sb->sb_wptr,"Sorry, already connected.\r\n"); - sb->sb_wptr += sb->sb_cc; - return 0; - } - } - so->so_emu = EMU_CTL; - ctl_password_ok = 0; - sb->sb_cc = sprintf(sb->sb_wptr, "Slirp command-line ready (type \"help\" for help).\r\nSlirp> "); - sb->sb_wptr += sb->sb_cc; - do_echo=-1; - return(2); -#endif - } -} diff --git a/SheepShaver/src/slirp/tcp_timer.c b/SheepShaver/src/slirp/tcp_timer.c deleted file mode 100755 index ab9aa580d..000000000 --- a/SheepShaver/src/slirp/tcp_timer.c +++ /dev/null @@ -1,322 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_timer.c 8.1 (Berkeley) 6/10/93 - * tcp_timer.c,v 1.2 1994/08/02 07:49:10 davidg Exp - */ - -#include - -int tcp_keepidle = TCPTV_KEEP_IDLE; -int tcp_keepintvl = TCPTV_KEEPINTVL; -int tcp_maxidle; -int so_options = DO_KEEPALIVE; - -struct tcpstat tcpstat; /* tcp statistics */ -u_int32_t tcp_now; /* for RFC 1323 timestamps */ - -/* - * Fast timeout routine for processing delayed acks - */ -void -tcp_fasttimo() -{ - register struct socket *so; - register struct tcpcb *tp; - - DEBUG_CALL("tcp_fasttimo"); - - so = tcb.so_next; - if (so) - for (; so != &tcb; so = so->so_next) - if ((tp = (struct tcpcb *)so->so_tcpcb) && - (tp->t_flags & TF_DELACK)) { - tp->t_flags &= ~TF_DELACK; - tp->t_flags |= TF_ACKNOW; - tcpstat.tcps_delack++; - (void) tcp_output(tp); - } -} - -/* - * Tcp protocol timeout routine called every 500 ms. - * Updates the timers in all active tcb's and - * causes finite state machine actions if timers expire. - */ -void -tcp_slowtimo() -{ - register struct socket *ip, *ipnxt; - register struct tcpcb *tp; - register int i; - - DEBUG_CALL("tcp_slowtimo"); - - tcp_maxidle = TCPTV_KEEPCNT * tcp_keepintvl; - /* - * Search through tcb's and update active timers. - */ - ip = tcb.so_next; - if (ip == 0) - return; - for (; ip != &tcb; ip = ipnxt) { - ipnxt = ip->so_next; - tp = sototcpcb(ip); - if (tp == 0) - continue; - for (i = 0; i < TCPT_NTIMERS; i++) { - if (tp->t_timer[i] && --tp->t_timer[i] == 0) { - tcp_timers(tp,i); - if (ipnxt->so_prev != ip) - goto tpgone; - } - } - tp->t_idle++; - if (tp->t_rtt) - tp->t_rtt++; -tpgone: - ; - } - tcp_iss += TCP_ISSINCR/PR_SLOWHZ; /* increment iss */ -#ifdef TCP_COMPAT_42 - if ((int)tcp_iss < 0) - tcp_iss = 0; /* XXX */ -#endif - tcp_now++; /* for timestamps */ -} - -/* - * Cancel all timers for TCP tp. - */ -void -tcp_canceltimers(tp) - struct tcpcb *tp; -{ - register int i; - - for (i = 0; i < TCPT_NTIMERS; i++) - tp->t_timer[i] = 0; -} - -int tcp_backoff[TCP_MAXRXTSHIFT + 1] = - { 1, 2, 4, 8, 16, 32, 64, 64, 64, 64, 64, 64, 64 }; - -/* - * TCP timer processing. - */ -struct tcpcb * -tcp_timers(tp, timer) - register struct tcpcb *tp; - int timer; -{ - register int rexmt; - - DEBUG_CALL("tcp_timers"); - - switch (timer) { - - /* - * 2 MSL timeout in shutdown went off. If we're closed but - * still waiting for peer to close and connection has been idle - * too long, or if 2MSL time is up from TIME_WAIT, delete connection - * control block. Otherwise, check again in a bit. - */ - case TCPT_2MSL: - if (tp->t_state != TCPS_TIME_WAIT && - tp->t_idle <= tcp_maxidle) - tp->t_timer[TCPT_2MSL] = tcp_keepintvl; - else - tp = tcp_close(tp); - break; - - /* - * Retransmission timer went off. Message has not - * been acked within retransmit interval. Back off - * to a longer retransmit interval and retransmit one segment. - */ - case TCPT_REXMT: - - /* - * XXXXX If a packet has timed out, then remove all the queued - * packets for that session. - */ - - if (++tp->t_rxtshift > TCP_MAXRXTSHIFT) { - /* - * This is a hack to suit our terminal server here at the uni of canberra - * since they have trouble with zeroes... It usually lets them through - * unharmed, but under some conditions, it'll eat the zeros. If we - * keep retransmitting it, it'll keep eating the zeroes, so we keep - * retransmitting, and eventually the connection dies... - * (this only happens on incoming data) - * - * So, if we were gonna drop the connection from too many retransmits, - * don't... instead halve the t_maxseg, which might break up the NULLs and - * let them through - * - * *sigh* - */ - - tp->t_maxseg >>= 1; - if (tp->t_maxseg < 32) { - /* - * We tried our best, now the connection must die! - */ - tp->t_rxtshift = TCP_MAXRXTSHIFT; - tcpstat.tcps_timeoutdrop++; - tp = tcp_drop(tp, tp->t_softerror); - /* tp->t_softerror : ETIMEDOUT); */ /* XXX */ - return (tp); /* XXX */ - } - - /* - * Set rxtshift to 6, which is still at the maximum - * backoff time - */ - tp->t_rxtshift = 6; - } - tcpstat.tcps_rexmttimeo++; - rexmt = TCP_REXMTVAL(tp) * tcp_backoff[tp->t_rxtshift]; - TCPT_RANGESET(tp->t_rxtcur, rexmt, - (short)tp->t_rttmin, TCPTV_REXMTMAX); /* XXX */ - tp->t_timer[TCPT_REXMT] = tp->t_rxtcur; - /* - * If losing, let the lower level know and try for - * a better route. Also, if we backed off this far, - * our srtt estimate is probably bogus. Clobber it - * so we'll take the next rtt measurement as our srtt; - * move the current srtt into rttvar to keep the current - * retransmit times until then. - */ - if (tp->t_rxtshift > TCP_MAXRXTSHIFT / 4) { -/* in_losing(tp->t_inpcb); */ - tp->t_rttvar += (tp->t_srtt >> TCP_RTT_SHIFT); - tp->t_srtt = 0; - } - tp->snd_nxt = tp->snd_una; - /* - * If timing a segment in this window, stop the timer. - */ - tp->t_rtt = 0; - /* - * Close the congestion window down to one segment - * (we'll open it by one segment for each ack we get). - * Since we probably have a window's worth of unacked - * data accumulated, this "slow start" keeps us from - * dumping all that data as back-to-back packets (which - * might overwhelm an intermediate gateway). - * - * There are two phases to the opening: Initially we - * open by one mss on each ack. This makes the window - * size increase exponentially with time. If the - * window is larger than the path can handle, this - * exponential growth results in dropped packet(s) - * almost immediately. To get more time between - * drops but still "push" the network to take advantage - * of improving conditions, we switch from exponential - * to linear window opening at some threshold size. - * For a threshold, we use half the current window - * size, truncated to a multiple of the mss. - * - * (the minimum cwnd that will give us exponential - * growth is 2 mss. We don't allow the threshold - * to go below this.) - */ - { - u_int win = min(tp->snd_wnd, tp->snd_cwnd) / 2 / tp->t_maxseg; - if (win < 2) - win = 2; - tp->snd_cwnd = tp->t_maxseg; - tp->snd_ssthresh = win * tp->t_maxseg; - tp->t_dupacks = 0; - } - (void) tcp_output(tp); - break; - - /* - * Persistence timer into zero window. - * Force a byte to be output, if possible. - */ - case TCPT_PERSIST: - tcpstat.tcps_persisttimeo++; - tcp_setpersist(tp); - tp->t_force = 1; - (void) tcp_output(tp); - tp->t_force = 0; - break; - - /* - * Keep-alive timer went off; send something - * or drop connection if idle for too long. - */ - case TCPT_KEEP: - tcpstat.tcps_keeptimeo++; - if (tp->t_state < TCPS_ESTABLISHED) - goto dropit; - -/* if (tp->t_socket->so_options & SO_KEEPALIVE && */ - if ((so_options) && tp->t_state <= TCPS_CLOSE_WAIT) { - if (tp->t_idle >= tcp_keepidle + tcp_maxidle) - goto dropit; - /* - * Send a packet designed to force a response - * if the peer is up and reachable: - * either an ACK if the connection is still alive, - * or an RST if the peer has closed the connection - * due to timeout or reboot. - * Using sequence number tp->snd_una-1 - * causes the transmitted zero-length segment - * to lie outside the receive window; - * by the protocol spec, this requires the - * correspondent TCP to respond. - */ - tcpstat.tcps_keepprobe++; -#ifdef TCP_COMPAT_42 - /* - * The keepalive packet must have nonzero length - * to get a 4.2 host to respond. - */ - tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, - tp->rcv_nxt - 1, tp->snd_una - 1, 0); -#else - tcp_respond(tp, &tp->t_template, (struct mbuf *)NULL, - tp->rcv_nxt, tp->snd_una - 1, 0); -#endif - tp->t_timer[TCPT_KEEP] = tcp_keepintvl; - } else - tp->t_timer[TCPT_KEEP] = tcp_keepidle; - break; - - dropit: - tcpstat.tcps_keepdrops++; - tp = tcp_drop(tp, 0); /* ETIMEDOUT); */ - break; - } - - return (tp); -} diff --git a/SheepShaver/src/slirp/tcp_timer.h b/SheepShaver/src/slirp/tcp_timer.h deleted file mode 100755 index 0bc438c76..000000000 --- a/SheepShaver/src/slirp/tcp_timer.h +++ /dev/null @@ -1,138 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_timer.h 8.1 (Berkeley) 6/10/93 - * tcp_timer.h,v 1.4 1994/08/21 05:27:38 paul Exp - */ - -#ifndef _TCP_TIMER_H_ -#define _TCP_TIMER_H_ - -/* - * Definitions of the TCP timers. These timers are counted - * down PR_SLOWHZ times a second. - */ -#define TCPT_NTIMERS 4 - -#define TCPT_REXMT 0 /* retransmit */ -#define TCPT_PERSIST 1 /* retransmit persistence */ -#define TCPT_KEEP 2 /* keep alive */ -#define TCPT_2MSL 3 /* 2*msl quiet time timer */ - -/* - * The TCPT_REXMT timer is used to force retransmissions. - * The TCP has the TCPT_REXMT timer set whenever segments - * have been sent for which ACKs are expected but not yet - * received. If an ACK is received which advances tp->snd_una, - * then the retransmit timer is cleared (if there are no more - * outstanding segments) or reset to the base value (if there - * are more ACKs expected). Whenever the retransmit timer goes off, - * we retransmit one unacknowledged segment, and do a backoff - * on the retransmit timer. - * - * The TCPT_PERSIST timer is used to keep window size information - * flowing even if the window goes shut. If all previous transmissions - * have been acknowledged (so that there are no retransmissions in progress), - * and the window is too small to bother sending anything, then we start - * the TCPT_PERSIST timer. When it expires, if the window is nonzero, - * we go to transmit state. Otherwise, at intervals send a single byte - * into the peer's window to force him to update our window information. - * We do this at most as often as TCPT_PERSMIN time intervals, - * but no more frequently than the current estimate of round-trip - * packet time. The TCPT_PERSIST timer is cleared whenever we receive - * a window update from the peer. - * - * The TCPT_KEEP timer is used to keep connections alive. If an - * connection is idle (no segments received) for TCPTV_KEEP_INIT amount of time, - * but not yet established, then we drop the connection. Once the connection - * is established, if the connection is idle for TCPTV_KEEP_IDLE time - * (and keepalives have been enabled on the socket), we begin to probe - * the connection. We force the peer to send us a segment by sending: - * - * This segment is (deliberately) outside the window, and should elicit - * an ack segment in response from the peer. If, despite the TCPT_KEEP - * initiated segments we cannot elicit a response from a peer in TCPT_MAXIDLE - * amount of time probing, then we drop the connection. - */ - -/* - * Time constants. - */ -#define TCPTV_MSL ( 5*PR_SLOWHZ) /* max seg lifetime (hah!) */ - -#define TCPTV_SRTTBASE 0 /* base roundtrip time; - if 0, no idea yet */ -#define TCPTV_SRTTDFLT ( 3*PR_SLOWHZ) /* assumed RTT if no info */ - -#define TCPTV_PERSMIN ( 5*PR_SLOWHZ) /* retransmit persistence */ -#define TCPTV_PERSMAX ( 60*PR_SLOWHZ) /* maximum persist interval */ - -#define TCPTV_KEEP_INIT ( 75*PR_SLOWHZ) /* initial connect keep alive */ -#define TCPTV_KEEP_IDLE (120*60*PR_SLOWHZ) /* dflt time before probing */ -#define TCPTV_KEEPINTVL ( 75*PR_SLOWHZ) /* default probe interval */ -#define TCPTV_KEEPCNT 8 /* max probes before drop */ - -#define TCPTV_MIN ( 1*PR_SLOWHZ) /* minimum allowable value */ -/* #define TCPTV_REXMTMAX ( 64*PR_SLOWHZ) */ /* max allowable REXMT value */ -#define TCPTV_REXMTMAX ( 12*PR_SLOWHZ) /* max allowable REXMT value */ - -#define TCP_LINGERTIME 120 /* linger at most 2 minutes */ - -#define TCP_MAXRXTSHIFT 12 /* maximum retransmits */ - - -#ifdef TCPTIMERS -char *tcptimers[] = - { "REXMT", "PERSIST", "KEEP", "2MSL" }; -#endif - -/* - * Force a time value to be in a certain range. - */ -#define TCPT_RANGESET(tv, value, tvmin, tvmax) { \ - (tv) = (value); \ - if ((tv) < (tvmin)) \ - (tv) = (tvmin); \ - else if ((tv) > (tvmax)) \ - (tv) = (tvmax); \ -} - -extern int tcp_keepidle; /* time before keepalive probes begin */ -extern int tcp_keepintvl; /* time between keepalive probes */ -extern int tcp_maxidle; /* time to drop after starting probes */ -extern int tcp_ttl; /* time to live for TCP segs */ -extern int tcp_backoff[]; - -struct tcpcb; - -void tcp_fasttimo _P((void)); -void tcp_slowtimo _P((void)); -void tcp_canceltimers _P((struct tcpcb *)); -struct tcpcb * tcp_timers _P((register struct tcpcb *, int)); - -#endif diff --git a/SheepShaver/src/slirp/tcp_var.h b/SheepShaver/src/slirp/tcp_var.h deleted file mode 100755 index 064ac69a1..000000000 --- a/SheepShaver/src/slirp/tcp_var.h +++ /dev/null @@ -1,227 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993, 1994 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcp_var.h 8.3 (Berkeley) 4/10/94 - * tcp_var.h,v 1.3 1994/08/21 05:27:39 paul Exp - */ - -#ifndef _TCP_VAR_H_ -#define _TCP_VAR_H_ - -#include "tcpip.h" -#include "tcp_timer.h" - -/* - * Tcp control block, one per tcp; fields: - */ -struct tcpcb { - struct tcpiphdr *seg_next; /* sequencing queue */ - struct tcpiphdr *seg_prev; - short t_state; /* state of this connection */ - short t_timer[TCPT_NTIMERS]; /* tcp timers */ - short t_rxtshift; /* log(2) of rexmt exp. backoff */ - short t_rxtcur; /* current retransmit value */ - short t_dupacks; /* consecutive dup acks recd */ - u_short t_maxseg; /* maximum segment size */ - char t_force; /* 1 if forcing out a byte */ - u_short t_flags; -#define TF_ACKNOW 0x0001 /* ack peer immediately */ -#define TF_DELACK 0x0002 /* ack, but try to delay it */ -#define TF_NODELAY 0x0004 /* don't delay packets to coalesce */ -#define TF_NOOPT 0x0008 /* don't use tcp options */ -#define TF_SENTFIN 0x0010 /* have sent FIN */ -#define TF_REQ_SCALE 0x0020 /* have/will request window scaling */ -#define TF_RCVD_SCALE 0x0040 /* other side has requested scaling */ -#define TF_REQ_TSTMP 0x0080 /* have/will request timestamps */ -#define TF_RCVD_TSTMP 0x0100 /* a timestamp was received in SYN */ -#define TF_SACK_PERMIT 0x0200 /* other side said I could SACK */ - - /* Make it static for now */ -/* struct tcpiphdr *t_template; / * skeletal packet for transmit */ - struct tcpiphdr t_template; - - struct socket *t_socket; /* back pointer to socket */ -/* - * The following fields are used as in the protocol specification. - * See RFC783, Dec. 1981, page 21. - */ -/* send sequence variables */ - tcp_seq snd_una; /* send unacknowledged */ - tcp_seq snd_nxt; /* send next */ - tcp_seq snd_up; /* send urgent pointer */ - tcp_seq snd_wl1; /* window update seg seq number */ - tcp_seq snd_wl2; /* window update seg ack number */ - tcp_seq iss; /* initial send sequence number */ - u_int32_t snd_wnd; /* send window */ -/* receive sequence variables */ - u_int32_t rcv_wnd; /* receive window */ - tcp_seq rcv_nxt; /* receive next */ - tcp_seq rcv_up; /* receive urgent pointer */ - tcp_seq irs; /* initial receive sequence number */ -/* - * Additional variables for this implementation. - */ -/* receive variables */ - tcp_seq rcv_adv; /* advertised window */ -/* retransmit variables */ - tcp_seq snd_max; /* highest sequence number sent; - * used to recognize retransmits - */ -/* congestion control (for slow start, source quench, retransmit after loss) */ - u_int32_t snd_cwnd; /* congestion-controlled window */ - u_int32_t snd_ssthresh; /* snd_cwnd size threshold for - * for slow start exponential to - * linear switch - */ -/* - * transmit timing stuff. See below for scale of srtt and rttvar. - * "Variance" is actually smoothed difference. - */ - short t_idle; /* inactivity time */ - short t_rtt; /* round trip time */ - tcp_seq t_rtseq; /* sequence number being timed */ - short t_srtt; /* smoothed round-trip time */ - short t_rttvar; /* variance in round-trip time */ - u_short t_rttmin; /* minimum rtt allowed */ - u_int32_t max_sndwnd; /* largest window peer has offered */ - -/* out-of-band data */ - char t_oobflags; /* have some */ - char t_iobc; /* input character */ -#define TCPOOB_HAVEDATA 0x01 -#define TCPOOB_HADDATA 0x02 - short t_softerror; /* possible error not yet reported */ - -/* RFC 1323 variables */ - u_char snd_scale; /* window scaling for send window */ - u_char rcv_scale; /* window scaling for recv window */ - u_char request_r_scale; /* pending window scaling */ - u_char requested_s_scale; - u_int32_t ts_recent; /* timestamp echo data */ - u_int32_t ts_recent_age; /* when last updated */ - tcp_seq last_ack_sent; - -}; - -#define sototcpcb(so) ((so)->so_tcpcb) - -/* - * The smoothed round-trip time and estimated variance - * are stored as fixed point numbers scaled by the values below. - * For convenience, these scales are also used in smoothing the average - * (smoothed = (1/scale)sample + ((scale-1)/scale)smoothed). - * With these scales, srtt has 3 bits to the right of the binary point, - * and thus an "ALPHA" of 0.875. rttvar has 2 bits to the right of the - * binary point, and is smoothed with an ALPHA of 0.75. - */ -#define TCP_RTT_SCALE 8 /* multiplier for srtt; 3 bits frac. */ -#define TCP_RTT_SHIFT 3 /* shift for srtt; 3 bits frac. */ -#define TCP_RTTVAR_SCALE 4 /* multiplier for rttvar; 2 bits */ -#define TCP_RTTVAR_SHIFT 2 /* multiplier for rttvar; 2 bits */ - -/* - * The initial retransmission should happen at rtt + 4 * rttvar. - * Because of the way we do the smoothing, srtt and rttvar - * will each average +1/2 tick of bias. When we compute - * the retransmit timer, we want 1/2 tick of rounding and - * 1 extra tick because of +-1/2 tick uncertainty in the - * firing of the timer. The bias will give us exactly the - * 1.5 tick we need. But, because the bias is - * statistical, we have to test that we don't drop below - * the minimum feasible timer (which is 2 ticks). - * This macro assumes that the value of TCP_RTTVAR_SCALE - * is the same as the multiplier for rttvar. - */ -#define TCP_REXMTVAL(tp) \ - (((tp)->t_srtt >> TCP_RTT_SHIFT) + (tp)->t_rttvar) - -/* - * TCP statistics. - * Many of these should be kept per connection, - * but that's inconvenient at the moment. - */ -struct tcpstat { - u_long tcps_connattempt; /* connections initiated */ - u_long tcps_accepts; /* connections accepted */ - u_long tcps_connects; /* connections established */ - u_long tcps_drops; /* connections dropped */ - u_long tcps_conndrops; /* embryonic connections dropped */ - u_long tcps_closed; /* conn. closed (includes drops) */ - u_long tcps_segstimed; /* segs where we tried to get rtt */ - u_long tcps_rttupdated; /* times we succeeded */ - u_long tcps_delack; /* delayed acks sent */ - u_long tcps_timeoutdrop; /* conn. dropped in rxmt timeout */ - u_long tcps_rexmttimeo; /* retransmit timeouts */ - u_long tcps_persisttimeo; /* persist timeouts */ - u_long tcps_keeptimeo; /* keepalive timeouts */ - u_long tcps_keepprobe; /* keepalive probes sent */ - u_long tcps_keepdrops; /* connections dropped in keepalive */ - - u_long tcps_sndtotal; /* total packets sent */ - u_long tcps_sndpack; /* data packets sent */ - u_long tcps_sndbyte; /* data bytes sent */ - u_long tcps_sndrexmitpack; /* data packets retransmitted */ - u_long tcps_sndrexmitbyte; /* data bytes retransmitted */ - u_long tcps_sndacks; /* ack-only packets sent */ - u_long tcps_sndprobe; /* window probes sent */ - u_long tcps_sndurg; /* packets sent with URG only */ - u_long tcps_sndwinup; /* window update-only packets sent */ - u_long tcps_sndctrl; /* control (SYN|FIN|RST) packets sent */ - - u_long tcps_rcvtotal; /* total packets received */ - u_long tcps_rcvpack; /* packets received in sequence */ - u_long tcps_rcvbyte; /* bytes received in sequence */ - u_long tcps_rcvbadsum; /* packets received with ccksum errs */ - u_long tcps_rcvbadoff; /* packets received with bad offset */ -/* u_long tcps_rcvshort; */ /* packets received too short */ - u_long tcps_rcvduppack; /* duplicate-only packets received */ - u_long tcps_rcvdupbyte; /* duplicate-only bytes received */ - u_long tcps_rcvpartduppack; /* packets with some duplicate data */ - u_long tcps_rcvpartdupbyte; /* dup. bytes in part-dup. packets */ - u_long tcps_rcvoopack; /* out-of-order packets received */ - u_long tcps_rcvoobyte; /* out-of-order bytes received */ - u_long tcps_rcvpackafterwin; /* packets with data after window */ - u_long tcps_rcvbyteafterwin; /* bytes rcvd after window */ - u_long tcps_rcvafterclose; /* packets rcvd after "close" */ - u_long tcps_rcvwinprobe; /* rcvd window probe packets */ - u_long tcps_rcvdupack; /* rcvd duplicate acks */ - u_long tcps_rcvacktoomuch; /* rcvd acks for unsent data */ - u_long tcps_rcvackpack; /* rcvd ack packets */ - u_long tcps_rcvackbyte; /* bytes acked by rcvd acks */ - u_long tcps_rcvwinupd; /* rcvd window update packets */ -/* u_long tcps_pawsdrop; */ /* segments dropped due to PAWS */ - u_long tcps_predack; /* times hdr predict ok for acks */ - u_long tcps_preddat; /* times hdr predict ok for data pkts */ - u_long tcps_socachemiss; /* tcp_last_so misses */ - u_long tcps_didnuttin; /* Times tcp_output didn't do anything XXX */ -}; - -extern struct tcpstat tcpstat; /* tcp statistics */ -extern u_int32_t tcp_now; /* for RFC 1323 timestamps */ - -#endif diff --git a/SheepShaver/src/slirp/tcpip.h b/SheepShaver/src/slirp/tcpip.h deleted file mode 100755 index 7974ce3d5..000000000 --- a/SheepShaver/src/slirp/tcpip.h +++ /dev/null @@ -1,77 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)tcpip.h 8.1 (Berkeley) 6/10/93 - * tcpip.h,v 1.3 1994/08/21 05:27:40 paul Exp - */ - -#ifndef _TCPIP_H_ -#define _TCPIP_H_ - -/* - * Tcp+ip header, after ip options removed. - */ -struct tcpiphdr { - struct ipovly ti_i; /* overlaid ip structure */ - struct tcphdr ti_t; /* tcp header */ -}; -#define ti_mbuf ti_i.ih_mbuf.mptr -#define ti_x1 ti_i.ih_x1 -#define ti_pr ti_i.ih_pr -#define ti_len ti_i.ih_len -#define ti_src ti_i.ih_src -#define ti_dst ti_i.ih_dst -#define ti_sport ti_t.th_sport -#define ti_dport ti_t.th_dport -#define ti_seq ti_t.th_seq -#define ti_ack ti_t.th_ack -#define ti_x2 ti_t.th_x2 -#define ti_off ti_t.th_off -#define ti_flags ti_t.th_flags -#define ti_win ti_t.th_win -#define ti_sum ti_t.th_sum -#define ti_urp ti_t.th_urp - -#define tcpiphdr2qlink(T) ((struct qlink*)(((char*)(T)) - sizeof(struct qlink))) -#define qlink2tcpiphdr(Q) ((struct tcpiphdr*)(((char*)(Q)) + sizeof(struct qlink))) -#define tcpiphdr_next(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->next) -#define tcpiphdr_prev(T) qlink2tcpiphdr(tcpiphdr2qlink(T)->prev) -#define tcpfrag_list_first(T) qlink2tcpiphdr((T)->seg_next) -#define tcpfrag_list_end(F, T) (tcpiphdr2qlink(F) == (struct qlink*)(T)) -#define tcpfrag_list_empty(T) ((T)->seg_next == (struct tcpiphdr*)(T)) - -/* - * Just a clean way to get to the first byte - * of the packet - */ -struct tcpiphdr_2 { - struct tcpiphdr dummy; - char first_char; -}; - -#endif diff --git a/SheepShaver/src/slirp/tftp.c b/SheepShaver/src/slirp/tftp.c deleted file mode 100755 index e656c4f06..000000000 --- a/SheepShaver/src/slirp/tftp.c +++ /dev/null @@ -1,334 +0,0 @@ -/* - * tftp.c - a simple, read-only tftp server for qemu - * - * Copyright (c) 2004 Magnus Damm - * - * 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 - * THE AUTHORS OR COPYRIGHT HOLDERS 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. - */ - -#include - -struct tftp_session { - int in_use; - char filename[TFTP_FILENAME_MAX]; - - struct in_addr client_ip; - u_int16_t client_port; - - int timestamp; -}; - -struct tftp_session tftp_sessions[TFTP_SESSIONS_MAX]; - -const char *tftp_prefix; - -static void tftp_session_update(struct tftp_session *spt) -{ - spt->timestamp = curtime; - spt->in_use = 1; -} - -static void tftp_session_terminate(struct tftp_session *spt) -{ - spt->in_use = 0; -} - -static int tftp_session_allocate(struct tftp_t *tp) -{ - struct tftp_session *spt; - int k; - - for (k = 0; k < TFTP_SESSIONS_MAX; k++) { - spt = &tftp_sessions[k]; - - if (!spt->in_use) - goto found; - - /* sessions time out after 5 inactive seconds */ - if ((int)(curtime - spt->timestamp) > 5000) - goto found; - } - - return -1; - - found: - memset(spt, 0, sizeof(*spt)); - memcpy(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip)); - spt->client_port = tp->udp.uh_sport; - - tftp_session_update(spt); - - return k; -} - -static int tftp_session_find(struct tftp_t *tp) -{ - struct tftp_session *spt; - int k; - - for (k = 0; k < TFTP_SESSIONS_MAX; k++) { - spt = &tftp_sessions[k]; - - if (spt->in_use) { - if (!memcmp(&spt->client_ip, &tp->ip.ip_src, sizeof(spt->client_ip))) { - if (spt->client_port == tp->udp.uh_sport) { - return k; - } - } - } - } - - return -1; -} - -static int tftp_read_data(struct tftp_session *spt, u_int16_t block_nr, - u_int8_t *buf, int len) -{ - int fd; - int bytes_read = 0; - - fd = open(spt->filename, O_RDONLY | O_BINARY); - - if (fd < 0) { - return -1; - } - - if (len) { - lseek(fd, block_nr * 512, SEEK_SET); - - bytes_read = read(fd, buf, len); - } - - close(fd); - - return bytes_read; -} - -static int tftp_send_error(struct tftp_session *spt, - u_int16_t errorcode, const char *msg, - struct tftp_t *recv_tp) -{ - struct sockaddr_in saddr, daddr; - struct mbuf *m; - struct tftp_t *tp; - int nobytes; - - m = m_get(); - - if (!m) { - return -1; - } - - memset(m->m_data, 0, m->m_size); - - m->m_data += if_maxlinkhdr; - tp = (void *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - - tp->tp_op = htons(TFTP_ERROR); - tp->x.tp_error.tp_error_code = htons(errorcode); - strncpy((char *)tp->x.tp_error.tp_msg, msg, sizeof(tp->x.tp_error.tp_msg)); - tp->x.tp_error.tp_msg[sizeof(tp->x.tp_error.tp_msg)-1] = 0; - - saddr.sin_addr = recv_tp->ip.ip_dst; - saddr.sin_port = recv_tp->udp.uh_dport; - - daddr.sin_addr = spt->client_ip; - daddr.sin_port = spt->client_port; - - nobytes = 2; - - m->m_len = sizeof(struct tftp_t) - 514 + 3 + strlen(msg) - - sizeof(struct ip) - sizeof(struct udphdr); - - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); - - tftp_session_terminate(spt); - - return 0; -} - -static int tftp_send_data(struct tftp_session *spt, - u_int16_t block_nr, - struct tftp_t *recv_tp) -{ - struct sockaddr_in saddr, daddr; - struct mbuf *m; - struct tftp_t *tp; - int nobytes; - - if (block_nr < 1) { - return -1; - } - - m = m_get(); - - if (!m) { - return -1; - } - - memset(m->m_data, 0, m->m_size); - - m->m_data += if_maxlinkhdr; - tp = (void *)m->m_data; - m->m_data += sizeof(struct udpiphdr); - - tp->tp_op = htons(TFTP_DATA); - tp->x.tp_data.tp_block_nr = htons(block_nr); - - saddr.sin_addr = recv_tp->ip.ip_dst; - saddr.sin_port = recv_tp->udp.uh_dport; - - daddr.sin_addr = spt->client_ip; - daddr.sin_port = spt->client_port; - - nobytes = tftp_read_data(spt, block_nr - 1, tp->x.tp_data.tp_buf, 512); - - if (nobytes < 0) { - m_free(m); - - /* send "file not found" error back */ - - tftp_send_error(spt, 1, "File not found", tp); - - return -1; - } - - m->m_len = sizeof(struct tftp_t) - (512 - nobytes) - - sizeof(struct ip) - sizeof(struct udphdr); - - udp_output2(NULL, m, &saddr, &daddr, IPTOS_LOWDELAY); - - if (nobytes == 512) { - tftp_session_update(spt); - } - else { - tftp_session_terminate(spt); - } - - return 0; -} - -static void tftp_handle_rrq(struct tftp_t *tp, int pktlen) -{ - struct tftp_session *spt; - int s, k, n; - u_int8_t *src, *dst; - - s = tftp_session_allocate(tp); - - if (s < 0) { - return; - } - - spt = &tftp_sessions[s]; - - src = tp->x.tp_buf; - dst = (u_int8_t *)spt->filename; - n = pktlen - ((uint8_t *)&tp->x.tp_buf[0] - (uint8_t *)tp); - - /* get name */ - - for (k = 0; k < n; k++) { - if (k < TFTP_FILENAME_MAX) { - dst[k] = src[k]; - } - else { - return; - } - - if (src[k] == '\0') { - break; - } - } - - if (k >= n) { - return; - } - - k++; - - /* check mode */ - if ((n - k) < 6) { - return; - } - - if (memcmp(&src[k], "octet\0", 6) != 0) { - tftp_send_error(spt, 4, "Unsupported transfer mode", tp); - return; - } - - /* do sanity checks on the filename */ - - if ((spt->filename[0] != '/') - || (spt->filename[strlen(spt->filename) - 1] == '/') - || strstr(spt->filename, "/../")) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - /* only allow exported prefixes */ - - if (!tftp_prefix - || (strncmp(spt->filename, tftp_prefix, strlen(tftp_prefix)) != 0)) { - tftp_send_error(spt, 2, "Access violation", tp); - return; - } - - /* check if the file exists */ - - if (tftp_read_data(spt, 0, (u_int8_t *)spt->filename, 0) < 0) { - tftp_send_error(spt, 1, "File not found", tp); - return; - } - - tftp_send_data(spt, 1, tp); -} - -static void tftp_handle_ack(struct tftp_t *tp, int pktlen) -{ - int s; - - s = tftp_session_find(tp); - - if (s < 0) { - return; - } - - if (tftp_send_data(&tftp_sessions[s], - ntohs(tp->x.tp_data.tp_block_nr) + 1, - tp) < 0) { - return; - } -} - -void tftp_input(struct mbuf *m) -{ - struct tftp_t *tp = (struct tftp_t *)m->m_data; - - switch(ntohs(tp->tp_op)) { - case TFTP_RRQ: - tftp_handle_rrq(tp, m->m_len); - break; - - case TFTP_ACK: - tftp_handle_ack(tp, m->m_len); - break; - } -} diff --git a/SheepShaver/src/slirp/tftp.h b/SheepShaver/src/slirp/tftp.h deleted file mode 100755 index f89e03932..000000000 --- a/SheepShaver/src/slirp/tftp.h +++ /dev/null @@ -1,40 +0,0 @@ -/* tftp defines */ - -#define TFTP_SESSIONS_MAX 3 - -#define TFTP_SERVER 69 - -#define TFTP_RRQ 1 -#define TFTP_WRQ 2 -#define TFTP_DATA 3 -#define TFTP_ACK 4 -#define TFTP_ERROR 5 - -#define TFTP_FILENAME_MAX 512 - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct tftp_t { - struct ip ip; - struct udphdr udp; - u_int16_t tp_op; - union { - struct { - u_int16_t tp_block_nr; - u_int8_t tp_buf[512]; - } tp_data; - struct { - u_int16_t tp_error_code; - u_int8_t tp_msg[512]; - } tp_error; - u_int8_t tp_buf[512 + 2]; - } x; -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -void tftp_input(struct mbuf *m); diff --git a/SheepShaver/src/slirp/udp.c b/SheepShaver/src/slirp/udp.c deleted file mode 100755 index 7917aaa47..000000000 --- a/SheepShaver/src/slirp/udp.c +++ /dev/null @@ -1,675 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1988, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)udp_usrreq.c 8.4 (Berkeley) 1/21/94 - * udp_usrreq.c,v 1.4 1994/10/02 17:48:45 phk Exp - */ - -/* - * Changes and additions relating to SLiRP - * Copyright (c) 1995 Danny Gasparovski. - * - * Please read the file COPYRIGHT for the - * terms and conditions of the copyright. - */ - -#include -#include -#include "ip_icmp.h" - -struct udpstat udpstat; - -struct socket udb; - -/* - * UDP protocol implementation. - * Per RFC 768, August, 1980. - */ -#ifndef COMPAT_42 -int udpcksum = 1; -#else -int udpcksum = 0; /* XXX */ -#endif - -struct socket *udp_last_so = &udb; - -void -udp_init() -{ - udb.so_next = udb.so_prev = &udb; -} -/* m->m_data points at ip packet header - * m->m_len length ip packet - * ip->ip_len length data (IPDU) - */ -void -udp_input(m, iphlen) - register struct mbuf *m; - int iphlen; -{ - register struct ip *ip; - register struct udphdr *uh; -/* struct mbuf *opts = 0;*/ - int len; - struct ip save_ip; - struct socket *so; - - DEBUG_CALL("udp_input"); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("iphlen = %d", iphlen); - - udpstat.udps_ipackets++; - - /* - * Strip IP options, if any; should skip this, - * make available to user, and use on returned packets, - * but we don't yet have a way to check the checksum - * with options still present. - */ - if(iphlen > sizeof(struct ip)) { - ip_stripoptions(m, (struct mbuf *)0); - iphlen = sizeof(struct ip); - } - - /* - * Get IP and UDP header together in first mbuf. - */ - ip = mtod(m, struct ip *); - uh = (struct udphdr *)((caddr_t)ip + iphlen); - - /* - * Make mbuf data length reflect UDP length. - * If not enough data to reflect UDP length, drop. - */ - len = ntohs((u_int16_t)uh->uh_ulen); - - if (ip->ip_len != len) { - if (len > ip->ip_len) { - udpstat.udps_badlen++; - goto bad; - } - m_adj(m, len - ip->ip_len); - ip->ip_len = len; - } - - /* - * Save a copy of the IP header in case we want restore it - * for sending an ICMP error message in response. - */ - save_ip = *ip; - save_ip.ip_len+= iphlen; /* tcp_input subtracts this */ - - /* - * Checksum extended UDP header and data. - */ - if (udpcksum && uh->uh_sum) { - memset(&((struct ipovly *)ip)->ih_mbuf, 0, sizeof(struct mbuf_ptr)); - ((struct ipovly *)ip)->ih_x1 = 0; - ((struct ipovly *)ip)->ih_len = uh->uh_ulen; - /* keep uh_sum for ICMP reply - * uh->uh_sum = cksum(m, len + sizeof (struct ip)); - * if (uh->uh_sum) { - */ - if(cksum(m, len + sizeof(struct ip))) { - udpstat.udps_badsum++; - goto bad; - } - } - - /* - * handle DHCP/BOOTP - */ - if (ntohs(uh->uh_dport) == BOOTP_SERVER) { - bootp_input(m); - goto bad; - } - - /* - * handle TFTP - */ - if (ntohs(uh->uh_dport) == TFTP_SERVER) { - tftp_input(m); - goto bad; - } - - /* - * Locate pcb for datagram. - */ - so = udp_last_so; - if (so->so_lport != uh->uh_sport || - so->so_laddr.s_addr != ip->ip_src.s_addr) { - struct socket *tmp; - - for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next) { - if (tmp->so_lport == uh->uh_sport && - tmp->so_laddr.s_addr == ip->ip_src.s_addr) { - tmp->so_faddr.s_addr = ip->ip_dst.s_addr; - tmp->so_fport = uh->uh_dport; - so = tmp; - break; - } - } - if (tmp == &udb) { - so = NULL; - } else { - udpstat.udpps_pcbcachemiss++; - udp_last_so = so; - } - } - - if (so == NULL) { - /* - * If there's no socket for this packet, - * create one - */ - if ((so = socreate()) == NULL) goto bad; - if(udp_attach(so) == -1) { - DEBUG_MISC((dfd," udp_attach errno = %d-%s\n", - errno,strerror(errno))); - sofree(so); - goto bad; - } - - /* - * Setup fields - */ - /* udp_last_so = so; */ - so->so_laddr = ip->ip_src; - so->so_lport = uh->uh_sport; - - if ((so->so_iptos = udp_tos(so)) == 0) - so->so_iptos = ip->ip_tos; - - /* - * XXXXX Here, check if it's in udpexec_list, - * and if it is, do the fork_exec() etc. - */ - } - - so->so_faddr = ip->ip_dst; /* XXX */ - so->so_fport = uh->uh_dport; /* XXX */ - - iphlen += sizeof(struct udphdr); - m->m_len -= iphlen; - m->m_data += iphlen; - - /* - * Now we sendto() the packet. - */ - if (so->so_emu) - udp_emu(so, m); - - if(sosendto(so,m) == -1) { - m->m_len += iphlen; - m->m_data -= iphlen; - *ip=save_ip; - DEBUG_MISC((dfd,"udp tx errno = %d-%s\n",errno,strerror(errno))); - icmp_error(m, ICMP_UNREACH,ICMP_UNREACH_NET, 0,strerror(errno)); - } - - m_free(so->so_m); /* used for ICMP if error on sorecvfrom */ - - /* restore the orig mbuf packet */ - m->m_len += iphlen; - m->m_data -= iphlen; - *ip=save_ip; - so->so_m=m; /* ICMP backup */ - - return; -bad: - m_freem(m); - /* if (opts) m_freem(opts); */ - return; -} - -int udp_output2(struct socket *so, struct mbuf *m, - struct sockaddr_in *saddr, struct sockaddr_in *daddr, - int iptos) -{ - register struct udpiphdr *ui; - int error = 0; - - DEBUG_CALL("udp_output"); - DEBUG_ARG("so = %lx", (long)so); - DEBUG_ARG("m = %lx", (long)m); - DEBUG_ARG("saddr = %lx", (long)saddr->sin_addr.s_addr); - DEBUG_ARG("daddr = %lx", (long)daddr->sin_addr.s_addr); - - /* - * Adjust for header - */ - m->m_data -= sizeof(struct udpiphdr); - m->m_len += sizeof(struct udpiphdr); - - /* - * Fill in mbuf with extended UDP header - * and addresses and length put into network format. - */ - ui = mtod(m, struct udpiphdr *); - memset(&ui->ui_i.ih_mbuf, 0 , sizeof(struct mbuf_ptr)); - ui->ui_x1 = 0; - ui->ui_pr = IPPROTO_UDP; - ui->ui_len = htons(m->m_len - sizeof(struct ip)); /* + sizeof (struct udphdr)); */ - /* XXXXX Check for from-one-location sockets, or from-any-location sockets */ - ui->ui_src = saddr->sin_addr; - ui->ui_dst = daddr->sin_addr; - ui->ui_sport = saddr->sin_port; - ui->ui_dport = daddr->sin_port; - ui->ui_ulen = ui->ui_len; - - /* - * Stuff checksum and output datagram. - */ - ui->ui_sum = 0; - if (udpcksum) { - if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ m->m_len)) == 0) - ui->ui_sum = 0xffff; - } - ((struct ip *)ui)->ip_len = m->m_len; - - ((struct ip *)ui)->ip_ttl = ip_defttl; - ((struct ip *)ui)->ip_tos = iptos; - - udpstat.udps_opackets++; - - error = ip_output(so, m); - - return (error); -} - -int udp_output(struct socket *so, struct mbuf *m, - struct sockaddr_in *addr) - -{ - struct sockaddr_in saddr, daddr; - - saddr = *addr; - if ((so->so_faddr.s_addr & htonl(0xffffff00)) == special_addr.s_addr) { - saddr.sin_addr.s_addr = so->so_faddr.s_addr; - if ((so->so_faddr.s_addr & htonl(0x000000ff)) == htonl(0xff)) - saddr.sin_addr.s_addr = alias_addr.s_addr; - } - daddr.sin_addr = so->so_laddr; - daddr.sin_port = so->so_lport; - - return udp_output2(so, m, &saddr, &daddr, so->so_iptos); -} - -int -udp_attach(so) - struct socket *so; -{ - struct sockaddr_in addr; - - if((so->s = socket(AF_INET,SOCK_DGRAM,0)) != -1) { - /* - * Here, we bind() the socket. Although not really needed - * (sendto() on an unbound socket will bind it), it's done - * here so that emulation of ytalk etc. don't have to do it - */ - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_port = 0; - addr.sin_addr.s_addr = INADDR_ANY; - if(bind(so->s, (struct sockaddr *)&addr, sizeof(addr))<0) { - int lasterrno=errno; - closesocket(so->s); - so->s=-1; -#ifdef _WIN32 - WSASetLastError(lasterrno); -#else - errno=lasterrno; -#endif - } else { - /* success, insert in queue */ - so->so_expire = curtime + SO_EXPIRE; - insque(so,&udb); - } - } - return(so->s); -} - -void -udp_detach(so) - struct socket *so; -{ - closesocket(so->s); - /* if (so->so_m) m_free(so->so_m); done by sofree */ - - sofree(so); -} - -struct tos_t udptos[] = { - {0, 53, IPTOS_LOWDELAY, 0}, /* DNS */ - {517, 517, IPTOS_LOWDELAY, EMU_TALK}, /* talk */ - {518, 518, IPTOS_LOWDELAY, EMU_NTALK}, /* ntalk */ - {0, 7648, IPTOS_LOWDELAY, EMU_CUSEEME}, /* Cu-Seeme */ - {0, 0, 0, 0} -}; - -u_int8_t -udp_tos(so) - struct socket *so; -{ - int i = 0; - - while(udptos[i].tos) { - if ((udptos[i].fport && ntohs(so->so_fport) == udptos[i].fport) || - (udptos[i].lport && ntohs(so->so_lport) == udptos[i].lport)) { - so->so_emu = udptos[i].emu; - return udptos[i].tos; - } - i++; - } - - return 0; -} - -#ifdef EMULATE_TALK -#include "talkd.h" -#endif - -/* - * Here, talk/ytalk/ntalk requests must be emulated - */ -void -udp_emu(so, m) - struct socket *so; - struct mbuf *m; -{ - struct sockaddr_in addr; - socklen_t addrlen = sizeof(addr); -#ifdef EMULATE_TALK - CTL_MSG_OLD *omsg; - CTL_MSG *nmsg; - char buff[sizeof(CTL_MSG)]; - u_char type; - -struct talk_request { - struct talk_request *next; - struct socket *udp_so; - struct socket *tcp_so; -} *req; - - static struct talk_request *req_tbl = 0; - -#endif - -struct cu_header { - uint16_t d_family; // destination family - uint16_t d_port; // destination port - uint32_t d_addr; // destination address - uint16_t s_family; // source family - uint16_t s_port; // source port - uint32_t so_addr; // source address - uint32_t seqn; // sequence number - uint16_t message; // message - uint16_t data_type; // data type - uint16_t pkt_len; // packet length -} *cu_head; - - switch(so->so_emu) { - -#ifdef EMULATE_TALK - case EMU_TALK: - case EMU_NTALK: - /* - * Talk emulation. We always change the ctl_addr to get - * some answers from the daemon. When an ANNOUNCE comes, - * we send LEAVE_INVITE to the local daemons. Also when a - * DELETE comes, we send copies to the local daemons. - */ - if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) - return; - -#define IS_OLD (so->so_emu == EMU_TALK) - -#define COPY_MSG(dest, src) { dest->type = src->type; \ - dest->id_num = src->id_num; \ - dest->pid = src->pid; \ - dest->addr = src->addr; \ - dest->ctl_addr = src->ctl_addr; \ - memcpy(&dest->l_name, &src->l_name, NAME_SIZE_OLD); \ - memcpy(&dest->r_name, &src->r_name, NAME_SIZE_OLD); \ - memcpy(&dest->r_tty, &src->r_tty, TTY_SIZE); } - -#define OTOSIN(ptr, field) ((struct sockaddr_in *)&ptr->field) -/* old_sockaddr to sockaddr_in */ - - - if (IS_OLD) { /* old talk */ - omsg = mtod(m, CTL_MSG_OLD*); - nmsg = (CTL_MSG *) buff; - type = omsg->type; - OTOSIN(omsg, ctl_addr)->sin_port = addr.sin_port; - OTOSIN(omsg, ctl_addr)->sin_addr = our_addr; - strncpy(omsg->l_name, getlogin(), NAME_SIZE_OLD); - } else { /* new talk */ - omsg = (CTL_MSG_OLD *) buff; - nmsg = mtod(m, CTL_MSG *); - type = nmsg->type; - OTOSIN(nmsg, ctl_addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, ctl_addr)->sin_addr = our_addr; - strncpy(nmsg->l_name, getlogin(), NAME_SIZE_OLD); - } - - if (type == LOOK_UP) - return; /* for LOOK_UP this is enough */ - - if (IS_OLD) { /* make a copy of the message */ - COPY_MSG(nmsg, omsg); - nmsg->vers = 1; - nmsg->answer = 0; - } else - COPY_MSG(omsg, nmsg); - - /* - * If if is an ANNOUNCE message, we go through the - * request table to see if a tcp port has already - * been redirected for this socket. If not, we solisten() - * a new socket and add this entry to the table. - * The port number of the tcp socket and our IP - * are put to the addr field of the message structures. - * Then a LEAVE_INVITE is sent to both local daemon - * ports, 517 and 518. This is why we have two copies - * of the message, one in old talk and one in new talk - * format. - */ - - if (type == ANNOUNCE) { - int s; - u_short temp_port; - - for(req = req_tbl; req; req = req->next) - if (so == req->udp_so) - break; /* found it */ - - if (!req) { /* no entry for so, create new */ - req = (struct talk_request *) - malloc(sizeof(struct talk_request)); - req->udp_so = so; - req->tcp_so = solisten(0, - OTOSIN(omsg, addr)->sin_addr.s_addr, - OTOSIN(omsg, addr)->sin_port, - SS_FACCEPTONCE); - req->next = req_tbl; - req_tbl = req; - } - - /* replace port number in addr field */ - addrlen = sizeof(addr); - getsockname(req->tcp_so->s, - (struct sockaddr *) &addr, - &addrlen); - OTOSIN(omsg, addr)->sin_port = addr.sin_port; - OTOSIN(omsg, addr)->sin_addr = our_addr; - OTOSIN(nmsg, addr)->sin_port = addr.sin_port; - OTOSIN(nmsg, addr)->sin_addr = our_addr; - - /* send LEAVE_INVITEs */ - temp_port = OTOSIN(omsg, ctl_addr)->sin_port; - OTOSIN(omsg, ctl_addr)->sin_port = 0; - OTOSIN(nmsg, ctl_addr)->sin_port = 0; - omsg->type = nmsg->type = LEAVE_INVITE; - - s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); - addr.sin_addr = our_addr; - addr.sin_family = AF_INET; - addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - addr.sin_port = htons(518); - sendto(s, (char *)nmsg, sizeof(*nmsg), 0, - (struct sockaddr *) &addr, sizeof(addr)); - closesocket(s) ; - - omsg->type = nmsg->type = ANNOUNCE; - OTOSIN(omsg, ctl_addr)->sin_port = temp_port; - OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; - } - - /* - * If it is a DELETE message, we send a copy to the - * local daemons. Then we delete the entry corresponding - * to our socket from the request table. - */ - - if (type == DELETE) { - struct talk_request *temp_req, *req_next; - int s; - u_short temp_port; - - temp_port = OTOSIN(omsg, ctl_addr)->sin_port; - OTOSIN(omsg, ctl_addr)->sin_port = 0; - OTOSIN(nmsg, ctl_addr)->sin_port = 0; - - s = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); - addr.sin_addr = our_addr; - addr.sin_family = AF_INET; - addr.sin_port = htons(517); - sendto(s, (char *)omsg, sizeof(*omsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - addr.sin_port = htons(518); - sendto(s, (char *)nmsg, sizeof(*nmsg), 0, - (struct sockaddr *)&addr, sizeof(addr)); - closesocket(s); - - OTOSIN(omsg, ctl_addr)->sin_port = temp_port; - OTOSIN(nmsg, ctl_addr)->sin_port = temp_port; - - /* delete table entry */ - if (so == req_tbl->udp_so) { - temp_req = req_tbl; - req_tbl = req_tbl->next; - free(temp_req); - } else { - temp_req = req_tbl; - for(req = req_tbl->next; req; req = req_next) { - req_next = req->next; - if (so == req->udp_so) { - temp_req->next = req_next; - free(req); - break; - } else { - temp_req = req; - } - } - } - } - - return; -#endif - - case EMU_CUSEEME: - - /* - * Cu-SeeMe emulation. - * Hopefully the packet is more that 16 bytes long. We don't - * do any other tests, just replace the address and port - * fields. - */ - if (m->m_len >= sizeof (*cu_head)) { - if (getsockname(so->s, (struct sockaddr *)&addr, &addrlen) < 0) - return; - cu_head = mtod(m, struct cu_header *); - cu_head->s_port = addr.sin_port; - cu_head->so_addr = our_addr.s_addr; - } - - return; - } -} - -struct socket * -udp_listen(port, laddr, lport, flags) - u_int port; - u_int32_t laddr; - u_int lport; - int flags; -{ - struct sockaddr_in addr; - struct socket *so; - socklen_t addrlen = sizeof(struct sockaddr_in); - int opt = 1; - - if ((so = socreate()) == NULL) { - free(so); - return NULL; - } - so->s = socket(AF_INET,SOCK_DGRAM,0); - so->so_expire = curtime + SO_EXPIRE; - insque(so,&udb); - - memset(&addr, 0, sizeof(struct sockaddr_in)); - addr.sin_family = AF_INET; - addr.sin_addr.s_addr = INADDR_ANY; - addr.sin_port = port; - - if (bind(so->s,(struct sockaddr *)&addr, addrlen) < 0) { - udp_detach(so); - return NULL; - } - setsockopt(so->s,SOL_SOCKET,SO_REUSEADDR,(char *)&opt,sizeof(int)); -/* setsockopt(so->s,SOL_SOCKET,SO_OOBINLINE,(char *)&opt,sizeof(int)); */ - - getsockname(so->s,(struct sockaddr *)&addr,&addrlen); - so->so_fport = addr.sin_port; - if (addr.sin_addr.s_addr == 0 || addr.sin_addr.s_addr == loopback_addr.s_addr) - so->so_faddr = alias_addr; - else - so->so_faddr = addr.sin_addr; - - so->so_lport = lport; - so->so_laddr.s_addr = laddr; - if (flags != SS_FACCEPTONCE) - so->so_expire = 0; - - so->so_state = SS_ISFCONNECTED; - - return so; -} diff --git a/SheepShaver/src/slirp/udp.h b/SheepShaver/src/slirp/udp.h deleted file mode 100755 index 639a2f2c7..000000000 --- a/SheepShaver/src/slirp/udp.h +++ /dev/null @@ -1,113 +0,0 @@ -/* - * Copyright (c) 1982, 1986, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)udp.h 8.1 (Berkeley) 6/10/93 - * udp.h,v 1.3 1994/08/21 05:27:41 paul Exp - */ - -#ifndef _UDP_H_ -#define _UDP_H_ - -#define UDP_TTL 0x60 -#define UDP_UDPDATALEN 16192 - -extern struct socket *udp_last_so; - -/* - * Udp protocol header. - * Per RFC 768, September, 1981. - */ -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(1) -#endif - -struct udphdr { - u_int16_t uh_sport; /* source port */ - u_int16_t uh_dport; /* destination port */ - int16_t uh_ulen; /* udp length */ - u_int16_t uh_sum; /* udp checksum */ -} PACKED__; - -#ifdef PRAGMA_PACK_SUPPORTED -#pragma pack(0) -#endif - -/* - * UDP kernel structures and variables. - */ -struct udpiphdr { - struct ipovly ui_i; /* overlaid ip structure */ - struct udphdr ui_u; /* udp header */ -}; -#define ui_mbuf ui_i.ih_mbuf.mptr -#define ui_x1 ui_i.ih_x1 -#define ui_pr ui_i.ih_pr -#define ui_len ui_i.ih_len -#define ui_src ui_i.ih_src -#define ui_dst ui_i.ih_dst -#define ui_sport ui_u.uh_sport -#define ui_dport ui_u.uh_dport -#define ui_ulen ui_u.uh_ulen -#define ui_sum ui_u.uh_sum - -struct udpstat { - /* input statistics: */ - u_long udps_ipackets; /* total input packets */ - u_long udps_hdrops; /* packet shorter than header */ - u_long udps_badsum; /* checksum error */ - u_long udps_badlen; /* data length larger than packet */ - u_long udps_noport; /* no socket on port */ - u_long udps_noportbcast; /* of above, arrived as broadcast */ - u_long udps_fullsock; /* not delivered, input socket full */ - u_long udpps_pcbcachemiss; /* input packets missing pcb cache */ - /* output statistics: */ - u_long udps_opackets; /* total output packets */ -}; - -/* - * Names for UDP sysctl objects - */ -#define UDPCTL_CHECKSUM 1 /* checksum UDP packets */ -#define UDPCTL_MAXID 2 - -extern struct udpstat udpstat; -extern struct socket udb; -struct mbuf; - -void udp_init _P((void)); -void udp_input _P((register struct mbuf *, int)); -int udp_output _P((struct socket *, struct mbuf *, struct sockaddr_in *)); -int udp_attach _P((struct socket *)); -void udp_detach _P((struct socket *)); -u_int8_t udp_tos _P((struct socket *)); -void udp_emu _P((struct socket *, struct mbuf *)); -struct socket * udp_listen _P((u_int, u_int32_t, u_int, int)); -int udp_output2(struct socket *so, struct mbuf *m, - struct sockaddr_in *saddr, struct sockaddr_in *daddr, - int iptos); -#endif From a98054215ef4aa9b42ae70cfdf2167f0e4731714 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 14 Jun 2018 18:26:27 +0900 Subject: [PATCH 218/534] SDL related fix update project files add a pref --- BasiliskII/src/CrossPlatform/video_blit.cpp | 2 +- .../BasiliskII.xcodeproj/project.pbxproj | 384 +++++++----------- BasiliskII/src/MacOSX/config.h | 1 - .../src/MacOSX/run_build68k_for_xcode.sh | 6 +- BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh | 6 +- BasiliskII/src/SDL/video_sdl2.cpp | 22 +- .../project.pbxproj | 288 ++++++------- SheepShaver/src/Unix/main_unix.cpp | 5 +- SheepShaver/src/prefs_items.cpp | 1 + SheepShaver/src/slirp | 1 + 10 files changed, 320 insertions(+), 396 deletions(-) create mode 120000 SheepShaver/src/slirp diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index fc8bb451b..5f1a0ae3a 100755 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -529,7 +529,7 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; -#if __MACOSX__ +#if __MACOSX__ && !defined(SHEEPSHAVER) // dludwig@pobox.com, HACK: This works on OSX (64-bit, at least), but not Linux (32-bit?). Why? // To note, __MACOSX__ is an SDL-declared macro (for platform identification at compile time). } else if (mac_depth == 16) { diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index aec369157..aff6bfe7e 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,31 +7,10 @@ objects = { /* Begin PBXBuildFile section */ - 4ECAC2671F8A8A5D0013B963 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */; }; - 4ECAC2681F8A8AE90013B963 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2601F8A8A020013B963 /* bootp.c */; }; - 4ECAC2691F8A8AF10013B963 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2541F8A8A000013B963 /* cksum.c */; }; - 4ECAC26A1F8A8AF80013B963 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC23F1F8A89FE0013B963 /* debug.c */; }; - 4ECAC26B1F8A8B010013B963 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2501F8A8A000013B963 /* if.c */; }; - 4ECAC26C1F8A8B120013B963 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */; }; - 4ECAC26D1F8A8B120013B963 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2481F8A89FF0013B963 /* ip_input.c */; }; - 4ECAC26E1F8A8B120013B963 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2471F8A89FF0013B963 /* ip_output.c */; }; - 4ECAC26F1F8A8B230013B963 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24F1F8A89FF0013B963 /* mbuf.c */; }; - 4ECAC2701F8A8B230013B963 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2401F8A89FE0013B963 /* misc.c */; }; - 4ECAC2711F8A8B350013B963 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24A1F8A89FF0013B963 /* sbuf.c */; }; - 4ECAC2721F8A8B390013B963 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC23D1F8A89FE0013B963 /* slirp.c */; }; - 4ECAC2731F8A8B390013B963 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2431F8A89FE0013B963 /* socket.c */; }; - 4ECAC2741F8A8B480013B963 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC25E1F8A8A020013B963 /* tcp_input.c */; }; - 4ECAC2751F8A8B480013B963 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */; }; - 4ECAC2761F8A8B480013B963 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2571F8A8A000013B963 /* tcp_subr.c */; }; - 4ECAC2771F8A8B480013B963 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */; }; - 4ECAC2781F8A8B4B0013B963 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC2521F8A8A000013B963 /* tftp.c */; }; - 4ECAC2791F8A8B530013B963 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = 4ECAC24E1F8A89FF0013B963 /* udp.c */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; - 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; }; - 752F27151F251B5C001032B4 /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = 752F270D1F251B4A001032B4 /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; 753252E91F535A0C0024025B /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252E51F5359040024025B /* build68k.c */; }; 753252EE1F535DD10024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; 753253021F535F210024025B /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = 753253011F535F210024025B /* gencpu.c */; }; @@ -42,7 +21,6 @@ 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; - 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */; }; @@ -89,7 +67,6 @@ 7539E2471F23B32A006B2DF2 /* mkstandalone in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FA1F23B32A006B2DF2 /* mkstandalone */; }; 7539E2491F23B32A006B2DF2 /* testlmem.sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */; }; 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; - 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */; }; 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2011F23B32A006B2DF2 /* fbdevices */; }; 7539E2501F23B32A006B2DF2 /* install-sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2051F23B32A006B2DF2 /* install-sh */; }; 7539E2541F23B32A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20A1F23B32A006B2DF2 /* keycodes */; }; @@ -125,44 +102,32 @@ 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; + E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; + E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; + E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8FB20D260B900E437D8 /* ip_icmp.c */; }; + E413D92420D260BC00E437D8 /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E413D8FE20D260B900E437D8 /* VERSION */; }; + E413D92520D260BC00E437D8 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90120D260B900E437D8 /* tcp_input.c */; }; + E413D92620D260BC00E437D8 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90220D260B900E437D8 /* misc.c */; }; + E413D92720D260BC00E437D8 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90520D260BA00E437D8 /* debug.c */; }; + E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90620D260BA00E437D8 /* tcp_subr.c */; }; + E413D92920D260BC00E437D8 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90720D260BA00E437D8 /* udp.c */; }; + E413D92A20D260BC00E437D8 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90920D260BA00E437D8 /* sbuf.c */; }; + E413D92B20D260BC00E437D8 /* COPYRIGHT in Resources */ = {isa = PBXBuildFile; fileRef = E413D90C20D260BA00E437D8 /* COPYRIGHT */; }; + E413D92C20D260BC00E437D8 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90D20D260BA00E437D8 /* slirp.c */; }; + E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91120D260BA00E437D8 /* tcp_timer.c */; }; + E413D92E20D260BC00E437D8 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91820D260BB00E437D8 /* socket.c */; }; + E413D92F20D260BC00E437D8 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91B20D260BC00E437D8 /* bootp.c */; }; + E413D93020D260BC00E437D8 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91C20D260BC00E437D8 /* ip_input.c */; }; + E413D93120D260BC00E437D8 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91D20D260BC00E437D8 /* ip_output.c */; }; + E413D93220D260BC00E437D8 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91E20D260BC00E437D8 /* if.c */; }; + E413D93320D260BC00E437D8 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91F20D260BC00E437D8 /* cksum.c */; }; + E413D93420D260BC00E437D8 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D92020D260BC00E437D8 /* tcp_output.c */; }; + E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E413D93520D260DA00E437D8 /* SDL2.framework */; }; + E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; + E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ - 752F270C1F251B4A001032B4 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - proxyType = 2; - remoteGlobalIDString = BECDF66C0761BA81005FE872; - remoteInfo = Framework; - }; - 752F270E1F251B4A001032B4 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - proxyType = 2; - remoteGlobalIDString = BECDF6B30761BA81005FE872; - remoteInfo = "Static Library"; - }; - 752F27101F251B4A001032B4 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - proxyType = 2; - remoteGlobalIDString = DB31407717554B71006C0E22; - remoteInfo = "Shared Library"; - }; - 752F27121F251B4A001032B4 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - proxyType = 2; - remoteGlobalIDString = BECDF6BE0761BA81005FE872; - remoteInfo = "Standard DMG"; - }; - 752F27161F251B5C001032B4 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - proxyType = 1; - remoteGlobalIDString = BECDF5FE0761BA81005FE872; - remoteInfo = Framework; - }; 7532530B1F53611F0024025B /* PBXContainerItemProxy */ = { isa = PBXContainerItemProxy; containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; @@ -200,7 +165,6 @@ dstPath = ""; dstSubfolderSpec = 10; files = ( - 752F27151F251B5C001032B4 /* SDL2.framework in Embed Frameworks */, ); name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -226,53 +190,10 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ - 4ECAC23D1F8A89FE0013B963 /* slirp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../slirp/slirp.c; sourceTree = ""; }; - 4ECAC23E1F8A89FE0013B963 /* tcp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp.h; path = ../../slirp/tcp.h; sourceTree = ""; }; - 4ECAC23F1F8A89FE0013B963 /* debug.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../slirp/debug.c; sourceTree = ""; }; - 4ECAC2401F8A89FE0013B963 /* misc.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../slirp/misc.c; sourceTree = ""; }; - 4ECAC2411F8A89FE0013B963 /* if.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = if.h; path = ../../slirp/if.h; sourceTree = ""; }; - 4ECAC2421F8A89FE0013B963 /* sbuf.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = sbuf.h; path = ../../slirp/sbuf.h; sourceTree = ""; }; - 4ECAC2431F8A89FE0013B963 /* socket.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../slirp/socket.c; sourceTree = ""; }; - 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../slirp/ip_icmp.c; sourceTree = ""; }; - 4ECAC2451F8A89FE0013B963 /* socket.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = socket.h; path = ../../slirp/socket.h; sourceTree = ""; }; - 4ECAC2461F8A89FE0013B963 /* udp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = udp.h; path = ../../slirp/udp.h; sourceTree = ""; }; - 4ECAC2471F8A89FF0013B963 /* ip_output.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../slirp/ip_output.c; sourceTree = ""; }; - 4ECAC2481F8A89FF0013B963 /* ip_input.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../slirp/ip_input.c; sourceTree = ""; }; - 4ECAC2491F8A89FF0013B963 /* icmp_var.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = icmp_var.h; path = ../../slirp/icmp_var.h; sourceTree = ""; }; - 4ECAC24A1F8A89FF0013B963 /* sbuf.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../slirp/sbuf.c; sourceTree = ""; }; - 4ECAC24B1F8A89FF0013B963 /* slirp_config.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../slirp/slirp_config.h; sourceTree = ""; }; - 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../slirp/tcp_output.c; sourceTree = ""; }; - 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../slirp/tcp_timer.c; sourceTree = ""; }; - 4ECAC24E1F8A89FF0013B963 /* udp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../slirp/udp.c; sourceTree = ""; }; - 4ECAC24F1F8A89FF0013B963 /* mbuf.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../slirp/mbuf.c; sourceTree = ""; }; - 4ECAC2501F8A8A000013B963 /* if.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../slirp/if.c; sourceTree = ""; }; - 4ECAC2511F8A8A000013B963 /* ip_icmp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../slirp/ip_icmp.h; sourceTree = ""; }; - 4ECAC2521F8A8A000013B963 /* tftp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../slirp/tftp.c; sourceTree = ""; }; - 4ECAC2531F8A8A000013B963 /* debug.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = debug.h; path = ../../slirp/debug.h; sourceTree = ""; }; - 4ECAC2541F8A8A000013B963 /* cksum.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../slirp/cksum.c; sourceTree = ""; }; - 4ECAC2551F8A8A000013B963 /* tcp_var.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp_var.h; path = ../../slirp/tcp_var.h; sourceTree = ""; }; - 4ECAC2561F8A8A000013B963 /* slirp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = slirp.h; path = ../../slirp/slirp.h; sourceTree = ""; }; - 4ECAC2571F8A8A000013B963 /* tcp_subr.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../slirp/tcp_subr.c; sourceTree = ""; }; - 4ECAC2581F8A8A010013B963 /* ip.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ip.h; path = ../../slirp/ip.h; sourceTree = ""; }; - 4ECAC2591F8A8A010013B963 /* bootp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../slirp/bootp.h; sourceTree = ""; }; - 4ECAC25A1F8A8A010013B963 /* ctl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = ctl.h; path = ../../slirp/ctl.h; sourceTree = ""; }; - 4ECAC25B1F8A8A010013B963 /* libslirp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = libslirp.h; path = ../../slirp/libslirp.h; sourceTree = ""; }; - 4ECAC25C1F8A8A010013B963 /* VERSION */ = {isa = PBXFileReference; lastKnownFileType = text; name = VERSION; path = ../../slirp/VERSION; sourceTree = ""; }; - 4ECAC25D1F8A8A010013B963 /* tcpip.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../slirp/tcpip.h; sourceTree = ""; }; - 4ECAC25E1F8A8A020013B963 /* tcp_input.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../slirp/tcp_input.c; sourceTree = ""; }; - 4ECAC25F1F8A8A020013B963 /* misc.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = misc.h; path = ../../slirp/misc.h; sourceTree = ""; }; - 4ECAC2601F8A8A020013B963 /* bootp.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../slirp/bootp.c; sourceTree = ""; }; - 4ECAC2611F8A8A020013B963 /* mbuf.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = mbuf.h; path = ../../slirp/mbuf.h; sourceTree = ""; }; - 4ECAC2621F8A8A020013B963 /* COPYRIGHT */ = {isa = PBXFileReference; lastKnownFileType = text; name = COPYRIGHT; path = ../../slirp/COPYRIGHT; sourceTree = ""; }; - 4ECAC2631F8A8A020013B963 /* main.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = main.h; path = ../../slirp/main.h; sourceTree = ""; }; - 4ECAC2641F8A8A020013B963 /* tcp_timer.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tcp_timer.h; path = ../../slirp/tcp_timer.h; sourceTree = ""; }; - 4ECAC2651F8A8A030013B963 /* tftp.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../slirp/tftp.h; sourceTree = ""; }; - 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether_unix.cpp; path = ../../Unix/ether_unix.cpp; sourceTree = ""; }; 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; - 752F27051F251B4A001032B4 /* SDL.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; name = SDL.xcodeproj; path = ../../../external/SDL/Xcode/SDL/SDL.xcodeproj; sourceTree = ""; }; 753252DA1F5358D30024025B /* build68k */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = build68k; sourceTree = BUILT_PRODUCTS_DIR; }; 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; 753252ED1F535DD10024025B /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = build68k_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; @@ -284,7 +205,6 @@ 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; - 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; 7539DFCA1F23B25A006B2DF2 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = ""; }; 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../cdrom.cpp; sourceTree = ""; }; @@ -391,7 +311,6 @@ 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = testlmem.sh; sourceTree = ""; }; 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = disk_sparsebundle.cpp; sourceTree = ""; }; 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk_unix.h; sourceTree = ""; }; - 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_unix.cpp; sourceTree = ""; }; 7539E2011F23B32A006B2DF2 /* fbdevices */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = fbdevices; sourceTree = ""; }; 7539E2051F23B32A006B2DF2 /* install-sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = "install-sh"; sourceTree = ""; }; 7539E20A1F23B32A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; @@ -437,6 +356,50 @@ 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; + E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; + E413D8F920D260B900E437D8 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = mbuf.c; sourceTree = ""; }; + E413D8FA20D260B900E437D8 /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tftp.h; sourceTree = ""; }; + E413D8FB20D260B900E437D8 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_icmp.c; sourceTree = ""; }; + E413D8FC20D260B900E437D8 /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bootp.h; sourceTree = ""; }; + E413D8FD20D260B900E437D8 /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcpip.h; sourceTree = ""; }; + E413D8FE20D260B900E437D8 /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION; sourceTree = ""; }; + E413D8FF20D260B900E437D8 /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip_icmp.h; sourceTree = ""; }; + E413D90020D260B900E437D8 /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp_config.h; sourceTree = ""; }; + E413D90120D260B900E437D8 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_input.c; sourceTree = ""; }; + E413D90220D260B900E437D8 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = misc.c; sourceTree = ""; }; + E413D90320D260BA00E437D8 /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = udp.h; sourceTree = ""; }; + E413D90420D260BA00E437D8 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; + E413D90520D260BA00E437D8 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = debug.c; sourceTree = ""; }; + E413D90620D260BA00E437D8 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_subr.c; sourceTree = ""; }; + E413D90720D260BA00E437D8 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = udp.c; sourceTree = ""; }; + E413D90820D260BA00E437D8 /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mbuf.h; sourceTree = ""; }; + E413D90920D260BA00E437D8 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sbuf.c; sourceTree = ""; }; + E413D90A20D260BA00E437D8 /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ctl.h; sourceTree = ""; }; + E413D90B20D260BA00E437D8 /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp.h; sourceTree = ""; }; + E413D90C20D260BA00E437D8 /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = COPYRIGHT; sourceTree = ""; }; + E413D90D20D260BA00E437D8 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = slirp.c; sourceTree = ""; }; + E413D90E20D260BA00E437D8 /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = socket.h; sourceTree = ""; }; + E413D90F20D260BA00E437D8 /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = if.h; sourceTree = ""; }; + E413D91020D260BA00E437D8 /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = misc.h; sourceTree = ""; }; + E413D91120D260BA00E437D8 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_timer.c; sourceTree = ""; }; + E413D91220D260BB00E437D8 /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sbuf.h; sourceTree = ""; }; + E413D91320D260BB00E437D8 /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp.h; sourceTree = ""; }; + E413D91420D260BB00E437D8 /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip.h; sourceTree = ""; }; + E413D91520D260BB00E437D8 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; + E413D91620D260BB00E437D8 /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_timer.h; sourceTree = ""; }; + E413D91720D260BB00E437D8 /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_var.h; sourceTree = ""; }; + E413D91820D260BB00E437D8 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = socket.c; sourceTree = ""; }; + E413D91920D260BB00E437D8 /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = libslirp.h; sourceTree = ""; }; + E413D91A20D260BC00E437D8 /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = icmp_var.h; sourceTree = ""; }; + E413D91B20D260BC00E437D8 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = bootp.c; sourceTree = ""; }; + E413D91C20D260BC00E437D8 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_input.c; sourceTree = ""; }; + E413D91D20D260BC00E437D8 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_output.c; sourceTree = ""; }; + E413D91E20D260BC00E437D8 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = if.c; sourceTree = ""; }; + E413D91F20D260BC00E437D8 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = cksum.c; sourceTree = ""; }; + E413D92020D260BC00E437D8 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_output.c; sourceTree = ""; }; + E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; + E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -458,8 +421,8 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( + E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, - 752F27141F251B5C001032B4 /* SDL2.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, ); @@ -471,48 +434,47 @@ 4ECAC23C1F8A89ED0013B963 /* slirp */ = { isa = PBXGroup; children = ( - 4ECAC2661F8A8A5D0013B963 /* ether_unix.cpp */, - 4ECAC2601F8A8A020013B963 /* bootp.c */, - 4ECAC2591F8A8A010013B963 /* bootp.h */, - 4ECAC2541F8A8A000013B963 /* cksum.c */, - 4ECAC2621F8A8A020013B963 /* COPYRIGHT */, - 4ECAC25A1F8A8A010013B963 /* ctl.h */, - 4ECAC23F1F8A89FE0013B963 /* debug.c */, - 4ECAC2531F8A8A000013B963 /* debug.h */, - 4ECAC2491F8A89FF0013B963 /* icmp_var.h */, - 4ECAC2501F8A8A000013B963 /* if.c */, - 4ECAC2411F8A89FE0013B963 /* if.h */, - 4ECAC2441F8A89FE0013B963 /* ip_icmp.c */, - 4ECAC2511F8A8A000013B963 /* ip_icmp.h */, - 4ECAC2481F8A89FF0013B963 /* ip_input.c */, - 4ECAC2471F8A89FF0013B963 /* ip_output.c */, - 4ECAC2581F8A8A010013B963 /* ip.h */, - 4ECAC25B1F8A8A010013B963 /* libslirp.h */, - 4ECAC2631F8A8A020013B963 /* main.h */, - 4ECAC24F1F8A89FF0013B963 /* mbuf.c */, - 4ECAC2611F8A8A020013B963 /* mbuf.h */, - 4ECAC2401F8A89FE0013B963 /* misc.c */, - 4ECAC25F1F8A8A020013B963 /* misc.h */, - 4ECAC24A1F8A89FF0013B963 /* sbuf.c */, - 4ECAC2421F8A89FE0013B963 /* sbuf.h */, - 4ECAC24B1F8A89FF0013B963 /* slirp_config.h */, - 4ECAC23D1F8A89FE0013B963 /* slirp.c */, - 4ECAC2561F8A8A000013B963 /* slirp.h */, - 4ECAC2431F8A89FE0013B963 /* socket.c */, - 4ECAC2451F8A89FE0013B963 /* socket.h */, - 4ECAC25E1F8A8A020013B963 /* tcp_input.c */, - 4ECAC24C1F8A89FF0013B963 /* tcp_output.c */, - 4ECAC2571F8A8A000013B963 /* tcp_subr.c */, - 4ECAC24D1F8A89FF0013B963 /* tcp_timer.c */, - 4ECAC2641F8A8A020013B963 /* tcp_timer.h */, - 4ECAC2551F8A8A000013B963 /* tcp_var.h */, - 4ECAC23E1F8A89FE0013B963 /* tcp.h */, - 4ECAC25D1F8A8A010013B963 /* tcpip.h */, - 4ECAC2521F8A8A000013B963 /* tftp.c */, - 4ECAC2651F8A8A030013B963 /* tftp.h */, - 4ECAC24E1F8A89FF0013B963 /* udp.c */, - 4ECAC2461F8A89FE0013B963 /* udp.h */, - 4ECAC25C1F8A8A010013B963 /* VERSION */, + E413D91B20D260BC00E437D8 /* bootp.c */, + E413D8FC20D260B900E437D8 /* bootp.h */, + E413D91F20D260BC00E437D8 /* cksum.c */, + E413D90C20D260BA00E437D8 /* COPYRIGHT */, + E413D90A20D260BA00E437D8 /* ctl.h */, + E413D90520D260BA00E437D8 /* debug.c */, + E413D91520D260BB00E437D8 /* debug.h */, + E413D91A20D260BC00E437D8 /* icmp_var.h */, + E413D91E20D260BC00E437D8 /* if.c */, + E413D90F20D260BA00E437D8 /* if.h */, + E413D8FB20D260B900E437D8 /* ip_icmp.c */, + E413D8FF20D260B900E437D8 /* ip_icmp.h */, + E413D91C20D260BC00E437D8 /* ip_input.c */, + E413D91D20D260BC00E437D8 /* ip_output.c */, + E413D91420D260BB00E437D8 /* ip.h */, + E413D91920D260BB00E437D8 /* libslirp.h */, + E413D90420D260BA00E437D8 /* main.h */, + E413D8F920D260B900E437D8 /* mbuf.c */, + E413D90820D260BA00E437D8 /* mbuf.h */, + E413D90220D260B900E437D8 /* misc.c */, + E413D91020D260BA00E437D8 /* misc.h */, + E413D90920D260BA00E437D8 /* sbuf.c */, + E413D91220D260BB00E437D8 /* sbuf.h */, + E413D90020D260B900E437D8 /* slirp_config.h */, + E413D90D20D260BA00E437D8 /* slirp.c */, + E413D90B20D260BA00E437D8 /* slirp.h */, + E413D91820D260BB00E437D8 /* socket.c */, + E413D90E20D260BA00E437D8 /* socket.h */, + E413D90120D260B900E437D8 /* tcp_input.c */, + E413D92020D260BC00E437D8 /* tcp_output.c */, + E413D90620D260BA00E437D8 /* tcp_subr.c */, + E413D91120D260BA00E437D8 /* tcp_timer.c */, + E413D91620D260BB00E437D8 /* tcp_timer.h */, + E413D91720D260BB00E437D8 /* tcp_var.h */, + E413D91320D260BB00E437D8 /* tcp.h */, + E413D8FD20D260B900E437D8 /* tcpip.h */, + E413D8F820D260B900E437D8 /* tftp.c */, + E413D8FA20D260B900E437D8 /* tftp.h */, + E413D90720D260BA00E437D8 /* udp.c */, + E413D90320D260BA00E437D8 /* udp.h */, + E413D8FE20D260B900E437D8 /* VERSION */, ); name = slirp; path = ../slirp; @@ -521,6 +483,7 @@ 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( + E413D93520D260DA00E437D8 /* SDL2.framework */, 756C1B381F25306A00620917 /* AppKit.framework */, 752F26FA1F240E69001032B4 /* IOKit.framework */, 752F26F81F240E51001032B4 /* Foundation.framework */, @@ -528,25 +491,6 @@ name = Frameworks; sourceTree = ""; }; - 752F27041F251B27001032B4 /* external */ = { - isa = PBXGroup; - children = ( - 752F27051F251B4A001032B4 /* SDL.xcodeproj */, - ); - name = external; - sourceTree = ""; - }; - 752F27061F251B4A001032B4 /* Products */ = { - isa = PBXGroup; - children = ( - 752F270D1F251B4A001032B4 /* SDL2.framework */, - 752F270F1F251B4A001032B4 /* libSDL2.a */, - 752F27111F251B4A001032B4 /* libSDL2.dylib */, - 752F27131F251B4A001032B4 /* Standard DMG */, - ); - name = Products; - sourceTree = ""; - }; 753252FF1F535E5D0024025B /* generated src */ = { isa = PBXGroup; children = ( @@ -581,8 +525,6 @@ children = ( 7539E1E41F23B25E006B2DF2 /* src */, 753252FF1F535E5D0024025B /* generated src */, - 752F27041F251B27001032B4 /* external */, - 7539DFB41F23B17E006B2DF2 /* Assets */, 7539DFB31F23B17E006B2DF2 /* Products */, 752F26F71F240E51001032B4 /* Frameworks */, ); @@ -599,15 +541,6 @@ path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; sourceTree = BUILT_PRODUCTS_DIR; }; - 7539DFB41F23B17E006B2DF2 /* Assets */ = { - isa = PBXGroup; - children = ( - 7539DFBE1F23B17E006B2DF2 /* Assets.xcassets */, - ); - name = Assets; - path = BasiliskII; - sourceTree = ""; - }; 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { isa = PBXGroup; children = ( @@ -671,6 +604,7 @@ 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, 7539E00A1F23B25A006B2DF2 /* Credits.html */, + E413D93920D2614E00E437D8 /* extfs_macosx.cpp */, 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, 7539E0141F23B25A006B2DF2 /* HowTo.html */, 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */, @@ -798,7 +732,7 @@ 7539E1F71F23B329006B2DF2 /* Darwin */, 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */, 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */, - 7539E2001F23B32A006B2DF2 /* extfs_unix.cpp */, + E413D93720D2613500E437D8 /* ether_unix.cpp */, 7539E2011F23B32A006B2DF2 /* fbdevices */, 7539E2051F23B32A006B2DF2 /* install-sh */, 7539E20A1F23B32A006B2DF2 /* keycodes */, @@ -958,7 +892,6 @@ ); dependencies = ( 7532531F1F5364170024025B /* PBXTargetDependency */, - 752F27171F251B5C001032B4 /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; @@ -1007,12 +940,6 @@ mainGroup = 7539DFA91F23B17E006B2DF2; productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; projectDirPath = ""; - projectReferences = ( - { - ProductGroup = 752F27061F251B4A001032B4 /* Products */; - ProjectRef = 752F27051F251B4A001032B4 /* SDL.xcodeproj */; - }, - ); projectRoot = ""; targets = ( 7539DFB11F23B17E006B2DF2 /* BasiliskII */, @@ -1024,37 +951,6 @@ }; /* End PBXProject section */ -/* Begin PBXReferenceProxy section */ - 752F270D1F251B4A001032B4 /* SDL2.framework */ = { - isa = PBXReferenceProxy; - fileType = wrapper.framework; - path = SDL2.framework; - remoteRef = 752F270C1F251B4A001032B4 /* PBXContainerItemProxy */; - sourceTree = BUILT_PRODUCTS_DIR; - }; - 752F270F1F251B4A001032B4 /* libSDL2.a */ = { - isa = PBXReferenceProxy; - fileType = archive.ar; - path = libSDL2.a; - remoteRef = 752F270E1F251B4A001032B4 /* PBXContainerItemProxy */; - sourceTree = BUILT_PRODUCTS_DIR; - }; - 752F27111F251B4A001032B4 /* libSDL2.dylib */ = { - isa = PBXReferenceProxy; - fileType = "compiled.mach-o.dylib"; - path = libSDL2.dylib; - remoteRef = 752F27101F251B4A001032B4 /* PBXContainerItemProxy */; - sourceTree = BUILT_PRODUCTS_DIR; - }; - 752F27131F251B4A001032B4 /* Standard DMG */ = { - isa = PBXReferenceProxy; - fileType = "compiled.mach-o.executable"; - path = "Standard DMG"; - remoteRef = 752F27121F251B4A001032B4 /* PBXContainerItemProxy */; - sourceTree = BUILT_PRODUCTS_DIR; - }; -/* End PBXReferenceProxy section */ - /* Begin PBXResourcesBuildPhase section */ 7539DFB01F23B17E006B2DF2 /* Resources */ = { isa = PBXResourcesBuildPhase; @@ -1073,7 +969,6 @@ 7539E2501F23B32A006B2DF2 /* install-sh in Resources */, 7539E1301F23B25A006B2DF2 /* Assets.xcassets in Resources */, 7539E2641F23B32A006B2DF2 /* mkinstalldirs in Resources */, - 7539DFBF1F23B17E006B2DF2 /* Assets.xcassets in Resources */, 7539E2581F23B32A006B2DF2 /* linux-x86_64.ld in Resources */, 7539E2451F23B32A006B2DF2 /* gtk-osx.patch in Resources */, 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */, @@ -1081,7 +976,9 @@ 7539E14B1F23B25A006B2DF2 /* ToDo.html in Resources */, 7539E13E1F23B25A006B2DF2 /* HowTo.html in Resources */, 7539E1751F23B25A006B2DF2 /* keycodes in Resources */, + E413D92B20D260BC00E437D8 /* COPYRIGHT in Resources */, 7539E14D1F23B25A006B2DF2 /* Versions.html in Resources */, + E413D92420D260BC00E437D8 /* VERSION in Resources */, 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */, 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */, 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */, @@ -1137,82 +1034,82 @@ 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, - 4ECAC2701F8A8B230013B963 /* misc.c in Sources */, - 4ECAC26E1F8A8B120013B963 /* ip_output.c in Sources */, - 4ECAC2781F8A8B4B0013B963 /* tftp.c in Sources */, + E413D93320D260BC00E437D8 /* cksum.c in Sources */, + E413D92920D260BC00E437D8 /* udp.c in Sources */, 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, - 4ECAC26B1F8A8B010013B963 /* if.c in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, + E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, - 4ECAC2761F8A8B480013B963 /* tcp_subr.c in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, + E413D92620D260BC00E437D8 /* misc.c in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, - 4ECAC2771F8A8B480013B963 /* tcp_timer.c in Sources */, 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, - 4ECAC26D1F8A8B120013B963 /* ip_input.c in Sources */, - 4ECAC2791F8A8B530013B963 /* udp.c in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, - 4ECAC26F1F8A8B230013B963 /* mbuf.c in Sources */, + E413D93220D260BC00E437D8 /* if.c in Sources */, 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, + E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, - 4ECAC2721F8A8B390013B963 /* slirp.c in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, + E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, + E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, + E413D92E20D260BC00E437D8 /* socket.c in Sources */, 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, - 4ECAC2731F8A8B390013B963 /* socket.c in Sources */, 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, - 4ECAC2741F8A8B480013B963 /* tcp_input.c in Sources */, - 4ECAC26A1F8A8AF80013B963 /* debug.c in Sources */, 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, + E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, + E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, - 4ECAC2691F8A8AF10013B963 /* cksum.c in Sources */, 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, + E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */, 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, + E413D92720D260BC00E437D8 /* debug.c in Sources */, + E413D92220D260BC00E437D8 /* mbuf.c in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, - 4ECAC2671F8A8A5D0013B963 /* ether_unix.cpp in Sources */, + E413D93020D260BC00E437D8 /* ip_input.c in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, - 4ECAC2751F8A8B480013B963 /* tcp_output.c in Sources */, + E413D92C20D260BC00E437D8 /* slirp.c in Sources */, 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, - 4ECAC26C1F8A8B120013B963 /* ip_icmp.c in Sources */, 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, + E413D92520D260BC00E437D8 /* tcp_input.c in Sources */, + E413D92120D260BC00E437D8 /* tftp.c in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, + E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, - 4ECAC2681F8A8AE90013B963 /* bootp.c in Sources */, - 4ECAC2711F8A8B350013B963 /* sbuf.c in Sources */, - 7539E24C1F23B32A006B2DF2 /* extfs_unix.cpp in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, + E413D92F20D260BC00E437D8 /* bootp.c in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, ); runOnlyForDeploymentPostprocessing = 0; @@ -1220,11 +1117,6 @@ /* End PBXSourcesBuildPhase section */ /* Begin PBXTargetDependency section */ - 752F27171F251B5C001032B4 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - name = Framework; - targetProxy = 752F27161F251B5C001032B4 /* PBXContainerItemProxy */; - }; 7532530C1F53611F0024025B /* PBXTargetDependency */ = { isa = PBXTargetDependency; target = 753252D91F5358D30024025B /* build68k */; @@ -1462,7 +1354,7 @@ GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; HEADER_SEARCH_PATHS = ( - "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, ../uae_cpu, @@ -1472,7 +1364,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; + MACOSX_DEPLOYMENT_TARGET = 10.6; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; @@ -1512,7 +1404,7 @@ GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; HEADER_SEARCH_PATHS = ( - "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, ../uae_cpu, @@ -1522,7 +1414,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; + MACOSX_DEPLOYMENT_TARGET = 10.6; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index f75200ebb..ab1f6ee5f 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -43,7 +43,6 @@ /* Define if using video enabled on SEGV signals. */ /* #undef ENABLE_VOSF */ -#define ENABLE_VOSF 1 /* Define if using XFree86 DGA extension. */ /* #undef ENABLE_XF86_DGA */ diff --git a/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh b/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh index 30047f7f6..3a34fc014 100755 --- a/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh +++ b/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh @@ -6,7 +6,7 @@ # Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts # -if [ ! -d "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then +if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" exit 1 fi @@ -23,6 +23,10 @@ case "$1" in rm -rf "$BUILT_PRODUCTS_DIR/build68k_output" ;; "") + if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then + echo "No built products directory" + exit 1 + fi echo "Running build68k" cd "$BUILT_PRODUCTS_DIR" mkdir -p build68k_output diff --git a/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh b/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh index 16c014dfa..e457b8faf 100755 --- a/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh +++ b/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh @@ -6,7 +6,7 @@ # Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts # -if [ ! -d "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then +if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" exit 1 fi @@ -23,6 +23,10 @@ case "$1" in rm -rf "$BUILT_PRODUCTS_DIR/gencpu_output" ;; "") + if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then + echo "No built products directory" + exit 1 + fi echo "Running gencpu" cd "$BUILT_PRODUCTS_DIR" mkdir -p gencpu_output diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 0b4bfb86d..6d96a2fc5 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -719,11 +719,11 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags // Apply anti-aliasing, if and when appropriate (usually in fullscreen) SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); - +/* // Always use a resize-able window. This helps allow SDL to manage // transitions involving fullscreen to or from windowed-mode. window_flags |= SDL_WINDOW_RESIZABLE; - +*/ if (!sdl_window) { sdl_window = SDL_CreateWindow( "Basilisk II", @@ -737,6 +737,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } } + if (flags & SDL_WINDOW_FULLSCREEN) SDL_SetWindowGrab(sdl_window, SDL_TRUE); // Some SDL events (regarding some native-window events), need processing // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which @@ -842,6 +843,8 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags static int present_sdl_video() { + if (SDL_RectEmpty(&sdl_update_video_rect)) return 0; + if (!sdl_renderer || !sdl_texture || !guest_surface) { printf("WARNING: A video mode does not appear to have been set.\n"); return -1; @@ -1010,6 +1013,13 @@ void driver_base::adapt_to_video_mode() { if (private_data) private_data->cursorHardware = hardware_cursor; #endif + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); + // Hide cursor SDL_ShowCursor(hardware_cursor); @@ -1528,9 +1538,13 @@ static void do_toggle_fullscreen(void) if (display_type == DISPLAY_SCREEN) { display_type = DISPLAY_WINDOW; SDL_SetWindowFullscreen(sdl_window, 0); + const VIDEO_MODE &mode = drv->mode; + SDL_SetWindowSize(sdl_window, VIDEO_MODE_X, VIDEO_MODE_Y); + SDL_SetWindowGrab(sdl_window, SDL_FALSE); } else { display_type = DISPLAY_SCREEN; SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); + SDL_SetWindowGrab(sdl_window, SDL_TRUE); } } @@ -1765,7 +1779,7 @@ void SDL_monitor_desc::switch_to_current_mode(void) #ifdef SHEEPSHAVER bool video_can_change_cursor(void) { - if (display_type != DISPLAY_WINDOW) + if (display_type != DISPLAY_WINDOW || !PrefsFindBool("hardcursor")) return false; return true; @@ -2586,7 +2600,7 @@ static int redraw_func(void *arg) // Wait next += VIDEO_REFRESH_DELAY; - uint64 delay = int32(next - GetTicks_usec()); + int32 delay = int32(next - GetTicks_usec()); if (delay > 0) Delay_usec(delay); else if (delay < -VIDEO_REFRESH_DELAY) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index de94c8963..e46da6e21 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -28,7 +28,6 @@ 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */; }; 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; - 0846E65414B513CE00574779 /* SDL.framework in Copy Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D17414A9A1A2000B1711 /* SDL.framework */; }; 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4B14A99EEF000B1711 /* adb.cpp */; }; 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4C14A99EEF000B1711 /* audio.cpp */; }; 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7814A99EEF000B1711 /* cdrom.cpp */; }; @@ -51,27 +50,7 @@ 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */; }; 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8E14A99EF0000B1711 /* scsi.cpp */; }; 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */; }; - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9314A99EF0000B1711 /* SDLMain.m */; }; - 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9414A99EF0000B1711 /* video_sdl.cpp */; }; 0856D06614A99EF1000B1711 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9514A99EF0000B1711 /* serial.cpp */; }; - 0856D06714A99EF1000B1711 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9714A99EF0000B1711 /* bootp.c */; }; - 0856D06814A99EF1000B1711 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9914A99EF0000B1711 /* cksum.c */; }; - 0856D06A14A99EF1000B1711 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9C14A99EF0000B1711 /* debug.c */; }; - 0856D06B14A99EF1000B1711 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9F14A99EF0000B1711 /* if.c */; }; - 0856D06C14A99EF1000B1711 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEA214A99EF0000B1711 /* ip_icmp.c */; }; - 0856D06D14A99EF1000B1711 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEA414A99EF0000B1711 /* ip_input.c */; }; - 0856D06E14A99EF1000B1711 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEA514A99EF0000B1711 /* ip_output.c */; }; - 0856D06F14A99EF1000B1711 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEA814A99EF0000B1711 /* mbuf.c */; }; - 0856D07014A99EF1000B1711 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEAA14A99EF0000B1711 /* misc.c */; }; - 0856D07114A99EF1000B1711 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEAC14A99EF0000B1711 /* sbuf.c */; }; - 0856D07214A99EF1000B1711 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEAE14A99EF0000B1711 /* slirp.c */; }; - 0856D07314A99EF1000B1711 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEB114A99EF0000B1711 /* socket.c */; }; - 0856D07414A99EF1000B1711 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEB414A99EF0000B1711 /* tcp_input.c */; settings = {COMPILER_FLAGS = "-O1"; }; }; - 0856D07514A99EF1000B1711 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEB514A99EF0000B1711 /* tcp_output.c */; }; - 0856D07614A99EF1000B1711 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEB614A99EF0000B1711 /* tcp_subr.c */; }; - 0856D07714A99EF1000B1711 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEB714A99EF0000B1711 /* tcp_timer.c */; }; - 0856D07814A99EF1000B1711 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEBB14A99EF0000B1711 /* tftp.c */; }; - 0856D07914A99EF1000B1711 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEBD14A99EF0000B1711 /* udp.c */; }; 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC014A99EF0000B1711 /* sony.cpp */; }; 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC114A99EF0000B1711 /* thunks.cpp */; }; 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC214A99EF0000B1711 /* timer.cpp */; }; @@ -91,7 +70,6 @@ 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7714A99EF0000B1711 /* user_strings.cpp */; }; 0856D11814A99EF1000B1711 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7814A99EF0000B1711 /* video.cpp */; }; 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CFC014A99EF0000B1711 /* xpram.cpp */; }; - 0856D17514A9A1A2000B1711 /* SDL.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D17414A9A1A2000B1711 /* SDL.framework */; }; 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D21414A9A6C6000B1711 /* IOKit.framework */; }; 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */; }; 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856D31214A9A704000B1711 /* VMSettingsController.mm */; }; @@ -102,11 +80,35 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; + E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; + E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; + E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; + E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; + E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; + E44C460720D262B0000583AE /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DF20D262AD000583AE /* ip_icmp.c */; }; + E44C460820D262B0000583AE /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E44C45E220D262AE000583AE /* VERSION */; }; + E44C460920D262B0000583AE /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E520D262AE000583AE /* tcp_input.c */; }; + E44C460A20D262B0000583AE /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E620D262AE000583AE /* misc.c */; }; + E44C460B20D262B0000583AE /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E920D262AE000583AE /* debug.c */; }; + E44C460C20D262B0000583AE /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EA20D262AE000583AE /* tcp_subr.c */; }; + E44C460D20D262B0000583AE /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EB20D262AE000583AE /* udp.c */; }; + E44C460E20D262B0000583AE /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45ED20D262AE000583AE /* sbuf.c */; }; + E44C460F20D262B0000583AE /* COPYRIGHT in Resources */ = {isa = PBXBuildFile; fileRef = E44C45F020D262AE000583AE /* COPYRIGHT */; }; + E44C461020D262B0000583AE /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F120D262AE000583AE /* slirp.c */; }; + E44C461120D262B0000583AE /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F520D262AF000583AE /* tcp_timer.c */; }; + E44C461220D262B0000583AE /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FC20D262AF000583AE /* socket.c */; }; + E44C461320D262B0000583AE /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FF20D262AF000583AE /* bootp.c */; }; + E44C461420D262B0000583AE /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460020D262AF000583AE /* ip_input.c */; }; + E44C461520D262B0000583AE /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460120D262AF000583AE /* ip_output.c */; }; + E44C461620D262B0000583AE /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460220D262AF000583AE /* if.c */; }; + E44C461720D262B0000583AE /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460320D262AF000583AE /* cksum.c */; }; + E44C461820D262B0000583AE /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460420D262AF000583AE /* tcp_output.c */; }; E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */; }; E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */; }; E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */; }; + E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4CBF46020CFC451009F40CC /* video_sdl.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -127,15 +129,14 @@ /* End PBXContainerItemProxy section */ /* Begin PBXCopyFilesBuildPhase section */ - 0846E65E14B513DF00574779 /* Copy Frameworks */ = { + E413A40820CF7EF800FBE967 /* Embed Frameworks */ = { isa = PBXCopyFilesBuildPhase; buildActionMask = 2147483647; dstPath = ""; dstSubfolderSpec = 10; files = ( - 0846E65414B513CE00574779 /* SDL.framework in Copy Frameworks */, ); - name = "Copy Frameworks"; + name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; }; /* End PBXCopyFilesBuildPhase section */ @@ -273,51 +274,7 @@ 0856CE8E14A99EF0000B1711 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = SOURCE_ROOT; }; 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; 0856CE9114A99EF0000B1711 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 0856CE9214A99EF0000B1711 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; - 0856CE9314A99EF0000B1711 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; - 0856CE9414A99EF0000B1711 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; 0856CE9514A99EF0000B1711 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE9714A99EF0000B1711 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = bootp.c; sourceTree = ""; }; - 0856CE9814A99EF0000B1711 /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bootp.h; sourceTree = ""; }; - 0856CE9914A99EF0000B1711 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = cksum.c; sourceTree = ""; }; - 0856CE9A14A99EF0000B1711 /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = COPYRIGHT; sourceTree = ""; }; - 0856CE9B14A99EF0000B1711 /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ctl.h; sourceTree = ""; }; - 0856CE9C14A99EF0000B1711 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = debug.c; sourceTree = ""; }; - 0856CE9D14A99EF0000B1711 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; - 0856CE9E14A99EF0000B1711 /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = icmp_var.h; sourceTree = ""; }; - 0856CE9F14A99EF0000B1711 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = if.c; sourceTree = ""; }; - 0856CEA014A99EF0000B1711 /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = if.h; sourceTree = ""; }; - 0856CEA114A99EF0000B1711 /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip.h; sourceTree = ""; }; - 0856CEA214A99EF0000B1711 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_icmp.c; sourceTree = ""; }; - 0856CEA314A99EF0000B1711 /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip_icmp.h; sourceTree = ""; }; - 0856CEA414A99EF0000B1711 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_input.c; sourceTree = ""; }; - 0856CEA514A99EF0000B1711 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_output.c; sourceTree = ""; }; - 0856CEA614A99EF0000B1711 /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = libslirp.h; sourceTree = ""; }; - 0856CEA714A99EF0000B1711 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; - 0856CEA814A99EF0000B1711 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = mbuf.c; sourceTree = ""; }; - 0856CEA914A99EF0000B1711 /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mbuf.h; sourceTree = ""; }; - 0856CEAA14A99EF0000B1711 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = misc.c; sourceTree = ""; }; - 0856CEAB14A99EF0000B1711 /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = misc.h; sourceTree = ""; }; - 0856CEAC14A99EF0000B1711 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sbuf.c; sourceTree = ""; }; - 0856CEAD14A99EF0000B1711 /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sbuf.h; sourceTree = ""; }; - 0856CEAE14A99EF0000B1711 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = slirp.c; sourceTree = ""; }; - 0856CEAF14A99EF0000B1711 /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp.h; sourceTree = ""; }; - 0856CEB014A99EF0000B1711 /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp_config.h; sourceTree = ""; }; - 0856CEB114A99EF0000B1711 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = socket.c; sourceTree = ""; }; - 0856CEB214A99EF0000B1711 /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = socket.h; sourceTree = ""; }; - 0856CEB314A99EF0000B1711 /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp.h; sourceTree = ""; }; - 0856CEB414A99EF0000B1711 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_input.c; sourceTree = ""; }; - 0856CEB514A99EF0000B1711 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_output.c; sourceTree = ""; }; - 0856CEB614A99EF0000B1711 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_subr.c; sourceTree = ""; }; - 0856CEB714A99EF0000B1711 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_timer.c; sourceTree = ""; }; - 0856CEB814A99EF0000B1711 /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_timer.h; sourceTree = ""; }; - 0856CEB914A99EF0000B1711 /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_var.h; sourceTree = ""; }; - 0856CEBA14A99EF0000B1711 /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcpip.h; sourceTree = ""; }; - 0856CEBB14A99EF0000B1711 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; - 0856CEBC14A99EF0000B1711 /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tftp.h; sourceTree = ""; }; - 0856CEBD14A99EF0000B1711 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = udp.c; sourceTree = ""; }; - 0856CEBE14A99EF0000B1711 /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = udp.h; sourceTree = ""; }; - 0856CEBF14A99EF0000B1711 /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION; sourceTree = ""; }; 0856CEC014A99EF0000B1711 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = SOURCE_ROOT; }; 0856CEC114A99EF0000B1711 /* thunks.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = thunks.cpp; path = ../thunks.cpp; sourceTree = SOURCE_ROOT; }; 0856CEC214A99EF0000B1711 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = SOURCE_ROOT; }; @@ -345,7 +302,6 @@ 0856CF7714A99EF0000B1711 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = SOURCE_ROOT; }; 0856CF7814A99EF0000B1711 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = SOURCE_ROOT; }; 0856CFC014A99EF0000B1711 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = SOURCE_ROOT; }; - 0856D17414A9A1A2000B1711 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = /Library/Frameworks/SDL.framework; sourceTree = ""; }; 0856D21414A9A6C6000B1711 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = /System/Library/Frameworks/IOKit.framework; sourceTree = ""; }; 0856D30814A9A704000B1711 /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMSettingsWindow.nib; sourceTree = ""; }; 0856D31114A9A704000B1711 /* VMSettingsController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = VMSettingsController.h; sourceTree = ""; }; @@ -374,11 +330,58 @@ 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; + E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; + E41936C020CFE608003A7654 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = ../../../../../../Library/Frameworks/SDL.framework; sourceTree = ""; }; + E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; + E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; + E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + E44C45DC20D262AD000583AE /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../../BasiliskII/src/slirp/tftp.c; sourceTree = ""; }; + E44C45DD20D262AD000583AE /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../../BasiliskII/src/slirp/mbuf.c; sourceTree = ""; }; + E44C45DE20D262AD000583AE /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../../BasiliskII/src/slirp/tftp.h; sourceTree = ""; }; + E44C45DF20D262AD000583AE /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../../BasiliskII/src/slirp/ip_icmp.c; sourceTree = ""; }; + E44C45E020D262AE000583AE /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../../BasiliskII/src/slirp/bootp.h; sourceTree = ""; }; + E44C45E120D262AE000583AE /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../../BasiliskII/src/slirp/tcpip.h; sourceTree = ""; }; + E44C45E220D262AE000583AE /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = VERSION; path = ../../../BasiliskII/src/slirp/VERSION; sourceTree = ""; }; + E44C45E320D262AE000583AE /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../../BasiliskII/src/slirp/ip_icmp.h; sourceTree = ""; }; + E44C45E420D262AE000583AE /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../../BasiliskII/src/slirp/slirp_config.h; sourceTree = ""; }; + E44C45E520D262AE000583AE /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../../BasiliskII/src/slirp/tcp_input.c; sourceTree = ""; }; + E44C45E620D262AE000583AE /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../../BasiliskII/src/slirp/misc.c; sourceTree = ""; }; + E44C45E720D262AE000583AE /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = udp.h; path = ../../../BasiliskII/src/slirp/udp.h; sourceTree = ""; }; + E44C45E820D262AE000583AE /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = main.h; path = ../../../BasiliskII/src/slirp/main.h; sourceTree = ""; }; + E44C45E920D262AE000583AE /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../../BasiliskII/src/slirp/debug.c; sourceTree = ""; }; + E44C45EA20D262AE000583AE /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../../BasiliskII/src/slirp/tcp_subr.c; sourceTree = ""; }; + E44C45EB20D262AE000583AE /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../../BasiliskII/src/slirp/udp.c; sourceTree = ""; }; + E44C45EC20D262AE000583AE /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = mbuf.h; path = ../../../BasiliskII/src/slirp/mbuf.h; sourceTree = ""; }; + E44C45ED20D262AE000583AE /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../../BasiliskII/src/slirp/sbuf.c; sourceTree = ""; }; + E44C45EE20D262AE000583AE /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ctl.h; path = ../../../BasiliskII/src/slirp/ctl.h; sourceTree = ""; }; + E44C45EF20D262AE000583AE /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp.h; path = ../../../BasiliskII/src/slirp/slirp.h; sourceTree = ""; }; + E44C45F020D262AE000583AE /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = COPYRIGHT; path = ../../../BasiliskII/src/slirp/COPYRIGHT; sourceTree = ""; }; + E44C45F120D262AE000583AE /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../../BasiliskII/src/slirp/slirp.c; sourceTree = ""; }; + E44C45F220D262AE000583AE /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = socket.h; path = ../../../BasiliskII/src/slirp/socket.h; sourceTree = ""; }; + E44C45F320D262AF000583AE /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = if.h; path = ../../../BasiliskII/src/slirp/if.h; sourceTree = ""; }; + E44C45F420D262AF000583AE /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = misc.h; path = ../../../BasiliskII/src/slirp/misc.h; sourceTree = ""; }; + E44C45F520D262AF000583AE /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../../BasiliskII/src/slirp/tcp_timer.c; sourceTree = ""; }; + E44C45F620D262AF000583AE /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = sbuf.h; path = ../../../BasiliskII/src/slirp/sbuf.h; sourceTree = ""; }; + E44C45F720D262AF000583AE /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp.h; path = ../../../BasiliskII/src/slirp/tcp.h; sourceTree = ""; }; + E44C45F820D262AF000583AE /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip.h; path = ../../../BasiliskII/src/slirp/ip.h; sourceTree = ""; }; + E44C45F920D262AF000583AE /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = debug.h; path = ../../../BasiliskII/src/slirp/debug.h; sourceTree = ""; }; + E44C45FA20D262AF000583AE /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_timer.h; path = ../../../BasiliskII/src/slirp/tcp_timer.h; sourceTree = ""; }; + E44C45FB20D262AF000583AE /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_var.h; path = ../../../BasiliskII/src/slirp/tcp_var.h; sourceTree = ""; }; + E44C45FC20D262AF000583AE /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../../BasiliskII/src/slirp/socket.c; sourceTree = ""; }; + E44C45FD20D262AF000583AE /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = libslirp.h; path = ../../../BasiliskII/src/slirp/libslirp.h; sourceTree = ""; }; + E44C45FE20D262AF000583AE /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = icmp_var.h; path = ../../../BasiliskII/src/slirp/icmp_var.h; sourceTree = ""; }; + E44C45FF20D262AF000583AE /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../../BasiliskII/src/slirp/bootp.c; sourceTree = ""; }; + E44C460020D262AF000583AE /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../../BasiliskII/src/slirp/ip_input.c; sourceTree = ""; }; + E44C460120D262AF000583AE /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../../BasiliskII/src/slirp/ip_output.c; sourceTree = ""; }; + E44C460220D262AF000583AE /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../../BasiliskII/src/slirp/if.c; sourceTree = ""; }; + E44C460320D262AF000583AE /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../../BasiliskII/src/slirp/cksum.c; sourceTree = ""; }; + E44C460420D262AF000583AE /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../../BasiliskII/src/slirp/tcp_output.c; sourceTree = ""; }; E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; + E4CBF46020CFC451009F40CC /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl.cpp; path = ../../../BasiliskII/src/SDL/video_sdl.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -400,7 +403,7 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( - 0856D17514A9A1A2000B1711 /* SDL.framework in Frameworks */, + E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, @@ -735,9 +738,10 @@ children = ( 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */, 0856CE9114A99EF0000B1711 /* keycodes */, - 0856CE9214A99EF0000B1711 /* SDLMain.h */, - 0856CE9314A99EF0000B1711 /* SDLMain.m */, - 0856CE9414A99EF0000B1711 /* video_sdl.cpp */, + E41936C220CFE64D003A7654 /* SDLMain.h */, + E41936C320CFE64D003A7654 /* SDLMain.m */, + E4CBF46020CFC451009F40CC /* video_sdl.cpp */, + E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */, ); name = SDL; path = ../SDL; @@ -746,47 +750,47 @@ 0856CE9614A99EF0000B1711 /* slirp */ = { isa = PBXGroup; children = ( - 0856CE9714A99EF0000B1711 /* bootp.c */, - 0856CE9814A99EF0000B1711 /* bootp.h */, - 0856CE9914A99EF0000B1711 /* cksum.c */, - 0856CE9A14A99EF0000B1711 /* COPYRIGHT */, - 0856CE9B14A99EF0000B1711 /* ctl.h */, - 0856CE9C14A99EF0000B1711 /* debug.c */, - 0856CE9D14A99EF0000B1711 /* debug.h */, - 0856CE9E14A99EF0000B1711 /* icmp_var.h */, - 0856CE9F14A99EF0000B1711 /* if.c */, - 0856CEA014A99EF0000B1711 /* if.h */, - 0856CEA114A99EF0000B1711 /* ip.h */, - 0856CEA214A99EF0000B1711 /* ip_icmp.c */, - 0856CEA314A99EF0000B1711 /* ip_icmp.h */, - 0856CEA414A99EF0000B1711 /* ip_input.c */, - 0856CEA514A99EF0000B1711 /* ip_output.c */, - 0856CEA614A99EF0000B1711 /* libslirp.h */, - 0856CEA714A99EF0000B1711 /* main.h */, - 0856CEA814A99EF0000B1711 /* mbuf.c */, - 0856CEA914A99EF0000B1711 /* mbuf.h */, - 0856CEAA14A99EF0000B1711 /* misc.c */, - 0856CEAB14A99EF0000B1711 /* misc.h */, - 0856CEAC14A99EF0000B1711 /* sbuf.c */, - 0856CEAD14A99EF0000B1711 /* sbuf.h */, - 0856CEAE14A99EF0000B1711 /* slirp.c */, - 0856CEAF14A99EF0000B1711 /* slirp.h */, - 0856CEB014A99EF0000B1711 /* slirp_config.h */, - 0856CEB114A99EF0000B1711 /* socket.c */, - 0856CEB214A99EF0000B1711 /* socket.h */, - 0856CEB314A99EF0000B1711 /* tcp.h */, - 0856CEB414A99EF0000B1711 /* tcp_input.c */, - 0856CEB514A99EF0000B1711 /* tcp_output.c */, - 0856CEB614A99EF0000B1711 /* tcp_subr.c */, - 0856CEB714A99EF0000B1711 /* tcp_timer.c */, - 0856CEB814A99EF0000B1711 /* tcp_timer.h */, - 0856CEB914A99EF0000B1711 /* tcp_var.h */, - 0856CEBA14A99EF0000B1711 /* tcpip.h */, - 0856CEBB14A99EF0000B1711 /* tftp.c */, - 0856CEBC14A99EF0000B1711 /* tftp.h */, - 0856CEBD14A99EF0000B1711 /* udp.c */, - 0856CEBE14A99EF0000B1711 /* udp.h */, - 0856CEBF14A99EF0000B1711 /* VERSION */, + E44C45FF20D262AF000583AE /* bootp.c */, + E44C45E020D262AE000583AE /* bootp.h */, + E44C460320D262AF000583AE /* cksum.c */, + E44C45F020D262AE000583AE /* COPYRIGHT */, + E44C45EE20D262AE000583AE /* ctl.h */, + E44C45E920D262AE000583AE /* debug.c */, + E44C45F920D262AF000583AE /* debug.h */, + E44C45FE20D262AF000583AE /* icmp_var.h */, + E44C460220D262AF000583AE /* if.c */, + E44C45F320D262AF000583AE /* if.h */, + E44C45DF20D262AD000583AE /* ip_icmp.c */, + E44C45E320D262AE000583AE /* ip_icmp.h */, + E44C460020D262AF000583AE /* ip_input.c */, + E44C460120D262AF000583AE /* ip_output.c */, + E44C45F820D262AF000583AE /* ip.h */, + E44C45FD20D262AF000583AE /* libslirp.h */, + E44C45E820D262AE000583AE /* main.h */, + E44C45DD20D262AD000583AE /* mbuf.c */, + E44C45EC20D262AE000583AE /* mbuf.h */, + E44C45E620D262AE000583AE /* misc.c */, + E44C45F420D262AF000583AE /* misc.h */, + E44C45ED20D262AE000583AE /* sbuf.c */, + E44C45F620D262AF000583AE /* sbuf.h */, + E44C45E420D262AE000583AE /* slirp_config.h */, + E44C45F120D262AE000583AE /* slirp.c */, + E44C45EF20D262AE000583AE /* slirp.h */, + E44C45FC20D262AF000583AE /* socket.c */, + E44C45F220D262AE000583AE /* socket.h */, + E44C45E520D262AE000583AE /* tcp_input.c */, + E44C460420D262AF000583AE /* tcp_output.c */, + E44C45EA20D262AE000583AE /* tcp_subr.c */, + E44C45F520D262AF000583AE /* tcp_timer.c */, + E44C45FA20D262AF000583AE /* tcp_timer.h */, + E44C45FB20D262AF000583AE /* tcp_var.h */, + E44C45F720D262AF000583AE /* tcp.h */, + E44C45E120D262AE000583AE /* tcpip.h */, + E44C45DC20D262AD000583AE /* tftp.c */, + E44C45DE20D262AD000583AE /* tftp.h */, + E44C45EB20D262AE000583AE /* udp.c */, + E44C45E720D262AE000583AE /* udp.h */, + E44C45E220D262AE000583AE /* VERSION */, ); name = slirp; path = ../slirp; @@ -869,10 +873,11 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { isa = PBXGroup; children = ( + E420910020D0C4FA0094654F /* SDL2.framework */, + E41936C020CFE608003A7654 /* SDL.framework */, 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, 0856D21414A9A6C6000B1711 /* IOKit.framework */, - 0856D17414A9A1A2000B1711 /* SDL.framework */, ); name = Frameworks; sourceTree = ""; @@ -934,13 +939,13 @@ isa = PBXNativeTarget; buildConfigurationList = 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */; buildPhases = ( - 0846E65E14B513DF00574779 /* Copy Frameworks */, 0856CCBD14A99E1C000B1711 /* Resources */, 0856CCBE14A99E1C000B1711 /* Sources */, 0856CCBF14A99E1C000B1711 /* Frameworks */, 082AC26A14AA5A5A00071F5E /* Run lowmem */, 08CD43CF14B7BD01009CA2A2 /* Change SDL load path */, 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */, + E413A40820CF7EF800FBE967 /* Embed Frameworks */, ); buildRules = ( ); @@ -988,7 +993,9 @@ isa = PBXResourcesBuildPhase; buildActionMask = 2147483647; files = ( + E44C460820D262B0000583AE /* VERSION in Resources */, 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, + E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */, ); runOnlyForDeploymentPostprocessing = 0; @@ -1074,11 +1081,16 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( + E44C460B20D262B0000583AE /* debug.c in Sources */, + E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, + E44C461520D262B0000583AE /* ip_output.c in Sources */, 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */, + E44C461820D262B0000583AE /* tcp_output.c in Sources */, 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, + E44C460E20D262B0000583AE /* sbuf.c in Sources */, 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, @@ -1086,58 +1098,54 @@ 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, + E44C461620D262B0000583AE /* if.c in Sources */, 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, + E44C460520D262B0000583AE /* tftp.c in Sources */, 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, + E44C460A20D262B0000583AE /* misc.c in Sources */, + E44C461120D262B0000583AE /* tcp_timer.c in Sources */, 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, E444DC1520C8F06700DD29C9 /* pict.c in Sources */, 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, + E44C460D20D262B0000583AE /* udp.c in Sources */, + E44C461420D262B0000583AE /* ip_input.c in Sources */, + E44C461320D262B0000583AE /* bootp.c in Sources */, 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, - 0856D06414A99EF1000B1711 /* SDLMain.m in Sources */, - 0856D06514A99EF1000B1711 /* video_sdl.cpp in Sources */, 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, - 0856D06714A99EF1000B1711 /* bootp.c in Sources */, - 0856D06814A99EF1000B1711 /* cksum.c in Sources */, - 0856D06A14A99EF1000B1711 /* debug.c in Sources */, - 0856D06B14A99EF1000B1711 /* if.c in Sources */, - 0856D06C14A99EF1000B1711 /* ip_icmp.c in Sources */, - 0856D06D14A99EF1000B1711 /* ip_input.c in Sources */, - 0856D06E14A99EF1000B1711 /* ip_output.c in Sources */, - 0856D06F14A99EF1000B1711 /* mbuf.c in Sources */, - 0856D07014A99EF1000B1711 /* misc.c in Sources */, - 0856D07114A99EF1000B1711 /* sbuf.c in Sources */, - 0856D07214A99EF1000B1711 /* slirp.c in Sources */, - 0856D07314A99EF1000B1711 /* socket.c in Sources */, - 0856D07414A99EF1000B1711 /* tcp_input.c in Sources */, - 0856D07514A99EF1000B1711 /* tcp_output.c in Sources */, E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, - 0856D07614A99EF1000B1711 /* tcp_subr.c in Sources */, - 0856D07714A99EF1000B1711 /* tcp_timer.c in Sources */, - 0856D07814A99EF1000B1711 /* tftp.c in Sources */, - 0856D07914A99EF1000B1711 /* udp.c in Sources */, 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, + E44C460720D262B0000583AE /* ip_icmp.c in Sources */, 0856D08714A99EF1000B1711 /* bincue_unix.cpp in Sources */, + E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */, 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, + E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */, 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */, 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */, 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */, 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */, 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */, 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, + E44C461720D262B0000583AE /* cksum.c in Sources */, 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, + E44C461020D262B0000583AE /* slirp.c in Sources */, 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, + E44C460920D262B0000583AE /* tcp_input.c in Sources */, 0856D11814A99EF1000B1711 /* video.cpp in Sources */, + E41936C420CFE64D003A7654 /* SDLMain.m in Sources */, + E44C461220D262B0000583AE /* socket.c in Sources */, 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */, + E44C460620D262B0000583AE /* mbuf.c in Sources */, 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */, 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */, 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */, @@ -1340,7 +1348,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + /Library/Frameworks/SDL2.framework/Headers, ./config/, ../Unix, ../MacOSX/Launcher, @@ -1348,6 +1356,7 @@ ../kpx_cpu/src, ../kpx_cpu/include, ../include, + ../CrossPlatform, ); INFOPLIST_FILE = Info.plist.in; INFOPLIST_PREFIX_HEADER = ""; @@ -1396,7 +1405,7 @@ GCC_WARN_UNUSED_FUNCTION = YES; GCC_WARN_UNUSED_VARIABLE = YES; HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + /Library/Frameworks/SDL2.framework/Headers, ./config/, ../Unix, ../MacOSX/Launcher, @@ -1404,6 +1413,7 @@ ../kpx_cpu/src, ../kpx_cpu/include, ../include, + ../CrossPlatform, ); INFOPLIST_EXPAND_BUILD_SETTINGS = NO; INFOPLIST_FILE = Info.plist.in; diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index da0dfabce..463ec7c25 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -734,9 +734,8 @@ int main(int argc, char **argv) // Parse command line arguments for (int i=1; i Date: Thu, 14 Jun 2018 22:03:17 +0900 Subject: [PATCH 219/534] remove keyboard shortcut of host menu --- .../project.pbxproj | 17 ----------------- SheepShaver/src/Unix/main_unix.cpp | 11 +++++++++++ 2 files changed, 11 insertions(+), 17 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index e46da6e21..141ab10fa 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -331,7 +331,6 @@ A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; - E41936C020CFE608003A7654 /* SDL.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL.framework; path = ../../../../../../Library/Frameworks/SDL.framework; sourceTree = ""; }; E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; @@ -874,7 +873,6 @@ isa = PBXGroup; children = ( E420910020D0C4FA0094654F /* SDL2.framework */, - E41936C020CFE608003A7654 /* SDL.framework */, 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, 0856D21414A9A6C6000B1711 /* IOKit.framework */, @@ -943,7 +941,6 @@ 0856CCBE14A99E1C000B1711 /* Sources */, 0856CCBF14A99E1C000B1711 /* Frameworks */, 082AC26A14AA5A5A00071F5E /* Run lowmem */, - 08CD43CF14B7BD01009CA2A2 /* Change SDL load path */, 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */, E413A40820CF7EF800FBE967 /* Embed Frameworks */, ); @@ -1032,20 +1029,6 @@ shellPath = /bin/sh; shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.4/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; }; - 08CD43CF14B7BD01009CA2A2 /* Change SDL load path */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Change SDL load path"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "install_name_tool -change @rpath/SDL.framework/Versions/A/SDL @executable_path/../Frameworks/SDL.framework/Versions/A/SDL \"${BUILT_PRODUCTS_DIR}/${EXECUTABLE_PATH}\"\n"; - }; /* End PBXShellScriptBuildPhase section */ /* Begin PBXSourcesBuildPhase section */ diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 463ec7c25..dc48ce0a8 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -700,6 +700,17 @@ static bool init_sdl() } atexit(SDL_Quit); +#if __MACOSX__ + // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, + // except that it will also install keyboard shortcuts, such as Command + Q, + // which can interfere with keyboard shortcuts in the guest OS. + // + // HACK: disable these shortcuts, while leaving all other pieces of SDL2's + // menu bar in-place. + extern void disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); + disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); +#endif + // Don't let SDL catch SIGINT and SIGTERM signals signal(SIGINT, SIG_DFL); signal(SIGTERM, SIG_DFL); From 51491dd03f7840d25f7cbcbe66a7563ead52e2b3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 15 Jun 2018 14:52:28 +0900 Subject: [PATCH 220/534] pref menu enabled --- .../BasiliskII.xcodeproj/project.pbxproj | 4 ++-- BasiliskII/src/MacOSX/utils_macosx.mm | 8 ++++++++ .../project.pbxproj | 4 ++-- SheepShaver/src/MacOSX/prefs_macosx.mm | 18 ++++++++++++++++++ 4 files changed, 30 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index aff6bfe7e..ceb924a98 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1364,7 +1364,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; @@ -1414,7 +1414,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index e5683341e..b69e4cda1 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -19,6 +19,7 @@ */ #include +#include "sysdeps.h" #include "utils_macosx.h" #include @@ -38,6 +39,13 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { for (NSMenuItem * menu_item in [NSApp mainMenu].itemArray) { if (menu_item.hasSubmenu) { for (NSMenuItem * sub_item in menu_item.submenu.itemArray) { +#ifdef SHEEPSHAVER + if ([sub_item.title isEqualToString:@"Preferences…"]) { + extern id gSheepShaverMain; + sub_item.target = gSheepShaverMain; + sub_item.action = @selector(openPreferences:); + } +#endif sub_item.keyEquivalent = @""; sub_item.keyEquivalentModifierMask = 0; } diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 141ab10fa..8ce5bbab0 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1345,7 +1345,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; OTHER_LDFLAGS = ( @@ -1403,7 +1403,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; OTHER_LDFLAGS = ( diff --git a/SheepShaver/src/MacOSX/prefs_macosx.mm b/SheepShaver/src/MacOSX/prefs_macosx.mm index e8b779242..3524e48b9 100644 --- a/SheepShaver/src/MacOSX/prefs_macosx.mm +++ b/SheepShaver/src/MacOSX/prefs_macosx.mm @@ -30,6 +30,7 @@ #include #include "VMSettingsController.h" +#include @interface SheepShaverMain : NSObject { @@ -96,12 +97,28 @@ - (void) openPreferences:(id)sender [pool release]; } +- (BOOL)validateMenuItem:(NSMenuItem *)menuItem +{ + return YES; +} + @end /* * Initialization */ +#if SDL_VERSION_ATLEAST(2,0,0) + +id gSheepShaverMain; + +void prefs_init(void) +{ + gSheepShaverMain = [[SheepShaverMain alloc] init]; +} + +#else + void prefs_init(void) { NSAutoreleasePool *pool; @@ -121,6 +138,7 @@ void prefs_init(void) [pool release]; } +#endif /* * Deinitialization From 27e9a0c79a3947716d3d6e14b12f25f69f2fd4c7 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 15 Jun 2018 16:41:45 +0900 Subject: [PATCH 221/534] delete SheepShaver/src/MacOSX/clip_macosx64.mm --- SheepShaver/src/MacOSX/clip_macosx64.mm | 1288 ----------------------- 1 file changed, 1288 deletions(-) delete mode 100644 SheepShaver/src/MacOSX/clip_macosx64.mm diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm deleted file mode 100644 index f5e7fd954..000000000 --- a/SheepShaver/src/MacOSX/clip_macosx64.mm +++ /dev/null @@ -1,1288 +0,0 @@ -/* - * clip_macosx64.mm - Clipboard handling, MacOS X (Pasteboard Manager) implementation - * - * (C) 2012 Jean-Pierre Stierlin - * (C) 2012 Alexei Svitkine - * (C) 2012 Charles Srstka - * - * 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 "sysdeps.h" -#define _UINT64 -#import -#include - -#include "clip.h" -#include "main.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "autorelease.h" -#include "pict.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef FOURCC -#define FOURCC(a,b,c,d) (((uint32)(a) << 24) | ((uint32)(b) << 16) | ((uint32)(c) << 8) | (uint32)(d)) -#endif - -#define TYPE_PICT FOURCC('P','I','C','T') -#define TYPE_TEXT FOURCC('T','E','X','T') -#define TYPE_STYL FOURCC('s','t','y','l') -#define TYPE_UTXT FOURCC('u','t','x','t') -#define TYPE_UT16 FOURCC('u','t','1','6') -#define TYPE_USTL FOURCC('u','s','t','l') -#define TYPE_MOOV FOURCC('m','o','o','v') -#define TYPE_SND FOURCC('s','n','d',' ') -#define TYPE_ICNS FOURCC('i','c','n','s') - -static NSPasteboard *g_pboard; -static NSInteger g_pb_change_count = 0; - -// Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the MacOS X side -static bool we_put_this_data = false; - -static bool should_clear = false; - -static NSMutableDictionary *g_macScrap; - -// flavor UTIs - -static NSString * const UTF16_TEXT_FLAVOR_NAME = @"public.utf16-plain-text"; -static NSString * const TEXT_FLAVOR_NAME = @"com.apple.traditional-mac-plain-text"; -static NSString * const STYL_FLAVOR_NAME = @"net.cebix.basilisk.styl-data"; - -// font face types - -enum { - FONT_FACE_PLAIN = 0, - FONT_FACE_BOLD = 1, - FONT_FACE_ITALIC = 2, - FONT_FACE_UNDERLINE = 4, - FONT_FACE_OUTLINE = 8, - FONT_FACE_SHADOW = 16, - FONT_FACE_CONDENSED = 32, - FONT_FACE_EXTENDED = 64 -}; - -// Script Manager constants - -#define smRoman 0 -#define smMacSysScript 18 -#define smMacRegionCode 40 - -static NSString *UTIForFlavor(uint32_t type) -{ - switch (type) { - case TYPE_MOOV: - return (NSString *)kUTTypeQuickTimeMovie; - case TYPE_SND: - return (NSString *)kUTTypeAudio; - case TYPE_ICNS: - return (NSString *)kUTTypeAppleICNS; - default: { - CFStringRef typeString = UTCreateStringForOSType(type); - NSString *uti = (NSString *)UTTypeCreatePreferredIdentifierForTag(kUTTagClassOSType, typeString, NULL); - - CFRelease(typeString); - - if (uti == nil || [uti hasPrefix:@"dyn."]) { - // The docs threaten that this may stop working at some unspecified point in the future. - // However, it seems to work on Lion and Mountain Lion, and there's no other way to do this - // that I can see. Most likely, whichever release eventually breaks this will probably also - // drop support for the 32-bit applications which typically use these 32-bit scrap types anyway, - // making it irrelevant. When this happens, we should include a version check for the version of - // OS X that dropped this support, and leave uti alone in that case. - - [uti release]; - uti = [[NSString alloc] initWithFormat:@"CorePasteboardFlavorType 0x%08x", type]; - } - - return [uti autorelease]; - } - } -} - -static uint32_t FlavorForUTI(NSString *uti) -{ - CFStringRef typeTag = UTTypeCopyPreferredTagWithClass((CFStringRef)uti, kUTTagClassOSType); - - if (!typeTag) - return 0; - - uint32_t type = UTGetOSTypeFromString(typeTag); - - CFRelease(typeTag); - - return type; -} - -/* - * Get current system script encoding on Mac - */ - -static int GetMacScriptManagerVariable(uint16_t varID) -{ - int ret = -1; - M68kRegisters r; - static uint8_t proc[] = { - 0x59, 0x4f, // subq.w #4,sp - 0x3f, 0x3c, 0x00, 0x00, // move.w #varID,-(sp) - 0x2f, 0x3c, 0x84, 0x02, 0x00, 0x08, // move.l #-2080243704,-(sp) - 0xa8, 0xb5, // ScriptUtil() - 0x20, 0x1f, // move.l (a7)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 4, varID); - Execute68k(proc_area, &r); - ret = r.d[0]; - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - return ret; -} - -static ScriptCode ScriptNumberForFontID(int16_t fontID) -{ - ScriptCode ret = -1; - M68kRegisters r; - static uint8_t proc[] = { - 0x55, 0x4f, // subq.w #2,sp - 0x3f, 0x3c, 0x00, 0x00, // move.w #fontID,-(sp) - 0x2f, 0x3c, 0x82, 0x02, 0x00, 0x06, // move.l #-2113798138,-(sp) - 0xa8, 0xb5, // ScriptUtil() - 0x30, 0x1f, // move.w (sp)+,d0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 4, fontID); - Execute68k(proc_area, &r); - ret = r.d[0]; - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - return ret; -} - -/* - * Get Mac's default text encoding - */ - -static TextEncoding MacDefaultTextEncoding() -{ - int script = GetMacScriptManagerVariable(smMacSysScript); - int region = GetMacScriptManagerVariable(smMacRegionCode); - TextEncoding encoding; - - if (UpgradeScriptInfoToTextEncoding(script, kTextLanguageDontCare, region, NULL, &encoding)) - encoding = kTextEncodingMacRoman; - - return encoding; -} - -static NSData *ConvertToMacTextEncoding(NSAttributedString *aStr, NSArray **styleAndScriptRuns) -{ - NSUInteger length = [aStr length]; - - NSMutableArray *styleRuns = [NSMutableArray array]; - - for (NSUInteger index = 0; index < length;) { - NSRange attrRange; - NSDictionary *attrs = [aStr attributesAtIndex:index effectiveRange:&attrRange]; - - [styleRuns addObject:[NSDictionary dictionaryWithObjectsAndKeys: - [NSNumber numberWithUnsignedInteger:index], @"offset", - attrs, @"attributes", nil]]; - - index = NSMaxRange(attrRange); - } - - UnicodeToTextRunInfo info; - - OSStatus err = CreateUnicodeToTextRunInfoByScriptCode(0, NULL, &info); - - if (err != noErr) { - if (styleAndScriptRuns) - *styleAndScriptRuns = styleRuns; - - return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - } - - unichar chars[length]; - - [[aStr string] getCharacters:chars range:NSMakeRange(0, length)]; - - ByteCount unicodeLength = length * sizeof(unichar); - ByteCount bufLen = unicodeLength * 2; - uint8_t buf[bufLen]; - ByteCount bytesRead; - - ItemCount scriptRunCount = 1601; // max number of allowed style changes - ScriptCodeRun scriptRuns[scriptRunCount]; - - ItemCount inOffsetCount = [styleRuns count]; - ByteOffset inOffsets[inOffsetCount]; - - if (inOffsetCount) { - for (NSUInteger i = 0; i < inOffsetCount; i++) { - NSDictionary *eachRun = [styleRuns objectAtIndex:i]; - - inOffsets[i] = [[eachRun objectForKey:@"offset"] unsignedLongValue] * 2; - } - } - - ItemCount offsetCount; - ByteOffset offsets[inOffsetCount]; - - err = ConvertFromUnicodeToScriptCodeRun(info, unicodeLength, chars, - kUnicodeTextRunMask | kUnicodeUseFallbacksMask | kUnicodeLooseMappingsMask, - inOffsetCount, inOffsets, &offsetCount, offsets, - bufLen, &bytesRead, &bufLen, buf, - scriptRunCount, &scriptRunCount, scriptRuns); - - if (err != noErr) { - if (styleAndScriptRuns) - *styleAndScriptRuns = styleRuns; - - return [[aStr string] dataUsingEncoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - } - - if (styleAndScriptRuns) { - NSMutableArray *runs = [NSMutableArray array]; - NSUInteger currentStyleRun = 0; - NSUInteger currentScriptRun = 0; - - for (NSUInteger currentOffset = 0; currentOffset < bufLen;) { - ScriptCodeRun scriptRun = scriptRuns[currentScriptRun]; - NSDictionary *attrs = [[styleRuns objectAtIndex:currentStyleRun] objectForKey:@"attributes"]; - - NSUInteger nextStyleOffset = (currentStyleRun < offsetCount - 1) ? offsets[currentStyleRun + 1] : bufLen; - NSUInteger nextScriptOffset = (currentScriptRun < scriptRunCount - 1) ? scriptRuns[currentScriptRun + 1].offset : bufLen; - - [runs addObject:[NSDictionary dictionaryWithObjectsAndKeys: - [NSNumber numberWithUnsignedInteger:currentOffset], @"offset", - [NSNumber numberWithShort:scriptRun.script], @"script", - attrs, @"attributes", nil]]; - - if (nextStyleOffset == nextScriptOffset) { - currentStyleRun++; - currentScriptRun++; - currentOffset = nextStyleOffset; - } else if (nextStyleOffset < nextScriptOffset) { - currentStyleRun++; - currentOffset = nextStyleOffset; - } else { - currentScriptRun++; - currentOffset = nextScriptOffset; - } - } - - *styleAndScriptRuns = runs; - } - - return [NSData dataWithBytes:buf length:bufLen]; -} - -/* - * Count all Mac font IDs on the system - */ - -static NSUInteger CountMacFonts() -{ - M68kRegisters r; - static uint8_t proc[] = { - 0x55, 0x4f, // subq.w #2,sp - 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) - 0xa9, 0x9c, // CountResources() - 0x30, 0x1f, // move.w (sp)+,D0 - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - int16_t fontCount = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - Execute68k(proc_area, &r); - - fontCount = r.d[0]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - if (fontCount < 0) { - fontCount = 0; - } - - return fontCount; -} - -/* - * Get Mac font ID at index - */ - -static int16_t MacFontIDAtIndex(NSUInteger index) -{ - M68kRegisters r; - static uint8_t get_res_handle_proc[] = { - 0x42, 0x27, // clr.b -(sp) - 0xa9, 0x9b, // SetResLoad() - 0x59, 0x4f, // subq.w #4,sp - 0x2f, 0x3c, 'F', 'O', 'N', 'D', // move.l #'FOND',-(sp) - 0x3f, 0x3c, 0, 0, // move.w #index,-(sp) - 0xa9, 0x9d, // GetIndResource() - 0x26, 0x5f, // movea.l (sp)+,A3 - 0x1f, 0x3c, 0x00, 0x01, // move.b #1,-(sp) - 0xa9, 0x9b, // SetResLoad() - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(get_res_handle_proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - uint32_t res_handle = 0; - int16_t fontID = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, get_res_handle_proc, sizeof(get_res_handle_proc)); - WriteMacInt16(proc_area + 14, (uint16_t)(index + 1)); - - Execute68k(proc_area, &r); - - res_handle = r.a[3]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr() - } - - if (res_handle) { - static uint8_t get_info_proc[] = { - 0x2f, 0x0a, // move.l A2,-(sp) - 0x2f, 0x0b, // move.l A3,-(sp) - 0x42, 0xa7, // clr.l -(sp) - 0x42, 0xa7, // clr.l -(sp) - 0xa9, 0xa8, // GetResInfo() - 0x2f, 0x0a, // move.l A2,-(sp) - 0xa9, 0xa3, // ReleaseResource() - M68K_RTS >> 8, M68K_RTS & 0xff, - 0, 0 - }; - - r.d[0] = sizeof(get_info_proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, get_info_proc, sizeof(get_info_proc)); - r.a[2] = res_handle; - r.a[3] = proc_area + 16; - - Execute68k(proc_area, &r); - - fontID = ReadMacInt16(proc_area + 16); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr() - } - } - - return fontID; -} - -/* - * List all font IDs on the system - */ - -static NSArray *ListMacFonts() -{ - NSUInteger fontCount = CountMacFonts(); - NSMutableArray *fontIDs = [NSMutableArray array]; - - for (NSUInteger i = 0; i < fontCount; i++) { - int16_t eachFontID = MacFontIDAtIndex(i); - - [fontIDs addObject:[NSNumber numberWithShort:eachFontID]]; - } - - return fontIDs; -} - -/* - * List all font IDs having a certain script - */ - -static NSArray *ListMacFontsForScript(ScriptCode script) -{ - NSMutableArray *fontIDs = [NSMutableArray array]; - - for (NSNumber *eachFontIDNum in ListMacFonts()) { - if (ScriptNumberForFontID([eachFontIDNum shortValue]) == script) - [fontIDs addObject:eachFontIDNum]; - } - - return fontIDs; -} - -/* - * Convert Mac font ID to font name - */ - -static NSString *FontNameFromFontID(int16_t fontID) -{ - M68kRegisters r; - r.d[0] = 256; // Str255: 255 characters + length byte - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t name_area = r.a[0]; - - if (!name_area) - return nil; - - uint8_t proc[] = { - 0x3f, 0x3c, 0, 0, // move.w #fontID,-(sp) - 0x2f, 0x0a, // move.l A2,-(sp) - 0xa8, 0xff, // GetFontName() - M68K_RTS >> 8, M68K_RTS & 0xff - }; - - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt16(proc_area + 2, fontID); - r.a[2] = name_area; - Execute68k(proc_area, &r); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - uint8_t * const namePtr = Mac2HostAddr(name_area); - - NSString *name = (NSString *)CFStringCreateWithPascalString(kCFAllocatorDefault, namePtr, kCFStringEncodingMacRoman); - - r.a[0] = name_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - return [name autorelease]; -} - -/* - * Convert font name to Mac font ID - */ - -static int16_t FontIDFromFontName(NSString *fontName) -{ - M68kRegisters r; - r.d[0] = 256; // Str255: 255 characters + length byte - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t name_area = r.a[0]; - - if (!name_area) - return 0; - - uint8_t * const namePtr = Mac2HostAddr(name_area); - - CFStringGetPascalString((CFStringRef)fontName, namePtr, 256, kCFStringEncodingMacRoman); - - uint8_t proc[] = { - 0x2f, 0x0a, // move.l A2,-(sp) - 0x2f, 0x0b, // move.l A3,-(sp) - 0xa9, 0x00, // GetFNum() - M68K_RTS >> 8, M68K_RTS & 0xff, - 0, 0 - }; - - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - int16_t fontID = 0; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - r.a[2] = name_area; - r.a[3] = proc_area + 8; - - Execute68k(proc_area, &r); - - fontID = ReadMacInt16(proc_area + 8); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } - - r.a[0] = name_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - return fontID; -} - -/* - * Get font ID in desired script if possible; otherwise, try to get some font in the desired script. - */ - -static int16_t FontIDFromFontNameAndScript(NSString *fontName, ScriptCode script) -{ - int16_t fontID = FontIDFromFontName(fontName); - - if (ScriptNumberForFontID(fontID) == script) - return fontID; - - NSArray *fontIDs = ListMacFontsForScript(script); - - if ([fontIDs count] == 0) - return fontID; // no fonts are going to work; might as well return the original one - - if (fontName) { - // look for a localized version of our font; e.g. "Helvetica CE" if our font is Helvetica - for (NSNumber *eachFontIDNum in fontIDs) { - int16_t eachFontID = [eachFontIDNum shortValue]; - - if ([FontNameFromFontID(eachFontID) hasPrefix:fontName]) - return eachFontID; - } - } - - // Give up and just return a font that will work - return [[fontIDs objectAtIndex:0] shortValue]; -} - -/* - * Convert Mac TEXT/styl to attributed string - */ - -static NSAttributedString *AttributedStringFromMacTEXTAndStyl(NSData *textData, NSData *stylData) -{ - NSMutableAttributedString *aStr = [[[NSMutableAttributedString alloc] init] autorelease]; - - if (aStr == nil) - return nil; - - const uint8_t *bytes = (const uint8_t *)[stylData bytes]; - NSUInteger length = [stylData length]; - - if (length < 2) - return nil; - - uint16_t elements = CFSwapInt16BigToHost(*(uint16_t *)bytes); - const NSUInteger elementSize = 20; - - if (length < elements * elementSize) - return nil; - - NSUInteger cursor = 2; - - for (NSUInteger i = 0; i < elements; i++) AUTORELEASE_POOL { - int32_t startChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); cursor += 4; - int16_t height __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - int16_t ascent __attribute__((unused)) = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - int16_t fontID = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint8_t face = bytes[cursor]; cursor += 2; - int16_t size = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t red = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t green = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - uint16_t blue = CFSwapInt16BigToHost(*(int16_t *)&bytes[cursor]); cursor += 2; - - int32_t nextChar; - - if (i + 1 == elements) - nextChar = [textData length]; - else - nextChar = CFSwapInt32BigToHost(*(int32_t *)(bytes + cursor)); - - NSMutableDictionary *attrs = [[NSMutableDictionary alloc] init]; - NSColor *color = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:1.0]; - NSFont *font; - TextEncoding encoding; - - if (fontID == 0) { // System font - CGFloat fontSize = (size == 0) ? [NSFont systemFontSize] : (CGFloat)size; - font = [NSFont systemFontOfSize:fontSize]; - } else if (fontID == 1) { // Application font - font = [NSFont userFontOfSize:(CGFloat)size]; - } else { - NSString *fontName = FontNameFromFontID(fontID); - font = [NSFont fontWithName:fontName size:(CGFloat)size]; - - if (font == nil) { - // Convert localized variants of fonts; e.g. "Helvetica CE" to "Helvetica" - - NSRange wsRange = [fontName rangeOfCharacterFromSet:[NSCharacterSet whitespaceCharacterSet] options:NSBackwardsSearch]; - - if (wsRange.length) { - fontName = [fontName substringToIndex:wsRange.location]; - font = [NSFont fontWithName:fontName size:(CGFloat)size]; - } - } - } - - if (font == nil) - font = [NSFont userFontOfSize:(CGFloat)size]; - - if (UpgradeScriptInfoToTextEncoding(ScriptNumberForFontID(fontID), kTextLanguageDontCare, kTextRegionDontCare, NULL, &encoding)) - encoding = MacDefaultTextEncoding(); - - NSFontManager *fm = [NSFontManager sharedFontManager]; - - if (face & FONT_FACE_BOLD) - font = [fm convertFont:font toHaveTrait:NSBoldFontMask]; - - if (face & FONT_FACE_ITALIC) - font = [fm convertFont:font toHaveTrait:NSItalicFontMask]; - - if (face & FONT_FACE_CONDENSED) - font = [fm convertFont:font toHaveTrait:NSCondensedFontMask]; - - if (face & FONT_FACE_EXTENDED) - font = [fm convertFont:font toHaveTrait:NSExpandedFontMask]; - - [attrs setObject:font forKey:NSFontAttributeName]; - - if (face & FONT_FACE_UNDERLINE) - [attrs setObject:[NSNumber numberWithInteger:NSUnderlineStyleSingle] forKey:NSUnderlineStyleAttributeName]; - - if (face & FONT_FACE_OUTLINE) { - [attrs setObject:color forKey:NSStrokeColorAttributeName]; - [attrs setObject:[NSNumber numberWithInteger:3] forKey:NSStrokeWidthAttributeName]; - } - - if (face & FONT_FACE_SHADOW) { - NSShadow *shadow = [[NSShadow alloc] init]; - NSColor *shadowColor = [NSColor colorWithDeviceRed:(CGFloat)red / 65535.0 green:(CGFloat)green / 65535.0 blue:(CGFloat)blue / 65535.0 alpha:0.5]; - - [shadow setShadowColor:shadowColor]; - [shadow setShadowOffset:NSMakeSize(2, -2.0)]; - - [attrs setObject:shadow forKey:NSShadowAttributeName]; - - [shadow release]; - } - - [attrs setObject:color forKey:NSForegroundColorAttributeName]; - - NSData *partialData = [textData subdataWithRange:NSMakeRange(startChar, nextChar - startChar)]; - NSString *partialString = [[NSString alloc] initWithData:partialData encoding:CFStringConvertEncodingToNSStringEncoding(encoding)]; - - if (partialString) { - NSAttributedString *partialAttribString = [[NSAttributedString alloc] initWithString:partialString attributes:attrs]; - - [aStr appendAttributedString:partialAttribString]; - - [partialAttribString release]; - } - - [partialString release]; - [attrs release]; - } - - return aStr; -} - -/* - * Append styl data for one text run - */ - -static void AppendStylRunData(NSMutableData *stylData, NSDictionary *attrs, ScriptCode script) -{ - NSFontManager *fontManager = [NSFontManager sharedFontManager]; - NSLayoutManager *layoutManager = [[NSLayoutManager alloc] init]; - - NSFont *font = [attrs objectForKey:NSFontAttributeName]; - NSColor *color = [[attrs objectForKey:NSForegroundColorAttributeName] colorUsingColorSpaceName:NSDeviceRGBColorSpace device:nil]; - NSFontTraitMask traits = [fontManager traitsOfFont:font]; - NSNumber *underlineStyle = [attrs objectForKey:NSUnderlineStyleAttributeName]; - NSNumber *strokeWidth = [attrs objectForKey:NSStrokeWidthAttributeName]; - NSShadow *shadow = [attrs objectForKey:NSShadowAttributeName]; - - int16_t hostFontID = FontIDFromFontNameAndScript([font familyName], script); - - if (hostFontID == 0) { - hostFontID = [font isFixedPitch] ? 4 /* Monaco */ : 1 /* Application font */; - } - - int16_t height = CFSwapInt16HostToBig((int16_t)rint([layoutManager defaultLineHeightForFont:font])); - int16_t ascent = CFSwapInt16HostToBig((int16_t)rint([font ascender])); - int16_t fontID = CFSwapInt16HostToBig(hostFontID); - uint8_t face = 0; - int16_t size = CFSwapInt16HostToBig((int16_t)rint([font pointSize])); - uint16_t red = CFSwapInt16HostToBig((int16_t)rint([color redComponent] * 65535.0)); - uint16_t green = CFSwapInt16HostToBig((int16_t)rint([color greenComponent] * 65535.0)); - uint16_t blue = CFSwapInt16HostToBig((int16_t)rint([color blueComponent] * 65535.0)); - - if (traits & NSBoldFontMask) { - face |= FONT_FACE_BOLD; - } - - if (traits & NSItalicFontMask) { - face |= FONT_FACE_ITALIC; - } - - if (traits & NSCondensedFontMask) { - face |= FONT_FACE_CONDENSED; - } - - if (traits & NSExpandedFontMask) { - face |= FONT_FACE_EXTENDED; - } - - if (underlineStyle && [underlineStyle integerValue] != NSUnderlineStyleNone) { - face |= FONT_FACE_UNDERLINE; - } - - if (strokeWidth && [strokeWidth doubleValue] > 0.0) { - face |= FONT_FACE_OUTLINE; - } - - if (shadow) { - face |= FONT_FACE_SHADOW; - } - - [stylData appendBytes:&height length:2]; - [stylData appendBytes:&ascent length:2]; - [stylData appendBytes:&fontID length:2]; - [stylData appendBytes:&face length:1]; - [stylData increaseLengthBy:1]; - [stylData appendBytes:&size length:2]; - [stylData appendBytes:&red length:2]; - [stylData appendBytes:&green length:2]; - [stylData appendBytes:&blue length:2]; - - [layoutManager release]; -} - -/* - * Convert attributed string to TEXT/styl - */ - -static NSData *ConvertToMacTEXTAndStyl(NSAttributedString *aStr, NSData **outStylData) -{ - // Limitations imposed by the Mac TextEdit system. - const NSUInteger charLimit = 32 * 1024; - const NSUInteger elementLimit = 1601; - - NSUInteger length = [aStr length]; - - if (length > charLimit) { - aStr = [aStr attributedSubstringFromRange:NSMakeRange(0, charLimit)]; - } - - NSArray *runs = nil; - - NSData *textData = ConvertToMacTextEncoding(aStr, &runs); - - NSMutableData *stylData = [NSMutableData dataWithLength:2]; // number of styles to be filled in at the end - - NSUInteger elements = 0; - - for (NSDictionary *eachRun in runs) { - if (elements >= elementLimit) - break; - - NSUInteger offset = [[eachRun objectForKey:@"offset"] unsignedIntegerValue]; - ScriptCode script = [[eachRun objectForKey:@"script"] shortValue]; - NSDictionary *attrs = [eachRun objectForKey:@"attributes"]; - - if (![attrs count]) continue; - - int32_t startChar = CFSwapInt32HostToBig((int32_t)offset); - [stylData appendBytes:&startChar length:4]; - - AppendStylRunData(stylData, attrs, script); - - elements++; - } - - uint16_t bigEndianElements = CFSwapInt16HostToBig((uint16_t)elements); - - [stylData replaceBytesInRange:NSMakeRange(0, 2) withBytes:&bigEndianElements length:2]; - - if (outStylData) - *outStylData = stylData; - - return textData; -} - -/* - * Get data of a particular flavor from the pasteboard - */ - -static NSData *DataFromPasteboard(NSPasteboard *pboard, NSString *flavor) -{ - return [pboard dataForType:flavor]; -} - -/* - * Convert Mac TEXT/styl to RTF - */ - -static void WriteMacTEXTAndStylToPasteboard(NSPasteboard *pboard, NSData *textData, NSData *stylData) -{ - NSMutableAttributedString *aStr = [AttributedStringFromMacTEXTAndStyl(textData, stylData) mutableCopy]; - - if (!aStr) { - NSString *string = [[NSString alloc] initWithData:textData encoding:CFStringConvertEncodingToNSStringEncoding(MacDefaultTextEncoding())]; - - if (!string) - return; - - aStr = [[NSMutableAttributedString alloc] initWithString:string attributes:nil]; - - [string release]; - } - - // fix line endings - [[aStr mutableString] replaceOccurrencesOfString:@"\r" withString:@"\n" options:NSLiteralSearch range:NSMakeRange(0, [aStr length])]; - - [pboard writeObjects:[NSArray arrayWithObject:aStr]]; - - [aStr release]; -} - -/* - * Convert RTF to Mac TEXT/styl - */ - -static NSData *MacTEXTAndStylDataFromPasteboard(NSPasteboard *pboard, NSData **outStylData) -{ - NSMutableAttributedString *aStr; - - NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSAttributedString class]] options:nil]; - - if ([objs count]) { - aStr = [[objs objectAtIndex:0] mutableCopy]; - } else { - objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSString class]] options:nil]; - - if (![objs count]) - return nil; - - aStr = [[NSMutableAttributedString alloc] initWithString:[objs objectAtIndex:0]]; - } - - // fix line endings - [[aStr mutableString] replaceOccurrencesOfString:@"\n" withString:@"\r" options:NSLiteralSearch range:NSMakeRange(0, [[aStr mutableString] length])]; - - NSData *stylData = nil; - NSData *textData = ConvertToMacTEXTAndStyl(aStr, &stylData); - - [aStr release]; - - if (outStylData) - *outStylData = stylData; - - return textData; -} - -/* - * Initialization - */ - -void ClipInit(void) -{ - g_pboard = [[NSPasteboard generalPasteboard] retain]; - if (!g_pboard) { - D(bug("could not create Pasteboard\n")); - } - - g_macScrap = [[NSMutableDictionary alloc] init]; -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ - [g_pboard release]; - g_pboard = nil; - - [g_macScrap release]; - g_macScrap = nil; -} - -/* - * Convert an NSImage to PICT format. - */ - -static NSData *ConvertImageToPICT(NSImage *image) { - if ([[image representations] count] == 0) { - return nil; - } - - NSImageRep *rep = [[image representations] objectAtIndex:0]; - NSUInteger width; - NSUInteger height; - - if ([rep isKindOfClass:[NSBitmapImageRep class]]) { - width = [rep pixelsWide]; - height = [rep pixelsHigh]; - } else { - width = lrint([image size].width); - height = lrint([image size].height); - } - - // create a new bitmap image rep in our desired format, following the advice here: - // https://developer.apple.com/library/mac/#releasenotes/Cocoa/AppKitOlderNotes.html#X10_6Notes - - NSBitmapImageRep *bitmap = [[NSBitmapImageRep alloc] initWithBitmapDataPlanes:NULL - pixelsWide:width - pixelsHigh:height - bitsPerSample:8 - samplesPerPixel:4 - hasAlpha:YES - isPlanar:NO - colorSpaceName:NSCalibratedRGBColorSpace - bytesPerRow:width * 4 - bitsPerPixel:32]; - - [NSGraphicsContext saveGraphicsState]; - [NSGraphicsContext setCurrentContext:[NSGraphicsContext graphicsContextWithBitmapImageRep:bitmap]]; - [rep draw]; - [NSGraphicsContext restoreGraphicsState]; - - unsigned char *rgba = [bitmap bitmapData]; - - long bufSize = ConvertRGBAToPICT(NULL, 0, rgba, width, height); - - NSData *pictData = nil; - - if (bufSize > 0) { - uint8_t *buf = (uint8_t *)malloc(bufSize); - - long pictSize = ConvertRGBAToPICT(buf, bufSize, rgba, width, height); - - if (pictSize > 0) - pictData = [NSData dataWithBytes:buf length:pictSize]; - - free(buf); - } - - [bitmap release]; - - return pictData; -} - -/* - * Convert any images that may be on the clipboard to PICT format if possible. - */ - -static NSData *MacPICTDataFromPasteboard(NSPasteboard *pboard) -{ - // check if there's any PICT data on the pasteboard - NSData *pictData = DataFromPasteboard(pboard, (NSString *)kUTTypePICT); - - if (pictData) - return pictData; - - // now check to see if any images on the pasteboard have PICT representations - NSArray *objs = [pboard readObjectsForClasses:[NSArray arrayWithObject:[NSImage class]] options:nil]; - - for (NSImage *eachImage in objs) { - for (NSImageRep *eachRep in [eachImage representations]) { - - if ([eachRep isKindOfClass:[NSPICTImageRep class]]) - return [(NSPICTImageRep *)eachRep PICTRepresentation]; - } - } - - // Give up and perform the conversion ourselves - if ([objs count]) - return ConvertImageToPICT([objs objectAtIndex:0]); - - // If none of that worked, sorry, we're out of options - return nil; -} - -/* - * Zero Mac clipboard - */ - -static void ZeroMacClipboard() -{ - D(bug("Zeroing Mac clipboard\n")); - M68kRegisters r; - static uint8_t proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0xa9, 0xfc, // ZeroScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - Execute68k(proc_area, &r); - - [g_macScrap removeAllObjects]; - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } -} - -/* - * Write data to Mac clipboard - */ - -static void WriteDataToMacClipboard(NSData *pbData, uint32_t type) -{ - D(bug("Writing data %s to Mac clipboard with type '%c%c%c%c'\n", [[pbData description] UTF8String], - (type >> 24) & 0xff, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff)); - - if ([pbData length] == 0) - return; - - NSNumber *typeNum = [NSNumber numberWithInteger:type]; - - if ([g_macScrap objectForKey:typeNum]) { - // the classic Mac OS can't have more than one object of the same type on the clipboard - return; - } - - // Allocate space for new scrap in MacOS side - M68kRegisters r; - r.d[0] = [pbData length]; - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t scrap_area = r.a[0]; - - // Get the native clipboard data - if (scrap_area) { - uint8_t * const data = Mac2HostAddr(scrap_area); - - memcpy(data, [pbData bytes], [pbData length]); - - // Add new data to clipboard - static uint8_t proc[] = { - 0x59, 0x8f, // subq.l #4,sp - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #length,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #type,-(sp) - 0x2f, 0x3c, 0, 0, 0, 0, // move.l #outbuf,-(sp) - 0xa9, 0xfe, // PutScrap() - 0x58, 0x8f, // addq.l #4,sp - M68K_RTS >> 8, M68K_RTS & 0xff - }; - r.d[0] = sizeof(proc); - Execute68kTrap(0xa71e, &r); // NewPtrSysClear() - uint32_t proc_area = r.a[0]; - - if (proc_area) { - Host2Mac_memcpy(proc_area, proc, sizeof(proc)); - WriteMacInt32(proc_area + 4, [pbData length]); - WriteMacInt32(proc_area + 10, type); - WriteMacInt32(proc_area + 16, scrap_area); - we_put_this_data = true; - Execute68k(proc_area, &r); - - r.a[0] = proc_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - - [g_macScrap setObject:pbData forKey:typeNum]; - } - - r.a[0] = scrap_area; - Execute68kTrap(0xa01f, &r); // DisposePtr - } -} - -/* - * Take all the data on host pasteboard and convert it to something the Mac understands if possible - */ - -static void ConvertHostPasteboardToMacScrap() -{ - D(bug("ConvertHostPasteboardToMacScrap\n")); - - ZeroMacClipboard(); - - NSData *stylData = nil; - NSData *textData = MacTEXTAndStylDataFromPasteboard(g_pboard, &stylData); - - if (textData) { - if (stylData && [stylData length] > 2) - WriteDataToMacClipboard(stylData, TYPE_STYL); - - WriteDataToMacClipboard(textData, TYPE_TEXT); - } - - NSData *pictData = MacPICTDataFromPasteboard(g_pboard); - - if (pictData) - WriteDataToMacClipboard(pictData, TYPE_PICT); - - for (NSString *eachType in [g_pboard types]) { - if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeText)) { - // text types are already handled - continue; - } - - if (UTTypeConformsTo((CFStringRef)eachType, kUTTypeImage)) { - // image types are already handled - continue; - } - - uint32_t type = FlavorForUTI(eachType); - - // skip styl and ustl as well; those fall under text, which is handled already - if (!type || type == TYPE_STYL || type == TYPE_USTL) - continue; - - WriteDataToMacClipboard(DataFromPasteboard(g_pboard, eachType), type); - } -} - -/* - * Take all the data on the Mac clipbord and convert it to something the host pasteboard understands if possible - */ - -static void ConvertMacScrapToHostPasteboard() -{ - D(bug("ConvertMacScrapToHostPasteboard\n")); - - BOOL wroteText = NO; - - [g_pboard clearContents]; - - for (NSNumber *eachTypeNum in g_macScrap) AUTORELEASE_POOL { - uint32_t eachType = [eachTypeNum integerValue]; - - if (eachType == TYPE_TEXT || eachType == TYPE_STYL || eachType == TYPE_UTXT || eachType == TYPE_UT16 || eachType == TYPE_USTL) { - if (wroteText) - continue; - - NSData *textData; - NSData *stylData; - - textData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_TEXT]]; - stylData = [g_macScrap objectForKey:[NSNumber numberWithInteger:TYPE_STYL]]; - - if (textData) { - WriteMacTEXTAndStylToPasteboard(g_pboard, textData, stylData); - wroteText = YES; - } - - // sometime, it might be interesting to write a converter for utxt/ustl if possible - - continue; - } - - NSData *pbData = [g_macScrap objectForKey:eachTypeNum]; - - if (pbData) { - NSString *typeStr = UTIForFlavor(eachType); - - if (!typeStr) - continue; - - [g_pboard setData:pbData forType:typeStr]; - } - } -} - -/* - * Check whether the pasteboard has changed since our last check; if it has, write it to the emulated pasteboard - */ - -static void ConvertHostPasteboardToMacScrapIfChanged() -{ - if (!g_pboard) - return; - - if ([g_pboard changeCount] > g_pb_change_count) { - ConvertHostPasteboardToMacScrap(); - g_pb_change_count = [g_pboard changeCount]; - } -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32_t type, int32_t offset) -{ - D(bug("GetScrap handle %p, type %4.4s, offset %d\n", handle, (char *)&type, offset)); - - AUTORELEASE_POOL { - ConvertHostPasteboardToMacScrapIfChanged(); - } -} - -/* - * ZeroScrap() is called before a Mac application writes to the clipboard; clears out the previous contents - */ - -void ZeroScrap() -{ - D(bug("ZeroScrap\n")); - - we_put_this_data = false; - - // Defer clearing the host pasteboard until the Mac tries to put something on it. - // This prevents us from clearing the pasteboard when ZeroScrap() is called during startup. - should_clear = true; -} - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32_t type, void *scrap, int32_t length) -{ - D(bug("PutScrap type %4.4s, data %p, length %ld\n", (char *)&type, scrap, (long)length)); - - AUTORELEASE_POOL { - if (!g_pboard) - return; - - if (we_put_this_data) { - we_put_this_data = false; - return; - } - - if (length <= 0) - return; - - if (should_clear) { - [g_macScrap removeAllObjects]; - should_clear = false; - } - - NSData *pbData = [NSData dataWithBytes:scrap length:length]; - if (!pbData) - return; - - [g_macScrap setObject:pbData forKey:[NSNumber numberWithInteger:type]]; - - ConvertMacScrapToHostPasteboard(); - - // So that our PutScrap() patch won't bounce the data we just wrote back to the Mac clipboard - g_pb_change_count = [g_pboard changeCount]; - } -} From 51e08e9b7645dbd1262156148d6e64e514d81a95 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 15 Jun 2018 16:47:07 +0900 Subject: [PATCH 222/534] BII clipboard-exchange enabled --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 8 ++++---- BasiliskII/src/MacOSX/clip_macosx64.mm | 8 +++++--- SheepShaver/src/MacOSX/clip_macosx64.mm | 1 + 3 files changed, 10 insertions(+), 7 deletions(-) create mode 120000 SheepShaver/src/MacOSX/clip_macosx64.mm diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index ceb924a98..e367c437a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -89,7 +89,6 @@ 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2331F23B32A006B2DF2 /* tunconfig */; }; 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; - 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */; }; 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; @@ -125,6 +124,7 @@ E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E413D93520D260DA00E437D8 /* SDL2.framework */; }; E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; + E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -341,7 +341,6 @@ 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; 7539E27E1F23BEB4006B2DF2 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; - 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = clip_dummy.cpp; sourceTree = ""; }; 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_dummy.cpp; sourceTree = ""; }; 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; @@ -400,6 +399,7 @@ E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; + E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -603,6 +603,7 @@ 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, + E490334D20D3A5890012DD5F /* clip_macosx64.mm */, 7539E00A1F23B25A006B2DF2 /* Credits.html */, E413D93920D2614E00E437D8 /* extfs_macosx.cpp */, 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, @@ -797,7 +798,6 @@ 7539E2811F23C52C006B2DF2 /* dummy */ = { isa = PBXGroup; children = ( - 7539E2851F23C56F006B2DF2 /* clip_dummy.cpp */, 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */, 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, @@ -1036,7 +1036,6 @@ 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, E413D93320D260BC00E437D8 /* cksum.c in Sources */, E413D92920D260BC00E437D8 /* udp.c in Sources */, - 7539E28E1F23C56F006B2DF2 /* clip_dummy.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, @@ -1100,6 +1099,7 @@ 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, E413D92C20D260BC00E437D8 /* slirp.c in Sources */, 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, + E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */, 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, E413D92520D260BC00E437D8 /* tcp_input.c in Sources */, diff --git a/BasiliskII/src/MacOSX/clip_macosx64.mm b/BasiliskII/src/MacOSX/clip_macosx64.mm index 23261890a..f5e7fd954 100644 --- a/BasiliskII/src/MacOSX/clip_macosx64.mm +++ b/BasiliskII/src/MacOSX/clip_macosx64.mm @@ -234,8 +234,8 @@ static TextEncoding MacDefaultTextEncoding() [[aStr string] getCharacters:chars range:NSMakeRange(0, length)]; - NSUInteger unicodeLength = length * sizeof(unichar); - NSUInteger bufLen = unicodeLength * 2; + ByteCount unicodeLength = length * sizeof(unichar); + ByteCount bufLen = unicodeLength * 2; uint8_t buf[bufLen]; ByteCount bytesRead; @@ -807,6 +807,8 @@ static void AppendStylRunData(NSMutableData *stylData, NSDictionary *attrs, Scri ScriptCode script = [[eachRun objectForKey:@"script"] shortValue]; NSDictionary *attrs = [eachRun objectForKey:@"attributes"]; + if (![attrs count]) continue; + int32_t startChar = CFSwapInt32HostToBig((int32_t)offset); [stylData appendBytes:&startChar length:4]; @@ -1124,7 +1126,7 @@ static void ConvertHostPasteboardToMacScrap() NSData *textData = MacTEXTAndStylDataFromPasteboard(g_pboard, &stylData); if (textData) { - if (stylData) + if (stylData && [stylData length] > 2) WriteDataToMacClipboard(stylData, TYPE_STYL); WriteDataToMacClipboard(textData, TYPE_TEXT); diff --git a/SheepShaver/src/MacOSX/clip_macosx64.mm b/SheepShaver/src/MacOSX/clip_macosx64.mm new file mode 120000 index 000000000..18640812d --- /dev/null +++ b/SheepShaver/src/MacOSX/clip_macosx64.mm @@ -0,0 +1 @@ +../../../BasiliskII/src/MacOSX/clip_macosx64.mm \ No newline at end of file From 8d89152b793f7901041aaa6e1ac92893695f10c0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 15 Jun 2018 21:57:59 +0900 Subject: [PATCH 223/534] set current directory --- BasiliskII/src/MacOSX/utils_macosx.mm | 6 ++++++ BasiliskII/src/Unix/main_unix.cpp | 5 +++++ SheepShaver/src/Unix/main_unix.cpp | 5 +++++ 3 files changed, 16 insertions(+) diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index b69e4cda1..59cd0f1d9 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -75,3 +75,9 @@ void set_menu_bar_visible_osx(bool visible) { [NSMenu setMenuBarVisible:(visible ? YES : NO)]; } + +void set_current_directory() +{ + chdir([[[[NSBundle mainBundle] bundlePath] stringByDeletingLastPathComponent] UTF8String]); +} + diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index aba9bddbb..9d8da4814 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -658,6 +658,11 @@ int main(int argc, char **argv) D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); +#if __MACOSX__ + extern void set_current_directory(); + set_current_directory(); +#endif + // Get rom file path from preferences const char *rom_path = PrefsFindString("rom"); diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index dc48ce0a8..a09713867 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -1005,6 +1005,11 @@ int main(int argc, char **argv) goto quit; } +#if __MACOSX__ + extern void set_current_directory(); + set_current_directory(); +#endif + // Load Mac ROM if (!load_mac_rom()) goto quit; From f053fda3c863d8c2769ca8537613c36b80e609aa Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 16 Jun 2018 13:33:13 +0900 Subject: [PATCH 224/534] fix for sheepvm --- BasiliskII/src/MacOSX/utils_macosx.mm | 2 ++ SheepShaver/src/Unix/main_unix.cpp | 38 ++++++++++++++++++++++----- 2 files changed, 34 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index 59cd0f1d9..a0a0d01cd 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -78,6 +78,8 @@ void set_menu_bar_visible_osx(bool visible) void set_current_directory() { + NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; chdir([[[[NSBundle mainBundle] bundlePath] stringByDeletingLastPathComponent] UTF8String]); + [pool release]; } diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index a09713867..e30ca984f 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -124,6 +124,7 @@ #ifdef USE_SDL #include +#include #endif #ifndef USE_SDL_VIDEO @@ -673,6 +674,9 @@ static bool install_signal_handlers(void) } #ifdef USE_SDL + +static std::string sdl_vmdir; + static bool init_sdl() { int sdl_flags = 0; @@ -700,6 +704,18 @@ static bool init_sdl() } atexit(SDL_Quit); +#if SDL_VERSION_ATLEAST(2,0,0) + for (int i = 0; i < 100; i++) { + SDL_Event event; + SDL_PollEvent(&event); + if (event.type == SDL_DROPFILE) { + sdl_vmdir = event.drop.file; + break; + } + SDL_Delay(1); + } +#endif + #if __MACOSX__ // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, // except that it will also install keyboard shortcuts, such as Command + Q, @@ -743,6 +759,22 @@ int main(int argc, char **argv) #endif #endif +#ifdef USE_SDL + // Initialize SDL system + if (!init_sdl()) + goto quit; +#if SDL_VERSION_ATLEAST(2,0,0) + if (valid_vmdir(sdl_vmdir.c_str())) { + vmdir = sdl_vmdir.c_str(); + printf("Using %s as vmdir.\n", vmdir); + if (chdir(vmdir)) { + printf("Failed to chdir to %s. Good bye.", vmdir); + exit(1); + } + } +#endif +#endif + // Parse command line arguments for (int i=1; i Date: Sat, 16 Jun 2018 17:38:57 +0900 Subject: [PATCH 225/534] host menu re-correct --- SheepShaver/src/Unix/main_unix.cpp | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index e30ca984f..2020f2d5f 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -716,17 +716,6 @@ static bool init_sdl() } #endif -#if __MACOSX__ - // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, - // except that it will also install keyboard shortcuts, such as Command + Q, - // which can interfere with keyboard shortcuts in the guest OS. - // - // HACK: disable these shortcuts, while leaving all other pieces of SDL2's - // menu bar in-place. - extern void disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); - disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); -#endif - // Don't let SDL catch SIGINT and SIGTERM signals signal(SIGINT, SIG_DFL); signal(SIGTERM, SIG_DFL); @@ -838,6 +827,17 @@ int main(int argc, char **argv) // Read preferences PrefsInit(vmdir, argc, argv); +#if __MACOSX__ + // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, + // except that it will also install keyboard shortcuts, such as Command + Q, + // which can interfere with keyboard shortcuts in the guest OS. + // + // HACK: disable these shortcuts, while leaving all other pieces of SDL2's + // menu bar in-place. + extern void disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); + disable_SDL2_macosx_menu_bar_keyboard_shortcuts(); +#endif + // Any command line arguments left? for (int i=1; i Date: Sat, 16 Jun 2018 21:42:43 +0900 Subject: [PATCH 226/534] fixed initial chdir --- SheepShaver/src/Unix/main_unix.cpp | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 2020f2d5f..9c503e246 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -748,6 +748,11 @@ int main(int argc, char **argv) #endif #endif +#if __MACOSX__ + extern void set_current_directory(); + set_current_directory(); +#endif + #ifdef USE_SDL // Initialize SDL system if (!init_sdl()) @@ -1031,11 +1036,6 @@ int main(int argc, char **argv) goto quit; } -#if __MACOSX__ - extern void set_current_directory(); - set_current_directory(); -#endif - // Load Mac ROM if (!load_mac_rom()) goto quit; From 7a3b70153cb7fee23b8c01e75f033157fa1cfa81 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 16 Jun 2018 23:45:04 +0900 Subject: [PATCH 227/534] Embed SDL2.framework --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++++ .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 4 ++++ 2 files changed, 8 insertions(+) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index e367c437a..4d3b28685 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -124,6 +124,7 @@ E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E413D93520D260DA00E437D8 /* SDL2.framework */; }; E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; + E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; /* End PBXBuildFile section */ @@ -165,6 +166,7 @@ dstPath = ""; dstSubfolderSpec = 10; files = ( + E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */, ); name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -399,6 +401,7 @@ E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; + E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; /* End PBXFileReference section */ @@ -523,6 +526,7 @@ 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; children = ( + E4150D1320D559800077C51A /* SDL2.framework */, 7539E1E41F23B25E006B2DF2 /* src */, 753252FF1F535E5D0024025B /* generated src */, 7539DFB31F23B17E006B2DF2 /* Products */, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 8ce5bbab0..29801c5db 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -81,6 +81,7 @@ 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; + E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; @@ -135,6 +136,7 @@ dstPath = ""; dstSubfolderSpec = 10; files = ( + E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */, ); name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; @@ -331,6 +333,7 @@ A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; + E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; @@ -437,6 +440,7 @@ 0856CCAC14A99DE0000B1711 = { isa = PBXGroup; children = ( + E4150D1120D557820077C51A /* SDL2.framework */, 0856CCC814A99E30000B1711 /* Sources */, 08CD42DF14B7B865009CA2A2 /* Frameworks */, 0856CCC214A99E1C000B1711 /* Products */, From 1393625c15f7d1e19f8fa532583609be30193a3b Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 17 Jun 2018 00:01:06 +0900 Subject: [PATCH 228/534] search path for embedded framework --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 29801c5db..d1ac84aa6 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1349,6 +1349,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; @@ -1407,6 +1408,7 @@ INFOPLIST_PREFIX_HEADER = ""; INFOPLIST_PREPROCESS = NO; INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; From 7f8ddaeacf7634ebc3232c8c8380166ab66db114 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 18 Jun 2018 18:42:19 +0900 Subject: [PATCH 229/534] in case using SDL1 fix merge error of configure.ac --- .../BasiliskII.xcodeproj/project.pbxproj | 12 +++- BasiliskII/src/MacOSX/utils_macosx.mm | 3 +- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/Unix/configure.ac | 17 +++-- BasiliskII/src/Unix/main_unix.cpp | 2 +- .../project.pbxproj | 4 +- SheepShaver/src/Unix/configure.ac | 64 ++++++++++++++----- SheepShaver/src/Unix/main_unix.cpp | 2 +- 8 files changed, 75 insertions(+), 31 deletions(-) mode change 100755 => 100644 BasiliskII/src/Unix/configure.ac mode change 100755 => 100644 SheepShaver/src/Unix/configure.ac diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 4d3b28685..fc8eb26c0 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -101,6 +101,7 @@ 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; + E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8FB20D260B900E437D8 /* ip_icmp.c */; }; @@ -357,6 +358,8 @@ 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; + E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; + E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; E413D8F920D260B900E437D8 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = mbuf.c; sourceTree = ""; }; E413D8FA20D260B900E437D8 /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tftp.h; sourceTree = ""; }; @@ -624,12 +627,14 @@ 7539E0711F23B25A006B2DF2 /* SDL */ = { isa = PBXGroup; children = ( - 752F27021F242F51001032B4 /* xpram_sdl.cpp */, - 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, 7539E0731F23B25A006B2DF2 /* keycodes */, + 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, + E40CEEC420D7910D00BCB88D /* SDLMain.h */, + E40CEEC520D7910E00BCB88D /* SDLMain.m */, 75CBCF761F5DB65E00830063 /* video_sdl.cpp */, 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, + 752F27021F242F51001032B4 /* xpram_sdl.cpp */, ); name = SDL; path = ../SDL; @@ -1041,6 +1046,7 @@ E413D93320D260BC00E437D8 /* cksum.c in Sources */, E413D92920D260BC00E437D8 /* udp.c in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, + E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, @@ -1403,7 +1409,7 @@ GCC_DYNAMIC_NO_PIC = YES; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = fast; + GCC_OPTIMIZATION_LEVEL = 3; GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index a0a0d01cd..e62843dc3 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -35,6 +35,8 @@ void NSAutoReleasePool_wrap(void (*fn)(void)) [pool release]; } +#if SDL_VERSION_ATLEAST(2,0,0) + void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { for (NSMenuItem * menu_item in [NSApp mainMenu].itemArray) { if (menu_item.hasSubmenu) { @@ -53,7 +55,6 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { } } -#if SDL_VERSION_ATLEAST(2,0,0) bool is_fullscreen_osx(SDL_Window * window) { if (!window) { diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 599a27ad9..d8bd40fff 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -88,7 +88,7 @@ static int display_type = DISPLAY_WINDOW; // See enum above #endif // Constants -#ifdef WIN32 +#if defined(WIN32) || __MACOSX__ const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac old mode 100755 new mode 100644 index ff200e128..c2aaec955 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -225,11 +225,11 @@ dnl We use mon if possible. MONSRCS= if [[ "x$WANT_MON" = "xyes" ]]; then AC_MSG_CHECKING(for mon) - mon_srcdir=../../../mon/src + mon_srcdir=../../../cxmon/src if grep mon_init $mon_srcdir/mon.h >/dev/null 2>/dev/null; then AC_MSG_RESULT(yes) AC_DEFINE(ENABLE_MON, 1, [Define if using "mon".]) - MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c $mon_srcdir/disass/mips-dis.c $mon_srcdir/disass/mips-opc.c $mon_srcdir/disass/mips16-opc.c" + MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c" CXXFLAGS="$CXXFLAGS -I$mon_srcdir -I$mon_srcdir/disass" AC_CHECK_LIB(ncurses, tgetent, , [AC_CHECK_LIB(termcap, tgetent, , @@ -353,8 +353,8 @@ else SDL_SUPPORT="none" fi -dnl We need X11, if not using SDL. -if [[ "x$WANT_SDL_VIDEO" = "xno" ]]; then +dnl We need X11, if not using SDL or Mac GUI. +if [[ "x$WANT_SDL_VIDEO" = "xno" -a "x$WANT_MACOSX_GUI" = "xno" ]]; then AC_PATH_XTRA if [[ "x$no_x" = "xyes" ]]; then AC_MSG_ERROR([You need X11 to run Basilisk II.]) @@ -369,10 +369,12 @@ AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) AS_IF([test "x$have_bincue" = "xyes" ], [ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then DEFINES="$DEFINES -DBINCUE" + AC_SUBST(USE_BINCUE, yes) else AC_MSG_ERROR([You need SDL Audio to use BINCUE support.]) + AC_SUBST(USE_BINCUE, no) fi -]) +], [AC_SUBST(USE_BINCUE, no)]) dnl LIBVHD AS_IF([test "x$with_libvhd" = "xyes" ], [have_libvhd=yes], [have_libvhd=no]) @@ -934,6 +936,9 @@ dnl Check that the host supports TUN/TAP devices AC_CACHE_CHECK([whether TUN/TAP is supported], ac_cv_tun_tap_support, [ AC_TRY_COMPILE([ + #ifdef HAVE_SYS_SOCKET_H + #include + #endif #if defined(HAVE_LINUX_IF_H) && defined(HAVE_LINUX_IF_TUN_H) #include #include @@ -1326,7 +1331,7 @@ AC_TRANSLATE_DEFINE(HAVE_SIGCONTEXT_SUBTERFUGE, "$ac_cv_have_sigcontext_hack", dnl Resolve and set the proper sigsegv_recovery method... -if [[ "x$ac_cv_have_win32_exceptions" = "xyes" ]]; then +if [[ "x$ac_cv_have_mach_exceptions" = "xyes" ]]; then sigsegv_recovery=mach elif [[ "x$ac_cv_have_win32_exceptions" = "xyes" ]]; then sigsegv_recovery=win32 diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 9d8da4814..b409c2221 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -535,7 +535,7 @@ int main(int argc, char **argv) } atexit(SDL_Quit); -#if __MACOSX__ +#if __MACOSX__ && SDL_VERSION_ATLEAST(2,0,0) // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, // except that it will also install keyboard shortcuts, such as Command + Q, // which can interfere with keyboard shortcuts in the guest OS. diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index d1ac84aa6..f238e91a5 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1311,7 +1311,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; COPY_PHASE_STRIP = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; GCC_CW_ASM_SYNTAX = NO; @@ -1368,7 +1368,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; COPY_PHASE_STRIP = NO; DEAD_CODE_STRIPPING = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac old mode 100755 new mode 100644 index 4663f90d1..d5147dba0 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -46,7 +46,7 @@ AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [d esac], [WANT_GTK="gtk2 gtk"]) AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=yes]) -AC_ARG_WITH(dgcc, [ --with-dgcc=COMPILER use C++ COMPILER to compile synthetic opcodes], [DYNGEN_CC=$withval]) +AC_ARG_WITH(dgcc, [ --with-dgcc=COMPILER use C++ COMPILER to compile synthetic opcodes or 'precompiled'], [DYNGEN_CC=$withval]) AC_ARG_WITH(bincue, AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) @@ -695,10 +695,12 @@ AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) AS_IF([test "x$have_bincue" = "xyes" ], [ if [[ "xOSX_CORE_AUDIO" = "xno" -a "x$WANT_SDL_AUDIO"="xno" ]]; then AC_MSG_ERROR([You need SDL or OSX Core Audio to use BINCUE support.]) + AC_SUBST(USE_BINCUE, no) else CPPFLAGS="$CPPFLAGS -DBINCUE $OSX_CORE_AUDIO" + AC_SUBST(USE_BINCUE, yes) fi -]) +], [AC_SUBST(USE_BINCUE, no)]) dnl LIBVHD AS_IF([test "x$with_libvhd" = "xyes" ], [have_libvhd=yes], [have_libvhd=no]) @@ -1467,6 +1469,17 @@ AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ >= 3) [AC_MSG_RESULT(yes); HAVE_GCC30=yes], [AC_MSG_RESULT(no)]) +dnl Check for GCC 4.0 or higher. +HAVE_GCC40=no +AC_MSG_CHECKING(for GCC 4.0 or higher) +AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#if ! (__GNUC__ >= 4) + # error gcc < 4 + typedef syntax error; + #endif + ]])], + [AC_MSG_RESULT(yes); HAVE_GCC40=yes], + [AC_MSG_RESULT(no)]) + dnl Check for ICC. AC_MSG_CHECKING(for ICC) HAVE_ICC=no @@ -1539,6 +1552,7 @@ if [[ "x$EMULATED_PPC" = "xyes" ]]; then dnl Enable JIT compiler, if possible if [[ "x$WANT_JIT" = "xyes" ]]; then + ac_cv_use_dyngen_precompiled=no AC_CACHE_CHECK([whether dyngen can be used], ac_cv_use_dyngen, [ case $host_cpu:$ac_cv_object_format in @@ -1569,20 +1583,30 @@ if [[ "x$EMULATED_PPC" = "xyes" ]]; then esac dnl Check for a suitable synthetic opcodes compiler (icc is faking itself as gcc 3.2.2) if [[ -z "$DYNGEN_CC" ]]; then - if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_ICC" = "xno" ]]; then + if [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_GCC40" = "xno" -a "x$HAVE_ICC" = "xno" ]]; then DYNGEN_CC=$CXX - else - for p in /usr/bin /usr/local/bin /usr/freeware/bin; do - gxx="$p/g++" - if [[ -x "$gxx" ]]; then - DYNGEN_CC="$gxx" - fi - done + elif command -v g++ >/dev/null; then + vers=`g++ -dumpversion` + function version { echo "$@" | awk -F. '{ printf("%d%03d%03d%03d\n", $1,$2,$3,$4); }'; } + if [[ $(version $vers) -ge $(version "2.7.0") ]] && [[ $(version $vers) -lt $(version "4.0.0") ]]; then + DYNGEN_CC="$gxx" + fi fi fi - if [[ -z "$DYNGEN_CC" ]]; then - ac_cv_use_dyngen=no + if [[ -z "$DYNGEN_CC" -o "x$DYNGEN_CC" = "xprecompiled" ]]; then + case $host_cpu in + i?86) + ac_cv_use_dyngen_precompiled=yes + ;; + x86_64) + ac_cv_use_dyngen_precompiled=yes + ;; + *) + ac_cv_use_dyngen=no + ;; + esac fi + if [[ "x$ac_cv_use_dyngen_precompiled" = "xyes" ]]; then DYNGEN_CC=precompiled; fi ]) if [[ "x$ac_cv_use_dyngen" = "xyes" ]]; then case $host_cpu in @@ -1599,10 +1623,17 @@ if [[ "x$EMULATED_PPC" = "xyes" ]]; then ;; esac have_dyngen_gcc3=no - case "x`$DYNGEN_CC -dumpversion`" in - x[12].*) ;; - x*) have_dyngen_gcc3=yes ;; - esac + if [[ "$DYNGEN_CC" != "precompiled" ]]; then + case "x`$DYNGEN_CC -dumpversion`" in + x[12].*) ;; + x*) have_dyngen_gcc3=yes ;; + esac + else + case "x`$CXX -dumpversion`" in + x[12].*) ;; + x*) have_dyngen_gcc3=yes ;; + esac + fi if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-align-functions" else @@ -1686,6 +1717,7 @@ AC_TRANSLATE_DEFINE(HAVE_LINKER_SCRIPT, "$ac_cv_linker_script_works", dnl Generate Makefile. AC_SUBST(PERL) AC_SUBST(USE_DYNGEN, [$ac_cv_use_dyngen]) +AC_SUBST(USE_DYNGEN_PRECOMPILED, [$ac_cv_use_dyngen_precompiled]) AC_SUBST(DYNGENSRCS) AC_SUBST(DYNGEN_CC) AC_SUBST(DYNGEN_CFLAGS) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 9c503e246..4f025563d 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -832,7 +832,7 @@ int main(int argc, char **argv) // Read preferences PrefsInit(vmdir, argc, argv); -#if __MACOSX__ +#if __MACOSX__ && SDL_VERSION_ATLEAST(2,0,0) // On Mac OS X hosts, SDL2 will create its own menu bar. This is mostly OK, // except that it will also install keyboard shortcuts, such as Command + Q, // which can interfere with keyboard shortcuts in the guest OS. From 418d92dafebd7e1a65513229a44f7b9554026ba0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 19 Jun 2018 13:36:27 +0900 Subject: [PATCH 230/534] BII buildable --- BasiliskII/src/Windows/Makefile.in | 2 +- BasiliskII/src/Windows/configure.ac | 12 ++++++------ BasiliskII/src/Windows/sysdeps.h | 6 ++++++ BasiliskII/src/Windows/util_windows.cpp | 3 ++- SheepShaver/Makefile | 3 +-- 5 files changed, 16 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index dfa59a60e..f1a9c4438 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -40,7 +40,7 @@ CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform @CPUINCLUDES@ -I../slirp DEFS = @DEFS@ @DEFINES@ LDFLAGS = @LDFLAGS@ -LIBS = @LIBS@ -lwsock32 -liphlpapi +LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ HOST_CC = gcc diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index fc9027047..f02c4b5ce 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -131,7 +131,7 @@ AC_CACHE_CHECK([whether VirtualProtect works], #define HAVE_WIN32_VM 1 #define CONFIGURE_TEST_VM_MAP #define TEST_VM_PROT_$test_def - #include "../Unix/vm_alloc.cpp" + #include "../CrossPlatform/vm_alloc.cpp" ], ac_cv_VirtualProtect_works=no, rm -f core, dnl When cross-compiling, assume it works ac_cv_VirtualProtect_works="yes" @@ -141,7 +141,7 @@ AC_CACHE_CHECK([whether VirtualProtect works], #define HAVE_WIN32_VM 1 #define CONFIGURE_TEST_VM_MAP #define TEST_VM_PROT_RDWR_WRITE - #include "../Unix/vm_alloc.cpp" + #include "../CrossPlatform/vm_alloc.cpp" ], , ac_cv_VirtualProtect_works=no, dnl When cross-compiling, assume it works ac_cv_VirtualProtect_works="yes" @@ -163,8 +163,8 @@ AC_CACHE_CHECK([whether your system supports Windows exceptions], AC_TRY_RUN([ #define HAVE_WIN32_EXCEPTIONS 1 #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" + #include "../CrossPlatform/vm_alloc.cpp" + #include "../CrossPlatform/sigsegv.cpp" ], ac_cv_have_win32_exceptions=yes, ac_cv_have_win32_exceptions=no, @@ -188,8 +188,8 @@ AC_CACHE_CHECK([whether we can skip instruction in SIGSEGV handler], AC_TRY_RUN([ #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 #define CONFIGURE_TEST_SIGSEGV_RECOVERY - #include "../Unix/vm_alloc.cpp" - #include "../Unix/sigsegv.cpp" + #include "../CrossPlatform/vm_alloc.cpp" + #include "../CrossPlatform/sigsegv.cpp" ], ac_cv_have_skip_instruction=yes, ac_cv_have_skip_instruction=no, dnl When cross-compiling, do not assume anything. ac_cv_have_skip_instruction=no diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h index 3f11226f0..3085a3104 100755 --- a/BasiliskII/src/Windows/sysdeps.h +++ b/BasiliskII/src/Windows/sysdeps.h @@ -21,6 +21,10 @@ #ifndef SYSDEPS_H #define SYSDEPS_H +#ifdef __MINGW32__ +#define _UNICODE +#endif + #if !defined _MSC_VER && !defined __STDC__ #error "Your compiler is not ANSI. Get a real one." #endif @@ -318,6 +322,8 @@ static inline uae_u32 do_byteswap_16_g(uae_u32 v) #ifdef _MSC_VER #define ATTRIBUTE_PACKED +#else +#define ATTRIBUTE_PACKED __attribute__((__packed__)) #endif #endif diff --git a/BasiliskII/src/Windows/util_windows.cpp b/BasiliskII/src/Windows/util_windows.cpp index 28ef4ab99..f719bd6fd 100755 --- a/BasiliskII/src/Windows/util_windows.cpp +++ b/BasiliskII/src/Windows/util_windows.cpp @@ -271,7 +271,8 @@ bool check_drivers(void) else { TCHAR str[256]; _sntprintf(str, lengthof(str), TEXT("The CD-ROM driver file \"%s\" is missing."), path); - WarningAlert(str); + //WarningAlert(str); + } return true; diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index c9914745f..b29b1f9d4 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -49,8 +49,7 @@ $(SRCARCHIVE): $(SRCS) $(DOCS) # Links to Basilisk II sources # links: - mkdir -p src/CrossPlatform - mkdir -p src/Unix/Irix + (cd src/Windows; if [ ! -e m4 ]; then ln -s ../../../BasiliskII/src/Unix/m4; fi) @list='adb.cpp audio.cpp cdrom.cpp disk.cpp extfs.cpp pict.c \ prefs.cpp scsi.cpp sony.cpp xpram.cpp \ include/adb.h include/audio.h include/audio_defs.h \ From 0e06d9358b286a9fc3f26a2691969e7ab13be27c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 19 Jun 2018 19:07:14 +0900 Subject: [PATCH 231/534] refactor pref menu --- BasiliskII/src/MacOSX/utils_macosx.mm | 7 ------- SheepShaver/src/MacOSX/prefs_macosx.mm | 26 ++++++++++---------------- 2 files changed, 10 insertions(+), 23 deletions(-) diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index e62843dc3..2cfbd8d79 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -41,13 +41,6 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { for (NSMenuItem * menu_item in [NSApp mainMenu].itemArray) { if (menu_item.hasSubmenu) { for (NSMenuItem * sub_item in menu_item.submenu.itemArray) { -#ifdef SHEEPSHAVER - if ([sub_item.title isEqualToString:@"Preferences…"]) { - extern id gSheepShaverMain; - sub_item.target = gSheepShaverMain; - sub_item.action = @selector(openPreferences:); - } -#endif sub_item.keyEquivalent = @""; sub_item.keyEquivalentModifierMask = 0; } diff --git a/SheepShaver/src/MacOSX/prefs_macosx.mm b/SheepShaver/src/MacOSX/prefs_macosx.mm index 3524e48b9..4f91cdbb7 100644 --- a/SheepShaver/src/MacOSX/prefs_macosx.mm +++ b/SheepShaver/src/MacOSX/prefs_macosx.mm @@ -108,25 +108,21 @@ - (BOOL)validateMenuItem:(NSMenuItem *)menuItem * Initialization */ -#if SDL_VERSION_ATLEAST(2,0,0) - -id gSheepShaverMain; - void prefs_init(void) { - gSheepShaverMain = [[SheepShaverMain alloc] init]; -} - + NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; +#if SDL_VERSION_ATLEAST(2,0,0) + for (NSMenuItem *sub_item in [NSApp mainMenu].itemArray[0].submenu.itemArray) { + if ([sub_item.title isEqualToString:@"Preferences…"]) { + sub_item.target = [[SheepShaverMain alloc] init]; + sub_item.action = @selector(openPreferences:); + break; + } + } #else - -void prefs_init(void) -{ - NSAutoreleasePool *pool; NSMenu *appMenu; NSMenuItem *menuItem; - pool = [[NSAutoreleasePool alloc] init]; - appMenu = [[[NSApp mainMenu] itemAtIndex:0] submenu]; menuItem = [[NSMenuItem alloc] initWithTitle:@"Preferences..." action:@selector(openPreferences:) keyEquivalent:@","]; [appMenu insertItem:menuItem atIndex:2]; @@ -134,12 +130,10 @@ void prefs_init(void) [menuItem release]; [NSApp setDelegate:[[SheepShaverMain alloc] init]]; - +#endif [pool release]; } -#endif - /* * Deinitialization */ From 226f667b36c9bce1529f5a8b7aead48cabf25316 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 20 Jun 2018 10:26:37 +0900 Subject: [PATCH 232/534] mingw32 JIT build (but crashes) --- SheepShaver/src/Windows/Makefile.in | 45 +++++++++++++++++++---------- 1 file changed, 30 insertions(+), 15 deletions(-) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 673580d5b..63ac3d7f5 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -35,7 +35,7 @@ CC = @CC@ CXX = @CXX@ CFLAGS = @CFLAGS@ $(SDL_CFLAGS) CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp +CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp -I../Unix/dyngen_precompiled DEFS = @DEFS@ LDFLAGS = @LDFLAGS@ -static-libgcc -static-libstdc++ -Wl,-Bstatic -lstdc++ -Wl,-Bdynamic #TODO remove pthread part of that if irrelevant @@ -177,20 +177,35 @@ DYNGEN = dyngen.exe ifeq ($(USE_DYNGEN),yes) DYNGENDEPS = basic-dyngen-ops.hpp ppc-dyngen-ops.hpp -$(DYNGEN): $(DYNGENOBJS) - $(HOST_CXX) -o $@ $(LDFLAGS) $(DYNGENOBJS) - -$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp -$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< - -$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp -$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp - $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) - ./$(DYNGEN) -o $@ $< +### + +basic-dyngen-ops.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops.hpp basic-dyngen-ops-x86_32.hpp basic-dyngen-ops-x86_64.hpp + cp -f $< $@ +basic-dyngen-ops-x86_32.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops-x86_32.hpp + cp -f $< $@ +basic-dyngen-ops-x86_64.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp + cp -f $< $@ +ppc-dyngen-ops.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops.hpp ppc-dyngen-ops-x86_32.hpp ppc-dyngen-ops-x86_64.hpp + cp -f $< $@ +ppc-dyngen-ops-x86_32.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp + cp -f $< $@ +ppc-dyngen-ops-x86_64.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp + cp -f $< $@ +# Only GCC is supported for generating synthetic opcodes +#$(DYNGEN): $(DYNGENOBJS) +# $(HOST_CXX) -o $@ $(LDFLAGS) $(DYNGENOBJS) + +#$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp +#$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp +# $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ +#basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) +# ./$(DYNGEN) -o $@ $< + +#$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp +#$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp +# $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ +#ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) +# ./$(DYNGEN) -o $@ $< $(OBJ_DIR)/sheepshaver_glue.o $(OBJ_DIR)/ppc-cpu.o $(OBJ_DIR)/ppc-decode.o $(OBJ_DIR)/ppc-translate.o $(OBJ_DIR)/ppc-jit.o: basic-dyngen-ops.hpp ppc-dyngen-ops.hpp endif From 6039a60549dd7ef815115417c1ada3aa52bc50d3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 20 Jun 2018 21:26:11 +0900 Subject: [PATCH 233/534] fix merge error --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/Windows/main_windows.cpp | 40 ++------ BasiliskII/src/slirp/slirp.h | 116 +++++++++++++++--------- 3 files changed, 79 insertions(+), 79 deletions(-) mode change 100644 => 100755 BasiliskII/src/slirp/slirp.h diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index d8bd40fff..7bc43fe2a 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -2235,7 +2235,7 @@ static int redraw_func(void *arg) // Wait next += VIDEO_REFRESH_DELAY; - uint64 delay = int32(next - GetTicks_usec()); + int32 delay = int32(next - GetTicks_usec()); if (delay > 0) Delay_usec(delay); else if (delay < -VIDEO_REFRESH_DELAY) diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 2629c4b7f..184a2dc65 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -212,26 +212,6 @@ int main(int argc, char **argv) char str[256]; bool cd_boot = false; - // Redirect stdout and stderr to a log file, for diagnostic purposes. - // Unbuffered file IO will be used (setup via setvbuf() calls), so as - // to write log file data ASAP, lest it get lost in case of program - // termination. - wchar_t logFileName[4096]; - logFileName[0] = L'\0'; - _wgetcwd(logFileName, SDL_arraysize(logFileName)); - if (logFileName[0] != L'\0') { - SDL_wcslcat(logFileName, L"\\BasiliskII_log.txt", SDL_arraysize(logFileName)); - FILE * fp; - fp = _wfreopen(logFileName, L"w", stdout); - if (fp) { - setvbuf(stdout, NULL, _IONBF, 0); - } - fp = _wfreopen(logFileName, L"w", stderr); - if (fp) { - setvbuf(stderr, NULL, _IONBF, 0); - } - } - // Initialize variables RAMBaseHost = NULL; ROMBaseHost = NULL; @@ -303,6 +283,10 @@ int main(int argc, char **argv) QuitEmulator(); #endif + // FIXME: default to DIB driver + if (getenv("SDL_VIDEODRIVER") == NULL) + putenv("SDL_VIDEODRIVER=windib"); + // Initialize SDL system int sdl_flags = 0; #ifdef USE_SDL_VIDEO @@ -416,7 +400,7 @@ int main(int argc, char **argv) emul_thread = GetCurrentThread(); // SDL threads available, start 60Hz thread - tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, "Redraw Thread", NULL)) != NULL); + tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL)) != NULL); if (!tick_thread_active) { sprintf(str, GetString(STR_TICK_THREAD_ERR), strerror(errno)); ErrorAlert(str); @@ -426,7 +410,7 @@ int main(int argc, char **argv) // Start XPRAM watchdog thread memcpy(last_xpram, XPRAM, XPRAM_SIZE); - xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, "XPRAM Thread", NULL)) != NULL); + xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL)) != NULL); D(bug("XPRAM thread started\n")); // Start 68k and jump to ROM boot routine @@ -641,21 +625,11 @@ static int tick_func(void *arg) #ifdef USE_SDL_VIDEO #include -extern SDL_Window *sdl_window; HWND GetMainWindowHandle(void) { SDL_SysWMinfo wmInfo; SDL_VERSION(&wmInfo.version); - if (!sdl_window) { - return NULL; - } - if (!SDL_GetWindowWMInfo(sdl_window, &wmInfo)) { - return NULL; - } - if (wmInfo.subsystem != SDL_SYSWM_WINDOWS) { - return NULL; - } - return wmInfo.info.win.window; + return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; } #endif diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h old mode 100644 new mode 100755 index 81a49dd2e..3f9428af7 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -28,6 +28,7 @@ typedef unsigned long ioctlsockopt_t; #define _WIN32_WINNT 0x501 #endif #endif +//# include # include # include @@ -50,6 +51,12 @@ INT WSAAPI inet_pton( # include # define USE_FIONBIO 1 +# define EWOULDBLOCK WSAEWOULDBLOCK +# define EINPROGRESS WSAEINPROGRESS +# define ENOTCONN WSAENOTCONN +# define EHOSTUNREACH WSAEHOSTUNREACH +# define ENETUNREACH WSAENETUNREACH +# define ECONNREFUSED WSAECONNREFUSED /* Basilisk II Router defines those */ # define udp_read_completion slirp_udp_read_completion @@ -155,23 +162,32 @@ typedef u_int32_t uint32; #include #endif +#ifndef _P +#ifndef NO_PROTOTYPES +# define _P(x) x +#else +# define _P(x) () +#endif +#endif + + #ifdef GETTIMEOFDAY_ONE_ARG #define gettimeofday(x, y) gettimeofday(x) #endif /* Systems lacking strdup() definition in . */ #if defined(ultrix) -char *strdup(const char *); +char *strdup _P((const char *)); #endif /* Systems lacking malloc() definition in . */ #if defined(ultrix) || defined(hcx) -void *malloc(size_t arg); -void free(void *ptr); +void *malloc _P((size_t arg)); +void free _P((void *ptr)); #endif #ifndef HAVE_INET_ATON -int inet_aton(const char *cp, struct in_addr *ia); +int inet_aton _P((const char *cp, struct in_addr *ia)); #endif #include @@ -209,7 +225,11 @@ int inet_aton(const char *cp, struct in_addr *ia); #include #endif +#ifdef __STDC__ #include +#else +#include +#endif #include @@ -268,38 +288,38 @@ extern struct ttys *ttys_unit[MAX_INTERFACES]; #endif #ifndef FULL_BOLT -void if_start(void); +void if_start _P((void)); #else -void if_start(struct ttys *); +void if_start _P((struct ttys *)); #endif #ifdef BAD_SPRINTF # define vsprintf vsprintf_len # define sprintf sprintf_len - extern int vsprintf_len(char *, const char *, va_list); - extern int sprintf_len(char *, const char *, ...); + extern int vsprintf_len _P((char *, const char *, va_list)); + extern int sprintf_len _P((char *, const char *, ...)); #endif #ifdef DECLARE_SPRINTF # ifndef BAD_SPRINTF - extern int vsprintf(char *, const char *, va_list); + extern int vsprintf _P((char *, const char *, va_list)); # endif - extern int vfprintf(FILE *, const char *, va_list); + extern int vfprintf _P((FILE *, const char *, va_list)); #endif #ifndef HAVE_STRERROR - extern char *strerror(int error); + extern char *strerror _P((int error)); #endif #ifndef HAVE_INDEX - char *index(const char *, int); + char *index _P((const char *, int)); #endif #ifndef HAVE_GETHOSTID - long gethostid(void); + long gethostid _P((void)); #endif -void lprint(const char *, ...); +void lprint _P((const char *, ...)); extern int do_echo; @@ -321,47 +341,48 @@ extern int do_echo; int cksum(struct mbuf *m, int len); /* if.c */ -void if_init(void); -void if_output(struct socket *, struct mbuf *); +void if_init _P((void)); +void if_output _P((struct socket *, struct mbuf *)); /* ip_input.c */ -void ip_init(void); -void ip_input(struct mbuf *); -struct ip * ip_reass(register struct ipasfrag *, register struct ipq *); -void ip_freef(struct ipq *); -void ip_enq(register struct ipasfrag *, register struct ipasfrag *); -void ip_deq(register struct ipasfrag *); -void ip_slowtimo(void); -void ip_stripoptions(register struct mbuf *, struct mbuf *); +void ip_init _P((void)); +void ip_input _P((struct mbuf *)); +static struct ip * +ip_reass(register struct ip *ip, register struct ipq *); +void ip_freef _P((struct ipq *)); +void ip_enq _P((register struct ipasfrag *, register struct ipasfrag *)); +void ip_deq _P((register struct ipasfrag *)); +void ip_slowtimo _P((void)); +void ip_stripoptions _P((register struct mbuf *, struct mbuf *)); /* ip_output.c */ -int ip_output(struct socket *, struct mbuf *); +int ip_output _P((struct socket *, struct mbuf *)); /* tcp_input.c */ -int tcp_reass(register struct tcpcb *, register struct tcpiphdr *, struct mbuf *); -void tcp_input(register struct mbuf *, int, struct socket *); -void tcp_dooptions(struct tcpcb *, u_char *, int, struct tcpiphdr *); -void tcp_xmit_timer(register struct tcpcb *, int); -u_int tcp_mss(register struct tcpcb *, u_int); +int tcp_reass _P((register struct tcpcb *, register struct tcpiphdr *, struct mbuf *)); +void tcp_input _P((register struct mbuf *, int, struct socket *)); +void tcp_dooptions _P((struct tcpcb *, u_char *, int, struct tcpiphdr *)); +void tcp_xmit_timer _P((register struct tcpcb *, int)); +int tcp_mss _P((register struct tcpcb *, u_int)); /* tcp_output.c */ -int tcp_output(register struct tcpcb *); -void tcp_setpersist(register struct tcpcb *); +int tcp_output _P((register struct tcpcb *)); +void tcp_setpersist _P((register struct tcpcb *)); /* tcp_subr.c */ -void tcp_init(void); -void tcp_template(struct tcpcb *); -void tcp_respond(struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int); -struct tcpcb * tcp_newtcpcb(struct socket *); -struct tcpcb * tcp_close(register struct tcpcb *); -void tcp_drain(void); -void tcp_sockclosed(struct tcpcb *); -int tcp_fconnect(struct socket *); -void tcp_connect(struct socket *); -int tcp_attach(struct socket *); -u_int8_t tcp_tos(struct socket *); -int tcp_emu(struct socket *, struct mbuf *); -int tcp_ctl(struct socket *); +void tcp_init _P((void)); +void tcp_template _P((struct tcpcb *)); +void tcp_respond _P((struct tcpcb *, register struct tcpiphdr *, register struct mbuf *, tcp_seq, tcp_seq, int)); +struct tcpcb * tcp_newtcpcb _P((struct socket *)); +struct tcpcb * tcp_close _P((register struct tcpcb *)); +void tcp_drain _P((void)); +void tcp_sockclosed _P((struct tcpcb *)); +int tcp_fconnect _P((struct socket *)); +void tcp_connect _P((struct socket *)); +int tcp_attach _P((struct socket *)); +u_int8_t tcp_tos _P((struct socket *)); +int tcp_emu _P((struct socket *, struct mbuf *)); +int tcp_ctl _P((struct socket *)); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #ifdef USE_PPP @@ -377,4 +398,9 @@ struct tcpcb *tcp_drop(struct tcpcb *tp, int err); #define max(x,y) ((x) > (y) ? (x) : (y)) #endif +#ifdef _WIN32 +#undef errno +#define errno (WSAGetLastError()) +#endif + #endif From a76069f879abcc28e802492ae8f34e8fa301fc6a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 21 Jun 2018 15:21:56 +0900 Subject: [PATCH 234/534] View menu removed --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 3 +++ BasiliskII/src/MacOSX/utils_macosx.mm | 4 ++++ SheepShaver/src/MacOSX/Info.plist.in | 8 +------- SheepShaver/src/Unix/main_unix.cpp | 3 ++- 4 files changed, 10 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index fc8eb26c0..9c8bd000b 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1375,11 +1375,13 @@ INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; + ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; + VALID_ARCHS = x86_64; WARNING_CFLAGS = ""; }; name = Debug; @@ -1430,6 +1432,7 @@ PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; + VALID_ARCHS = x86_64; WARNING_CFLAGS = ""; }; name = Release; diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index 2cfbd8d79..c68d21150 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -45,6 +45,10 @@ void disable_SDL2_macosx_menu_bar_keyboard_shortcuts() { sub_item.keyEquivalentModifierMask = 0; } } + if ([menu_item.title isEqualToString:@"View"]) { + [[NSApp mainMenu] removeItem:menu_item]; + break; + } } } diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index 1324ba8b6..73791ccbe 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -39,18 +39,12 @@ LSArchitecturePriority - i386 x86_64 - ppc LSMinimumSystemVersionByArchitecture - i386 - 10.4.0 x86_64 - 10.6.0 - ppc - 10.4.0 + 10.7.0 diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 4f025563d..74f818361 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -705,7 +705,8 @@ static bool init_sdl() atexit(SDL_Quit); #if SDL_VERSION_ATLEAST(2,0,0) - for (int i = 0; i < 100; i++) { + const int SDL_EVENT_TIMEOUT = 100; + for (int i = 0; i < SDL_EVENT_TIMEOUT; i++) { SDL_Event event; SDL_PollEvent(&event); if (event.type == SDL_DROPFILE) { From 9c0886b2b835a17a99146b209d8392b3282eeefd Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 21 Jun 2018 22:55:35 +0900 Subject: [PATCH 235/534] set version to 2.5 --- .../project.pbxproj | 126 +----------------- .../src/MacOSX/config/config-macosx-x86_64.h | 4 +- 2 files changed, 9 insertions(+), 121 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index f238e91a5..8ed25ba67 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -84,7 +84,6 @@ E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; - E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */ = {isa = PBXBuildFile; fileRef = E4302EE21FBFE7FA00A5B500 /* lowmem.c */; }; E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; @@ -113,13 +112,6 @@ /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ - 082AC26714AA5A4800071F5E /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 0856CCAE14A99DE0000B1711 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 082AC25114AA59B600071F5E; - remoteInfo = lowmem; - }; 0846E4A614B1253500574779 /* PBXContainerItemProxy */ = { isa = PBXContainerItemProxy; containerPortal = 0856CCAE14A99DE0000B1711 /* Project object */; @@ -152,7 +144,6 @@ 08163337158C121000C449F9 /* dis-asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dis-asm.h"; sourceTree = ""; }; 08163338158C121000C449F9 /* ppc-dis.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = "ppc-dis.c"; sourceTree = ""; }; 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; - 082AC25214AA59B600071F5E /* lowmem */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = lowmem; sourceTree = BUILT_PRODUCTS_DIR; }; 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk_sparsebundle.cpp; path = ../Unix/disk_sparsebundle.cpp; sourceTree = SOURCE_ROOT; }; 083E370B16EFE85000CCCA59 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = disk_unix.h; path = ../Unix/disk_unix.h; sourceTree = SOURCE_ROOT; }; 083E372016EFE87200CCCA59 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = tinyxml2.cpp; path = ../Unix/tinyxml2.cpp; sourceTree = SOURCE_ROOT; }; @@ -387,13 +378,6 @@ /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ - 082AC25014AA59B600071F5E /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - runOnlyForDeploymentPostprocessing = 0; - }; 0846E49814B124DE00574779 /* Frameworks */ = { isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; @@ -451,7 +435,6 @@ isa = PBXGroup; children = ( 0856CCC114A99E1C000B1711 /* SheepShaver.app */, - 082AC25214AA59B600071F5E /* lowmem */, 0846E49A14B124DE00574779 /* libkpx_cpu.a */, ); name = Products; @@ -904,22 +887,6 @@ /* End PBXHeadersBuildPhase section */ /* Begin PBXNativeTarget section */ - 082AC25114AA59B600071F5E /* lowmem */ = { - isa = PBXNativeTarget; - buildConfigurationList = 082AC25714AA59DB00071F5E /* Build configuration list for PBXNativeTarget "lowmem" */; - buildPhases = ( - 082AC24F14AA59B600071F5E /* Sources */, - 082AC25014AA59B600071F5E /* Frameworks */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = lowmem; - productName = lowmem; - productReference = 082AC25214AA59B600071F5E /* lowmem */; - productType = "com.apple.product-type.tool"; - }; 0846E49914B124DE00574779 /* kpx_cpu */ = { isa = PBXNativeTarget; buildConfigurationList = 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */; @@ -944,7 +911,6 @@ 0856CCBD14A99E1C000B1711 /* Resources */, 0856CCBE14A99E1C000B1711 /* Sources */, 0856CCBF14A99E1C000B1711 /* Frameworks */, - 082AC26A14AA5A5A00071F5E /* Run lowmem */, 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */, E413A40820CF7EF800FBE967 /* Embed Frameworks */, ); @@ -952,7 +918,6 @@ ); dependencies = ( 0846E4A714B1253500574779 /* PBXTargetDependency */, - 082AC26814AA5A4800071F5E /* PBXTargetDependency */, ); name = SheepShaver; productName = SheepShaver; @@ -983,7 +948,6 @@ projectRoot = ""; targets = ( 0856CCC014A99E1C000B1711 /* SheepShaver */, - 082AC25114AA59B600071F5E /* lowmem */, 0846E49914B124DE00574779 /* kpx_cpu */, ); }; @@ -1004,21 +968,6 @@ /* End PBXResourcesBuildPhase section */ /* Begin PBXShellScriptBuildPhase section */ - 082AC26A14AA5A5A00071F5E /* Run lowmem */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - "$(BUILT_PRODUCTS_DIR)/$(EXECUTABLE_PATH)", - ); - name = "Run lowmem"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "\"${BUILT_PRODUCTS_DIR}/lowmem\" \"${BUILT_PRODUCTS_DIR}/${EXECUTABLE_PATH}\""; - }; 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */ = { isa = PBXShellScriptBuildPhase; buildActionMask = 2147483647; @@ -1031,19 +980,11 @@ ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.4/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; + shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; }; /* End PBXShellScriptBuildPhase section */ /* Begin PBXSourcesBuildPhase section */ - 082AC24F14AA59B600071F5E /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - E4302EE31FBFE7FA00A5B500 /* lowmem.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; 0846E49714B124DE00574779 /* Sources */ = { isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; @@ -1147,11 +1088,6 @@ /* End PBXSourcesBuildPhase section */ /* Begin PBXTargetDependency section */ - 082AC26814AA5A4800071F5E /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 082AC25114AA59B600071F5E /* lowmem */; - targetProxy = 082AC26714AA5A4800071F5E /* PBXContainerItemProxy */; - }; 0846E4A714B1253500574779 /* PBXTargetDependency */ = { isa = PBXTargetDependency; target = 0846E49914B124DE00574779 /* kpx_cpu */; @@ -1171,54 +1107,11 @@ /* End PBXVariantGroup section */ /* Begin XCBuildConfiguration section */ - 082AC25414AA59B700071F5E /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; - COPY_PHASE_STRIP = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - INSTALL_PATH = /usr/local/bin; - ONLY_ACTIVE_ARCH = NO; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - }; - name = Debug; - }; - 082AC25514AA59B700071F5E /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; - COPY_PHASE_STRIP = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_SYMBOL_SEPARATION = NO; - GCC_MODEL_TUNING = G5; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - INSTALL_PATH = /usr/local/bin; - ONLY_ACTIVE_ARCH = NO; - PREBINDING = NO; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_NAME = lowmem; - ZERO_LINK = NO; - }; - name = Release; - }; 0846E49B14B124DF00574779 /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; COPY_PHASE_STRIP = NO; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; @@ -1245,6 +1138,7 @@ INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.6; PRODUCT_NAME = kpx_cpu; + VALID_ARCHS = x86_64; }; name = Debug; }; @@ -1252,7 +1146,7 @@ isa = XCBuildConfiguration; buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_32_64_BIT)"; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; COPY_PHASE_STRIP = YES; DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = YES; @@ -1280,6 +1174,7 @@ INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.6; PRODUCT_NAME = kpx_cpu; + VALID_ARCHS = x86_64; }; name = Release; }; @@ -1360,6 +1255,7 @@ ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = SheepShaver; + VALID_ARCHS = x86_64; WARNING_LDFLAGS = ""; }; name = Debug; @@ -1419,21 +1315,13 @@ ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_NAME = SheepShaver; + VALID_ARCHS = x86_64; }; name = Release; }; /* End XCBuildConfiguration section */ /* Begin XCConfigurationList section */ - 082AC25714AA59DB00071F5E /* Build configuration list for PBXNativeTarget "lowmem" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 082AC25414AA59B700071F5E /* Debug */, - 082AC25514AA59B700071F5E /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */ = { isa = XCConfigurationList; buildConfigurations = ( diff --git a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h b/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h index 760e64503..baf932f1c 100644 --- a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h +++ b/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h @@ -415,7 +415,7 @@ #define PACKAGE_NAME "SheepShaver" /* Define to the full name and version of this package. */ -#define PACKAGE_STRING "SheepShaver 2.4" +#define PACKAGE_STRING "SheepShaver 2.5" /* Define to the one symbol short name of this package. */ #define PACKAGE_TARNAME "SheepShaver" @@ -424,7 +424,7 @@ #define PACKAGE_URL "" /* Define to the version of this package. */ -#define PACKAGE_VERSION "2.4" +#define PACKAGE_VERSION "2.5" /* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this system. */ From 949e07e4eb35ea8e0ad9200f2735ab55d49d15a3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 23 Jun 2018 14:59:07 +0900 Subject: [PATCH 236/534] fix for linux build --- .../src/uae_cpu/compiler/compemu_support.cpp | 12 +++++------- SheepShaver/src/Unix/main_unix.cpp | 17 +++++++++-------- 2 files changed, 14 insertions(+), 15 deletions(-) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index c55ae3b5b..1713b734a 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -72,27 +72,25 @@ #include "fpu/fpu.h" #include "fpu/flags.h" -#define DEBUG 1 +#define DEBUG 0 #include "debug.h" #ifdef ENABLE_MON #include "mon.h" #endif -#ifndef WIN32 -#define PROFILE_COMPILE_TIME 1 -#define PROFILE_UNTRANSLATED_INSNS 1 -#endif +#define PROFILE_COMPILE_TIME 0 +#define PROFILE_UNTRANSLATED_INSNS 0 #if defined(__x86_64__) && 0 #define RECORD_REGISTER_USAGE 1 #endif -#ifdef WIN32 +//#ifdef WIN32 #undef write_log #define write_log dummy_write_log static void dummy_write_log(const char *, ...) { } -#endif +//#endif #if JIT_DEBUG #undef abort diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 74f818361..45d16686c 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -1005,22 +1005,16 @@ int main(int argc, char **argv) goto quit; } - // Create area for SheepShaver data - if (!SheepMem::Init()) { - sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - goto quit; - } - // Create area for Mac ROM if (!ram_rom_areas_contiguous) { - if (vm_mac_acquire_fixed(ROM_BASE, ROM_AREA_SIZE) < 0) { + if (vm_mac_acquire_fixed(ROM_BASE, ROM_AREA_SIZE + SIG_STACK_SIZE) < 0) { sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno)); ErrorAlert(str); goto quit; } ROMBase = ROM_BASE; ROMBaseHost = Mac2HostAddr(ROMBase); + ROMEnd = ROMBase + ROM_AREA_SIZE; } #if !EMULATED_PPC if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) { @@ -1037,6 +1031,13 @@ int main(int argc, char **argv) goto quit; } + // Create area for SheepShaver data + if (!SheepMem::Init()) { + sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); + ErrorAlert(str); + goto quit; + } + // Load Mac ROM if (!load_mac_rom()) goto quit; From afa52545ff6cc002f530b7209bac12483033c0fb Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 24 Jun 2018 23:08:36 +0900 Subject: [PATCH 237/534] fix include for mingw32 build --- BasiliskII/src/slirp/slirp.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 44f777d08..0ecb09c4f 100755 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -1,4 +1,7 @@ #include "slirp.h" +#ifdef __MINGW32__ +#include +#endif /* host address */ struct in_addr our_addr; From 01a375eefc79a78c35a753a7257622272c3555d3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 25 Jun 2018 22:43:19 +0900 Subject: [PATCH 238/534] minor fix --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 47a6adcdf..69b48238f 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2639,10 +2639,9 @@ static bool handle_badaccess(SIGSEGV_FAULT_HANDLER_ARGLIST_1) #endif sigsegv_info_t * const SIP = &SI; +#if defined(__APPLE__) && defined(__x86_64__) if (!SIP->has_thr_state) mach_get_thread_state(SIP); - -#if defined(__APPLE__) && defined(__x86_64__) x86_thread_state64_t *ts = &SIP->thr_state; uint8_t *rip = (uint8_t *)ts->__rip; switch (rip[0]) { From 52fe2290fe5816ad67aa2796331773c2c5208ee3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 26 Jun 2018 21:00:52 +0900 Subject: [PATCH 239/534] Linux: change configure defaults to SDL2 MinGW: change SDL1 to SDL2 --- BasiliskII/src/SDL/video_sdl2.cpp | 22 +++++++++++++--------- BasiliskII/src/Unix/configure.ac | 6 +++--- BasiliskII/src/Windows/configure.ac | 2 +- BasiliskII/src/Windows/main_windows.cpp | 20 +++++++++++++------- SheepShaver/src/Unix/configure.ac | 4 ++-- SheepShaver/src/Windows/configure.ac | 4 ++-- SheepShaver/src/Windows/main_windows.cpp | 16 +++++++++++----- SheepShaver/src/include/version.h | 2 +- 8 files changed, 46 insertions(+), 30 deletions(-) mode change 100644 => 100755 BasiliskII/src/Unix/configure.ac mode change 100644 => 100755 SheepShaver/src/Unix/configure.ac mode change 100755 => 100644 SheepShaver/src/Windows/configure.ac diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 6d96a2fc5..79bdc1055 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -700,7 +700,11 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } +#ifdef __MACOSX__ window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; +#else + window_flags |= SDL_WINDOW_FULLSCREEN; +#endif window_width = desktop_mode.w; window_height = desktop_mode.h; } @@ -748,15 +752,11 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } if (!sdl_renderer) { - const char *render_driver = PrefsFindString("sdlrender"); - if (render_driver) { - if (SDL_strcmp(render_driver, "auto") == 0) { - SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); - } else { - SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); - } - } - +#ifdef WIN32 + SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); +#else + SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); +#endif sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); if (!sdl_renderer) { shutdown_sdl_video(); @@ -1543,7 +1543,11 @@ static void do_toggle_fullscreen(void) SDL_SetWindowGrab(sdl_window, SDL_FALSE); } else { display_type = DISPLAY_SCREEN; +#ifdef __MACOSX__ SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); +#else + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN); +#endif SDL_SetWindowGrab(sdl_window, SDL_TRUE); } } diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac old mode 100644 new mode 100755 index c2aaec955..9bfae2533 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -32,14 +32,14 @@ AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV sig dnl SDL options. AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) -AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=no]) -AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) +AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=yes]) +AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=yes]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl JIT compiler options. -AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=no]) +AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=yes]) AC_ARG_ENABLE(jit-debug, [ --enable-jit-debug activate native code disassemblers [default=no]], [WANT_JIT_DEBUG=$enableval], [WANT_JIT_DEBUG=no]) dnl FPU emulation core. diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index f02c4b5ce..3a7b5e490 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -524,7 +524,7 @@ CPUINCLUDES="-I../uae_cpu" CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) +AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 184a2dc65..9b992dc16 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -283,10 +283,6 @@ int main(int argc, char **argv) QuitEmulator(); #endif - // FIXME: default to DIB driver - if (getenv("SDL_VIDEODRIVER") == NULL) - putenv("SDL_VIDEODRIVER=windib"); - // Initialize SDL system int sdl_flags = 0; #ifdef USE_SDL_VIDEO @@ -400,7 +396,7 @@ int main(int argc, char **argv) emul_thread = GetCurrentThread(); // SDL threads available, start 60Hz thread - tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL)) != NULL); + tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, "Redraw Thread", NULL)) != NULL); if (!tick_thread_active) { sprintf(str, GetString(STR_TICK_THREAD_ERR), strerror(errno)); ErrorAlert(str); @@ -410,7 +406,7 @@ int main(int argc, char **argv) // Start XPRAM watchdog thread memcpy(last_xpram, XPRAM, XPRAM_SIZE); - xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL)) != NULL); + xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, "XPRAM Thread", NULL)) != NULL); D(bug("XPRAM thread started\n")); // Start 68k and jump to ROM boot routine @@ -625,11 +621,21 @@ static int tick_func(void *arg) #ifdef USE_SDL_VIDEO #include +extern SDL_Window *sdl_window; HWND GetMainWindowHandle(void) { SDL_SysWMinfo wmInfo; SDL_VERSION(&wmInfo.version); - return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; + if (!sdl_window) { + return NULL; + } + if (!SDL_GetWindowWMInfo(sdl_window, &wmInfo)) { + return NULL; + } + if (wmInfo.subsystem != SDL_SYSWM_WINDOWS) { + return NULL; + } + return wmInfo.info.win.window; } #endif diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac old mode 100644 new mode 100755 index d5147dba0..749ebdff4 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -68,8 +68,8 @@ AC_ARG_ENABLE(addressing, dnl SDL options. AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) -AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=no]) -AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=no]) +AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphics [default=no]], [WANT_SDL_VIDEO=$enableval], [WANT_SDL_VIDEO=yes]) +AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=yes]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac old mode 100755 new mode 100644 index 64fa9612d..7d688981b --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -12,7 +12,7 @@ AC_CANONICAL_HOST AC_CANONICAL_TARGET dnl Options. -AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) +AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=no]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) @@ -238,7 +238,7 @@ dnl Use the dummy prefs file. CPUSRCS="$CPUSRCS ../dummy/prefs_dummy.cpp" dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) +AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) SDL_LIBS=`$sdl_config --libs` diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 6efc01115..4f2a24324 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -210,10 +210,6 @@ int main(int argc, char **argv) // // Load win32 libraries // KernelInit(); - // FIXME: default to DIB driver - if (getenv("SDL_VIDEODRIVER") == NULL) - putenv("SDL_VIDEODRIVER=windib"); - // Initialize SDL system int sdl_flags = 0; #ifdef USE_SDL_VIDEO @@ -770,11 +766,21 @@ void SheepMem::Exit(void) #ifdef USE_SDL_VIDEO #include +extern SDL_Window *sdl_window; HWND GetMainWindowHandle(void) { SDL_SysWMinfo wmInfo; SDL_VERSION(&wmInfo.version); - return SDL_GetWMInfo(&wmInfo) ? wmInfo.window : NULL; + if (!sdl_window) { + return NULL; + } + if (!SDL_GetWindowWMInfo(sdl_window, &wmInfo)) { + return NULL; + } + if (wmInfo.subsystem != SDL_SYSWM_WINDOWS) { + return NULL; + } + return wmInfo.info.win.window; } #endif diff --git a/SheepShaver/src/include/version.h b/SheepShaver/src/include/version.h index 78a3837fa..4b63bfd36 100644 --- a/SheepShaver/src/include/version.h +++ b/SheepShaver/src/include/version.h @@ -22,6 +22,6 @@ #define VERSION_H const int VERSION_MAJOR = 2; -const int VERSION_MINOR = 4; +const int VERSION_MINOR = 5; #endif From 700b57d758f47fbb21066cba933ddd45ddf6045b Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 27 Jun 2018 19:13:30 +0900 Subject: [PATCH 240/534] added pref item "hotkey" added MB notation pref item "ramsize" --- BasiliskII/src/SDL/video_sdl2.cpp | 62 ++++++++++++++++++++---- BasiliskII/src/Unix/main_unix.cpp | 3 ++ BasiliskII/src/Windows/main_windows.cpp | 3 ++ BasiliskII/src/include/user_strings.h | 5 ++ BasiliskII/src/prefs_items.cpp | 1 + BasiliskII/src/user_strings.cpp | 10 ++++ SheepShaver/src/Unix/main_unix.cpp | 3 ++ SheepShaver/src/Windows/main_windows.cpp | 3 ++ SheepShaver/src/include/user_strings.h | 5 ++ SheepShaver/src/prefs_items.cpp | 1 + SheepShaver/src/user_strings.cpp | 10 ++++ 11 files changed, 96 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 79bdc1055..bf8e61f7a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -48,6 +48,7 @@ #include #include #include +#include #ifdef WIN32 #include /* alloca() */ @@ -120,6 +121,8 @@ static const bool use_vosf = false; // VOSF not possible #endif static bool ctrl_down = false; // Flag: Ctrl key pressed +static bool opt_down = false; // Flag: Opt key pressed +static bool cmd_down = false; // Flag: Cmd key pressed static bool caps_on = false; // Flag: Caps Lock on static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread @@ -532,6 +535,18 @@ static void set_window_name(int name) SDL_SetWindowTitle(sdl_window, str); } +static void set_window_name_grabbed() { + if (!sdl_window) return; + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + std::string s = GetString(STR_WINDOW_TITLE_GRABBED0); + if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); + if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); + if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); + s += GetString(STR_WINDOW_TITLE_GRABBED4); + SDL_SetWindowTitle(sdl_window, s.c_str()); +} + // Set mouse grab mode static void set_grab_mode(bool grab) { @@ -1024,7 +1039,7 @@ void driver_base::adapt_to_video_mode() { SDL_ShowCursor(hardware_cursor); // Set window name/class - set_window_name(mouse_grabbed ? (int)STR_WINDOW_TITLE_GRABBED : (int)STR_WINDOW_TITLE); + mouse_grabbed ? set_window_name_grabbed() : set_window_name((int)STR_WINDOW_TITLE); // Everything went well init_ok = true; @@ -1118,7 +1133,7 @@ void driver_base::grab_mouse(void) if (!mouse_grabbed) { mouse_grabbed = true; update_mouse_grab(); - set_window_name(STR_WINDOW_TITLE_GRABBED); + set_window_name_grabbed(); disable_mouse_accel(); ADBSetRelMouseMode(true); } @@ -1856,9 +1871,13 @@ static bool is_modifier_key(SDL_KeyboardEvent const & e) return false; } -static bool is_ctrl_down(SDL_Keysym const & ks) +static bool is_hotkey_down(SDL_Keysym const & ks) { - return ctrl_down || (ks.mod & KMOD_CTRL); + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + return (ctrl_down || (ks.mod & KMOD_CTRL) || !(hotkey & 1)) && + (opt_down || (ks.mod & KMOD_ALT) || !(hotkey & 2)) && + (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); } @@ -1920,8 +1939,8 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; + case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; case SDLK_SPACE: return 0x31; case SDLK_BACKSPACE: return 0x33; @@ -1936,7 +1955,7 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_RCTRL: return 0x36; case SDLK_LSHIFT: return 0x38; case SDLK_RSHIFT: return 0x38; -#if (defined(__APPLE__) && defined(__MACH__)) +#ifdef __APPLE__ case SDLK_LALT: return 0x3a; case SDLK_RALT: return 0x3a; case SDLK_LGUI: return 0x37; @@ -1956,9 +1975,9 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_LEFT: return 0x3b; case SDLK_RIGHT: return 0x3c; - case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; case SDLK_F2: return 0x78; case SDLK_F3: return 0x63; case SDLK_F4: return 0x76; @@ -2043,7 +2062,7 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) SDL_Keysym const & ks = event->key.keysym; switch (ks.sym) { case SDLK_F5: { - if (is_ctrl_down(ks)) { + if (is_hotkey_down(ks)) { drv->toggle_mouse_grab(); return EVENT_DROP_FROM_QUEUE; } @@ -2164,6 +2183,18 @@ static void handle_events(void) ADBKeyDown(code); if (code == 0x36) ctrl_down = true; +#ifdef __APPLE__ + if (code == 0x3a) + opt_down = true; + if (code == 0x37) + cmd_down = true; +#else + if (code == 0x37) + opt_down = true; + if (code == 0x3a) + cmd_down = true; +#endif + } else { if (code == 0x31) drv->resume(); // Space wakes us up @@ -2191,6 +2222,17 @@ static void handle_events(void) ADBKeyUp(code); if (code == 0x36) ctrl_down = false; +#ifdef __APPLE__ + if (code == 0x3a) + opt_down = false; + if (code == 0x37) + cmd_down = false; +#else + if (code == 0x37) + opt_down = false; + if (code == 0x3a) + cmd_down = false; +#endif } break; } diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index b409c2221..17e9827fd 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -568,6 +568,9 @@ int main(int argc, char **argv) // Read RAM size RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary + if (RAMSize <= 1000) { + RAMSize *= 1024 * 1024; + } if (RAMSize < 1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 1024*1024; diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 9b992dc16..b5ce8593c 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -320,6 +320,9 @@ int main(int argc, char **argv) // Read RAM size RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary + if (RAMSize <= 1000) { + RAMSize *= 1024 * 1024; + } if (RAMSize < 1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 1024*1024; diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index 24a0b28a6..c030b20e1 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -214,6 +214,11 @@ enum { STR_WINDOW_TITLE = 4000, STR_WINDOW_TITLE_FROZEN, STR_WINDOW_TITLE_GRABBED, + STR_WINDOW_TITLE_GRABBED0, + STR_WINDOW_TITLE_GRABBED1, + STR_WINDOW_TITLE_GRABBED2, + STR_WINDOW_TITLE_GRABBED3, + STR_WINDOW_TITLE_GRABBED4, STR_WINDOW_MENU = 4050, STR_WINDOW_ITEM_ABOUT, STR_WINDOW_ITEM_REFRESH, diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 6da364b0f..07234d397 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -72,6 +72,7 @@ prefs_desc common_prefs_items[] = { {"keycodefile",TYPE_STRING,"Keycode file"}, {"mousewheelmode",TYPE_BOOLEAN,"Use WheelMode"}, {"mousewheellines",TYPE_INT32,"wheel line nb"}, + {"hotkey",TYPE_INT32,false,"hotkey modifier"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index 55a7fb871..d182f6335 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -227,6 +227,16 @@ user_string_def common_strings[] = { {STR_WINDOW_TITLE, "Basilisk II"}, {STR_WINDOW_TITLE_FROZEN, "Basilisk II *** FROZEN ***"}, {STR_WINDOW_TITLE_GRABBED, "Basilisk II (mouse grabbed, press Ctrl-F5 to release)"}, + {STR_WINDOW_TITLE_GRABBED0, "Basilisk II (mouse grabbed, press "}, + {STR_WINDOW_TITLE_GRABBED1, "Ctrl-"}, +#ifdef __APPLE__ + {STR_WINDOW_TITLE_GRABBED2, "Opt-"}, + {STR_WINDOW_TITLE_GRABBED3, "Cmd-"}, +#else + {STR_WINDOW_TITLE_GRABBED2, "Alt-"}, + {STR_WINDOW_TITLE_GRABBED3, "Win-"}, +#endif + {STR_WINDOW_TITLE_GRABBED4, "F5 to release)"}, {STR_WINDOW_MENU, "Basilisk II"}, {STR_WINDOW_ITEM_ABOUT, "About Basilisk II" ELLIPSIS}, {STR_WINDOW_ITEM_REFRESH, "Refresh Rate"}, diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 45d16686c..8eb6420ad 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -941,6 +941,9 @@ int main(int argc, char **argv) // Create area for Mac RAM RAMSize = PrefsFindInt32("ramsize"); + if (RAMSize <= 1000) { + RAMSize *= 1024 * 1024; + } if (RAMSize < 8*1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 8*1024*1024; diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 4f2a24324..6f20097a5 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -303,6 +303,9 @@ int main(int argc, char **argv) // Create area for Mac RAM RAMSize = PrefsFindInt32("ramsize"); + if (RAMSize <= 1000) { + RAMSize *= 1024 * 1024; + } if (RAMSize < 8*1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 8*1024*1024; diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h index c0fbb6dc1..1813954a2 100644 --- a/SheepShaver/src/include/user_strings.h +++ b/SheepShaver/src/include/user_strings.h @@ -167,6 +167,11 @@ enum { STR_WINDOW_TITLE = 4000, STR_WINDOW_TITLE_FROZEN, STR_WINDOW_TITLE_GRABBED, + STR_WINDOW_TITLE_GRABBED0, + STR_WINDOW_TITLE_GRABBED1, + STR_WINDOW_TITLE_GRABBED2, + STR_WINDOW_TITLE_GRABBED3, + STR_WINDOW_TITLE_GRABBED4, STR_WINDOW_MENU = 4050, STR_WINDOW_ITEM_ABOUT, STR_WINDOW_ITEM_REFRESH, diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index c0e7feb12..f4db6031f 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -59,6 +59,7 @@ prefs_desc common_prefs_items[] = { {"jit68k", TYPE_BOOLEAN, false, "enable 68k DR emulator"}, {"keyboardtype", TYPE_INT32, false, "hardware keyboard type"}, {"hardcursor", TYPE_BOOLEAN, false, "hardware mouse cursor"}, + {"hotkey", TYPE_INT32, false, "hotkey modifier"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index f4618b55a..ee9e1d1c7 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -173,6 +173,16 @@ user_string_def common_strings[] = { {STR_WINDOW_TITLE, "SheepShaver"}, {STR_WINDOW_TITLE_FROZEN, "SheepShaver *** FROZEN ***"}, {STR_WINDOW_TITLE_GRABBED, "SheepShaver (mouse grabbed, press Ctrl-F5 to release)"}, + {STR_WINDOW_TITLE_GRABBED0, "SheepShaver (mouse grabbed, press "}, + {STR_WINDOW_TITLE_GRABBED1, "Ctrl-"}, +#ifdef __APPLE__ + {STR_WINDOW_TITLE_GRABBED2, "Opt-"}, + {STR_WINDOW_TITLE_GRABBED3, "Cmd-"}, +#else + {STR_WINDOW_TITLE_GRABBED2, "Alt-"}, + {STR_WINDOW_TITLE_GRABBED3, "Win-"}, +#endif + {STR_WINDOW_TITLE_GRABBED4, "F5 to release)"}, {STR_WINDOW_MENU, "SheepShaver"}, {STR_WINDOW_ITEM_ABOUT, "About SheepShaver" ELLIPSIS}, {STR_WINDOW_ITEM_REFRESH, "Refresh Rate"}, From 63fa75adf05a97449f4f3c0d9341173a401254a8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 27 Jun 2018 23:25:33 +0900 Subject: [PATCH 241/534] fixed ramsize in preferences editor --- SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm index e8286d49c..5ceee33f0 100755 --- a/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm +++ b/SheepShaver/src/MacOSX/Launcher/VMSettingsController.mm @@ -143,8 +143,10 @@ - (void) setupGUI [romFile setStringValue: getStringFromPrefs("rom") ]; [unixRoot setStringValue: getStringFromPrefs("extfs") ]; [disableCdrom setIntValue: PrefsFindBool("nocdrom") ]; - [ramSize setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; - [ramSizeStepper setIntValue: PrefsFindInt32("ramsize") / (1024*1024) ]; + int ramsize = PrefsFindInt32("ramsize"); + if (ramsize > 1000) ramsize >>= 20; + [ramSize setIntValue: ramsize ]; + [ramSizeStepper setIntValue: ramsize ]; int display_type = 0; int dis_width = 640; From 8f0df8ec70c11f0f21a72984f4b2809e54bfff0f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 28 Jun 2018 18:58:55 +0900 Subject: [PATCH 242/534] fix double free in SDL --- BasiliskII/src/SDL/video_sdl2.cpp | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index bf8e61f7a..755de8d3a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -890,7 +890,10 @@ static int present_sdl_video() guest_surface != NULL) { SDL_Rect destRect = sdl_update_video_rect; - if (SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect) != 0) { + LOCK_PALETTE; + int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); + UNLOCK_PALETTE; + if (result != 0) { SDL_UnlockMutex(sdl_update_video_mutex); return -1; } From 8f2660a7dec6c0a79ed9052ed14b3a1e780f97e1 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 29 Jun 2018 19:31:45 +0900 Subject: [PATCH 243/534] redraw when palette changed modify keymap --- BasiliskII/src/SDL/keycodes | 107 ++++++++++++++++++++++++++++++ BasiliskII/src/SDL/video_sdl2.cpp | 8 ++- 2 files changed, 114 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/keycodes b/BasiliskII/src/SDL/keycodes index da9185603..1ee627a8a 100644 --- a/BasiliskII/src/SDL/keycodes +++ b/BasiliskII/src/SDL/keycodes @@ -352,6 +352,113 @@ sdl Quartz 82 82 # KP 0 65 65 # KP . +# +# cocoa (SDL2) +# +sdl cocoa +53 53 # Esc +122 122 # F1 +120 120 # F2 +99 99 # F3 +118 118 # F4 +96 96 # F5 +97 97 # F6 +98 98 # F7 +100 100 # F8 +101 101 # F9 +109 109 # F10 +103 103 # F11 +111 111 # F12 +105 105 # F13/PrintScrn +107 107 # F14/Scroll Lock +113 113 # F15/Pause +10 10 # ` +18 18 # 1 +19 19 # 2 +20 20 # 3 +21 21 # 4 +23 23 # 5 +22 22 # 6 +26 26 # 7 +28 28 # 8 +25 25 # 9 +29 29 # 0 +27 27 # - +24 24 # = +51 51 # Backspace +114 114 # Help/Insert +115 115 # Home +116 116 # Page Up +71 71 # Num Lock +81 81 # KP = +75 75 # KP / +67 67 # KP * +48 48 # Tab +12 12 # Q +13 13 # W +14 14 # E +15 15 # R +17 17 # T +16 16 # Y +32 32 # U +34 34 # I +31 31 # O +35 35 # P +33 33 # [ +30 30 # ] +36 36 # Return +117 117 # Delete +119 119 # End +121 121 # Page Down +89 89 # KP 7 +91 91 # KP 8 +92 92 # KP 9 +78 78 # KP - +57 57 # Caps Lock +0 0 # A +1 1 # S +2 2 # D +3 3 # F +5 5 # G +4 4 # H +38 38 # J +40 40 # K +37 37 # L +41 41 # ; +39 39 # ' +42 42 # \ +86 86 # KP 4 +87 87 # KP 5 +88 88 # KP 6 +69 69 # KP + +56 56 # Shift +50 50 # International +6 6 # Z +7 7 # X +8 8 # C +9 9 # V +11 11 # B +45 45 # N +46 46 # M +43 43 # , +47 47 # . +44 44 # / +126 62 # Cursor Up +123 59 # Cursor Left +125 61 # Cursor Down +124 60 # Cursor Right +83 83 # KP 1 +84 84 # KP 2 +85 85 # KP 3 +76 76 # KP Enter +54 54 # Ctrl +58 58 # Option +55 55 # Command +54 54 # Ctrl Left +49 49 # Space +82 82 # KP 0 +65 65 # KP . + # # Windows # diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 755de8d3a..e95a08f79 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1099,6 +1099,12 @@ void driver_base::update_palette(void) if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { SDL_SetSurfacePalette(s, sdl_palette); + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); } } @@ -1930,7 +1936,7 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_9: return 0x19; case SDLK_0: return 0x1d; - case SDLK_BACKQUOTE: return 0x0a; + case SDLK_BACKQUOTE: case 167: return 0x32; case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; case SDLK_EQUALS: case SDLK_PLUS: return 0x18; case SDLK_LEFTBRACKET: return 0x21; From a943d981c41b860770a7653555513710005d0cd0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 1 Jul 2018 22:50:33 +0900 Subject: [PATCH 244/534] introduce my repo --- README.md | 56 +++++++++++++++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 54 insertions(+), 2 deletions(-) diff --git a/README.md b/README.md index dba6c383f..a9b96f1ba 100644 --- a/README.md +++ b/README.md @@ -1,2 +1,54 @@ -# BasiliskII -[![Build Status](https://travis-ci.org/rickyzhang82/macemu.svg)](https://travis-ci.org/rickyzhang82/macemu) +#### BasiliskII +``` +macOS 64-bit --- +Linux 32-bit JIT +MinGW 32-bit JIT +``` +#### SheepShaver +``` +macOS 64-bit JIT +Linux 32-bit JIT +MinGW 32-bit --- +``` +### How To Build +These builds need to be installed SDL2 framework/library. +#### BasiliskII +##### macOS +1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj +1. Set Build Configuration to Release +1. Build + +##### Linux(x86) +``` +$ cd macemu/BasiliskII/src/Unix +$ ./autogen.sh +$ make +``` +##### MinGW32/MSYS +``` +$ cd macemu/BasiliskII/src/Windows +$ ../Unix/autogen.sh +$ make +``` +#### SheepShaver +##### macOS +1. Open SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj +1. Set Build Configuration to Release +1. Build + +##### Linux(x86) +``` +$ cd macemu/SheepShaver +$ make links +$ cd src/Unix +$ ./autogen.sh +$ make +``` +##### MinGW32/MSYS +``` +$ cd macemu/SheepShaver +$ make links +$ cd src/Windows +$ ../Unix/autogen.sh +$ make +``` From e690b631da9c24a78127f02ed43212cde11204e1 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 6 Jul 2018 19:33:30 +0900 Subject: [PATCH 245/534] BII enable --config argument SS delete dead links --- BasiliskII/src/SDL/prefs_sdl.cpp | 4 ++-- SheepShaver/src/Windows/kernel_windows.cpp | 1 - SheepShaver/src/Windows/kernel_windows.h | 1 - 3 files changed, 2 insertions(+), 4 deletions(-) delete mode 120000 SheepShaver/src/Windows/kernel_windows.cpp delete mode 120000 SheepShaver/src/Windows/kernel_windows.h diff --git a/BasiliskII/src/SDL/prefs_sdl.cpp b/BasiliskII/src/SDL/prefs_sdl.cpp index 8150d7094..5151f7604 100644 --- a/BasiliskII/src/SDL/prefs_sdl.cpp +++ b/BasiliskII/src/SDL/prefs_sdl.cpp @@ -59,7 +59,7 @@ void LoadPrefs(const char * vmdir) // TODO: load prefs from 'vmdir' SDL_snprintf(prefs_path, sizeof(prefs_path), "%s/%s", vmdir, PREFS_FILE_NAME); // Read preferences from settings file - FILE *f = fopen(prefs_path, "r"); + FILE *f = fopen(UserPrefsPath.empty() ? prefs_path : UserPrefsPath.c_str(), "r"); if (f != NULL) { // Prefs file found, load settings @@ -89,7 +89,7 @@ void SavePrefs(void) SDL_snprintf(prefs_path, sizeof(prefs_path), "%s/%s", dir, PREFS_FILE_NAME); FILE *f; - if ((f = fopen(prefs_path, "w")) != NULL) { + if ((f = fopen(UserPrefsPath.empty() ? prefs_path : UserPrefsPath.c_str(), "w")) != NULL) { SavePrefsToStream(f); fclose(f); } diff --git a/SheepShaver/src/Windows/kernel_windows.cpp b/SheepShaver/src/Windows/kernel_windows.cpp deleted file mode 120000 index d9c12cdc5..000000000 --- a/SheepShaver/src/Windows/kernel_windows.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.cpp \ No newline at end of file diff --git a/SheepShaver/src/Windows/kernel_windows.h b/SheepShaver/src/Windows/kernel_windows.h deleted file mode 120000 index 10e68cebd..000000000 --- a/SheepShaver/src/Windows/kernel_windows.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Windows/kernel_windows.h \ No newline at end of file From 93fb08d8ceaa1ca08f94d5cc7d05b4cf7f54fc0c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 8 Jul 2018 19:43:36 +0900 Subject: [PATCH 246/534] BII fix pref item ramsize --- BasiliskII/src/Unix/main_unix.cpp | 3 ++- BasiliskII/src/Windows/main_windows.cpp | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 17e9827fd..48d05e227 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -567,10 +567,11 @@ int main(int argc, char **argv) sigsegv_set_dump_state(sigsegv_dump_state); // Read RAM size - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary + RAMSize = PrefsFindInt32("ramsize"); if (RAMSize <= 1000) { RAMSize *= 1024 * 1024; } + RAMSize &= 0xfff00000; // Round down to 1MB boundary if (RAMSize < 1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 1024*1024; diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index b5ce8593c..3cdb871c8 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -319,10 +319,11 @@ int main(int argc, char **argv) sigsegv_set_dump_state(sigsegv_dump_state); // Read RAM size - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary + RAMSize = PrefsFindInt32("ramsize"); if (RAMSize <= 1000) { RAMSize *= 1024 * 1024; } + RAMSize &= 0xfff00000; // Round down to 1MB boundary if (RAMSize < 1024*1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 1024*1024; From e760d289b2cd5cc0b735fa3dfed328d9d01eac8c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 9 Jul 2018 19:24:52 +0900 Subject: [PATCH 247/534] SS adjust minimum ramsize --- SheepShaver/src/Unix/main_unix.cpp | 4 ++-- SheepShaver/src/Windows/main_windows.cpp | 4 ++-- SheepShaver/src/user_strings.cpp | 2 +- 3 files changed, 5 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 8eb6420ad..d5580a517 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -944,9 +944,9 @@ int main(int argc, char **argv) if (RAMSize <= 1000) { RAMSize *= 1024 * 1024; } - if (RAMSize < 8*1024*1024) { + if (RAMSize < 16 * 1024 * 1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; + RAMSize = 16 * 1024 * 1024; } memory_mapped_from_zero = false; ram_rom_areas_contiguous = false; diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 6f20097a5..22cafb45a 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -306,9 +306,9 @@ int main(int argc, char **argv) if (RAMSize <= 1000) { RAMSize *= 1024 * 1024; } - if (RAMSize < 8*1024*1024) { + if (RAMSize < 16 * 1024 * 1024) { WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; + RAMSize = 16 * 1024 * 1024; } RAMBase = 0; if (vm_mac_acquire(RAMBase, RAMSize) < 0) { diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index ee9e1d1c7..6a52511ab 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -76,7 +76,7 @@ user_string_def common_strings[] = { {STR_SCSI_BUFFER_ERR, "Cannot allocate SCSI buffer (requested %d bytes). Giving up."}, {STR_SCSI_SG_FULL_ERR, "SCSI scatter/gather table full. Giving up."}, - {STR_SMALL_RAM_WARN, "Selected less than 8MB Mac RAM, using 8MB."}, + {STR_SMALL_RAM_WARN, "Selected less than 16MB Mac RAM, using 16MB."}, {STR_CANNOT_UNMOUNT_WARN, "The volume '%s' could not be unmounted. SheepShaver will not use it."}, {STR_CREATE_VOLUME_WARN, "Cannot create hardfile (%s)."}, From bdd101e9514eafbeeaef2bad57c5848413201316 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 11 Jul 2018 17:50:57 +0900 Subject: [PATCH 248/534] fix caps lock --- BasiliskII/src/SDL/video_sdl2.cpp | 23 ++++------------------- 1 file changed, 4 insertions(+), 19 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index e95a08f79..d6d1ed62a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -123,7 +123,6 @@ static const bool use_vosf = false; // VOSF not possible static bool ctrl_down = false; // Flag: Ctrl key pressed static bool opt_down = false; // Flag: Opt key pressed static bool cmd_down = false; // Flag: Cmd key pressed -static bool caps_on = false; // Flag: Caps Lock on static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread static bool emul_suspended = false; // Flag: Emulator suspended @@ -2180,15 +2179,9 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else + if (code == 0x39) + (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); + else ADBKeyDown(code); if (code == 0x36) ctrl_down = true; @@ -2219,15 +2212,7 @@ static void handle_events(void) } else code = event2keycode(event.key, false); if (code >= 0) { - if (code == 0x39) { // Caps Lock released - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else + if (code != 0x39) ADBKeyUp(code); if (code == 0x36) ctrl_down = false; From d1104b1f204542fc252f2d219685b68c35d3e1f8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 13 Jul 2018 15:41:35 +0900 Subject: [PATCH 249/534] delete SheepShaver/src/adb.cpp --- SheepShaver/src/adb.cpp | 460 ---------------------------------------- 1 file changed, 460 deletions(-) delete mode 100644 SheepShaver/src/adb.cpp diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp deleted file mode 100644 index c05c00008..000000000 --- a/SheepShaver/src/adb.cpp +++ /dev/null @@ -1,460 +0,0 @@ -/* - * adb.cpp - ADB emulation (mouse/keyboard) - * - * Basilisk II (C) Christian Bauer - * - * 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 - */ - -/* - * SEE ALSO - * Inside Macintosh: Devices, chapter 5 "ADB Manager" - * Technote HW 01: "ADB - The Untold Story: Space Aliens Ate My Mouse" - */ - -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "main.h" -#include "prefs.h" -#include "video.h" -#include "adb.h" - -#ifdef POWERPC_ROM -#include "thunks.h" -#endif - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int mouse_x = 0, mouse_y = 0; // Mouse position -static int old_mouse_x = 0, old_mouse_y = 0; -static bool mouse_button[3] = {false, false, false}; // Mouse button states -static bool old_mouse_button[3] = {false, false, false}; -static bool relative_mouse = false; - -static uint8 key_states[16]; // Key states (Mac keycodes) -#define MATRIX(code) (key_states[code >> 3] & (1 << (~code & 7))) - -// Keyboard event buffer (Mac keycodes with up/down flag) -const int KEY_BUFFER_SIZE = 16; -static uint8 key_buffer[KEY_BUFFER_SIZE]; -static unsigned int key_read_ptr = 0, key_write_ptr = 0; - -static uint8 mouse_reg_3[2] = {0x63, 0x01}; // Mouse ADB register 3 - -static uint8 key_reg_2[2] = {0xff, 0xff}; // Keyboard ADB register 2 -static uint8 key_reg_3[2] = {0x62, 0x05}; // Keyboard ADB register 3 - -static uint8 m_keyboard_type = 0x05; - -// ADB mouse motion lock (for platforms that use separate input thread) -static B2_mutex *mouse_lock; - - -/* - * Initialize ADB emulation - */ - -void ADBInit(void) -{ - mouse_lock = B2_create_mutex(); - m_keyboard_type = (uint8)PrefsFindInt32("keyboardtype"); - key_reg_3[1] = m_keyboard_type; -} - - -/* - * Exit ADB emulation - */ - -void ADBExit(void) -{ - if (mouse_lock) { - B2_delete_mutex(mouse_lock); - mouse_lock = NULL; - } -} - - -/* - * ADBOp() replacement - */ - -void ADBOp(uint8 op, uint8 *data) -{ - D(bug("ADBOp op %02x, data %02x %02x %02x\n", op, data[0], data[1], data[2])); - - // ADB reset? - if ((op & 0x0f) == 0) { - mouse_reg_3[0] = 0x63; - mouse_reg_3[1] = 0x01; - key_reg_2[0] = 0xff; - key_reg_2[1] = 0xff; - key_reg_3[0] = 0x62; - key_reg_3[1] = m_keyboard_type; - return; - } - - // Cut op into fields - uint8 adr = op >> 4; - uint8 cmd = (op >> 2) & 3; - uint8 reg = op & 3; - - // Check which device was addressed and act accordingly - if (adr == (mouse_reg_3[0] & 0x0f)) { - - // Mouse - if (cmd == 2) { - - // Listen - switch (reg) { - case 3: // Address/HandlerID - if (data[2] == 0xfe) // Change address - mouse_reg_3[0] = (mouse_reg_3[0] & 0xf0) | (data[1] & 0x0f); - else if (data[2] == 1 || data[2] == 2 || data[2] == 4) // Change device handler ID - mouse_reg_3[1] = data[2]; - else if (data[2] == 0x00) // Change address and enable bit - mouse_reg_3[0] = (mouse_reg_3[0] & 0xd0) | (data[1] & 0x2f); - break; - } - - } else if (cmd == 3) { - - // Talk - switch (reg) { - case 1: // Extended mouse protocol - data[0] = 8; - data[1] = 'a'; // Identifier - data[2] = 'p'; - data[3] = 'p'; - data[4] = 'l'; - data[5] = 300 >> 8; // Resolution (dpi) - data[6] = 300 & 0xff; - data[7] = 1; // Class (mouse) - data[8] = 3; // Number of buttons - break; - case 3: // Address/HandlerID - data[0] = 2; - data[1] = (mouse_reg_3[0] & 0xf0) | (rand() & 0x0f); - data[2] = mouse_reg_3[1]; - break; - default: - data[0] = 0; - break; - } - } - D(bug(" mouse reg 3 %02x%02x\n", mouse_reg_3[0], mouse_reg_3[1])); - - } else if (adr == (key_reg_3[0] & 0x0f)) { - - // Keyboard - if (cmd == 2) { - - // Listen - switch (reg) { - case 2: // LEDs/Modifiers - key_reg_2[0] = data[1]; - key_reg_2[1] = data[2]; - break; - case 3: // Address/HandlerID - if (data[2] == 0xfe) // Change address - key_reg_3[0] = (key_reg_3[0] & 0xf0) | (data[1] & 0x0f); - else if (data[2] == 0x00) // Change address and enable bit - key_reg_3[0] = (key_reg_3[0] & 0xd0) | (data[1] & 0x2f); - break; - } - - } else if (cmd == 3) { - - // Talk - switch (reg) { - case 2: { // LEDs/Modifiers - uint8 reg2hi = 0xff; - uint8 reg2lo = key_reg_2[1] | 0xf8; - if (MATRIX(0x6b)) // Scroll Lock - reg2lo &= ~0x40; - if (MATRIX(0x47)) // Num Lock - reg2lo &= ~0x80; - if (MATRIX(0x37)) // Command - reg2hi &= ~0x01; - if (MATRIX(0x3a)) // Option - reg2hi &= ~0x02; - if (MATRIX(0x38)) // Shift - reg2hi &= ~0x04; - if (MATRIX(0x36)) // Control - reg2hi &= ~0x08; - if (MATRIX(0x39)) // Caps Lock - reg2hi &= ~0x20; - if (MATRIX(0x75)) // Delete - reg2hi &= ~0x40; - data[0] = 2; - data[1] = reg2hi; - data[2] = reg2lo; - break; - } - case 3: // Address/HandlerID - data[0] = 2; - data[1] = (key_reg_3[0] & 0xf0) | (rand() & 0x0f); - data[2] = key_reg_3[1]; - break; - default: - data[0] = 0; - break; - } - } - D(bug(" keyboard reg 3 %02x%02x\n", key_reg_3[0], key_reg_3[1])); - - } else // Unknown address - if (cmd == 3) - data[0] = 0; // Talk: 0 bytes of data -} - - -/* - * Mouse was moved (x/y are absolute or relative, depending on ADBSetRelMouseMode()) - */ - -void ADBMouseMoved(int x, int y) -{ - B2_lock_mutex(mouse_lock); - if (relative_mouse) { - mouse_x += x; mouse_y += y; - } else { - mouse_x = x; mouse_y = y; - } - B2_unlock_mutex(mouse_lock); - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Mouse button pressed - */ - -void ADBMouseDown(int button) -{ - mouse_button[button] = true; - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Mouse button released - */ - -void ADBMouseUp(int button) -{ - mouse_button[button] = false; - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Set mouse mode (absolute or relative) - */ - -void ADBSetRelMouseMode(bool relative) -{ - if (relative_mouse != relative) { - relative_mouse = relative; - mouse_x = mouse_y = 0; - } -} - - -/* - * Key pressed ("code" is the Mac key code) - */ - -void ADBKeyDown(int code) -{ - // Add keycode to buffer - key_buffer[key_write_ptr] = code; - key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; - - // Set key in matrix - key_states[code >> 3] |= (1 << (~code & 7)); - - // Trigger interrupt - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * Key released ("code" is the Mac key code) - */ - -void ADBKeyUp(int code) -{ - // Add keycode to buffer - key_buffer[key_write_ptr] = code | 0x80; // Key-up flag - key_write_ptr = (key_write_ptr + 1) % KEY_BUFFER_SIZE; - - // Clear key in matrix - key_states[code >> 3] &= ~(1 << (~code & 7)); - - // Trigger interrupt - SetInterruptFlag(INTFLAG_ADB); - TriggerInterrupt(); -} - - -/* - * ADB interrupt function (executed as part of 60Hz interrupt) - */ - -void ADBInterrupt(void) -{ - M68kRegisters r; - - // Return if ADB is not initialized - uint32 adb_base = ReadMacInt32(0xcf8); - if (!adb_base || adb_base == 0xffffffff) - return; - uint32 tmp_data = adb_base + 0x163; // Temporary storage for faked ADB data - - // Get mouse state - B2_lock_mutex(mouse_lock); - int mx = mouse_x; - int my = mouse_y; - if (relative_mouse) - mouse_x = mouse_y = 0; - bool mb[3] = {mouse_button[0], mouse_button[1], mouse_button[2]}; - B2_unlock_mutex(mouse_lock); - - uint32 key_base = adb_base + 4; - uint32 mouse_base = adb_base + 16; - - if (relative_mouse) { - - // Mouse movement (relative) and buttons - if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mb[2] ? 0x08 : 0x88)); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } - - } else { - - // Update mouse position (absolute) - if (mx != old_mouse_x || my != old_mouse_y) { -#ifdef POWERPC_ROM - static const uint8 proc_template[] = { - 0x2f, 0x08, // move.l a0,-(sp) - 0x2f, 0x00, // move.l d0,-(sp) - 0x2f, 0x01, // move.l d1,-(sp) - 0x70, 0x01, // moveq #1,d0 (MoveTo) - 0xaa, 0xdb, // CursorDeviceDispatch - M68K_RTS >> 8, M68K_RTS & 0xff - }; - BUILD_SHEEPSHAVER_PROCEDURE(proc); - r.a[0] = ReadMacInt32(mouse_base + 4); - r.d[0] = mx; - r.d[1] = my; - Execute68k(proc, &r); -#else - WriteMacInt16(0x82a, mx); - WriteMacInt16(0x828, my); - WriteMacInt16(0x82e, mx); - WriteMacInt16(0x82c, my); - WriteMacInt8(0x8ce, ReadMacInt8(0x8cf)); // CrsrCouple -> CrsrNew -#endif - old_mouse_x = mx; - old_mouse_y = my; - } - - // Send mouse button events - if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - uint32 mouse_base = adb_base + 16; - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - WriteMacInt8(tmp_data + 3, mb[2] ? 0x08 : 0x88); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } - } - - // Process accumulated keyboard events - while (key_read_ptr != key_write_ptr) { - - // Read keyboard event - uint8 mac_code = key_buffer[key_read_ptr]; - key_read_ptr = (key_read_ptr + 1) % KEY_BUFFER_SIZE; - - // Call keyboard ADB handler - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, mac_code); - WriteMacInt8(tmp_data + 2, mac_code == 0x7f ? 0x7f : 0xff); // Power key is special - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(key_base); - r.a[2] = ReadMacInt32(key_base + 4); - r.a[3] = adb_base; - r.d[0] = (key_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - } - - // Clear temporary data - WriteMacInt32(tmp_data, 0); - WriteMacInt32(tmp_data + 4, 0); -} From 97f642676b88f2df9b1bf7f10b22dc18d030d19d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 13 Jul 2018 15:44:37 +0900 Subject: [PATCH 250/534] fix caps lock again symlink adb.cpp --- BasiliskII/src/SDL/video_sdl2.cpp | 5 +++++ BasiliskII/src/adb.cpp | 4 ++-- SheepShaver/src/adb.cpp | 1 + 3 files changed, 8 insertions(+), 2 deletions(-) create mode 120000 SheepShaver/src/adb.cpp diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index d6d1ed62a..2f8d69dd8 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2115,6 +2115,7 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) static void handle_events(void) { + static bool capslock_inited; SDL_Event events[10]; const int n_max_events = sizeof(events) / sizeof(events[0]); int n_events; @@ -2177,6 +2178,10 @@ static void handle_events(void) code = keycode_table[event.key.keysym.scancode & 0xff]; } else code = event2keycode(event.key, true); + if (!capslock_inited) { + if (SDL_GetModState() & KMOD_CAPS) ADBKeyDown(0x39); + capslock_inited = true; + } if (code >= 0) { if (!emul_suspended) { if (code == 0x39) diff --git a/BasiliskII/src/adb.cpp b/BasiliskII/src/adb.cpp index 27d1de73b..c05c00008 100644 --- a/BasiliskII/src/adb.cpp +++ b/BasiliskII/src/adb.cpp @@ -152,7 +152,7 @@ void ADBOp(uint8 op, uint8 *data) break; case 3: // Address/HandlerID data[0] = 2; - data[1] = mouse_reg_3[0] & 0xf0 | (rand() & 0x0f); + data[1] = (mouse_reg_3[0] & 0xf0) | (rand() & 0x0f); data[2] = mouse_reg_3[1]; break; default: @@ -211,7 +211,7 @@ void ADBOp(uint8 op, uint8 *data) } case 3: // Address/HandlerID data[0] = 2; - data[1] = key_reg_3[0] & 0xf0 | (rand() & 0x0f); + data[1] = (key_reg_3[0] & 0xf0) | (rand() & 0x0f); data[2] = key_reg_3[1]; break; default: diff --git a/SheepShaver/src/adb.cpp b/SheepShaver/src/adb.cpp new file mode 120000 index 000000000..1cc36b981 --- /dev/null +++ b/SheepShaver/src/adb.cpp @@ -0,0 +1 @@ +../../BasiliskII/src/adb.cpp \ No newline at end of file From 61b454b68a3a4ac258bc5769a1156bdb90c257e0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 13 Jul 2018 18:38:53 +0900 Subject: [PATCH 251/534] rollback caps lock --- BasiliskII/src/SDL/video_sdl2.cpp | 5 ----- 1 file changed, 5 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 2f8d69dd8..d6d1ed62a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2115,7 +2115,6 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) static void handle_events(void) { - static bool capslock_inited; SDL_Event events[10]; const int n_max_events = sizeof(events) / sizeof(events[0]); int n_events; @@ -2178,10 +2177,6 @@ static void handle_events(void) code = keycode_table[event.key.keysym.scancode & 0xff]; } else code = event2keycode(event.key, true); - if (!capslock_inited) { - if (SDL_GetModState() & KMOD_CAPS) ADBKeyDown(0x39); - capslock_inited = true; - } if (code >= 0) { if (!emul_suspended) { if (code == 0x39) From 3db0cf3d0b2cf586fba3711b043682fc1ec11864 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 28 Oct 2018 14:56:55 +0900 Subject: [PATCH 252/534] modified for Xcode10 --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 14 ++++++-------- .../SheepShaver_Xcode8.xcodeproj/project.pbxproj | 8 ++++++-- 2 files changed, 12 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 9c8bd000b..d94c89f8a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -69,7 +69,6 @@ 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2011F23B32A006B2DF2 /* fbdevices */; }; 7539E2501F23B32A006B2DF2 /* install-sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2051F23B32A006B2DF2 /* install-sh */; }; - 7539E2541F23B32A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20A1F23B32A006B2DF2 /* keycodes */; }; 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */; }; 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */; }; 7539E2571F23B32A006B2DF2 /* linux-ppc.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */; }; @@ -969,7 +968,6 @@ 7539E1A31F23B25A006B2DF2 /* table68k in Resources */, 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, 7539E2601F23B32A006B2DF2 /* gtk-2.0.m4 in Resources */, - 7539E2541F23B32A006B2DF2 /* keycodes in Resources */, 7539E1381F23B25A006B2DF2 /* Credits.html in Resources */, 7539E25E1F23B32A006B2DF2 /* esd.m4 in Resources */, 7539E2631F23B32A006B2DF2 /* Makefile.in in Resources */, @@ -1164,7 +1162,7 @@ 753252DE1F5358D30024025B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; @@ -1173,7 +1171,7 @@ 753252DF1F5358D30024025B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; @@ -1182,7 +1180,7 @@ 753252F81F535E1E0024025B /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; @@ -1191,7 +1189,7 @@ 753252F91F535E1E0024025B /* Release */ = { isa = XCBuildConfiguration; buildSettings = { - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; GCC_WARN_INHIBIT_ALL_WARNINGS = YES; PRODUCT_NAME = "$(TARGET_NAME)"; }; @@ -1343,7 +1341,7 @@ ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; CLANG_ENABLE_MODULES = NO; CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; CLANG_WARN_OBJC_ROOT_CLASS = YES; @@ -1392,7 +1390,7 @@ ARCHS = "$(ARCHS_STANDARD_64_BIT)"; ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; - CLANG_CXX_LIBRARY = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; CLANG_ENABLE_MODULES = NO; CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; CLANG_WARN_OBJC_ROOT_CLASS = YES; diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 8ed25ba67..5b55b9543 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1112,6 +1112,7 @@ buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; COPY_PHASE_STRIP = NO; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; @@ -1136,7 +1137,7 @@ ../Unix/dyngen_precompiled, ); INSTALL_PATH = /usr/local/lib; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; @@ -1147,6 +1148,7 @@ buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; COPY_PHASE_STRIP = YES; DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = YES; @@ -1172,7 +1174,7 @@ ../Unix/dyngen_precompiled, ); INSTALL_PATH = /usr/local/lib; - MACOSX_DEPLOYMENT_TARGET = 10.6; + MACOSX_DEPLOYMENT_TARGET = 10.7; PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; @@ -1207,6 +1209,7 @@ buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; COPY_PHASE_STRIP = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; GCC_CW_ASM_SYNTAX = NO; @@ -1265,6 +1268,7 @@ buildSettings = { ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; COPY_PHASE_STRIP = NO; DEAD_CODE_STRIPPING = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; From d736cc58def8cd52e5455fd98b595f3682770cf5 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 12 Jan 2019 18:22:51 +0900 Subject: [PATCH 253/534] add pref items for scaling --- BasiliskII/src/SDL/video_sdl2.cpp | 6 ++++-- BasiliskII/src/prefs_items.cpp | 2 ++ SheepShaver/src/prefs_items.cpp | 2 ++ 3 files changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index d6d1ed62a..48ed26dc4 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -735,8 +735,8 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } } - // Apply anti-aliasing, if and when appropriate (usually in fullscreen) - SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "linear"); + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); + /* // Always use a resize-able window. This helps allow SDL to manage // transitions involving fullscreen to or from windowed-mode. @@ -852,6 +852,8 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags return NULL; } + SDL_RenderSetIntegerScale(sdl_renderer, PrefsFindBool("scale_integer") ? SDL_TRUE : SDL_FALSE); + return guest_surface; } diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 07234d397..0de2f6ee0 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -73,6 +73,8 @@ prefs_desc common_prefs_items[] = { {"mousewheelmode",TYPE_BOOLEAN,"Use WheelMode"}, {"mousewheellines",TYPE_INT32,"wheel line nb"}, {"hotkey",TYPE_INT32,false,"hotkey modifier"}, + {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, + {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index f4db6031f..b0a9f9195 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -60,6 +60,8 @@ prefs_desc common_prefs_items[] = { {"keyboardtype", TYPE_INT32, false, "hardware keyboard type"}, {"hardcursor", TYPE_BOOLEAN, false, "hardware mouse cursor"}, {"hotkey", TYPE_INT32, false, "hotkey modifier"}, + {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, + {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {NULL, TYPE_END, false, NULL} // End of list }; From 03a92c7815f4955ab581eac59630c145ec68869c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 16 Jan 2019 19:44:09 +0900 Subject: [PATCH 254/534] append pref item cpuclock --- SheepShaver/src/Unix/main_unix.cpp | 2 ++ SheepShaver/src/Windows/main_windows.cpp | 4 ++++ SheepShaver/src/prefs_items.cpp | 1 + 3 files changed, 7 insertions(+) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index d5580a517..34c104cc7 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -401,6 +401,8 @@ static void get_system_info(void) #if EMULATED_PPC PVR = 0x000c0000; // Default: 7400 (with AltiVec) + int pref_cpu_clock = PrefsFindInt32("cpuclock"); + if (pref_cpu_clock) CPUClockSpeed = 1000000 * pref_cpu_clock; #elif defined(__APPLE__) && defined(__MACH__) proc_file = popen("ioreg -c IOPlatformDevice", "r"); if (proc_file) { diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 22cafb45a..0683c4711 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -249,6 +249,10 @@ int main(int argc, char **argv) TimebaseSpeed = 25000000; // Default: 25MHz PVR = 0x000c0000; // Default: 7400 (with AltiVec) D(bug("PVR: %08x (assumed)\n", PVR)); + { + int pref_cpu_clock = PrefsFindInt32("cpuclock"); + if (pref_cpu_clock) CPUClockSpeed = 1000000 * pref_cpu_clock; + } // Init system routines SysInit(); diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index b0a9f9195..5a7f77617 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -62,6 +62,7 @@ prefs_desc common_prefs_items[] = { {"hotkey", TYPE_INT32, false, "hotkey modifier"}, {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, + {"cpuclock", TYPE_INT32, 0, "CPU clock [MHz] of system info"}, {NULL, TYPE_END, false, NULL} // End of list }; From 10de3e7239fd1bd2f2e32057ad5a37f1504981ed Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 20 Jan 2019 19:11:43 +0900 Subject: [PATCH 255/534] static link (BII/SS Windows) --- BasiliskII/src/Windows/Makefile.in | 2 +- BasiliskII/src/Windows/configure.ac | 20 ++++++++++---------- SheepShaver/src/Windows/Makefile.in | 2 +- SheepShaver/src/Windows/configure.ac | 2 +- 4 files changed, 13 insertions(+), 13 deletions(-) diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index c1ee48380..b3a3a11bc 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -39,7 +39,7 @@ CFLAGS = @CFLAGS@ $(SDL_CFLAGS) CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform @CPUINCLUDES@ -I../slirp DEFS = @DEFS@ @DEFINES@ -LDFLAGS = @LDFLAGS@ +LDFLAGS = @LDFLAGS@ -Wl,-Bstatic LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index 3a7b5e490..a13a39835 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -12,7 +12,7 @@ AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE_NAME", [Define this program name.]) AC_DEFINE_UNQUOTED(VERSION, "$PACKAGE_VERSION", [Define this program version.]) dnl SDL options. -AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) +#AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) dnl JIT compiler options. AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) @@ -527,16 +527,16 @@ dnl We really want SDL for now AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) -if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then +#if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then SDL_LIBS=`$sdl_config --static-libs` - sdl_prefix=`$sdl_config --exec-prefix` - if [[ -n "$sdl_prefix" ]]; then - SDL_LIBS=`echo "$SDL_LIBS" | sed -e "s,-l\(SDLmain\|SDL\),$sdl_prefix/lib/lib\1.a,g"` - fi - SDL_LIBS="$SDL_LIBS -lwinmm" -else - SDL_LIBS=`$sdl_config --libs` -fi +# sdl_prefix=`$sdl_config --exec-prefix` +# if [[ -n "$sdl_prefix" ]]; then +# SDL_LIBS=`echo "$SDL_LIBS" | sed -e "s,-l\(SDLmain\|SDL\),$sdl_prefix/lib/lib\1.a,g"` +# fi +# SDL_LIBS="$SDL_LIBS -lwinmm" +#else +# SDL_LIBS=`$sdl_config --libs` +#fi AC_SUBST(SDL_LIBS) AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 539d2b8a3..4c34ffac1 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -37,7 +37,7 @@ CFLAGS = @CFLAGS@ $(SDL_CFLAGS) CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp -I../Unix/dyngen_precompiled DEFS = @DEFS@ -LDFLAGS = @LDFLAGS@ -static-libgcc -static-libstdc++ -Wl,-Bstatic -lstdc++ -Wl,-Bdynamic +LDFLAGS = @LDFLAGS@ -Wl,-Bstatic #TODO remove pthread part of that if irrelevant LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 7d688981b..21571618d 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -241,7 +241,7 @@ dnl We really want SDL for now AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) -SDL_LIBS=`$sdl_config --libs` +SDL_LIBS=`$sdl_config --static-libs` AC_SUBST(SDL_LIBS) AC_DEFINE(USE_SDL, 1, [Define to enble SDL support]) AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) From 805ba753b2a492a0467deac44ef08d386da85d63 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 2 Feb 2019 19:53:00 +0900 Subject: [PATCH 256/534] SS preference "Save and Quit" button --- BasiliskII/src/extfs.cpp | 10 +- .../VMSettingsWindow.nib/designable.nib | 5202 +++-------------- .../VMSettingsWindow.nib/keyedobjects.nib | Bin 43067 -> 40992 bytes .../MacOSX/Launcher/VMSettingsController.mm | 6 + 4 files changed, 778 insertions(+), 4440 deletions(-) mode change 100755 => 100644 SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib mode change 100755 => 100644 SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib diff --git a/BasiliskII/src/extfs.cpp b/BasiliskII/src/extfs.cpp index e18d1df1f..adc8d4a0d 100644 --- a/BasiliskII/src/extfs.cpp +++ b/BasiliskII/src/extfs.cpp @@ -106,7 +106,7 @@ static uint32 fs_data = 0; // Mac address of global data static char FS_NAME[32], VOLUME_NAME[32]; // This directory is our root (read from prefs) -static const char *RootPath; +static char RootPath[MAX_PATH_LENGTH]; static bool ready = false; static struct stat root_stat; @@ -196,7 +196,7 @@ static uint32 get_creation_time(const char *path) { if (path == NULL) return 0; - if (path == RootPath) { + if (!strcmp(path, RootPath)) { static uint32 root_crtime = UINT_MAX; if (root_crtime == UINT_MAX) root_crtime = do_get_creation_time(path); @@ -435,7 +435,11 @@ void ExtFSInit(void) p->guest_name[31] = 0; // Find path for root - if ((RootPath = PrefsFindString("extfs")) != NULL) { + *RootPath = 0; + const char *path = PrefsFindString("extfs"); + if (path != NULL) { + strncpy(RootPath, path, MAX_PATH_LENGTH - 1); + RootPath[MAX_PATH_LENGTH - 1] = 0; if (stat(RootPath, &root_stat)) return; if (!S_ISDIR(root_stat.st_mode)) diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib old mode 100755 new mode 100644 index d2ec997be..ec7ab08c7 --- a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib +++ b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib @@ -1,4438 +1,766 @@ - - - 1050 - 10K549 - 851 - 1038.36 - 461.00 - - com.apple.InterfaceBuilder.CocoaPlugin - 851 - - - YES - - - - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - - - PluginDependencyRecalculationVersion - - - - YES - - VMSettingsController - - - FirstResponder - - - NSApplication - - - - 256 - - YES - - - 256 - {{145, 20}, {43, 22}} - - YES - - -1804468671 - 71304192 - 40 - - LucidaGrande - 13 - 1044 - - - YES - - 6 - System - textBackgroundColor - - 3 - MQA - - - - 6 - System - textColor - - 3 - MAA - - - - - - - 256 - {{193, 17}, {19, 27}} - - 1 - YES - - 917024 - 0 - - 1 - 40 - 1 - 10000 - 1 - YES - YES - - - - - 256 - {{17, 22}, {114, 17}} - - YES - - 67239424 - 272629760 - Volume Size (MB) - - - - 6 - System - controlColor - - 3 - MC42NjY2NjY2NjY3AA - - - - 6 - System - controlTextColor - - - - - - {229, 62} - - NSView - NSResponder - - - 13 - 2 - {{217, 242}, {580, 460}} - 1886912512 - Virtual Machine Settings - - NSWindow - - - View - - {1.79769e+308, 1.79769e+308} - {580, 460} - - - 256 - - YES - - - 274 - {{13, 59}, {554, 395}} - - - YES - - 1 - - - 256 - - YES - - - 258 - {{95, 50}, {327, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 258 - {{95, 78}, {327, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 256 - {{14, 52}, {77, 17}} - - YES - - 67239424 - 71303168 - Unix Root: - - - - - - - - - 256 - {{20, 80}, {71, 17}} - - YES - - 67239424 - 71303168 - ROM File: - - - - - - - - - 274 - - YES - - - 256 - - YES - - - 292 - {{10, 5}, {82, 32}} - - YES - - 67239424 - 134217728 - Add... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 293 - {{211, 5}, {94, 32}} - - YES - - 67239424 - 134217728 - Create... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 289 - {{417, 5}, {90, 32}} - - YES - - 67239424 - 134217728 - Remove - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 274 - - YES - - - 2304 - - YES - - - 256 - {468, 136} - - YES - - - 256 - {468, 17} - - - - - - 256 - {{469, 0}, {16, 17}} - - - - YES - - pathCol - 371 - 40 - 1000 - - 75628096 - 2048 - File - - LucidaGrande - 11 - 3100 - - - 3 - MC4zMzMzMzI5OQA - - - 6 - System - headerTextColor - - - - - 337772096 - 2048 - - - - 6 - System - controlBackgroundColor - - - - - - - - isCDROMcol - 64 - 10 - 3.4028234663852886e+38 - - 75628096 - 2048 - CDROM - - - 6 - System - headerColor - - - - - - 67239424 - 0 - - - - 1215058431 - 2 - - NSImage - NSSwitch - - - NSSwitch - - - - 200 - 25 - - 3 - YES - YES - - - - 3 - 2 - - - 6 - System - gridColor - - 3 - MC41AA - - - 17 - 312475648 - - - 2 - 4 - 15 - 0 - YES - 0 - - - {{1, 17}, {468, 136}} - - - - - 4 - - - - 256 - {{469, 17}, {15, 136}} - - - _doScroller: - 0.99350649350649356 - - - - -2147483392 - {{-100, -100}, {374, 15}} - - 1 - - _doScroller: - 0.99047620000000003 - - - - 2304 - - YES - - - {{1, 0}, {468, 17}} - - - - - 4 - - - - {{16, 42}, {485, 154}} - - - 18 - - - - - - QSAAAEEgAABBmAAAQZgAAA - - - {{2, 2}, {518, 209}} - - - - {{6, 123}, {522, 226}} - - {0, 0} - - 67239424 - 0 - Volumes - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 256 - {{14, 22}, {77, 17}} - - YES - - 67239424 - 71303168 - Boot From: - - - - - - - - - 256 - {{95, 18}, {94, 26}} - - YES - - 343014976 - 272630784 - Any - - - YES - - - 5 - YES - - YES - Any - CD-ROM - - - - - 274 - {13, 42} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - LucidaGrande - 12 - 16 - - - 3 - MC4zMzMzMzI5OQA - - - - - 338820672 - 1024 - CD-ROM - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 256 - {{390, 22}, {129, 18}} - - YES - - 67239424 - 0 - Disable CD-ROM - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{355, 17}, {22, 28}} - - YES - - -2146566624 - 0 - - 19 - 4 - 1024 - 1 - YES - - - - - 256 - {{309, 20}, {41, 22}} - - YES - - -1804468671 - 71304192 - 64 - - - YES - - - - - - - 256 - {{200, 20}, {104, 19}} - - YES - - 67239424 - 71303168 - RAM Size (MB): - - - - - - - - - 289 - {{425, 72}, {98, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - - 289 - {{425, 44}, {98, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 1 - - - - - - 200 - 25 - - - - {{10, 33}, {534, 349}} - - - Setup - - - - - 2 - - - 256 - - YES - - - 266 - - YES - - - 256 - - YES - - - 270 - {{125, 20}, {218, 18}} - - YES - - -2080244224 - 0 - Enable QuickDraw Acceleration - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{206, 132}, {143, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - LucidaGrande - 13 - 16 - - - - - - 400 - 75 - - - Window - - 1048576 - 2147483647 - 1 - - NSImage - NSMenuCheckmark - - - NSImage - NSMenuMixedState - - _popUpItemAction: - 1 - - - YES - - - OtherViews - - - YES - - - - Fullscreen - - 1048576 - 2147483647 - - - _popUpItemAction: - 2 - - - - - 3 - YES - YES - 1 - - - - - 266 - {{206, 104}, {143, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - - - - - 400 - 75 - - - 30 Hz - - 1048576 - 2147483647 - 1 - - - _popUpItemAction: - - - YES - - - OtherViews - - - YES - - - 5 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 7.5 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 10 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 15 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - - 60 Hz - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - Dynamic - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 4 - 3 - YES - YES - 1 - - - - - 268 - {{118, 80}, {86, 17}} - - YES - - 67239424 - 71303168 - Width: - - - - - - - - - 268 - {{118, 52}, {86, 17}} - - YES - - 67239424 - 71303168 - Height: - - - - - - - - - 266 - {{209, 76}, {140, 26}} - - YES - - 343014976 - 272630784 - 800 - - - YES - - - 5 - YES - - YES - 512 - 640 - 800 - 1024 - Maximum - - - - - 274 - {13, 105} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - - 3 - MC4zMzMzMzI5OQA - - - - - 1412562496 - 1024 - 800 - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 266 - {{209, 48}, {140, 26}} - - YES - - 343014976 - 272630784 - 600 - - - YES - - - 5 - YES - - YES - 384 - 480 - 600 - 768 - Maximum - - - - - 274 - {13, 105} - - - YES - - YES - - - 10 - 10 - 1000 - - 75628032 - 0 - - - - - - 3 - MC4zMzMzMzI5OQA - - - - - 1412562496 - 1024 - 600 - - - YES - - - - 3 - YES - - - - 3 - 2 - - - 19 - tableViewAction: - -765427712 - - - - 1 - 15 - 0 - YES - 0 - - - - - - 268 - {{118, 136}, {86, 19}} - - YES - - 67239424 - 71303168 - Video Type: - - - - - - - - - 268 - {{112, 108}, {92, 19}} - - YES - - 67239424 - 71303168 - Refresh Rate: - - - - - - - - {{2, 2}, {518, 177}} - - - - {{6, 155}, {522, 194}} - - {0, 0} - - 67239424 - 0 - Video Settings - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 264 - {{15, 96}, {172, 18}} - - YES - - 67239424 - 0 - Disable Audio Output - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{118, 59}, {379, 22}} - - YES - - -1804468671 - 272630784 - /dev/dsp - - - YES - - - - - - - 266 - {{118, 29}, {379, 22}} - - YES - - -1804468671 - 272630784 - /dev/mixer - - - YES - - - - - - - 264 - {{14, 61}, {99, 17}} - - YES - - 67239424 - 71303168 - Output Device: - - - - - - - - - 264 - {{14, 31}, {99, 17}} - - YES - - 67239424 - 71303168 - Mixer Device: - - - - - - - - {{2, 2}, {518, 134}} - - - - {{6, 0}, {522, 151}} - - {0, 0} - - 67239424 - 0 - Audio Settings - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - {{10, 33}, {534, 349}} - - Audio / Video - - - - - Item 4 - - - 256 - - YES - - - 266 - - YES - - - 256 - - YES - - - 256 - {{13, 75}, {130, 17}} - - YES - - 70385217 - 71304192 - Modem Port Device: - - - - - - - - - 256 - {{18, 43}, {125, 17}} - - YES - - 70385217 - 71304192 - Printer Port Device: - - - - - - - - - 256 - {{18, 13}, {126, 17}} - - YES - - 70385217 - 71304192 - Ethernet Interface: - - - - - - - - - 266 - {{146, 73}, {351, 22}} - - YES - - -1804468671 - 4195328 - - - - YES - - - - - - - 266 - {{146, 41}, {351, 22}} - - YES - - -1804468671 - 4195328 - - - - YES - - - - - - - 266 - {{146, 10}, {351, 22}} - - YES - - -1804468671 - 4195328 - slirp - - - YES - - - - - - {{2, 2}, {518, 106}} - - - - {{6, 4}, {522, 123}} - - {0, 0} - - 67239424 - 0 - Serial/Network - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 256 - {{15, 51}, {150, 18}} - - YES - - -2080244224 - 0 - Enable JIT Compiler - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{15, 11}, {333, 18}} - - YES - - 67239424 - 0 - Enable built-in 68k DR Emulator (EXPERIMENTAL) - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 256 - {{15, 31}, {236, 18}} - - YES - - 67239424 - 0 - Allow Emulated CPU to Idle - - - 1211912703 - 2 - - - - 200 - 25 - - - - - 265 - {{269, 51}, {220, 18}} - - YES - - 67239424 - 0 - Ignore Illegal Instructions - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 265 - {{269, 31}, {220, 18}} - - YES - - 67239424 - 0 - Ignore Illegal Memory Accesses - - - 1211912703 - 2 - - - - - 200 - 25 - - - - {{2, 2}, {518, 77}} - - - - {{6, 255}, {522, 94}} - - {0, 0} - - 67239424 - 0 - CPU Options - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - - 266 - - YES - - - 256 - - YES - - - 256 - {{22, 70}, {142, 18}} - - YES - - 67239424 - 0 - Use Raw Keycodes: - - - 1211912703 - 2 - - - - - 200 - 25 - - - - - 266 - {{170, 69}, {239, 22}} - - YES - - -1804468671 - 272630784 - - - - YES - - - - - - - 256 - {{14, 43}, {151, 17}} - - YES - - 67239424 - 71303168 - Mouse Wheel Function: - - - - - - - - - 256 - {{66, 15}, {99, 17}} - - YES - - 67239424 - 71303168 - Lines to Scroll: - - - - - - - - - 256 - {{170, 13}, {29, 22}} - - YES - - -1804468671 - 272630784 - 3 - - - YES - - - - - - - 256 - {{167, 37}, {163, 26}} - - YES - - -2076049856 - 2048 - - - 109199615 - 1 - - - - - - 400 - 75 - - - Page Up/Down - - 1048576 - 2147483647 - 1 - - - _popUpItemAction: - - - YES - - - OtherViews - - - YES - - - - Cursor Up/Down - - 1048576 - 2147483647 - - - _popUpItemAction: - - - - - 3 - YES - YES - 1 - - - - - 256 - {{204, 10}, {19, 27}} - - YES - - 917024 - 0 - - 59 - 1 - YES - YES - - - - - 289 - {{411, 63}, {96, 32}} - - YES - - 67239424 - 134217728 - Browse... - - - -2038284033 - 129 - - - 200 - 25 - - - - {{2, 2}, {518, 103}} - - - - {{6, 131}, {522, 120}} - - {0, 0} - - 67239424 - 0 - Mouse/Keyboard - - - - 3 - MCAwLjgwMDAwMDAxAA - - - - 3 - 0 - 2 - NO - - - {{10, 33}, {534, 349}} - - Miscellaneous - - - - - - - 0 - YES - YES - - YES - - - - - - 289 - {{374, 20}, {96, 32}} - - YES - - 67239424 - 134217728 - Cancel - - - -2038284033 - 129 - - - 200 - 25 - - - - - 289 - {{470, 20}, {96, 32}} - - YES - - 67239424 - 134217728 - Save - - - -2038284033 - 129 - - - 200 - 25 - - - - {580, 460} - - - {{0, 0}, {1440, 878}} - {580, 482} - {1.79769e+308, 1.79769e+308} - - - - 268 - - YES - - - 268 - {{18, 18}, {85, 18}} - - YES - - 67239424 - 0 - Is CDROM - - - 1211912703 - 2 - - - - - 200 - 25 - - - - {121, 54} - - NSView - - - - - YES - - - takeIntValueFrom: - - - - 282 - - - - initialFirstResponder - - - - 283 - - - - takeIntValueFrom: - - - - 291 - - - - takeIntValueFrom: - - - - 310 - - - - takeIntValueFrom: - - - - 311 - - - - takeIntValueFrom: - - - - 313 - - - - takeIntValueFrom: - - - - 314 - - - - window - - - - 318 - - - - bootFrom - - - - 319 - - - - disableCdrom - - - - 320 - - - - disableSound - - - - 321 - - - - dontUseCPUWhenIdle - - - - 322 - - - - enable68kDREmulator - - - - 323 - - - - enableJIT - - - - 324 - - - - unixRoot - - - - 325 - - - - romFile - - - - 326 - - - - browseForROMFileClicked: - - - - 327 - - - - addDisk: - - - - 328 - - - - createDisk: - - - - 329 - - - - removeDisk: - - - - 330 - - - - useRawKeyCodesClicked: - - - - 331 - - - - rawKeyCodes - - - - 332 - - - - useRawKeyCodes - - - - 333 - - - - modemPort - - - - 334 - - - - mouseWheel - - - - 335 - - - - printerPort - - - - 336 - - - - ramSize - - - - 337 - - - - ramSizeStepper - - - - 338 - - - - mixDevice - - - - 339 - - - - outDevice - - - - 340 - - - - qdAccel - - - - 341 - - - - height - - - - 342 - - - - width - - - - 343 - - - - videoType - - - - 344 - - - - refreshRate - - - - 345 - - - - scrollLines - - - - 346 - - - - scrollLinesStepper - - - - 347 - - - - ignoreIllegalMemoryAccesses - - - - 348 - - - - ethernetInterface - - - - 349 - - - - diskSaveSizeField - - - - 351 - - - - diskSaveSize - - - - 353 - - - - delegate - - - - 355 - - - - disks - - - - 368 - - - - browseForUnixRootClicked: - - - - 369 - - - - ignoreIllegalInstructions - - - - 372 - - - - saveChanges: - - - - 373 - - - - cancelEdit: - - - - 374 - - - - browseForKeyCodesFileClicked: - - - - 378 - - - - browseRawKeyCodesButton - - - - 379 - - - - isCDROM - - - - 383 - - - - isCDROMcheckbox - - - - 384 - - - - - YES - - 0 - - YES - - - - - - -2 - - - File's Owner - - - -1 - - - First Responder - - - -3 - - - Application - - - 141 - - - YES - - - - - - DiskSize - - - 142 - - - YES - - - - PrefsWindow - - - 143 - - - YES - - - - - - - - 144 - - - YES - - - - - - - - 145 - - - YES - - - - - - 147 - - - YES - - - - - - 148 - - - YES - - - - - - - 157 - - - YES - - - - - - - - - - - - - - 230 - - - YES - - - - - - - - - - - - - - - - - - 231 - - - YES - - - - - - 232 - - - YES - - - - - - 233 - - - YES - - - - - - 234 - - - YES - - - - - - 235 - - - YES - - - - - - 236 - - - YES - - - - - - 237 - - - YES - - - - - - 238 - - - YES - - - - - - 239 - - - YES - - - - - - 240 - - - YES - - - - - - - - - 241 - - - YES - - - - - - 242 - - - YES - - - - - - 243 - - - - - 244 - - - - - 245 - - - YES - - - - - - 246 - - - YES - - - - - - 247 - - - YES - - - - - - 248 - - - YES - - - - - - - - - 249 - - - - - 250 - - - - - 251 - - - YES - - - - - - - 252 - - - YES - - - - - - 253 - - - - - 254 - - - - - 255 - - - - - 256 - - - - - 257 - - - - - 258 - - - - - 259 - - - - - 260 - - - - - 261 - - - - - 262 - - - - - 263 - - - - - 264 - - - - - 265 - - - - - 266 - - - YES - - - - - - 267 - - - YES - - - - - - 268 - - - YES - - - - - - 269 - - - - - 270 - - - - - 271 - - - - - 358 - - - YES - - - - - - 359 - - - YES - - - - - - - - 360 - - - YES - - - - - - 361 - - - - - 362 - - - YES - - - - - - 363 - - - - - 364 - - - YES - - - - - - 365 - - - - - 195 - - - YES - - - - - - - - - - 192 - - - YES - - - - - - 370 - - - YES - - - - - - 190 - - - YES - - - - - - 193 - - - YES - - - - - - 191 - - - YES - - - - - - 228 - - - - - 226 - - - - - 229 - - - - - 371 - - - - - 227 - - - - - 194 - - - YES - - - - - - - - - - - 214 - - - YES - - - - - - 225 - - - - - 215 - - - YES - - - - - - 224 - - - - - 216 - - - YES - - - - - - 223 - - - - - 217 - - - YES - - - - - - 222 - - - - - 218 - - - YES - - - - - - 221 - - - - - 219 - - - YES - - - - - - 220 - - - - - 203 - - - YES - - - - - - - - - - - - - 196 - - - YES - - - - - - 197 - - - YES - - - - - - 198 - - - YES - - - - - - 199 - - - YES - - - - - - 200 - - - YES - - - - - - 201 - - - YES - - - - - - 202 - - - YES - - - - - - 204 - - - - - 205 - - - YES - - - - - - 206 - - - YES - - - - - - - 207 - - - - - 208 - - - - - 209 - - - - - 210 - - - - - 211 - - - - - 212 - - - - - 213 - - - - - 150 - - - YES - - - - - - - - - - 158 - - - YES - - - - - - 161 - - - YES - - - - - - 164 - - - YES - - - - - - 159 - - - YES - - - - - - 160 - - - YES - - - - - - 169 - - - - - 170 - - - - - 165 - - - - - 168 - - - - - 171 - - - - - 153 - - - YES - - - - - - 182 - - - - - 151 - - - YES - - - - - - 184 - - - YES - - - - - - 185 - - - YES - - - - - - - 187 - - - - - 186 - - - - - 156 - - - YES - - - - - - 172 - - - YES - - - - - - 173 - - - YES - - - - - - - - - - - - 179 - - - - - 178 - - - - - 177 - - - - - 176 - - - - - 175 - - - - - 174 - - - - - 152 - - - YES - - - - - - 183 - - - - - 162 - - - YES - - - - - - 167 - - - - - 154 - - - YES - - - - - - 181 - - - - - 149 - - - YES - - - - - - 188 - - - - - 155 - - - YES - - - - - - 180 - - - - - 163 - - - YES - - - - - - 166 - - - - - 375 - - - - - 376 - - - YES - - - - - - 377 - - - - - 380 - - - YES - - - - IsCDROM - - - 381 - - - YES - - - - - - 382 - - - - - 388 - - - YES - - - - - - 390 - - - - - 391 - - - - - - - YES - - YES - -3.IBPluginDependency - 141.IBEditorWindowLastContentRect - 141.IBPluginDependency - 141.ImportedFromIB2 - 142.IBEditorWindowLastContentRect - 142.IBPluginDependency - 142.IBWindowTemplateEditedContentRect - 142.ImportedFromIB2 - 142.NSWindowTemplate.visibleAtLaunch - 142.windowTemplate.hasMinSize - 142.windowTemplate.minSize - 143.IBPluginDependency - 143.ImportedFromIB2 - 144.IBPluginDependency - 144.ImportedFromIB2 - 145.IBPluginDependency - 145.ImportedFromIB2 - 147.IBPluginDependency - 147.ImportedFromIB2 - 148.IBPluginDependency - 148.ImportedFromIB2 - 149.IBPluginDependency - 149.ImportedFromIB2 - 150.IBPluginDependency - 150.ImportedFromIB2 - 151.IBPluginDependency - 151.ImportedFromIB2 - 152.IBPluginDependency - 152.ImportedFromIB2 - 153.IBPluginDependency - 153.ImportedFromIB2 - 154.IBPluginDependency - 154.ImportedFromIB2 - 155.IBPluginDependency - 155.ImportedFromIB2 - 156.IBPluginDependency - 156.ImportedFromIB2 - 157.IBPluginDependency - 157.ImportedFromIB2 - 158.IBPluginDependency - 158.ImportedFromIB2 - 159.IBPluginDependency - 159.ImportedFromIB2 - 160.IBPluginDependency - 160.ImportedFromIB2 - 161.IBPluginDependency - 161.ImportedFromIB2 - 162.IBPluginDependency - 162.ImportedFromIB2 - 163.IBPluginDependency - 163.ImportedFromIB2 - 164.IBPluginDependency - 164.ImportedFromIB2 - 165.IBPluginDependency - 166.IBPluginDependency - 167.IBPluginDependency - 168.IBPluginDependency - 169.IBPluginDependency - 170.IBPluginDependency - 171.IBPluginDependency - 172.IBPluginDependency - 173.IBEditorWindowLastContentRect - 173.IBPluginDependency - 173.ImportedFromIB2 - 174.IBPluginDependency - 174.ImportedFromIB2 - 175.IBPluginDependency - 175.ImportedFromIB2 - 176.IBPluginDependency - 176.ImportedFromIB2 - 177.IBPluginDependency - 177.ImportedFromIB2 - 178.IBPluginDependency - 178.ImportedFromIB2 - 179.IBPluginDependency - 179.ImportedFromIB2 - 180.IBPluginDependency - 181.IBPluginDependency - 182.IBPluginDependency - 183.IBPluginDependency - 184.IBPluginDependency - 185.IBEditorWindowLastContentRect - 185.IBPluginDependency - 185.ImportedFromIB2 - 186.IBPluginDependency - 186.ImportedFromIB2 - 187.IBPluginDependency - 187.ImportedFromIB2 - 188.IBPluginDependency - 190.IBPluginDependency - 190.ImportedFromIB2 - 191.IBPluginDependency - 191.ImportedFromIB2 - 192.IBPluginDependency - 192.ImportedFromIB2 - 193.IBPluginDependency - 193.ImportedFromIB2 - 194.IBPluginDependency - 194.ImportedFromIB2 - 195.IBPluginDependency - 195.ImportedFromIB2 - 196.IBPluginDependency - 196.ImportedFromIB2 - 197.IBPluginDependency - 197.ImportedFromIB2 - 198.IBPluginDependency - 198.ImportedFromIB2 - 199.IBPluginDependency - 199.ImportedFromIB2 - 200.IBPluginDependency - 200.ImportedFromIB2 - 201.IBPluginDependency - 201.ImportedFromIB2 - 202.IBPluginDependency - 202.ImportedFromIB2 - 203.IBPluginDependency - 203.ImportedFromIB2 - 204.IBPluginDependency - 205.IBPluginDependency - 206.IBPluginDependency - 206.ImportedFromIB2 - 207.IBPluginDependency - 207.ImportedFromIB2 - 208.IBPluginDependency - 208.ImportedFromIB2 - 209.IBPluginDependency - 210.IBPluginDependency - 211.IBPluginDependency - 212.IBPluginDependency - 213.IBPluginDependency - 214.IBPluginDependency - 214.ImportedFromIB2 - 215.IBPluginDependency - 215.ImportedFromIB2 - 216.IBPluginDependency - 216.ImportedFromIB2 - 217.IBPluginDependency - 217.ImportedFromIB2 - 218.IBPluginDependency - 218.ImportedFromIB2 - 219.IBPluginDependency - 219.ImportedFromIB2 - 220.IBPluginDependency - 221.IBPluginDependency - 222.IBPluginDependency - 223.IBPluginDependency - 224.IBPluginDependency - 225.IBPluginDependency - 226.IBPluginDependency - 227.IBPluginDependency - 228.IBPluginDependency - 229.IBPluginDependency - 230.IBPluginDependency - 230.ImportedFromIB2 - 231.IBPluginDependency - 231.ImportedFromIB2 - 232.IBPluginDependency - 232.ImportedFromIB2 - 233.IBPluginDependency - 233.ImportedFromIB2 - 234.IBPluginDependency - 234.ImportedFromIB2 - 235.IBPluginDependency - 235.ImportedFromIB2 - 236.IBPluginDependency - 236.ImportedFromIB2 - 237.IBPluginDependency - 237.ImportedFromIB2 - 238.IBPluginDependency - 238.ImportedFromIB2 - 239.IBPluginDependency - 239.ImportedFromIB2 - 240.IBPluginDependency - 240.ImportedFromIB2 - 241.IBPluginDependency - 241.ImportedFromIB2 - 242.IBPluginDependency - 242.ImportedFromIB2 - 243.IBPluginDependency - 244.IBPluginDependency - 245.IBPluginDependency - 245.ImportedFromIB2 - 246.IBPluginDependency - 246.ImportedFromIB2 - 247.IBPluginDependency - 247.ImportedFromIB2 - 248.IBPluginDependency - 248.ImportedFromIB2 - 249.IBPluginDependency - 249.IBShouldRemoveOnLegacySave - 250.IBPluginDependency - 250.IBShouldRemoveOnLegacySave - 251.IBPluginDependency - 251.ImportedFromIB2 - 252.IBPluginDependency - 252.ImportedFromIB2 - 253.IBPluginDependency - 253.IBShouldRemoveOnLegacySave - 254.IBPluginDependency - 255.IBPluginDependency - 256.IBPluginDependency - 257.IBPluginDependency - 258.IBPluginDependency - 259.IBPluginDependency - 260.IBPluginDependency - 261.IBPluginDependency - 262.IBPluginDependency - 263.IBPluginDependency - 264.IBPluginDependency - 265.IBPluginDependency - 266.IBPluginDependency - 266.ImportedFromIB2 - 267.IBPluginDependency - 267.ImportedFromIB2 - 268.IBPluginDependency - 268.ImportedFromIB2 - 269.IBPluginDependency - 270.IBPluginDependency - 271.IBPluginDependency - 358.IBPluginDependency - 359.IBPluginDependency - 360.IBPluginDependency - 361.IBPluginDependency - 362.IBPluginDependency - 363.IBPluginDependency - 364.IBPluginDependency - 364.ImportedFromIB2 - 365.IBPluginDependency - 370.IBPluginDependency - 370.ImportedFromIB2 - 371.IBPluginDependency - 375.IBPluginDependency - 375.ImportedFromIB2 - 376.IBPluginDependency - 377.IBPluginDependency - 380.IBEditorWindowLastContentRect - 380.IBPluginDependency - 381.IBPluginDependency - 382.IBPluginDependency - 388.IBPluginDependency - 390.IBPluginDependency - 391.IBPluginDependency - - - YES - com.apple.InterfaceBuilder.CocoaPlugin - {{899, 941}, {229, 62}} - com.apple.InterfaceBuilder.CocoaPlugin - - {{739, 322}, {580, 460}} - com.apple.InterfaceBuilder.CocoaPlugin - {{739, 322}, {580, 460}} - - - - {580, 460} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{601, 517}, {143, 143}} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{196, 720}, {138, 43}} - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - {{705, 948}, {121, 54}} - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - com.apple.InterfaceBuilder.CocoaPlugin - - - - YES - - - YES - - - - - YES - - - YES - - - - 391 - - - - YES - - VMSettingsController - NSWindowController - - YES - - YES - addDisk: - browseForKeyCodesFileClicked: - browseForROMFileClicked: - browseForUnixRootClicked: - cancelEdit: - createDisk: - removeDisk: - saveChanges: - useRawKeyCodesClicked: - - - YES - id - id - id - id - id - id - id - id - id - - - - YES - - YES - addDisk: - browseForKeyCodesFileClicked: - browseForROMFileClicked: - browseForUnixRootClicked: - cancelEdit: - createDisk: - removeDisk: - saveChanges: - useRawKeyCodesClicked: - - - YES - - addDisk: - id - - - browseForKeyCodesFileClicked: - id - - - browseForROMFileClicked: - id - - - browseForUnixRootClicked: - id - - - cancelEdit: - id - - - createDisk: - id - - - removeDisk: - id - - - saveChanges: - id - - - useRawKeyCodesClicked: - id - - - - - YES - - YES - bootFrom - browseRawKeyCodesButton - disableCdrom - disableSound - diskSaveSize - diskSaveSizeField - disks - dontUseCPUWhenIdle - enable68kDREmulator - enableJIT - ethernetInterface - height - ignoreIllegalInstructions - ignoreIllegalMemoryAccesses - isCDROM - isCDROMcheckbox - mixDevice - modemPort - mouseWheel - outDevice - printerPort - qdAccel - ramSize - ramSizeStepper - rawKeyCodes - refreshRate - romFile - scrollLines - scrollLinesStepper - unixRoot - useRawKeyCodes - videoType - width - - - YES - NSComboBox - NSButton - NSButton - NSButton - NSView - NSTextField - NSTableView - NSButton - NSButton - NSButton - NSTextField - NSComboBox - NSButton - NSButton - NSView - NSButton - NSTextField - NSTextField - NSPopUpButton - NSTextField - NSTextField - NSButton - NSTextField - NSStepper - NSTextField - NSPopUpButton - NSTextField - NSTextField - NSStepper - NSTextField - NSButton - NSPopUpButton - NSComboBox - - - - YES - - YES - bootFrom - browseRawKeyCodesButton - disableCdrom - disableSound - diskSaveSize - diskSaveSizeField - disks - dontUseCPUWhenIdle - enable68kDREmulator - enableJIT - ethernetInterface - height - ignoreIllegalInstructions - ignoreIllegalMemoryAccesses - isCDROM - isCDROMcheckbox - mixDevice - modemPort - mouseWheel - outDevice - printerPort - qdAccel - ramSize - ramSizeStepper - rawKeyCodes - refreshRate - romFile - scrollLines - scrollLinesStepper - unixRoot - useRawKeyCodes - videoType - width - - - YES - - bootFrom - NSComboBox - - - browseRawKeyCodesButton - NSButton - - - disableCdrom - NSButton - - - disableSound - NSButton - - - diskSaveSize - NSView - - - diskSaveSizeField - NSTextField - - - disks - NSTableView - - - dontUseCPUWhenIdle - NSButton - - - enable68kDREmulator - NSButton - - - enableJIT - NSButton - - - ethernetInterface - NSTextField - - - height - NSComboBox - - - ignoreIllegalInstructions - NSButton - - - ignoreIllegalMemoryAccesses - NSButton - - - isCDROM - NSView - - - isCDROMcheckbox - NSButton - - - mixDevice - NSTextField - - - modemPort - NSTextField - - - mouseWheel - NSPopUpButton - - - outDevice - NSTextField - - - printerPort - NSTextField - - - qdAccel - NSButton - - - ramSize - NSTextField - - - ramSizeStepper - NSStepper - - - rawKeyCodes - NSTextField - - - refreshRate - NSPopUpButton - - - romFile - NSTextField - - - scrollLines - NSTextField - - - scrollLinesStepper - NSStepper - - - unixRoot - NSTextField - - - useRawKeyCodes - NSButton - - - videoType - NSPopUpButton - - - width - NSComboBox - - - - - IBProjectSource - Launcher/VMSettingsController.h - - - - - 0 - IBCocoaFramework - - com.apple.InterfaceBuilder.CocoaPlugin.macosx - - - - com.apple.InterfaceBuilder.CocoaPlugin.macosx - - - - com.apple.InterfaceBuilder.CocoaPlugin.InterfaceBuilder3 - - - YES - ../../SheepShaver.xcodeproj - 3 - - YES - - YES - NSMenuCheckmark - NSMenuMixedState - NSSwitch - - - YES - {9, 8} - {7, 2} - {15, 15} - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Any + CD-ROM + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 512 + 640 + 800 + 1024 + Maximum + + + + + + + + + + + + 384 + 480 + 600 + 768 + Maximum + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib old mode 100755 new mode 100644 index b27171c4a97d2a2cd2d63e32abc20b9d5d0c5c32..3084f3893359506779a8e4b814c04da1ea4a57f3 GIT binary patch literal 40992 zcmeEvcYG98`|mktW_D&anaL#dzNC;wNe@*LLJN>klF*AGS&~2+n}jMbCp2k-pokRd zAVpBRh#*Zs6cK5P2&gEC3J6FMNj?3C*&RhW1^GSw3kD9hXA~Fp@=teUWaq%{RR7|F zLLY=DE!pVJHANzlP#xrl{80#Mh$2unDnygeEc7Z`fZj(t(LS^veT!jz?{e>P+qga4N8Aza6YeN? zoco%)#C^wI<9^|O<$mY>a1kYB;Cl`Stue{3iYbeiwg$KgfT~ zALUQ-r}*>yxBU0~ulx=ErXUI)LM_2p@DqZC5Fu1(C`1U6LX;3IG!|M2ZH0D12O(ML zDs&Ti2rmlhLXI$47$Ou3BZW~ysW4u6S(q)%5f%swg+;Ms_X=~|h>0;?+ z>22v_dC@Y&l4}`Z(Jj<6$uiS2%QDaMre(fmvE^;c8p}q@yOyn%J(iCwpIS~@PFcRT zd~f-|@{8qH%WsxjmcJOoiHcZRtS;6NZDOz(B8G}#ViU2c*iLLOb`iUZ-NY0midpc^ z7IVZru|ym#mWt!W3E~uSt+-BHFTNvg5Vwds#ogjD@vQijcuD+D{6+j#ye;05WJ!@K zNj0TlsXh{=22!*XBPB>}VY{8wS?VJ7l?K4}i&D0fBMp^Gq+!xEfWyV5pkyR=LCQ2I#vL^>*+kiL{oO6R0+qziEN zMd^xk4ZeSoZcBHhKct7UAX{Wnw#weJk6cx*B?rq5oS!~lW&`LcXdz9au_6|It0vwB;rTWeT-t$x<})&|xnYqT}S8f$G~eZktnnr!WE?P2X{ z?Qb1m9bzr8jjCTM z))Uq*t>>)YSkGI(wO+7Zw0>{>!FtvDv-P_5hV_p159 zcvSVM!N(Q!} ziRdiZgEpYg)EG5ZZLBs?o2t#kHEMIUh5CZpQjJsN)mCbP+FEU+wpH7y?bSrJgW6H; zq$a7!YG<{J+EwkQrl_fEn%Z6Mq4rdJslC-cYG1XV+Fu=@zNn_F1Jw*QQ?;vu)GRey z%~1!dL)2U~Pt8{g)IxQr>QIZ+VzoparVdv};Lp{O>L_)z`jR?E9jlI0b(N~6>Ued6 zI#HdZPF7!5r>IlaY3g)!hWd&+Q=O&0s?JvDsIRH7t8>*i)OqTg>U?#9x=>xDzNIc! zm#9nCW$JQug}PE*rLI=rR@bO&)phE6^&NGCx>0>seNWw_ZdSLbTh(pqc6EpPzPeNW zK;5N&sP0zxs2{0&)qU!I^?-U%{a8Ju9#)U2pQuOGPu0)VW9sMXarF!Jg!-j=Qaz=f zR?nzs)vwgA)pP1M>Us5B^@4g)y`+Apey{$ZURHlpe^RfgSJj`@Yw9oRuj+5=b@hgN zQ~h1NrQTNWsDG$;)qCoF^?~}Q`cVB#{o4zB@oE0~CAqohkc_Oz19>6^smKdy$Q${f z3aBEgges#ds4A+4s>8b`s)cHIPfqDpP*B`2IVGVWKOYnt=(eK1$tj(4GK;#W=a$%u z254UJ(^Pim9w_Ym-O)Z0j#o=giODO;L`fzk>6B}%3-Cd?Sjsh_#C`(Vpv`rW zZy#tFJ2N>w&#rSiKR~P4Jt@UrT%41iRRr}HI|_1h?T!;D0M$c*D5$r2p?oOb)7-Qd z^@lo2ii!*J%vLXha=|@aeQ*MW!jVP_;PACZ_qt2)c>WaFd6qJh6P7HK`bd4AzF1$WuhTc_hxKFnN&UQjLBFj3Ofg5XOtDIFMT%=sT!&(Rikng# zM{!$fyJPNEz%7!84btBCSYJ}Q9TOerXFWY~eVTHA|YaMBqg_DD|Yls?d&3u7(oFX%1L zp`pluir~CrRDy<~;b;UJiAJH(=p{4;jYZ?&MNuglk0zjrz}X4*++3)mtpi4LfL0s$ zE;koguv0-+PDXler}U8pCB?0C946Nre4cC{QQXa5R9KLoX?Fncq?8oe9m8_$!+|h% z3^=d5^H{jUxpnh1}-1MxXUdbtK^4U;l4$uOUQ&QoCwmJ6P%=p}#to%HC zK2)7ioS0u^FD~kCnvuGqdq{c<-3l*H9eHCUYve36(19kqHS%RN1x-cM;57r9HxpPb zrDPx@tBB$)6d$En*SqLlD4xRV@Bt4{hJXiNoyqDsSBt47KMsXz_$rm&)v=A*qZ=uC#30jJlq2*`=T8UPn)#z=Yc@0{N z)gK-kp9uv}r(WBqVj+r`WliwW;&=p1t?G648oHM(>&JvaMW3S2&@uEm8wo}ttD1Ej+fFG=Hzs5P zj8twx7CQu!$!tk=y`pB(E9jNFo7WqlRVaq8d!oUo(3j{WT#8-tG&+OMqOZ_VsG~=A zPO*8JJeX;07=V1J+7Pnk*KQS#62fia8mCv*tDi*Qp!4WksObW_h%TY;Qj=2>TZ1G` zOh|w#lL|8Jxtgq3(U4y41o{EWT}D5`frgnterIp*Y=peC)1ik5bXy+C{dV2rd-d$q z+a`Vkj#?GalMRtqdPY%Ue3verSkLAIWkwG__VLGQa0%h>%Lc5j#}57HA3~%Ulo^N;L zWZ2p{(ns3brRU|P+ael9*t$3h2Ib^FgKBot|Ku+(w}jEn{_4QnvuH?4NBC|C^iRl4 zZ_TzF!}g|(^foEZ?VpF`bWeuuIE09AVR5T&u-yT+2bK&;i-+y{u)Theqiq^&zX023 zvrF2u?I?t}%A>MVd%$*W*zS-&Fu5~qH-+u&jG~0zupI>3%d+i>Y@DFaxKDD56H{Ru zuE+i6DCow@!}Q>rXWCo0G57O>h7@#UH2A{)Ek(mp*nWfNQP~NMPPi6-dT@G&F0fq> zwr|^W+p+Rck5Ij^xC^TjehaPhbCcP1<6wKPy~t=U{1#3ZXQ#3;i$KWYTkJ?>=K^h( z)Im9I6Jfh8Y>&uxv}gOFy_VgDxdxv>pI9C`O1iPOLmS1m_WU%~hm0@ubVr+Zunm1B z?n2#hIwa+*4T6%na2~72tce*7=6S4+0(i4utlld|y&2ByF?b`P_DaynHh?*Pf#cb* zl?3yY?HK{|<-vCX>@9&~S+MPXl?VeK>0;1o(!h?ht6X(nr2x*zG_GZy$69I9mH;&8 zg9VUo&}Oupufm6c;~&O11Gm2gA7)(50VPJF2FCv8#y;0o%UjOccD3xPLxEQJ*1PwY zs}J`=e-%T`xzIweVhkFJfSQLu_YmjV<-KWKaaQ$`pu)nruXIi9zX~Wbsj!tg2IORX zKJ&&ujG8&V?jzjbv2p9{&KCx!WIn|gFiye=;kfXva1z8aa0Rx`0o3q~@KqT- zUEKJA^*!U99Qe$EHo7>#pphoRowdL&`Z0jBHQWdA00uq_1gP~jjJ$DwVmR3 z^!?KF&`X2zXH_pO?7!-zKkbF(N7*>oCnx`rj7sZ=y&LvR*ov_AVYkA*EiVyvChXU+ zQ(;Tt$Te;bx0U;ld!O6MeTr=GYbUptd*9ev&+UTOdu8W6&f(@fdYr=ko5|GdkFOXB_5|3*}O*7aVnQ0&8D3@PWgSPU+6} zy3a4hLpI=ya(TuiT8{gy!V1hx^Gc>na9z{YuLg&>)sPF0RX&_C9Oz)a2b=BrAWLkI zm0^;YNg?1!+{YNhXUqh?HXqI>f@JE9YD>Te%Q*f8zBS*N z$uaj9K<#FKF^TqU>fL9C-O?1`!Zwybqi&;hme!W`mbS|&c?Q`!>qGa7;q5f%>GjoD1B3_`cM8nzIw{AossW0<**XI}!~4_@Hg zRRgW+2im#;v?>;y+Bk4xJAl)g3QlT&Xh$}Tqyu{PCGgrNfpaqpoRIn8T&w_BVgoo2 z+rbpx3n2MXfXPn*NPZFY*EMtl{ek|(7>iiJ6>v3N2M6F#904Ht3%CvLguCHh_(cH7 z^Kl8l&I~?LXxXN5zt^wDWOW--^wsPu`q7EEQ2khEz>QF0L=Z!@&y36cSKRF z20(2Kv9p*i7K@X_Hvxv-Bc2d1i}xfCsg4vOwUv5H`BJGgS6VCW25|Hz=}%dc1LUT1 zXE_tV&6)BFc_%=Zm*qbJrVIp7GSxcRO0Dy(8>|NbTD%3&p|3|1kFFj$9=gXok9R!| zdtCCk@9ER3f|$~oxStC zr+csUKH`1FNA#)Z)5a&$XM)dipZz}HSKuo6RY<6iQDJ%8ZcC`v?y;*C2tzT+at{qo@2-8d zPK7!z)XAyyTAe+0ezsMz#oKai^K1ufH|o}`+rDl|-KBMp)&0{q&^OJu)OVxrc|WUP zW4}RuuleosyWwBQKgs_k|8@Rf2gm`91F{3&2sjjQw_aeq9`z>I+g|TVVAa6Hz)^wg z0>24Tf?5U*4O$j-GT0K_ICx0#qTu5pBqTZ{J7ht~=bQRo--h5AkE=ht6W z|4akV2JsDsHCWf+Qp3s(J2fnAxV_%C5OX!wKla7g zg|TNES8Uv+@$|-rn+Q!>H5u1rSCjiqW11E>-PH7Yvj)wEG+W#3O7p^f8WBl zMS6>+EiS%bd*Q_wmb`GWW!;wPEtj?YF3vA5Gj3JfPw~O=gX7o7|JEw3m7~?xR(BJc zCX7k=s5RHRUF)f>kG1h>lh$T_n{V6tw#{n0uI-I>(d|aJ`>4IpzGM4W+n-6Sm6(yZ zChE!6NGl?X1NSc%MO>#hTe)9ItsB>cHIi1gU3G6bo z%LiR8UAuH$(Dlb|;oV;9b||Gn%7B!$DSxE4N}ZW{E-fgnByC@JukL-jujzibN9!K5 zdtB_C>jq>wPZwjqW?C@9BPl{YLaV(!YBD-2NX9 z@EVXlVDpQ@i#=Xk`{Kj&&gsk2?+i>FxNzW&jD(CgGOlIDWxkeq)!xEB+y2v_7K3IF zx{}o*YfjeH?3UScvwz7+$eEvWb8!2?iwEBw(s{`0A&+u< z+65yDz9898O-Povt7S~;2@oiTdfOLbqOFI^fFKW6DzJa*vNedGMbO&E7sZ>PUa zt#kr{_WV-|S}oYPu;#)k3-2z< zTy)~CxVJVeuC;jD;s;A|mYiMMZt1pV^_I1>aW%L zt1rIY?d=0=V%Mx$TXXHqb!1)1x~uE^u0Q@x>vwi+Xs}`F#>yL~y^G#0dH3h{UVQKL zrjDETZEn1I!_`&L3b$2cJ zu+oP!cUyN)*!^hFs6BT+D*Wh|y;*y|-#1|2x&1x&pFGg@z_EiJ4<7!w?Z^8M#UI*p zxW(aJN17ga|C7d_Y(E-vbla!VpKkpu`m?RaVvcS5JofV)$D17A`9n|@l23hcI_>n?GkwooJezs;%2&Bx-TZpk*MFYV!HA!FUOPYc+nV1lyAXU~ zC^90zB~7Q#`o8LDEi^y+dW#~5){Ma6|+zoWog*`0;1K$U-6{h?RaYXT-!Yk;O@n8)xC*X{ ztDzEH9oN7$aV@~GXQBz%2H#__ANB{ECIHt%qj3-p#vx$e)Q2ObxDk{IhkX%HCJIVV z0N~Dmx1AVaYPuuK4v?jd0d+=j!-Txsj3`XcXL$>$1qHdOIfZ7_2B5Z*ynF_(I_yO` zqaY-bQamyjpmK=#I8S#~2pA|JoLO0{jDgfAr56op3xHukey0L}YX@k4Zb+)Ds2i4V z)C|CDYkRIeE4>&lQWdZ}0AT_3&&_36BUIhq&WujLI?Z4aG_G60aC0XBvZ*G@K0vGa z9AXSgfO{B!nN&gz?HoCo2Brwr#vAc1BLwy2rF-OL7H7i{8)&fEG0;in9pO3^s4fGH z+X2*D2oySd4IoUjw^K(JLbN9rz<%9NS7Z(AilqDM^#Pk~rYnANU?Q_W-QO=R(%h`@ z2>wpIs3T*8{eZ{-(qm=4sa_9G4Ul_|4v(mBi;5Tn+--!D7-DS_)zsi#+yrGU#ZC1< z-S#zFfm?tz+!DtD_r>E@I03gtn{Zp)4!1{VaUyV0M|gE&;{koeaB}Fj_V#p$daxg` zKPi2Lt4kmtVlW3Aa_FJNB4dZ0!REmIMk#hePQI}T6(wc@rkgV;$L;`lJ4_GuYj^$8 zql>J?F|uDApknM#59%6r2BHZ*5I@DL56U`G7AGr#I3=_4;}P zJ;Yl=UCPjL+!Oa==(t}TV0G-z+p{Kv!QJLL?uYxE^SpJK&6w$7Y^Fa3f8&fY$7YUR{4bUn( zW#02Kcsv%5Gkc^{Si_jGh}iJx$k<4f3_o0du`Y24;ZSJW_!X}9nf)*kPXd|lHbs`< ziBAY)JjEbv8W7eP2y4nyS3}qi zf;%|_JC_tgd<$q~@%RGAa=Z$^je_B_aI9>vTMQMi!|PE21WDudPGvz-yb<`!j3JHy z7kear7rzIpWi#G_w_>ni@D7OdO)$8+eTgC0yEt+R91ycPtaTGt-Ntv zi2a>`+FUV7R^Q9`L%bXB!Fxb$m9iit38bVpB{kt+hm1A|isSt#Yl&`yz~1Q5QDIH$ z+hQV(Xk<)%TV%wTF}+7eM2FS4#YTsXIgbycMc|izf{%g__|yn2f>^+x;bZu7d>s7s z6Ce;y;#1JlGx#h_m#^_TBV^PC!XO2iIT?mDAC{gA+}Wz6xVRwS8B?slL^9|Yh$q|G zpqsHKkm?Y~Z8Nka2Tp-q2E&wq(_?Ha$@f z@sVJU-X6xGo!&wB^2W0?+N+fVLeBPv4I7pTFSHwf%Y>JvF_G299RKg}4yz zfxkB;i+T7*{1fOe^YBXiql>pdl?^oN@0LCsnv?)hup+aNJAYimzZm?HtasO2e*LT< zI=+r?0C#LLV!+eP7_i<|?<@fqu-J4LU;z*@qen+Jfia7SU;`N*0b>dg<}u&m2l!72 zLpbn50BJ|S$X7tc_%DbFPX=S>Z~O?2BN%NV9GXdZbP2v8Moc7BYQ%g^MQP83`N<|D zi{C<5yZtJ1Mla#|P6eClD9O)&5zRER10V)|jN;E&l=@TMi{deqG=NVTQW(bR=s)ll z@nF0KM5*{1(M;YV6@1z^?rMyvo}wq~-PmAiq`x!VY;)R$q%!g$RY+Bs)CSA20I8m; zr@=U-49_Xf$Tmif)F3q>I_erbqoiq@EF(3**3C3y*a?{+3Eakv*hpPt%zEnm^p;;e zHfF|rCjKOVjTi}nR|uQSdLO+v8?Rn^FK;Y8Yt9116-L5IxNFYhdlX-%_*eMXkuguh zA!(pVv@yD|U~aI{{ns4`BsX<+Ae#-)cRlsKtnWaux%w`?Br~VL1`@8Yq}bJV=#KnM z_qNBARz}+g=)?4uO!C+aNe1o45@|!)l6D4%mXZ#7iC(O~2$mAkiwvPdI-#uPB#9)G z&U(6@t>-ao$USR>b>1j6l5`^}Ea?Fdzj(+ODTVa533`S;kR?0}fEQzTkXzwV&><0F ztV5zA4aOhyRhbTd8|;?lV7V+MeMu72;=tEC$Uu@oG7U5CH3;?t5z!Fe*M0O%-R=XJ zF6tH)_LwFo*=07!AZCN~Dh3T<7_8>ZUrzE?mMfFT8bb=8F^~d73dvA3h7_^JV4FF6 zAu^tto}~}gb0j_Yu_iTvhJ?o&V+<2GB9yhdD@UWPC7FdAdApuvY0FZ z#)EO!hk^}P2+1A@rkB>8xm$J{bJc7?Nv$4tV#$g!gU-PWy1p5v|7LJPuh9`q*v3SR zahfb#mp|=F(?_SO@GTjSr zBioI_qx3iQmKU^|STeoa$9-F}lY9XFt>N90UAU6r-Btz9wi-;=8fX}_u|0tX~QupjzMvc^mLX#F*PuKv0{)-NvHWF()6C7_da*cS`F2UF1S2jwP#$QUD^ zCts42&pcYUgq(TQT9q zGQTp)a==;_WH6Epm$)o*DLprLWPIjeNO3808X{&Qm>xm#GL6?q>7yuKO7U{NRMx?w zTB4)gqoZQLSPF+J`n8++W#qk))8q_L^%J>5F2L&=oAl%$ngA70yprM-dMT@A6|{1! z%o57VGUi|uSCAXzIJ^!UXWb#&bgGYmmky=J>7#l%uNynYwED_UCHKh#<8pto6ZMJu zcy<+i0yFr)Hix(fe$q`c*peeI!yFQ&3_HAh6fbBMIGz*8E;Nj@AO|NRA5JpNh+U|OkSJ!7 z6=NA!hhD79`JyqLKNrA;5jX}uxw_1NUqkT>iQ;t>uQkTh;GQ+Efo;Gw>^H!Dx~AV zoY5jZ#xHJon7KKsM`3z#HcYN3paJd$1`TlWIE71K(17lQ2BrZtFg3L;WIcTe$!3Rv zdD?IR7Ise*(PwqlJ@?CwZ;v0 znY+*dCtTK=Px}#Fk<(-w1>az@xq7pR^=7MZ=tN_R<2SfrE6Y9YG^Rg_+;j#viW_a{ zj5qbSo@us1lyn?3Te(sWL- z%^Dfb>=^(N{!5z`=$+&01!o7msV_2Z*6IeBXKRyJlFNJzTSAvKTXBIcF_R&rKAE7N z(~9h{vq!c)pY3$-hWXqAqZ^j!E1umAZ*hyC=!Rwb((-O7GseS>h5;x4w+)-mt$(6n zOZ4St!y1}N%C> zvDV$p?kI4$w{|nP#c1s+eeJVbyPezdL~GyHS3je*(MD^-87}Z2T@P+=x$nkp=00|{ z)-b&%z=U&-=PG@T+3X6=W_L(TwXqyxkQt6%X3JogdwV|Pjv4J)ufO-CzwERexi7dA z%yQ&T!RrjLF>@a_>KmBl_>TULH?}^Lm%ri8bKi2`mhrMTB|Ier{$0Er1svRj@p5Do zGtL1gd8WU?ea6HW0)KU!GmgUFRiUcF!)?cR&*LW_`QmS(W)J`uqA$DEWcDOSh#&HjYY(Y8;jl8`HQ47!EmkC3*j& zSPoyCy9F(ufNk(ShA)fdaJO&}A85vM;D`~+;p@Y`2D~5N2!nT}@6or(`Zh`54TyI$ zeVhIfyp15h$NE0lxmWIG1OdXsqMsWD;G-Z4z(?!*pA!Y(WxfgDlyBx91%NI)s2?cT zSuwI6^o06-9GNc%<)6~5IG>lxG%EnwP`68|hJy=as7Pi?IU^U{vyF(48%y$C_^t*^ z9??I0rZC}C`81a>;d>hzK$%k1?|dz(uAPBL0m)!NZ5-3hN zazy{slp{3~v+^NeW=n*HLs{v$kQ`N1>?ko;PQhX*Sn2^sod?~Ixi@k!Kg4L{=lYk= zZe%`R@I)iO(2u)IOjipd|94wBn1AVs7JjauFk4vri54c=^9mdzZRR2`wj!*?V~sQq zyNZ@M4hV1pO=hEbF3E@M8E4EP@FK;bJa=X>2Zs`S)-ZKZ{@bLmxUZ(G24LJFq z6&`=sMK3;KD7+tC^d{=|UU`6f=XEJ?6uWooMgEdOe1d-nL5)-VMVy8v2v{KaYtZMQHUvSi7#?dE zhkcOU0Sk=UWMt$O(n7P*2jQP~nR0Ek#Q!w&}gw1}O+qD*WjIJ-ua zqbQ}=h`2V!IJZL|O!uOwj7OrxC7I2JX(=>zLs zk$zvlr9S|{{hR)~e)mftr8W>%N3aQX!9#cTW0C%+{!o9^w+qC3Y-xp!S{Dq@|5EUW zk^w?JAy5c{vSo`$AtnJ`ZKOUJK>uz15B&}hVqDt<7@&s}*yPSjcMLJSC8561zzjwj zE1O*BFB9scVD}4!>#VkWMo~tb(J1E_c@HRLOXk=xmPPvkYZ0P_7&n$!CPbs)-kq7L z$F!@7g$s}ou#A5oG=t&%3+w@NgrIqoA zpHSi`0=K}~MP}353yDrvTPCze!RF46LMLM|ja7c-v8+`>MvV)&x&vl#NLaLC)COE}Bg?Pskfi0(@4*9gbo|KyuTPPNu zB{`%2h2#`cU6M%1Vv-Xs?-WH8i@Lq1Av-gR3VX4|rB6yuAy0sXB8+B;Rw>V;d8puc zQg%}8Nii%HHQbBGq-T_20Q|G`6!Kg&o6-|5?gVXTX-Vl)sUMUl*5Z zP+XfCB8=E*HX4Qoi-0g67!1tKB%_Qd&`V@A#DF0FBOE5B=#sDohX|h#aBw-*P!KxA zZYZwe7dOj^Y7LS5JFn}EySPu%4H^=P~?A;S}p>ri5L_4aL3`*Jb@|YGK1~ z437mvKE{}&5t097-U!ECUBwulO;VdX!vmAJqUG+iUJ#XpQ?7?625Bd9o0EPsZ3t%v$L0$yJumy`i zECPmn3sCE>pn4*#V;?~=v?m0#w+t?FdywlP`gMwfpRchWmTPR`7mLC)HdNqJszz%= z-PEeZTd1r5NpXGsQCeh}t^FvY?UqU?Yc(uesA8#Vsb&!@H7rmG1m+u298Pg05I}J> z#j(#BvKjadynT93?6&&$c^16HTQUX#bCgk}ro=Mgi)&Tdl>YpUG{ z=ZyXaq%UNXKmcQ?8InV0KyD+NV9B?DUu+r5GF2dhX`H15fRxQ(nI5G008GG-LGc)J zc|UlOZJsGbE&ZMp4b9v{Lk}>OSv0}D<>M`e7fW$G#ckZh0t<{e?F`Fg%gZhiX7~{x zFDXu-xRtvIV;KcZgoPVYfQ59Q>!4Z2yU4W6H6>VlnXqrI+q*{gDKhSm&?zV1?vB7) z7FrgWZ6}JmJfEw!S+P&G`8CNmAX=pdbQYP>d`EOWipJhL=)WI^AI^txhBNQJ7miolSQiq<;QbrCZ z^uP|6w&~=?QawxZb4IY6?6~vP8OvF--Q6gLq^xJ)8feUw0d z$C`r__1|XfSk73kK5170J!z(0ISnz^^tjCGq$I=C&-h2PKOslsjxT?99dA&DwdgRD|nIu@F*(_m6&3Lda77%Gv`*Q zfNf$WCQ8}qwwX-Gu#bLDb@r(O(bG%pn>8Sb(>Q&yF4{^ zIn!5zi#b)I@oXgI*;OFii`eFf%{?{ z(@L&vbv8Etgzl#eXNxM_8E=v}*<`#Cl(b+;Mc(36ahfi7JMe#_MD>8}_U_i)?Z3>*Xjr|k2QCf3~U-Bs&fuO)>9cc=z z$^pe6&I~bFY678?=*D2KM8$-SfrwMp?m3R)lJs0#Qaar6G#@hAocB?KY#Q^Tz01p= zW=0$28Vv^%ZUhX{yW)G`Lca`YLvXFJlr(1FTTJ=46>>JwG;zDQ1MXo(8d4Ie+sq>$ z0Mny!VA45%??GAbfX&cP+$ZiwGsJ@^4_^b{d>*2fEXyv6!HR%ZQi>Z9i?*4d+OUrDGPKJ%a0t;XpMH@ZD zVD{&v1d99EY+)&Z;sx;{&}GaP$O)u)0_1`s)H@AK0~@mqnm&)J@5LX=sOncv)ntk% zl~L8qMHP#4H8zZaSa2|(N7eo^s%|l=CYDq6axaK#*qHs>^n#{|e~5R{F!7$5mBnmb z@jfaRABcY<$d3~rieN=T4%P$-bCo3y01dXLV;q_&StJo8VgSQ%2MuC(I|GhQb-)6& z!gPm`ZeKUC739zrj7Tg>D+1PrggHoz%x6m;ScX1hXP70e3LLN;iK#Bbr8TCj3#kUC zH-0k&5iSE&v2wuGAZw=qgKsqwsXj1$f$bDeb*@Q}tiVuQWtL-QV_9*oB@HGx^Rnb6 zX>g0R8IT(Vw^=jpt+tus=>{)NfxIYWaHUikWv$?RrK(ajasl$DD4s*{n{e3n51xxu zTdIS`NOd9grLyD??|RTh%yXGV@l2rlRlOrn<<0K2H;v*~n5}7EEW~LCRRE@g;WhMZ zW3cqt8jAmr?Nh#R0;r8JEj_{FGIN0L+04@G9-o;B%M<>I_Qp~ZpuL$v`wKvOoRjvs z6u%C%zu}}EU0;-Bd6 zCPA{dl*Z`CJAnRPPWl&8ya4E5WYBLA4>?G#j_+4ad=$%zH+r5efB5f+uO``_B>qi` z-!gi>8^l0{+0AhV{k{^iUypMdWW)ZYkJiVqEI(bJ;FNum16UVw=SHz5HB16Ilm5&c zQIJI-p&>X0^fiDSKoH&K2Mml|8X=8@h(UrgmvMzO!YzYO8qF#{sE=ipGfs1_oTU_= zXDNk{pb1HZkV@!GDg>~~NGc?I1q<}Akxoc1NRuI{Fu<8ssE>yJecMbaG|@wZ5z9HIk(G9}G7}fA;B)-Hlw-YYecR*$VXiDS$oUp_Zf*#ULX%;lWwR5F36PGRd zf~FgZkY?N2c(J@$vrib{Y^t-U#w?L4I&#byv(sOb<}Q_9r+5R!@12(BNpDK?k&m=M zT8M4ZB52BDY{LP@%^aUfQz-3q%4B$GZ67YDWfjB?IJr_VfC>|C(h5TYOH z`A?smUy?V_?&v(oxQZQCUc#a!SXJiEr_(h6xMTU7U)k= z^hnb0A^jKD<^uB8y2E{wsLX6(I?B1hBp0`Q=ZfOs!ssLTH zLfUOo^co8k|hN*fFlSBe6#JD@-?VgJdJIOx*Z(ico;?<&{X zdwRD5`@zOyyiJ|{81#l2i3m3!oF>m)uK?zk(>Rg77BA|a-z`3=e3=692(0Fl z&O5~+AVX0sm}5rmn?Sz7eqJGdzWML3v+L>WB%9YU zdWor{NRy8unL>(!UNR2=BSss6s_1BT0G2~Jg~eSkQ}N%@ed&R*;_L*)f9tl>a2rh@ z=`S=y`Wv?767;&itR?N@(7K%SGC<3CcQGAA7Z<~2NFkzN*cLCiot$4X1%332#wA>J` z$Psd+*nqn($H=ipOb_5Aup+*q_&m7(Iv8I7DPCqCue;6eL@40yMa|eWV`!3*0c2pV z=P3S~O)`i-x&T2VD<;+$)5c7GJbM9;9O0S}aw3~!UzN{@Zvd_VPqyi^$><~}JxvA} zhTlGm3^T>`pU8+TBcl%^<9s<87kilZLU;}x{pA5q)A2pU-?`Jl@>h(ks7TY2Wc~4M z0U^hf5t7FUxl~Tb4}H2bSjooJ-gAg4lwnEQlVkG}#Xmkp3_~r$j96q7w)q@lV#|mb z$B4OHPRx~l-OPvufR)8|kbzGslkiy35ysqRjg2+kfOwt0@|GXKpxNHzM zu|c>|J_xt^n`=64X3E2Jm}0BEjWNaJ)cis5oo7&ECN};PHA~8Y^&tug`R%A#FNU1N2pb@yozlAXeB-NKmb5PJOxEYlAGkMi2 z%XeMeVf7-JK71I82SUnNgh&vYVmFP>v$3=n7pFW^z*~K+6`rQdgA(hLlz}l6W!Mzq zM!L(h^bAmTuZ*&~kiYS~zWP~Kr)l&H@j%ZxaNM?6pc z0a^FU$ckiSDdl8oVB@!OE+c?+XXiSCXGvPfOfQ>OhTUdPD=^rfKdr3I-KQ0)*gpks z>X4q>DA`^-yudN!UkX`kJXh+@zSg$Zb}sg5z`#tsCe%WbY&v#i;!#s=xF+!`B9NiDa==0aofHi#cO8(WC7-nN_(j$4bY#g_5> zMax3A1Q23?HcIMH;s-Hr9gMkldi--{t#!1OJ$u1O-6?0nx|G-$6S~DInSyc7jp*lN zlh&d#CY&l>1RBbj&=+F6Nh}Z0W+VdI+QK~`Sf4#x)mUd(UwN9Y080Gb>0TLV(@Hjn2Ah0b7Hvg8Fo1{lIffp0IfgQakZ{|j8#JV8y(OH z0&H&oKXIo$hLUI}?NLwA ze!Sf0j5O}}V9?$K#_GQ#eTVhzlcYyd5^G?63F-MTByJHBWAtF~4D%x*I)>@8=vdGh zt}>0;&A#A1D`D<`P{{pfn2C~DFIm4c(ud7BOsX9okpaf=GV3L{;oflL$vb6XIB^oH zX#EL6AaVpGq7umE=?TwHFmB4`R>soL`m0ffMN~+4{74*xovYCMdeRPDLcn< z2I{?Ky$$k%)tf*`YiQ!*DFc8$W(=`sny{1gt`%~g;jtg)eT~@DIUoYyyy+1fy#M^0 z9$Cg)7Fz#e*NO+}L`hrYV&28+L+qfRjC)KNfJixU3oYY4ICcW0#egNy{y&|-qDmez zJAp-yDCzK@PJpb^H6C8as#}SfOrEs1HObfhC?OR}IPq zvT|>-a;dBw+}Z;`>Bq~#Z9tMd8dz`Z*?Kx9-3?Ozp|{x$SUe)3INXATlAiymxVQtT zXaZC~;18(iZBT1W7q+Upyj9|MDA$seYskv=g>rq1Kq4e$r{`xueo9&MExVv#8`i93 zRpb01rpwYxp`O@ooVAT8=214S~*~mR**E(tTNhRhD-lIeLoa zhUK;>u@n;F3M8mLd_3(EK$fO*q}&PeEW)|#+${iG`pdC$A>0Zm2yWWr4~g_W`HlQ$ za4MI}OXRK61NkI)5vRb2e@a1soP(bi(?449~s`HQgb1G9w)kes#z?&0+=$oO}}9oB=e za%&bphmwJCgPJ_O0Jv)~uuKL>CZ<`y2|C8`G6?E+HsZRFL`W%yfGk9JApi;i-f2eo z?NuWJ_XaRAi{+F;>|~TaS)UH~B7iW_YKWkW1;mu%-2l2OkY3%@nA5e4iCUG#h4&hv z;g5k^Al-{%0QOF@wW?bTM9Lcyf*_X%a(c}490Q;VG7@SVJe|#IU{?S^0el4r5G1e+ zf<>v@3>XWLn9CFc1oA65-aU1wk%yHCu<+_T!-WT@9QYNS;lB+hi-60;94Byqz;^;? zL!rb=|53kUEFJI!H)dNH4vEz`ZZYHag!|!F(hIla6HIR(6gZ7L1o3j61p=wz;N%KK=33rkKYi~k)iW| zQL;P2JMXJuGXL)e^P`HWqQU<0!2a@K=^eW#P-Jl`?DN*mVG}C&4V|Eda~fX3r#C$f9|f6{Uw+T2Kx&S%U|4G zIRf61++DyK?*jYZm1E!?D=SX+4-!&I5WkTG$&2B=1Zpm0f0zRI;C-Jv#UJKQfiHWC z`wXUr$^NCl{-wbFrF<8750+1w?2orW?)f&bW4D3PxXm&iZ!_6n!0>A!B=fC!0RVnybc%_4@`fNfn7J)$8B~|cSdL2F0&5>9Q_|*1CWAu^!3J6Fu8m_ zaQS@T^7+8!^Yzb-BPN?OUbn#qcnk31$9~3x>tS;EP4=@L`~39V!r6I!t=gOn^K zTgg!dD?^lAB~Qs$3Y0=+sNztH-~kmS$}nZPGC~=tj8aA`FDYY`vC23_SEy2|j8`To z6O~EIWaVXLiZWH1rc766z#}bYDzlVVmD$Q1$~tAe@{Y1W*{Hm$yr*nZHY;0{t;#lKyRt)hU)iaA zpzKmURCX(Sl#i6X%075-#sTG^^09JAIjkH}K2eS;pDLdz$CS^N}<&yH9^1bqda#{IN`ANB=TvdKnt|`ALzbd~e*OeQ} zP33pxmU3IUqx_-VRqiSGl?Te7%0uNZ&{r)S7B7wYFMEwZX%GeBr@A{%U|)PYqOq)L?ip zP^em8Z2*q}X{3h1!+;{xNHvO*EK0yZ$f0B~B||95r6iA%d`b!^DWqg5B@Rl8C@H3- zgpy&D!1G2Sb95vnkj^-ol9wm}nGV^6<0#Q7p_G(TGM*AZDkf4giIT~byiCayN~TgW zjgsk<%%J2IN@h|ri;`C&y-xF zRLXf#PNSSR<$NetfpQfoSBXMe9#@5ORVi1Ea@8qUgK{+~SBrABDOZPbHpKn*5Xyy8u0G`&P_7~68c{Bca^aMVpj;&7q9_+lxfl=+ny5+e zq#3K`p?PYm=A~(xx8|c&&?;(`w8~l)t*TZ{tFG11YHGE#+FBjWrq$JaH9yT?3xMa- z1ZqKAuoj|)YW1}ST0^ao7N&)35n7}crA2EoTCCPsYoayPnrY3o7TOD1OD#@|*IL1I zZCYz>w6^8kSL>(s2iW~Z zcplC`Ekn!H?AjnLOUu@Bw87dCEmzCa^0fl3P#dZ_v?8roE768&!?h9GNNtohT6;+w z1JBVJ2R9g|TB$Z(o1jh9CTWwkm$fO{RBf6zU7Ml3qRrH1X|HOtwK>{r+Uwd}?G0_7 z_NF!;p1-qDTco|EE!LK3OSNU%a&3jSQd_01*520EXlu1~+IsCBZG*N^dsll;+oWyQ zwrE?mZQ6Ei2RylFr}lxiOZ!mUt?ki1()McmwEfxv?V$Ftc1Sy{9nn6~j%uH3pJ~Um z&$Z)*3!y$T@Hb=Ii%4^q7;+pEzPto43#=DUY-K)qncb^?nU~3YDUymQtM5O6n-}lmSNx(v@> zx+-0hewD6EH>F$fNcy{wRr06wmyBc%9!xLGp0XD_n7$G`n!biyTdphn%YkwTJfc1f z{P-AnPj%h%@HD5%@I0qila^dk*s)okYwEVZkXR;O>Bj5@h>M%EcyXBs?pXh7w0r0%J@-`2h7EBaRRjq*+O?dY52o9x@gx0`PYJiV!hZ!h0IzWsa$`DXhL z^&RCq-glz!WZx;iQ+=oVzT!K}ced{w--Ymmryaf@_;gpUHyCdkMtkwultw!Pw=1Q|FZv7 z|C#=;`>*w1@4vzSUH?t~NBuAQ|LXtH|L*_)JU>rQfszYF>z|6pcz!ib-2ObJMA9x*Zb5k+MFDM`=Bq%Z{Iw&@%dC&_%aY3zu zS_icaN(|~4lom87C_89yP;O9O(6FHKLDPd?4|*$TP0;?JlR>A0&IWxQ^i8l3EC$QL z)?m+IHCPMw39cAiDY#*9R`9ssSAt&;-Vpp=@Rs0h!S4ru5WG8hZ}5TOgTWsM9|=Ah zfjW2vI`3LcBvNgj5Rg4`~q6B&1nLi;%VIT-SB$oC;XhFlH#CFFX@?;*ECJwxL|6GGdBwhK)R?HHOA z+BtMkXi?~d&`F^$hfWQh9=axUUFbWZ8$;g<-5k0#ba&{%&_kg|LXU=i7Wzl%z0e1t ze}?`Q`lvpx&(-Ja*Q_63zeD{__5W8*cm3bgz4&n)8^hgU43{m|NTW>}*T$NpN!q6I zG)ZI4={e*aa!w997^4HmV94;|+TpIlp~Icx6diQfkZvYWDx za*%SE@+ajuPxIoh0} zoN!h+JCjqN(~$Fy+Jf4XI)uumN~tAOA2mP?QDf9fDnNy(De7n{M#ZVWQ0G$@QkPJd zQCCp+QeRSEQ{PbEQa?~XQNPfd(wfu0qP3#6p>?GVqIfwVAb*wT-odwTrcfb&z$8b%XVs^^*09)yR6o{+2zEJ(xX& zJ&Zkq{T-XYCbCuR0=AxA$hNR;>|!>+u4Qj#Z((m`Z)fjh?`H31?`I!iA7me9|H(eV zKF_|zu4mt6-)BE$KW0B+zhJ*+zh!^nfSgern1gWA9F&vcjNy#qOyK;$nar8OnaZi= zOykVp%;e1C%;qfSZ079Y?B^Wh9OgXdyyU#%G;%(1zHpmxn{mJ84&)Bz4&@H#j^wJi z8m^YB=Nh>tu7w-q#<@6mEO$J2B6kvZ9d`qF6StPTnY)#{ox6*>hr5@1nb)4zk=L2m zmDioulh>Qqm&fLrd466wFT|_hMR_xLGkLRkvw3rP^LW4W7V;MHcJN;C{^q^r{lk09 zd(Zoq_bIP`9xtyTPnT!NE6g+JRptSCVBV-aI4_-t<>7gg^M1;!&YPCEC2w2aj=Y_D zyYu$u?aw=ycPQ@~zZ1U;zZ<^?zZbs`zaPIpe>gvf&*rQ68orjV=NtK6eia|$r}zjz z&9C9F;IHDZ=C9?i=WpcK^8etU;=kfI^55{^@!#|R<$vOT5wsC>6ATp$7mO5qFCYpm z0;|9-C>E3o%CZumN8lBtvmW45L5*OAV5MNSV69-iV7uVB;H2QRpiXd3@KNwNJ6qK> zzeRq_{8ssG^4sON&+n1nGrxB}H6PEPk^g)C&in)Um-6rDzZEtSHWRiGwidP(wik93 zb`o|Gb`y3N_7L_K_7xI@WMPhwCUgp;!ZE@r!db!v!sWt0gxiHXh5LjDgolJjghz$P zg(rolh1Y}+g^z_#gwKQ@L|==#iUx^>h=z$qWQ{_RNG)=RJfe73D+ENKXp(5Ys7AC= zv_-UEbX;^sR3|zox*+;2ZX#|bZXs?dZY6FbZYS;_{zg1ZOcYbaT(M4EA`XiI@fdNn zc#e3rc&&JYxK_Mbd{bO6z9+sfekgt{ej3rz|=_2V;>2m2x>1yc-={e~==>zFw=~L-* zSzlRy*}$y6I7Bu~HbVBjj3^_?WU`p7QdT7cWus)UY_trOWq&ZpYGf<3LgQN5I@tzU zt!%Swn{1z~PIgXqQFcXkP4-&eOFmFOL{5~G^;Pv(4NwhI4N(nOeWxO*NGiIjROM8;RbG`}6;xHIqN=zG zR4q^~RxMT4s8*;}tJbMDs5Ys#sp?htR1Z{-R1K28Jb@;vo&)xb2ald z3pI;1OEnub`!xqOM>NMYCp0fLuQhKpZ#C~V|7t#Iz7#Ym=vBZj;1%!-}YxL{&8}+sN&H8Qno%-GSz53(&^ZNVxhx!KnGyMxgFGF8Lf5W$ifri0`p@!jx z5eA_lV;E}~XBcnz!SJJDs^MqDbi)k8FNR+YvkmhM%M2R~wT3N*?S@^3J%)XTLx!V< zQ$~qVZd4i7My*k2G#X7ti_vB*F_sx!Mvu{J3>ZVkh%s(V7!l)C<1FJG<9y=+<5A-Y z<7s1^@v8B<@rLo1@uTr`VUxmUg)ItO77j1`u8>ejDx?%r3+aXO!h%9ap|j9a=r1fU zTwl1W@OoiGVWX+3sjX>{Nnk251x;g2znFeEtubvgoiv>>)tSzlE}5>HZkTSG>P`1d z4^0iGXQo%Ce@t&p@6FxJWHZYwHkX(kW|!G(_M3y|N^{DLm{Bus9&4Urt~O6I&oIw3 zZ#C~Q?>6r|f?w6}D!bhdQ0bhq@h^s)4_d}EbSt!0B{lcm;j-15Zo-15@$%F<|gV|icH zyhv80FLD%(DXK17RJ68eYtfFPoke?!_7)u|I$U(L=y=h|qBBK*6`e1-QFOcLZqa>f zOKWRuJ8MU47i)KGPit@MAnW&5k~POlx8_<|)}S?HjacK>gcY!Y)|7R$6|;`9j?GM|1+XLHU+f&;!+e_Ok+dsB z?St$^cALG}UTSyRJ$9cxV2|1%`xyH;`vm(W`;YdY?A7+!_PO@?_67DW_A~a&_Ph3{ z_J8c}>>unOi@Oxdi&e#%;(}s*v9Z`xY$+})b`^Vz1I5AO@x{}N=N8u#Z!A7ue7E>% z@r&YD#s8FaD9J4;EQyyaDmh$owB&fnsgj10*QM=ByOt74MWyOeeW|U~Um7c&P+DF3 zYw7yZEv4s5FO*&?y;6F;^j7J^(vPK|9Zen09bY**IeI(3b&PPB9acxNqr~BGI2~?> z*Wq^r9H?V~W3gkYqsFnqvC6U5vCUEEc;#qxym7p9d~kepd@1Wt*0ZcvS)Vd$S)eRf z7A}jF#mg$ofHJTQ%j!L2%I1`vDXS|xS9YQ7a@p0g>t#2~-a0!udpid>2Rny3M>@ZE zN}Ot^IqUD*oh8mPr_1Se`kfWdD(6_|56(r-CC(b>O6MBqI_E}bt@EVww6o56-g(h^ z#d*j1(AnU8=6vBIxyUYxi{@guST3%M?-IHsE}2W|GP=yJBA3nOc2&7XxeyoX!d>HB z6J3*BQ(V=qX|5fv-L8GE{jP(q!>&JF$6UuTT_9 z>uvAt=d$o$UR|TkW0Zo#S2RUG81wUE^Kv z-Q@kld&7I%d)Ir<`@s9i+u(ibedcT78|oY3`_4!3k$e;%%_s7OeNkV+SLp+Mpl_59 z_90o@xYoDDx6QZ1x68N3x8HZh_rUkb-^bt2-`_vLKiEIa&+u#gCH^Wu_${&^6E_&^ypC@NHmFU`Swi zfD)hu7y)J=KTr_R2MPn0fHhDYC=HYaehB;+m>Q@KOv~EJGXt{%vjZCfb%Be4D}if) z8-ZJa`oO)w`|?5ML(4~$k1YSboLEjS&nc&ttIEUW(eikCWjRm|mZ!>pF5h0ht9)r!TR9c;Dg|c;HzL`@J;Ybs77ck+8){w+8x>(IuJS>IvP3=IvqM2Iv2Vgx)rJq-3>hreF`@THxIWAw+^=p zcL;Y5cMW$B^TWchBrFZf!^*HaToBfV{o#q>$>AyCso|f))59~vYr_}ASHjoBH^R5V z_2IkW`{4)SPZj+u238EN7+NvBVq^uOLQr9;h*eCfm|F33#q^4q6|*arSL~}eU2&)0GtwvWO{9NhKx9y4Xk`v@^YiZCOr2q#h)`5`hnG9@xKGA;5;BK^Q*3kWSnO)-M(lR%ZtOwqL%eOgL%egmTfAph&gR7haZy|vSHw%=k$5~_8Lx_u ziqD8IjW3U{jIW8Wk8g_~i=T|2j@QM{$8X2~jyJ~N#NWq1CR!zWC;BG7NeoB~PB0US zgesv)=n}?+KLI7+#OMT;7?YTqSddtpSejU#Se4kCIGQ+-IF&e?IG1=)*`%^rWsAzM zE8A3lS4m4olZj+9S(SvcAGDEVI*BF6B*!NwCMPGSB&(CtlQWaElXH{5Cl@7`CYL8y zCD$f5Bx{pflG~HJl6#W-k_VE9l1Gw9lgE>%l4p{2$@9re$t%fg$s5UA$vesW$w$d2 z$!E!z$=As@$@j^R$uB@N;49#3pbgL-=mc~HdH}tFe!#cDAYdpk0{9*v0XYC2U;-Q< z56B0^fDBLq8bAx^fkMCn*nkqCEITdi0kY@-5C$SZ49G5q0HXi|Kmi;W2TTAa0aJi# zU^*}pm<`MU<^c72YzKA%yMevH0pJkuCvY4%1)K%W z0T+QQz;)mja0j>tJOCa64Zu_21@H=J1l|DefseqKs%BL!s#;dHs%l%+t*U2L@2cTd z6fg`%z!;bSlVBAHfhiCH(_jW13yueW04IY#fz{x2@E33v_!~G6{2g2bE(Mo^tH8D3 z2Cx>~0&W9$fV;pw;6CsGcnCZK9tDqsr@%8{9e57B0A2#Gg4e-YU_E#jybnGC8^CAa z3-A^A5BLuJ0Dc0$K+T}9pjJ>@s6EsP>I(IMdPDu7Z=pfZP-q179Ylo45EY_BOo$C} zp*$!b5+ubPl=zU52hfH=%myE_5Gy2sJ>jQ@^HWr{<>Srxv6ZrIw_YrIx2wrq-m^ zr#7bkNNq`NPwh(WO&v%bP9061NS#jArOu}=rLLxKq;99~rXHjor5aLCQ_oW`Q?F8u zskf>3see6oiVD(tVGrz>yb^!W@H<(6FHO) zq(kXQI-X9Z!E`D;I*p~rq{pX!NdK6gnx2;aB|R%WCp|yCFuf#QlU|u#lU|?Rl-``) zmfo4(lir^`l>Re)JbfyCHhnIAF?}U{J$);ECw)KtDE%b;JpFgNG5t3EA^iz$f;LB6 zqOH+(Xh*aQ+8ynM_C@=n1JNPqaP&Krh*D4*nv1eg9x6aZs1#M8YE+9FP!n2&+R;+f ziF!~!8bmA57+Q%|p`%a)MNu3bhfYK%qd%cPqchN7(cjQ{=mK;xx(r=`u143P8__?| zt>_MPH@Xi!h#o(938*BhJ7#oI-#0VG}qhbtf-HCd4F|98+Nhm>w&{ESL=|!OAc< z=EKUdFc!rU7=S?-jHR&*HWr(JO~R&N)!1}wCN>+Ji~Wu*!j@vou~pbwYy(z{ZNau< zyRg030qih#6gz>P#_F*1*d^>Lb{)Hk-Nx=<_pk@pBdh^?iap0(Vz019><#t~`+$AK zK4+R_)3g?umf4=>KapOCOsA~r(k;^?(<`ez^~?0n49E=149N`3jL5FI5;CMLuT9O+ zGr3u8nUmpV_?i4{>L$s^vOBM;j3yiX=`+TRDPze7r}j)q#*xJ`-C2s#|KHTMA`{KT zGnH9F6U=&maAtIN|09#F2FGP4WQnfH*@AXz=I5+2^&eAjb~d`3mqnfalbSC5Z*;mU z+n}z?dNZ4{+25ATwk)Z#D~puu%TgtWGDk8;Gsm-F#_7!2EGlt6b1`!{YbRXKN(kB9 zHH#c%JJw7?c47Z{wm^NA`S1F9cEs*u<}= HjX(N7agTN+ literal 43067 zcmbq+2YeL8_xP0E+j6u^?4N zrHUwu9Z_sx0R#aR>X=$G# zj0mDgLNaohEzFj~noRapR2G$$4r@|2?iOD`Rpsy|`4t5dir{i?ld7`vaD?Zq*kIC6 zk%Clo6-q}Lr~~SVu0>tZ6f_IniynkK525GLHnbDHirzr)qYu!B=o9ogI)o0Rqv$v~ zfqp;=_QHqZNOTc5!&l*S+zxlb*Ww;H8|UC$JQR<_V{id3#N+V8TeLg;XCm? z_LR*K8WOkxpE=8(DMZnB1K zCC`&r$Zqm3`G9;%ek4DUljIL_fn206s?ad%rI9p>CefDkN}562(hjsE;6kCj=nb?V z9Y}}KvGgWdOiO4ft)w&Pt#lrpPZ!Wd^g;R%T}#)|C+V~FdHOPag}y^~(|75I^mF

X^=En%8`aiH%a+Y zsZ=JFOV!Z&HtBY0fpoX@kn}M8S}r{zJt3`>)=3+rjnYff4(Vm-b?IH{J?T^FGwBQI zYv~*5oQz~DN6GPWf}A3!%1z{^ax=N5+*(eTuaU2nuampVz2zI^e)2$hm^@rAkPBs> ze2ZKmSIRTx+vM5u0{L$FA^Bl>xx7MtN`6}2DnBo8lXu8($#2Ua${)#}%7^7I{{k}+_l2>v}?WV8P_J)i>{YkZ@Auc?RM>T?Q$I3-bOuC!8GD_1FLN;{>C(pBlEbXWQ)1C>F_Smh>Vf>Na1 zqD(}JV!?+icPjTP4=4{Qk0@)Eb;^^PB^w zx>bEueNBB`eM|jN{Yd>p{Z#!-J)j;`52=UMFV*Af3H5vRC-o2YPxYdDNmDgV3)dpF zL@i0XQoBlPuVraHwBA}Dt*S7{MrdO+pLVlWtWDBx)hz99?S5^k_L%m#woZFe z+oWyQUeb1GZ)tC9A7~$H`?UkwLG26eEA4CTgmy~%Lp!fax~v3Rpfqkg^KQy-}3>Z5g^ezRVtm+MpYY5MK@Y<+=#x4u+=KwqXms6Vc+ z&{yft>6`VJ^d0)k`kVS&`aAkQ{d4^*{RjO={j~mveqO)ecDWU|>ek%MZMq}fQAlw| zyW`!B-A&x-?hJQl_ciXm?i=80KlhF9{_bq|AopPRQ1>wRX!jU*fxFN>!Cm4mbyvEl zx@Wp?ch7d;<(}tW=)Tu|zk8|sVfW+i)$TR!r`_w_8{M1S+uSdN4G0??mJ>E4>=(}* zBgIHH8W~p@jg2NoQ=^&D+-PC6G_EvS8Lf@0j5fyAMw*dsWEgFYOrxFA-pDdK7#)pH zMrY$1<67f7<9efu(bec?bT@h!J&j&QZ=;XV*SNvxXWVG?H?oZZ#z13`G1$m4a*ZKI zo-x!IW(+q*7$c2Q#%N=VG1j=r$T!9r1xBIaGj2A<8xxEo;}&D0QEZeLrAC=iZcH*N zj7p=*s5T}WQ;ey`G-J9k!?@L$Y20SaGAx4|w;QvKJB&MxImTS$E@PfC-&kPWZQNrl zH10JP8TT2BjU~qY#!}+}W0~=w@sRPbvD|pXc+_~zc-&ZFJYlRfRvD{}HO5+Fo$;jc zl<~B&-gw4%)_Bg?U~Dut8JmqQ##ZBbW4p1#JD26KTsDN|v7u}j8_q_sk!%zj&Bm~? z>?W4a#<2oc$b9T(Hl9sjMeG(fkrlHNR?5m)Ih({PSS71s)oe1G!ltrmY&x64Ze=ss zZEO~^7-zS$+3XH>C!53Ovb)$kHlHnEce8ugLUu1(#O`B@*%Ed?Tgo0_%h-eLA@(p^ z&K_Zpvd7rtYz2FQtz@g%YPN>0W$W0J>?!s%ThE?h&$8#(2DXuHVw>3(wv|24wy_u3 zcJ?BBiS1x7vsc(o_9}agz0TfXZ?d=8+iVwmhwWzXviH~?_CEW7eaJpyAG5t|ANz!T z%06SCv;FJ?AwI zeq+D0)9erSCp*LbVt=!<>>qZHoo5%=MRv(VCN_ylP05r^m#LVlshPUzHp5JhX_#J< znWhf=oRMZGvff}PGs3~fOnxht|CAt!|LaoQLnCzUc1qHs! z%A#>a#YI)q1{4)m_VZ1v9LrdCPF@jQF7^#ADlIIVQaL(1XMkfzI1RknIo*r%D=U4K zdHKcFzRHo=IlU_KOMFwxDkkP-=L{|@s~XGVLiF!6hwl83i|$52=Pm#%8LS4nk5kI2i_=d`Jdab^QaQPWlZl*uY#~mH_W}CbpsP_D z;J}`g=**HVI+jJ|_0REDRTY(vuY|#?D$0tBeHHsqTa<~~q4p!3nU+HHVa``y$F;f!$|x*ky5zq%?P z77_qig|0(gP}Y#_9Qffp*$s8Kk~Xlms0ZqadZFH^59*6g5-s6Wa^1JFP;2n|L# zC>ISud1xpahK8dNXe1hiMx!xkEV>Ehqj9JJ6(S$H8I4C1P!YNXO+>}01eKyPRE{R0 z3RH=zP&JxtX;vqzhc(C=W>r~}t!36@)@ti%Ym>Fx`q28+I%<7oeP{j5vBa^?v6tg0 zjuSXe<+v%w-8t^VaW=;}91r7o496uL-_A)NPHy1jMotEBGKiDGoaAtl%Sj$5!#Eki z$tX@nb25gLn>ZQAN#Un}v#DqrnvQ0mThUCEIy5`y#{6-n$dpd%p>Swv>ZKx9z~C#$I%M(1X_t!q19*&473)lLrYyr~{JmM>@^0T>Mmpqsibe}7b8u$(v>t0q|Rsq-sq?VUe zRKcS?e8s-;`BlEL%!D5m`BN&pmnh|^1=cq zTd@|ibj@mSMdWlXohIny1+*Q#h+aZF(97r*SWUs(@SmKb={{Jko9#JU;g;FB%azFf zXG)QyZmcdSD$MU)kq?XNaN=v|b$Ck1oR#P`l=T^U6Z(D&y^VIEchGM1E_x5`5yB0y zSzI<=3?h&!W+}c4{E6>5<@p6ZAT4JGkyeZq#avc&Ue2^iK=oJ_Q3bfEH_=aEptsRS zFvwoC51t)5p{UAd#W30}9XYUliarbUxe|Ta5V(T?+!vM@EzXJu5mewvvfRKr1dnjU zis_aH{R*Mf4Si)Ltpo!42C$o$*S*J8g9r3?hWr+N2ZGKon7UR}p^{Q?yEEA+VZ7qtoaQV8=hv8T1!0#^1n(|Dbc|Ji34` zqD$b5A~X*ZOtFMz?1Jwqnu~Sp#$nK6E-YPce#LlS6=2!sQ?Z`5z5>)%my~v`t}3hW zRTfPL$(>U*tr+g5*km<+ytraZh5q@K6MMn>l$G9C24p;zH4dUvpg_B6kT~)86PumW z7pNS>N^!ARPw20YuW0-P0m|UADb9Bw?c9KnNW9Fz_NYJ^f&(3hpoiWSMTItXzzn0;fXUZUsfOESR7lX3TomLL&q8QXHNTE~{hcj%YFl4p1+F3^9 zE)Jn1t5M@FZJqBCm*C&Nn=Hh<@I<<1Wj5}jI=8GVtQ2k7jP$mxQ!_JW`Y8j4TS-sg z2&?fII0{FD>Ed)7JbaRofLa>CuhGw+_0gz@j zZQSKvXNHZtH1SWNNzK>&ATu8Yc^Pg?%eA;UP+AMz679jQaO-f1Uqn_j>q;xyYGJj6 zx#BkXYMchE*`~6p0!Fu*540HoXW+KB91ZAZ`|c{ZoN2539Q$`2`GY&)j*g&d;XuV$ z5aZ!%teAdjZQ6=|867)1oQ+u`E_Y!!_1o2{50X>Hme5Q$X*{p5_<$r-5#-(p+R-OEbG zmDvLd6}A>n#KpKogrx-j!P2gKAGo-tEl`f%ZUn6R^Z9BcJVilf=XW5{@y_%~*HW+GkT7@6R%kd-lQT!Nw9It@?t;DnOYP1or z#p`S-InY;8R90A2V2jns`ND4OR$Wz9R_Zr_B7`6X84q@(PpqG?X>6_nAExJ|>LPdq zE;)vjzbmj`@~6Ra1@)7`;=(0-5!u3Z&h1?;g$t2tb%Fm~518s|F>qn|@NN|#v3+gY zwDF6U_4pZBXQv-Q4y*Bc{49R%-&kTJ-URx>d1MXV7+85w9pmiI2j@=#$h(&n`YN49 z!K?Q?-e#}fK&xj+6B)mRccA(B6}&*0$ePv5>g`yz-GpTe{61qw+m2~qlxB#9NzdqL zTdFgU1g{K!Q>+bs3uKM6I&b4$_#KeFVs+lbd+;{=fxSW>xxyf}c|ziv?I7e~Q}R&+zAXKdcb&pRNCe zVP@TE^|NjO6=HV`ILw(+R8=s+VTnWdu*2TAKNomxB|e0*glaf~kK$v%QTC&DX9KM4 zdR=^jkAqbgSQ@*fqv}`UZ(uyyf~8XK&{YBQ?9@$hVF89pOJ zh~)Odc89nXxsA*MTsSc*VUesRw>hSa;KhkK`ICKOkRWM9W|JhF7ps9<2^gHg?Q9b> zxbZwP-){VXHN_%FS!_ceklaHS*7||uUcV=J1{nM=^fy^V?jwuI67T}|0GTZ%58%CI z8F>&bBoCA2H|cL3UH+kWPL@UjAdD-eM&-V0t8CIAB|loyCi*?QdXKou92i`zgM&fTsh zRU-P`C(ssFeku#+c$+nq;}fS`pMx)eT+aZ;x~3vze;$PY!iVFhIo@oC=`z~` ztJ!KH9Sl^#@($DeOnwqHw_&2mXziI+dV?76$T%w3#+>%l%QCT>^ zT}%~ObHE3lXU($I2zTd+wo(Y*&QP@EHTKdqDEauww|D(;WavKz6eHn zC)lpP@Jeh}ali}sq-$w3je*HJ{wR2(jU4c%_$6cOL!rVCG#SmMsRBo|F>OMdqP?^k zZI0%`iubMTSy*H{dz!V_#@fQhy-!}cbPT3a6C<$hY20O?GdFESQDyfY5cVo)fH~TV zwx(D4F_&J0xqJPXTQtOeuKx7f!}RyqZs~ni^hjs&_Qe0yT&A69XL?P*?!qfzZnn8h zdj{EE#WmJ&7nqsf?y|{`_NIM+!fU+JHMDO)$pv2?A_RM7kT9qHX|^rQAGIC~VTaPe zG>7KWA$S4J)vSlDsyA2gg!- zmQ)vmUsssgec+JPsm{?^!9tsoHbTVLK zs)LCY))O_DsF_~6Jw1r-IMe(0<(^4zqq73bO=r_d{^hh&GrNtGz(^fe zT~u6kRZ(eb`wkORdkpr^x~w9#MbBXadk*f~zh`!C*Be`ccjB`%9?-1EUl)6yojvpPcHkn4h5h%LKTMa?M`~uif-dyWe2tj7 zZ9U%s4oI-;_awkoGy4et>~H9sn+m~@au8k>!<`AjrQm5jP1oDg+Gwp0HLVSFBi%$d zlV)_2W<6^?XFX$L9UOpX>XP<0Anon+MfmLCB-SQv%_eP)6SwUer)LU+wpBvgb`ZX} zjH^I*(pTwgbbTmS0SQ-O1Hc(@6^2w67gdylGWJzXfFOmh%8p~)47r8i8SbI)+cSK} z+8kT~P4{WmR_l3di~B+PSIpOc4k8ujCXxN{^wZ=vN@6zoGBb6C&6Mu-eHf>jgWl<4@{r1JGZ#lRBH7 zq)z*^G{1_ZC#|G4^c4LK`Z!Jhu(n$-THCCbtQ|RRJ7nf$c1X*~YTscf#FC3js!RUQ z*$BYRIeH$Qr#0CKx>v#yk*Fj|GTkdIP)U{7V(`eh>QQWQObQ>9obPKp;1b}3P_-Uei) zS#Jc{0Zkk=W;Ll%ZuRuPl#DJ)DNX=fYU~8S-vkvV0^o0nCbcHnOClq;l4d&)6&%W`oj85bkYrm{M*BX+-ZK!C|HwSEZ&=V9qfJWo0*9TS<2U#*iOvjM7+Sl2j!wucZ09YL5gM1imwu3b1i8Ch`U&loewKcbeuYV#l75p8 zNT)&R{E0S7e}S%?i_S~`p!0V4V_=2vW?w~xudrv~c#&D{?<=hqwHsja*8UJ_CrAi) zEe56(fjLM>iFS5A1nk~Q@qkDNiHqP!+adSLoGQB{1In}@t6w%{U|D66sH|cA98;|8 z#V+A4NNfm~v5WPabqdh*yJnrXn28r@8pjZL4=TZsE=rf`)LJm+S1~dH6>|vvDNC{} zeJ8u1b|730eeTB0mtvw*iI-%Yafl z*bc}Dw1GMGF9iuzT2ug;ckl)K19=wOt>C%bBFK4JXTuSL(A#P2Pgu);tS;fRAT4hF zW&QDq91Q^Ja*P}+i%4?-!eMYExZn;YJUf<{tXSxT zu-r%P3yT}n)mphvZ4zumNm+HJ4}3abaS&_E{bk#=9xoahX36mD=YQAA@;&lGxkf9?OJu)R zmTj#Z%75fILI77|)Fk;m$U)Ub1rtRbnr+X38)=sm4xLme4468U^r-xpGs}36qeEs; z<(2X(G+$mrn%Nmtj$=5Eb#kcVoE$17x7!Lg%AZoYyq_qqm!FZJl^+YWFe0VIah!l6 zurh<&XF}qoq+Uc{-Y&oBfSkf{VrYfuaO>pkdru0c0e9q3vxSQDcSlh1JZ{X z;N62S;3SP|QbyVGE>Kn%<=yg&@_X_gk|%#)uY*-5*#mGi?y|`7RvLE!AuRrhWRJf< zX^ejs{xnT6C-0T_Ig@F^p{$@`{ek?sydTe#4+1C811h_M&4_!O;FF|Kvd1jpJsapgk#{0-pF?I%e}k zbBK1&wM|H$WLFe2oOwmC7^MWo;G3YQEucpF`c-?VV5$Usj*B_xEy zn{nI|@pYFU;MyVW|8Fyx=qe5xpaKS{;<)SO z2k0`i$F$P?lA?l8#5fWx^$K6*gu!4|2T29jbk__=D)i>KM@WI}n&q<4eAn$YI;1DZ zy@Ws}Ajj-F9MB=6N<7QGY39h?b^MKc8{F@-_Q6tEPf=>`g0{M&XUH7|| zI^Y7e^bH}zTo1V(#`9c{_(kpw9QU(bBS+){py@*7rrR!@NKRkI=X5>cTIpKlT6#G^ zIlfVh9}u~N+K#NWYte5kD)j~DFKodjei3mmgdnfx=xogr0M~g66t5xLzZ9^~)Jx=*C_8TYk+3epe8%4b__K zZPzXb=Aj(th9-&kTzh~dKBysyAsi|zLy$x}C;a?xB=L#sQy__5m&3G>>bW(D9#&mi zG*#>n3MS#Bu44|oqdA6}od#uquH&u~faCA%GC+<&42*Pe426IWj=_Y;a!{Q4zZ4_6 zes=xh`ZW-NasBQ(=0spze}#&`a6C%DRb%Iw;Pa+JU0fkz0*J%v62|H+SKLY%UZEJ$Z>|f9 ziRLO1XrmHkD{ng%5Yj8>c${?#pys#$jGw|<&)lz`l>|`FhaJzGTvy*GRFafrum{d7 z5wf8Wp`w*0a)bhAz|DRMSSVC(v8 z0iLU3Dw!|^j*ILlK?q3OD_MAN5S-TnoY!+a@$zuqGNKo3$OA6)`AS1UHGFbWp|4ET z(g)Fk(o^Z>&;sYUG!!k|p!5S;=x--hI4^S zt1=T>%mt)yJk>6&m?DxU@Vh2!!tt~kv){HcoqY)ckLf_dR!!oBW2jo0(lB+R%!WX) zatFsVE|WV^<|@N*sxn_$pxiBTC(1(Tca}g~8ppT(U(zSaB6Lx?&q<#sOYQUt$1|P$ z3CFhu==#CB2^3}deLGoIL30DCc@>!G=Ux*z9`y?YbFb7ExsJFs=&shavQj)64poxRpDyeu*!Ti+yIlt`S~AZDBRIkB~LFI( zN-6|+a=~Qg_+Ad%2JkYDUxST+u(XK~2I2TEj(2nXeu#{as;U~AuexiDr$rp!=L9(X z_B8Ce6m^^J?6uDVG6-40shVoI8ljx4Tfr%H5p=W|z;YPXDjqQeY^GFUG<6CEO`@6v z(4^Erb3eyR>q8?FdL3*7DGLHbp`mH2HdC7`=R-mB0AMHp&2UIRr3$OQ(-HM*HLbSp zPEAL5su`lfT5YRlqKj%fwLSSt?Et`af(?lC@m{o0y;i+Wy&l*P_Nxf(2!bFNwn|o( z=T|rdzun3zU^|z%Wyig3`4C7Qh=L;#YZoD1=wiUlH&^a76# zZ2+^S4zyvv<6mH3Enr^-D0W~U-n{|}!^JL_0Qh%Z2K)u;-2nc=8t~V0yv_z6whZ|( z58!7Cx$J-sYw%y-->)uJA5fP8_zwa2%hf?P_>cb!_)iJ&pA_U_7mwu)hRo4qUjX)1 z0DFL_)`Cd|b*bNwAD|TXQBgArrJ|dmR8(kxA&k}M1mVuNKS}efQy+Q|w#ahyqx!rpw(VW(>NfQSvO#?jK0DNxMKvuj5^QNI0Pf>> zBgY%8S&gqh`QC?(u5Z=RF0$o#lc=+`%}={T)d|{)?H{7Fc;=|Fg=L_F?b8jMy>IFp z>YD&g;NlwfjX=d9#Cb%aZher@d36^6v>QI}IY8NVz*P^X&wDf;ZpUBRe@%(yGevwGwfJJJ3GuR z(ztmu0Om9(%C57WR6PO`^C<4Cenlm;)h_1e_!aAFj(1vft%#vc6@O(=Esgq}*b14N z)&`7p@z1}fTm3=(5q4{UfL*Qr;D8c})qhcc1;Ko(Mr*vz@f-EEhR|UUUjfu!UWc7g z|5E=}E{4(?ZwifS8=IiRx`Fyi6-nYyI!wbFLGv}K2Aa1y-c<)0z-5M5YbVQ*ZpTyr z=?!*8Xu9Us!c-axo_9d02jCeqxNHB~EfFDMiqfJ1rda>pHICoq_&ouW*nb#^nq`VC zQVoEdaHv zwKM=ZqXy&;IQ}ps$eDHu;C}(RgVs^&q;&?6ueCvzZIHYF3&!*N3B zIxNvvsEm)rSdZKO6zSRu8>=}OJn z0Tgtp;aK_FIIVzy%(S~E631XuAAr6ygn$c2cYu++NE?q9YelG)HjxtwriHM#L4JMV zmrq(LL?`G$e8#SbJpE-zbE?Le(kkgbwF3-01?|r^SNhm5I6diN3gOGrswl8T9Xv?$* zwK<^}6)d$Q0Y-(;4|t@V8Upczwi1S4?FZr;j*o``!m+?F55!a2)7pA%ZYUs502Ts3 z40VoX2m!@b?RkLW1wRzuar}J{6d<&0R0u^WEIomXkV5Na?G$J$lsi zW%OVt8v$|9DqknN3a*YyOwS5vSTX5#wz*}i!1RuwVe9EW?GU=C9majNBSE_FH=+A} z7rGBTfmCPa0Z%zd3u?#fYr+5GqwnxZn~xxuY4g!9+OIYrU9xiO^3flh0JjF52<>;^ zBVe|i03V$J>ka=PXG?3ef3$NJeycr@)yT{J3DXfQaZo8 z*xs(K=m<%IkQ}4CbVXOSe?l$ISr|94G-I6ov8hf8NJB!=O+6f7iS)yAj^pzUVQ~sU zFAqzc9!M+S+VjFP|kwDdLeIn7DqKkSn+*fZ= zOC$sXkq{z?WQ?;nI0S|0ZR%6VW%bZ#r<1E4a%&*<^-R5;-o94qx93FR#AOxdiJ(Sm zW{~LDJE6t;HK>(-9VZZ?^oxF?`iV#H3JMKM|3~6QoInHvwzD+-54zQR(@kmz0H7b* ztGB~@_5OOcpj#4WJtOFrC_?@VfZ%U@E#2yah5X-SJrfu@&q`XW57me1!=+c{33NRt zVVp2dBCYR5WzPBr#H)|hZ=##@aUfYX0jv-)GDKyN*wp-tBkw_TXW1;C-WIfbXzCrW zPtc3>p|#YT?%&GHi5EZ!Pz)rupd=5lDJp^jgwqhD3cV6Qs`i6qauQw-B+x*awv~}C zOtjD-P1k4Wx9a{tsSvxhAVmO5YC(z|=u|2F2T*tFa{#Ej{6Ix<65S9eCv%yeaXG!H z-=iroK21;m77nNthYBjOha;3AP6L-Cz+tx4=WrN!B@H<2A>gow zfx{jN;;;n4VTm?}<@hR!@{6y|_Em|K{(@w%zOp`t{TD5-p}96KKjo+8_4+e5EjO}6 zASZ~HlR3E}h?X}BTF$i|3efUakim2zokX*xj#3_M=Xo6VY`trJWP5yd6q2Klz&HWK zX9Ve^5b8*O1@N#F@bFp?9vTZgG!b|hDK>u%D7TLx3`WAP|0@#S#q(?=eBejINBYM$ z64I?}>LQ^TCmBIV_*5vOdDb-nBpk4ko^&0P_vwf9!>*;$0oMjR8xodKQp8CMPFjmZ zH|XvGR_BI%^o@QT&(ptkvhAcLCs)?Xwu2?^=Oa<`7n+ZL(tp-}(GS&N81h}%P~l62yvvmIi$BW4g`x8=JXSaCe>j(`B+L9>Eq z4C#P6ux5(#kpC6dYu(qmuXlH`VePIQwPEe;?(;9O0=U-(V9gaL9t34v?A3zNokE0; z_9mLNc2LOD}nXjZ=>^fcP9)Pm)rr2k)24(2nxhPdx z4?7JAl+!?tZdjrJIK<#KBOnK2w}BuxWISfWvKEy>J$`<1ucC^|+EXZNo^g+L--J?K z$2iI6q`&BRI83i@nF9nI3nuysov5GN=e`+wwNHT(NjiuK!hghZt#Aw!+#G-TW1wKH zTcGY`sXf*}5L6(rAp2I8KhX!8%|7SD4jcsocZ+MOYeV3HzVJ+)oAP5a>=Xvbp|@yA z=+wOl3828uM7SS(a~4WfCHv+OG3VWot#gh+g46yW?;+A2fmsJXb|*YGzSa)Wlah_h(y zb_3ybje_8zZh`Yvz@!uifP-pA1>brCsO5-#3#w6o@kSQd3@7%s*MW8&v^#3I%NOmg z9aRa$-hD!T>3FDj3GVP&09Upf76@?Phocm0P$m*rB5xH6XIoGzs3`%X&mvamu`H?P zu|V-_FuHAJ=icsybuHS!mco7x?tWRH0|^Tc@yU<5lSq>5ghohXdB1X=W}_wgajm~f zU3**)lhZDRu6H$2j<}l3r^q+%cK8RnQCq3z$uBDX4#bcs|+Q(>3+WFYhUea~s2l=et zPPw3+qm%SQBpLteY5{fs+w{ZQ^ZIbt4C#P6P#>lomFK|84qc^@+PyAI{z?56_EhcA z=Fo+54j9&p^l*jXGh_o~WOw4(TC{da`$xHGofM%RG9Ii^$mYPQJ+}y+Af2sIP(~%f ztZ+tEt%lnv*EO&$4Pr}U!P|husqlaB&vt>% zAlP#tB3Q(L_#T`rGQrN@6j|U=F0~feu}te-D6)l}gwKO@Bm9;3MODHVATU5cSpd(E zkivz4Uq|bA5xz03A8m00VXWP7cpLyxYVCm(3zP>7Pf6r_|FIqyCQ5-d1Zs7K3*XbW zn7#*78$_kBn^xG~(Y0cS!E8AFXfK4jpnlRWXnq4WuJsndsx`33!}g<^f;SCCO&p)L zX4#?2`4%YD_rTw`BLlAqGH!#e4jW{Fn3({9$FAk@8V|^IgCS%KfAoD=?n-eSs-NJ) zhWZKq06mCO_2KG3luA<2eB}u7xQ?lmBtZ@Pd^%FusULzff#*ZIdnuVOpQYR7v&v2= zKm7>^;wU~tA&hn!0$!ce9;eHq+EdUcY3zLB_+1h#{)kKw3fAj4c?Bm?09T>v?@68FU4X0VC`mj1M0g0Dq7 z71~0T6fjV0@HPlA2vLB7aK2!(gYb-K0A!UY{73QC`po8nLw3LS+EfQLS!k0b+=obZ zm;hmxfDfq1=9(oI*zZ8upV&|WNJ+piq$zX(i3egGu)jAI!KOoS0qCri&1*pVK(;`E z;%aBX&xgPlg4^H($O4$tqCe6UWWZp1cBkQ@X#cIfiaM{KKkmlNE2rMxq=;0B>R4up3o!TqZ6Amx2@uj>j`mhM#6 zyN-b~^`C;<<{=Q=Ai)36f?FRd=g@^haO2rRbSo!-S9jJE+(2sMLke!O83kl_Xu-YS z7Txs(H^^)ux<#lQG<863Lv_M`h;AXblmAO}gU}WX0MVh#iSF-(XD+x8gm)ScxRBe9 zquTfXAi5oX6Ovod@c*~yw)sy10WKKfyb#txcmwYV#sNNfua4;MlLJdb)F^E~cZ;d#Qd(zD95 z+Ox*9*0av@q~|Hm)1LL7XFSh(p7U(*Z1imMZ1!yNZ1p_v+2(n{v)%Ke=Oxb$&&!@y zJUczFdS3Iq?s>!Wrspls+n!yXcRag2?|RPhtP9||u!AT{DKq{%` zWHKjHIGM`HG)|^-GJ}&_Iho1HZJdDcwK(CN+|CIImOD7P6W-*+$y`og73P6*;A8vXPTboPapq!pT-np66s6Cogca zof9xkU*cp3CogmI3MV@`d6kpbIC-6uH#m8dleai|o0DCfyu-B$H^z0e9FmZaI6_8`#Axj4~EefoPhW}%*mIW9O2|BC&xGxHj%G6 z`G%9@oSfhUr1^K8e9y@boczeiPn`VB$uFGz%E?JiPI2-ZC%?7F1R%h^=MI+Y)*3()vtE;{G68~m z*HT;9<(Hc)pTuVL0Z)5815(5ok7>&x(m1+ycPmo5V~zJbX#Z_9(1*ZeTorW zjDxYoX}$Kz{i!Vi2VImE!#z`M0Z(;cvbXrvyJl}kgKLokt1Bl2$hw6Sf2!Bi-uDI9 z;zRL3P2YjHTKMCLz6v1NAfO#u2tXcQhmJ%f3HnbBT2dfsdu|Rootz#tiEGfKKR4ZS zlyH}uSEde_0%ukZ_iqcjDjg2x*=cH51T@xMs+6T zmjJ;BYPB5N*Etk#WKc_3DqCU%#nqv&Yl2$TNR$8ZXfk-*S^XBZhZ(@N2%92;uU#cx zNn#IPFT)J2!-MF@*&GQMW9txeZDB6ls!K;Th-=nh!9pdIT8{BAm@NyhN*_`CRQ;Zv zdO|T^5VZsjhJnl8+U0HmhhDWDU598#)pjf?RF*X_)zI>92ZkATi zgNUJa>kmvcKIlf>b1mRzLW3Cw3-AVWYFA&wbqk#D-ZD?f?yE9_SFbGy>0k=D{P|G; z$(5IHS?}znmce5Py;Mt1j`R>T1>xzSd5dkga4DvaAgzTR0>^cDxrSCpiqmH*9rA$X z3<9yCUL6yJ$`(Q&G^AYn{0lfU$X5Zk6Y4BEL~@#JWYmUSMkcZ^r?!DIknM4z&XqUn$ffXyy}a$tv$0m4o}%k9?`|EqK# zZA&G8MJ$X{cdhG`oCqlFrK%(KVfe;%5F6UI8S0nGp#AF1`ZB878OSj>{2RGp_^4pQ z4II$|*W-icAL!6|>j2!WE2ctd+N7Xf9k#4X8;$BrFO+2+%;ta(ZyhZm$fPbi*BaY^ zjXIr&RA-<8>QJZOz-d(nkN@Q&MAxY^!k2>Q(*{L zZ@`KT@d8&G3ZB~9X6Pi?8GP^on;htQBfN)4tIL}w{MbQa1Y z1HojoQ{A*QOr)Wbug_VR6+l2e33cenZ(H~+fxwWCX&WfnvdP}RSFF}uaoEZBS)f59 zXMYf!!0X5pze`gqyIYR(?-2Cs`^(BfSjdKsTHVSy7_YAH(%^PoYcPlm{9#W60s}=W z0zV))Q2PS{1dzviSDql3ARpZexuIQ<5gMedm$`bk`m1XL`4i=#o8jb!NqQyf>1vK{ zkt)$J2)vtUG&xODv@|IXWy48RJG9-TG3txADFoikI35jve9%tFjkSYt{9p*$kI?^; z4k+hPFI9tW^s~`Ts1n}Um@kb~^B~-Q4lPkBBolsz(E45Q2FU&r*P^8_QI$9X*3|;_ zhO|Nnnu#Vt65&_kb6r7~=;3gj+z@!rNRF!s93MCcm1}cgcU>kbrR$}RaQf{?IOCzh zwTCQ|=b&QgRmjSHLz494Xe88;9fUyX9OWVu?7Rg*)_!uDbR8-}H^|u#?B6FnO_G%p z?j$r%J_Wh91==_?l%_(WpdTvJheNXBy!@heFJ$H(BR`-quBPw~%3OVz>tT77ItfjN z(`jx*16_(XSGxqe?uTptsIm)Q$AQMl`%w=l9)I55&b1W^o^w#ODxnFk8IS`^f{<&3 zewcJs2fB{Y$p|9z5GjW=)a`IIDFQ`WapaQYB*O5MxZ`ACG?zZXXg|M z+C#txvH?*d9t%l~do2jO-zN?`fT(1)c#EZY@nw$4Ks{=QDx)Ln;d* zP$TSsKSWoHILU)^gWnY~V+i;674Ol6BO<0l8Vp{tDN=8{AQcGN6p=AZ5GgxxtZyqj z%lH};Vf`qgyXDpe$hVOJ)?|?|5aHBDaE2t{27+6iEqDarf^^G|cH~$RsYBUXX1}^K zQY2ND*g@)JkaiIn7m>E>ZlA2v$AXX-EJi<(c7z>j1Qx9syiXLe4gk#8cEon9{SMJH zb{?gzNUjVM@p2e!Kh$VL7#z;&5ZS=x99|2GcZ+w3io%HFBGWiaz(gi;Jw>>k9VQ>Uhg9Becr|1CEokJOT7EEm^uFbN+q=vAj(4~BUGIC|J>K`dA9z3X ze&qewyVtwV`-%5c?`Pi6z5Bffya&Bscn^6Gd%yG^@gDUa^M2+1+WU?7xc7wjTkm(? z@4Y{GfAs$3{n`7A_gC*p?2L5s&VSU*RtRK6P^=H{^02{~#vB8`woT{8^oa&sqISu2~!>Pfkms7^6 z$!R#J5u8SH8pUZer!kzyavH~JJf{hqCUTm@X)>oNoThTxh|?=LZOmyCPMdPtjML_v zw&1iSr&n^?iqqDdUd3q}POs)Pjni~aGdOL_X(p%bIBm~q7N;FJ?Z{~-PCIjY4X4*~ zdL5_NbJ~T|uAFw`v^%FgIPJ-4FHU=N+K1D=oZi4`KTdDtv_GfWoDSf0Ag6;kg*oPM zn#<`BPV+b&%IPpphjTiD(~+Ex;&e2pV>lhl=}nyGb2^UG0!|A#^>KPLr{g)Dz-bYu zw{SX<(_&6bI4$M0jMH*XCvjTAX(gvsoK|x>nbRqpPUUnOr_(u|!Rf7>&gAqqPG@my zamqQpozvNz-ofdeoX+8NE~j^KI*-%&oG#$>ZcgvvbRnnra=M7q`#4?9=@L%w=X5Ej z4{*AS(+4?yh|`BTUC!wvoIc9wW1K$D=?YGt;B+OYt2kZF=^9Sga=MPwCpmqJ)2BHU zEz@T>eU{VbINiYMMou?zx|!20oNndxc}}-+`U0ohIen4SmpB};PG9Eq6;5|@`YNZd zar!!^Z*cl1r*CokHmAEdeTUQCoW9HHdz|j!^nFf0;PgXIKY}-b!>Pg7!OO(Y!K=QP z!|S~l!t2Q|nplB%h+i=A023FOn3}jTJ7(e;Y=enAnfO){4}^D%zhvU!CcXn|vrSyW zUNiA%w%)`NTWeyEiO0el#J8LHMiVEPIFG#wFXOT|I>OnZ(D8Wot%+x`&rLiC-cJ55 z`_05%;1%O=`Y@b-G1A17O+3uRJ=r%Z*SX&dFJXVu#BO$>W5d5?-7Lv2})x|zvVQowdI8wJ^JW)tTJoJMLkGn>O<27S9Zuk04@C0%JY z6Yq9}BPXDY$yeC50uFhY?5o&oUTL-(-M5?nMcswa(!xlE7q(x4TEUyXJE800^n~Bk zYt%foNS&h2gMG)3sN2L=T&g?dO`DQ30jucQ_Iovv|+GuZHxx#Y|W=l&?ai7 z+9a(?n+&_cZq;UKT)RWNM|((Hu05)4h0R5~VNcI7?S%HLj&)s+(qr^ky^-Dqb`x~g zd+5FN4f-a1i~hX+g8rhuLw`koRexQ7Q-523M}Jq}qko`(r0>-~(Ld7}Fp&B*bo#ak+H->W1mhRS20-E7&=kDds zc8?O(fbJsqM0bgMq5DDi3imqq7Wd2U58eCS2i#w{54(@JzjA-$KH>f@ObYXcg@;9j z#fBw>C5NSkH4f_(RvC6@*nMGZ!?uL&3HvoWEmZe&c<~{Z)1RwYZMt1jS{2Gm}J~x+-EE?9xxs^o-o!LPa01f zn~ax?ca4vY1Kuoe7w?VU31A{@1SP%S`xPiq52(Z|K%w0*j!-V#q56e09yvaWhGn9*0Oa#(=W0ez(%hDGyQE+lbH!Xa_!7+<_%^)v%fjO z9AxI0qfDPU-YhroF&CTnn-7=|nh%?gm}|@p<|cEqxx@Ux{M7u?{M9^V{%)Q#FNEvi zVd1gijl$c7cL~o8zd5`ze0uof;j6>fg+CR(KK$A64dI)@H-~Qxe>Z$j_y^%1h3^gj zG5oLavk^)Ji-?P87I9TX`-mP9eIv$1+!Qe`qA=p-i1LV;5wjxhh*%b}B4SI#YZ0GB z9F6!P;#9=>NI5bxG9|K2War3kk^Lg`A`2o*Bd15sj=Vc^Rpir=FGju>`F`Ywksn9y zi#!>5D)RTpKO)aWo{c;gc_At~DlRH9DkbWQsHRaZqPj#)ikcI3f7H`aFGqbC^<~u2 zsN+$;MExH1N7R|9zoY(%Iv;g08by=nuxL+obadnB*3liKyF~Ym9vnS7dP?+N(etD4 zj$RnOD0)-$=IE`_+oHEe?}&aS`qk*yqrZrWh-nm)8Ph(db4-_*ZZSP#dd2jKxgqAp znCzH=F@s}rV+vx*V`jzhnAtIR#@rM0K+NMYn`2&xc`fGsm=9wG+cUOz>#8B=%VB*RjWAzm5Gq_EKC}TvA+0T%)+gaZTfHh|7x`7B?bpRNUCO{J4TR zU)=b(qPU8G3n;XT|gQ+40NccgKGg z|5g02@n;jHgs=oNAv_@=Au%C2p?N}DLPkR8gdPcl6GkQ!B}`73nJ_0|QNr?sH3_>C z-br{jVNb#b2_GlyOZYV5^Mqd$y@`>Dafu0uNr@?mjS?FtHcjl1*gtVV;-JKw#36~} z5{nb76K_vkkoaKYQ;F*npH1A5xGC}N#Lp8CBz}>2IPpkQ*QA`Jo03YB%91LQs*)xr zO--7fbZgRWNpq9tB`r=`mh@24@}x(T9#2}4^idn1WMiik#9TrGLuEl<_IkQ|6{DNm-h*Eajn; zM^YY3c_L+X%DR;QSJQp}H&w8000-Ga1VJ`7qghSTq)F54q-mRGG_%=h(u8w3=}AsX zcWEg(;fx?W@PJG~h9FD!lBpmvMD{34hU|?fAc8DkKkxf_f4Q%J;=Zo$>a2BH8?rWK z9mqPAbtLOX*2AnSnM0XN z`I54LvWT*nvYfJwvV*dVvY+x3rJZt)a)a_0M*L0X7bNsH3rv?khk+7#Lh+EUtb+Dh6g+8Wx=w8ONc zwBxjsv@^7`wDYvzY0qdcXs>8*Xz%GA=|ku?x`Xba2k9YtB|S<9=%eT{I!sT{Kcg?8 zucL3EZ=!FZZ>681x6{wjFVKIXU!ng>zfOOZotG`nmSwB6wb{Dt;%t4kA={K)mTk?p zXOGXGlf5!~RrZ?fb=e!Tk7XavKAC+wyFL4S_QmW=+0PhU2A@&DP%_jEEknmBX6P9P zhKW(eurfeKH3MagXW$HyF@dp^v5c{T@eN}&V;y4yV-w>D<2d6Kqn&Y{@eAV$;{|gl zlg?x_bC^74E>p-9F~v*?Q^~Y5qfCG~iWy_V%nWk^b0YIU%qh%i%<0UT%(cu7%+1WL z%pJ_{n0uHPSbbR^vj(w-vqrG8SX36B#bB{m999mC$I4}iSW1?fWn`II7M6|WV3o7H ztRSnB6=NM_9bz439b=tfonoC~on>8RU1Qy6J!L&-yJ!tY3wq#g>7Ry*yU_DJIs!;VRjvRDtjh-Hv0?qJobF{LiP&wH|$mHZR{QF1MCOv zC+w%}=j<2km+ZgUZ`g0y?>YTAgE<@ym&4}>IC&f!$IfwbTpSO_&k1ruoF>kC&PL8w z&MwaPoIRYqoPC@FoS!&9bB=J1aUSM$%^8$4BxhL8h@7k(RgOAGo1@Dq&MD0?=9qK9 zoCP_Ha+cHgj9JW4YtFX)eYkxEbyO?m6xS?iKD0?k(;e?mg}U?j!DR z+~2uRxzD+8d0lyZcv(CukIrN8SUfq;%(L)pJO{6wSHr92)$%%W1pgGjoqwKxk^eNeFt5 z^bqtC^cKhkR)I$l5hMgHf{ft5f@y+Tf;ob@f-eON1d9Yq1Xwx3ib&O3JwX* z3T_B)3GN8)3H}y#6?PZ)6!sQo3B^K{&>*x3Jwl%l5F)~AVZE?X*ev`?xJ0-@_>FM2 zaIJ8?aHDXmaJz7)@Mqx_;T_>);Zx!3ygqru@^bQ|d73;!o+l5;tIk97#^(`v6Y?hJ zEzet#w<>RK-uk>vd0XE>ej! zq6$$+6cGWUQKBkQT!e^7(JIkq(RR^J(f6V~qP?PhqWz+SqSK-@d{rSQCP<}W+k`Lr3^4s!L`Q!76 z{7n9e{FV8u^Vj8X$lsj*ZT`0W9r>s7U*x~f|3}hY(n~TxGD4CiVN0YEqr@z+N*t1M zNsXjd(jaM;v`E?{DM?x~SF&63ljNx6xa5@NjO483yySx97s(yTUy@gnHZL}hO$ta6X|=RPib)CS4C!p? zTe zE$<`mCm$r|%H49GJS30EN6JUZV{%wtEw7Q+%Uk4Aua&!$mzCF*Hrh0X(L)dTcu5CliC_>owh;Sq8+PEX(wtIXjf>rYjwsE7QQZgr|Y2Wr0b&Vrt7KeuN$b#(y?_pI=)Vz6Y9h|l}@WG(iQ8h zIIKGRLqP1a4-eXg6STcBI6TdCWqJFYvUJEyy#`$czI_p9!n?t$*1?xpVU zqAo=_MS>zxk)%jgq$pAqX^ON(x*~T`um~xtE~+j1*QzgCU-Vtk;iC4U>qQTXI~DgW z<`gT7^~J8@NO41Pb8&0&xZ-p%UYseOSUkCSYVpkCImPpe=NE4)K3#mN_)77e;wQy_ z6u&4LP?A-mD$$k{mFPO2?F9rMpTGl%6TQR{FH`ouQkdyP=n% zkD;HTzhR(ZuwkfSgn?q98+e9XL!Keu;54`mK10wDHbf180Wyp>)EZh1;|ys7ZXgZI z4J!<*3~LP=44Vz#8nzpD8crHJ8@n2N83!1L7>5}@HByXpBh$z><`{WKu~B8z7`4Wz zainpSvC5b*RvT-K^~OfyWaD1rKI0+dDdRcg1>+^-72`GIP2+9jUE_V@GvgcMJL7v( zmWg7bo0uk!iD$|+<(b4Lvng%DOcPAgOtVaLO!G|hO^ZxROiNA6O)E|7P1{X7O}k9{ zO$SYzhAc36I~T(VrXT({h`+_BuVJg_{ncD6FCIaYyHWR+N@ zR=HJaRa-6AYU^lgowd>0Y;Co+SyR@u^$Y7U>j`VS^@{a|^_KOn^}h9?^*8J9)~D9z z*0)_BPKVp!a|9h>N7Mm0AP4NoI3_qIIi@(KI;J~jI%Yf8IZim* z9Ty#!9ltuRJ8n8|JMKDubM|!ha`tidbM|)*bPje7b&8xWr{5WNMxCG&a#lIxPQ=;Z z{MtPnAzD|GNCU@{8qH%deN;EWcBJulzyz8&`K%PuF0V z)n#)zU9NxS=zuHainst5+`K}$Vov!a)Ke&E$ z9dP~R`q_2O-ND_(-P8S{yRZ9W_W<`m_h2{6UE^}E`<>?lPZv)&Pft&8Pan?+PmYJ@QFvUQk)E-hlxMt$@J#Sb z@=W&3@T~N#_N?=4^lbKQ_3ZKN^&IjX@f`P@@^@;) zJ?lO1edO!z>*4F|`^eYNH^4X0H`piiIelJVg|E^#(g*q=UzIQJ8}D1_TjX2fTjpEg zTjg8hTjx9IyX$-8`@{F#_m}UL@3rr(@4bJ3pX)F3NBpDwRsOg?=^yQ{^{4$){8Rl4 z{HOhA{O9}^{FnS!{n!1s{CE8i{Ez)F{4f2l{ci(Z0^I^12L=QN1_lR)28IVj0dt@# zkPOrW>H>{{=0Hn;3``Hq3@izp4_pXb3S0?X3)~Fc3EU4n3Oors4ZIG#4g3@A80;DB z9UKv)1nEI$kQ3wubAx$7anKQT2HinlFc1s{D}&KsOK@IrQE+K+MQ~McO>kXsLvT~@ zaPV&MUhrY?x8U!=XTd*%e^q=~ky|0IkX0xvG!=yvMHM9#r4@mS+KNdPD=OAhtgqNu zv87^b#rBGyD%vZ~Rotq08|oSA9~u#2hJ+z!s66Be`9l?<%1|@}hM-U?v_7;kv^BIR zv_Et(bSQKrbUbu2bUM@?Iv2VUdKY>h?ilVI?iTJD?j8Op+%L=t2g9N8$Z#TD6Rrz4 zgqy>y;kIxpoDO5*3E}DC)#0t-v*D}ZKf*7;ZlR4giOMBfxRs6wnTw2Yvyr0M~#Uz%Ae|@BnxOJOTay zo&zs{m%wY_E$|-f2zCOyf<3@qU>~p_*dH7S4hDyUBfu<>24;gykOT5S0hkAh!2(bQ zDnSjX14}>yXaX&u4RnAm&r<>HDEp12sVQ)U>k^n7)XK>z=_~w z@W0^a;7o81I1gL^eg!T8mw_w6Rp4511GpL73hn{-g8RYK;3e=HcprQO4Tgq7BcLpZ z1~DKO#DTa_E+mA+Pyr-^l#m)K{CAwU6f!|&kPUJ|F31Z7pb!*+00@GrpafJ6)j;)7 z6Ep@I3#Fj(5Dt;h1ZWa88JY@x4$Xw-Ky#t_&?0CFv=mwaeFLq5)UGsSxC7h?{qAHz@Jr|@(5FZgfx z4g5adG2S`eE#4#EE8ZvGFWx^sFg_$cJf0P&#jOyXSPV&Zb**Tjv)?Zmyr!^CfiKN8OqecAUdQ3F(78diZ~D#;za^T2#Fv70wFMhAfu5w zq!Af|j73t&c!WSEAd`?O$TVaIG8>tT%tsa>OOR#AN@O*%4%vuoLAD_~k?)ZokbTHO ztRu7kPj@Mt(=0Auo_u$Q$H+vSYGyvRkre^221`WdG#A zWLA=vWF*;1ZZbESm&{K}lZvD|S(q$NmL^R}OVXY!PkNI6WJR(vIWjpaS(QvA ztCQ1{yOVd4Ppf-X52%(`msJDRjn#9icUB*-zFqx(G;4Hd^n}qXMjsq~Vf1e`AJlwW zBdRH_3D?xsOs)C4=KGq{HGkIjtsPOzs@44KL?&ye*KV!dU3<9pYTfWUVO?omWnDwv z)Vk$$C+e=&-LLzneqcSjzM#Ii9;k1vpI^VR{)hUz^^fZRX~=32H@F*+2C`vE!w(JZ z4Zk(~+1Rm>+vsnE8pkzGYh2a1ukl3Vlg4*V!zfWX{nB)+>7V9d z&C+I|xv_b1^S0*Q&9BFFAHy7@8Uu_;jF~oO`Iy~fE{%E9GOR`0Vri*tX=z#5vbp7Y z%ipbCTP3ZI)={m^t+QJvK zYD#KqYI4IQl6{Md>I5WurML9~Gh^RD#M-1*$@|s17YbOHm_gMlGlvb)qiRiw4jT z8bJYc6dFTe6hTL$b!a2njJBfVP!z>b5}klfLZ_h9&>84#bS^p{U5I{#EnSTmZgO zNtdQgX-nFkE>C;X{&X-MPDj%~8cM_IM7lcNoNmSXVEwQG*dS~uHUgtybc~5{Fdinr zM3@AVVM97*afSEBX=D=K-7Ykq^EP??TguxhsjmGM*Mr;f=7E58{F#?-_O~R&N z)36!XY-}zzA6tYi!IohwvDMf*Y$LV>+lKALzQ=yR_F)IHpRuFZ3G6g>7Q295!meW1 zv0K<(>;d)|`yG3Ry}({!Z?N}xN4zuM4eyD6i1)?&;{)*__;5T6r{N5ojdSr_JP*&u zrMLoD61^y+z5MPWh#aG~~@U{2`d^5fk-+_OJ@458#LJBlvOr6yA=X$A7`E;Mee* z_#ON{{s@19KgIvVU*fOvcSHxG6Va9ELG&g*B0eTQAqEq}h))SBkxj6O9D+{>2{BPX z$O#ppC5i|=VI;~38{s6}gpUXkVIoR^M2v_N2vJSc67@tQ(M+@uV~KGDN{lB6B13#e z{D=52@i{S*m`%(jz9beBi;1Pga$+U1npj6{B(@M+i5QnxSWy8Fq%7;b#OH zQ6@iAkdbAS8Fi*GQ +#include "SDL.h" + // NSInteger was added in 10.5 SDK. #if MAC_OS_X_VERSION_MIN_REQUIRED < 1050 #if __LP64__ || NS_BUILD_32_LIKE_64 @@ -478,6 +480,10 @@ - (void) saveChanges: (id) sender [[self window] close]; [NSApp stopModal]; cancelWasClicked = NO; + + // quit + SDL_Event event = { .type = SDL_QUIT }; + SDL_PushEvent(&event); } - (BOOL) cancelWasClicked From e430013bd2bbe84b675c60b6422fa32b6356ef0e Mon Sep 17 00:00:00 2001 From: lubert Date: Sat, 2 Feb 2019 10:39:41 -0800 Subject: [PATCH 257/534] Add high resolution flag to SheepShaver plist template --- SheepShaver/src/MacOSX/Info.plist.in | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index 73791ccbe..670400d9a 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -46,5 +46,7 @@ x86_64 10.7.0 + NSHighResolutionCapable + From 6f8cada7db06b1a65bbd45bdc6cbd2e5d67ae7c2 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 3 Feb 2019 09:50:11 +0900 Subject: [PATCH 258/534] SS preference disable minimize button --- .../VMSettingsWindow.nib/designable.nib | 12 ++++++------ .../VMSettingsWindow.nib/keyedobjects.nib | Bin 40992 -> 40992 bytes 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib index ec7ab08c7..5257f5ba1 100644 --- a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib +++ b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/designable.nib @@ -46,7 +46,7 @@ - + @@ -83,7 +83,7 @@ - + @@ -182,7 +182,7 @@ - + @@ -346,7 +346,7 @@ - +

@@ -360,7 +360,7 @@ - + @@ -683,7 +683,7 @@ - + diff --git a/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib b/SheepShaver/src/MacOSX/Launcher/English.lproj/VMSettingsWindow.nib/keyedobjects.nib index 3084f3893359506779a8e4b814c04da1ea4a57f3..6da6267c4e18ab889df91e211f40e09ad5726ba7 100644 GIT binary patch delta 45 zcmZ2*fN8-2rVWa$TtoW=qYqOs9XXM=cGvt{TJC^{r0FMCg=4bU*3IINi B4PyWR delta 45 zcmZ2*fN8-2rVWa$TznRMmV8!x*6b@cYqOs9XXM@dGvt{TJEs7b0Ji|o=4bU*3IIED B4PyWR From e676dbf8399e5cbfb0c36fe304abc670cd003c82 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 5 Feb 2019 18:44:24 +0900 Subject: [PATCH 259/534] BII/SS pref item "yearofs" --- BasiliskII/src/macos_util.cpp | 3 +++ BasiliskII/src/prefs_items.cpp | 1 + SheepShaver/src/macos_util.cpp | 3 +++ SheepShaver/src/prefs_items.cpp | 1 + 4 files changed, 8 insertions(+) diff --git a/BasiliskII/src/macos_util.cpp b/BasiliskII/src/macos_util.cpp index 6de3877fc..85115df7a 100644 --- a/BasiliskII/src/macos_util.cpp +++ b/BasiliskII/src/macos_util.cpp @@ -26,6 +26,8 @@ #include "disk.h" #include "cdrom.h" #include "macos_util.h" +#include "prefs.h" +#include #define DEBUG 0 #include "debug.h" @@ -134,6 +136,7 @@ uint32 TimeToMacTime(time_t t) struct tm *local = localtime(&t); const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; + local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); int a100 = a4 / 25 - (a4 % 25 < 0); diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 0de2f6ee0..79eb72309 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -75,6 +75,7 @@ prefs_desc common_prefs_items[] = { {"hotkey",TYPE_INT32,false,"hotkey modifier"}, {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, + {"yearofs", TYPE_INT32, 0, "year offset"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 517ab7034..9afc28424 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -28,6 +28,8 @@ #include "emul_op.h" #include "macos_util.h" #include "thunks.h" +#include "prefs.h" +#include #define DEBUG 0 #include "debug.h" @@ -333,6 +335,7 @@ uint32 TimeToMacTime(time_t t) #endif const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; + local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); int a100 = a4 / 25 - (a4 % 25 < 0); diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 5a7f77617..072c6fd94 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -63,6 +63,7 @@ prefs_desc common_prefs_items[] = { {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {"cpuclock", TYPE_INT32, 0, "CPU clock [MHz] of system info"}, + {"yearofs", TYPE_INT32, 0, "year offset"}, {NULL, TYPE_END, false, NULL} // End of list }; From 64e408ced6b0ef3b6d548156f32bf38eeec7b9a6 Mon Sep 17 00:00:00 2001 From: Alexander Thomas Date: Sat, 9 Feb 2019 22:44:43 +0100 Subject: [PATCH 260/534] Add prefs item "dayofs" for finer-grained time offset --- BasiliskII/src/macos_util.cpp | 6 +++++- BasiliskII/src/prefs_items.cpp | 1 + SheepShaver/src/macos_util.cpp | 6 +++++- SheepShaver/src/prefs_items.cpp | 1 + 4 files changed, 12 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/macos_util.cpp b/BasiliskII/src/macos_util.cpp index 85115df7a..39071f8bb 100644 --- a/BasiliskII/src/macos_util.cpp +++ b/BasiliskII/src/macos_util.cpp @@ -136,6 +136,7 @@ uint32 TimeToMacTime(time_t t) struct tm *local = localtime(&t); const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; + // Clip year and day offsets to prevent dates earlier than 1-Jan-1904 local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); @@ -145,7 +146,10 @@ uint32 TimeToMacTime(time_t t) int b400 = b100 >> 2; int intervening_leap_days = (a4 - b4) - (a100 - b100) + (a400 - b400); uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days; - return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * days)); + int32 dayofs = PrefsFindInt32("dayofs"); + if(dayofs > 0 && dayofs > days) + dayofs = days; + return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * (days - dayofs))); } /* diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 79eb72309..99f818edd 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -76,6 +76,7 @@ prefs_desc common_prefs_items[] = { {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {"yearofs", TYPE_INT32, 0, "year offset"}, + {"dayofs", TYPE_INT32, 0, "day offset"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 9afc28424..a00af4ba0 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -335,6 +335,7 @@ uint32 TimeToMacTime(time_t t) #endif const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; + // Clip year and day offsets to prevent dates earlier than 1-Jan-1904 local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); @@ -344,7 +345,10 @@ uint32 TimeToMacTime(time_t t) int b400 = b100 >> 2; int intervening_leap_days = (a4 - b4) - (a100 - b100) + (a400 - b400); uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days; - return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * days)); + int32 dayofs = PrefsFindInt32("dayofs"); + if(dayofs > 0 && dayofs > days) + dayofs = days; + return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * (days - dayofs))); } diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 072c6fd94..c34396013 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -64,6 +64,7 @@ prefs_desc common_prefs_items[] = { {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {"cpuclock", TYPE_INT32, 0, "CPU clock [MHz] of system info"}, {"yearofs", TYPE_INT32, 0, "year offset"}, + {"dayofs", TYPE_INT32, 0, "day offset"}, {NULL, TYPE_END, false, NULL} // End of list }; From dce4a951bbe1ea465dcb26fa648f004f6d0db055 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 10 Feb 2019 11:10:23 +0900 Subject: [PATCH 261/534] invert sign of yearofs and dayofs --- BasiliskII/src/macos_util.cpp | 4 ++-- SheepShaver/src/macos_util.cpp | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/macos_util.cpp b/BasiliskII/src/macos_util.cpp index 39071f8bb..dea66451b 100644 --- a/BasiliskII/src/macos_util.cpp +++ b/BasiliskII/src/macos_util.cpp @@ -137,7 +137,7 @@ uint32 TimeToMacTime(time_t t) const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; // Clip year and day offsets to prevent dates earlier than 1-Jan-1904 - local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); + local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year + PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); int a100 = a4 / 25 - (a4 % 25 < 0); @@ -146,7 +146,7 @@ uint32 TimeToMacTime(time_t t) int b400 = b100 >> 2; int intervening_leap_days = (a4 - b4) - (a100 - b100) + (a400 - b400); uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days; - int32 dayofs = PrefsFindInt32("dayofs"); + int32 dayofs = -PrefsFindInt32("dayofs"); if(dayofs > 0 && dayofs > days) dayofs = days; return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * (days - dayofs))); diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index a00af4ba0..87eabb3d6 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -336,7 +336,7 @@ uint32 TimeToMacTime(time_t t) const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; // Clip year and day offsets to prevent dates earlier than 1-Jan-1904 - local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year - PrefsFindInt32("yearofs")); + local->tm_year = std::max(MAC_EPOCH_YEAR - TM_EPOCH_YEAR, local->tm_year + PrefsFindInt32("yearofs")); int a4 = ((local->tm_year + TM_EPOCH_YEAR) >> 2) - !(local->tm_year & 3); int b4 = (MAC_EPOCH_YEAR >> 2) - !(MAC_EPOCH_YEAR & 3); int a100 = a4 / 25 - (a4 % 25 < 0); @@ -345,7 +345,7 @@ uint32 TimeToMacTime(time_t t) int b400 = b100 >> 2; int intervening_leap_days = (a4 - b4) - (a100 - b100) + (a400 - b400); uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days; - int32 dayofs = PrefsFindInt32("dayofs"); + int32 dayofs = -PrefsFindInt32("dayofs"); if(dayofs > 0 && dayofs > days) dayofs = days; return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * (days - dayofs))); From ab0948d02e0684e2ac961511f212b10e41110d8a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 20 Feb 2019 18:34:53 +0900 Subject: [PATCH 262/534] BII/SS fix scroll wheel --- BasiliskII/src/SDL/video_sdl2.cpp | 29 ++++++++++++++++------------- 1 file changed, 16 insertions(+), 13 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 48ed26dc4..49aaddd67 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2136,19 +2136,6 @@ static void handle_events(void) ADBMouseDown(1); else if (button == SDL_BUTTON_MIDDLE) ADBMouseDown(2); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; i Date: Sat, 23 Feb 2019 20:10:11 +0100 Subject: [PATCH 263/534] Enable high-resolution SDL2 rendering. Combined with 'scale_nearest true', this offers sharp graphics on retina displays. --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 49aaddd67..df371b028 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -705,7 +705,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags int window_width = width; int window_height = height; - Uint32 window_flags = 0; + Uint32 window_flags = SDL_WINDOW_ALLOW_HIGHDPI; const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; if (flags & SDL_WINDOW_FULLSCREEN) { From f91d6d9622e201e60597a98e5d3f526de40c161e Mon Sep 17 00:00:00 2001 From: Alexander Thomas Date: Sun, 24 Feb 2019 00:29:41 +0100 Subject: [PATCH 264/534] Improve video mode handling Instead of using a generic list and then filtering 512x384 in SheepShaver, start with the correct list right away. This avoids SS unexpectedly refusing to run at 512x384. --- BasiliskII/src/SDL/video_sdl.cpp | 22 +++++++++++++++------- BasiliskII/src/SDL/video_sdl2.cpp | 22 +++++++++++++++------- 2 files changed, 30 insertions(+), 14 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 7bc43fe2a..d7a464791 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -457,15 +457,9 @@ static inline int sdl_display_height(void) return height; } -// Check wether specified mode is available +// Check whether specified mode is available static bool has_mode(int type, int width, int height, int depth) { -#ifdef SHEEPSHAVER - // Filter out Classic resolutions - if (width == 512 && height == 384) - return false; -#endif - // Filter out out-of-bounds resolutions if (width > sdl_display_width() || height > sdl_display_height()) return false; @@ -1054,6 +1048,19 @@ bool VideoInit(bool classic) int h; int resolution_id; } +#ifdef SHEEPSHAVER + // Omit Classic resolutions + video_modes[] = { + { -1, -1, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#else video_modes[] = { { -1, -1, 0x80 }, { 512, 384, 0x80 }, @@ -1065,6 +1072,7 @@ bool VideoInit(bool classic) { 1600, 1200, 0x86 }, { 0, } }; +#endif video_modes[0].w = default_width; video_modes[0].h = default_height; diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 49aaddd67..e3e3130d9 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -460,15 +460,9 @@ static inline int sdl_display_height(void) return height; } -// Check wether specified mode is available +// Check whether specified mode is available static bool has_mode(int type, int width, int height, int depth) { -#ifdef SHEEPSHAVER - // Filter out Classic resolutions - if (width == 512 && height == 384) - return false; -#endif - // Filter out out-of-bounds resolutions if (width > sdl_display_width() || height > sdl_display_height()) return false; @@ -1385,6 +1379,19 @@ bool VideoInit(bool classic) int h; int resolution_id; } +#ifdef SHEEPSHAVER + // Omit Classic resolutions + video_modes[] = { + { -1, -1, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#else video_modes[] = { { -1, -1, 0x80 }, { 512, 384, 0x80 }, @@ -1396,6 +1403,7 @@ bool VideoInit(bool classic) { 1600, 1200, 0x86 }, { 0, } }; +#endif video_modes[0].w = default_width; video_modes[0].h = default_height; From f67fe9671b708562b61618c857cdc91623ed4d9f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 25 Feb 2019 18:39:25 +0900 Subject: [PATCH 265/534] SDL2.framework relative path -> absolute path --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++-- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index d94c89f8a..20f9daa5a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -400,10 +400,10 @@ E413D91E20D260BC00E437D8 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = if.c; sourceTree = ""; }; E413D91F20D260BC00E437D8 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = cksum.c; sourceTree = ""; }; E413D92020D260BC00E437D8 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_output.c; sourceTree = ""; }; - E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; - E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; /* End PBXFileReference section */ diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 5b55b9543..a24b1d863 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -324,10 +324,10 @@ A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; - E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; - E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = ../../../../../../Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; E44C45DC20D262AD000583AE /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../../BasiliskII/src/slirp/tftp.c; sourceTree = ""; }; From d9ba64689979ffcf7b2c4fb59b923d20bb17efc2 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 25 Feb 2019 18:43:34 -0600 Subject: [PATCH 266/534] Moving SDL video mutex lock to avoid deadlock between buffering and drawing threads --- BasiliskII/src/SDL/video_sdl2.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 138e91b37..d94181305 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1094,12 +1094,10 @@ void driver_base::update_palette(void) if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { SDL_SetSurfacePalette(s, sdl_palette); - SDL_LockMutex(sdl_update_video_mutex); sdl_update_video_rect.x = 0; sdl_update_video_rect.y = 0; sdl_update_video_rect.w = VIDEO_MODE_X; sdl_update_video_rect.h = VIDEO_MODE_Y; - SDL_UnlockMutex(sdl_update_video_mutex); } } @@ -2514,6 +2512,7 @@ static inline void possibly_ungrab_mouse() static inline void handle_palette_changes(void) { + SDL_LockMutex(sdl_update_video_mutex); LOCK_PALETTE; if (sdl_palette_changed) { @@ -2522,6 +2521,7 @@ static inline void handle_palette_changes(void) } UNLOCK_PALETTE; + SDL_UnlockMutex(sdl_update_video_mutex); } static void video_refresh_window_static(void); From 1b6a63edf7b64cb9d953058f655d9544c2702d99 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 26 Feb 2019 14:57:02 +0900 Subject: [PATCH 267/534] alternative PR#11 --- BasiliskII/src/SDL/video_sdl2.cpp | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 138e91b37..c99e32486 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -875,10 +875,6 @@ static int present_sdl_video() SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black SDL_RenderClear(sdl_renderer); // Clear the display - // We're about to work with sdl_update_video_rect, so stop other threads from - // modifying it! - SDL_LockMutex(sdl_update_video_mutex); - // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. if (host_surface != guest_surface && host_surface != NULL && @@ -886,14 +882,17 @@ static int present_sdl_video() { SDL_Rect destRect = sdl_update_video_rect; LOCK_PALETTE; + SDL_LockMutex(sdl_update_video_mutex); int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); + SDL_UnlockMutex(sdl_update_video_mutex); UNLOCK_PALETTE; - if (result != 0) { - SDL_UnlockMutex(sdl_update_video_mutex); - return -1; - } + if (result != 0) return -1; } + // We're about to work with sdl_update_video_rect, so stop other threads from + // modifying it! + SDL_LockMutex(sdl_update_video_mutex); + // Update the host OS' texture void * srcPixels = (void *)((uint8_t *)host_surface->pixels + sdl_update_video_rect.y * host_surface->pitch + From 537412b959ba7cb551ca6b1c1e33a90f181471a6 Mon Sep 17 00:00:00 2001 From: Seth Date: Tue, 26 Feb 2019 13:21:31 -0600 Subject: [PATCH 268/534] trying to remove graphical anomalies, alternative deadlock fix branch --- BasiliskII/src/SDL/video_sdl2.cpp | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index c99e32486..82888389a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -875,23 +875,26 @@ static int present_sdl_video() SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black SDL_RenderClear(sdl_renderer); // Clear the display + LOCK_PALETTE; + SDL_LockMutex(sdl_update_video_mutex); // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. if (host_surface != guest_surface && host_surface != NULL && guest_surface != NULL) { SDL_Rect destRect = sdl_update_video_rect; - LOCK_PALETTE; - SDL_LockMutex(sdl_update_video_mutex); int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); - SDL_UnlockMutex(sdl_update_video_mutex); - UNLOCK_PALETTE; - if (result != 0) return -1; + if (result != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); + UNLOCK_PALETTE; + return -1; + } } + UNLOCK_PALETTE; // We're about to work with sdl_update_video_rect, so stop other threads from // modifying it! - SDL_LockMutex(sdl_update_video_mutex); +// SDL_LockMutex(sdl_update_video_mutex); // Update the host OS' texture void * srcPixels = (void *)((uint8_t *)host_surface->pixels + From 1889560d1f13cdf8216f07dfa8404f3a3f998b4e Mon Sep 17 00:00:00 2001 From: Seth Date: Tue, 26 Feb 2019 21:02:57 -0600 Subject: [PATCH 269/534] deadlock and video fix comments tidied --- BasiliskII/src/SDL/video_sdl2.cpp | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 82888389a..b6237489a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -875,6 +875,8 @@ static int present_sdl_video() SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black SDL_RenderClear(sdl_renderer); // Clear the display + // We're about to work with sdl_update_video_rect, so stop other threads from + // modifying it! LOCK_PALETTE; SDL_LockMutex(sdl_update_video_mutex); // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. @@ -890,11 +892,7 @@ static int present_sdl_video() return -1; } } - UNLOCK_PALETTE; - - // We're about to work with sdl_update_video_rect, so stop other threads from - // modifying it! -// SDL_LockMutex(sdl_update_video_mutex); + UNLOCK_PALETTE; // passed potential deadlock, can unlock palette // Update the host OS' texture void * srcPixels = (void *)((uint8_t *)host_surface->pixels + From 1647ba7b6fd2e349fff2c813feea6bcaff47cc31 Mon Sep 17 00:00:00 2001 From: Alexander Thomas Date: Wed, 27 Feb 2019 18:41:00 +0100 Subject: [PATCH 270/534] Fix header search paths for kpx_cpu They were still pointing to SDL.framework, not SDL2. --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index a24b1d863..9706b2348 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1126,7 +1126,7 @@ _REENTRANT, ); HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + /Library/Frameworks/SDL2.framework/Headers/, ./config/, ../Unix, ../MacOSX/Launcher, @@ -1163,7 +1163,7 @@ _REENTRANT, ); HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL.framework/Versions/A/Headers/, + /Library/Frameworks/SDL2.framework/Headers/, ./config/, ../Unix, ../MacOSX/Launcher, From 5867b3f4c2cacc80a5e2557a4f6f3c148f4db00f Mon Sep 17 00:00:00 2001 From: Alexander Thomas Date: Sat, 9 Mar 2019 17:13:29 +0100 Subject: [PATCH 271/534] Custom icon for SheepVM --- SheepShaver/src/MacOSX/Info.plist.in | 2 +- .../project.pbxproj | 4 ++++ SheepShaver/src/MacOSX/SheepVM.icns | Bin 0 -> 76219 bytes 3 files changed, 5 insertions(+), 1 deletion(-) create mode 100644 SheepShaver/src/MacOSX/SheepVM.icns diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index 670400d9a..02528a921 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -28,7 +28,7 @@ sheepvm CFBundleTypeIconFile - SheepShaver.icns + SheepVM.icns CFBundleTypeName SheepShaver VM CFBundleTypeRole diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 9706b2348..7a4b5145e 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -79,6 +79,7 @@ 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */; }; 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; + 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; @@ -321,6 +322,7 @@ 087B91BD1B780FFC00825F7F /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = vm_alloc.h; path = ../CrossPlatform/vm_alloc.h; sourceTree = SOURCE_ROOT; }; 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; + 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; @@ -712,6 +714,7 @@ 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */, 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */, 0856CE8314A99EF0000B1711 /* SheepShaver.icns */, + 3D2C25B4221092BA00B635DE /* SheepVM.icns */, 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */, 0873A80014AC515D004F12B7 /* utils_macosx.h */, 0873A80114AC515D004F12B7 /* utils_macosx.mm */, @@ -961,6 +964,7 @@ E44C460820D262B0000583AE /* VERSION in Resources */, 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, + 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */, 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */, ); runOnlyForDeploymentPostprocessing = 0; diff --git a/SheepShaver/src/MacOSX/SheepVM.icns b/SheepShaver/src/MacOSX/SheepVM.icns new file mode 100644 index 0000000000000000000000000000000000000000..0d6552464b8d273128a9d6057db46b222892c530 GIT binary patch literal 76219 zcmeFZXH-*Bw=SH7NRg_7AYG9rU3yJWDI&!V(gl^?yOab`X;PHlQJP5aoq*E2fHZ;7 zJA~eo+%0*}x$pT-8RvZW&%I;#gCwhD?zQGK=QHP;WN!;oTPF~hx5mO$B&O_iG{^yUB7GLlC<|-aoRBYMw%wV(iA}d2O{D96k{A^~Q5q7| zOAw1LD|`0nQig-%D_Hir@>i2a6OT%rm19uZ8&Zl6xz`&QL~qwPx!(`?=T{3{PQCK@ z#iX5+q#c9-xdwh)3l%7B(fDQ0GASY-A13pT?u!>2J7T^giYKSnrYwq2d*+-;GT4Er zOW?v{{lQ!OFFs~Dcl-X#30ui+PfySGS0xV&4JXs*)4JuHm-^D5m`NWfPR^@h|O2nhK#ra0d!5{NBbI;2Uz3=$sUuu6+d@IV*);77&JrR8MmGoyA=KS3O z){6Mufp|kbz2Lc&$I@3l*=&8~?599;K~I$5Zj5_06kf1F@7pK~`LgbtftzC<;(G#q zTkt$T7w$HJA=&0wzB2ccYb2$z{Wh7{g6f_6U$drMI+eVpCre^MdR?M$(X>OcaCx^4 z<~1o9nV>jB509$GLFTeDXZ)KZGh;bL1@02?-Z3sMe%5P=GGzfSAt7;Ve|HyNkN06= zFs|S(zV0|$ATmS6=qhxs-&LNtQbVM{>K@#Kt<_gG|DyObhZ9Bk2;B~as!s8X_L_Lk z)s+?F`&UvbY@g&K4mY0*fBy0XawIK%{-@``hN4j_hg}h#v>HM2=8iVw&p6Sb3*V8o zwMT7^GLJkS+y6|kd%Df@Jgvg#P*m8o{hRt6!o!0`q~QmL|7EOzso^0$=!wLfq*2T2 zUCBq$4#eZN9!}Y>%D;X4hOqp!r!B@C!=93NQYzszAh_kQ<)K)gVMDp?ZHjtdI)qh&RKBKR^N!8hWPMelbPL8In}Vx5Fn}ZoiiRsSh7y_|ZpzxA#Ta zi72MZk+q|(ezUbfGq2{F7g5i=$O?88CmyNBT~ON zz?Ncv3tghuz4@m4BUu3*pFwy*e!jB2;_J>#!=CdB0^?0| z+>7R&WuQr1$hc0K%`i1&f{e0e6*_XizWMBz94JI%_VNw|Da-w-C&dvvlR`V66TETj zZm-2WPo&vePEs|MJQWSSe0I3RAFZw6s5W`skK|rxyIq-^8MkFetnNQ#Pf5Vq<({*3 zHZx%@s?ITAG4a(inP^z|DEX$fKN2!Ld+VEet^yI*${XfIXg|~ga<(>-Uxa#68WjRvr zBpLaHSg$QswR_iIwtw*R+q}U`K?uvccbL^x&mD@w zOfHh6nVp+GQjWnEI}xx5^2ug(2Hfr*4t05Ae?XOt3J;SM#h>oyhx^H{?N+w3xjB(>e5DY(5=5rK@L1P-cp67 z>#kp*q@aLnX?47@K3sERH`;&AhdD31+>chHA!4q*{bF8c^H-j~4u@2dpsLMco2}dZ zhY!!MsJ!+pQU=@DsiRJhOSo=5&m`Gth8*+`n>>kk;7<&a-W=1MWa)Peh!#R5b@EDBERs1|yeIp`DX)8FLreMh zB)PWTO=9(9Gw4x$vt_a&?WV+p#6_rg1cW z_3ebx4MSO~e}fVH34ZTC6~A@dH>mTGB!G zd+h1yX&`y*!*}4>xR?AqX`gb{=4q>Qb1BZX)|s8&d+@TsTp66UtTASKXBscCdlUDFja z_>Zkw_mhqewLKwcqX<-~)1s!w+i?^Er6?(StHot&erK^at@f~%T`28#dXbV$hzGH{ zCoRprpxlCj*0ek8yK`EpH4k&HPH0(PB{B=C@c~Vszev>Q=6rrw`Bh+DjUxQ3P#gK} zJM`JQ8St8$)lFB}qXTb2ZYp~9+Lo1i%jJ5>VU>yFnGdV$WfK!Av0J1Fkq&L$m@$r1 zZ%_H%jvz^P0jg%GC{cL3q@t#C3GMr~nB4D3a(cnkrQ^L-$|o}v!m*~7LB3!U4@KPU z>Ylkx*v71*X82G>tcZ><(kt-7cV=mo*s+|qLINU+$`|6eNkwNUNbPDC7iu$Nq`uvi zzQ;Uh3Xf;ShOHXKKi+UnJDe&UJ14<`GXHsPj+&BEu|xYMHS5<{-zHMq;%?W24TIYj zqT7jq^nrjX%(xDjCYp?q>~&@_K^ysx6*i_jvGiA1oKuEXNCGdM(us7CZLbdH`E596 z@4Oove7v;4gcvs0e6!*FO}>46Tz~01bj!mj18{BUS8q(z#qEPHXN;HIFj;11CQPKSeDH#%&hCEBjekeTe1RDRGl2Nw)BPBDiv!-pOOOZt% z^$`DlyV>f}s3i9Nx+5>7rW{VEjD@Jtt=(#Z`RaYSaW|01>&BBO&(tyoEn!osI@hsC zWb}=%s_^^Q6(DpWcdgq?HH$t=h*27|BSnna7|?s&8%cHu3{^pxEM{Y(M|E)mU4L}4 z;4zsXSyICK91$>LbWZzMgQ<1iFzI03iBu}I!P}ck;3)*OX3qxlHh!?9xL8q9q4zlV zhO%Sow{PbeJ}ZNa{ZEh=K?i%%r8;Dw!XMsnGUUlIvu-XFG%~I5ZzOEK)QfP#OeQ^z z^7r?@iVb0seA_yE!LUHPCORgDXkt0Fs!BTV#wggE@kuR)Vcf8$)pACh3P9N z6G`%qXlOnLcyTqA+HELV7+%P9zb$G;BcPULg_}@(y^$d$gWVd;mXTLq4&0y&F<;)j zS!)v65qZ=BEAqPD^;oBv)@fyFseyz`H3Y;((cw~j5vh-P91E13z7Z8i!E z8Kbdt+XrId1sTE1o|u6LYC`Meb(2L_wV(DUvoACl;(i-eUj+TGX_!3E11^lgm&XXw zT}sLF>rrr7p?!Rl_WZ~FVE^OeV}~e51OmZd@0x_2aiEdO-??X&7+|L9CW$fLNYF(6_P%0 zFzbbzTSRZY=ScdjY3dlKg&%X<6hbQw$wXnGgBrM5x&c#^;*bM?=8(&?SA4lp_L9@C z>TxfC>kz#eskit9Nh-A6B71^7Gb=ENL+Pww4FEaX)E(_Yd zjKM;7$Mu!eKFFWO!j__{HNMwAeCSAAQa*;f)zM8-LCk)hB{w!oH2#^y2iaiJ3pIhTK*j?)NJ>9>p-|Jf^x$CBTp94AYx@qPZz%zDQlTVWj86`g>N6CJ1 zpU6G|c}R5W*IN&{fg}Aarv&6cm4^Lvr|#0H=BTCLc1P?`XDUm}zE`Pb=L0Sx3gDQK z=xFMerG9Grjq!7q4v)@wCt#LwV90gcDzRFI+(rY`CK+E-mrowyyi}^^w$dw3si+Q z?wlak17!C+AGolJXiZQdjuPZDv$N~x?+3RV|KNFeae4MPG??#Wj|;9RN%pf`{=jhU z81-(lVJUb8;dN<=j(qoY7kk9|z;H;T+MxatJHlgT6&IuWtQ8B=(12ajV^`ntitp`= z0qgK2t6|PFVnIK;sNpBzYo)BI*fwQS&r9B9{P*sC28`xq#m@Ohkf~aQqEcnRX#O+@ zqF9E=X${8R@>Pzpm<8~JbuxYxZ5T42pOLo9?u@DUVwbY&rO=C5e=`2aJ=^UiKVrRl zswN9;w30`pZ@AB9Q!ltzH+W)XkhV^v+wBZ%sJK@Uo*(1%dK)|736Am1di2`ECp@=Y zJF?d!ebsB3FIA41*eG?esU?=p_;E7ZRN8K-0vyHt5viHQb36$*SNPdazEX$WJzP8< zjH6Q-E)hLpNQJVW9P_7%OY9Ma_q>NN8N$x#kcNKrTC>ZUYOKLb*VbldlPyh5Od$DU zH8Ia+U>^-7ZI7L7%I?HuhCS|J-TGPox_@4*m0K3xvsYn#G!R>V(3j}l{zdT1QQ!ji z?*^f2q26ChtXj#NpA3Y}I$Sgs{m(UDoj?^H>)ppK+Jx<$rYC)-Cv&dxWdyHnfD<~k zA;wN5BL=k>K{cKY3)=w6K2!`n_nKZSfwPtMt%|~j3Cm%cRplPCe&JU^BlYI-@nwT7mBnL!s;5fp;P|nDnp16DjhH2es_fNk zGP1H)VN_!Zp73u9E0XL?&*$2Cl5VSWQ}x%K9({61G&8ySl%wIrO+DRcDrz+l^Q2;g zfjlQDqWii3BK5J)8yD}%N4BL~!rO0YKVKcM4X*e0Nd`4bHeH^<^~pCJ+NRJD5fQ_6w$5P+2v~h(735zP}c!ilucqx=lO2s{yBk(rXQ7dH-?J>5)=Pg<4 zU#g(c^YfcF>U)5x&#@)*qJ^cN9_WOQOM9vW8X72#m{MUOWJ1(`)Os7yk z`HNSVdWC1^tl6*jr8Q**YF+FfJp~wdj3u?^qv>eVTR$UH=PZL1v#0Uj`jFiXF1R)P zXCtI2kC+TJOzr%9a*dh)r(0DDY}E4Jr5H5L3e&E>0{cnAudkPv!Um4`GTQ{xE}etKKhHj$LA0FwyuYv=-;T&;m<=B zQfI&=WI++XDL6QeuQt&O_Qk>9-`D3yAGm1&?CW_fV{uP_4g6{7`+NW0`AbY{E`}d1 zq4tI;I=UR4Dj=Lj%9!prbpsZ3guj!7-l0fhon<_@#LsXif&H?UfeRJDRr8-xp+H*H zDLu8lp!b~U^m>P>jlsK~4f*8ry|Aj#pGKzjh>}`O{U1({cjm(PK0T1ZYZ`rv!=O=Y zpZIl4N$soQ*+^&U*!krs&QFhoo^ z;`nezX`HAH<>bCScXtdegd+QjLEjrbu*;kcW0r=jKSTM*8&4|ua6NKz5^X{Q$?w$u zzH37^L>!XdQN$dKu>=Q%K%|GVc*R?zAT+CoBjTK)^ExkNC5nG2+!JMa`s?XCegw(q zD>D);z}d0uQ~I4n3DEFzphV~4=uX*1T>f?ZWk&-8mKWw7y*K8v_*6hsv7NpbL7X7L zMPz4!-8(jRfy-#gpGPsHaylCkF)apN4YNMy4CCrN55A|p?2HBjb(@k6!EG9dlNhJx3hK*GuEVwIU9LFtXP`l>7LOjAvtZ#OLF=~X~3 zTN?)7xhi2j(!d6uEHWiArs}eW)*JRN&Sz<*yyyQDu)XSC!!1zf9=}I2f~8dS-$#Ke zbANa^MS<)?D=B{0Up8*R5Rp*9X*aBd;c2|mQTs@(ifNHNq% z{)c;IJI9Vdp0nqa)N4bkxyWF}cX6e2Sa1-Cmka+kUXHjjAy*Gux(|mouqskvLRE5< z)#g*2uCAMr&)_JSGn4%mr<}@WFFiHLd$lD6vOkxmVf=~+ZUWI?bgaIzAaUm&`Iy)^ zv6RyS#fvJF=JO5AUoZR##5#a|$s|f@lYtfkItyp5LHRqCJ+Q-h@X{A$iLgcVC7$}X z5QG>y&Z)(XLs zFDP++0Y`3RBynu1u}3&+mKM>s<+iL6uegcXY@pVeJBwX$L|beMUZj;|4Fd@Y8Q9{#Cs55c+2X@7e|6eD_a> zLJ?6Ai2lvLKNN!h90NgTheCbFudn_;heCR>e;f*vY(D7!@@U0$ZH(2pt{adPO4jNG zJZ88?Pm^m(o<8#x3sR#UdPhnzXd8IrYd`?D+v16@E^k>RwG_|Osov4yxQ;S>5@Ni%SiIv@aS2^#2sNK zynEyykxFI4LEtbl+Vm4djSsGUT|0-_hkS>*@^wGL${Sd;I@R;I3cJBlm^K_@rkC52^g|tHLIry0A`yA ztKMR_1BPln5|3`N1GE3n1Xb@yOh4^)>x>r2+bI5m+S=L*T3rdAZ4D!NckAkDQTfX5 z_Izhfj{U?Ph+c)Qjfqu=WHSqVw(BbxY)8rtnyma32v2o@kp9oQ4hyM_r9vc2y$8z5 zwR3f@UOtL3V!pT@zt!Md@%@^F0vpTL?uNYV8Py7`;s(HidK(OlF3#_ zit{Pm%9Ymk-YJo5cnqYplkR+v>1WWWwwk%6)AOt1wnO>Xyx<9ge3KEwU6al@>))>| z1O>Bp4DISPSO=DtzUs4QM9Cr}LD^Kk{FmUM;x+jeD&I%|hyPL6S2LD|;0`F;A&CJ~MvF1~lbY1C9P1~8J>F1_%Tw77i5$VYFIHu+$*s<2jo>6eRzWVDdyV$`uHHUY9F zPV73~EF@IDuQ3+dx5sihuab&<>)~yrERym13phIr*!JmReB7x)wwRYee36&&{Mzuo1#v6^4Aq0)c7+)mQr#dKdi!e>I} z$N`^~;v;jpEN|T$d%RZ`SCrVOC>`oE(-f$)JT`Zev&U%3Be(n^znSGt*N@?YE8LH> z+s5kj3{_I|h$`g(_C!-GPP!zobXr-y4^OdW&Hb>GBY-4=0 zn*;Y`^YzO3OM7>>Q7CyElS5l?UmH`I^=-kuZZ|8M+-_QXY-OoUiLi%Ams1T`sz$?q z{sXrBiER>6Ai?a+C>8qy$A=ry5k3i-~dlKJrEIn+wcKe9mXQNzjr0CW%F=03}5j=a?dVu zEnXvdN9aj%mgEUIz`(qB)~a{M$^nNZc^Zs0ia(7r7ur9~Ge_)nODdgAxS<8cFx9Jq zKNW<9h5aU)w)6Z$3xX7?$VmR%P&Ha1doa%6SNIu!a?jhKvsf2-EE^DUu_TIhG* zH=fwT@Q#Tn+E&TlgM$w#LIsoox~?BRf16#6<*%$y6B)U=Pudx|Phu}!%XOhoKJsy} z96$a{?h+?UxierR|0ozn2m4(UyAC51xm=eK6rqH>lI@A$2^@&my-MX_nilNf|AR7Yi8Jd>{qn? zI&$^*{x3A!EUgVORACqy5PEytU3ci`gBul_a?hkUKS;y%m6qSvDp6HV8Z= z5AtOOOw)1AE0YQgMIL~lj_N?zE!v5b`GXzNAM9Qafdkx27nf5IKi5tKnVHzeICT8r z1u3>k4FY`g$GVA#flQ5=!!jwXJX(f#2G=4NTIhu6f1Q!Lm3+&}LO`Z!jgn?4Y~MBknxHI&m`7AX$Ky zC73=*S58n6@>$d4Ui-L@+JtW zw>R5(M;CSun!4Aud;!7&>~x7iTbPElG#Lcxd%dtr>Kl3$33C3x$3P0z1-#W<-s$yQ zcq>5EGA(ozP)Hs(4K+>gU=72I>8WkD-xI3ax8K%GZv;5rlCI8Fk31K%=f|Chv;%wi#1o$2V;@T zbF)KNJ)G0h(j39fGGf==`bM22+n>J&LHmIWs(&j@0(w&ez`OK>LGHiZrCP^^3@i!e z&^ef>`yx*&R-^AdjGE-UeAvp?-rET~nu{>O-u7SH*%oEvi2KqxjB!jbm!gUw-S_dKj8~^vm2K0BUz*)crKL^Q_~pp* zz)MI&fo}|U`l53D{zH@Hm)rGNvOT_ICT3<@B~8y{gu4!FO1UQc`p&6tB0fgwfcrV$ z;>6B6?7Zo=gfQ!yY=G6!Mn*Kz0waqHHsx>mH)2Ofvb-{v<`!OiAg31zw49`gM4>kkq1T?denk7Gr8dX+s588$v{ZYvprCCnb) zzecE26*ME?z>}bAmQT!p5{S>%} zJE#4pRf8xSzVl=K0&#~;Q|&cuH_W@UX?I=WWdDj!#X-GiIT~lnLu~h9oVjJ#2Ahrr zy;e`G<3bMxZv&O46U8DOF_^)0m2tnpd}${iBRyS>`dHJJjkF$Dm#7)jaK&C$uPyWb z*#6Jqio(H|B-4GWA@GY{vk#RT&_f%v*XAi%pI2sStg7*GOKzeiPbk~3pq{{_@KJU! zG*!`<){e?IKFpysaYR5TKP@8u^2*oSA1#42PW(dtDtBL>o&5>3;&*=u-U6{VZ~OPc zLO!_wj8+!~{)VE2-)f}U+hQ=8fxidwne2%X>@d2u>+ExUdn{3vGu z2`UW|!;(VBUFV8=J-Yp?btS(QylW95gX(S-?&=4BsO*6Qxxoocx<{yxT;mdbZ=ljK zedXeM^Q|{Uh{lVJj8OkD7TWdIp^5v?F+d{ZfE`KGij%4dJp9d8^Eg$CE^~cn&w#7o z{;9V#6^sRy61o~QyO#+zt0?kj>J)lATruvbqJ$Wrca^_2|NJCT;f7#l$zAcN27QE7 zf{YI1Dm!G$Xjp^sX*}1FsIjXikkYh<=rV#gev02>d9DJI`A+FW`DOQ{$s|APN1?Iya_!J%uk@4GFCpFH^y-Zns}(eVL&GJFI|&(>eL79^)V^2vA7f^JG*MU)?v>L>YZ6C zc51`q=b;WFv7bptlL6wAa}yr$L*4;_! zJd1Z_qm;Lc*_aPxI3;SB>~Te_ICKUIoVo|tDSZlxay&+w zl7F?&7SKeEJRDDB4rJA-A)CvLkad8O|Ep|<`2 zq4(UwF!#;W5nQ#4Vqh96 zTl22fi#-q zl3H>Z*hxpXhV?_7Wu)Y^=Mj1X zLtt}<*WO7=)nF?$pNJF>!mbH8_(>swAD#s54`Q@lqM#d~JEsg+rzC;1h#mf>ENK9c zywBiq&kUMnaR|Q0_C1v9iS@YGx_+A)_kC z4D;ccQwO6!%Ch!07I;F#fB;m+7tjoup)m!G`6WOz8dJ-cAxS_fX$dMMOiWq|xL6<8 zrZc&(CU9bKenZbd1RVn`+5D1w^*cB>jWG*cO=!(y`draF;3t3q`*06Ky?kaUwcIB1 z>77#8R@0>~2BMh;Dut%4R7K?L9!J_n-cNE1m;e`tACc_LaOWCEjU2=xPI(F(4HjqLd$=Akob2O|M%yS z@Dmr1E;C~G_N6Z;yC(2(h1M`OE%6TE+%`~kNIXr&9_9I! z!q*z`mEv`nGPUnxfD9iW{tvpAdiFP08L>`kydr%C&C8MsJeV4Eg?ar5_OM`HYCBFS za`EWVh6)X|rg_W40Vlgrc{>+9Jj^{tFQ9vUY=9A{5k!}h75UiN6_}&8JNT4p$~EDh z$wt<-R2*&~7x))as23+tXI*)=aL!i-u-gAoSGYeGB!+G`vM>0xKkkF6I|ve8!(iyw zwe=m|nQJj+!CcgElhC3aE{1_nME=1g;YYNvSs*@6YrrqjwA}y#LQb;jIE^_3@NF_0 z3kc*Hu$C9UoIWr?Gysnl17FjCv*!Rh%Y7Z{a66R@_{0TICnJ3kg=FC9T1jVQmRtof zLY24FFVOrE{Gua<;xeQg5F!@Cou|nD2>60}RdD02)GFZ9!gjhi>5CvB3*~ha(IFL! z0oX%7xs=#f9SC1H=LLz$eHShsA{LcDthDV03joFRf2zO>OZ~0D|E<9P7e)EM75Kju z_`enSzZLku75Kju_`enSzZLku75Kju_`enSzZLku75Kju_`enS|GZHDw*vpS0{^!H z|F;59_O}B6w*voPR^Y`zAR;+M;4w5v5Xe3N59$TpQv>lt>Z#I`z}qk$j|1K$@VGy3 zssH8;)cdCsnE%hO`DZm-vE!SEMfpneLYXNl$<23p)2RGuZ!qATkKz z--kqk^mV>JZk$-1{?*spGw&S`k~Y@Z{K+OGXDFekYu+0ad9bt6@9LT2^{eWvJu$NT z(_ylG{{CQZ_n-07^!liUm8t4qUwY2kh@=kB{gI#LZ*#l4I_JHSAmWaM?Xswm72i$p zhz}A(k(9Js8Qa#?-P60~oE`4#?grNOXRq}?KG|ht^u>2|0DFnr-&*Pe_UhSRan}AlwA1T2 z(Kf5q-_`kNyg0o!YHn$=Y9N8o_DO8@-W%>M^~>$(X#cZUlAM6Wa^KPAO(X_9`e(Dr z!RT*q|7o)_*|DMjwAn$HV3&W|tT)Q~OJ33c-fZLX9Oi#-HokSH-}hfPOZFdZ_FR8P zP{4bC4vldAT#swS<7d1<@%??xX`Wt1j@bFL zc5(jC&)%IivwEjUJOwcB`r$qBoQBq>xe7x24$|^ndwX_q)+iDWp8W%?m3dXT{>-5- z9z6VKub(YzKN+-jc6N7lodJ6*G$HJt_WBDH;@0}}Ux7vb;12|qIQ|Q;UC}MgjXM7d ztk*l#SAV{L0haO~dj+2J1o)0%>A$~!1OftqAcXrzcHIY$f!04iR6y|6Kkgryu>0`R z%!6UmbGT$bUjUPDRVayEK7Y+Roc!aJ*65ENU-pT39x%|W7^|+m|H?@hFoG@*xiR=u zO<zAvq;cxI-3J44dJnzimfeC^JbHb586WUMP z2TFe?`Ro!q(Dn^S609z9E2F~0|lIYg%Y)0vFH8>!&0Q3ECfTciZ6 znbGAF=b4PJPvAuN`Lde-*f|o;_{W@AuHQS8aX$x1ocdHV_`=zu#Gse^RZD(86I`F$ zxJ*y)w!NRkS5SM?8IRwl4|_M0))*$YJ!}=dgq=4M7-0| z+gd<9)X|DtbE=r*qqq8iA536ab$vZcA3W>0cGQU;MD-h){%Q&wn4I(8wu+HE@haax zJY4Y%Nhy$5@P6ijpHVQCOpwF0h8SVkj5bg2DdEzXl@D}eC90zn=I_<|Y$?s-N+PCD zabwN*L<}{TcMs60L=xv7*`3#T+|j*dVV$f*Nru&epC~(zq4nA#d&7?^M+3&1N4iba zb`l-}u+^8tuX8MmU86sSK=VED%G#2s^5Wv+qjc%y=}Smy!O+1o9W~?v%uw>FOz=#7 zv8G_k24;E{%QMv)KLzyntX((eOzT}mNMhsAU=Hy!Z3^=NGjm_$-8%zoK?hDG+}iw+ zksu`snEAALh`?)3{HfsB*%{#3A%6zD)PR|M&sGVhA$_?I)aBriPB5ESoWRVeT$eM8 zYG5We2Q5@eJtSCL2|z|&YD3k8g@pnp<)qJ?O~CRQ8UJA6=I|RUubT{PlqivExG>IF z^)$(C@(LN|blU9T?TnWE$lJ9$AOyZ_w)YFQfcTTmb~b!^025;WB>M6SY!O>w zcg+1`x!Gwhcxy`@xLrG?F5hXrie8AVrNAfC3x9cZuV_!%uXz_y2=h!nvd{eu>%xc! zEQjSO^bU8m_|%`oPh&e@Zf{NBcetMz8bV23a##oRaE&#RHk@>;o84>CG%7~Sys9&K z2>jT)@uG0^~uB$gQ| z0pyv0;>!h7!6VgCacBBV6#;;4iR@Pv@P;X1ej&UWA%FZ8+IU*AK*CQ<%}uYTfHUt1xeJE zYHXaS8F5%^vSm_6Mh1&_>VEd4EQwCUkJT8XYG%tBO#tNVabiUh^zPJ@{kLJWe3t=Q*>aIv?S`n6hQ+L{@}1Wl51F!|F=Ic=Xvt9*iq{JA`$=Ov~iXN5c6Iq5B7 z%f0E~jji-rF&l&-k%?L%rg{1urOm*5`EU?o0Ed2{gg;n zse4bXD0)jgcf$_k@cnbger3T=v?n}&m3eho(HlMPVxCV*+8-7)EKWJj8dZd0Zhon> zpNtz0E^+LcI-U|oiTUU!QxA9M*A<=A7BSJ@i#p)riYhuXcaS;H&;1I9+G^SCYovt? z^J`uZyA1g9P1ka)e{gUS<=c7>YrN~k$20xXd&7IHvzg2q*EvOR4Nq!AWP8D9~^+(1jq_5^2It6Kw<%8$k65~o>|hxOMRg0PlcBW zCLsgJaN*JQJG=CCE`Z!~jr$3X?*drM%KcK}GcZ-v0dm)AOegTg3J@R$KbupYEh;<~ zAorp-cL_8zc(rgd)U9?ljDvi_`(R|JElX! z=&O$w5-JotlHy3HTas1qy8~JUB`ZVzf`|b>y_DLXu8j?tj+yi7?Ya`Zl$yz|CG4M&Wurr}d#1%UzMYgYwX53SZk*3H#A6N&`DZ#1q|UMt1xagO;jL3+ z=KQGrmUr}XM5EfSbrh_5!!RMkmVyu#w_aRvYzqD{m7BjCbI5!S^)^En-;YVey2pHD zB&@*8jz5lfm?k9bZ5X}mxnYL2)gaB1FFwfbF z+v!ZR!exN>TFUsI&0{wJ0In{JkUqmBRu|x5@gz6_fqVdgiLv&?GZfVY02+?hWGCRJ z4d7Bm`8x?W@cVeJ)74L1n+b`**HS(n0@YY zC>soyoSjzE(Cf2bf}juV-N0|CdWr2XB-l|2IE-c#Ej9wrw7cPq@ANxBEL3ImVLi=m zPbc}aRSA|hFqz@`X;D@OsPoN;gBmntGh&W|jjS1Q_=AnAnN7+*)#P-kYS&{buL2hw zcsNnhnB zednpHSf`mK8GYOJ6CQ<+n#e)iWL|ZVtugY>t4t2t6XhFf6XjcsO8XJJwO2A*VznP9 zRIyc0yh^p*&f#?-R=I&2H1IW$z>0x@9xe){?h;@V1K_Y2Z2E`40k8$q-#;e6#t6VB zW@$q3(ivc06FHAJ0k#kTHb!v~0&ETdY%}K~6$r2a>?|A-&p?2!5`b+BqW0%70VP!j zSTSu;J_64$8-W>D*&>C0+#Xw z!N`WC>G4Ngo~MUf2kKX3NSWkscnUw9-doN}$rtuqAM6w|FqGAKJ{PwbeWS}zcCVPF z9^s5f;~V#^B%eH=8_rjF`h0&Z+YPrISLXLy%5lPF_}xZ%DXk}-S=#YM#EIRh^i~ou z%C!{{BUEXOX=-q*-?7KnB2uOc7Mv#B#3nnFJrSGTuntzMln^?HiL%zCl{%M};G)3C znKGlEjU`I@1=={nuU(udqkZvOySSa#!>cJXXH zn5;u2qjD>rUa8owYd^f!rUfnMnYx4&xD`jpJmP@^jrl|I^>=5Qw0;0YC?%c&0yGf- z!)biWtRrA30A#G?q%R4Hj`=5mPVfFIr9abJp%Q@T<3nV3uam`3xHGWNfw>jIkQuC@J7Slj0$` zFL$_vWAnMbFL!cafJNOt!S_!Tyqf{;$=JVty6u?jqix{wWC;iSvK-EX`;Er!zu%hJ zXhE2EcXXgbn$4VsPc03F>X|#U>i4G5W-zysLR{_SlyzanV11qgbK z+7Fqooe^3B;K&k^HwlqVOcTh8DnE_UoMANrcvoT7$14N~9006Zq6XieEvsPxXmy8l z5yEH)5G%#<(i+&{)Fv} zKjgt1)yTNwg(k4NOSp;&S3Mq_F9|DYGh$a#^W6*^V&&WY(|$XJOF_WTp<(>9+{t>d z`neUe5$gP?Sv$n4scCN{8{#Q;DsC5BG<_W5ghOW=tqYB$z`PW&>^}CW##Qs$;bm9c z1U=5;NcDt2pL9KnoFcSy_-1)bFAp9TE2rbUGVD!{dfc@CdLHv`J5grTu=8Z0z|VUx zjAXcY%h1*9xNB0;adg$(ZhmU1R>#i1PL6j$C=sh9Esn4HjlvikN<3EYZfQkzBz7oG zj<`%7a<)QmkR3u(FUGVJRCfhX)~msvf zBY^xEfIR!LS~B6w$^eofvC#yyvVmmdVRob(Aqs{7G8jb!l+M)t5MaObhrAwy*vSYO zinxhx(3xqZUjsr|#=~tw#w`BlG}=^3OJGnXfF9K{=KgUS1!^;c0T#SxiwX|{d^$?4 zoscjO@(3TLE-zoElK-*N_K{;?qKs{i4gceFA2!9qmKTUsb6nJ;Ye!CV?96cVjFz)v0NzV*`| zd_F@)B_CLF(W{;mJv&D~ioA+&dohLz_s7e+s-&1ZugdaoCou~N>=fCWVT6qM1*!Js z+yyqYxsoPs^m=Y`pjQT3Cur~n~EM{6tUX%cI{Bf()zC|X_*vFG6s zY^^C_=o95MiLXcT&XzEH)}87er44r??D}CnMkQ8tni5aD+8?!rxw)`N1L5i)_yW#>RHiu_!$-yU?@__rzeSuMO$r`MNHT^=5|egvqEqhS+5kJ6kNH2 z1uk|NijI&~Jn7t@@E_P|Q(XF%tx0CB#EyTm5PYV58uK{7TVI~5ARIQr0RpY1CXh8b zpjH9?YJoE)gDHVq>(4+j{|tQLol?b12z24G@g_HRQB2-K{2suyxv$44&!&t30o3@O zIv0TfUI7#x|3s_iA16?tC}17fe*Fx_K7Ii1k`)U{pvZ8iA*CmQEJw-hF+kL5r?v!~ zT!G}NP;_HM4LE7Kobwtg6bx>>0`SHwq~%=*G@dUU#@9#h%LVkr-&gV^FgV@0g=vfa z&#uQIB}RZ7&sAjvy@(hPs&V#kOr06Myn&j=QL)M~Sk6Spm>vlUG@r71t`!BDL=2$! zdeS0@=z5dgSL~Yu+LyJ7G5Ecc11&+Ft+h0i$Ailsu{Q-LIsJ@!Oi?Q9^QL|~TORWx z2>j4wpnr#3uz&Z#Ft1_9#~D^7+fm~qyvYRWaK}hU*)wM{!*9o=5@Ay}dkLn$)~Y4g z$HaeMzq{NmbO*R!yb@+=W*CYsh&hpDO`S75r!O&y5D=tn*hsdeBK_V{+-}#K$s3-()B&FjO#!ISIvKMkqd5If9^CJ zdz2rxMhwXFeM?A*`mOP|Rz3IIk?`gNonKp9x{fAXcSl!g^< z7Td_@QB_QNvy8q#K%esdQ-QcbzT2@V-g_t*&3#|PcsF&~(qTvJB*a7Q6>*jIAsgL+ zA?AI2rCBmUCUU#ckL32&Gu-FH7(?%?w1}w&-}|S*LiG$mXvB2F?X6D49=iCj-~M#5 z(Qkg(Q^H#TA&mQsIGwmzAEV+{V)y9C3K!jB$lcPhdZZ(rC5P`RI*4}KF&j2hnb&qL zJ+7?`@8)H*Pf3b$ay>{fgNaP0B%sto5B^ts?*Z0S)9s6I5TvP~AXsQB3W|t|6sfUd zqgW`?1rY=U1f)ZV4HOYNEf&=Sk69~FfDzX{6lSJ!TXGv1jZt0~6-K6~+@XD( z7&Y!^{EzNF1Jei*L**ab!pYhuqor89&{ut_-}+Li&L8zoW(+HT7O{T93wT)Xl8ydO zgoy%^XAx$dInED=imv0sNj@7?1v#NR%mHexg-b%)9;Ew*6ATva7I^IOkJ%pHXV= zTGmC(bKl4f6($;6x8$4>27qDhVB3j^YGy358Yi>gJ0{7Ct0qWRyC^f7!O|6VBM?FzK-FVj>O=;rCAhmLzBjY?cQh1gwMZMj z<7UKGw-Z?TXMf3qhQ%W8VY2ORt$K!ux3IsHu**~sGhr=rMR2sxk@_yt{AsfF4n<5j&X@|zw8u8zd_#zpU(HFmusro1JO{Ppb7vx?pe!1Wm*YxMcb zLWB~Zohwm_JjsFIF`}xH+T1pxbLl{^sKnif1(amnnZZt%C-xH}iEN!>xAu+=7J_pkf_bFnSh1Uk{?Ff@GCT;Q{Df_JE zQKk(P>=-D1Y1JA8JS9$J)iM6+MkO84$Y{Xm#mCTLmNJf=i)Pnd<)ry|J|(68bT0UV(&JfGX>hJRmB>vmiqHZI~r z22d2gFI*>x1brx6@R~O6#ORAy?HhHbWS_Ulg>6c1&;qt~qD-tdzCM8&na7%ySZ#nq zys4>F3piy@NBv?MZkdzp&z#V15gC2sO*PckegS`ectZ74s&+GYUI{ z!ht{QsrbvguyOzbmrFJs^b}Ni3QVqo41S2f#vR2Kk`=uX9$E+Rqvy=7D^!`o1?ErR z)+SJAXF%!zwCEgUgUvRIC&bng7ERzwtA(?lo`%;>=@gDBlGDTSBdxO@Sgy!O%h2DOj-V?mD(OFT-4XOnxG7nGp1y3aBw0bV)BYty*B;PB`)q{Y{D z7qgTY7~_BfjYEWQu>4f$Diwr1f2^kNObZ_>fo)C)(sw-QkLYI7mSqZPi2}3aWMFHV z924Y&=`RJEP#GU*2sdFZ__cL13w8y)0{yVOW;hB@k!*ks+!R!Lg4(*8a}4CoCSA9b zoJVvmSsIPWP5^6%H$7A#+nJJY%y$z6Ioi-L_=-~q=;7Wb;;|nbyAV-l%I}5Z=<7u_MJ}EL+qm3|D~5kDkk5AuvUaVj%)$ zYJt)Q0MNVa97dV;pfZ3e{7qVyjHD3U@*R*?FU&KqQ-9=wAOB=86&@9LQ8ErQYX9Lh zh9;A0M(uJ2-viIYuM1+{ZimbGa>+4)%3I3FC0p&*6eGL0VnY3}&bi$Ecb+*0U|TZn z_P=|Pe7l6)2f%!3=!-JL zsr=iMi#}%{YTqNc;T5h6KsvlNI)aAvZW3mIIfyeSFEPIB)b9Lfk)PWG*e-CgE`=M=2uY~Or(E`bA9%(F$OiLae zR0-Q$ABN%|LX|N_Fl)X%2cevpJYzIswGZwDrjjy4lkH91j$}2)0=yk}dJESnFfj?T z?0l-N7~?1wl6Mm0k(Ap7yyl^imQ-aB z^cLvZAE~F|2qVg3;sKSP)D{Sz2JLxj{_GI7d49lDGxdH0>z${d!y@Ior~*xx3+V7~ z3&&vyiU3YL9jx{Xt^uqh`r#kI{X7kN{d8~GTet?WkjOQ~4F^0u1!NVuEOQ#JfwGR+ zCki)5gc359YV#DX;Q(k)g$CT5Qx~Gbt~NXs51)ZYO!lf^0mdd4Mh8z0_ySc@f{OCjzOzF=4Wdo zcYL`MJ$KA^-My|rL8UDZ1KU-$2%S;pcwB&t!Ky?;$Hm2{s*hEK;^IoSya2cBJZRS? zO+_l1PJuBGGWq!yhR7R0rw>uCFrlMB$G*Hd4ZFCG13H~QG69o`;v>6#;u(w+KR~B9 zx4U36QG8@f{=0x@1ptu?tj8T^E{4g(1S(+TRV#yQ0J_+Z{UIz**+2yw_P%-!*8oHm z*G3+A1!)7%z^>4==c3F>nSSj#(^r_ki+^Iu>LoGM`%s4>K!k}znTUxpnGUH+_?{c zRD1qs(AtT+;&RzD#%PvL7!Pdzvp6k9f8}Zq3K83HI?U^M+hcnW#cBE~cn=EI(9=U4 z6o1mJ()t#1Io3U;OF%T10$EC?(L7$1LTVLz;SBPR`tbE1cG&|qwql6826)=F{?zAM zZc+719J9hdgv$+dVU9gGf~;$1CRh8`pjjhKP>M8(`UVTIvW+unrdLF ztg_sO`lE&wWxK=q=a`!3t}LRYY8OUsD?2ui-!o#NpkrzTJ^xwh$*7AhzHU%+pUx4O%Fd({$fW7V*#L&nMFOP9kFL;{hgBSvqqj@ znl8^2)slD2Do%!YlT2sA9-kONP8L#flNLJKhmLTsFXy(<(lB!Ceer1<_ms*wit}8! zj#6{3i(P%t13aIx=fpQRD^bcxLK3|XJaHorh*RAXc5db0+_f~+L8zhhRZ~**G2dNP z7ZoPh5LO$XNy6iP1Ptz~H#=c4QV>_SXO}TN?sotRRv$mRXt@EzebhQv0AqMHKJ-a0pc#ig?hpmUJL5j!X*KN@d7~HTkQk*#l;{{hqSOB492&V=#>Q1N!X1j4d88s zNQc3A3Lq{>ueb+}UI7PVL3KWsFc^bg0g3bZ;g7}W72%qMD{Ifbm8dzZ;MI(MTUe?* zn^H51!(xOUBB#PI{0~*U7hJ&{bKxt8hQzdlM3LBYq5g+9W^-nNT^Pe z;h(#cfHfI@Zh#dCMPB^7qZe(#7MpPypD13V?@}jB8Q_Xs#DGVZ2Gp0IHwlOKNda$)sIeM1_i?{j0!}YcwU`g}puyjkX`V@u?783&q{D`a>}6yO{zW z=};W|k3g!dssQm4`&V5$3nRx3%r+`K?)9ir4Yq5-<75VO$-3UUG3zTa>nkzq|8L_}C};1j#H_ExtW&o8ti-IZ#H_ExtgpnZ zuf(hi|3`aSR$|syV%Gn`!2Fe%_5Xa#x-DlxCcEa--Ck5cNhP^13{X>WM=3c znXIW9LSC&2ZYv;@iNR#X1~S=)1W{5@11$y7Qh!SSGRo${6D*%y2uVzP9Ri zB_p|_;vU2qMDEvxpx)We@vgq+rk~Ytfe*x!l?*`xq4APzoDjI)es6UhIW8gNdw^3Y7*oY9hEE`2i4YAf?~=?Q4lw% z6%^Ny1EFNF^|Q7YYO11rm>d3RH7N*6Zc1{f8~z1V*WRJN30g&t0)Ga`K~NI8iCjNk ztG?`2S5V{%3X@4qq^7C5;nI%kUrVn7!fSGoQBV_jv5EZca#r8hCa41LE@%=7v##>uJUS%sgnir^~mLF)#{5RMFyn^?X4UzJx>EakIN zo^JwmtsV6v`v5Al4UnKY%7ajWKjmlg07RmcQ-1nEtCLAkQxa5g8;}NyK!Jf{i3enb zlAugf1q%dygfzcvg24pGTT-Y8#ow-AfHZv|=INw-}?OUS$eRP(WM;n!4%G=6o%PVe|!{}TWM4+Iv zXR33gv%IOi`VKXJ37mv}!T^B^&H>6>mAA{6fs+6c7QxvJmDiL*D7cskPVnLYp_)Ji zr%)X9v%CTn!{FRNsda!*Ls$f7H`Gu;`|beso7IFxY!3W{s%jQn3tB~p0)GZTVG^N< zP(M<84!rsU?u!q!!4(v_Qr-lGP2+U~C2duA7yAPd05%B#o0KBLH{GnR!g8n#eiLAm z(jW>pL0Rm0`UQZ^@1-;n%@08H0GsnEBbn$AnP1?hQm|PL;pUpEQ99CDS0$(mQl)=uvzw>#3q2+bD#e`I03N!kHJY`B}C1a{Tpx+#>=tu z<7LtFbl@zH0=eUaKj0*cgRuY^%fUI%T0UO>UjQeWT<-dNyn7D2Kp@>A0|uf<&QJRkK zD1c>X6!#%92BxLYs2>Dto)Gek4c0TKddBS7P!e*hUe9vT$_GL{39ffX8u{(V4#D`5a#9gh9mD`A+x zCOjtiN*JVoIItg9Q>vPn@wGQ0RTZ6=2 z?1`B@#^q_=^q00MEt(7oV&~Xsg70b(sA9%x2)2bp*O$Q?Z0@q zuGslPZp_9}KeL9j(+|jnu7%^1Fqhfvfrg@aa6%t+15$ zE-^DfTAVt6o}=uMjC#h%=%b!dA5GmbN!`Urc>$q?fHY_9;ZuufMJpArkm4UkMUi?$ zSu|_9stHeaeR+taYOoHxx1S2TB&Jy$?pXD(D0CFR5k7H(hS%#%OwjdkE%>}1T5dGJ zucmh~b#?L&e77(#AhuX&(T0nfKz#6lgr6JVr0($rJOndS&`AUoRC0Oa@?5Sx!Vqh( z4!m`M#zJq`b3t!!YTu)Mh?=;|&brcEpB3t^fPuyrD`5C%2Sd}@izlfvPj_RMedpJq zpkYC_yoJf~=vd-czJg?Jq#S=@fZFPzEs{wy;AR~+Gl@GCnOhTIsH!sm^BRY)k~M=0 zL(nY`o5!?KrzYxl2tyxAf9|14Xlg>(8c5`Z(Uil>#jIwa4-_S+8b_0`)C4LXm@1bu zOZ({Lw-S)`@NvO3I|w9FdAXpgZGvI&Q4zGy&akpVLpRge|9+H}>$@J1_A8BE8ijvl zN{`g1JjA7R;U z`s;MRit_}9v&@k%$+u|xR>_iwN_)p7$JB=Q8SxogSno}gt;F|6&J}u=7yq6@1sI>a zQ`A>kqPjJ54<~Q6MxXa!qU>|KDq}v!)uocIbI;FTf4x>~*I6{l-}qJg;RSbPY4Mr@grS7Yz1Y3R=Wv-uX`XYx)(4BdNO^GLR+Rf;v`hC)(!O$aBc8yD+3c*t zl(xG)+gv=?V^y0!)O59>r_p}=cY8ouNH-?LF<3GGwPU7@p8jpI>C_2b8Q@)Nb{ z%{w$h3R^Je8_%>PIQEvk7!{npB*9pW?yXA=Ke3!yArwDg;=|6x5zF%tm4Jy~9g$F7 zvcF(M%z=js>S@~O0iT6RV`6CzR>*4gXMQ>+J`b4KOlRZ)o#fdIB+uqL2in`P(5$6R#B{Lfw?zjlN@ zv2^>e%EEZjlU^2Z2SZx)Op@1xSM-d^LMNwh1F}@XH+m+^ zPGyd>WMkv-qcXE{i-vvy{0Liw$3(e{mU>>Eu5vE_$2?th{&l-<)dtahjW1j0b6O+= zk&!C;FBP_m-#;@PcqS<}Zf%_T<2++`XGLt1tveywBff6mzF>kR`a^4?0Z-bVqA8^a zLYici=<``=!QFj=GRki8S((>K?^AwU?41}kb|IKtT64};2N{6fnCb8C|E0@lFr`fD z-NX;?e$KrSxr35qE5&GCmjeZx#1ln_EBX>1Cm3m5(=Oe$<5|j^s;+r!3%gHMZQ~}r z*#WrNa=U$c1zK*-86jIqeb(jk^=*|x{K$`WlJ{d{cLytu3^uPS&ND^*;Py>0teB)Y z8!B1n*nF-TB*5qD)A&Ah15nWQ>%!<}Zk0emzqK=z zE~EZfj!`0B*7IOGi9@o4G$A{N9KfsKbNi1C8|OIfPAApJ=^Ps-FI20fW|Iye-^62- zdjcnB9+bO3)0f3K)pq#pz7u2ncy&v?fvw3xS8y1)e>%14m|G=&c%srO!PIj<=Ger- z)$CteVy+Cb#&s8cDNpijN%zKQ4(io2hh&Nuz3~6>ym?+#N#&*V9wnDqib#Rt%+QR~eVTsz`FEH;pL)!XW{EzOeoyf<#4$ivT=Yf!Y0BRtMoN~K@LTcv0k@(&tG42Ay$8$r{1t|c zjXiF7Rj{HiG1_4?w5~h87S~C%Dfs#9Cz05+`mXof!0A8%_y!~zy6ysn{#D-uKHHXN z0z|n1KAtMsLwk&xK-q&_R}LH6V{qb-BoGDdy6{QvG&c^{KH#viL#?H&q7N7$m0ROz zkHLwrAh%N@nI;)WeU7S$v4>=CBBO1fk@4AWWbSaKn1n zK6$Hikl0%@SzOlrto(&XdGy-uJ38cR1}So6o6pVI;^}6hTH3?I#m~YTS`OJwep6_7 zGn+6ej1xyXHB~Xn#DD`6PctttAuia$*JRTmiU68bxWo`#Oz}6ugDwG`{ahcuh?~YI zTtH>}-PD1vHKbuvWFr?O(yI+$^-atD25bS-RxS8kO+gZ}j)) znt2!INb)^C&ZE^-F70?AirJWhYBU0@GA|pB?~k4#cW{z~(@8E~jV|{ZkXR4QRy{Jf z+1@gXH2!@?W$p{oy@&XtQp&n!d)jHM<_j36;$?e58@6gRKl{8aJ17z2*7}i@IUolsxo4+EnA6^usS|ftvth zAYvF}@wG`m19a(@D!44wfgTA@ctOV}GJtz*^selnF&Q-xbr`UZV}>?-I5VxR8L(yQ z^?UHu+ca&7>H~&!WwRc9*f@=cuL6Gm{(j@)ZQ?Zf@QNEKN(*cFlyRDH2nqm#Buu*r zzC)a*)m9o!BLyY#-%9CA%=hchQkI8L?G}bkeN5n`4LCKy3TAOkU&P__jcKEM0jzyp zu!^HwD83B{#hFe*PPr#zL)#S)UHMvqL(sy-=`7pB1E+ojFz z0L8WzyxV{@tF9JmBWsYcF21wm7Hlq$9=X#vM^H~CXD+vWCb33>pZ^;P@7VeEoOfr&Aqo6(yw>ZU0(jk44P0+^)21uV`qzJU{4D8{FHJWVab z2|tkg4Oh61u8M9z_L2u1mjR1`aRTJd2{th-A7o2lX4c51ELZOcVPKMSVOA;7RS^J; z&n=?bbmsXtklW>9!a@@wuz|E;v<%hAg2ujVhj+qRpBaT>&X1!Du0Eflyb(#g1G`iK@7fm%Fa)T4ETA(^S&Xk-x!%&qrf_3 z6uU6eGDZ-hK8l|EE}pAcFqI}m8uxWEG7DkeXY`0jMuYngT&Pci3sN(tw&d;|_dw%3 zaut;~t@Bk-LiUzL@=q>!ws8|{@gg1{sxI#(sP&Vp^So~&4~ZFR*gbwYT$cZ9E^4~M zW)v?~>)$*)G-osNI}+`tjZBGtck;aB;q=+A4~O5qdht2X{aON|dzECqQ|Xz2&ZyM3 z-nODyB|*$W;oOfQsru__9{p7XigEj~<_9cDBTiB2u@|c2u=jdTmbUD!H`I4In50Xn zM<2eZ=sFVjE2p$7L0zm$db4E0#r*SL-!}qOZ{Zo|hSqlJ!S|5-0p@l9%y- zF5UuMXQ#%t+)D%Km4lALC=O+92-WC3wa$( z_g=u85y)TtS)xf8Z{ra>a^i{3(Q0zdF-~AkkEE0y9Y$kwlR&z!+2h!-kY_bV^b9t; zKlam%YSGY4icUQ~=3*6cN>)kQ+qB?hZ)daaflHs#GDD{z7y(ikuaapX;(_$ z9e$SkqF8j5I8OAKFX^|U%OT@#jAxIKdSv|bO~yQpFZ_Sa&87Ub?9FNVHiF0Rso#0V zzZ%OIxD$D+<%Y2!Hg^B3oOmM*XX&;foA&8m2lbD*@{}Lb_*Ze&FG@rmjS9RI-TQW) zPKh15TU_6Xvp8#$g*M35?XHMR;`K0Gqk(=L87X;QG2=?*L~AdxvybqsH(0RtbBM+o zqukDtK|c&&-ypq04d^Ye4tzNPa7*t*U77fjakkWf7bsXKu(VQBoG8z|oPl*gh*7*x z7JR(`ja?0a3~)+`t2(}gY}QpmBhc!ydHIQb23g6y&t?>7 z9aS7%2JptN6HyU&Y_iJ?U5r{Mf4B=0_{c+60vtEmif)pR9m_KI>~R<9$G8Xh3c6bk zTMWC7cNI6`FgS1A)GdCqVQJ;55f@vcjR0psufAZC*~^5+xr#KL9W@6ZrYvQAjTG3` z8z~Y;wu~^8w3B=o$UCKttu77W+}o!nxVO)HOapx@?cj`UZ6uj`YE_8O=WWs-iOq^o zRMxjXAhY>$MOZ$#h{&zY)bqk{Tuj(|sYaxDQogr~jKjC^-h^iV-rnCAqRDf{EdeNR zwmdJD**u*@g9mL0`x%OteXdq?Zfz8NJs3?jo!SN_aMAIU8@Xu=&dS9K;$)a)5pK&e zg@cX)-`&y6YnSJ8fu(d-Tc63l-v`TW_khiDFLeuDt}d7zv_idfCI>|-v71Z()d0{w zL^7x$i=m8qKNPKbC>~&*@RV6CK@ENfWddrjU-ev+X7f-JyMa-^`*}UBvvA@IsG(!E z7|?$=aX6hM|ChBoMU^;mTaqVcZq`!Xe3r0~ zT~=&b($!v8*~{L`H>8LJ|64r0#EwXVSYT6XCz=Z{lLbtNH`cmn7nb z^SW;!6_Zr(sadl8k4_d3n|{5Tx1jXwM|g8y^F&F~+3En^VTsaR;%%Cmj~d;FUfLNX zf_R+x>FX)JFQnotE?4Poj!cxr-$)4@{MI~DEM=F|>o`S7d(s;bTm7h7-`m@*;YVvR zyZ_;55Bw*Jbq`oLWa@gzxHx!W70_24*3S-eN*YSm8;!UeOm{7MT-sOEoBPgJ25q2N zkmd2c=tZzZ-#l1YM=>$>B46zki)Es*51ilvOz)?uL$}^00+?Q8wGLg3-f_Se+w1D- zjEo0>FCKh(LFaB?4>*hUmNXrAn*!c6weO{I8a08q3%L8Jq1tj;5(MN!&?W=A$iM&l z&9y`oeqi=Ur(8oEegOg5pV?na*XXUFgEvNADbY!vi@=Aa&UQ_HIYBLBz-nNCVVcGA z-q@c3X4UR5=a!_>v`!)BQ6r{Z;V=WEArK)>(f(D70?X+_Vd?1N-U_Z=K%mCxz!y&c zkvYKXdYh)b7{_E8S6GAVYWXcspxA6EAec3EUFke)^5S4`hmEzs()vlzg+h(fZ|k)E zfwXD?qndGkY7JdKUV?s@uT3*t-j8J9fHm1FUA@#6cZr%vAsn{)v&N8y_E$%8 zuI&WAff*G!KQFQpak}<%en`gU0SV0H9ObbJi->%5#%GWd(J@7Ch{?1|8~q*OhQYNS zG`3!DO*rq@tI*F^5i(Xz4wZFF4kZ|qhO>*$bazgMH;>yZyWG?|Cy3TlPpaC}7OEkn z5ngSmd{AgEfIKenVy7ryOm9S^Z9<#Ax?w@6Qd*utL6f5Qj3dGN#7R|~jt?IG_a47W zbH_dqjnGwWC{GF@5zdPD?`z+dmU-%C{`@}uf{(kzd1^}}&+?Vm%RUOgV2!rGGg z5>>*CH@~Xd8yI4&VVl^vDN%BNl5ALRW~MB9_8!6=m6=4I2yx;D#=vPk$xKrMA!RKq zar}wC)QInL73Ku?^3>E<$@48A7cn+g=*%V~nvb?;U-BfzMFeB(MC@VF4uVkYzytDi z=TvE7JEwMNF1%RJh&t5uiAz}17YysV6V^-kS=8ATfW=NhKAex53&dF))Lj53h9%_-0$!#0Sk3U1Hyy1Bce_MsTvRpQcKf3Y9bqa+hO#P7rl2A zkXqVQk8YP&&mQ1J`Ybg|lN-q~h1bdY3$<04n;wEdY9Z)F_hatyBMWlda6nkn3x&l& z4F*KiYuMjHTb{Ly^NF;vwC*1XL+F717!JO5q{G1ukgeL0MQa7zqa5Jj8aN~Rnr38m z9A}I<-=^{qU0_6%R(Cq|41Cf4tq;_3N>G+2ymR&@m$S_LcD%dqn8H>D#>-%&Q!Ven z7miZKBHX})s4ymqY&ZvgOzQx&!{V4q^mkBs->6gNkNTg={?B=j_9J7!iGRUnO(bvEBR5)}qwg94Qr zUx@3N%5oWaAyqOMqJ@-ikG@z^px@Y@7gQSbyCiWc)a)ZC5UyBfSbGlV6&RML>x1#+ z2WE{NW2wZV5J1E-pV{_pqTj&N$H-HO^nklkZo)w{!u3t+F2Ej9fk4hEJGZ@D!j94g zIjyRnJNQ(0BBGF>j5O2wV5tm-hcCz#lxcgilzW(c&V$`y0x56+XpHYz%9NcMl4U7Oc;`D69pFn z2p4TLtJ)f}8+Hd?p%^>|fyr{UhDo0`ozmqSzv%^k!5P>9BX9aIFOj~A@d$Z$VYJFi z&EFb>=2f?6Pl8XWQ?x|Ay6=*fxWxR5v~NCIXg02eHBbJf4|t=Hcek1k;vgXAL92U9 zia~B^Bao7f|IyP;nGFzk<1LJijZ7Dx)uT1Zm=tKHils$Ksfq{`~ z8(6s{2tP53&X4PR^?cJ&^SZVVoBa}7CYv_&pp#-$AkG2_Bys)ujU@&5hIxpS)zdz3 z?BhI;5@&&wNb**YfT^cRj%_-5?wQx2#CkJ=VG_~&w*E-m!n4%@hl<~T_E=^EP1L(K z-D{B&5UQJ5{i!G`*JGDMcOaBAXx8sGmE0vnkL*pZ#Emu&3kE=d(EL67XYAF_B4I4f7=*(D3|9QA9@ZUtf;p#~m(B`k4l$*@z8nr3tR{C$07?FaQnk)qV7@;q)GVNzQxgIs?sAlJo-_ZA3CZBT{SPD^; z{>j`bH(DZSG^6N3kk_y4qTw#BPsA|;Dz>QvN{>G*#x1KUR?q-q}^6<_ZU*Ld|ZGNS!a^4k1yMl(Em%T|79X0{Y-%X9vl4{RP zZB0{BFBRQU+uuhBH$2xES?Ar-LTaCWSuAM5QHLjViTEaD&-Hk<=FRkLp!;hZb(3Cs zU!CM$-HSUtFYw_M;Nf}ZGi0YYP6Q zr|=UnF15Z%!*w7`f?F#P5OiRWau$GAq3Dd(`bH|+jsh0s2)kBJ`2lD^WDM{MX(Z1Y z6D!$uQ&MoMg_oZLE=B{;k!IU}EP+m+Z4Tv^(4+`@Nf+B{nNY}!X#!Q7wv#moRvu(g^UF^6~ zSv1Ei!ly6;JaD5|QFWO;$)qO&nCE<&&0=WYK!gukGs#P7<{~sY{8E7K%L!cL(c(!m zZ2KmMeA_^4Iz&L7&%|CXii&9?lMv24l4;>sz8BMlw&9Q5>j&flO%_`me@n;B|wlX|vwJ2J2T>UC6yWPqI}_F|a`jeJ!Cl7O1&j6h zZc=h$AoCz)FG1ZJ{Uvp?NFFsHSYJK;yl-*rUm&WG*Tb-HEoQV+D0>5(w1K#9Zjj$Z zEgy(LR0(zE#v1lNSWtp)S?N(H&p?}JyqH?tX;hnW8kGwV?T%rc||^3%H;wS>im_krOL0&x{V;RZ+GSA7a| ze1zT^%O0R&e+GPcXeNCNwQa&dDL&XEvbFr3C!`X!DU!JjkUQr@0&NKG{d`#axHc70 zh_yXA@6u%@#YiL4D5r#`{|>szx%(k@#AnrW+`MNN?h>F*@U`y_~_;;UPq=s*){n zt8G?FTzb_BpTYx-V7htu+Wi(oUa*2~IF^{Uq>2}115gNs`gGCA(+EKPJG&I<`~m>n zoQtCea}k6R1eU#f%~e&pIUFN|g=w>7&j{D70{qAMYQ%5x&BbB_)S*Os22QvOgBiz> zX97}QA zdI_%dJLq805pEm0ejfr8Kuf(QU~T-}O<_vYSF0t{g|F98WZd;D6kYWfucFof(YyK3 z7v5!6_#kQlCf?smp!0VB8(R*pOAVMOD~+a+wI;pLsFpci!>6#5Q8I7vcc(0Ot6O(} z!L}nWJkRD$x+MA9jzy4f$xt?bdXOgDYa|pMTWX_cSnjk{k%!`v#?r|e$oX0YCG>Dn zW}9t;clQfW0|BDb6B&R zlEh}I4Ljy%hR@zk zv#8!@?6G89%AEuL-q1%ksr{|lfO6Qhzd02VwKE_M_C+sqK?7Dp&{z%SOrc=2Y%WYe zQC=|?MsN9!Z#KKAwh*d{GQDZMzyhmSUykQRK1CMUi@MM0d?A?~!IwL9ZaGCwP9UIU z#;&K!WzIjg;13V5HjoFfM)_;N5qtnih9jS(=!Ee`;9+I=qjR6toB$yBhnw7_pY43w z2XPd2He}z<_za_=HmtX|*Z#rp__y`i{%zBx7COF9jZ^^RoE}c#%XRS*>-;X2SrS2( zkSvZ++4h;@-=p9R^%1bl_{k;kFOIkpP_)xgKOO_y^lvTzjx+jwLo5Kgf`^*dFJ~>F zgglnN%KAS>2{A!RmZ>|I4Dm%l!r+5jMhP%cK>>ZiqUL;jIg1NJN z#4I%8tQznGK9#wG7~6>P_JO-o4etf``3(%V9tt|wq2jeInC!uV+oce9beJ)6p|-Sv z<=JD!p!8R!OsqVN;OKzjdph~tb91FCg6@5p1v3fJGaIp)0NVpDuvpwc`mieT zo2YV%a;SX|i+2ah25o)Gjl^m+2j9MUyFH!XDaXj%t#3F>{2sXQect5j6L1)qX#D$2 zwjdB*IP-B6=ij0q_~0nB2hyBC8x#h75G#$QjY2ltNN>hA z!s0Cb6*madu9UD{+yey80{Z*ppgPfxBBWQaHf&CRmJ90^`jR`AqKNdsN}A>MZX4?Hbo0BDD}BlJ7TQUK-Gg=1r+;Ps#MAjR2V&(BlVfADOcy`qyX7s~{^W+!`}_cmA=W;>YQu&FJy zmuo%bInV@-XPWD{ZH0d3!T)RHI~ zNjbQ|3)jY{M;@w=i=NS#ul`u0wx|6v5Kn)+g*0;X6Tc`!H+{C_8JaX4%|a?1Y zVSpU`^{!?f*XCkuN!0M{;s$#(3J7C0^AEZGC_9&)%v;g9p^gLa9Iq)`vXNkPqD}$u zye;^>96Q2KfTgrP{UBW~SpDYum?X2D2Tp-?ic?GpbOCLCz(P1a6t}p5u=LFhz_#0P zM4ZlA+YT6GrMbfYdemLRU4Q;Q<+_ZR%A%7OSr>+qNLCLI`Zmac|E7%|Zq39@>hCV& z*XwRg;1qC|EDi`EPj>Q{uS=M)M!U_{c_hD&HT^)z(k>kD*FV9{dUulNHC?D z7nmcrd^W3>4?MJ{kauscOiAzsSB~y3o^m79mwOz94NSJ-OkFmgGrJGAyuQlzw)JfC z>0ucrQ?5_y-A99;Z20n3-h;u>TgtSL&=;vVT9M>t5uw4LkK8Gwu)j4Q(4YCJe`&Tl_4FvS-8P3b6?K`LfJv~t^{8y8--L8z$5$uy;aCgs|+CLYP34Q$#jO* z_lji0Dr1!gbFh+7&ZIoukus0AMM0a)*4ffY)f{%Qm4|8CV}%-j+wlMW)Ue-QBHens zP)NHY@`ogOmlPRERtrE+bWXbUP1&{P6OUPuTrik(mE@sv%!Mfx1Mi4e$WTS{R1b#C z!YTN6-q^t4ZJ&z!w3sxxE!X8E{wv#6b^}90^Ab$csPjjBb7yR9>_?p@iee#iY7klc zfJPBSub3YzwjJX?ui=bRVZQ1IB687%=vljaBc9w(Q$>4nv36t44=#I86k8lP;&H*Y z4PPGdIu23}u!~T}z`E)y-cz`9( z%yafnofN5TBE!I3Xu~}txO|473FbaLntSPdSk0h@G_^VpnmDH>5JwOz4W`c9{v|2A z?wUss4(xc_Ii50PEd(Z|QBMj%{Lz-zPWfi*I60GWcLKbJ+VedE)N|Soh>D6f626@F z9vT_3c^cwca*K&HfF|qc=rmrjo|VdNOKiR@t|T@?{z7CfJcG10_;dLYmB8S>Fvu$1 zlkSu??LASD?qJ8t!&D!`3N`+ghW{T>gTKym1nkXv&pjvC=C9~S^XL?2F@7X-j!8l# z#A17?bc64{22LCWPf-AA1#47$l@CH9++lVe( zf)4Uro%trRXP|;oVYd&H`VNsBM?))wxXyh#Ph91{^XEKI%rbMDI84DU6KhY(G|=S|qm^eDmquA-%Fnf-1(9_^^yReiZ$SU031mVnQT z#Cb*Hl$c4+hA`$o1Rr+A#{K^Nd#KcWu=4cj(=`(Lggb*DjVtyOa9Er}X0y#ELBW&f z&OOq}Px=~t%s20q*ZS{Zr{{x<1_t~ESp0t)Yd-U74Pr z-)g&6&AwSn?m6^fXklY}>PAaz>t{FTRP}E^d){AJBD88s$E)Z2`VWr}u35LvbgHki z=~eu9T@84eyW?9k- z3i_7%3EDb!$E4+l14fhM)^qITwAu>zl~cbywg0)Crc$smwUcOyu7>1qx9V+8}~PxRRf#NE1o~+>FMu}$<6g0(U+TY+>!AvF+}Fh zm8UXMi~^&m3=R?wmBDt|`LgvBuVAKUoi9ag=Qvc)j*9Kwdt6OzZC7{qc|*g1!9fK% zmqdYJzqn1C12!^&B>KIo-R_#t+-j5Ss4;}vJmV56d<5Qt2)$;POW z_-!N27yT^HO2!u*n461~-dOfAApsARLY-L*K`73b2(3!!!+FKi^{Hx{xFXek)v+}qu;?sz1U*FQXDtDhi} zhsnF5FqXwv^U|f`)@=cD3|`I+@BNh;!|(qxyZjv)!}x$LKkFB6)Al>1T#pIjz^)PRC;Ibc7<@9$^Gy%=jLL$=ZG8=RrwMZXxtgY)f(Yh*unDpwELwcW^wuh?a zT2b|IgsJHpZ6|$W_PSIZEv*-FQxe}rEpC<~iMmoEAw{G=FGL~hR8DJcgSrBA)QbNGRL!LFlBOn z-_{pXChsTZ>Qz-$%^Vz_w%^-5sd{g|;_P%+NnxQ+9e0-V?MYAO?ariE1qWAGA|=+K z-uEUGuZwEttR=IZD1PT)mAHO9J^c{V>eaW$SU%;34J3RtAIvypIx|#%^y}2z{6!xY zlOLY%1r(eMZDe+A-_E#2Y;Ge~n=6iv(QADe zqd9$6`7m9wy>i3+(seUC+h05zdHM9 Date: Thu, 28 Mar 2019 14:32:16 +0900 Subject: [PATCH 272/534] hard cursor in full screen mode --- BasiliskII/src/SDL/video_sdl2.cpp | 37 ++++++++++++++++---- BasiliskII/src/Unix/Linux/NetDriver/config.h | 1 - 2 files changed, 31 insertions(+), 7 deletions(-) delete mode 120000 BasiliskII/src/Unix/Linux/NetDriver/config.h diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index b6237489a..d3b50d9b8 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -942,6 +942,34 @@ void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) update_sdl_video(s, 1, &temp); } +#ifdef SHEEPSHAVER +static void MagBits(Uint8 *dst, Uint8 *src, int mag) { + for (int y = 0; y < 16; y++) + for (int x = 0; x < 16; x++) { + int sa = 16 * y + x; + if (!(src[sa >> 3] & 0x80 >> (sa & 7))) continue; + for (int dy = 0; dy < mag; dy++) + for (int dx = 0; dx < mag; dx++) { + int da = 16 * mag * (mag * y + dy) + mag * x + dx; + dst[da >> 3] |= 0x80 >> (da & 7); + } + } +} +static SDL_Cursor *MagCursor(bool hot) { + float sx, sy; + SDL_RenderGetScale(sdl_renderer, &sx, &sy); + int mag = std::min(sx, sy); + Uint8 *data = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + MagBits(data, &MacCursor[4], mag); + MagBits(mask, &MacCursor[36], mag); + SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] : 0, hot ? MacCursor[3] : 0); + SDL_free(data); + SDL_free(mask); + return cursor; +} +#endif + void driver_base::set_video_mode(int flags) { int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); @@ -1018,7 +1046,7 @@ void driver_base::adapt_to_video_mode() { hardware_cursor = video_can_change_cursor(); if (hardware_cursor) { // Create cursor - if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { + if ((sdl_cursor = MagCursor(false)) != NULL) { SDL_SetCursor(sdl_cursor); } } @@ -1816,10 +1844,7 @@ void SDL_monitor_desc::switch_to_current_mode(void) #ifdef SHEEPSHAVER bool video_can_change_cursor(void) { - if (display_type != DISPLAY_WINDOW || !PrefsFindBool("hardcursor")) - return false; - - return true; + return PrefsFindBool("hardcursor") && (display_type == DISPLAY_WINDOW || PrefsFindBool("scale_integer")); } #endif @@ -1834,7 +1859,7 @@ void video_set_cursor(void) // Set new cursor image if it was changed if (sdl_cursor) { SDL_FreeCursor(sdl_cursor); - sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); + sdl_cursor = MagCursor(true); if (sdl_cursor) { SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); SDL_SetCursor(sdl_cursor); diff --git a/BasiliskII/src/Unix/Linux/NetDriver/config.h b/BasiliskII/src/Unix/Linux/NetDriver/config.h deleted file mode 120000 index fc383f113..000000000 --- a/BasiliskII/src/Unix/Linux/NetDriver/config.h +++ /dev/null @@ -1 +0,0 @@ -../../../../../SheepShaver/src/Unix/config.h \ No newline at end of file From 62deb590a61dc8d38413771cbe4289a102c2ee60 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 29 Mar 2019 12:59:13 +0900 Subject: [PATCH 273/534] fixed hot spot --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index d3b50d9b8..89512ba1a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -963,7 +963,7 @@ static SDL_Cursor *MagCursor(bool hot) { Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); MagBits(data, &MacCursor[4], mag); MagBits(mask, &MacCursor[36], mag); - SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] : 0, hot ? MacCursor[3] : 0); + SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] * mag : 0, hot ? MacCursor[3] * mag : 0); SDL_free(data); SDL_free(mask); return cursor; From 7131e8205d4a2599ef995e39eddc908f8f875254 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 30 Mar 2019 13:23:52 +0900 Subject: [PATCH 274/534] Windows: ignore Alt+F4 --- BasiliskII/src/SDL/video_sdl2.cpp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 89512ba1a..1e79de1ae 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2287,6 +2287,9 @@ static void handle_events(void) // Window "close" widget clicked case SDL_QUIT: +#ifdef WIN32 + if (SDL_GetModState() & (KMOD_LALT | KMOD_RALT)) break; +#endif ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); break; From 4603bd305c8747ba5b480bced7555c68f30672a5 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 1 Apr 2019 12:29:42 +0900 Subject: [PATCH 275/534] fix cursor for high DPI ignore Alt+F4 for all platform --- BasiliskII/src/SDL/video_sdl2.cpp | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 1e79de1ae..409abe24b 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -956,9 +956,9 @@ static void MagBits(Uint8 *dst, Uint8 *src, int mag) { } } static SDL_Cursor *MagCursor(bool hot) { - float sx, sy; - SDL_RenderGetScale(sdl_renderer, &sx, &sy); - int mag = std::min(sx, sy); + int w, h; + SDL_GetWindowSize(sdl_window, &w, &h); + int mag = std::min(w / drv->VIDEO_MODE_X, h / drv->VIDEO_MODE_Y); Uint8 *data = (Uint8 *)SDL_calloc(1, 32 * mag * mag); Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); MagBits(data, &MacCursor[4], mag); @@ -2287,9 +2287,7 @@ static void handle_events(void) // Window "close" widget clicked case SDL_QUIT: -#ifdef WIN32 if (SDL_GetModState() & (KMOD_LALT | KMOD_RALT)) break; -#endif ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); break; From 1824cd8dc43373a86c677d4945099c082834b5b8 Mon Sep 17 00:00:00 2001 From: Seth Date: Wed, 3 Apr 2019 22:19:57 -0500 Subject: [PATCH 276/534] Reverting video_sdl2 to fixed branch (automerge picked up erroneous old version) --- BasiliskII/src/SDL/video_sdl2.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 59f9a7066..409abe24b 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1122,10 +1122,12 @@ void driver_base::update_palette(void) if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { SDL_SetSurfacePalette(s, sdl_palette); + SDL_LockMutex(sdl_update_video_mutex); sdl_update_video_rect.x = 0; sdl_update_video_rect.y = 0; sdl_update_video_rect.w = VIDEO_MODE_X; sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); } } @@ -2538,7 +2540,6 @@ static inline void possibly_ungrab_mouse() static inline void handle_palette_changes(void) { - SDL_LockMutex(sdl_update_video_mutex); LOCK_PALETTE; if (sdl_palette_changed) { @@ -2547,7 +2548,6 @@ static inline void handle_palette_changes(void) } UNLOCK_PALETTE; - SDL_UnlockMutex(sdl_update_video_mutex); } static void video_refresh_window_static(void); From a25325fc7df1553e36eb126a67e0d33ef2658be2 Mon Sep 17 00:00:00 2001 From: Seth Date: Thu, 4 Apr 2019 03:41:09 -0500 Subject: [PATCH 277/534] Snapshot of working bincue build, although no audio plays yet; saving all files in case xcode messes something up and needs reverting --- BasiliskII/src/MacOSX/AudioDevice.cpp | 12 +- .../BasiliskII.xcodeproj/project.pbxproj | 53 +++- .../xcshareddata/IDEWorkspaceChecks.plist | 8 + .../xcschemes/BasiliskII.xcscheme | 92 ++++++ BasiliskII/src/MacOSX/MacOSX_sound_if.h | 4 + BasiliskII/src/MacOSX/audio_macosx.cpp | 4 + BasiliskII/src/Unix/bincue_unix.cpp | 13 +- BasiliskII/src/cdrom.cpp | 286 +++++++++++------- .../xcshareddata/IDEWorkspaceChecks.plist | 8 + .../project.pbxproj | 84 ++++- .../contents.xcworkspacedata | 7 + .../xcshareddata/IDEWorkspaceChecks.plist | 8 + .../xcschemes/SheepShaver.xcscheme | 92 ++++++ 13 files changed, 551 insertions(+), 120 deletions(-) create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme create mode 100644 SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist create mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata create mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist create mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme diff --git a/BasiliskII/src/MacOSX/AudioDevice.cpp b/BasiliskII/src/MacOSX/AudioDevice.cpp index 9fe065f67..7b6e860e6 100644 --- a/BasiliskII/src/MacOSX/AudioDevice.cpp +++ b/BasiliskII/src/MacOSX/AudioDevice.cpp @@ -51,23 +51,23 @@ void AudioDevice::Init(AudioDeviceID devid, bool isInput) UInt32 propsize; propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertySafetyOffset, &propsize, &mSafetyOffset)); + __Verify_noErr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertySafetyOffset, &propsize, &mSafetyOffset)); propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); + __Verify_noErr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); propsize = sizeof(AudioStreamBasicDescription); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyStreamFormat, &propsize, &mFormat)); + __Verify_noErr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyStreamFormat, &propsize, &mFormat)); } void AudioDevice::SetBufferSize(UInt32 size) { UInt32 propsize = sizeof(UInt32); - verify_noerr(AudioDeviceSetProperty(mID, NULL, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, propsize, &size)); + __Verify_noErr(AudioDeviceSetProperty(mID, NULL, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, propsize, &size)); propsize = sizeof(UInt32); - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); + __Verify_noErr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyBufferFrameSize, &propsize, &mBufferSizeFrames)); } int AudioDevice::CountChannels() @@ -92,6 +92,6 @@ int AudioDevice::CountChannels() char * AudioDevice::GetName(char *buf, UInt32 maxlen) { - verify_noerr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyDeviceName, &maxlen, buf)); + __Verify_noErr(AudioDeviceGetProperty(mID, 0, mIsInput, kAudioDevicePropertyDeviceName, &maxlen, buf)); return buf; } diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 20f9daa5a..ec3f4e8ab 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,6 +7,13 @@ objects = { /* Begin PBXBuildFile section */ + 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95132255D076004D0E79 /* AudioDevice.cpp */; }; + 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95152255D076004D0E79 /* audio_macosx.cpp */; }; + 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */; }; + 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */; }; + 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; @@ -192,6 +199,16 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ + 5DDE95122255D075004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioBackEnd.h; sourceTree = ""; }; + 5DDE95132255D076004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioDevice.cpp; sourceTree = ""; }; + 5DDE95142255D076004D0E79 /* AudioDevice.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioDevice.h; sourceTree = ""; }; + 5DDE95152255D076004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_macosx.cpp; sourceTree = ""; }; + 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = MacOSX_sound_if.cpp; sourceTree = ""; }; + 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioBackEnd.cpp; sourceTree = ""; }; + 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = MacOSX_sound_if.h; sourceTree = ""; }; + 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; + 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; + 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; @@ -426,6 +443,9 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( + 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */, + 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */, + 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */, E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, @@ -488,6 +508,9 @@ 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( + 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */, + 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */, + 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */, E413D93520D260DA00E437D8 /* SDL2.framework */, 756C1B381F25306A00620917 /* AppKit.framework */, 752F26FA1F240E69001032B4 /* IOKit.framework */, @@ -619,6 +642,13 @@ 756C1B321F252FC100620917 /* utils_macosx.h */, 756C1B331F252FC100620917 /* utils_macosx.mm */, 7539E02E1F23B25A006B2DF2 /* Versions.html */, + 5DDE95152255D076004D0E79 /* audio_macosx.cpp */, + 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */, + 5DDE95122255D075004D0E79 /* AudioBackEnd.h */, + 5DDE95132255D076004D0E79 /* AudioDevice.cpp */, + 5DDE95142255D076004D0E79 /* AudioDevice.h */, + 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */, + 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */, ); name = MacOSX; sourceTree = ""; @@ -1058,6 +1088,7 @@ 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, + 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, @@ -1087,6 +1118,8 @@ 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, + 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */, + 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */, E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, @@ -1096,7 +1129,7 @@ 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, - 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, + 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, E413D92720D260BC00E437D8 /* debug.c in Sources */, E413D92220D260BC00E437D8 /* mbuf.c in Sources */, @@ -1119,6 +1152,7 @@ 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, E413D92F20D260BC00E437D8 /* bootp.c in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, + 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, ); runOnlyForDeploymentPostprocessing = 0; }; @@ -1358,6 +1392,15 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + "DEBUG=1", + "USE_SDL_AUDIO=1", + "BINCUE=1", + "OSX_CORE_AUDIO=1", + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1410,6 +1453,14 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 3; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + "USE_SDL_AUDIO=1", + "OSX_CORE_AUDIO=1", + "BINCUE=1", + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist new file mode 100644 index 000000000..18d981003 --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist @@ -0,0 +1,8 @@ + + + + + IDEDidComputeMac32BitWarning + + + diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme new file mode 100644 index 000000000..8594df9ad --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme @@ -0,0 +1,92 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/BasiliskII/src/MacOSX/MacOSX_sound_if.h b/BasiliskII/src/MacOSX/MacOSX_sound_if.h index 5cfdd438a..06e06da47 100644 --- a/BasiliskII/src/MacOSX/MacOSX_sound_if.h +++ b/BasiliskII/src/MacOSX/MacOSX_sound_if.h @@ -18,6 +18,8 @@ * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +#ifndef MACOSX_SOUND_IF +#define MACOSX_SOUND_IF typedef int (*audioCallback)(void); @@ -39,3 +41,5 @@ class OSXsoundOutput { unsigned int bufferSizeFrames(); int sendAudioBuffer(void *buffer, int numFrames); }; + +#endif diff --git a/BasiliskII/src/MacOSX/audio_macosx.cpp b/BasiliskII/src/MacOSX/audio_macosx.cpp index 840d2f13f..5e5d25a3d 100644 --- a/BasiliskII/src/MacOSX/audio_macosx.cpp +++ b/BasiliskII/src/MacOSX/audio_macosx.cpp @@ -19,6 +19,8 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +#ifndef USE_SDL_AUDIO + #include "sysdeps.h" #include @@ -269,3 +271,5 @@ static int audioInt(void) TriggerInterrupt(); return 0; } + +#endif diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 612cf790b..63ed2e730 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -91,6 +91,7 @@ typedef struct { unsigned int length; // Track length in frames loff_t fileoffset; // Track frame start within file unsigned int pregap; // Silence in frames to generate + unsigned int postgap; // Silence in frames to generate at end unsigned char tcf; // Track control field } Track; @@ -342,8 +343,18 @@ static bool ParseCueSheet(FILE *fh, CueSheet *cs, const char *cuefile) } curr->pregap = MSFToFrames(msf); + } else if (!strcmp("POSTGAP", keyword)) { + MSF msf; + char *field = strtok(NULL, " \t\n\r"); + if (3 != sscanf(field, "%d:%d:%d", + &msf.m, &msf.s, &msf.f)) { + D(bug("Expected postgap frame\n")); + goto fail; + } + curr->postgap = MSFToFrames(msf); + // Ignored directives - + } else if (!strcmp("TITLE", keyword)) { } else if (!strcmp("PERFORMER", keyword)) { } else if (!strcmp("REM", keyword)) { diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 370322d1c..a84ca895f 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -58,7 +58,7 @@ const uint8 CDROMIcon[258] = { 0x8a, 0xaa, 0xaa, 0xe4, 0x8d, 0x55, 0x55, 0xc4, 0x86, 0xaa, 0xab, 0xc4, 0x83, 0x55, 0x57, 0x84, 0x81, 0xaa, 0xaf, 0x04, 0x80, 0xf5, 0x7e, 0x04, 0x80, 0x3f, 0xf8, 0x04, 0x80, 0x0f, 0xe0, 0x04, 0xff, 0xff, 0xff, 0xfc, 0x80, 0x00, 0x00, 0x04, 0x80, 0x1f, 0xf0, 0x04, 0x7f, 0xff, 0xff, 0xf8, - + 0x3f, 0xff, 0xff, 0xf0, 0x7f, 0xff, 0xff, 0xf8, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, @@ -67,7 +67,7 @@ const uint8 CDROMIcon[258] = { 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0xff, 0xff, 0xff, 0xfc, 0x7f, 0xff, 0xff, 0xf8, - + 0, 0 }; @@ -103,7 +103,7 @@ static const uint8 bin2bcd[256] = { }; static const uint8 bcd2bin[256] = { - 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, @@ -126,9 +126,9 @@ static const uint8 bcd2bin[256] = { struct cdrom_drive_info { cdrom_drive_info() : num(0), fh(NULL), start_byte(0), status(0) {} cdrom_drive_info(void *fh_) : num(0), fh(fh_), start_byte(0), status(0) {} - + void close_fh(void) { SysAllowRemoval(fh); Sys_close(fh); } - + int num; // Drive number void *fh; // File handle int block_size; // CD-ROM block size @@ -136,12 +136,14 @@ struct cdrom_drive_info { loff_t start_byte; // Start of HFS partition on disk bool to_be_mounted; // Flag: drive must be mounted in accRun bool mount_non_hfs; // Flag: Issue disk-inserted events for non-HFS disks - + uint8 toc[804]; // TOC of currently inserted disk uint8 lead_out[3]; // MSF address of lead-out track uint8 stop_at[3]; // MSF address of audio play stopping point - + uint8 play_mode; // Audio play mode + uint8 play_order; // Play mode order (normal, shuffle, program) + bool repeat; // Repeat flag uint8 power_mode; // Power mode uint32 status; // Mac address of drive status record }; @@ -181,18 +183,18 @@ static void find_hfs_partition(cdrom_drive_info &info) info.start_byte = 0; uint8 *map = new uint8[512]; D(bug("Looking for HFS partitions on CD-ROM...\n")); - + // Search first 64 blocks for HFS partition for (int i=0; i<64; i++) { if (Sys_read(info.fh, map, i * 512, 512) != 512) break; D(bug(" block %d, signature '%c%c' (%02x%02x)\n", i, map[0], map[1], map[0], map[1])); - + // Not a partition map block? Then look at next block uint16 sig = (map[0] << 8) | map[1]; if (sig != 0x504d) continue; - + // Partition map block found, Apple HFS partition? if (strcmp((char *)(map + 48), "Apple_HFS") == 0) { info.start_byte = (loff_t)((map[8] << 24) | (map[9] << 16) | (map[10] << 8) | map[11]) << 9; @@ -214,7 +216,7 @@ static void read_toc(cdrom_drive_info &info) // Read TOC memset(info.toc, 0, sizeof(info.toc)); SysCDReadTOC(info.fh, info.toc); - + #if DEBUG // Dump TOC for debugging D(bug(" TOC:\n %02x%02x%02x%02x : %d bytes, first track = %d, last track = %d\n", info.toc[0], info.toc[1], info.toc[2], info.toc[3], (info.toc[0] << 8) | info.toc[1], info.toc[2], info.toc[3])); @@ -226,7 +228,7 @@ static void read_toc(cdrom_drive_info &info) break; } #endif - + // Find lead-out track info.lead_out[0] = 0; info.lead_out[1] = 0; @@ -290,7 +292,7 @@ void CDROMInit(void) // No drives specified in prefs? Then add defaults if (PrefsFindString("cdrom", 0) == NULL) SysAddCDROMPrefs(); - + // Add drives specified in preferences int index = 0; const char *str; @@ -348,15 +350,15 @@ static void mount_mountable_volumes(void) { drive_vec::iterator info, end = drives.end(); for (info = drives.begin(); info != end; ++info) { - + // Disk in drive? if (ReadMacInt8(info->status + dsDiskInPlace) == 0) { - + // No, check if disk was inserted if (SysIsDiskInserted(info->fh)) CDROMMountVolume(info->fh); } - + // Mount disk if flagged if (info->to_be_mounted) { D(bug(" mounting drive %d\n", info->num)); @@ -377,25 +379,25 @@ static void mount_mountable_volumes(void) int16 CDROMOpen(uint32 pb, uint32 dce) { D(bug("CDROMOpen\n")); - + // Set up DCE WriteMacInt32(dce + dCtlPosition, 0); acc_run_called = false; - + // Install drives drive_vec::iterator info, end = drives.end(); for (info = drives.begin(); info != end; ++info) { - + info->num = FindFreeDriveNumber(1); info->to_be_mounted = false; - + if (info->fh) { info->mount_non_hfs = true; info->block_size = 512; info->twok_offset = -1; info->play_mode = 0x09; info->power_mode = 0; - + // Allocate drive status record M68kRegisters r; r.d[0] = SIZEOF_DrvSts; @@ -404,12 +406,12 @@ int16 CDROMOpen(uint32 pb, uint32 dce) continue; info->status = r.a[0]; D(bug(" DrvSts at %08lx\n", info->status)); - + // Set up drive status WriteMacInt8(info->status + dsWriteProt, 0x80); WriteMacInt8(info->status + dsInstalled, 1); WriteMacInt8(info->status + dsSides, 1); - + // Disk in drive? if (SysIsDiskInserted(info->fh)) { SysPreventRemoval(info->fh); @@ -418,7 +420,7 @@ int16 CDROMOpen(uint32 pb, uint32 dce) find_hfs_partition(*info); info->to_be_mounted = true; } - + // Add drive to drive queue D(bug(" adding drive %d\n", info->num)); r.d[0] = (info->num << 16) | (CDROMRefNum & 0xffff); @@ -437,14 +439,14 @@ int16 CDROMOpen(uint32 pb, uint32 dce) int16 CDROMPrime(uint32 pb, uint32 dce) { WriteMacInt32(pb + ioActCount, 0); - + // Drive valid and disk inserted? drive_vec::iterator info = get_drive_info(ReadMacInt16(pb + ioVRefNum)); if (info == drives.end()) return nsDrvErr; if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + // Get parameters void *buffer = Mac2HostAddr(ReadMacInt32(pb + ioBuffer)); size_t length = ReadMacInt32(pb + ioReqCount); @@ -452,17 +454,17 @@ int16 CDROMPrime(uint32 pb, uint32 dce) if ((length & (info->block_size - 1)) || (position & (info->block_size - 1))) return paramErr; info->twok_offset = (position + info->start_byte) & 0x7ff; - + size_t actual = 0; if ((ReadMacInt16(pb + ioTrap) & 0xff) == aRdCmd) { - + // Read actual = Sys_read(info->fh, buffer, position + info->start_byte, length); if (actual != length) { - + // Read error, tried to read HFS root block? if (length == 0x200 && position == 0x400) { - + // Yes, fake (otherwise audio CDs won't get mounted) memset(buffer, 0, 0x200); actual = 0x200; @@ -473,7 +475,7 @@ int16 CDROMPrime(uint32 pb, uint32 dce) } else { return wPrErr; } - + // Update ParamBlock and DCE WriteMacInt32(pb + ioActCount, actual); WriteMacInt32(dce + dCtlPosition, ReadMacInt32(dce + dCtlPosition) + actual); @@ -489,24 +491,24 @@ int16 CDROMControl(uint32 pb, uint32 dce) { uint16 code = ReadMacInt16(pb + csCode); D(bug("CDROMControl %d\n", code)); - + // General codes switch (code) { case 1: // KillIO return noErr; - + case 65: { // Periodic action (accRun, "insert" disks on startup) mount_mountable_volumes(); WriteMacInt16(dce + dCtlFlags, ReadMacInt16(dce + dCtlFlags) & ~0x2000); // Disable periodic action acc_run_called = true; return noErr; } - + case 81: // Set poll freq WriteMacInt16(dce + dCtlDelay, ReadMacInt16(pb + csParam)); return noErr; } - + // Drive valid? drive_vec::iterator info = get_drive_info(ReadMacInt16(pb + ioVRefNum)); if (info == drives.end()) { @@ -516,7 +518,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) info = drives.begin(); // This is needed for Apple's Audio CD program } } - + // Drive-specific codes switch (code) { case 5: // VerifyTheDisc @@ -524,10 +526,10 @@ int16 CDROMControl(uint32 pb, uint32 dce) return noErr; else return offLinErr; - + case 6: // FormatTheDisc return writErr; - + case 7: // EjectTheDisc if (ReadMacInt8(info->status + dsDiskInPlace) > 0) { SysAllowRemoval(info->fh); @@ -536,16 +538,16 @@ int16 CDROMControl(uint32 pb, uint32 dce) info->twok_offset = -1; } return noErr; - + case 21: // GetDriveIcon case 22: // GetMediaIcon WriteMacInt32(pb + csParam, CDROMIconAddr); return noErr; - + case 23: // GetDriveInfo WriteMacInt32(pb + csParam, 0x00000b01); // Unspecified external removable SCSI disk return noErr; - + case 70: { // SetPowerMode uint8 mode = ReadMacInt8(pb + csParam); if (mode > 3) { @@ -555,11 +557,11 @@ int16 CDROMControl(uint32 pb, uint32 dce) return noErr; } } - + case 76: // ModifyPostEvent info->mount_non_hfs = ReadMacInt16(pb + csParam) != 0; return noErr; - + case 79: { // Change block size uint16 size = ReadMacInt16(pb + csParam); D(bug(" change block size to %d bytes\n", size)); @@ -570,7 +572,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) return noErr; } } - + case 80: // SetUserEject if (ReadMacInt8(info->status + dsDiskInPlace) > 0) { if (ReadMacInt16(pb + csParam) == 1) @@ -581,11 +583,11 @@ int16 CDROMControl(uint32 pb, uint32 dce) } else { return offLinErr; } - + case 100: { // ReadTOC if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + int action = ReadMacInt16(pb + csParam); D(bug(" read TOC %d\n", action)); switch (action) { @@ -594,26 +596,26 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt8(pb + csParam + 1, bin2bcd[info->toc[3]]); WriteMacInt16(pb + csParam + 2, 0); break; - + case 2: // Get lead out MSF starting address WriteMacInt8(pb + csParam, bin2bcd[info->lead_out[0]]); WriteMacInt8(pb + csParam + 1, bin2bcd[info->lead_out[1]]); WriteMacInt8(pb + csParam + 2, bin2bcd[info->lead_out[2]]); WriteMacInt8(pb + csParam + 3, 0); break; - + case 3: { // Get track starting address uint32 buf = ReadMacInt32(pb + csParam + 2); uint16 buf_size = ReadMacInt16(pb + csParam + 6); int track = bcd2bin[ReadMacInt8(pb + csParam + 8)]; - + // Search start track in TOC int i; for (i=4; i<804; i+=8) { if (info->toc[i+2] == track) break; } - + // Fill buffer if (i != 804) { while (buf_size > 0) { @@ -621,18 +623,91 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt8(buf, bin2bcd[info->toc[i+5]]); buf++; // M WriteMacInt8(buf, bin2bcd[info->toc[i+6]]); buf++; // S WriteMacInt8(buf, bin2bcd[info->toc[i+7]]); buf++; // F - + // Lead-Out? Then stop if (info->toc[i+2] == 0xaa) break; - + buf_size -= 4; i += 8; } } break; } - + + case 4: { // Type 4 TOC for non-AppleCD SC + uint32 buf = ReadMacInt32(pb + csParam + 2); + uint16 buf_size = 512; // buffer must be 512 bytes for this TOC type + + // start filling buffer + WriteMacInt8(buf, 0); buf++; // first byte reserved for 0 + buf_size--; + + int i = 4; + // in TOC, first 4 are session and/or track number; so tracks start at i = 4 + // (info->toc[2] is first track num and info->toc[3] is last num) + // each track entry is 8 bytes: + // 0: unused, 1: control, 2: tracknum, 3: unused + // 4: unused, 5: MIN, 6: SEC, 7: FRAME + + // entry for point A0 (first track num) + WriteMacInt8(buf, info->toc[i+1] & 0x0f); buf++; // control field + WriteMacInt8(buf, bin2bcd[info->toc[2]]); buf++; // track number + WriteMacInt8(buf, bin2bcd[info->toc[i+5]]); buf++; // PMIN + WriteMacInt8(buf, bin2bcd[info->toc[i+6]]); buf++; // PSEC + WriteMacInt8(buf, bin2bcd[info->toc[i+7]]); buf++; // PFRAME + buf_size -= 5; // every 8 bits written decreases byte buffer size by 1 + + // entry for point A1 (last track) + int buf_a1 = buf; // save for filling last track num + buf += 5; buf_size -= 5; + + // entry for point A2 (address of start of lead out) + int buf_a2 = buf; // save for filling at end + buf += 5; buf_size -= 5; + + // Fill buffer + while (i <= 804 && buf_size > 1) { // index 511 never used + // Lead out? then fill a2 and stop + if (info->toc[i+2] == 0xaa) { + // entry for point a2 + WriteMacInt8(buf_a2, info->toc[i+1] & 0x0f); // Control + WriteMacInt8(buf_a2 + 1, bin2bcd[info->toc[i+2]]); // tracknum + WriteMacInt8(buf_a2 + 2, bin2bcd[info->lead_out[0]]); // M, same as toc[i+5] + WriteMacInt8(buf_a2 + 3, bin2bcd[info->lead_out[1]]); // S + WriteMacInt8(buf_a2 + 4, bin2bcd[info->lead_out[2]]); // F + break; + } + + WriteMacInt8(buf, info->toc[i+1] & 0x0f); buf++; // Control + WriteMacInt8(buf, bin2bcd[info->toc[i+2]]); buf++; // tracknum + WriteMacInt8(buf, bin2bcd[info->toc[i+5]]); buf++; // M + WriteMacInt8(buf, bin2bcd[info->toc[i+6]]); buf++; // S + WriteMacInt8(buf, bin2bcd[info->toc[i+7]]); buf++; // F + + // Last track? fill a1 as well + if (info->toc[i+2] == info->toc[3]) { + // entry for point a1 + WriteMacInt8(buf_a1, info->toc[i+1] & 0x0f); // Control + WriteMacInt8(buf_a1 + 1, bin2bcd[info->toc[3]]); // tracknum + WriteMacInt8(buf_a1 + 2, bin2bcd[info->toc[i+5]]); // M + WriteMacInt8(buf_a1 + 3, bin2bcd[info->toc[i+6]]); // S + WriteMacInt8(buf_a1 + 4, bin2bcd[info->toc[i+7]]); // F + } + + buf_size -= 5; + i += 8; + } + + // fill rest of buffer with zeroes + while (buf_size > 0) { + WriteMacInt8(buf, 0); buf++; + buf_size--; + } + + break; + } + case 5: // Get session information WriteMacInt16(pb + csParam, 1); // First session number WriteMacInt16(pb + csParam + 2, 1); // Last session number @@ -642,20 +717,20 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt8(pb + csParam + 8, bin2bcd[info->toc[10]]); // S WriteMacInt8(pb + csParam + 9, bin2bcd[info->toc[11]]); // F break; - + default: printf("FATAL: .AppleCD/Control(100): unimplemented TOC type\n"); return paramErr; } return noErr; } - + case 101: { // ReadTheQSubcode if (ReadMacInt8(info->status + dsDiskInPlace) == 0) { Mac_memset(pb + csParam, 0, 10); return offLinErr; } - + uint8 pos[16]; if (SysCDGetPosition(info->fh, pos)) { uint32 p = pb + csParam; @@ -674,16 +749,16 @@ int16 CDROMControl(uint32 pb, uint32 dce) return ioErr; } } - + case 102: // ReadHeader printf("FATAL: .AppleCD/Control(102): unimplemented call\n"); return controlErr; - + case 103: { // AudioTrackSearch D(bug(" AudioTrackSearch postype %d, pos %08x, hold %d\n", ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), ReadMacInt16(pb + csParam + 6))); if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + uint8 start_m, start_s, start_f; if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, start_m, start_s, start_f)) return paramErr; @@ -694,12 +769,12 @@ int16 CDROMControl(uint32 pb, uint32 dce) SysCDPause(info->fh); return noErr; } - + case 104: // AudioPlay D(bug(" AudioPlay postype %d, pos %08lx, hold %d\n", ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), ReadMacInt16(pb + csParam + 6))); if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + if (ReadMacInt16(pb + csParam + 6)) { // Given stopping address if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), true, info->stop_at[0], info->stop_at[1], info->stop_at[2])) @@ -714,11 +789,11 @@ int16 CDROMControl(uint32 pb, uint32 dce) return paramErr; } return noErr; - + case 105: // AudioPause if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + switch (ReadMacInt32(pb + csParam)) { case 0: if (!SysCDResume(info->fh)) @@ -732,12 +807,12 @@ int16 CDROMControl(uint32 pb, uint32 dce) return paramErr; } return noErr; - + case 106: // AudioStop D(bug(" AudioStop postype %d, pos %08lx\n", ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2))); if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + if (ReadMacInt16(pb + csParam) == 0 && ReadMacInt32(pb + csParam + 2) == 0) { // Stop immediately if (!SysCDStop(info->fh, info->lead_out[0], info->lead_out[1], info->lead_out[2])) @@ -748,15 +823,15 @@ int16 CDROMControl(uint32 pb, uint32 dce) return paramErr; } return noErr; - + case 107: { // AudioStatus if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + uint8 pos[16]; if (!SysCDGetPosition(info->fh, pos)) return paramErr; - + uint32 p = pb + csParam; switch (pos[1]) { case 0x11: @@ -783,34 +858,34 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt8(p, bin2bcd[pos[11]]); p++; // F (abs) return noErr; } - + case 108: { // AudioScan if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - + uint8 start_m, start_s, start_f; if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, start_m, start_s, start_f)) return paramErr; - + if (!SysCDScan(info->fh, start_m, start_s, start_f, ReadMacInt16(pb + csParam + 6) != 0)) { return paramErr; } else { return noErr; } } - + case 109: // AudioControl SysCDSetVolume(info->fh, ReadMacInt8(pb + csParam), ReadMacInt8(pb + csParam + 1)); return noErr; - + case 110: // ReadMCN printf("FATAL: .AppleCD/Control(110): unimplemented call\n"); return controlErr; - + case 111: // ReadISRC printf("FATAL: .AppleCD/Control(111): unimplemented call\n"); return controlErr; - + case 112: { // ReadAudioVolume uint8 left = 0, right = 0; SysCDGetVolume(info->fh, left, right); @@ -818,43 +893,50 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt8(pb + csParam + 1, right); return noErr; } - + case 113: // GetSpindleSpeed WriteMacInt16(pb + csParam, 0xff); return noErr; - + case 114: // SetSpindleSpeed return noErr; - + case 115: // ReadAudio printf("FATAL: .AppleCD/Control(115): unimplemented call\n"); return controlErr; - + case 116: // ReadAllSubcodes printf("FATAL: .AppleCD/Control(116): unimplemented call\n"); return controlErr; - + case 122: // SetTrackList printf("FATAL: .AppleCD/Control(122): unimplemented call\n"); return controlErr; - + case 123: // GetTrackList printf("FATAL: .AppleCD/Control(123): unimplemented call\n"); return controlErr; - + case 124: // GetTrackIndex printf("FATAL: .AppleCD/Control(124): unimplemented call\n"); return controlErr; - + case 125: // SetPlayMode - D(bug(" SetPlayMode %04x\n", ReadMacInt16(pb + csParam))); - printf("FATAL: .AppleCD/Control(125): unimplemented call\n"); - return controlErr; - + // repeat flag (0 is off, 1 is on) + info->repeat = ReadMacInt8(pb + csParam); + // playmode (0 is normal, 1 is shuffle, 2 is program mode) + info->play_order = ReadMacInt8(pb + csParam + 1); + // D(bug(" SetPlayMode %04x\n", ReadMacInt16(pb + csParam))); + // printf("FATAL: .AppleCD/Control(125): unimplemented call\n"); + return noErr; + case 126: // GetPlayMode (Apple's Audio CD program needs this) - WriteMacInt16(pb + csParam, 0); + // repeat flag + WriteMacInt8(pb + csParam, bcd2bin[info->repeat]); + // playmode + WriteMacInt8(pb + csParam + 1, bcd2bin[info->play_order]); return noErr; - + default: printf("WARNING: Unknown CDROMControl(%d)\n", code); return controlErr; @@ -871,7 +953,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) drive_vec::iterator info = get_drive_info(ReadMacInt16(pb + ioVRefNum)); uint16 code = ReadMacInt16(pb + csCode); D(bug("CDROMStatus %d\n", code)); - + // General codes (we can get these even if the drive was invalid) switch (code) { case 43: { // DriverGestalt @@ -917,7 +999,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) } return noErr; } - + case 97: { // WhoIsThere uint8 drives_present = 0; drive_vec::iterator info, end = drives.end(); @@ -929,7 +1011,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) return noErr; } } - + // Drive valid? if (info == drives.end()) { if (drives.empty()) @@ -937,7 +1019,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) else info = drives.begin(); // This is needed for Apple's Audio CD program } - + // Drive-specific codes switch (code) { case 6: // Return format list @@ -950,15 +1032,15 @@ int16 CDROMStatus(uint32 pb, uint32 dce) } else { return paramErr; } - + case 8: // DriveStatus Mac2Mac_memcpy(pb + csParam, info->status, 22); return noErr; - + case 70: // GetPowerMode WriteMacInt16(pb + csParam, info->power_mode << 8); return noErr; - + case 95: // Get2KOffset if (info->twok_offset > 0) { WriteMacInt16(pb + csParam, info->twok_offset); @@ -966,24 +1048,24 @@ int16 CDROMStatus(uint32 pb, uint32 dce) } else { return statusErr; } - + case 96: // Get drive type WriteMacInt16(pb + csParam, 3); // Apple CD 300 or newer return noErr; - + case 98: // Get block size WriteMacInt16(pb + csParam, info->block_size); return noErr; - + case 120: // Return device ident WriteMacInt32(pb + csParam, 0); return noErr; - + case 121: // Get CD features WriteMacInt16(pb + csParam, 0x0200); // 300 KB/s WriteMacInt16(pb + csParam + 2, 0x0c00); // SCSI-2, stereo return noErr; - + default: printf("WARNING: Unknown CDROMStatus(%d)\n", code); return statusErr; @@ -999,6 +1081,6 @@ void CDROMInterrupt(void) { if (!acc_run_called) return; - + mount_mountable_volumes(); } diff --git a/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist new file mode 100644 index 000000000..18d981003 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist @@ -0,0 +1,8 @@ + + + + + IDEDidComputeMac32BitWarning + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 7a4b5145e..0c710e547 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -30,7 +30,6 @@ 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4B14A99EEF000B1711 /* adb.cpp */; }; 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4C14A99EEF000B1711 /* audio.cpp */; }; - 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7814A99EEF000B1711 /* cdrom.cpp */; }; 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7D14A99EEF000B1711 /* disk.cpp */; }; 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */; }; 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8614A99EEF000B1711 /* emul_op.cpp */; }; @@ -55,7 +54,6 @@ 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC114A99EF0000B1711 /* thunks.cpp */; }; 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC214A99EF0000B1711 /* timer.cpp */; }; 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */; }; - 0856D08714A99EF1000B1711 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CECF14A99EF0000B1711 /* bincue_unix.cpp */; }; 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEE314A99EF0000B1711 /* ether_unix.cpp */; }; 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEFB14A99EF0000B1711 /* main_unix.cpp */; }; 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */; }; @@ -80,6 +78,24 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; + 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; + 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; + 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; + 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; + 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; + 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */; }; + 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95042255C822004D0E79 /* CoreAudio.framework */; }; + 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95062255C844004D0E79 /* AudioUnit.framework */; }; + 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; + 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; + 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; + 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; + 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; + 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; @@ -155,7 +171,6 @@ 0856CCC114A99E1C000B1711 /* SheepShaver.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaver.app; sourceTree = BUILT_PRODUCTS_DIR; }; 0856CD4B14A99EEF000B1711 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = SOURCE_ROOT; }; 0856CD4C14A99EEF000B1711 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD7814A99EEF000B1711 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../cdrom.cpp; sourceTree = SOURCE_ROOT; }; 0856CD7D14A99EEF000B1711 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = SOURCE_ROOT; }; 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 0856CD8614A99EEF000B1711 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = SOURCE_ROOT; }; @@ -273,8 +288,6 @@ 0856CEC114A99EF0000B1711 /* thunks.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = thunks.cpp; path = ../thunks.cpp; sourceTree = SOURCE_ROOT; }; 0856CEC214A99EF0000B1711 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = SOURCE_ROOT; }; 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = about_window_unix.cpp; sourceTree = ""; }; - 0856CECF14A99EF0000B1711 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; - 0856CED014A99EF0000B1711 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; 0856CEE314A99EF0000B1711 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; 0856CEFB14A99EF0000B1711 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_unix.cpp; sourceTree = ""; }; @@ -323,6 +336,20 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; + 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; + 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue_unix.cpp; path = ../../../BasiliskII/src/Unix/bincue_unix.cpp; sourceTree = ""; }; + 5D55CB442255B50E00FF8E81 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bincue_unix.h; path = ../../../BasiliskII/src/Unix/bincue_unix.h; sourceTree = ""; }; + 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = MacOSX_sound_if.h; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h; sourceTree = ""; }; + 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = MacOSX_sound_if.cpp; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp; sourceTree = ""; }; + 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; + 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioBackEnd.cpp; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp; sourceTree = ""; }; + 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; + 5DDE95042255C822004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; + 5DDE95062255C844004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; + 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioDevice.cpp; path = ../../../BasiliskII/src/MacOSX/AudioDevice.cpp; sourceTree = ""; }; + 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; + 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = audio_defs_macosx.h; path = ../../../BasiliskII/src/MacOSX/audio_defs_macosx.h; sourceTree = ""; }; + 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio_macosx.cpp; path = ../../../BasiliskII/src/MacOSX/audio_macosx.cpp; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; @@ -391,6 +418,9 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( + 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */, + 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */, + 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */, E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, @@ -448,7 +478,7 @@ 087B91B11B780EC900825F7F /* CrossPlatform */, 0856CD4B14A99EEF000B1711 /* adb.cpp */, 0856CD4C14A99EEF000B1711 /* audio.cpp */, - 0856CD7814A99EEF000B1711 /* cdrom.cpp */, + 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, 0856CD7D14A99EEF000B1711 /* disk.cpp */, 0856CD7E14A99EEF000B1711 /* dummy */, 0856CD8614A99EEF000B1711 /* emul_op.cpp */, @@ -708,6 +738,12 @@ children = ( 0873A76514ABD151004F12B7 /* config */, 0856D2D614A9A704000B1711 /* Launcher */, + 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */, + 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */, + 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */, + 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */, + 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */, + 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */, E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */, 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */, 0879BDAF15A8B1AA00DC277D /* Info.plist.in */, @@ -718,6 +754,8 @@ 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */, 0873A80014AC515D004F12B7 /* utils_macosx.h */, 0873A80114AC515D004F12B7 /* utils_macosx.mm */, + 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */, + 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */, ); name = MacOSX; sourceTree = ""; @@ -791,8 +829,8 @@ 08003F841E0624BD00A3ADAB /* dyngen_precompiled */, 082AC25614AA59DA00071F5E /* Darwin */, 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */, - 0856CECF14A99EF0000B1711 /* bincue_unix.cpp */, - 0856CED014A99EF0000B1711 /* bincue_unix.h */, + 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */, + 5D55CB442255B50E00FF8E81 /* bincue_unix.h */, 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */, 083E370B16EFE85000CCCA59 /* disk_unix.h */, 0856CEE314A99EF0000B1711 /* ether_unix.cpp */, @@ -862,6 +900,9 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { isa = PBXGroup; children = ( + 5DDE95062255C844004D0E79 /* AudioUnit.framework */, + 5DDE95042255C822004D0E79 /* CoreAudio.framework */, + 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */, E420910020D0C4FA0094654F /* SDL2.framework */, 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, @@ -878,9 +919,14 @@ buildActionMask = 2147483647; files = ( 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */, + 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */, 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, + 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */, + 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */, + 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */, + 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */, 08163339158C121000C449F9 /* dis-asm.h in Headers */, 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */, @@ -995,13 +1041,17 @@ files = ( 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, + 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */, 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, + 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, + 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */, 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, + 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, @@ -1014,11 +1064,11 @@ buildActionMask = 2147483647; files = ( E44C460B20D262B0000583AE /* debug.c in Sources */, + 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, E44C461520D262B0000583AE /* ip_output.c in Sources */, 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, - 0856CFE214A99EF0000B1711 /* cdrom.cpp in Sources */, E44C461820D262B0000583AE /* tcp_output.c in Sources */, 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, @@ -1043,6 +1093,7 @@ E44C461420D262B0000583AE /* ip_input.c in Sources */, E44C461320D262B0000583AE /* bootp.c in Sources */, 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, + 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */, 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, @@ -1052,10 +1103,11 @@ 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, + 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, E44C460720D262B0000583AE /* ip_icmp.c in Sources */, - 0856D08714A99EF1000B1711 /* bincue_unix.cpp in Sources */, E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */, + 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */, 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */, @@ -1070,9 +1122,11 @@ 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, E44C461020D262B0000583AE /* slirp.c in Sources */, 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, + 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */, 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, E44C460920D262B0000583AE /* tcp_input.c in Sources */, 0856D11814A99EF1000B1711 /* video.cpp in Sources */, + 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */, E41936C420CFE64D003A7654 /* SDLMain.m in Sources */, E44C461220D262B0000583AE /* socket.c in Sources */, 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, @@ -1128,6 +1182,8 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, + "USE_SDL_AUDIO=1", + "BINCUE=1", ); HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers/, @@ -1165,6 +1221,8 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, + "USE_SDL_AUDIO=1", + "BINCUE=1", ); HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers/, @@ -1232,6 +1290,9 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, + "BINCUE=1", + "OSX_CORE_AUDIO=1", + "USE_SDL_AUDIO=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_WARN_UNUSED_FUNCTION = YES; @@ -1292,6 +1353,9 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, + "BINCUE=1", + "OSX_CORE_AUDIO=1", + "USE_SDL_AUDIO=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_WARN_UNUSED_FUNCTION = YES; diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata new file mode 100644 index 000000000..919434a62 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata @@ -0,0 +1,7 @@ + + + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist new file mode 100644 index 000000000..18d981003 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist @@ -0,0 +1,8 @@ + + + + + IDEDidComputeMac32BitWarning + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme new file mode 100644 index 000000000..baa5b56b1 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme @@ -0,0 +1,92 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + From b62e20838cb4070cecb2f53d2bb497b1d50a0863 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 3 May 2019 18:50:41 +0900 Subject: [PATCH 278/534] disable mouse grab if hard-cursor used --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 409abe24b..21f1fecbf 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2105,7 +2105,7 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) SDL_Keysym const & ks = event->key.keysym; switch (ks.sym) { case SDLK_F5: { - if (is_hotkey_down(ks)) { + if (is_hotkey_down(ks) && !PrefsFindBool("hardcursor")) { drv->toggle_mouse_grab(); return EVENT_DROP_FROM_QUEUE; } From 2bcfae861fa867c944ade8980783d55e95f66b77 Mon Sep 17 00:00:00 2001 From: Seth Date: Thu, 13 Jun 2019 12:59:49 -0500 Subject: [PATCH 279/534] Switch to SDL AudioStream to convert CD Audio --- BasiliskII/src/SDL/audio_sdl.cpp | 2 +- BasiliskII/src/Unix/bincue_unix.cpp | 41 +++++++++++++++---- BasiliskII/src/Unix/bincue_unix.h | 2 +- .../project.pbxproj | 2 - 4 files changed, 36 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 6bff36c35..835b888c4 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -252,7 +252,7 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) silence: memset(stream, silence_byte, stream_len); } #if defined(BINCUE) - MixAudio_bincue(stream, stream_len); + MixAudio_bincue(stream, stream_len, audio_volume); #endif } diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 63ed2e730..ac223e501 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -115,6 +115,9 @@ typedef struct { #ifdef OSX_CORE_AUDIO OSXsoundOutput soundoutput; #endif +#ifdef USE_SDL_AUDIO + SDL_AudioStream *stream; +#endif } CDPlayer; // Minute,Second,Frame data type @@ -810,25 +813,49 @@ static uint8 *fill_buffer(int stream_len) #ifdef USE_SDL_AUDIO -void MixAudio_bincue(uint8 *stream, int stream_len) +void MixAudio_bincue(uint8 *stream, int stream_len, int volume) { +// if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { +// uint8 *buf = fill_buffer(stream_len); +// if (buf) +// SDL_MixAudio(stream, buf, stream_len, volume); +// } if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { uint8 *buf = fill_buffer(stream_len); if (buf) - SDL_MixAudio(stream, buf, stream_len, SDL_MIX_MAXVOLUME); + SDL_AudioStreamPut(player.stream, buf, stream_len); + int avail = SDL_AudioStreamAvailable(player.stream); + if (avail >= stream_len) { + uint8 converted[stream_len]; + SDL_AudioStreamGet(player.stream, converted, stream_len); + SDL_MixAudio(stream, converted, stream_len, volume); + } } } void OpenAudio_bincue(int freq, int format, int channels, uint8 silence) { - if (freq == 44100 && format == AUDIO_S16MSB && channels == 2) { - audio_enabled = true; - silence_byte = silence; +// audio_enabled = true; +// silence_byte = silence; + // audio stream handles converting cd audio to destination output + player.stream = SDL_NewAudioStream(AUDIO_S16LSB, 2, 44100, format, channels, freq); + if (player.stream == NULL) { + D(bug("Failed to open CD player audio stream using SDL!")); } else { - D(bug("unexpected frequency %d , format %d, or channels %d\n", - freq, format, channels)); + audio_enabled = true; + silence_byte = silence; } +// audio_enabled = true; +// silence_byte = silence; +// if (freq == 44100 && format == AUDIO_S16MSB && channels == 2) { +// audio_enabled = true; +// silence_byte = silence; +// } +// else { +// D(bug("unexpected frequency %d , format %d, or channels %d\n", +// freq, format, channels)); +// } } #endif diff --git a/BasiliskII/src/Unix/bincue_unix.h b/BasiliskII/src/Unix/bincue_unix.h index dbf5d8b58..3e4722a39 100644 --- a/BasiliskII/src/Unix/bincue_unix.h +++ b/BasiliskII/src/Unix/bincue_unix.h @@ -37,7 +37,7 @@ extern bool CDStop_bincue(void *); #ifdef USE_SDL_AUDIO extern void OpenAudio_bincue(int, int, int, uint8); -extern void MixAudio_bincue(uint8 *, int); +extern void MixAudio_bincue(uint8 *, int, int); #endif #endif diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 0c710e547..dc5de2adb 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1291,7 +1291,6 @@ _THREAD_SAFE, _REENTRANT, "BINCUE=1", - "OSX_CORE_AUDIO=1", "USE_SDL_AUDIO=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1354,7 +1353,6 @@ _THREAD_SAFE, _REENTRANT, "BINCUE=1", - "OSX_CORE_AUDIO=1", "USE_SDL_AUDIO=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; From ff2dc11f09b92e31376e6a38ab18322c9b6d2d30 Mon Sep 17 00:00:00 2001 From: Seth Date: Thu, 13 Jun 2019 13:31:36 -0500 Subject: [PATCH 280/534] Extended mode and sector size support --- BasiliskII/src/Unix/bincue_unix.cpp | 71 ++++++++++++++++++----------- 1 file changed, 45 insertions(+), 26 deletions(-) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index ac223e501..492ad1a57 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -58,8 +58,8 @@ static int bincue_core_audio_callback(void); #define MAXTRACK 100 #define MAXLINE 512 #define CD_FRAMES 75 -#define RAW_SECTOR_SIZE 2352 -#define COOKED_SECTOR_SIZE 2048 +//#define RAW_SECTOR_SIZE 2352 +//#define COOKED_SECTOR_SIZE 2048 // Bits of Track Control Field -- These are standard for scsi cd players @@ -100,7 +100,10 @@ typedef struct { unsigned int length; // file length in frames int binfh; // binary file handle int tcnt; // number of tracks - Track tracks[MAXTRACK]; + Track tracks[MAXTRACK]; // Track management + int raw_sector_size; // Raw bytes to read per sector + int cooked_sector_size; // Actual data bytes per sector (depends on Mode) + int header_size; // Number of bytes used in header } CueSheet; typedef struct { @@ -185,7 +188,7 @@ static bool AddTrack(CueSheet *cs) } } - curr->fileoffset = curr->start * RAW_SECTOR_SIZE; + curr->fileoffset = curr->start * cs->raw_sector_size; // now we patch up the indicated time @@ -301,8 +304,21 @@ static bool ParseCueSheet(FILE *fh, CueSheet *cs, const char *cuefile) // parse track type field = strtok(NULL, " \t\n\r"); - if (!strcmp("MODE1/2352", field)) { + if (!strcmp("MODE1/2352", field)) { // red-book CD-ROM standard curr->tcf = DATA; + cs->raw_sector_size = 2352; + cs->cooked_sector_size = 2048; + cs->header_size = 16; // remaining 288 bytes for error detection + } else if (!strcmp("MODE2/2352", field)) { // yellow-book CD-ROM standard + curr->tcf = DATA; + cs->raw_sector_size = 2352; + cs->cooked_sector_size = 2336; // no error bytes at end + cs->header_size = 16; + } else if (!strcmp("MODE1/2048", field)) { // pure data CD-ROM + curr->tcf = DATA; + cs->raw_sector_size = 2048; + cs->cooked_sector_size = 2048; + cs->header_size = 0; // no header or error bytes } else if (!strcmp("AUDIO", field)) { curr->tcf = AUDIO; } else { @@ -406,7 +422,7 @@ static bool LoadCueSheet(const char *cuefile, CueSheet *cs) tlast = &cs->tracks[cs->tcnt - 1]; - tlast->length = buf.st_size/RAW_SECTOR_SIZE + tlast->length = buf.st_size/cs->raw_sector_size - tlast->start + totalPregap; if (tlast->length < 0) { @@ -416,7 +432,7 @@ static bool LoadCueSheet(const char *cuefile, CueSheet *cs) // save bin file length and pointer - cs->length = buf.st_size/RAW_SECTOR_SIZE; + cs->length = buf.st_size/cs->raw_sector_size; cs->binfh = binfh; fclose(fh); @@ -473,9 +489,12 @@ void close_bincue(void *fh) /* * File read (cooked) * Data are stored in raw sectors of which only COOKED_SECTOR_SIZE - * bytes are valid -- the remaining include 16 bytes at the beginning + * bytes are valid -- the remaining include header bytes at the beginning * of each raw sector and RAW_SECTOR_SIZE - COOKED_SECTOR_SIZE - bytes - * at the end + * at the end for error correction + * + * The actual number of bytes used for header, raw, cooked, error depend + * on mode specified in the cuesheet * * We assume that a read request can land in the middle of * sector. We compute the byte address of that sector (sec) @@ -487,20 +506,20 @@ void close_bincue(void *fh) size_t read_bincue(void *fh, void *b, loff_t offset, size_t len) { + CueSheet *cs = (CueSheet *) fh; + size_t bytes_read = 0; // bytes read so far unsigned char *buf = (unsigned char *) b; // target buffer - unsigned char secbuf[RAW_SECTOR_SIZE]; // temporary buffer + unsigned char secbuf[cs->raw_sector_size]; // temporary buffer - off_t sec = ((offset/COOKED_SECTOR_SIZE) * RAW_SECTOR_SIZE); - off_t secoff = offset % COOKED_SECTOR_SIZE; + off_t sec = ((offset/cs->cooked_sector_size) * cs->raw_sector_size); + off_t secoff = offset % cs->cooked_sector_size; // sec contains location (in bytes) of next raw sector to read // secoff contains offset within that sector at which to start // reading since we can request a read that starts in the middle // of a sector - CueSheet *cs = (CueSheet *) fh; - if (cs == NULL || lseek(cs->binfh, sec, SEEK_SET) < 0) { return -1; } @@ -509,19 +528,19 @@ size_t read_bincue(void *fh, void *b, loff_t offset, size_t len) // bytes available in next raw sector or len (bytes) // we want whichever is less - size_t available = COOKED_SECTOR_SIZE - secoff; + size_t available = cs->cooked_sector_size - secoff; available = (available > len) ? len : available; // read the next raw sector - if (read(cs->binfh, secbuf, RAW_SECTOR_SIZE) != RAW_SECTOR_SIZE) { + if (read(cs->binfh, secbuf, cs->raw_sector_size) != cs->raw_sector_size) { return bytes_read; } - // copy cooked sector bytes (skip first 16) + // copy cooked sector bytes (skip header if needed, typically 16 bytes) // we want out of those available - bcopy(&secbuf[16+secoff], &buf[bytes_read], available); + bcopy(&secbuf[cs->header_size+secoff], &buf[bytes_read], available); // next sector we start at the beginning @@ -538,7 +557,7 @@ size_t read_bincue(void *fh, void *b, loff_t offset, size_t len) loff_t size_bincue(void *fh) { if (fh) { - return ((CueSheet *)fh)->length * COOKED_SECTOR_SIZE; + return ((CueSheet *)fh)->length * ((CueSheet *)fh)->cooked_sector_size; } return 0; } @@ -587,7 +606,7 @@ bool GetPosition_bincue(void *fh, uint8 *pos) CueSheet *cs = (CueSheet *) fh; if (cs && player.cs == cs) { MSF abs, rel; - int fpos = player.audioposition / RAW_SECTOR_SIZE + player.audiostart; + int fpos = player.audioposition / cs->raw_sector_size + player.audiostart; int trackno = PositionToTrack(cs, fpos); if (!audio_enabled) @@ -597,7 +616,7 @@ bool GetPosition_bincue(void *fh, uint8 *pos) if (trackno < cs->tcnt) { // compute position relative to start of frame - unsigned int position = player.audioposition/RAW_SECTOR_SIZE + + unsigned int position = player.audioposition/cs->raw_sector_size + player.audiostart - player.cs->tracks[trackno].start; FramesToMSF(position, &rel); @@ -700,7 +719,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, else player.silence = (player.cs->tracks[track].pregap - player.audiostart + - player.cs->tracks[track].start) * RAW_SECTOR_SIZE; + player.cs->tracks[track].start) * cs->raw_sector_size; player.fileoffset = player.cs->tracks[track].fileoffset; @@ -711,12 +730,12 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, if (!player.silence) // not at the beginning player.fileoffset += (player.audiostart - player.cs->tracks[track].start - - player.cs->tracks[track].pregap) * RAW_SECTOR_SIZE; + player.cs->tracks[track].pregap) * cs->raw_sector_size; FramesToMSF(player.cs->tracks[track].start, &msf); D(bug("CDPlay_bincue track %02d start %02d:%02d:%02d silence %d", player.cs->tracks[track].number, msf.m, msf.s, msf.f, - player.silence/RAW_SECTOR_SIZE)); + player.silence/cs->raw_sector_size)); D(bug(" Stop %02u:%02u:%02u\n", end_m, end_s, end_f)); } else @@ -763,7 +782,7 @@ static uint8 *fill_buffer(int stream_len) if (player.audiostatus == CDROM_AUDIO_PLAY) { int remaining_silence = player.silence - player.audioposition; - if (player.audiostart + player.audioposition/RAW_SECTOR_SIZE + if (player.audiostart + player.audioposition/player.cs->raw_sector_size >= player.audioend) { player.audiostatus = CDROM_AUDIO_COMPLETED; return buf; @@ -781,7 +800,7 @@ static uint8 *fill_buffer(int stream_len) int ret = 0; int available = ((player.audioend - player.audiostart) * - RAW_SECTOR_SIZE) - player.audioposition; + player.cs->raw_sector_size) - player.audioposition; if (available > (stream_len - offset)) available = stream_len - offset; From e4c34683a40f505cde0f8fdecd182e1dac49cd22 Mon Sep 17 00:00:00 2001 From: Seth Date: Thu, 13 Jun 2019 22:46:44 -0500 Subject: [PATCH 281/534] CD volume control enabled --- BasiliskII/src/SDL/audio_sdl.cpp | 2 +- BasiliskII/src/Unix/bincue_unix.cpp | 32 +++++++++++++++++++++++++++-- BasiliskII/src/Unix/bincue_unix.h | 4 +++- BasiliskII/src/Unix/sys_unix.cpp | 11 ++++++++++ 4 files changed, 45 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 835b888c4..46d285d33 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -112,7 +112,7 @@ static bool open_sdl_audio(void) #if defined(BINCUE) OpenAudio_bincue(audio_spec.freq, audio_spec.format, audio_spec.channels, - audio_spec.silence); + audio_spec.silence, audio_volume); #endif #if SDL_VERSION_ATLEAST(2,0,0) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 492ad1a57..ce77e614a 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -114,6 +114,9 @@ typedef struct { unsigned int audioend; // end position if playing (frames) unsigned int silence; // pregap (silence) bytes unsigned char audiostatus; // See defines above for status + uint8 volume_left; // CD player volume (left) + uint8 volume_right; // CD player volume (right) + uint8 volume_mono; // CD player single-channel volume loff_t fileoffset; // offset from file beginning to audiostart #ifdef OSX_CORE_AUDIO OSXsoundOutput soundoutput; @@ -464,6 +467,9 @@ void *open_bincue(const char *name) if (LoadCueSheet(name, cs)) { player.cs = cs; + player.volume_left = 0; + player.volume_right = 0; + player.volume_mono = 0; #ifdef OSX_CORE_AUDIO audio_enabled = true; #endif @@ -759,6 +765,26 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, return false; } +void CDSetVol_bincue(void* fh, uint8 left, uint8 right) { + CueSheet *cs = (CueSheet *)fh; + if (cs && cs == player.cs) { + // Convert from classic Mac's 0-255 to 0-128; + // calculate mono mix as well in place of panning + player.volume_left = (left*128)/255; + player.volume_right = (right*128)/255; + player.volume_mono = (player.volume_left + player.volume_right)/2; // use avg + } +} + +void CDGetVol_bincue(void* fh, uint8* left, uint8* right) { + CueSheet *cs = (CueSheet *)fh; + if (cs && cs == player.cs) { + // Convert from 0-128 to 0-255 scale + *left = (player.volume_left*255)/128; + *right = (player.volume_right*255)/128; + } +} + static uint8 *fill_buffer(int stream_len) { static uint8 *buf = 0; @@ -847,15 +873,17 @@ void MixAudio_bincue(uint8 *stream, int stream_len, int volume) if (avail >= stream_len) { uint8 converted[stream_len]; SDL_AudioStreamGet(player.stream, converted, stream_len); - SDL_MixAudio(stream, converted, stream_len, volume); + SDL_MixAudio(stream, converted, stream_len, player.volume_mono); } } } -void OpenAudio_bincue(int freq, int format, int channels, uint8 silence) +void OpenAudio_bincue(int freq, int format, int channels, uint8 silence, int volume) { // audio_enabled = true; // silence_byte = silence; + // set player volume based on SDL volume + player.volume_left = player.volume_right = player.volume_mono = volume; // audio stream handles converting cd audio to destination output player.stream = SDL_NewAudioStream(AUDIO_S16LSB, 2, 44100, format, channels, freq); if (player.stream == NULL) { diff --git a/BasiliskII/src/Unix/bincue_unix.h b/BasiliskII/src/Unix/bincue_unix.h index 3e4722a39..72fbac243 100644 --- a/BasiliskII/src/Unix/bincue_unix.h +++ b/BasiliskII/src/Unix/bincue_unix.h @@ -34,9 +34,11 @@ extern bool CDPlay_bincue(void *, uint8, uint8, extern bool CDPause_bincue(void *); extern bool CDResume_bincue(void *); extern bool CDStop_bincue(void *); +extern void CDSetVol_bincue(void *, uint8, uint8); +extern void CDGetVol_bincue(void *, uint8 *, uint8 *); #ifdef USE_SDL_AUDIO -extern void OpenAudio_bincue(int, int, int, uint8); +extern void OpenAudio_bincue(int, int, int, uint8, int); extern void MixAudio_bincue(uint8 *, int, int); #endif diff --git a/BasiliskII/src/Unix/sys_unix.cpp b/BasiliskII/src/Unix/sys_unix.cpp index 9c25feb50..e0da8164c 100755 --- a/BasiliskII/src/Unix/sys_unix.cpp +++ b/BasiliskII/src/Unix/sys_unix.cpp @@ -1422,6 +1422,11 @@ void SysCDSetVolume(void *arg, uint8 left, uint8 right) mac_file_handle *fh = (mac_file_handle *)arg; if (!fh) return; + +#if defined(BINCUE) + if (fh->is_bincue) + CDSetVol_bincue(fh->bincue_fd,left,right); +#endif if (fh->is_cdrom) { #if defined(__linux__) @@ -1450,6 +1455,12 @@ void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) return; left = right = 0; + +#if defined(BINCUE) + if (fh->is_bincue) + CDGetVol_bincue(fh->bincue_fd,&left,&right); +#endif + if (fh->is_cdrom) { #if defined(__linux__) cdrom_volctrl vol; From 64d6c0668fb3fa25ed233e02c82420e19f0bbac5 Mon Sep 17 00:00:00 2001 From: Seth Date: Sun, 16 Jun 2019 12:52:29 -0500 Subject: [PATCH 282/534] Added helper functions and strings so BII compiles with bin/cue support --- BasiliskII/src/Unix/sysdeps.h | 90 +++++++++++++++++++ BasiliskII/src/audio.cpp | 9 +- BasiliskII/src/include/user_strings.h | 3 + BasiliskII/src/user_strings.cpp | 2 + .../project.pbxproj | 8 +- 5 files changed, 105 insertions(+), 7 deletions(-) diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 51a53c783..76406ae3e 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -184,6 +184,96 @@ typedef off_t loff_t; typedef char * caddr_t; #endif + +/** + * Helper functions to byteswap data + **/ + +#if defined(__GNUC__) +#if defined(__x86_64__) || defined(__i386__) +// Linux/AMD64 currently has no asm optimized bswap_32() in +#define opt_bswap_32 do_opt_bswap_32 +static inline uint32 do_opt_bswap_32(uint32 x) +{ + uint32 v; + __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x)); + return v; +} +#endif +#endif + +#ifdef HAVE_BYTESWAP_H +#include +#endif + +#ifdef opt_bswap_16 +#undef bswap_16 +#define bswap_16 opt_bswap_16 +#endif +#ifndef bswap_16 +#define bswap_16 generic_bswap_16 +#endif + +static inline uint16 generic_bswap_16(uint16 x) +{ + return ((x & 0xff) << 8) | ((x >> 8) & 0xff); +} + +#ifdef opt_bswap_32 +#undef bswap_32 +#define bswap_32 opt_bswap_32 +#endif +#ifndef bswap_32 +#define bswap_32 generic_bswap_32 +#endif + +static inline uint32 generic_bswap_32(uint32 x) +{ + return (((x & 0xff000000) >> 24) | + ((x & 0x00ff0000) >> 8) | + ((x & 0x0000ff00) << 8) | + ((x & 0x000000ff) << 24) ); +} + +#if defined(__i386__) +#define opt_bswap_64 do_opt_bswap_64 +static inline uint64 do_opt_bswap_64(uint64 x) +{ + return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32)); +} +#endif + +#ifdef opt_bswap_64 +#undef bswap_64 +#define bswap_64 opt_bswap_64 +#endif +#ifndef bswap_64 +#define bswap_64 generic_bswap_64 +#endif + +static inline uint64 generic_bswap_64(uint64 x) +{ + return (((x & UVAL64(0xff00000000000000)) >> 56) | + ((x & UVAL64(0x00ff000000000000)) >> 40) | + ((x & UVAL64(0x0000ff0000000000)) >> 24) | + ((x & UVAL64(0x000000ff00000000)) >> 8) | + ((x & UVAL64(0x00000000ff000000)) << 8) | + ((x & UVAL64(0x0000000000ff0000)) << 24) | + ((x & UVAL64(0x000000000000ff00)) << 40) | + ((x & UVAL64(0x00000000000000ff)) << 56) ); +} + +#ifdef WORDS_BIGENDIAN +static inline uint16 tswap16(uint16 x) { return x; } +static inline uint32 tswap32(uint32 x) { return x; } +static inline uint64 tswap64(uint64 x) { return x; } +#else +static inline uint16 tswap16(uint16 x) { return bswap_16(x); } +static inline uint32 tswap32(uint32 x) { return bswap_32(x); } +static inline uint64 tswap64(uint64 x) { return bswap_64(x); } +#endif + + /* Time data type for Time Manager emulation */ #if defined(__MACH__) typedef mach_timespec_t tm_time_t; diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 00a89996f..1595d54f3 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -31,6 +31,7 @@ #include "main.h" #include "audio.h" #include "audio_defs.h" +#include "user_strings.h" #define DEBUG 0 #include "debug.h" @@ -600,8 +601,9 @@ int16 SoundInStatus(uint32 pb, uint32 dce) uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); uint32 selector = param[0]; D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); - switch (selector) { -#if 0 + uint32 selector_flipped = bswap_32(selector); // endianness of selector needs swapping? + switch (selector_flipped) { +//#if 0 case siDeviceName: { const char *str = GetString(STR_SOUND_IN_NAME); param[0] = 0; @@ -610,6 +612,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) } case siDeviceIcon: { + return -192; // early return: 68k code causes crash in sheep and link error in basilisk M68kRegisters r; static const uint8 proc[] = { 0x55, 0x8f, // subq.l #2,sp @@ -641,7 +644,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) } else return -192; // resNotFound } -#endif +//#endif default: return -231; // siUnknownInfoType } diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index c030b20e1..1b9a4253a 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -225,6 +225,9 @@ enum { STR_WINDOW_ITEM_MOUNT, STR_SUSPEND_WINDOW_TITLE, + // Audio + STR_SOUND_IN_NAME = 6000, + // External file system STR_EXTFS_NAME = 5000, STR_EXTFS_VOLUME_NAME diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index d182f6335..416895520 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -243,6 +243,8 @@ user_string_def common_strings[] = { {STR_WINDOW_ITEM_MOUNT, "Mount"}, {STR_SUSPEND_WINDOW_TITLE, "Basilisk II suspended. Press space to reactivate."}, + {STR_SOUND_IN_NAME, "\010Built-In"}, + {STR_EXTFS_NAME, "Host Directory Tree"}, {STR_EXTFS_VOLUME_NAME, "Host"}, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index dc5de2adb..061f85d2c 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -29,7 +29,6 @@ 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4B14A99EEF000B1711 /* adb.cpp */; }; - 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4C14A99EEF000B1711 /* audio.cpp */; }; 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7D14A99EEF000B1711 /* disk.cpp */; }; 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */; }; 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8614A99EEF000B1711 /* emul_op.cpp */; }; @@ -96,6 +95,7 @@ 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; + 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; @@ -170,7 +170,6 @@ 0846E55214B12B0D00574779 /* paranoia.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = paranoia.cpp; sourceTree = ""; }; 0856CCC114A99E1C000B1711 /* SheepShaver.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaver.app; sourceTree = BUILT_PRODUCTS_DIR; }; 0856CD4B14A99EEF000B1711 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD4C14A99EEF000B1711 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = SOURCE_ROOT; }; 0856CD7D14A99EEF000B1711 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = SOURCE_ROOT; }; 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 0856CD8614A99EEF000B1711 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = SOURCE_ROOT; }; @@ -350,6 +349,7 @@ 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = audio_defs_macosx.h; path = ../../../BasiliskII/src/MacOSX/audio_defs_macosx.h; sourceTree = ""; }; 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio_macosx.cpp; path = ../../../BasiliskII/src/MacOSX/audio_macosx.cpp; sourceTree = ""; }; + 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../../../BasiliskII/src/audio.cpp; sourceTree = ""; }; A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; @@ -477,7 +477,7 @@ children = ( 087B91B11B780EC900825F7F /* CrossPlatform */, 0856CD4B14A99EEF000B1711 /* adb.cpp */, - 0856CD4C14A99EEF000B1711 /* audio.cpp */, + 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, 0856CD7D14A99EEF000B1711 /* disk.cpp */, 0856CD7E14A99EEF000B1711 /* dummy */, @@ -1068,13 +1068,13 @@ E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, E44C461520D262B0000583AE /* ip_output.c in Sources */, - 0856CFC214A99EF0000B1711 /* audio.cpp in Sources */, E44C461820D262B0000583AE /* tcp_output.c in Sources */, 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, E44C460E20D262B0000583AE /* sbuf.c in Sources */, 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, + 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */, 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */, 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, From 5a8498b5571c2f67c802cb00b1e3f4ee9eac32ba Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 7 Jul 2019 01:36:58 +0900 Subject: [PATCH 283/534] Add entitlement for Hardened Runtime --- .gitignore | 2 ++ SheepShaver/src/MacOSX/SheepShaver.entitlements | 8 ++++++++ .../MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 4 +++- 3 files changed, 13 insertions(+), 1 deletion(-) create mode 100644 SheepShaver/src/MacOSX/SheepShaver.entitlements diff --git a/.gitignore b/.gitignore index 4c2030539..125df6d3a 100644 --- a/.gitignore +++ b/.gitignore @@ -25,6 +25,8 @@ DerivedData/ *.perspectivev3 !default.perspectivev3 xcuserdata/ +xcschemes/ +project.xcworkspace/ ## Xcode, Other *.moved-aside diff --git a/SheepShaver/src/MacOSX/SheepShaver.entitlements b/SheepShaver/src/MacOSX/SheepShaver.entitlements new file mode 100644 index 000000000..a1c430a57 --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver.entitlements @@ -0,0 +1,8 @@ + + + + + com.apple.security.cs.allow-unsigned-executable-memory + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 7a4b5145e..d38d6ce4a 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -3,7 +3,7 @@ archiveVersion = 1; classes = { }; - objectVersion = 44; + objectVersion = 45; objects = { /* Begin PBXBuildFile section */ @@ -1214,6 +1214,7 @@ ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_CXX_LIBRARY = "libc++"; + CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; COPY_PHASE_STRIP = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; GCC_CW_ASM_SYNTAX = NO; @@ -1273,6 +1274,7 @@ ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_CXX_LIBRARY = "libc++"; + CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; COPY_PHASE_STRIP = NO; DEAD_CODE_STRIPPING = NO; FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; From c7594f569af1cee0738981b63a8397b0dff996f3 Mon Sep 17 00:00:00 2001 From: Seth Date: Tue, 9 Jul 2019 16:10:20 -0500 Subject: [PATCH 284/534] Adding CD scan stub --- BasiliskII/src/Unix/bincue_unix.cpp | 9 +++++++++ BasiliskII/src/Unix/bincue_unix.h | 1 + BasiliskII/src/Unix/sys_unix.cpp | 9 +++++++-- 3 files changed, 17 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index ce77e614a..b91a861c5 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -765,6 +765,15 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, return false; } +bool CDScan_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) { + CueSheet *cs = (CueSheet *)fh; + if (cs && cs == player.cs) { + // stub + return true; + } + return false; +} + void CDSetVol_bincue(void* fh, uint8 left, uint8 right) { CueSheet *cs = (CueSheet *)fh; if (cs && cs == player.cs) { diff --git a/BasiliskII/src/Unix/bincue_unix.h b/BasiliskII/src/Unix/bincue_unix.h index 72fbac243..b07ab4a82 100644 --- a/BasiliskII/src/Unix/bincue_unix.h +++ b/BasiliskII/src/Unix/bincue_unix.h @@ -34,6 +34,7 @@ extern bool CDPlay_bincue(void *, uint8, uint8, extern bool CDPause_bincue(void *); extern bool CDResume_bincue(void *); extern bool CDStop_bincue(void *); +extern bool CDScan_bincue(void *, uint8, uint8, uint8, bool); extern void CDSetVol_bincue(void *, uint8, uint8); extern void CDGetVol_bincue(void *, uint8 *, uint8 *); diff --git a/BasiliskII/src/Unix/sys_unix.cpp b/BasiliskII/src/Unix/sys_unix.cpp index e0da8164c..173cddf87 100755 --- a/BasiliskII/src/Unix/sys_unix.cpp +++ b/BasiliskII/src/Unix/sys_unix.cpp @@ -1407,8 +1407,13 @@ bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reve mac_file_handle *fh = (mac_file_handle *)arg; if (!fh) return false; - - // Not supported under Linux + +#if defined(BINCUE) + if (fh->is_bincue) + return CDScan_bincue(fh->bincue_fd,start_m,start_s,start_f,reverse); +#endif + + // Not supported outside bincue return false; } From 2a691ce7d4dfe35a04dd9ef8c481d675f8a27306 Mon Sep 17 00:00:00 2001 From: Yosuke Matsumura Date: Tue, 16 Jul 2019 10:21:32 -0500 Subject: [PATCH 285/534] Added Bundle Identifier --- SheepShaver/src/MacOSX/Info.plist.in | 36 ++++++++++--------- .../project.pbxproj | 2 ++ 2 files changed, 21 insertions(+), 17 deletions(-) diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index 02528a921..ada536e38 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -1,25 +1,9 @@ - + CFBundleDevelopmentRegion English - CFBundleExecutable - SheepShaver - CFBundleInfoDictionaryVersion - 6.0 - CFBundlePackageType - APPL - CFBundleSignature - ???? - CFBundleVersion - @PACKAGE_VERSION@ - CFBundleShortVersionString - @PACKAGE_VERSION@ - CFBundleIconFile - SheepShaver.icns - CSResourcesFileMapped - CFBundleDocumentTypes @@ -37,6 +21,24 @@ + CFBundleExecutable + SheepShaver + CFBundleIconFile + SheepShaver.icns + CFBundleIdentifier + $(PRODUCT_BUNDLE_IDENTIFIER) + CFBundleInfoDictionaryVersion + 6.0 + CFBundlePackageType + APPL + CFBundleShortVersionString + @PACKAGE_VERSION@ + CFBundleSignature + ???? + CFBundleVersion + @PACKAGE_VERSION@ + CSResourcesFileMapped + LSArchitecturePriority x86_64 diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index d38d6ce4a..6aeaf02f8 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1262,6 +1262,7 @@ "-lkpx_cpu", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; VALID_ARCHS = x86_64; WARNING_LDFLAGS = ""; @@ -1324,6 +1325,7 @@ "-lkpx_cpu", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; VALID_ARCHS = x86_64; }; From a489b71bb298e484a1d52212e019da7ff2342e6d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 17 Jul 2019 12:06:35 +0900 Subject: [PATCH 286/534] Added bundle identifier for BII --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++-- BasiliskII/src/MacOSX/Info.plist | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 20f9daa5a..34676aa3a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1376,7 +1376,7 @@ ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; VALID_ARCHS = x86_64; @@ -1427,7 +1427,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = com.basiliskii.BasiliskII; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; VALID_ARCHS = x86_64; diff --git a/BasiliskII/src/MacOSX/Info.plist b/BasiliskII/src/MacOSX/Info.plist index 391fb133f..da3aae247 100644 --- a/BasiliskII/src/MacOSX/Info.plist +++ b/BasiliskII/src/MacOSX/Info.plist @@ -11,7 +11,7 @@ CFBundleIconFile BasiliskII.icns CFBundleIdentifier - + $(PRODUCT_BUNDLE_IDENTIFIER) CFBundleInfoDictionaryVersion 6.0 CFBundleName From fcdfd2f799909ff479fc6535789e6c540c57acd5 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 1 Sep 2019 14:37:24 -0500 Subject: [PATCH 287/534] Cleanup of sysdeps header file --- BasiliskII/src/Unix/sysdeps.h | 299 ---------------------------------- 1 file changed, 299 deletions(-) diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 68deb7b6e..b25ee0421 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -34,15 +34,6 @@ /* Define if building universal (internal helper macro) */ /* #undef AC_APPLE_UNIVERSAL_BUILD */ -/* Define if your system supports TUN/TAP devices. */ -/* #undef ENABLE_TUNTAP */ - -/* Define to 1 if you have the header file. */ -#define HAVE_ARPA_INET_H 1 - -/* Define if your system has header. */ -/* #undef HAVE_ASM_UCONTEXT */ - /* Define to 1 if you have the `atanh' function. */ #define HAVE_ATANH 1 @@ -52,48 +43,15 @@ /* Define to 1 if the system has the type `caddr_t'. */ #define HAVE_CADDR_T 1 -/* Define to 1 if you have the `cfmakeraw' function. */ -#define HAVE_CFMAKERAW 1 - /* Define to 1 if you have the `clock_gettime' function. */ #define HAVE_CLOCK_GETTIME 1 /* Define to 1 if you have the header file. */ #define HAVE_FCNTL_H 1 -/* Define to 1 if you have the `finite' function. */ -#define HAVE_FINITE 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_FLOATINGPOINT_H */ - -/* Define if framework AppKit is available. */ -#define HAVE_FRAMEWORK_APPKIT 1 - -/* Define if framework Carbon is available. */ -#define HAVE_FRAMEWORK_CARBON 1 - /* Define if framework CoreFoundation is available. */ #define HAVE_FRAMEWORK_COREFOUNDATION 1 -/* Define if framework IOKit is available. */ -#define HAVE_FRAMEWORK_IOKIT 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_HISTORY_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEE754_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEEFP_H */ - -/* Define to 1 if you have the `inet_aton' function. */ -#define HAVE_INET_ATON 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_INTTYPES_H 1 - /* Define to 1 if you have the header file. */ #define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 @@ -104,24 +62,6 @@ /* Define to 1 if you have the `isnan' function. */ #define HAVE_ISNAN 1 -/* Define to 1 if you have the `isnormal' function. */ -/* #undef HAVE_ISNORMAL */ - -/* Define to 1 if you have the `m' library (-lm). */ -#define HAVE_LIBM 1 - -/* Define to 1 if you have the `posix4' library (-lposix4). */ -/* #undef HAVE_LIBPOSIX4 */ - -/* Define to 1 if you have the `pthread' library (-lpthread). */ -#define HAVE_LIBPTHREAD 1 - -/* Define to 1 if you have the `PTL' library (-lPTL). */ -/* #undef HAVE_LIBPTL */ - -/* Define to 1 if you have the `rt' library (-lrt). */ -/* #undef HAVE_LIBRT */ - /* Define if there is a linker script to relocate the executable above 0x70000000. */ /* #undef HAVE_LINKER_SCRIPT */ @@ -132,9 +72,6 @@ /* Define if your system supports Mach exceptions. */ #define HAVE_MACH_EXCEPTIONS 1 -/* Define to 1 if you have the header file. */ -#define HAVE_MACH_MACH_H 1 - /* Define to 1 if you have the `mach_task_self' function. */ #define HAVE_MACH_TASK_SELF 1 @@ -142,12 +79,6 @@ */ #define HAVE_MACH_VM 1 -/* Define to 1 if you have the header file. */ -#define HAVE_MEMORY_H 1 - -/* Define to 1 if you have the `mmap' function. */ -#define HAVE_MMAP 1 - /* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. */ /* #undef HAVE_MMAP_ANON */ @@ -159,48 +90,12 @@ /* Define if your system has a working mmap()-based memory allocator. */ /* #undef HAVE_MMAP_VM */ -/* Define to 1 if you have the `mprotect' function. */ -#define HAVE_MPROTECT 1 - -/* Define to 1 if you have the `munmap' function. */ -#define HAVE_MUNMAP 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NAN_H */ - -/* Define to 1 if you have the `poll' function. */ -#define HAVE_POLL 1 - /* Define if pthreads are available. */ #define HAVE_PTHREADS 1 -/* Define to 1 if you have the `pthread_cancel' function. */ -#define HAVE_PTHREAD_CANCEL 1 - /* Define to 1 if you have the `pthread_cond_init' function. */ #define HAVE_PTHREAD_COND_INIT 1 -/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 - -/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 - -/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ -#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 - -/* Define to 1 if you have the `pthread_testcancel' function. */ -#define HAVE_PTHREAD_TESTCANCEL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_READLINE_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_READLINE_HISTORY_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_READLINE_READLINE_H 1 - /* Define to 1 if you have the `sem_init' function. */ #define HAVE_SEM_INIT 1 @@ -213,73 +108,19 @@ /* Define if your system supports extended signals. */ /* #undef HAVE_SIGINFO_T */ -/* Define to 1 if you have the `signal' function. */ -#define HAVE_SIGNAL 1 - -/* Define to 1 if you have the `signbit' function. */ -/* #undef HAVE_SIGNBIT */ - /* Define if we can ignore the fault (instruction skipping in SIGSEGV handler). */ #define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDLIB_H 1 - /* Define to 1 if you have the `strdup' function. */ #define HAVE_STRDUP 1 -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STRINGS_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STRING_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STROPTS_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_BITYPES_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_FILIO_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_IOCTL_H 1 - /* Define to 1 if you have the header file. */ #define HAVE_SYS_MMAN_H 1 -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_POLL_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SELECT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_SOCKET_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_SYS_STROPTS_H */ - /* Define to 1 if you have the header file. */ #define HAVE_SYS_TIME_H 1 -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TYPES_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_WAIT_H 1 - /* Define to 1 if you have the `task_self' function. */ /* #undef HAVE_TASK_SELF */ @@ -289,18 +130,6 @@ /* Define to 1 if you have the header file. */ #define HAVE_UNISTD_H 1 -/* Define to 1 if you have the `vm_allocate' function. */ -#define HAVE_VM_ALLOCATE 1 - -/* Define to 1 if you have the `vm_deallocate' function. */ -#define HAVE_VM_DEALLOCATE 1 - -/* Define to 1 if you have the `vm_protect' function. */ -#define HAVE_VM_PROTECT 1 - -/* Define to 1 if your C compiler doesn't accept -c and -o together. */ -/* #undef NO_MINUS_C_MINUS_O */ - /* Define this program name. */ #define PACKAGE "Basilisk II" @@ -322,10 +151,6 @@ /* Define to the version of this package. */ #define PACKAGE_VERSION "1.0" -/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this - system. */ -/* #undef PAGEZERO_HACK */ - /* Define as the return type of signal handlers (`int' or `void'). */ #define RETSIGTYPE void @@ -341,36 +166,15 @@ /* The size of `float', as computed by sizeof. */ #define SIZEOF_FLOAT 4 -/* The size of `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of `long', as computed by sizeof. */ -#define SIZEOF_LONG 8 - /* The size of `long double', as computed by sizeof. */ #define SIZEOF_LONG_DOUBLE 16 -/* The size of `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - /* The size of `void *', as computed by sizeof. */ #define SIZEOF_VOID_P 8 -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - /* Define to 1 if you can safely include both and . */ #define TIME_WITH_SYS_TIME 1 -/* Define to 1 if your declares `struct tm'. */ -/* #undef TM_IN_SYS_TIME */ - -/* Define if BSD-style non-blocking I/O is to be used */ -/* #undef USE_FIONBIO */ - /* Define to enble SDL support */ #define USE_SDL 1 @@ -380,28 +184,6 @@ /* Define to enable SDL video graphics support */ #define USE_SDL_VIDEO 1 -/* Enable extensions on AIX 3, Interix. */ -#ifndef _ALL_SOURCE -# define _ALL_SOURCE 1 -#endif -/* Enable GNU extensions on systems that have them. */ -#ifndef _GNU_SOURCE -# define _GNU_SOURCE 1 -#endif -/* Enable threading extensions on Solaris. */ -#ifndef _POSIX_PTHREAD_SEMANTICS -# define _POSIX_PTHREAD_SEMANTICS 1 -#endif -/* Enable extensions on HP NonStop. */ -#ifndef _TANDEM_SOURCE -# define _TANDEM_SOURCE 1 -#endif -/* Enable general extensions on Solaris. */ -#ifndef __EXTENSIONS__ -# define __EXTENSIONS__ 1 -#endif - - /* Define this program version. */ #define VERSION "1.0" @@ -422,39 +204,6 @@ # define _DARWIN_USE_64_BIT_INODE 1 #endif -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to 1 if on MINIX. */ -/* #undef _MINIX */ - -/* Define to 2 if the system does not provide POSIX.1 features except with - this defined. */ -/* #undef _POSIX_1_SOURCE */ - -/* Define to 1 if you need to in order for `stat' and other things to work. */ -/* #undef _POSIX_SOURCE */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `long int' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned int' if does not define. */ -/* #undef size_t */ - -/* Define to 'int' if doesn't define. */ -/* #undef socklen_t */ #else #include "config.h" #endif @@ -589,46 +338,6 @@ typedef uae_u32 uaecptr; extern uint64 GetTicks_usec(void); extern void Delay_usec(uint32 usec); -typedef volatile int spinlock_t; - -static const spinlock_t SPIN_LOCK_UNLOCKED = 0; - -#if HAVE_TEST_AND_SET -#define HAVE_SPINLOCKS 1 -static inline void spin_lock(spinlock_t *lock) -{ - while (testandset(lock)); -} - -static inline void spin_unlock(spinlock_t *lock) -{ - *lock = 0; -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return !testandset(lock); -} -#else -static inline void spin_lock(spinlock_t *lock) -{ -} - -static inline void spin_unlock(spinlock_t *lock) -{ -} - -static inline int spin_trylock(spinlock_t *lock) -{ - return 1; -} -#endif - -#ifdef HAVE_PTHREADS -/* Centralized pthread attribute setup */ -void Set_pthread_attr(pthread_attr_t *attr, int priority); -#endif - /* UAE CPU defines */ #if defined(__i386__) || defined(__x86_64__) @@ -711,14 +420,6 @@ static inline uae_u32 do_byteswap_16(uae_u32 v) #endif #define REGPARAM2 - -#if __GNUC__ < 3 -# define __builtin_expect(foo,bar) (foo) -#endif -#define likely(x) __builtin_expect(!!(x), 1) -#define unlikely(x) __builtin_expect(!!(x), 0) -#define ALWAYS_INLINE inline __attribute__((always_inline)) - #define memptr uint32 From 730ca109b7baeb4fd304720c33695b2c4e65c9f4 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 1 Sep 2019 14:51:28 -0500 Subject: [PATCH 288/534] Remove SDL1 support; add SDL2 support from kanjitalk755 repository --- BasiliskII/src/SDL/audio_sdl.cpp | 20 +- .../src/SDL/{video_sdl.cpp => video_sdl2.cpp} | 1411 ++++++++++++++--- BasiliskII/src/Unix/CMakeLists.txt | 8 +- BasiliskII/src/Unix/main_unix.cpp | 4 +- BasiliskII/src/Unix/timer_unix.cpp | 17 +- 5 files changed, 1254 insertions(+), 206 deletions(-) rename BasiliskII/src/SDL/{video_sdl.cpp => video_sdl2.cpp} (51%) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 85ad4c8b4..05edebb1d 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -28,11 +28,13 @@ #include #include +#include #define DEBUG 0 #include "debug.h" + #define MAC_MAX_VOLUME 0x0100 // The currently selected audio parameters (indices in audio_sample_rates[] etc. vectors) @@ -83,6 +85,7 @@ static bool open_sdl_audio(void) } SDL_AudioSpec audio_spec; + memset(&audio_spec, 0, sizeof(audio_spec)); audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; audio_spec.channels = audio_channel_counts[audio_channel_count_index]; @@ -95,9 +98,23 @@ static bool open_sdl_audio(void) fprintf(stderr, "WARNING: Cannot open audio: %s\n", SDL_GetError()); return false; } + +#if SDL_VERSION_ATLEAST(2,0,0) + // HACK: workaround a bug in SDL pre-2.0.6 (reported via https://bugzilla.libsdl.org/show_bug.cgi?id=3710 ) + // whereby SDL does not update audio_spec.size + if (audio_spec.size == 0) { + audio_spec.size = (SDL_AUDIO_BITSIZE(audio_spec.format) / 8) * audio_spec.channels * audio_spec.samples; + } +#endif + +#if SDL_VERSION_ATLEAST(2,0,0) + const char * driver_name = SDL_GetCurrentAudioDriver(); +#else char driver_name[32]; - printf("Using SDL/%s audio output\n", SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1)); + SDL_AudioDriverName(driver_name, sizeof(driver_name) - 1); +#endif + printf("Using SDL/%s audio output\n", driver_name ? driver_name : ""); silence_byte = audio_spec.silence; SDL_PauseAudio(0); @@ -227,7 +244,6 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) // Audio not active, play silence silence: memset(stream, silence_byte, stream_len); } - } diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl2.cpp similarity index 51% rename from BasiliskII/src/SDL/video_sdl.cpp rename to BasiliskII/src/SDL/video_sdl2.cpp index 9158d729b..2618a163d 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1,5 +1,5 @@ /* - * video_sdl.cpp - Video/graphics emulation, SDL specific stuff + * video_sdl2.cpp - Video/graphics emulation, SDL 2.x specific stuff * * Basilisk II (C) 1997-2008 Christian Bauer * @@ -31,7 +31,6 @@ * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) * - Mouse acceleration, there is no API in SDL yet for that - * - Force relative mode in Grab mode even if SDL provides absolute coordinates? * - Gamma tables support is likely to be broken here * - Events processing is bound to the general emulation thread as SDL requires * to PumpEvents() within the same thread as the one that called SetVideoMode(). @@ -43,12 +42,19 @@ #include "sysdeps.h" #include +#if SDL_VERSION_ATLEAST(2,0,0) + #include #include #include #include +#include + +#ifdef WIN32 +#include /* alloca() */ +#endif -#include "cpu_emulation.h" +#include #include "main.h" #include "adb.h" #include "macos_util.h" @@ -67,14 +73,28 @@ using std::vector; static vector VideoModes; // Display types +#ifdef SHEEPSHAVER +enum { + DISPLAY_WINDOW = DIS_WINDOW, // windowed display + DISPLAY_SCREEN = DIS_SCREEN // fullscreen display +}; +extern int display_type; // See enum above +#else enum { DISPLAY_WINDOW, // windowed display DISPLAY_SCREEN // fullscreen display }; static int display_type = DISPLAY_WINDOW; // See enum above +#endif // Constants +#ifdef WIN32 +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#elif __MACOSX__ +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +#endif // Global variables @@ -94,10 +114,15 @@ static volatile bool thread_stop_req = false; static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req #endif +#ifdef ENABLE_VOSF +static bool use_vosf = false; // Flag: VOSF enabled +#else static const bool use_vosf = false; // VOSF not possible +#endif static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on +static bool opt_down = false; // Flag: Opt key pressed +static bool cmd_down = false; // Flag: Cmd key pressed static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread static bool emul_suspended = false; // Flag: Emulator suspended @@ -108,12 +133,20 @@ static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms static int keycode_table[256]; // X keycode -> Mac keycode translation table // SDL variables +SDL_Window * sdl_window = NULL; // Wraps an OS-native window +static SDL_Surface * host_surface = NULL; // Surface in host-OS display format +static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format +static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer +static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) +static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to +static SDL_Rect sdl_update_video_rect = {0,0,0,0}; // Union of all rects to update, when updating sdl_texture +static SDL_mutex * sdl_update_video_mutex = NULL; // Mutex to protect sdl_update_video_rect static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor; // Copy of Mac cursor -static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table +static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor +static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors static bool toggle_fullscreen = false; -static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; +static bool did_add_event_watch = false; static bool mouse_grabbed = false; @@ -139,6 +172,9 @@ static void (*video_refresh)(void); // Prototypes static int redraw_func(void *arg); +static int present_sdl_video(); +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); +static bool is_fullscreen(SDL_Window *); // From sys_unix.cpp extern void SysMountFirstFloppy(void); @@ -148,7 +184,14 @@ extern void SysMountFirstFloppy(void); * SDL surface locking glue */ +#ifdef ENABLE_VOSF +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ + if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ + the_host_buffer = (uint8 *)(SURFACE)->pixels; \ +} while (0) +#else #define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) +#endif #define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ if (SDL_MUSTLOCK(SURFACE)) { \ @@ -189,6 +232,135 @@ static inline void vm_release_framebuffer(void *fb, uint32 size) vm_release(fb, size); } +static inline int get_customized_color_depth(int default_depth) +{ + int display_color_depth = PrefsFindInt32("displaycolordepth"); + + D(bug("Get displaycolordepth %d\n", display_color_depth)); + + if(0 == display_color_depth) + return default_depth; + else{ + switch (display_color_depth) { + case 8: + return VIDEO_DEPTH_8BIT; + case 15: case 16: + return VIDEO_DEPTH_16BIT; + case 24: case 32: + return VIDEO_DEPTH_32BIT; + default: + return default_depth; + } + } +} + +/* + * Windows message handler + */ + +#ifdef WIN32 +#include +static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL + +extern void SysMediaArrived(void); +extern void SysMediaRemoved(void); +extern HWND GetMainWindowHandle(void); + +static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) +{ + switch (msg) { + case WM_DEVICECHANGE: + if (wParam == DBT_DEVICEREMOVECOMPLETE) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaRemoved(); + } + else if (wParam == DBT_DEVICEARRIVAL) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaArrived(); + } + return 0; + + default: + if (sdl_window_proc) + return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); + } + + return DefWindowProc(hwnd, msg, wParam, lParam); +} +#endif + + +/* + * SheepShaver glue + */ + +#ifdef SHEEPSHAVER +// Color depth modes type +typedef int video_depth; + +// 1, 2, 4 and 8 bit depths use a color palette +static inline bool IsDirectMode(VIDEO_MODE const & mode) +{ + return IsDirectMode(mode.viAppleMode); +} + +// Abstract base class representing one (possibly virtual) monitor +// ("monitor" = rectangular display with a contiguous frame buffer) +class monitor_desc { +public: + monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} + virtual ~monitor_desc() {} + + // Get current Mac frame buffer base address + uint32 get_mac_frame_base(void) const {return screen_base;} + + // Set Mac frame buffer base address (called from switch_to_mode()) + void set_mac_frame_base(uint32 base) {screen_base = base;} + + // Get current video mode + const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} + + // Called by the video driver to switch the video mode on this display + // (must call set_mac_frame_base()) + virtual void switch_to_current_mode(void) = 0; + + // Called by the video driver to set the color palette (in indexed modes) + // or the gamma table (in direct modes) + virtual void set_palette(uint8 *pal, int num) = 0; +}; + +// Vector of pointers to available monitor descriptions, filled by VideoInit() +static vector VideoMonitors; + +// Find Apple mode matching best specified dimensions +static int find_apple_resolution(int xsize, int ysize) +{ + if (xsize == 640 && ysize == 480) + return APPLE_640x480; + if (xsize == 800 && ysize == 600) + return APPLE_800x600; + if (xsize == 1024 && ysize == 768) + return APPLE_1024x768; + if (xsize == 1152 && ysize == 768) + return APPLE_1152x768; + if (xsize == 1152 && ysize == 900) + return APPLE_1152x900; + if (xsize == 1280 && ysize == 1024) + return APPLE_1280x1024; + if (xsize == 1600 && ysize == 1200) + return APPLE_1600x1200; + return APPLE_CUSTOM; +} + +// Display error alert +static void ErrorAlert(int error) +{ + ErrorAlert(GetString(error)); +} +#endif + /* * monitor_desc subclass for SDL display @@ -225,26 +397,6 @@ static int palette_size(int mode) } } -// Return bytes per pixel for requested depth -static inline int bytes_per_pixel(int depth) -{ - int bpp; - switch (depth) { - case 8: - bpp = 1; - break; - case 15: case 16: - bpp = 2; - break; - case 24: case 32: - bpp = 4; - break; - default: - abort(); - } - return bpp; -} - // Map video_mode depth ID to numerical depth value static int mac_depth_of_video_depth(int video_depth) { @@ -283,25 +435,15 @@ static int sdl_depth_of_video_depth(int video_depth) // Get screen dimensions static void sdl_display_dimensions(int &width, int &height) { - static int max_width, max_height; - if (max_width == 0 && max_height == 0) { - max_width = 640 ; max_height = 480; - SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); - if (modes && modes != (SDL_Rect **)-1) { - // It turns out that on some implementations, and contrary to the documentation, - // the returned list is not sorted from largest to smallest (e.g. Windows) - for (int i = 0; modes[i] != NULL; i++) { - const int w = modes[i]->w; - const int h = modes[i]->h; - if (w > max_width && h > max_height) { - max_width = w; - max_height = h; - } - } - } + SDL_DisplayMode desktop_mode; + const int display_index = 0; // TODO: try supporting multiple displays + if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { + // TODO: report a warning, here? + width = height = 0; + return; } - width = max_width; - height = max_height; + width = desktop_mode.w; + height = desktop_mode.h; } static inline int sdl_display_width(void) @@ -318,18 +460,15 @@ static inline int sdl_display_height(void) return height; } -// Check wether specified mode is available +// Check whether specified mode is available static bool has_mode(int type, int width, int height, int depth) { - // Filter out out-of-bounds resolutions if (width > sdl_display_width() || height > sdl_display_height()) return false; - // Rely on SDL capabilities - return SDL_VideoModeOK(width, height, - sdl_depth_of_video_depth(depth), - SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; + // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. + return true; } // Add mode to list of supported modes @@ -341,6 +480,10 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt // Fill in VideoMode entry VIDEO_MODE mode; +#ifdef SHEEPSHAVER + resolution_id = find_apple_resolution(width, height); + mode.viType = type; +#endif VIDEO_MODE_X = width; VIDEO_MODE_Y = height; VIDEO_MODE_RESOLUTION = resolution_id; @@ -352,33 +495,107 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt // Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) { +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + int layout = FLAYOUT_DIRECT; + if (depth == VIDEO_DEPTH_16BIT) + layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; + else if (depth == VIDEO_DEPTH_32BIT) + layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; + if (native_byte_order) + MacFrameLayout = layout; + else + MacFrameLayout = FLAYOUT_DIRECT; + monitor.set_mac_frame_base(MacFrameBaseMac); + // Set variables used by UAE memory banking + const VIDEO_MODE &mode = monitor.get_current_mode(); + MacFrameBaseHost = the_buffer; + MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + InitFrameBufferMapping(); +#else monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); - +#endif D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); } // Set window name and class static void set_window_name(int name) { - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - if (vi && vi->wm_available) { - const char *str = GetString(name); - SDL_WM_SetCaption(str, str); + if (!sdl_window) { + return; } + const char *str = GetString(name); + SDL_SetWindowTitle(sdl_window, str); +} + +static void set_window_name_grabbed() { + if (!sdl_window) return; + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + // std::string s = GetString(STR_WINDOW_TITLE_GRABBED0); + // if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); + // if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); + // if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); + // s += GetString(STR_WINDOW_TITLE_GRABBED4); + // SDL_SetWindowTitle(sdl_window, s.c_str()); } // Set mouse grab mode -static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) +static void set_grab_mode(bool grab) { - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); + if (!sdl_window) { + return; + } + SDL_SetWindowGrab(sdl_window, grab ? SDL_TRUE : SDL_FALSE); } // Migrate preferences items (XXX to be handled in MigratePrefs()) static void migrate_screen_prefs(void) { +#ifdef SHEEPSHAVER + // Look-up priorities are: "screen", "screenmodes", "windowmodes". + if (PrefsFindString("screen")) + return; + uint32 window_modes = PrefsFindInt32("windowmodes"); + uint32 screen_modes = PrefsFindInt32("screenmodes"); + int width = 0, height = 0; + if (screen_modes) { + static const struct { + int id; + int width; + int height; + } + modes[] = { + { 1, 640, 480 }, + { 2, 800, 600 }, + { 4, 1024, 768 }, + { 64, 1152, 768 }, + { 8, 1152, 900 }, + { 16, 1280, 1024 }, + { 32, 1600, 1200 }, + { 0, } + }; + for (int i = 0; modes[i].id != 0; i++) { + if (screen_modes & modes[i].id) { + if (width < modes[i].width && height < modes[i].height) { + width = modes[i].width; + height = modes[i].height; + } + } + } + } else { + if (window_modes & 1) + width = 640, height = 480; + if (window_modes & 2) + width = 800, height = 600; + } + if (width && height) { + char str[32]; + sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); + PrefsReplaceString("screen", str); + } +#endif } @@ -415,10 +632,17 @@ class driver_base { SDL_Surface *s; // The surface we draw into }; +#ifdef ENABLE_VOSF +static void update_display_window_vosf(driver_base *drv); +#endif static void update_display_static(driver_base *drv); static driver_base *drv = NULL; // Pointer to currently used driver object +#ifdef ENABLE_VOSF +# include "video_vosf.h" +#endif + driver_base::driver_base(SDL_monitor_desc &m) : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) { @@ -426,19 +650,365 @@ driver_base::driver_base(SDL_monitor_desc &m) the_buffer_copy = NULL; } +static void delete_sdl_video_surfaces() +{ + if (sdl_texture) { + SDL_DestroyTexture(sdl_texture); + sdl_texture = NULL; + } + + if (host_surface) { + if (host_surface == guest_surface) { + guest_surface = NULL; + } + + SDL_FreeSurface(host_surface); + host_surface = NULL; + } + + if (guest_surface) { + SDL_FreeSurface(guest_surface); + guest_surface = NULL; + } +} + +static void delete_sdl_video_window() +{ + if (sdl_renderer) { + SDL_DestroyRenderer(sdl_renderer); + sdl_renderer = NULL; + } + + if (sdl_window) { + SDL_DestroyWindow(sdl_window); + sdl_window = NULL; + } +} + +static void shutdown_sdl_video() +{ + delete_sdl_video_surfaces(); + delete_sdl_video_window(); +} + +static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) +{ + if (guest_surface) { + delete_sdl_video_surfaces(); + } + + int window_width = width; + int window_height = height; + Uint32 window_flags = SDL_WINDOW_ALLOW_HIGHDPI; + const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; + + if (flags & SDL_WINDOW_FULLSCREEN) { + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { + shutdown_sdl_video(); + return NULL; + } +#ifdef __MACOSX__ + window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; +#else + window_flags |= SDL_WINDOW_FULLSCREEN; +#endif + window_width = desktop_mode.w; + window_height = desktop_mode.h; + } + + if (sdl_window) { + int old_window_width, old_window_height, old_window_flags; + SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); + old_window_flags = SDL_GetWindowFlags(sdl_window); + if (old_window_width != window_width || + old_window_height != window_height || + (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) + { + delete_sdl_video_window(); + } + } + + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); + +/* + // Always use a resize-able window. This helps allow SDL to manage + // transitions involving fullscreen to or from windowed-mode. + window_flags |= SDL_WINDOW_RESIZABLE; +*/ + if (!sdl_window) { + sdl_window = SDL_CreateWindow( + "Basilisk II", + SDL_WINDOWPOS_UNDEFINED, + SDL_WINDOWPOS_UNDEFINED, + window_width, + window_height, + window_flags); + if (!sdl_window) { + shutdown_sdl_video(); + return NULL; + } + } + if (flags & SDL_WINDOW_FULLSCREEN) SDL_SetWindowGrab(sdl_window, SDL_TRUE); + + // Some SDL events (regarding some native-window events), need processing + // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which + // allows events to be processed as they are generated. + if (!did_add_event_watch) { + SDL_AddEventWatch(&on_sdl_event_generated, NULL); + did_add_event_watch = true; + } + + if (!sdl_renderer) { +#ifdef WIN32 + SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); +#else + SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); +#endif + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); + if (!sdl_renderer) { + shutdown_sdl_video(); + return NULL; + } + sdl_renderer_thread_id = SDL_ThreadID(); + + SDL_RendererInfo info; + memset(&info, 0, sizeof(info)); + SDL_GetRendererInfo(sdl_renderer, &info); + printf("Using SDL_Renderer driver: %s\n", (info.name ? info.name : "(null)")); + } + + if (!sdl_update_video_mutex) { + sdl_update_video_mutex = SDL_CreateMutex(); + } + + SDL_assert(sdl_texture == NULL); + sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STREAMING, width, height); + if (!sdl_texture) { + shutdown_sdl_video(); + return NULL; + } + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; + + SDL_assert(guest_surface == NULL); + SDL_assert(host_surface == NULL); + switch (bpp) { + case 8: + guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); + break; + case 16: + guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); + break; + case 32: + guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + host_surface = guest_surface; + break; + default: + printf("WARNING: An unsupported bpp of %d was used\n", bpp); + break; + } + if (!guest_surface) { + shutdown_sdl_video(); + return NULL; + } + + if (!host_surface) { + Uint32 texture_format; + if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { + printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + int bpp; + Uint32 Rmask, Gmask, Bmask, Amask; + if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { + printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); + if (!host_surface) { + printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + } + + if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { + printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", + width, height, SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + SDL_RenderSetIntegerScale(sdl_renderer, PrefsFindBool("scale_integer") ? SDL_TRUE : SDL_FALSE); + + return guest_surface; +} + +static int present_sdl_video() +{ + if (SDL_RectEmpty(&sdl_update_video_rect)) return 0; + + if (!sdl_renderer || !sdl_texture || !guest_surface) { + printf("WARNING: A video mode does not appear to have been set.\n"); + return -1; + } + + // Some systems, such as D3D9, can fail if and when they are used across + // certain operations. To address this, only utilize SDL_Renderer in a + // single thread, preferably the main thread. + // + // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 + // "BasiliskII, Win32: resizing a window does not stretch " + SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); + + // Make sure the display's internal (to SDL, possibly the OS) buffer gets + // cleared. Not doing so can, if and when letterboxing is applied (whereby + // colored bars are drawn on the screen's sides to help with aspect-ratio + // correction), the colored bars can be an unknown color. + SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black + SDL_RenderClear(sdl_renderer); // Clear the display + + // We're about to work with sdl_update_video_rect, so stop other threads from + // modifying it! + LOCK_PALETTE; + SDL_LockMutex(sdl_update_video_mutex); + // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. + if (host_surface != guest_surface && + host_surface != NULL && + guest_surface != NULL) + { + SDL_Rect destRect = sdl_update_video_rect; + int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); + if (result != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); + UNLOCK_PALETTE; + return -1; + } + } + UNLOCK_PALETTE; // passed potential deadlock, can unlock palette + + // Update the host OS' texture + void * srcPixels = (void *)((uint8_t *)host_surface->pixels + + sdl_update_video_rect.y * host_surface->pitch + + sdl_update_video_rect.x * host_surface->format->BytesPerPixel); + + if (SDL_UpdateTexture(sdl_texture, &sdl_update_video_rect, srcPixels, host_surface->pitch) != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); + return -1; + } + + // We are done working with pixels in host_surface. Reset sdl_update_video_rect, then let + // other threads modify it, as-needed. + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; + SDL_UnlockMutex(sdl_update_video_mutex); + + // Copy the texture to the display + if (SDL_RenderCopy(sdl_renderer, sdl_texture, NULL, NULL) != 0) { + return -1; + } + + // Update the display + SDL_RenderPresent(sdl_renderer); + + // Indicate success to the caller! + return 0; +} + +void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) +{ + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + + SDL_LockMutex(sdl_update_video_mutex); + for (int i = 0; i < numrects; ++i) { + SDL_UnionRect(&sdl_update_video_rect, &rects[i], &sdl_update_video_rect); + } + SDL_UnlockMutex(sdl_update_video_mutex); +} + +void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) +{ + SDL_Rect temp = {x, y, w, h}; + update_sdl_video(s, 1, &temp); +} + +#ifdef SHEEPSHAVER +static void MagBits(Uint8 *dst, Uint8 *src, int mag) { + for (int y = 0; y < 16; y++) + for (int x = 0; x < 16; x++) { + int sa = 16 * y + x; + if (!(src[sa >> 3] & 0x80 >> (sa & 7))) continue; + for (int dy = 0; dy < mag; dy++) + for (int dx = 0; dx < mag; dx++) { + int da = 16 * mag * (mag * y + dy) + mag * x + dx; + dst[da >> 3] |= 0x80 >> (da & 7); + } + } +} +static SDL_Cursor *MagCursor(bool hot) { + int w, h; + SDL_GetWindowSize(sdl_window, &w, &h); + int mag = std::min(w / drv->VIDEO_MODE_X, h / drv->VIDEO_MODE_Y); + Uint8 *data = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + MagBits(data, &MacCursor[4], mag); + MagBits(mask, &MacCursor[36], mag); + SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] * mag : 0, hot ? MacCursor[3] * mag : 0); + SDL_free(data); + SDL_free(mask); + return cursor; +} +#endif + void driver_base::set_video_mode(int flags) { int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, - SDL_HWSURFACE | flags)) == NULL) + if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) return; +#ifdef ENABLE_VOSF + the_host_buffer = (uint8 *)s->pixels; +#endif } void driver_base::init() { - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); int aligned_height = (VIDEO_MODE_Y + 15) & ~15; +#ifdef ENABLE_VOSF + use_vosf = true; + // Allocate memory for frame buffer (SIZE is extended to page-boundary) + the_buffer_size = page_extend((aligned_height + 2) * s->pitch); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + the_buffer_copy = (uint8 *)malloc(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + + // Check whether we can initialize the VOSF subsystem and it's profitable + if (!video_vosf_init(monitor)) { + WarningAlert(GetString(STR_VOSF_INIT_ERR)); + use_vosf = false; + } + else if (!video_vosf_profitable()) { + video_vosf_exit(); + printf("VOSF acceleration is not profitable on this platform, disabling it\n"); + use_vosf = false; + } + if (!use_vosf) { + free(the_buffer_copy); + vm_release(the_buffer, the_buffer_size); + the_host_buffer = NULL; + } +#endif if (!use_vosf) { // Allocate memory for frame buffer the_buffer_size = (aligned_height + 2) * s->pitch; @@ -454,7 +1024,7 @@ void driver_base::init() } void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(false); + ADBSetRelMouseMode(mouse_grabbed); // Init blitting routines SDL_PixelFormat *f = s->format; @@ -472,11 +1042,30 @@ void driver_base::adapt_to_video_mode() { bool hardware_cursor = false; +#ifdef SHEEPSHAVER + hardware_cursor = video_can_change_cursor(); + if (hardware_cursor) { + // Create cursor + if ((sdl_cursor = MagCursor(false)) != NULL) { + SDL_SetCursor(sdl_cursor); + } + } + // Tell the video driver there's a change in cursor type + if (private_data) + private_data->cursorHardware = hardware_cursor; +#endif + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); + // Hide cursor SDL_ShowCursor(hardware_cursor); // Set window name/class - set_window_name(STR_WINDOW_TITLE); + mouse_grabbed ? set_window_name_grabbed() : set_window_name((int)STR_WINDOW_TITLE); // Everything went well init_ok = true; @@ -487,8 +1076,14 @@ driver_base::~driver_base() ungrab_mouse(); restore_mouse_accel(); - if (s) - SDL_FreeSurface(s); + // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather + // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby + // OSX hosts, when in fullscreen, will, on a guest OS resolution change, + // do a series of switches (using OSX's "Spaces" feature) to and from + // the Basilisk II desktop, + delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture + //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to + // instances of SDL_Surface and SDL_Texture. // the_buffer shall always be mapped through vm_acquire_framebuffer() if (the_buffer != VM_MAP_FAILED) { @@ -504,6 +1099,18 @@ driver_base::~driver_base() the_buffer_copy = NULL; } } +#ifdef ENABLE_VOSF + else { + if (the_buffer_copy) { + D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); + free(the_buffer_copy); + the_buffer_copy = NULL; + } + + // Deinitialize VOSF + video_vosf_exit(); + } +#endif SDL_ShowCursor(1); } @@ -513,8 +1120,15 @@ void driver_base::update_palette(void) { const VIDEO_MODE &mode = monitor.get_current_mode(); - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) - SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { + SDL_SetSurfacePalette(s, sdl_palette); + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); + } } // Disable mouse acceleration @@ -536,16 +1150,24 @@ void driver_base::toggle_mouse_grab(void) grab_mouse(); } +static void update_mouse_grab() +{ + if (mouse_grabbed) { + SDL_SetRelativeMouseMode(SDL_TRUE); + } else { + SDL_SetRelativeMouseMode(SDL_FALSE); + } +} + // Grab mouse, switch to relative mouse mode void driver_base::grab_mouse(void) { if (!mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); - if (new_mode == SDL_GRAB_ON) { - set_window_name(STR_WINDOW_TITLE_GRABBED); - disable_mouse_accel(); - mouse_grabbed = true; - } + mouse_grabbed = true; + update_mouse_grab(); + set_window_name_grabbed(); + disable_mouse_accel(); + ADBSetRelMouseMode(true); } } @@ -553,12 +1175,11 @@ void driver_base::grab_mouse(void) void driver_base::ungrab_mouse(void) { if (mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); - if (new_mode == SDL_GRAB_OFF) { - set_window_name(STR_WINDOW_TITLE); - restore_mouse_accel(); - mouse_grabbed = false; - } + mouse_grabbed = false; + update_mouse_grab(); + set_window_name(STR_WINDOW_TITLE); + restore_mouse_accel(); + ADBSetRelMouseMode(false); } } @@ -589,8 +1210,7 @@ static void keycode_init(void) keycode_table[i] = -1; // Search for server vendor string, then read keycodes - char video_driver[256]; - SDL_VideoDriverName(video_driver, sizeof(video_driver)); + const char * video_driver = SDL_GetCurrentVideoDriver(); bool video_driver_found = false; char line[256]; int n_keys = 0; @@ -623,7 +1243,7 @@ static void keycode_init(void) static const char sdl_str[] = "sdl"; if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { char *p = line + sizeof(sdl_str); - if (strstr(video_driver, p) == video_driver) + if (video_driver && strstr(video_driver, p) == video_driver) video_driver_found = true; } } @@ -636,12 +1256,12 @@ static void keycode_init(void) // Vendor not found? Then display warning if (!video_driver_found) { char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); WarningAlert(str); return; } - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); } } @@ -666,6 +1286,13 @@ bool SDL_monitor_desc::video_open(void) return false; } +#ifdef WIN32 + // Chain in a new message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); +#endif + // Initialize VideoRefresh function VideoRefreshInit(); @@ -675,7 +1302,7 @@ bool SDL_monitor_desc::video_open(void) // Start redraw/input thread #ifndef USE_CPU_EMUL_SERVICES redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); if (!redraw_thread_active) { printf("FATAL: cannot create redraw thread\n"); return false; @@ -686,10 +1313,22 @@ bool SDL_monitor_desc::video_open(void) return true; } +#ifdef SHEEPSHAVER +bool VideoInit(void) +{ + const bool classic = false; +#else bool VideoInit(bool classic) { +#endif classic_mode = classic; +#ifdef ENABLE_VOSF + // Zero the mainBuffer structure + mainBuffer.dirtyPages = NULL; + mainBuffer.pageInfo = NULL; +#endif + // Create Mutexes if ((sdl_events_lock = SDL_CreateMutex()) == NULL) return false; @@ -741,7 +1380,11 @@ bool VideoInit(bool classic) default_height = sdl_display_height(); // Mac screen depth follows X depth - screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; + screen_depth = 32; + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { + screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); + } int default_depth; switch (screen_depth) { case 8: @@ -764,6 +1407,19 @@ bool VideoInit(bool classic) int h; int resolution_id; } +#ifdef SHEEPSHAVER + // Omit Classic resolutions + video_modes[] = { + { -1, -1, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#else video_modes[] = { { -1, -1, 0x80 }, { 512, 384, 0x80 }, @@ -775,6 +1431,7 @@ bool VideoInit(bool classic) { 1600, 1200, 0x86 }, { 0, } }; +#endif video_modes[0].w = default_width; video_modes[0].h = default_height; @@ -798,8 +1455,6 @@ bool VideoInit(bool classic) const int h = video_modes[i].h; if (i > 0 && (w >= default_width || h >= default_height)) continue; - if (w == 512 && h == 384) - continue; for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); } @@ -817,6 +1472,10 @@ bool VideoInit(bool classic) const VIDEO_MODE & mode = (*i); if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + std::vector::const_iterator begin = VideoModes.begin(); + cur_mode = distance(begin, i); +#endif break; } } @@ -824,8 +1483,22 @@ bool VideoInit(bool classic) const VIDEO_MODE & mode = VideoModes[0]; default_depth = VIDEO_MODE_DEPTH; default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + cur_mode = 0; +#endif } +#ifdef SHEEPSHAVER + for (int i = 0; i < VideoModes.size(); i++) + VModes[i] = VideoModes[i]; + VideoInfo *p = &VModes[VideoModes.size()]; + p->viType = DIS_INVALID; // End marker + p->viRowBytes = 0; + p->viXsize = p->viYsize = 0; + p->viAppleMode = 0; + p->viAppleID = 0; +#endif + #if DEBUG D(bug("Available video modes:\n")); for (i = VideoModes.begin(); i != end; ++i) { @@ -839,8 +1512,12 @@ bool VideoInit(bool classic) } #endif + int color_depth = get_customized_color_depth(default_depth); + + D(bug("Return get_customized_color_depth %d\n", color_depth)); + // Create SDL_monitor_desc for this (the only) display - SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)default_depth, default_id); + SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); VideoMonitors.push_back(monitor); // Open display @@ -857,6 +1534,12 @@ void SDL_monitor_desc::video_close(void) { D(bug("video_close()\n")); +#ifdef WIN32 + // Remove message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); +#endif + // Stop redraw thread #ifndef USE_CPU_EMUL_SERVICES if (redraw_thread_active) { @@ -911,37 +1594,40 @@ static void do_toggle_fullscreen(void) while (!thread_stop_ack) ; #endif - // save the mouse position - int x, y; - SDL_GetMouseState(&x, &y); - - // save the screen contents - SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, - drv->s->flags); + // Apply fullscreen + if (sdl_window) { + if (display_type == DISPLAY_SCREEN) { + display_type = DISPLAY_WINDOW; + SDL_SetWindowFullscreen(sdl_window, 0); + const VIDEO_MODE &mode = drv->mode; + SDL_SetWindowSize(sdl_window, VIDEO_MODE_X, VIDEO_MODE_Y); + SDL_SetWindowGrab(sdl_window, SDL_FALSE); + } else { + display_type = DISPLAY_SCREEN; +#ifdef __MACOSX__ + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); +#else + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN); +#endif + SDL_SetWindowGrab(sdl_window, SDL_TRUE); + } + } // switch modes - display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW - : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); drv->adapt_to_video_mode(); // reset the palette +#ifdef SHEEPSHAVER + video_set_palette(); +#endif drv->update_palette(); - // restore the screen contents - SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); - SDL_FreeSurface(tmp_surface); - SDL_UpdateRect(drv->s, 0, 0, 0, 0); - // reset the video refresh handler VideoRefreshInit(); // while SetVideoMode is happening, control key up may be missed ADBKeyUp(0x36); - - // restore the mouse position - SDL_WarpMouse(x, y); - + // resume redraw thread toggle_fullscreen = false; #ifndef USE_CPU_EMUL_SERVICES @@ -957,6 +1643,48 @@ static void do_toggle_fullscreen(void) * Execute video VBL routine */ +static bool is_fullscreen(SDL_Window * window) +{ +// #ifdef __MACOSX__ +// // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always +// // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. +// // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which +// // involves fullscreen/windowed toggles via window-manager UI controls). +// // Until it does, or adds a facility to do so, we'll use a platform-specific +// // code path to detect fullscreen changes. +// extern bool is_fullscreen_osx(SDL_Window * window); +// return is_fullscreen_osx(sdl_window); +// #else + if (!window) { + return false; + } + const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); + return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; +// #endif +} + +#ifdef SHEEPSHAVER +void VideoVBL(void) +{ + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + present_sdl_video(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; + + // Execute video VBL + if (private_data != NULL && private_data->interruptsEnabled) + VSLDoInterruptService(private_data->vslServiceID); +} +#else void VideoInterrupt(void) { // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() @@ -969,17 +1697,35 @@ void VideoInterrupt(void) if (toggle_fullscreen) do_toggle_fullscreen(); + present_sdl_video(); + // Temporarily give up frame buffer lock (this is the point where // we are suspended when the user presses Ctrl-Tab) UNLOCK_FRAME_BUFFER; LOCK_FRAME_BUFFER; } +#endif /* * Set palette */ +#ifdef SHEEPSHAVER +void video_set_palette(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 pal[256 * 3]; + for (int c = 0; c < n_colors; c++) { + pal[c*3 + 0] = mac_pal[c].red; + pal[c*3 + 1] = mac_pal[c].green; + pal[c*3 + 2] = mac_pal[c].blue; + } + monitor->set_palette(pal, n_colors); +} +#endif + void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) { const VIDEO_MODE &mode = get_current_mode(); @@ -993,7 +1739,12 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) // Convert colors to XColor array int num_out = 256; bool stretch = false; - SDL_Color *p = sdl_palette; + + if (!sdl_palette) { + sdl_palette = SDL_AllocPalette(num_out); + } + + SDL_Color *p = sdl_palette->colors; for (int i=0; ir = pal[c*3 + 0] * 0x0101; @@ -1009,6 +1760,15 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); } +#ifdef ENABLE_VOSF + if (use_vosf) { + // We have to redraw everything because the interpretation of pixel values changed + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + } +#endif } // Tell redraw thread to change palette @@ -1022,6 +1782,46 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) * Switch video mode */ +#ifdef SHEEPSHAVER +int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) +{ + /* return if no mode change */ + if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && + (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; + + /* first find video mode in table */ + for (int i=0; VModes[i].viType != DIS_INVALID; i++) { + if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && + (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { + csSave->saveMode = ReadMacInt16(ParamPtr + csMode); + csSave->saveData = ReadMacInt32(ParamPtr + csData); + csSave->savePage = ReadMacInt16(ParamPtr + csPage); + + // Disable interrupts and pause redraw thread + DisableInterrupt(); + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; + + cur_mode = i; + monitor_desc *monitor = VideoMonitors[0]; + monitor->switch_to_current_mode(); + + WriteMacInt32(ParamPtr + csBaseAddr, screen_base); + csSave->saveBaseAddr=screen_base; + csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ + csSave->saveMode=VModes[cur_mode].viAppleMode; + + // Enable interrupts and resume redraw thread + thread_stop_req = false; + EnableInterrupt(); + return noErr; + } + } + return paramErr; +} +#endif + void SDL_monitor_desc::switch_to_current_mode(void) { // Close and reopen display @@ -1036,6 +1836,59 @@ void SDL_monitor_desc::switch_to_current_mode(void) } } + +/* + * Can we set the MacOS cursor image into the window? + */ + +#ifdef SHEEPSHAVER +bool video_can_change_cursor(void) +{ + return PrefsFindBool("hardcursor") && (display_type == DISPLAY_WINDOW || PrefsFindBool("scale_integer")); +} +#endif + + +/* + * Set cursor image for window + */ + +#ifdef SHEEPSHAVER +void video_set_cursor(void) +{ + // Set new cursor image if it was changed + if (sdl_cursor) { + SDL_FreeCursor(sdl_cursor); + sdl_cursor = MagCursor(true); + if (sdl_cursor) { + SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); + SDL_SetCursor(sdl_cursor); + + // XXX Windows apparently needs an extra mouse event to + // make the new cursor image visible. + // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the + // mouse, we have to put it back. + bool move = false; +#ifdef WIN32 + move = true; +#elif defined(__APPLE__) + move = mouse_grabbed; +#endif + if (move) { + int visible = SDL_ShowCursor(-1); + if (visible) { + int x, y; + SDL_GetMouseState(&x, &y); + printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); + SDL_WarpMouseGlobal(x, y); + } + } + } + } +} +#endif + + /* * Keyboard-related utilify functions */ @@ -1043,29 +1896,31 @@ void SDL_monitor_desc::switch_to_current_mode(void) static bool is_modifier_key(SDL_KeyboardEvent const & e) { switch (e.keysym.sym) { - case SDLK_NUMLOCK: + case SDLK_NUMLOCKCLEAR: case SDLK_CAPSLOCK: - case SDLK_SCROLLOCK: + case SDLK_SCROLLLOCK: case SDLK_RSHIFT: case SDLK_LSHIFT: case SDLK_RCTRL: case SDLK_LCTRL: case SDLK_RALT: case SDLK_LALT: - case SDLK_RMETA: - case SDLK_LMETA: - case SDLK_LSUPER: - case SDLK_RSUPER: + case SDLK_RGUI: + case SDLK_LGUI: case SDLK_MODE: - case SDLK_COMPOSE: + case SDLK_APPLICATION: return true; } return false; } -static bool is_ctrl_down(SDL_keysym const & ks) +static bool is_hotkey_down(SDL_Keysym const & ks) { - return ctrl_down || (ks.mod & KMOD_CTRL); + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + return (ctrl_down || (ks.mod & KMOD_CTRL) || !(hotkey & 1)) && + (opt_down || (ks.mod & KMOD_ALT) || !(hotkey & 2)) && + (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); } @@ -1074,7 +1929,7 @@ static bool is_ctrl_down(SDL_keysym const & ks) * and -2 if the key was recognized as a hotkey */ -static int kc_decode(SDL_keysym const & ks, bool key_down) +static int kc_decode(SDL_Keysym const & ks, bool key_down) { switch (ks.sym) { case SDLK_a: return 0x00; @@ -1115,7 +1970,7 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) case SDLK_9: return 0x19; case SDLK_0: return 0x1d; - case SDLK_BACKQUOTE: return 0x0a; + case SDLK_BACKQUOTE: case 167: return 0x32; case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; case SDLK_EQUALS: case SDLK_PLUS: return 0x18; case SDLK_LEFTBRACKET: return 0x21; @@ -1127,8 +1982,8 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; + case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; case SDLK_SPACE: return 0x31; case SDLK_BACKSPACE: return 0x33; @@ -1143,35 +1998,33 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) case SDLK_RCTRL: return 0x36; case SDLK_LSHIFT: return 0x38; case SDLK_RSHIFT: return 0x38; -#if (defined(__APPLE__) && defined(__MACH__)) +#ifdef __APPLE__ case SDLK_LALT: return 0x3a; case SDLK_RALT: return 0x3a; - case SDLK_LMETA: return 0x37; - case SDLK_RMETA: return 0x37; + case SDLK_LGUI: return 0x37; + case SDLK_RGUI: return 0x37; #else case SDLK_LALT: return 0x37; case SDLK_RALT: return 0x37; - case SDLK_LMETA: return 0x3a; - case SDLK_RMETA: return 0x3a; + case SDLK_LGUI: return 0x3a; + case SDLK_RGUI: return 0x3a; #endif - case SDLK_LSUPER: return 0x3a; // "Windows" key - case SDLK_RSUPER: return 0x3a; case SDLK_MENU: return 0x32; case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCK: return 0x47; + case SDLK_NUMLOCKCLEAR: return 0x47; case SDLK_UP: return 0x3e; case SDLK_DOWN: return 0x3d; case SDLK_LEFT: return 0x3b; case SDLK_RIGHT: return 0x3c; - case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; case SDLK_F2: return 0x78; case SDLK_F3: return 0x63; case SDLK_F4: return 0x76; - case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; + case SDLK_F5: return 0x60; case SDLK_F6: return 0x61; case SDLK_F7: return 0x62; case SDLK_F8: return 0x64; @@ -1180,20 +2033,20 @@ static int kc_decode(SDL_keysym const & ks, bool key_down) case SDLK_F11: return 0x67; case SDLK_F12: return 0x6f; - case SDLK_PRINT: return 0x69; - case SDLK_SCROLLOCK: return 0x6b; + case SDLK_PRINTSCREEN: return 0x69; + case SDLK_SCROLLLOCK: return 0x6b; case SDLK_PAUSE: return 0x71; - case SDLK_KP0: return 0x52; - case SDLK_KP1: return 0x53; - case SDLK_KP2: return 0x54; - case SDLK_KP3: return 0x55; - case SDLK_KP4: return 0x56; - case SDLK_KP5: return 0x57; - case SDLK_KP6: return 0x58; - case SDLK_KP7: return 0x59; - case SDLK_KP8: return 0x5b; - case SDLK_KP9: return 0x5c; + case SDLK_KP_0: return 0x52; + case SDLK_KP_1: return 0x53; + case SDLK_KP_2: return 0x54; + case SDLK_KP_3: return 0x55; + case SDLK_KP_4: return 0x56; + case SDLK_KP_5: return 0x57; + case SDLK_KP_6: return 0x58; + case SDLK_KP_7: return 0x59; + case SDLK_KP_8: return 0x5b; + case SDLK_KP_9: return 0x5c; case SDLK_KP_PERIOD: return 0x41; case SDLK_KP_PLUS: return 0x45; case SDLK_KP_MINUS: return 0x4e; @@ -1214,6 +2067,13 @@ static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) static void force_complete_window_refresh() { if (display_type == DISPLAY_WINDOW) { +#ifdef ENABLE_VOSF + if (use_vosf) { // VOSF refresh + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + } +#endif // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; @@ -1226,15 +2086,78 @@ static void force_complete_window_refresh() * SDL event handling */ +// possible return codes for SDL-registered event watches +enum { + EVENT_DROP_FROM_QUEUE = 0, + EVENT_ADD_TO_QUEUE = 1 +}; + +// Some events need to be processed in the host-app's main thread, due to +// host-OS requirements. +// +// This function is called by SDL, whenever it generates an SDL_Event. It has +// the ability to process events, and optionally, to prevent them from being +// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) +{ + switch (event->type) { + case SDL_KEYUP: { + SDL_Keysym const & ks = event->key.keysym; + switch (ks.sym) { + case SDLK_F5: { + if (is_hotkey_down(ks) && !PrefsFindBool("hardcursor")) { + drv->toggle_mouse_grab(); + return EVENT_DROP_FROM_QUEUE; + } + } break; + } + } break; + + case SDL_WINDOWEVENT: { + switch (event->window.event) { + case SDL_WINDOWEVENT_RESIZED: { + // Handle changes of fullscreen. This is done here, in + // on_sdl_event_generated() and not the main SDL_Event-processing + // loop, in order to perform this change on the main thread. + // (Some os'es UI APIs, such as OSX's NSWindow, are not + // thread-safe.) + const bool is_full = is_fullscreen(sdl_window); + const bool adjust_fullscreen = \ + (display_type == DISPLAY_WINDOW && is_full) || + (display_type == DISPLAY_SCREEN && !is_full); + if (adjust_fullscreen) { + do_toggle_fullscreen(); + +// #if __MACOSX__ +// // HACK-FIX: on OSX hosts, make sure that the OSX menu +// // bar does not show up in fullscreen mode, when the +// // cursor is near the top of the screen, lest the +// // guest OS' menu bar be obscured. +// if (is_full) { +// extern void set_menu_bar_visible_osx(bool); +// set_menu_bar_visible_osx(false); +// } +// #endif + } + } break; + } + } break; + } + + return EVENT_ADD_TO_QUEUE; +} + + static void handle_events(void) { SDL_Event events[10]; const int n_max_events = sizeof(events) / sizeof(events[0]); int n_events; - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { for (int i = 0; i < n_events; i++) { - SDL_Event const & event = events[i]; + SDL_Event & event = events[i]; + switch (event.type) { // Mouse button @@ -1246,19 +2169,6 @@ static void handle_events(void) ADBMouseDown(1); else if (button == SDL_BUTTON_MIDDLE) ADBMouseDown(2); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.motion.x, event.motion.y); + if (mouse_grabbed) { + drv->mouse_moved(event.motion.xrel, event.motion.yrel); + } else { + drv->mouse_moved(event.motion.x, event.motion.y); + } break; + case SDL_MOUSEWHEEL: + if (!event.wheel.y) break; + if (!mouse_wheel_mode) { + int key = event.wheel.y < 0 ? 0x79 : 0x74; // Page up/down + ADBKeyDown(key); + ADBKeyUp(key); + } + else { + int key = event.wheel.y < 0 ? 0x3d : 0x3e; // Cursor up/down + for (int i = 0; i < mouse_wheel_lines; i++) { + ADBKeyDown(key); + ADBKeyUp(key); + } + } + break; + // Keyboard case SDL_KEYDOWN: { int code = -1; @@ -1287,18 +2217,24 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else + if (code == 0x39) + (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); + else ADBKeyDown(code); if (code == 0x36) ctrl_down = true; +#ifdef __APPLE__ + if (code == 0x3a) + opt_down = true; + if (code == 0x37) + cmd_down = true; +#else + if (code == 0x37) + opt_down = true; + if (code == 0x3a) + cmd_down = true; +#endif + } else { if (code == 0x31) drv->resume(); // Space wakes us up @@ -1314,39 +2250,47 @@ static void handle_events(void) } else code = event2keycode(event.key, false); if (code >= 0) { - if (code == 0x39) { // Caps Lock released - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else + if (code != 0x39) ADBKeyUp(code); if (code == 0x36) ctrl_down = false; +#ifdef __APPLE__ + if (code == 0x3a) + opt_down = false; + if (code == 0x37) + cmd_down = false; +#else + if (code == 0x37) + opt_down = false; + if (code == 0x3a) + cmd_down = false; +#endif } break; } - - // Hidden parts exposed, force complete refresh of window - case SDL_VIDEOEXPOSE: - force_complete_window_refresh(); + + case SDL_WINDOWEVENT: { + switch (event.window.event) { + // Hidden parts exposed, force complete refresh of window + case SDL_WINDOWEVENT_EXPOSED: + force_complete_window_refresh(); + break; + + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + case SDL_WINDOWEVENT_RESTORED: + force_complete_window_refresh(); + break; + + } break; + } // Window "close" widget clicked case SDL_QUIT: + if (SDL_GetModState() & (KMOD_LALT | KMOD_RALT)) break; ADBKeyDown(0x7f); // Power key ADBKeyUp(0x7f); break; - - // Application activate/deactivate - case SDL_ACTIVEEVENT: - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain && (event.active.state & SDL_APPACTIVE)) - force_complete_window_refresh(); - break; } } } @@ -1386,7 +2330,7 @@ static void update_display_static(driver_base *drv) // Check for first column from left and first column from right that have changed if (high) { - if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { + if ((int)VIDEO_MODE_DEPTH < (int)VIDEO_DEPTH_8BIT) { const int src_bytes_per_row = bytes_per_row; const int dst_bytes_per_row = drv->s->pitch; const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; @@ -1443,7 +2387,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); + update_sdl_video(drv->s, x1, y1, wide, high); } } else { @@ -1499,7 +2443,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); + update_sdl_video(drv->s, x1, y1, wide, high); } } } @@ -1562,7 +2506,7 @@ static void update_display_static_bbox(driver_base *drv) // Refresh display if (nr_boxes) - SDL_UpdateRects(drv->s, nr_boxes, boxes); + update_sdl_video(drv->s, nr_boxes, boxes); } @@ -1615,6 +2559,43 @@ static void video_refresh_dga(void) video_refresh_window_static(); } +#ifdef ENABLE_VOSF +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static void video_refresh_dga_vosf(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_dga_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif + +static void video_refresh_window_vosf(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_window_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif // def ENABLE_VOSF static void video_refresh_window_static(void) { @@ -1642,10 +2623,20 @@ static void VideoRefreshInit(void) { // TODO: set up specialised 8bpp VideoRefresh handlers ? if (display_type == DISPLAY_SCREEN) { - video_refresh = video_refresh_dga; +#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) + if (use_vosf) + video_refresh = video_refresh_dga_vosf; + else +#endif + video_refresh = video_refresh_dga; } else { - video_refresh = video_refresh_window_static; +#ifdef ENABLE_VOSF + if (use_vosf) + video_refresh = video_refresh_window_vosf; + else +#endif + video_refresh = video_refresh_window_static; } } @@ -1710,3 +2701,29 @@ static int redraw_func(void *arg) return 0; } #endif + + +/* + * Record dirty area from NQD + */ + +#ifdef SHEEPSHAVER +void video_set_dirty_area(int x, int y, int w, int h) +{ +#ifdef ENABLE_VOSF + const VIDEO_MODE &mode = drv->mode; + const unsigned screen_width = VIDEO_MODE_X; + const unsigned screen_height = VIDEO_MODE_Y; + const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; + + if (use_vosf) { + vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); + return; + } +#endif + + // XXX handle dirty bounding boxes for non-VOSF modes +} +#endif + +#endif // ends: SDL version check diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index c47046b33..eb217226f 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -2,10 +2,10 @@ cmake_minimum_required(VERSION 3.0.0) project(BasiliskII) -find_package(SDL REQUIRED) +find_package(SDL2 REQUIRED) find_library(COREFOUNDATION_LIBRARY CoreFoundation) find_library(IOKIT_LIBRARY IOKit) -include_directories(../include . ../CrossPlatform ../uae_cpu ${SDL_INCLUDE_DIR} ${CMAKE_CURRENT_BINARY_DIR}) +include_directories(../include . ../CrossPlatform ../uae_cpu ${SDL2_INCLUDE_DIRS} ${CMAKE_CURRENT_BINARY_DIR}) add_executable(build68k ../uae_cpu/build68k.c) @@ -55,7 +55,7 @@ set(BasiliskII_SRCS #SYSSRC #SDL USE_SDL USE_SDL_VIDEO USE_SDL_AUDIO #video src - ../SDL/video_sdl.cpp + ../SDL/video_sdl2.cpp #EXTFSSRC extfs_unix.cpp #Serial src @@ -100,7 +100,7 @@ set_source_files_properties(${BasiliskII_SRCS} # set_property(SOURCE compemu_support.cpp APPEND_STRING PROPERTY COMPILE_FLAGS " -O0 ") -target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL_LIBRARY}) +target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SDL2_LIBRARIES}) # set(CMAKE_POSITION_INDEPENDENT_CODE OFF) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 36814ffa4..fd51fee8b 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -450,7 +450,7 @@ int main(int argc, char **argv) #ifdef USE_SDL // SDL threads available, start 60Hz thread - tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL)) != NULL); + tick_thread_active = ((tick_thread = SDL_CreateThread(tick_func, NULL, NULL)) != NULL); if (!tick_thread_active) { sprintf(str, GetString(STR_TICK_THREAD_ERR), strerror(errno)); ErrorAlert(str); @@ -464,7 +464,7 @@ int main(int argc, char **argv) #ifdef USE_SDL // Start XPRAM watchdog thread memcpy(last_xpram, XPRAM, XPRAM_SIZE); - xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL)) != NULL); + xpram_thread_active = ((xpram_thread = SDL_CreateThread(xpram_func, NULL, NULL)) != NULL); D(bug("XPRAM thread started\n")); #endif diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index f6db115e8..03225ef5f 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -22,6 +22,10 @@ #include "macos_util.h" #include "timer.h" +// #ifdef USE_SDL +// # include +// #endif + #include #define DEBUG 0 @@ -337,10 +341,19 @@ void Delay_usec(uint32 usec) // #endif // #endif +// SDL_mutex *idle_lock; +// SDL_cond *idle_cond; + void idle_wait(void) { //This causes events to not process randomly in JIT so commented out - usleep(10); + // if (!idle_lock) + // idle_lock = SDL_CreateMutex(); + // if (!idle_cond) + // idle_cond = SDL_CreateCond(); + // SDL_LockMutex(idle_lock); + // SDL_CondWait(idle_cond, idle_lock); + // SDL_UnlockMutex(idle_lock); // #ifdef IDLE_USES_COND_WAIT // pthread_mutex_lock(&idle_lock); @@ -373,6 +386,8 @@ void idle_wait(void) void idle_resume(void) { //This causes events to not process randomly in JIT so commented out + // if (idle_cond) + // SDL_CondSignal(idle_cond); // #ifdef IDLE_USES_COND_WAIT // pthread_cond_signal(&idle_cond); // #else From 48a41966fdb21154a166031f7ec1cdf2f05f8b6f Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 1 Sep 2019 16:56:03 -0500 Subject: [PATCH 289/534] Sync with ARAnyM compiler sources --- BasiliskII/src/Unix/main_unix.cpp | 4 +- BasiliskII/src/Unix/timer_unix.cpp | 28 +- .../src/uae_cpu/compiler/codegen_arm.cpp | 161 +- BasiliskII/src/uae_cpu/compiler/codegen_arm.h | 66 +- .../src/uae_cpu/compiler/codegen_x86.cpp | 2361 +------------- BasiliskII/src/uae_cpu/compiler/codegen_x86.h | 50 +- BasiliskII/src/uae_cpu/compiler/compemu.h | 89 +- .../src/uae_cpu/compiler/compemu_fpp.cpp | 2724 ++++++++++------- .../uae_cpu/compiler/compemu_midfunc_arm.cpp | 143 - .../uae_cpu/compiler/compemu_midfunc_arm.h | 2 + .../uae_cpu/compiler/compemu_midfunc_arm2.cpp | 233 -- .../uae_cpu/compiler/compemu_midfunc_x86.cpp | 369 +-- .../uae_cpu/compiler/compemu_midfunc_x86.h | 19 +- .../src/uae_cpu/compiler/compemu_support.cpp | 426 +-- BasiliskII/src/uae_cpu/compiler/gencomp.c | 687 ++--- BasiliskII/src/uae_cpu/compiler/gencomp_arm.c | 110 +- BasiliskII/src/uae_cpu/gencpu.c | 108 +- BasiliskII/src/uae_cpu/m68k.h | 729 ++++- BasiliskII/src/uae_cpu/newcpu.cpp | 10 +- BasiliskII/src/uae_cpu/noflags.h | 4 +- 20 files changed, 3155 insertions(+), 5168 deletions(-) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index fd51fee8b..6d17121fc 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -57,7 +57,7 @@ using std::string; #include "sigsegv.h" #if USE_JIT -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp +extern void (*flush_icache)(void); // from compemu_support.cpp #endif @@ -542,7 +542,7 @@ void FlushCodeCache(void *start, uint32 size) { #if USE_JIT if (UseJIT) - flush_icache_range((uint8 *)start, size); + flush_icache(); #endif } diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index 03225ef5f..6fb8cf3e1 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -22,9 +22,9 @@ #include "macos_util.h" #include "timer.h" -// #ifdef USE_SDL -// # include -// #endif +#ifdef USE_SDL +# include +#endif #include @@ -341,19 +341,19 @@ void Delay_usec(uint32 usec) // #endif // #endif -// SDL_mutex *idle_lock; -// SDL_cond *idle_cond; +SDL_mutex *idle_lock; +SDL_cond *idle_cond; void idle_wait(void) { //This causes events to not process randomly in JIT so commented out - // if (!idle_lock) - // idle_lock = SDL_CreateMutex(); - // if (!idle_cond) - // idle_cond = SDL_CreateCond(); - // SDL_LockMutex(idle_lock); - // SDL_CondWait(idle_cond, idle_lock); - // SDL_UnlockMutex(idle_lock); + if (!idle_lock) + idle_lock = SDL_CreateMutex(); + if (!idle_cond) + idle_cond = SDL_CreateCond(); + SDL_LockMutex(idle_lock); + SDL_CondWait(idle_cond, idle_lock); + SDL_UnlockMutex(idle_lock); // #ifdef IDLE_USES_COND_WAIT // pthread_mutex_lock(&idle_lock); @@ -386,8 +386,8 @@ void idle_wait(void) void idle_resume(void) { //This causes events to not process randomly in JIT so commented out - // if (idle_cond) - // SDL_CondSignal(idle_cond); + if (idle_cond) + SDL_CondSignal(idle_cond); // #ifdef IDLE_USES_COND_WAIT // pthread_cond_signal(&idle_cond); // #else diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp index fb7e69c70..01c49e30c 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp @@ -190,13 +190,11 @@ LOWFUNC(NONE,WRITE,1,raw_push_l_r,(RR4 r)) { PUSH(r); } -LENDFUNC(NONE,WRITE,1,raw_push_l_r,(RR4 r)) LOWFUNC(NONE,READ,1,raw_pop_l_r,(RR4 r)) { POP(r); } -LENDFUNC(NONE,READ,1,raw_pop_l_r,(RR4 r)) LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) { @@ -210,7 +208,6 @@ LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], R3 LSR #24 } -LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) { @@ -228,13 +225,11 @@ LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr %[d], %[d], r3, lsr #16 #endif } -LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, RR4 s)) { ADCS_rrr(d, d, s); // adcs %[d],%[d],%[s] } -LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) { @@ -246,7 +241,6 @@ LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3 LSR #24 } -LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) { @@ -263,13 +257,11 @@ LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3, LSR #16 #endif } -LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, RR4 s)) { ADDS_rrr(d, d, s); // adds %[d], %[d], %[s] } -LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) { @@ -305,7 +297,6 @@ LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) { @@ -316,7 +307,6 @@ LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) BIC_rri(d, d, 0xFF); // bic %[d],%[d], #0xFF ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3, lsr #24 } -LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) { @@ -334,7 +324,6 @@ LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) { @@ -348,7 +337,6 @@ LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) { @@ -362,7 +350,6 @@ LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) { @@ -372,7 +359,6 @@ LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) { @@ -396,7 +382,6 @@ LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) { @@ -414,7 +399,6 @@ LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) CC_ORR_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_Z_FLAG); // orr r3,r3,#0x40000000 MSR_CPSR_r(REG_WORK2); // msr cpsr,r3 } -LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) { @@ -435,7 +419,6 @@ LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) ORR_rrrLSLi(r,r,REG_WORK1, 8); // orr r6, r6, r2, lsl #8 #endif } -LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) { @@ -448,7 +431,6 @@ LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 #endif } -LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) { @@ -460,7 +442,6 @@ LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) { @@ -473,7 +454,6 @@ LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) { @@ -488,7 +468,6 @@ LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) EOR_rrr(r, r, REG_WORK1); // eor r6, r6, r2 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) { @@ -503,7 +482,6 @@ LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) BIC_rrr(r, r, REG_WORK1); // bic r6, r6, r2 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) { @@ -518,7 +496,6 @@ LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) ORR_rrr(r, r, REG_WORK1); // orr r6, r6, r2 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) { @@ -543,7 +520,6 @@ LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) } //: } -LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) LOWFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) { @@ -560,7 +536,6 @@ LOWFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) { @@ -578,7 +553,6 @@ LOWFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) { @@ -588,14 +562,12 @@ LOWFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, RR4 s)) { SMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // smull r2,r3,r7,r6 MOV_rr(d, REG_WORK1); // mov r7,r2 } -LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, RR4 s)) LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) { @@ -603,7 +575,6 @@ LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 MOV_rr(MUL_NREG2, REG_WORK2); } -LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) { @@ -621,7 +592,6 @@ LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) { @@ -649,7 +619,6 @@ LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, I //; #endif } -LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) { @@ -664,7 +633,6 @@ LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 } -LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) { @@ -686,7 +654,6 @@ LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) { @@ -704,7 +671,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) //: #endif } -LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) { @@ -725,7 +691,6 @@ LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) { @@ -743,14 +708,12 @@ LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) { BIC_rri(d, d, 0xff); // bic %[d], %[d], #0xff ORR_rri(d, d, (s & 0xff)); // orr %[d], %[d], #%[s] } -LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) { @@ -771,7 +734,6 @@ LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) //: #endif } -LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) { @@ -779,7 +741,6 @@ LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) BIC_rri(d, d, 0x0ff); // bic %[d], %[d], #0xff ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 } -LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) { @@ -797,7 +758,6 @@ LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) { @@ -815,7 +775,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) { @@ -843,7 +802,6 @@ LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) { @@ -874,7 +832,6 @@ LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) { @@ -892,7 +849,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) //: #endif } -LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) { @@ -910,7 +866,6 @@ LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) { @@ -942,7 +897,6 @@ LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) //: #endif } -LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) { @@ -973,7 +927,6 @@ LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) { @@ -991,7 +944,6 @@ LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) { @@ -1016,7 +968,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) //: #endif } -LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) { @@ -1037,7 +988,6 @@ LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) //: #endif } -LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) { @@ -1045,7 +995,6 @@ LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) ORR_rrrLSRi(d, REG_WORK1, d, 16); // orr r7, r2, r7, lsr #16 ROR_rri(d, d, 16); // ror r7, r7, #16 } -LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) { @@ -1064,7 +1013,6 @@ LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 #endif } -LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) { @@ -1075,7 +1023,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) else STRH_rRi(s, d, -offset);// strh r6, [r7, #-0x7f] } -LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) { @@ -1093,7 +1040,6 @@ LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) //: #endif } -LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor)) { @@ -1119,7 +1065,6 @@ LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor //: #endif } -LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor)) LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset8)) { @@ -1143,7 +1088,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset8)) //: #endif } -LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) { @@ -1154,13 +1098,11 @@ LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) } else LDR_rRi(d, s, -offset); // ldr r2, [r1, #12] } -LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, RR4 s)) { MOV_rr(d, s); // mov %[d], %[s] } -LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, RR4 s)) LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) { @@ -1171,7 +1113,6 @@ LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) else STR_rRi(s, d, -offset); // str r6, [r7, #-12] } -LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) { @@ -1179,7 +1120,6 @@ LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 MOV_rr(MUL_NREG2, REG_WORK2); } -LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) { @@ -1191,7 +1131,6 @@ LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) { @@ -1208,7 +1147,6 @@ LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) { @@ -1218,7 +1156,6 @@ LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) { @@ -1242,7 +1179,6 @@ LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) //jp: #endif } -LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) { @@ -1265,7 +1201,6 @@ LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) BIC_rri(r, r, 0xff); // bic r7,r7,#0xff ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) { @@ -1292,7 +1227,6 @@ LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) { @@ -1315,7 +1249,6 @@ LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 } -LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) { @@ -1341,7 +1274,6 @@ LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r2,r2,r7,lsr #16 } -LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) { @@ -1356,13 +1288,11 @@ LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 MSR_CPSR_r(REG_WORK2); } -LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) { RORS_rri(r, r, i & 0x1F); // RORS r7,r7,#12 } -LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) { @@ -1380,13 +1310,11 @@ LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 MSR_CPSR_r(REG_WORK2); } -LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, RR1 r)) { RORS_rrr(d, d, r); // RORS r7,r7,r6 } -LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) { @@ -1400,7 +1328,6 @@ LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) BIC_rri(r, r, 0xff); // bic r7,r7,#0xff ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) { @@ -1414,7 +1341,6 @@ LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) BIC_rri(d, d, 0xff); // bic r7,r7,#0xff ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) { @@ -1428,7 +1354,6 @@ LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 } -LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) { @@ -1442,7 +1367,6 @@ LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 } -LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) { @@ -1461,7 +1385,6 @@ LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) { @@ -1475,7 +1398,6 @@ LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) { @@ -1495,7 +1417,6 @@ LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) { @@ -1530,7 +1451,6 @@ LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) } //: } -LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) { @@ -1577,7 +1497,6 @@ LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) //: #endif } -LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) { @@ -1588,7 +1507,6 @@ LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) BIC_rri(r, r, 0xff); // BIC r7,r7,0xff ORR_rrrLSRi(r, r, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 } -LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) { @@ -1597,19 +1515,16 @@ LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) BIC_rri(d, d, 0xff); // BIC r7,r7,#0xff ORR_rrrLSRi(d, d, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 } -LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) { LSLS_rri(r,r, i & 0x1f); // lsls r7,r7,#12 } -LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, RR1 r)) { LSLS_rrr(d, d, r); } -LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) { @@ -1620,7 +1535,6 @@ LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) ROR_rri(r, REG_WORK1, 16); // ROR r7,r2,#16 } -LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) { @@ -1629,7 +1543,6 @@ LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) ORR_rrrLSRi(REG_WORK1, REG_WORK1, d, 16); // ORR r2,r2,r7,lsr #16 ROR_rri(d, REG_WORK1, 16); // ROR r7,r2,#16 } -LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) { @@ -1642,7 +1555,6 @@ LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) BIC_rri(r,r, 0xff); // bic r7,r7,#0xff ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) { @@ -1656,7 +1568,6 @@ LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) { @@ -1677,7 +1588,6 @@ LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) { @@ -1698,19 +1608,16 @@ LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) { ASRS_rri(r, r, i & 0x1f); // ASRS r7,r7,#12 } -LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, RR1 r)) { ASRS_rrr(d, d, r); // ASRS r7,r7,r6 } -LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) { @@ -1721,7 +1628,6 @@ LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) BIC_rri(r, r, 0xFF); // BIC r7,r7,#0xff ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) { @@ -1732,13 +1638,11 @@ LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) BIC_rri(d, d, 0xFF); // BIC r7,r7,#0xff ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) { LSRS_rri(r, r, i & 0x1f); // LSRS r7,r7,#12 } -LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) { @@ -1755,7 +1659,6 @@ LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) BIC_rri(r, r, 0xFF00); // BIC r7,r7,#0xff00 ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) { @@ -1772,13 +1675,11 @@ LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) BIC_rri(d, d, 0xFF00); // BIC r7,r7,#0xff00 ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 } -LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, RR1 r)) { LSRS_rrr(d, d, r); } -LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, RR1 r)) LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) { @@ -1793,7 +1694,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) { @@ -1807,7 +1707,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) { @@ -1817,7 +1716,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) { @@ -1841,7 +1739,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) { @@ -1857,7 +1754,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) { @@ -1890,7 +1786,6 @@ LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) { @@ -1908,7 +1803,6 @@ LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) { @@ -1932,7 +1826,6 @@ LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) //: #endif } -LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) { @@ -1942,7 +1835,6 @@ LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) { @@ -1960,7 +1852,6 @@ LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) { @@ -1972,7 +1863,6 @@ LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) { @@ -1989,7 +1879,6 @@ LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) { @@ -1999,7 +1888,6 @@ LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 } -LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) { @@ -2010,7 +1898,6 @@ LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) ASR_rri(d, d, 16); // asr r6, r6, #16 #endif } -LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) { @@ -2021,7 +1908,6 @@ LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) ASR_rri(d, d, 24); // asr r6, r6, #24 #endif } -LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) { @@ -2032,7 +1918,6 @@ LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) LSR_rri(d, d, 24); // lsr r2, r2, #24 #endif } -LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) { @@ -2043,7 +1928,6 @@ LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 #endif } -LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) static inline void raw_dec_sp(int off) { @@ -2167,29 +2051,25 @@ D(panicbug("raw_fp_cleanup_drop")); raw_fp_init(); } -LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMPTRW m, FR r)) { jit_unimplemented("raw_fmov_mr_drop %x %x", m, r); } -LENDFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) -LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMPTRW m, FR r)) { jit_unimplemented("raw_fmov_mr %x %x", m, r); } -LENDFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) -LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) +LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMPTRR m)) { jit_unimplemented("raw_fmov_rm %x %x", r, m); } -LENDFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) LOWFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) { jit_unimplemented("raw_fmov_rr %x %x", d, s); } -LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) static inline void raw_emit_nop_filler(int nbytes) { @@ -2235,19 +2115,16 @@ LOWFUNC(WRITE,NONE,2,raw_ADD_l_rr,(RW4 d, RR4 s)) { ADD_rrr(d, d, s); } -LENDFUNC(WRITE,NONE,2,raw_ADD_l_rr,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_ADD_l_rri,(RW4 d, RR4 s, IMM i)) { ADD_rri(d, s, i); } -LENDFUNC(WRITE,NONE,2,raw_ADD_l_rri,(RW4 d, RR4 s, IMM i)) LOWFUNC(WRITE,NONE,2,raw_SUB_l_rri,(RW4 d, RR4 s, IMM i)) { SUB_rri(d, s, i); } -LENDFUNC(WRITE,NONE,2,raw_SUB_l_rri,(RW4 d, RR4 s, IMM i)) LOWFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) { @@ -2255,19 +2132,16 @@ LOWFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) MVN_rrLSRi(REG_WORK1, REG_WORK1, 24); // mvn r2, %[s], lsr #24 AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 } -LENDFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_AND_l_rr,(RW4 d, RR4 s)) { AND_rrr(d, d, s); } -LENDFUNC(WRITE,NONE,2,raw_AND_l_rr,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_AND_l_ri,(RW4 d, IMM i)) { AND_rri(d, d, i); } -LENDFUNC(WRITE,NONE,2,raw_AND_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) { @@ -2275,7 +2149,6 @@ LOWFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) MVN_rrLSRi(REG_WORK1, REG_WORK1, 16); // mvn r2, %[s], lsr #16 AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 } -LENDFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) { @@ -2286,13 +2159,11 @@ LOWFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) #endif EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 } -LENDFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_EOR_l_rr,(RW4 d, RR4 s)) { EOR_rrr(d, d, s); // eors r7, r7, r6 } -LENDFUNC(WRITE,NONE,2,raw_EOR_l_rr,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) { @@ -2304,7 +2175,6 @@ LOWFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) EOR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 #endif } -LENDFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_LDR_l_ri,(RW4 d, IMM i)) { @@ -2317,13 +2187,11 @@ LOWFUNC(WRITE,NONE,2,raw_LDR_l_ri,(RW4 d, IMM i)) emit_long(i); #endif } -LENDFUNC(WRITE,NONE,2,raw_LDR_l_rr,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_MOV_l_ri8,(RW4 d, IMM i)) { MOV_ri(d, i); } -LENDFUNC(WRITE,NONE,2,raw_MOV_l_ri8,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) { @@ -2334,13 +2202,11 @@ LOWFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) #endif ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 } -LENDFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) LOWFUNC(WRITE,NONE,2,raw_ORR_l_rr,(RW4 d, RR4 s)) { ORR_rrr(d, d, s); } -LENDFUNC(WRITE,NONE,2,raw_ORR_l_rr,(RW4 d, RR4 s)) LOWFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) { @@ -2352,13 +2218,11 @@ LOWFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 #endif } -LENDFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) LOWFUNC(WRITE,NONE,2,raw_ROR_l_ri,(RW4 r, IMM i)) { ROR_rri(r, r, i); } -LENDFUNC(WRITE,NONE,2,raw_ROR_l_ri,(RW4 r, IMM i)) // // compuemu_support used raw calls @@ -2401,7 +2265,6 @@ LOWFUNC(WRITE,RMW,2,compemu_raw_add_l_mi,(IMM d, IMM s)) //: #endif } -LENDFUNC(WRITE,RMW,2,compemu_raw_add_l_mi,(IMM d, IMM s)) LOWFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) { @@ -2416,7 +2279,6 @@ LOWFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) emit_long(i); #endif } -LENDFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) LOWFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) { @@ -2429,7 +2291,6 @@ LOWFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 #endif } -LENDFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) LOWFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) { @@ -2441,7 +2302,6 @@ LOWFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 } -LENDFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) LOWFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor, IMM cond)) { @@ -2478,7 +2338,6 @@ LOWFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IM //: #endif } -LENDFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor, IMM cond)) LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) { @@ -2510,7 +2369,6 @@ LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) //: #endif } -LENDFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) { @@ -2532,7 +2390,6 @@ LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) //: #endif } -LENDFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) LOWFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) { @@ -2550,7 +2407,6 @@ LOWFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) //: #endif } -LENDFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) LOWFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) { @@ -2565,7 +2421,6 @@ LOWFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM fa ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 } -LENDFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) LOWFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) { @@ -2583,7 +2438,6 @@ LOWFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) { @@ -2608,7 +2462,6 @@ LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) //: #endif } -LENDFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) { @@ -2626,7 +2479,6 @@ LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) { @@ -2642,7 +2494,6 @@ LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) //: #endif } -LENDFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) LOWFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) { @@ -2659,13 +2510,11 @@ LOWFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) //: #endif } -LENDFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_rr,(W4 d, RR4 s)) { MOV_rr(d, s); // mov %[d], %[s] } -LENDFUNC(NONE,NONE,2,compemu_raw_mov_l_rr,(W4 d, RR4 s)) LOWFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) { @@ -2683,7 +2532,6 @@ LOWFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) //: #endif } -LENDFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) LOWFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) { @@ -2722,13 +2570,11 @@ LOWFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) //: #endif } -LENDFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) LOWFUNC(WRITE,NONE,2,compemu_raw_test_l_rr,(RR4 d, RR4 s)) { TST_rr(d, s); // tst r7, r6 } -LENDFUNC(WRITE,NONE,2,compemu_raw_test_l_rr,(RR4 d, RR4 s)) LOWFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) { @@ -2739,7 +2585,6 @@ LOWFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 #endif } -LENDFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) static inline void compemu_raw_call(uae_u32 t) { diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.h b/BasiliskII/src/uae_cpu/compiler/codegen_arm.h index f92bb1dae..e04ab9b82 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_arm.h +++ b/BasiliskII/src/uae_cpu/compiler/codegen_arm.h @@ -66,22 +66,22 @@ /* --- ENCODINGS ----------------------------------------------------------- */ /* ========================================================================= */ -#define IMM32(c) ((c & 0xffffff00) == 0 ? c : \ - (c & 0x3fffffc0) == 0 ? (0x100 | ((c >> 30) & 0x3) | ((c << 2) & 0xfc)) : \ - (c & 0x0ffffff0) == 0 ? (0x200 | ((c >> 28) & 0xf) | ((c << 4) & 0xf0)) : \ - (c & 0x03fffffc) == 0 ? (0x300 | ((c >> 26) & 0x3f) | ((c << 6) & 0xc0) ) : \ - (c & 0x00ffffff) == 0 ? (0x400 | ((c >> 24) & 0xff)) : \ - (c & 0xc03fffff) == 0 ? (0x500 | (c >> 22)) : \ - (c & 0xf00fffff) == 0 ? (0x600 | (c >> 20)) : \ - (c & 0xfc03ffff) == 0 ? (0x700 | (c >> 18)) : \ - (c & 0xff00ffff) == 0 ? (0x800 | (c >> 16)) : \ - (c & 0xffc03fff) == 0 ? (0x900 | (c >> 14)) : \ - (c & 0xfff00fff) == 0 ? (0xa00 | (c >> 12)) : \ - (c & 0xfffc03ff) == 0 ? (0xb00 | (c >> 10)) : \ - (c & 0xffff00ff) == 0 ? (0xc00 | (c >> 8)) : \ - (c & 0xffffc03f) == 0 ? (0xd00 | (c >> 6)) : \ - (c & 0xfffff00f) == 0 ? (0xe00 | (c >> 4)) : \ - (c & 0xfffffc03) == 0 ? (0xf00 | (c >> 2)) : \ +#define IMM32(c) (((c) & 0xffffff00) == 0 ? (c) : \ + ((c) & 0x3fffffc0) == 0 ? (0x100 | (((c) >> 30) & 0x3) | ((((c) & 0x0000003f) << 2))) : \ + ((c) & 0x0ffffff0) == 0 ? (0x200 | (((c) >> 28) & 0xf) | ((((c) & 0x0000000f) << 4))) : \ + ((c) & 0x03fffffc) == 0 ? (0x300 | (((c) >> 26) & 0x3f) | ((((c) & 0x00000003) << 6)) ) : \ + ((c) & 0x00ffffff) == 0 ? (0x400 | (((c) >> 24) & 0xff)) : \ + ((c) & 0xc03fffff) == 0 ? (0x500 | ((c) >> 22)) : \ + ((c) & 0xf00fffff) == 0 ? (0x600 | ((c) >> 20)) : \ + ((c) & 0xfc03ffff) == 0 ? (0x700 | ((c) >> 18)) : \ + ((c) & 0xff00ffff) == 0 ? (0x800 | ((c) >> 16)) : \ + ((c) & 0xffc03fff) == 0 ? (0x900 | ((c) >> 14)) : \ + ((c) & 0xfff00fff) == 0 ? (0xa00 | ((c) >> 12)) : \ + ((c) & 0xfffc03ff) == 0 ? (0xb00 | ((c) >> 10)) : \ + ((c) & 0xffff00ff) == 0 ? (0xc00 | ((c) >> 8)) : \ + ((c) & 0xffffc03f) == 0 ? (0xd00 | ((c) >> 6)) : \ + ((c) & 0xfffff00f) == 0 ? (0xe00 | ((c) >> 4)) : \ + ((c) & 0xfffffc03) == 0 ? (0xf00 | ((c) >> 2)) : \ 0\ ) @@ -102,7 +102,7 @@ #define SHIFT_RRX(Rm) ((Rm) | 0x60) #define SHIFT_PK(Rm,s) ((Rm) | ((s) << 7)) -// Load/Store addressings +/* Load/Store addressings */ #define ADR_ADD(v) ((1 << 23) | (v)) #define ADR_SUB(v) (v) @@ -138,16 +138,16 @@ #define ADD2_REG(Rm) ADR_ADD(Rm) #define SUB2_REG(Rm) ADR_SUB(Rm) -// MOV, MVN +/* MOV, MVN */ #define _OP1(cc,op,s,Rd,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rd) << 12) | (shift)) -// CMP, CMN, TST, TEQ +/* CMP, CMN, TST, TEQ */ #define _OP2(cc,op,Rn,shift) _W(((cc) << 28) | ((op) << 21) | (1 << 20) | ((Rn) << 16) | (shift)) -// ADD, SUB, RSB, ADC, SBC, RSC, AND, BIC, EOR, ORR +/* ADD, SUB, RSB, ADC, SBC, RSC, AND, BIC, EOR, ORR */ #define _OP3(cc,op,s,Rd,Rn,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rn) << 16) | ((Rd) << 12) | (shift)) -// LDR, STR +/* LDR, STR */ #define _LS1(cc,l,b,Rd,Rn,a) _W(((cc) << 28) | (0x01 << 26) | ((l) << 20) | ((b) << 22) | ((Rn) << 16) | ((Rd) << 12) | (a)) #define _LS2(cc,p,l,s,h,Rd,Rn,a) _W(((cc) << 28) | ((p) << 24) | ((l) << 20) | ((Rn) << 16) | ((Rd) << 12) | ((s) << 6) | ((h) << 5) | 0x90 | _LS2_ADDR((a))) @@ -211,9 +211,9 @@ enum { /* Data processing instructions */ /* Opcodes Type 1 */ -// MOVcc rd,#i +/* MOVcc rd,#i */ #define CC_MOV_ri8(cc,Rd,i) _OP1(cc,_MOV,0,Rd,UNSHIFTED_IMM8(i)) -// MOVcc Rd,#i ROR #s +/* MOVcc Rd,#i ROR #s */ #define CC_MOV_ri8RORi(cc,Rd,i,s) _OP1(cc,_MOV,0,Rd,SHIFT_IMM8_ROR(i,s)) #define CC_MOV_ri(cc,Rd,i) _OP1(cc,_MOV,0,Rd,SHIFT_IMM(i)) #define CC_MOV_rr(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_REG(Rm)) @@ -227,9 +227,9 @@ enum { #define CC_MOV_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_ROR_r(Rm,Rs)) #define CC_MOV_rrRRX(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_RRX(Rm)) -// MOV rd,#i +/* MOV rd,#i */ #define MOV_ri8(Rd,i) CC_MOV_ri8(NATIVE_CC_AL,Rd,i) -// MOV Rd,#i ROR #s +/* MOV Rd,#i ROR #s */ #define MOV_ri8RORi(Rd,i,s) CC_MOV_ri8RORi(NATIVE_CC_AL,Rd,i,s) #define MOV_ri(Rd,i) CC_MOV_ri(NATIVE_CC_AL,Rd,i) #define MOV_rr(Rd,Rm) CC_MOV_rr(NATIVE_CC_AL,Rd,Rm) @@ -267,9 +267,9 @@ enum { #define MOVS_rrRORr(Rd,Rm,Rs) CC_MOVS_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) #define MOVS_rrRRX(Rd,Rm) CC_MOVS_rrRRX(NATIVE_CC_AL,Rd,Rm) -// MVNcc rd,#i +/* MVNcc rd,#i */ #define CC_MVN_ri8(cc,Rd,i) _OP1(cc,_MVN,0,Rd,UNSHIFTED_IMM8(i)) -// MVNcc Rd,#i ROR #s +/* MVNcc Rd,#i ROR #s */ #define CC_MVN_ri8RORi(cc,Rd,i,s) _OP1(cc,_MVN,0,Rd,SHIFT_IMM8_ROR(i,s)) #define CC_MVN_ri(cc,Rd,i) _OP1(cc,_MVN,0,Rd,SHIFT_IMM(i)) #define CC_MVN_rr(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_REG(Rm)) @@ -283,9 +283,9 @@ enum { #define CC_MVN_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_ROR_r(Rm,Rs)) #define CC_MVN_rrRRX(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_RRX(Rm)) -// MVN rd,#i +/* MVN rd,#i */ #define MVN_ri8(Rd,i) CC_MVN_ri8(NATIVE_CC_AL,Rd,i) -// MVN Rd,#i ROR #s +/* MVN Rd,#i ROR #s */ #define MVN_ri8RORi(Rd,i,s) CC_MVN_ri8RORi(NATIVE_CC_AL,Rd,i,s) #define MVN_ri(Rd,i) CC_MVN_ri(NATIVE_CC_AL,Rd,i) #define MVN_rr(Rd,Rm) CC_MVN_rr(NATIVE_CC_AL,Rd,Rm) @@ -811,9 +811,9 @@ enum { #define RSCS_rrrRORr(Rd,Rn,Rm,Rs) CC_RSCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) #define RSCS_rrrRRX(Rd,Rn,Rm) CC_RSCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) -// ORRcc Rd,Rn,#i +/* ORRcc Rd,Rn,#i */ #define CC_ORR_rri8(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,UNSHIFTED_IMM8(i)) -// ORRcc Rd,Rn,#i ROR #s +/* ORRcc Rd,Rn,#i ROR #s */ #define CC_ORR_rri8RORi(cc,Rd,Rn,i,s) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM8_ROR(i,s)) #define CC_ORR_rri(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM(i)) @@ -828,9 +828,9 @@ enum { #define CC_ORR_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) #define CC_ORR_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_RRX(Rm)) -// ORR Rd,Rn,#i +/* ORR Rd,Rn,#i */ #define ORR_rri8(Rd,Rn,i) CC_ORR_rri8(NATIVE_CC_AL,Rd,Rn,i) -// ORR Rd,Rn,#i ROR #s +/* ORR Rd,Rn,#i ROR #s */ #define ORR_rri8RORi(Rd,Rn,i,s) CC_ORR_rri8RORi(NATIVE_CC_AL,Rd,Rn,i,s) #define ORR_rri(Rd,Rn,i) CC_ORR_rri(NATIVE_CC_AL,Rd,Rn,i) diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp index 24cfb5486..573f2f9a5 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -107,6 +107,10 @@ #if defined(CPU_x86_64) #ifdef UAE +/* Register R12 (and ESP) cannot be used with simple [r/m + disp32] addressing, + * since r/m bits 100 implies SIB byte. Simplest fix is to not use these + * registers. Also note that these registers are listed in the freescratch + * function as well. */ uae_s8 always_used[] = { ESP_INDEX, R12_INDEX, -1 }; #else uae_s8 always_used[] = { ESP_INDEX, -1 }; @@ -192,11 +196,6 @@ static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,1,1}; #define CLOBBER_BT clobber_flags() #define CLOBBER_BSF clobber_flags() -/* The older code generator is now deprecated. */ -#define USE_NEW_RTASM 1 - -#if USE_NEW_RTASM - #if defined(CPU_x86_64) #define X86_TARGET_64BIT 1 /* The address override prefix causes a 5 cycles penalty on Intel Core @@ -296,7 +295,6 @@ LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) PUSHLr(r); #endif } -LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) { @@ -306,7 +304,6 @@ LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) POPLr(r); #endif } -LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) { @@ -316,307 +313,256 @@ LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) POPLm(d, X86_NOREG, X86_NOREG, 1); #endif } -LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) { BTLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) { BTLrr(b, r); } -LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) { BTCLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) { BTCLrr(b, r); } -LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) { BTRLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) { BTRLrr(b, r); } -LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) { BTSLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) { BTSLrr(b, r); } -LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) { SUBWir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) { ADDR32 MOVLmr(s, X86_NOREG, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) { ADDR32 MOVLim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) { ADDR32 MOVWim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) { ADDR32 MOVBim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) { ADDR32 ROLBim(i, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) { ROLBir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) { ROLWir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) { ROLLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) { ROLLrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) { ROLWrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) { ROLBrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) { SHLLrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) { SHLWrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) { SHLBrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) { RORBir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) { RORWir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) { ADDR32 ORLmr(s, X86_NOREG, X86_NOREG, 1, d); } -LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) { RORLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) { RORLrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) { RORWrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) { RORBrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) { SHRLrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) { SHRWrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) { SHRBrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) { SARLrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) { SARWrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) { SARBrr(r, d); } -LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) { SHLLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) { SHLWir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) { SHLBir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) { SHRLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) { SHRWir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) { SHRBir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) { SARLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) { SARWir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) { SARBir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) LOWFUNC(WRITE,NONE,1,raw_sahf,(R2)) { SAHF(); } -LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) LOWFUNC(NONE,NONE,1,raw_cpuid,(R4)) { CPUID(); } -LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) LOWFUNC(READ,NONE,1,raw_lahf,(W2)) { LAHF(); } -LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) { SETCCir(cc, d); } -LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) { ADDR32 SETCCim(cc, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) { @@ -629,49 +575,41 @@ LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); } } -LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) { BSFLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) LOWFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) { MOVSLQrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) { MOVSWLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) { MOVSBLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) { MOVZWLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) { MOVZBLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) { IMULLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) { @@ -680,7 +618,6 @@ LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) } IMULLr(s); } -LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) { @@ -689,2412 +626,522 @@ LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) } MULLr(s); } -LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4, R4)) { - abort(); /* %^$&%^$%#^ x86! */ + x86_emit_failure("raw_mul_32_32"); /* %^$&%^$%#^ x86! */ } -LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) { MOVBrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) { MOVWrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) { ADDR32 MOVLmr(0, baser, index, factor, d); } -LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) { ADDR32 MOVWmr(0, baser, index, factor, d); } -LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) { ADDR32 MOVBmr(0, baser, index, factor, d); } -LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) { ADDR32 MOVLrm(s, 0, baser, index, factor); } -LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) { ADDR32 MOVWrm(s, 0, baser, index, factor); } -LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) { ADDR32 MOVBrm(s, 0, baser, index, factor); } -LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) { ADDR32 MOVLrm(s, base, baser, index, factor); } -LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) { ADDR32 MOVWrm(s, base, baser, index, factor); } -LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) { ADDR32 MOVBrm(s, base, baser, index, factor); } -LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) { - ADDR32 MOVLmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVWmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - ADDR32 MOVBmr(base, baser, index, factor, d); -} -LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) -{ - ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) -{ - if (have_cmov) - ADDR32 CMOVLmr(cond, base, X86_NOREG, index, factor, d); - else { /* replacement using branch and mov */ - uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; - JCCSii(cond^1, 0); - ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) -{ - if (have_cmov) - CMOVLmr(cond, mem, X86_NOREG, X86_NOREG, 1, d); - else { /* replacement using branch and mov */ - uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; - JCCSii(cond^1, 0); - ADDR32 MOVLmr(mem, X86_NOREG, X86_NOREG, 1, d); - *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); - } -} -LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) - -LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) -{ - ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) -{ - ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) -{ - ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) - -LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) -{ - ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVLim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVWim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) -{ - ADDR32 MOVBim(i, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) -{ - ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) -{ - ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) -{ - ADDR32 LEALmr(offset, s, X86_NOREG, 1, d); -} -LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) -{ - ADDR32 LEALmr(offset, s, index, factor, d); -} -LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) - -LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) -{ - ADDR32 LEALmr(0, s, index, factor, d); -} -LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) - -LOWFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) -{ - ADDR32 LEALmr(0, X86_NOREG, index, factor, d); -} -LENDFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) -{ - ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) -{ - ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) - -LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) -{ - ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) - -LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) -{ - BSWAPLr(r); -} -LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) - -LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) -{ - ROLWir(8, r); -} -LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) -{ - MOVLrr(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) -{ - ADDR32 MOVLrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) -{ - ADDR32 MOVWrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) - -LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) -{ - ADDR32 MOVWmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) -{ - ADDR32 MOVBrm(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) - -LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) -{ - ADDR32 MOVBmr(s, X86_NOREG, X86_NOREG, 1, d); -} -LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) -{ - MOVLir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) -{ - MOVWir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) -{ - MOVBir(s, d); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) - -LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) -{ - ADDR32 ADCLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) -{ - ADDR32 ADDLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) -{ - ADDR32 ADDWim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) -{ - ADDR32 ADDBim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) -{ - TESTLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) -{ - TESTLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) -{ - TESTWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) -{ - TESTBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) -{ - XORLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) -{ - ANDLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) -{ - ANDWir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) -{ - ANDLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) -{ - ANDWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) -{ - ANDBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) -{ - ORLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) -{ - ORLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) -{ - ORWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) -{ - ORBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) -{ - ADCLrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) -{ - ADCWrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) -{ - ADCBrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) -{ - ADDLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) -{ - ADDWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) -{ - ADDBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) -{ - SUBLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) -{ - SUBBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) -{ - ADDLir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) -{ - ADDWir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) -{ - ADDBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) - -LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) -{ - SBBLrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) -{ - SBBWrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) - -LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) -{ - SBBBrr(s, d); -} -LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) -{ - SUBLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) -{ - SUBWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) -{ - SUBBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) -{ - CMPLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) -{ - CMPLir(i, r); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) -{ - CMPWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) -{ - ADDR32 CMPBim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) -{ - CMPBir(i, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) -{ - CMPBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) - -LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) -{ - ADDR32 CMPLmr(offset, X86_NOREG, index, factor, d); -} -LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) - -LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) -{ - XORLrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) -{ - XORWrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) - -LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) -{ - XORBrr(s, d); -} -LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) - -LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) -{ - ADDR32 SUBLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) - -LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) -{ - ADDR32 CMPLim(s, d, X86_NOREG, X86_NOREG, 1); -} -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) - -LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) -{ - XCHGLrr(r2, r1); -} -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) - -LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) -{ - XCHGBrr(r2, r1); -} -LENDFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) - -LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) -{ - PUSHF(); -} -LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) - -LOWFUNC(WRITE,READ,0,raw_popfl,(void)) -{ - POPF(); -} -LENDFUNC(WRITE,READ,0,raw_popfl,(void)) - -/* Generate floating-point instructions */ -static inline void x86_fadd_m(MEMR s) -{ - ADDR32 FADDLm(s,X86_NOREG,X86_NOREG,1); -} - -#else - -const bool optimize_accum = true; -const bool optimize_imm8 = true; -const bool optimize_shift_once = true; - -/************************************************************************* - * Actual encoding of the instructions on the target CPU * - *************************************************************************/ - -static inline int isaccum(int r) -{ - return (r == EAX_INDEX); -} - -static inline int isbyte(uae_s32 x) -{ - return (x>=-128 && x<=127); -} - -static inline int isword(uae_s32 x) -{ - return (x>=-32768 && x<=32767); -} - -LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) -{ - emit_byte(0x50+r); -} -LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) -{ - emit_byte(0x58+r); -} -LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) - -LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) -{ - emit_byte(0x8f); - emit_byte(0x05); - emit_long(d); -} -LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xe0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xa3); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xf8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xbb); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) - - -LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xf0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xb3); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) -{ - emit_byte(0x0f); - emit_byte(0xba); - emit_byte(0xe8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) -{ - emit_byte(0x0f); - emit_byte(0xab); - emit_byte(0xc0+8*b+r); -} -LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) - -LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) -{ - emit_byte(0x66); - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x2d); - else { - emit_byte(0x81); - emit_byte(0xe8+d); - } - emit_word(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) - - -LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) -{ - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) -{ - emit_byte(0xc7); - emit_byte(0x05); - emit_long(d); - emit_long(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) -{ - emit_byte(0x66); - emit_byte(0xc7); - emit_byte(0x05); - emit_long(d); - emit_word(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) -{ - emit_byte(0xc6); - emit_byte(0x05); - emit_long(d); - emit_byte(s); -} -LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) - -LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0x05); - emit_long(d); - } - else { - emit_byte(0xc0); - emit_byte(0x05); - emit_long(d); - emit_byte(i); - } -} -LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xc0+r); - } - else { - emit_byte(0xc0); - emit_byte(0xc0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xc0+r); - } - else { - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xc0+d); -} -LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xe0+d); -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xc8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xc8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) - -// gb-- used for making an fpcr value in compemu_fpp.cpp -LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) -{ - emit_byte(0x0b); - emit_byte(0x05+8*d); - emit_long(s); -} -LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xc8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xc8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xc8+d); -} -LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xe8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) -{ - emit_byte(0xd3); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) -{ - emit_byte(0x66); - emit_byte(0xd3); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) -{ - emit_byte(0xd2); - emit_byte(0xf8+d); -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) - -LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xe0+r); - } - else { - emit_byte(0xc1); - emit_byte(0xe0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xe0+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xe0+r); - } - else { - emit_byte(0xc0); - emit_byte(0xe0+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xe8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xe8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xe8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xe8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xe8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd1); - emit_byte(0xf8+r); - } - else { - emit_byte(0xc1); - emit_byte(0xf8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) -{ - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xf8+r); - emit_byte(i); -} -LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) - -LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) -{ - if (optimize_shift_once && (i == 1)) { - emit_byte(0xd0); - emit_byte(0xf8+r); - } - else { - emit_byte(0xc0); - emit_byte(0xf8+r); - emit_byte(i); - } -} -LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) - -LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) -{ - emit_byte(0x9e); -} -LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) - -LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) -{ - emit_byte(0x0f); - emit_byte(0xa2); -} -LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) - -LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) -{ - emit_byte(0x9f); -} -LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) - -LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) -{ - emit_byte(0x0f); - emit_byte(0x90+cc); - emit_byte(0xc0+d); -} -LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) - -LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) -{ - emit_byte(0x0f); - emit_byte(0x90+cc); - emit_byte(0x05); - emit_long(d); -} -LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) - -LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) -{ - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cc); - emit_byte(0xc0+8*d+s); - } - else { /* replacement using branch and mov */ - int uncc=(cc^1); - emit_byte(0x70+uncc); - emit_byte(2); /* skip next 2 bytes if not cc=true */ - emit_byte(0x89); - emit_byte(0xc0+8*s+d); - } -} -LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) - -LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) -{ - emit_byte(0x0f); - emit_byte(0xbc); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) -{ - emit_byte(0x0f); - emit_byte(0xbf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) -{ - emit_byte(0x0f); - emit_byte(0xbe); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) -{ - emit_byte(0x0f); - emit_byte(0xb7); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) - -LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) -{ - emit_byte(0x0f); - emit_byte(0xb6); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) -{ - emit_byte(0x0f); - emit_byte(0xaf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) { - jit_abort("Bad register in IMUL: d=%d, s=%d\n",d,s); - } - emit_byte(0xf7); - emit_byte(0xea); -} -LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) -{ - if (d!=MUL_NREG1 || s!=MUL_NREG2) { - jit_abort("Bad register in MUL: d=%d, s=%d",d,s); - } - emit_byte(0xf7); - emit_byte(0xe2); -} -LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) - -LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) -{ - jit_abort("unsupported MUL"); /* %^$&%^$%#^ x86! */ - emit_byte(0x0f); - emit_byte(0xaf); - emit_byte(0xc0+8*d+s); -} -LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) -{ - emit_byte(0x88); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) - -LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) -{ - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0xc0+8*s+d); -} -LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) - -LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) -{ - int isebp=(baser==5)?0x40:0; - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - - emit_byte(0x8b); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x8a); - emit_byte(0x04+8*d+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) - -LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - - isebp=(baser==5)?0x40:0; - - emit_byte(0x89); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) -{ - int fi; - int isebp; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - isebp=(baser==5)?0x40:0; - - emit_byte(0x88); - emit_byte(0x04+8*s+isebp); - emit_byte(baser+8*index+0x40*fi); - if (isebp) - emit_byte(0x00); -} -LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x89); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) - -LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x88); - emit_byte(0x84+8*s); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); -} -LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) - -LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) -{ - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x8b); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); + ADDR32 MOVLmr(base, baser, index, factor, d); } -LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) { - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); + ADDR32 MOVWmr(base, baser, index, factor, d); } -LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) { - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - emit_byte(0x8a); - emit_byte(0x84+8*d); - emit_byte(baser+8*index+0x40*fi); - emit_long(base); + ADDR32 MOVBmr(base, baser, index, factor, d); } -LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) { - int fi; - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: - jit_abort("Bad factor %d in mov_l_rm_indexed!",factor); - } - emit_byte(0x8b); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); } -LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) { - int fi; - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: - jit_abort("Bad factor %d in mov_l_rm_indexed!",factor); - } - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cond); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); - } + if (have_cmov) + ADDR32 CMOVLmr(cond, base, X86_NOREG, index, factor, d); else { /* replacement using branch and mov */ - int uncc=(cond^1); - emit_byte(0x70+uncc); - emit_byte(7); /* skip next 7 bytes if not cc=true */ - emit_byte(0x8b); - emit_byte(0x04+8*d); - emit_byte(0x05+8*index+64*fi); - emit_long(base); + uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); } } -LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) { - if (have_cmov) { - emit_byte(0x0f); - emit_byte(0x40+cond); - emit_byte(0x05+8*d); - emit_long(mem); - } + if (have_cmov) + CMOVLmr(cond, mem, X86_NOREG, X86_NOREG, 1, d); else { /* replacement using branch and mov */ - int uncc=(cond^1); - emit_byte(0x70+uncc); - emit_byte(6); /* skip next 6 bytes if not cc=true */ - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(mem); + uae_s8 *target_p = (uae_s8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + ADDR32 MOVLmr(mem, X86_NOREG, X86_NOREG, 1, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); } } -LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x8b); - emit_byte(0x40+8*d+s); - emit_byte(offset); + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x40+8*d+s); - emit_byte(offset); + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x8a); - emit_byte(0x40+8*d+s); - emit_byte(offset); + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) { - emit_byte(0x8b); - emit_byte(0x80+8*d+s); - emit_long(offset); + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) { - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x80+8*d+s); - emit_long(offset); + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) { - emit_byte(0x8a); - emit_byte(0x80+8*d+s); - emit_long(offset); + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0xc7); - emit_byte(0x40+d); - emit_byte(offset); - emit_long(i); + ADDR32 MOVLim(i, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0xc7); - emit_byte(0x40+d); - emit_byte(offset); - emit_word(i); + ADDR32 MOVWim(i, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0xc6); - emit_byte(0x40+d); - emit_byte(offset); - emit_byte(i); + ADDR32 MOVBim(i, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) { - Dif(!isbyte(offset)) abort(); - emit_byte(0x88); - emit_byte(0x40+8*s+d); - emit_byte(offset); + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) { - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x8d); - emit_byte(0x40+8*d+s); - emit_byte(offset); - } - else { - emit_byte(0x8d); - emit_byte(0x80+8*d+s); - emit_long(offset); - } + ADDR32 LEALmr(offset, s, X86_NOREG, 1, d); } -LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) { - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x8d); - emit_byte(0x44+8*d); - emit_byte(0x40*fi+8*index+s); - emit_byte(offset); - } - else { - emit_byte(0x8d); - emit_byte(0x84+8*d); - emit_byte(0x40*fi+8*index+s); - emit_long(offset); - } + ADDR32 LEALmr(offset, s, index, factor, d); } -LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) { - int isebp=(s==5)?0x40:0; - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } + ADDR32 LEALmr(0, s, index, factor, d); +} - emit_byte(0x8d); - emit_byte(0x04+8*d+isebp); - emit_byte(0x40*fi+8*index+s); - if (isebp) - emit_byte(0); +LOWFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) +{ + ADDR32 LEALmr(0, X86_NOREG, index, factor, d); } -LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) { - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x89); - emit_byte(0x40+8*s+d); - emit_byte(offset); - } - else { - emit_byte(0x89); - emit_byte(0x80+8*s+d); - emit_long(offset); - } + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) { - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x80+8*s+d); - emit_long(offset); + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) { - if (optimize_imm8 && isbyte(offset)) { - emit_byte(0x88); - emit_byte(0x40+8*s+d); - emit_byte(offset); - } - else { - emit_byte(0x88); - emit_byte(0x80+8*s+d); - emit_long(offset); - } + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) { - emit_byte(0x0f); - emit_byte(0xc8+r); + BSWAPLr(r); } -LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) { - emit_byte(0x66); - emit_byte(0xc1); - emit_byte(0xc0+r); - emit_byte(0x08); + ROLWir(8, r); } -LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) { - emit_byte(0x89); - emit_byte(0xc0+8*s+d); + MOVLrr(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) { - emit_byte(0x89); - emit_byte(0x05+8*s); - emit_long(d); + ADDR32 MOVLrm(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) { - emit_byte(0x66); - emit_byte(0x89); - emit_byte(0x05+8*s); - emit_long(d); + ADDR32 MOVWrm(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) { - emit_byte(0x66); - emit_byte(0x8b); - emit_byte(0x05+8*d); - emit_long(s); + ADDR32 MOVWmr(s, X86_NOREG, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) { - emit_byte(0x88); - emit_byte(0x05+8*(s&0xf)); /* XXX this handles %ah case (defined as 0x10+4) and others */ - emit_long(d); + ADDR32 MOVBrm(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) { - emit_byte(0x8a); - emit_byte(0x05+8*d); - emit_long(s); + ADDR32 MOVBmr(s, X86_NOREG, X86_NOREG, 1, d); } -LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) { - emit_byte(0xb8+d); - emit_long(s); + MOVLir(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) { - emit_byte(0x66); - emit_byte(0xb8+d); - emit_word(s); + MOVWir(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) { - emit_byte(0xb0+d); - emit_byte(s); + MOVBir(s, d); } -LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) { - emit_byte(0x81); - emit_byte(0x15); - emit_long(d); - emit_long(s); + ADDR32 ADCLim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) -LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) +LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) { - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x05); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x05); - emit_long(d); - emit_long(s); - } + ADDR32 ADDLim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) -LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) +LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) { - emit_byte(0x66); - emit_byte(0x81); - emit_byte(0x05); - emit_long(d); - emit_word(s); + ADDR32 ADDWim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) -LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) +LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) { - emit_byte(0x80); - emit_byte(0x05); - emit_long(d); - emit_byte(s); + ADDR32 ADDBim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) { - if (optimize_accum && isaccum(d)) - emit_byte(0xa9); - else { - emit_byte(0xf7); - emit_byte(0xc0+d); - } - emit_long(i); + TESTLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) { - emit_byte(0x85); - emit_byte(0xc0+8*s+d); + TESTLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x85); - emit_byte(0xc0+8*s+d); + TESTWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) { - emit_byte(0x84); - emit_byte(0xc0+8*s+d); + TESTBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) { - emit_byte(0x81); - emit_byte(0xf0+d); - emit_long(i); + XORLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) { - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x25); - else { - emit_byte(0x81); - emit_byte(0xe0+d); - } - emit_long(i); - } + ANDLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) { - emit_byte(0x66); - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x25); - else { - emit_byte(0x81); - emit_byte(0xe0+d); - } - emit_word(i); - } + ANDWir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) { - emit_byte(0x21); - emit_byte(0xc0+8*s+d); + ANDLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x21); - emit_byte(0xc0+8*s+d); + ANDWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) { - emit_byte(0x20); - emit_byte(0xc0+8*s+d); + ANDBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) { - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x0d); - else { - emit_byte(0x81); - emit_byte(0xc8+d); - } - emit_long(i); - } + ORLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) { - emit_byte(0x09); - emit_byte(0xc0+8*s+d); + ORLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x09); - emit_byte(0xc0+8*s+d); + ORWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) { - emit_byte(0x08); - emit_byte(0xc0+8*s+d); + ORBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) { - emit_byte(0x11); - emit_byte(0xc0+8*s+d); + ADCLrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x11); - emit_byte(0xc0+8*s+d); + ADCWrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) { - emit_byte(0x10); - emit_byte(0xc0+8*s+d); + ADCBrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) { - emit_byte(0x01); - emit_byte(0xc0+8*s+d); + ADDLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x01); - emit_byte(0xc0+8*s+d); + ADDWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) { - emit_byte(0x00); - emit_byte(0xc0+8*s+d); + ADDBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) { - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xe8+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x2d); - else { - emit_byte(0x81); - emit_byte(0xe8+d); - } - emit_long(i); - } + SUBLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) { - if (optimize_accum && isaccum(d)) - emit_byte(0x2c); - else { - emit_byte(0x80); - emit_byte(0xe8+d); - } - emit_byte(i); + SUBBir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) { - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x05); - else { - emit_byte(0x81); - emit_byte(0xc0+d); - } - emit_long(i); - } + ADDLir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) { - emit_byte(0x66); - if (isbyte(i)) { - emit_byte(0x83); - emit_byte(0xc0+d); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(d)) - emit_byte(0x05); - else { - emit_byte(0x81); - emit_byte(0xc0+d); - } - emit_word(i); - } + ADDWir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) { - if (optimize_accum && isaccum(d)) - emit_byte(0x04); - else { - emit_byte(0x80); - emit_byte(0xc0+d); - } - emit_byte(i); + ADDBir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) { - emit_byte(0x19); - emit_byte(0xc0+8*s+d); + SBBLrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x19); - emit_byte(0xc0+8*s+d); + SBBWrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) { - emit_byte(0x18); - emit_byte(0xc0+8*s+d); + SBBBrr(s, d); } -LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) { - emit_byte(0x29); - emit_byte(0xc0+8*s+d); + SUBLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x29); - emit_byte(0xc0+8*s+d); + SUBWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) { - emit_byte(0x28); - emit_byte(0xc0+8*s+d); + SUBBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) { - emit_byte(0x39); - emit_byte(0xc0+8*s+d); + CMPLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) { - if (optimize_imm8 && isbyte(i)) { - emit_byte(0x83); - emit_byte(0xf8+r); - emit_byte(i); - } - else { - if (optimize_accum && isaccum(r)) - emit_byte(0x3d); - else { - emit_byte(0x81); - emit_byte(0xf8+r); - } - emit_long(i); - } + CMPLir(i, r); } -LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x39); - emit_byte(0xc0+8*s+d); + CMPWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) { - emit_byte(0x80); - emit_byte(0x3d); - emit_long(d); - emit_byte(s); + ADDR32 CMPBim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) { - if (optimize_accum && isaccum(d)) - emit_byte(0x3c); - else { - emit_byte(0x80); - emit_byte(0xf8+d); - } - emit_byte(i); + CMPBir(i, d); } -LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) { - emit_byte(0x38); - emit_byte(0xc0+8*s+d); + CMPBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) { - int fi; - - switch(factor) { - case 1: fi=0; break; - case 2: fi=1; break; - case 4: fi=2; break; - case 8: fi=3; break; - default: abort(); - } - emit_byte(0x39); - emit_byte(0x04+8*d); - emit_byte(5+8*index+0x40*fi); - emit_long(offset); + ADDR32 CMPLmr(offset, X86_NOREG, index, factor, d); } -LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) { - emit_byte(0x31); - emit_byte(0xc0+8*s+d); + XORLrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) { - emit_byte(0x66); - emit_byte(0x31); - emit_byte(0xc0+8*s+d); + XORWrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) { - emit_byte(0x30); - emit_byte(0xc0+8*s+d); + XORBrr(s, d); } -LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) { - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x2d); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x2d); - emit_long(d); - emit_long(s); - } + ADDR32 SUBLim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) { - if (optimize_imm8 && isbyte(s)) { - emit_byte(0x83); - emit_byte(0x3d); - emit_long(d); - emit_byte(s); - } - else { - emit_byte(0x81); - emit_byte(0x3d); - emit_long(d); - emit_long(s); - } + ADDR32 CMPLim(s, d, X86_NOREG, X86_NOREG, 1); } -LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) { - emit_byte(0x87); - emit_byte(0xc0+8*r1+r2); + XCHGLrr(r2, r1); } -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) { - emit_byte(0x86); - emit_byte(0xc0+8*(r1&0xf)+(r2&0xf)); /* XXX this handles upper-halves registers (e.g. %ah defined as 0x10+4) */ + XCHGBrr(r2, r1); } -LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) - -/************************************************************************* - * FIXME: mem access modes probably wrong * - *************************************************************************/ LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) { - emit_byte(0x9c); + PUSHF(); } -LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) LOWFUNC(WRITE,READ,0,raw_popfl,(void)) { - emit_byte(0x9d); + POPF(); } -LENDFUNC(WRITE,READ,0,raw_popfl,(void)) /* Generate floating-point instructions */ static inline void x86_fadd_m(MEMR s) { - emit_byte(0xdc); - emit_byte(0x05); - emit_long(s); + ADDR32 FADDLm(s,X86_NOREG,X86_NOREG,1); } -#endif /************************************************************************* * Unoptimizable stuff --- jump * @@ -3102,62 +1149,22 @@ static inline void x86_fadd_m(MEMR s) static inline void raw_call_r(R4 r) { -#if USE_NEW_RTASM CALLsr(r); -#else - emit_byte(0xff); - emit_byte(0xd0+r); -#endif } static inline void raw_call_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) { -#if USE_NEW_RTASM ADDR32 CALLsm(base, X86_NOREG, r, m); -#else - int mu; - switch(m) { - case 1: mu=0; break; - case 2: mu=1; break; - case 4: mu=2; break; - case 8: mu=3; break; - default: abort(); - } - emit_byte(0xff); - emit_byte(0x14); - emit_byte(0x05+8*r+0x40*mu); - emit_long(base); -#endif } static inline void raw_jmp_r(R4 r) { -#if USE_NEW_RTASM JMPsr(r); -#else - emit_byte(0xff); - emit_byte(0xe0+r); -#endif } static inline void raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) { -#if USE_NEW_RTASM ADDR32 JMPsm(base, X86_NOREG, r, m); -#else - int mu; - switch (m) { - case 1: mu=0; break; - case 2: mu=1; break; - case 4: mu=2; break; - case 8: mu=3; break; - default: abort(); - } - emit_byte(0xff); - emit_byte(0x24); - emit_byte(0x05+8*r+0x40*mu); - emit_long(base); -#endif } static inline void raw_jmp_m(uae_u32 base) @@ -3170,22 +1177,12 @@ static inline void raw_jmp_m(uae_u32 base) static inline void raw_call(uae_u32 t) { -#if USE_NEW_RTASM ADDR32 CALLm(t); -#else - emit_byte(0xe8); - emit_long(t-(uintptr)target-4); -#endif } static inline void raw_jmp(uae_u32 t) { -#if USE_NEW_RTASM ADDR32 JMPm(t); -#else - emit_byte(0xe9); - emit_long(t-(uintptr)target-4); -#endif } static inline void raw_jl(uae_u32 t) @@ -3385,10 +1382,12 @@ static __inline__ void raw_flags_set_zero_FLAGREG(int s, int tmp) { raw_mov_l_rr(tmp,s); raw_lahf(s); /* flags into ah */ + SETOr(X86_AL); /* V flag into al */ raw_and_l_ri(s,0xffffbfff); raw_and_l_ri(tmp,0x00004000); raw_xor_l_ri(tmp,0x00004000); raw_or_l(s,tmp); + raw_cmp_b_ri(X86_AL,-127); /* set V */ raw_sahf(s); } @@ -3509,28 +1508,18 @@ static inline void raw_flags_init_FLAGGEN(void) flag reload to avoid the partial memory stall */ static inline void raw_load_flagreg(uae_u32 target, uae_u32 r) { -#if 1 + /* attention: in 64bit mode, relies on LITTE_ENDIANESS of regflags.cznv */ raw_mov_l_rm(target,(uintptr)live.state[r].mem); -#else - raw_mov_b_rm(target,(uintptr)live.state[r].mem); - raw_mov_b_rm(target+4,((uintptr)live.state[r].mem)+1); -#endif } -#ifdef UAE -/* FLAGX is word-sized */ -#else -/* FLAGX is byte sized, and we *do* write it at that size */ -#endif static inline void raw_load_flagx(uae_u32 target, uae_u32 r) { -#ifdef UAE - if (live.nat[target].canword) -#else +#if FLAGBIT_X < 8 if (live.nat[target].canbyte) raw_mov_b_rm(target,(uintptr)live.state[r].mem); - else if (live.nat[target].canword) + else #endif + if (live.nat[target].canword) raw_mov_w_rm(target,(uintptr)live.state[r].mem); else raw_mov_l_rm(target,(uintptr)live.state[r].mem); @@ -3742,8 +1731,7 @@ cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) cpuid_count(op, 0, eax, ebx, ecx, edx); } -static void -raw_init_cpu(void) +static void raw_init_cpu(void) { struct cpuinfo_x86 *c = &cpuinfo; uae_u32 dummy; @@ -3890,7 +1878,7 @@ raw_init_cpu(void) } #ifndef UAE -static void inline prevent_redzone_use(void) {} +static void __attribute__((noinline)) prevent_redzone_use(void) {} static bool target_check_bsf(void) { @@ -4049,9 +2037,8 @@ static inline void tos_make(int r) } /* FP helper functions */ -#if USE_NEW_RTASM #define DEFINE_OP(NAME, GEN) \ -static inline void raw_##NAME(uint32 m) \ +static inline void raw_##NAME(uintptr m) \ { \ GEN(m, X86_NOREG, X86_NOREG, 1); \ } @@ -4065,35 +2052,15 @@ DEFINE_OP(fsts, FSTSm); DEFINE_OP(fstpt, FSTPTm); DEFINE_OP(fldt, FLDTm); DEFINE_OP(fistpl, FISTPLm); -#else -#define DEFINE_OP(NAME, OP1, OP2) \ -static inline void raw_##NAME(uint32 m) \ -{ \ - emit_byte(OP1); \ - emit_byte(OP2); \ - emit_long(m); \ -} -DEFINE_OP(fstl, 0xdd, 0x15); -DEFINE_OP(fstpl, 0xdd, 0x1d); -DEFINE_OP(fldl, 0xdd, 0x05); -DEFINE_OP(fildl, 0xdb, 0x05); -DEFINE_OP(fistl, 0xdb, 0x15); -DEFINE_OP(flds, 0xd9, 0x05); -DEFINE_OP(fsts, 0xd9, 0x15); -DEFINE_OP(fstpt, 0xdb, 0x3d); -DEFINE_OP(fldt, 0xdb, 0x2d); -DEFINE_OP(fistpl, 0xdb, 0x1d); -#endif #undef DEFINE_OP -LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMPTRW m, FR r)) { make_tos(r); raw_fstl(m); } -LENDFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) -LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMPTRW m, FR r)) { make_tos(r); raw_fstpl(m); @@ -4101,30 +2068,26 @@ LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMW m, FR r)) live.tos--; live.spos[r]=-2; } -LENDFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMW m, FR r)) -LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) +LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMPTRR m)) { raw_fldl(m); tos_make(r); } -LENDFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMR m)) -LOWFUNC(NONE,READ,2,raw_fmovi_rm,(FW r, MEMR m)) +LOWFUNC(NONE,READ,2,raw_fmovi_rm,(FW r, MEMPTRR m)) { raw_fildl(m); tos_make(r); } -LENDFUNC(NONE,READ,2,raw_fmovi_rm,(FW r, MEMR m)) -LOWFUNC(NONE,WRITE,2,raw_fmovi_mr,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmovi_mr,(MEMPTRW m, FR r)) { make_tos(r); raw_fistl(m); } -LENDFUNC(NONE,WRITE,2,raw_fmovi_mr,(MEMW m, FR r)) -LOWFUNC(NONE,WRITE,3,raw_fmovi_mrb,(MEMW m, FR r, double *bounds)) +LOWFUNC(NONE,WRITE,3,raw_fmovi_mrb,(MEMPTRW m, FR r, double *bounds)) { /* Clamp value to the given range and convert to integer. */ @@ -4155,23 +2118,20 @@ LOWFUNC(NONE,WRITE,3,raw_fmovi_mrb,(MEMW m, FR r, double *bounds)) /* Store to destination */ raw_fistpl(m); } -LENDFUNC(NONE,WRITE,3,raw_fmovi_mrb,(MEMW m, FR r, double *bounds)) -LOWFUNC(NONE,READ,2,raw_fmovs_rm,(FW r, MEMR m)) +LOWFUNC(NONE,READ,2,raw_fmovs_rm,(FW r, MEMPTRR m)) { raw_flds(m); tos_make(r); } -LENDFUNC(NONE,READ,2,raw_fmovs_rm,(FW r, MEMR m)) -LOWFUNC(NONE,WRITE,2,raw_fmovs_mr,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmovs_mr,(MEMPTRW m, FR r)) { make_tos(r); raw_fsts(m); } -LENDFUNC(NONE,WRITE,2,raw_fmovs_mr,(MEMW m, FR r)) -LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr,(MEMPTRW m, FR r)) { int rs; @@ -4183,9 +2143,8 @@ LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr,(MEMW m, FR r)) raw_fstpt(m); /* store and pop it */ } -LENDFUNC(NONE,WRITE,2,raw_fmov_ext_mr,(MEMW m, FR r)) -LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr_drop,(MEMW m, FR r)) +LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr_drop,(MEMPTRW m, FR r)) { make_tos(r); raw_fstpt(m); /* store and pop it */ @@ -4193,14 +2152,12 @@ LOWFUNC(NONE,WRITE,2,raw_fmov_ext_mr_drop,(MEMW m, FR r)) live.tos--; live.spos[r]=-2; } -LENDFUNC(NONE,WRITE,2,raw_fmov_ext_mr,(MEMW m, FR r)) -LOWFUNC(NONE,READ,2,raw_fmov_ext_rm,(FW r, MEMR m)) +LOWFUNC(NONE,READ,2,raw_fmov_ext_rm,(FW r, MEMPTRR m)) { raw_fldt(m); tos_make(r); } -LENDFUNC(NONE,READ,2,raw_fmov_ext_rm,(FW r, MEMR m)) LOWFUNC(NONE,NONE,1,raw_fmov_pi,(FW r)) { @@ -4208,7 +2165,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_pi,(FW r)) emit_byte(0xeb); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_pi,(FW r)) LOWFUNC(NONE,NONE,1,raw_fmov_log10_2,(FW r)) { @@ -4216,7 +2172,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_log10_2,(FW r)) emit_byte(0xec); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_log10_2,(FW r)) LOWFUNC(NONE,NONE,1,raw_fmov_log2_e,(FW r)) { @@ -4224,7 +2179,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_log2_e,(FW r)) emit_byte(0xea); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_log2_e,(FW r)) LOWFUNC(NONE,NONE,1,raw_fmov_loge_2,(FW r)) { @@ -4232,7 +2186,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_loge_2,(FW r)) emit_byte(0xed); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_loge_2,(FW r)) LOWFUNC(NONE,NONE,1,raw_fmov_1,(FW r)) { @@ -4240,7 +2193,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_1,(FW r)) emit_byte(0xe8); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_1,(FW r)) LOWFUNC(NONE,NONE,1,raw_fmov_0,(FW r)) { @@ -4248,7 +2200,6 @@ LOWFUNC(NONE,NONE,1,raw_fmov_0,(FW r)) emit_byte(0xee); tos_make(r); } -LENDFUNC(NONE,NONE,1,raw_fmov_0,(FW r)) LOWFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) { @@ -4268,7 +2219,6 @@ LOWFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) tos_make(d); /* store to destination, pop if necessary */ } } -LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) LOWFUNC(NONE,READ,2,raw_fldcw_m_indexed,(R4 index, IMM base)) { @@ -4277,7 +2227,6 @@ LOWFUNC(NONE,READ,2,raw_fldcw_m_indexed,(R4 index, IMM base)) emit_byte(0xa8 + index); emit_long(base); } -LENDFUNC(NONE,READ,2,raw_fldcw_m_indexed,(R4 index, IMM base)) LOWFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) { @@ -4298,7 +2247,6 @@ LOWFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) emit_byte(0xfa); /* take square root */ } } -LENDFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) { @@ -4319,7 +2267,6 @@ LOWFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) emit_byte(0xe1); /* take fabs */ } } -LENDFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) { @@ -4340,7 +2287,6 @@ LOWFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) emit_byte(0xfc); /* take frndint */ } } -LENDFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) { @@ -4361,7 +2307,6 @@ LOWFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) emit_byte(0xff); /* take cos */ } } -LENDFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) { @@ -4382,7 +2327,6 @@ LOWFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) emit_byte(0xfe); /* fsin y=sin(x) */ } } -LENDFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) static const double one = 1; @@ -4399,19 +2343,18 @@ LOWFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) emit_byte(0xd9); emit_byte(0xfc); /* frndint int(x) */ emit_byte(0xd9); - emit_byte(0xc9); /* swap top two elements */ + emit_byte(0xc9); /* swap top two elements */ emit_byte(0xd8); - emit_byte(0xe1); /* subtract rounded from original */ + emit_byte(0xe1); /* fsub frac(x) = x - int(x) */ emit_byte(0xd9); - emit_byte(0xf0); /* f2xm1 */ - x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ + emit_byte(0xf0); /* f2xm1 (2^frac(x))-1 */ + x86_fadd_m((uintptr) &one); /* Add '1' without using extra stack space */ emit_byte(0xd9); - emit_byte(0xfd); /* and scale it */ + emit_byte(0xfd); /* fscale (2^frac(x))*2^int(x) */ emit_byte(0xdd); - emit_byte(0xd9); /* take he rounded value off */ - tos_make(d); /* store to destination */ + emit_byte(0xd9); /* fstp copy & pop */ + tos_make(d); /* store y=2^x */ } -LENDFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) { @@ -4443,7 +2386,6 @@ LOWFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) emit_byte(0xd9); /* take he rounded value off */ tos_make(d); /* store to destination */ } -LENDFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) { @@ -4461,7 +2403,6 @@ LOWFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) emit_byte(0xf1); /* take 1*log2(x) */ tos_make(d); /* store to destination */ } -LENDFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) @@ -4483,7 +2424,6 @@ LOWFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) emit_byte(0xe0); /* take fchs */ } } -LENDFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) { @@ -4506,7 +2446,6 @@ LOWFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) emit_byte(0xc0+ds); /* add source to dest*/ } } -LENDFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) { @@ -4529,7 +2468,6 @@ LOWFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) emit_byte(0xe0+ds); /* sub src from dest */ } } -LENDFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) { @@ -4544,7 +2482,6 @@ LOWFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) emit_byte(0xdd); emit_byte(0xe0+ds); /* cmp dest with source*/ } -LENDFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) LOWFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) { @@ -4567,7 +2504,6 @@ LOWFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) emit_byte(0xc8+ds); /* mul dest by source*/ } } -LENDFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) { @@ -4590,7 +2526,6 @@ LOWFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) emit_byte(0xf0+ds); /* div dest by source*/ } } -LENDFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) { @@ -4608,7 +2543,6 @@ LOWFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) emit_byte(0xd9); emit_byte(0xf8); /* take rem from dest by source */ } -LENDFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) { @@ -4626,7 +2560,6 @@ LOWFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) emit_byte(0xd9); emit_byte(0xf5); /* take rem1 from dest by source */ } -LENDFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) @@ -4635,7 +2568,6 @@ LOWFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) emit_byte(0xd9); /* ftst */ emit_byte(0xe4); } -LENDFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) LOWFUNC(NONE,NONE,2,raw_fetoxM1_rr,(FW d, FR s)) { @@ -4669,7 +2601,6 @@ LOWFUNC(NONE,NONE,2,raw_fetoxM1_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=(e^x)-1 */ } -LENDFUNC(NONE,NONE,2,raw_fetoxM1_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_ftentox_rr,(FW d, FR s)) { @@ -4704,7 +2635,6 @@ LOWFUNC(NONE,NONE,2,raw_ftentox_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=10^x */ } -LENDFUNC(NONE,NONE,2,raw_ftentox_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,3,raw_fsincos_rr,(FW d, FW c, FR s)) { @@ -4749,7 +2679,6 @@ LOWFUNC(NONE,NONE,3,raw_fsincos_rr,(FW d, FW c, FR s)) tos_make(d); /* store sin(x) to destination */ } } -LENDFUNC(NONE,NONE,3,raw_fsincos_rr,(FW d, FW c, FR s)) LOWFUNC(NONE,NONE,2,raw_fscale_rr,(FRW d, FR s)) { @@ -4770,7 +2699,6 @@ LOWFUNC(NONE,NONE,2,raw_fscale_rr,(FRW d, FR s)) tos_make(d); /* store y=y*(2^x) */ } } -LENDFUNC(NONE,NONE,2,raw_fscale_rr,(FRW d, FR s)) LOWFUNC(NONE,NONE,2,raw_ftan_rr,(FW d, FR s)) { @@ -4794,7 +2722,6 @@ LOWFUNC(NONE,NONE,2,raw_ftan_rr,(FW d, FR s)) emit_byte(0xd8); /* fstp pop 1.0 */ } } -LENDFUNC(NONE,NONE,2,raw_ftan_rr,(FW d, FR s)) #ifdef CPU_x86_64 #define REX64() emit_byte(0x48) @@ -4821,7 +2748,6 @@ LOWFUNC(NONE,NONE,1,raw_fcuts_r,(FRW r)) emit_byte(0xc4); emit_byte(0x04); /* add +4 to esp */ } -LENDFUNC(NONE,NONE,1,raw_fcuts_r,(FRW r)) LOWFUNC(NONE,NONE,1,raw_fcut_r,(FRW r)) { @@ -4842,7 +2768,6 @@ LOWFUNC(NONE,NONE,1,raw_fcut_r,(FRW r)) emit_byte(0xc4); emit_byte(0x08); /* add +8 to esp */ } -LENDFUNC(NONE,NONE,1,raw_fcut_r,(FRW r)) LOWFUNC(NONE,NONE,2,raw_fgetexp_rr,(FW d, FR s)) { @@ -4866,7 +2791,6 @@ LOWFUNC(NONE,NONE,2,raw_fgetexp_rr,(FW d, FR s)) emit_byte(0xd8); /* fstp just pop man */ } } -LENDFUNC(NONE,NONE,2,raw_fgetexp_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fgetman_rr,(FW d, FR s)) { @@ -4890,7 +2814,6 @@ LOWFUNC(NONE,NONE,2,raw_fgetman_rr,(FW d, FR s)) emit_byte(0xd9); /* fstp copy man up & pop */ } } -LENDFUNC(NONE,NONE,2,raw_fgetman_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_flogN_rr,(FW d, FR s)) { @@ -4912,7 +2835,6 @@ LOWFUNC(NONE,NONE,2,raw_flogN_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=logN(x) */ } -LENDFUNC(NONE,NONE,2,raw_flogN_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_flogNP1_rr,(FW d, FR s)) { @@ -4934,7 +2856,6 @@ LOWFUNC(NONE,NONE,2,raw_flogNP1_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=logN(x+1) */ } -LENDFUNC(NONE,NONE,2,raw_flogNP1_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_flog10_rr,(FW d, FR s)) { @@ -4956,7 +2877,6 @@ LOWFUNC(NONE,NONE,2,raw_flog10_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=log10(x) */ } -LENDFUNC(NONE,NONE,2,raw_flog10_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fasin_rr,(FW d, FR s)) { @@ -4981,9 +2901,8 @@ LOWFUNC(NONE,NONE,2,raw_fasin_rr,(FW d, FR s)) emit_byte(0xf3); /* fpatan atan(x/sqrt(1-(x^2))) & pop */ tos_make(d); /* store y=asin(x) */ } -LENDFUNC(NONE,NONE,2,raw_fasin_rr,(FW d, FR s)) -static uae_u32 pihalf[] = {0x2168c234, 0xc90fdaa2, 0x3fff}; // LSB=0 to get acos(1)=0 +static uae_u32 const pihalf[] = {0x2168c234, 0xc90fdaa2, 0x3fff}; // LSB=0 to get acos(1)=0 LOWFUNC(NONE,NONE,2,raw_facos_rr,(FW d, FR s)) { @@ -5011,7 +2930,6 @@ LOWFUNC(NONE,NONE,2,raw_facos_rr,(FW d, FR s)) emit_byte(0xe1); /* fsubrp pi/2 - asin(x) & pop */ tos_make(d); /* store y=acos(x) */ } -LENDFUNC(NONE,NONE,2,raw_facos_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fatan_rr,(FW d, FR s)) { @@ -5031,7 +2949,6 @@ LOWFUNC(NONE,NONE,2,raw_fatan_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=atan(x) */ } -LENDFUNC(NONE,NONE,2,raw_fatan_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fatanh_rr,(FW d, FR s)) { @@ -5066,7 +2983,6 @@ LOWFUNC(NONE,NONE,2,raw_fatanh_rr,(FW d, FR s)) emit_byte(0xd9); /* fstp copy & pop */ tos_make(d); /* store y=atanh(x) */ } -LENDFUNC(NONE,NONE,2,raw_fatanh_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fsinh_rr,(FW d, FR s)) { @@ -5159,7 +3075,6 @@ LOWFUNC(NONE,NONE,2,raw_fsinh_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=sinh(x) */ } -LENDFUNC(NONE,NONE,2,raw_fsinh_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_fcosh_rr,(FW d, FR s)) { @@ -5248,7 +3163,6 @@ LOWFUNC(NONE,NONE,2,raw_fcosh_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=cosh(x) */ } -LENDFUNC(NONE,NONE,2,raw_fcosh_rr,(FW d, FR s)) LOWFUNC(NONE,NONE,2,raw_ftanh_rr,(FW d, FR s)) { @@ -5337,7 +3251,6 @@ LOWFUNC(NONE,NONE,2,raw_ftanh_rr,(FW d, FR s)) if (s!=d) tos_make(d); /* store y=tanh(x) */ } -LENDFUNC(NONE,NONE,2,raw_ftanh_rr,(FW d, FR s)) /* %eax register is clobbered if target processor doesn't support fucomi */ #define FFLAG_NREG_CLOBBER_CONDITION !have_cmov diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h index 6743392d4..0eaef50af 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h @@ -402,22 +402,54 @@ typedef unsigned int _ul; /* --- Memory subformats - urgh! ------------------------------------------- */ /* _r_D() is RIP addressing mode if X86_TARGET_64BIT, use _r_DSIB() instead */ -#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((long)(D))) -#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((long)(D))) +#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((uae_u32)(D))) +#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((uae_u32)(D))) #define _r_0B( R, B ) (_Mrm(_b00,_rN(R),_rA(B)) ) #define _r_0BIS(R, B,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)) ) -#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((long)(D))) -#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((long)(D))) -#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((long)(D))) -#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((long)(D))) -#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((long)(D))) +#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((uae_u32)(D))) +#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((uae_u32)(D))) +#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((uae_u32)(D))) +#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((uae_u32)(D))) +#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((uae_u32)(D))) #define _r_DB( R, D,B ) ((_s0P(D) && (!_rbp13P(B)) ? _r_0B (R, B ) : (_s8P(D) ? _r_1B( R,D,B ) : _r_4B( R,D,B )))) #define _r_DBIS(R, D,B,I,S) ((_s0P(D) && (!_rbp13P(B)) ? _r_0BIS(R, B,I,S) : (_s8P(D) ? _r_1BIS(R,D,B,I,S) : _r_4BIS(R,D,B,I,S)))) /* Use RIP-addressing in 64-bit mode, if possible */ -#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && \ - ((uintptr)x86_get_target() + 4 + (O) - (D) <= 0xffffffff)) +#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && x86_RIP_addressing_possible(D, O)) + +static inline int x86_RIP_addressing_possible(uintptr addr, uintptr offset) +{ +#if X86_TARGET_64BIT + /* + * address of the next instruction. + * The opcode has already been emmitted, + * so this is the size of an 32bit displacement + + * the size of any immediate value that is part of the instruction (offset), + */ + uintptr dst = (uintptr)get_target() + 4 + offset; + intptr disp = dst - addr; + int ok = disp >= -0x80000000LL && disp <= 0x7fffffffLL; + /* fprintf(stderr, "x86_RIP_addressing_possible: %llx - %llx %16llx = %d\n", (unsigned long long)dst, (unsigned long long)addr, (long long)disp, ok); */ + return ok; +#else + UNUSED(addr); + UNUSED(offset); + return 0; +#endif +} + + +static inline int x86_DISP32_addressing_possible(uintptr addr) +{ +#if X86_TARGET_64BIT + return addr <= 0xFFFFFFFFULL; +#else + UNUSED(addr); + return 1; +#endif +} + #define _r_X( R, D,B,I,S,O) (_r0P(I) ? (_r0P(B) ? (!X86_TARGET_64BIT ? _r_D(R,D) : \ (_x86_RIP_addressing_possible(D, O) ? \ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index 118251c8e..10a97d14d 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -35,11 +35,6 @@ // #include "sysconfig.h" #include "newcpu.h" -#ifdef __x86_64__ -#define CPU_64_BIT 1 -#define CPU_x86_64 1 -#endif - #ifdef UAE #ifdef CPU_64_BIT typedef uae_u64 uintptr; @@ -135,11 +130,19 @@ union cacheline { for jump targets */ #define INDIVIDUAL_INST 0 +#ifdef WINUAE_ARANYM #define FLAG_X 0x0010 #define FLAG_N 0x0008 #define FLAG_Z 0x0004 #define FLAG_V 0x0002 #define FLAG_C 0x0001 +#else +#define FLAG_C 0x0010 +#define FLAG_V 0x0008 +#define FLAG_Z 0x0004 +#define FLAG_N 0x0002 +#define FLAG_X 0x0001 +#endif #define FLAG_CZNV (FLAG_C | FLAG_Z | FLAG_N | FLAG_V) #define FLAG_ALL (FLAG_C | FLAG_Z | FLAG_N | FLAG_V | FLAG_X) #define FLAG_ZNV (FLAG_Z | FLAG_N | FLAG_V) @@ -165,27 +168,74 @@ extern void compiler_init(void); extern void compiler_exit(void); extern bool compiler_use_jit(void); #endif -extern void init_comp(void); extern void flush(int save_regs); -extern void small_flush(int save_regs); extern void set_target(uae_u8* t); extern uae_u8* get_target(void); -extern void freescratch(void); +#ifdef UAE extern void build_comp(void); +#endif extern void set_cache_state(int enabled); extern int get_cache_state(void); extern uae_u32 get_jitted_size(void); #ifdef JIT -#ifdef WINUAE_ARANYM -extern void (*flush_icache)(int n); -#else -extern void flush_icache(int n); -#endif +extern void (*flush_icache)(void); #endif extern void alloc_cache(void); extern int check_for_cache_miss(void); /* JIT FPU compilation */ +struct jit_disable_opcodes { + bool fbcc; + bool fdbcc; + bool fscc; + bool ftrapcc; + bool fsave; + bool frestore; + bool fmove; + bool fmovem; + bool fmovec; /* for move control register */ + bool fmovecr; /* for move from constant rom */ + bool fint; + bool fsinh; + bool fintrz; + bool fsqrt; + bool flognp1; + bool fetoxm1; + bool ftanh; + bool fatan; + bool fasin; + bool fatanh; + bool fsin; + bool ftan; + bool fetox; + bool ftwotox; + bool ftentox; + bool flogn; + bool flog10; + bool flog2; + bool fabs; + bool fcosh; + bool fneg; + bool facos; + bool fcos; + bool fgetexp; + bool fgetman; + bool fdiv; + bool fmod; + bool fadd; + bool fmul; + bool fsgldiv; + bool frem; + bool fscale; + bool fsglmul; + bool fsub; + bool fsincos; + bool fcmp; + bool ftst; +}; +extern struct jit_disable_opcodes jit_disable; + + extern void comp_fpp_opp (uae_u32 opcode, uae_u16 extra); extern void comp_fbcc_opp (uae_u32 opcode); extern void comp_fscc_opp (uae_u32 opcode, uae_u16 extra); @@ -320,18 +370,20 @@ extern int touchcnt; #define RW4 uae_u32 #define MEMR uae_u32 #define MEMW uae_u32 -#define MEMRW uae_u32 +#define MEMRW uae_u32 +#define MEMPTR uintptr +#define MEMPTRR MEMPTR +#define MEMPTRW MEMPTR +#define MEMPTRRW MEMPTR #define FW uae_u32 #define FR uae_u32 #define FRW uae_u32 #define MIDFUNC(nargs,func,args) void func args -#define MENDFUNC(nargs,func,args) #define COMPCALL(func) func #define LOWFUNC(flags,mem,nargs,func,args) static inline void func args -#define LENDFUNC(flags,mem,nargs,func,args) /* What we expose to the outside */ #define DECLARE_MIDFUNC(func) extern void func @@ -456,8 +508,7 @@ void do_nothing(void); #else -static inline void flush_icache(int) { } -static inline void build_comp() { } +static inline void flush_icache(void) { } #endif /* !USE_JIT */ @@ -520,7 +571,7 @@ void jit_abort(const TCHAR *format, ...); #else #ifdef WINUAE_ARANYM -#define jit_log(format, ...) write_log(format"\n", ##__VA_ARGS__) +#define jit_log(format, ...) D(bug(format, ##__VA_ARGS__)) #define jit_log2(format, ...) D2(bug(format, ##__VA_ARGS__)) void jit_abort(const char *format,...) __attribute__((format(printf, 1, 2))) __attribute__((__noreturn__)); #else diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp index cef6d43e5..5d5de2cdd 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -29,19 +29,19 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* - * UAE - The Un*x Amiga Emulator - * - * MC68881 emulation - * - * Copyright 1996 Herman ten Brugge - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - */ + * UAE - The Un*x Amiga Emulator + * + * MC68881 emulation + * + * Copyright 1996 Herman ten Brugge + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + */ #include "sysdeps.h" -# include -# include -# include +#include +#include +#include #include "memory.h" #include "readcpu.h" @@ -56,6 +56,14 @@ #define DEBUG 0 #include "debug.h" +struct jit_disable_opcodes jit_disable; + +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +#define LD(x) x ## L +#else +#define LD(x) x +#endif + // gb-- WARNING: get_fpcr() and set_fpcr() support is experimental #define HANDLE_FPCR 0 @@ -87,6 +95,7 @@ #define delay2 nop() ;nop() #define UNKNOWN_EXTRA 0xFFFFFFFF +#if 0 static void fpuop_illg(uae_u32 opcode, uae_u32 /* extra */) { /* @@ -97,623 +106,715 @@ static void fpuop_illg(uae_u32 opcode, uae_u32 /* extra */) */ op_illg(opcode); } +#endif uae_s32 temp_fp[4]; /* To convert between FP/integer */ /* return register number, or -1 for failure */ -STATIC_INLINE int get_fp_value (uae_u32 opcode, uae_u16 extra) +STATIC_INLINE int get_fp_value(uae_u32 opcode, uae_u16 extra) { - uaecptr tmppc; - uae_u16 tmp; - int size; - int mode; - int reg; - uae_u32 ad = 0; - static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; - static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; - - if ((extra & 0x4000) == 0) { - return ((extra >> 10) & 7); - } - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - switch (mode) { - case 0: - switch (size) { - case 6: - sign_extend_8_rr(S1,reg); - mov_l_mr((uintptr)temp_fp,S1); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 4: - sign_extend_16_rr(S1,reg); - mov_l_mr((uintptr)temp_fp,S1); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 0: - mov_l_mr((uintptr)temp_fp,reg); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - return FS1; - case 1: - mov_l_mr((uintptr)temp_fp,reg); - delay2; - fmovs_rm(FS1,(uintptr)temp_fp); - return FS1; - default: - return -1; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int const sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int const sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) + { + return ((extra >> 10) & 7); } - return -1; /* Should be unreachable */ - case 1: - return -1; /* Genuine invalid instruction */ - default: - break; - } - /* OK, we *will* have to load something from an address. Let's make - sure we know how to handle that, or quit early --- i.e. *before* - we do any postincrement/predecrement that we may regret */ - - switch (size) { - case 3: - return -1; - case 0: - case 1: - case 2: - case 4: - case 5: - case 6: - break; - default: - return -1; - } - - switch (mode) { - case 2: - ad=S1; /* We will change it, anyway ;-) */ - mov_l_rr(ad,reg+8); - break; - case 3: - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); - break; - case 4: - ad=S1; - - lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); - mov_l_rr(ad,reg+8); - break; - case 5: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(ad,ad,off); - break; - } - case 6: - { - uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - calc_disp_ea_020(reg+8,dp,ad,S2); - break; - } - case 7: - switch (reg) { - case 0: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 1: - { - uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 2: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,address+PC16off); - break; - } - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ m68k_pc_offset; - ad=S1; - // Immediate addressing mode && Operation Length == Byte -> - // Use the low-order byte of the extension word. - if (size == 6) address++; - mov_l_ri(ad,address); - m68k_pc_offset+=sz2[size]; - break; - } - default: - return -1; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + switch (mode) + { + case 0: /* Dn */ + switch (size) + { + case 6: /* byte */ + sign_extend_8_rr(S1, reg); + mov_l_mr((uintptr) temp_fp, S1); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + return FS1; + case 4: /* word */ + sign_extend_16_rr(S1, reg); + mov_l_mr((uintptr) temp_fp, S1); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + return FS1; + case 0: /* long */ + mov_l_mr((uintptr) temp_fp, reg); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + return FS1; + case 1: /* single precision */ + mov_l_mr((uintptr) temp_fp, reg); + delay2; + fmovs_rm(FS1, (uintptr) temp_fp); + return FS1; + default: + return -1; + } + return -1; /* Should be unreachable */ + case 1: /* An */ + return -1; /* Genuine invalid instruction */ + default: + break; } - } - - switch (size) { - case 0: - readlong(ad,S2,S3); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - case 1: - readlong(ad,S2,S3); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovs_rm(FS1,(uintptr)temp_fp); - break; - case 2: - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - delay2; - fmov_ext_rm(FS1,(uintptr)(temp_fp)); - break; - case 3: - return -1; /* Some silly "packed" stuff */ - case 4: - readword(ad,S2,S3); - sign_extend_16_rr(S2,S2); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - case 5: - readlong(ad,S2,S3); - mov_l_mr(((uintptr)temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - delay2; - fmov_rm(FS1,(uintptr)(temp_fp)); - break; - case 6: - readbyte(ad,S2,S3); - sign_extend_8_rr(S2,S2); - mov_l_mr((uintptr)temp_fp,S2); - delay2; - fmovi_rm(FS1,(uintptr)temp_fp); - break; - default: - return -1; - } - return FS1; + + /* OK, we *will* have to load something from an address. Let's make + sure we know how to handle that, or quit early --- i.e. *before* + we do any postincrement/predecrement that we may regret */ + switch (size) + { + case 0: /* long */ + case 1: /* single precision */ + case 2: /* extended precision */ + case 4: /* word */ + case 5: /* double precision */ + case 6: /* byte */ + break; + case 3: /* packed decimal static */ + default: + return -1; + } + + switch (mode) + { + case 2: /* (An) */ + ad = S1; /* We will change it, anyway ;-) */ + mov_l_rr(ad, reg + 8); + break; + case 3: /* (An)+ */ + ad = S1; + mov_l_rr(ad, reg + 8); + lea_l_brr(reg + 8, reg + 8, (reg == 7 ? sz2[size] : sz1[size])); + break; + case 4: /* -(An) */ + ad = S1; + lea_l_brr(reg + 8, reg + 8, -(reg == 7 ? sz2[size] : sz1[size])); + mov_l_rr(ad, reg + 8); + break; + case 5: /* d16(An) */ + { + uae_u32 off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_rr(ad, reg + 8); + lea_l_brr(ad, ad, off); + } + break; + case 6: /* d8(An,Xn) */ + { + uae_u32 dp = comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + calc_disp_ea_020(reg + 8, dp, ad, S2); + } + break; + case 7: + switch (reg) + { + case 0: /* abs.w */ + { + uae_u32 off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_ri(ad, off); + } + break; + case 1: /* abs.l */ + { + uae_u32 off = comp_get_ilong((m68k_pc_offset += 4) - 4); + + ad = S1; + mov_l_ri(ad, off); + } + break; + case 2: /* d16(pc) */ + { + uae_u32 address = start_pc + ((char *) comp_pc_p - (char *) start_pc_p) + m68k_pc_offset; + uae_s32 PC16off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_ri(ad, address + PC16off); + } + break; + case 3: /* d8(pc,Xn) */ + return -1; + case 4: /* #imm */ + { + uae_u32 address = start_pc + ((char *) comp_pc_p - (char *) start_pc_p) + m68k_pc_offset; + + ad = S1; + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if (size == 6) + address++; + mov_l_ri(ad, address); + m68k_pc_offset += sz2[size]; + } + break; + default: + return -1; + } + } + + switch (size) + { + case 0: /* long */ + readlong(ad, S2, S3); + mov_l_mr((uintptr) temp_fp, S2); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + break; + case 1: /* single precision */ + readlong(ad, S2, S3); + mov_l_mr((uintptr) temp_fp, S2); + delay2; + fmovs_rm(FS1, (uintptr) temp_fp); + break; + case 2: /* extended precision */ + readword(ad, S2, S3); + mov_w_mr(((uintptr) temp_fp) + 8, S2); + add_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp) + 4, S2); + add_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp), S2); + delay2; + fmov_ext_rm(FS1, (uintptr) (temp_fp)); + break; + case 3: /* packed decimal static */ + return -1; /* Some silly "packed" stuff */ + case 4: /* word */ + readword(ad, S2, S3); + sign_extend_16_rr(S2, S2); + mov_l_mr((uintptr) temp_fp, S2); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + break; + case 5: /* double precision */ + readlong(ad, S2, S3); + mov_l_mr(((uintptr) temp_fp) + 4, S2); + add_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp), S2); + delay2; + fmov_rm(FS1, (uintptr) (temp_fp)); + break; + case 6: /* byte */ + readbyte(ad, S2, S3); + sign_extend_8_rr(S2, S2); + mov_l_mr((uintptr) temp_fp, S2); + delay2; + fmovi_rm(FS1, (uintptr) temp_fp); + break; + default: + return -1; + } + return FS1; } + /* return of -1 means failure, >=0 means OK */ -STATIC_INLINE int put_fp_value (int val, uae_u32 opcode, uae_u16 extra) +STATIC_INLINE int put_fp_value(int val, uae_u32 opcode, uae_u16 extra) { - uae_u16 tmp; - uaecptr tmppc; - int size; - int mode; - int reg; - uae_u32 ad; - static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; - static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; - - if ((extra & 0x4000) == 0) { + int size; + int mode; + int reg; + uae_u32 ad; + static int const sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int const sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) + { const int dest_reg = (extra >> 10) & 7; + fmov_rr(dest_reg, val); // gb-- status register is affected MAKE_FPSR(dest_reg); return 0; - } - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - size = (extra >> 10) & 7; - ad = (uae_u32)-1; - switch (mode) { - case 0: - switch (size) { - case 6: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_b_rm(reg,(uintptr)temp_fp); - return 0; - case 4: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_w_rm(reg,(uintptr)temp_fp); - return 0; - case 0: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(reg,(uintptr)temp_fp); - return 0; - case 1: - fmovs_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(reg,(uintptr)temp_fp); - return 0; - default: - return -1; } - case 1: - return -1; /* genuine invalid instruction */ - default: break; - } - - /* Let's make sure we get out *before* doing something silly if - we can't handle the size */ - switch (size) { - case 0: - case 4: - case 5: - case 6: - case 2: - case 1: - break; - case 3: - default: - return -1; - } - - switch (mode) { - case 2: - ad=S1; - mov_l_rr(ad,reg+8); - break; - case 3: - ad=S1; - mov_l_rr(ad,reg+8); - lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); - break; - case 4: - ad=S1; - lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); - mov_l_rr(ad,reg+8); - break; - case 5: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_rr(ad,reg+8); - add_l_ri(ad,off); - break; - } - case 6: - { - uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - calc_disp_ea_020(reg+8,dp,ad,S2); - break; - } - case 7: - switch (reg) { - case 0: - { - uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 1: - { - uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); - ad=S1; - mov_l_ri(ad,off); - break; - } - case 2: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - ad=S1; - mov_l_ri(ad,address+PC16off); - break; - } - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - ad = get_disp_ea_020 (tmppc, tmp); - break; - case 4: - { - uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ - m68k_pc_offset; - ad=S1; - mov_l_ri(ad,address); - m68k_pc_offset+=sz2[size]; - break; - } - default: - return -1; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = (uae_u32) -1; + switch (mode) + { + case 0: /* Dn */ + switch (size) + { + case 6: /* byte */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_b_rm(reg, (uintptr) temp_fp); + return 0; + case 4: /* word */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_w_rm(reg, (uintptr) temp_fp); + return 0; + case 0: /* long */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(reg, (uintptr) temp_fp); + return 0; + case 1: /* single precision */ + fmovs_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(reg, (uintptr) temp_fp); + return 0; + default: + return -1; + } + case 1: /* An */ + return -1; /* genuine invalid instruction */ + default: + break; + } + + /* Let's make sure we get out *before* doing something silly if + we can't handle the size */ + switch (size) + { + case 0: /* long */ + case 1: /* single precision */ + case 2: /* extended precision */ + case 4: /* word */ + case 5: /* double precision */ + case 6: /* byte */ + break; + case 3: /* packed decimal static */ + default: + return -1; + } + + switch (mode) + { + case 2: /* (An) */ + ad = S1; + mov_l_rr(ad, reg + 8); + break; + case 3: /* (An)+ */ + ad = S1; + mov_l_rr(ad, reg + 8); + lea_l_brr(reg + 8, reg + 8, (reg == 7 ? sz2[size] : sz1[size])); + break; + case 4: /* -(An) */ + ad = S1; + lea_l_brr(reg + 8, reg + 8, -(reg == 7 ? sz2[size] : sz1[size])); + mov_l_rr(ad, reg + 8); + break; + case 5: /* d16(An) */ + { + uae_u32 off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_rr(ad, reg + 8); + add_l_ri(ad, off); + } + break; + case 6: /* d8(An,Xn) */ + { + uae_u32 dp = comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + calc_disp_ea_020(reg + 8, dp, ad, S2); + } + break; + case 7: + switch (reg) + { + case 0: /* abs.w */ + { + uae_u32 off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_ri(ad, off); + } + break; + case 1: /* abs.l */ + { + uae_u32 off = comp_get_ilong((m68k_pc_offset += 4) - 4); + + ad = S1; + mov_l_ri(ad, off); + } + break; + case 2: /* d16(pc) */ + { + uae_u32 address = start_pc + ((char *) comp_pc_p - (char *) start_pc_p) + m68k_pc_offset; + uae_s32 PC16off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + + ad = S1; + mov_l_ri(ad, address + PC16off); + } + break; + case 3: /* d8(pc,Xn) */ + return -1; + case 4: /* #imm */ + { + uae_u32 address = start_pc + ((char *) comp_pc_p - (char *) start_pc_p) + m68k_pc_offset; + + ad = S1; + mov_l_ri(ad, address); + m68k_pc_offset += sz2[size]; + } + break; + default: + return -1; + } + } + + switch (size) + { + case 0: /* long */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + break; + case 1: /* single precision */ + fmovs_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + break; + case 2: /* extended precision */ + fmov_ext_mr((uintptr) temp_fp, val); + delay; + mov_w_rm(S2, (uintptr) temp_fp + 8); + writeword_clobber(ad, S2, S3); + add_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp + 4); + writelong_clobber(ad, S2, S3); + add_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + break; + case 3: /* packed decimal static */ + return -1; /* Packed */ + case 4: /* word */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(S2, (uintptr) temp_fp); + writeword_clobber(ad, S2, S3); + break; + case 5: /* double precision */ + fmov_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(S2, (uintptr) temp_fp + 4); + writelong_clobber(ad, S2, S3); + add_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + break; + case 6: /* byte */ + fmovi_mr((uintptr) temp_fp, val); + delay; + mov_l_rm(S2, (uintptr) temp_fp); + writebyte(ad, S2, S3); + break; + default: + return -1; } - } - switch (size) { - case 0: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 1: - fmovs_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 2: - fmov_ext_mr((uintptr)temp_fp,val); - delay; - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 3: return -1; /* Packed */ - - case 4: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writeword_clobber(ad,S2,S3); - break; - case 5: - fmov_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - break; - case 6: - fmovi_mr((uintptr)temp_fp,val); - delay; - mov_l_rm(S2,(uintptr)temp_fp); - writebyte(ad,S2,S3); - break; - default: - return -1; - } - return 0; + return 0; } + /* return -1 for failure, or register number for success */ -STATIC_INLINE int get_fp_ad (uae_u32 opcode, uae_u32 * ad) +STATIC_INLINE int get_fp_ad(uae_u32 opcode) { - uae_u16 tmp; - uaecptr tmppc; - int mode; - int reg; - uae_s32 off; - - mode = (opcode >> 3) & 7; - reg = opcode & 7; - switch (mode) { - case 0: - case 1: - return -1; - case 2: - case 3: - case 4: - mov_l_rr(S1,8+reg); - return S1; - *ad = m68k_areg (regs, reg); - break; - case 5: - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - - mov_l_rr(S1,8+reg); - add_l_ri(S1,off); - return S1; - case 6: - return -1; - break; - case 7: - switch (reg) { - case 0: - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - mov_l_ri(S1,off); - return S1; - case 1: - off=comp_get_ilong((m68k_pc_offset+=4)-4); - mov_l_ri(S1,off); - return S1; - case 2: - return -1; -// *ad = m68k_getpc (); -// *ad += (uae_s32) (uae_s16) next_iword (); - off=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset; - off+=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - mov_l_ri(S1,off); - return S1; - case 3: - return -1; - tmppc = m68k_getpc (); - tmp = next_iword (); - *ad = get_disp_ea_020 (tmppc, tmp); - break; - default: - return -1; + int mode; + int reg; + uae_s32 off; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) + { + case 0: /* Dn */ + case 1: /* An */ + return -1; + case 2: /* (An) */ + case 3: /* (An)+ */ + case 4: /* -(An) */ + mov_l_rr(S1, 8 + reg); + return S1; + case 5: /* d16(An) */ + off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + mov_l_rr(S1, 8 + reg); + add_l_ri(S1, off); + return S1; + case 6: /* d8(An,Xn) */ + return -1; + break; + case 7: + switch (reg) + { + case 0: /* abs.w */ + off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + mov_l_ri(S1, off); + return S1; + case 1: /* abs.l */ + off = comp_get_ilong((m68k_pc_offset += 4) - 4); + mov_l_ri(S1, off); + return S1; + case 2: /* d16(pc) */ + off = start_pc + ((char *) comp_pc_p - (char *) start_pc_p) + m68k_pc_offset; + off += (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + mov_l_ri(S1, off); + return S1; + case 3: /* d8(pc,Xn) */ + return -1; + default: + return -1; + } } - } - abort(); + abort(); } + +/* return -1 for failure, or register number for success */ void comp_fdbcc_opp (uae_u32 /* opcode */, uae_u16 /* extra */) { + if (jit_disable.fdbcc) + { + FAIL(1); + return; + } FAIL(1); return; } -void comp_fscc_opp (uae_u32 opcode, uae_u16 extra) + +void comp_fscc_opp(uae_u32 opcode, uae_u16 extra) { - uae_u32 ad; - int cc; - int reg; + int reg; -#ifdef DEBUG_FPP - printf ("fscc_opp at %08lx\n", m68k_getpc ()); - fflush (stdout); -#endif + if (jit_disable.fscc) + { + FAIL(1); + return; + } + if (extra & 0x20) + { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode & 0x38) != 0) + { /* We can only do to integer register */ + FAIL(1); + return; + } - if (extra&0x20) { /* only cc from 00 to 1f are defined */ - FAIL(1); - return; - } - if ((opcode & 0x38) != 0) { /* We can only do to integer register */ - FAIL(1); - return; - } - - fflags_into_flags(S2); - reg=(opcode&7); - - mov_l_ri(S1,255); - mov_l_ri(S4,0); - switch(extra&0x0f) { /* according to fpp.c, the 0x10 bit is ignored - */ - case 0: break; /* set never */ - case 1: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,4); - cmov_l_rr(S4,S2,10); break; - case 2: cmov_l_rr(S4,S1,7); break; - case 3: cmov_l_rr(S4,S1,3); break; - case 4: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,2); - cmov_l_rr(S4,S2,10); break; - case 5: mov_l_rr(S2,S4); - cmov_l_rr(S4,S1,6); - cmov_l_rr(S4,S2,10); break; - case 6: cmov_l_rr(S4,S1,5); break; - case 7: cmov_l_rr(S4,S1,11); break; - case 8: cmov_l_rr(S4,S1,10); break; - case 9: cmov_l_rr(S4,S1,4); break; - case 10: cmov_l_rr(S4,S1,10); cmov_l_rr(S4,S1,7); break; - case 11: cmov_l_rr(S4,S1,4); cmov_l_rr(S4,S1,3); break; - case 12: cmov_l_rr(S4,S1,2); break; - case 13: cmov_l_rr(S4,S1,6); break; - case 14: cmov_l_rr(S4,S1,5); cmov_l_rr(S4,S1,10); break; - case 15: mov_l_rr(S4,S1); break; - } - - if ((opcode & 0x38) == 0) { - mov_b_rr(reg,S4); - } else { - abort(); - if (get_fp_ad (opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); + fflags_into_flags(S2); + reg = (opcode & 7); + + mov_l_ri(S1, 255); + mov_l_ri(S4, 0); + switch (extra & 0x0f) + { /* according to fpp.c, the 0x10 bit is ignored + */ + case 0: + break; /* set never */ + case 1: + mov_l_rr(S2, S4); + cmov_l_rr(S4, S1, 4); + cmov_l_rr(S4, S2, 10); + break; + case 2: + cmov_l_rr(S4, S1, 7); + break; + case 3: + cmov_l_rr(S4, S1, 3); + break; + case 4: + mov_l_rr(S2, S4); + cmov_l_rr(S4, S1, 2); + cmov_l_rr(S4, S2, 10); + break; + case 5: + mov_l_rr(S2, S4); + cmov_l_rr(S4, S1, 6); + cmov_l_rr(S4, S2, 10); + break; + case 6: + cmov_l_rr(S4, S1, 5); + break; + case 7: + cmov_l_rr(S4, S1, 11); + break; + case 8: + cmov_l_rr(S4, S1, 10); + break; + case 9: + cmov_l_rr(S4, S1, 4); + break; + case 10: + cmov_l_rr(S4, S1, 10); + cmov_l_rr(S4, S1, 7); + break; + case 11: + cmov_l_rr(S4, S1, 4); + cmov_l_rr(S4, S1, 3); + break; + case 12: + cmov_l_rr(S4, S1, 2); + break; + case 13: + cmov_l_rr(S4, S1, 6); + break; + case 14: + cmov_l_rr(S4, S1, 5); + cmov_l_rr(S4, S1, 10); + break; + case 15: + mov_l_rr(S4, S1); + break; + } + + if ((opcode & 0x38) == 0) + { + mov_b_rr(reg, S4); } else - put_byte (ad, cc ? 0xff : 0x00); - } + { + abort(); +#if 0 + int cc; + + if (get_fp_ad(opcode) < 0) + { + FAIL(1); + } else + { + put_byte(ad, cc ? 0xff : 0x00); + } +#endif + } } + void comp_ftrapcc_opp (uae_u32 /* opcode */, uaecptr /* oldpc */) { - FAIL(1); - return; + FAIL(1); + return; } -void comp_fbcc_opp (uae_u32 opcode) + +void comp_fbcc_opp(uae_u32 opcode) { - uae_u32 start_68k_offset=m68k_pc_offset; - uae_u32 off; - uae_u32 v1; - uae_u32 v2; - int cc; + uae_u32 start_68k_offset = m68k_pc_offset; + uae_u32 off; + uae_u32 v1; + uae_u32 v2; + int cc; // comp_pc_p is expected to be bound to 32-bit addresses - assert((uintptr)comp_pc_p <= 0xffffffffUL); + assert((uintptr) comp_pc_p <= 0xffffffffUL); - if (opcode&0x20) { /* only cc from 00 to 1f are defined */ - FAIL(1); - return; - } - if ((opcode&0x40)==0) { - off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); - } - else { - off=comp_get_ilong((m68k_pc_offset+=4)-4); - } - mov_l_ri(S1,(uintptr) - (comp_pc_p+off-(m68k_pc_offset-start_68k_offset))); - mov_l_ri(PC_P,(uintptr)comp_pc_p); - - /* Now they are both constant. Might as well fold in m68k_pc_offset */ - add_l_ri(S1,m68k_pc_offset); - add_l_ri(PC_P,m68k_pc_offset); - m68k_pc_offset=0; - - /* according to fpp.c, the 0x10 bit is ignored - (it handles exception handling, which we don't - do, anyway ;-) */ - cc=opcode&0x0f; - v1=get_const(PC_P); - v2=get_const(S1); - fflags_into_flags(S2); - - switch(cc) { - case 0: break; /* jump never */ - case 1: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,4); - cmov_l_rr(PC_P,S2,10); break; - case 2: register_branch(v1,v2,7); break; - case 3: register_branch(v1,v2,3); break; - case 4: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,2); - cmov_l_rr(PC_P,S2,10); break; - case 5: - mov_l_rr(S2,PC_P); - cmov_l_rr(PC_P,S1,6); - cmov_l_rr(PC_P,S2,10); break; - case 6: register_branch(v1,v2,5); break; - case 7: register_branch(v1,v2,11); break; - case 8: register_branch(v1,v2,10); break; - case 9: register_branch(v1,v2,4); break; - case 10: - cmov_l_rr(PC_P,S1,10); - cmov_l_rr(PC_P,S1,7); break; - case 11: - cmov_l_rr(PC_P,S1,4); - cmov_l_rr(PC_P,S1,3); break; - case 12: register_branch(v1,v2,2); break; - case 13: register_branch(v1,v2,6); break; - case 14: - cmov_l_rr(PC_P,S1,5); - cmov_l_rr(PC_P,S1,10); break; - case 15: mov_l_rr(PC_P,S1); break; - } + if (jit_disable.fbcc) + { + FAIL(1); + return; + } + if (opcode & 0x20) + { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode & 0x40) == 0) + { + off = (uae_s32) (uae_s16) comp_get_iword((m68k_pc_offset += 2) - 2); + } else + { + off = comp_get_ilong((m68k_pc_offset += 4) - 4); + } + mov_l_ri(S1, (uintptr) (comp_pc_p + off - (m68k_pc_offset - start_68k_offset))); + mov_l_ri(PC_P, (uintptr) comp_pc_p); + + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + add_l_ri(S1, m68k_pc_offset); + add_l_ri(PC_P, m68k_pc_offset); + m68k_pc_offset = 0; + + /* according to fpp.c, the 0x10 bit is ignored + (it handles exception handling, which we don't + do, anyway ;-) */ + cc = opcode & 0x0f; + v1 = get_const(PC_P); + v2 = get_const(S1); + fflags_into_flags(S2); + + switch (cc) + { + case 0: + break; /* jump never */ + case 1: + mov_l_rr(S2, PC_P); + cmov_l_rr(PC_P, S1, 4); + cmov_l_rr(PC_P, S2, 10); + break; + case 2: + register_branch(v1, v2, 7); + break; + case 3: + register_branch(v1, v2, 3); + break; + case 4: + mov_l_rr(S2, PC_P); + cmov_l_rr(PC_P, S1, 2); + cmov_l_rr(PC_P, S2, 10); + break; + case 5: + mov_l_rr(S2, PC_P); + cmov_l_rr(PC_P, S1, 6); + cmov_l_rr(PC_P, S2, 10); + break; + case 6: + register_branch(v1, v2, 5); + break; + case 7: + register_branch(v1, v2, 11); + break; + case 8: + register_branch(v1, v2, 10); + break; + case 9: + register_branch(v1, v2, 4); + break; + case 10: + cmov_l_rr(PC_P, S1, 10); + cmov_l_rr(PC_P, S1, 7); + break; + case 11: + cmov_l_rr(PC_P, S1, 4); + cmov_l_rr(PC_P, S1, 3); + break; + case 12: + register_branch(v1, v2, 2); + break; + case 13: + register_branch(v1, v2, 6); + break; + case 14: + cmov_l_rr(PC_P, S1, 5); + cmov_l_rr(PC_P, S1, 10); + break; + case 15: + mov_l_rr(PC_P, S1); + break; + } } + /* Floating point conditions The "NotANumber" part could be problematic; Howver, when NaN is encountered, the ftst instruction sets bot N and Z to 1 on the x87, @@ -784,150 +885,179 @@ x86 conditions 0001 : 10 1110 : 11 */ -void comp_fsave_opp (uae_u32 opcode) -{ - uae_u32 ad; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - int i; - FAIL(1); - return; +void comp_fsave_opp(uae_u32 opcode) +{ + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + int ad; -#ifdef DEBUG_FPP - printf ("fsave_opp at %08lx\n", m68k_getpc ()); - fflush (stdout); -#endif - if (get_fp_ad (opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - fpuop_illg (opcode,UNKNOWN_EXTRA); + if (jit_disable.fsave) + { + FAIL(1); + return; + } + FAIL(1); return; - } - - if (CPUType == 4) { - /* 4 byte 68040 IDLE frame. */ - if (incr < 0) { - ad -= 4; - put_long (ad, 0x41000000); - } else { - put_long (ad, 0x41000000); - ad += 4; + + if ((ad = get_fp_ad(opcode)) < 0) + { + FAIL(1); + return; } - } else { - if (incr < 0) { - ad -= 4; - put_long (ad, 0x70000000); - for (i = 0; i < 5; i++) { - ad -= 4; - put_long (ad, 0x00000000); - } - ad -= 4; - put_long (ad, 0x1f180000); - } else { - put_long (ad, 0x1f180000); - ad += 4; - for (i = 0; i < 5; i++) { - put_long (ad, 0x00000000); - ad += 4; - } - put_long (ad, 0x70000000); - ad += 4; + + if (CPUType == 4) + { + /* 4 byte 68040 IDLE frame. */ + if (incr < 0) + { + ad -= 4; + put_long(ad, 0x41000000); + } else + { + put_long(ad, 0x41000000); + ad += 4; + } + } else + { + if (incr < 0) + { + ad -= 4; + put_long(ad, 0x70000000); + for (i = 0; i < 5; i++) + { + ad -= 4; + put_long(ad, 0x00000000); + } + ad -= 4; + put_long(ad, 0x1f180000); + } else + { + put_long(ad, 0x1f180000); + ad += 4; + for (i = 0; i < 5; i++) + { + put_long(ad, 0x00000000); + ad += 4; + } + put_long(ad, 0x70000000); + ad += 4; + } } - } - if ((opcode & 0x38) == 0x18) - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) - m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x18) + m68k_areg(regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) + m68k_areg(regs, opcode & 7) = ad; } -void comp_frestore_opp (uae_u32 opcode) -{ - uae_u32 ad; - uae_u32 d; - int incr = (opcode & 0x38) == 0x20 ? -1 : 1; - FAIL(1); - return; +void comp_frestore_opp(uae_u32 opcode) +{ + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int ad; -#ifdef DEBUG_FPP - printf ("frestore_opp at %08lx\n", m68k_getpc ()); - fflush (stdout); -#endif - if (get_fp_ad (opcode, &ad) == 0) { - m68k_setpc (m68k_getpc () - 2); - fpuop_illg (opcode,UNKNOWN_EXTRA); + if (jit_disable.frestore) + { + FAIL(1); + return; + } + FAIL(1); return; - } - if (CPUType == 4) { - /* 68040 */ - if (incr < 0) { - /* @@@ This may be wrong. */ - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { /* Not a NULL frame? */ - if ((d & 0x00ff0000) == 0) { /* IDLE */ - } else if ((d & 0x00ff0000) == 0x00300000) { /* UNIMP */ - ad -= 44; - } else if ((d & 0x00ff0000) == 0x00600000) { /* BUSY */ - ad -= 92; + + if ((ad = get_fp_ad(opcode)) < 0) + { + FAIL(1); + return; + } + if (CPUType == 4) + { + /* 68040 */ + if (incr < 0) + { + /* @@@ This may be wrong. */ + ad -= 4; + d = get_long(ad); + if ((d & 0xff000000) != 0) + { /* Not a NULL frame? */ + if ((d & 0x00ff0000) == 0) + { /* IDLE */ + } else if ((d & 0x00ff0000) == 0x00300000) + { /* UNIMP */ + ad -= 44; + } else if ((d & 0x00ff0000) == 0x00600000) + { /* BUSY */ + ad -= 92; + } + } + } else + { + d = get_long(ad); + ad += 4; + if ((d & 0xff000000) != 0) + { /* Not a NULL frame? */ + if ((d & 0x00ff0000) == 0) + { /* IDLE */ + } else if ((d & 0x00ff0000) == 0x00300000) + { /* UNIMP */ + ad += 44; + } else if ((d & 0x00ff0000) == 0x00600000) + { /* BUSY */ + ad += 92; + } + } } - } - } else { - d = get_long (ad); - ad += 4; - if ((d & 0xff000000) != 0) { /* Not a NULL frame? */ - if ((d & 0x00ff0000) == 0) { /* IDLE */ - } else if ((d & 0x00ff0000) == 0x00300000) { /* UNIMP */ - ad += 44; - } else if ((d & 0x00ff0000) == 0x00600000) { /* BUSY */ - ad += 92; + } else + { + if (incr < 0) + { + ad -= 4; + d = get_long(ad); + if ((d & 0xff000000) != 0) + { + if ((d & 0x00ff0000) == 0x00180000) + ad -= 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad -= 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad -= 45 * 4; + } + } else + { + d = get_long(ad); + ad += 4; + if ((d & 0xff000000) != 0) + { + if ((d & 0x00ff0000) == 0x00180000) + ad += 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad += 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad += 45 * 4; + } } - } } - } else { - if (incr < 0) { - ad -= 4; - d = get_long (ad); - if ((d & 0xff000000) != 0) { - if ((d & 0x00ff0000) == 0x00180000) - ad -= 6 * 4; - else if ((d & 0x00ff0000) == 0x00380000) - ad -= 14 * 4; - else if ((d & 0x00ff0000) == 0x00b40000) - ad -= 45 * 4; - } - } else { - d = get_long (ad); - ad += 4; - if ((d & 0xff000000) != 0) { - if ((d & 0x00ff0000) == 0x00180000) - ad += 6 * 4; - else if ((d & 0x00ff0000) == 0x00380000) - ad += 14 * 4; - else if ((d & 0x00ff0000) == 0x00b40000) - ad += 45 * 4; - } - } - } - if ((opcode & 0x38) == 0x18) - m68k_areg (regs, opcode & 7) = ad; - if ((opcode & 0x38) == 0x20) - m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x18) + m68k_areg(regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) + m68k_areg(regs, opcode & 7) = ad; } -#if USE_LONG_DOUBLE -static const fpu_register const_e = 2.7182818284590452353602874713526625L; -static const fpu_register const_log10_e = 0.4342944819032518276511289189166051L; -static const fpu_register const_loge_10 = 2.3025850929940456840179914546843642L; + +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +static const fpu_register const_e = LD(2.7182818284590452353); // LD(2.7182818284590452353602874713526625); +static const fpu_register const_log10_e = LD(0.4342944819032518276511289189166051); +static const fpu_register const_loge_10 = LD(2.3025850929940456840179914546843642); #else -static const fpu_register const_e = 2.7182818284590452354; +static const fpu_register const_e = 2.7182818284590452354; static const fpu_register const_log10_e = 0.43429448190325182765; static const fpu_register const_loge_10 = 2.30258509299404568402; #endif static const fpu_register power10[] = { - 1e0, 1e1, 1e2, 1e4, 1e8, 1e16, 1e32, 1e64, 1e128, 1e256 -#if USE_LONG_DOUBLE -, 1e512L, 1e1024L, 1e2048L, 1e4096L + LD(1e0), LD(1e1), LD(1e2), LD(1e4), LD(1e8), LD(1e16), LD(1e32), LD(1e64), LD(1e128), LD(1e256) +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +, LD(1e512), LD(1e1024), LD(1e2048), LD(1e4096) #endif }; @@ -958,277 +1088,346 @@ static uae_u16 x86_fpucw[]={ #endif -void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) +void comp_fpp_opp(uae_u32 opcode, uae_u16 extra) { - int reg; - int src; - - switch ((extra >> 13) & 0x7) { - case 3: /* 2nd most common */ - if (put_fp_value ((extra >> 7)&7 , opcode, extra) < 0) { - FAIL(1); - return; + int reg; + int src; - } - return; - case 6: - case 7: + switch ((extra >> 13) & 0x7) { - uae_u32 ad, list = 0; - int incr = 0; - if (extra & 0x2000) { - - /* FMOVEM FPP->memory */ - switch ((extra >> 11) & 3) { /* Get out early if failure */ - case 0: - case 2: - break; - case 1: - case 3: - default: - FAIL(1); return; + case 1: /* illegal */ + break; + + case 3: /* FMOVE Fpn, */ + /* 2nd most common */ + if (jit_disable.fmove) + { + FAIL(1); + return; } - ad=get_fp_ad (opcode, &ad); - if ((uae_s32)ad<0) { - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); - return; + + if (put_fp_value((extra >> 7) & 7, opcode, extra) < 0) + { + FAIL(1); + return; } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 1: /* dynamic pred */ - case 3: /* dynamic postinc */ - abort(); + return; + + case 6: /* FMOVEM , */ + case 7: /* FMOVEM , */ + if (jit_disable.fmovem) + { + FAIL(1); + return; } - if (incr < 0) { /* Predecrement */ - for (reg = 7; reg >= 0; reg--) { - if (list & 0x80) { - fmov_ext_mr((uintptr)temp_fp,reg); - delay; - sub_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - sub_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - sub_l_ri(ad,4); - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); + + { + int ad; + uae_u32 list = 0; + int incr = 0; + + if (extra & 0x2000) + { + /* FMOVEM FPP->memory */ + switch ((extra >> 11) & 3) + { /* Get out early if failure */ + case 0: /* static pred */ + case 2: /* static postinc */ + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + default: + FAIL(1); + return; } - list <<= 1; - } - } - else { /* Postincrement */ - for (reg = 0; reg < 8; reg++) { - if (list & 0x80) { - fmov_ext_mr((uintptr)temp_fp,reg); - delay; - mov_w_rm(S2,(uintptr)temp_fp+8); - writeword_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp+4); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); - mov_l_rm(S2,(uintptr)temp_fp); - writelong_clobber(ad,S2,S3); - add_l_ri(ad,4); + if ((ad = get_fp_ad(opcode)) < 0) + { + FAIL(1); + return; + } + switch ((extra >> 11) & 3) + { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); + } + if (incr < 0) + { /* Predecrement */ + for (reg = 7; reg >= 0; reg--) + { + if (list & 0x80) + { + fmov_ext_mr((uintptr) temp_fp, reg); + delay; + sub_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + sub_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp + 4); + writelong_clobber(ad, S2, S3); + sub_l_ri(ad, 4); + mov_w_rm(S2, (uintptr) temp_fp + 8); + writeword_clobber(ad, S2, S3); + } + list <<= 1; + } + } else + { /* Postincrement */ + for (reg = 0; reg < 8; reg++) + { + if (list & 0x80) + { + fmov_ext_mr((uintptr) temp_fp, reg); + delay; + mov_w_rm(S2, (uintptr) temp_fp + 8); + writeword_clobber(ad, S2, S3); + add_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp + 4); + writelong_clobber(ad, S2, S3); + add_l_ri(ad, 4); + mov_l_rm(S2, (uintptr) temp_fp); + writelong_clobber(ad, S2, S3); + add_l_ri(ad, 4); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7) + 8, ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7) + 8, ad); + } else + { + /* FMOVEM memory->FPP */ + + int ad; + + switch ((extra >> 11) & 3) + { /* Get out early if failure */ + case 0: /* static pred */ + case 2: /* static postinc */ + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + default: + FAIL(1); + return; + } + ad = get_fp_ad(opcode); + if (ad < 0) + { + D(bug("no ad\n")); + FAIL(1); + return; + } + switch ((extra >> 11) & 3) + { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); } - list <<= 1; - } - } - if ((opcode & 0x38) == 0x18) - mov_l_rr((opcode & 7)+8,ad); - if ((opcode & 0x38) == 0x20) - mov_l_rr((opcode & 7)+8,ad); - } else { - /* FMOVEM memory->FPP */ - - uae_u32 ad; - switch ((extra >> 11) & 3) { /* Get out early if failure */ - case 0: - case 2: - break; - case 1: - case 3: - default: - FAIL(1); return; - } - ad=get_fp_ad (opcode, &ad); - if ((uae_s32)ad<0) { - m68k_setpc (m68k_getpc () - 4); - D(bug("no ad\n")); - fpuop_illg (opcode,extra); - return; - } - switch ((extra >> 11) & 3) { - case 0: /* static pred */ - list = extra & 0xff; - incr = -1; - break; - case 2: /* static postinc */ - list = extra & 0xff; - incr = 1; - break; - case 1: /* dynamic pred */ - case 3: /* dynamic postinc */ - abort(); - } - if (incr < 0) { - // not reached - for (reg = 7; reg >= 0; reg--) { - if (list & 0x80) { - sub_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - sub_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - sub_l_ri(ad,4); - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - delay2; - fmov_ext_rm(reg,(uintptr)(temp_fp)); + if (incr < 0) + { + // not reached + for (reg = 7; reg >= 0; reg--) + { + if (list & 0x80) + { + sub_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp), S2); + sub_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp) + 4, S2); + sub_l_ri(ad, 4); + readword(ad, S2, S3); + mov_w_mr(((uintptr) temp_fp) + 8, S2); + delay2; + fmov_ext_rm(reg, (uintptr) (temp_fp)); + } + list <<= 1; + } + } else + { + for (reg = 0; reg < 8; reg++) + { + if (list & 0x80) + { + readword(ad, S2, S3); + mov_w_mr(((uintptr) temp_fp) + 8, S2); + add_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp) + 4, S2); + add_l_ri(ad, 4); + readlong(ad, S2, S3); + mov_l_mr((uintptr) (temp_fp), S2); + add_l_ri(ad, 4); + delay2; + fmov_ext_rm(reg, (uintptr) (temp_fp)); + } + list <<= 1; + } } - list <<= 1; + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7) + 8, ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7) + 8, ad); } } - else { - for (reg = 0; reg < 8; reg++) { - if (list & 0x80) { - readword(ad,S2,S3); - mov_w_mr(((uintptr)temp_fp)+8,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp)+4,S2); - add_l_ri(ad,4); - readlong(ad,S2,S3); - mov_l_mr((uintptr)(temp_fp),S2); - add_l_ri(ad,4); - delay2; - fmov_ext_rm(reg,(uintptr)(temp_fp)); - } - list <<= 1; - } + return; + + case 4: /* FMOVEM , */ + case 5: /* FMOVEM , */ + if (jit_disable.fmovec) + { + FAIL(1); + return; } - if ((opcode & 0x38) == 0x18) - mov_l_rr((opcode & 7)+8,ad); - if ((opcode & 0x38) == 0x20) - mov_l_rr((opcode & 7)+8,ad); - } - } - return; - case 4: - case 5: /* rare */ - if ((opcode & 0x30) == 0) { - if (extra & 0x2000) { - if (extra & 0x1000) { + /* rare */ + if ((opcode & 0x30) == 0) + { + /* = Dn or An */ + if (extra & 0x2000) + { + if (extra & 0x1000) + { #if HANDLE_FPCR - mov_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_mode); - or_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_precision); + mov_l_rm(opcode & 15, (uintptr) & fpu.fpcr.rounding_mode); + or_l_rm(opcode & 15, (uintptr) & fpu.fpcr.rounding_precision); #else - FAIL(1); - return; + FAIL(1); + return; #endif - } - if (extra & 0x0800) { - FAIL(1); - return; - } - if (extra & 0x0400) { - mov_l_rm(opcode & 15,(uintptr)&fpu.instruction_address); - return; - } - } else { - // gb-- moved here so that we may FAIL() without generating any code - if (extra & 0x0800) { - // set_fpsr(m68k_dreg (regs, opcode & 15)); - FAIL(1); - return; - } - if (extra & 0x1000) { + } + if (extra & 0x0800) + { + FAIL(1); + return; + } + if (extra & 0x0400) + { + /* FPIAR: fixme; we cannot correctly return the address from compiled code */ + mov_l_rm(opcode & 15, (uintptr) & fpu.instruction_address); + return; + } + } else + { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) + { + // set_fpsr(m68k_dreg (regs, opcode & 15)); + FAIL(1); + return; + } + if (extra & 0x1000) + { #if HANDLE_FPCR #if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) - FAIL(1); - return; + FAIL(1); + return; #endif - mov_l_rr(S1,opcode & 15); - mov_l_rr(S2,opcode & 15); - and_l_ri(S1,FPCR_ROUNDING_PRECISION); - and_l_ri(S2,FPCR_ROUNDING_MODE); - mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); - mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); + mov_l_rr(S1, opcode & 15); + mov_l_rr(S2, opcode & 15); + and_l_ri(S1, FPCR_ROUNDING_PRECISION); + and_l_ri(S2, FPCR_ROUNDING_MODE); + mov_l_mr((uintptr) & fpu.fpcr.rounding_precision, S1); + mov_l_mr((uintptr) & fpu.fpcr.rounding_mode, S2); #else - FAIL(1); - return; + FAIL(1); + return; #endif -// return; gb-- FMOVEM could also operate on fpiar - } - if (extra & 0x0400) { - mov_l_mr((uintptr)&fpu.instruction_address,opcode & 15); -// return; gb-- we have to process all FMOVEM bits before returning - } - return; - } - } else if ((opcode & 0x3f) == 0x3c) { - if ((extra & 0x2000) == 0) { - // gb-- moved here so that we may FAIL() without generating any code - if (extra & 0x0800) { - FAIL(1); - return; - } - if (extra & 0x1000) { - comp_get_ilong((m68k_pc_offset+=4)-4); + } + if (extra & 0x0400) + { + /* FPIAR: does that make sense at all? */ + mov_l_mr((uintptr) & fpu.instruction_address, opcode & 15); + } + return; + } + } else if ((opcode & 0x3f) == 0x3c) + { + /* = #imm */ + if ((extra & 0x2000) == 0) + { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) + { + FAIL(1); + return; + } + if (extra & 0x1000) + { + comp_get_ilong((m68k_pc_offset += 4) - 4); #if HANDLE_FPCR #if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) - FAIL(1); - return; + FAIL(1); + return; #endif -// mov_l_mi((uintptr)®s.fpcr,val); - mov_l_ri(S1,val); - mov_l_ri(S2,val); - and_l_ri(S1,FPCR_ROUNDING_PRECISION); - and_l_ri(S2,FPCR_ROUNDING_MODE); - mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); - mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); + // mov_l_mi((uintptr)®s.fpcr,val); + mov_l_ri(S1, val); + mov_l_ri(S2, val); + and_l_ri(S1, FPCR_ROUNDING_PRECISION); + and_l_ri(S2, FPCR_ROUNDING_MODE); + mov_l_mr((uintptr) & fpu.fpcr.rounding_precision, S1); + mov_l_mr((uintptr) & fpu.fpcr.rounding_mode, S2); #else + FAIL(1); + return; +#endif + } + if (extra & 0x0400) + { + uae_u32 val = comp_get_ilong((m68k_pc_offset += 4) - 4); + + mov_l_mi((uintptr) & fpu.instruction_address, val); + } + return; + } + FAIL(1); + return; + } else if (extra & 0x2000) + { + FAIL(1); + return; + } else + { FAIL(1); return; -#endif -// return; gb-- FMOVEM could also operate on fpiar - } - if (extra & 0x0400) { - uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); - mov_l_mi((uintptr)&fpu.instruction_address,val); -// return; gb-- we have to process all FMOVEM bits before returning } + FAIL(1); return; - } - FAIL(1); - return; - } else if (extra & 0x2000) { - FAIL(1); - return; - } else { - FAIL(1); - return; - } - FAIL(1); - return; case 0: - case 2: /* Extremely common */ + case 2: /* Extremely common */ reg = (extra >> 7) & 7; - if ((extra & 0xfc00) == 0x5c00) { - switch (extra & 0x7f) { + if ((extra & 0xfc00) == 0x5c00) + { + if (jit_disable.fmovecr) + { + FAIL(1); + return; + } + + switch (extra & 0x7f) + { case 0x00: fmov_pi(reg); break; @@ -1236,20 +1435,20 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) fmov_log10_2(reg); break; case 0x0c: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_e); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fmov_ext_rm(reg, (uintptr) & const_e); #else - fmov_rm(reg,(uintptr)&const_e); + fmov_rm(reg, (uintptr) & const_e); #endif break; case 0x0d: fmov_log2_e(reg); break; case 0x0e: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_log10_e); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fmov_ext_rm(reg, (uintptr) & const_log10_e); #else - fmov_rm(reg,(uintptr)&const_log10_e); + fmov_rm(reg, (uintptr) & const_log10_e); #endif break; case 0x0f: @@ -1259,10 +1458,10 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) fmov_loge_2(reg); break; case 0x31: -#if USE_LONG_DOUBLE - fmov_ext_rm(reg,(uintptr)&const_loge_10); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fmov_ext_rm(reg, (uintptr) & const_loge_10); #else - fmov_rm(reg,(uintptr)&const_loge_10); + fmov_rm(reg, (uintptr) & const_loge_10); #endif break; case 0x32: @@ -1277,14 +1476,14 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) case 0x39: case 0x3a: case 0x3b: -#if USE_LONG_DOUBLE +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) case 0x3c: case 0x3d: case 0x3e: case 0x3f: - fmov_ext_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); + fmov_ext_rm(reg, (uintptr) (power10 + (extra & 0x7f) - 0x32)); #else - fmov_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); + fmov_rm(reg, (uintptr) (power10 + (extra & 0x7f) - 0x32)); #endif break; default: @@ -1294,310 +1493,536 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) } return; } - - switch (extra & 0x7f) { - case 0x00: /* FMOVE */ - case 0x40: /* Explicit rounding. This is just a quick fix. Same - * for all other cases that have three choices */ - case 0x44: + + switch (extra & 0x7f) + { + case 0x00: /* FMOVE */ + case 0x40: /* FSMOVE: Explicit rounding. This is just a quick fix. Same + * for all other cases that have three choices */ + case 0x44: /* FDMOVE */ + if (jit_disable.fmove) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fmov_rr(reg,src); - MAKE_FPSR (src); + fmov_rr(reg, src); + MAKE_FPSR(src); break; - case 0x01: /* FINT */ - FAIL(1); + case 0x01: /* FINT */ + if (jit_disable.fint) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x02: /* FSINH */ - FAIL(1); + case 0x02: /* FSINH */ + if (jit_disable.fsinh) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x03: /* FINTRZ */ -#ifdef USE_X86_FPUCW + case 0x03: /* FINTRZ */ + if (jit_disable.fintrz) + { + FAIL(1); + return; + } +#ifdef USE_X86_FPUCW /* If we have control over the CW, we can do this */ dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - mov_l_ri(S1,16); /* Switch to "round to zero" mode */ - fldcw_m_indexed(S1,(uae_u32)x86_fpucw); - - frndint_rr(reg,src); + mov_l_ri(S1, 16); /* Switch to "round to zero" mode */ + fldcw_m_indexed(S1, (uintptr) x86_fpucw); + + frndint_rr(reg, src); /* restore control word */ - mov_l_rm(S1,(uintptr)®s.fpcr); - and_l_ri(S1,0x000000f0); - fldcw_m_indexed(S1,(uintptr)x86_fpucw); + mov_l_rm(S1, (uintptr) & regs.fpcr); + and_l_ri(S1, 0x000000f0); + fldcw_m_indexed(S1, (uintptr) x86_fpucw); - MAKE_FPSR (reg); + MAKE_FPSR(reg); break; -#endif - FAIL(1); +#endif + FAIL(1); return; break; - case 0x04: /* FSQRT */ - case 0x41: - case 0x45: + case 0x04: /* FSQRT */ + case 0x41: /* FSSQRT */ + case 0x45: /* FDSQRT */ + if (jit_disable.fsqrt) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fsqrt_rr(reg,src); - MAKE_FPSR (reg); + fsqrt_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x06: /* FLOGNP1 */ - FAIL(1); + case 0x06: /* FLOGNP1 */ + if (jit_disable.flognp1) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x08: /* FETOXM1 */ - FAIL(1); + case 0x08: /* FETOXM1 */ + if (jit_disable.fetoxm1) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x09: /* FTANH */ - FAIL(1); + case 0x09: /* FTANH */ + if (jit_disable.ftanh) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x0a: /* FATAN */ - FAIL(1); + case 0x0a: /* FATAN */ + if (jit_disable.fatan) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x0c: /* FASIN */ - FAIL(1); + case 0x0c: /* FASIN */ + if (jit_disable.fasin) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x0d: /* FATANH */ - FAIL(1); + case 0x0d: /* FATANH */ + if (jit_disable.fatanh) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x0e: /* FSIN */ + case 0x0e: /* FSIN */ + if (jit_disable.fsin) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fsin_rr(reg,src); - MAKE_FPSR (reg); + fsin_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x0f: /* FTAN */ - FAIL(1); + case 0x0f: /* FTAN */ + if (jit_disable.ftan) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x10: /* FETOX */ + case 0x10: /* FETOX */ + if (jit_disable.fetox) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fetox_rr(reg,src); - MAKE_FPSR (reg); + fetox_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x11: /* FTWOTOX */ + case 0x11: /* FTWOTOX */ + if (jit_disable.ftwotox) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - ftwotox_rr(reg,src); - MAKE_FPSR (reg); + ftwotox_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x12: /* FTENTOX */ - FAIL(1); + case 0x12: /* FTENTOX */ + if (jit_disable.ftentox) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x14: /* FLOGN */ - FAIL(1); + case 0x14: /* FLOGN */ + if (jit_disable.flogn) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x15: /* FLOG10 */ - FAIL(1); + case 0x15: /* FLOG10 */ + if (jit_disable.flog10) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x16: /* FLOG2 */ + case 0x16: /* FLOG2 */ + if (jit_disable.flog2) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - flog2_rr(reg,src); - MAKE_FPSR (reg); + flog2_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x18: /* FABS */ - case 0x58: - case 0x5c: + case 0x18: /* FABS */ + case 0x58: /* FSABS */ + case 0x5c: /* FDABS */ + if (jit_disable.fabs) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fabs_rr(reg,src); - MAKE_FPSR (reg); + fabs_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x19: /* FCOSH */ - FAIL(1); + case 0x19: /* FCOSH */ + if (jit_disable.fcosh) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x1a: /* FNEG */ - case 0x5a: - case 0x5e: + case 0x1a: /* FNEG */ + case 0x5a: /* FSNEG */ + case 0x5e: /* FDNEG */ + if (jit_disable.fneg) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fneg_rr(reg,src); - MAKE_FPSR (reg); + fneg_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x1c: /* FACOS */ - FAIL(1); + case 0x1c: /* FACOS */ + if (jit_disable.facos) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x1d: /* FCOS */ + case 0x1d: /* FCOS */ + if (jit_disable.fcos) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fcos_rr(reg,src); - MAKE_FPSR (reg); + fcos_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x1e: /* FGETEXP */ - FAIL(1); + case 0x1e: /* FGETEXP */ + if (jit_disable.fgetexp) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x1f: /* FGETMAN */ - FAIL(1); + case 0x1f: /* FGETMAN */ + if (jit_disable.fgetman) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x20: /* FDIV */ - case 0x60: - case 0x64: + case 0x20: /* FDIV */ + case 0x60: /* FSDIV */ + case 0x64: /* FDDIV */ + if (jit_disable.fdiv) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fdiv_rr(reg,src); - MAKE_FPSR (reg); + fdiv_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x21: /* FMOD */ + case 0x21: /* FMOD */ + if (jit_disable.fmod) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - frem_rr(reg,src); - MAKE_FPSR (reg); + frem_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x22: /* FADD */ - case 0x62: - case 0x66: + case 0x22: /* FADD */ + case 0x62: /* FSADD */ + case 0x66: /* FDADD */ + if (jit_disable.fadd) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fadd_rr(reg,src); - MAKE_FPSR (reg); + fadd_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x23: /* FMUL */ - case 0x63: - case 0x67: + case 0x23: /* FMUL */ + case 0x63: /* FSMUL */ + case 0x67: /* FDMUL */ + if (jit_disable.fmul) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fmul_rr(reg,src); - MAKE_FPSR (reg); + fmul_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x24: /* FSGLDIV */ + case 0x24: /* FSGLDIV */ + if (jit_disable.fsgldiv) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fdiv_rr(reg,src); - MAKE_FPSR (reg); + fdiv_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x25: /* FREM */ + case 0x25: /* FREM */ + if (jit_disable.frem) + { + FAIL(1); + return; + } // gb-- disabled because the quotient byte must be computed // otherwise, free rotation in ClarisWorks doesn't work. FAIL(1); return; dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - frem1_rr(reg,src); - MAKE_FPSR (reg); + frem1_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x26: /* FSCALE */ - dont_care_fflags(); - FAIL(1); + case 0x26: /* FSCALE */ + if (jit_disable.fscale) + { + FAIL(1); + return; + } + + FAIL(1); return; break; - case 0x27: /* FSGLMUL */ + case 0x27: /* FSGLMUL */ + if (jit_disable.fsglmul) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fmul_rr(reg,src); - MAKE_FPSR (reg); + fmul_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x28: /* FSUB */ - case 0x68: - case 0x6c: + case 0x28: /* FSUB */ + case 0x68: /* FSSUB */ + case 0x6c: /* FDSUB */ + if (jit_disable.fsub) + { + FAIL(1); + return; + } + dont_care_fflags(); - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ return; } - fsub_rr(reg,src); - MAKE_FPSR (reg); + fsub_rr(reg, src); + MAKE_FPSR(reg); break; - case 0x30: /* FSINCOS */ + case 0x30: /* FSINCOS */ case 0x31: case 0x32: case 0x33: @@ -1605,34 +2030,53 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) case 0x35: case 0x36: case 0x37: - FAIL(1); + if (jit_disable.fsincos) + { + FAIL(1); + return; + } + + FAIL(1); return; dont_care_fflags(); break; - case 0x38: /* FCMP */ - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + case 0x38: /* FCMP */ + if (jit_disable.fcmp) + { + FAIL(1); return; } - fmov_rr(FP_RESULT,reg); - fsub_rr(FP_RESULT,src); /* Right way? */ + + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT, reg); + fsub_rr(FP_RESULT, src); /* Right way? */ break; - case 0x3a: /* FTST */ - src=get_fp_value (opcode, extra); - if (src < 0) { - FAIL(1); /* Illegal instruction */ + case 0x3a: /* FTST */ + if (jit_disable.ftst) + { + FAIL(1); return; } - fmov_rr(FP_RESULT,src); + + src = get_fp_value(opcode, extra); + if (src < 0) + { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT, src); break; default: - FAIL(1); + FAIL(1); return; break; } return; - } - m68k_setpc (m68k_getpc () - 4); - fpuop_illg (opcode,extra); + } + FAIL(1); } diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp index 6c1ede097..4fa745b4d 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp @@ -61,13 +61,11 @@ MIDFUNC(0,live_flags,(void)) live.flags_in_flags=VALID; live.flags_are_important=1; } -MENDFUNC(0,live_flags,(void)) MIDFUNC(0,dont_care_flags,(void)) { live.flags_are_important=0; } -MENDFUNC(0,dont_care_flags,(void)) MIDFUNC(0,duplicate_carry,(void)) { @@ -76,7 +74,6 @@ MIDFUNC(0,duplicate_carry,(void)) COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem,NATIVE_CC_CS); log_vwrite(FLAGX); } -MENDFUNC(0,duplicate_carry,(void)) MIDFUNC(0,restore_carry,(void)) { @@ -100,25 +97,21 @@ MIDFUNC(0,restore_carry,(void)) } #endif } -MENDFUNC(0,restore_carry,(void)) MIDFUNC(0,start_needflags,(void)) { needflags=1; } -MENDFUNC(0,start_needflags,(void)) MIDFUNC(0,end_needflags,(void)) { needflags=0; } -MENDFUNC(0,end_needflags,(void)) MIDFUNC(0,make_flags_live,(void)) { make_flags_live_internal(); } -MENDFUNC(0,make_flags_live,(void)) MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ { @@ -130,7 +123,6 @@ MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ raw_bt_l_ri(r,i); unlock2(r); } -MENDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ { @@ -141,7 +133,6 @@ MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ unlock2(r); unlock2(b); } -MENDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) { @@ -152,7 +143,6 @@ MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) { @@ -163,7 +153,6 @@ MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) { @@ -174,7 +163,6 @@ MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) { @@ -183,7 +171,6 @@ MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) raw_mov_l_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_l_rm,(W4 d, IMM s)) MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) { @@ -194,28 +181,24 @@ MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) unlock2(index); unlock2(d); } -MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) MIDFUNC(2,mov_l_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_l_mi(d,s); } -MENDFUNC(2,mov_l_mi,(IMM d, IMM s)) MIDFUNC(2,mov_w_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_w_mi(d,s); } -MENDFUNC(2,mov_w_mi,(IMM d, IMM s)) MIDFUNC(2,mov_b_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_b_mi(d,s); } -MENDFUNC(2,mov_b_mi,(IMM d, IMM s)) MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) { @@ -226,7 +209,6 @@ MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) raw_rol_b_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_b_ri,(RW1 r, IMM i)) MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) { @@ -237,7 +219,6 @@ MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) raw_rol_w_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_w_ri,(RW2 r, IMM i)) MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) { @@ -248,7 +229,6 @@ MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) raw_rol_l_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_l_ri,(RW4 r, IMM i)) MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) { @@ -263,7 +243,6 @@ MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -279,7 +258,6 @@ MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -295,7 +273,6 @@ MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) { @@ -310,7 +287,6 @@ MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -326,7 +302,6 @@ MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -342,7 +317,6 @@ MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) { @@ -353,7 +327,6 @@ MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) raw_ror_b_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_b_ri,(RR1 r, IMM i)) MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) { @@ -364,7 +337,6 @@ MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) raw_ror_w_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_w_ri,(RR2 r, IMM i)) MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) { @@ -375,7 +347,6 @@ MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) raw_ror_l_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_l_ri,(RR4 r, IMM i)) MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) { @@ -390,7 +361,6 @@ MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) { @@ -405,7 +375,6 @@ MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) { @@ -421,7 +390,6 @@ MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) { @@ -436,7 +404,6 @@ MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -452,7 +419,6 @@ MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -469,7 +435,6 @@ MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) { @@ -484,7 +449,6 @@ MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) raw_shll_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) { @@ -495,7 +459,6 @@ MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) raw_shll_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) { @@ -506,7 +469,6 @@ MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) raw_shll_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) { @@ -521,7 +483,6 @@ MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) raw_shrl_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) { @@ -532,7 +493,6 @@ MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) raw_shrl_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) { @@ -543,7 +503,6 @@ MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) raw_shrl_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) { @@ -554,7 +513,6 @@ MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) raw_shra_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) { @@ -565,7 +523,6 @@ MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) raw_shra_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) { @@ -576,7 +533,6 @@ MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) raw_shra_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) { @@ -591,7 +547,6 @@ MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -607,7 +562,6 @@ MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ @@ -624,7 +578,6 @@ MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,setcc,(W1 d, IMM cc)) { @@ -633,14 +586,12 @@ MIDFUNC(2,setcc,(W1 d, IMM cc)) raw_setcc(d,cc); unlock2(d); } -MENDFUNC(2,setcc,(W1 d, IMM cc)) MIDFUNC(2,setcc_m,(IMM d, IMM cc)) { CLOBBER_SETCC; raw_setcc_m(d,cc); } -MENDFUNC(2,setcc_m,(IMM d, IMM cc)) MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) { @@ -653,7 +604,6 @@ MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) unlock2(s); unlock2(d); } -MENDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) { @@ -664,7 +614,6 @@ MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,bsf_l_rr,(W4 d, W4 s)) /* Set the Z flag depending on the value in s. Note that the value has to be 0 or -1 (or, more precisely, for non-zero @@ -678,7 +627,6 @@ MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) unlock2(tmp); unlock2(s); } -MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) { @@ -689,7 +637,6 @@ MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,imul_32_32,(RW4 d, RR4 s)) MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) { @@ -700,7 +647,6 @@ MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) { @@ -711,7 +657,6 @@ MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) { @@ -741,7 +686,6 @@ MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) unlock2(s); } } -MENDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) { @@ -773,7 +717,6 @@ MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) unlock2(s); } } -MENDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) { @@ -803,7 +746,6 @@ MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) unlock2(s); } } -MENDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) { @@ -834,7 +776,6 @@ MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) unlock2(s); } } -MENDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) { @@ -852,7 +793,6 @@ MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,mov_b_rr,(W1 d, RR1 s)) MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) { @@ -870,7 +810,6 @@ MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,mov_w_rr,(W2 d, RR2 s)) /* read the long at the address contained in s+offset and store in d */ MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) @@ -887,7 +826,6 @@ MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) @@ -904,7 +842,6 @@ MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) /* read the long at the address contained in s+offset and store in d */ MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) @@ -923,7 +860,6 @@ MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) @@ -943,7 +879,6 @@ MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) @@ -963,7 +898,6 @@ MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) { @@ -979,7 +913,6 @@ MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) raw_mov_l_Ri(d,i,offset); unlock2(d); } -MENDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) { @@ -995,7 +928,6 @@ MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) raw_mov_w_Ri(d,i,offset); unlock2(d); } -MENDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) /* Warning! OFFSET is byte sized only! */ MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) @@ -1017,7 +949,6 @@ MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) { @@ -1037,7 +968,6 @@ MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) { @@ -1058,7 +988,6 @@ MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) { @@ -1076,7 +1005,6 @@ MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) unlock2(index); unlock2(s); } -MENDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) { @@ -1090,7 +1018,6 @@ MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) unlock2(index); unlock2(s); } -MENDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) /* write d to the long at the address contained in s+offset */ MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) @@ -1110,7 +1037,6 @@ MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) /* write the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) @@ -1130,7 +1056,6 @@ MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) { @@ -1148,7 +1073,6 @@ MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) MIDFUNC(1,mid_bswap_32,(RW4 r)) { @@ -1164,7 +1088,6 @@ MIDFUNC(1,mid_bswap_32,(RW4 r)) raw_bswap_32(r); unlock2(r); } -MENDFUNC(1,mid_bswap_32,(RW4 r)) MIDFUNC(1,mid_bswap_16,(RW2 r)) { @@ -1181,7 +1104,6 @@ MIDFUNC(1,mid_bswap_16,(RW2 r)) raw_bswap_16(r); unlock2(r); } -MENDFUNC(1,mid_bswap_16,(RW2 r)) MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) { @@ -1210,7 +1132,6 @@ MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) D2(panicbug("Added %d to nreg %d(%d), now holds %d regs", d,s,live.state[d].realind,live.nat[s].nholds)); unlock2(s); } -MENDFUNC(2,mov_l_rr,(W4 d, RR4 s)) MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) { @@ -1224,7 +1145,6 @@ MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) raw_mov_l_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_l_mr,(IMM d, RR4 s)) MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) { @@ -1238,7 +1158,6 @@ MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) raw_mov_w_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_w_mr,(IMM d, RR2 s)) MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) { @@ -1248,7 +1167,6 @@ MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) raw_mov_w_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) { @@ -1263,7 +1181,6 @@ MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) raw_mov_b_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_b_mr,(IMM d, RR1 s)) MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) { @@ -1273,14 +1190,12 @@ MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) raw_mov_b_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) { set_const(d,s); return; } -MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) { @@ -1290,7 +1205,6 @@ MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) raw_mov_w_ri(d,s); unlock2(d); } -MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) { @@ -1300,7 +1214,6 @@ MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) raw_mov_b_ri(d,s); unlock2(d); } -MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) { @@ -1310,7 +1223,6 @@ MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) raw_test_l_ri(d,i); unlock2(d); } -MENDFUNC(2,test_l_ri,(RR4 d, IMM i)) MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) { @@ -1322,7 +1234,6 @@ MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_l_rr,(RR4 d, RR4 s)) MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) { @@ -1334,7 +1245,6 @@ MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_w_rr,(RR2 d, RR2 s)) MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) { @@ -1346,7 +1256,6 @@ MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_b_rr,(RR1 d, RR1 s)) MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) { @@ -1361,7 +1270,6 @@ MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) raw_and_l_ri(d,i); unlock2(d); } -MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) MIDFUNC(2,and_l,(RW4 d, RR4 s)) { @@ -1373,7 +1281,6 @@ MIDFUNC(2,and_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_l,(RW4 d, RR4 s)) MIDFUNC(2,and_w,(RW2 d, RR2 s)) { @@ -1385,7 +1292,6 @@ MIDFUNC(2,and_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_w,(RW2 d, RR2 s)) MIDFUNC(2,and_b,(RW1 d, RR1 s)) { @@ -1397,7 +1303,6 @@ MIDFUNC(2,and_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_b,(RW1 d, RR1 s)) MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) { @@ -1411,7 +1316,6 @@ MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) raw_or_l_ri(d,i); unlock2(d); } -MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) MIDFUNC(2,or_l,(RW4 d, RR4 s)) { @@ -1427,7 +1331,6 @@ MIDFUNC(2,or_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_l,(RW4 d, RR4 s)) MIDFUNC(2,or_w,(RW2 d, RR2 s)) { @@ -1439,7 +1342,6 @@ MIDFUNC(2,or_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_w,(RW2 d, RR2 s)) MIDFUNC(2,or_b,(RW1 d, RR1 s)) { @@ -1451,7 +1353,6 @@ MIDFUNC(2,or_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_b,(RW1 d, RR1 s)) MIDFUNC(2,adc_l,(RW4 d, RR4 s)) { @@ -1464,7 +1365,6 @@ MIDFUNC(2,adc_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_l,(RW4 d, RR4 s)) MIDFUNC(2,adc_w,(RW2 d, RR2 s)) { @@ -1476,7 +1376,6 @@ MIDFUNC(2,adc_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_w,(RW2 d, RR2 s)) MIDFUNC(2,adc_b,(RW1 d, RR1 s)) { @@ -1488,7 +1387,6 @@ MIDFUNC(2,adc_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_b,(RW1 d, RR1 s)) MIDFUNC(2,add_l,(RW4 d, RR4 s)) { @@ -1506,7 +1404,6 @@ MIDFUNC(2,add_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_l,(RW4 d, RR4 s)) MIDFUNC(2,add_w,(RW2 d, RR2 s)) { @@ -1523,7 +1420,6 @@ MIDFUNC(2,add_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_w,(RW2 d, RR2 s)) MIDFUNC(2,add_b,(RW1 d, RR1 s)) { @@ -1540,7 +1436,6 @@ MIDFUNC(2,add_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_b,(RW1 d, RR1 s)) MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) { @@ -1563,7 +1458,6 @@ MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) raw_sub_l_ri(d,i); unlock2(d); } -MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) { @@ -1576,7 +1470,6 @@ MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) raw_sub_w_ri(d,i); unlock2(d); } -MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) { @@ -1590,7 +1483,6 @@ MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) unlock2(d); } -MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) { @@ -1611,7 +1503,6 @@ MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) raw_add_l_ri(d,i); unlock2(d); } -MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) { @@ -1624,7 +1515,6 @@ MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) raw_add_w_ri(d,i); unlock2(d); } -MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) { @@ -1638,7 +1528,6 @@ MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) unlock2(d); } -MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) { @@ -1650,7 +1539,6 @@ MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_l,(RW4 d, RR4 s)) MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) { @@ -1662,7 +1550,6 @@ MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_w,(RW2 d, RR2 s)) MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) { @@ -1674,7 +1561,6 @@ MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_b,(RW1 d, RR1 s)) MIDFUNC(2,sub_l,(RW4 d, RR4 s)) { @@ -1691,7 +1577,6 @@ MIDFUNC(2,sub_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_l,(RW4 d, RR4 s)) MIDFUNC(2,sub_w,(RW2 d, RR2 s)) { @@ -1708,7 +1593,6 @@ MIDFUNC(2,sub_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_w,(RW2 d, RR2 s)) MIDFUNC(2,sub_b,(RW1 d, RR1 s)) { @@ -1725,7 +1609,6 @@ MIDFUNC(2,sub_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_b,(RW1 d, RR1 s)) MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) { @@ -1737,7 +1620,6 @@ MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_l,(RR4 d, RR4 s)) MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) { @@ -1749,7 +1631,6 @@ MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_w,(RR2 d, RR2 s)) MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) { @@ -1761,7 +1642,6 @@ MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_b,(RR1 d, RR1 s)) MIDFUNC(2,xor_l,(RW4 d, RR4 s)) { @@ -1773,7 +1653,6 @@ MIDFUNC(2,xor_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_l,(RW4 d, RR4 s)) MIDFUNC(2,xor_w,(RW2 d, RR2 s)) { @@ -1785,7 +1664,6 @@ MIDFUNC(2,xor_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_w,(RW2 d, RR2 s)) MIDFUNC(2,xor_b,(RW1 d, RR1 s)) { @@ -1797,7 +1675,6 @@ MIDFUNC(2,xor_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_b,(RW1 d, RR1 s)) MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) { @@ -1812,7 +1689,6 @@ MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) prepare_for_call_2(); compemu_raw_call_r(r); } -MENDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) { @@ -1849,13 +1725,11 @@ MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) live.state[out1].dirtysize=osize; set_status(out1,DIRTY); } -MENDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) MIDFUNC(0,nop,(void)) { raw_emit_nop(); } -MENDFUNC(0,nop,(void)) /* forget_about() takes a mid-layer register */ MIDFUNC(1,forget_about,(W4 r)) @@ -1865,7 +1739,6 @@ MIDFUNC(1,forget_about,(W4 r)) live.state[r].val=0; set_status(r,UNDEF); } -MENDFUNC(1,forget_about,(W4 r)) MIDFUNC(1,f_forget_about,(FW r)) { @@ -1873,7 +1746,6 @@ MIDFUNC(1,f_forget_about,(FW r)) f_disassociate(r); live.fate[r].status=UNDEF; } -MENDFUNC(1,f_forget_about,(FW r)) // ARM optimized functions @@ -1892,7 +1764,6 @@ MIDFUNC(2,arm_ADD_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_ADD_l,(RW4 d, RR4 s)) MIDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) { @@ -1911,7 +1782,6 @@ MIDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) raw_ADD_l_rr(d,REG_WORK1); unlock2(d); } -MENDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) MIDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) { @@ -1929,7 +1799,6 @@ MIDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) raw_ADD_l_rri(d,d,i); unlock2(d); } -MENDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) MIDFUNC(2,arm_SUB_l_ri8,(RW4 d, IMM i)) { @@ -1947,7 +1816,6 @@ MIDFUNC(2,arm_SUB_l_ri8,(RW4 d, IMM i)) raw_SUB_l_rri(d,d,i); unlock2(d); } -MENDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) MIDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) { @@ -1958,7 +1826,6 @@ MIDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) MIDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) { @@ -1969,7 +1836,6 @@ MIDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) MIDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) { @@ -1980,7 +1846,6 @@ MIDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) MIDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) { @@ -1994,7 +1859,6 @@ MIDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) raw_AND_l_ri(d,i); unlock2(d); } -MENDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) MIDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) { @@ -2005,7 +1869,6 @@ MIDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) MIDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) { @@ -2016,7 +1879,6 @@ MIDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) MIDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) { @@ -2027,7 +1889,6 @@ MIDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) MIDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) { @@ -2038,7 +1899,6 @@ MIDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) MIDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) { @@ -2053,7 +1913,6 @@ MIDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) MIDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) { @@ -2064,7 +1923,6 @@ MIDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) MIDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) { @@ -2075,7 +1933,6 @@ MIDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) raw_ROR_l_ri(r,i); unlock2(r); } -MENDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) // Other static inline void flush_cpu_icache(void *start, void *stop) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h index 525413266..baedb153c 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h @@ -64,6 +64,7 @@ DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); DECLARE_MIDFUNC(rol_l_rr(RW4 d, RR1 r)); DECLARE_MIDFUNC(rol_w_rr(RW2 d, RR1 r)); DECLARE_MIDFUNC(rol_b_rr(RW1 d, RR1 r)); +DECLARE_MIDFUNC(rol_l_ri(RW4 r, IMM i)); DECLARE_MIDFUNC(shll_l_rr(RW4 d, RR1 r)); DECLARE_MIDFUNC(shll_w_rr(RW2 d, RR1 r)); DECLARE_MIDFUNC(shll_b_rr(RW1 d, RR1 r)); @@ -98,6 +99,7 @@ DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, RR2 s)); DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, RR1 s)); DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, RR2 s)); DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, RR1 s)); +DECLARE_MIDFUNC(simulate_bsf(W4 tmp, RW4 s)); DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); DECLARE_MIDFUNC(imul_32_32(RW4 d, RR4 s)); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp index 9da2c058c..5f55d1bf9 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp @@ -129,7 +129,6 @@ MIDFUNC(0,restore_inverted_carry,(void)) MSR_CPSRf_r(REG_WORK1); unlock2(r); } -MENDFUNC(0,restore_inverted_carry,(void)) /* * ADD @@ -161,7 +160,6 @@ MIDFUNC(3,jnf_ADD_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ADD_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) { @@ -180,7 +178,6 @@ MIDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) { @@ -194,7 +191,6 @@ MIDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) MIDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) { @@ -215,7 +211,6 @@ MIDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) { @@ -229,7 +224,6 @@ MIDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) MIDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) { @@ -249,7 +243,6 @@ MIDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) { @@ -262,7 +255,6 @@ MIDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) { @@ -281,7 +273,6 @@ MIDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) /* * ADDA @@ -303,7 +294,6 @@ MIDFUNC(2,jnf_ADDA_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ADDA_b,(W4 d, RR1 s)) MIDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) { @@ -316,7 +306,6 @@ MIDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) MIDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) { @@ -328,7 +317,6 @@ MIDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) /* * ADDX @@ -358,7 +346,6 @@ MIDFUNC(3,jnf_ADDX,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_ADDX,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) { @@ -383,7 +370,6 @@ MIDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) { @@ -408,7 +394,6 @@ MIDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) { @@ -431,7 +416,6 @@ MIDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) /* * ANDI @@ -458,7 +442,6 @@ MIDFUNC(1,jff_ANDSR,(IMM s, IMM x)) STRB_rR(REG_WORK2, REG_WORK1); } } -MENDFUNC(1,jff_ANDSR,(IMM s)) /* * AND @@ -493,7 +476,6 @@ MIDFUNC(3,jnf_AND,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_AND,(RW4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_AND_b,(W4 d, RR1 s, RR1 v)) { @@ -510,7 +492,6 @@ MIDFUNC(3,jff_AND_b,(W4 d, RR1 s, RR1 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_AND_b,(RW4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_AND_w,(W4 d, RR2 s, RR2 v)) { @@ -527,7 +508,6 @@ MIDFUNC(3,jff_AND_w,(W4 d, RR2 s, RR2 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_AND_w,(RW4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_AND_l,(W4 d, RR4 s, RR4 v)) { @@ -542,7 +522,6 @@ MIDFUNC(3,jff_AND_l,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_AND_l,(RW4 d, RR4 s, RR4 v)) /* * ASL @@ -592,7 +571,6 @@ MIDFUNC(3,jff_ASL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -627,7 +605,6 @@ MIDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -660,7 +637,6 @@ MIDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -695,7 +671,6 @@ MIDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -730,7 +705,6 @@ MIDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -763,7 +737,6 @@ MIDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) /* * ASLW @@ -788,7 +761,6 @@ MIDFUNC(2,jnf_ASLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ASLW,(W4 d, RR4 s)) MIDFUNC(2,jff_ASLW,(W4 d, RR4 s)) { @@ -806,7 +778,6 @@ MIDFUNC(2,jff_ASLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_ASLW,(W4 d, RR4 s)) /* * ASR @@ -836,7 +807,6 @@ MIDFUNC(3,jnf_ASR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ASR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -851,7 +821,6 @@ MIDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -865,7 +834,6 @@ MIDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) { @@ -885,7 +853,6 @@ MIDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -905,7 +872,6 @@ MIDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -924,7 +890,6 @@ MIDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -940,7 +905,6 @@ MIDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -956,7 +920,6 @@ MIDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -971,7 +934,6 @@ MIDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -989,7 +951,6 @@ MIDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -1007,7 +968,6 @@ MIDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -1024,7 +984,6 @@ MIDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) /* * ASRW @@ -1050,7 +1009,6 @@ MIDFUNC(2,jnf_ASRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ASRW,(W4 d, RR4 s)) MIDFUNC(2,jff_ASRW,(W4 d, RR4 s)) { @@ -1064,7 +1022,6 @@ MIDFUNC(2,jff_ASRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_ASRW,(W4 d, RR4 s)) /* * BCHG @@ -1086,7 +1043,6 @@ MIDFUNC(2,jnf_BCHG_b_imm,(RW4 d, IMM s)) EOR_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BCHG_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) { @@ -1094,7 +1050,6 @@ MIDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) EOR_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) { @@ -1114,7 +1069,6 @@ MIDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) MIDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) { @@ -1135,7 +1089,6 @@ MIDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) MIDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) { @@ -1151,7 +1104,6 @@ MIDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) { @@ -1167,7 +1119,6 @@ MIDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) { @@ -1192,7 +1143,6 @@ MIDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) MIDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) { @@ -1218,7 +1168,6 @@ MIDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) /* * BCLR @@ -1240,7 +1189,6 @@ MIDFUNC(2,jnf_BCLR_b_imm,(RW4 d, IMM s)) BIC_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BCLR_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) { @@ -1248,7 +1196,6 @@ MIDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) BIC_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) { @@ -1268,7 +1215,6 @@ MIDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) MIDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) { @@ -1289,7 +1235,6 @@ MIDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) MIDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) { @@ -1305,7 +1250,6 @@ MIDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) { @@ -1321,7 +1265,6 @@ MIDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) { @@ -1346,7 +1289,6 @@ MIDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) MIDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) { @@ -1372,7 +1314,6 @@ MIDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) /* * BSET @@ -1394,7 +1335,6 @@ MIDFUNC(2,jnf_BSET_b_imm,(RW4 d, IMM s)) ORR_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BSET_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) { @@ -1402,7 +1342,6 @@ MIDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) ORR_rri(d,d,(1 << s)); unlock2(d); } -MENDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) { @@ -1422,7 +1361,6 @@ MIDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) MIDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) { @@ -1443,7 +1381,6 @@ MIDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) MIDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) { @@ -1459,7 +1396,6 @@ MIDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) { @@ -1475,7 +1411,6 @@ MIDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) MIDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) { @@ -1500,7 +1435,6 @@ MIDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) MIDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) { @@ -1526,7 +1460,6 @@ MIDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) /* * BTST @@ -1554,7 +1487,6 @@ MIDFUNC(2,jff_BTST_b_imm,(RR4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BTST_b_imm,(RR4 d, IMM s)) MIDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) { @@ -1568,7 +1500,6 @@ MIDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) MIDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) { @@ -1592,7 +1523,6 @@ MIDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) MIDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) { @@ -1617,7 +1547,6 @@ MIDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) /* * CLR @@ -1638,7 +1567,6 @@ MIDFUNC(1,jnf_CLR,(W4 d)) MOV_ri(d,0); unlock2(d); } -MENDFUNC(1,jnf_CLR,(W4 d)) MIDFUNC(1,jff_CLR,(W4 d)) { @@ -1647,7 +1575,6 @@ MIDFUNC(1,jff_CLR,(W4 d)) MSR_CPSR_i(ARM_Z_FLAG); unlock2(d); } -MENDFUNC(1,jff_CLR,(W4 d)) /* * CMP @@ -1679,7 +1606,6 @@ MIDFUNC(2,jff_CMP_b,(RR1 d, RR1 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMP_b,(RR1 d, RR1 s)) MIDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) { @@ -1698,7 +1624,6 @@ MIDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) MIDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) { @@ -1715,7 +1640,6 @@ MIDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) /* * CMPA @@ -1746,7 +1670,6 @@ MIDFUNC(2,jff_CMPA_b,(RR1 d, RR1 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMPA_b,(RR1 d, RR1 s)) MIDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) { @@ -1764,7 +1687,6 @@ MIDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) MIDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) { @@ -1781,7 +1703,6 @@ MIDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) /* * EOR @@ -1815,7 +1736,6 @@ MIDFUNC(3,jnf_EOR,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_EOR,(RW4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_EOR_b,(W4 d, RR1 s, RR1 v)) { @@ -1832,7 +1752,6 @@ MIDFUNC(3,jff_EOR_b,(W4 d, RR1 s, RR1 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_EOR_b,(RW4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_EOR_w,(W4 d, RR2 s, RR2 v)) { @@ -1849,7 +1768,6 @@ MIDFUNC(3,jff_EOR_w,(W4 d, RR2 s, RR2 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_EOR_w,(RW4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_EOR_l,(W4 d, RR4 s, RR4 v)) { @@ -1864,7 +1782,6 @@ MIDFUNC(3,jff_EOR_l,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_EOR_l,(RW4 d, RR4 s, RR4 v)) /* * EORI @@ -1892,7 +1809,6 @@ MIDFUNC(1,jff_EORSR,(IMM s, IMM x)) STRB_rR(REG_WORK2, REG_WORK1); } } -MENDFUNC(1,jff_EORSR,(IMM s)) /* * EXT @@ -1922,7 +1838,6 @@ MIDFUNC(2,jnf_EXT_b,(W4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_EXT_b,(W4 d, RR4 s)) MIDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) { @@ -1939,7 +1854,6 @@ MIDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) MIDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) { @@ -1956,7 +1870,6 @@ MIDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) MIDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) { @@ -1975,7 +1888,6 @@ MIDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) unlock2(d); } -MENDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) MIDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) { @@ -1994,7 +1906,6 @@ MIDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) unlock2(d); } -MENDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) MIDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) { @@ -2012,7 +1923,6 @@ MIDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) unlock2(d); } -MENDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) /* * LSL @@ -2041,7 +1951,6 @@ MIDFUNC(3,jnf_LSL_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_LSL_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) { @@ -2056,7 +1965,6 @@ MIDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) { @@ -2077,7 +1985,6 @@ MIDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -2097,7 +2004,6 @@ MIDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -2115,7 +2021,6 @@ MIDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -2135,7 +2040,6 @@ MIDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -2154,7 +2058,6 @@ MIDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -2171,7 +2074,6 @@ MIDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) /* * LSLW @@ -2196,7 +2098,6 @@ MIDFUNC(2,jnf_LSLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_LSLW,(W4 d, RR4 s)) MIDFUNC(2,jff_LSLW,(W4 d, RR4 s)) { @@ -2210,7 +2111,6 @@ MIDFUNC(2,jff_LSLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_LSLW,(W4 d, RR4 s)) /* * LSR @@ -2256,7 +2156,6 @@ MIDFUNC(3,jnf_LSR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jnf_LSR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -2285,7 +2184,6 @@ MIDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -2313,7 +2211,6 @@ MIDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) { @@ -2343,7 +2240,6 @@ MIDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -2373,7 +2269,6 @@ MIDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -2402,7 +2297,6 @@ MIDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(s); } } -MENDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -2431,7 +2325,6 @@ MIDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -2460,7 +2353,6 @@ MIDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -2488,7 +2380,6 @@ MIDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) { @@ -2519,7 +2410,6 @@ MIDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) { @@ -2550,7 +2440,6 @@ MIDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) { @@ -2580,7 +2469,6 @@ MIDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) } unlock2(i); } -MENDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) /* * LSRW @@ -2606,7 +2494,6 @@ MIDFUNC(2,jnf_LSRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_LSRW,(W4 d, RR4 s)) MIDFUNC(2,jff_LSRW,(W4 d, RR4 s)) { @@ -2620,7 +2507,6 @@ MIDFUNC(2,jff_LSRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_LSRW,(W4 d, RR4 s)) /* * MOVE @@ -2649,7 +2535,6 @@ MIDFUNC(2,jnf_MOVE,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_MOVE,(W4 d, RR4 s)) MIDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) { @@ -2661,7 +2546,6 @@ MIDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) MIDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) { @@ -2673,7 +2557,6 @@ MIDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) MIDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) { @@ -2685,7 +2568,6 @@ MIDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) unlock2(d); } -MENDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) MIDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) { @@ -2704,7 +2586,6 @@ MIDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) MIDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) { @@ -2723,7 +2604,6 @@ MIDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) MIDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) { @@ -2741,7 +2621,6 @@ MIDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) /* * MOVE16 @@ -2776,7 +2655,6 @@ MIDFUNC(2,jnf_MOVE16,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_MOVE16,(RR4 d, RR4 s)) /* * MOVEA @@ -2797,7 +2675,6 @@ MIDFUNC(2,jnf_MOVEA_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_MOVEA_w,(W4 d, RR2 s)) MIDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) { @@ -2809,7 +2686,6 @@ MIDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) /* * MULS @@ -2836,7 +2712,6 @@ MIDFUNC(2,jnf_MULS,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULS,(RW4 d, RR4 s)) MIDFUNC(2,jff_MULS,(RW4 d, RR4 s)) { @@ -2852,7 +2727,6 @@ MIDFUNC(2,jff_MULS,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULS,(RW4 d, RR4 s)) MIDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) { @@ -2864,7 +2738,6 @@ MIDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) MIDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) { @@ -2882,7 +2755,6 @@ MIDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) MIDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) { @@ -2895,7 +2767,6 @@ MIDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) MIDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) { @@ -2913,7 +2784,6 @@ MIDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) /* * MULU @@ -2941,7 +2811,6 @@ MIDFUNC(2,jnf_MULU,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULU,(RW4 d, RR4 s)) MIDFUNC(2,jff_MULU,(RW4 d, RR4 s)) { @@ -2957,7 +2826,6 @@ MIDFUNC(2,jff_MULU,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULU,(RW4 d, RR4 s)) MIDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) { @@ -2969,7 +2837,6 @@ MIDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) MIDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) { @@ -2987,7 +2854,6 @@ MIDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) MIDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) { @@ -3000,7 +2866,6 @@ MIDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) MIDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) { @@ -3018,7 +2883,6 @@ MIDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) /* * NEG @@ -3043,7 +2907,6 @@ MIDFUNC(2,jnf_NEG,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_NEG,(W4 d, RR4 s)) MIDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) { @@ -3061,7 +2924,6 @@ MIDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) MIDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) { @@ -3079,7 +2941,6 @@ MIDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) MIDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) { @@ -3096,7 +2957,6 @@ MIDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) /* * NEGX @@ -3123,7 +2983,6 @@ MIDFUNC(2,jnf_NEGX,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_NEGX,(W4 d, RR4 s)) MIDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) { @@ -3145,7 +3004,6 @@ MIDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) MIDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) { @@ -3167,7 +3025,6 @@ MIDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) MIDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) { @@ -3188,7 +3045,6 @@ MIDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) /* * NOT @@ -3213,7 +3069,6 @@ MIDFUNC(2,jnf_NOT,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_NOT,(W4 d, RR4 s)) MIDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) { @@ -3227,7 +3082,6 @@ MIDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) MIDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) { @@ -3241,7 +3095,6 @@ MIDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) MIDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) { @@ -3254,7 +3107,6 @@ MIDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) /* * OR @@ -3288,7 +3140,6 @@ MIDFUNC(3,jnf_OR,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_OR,(RW4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_OR_b,(W4 d, RR1 s, RR1 v)) { @@ -3305,7 +3156,6 @@ MIDFUNC(3,jff_OR_b,(W4 d, RR1 s, RR1 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_OR_b,(RW4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_OR_w,(W4 d, RR2 s, RR2 v)) { @@ -3322,7 +3172,6 @@ MIDFUNC(3,jff_OR_w,(W4 d, RR2 s, RR2 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_OR_w,(RW4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_OR_l,(W4 d, RR4 s, RR4 v)) { @@ -3337,7 +3186,6 @@ MIDFUNC(3,jff_OR_l,(W4 d, RR4 s, RR4 v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_OR_l,(RW4 d, RR4 s, RR4 v)) /* * ORI @@ -3364,7 +3212,6 @@ MIDFUNC(1,jff_ORSR,(IMM s, IMM x)) STRB_rR(REG_WORK2, REG_WORK1); } } -MENDFUNC(1,jff_ORSR,(IMM s)) /* * ROL @@ -3394,7 +3241,6 @@ MIDFUNC(3,jnf_ROL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -3408,7 +3254,6 @@ MIDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -3420,7 +3265,6 @@ MIDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) { @@ -3447,7 +3291,6 @@ MIDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -3473,7 +3316,6 @@ MIDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -3497,7 +3339,6 @@ MIDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) { @@ -3521,7 +3362,6 @@ MIDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) { @@ -3544,7 +3384,6 @@ MIDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) { @@ -3565,7 +3404,6 @@ MIDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) { @@ -3597,7 +3435,6 @@ MIDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) { @@ -3628,7 +3465,6 @@ MIDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) { @@ -3657,7 +3493,6 @@ MIDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) /* * ROLW @@ -3684,7 +3519,6 @@ MIDFUNC(2,jnf_ROLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ROLW,(W4 d, RR4 s)) MIDFUNC(2,jff_ROLW,(W4 d, RR4 s)) { @@ -3705,7 +3539,6 @@ MIDFUNC(2,jff_ROLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_ROLW,(W4 d, RR4 s)) /* * RORW @@ -3732,7 +3565,6 @@ MIDFUNC(2,jnf_RORW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_RORW,(W4 d, RR4 s)) MIDFUNC(2,jff_RORW,(W4 d, RR4 s)) { @@ -3747,7 +3579,6 @@ MIDFUNC(2,jff_RORW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_RORW,(W4 d, RR4 s)) /* * ROXL @@ -3780,7 +3611,6 @@ MIDFUNC(3,jnf_ROXL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -3799,7 +3629,6 @@ MIDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -3817,7 +3646,6 @@ MIDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) { @@ -3843,7 +3671,6 @@ MIDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) { @@ -3869,7 +3696,6 @@ MIDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) { @@ -3893,7 +3719,6 @@ MIDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) { @@ -3940,7 +3765,6 @@ MIDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) { @@ -3984,7 +3808,6 @@ MIDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) { @@ -4016,7 +3839,6 @@ MIDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) { @@ -4082,7 +3904,6 @@ MIDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) { @@ -4147,7 +3968,6 @@ MIDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) { @@ -4196,7 +4016,6 @@ MIDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) /* * ROXLW @@ -4222,7 +4041,6 @@ MIDFUNC(2,jnf_ROXLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ROXLW,(W4 d, RR4 s)) MIDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) { @@ -4238,7 +4056,6 @@ MIDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) /* * ROR @@ -4268,7 +4085,6 @@ MIDFUNC(3,jnf_ROR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -4282,7 +4098,6 @@ MIDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -4294,7 +4109,6 @@ MIDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) { @@ -4310,7 +4124,6 @@ MIDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -4325,7 +4138,6 @@ MIDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -4338,7 +4150,6 @@ MIDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) { @@ -4359,7 +4170,6 @@ MIDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) { @@ -4379,7 +4189,6 @@ MIDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) { @@ -4397,7 +4206,6 @@ MIDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) { @@ -4421,7 +4229,6 @@ MIDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) { @@ -4444,7 +4251,6 @@ MIDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) { @@ -4465,7 +4271,6 @@ MIDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) /* * ROXR @@ -4497,7 +4302,6 @@ MIDFUNC(3,jnf_ROXR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -4515,7 +4319,6 @@ MIDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -4533,7 +4336,6 @@ MIDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) { @@ -4559,7 +4361,6 @@ MIDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) { @@ -4585,7 +4386,6 @@ MIDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) { @@ -4609,7 +4409,6 @@ MIDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) MIDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) { @@ -4647,7 +4446,6 @@ MIDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) { @@ -4682,7 +4480,6 @@ MIDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) { @@ -4715,7 +4512,6 @@ MIDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) { @@ -4769,7 +4565,6 @@ MIDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) { @@ -4821,7 +4616,6 @@ MIDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) MIDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) { @@ -4870,7 +4664,6 @@ MIDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) unlock2(s); unlock2(i); } -MENDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) /* * ROXRW @@ -4897,7 +4690,6 @@ MIDFUNC(2,jnf_ROXRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_ROXRW,(W4 d, RR4 s)) MIDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) { @@ -4912,7 +4704,6 @@ MIDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) /* * SUB @@ -4944,7 +4735,6 @@ MIDFUNC(3,jnf_SUB_b_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_SUB_b_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) { @@ -4964,7 +4754,6 @@ MIDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) { @@ -4982,7 +4771,6 @@ MIDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) { @@ -5002,7 +4790,6 @@ MIDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) { @@ -5020,7 +4807,6 @@ MIDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) { @@ -5040,7 +4826,6 @@ MIDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) { @@ -5060,7 +4845,6 @@ MIDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) MIDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) { @@ -5087,7 +4871,6 @@ MIDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_SUB_w_imm,(W4 d, RR2 s, IMM v)) { @@ -5107,7 +4890,6 @@ MIDFUNC(3,jff_SUB_w_imm,(W4 d, RR2 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jitc_SUB_ff_w2l_rri,(W4 d, RR2 s, IMM v)) MIDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) { @@ -5134,7 +4916,6 @@ MIDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) { @@ -5153,7 +4934,6 @@ MIDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) unlock2(d); unlock2(s); } -MENDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) MIDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) { @@ -5178,7 +4958,6 @@ MIDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) /* * SUBA @@ -5201,7 +4980,6 @@ MIDFUNC(2,jnf_SUBA_b,(W4 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_SUBA_b,(W4 d, RR1 s)) MIDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) { @@ -5214,7 +4992,6 @@ MIDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) MIDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) { @@ -5226,7 +5003,6 @@ MIDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) /* * SUBX @@ -5256,7 +5032,6 @@ MIDFUNC(3,jnf_SUBX,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jnf_SUBX,(W4 d, RR4 s, RR4 v)) MIDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) { @@ -5283,7 +5058,6 @@ MIDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) MIDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) { @@ -5310,7 +5084,6 @@ MIDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) MIDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) { @@ -5333,7 +5106,6 @@ MIDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) unlock2(s); unlock2(v); } -MENDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) /* * SWAP @@ -5356,7 +5128,6 @@ MIDFUNC(1,jnf_SWAP,(RW4 d)) unlock2(d); } -MENDFUNC(1,jnf_SWAP,(RW4 d)) MIDFUNC(1,jff_SWAP,(RW4 d)) { @@ -5368,7 +5139,6 @@ MIDFUNC(1,jff_SWAP,(RW4 d)) unlock2(d); } -MENDFUNC(1,jff_SWAP,(RW4 d)) /* * TST @@ -5395,7 +5165,6 @@ MIDFUNC(1,jff_TST_b,(RR1 s)) MSR_CPSRf_i(0); TST_rr(REG_WORK1,REG_WORK1); } -MENDFUNC(1,jff_TST_b,(RR1 s)) MIDFUNC(1,jff_TST_w,(RR2 s)) { @@ -5409,7 +5178,6 @@ MIDFUNC(1,jff_TST_w,(RR2 s)) MSR_CPSRf_i(0); TST_rr(REG_WORK1,REG_WORK1); } -MENDFUNC(1,jff_TST_w,(RR2 s)) MIDFUNC(1,jff_TST_l,(RR4 s)) { @@ -5425,4 +5193,3 @@ MIDFUNC(1,jff_TST_l,(RR4 s)) unlock2(s); } } -MENDFUNC(1,jff_TST_l,(RR4 s)) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp index d5e2e053e..c322e5904 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp @@ -98,14 +98,16 @@ MIDFUNC(0,live_flags,(void)) live.flags_in_flags=VALID; live.flags_are_important=1; } -MENDFUNC(0,live_flags,(void)) MIDFUNC(0,dont_care_flags,(void)) { live.flags_are_important=0; } -MENDFUNC(0,dont_care_flags,(void)) +/* + * store the state of the x86 carry bit into regflags.x, + * into the position denoted by FLAGBIT_X + */ MIDFUNC(0,duplicate_carry,(void)) { evict(FLAGX); @@ -117,54 +119,96 @@ MIDFUNC(0,duplicate_carry,(void)) #endif log_vwrite(FLAGX); } -MENDFUNC(0,duplicate_carry,(void)) +MIDFUNC(3,setcc_for_cntzero,(RR4 /* cnt */, RR4 data, int size)) +{ + uae_u8 *branchadd; + uae_u8 *branchadd2; + + evict(FLAGX); + make_flags_live_internal(); + + raw_pushfl(); + /* + * shift count can only be in CL register; see shrl_b_rr + */ + raw_test_b_rr(X86_CL, X86_CL); + /* if zero, leave X unaffected; carry flag will already be cleared */ + raw_jz_b_oponly(); + branchadd = get_target(); + skip_byte(); + + /* shift count was non-zero; update also x-flag */ + raw_popfl(); +#ifdef UAE + COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem + 1, NATIVE_CC_CS); +#else + COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem, NATIVE_CC_CS); +#endif + log_vwrite(FLAGX); + raw_jmp_b_oponly(); + branchadd2 = get_target(); + skip_byte(); + *branchadd = (uintptr)get_target() - ((uintptr)branchadd + 1); + + /* shift count was zero; need to set Z & N flags since the native flags were unaffected */ + raw_popfl(); + data = readreg(data, size); + switch (size) + { + case 1: raw_test_b_rr(data, data); break; + case 2: raw_test_w_rr(data, data); break; + case 4: raw_test_l_rr(data, data); break; + } + unlock2(data); + *branchadd2 = (uintptr)get_target() - ((uintptr)branchadd2 + 1); +} + +/* + * Set the x86 carry flag from regflags.x, from the position + * denoted by FLAGBIT_X + */ MIDFUNC(0,restore_carry,(void)) { if (!have_rat_stall) { /* Not a P6 core, i.e. no partial stalls */ #ifdef UAE - bt_l_ri_noclobber(FLAGX, 8); + bt_l_ri_noclobber(FLAGX, FLAGBIT_X+8); #else - bt_l_ri_noclobber(FLAGX, 0); + bt_l_ri_noclobber(FLAGX, FLAGBIT_X); #endif } else { /* Avoid the stall the above creates. This is slow on non-P6, though. */ -#ifdef UAE - COMPCALL(rol_w_ri(FLAGX, 8)); +#if defined(UAE) || FLAGBIT_X >= 8 + COMPCALL(rol_w_ri(FLAGX, 16 - FLAGBIT_X)); #else - COMPCALL(rol_b_ri(FLAGX, 8)); + COMPCALL(rol_b_ri(FLAGX, 8 - FLAGBIT_X)); #endif isclean(FLAGX); } } -MENDFUNC(0,restore_carry,(void)) MIDFUNC(0,start_needflags,(void)) { needflags=1; } -MENDFUNC(0,start_needflags,(void)) MIDFUNC(0,end_needflags,(void)) { needflags=0; } -MENDFUNC(0,end_needflags,(void)) MIDFUNC(0,make_flags_live,(void)) { make_flags_live_internal(); } -MENDFUNC(0,make_flags_live,(void)) MIDFUNC(1,fflags_into_flags,(W2 tmp)) { clobber_flags(); fflags_into_flags_internal(tmp); } -MENDFUNC(1,fflags_into_flags,(W2 tmp)) MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ { @@ -176,7 +220,6 @@ MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ raw_bt_l_ri(r,i); unlock2(r); } -MENDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ { @@ -187,7 +230,6 @@ MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ unlock2(r); unlock2(b); } -MENDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ MIDFUNC(2,btc_l_ri,(RW4 r, IMM i)) { @@ -199,7 +241,6 @@ MIDFUNC(2,btc_l_ri,(RW4 r, IMM i)) raw_btc_l_ri(r,i); unlock2(r); } -MENDFUNC(2,btc_l_ri,(RW4 r, IMM i)) MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) { @@ -210,7 +251,6 @@ MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,btr_l_ri,(RW4 r, IMM i)) { @@ -222,7 +262,6 @@ MIDFUNC(2,btr_l_ri,(RW4 r, IMM i)) raw_btr_l_ri(r,i); unlock2(r); } -MENDFUNC(2,btr_l_ri,(RW4 r, IMM i)) MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) { @@ -233,7 +272,6 @@ MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,bts_l_ri,(RW4 r, IMM i)) { @@ -245,7 +283,6 @@ MIDFUNC(2,bts_l_ri,(RW4 r, IMM i)) raw_bts_l_ri(r,i); unlock2(r); } -MENDFUNC(2,bts_l_ri,(RW4 r, IMM i)) MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) { @@ -256,7 +293,6 @@ MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) unlock2(r); unlock2(b); } -MENDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) { @@ -265,7 +301,6 @@ MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) raw_mov_l_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_l_rm,(W4 d, IMM s)) MIDFUNC(1,call_r,(RR4 r)) /* Clobbering is implicit */ { @@ -275,35 +310,30 @@ MIDFUNC(1,call_r,(RR4 r)) /* Clobbering is implicit */ raw_inc_sp(STACK_SHADOW_SPACE); unlock2(r); } -MENDFUNC(1,call_r,(RR4 r)) /* Clobbering is implicit */ MIDFUNC(2,sub_l_mi,(IMM d, IMM s)) { CLOBBER_SUB; raw_sub_l_mi(d,s) ; } -MENDFUNC(2,sub_l_mi,(IMM d, IMM s)) MIDFUNC(2,mov_l_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_l_mi(d,s) ; } -MENDFUNC(2,mov_l_mi,(IMM d, IMM s)) MIDFUNC(2,mov_w_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_w_mi(d,s) ; } -MENDFUNC(2,mov_w_mi,(IMM d, IMM s)) MIDFUNC(2,mov_b_mi,(IMM d, IMM s)) { CLOBBER_MOV; raw_mov_b_mi(d,s) ; } -MENDFUNC(2,mov_b_mi,(IMM d, IMM s)) MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) { @@ -314,7 +344,6 @@ MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) raw_rol_b_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_b_ri,(RW1 r, IMM i)) MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) { @@ -325,7 +354,6 @@ MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) raw_rol_w_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_w_ri,(RW2 r, IMM i)) MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) { @@ -336,49 +364,46 @@ MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) raw_rol_l_ri(r,i); unlock2(r); } -MENDFUNC(2,rol_l_ri,(RW4 r, IMM i)) MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(rol_l_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_ROL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,4,4); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in rol_l_rr",r); } raw_rol_l_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(rol_w_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_ROL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,2,2); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in rol_w_rr",r); } raw_rol_w_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(rol_b_ri)(d,(uae_u8)live.state[r].val); return; } @@ -386,57 +411,54 @@ MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) CLOBBER_ROL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,1,1); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in rol_b_rr",r); } raw_rol_b_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shll_l_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHLL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,4,4); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shll_l_rr",r); } raw_shll_l_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shll_w_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHLL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,2,2); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shll_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shll_w_rr",r); } raw_shll_w_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shll_b_ri)(d,(uae_u8)live.state[r].val); return; } @@ -444,14 +466,13 @@ MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) CLOBBER_SHLL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,1,1); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shll_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shll_b_rr",r); } raw_shll_b_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) @@ -463,7 +484,6 @@ MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) raw_ror_b_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_b_ri,(RR1 r, IMM i)) MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) { @@ -474,7 +494,6 @@ MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) raw_ror_w_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_w_ri,(RR2 r, IMM i)) MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) { @@ -485,11 +504,10 @@ MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) raw_ror_l_ri(r,i); unlock2(r); } -MENDFUNC(2,ror_l_ri,(RR4 r, IMM i)) MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(ror_l_ri)(d,(uae_u8)live.state[r].val); return; } @@ -500,11 +518,10 @@ MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(ror_w_ri)(d,(uae_u8)live.state[r].val); return; } @@ -515,11 +532,10 @@ MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(ror_b_ri)(d,(uae_u8)live.state[r].val); return; } @@ -531,49 +547,46 @@ MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) unlock2(r); unlock2(d); } -MENDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shrl_l_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHRL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,4,4); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shrl_l_rr",r); } raw_shrl_l_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shrl_w_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHRL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,2,2); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shrl_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shrl_w_rr",r); } raw_shrl_w_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shrl_b_ri)(d,(uae_u8)live.state[r].val); return; } @@ -581,14 +594,13 @@ MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) CLOBBER_SHRL; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,1,1); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shrl_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shrl_b_rr",r); } raw_shrl_b_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) @@ -605,7 +617,6 @@ MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) raw_shll_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) { @@ -616,7 +627,6 @@ MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) raw_shll_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) { @@ -627,7 +637,6 @@ MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) raw_shll_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shll_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) { @@ -642,7 +651,6 @@ MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) raw_shrl_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) { @@ -653,7 +661,6 @@ MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) raw_shrl_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) { @@ -664,7 +671,6 @@ MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) raw_shrl_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) { @@ -675,7 +681,6 @@ MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) raw_shra_l_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) { @@ -686,7 +691,6 @@ MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) raw_shra_w_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) { @@ -697,49 +701,46 @@ MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) raw_shra_b_ri(r,i); unlock2(r); } -MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) { - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHRA; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,4,4); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_rol_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shra_l_rr",r); } raw_shra_l_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); return; } CLOBBER_SHRA; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,2,2); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shra_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shra_w_rr",r); } raw_shra_w_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) { /* Can only do this with r==1, i.e. cl */ - if (isconst(r)) { + if (isconst(r) && (uae_u8)live.state[r].val != 0) { COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); return; } @@ -747,14 +748,13 @@ MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) CLOBBER_SHRA; r=readreg_specific(r,1,SHIFTCOUNT_NREG); d=rmw(d,1,1); - Dif (r!=1) { - jit_abort("Illegal register %d in raw_shra_b",r); + Dif (r!=X86_CL) { + jit_abort("Illegal register %d in shra_b_rr",r); } raw_shra_b_rr(d,r) ; unlock2(r); unlock2(d); } -MENDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) MIDFUNC(2,setcc,(W1 d, IMM cc)) @@ -764,14 +764,12 @@ MIDFUNC(2,setcc,(W1 d, IMM cc)) raw_setcc(d,cc); unlock2(d); } -MENDFUNC(2,setcc,(W1 d, IMM cc)) MIDFUNC(2,setcc_m,(IMM d, IMM cc)) { CLOBBER_SETCC; raw_setcc_m(d,cc); } -MENDFUNC(2,setcc_m,(IMM d, IMM cc)) MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) { @@ -784,7 +782,6 @@ MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) unlock2(s); unlock2(d); } -MENDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) MIDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) { @@ -793,7 +790,6 @@ MIDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) raw_cmov_l_rm(d,s,cc); unlock2(d); } -MENDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) MIDFUNC(2,bsf_l_rr,(W4 d, RR4 s)) { @@ -804,7 +800,6 @@ MIDFUNC(2,bsf_l_rr,(W4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,bsf_l_rr,(W4 d, RR4 s)) /* Set the Z flag depending on the value in s. Note that the value has to be 0 or -1 (or, more precisely, for non-zero @@ -818,7 +813,6 @@ MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) unlock2(tmp); unlock2(s); } -MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) { @@ -829,7 +823,6 @@ MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,imul_32_32,(RW4 d, RR4 s)) MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) { @@ -840,7 +833,6 @@ MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) { @@ -851,7 +843,6 @@ MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) MIDFUNC(2,mul_32_32,(RW4 d, RR4 s)) { @@ -862,7 +853,6 @@ MIDFUNC(2,mul_32_32,(RW4 d, RR4 s)) unlock2(s); unlock2(d); } -MENDFUNC(2,mul_32_32,(RW4 d, RR4 s)) #if SIZEOF_VOID_P == 8 MIDFUNC(2,sign_extend_32_rr,(W4 d, RR2 s)) @@ -893,7 +883,6 @@ MIDFUNC(2,sign_extend_32_rr,(W4 d, RR2 s)) unlock2(s); } } -MENDFUNC(2,sign_extend_32_rr,(W4 d, RR2 s)) #endif MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) @@ -924,7 +913,6 @@ MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) unlock2(s); } } -MENDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) { @@ -956,7 +944,6 @@ MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) unlock2(s); } } -MENDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) @@ -987,7 +974,6 @@ MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) unlock2(s); } } -MENDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) { @@ -1018,7 +1004,6 @@ MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) unlock2(s); } } -MENDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) { @@ -1036,7 +1021,6 @@ MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,mov_b_rr,(W1 d, RR1 s)) MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) { @@ -1054,7 +1038,6 @@ MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,mov_w_rr,(W2 d, RR2 s)) MIDFUNC(4,mov_l_rrm_indexed,(W4 d,RR4 baser, RR4 index, IMM factor)) { @@ -1068,7 +1051,6 @@ MIDFUNC(4,mov_l_rrm_indexed,(W4 d,RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_l_rrm_indexed,(W4 d,RR4 baser, RR4 index, IMM factor)) MIDFUNC(4,mov_w_rrm_indexed,(W2 d, RR4 baser, RR4 index, IMM factor)) { @@ -1082,7 +1064,6 @@ MIDFUNC(4,mov_w_rrm_indexed,(W2 d, RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_w_rrm_indexed,(W2 d, RR4 baser, RR4 index, IMM factor)) MIDFUNC(4,mov_b_rrm_indexed,(W1 d, RR4 baser, RR4 index, IMM factor)) { @@ -1097,7 +1078,6 @@ MIDFUNC(4,mov_b_rrm_indexed,(W1 d, RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_b_rrm_indexed,(W1 d, RR4 baser, RR4 index, IMM factor)) MIDFUNC(4,mov_l_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR4 s)) @@ -1116,7 +1096,6 @@ MIDFUNC(4,mov_l_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR4 s)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_l_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR4 s)) MIDFUNC(4,mov_w_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR2 s)) { @@ -1130,7 +1109,6 @@ MIDFUNC(4,mov_w_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR2 s)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_w_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR2 s)) MIDFUNC(4,mov_b_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR1 s)) { @@ -1144,7 +1122,6 @@ MIDFUNC(4,mov_b_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR1 s)) unlock2(baser); unlock2(index); } -MENDFUNC(4,mov_b_mrr_indexed,(RR4 baser, RR4 index, IMM factor, RR1 s)) MIDFUNC(5,mov_l_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s)) @@ -1165,7 +1142,6 @@ MIDFUNC(5,mov_l_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_l_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR4 s)) MIDFUNC(5,mov_w_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s)) { @@ -1185,7 +1161,6 @@ MIDFUNC(5,mov_w_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_w_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR2 s)) MIDFUNC(5,mov_b_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s)) { @@ -1205,7 +1180,6 @@ MIDFUNC(5,mov_b_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_b_bmrr_indexed,(IMM base, RR4 baser, RR4 index, IMM factor, RR1 s)) @@ -1226,7 +1200,6 @@ MIDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, RR4 baser, RR4 index, IMM factor)) MIDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)) @@ -1246,7 +1219,6 @@ MIDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, RR4 baser, RR4 index, IMM factor)) MIDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)) @@ -1266,7 +1238,6 @@ MIDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)) unlock2(baser); unlock2(index); } -MENDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, RR4 baser, RR4 index, IMM factor)) /* Read a long from base+factor*index */ MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) @@ -1287,7 +1258,6 @@ MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) unlock2(index); unlock2(d); } -MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) /* read the long at the address contained in s+offset and store in d */ MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) @@ -1304,7 +1274,6 @@ MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) @@ -1321,7 +1290,6 @@ MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_b_rR,(W1 d, RR4 s, IMM offset)) @@ -1338,7 +1306,6 @@ MIDFUNC(3,mov_b_rR,(W1 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_rR,(W1 d, RR4 s, IMM offset)) /* read the long at the address contained in s+offset and store in d */ MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) @@ -1357,7 +1324,6 @@ MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) @@ -1377,7 +1343,6 @@ MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) /* read the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) @@ -1397,7 +1362,6 @@ MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) { @@ -1413,7 +1377,6 @@ MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) raw_mov_l_Ri(d,i,offset); unlock2(d); } -MENDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) { @@ -1429,7 +1392,6 @@ MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) raw_mov_w_Ri(d,i,offset); unlock2(d); } -MENDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) MIDFUNC(3,mov_b_Ri,(RR4 d, IMM i, IMM offset)) { @@ -1445,7 +1407,6 @@ MIDFUNC(3,mov_b_Ri,(RR4 d, IMM i, IMM offset)) raw_mov_b_Ri(d,i,offset); unlock2(d); } -MENDFUNC(3,mov_b_Ri,(RR4 d, IMM i, IMM offset)) /* Warning! OFFSET is byte sized only! */ MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) @@ -1467,7 +1428,6 @@ MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) { @@ -1487,7 +1447,6 @@ MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) MIDFUNC(3,mov_b_Rr,(RR4 d, RR1 s, IMM offset)) { @@ -1507,7 +1466,6 @@ MIDFUNC(3,mov_b_Rr,(RR4 d, RR1 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_Rr,(RR4 d, RR1 s, IMM offset)) MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) { @@ -1528,7 +1486,6 @@ MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) { @@ -1546,7 +1503,6 @@ MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) unlock2(index); unlock2(s); } -MENDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) { @@ -1560,7 +1516,6 @@ MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) unlock2(index); unlock2(s); } -MENDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) /* write d to the long at the address contained in s+offset */ MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) @@ -1580,7 +1535,6 @@ MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) /* write the word at the address contained in s+offset and store in d */ MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) @@ -1600,7 +1554,6 @@ MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) { @@ -1618,7 +1571,6 @@ MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) unlock2(d); unlock2(s); } -MENDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) MIDFUNC(1,mid_bswap_32,(RW4 r)) { @@ -1634,7 +1586,6 @@ MIDFUNC(1,mid_bswap_32,(RW4 r)) raw_bswap_32(r); unlock2(r); } -MENDFUNC(1,mid_bswap_32,(RW4 r)) MIDFUNC(1,mid_bswap_16,(RW2 r)) { @@ -1650,7 +1601,6 @@ MIDFUNC(1,mid_bswap_16,(RW2 r)) raw_bswap_16(r); unlock2(r); } -MENDFUNC(1,mid_bswap_16,(RW2 r)) @@ -1681,7 +1631,6 @@ MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) jit_log2("Added %d to nreg %d(%d), now holds %d regs", d,s,live.state[d].realind,live.nat[s].nholds); unlock2(s); } -MENDFUNC(2,mov_l_rr,(W4 d, RR4 s)) MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) { @@ -1695,7 +1644,6 @@ MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) raw_mov_l_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_l_mr,(IMM d, RR4 s)) MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) @@ -1710,7 +1658,6 @@ MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) raw_mov_w_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_w_mr,(IMM d, RR2 s)) MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) { @@ -1720,7 +1667,6 @@ MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) raw_mov_w_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) { @@ -1735,7 +1681,6 @@ MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) raw_mov_b_mr(d,s); unlock2(s); } -MENDFUNC(2,mov_b_mr,(IMM d, RR1 s)) MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) { @@ -1745,14 +1690,12 @@ MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) raw_mov_b_rm(d,s); unlock2(d); } -MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) { set_const(d,s); return; } -MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) { @@ -1762,7 +1705,6 @@ MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) raw_mov_w_ri(d,s); unlock2(d); } -MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) { @@ -1772,28 +1714,24 @@ MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) raw_mov_b_ri(d,s); unlock2(d); } -MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) MIDFUNC(2,add_l_mi,(IMM d, IMM s)) { CLOBBER_ADD; raw_add_l_mi(d,s) ; } -MENDFUNC(2,add_l_mi,(IMM d, IMM s)) MIDFUNC(2,add_w_mi,(IMM d, IMM s)) { CLOBBER_ADD; raw_add_w_mi(d,s) ; } -MENDFUNC(2,add_w_mi,(IMM d, IMM s)) MIDFUNC(2,add_b_mi,(IMM d, IMM s)) { CLOBBER_ADD; raw_add_b_mi(d,s) ; } -MENDFUNC(2,add_b_mi,(IMM d, IMM s)) MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) { @@ -1803,7 +1741,6 @@ MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) raw_test_l_ri(d,i); unlock2(d); } -MENDFUNC(2,test_l_ri,(RR4 d, IMM i)) MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) { @@ -1815,7 +1752,6 @@ MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_l_rr,(RR4 d, RR4 s)) MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) { @@ -1827,7 +1763,6 @@ MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_w_rr,(RR2 d, RR2 s)) MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) { @@ -1839,7 +1774,6 @@ MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,test_b_rr,(RR1 d, RR1 s)) MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) @@ -1855,7 +1789,6 @@ MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) raw_and_l_ri(d,i); unlock2(d); } -MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) MIDFUNC(2,and_l,(RW4 d, RR4 s)) { @@ -1867,7 +1800,6 @@ MIDFUNC(2,and_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_l,(RW4 d, RR4 s)) MIDFUNC(2,and_w,(RW2 d, RR2 s)) { @@ -1879,7 +1811,6 @@ MIDFUNC(2,and_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_w,(RW2 d, RR2 s)) MIDFUNC(2,and_b,(RW1 d, RR1 s)) { @@ -1891,7 +1822,6 @@ MIDFUNC(2,and_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,and_b,(RW1 d, RR1 s)) // gb-- used for making an fpcr value in compemu_fpp.cpp MIDFUNC(2,or_l_rm,(RW4 d, IMM s)) @@ -1902,7 +1832,6 @@ MIDFUNC(2,or_l_rm,(RW4 d, IMM s)) raw_or_l_rm(d,s); unlock2(d); } -MENDFUNC(2,or_l_rm,(RW4 d, IMM s)) MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) { @@ -1916,7 +1845,6 @@ MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) raw_or_l_ri(d,i); unlock2(d); } -MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) MIDFUNC(2,or_l,(RW4 d, RR4 s)) { @@ -1932,7 +1860,6 @@ MIDFUNC(2,or_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_l,(RW4 d, RR4 s)) MIDFUNC(2,or_w,(RW2 d, RR2 s)) { @@ -1944,7 +1871,6 @@ MIDFUNC(2,or_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_w,(RW2 d, RR2 s)) MIDFUNC(2,or_b,(RW1 d, RR1 s)) { @@ -1956,7 +1882,6 @@ MIDFUNC(2,or_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,or_b,(RW1 d, RR1 s)) MIDFUNC(2,adc_l,(RW4 d, RR4 s)) { @@ -1969,7 +1894,6 @@ MIDFUNC(2,adc_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_l,(RW4 d, RR4 s)) MIDFUNC(2,adc_w,(RW2 d, RR2 s)) { @@ -1981,7 +1905,6 @@ MIDFUNC(2,adc_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_w,(RW2 d, RR2 s)) MIDFUNC(2,adc_b,(RW1 d, RR1 s)) { @@ -1993,7 +1916,6 @@ MIDFUNC(2,adc_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,adc_b,(RW1 d, RR1 s)) MIDFUNC(2,add_l,(RW4 d, RR4 s)) { @@ -2011,7 +1933,6 @@ MIDFUNC(2,add_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_l,(RW4 d, RR4 s)) MIDFUNC(2,add_w,(RW2 d, RR2 s)) { @@ -2028,7 +1949,6 @@ MIDFUNC(2,add_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_w,(RW2 d, RR2 s)) MIDFUNC(2,add_b,(RW1 d, RR1 s)) { @@ -2045,7 +1965,6 @@ MIDFUNC(2,add_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,add_b,(RW1 d, RR1 s)) MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) { @@ -2068,7 +1987,6 @@ MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) raw_sub_l_ri(d,i); unlock2(d); } -MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) { @@ -2081,7 +1999,6 @@ MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) raw_sub_w_ri(d,i); unlock2(d); } -MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) { @@ -2095,7 +2012,6 @@ MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) unlock2(d); } -MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) { @@ -2116,7 +2032,6 @@ MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) raw_add_l_ri(d,i); unlock2(d); } -MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) { @@ -2129,7 +2044,6 @@ MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) raw_add_w_ri(d,i); unlock2(d); } -MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) { @@ -2143,7 +2057,6 @@ MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) unlock2(d); } -MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) { @@ -2155,7 +2068,6 @@ MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_l,(RW4 d, RR4 s)) MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) { @@ -2167,7 +2079,6 @@ MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_w,(RW2 d, RR2 s)) MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) { @@ -2179,7 +2090,6 @@ MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sbb_b,(RW1 d, RR1 s)) MIDFUNC(2,sub_l,(RW4 d, RR4 s)) { @@ -2196,7 +2106,6 @@ MIDFUNC(2,sub_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_l,(RW4 d, RR4 s)) MIDFUNC(2,sub_w,(RW2 d, RR2 s)) { @@ -2213,7 +2122,6 @@ MIDFUNC(2,sub_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_w,(RW2 d, RR2 s)) MIDFUNC(2,sub_b,(RW1 d, RR1 s)) { @@ -2230,7 +2138,6 @@ MIDFUNC(2,sub_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,sub_b,(RW1 d, RR1 s)) MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) { @@ -2242,7 +2149,6 @@ MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_l,(RR4 d, RR4 s)) MIDFUNC(2,cmp_l_ri,(RR4 r, IMM i)) { @@ -2252,7 +2158,6 @@ MIDFUNC(2,cmp_l_ri,(RR4 r, IMM i)) raw_cmp_l_ri(r,i); unlock2(r); } -MENDFUNC(2,cmp_l_ri,(RR4 r, IMM i)) MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) { @@ -2264,7 +2169,6 @@ MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_w,(RR2 d, RR2 s)) MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) { @@ -2276,7 +2180,6 @@ MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,cmp_b,(RR1 d, RR1 s)) MIDFUNC(2,xor_l,(RW4 d, RR4 s)) @@ -2289,7 +2192,6 @@ MIDFUNC(2,xor_l,(RW4 d, RR4 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_l,(RW4 d, RR4 s)) MIDFUNC(2,xor_w,(RW2 d, RR2 s)) { @@ -2301,7 +2203,6 @@ MIDFUNC(2,xor_w,(RW2 d, RR2 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_w,(RW2 d, RR2 s)) MIDFUNC(2,xor_b,(RW1 d, RR1 s)) { @@ -2313,7 +2214,6 @@ MIDFUNC(2,xor_b,(RW1 d, RR1 s)) unlock2(d); unlock2(s); } -MENDFUNC(2,xor_b,(RW1 d, RR1 s)) MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) { @@ -2360,7 +2260,6 @@ MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) live.state[out1].dirtysize=osize; set_status(out1,DIRTY); } -MENDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) { @@ -2387,7 +2286,6 @@ MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) raw_inc_sp(8); #endif } -MENDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) /* forget_about() takes a mid-layer register */ MIDFUNC(1,forget_about,(W4 r)) @@ -2397,13 +2295,11 @@ MIDFUNC(1,forget_about,(W4 r)) live.state[r].val=0; set_status(r,UNDEF); } -MENDFUNC(1,forget_about,(W4 r)) MIDFUNC(0,nop,(void)) { raw_emit_nop(); } -MENDFUNC(0,nop,(void)) MIDFUNC(1,f_forget_about,(FW r)) { @@ -2411,7 +2307,6 @@ MIDFUNC(1,f_forget_about,(FW r)) f_disassociate(r); live.fate[r].status=UNDEF; } -MENDFUNC(1,f_forget_about,(FW r)) MIDFUNC(1,fmov_pi,(FW r)) { @@ -2419,7 +2314,6 @@ MIDFUNC(1,fmov_pi,(FW r)) raw_fmov_pi(r); f_unlock(r); } -MENDFUNC(1,fmov_pi,(FW r)) MIDFUNC(1,fmov_log10_2,(FW r)) { @@ -2427,7 +2321,6 @@ MIDFUNC(1,fmov_log10_2,(FW r)) raw_fmov_log10_2(r); f_unlock(r); } -MENDFUNC(1,fmov_log10_2,(FW r)) MIDFUNC(1,fmov_log2_e,(FW r)) { @@ -2435,7 +2328,6 @@ MIDFUNC(1,fmov_log2_e,(FW r)) raw_fmov_log2_e(r); f_unlock(r); } -MENDFUNC(1,fmov_log2_e,(FW r)) MIDFUNC(1,fmov_loge_2,(FW r)) { @@ -2443,7 +2335,6 @@ MIDFUNC(1,fmov_loge_2,(FW r)) raw_fmov_loge_2(r); f_unlock(r); } -MENDFUNC(1,fmov_loge_2,(FW r)) MIDFUNC(1,fmov_1,(FW r)) { @@ -2451,7 +2342,6 @@ MIDFUNC(1,fmov_1,(FW r)) raw_fmov_1(r); f_unlock(r); } -MENDFUNC(1,fmov_1,(FW r)) MIDFUNC(1,fmov_0,(FW r)) { @@ -2459,55 +2349,48 @@ MIDFUNC(1,fmov_0,(FW r)) raw_fmov_0(r); f_unlock(r); } -MENDFUNC(1,fmov_0,(FW r)) -MIDFUNC(2,fmov_rm,(FW r, MEMR m)) +MIDFUNC(2,fmov_rm,(FW r, MEMPTRR m)) { r=f_writereg(r); raw_fmov_rm(r,m); f_unlock(r); } -MENDFUNC(2,fmov_rm,(FW r, MEMR m)) -MIDFUNC(2,fmovi_rm,(FW r, MEMR m)) +MIDFUNC(2,fmovi_rm,(FW r, MEMPTRR m)) { r=f_writereg(r); raw_fmovi_rm(r,m); f_unlock(r); } -MENDFUNC(2,fmovi_rm,(FW r, MEMR m)) -MIDFUNC(2,fmovi_mr,(MEMW m, FR r)) +MIDFUNC(2,fmovi_mr,(MEMPTRW m, FR r)) { r=f_readreg(r); raw_fmovi_mr(m,r); f_unlock(r); } -MENDFUNC(2,fmovi_mr,(MEMW m, FR r)) -MIDFUNC(3,fmovi_mrb,(MEMW m, FR r, double *bounds)) +MIDFUNC(3,fmovi_mrb,(MEMPTRW m, FR r, double *bounds)) { r=f_readreg(r); raw_fmovi_mrb(m,r,bounds); f_unlock(r); } -MENDFUNC(3,fmovi_mrb,(MEMW m, FR r, double *bounds)) -MIDFUNC(2,fmovs_rm,(FW r, MEMR m)) +MIDFUNC(2,fmovs_rm,(FW r, MEMPTRR m)) { r=f_writereg(r); raw_fmovs_rm(r,m); f_unlock(r); } -MENDFUNC(2,fmovs_rm,(FW r, MEMR m)) -MIDFUNC(2,fmovs_mr,(MEMW m, FR r)) +MIDFUNC(2,fmovs_mr,(MEMPTRW m, FR r)) { r=f_readreg(r); raw_fmovs_mr(m,r); f_unlock(r); } -MENDFUNC(2,fmovs_mr,(MEMW m, FR r)) MIDFUNC(1,fcuts_r,(FRW r)) { @@ -2515,7 +2398,6 @@ MIDFUNC(1,fcuts_r,(FRW r)) raw_fcuts_r(r); f_unlock(r); } -MENDFUNC(1,fcuts_r,(FRW r)) MIDFUNC(1,fcut_r,(FRW r)) { @@ -2523,31 +2405,27 @@ MIDFUNC(1,fcut_r,(FRW r)) raw_fcut_r(r); f_unlock(r); } -MENDFUNC(1,fcut_r,(FRW r)) -MIDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) +MIDFUNC(2,fmov_ext_mr,(MEMPTRW m, FR r)) { r=f_readreg(r); raw_fmov_ext_mr(m,r); f_unlock(r); } -MENDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) -MIDFUNC(2,fmov_mr,(MEMW m, FR r)) +MIDFUNC(2,fmov_mr,(MEMPTRW m, FR r)) { r=f_readreg(r); raw_fmov_mr(m,r); f_unlock(r); } -MENDFUNC(2,fmov_mr,(MEMW m, FR r)) -MIDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) +MIDFUNC(2,fmov_ext_rm,(FW r, MEMPTRR m)) { r=f_writereg(r); raw_fmov_ext_rm(r,m); f_unlock(r); } -MENDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) MIDFUNC(2,fmov_rr,(FW d, FR s)) { @@ -2571,7 +2449,6 @@ MIDFUNC(2,fmov_rr,(FW d, FR s)) f_unlock(d); #endif } -MENDFUNC(2,fmov_rr,(FW d, FR s)) MIDFUNC(2,fldcw_m_indexed,(RR4 index, IMM base)) { @@ -2580,7 +2457,6 @@ MIDFUNC(2,fldcw_m_indexed,(RR4 index, IMM base)) raw_fldcw_m_indexed(index,base); unlock2(index); } -MENDFUNC(2,fldcw_m_indexed,(RR4 index, IMM base)) MIDFUNC(1,ftst_r,(FR r)) { @@ -2588,13 +2464,11 @@ MIDFUNC(1,ftst_r,(FR r)) raw_ftst_r(r); f_unlock(r); } -MENDFUNC(1,ftst_r,(FR r)) MIDFUNC(0,dont_care_fflags,(void)) { f_disassociate(FP_RESULT); } -MENDFUNC(0,dont_care_fflags,(void)) MIDFUNC(2,fsqrt_rr,(FW d, FR s)) { @@ -2604,7 +2478,6 @@ MIDFUNC(2,fsqrt_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fsqrt_rr,(FW d, FR s)) MIDFUNC(2,fabs_rr,(FW d, FR s)) { @@ -2614,7 +2487,6 @@ MIDFUNC(2,fabs_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fabs_rr,(FW d, FR s)) MIDFUNC(2,fgetexp_rr,(FW d, FR s)) { @@ -2624,7 +2496,6 @@ MIDFUNC(2,fgetexp_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fgetexp_rr,(FW d, FR s)) MIDFUNC(2,fgetman_rr,(FW d, FR s)) { @@ -2634,7 +2505,6 @@ MIDFUNC(2,fgetman_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fgetman_rr,(FW d, FR s)) MIDFUNC(2,fsin_rr,(FW d, FR s)) { @@ -2644,7 +2514,6 @@ MIDFUNC(2,fsin_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fsin_rr,(FW d, FR s)) MIDFUNC(2,fcos_rr,(FW d, FR s)) { @@ -2654,7 +2523,6 @@ MIDFUNC(2,fcos_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fcos_rr,(FW d, FR s)) MIDFUNC(2,ftan_rr,(FW d, FR s)) { @@ -2664,7 +2532,6 @@ MIDFUNC(2,ftan_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,ftan_rr,(FW d, FR s)) MIDFUNC(3,fsincos_rr,(FW d, FW c, FR s)) { @@ -2676,7 +2543,6 @@ MIDFUNC(3,fsincos_rr,(FW d, FW c, FR s)) f_unlock(d); f_unlock(c); } -MENDFUNC(3,fsincos_rr,(FW d, FW c, FR s)) MIDFUNC(2,fscale_rr,(FRW d, FR s)) { @@ -2686,7 +2552,6 @@ MIDFUNC(2,fscale_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fscale_rr,(FRW d, FR s)) MIDFUNC(2,ftwotox_rr,(FW d, FR s)) { @@ -2696,7 +2561,6 @@ MIDFUNC(2,ftwotox_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,ftwotox_rr,(FW d, FR s)) MIDFUNC(2,fetox_rr,(FW d, FR s)) { @@ -2706,7 +2570,6 @@ MIDFUNC(2,fetox_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fetox_rr,(FW d, FR s)) MIDFUNC(2,frndint_rr,(FW d, FR s)) { @@ -2716,7 +2579,6 @@ MIDFUNC(2,frndint_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,frndint_rr,(FW d, FR s)) MIDFUNC(2,fetoxM1_rr,(FW d, FR s)) { @@ -2726,7 +2588,6 @@ MIDFUNC(2,fetoxM1_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fetoxM1_rr,(FW d, FR s)) MIDFUNC(2,ftentox_rr,(FW d, FR s)) { @@ -2736,7 +2597,6 @@ MIDFUNC(2,ftentox_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,ftentox_rr,(FW d, FR s)) MIDFUNC(2,flog2_rr,(FW d, FR s)) { @@ -2746,7 +2606,6 @@ MIDFUNC(2,flog2_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,flog2_rr,(FW d, FR s)) MIDFUNC(2,flogN_rr,(FW d, FR s)) { @@ -2756,7 +2615,6 @@ MIDFUNC(2,flogN_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,flogN_rr,(FW d, FR s)) MIDFUNC(2,flogNP1_rr,(FW d, FR s)) { @@ -2766,7 +2624,6 @@ MIDFUNC(2,flogNP1_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,flogNP1_rr,(FW d, FR s)) MIDFUNC(2,flog10_rr,(FW d, FR s)) { @@ -2776,7 +2633,6 @@ MIDFUNC(2,flog10_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,flog10_rr,(FW d, FR s)) MIDFUNC(2,fasin_rr,(FW d, FR s)) { @@ -2786,7 +2642,6 @@ MIDFUNC(2,fasin_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fasin_rr,(FW d, FR s)) MIDFUNC(2,facos_rr,(FW d, FR s)) { @@ -2796,7 +2651,6 @@ MIDFUNC(2,facos_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,facos_rr,(FW d, FR s)) MIDFUNC(2,fatan_rr,(FW d, FR s)) { @@ -2806,7 +2660,6 @@ MIDFUNC(2,fatan_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fatan_rr,(FW d, FR s)) MIDFUNC(2,fatanh_rr,(FW d, FR s)) { @@ -2816,7 +2669,6 @@ MIDFUNC(2,fatanh_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fatanh_rr,(FW d, FR s)) MIDFUNC(2,fsinh_rr,(FW d, FR s)) { @@ -2826,7 +2678,6 @@ MIDFUNC(2,fsinh_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fsinh_rr,(FW d, FR s)) MIDFUNC(2,fcosh_rr,(FW d, FR s)) { @@ -2836,7 +2687,6 @@ MIDFUNC(2,fcosh_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fcosh_rr,(FW d, FR s)) MIDFUNC(2,ftanh_rr,(FW d, FR s)) { @@ -2846,7 +2696,6 @@ MIDFUNC(2,ftanh_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,ftanh_rr,(FW d, FR s)) MIDFUNC(2,fneg_rr,(FW d, FR s)) { @@ -2856,7 +2705,6 @@ MIDFUNC(2,fneg_rr,(FW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fneg_rr,(FW d, FR s)) MIDFUNC(2,fadd_rr,(FRW d, FR s)) { @@ -2866,7 +2714,6 @@ MIDFUNC(2,fadd_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fadd_rr,(FRW d, FR s)) MIDFUNC(2,fsub_rr,(FRW d, FR s)) { @@ -2876,7 +2723,6 @@ MIDFUNC(2,fsub_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fsub_rr,(FRW d, FR s)) MIDFUNC(2,fcmp_rr,(FR d, FR s)) { @@ -2886,7 +2732,6 @@ MIDFUNC(2,fcmp_rr,(FR d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fcmp_rr,(FR d, FR s)) MIDFUNC(2,fdiv_rr,(FRW d, FR s)) { @@ -2896,7 +2741,6 @@ MIDFUNC(2,fdiv_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fdiv_rr,(FRW d, FR s)) MIDFUNC(2,frem_rr,(FRW d, FR s)) { @@ -2906,7 +2750,6 @@ MIDFUNC(2,frem_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,frem_rr,(FRW d, FR s)) MIDFUNC(2,frem1_rr,(FRW d, FR s)) { @@ -2916,7 +2759,6 @@ MIDFUNC(2,frem1_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,frem1_rr,(FRW d, FR s)) MIDFUNC(2,fmul_rr,(FRW d, FR s)) { @@ -2926,7 +2768,6 @@ MIDFUNC(2,fmul_rr,(FRW d, FR s)) f_unlock(s); f_unlock(d); } -MENDFUNC(2,fmul_rr,(FRW d, FR s)) #ifdef __GNUC__ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h index a0f5cf92c..8476d9477 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h @@ -185,6 +185,7 @@ DECLARE_MIDFUNC(xor_b(RW1 d, RR1 s)); DECLARE_MIDFUNC(live_flags(void)); DECLARE_MIDFUNC(dont_care_flags(void)); DECLARE_MIDFUNC(duplicate_carry(void)); +DECLARE_MIDFUNC(setcc_for_cntzero(RR4 d, RR4 data, int size)); DECLARE_MIDFUNC(restore_carry(void)); DECLARE_MIDFUNC(start_needflags(void)); DECLARE_MIDFUNC(end_needflags(void)); @@ -201,17 +202,17 @@ DECLARE_MIDFUNC(fmov_log2_e(FW r)); DECLARE_MIDFUNC(fmov_loge_2(FW r)); DECLARE_MIDFUNC(fmov_1(FW r)); DECLARE_MIDFUNC(fmov_0(FW r)); -DECLARE_MIDFUNC(fmov_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmov_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmovi_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmovi_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmovi_mrb(MEMW m, FR r, double *bounds)); -DECLARE_MIDFUNC(fmovs_rm(FW r, MEMR m)); -DECLARE_MIDFUNC(fmovs_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmov_rm(FW r, MEMPTRR m)); +DECLARE_MIDFUNC(fmov_mr(MEMPTRW m, FR r)); +DECLARE_MIDFUNC(fmovi_rm(FW r, MEMPTRR m)); +DECLARE_MIDFUNC(fmovi_mr(MEMPTRW m, FR r)); +DECLARE_MIDFUNC(fmovi_mrb(MEMPTRW m, FR r, double *bounds)); +DECLARE_MIDFUNC(fmovs_rm(FW r, MEMPTRR m)); +DECLARE_MIDFUNC(fmovs_mr(MEMPTRW m, FR r)); DECLARE_MIDFUNC(fcuts_r(FRW r)); DECLARE_MIDFUNC(fcut_r(FRW r)); -DECLARE_MIDFUNC(fmov_ext_mr(MEMW m, FR r)); -DECLARE_MIDFUNC(fmov_ext_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmov_ext_mr(MEMPTRW m, FR r)); +DECLARE_MIDFUNC(fmov_ext_rm(FW r, MEMPTRR m)); DECLARE_MIDFUNC(fmov_rr(FW d, FR s)); DECLARE_MIDFUNC(fldcw_m_indexed(RR4 index, IMM base)); DECLARE_MIDFUNC(ftst_r(FR r)); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 068123b80..9b178c0fd 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -43,12 +43,6 @@ #error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" #endif -//TODO: detect i386 and arm platforms - -#ifdef __x86_64__ -#define CPU_x86_64 1 -#endif - /* NOTE: support for AMD64 assumes translation cache and other code * buffers are allocated into a 32-bit address space because (i) B2/JIT * code is not 64-bit clean and (ii) it's faster to resolve branches @@ -72,7 +66,7 @@ #ifdef UAE #include "options.h" #include "events.h" -#include "memory.h" +#include "uae/memory.h" #include "custom.h" #else #include "cpu_emulation.h" @@ -88,11 +82,15 @@ #include "comptbl.h" #ifdef UAE #include "compemu.h" +#ifdef FSUAE +#include "codegen_udis86.h" +#endif #else #include "compiler/compemu.h" #include "fpu/fpu.h" #include "fpu/flags.h" // #include "parameters.h" +static void build_comp(void); #endif // #include "verify.h" @@ -100,10 +98,16 @@ // uae_log("JIT: " format "\n", ##__VA_ARGS__); #define D2 D - #ifdef UAE +#ifdef FSUAE +#include "uae/fs.h" +#endif #include "uae/log.h" +#if defined(__pie__) || defined (__PIE__) +#error Position-independent code (PIE) cannot be used with JIT +#endif + #include "uae/vm.h" #define VM_PAGE_READ UAE_VM_READ #define VM_PAGE_WRITE UAE_VM_WRITE @@ -149,6 +153,15 @@ static inline int distrust_check(int value) return 1; #else int distrust = value; +#ifdef FSUAE + switch (value) { + case 0: distrust = 0; break; + case 1: distrust = 1; break; + case 2: distrust = ((start_pc & 0xF80000) == 0xF80000); break; + case 3: distrust = !have_done_picasso; break; + default: abort(); + } +#endif return distrust; #endif } @@ -237,7 +250,7 @@ static clock_t emul_end_time = 0; #endif #ifdef PROFILE_UNTRANSLATED_INSNS -static const int untranslated_top_ten = 20; +static const int untranslated_top_ten = 50; static uae_u32 raw_cputbl_count[65536] = { 0, }; static uae_u16 opcode_nums[65536]; @@ -266,8 +279,10 @@ extern bool quit_program; // gb-- Extra data for Basilisk II/JIT #ifdef JIT_DEBUG static bool JITDebug = false; // Enable runtime disassemblers through mon? +// #define JITDebug bx_options.jit.jitdebug // Enable runtime disassemblers through mon? #else const bool JITDebug = false; +// #define JITDebug false // Don't use JIT debug mode at all #endif #if USE_INLINING #ifdef UAE @@ -283,6 +298,7 @@ const uae_u32 MIN_CACHE_SIZE = 1024; // Minimal translation cache size (1 MB) static uae_u32 cache_size = 0; // Size of total cache allocated for compiled blocks static uae_u32 current_cache_size = 0; // Cache grows upwards: how much has been consumed already static bool lazy_flush = true; // Flag: lazy translation cache invalidation +// Flag: compile FPU instructions ? #ifdef UAE #ifdef USE_JIT_FPU #define avoid_fpu (!currprefs.compfpu) @@ -291,6 +307,11 @@ static bool lazy_flush = true; // Flag: lazy translation cache invalidation #endif #else static bool avoid_fpu = true; // Flag: compile FPU instructions ? +// #ifdef USE_JIT_FPU +// #define avoid_fpu (!bx_options.jit.jitfpu) +// #else +// #define avoid_fpu (true) +// #endif #endif static bool have_cmov = false; // target has CMOV instructions ? static bool have_rat_stall = true; // target has partial register stalls ? @@ -370,10 +391,9 @@ static uintptr taken_pc_p; static int branch_cc; static int redo_current_block; +#ifdef UAE int segvcount=0; -int soft_flush_count=0; -int hard_flush_count=0; -int checksum_count=0; +#endif static uae_u8* current_compile_p=NULL; static uae_u8* max_compile_start; static uae_u8* compiled_code=NULL; @@ -395,7 +415,7 @@ static void* popall_check_checksum=NULL; * lists that we maintain for each hash result. */ static cacheline cache_tags[TAGSIZE]; -int letit=0; +static int cache_enabled=0; static blockinfo* hold_bi[MAX_HOLD_BI]; static blockinfo* active; static blockinfo* dormant; @@ -420,12 +440,10 @@ extern const struct cputbl op_smalltbl_4_nf[]; extern const struct cputbl op_smalltbl_5_nf[]; #endif -#ifdef WINUAE_ARANYM -static void flush_icache_hard(int n); -static void flush_icache_lazy(int n); -static void flush_icache_none(int n); -void (*flush_icache)(int n) = flush_icache_none; -#endif +static void flush_icache_hard(void); +static void flush_icache_lazy(void); +static void flush_icache_none(void); +void (*flush_icache)(void) = flush_icache_none; static bigstate live; static smallstate empty_ss; @@ -452,7 +470,7 @@ uae_u32 m68k_pc_offset; * side effects they would have on the flags are not important. This * variable indicates whether we need the side effects or not */ -uae_u32 needflags=0; +static uae_u32 needflags=0; /* Flag handling is complicated. * @@ -500,7 +518,7 @@ static inline blockinfo* get_blockinfo_addr(void* addr) /******************************************************************* * Disassembler support * *******************************************************************/ - + #define TARGET_M68K 0 #define TARGET_POWERPC 1 #define TARGET_X86 2 @@ -531,11 +549,11 @@ static void disasm_block(int disasm_target, const uint8 *start, size_t length) #if defined(HAVE_DISASM_M68K) { char buf[256]; - + disasm_info.memory_vma = ((memptr)((uintptr_t)(start) - MEMBaseDiff)); while (length > 0) { - int isize = m68k_disasm_to_buf(&disasm_info, buf); + int isize = m68k_disasm_to_buf(&disasm_info, buf, 1); bug("%s", buf); if (isize < 0) break; @@ -552,10 +570,10 @@ static void disasm_block(int disasm_target, const uint8 *start, size_t length) { const uint8 *end = start + length; char buf[256]; - + while (start < end) { - start = x86_disasm(start, buf); + start = x86_disasm(start, buf, 1); bug("%s", buf); } } @@ -566,10 +584,10 @@ static void disasm_block(int disasm_target, const uint8 *start, size_t length) { const uint8 *end = start + length; char buf[256]; - + while (start < end) { - start = arm_disasm(start, buf); + start = arm_disasm(start, buf, 1); bug("%s", buf); } } @@ -2640,8 +2658,10 @@ static scratch_t scratch; * Support functions exposed to newcpu * ********************************************************************/ -#define str_on_off(b) b ? "on" : "off" - +static inline const char *str_on_off(bool b) +{ + return b ? "on" : "off"; +} #ifdef UAE static @@ -2673,8 +2693,6 @@ void compiler_init(void) cache_size = PrefsFindInt32("jitcachesize"); jit_log(" : requested translation cache size : %d KB", cache_size); - // Initialize target CPU (check for features, e.g. CMOV, rat stalls) - raw_init_cpu(); setzflg_uses_bsf = target_check_bsf(); jit_log(" : target processor has CMOV instructions : %s", have_cmov ? "yes" : "no"); jit_log(" : target processor can suffer from partial register stalls : %s", have_rat_stall ? "yes" : "no"); @@ -2700,6 +2718,8 @@ void compiler_init(void) jit_log(" : separate blockinfo allocation : %s", str_on_off(USE_SEPARATE_BIA)); // Build compiler tables + read_table68k(); + do_merges(); build_comp(); #endif @@ -2728,7 +2748,7 @@ void compiler_exit(void) #else #if DEBUG #if defined(USE_DATA_BUFFER) - jit_log("data_wasted = %d bytes", data_wasted); + jit_log("data_wasted = %ld bytes", data_wasted); #endif #endif @@ -2759,7 +2779,7 @@ void compiler_exit(void) opcode_nums[i] = i; untranslated_count += raw_cputbl_count[i]; } - jit_log("Sorting out untranslated instructions count..."); + bug("Sorting out untranslated instructions count..."); qsort(opcode_nums, 65536, sizeof(uae_u16), untranslated_compfn); jit_log("Rank Opc Count Name"); for (int i = 0; i < untranslated_top_ten; i++) { @@ -2771,7 +2791,7 @@ void compiler_exit(void) dp = table68k + opcode_nums[i]; for (lookup = lookuptab; lookup->mnemo != (instrmnem)dp->mnemo; lookup++) ; - jit_log("%03d: %04x %10u %s", i, opcode_nums[i], count, lookup->name); + bug("%03d: %04x %10u %s", i, opcode_nums[i], count, lookup->name); } #endif @@ -2793,6 +2813,8 @@ void compiler_exit(void) 100.0*double(cum_reg_count)/double(tot_reg_count)); } #endif + + // exit_table68k(); } #ifdef UAE @@ -2813,7 +2835,7 @@ bool compiler_use_jit(void) } #endif -void init_comp(void) +static void init_comp(void) { int i; uae_s8* cb=can_byte; @@ -3015,14 +3037,18 @@ static void flush_keepflags(void) } #endif -void freescratch(void) +static void freescratch(void) { int i; for (i=0;i= CODE_ALLOC_MAX_ATTEMPTS) - return NULL; - - return do_alloc_code(size, depth + 1); -#else UNUSED(depth); uint8 *code = (uint8 *)vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); return code == VM_MAP_FAILED ? NULL : code; -#endif } static inline uint8 *alloc_code(uint32 size) @@ -3559,7 +3540,7 @@ static inline uint8 *alloc_code(uint32 size) void alloc_cache(void) { if (compiled_code) { - flush_icache_hard(6); + flush_icache_hard(); vm_release(compiled_code, cache_size * 1024); compiled_code = 0; } @@ -3719,8 +3700,6 @@ static inline int block_check_checksum(blockinfo* bi) if (bi->status!=BI_NEED_CHECK) return 1; /* This block is in a checked state */ - checksum_count++; - if (bi->c1 || bi->c2) calc_checksum(bi,&c1,&c2); else { @@ -3885,7 +3864,10 @@ static inline void create_popalls(void) r=REG_PC_TMP; compemu_raw_mov_l_rm(r, uae_p32(®s.pc_p)); compemu_raw_and_l_ri(r,TAGMASK); - assert(sizeof(cache_tags[0]) == sizeof(void *)); + { + assert(sizeof(cache_tags[0]) == sizeof(void *)); + // verify(sizeof(cache_tags[0]) == sizeof(void *)); + } compemu_raw_jmp_m_indexed(uae_p32(cache_tags), r, sizeof(void *)); /* now the exit points */ @@ -4020,12 +4002,98 @@ static int read_opcode(const char *p) return opcode; } + +#ifdef USE_JIT_FPU +static struct { + const char *name; + bool *const disabled; +} const jit_opcodes[] = { + { "fbcc", &jit_disable.fbcc }, + { "fdbcc", &jit_disable.fdbcc }, + { "fscc", &jit_disable.fscc }, + { "ftrapcc", &jit_disable.ftrapcc }, + { "fsave", &jit_disable.fsave }, + { "frestore", &jit_disable.frestore }, + { "fmove", &jit_disable.fmove }, + { "fmovec", &jit_disable.fmovec }, + { "fmovem", &jit_disable.fmovem }, + { "fmovecr", &jit_disable.fmovecr }, + { "fint", &jit_disable.fint }, + { "fsinh", &jit_disable.fsinh }, + { "fintrz", &jit_disable.fintrz }, + { "fsqrt", &jit_disable.fsqrt }, + { "flognp1", &jit_disable.flognp1 }, + { "fetoxm1", &jit_disable.fetoxm1 }, + { "ftanh", &jit_disable.ftanh }, + { "fatan", &jit_disable.fatan }, + { "fasin", &jit_disable.fasin }, + { "fatanh", &jit_disable.fatanh }, + { "fsin", &jit_disable.fsin }, + { "ftan", &jit_disable.ftan }, + { "fetox", &jit_disable.fetox }, + { "ftwotox", &jit_disable.ftwotox }, + { "ftentox", &jit_disable.ftentox }, + { "flogn", &jit_disable.flogn }, + { "flog10", &jit_disable.flog10 }, + { "flog2", &jit_disable.flog2 }, + { "fabs", &jit_disable.fabs }, + { "fcosh", &jit_disable.fcosh }, + { "fneg", &jit_disable.fneg }, + { "facos", &jit_disable.facos }, + { "fcos", &jit_disable.fcos }, + { "fgetexp", &jit_disable.fgetexp }, + { "fgetman", &jit_disable.fgetman }, + { "fdiv", &jit_disable.fdiv }, + { "fmod", &jit_disable.fmod }, + { "fadd", &jit_disable.fadd }, + { "fmul", &jit_disable.fmul }, + { "fsgldiv", &jit_disable.fsgldiv }, + { "frem", &jit_disable.frem }, + { "fscale", &jit_disable.fscale }, + { "fsglmul", &jit_disable.fsglmul }, + { "fsub", &jit_disable.fsub }, + { "fsincos", &jit_disable.fsincos }, + { "fcmp", &jit_disable.fcmp }, + { "ftst", &jit_disable.ftst }, +}; + +static bool read_fpu_opcode(const char **pp) +{ + const char *p = *pp; + const char *end; + size_t len; + unsigned int i; + + end = p; + while (*end != '\0' && *end != ',') + end++; + len = end - p; + if (*end != '\0') + end++; + for (i = 0; i < (sizeof(jit_opcodes) / sizeof(jit_opcodes[0])); i++) + { + if (len == strlen(jit_opcodes[i].name) && strncasecmp(jit_opcodes[i].name, p, len) == 0) + { + *jit_opcodes[i].disabled = true; + jit_log(" : disabled %s", jit_opcodes[i].name); + *pp = end; + return true; + } + } + return false; +} +#endif + static bool merge_blacklist() { #ifdef UAE const char *blacklist = ""; #else const char *blacklist = PrefsFindString("jitblacklist"); +#endif +#ifdef USE_JIT_FPU + for (unsigned int i = 0; i < (sizeof(jit_opcodes) / sizeof(jit_opcodes[0])); i++) + *jit_opcodes[i].disabled = false; #endif if (blacklist[0] != '\0') { const char *p = blacklist; @@ -4035,7 +4103,14 @@ static bool merge_blacklist() int opcode1 = read_opcode(p); if (opcode1 < 0) + { +#ifdef USE_JIT_FPU + if (read_fpu_opcode(&p)) + continue; +#endif + bug(" : invalid opcode %s", p); return false; + } p += 4; int opcode2 = opcode1; @@ -4043,7 +4118,10 @@ static bool merge_blacklist() p++; opcode2 = read_opcode(p); if (opcode2 < 0) + { + bug(" : invalid opcode %s", p); return false; + } p += 4; } @@ -4066,6 +4144,12 @@ static bool merge_blacklist() void build_comp(void) { +#ifdef FSUAE + if (!g_fs_uae_jit_compiler) { + jit_log("JIT: JIT compiler is not enabled"); + return; + } +#endif int i; unsigned long opcode; const struct comptbl* tbl=op_smalltbl_0_comp_ff; @@ -4084,6 +4168,8 @@ void build_comp(void) : op_smalltbl_5_nf); #endif #endif + // Initialize target CPU (check for features, e.g. CMOV, rat stalls) + raw_init_cpu(); #ifdef NATMEM_OFFSET #ifdef UAE @@ -4220,7 +4306,7 @@ void build_comp(void) { jit_log(" : blacklist merge failure!"); } - + count=0; for (opcode = 0; opcode < 65536; opcode++) { if (compfunctbl[cft_map(opcode)]) @@ -4258,21 +4344,19 @@ void build_comp(void) } -static void flush_icache_none(int) +static void flush_icache_none(void) { /* Nothing to do. */ } -static void flush_icache_hard(int n) +void flush_icache_hard(void) { blockinfo* bi, *dbi; - hard_flush_count++; #ifndef UAE jit_log("JIT: Flush Icache_hard(%d/%x/%p), %u KB", n,regs.pc,regs.pc_p,current_cache_size/1024); #endif - UNUSED(n); bi=active; while(bi) { cache_tags[cacheline(bi->pc_p)].handler=(cpuop_func*)popall_execute_normal; @@ -4309,22 +4393,11 @@ static void flush_icache_hard(int n) we simply mark everything as "needs to be checked". */ -#ifdef WINUAE_ARANYM -static inline void flush_icache_lazy(int) -#else -void flush_icache(int n) -#endif +static inline void flush_icache_lazy(void) { blockinfo* bi; blockinfo* bi2; -#ifdef UAE - if (currprefs.comp_hardflush) { - flush_icache_hard(n); - return; - } -#endif - soft_flush_count++; if (!active) return; @@ -4359,51 +4432,15 @@ void flush_icache(int n) active=NULL; } -#ifdef UAE -static -#endif -// void flush_icache_range(uae_u32 start, uae_u32 length) -// { -// if (!active) -// return; - -// #if LAZY_FLUSH_ICACHE_RANGE -// uae_u8 *start_p = get_real_address(start); -// blockinfo *bi = active; -// while (bi) { -// #if USE_CHECKSUM_INFO -// bool invalidate = false; -// for (checksum_info *csi = bi->csi; csi && !invalidate; csi = csi->next) -// invalidate = (((start_p - csi->start_p) < csi->length) || -// ((csi->start_p - start_p) < length)); -// #else -// // Assume system is consistent and would invalidate the right range -// const bool invalidate = (bi->pc_p - start_p) < length; -// #endif -// if (invalidate) { -// uae_u32 cl = cacheline(bi->pc_p); -// if (bi == cache_tags[cl + 1].bi) -// cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; -// bi->handler_to_use = (cpuop_func *)popall_execute_normal; -// set_dhtu(bi, bi->direct_pen); -// bi->status = BI_NEED_RECOMP; -// } -// bi = bi->next; -// } -// return; -// #else -// UNUSED(start); -// UNUSED(length); -// #endif -// flush_icache(-1); -// } -void flush_icache_range(uae_u8 *start_p, uae_u32 length) +#if 0 +static void flush_icache_range(uae_u32 start, uae_u32 length) { if (!active) return; #if LAZY_FLUSH_ICACHE_RANGE + uae_u8 *start_p = get_real_address(start); blockinfo *bi = active; while (bi) { #if USE_CHECKSUM_INFO @@ -4427,18 +4464,13 @@ void flush_icache_range(uae_u8 *start_p, uae_u32 length) } return; #else - // UNUSED(start); - // UNUSED(length); + UNUSED(start); + UNUSED(length); #endif - flush_icache(-1); + flush_icache(); } +#endif -/* -static void catastrophe(void) -{ - jit_abort("catastprophe"); -} -*/ int failure; @@ -4465,45 +4497,45 @@ void compiler_dumpstate(void) if (!JITDebug) return; - bug("### Host addresses"); - bug("MEM_BASE : %lx", (unsigned long)MEMBaseDiff); - bug("PC_P : %p", ®s.pc_p); - bug("SPCFLAGS : %p", ®s.spcflags); - bug("D0-D7 : %p-%p", ®s.regs[0], ®s.regs[7]); - bug("A0-A7 : %p-%p", ®s.regs[8], ®s.regs[15]); - bug(" "); + jit_log("### Host addresses"); + jit_log("MEM_BASE : %lx", (unsigned long)MEMBaseDiff); + jit_log("PC_P : %p", ®s.pc_p); + jit_log("SPCFLAGS : %p", ®s.spcflags); + jit_log("D0-D7 : %p-%p", ®s.regs[0], ®s.regs[7]); + jit_log("A0-A7 : %p-%p", ®s.regs[8], ®s.regs[15]); + jit_log(" "); - bug("### M68k processor state"); + jit_log("### M68k processor state"); m68k_dumpstate(stderr, 0); - bug(" "); + jit_log(" "); - bug("### Block in Atari address space"); - bug("M68K block : %p", + jit_log("### Block in Atari address space"); + jit_log("M68K block : %p", (void *)(uintptr)last_regs_pc_p); if (last_regs_pc_p != 0) { - bug("Native block : %p (%d bytes)", + jit_log("Native block : %p (%d bytes)", (void *)last_compiled_block_addr, get_blockinfo_addr(last_regs_pc_p)->direct_handler_size); } - bug(" "); + jit_log(" "); } #endif #ifdef UAE void compile_block(cpu_history *pc_hist, int blocklen, int totcycles) { - if (letit && compiled_code && currprefs.cpu_model >= 68020) { + if (cache_enabled && compiled_code && currprefs.cpu_model >= 68020) { #else static void compile_block(cpu_history* pc_hist, int blocklen) { - if (letit && compiled_code) { + if (cache_enabled && compiled_code) { #endif #ifdef PROFILE_COMPILE_TIME compile_count++; clock_t start_time = clock(); #endif #ifdef JIT_DEBUG - bool disasm_block = true; + bool disasm_block = false; #endif /* OK, here we need to 'compile' a block */ @@ -4527,7 +4559,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) redo_current_block=0; if (current_compile_p >= MAX_COMPILE_PTR) - flush_icache_hard(7); + flush_icache_hard(); alloc_blockinfos(); @@ -4643,12 +4675,12 @@ static void compile_block(cpu_history* pc_hist, int blocklen) #ifdef USE_CPU_EMUL_SERVICES compemu_raw_sub_l_mi((uintptr)&emulated_ticks,blocklen); compemu_raw_jcc_b_oponly(NATIVE_CC_GT); - uae_s8 *branchadd=(uae_s8*)get_target(); + uae_u8 *branchadd=get_target(); skip_byte(); raw_dec_sp(STACK_SHADOW_SPACE); compemu_raw_call((uintptr)cpu_do_check_ticks); raw_inc_sp(STACK_SHADOW_SPACE); - *branchadd=(uintptr)get_target()-((uintptr)branchadd+1); + *branchadd=get_target()-(branchadd+1); #endif #ifdef JIT_DEBUG @@ -4690,7 +4722,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) prepare_for_call_1(); prepare_for_call_2(); raw_mov_l_ri(REG_PAR1, ((uintptr)(pc_hist[i].location)) - MEMBaseDiff); - raw_mov_w_ri(REG_PAR2, opcode); + raw_mov_w_ri(REG_PAR2, cft_map(opcode)); raw_dec_sp(STACK_SHADOW_SPACE); compemu_raw_call((uintptr)m68k_record_step); raw_inc_sp(STACK_SHADOW_SPACE); @@ -4706,11 +4738,13 @@ static void compile_block(cpu_history* pc_hist, int blocklen) } was_comp=1; +#ifdef WINUAE_ARANYM bool isnop = do_get_mem_word(pc_hist[i].location) == 0x4e71 || ((i + 1) < blocklen && do_get_mem_word(pc_hist[i+1].location) == 0x4e71); if (isnop) compemu_raw_mov_l_mi((uintptr)®s.fault_pc, ((uintptr)(pc_hist[i].location)) - MEMBaseDiff); +#endif comptbl[opcode](opcode); freescratch(); @@ -4724,6 +4758,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) flush(1); was_comp=0; #endif +#ifdef WINUAE_ARANYM /* * workaround for buserror handling: on a "nop", write registers back */ @@ -4733,6 +4768,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) nop(); was_comp=0; } +#endif } if (failure) { @@ -4758,7 +4794,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) #endif if (i < blocklen - 1) { - uae_s8* branchadd; + uae_u8* branchadd; /* if (SPCFLAGS_TEST(SPCFLAG_STOP)) popall_do_nothing() */ compemu_raw_mov_l_rm(0,(uintptr)specflags); @@ -4767,13 +4803,13 @@ static void compile_block(cpu_history* pc_hist, int blocklen) data_check_end(8, 64); // just a pessimistic guess... #endif compemu_raw_jz_b_oponly(); - branchadd=(uae_s8*)get_target(); + branchadd=get_target(); skip_byte(); #ifdef UAE raw_sub_l_mi(uae_p32(&countdown),scaled_cycles(totcycles)); #endif compemu_raw_jmp((uintptr)popall_do_nothing); - *branchadd=(uintptr)get_target()-(uintptr)branchadd-1; + *branchadd=get_target()-branchadd-1; } } } @@ -4804,7 +4840,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) } #endif log_flush(); - + if (next_pc_p) { /* A branch was registered */ uintptr t1=next_pc_p; uintptr t2=taken_pc_p; @@ -4900,7 +4936,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) tbi = get_blockinfo_addr_new((void*) v, 1); match_states(tbi); - + #ifdef UAE raw_sub_l_mi(uae_p32(&countdown),scaled_cycles(totcycles)); raw_jcc_l_oponly(NATIVE_CC_PL); @@ -4936,10 +4972,10 @@ static void compile_block(cpu_history* pc_hist, int blocklen) if (callers_need_recompile(&live,&(bi->env))) { mark_callers_recompile(bi); } - + big_to_small_state(&live,&(bi->env)); #endif - + #if USE_CHECKSUM_INFO remove_from_list(bi); if (trace_in_rom) { @@ -4974,7 +5010,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) } #endif - current_cache_size += get_target() - (uae_u8 *)current_compile_p; + current_cache_size += get_target() - current_compile_p; #ifdef JIT_DEBUG bi->direct_handler_size = get_target() - (uae_u8 *)current_block_start_target; @@ -4983,9 +5019,13 @@ static void compile_block(cpu_history* pc_hist, int blocklen) uaecptr block_addr = start_pc + ((char *)pc_hist[0].location - (char *)start_pc_p); jit_log("M68K block @ 0x%08x (%d insns)", block_addr, blocklen); uae_u32 block_size = ((uae_u8 *)pc_hist[blocklen - 1].location - (uae_u8 *)pc_hist[0].location) + 1; +#ifdef WINUAE_ARANYM disasm_m68k_block((const uae_u8 *)pc_hist[0].location, block_size); +#endif jit_log("Compiled block @ %p", pc_hist[0].location); +#ifdef WINUAE_ARANYM disasm_native_block((const uae_u8 *)current_block_start_target, bi->direct_handler_size); +#endif UNUSED(block_addr); } #endif @@ -5022,7 +5062,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) /* We will flush soon, anyway, so let's do it now */ if (current_compile_p >= MAX_COMPILE_PTR) - flush_icache_hard(7); + flush_icache_hard(); bi->status=BI_ACTIVE; if (redo_current_block) @@ -5037,7 +5077,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) #endif } -#ifndef UAE +#ifdef USE_CPU_EMUL_SERVICES /* Account for compilation time */ cpu_do_check_ticks(); #endif @@ -5060,7 +5100,7 @@ void exec_nostats(void) for (;;) { uae_u32 opcode = GET_OPCODE; #if FLIGHT_RECORDER - m68k_record_step(m68k_getpc(), opcode); + m68k_record_step(m68k_getpc(), cft_map(opcode)); #endif (*cpufunctbl[opcode])(opcode); cpu_check_ticks(); @@ -5090,7 +5130,7 @@ void execute_normal(void) pc_hist[blocklen++].location = (uae_u16 *)regs.pc_p; uae_u32 opcode = GET_OPCODE; #if FLIGHT_RECORDER - m68k_record_step(m68k_getpc(), opcode); + m68k_record_step(m68k_getpc(), cft_map(opcode)); #endif (*cpufunctbl[opcode])(opcode); cpu_check_ticks(); @@ -5131,11 +5171,15 @@ void m68k_compile_execute (void) setjmpagain: TRY(prb) { for (;;) { - if (quit_program == 1) { + if (quit_program > 0) { + if (quit_program == 1) { #if FLIGHT_RECORDER - dump_flight_recorder(); + dump_flight_recorder(); #endif - break; + break; + } + quit_program = 0; + m68k_reset (); } m68k_do_compile_execute(); } @@ -5148,7 +5192,7 @@ void m68k_compile_execute (void) regs.fault_pc, regs.mmu_fault_addr, get_long (regs.vbr + 4*prb), regs.regs[15]); - flush_icache(0); + flush_icache(); Exception(prb, 0); goto setjmpagain; } diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index febeddc90..712d78739 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -93,11 +93,16 @@ #define DISABLE_I_FSCC #define DISABLE_I_MOVE16 */ + #endif /* UAE */ #ifdef UAE #define JIT_PATH "jit/" +#ifdef FSUAE +#define GEN_PATH "gen/" +#else #define GEN_PATH "jit/" +#endif #define RETURN "return 0;" #define RETTYPE "uae_u32" #define NEXT_CPU_LEVEL 5 @@ -107,7 +112,6 @@ #define RETURN "return;" #define RETTYPE "void" #define NEXT_CPU_LEVEL 4 -#define ua(s) s #endif #define BOOL_TYPE "int" @@ -738,8 +742,9 @@ static void genmov16(uae_u32 opcode, struct instr *curi) "\tadd_l_ri(dst,4);\n" "\treadlong(src,tmp,scratchie);\n" "\twritelong_clobber(dst,tmp,scratchie);\n"); - comprintf("\t} else {\n"); + comprintf("\t} else\n"); #endif + start_brace(); comprintf("\tint tmp=scratchie;\n"); comprintf("\tscratchie+=4;\n" "\tget_n_addr(src,src,scratchie);\n" @@ -755,9 +760,7 @@ static void genmov16(uae_u32 opcode, struct instr *curi) "\tmov_l_Rr(dst,tmp+2,8);\n" "\tforget_about(tmp+2);\n" "\tmov_l_Rr(dst,tmp+3,12);\n"); -#ifdef UAE - comprintf("\t}\n"); -#endif + close_brace(); } static void @@ -1304,11 +1307,11 @@ genflags (flagtypes type, wordsizes size, const char *value, const char *src, co break; } comprintf("\tlive_flags();\n"); - comprintf("\tif (needed_flags&FLAG_Z) {\n" - "\tcmov_l_rr(zero,one,%d);\n" - "\tset_zero(zero, one);\n" /* No longer need one */ - "\tlive_flags();\n" - "\t}\n",NATIVE_CC_NE); + comprintf("\tif (needed_flags&FLAG_Z) {\n"); + comprintf("\tcmov_l_rr(zero,one,%d);\n", NATIVE_CC_NE); + comprintf("\tset_zero(zero, one);\n"); /* No longer need one */ + comprintf("\tlive_flags();\n"); + comprintf("\t}\n"); comprintf("\tend_needflags();\n"); duplicate_carry(); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); @@ -2181,158 +2184,63 @@ gen_opcode (unsigned int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint width;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n" - "\tint highshift=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" - "\thighmask=0x38;\n" - "\twidth=8;\n"); - break; - case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" - "\thighmask=0x30;\n" - "\twidth=16;\n"); - break; - case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" - "\thighmask=0x20;\n" - "\twidth=32;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(highshift,0);\n" - "mov_l_ri(scratchie,width/2);\n" - "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); - /* The x86 masks out bits, so we now make sure that things - really get shifted as much as planned */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; - default: assert(0); - } - /* And again */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; - default: assert(0); - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshra_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshra_l_rr(cdata,tmpcnt);\n");break; - default: assert(0); - } - /* If the shift count was higher than the width, we need - to pick up the sign from data */ - comprintf("test_l_ri(tmpcnt,highmask);\n" - "cmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* And create the flags */ + start_brace(); + if (!noflags) comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { + if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint highmask;\n" - "\tint width;\n" - "\tint highshift=scratchie++;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" - "\thighmask=0x38;\n" - "\twidth=8;\n"); - break; - case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" - "\thighmask=0x30;\n" - "\twidth=16;\n"); - break; - case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" - "\thighmask=0x20;\n" - "\twidth=32;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(highshift,0);\n" - "mov_l_ri(scratchie,width/2);\n" - "cmov_l_rr(highshift,scratchie,%d);\n",NATIVE_CC_NE); - /* The x86 masks out bits, so we now make sure that things - really get shifted as much as planned */ + comprintf("\tint zero = scratchie++;\n"); + comprintf("\tint minus1 = scratchie++;\n"); + comprintf("\tand_l_ri(cnt,63);\n"); + comprintf("\tmov_l_ri(zero, 0);\n"); + comprintf("\tmov_l_ri(minus1, -1);\n"); switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; - default: assert(0); - } - /* And again */ - switch(curi->size) { - case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; - case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; - case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + case sz_byte: + comprintf("\ttest_b_rr(data,data);\n"); + comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); + comprintf("\ttest_l_ri(cnt, 0x38);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_b_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\ttest_w_rr(data,data);\n"); + comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); + comprintf("\ttest_l_ri(cnt, 0x30);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_w_rr(data,cnt);\n"); + break; + case sz_long: + comprintf("\ttest_l_rr(data,data);\n"); + comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); + comprintf("\ttest_l_ri(cnt, 0x20);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_l_rr(data,cnt);\n"); + break; default: assert(0); } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } + /* Result of shift is now in data. */ } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); switch(curi->size) { - case sz_byte: comprintf("\tshra_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_word: comprintf("\tshra_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_long: comprintf("\tshra_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; + case sz_byte: comprintf("\tshra_b_ri(data,srcreg);\n"); break; + case sz_word: comprintf("\tshra_w_ri(data,srcreg);\n"); break; + case sz_long: comprintf("\tshra_l_ri(data,srcreg);\n"); break; default: assert(0); } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); + } + /* And create the flags */ + if (!noflags) { + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (curi->smode!=immi) + comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + else + comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; case i_ASL: @@ -2359,129 +2267,54 @@ gen_opcode (unsigned int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: assert(0); - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; - default: assert(0); - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,7);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,15);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,31);\n"); break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { + if (!noflags) + comprintf("\tstart_needflags();\n"); + if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + comprintf("\tint zero = scratchie++;\n"); + comprintf("\tand_l_ri(cnt,63);\n"); + comprintf("\tmov_l_ri(zero, 0);\n"); switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + case sz_byte: + comprintf("\ttest_l_ri(cnt, 0x38);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_b_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\ttest_l_ri(cnt, 0x30);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_w_rr(data,cnt);\n"); + break; + case sz_long: + comprintf("\ttest_l_ri(cnt, 0x20);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_l_rr(data,cnt);\n"); + break; default: assert(0); } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } + /* Result of shift is now in data. */ } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); switch(curi->size) { - case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); break; - case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); break; - case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); break; + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n"); break; default: assert(0); } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); + } + /* And create the flags */ + if (!noflags) { + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (curi->smode!=immi) + comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + else + comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; case i_LSR: @@ -2500,126 +2333,55 @@ gen_opcode (unsigned int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: assert(0); - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshrl_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshrl_l_rr(cdata,tmpcnt);\n");break; - default: assert(0); - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); - /* And create the flags */ + + start_brace(); + if (!noflags) comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { + if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + comprintf("\tint zero = scratchie++;\n"); + comprintf("\tand_l_ri(cnt,63);\n"); + comprintf("\tmov_l_ri(zero, 0);\n"); switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + case sz_byte: + comprintf("\ttest_l_ri(cnt, 0x38);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshrl_b_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\ttest_l_ri(cnt, 0x30);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshrl_w_rr(data,cnt);\n"); + break; + case sz_long: + comprintf("\ttest_l_ri(cnt, 0x20);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshrl_l_rr(data, cnt);\n"); + break; default: assert(0); } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } + /* Result of shift is now in data. */ } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); switch(curi->size) { - case sz_byte: comprintf("\tshrl_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_word: comprintf("\tshrl_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; - case sz_long: comprintf("\tshrl_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); break; + case sz_byte: comprintf("\tshrl_b_ri(data,srcreg);\n"); break; + case sz_word: comprintf("\tshrl_w_ri(data,srcreg);\n"); break; + case sz_long: comprintf("\tshrl_l_ri(data,srcreg);\n"); break; default: assert(0); } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); + } + /* And create the flags */ + if (!noflags) { + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (curi->smode!=immi) + comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + else + comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; case i_LSL: @@ -2638,128 +2400,55 @@ gen_opcode (unsigned int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode!=immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n",NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); - switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; - default: assert(0); - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; - case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; - case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; - default: assert(0); - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n",NATIVE_CC_NE); - /* And create the flags */ + + start_brace(); + if (!noflags) comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,7);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,15);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,31);\n"); break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } - else { + if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint highmask;\n"); - switch(curi->size) { - case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: assert(0); - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n",NATIVE_CC_EQ); + comprintf("\tint zero = scratchie++;\n"); + comprintf("\tand_l_ri(cnt,63);\n"); + comprintf("\tmov_l_ri(zero, 0);\n"); switch(curi->size) { - case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; - case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; - case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + case sz_byte: + comprintf("\ttest_l_ri(cnt, 0x38);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_b_rr(data,cnt);\n"); + break; + case sz_word: + comprintf("\ttest_l_ri(cnt, 0x30);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_w_rr(data,cnt);\n"); + break; + case sz_long: + comprintf("\ttest_l_ri(cnt, 0x20);\n"); + comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); + comprintf("\tshll_l_rr(data,cnt);\n"); + break; default: assert(0); } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); - } + /* Result of shift is now in data. */ } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); switch(curi->size) { - case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); break; - case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); break; - case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); break; + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n"); break; default: assert(0); } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); + } + /* And create the flags */ + if (!noflags) { + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (curi->smode!=immi) + comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + else + comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore ("data", curi->dmode, "dstreg", curi->size, "data"); } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; case i_ROL: @@ -2787,6 +2476,9 @@ gen_opcode (unsigned int opcode) if (!noflags) { comprintf("\tstart_needflags();\n"); + /* + * x86 ROL instruction does not set ZF/SF, so we need extra checks here + */ comprintf("\tif (needed_flags & FLAG_ZNV)\n"); switch(curi->size) { case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; @@ -2825,6 +2517,9 @@ gen_opcode (unsigned int opcode) if (!noflags) { comprintf("\tstart_needflags();\n"); + /* + * x86 ROR instruction does not set ZF/SF, so we need extra checks here + */ comprintf("\tif (needed_flags & FLAG_ZNV)\n"); switch(curi->size) { case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; @@ -3133,7 +2828,7 @@ generate_includes (FILE * f) fprintf (f, "#include \"sysdeps.h\"\n"); #ifdef UAE fprintf (f, "#include \"options.h\"\n"); - fprintf (f, "#include \"memory.h\"\n"); + fprintf (f, "#include \"uae/memory.h\"\n"); #else fprintf (f, "#include \"m68k.h\"\n"); fprintf (f, "#include \"memory.h\"\n"); @@ -3147,7 +2842,6 @@ generate_includes (FILE * f) static int postfix; -#ifdef UAE static char *decodeEA (amodes mode, wordsizes size) { static char buffer[80]; @@ -3221,22 +2915,13 @@ static char *decodeEA (amodes mode, wordsizes size) return buffer; } -static char *outopcode (int opcode) +static char *outopcode (const char *name, int opcode) { static char out[100]; struct instr *ins; - int i; ins = &table68k[opcode]; - for (i = 0; lookuptab[i].name[0]; i++) { - if (ins->mnemo == lookuptab[i].mnemo) - break; - } - { - char *s = ua (lookuptab[i].name); - strcpy (out, s); - xfree (s); - } + strcpy (out, name); if (ins->smode == immi) strcat (out, "Q"); if (ins->size == sz_byte) @@ -3254,7 +2939,6 @@ static char *outopcode (int opcode) } return out; } -#endif static void @@ -3266,11 +2950,7 @@ generate_one_opcode (int rp, int noflags) int aborted=0; int have_srcreg=0; int have_dstreg=0; -#ifdef UAE - char *name; -#else const char *name; -#endif if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) @@ -3459,34 +3139,23 @@ generate_one_opcode (int rp, int noflags) else strcpy(flags, "0"); -#ifdef UAE +#ifdef UAE /* RETTYPE != void */ comprintf ("return 0;\n"); #endif comprintf ("}\n"); -#ifdef UAE - name = ua (lookuptab[i].name); -#else name = lookuptab[i].name; -#endif if (aborted) { fprintf (stblfile, "{ NULL, %u, %s }, /* %s */\n", opcode, flags, name); com_discard(); } else { const char *tbl = noflags ? "nf" : "ff"; -#ifdef UAE - printf ("/* %s */\n", outopcode (opcode)); -#else - printf ("/* %s */\n", name); -#endif fprintf (stblfile, "{ op_%x_%d_comp_%s, %u, %s }, /* %s */\n", opcode, postfix, tbl, opcode, flags, name); fprintf (headerfile, "extern compop_func op_%x_%d_comp_%s;\n", opcode, postfix, tbl); - printf (RETTYPE " REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode)\n{\n", opcode, postfix, tbl); + printf ("/* %s */\n", outopcode (name, opcode)); + printf (RETTYPE " REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, tbl, name); com_flush(); } -#ifdef UAE - xfree (name); -#endif } opcode_next_clev[rp] = next_cpu_level; opcode_last_postfix[rp] = postfix; @@ -3552,7 +3221,12 @@ void cygwin_mingw_abort() } #endif +#if defined(FSUAE) && defined (WINDOWS) +#include "windows.h" +int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow) +#else int main(void) +#endif { read_table68k (); do_merges (); @@ -3582,6 +3256,7 @@ int main(void) generate_includes (stblfile); printf("#include \"" JIT_PATH "compemu.h\"\n"); + printf("#include \"" JIT_PATH "flags_x86.h\"\n"); noflags=0; generate_func (noflags); diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c index e9bf9bb48..7ec9ff767 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c @@ -677,6 +677,7 @@ static void gen_move16(uae_u32 opcode, struct instr *curi) { else if ((opcode & 0xfff8) == 0xf608) comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n"); + start_brace(); comprintf("\tint tmp=scratchie;\n"); comprintf("\tscratchie+=4;\n"); @@ -693,6 +694,7 @@ static void gen_move16(uae_u32 opcode, struct instr *curi) { "\tmov_l_Rr(dst,tmp+2,8);\n" "\tforget_about(tmp+2);\n" "\tmov_l_Rr(dst,tmp+3,12);\n"); + close_brace(); #endif } @@ -4632,10 +4634,10 @@ gen_opcode(unsigned long int opcode) { failure; break; - case i_NATFEAT_ID: - case i_NATFEAT_CALL: - failure; - break; + // case i_NATFEAT_ID: + // case i_NATFEAT_CALL: + // failure; + // break; case i_MMUOP: isjump; @@ -4665,6 +4667,105 @@ static void generate_includes(FILE * f) { static int postfix; +static char *decodeEA (amodes mode, wordsizes size) +{ + static char buffer[80]; + + buffer[0] = 0; + switch (mode){ + case Dreg: + strcpy (buffer,"Dn"); + break; + case Areg: + strcpy (buffer,"An"); + break; + case Aind: + strcpy (buffer,"(An)"); + break; + case Aipi: + strcpy (buffer,"(An)+"); + break; + case Apdi: + strcpy (buffer,"-(An)"); + break; + case Ad16: + strcpy (buffer,"(d16,An)"); + break; + case Ad8r: + strcpy (buffer,"(d8,An,Xn)"); + break; + case PC16: + strcpy (buffer,"(d16,PC)"); + break; + case PC8r: + strcpy (buffer,"(d8,PC,Xn)"); + break; + case absw: + strcpy (buffer,"(xxx).W"); + break; + case absl: + strcpy (buffer,"(xxx).L"); + break; + case imm: + switch (size){ + case sz_byte: + strcpy (buffer,"#.B"); + break; + case sz_word: + strcpy (buffer,"#.W"); + break; + case sz_long: + strcpy (buffer,"#.L"); + break; + default: + break; + } + break; + case imm0: + strcpy (buffer,"#.B"); + break; + case imm1: + strcpy (buffer,"#.W"); + break; + case imm2: + strcpy (buffer,"#.L"); + break; + case immi: + strcpy (buffer,"#"); + break; + + default: + break; + } + return buffer; +} + +static char *outopcode (const char *name, int opcode) +{ + static char out[100]; + struct instr *ins; + + ins = &table68k[opcode]; + strcpy (out, name); + if (ins->smode == immi) + strcat (out, "Q"); + if (ins->size == sz_byte) + strcat (out,".B"); + if (ins->size == sz_word) + strcat (out,".W"); + if (ins->size == sz_long) + strcat (out,".L"); + strcat (out," "); + if (ins->suse) + strcat (out, decodeEA (ins->smode, ins->size)); + if (ins->duse) { + if (ins->suse) strcat (out,","); + strcat (out, decodeEA (ins->dmode, ins->size)); + } + return out; +} + + static void generate_one_opcode(int rp, int noflags) { int i; uae_u16 smsk, dmsk; @@ -4858,6 +4959,7 @@ static void generate_one_opcode(int rp, int noflags) { opcode, postfix, tbl, opcode, flags, name); fprintf(headerfile, "extern compop_func op_%x_%d_comp_%s;\n", opcode, postfix, tbl); + printf ("/* %s */\n", outopcode (name, opcode)); printf( "void REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, tbl, name); diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 1653adab9..5ab3895ab 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -582,7 +582,7 @@ static void genmovemle (uae_u16 opcode) static void duplicate_carry (void) { - printf ("\tCOPY_CARRY;\n"); + printf ("\tCOPY_CARRY();\n"); } typedef enum { @@ -682,7 +682,7 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * switch (type) { case flag_logical: - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); printf ("\tSET_ZFLG (%s == 0);\n", vstr); printf ("\tSET_NFLG (%s < 0);\n", vstr); break; @@ -697,10 +697,10 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); break; case flag_z: - printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); + printf ("\tSET_ZFLG (GET_ZFLG() & (%s == 0));\n", vstr); break; case flag_zn: - printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); + printf ("\tSET_ZFLG (GET_ZFLG() & (%s == 0));\n", vstr); printf ("\tSET_NFLG (%s < 0);\n", vstr); break; case flag_add: @@ -926,7 +926,7 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); - printf ("\tuae_u32 newv = dst - src - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u32 newv = dst - src - (GET_XFLG() ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); @@ -935,14 +935,14 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); - printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG() ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); printf ("\tuae_u16 newv, tmp_newv;\n"); printf ("\tint bcd = 0;\n"); printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); printf ("\tif (newv_lo & 0xF0) { newv -= 6; bcd = 6; };\n"); - printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); - printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF);\n"); + printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG() ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); + printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG() ? 1 : 0)) & 0x300) > 0xFF);\n"); duplicate_carry (); /* Manual says bits NV are undefined though a real 68040 don't change them */ if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { @@ -974,7 +974,7 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); - printf ("\tuae_u32 newv = dst + src + (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u32 newv = dst + src + (GET_XFLG() ? 1 : 0);\n"); genflags (flag_addx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); @@ -983,7 +983,7 @@ static void gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace (); - printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG() ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); printf ("\tuae_u16 newv, tmp_newv;\n"); printf ("\tint cflg;\n"); @@ -1014,7 +1014,7 @@ static void gen_opcode (unsigned long int opcode) case i_NEGX: genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); - printf ("\tuae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u32 newv = 0 - src - (GET_XFLG() ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "0"); genflags (flag_zn, curi->size, "newv", "", ""); genastore ("newv", curi->smode, "srcreg", curi->size, "src"); @@ -1022,7 +1022,7 @@ static void gen_opcode (unsigned long int opcode) case i_NBCD: genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); start_brace (); - printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG() ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); printf ("\tuae_u16 newv;\n"); printf ("\tint cflg;\n"); @@ -1295,7 +1295,7 @@ static void gen_opcode (unsigned long int opcode) break; case i_TRAPV: sync_m68k_pc (); - printf ("\tif (GET_VFLG) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); + printf ("\tif (GET_VFLG()) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); need_endlabel = 1; break; case i_RTR: @@ -1505,7 +1505,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tSET_ZFLG (upper == reg || lower == reg);\n"); printf ("\tSET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); - printf ("\tif ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); + printf ("\tif ((extra & 0x800) && GET_CFLG()) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); need_endlabel = 1; break; @@ -1521,7 +1521,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tuae_u32 sign = (%s & val) >> %d;\n", cmask (curi->size), bit_size (curi->size) - 1); printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); printf ("\t\tval = %s & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size)); printf ("\t\tSET_CFLG (sign);\n"); @@ -1553,7 +1553,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); printf ("\t\tSET_VFLG (val != 0);\n"); printf ("\t\tSET_CFLG (cnt == %d ? val & 1 : 0);\n", @@ -1589,7 +1589,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); printf ("\t\tSET_CFLG ((cnt == %d) & (val >> %d));\n", bit_size (curi->size), bit_size (curi->size) - 1); @@ -1618,7 +1618,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); printf ("\t\tSET_CFLG (cnt == %d ? val & 1 : 0);\n", bit_size (curi->size)); @@ -1648,7 +1648,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); if (source_is_imm1_8 (curi)) printf ("{"); else @@ -1675,7 +1675,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); if (source_is_imm1_8 (curi)) printf ("{"); else @@ -1702,7 +1702,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); if (source_is_imm1_8 (curi)) printf ("{"); else { @@ -1713,11 +1713,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 loval = val >> (%d - cnt);\n", bit_size (curi->size) - 1); printf ("\tcarry = loval & 1;\n"); - printf ("\tval = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1);\n"); + printf ("\tval = (((val << 1) | GET_XFLG()) << cnt) | (loval >> 1);\n"); printf ("\tSET_XFLG (carry);\n"); printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t} }\n"); - printf ("\tSET_CFLG (GET_XFLG);\n"); + printf ("\tSET_CFLG (GET_XFLG());\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; @@ -1732,7 +1732,7 @@ static void gen_opcode (unsigned long int opcode) default: abort (); } printf ("\tcnt &= 63;\n"); - printf ("\tCLEAR_CZNV;\n"); + printf ("\tCLEAR_CZNV();\n"); if (source_is_imm1_8 (curi)) printf ("{"); else { @@ -1741,7 +1741,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); - printf ("\tuae_u32 hival = (val << 1) | GET_XFLG;\n"); + printf ("\tuae_u32 hival = (val << 1) | GET_XFLG();\n"); printf ("\thival <<= (%d - cnt);\n", bit_size (curi->size) - 1); printf ("\tval >>= cnt;\n"); printf ("\tcarry = val & 1;\n"); @@ -1750,7 +1750,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_XFLG (carry);\n"); printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t} }\n"); - printf ("\tSET_CFLG (GET_XFLG);\n"); + printf ("\tSET_CFLG (GET_XFLG());\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); genastore ("val", curi->dmode, "dstreg", curi->size, "data"); break; @@ -1788,7 +1788,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG (sign != 0);\n"); duplicate_carry (); - printf ("\tSET_VFLG (GET_VFLG | (sign2 != sign));\n"); + printf ("\tSET_VFLG (GET_VFLG() | (sign2 != sign));\n"); genastore ("val", curi->smode, "srcreg", curi->size, "data"); break; case i_LSRW: @@ -1866,7 +1866,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tuae_u32 carry = val & %s;\n", cmask (curi->size)); printf ("\tval <<= 1;\n"); - printf ("\tif (GET_XFLG) val |= 1;\n"); + printf ("\tif (GET_XFLG()) val |= 1;\n"); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); @@ -1883,7 +1883,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tuae_u32 carry = val & 1;\n"); printf ("\tval >>= 1;\n"); - printf ("\tif (GET_XFLG) val |= %s;\n", cmask (curi->size)); + printf ("\tif (GET_XFLG()) val |= %s;\n", cmask (curi->size)); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); @@ -1912,7 +1912,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tint ru = (src >> 6) & 7;\n"); printf ("\tint rc = src & 7;\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc)", "dst"); - printf ("\tif (GET_ZFLG)"); + printf ("\tif (GET_ZFLG())"); old_brace_level = n_braces; start_brace (); genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst"); @@ -1931,14 +1931,14 @@ static void gen_opcode (unsigned long int opcode) int old_brace_level = n_braces; printf ("\tuae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2);\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); - printf ("\tif (GET_ZFLG) {\n"); + printf ("\tif (GET_ZFLG()) {\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); - printf ("\tif (GET_ZFLG) {\n"); + printf ("\tif (GET_ZFLG()) {\n"); printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); - printf ("\tif (! GET_ZFLG) {\n"); + printf ("\tif (! GET_ZFLG()) {\n"); printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);\n"); printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);\n"); printf ("\t}\n"); @@ -1946,14 +1946,14 @@ static void gen_opcode (unsigned long int opcode) int old_brace_level = n_braces; printf ("\tuae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2);\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); - printf ("\tif (GET_ZFLG) {\n"); + printf ("\tif (GET_ZFLG()) {\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); - printf ("\tif (GET_ZFLG) {\n"); + printf ("\tif (GET_ZFLG()) {\n"); printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); - printf ("\tif (! GET_ZFLG) {\n"); + printf ("\tif (! GET_ZFLG()) {\n"); printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = dst1;\n"); printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = dst2;\n"); printf ("\t}\n"); @@ -2053,7 +2053,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\ttmp = ~tmp;\n"); break; case i_BFEXTS: - printf ("\tif (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width);\n"); + printf ("\tif (GET_NFLG()) tmp |= width == 32 ? 0 : (-1 << width);\n"); printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); break; case i_BFCLR: @@ -2185,18 +2185,40 @@ static void gen_opcode (unsigned long int opcode) printf ("\tfpuop_restore(opcode);\n"); break; case i_CINVL: + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); + break; case i_CINVP: + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); + break; case i_CINVA: - /* gb-- srcreg now contains the cache field */ - printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 30 + ((opcode >> 3) & 3)); + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); break; case i_CPUSHL: + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); + break; case i_CPUSHP: + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); + break; case i_CPUSHA: - /* gb-- srcreg now contains the cache field */ - printf ("\tif (srcreg&0x2)\n"); - printf ("\t\tflush_icache(%d);\n", 40 + ((opcode >> 3) & 3)); + printf("\n#ifdef USE_JIT\n"); + printf ("\tif (opcode&0x80)\n" + "\t\tflush_icache();\n"); + printf("#endif\n"); break; case i_MOVE16: if ((opcode & 0xfff8) == 0xf620) { diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index f329cb3ed..d4d284847 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -25,67 +25,108 @@ #ifdef OPTIMIZED_FLAGS -#if defined(X86_ASSEMBLY) || defined(X86_64_ASSEMBLY) || defined(MSVC_INTRINSICS) +#if (defined(CPU_i386) && defined(X86_ASSEMBLY)) || (defined(CPU_x86_64) && defined(X86_64_ASSEMBLY)) + +# include #ifndef SAHF_SETO_PROFITABLE +/* + * Machine dependent structure for holding the 68k CCR flags + */ /* PUSH/POP instructions are naturally 64-bit sized on x86-64, thus unsigned long hereunder is either 64-bit or 32-bit wide depending on the target. */ struct flag_struct { - unsigned long cznv; - unsigned long x; +#if defined(CPU_x86_64) + uint64 cznv; + uint64 x; +#else + uint32 cznv; + uint32 x; +#endif }; -#define FLAGVAL_Z 0x40 -#define FLAGVAL_N 0x80 - -#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x40) | (((y) & 1) << 6)) -#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x800) | (((y) & 1) << 11)) -#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x80) | (((y) & 1) << 7)) -#define SET_XFLG(y) (regflags.x = (y)) - -#define GET_ZFLG ((regflags.cznv >> 6) & 1) -#define GET_CFLG (regflags.cznv & 1) -#define GET_VFLG ((regflags.cznv >> 11) & 1) -#define GET_NFLG ((regflags.cznv >> 7) & 1) -#define GET_XFLG (regflags.x & 1) - -#define CLEAR_CZNV (regflags.cznv = 0) -#define GET_CZNV (regflags.cznv) -#define IOR_CZNV(X) (regflags.cznv |= (X)) -#define SET_CZNV(X) (regflags.cznv = (X)) - -#define COPY_CARRY (regflags.x = regflags.cznv) - -extern struct flag_struct regflags ASM_SYM ("regflags"); +/* + * The bits in the cznv field in the above structure are assigned to + * allow the easy mirroring of the x86 rFLAGS register. + * + * The 68k CZNV flags are thus assigned in cznv as: + * + * 76543210 FEDCBA98 --------- --------- + * SZxxxxxC xxxxVxxx xxxxxxxxx xxxxxxxxx + */ -static __inline__ int cctrue(int cc) +#define FLAGBIT_N 7 +#define FLAGBIT_Z 6 +#define FLAGBIT_C 0 +#define FLAGBIT_V 11 +#define FLAGBIT_X 0 /* must be in position 0 for duplicate_carry() to work */ + +#define FLAGVAL_N (1 << FLAGBIT_N) +#define FLAGVAL_Z (1 << FLAGBIT_Z) +#define FLAGVAL_C (1 << FLAGBIT_C) +#define FLAGVAL_V (1 << FLAGBIT_V) +#define FLAGVAL_X (1 << FLAGBIT_X) + +#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_Z) | (((y) & 1) << FLAGBIT_Z)) +#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_C) | (((y) & 1) << FLAGBIT_C)) +#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_V) | (((y) & 1) << FLAGBIT_V)) +#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_N) | (((y) & 1) << FLAGBIT_N)) +#define SET_XFLG(y) (regflags.x = ((y) & 1) << FLAGBIT_X) + +#define GET_ZFLG() ((regflags.cznv >> FLAGBIT_Z) & 1) +#define GET_CFLG() ((regflags.cznv >> FLAGBIT_C) & 1) +#define GET_VFLG() ((regflags.cznv >> FLAGBIT_V) & 1) +#define GET_NFLG() ((regflags.cznv >> FLAGBIT_N) & 1) +#define GET_XFLG() ((regflags.x >> FLAGBIT_X) & 1) + +#define CLEAR_CZNV() (regflags.cznv = 0) +#define GET_CZNV() (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) + +#define COPY_CARRY() (regflags.x = regflags.cznv >> (FLAGBIT_C - FLAGBIT_X)) + +extern struct flag_struct regflags __asm__ ("regflags"); + +/* + * Test CCR condition + */ +static inline int cctrue(int cc) { uae_u32 cznv = regflags.cznv; - switch(cc){ - case 0: return 1; /* T */ - case 1: return 0; /* F */ - case 2: return (cznv & 0x41) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ - case 3: return (cznv & 0x41) != 0; /* GET_CFLG || GET_ZFLG; LS */ - case 4: return (cznv & 1) == 0; /* !GET_CFLG; CC */ - case 5: return (cznv & 1) != 0; /* GET_CFLG; CS */ - case 6: return (cznv & 0x40) == 0; /* !GET_ZFLG; NE */ - case 7: return (cznv & 0x40) != 0; /* GET_ZFLG; EQ */ - case 8: return (cznv & 0x800) == 0;/* !GET_VFLG; VC */ - case 9: return (cznv & 0x800) != 0;/* GET_VFLG; VS */ - case 10:return (cznv & 0x80) == 0; /* !GET_NFLG; PL */ - case 11:return (cznv & 0x80) != 0; /* GET_NFLG; MI */ - case 12:return (((cznv << 4) ^ cznv) & 0x800) == 0; /* GET_NFLG == GET_VFLG; GE */ - case 13:return (((cznv << 4) ^ cznv) & 0x800) != 0;/* GET_NFLG != GET_VFLG; LT */ - case 14: - cznv &= 0x8c0; - return (((cznv << 4) ^ cznv) & 0x840) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ - case 15: - cznv &= 0x8c0; - return (((cznv << 4) ^ cznv) & 0x840) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + + switch (cc) { + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) == 0; /* !CFLG && !ZFLG HI */ + case 3: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) != 0; /* CFLG || ZFLG LS */ + case 4: return (cznv & FLAGVAL_C) == 0; /* !CFLG CC */ + case 5: return (cznv & FLAGVAL_C) != 0; /* CFLG CS */ + case 6: return (cznv & FLAGVAL_Z) == 0; /* !ZFLG NE */ + case 7: return (cznv & FLAGVAL_Z) != 0; /* ZFLG EQ */ + case 8: return (cznv & FLAGVAL_V) == 0; /* !VFLG VC */ + case 9: return (cznv & FLAGVAL_V) != 0; /* VFLG VS */ + case 10: return (cznv & FLAGVAL_N) == 0; /* !NFLG PL */ + case 11: return (cznv & FLAGVAL_N) != 0; /* NFLG MI */ +#if FLAGBIT_N > FLAGBIT_V + case 12: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) == 0; /* NFLG == VFLG GE */ + case 13: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) != 0; /* NFLG != VFLG LT */ + case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* !ZFLG && (NFLG == VFLG) GT */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) == 0; + case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG || (NFLG != VFLG) LE */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) != 0; +#else + case 12: return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & FLAGVAL_V) == 0; /* NFLG == VFLG GE */ + case 13: return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & FLAGVAL_V) != 0; /* NFLG != VFLG LT */ + case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* !ZFLG && (NFLG == VFLG) GT */ + return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & (FLAGVAL_V | FLAGVAL_Z)) == 0; + case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG || (NFLG != VFLG) LE */ + return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & (FLAGVAL_V | FLAGVAL_Z)) != 0; +#endif } + abort (); return 0; } @@ -93,34 +134,34 @@ static __inline__ int cctrue(int cc) __asm__ __volatile__ ("andl %1,%1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "r" (v) : "cc") + : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") #define optflag_testw(v) \ __asm__ __volatile__ ("andw %w1,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "r" (v) : "cc") + : "=rm" (regflags.cznv) : "r" (v) : "memory", "cc") #define optflag_testb(v) \ __asm__ __volatile__ ("andb %b1,%b1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "q" (v) : "cc") + : "=rm" (regflags.cznv) : "q" (v) : "memory", "cc") #define optflag_addl(v, s, d) do { \ __asm__ __volatile__ ("addl %k2,%k1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + COPY_CARRY(); \ } while (0) #define optflag_addw(v, s, d) do { \ __asm__ __volatile__ ("addw %w2,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + COPY_CARRY(); \ } while (0) #define optflag_addb(v, s, d) do { \ @@ -128,113 +169,151 @@ static __inline__ int cctrue(int cc) "pushf\n\t" \ "pop %0\n\t" \ : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_subl(v, s, d) do { \ __asm__ __volatile__ ("subl %k2,%k1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + COPY_CARRY(); \ } while (0) #define optflag_subw(v, s, d) do { \ __asm__ __volatile__ ("subw %w2,%w1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + : "=rm" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "memory", "cc"); \ + COPY_CARRY(); \ } while (0) #define optflag_subb(v, s, d) do { \ __asm__ __volatile__ ("subb %b2,%b1\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ - COPY_CARRY; \ + : "=rm" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "memory", "cc"); \ + COPY_CARRY(); \ } while (0) #define optflag_cmpl(s, d) \ __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") #define optflag_cmpw(s, d) \ __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + : "=rm" (regflags.cznv) : "rmi" (s), "r" (d) : "memory", "cc") #define optflag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \ "pushf\n\t" \ "pop %0\n\t" \ - : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc") + : "=rm" (regflags.cznv) : "qmi" (s), "q" (d) : "memory", "cc") -#else +#else /* !SAHF_SETO_PROFITABLE */ +/* + * Machine dependent structure for holding the 68k CCR flags + */ struct flag_struct { - uae_u32 cznv; - uae_u32 x; + uae_u32 cznv; + uae_u32 x; }; -#define FLAGVAL_Z 0x4000 -#define FLAGVAL_N 0x8000 +extern struct flag_struct regflags __asm__ ("regflags"); -#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x4000) | (((y) & 1) << 14)) -#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~0x100) | (((y) & 1) << 8)) -#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x1) | (((y) & 1))) -#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x8000) | (((y) & 1) << 15)) -#define SET_XFLG(y) (regflags.x = (y)) +/* + * The bits in the cznv field in the above structure are assigned to + * allow the easy mirroring of the x86 condition flags. (For example, + * from the AX register - the x86 overflow flag can be copied to AL + * with a setto %AL instr and the other flags copied to AH with an + * lahf instr). + * + * The 68k CZNV flags are thus assigned in cznv as: + * + * <--AL--> <--AH--> + * 76543210 FEDCBA98 --------- --------- + * xxxxxxxV NZxxxxxC xxxxxxxxx xxxxxxxxx + */ + +#define FLAGBIT_N 15 +#define FLAGBIT_Z 14 +#define FLAGBIT_C 8 +#define FLAGBIT_V 0 +#define FLAGBIT_X 0 /* must be in position 0 for duplicate_carry() to work */ + +#define FLAGVAL_N (1 << FLAGBIT_N) +#define FLAGVAL_Z (1 << FLAGBIT_Z) +#define FLAGVAL_C (1 << FLAGBIT_C) +#define FLAGVAL_V (1 << FLAGBIT_V) +#define FLAGVAL_X (1 << FLAGBIT_X) + +#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_Z) | (((y) & 1) << FLAGBIT_Z)) +#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_C) | (((y) & 1) << FLAGBIT_C)) +#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_V) | (((y) & 1) << FLAGBIT_V)) +#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~FLAGVAL_N) | (((y) & 1) << FLAGBIT_N)) +#define SET_XFLG(y) (regflags.x = ((y) & 1) << FLAGBIT_X) -#define GET_ZFLG ((regflags.cznv >> 14) & 1) -#define GET_CFLG ((regflags.cznv >> 8) & 1) -#define GET_VFLG ((regflags.cznv >> 0) & 1) -#define GET_NFLG ((regflags.cznv >> 15) & 1) -#define GET_XFLG (regflags.x & 1) +#define GET_ZFLG() ((regflags.cznv >> FLAGBIT_Z) & 1) +#define GET_CFLG() ((regflags.cznv >> FLAGBIT_C) & 1) +#define GET_VFLG() ((regflags.cznv >> FLAGBIT_V) & 1) +#define GET_NFLG() ((regflags.cznv >> FLAGBIT_N) & 1) +#define GET_XFLG() ((regflags.x >> FLAGBIT_X) & 1) -#define CLEAR_CZNV (regflags.cznv = 0) -#define GET_CZNV (regflags.cznv) -#define IOR_CZNV(X) (regflags.cznv |= (X)) -#define SET_CZNV(X) (regflags.cznv = (X)) +#define CLEAR_CZNV() (regflags.cznv = 0) +#define GET_CZNV() (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) -#define COPY_CARRY (regflags.x = (regflags.cznv)>>8) +#define COPY_CARRY() (regflags.x = regflags.cznv >> (FLAGBIT_C - FLAGBIT_X)) -extern struct flag_struct regflags ASM_SYM("regflags"); -static __inline__ int cctrue(int cc) +/* + * Test CCR condition + */ +static inline int cctrue(int cc) { uae_u32 cznv = regflags.cznv; - switch(cc){ - case 0: return 1; /* T */ - case 1: return 0; /* F */ - case 2: return (cznv & 0x4100) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ - case 3: return (cznv & 0x4100) != 0; /* GET_CFLG || GET_ZFLG; LS */ - case 4: return (cznv & 0x100) == 0; /* !GET_CFLG; CC */ - case 5: return (cznv & 0x100) != 0; /* GET_CFLG; CS */ - case 6: return (cznv & 0x4000) == 0; /* !GET_ZFLG; NE */ - case 7: return (cznv & 0x4000) != 0; /* GET_ZFLG; EQ */ - case 8: return (cznv & 0x01) == 0; /* !GET_VFLG; VC */ - case 9: return (cznv & 0x01) != 0; /* GET_VFLG; VS */ - case 10:return (cznv & 0x8000) == 0; /* !GET_NFLG; PL */ - case 11:return (cznv & 0x8000) != 0; /* GET_NFLG; MI */ - case 12:return (((cznv << 15) ^ cznv) & 0x8000) == 0; /* GET_NFLG == GET_VFLG; GE */ - case 13:return (((cznv << 15) ^ cznv) & 0x8000) != 0;/* GET_NFLG != GET_VFLG; LT */ - case 14: - cznv &= 0xc001; - return (((cznv << 15) ^ cznv) & 0xc000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ - case 15: - cznv &= 0xc001; - return (((cznv << 15) ^ cznv) & 0xc000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + + switch (cc) { + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) == 0; /* !CFLG && !ZFLG HI */ + case 3: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) != 0; /* CFLG || ZFLG LS */ + case 4: return (cznv & FLAGVAL_C) == 0; /* !CFLG CC */ + case 5: return (cznv & FLAGVAL_C) != 0; /* CFLG CS */ + case 6: return (cznv & FLAGVAL_Z) == 0; /* !ZFLG NE */ + case 7: return (cznv & FLAGVAL_Z) != 0; /* ZFLG EQ */ + case 8: return (cznv & FLAGVAL_V) == 0; /* !VFLG VC */ + case 9: return (cznv & FLAGVAL_V) != 0; /* VFLG VS */ + case 10: return (cznv & FLAGVAL_N) == 0; /* !NFLG PL */ + case 11: return (cznv & FLAGVAL_N) != 0; /* NFLG MI */ +#if FLAGBIT_N > FLAGBIT_V + case 12: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) == 0; /* NFLG == VFLG GE */ + case 13: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) != 0; /* NFLG != VFLG LT */ + case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* !ZFLG && (NFLG == VFLG) GT */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) == 0; + case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG || (NFLG != VFLG) LE */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) != 0; +#else + case 12: return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & FLAGVAL_V) == 0; /* NFLG == VFLG GE */ + case 13: return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & FLAGVAL_V) != 0; /* NFLG != VFLG LT */ + case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* !ZFLG && (NFLG == VFLG) GT */ + return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & (FLAGVAL_V | FLAGVAL_Z)) == 0; + case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG || (NFLG != VFLG) LE */ + return (((cznv << (FLAGBIT_V - FLAGBIT_N)) ^ cznv) & (FLAGVAL_V | FLAGVAL_Z)) != 0; +#endif } - abort(); + abort (); return 0; } /* Manually emit LAHF instruction so that 64-bit assemblers can grok it */ -#if defined __x86_64__ && defined __GNUC__ +#if defined CPU_x86_64 && defined __GNUC__ #define ASM_LAHF ".byte 0x9f" #else #define ASM_LAHF "lahf" @@ -273,7 +352,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_addw(v, s, d) do { \ @@ -283,7 +362,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_addb(v, s, d) do { \ @@ -293,7 +372,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_subl(v, s, d) do { \ @@ -303,7 +382,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_subw(v, s, d) do { \ @@ -313,7 +392,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_subb(v, s, d) do { \ @@ -323,7 +402,7 @@ static __inline__ int cctrue(int cc) "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ - COPY_CARRY; \ + COPY_CARRY(); \ } while (0) #define optflag_cmpl(s, d) \ @@ -340,7 +419,7 @@ static __inline__ int cctrue(int cc) "seto %%al\n\t" \ "movb %%al,regflags\n\t" \ "movb %%ah,regflags+1\n\t" \ - : : "rmi" (s), "r" (d) : "%eax","cc","memory"); + : : "rmi" (s), "r" (d) : "%eax","cc","memory") #define optflag_cmpb(s, d) \ __asm__ __volatile__ ("cmpb %b0,%b1\n\t" \ @@ -350,63 +429,369 @@ static __inline__ int cctrue(int cc) "movb %%ah,regflags+1\n\t" \ : : "qmi" (s), "q" (d) : "%eax","cc","memory") -#endif +#endif /* SAHF_SETO_PROFITABLE */ -#elif defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) +#elif defined(CPU_arm) && defined(ARM_ASSEMBLY) +/* + * Machine dependent structure for holding the 68k CCR flags + */ struct flag_struct { - unsigned char nzvc; - unsigned char x; + uae_u32 nzcv; + uae_u32 x; }; -extern struct flag_struct regflags; +#define FLAGBIT_N 31 +#define FLAGBIT_Z 30 +#define FLAGBIT_C 29 +#define FLAGBIT_V 28 +#define FLAGBIT_X FLAGBIT_C /* must be in the same position in as x flag */ + +#define FLAGVAL_N (1 << FLAGBIT_N) +#define FLAGVAL_Z (1 << FLAGBIT_Z) +#define FLAGVAL_C (1 << FLAGBIT_C) +#define FLAGVAL_V (1 << FLAGBIT_V) +#define FLAGVAL_X (1 << FLAGBIT_X) + +#define SET_NFLG(y) (regflags.nzcv = (regflags.nzcv & ~FLAGVAL_N) | (((y) & 1) << FLAGBIT_N)) +#define SET_ZFLG(y) (regflags.nzcv = (regflags.nzcv & ~FLAGVAL_Z) | (((y) & 1) << FLAGBIT_Z)) +#define SET_CFLG(y) (regflags.nzcv = (regflags.nzcv & ~FLAGVAL_C) | (((y) & 1) << FLAGBIT_C)) +#define SET_VFLG(y) (regflags.nzcv = (regflags.nzcv & ~FLAGVAL_V) | (((y) & 1) << FLAGBIT_V)) +#define SET_XFLG(y) (regflags.x = ((y) & 1) << FLAGBIT_X) + +#define GET_NFLG() ((regflags.nzcv >> FLAGBIT_N) & 1) +#define GET_ZFLG() ((regflags.nzcv >> FLAGBIT_Z) & 1) +#define GET_CFLG() ((regflags.nzcv >> FLAGBIT_C) & 1) +#define GET_VFLG() ((regflags.nzcv >> FLAGBIT_V) & 1) +#define GET_XFLG() ((regflags.x >> FLAGBIT_X) & 1) + +#define CLEAR_CZNV() (regflags.nzcv = 0) +#define GET_CZNV() (regflags.nzcv) +#define IOR_CZNV(X) (regflags.nzcv |= (X)) +#define SET_CZNV(X) (regflags.nzcv = (X)) + +#define COPY_CARRY() (regflags.x = regflags.nzcv >> (FLAGBIT_C - FLAGBIT_X)) + +extern struct flag_struct regflags __asm__ ("regflags"); + +/* + * Test CCR condition + */ +static inline int cctrue(int cc) +{ + unsigned int nzcv = regflags.nzcv; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (nzcv & (FLAGVAL_C | FLAGVAL_Z)) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (nzcv & (FLAGVAL_C | FLAGVAL_Z)) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (nzcv & FLAGVAL_C) == 0; /* !GET_CFLG; CC */ + case 5: return (nzcv & FLAGVAL_C) != 0; /* GET_CFLG; CS */ + case 6: return (nzcv & FLAGVAL_Z) == 0; /* !GET_ZFLG; NE */ + case 7: return (nzcv & FLAGVAL_Z) != 0; /* GET_ZFLG; EQ */ + case 8: return (nzcv & FLAGVAL_V) == 0; /* !GET_VFLG; VC */ + case 9: return (nzcv & FLAGVAL_V) != 0; /* GET_VFLG; VS */ + case 10:return (nzcv & FLAGVAL_N) == 0; /* !GET_NFLG; PL */ + case 11:return (nzcv & FLAGVAL_N) != 0; /* GET_NFLG; MI */ + case 12:return (((nzcv << (FLAGBIT_N - FLAGBIT_V)) ^ nzcv) & FLAGVAL_N) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((nzcv << (FLAGBIT_N - FLAGBIT_V)) ^ nzcv) & FLAGVAL_N) != 0; /* GET_NFLG != GET_VFLG; LT */ + case 14: nzcv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); + return (((nzcv << (FLAGBIT_N - FLAGBIT_V)) ^ nzcv) & (FLAGVAL_N | FLAGVAL_Z)) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: nzcv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); + return (((nzcv << (FLAGBIT_N - FLAGBIT_V)) ^ nzcv) & (FLAGVAL_N | FLAGVAL_Z)) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + return 0; +} + +#define optflag_testl(v) do {\ + __asm__ __volatile__ ("tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "r" (v) \ + : "cc"); \ + } while(0) + +#define optflag_addl(v, s, d) do { \ + __asm__ __volatile__ ("adds %[rv],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_subl(v, s, d) do { \ + __asm__ __volatile__ ("subs %[rv],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_cmpl(s, d) do { \ + __asm__ __volatile__ ("cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#if defined(ARMV6_ASSEMBLY) + +// #pragma message "ARM/v6 Assembly optimized flags" + +#define optflag_testw(v) do { \ + __asm__ __volatile__ ("sxth %[rv],%[rv]\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_testb(v) do {\ + __asm__ __volatile__ ("sxtb %[rv],%[rv]\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "adds %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "adds %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "subs %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "subs %[rd],%[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_cmpw(s, d) do { \ + __asm__ __volatile__ ("sxth %[rd],%[rd]\n\t" \ + "sxth %[rs],%[rs]\n\t" \ + "cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#define optflag_cmpb(s, d) do { \ + __asm__ __volatile__ ("sxtb %[rd],%[rd]\n\t" \ + "sxtb %[rs],%[rs]\n\t" \ + "cmp %[rd],%[rs]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#else -#define FLAGVAL_Z 0x04 -#define FLAGVAL_N 0x08 +// #pragma message "ARM/generic Assembly optimized flags" + +#define optflag_testw(v) do { \ + __asm__ __volatile__ ("lsl %[rv],%[rv],#16\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) + +#define optflag_testb(v) do {\ + __asm__ __volatile__ ("lsl %[rv],%[rv],#24\n\t" \ + "tst %[rv],%[rv]\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "bic %[nzcv],#0x30000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rv] "0" (v) \ + : "cc"); \ + }while(0) -#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) -#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) -#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) -#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) -#define SET_XFLG(y) (regflags.x = (y)) +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "adds %[rd],%[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "lsr %[rv],%[rd],#16\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "adds %[rd],%[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "lsr %[rv],%[rd],#24\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) -#define GET_ZFLG ((regflags.nzvc >> 2) & 1) -#define GET_CFLG (regflags.nzvc & 1) -#define GET_VFLG ((regflags.nzvc >> 1) & 1) -#define GET_NFLG ((regflags.nzvc >> 3) & 1) -#define GET_XFLG (regflags.x & 1) +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "subs %[rd],%[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + "lsr %[rv],%[rd],#16\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) -#define CLEAR_CZNV (regflags.nzvc = 0) -#define GET_CZNV (reflags.nzvc) -#define IOR_CZNV(X) (refglags.nzvc |= (X)) -#define SET_CZNV(X) (regflags.nzvc = (X)) +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "subs %[rd],%[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + "lsr %[rv],%[rd],#24\n\t" \ + : [nzcv] "=r" (regflags.nzcv), [rv] "=r" (v) \ + : [rs] "ri" (s), [rd] "1" (d) \ + : "cc"); \ + COPY_CARRY(); \ + } while(0) + +#define optflag_cmpw(s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#16\n\t" \ + "cmp %[rd],%[rs],lsl #16\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) + +#define optflag_cmpb(s, d) do { \ + __asm__ __volatile__ ("lsl %[rd],%[rd],#24\n\t" \ + "cmp %[rd],%[rs],lsl #24\n\t" \ + "mrs %[nzcv],cpsr\n\t" \ + "eor %[nzcv],#0x20000000\n\t" \ + : [nzcv] "=r" (regflags.nzcv) \ + : [rs] "ri" (s), [rd] "0" (d) \ + : "cc"); \ + } while(0) -#define COPY_CARRY (regflags.x = regflags.nzvc) +#endif -static __inline__ int cctrue(int cc) +#elif defined(CPU_sparc) && (defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY)) + +/* + * Machine dependent structure for holding the 68k CCR flags + */ +struct flag_struct { + unsigned char nzvc; + unsigned char x; +}; + +extern struct flag_struct regflags; + +#define FLAGBIT_N 3 +#define FLAGBIT_Z 2 +#define FLAGBIT_V 1 +#define FLAGBIT_C 0 +#define FLAGBIT_X FLAGBIT_C /* should be in the same position as the x flag */ + +#define FLAGVAL_N (1 << FLAGBIT_N) +#define FLAGVAL_Z (1 << FLAGBIT_Z) +#define FLAGVAL_C (1 << FLAGBIT_C) +#define FLAGVAL_V (1 << FLAGBIT_V) +#define FLAGVAL_X (1 << FLAGBIT_X) + +#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~FLAGVAL_Z) | (((y) & 1) << FLAGBIT_Z)) +#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~FLAGVAL_C) | (((y) & 1) << FLAGBIT_C)) +#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~FLAGVAL_V) | (((y) & 1) << FLAGBIT_V)) +#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~FLAGVAL_V) | (((y) & 1) << FLAGBIT_N)) +#define SET_XFLG(y) (regflags.x = ((y) & 1) << FLAGBIT_X) + +#define GET_ZFLG() ((regflags.nzvc >> FLAGBIT_Z) & 1) +#define GET_CFLG() ((regflags.nzvc >> FLAGBIT_C) & 1) +#define GET_VFLG() ((regflags.nzvc >> FLAGBIT_V) & 1) +#define GET_NFLG() ((regflags.nzvc >> FLAGBIT_N) & 1) +#define GET_XFLG() ((regflags.x >> FLAGBIT_X) & 1) + +#define CLEAR_CZNV() (regflags.nzvc = 0) +#define GET_CZNV() (regflags.nzvc) +#define IOR_CZNV(X) (regflags.nzvc |= (X)) +#define SET_CZNV(X) (regflags.nzvc = (X)) + +#define COPY_CARRY() (regflags.x = regflags.nzvc >> (FLAGBIT_C - FLAGBIT_X)) + +/* + * Test CCR condition + */ +static inline int cctrue(int cc) { uae_u32 nzvc = regflags.nzvc; - switch(cc){ - case 0: return 1; /* T */ - case 1: return 0; /* F */ - case 2: return (nzvc & 0x05) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ - case 3: return (nzvc & 0x05) != 0; /* GET_CFLG || GET_ZFLG; LS */ - case 4: return (nzvc & 1) == 0; /* !GET_CFLG; CC */ - case 5: return (nzvc & 1) != 0; /* GET_CFLG; CS */ - case 6: return (nzvc & 0x04) == 0; /* !GET_ZFLG; NE */ - case 7: return (nzvc & 0x04) != 0; /* GET_ZFLG; EQ */ - case 8: return (nzvc & 0x02) == 0;/* !GET_VFLG; VC */ - case 9: return (nzvc & 0x02) != 0;/* GET_VFLG; VS */ - case 10:return (nzvc & 0x08) == 0; /* !GET_NFLG; PL */ - case 11:return (nzvc & 0x08) != 0; /* GET_NFLG; MI */ - case 12:return (((nzvc << 2) ^ nzvc) & 0x08) == 0; /* GET_NFLG == GET_VFLG; GE */ - case 13:return (((nzvc << 2) ^ nzvc) & 0x08) != 0;/* GET_NFLG != GET_VFLG; LT */ - case 14: - nzvc &= 0x0e; - return (((nzvc << 2) ^ nzvc) & 0x0c) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ - case 15: - nzvc &= 0x0e; - return (((nzvc << 2) ^ nzvc) & 0x0c) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + switch (cc) { + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) == 0; /* !CFLG && !ZFLG HI */ + case 3: return (cznv & (FLAGVAL_C | FLAGVAL_Z)) != 0; /* CFLG || ZFLG LS */ + case 4: return (cznv & FLAGVAL_C) == 0; /* !CFLG CC */ + case 5: return (cznv & FLAGVAL_C) != 0; /* CFLG CS */ + case 6: return (cznv & FLAGVAL_Z) == 0; /* !ZFLG NE */ + case 7: return (cznv & FLAGVAL_Z) != 0; /* ZFLG EQ */ + case 8: return (cznv & FLAGVAL_V) == 0; /* !VFLG VC */ + case 9: return (cznv & FLAGVAL_V) != 0; /* VFLG VS */ + case 10: return (cznv & FLAGVAL_N) == 0; /* !NFLG PL */ + case 11: return (cznv & FLAGVAL_N) != 0; /* NFLG MI */ + case 12: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) == 0; /* NFLG == VFLG GE */ + case 13: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) != 0; /* NFLG != VFLG LT */ + case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG && (NFLG == VFLG) GT */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) == 0; + case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V); /* ZFLG && (NFLG != VFLG) LE */ + return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) != 0; } return 0; } @@ -1008,6 +1393,9 @@ static inline uae_u32 sparc_v9_flag_addx_32(flag_struct *flags, uae_u32 src, uae #else +/* + * Machine independent structure for holding the 68k CCR flags + */ struct flag_struct { unsigned int c; unsigned int z; @@ -1030,22 +1418,25 @@ extern struct flag_struct regflags; #define SET_ZFLG(x) (ZFLG = (x)) #define SET_XFLG(x) (XFLG = (x)) -#define GET_CFLG CFLG -#define GET_NFLG NFLG -#define GET_VFLG VFLG -#define GET_ZFLG ZFLG -#define GET_XFLG XFLG +#define GET_CFLG() CFLG +#define GET_NFLG() NFLG +#define GET_VFLG() VFLG +#define GET_ZFLG() ZFLG +#define GET_XFLG() XFLG -#define CLEAR_CZNV do { \ +#define CLEAR_CZNV() do { \ SET_CFLG (0); \ SET_ZFLG (0); \ SET_NFLG (0); \ SET_VFLG (0); \ } while (0) -#define COPY_CARRY (SET_XFLG (GET_CFLG)) +#define COPY_CARRY() (SET_XFLG (GET_CFLG ())) -static __inline__ int cctrue(const int cc) +/* + * Test CCR condition + */ +static inline int cctrue(const int cc) { switch(cc){ case 0: return 1; /* T */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index e981aa2b0..dc109422f 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -678,8 +678,8 @@ void MakeSR (void) #endif regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) - | (GET_XFLG << 4) | (GET_NFLG << 3) | (GET_ZFLG << 2) | (GET_VFLG << 1) - | GET_CFLG); + | (GET_XFLG() << 4) | (GET_NFLG() << 3) | (GET_ZFLG() << 2) | (GET_VFLG() << 1) + | GET_CFLG()); } void MakeFromSR (void) @@ -858,7 +858,7 @@ int m68k_move2c (int regno, uae_u32 *regp) #if USE_JIT set_cache_state(regs.cacr & 0x8000); if (*regp & 0x08) { /* Just to be on the safe side */ - flush_icache(1); + flush_icache(); } #endif break; @@ -1268,7 +1268,7 @@ void mmu_op(uae_u32 opcode, uae_u16 extra) /* PFLUSH */ mmusr = 0; #ifdef USE_JIT - flush_icache(0); + flush_icache(); #endif } else if ((opcode & 0x0FD8) == 0x548) { /* PTEST */ @@ -1501,7 +1501,7 @@ void m68k_dumpstate (uaecptr *nextpc) regs.usp,regs.isp,regs.msp,regs.vbr); printf ("T=%d%d S=%d M=%d X=%ld N=%ld Z=%ld V=%ld C=%ld IMASK=%d\n", regs.t1, regs.t0, regs.s, regs.m, - GET_XFLG, GET_NFLG, GET_ZFLG, GET_VFLG, GET_CFLG, regs.intmask); + GET_XFLG(), GET_NFLG(), GET_ZFLG(), GET_VFLG(), GET_CFLG(), regs.intmask); fpu_dump_registers(); fpu_dump_flags(); diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h index eacbc2148..e87d22b49 100644 --- a/BasiliskII/src/uae_cpu/noflags.h +++ b/BasiliskII/src/uae_cpu/noflags.h @@ -62,13 +62,13 @@ static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) #define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) #undef CLEAR_CZNV -#define CLEAR_CZNV +#define CLEAR_CZNV() do {} while (0) #undef IOR_CZNV #define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) #undef SET_CZNV #define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) #undef COPY_CARRY -#define COPY_CARRY +#define COPY_CARRY() do {} while (0) #ifdef optflag_testl #undef optflag_testl From 28bc58ccd20a1914e2c2c3bba2236ae124fb3a9a Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 1 Sep 2019 17:01:25 -0500 Subject: [PATCH 290/534] Use release configuration by default --- BasiliskII/src/Unix/CMakeLists.txt | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index eb217226f..e222edc38 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -1,6 +1,11 @@ cmake_minimum_required(VERSION 3.0.0) project(BasiliskII) +if (NOT EXISTS ${CMAKE_BINARY_DIR}/CMakeCache.txt) + if (NOT CMAKE_BUILD_TYPE) + set(CMAKE_BUILD_TYPE "Release" CACHE STRING "" FORCE) + endif() +endif() find_package(SDL2 REQUIRED) find_library(COREFOUNDATION_LIBRARY CoreFoundation) From 03fc337242c7f249a3d58f9d8fc2006edc18f9df Mon Sep 17 00:00:00 2001 From: uyjulian Date: Mon, 2 Sep 2019 14:40:01 -0500 Subject: [PATCH 291/534] uae_cpu is based upon ARAnyM sources --- BasiliskII/src/Unix/CMakeLists.txt | 19 +- BasiliskII/src/Unix/main_unix.cpp | 5 +- BasiliskII/src/Unix/sysdeps.h | 7 + BasiliskII/src/emul_op.cpp | 12 +- BasiliskII/src/include/emul_op.h | 2 +- BasiliskII/src/include/main.h | 4 +- BasiliskII/src/uae_cpu/Makefile.am | 80 + BasiliskII/src/uae_cpu/aranym_glue.cpp | 326 +++ BasiliskII/src/uae_cpu/basilisk_glue.cpp | 31 +- BasiliskII/src/uae_cpu/build68k.c | 56 +- .../src/uae_cpu/compiler/compemu_support.cpp | 7 +- BasiliskII/src/uae_cpu/compiler/gencomp.c | 3 +- BasiliskII/src/uae_cpu/compiler/gencomp_arm.c | 3 +- BasiliskII/src/uae_cpu/cpu_emulation.h | 235 +- BasiliskII/src/uae_cpu/cpudefsa.cpp | 5 + BasiliskII/src/uae_cpu/cpuemu1.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu1_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu2.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu2_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu3.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu3_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu4.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu4_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu5.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu5_nf.cpp | 4 + BasiliskII/src/uae_cpu/cpuemu6.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu6_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu7.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu7_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpuemu8.cpp | 2 + BasiliskII/src/uae_cpu/cpuemu8_nf.cpp | 3 + BasiliskII/src/uae_cpu/cpufunctbla.cpp | 5 + BasiliskII/src/uae_cpu/cpummu.cpp | 1096 ++++++++ BasiliskII/src/uae_cpu/cpummu.h | 267 ++ BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 + BasiliskII/src/uae_cpu/cpustbla.cpp | 5 + BasiliskII/src/uae_cpu/debug.cpp | 82 + BasiliskII/src/uae_cpu/fpu/core.h | 78 +- BasiliskII/src/uae_cpu/fpu/exceptions.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/exceptions.h | 45 +- BasiliskII/src/uae_cpu/fpu/flags.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/flags.h | 69 +- BasiliskII/src/uae_cpu/fpu/fpu.h | 50 +- BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 920 ++++--- BasiliskII/src/uae_cpu/fpu/fpu_ieee.h | 55 +- BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp | 2110 +++++++++++++++ BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp | 449 +-- BasiliskII/src/uae_cpu/fpu/fpu_uae.h | 53 +- BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp | 761 +++++- BasiliskII/src/uae_cpu/fpu/fpu_x86.h | 87 +- BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h | 32 + BasiliskII/src/uae_cpu/fpu/impl.h | 61 +- BasiliskII/src/uae_cpu/fpu/mathlib.cpp | 47 +- BasiliskII/src/uae_cpu/fpu/mathlib.h | 616 +++-- BasiliskII/src/uae_cpu/fpu/rounding.cpp | 45 +- BasiliskII/src/uae_cpu/fpu/rounding.h | 61 +- BasiliskII/src/uae_cpu/fpu/types.h | 72 +- BasiliskII/src/uae_cpu/gencpu.c | 1576 ++++++----- BasiliskII/src/uae_cpu/m68k.h | 25 +- BasiliskII/src/uae_cpu/memory-uae.h | 606 +++++ BasiliskII/src/uae_cpu/memory.cpp | 649 +---- BasiliskII/src/uae_cpu/memory.h | 153 +- BasiliskII/src/uae_cpu/newcpu.cpp | 2403 +++++++++-------- BasiliskII/src/uae_cpu/newcpu.h | 355 +-- BasiliskII/src/uae_cpu/noflags.h | 8 +- BasiliskII/src/uae_cpu/readcpu.cpp | 267 +- BasiliskII/src/uae_cpu/readcpu.h | 75 +- BasiliskII/src/uae_cpu/readcpua.cpp | 5 + BasiliskII/src/uae_cpu/registers.h | 116 + BasiliskII/src/uae_cpu/spcflags.h | 172 +- BasiliskII/src/uae_cpu/table68k | 111 +- 71 files changed, 10224 insertions(+), 4291 deletions(-) create mode 100644 BasiliskII/src/uae_cpu/Makefile.am create mode 100644 BasiliskII/src/uae_cpu/aranym_glue.cpp create mode 100644 BasiliskII/src/uae_cpu/cpudefsa.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu1.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu1_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu2.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu2_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu3.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu3_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu4.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu4_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu5.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu5_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu6.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu6_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu7.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu7_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu8.cpp create mode 100644 BasiliskII/src/uae_cpu/cpuemu8_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpufunctbla.cpp create mode 100644 BasiliskII/src/uae_cpu/cpummu.cpp create mode 100644 BasiliskII/src/uae_cpu/cpummu.h create mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp create mode 100644 BasiliskII/src/uae_cpu/cpustbla.cpp create mode 100644 BasiliskII/src/uae_cpu/debug.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp create mode 100644 BasiliskII/src/uae_cpu/memory-uae.h create mode 100644 BasiliskII/src/uae_cpu/readcpua.cpp create mode 100644 BasiliskII/src/uae_cpu/registers.h diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index e222edc38..0711d0d77 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -1,11 +1,11 @@ cmake_minimum_required(VERSION 3.0.0) project(BasiliskII) -if (NOT EXISTS ${CMAKE_BINARY_DIR}/CMakeCache.txt) - if (NOT CMAKE_BUILD_TYPE) - set(CMAKE_BUILD_TYPE "Release" CACHE STRING "" FORCE) - endif() -endif() +# if (NOT EXISTS ${CMAKE_BINARY_DIR}/CMakeCache.txt) +# if (NOT CMAKE_BUILD_TYPE) +# set(CMAKE_BUILD_TYPE "Release" CACHE STRING "" FORCE) +# endif() +# endif() find_package(SDL2 REQUIRED) find_library(COREFOUNDATION_LIBRARY CoreFoundation) @@ -21,7 +21,9 @@ add_custom_command(OUTPUT cpudefs.cpp add_executable(gencpu ../uae_cpu/gencpu.c ../uae_cpu/readcpu.cpp cpudefs.cpp) #add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp cpufunctbl.cpp COMMAND gencpu DEPENDS gencpu) -add_custom_command(OUTPUT cpuemu.cpp cpuemu_nf.cpp cpustbl.cpp cpustbl_nf.cpp COMMAND gencpu DEPENDS gencpu) +# add_custom_command(OUTPUT cpuemu.cpp cpuemu_nf.cpp cpustbl.cpp cpustbl_nf.cpp COMMAND gencpu DEPENDS gencpu) +# add_custom_command(OUTPUT cpuemu.cpp cpuemu_nf.cpp cpustbl.cpp cpustbl_nf.cpp COMMAND gencpu DEPENDS gencpu) +add_custom_command(OUTPUT cpuemu.cpp cpustbl.cpp cpufunctbl.cpp COMMAND gencpu DEPENDS gencpu) add_executable(gencomp ../uae_cpu/compiler/gencomp.c ../uae_cpu/readcpu.cpp cpudefs.cpp) @@ -88,12 +90,11 @@ set(BasiliskII_SRCS cpustbl.cpp cpudefs.cpp cpuemu.cpp + cpufunctbl.cpp compemu.cpp compstbl.cpp ../uae_cpu/compiler/compemu_support.cpp ../uae_cpu/compiler/compemu_fpp.cpp - cpustbl_nf.cpp - cpuemu_nf.cpp #addressing mode =direct -DDIRECT_ADDRESSING #includes ) @@ -101,7 +102,7 @@ set(BasiliskII_SRCS add_executable(BasiliskII ${BasiliskII_SRCS}) set_source_files_properties(${BasiliskII_SRCS} - PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DCPU_x86_64 -DFIXED_ADDRESSING -DCPU_64_BIT -DNOFLAGS_SUPPORT -DFPU_IEEE -DUSE_JIT -DJIT -DX86_64_ASSEMBLY -DOPTIMIZED_FLAGS -DWINUAE_ARANYM -DUSE_JIT_FPU -DUSE_INLINING -DDATADIR=\\\".\\\"") + PROPERTIES COMPILE_FLAGS "-DDIRECT_ADDRESSING -DCPU_x86_64 -DFIXED_ADDRESSING -DCPU_64_BIT -DFPU_IEEE -DUSE_JIT -DJIT -DX86_64_ASSEMBLY -DOPTIMIZED_FLAGS -DWINUAE_ARANYM -DUSE_JIT_FPU -DUSE_INLINING -DDATADIR=\\\".\\\"") # set_property(SOURCE compemu_support.cpp APPEND_STRING PROPERTY COMPILE_FLAGS " -O0 ") diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 6d17121fc..f7dcc682d 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -58,6 +58,7 @@ using std::string; #if USE_JIT extern void (*flush_icache)(void); // from compemu_support.cpp +extern bool UseJIT; #endif @@ -181,8 +182,8 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) fprintf(stderr, " [IP=%p]", fault_instruction); fprintf(stderr, "\n"); #if EMULATED_68K - extern void m68k_dumpstate (uaecptr *); - m68k_dumpstate(0); + extern void m68k_dumpstate (FILE *, uaecptr *); + m68k_dumpstate(stderr, 0); #endif #if USE_JIT && JIT_DEBUG extern void compiler_dumpstate(void); diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index b25ee0421..1a1f12a83 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -419,6 +419,13 @@ static inline uae_u32 do_byteswap_16(uae_u32 v) # define REGPARAM #endif #define REGPARAM2 + +#if __GNUC__ < 3 +# define __builtin_expect(foo,bar) (foo) +#endif +#define likely(x) __builtin_expect(!!(x), 1) +#define unlikely(x) __builtin_expect(!!(x), 0) +#define ALWAYS_INLINE inline __attribute__((always_inline)) #define memptr uint32 diff --git a/BasiliskII/src/emul_op.cpp b/BasiliskII/src/emul_op.cpp index 549d1de01..25679f70a 100644 --- a/BasiliskII/src/emul_op.cpp +++ b/BasiliskII/src/emul_op.cpp @@ -51,7 +51,7 @@ * Execute EMUL_OP opcode (called by 68k emulator or Illegal Instruction trap handler) */ -void EmulOp(uint16 opcode, M68kRegisters *r) +bool EmulOp(uint16 opcode, M68kRegisters *r) { D(bug("EmulOp %04x\n", opcode)); switch (opcode) { @@ -68,12 +68,12 @@ void EmulOp(uint16 opcode, M68kRegisters *r) VideoQuitFullScreen(); QuitEmulator(); - break; + return false; } case M68K_EMUL_OP_SHUTDOWN: // Quit emulator QuitEmulator(); - break; + return false; case M68K_EMUL_OP_RESET: { // MacOS reset D(bug("*** RESET ***\n")); @@ -101,7 +101,7 @@ void EmulOp(uint16 opcode, M68kRegisters *r) r->a[1] = ROMBaseMac + UniversalInfo; // UniversalInfo r->a[6] = boot_globs; // BootGlobs r->a[7] = RAMBaseMac + 0x10000; // Boot stack - break; + return false; } case M68K_EMUL_OP_CLKNOMEM: { // Clock/PRAM operations @@ -570,6 +570,8 @@ void EmulOp(uint16 opcode, M68kRegisters *r) r->sr); QuitEmulator(); - break; + return false; } + + return true; } diff --git a/BasiliskII/src/include/emul_op.h b/BasiliskII/src/include/emul_op.h index b6d3a1e66..5774a5804 100644 --- a/BasiliskII/src/include/emul_op.h +++ b/BasiliskII/src/include/emul_op.h @@ -94,6 +94,6 @@ enum { }; // Functions -extern void EmulOp(uint16 opcode, struct M68kRegisters *r); // Execute EMUL_OP opcode (called by 68k emulator or Line-F trap handler) +extern bool EmulOp(uint16 opcode, struct M68kRegisters *r); // Execute EMUL_OP opcode (called by 68k emulator or Line-F trap handler) #endif diff --git a/BasiliskII/src/include/main.h b/BasiliskII/src/include/main.h index 1ba7b6acb..9a78cf6e4 100644 --- a/BasiliskII/src/include/main.h +++ b/BasiliskII/src/include/main.h @@ -34,8 +34,10 @@ extern bool TwentyFourBitAddressing; // 68k register structure (for Execute68k()) struct M68kRegisters { uint32 d[8]; - uint32 a[8]; + memptr a[8]; uint16 sr; + memptr usp, isp, msp; + memptr pc; }; // General functions diff --git a/BasiliskII/src/uae_cpu/Makefile.am b/BasiliskII/src/uae_cpu/Makefile.am new file mode 100644 index 000000000..fa42287da --- /dev/null +++ b/BasiliskII/src/uae_cpu/Makefile.am @@ -0,0 +1,80 @@ +# +# Note: this Makefile only contains rules for the source +# generator tools. +# + +# +# suppress warnings about overriding LDFLAGS and CPPFLAGS +# +AUTOMAKE_OPTIONS = -Wno-gnu + +AM_CPPFLAGS = $(DEFINES) \ + "-I$(srcdir)/../include" \ + "-I$(srcdir)/../Unix" \ + "-I$(builddir)/.." \ + "-I$(builddir)" \ + "-I$(srcdir)" + +CC = $(CC_FOR_BUILD) +CXX = $(CXX_FOR_BUILD) + +LDFLAGS = $(LDFLAGS_FOR_BUILD) +CPPFLAGS = $(CPPFLAGS_FOR_BUILD) +CFLAGS = $(CFLAGS_FOR_BUILD) +CXXFLAGS = $(CXXFLAGS_FOR_BUILD) +LIBS=-lm + +CFLAGS_NOWARN = $(DBGSP) +AM_CFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) +AM_CXXFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) + +noinst_PROGRAMS = build68k gencpu +if USE_JIT +noinst_PROGRAMS += gencomp +endif + +BUILT_SOURCES = \ + cpudefs.cpp \ + cpuemu.cpp \ + cpustbl.cpp \ + cpufunctbl.cpp \ + cputbl.h \ + $(empty) + +build68k_SOURCES = build68k.c +gencpu_SOURCES = gencpu.c m68k.h readcpu.cpp readcpu.h cpudefs.cpp +gencomp_SOURCES = +if GENCOMP_ARCH_X86 +gencomp_SOURCES += compiler/gencomp.c +endif +if GENCOMP_ARCH_ARM +gencomp_SOURCES += compiler/gencomp_arm.c +endif +gencomp_SOURCES += readcpu.cpp cpudefs.cpp + +if USE_JIT +BUILT_SOURCES += compemu.cpp compstbl.cpp comptbl.h +endif + + +cpudefs.cpp: build68k$(EXEEXT) $(srcdir)/table68k + $(AM_V_GEN)./build68k <$(srcdir)/table68k > $@ +cpuemu.cpp: gencpu$(EXEEXT) + $(AM_V_GEN)./gencpu$(EXEEXT) +cpustbl.cpp cpufunctbl.cpp cputbl.h: cpuemu.cpp +compemu.cpp: gencomp$(EXEEXT) + $(AM_V_GEN)./gencomp$(EXEEXT) +compstbl.cpp comptbl.h: compemu.cpp + +CLEANFILES = $(BUILT_SOURCES) + +EXTRA_DIST = \ + table68k \ + compiler/codegen_arm.cpp compiler/codegen_arm.h \ + compiler/compemu_midfunc_arm.cpp compiler/compemu_midfunc_arm.h \ + compiler/compemu_midfunc_arm2.cpp compiler/compemu_midfunc_arm2.h \ + compiler/test_codegen_arm.c \ + compiler/codegen_x86.cpp compiler/codegen_x86.h \ + compiler/compemu_midfunc_x86.cpp compiler/compemu_midfunc_x86.h \ + compiler/test_codegen_x86.cpp \ + $(empty) diff --git a/BasiliskII/src/uae_cpu/aranym_glue.cpp b/BasiliskII/src/uae_cpu/aranym_glue.cpp new file mode 100644 index 000000000..02f7b149b --- /dev/null +++ b/BasiliskII/src/uae_cpu/aranym_glue.cpp @@ -0,0 +1,326 @@ +/* + * aranym_glue.cpp - CPU interface + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "sysdeps.h" + +#include "cpu_emulation.h" +#include "newcpu.h" +#include "hardware.h" +#include "scc.h" +#include "input.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif +#include "nf_objs.h" + +#include "debug.h" + +// RAM and ROM pointers +memptr RAMBase = 0; // RAM base (Atari address space) gb-- init is important +uint8 *RAMBaseHost; // RAM base (host address space) +uint32 RAMSize = 0x00e00000; // Size of RAM + +memptr ROMBase = 0x00e00000; // ROM base (Atari address space) +uint8 *ROMBaseHost; // ROM base (host address space) +uint32 ROMSize = 0x00100000; // Size of ROM + +uint32 RealROMSize; // Real size of ROM + +memptr HWBase = 0x00f00000; // HW base (Atari address space) +uint8 *HWBaseHost; // HW base (host address space) +uint32 HWSize = 0x00100000; // Size of HW space + +memptr FastRAMBase = 0x01000000; // Fast-RAM base (Atari address space) +uint8 *FastRAMBaseHost; // Fast-RAM base (host address space) + +#ifdef HW_SIGSEGV +uint8 *FakeIOBaseHost; +#endif + +#ifdef FIXED_VIDEORAM +memptr VideoRAMBase = ARANYMVRAMSTART; // VideoRAM base (Atari address space) +#else +memptr VideoRAMBase; // VideoRAM base (Atari address space) +#endif +uint8 *VideoRAMBaseHost;// VideoRAM base (host address space) +//uint32 VideoRAMSize; // Size of VideoRAM + +#ifndef NOT_MALLOC +uintptr MEMBaseDiff; // Global offset between a Atari address and its Host equivalent +uintptr ROMBaseDiff; +uintptr FastRAMBaseDiff; +#endif + +uintptr VMEMBaseDiff; // Global offset between a Atari VideoRAM address and /dev/fb0 mmap + + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) +SDL_mutex *spcflags_lock; +#endif +#if defined(ENABLE_REALSTOP) +SDL_cond *stop_condition; +#endif + + +/* + * Initialize 680x0 emulation + */ + +bool InitMEM() { + InitMEMBaseDiff(RAMBaseHost, RAMBase); + InitROMBaseDiff(ROMBaseHost, ROMBase); + InitFastRAMBaseDiff(FastRAMBaseHost, FastRAMBase); + InitVMEMBaseDiff(VideoRAMBaseHost, VideoRAMBase); + return true; +} + +bool Init680x0(void) +{ + init_m68k(); + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + if ((spcflags_lock = SDL_CreateMutex()) == NULL) { + panicbug("Error by SDL_CreateMutex()"); + exit(EXIT_FAILURE); + } +#endif + +#if ENABLE_REALSTOP + if ((stop_condition = SDL_CreateCond()) == NULL) { + panicbug("Error by SDL_CreateCond()"); + exit(EXIT_FAILURE); + } +#endif + +#ifdef USE_JIT + if (bx_options.jit.jit) compiler_init(); +#endif + return true; +} + +/* + * Instr. RESET + */ + +void AtariReset(void) +{ + // reset Atari hardware here + HWReset(); + // reset NatFeats here + NFReset(); + // reset the input devices (input.cpp) + InputReset(); + +} + +/* + * Reset CPU + */ + +void Reset680x0(void) +{ + m68k_reset(); +} + +/* + * Deinitialize 680x0 emulation + */ + +void Exit680x0(void) +{ +#ifdef USE_JIT + if (bx_options.jit.jit) compiler_exit(); +#endif + exit_m68k(); +} + + +/* + * Reset and start 680x0 emulation + */ + +void Start680x0(void) +{ + m68k_reset(); +#ifdef USE_JIT + if (bx_options.jit.jit) { + m68k_compile_execute(); + } + else +#endif + m68k_execute(); +} + +/* + * Restart running 680x0 emulation safely from different thread + */ +void Restart680x0(void) +{ + quit_program = 2; + TriggerNMI(); +} + +/* + * Quit 680x0 emulation safely from different thread + */ +void Quit680x0(void) +{ + quit_program = 1; + TriggerNMI(); +} + + +int MFPdoInterrupt(void) +{ + return getMFP()->doInterrupt(); +} + +int SCCdoInterrupt(void) +{ + return getSCC()->doInterrupt(); +} + +/* + * Trigger interrupts + */ +void TriggerInternalIRQ(void) +{ + SPCFLAGS_SET( SPCFLAG_INTERNAL_IRQ ); +} + +void TriggerInt3(void) +{ + SPCFLAGS_SET( SPCFLAG_INT3 ); +} + +void TriggerVBL(void) +{ + SPCFLAGS_SET( SPCFLAG_VBL ); +} + +void TriggerInt5(void) +{ + SPCFLAGS_SET( SPCFLAG_INT5 ); +} + +void TriggerSCC(bool enable) +{ + if (enable) + SPCFLAGS_SET( SPCFLAG_SCC ); + else + SPCFLAGS_CLEAR( SPCFLAG_SCC ); +} + +void TriggerMFP(bool enable) +{ + if (enable) + SPCFLAGS_SET( SPCFLAG_MFP ); + else + SPCFLAGS_CLEAR( SPCFLAG_MFP ); +} + +void TriggerNMI(void) +{ + SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI +} + +#ifndef REBOOT_OR_HALT +#define REBOOT_OR_HALT 0 // halt by default +#endif + +#if REBOOT_OR_HALT == 1 +# define CPU_MSG "CPU: Rebooting" +# define CPU_ACTION Restart680x0() +#else +# define CPU_MSG "CPU: Halting" +# define CPU_ACTION Quit680x0() +#endif + +#ifdef ENABLE_EPSLIMITER + +#ifndef EPS_LIMIT +# define EPS_LIMIT 10000 /* this might be too high if ARAnyM is slowed down by printing the bus errors on console */ +#endif + +void check_eps_limit(uaecptr pc) +{ + static long last_exception_time=-1; + static long exception_per_sec=0; + static long exception_per_sec_pc=0; + static uaecptr prevpc = 0; + + if (bx_options.cpu.eps_enabled) { + if (last_exception_time == -1) { + last_exception_time = SDL_GetTicks(); + } + + exception_per_sec++; + + if (pc == prevpc) { + /* BUS ERRORs occur at the same PC - watch out! */ + exception_per_sec_pc++; + } + else { + exception_per_sec_pc = 0; + prevpc = pc; + } + + if (SDL_GetTicks() - last_exception_time > 1000) { + last_exception_time = SDL_GetTicks(); + if (exception_per_sec_pc > bx_options.cpu.eps_max || + exception_per_sec > EPS_LIMIT /* make it configurable */) { + panicbug("CPU: Exception per second limit reached: %ld/%ld", + exception_per_sec_pc, exception_per_sec); + /* would be cool to open SDL dialog here: */ + /* [Exception per seconds limit reached. XXXXX exception + occured in the last second. The limit is set to YYYYY + in your config file. Do you want to continue emulation, + reset ARAnyM or quit ?][Continue] [Reset] [Quit] + */ + panicbug(CPU_MSG); + CPU_ACTION; + } + exception_per_sec = 0; + exception_per_sec_pc = 0; + } + } +} +#endif + +void report_double_bus_error() +{ + panicbug("CPU: Double bus fault detected !"); + /* would be cool to open SDL dialog here: */ + /* [Double bus fault detected. The emulated system crashed badly. + Do you want to reset ARAnyM or quit ?] [Reset] [Quit]" + */ + panicbug(CPU_MSG); + CPU_ACTION; +} + +#ifdef FLIGHT_RECORDER +extern bool cpu_flight_recorder_active; +void cpu_flight_recorder(int activate) { cpu_flight_recorder_active = activate; } +#endif diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 6bfadb9d2..9a794b487 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -56,8 +56,12 @@ uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equiva bool UseJIT = false; #endif +// #if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) +B2_mutex *spcflags_lock = NULL; +// #endif + // From newcpu.cpp -extern bool quit_program; +extern int quit_program; /* @@ -66,6 +70,7 @@ extern bool quit_program; bool Init680x0(void) { + spcflags_lock = B2_create_mutex(); #if REAL_ADDRESSING // Mac address space = host address space RAMBaseMac = (uintptr)RAMBaseHost; @@ -159,7 +164,8 @@ void TriggerInterrupt(void) void TriggerNMI(void) { - SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI + //!! not implemented yet + // SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI } @@ -200,7 +206,7 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) // Execute trap m68k_setpc(m68k_areg(regs, 7)); fill_prefetch_0(); - quit_program = false; + quit_program = 0; m68k_execute(); // Clean up stack @@ -215,7 +221,7 @@ void Execute68kTrap(uint16 trap, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = false; + quit_program = 0; } @@ -247,7 +253,7 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) // Execute routine m68k_setpc(addr); fill_prefetch_0(); - quit_program = false; + quit_program = 0; m68k_execute(); // Clean up stack @@ -262,5 +268,18 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->d[i] = m68k_dreg(regs, i); for (i=0; i<7; i++) r->a[i] = m68k_areg(regs, i); - quit_program = false; + quit_program = 0; +} + +void report_double_bus_error() +{ +#if 0 + panicbug("CPU: Double bus fault detected !"); + /* would be cool to open SDL dialog here: */ + /* [Double bus fault detected. The emulated system crashed badly. + Do you want to reset ARAnyM or quit ?] [Reset] [Quit]" + */ + panicbug(CPU_MSG); + CPU_ACTION; +#endif } diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c index 8ec3ab552..e996758d0 100644 --- a/BasiliskII/src/uae_cpu/build68k.c +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -1,32 +1,44 @@ /* - * UAE - The Un*x Amiga Emulator + * build68k.c - m68k CPU builder * - * Read 68000 CPU specs from file "table68k" and build table68k.c + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * Copyright 1995,1996 Bernd Schmidt + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * This program is free software; you can redistribute it and/or modify + * ARAnyM 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, + * ARAnyM 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 + * along with ARAnyM; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +/* + * UAE - The Un*x Amiga Emulator + * + * Read 68000 CPU specs from file "table68k" and build table68k.c + * + * Copyright 1995,1996 Bernd Schmidt + */ -#include -#include -#include - -#include "sysdeps.h" #include "readcpu.h" +#include +#include +#include +#include +#include +#undef abort + static FILE *tablef; static int nextch = 0; @@ -65,15 +77,15 @@ static int nextchtohex(void) } } -int main(int argc, char **argv) +int main() { int no_insns = 0; printf ("#include \"sysdeps.h\"\n"); printf ("#include \"readcpu.h\"\n"); printf ("struct instr_def defs68k[] = {\n"); -#ifdef WIN32 - tablef = fopen(argc > 1 ? argv[1] : "table68k","r"); +#if 0 + tablef = fopen("table68k","r"); if (tablef == NULL) { fprintf(stderr, "table68k not found\n"); exit(1); @@ -122,8 +134,8 @@ int main(int argc, char **argv) case 'r': currbit = bitr; break; case 'R': currbit = bitR; break; case 'z': currbit = bitz; break; - case 'E': currbit = bitE; break; - case 'p': currbit = bitp; break; + case 'E': currbit = bitE; break; + case 'p': currbit = bitp; break; default: abort(); } if (!(bitmask & 1)) { @@ -138,6 +150,7 @@ int main(int argc, char **argv) patbits[i] = nextch; getnextch(); } + (void) patbits; while (isspace(nextch) || nextch == ':') /* Get CPU and privilege level */ getnextch(); @@ -172,6 +185,8 @@ int main(int argc, char **argv) getnextch(); switch(nextch){ case '-': flagset[i] = fa_unset; break; + case '/': flagset[i] = fa_isjmp; break; + case '+': flagset[i] = fa_isbranch; break; case '0': flagset[i] = fa_zero; break; case '1': flagset[i] = fa_one; break; case 'x': flagset[i] = fa_dontcare; break; @@ -191,6 +206,8 @@ int main(int argc, char **argv) getnextch(); switch(nextch){ case '-': flaguse[i] = fu_unused; break; + case '/': flaguse[i] = fu_isjmp; break; + case '+': flaguse[i] = fu_maybecc; break; case '?': flaguse[i] = fu_unknown; break; default: flaguse[i] = fu_used; break; } @@ -235,7 +252,7 @@ int main(int argc, char **argv) if (nextch != ':') abort(); - fgets(opcstr, 250, tablef); + assert(fgets(opcstr, 250, tablef) != NULL); getnextch(); { int j; @@ -243,12 +260,12 @@ int main(int argc, char **argv) char *opstrp = opcstr, *osendp; int slen = 0; - while (isspace(*opstrp)) + while (isspace((int)*opstrp)) opstrp++; osendp = opstrp; while (*osendp) { - if (!isspace (*osendp)) + if (!isspace ((int)*osendp)) slen = osendp - opstrp + 1; osendp++; } @@ -271,6 +288,5 @@ int main(int argc, char **argv) } } printf("};\nint n_defs68k = %d;\n", no_insns); - fflush(stdout); return 0; } diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 9b178c0fd..8932e61d1 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -273,7 +273,7 @@ uae_u8* comp_pc_p; #else // External variables // newcpu.cpp -extern bool quit_program; +extern int quit_program; #endif // gb-- Extra data for Basilisk II/JIT @@ -2718,8 +2718,7 @@ void compiler_init(void) jit_log(" : separate blockinfo allocation : %s", str_on_off(USE_SEPARATE_BIA)); // Build compiler tables - read_table68k(); - do_merges(); + init_table68k (); build_comp(); #endif @@ -4157,7 +4156,9 @@ void build_comp(void) int count; #ifdef WINUAE_ARANYM unsigned int cpu_level = 4; // 68040 +#if 0 const struct cputbl *nfctbl = op_smalltbl_0_nf; +#endif #else #ifdef NOFLAGS_SUPPORT struct comptbl *nfctbl = (currprefs.cpu_level >= 5 ? op_smalltbl_0_nf diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index 712d78739..202774ac2 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -3228,8 +3228,7 @@ int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine int main(void) #endif { - read_table68k (); - do_merges (); + init_table68k (); opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c index 7ec9ff767..913361ab0 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c @@ -5025,8 +5025,7 @@ void cygwin_mingw_abort() int main(void) { - read_table68k(); - do_merges(); + init_table68k (); opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs); opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs); diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index cd588ec10..b014be79d 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -1,52 +1,170 @@ /* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.10 version) + * cpu_emulation.h - CPU interface * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2005 Milan Jurik of ARAnyM dev team (see AUTHORS) * - * 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. + * Inspired by Christian Bauer's Basilisk II * - * 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. + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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 + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef CPU_EMULATION_H #define CPU_EMULATION_H -#include - - /* * Memory system */ +#if 0 +#include "sysdeps.h" +#include "memory.h" +#include "tools.h" +#endif + // RAM and ROM pointers (allocated and set by main_*.cpp) +#if 0 +extern memptr RAMBase; // RAM base (Atari address space), does not include Low Mem when != 0 +#else extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) -extern uint32 RAMSize; // Size of RAM - +#endif +extern uint8 *RAMBaseHost; // RAM base (host address space) +extern uint32 RAMSize; // Size of RAM +#if 0 +extern memptr ROMBase; // ROM base (Atari address space) +#else extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) -extern uint32 ROMSize; // Size of ROM +#endif +extern uint8 *ROMBaseHost; // ROM base (host address space) +extern uint32 ROMSize; // Size of ROM +#if 0 +extern uint32 RealROMSize; // Real size of ROM +extern memptr HWBase; // HW base (Atari address space) +extern uint8 *HWBaseHost; // HW base (host address space) +extern uint32 HWSize; // Size of HW space + +extern memptr FastRAMBase; // Fast-RAM base (Atari address space) +extern uint8 *FastRAMBaseHost; // Fast-RAM base (host address space) +extern memptr VideoRAMBase; // VideoRAM base (Atari address space) +extern uint8 *VideoRAMBaseHost; // VideoRAM base (host address space) + +#ifdef HW_SIGSEGV +extern uint8 *FakeIOBaseHost; +#endif -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING -// If we are not using real or direct addressing, the Mac frame buffer gets -// mapped to this location. The memory must be allocated by VideoInit(). -// If multiple monitors are used, they must share the frame buffer +#ifdef RAMENDNEEDED +# define RAMEnd 0x01000000 // Not accessible top of memory +#else +# define RAMEnd 0 +#endif +#endif +#if !REAL_ADDRESSING +// If we are not using real addressing, the Mac frame buffer gets mapped to this location +// The memory must be allocated by VideoInit(). If multiple monitors are used, they must +// share the frame buffer const uint32 MacFrameBaseMac = 0xa0000000; extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) extern uint32 MacFrameSize; // Size of frame buffer -#endif extern int MacFrameLayout; // Frame buffer layout (see defines below) +#endif + +#if 0 +// Atari memory access functions +// Direct access to CPU address space +// For HW operations +// Read/WriteAtariIntXX +// +static inline uint64 ReadAtariInt64(memptr addr) {return phys_get_quad(addr);} +static inline uint32 ReadAtariInt32(memptr addr) {return phys_get_long(addr);} +static inline uint16 ReadAtariInt16(memptr addr) {return phys_get_word(addr);} +static inline uint8 ReadAtariInt8(memptr addr) {return phys_get_byte(addr);} +static inline void WriteAtariInt64(memptr addr, uint64 q) {phys_put_quad(addr, q);} +static inline void WriteAtariInt32(memptr addr, uint32 l) {phys_put_long(addr, l);} +static inline void WriteAtariInt16(memptr addr, uint16 w) {phys_put_word(addr, w);} +static inline void WriteAtariInt8(memptr addr, uint8 b) {phys_put_byte(addr, b);} + +// Direct access to allocated memory +// Ignores HW checks, so that be carefull +// Read/WriteHWMemIntXX +// +static inline uint32 ReadHWMemInt32(memptr addr) {return do_get_mem_long((uae_u32 *)phys_get_real_address(addr));} +static inline uint16 ReadHWMemInt16(memptr addr) {return do_get_mem_word((uae_u16 *)phys_get_real_address(addr));} +static inline uint8 ReadHWMemInt8(memptr addr) {return do_get_mem_byte((uae_u8 *)phys_get_real_address(addr));} +static inline void WriteHWMemInt32(memptr addr, uint32 l) {do_put_mem_long((uae_u32 *)phys_get_real_address(addr), l);} +static inline void WriteHWMemInt16(memptr addr, uint16 w) {do_put_mem_word((uae_u16 *)phys_get_real_address(addr), w);} +static inline void WriteHWMemInt8(memptr addr, uint8 b) {do_put_mem_byte((uae_u8 *)phys_get_real_address(addr), b);} +// Indirect access to CPU address space +// Uses MMU if available +// For SW operations +// Only data space +// Read/WriteIntXX +// +static inline uint64 ReadInt64(memptr addr) {return get_quad(addr);} +static inline uint32 ReadInt32(memptr addr) {return get_long(addr);} +static inline uint16 ReadInt16(memptr addr) {return get_word(addr);} +static inline uint8 ReadInt8(memptr addr) {return get_byte(addr);} +static inline void WriteInt64(memptr addr, uint64 q) {put_quad(addr, q);} +static inline void WriteInt32(memptr addr, uint32 l) {put_long(addr, l);} +static inline void WriteInt16(memptr addr, uint16 w) {put_word(addr, w);} +static inline void WriteInt8(memptr addr, uint8 b) {put_byte(addr, b);} + +#ifdef EXTENDED_SIGSEGV +extern int in_handler; +#ifdef NO_NESTED_SIGSEGV +extern JMP_BUF sigsegv_env; +# define BUS_ERROR(a) \ +{ \ + regs.mmu_fault_addr=(a); \ + if (in_handler) \ + { \ + in_handler = 0; \ + LONGJMP(sigsegv_env, 1); \ + } \ + else { \ + breakpt(); \ + THROW(2); \ + } \ +} +#else /* NO_NESTED_SIGSEGV */ +# define BUS_ERROR(a) \ +{ \ + regs.mmu_fault_addr=(a); \ + in_handler = 0; \ + breakpt(); \ + THROW(2); \ +} +#endif /* NO_NESTED_SIGSEGV */ +#else /* EXTENDED_SIGSEGV */ +# define BUS_ERROR(a) \ +{ \ + regs.mmu_fault_addr=(a); \ + breakpt(); \ + THROW(2); \ +} +#endif /* EXTENDED_SIGSEGV */ + +// For address validation +static inline bool ValidAtariAddr(memptr addr, bool write, uint32 len) { return phys_valid_address(addr, write, len); } +static inline bool ValidAddr(memptr addr, bool write, uint32 len) { return valid_address(addr, write, len); } + +// Helper functions for usual memory operations +static inline uint8 *Atari2HostAddr(memptr addr) {return phys_get_real_address(addr);} +#endif // Possible frame buffer layouts enum { FLAYOUT_NONE, // No frame buffer @@ -73,30 +191,73 @@ static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {ret static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return memcpy(Mac2HostAddr(dest), Mac2HostAddr(src), n);} +// From newcpu.cpp +extern int quit_program; +extern int exit_val; + /* * 680x0 emulation */ // Initialization -extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation +#if 0 +extern bool InitMEM(); +#endif +extern bool Init680x0(void); +#if 0 +extern void Reset680x0(void); +#endif extern void Exit680x0(void); -extern void InitFrameBufferMapping(void); - -// 680x0 dynamic recompilation activation flag -#if USE_JIT -extern bool UseJIT; -#else -const bool UseJIT = false; +#if 0 +extern void AtariReset(void); #endif // 680x0 emulation functions struct M68kRegisters; -extern void Start680x0(void); // Reset and start 680x0 +extern void Start680x0(void); // Reset and start 680x0 +#if 0 +extern void Restart680x0(void); // Restart running 680x0 +extern void Quit680x0(void); // Quit 680x0 +#endif + extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine // Interrupt functions -extern void TriggerInterrupt(void); // Trigger interrupt level 1 (InterruptFlag must be set first) -extern void TriggerNMI(void); // Trigger interrupt level 7 +#if 0 +extern int MFPdoInterrupt(void); +extern int SCCdoInterrupt(void); +extern void TriggerInternalIRQ(void); +extern void TriggerInt3(void); // Trigger interrupt level 3 +extern void TriggerVBL(void); // Trigger interrupt level 4 +extern void TriggerInt5(void); // Trigger interrupt level 5 +extern void TriggerSCC(bool); // Trigger interrupt level 5 +extern void TriggerMFP(bool); // Trigger interrupt level 6 +#endif +extern void TriggerInterrupt(void); // Trigger interrupt level 1 (InterruptFlag must be set first) +extern void TriggerNMI(void); // Trigger interrupt level 7 + +#if 0 +#ifdef FLIGHT_RECORDER +extern void cpu_flight_recorder(int); +extern void dump_flight_recorder(void); +#endif +#endif + +// CPU looping handlers +void check_eps_limit(uaecptr); +void report_double_bus_error(void); +#if 0 +// This function will be removed +static inline uaecptr showPC(void) { return m68k_getpc(); } // for debugging only #endif + +extern int intlev(void); +static inline void AtariReset(void) {} + +#endif + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/cpudefsa.cpp b/BasiliskII/src/uae_cpu/cpudefsa.cpp new file mode 100644 index 000000000..ad7d69795 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpudefsa.cpp @@ -0,0 +1,5 @@ +/* + * cpudefs.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpudefs.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1.cpp b/BasiliskII/src/uae_cpu/cpuemu1.cpp new file mode 100644 index 000000000..089eefd47 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu1.cpp @@ -0,0 +1,2 @@ +#define PART_1 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp new file mode 100644 index 000000000..58acf4442 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_1 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2.cpp b/BasiliskII/src/uae_cpu/cpuemu2.cpp new file mode 100644 index 000000000..1e18b587b --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu2.cpp @@ -0,0 +1,2 @@ +#define PART_2 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp new file mode 100644 index 000000000..8e5136c4a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_2 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3.cpp b/BasiliskII/src/uae_cpu/cpuemu3.cpp new file mode 100644 index 000000000..0385e2f03 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu3.cpp @@ -0,0 +1,2 @@ +#define PART_3 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp new file mode 100644 index 000000000..6565dc8c3 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_3 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4.cpp b/BasiliskII/src/uae_cpu/cpuemu4.cpp new file mode 100644 index 000000000..13d27e7a5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu4.cpp @@ -0,0 +1,2 @@ +#define PART_4 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp new file mode 100644 index 000000000..a16c36cb7 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_4 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5.cpp b/BasiliskII/src/uae_cpu/cpuemu5.cpp new file mode 100644 index 000000000..9b33a6543 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu5.cpp @@ -0,0 +1,2 @@ +#define PART_5 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp new file mode 100644 index 000000000..5bf24360a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp @@ -0,0 +1,4 @@ +#define NOFLAGS 1 +#define PART_5 +#include "cpuemu.cpp" + diff --git a/BasiliskII/src/uae_cpu/cpuemu6.cpp b/BasiliskII/src/uae_cpu/cpuemu6.cpp new file mode 100644 index 000000000..e4b1efb0c --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu6.cpp @@ -0,0 +1,2 @@ +#define PART_6 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp new file mode 100644 index 000000000..7afe15d4a --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_6 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7.cpp b/BasiliskII/src/uae_cpu/cpuemu7.cpp new file mode 100644 index 000000000..faec7ef88 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu7.cpp @@ -0,0 +1,2 @@ +#define PART_7 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp new file mode 100644 index 000000000..1e404dea8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_7 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8.cpp b/BasiliskII/src/uae_cpu/cpuemu8.cpp new file mode 100644 index 000000000..c4efcfa39 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu8.cpp @@ -0,0 +1,2 @@ +#define PART_8 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp new file mode 100644 index 000000000..7c7f8f6e6 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp @@ -0,0 +1,3 @@ +#define NOFLAGS 1 +#define PART_8 +#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpufunctbla.cpp b/BasiliskII/src/uae_cpu/cpufunctbla.cpp new file mode 100644 index 000000000..17dd0d3f4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpufunctbla.cpp @@ -0,0 +1,5 @@ +/* + * cpufunctbl.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpufunctbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpummu.cpp b/BasiliskII/src/uae_cpu/cpummu.cpp new file mode 100644 index 000000000..1a3bd91a8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpummu.cpp @@ -0,0 +1,1096 @@ +/* + * cpummu.cpp - MMU emulation + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by UAE MMU patch + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#define DEBUG 0 +#include "sysdeps.h" + +#include "cpummu.h" +#include "memory.h" +#include "newcpu.h" +#include "debug.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif + +#define DBG_MMU_VERBOSE 1 +#define DBG_MMU_SANITY 1 + +#ifdef FULLMMU + +mmu_atc_l1_array atc_l1[2]; +mmu_atc_l1_array *current_atc; +struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; + +# ifdef ATC_STATS +static unsigned int mmu_atc_hits[ATC_L2_SIZE]; +# endif + + +static void mmu_dump_ttr(const char * label, uae_u32 ttr) +{ + DUNUSED(label); +#if DEBUG + uae_u32 from_addr, to_addr; + + from_addr = ttr & MMU_TTR_LOGICAL_BASE; + to_addr = (ttr & MMU_TTR_LOGICAL_MASK) << 8; + + D(bug("%s: [%08x] %08x - %08x enabled=%d supervisor=%d wp=%d cm=%02d", + label, ttr, + from_addr, to_addr, + ttr & MMU_TTR_BIT_ENABLED ? 1 : 0, + (ttr & (MMU_TTR_BIT_SFIELD_ENABLED | MMU_TTR_BIT_SFIELD_SUPER)) >> MMU_TTR_SFIELD_SHIFT, + ttr & MMU_TTR_BIT_WRITE_PROTECT ? 1 : 0, + (ttr & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT + )); +#else + DUNUSED(ttr); +#endif +} + +void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode) +{ + uae_u32 * ttr; + uae_u32 * ttr0 = datamode ? ®s.dtt0 : ®s.itt0; + uae_u32 * ttr1 = datamode ? ®s.dtt1 : ®s.itt1; + + if ((*ttr1 & MMU_TTR_BIT_ENABLED) == 0) + ttr = ttr1; + else if ((*ttr0 & MMU_TTR_BIT_ENABLED) == 0) + ttr = ttr0; + else + return; + + *ttr = baseaddr & MMU_TTR_LOGICAL_BASE; + *ttr |= ((baseaddr + size - 1) & MMU_TTR_LOGICAL_BASE) >> 8; + *ttr |= MMU_TTR_BIT_ENABLED; + + D(bug("MMU: map transparent mapping of %08x", *ttr)); +} + +/* check if an address matches a ttr */ +static int mmu_do_match_ttr(uae_u32 ttr, uaecptr addr, int super) +{ + if (ttr & MMU_TTR_BIT_ENABLED) { /* TTR enabled */ + uae_u8 msb, mask; + + msb = ((addr ^ ttr) & MMU_TTR_LOGICAL_BASE) >> 24; + mask = (ttr & MMU_TTR_LOGICAL_MASK) >> 16; + + if (!(msb & ~mask)) { + + if ((ttr & MMU_TTR_BIT_SFIELD_ENABLED) == 0) { + if (((ttr & MMU_TTR_BIT_SFIELD_SUPER) == 0) != (super == 0)) { + return TTR_NO_MATCH; + } + } + + return (ttr & MMU_TTR_BIT_WRITE_PROTECT) ? TTR_NO_WRITE : TTR_OK_MATCH; + } + } + return TTR_NO_MATCH; +} + +static inline int mmu_match_ttr(uaecptr addr, int super, int data) +{ + int res; + + if (data) { + res = mmu_do_match_ttr(regs.dtt0, addr, super); + if (res == TTR_NO_MATCH) + res = mmu_do_match_ttr(regs.dtt1, addr, super); + } else { + res = mmu_do_match_ttr(regs.itt0, addr, super); + if (res == TTR_NO_MATCH) + res = mmu_do_match_ttr(regs.itt1, addr, super); + } + return res; +} + +#if DEBUG +/* {{{ mmu_dump_table */ +static void mmu_dump_table(const char * label, uaecptr root_ptr) +{ + DUNUSED(label); + const int ROOT_TABLE_SIZE = 128, + PTR_TABLE_SIZE = 128, + PAGE_TABLE_SIZE = regs.mmu_pagesize_8k ? 32 : 64, + ROOT_INDEX_SHIFT = 25, + PTR_INDEX_SHIFT = 18; + const uae_u32 ptr_addr_mask = (regs.mmu_pagesize_8k ? MMU_PTR_PAGE_ADDR_MASK_8 : MMU_PTR_PAGE_ADDR_MASK_4); + const uae_u32 page_addr_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_ADDR_MASK_8 : MMU_PAGE_ADDR_MASK_4); + const uae_u32 page_ur_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_UR_MASK_8 : MMU_PAGE_UR_MASK_4); + const uae_u32 page_size = (regs.mmu_pagesize_8k ? (1 << 13) : (1 << 12)); + int root_idx, ptr_idx, page_idx; + uae_u32 root_des, ptr_des, page_des; + uaecptr ptr_des_addr, page_addr, + root_log, ptr_log, page_log; + + D(bug("%s: root=%x", label, root_ptr)); + + for (root_idx = 0; root_idx < ROOT_TABLE_SIZE; root_idx++) { + root_des = phys_get_long(root_ptr + (root_idx << 2)); + + if ((root_des & 2) == 0) + continue; /* invalid */ + + D(bug("ROOT: %03d U=%d W=%d UDT=%02d", root_idx, + root_des & 8 ? 1 : 0, + root_des & 4 ? 1 : 0, + root_des & 3 + )); + + root_log = root_idx << ROOT_INDEX_SHIFT; + + ptr_des_addr = root_des & MMU_ROOT_PTR_ADDR_MASK; + + for (ptr_idx = 0; ptr_idx < PTR_TABLE_SIZE; ptr_idx++) { + struct { + uaecptr log, phys; + int start_idx, n_pages; /* number of pages covered by this entry */ + uae_u32 match; + } page_info[PAGE_TABLE_SIZE]; + int n_pages_used; + + ptr_des = phys_get_long(ptr_des_addr + (ptr_idx << 2)); + ptr_log = root_log | (ptr_idx << PTR_INDEX_SHIFT); + + if ((ptr_des & 2) == 0) + continue; /* invalid */ + + page_addr = ptr_des & ptr_addr_mask; + + n_pages_used = -1; + for (page_idx = 0; page_idx < PAGE_TABLE_SIZE; page_idx++) { + + page_des = phys_get_long(page_addr + (page_idx << 2)); + page_log = ptr_log | (page_idx * page_size); + + switch (page_des & 3) { + case 0: /* invalid */ + continue; + case 1: case 3: /* resident */ + case 2: /* indirect */ + if (n_pages_used == -1 || + (page_info[n_pages_used].match & ~page_addr_mask) != (page_des & ~page_addr_mask) || + page_info[n_pages_used].phys + (page_info[n_pages_used].n_pages * page_size) != (page_des & page_addr_mask)) + { + /* use the next entry */ + n_pages_used++; + + page_info[n_pages_used].match = page_des; + page_info[n_pages_used].n_pages = 1; + page_info[n_pages_used].start_idx = page_idx; + page_info[n_pages_used].log = page_log; + page_info[n_pages_used].phys = page_des & page_addr_mask; + } else { + page_info[n_pages_used].n_pages++; + } + break; + } + } + + if (n_pages_used == -1) + continue; + + D(bug(" PTR: %03d U=%d W=%d UDT=%02d", ptr_idx, + ptr_des & 8 ? 1 : 0, + ptr_des & 4 ? 1 : 0, + ptr_des & 3 + )); + + + for (page_idx = 0; page_idx <= n_pages_used; page_idx++) { + page_des = page_info[page_idx].match; + + if ((page_des & MMU_PDT_MASK) == 2) { + D(bug(" PAGE: %03d-%03d log=%08x INDIRECT --> addr=%08x", + page_info[page_idx].start_idx, + page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, + page_info[page_idx].log, + page_des & MMU_PAGE_INDIRECT_MASK + )); + + } else { + D(bug(" PAGE: %03d-%03d log=%08x addr=%08x UR=%02d G=%d U1/0=%d S=%d CM=%d M=%d U=%d W=%d", + page_info[page_idx].start_idx, + page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, + page_info[page_idx].log, + page_info[page_idx].phys, + (page_des & page_ur_mask) >> MMU_PAGE_UR_SHIFT, + page_des & MMU_DES_GLOBAL ? 1 : 0, + (page_des & MMU_TTR_UX_MASK) >> MMU_TTR_UX_SHIFT, + page_des & MMU_DES_SUPER ? 1 : 0, + (page_des & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT, + page_des & MMU_DES_MODIFIED ? 1 : 0, + page_des & MMU_DES_USED ? 1 : 0, + page_des & MMU_DES_WP ? 1 : 0 + )); + } + } + } + + } +} +/* }}} */ +#endif + +/* {{{ mmu_dump_atc */ +void mmu_dump_atc(void) +{ + int i, j; + for (i = 0; i < 2; i++) { + for (j = 0; j < ATC_L2_SIZE; j++) { + if (atc_l2[i][j].tag == 0x8000) + continue; + D(bug("ATC[%02d] G=%d TT=%d M=%d WP=%d VD=%d VI=%d tag=%08x --> phys=%08x", + j, atc_l2[i][j].global, atc_l2[i][j].tt, atc_l2[i][j].modified, + atc_l2[i][j].write_protect, atc_l2[i][j].valid_data, atc_l2[i][j].valid_inst, + atc_l2[i][j].tag, atc_l2[i][j].phys)); + } + } +} +/* }}} */ + +/* {{{ mmu_dump_tables */ +void mmu_dump_tables(void) +{ + D(bug("URP: %08x SRP: %08x MMUSR: %x TC: %x", regs.urp, regs.srp, regs.mmusr, regs.tc)); + mmu_dump_ttr("DTT0", regs.dtt0); + mmu_dump_ttr("DTT1", regs.dtt1); + mmu_dump_ttr("ITT0", regs.itt0); + mmu_dump_ttr("ITT1", regs.itt1); + mmu_dump_atc(); + //mmu_dump_table("SRP", regs.srp); +} +/* }}} */ + +static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write); + +static ALWAYS_INLINE int mmu_get_fc(bool super, bool data) +{ + return (super ? 4 : 0) | (data ? 1 : 2); +} + +static void mmu_bus_error(uaecptr addr, int fc, int write, int size) +{ + uae_u16 ssw = 0; + + ssw |= fc & MMU_SSW_TM; /* Copy TM */ + switch (size) { + case sz_byte: + ssw |= MMU_SSW_SIZE_B; + break; + case sz_word: + ssw |= MMU_SSW_SIZE_W; + break; + case sz_long: + ssw |= MMU_SSW_SIZE_L; + break; + } + + regs.wb3_status = write ? 0x80 | ssw : 0; + if (!write) + ssw |= MMU_SSW_RW; + + regs.mmu_fault_addr = addr; + regs.mmu_ssw = ssw | MMU_SSW_ATC; + + D(bug("BUS ERROR: fc=%d w=%d log=%08x ssw=%04x", fc, write, addr, ssw)); + + breakpt(); + THROW(2); +} + +/* + * Update the atc line for a given address by doing a mmu lookup. + */ +static uaecptr mmu_fill_atc_l2(uaecptr addr, int super, int data, int write, + struct mmu_atc_line *l) +{ + int res; + uae_u32 desc; + + l->tag = ATC_TAG(addr); + l->hw = l->bus_fault = 0; + + /* check ttr0 */ + res = mmu_match_ttr(addr, super, data); + if (res != TTR_NO_MATCH) { + l->tt = 1; + if (data) { + l->valid_data = 1; + l->valid_inst = mmu_match_ttr(addr, super, 0) == res; + } else { + l->valid_inst = 1; + l->valid_data = mmu_match_ttr(addr, super, 1) == res; + } + l->global = 1; + l->modified = 1; + l->write_protect = (res == TTR_NO_WRITE); + l->phys = 0; + + return 0; + } + + l->tt = 0; + if (!regs.mmu_enabled) { + l->valid_data = l->valid_inst = 1; + l->global = 1; + l->modified = 1; + l->write_protect = 0; + l->phys = 0; + return 0; + } + + SAVE_EXCEPTION; + TRY(prb) { + desc = mmu_lookup_pagetable(addr, super, write); + D(bug("translate: %x,%u,%u,%u -> %x", addr, super, write, data, desc)); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + /* bus error during table search */ + desc = 0; + goto fail; + } + + if ((desc & 1) == 0 || (!super && desc & MMU_MMUSR_S)) { + fail: + l->valid_data = l->valid_inst = 0; + l->global = 0; + } else { + l->valid_data = l->valid_inst = 1; + if (regs.mmu_pagesize_8k) + l->phys = (desc & ~0x1fff) - (addr & ~0x1fff); + else + l->phys = (desc & ~0xfff) - (addr & ~0xfff); + l->global = (desc & MMU_MMUSR_G) != 0; + l->modified = (desc & MMU_MMUSR_M) != 0; + l->write_protect = (desc & MMU_MMUSR_W) != 0; + } + + return desc; +} + +static ALWAYS_INLINE bool +mmu_fill_atc_l1(uaecptr addr, int super, int data, int write, + struct mmu_atc_line *l1) +{ + int idx = ATC_L2_INDEX(addr); + int tag = ATC_TAG(addr); + struct mmu_atc_line *l = &atc_l2[super][idx]; + uaecptr phys_addr; + + if (l->tag != tag) { + restart: + mmu_fill_atc_l2(addr, super, data, write, l); + } + if (!(data ? l->valid_data : l->valid_inst)) { + D(bug("MMU: non-resident page (%x,%x,%x)!", addr, regs.pc, regs.fault_pc)); + goto fail; + } + if (write) { + if (l->write_protect) { + D(bug("MMU: write protected (via %s) %x", l->tt ? "ttr" : "atc", addr)); + goto fail; + } + if (!l->modified) + goto restart; + } + *l1 = *l; + + phys_addr = addr + l1->phys; + if ((phys_addr & 0xfff00000) == 0x00f00000) { + l1->hw = 1; + goto fail; + } + if ((phys_addr & 0xfff00000) == 0xfff00000) { + l1->hw = 1; + l1->phys -= 0xff000000; + goto fail; + } + + if (!test_ram_boundary(phys_addr, 1, super, write)) { + l1->bus_fault = 1; + goto fail; + } + + return true; + +fail: + l1->tag = ~l1->tag; + return false; +} + +uaecptr mmu_translate(uaecptr addr, int super, int data, int write) +{ + struct mmu_atc_line *l; + + l = &atc_l2[super][ATC_L2_INDEX(addr)]; + mmu_fill_atc_l2(addr, super, data, write, l); + if (!(data ? l->valid_data : l->valid_inst)) + { + breakpt(); + THROW(2); + } + + return addr + l->phys; +} + +/* + * Lookup the address by walking the page table and updating + * the page descriptors accordingly. Returns the found descriptor + * or produces a bus error. + */ +static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write) +{ + uae_u32 desc, desc_addr, wp; + int i; + + wp = 0; + desc = super ? regs.srp : regs.urp; + + /* fetch root table descriptor */ + i = (addr >> 23) & 0x1fc; + desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; + desc = phys_get_long(desc_addr); + if ((desc & 2) == 0) { + D(bug("MMU: invalid root descriptor for %x", addr)); + return 0; + } + + wp |= desc; + if ((desc & MMU_DES_USED) == 0) + phys_put_long(desc_addr, desc | MMU_DES_USED); + + /* fetch pointer table descriptor */ + i = (addr >> 16) & 0x1fc; + desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; + desc = phys_get_long(desc_addr); + if ((desc & 2) == 0) { + D(bug("MMU: invalid ptr descriptor for %x", addr)); + return 0; + } + wp |= desc; + if ((desc & MMU_DES_USED) == 0) + phys_put_long(desc_addr, desc | MMU_DES_USED); + + /* fetch page table descriptor */ + if (regs.mmu_pagesize_8k) { + i = (addr >> 11) & 0x7c; + desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_8) | i; + } else { + i = (addr >> 10) & 0xfc; + desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_4) | i; + } + + desc = phys_get_long(desc_addr); + if ((desc & 3) == 2) { + /* indirect */ + desc_addr = desc & MMU_PAGE_INDIRECT_MASK; + desc = phys_get_long(desc_addr); + } + if ((desc & 1) == 0) { + D(bug("MMU: invalid page descriptor log=%08x desc=%08x @%08x", addr, desc, desc_addr)); + return desc; + } + + desc |= wp & MMU_DES_WP; + if (write) { + if (desc & MMU_DES_WP) { + if ((desc & MMU_DES_USED) == 0) { + desc |= MMU_DES_USED; + phys_put_long(desc_addr, desc); + } + } else if ((desc & (MMU_DES_USED|MMU_DES_MODIFIED)) != + (MMU_DES_USED|MMU_DES_MODIFIED)) { + desc |= MMU_DES_USED|MMU_DES_MODIFIED; + phys_put_long(desc_addr, desc); + } + } else { + if ((desc & MMU_DES_USED) == 0) { + desc |= MMU_DES_USED; + phys_put_long(desc_addr, desc); + } + } + return desc; +} + +uae_u16 mmu_get_word_unaligned(uaecptr addr, int data) +{ + uae_u16 res; + + res = (uae_u16)mmu_get_byte(addr, data, sz_word) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_byte(addr + 1, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + return res; +} + +uae_u32 mmu_get_long_unaligned(uaecptr addr, int data) +{ + uae_u32 res; + + if (likely(!(addr & 1))) { + res = (uae_u32)mmu_get_word(addr, data, sz_long) << 16; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_word(addr + 2, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } else { + res = (uae_u32)mmu_get_byte(addr, data, sz_long) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res = (res | mmu_get_byte(addr + 1, data, sz_long)) << 8; + res = (res | mmu_get_byte(addr + 2, data, sz_long)) << 8; + res |= mmu_get_byte(addr + 3, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } + return res; +} + +uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_b(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); +} + +uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_w(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); +} + +uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) + return HWget_l(cl->phys + addr); + mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); + return 0; + } + + if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) + goto redo; + + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); +} + + +uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, + struct mmu_atc_line *cl) +{ + uae_u64 h = mmu_get_long_slow(addr, super, data, sz_long, cl); + uae_u64 l = mmu_get_long_slow(addr + 4, super, data, sz_long, cl); + return (h << 32) | l; +} + +REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data) +{ + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!(addr & 1))) { + mmu_put_word(addr, val >> 16, data, sz_long); + mmu_put_word(addr + 2, val, data, sz_long); + } else { + mmu_put_byte(addr, val >> 24, data, sz_long); + mmu_put_byte(addr + 1, val >> 16, data, sz_long); + mmu_put_byte(addr + 2, val >> 8, data, sz_long); + mmu_put_byte(addr + 3, val, data, sz_long); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data) +{ + SAVE_EXCEPTION; + TRY(prb) { + mmu_put_byte(addr, val >> 8, data, sz_word); + mmu_put_byte(addr + 1, val, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_b(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_w(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, + int size, struct mmu_atc_line *cl) +{ + uae_u32 tag = ATC_TAG(addr); + + if (cl->tag == (uae_u16)~tag) { + redo: + if (cl->hw) { + HWput_l(cl->phys + addr, val); + return; + } + regs.wb3_data = val; + mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); + return; + } + + if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) + goto redo; + + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); +} + +REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, + struct mmu_atc_line *cl) +{ + mmu_put_long_slow(addr, (uae_u32)(val >> 32), super, data, sz_long, cl); + mmu_put_long_slow(addr + 4, (uae_u32)(val), super, data, sz_long, cl); +} + +uae_u32 sfc_get_long(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + uae_u32 res; + + if (likely(!is_unaligned(addr, 4))) + return mmu_get_user_long(addr, super, data, sz_long); + + if (likely(!(addr & 1))) { + res = (uae_u32)mmu_get_user_word(addr, super, data, sz_long) << 16; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_user_word(addr + 2, super, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } else { + res = (uae_u32)mmu_get_user_byte(addr, super, data, sz_long) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res = (res | mmu_get_user_byte(addr + 1, super, data, sz_long)) << 8; + res = (res | mmu_get_user_byte(addr + 2, super, data, sz_long)) << 8; + res |= mmu_get_user_byte(addr + 3, super, data, sz_long); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + } + return res; +} + +uae_u16 sfc_get_word(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + uae_u16 res; + + if (likely(!is_unaligned(addr, 2))) + return mmu_get_user_word(addr, super, data, sz_word); + + res = (uae_u16)mmu_get_user_byte(addr, super, data, sz_word) << 8; + SAVE_EXCEPTION; + TRY(prb) { + res |= mmu_get_user_byte(addr + 1, super, data, sz_word); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + breakpt(); + THROW_AGAIN(prb); + } + return res; +} + +uae_u8 sfc_get_byte(uaecptr addr) +{ + int super = (regs.sfc & 4) != 0; + int data = (regs.sfc & 3) != 2; + + return mmu_get_user_byte(addr, super, data, sz_byte); +} + +void dfc_put_long(uaecptr addr, uae_u32 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!is_unaligned(addr, 4))) + mmu_put_user_long(addr, val, super, data, sz_long); + else if (likely(!(addr & 1))) { + mmu_put_user_word(addr, val >> 16, super, data, sz_long); + mmu_put_user_word(addr + 2, val, super, data, sz_long); + } else { + mmu_put_user_byte(addr, val >> 24, super, data, sz_long); + mmu_put_user_byte(addr + 1, val >> 16, super, data, sz_long); + mmu_put_user_byte(addr + 2, val >> 8, super, data, sz_long); + mmu_put_user_byte(addr + 3, val, super, data, sz_long); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +void dfc_put_word(uaecptr addr, uae_u16 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + if (likely(!is_unaligned(addr, 2))) + mmu_put_user_word(addr, val, super, data, sz_word); + else { + mmu_put_user_byte(addr, val >> 8, super, data, sz_word); + mmu_put_user_byte(addr + 1, val, super, data, sz_word); + } + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + if (regs.mmu_fault_addr != addr) { + regs.mmu_fault_addr = addr; + regs.mmu_ssw |= MMU_SSW_MA; + } + breakpt(); + THROW_AGAIN(prb); + } +} + +void dfc_put_byte(uaecptr addr, uae_u8 val) +{ + int super = (regs.dfc & 4) != 0; + int data = (regs.dfc & 3) != 2; + + SAVE_EXCEPTION; + TRY(prb) { + mmu_put_user_byte(addr, val, super, data, sz_byte); + RESTORE_EXCEPTION; + } + CATCH(prb) { + RESTORE_EXCEPTION; + regs.wb3_data = val; + breakpt(); + THROW_AGAIN(prb); + } +} + +void mmu_op(uae_u32 opcode, uae_u16 extra) +{ + int super = (regs.dfc & 4) != 0; + DUNUSED(extra); + if ((opcode & 0xFE0) == 0x0500) { + int regno, glob; + //D(didflush = 0); + uae_u32 addr; + /* PFLUSH */ + regno = opcode & 7; + glob = (opcode & 8) != 0; + + if (opcode & 16) { + D(bug("pflusha(%u,%u)", glob, regs.dfc)); + mmu_flush_atc_all(glob); + } else { + addr = m68k_areg(regs, regno); + D(bug("pflush(%u,%u,%x)", glob, regs.dfc, addr)); + mmu_flush_atc(addr, super, glob); + } + flush_internals(); +#ifdef USE_JIT + flush_icache(); +#endif + } else if ((opcode & 0x0FD8) == 0x548) { + int write, regno; + uae_u32 addr; + + regno = opcode & 7; + write = (opcode & 32) == 0; + addr = m68k_areg(regs, regno); + //bug("ptest(%u,%u,%x)", write, regs.dfc, addr); + D(bug("PTEST%c (A%d) %08x DFC=%d", write ? 'W' : 'R', regno, addr, regs.dfc)); + mmu_flush_atc(addr, super, true); + SAVE_EXCEPTION; + TRY(prb) { + struct mmu_atc_line *l; + uae_u32 desc; + bool data = (regs.dfc & 3) != 2; + + l = &atc_l2[super][ATC_L2_INDEX(addr)]; + desc = mmu_fill_atc_l2(addr, super, data, write, l); + if (!(data ? l->valid_data : l->valid_inst)) + regs.mmusr = MMU_MMUSR_B; + else if (l->tt) + regs.mmusr = MMU_MMUSR_T | MMU_MMUSR_R; + else { + regs.mmusr = desc & (~0xfff|MMU_MMUSR_G|MMU_MMUSR_Ux|MMU_MMUSR_S| + MMU_MMUSR_CM|MMU_MMUSR_M|MMU_MMUSR_W); + regs.mmusr |= MMU_MMUSR_R; + } + } + CATCH(prb) { + regs.mmusr = MMU_MMUSR_B; + } + RESTORE_EXCEPTION; + D(bug("PTEST result: mmusr %08x", regs.mmusr)); + } else + op_illg (opcode); +} + +void mmu_flush_atc(uaecptr addr, bool super, bool global) +{ + struct mmu_atc_line *l; + int i, j; + + l = atc_l1[super][0][0]; + i = ATC_L1_INDEX(addr); + for (j = 0; j < 4; j++) { + if (global || !l[i].global) + l[i].tag = 0x8000; + l += ATC_L1_SIZE; + } + if (regs.mmu_pagesize_8k) { + i = ATC_L1_INDEX(addr) ^ 1; + for (j = 0; j < 4; j++) { + if (global || !l[i].global) + l[i].tag = 0x8000; + l += ATC_L1_SIZE; + } + } + l = atc_l2[super]; + i = ATC_L2_INDEX(addr); + if (global || !l[i].global) + l[i].tag = 0x8000; + if (regs.mmu_pagesize_8k) { + i ^= 1; + if (global || !l[i].global) + l[i].tag = 0x8000; + } +} + +void mmu_flush_atc_all(bool global) +{ + struct mmu_atc_line *l; + unsigned int i; + + l = atc_l1[0][0][0]; + for (i = 0; i < sizeof(atc_l1) / sizeof(*l); l++, i++) { + if (global || !l->global) + l->tag = 0x8000; + } + + l = atc_l2[0]; + for (i = 0; i < sizeof(atc_l2) / sizeof(*l); l++, i++) { + if (global || !l->global) + l->tag = 0x8000; + } +} + +void mmu_reset(void) +{ + mmu_flush_atc_all(true); + + regs.urp = regs.srp = 0; + regs.itt0 = regs.itt1 = 0; + regs.dtt0 = regs.dtt1 = 0; + regs.mmusr = 0; +} + + +void mmu_set_tc(uae_u16 tc) +{ + if (regs.tc == tc) + return; + + regs.tc = tc; + regs.mmu_enabled = tc & 0x8000 ? 1 : 0; + regs.mmu_pagesize_8k = tc & 0x4000 ? 1 : 0; + mmu_flush_atc_all(true); + + D(bug("MMU: enabled=%d page8k=%d\n", regs.mmu_enabled, regs.mmu_pagesize_8k)); +} + +void mmu_set_super(bool super) +{ + current_atc = &atc_l1[super]; +} + +#else + +void mmu_op(uae_u32 opcode, uae_u16 /*extra*/) +{ + if ((opcode & 0xFE0) == 0x0500) { + /* PFLUSH instruction */ + flush_internals(); + } else if ((opcode & 0x0FD8) == 0x548) { + /* PTEST instruction */ + } else + op_illg(opcode); +} + +#endif + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/cpummu.h b/BasiliskII/src/uae_cpu/cpummu.h new file mode 100644 index 000000000..01359f6f5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpummu.h @@ -0,0 +1,267 @@ +/* + * cpummu.h - MMU emulation + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by UAE MMU patch + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#ifndef CPUMMU_H +#define CPUMMU_H + +#include "registers.h" + +# include + +#define MMU_TEST_PTEST 1 +#define MMU_TEST_VERBOSE 2 +#define MMU_TEST_FORCE_TABLE_SEARCH 4 +#define MMU_TEST_NO_BUSERR 8 + +extern void mmu_dump_tables(void); + +#define MMU_TTR_LOGICAL_BASE 0xff000000 +#define MMU_TTR_LOGICAL_MASK 0x00ff0000 +#define MMU_TTR_BIT_ENABLED (1 << 15) +#define MMU_TTR_BIT_SFIELD_ENABLED (1 << 14) +#define MMU_TTR_BIT_SFIELD_SUPER (1 << 13) +#define MMU_TTR_SFIELD_SHIFT 13 +#define MMU_TTR_UX_MASK ((1 << 9) | (1 << 8)) +#define MMU_TTR_UX_SHIFT 8 +#define MMU_TTR_CACHE_MASK ((1 << 6) | (1 << 5)) +#define MMU_TTR_CACHE_SHIFT 5 +#define MMU_TTR_BIT_WRITE_PROTECT (1 << 2) + +#define MMU_UDT_MASK 3 +#define MMU_PDT_MASK 3 + +#define MMU_DES_WP 4 +#define MMU_DES_USED 8 + +/* page descriptors only */ +#define MMU_DES_MODIFIED 16 +#define MMU_DES_SUPER (1 << 7) +#define MMU_DES_GLOBAL (1 << 10) + +#define MMU_ROOT_PTR_ADDR_MASK 0xfffffe00 +#define MMU_PTR_PAGE_ADDR_MASK_8 0xffffff80 +#define MMU_PTR_PAGE_ADDR_MASK_4 0xffffff00 + +#define MMU_PAGE_INDIRECT_MASK 0xfffffffc +#define MMU_PAGE_ADDR_MASK_8 0xffffe000 +#define MMU_PAGE_ADDR_MASK_4 0xfffff000 +#define MMU_PAGE_UR_MASK_8 ((1 << 12) | (1 << 11)) +#define MMU_PAGE_UR_MASK_4 (1 << 11) +#define MMU_PAGE_UR_SHIFT 11 + +#define MMU_MMUSR_ADDR_MASK 0xfffff000 +#define MMU_MMUSR_B (1 << 11) +#define MMU_MMUSR_G (1 << 10) +#define MMU_MMUSR_U1 (1 << 9) +#define MMU_MMUSR_U0 (1 << 8) +#define MMU_MMUSR_Ux (MMU_MMUSR_U1 | MMU_MMUSR_U0) +#define MMU_MMUSR_S (1 << 7) +#define MMU_MMUSR_CM ((1 << 6) | ( 1 << 5)) +#define MMU_MMUSR_M (1 << 4) +#define MMU_MMUSR_W (1 << 2) +#define MMU_MMUSR_T (1 << 1) +#define MMU_MMUSR_R (1 << 0) + +/* special status word (access error stack frame) */ +#define MMU_SSW_TM 0x0007 +#define MMU_SSW_TT 0x0018 +#define MMU_SSW_SIZE 0x0060 +#define MMU_SSW_SIZE_B 0x0020 +#define MMU_SSW_SIZE_W 0x0040 +#define MMU_SSW_SIZE_L 0x0000 +#define MMU_SSW_RW 0x0100 +#define MMU_SSW_LK 0x0200 +#define MMU_SSW_ATC 0x0400 +#define MMU_SSW_MA 0x0800 + +#define TTR_I0 4 +#define TTR_I1 5 +#define TTR_D0 6 +#define TTR_D1 7 + +#define TTR_NO_MATCH 0 +#define TTR_NO_WRITE 1 +#define TTR_OK_MATCH 2 + +struct mmu_atc_line { + uae_u16 tag; + unsigned tt : 1; + unsigned valid_data : 1; + unsigned valid_inst : 1; + unsigned global : 1; + unsigned modified : 1; + unsigned write_protect : 1; + unsigned hw : 1; + unsigned bus_fault : 1; + uaecptr phys; +}; + +/* + * We don't need to store the whole logical address in the atc cache, as part of + * it is encoded as index into the cache. 14 bits of the address are stored in + * the tag, this means at least 6 bits must go into the index. The upper two + * bits of the tag define the type of data in the atc line: + * - 00: a normal memory address + * - 11: invalid memory address or hardware access + * (generated via ~ATC_TAG(addr) in the slow path) + * - 10: empty atc line + */ + +#define ATC_TAG_SHIFT 18 +#define ATC_TAG(addr) ((uae_u32)(addr) >> ATC_TAG_SHIFT) + + +#define ATC_L1_SIZE_LOG 8 +#define ATC_L1_SIZE (1 << ATC_L1_SIZE_LOG) + +#define ATC_L1_INDEX(addr) (((addr) >> 12) % ATC_L1_SIZE) + +/* + * first level atc cache + * indexed by [super][data][rw][idx] + */ + +typedef struct mmu_atc_line mmu_atc_l1_array[2][2][ATC_L1_SIZE]; +extern mmu_atc_l1_array atc_l1[2]; +extern mmu_atc_l1_array *current_atc; + +#define ATC_L2_SIZE_LOG 12 +#define ATC_L2_SIZE (1 << ATC_L2_SIZE_LOG) + +#define ATC_L2_INDEX(addr) ((((addr) >> 12) ^ ((addr) >> (32 - ATC_L2_SIZE_LOG))) % ATC_L2_SIZE) + +extern struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; + +/* + * lookup address in the level 1 atc cache, + * the data and write arguments are constant in the common, + * thus allows gcc to generate a constant offset. + */ +static ALWAYS_INLINE int mmu_lookup(uaecptr addr, bool data, bool write, + struct mmu_atc_line **cl) +{ + addr >>= 12; + *cl = &(*current_atc)[data][write][addr % ATC_L1_SIZE]; + return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); +} + +/* + * similiar to mmu_user_lookup, but for the use of the moves instruction + */ +static ALWAYS_INLINE int mmu_user_lookup(uaecptr addr, bool super, bool data, + bool write, struct mmu_atc_line **cl) +{ + addr >>= 12; + *cl = &atc_l1[super][data][write][addr % ATC_L1_SIZE]; + return (*cl)->tag == addr >> (ATC_TAG_SHIFT - 12); +} + +extern REGPARAM2 uae_u16 mmu_get_word_unaligned(uaecptr addr, int data); +extern REGPARAM2 uae_u32 mmu_get_long_unaligned(uaecptr addr, int data); + +extern REGPARAM2 uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, + struct mmu_atc_line *cl); + +extern REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data); +extern REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data); + +extern REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, + int size, struct mmu_atc_line *cl); +extern REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, + struct mmu_atc_line *cl); + +extern void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode); + +static inline void mmu_set_ttr(int regno, uae_u32 val) +{ + uae_u32 * ttr; + switch(regno) { + case TTR_I0: ttr = ®s.itt0; break; + case TTR_I1: ttr = ®s.itt1; break; + case TTR_D0: ttr = ®s.dtt0; break; + case TTR_D1: ttr = ®s.dtt1; break; + default: abort(); + } + *ttr = val; +} + +static inline void mmu_set_mmusr(uae_u32 val) +{ + regs.mmusr = val; +} + +#define FC_DATA (regs.s ? 5 : 1) +#define FC_INST (regs.s ? 6 : 2) + +extern uaecptr REGPARAM2 mmu_translate(uaecptr addr, int super, int data, int write); + +extern uae_u32 REGPARAM2 sfc_get_long(uaecptr addr); +extern uae_u16 REGPARAM2 sfc_get_word(uaecptr addr); +extern uae_u8 REGPARAM2 sfc_get_byte(uaecptr addr); +extern void REGPARAM2 dfc_put_long(uaecptr addr, uae_u32 val); +extern void REGPARAM2 dfc_put_word(uaecptr addr, uae_u16 val); +extern void REGPARAM2 dfc_put_byte(uaecptr addr, uae_u8 val); + + +extern void REGPARAM2 mmu_flush_atc(uaecptr addr, bool super, bool global); +extern void REGPARAM2 mmu_flush_atc_all(bool global); +extern void REGPARAM2 mmu_op(uae_u32 opcode, uae_u16 extra); + +#ifdef FULLMMU + +extern void REGPARAM2 mmu_reset(void); +extern void REGPARAM2 mmu_set_tc(uae_u16 tc); +extern void REGPARAM2 mmu_set_super(bool super); + +#else + +static inline void mmu_reset(void) +{ +} + +static inline void mmu_set_tc(uae_u16 /*tc*/) +{ +} + +static inline void mmu_set_super(bool /*super*/) +{ +} + +#endif + +#endif /* CPUMMU_H */ +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp new file mode 100644 index 000000000..0ea660105 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp @@ -0,0 +1,2 @@ +#define NOFLAGS 1 +#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbla.cpp b/BasiliskII/src/uae_cpu/cpustbla.cpp new file mode 100644 index 000000000..f3f8e320c --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpustbla.cpp @@ -0,0 +1,5 @@ +/* + * cpustbl.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/debug.cpp b/BasiliskII/src/uae_cpu/debug.cpp new file mode 100644 index 000000000..8b2f14e00 --- /dev/null +++ b/BasiliskII/src/uae_cpu/debug.cpp @@ -0,0 +1,82 @@ +/* + * debug.cpp - CPU debugger + * + * Copyright (c) 2001-2010 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Bernd Schmidt's UAE + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +/* + * UAE - The Un*x Amiga Emulator + * + * Debugger + * + * (c) 1995 Bernd Schmidt + * + */ + +#include "sysdeps.h" + +#include "memory.h" +#include "newcpu.h" +#include "debug.h" + +#include "input.h" +#include "cpu_emulation.h" + +#include "main.h" + +static int debugger_active = 0; +int debugging = 0; +int irqindebug = 0; + +int ignore_irq = 0; + + +void activate_debugger (void) +{ +#ifdef DEBUGGER + ndebug::do_skip = false; +#endif + debugger_active = 1; + SPCFLAGS_SET( SPCFLAG_BRK ); + debugging = 1; + /* use_debugger = 1; */ +} + +void deactivate_debugger(void) +{ + debugging = 0; + debugger_active = 0; +} + +void debug (void) +{ + if (ignore_irq && regs.s && !regs.m ) { + SPCFLAGS_SET( SPCFLAG_BRK ); + return; + } +#ifdef DEBUGGER + ndebug::run(); +#endif +} + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu/fpu/core.h index 66358a2d8..2eccc4d24 100644 --- a/BasiliskII/src/uae_cpu/fpu/core.h +++ b/BasiliskII/src/uae_cpu/fpu/core.h @@ -1,28 +1,33 @@ /* - * fpu/core.h - base fpu context definition + * fpu/core.h - base fpu context definition * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_CORE_H @@ -34,11 +39,15 @@ /* Always use x87 FPU stack on IA-32. */ #if defined(X86_ASSEMBLY) #define USE_X87_ASSEMBLY 1 +#ifndef USE_JIT_FPU +#define ACCURATE_SIN_COS_TAN 1 +#endif #endif /* Only use x87 FPU on x86-64 if long double precision is requested. */ -#if defined(X86_64_ASSEMBLY) && USE_LONG_DOUBLE +#if defined(X86_64_ASSEMBLY) && defined(USE_LONG_DOUBLE) #define USE_X87_ASSEMBLY 1 +#define ACCURATE_SIN_COS_TAN 1 #endif /* ========================================================================== */ @@ -65,10 +74,7 @@ struct fpu_t { /* --- Floating-Point Control Register --- */ /* ---------------------------------------------------------------------- */ - struct { - /* Exception Enable Byte */ - uae_u32 exception_enable; #define FPCR_EXCEPTION_ENABLE 0x0000ff00 #define FPCR_EXCEPTION_BSUN 0x00008000 #define FPCR_EXCEPTION_SNAN 0x00004000 @@ -83,21 +89,19 @@ struct fpu_t { #define FPCR_MODE_CONTROL 0x000000ff /* Rounding precision */ - uae_u32 rounding_precision; #define FPCR_ROUNDING_PRECISION 0x000000c0 #define FPCR_PRECISION_SINGLE 0x00000040 #define FPCR_PRECISION_DOUBLE 0x00000080 #define FPCR_PRECISION_EXTENDED 0x00000000 /* Rounding mode */ - uae_u32 rounding_mode; #define FPCR_ROUNDING_MODE 0x00000030 #define FPCR_ROUND_NEAR 0x00000000 #define FPCR_ROUND_ZERO 0x00000010 #define FPCR_ROUND_MINF 0x00000020 #define FPCR_ROUND_PINF 0x00000030 - } fpcr; + uae_u32 fpcr; /* ---------------------------------------------------------------------- */ /* --- Floating-Point Status Register --- */ @@ -107,7 +111,7 @@ struct fpu_t { /* Floating-Point Condition Code Byte */ uae_u32 condition_codes; - #define FPSR_CCB 0xff000000 + #define FPSR_CCB 0x0f000000 #define FPSR_CCB_NEGATIVE 0x08000000 #define FPSR_CCB_ZERO 0x04000000 #define FPSR_CCB_INFINITY 0x02000000 @@ -133,7 +137,7 @@ struct fpu_t { /* Accrued Exception Byte */ uae_u32 accrued_exception; - #define FPSR_ACCRUED_EXCEPTION 0x000000ff + #define FPSR_ACCRUED_EXCEPTION 0x000000f8 #define FPSR_ACCR_IOP 0x00000080 #define FPSR_ACCR_OVFL 0x00000040 #define FPSR_ACCR_UNFL 0x00000020 @@ -219,7 +223,7 @@ struct fpu_t { extern fpu_t fpu; /* Return the address of a particular register */ -inline fpu_register * const fpu_register_address(int i) +inline fpu_register * fpu_register_address(int i) { return &fpu.registers[i]; } /* Dump functions for m68k_dumpstate */ @@ -227,16 +231,16 @@ extern void fpu_dump_registers(void); extern void fpu_dump_flags(void); /* Accessors to FPU Control Register */ -static inline uae_u32 get_fpcr(void); -static inline void set_fpcr(uae_u32 new_fpcr); +//static inline uae_u32 get_fpcr(void); +//static inline void set_fpcr(uae_u32 new_fpcr); /* Accessors to FPU Status Register */ -static inline uae_u32 get_fpsr(void); -static inline void set_fpsr(uae_u32 new_fpsr); +//static inline uae_u32 get_fpsr(void); +//static inline void set_fpsr(uae_u32 new_fpsr); /* Accessors to FPU Instruction Address Register */ -static inline uae_u32 get_fpiar(); -static inline void set_fpiar(uae_u32 new_fpiar); +//static inline uae_u32 get_fpiar(); +//static inline void set_fpiar(uae_u32 new_fpiar); /* Initialization / Finalization */ extern void fpu_init(bool integral_68040); @@ -254,6 +258,6 @@ void fpuop_scc(uae_u32 opcode, uae_u32 extra) REGPARAM; /* Floating-point system control operations */ void fpuop_save(uae_u32 opcode) REGPARAM; void fpuop_restore(uae_u32 opcode) REGPARAM; -void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) REGPARAM; +void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) REGPARAM; #endif /* FPU_CORE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp index 6aa6431aa..2a597997d 100644 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp @@ -1,28 +1,33 @@ /* - * fpu/exceptions.cpp - system-dependant FPU exceptions management + * fpu/exceptions.cpp - system-dependant FPU exceptions management * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #undef PRIVATE diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu/fpu/exceptions.h index 8c69a69d4..f943da04f 100644 --- a/BasiliskII/src/uae_cpu/fpu/exceptions.h +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.h @@ -1,28 +1,33 @@ /* - * fpu/exceptions.h - system-dependant FPU exceptions management + * fpu/exceptions.h - system-dependant FPU exceptions management * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_EXCEPTIONS_H diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu/fpu/flags.cpp index 2eabef859..4b0972df3 100644 --- a/BasiliskII/src/uae_cpu/fpu/flags.cpp +++ b/BasiliskII/src/uae_cpu/fpu/flags.cpp @@ -1,28 +1,33 @@ /* - * fpu/flags.cpp - Floating-point flags + * fpu/flags.cpp - Floating-point flags * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* NOTE: this file shall be included only from fpu/fpu_*.cpp */ diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h index 7c0c5b748..de25a2b66 100644 --- a/BasiliskII/src/uae_cpu/fpu/flags.h +++ b/BasiliskII/src/uae_cpu/fpu/flags.h @@ -1,28 +1,33 @@ /* - * fpu/flags.h - Floating-point flags + * fpu/flags.h - Floating-point flags * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_FLAGS_H @@ -112,7 +117,7 @@ PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) /* Make FPSR according to the value passed in argument */ PRIVATE inline void FFPU make_fpsr(fpu_register const & r) - { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=r" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } + { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=a" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } /* Return the corresponding ID of the current floating-point condition codes */ /* NOTE: only valid for evaluation of a condition */ @@ -181,27 +186,27 @@ PRIVATE inline uae_u32 FFPU get_fpccr(void) uae_u32 fpccr = 0; if (isnan(FPU result)) fpccr |= FPSR_CCB_NAN; - else if (FPU result == 0.0) + else if (isinf(FPU result)) + fpccr |= FPSR_CCB_INFINITY; + else if (iszero(FPU result)) fpccr |= FPSR_CCB_ZERO; - else if (FPU result < 0.0) + if (isneg(FPU result)) fpccr |= FPSR_CCB_NEGATIVE; - if (isinf(FPU result)) - fpccr |= FPSR_CCB_INFINITY; return fpccr; } /* M68k to native floating-point condition codes - SELF */ PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) { + bool negative = (new_fpcond & FPSR_CCB_NEGATIVE) != 0; if (new_fpcond & FPSR_CCB_NAN) - make_nan(FPU result); + make_nan(FPU result, negative); + else if (new_fpcond & FPSR_CCB_INFINITY) + make_inf(FPU result, negative); else if (new_fpcond & FPSR_CCB_ZERO) - FPU result = 0.0; - else if (new_fpcond & FPSR_CCB_NEGATIVE) - FPU result = -1.0; + make_zero(FPU result, negative); else - FPU result = +1.0; - /* gb-- where is Infinity ? */ + FPU result = negative ? -1.0 : +1.0; } /* Make FPSR according to the value passed in argument */ @@ -217,7 +222,7 @@ PRIVATE inline void FFPU make_fpsr(fpu_register const & r) /* -------------------------------------------------------------------------- */ /* Return the address of the floating-point condition codes register */ -static inline uae_u32 * const FFPU address_of_fpccr(void) +static inline uae_u32 * FFPU address_of_fpccr(void) { return ((uae_u32 *)& FPU fpsr.condition_codes); } #endif /* FPU_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu/fpu/fpu.h index 3940a75b8..d1fe6dd25 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu.h @@ -1,28 +1,33 @@ /* - * fpu/fpu.h - public header + * fpu/fpu.h - public header * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_PUBLIC_HEADER_H @@ -46,4 +51,9 @@ #include "fpu/types.h" #include "fpu/core.h" +void fpu_set_fpsr(uae_u32 new_fpsr); +uae_u32 fpu_get_fpsr(void); +void fpu_set_fpcr(uae_u32 new_fpcr); +uae_u32 fpu_get_fpcr(void); + #endif /* FPU_PUBLIC_HEADER_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp index f5a1aeb49..c76d56e62 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -1,31 +1,42 @@ /* - * fpu/fpu_ieee.cpp + * fpu_ieee.cpp - the IEEE FPU * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2008 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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. + * MC68881/68040 fpu emulation * - * 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. + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 * - * 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 + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* + * UAE - The Un*x Amiga Emulator + * + * MC68881/MC68040 emulation + * + * Copyright 1996 Herman ten Brugge + * + * * Following fixes by Lauri Pesonen, July 1999: * * FMOVEM list handling: @@ -87,7 +98,7 @@ */ #include "sysdeps.h" -#include +#include #include "memory.h" #include "readcpu.h" #include "newcpu.h" @@ -130,6 +141,24 @@ fpu_t fpu; #include "fpu/exceptions.cpp" #include "fpu/rounding.cpp" +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) +#define LD(x) x ## L +#ifdef HAVE_POWL +#define POWL(x, y) powl(x, y) +#else +#define POWL(x, y) pow(x, y) +#endif +#ifdef HAVE_LOG10L +#define LOG10L(x) log10l(x) +#else +#define LOG10L(x) log10(x) +#endif +#else +#define LD(x) x +#define POWL(x, y) pow(x, y) +#define LOG10L(x) log10(x) +#endif + /* -------------------------------------------------------------------------- */ /* --- Debugging --- */ /* -------------------------------------------------------------------------- */ @@ -152,9 +181,9 @@ PUBLIC void FFPU fpu_dump_flags(void) (get_fpsr() & FPSR_CCB_NAN) != 0); } +#if FPU_DEBUG && FPU_DUMP_REGISTERS PRIVATE void FFPU dump_registers(const char * str) { -#if FPU_DEBUG && FPU_DUMP_REGISTERS char temp_str[512]; sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", @@ -164,12 +193,15 @@ PRIVATE void FFPU dump_registers(const char * str) fpu_get_register(6), fpu_get_register(7) ); fpu_debug((temp_str)); +#else +PRIVATE void FFPU dump_registers(const char *) +{ #endif } +#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) { -#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES char temp_buf1[256], temp_buf2[10]; int bytes = sizeof(temp_buf1)/3-1-3; if (actual < bytes) @@ -183,6 +215,9 @@ PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) strcat(temp_buf1, "\n"); fpu_debug((temp_buf1)); +#else + PRIVATE void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ #endif } @@ -200,11 +235,12 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) #if 1 // Use a single, otherwise some checks for NaN, Inf, Zero would have to // be performed - fpu_single result = 0; // = 0 to workaround a compiler bug on SPARC - fp_declare_init_shape(srp, result, single); - srp->ieee.negative = (value >> 31) & 1; - srp->ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; - srp->ieee.mantissa = value & 0x007fffff; + fpu_single result = 0; + fp_declare_init_shape(srp, single); + srp.ieee.negative = (value >> 31) & 1; + srp.ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; + srp.ieee.mantissa = value & 0x007fffff; + result = srp.value; fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); return result; #elif 0 /* Original code */ @@ -212,13 +248,13 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) return (0.0); fpu_register result; - uae_u32 * p = (uae_u32 *)&result; + fpu_register_parts *p = (fpu_register_parts *)&result; uae_u32 sign = (value & 0x80000000); uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - p[FLO] = value << 29; - p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + p->parts[FLO] = value << 29; + p->parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); @@ -231,10 +267,11 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) { #if 1 fpu_single input = (fpu_single) src; - fp_declare_init_shape(sip, input, single); - uae_u32 result = (sip->ieee.negative << 31) - | (sip->ieee.exponent << 23) - | sip->ieee.mantissa; + fp_declare_init_shape(sip, single); + sip.value = input; + uae_u32 result = (sip.ieee.negative << 31) + | (sip.ieee.exponent << 23) + | sip.ieee.mantissa; fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); return result; #elif 0 /* Original code */ @@ -242,10 +279,10 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) return 0; uae_u32 result; - uae_u32 *p = (uae_u32 *)&src; + fpu_register_parts const *p = (fpu_register_parts const *)&src; - uae_u32 sign = (p[FHI] & 0x80000000); - uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; + uae_u32 sign = (p->parts[FHI] & 0x80000000); + uae_u32 exp = (p->parts[FHI] & 0x7FF00000) >> 20; if(exp + 127 < 1023) { exp = 0; @@ -255,7 +292,7 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) exp = exp + 127 - 1023; } - result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); + result = sign | (exp << 23) | ((p->parts[FHI] & 0x000FFFFF) << 3) | (p->parts[FLO] >> 29); fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); @@ -268,36 +305,34 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u { // is it zero? if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) - return 0.0; + return (wrd1 & 0x80000000) ? -0.0 : 0.0; fpu_register result; -#if USE_QUAD_DOUBLE +#if defined(USE_QUAD_DOUBLE) // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { - make_nan(result); + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + make_nan(result, (wrd1 & 0x80000000) != 0); return result; } // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { - if ((wrd1 & 0x80000000) == 0) - make_inf_positive(result); - else - make_inf_negative(result); + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + make_inf(result, (wrd1 & 0x80000000) != 0); return result; } - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp->ieee.mantissa3 = 0; -#elif USE_LONG_DOUBLE - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = wrd2; - srp->ieee.mantissa1 = wrd3; + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp.ieee.mantissa3 = 0; +#elif defined(USE_LONG_DOUBLE) + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = wrd2; + srp.ieee.mantissa1 = wrd3; + #else uae_u32 sgn = (wrd1 >> 31) & 1; uae_u32 exp = (wrd1 >> 16) & 0x7fff; @@ -326,13 +361,14 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - fp_declare_init_shape(srp, result, double); - srp->ieee.negative = sgn; - srp->ieee.exponent = exp; + fp_declare_init_shape(srp, double); + srp.ieee.negative = sgn; + srp.ieee.exponent = exp; // drop the explicit integer bit - srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); + srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); #endif + result = srp.value; fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); return result; } @@ -347,37 +383,34 @@ PRIVATE inline void FFPU make_extended_no_normalize( ) { // is it zero? - if ((wrd1 && 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { - make_zero_positive(result); + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + make_zero(result, (wrd1 & 0x80000000) != 0); return; } // is it NaN? - if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { - make_nan(result); + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && ((wrd2 & 0x7fffffff) != 0 || wrd3 != 0)) { + make_nan(result, (wrd1 & 0x80000000) != 0); return; } -#if USE_QUAD_DOUBLE +#if defined(USE_QUAD_DOUBLE) // is it inf? - if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { - if ((wrd1 & 0x80000000) == 0) - make_inf_positive(result); - else - make_inf_negative(result); + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && (wrd2 & 0x7fffffff) == 0 && wrd3 == 0) { + make_inf(result, (wrd1 & 0x80000000) != 0); return; } - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; - srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); - srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; - srp->ieee.mantissa3 = 0; -#elif USE_LONG_DOUBLE - fp_declare_init_shape(srp, result, extended); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; - srp->ieee.mantissa0 = wrd2; - srp->ieee.mantissa1 = wrd3; + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp.ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp.ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp.ieee.mantissa3 = 0; +#elif defined(USE_LONG_DOUBLE) + fp_declare_init_shape(srp, extended); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp.ieee.mantissa0 = wrd2; + srp.ieee.mantissa1 = wrd3; #else uae_u32 exp = (wrd1 >> 16) & 0x7fff; if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) @@ -387,13 +420,14 @@ PRIVATE inline void FFPU make_extended_no_normalize( else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - fp_declare_init_shape(srp, result, double); - srp->ieee.negative = (wrd1 >> 31) & 1; - srp->ieee.exponent = exp; + fp_declare_init_shape(srp, double); + srp.ieee.negative = (wrd1 >> 31) & 1; + srp.ieee.exponent = exp; // drop the explicit integer bit - srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; - srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); + srp.ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp.ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); #endif + result = srp.value; fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); } @@ -406,41 +440,43 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = *wrd2 = *wrd3 = 0; return; } -#if USE_QUAD_DOUBLE +#if defined(USE_QUAD_DOUBLE) // FIXME: deal with denormals? - fp_declare_init_shape(srp, src, extended); - *wrd1 = (srp->ieee.negative << 31) | (srp->ieee.exponent << 16); + fp_declare_init_shape(srp, extended); + srp.value = src; + *wrd1 = (srp.ieee.negative << 31) | (srp.ieee.exponent << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 15) | ((srp->ieee.mantissa1 & 0xfffe0000) >> 17); - *wrd3 = (srp->ieee.mantissa1 << 15) | ((srp->ieee.mantissa2 & 0xfffe0000) >> 17); -#elif USE_LONG_DOUBLE - uae_u32 *p = (uae_u32 *)&src; + *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 15) | ((srp.ieee.mantissa1 & 0xfffe0000) >> 17); + *wrd3 = (srp.ieee.mantissa1 << 15) | ((srp.ieee.mantissa2 & 0xfffe0000) >> 17); +#elif defined(USE_LONG_DOUBLE) + fpu_register_parts p = { src }; #ifdef WORDS_BIGENDIAN - *wrd1 = p[0]; - *wrd2 = p[1]; - *wrd3 = p[2]; + *wrd1 = p.parts[0]; + *wrd2 = p.parts[1]; + *wrd3 = p.parts[2]; #else - *wrd3 = p[0]; - *wrd2 = p[1]; - *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; + *wrd3 = p.parts[0]; + *wrd2 = p.parts[1]; + *wrd1 = (p.parts[2] & 0xffff) << 16; #endif #else - fp_declare_init_shape(srp, src, double); + fp_declare_init_shape(srp, double); + srp.value = src; fpu_debug(("extract_extended (%d,%d,%X,%X)\n", - srp->ieee.negative , srp->ieee.exponent, - srp->ieee.mantissa0, srp->ieee.mantissa1)); + srp.ieee.negative , srp.ieee.exponent, + srp.ieee.mantissa0, srp.ieee.mantissa1)); - uae_u32 exp = srp->ieee.exponent; + uae_u32 exp = srp.ieee.exponent; if (exp == FP_DOUBLE_EXP_MAX) exp = FP_EXTENDED_EXP_MAX; else exp += FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; - *wrd1 = (srp->ieee.negative << 31) | (exp << 16); + *wrd1 = (srp.ieee.negative << 31) | (exp << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 11) | ((srp->ieee.mantissa1 & 0xffe00000) >> 21); - *wrd3 = srp->ieee.mantissa1 << 11; + *wrd2 = 0x80000000 | (srp.ieee.mantissa0 << 11) | ((srp.ieee.mantissa1 & 0xffe00000) >> 21); + *wrd3 = srp.ieee.mantissa1 << 11; #endif fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -486,41 +522,88 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, // to_pack PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) { - fpu_double d; - char *cp; - char str[100]; - - cp = str; - if (wrd1 & 0x80000000) - *cp++ = '-'; - *cp++ = (char)((wrd1 & 0xf) + '0'); - *cp++ = '.'; - *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); - *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); - *cp++ = 'E'; - if (wrd1 & 0x40000000) - *cp++ = '-'; - *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); - *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); - *cp = 0; - sscanf(str, "%le", &d); - - fpu_debug(("make_packed str = %s\n",str)); + fpu_register d; + bool sm = (wrd1 & 0x80000000) != 0; + bool se = (wrd1 & 0x40000000) != 0; + int exp = (wrd1 & 0x7fff0000) >> 16; + unsigned int dig; + fpu_register pwr; + + if (exp == 0x7fff) + { + if ((wrd2 & 0x7fffffff) == 0 && wrd3 == 0) + { + make_inf(d, sm); + } else + { + make_nan(d, sm); + } + return d; + } + dig = wrd1 & 0x0000000f; + if (dig == 0 && wrd2 == 0 && wrd3 == 0) + { + make_zero(d, sm); + return d; + } + + /* + * Convert the bcd exponent to binary by successive adds and + * muls. Set the sign according to SE. Subtract 16 to compensate + * for the mantissa which is to be interpreted as 17 integer + * digits, rather than 1 integer and 16 fraction digits. + * Note: this operation can never overflow. + */ + exp = ((wrd1 >> 24) & 0xf); + exp = exp * 10 + ((wrd1 >> 20) & 0xf); + exp = exp * 10 + ((wrd1 >> 16) & 0xf); + if (se) + exp = -exp; + /* sub to compensate for shift of mant */ + exp = exp - 16; + + /* + * Convert the bcd mantissa to binary by successive + * adds and muls. Set the sign according to SM. + * The mantissa digits will be converted with the decimal point + * assumed following the least-significant digit. + * Note: this operation can never overflow. + */ + d = wrd1 & 0xf; + d = (d * LD(10.0)) + ((wrd2 >> 28) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 24) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 20) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 16) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 12) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 8) & 0xf); + d = (d * LD(10.0)) + ((wrd2 >> 4) & 0xf); + d = (d * LD(10.0)) + ((wrd2 ) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 28) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 24) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 20) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 16) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 12) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 8) & 0xf); + d = (d * LD(10.0)) + ((wrd3 >> 4) & 0xf); + d = (d * LD(10.0)) + ((wrd3 ) & 0xf); + + /* Check the sign of the mant and make the value in fp0 the same sign. */ + if (sm) + d = -d; + + /* + * Calculate power-of-ten factor from exponent. + */ + if (exp < 0) + { + exp = -exp; + pwr = POWL(LD(10.0), exp); + d = d / pwr; + } else + { + pwr = POWL(LD(10.0), exp); + d = d * pwr; + } fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); return d; @@ -529,52 +612,88 @@ PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 // from_pack PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) { - int i; - int t; - char *cp; - char str[100]; - - sprintf(str, "%.16e", src); - - fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); - - cp = str; + fpu_register pwr; + int exp; + fpu_register d; + bool sm, se; + int dig; + *wrd1 = *wrd2 = *wrd3 = 0; - if (*cp == '-') { - cp++; - *wrd1 = 0x80000000; + + d = src; + sm = false; + if (isneg(src)) + { + d = -d; + sm = true; + } + + if (isnan(src)) + { + *wrd1 = sm ? 0xffff0000 : 0x7fff0000; + *wrd2 = 0xffffffff; + *wrd3 = 0xffffffff; + return; } - if (*cp == '+') - cp++; - *wrd1 |= (*cp++ - '0'); - if (*cp == '.') - cp++; - for (i = 0; i < 8; i++) { - *wrd2 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd2 |= *cp++ - '0'; + if (isinf(src)) + { + *wrd1 = sm ? 0xffff0000 : 0x7fff0000; + *wrd2 = *wrd3 = 0; + return; } - for (i = 0; i < 8; i++) { - *wrd3 <<= 4; - if (*cp >= '0' && *cp <= '9') - *wrd3 |= *cp++ - '0'; + if (iszero(src)) + { + *wrd1 = sm ? 0x80000000 : 0x00000000; + *wrd2 = *wrd3 = 0; + return; } - if (*cp == 'e' || *cp == 'E') { - cp++; - if (*cp == '-') { - cp++; - *wrd1 |= 0x40000000; - } - if (*cp == '+') - cp++; - t = 0; - for (i = 0; i < 3; i++) { - if (*cp >= '0' && *cp <= '9') - t = (t << 4) | (*cp++ - '0'); - } - *wrd1 |= t << 16; + sm = false; + if (isneg(src)) + { + d = -d; + sm = true; } - + exp = (int)floor(LOG10L(d)); + se = false; + if (exp < 0) + { + exp = -exp; + se = true; + pwr = POWL(LD(10.0), exp); + d = d * pwr; + } else + { + pwr = POWL(LD(10.0), exp); + d = d / pwr; + } + dig = (int)d; d = LD(10) * (d - dig); *wrd1 |= dig; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 28; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 24; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 20; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 16; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 12; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 8; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig << 4; + dig = (int)d; d = LD(10) * (d - dig); *wrd2 |= dig; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 28; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 24; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 20; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 16; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 12; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 8; + dig = (int)d; d = LD(10) * (d - dig); *wrd3 |= dig << 4; + dig = (int)d; *wrd3 |= dig; + + dig = (exp / 100) % 10; + *wrd1 |= dig << 24; + dig = (exp / 10) % 10; + *wrd1 |= dig << 20; + dig = (exp) % 10; + *wrd1 |= dig << 16; + if (sm) + *wrd1 |= 0x80000000; + if (se) + *wrd1 |= 0x40000000; fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -628,11 +747,9 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe break; case 3: ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -673,8 +790,8 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); fpu_debug(("get_fp_value ad=%X\n",ad)); fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - dump_first_bytes( get_real_address(ad)-64, 64 ); - dump_first_bytes( get_real_address(ad), 64 ); + //dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); + //dump_first_bytes( get_real_address(ad, 0, 0), 64 ); switch (size) { case 0: @@ -721,15 +838,24 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe return 0; } + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); return 1; } /* Convert the FP value to integer according to the current m68k rounding mode */ -PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) +PRIVATE inline fpu_register FFPU fp_doround(fpu_register const & src) { fpu_register result; - switch (get_fpcr() & 0x30) { + switch (get_fpcr() & FPCR_ROUNDING_MODE) { case FPCR_ROUND_ZERO: result = fp_round_to_zero(src); break; @@ -746,7 +872,12 @@ PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) result = src; /* should never be reached */ break; } - return (uae_s32)result; + return result; +} + +PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) +{ + return (uae_s32)fp_doround(src); } PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) @@ -951,7 +1082,7 @@ PRIVATE inline int FFPU fpp_cond(int condition) if (NaN) N = Z = 0; - switch (condition) { + switch (condition & 0x1f) { case 0x00: CONDRET("False",0); case 0x01: CONDRET("Equal",Z); case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); @@ -1021,7 +1152,7 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) { fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - uae_u32 ad; + uae_u32 ad = 0; int cc = fpp_cond(extra & 0x3f); if (cc == -1) { m68k_setpc (m68k_getpc () - 4); @@ -1039,11 +1170,11 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) put_byte(ad, cc ? 0xff : 0x00); } -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) { - fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); + fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - int cc = fpp_cond(opcode & 0x3f); + int cc = fpp_cond(extra & 0x3f); if (cc == -1) { m68k_setpc (oldpc); op_illg (opcode); @@ -1075,7 +1206,7 @@ void FFPU fpuop_save(uae_u32 opcode) { fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); - uae_u32 ad; + uae_u32 ad = 0; int incr = (opcode & 0x38) == 0x20 ? -1 : 1; int i; @@ -1136,7 +1267,7 @@ void FFPU fpuop_restore(uae_u32 opcode) { fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); - uae_u32 ad; + uae_u32 ad = 0; uae_u32 d; int incr = (opcode & 0x38) == 0x20 ? -1 : 1; @@ -1256,8 +1387,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) if ((opcode & 0x38) == 0) { if (extra & 0x2000) { // dr bit if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + m68k_dreg (regs, opcode & 7) = get_fpcr(); fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); } if (extra & 0x0800) { @@ -1283,13 +1413,11 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); } } -// } else if ((opcode & 0x38) == 1) { } else if ((opcode & 0x38) == 8) { if (extra & 0x2000) { // dr bit if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + m68k_areg (regs, opcode & 7) = get_fpcr(); fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); } if (extra & 0x0800) { @@ -1333,7 +1461,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } else if (extra & 0x2000) { /* FMOVEM FPP->memory */ - uae_u32 ad; + uae_u32 ad = 0; int incr = 0; if (get_fp_ad(opcode, &ad) == 0) { @@ -1352,8 +1480,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } ad -= incr; if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - put_long (ad, get_fpcr() & 0xFFFF); + put_long (ad, get_fpcr()); fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); ad += 4; } @@ -1375,7 +1502,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } else { /* FMOVEM memory->FPP */ - uae_u32 ad; + uae_u32 ad = 0; if (get_fp_ad(opcode, &ad) == 0) { m68k_setpc (m68k_getpc () - 4); @@ -1421,7 +1548,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) return; case 6: case 7: { - uae_u32 ad, list = 0; + uae_u32 ad = 0, list = 0; int incr = 0; if (extra & 0x2000) { /* FMOVEM FPP->memory */ @@ -1568,27 +1695,27 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) switch (extra & 0x7f) { case 0x00: // FPU registers[reg] = 4.0 * atan(1.0); - FPU registers[reg] = 3.1415926535897932384626433832795; + FPU registers[reg] = LD(3.1415926535897932384626433832795029); fpu_debug(("FP const: Pi\n")); break; case 0x0b: // FPU registers[reg] = log10 (2.0); - FPU registers[reg] = 0.30102999566398119521373889472449; + FPU registers[reg] = LD(0.30102999566398119521); // 0.3010299956639811952137388947244930L fpu_debug(("FP const: Log 10 (2)\n")); break; case 0x0c: // FPU registers[reg] = exp (1.0); - FPU registers[reg] = 2.7182818284590452353602874713527; + FPU registers[reg] = LD(2.7182818284590452353); // 2.7182818284590452353602874713526625L fpu_debug(("FP const: e\n")); break; case 0x0d: // FPU registers[reg] = log (exp (1.0)) / log (2.0); - FPU registers[reg] = 1.4426950408889634073599246810019; + FPU registers[reg] = LD(1.4426950408889634073599246810019); fpu_debug(("FP const: Log 2 (e)\n")); break; case 0x0e: // FPU registers[reg] = log (exp (1.0)) / log (10.0); - FPU registers[reg] = 0.43429448190325182765112891891661; + FPU registers[reg] = LD(0.4342944819032518276511289189166051); fpu_debug(("FP const: Log 10 (e)\n")); break; case 0x0f: @@ -1597,73 +1724,79 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x30: // FPU registers[reg] = log (2.0); - FPU registers[reg] = 0.69314718055994530941723212145818; + FPU registers[reg] = LD(0.6931471805599453094172321214581766); fpu_debug(("FP const: ln(2)\n")); break; case 0x31: // FPU registers[reg] = log (10.0); - FPU registers[reg] = 2.3025850929940456840179914546844; + FPU registers[reg] = LD(2.3025850929940456840179914546843642); fpu_debug(("FP const: ln(10)\n")); break; case 0x32: - // ?? - FPU registers[reg] = 1.0e0; + FPU registers[reg] = LD(1.0e0); fpu_debug(("FP const: 1.0e0\n")); break; case 0x33: - FPU registers[reg] = 1.0e1; + FPU registers[reg] = LD(1.0e1); fpu_debug(("FP const: 1.0e1\n")); break; case 0x34: - FPU registers[reg] = 1.0e2; + FPU registers[reg] = LD(1.0e2); fpu_debug(("FP const: 1.0e2\n")); break; case 0x35: - FPU registers[reg] = 1.0e4; + FPU registers[reg] = LD(1.0e4); fpu_debug(("FP const: 1.0e4\n")); break; case 0x36: - FPU registers[reg] = 1.0e8; + FPU registers[reg] = LD(1.0e8); fpu_debug(("FP const: 1.0e8\n")); break; case 0x37: - FPU registers[reg] = 1.0e16; + FPU registers[reg] = LD(1.0e16); fpu_debug(("FP const: 1.0e16\n")); break; case 0x38: - FPU registers[reg] = 1.0e32; + FPU registers[reg] = LD(1.0e32); fpu_debug(("FP const: 1.0e32\n")); break; case 0x39: - FPU registers[reg] = 1.0e64; + FPU registers[reg] = LD(1.0e64); fpu_debug(("FP const: 1.0e64\n")); break; case 0x3a: - FPU registers[reg] = 1.0e128; + FPU registers[reg] = LD(1.0e128); fpu_debug(("FP const: 1.0e128\n")); break; case 0x3b: - FPU registers[reg] = 1.0e256; + FPU registers[reg] = LD(1.0e256); fpu_debug(("FP const: 1.0e256\n")); break; -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) case 0x3c: - FPU registers[reg] = 1.0e512L; + FPU registers[reg] = LD(1.0e512); fpu_debug(("FP const: 1.0e512\n")); break; case 0x3d: - FPU registers[reg] = 1.0e1024L; + FPU registers[reg] = LD(1.0e1024); fpu_debug(("FP const: 1.0e1024\n")); break; case 0x3e: - FPU registers[reg] = 1.0e2048L; + FPU registers[reg] = LD(1.0e2048); fpu_debug(("FP const: 1.0e2048\n")); break; case 0x3f: - FPU registers[reg] = 1.0e4096L; + FPU registers[reg] = LD(1.0e4096); fpu_debug(("FP const: 1.0e4096\n")); -#endif break; +#else + case 0x3c: + case 0x3d: + case 0x3e: + case 0x3f: + make_inf(FPU registers[reg], false); + break; +#endif default: m68k_setpc (m68k_getpc () - 4); op_illg (opcode); @@ -1761,34 +1894,22 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FMUL %.04f\n",(double)src)); get_dest_flags(FPU registers[reg]); get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { + if (fl_dest.in_range && fl_source.in_range) { if ((extra & 0x7f) == 0x63) FPU registers[reg] = (float)(FPU registers[reg] * src); else FPU registers[reg] = (double)(FPU registers[reg] * src); } else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg], fl_dest.negative ); } else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } + make_zero(FPU registers[reg], fl_dest.negative != fl_source.negative); } else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } + make_inf(FPU registers[reg], fl_dest.negative != fl_source.negative); } make_fpsr(FPU registers[reg]); break; @@ -1809,43 +1930,68 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) make_fpsr(FPU registers[reg]); break; case 0x01: /* FINT */ + /* + * FIXME: in round-to-nearest, x87 + * uses round-to-odd, but m68k round-to-even rule + */ fpu_debug(("FINT %.04f\n",(double)src)); - FPU registers[reg] = toint(src); + if (isinf(src)) + FPU registers[reg] = src; + else + FPU registers[reg] = fp_doround(src); make_fpsr(FPU registers[reg]); break; case 0x02: /* FSINH */ fpu_debug(("FSINH %.04f\n",(double)src)); - FPU registers[reg] = fp_sinh (src); + if (isinf(src)) + FPU registers[reg] = src; + else + FPU registers[reg] = fp_sinh (src); make_fpsr(FPU registers[reg]); break; case 0x03: /* FINTRZ */ fpu_debug(("FINTRZ %.04f\n",(double)src)); - FPU registers[reg] = fp_round_to_zero(src); + if (isinf(src)) + FPU registers[reg] = src; + else + FPU registers[reg] = fp_round_to_zero(src); make_fpsr(FPU registers[reg]); break; case 0x04: /* FSQRT */ fpu_debug(("FSQRT %.04f\n",(double)src)); - FPU registers[reg] = fp_sqrt (src); + if (isinf(src) && !isneg(src)) + FPU registers[reg] = src; + else + FPU registers[reg] = fp_sqrt (src); make_fpsr(FPU registers[reg]); break; case 0x06: /* FLOGNP1 */ fpu_debug(("FLOGNP1 %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src + 1.0); + if (isinf(src) && !isneg(src)) + make_inf(FPU registers[reg], false); + else + FPU registers[reg] = fp_log1p (src); make_fpsr(FPU registers[reg]); break; case 0x08: /* FETOXM1 */ fpu_debug(("FETOXM1 %.04f\n",(double)src)); - FPU registers[reg] = fp_exp (src) - 1.0; + FPU registers[reg] = fp_expm1 (src); make_fpsr(FPU registers[reg]); break; case 0x09: /* FTANH */ fpu_debug(("FTANH %.04f\n",(double)src)); - FPU registers[reg] = fp_tanh (src); + if (isinf(src)) + FPU registers[reg] = isneg(src) ? LD(-1.0) : LD(1.0); + else + FPU registers[reg] = fp_tanh (src); make_fpsr(FPU registers[reg]); break; case 0x0a: /* FATAN */ fpu_debug(("FATAN %.04f\n",(double)src)); - FPU registers[reg] = fp_atan (src); + if (isinf(src)) + FPU registers[reg] = isneg (src) ? LD(-1.570796326794896619231321691639751442) : LD(1.570796326794896619231321691639751442); + else + FPU registers[reg] = fp_atan (src); make_fpsr(FPU registers[reg]); break; case 0x0c: /* FASIN */ @@ -1870,32 +2016,65 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x10: /* FETOX */ fpu_debug(("FETOX %.04f\n",(double)src)); - FPU registers[reg] = fp_exp (src); + if (isinf(src)) + { + make_zero(FPU registers[reg], isneg(src)); + } else + { + FPU registers[reg] = fp_exp (src); + } make_fpsr(FPU registers[reg]); break; case 0x11: /* FTWOTOX */ fpu_debug(("FTWOTOX %.04f\n",(double)src)); - FPU registers[reg] = fp_pow(2.0, src); + if (isinf(src)) + { + if (isneg(src)) + make_zero(FPU registers[reg], false); + else + make_inf(FPU registers[reg], true); + } else + { + FPU registers[reg] = fp_pow2(src); + } make_fpsr(FPU registers[reg]); break; case 0x12: /* FTENTOX */ fpu_debug(("FTENTOX %.04f\n",(double)src)); - FPU registers[reg] = fp_pow(10.0, src); + if (isinf(src)) + { + if (isneg(src)) + make_zero(FPU registers[reg], false); + else + make_inf(FPU registers[reg], true); + } else + { + FPU registers[reg] = fp_pow10(src); + } make_fpsr(FPU registers[reg]); break; case 0x14: /* FLOGN */ fpu_debug(("FLOGN %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src); + if (isinf(src) && !isneg(src)) + make_inf(FPU registers[reg], false); + else + FPU registers[reg] = fp_log (src); make_fpsr(FPU registers[reg]); break; case 0x15: /* FLOG10 */ fpu_debug(("FLOG10 %.04f\n",(double)src)); - FPU registers[reg] = fp_log10 (src); + if (isinf(src) && !isneg(src)) + make_inf(FPU registers[reg], false); + else + FPU registers[reg] = fp_log10 (src); make_fpsr(FPU registers[reg]); break; case 0x16: /* FLOG2 */ fpu_debug(("FLOG2 %.04f\n",(double)src)); - FPU registers[reg] = fp_log (src) / fp_log (2.0); + if (isinf(src) && !isneg(src)) + make_inf(FPU registers[reg], false); + else + FPU registers[reg] = fp_log2 (src); make_fpsr(FPU registers[reg]); break; case 0x18: /* FABS */ @@ -1905,12 +2084,21 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x19: /* FCOSH */ fpu_debug(("FCOSH %.04f\n",(double)src)); - FPU registers[reg] = fp_cosh(src); + if (isinf(src)) + { + make_inf(FPU registers[reg], false); + } else + { + FPU registers[reg] = fp_cosh(src); + } make_fpsr(FPU registers[reg]); break; case 0x1a: /* FNEG */ fpu_debug(("FNEG %.04f\n",(double)src)); - FPU registers[reg] = -src; + if (iszero(src)) + make_zero(FPU registers[reg], !isneg(src)); + else + FPU registers[reg] = -src; make_fpsr(FPU registers[reg]); break; case 0x1c: /* FACOS */ @@ -1926,20 +2114,24 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x1e: /* FGETEXP */ fpu_debug(("FGETEXP %.04f\n",(double)src)); if( isinf(src) ) { - make_nan( FPU registers[reg] ); + make_nan( FPU registers[reg], isneg(src) ); + } + else if( iszero(src) ) { + make_zero(FPU registers[reg], isneg(src)); } else { + /* FIXME: subnormals not supported */ FPU registers[reg] = fast_fgetexp( src ); } make_fpsr(FPU registers[reg]); break; case 0x1f: /* FGETMAN */ fpu_debug(("FGETMAN %.04f\n",(double)src)); - if( src == 0 ) { - FPU registers[reg] = 0; + if( iszero(src)) { + make_zero(FPU registers[reg], isneg(src)); } - else if( isinf(src) ) { - make_nan( FPU registers[reg] ); + else if( isinf(src) || isnan(src) ) { + make_nan( FPU registers[reg], 0 ); } else { FPU registers[reg] = src; @@ -1949,7 +2141,28 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x20: /* FDIV */ fpu_debug(("FDIV %.04f\n",(double)src)); - FPU registers[reg] /= src; + if (isnan(src) || isnan(FPU registers[reg])) + { + make_nan(FPU registers[reg], false); + } else if (isinf(src)) + { + if (isinf(FPU registers[reg])) + make_nan(FPU registers[reg], false); + else + make_zero(FPU registers[reg], isneg(src) != isneg(FPU registers[reg])); + } else if (isinf(FPU registers[reg])) + { + if (isinf(src)) + make_nan(FPU registers[reg], false); + else + make_inf(FPU registers[reg], isneg(src) != isneg(FPU registers[reg])); + } else if (iszero(FPU registers[reg]) && !iszero(src)) + { + make_zero(FPU registers[reg], isneg(FPU registers[reg]) != isneg(src)); + } else + { + FPU registers[reg] /= src; + } make_fpsr(FPU registers[reg]); break; case 0x21: /* FMOD */ @@ -1967,31 +2180,23 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FMUL %.04f\n",(double)src)); get_dest_flags(FPU registers[reg]); get_source_flags(src); - if(fl_dest.in_range && fl_source.in_range) { + if (fl_dest.in_range && fl_source.in_range) { FPU registers[reg] *= src; + if (unlikely(isinf(FPU registers[reg]))) + { + make_inf(FPU registers[reg], isneg(FPU registers[reg])); + } } else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg], fl_dest.negative ); } else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } + make_zero(FPU registers[reg], fl_dest.negative != fl_source.negative); } else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } + make_inf(FPU registers[reg], fl_dest.negative != fl_source.negative); } make_fpsr(FPU registers[reg]); break; @@ -2022,24 +2227,49 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) // an overflow or underflow always results. // Here (int) cast is okay. int scale_factor = (int)fp_round_to_zero(src); -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, FPU registers[reg], extended); - sxp->ieee.exponent += scale_factor; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = FPU registers[reg]; + int exp = sxp.ieee.exponent; + exp += scale_factor; + if (scale_factor >= FP_EXTENDED_EXP_MAX || exp >= FP_EXTENDED_EXP_MAX) /* overflow */ + { + make_inf(FPU registers[reg], isneg(FPU registers[reg])); + FPU fpsr.exception_status |= FPSR_EXCEPTION_OVFL; + } else if (scale_factor < -FP_EXTENDED_EXP_MAX || exp <= -64) /* underflow */ + { + make_zero(FPU registers[reg], isneg(FPU registers[reg])); + FPU fpsr.exception_status |= FPSR_EXCEPTION_UNFL; + } else if (exp >= 0) /* normal result */ + { + sxp.ieee.exponent = exp; + FPU registers[reg] = sxp.value; + } else /* subnormal result */ + { + exp += 64; + sxp.ieee.exponent = exp; + sxp.value = sxp.value * 5.421010862427522170037e-20L; /* 2^-64 */ + } #else - fp_declare_init_shape(sxp, FPU registers[reg], double); - uae_u32 exp = sxp->ieee.exponent + scale_factor; + fp_declare_init_shape(sxp, double); + sxp.value = FPU registers[reg]; + uae_u32 exp = sxp.ieee.exponent + scale_factor; if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) exp = 0; else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) exp = FP_DOUBLE_EXP_MAX; else exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; - sxp->ieee.exponent = exp; + sxp.ieee.exponent = exp; + FPU registers[reg] = sxp.value; #endif } - else if (fl_source.infinity) { + else if (fl_source.infinity || fl_source.nan) { // Returns NaN for any Infinity source - make_nan( FPU registers[reg] ); + make_nan( FPU registers[reg], fl_source.negative ); + } else { + // source was zero, or dest was inf or nan + // in either case, dest is unchanged } make_fpsr(FPU registers[reg]); break; @@ -2050,12 +2280,52 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x28: /* FSUB */ fpu_debug(("FSUB %.04f\n",(double)src)); - FPU registers[reg] -= src; + if (isnan(src) || isnan(FPU registers[reg])) + { + make_nan(FPU registers[reg], false); + } else if (isinf(src)) + { + if (isinf(FPU registers[reg]) && isneg(src) == isneg(FPU registers[reg])) + make_nan(FPU registers[reg], false); + else + make_inf(FPU registers[reg], isneg(src)); + } else if (isinf(FPU registers[reg])) + { + if (isinf(src) && isneg(src) == isneg(FPU registers[reg])) + make_nan(FPU registers[reg], false); + else + make_inf(FPU registers[reg], isneg(FPU registers[reg])); + } else + { + FPU registers[reg] -= src; + } make_fpsr(FPU registers[reg]); break; case 0x22: /* FADD */ fpu_debug(("FADD %.04f\n",(double)src)); - FPU registers[reg] += src; + /* + * WTF. inf + some value generates NaN on x87, + * but we need inf in most cases + */ + if (isnan(src) || isnan(FPU registers[reg])) + { + make_nan(FPU registers[reg], false); + } else if (isinf(src)) + { + if (isinf(FPU registers[reg]) && isneg(src) != isneg(FPU registers[reg])) + make_nan(FPU registers[reg], false); + else + make_inf(FPU registers[reg], isneg(src)); + } else if (isinf(FPU registers[reg])) + { + if (isinf(src) && isneg(src) != isneg(FPU registers[reg])) + make_nan(FPU registers[reg], false); + else + make_inf(FPU registers[reg], isneg(FPU registers[reg])); + } else + { + FPU registers[reg] += src; + } make_fpsr(FPU registers[reg]); break; case 0x30: /* FSINCOS */ @@ -2068,6 +2338,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x37: fpu_debug(("FSINCOS %.04f\n",(double)src)); // Cosine must be calculated first if same register + // note: no need to use special sincos() function here; compiler will optimize that anyway FPU registers[extra & 7] = fp_cos(src); FPU registers[reg] = fp_sin (src); // Set FPU fpsr according to the sine result @@ -2076,7 +2347,17 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x38: /* FCMP */ fpu_debug(("FCMP %.04f\n",(double)src)); set_fpsr(0); - make_fpsr(FPU registers[reg] - src); + if (isinf(FPU registers[reg])) + { + if (isinf(src) && isneg(FPU registers[reg]) == isneg (src)) + make_fpsr(0); + else + make_fpsr(FPU registers[reg]); + } + else if (isinf(src)) + make_fpsr(-src); + else + make_fpsr(FPU registers[reg] - src); break; case 0x3a: /* FTST */ fpu_debug(("FTST %.04f\n",(double)src)); @@ -2100,6 +2381,27 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) dump_registers( "END "); } + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + /* -------------------------- Initialization -------------------------- */ PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 @@ -2136,7 +2438,7 @@ PUBLIC void FFPU fpu_init (bool integral_68040) FPU result = 1; for (int i = 0; i < 8; i++) - make_nan(FPU registers[i]); + make_nan(FPU registers[i], false); } PUBLIC void FFPU fpu_exit (void) diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h index 895019569..5735874c4 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h @@ -1,28 +1,33 @@ /* - * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * fpu/fpu_ieee.h - Extra Definitions for the IEEE FPU core * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_IEEE_H @@ -54,13 +59,11 @@ PRIVATE double_flags fl_dest; PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); PRIVATE inline void FFPU get_source_flags(fpu_register const & r); -PRIVATE inline void FFPU make_nan(fpu_register & r); -PRIVATE inline void FFPU make_zero_positive(fpu_register & r); -PRIVATE inline void FFPU make_zero_negative(fpu_register & r); -PRIVATE inline void FFPU make_inf_positive(fpu_register & r); -PRIVATE inline void FFPU make_inf_negative(fpu_register & r); +PRIVATE inline void FFPU make_nan(fpu_register & r, bool negative); +PRIVATE inline void FFPU make_zero(fpu_register & r, bool negative); +PRIVATE inline void FFPU make_inf(fpu_register & r, bool negative); -PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +// MJ PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); // May be optimized for particular processors diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp new file mode 100644 index 000000000..4eda14ca3 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp @@ -0,0 +1,2110 @@ +/* + * fpu_mpfr.cpp - emulate 68881/68040 fpu with mpfr + * + * Copyright (c) 2012, 2013 Andreas Schwab + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "sysdeps.h" +#include +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#define SINGLE_PREC 24 +#define SINGLE_MIN_EXP -126 +#define SINGLE_MAX_EXP 127 +#define SINGLE_BIAS 127 +#define DOUBLE_PREC 53 +#define DOUBLE_MIN_EXP -1022 +#define DOUBLE_MAX_EXP 1023 +#define DOUBLE_BIAS 1023 +#define EXTENDED_PREC 64 +#define EXTENDED_MIN_EXP -16383 +#define EXTENDED_MAX_EXP 16383 +#define EXTENDED_BIAS 16383 + +fpu_t fpu; +// The constant ROM +// Constants 48 to 63 are mapped to index 16 to 31 +const int num_fpu_constants = 32; +static mpfr_t fpu_constant_rom[num_fpu_constants]; +#define FPU_CONSTANT_ONE fpu_constant_rom[18] +// Exceptions generated during execution in addition to the ones +// maintained by mpfr +static uae_u32 cur_exceptions; +static uaecptr cur_instruction_address; + +static void +set_format (int prec) +{ + // MPFR represents numbers as 0.m*2^e + switch (prec) + { + case SINGLE_PREC: + mpfr_set_emin (SINGLE_MIN_EXP + 1 - (SINGLE_PREC - 1)); + mpfr_set_emax (SINGLE_MAX_EXP + 1); + break; + case DOUBLE_PREC: + mpfr_set_emin (DOUBLE_MIN_EXP + 1 - (DOUBLE_PREC - 1)); + mpfr_set_emax (DOUBLE_MAX_EXP + 1); + break; + case EXTENDED_PREC: + mpfr_set_emin (EXTENDED_MIN_EXP + 1 - (EXTENDED_PREC - 1)); + mpfr_set_emax (EXTENDED_MAX_EXP + 1); + break; + } +} + +static mpfr_rnd_t +get_cur_rnd () +{ + switch (get_rounding_mode ()) + { + default: + case FPCR_ROUND_NEAR: + return MPFR_RNDN; + case FPCR_ROUND_ZERO: + return MPFR_RNDZ; + case FPCR_ROUND_MINF: + return MPFR_RNDD; + case FPCR_ROUND_PINF: + return MPFR_RNDU; + } +} + +static mpfr_prec_t +get_cur_prec () +{ + switch (get_rounding_precision ()) + { + default: + case FPCR_PRECISION_EXTENDED: + return EXTENDED_PREC; + case FPCR_PRECISION_SINGLE: + return SINGLE_PREC; + case FPCR_PRECISION_DOUBLE: + return DOUBLE_PREC; + } +} + +#define DEFAULT_NAN_BITS 0xffffffffffffffffULL + +static void +set_nan (fpu_register ®, uae_u64 nan_bits, int nan_sign) +{ + mpfr_set_nan (reg.f); + reg.nan_bits = nan_bits; + reg.nan_sign = nan_sign; +} + +static void +set_nan (fpu_register ®) +{ + set_nan (reg, DEFAULT_NAN_BITS, 0); +} + +static bool fpu_inited; + +void +fpu_init (bool integral_68040) +{ + fpu.is_integral = integral_68040; + + mpfr_set_default_prec (EXTENDED_PREC); + mpfr_set_default_rounding_mode (MPFR_RNDN); + set_format (EXTENDED_PREC); + + for (int i = 0; i < 8; i++) + mpfr_init (fpu.registers[i].f); + mpfr_init (fpu.result.f); + + // Initialize constant ROM + for (int i = 0; i < num_fpu_constants; i++) + mpfr_init (fpu_constant_rom[i]); + + // 0: pi + mpfr_const_pi (fpu_constant_rom[0], MPFR_RNDN); + // 11: log10 (2) + mpfr_set_ui (fpu_constant_rom[11], 2, MPFR_RNDN); + mpfr_log10 (fpu_constant_rom[11], fpu_constant_rom[11], MPFR_RNDZ); + // 12: e + mpfr_set_ui (fpu_constant_rom[12], 1, MPFR_RNDN); + mpfr_exp (fpu_constant_rom[12], fpu_constant_rom[12], MPFR_RNDZ); + // 13: log2 (e) + mpfr_log2 (fpu_constant_rom[13], fpu_constant_rom[12], MPFR_RNDU); + // 14: log10 (e) + mpfr_log10 (fpu_constant_rom[14], fpu_constant_rom[12], MPFR_RNDU); + // 15: 0 + mpfr_set_zero (fpu_constant_rom[15], 0); + // 48: ln (2) + mpfr_const_log2 (fpu_constant_rom[16], MPFR_RNDN); + // 49: ln (10) + mpfr_set_ui (fpu_constant_rom[17], 10, MPFR_RNDN); + mpfr_log (fpu_constant_rom[17], fpu_constant_rom[17], MPFR_RNDN); + // 50 to 63: powers of 10 + mpfr_set_ui (fpu_constant_rom[18], 1, MPFR_RNDN); + for (int i = 19; i < 32; i++) + { + mpfr_set_ui (fpu_constant_rom[i], 1L << (i - 19) , MPFR_RNDN); + mpfr_exp10 (fpu_constant_rom[i], fpu_constant_rom[i], MPFR_RNDN); + } + + fpu_inited = true; + + fpu_reset (); +} + +void +fpu_exit () +{ + if (!fpu_inited) return; + + for (int i = 0; i < 8; i++) + mpfr_clear (fpu.registers[i].f); + mpfr_clear (fpu.result.f); + for (int i = 0; i < num_fpu_constants; i++) + mpfr_clear (fpu_constant_rom[i]); +} + +void +fpu_reset () +{ + set_fpcr (0); + set_fpsr (0); + fpu.instruction_address = 0; + + for (int i = 0; i < 8; i++) + set_nan (fpu.registers[i]); +} + +fpu_register::operator long double () +{ + return mpfr_get_ld (f, MPFR_RNDN); +} + +fpu_register & +fpu_register::operator= (long double x) +{ + mpfr_set_ld (f, x, MPFR_RNDN); + nan_bits = DEFAULT_NAN_BITS; + nan_sign = 0; + return *this; +} + +static bool +get_fp_addr (uae_u32 opcode, uae_u32 *addr, bool write) +{ + uaecptr pc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) + { + case 0: + case 1: + return false; + case 2: + *addr = m68k_areg (regs, reg); + break; + case 3: + *addr = m68k_areg (regs, reg); + break; + case 4: + *addr = m68k_areg (regs, reg); + break; + case 5: + *addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); + break; + case 6: + *addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) + { + case 0: + *addr = (uae_s16) next_iword(); + break; + case 1: + *addr = next_ilong(); + break; + case 2: + if (write) + return false; + pc = m68k_getpc (); + *addr = pc + (uae_s16) next_iword(); + break; + case 3: + if (write) + return false; + pc = m68k_getpc (); + *addr = get_disp_ea_020 (pc, next_iword()); + break; + default: + return false; + } + } + return true; +} + +static void +set_from_single (fpu_register &value, uae_u32 data) +{ + int s = data >> 31; + int e = (data >> 23) & 0xff; + uae_u32 m = data & 0x7fffff; + + if (e == 0xff) + { + if (m != 0) + { + if (!(m & 0x400000)) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, (uae_u64) (m | 0xc00000) << (32 + 8), s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (e != 0) + // Add integer bit + m |= 0x800000; + else + e++; + // Remove bias + e -= SINGLE_BIAS; + mpfr_set_ui_2exp (value.f, m, e - (SINGLE_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +static void +set_from_double (fpu_register &value, uae_u32 words[2]) +{ + int s = words[0] >> 31; + int e = (words[0] >> 20) & 0x7ff; + uae_u32 m = words[0] & 0xfffff; + + if (e == 0x7ff) + { + if ((m | words[1]) != 0) + { + if (!(m & 0x80000)) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, (((uae_u64) (m | 0x180000) << (32 + 11)) + | ((uae_u64) words[1] << 11)), s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (e != 0) + // Add integer bit + m |= 0x100000; + else + e++; + // Remove bias + e -= DOUBLE_BIAS; + mpfr_set_uj_2exp (value.f, ((uintmax_t) m << 32) | words[1], + e - (DOUBLE_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +static void +set_from_extended (fpu_register &value, uae_u32 words[3], bool check_snan) +{ + int s = words[0] >> 31; + int e = (words[0] >> 16) & 0x7fff; + + if (e == 0x7fff) + { + if (((words[1] & 0x7fffffff) | words[2]) != 0) + { + if (check_snan) + { + if ((words[1] & 0x40000000) == 0) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + words[1] |= 0x40000000; + } + set_nan (value, ((uae_u64) words[1] << 32) | words[2], s); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + // Remove bias + e -= EXTENDED_BIAS; + mpfr_set_uj_2exp (value.f, ((uintmax_t) words[1] << 32) | words[2], + e - (EXTENDED_PREC - 1), MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, s, MPFR_RNDN); +} + +#define from_bcd(d) ((d) < 10 ? (d) : (d) - 10) + +static void +set_from_packed (fpu_register &value, uae_u32 words[3]) +{ + char str[32], *p = str; + int sm = words[0] >> 31; + int se = (words[0] >> 30) & 1; + int i; + + if (((words[0] >> 16) & 0x7fff) == 0x7fff) + { + if ((words[1] | words[2]) != 0) + { + if ((words[1] & 0x40000000) == 0) + cur_exceptions |= FPSR_EXCEPTION_SNAN; + set_nan (value, ((uae_u64) (words[1] | 0x40000000) << 32) | words[2], + sm); + } + else + mpfr_set_inf (value.f, 0); + } + else + { + if (sm) + *p++ = '-'; + *p++ = from_bcd (words[0] & 15) + '0'; + *p++ = '.'; + for (i = 0; i < 8; i++) + { + p[i] = from_bcd ((words[1] >> (28 - i * 4)) & 15) + '0'; + p[i + 8] = from_bcd ((words[2] >> (28 - i * 4)) & 15) + '0'; + } + p += 16; + *p++ = 'e'; + if (se) + *p++ = '-'; + *p++ = from_bcd ((words[0] >> 24) & 15) + '0'; + *p++ = from_bcd ((words[0] >> 20) & 15) + '0'; + *p++ = from_bcd ((words[0] >> 16) & 15) + '0'; + *p = 0; + mpfr_set_str (value.f, str, 10, MPFR_RNDN); + } + mpfr_setsign (value.f, value.f, sm, MPFR_RNDN); +} + +static bool +get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register &value) +{ + int mode, reg, size; + uaecptr pc; + uae_u32 addr; + uae_u32 words[3]; + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + if ((extra & 0x4000) == 0) + { + mpfr_set (value.f, fpu.registers[(extra >> 10) & 7].f, MPFR_RNDN); + value.nan_bits = fpu.registers[(extra >> 10) & 7].nan_bits; + value.nan_sign = fpu.registers[(extra >> 10) & 7].nan_sign; + /* Check for SNaN. */ + if (mpfr_nan_p (value.f) && (value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + return true; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + switch (mode) + { + case 0: + switch (size) + { + case 6: + mpfr_set_si (value.f, (uae_s8) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 4: + mpfr_set_si (value.f, (uae_s16) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 0: + mpfr_set_si (value.f, (uae_s32) m68k_dreg (regs, reg), MPFR_RNDN); + break; + case 1: + set_from_single (value, m68k_dreg (regs, reg)); + break; + default: + return false; + } + return true; + case 1: + return false; + case 2: + case 3: + addr = m68k_areg (regs, reg); + break; + case 4: + addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + addr = m68k_areg (regs, reg) + (uae_s16) next_iword (); + break; + case 6: + addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword ()); + break; + case 7: + switch (reg) + { + case 0: + addr = (uae_s16) next_iword (); + break; + case 1: + addr = next_ilong (); + break; + case 2: + pc = m68k_getpc (); + addr = pc + (uae_s16) next_iword (); + break; + case 3: + pc = m68k_getpc (); + addr = get_disp_ea_020 (pc, next_iword ()); + break; + case 4: + addr = m68k_getpc (); + m68k_incpc (sz2[size]); + if (size == 6) // Immediate byte + addr++; + break; + default: + return false; + } + } + + switch (size) + { + case 0: + mpfr_set_si (value.f, (uae_s32) get_long (addr), MPFR_RNDN); + break; + case 1: + set_from_single (value, get_long (addr)); + break; + case 2: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + set_from_extended (value, words, true); + break; + case 3: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + set_from_packed (value, words); + break; + case 4: + mpfr_set_si (value.f, (uae_s16) get_word (addr), MPFR_RNDN); + break; + case 5: + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + set_from_double (value, words); + break; + case 6: + mpfr_set_si (value.f, (uae_s8) get_byte (addr), MPFR_RNDN); + break; + default: + return false; + } + + switch (mode) + { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + return true; +} + +static void +update_exceptions () +{ + uae_u32 exc, aexc; + + exc = cur_exceptions; + // Add any mpfr detected exceptions + if (mpfr_underflow_p ()) + exc |= FPSR_EXCEPTION_UNFL; + if (mpfr_overflow_p ()) + exc |= FPSR_EXCEPTION_OVFL; + if (mpfr_inexflag_p ()) + exc |= FPSR_EXCEPTION_INEX2; + set_exception_status (exc); + + aexc = get_accrued_exception (); + if (exc & (FPSR_EXCEPTION_SNAN|FPSR_EXCEPTION_OPERR)) + aexc |= FPSR_ACCR_IOP; + if (exc & FPSR_EXCEPTION_OVFL) + aexc |= FPSR_ACCR_OVFL; + if ((exc & (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) + == (FPSR_EXCEPTION_UNFL|FPSR_EXCEPTION_INEX2)) + aexc |= FPSR_ACCR_UNFL; + if (exc & FPSR_EXCEPTION_DZ) + aexc |= FPSR_ACCR_DZ; + if (exc & (FPSR_EXCEPTION_INEX1|FPSR_EXCEPTION_INEX2|FPSR_EXCEPTION_OVFL)) + aexc |= FPSR_ACCR_INEX; + set_accrued_exception (aexc); + + if ((fpu.fpcr & exc) != 0) + { + fpu.instruction_address = cur_instruction_address; + // TODO: raise exceptions + // Problem: FPSP040 depends on proper FPU stack frames, it would suffer + // undefined behaviour with our dummy FSAVE implementation + } +} + +static void +set_fp_register (int reg, mpfr_t value, uae_u64 nan_bits, int nan_sign, + int t, mpfr_rnd_t rnd, bool do_flags) +{ + mpfr_subnormalize (value, t, rnd); + mpfr_set (fpu.registers[reg].f, value, rnd); + fpu.registers[reg].nan_bits = nan_bits; + fpu.registers[reg].nan_sign = nan_sign; + if (do_flags) + { + uae_u32 flags = 0; + + if (mpfr_zero_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_ZERO; + if (mpfr_signbit (fpu.registers[reg].f)) + flags |= FPSR_CCB_NEGATIVE; + if (mpfr_nan_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_NAN; + if (mpfr_inf_p (fpu.registers[reg].f)) + flags |= FPSR_CCB_INFINITY; + set_fpccr (flags); + } +} + +static void +set_fp_register (int reg, mpfr_t value, int t, mpfr_rnd_t rnd, bool do_flags) +{ + set_fp_register (reg, value, DEFAULT_NAN_BITS, 0, t, rnd, do_flags); +} + +static void +set_fp_register (int reg, fpu_register &value, int t, mpfr_rnd_t rnd, + bool do_flags) +{ + set_fp_register (reg, value.f, value.nan_bits, value.nan_sign, t, rnd, + do_flags); +} + +static uae_u32 +extract_to_single (fpu_register &value) +{ + uae_u32 word; + int t; + mpfr_rnd_t rnd = get_cur_rnd (); + MPFR_DECL_INIT (single, SINGLE_PREC); + + set_format (SINGLE_PREC); + // Round to single + t = mpfr_set (single, value.f, rnd); + t = mpfr_check_range (single, t, rnd); + mpfr_subnormalize (single, t, rnd); + set_format (EXTENDED_PREC); + + if (mpfr_inf_p (single)) + word = 0x7f800000; + else if (mpfr_nan_p (single)) + { + if ((value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + word = 0x7f800000 | ((value.nan_bits >> (32 + 8)) & 0x7fffff); + if (value.nan_sign) + word |= 0x80000000; + } + else if (mpfr_zero_p (single)) + word = 0; + else + { + int e; + mpz_t f; + mpz_init (f); + word = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, single); + // Move binary point + e += SINGLE_PREC - 1; + // Add bias + e += SINGLE_BIAS; + if (e <= 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e + 1); + e = 0; + } + mpz_export (&word, 0, 1, 4, 0, 0, f); + // Remove integer bit + word &= 0x7fffff; + word |= e << 23; + mpz_clear (f); + } + if (mpfr_signbit (single)) + word |= 0x80000000; + return word; +} + +static void +extract_to_double (fpu_register &value, uint32_t *words) +{ + int t; + mpfr_rnd_t rnd = get_cur_rnd (); + MPFR_DECL_INIT (dbl, DOUBLE_PREC); + + set_format (DOUBLE_PREC); + // Round to double + t = mpfr_set (dbl, value.f, rnd); + t = mpfr_check_range (dbl, t, rnd); + mpfr_subnormalize (dbl, t, rnd); + set_format (EXTENDED_PREC); + + if (mpfr_inf_p (dbl)) + { + words[0] = 0x7ff00000; + words[1] = 0; + } + else if (mpfr_nan_p (dbl)) + { + if ((value.nan_bits & (1ULL << 62)) == 0) + { + value.nan_bits |= 1ULL << 62; + cur_exceptions |= FPSR_EXCEPTION_SNAN; + } + words[0] = 0x7ff00000 | ((value.nan_bits >> (32 + 11)) & 0xfffff); + words[1] = value.nan_bits >> 11; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (dbl)) + { + words[0] = 0; + words[1] = 0; + } + else + { + int e, off = 0; + mpz_t f; + mpz_init (f); + words[0] = words[1] = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, dbl); + // Move binary point + e += DOUBLE_PREC - 1; + // Add bias + e += DOUBLE_BIAS; + if (e <= 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e + 1); + if (e <= -20) + // No more than 32 bits left + off = 1; + e = 0; + } + mpz_export (&words[off], 0, 1, 4, 0, 0, f); + // Remove integer bit + words[0] &= 0xfffff; + words[0] |= e << 20; + mpz_clear (f); + } + if (mpfr_signbit (dbl)) + words[0] |= 0x80000000; +} + +static void +extract_to_extended (fpu_register &value, uint32_t *words) +{ + if (mpfr_inf_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = 0; + words[2] = 0; + } + else if (mpfr_nan_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = value.nan_bits >> 32; + words[2] = value.nan_bits; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (value.f)) + { + words[0] = 0; + words[1] = 0; + words[2] = 0; + } + else + { + int e, off = 0; + mpz_t f; + + mpz_init (f); + words[0] = words[1] = words[2] = 0; + // Get exponent and mantissa + e = mpfr_get_z_2exp (f, value.f); + // Move binary point + e += EXTENDED_PREC - 1; + // Add bias + e += EXTENDED_BIAS; + if (e < 0) + { + // Denormalized number + mpz_tdiv_q_2exp (f, f, -e); + if (e <= -32) + // No more than 32 bits left + off = 1; + e = 0; + } + mpz_export (&words[1 + off], 0, 1, 4, 0, 0, f); + words[0] = e << 16; + mpz_clear (f); + } + if (mpfr_signbit (value.f)) + words[0] |= 0x80000000; +} + +static void +extract_to_packed (fpu_register &value, int k, uae_u32 *words) +{ + if (mpfr_inf_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = 0; + words[2] = 0; + } + else if (mpfr_nan_p (value.f)) + { + words[0] = 0x7fff0000; + words[1] = value.nan_bits >> 32; + words[2] = value.nan_bits; + if (value.nan_sign) + words[0] |= 0x80000000; + } + else if (mpfr_zero_p (value.f)) + { + words[0] = 0; + words[1] = 0; + words[2] = 0; + } + else + { + char str[100], *p = str; + mpfr_exp_t e; + mpfr_rnd_t rnd = get_cur_rnd (); + + words[0] = words[1] = words[2] = 0; + if (k >= 64) + k -= 128; + else if (k >= 18) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + if (k <= 0) + { + MPFR_DECL_INIT (temp, 16); + + mpfr_log10 (temp, value.f, rnd); + k = mpfr_get_si (temp, MPFR_RNDZ) - k + 1; + } + if (k <= 0) + k = 1; + else if (k >= 18) + k = 17; + mpfr_get_str (str, &e, 10, k, value.f, rnd); + e--; + if (*p == '-') + p++; + // Pad to 17 digits + while (k < 17) + p[k++] = '0'; + if (e < 0) + { + words[0] |= 0x40000000; + e = -e; + } + words[0] |= (e % 10) << 16; + e /= 10; + words[0] |= (e % 10) << 20; + e /= 10; + words[0] |= (e % 10) << 24; + e /= 10; + if (e) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + words[0] |= e << 12; + words[0] |= *p++ & 15; + for (k = 0; k < 8; k++) + words[1] = (words[1] << 4) | (*p++ & 15); + for (k = 0; k < 8; k++) + words[2] = (words[2] << 4) | (*p++ & 15); + + } + if (mpfr_signbit (value.f)) + words[0] |= 0x80000000; +} + +static long +extract_to_integer (mpfr_t value, long min, long max) +{ + long result; + mpfr_rnd_t rnd = get_cur_rnd (); + + if (mpfr_fits_slong_p (value, rnd)) + { + result = mpfr_get_si (value, rnd); + if (result > max) + { + result = max; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (result < min) + { + result = min; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + } + else + { + if (!mpfr_signbit (value)) + result = max; + else + result = min; + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + return result; +} + +static bool +fpuop_fmove_memory (uae_u32 opcode, uae_u32 extra) +{ + int mode, reg, size; + uaecptr pc; + uae_u32 addr; + uae_u32 words[3]; + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + mpfr_clear_flags (); + cur_exceptions = 0; + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + fpu_register &value = fpu.registers[(extra >> 7) & 7]; + + switch (mode) + { + case 0: + switch (size) + { + case 0: + m68k_dreg (regs, reg) = extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff); + break; + case 1: + m68k_dreg (regs, reg) = extract_to_single (value); + break; + case 4: + m68k_dreg (regs, reg) &= ~0xffff; + m68k_dreg (regs, reg) |= extract_to_integer (value.f, -32768, 32767) & 0xffff; + break; + case 6: + m68k_dreg (regs, reg) &= ~0xff; + m68k_dreg (regs, reg) |= extract_to_integer (value.f, -128, 127) & 0xff; + break; + default: + return false; + } + update_exceptions (); + return true; + case 1: + return false; + case 2: + addr = m68k_areg (regs, reg); + break; + case 3: + addr = m68k_areg (regs, reg); + break; + case 4: + addr = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); + break; + case 5: + addr = m68k_areg (regs, reg) + (uae_s16) next_iword(); + break; + case 6: + addr = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) + { + case 0: + addr = (uae_s16) next_iword(); + break; + case 1: + addr = next_ilong(); + break; + case 2: + pc = m68k_getpc (); + addr = pc + (uae_s16) next_iword(); + break; + case 3: + pc = m68k_getpc (); + addr = get_disp_ea_020 (pc, next_iword ()); + break; + case 4: + addr = m68k_getpc (); + m68k_incpc (sz2[size]); + break; + default: + return false; + } + } + + switch (size) + { + case 0: + put_long (addr, extract_to_integer (value.f, -0x7fffffff-1, 0x7fffffff)); + break; + case 1: + put_long (addr, extract_to_single (value)); + break; + case 2: + extract_to_extended (value, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + case 3: + extract_to_packed (value, extra & 0x7f, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + case 4: + put_word (addr, extract_to_integer (value.f, -32768, 32767)); + break; + case 5: + extract_to_double (value, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + break; + case 6: + put_byte (addr, extract_to_integer (value.f, -128, 127)); + break; + case 7: + extract_to_packed (value, m68k_dreg (regs, (extra >> 4) & 7) & 0x7f, words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + break; + } + + switch (mode) + { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + + update_exceptions (); + return true; +} + +static bool +fpuop_fmovem_control (uae_u32 opcode, uae_u32 extra) +{ + int list, mode, reg; + uae_u32 addr; + + list = (extra >> 10) & 7; + mode = (opcode >> 3) & 7; + reg = opcode & 7; + + if (list == 0) + return false; + + if (extra & 0x2000) + { + // FMOVEM to + if (mode == 0) + { + switch (list) + { + case 1: + m68k_dreg (regs, reg) = fpu.instruction_address; + break; + case 2: + m68k_dreg (regs, reg) = get_fpsr (); + break; + case 4: + m68k_dreg (regs, reg) = get_fpcr (); + break; + default: + return false; + } + } + else if (mode == 1) + { + if (list != 1) + return false; + m68k_areg (regs, reg) = fpu.instruction_address; + } + else + { + int nwords; + + if (!get_fp_addr (opcode, &addr, true)) + return false; + nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); + if (mode == 4) + addr -= nwords * 4; + if (list & 4) + { + put_long (addr, get_fpcr ()); + addr += 4; + } + if (list & 2) + { + put_long (addr, get_fpsr ()); + addr += 4; + } + if (list & 1) + { + put_long (addr, fpu.instruction_address); + addr += 4; + } + if (mode == 4) + m68k_areg (regs, reg) = addr - nwords * 4; + else if (mode == 3) + m68k_areg (regs, reg) = addr; + } + } + else + { + // FMOVEM from + + if (mode == 0) + { + switch (list) + { + case 1: + fpu.instruction_address = m68k_dreg (regs, reg); + break; + case 2: + set_fpsr (m68k_dreg (regs, reg)); + break; + case 4: + set_fpcr (m68k_dreg (regs, reg)); + break; + default: + return false; + } + } + else if (mode == 1) + { + if (list != 1) + return false; + fpu.instruction_address = m68k_areg (regs, reg); + } + else if ((opcode & 077) == 074) + { + switch (list) + { + case 1: + fpu.instruction_address = next_ilong (); + break; + case 2: + set_fpsr (next_ilong ()); + break; + case 4: + set_fpcr (next_ilong ()); + break; + default: + return false; + } + } + else + { + int nwords; + + if (!get_fp_addr (opcode, &addr, false)) + return false; + nwords = (list & 1) + ((list >> 1) & 1) + ((list >> 2) & 1); + if (mode == 4) + addr -= nwords * 4; + if (list & 4) + { + set_fpcr (get_long (addr)); + addr += 4; + } + if (list & 2) + { + set_fpsr (get_long (addr)); + addr += 4; + } + if (list & 1) + { + fpu.instruction_address = get_long (addr); + addr += 4; + } + if (mode == 4) + m68k_areg (regs, reg) = addr - nwords * 4; + else if (mode == 3) + m68k_areg (regs, reg) = addr; + } + } + + return true; +} + +static bool +fpuop_fmovem_register (uae_u32 opcode, uae_u32 extra) +{ + uae_u32 addr; + uae_u32 words[3]; + int list; + int i; + + set_format (EXTENDED_PREC); + if (!get_fp_addr (opcode, &addr, extra & 0x2000)) + return false; + if (extra & 0x800) + list = m68k_dreg (regs, (extra >> 4) & 7) & 0xff; + else + list = extra & 0xff; + + if (extra & 0x2000) + { + // FMOVEM to memory + + switch (opcode & 070) + { + case 030: + return false; + case 040: + if (extra & 0x1000) + return false; + for (i = 7; i >= 0; i--) + if (list & (1 << i)) + { + extract_to_extended (fpu.registers[i], words); + addr -= 12; + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + } + m68k_areg (regs, opcode & 7) = addr; + break; + default: + if ((extra & 0x1000) == 0) + return false; + for (i = 0; i < 8; i++) + if (list & (0x80 >> i)) + { + extract_to_extended (fpu.registers[i], words); + put_long (addr, words[0]); + put_long (addr + 4, words[1]); + put_long (addr + 8, words[2]); + addr += 12; + } + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; + break; + } + } + else + { + // FMOVEM from memory + + if ((opcode & 070) == 040) + return false; + + if ((extra & 0x1000) == 0) + return false; + for (i = 0; i < 8; i++) + if (list & (0x80 >> i)) + { + words[0] = get_long (addr); + words[1] = get_long (addr + 4); + words[2] = get_long (addr + 8); + addr += 12; + set_from_extended (fpu.registers[i], words, false); + } + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; + } + return true; +} + +static int +do_getexp (mpfr_t value, mpfr_rnd_t rnd) +{ + int t = 0; + + if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) + t = mpfr_set_si (value, mpfr_get_exp (value) - 1, rnd); + return t; +} + +static int +do_getman (mpfr_t value) +{ + if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (!mpfr_nan_p (value) && !mpfr_zero_p (value)) + mpfr_set_exp (value, 1); + return 0; +} + +static int +do_scale (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + long scale; + int t = 0; + + if (mpfr_nan_p (value)) + ; + else if (mpfr_inf_p (value)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_fits_slong_p (value, rnd)) + { + scale = mpfr_get_si (value, MPFR_RNDZ); + mpfr_clear_inexflag (); + t = mpfr_mul_2si (value, reg, scale, rnd); + } + else + mpfr_set_inf (value, -mpfr_signbit (value)); + return t; +} + +static int +do_remainder (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + long quo; + int t = 0; + + if (mpfr_nan_p (value) || mpfr_nan_p (reg)) + ; + else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_remquo (value, &quo, reg, value, rnd); + if (quo < 0) + quo = (-quo & 0x7f) | 0x80; + else + quo &= 0x7f; + fpu.fpsr.quotient = quo << 16; + return t; +} + +// Unfortunately, mpfr_fmod does not return the quotient bits, so we +// have to reimplement it here +static int +mpfr_rem1 (mpfr_t rem, int *quo, mpfr_t x, mpfr_t y, mpfr_rnd_t rnd) +{ + mpfr_exp_t ex, ey; + int inex, sign, signx = mpfr_signbit (x); + mpz_t mx, my, r; + + mpz_init (mx); + mpz_init (my); + mpz_init (r); + + ex = mpfr_get_z_2exp (mx, x); /* x = mx*2^ex */ + ey = mpfr_get_z_2exp (my, y); /* y = my*2^ey */ + + /* to get rid of sign problems, we compute it separately: + quo(-x,-y) = quo(x,y), rem(-x,-y) = -rem(x,y) + quo(-x,y) = -quo(x,y), rem(-x,y) = -rem(x,y) + thus quo = sign(x/y)*quo(|x|,|y|), rem = sign(x)*rem(|x|,|y|) */ + sign = (signx != mpfr_signbit (y)); + mpz_abs (mx, mx); + mpz_abs (my, my); + + /* divide my by 2^k if possible to make operations mod my easier */ + { + unsigned long k = mpz_scan1 (my, 0); + ey += k; + mpz_fdiv_q_2exp (my, my, k); + } + + if (ex <= ey) + { + /* q = x/y = mx/(my*2^(ey-ex)) */ + mpz_mul_2exp (my, my, ey - ex); /* divide mx by my*2^(ey-ex) */ + /* 0 <= |r| <= |my|, r has the same sign as mx */ + mpz_tdiv_qr (mx, r, mx, my); + /* mx is the quotient */ + mpz_tdiv_r_2exp (mx, mx, 7); + *quo = mpz_get_si (mx); + } + else /* ex > ey */ + { + /* to get the low 7 more bits of the quotient, we first compute + R = X mod Y*2^7, where X and Y are defined below. Then the + low 7 of the quotient are floor(R/Y). */ + mpz_mul_2exp (my, my, 7); /* 2^7*Y */ + + mpz_set_ui (r, 2); + mpz_powm_ui (r, r, ex - ey, my); /* 2^(ex-ey) mod my */ + mpz_mul (r, r, mx); + mpz_mod (r, r, my); + + /* now 0 <= r < 2^7*Y */ + mpz_fdiv_q_2exp (my, my, 7); /* back to Y */ + mpz_tdiv_qr (mx, r, r, my); + /* oldr = mx*my + newr */ + *quo = mpz_get_si (mx); + + /* now 0 <= |r| < |my| */ + } + + if (mpz_cmp_ui (r, 0) == 0) + { + inex = mpfr_set_ui (rem, 0, MPFR_RNDN); + /* take into account sign of x */ + if (signx) + mpfr_neg (rem, rem, MPFR_RNDN); + } + else + { + /* take into account sign of x */ + if (signx) + mpz_neg (r, r); + inex = mpfr_set_z_2exp (rem, r, ex > ey ? ey : ex, rnd); + } + + if (sign) + *quo |= 0x80; + + mpz_clear (mx); + mpz_clear (my); + mpz_clear (r); + + return inex; +} + +static int +do_fmod (mpfr_t value, mpfr_t reg, mpfr_rnd_t rnd) +{ + int t = 0; + + if (mpfr_nan_p (value) || mpfr_nan_p (reg)) + mpfr_set_nan (value); + else if (mpfr_zero_p (value) || mpfr_inf_p (reg)) + { + mpfr_set_nan (value); + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_zero_p (reg) || mpfr_inf_p (value)) + { + fpu.fpsr.quotient = 0; + t = mpfr_set (value, reg, rnd); + } + else + { + int quo; + + t = mpfr_rem1 (value, &quo, reg, value, rnd); + fpu.fpsr.quotient = quo << 16; + } + return t; +} + +static void +do_fcmp (mpfr_t source, mpfr_t dest) +{ + uae_u32 flags = 0; + + if (mpfr_nan_p (source) || mpfr_nan_p (dest)) + flags |= FPSR_CCB_NAN; + else + { + int cmp = mpfr_cmp (dest, source); + if (cmp < 0) + flags |= FPSR_CCB_NEGATIVE; + else if (cmp == 0) + { + flags |= FPSR_CCB_ZERO; + if ((mpfr_zero_p (dest) || mpfr_inf_p (dest)) && mpfr_signbit (dest)) + flags |= FPSR_CCB_NEGATIVE; + } + } + set_fpccr (flags); +} + +static void +do_ftst (mpfr_t value) +{ + uae_u32 flags = 0; + + if (mpfr_signbit (value)) + flags |= FPSR_CCB_NEGATIVE; + if (mpfr_nan_p (value)) + flags |= FPSR_CCB_NAN; + else if (mpfr_zero_p (value)) + flags |= FPSR_CCB_ZERO; + else if (mpfr_inf_p (value)) + flags |= FPSR_CCB_INFINITY; + set_fpccr (flags); +} + +static bool +fpuop_general (uae_u32 opcode, uae_u32 extra) +{ + mpfr_prec_t prec = get_cur_prec (); + mpfr_rnd_t rnd = get_cur_rnd (); + int reg = (extra >> 7) & 7; + int t = 0; + fpu_register value; + bool ret; + + mpfr_init2 (value.f, prec); + value.nan_bits = DEFAULT_NAN_BITS; + value.nan_sign = 0; + + mpfr_clear_flags (); + set_format (prec); + cur_exceptions = 0; + cur_instruction_address = m68k_getpc () - 4; + if ((extra & 0xfc00) == 0x5c00) + { + // FMOVECR + int rom_index = extra & 0x7f; + if (rom_index == 0 || (rom_index >= 11 && rom_index <= 15)) + t = mpfr_set (value.f, fpu_constant_rom[rom_index], rnd); + else if (rom_index >= 48 && rom_index <= 63) + t = mpfr_set (value.f, fpu_constant_rom[rom_index - 32], rnd); + else + mpfr_set_zero (value.f, 0); + set_fp_register (reg, value, t, rnd, true); + } + else if (extra & 0x40) + { + static const char valid[64] = + { + 1, 1, 0, 0, 1, 1, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, + 1, 0, 1, 0, 1, 0, 1, 0, + 1, 0, 1, 1, 1, 0, 1, 1, + 1, 0, 0, 0, 1, 0, 0, 0 + }; + + if (extra & 4) + // FD... + prec = DOUBLE_PREC; + else + // FS... + prec = SINGLE_PREC; + set_format (prec); + MPFR_DECL_INIT (value2, prec); + + if (!fpu.is_integral) + { + ret = false; + goto out; + } + if (!valid[extra & 0x3b]) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + switch (extra & 0x3f) + { + case 0: // FSMOVE + case 4: // FDMOVE + mpfr_set (value2, value.f, rnd); + break; + case 1: // FSSQRT + case 5: // FDSQRT + if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sqrt (value2, value.f, rnd); + break; + case 24: // FSABS + case 28: // FDABS + t = mpfr_abs (value2, value.f, rnd); + break; + case 26: // FSNEG + case 30: // FDNEG + t = mpfr_neg (value2, value.f, rnd); + break; + case 32: // FSDIV + case 36: // FDDIV + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 34: // FSADD + case 38: // FDADD + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_add (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 35: // FSMUL + case 39: // FDMUL + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); + break; + case 40: // FSSUB + case 44: // FDSUB + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sub (value2, fpu.registers[reg].f, value.f, rnd); + break; + } + set_fp_register (reg, value2, t, rnd, true); + } + else if ((extra & 0x30) == 0x30) + { + if ((extra & 15) > 10 || (extra & 15) == 9) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + if ((extra & 15) < 8) + { + // FSINCOS + int reg2 = extra & 7; + MPFR_DECL_INIT (value2, prec); + + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sin_cos (value.f, value2, value.f, rnd); + if (reg2 != reg) + set_fp_register (reg2, value2, t >> 2, rnd, false); + set_fp_register (reg, value, t & 3, rnd, true); + } + else if ((extra & 15) == 8) + // FCMP + do_fcmp (value.f, fpu.registers[reg].f); + else + // FTST + do_ftst (value.f); + } + else + { + static const char valid[64] = + { + 1, 1, 1, 1, 1, 0, 1, 0, + 1, 1, 1, 0, 1, 1, 1, 1, + 1, 1, 1, 0, 1, 1, 1, 0, + 1, 1, 1, 0, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, + 1 + }; + if (!valid[extra & 0x3f]) + { + ret = false; + goto out; + } + if (!get_fp_value (opcode, extra, value)) + { + ret = false; + goto out; + } + + switch (extra & 0x3f) + { + case 0: // FMOVE + break; + case 1: // FINT + t = mpfr_rint (value.f, value.f, rnd); + break; + case 2: // FSINH + t = mpfr_sinh (value.f, value.f, rnd); + break; + case 3: // FINTRZ + t = mpfr_rint (value.f, value.f, MPFR_RNDZ); + break; + case 4: // FSQRT + if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sqrt (value.f, value.f, rnd); + break; + case 6: // FLOGNP1 + if (!mpfr_nan_p (value.f)) + { + int cmp = mpfr_cmp_si (value.f, -1); + if (cmp == 0) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (cmp < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + t = mpfr_log1p (value.f, value.f, rnd); + break; + case 8: // FETOXM1 + t = mpfr_expm1 (value.f, value.f, rnd); + break; + case 9: // FTANH + t = mpfr_tanh (value.f, value.f, rnd); + break; + case 10: // FATAN + t = mpfr_atan (value.f, value.f, rnd); + break; + case 12: // FASIN + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_asin (value.f, value.f, rnd); + break; + case 13: // FATANH + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_atanh (value.f, value.f, rnd); + break; + case 14: // FSIN + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sin (value.f, value.f, rnd); + break; + case 15: // FTAN + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_tan (value.f, value.f, rnd); + break; + case 16: // FETOX + t = mpfr_exp (value.f, value.f, rnd); + break; + case 17: // FTWOTOX + t = mpfr_ui_pow (value.f, 2, value.f, rnd); + break; + case 18: // FTENTOX + t = mpfr_ui_pow (value.f, 10, value.f, rnd); + break; + case 20: // FLOGN + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log (value.f, value.f, rnd); + break; + case 21: // FLOG10 + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log10 (value.f, value.f, rnd); + break; + case 22: // FLOG2 + if (mpfr_zero_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_sgn (value.f) < 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_log2 (value.f, value.f, rnd); + break; + case 24: // FABS + t = mpfr_abs (value.f, value.f, rnd); + value.nan_sign = 0; + break; + case 25: // FCOSH + t = mpfr_cosh (value.f, value.f, rnd); + break; + case 26: // FNEG + t = mpfr_neg (value.f, value.f, rnd); + value.nan_sign = !value.nan_sign; + break; + case 28: // FACOS + if (mpfr_cmpabs (value.f, FPU_CONSTANT_ONE) > 0) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_acos (value.f, value.f, rnd); + break; + case 29: // FCOS + if (mpfr_inf_p (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_cos (value.f, value.f, rnd); + break; + case 30: // FGETEXP + t = do_getexp (value.f, rnd); + break; + case 31: // FGETMAN + t = do_getman (value.f); + break; + case 32: // FDIV + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 33: // FMOD + t = do_fmod (value.f, fpu.registers[reg].f, rnd); + break; + case 34: // FADD + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) != mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_add (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 35: // FMUL + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value.f, fpu.registers[reg].f, value.f, rnd); + break; + case 36: // FSGLDIV + { + MPFR_DECL_INIT (value2, SINGLE_PREC); + + set_format (SINGLE_PREC); + if (mpfr_zero_p (value.f)) + { + if (mpfr_regular_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_DZ; + else if (mpfr_zero_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + } + else if (mpfr_inf_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_div (value2, fpu.registers[reg].f, value.f, rnd); + mpfr_set (value.f, value2, rnd); + } + break; + case 37: // FREM + t = do_remainder (value.f, fpu.registers[reg].f, rnd); + break; + case 38: // FSCALE + t = do_scale (value.f, fpu.registers[reg].f, rnd); + break; + case 39: // FSGLMUL + { + MPFR_DECL_INIT (value2, SINGLE_PREC); + + set_format (SINGLE_PREC); + if ((mpfr_zero_p (value.f) && mpfr_inf_p (fpu.registers[reg].f)) + || (mpfr_inf_p (value.f) && mpfr_zero_p (fpu.registers[reg].f))) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_mul (value2, fpu.registers[reg].f, value.f, rnd); + mpfr_set (value.f, value2, rnd); + } + break; + case 40: // FSUB + if (mpfr_inf_p (fpu.registers[reg].f) && mpfr_inf_p (value.f) + && mpfr_signbit (fpu.registers[reg].f) == mpfr_signbit (value.f)) + cur_exceptions |= FPSR_EXCEPTION_OPERR; + t = mpfr_sub (value.f, fpu.registers[reg].f, value.f, rnd); + break; + } + set_fp_register (reg, value, t, rnd, true); + } + update_exceptions (); + ret = true; + out: + mpfr_clear (value.f); + return ret; +} + +void +fpuop_arithmetic (uae_u32 opcode, uae_u32 extra) +{ + bool valid; + + switch ((extra >> 13) & 7) + { + case 3: + valid = fpuop_fmove_memory (opcode, extra); + break; + case 4: + case 5: + valid = fpuop_fmovem_control (opcode, extra); + break; + case 6: + case 7: + valid = fpuop_fmovem_register (opcode, extra); + break; + case 0: + case 2: + valid = fpuop_general (opcode, extra); + break; + default: + valid = false; + break; + } + + if (!valid) + { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } +} + +static bool +check_fp_cond (uae_u32 pred) +{ + uae_u32 fpcc = get_fpccr (); + + if ((pred & 16) != 0 && (fpcc & FPSR_CCB_NAN) != 0) + { + // IEEE non-aware test + set_exception_status (get_exception_status () | FPSR_EXCEPTION_BSUN); + set_accrued_exception (get_accrued_exception () | FPSR_ACCR_IOP); + } + + switch (pred & 15) + { + case 0: // F / SF + return false; + case 1: // EQ /SEQ + return (fpcc & FPSR_CCB_ZERO) != 0; + case 2: // OGT / GT + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) == 0; + case 3: // OGE / GE + return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NAN | FPSR_CCB_NEGATIVE)) == 0; + case 4: // OLT / LT + return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; + case 5: // OLE / LE + return (fpcc & FPSR_CCB_ZERO) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN)) == FPSR_CCB_NEGATIVE; + case 6: // OGL / GL + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) == 0; + case 7: // OR / GLE + return (fpcc & FPSR_CCB_NAN) == 0; + case 8: // UN / NGLE + return (fpcc & FPSR_CCB_NAN) != 0; + case 9: // UEQ / NGL + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO)) != 0; + case 10: // UGT / NLE + return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == 0; + case 11: // UGE / NLT + return (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_NAN | FPSR_CCB_ZERO)) != FPSR_CCB_NEGATIVE; + case 12: // ULT / NGE + return (fpcc & FPSR_CCB_NAN) != 0 || (fpcc & (FPSR_CCB_NEGATIVE | FPSR_CCB_ZERO)) == FPSR_CCB_NEGATIVE; + case 13: // ULE / NGT + return (fpcc & (FPSR_CCB_NAN | FPSR_CCB_ZERO | FPSR_CCB_NEGATIVE)) != 0; + case 14: // NE / SNE + return (fpcc & FPSR_CCB_ZERO) == 0; + case 15: // T / ST + return true; + default: + return false; + } +} + +void +fpuop_bcc (uae_u32 opcode, uaecptr pc, uae_u32 disp) +{ + if (check_fp_cond (opcode)) + { + if (!(opcode & (1 << 6))) + disp = (uae_s16) disp; + m68k_setpc (pc + disp); + } +} + +void +fpuop_scc (uae_u32 opcode, uae_u32 extra) +{ + uae_u32 addr; + int value = check_fp_cond (extra) ? 0xff : 0; + if ((opcode & 070) == 0) + { + int reg = opcode & 7; + m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xff) | value; + } + else if (!get_fp_addr (opcode, &addr, true)) + { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + { + switch (opcode & 070) + { + case 030: + m68k_areg (regs, opcode & 7) += (opcode & 7) == 7 ? 2 : 1; + break; + case 040: + addr -= (opcode & 7) == 7 ? 2 : 1; + m68k_areg (regs, opcode & 7) = addr; + } + put_byte (addr, value); + } +} + +void +fpuop_dbcc (uae_u32 opcode, uae_u32 extra) +{ + uaecptr pc = m68k_getpc (); + uae_s16 disp = next_iword (); + + if (!check_fp_cond (extra)) + { + int reg = opcode & 7; + uae_u16 cnt = (m68k_dreg (regs, reg) & 0xffff) - 1; + m68k_dreg (regs, reg) = (m68k_dreg (regs, reg) & ~0xffff) | cnt; + if (cnt != 0xffff) + m68k_setpc (pc + disp); + } +} + +void +fpuop_trapcc (uae_u32, uaecptr oldpc, uae_u32 extra) +{ + if (check_fp_cond (extra)) + Exception (7, oldpc - 2); +} + +void +fpuop_save (uae_u32 opcode) +{ + uae_u32 addr; + + if ((opcode & 070) == 030 + || !get_fp_addr (opcode, &addr, true)) + { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (fpu.is_integral) + { + // 4 byte 68040 IDLE frame + // FIXME: generate proper FPU stack frames that does not result + // in undefined behaviour from FPSP040 + if ((opcode & 070) == 040) + { + addr -= 4; + m68k_areg (regs, opcode & 7) = addr; + } + put_long (addr, 0x41000000); + } + else + { + // 28 byte 68881 IDLE frame + if ((opcode & 070) == 040) + { + addr -= 28; + m68k_areg (regs, opcode & 7) = addr; + } + put_long (addr, 0x1f180000); + for (int i = 0; i < 6; i++) + { + addr += 4; + put_long (addr, 0); + } + } +} + +void +fpuop_restore (uae_u32 opcode) +{ + uae_u32 addr; + uae_u32 format; + + if ((opcode & 070) == 040 + || !get_fp_addr (opcode, &addr, false)) + { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + format = get_long (addr); + addr += 4; + if ((format & 0xff000000) == 0) + // NULL frame + fpu_reset (); + else + addr += (format & 0xff0000) >> 16; + if ((opcode & 070) == 030) + m68k_areg (regs, opcode & 7) = addr; +} + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp index ffc784a5b..ca4b841d4 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp @@ -1,31 +1,42 @@ /* - * fpu/fpu_uae.cpp + * fpu/fpu_uae.cpp - the old UAE FPU * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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. + * MC68881/68040 fpu emulation * - * 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. + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 * - * 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 + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - /* + * UAE - The Un*x Amiga Emulator + * + * MC68881 emulation + * + * Copyright 1996 Herman ten Brugge + * + * * Following fixes by Lauri Pesonen, July 1999: * * FMOVEM list handling: @@ -86,9 +97,8 @@ * - Precision rounding single/double */ + #include "sysdeps.h" -#include -#include #include "memory.h" #include "readcpu.h" #include "newcpu.h" @@ -97,6 +107,17 @@ #include "fpu/fpu.h" #include "fpu/fpu_uae.h" +#ifdef HAVE_NEW_HEADERS +#define _GLIBCPP_USE_C99 1 +# include +# include +using namespace __gnu_cxx; +#undef _GLIBCPP_USE_C99 +#else +# include +# include +#endif + /* Global FPU context */ fpu_t fpu; @@ -166,8 +187,8 @@ PUBLIC void FFPU dump_registers(const char * str) sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", str, - get_register(0), get_register(1), get_register(2), get_register(3), - get_register(4), get_register(5), get_register(6), get_register(7) ); + fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), fpu_get_register(3), + fpu_get_register(4), fpu_get_register(5), fpu_get_register(6), fpu_get_register(7) ); fpu_debug((temp_str)); } @@ -195,9 +216,7 @@ PUBLIC void FFPU dump_registers(const char *) { } -PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) -{ -} +#define dump_first_bytes(a,b) #endif @@ -219,10 +238,10 @@ PRIVATE inline fpu_register FFPU round_to_nearest(fpu_register const & x) PRIVATE inline bool FFPU do_isnan(fpu_register const & r) { - uae_u32 * p = (uae_u32 *)&r; - if ((p[FHI] & 0x7FF00000) == 0x7FF00000) { + fpu_register_parts const p = { r }; + if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000) { // logical or is faster here. - if ((p[FHI] & 0x000FFFFF) || p[FLO]) { + if ((p.parts[FHI] & 0x000FFFFF) || p.parts[FLO]) { return true; } } @@ -235,8 +254,8 @@ PRIVATE inline bool FFPU do_isnan(fpu_register const & r) PRIVATE inline bool FFPU do_isinf(fpu_register const & r) { - uae_u32 * p = (uae_u32 *)&r; - if (((p[FHI] & 0x7FF00000) == 0x7FF00000) && p[FLO] == 0) { + fpu_register_parts const p = { r }; + if ((p.parts[FHI] & 0x7FF00000) == 0x7FF00000 && p.parts[FLO] == 0) { return true; } return false; @@ -248,8 +267,8 @@ PRIVATE inline bool FFPU do_isinf(fpu_register const & r) PRIVATE inline bool FFPU do_isneg(fpu_register const & r) { - uae_u32 * p = (uae_u32 *)&r; - return ((p[FHI] & 0x80000000) != 0); + fpu_register_parts const p = { r }; + return ((p.parts[FHI] & 0x80000000) != 0); } #ifndef HAVE_ISZERO @@ -258,8 +277,8 @@ PRIVATE inline bool FFPU do_isneg(fpu_register const & r) PRIVATE inline bool FFPU do_iszero(fpu_register const & r) { - uae_u32 * p = (uae_u32 *)&r; - return (((p[FHI] & 0x7FF00000) == 0) && p[FLO] == 0); + fpu_register_parts const p = { r }; + return (((p.parts[FHI] & 0x7FF00000) == 0) && p.parts[FLO] == 0); } // May be optimized for particular processors @@ -293,77 +312,70 @@ PRIVATE inline void FFPU get_source_flags(fpu_register const & r) fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; } -PRIVATE inline void FFPU make_nan(fpu_register & r) +PRIVATE inline void FFPU make_nan(fpu_register & r, bool negative) { - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0xffffffff; - p[FHI] = 0x7fffffff; + fpu_register_parts p; + p.parts[FLO] = 0xffffffff; + p.parts[FHI] = negative ? 0xffffffff : 0x7fffffff; + r = p.val; } -PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +PRIVATE inline void FFPU make_zero(fpu_register & r, bool negative) { - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = p[FHI] = 0; + fpu_register_parts p; + p.parts[FLO] = 0; + p.parts[FHI] = negative ? 0x80000000 : 0; + r = p.val; } -PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +PRIVATE inline void FFPU make_inf(fpu_register & r, bool negative) { - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0x80000000; -} - -PRIVATE inline void FFPU make_inf_positive(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0x7FF00000; -} - -PRIVATE inline void FFPU make_inf_negative(fpu_register & r) -{ - uae_u32 * const p = (uae_u32 *)&r; - p[FLO] = 0; - p[FHI] = 0xFFF00000; + fpu_register_parts p; + p.parts[FLO] = 0; + p.parts[FHI] = negative ? 0xFFF00000 : 0x7FF00000; + r = p.val; } PRIVATE inline void FFPU fast_scale(fpu_register & r, int add) { - uae_u32 * const p = (uae_u32 *)&r; - int exp = (p[FHI] & 0x7FF00000) >> 20; + fpu_register_parts p = { r }; + int exp = (p.parts[FHI] & 0x7FF00000) >> 20; // TODO: overflow flags exp += add; if(exp >= 2047) { - make_inf_positive(r); + make_inf(r, false); + return; } else if(exp < 0) { // keep sign (+/- 0) - p[FHI] &= 0x80000000; + p.parts[FHI] &= 0x80000000; } else { - p[FHI] = (p[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); + p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); } + r = p.val; } PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) { - uae_u32 * const p = (uae_u32 *)&r; - int exp = (p[FHI] & 0x7FF00000) >> 20; + fpu_register_parts const p = { r }; + int exp = (p.parts[FHI] & 0x7FF00000) >> 20; return( exp - 1023 ); } // Normalize to range 1..2 PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) { - uae_u32 * const p = (uae_u32 *)&r; - p[FHI] = (p[FHI] & 0x800FFFFF) | 0x3FF00000; + fpu_register_parts p = { r }; + p.parts[FHI] = (p.parts[FHI] & 0x800FFFFF) | 0x3FF00000; + r = p.val; } // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) { - uae_u32 * const a = (uae_u32 *)&ra; - uae_u32 * const b = (uae_u32 *)&rb; - return (((a[FHI] ^ b[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); + fpu_register_parts const a = { ra }; + fpu_register_parts const b = { rb }; + return (((a.parts[FHI] ^ b.parts[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); } // Quotient Byte is loaded with the sign and least significant @@ -381,13 +393,15 @@ PRIVATE inline fpu_register FFPU make_single(uae_u32 value) return (0.0); fpu_register result; - uae_u32 * p = (uae_u32 *)&result; + fpu_register_parts p; uae_u32 sign = (value & 0x80000000); uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; - p[FLO] = value << 29; - p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + p.parts[FLO] = value << 29; + p.parts[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + + result = p.val; fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); @@ -401,10 +415,10 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) return 0; uae_u32 result; - uae_u32 *p = (uae_u32 *)&src; + fpu_register_parts const p = { src }; - uae_u32 sign = (p[FHI] & 0x80000000); - uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; + uae_u32 sign = (p.parts[FHI] & 0x80000000); + uae_u32 exp = (p.parts[FHI] & 0x7FF00000) >> 20; if(exp + 127 < 1023) { exp = 0; @@ -414,7 +428,7 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) exp = exp + 127 - 1023; } - result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); + result = sign | (exp << 23) | ((p.parts[FHI] & 0x000FFFFF) << 3) | (p.parts[FLO] >> 29); fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); @@ -428,8 +442,8 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u return 0.0; fpu_register result; - uae_u32 *p = (uae_u32 *)&result; - + fpu_register_parts p; + uae_u32 sign = wrd1 & 0x80000000; uae_u32 exp = (wrd1 >> 16) & 0x7fff; @@ -466,8 +480,10 @@ PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u } // drop the explicit integer bit. - p[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + result = p.val; fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); @@ -485,14 +501,14 @@ PRIVATE inline void FFPU make_extended_no_normalize( { // Is it zero? if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { - make_zero_positive(result); + make_zero(result, false); return; } // Is it NaN? if( (wrd1 & 0x7FFF0000) == 0x7FFF0000 ) { if( (wrd1 & 0x0000FFFF) || wrd2 || wrd3 ) { - make_nan(result); + make_nan(result, (wrd1 & 0x80000000) != 0); return; } } @@ -511,11 +527,13 @@ PRIVATE inline void FFPU make_extended_no_normalize( } // drop the explicit integer bit. - uae_u32 *p = (uae_u32 *)&result; - p[FLO] = (wrd2 << 21) | (wrd3 >> 11); - p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + fpu_register_parts p; + p.parts[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p.parts[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + result = p.val; - fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(float)(*(double *)p))); + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); } // from_exten @@ -527,14 +545,14 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = *wrd2 = *wrd3 = 0; return; } + + fpu_register_parts const p = { src }; - uae_u32 *p = (uae_u32 *)&src; - - fpu_debug(("extract_extended (%X,%X)\n",p[FLO],p[FHI])); + fpu_debug(("extract_extended (%X,%X)\n",p.parts[FLO],p.parts[FHI])); - uae_u32 sign = p[FHI] & 0x80000000; + uae_u32 sign = p.parts[FHI] & 0x80000000; - uae_u32 exp = ((p[FHI] >> 20) & 0x7ff); + uae_u32 exp = ((p.parts[FHI] >> 20) & 0x7ff); // Check for maximum if(exp == 0x7FF) { exp = 0x7FFF; @@ -544,8 +562,8 @@ PRIVATE inline void FFPU extract_extended(fpu_register const & src, *wrd1 = sign | (exp << 16); // always set the explicit integer bit. - *wrd2 = 0x80000000 | ((p[FHI] & 0x000FFFFF) << 11) | ((p[FLO] & 0xFFE00000) >> 21); - *wrd3 = p[FLO] << 11; + *wrd2 = 0x80000000 | ((p.parts[FHI] & 0x000FFFFF) << 11) | ((p.parts[FLO] & 0xFFE00000) >> 21); + *wrd3 = p.parts[FLO] << 11; fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); } @@ -557,9 +575,11 @@ PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) return 0.0; fpu_register result; - uae_u32 *p = (uae_u32 *)&result; - p[FLO] = wrd2; - p[FHI] = wrd1; + fpu_register_parts p; + p.parts[FLO] = wrd2; + p.parts[FHI] = wrd1; + + result = p.val; fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); @@ -577,9 +597,9 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, return; } */ - uae_u32 *p = (uae_u32 *)&src; - *wrd2 = p[FLO]; - *wrd1 = p[FHI]; + fpu_register_parts const p = { src }; + *wrd2 = p.parts[FLO]; + *wrd1 = p.parts[FHI]; fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); } @@ -590,8 +610,8 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, PRIVATE inline void FFPU make_fpsr(fpu_register const & r) { FPU fpsr.condition_codes - = ((r == 0.0) ? NATIVE_FFLAG_ZERO : 0) - | ((r < 0.0) ? NATIVE_FFLAG_NEGATIVE : 0) + = (iszero(r) ? NATIVE_FFLAG_ZERO : 0) + | (isneg(r) ? NATIVE_FFLAG_NEGATIVE : 0) ; } #endif @@ -622,25 +642,25 @@ PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) fpu_register src0 = src; #endif - if (src == 0.0) + if (src == 0.0) return 0; - if (src < 0) { + if (src < 0) { tmp = 0x80000000; src = -src; - } else { + } else { tmp = 0; - } - frac = frexp (src, &expon); - frac += 0.5 / 16777216.0; - if (frac >= 1.0) { + } + frac = frexp (src, &expon); + frac += 0.5 / 16777216.0; + if (frac >= 1.0) { frac /= 2.0; expon++; - } + } result = tmp | (((expon + 127 - 1) & 0xff) << 23) | (((int) (frac * 16777216.0)) & 0x7fffff); // fpu_debug(("extract_single (%.04f) = %X\n",(float)src0,result)); - return (result); + return (result); } // to exten @@ -895,11 +915,9 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe break; case 3: ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -940,8 +958,8 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); fpu_debug(("get_fp_value ad=%X\n",ad)); fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); - dump_first_bytes( get_real_address(ad)-64, 64 ); - dump_first_bytes( get_real_address(ad), 64 ); + dump_first_bytes( get_real_address(ad, 0, 0)-64, 64 ); + dump_first_bytes( get_real_address(ad, 0, 0), 64 ); switch (size) { case 0: @@ -988,6 +1006,15 @@ PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe return 0; } + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); return 1; } @@ -1204,7 +1231,7 @@ PRIVATE inline int FFPU fpp_cond(int condition) #if 0 return fpcctrue(condition); #else - switch (condition) { + switch (condition & 0x1f) { case 0x00: CONDRET("False",0); case 0x01: CONDRET("Equal",Z); case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); @@ -1299,11 +1326,11 @@ void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) put_byte(ad, cc ? 0xff : 0x00); } -void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) { - fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); + fpu_debug(("ftrapcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); - int cc = fpp_cond(opcode & 0x3f); + int cc = fpp_cond(extra & 0x3f); if (cc == -1) { m68k_setpc (oldpc); op_illg (opcode); @@ -1516,8 +1543,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) if ((opcode & 0x38) == 0) { if (extra & 0x2000) { // dr bit if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + m68k_dreg (regs, opcode & 7) = get_fpcr(); fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); } if (extra & 0x0800) { @@ -1548,8 +1574,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) else if ((opcode & 0x38) == 8) { if (extra & 0x2000) { // dr bit if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + m68k_areg (regs, opcode & 7) = get_fpcr(); fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); } if (extra & 0x0800) { @@ -1612,8 +1637,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) } ad -= incr; if (extra & 0x1000) { - // according to the manual, the msb bits are always zero. - put_long (ad, get_fpcr() & 0xFFFF); + put_long (ad, get_fpcr()); fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); ad += 4; } @@ -1906,6 +1930,8 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) FPU registers[reg] = 1.0e256; fpu_debug(("FP const: 1.0e256\n")); break; + + // Valid for 64 bits only (see fpu.cpp) #if 0 case 0x3c: FPU registers[reg] = 1.0e512; @@ -1942,7 +1968,114 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) return; } fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); +#if 0 // MJ added, not tested now + if (FPU is_integral) { + // 68040-specific operations + switch (extra & 0x7f) { + case 0x40: /* FSMOVE */ + fpu_debug(("FSMOVE %.04f\n",(double)src)); + FPU registers[reg] = (float)src; + make_fpsr(FPU registers[reg]); + break; + case 0x44: /* FDMOVE */ + fpu_debug(("FDMOVE %.04f\n",(double)src)); + FPU registers[reg] = (double)src; + make_fpsr(FPU registers[reg]); + break; + case 0x41: /* FSSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (float)sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x45: /* FDSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (double)sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x58: /* FSABS */ + fpu_debug(("FSABS %.04f\n",(double)src)); + FPU registers[reg] = (float)fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5c: /* FDABS */ + fpu_debug(("FDABS %.04f\n",(double)src)); + FPU registers[reg] = (double)fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5a: /* FSNEG */ + fpu_debug(("FSNEG %.04f\n",(double)src)); + FPU registers[reg] = (float)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x5e: /* FDNEG */ + fpu_debug(("FDNEG %.04f\n",(double)src)); + FPU registers[reg] = (double)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x60: /* FSDIV */ + fpu_debug(("FSDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x64: /* FDDIV */ + fpu_debug(("FDDIV %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x62: /* FSADD */ + fpu_debug(("FSADD %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x66: /* FDADD */ + fpu_debug(("FDADD %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x68: /* FSSUB */ + fpu_debug(("FSSUB %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x6c: /* FDSUB */ + fpu_debug(("FDSUB %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x63: /* FSMUL */ + case 0x67: /* FDMUL */ + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + if ((extra & 0x7f) == 0x63) + FPU registers[reg] = (float)(FPU registers[reg] * src); + else + FPU registers[reg] = (double)(FPU registers[reg] * src); + } + else if (fl_dest.nan || fl_source.nan || + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { + make_nan( FPU registers[reg], fl_dest.negative ); + } + else if (fl_dest.zero || fl_source.zero ) { + make_zero(FPU registers[reg], fl_dest.negative != fl_source.negative); + } + else { + make_inf(FPU registers[reg], fl_dest.negative != fl_source.negative); + } + make_fpsr(FPU registers[reg]); + break; + default: + // Continue decode-execute 6888x instructions below + goto process_6888x_instructions; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + process_6888x_instructions: +#endif switch (extra & 0x7f) { case 0x00: /* FMOVE */ fpu_debug(("FMOVE %.04f\n",(double)src)); @@ -1954,7 +2087,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FINT %.04f\n",(double)src)); // FPU registers[reg] = (int) (src + 0.5); // FIXME: use native rounding mode flags - switch (get_fpcr() & 0x30) { + switch (get_fpcr() & FPCR_ROUNDING_MODE) { case FPCR_ROUND_ZERO: FPU registers[reg] = round_to_zero(src); break; @@ -2075,7 +2208,10 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) break; case 0x1a: /* FNEG */ fpu_debug(("FNEG %.04f\n",(double)src)); - FPU registers[reg] = -src; + if (iszero(src)) + make_zero(FPU registers[reg], !isneg(src)); + else + FPU registers[reg] = -src; make_fpsr(FPU registers[reg]); break; case 0x1c: /* FACOS */ @@ -2092,7 +2228,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FGETEXP %.04f\n",(double)src)); #if FPU_HAVE_IEEE_DOUBLE if( isinf(src) ) { - make_nan( FPU registers[reg] ); + make_nan( FPU registers[reg], isneg(src) ); } else { FPU registers[reg] = fast_fgetexp( src ); @@ -2116,7 +2252,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) FPU registers[reg] = 0; } else if( isinf(src) ) { - make_nan( FPU registers[reg] ); + make_nan( FPU registers[reg], isneg(src) ); } else { FPU registers[reg] = src; @@ -2166,27 +2302,15 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) FPU registers[reg] *= src; } else if (fl_dest.nan || fl_source.nan || - fl_dest.zero && fl_source.infinity || - fl_dest.infinity && fl_source.zero ) { - make_nan( FPU registers[reg] ); + (fl_dest.zero && fl_source.infinity) || + (fl_dest.infinity && fl_source.zero) ) { + make_nan( FPU registers[reg], fl_dest.negative ); } else if (fl_dest.zero || fl_source.zero ) { - if (fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_zero_negative(FPU registers[reg]); - } - else { - make_zero_positive(FPU registers[reg]); - } + make_zero(FPU registers[reg], fl_dest.negative != fl_source.negative); } else { - if( fl_dest.negative && !fl_source.negative || - !fl_dest.negative && fl_source.negative) { - make_inf_negative(FPU registers[reg]); - } - else { - make_inf_positive(FPU registers[reg]); - } + make_inf(FPU registers[reg], fl_dest.negative != fl_source.negative); } #else fpu_debug(("FMUL %.04f\n",(double)src)); @@ -2223,8 +2347,8 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) // Overflow, underflow #if FPU_HAVE_IEEE_DOUBLE - if( isinf(FPU registers[reg]) ) { - make_nan( FPU registers[reg] ); + if( isinf(src) ) { + make_nan( FPU registers[reg], isneg(src) ); } else { // When the absolute value of the source operand is >= 2^14, @@ -2336,6 +2460,27 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) dump_registers( "END "); } + +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + /* -------------------------- Initialization -------------------------- */ void FFPU fpu_init (bool integral_68040) diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h index 7fc4ebbd9..822fc2207 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h @@ -1,28 +1,33 @@ /* - * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_UAE_H @@ -78,11 +83,9 @@ PRIVATE inline bool FFPU do_isinf(fpu_register const & r); PRIVATE inline bool FFPU do_isneg(fpu_register const & r); PRIVATE inline bool FFPU do_iszero(fpu_register const & r); -PRIVATE inline void FFPU make_nan(fpu_register & r); -PRIVATE inline void FFPU make_zero_positive(fpu_register & r); -PRIVATE inline void FFPU make_zero_negative(fpu_register & r); -PRIVATE inline void FFPU make_inf_positive(fpu_register & r); -PRIVATE inline void FFPU make_inf_negative(fpu_register & r); +PRIVATE inline void FFPU make_nan(fpu_register & r, bool negative); +PRIVATE inline void FFPU make_zero(fpu_register & r, bool negative); +PRIVATE inline void FFPU make_inf(fpu_register & r, bool negative); PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp index 70e590860..29af7ddb9 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp @@ -1,27 +1,33 @@ /* - * fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. + * fpu/fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * Based on UAE FPU, original copyright 1996 Herman ten Brugge, - * rewritten for x86 by Lauri Pesonen 1999-2000, - * accomodated to GCC's Extended Asm syntax by Gwenole Beauchesne 2000. + * MC68881/68040 fpu emulation * - * 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. + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 * - * 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. + * ARAnyM 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 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 + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * * Interface @@ -134,10 +140,8 @@ * */ -#include -#include -#include -#include +# include +# include #include "sysdeps.h" #include "memory.h" @@ -238,8 +242,6 @@ PUBLIC void FFPU fpu_dump_flags(void) #include "debug.h" #if FPU_DEBUG -#undef __inline__ -#define __inline__ PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual) { @@ -390,7 +392,7 @@ PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *) /* ---------------------------- Status functions ---------------------------- */ -PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN () +PRIVATE void inline FFPU SET_BSUN_ON_NAN () { if( (x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN ) { x86_status_word |= SW_FAKE_BSUN; @@ -398,7 +400,7 @@ PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN () } } -PRIVATE void __inline__ FFPU build_ex_status () +PRIVATE void inline FFPU build_ex_status () { if(x86_status_word & SW_EXCEPTION_MASK) { // _asm FNCLEX @@ -415,20 +417,20 @@ When the FPU creates a NAN, the NAN always contains the same bit pattern in the mantissa. All bits of the mantissa are ones for any precision. When the user creates a NAN, any nonzero bit pattern can be stored in the mantissa. */ -PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f) +PRIVATE inline void FFPU MAKE_NAN (fpu_register & f, bool negative) { // Make it non-signaling. uae_u8 * p = (uae_u8 *) &f; memset( p, 0xFF, sizeof(fpu_register) - 1 ); - p[9] = 0x7F; + p[9] = negative ? 0xff : 0x7F; } /* For single- and double-precision infinities the fraction is a zero. -For extended-precision infinities, the mantissa’s MSB, the explicit +For extended-precision infinities, the mantissa�s MSB, the explicit integer bit, can be either one or zero. */ -PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f) +PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { @@ -439,7 +441,7 @@ PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f) return(0); } -PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f) +PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { @@ -450,7 +452,7 @@ PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f) return(0); } -PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f) +PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; return *((uae_u32 *)p) == 0 && @@ -458,34 +460,34 @@ PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f) ( *((uae_u16 *)&p[8]) & 0x7FFF ) == 0; } -PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f) +PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f) { uae_u8 * p = (uae_u8 *) &f; memset( p, 0, sizeof(fpu_register)-2 ); *((uae_u16 *)&p[8]) = 0x7FFF; } -PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f) +PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f) { uae_u8 * p = (uae_u8 *) &f; memset( p, 0, sizeof(fpu_register)-2 ); *((uae_u16 *)&p[8]) = 0xFFFF; } -PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) +PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) { uae_u32 * const p = (uae_u32 *) &f; memset( p, 0, sizeof(fpu_register) ); } -PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) +PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) { uae_u32 * const p = (uae_u32 *) &f; memset( p, 0, sizeof(fpu_register) ); *((uae_u32 *)&p[4]) = 0x80000000; } -PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) +PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) { uae_u8 * p = (uae_u8 *) &f; return( (p[9] & 0x80) != 0 ); @@ -900,6 +902,34 @@ PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fmove"); } +PRIVATE void FFPU do_fsmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fsmove"); +} + +PRIVATE void FFPU do_fdmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fdmove"); +} + /* PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) { @@ -1023,6 +1053,50 @@ PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fsqrt"); } +PRIVATE void FFPU do_fssqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fssqrt"); +} + +PRIVATE void FFPU do_fdsqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdsqrt"); +} + PRIVATE void FFPU do_ftst ( fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1311,6 +1385,48 @@ PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fabs"); } +PRIVATE void FFPU do_fsabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsabs"); +} + +PRIVATE void FFPU do_fdabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdabs"); +} + PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1341,6 +1457,48 @@ PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fneg"); } +PRIVATE void FFPU do_fsneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsneg"); +} + +PRIVATE void FFPU do_fdneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdneg"); +} + PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1466,6 +1624,50 @@ PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fdiv"); } +PRIVATE void FFPU do_fsdiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsdiv"); +} + +PRIVATE void FFPU do_fddiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fddiv"); +} + // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. // Quotient Byte is loaded with the sign and least significant @@ -1851,6 +2053,48 @@ PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fadd"); } +PRIVATE void FFPU do_fsadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsadd"); +} + +PRIVATE void FFPU do_fdadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdadd"); +} + PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -1882,6 +2126,48 @@ PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fmul"); } +PRIVATE void FFPU do_fsmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsmul"); +} + +PRIVATE void FFPU do_fdmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdmul"); +} + PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -2040,6 +2326,52 @@ PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) FPU_CONSISTENCY_CHECK_STOP("do_fsub"); } +PRIVATE void FFPU do_fssub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fssub"); +} + +PRIVATE void FFPU do_fdsub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdsub"); +} + PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) { FPU_CONSISTENCY_CHECK_START(); @@ -2284,11 +2616,9 @@ PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src break; case 3: ad = m68k_areg (regs, reg); - m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; break; case 4: - m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; - ad = m68k_areg (regs, reg); + ad = m68k_areg (regs, reg) - (reg == 7 ? sz2[size] : sz1[size]); break; case 5: ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); @@ -2387,6 +2717,15 @@ PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src return 0; } + switch (mode) { + case 3: + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + break; + } + // D(bug("get_fp_value result = %.04f\r\n",(float)src)); return 1; @@ -2612,7 +2951,7 @@ PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) #define I ((x86_status_word & (SW_Z_I_NAN_MASK)) == (SW_I)) #define NotANumber ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN) - switch (condition) { + switch (condition & 0x1f) { // Common Tests, no BSUN case 0x01: CONDRET("Equal",Z); @@ -2757,11 +3096,11 @@ PUBLIC void REGPARAM2 FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) } } -PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc, uae_u32 extra) { int cc; - D(bug("ftrapcc_opp %X at %08lx\r\n", (uae_u32)opcode, m68k_getpc ())); + D(bug("ftrapcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); #if I3_ON_FTRAPCC #error "FIXME: _asm int 3" @@ -2769,7 +3108,7 @@ PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) #endif // This must be broken. - cc = fpp_cond(opcode, opcode & 0x3f); + cc = fpp_cond(opcode, extra & 0x3f); if (cc < 0) { m68k_setpc (oldpc); @@ -2856,7 +3195,7 @@ PRIVATE void FFPU do_null_frestore () { // A null-restore operation sets FP7-FP0 positive, nonsignaling NANs. for( int i=0; i<8; i++ ) { - MAKE_NAN( FPU registers[i] ); + MAKE_NAN( FPU registers[i], false ); } FPU instruction_address = 0; @@ -4646,6 +4985,249 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 } +/* -------------------------- 040 ALU -------------------------- */ +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMOVE %s\r\n",etos(src))); + do_fsmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDMOVE %s\r\n",etos(src))); + do_fdmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSSQRT %s\r\n",etos(src))); + do_fssqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDSQRT %s\r\n",etos(src))); + do_fdsqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSABS %s\r\n",etos(src))); + do_fsabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDABS %s\r\n",etos(src))); + do_fdabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSNEG %s\r\n",etos(src))); + do_fsneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDNEG %s\r\n",etos(src))); + do_fdneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSDIV %s\r\n",etos(src))); + do_fsdiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDDIV %s\r\n",etos(src))); + do_fddiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSADD %s\r\n",etos(src))); + do_fsadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDADD %s\r\n",etos(src))); + do_fdadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSSUB %s\r\n",etos(src))); + do_fssub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDSUB %s\r\n",etos(src))); + do_fdsub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMUL %s\r\n",etos(src))); + do_fsmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSMUL %s\r\n",etos(src))); + do_fsmul( FPU registers[reg], src ); + dump_registers( "END "); +} + /* ---------------------------- ALU ---------------------------- */ PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ) @@ -5037,7 +5619,7 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ) D(bug("FGETEXP %s\r\n",etos(src))); if( IS_INFINITY(src) ) { - MAKE_NAN( FPU registers[reg] ); + MAKE_NAN( FPU registers[reg], IS_NEGATIVE(src) ); do_ftst( FPU registers[reg] ); x86_status_word |= SW_IE; } else { @@ -5058,7 +5640,7 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ) } D(bug("FGETMAN %s\r\n",etos(src))); if( IS_INFINITY(src) ) { - MAKE_NAN( FPU registers[reg] ); + MAKE_NAN( FPU registers[reg], IS_NEGATIVE(src) ); do_ftst( FPU registers[reg] ); x86_status_word |= SW_IE; } else { @@ -5186,7 +5768,7 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ) } D(bug("FSCALE %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); if( IS_INFINITY(FPU registers[reg]) ) { - MAKE_NAN( FPU registers[reg] ); + MAKE_NAN( FPU registers[reg], IS_NEGATIVE(FPU registers[reg]) ); do_ftst( FPU registers[reg] ); x86_status_word |= SW_IE; } else { @@ -5744,6 +6326,61 @@ PRIVATE void FFPU build_fpp_opp_lookup_table () } break; } + + if (FPU is_integral) { + switch (extra & 0x7f) { + case 0x40: + fpufunctbl[mask] = & FFPU fpuop_do_fsmove; + break; + case 0x44: + fpufunctbl[mask] = & FFPU fpuop_do_fdmove; + break; + case 0x41: + fpufunctbl[mask] = & FFPU fpuop_do_fssqrt; + break; + case 0x45: + fpufunctbl[mask] = & FFPU fpuop_do_fdsqrt; + break; + case 0x58: + fpufunctbl[mask] = & FFPU fpuop_do_fsabs; + break; + case 0x5c: + fpufunctbl[mask] = & FFPU fpuop_do_fdabs; + break; + case 0x5a: + fpufunctbl[mask] = & FFPU fpuop_do_fsneg; + break; + case 0x5e: + fpufunctbl[mask] = & FFPU fpuop_do_fdneg; + break; + case 0x60: + fpufunctbl[mask] = & FFPU fpuop_do_fsdiv; + break; + case 0x64: + fpufunctbl[mask] = & FFPU fpuop_do_fddiv; + break; + case 0x62: + fpufunctbl[mask] = & FFPU fpuop_do_fsadd; + break; + case 0x66: + fpufunctbl[mask] = & FFPU fpuop_do_fdadd; + break; + case 0x68: + fpufunctbl[mask] = & FFPU fpuop_do_fssub; + break; + case 0x6c: + fpufunctbl[mask] = & FFPU fpuop_do_fdsub; + break; + case 0x63: + fpufunctbl[mask] = & FFPU fpuop_do_fsmul; + break; + case 0x67: + fpufunctbl[mask] = & FFPU fpuop_do_fdmul; + break; + default: + break; + } + } switch (extra & 0x7f) { case 0x00: @@ -6033,6 +6670,26 @@ PRIVATE void FFPU do_fld1 ( fpu_register & dest ) } +void fpu_set_fpsr(uae_u32 new_fpsr) +{ + set_fpsr(new_fpsr); +} + +uae_u32 fpu_get_fpsr(void) +{ + return get_fpsr(); +} + +void fpu_set_fpcr(uae_u32 new_fpcr) +{ + set_fpcr(new_fpcr); +} + +uae_u32 fpu_get_fpcr(void) +{ + return get_fpcr(); +} + /* ---------------------------- MAIN INIT ---------------------------- */ #ifdef HAVE_SIGACTION @@ -6079,11 +6736,15 @@ PUBLIC void FFPU fpu_init( bool integral_68040 ) FPU fpsr.quotient = 0; for( int i=0; i<8; i++ ) { - MAKE_NAN( FPU registers[i] ); + MAKE_NAN( FPU registers[i], false ); } build_fpp_opp_lookup_table(); +/* _asm { + FNINIT + FLDCW x86_control_word + } */ __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); do_fldpi( const_pi ); @@ -6111,6 +6772,10 @@ PUBLIC void FFPU fpu_init( bool integral_68040 ) set_constant( const_1e4096, "1.0e4096", 1.0e256, 10000 ); // Just in case. +/* _asm { + FNINIT + FLDCW x86_control_word + } */ __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); } diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h index 96f1d9598..c42bfa91b 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h @@ -1,28 +1,33 @@ /* - * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core + * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_X86_H @@ -94,17 +99,17 @@ PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void); PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name); // Get special floating-point value class -PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f); -PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_INFINITY (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_NAN (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_ZERO (fpu_register const & f); +PRIVATE inline uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); // Make a special floating-point value -PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); -PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_NAN (fpu_register & f, bool negative); +PRIVATE inline void FFPU MAKE_INF_POSITIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_INF_NEGATIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); +PRIVATE inline void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); // Conversion from extended floating-point values PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) REGPARAM; @@ -342,6 +347,24 @@ PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ); PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ); PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ); +// 040 +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fssqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsdiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fddiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fssub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdsub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdmul( uae_u32 opcode, uae_u32 extra ); + // Get & Put floating-point values PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) REGPARAM; PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) REGPARAM; @@ -351,9 +374,9 @@ PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) REGPARAM; PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) REGPARAM; // Misc functions -PRIVATE void __inline__ FFPU set_host_fpu_control_word (); -PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN (); -PRIVATE void __inline__ FFPU build_ex_status (); +PRIVATE void inline FFPU set_host_fpu_control_word (); +PRIVATE void inline FFPU SET_BSUN_ON_NAN (); +PRIVATE void inline FFPU build_ex_status (); PRIVATE void FFPU do_null_frestore (); PRIVATE void FFPU build_fpp_opp_lookup_table (); PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ); diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h index ecdecfbc9..6e5a37667 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h @@ -1,3 +1,35 @@ +/* + * fpu/fpu_x86_asm.h - Extra Definitions for the X86 assembly FPU core + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + #define DEFINE_X86_MACRO(name, value) \ asm(".local " #name "\n\t" #name " = " #value) diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu/fpu/impl.h index c79d1f3f5..ec5648a94 100644 --- a/BasiliskII/src/uae_cpu/fpu/impl.h +++ b/BasiliskII/src/uae_cpu/fpu/impl.h @@ -1,28 +1,38 @@ /* * fpu/impl.h - extra functions and inline implementations * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_IMPL_H @@ -101,14 +111,16 @@ static inline void FFPU set_fpsr(uae_u32 new_fpsr) /* Return the floating-point control register in m68k format */ static inline uae_u32 FFPU get_fpcr(void) { - uae_u32 rounding_precision = get_rounding_precision(); - uae_u32 rounding_mode = get_rounding_mode(); - return (rounding_precision | rounding_mode); + // according to the manual, the msb bits are always zero. + // According to Toni Wilen, on '040 the least + // significant 4 bits are not masked out + return FPU fpcr & (CPUType == 4 ? 0xffff : 0xfff0); } /* Set the floating-point control register from an m68k format */ static inline void FFPU set_fpcr(uae_u32 new_fpcr) { + FPU fpcr = new_fpcr; set_rounding_precision ( new_fpcr & FPCR_ROUNDING_PRECISION); set_rounding_mode ( new_fpcr & FPCR_ROUNDING_MODE ); set_host_control_word(); @@ -123,9 +135,8 @@ static inline void FFPU set_fpcr(uae_u32 new_fpcr) /* Retrieve a floating-point register value and convert it to double precision */ static inline double FFPU fpu_get_register(int r) { - double f; - __asm__ __volatile__("fldt %1\n\tfstpl %0" : "=m" (f) : "m" (FPU registers[r])); - return f; + /* only used for debug output; no need for any fancy asm here */ + return FPU registers[r]; } #endif diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp index eabb376e5..c96169271 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp @@ -1,28 +1,33 @@ /* * fpu/mathlib.cpp - Floating-point math support library * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* NOTE: this file shall be included only from fpu/fpu_*.cpp */ @@ -40,6 +45,7 @@ #if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +#if !defined(HAVE_EXP10L) && !defined(HAVE_POW10L) PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y) { fpu_extended value, exponent; @@ -82,7 +88,9 @@ PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y) __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); return value; } +#endif +#ifndef HAVE_LOG1PL PRIVATE fpu_extended fp_do_log1p(fpu_extended x) { // TODO: handle NaN and +inf/-inf @@ -96,5 +104,6 @@ PRIVATE fpu_extended fp_do_log1p(fpu_extended x) __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x + 1.0)); return value; } +#endif #endif diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h index 2363af56d..26e47ff8f 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.h +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -1,28 +1,33 @@ /* - * fpu/mathlib.h - Floating-point math support library + * fpu/mathlib.h - Floating-point math support library * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2001 Lauri Pesonen - * New framework, copyright 2000-2001 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_MATHLIB_H @@ -49,22 +54,7 @@ // Use ISO C99 extended-precision math functions (glibc 2.1+) #define FPU_USE_ISO_C99 1 -// NOTE: this is irrelevant on Win32 platforms since the MS libraries -// don't support extended-precision floating-point computations -#if defined(WIN32) && USE_LONG_DOUBLE -#undef FPU_USE_ISO_C99 -#endif - -// Use faster implementation of math functions, but this could cause -// some incorrect results (?) -#ifdef _MSC_VER -// MSVC uses intrinsics for all of the math functions, so it should still be fast -#define FPU_FAST_MATH 0 -#else -#define FPU_FAST_MATH 1 -#endif - -#if FPU_USE_ISO_C99 +#if defined(FPU_USE_ISO_C99) // NOTE: no prior shall be included at this point #define __USE_ISOC99 1 // for glibc 2.2.X and newer #define __USE_ISOC9X 1 // for glibc 2.1.X @@ -147,7 +137,7 @@ union fpu_double_shape { unsigned int mantissa0:20; unsigned int mantissa1:32; #else -# if HOST_FLOAT_WORDS_BIG_ENDIAN +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int mantissa0:20; unsigned int exponent:11; unsigned int negative:1; @@ -172,7 +162,7 @@ union fpu_double_shape { unsigned int mantissa0:19; unsigned int mantissa1:32; #else -# if HOST_FLOAT_WORDS_BIG_ENDIAN +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int mantissa0:19; unsigned int quiet_nan:1; unsigned int exponent:11; @@ -191,7 +181,7 @@ union fpu_double_shape { /* This format is used to extract the sign_exponent and mantissa parts only */ struct { -#if HOST_FLOAT_WORDS_BIG_ENDIAN +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int msw:32; unsigned int lsw:32; #else @@ -215,7 +205,7 @@ union fpu_extended_shape { unsigned int mantissa0:32; unsigned int mantissa1:32; #else -# if HOST_FLOAT_WORDS_BIG_ENDIAN +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int exponent:15; unsigned int negative:1; unsigned int empty:16; @@ -242,7 +232,7 @@ union fpu_extended_shape { unsigned int mantissa0:30; unsigned int mantissa1:32; #else -# if HOST_FLOAT_WORDS_BIG_ENDIAN +# if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int exponent:15; unsigned int negative:1; unsigned int empty:16; @@ -264,7 +254,7 @@ union fpu_extended_shape { /* This format is used to extract the sign_exponent and mantissa parts only */ struct { -#if HOST_FLOAT_WORDS_BIG_ENDIAN +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN unsigned int sign_exponent:16; unsigned int empty:16; unsigned int msw:32; @@ -310,7 +300,7 @@ union fpu_extended_shape { unsigned int exponent:15; unsigned int quiet_nan:1; unsigned int mantissa0:15; - unsigned int mantissa1:30; + unsigned int mantissa1:32; unsigned int mantissa2:32; unsigned int mantissa3:32; #else @@ -325,7 +315,7 @@ union fpu_extended_shape { } ieee_nan; /* This format is used to extract the sign_exponent and mantissa parts only */ -#if HOST_FLOAT_WORDS_BIG_ENDIAN +#if defined(HOST_FLOAT_WORDS_BIG_ENDIAN) && HOST_FLOAT_WORDS_BIG_ENDIAN struct { uae_u64 msw; uae_u64 lsw; @@ -351,9 +341,9 @@ union fpu_extended_shape { }; #endif -// Declare and initialize a pointer to a shape of the requested FP type -#define fp_declare_init_shape(psvar, rfvar, ftype) \ - fpu_ ## ftype ## _shape * psvar = (fpu_ ## ftype ## _shape *)( &rfvar ) +// Declare a shape of the requested FP type +#define fp_declare_init_shape(psvar, ftype) \ + fpu_ ## ftype ## _shape psvar /* -------------------------------------------------------------------------- */ /* --- Extra Math Functions --- */ @@ -370,47 +360,51 @@ union fpu_extended_shape { PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) { #ifdef BRANCHES_ARE_EXPENSIVE -#ifndef USE_LONG_DOUBLE - fp_declare_init_shape(sxp, r, double); - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; +#if !defined(USE_LONG_DOUBLE) + fp_declare_init_shape(sxp, double); + sxp.value = r; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; hx &= 0x7fffffff; hx |= (uae_u32)(lx | (-lx)) >> 31; hx = 0x7ff00000 - hx; - return (((uae_u32)hx) >> 31) != 0; -#elif USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - uae_s64 hx = sxp->parts64.msw; - uae_s64 lx = sxp->parts64.lsw; + return (int)(((uae_u32)hx) >> 31); +#elif defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s64 hx = sxp.parts64.msw; + uae_s64 lx = sxp.parts64.lsw; hx &= 0x7fffffffffffffffLL; hx |= (uae_u64)(lx | (-lx)) >> 63; hx = 0x7fff000000000000LL - hx; - return ((uae_u64)hx >> 63) != 0; + return (int)((uae_u64)hx >> 63); #else - fp_declare_init_shape(sxp, r, extended); - uae_s32 se = sxp->parts.sign_exponent; - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s32 se = sxp.parts.sign_exponent; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; se = (se & 0x7fff) << 1; lx |= hx & 0x7fffffff; se |= (uae_u32)(lx | (-lx)) >> 31; se = 0xfffe - se; - // TODO: check whether rshift count is 16 or 31 - return (((uae_u32)(se)) >> 16) != 0; + return (int)(((uae_u32)(se)) >> 31); #endif #else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return (sxp.ieee.exponent == FP_EXTENDED_EXP_MAX) #else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) + fp_declare_init_shape(sxp, double); + sxp.value = r; + return (sxp.ieee.exponent == FP_DOUBLE_EXP_MAX) #endif - && (sxp->ieee_nan.mantissa0 != 0) - && (sxp->ieee_nan.mantissa1 != 0) + && (sxp.ieee.mantissa0 & 0x7fffffff) != 0 + && sxp.ieee.mantissa1 != 0 #ifdef USE_QUAD_DOUBLE - && (sxp->ieee_nan.mantissa2 != 0) - && (sxp->ieee_nan.mantissa3 != 0) + && sxp.ieee.mantissa2 != 0 + && sxp.ieee.mantissa3 != 0 #endif ; #endif @@ -426,50 +420,62 @@ PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) { #ifdef BRANCHES_ARE_EXPENSIVE -#ifndef USE_LONG_DOUBLE - fp_declare_init_shape(sxp, r, double); - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; +#if !defined(USE_LONG_DOUBLE) + fp_declare_init_shape(sxp, double); + sxp.value = r; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; lx |= (hx & 0x7fffffff) ^ 0x7ff00000; lx |= -lx; - return (~(lx >> 31) & (hx >> 30)) != 0; -#elif USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - uae_s64 hx = sxp->parts64.msw; - uae_s64 lx = sxp->parts64.lsw; + return ~(lx >> 31) & (hx >> 30); +#elif defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + uae_s64 hx = sxp.parts64.msw; + uae_s64 lx = sxp.parts64.lsw; lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; lx |= -lx; - return (~(lx >> 63) & (hx >> 62)) != 0; + return ~(lx >> 63) & (hx >> 62); #else - fp_declare_init_shape(sxp, r, extended); - uae_s32 se = sxp->parts.sign_exponent; - uae_s32 hx = sxp->parts.msw; - uae_s32 lx = sxp->parts.lsw; + fp_declare_init_shape(sxp, extended); + sxp.value = r; + /* NOTE: This function should work for both m68k and native INFs. */ +#if 0 + uae_s32 se = sxp.parts.sign_exponent; + uae_s32 hx = sxp.parts.msw; + uae_s32 lx = sxp.parts.lsw; /* This additional ^ 0x80000000 is necessary because in Intel's internal representation of the implicit one is explicit. NOTE: anyway, this is equivalent to & 0x7fffffff in that case. */ -#ifdef __i386__ +#ifdef CPU_i386 lx |= (hx ^ 0x80000000) | ((se & 0x7fff) ^ 0x7fff); #else lx |= (hx & 0x7fffffff) | ((se & 0x7fff) ^ 0x7fff); #endif lx |= -lx; se &= 0x8000; - return (~(lx >> 31) & (1 - (se >> 14))) != 0; + return ~(lx >> 31) & (1 - (se >> 14)); +#else + return sxp.ieee.exponent == FP_EXTENDED_EXP_MAX + && (sxp.ieee.mantissa0 & 0x7fffffff) == 0 + && sxp.ieee.mantissa1 == 0; +#endif #endif #else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_EXTENDED_EXP_MAX) #else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) + fp_declare_init_shape(sxp, double); + sxp.value = r; + return (sxp.ieee_nan.exponent == FP_DOUBLE_EXP_MAX) #endif - && (sxp->ieee_nan.mantissa0 == 0) - && (sxp->ieee_nan.mantissa1 == 0) + && (sxp.ieee.mantissa0 & 0x7fffffff) == 0 + && sxp.ieee.mantissa1 == 0 #ifdef USE_QUAD_DOUBLE - && (sxp->ieee_nan.mantissa2 == 0) - && (sxp->ieee_nan.mantissa3 == 0) + && sxp.ieee.mantissa2 == 0 + && sxp.ieee.mantissa3 == 0 #endif ; #endif @@ -480,12 +486,13 @@ PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) { -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); #else - fp_declare_init_shape(sxp, r, double); + fp_declare_init_shape(sxp, double); #endif - return sxp->ieee.negative; + sxp.value = r; + return sxp.ieee.negative; } #undef iszero @@ -494,17 +501,18 @@ PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) PRIVATE inline bool FFPU fp_do_iszero(fpu_register const & r) { // TODO: BRANCHES_ARE_EXPENSIVE -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); #else - fp_declare_init_shape(sxp, r, double); + fp_declare_init_shape(sxp, double); #endif - return (sxp->ieee.exponent == 0) - && (sxp->ieee.mantissa0 == 0) - && (sxp->ieee.mantissa1 == 0) + sxp.value = r; + return (sxp.ieee.exponent == 0) + && (sxp.ieee.mantissa0 == 0) + && (sxp.ieee.mantissa1 == 0) #ifdef USE_QUAD_DOUBLE - && (sxp->ieee.mantissa2 == 0) - && (sxp->ieee.mantissa3 == 0) + && (sxp.ieee.mantissa2 == 0) + && (sxp.ieee.mantissa3 == 0) #endif ; } @@ -527,158 +535,155 @@ PRIVATE inline void FFPU get_source_flags(fpu_register const & r) fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; } -PRIVATE inline void FFPU make_nan(fpu_register & r) +PRIVATE inline void FFPU make_nan(fpu_register & r, bool negative) { - // FIXME: is that correct ? -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee.exponent = FP_EXTENDED_EXP_MAX; - sxp->ieee.mantissa0 = 0xffffffff; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee.exponent = FP_EXTENDED_EXP_MAX; + sxp.ieee.empty = 0; + sxp.ieee.mantissa0 = 0xffffffff; #else - fp_declare_init_shape(sxp, r, double); - sxp->ieee.exponent = FP_DOUBLE_EXP_MAX; - sxp->ieee.mantissa0 = 0xfffff; + fp_declare_init_shape(sxp, double); + sxp.ieee.exponent = FP_DOUBLE_EXP_MAX; + sxp.ieee.mantissa0 = 0xfffff; #endif - sxp->ieee.mantissa1 = 0xffffffff; + sxp.ieee.mantissa1 = 0xffffffff; #ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0xffffffff; - sxp->ieee.mantissa3 = 0xffffffff; + sxp.ieee.mantissa2 = 0xffffffff; + sxp.ieee.mantissa3 = 0xffffffff; #endif + sxp.ieee.negative = negative; + r = sxp.value; } -PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +PRIVATE inline void FFPU make_zero(fpu_register & r, bool negative) { #if 1 - r = +0.0; + r = negative ? -0.0 : +0.0; #else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee.empty = 0; #else - fp_declare_init_shape(sxp, r, double); + fp_declare_init_shape(sxp, double); #endif - sxp->ieee.negative = 0; - sxp->ieee.exponent = 0; - sxp->ieee.mantissa0 = 0; - sxp->ieee.mantissa1 = 0; + sxp.ieee.negative = negative; + sxp.ieee.exponent = 0; + sxp.ieee.mantissa0 = 0; + sxp.ieee.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0; - sxp->ieee.mantissa3 = 0; + sxp.ieee.mantissa2 = 0; + sxp.ieee.mantissa3 = 0; #endif + r = sxp.value; #endif } -PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +PRIVATE inline void FFPU make_inf(fpu_register & r, bool negative) { -#if 1 - r = -0.0; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.ieee.exponent = FP_EXTENDED_EXP_MAX; + sxp.ieee.mantissa0 = 0x80000000; + sxp.ieee.empty = 0; #else -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); -#else - fp_declare_init_shape(sxp, r, double); + fp_declare_init_shape(sxp, double); + sxp.ieee.exponent = FP_DOUBLE_EXP_MAX; + sxp.ieee.mantissa0 = 0; #endif - sxp->ieee.negative = 1; - sxp->ieee.exponent = 0; - sxp->ieee.mantissa0 = 0; - sxp->ieee.mantissa1 = 0; + sxp.ieee.negative = negative; + sxp.ieee.mantissa1 = 0; #ifdef USE_QUAD_DOUBLE - sxp->ieee.mantissa2 = 0; - sxp->ieee.mantissa3 = 0; -#endif -#endif -} - -PRIVATE inline void FFPU make_inf_positive(fpu_register & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.negative = 0; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee_nan.mantissa2 = 0; - sxp->ieee_nan.mantissa3 = 0; -#endif -} - -PRIVATE inline void FFPU make_inf_negative(fpu_register & r) -{ -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; -#else - fp_declare_init_shape(sxp, r, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.negative = 1; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; -#ifdef USE_QUAD_DOUBLE - sxp->ieee_nan.mantissa2 = 0; - sxp->ieee_nan.mantissa3 = 0; + sxp.ieee.mantissa2 = 0; + sxp.ieee.mantissa3 = 0; #endif + r = sxp.value; } PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) { -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - return (sxp->ieee.exponent - FP_EXTENDED_EXP_BIAS); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + return ((int) sxp.ieee.exponent - FP_EXTENDED_EXP_BIAS); #else - fp_declare_init_shape(sxp, r, double); - return (sxp->ieee.exponent - FP_DOUBLE_EXP_BIAS); + fp_declare_init_shape(sxp, double); + sxp.value = r; + return ((int) sxp.ieee.exponent - FP_DOUBLE_EXP_BIAS); #endif } // Normalize to range 1..2 PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) { -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, r, extended); - sxp->ieee.exponent = FP_EXTENDED_EXP_BIAS; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = r; + sxp.ieee.exponent = FP_EXTENDED_EXP_BIAS; #else - fp_declare_init_shape(sxp, r, double); - sxp->ieee.exponent = FP_DOUBLE_EXP_BIAS; + fp_declare_init_shape(sxp, double); + sxp.value = r; + sxp.ieee.exponent = FP_DOUBLE_EXP_BIAS; #endif + r = sxp.value; } // The sign of the quotient is the exclusive-OR of the sign bits // of the source and destination operands. PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) { -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sap, ra, extended); - fp_declare_init_shape(sbp, rb, extended); +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sap, extended); + fp_declare_init_shape(sbp, extended); #else - fp_declare_init_shape(sap, ra, double); - fp_declare_init_shape(sbp, rb, double); + fp_declare_init_shape(sap, double); + fp_declare_init_shape(sbp, double); #endif - return ((sap->ieee.negative ^ sbp->ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); + sap.value = ra; + sbp.value = rb; + return ((sap.ieee.negative ^ sbp.ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); } /* -------------------------------------------------------------------------- */ /* --- Math functions --- */ /* -------------------------------------------------------------------------- */ -#if FPU_USE_ISO_C99 -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE +#if defined(FPU_USE_ISO_C99) && (defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE)) # ifdef HAVE_LOGL # define fp_log logl # endif +# ifdef HAVE_LOG1PL +# define fp_log1p log1pl +# endif +# ifdef HAVE_EXPM1L +# define fp_expm1 expm1l +# endif # ifdef HAVE_LOG10L # define fp_log10 log10l # endif +# ifdef HAVE_LOG2L +# define fp_log2 log2l +# endif # ifdef HAVE_EXPL # define fp_exp expl # endif # ifdef HAVE_POWL # define fp_pow powl # endif +# if defined(HAVE_EXP10L) +# define fp_pow10 exp10l +# elif defined(HAVE_POW10L) +# define fp_pow10 pow10l +# else +# define fp_pow10(x) fp_pow(LD(10.0), x) +# endif +# if defined(HAVE_EXP2L) +# define fp_pow2 exp2l +# elif defined(HAVE_POW2L) +# define fp_pow2 pow2l +# else +# define fp_pow2(x) fp_pow(LD(2.0), x) +# endif # ifdef HAVE_FABSL # define fp_fabs fabsl # endif @@ -732,15 +737,38 @@ PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_regis #ifndef fp_log # define fp_log log #endif +#ifndef fp_log1p +# define fp_log1p log1p +#endif +#ifndef fp_expm1 +# define fp_expm1 expm1 +#endif #ifndef fp_log10 # define fp_log10 log10 #endif +#ifndef fp_log2 +# define fp_log2 log2 +#endif #ifndef fp_exp # define fp_exp exp #endif #ifndef fp_pow # define fp_pow pow #endif +#ifndef fp_pow10 +# ifdef HAVE_POW10 +# define fp_pow10 pow10 +# else +# define fp_pow10 exp10 +# endif +#endif +#ifndef fp_pow2 +# ifdef HAVE_POW2 +# define fp_pow2 pow2 +# else +# define fp_pow2 exp2 +# endif +#endif #ifndef fp_fabs # define fp_fabs fabs #endif @@ -790,48 +818,43 @@ PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_regis # define fp_ceil ceil #endif -#elif defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) // Assembly optimized support functions. Taken from glibc 2.2.2 #undef fp_log #define fp_log fp_do_log -#if !FPU_FAST_MATH -PRIVATE fpu_extended fp_do_log(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_log(fpu_extended x) { fpu_extended value; __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); return value; } -#endif #undef fp_log10 #define fp_log10 fp_do_log10 -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_log10(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_log10(fpu_extended x) { fpu_extended value; __asm__ __volatile__("fldlg2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); return value; } -#endif +#if !defined(HAVE_EXPL) #undef fp_exp #define fp_exp fp_do_exp -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_exp(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) { fpu_extended value, exponent; + if (isinf(x)) + { + if(isneg(x)) + return 0.; + else + return x; + } __asm__ __volatile__("fldl2e # e^x = 2^(x * log2(e))\n\t" "fmul %%st(1) # x * log2(e)\n\t" "fst %%st(1)\n\t" @@ -846,10 +869,12 @@ PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) } #endif +#if !defined(HAVE_EXP10L) && !defined(HAVE_POW10L) #undef fp_pow #define fp_pow fp_do_pow PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y); +#endif #undef fp_fabs #define fp_fabs fp_do_fabs @@ -871,6 +896,7 @@ PRIVATE inline fpu_extended fp_do_sqrt(fpu_extended x) return value; } +#ifndef ACCURATE_SIN_COS_TAN #undef fp_sin #define fp_sin fp_do_sin @@ -896,18 +922,27 @@ PRIVATE inline fpu_extended fp_do_cos(fpu_extended x) PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) { - fpu_extended value; - __asm__ __volatile__("fptan" : "=t" (value) : "0" (x)); + fpu_extended value, value2; + __asm__ __volatile__("fptan" : "=t" (value2), "=u" (value) : "0" (x)); return value; } +#endif /* ACCURATE_SIN_COS_TAN */ +#ifndef HAVE_EXPM1L #undef fp_expm1 #define fp_expm1 fp_do_expm1 // Returns: exp(X) - 1.0 PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) { - fpu_extended value, exponent, temp; + fpu_extended value, exponent, temp, temp2; + if (isinf(x)) + { + if(isneg(x)) + return -1.; + else + return x; + } __asm__ __volatile__("fldl2e # e^x - 1 = 2^(x * log2(e)) - 1\n\t" "fmul %%st(1) # x * log2(e)\n\t" "fst %%st(1)\n\t" @@ -917,51 +952,52 @@ PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" "fscale # 2^(x * log2(e)) - 2^(int(x * log2(e)))\n\t" : "=t" (value), "=u" (exponent) : "0" (x)); - __asm__ __volatile__("fscale" : "=t" (temp) : "0" (1.0), "u" (exponent)); + __asm__ __volatile__("fld1 \n\t" + "fscale \n\t" + : "=t" (temp), "=u" (temp2) : "0" (exponent)); temp -= 1.0; return temp + value ? temp + value : x; } +#endif #undef fp_sgn1 #define fp_sgn1 fp_do_sgn1 PRIVATE inline fpu_extended fp_do_sgn1(fpu_extended x) { -#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE - fp_declare_init_shape(sxp, x, extended); - sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; - sxp->ieee_nan.one = 1; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fp_declare_init_shape(sxp, extended); + sxp.value = x; + sxp.ieee_nan.exponent = FP_EXTENDED_EXP_MAX>>1; + sxp.ieee_nan.one = 1; #else - fp_declare_init_shape(sxp, x, double); - sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; -#endif - sxp->ieee_nan.quiet_nan = 0; - sxp->ieee_nan.mantissa0 = 0; - sxp->ieee_nan.mantissa1 = 0; + fp_declare_init_shape(sxp, double); + sxp.value = x; + sxp.ieee_nan.exponent = FP_DOUBLE_EXP_MAX>>1; +#endif + sxp.ieee_nan.quiet_nan = 0; + sxp.ieee_nan.mantissa0 = 0; + sxp.ieee_nan.mantissa1 = 0; + x = sxp.value; return x; } +#ifndef HAVE_SINHL #undef fp_sinh #define fp_sinh fp_do_sinh -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_sinh(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) { + if (isinf(x)) return x; fpu_extended exm1 = fp_expm1(fp_fabs(x)); return 0.5 * (exm1 / (exm1 + 1.0) + exm1) * fp_sgn1(x); } #endif +#ifndef HAVE_COSHL #undef fp_cosh #define fp_cosh fp_do_cosh -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_cosh(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) { fpu_extended ex = fp_exp(x); @@ -969,13 +1005,10 @@ PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) } #endif +#ifndef HAVE_TANHL #undef fp_tanh #define fp_tanh fp_do_tanh -#if !FPU_FAST_MATH -// FIXME: unimplemented -PRIVATE fpu_extended fp_do_tanh(fpu_extended x); -#else PRIVATE inline fpu_extended fp_do_tanh(fpu_extended x) { fpu_extended exm1 = fp_expm1(-fp_fabs(x + x)); @@ -993,6 +1026,7 @@ PRIVATE inline fpu_extended fp_do_atan2(fpu_extended y, fpu_extended x) return value; } +#ifndef HAVE_ASINL #undef fp_asin #define fp_asin fp_do_asin @@ -1000,7 +1034,9 @@ PRIVATE inline fpu_extended fp_do_asin(fpu_extended x) { return fp_atan2(x, fp_sqrt(1.0 - x * x)); } +#endif +#ifndef HAVE_ACOSL #undef fp_acos #define fp_acos fp_do_acos @@ -1008,6 +1044,7 @@ PRIVATE inline fpu_extended fp_do_acos(fpu_extended x) { return fp_atan2(fp_sqrt(1.0 - x * x), x); } +#endif #undef fp_atan #define fp_atan fp_do_atan @@ -1019,12 +1056,15 @@ PRIVATE inline fpu_extended fp_do_atan(fpu_extended x) return value; } +#ifndef HAVE_LOG1PL #undef fp_log1p #define fp_log1p fp_do_log1p // Returns: ln(1.0 + X) PRIVATE fpu_extended fp_do_log1p(fpu_extended x); +#endif +#ifndef HAVE_ASINHL #undef fp_asinh #define fp_asinh fp_do_asinh @@ -1033,7 +1073,9 @@ PRIVATE inline fpu_extended fp_do_asinh(fpu_extended x) fpu_extended y = fp_fabs(x); return (fp_log1p(y * y / (fp_sqrt(y * y + 1.0) + 1.0) + y) * fp_sgn1(x)); } +#endif +#ifndef HAVE_ACOSHL #undef fp_acosh #define fp_acosh fp_do_acosh @@ -1041,7 +1083,9 @@ PRIVATE inline fpu_extended fp_do_acosh(fpu_extended x) { return fp_log(x + fp_sqrt(x - 1.0) * fp_sqrt(x + 1.0)); } +#endif +#ifndef HAVE_ATANHL #undef fp_atanh #define fp_atanh fp_do_atanh @@ -1050,69 +1094,87 @@ PRIVATE inline fpu_extended fp_do_atanh(fpu_extended x) fpu_extended y = fp_fabs(x); return -0.5 * fp_log1p(-(y + y) / (1.0 + y)) * fp_sgn1(x); } +#endif -#undef fp_floor -#define fp_floor fp_do_floor - -PRIVATE inline fpu_extended fp_do_floor(fpu_extended x) -{ - volatile unsigned int cw; - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0400; // rounding down - __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); - fpu_extended value; - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); - __asm__ __volatile__("fldcw %0" : : "m" (cw)); - return value; -} - -#undef fp_ceil -#define fp_ceil fp_do_ceil -PRIVATE inline fpu_extended fp_do_ceil(fpu_extended x) -{ - volatile unsigned int cw; - __asm__ __volatile__("fnstcw %0" : "=m" (cw)); - volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0800; // rounding up - __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); - fpu_extended value; - __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); - __asm__ __volatile__("fldcw %0" : : "m" (cw)); - return value; +/* + * LLVM 2.9 crashes on first definition, + * clang with LLVM 3.x crashes on 2nd definition... sigh + */ +#if defined(__clang__) || !defined(__llvm__) +#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ +PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended __x) \ +{ \ + register long double __value; \ + register int __ignore; \ + volatile unsigned short __cw; \ + volatile unsigned short __cwtmp; \ + __asm __volatile ("fnstcw %3\n\t" \ + "movzwl %3, %1\n\t" \ + "andl $0xf3ff, %1\n\t" \ + "orl %5, %1\n\t" \ + "movw %w1, %2\n\t" \ + "fldcw %2\n\t" \ + "frndint\n\t" \ + "fldcw %3" \ + : "=t" (__value), "=&q" (__ignore), "=m" (__cwtmp), \ + "=m" (__cw) \ + : "0" (__x), "i"(rounding_mode)); \ + return __value; \ } - +#else #define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended x) \ { \ - volatile unsigned int cw; \ + volatile unsigned short cw; \ __asm__ __volatile__("fnstcw %0" : "=m" (cw)); \ - volatile unsigned int cw_temp = (cw & 0xf3ff) | (rounding_mode); \ + volatile unsigned short cw_temp = (cw & 0xf3ff) | (rounding_mode); \ __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); \ fpu_extended value; \ __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); \ __asm__ __volatile__("fldcw %0" : : "m" (cw)); \ return value; \ } +#endif #undef fp_round_to_minus_infinity +#ifdef HAVE_FLOORL +#define fp_round_to_minus_infinity floorl +#else #define fp_round_to_minus_infinity fp_do_round_to_minus_infinity - -DEFINE_ROUND_FUNC(minus_infinity, 0x400) +DEFINE_ROUND_FUNC(minus_infinity, CW_RC_DOWN) +#endif #undef fp_round_to_plus_infinity +#ifdef HAVE_CEILL +#define fp_round_to_plus_infinity ceill +#else #define fp_round_to_plus_infinity fp_do_round_to_plus_infinity - -DEFINE_ROUND_FUNC(plus_infinity, 0x800) +DEFINE_ROUND_FUNC(plus_infinity, CW_RC_UP) +#endif #undef fp_round_to_zero +#ifdef HAVE_TRUNCL +#define fp_round_to_zero truncl +#else #define fp_round_to_zero fp_do_round_to_zero - -DEFINE_ROUND_FUNC(zero, 0xc00) +DEFINE_ROUND_FUNC(zero, CW_RC_ZERO) +#endif #undef fp_round_to_nearest +#ifdef HAVE_ROUNDL +#define fp_round_to_nearest roundl +#else #define fp_round_to_nearest fp_do_round_to_nearest +DEFINE_ROUND_FUNC(nearest, CW_RC_NEAR) +#endif + +#undef fp_ceil +#define fp_ceil fp_do_round_to_plus_infinity + +#undef fp_floor +#define fp_floor fp_do_round_to_minus_infinity -DEFINE_ROUND_FUNC(nearest, 0x000) #endif /* USE_X87_ASSEMBLY */ diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu/fpu/rounding.cpp index 1f8b36183..9942d4e89 100644 --- a/BasiliskII/src/uae_cpu/fpu/rounding.cpp +++ b/BasiliskII/src/uae_cpu/fpu/rounding.cpp @@ -1,28 +1,33 @@ /* - * fpu/rounding.cpp - system-dependant FPU rounding mode and precision + * fpu/rounding.cpp - system-dependant FPU rounding mode and precision * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #undef PRIVATE diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu/fpu/rounding.h index 67db55190..aa2c9ced1 100644 --- a/BasiliskII/src/uae_cpu/fpu/rounding.h +++ b/BasiliskII/src/uae_cpu/fpu/rounding.h @@ -1,28 +1,33 @@ /* - * fpu/rounding.h - system-dependant FPU rounding mode and precision + * fpu/rounding.h - system-dependant FPU rounding mode and precision * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_ROUNDING_H @@ -106,8 +111,8 @@ PRIVATE inline void set_host_control_word(void) */ x86_control_word = (x86_control_word & ~(X86_ROUNDING_MODE|X86_ROUNDING_PRECISION)) - | x86_control_word_rm_mac2host[(FPU fpcr.rounding_mode & FPCR_ROUNDING_MODE) >> 4] - | x86_control_word_rp_mac2host[(FPU fpcr.rounding_precision & FPCR_ROUNDING_PRECISION) >> 6] + | x86_control_word_rm_mac2host[(FPU fpcr & FPCR_ROUNDING_MODE) >> 4] + | x86_control_word_rp_mac2host[(FPU fpcr & FPCR_ROUNDING_PRECISION) >> 6] ; __asm__ __volatile__("fldcw %0" : : "m" (x86_control_word)); } @@ -131,11 +136,11 @@ PRIVATE inline void set_host_control_word(void) /* Return the current rounding mode in m68k format */ static inline uae_u32 FFPU get_rounding_mode(void) - { return FPU fpcr.rounding_mode; } + { return FPU fpcr & FPCR_ROUNDING_MODE; } /* Convert and set to native rounding mode */ -static inline void FFPU set_rounding_mode(uae_u32 new_rounding_mode) - { FPU fpcr.rounding_mode = new_rounding_mode; } +static inline void FFPU set_rounding_mode(uae_u32 /* new_rounding_mode */ ) + { } #endif @@ -143,11 +148,11 @@ static inline void FFPU set_rounding_mode(uae_u32 new_rounding_mode) /* Return the current rounding precision in m68k format */ static inline uae_u32 FFPU get_rounding_precision(void) - { return FPU fpcr.rounding_precision; } + { return FPU fpcr & FPCR_ROUNDING_PRECISION; } /* Convert and set to native rounding precision */ -static inline void FFPU set_rounding_precision(uae_u32 new_rounding_precision) - { FPU fpcr.rounding_precision = new_rounding_precision; } +static inline void FFPU set_rounding_precision(uae_u32 /* new_rounding_precision */) + { } #endif diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h index 778567a98..50e07ec20 100644 --- a/BasiliskII/src/uae_cpu/fpu/types.h +++ b/BasiliskII/src/uae_cpu/fpu/types.h @@ -1,28 +1,33 @@ /* - * types.h - basic types for fpu registers + * fpu/types.h - basic types for fpu registers * - * Basilisk II (C) 1997-2008 Christian Bauer + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * MC68881/68040 fpu emulation - * - * Original UAE FPU, copyright 1996 Herman ten Brugge - * Rewrite for x86, copyright 1999-2000 Lauri Pesonen - * New framework, copyright 2000 Gwenole Beauchesne - * Adapted for JIT compilation (c) Bernd Meyer, 2000 - * - * 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 file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * 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. + * MC68881/68040 fpu emulation * - * 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 + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifndef FPU_TYPES_H @@ -106,9 +111,11 @@ typedef uae_f32 fpu_single; #elif defined(FPU_IEEE) -// #if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT -// #error "No IEEE float format, you lose." -// #endif +#if 0 +#if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT +#error "No IEEE float format, you lose." +#endif +#endif /* 4-byte floats */ #if SIZEOF_FLOAT == 4 @@ -133,7 +140,7 @@ typedef long double uae_f64; typedef long double uae_f96; typedef uae_f96 fpu_register; #define USE_LONG_DOUBLE 1 -#elif SIZEOF_LONG_DOUBLE == 16 && (defined(__i386__) || defined(__x86_64__)) +#elif SIZEOF_LONG_DOUBLE == 16 && (defined(CPU_i386) || defined(CPU_x86_64) || defined(CPU_ia64)) /* Long doubles on x86-64 are really held in old x87 FPU stack. */ typedef long double uae_f128; typedef uae_f128 fpu_register; @@ -154,6 +161,23 @@ typedef fpu_register fpu_extended; typedef uae_f64 fpu_double; typedef uae_f32 fpu_single; +#elif defined(FPU_MPFR) + +#include + +struct fpu_register { + mpfr_t f; + uae_u64 nan_bits; + int nan_sign; + operator long double (); + fpu_register &operator=(long double); +}; + #endif +union fpu_register_parts { + fpu_register val; + uae_u32 parts[sizeof(fpu_register) / 4]; +}; + #endif /* FPU_TYPES_H */ diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index 5ab3895ab..e28c370ae 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -1,3 +1,27 @@ +/* + * gencpu.c - m68k emulation generator + * + * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ /* * UAE - The Un*x Amiga Emulator * @@ -14,42 +38,26 @@ * take care of this. * * Copyright 1995, 1996 Bernd Schmidt - * - * 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 -#include -#include -#include +#define CC_FOR_BUILD 1 #include "sysdeps.h" #include "readcpu.h" -#if defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) -#define SPARC_ASSEMBLY 0 -#endif +#include +#include +#include +#include +#include +#undef abort #define BOOL_TYPE "int" - -/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ -#define xBCD_KEEPS_NV_FLAGS 4 +#define VERIFY_MMU_GENAMODE 0 static FILE *headerfile; static FILE *stblfile; +static FILE *functblfile; static int using_prefetch; static int using_exception_3; @@ -65,6 +73,23 @@ static int *opcode_next_clev; static int *opcode_last_postfix; static unsigned long *counts; +#define GENA_GETV_NO_FETCH 0 +#define GENA_GETV_FETCH 1 +#define GENA_GETV_FETCH_ALIGN 2 +#define GENA_MOVEM_DO_INC 0 +#define GENA_MOVEM_NO_INC 1 +#define GENA_MOVEM_MOVE16 2 + +#define XLATE_LOG 0 +#define XLATE_PHYS 1 +#define XLATE_SFC 2 +#define XLATE_DFC 3 +static char * mem_prefix[4] = { "", "phys_", "sfc_", "dfc_" }; + +/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ +#define xBCD_KEEPS_N_FLAG 4 +#define xBCD_KEEPS_V_FLAG 3 + static void read_counts (void) { FILE *file; @@ -75,7 +100,8 @@ static void read_counts (void) file = fopen ("frequent.68k", "r"); if (file) { - fscanf (file, "Total: %lu\n", &total); + int c = fscanf (file, "Total: %lu\n", &total); + assert(c == 1); while (fscanf (file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { opcode_next_clev[nr] = 4; opcode_last_postfix[nr] = -1; @@ -106,7 +132,6 @@ static int need_endlabel; static int n_braces = 0; static int m68k_pc_offset = 0; -static int insn_n_cycles; static void start_brace (void) { @@ -159,9 +184,8 @@ static const char *gen_nextilong (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 4; - insn_n_cycles += 4; + m68k_pc_offset += 4; if (using_prefetch) sprintf (buffer, "get_ilong_prefetch(%d)", r); @@ -174,9 +198,8 @@ static const char *gen_nextiword (void) { static char buffer[80]; int r = m68k_pc_offset; - m68k_pc_offset += 2; - insn_n_cycles += 2; + m68k_pc_offset += 2; if (using_prefetch) sprintf (buffer, "get_iword_prefetch(%d)", r); @@ -191,8 +214,6 @@ static const char *gen_nextibyte (void) int r = m68k_pc_offset; m68k_pc_offset += 2; - insn_n_cycles += 2; - if (using_prefetch) sprintf (buffer, "get_ibyte_prefetch(%d)", r); else @@ -214,9 +235,22 @@ static void fill_prefetch_2 (void) static void swap_opcode (void) { - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - printf ("\topcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF);\n"); - printf ("#endif\n"); + printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + printf ("\topcode = do_byteswap_16(opcode);\n"); + printf("#endif\n"); +} + +static void real_opcode (int *have) +{ + if (!*have) + { + printf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); + printf ("\tuae_u32 real_opcode = do_byteswap_16(opcode);\n"); + printf("#else\n"); + printf ("\tuae_u32 real_opcode = opcode;\n"); + printf("#endif\n"); + *have = 1; + } } static void sync_m68k_pc (void) @@ -238,33 +272,49 @@ static void sync_m68k_pc (void) m68k_pc_offset = 0; } +static void gen_set_fault_pc (void) +{ + sync_m68k_pc(); + printf ("regs.fault_pc = m68k_getpc ();\n"); + m68k_pc_offset = 0; +} + /* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, * the calling routine handles Apdi and Aipi modes. * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ -static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) + +/* fixup indicates if we want to fix up adress registers in pre decrement + * or post increment mode now (0) or later (1). A value of 2 will then be + * used to do the actual fix up. This allows to do all memory readings + * before any register is modified, and so to rerun operation without + * side effect in case a bus fault is generated by any memory access. + * XJ - 2006/11/13 */ +static void genamode2 (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag, int fixup) { + if (fixup != 2) + { start_brace (); switch (mode) { case Dreg: if (movem) abort (); - if (getv == 1) + if (getv == GENA_GETV_FETCH) switch (size) { case sz_byte: -#if defined(AMIGA) && !defined(WARPUP) + printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); /* sam: I don't know why gcc.2.7.2.1 produces a code worse */ /* if it is not done like that: */ printf ("\tuae_s8 %s = ((uae_u8*)&m68k_dreg(regs, %s))[3];\n", name, reg); -#else + printf("#else\n"); printf ("\tuae_s8 %s = m68k_dreg(regs, %s);\n", name, reg); -#endif + printf("#endif\n"); break; case sz_word: -#if defined(AMIGA) && !defined(WARPUP) + printf("\n#if defined(AMIGA) && !defined(WARPUP)\n"); printf ("\tuae_s16 %s = ((uae_s16*)&m68k_dreg(regs, %s))[1];\n", name, reg); -#else + printf("#else\n"); printf ("\tuae_s16 %s = m68k_dreg(regs, %s);\n", name, reg); -#endif + printf("#endif\n"); break; case sz_long: printf ("\tuae_s32 %s = m68k_dreg(regs, %s);\n", name, reg); @@ -276,7 +326,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge case Areg: if (movem) abort (); - if (getv == 1) + if (getv == GENA_GETV_FETCH) switch (size) { case sz_word: printf ("\tuae_s16 %s = m68k_areg(regs, %s);\n", name, reg); @@ -303,10 +353,16 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge printf ("\tuaecptr %sa = m68k_areg(regs, %s) - areg_byteinc[%s];\n", name, reg, reg); break; case sz_word: - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 2); + if (movem) + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + else + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 2;\n", name, reg); break; case sz_long: - printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 4); + if (movem) + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + else + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - 4;\n", name, reg); break; default: abort (); @@ -351,7 +407,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge printf ("\tuaecptr %sa = %s;\n", name, gen_nextilong ()); break; case imm: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); switch (size) { case sz_byte: @@ -368,22 +424,22 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge } return; case imm0: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s8 %s = %s;\n", name, gen_nextibyte ()); return; case imm1: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s16 %s = %s;\n", name, gen_nextiword ()); return; case imm2: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_s32 %s = %s;\n", name, gen_nextilong ()); return; case immi: - if (getv != 1) + if (getv != GENA_GETV_FETCH) abort (); printf ("\tuae_u32 %s = %s;\n", name, reg); return; @@ -394,7 +450,7 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge /* We get here for all non-reg non-immediate addressing modes to * actually fetch the value. */ - if (using_exception_3 && getv != 0 && size != sz_byte) { + if (using_exception_3 && getv != GENA_GETV_NO_FETCH && size != sz_byte) { printf ("\tif ((%sa & 1) != 0) {\n", name); printf ("\t\tlast_fault_for_exception_3 = %sa;\n", name); printf ("\t\tlast_op_for_exception_3 = opcode;\n"); @@ -406,20 +462,29 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge start_brace (); } - if (getv == 1) { + if (getv == GENA_GETV_FETCH) { switch (size) { - case sz_byte: insn_n_cycles += 2; break; - case sz_word: insn_n_cycles += 2; break; - case sz_long: insn_n_cycles += 4; break; + case sz_byte: break; + case sz_word: break; + case sz_long: break; default: abort (); } start_brace (); + printf("\n#ifdef FULLMMU\n"); switch (size) { - case sz_byte: printf ("\tuae_s8 %s = get_byte(%sa);\n", name, name); break; - case sz_word: printf ("\tuae_s16 %s = get_word(%sa);\n", name, name); break; - case sz_long: printf ("\tuae_s32 %s = get_long(%sa);\n", name, name); break; + case sz_byte: printf ("\tuae_s8 %s = %sget_byte(%sa);\n", name, mem_prefix[xlateflag], name); break; + case sz_word: printf ("\tuae_s16 %s = %sget_word(%sa);\n", name, mem_prefix[xlateflag], name); break; + case sz_long: printf ("\tuae_s32 %s = %sget_long(%sa);\n", name, mem_prefix[xlateflag], name); break; default: abort (); } + printf("#else\n"); + switch (size) { + case sz_byte: printf ("\tuae_s8 %s = phys_get_byte(%sa);\n", name, name); break; + case sz_word: printf ("\tuae_s16 %s = phys_get_word(%sa);\n", name, name); break; + case sz_long: printf ("\tuae_s32 %s = phys_get_long(%sa);\n", name, name); break; + default: abort (); + } + printf("#endif\n"); } /* We now might have to fix up the register for pre-dec or post-inc @@ -427,6 +492,12 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge if (!movem) switch (mode) { case Aipi: + if (fixup == 1) + { + printf ("\tfixup.flag = 1;\n"); + printf ("\tfixup.reg = %s;\n", reg); + printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); + } switch (size) { case sz_byte: printf ("\tm68k_areg(regs, %s) += areg_byteinc[%s];\n", reg, reg); @@ -442,14 +513,39 @@ static void genamode (amodes mode, char *reg, wordsizes size, char *name, int ge } break; case Apdi: + if (fixup == 1) + { + printf ("\tfixup.flag = 1;\n"); + printf ("\tfixup.reg = %s;\n", reg); + printf ("\tfixup.value = m68k_areg(regs, %s);\n", reg); + } printf ("\tm68k_areg (regs, %s) = %sa;\n", reg, name); break; default: break; } + + } + else /* (fixup != 2) */ + { + if (!movem) + switch (mode) { + case Aipi: + case Apdi: + printf ("\tfixup.flag = 0;\n"); + break; + default: + break; + } + } } -static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) +static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem, int xlateflag) +{ + genamode2 (mode, reg, size, name, getv, movem, xlateflag, 0); +} + +static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to, int xlateflag) { switch (mode) { case Dreg: @@ -489,28 +585,32 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char case absl: case PC16: case PC8r: - if (using_prefetch) - sync_m68k_pc (); + gen_set_fault_pc (); + printf("#ifdef FULLMMU\n"); switch (size) { case sz_byte: - insn_n_cycles += 2; + printf ("\t%sput_byte(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_byte(%sa,%s);\n", to, from); break; case sz_word: - insn_n_cycles += 2; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); + printf ("\t%sput_word(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_word(%sa,%s);\n", to, from); break; case sz_long: - insn_n_cycles += 4; if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) abort (); + printf ("\t%sput_long(%sa,%s);\n", mem_prefix[xlateflag], to, from); + printf("#else\n"); printf ("\tput_long(%sa,%s);\n", to, from); break; default: abort (); } + printf("#endif\n"); break; case imm: case imm0: @@ -526,23 +626,33 @@ static void genastore (char *from, amodes mode, char *reg, wordsizes size, char static void genmovemel (uae_u16 opcode) { - char getcode[100]; + char getcode1[100]; + char getcode2[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; - + if (table68k[opcode].size == sz_long) { - strcpy (getcode, "get_long(srca)"); + strcpy (getcode1, ""); + strcpy (getcode2, "get_long(srca)"); } else { - strcpy (getcode, "(uae_s32)(uae_s16)get_word(srca)"); + strcpy (getcode1, "(uae_s32)(uae_s16)"); + strcpy (getcode2, "get_word(srca)"); } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); printf ("\tunsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); start_brace (); - printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s; srca += %d; dmask = movem_next[dmask]; }\n", - getcode, size); - printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s; srca += %d; amask = movem_next[amask]; }\n", - getcode, size); + printf("\n#ifdef FULLMMU\n"); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s%s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode1, getcode2, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s%s; srca += %d; amask = movem_next[amask]; }\n", + getcode1, getcode2, size); + printf("#else\n"); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %sphys_%s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode1, getcode2, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %sphys_%s; srca += %d; amask = movem_next[amask]; }\n", + getcode1, getcode2, size); + printf("#endif\n"); if (table68k[opcode].dmode == Aipi) printf ("\tm68k_areg(regs, dstreg) = srca;\n"); @@ -552,6 +662,7 @@ static void genmovemle (uae_u16 opcode) { char putcode[100]; int size = table68k[opcode].size == sz_long ? 4 : 2; + if (table68k[opcode].size == sz_long) { strcpy (putcode, "put_long(srca,"); } else { @@ -559,24 +670,38 @@ static void genmovemle (uae_u16 opcode) } printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); - if (using_prefetch) - sync_m68k_pc (); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", + GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC, XLATE_LOG); + sync_m68k_pc (); start_brace (); if (table68k[opcode].dmode == Apdi) { printf ("\tuae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;\n"); + printf("#ifdef FULLMMU\n"); printf ("\twhile (amask) { srca -= %d; %s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", size, putcode); printf ("\twhile (dmask) { srca -= %d; %s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", size, putcode); + printf("#else\n"); + printf ("\twhile (amask) { srca -= %d; phys_%s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", + size, putcode); + printf ("\twhile (dmask) { srca -= %d; phys_%s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", + size, putcode); + printf("#endif\n"); printf ("\tm68k_areg(regs, dstreg) = srca;\n"); } else { printf ("\tuae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); + printf("#ifdef FULLMMU\n"); printf ("\twhile (dmask) { %s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", putcode, size); printf ("\twhile (amask) { %s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", putcode, size); + printf("#else\n"); + printf ("\twhile (dmask) { phys_%s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", + putcode, size); + printf ("\twhile (amask) { phys_%s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", + putcode, size); + printf("#endif\n"); } } @@ -649,12 +774,10 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * break; case flag_add: - start_brace (); printf ("uae_u32 %s = %s + %s;\n", value, dstr, sstr); break; case flag_sub: case flag_cmp: - start_brace (); printf ("uae_u32 %s = %s - %s;\n", value, dstr, sstr); break; } @@ -673,7 +796,6 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * case flag_cmp: case flag_av: case flag_sv: - start_brace (); printf ("\t" BOOL_TYPE " flgs = %s < 0;\n", sstr); printf ("\t" BOOL_TYPE " flgo = %s < 0;\n", dstr); printf ("\t" BOOL_TYPE " flgn = %s < 0;\n", vstr); @@ -697,10 +819,10 @@ static void genflags_normal (flagtypes type, wordsizes size, char *value, char * printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); break; case flag_z: - printf ("\tSET_ZFLG (GET_ZFLG() & (%s == 0));\n", vstr); + printf ("\tSET_ZFLG (GET_ZFLG () & (%s == 0));\n", vstr); break; case flag_zn: - printf ("\tSET_ZFLG (GET_ZFLG() & (%s == 0));\n", vstr); + printf ("\tSET_ZFLG (GET_ZFLG () & (%s == 0));\n", vstr); printf ("\tSET_NFLG (%s < 0);\n", vstr); break; case flag_add: @@ -741,11 +863,13 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch /* Temporarily deleted 68k/ARM flag optimizations. I'd prefer to have them in the appropriate m68k.h files and use just one copy of this code here. The API can be changed if necessary. */ -#ifdef OPTIMIZED_FLAGS + int done = 0; + + start_brace (); + printf("\n#ifdef OPTIMIZED_FLAGS\n"); switch (type) { case flag_add: case flag_sub: - start_brace (); printf ("\tuae_u32 %s;\n", value); break; default: @@ -755,7 +879,7 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch /* At least some of those casts are fairly important! */ switch (type) { case flag_logical_noclobber: - printf ("\t{uae_u32 oldcznv = GET_CZNV & ~(FLAGVAL_Z | FLAGVAL_N);\n"); + printf ("\t{uae_u32 oldcznv = GET_CZNV() & ~(FLAGVAL_Z | FLAGVAL_N);\n"); if (strcmp (value, "0") == 0) { printf ("\tSET_CZNV (olcznv | FLAGVAL_Z);\n"); } else { @@ -767,8 +891,9 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch printf ("\tIOR_CZNV (oldcznv);\n"); } printf ("\t}\n"); - return; - + done = 1; + break; + case flag_logical: if (strcmp (value, "0") == 0) { printf ("\tSET_CZNV (FLAGVAL_Z);\n"); @@ -779,7 +904,8 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; } } - return; + done = 1; + break; case flag_add: switch (size) { @@ -787,7 +913,8 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; case sz_long: printf ("\toptflag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - return; + done = 1; + break; case flag_sub: switch (size) { @@ -795,7 +922,8 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; case sz_long: printf ("\toptflag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; } - return; + done = 1; + break; case flag_cmp: switch (size) { @@ -803,13 +931,19 @@ static void genflags (flagtypes type, wordsizes size, char *value, char *src, ch case sz_word: printf ("\toptflag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; case sz_long: printf ("\toptflag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; } - return; + done = 1; + break; default: break; } -#endif + if (done) + printf("#else\n"); + else + printf("#endif\n"); genflags_normal (type, size, value, src, dst); + if (done) + printf("#endif\n"); } static void force_range_for_rox (const char *var, wordsizes size) @@ -837,7 +971,7 @@ static const char *cmask (wordsizes size) case sz_byte: return "0x80"; case sz_word: return "0x8000"; case sz_long: return "0x80000000"; - default: abort (); + default: abort (); return NULL; } } @@ -849,11 +983,10 @@ static int source_is_imm1_8 (struct instr *i) static void gen_opcode (unsigned long int opcode) { struct instr *curi = table68k + opcode; - insn_n_cycles = 2; start_brace (); #if 0 - printf ("uae_u8 *m68k_pc = regs.pc_p;\n"); + printf ("uae_u8 *m68k_pc = m68k_getpc();\n"); #endif m68k_pc_offset = 2; switch (curi->plev) { @@ -883,16 +1016,16 @@ static void gen_opcode (unsigned long int opcode) case i_OR: case i_AND: case i_EOR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tsrc %c= dst;\n", curi->mnemo == i_OR ? '|' : curi->mnemo == i_AND ? '&' : '^'); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ORSR: case i_EORSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) { printf ("\tsrc &= 0xFF;\n"); } @@ -901,7 +1034,7 @@ static void gen_opcode (unsigned long int opcode) break; case i_ANDSR: printf ("\tMakeSR();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) { printf ("\tsrc |= 0xFF00;\n"); } @@ -909,81 +1042,89 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SUB: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_sub, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_SUBA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = dst - src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_SUBX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); - printf ("\tuae_u32 newv = dst - src - (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_SBCD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); - printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG () ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); printf ("\tuae_u16 newv, tmp_newv;\n"); printf ("\tint bcd = 0;\n"); printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); printf ("\tif (newv_lo & 0xF0) { newv -= 6; bcd = 6; };\n"); - printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG() ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); - printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG() ? 1 : 0)) & 0x300) > 0xFF);\n"); + printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG () ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); + printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG () ? 1 : 0)) & 0x300) > 0xFF);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); } - else { - genflags (flag_zn, curi->size, "newv", "", ""); - printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); } - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ADD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_add, curi->size, "newv", "src", "dst"); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ADDA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = dst + src;\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_ADDX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); - printf ("\tuae_u32 newv = dst + src + (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);\n"); genflags (flag_addx, curi->size, "newv", "src", "dst"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_ABCD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); start_brace (); - printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG () ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); printf ("\tuae_u16 newv, tmp_newv;\n"); printf ("\tint cflg;\n"); @@ -993,75 +1134,85 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (cflg) newv += 0x60;\n"); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry (); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); } - else { - genflags (flag_zn, curi->size, "newv", "", ""); - printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); } - genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_NEG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_sub, curi->size, "dst", "src", "0"); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NEGX: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); - printf ("\tuae_u32 newv = 0 - src - (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);\n"); genflags (flag_subx, curi->size, "newv", "src", "0"); genflags (flag_zn, curi->size, "newv", "", ""); - genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NBCD: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); - printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG() ? 1 : 0);\n"); + printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);\n"); printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); printf ("\tuae_u16 newv;\n"); - printf ("\tint cflg;\n"); + printf ("\tint cflg, tmp_newv;\n"); + printf ("\ttmp_newv = newv_hi + newv_lo;\n"); printf ("\tif (newv_lo > 9) { newv_lo -= 6; }\n"); printf ("\tnewv = newv_hi + newv_lo;\n"); printf ("\tcflg = (newv & 0x1F0) > 0x90;\n"); printf ("\tif (cflg) newv -= 0x60;\n"); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry(); - /* Manual says bits NV are undefined though a real 68040 don't change them */ - if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { - if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) - next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; - genflags (flag_z, curi->size, "newv", "", ""); + /* Manual says bits NV are undefined though a real 68030 doesn't change V and 68040/060 don't change both */ + if (cpu_level >= xBCD_KEEPS_N_FLAG) { + if (next_cpu_level < xBCD_KEEPS_N_FLAG) + next_cpu_level = xBCD_KEEPS_N_FLAG - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } else { + genflags (flag_zn, curi->size, "newv", "", ""); } - else { - genflags (flag_zn, curi->size, "newv", "", ""); + if (cpu_level >= xBCD_KEEPS_V_FLAG) { + if (next_cpu_level < xBCD_KEEPS_V_FLAG) + next_cpu_level = xBCD_KEEPS_V_FLAG - 1; + } else { + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); } - genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + genastore ("newv", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_CLR: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "0", "", ""); - genastore ("0", curi->smode, "srcreg", curi->size, "src"); + genastore ("0", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_NOT: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 dst = ~src;\n"); genflags (flag_logical, curi->size, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_TST: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "src", "", ""); break; case i_BTST: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else @@ -1069,55 +1220,55 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); break; case i_BCHG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tdst ^= (1 << src);\n"); printf ("\tSET_ZFLG (((uae_u32)dst & (1 << src)) >> src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_BCLR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst &= ~(1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_BSET: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tsrc &= 7;\n"); else printf ("\tsrc &= 31;\n"); printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); printf ("\tdst |= (1 << src);\n"); - genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_CMPM: case i_CMP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_cmp, curi->size, "newv", "src", "dst"); break; case i_CMPA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); genflags (flag_cmp, sz_long, "newv", "src", "dst"); break; /* The next two are coded a little unconventional, but they are doing * weird things... */ case i_MVPRM: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tuaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); if (curi->size == sz_word) { @@ -1129,41 +1280,45 @@ static void gen_opcode (unsigned long int opcode) break; case i_MVPMR: printf ("\tuaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_word) { - printf ("\tuae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2);\n"); + printf ("\tuae_u16 val = get_byte(memp) << 8;\n"); + printf ("\t val |= get_byte(memp + 2);\n"); } else { - printf ("\tuae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16)\n"); - printf (" + (get_byte(memp + 4) << 8) + get_byte(memp + 6);\n"); + printf ("\tuae_u32 val = get_byte(memp) << 24;\n"); + printf ("\t val |= get_byte(memp + 2) << 16;\n"); + printf ("\t val |= get_byte(memp + 4) << 8;\n"); + printf ("\t val |= get_byte(memp + 6);\n"); } - genastore ("val", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("val", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_MOVE: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); genflags (flag_logical, curi->size, "src", "", ""); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_MOVEA: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_word) { printf ("\tuae_u32 val = (uae_s32)(uae_s16)src;\n"); } else { printf ("\tuae_u32 val = src;\n"); } - genastore ("val", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("val", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_MVSR2: - genamode (curi->smode, "srcreg", sz_word, "src", 2, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tMakeSR();\n"); if (curi->size == sz_byte) - genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src"); + genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); else - genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src"); + genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src", XLATE_LOG); break; case i_MV2SR: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); if (curi->size == sz_byte) printf ("\tMakeSR();\n\tregs.sr &= 0xFF00;\n\tregs.sr |= src & 0xFF;\n"); else { @@ -1172,66 +1327,84 @@ static void gen_opcode (unsigned long int opcode) printf ("\tMakeFromSR();\n"); break; case i_SWAP: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16);\n"); genflags (flag_logical, sz_long, "dst", "", ""); - genastore ("dst", curi->smode, "srcreg", sz_long, "src"); + genastore ("dst", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); break; case i_EXG: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genastore ("dst", curi->smode, "srcreg", curi->size, "src"); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("dst", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_EXT: - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { - case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; - case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; - default: abort (); + case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; + case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; + default: abort (); } genflags (flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); genastore ("dst", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src"); + curi->size == sz_word ? sz_word : sz_long, "src", XLATE_LOG); break; case i_MVMEL: - genmovemel ((uae_u16)opcode); + genmovemel (opcode); break; case i_MVMLE: - genmovemle ((uae_u16)opcode); + genmovemle (opcode); break; case i_TRAP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - sync_m68k_pc (); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + gen_set_fault_pc (); printf ("\tException(src+32,0);\n"); - m68k_pc_offset = 0; break; case i_MVR2USP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tregs.usp = src;\n"); break; case i_MVUSP2R: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); - genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_RESET: + printf ("\tAtariReset();\n"); break; case i_NOP: break; case i_STOP: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tregs.sr = src;\n"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + /* + * STOP undocumented features: + * if SR is not set: + * 68000 (68010?): Update SR, increase PC and then cause privilege violation exception (handled in newcpu) + * 68000 (68010?): Traced STOP also runs 4 cycles faster. + * 68020 68030: STOP works normally + * 68040 68060: Immediate privilege violation exception + */ + printf ("\tuae_u16 sr = src;\n"); + if (cpu_level >= 4) { + printf("\tif (!(sr & 0x2000)) {\n"); + printf ("m68k_incpc(%d);\n", m68k_pc_offset); + printf("\t\tException(8,0); goto %s;\n", endlabelstr); + printf("\t}\n"); + } + printf("\tregs.sr = sr;\n"); printf ("\tMakeFromSR();\n"); printf ("\tm68k_setstopped(1);\n"); + sync_m68k_pc (); + /* STOP does not prefetch anything */ + /* did_prefetch = -1; */ break; case i_RTE: if (cpu_level == 0) { - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tregs.sr = sr; m68k_setpc_rte(pc);\n"); fill_prefetch_0 (); printf ("\tMakeFromSR();\n"); @@ -1240,15 +1413,14 @@ static void gen_opcode (unsigned long int opcode) if (next_cpu_level < 0) next_cpu_level = 0; printf ("\tuae_u16 newsr; uae_u32 newpc; for (;;) {\n"); - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); - genamode (Aipi, "7", sz_word, "format", 1, 0); + genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_word, "format", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tnewsr = sr; newpc = pc;\n"); printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); - /* gb-- the next two lines are deleted in Bernie's gencpu.c */ - printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); +// printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); printf ("\telse if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; }\n"); @@ -1266,8 +1438,8 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_RTD: - genamode (Aipi, "7", sz_long, "pc", 1, 0); - genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tm68k_areg(regs, 7) += offs;\n"); printf ("\tm68k_setpc_rte(pc);\n"); fill_prefetch_0 (); @@ -1275,18 +1447,18 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_LINK: - genamode (Apdi, "7", sz_long, "old", 2, 0); - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - genastore ("src", Apdi, "7", sz_long, "old"); - genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src"); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Apdi, "7", sz_long, "old", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src", XLATE_LOG); printf ("\tm68k_areg(regs, 7) += offs;\n"); + genastore ("src", Apdi, "7", sz_long, "old", XLATE_LOG); break; case i_UNLK: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tm68k_areg(regs, 7) = src;\n"); - genamode (Aipi, "7", sz_long, "old", 1, 0); - genastore ("old", curi->smode, "srcreg", curi->size, "src"); + genamode (Aipi, "7", sz_long, "old", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("old", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_RTS: printf ("\tm68k_do_rts();\n"); @@ -1294,14 +1466,16 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_TRAPV: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); sync_m68k_pc (); - printf ("\tif (GET_VFLG()) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); + printf ("\tif (GET_VFLG ()) { Exception(7,oldpc); goto %s; }\n", endlabelstr); need_endlabel = 1; break; case i_RTR: printf ("\tMakeSR();\n"); - genamode (Aipi, "7", sz_word, "sr", 1, 0); - genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 1); + genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode2 (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG, 2); printf ("\tregs.sr &= 0xFF00; sr &= 0xFF;\n"); printf ("\tregs.sr |= sr; m68k_setpc(pc);\n"); fill_prefetch_0 (); @@ -1309,19 +1483,19 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_JSR: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tm68k_do_jsr(m68k_getpc() + %d, srca);\n", m68k_pc_offset); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_JMP: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tm68k_setpc(srca);\n"); fill_prefetch_0 (); m68k_pc_offset = 0; break; case i_BSR: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); printf ("\tuae_s32 s = (uae_s32)src + 2;\n"); if (using_exception_3) { printf ("\tif (src & 1) {\n"); @@ -1336,18 +1510,6 @@ static void gen_opcode (unsigned long int opcode) m68k_pc_offset = 0; break; case i_Bcc: - if (0 && !using_prefetch && !using_exception_3 && (cpu_level >= 2)) { - /* gb-- variant probably more favorable to compiler optimizations - also assumes no prefetch buffer is used - Hmm, that would make sense with processors capable of conditional moves */ - if (curi->size == sz_long && next_cpu_level < 1) - next_cpu_level = 1; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tm68k_incpc (cctrue(%d) ? ((uae_s32)src + 2) : %d);\n", curi->cc, m68k_pc_offset); - m68k_pc_offset = 0; - } - else { - /* original code for branch instructions */ if (curi->size == sz_long) { if (cpu_level < 2) { printf ("\tm68k_incpc(2);\n"); @@ -1361,8 +1523,8 @@ static void gen_opcode (unsigned long int opcode) next_cpu_level = 1; } } - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - printf ("\tif (!cctrue(%d)) goto didnt_jump;\n", curi->cc); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_PHYS); + printf ("\tif (!cctrue(%d)) goto didnt_jump_%lx;\n", curi->cc, opcode); if (using_exception_3) { printf ("\tif (src & 1) {\n"); printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); @@ -1374,26 +1536,25 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_incpc ((uae_s32)src + 2);\n"); fill_prefetch_0 (); printf ("return;\n"); - printf ("didnt_jump:;\n"); + printf ("didnt_jump_%lx:;\n", opcode); need_endlabel = 1; - } break; case i_LEA: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); break; case i_PEA: - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (Apdi, "7", sz_long, "dst", 2, 0); - genastore ("srca", Apdi, "7", sz_long, "dst"); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (Apdi, "7", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); + genastore ("srca", Apdi, "7", sz_long, "dst", XLATE_LOG); break; case i_DBcc: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tif (!cctrue(%d)) {\n", curi->cc); - genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src"); + genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); printf ("\t\tif (src) {\n"); if (using_exception_3) { @@ -1412,15 +1573,15 @@ static void gen_opcode (unsigned long int opcode) need_endlabel = 1; break; case i_Scc: - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint val = cctrue(%d) ? 0xff : 0;\n", curi->cc); - genastore ("val", curi->smode, "srcreg", curi->size, "src"); + genastore ("val", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_DIVU: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); /* Clear V flag when dividing by zero - Alcatraz Odyssey demo depends * on this (actually, it's doing a DIVS). */ @@ -1432,16 +1593,15 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); printf ("\t}\n"); printf ("\t}\n"); - insn_n_cycles += 68; need_endlabel = 1; break; case i_DIVS: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); printf ("\tif (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto %s; } else {\n", endlabelstr); printf ("\tuae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;\n"); @@ -1450,34 +1610,31 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;\n"); genflags (flag_logical, sz_word, "newv", "", ""); printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); printf ("\t}\n"); printf ("\t}\n"); - insn_n_cycles += 72; need_endlabel = 1; break; case i_MULU: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); - insn_n_cycles += 32; + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_MULS: - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tuae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;\n"); genflags (flag_logical, sz_long, "newv", "", ""); - genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); - insn_n_cycles += 32; + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst", XLATE_LOG); break; case i_CHK: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tif ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto %s; }\n", endlabelstr); printf ("\telse if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto %s; }\n", endlabelstr); need_endlabel = 1; @@ -1485,8 +1642,8 @@ static void gen_opcode (unsigned long int opcode) case i_CHK2: printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\t{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];\n"); switch (curi->size) { case sz_byte: @@ -1505,13 +1662,13 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tSET_ZFLG (upper == reg || lower == reg);\n"); printf ("\tSET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); - printf ("\tif ((extra & 0x800) && GET_CFLG()) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); + printf ("\tif ((extra & 0x800) && GET_CFLG ()) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); need_endlabel = 1; break; case i_ASR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1523,7 +1680,7 @@ static void gen_opcode (unsigned long int opcode) printf ("\tcnt &= 63;\n"); printf ("\tCLEAR_CZNV();\n"); printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); - printf ("\t\tval = %s & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size)); + printf ("\t\tval = %s & (uae_u32)-sign;\n", bit_mask (curi->size)); printf ("\t\tSET_CFLG (sign);\n"); duplicate_carry (); if (source_is_imm1_8 (curi)) @@ -1534,17 +1691,17 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tSET_CFLG (val & 1);\n"); duplicate_carry (); printf ("\t\tval >>= 1;\n"); - printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-(uae_s32)sign;\n", + printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-sign;\n", bit_mask (curi->size), bit_size (curi->size)); printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ASL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1576,11 +1733,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_LSR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1605,11 +1762,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\t\tval >>= 1;\n"); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_LSL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1635,11 +1792,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1662,11 +1819,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG (val & 1);\n"); printf ("}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1689,11 +1846,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); printf ("\t}\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROXL: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1713,17 +1870,17 @@ static void gen_opcode (unsigned long int opcode) printf ("\t{\n\tuae_u32 carry;\n"); printf ("\tuae_u32 loval = val >> (%d - cnt);\n", bit_size (curi->size) - 1); printf ("\tcarry = loval & 1;\n"); - printf ("\tval = (((val << 1) | GET_XFLG()) << cnt) | (loval >> 1);\n"); + printf ("\tval = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);\n"); printf ("\tSET_XFLG (carry);\n"); printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t} }\n"); - printf ("\tSET_CFLG (GET_XFLG());\n"); + printf ("\tSET_CFLG (GET_XFLG ());\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ROXR: - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1741,7 +1898,7 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tcnt--;\n"); printf ("\t{\n\tuae_u32 carry;\n"); - printf ("\tuae_u32 hival = (val << 1) | GET_XFLG();\n"); + printf ("\tuae_u32 hival = (val << 1) | GET_XFLG ();\n"); printf ("\thival <<= (%d - cnt);\n", bit_size (curi->size) - 1); printf ("\tval >>= cnt;\n"); printf ("\tcarry = val & 1;\n"); @@ -1750,12 +1907,12 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_XFLG (carry);\n"); printf ("\tval &= %s;\n", bit_mask (curi->size)); printf ("\t} }\n"); - printf ("\tSET_CFLG (GET_XFLG());\n"); + printf ("\tSET_CFLG (GET_XFLG ());\n"); genflags (flag_logical_noclobber, curi->size, "val", "", ""); - genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + genastore ("val", curi->dmode, "dstreg", curi->size, "data", XLATE_LOG); break; case i_ASRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1769,10 +1926,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("\tSET_CFLG (cflg);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ASLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1788,11 +1945,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tSET_CFLG (sign != 0);\n"); duplicate_carry (); - printf ("\tSET_VFLG (GET_VFLG() | (sign2 != sign));\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + printf ("\tSET_VFLG (GET_VFLG () | (sign2 != sign));\n"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_LSRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; @@ -1805,10 +1962,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_LSLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1821,10 +1978,10 @@ static void gen_opcode (unsigned long int opcode) genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1837,10 +1994,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= 1;\n"); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_RORW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1853,10 +2010,10 @@ static void gen_opcode (unsigned long int opcode) printf ("\tif (carry) val |= %s;\n", cmask (curi->size)); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROXLW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1866,14 +2023,14 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tuae_u32 carry = val & %s;\n", cmask (curi->size)); printf ("\tval <<= 1;\n"); - printf ("\tif (GET_XFLG()) val |= 1;\n"); + printf ("\tif (GET_XFLG ()) val |= 1;\n"); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_ROXRW: - genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); switch (curi->size) { case sz_byte: printf ("\tuae_u8 val = data;\n"); break; @@ -1883,107 +2040,133 @@ static void gen_opcode (unsigned long int opcode) } printf ("\tuae_u32 carry = val & 1;\n"); printf ("\tval >>= 1;\n"); - printf ("\tif (GET_XFLG()) val |= %s;\n", cmask (curi->size)); + printf ("\tif (GET_XFLG ()) val |= %s;\n", cmask (curi->size)); genflags (flag_logical, curi->size, "val", "", ""); printf ("SET_CFLG (carry);\n"); duplicate_carry (); - genastore ("val", curi->smode, "srcreg", curi->size, "data"); + genastore ("val", curi->smode, "srcreg", curi->size, "data", XLATE_LOG); break; case i_MOVEC2: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (! m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tif (!m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_MOVE2C: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint regno = (src >> 12) & 15;\n"); printf ("\tuae_u32 *regp = regs.regs + regno;\n"); - printf ("\tif (! m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + printf ("\tif (!m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); break; case i_CAS: { int old_brace_level; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); printf ("\tint ru = (src >> 6) & 7;\n"); printf ("\tint rc = src & 7;\n"); genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc)", "dst"); - printf ("\tif (GET_ZFLG())"); + sync_m68k_pc (); + printf ("\tif (GET_ZFLG ())"); old_brace_level = n_braces; start_brace (); - genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst"); + genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst", XLATE_LOG); pop_braces (old_brace_level); printf ("else"); start_brace (); - printf ("m68k_dreg(regs, rc) = dst;\n"); + switch (curi->size) { + case sz_byte: + printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);\n"); + break; + case sz_word: + printf ("\tm68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);\n"); + break; + default: + printf ("\tm68k_dreg(regs, rc) = dst;\n"); + break; + } pop_braces (old_brace_level); } break; case i_CAS2: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); printf ("\tuae_u32 rn1 = regs.regs[(extra >> 28) & 15];\n"); printf ("\tuae_u32 rn2 = regs.regs[(extra >> 12) & 15];\n"); if (curi->size == sz_word) { int old_brace_level = n_braces; + printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); + printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); - printf ("\tif (GET_ZFLG()) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); - printf ("\tif (GET_ZFLG()) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); + printf ("\tif (GET_ZFLG ()) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); + printf ("\tif (GET_ZFLG ()) {\n"); printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_word(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); - printf ("\tif (! GET_ZFLG()) {\n"); - printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);\n"); - printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);\n"); + printf ("\tif (! GET_ZFLG ()) {\n"); + printf ("\tm68k_dreg(regs, rc2) = (m68k_dreg(regs, rc2) & ~0xffff) | (dst2 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, rc1) = (m68k_dreg(regs, rc1) & ~0xffff) | (dst1 & 0xffff);\n"); printf ("\t}\n"); } else { int old_brace_level = n_braces; + printf ("\tuae_u32 rc1 = (extra >> 16) & 7;\n"); + printf ("\tuae_u32 rc2 = extra & 7;\n"); printf ("\tuae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2);\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); - printf ("\tif (GET_ZFLG()) {\n"); - genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); - printf ("\tif (GET_ZFLG()) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc1)", "dst1"); + printf ("\tif (GET_ZFLG ()) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc2)", "dst2"); + printf ("\tif (GET_ZFLG ()) {\n"); printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); - printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\tput_long(rn2, m68k_dreg(regs, (extra >> 6) & 7));\n"); printf ("\t}}\n"); pop_braces (old_brace_level); - printf ("\tif (! GET_ZFLG()) {\n"); - printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = dst1;\n"); - printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = dst2;\n"); + printf ("\tif (! GET_ZFLG ()) {\n"); + printf ("\tm68k_dreg(regs, rc2) = dst2;\n"); + printf ("\tm68k_dreg(regs, rc1) = dst1;\n"); printf ("\t}\n"); } break; - case i_MOVES: /* ignore DFC and SFC because we have no MMU */ + case i_MOVES: { - int old_brace_level; - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - printf ("\tif (extra & 0x800)\n"); - old_brace_level = n_braces; - start_brace (); - printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); - pop_braces (old_brace_level); - printf ("else"); - start_brace (); - genamode (curi->dmode, "dstreg", curi->size, "src", 1, 0); - printf ("\tif (extra & 0x8000) {\n"); - switch (curi->size) { - case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; - case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; - case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; - default: abort (); - } - printf ("\t} else {\n"); - genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, ""); - printf ("\t}\n"); - pop_braces (old_brace_level); + int old_brace_level; + + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + start_brace(); + printf ("\tif (extra & 0x0800)\n"); /* from reg to ea */ + { + int old_m68k_pc_offset = m68k_pc_offset; + /* use DFC */ + old_brace_level = n_braces; + start_brace (); + printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_DFC); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst", XLATE_DFC); + pop_braces (old_brace_level); + m68k_pc_offset = old_m68k_pc_offset; + } + printf ("else"); /* from ea to reg */ + { + /* use SFC */ + start_brace (); + genamode (curi->dmode, "dstreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_SFC); + printf ("\tif (extra & 0x8000) {\n"); /* address/data */ + switch (curi->size) { + case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; + case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; + default: abort (); + } + printf ("\t} else {\n"); + genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, "", XLATE_LOG); + printf ("\t}\n"); + sync_m68k_pc(); + pop_braces (old_brace_level); + } } break; case i_BKPT: /* only needed for hardware emulators */ @@ -1999,23 +2182,23 @@ static void gen_opcode (unsigned long int opcode) printf ("\top_illg(opcode);\n"); break; case i_TRAPcc: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); - printf ("\tif (cctrue(%d)) { Exception(7,m68k_getpc()); goto %s; }\n", curi->cc, endlabelstr); + genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + sync_m68k_pc (); + printf ("\tif (cctrue(%d)) { Exception(7,oldpc); goto %s; }\n", curi->cc, endlabelstr); need_endlabel = 1; break; case i_DIVL: - sync_m68k_pc (); - start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); printf ("\tm68k_divl(opcode, dst, extra, oldpc);\n"); break; case i_MULL: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); printf ("\tm68k_mull(opcode, dst, extra);\n"); break; @@ -2027,34 +2210,37 @@ static void gen_opcode (unsigned long int opcode) case i_BFFFO: case i_BFSET: case i_BFINS: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC, XLATE_LOG); start_brace (); + printf ("\tuae_u32 bdata[2];"); printf ("\tuae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;\n"); printf ("\tint width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;\n"); if (curi->dmode == Dreg) { - printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f);\n"); + printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg);\n"); + printf ("\toffset &= 0x1f;\n"); + printf ("\ttmp = (tmp << offset) | (tmp >> (32 - offset));\n"); + printf ("\tbdata[0] = tmp & ((1 << (32 - width)) - 1);\n"); } else { - printf ("\tuae_u32 tmp,bf0,bf1;\n"); - printf ("\tdsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0);\n"); - printf ("\tbf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff;\n"); - printf ("\ttmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7)));\n"); + printf ("\tuae_u32 tmp;\n"); + printf ("\tdsta += offset >> 3;\n"); + printf ("\ttmp = get_bitfield(dsta, bdata, offset, width);\n"); } - printf ("\ttmp >>= (32 - width);\n"); - printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0);\n"); + printf ("\tSET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);\n"); + if (curi->mnemo == i_BFEXTS) + printf ("\ttmp = (uae_s32)tmp >> (32 - width);\n"); + else + printf ("\ttmp >>= (32 - width);\n"); printf ("\tSET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);\n"); switch (curi->mnemo) { case i_BFTST: break; case i_BFEXTU: + case i_BFEXTS: printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); break; case i_BFCHG: - printf ("\ttmp = ~tmp;\n"); - break; - case i_BFEXTS: - printf ("\tif (GET_NFLG()) tmp |= width == 32 ? 0 : (-1 << width);\n"); - printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); + printf ("\ttmp = tmp ^ (0xffffffffu >> (32 - width));\n"); break; case i_BFCLR: printf ("\ttmp = 0;\n"); @@ -2065,10 +2251,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = offset;\n"); break; case i_BFSET: - printf ("\ttmp = 0xffffffff;\n"); + printf ("\ttmp = 0xffffffffu >> (32 - width);\n"); break; case i_BFINS: printf ("\ttmp = m68k_dreg(regs, (extra >> 12) & 7);\n"); + printf ("\ttmp = tmp & (0xffffffffu >> (32 - width));\n"); printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0);\n"); printf ("\tSET_ZFLG (tmp == 0);\n"); break; @@ -2078,26 +2265,12 @@ static void gen_opcode (unsigned long int opcode) if (curi->mnemo == i_BFCHG || curi->mnemo == i_BFCLR || curi->mnemo == i_BFSET - || curi->mnemo == i_BFINS) - { - printf ("\ttmp <<= (32 - width);\n"); + || curi->mnemo == i_BFINS) { if (curi->dmode == Dreg) { - printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 :\n"); - printf ("\t\t(0xffffffff << (32 - (offset & 0x1f))))) |\n"); - printf ("\t\t(tmp >> (offset & 0x1f)) |\n"); - printf ("\t\t(((offset & 0x1f) + width) >= 32 ? 0 :\n"); - printf (" (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width))));\n"); + printf ("\ttmp = bdata[0] | (tmp << (32 - width));\n"); + printf ("\tm68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));\n"); } else { - printf ("\tbf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) |\n"); - printf ("\t\t(tmp >> (offset & 7)) |\n"); - printf ("\t\t(((offset & 7) + width) >= 32 ? 0 :\n"); - printf ("\t\t (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width))));\n"); - printf ("\tput_long(dsta,bf0 );\n"); - printf ("\tif (((offset & 7) + width) > 32) {\n"); - printf ("\t\tbf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) |\n"); - printf ("\t\t\t(tmp << (8 - (offset & 7)));\n"); - printf ("\t\tput_byte(dsta+4,bf1);\n"); - printf ("\t}\n"); + printf ("\tput_bitfield(dsta, bdata, tmp, offset, width);\n"); } } break; @@ -2107,11 +2280,11 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + %s;\n", gen_nextiword ()); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); + printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg) - 2 * areg_byteinc[srcreg]) << 8)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_areg(regs, srcreg) -= 2;\n"); printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + gen_set_fault_pc (); printf ("\tput_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf));\n"); } break; @@ -2122,57 +2295,57 @@ static void gen_opcode (unsigned long int opcode) printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff);\n"); } else { printf ("\tuae_u16 val;\n"); - printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); - printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg) - areg_byteinc[srcreg]);\n"); printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); - printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); - printf ("\tput_byte(m68k_areg(regs, dstreg),val);\n"); - printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); - printf ("\tput_byte(m68k_areg(regs, dstreg),val >> 8);\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tm68k_areg(regs, dstreg) -= 2;\n"); + gen_set_fault_pc (); + printf ("\tput_word(m68k_areg(regs, dstreg), val);\n"); } break; case i_TAS: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); genflags (flag_logical, curi->size, "src", "", ""); printf ("\tsrc |= 0x80;\n"); - genastore ("src", curi->smode, "srcreg", curi->size, "src"); + genastore ("src", curi->smode, "srcreg", curi->size, "src", XLATE_LOG); break; case i_FPP: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); printf ("\tfpuop_arithmetic(opcode, extra);\n"); break; case i_FDBcc: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); printf ("\tfpuop_dbcc(opcode, extra);\n"); break; case i_FScc: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_scc(opcode,extra);\n"); + printf ("\tfpuop_scc(opcode, extra);\n"); break; case i_FTRAPcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr oldpc = m68k_getpc();\n"); + printf ("\tuae_u16 extra = %s;\n", gen_nextiword()); if (curi->smode != am_unknown && curi->smode != am_illg) - genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "dummy", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_trapcc(opcode,oldpc);\n"); + printf ("\tfpuop_trapcc(opcode, oldpc, extra);\n"); break; case i_FBcc: sync_m68k_pc (); start_brace (); printf ("\tuaecptr pc = m68k_getpc();\n"); - genamode (curi->dmode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); - printf ("\tfpuop_bcc(opcode,pc,extra);\n"); + printf ("\tfpuop_bcc(opcode, pc, extra);\n"); break; case i_FSAVE: sync_m68k_pc (); @@ -2185,89 +2358,104 @@ static void gen_opcode (unsigned long int opcode) printf ("\tfpuop_restore(opcode);\n"); break; case i_CINVL: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_CINVP: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_CINVA: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_CPUSHL: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_CPUSHP: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_CPUSHA: - printf("\n#ifdef USE_JIT\n"); + printf ("\tflush_internals();\n"); + printf("#ifdef USE_JIT\n"); printf ("\tif (opcode&0x80)\n" "\t\tflush_icache();\n"); printf("#endif\n"); break; case i_MOVE16: - if ((opcode & 0xfff8) == 0xf620) { - /* MOVE16 (Ax)+,(Ay)+ */ - printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); - printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); - printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); - printf ("\tput_long(memd, get_long(mems));\n"); - printf ("\tput_long(memd+4, get_long(mems+4));\n"); - printf ("\tput_long(memd+8, get_long(mems+8));\n"); - printf ("\tput_long(memd+12, get_long(mems+12));\n"); - printf ("\tif (srcreg != dstreg)\n"); - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } - else { - /* Other variants */ - genamode (curi->smode, "srcreg", curi->size, "mems", 0, 2); - genamode (curi->dmode, "dstreg", curi->size, "memd", 0, 2); - printf ("\tmemsa &= ~15;\n"); - printf ("\tmemda &= ~15;\n"); - printf ("\tput_long(memda, get_long(memsa));\n"); - printf ("\tput_long(memda+4, get_long(memsa+4));\n"); - printf ("\tput_long(memda+8, get_long(memsa+8));\n"); - printf ("\tput_long(memda+12, get_long(memsa+12));\n"); - if ((opcode & 0xfff8) == 0xf600) - printf ("\tm68k_areg(regs, srcreg) += 16;\n"); - else if ((opcode & 0xfff8) == 0xf608) - printf ("\tm68k_areg(regs, dstreg) += 16;\n"); - } - break; + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); + printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); + printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); + printf ("\tput_long(memd, get_long(mems));\n"); + printf ("\tput_long(memd+4, get_long(mems+4));\n"); + printf ("\tput_long(memd+8, get_long(mems+8));\n"); + printf ("\tput_long(memd+12, get_long(mems+12));\n"); + printf ("\tif (srcreg != dstreg)\n"); + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "mems", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); + genamode (curi->dmode, "dstreg", curi->size, "memd", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16, XLATE_LOG); + printf ("\tmemsa &= ~15;\n"); + printf ("\tmemda &= ~15;\n"); + printf ("\tput_long(memda, get_long(memsa));\n"); + printf ("\tput_long(memda+4, get_long(memsa+4));\n"); + printf ("\tput_long(memda+8, get_long(memsa+8));\n"); + printf ("\tput_long(memda+12, get_long(memsa+12));\n"); + if ((opcode & 0xfff8) == 0xf600) + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + else if ((opcode & 0xfff8) == 0xf608) + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + break; case i_MMUOP: - genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "extra", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); sync_m68k_pc (); swap_opcode (); printf ("\tmmu_op(opcode,extra);\n"); break; - - case i_EMULOP_RETURN: + + case i_EMULOP_RETURN: printf ("\tm68k_emulop_return();\n"); m68k_pc_offset = 0; break; - case i_EMULOP: + case i_EMULOP: printf ("\n"); swap_opcode (); printf ("\tm68k_emulop(opcode);\n"); break; - + + case i_NATFEAT_ID: + printf ("\n"); + printf ("\tm68k_natfeat_id();\n"); + break; + + case i_NATFEAT_CALL: + printf ("\n"); + printf ("\tm68k_natfeat_call();\n"); + break; + default: abort (); break; @@ -2279,73 +2467,194 @@ static void gen_opcode (unsigned long int opcode) static void generate_includes (FILE * f) { fprintf (f, "#include \"sysdeps.h\"\n"); - fprintf (f, "#include \"m68k.h\"\n"); fprintf (f, "#include \"memory.h\"\n"); fprintf (f, "#include \"readcpu.h\"\n"); fprintf (f, "#include \"newcpu.h\"\n"); + fprintf (f, "#ifdef USE_JIT\n"); fprintf (f, "#include \"compiler/compemu.h\"\n"); + fprintf (f, "#endif\n"); fprintf (f, "#include \"fpu/fpu.h\"\n"); fprintf (f, "#include \"cputbl.h\"\n"); + fprintf (f, "#include \"cpu_emulation.h\"\n"); + fprintf (f, "#include \"debug.h\"\n"); + + fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); + fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); + fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); + fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); + fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); - fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); - fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); - fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); - fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); - fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); - - fprintf (f, "#ifdef NOFLAGS\n"); - fprintf (f, "# include \"noflags.h\"\n"); - fprintf (f, "#endif\n"); + fprintf (f, "#ifdef NOFLAGS\n"); + fprintf (f, "# include \"noflags.h\"\n"); + fprintf (f, "#endif\n"); } static int postfix; +struct gencputbl { + char handler[80]; + uae_u16 specific; + uae_u16 opcode; + int namei; +}; +struct gencputbl cpustbl[65536]; +static int n_cpustbl; + +static char *decodeEA (amodes mode, wordsizes size) +{ + static char buffer[80]; + + buffer[0] = 0; + switch (mode){ + case Dreg: + strcpy (buffer,"Dn"); + break; + case Areg: + strcpy (buffer,"An"); + break; + case Aind: + strcpy (buffer,"(An)"); + break; + case Aipi: + strcpy (buffer,"(An)+"); + break; + case Apdi: + strcpy (buffer,"-(An)"); + break; + case Ad16: + strcpy (buffer,"(d16,An)"); + break; + case Ad8r: + strcpy (buffer,"(d8,An,Xn)"); + break; + case PC16: + strcpy (buffer,"(d16,PC)"); + break; + case PC8r: + strcpy (buffer,"(d8,PC,Xn)"); + break; + case absw: + strcpy (buffer,"(xxx).W"); + break; + case absl: + strcpy (buffer,"(xxx).L"); + break; + case imm: + switch (size){ + case sz_byte: + strcpy (buffer,"#.B"); + break; + case sz_word: + strcpy (buffer,"#.W"); + break; + case sz_long: + strcpy (buffer,"#.L"); + break; + default: + break; + } + break; + case imm0: + strcpy (buffer,"#.B"); + break; + case imm1: + strcpy (buffer,"#.W"); + break; + case imm2: + strcpy (buffer,"#.L"); + break; + case immi: + strcpy (buffer,"#"); + break; + + default: + break; + } + return buffer; +} + +static char *outopcode (const char *name, int opcode) +{ + static char out[100]; + struct instr *ins; + + ins = &table68k[opcode]; + strcpy (out, name); + if (ins->smode == immi) + strcat (out, "Q"); + if (ins->size == sz_byte) + strcat (out,".B"); + if (ins->size == sz_word) + strcat (out,".W"); + if (ins->size == sz_long) + strcat (out,".L"); + strcat (out," "); + if (ins->suse) + strcat (out, decodeEA (ins->smode, ins->size)); + if (ins->duse) { + if (ins->suse) strcat (out,","); + strcat (out, decodeEA (ins->dmode, ins->size)); + } + return out; +} + + static void generate_one_opcode (int rp) { + int i; uae_u16 smsk, dmsk; - long int opcode = opcode_map[rp]; - const char *opcode_str; + int opcode = opcode_map[rp]; + int have_realopcode = 0; + const char *name; if (table68k[opcode].mnemo == i_ILLG - || table68k[opcode].clev > (unsigned)cpu_level) + || table68k[opcode].clev > cpu_level) return; + for (i = 0; lookuptab[i].name[0]; i++) { + if (table68k[opcode].mnemo == lookuptab[i].mnemo) + break; + } + if (table68k[opcode].handler != -1) return; - opcode_str = get_instruction_string (opcode); - + name = lookuptab[i].name; if (opcode_next_clev[rp] != cpu_level) { - if (table68k[opcode].flagdead == 0) - /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ - fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], - opcode, opcode_str); - else - fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], - opcode, opcode_str); + sprintf(cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, opcode_last_postfix[rp]); + cpustbl[n_cpustbl].specific = 0; + cpustbl[n_cpustbl].opcode = opcode; + cpustbl[n_cpustbl].namei = i; + fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, name); + n_cpustbl++; return; } - + if (table68k[opcode].flagdead == 0) /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ - fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); + sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC_FF(op_%x_%d)", opcode, postfix); else - fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); - - fprintf (headerfile, "extern cpuop_func op_%lx_%d_nf;\n", opcode, postfix); - fprintf (headerfile, "extern cpuop_func op_%lx_%d_ff;\n", opcode, postfix); - + sprintf (cpustbl[n_cpustbl].handler, "CPUFUNC(op_%x_%d)", opcode, postfix); + cpustbl[n_cpustbl].specific = 0; + cpustbl[n_cpustbl].opcode = opcode; + cpustbl[n_cpustbl].namei = i; + fprintf (stblfile, "{ %s, %d, %d }, /* %s */\n", cpustbl[n_cpustbl].handler, cpustbl[n_cpustbl].specific, opcode, name); + n_cpustbl++; + + fprintf (headerfile, "extern cpuop_func op_%x_%d_nf;\n", opcode, postfix); + fprintf (headerfile, "extern cpuop_func op_%x_%d_ff;\n", opcode, postfix); + + printf ("/* %s */\n", outopcode (name, opcode)); + printf ("void REGPARAM2 CPUFUNC(op_%x_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, name); + printf ("\tcpuop_begin();\n"); /* gb-- The "nf" variant for an instruction that doesn't set the condition codes at all is the same as the "ff" variant, so we don't need the "nf" variant to be compiled since it is mapped to the "ff" variant in the smalltbl. */ - if (table68k[opcode].flagdead == 0) + if (table68k[opcode].flagdead == 0) printf ("#ifndef NOFLAGS\n"); - printf ("void REGPARAM2 CPUFUNC(op_%lx_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); - printf ("\tcpuop_begin();\n"); - switch (table68k[opcode].stype) { case 0: smsk = 7; break; case 1: smsk = 255; break; @@ -2353,8 +2662,8 @@ static void generate_one_opcode (int rp) case 3: smsk = 7; break; case 4: smsk = 7; break; case 5: smsk = 63; break; - case 6: smsk = 255; break; - case 7: smsk = 3; break; + case 6: smsk = 255; break; + case 7: smsk = 3; break; default: abort (); } dmsk = 7; @@ -2385,38 +2694,17 @@ static void generate_one_opcode (int rp) if (pos < 8 && (smsk >> (8 - pos)) != 0) abort (); #endif - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (smsk >> (8 - pos)) != 0) - sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); - else - sprintf (source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - printf ("\tuae_u32 srcreg = %s;\n", source); - - printf ("#else\n"); - + real_opcode(&have_realopcode); if (pos) - sprintf (source, "((opcode >> %d) & %d)", pos, smsk); + sprintf (source, "((real_opcode >> %d) & %d)", pos, smsk); else - sprintf (source, "(opcode & %d)", smsk); - + sprintf (source, "(real_opcode & %d)", smsk); if (table68k[opcode].stype == 3) printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); else if (table68k[opcode].stype == 1) printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); else printf ("\tuae_u32 srcreg = %s;\n", source); - - printf ("#endif\n"); } } if (table68k[opcode].duse @@ -2436,27 +2724,13 @@ static void generate_one_opcode (int rp) /* Check that we can do the little endian optimization safely. */ if (pos < 8 && (dmsk >> (8 - pos)) != 0) abort (); -#endif - printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); - - if (pos < 8 && (dmsk >> (8 - pos)) != 0) - printf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", - pos ^ 8, dmsk); - else - printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - printf ("#else\n"); - +#endif + real_opcode(&have_realopcode); if (pos) - printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + printf ("\tuae_u32 dstreg = (real_opcode >> %d) & %d;\n", pos, dmsk); else - printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - printf ("#endif\n"); + printf ("\tuae_u32 dstreg = real_opcode & %d;\n", dmsk); } } need_endlabel = 0; @@ -2465,10 +2739,10 @@ static void generate_one_opcode (int rp) gen_opcode (opcode); if (need_endlabel) printf ("%s: ;\n", endlabelstr); - printf ("\tcpuop_end();\n"); - printf ("}\n"); - if (table68k[opcode].flagdead == 0) + if (table68k[opcode].flagdead == 0) printf ("\n#endif\n"); + printf ("\tcpuop_end();\n"); + printf ("}\n"); opcode_next_clev[rp] = next_cpu_level; opcode_last_postfix[rp] = postfix; } @@ -2479,36 +2753,18 @@ static void generate_func (void) using_prefetch = 0; using_exception_3 = 0; -#if !USE_PREFETCH_BUFFER - /* gb-- No need for a prefetch buffer, nor exception 3 handling */ - /* Anyway, Basilisk2 does not use the op_smalltbl_5 table... */ - for (i = 0; i <= 4; i++) { -#else - for (i = 0; i < 6; i++) { -#endif + + for (i = 0; i < 1; i++) { cpu_level = 4 - i; - if (i == 5) { - cpu_level = 0; - using_prefetch = 1; - using_exception_3 = 1; - for (rp = 0; rp < nr_cpuop_funcs; rp++) - opcode_next_clev[rp] = 0; - } postfix = i; - fprintf (stblfile, "struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); - - /* Disable spurious warnings. */ - printf ("\n" - "#ifdef _MSC_VER\n" - "#pragma warning(disable:4102) /* unreferenced label */\n" - "#endif\n"); + fprintf (stblfile, "const struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); /* sam: this is for people with low memory (eg. me :)) */ printf ("\n" - "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " - "!defined(PART_5) && !defined(PART_6) && " - "!defined(PART_7) && !defined(PART_8)" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" "\n" "#define PART_1 1\n" "#define PART_2 1\n" @@ -2519,8 +2775,8 @@ static void generate_func (void) "#define PART_7 1\n" "#define PART_8 1\n" "#endif\n\n"); - rp = 0; + n_cpustbl = 0; for(j=1;j<=8;++j) { int k = (j*nr_cpuop_funcs)/8; printf ("#ifdef PART_%d\n",j); @@ -2528,16 +2784,90 @@ static void generate_func (void) generate_one_opcode (rp); printf ("#endif\n\n"); } - fprintf (stblfile, "{ 0, 0, 0 }};\n"); } } -int main (int argc, char **argv) +static struct { + const char *handler; + const char *name; +} cpufunctbl[65536]; +static char const op_illg_1[] = "op_illg_1"; +static char const illegal[] = "ILLEGAL"; + +static void generate_functbl (void) +{ + int i; + unsigned int opcode; + int cpu_level = 4; + struct gencputbl *tbl = cpustbl; + + for (opcode = 0; opcode < 65536; opcode++) + { + cpufunctbl[opcode].handler = op_illg_1; + cpufunctbl[opcode].name = illegal; + } + for (i = 0; i < n_cpustbl; i++) + { + if (! tbl[i].specific) + { + cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; + cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; + } + } + for (opcode = 0; opcode < 65536; opcode++) + { + const char *f; + + if (table68k[opcode].mnemo == i_ILLG || (unsigned)table68k[opcode].clev > (unsigned)cpu_level) + continue; + + if (table68k[opcode].handler != -1) + { + f = cpufunctbl[table68k[opcode].handler].handler; + if (f == op_illg_1) + abort(); + cpufunctbl[opcode].handler = f; + cpufunctbl[opcode].name = cpufunctbl[table68k[opcode].handler].name; + } + } + for (i = 0; i < n_cpustbl; i++) + { + if (tbl[i].specific) + { + cpufunctbl[tbl[i].opcode].handler = tbl[i].handler; + cpufunctbl[tbl[i].opcode].name = lookuptab[tbl[i].namei].name; + } + } + + fprintf(functblfile, "\n"); + fprintf(functblfile, "cpuop_func *cpufunctbl[65536] = {\n"); + fprintf(functblfile, "#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU)\n"); + for (opcode = 0; opcode < 65536; opcode++) + { + fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[opcode].handler, opcode < 65535 ? "," : "", cpufunctbl[opcode].name); + } + fprintf(functblfile, "#else\n"); + for (opcode = 0; opcode < 65536; opcode++) + { + unsigned int map = do_byteswap_16(opcode); + fprintf(functblfile, "\t%s%s /* %s */\n", cpufunctbl[map].handler, opcode < 65535 ? "," : "", cpufunctbl[map].name); + } + fprintf(functblfile, "#endif\n"); + fprintf(functblfile, "};\n"); +} + +#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) +void cygwin_mingw_abort() +{ +#undef abort + abort(); +} +#endif + +int main(void) { - FILE *out; - read_table68k (); - do_merges (); + init_table68k (); opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); @@ -2549,32 +2879,28 @@ int main (int argc, char **argv) * cputbl.h that way), but cpuopti can't cope. That could be fixed, but * I don't dare to touch the 68k version. */ - headerfile = fopen ("cputbl.h", "w"); - stblfile = fopen ("cpustbl.cpp", "w"); - out = freopen ("cpuemu.cpp", "w", stdout); + if ((headerfile = fopen ("cputbl.h", "wb")) == NULL) + abort(); + if ((stblfile = fopen ("cpustbl.cpp", "wb")) == NULL) + abort(); + if ((functblfile = fopen ("cpufunctbl.cpp", "wb")) == NULL) + abort(); + if (freopen ("cpuemu.cpp", "wb", stdout) == NULL) + abort(); generate_includes (stdout); + fprintf(stdout, "#ifdef HAVE_CFLAG_NO_REDZONE\n"); + fprintf(stdout, "#ifndef NOFLAGS\n"); + fprintf(stdout, "#pragma GCC option \"-mno-red-zone\"\n"); + fprintf(stdout, "#endif\n"); + fprintf(stdout, "#endif\n"); generate_includes (stblfile); - + generate_includes (functblfile); generate_func (); - + generate_functbl (); free (table68k); - fclose (headerfile); - fclose (stblfile); - fflush (out); - - /* For build systems (IDEs mainly) that don't make it easy to compile the - * same file twice with different settings. */ - stblfile = fopen ("cpustbl_nf.cpp", "w"); - out = freopen ("cpuemu_nf.cpp", "w", stdout); - - fprintf (stblfile, "#define NOFLAGS\n"); - fprintf (stblfile, "#include \"cpustbl.cpp\"\n"); - fclose (stblfile); - - printf ("#define NOFLAGS\n"); - printf ("#include \"cpuemu.cpp\"\n"); - fflush (out); - + fclose(headerfile); + fclose(stblfile); + fclose(functblfile); return 0; } diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index d4d284847..6a434dafd 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -1,24 +1,35 @@ -/* - * UAE - The Un*x Amiga Emulator +/* + * m68k.h - machine dependent bits + * + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) * - * MC68000 emulation - machine dependent bits + * Inspired by Christian Bauer's Basilisk II * - * Copyright 1996 Bernd Schmidt + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * This program is free software; you can redistribute it and/or modify + * ARAnyM 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, + * ARAnyM 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 + * along with ARAnyM; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation - machine dependent bits + * + * Copyright 1996 Bernd Schmidt + * + */ #ifndef M68K_FLAGS_H #define M68K_FLAGS_H diff --git a/BasiliskII/src/uae_cpu/memory-uae.h b/BasiliskII/src/uae_cpu/memory-uae.h new file mode 100644 index 000000000..c93aeb371 --- /dev/null +++ b/BasiliskII/src/uae_cpu/memory-uae.h @@ -0,0 +1,606 @@ +/* + * memory.h - memory management + * + * Copyright (c) 2001-2006 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II + * + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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. + * + * ARAnyM 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 ARAnyM; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + /* + * UAE - The Un*x Amiga Emulator + * + * memory management + * + * Copyright 1995 Bernd Schmidt + */ + +#ifndef UAE_MEMORY_H +#define UAE_MEMORY_H + +#include "sysdeps.h" +#include "string.h" +#include "hardware.h" +#include "parameters.h" +#include "registers.h" +#include "cpummu.h" +#include "readcpu.h" + +# include + +// newcpu.h +extern void Exception (int, uaecptr); +#ifdef EXCEPTIONS_VIA_LONGJMP + extern JMP_BUF excep_env; + #define SAVE_EXCEPTION \ + JMP_BUF excep_env_old; \ + memcpy(excep_env_old, excep_env, sizeof(JMP_BUF)) + #define RESTORE_EXCEPTION \ + memcpy(excep_env, excep_env_old, sizeof(JMP_BUF)) + #define TRY(var) int var = SETJMP(excep_env); if (!var) + #define CATCH(var) else + #define THROW(n) LONGJMP(excep_env, n) + #define THROW_AGAIN(var) LONGJMP(excep_env, var) + #define VOLATILE volatile +#else + struct m68k_exception { + int prb; + m68k_exception (int exc) : prb (exc) {} + operator int() { return prb; } + }; + #define SAVE_EXCEPTION + #define RESTORE_EXCEPTION + #define TRY(var) try + #define CATCH(var) catch(m68k_exception var) + #define THROW(n) throw m68k_exception(n) + #define THROW_AGAIN(var) throw + #define VOLATILE +#endif /* EXCEPTIONS_VIA_LONGJMP */ +extern int in_exception_2; + +#define STRAM_END 0x0e00000UL // should be replaced by global ROMBase as soon as ROMBase will be a constant +#define ROM_END 0x0e80000UL // should be replaced by ROMBase + RealROMSize if we are going to work with larger TOS ROMs than 512 kilobytes +#define FastRAM_BEGIN 0x1000000UL // should be replaced by global FastRAMBase as soon as FastRAMBase will be a constant +#ifdef FixedSizeFastRAM +#define FastRAM_SIZE (FixedSizeFastRAM * 1024 * 1024) +#else +#define FastRAM_SIZE FastRAMSize +#endif + +#ifdef FIXED_VIDEORAM +#define ARANYMVRAMSTART 0xf0000000UL +#endif + +#define ARANYMVRAMSIZE 0x00100000 // should be a variable to protect VGA card offscreen memory + +#ifdef FIXED_VIDEORAM +extern uintptr VMEMBaseDiff; +#else +extern uae_u32 VideoRAMBase; +#endif + +#ifdef ARAM_PAGE_CHECK +extern uaecptr pc_page, read_page, write_page; +extern uintptr pc_offset, read_offset, write_offset; +# ifdef PROTECT2K +# define ARAM_PAGE_MASK 0x7ff +# else +# ifdef FULLMMU +# define ARAM_PAGE_MASK 0xfff +# else +# define ARAM_PAGE_MASK 0xfffff +# endif +# endif +#endif + +extern uintptr MEMBaseDiff; +extern uintptr ROMBaseDiff; +extern uintptr FastRAMBaseDiff; +# define InitMEMBaseDiff(va, ra) (MEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +# define InitROMBaseDiff(va, ra) (ROMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +# define InitFastRAMBaseDiff(va, ra) (FastRAMBaseDiff = (uintptr)(va) - (uintptr)(ra)) + +#ifdef FIXED_VIDEORAM +#define InitVMEMBaseDiff(va, ra) (VMEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) +#else +#define InitVMEMBaseDiff(va, ra) (ra = (uintptr)(va) + MEMBaseDiff) +#endif + +extern "C" void breakpt(void); + + +static inline uae_u64 do_get_mem_quad(uae_u64 *a) {return SDL_SwapBE64(*a);} +static inline void do_put_mem_quad(uae_u64 *a, uae_u64 v) {*a = SDL_SwapBE64(v);} + + +#ifndef NOCHECKBOUNDARY +static ALWAYS_INLINE bool test_ram_boundary(uaecptr addr, int size, bool super, bool write) +{ + if (addr <= (FastRAM_BEGIN + FastRAM_SIZE - size)) { +#ifdef PROTECT2K + // protect first 2kB of RAM - access in supervisor mode only + if (!super && addr < 0x00000800UL) + return false; +#endif + // check for write access to protected areas: + // - first two longwords of ST-RAM are non-writable (ROM shadow) + // - non-writable area between end of ST-RAM and begin of FastRAM + if (!write || addr >= FastRAM_BEGIN || (addr >= 8 && addr <= (STRAM_END - size))) + return true; + } +#ifdef FIXED_VIDEORAM + return addr >= ARANYMVRAMSTART && addr <= (ARANYMVRAMSTART + ARANYMVRAMSIZE - size); +#else + return addr >= VideoRAMBase && addr <= (VideoRAMBase + ARANYMVRAMSIZE - size); +#endif +} +/* + * "size" is the size of the memory access (byte = 1, word = 2, long = 4) + */ +static ALWAYS_INLINE void check_ram_boundary(uaecptr addr, int size, bool write) +{ + if (test_ram_boundary(addr, size, regs.s, write)) + return; + + // D(bug("BUS ERROR %s at $%x\n", (write ? "writing" : "reading"), addr)); + regs.mmu_fault_addr = addr; + regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); + breakpt(); + THROW(2); +} + +#else +static inline bool test_ram_boundary(uaecptr, int, bool, bool) { return 1; } +static inline void check_ram_boundary(uaecptr, int, bool) { } +#endif + +#ifdef FIXED_VIDEORAM +# define do_get_real_address(a) ((uae_u8 *)(((uaecptr)(a) < ARANYMVRAMSTART) ? ((uaecptr)(a) + MEMBaseDiff) : ((uaecptr)(a) + VMEMBaseDiff))) +#else +# define do_get_real_address(a) ((uae_u8 *)((uintptr)(a) + MEMBaseDiff)) +#endif + +static inline uae_u8 *phys_get_real_address(uaecptr addr) +{ + return do_get_real_address(addr); +} + +#ifndef NOCHECKBOUNDARY +static inline bool phys_valid_address(uaecptr addr, bool write, int sz) +{ + return test_ram_boundary(addr, sz, regs.s, write); +} +#else +static inline bool phys_valid_address(uaecptr, bool, int) { return true; } +#endif + +static inline uae_u64 phys_get_quad(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_quad((uae_u64*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); /* TODO: must be HWget_q */ +#endif + check_ram_boundary(addr, 8, false); + uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_quad(m); +} + +static inline uae_u32 phys_get_long(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_long((uae_u32*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); +#endif + check_ram_boundary(addr, 4, false); + uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_long(m); +} + +static inline uae_u32 phys_get_word(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_word((uae_u16*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_w(addr); +#endif + check_ram_boundary(addr, 2, false); + uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_word(m); +} + +static inline uae_u32 phys_get_byte(uaecptr addr) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ read_page) <= ARAM_PAGE_MASK)) + return do_get_mem_byte((uae_u8*)(addr + read_offset)); +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) return HWget_b(addr); +#endif + check_ram_boundary(addr, 1, false); + uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + read_page = addr; + read_offset = (uintptr)m - (uintptr)addr; +#endif + return do_get_mem_byte(m); +} + +static inline void phys_put_quad(uaecptr addr, uae_u64 l) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_quad((uae_u64*)(addr + write_offset), l); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_l(addr, l); /* TODO: must be HWput_q */ + return; + } +#endif + check_ram_boundary(addr, 8, true); + uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_quad(m, l); +} + +static inline void phys_put_long(uaecptr addr, uae_u32 l) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_long((uae_u32*)(addr + write_offset), l); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_l(addr, l); + return; + } +#endif + check_ram_boundary(addr, 4, true); + uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_long(m, l); +} + +static inline void phys_put_word(uaecptr addr, uae_u32 w) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_word((uae_u16*)(addr + write_offset), w); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_w(addr, w); + return; + } +#endif + check_ram_boundary(addr, 2, true); + uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_word(m, w); +} + +static inline void phys_put_byte(uaecptr addr, uae_u32 b) +{ +#ifdef ARAM_PAGE_CHECK + if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { + do_put_mem_byte((uae_u8*)(addr + write_offset), b); + return; + } +#endif +#ifndef HW_SIGSEGV + addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; + if ((addr & 0xfff00000) == 0x00f00000) { + HWput_b(addr, b); + return; + } +#endif + check_ram_boundary(addr, 1, true); + uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); +#ifdef ARAM_PAGE_CHECK + write_page = addr; + write_offset = (uintptr)m - (uintptr)addr; +#endif + do_put_mem_byte(m, b); +} + +#ifdef FULLMMU +static ALWAYS_INLINE bool is_unaligned(uaecptr addr, int size) +{ + return unlikely((addr & (size - 1)) && (addr ^ (addr + size - 1)) & 0x1000); +} + +static ALWAYS_INLINE uae_u8 *mmu_get_real_address(uaecptr addr, struct mmu_atc_line *cl) +{ + return do_get_real_address(cl->phys + addr); +} + +static ALWAYS_INLINE uae_u32 mmu_get_quad(uaecptr addr, int data) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl)); + return mmu_get_quad_slow(addr, regs.s, data, cl); +} + +static ALWAYS_INLINE uae_u64 get_quad(uaecptr addr) +{ + return mmu_get_quad(addr, 1); +} + +static ALWAYS_INLINE uae_u32 mmu_get_long(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); + return mmu_get_long_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u32 get_long(uaecptr addr) +{ + if (unlikely(is_unaligned(addr, 4))) + return mmu_get_long_unaligned(addr, 1); + return mmu_get_long(addr, 1, sz_long); +} + +static ALWAYS_INLINE uae_u16 mmu_get_word(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); + return mmu_get_word_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u16 get_word(uaecptr addr) +{ + if (unlikely(is_unaligned(addr, 2))) + return mmu_get_word_unaligned(addr, 1); + return mmu_get_word(addr, 1, sz_word); +} + +static ALWAYS_INLINE uae_u8 mmu_get_byte(uaecptr addr, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 0, &cl))) + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); + return mmu_get_byte_slow(addr, regs.s, data, size, cl); +} + +static ALWAYS_INLINE uae_u8 get_byte(uaecptr addr) +{ + return mmu_get_byte(addr, 1, sz_byte); +} + +static ALWAYS_INLINE void mmu_put_quad(uaecptr addr, uae_u64 val, int data) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_quad_slow(addr, val, regs.s, data, cl); +} + +static ALWAYS_INLINE void put_quad(uaecptr addr, uae_u32 val) +{ + mmu_put_quad(addr, val, 1); +} + +static ALWAYS_INLINE void mmu_put_long(uaecptr addr, uae_u32 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_long_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_long(uaecptr addr, uae_u32 val) +{ + if (unlikely(is_unaligned(addr, 4))) + mmu_put_long_unaligned(addr, val, 1); + else + mmu_put_long(addr, val, 1, sz_long); +} + +static ALWAYS_INLINE void mmu_put_word(uaecptr addr, uae_u16 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_word_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_word(uaecptr addr, uae_u16 val) +{ + if (unlikely(is_unaligned(addr, 2))) + mmu_put_word_unaligned(addr, val, 1); + else + mmu_put_word(addr, val, 1, sz_word); +} + +static ALWAYS_INLINE void mmu_put_byte(uaecptr addr, uae_u8 val, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_lookup(addr, data, 1, &cl))) + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_byte_slow(addr, val, regs.s, data, size, cl); +} + +static ALWAYS_INLINE void put_byte(uaecptr addr, uae_u8 val) +{ + mmu_put_byte(addr, val, 1, sz_byte); +} + +static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) +{ + (void)sz; + return phys_get_real_address(mmu_translate(addr, regs.s, 1, write)); +} + +static ALWAYS_INLINE uae_u32 mmu_get_user_long(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); + return mmu_get_long_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE uae_u16 mmu_get_user_word(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); + return mmu_get_word_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE uae_u8 mmu_get_user_byte(uaecptr addr, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) + return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); + return mmu_get_byte_slow(addr, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_long(uaecptr addr, uae_u32 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_long_slow(addr, val, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_word(uaecptr addr, uae_u16 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_word_slow(addr, val, super, data, size, cl); +} + +static ALWAYS_INLINE void mmu_put_user_byte(uaecptr addr, uae_u8 val, int super, int data, int size) +{ + struct mmu_atc_line *cl; + + if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) + do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); + else + mmu_put_byte_slow(addr, val, super, data, size, cl); +} + +static inline bool valid_address(uaecptr addr, bool write, int sz) +{ + SAVE_EXCEPTION; + TRY(prb) { + (void)sz; + check_ram_boundary(mmu_translate(addr, regs.s, 1, (write ? 1 : 0)), sz, write); + RESTORE_EXCEPTION; + return true; + } + CATCH(prb) { + RESTORE_EXCEPTION; + return false; + } +} + +#else + +# define get_quad(a) phys_get_quad(a) +# define get_long(a) phys_get_long(a) +# define get_word(a) phys_get_word(a) +# define get_byte(a) phys_get_byte(a) +# define put_quad(a,b) phys_put_quad(a,b) +# define put_long(a,b) phys_put_long(a,b) +# define put_word(a,b) phys_put_word(a,b) +# define put_byte(a,b) phys_put_byte(a,b) +# define get_real_address(a,w,s) phys_get_real_address(a) + +#define valid_address(a,w,s) phys_valid_address(a,w,s) +#endif + +static inline void flush_internals() { +#ifdef ARAM_PAGE_CHECK + pc_page = 0xeeeeeeee; + read_page = 0xeeeeeeee; + write_page = 0xeeeeeeee; +#endif +} + +#endif /* MEMORY_H */ + +/* +vim:ts=4:sw=4: +*/ diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp index 7483f5064..e56f993d6 100644 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -1,642 +1,59 @@ /* - * UAE - The Un*x Amiga Emulator + * memory.cpp - memory management * - * Memory management + * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * (c) 1995 Bernd Schmidt + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * This program is free software; you can redistribute it and/or modify + * ARAnyM 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, + * ARAnyM 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 + * along with ARAnyM; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - -#include -#include + /* + * UAE - The Un*x Amiga Emulator + * + * Memory management + * + * (c) 1995 Bernd Schmidt + */ #include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "video.h" - -#include "m68k.h" #include "memory.h" -#include "readcpu.h" -#include "newcpu.h" - -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - -static bool illegal_mem = false; - -#ifdef SAVE_MEMORY_BANKS -addrbank *mem_banks[65536]; -#else -addrbank mem_banks[65536]; -#endif - -#ifdef WORDS_BIGENDIAN -# define swap_words(X) (X) -#else -# define swap_words(X) (((X) >> 16) | ((X) << 16)) -#endif - -#ifdef NO_INLINE_MEMORY_ACCESS -uae_u32 longget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).lget, addr); -} -uae_u32 wordget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).wget, addr); -} -uae_u32 byteget (uaecptr addr) -{ - return call_mem_get_func (get_mem_bank (addr).bget, addr); -} -void longput (uaecptr addr, uae_u32 l) -{ - call_mem_put_func (get_mem_bank (addr).lput, addr, l); -} -void wordput (uaecptr addr, uae_u32 w) -{ - call_mem_put_func (get_mem_bank (addr).wput, addr, w); -} -void byteput (uaecptr addr, uae_u32 b) -{ - call_mem_put_func (get_mem_bank (addr).bput, addr, b); -} +#define DEBUG 0 +#include "debug.h" + +#ifdef ARAM_PAGE_CHECK +uaecptr pc_page = 0xeeeeeeee; +uintptr pc_offset = 0; +uaecptr read_page = 0xeeeeeeee; +uintptr read_offset = 0; +uaecptr write_page = 0xeeeeeeee; +uintptr write_offset = 0; #endif -/* A dummy bank that only contains zeros */ - -static uae_u32 REGPARAM2 dummy_lget (uaecptr) REGPARAM; -static uae_u32 REGPARAM2 dummy_wget (uaecptr) REGPARAM; -static uae_u32 REGPARAM2 dummy_bget (uaecptr) REGPARAM; -static void REGPARAM2 dummy_lput (uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 dummy_wput (uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 dummy_bput (uaecptr, uae_u32) REGPARAM; - -uae_u32 REGPARAM2 dummy_lget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal lget at %08x\n", addr); - - return 0; -} - -uae_u32 REGPARAM2 dummy_wget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal wget at %08x\n", addr); - - return 0; -} - -uae_u32 REGPARAM2 dummy_bget (uaecptr addr) -{ - if (illegal_mem) - write_log ("Illegal bget at %08x\n", addr); - - return 0; -} - -void REGPARAM2 dummy_lput (uaecptr addr, uae_u32 l) -{ - if (illegal_mem) - write_log ("Illegal lput at %08x\n", addr); -} -void REGPARAM2 dummy_wput (uaecptr addr, uae_u32 w) -{ - if (illegal_mem) - write_log ("Illegal wput at %08x\n", addr); -} -void REGPARAM2 dummy_bput (uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal bput at %08x\n", addr); -} - -/* Mac RAM (32 bit addressing) */ - -static uae_u32 REGPARAM2 ram_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram_bget(uaecptr) REGPARAM; -static void REGPARAM2 ram_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) REGPARAM; - -static uintptr RAMBaseDiff; // RAMBaseHost - RAMBaseMac - -uae_u32 REGPARAM2 ram_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 ram_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 ram_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(RAMBaseDiff + addr); -} - -void REGPARAM2 ram_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + addr); - do_put_mem_long(m, l); -} - -void REGPARAM2 ram_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + addr); - do_put_mem_word(m, w); -} - -void REGPARAM2 ram_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(RAMBaseDiff + addr) = b; -} - -uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) -{ - return (uae_u8 *)(RAMBaseDiff + addr); -} - -/* Mac RAM (24 bit addressing) */ - -static uae_u32 REGPARAM2 ram24_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram24_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 ram24_bget(uaecptr) REGPARAM; -static void REGPARAM2 ram24_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram24_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 ram24_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) REGPARAM; - -uae_u32 REGPARAM2 ram24_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 ram24_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 ram24_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); -} - -void REGPARAM2 ram24_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_long(m, l); -} - -void REGPARAM2 ram24_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_word(m, w); -} - -void REGPARAM2 ram24_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; -} - -uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) -{ - return (uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); -} - -/* Mac ROM (32 bit addressing) */ - -static uae_u32 REGPARAM2 rom_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom_bget(uaecptr) REGPARAM; -static void REGPARAM2 rom_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 rom_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 rom_bput(uaecptr, uae_u32) REGPARAM; -static uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) REGPARAM; - -static uintptr ROMBaseDiff; // ROMBaseHost - ROMBaseMac - -uae_u32 REGPARAM2 rom_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(ROMBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 rom_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(ROMBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 rom_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(ROMBaseDiff + addr); -} - -void REGPARAM2 rom_lput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM lput at %08x\n", addr); -} - -void REGPARAM2 rom_wput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM wput at %08x\n", addr); -} - -void REGPARAM2 rom_bput(uaecptr addr, uae_u32 b) -{ - if (illegal_mem) - write_log ("Illegal ROM bput at %08x\n", addr); -} - -uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) -{ - return (uae_u8 *)(ROMBaseDiff + addr); -} - -/* Mac ROM (24 bit addressing) */ - -static uae_u32 REGPARAM2 rom24_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom24_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 rom24_bget(uaecptr) REGPARAM; -static uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) REGPARAM; - -uae_u32 REGPARAM2 rom24_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(ROMBaseDiff + (addr & 0xffffff)); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 rom24_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(ROMBaseDiff + (addr & 0xffffff)); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 rom24_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); -} - -uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) -{ - return (uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); -} - -/* Frame buffer */ - -static uae_u32 REGPARAM2 frame_direct_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_direct_wget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_direct_bget(uaecptr) REGPARAM; -static void REGPARAM2 frame_direct_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_direct_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_direct_bput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_555_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_host_555_wget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_555_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_host_555_wput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_565_lget(uaecptr) REGPARAM; -static uae_u32 REGPARAM2 frame_host_565_wget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_565_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 frame_host_565_wput(uaecptr, uae_u32) REGPARAM; - -static uae_u32 REGPARAM2 frame_host_888_lget(uaecptr) REGPARAM; -static void REGPARAM2 frame_host_888_lput(uaecptr, uae_u32) REGPARAM; - -static uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) REGPARAM; - -static uintptr FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac - -uae_u32 REGPARAM2 frame_direct_lget(uaecptr addr) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - return do_get_mem_long(m); -} - -uae_u32 REGPARAM2 frame_direct_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - return do_get_mem_word(m); -} - -uae_u32 REGPARAM2 frame_direct_bget(uaecptr addr) -{ - return (uae_u32)*(uae_u8 *)(FrameBaseDiff + addr); -} - -void REGPARAM2 frame_direct_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - do_put_mem_long(m, l); -} - -void REGPARAM2 frame_direct_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - do_put_mem_word(m, w); -} - -void REGPARAM2 frame_direct_bput(uaecptr addr, uae_u32 b) -{ - *(uae_u8 *)(FrameBaseDiff + addr) = b; -} - -uae_u32 REGPARAM2 frame_host_555_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = *m; - return swap_words(l); -} - -uae_u32 REGPARAM2 frame_host_555_wget(uaecptr addr) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - return *m; -} - -void REGPARAM2 frame_host_555_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - *m = swap_words(l); -} - -void REGPARAM2 frame_host_555_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - *m = w; -} - -uae_u32 REGPARAM2 frame_host_565_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = *m; - l = (l & 0x001f001f) | ((l >> 1) & 0x7fe07fe0); - return swap_words(l); -} - -uae_u32 REGPARAM2 frame_host_565_wget(uaecptr addr) -{ - uae_u16 *m, w; - m = (uae_u16 *)(FrameBaseDiff + addr); - w = *m; - return (w & 0x1f) | ((w >> 1) & 0x7fe0); -} - -void REGPARAM2 frame_host_565_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(FrameBaseDiff + addr); - l = (l & 0x001f001f) | ((l << 1) & 0xffc0ffc0); - *m = swap_words(l); -} - -void REGPARAM2 frame_host_565_wput(uaecptr addr, uae_u32 w) -{ - uae_u16 *m; - m = (uae_u16 *)(FrameBaseDiff + addr); - *m = (w & 0x1f) | ((w << 1) & 0xffc0); -} - -uae_u32 REGPARAM2 frame_host_888_lget(uaecptr addr) -{ - uae_u32 *m, l; - m = (uae_u32 *)(FrameBaseDiff + addr); - return *m; -} - -void REGPARAM2 frame_host_888_lput(uaecptr addr, uae_u32 l) -{ - uae_u32 *m; - m = (uae_u32 *)(MacFrameBaseHost + addr - MacFrameBaseMac); - *m = l; -} - -uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) -{ - return (uae_u8 *)(FrameBaseDiff + addr); -} - -/* Mac framebuffer RAM (24 bit addressing) - * - * This works by duplicating appropriate writes to the 32-bit - * address-space framebuffer. - */ - -static void REGPARAM2 fram24_lput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 fram24_wput(uaecptr, uae_u32) REGPARAM; -static void REGPARAM2 fram24_bput(uaecptr, uae_u32) REGPARAM; - -void REGPARAM2 fram24_lput(uaecptr addr, uae_u32 l) -{ - uaecptr page_off = addr & 0xffff; - if (0xa700 <= page_off && page_off < 0xfc80) { - uae_u32 *fm; - fm = (uae_u32 *)(MacFrameBaseHost + page_off - 0xa700); - do_put_mem_long(fm, l); - } - - uae_u32 *m; - m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_long(m, l); -} - -void REGPARAM2 fram24_wput(uaecptr addr, uae_u32 w) -{ - uaecptr page_off = addr & 0xffff; - if (0xa700 <= page_off && page_off < 0xfc80) { - uae_u16 *fm; - fm = (uae_u16 *)(MacFrameBaseHost + page_off - 0xa700); - do_put_mem_word(fm, w); - } - - uae_u16 *m; - m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); - do_put_mem_word(m, w); -} - -void REGPARAM2 fram24_bput(uaecptr addr, uae_u32 b) -{ - uaecptr page_off = addr & 0xffff; - if (0xa700 <= page_off && page_off < 0xfc80) { - *(uae_u8 *)(MacFrameBaseHost + page_off - 0xa700) = b; - } - - *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; -} - -/* Default memory access functions */ - -uae_u8 *REGPARAM2 default_xlate (uaecptr a) -{ - write_log("Your Mac program just did something terribly stupid\n"); - return NULL; -} - -/* Address banks */ - -addrbank dummy_bank = { - dummy_lget, dummy_wget, dummy_bget, - dummy_lput, dummy_wput, dummy_bput, - default_xlate -}; - -addrbank ram_bank = { - ram_lget, ram_wget, ram_bget, - ram_lput, ram_wput, ram_bput, - ram_xlate -}; - -addrbank ram24_bank = { - ram24_lget, ram24_wget, ram24_bget, - ram24_lput, ram24_wput, ram24_bput, - ram24_xlate -}; - -addrbank rom_bank = { - rom_lget, rom_wget, rom_bget, - rom_lput, rom_wput, rom_bput, - rom_xlate -}; - -addrbank rom24_bank = { - rom24_lget, rom24_wget, rom24_bget, - rom_lput, rom_wput, rom_bput, - rom24_xlate -}; - -addrbank frame_direct_bank = { - frame_direct_lget, frame_direct_wget, frame_direct_bget, - frame_direct_lput, frame_direct_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_555_bank = { - frame_host_555_lget, frame_host_555_wget, frame_direct_bget, - frame_host_555_lput, frame_host_555_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_565_bank = { - frame_host_565_lget, frame_host_565_wget, frame_direct_bget, - frame_host_565_lput, frame_host_565_wput, frame_direct_bput, - frame_xlate -}; - -addrbank frame_host_888_bank = { - frame_host_888_lget, frame_direct_wget, frame_direct_bget, - frame_host_888_lput, frame_direct_wput, frame_direct_bput, - frame_xlate -}; - -addrbank fram24_bank = { - ram24_lget, ram24_wget, ram24_bget, - fram24_lput, fram24_wput, fram24_bput, - ram24_xlate -}; - -void memory_init(void) +extern "C" void breakpt(void) { - for(long i=0; i<65536; i++) - put_mem_bank(i<<16, &dummy_bank); - - // Limit RAM size to not overlap ROM - uint32 ram_size = RAMSize > ROMBaseMac ? ROMBaseMac : RAMSize; - - RAMBaseDiff = (uintptr)RAMBaseHost - (uintptr)RAMBaseMac; - ROMBaseDiff = (uintptr)ROMBaseHost - (uintptr)ROMBaseMac; - FrameBaseDiff = (uintptr)MacFrameBaseHost - (uintptr)MacFrameBaseMac; - - // Map RAM, ROM and display - if (TwentyFourBitAddressing) { - map_banks(&ram24_bank, RAMBaseMac >> 16, ram_size >> 16); - map_banks(&rom24_bank, ROMBaseMac >> 16, ROMSize >> 16); - - // Map frame buffer at end of RAM. - map_banks(&fram24_bank, ((RAMBaseMac + ram_size) >> 16) - 1, 1); - } else { - map_banks(&ram_bank, RAMBaseMac >> 16, ram_size >> 16); - map_banks(&rom_bank, ROMBaseMac >> 16, ROMSize >> 16); - - // Map frame buffer - switch (MacFrameLayout) { - case FLAYOUT_DIRECT: - map_banks(&frame_direct_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_555: - map_banks(&frame_host_555_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_565: - map_banks(&frame_host_565_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - case FLAYOUT_HOST_888: - map_banks(&frame_host_888_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); - break; - } - } + // bug("bus err: pc=%08x, sp=%08x, addr=%08x", m68k_getpc(), regs.regs[15], regs.mmu_fault_addr); } -void map_banks(addrbank *bank, int start, int size) -{ - int bnr; - unsigned long int hioffs = 0, endhioffs = 0x100; - - if (start >= 0x100) { - for (bnr = start; bnr < start + size; bnr++) - put_mem_bank (bnr << 16, bank); - return; - } - if (TwentyFourBitAddressing) endhioffs = 0x10000; - for (hioffs = 0; hioffs < endhioffs; hioffs += 0x100) - for (bnr = start; bnr < start+size; bnr++) - put_mem_bank((bnr + hioffs) << 16, bank); -} +#if !KNOWN_ALLOC && !NORMAL_ADDRESSING +// This part need rewrite for ARAnyM !! +// It can be taken from hatari. -#endif /* !REAL_ADDRESSING && !DIRECT_ADDRESSING */ +#error Not prepared for your platform, maybe you need memory banks from hatari +#endif /* !KNOWN_ALLOC && !NORMAL_ADDRESSING */ diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 26b3c5f10..f7bab41de 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -23,6 +23,10 @@ #ifndef UAE_MEMORY_H #define UAE_MEMORY_H +#if DIRECT_ADDRESSING +extern uintptr MEMBaseDiff; +#endif + extern void Exception (int, uaecptr); #ifdef EXCEPTIONS_VIA_LONGJMP extern JMP_BUF excep_env; @@ -50,109 +54,8 @@ extern void Exception (int, uaecptr); #define THROW_AGAIN(var) throw #define VOLATILE #endif /* EXCEPTIONS_VIA_LONGJMP */ -extern int in_exception_2; - -#if !DIRECT_ADDRESSING && !REAL_ADDRESSING - -/* Enabling this adds one additional native memory reference per 68k memory - * access, but saves one shift (on the x86). Enabling this is probably - * better for the cache. My favourite benchmark (PP2) doesn't show a - * difference, so I leave this enabled. */ - -#if 1 || defined SAVE_MEMORY -#define SAVE_MEMORY_BANKS -#endif - -typedef uae_u32 (REGPARAM2 *mem_get_func)(uaecptr) REGPARAM; -typedef void (REGPARAM2 *mem_put_func)(uaecptr, uae_u32) REGPARAM; -typedef uae_u8 *(REGPARAM2 *xlate_func)(uaecptr) REGPARAM; - -#undef DIRECT_MEMFUNCS_SUCCESSFUL - -#ifndef CAN_MAP_MEMORY -#undef USE_COMPILER -#endif - -#if defined(USE_COMPILER) && !defined(USE_MAPPED_MEMORY) -#define USE_MAPPED_MEMORY -#endif - -typedef struct { - /* These ones should be self-explanatory... */ - mem_get_func lget, wget, bget; - mem_put_func lput, wput, bput; - /* Use xlateaddr to translate an Amiga address to a uae_u8 * that can - * be used to address memory without calling the wget/wput functions. - * This doesn't work for all memory banks, so this function may call - * abort(). */ - xlate_func xlateaddr; -} addrbank; - -extern uae_u8 filesysory[65536]; - -extern addrbank ram_bank; // Mac RAM -extern addrbank rom_bank; // Mac ROM -extern addrbank frame_bank; // Frame buffer - -/* Default memory access functions */ - -extern uae_u8 *REGPARAM2 default_xlate(uaecptr addr) REGPARAM; - -#define bankindex(addr) (((uaecptr)(addr)) >> 16) - -#ifdef SAVE_MEMORY_BANKS -extern addrbank *mem_banks[65536]; -#define get_mem_bank(addr) (*mem_banks[bankindex(addr)]) -#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = (b)) -#else -extern addrbank mem_banks[65536]; -#define get_mem_bank(addr) (mem_banks[bankindex(addr)]) -#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = *(b)) -#endif - -extern void memory_init(void); -extern void map_banks(addrbank *bank, int first, int count); - -#ifndef NO_INLINE_MEMORY_ACCESS - -#define longget(addr) (call_mem_get_func(get_mem_bank(addr).lget, addr)) -#define wordget(addr) (call_mem_get_func(get_mem_bank(addr).wget, addr)) -#define byteget(addr) (call_mem_get_func(get_mem_bank(addr).bget, addr)) -#define longput(addr,l) (call_mem_put_func(get_mem_bank(addr).lput, addr, l)) -#define wordput(addr,w) (call_mem_put_func(get_mem_bank(addr).wput, addr, w)) -#define byteput(addr,b) (call_mem_put_func(get_mem_bank(addr).bput, addr, b)) - -#else - -extern uae_u32 longget(uaecptr addr); -extern uae_u32 wordget(uaecptr addr); -extern uae_u32 byteget(uaecptr addr); -extern void longput(uaecptr addr, uae_u32 l); -extern void wordput(uaecptr addr, uae_u32 w); -extern void byteput(uaecptr addr, uae_u32 b); - -#endif - -#ifndef MD_HAVE_MEM_1_FUNCS -#define longget_1 longget -#define wordget_1 wordget -#define byteget_1 byteget -#define longput_1 longput -#define wordput_1 wordput -#define byteput_1 byteput - -#endif - -#endif /* !DIRECT_ADDRESSING && !REAL_ADDRESSING */ - -#if REAL_ADDRESSING -const uintptr MEMBaseDiff = 0; -#elif DIRECT_ADDRESSING -extern uintptr MEMBaseDiff; -#endif - -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { return (uae_u8 *)MEMBaseDiff + addr; @@ -166,71 +69,57 @@ static __inline__ uae_u32 get_long(uaecptr addr) uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); return do_get_mem_long(m); } +#define phys_get_long get_long static __inline__ uae_u32 get_word(uaecptr addr) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); return do_get_mem_word(m); } +#define phys_get_word get_word static __inline__ uae_u32 get_byte(uaecptr addr) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); return do_get_mem_byte(m); } +#define phys_get_byte get_byte static __inline__ void put_long(uaecptr addr, uae_u32 l) { uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); do_put_mem_long(m, l); } +#define phys_put_long put_long static __inline__ void put_word(uaecptr addr, uae_u32 w) { uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); do_put_mem_word(m, w); } +#define phys_put_word put_word static __inline__ void put_byte(uaecptr addr, uae_u32 b) { uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); do_put_mem_byte(m, b); } +#define phys_put_byte put_byte static __inline__ uae_u8 *get_real_address(uaecptr addr) { return do_get_real_address(addr); } -static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) -{ - return do_get_virtual_address(addr); -} -#else -static __inline__ uae_u32 get_long(uaecptr addr) -{ - return longget_1(addr); -} -static __inline__ uae_u32 get_word(uaecptr addr) -{ - return wordget_1(addr); -} -static __inline__ uae_u32 get_byte(uaecptr addr) +static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) { - return byteget_1(addr); + return do_get_real_address(addr); } -static __inline__ void put_long(uaecptr addr, uae_u32 l) -{ - longput_1(addr, l); -} -static __inline__ void put_word(uaecptr addr, uae_u32 w) +static inline uae_u8 *phys_get_real_address(uaecptr addr) { - wordput_1(addr, w); + return do_get_real_address(addr); } -static __inline__ void put_byte(uaecptr addr, uae_u32 b) -{ - byteput_1(addr, b); -} -static __inline__ uae_u8 *get_real_address(uaecptr addr) +static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) { - return get_mem_bank(addr).xlateaddr(addr); + return do_get_virtual_address(addr); } -/* gb-- deliberately not implemented since it shall not be used... */ -extern uae_u32 get_virtual_address(uae_u8 *addr); -#endif /* DIRECT_ADDRESSING || REAL_ADDRESSING */ +#endif /* DIRECT_ADDRESSING */ + +static __inline__ void check_ram_boundary(uaecptr addr, int size, bool write) {} +static inline void flush_internals() {} #endif /* MEMORY_H */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index dc109422f..351a0de36 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -1,51 +1,80 @@ /* - * UAE - The Un*x Amiga Emulator + * newcpu.cpp - CPU emulation * - * MC68000 emulation + * Copyright (c) 2010 ARAnyM dev team (see AUTHORS) + * * - * (c) 1995 Bernd Schmidt + * Inspired by Christian Bauer's Basilisk II * - * This program is free software; you can redistribute it and/or modify + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. + * + * ARAnyM 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, + * ARAnyM 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 + * along with ARAnyM; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ - -#include -#include -#include + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * (c) 1995 Bernd Schmidt + */ #include "sysdeps.h" +#include #include "cpu_emulation.h" #include "main.h" #include "emul_op.h" - -extern int intlev(void); // From baisilisk_glue.cpp - #include "m68k.h" #include "memory.h" #include "readcpu.h" #include "newcpu.h" -#include "compiler/compemu.h" +#ifdef USE_JIT +# include "compiler/compemu.h" +#endif #include "fpu/fpu.h" - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) -B2_mutex *spcflags_lock = NULL; +#include "cpummu.h" +#if 0 +#include "natfeats.h" +#include "disasm-glue.h" #endif +#if USE_JIT +extern bool UseJIT; +#endif + +#include + +#define DEBUG 0 +#include "debug.h" + +#define SANITY_CHECK_ATC 1 + +struct fixup fixup = {0, 0, 0}; + +int quit_program = 0; +int exit_val = 0; + +// For instruction $7139 +bool cpu_debugging = false; -bool quit_program = false; struct flag_struct regflags; +/* LongJump buffers */ +#ifdef EXCEPTIONS_VIA_LONGJMP +JMP_BUF excep_env; +#endif /* Opcode of faulting instruction */ uae_u16 last_op_for_exception_3; /* PC at fault time */ @@ -60,19 +89,34 @@ int movem_index1[256]; int movem_index2[256]; int movem_next[256]; -cpuop_func *cpufunctbl[65536]; +#ifdef FLIGHT_RECORDER + +// feel free to edit the following defines to customize the dump +#define FRLOG_HOTKEY 1 /* 1 = dump only when hotkey is held down */ +#define FRLOG_ALL 1 /* 1 = dump continuously to ever growing log */ +#define FRLOG_IRQ 0 /* 1 = dump also CPU in interrupts */ +#define FRLOG_REGS 0 /* 1 = dump also all data/address registers */ +#define FRLOG_SIZE 8192 /* this many instructions in single dump */ -#if FLIGHT_RECORDER struct rec_step { - uae_u32 pc; -#if FLIGHT_RECORDER >= 2 uae_u32 d[8]; uae_u32 a[8]; -#endif + uae_u32 pc; + uae_u16 sr; + uae_u32 usp; + uae_u32 msp; + uae_u32 isp; + uae_u16 instr; }; -const int LOG_SIZE = 32768; -static rec_step log[LOG_SIZE]; +bool cpu_flight_recorder_active = false; + +#if FRLOG_ALL +const int LOG_SIZE = 10; +#else +const int LOG_SIZE = FRLOG_SIZE; +#endif +static rec_step frlog[LOG_SIZE]; static int log_ptr = -1; // First time initialization static const char *log_filename(void) @@ -81,848 +125,568 @@ static const char *log_filename(void) return name ? name : "log.68k"; } -void m68k_record_step(uaecptr pc) -{ -#if FLIGHT_RECORDER >= 2 - /* XXX: if LSB is set, we are recording from generated code and we - don't support registers recording yet. */ - if ((pc & 1) == 0) { - for (int i = 0; i < 8; i++) { - log[log_ptr].d[i] = m68k_dreg(regs, i); - log[log_ptr].a[i] = m68k_areg(regs, i); - } - } -#endif - log[log_ptr].pc = pc; - log_ptr = (log_ptr + 1) % LOG_SIZE; -} - -static void dump_log(void) +void dump_flight_recorder(void) { +#if FRLOG_ALL + FILE *f = fopen(log_filename(), "a"); +#else FILE *f = fopen(log_filename(), "w"); +#endif if (f == NULL) return; for (int i = 0; i < LOG_SIZE; i++) { int j = (i + log_ptr) % LOG_SIZE; - uae_u32 pc = log[j].pc & ~1; - fprintf(f, "pc %08x", pc); -#if FLIGHT_RECORDER >= 2 - fprintf(f, "\n"); - if ((log[j].pc & 1) == 0) { - fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", log[j].d[0], log[j].d[1], log[j].d[2], log[j].d[3]); - fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", log[j].d[4], log[j].d[5], log[j].d[6], log[j].d[7]); - fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", log[j].a[0], log[j].a[1], log[j].a[2], log[j].a[3]); - fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", log[j].a[4], log[j].a[5], log[j].a[6], log[j].a[7]); - } -#else - fprintf(f, " | "); -#endif -#if ENABLE_MON - disass_68k(f, pc); + fprintf(f, "pc %08x instr %04x sr %04x usp %08x msp %08x isp %08x\n", frlog[j].pc, frlog[j].instr, frlog[j].sr, frlog[j].usp, frlog[j].msp, frlog[j].isp); + // adding a simple opcode -> assembler conversion table would help +#if FRLOG_REGS + fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", frlog[j].d[0], frlog[j].d[1], frlog[j].d[2], frlog[j].d[3]); + fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", frlog[j].d[4], frlog[j].d[5], frlog[j].d[6], frlog[j].d[7]); + fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", frlog[j].a[0], frlog[j].a[1], frlog[j].a[2], frlog[j].a[3]); + fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", frlog[j].a[4], frlog[j].a[5], frlog[j].a[6], frlog[j].a[7]); #endif + m68k_disasm(f, frlog[j].pc, NULL, 1); } fclose(f); } -#endif -#if ENABLE_MON -static void dump_regs(void) +void m68k_record_step(uaecptr pc, int opcode) { - m68k_dumpstate(NULL); -} -#endif + static bool last_state = false; -#define COUNT_INSTRS 0 +#if FRLOG_HOTKEY + if (! cpu_flight_recorder_active) { + if (last_state) { + // dump log out + dump_flight_recorder(); -#if COUNT_INSTRS -static unsigned long int instrcount[65536]; -static uae_u16 opcodenums[65536]; + // remember last state + last_state = false; + } + return; + } +#endif -static int compfn (const void *el1, const void *el2) -{ - return instrcount[*(const uae_u16 *)el1] < instrcount[*(const uae_u16 *)el2]; -} + if (! last_state) { + // reset old log + log_ptr = 0; + memset(frlog, 0, sizeof(frlog)); + // remember last state + last_state = true; + } -static char *icountfilename (void) -{ - char *name = getenv ("INSNCOUNT"); - if (name) - return name; - return COUNT_INSTRS == 2 ? "frequent.68k" : "insncount"; -} +#if FRLOG_REGS + for (int i = 0; i < 8; i++) { + frlog[log_ptr].d[i] = m68k_dreg(regs, i); + frlog[log_ptr].a[i] = m68k_areg(regs, i); + } +#endif + frlog[log_ptr].pc = pc; -void dump_counts (void) -{ - FILE *f = fopen (icountfilename (), "w"); - unsigned long int total; - int i; + MakeSR(); +#if ! FRLOG_IRQ + // is CPU in interrupt handler? Quit if should not be logged. + if (regs.s && !regs.m) return; +#endif + frlog[log_ptr].sr = regs.sr; + frlog[log_ptr].usp = regs.usp; + frlog[log_ptr].msp = regs.msp; + frlog[log_ptr].isp = regs.isp; + frlog[log_ptr].instr = opcode; - write_log ("Writing instruction count file...\n"); - for (i = 0; i < 65536; i++) { - opcodenums[i] = i; - total += instrcount[i]; - } - qsort (opcodenums, 65536, sizeof(uae_u16), compfn); - - fprintf (f, "Total: %lu\n", total); - for (i=0; i < 65536; i++) { - unsigned long int cnt = instrcount[opcodenums[i]]; - struct instr *dp; - struct mnemolookup *lookup; - if (!cnt) - break; - dp = table68k + opcodenums[i]; - for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) - ; - fprintf (f, "%04x: %lu %s\n", opcodenums[i], cnt, lookup->name); - } - fclose (f); -} -#else -void dump_counts (void) -{ -} + log_ptr = (log_ptr + 1) % LOG_SIZE; +#if FRLOG_ALL + if (log_ptr == 0) dump_flight_recorder(); #endif +} +#endif /* FLIGHT_RECORDER */ int broken_in; -static __inline__ unsigned int cft_map (unsigned int f) +static inline unsigned int cft_map (unsigned int f) { -#ifndef HAVE_GET_WORD_UNSWAPPED - return f; +#if !defined(HAVE_GET_WORD_UNSWAPPED) || defined(FULLMMU) + return f; #else - return ((f >> 8) & 255) | ((f & 255) << 8); + return do_byteswap_16(f); #endif } -void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; - void REGPARAM2 op_illg_1 (uae_u32 opcode) { - op_illg (cft_map (opcode)); + op_illg (cft_map (opcode)); } -static void build_cpufunctbl (void) -{ - int i; - unsigned long opcode; - unsigned int cpu_level = 0; // 68000 (default) - if (CPUType == 4) - cpu_level = 4; // 68040 with FPU - else { - if (FPUType) - cpu_level = 3; // 68020 with FPU - else if (CPUType >= 2) - cpu_level = 2; // 68020 - else if (CPUType == 1) - cpu_level = 1; - } - struct cputbl *tbl = ( - cpu_level == 4 ? op_smalltbl_0_ff - : cpu_level == 3 ? op_smalltbl_1_ff - : cpu_level == 2 ? op_smalltbl_2_ff - : cpu_level == 1 ? op_smalltbl_3_ff - : op_smalltbl_4_ff); - - for (opcode = 0; opcode < 65536; opcode++) - cpufunctbl[cft_map (opcode)] = op_illg_1; - for (i = 0; tbl[i].handler != NULL; i++) { - if (! tbl[i].specific) - cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; - } - for (opcode = 0; opcode < 65536; opcode++) { - cpuop_func *f; - - if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) - continue; - - if (table68k[opcode].handler != -1) { - f = cpufunctbl[cft_map (table68k[opcode].handler)]; - if (f == op_illg_1) - abort(); - cpufunctbl[cft_map (opcode)] = f; - } - } - for (i = 0; tbl[i].handler != NULL; i++) { - if (tbl[i].specific) - cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; - } -} void init_m68k (void) { - int i; + int i; - for (i = 0 ; i < 256 ; i++) { - int j; - for (j = 0 ; j < 8 ; j++) { - if (i & (1 << j)) break; - } - movem_index1[i] = j; - movem_index2[i] = 7-j; - movem_next[i] = i & (~(1 << j)); - } -#if COUNT_INSTRS - { - FILE *f = fopen (icountfilename (), "r"); - memset (instrcount, 0, sizeof instrcount); - if (f) { - uae_u32 opcode, count, total; - char name[20]; - write_log ("Reading instruction count file...\n"); - fscanf (f, "Total: %lu\n", &total); - while (fscanf (f, "%lx: %lu %s\n", &opcode, &count, name) == 3) { - instrcount[opcode] = count; - } - fclose(f); - } + for (i = 0 ; i < 256 ; i++) { + int j; + for (j = 0 ; j < 8 ; j++) { + if (i & (1 << j)) break; } -#endif - read_table68k (); - do_merges (); - - build_cpufunctbl (); - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - spcflags_lock = B2_create_mutex(); -#endif - fpu_init(CPUType == 4); + movem_index1[i] = j; + movem_index2[i] = 7-j; + movem_next[i] = i & (~(1 << j)); + } + fpu_init (CPUType == 4); } void exit_m68k (void) { fpu_exit (); -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - B2_delete_mutex(spcflags_lock); -#endif } -struct regstruct regs, lastint_regs; -static struct regstruct regs_backup[16]; -static int backup_pointer = 0; -static long int m68kpc_offset; -int lastint_no; +struct regstruct regs; +// MJ static struct regstruct regs_backup[16]; +// MJ static int backup_pointer = 0; + -#if REAL_ADDRESSING || DIRECT_ADDRESSING -#define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) -#define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) -#define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) +#ifdef FULLMMU +static inline uae_u8 get_ibyte_1(uae_u32 o) +{ + return get_ibyte(o); +} +static inline uae_u16 get_iword_1(uae_u32 o) +{ + return get_iword(o); +} +static inline uae_u32 get_ilong_1(uae_u32 o) +{ + return get_ilong(o); +} #else -#define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1) -#define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) -#define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) +# define get_ibyte_1(o) get_byte(m68k_getpc() + (o) + 1) +# define get_iword_1(o) get_word(m68k_getpc() + (o)) +# define get_ilong_1(o) get_long(m68k_getpc() + (o)) #endif -uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf) +/* + * extract bitfield data from memory and return it in the MSBs + * bdata caches the unmodified data for put_bitfield() + */ +uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width) { - uae_u16 dp; - uae_s8 disp8; - uae_s16 disp16; - int r; - uae_u32 dispreg; - uaecptr addr; - uae_s32 offset = 0; - char buffer[80]; - - switch (mode){ - case Dreg: - sprintf (buffer,"D%d", reg); - break; - case Areg: - sprintf (buffer,"A%d", reg); - break; - case Aind: - sprintf (buffer,"(A%d)", reg); - break; - case Aipi: - sprintf (buffer,"(A%d)+", reg); - break; - case Apdi: - sprintf (buffer,"-(A%d)", reg); - break; - case Ad16: - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr = m68k_areg(regs,reg) + (uae_s16)disp16; - sprintf (buffer,"(A%d,$%04x) == $%08lx", reg, disp16 & 0xffff, - (unsigned long)addr); - break; - case Ad8r: - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0, disp = 0; - uae_s32 base = m68k_areg(regs,reg); - char name[10]; - sprintf (name,"A%d, ",reg); - if (dp & 0x80) { base = 0; name[0] = 0; } - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), - disp,outer, - (unsigned long)addr); - } else { - addr = m68k_areg(regs,reg) + (uae_s32)((uae_s8)disp8) + dispreg; - sprintf (buffer,"(A%d, %c%d.%c*%d, $%02x) == $%08lx", reg, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), disp8, - (unsigned long)addr); - } - break; - case PC16: - addr = m68k_getpc () + m68kpc_offset; - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr += (uae_s16)disp16; - sprintf (buffer,"(PC,$%04x) == $%08lx", disp16 & 0xffff,(unsigned long)addr); - break; - case PC8r: - addr = m68k_getpc () + m68kpc_offset; - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0,disp = 0; - uae_s32 base = addr; - char name[10]; - sprintf (name,"PC, "); - if (dp & 0x80) { base = 0; name[0] = 0; } - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, - dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', - 1 << ((dp >> 9) & 3), - disp,outer, - (unsigned long)addr); - } else { - addr += (uae_s32)((uae_s8)disp8) + dispreg; - sprintf (buffer,"(PC, %c%d.%c*%d, $%02x) == $%08lx", dp & 0x8000 ? 'A' : 'D', - (int)r, dp & 0x800 ? 'L' : 'W', 1 << ((dp >> 9) & 3), - disp8, (unsigned long)addr); - } - break; - case absw: - sprintf (buffer,"$%08lx", (unsigned long)(uae_s32)(uae_s16)get_iword_1 (m68kpc_offset)); - m68kpc_offset += 2; - break; - case absl: - sprintf (buffer,"$%08lx", (unsigned long)get_ilong_1 (m68kpc_offset)); - m68kpc_offset += 4; - break; - case imm: - switch (size){ - case sz_byte: - sprintf (buffer,"#$%02x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xff)); - m68kpc_offset += 2; - break; - case sz_word: - sprintf (buffer,"#$%04x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xffff)); - m68kpc_offset += 2; - break; - case sz_long: - sprintf (buffer,"#$%08lx", (unsigned long)(get_ilong_1 (m68kpc_offset))); - m68kpc_offset += 4; - break; - default: - break; - } + uae_u32 tmp, res, mask; + + offset &= 7; + mask = 0xffffffffu << (32 - width); + switch ((offset + width + 7) >> 3) { + case 1: + tmp = get_byte(src); + res = tmp << (24 + offset); + bdata[0] = tmp & ~(mask >> (24 + offset)); break; - case imm0: - offset = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - sprintf (buffer,"#$%02x", (unsigned int)(offset & 0xff)); + case 2: + tmp = get_word(src); + res = tmp << (16 + offset); + bdata[0] = tmp & ~(mask >> (16 + offset)); break; - case imm1: - offset = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - sprintf (buffer,"#$%04x", (unsigned int)(offset & 0xffff)); + case 3: + tmp = get_word(src); + res = tmp << (16 + offset); + bdata[0] = tmp & ~(mask >> (16 + offset)); + tmp = get_byte(src + 2); + res |= tmp << (8 + offset); + bdata[1] = tmp & ~(mask >> (8 + offset)); break; - case imm2: - offset = (uae_s32)get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - sprintf (buffer,"#$%08lx", (unsigned long)offset); + case 4: + tmp = get_long(src); + res = tmp << offset; + bdata[0] = tmp & ~(mask >> offset); break; - case immi: - offset = (uae_s32)(uae_s8)(reg & 0xff); - sprintf (buffer,"#$%08lx", (unsigned long)offset); + case 5: + tmp = get_long(src); + res = tmp << offset; + bdata[0] = tmp & ~(mask >> offset); + tmp = get_byte(src + 4); + res |= tmp >> (8 - offset); + bdata[1] = tmp & ~(mask << (8 - offset)); break; default: + /* Panic? */ + res = 0; break; } - if (buf == 0) - printf ("%s", buffer); - else - strcat (buf, buffer); - return offset; + return res; } -/* The plan is that this will take over the job of exception 3 handling - - * the CPU emulation functions will just do a longjmp to m68k_go whenever - * they hit an odd address. */ -static int verify_ea (int reg, amodes mode, wordsizes size, uae_u32 *val) +/* + * write bitfield data (in the LSBs) back to memory, upper bits + * must be cleared already. + */ +void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width) { - uae_u16 dp; - uae_s8 disp8; - uae_s16 disp16; - int r; - uae_u32 dispreg; - uaecptr addr; - uae_s32 offset = 0; - - switch (mode){ - case Dreg: - *val = m68k_dreg (regs, reg); - return 1; - case Areg: - *val = m68k_areg (regs, reg); - return 1; - - case Aind: - case Aipi: - addr = m68k_areg (regs, reg); - break; - case Apdi: - addr = m68k_areg (regs, reg); - break; - case Ad16: - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr = m68k_areg(regs,reg) + (uae_s16)disp16; - break; - case Ad8r: - addr = m68k_areg (regs, reg); -d8r_common: - dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - disp8 = dp & 0xFF; - r = (dp & 0x7000) >> 12; - dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); - if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); - dispreg <<= (dp >> 9) & 3; - - if (dp & 0x100) { - uae_s32 outer = 0, disp = 0; - uae_s32 base = addr; - if (dp & 0x80) base = 0; - if (dp & 0x40) dispreg = 0; - if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - base += disp; - - if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } - if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } - - if (!(dp & 4)) base += dispreg; - if (dp & 3) base = get_long (base); - if (dp & 4) base += dispreg; - - addr = base + outer; - } else { - addr += (uae_s32)((uae_s8)disp8) + dispreg; - } + offset = (offset & 7) + width; + switch ((offset + 7) >> 3) { + case 1: + put_byte(dst, bdata[0] | (val << (8 - offset))); break; - case PC16: - addr = m68k_getpc () + m68kpc_offset; - disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; - addr += (uae_s16)disp16; + case 2: + put_word(dst, bdata[0] | (val << (16 - offset))); break; - case PC8r: - addr = m68k_getpc () + m68kpc_offset; - goto d8r_common; - case absw: - addr = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; + case 3: + put_word(dst, bdata[0] | (val >> (offset - 16))); + put_byte(dst + 2, bdata[1] | (val << (24 - offset))); break; - case absl: - addr = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; + case 4: + put_long(dst, bdata[0] | (val << (32 - offset))); break; - case imm: - switch (size){ - case sz_byte: - *val = get_iword_1 (m68kpc_offset) & 0xff; - m68kpc_offset += 2; - break; - case sz_word: - *val = get_iword_1 (m68kpc_offset) & 0xffff; - m68kpc_offset += 2; - break; - case sz_long: - *val = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - break; - default: - break; - } - return 1; - case imm0: - *val = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - return 1; - case imm1: - *val = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - return 1; - case imm2: - *val = get_ilong_1 (m68kpc_offset); - m68kpc_offset += 4; - return 1; - case immi: - *val = (uae_s32)(uae_s8)(reg & 0xff); - return 1; - default: - addr = 0; + case 5: + put_long(dst, bdata[0] | (val >> (offset - 32))); + put_byte(dst + 4, bdata[1] | (val << (40 - offset))); break; } - if ((addr & 1) == 0) - return 1; - - last_addr_for_exception_3 = m68k_getpc () + m68kpc_offset; - last_fault_for_exception_3 = addr; - return 0; } uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp) { - int reg = (dp >> 12) & 15; - uae_s32 regd = regs.regs[reg]; - if ((dp & 0x800) == 0) - regd = (uae_s32)(uae_s16)regd; - regd <<= (dp >> 9) & 3; - if (dp & 0x100) { - uae_s32 outer = 0; - if (dp & 0x80) base = 0; - if (dp & 0x40) regd = 0; - - if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)next_iword(); - if ((dp & 0x30) == 0x30) base += next_ilong(); - - if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)next_iword(); - if ((dp & 0x3) == 0x3) outer = next_ilong(); - - if ((dp & 0x4) == 0) base += regd; - if (dp & 0x3) base = get_long (base); - if (dp & 0x4) base += regd; - - return base + outer; - } else { - return base + (uae_s32)((uae_s8)dp) + regd; - } + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + regd <<= (dp >> 9) & 3; + if (dp & 0x100) { + uae_s32 outer = 0; + if (dp & 0x80) base = 0; + if (dp & 0x40) regd = 0; + + if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x30) == 0x30) base += next_ilong(); + + if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x3) == 0x3) outer = next_ilong(); + + if ((dp & 0x4) == 0) base += regd; + if (dp & 0x3) base = get_long (base); + if (dp & 0x4) base += regd; + + return base + outer; + } else { + return base + (uae_s32)((uae_s8)dp) + regd; + } } uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp) { - int reg = (dp >> 12) & 15; - uae_s32 regd = regs.regs[reg]; + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; #if 1 - if ((dp & 0x800) == 0) - regd = (uae_s32)(uae_s16)regd; - return base + (uae_s8)dp + regd; + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + return base + (uae_s8)dp + regd; #else - /* Branch-free code... benchmark this again now that - * things are no longer inline. */ - uae_s32 regd16; - uae_u32 mask; - mask = ((dp & 0x800) >> 11) - 1; - regd16 = (uae_s32)(uae_s16)regd; - regd16 &= mask; - mask = ~mask; - base += (uae_s8)dp; - regd &= mask; - regd |= regd16; - return base + regd; + /* Branch-free code... benchmark this again now that + * things are no longer inline. */ + uae_s32 regd16; + uae_u32 mask; + mask = ((dp & 0x800) >> 11) - 1; + regd16 = (uae_s32)(uae_s16)regd; + regd16 &= mask; + mask = ~mask; + base += (uae_s8)dp; + regd &= mask; + regd |= regd16; + return base + regd; #endif } void MakeSR (void) { #if 0 - assert((regs.t1 & 1) == regs.t1); - assert((regs.t0 & 1) == regs.t0); - assert((regs.s & 1) == regs.s); - assert((regs.m & 1) == regs.m); - assert((XFLG & 1) == XFLG); - assert((NFLG & 1) == NFLG); - assert((ZFLG & 1) == ZFLG); - assert((VFLG & 1) == VFLG); - assert((CFLG & 1) == CFLG); + assert((regs.t1 & 1) == regs.t1); + assert((regs.t0 & 1) == regs.t0); + assert((regs.s & 1) == regs.s); + assert((regs.m & 1) == regs.m); + assert((XFLG & 1) == XFLG); + assert((NFLG & 1) == NFLG); + assert((ZFLG & 1) == ZFLG); + assert((VFLG & 1) == VFLG); + assert((CFLG & 1) == CFLG); #endif - regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) - | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) - | (GET_XFLG() << 4) | (GET_NFLG() << 3) | (GET_ZFLG() << 2) | (GET_VFLG() << 1) - | GET_CFLG()); + regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) + | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) + | (GET_XFLG() << 4) | (GET_NFLG() << 3) | (GET_ZFLG() << 2) | (GET_VFLG() << 1) + | GET_CFLG()); } void MakeFromSR (void) { - int oldm = regs.m; - int olds = regs.s; - - regs.t1 = (regs.sr >> 15) & 1; - regs.t0 = (regs.sr >> 14) & 1; - regs.s = (regs.sr >> 13) & 1; - regs.m = (regs.sr >> 12) & 1; - regs.intmask = (regs.sr >> 8) & 7; - SET_XFLG ((regs.sr >> 4) & 1); - SET_NFLG ((regs.sr >> 3) & 1); - SET_ZFLG ((regs.sr >> 2) & 1); - SET_VFLG ((regs.sr >> 1) & 1); - SET_CFLG (regs.sr & 1); - if (CPUType >= 2) { - if (olds != regs.s) { - if (olds) { - if (oldm) - regs.msp = m68k_areg(regs, 7); - else - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.usp; - } else { - regs.usp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; - } - } else if (olds && oldm != regs.m) { - if (oldm) { - regs.msp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - } else { - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.msp; - } - } - } else { - if (olds != regs.s) { - if (olds) { - regs.isp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.usp; - } else { - regs.usp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - } - } + int oldm = regs.m; + int olds = regs.s; + + regs.t1 = (regs.sr >> 15) & 1; + regs.t0 = (regs.sr >> 14) & 1; + regs.s = (regs.sr >> 13) & 1; + mmu_set_super(regs.s); + regs.m = (regs.sr >> 12) & 1; + regs.intmask = (regs.sr >> 8) & 7; + SET_XFLG ((regs.sr >> 4) & 1); + SET_NFLG ((regs.sr >> 3) & 1); + SET_ZFLG ((regs.sr >> 2) & 1); + SET_VFLG ((regs.sr >> 1) & 1); + SET_CFLG (regs.sr & 1); + if (olds != regs.s) { + if (olds) { + if (oldm) + regs.msp = m68k_areg(regs, 7); + else + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.usp; + } else { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + } + } else if (olds && oldm != regs.m) { + if (oldm) { + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + } else { + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.msp; + } } - SPCFLAGS_SET( SPCFLAG_INT ); - if (regs.t1 || regs.t0) - SPCFLAGS_SET( SPCFLAG_TRACE ); - else - /* Keep SPCFLAG_DOTRACE, we still want a trace exception for - SR-modifying instructions (including STOP). */ - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + // SPCFLAGS_SET( SPCFLAG_INT ); + SPCFLAGS_SET( SPCFLAG_INT ); + if (regs.t1 || regs.t0) + SPCFLAGS_SET( SPCFLAG_TRACE ); + else + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); +} + +/* for building exception frames */ +static inline void exc_push_word(uae_u16 w) +{ + m68k_areg(regs, 7) -= 2; + put_word(m68k_areg(regs, 7), w); +} +static inline void exc_push_long(uae_u32 l) +{ + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), l); +} + +static inline void exc_make_frame( + int format, + uae_u16 sr, + uae_u32 currpc, + int nr, + uae_u32 x0, + uae_u32 x1 +) +{ + switch(format) { + case 4: + exc_push_long(x1); + exc_push_long(x0); + break; + case 3: + case 2: + exc_push_long(x0); + break; + } + + exc_push_word((format << 12) + (nr * 4)); /* format | vector */ + exc_push_long(currpc); + exc_push_word(sr); } +#ifdef EXCEPTIONS_VIA_LONGJMP +static int building_bus_fault_stack_frame=0; +#endif + void Exception(int nr, uaecptr oldpc) { - uae_u32 currpc = m68k_getpc (); - MakeSR(); - if (!regs.s) { - regs.usp = m68k_areg(regs, 7); - if (CPUType >= 2) - m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; - else - m68k_areg(regs, 7) = regs.isp; - regs.s = 1; - } - if (CPUType > 0) { - if (nr == 2 || nr == 3) { - int i; - /* @@@ this is probably wrong (?) */ - for (i = 0 ; i < 12 ; i++) { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0); - } - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0xa000 + nr * 4); - } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), oldpc); - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0x2000 + nr * 4); - } else if (regs.m && nr >= 24 && nr < 32) { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), nr * 4); - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), currpc); - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), regs.sr); - regs.sr |= (1 << 13); - regs.msp = m68k_areg(regs, 7); - m68k_areg(regs, 7) = regs.isp; - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), 0x1000 + nr * 4); - } else { - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), nr * 4); - } - } else { - if (nr == 2 || nr == 3) { - m68k_areg(regs, 7) -= 12; - /* ??????? */ - if (nr == 3) { - put_long (m68k_areg(regs, 7), last_fault_for_exception_3); - put_word (m68k_areg(regs, 7)+4, last_op_for_exception_3); - put_long (m68k_areg(regs, 7)+8, last_addr_for_exception_3); - } - write_log ("Exception!\n"); - goto kludge_me_do; - } + uae_u32 currpc = m68k_getpc (); + MakeSR(); + + if (fixup.flag) + { + m68k_areg(regs, fixup.reg) = fixup.value; + fixup.flag = 0; + } + + if (!regs.s) { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + regs.s = 1; + mmu_set_super(1); + } + + if (nr == 2) { + /* BUS ERROR handler begins */ +#ifdef ENABLE_EPSLIMITER + check_eps_limit(currpc); +#endif + // panicbug("Exception Nr. %d CPC: %08x NPC: %08x SP=%08x Addr: %08x", nr, currpc, get_long (regs.vbr + 4*nr), m68k_areg(regs, 7), regs.mmu_fault_addr); +#ifdef EXCEPTIONS_VIA_LONGJMP + if (!building_bus_fault_stack_frame) +#else + try +#endif + { +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 1; +#endif + /* 68040 */ + exc_push_long(0); /* PD3 */ + exc_push_long(0); /* PD2 */ + exc_push_long(0); /* PD1 */ + exc_push_long(0); /* PD0/WB1D */ + exc_push_long(0); /* WB1A */ + exc_push_long(0); /* WB2D */ + exc_push_long(0); /* WB2A */ + exc_push_long(regs.wb3_data); /* WB3D */ + exc_push_long(regs.mmu_fault_addr); /* WB3A */ + exc_push_long(regs.mmu_fault_addr); + exc_push_word(0); /* WB1S */ + exc_push_word(0); /* WB2S */ + exc_push_word(regs.wb3_status); /* WB3S */ + regs.wb3_status = 0; + exc_push_word(regs.mmu_ssw); + exc_push_long(regs.mmu_fault_addr); /* EA */ + exc_make_frame(7, regs.sr, regs.fault_pc, 2, 0, 0); + } - m68k_areg(regs, 7) -= 4; - put_long (m68k_areg(regs, 7), currpc); -kludge_me_do: - m68k_areg(regs, 7) -= 2; - put_word (m68k_areg(regs, 7), regs.sr); - m68k_setpc (get_long (regs.vbr + 4*nr)); - SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); - fill_prefetch_0 (); - regs.t1 = regs.t0 = regs.m = 0; - SPCFLAGS_CLEAR( SPCFLAG_TRACE | SPCFLAG_DOTRACE ); +#ifdef EXCEPTIONS_VIA_LONGJMP + else +#else + catch (m68k_exception) +#endif + { + report_double_bus_error(); +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 0; +#endif + return; + } + +#ifdef EXCEPTIONS_VIA_LONGJMP + building_bus_fault_stack_frame= 0; +#endif + /* end of BUS ERROR handler */ + } else if (nr == 3) { + exc_make_frame(2, regs.sr, last_addr_for_exception_3, nr, + last_fault_for_exception_3 & 0xfffffffe, 0); + } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { + /* div by zero, CHK, TRAP or TRACE */ + exc_make_frame(2, regs.sr, currpc, nr, oldpc, 0); + } else if (regs.m && nr >= 24 && nr < 32) { + /* interrupts! */ + exc_make_frame(0, regs.sr, currpc, nr, 0, 0); + regs.sr |= (1 << 13); + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + + exc_make_frame(1, /* throwaway */ + regs.sr, currpc, nr, 0, 0); + } else { + exc_make_frame(0, regs.sr, currpc, nr, 0, 0); + } + m68k_setpc (get_long (regs.vbr + 4*nr)); + SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); + fill_prefetch_0 (); + regs.t1 = regs.t0 = regs.m = 0; + SPCFLAGS_CLEAR(SPCFLAG_TRACE | SPCFLAG_DOTRACE); } static void Interrupt(int nr) { - assert(nr < 8 && nr >= 0); - lastint_regs = regs; - lastint_no = nr; - Exception(nr+24, 0); + assert(nr < 8 && nr >= 0); + Exception(nr+24, 0); - regs.intmask = nr; - SPCFLAGS_SET( SPCFLAG_INT ); + regs.intmask = nr; + // why the hell the SPCFLAG_INT is to be set??? (joy) + // regs.spcflags |= SPCFLAG_INT; (disabled by joy) + SPCFLAGS_SET( SPCFLAG_INT ); } -static int caar, cacr, tc, itt0, itt1, dtt0, dtt1, mmusr, urp, srp; +static void SCCInterrupt(int nr) +{ + // fprintf(stderr, "CPU: in SCCInterrupt\n"); + Exception(nr, 0); + + regs.intmask = 5;// ex 5 +} -static int movec_illg (int regno) +static void MFPInterrupt(int nr) { - switch (CPUType) { - case 1: - if ((regno & 0x7ff) <= 1) - return 0; - break; - case 2: - case 3: - if ((regno & 0x7ff) <= 2) - return 0; - if (regno == 3 || regno == 4) - return 0; - break; - case 4: - if ((regno & 0x7ff) <= 7) { - if (regno != 0x802) - return 0; - } - break; - } - return 1; + // fprintf(stderr, "CPU: in MFPInterrupt\n"); + Exception(nr, 0); + + regs.intmask = 6; } int m68k_move2c (int regno, uae_u32 *regp) { - if (movec_illg (regno)) { - op_illg (0x4E7B); - return 0; - } else { - switch (regno) { - case 0: regs.sfc = *regp & 7; break; - case 1: regs.dfc = *regp & 7; break; - case 2: - regs.cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); -#if USE_JIT - set_cache_state(regs.cacr & 0x8000); - if (*regp & 0x08) { /* Just to be on the safe side */ - flush_icache(); - } + switch (regno) { + case 0: regs.sfc = *regp & 7; break; + case 1: regs.dfc = *regp & 7; break; + case 2: regs.cacr = *regp & 0x80008000; +#ifdef USE_JIT + set_cache_state(regs.cacr & 0x8000); + if (*regp & 0x08) { /* Just to be on the safe side */ + flush_icache(); + } #endif - break; - case 3: tc = *regp & 0xc000; break; - case 4: itt0 = *regp & 0xffffe364; break; - case 5: itt1 = *regp & 0xffffe364; break; - case 6: dtt0 = *regp & 0xffffe364; break; - case 7: dtt1 = *regp & 0xffffe364; break; - case 0x800: regs.usp = *regp; break; - case 0x801: regs.vbr = *regp; break; - case 0x802: caar = *regp &0xfc; break; - case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; - case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; - case 0x805: mmusr = *regp; break; - case 0x806: urp = *regp; break; - case 0x807: srp = *regp; break; - default: - op_illg (0x4E7B); - return 0; - } + break; + case 3: mmu_set_tc(*regp & 0xc000); break; + case 4: + case 5: + case 6: + case 7: mmu_set_ttr(regno, *regp & 0xffffe364); break; + case 0x800: regs.usp = *regp; break; + case 0x801: regs.vbr = *regp; break; + case 0x802: regs.caar = *regp & 0xfc; break; + case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; + case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; + case 0x805: mmu_set_mmusr(*regp); break; + case 0x806: regs.urp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; + case 0x807: regs.srp = *regp & MMU_ROOT_PTR_ADDR_MASK; break; + default: + op_illg (0x4E7B); + return 0; } - return 1; + return 1; } int m68k_movec2 (int regno, uae_u32 *regp) { - if (movec_illg (regno)) - { - op_illg (0x4E7A); - return 0; - } else { - switch (regno) { - case 0: *regp = regs.sfc; break; - case 1: *regp = regs.dfc; break; - case 2: *regp = cacr; break; - case 3: *regp = tc; break; - case 4: *regp = itt0; break; - case 5: *regp = itt1; break; - case 6: *regp = dtt0; break; - case 7: *regp = dtt1; break; - case 0x800: *regp = regs.usp; break; - case 0x801: *regp = regs.vbr; break; - case 0x802: *regp = caar; break; - case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; - case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; - case 0x805: *regp = mmusr; break; - case 0x806: *regp = urp; break; - case 0x807: *regp = srp; break; - default: - op_illg (0x4E7A); - return 0; - } + switch (regno) { + case 0: *regp = regs.sfc; break; + case 1: *regp = regs.dfc; break; + case 2: *regp = regs.cacr; break; + case 3: *regp = regs.tc; break; + case 4: *regp = regs.itt0; break; + case 5: *regp = regs.itt1; break; + case 6: *regp = regs.dtt0; break; + case 7: *regp = regs.dtt1; break; + case 0x800: *regp = regs.usp; break; + case 0x801: *regp = regs.vbr; break; + case 0x802: *regp = regs.caar; break; + case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; + case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; + case 0x805: *regp = regs.mmusr; break; + case 0x806: *regp = regs.urp; break; + case 0x807: *regp = regs.srp; break; + default: + op_illg (0x4E7A); + return 0; } - return 1; + return 1; } -static __inline__ int +#if !defined(uae_s64) +static inline int div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem) { uae_u32 q = 0, cbit = 0; int i; if (div <= src_hi) { - return 1; + return 1; } for (i = 0 ; i < 32 ; i++) { cbit = src_hi & 0x80000000ul; @@ -939,129 +703,131 @@ div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem = src_hi; return 0; } +#endif -void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) +void m68k_divl (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra, uaecptr oldpc) { #if defined(uae_s64) - if (src == 0) { - Exception (5, oldpc); - return; + if (src == 0) { + Exception (5, oldpc); + return; + } + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_s64)m68k_dreg(regs, extra & 7) << 32; } - if (extra & 0x800) { - /* signed variant */ - uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - uae_s64 quot, rem; - - if (extra & 0x400) { - a &= 0xffffffffu; - a |= (uae_s64)m68k_dreg(regs, extra & 7) << 32; - } - rem = a % (uae_s64)(uae_s32)src; - quot = a / (uae_s64)(uae_s32)src; - if ((quot & UVAL64(0xffffffff80000000)) != 0 - && (quot & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) - { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - if (((uae_s32)rem < 0) != ((uae_s64)a < 0)) rem = -rem; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = (uae_u32)rem; - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; - } + rem = a % (uae_s64)(uae_s32)src; + quot = a / (uae_s64)(uae_s32)src; + if ((quot & UVAL64(0xffffffff80000000)) != 0 + && (quot & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); } else { - /* unsigned */ - uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - uae_u64 quot, rem; - - if (extra & 0x400) { - a &= 0xffffffffu; - a |= (uae_u64)m68k_dreg(regs, extra & 7) << 32; - } - rem = a % (uae_u64)src; - quot = a / (uae_u64)src; - if (quot > 0xffffffffu) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = (uae_u32)rem; - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; - } + if (((uae_s32)rem < 0) != ((uae_s64)a < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } + } else { + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_u64)m68k_dreg(regs, extra & 7) << 32; } + rem = a % (uae_u64)src; + quot = a / (uae_u64)src; + if (quot > 0xffffffffu) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } + } #else - if (src == 0) { - Exception (5, oldpc); - return; + if (src == 0) { + Exception (5, oldpc); + return; + } + if (extra & 0x800) { + /* signed variant */ + uae_s32 lo = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s32 hi = lo < 0 ? -1 : 0; + uae_s32 save_high; + uae_u32 quot, rem; + uae_u32 sign; + + if (extra & 0x400) { + hi = (uae_s32)m68k_dreg(regs, extra & 7); } - if (extra & 0x800) { - /* signed variant */ - uae_s32 lo = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - uae_s32 hi = lo < 0 ? -1 : 0; - uae_s32 save_high; - uae_u32 quot, rem; - uae_u32 sign; - - if (extra & 0x400) { - hi = (uae_s32)m68k_dreg(regs, extra & 7); - } - save_high = hi; - sign = (hi ^ src); - if (hi < 0) { - hi = ~hi; - lo = -lo; - if (lo == 0) hi++; - } - if ((uae_s32)src < 0) src = -src; - if (div_unsigned(hi, lo, src, ", &rem) || - (sign & 0x80000000) ? quot > 0x80000000 : quot > 0x7fffffff) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - if (sign & 0x80000000) quot = -quot; - if (((uae_s32)rem < 0) != (save_high < 0)) rem = -rem; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; - } + save_high = hi; + sign = (hi ^ src); + if (hi < 0) { + hi = ~hi; + lo = -lo; + if (lo == 0) hi++; + } + if ((uae_s32)src < 0) src = -src; + if (div_unsigned(hi, lo, src, ", &rem) || + (sign & 0x80000000) ? quot > 0x80000000 : quot > 0x7fffffff) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); } else { - /* unsigned */ - uae_u32 lo = (uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - uae_u32 hi = 0; - uae_u32 quot, rem; - - if (extra & 0x400) { - hi = (uae_u32)m68k_dreg(regs, extra & 7); - } - if (div_unsigned(hi, lo, src, ", &rem)) { - SET_VFLG (1); - SET_NFLG (1); - SET_CFLG (0); - } else { - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (((uae_s32)quot) == 0); - SET_NFLG (((uae_s32)quot) < 0); - m68k_dreg(regs, extra & 7) = rem; - m68k_dreg(regs, (extra >> 12) & 7) = quot; - } + if (sign & 0x80000000) quot = -quot; + if (((uae_s32)rem < 0) != (save_high < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; } + } else { + /* unsigned */ + uae_u32 lo = (uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u32 hi = 0; + uae_u32 quot, rem; + + if (extra & 0x400) { + hi = (uae_u32)m68k_dreg(regs, extra & 7); + } + if (div_unsigned(hi, lo, src, ", &rem)) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } + } #endif } -static __inline__ void +#if !defined(uae_s64) +static inline void mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) { uae_u32 r0 = (src1 & 0xffff) * (src2 & 0xffff); @@ -1079,148 +845,198 @@ mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) *dst_lo = lo; *dst_hi = r3; } +#endif -void m68k_mull (uae_u32 opcode, uae_u32 src, uae_u16 extra) +void m68k_mull (uae_u32 /*opcode*/, uae_u32 src, uae_u16 extra) { #if defined(uae_s64) - if (extra & 0x800) { - /* signed variant */ - uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - - a *= (uae_s64)(uae_s32)src; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (a == 0); - SET_NFLG (a < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = a >> 32; - else if ((a & UVAL64(0xffffffff80000000)) != 0 - && (a & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) - { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; - } else { - /* unsigned */ - uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); - - a *= (uae_u64)src; - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (a == 0); - SET_NFLG (((uae_s64)a) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = a >> 32; - else if ((a & UVAL64(0xffffffff00000000)) != 0) { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_s64)(uae_s32)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (a < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff80000000)) != 0 + && (a & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + } else { + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_u64)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (((uae_s64)a) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff00000000)) != 0) { + SET_VFLG (1); } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + } #else - if (extra & 0x800) { - /* signed variant */ - uae_s32 src1,src2; - uae_u32 dst_lo,dst_hi; - uae_u32 sign; - - src1 = (uae_s32)src; - src2 = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); - sign = (src1 ^ src2); - if (src1 < 0) src1 = -src1; - if (src2 < 0) src2 = -src2; - mul_unsigned((uae_u32)src1,(uae_u32)src2,&dst_hi,&dst_lo); - if (sign & 0x80000000) { - dst_hi = ~dst_hi; - dst_lo = -dst_lo; - if (dst_lo == 0) dst_hi++; - } - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (dst_hi == 0 && dst_lo == 0); - SET_NFLG (((uae_s32)dst_hi) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = dst_hi; - else if ((dst_hi != 0 || (dst_lo & 0x80000000) != 0) - && ((dst_hi & 0xffffffff) != 0xffffffff - || (dst_lo & 0x80000000) != 0x80000000)) - { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; - } else { - /* unsigned */ - uae_u32 dst_lo,dst_hi; - - mul_unsigned(src,(uae_u32)m68k_dreg(regs, (extra >> 12) & 7),&dst_hi,&dst_lo); - - SET_VFLG (0); - SET_CFLG (0); - SET_ZFLG (dst_hi == 0 && dst_lo == 0); - SET_NFLG (((uae_s32)dst_hi) < 0); - if (extra & 0x400) - m68k_dreg(regs, extra & 7) = dst_hi; - else if (dst_hi != 0) { - SET_VFLG (1); - } - m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + if (extra & 0x800) { + /* signed variant */ + uae_s32 src1,src2; + uae_u32 dst_lo,dst_hi; + uae_u32 sign; + + src1 = (uae_s32)src; + src2 = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + sign = (src1 ^ src2); + if (src1 < 0) src1 = -src1; + if (src2 < 0) src2 = -src2; + mul_unsigned((uae_u32)src1,(uae_u32)src2,&dst_hi,&dst_lo); + if (sign & 0x80000000) { + dst_hi = ~dst_hi; + dst_lo = -dst_lo; + if (dst_lo == 0) dst_hi++; } + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if ((dst_hi != 0 || (dst_lo & 0x80000000) != 0) + && ((dst_hi & 0xffffffff) != 0xffffffff + || (dst_lo & 0x80000000) != 0x80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + } else { + /* unsigned */ + uae_u32 dst_lo,dst_hi; + + mul_unsigned(src,(uae_u32)m68k_dreg(regs, (extra >> 12) & 7),&dst_hi,&dst_lo); + + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if (dst_hi != 0) { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + } #endif } -static const char* ccnames[] = -{ "T ","F ","HI","LS","CC","CS","NE","EQ", - "VC","VS","PL","MI","GE","LT","GT","LE" }; // If value is greater than zero, this means we are still processing an EmulOp // because the counter is incremented only in m68k_execute(), i.e. interpretive // execution only +#ifdef USE_JIT static int m68k_execute_depth = 0; +#endif void m68k_reset (void) { - m68k_areg (regs, 7) = 0x2000; - m68k_setpc (ROMBaseMac + 0x2a); - fill_prefetch_0 (); - regs.s = 1; - regs.m = 0; - regs.stopped = 0; - regs.t1 = 0; - regs.t0 = 0; - SET_ZFLG (0); - SET_XFLG (0); - SET_CFLG (0); - SET_VFLG (0); - SET_NFLG (0); - SPCFLAGS_INIT( 0 ); - regs.intmask = 7; - regs.vbr = regs.sfc = regs.dfc = 0; - fpu_reset(); - -#if FLIGHT_RECORDER - log_ptr = 0; - memset(log, 0, sizeof(log)); + regs.s = 1; + regs.m = 0; + regs.stopped = 0; + regs.t1 = 0; + regs.t0 = 0; + SET_ZFLG (0); + SET_XFLG (0); + SET_CFLG (0); + SET_VFLG (0); + SET_NFLG (0); + SPCFLAGS_INIT( 0 ); + regs.intmask = 7; + regs.vbr = regs.sfc = regs.dfc = 0; + + // need to ensure the following order of initialization is correct + // (it is definitely better than what it was before this commit + // since it was reading from 0x00000000 in User mode and with active MMU) + mmu_set_tc(regs.tc & ~0x8000); /* disable mmu */ + m68k_areg (regs, 7) = phys_get_long(0x00000000); +#if 0 + m68k_setpc (phys_get_long(0x00000004)); +#else + m68k_setpc (ROMBaseMac + 0x2a); #endif + fill_prefetch_0 (); -#if ENABLE_MON - static bool first_time = true; - if (first_time) { - first_time = false; - mon_add_command("regs", dump_regs, "regs Dump m68k emulator registers\n"); -#if FLIGHT_RECORDER - // Install "log" command in mon - mon_add_command("log", dump_log, "log Dump m68k emulation log\n"); + /* gb-- moved into {fpp,fpu_x86}.cpp::fpu_init() + regs.fpcr = regs.fpsr = regs.fpiar = 0; */ + fpu_reset(); +#if 0 + // MMU + mmu_reset(); + mmu_set_super(1); + // Cache + regs.cacr = 0; + regs.caar = 0; #endif - } +#ifdef FLIGHT_RECORDER + log_ptr = 0; + memset(frlog, 0, sizeof(frlog)); #endif } void m68k_emulop_return(void) { SPCFLAGS_SET( SPCFLAG_BRK ); - quit_program = true; + quit_program = 1; +} + +static void save_regs(struct M68kRegisters &r) +{ + int i; + + for (i=0; i<8; i++) { + r.d[i] = m68k_dreg(regs, i); + r.a[i] = m68k_areg(regs, i); + } + r.pc = m68k_getpc(); + MakeSR(); + r.sr = regs.sr; + r.isp = regs.isp; + r.usp = regs.usp; + r.msp = regs.msp; + if ((r.sr & 0x2000) == 0) + r.usp = r.a[7]; + else if ((r.sr & 0x1000) != 0) + r.msp = r.a[7]; + else + r.isp = r.a[7]; +} + +static void restore_regs(struct M68kRegisters &r) +{ + int i; + + for (i=0; i<8; i++) { + m68k_dreg(regs, i) = r.d[i]; + m68k_areg(regs, i) = r.a[i]; + } + regs.isp = r.isp; + regs.usp = r.usp; + regs.msp = r.msp; + regs.sr = r.sr; + MakeFromSR(); } void m68k_emulop(uae_u32 opcode) { +#if 0 + struct M68kRegisters r; + save_regs(r); + if (EmulOp(opcode, &r)) + restore_regs(r); +#else struct M68kRegisters r; int i; @@ -1237,6 +1053,135 @@ void m68k_emulop(uae_u32 opcode) } regs.sr = r.sr; MakeFromSR(); +#endif +} + +#if 0 +void m68k_natfeat_id(void) +{ + struct M68kRegisters r; + + /* is it really necessary to save all registers? */ + save_regs(r); + + memptr stack = r.a[7] + 4; /* skip return address */ + r.d[0] = nf_get_id(stack); + + restore_regs(r); +} + +void m68k_natfeat_call(void) +{ + struct M68kRegisters r; + + /* is it really necessary to save all registers? */ + save_regs(r); + + memptr stack = r.a[7] + 4; /* skip return address */ + bool isSupervisorMode = ((r.sr & 0x2000) == 0x2000); + r.d[0] = nf_call(stack, isSupervisorMode); + + restore_regs(r); +} +#endif + +static int m68k_call(uae_u32 pc) +{ + VOLATILE int exc = 0; + m68k_setpc(pc); + TRY(prb) { +#ifdef USE_JIT + if (UseJIT) { + exec_nostats(); + // m68k_do_compile_execute(); + // The above call to m68k_do_compile_execute fails with BadAccess in sigsegv_handler (MAC, if it is executed after the first compile_block) + // (NULL pointer to addr_instr). + // Call exec_nostats avoids calling compile_block, because stack modification is only temporary + // which will fill up compile cache with BOGUS data. + // we can call exec_nostats directly, do our code, and return back here. + } + else +#endif + m68k_do_execute(); + } + CATCH(prb) { + exc = int(prb); + } + return exc; +} + +static uae_u32 m68k_alloca(int size) +{ + uae_u32 sp = (m68k_areg(regs, 7) - size) & ~1; + m68k_areg(regs, 7) = sp; + if ((regs.sr & 0x2000) == 0) + regs.usp = sp; + else if ((regs.sr & 0x1000) != 0) + regs.msp = sp; + else + regs.isp = sp; + return sp; +} + +#if 0 +uae_u32 linea68000(volatile uae_u16 opcode) +{ + sigjmp_buf jmp; + struct M68kRegisters r; + volatile uae_u32 abase = 0; + + SAVE_EXCEPTION; + save_regs(r); + + const int sz = 8 + sizeof(void *); + volatile uae_u32 sp = 0; + uae_u32 backup[(sz + 3) / 4]; + + if (sigsetjmp(jmp, 1) == 0) + { + void *p = jmp; + uae_u8 *sp_p; + int exc; + + sp = m68k_alloca(sz); + memcpy(backup, phys_get_real_address(sp), sz); + + WriteHWMemInt16(sp, opcode); + WriteHWMemInt16(sp + 2, 0xa0ff); + WriteHWMemInt32(sp + 4, 13); + sp_p = phys_get_real_address(sp + 8); + *((void **)sp_p) = p; + if ((exc = m68k_call(sp)) != 0) + { + panicbug("exception %d in LINEA", exc); + m68k_dreg(regs, 0) = 0; + } + } else + { + abase = m68k_dreg(regs, 0); + } + + if (sp) { + memcpy(phys_get_real_address(sp), backup, sz); + } + restore_regs(r); + m68k_setpc(r.pc); + RESTORE_EXCEPTION; + return abase; +} +#endif + + +static void rts68000() +{ + uae_u32 SP = m68k_getpc() + 6; + sigjmp_buf *p; + uae_u8 *sp_p = phys_get_real_address(SP); + + p = (sigjmp_buf *)(*((void **)sp_p)); + SP += sizeof(void *); + m68k_areg(regs, 7) = SP; + siglongjmp(*p, 1); } void REGPARAM2 op_illg (uae_u32 opcode) @@ -1244,6 +1189,19 @@ void REGPARAM2 op_illg (uae_u32 opcode) uaecptr pc = m68k_getpc (); if ((opcode & 0xF000) == 0xA000) { +#if 0 + if (opcode == 0xa0ff) + { + uae_u32 call = ReadHWMemInt32(pc + 2); + switch (call) + { + case 13: + rts68000(); + return; + } + m68k_setpc(pc + 6); + } +#endif Exception(0xA,0); return; } @@ -1253,8 +1211,8 @@ void REGPARAM2 op_illg (uae_u32 opcode) return; } - write_log ("Illegal instruction: %04x at %08x\n", opcode, pc); -#if USE_JIT && JIT_DEBUG + D(bug("Illegal instruction: %04x at %08x", opcode, pc)); +#if defined(USE_JIT) && defined(JIT_DEBUG) compiler_dumpstate(); #endif @@ -1262,62 +1220,119 @@ void REGPARAM2 op_illg (uae_u32 opcode) return; } -void mmu_op(uae_u32 opcode, uae_u16 extra) -{ - if ((opcode & 0xFE0) == 0x0500) { - /* PFLUSH */ - mmusr = 0; -#ifdef USE_JIT - flush_icache(); -#endif - } else if ((opcode & 0x0FD8) == 0x548) { - /* PTEST */ - } else - op_illg (opcode); -} - -static int n_insns = 0, n_spcinsns = 0; - static uaecptr last_trace_ad = 0; static void do_trace (void) { - if (regs.t0 && CPUType >= 2) { - uae_u16 opcode; - /* should also include TRAP, CHK, SR modification FPcc */ - /* probably never used so why bother */ - /* We can afford this to be inefficient... */ - m68k_setpc (m68k_getpc ()); - fill_prefetch_0 (); - opcode = get_word(m68k_getpc()); - if (opcode == 0x4e72 /* RTE */ - || opcode == 0x4e74 /* RTD */ - || opcode == 0x4e75 /* RTS */ - || opcode == 0x4e77 /* RTR */ - || opcode == 0x4e76 /* TRAPV */ - || (opcode & 0xffc0) == 0x4e80 /* JSR */ - || (opcode & 0xffc0) == 0x4ec0 /* JMP */ - || (opcode & 0xff00) == 0x6100 /* BSR */ - || ((opcode & 0xf000) == 0x6000 /* Bcc */ - && cctrue((opcode >> 8) & 0xf)) - || ((opcode & 0xf0f0) == 0x5050 /* DBcc */ - && !cctrue((opcode >> 8) & 0xf) - && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) - { - last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); - } - } else if (regs.t1) { - last_trace_ad = m68k_getpc (); - SPCFLAGS_CLEAR( SPCFLAG_TRACE ); - SPCFLAGS_SET( SPCFLAG_DOTRACE ); + if (regs.t0) { + uae_u16 opcode; + /* should also include TRAP, CHK, SR modification FPcc */ + /* probably never used so why bother */ + /* We can afford this to be inefficient... */ + m68k_setpc (m68k_getpc ()); + fill_prefetch_0 (); + opcode = get_word(m68k_getpc()); + if (opcode == 0x4e72 /* RTE */ + || opcode == 0x4e74 /* RTD */ + || opcode == 0x4e75 /* RTS */ + || opcode == 0x4e77 /* RTR */ + || opcode == 0x4e76 /* TRAPV */ + || (opcode & 0xffc0) == 0x4e80 /* JSR */ + || (opcode & 0xffc0) == 0x4ec0 /* JMP */ + || (opcode & 0xff00) == 0x6100 /* BSR */ + || ((opcode & 0xf000) == 0x6000 /* Bcc */ + && cctrue((opcode >> 8) & 0xf)) + || ((opcode & 0xf0f0) == 0x5050 /* DBcc */ + && !cctrue((opcode >> 8) & 0xf) + && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) + { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); } + } else if (regs.t1) { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); + } +} + +#if 0 +#define SERVE_VBL_MFP(resetStop) \ +{ \ + if (SPCFLAGS_TEST( SPCFLAG_INT3|SPCFLAG_VBL|SPCFLAG_INT5|SPCFLAG_SCC|SPCFLAG_MFP )) { \ + if (SPCFLAGS_TEST( SPCFLAG_INT3 )) { \ + if (3 > regs.intmask) { \ + Interrupt(3); \ + regs.stopped = 0; \ + SPCFLAGS_CLEAR( SPCFLAG_INT3 ); \ + if (resetStop) \ + SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ + } \ + } \ + if (SPCFLAGS_TEST( SPCFLAG_VBL )) { \ + if (4 > regs.intmask) { \ + Interrupt(4); \ + regs.stopped = 0; \ + SPCFLAGS_CLEAR( SPCFLAG_VBL ); \ + if (resetStop) \ + SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ + } \ + } \ + if (SPCFLAGS_TEST( SPCFLAG_INT5 )) { \ + if (5 > regs.intmask) { \ + Interrupt(5); \ + regs.stopped = 0; \ + SPCFLAGS_CLEAR( SPCFLAG_INT5 ); \ + if (resetStop) \ + SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ + } \ + } \ + if (SPCFLAGS_TEST( SPCFLAG_SCC )) { \ + if (5 > regs.intmask) { \ + int vector_number=SCCdoInterrupt(); \ + if(vector_number){ \ + SCCInterrupt(vector_number); \ + regs.stopped = 0; \ + SPCFLAGS_CLEAR( SPCFLAG_SCC); \ + if (resetStop) \ + SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ + } \ + else \ + SPCFLAGS_CLEAR( SPCFLAG_SCC ); \ + } \ + } \ + if (SPCFLAGS_TEST( SPCFLAG_MFP )) { \ + if (6 > regs.intmask) { \ + int vector_number = MFPdoInterrupt(); \ + if (vector_number) { \ + MFPInterrupt(vector_number); \ + regs.stopped = 0; \ + if (resetStop) \ + SPCFLAGS_CLEAR( SPCFLAG_STOP ); \ + } \ + else \ + SPCFLAGS_CLEAR( SPCFLAG_MFP ); \ + } \ + } \ + } \ } -int m68k_do_specialties (void) +#define SERVE_INTERNAL_IRQ() \ +{ \ + if (SPCFLAGS_TEST( SPCFLAG_INTERNAL_IRQ )) { \ + SPCFLAGS_CLEAR( SPCFLAG_INTERNAL_IRQ ); \ + invoke200HzInterrupt(); \ + } \ +} +#endif + +int m68k_do_specialties(void) { -#if USE_JIT +#if 0 + SERVE_INTERNAL_IRQ(); +#endif +#ifdef USE_JIT // Block was compiled SPCFLAGS_CLEAR( SPCFLAG_JIT_END_COMPILE ); @@ -1328,11 +1343,39 @@ int m68k_do_specialties (void) if ((m68k_execute_depth == 0) && SPCFLAGS_TEST( SPCFLAG_JIT_EXEC_RETURN )) SPCFLAGS_CLEAR( SPCFLAG_JIT_EXEC_RETURN ); #endif - + /*n_spcinsns++;*/ if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { Exception (9,last_trace_ad); } +#if 0 /* not for ARAnyM; emulating 040 only */ + if ((regs.spcflags & SPCFLAG_STOP) && regs.s == 0 && currprefs.cpu_model <= 68010) { + // 68000/68010 undocumented special case: + // if STOP clears S-bit and T was not set: + // cause privilege violation exception, PC pointing to following instruction. + // If T was set before STOP: STOP works as documented. + m68k_unset_stop(); + Exception(8, 0); + } +#endif while (SPCFLAGS_TEST( SPCFLAG_STOP )) { + //TODO: Check +#if 0 + if ((regs.sr & 0x700) == 0x700) + { + panicbug("STOPed with interrupts disabled, exiting; pc=$%08x", m68k_getpc()); + m68k_dumpstate (stderr, NULL); + quit_program = 1; +#ifdef FULL_HISTORY + ndebug::showHistory(20, false); + m68k_dumpstate (stderr, NULL); +#endif + return 1; + } +#endif +#if 0 + // give unused time slices back to OS + SleepAndWait(); +#endif if (SPCFLAGS_TEST( SPCFLAG_INT | SPCFLAG_DOINT )){ SPCFLAGS_CLEAR( SPCFLAG_INT | SPCFLAG_DOINT ); int intr = intlev (); @@ -1342,10 +1385,30 @@ int m68k_do_specialties (void) SPCFLAGS_CLEAR( SPCFLAG_STOP ); } } + +#if 0 + SERVE_INTERNAL_IRQ(); + SERVE_VBL_MFP(true); +#endif +#if 0 + if (SPCFLAGS_TEST( SPCFLAG_BRK )) + break; +#endif } if (SPCFLAGS_TEST( SPCFLAG_TRACE )) do_trace (); +#if 0 + SERVE_VBL_MFP(false); +#endif + +/* +// do not understand the INT vs DOINT stuff so I disabled it (joy) + if (regs.spcflags & SPCFLAG_INT) { + regs.spcflags &= ~SPCFLAG_INT; + regs.spcflags |= SPCFLAG_DOINT; + } +*/ if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { SPCFLAGS_CLEAR( SPCFLAG_DOINT ); int intr = intlev (); @@ -1354,159 +1417,213 @@ int m68k_do_specialties (void) regs.stopped = 0; } } + if (SPCFLAGS_TEST( SPCFLAG_INT )) { SPCFLAGS_CLEAR( SPCFLAG_INT ); SPCFLAGS_SET( SPCFLAG_DOINT ); } - if (SPCFLAGS_TEST( SPCFLAG_BRK )) { - SPCFLAGS_CLEAR( SPCFLAG_BRK ); + + if (SPCFLAGS_TEST( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ )) { + SPCFLAGS_CLEAR( SPCFLAG_BRK /*| SPCFLAG_MODE_CHANGE*/ ); return 1; } + return 0; } void m68k_do_execute (void) { - for (;;) { - uae_u32 opcode = GET_OPCODE; -#if FLIGHT_RECORDER - m68k_record_step(m68k_getpc()); + uae_u32 pc; + uae_u32 opcode; + for (;;) { + regs.fault_pc = pc = m68k_getpc(); +#ifdef FULL_HISTORY +#ifdef NEED_TO_DEBUG_BADLY + history[lasthist] = regs; + historyf[lasthist] = regflags; +#else + history[lasthist] = m68k_getpc(); #endif - (*cpufunctbl[opcode])(opcode); - cpu_check_ticks(); - if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { - if (m68k_do_specialties()) - return; - } + if (++lasthist == MAX_HIST) lasthist = 0; + if (lasthist == firsthist) { + if (++firsthist == MAX_HIST) firsthist = 0; + } +#endif + +#ifndef FULLMMU +#ifdef ARAM_PAGE_CHECK + if (((pc ^ pc_page) > ARAM_PAGE_MASK)) { + check_ram_boundary(pc, 2, false); + pc_page = pc; + pc_offset = (uintptr)get_real_address(pc, 0, sz_word) - pc; + } +#else + check_ram_boundary(pc, 2, false); +#endif +#endif + opcode = GET_OPCODE; +#ifdef FLIGHT_RECORDER + m68k_record_step(m68k_getpc(), cft_map(opcode)); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + regs.fault_pc = m68k_getpc(); + + if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { + if (m68k_do_specialties()) + return; } + } } void m68k_execute (void) { -#if USE_JIT - ++m68k_execute_depth; +#ifdef USE_JIT + m68k_execute_depth++; #endif +#ifdef DEBUGGER + VOLATILE bool after_exception = false; +#endif + +setjmpagain: + TRY(prb) { for (;;) { - if (quit_program) - break; - m68k_do_execute(); + if (quit_program > 0) { + if (quit_program == 1) { +#ifdef FLIGHT_RECORDER + dump_flight_recorder(); +#endif + break; + } + quit_program = 0; + m68k_reset (); + } +#ifdef DEBUGGER + if (debugging && !after_exception) debug(); + after_exception = false; +#endif + m68k_do_execute(); } -#if USE_JIT - --m68k_execute_depth; + } + CATCH(prb) { + Exception(prb, 0); +#ifdef DEBUGGER + after_exception = true; +#endif + goto setjmpagain; + } + +#ifdef USE_JIT + m68k_execute_depth--; #endif } -static void m68k_verify (uaecptr addr, uaecptr *nextpc) +void m68k_disasm (FILE *f, uaecptr addr, uaecptr *nextpc, int cnt) { - uae_u32 opcode, val; - struct instr *dp; - - opcode = get_iword_1(0); - last_op_for_exception_3 = opcode; - m68kpc_offset = 2; - - if (cpufunctbl[cft_map (opcode)] == op_illg_1) { - opcode = 0x4AFC; - } - dp = table68k + opcode; - - if (dp->suse) { - if (!verify_ea (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, &val)) { - Exception (3, 0); - return; - } - } - if (dp->duse) { - if (!verify_ea (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, &val)) { - Exception (3, 0); - return; - } +#ifdef HAVE_DISASM_M68K + char buf[256]; + int size; + + disasm_info.memory_vma = addr; + while (cnt-- > 0) { + size = m68k_disasm_to_buf(&disasm_info, buf, 1); + fprintf(f, "%s\n", buf); + if (size < 0) + break; } + if (nextpc) + *nextpc = disasm_info.memory_vma; +#else + if (nextpc) + *nextpc = addr; + (void) f; + (void) cnt; +#endif } -void m68k_disasm (uaecptr addr, uaecptr *nextpc, int cnt) +#ifdef DEBUGGER +void newm68k_disasm(FILE *f, uaecptr addr, uaecptr *nextpc, unsigned int cnt) { - uaecptr newpc = 0; - m68kpc_offset = addr - m68k_getpc (); - while (cnt-- > 0) { - char instrname[20],*ccpt; - int opwords; - uae_u32 opcode; - struct mnemolookup *lookup; - struct instr *dp; - printf ("%08lx: ", m68k_getpc () + m68kpc_offset); - for (opwords = 0; opwords < 5; opwords++){ - printf ("%04x ", get_iword_1 (m68kpc_offset + opwords*2)); - } - opcode = get_iword_1 (m68kpc_offset); - m68kpc_offset += 2; - if (cpufunctbl[cft_map (opcode)] == op_illg_1) { - opcode = 0x4AFC; - } - dp = table68k + opcode; - for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) - ; - - strcpy (instrname, lookup->name); - ccpt = strstr (instrname, "cc"); - if (ccpt != 0) { - strncpy (ccpt, ccnames[dp->cc], 2); - } - printf ("%s", instrname); - switch (dp->size){ - case sz_byte: printf (".B "); break; - case sz_word: printf (".W "); break; - case sz_long: printf (".L "); break; - default: printf (" "); break; - } +#ifdef HAVE_DISASM_M68K + char buf[256]; + + disasm_info.memory_vma = addr; + if (cnt == 0) { + m68k_disasm_to_buf(&disasm_info, buf, 1); + } else { + while (cnt-- > 0) { + m68k_disasm_to_buf(&disasm_info, buf, 1); + fprintf(f, "%s\n", buf); + } + } + if (nextpc) + *nextpc = disasm_info.memory_vma; +#else + if (nextpc) + *nextpc = addr; + (void) cnt; +#endif +} - if (dp->suse) { - newpc = m68k_getpc () + m68kpc_offset; - newpc += ShowEA (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); - } - if (dp->suse && dp->duse) - printf (","); - if (dp->duse) { - newpc = m68k_getpc () + m68kpc_offset; - newpc += ShowEA (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 0); - } - if (ccpt != 0) { - if (cctrue(dp->cc)) - printf (" == %08x (TRUE)", newpc); - else - printf (" == %08x (FALSE)", newpc); - } else if ((opcode & 0xff00) == 0x6100) /* BSR */ - printf (" == %08x", newpc); - printf ("\n"); - } - if (nextpc) - *nextpc = m68k_getpc () + m68kpc_offset; +#endif /* DEBUGGER */ + +#ifdef FULL_HISTORY +void showDisasm(uaecptr addr) { +#ifdef HAVE_DISASM_M68K + char buf[256]; + + disasm_info.memory_vma = addr; + m68k_disasm_to_buf(&disasm_info, buf, 1); + bug("%s", buf); +#else + (void) addr; +#endif } +#endif /* FULL_HISTORY */ -void m68k_dumpstate (uaecptr *nextpc) +void m68k_dumpstate (FILE *out, uaecptr *nextpc) { - int i; - for (i = 0; i < 8; i++){ - printf ("D%d: %08x ", i, m68k_dreg(regs, i)); - if ((i & 3) == 3) printf ("\n"); - } - for (i = 0; i < 8; i++){ - printf ("A%d: %08x ", i, m68k_areg(regs, i)); - if ((i & 3) == 3) printf ("\n"); - } - if (regs.s == 0) regs.usp = m68k_areg(regs, 7); - if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); - if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); - printf ("USP=%08x ISP=%08x MSP=%08x VBR=%08x\n", - regs.usp,regs.isp,regs.msp,regs.vbr); - printf ("T=%d%d S=%d M=%d X=%ld N=%ld Z=%ld V=%ld C=%ld IMASK=%d\n", - regs.t1, regs.t0, regs.s, regs.m, - GET_XFLG(), GET_NFLG(), GET_ZFLG(), GET_VFLG(), GET_CFLG(), regs.intmask); - - fpu_dump_registers(); - fpu_dump_flags(); - - m68k_disasm(m68k_getpc (), nextpc, 1); - if (nextpc) - printf ("next PC: %08x\n", *nextpc); + int i; + for (i = 0; i < 8; i++){ + fprintf (out, "D%d: %08lx ", i, (unsigned long)m68k_dreg(regs, i)); + if ((i & 3) == 3) fprintf (out, "\n"); + } + for (i = 0; i < 8; i++){ + fprintf (out, "A%d: %08lx ", i, (unsigned long)m68k_areg(regs, i)); + if ((i & 3) == 3) fprintf (out, "\n"); + } + if (regs.s == 0) regs.usp = m68k_areg(regs, 7); + if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); + if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); + fprintf (out, "USP=%08lx ISP=%08lx MSP=%08lx VBR=%08lx\n", + (unsigned long)regs.usp, (unsigned long)regs.isp, + (unsigned long)regs.msp, (unsigned long)regs.vbr); + fprintf (out, "T=%d%d S=%d M=%d X=%d N=%d Z=%d V=%d C=%d IMASK=%d TCE=%d TCP=%d\n", + regs.t1, regs.t0, regs.s, regs.m, + (int)GET_XFLG(), (int)GET_NFLG(), (int)GET_ZFLG(), (int)GET_VFLG(), (int)GET_CFLG(), regs.intmask, + regs.mmu_enabled, regs.mmu_pagesize_8k); + fprintf (out, "CACR=%08lx CAAR=%08lx URP=%08lx SRP=%08lx\n", + (unsigned long)regs.cacr, + (unsigned long)regs.caar, + (unsigned long)regs.urp, + (unsigned long)regs.srp); + fprintf (out, "DTT0=%08lx DTT1=%08lx ITT0=%08lx ITT1=%08lx\n", + (unsigned long)regs.dtt0, + (unsigned long)regs.dtt1, + (unsigned long)regs.itt0, + (unsigned long)regs.itt1); + for (i = 0; i < 8; i++){ + fprintf (out, "FP%d: %g ", i, (double)fpu.registers[i]); + if ((i & 3) == 3) fprintf (out, "\n"); + } +#if 0 + fprintf (out, "N=%d Z=%d I=%d NAN=%d\n", + (regs.fpsr & 0x8000000) != 0, + (regs.fpsr & 0x4000000) != 0, + (regs.fpsr & 0x2000000) != 0, + (regs.fpsr & 0x1000000) != 0); +#endif + m68k_disasm(out, m68k_getpc (), nextpc, 1); + if (nextpc) + fprintf (out, "next PC: %08lx\n", (unsigned long)*nextpc); } diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index 97731f592..13a51b82b 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -1,41 +1,51 @@ /* - * UAE - The Un*x Amiga Emulator + * newcpu.h - CPU emulation * - * MC68000 emulation + * Copyright (c) 2009 ARAnyM dev team (see AUTHORS) + * + * Inspired by Christian Bauer's Basilisk II * - * Copyright 1995 Bernd Schmidt + * This file is part of the ARAnyM project which builds a new and powerful + * TOS/FreeMiNT compatible virtual machine running on almost any hardware. * - * This program is free software; you can redistribute it and/or modify + * ARAnyM 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, + * ARAnyM 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 + * along with ARAnyM; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + */ #ifndef NEWCPU_H #define NEWCPU_H -#ifndef FLIGHT_RECORDER -#define FLIGHT_RECORDER 0 -#endif - -#include "m68k.h" -#include "readcpu.h" +#include "sysdeps.h" +#include "registers.h" #include "spcflags.h" +#include "m68k.h" +#include "memory.h" -#if ENABLE_MON -#include "mon.h" -#include "mon_disass.h" -#endif +# include +extern struct fixup { + int flag; + uae_u32 reg; + uaecptr value; +}fixup; extern int areg_byteinc[]; extern int imm8_table[]; @@ -57,27 +67,25 @@ extern int broken_in; #endif #define cpuop_begin() do { cpuop_tag("begin"); } while (0) -#define cpuop_end() do { cpuop_tag("end"); } while (0) +#define cpuop_end() do { cpuop_tag("end"); } while (0) typedef void REGPARAM2 cpuop_func (uae_u32) REGPARAM; - + struct cputbl { cpuop_func *handler; uae_u16 specific; uae_u16 opcode; }; -extern cpuop_func *cpufunctbl[65536] ASM_SYM("cpufunctbl"); +extern cpuop_func *cpufunctbl[65536]; -#if USE_JIT +#ifdef USE_JIT typedef void compop_func (uae_u32) REGPARAM; -//NOTE: The "opcode" and "specific" fields were switched in the original source code! - struct comptbl { compop_func *handler; - uae_u32 opcode; - uae_u32 specific; + uae_u32 opcode; + uae_u32 specific; #define COMP_OPCODE_ISJUMP 0x0001 #define COMP_OPCODE_LONG_OPCODE 0x0002 #define COMP_OPCODE_CMOV 0x0004 @@ -88,151 +96,84 @@ struct comptbl { #endif extern void REGPARAM2 op_illg (uae_u32) REGPARAM; -extern void m68k_dumpstate(uaecptr *nextpc); - -typedef char flagtype; - -// struct regstruct { -// uae_u32 regs[16]; - -// uae_u32 pc; -// uae_u8 * pc_p; -// uae_u8 * pc_oldp; - -// spcflags_t spcflags; -// int intmask; - -// uae_u32 vbr, sfc, dfc; -// uaecptr usp, isp, msp; -// uae_u16 sr; -// flagtype t1; -// flagtype t0; -// flagtype s; -// flagtype m; -// flagtype x; -// flagtype stopped; - -// #if USE_PREFETCH_BUFFER -// /* Fellow sources say this is 4 longwords. That's impossible. It needs -// * to be at least a longword. The HRM has some cryptic comment about two -// * instructions being on the same longword boundary. -// * The way this is implemented now seems like a good compromise. -// */ -// uae_u32 prefetch; -// #endif -// }; - -struct regstruct -{ - uae_u32 regs[16]; - uaecptr usp,isp,msp; - uae_u16 sr; - flagtype t1; - flagtype t0; - flagtype s; - flagtype m; - flagtype x; - flagtype stopped; - int intmask; - - uae_u32 pc; - uae_u32 fault_pc; - uae_u8 *pc_p; - uae_u8 *pc_oldp; - - uae_u32 vbr,sfc,dfc; - - volatile uae_u32 spcflags; - -#if 1 - uae_u32 kick_mask; - - /* Fellow sources say this is 4 longwords. That's impossible. It needs - * to be at least a longword. The HRM has some cryptic comment about two - * instructions being on the same longword boundary. - * The way this is implemented now seems like a good compromise. - */ - uae_u32 prefetch; -#endif - - /* MMU reg*/ - uae_u32 urp,srp; - uae_u32 tc; - - int mmu_enabled; /* flagtype tce; */ - int mmu_pagesize_8k; /* flagtype tcp; */ - - uae_u32 dtt0,dtt1,itt0,itt1; - uae_u32 mmusr; - - uae_u32 mmu_fslw, mmu_fault_addr; - uae_u16 mmu_ssw; - uae_u32 wb3_data; - uae_u16 wb3_status; - - /* Cache reg*/ - uae_u32 cacr,caar; -}; - -extern regstruct regs, lastint_regs; #define m68k_dreg(r,num) ((r).regs[(num)]) #define m68k_areg(r,num) (((r).regs + 8)[(num)]) -#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1)) -#define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o))) -#define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o))) +#ifdef FULLMMU +static ALWAYS_INLINE uae_u8 get_ibyte(uae_u32 o) +{ + return mmu_get_byte(m68k_getpc() + o + 1, 0, sz_byte); +} +static ALWAYS_INLINE uae_u16 get_iword(uae_u32 o) +{ + return mmu_get_word(m68k_getpc() + o, 0, sz_word); +} +static ALWAYS_INLINE uae_u32 get_ilong(uae_u32 o) +{ + uaecptr addr = m68k_getpc() + o; + + if (unlikely(is_unaligned(addr, 4))) + return mmu_get_long_unaligned(addr, 0); + return mmu_get_long(addr, 0, sz_long); +} -#ifdef HAVE_GET_WORD_UNSWAPPED -#define GET_OPCODE (do_get_mem_word_unswapped (regs.pc_p)) #else -#define GET_OPCODE (get_iword (0)) +#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(get_real_address(m68k_getpc(), 0, sz_byte) + (o) + 1)) +#define get_iword(o) do_get_mem_word((uae_u16 *)(get_real_address(m68k_getpc(), 0, sz_word) + (o))) +#define get_ilong(o) do_get_mem_long((uae_u32 *)(get_real_address(m68k_getpc(), 0, sz_long) + (o))) #endif -#if USE_PREFETCH_BUFFER -static __inline__ uae_u32 get_ibyte_prefetch (uae_s32 o) +#if 0 +static inline uae_u32 get_ibyte_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1)); + return do_get_mem_byte((uae_u8 *)(do_get_real_address(regs.pcp, false, false) + o + 1)); return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1)); } -static __inline__ uae_u32 get_iword_prefetch (uae_s32 o) +static inline uae_u32 get_iword_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_word((uae_u16 *)(regs.pc_p + o)); + return do_get_mem_word((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + o)); return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o)); } -static __inline__ uae_u32 get_ilong_prefetch (uae_s32 o) +static inline uae_u32 get_ilong_prefetch (uae_s32 o) { if (o > 3 || o < 0) - return do_get_mem_long((uae_u32 *)(regs.pc_p + o)); + return do_get_mem_long((uae_u32 *)(do_get_real_address(regs.pcp, false, false) + o)); if (o == 0) return do_get_mem_long(®s.prefetch); - return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4)); + return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(do_get_real_address(regs.pcp, false, false) + 4)); } #endif -static __inline__ void fill_prefetch_0 (void) +#ifdef FULLMMU +#define m68k_incpc(o) (regs.pc += (o)) +#else +#define m68k_incpc(o) (regs.pc_p += (o)) +#endif + +static inline void fill_prefetch_0 (void) { #if USE_PREFETCH_BUFFER uae_u32 r; #ifdef UNALIGNED_PROFITABLE - r = *(uae_u32 *)regs.pc_p; + r = *(uae_u32 *)do_get_real_address(m68k_getpc(), false, false); regs.prefetch = r; #else - r = do_get_mem_long ((uae_u32 *)regs.pc_p); + r = do_get_mem_long ((uae_u32 *)do_get_real_address(m68k_getpc(), false, false)); do_put_mem_long (®s.prefetch, r); #endif #endif } #if 0 -static __inline__ void fill_prefetch_2 (void) +static inline void fill_prefetch_2 (void) { uae_u32 r = do_get_mem_long (®s.prefetch) << 16; - uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1); + uae_u32 r2 = do_get_mem_word (((uae_u16 *)do_get_real_address(regs.pcp, false, false)) + 1); r |= r2; do_put_mem_long (®s.prefetch, r); } @@ -240,115 +181,92 @@ static __inline__ void fill_prefetch_2 (void) #define fill_prefetch_2 fill_prefetch_0 #endif -static __inline__ uaecptr m68k_getpc (void) -{ -#if REAL_ADDRESSING || DIRECT_ADDRESSING - return get_virtual_address(regs.pc_p); -#else - return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); -#endif -} - -static __inline__ void m68k_setpc (uaecptr newpc) -{ -#if ENABLE_MON - uae_u32 previous_pc = m68k_getpc(); -#endif - -#if REAL_ADDRESSING || DIRECT_ADDRESSING - regs.pc_p = get_real_address(newpc); -#else - regs.pc_p = regs.pc_oldp = get_real_address(newpc); - regs.pc = newpc; -#endif - -#if ENABLE_MON - if (IS_BREAK_POINT(newpc)) { - printf("Stopped at break point address: %08x. Last PC: %08x\n", newpc, previous_pc); - m68k_dumpstate(NULL); - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); - } -#endif // end of #if ENABLE_MON -} - -static __inline__ void m68k_incpc (uae_s32 delta) -{ -#if ENABLE_MON - uae_u32 previous_pc = m68k_getpc(); -#endif - regs.pc_p += (delta); -#if ENABLE_MON - uaecptr next_pc = m68k_getpc(); - if (IS_BREAK_POINT(next_pc)) { - printf("Stopped at break point address: %08x. Last PC: %08x\n", next_pc, previous_pc); - m68k_dumpstate(NULL); - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); - } -#endif // end of #if ENABLE_MON -} - /* These are only used by the 68020/68881 code, and therefore don't * need to handle prefetch. */ -static __inline__ uae_u32 next_ibyte (void) +static inline uae_u32 next_ibyte (void) { uae_u32 r = get_ibyte (0); m68k_incpc (2); return r; } -static __inline__ uae_u32 next_iword (void) +static inline uae_u32 next_iword (void) { uae_u32 r = get_iword (0); m68k_incpc (2); return r; } -static __inline__ uae_u32 next_ilong (void) +static inline uae_u32 next_ilong (void) { uae_u32 r = get_ilong (0); m68k_incpc (4); return r; } +static inline void m68k_setpc (uaecptr newpc) +{ +#ifndef FULLMMU + regs.pc_p = regs.pc_oldp = get_real_address(newpc, 0, sz_word); +#endif + regs.fault_pc = regs.pc = newpc; +} + #define m68k_setpc_fast m68k_setpc #define m68k_setpc_bcc m68k_setpc #define m68k_setpc_rte m68k_setpc -static __inline__ void m68k_do_rts(void) +static inline void m68k_do_rts(void) { - m68k_setpc(get_long(m68k_areg(regs, 7))); - m68k_areg(regs, 7) += 4; + m68k_setpc(get_long(m68k_areg(regs, 7))); + m68k_areg(regs, 7) += 4; } -static __inline__ void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) +static inline void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) { - m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); - m68k_incpc(offset); + put_long(m68k_areg(regs, 7) - 4, oldpc); + m68k_areg(regs, 7) -= 4; + m68k_incpc(offset); } -static __inline__ void m68k_do_jsr(uaecptr oldpc, uaecptr dest) +static inline void m68k_do_jsr(uaecptr oldpc, uaecptr dest) { - m68k_areg(regs, 7) -= 4; - put_long(m68k_areg(regs, 7), oldpc); - m68k_setpc(dest); + put_long(m68k_areg(regs, 7) - 4, oldpc); + m68k_areg(regs, 7) -= 4; + m68k_setpc(dest); } -static __inline__ void m68k_setstopped (int stop) +static inline void m68k_setstopped (int stop) { regs.stopped = stop; /* A traced STOP instruction drops through immediately without actually stopping. */ - if (stop && (regs.spcflags & SPCFLAG_DOTRACE) == 0) - SPCFLAGS_SET( SPCFLAG_STOP ); + if (stop && !( SPCFLAGS_TEST( SPCFLAG_DOTRACE ))) + SPCFLAGS_SET( SPCFLAG_STOP ); } -extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); -extern uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); +#ifdef FULLMMU +# define GET_OPCODE (get_iword (0)) +#elif defined ARAM_PAGE_CHECK +# ifdef HAVE_GET_WORD_UNSWAPPED +# define GET_OPCODE (do_get_mem_word_unswapped((uae_u16*)(pc + pc_offset))); +# else +# define GET_OPCODE (do_get_mem_word((uae_u16*)(pc + pc_offset))); +# endif +#else +# ifdef HAVE_GET_WORD_UNSWAPPED +# define GET_OPCODE (do_get_mem_word_unswapped ((uae_u16*)get_real_address(m68k_getpc(), 0, sz_word))) +# else +# define GET_OPCODE (get_iword (0)) +# endif +#endif + +extern REGPARAM uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); +extern REGPARAM uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); +extern REGPARAM uae_u32 get_bitfield(uae_u32 src, uae_u32 bdata[2], uae_s32 offset, int width); +extern REGPARAM void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, uae_s32 offset, int width); + -extern uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf); extern void MakeSR (void); extern void MakeFromSR (void); @@ -360,15 +278,19 @@ extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr); extern void m68k_mull (uae_u32, uae_u32, uae_u16); extern void m68k_emulop (uae_u32); extern void m68k_emulop_return (void); +extern void m68k_natfeat_id(void); +extern void m68k_natfeat_call(void); extern void init_m68k (void); extern void exit_m68k (void); -extern void m68k_dumpstate (uaecptr *); -extern void m68k_disasm (uaecptr, uaecptr *, int); +extern void m68k_dumpstate (FILE *, uaecptr *); +extern void m68k_disasm (FILE *, uaecptr, uaecptr *, int); +extern void newm68k_disasm(FILE *, uaecptr, uaecptr *, unsigned int); +extern void showDisasm(uaecptr); extern void m68k_reset (void); extern void m68k_enter_debugger(void); extern int m68k_do_specialties(void); - -extern void mmu_op (uae_u32, uae_u16); +extern void m68k_instr_set(void); +uae_u32 linea68000(uae_u16 opcode); /* Opcode of faulting instruction */ extern uae_u16 last_op_for_exception_3; @@ -379,24 +301,19 @@ extern uaecptr last_fault_for_exception_3; #define CPU_OP_NAME(a) op ## a -/* 68020 + 68881 */ -extern struct cputbl op_smalltbl_0_ff[]; -/* 68020 */ -extern struct cputbl op_smalltbl_1_ff[]; -/* 68010 */ -extern struct cputbl op_smalltbl_2_ff[]; -/* 68000 */ -extern struct cputbl op_smalltbl_3_ff[]; -/* 68000 slow but compatible. */ -extern struct cputbl op_smalltbl_4_ff[]; - -#if FLIGHT_RECORDER -extern void m68k_record_step(uaecptr) REGPARAM; +/* 68040+ 68881 */ +extern const struct cputbl op_smalltbl_0_ff[]; +extern const struct cputbl op_smalltbl_0_nf[]; + +#ifdef FLIGHT_RECORDER +extern void m68k_record_step(uaecptr, int); #endif + extern void m68k_do_execute(void); extern void m68k_execute(void); -#if USE_JIT +#ifdef USE_JIT extern void m68k_compile_execute(void); +extern void m68k_do_compile_execute(void); #endif #ifdef USE_CPU_EMUL_SERVICES extern int32 emulated_ticks; @@ -411,5 +328,7 @@ static inline void cpu_check_ticks(void) #define cpu_check_ticks() #define cpu_do_check_ticks() #endif - + +cpuop_func op_illg_1; + #endif /* NEWCPU_H */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h index e87d22b49..e3b7a3a5b 100644 --- a/BasiliskII/src/uae_cpu/noflags.h +++ b/BasiliskII/src/uae_cpu/noflags.h @@ -33,13 +33,13 @@ #define NOFLAGS_CMP 0 #undef SET_NFLG_ALWAYS -static __inline__ void SET_NFLG_ALWAYS(uae_u32 x) +static inline void SET_NFLG_ALWAYS(uae_u32 x) { SET_NFLG(x); /* This has not yet been redefined */ } #undef SET_CFLG_ALWAYS -static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) +static inline void SET_CFLG_ALWAYS(uae_u32 x) { SET_CFLG(x); /* This has not yet been redefined */ } @@ -62,13 +62,13 @@ static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) #define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) #undef CLEAR_CZNV -#define CLEAR_CZNV() do {} while (0) +#define CLEAR_CZNV() #undef IOR_CZNV #define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) #undef SET_CZNV #define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) #undef COPY_CARRY -#define COPY_CARRY() do {} while (0) +#define COPY_CARRY() #ifdef optflag_testl #undef optflag_testl diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu/readcpu.cpp index 3fccdfb73..742e0be5c 100644 --- a/BasiliskII/src/uae_cpu/readcpu.cpp +++ b/BasiliskII/src/uae_cpu/readcpu.cpp @@ -1,34 +1,30 @@ +/* 2002 MJ */ /* * UAE - The Un*x Amiga Emulator * * Read 68000 CPU specs from file "table68k" * * Copyright 1995,1996 Bernd Schmidt - * - * 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 -#include -#include -#include - #include "sysdeps.h" #include "readcpu.h" +#include +#include +#include +#include + +using std::strncmp; +using std::abort; +using std::fprintf; +using std::strcmp; +using std::strlen; +using std::malloc; + int nr_cpuop_funcs; +struct instr *table68k; +static int readcpu_mismatch; struct mnemolookup lookuptab[] = { { i_ILLG, "ILLEGAL" }, @@ -153,16 +149,19 @@ struct mnemolookup lookuptab[] = { { i_CPUSHA, "CPUSHA" }, { i_MOVE16, "MOVE16" }, - { i_EMULOP_RETURN, "EMULOP_RETURN" }, - { i_EMULOP, "EMULOP" }, - + { i_EMULOP_RETURN, "EMULOP_RETURN" }, + { i_EMULOP, "EMULOP" }, + { i_MMUOP, "MMUOP" }, + + {i_NATFEAT_ID, "NATFEAT_ID" }, + {i_NATFEAT_CALL, "NATFEAT_CALL" }, + { i_ILLG, "" }, }; -struct instr *table68k; -static __inline__ amodes mode_from_str (const char *str) +static inline amodes mode_from_str (const char *str) { if (strncmp (str, "Dreg", 4) == 0) return Dreg; if (strncmp (str, "Areg", 4) == 0) return Areg; @@ -180,7 +179,7 @@ static __inline__ amodes mode_from_str (const char *str) return (amodes)0; } -static __inline__ amodes mode_from_mr (int mode, int reg) +static inline amodes mode_from_mr (int mode, int reg) { switch (mode) { case 0: return Dreg; @@ -215,31 +214,32 @@ static void build_insn (int insn) int i, n; int flaglive = 0, flagdead = 0; - int cflow = 0; + int cflow = 0; id = defs68k[insn]; - // Control flow information - cflow = id.cflow; - - // Mask of flags set/used - unsigned char flags_set(0), flags_used(0); - - for (i = 0, n = 4; i < 5; i++, n--) { - switch (id.flaginfo[i].flagset) { - case fa_unset: case fa_isjmp: break; - default: flags_set |= (1 << n); - } - - switch (id.flaginfo[i].flaguse) { - case fu_unused: case fu_isjmp: break; - default: flags_used |= (1 << n); - } + // Control flow information + cflow = id.cflow; + + // Mask of flags set/used + unsigned char flags_set(0), flags_used(0); + + for (i = 0, n = 4; i < 5; i++, n--) { + switch (id.flaginfo[i].flagset) { + case fa_unset: case fa_isjmp: break; + default: flags_set |= (1 << n); + } + + switch (id.flaginfo[i].flaguse) { + case fu_unused: case fu_isjmp: break; + default: flags_used |= (1 << n); } - + } + for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flagset){ case fa_unset: break; + case fa_isjmp: break; case fa_zero: flagdead |= 1 << i; break; case fa_one: flagdead |= 1 << i; break; case fa_dontcare: flagdead |= 1 << i; break; @@ -252,6 +252,8 @@ static void build_insn (int insn) for (i = 0; i < 5; i++) { switch (id.flaginfo[i].flaguse) { case fu_unused: break; + case fu_isjmp: flaglive |= 1 << i; break; + case fu_maybecc: flaglive |= 1 << i; break; case fu_unknown: flaglive = -1; goto out2; case fu_used: flaglive |= 1 << i; break; } @@ -306,6 +308,7 @@ static void build_insn (int insn) continue; if (bitcnt[bitI] && (bitval[bitI] == 0x00 || bitval[bitI] == 0xff)) continue; + if (bitcnt[bitE] && (bitval[bitE] == 0x00)) continue; @@ -346,9 +349,9 @@ static void build_insn (int insn) } } mnp++; - if ((unsigned)mnp >= sizeof(mnemonic) - 1) { - mnemonic[sizeof(mnemonic) - 1] = 0; - fprintf(stderr, "Instruction %s overflow\n", mnemonic); + if ((unsigned)mnp >= (sizeof(mnemonic)-1)) { + mnemonic[sizeof(mnemonic)-1] = '\0'; + fprintf(stderr, "WTF!!! Instruction '%s' overflow\n", mnemonic); abort(); } } @@ -379,6 +382,7 @@ static void build_insn (int insn) case 'A': srcmode = Areg; switch (opcstr[pos++]) { + case 'l': srcmode = absl; break; case 'r': srcreg = bitval[bitr]; srcgather = 1; srcpos = bitpos[bitr]; break; case 'R': srcreg = bitval[bitR]; srcgather = 1; srcpos = bitpos[bitR]; break; default: abort(); @@ -388,9 +392,11 @@ static void build_insn (int insn) case 'P': srcmode = Aipi; pos++; break; } break; +#if 0 case 'L': srcmode = absl; break; +#endif case '#': switch (opcstr[pos++]) { case 'z': srcmode = imm; break; @@ -436,7 +442,7 @@ static void build_insn (int insn) srcpos = bitpos[bitK]; } break; - case 'E': srcmode = immi; srcreg = bitval[bitE]; + case 'E': srcmode = immi; srcreg = bitval[bitE]; if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? /* 1..255 */ srcgather = 1; @@ -444,8 +450,8 @@ static void build_insn (int insn) srcpos = bitpos[bitE]; } break; - case 'p': srcmode = immi; srcreg = bitval[bitp]; - if (CPU_EMU_SIZE < 5) { + case 'p': srcmode = immi; srcreg = bitval[bitp]; + if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? /* 0..3 */ srcgather = 1; srctype = 7; @@ -582,21 +588,22 @@ static void build_insn (int insn) case 'A': destmode = Areg; switch (opcstr[pos++]) { + case 'l': destmode = absl; break; case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; - case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; + case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; default: abort(); } - if (dstpos < 0 || dstpos >= 32) - abort(); switch (opcstr[pos]) { case 'p': destmode = Apdi; pos++; break; case 'P': destmode = Aipi; pos++; break; } break; +#if 0 case 'L': destmode = absl; break; +#endif case '#': switch (opcstr[pos++]) { case 'z': destmode = imm; break; @@ -767,7 +774,7 @@ static void build_insn (int insn) table68k[opc].flaginfo[i].flaguse = id.flaginfo[i].flaguse; } #endif - + // Fix flags used information for Scc, Bcc, TRAPcc, DBcc instructions if ( table68k[opc].mnemo == i_Scc || table68k[opc].mnemo == i_Bcc @@ -795,7 +802,7 @@ static void build_insn (int insn) case 15:flags_used = 0x0E; break; /* LE */ } } - + #if 1 /* gb-- flagdead and flaglive would not have correct information */ table68k[opc].flagdead = flags_set; @@ -811,22 +818,6 @@ static void build_insn (int insn) } -void read_table68k (void) -{ - int i; - - table68k = (struct instr *)malloc (65536 * sizeof (struct instr)); - for (i = 0; i < 65536; i++) { - table68k[i].mnemo = i_ILLG; - table68k[i].handler = -1; - } - for (i = 0; i < n_defs68k; i++) { - build_insn (i); - } -} - -static int mismatch; - static void handle_merges (long int opcode) { uae_u16 smsk; @@ -851,9 +842,9 @@ static void handle_merges (long int opcode) case 5: smsk = 63; sbitdst = 64; break; case 6: - smsk = 255; sbitdst = 256; break; + smsk = 255; sbitdst = 256; break; case 7: - smsk = 3; sbitdst = 4; break; + smsk = 3; sbitdst = 4; break; default: smsk = 0; sbitdst = 0; abort(); @@ -869,7 +860,7 @@ static void handle_merges (long int opcode) } for (srcreg=0; srcreg < sbitdst; srcreg++) { for (dstreg=0; dstreg < dstend; dstreg++) { - uae_u16 code = uae_u16(opcode); + uae_u16 code = opcode; code = (code & ~smsk) | (srcreg << table68k[opcode].spos); code = (code & ~dmsk) | (dstreg << table68k[opcode].dpos); @@ -882,20 +873,20 @@ static void handle_merges (long int opcode) || table68k[code].suse != table68k[opcode].suse || table68k[code].duse != table68k[opcode].duse) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (table68k[opcode].suse && (table68k[opcode].spos != table68k[code].spos || table68k[opcode].smode != table68k[code].smode || table68k[opcode].stype != table68k[code].stype)) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (table68k[opcode].duse && (table68k[opcode].dpos != table68k[code].dpos || table68k[opcode].dmode != table68k[code].dmode)) { - mismatch++; continue; + readcpu_mismatch++; continue; } if (code != opcode) @@ -904,11 +895,11 @@ static void handle_merges (long int opcode) } } -void do_merges (void) +static void do_merges (void) { long int opcode; int nr = 0; - mismatch = 0; + readcpu_mismatch = 0; for (opcode = 0; opcode < 65536; opcode++) { if (table68k[opcode].handler != -1 || table68k[opcode].mnemo == i_ILLG) continue; @@ -918,116 +909,26 @@ void do_merges (void) nr_cpuop_funcs = nr; } -int get_no_mismatches (void) -{ - return mismatch; -} -const char *get_instruction_name (unsigned int opcode) +void init_table68k (void) { - struct instr *ins = &table68k[opcode]; - for (int i = 0; lookuptab[i].name[0]; i++) { - if (ins->mnemo == lookuptab[i].mnemo) - return lookuptab[i].name; - } - abort(); - return NULL; -} - -static char *get_ea_string (amodes mode, wordsizes size) -{ - static char buffer[80]; - - buffer[0] = 0; - switch (mode){ - case Dreg: - strcpy (buffer,"Dn"); - break; - case Areg: - strcpy (buffer,"An"); - break; - case Aind: - strcpy (buffer,"(An)"); - break; - case Aipi: - strcpy (buffer,"(An)+"); - break; - case Apdi: - strcpy (buffer,"-(An)"); - break; - case Ad16: - strcpy (buffer,"(d16,An)"); - break; - case Ad8r: - strcpy (buffer,"(d8,An,Xn)"); - break; - case PC16: - strcpy (buffer,"(d16,PC)"); - break; - case PC8r: - strcpy (buffer,"(d8,PC,Xn)"); - break; - case absw: - strcpy (buffer,"(xxx).W"); - break; - case absl: - strcpy (buffer,"(xxx).L"); - break; - case imm: - switch (size){ - case sz_byte: - strcpy (buffer,"#.B"); - break; - case sz_word: - strcpy (buffer,"#.W"); - break; - case sz_long: - strcpy (buffer,"#.L"); - break; - default: - break; - } - break; - case imm0: - strcpy (buffer,"#.B"); - break; - case imm1: - strcpy (buffer,"#.W"); - break; - case imm2: - strcpy (buffer,"#.L"); - break; - case immi: - strcpy (buffer,"#"); - break; + int i; - default: - break; + free(table68k); + table68k = (struct instr *)malloc (65536 * sizeof (struct instr)); + for (i = 0; i < 65536; i++) { + table68k[i].mnemo = i_ILLG; + table68k[i].handler = -1; + } + for (i = 0; i < n_defs68k; i++) { + build_insn (i); } - return buffer; + do_merges(); } -const char *get_instruction_string (unsigned int opcode) -{ - static char out[100]; - struct instr *ins; - - strcpy (out, get_instruction_name (opcode)); - ins = &table68k[opcode]; - if (ins->size == sz_byte) - strcat (out,".B"); - if (ins->size == sz_word) - strcat (out,".W"); - if (ins->size == sz_long) - strcat (out,".L"); - strcat (out," "); - if (ins->suse) - strcat (out, get_ea_string (amodes(ins->smode), wordsizes(ins->size))); - if (ins->duse) { - if (ins->suse) - strcat (out,","); - strcat (out, get_ea_string (amodes(ins->dmode), wordsizes(ins->size))); - } - return out; +void exit_table68k (void) +{ + free(table68k); + table68k = NULL; } diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu/readcpu.h index 6fba3c393..3bdc0cd60 100644 --- a/BasiliskII/src/uae_cpu/readcpu.h +++ b/BasiliskII/src/uae_cpu/readcpu.h @@ -1,16 +1,16 @@ -#ifndef READCPU_H -#define READCPU_H +#ifndef UAE_READCPU_H +#define UAE_READCPU_H #ifdef __cplusplus extern "C" { #endif -ENUMDECL { +typedef enum { Dreg, Areg, Aind, Aipi, Apdi, Ad16, Ad8r, absw, absl, PC16, PC8r, imm, imm0, imm1, imm2, immi, am_unknown, am_illg -} ENUMNAME (amodes); +} amodes; -ENUMDECL { +typedef enum { i_ILLG, i_OR, i_AND, i_EOR, i_ORSR, i_ANDSR, i_EORSR, @@ -35,43 +35,42 @@ ENUMDECL { i_PACK, i_UNPK, i_TAS, i_BKPT, i_CALLM, i_RTM, i_TRAPcc, i_MOVES, i_FPP, i_FDBcc, i_FScc, i_FTRAPcc, i_FBcc, i_FSAVE, i_FRESTORE, i_CINVL, i_CINVP, i_CINVA, i_CPUSHL, i_CPUSHP, i_CPUSHA, i_MOVE16, - i_MMUOP, - i_EMULOP_RETURN, i_EMULOP -} ENUMNAME (instrmnem); + i_MMUOP, i_EMULOP_RETURN, i_EMULOP, i_NATFEAT_ID, i_NATFEAT_CALL +} instrmnem; extern struct mnemolookup { instrmnem mnemo; const char *name; } lookuptab[]; -ENUMDECL { +typedef enum { sz_byte, sz_word, sz_long -} ENUMNAME (wordsizes); +} wordsizes; -ENUMDECL { - fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp -} ENUMNAME (flagaffect); +typedef enum { + fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp, + fa_isbranch +} flagaffect; -ENUMDECL { +typedef enum { fu_used, fu_unused, fu_maybecc, fu_unknown, fu_isjmp -} ENUMNAME (flaguse); +} flaguse; -ENUMDECL { - fl_normal = 0, +typedef enum { + fl_normal = 0, fl_branch = 1, - fl_jump = 2, - fl_return = 3, - fl_trap = 4, - fl_const_jump = 8, - - /* Instructions that can trap don't mark the end of a block */ - fl_end_block = 3 -} ENUMNAME (cflow_t); - -ENUMDECL { + fl_jump = 2, + fl_return = 3, + fl_trap = 4, + fl_const_jump = 8, + /* Instructions that can trap don't mark the end of a block */ + fl_end_block = 3 +} cflow_t; + +typedef enum { bit0, bit1, bitc, bitC, bitf, biti, bitI, bitj, bitJ, bitk, bitK, bits, bitS, bitd, bitD, bitr, bitR, bitz, bitE, bitp, lastbit -} ENUMNAME (bitvals); +} bitvals; struct instr_def { unsigned int bits; @@ -84,7 +83,7 @@ struct instr_def { unsigned int flaguse:3; unsigned int flagset:3; } flaginfo[5]; - unsigned char cflow; + unsigned char cflow; unsigned char sduse; const char *opcstr; }; @@ -103,28 +102,24 @@ extern struct instr { unsigned int mnemo:8; unsigned int cc:4; unsigned int plev:2; - unsigned int size:2; - unsigned int smode:5; + wordsizes size:2; + amodes smode:5; unsigned int stype:3; - unsigned int dmode:5; + amodes dmode:5; unsigned int suse:1; unsigned int duse:1; unsigned int unused1:1; unsigned int clev:3; - unsigned int cflow:3; + unsigned int cflow:3; unsigned int unused2:2; } *table68k; -extern void read_table68k (void); -extern void do_merges (void); -extern int get_no_mismatches (void); +extern void init_table68k(void); +extern void exit_table68k(void); extern int nr_cpuop_funcs; -extern const char *get_instruction_name (unsigned int opcode); -extern const char *get_instruction_string (unsigned int opcode); - #ifdef __cplusplus } #endif -#endif /* READCPU_H */ +#endif diff --git a/BasiliskII/src/uae_cpu/readcpua.cpp b/BasiliskII/src/uae_cpu/readcpua.cpp new file mode 100644 index 000000000..521c241f2 --- /dev/null +++ b/BasiliskII/src/uae_cpu/readcpua.cpp @@ -0,0 +1,5 @@ +/* + * readcpu.cpp must be compiled twice, once for the generator program + * and once for the actual executable + */ +#include "readcpu.cpp" diff --git a/BasiliskII/src/uae_cpu/registers.h b/BasiliskII/src/uae_cpu/registers.h new file mode 100644 index 000000000..c3459719c --- /dev/null +++ b/BasiliskII/src/uae_cpu/registers.h @@ -0,0 +1,116 @@ +/* 2001 MJ */ + +#ifndef REGISTERS_H +#define REGISTERS_H + +#include "sysdeps.h" +#include "spcflags.h" +typedef char flagtype; + + +struct xttrx { + uae_u32 log_addr_base : 8; + uae_u32 log_addr_mask : 8; + uae_u32 enable : 1; + uae_u32 s_field : 2; + uae_u32 : 3; + uae_u32 usr1 : 1; + uae_u32 usr0 : 1; + uae_u32 : 1; + uae_u32 cmode : 2; + uae_u32 : 2; + uae_u32 write : 1; + uae_u32 : 2; +}; + +struct mmusr_t { + uae_u32 phys_addr : 20; + uae_u32 bus_err : 1; + uae_u32 global : 1; + uae_u32 usr1 : 1; + uae_u32 usr0 : 1; + uae_u32 super : 1; + uae_u32 cmode : 2; + uae_u32 modif : 1; + uae_u32 : 1; + uae_u32 write : 1; + uae_u32 ttrhit : 1; + uae_u32 resident : 1; +}; + +struct log_addr4 { + uae_u32 rif : 7; + uae_u32 pif : 7; + uae_u32 paif : 6; + uae_u32 poff : 12; +}; + +struct log_addr8 { + uae_u32 rif : 7; + uae_u32 pif : 7; + uae_u32 paif : 5; + uae_u32 poff : 13; +}; + +extern struct regstruct +{ + uae_u32 regs[16]; + uaecptr usp,isp,msp; + uae_u16 sr; + flagtype t1; + flagtype t0; + flagtype s; + flagtype m; + flagtype x; + flagtype stopped; + int intmask; + + uae_u32 pc; + uae_u32 fault_pc; + uae_u8 *pc_p; + uae_u8 *pc_oldp; + + uae_u32 vbr,sfc,dfc; + + volatile uae_u32 spcflags; + +#if 0 + uae_u32 kick_mask; + + /* Fellow sources say this is 4 longwords. That's impossible. It needs + * to be at least a longword. The HRM has some cryptic comment about two + * instructions being on the same longword boundary. + * The way this is implemented now seems like a good compromise. + */ + uae_u32 prefetch; +#endif + + /* MMU reg*/ + uae_u32 urp,srp; + uae_u32 tc; + + int mmu_enabled; /* flagtype tce; */ + int mmu_pagesize_8k; /* flagtype tcp; */ + + uae_u32 dtt0,dtt1,itt0,itt1; + uae_u32 mmusr; + + uae_u32 mmu_fslw, mmu_fault_addr; + uae_u16 mmu_ssw; + uae_u32 wb3_data; + uae_u16 wb3_status; + + /* Cache reg*/ + uae_u32 cacr,caar; +} regs; + +static inline uaecptr m68k_getpc (void) +{ +#ifdef FULLMMU + return regs.pc; +#else + return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); +#endif +} + +#endif diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h index 3c3fc0322..eb465e727 100644 --- a/BasiliskII/src/uae_cpu/spcflags.h +++ b/BasiliskII/src/uae_cpu/spcflags.h @@ -1,67 +1,97 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * MC68000 emulation - * - * Copyright 1995 Bernd Schmidt - * - * 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 - */ + /* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + */ #ifndef SPCFLAGS_H #define SPCFLAGS_H -typedef uae_u32 spcflags_t; +#if 0 +#include "SDL_compat.h" +#endif enum { - SPCFLAG_STOP = 0x01, - SPCFLAG_INT = 0x02, - SPCFLAG_BRK = 0x04, - SPCFLAG_TRACE = 0x08, - SPCFLAG_DOTRACE = 0x10, - SPCFLAG_DOINT = 0x20, -#if USE_JIT - SPCFLAG_JIT_END_COMPILE = 0x40, - SPCFLAG_JIT_EXEC_RETURN = 0x80, + SPCFLAG_STOP = 0x01, +#if 0 + SPCFLAG_INTERNAL_IRQ = 0x02, +#else + SPCFLAG_INT = 0x02, +#endif + SPCFLAG_BRK = 0x04, + SPCFLAG_TRACE = 0x08, + SPCFLAG_DOTRACE = 0x10, + SPCFLAG_DOINT = 0x20, +#ifdef USE_JIT + SPCFLAG_JIT_END_COMPILE = 0x40, + SPCFLAG_JIT_EXEC_RETURN = 0x80, #else - SPCFLAG_JIT_END_COMPILE = 0, - SPCFLAG_JIT_EXEC_RETURN = 0, + SPCFLAG_JIT_END_COMPILE = 0, + SPCFLAG_JIT_EXEC_RETURN = 0, #endif - - SPCFLAG_ALL = SPCFLAG_STOP - | SPCFLAG_INT - | SPCFLAG_BRK - | SPCFLAG_TRACE - | SPCFLAG_DOTRACE - | SPCFLAG_DOINT - | SPCFLAG_JIT_END_COMPILE - | SPCFLAG_JIT_EXEC_RETURN - , - + SPCFLAG_VBL = 0x100, + SPCFLAG_MFP = 0x200, + SPCFLAG_INT3 = 0x800, + SPCFLAG_INT5 = 0x1000, + SPCFLAG_SCC = 0x2000, +// SPCFLAG_MODE_CHANGE = 0x4000, + SPCFLAG_ALL = SPCFLAG_STOP +#if 0 + | SPCFLAG_INTERNAL_IRQ +#else + | SPCFLAG_INT +#endif + | SPCFLAG_BRK + | SPCFLAG_TRACE + | SPCFLAG_DOTRACE + | SPCFLAG_DOINT + | SPCFLAG_JIT_END_COMPILE + | SPCFLAG_JIT_EXEC_RETURN + | SPCFLAG_INT3 + | SPCFLAG_VBL + | SPCFLAG_INT5 + | SPCFLAG_SCC + | SPCFLAG_MFP + , + SPCFLAG_ALL_BUT_EXEC_RETURN = SPCFLAG_ALL & ~SPCFLAG_JIT_EXEC_RETURN + }; +#if 0 +#define SPCFLAGS_TEST(m) \ + (regs.spcflags & (m)) +#else #define SPCFLAGS_TEST(m) \ ((regs.spcflags & (m)) != 0) +#endif /* Macro only used in m68k_reset() */ #define SPCFLAGS_INIT(m) do { \ regs.spcflags = (m); \ } while (0) -#if !(ENABLE_EXCLUSIVE_SPCFLAGS) +#include "main.h" +extern B2_mutex *spcflags_lock; + +#define SPCFLAGS_SET(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags |= (m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags &= ~(m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#define SleepAndWait() usleep(1000); + +#if 0 +#ifndef ENABLE_EXCLUSIVE_SPCFLAGS #define SPCFLAGS_SET(m) do { \ regs.spcflags |= (m); \ @@ -71,8 +101,14 @@ enum { regs.spcflags &= ~(m); \ } while (0) +#if 0 +#define SleepAndWait() usleep(1000) +#endif + #elif defined(X86_ASSEMBLY) +// #elif (defined(CPU_i386) || defined(CPU_x86_64)) && defined(X86_ASSEMBLY) && !defined(ENABLE_REALSTOP) +// #define HAVE_HARDWARE_LOCKS 1 #define HAVE_HARDWARE_LOCKS #define SPCFLAGS_SET(m) do { \ @@ -83,25 +119,57 @@ enum { __asm__ __volatile__("lock\n\tandl %1,%0" : "=m" (regs.spcflags) : "i" (~(m))); \ } while (0) +// #define SleepAndWait() usleep(1000) + +// #elif !defined(ENABLE_REALSTOP) + +// #undef HAVE_HARDWARE_LOCKS +// extern SDL_mutex *spcflags_lock; + +// #define SPCFLAGS_SET(m) do { \ +// SDL_LockMutex(spcflags_lock); \ +// regs.spcflags |= (m); \ +// SDL_UnlockMutex(spcflags_lock); \ +// } while (0) + +// #define SPCFLAGS_CLEAR(m) do { \ +// SDL_LockMutex(spcflags_lock); \ +// regs.spcflags &= ~(m); \ +// SDL_UnlockMutex(spcflags_lock); \ +// } while (0) + +// #define SleepAndWait() usleep(1000) + #else +/// Full STOP instruction implementation (default configuration) #undef HAVE_HARDWARE_LOCKS - -#include "main.h" -extern B2_mutex *spcflags_lock; +#if 0 +extern SDL_mutex *spcflags_lock; +extern SDL_cond *stop_condition; #define SPCFLAGS_SET(m) do { \ - B2_lock_mutex(spcflags_lock); \ + SDL_LockMutex(spcflags_lock); \ regs.spcflags |= (m); \ - B2_unlock_mutex(spcflags_lock); \ + if (regs.spcflags & SPCFLAG_STOP) \ + SDL_CondSignal(stop_condition); \ + SDL_UnlockMutex(spcflags_lock); \ } while (0) #define SPCFLAGS_CLEAR(m) do { \ - B2_lock_mutex(spcflags_lock); \ + SDL_LockMutex(spcflags_lock); \ regs.spcflags &= ~(m); \ - B2_unlock_mutex(spcflags_lock); \ + SDL_UnlockMutex(spcflags_lock); \ } while (0) +#define SleepAndWait() do { \ + SDL_LockMutex(spcflags_lock); \ + SDL_CondWait(stop_condition, spcflags_lock); \ + SDL_UnlockMutex(spcflags_lock); \ +} while (0) +#endif + +#endif #endif #endif /* SPCFLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu/table68k index ab9eabe18..7405bd310 100644 --- a/BasiliskII/src/uae_cpu/table68k +++ b/BasiliskII/src/uae_cpu/table68k @@ -10,7 +10,7 @@ % J: immediate 0..15 % k: immediate 0..7 % K: immediate 0..63 -% p: immediate 0..3 (CINV and CPUSH instructions: Cache Field) +% p: immediate 0..3 (CINV and CPUSH: cache field) % s: source mode % S: source reg % d: dest mode @@ -28,14 +28,15 @@ % ArP: --> (Ar)+ % L: --> (xxx.L) % -% Fields on a line: -% 16 chars bitpattern : -% CPU level / privilege level : +% Fields on a line: +% 16 chars bitpattern : +% CPU level / privildge level : % CPU level 0: 68000 % 1: 68010 % 2: 68020 % 3: 68020/68881 % 4: 68040 +% 5: 68060 % privilege level 0: not privileged % 1: unprivileged only on 68000 (check regs.s) % 2: privileged (check regs.s) @@ -46,8 +47,10 @@ % 0 means flag reset % 1 means flag set % ? means programmer was too lazy to check or instruction may trap -% everything else means flag set/used +% + means instruction is conditional branch (ignored, only for sync) +% / means instruction is unconditional branch/call (ignored, only for sync) % x means flag is unknown and well-behaved programs shouldn't check it +% everything else means flag set/used % % Control flow % two letters, combination of @@ -108,7 +111,7 @@ 0011 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.W s,d[Areg] 0011 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.W s,d[!Areg] -0100 0000 zzdd dDDD:00:XxZxC:X-Z--:--:30: NEGX.z d[!Areg] +0100 0000 zzdd dDDD:00:XNZVC:X-Z--:--:30: NEGX.z d[!Areg] 0100 0000 11dd dDDD:01:-----:XNZVC:T-:10: MVSR2.W d[!Areg] 0100 0010 zzdd dDDD:00:-0100:-----:--:20: CLR.z d[!Areg] 0100 0010 11dd dDDD:10:-----:XNZVC:--:10: MVSR2.B d[!Areg] @@ -119,13 +122,13 @@ 0100 1000 0000 1rrr:20:-----:-----:--:31: LINK.L Ar,#2 0100 1000 00dd dDDD:00:X?Z?C:X-Z--:--:30: NBCD.B d[!Areg] 0100 1000 0100 1kkk:20:-----:-----:T-:10: BKPT #k -0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] +0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] 0100 1000 01ss sSSS:00:-----:-----:--:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] -0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] +0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] 0100 1000 10dd dDDD:00:-----:-----:--:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] -0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] +0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] 0100 1000 11dd dDDD:00:-----:-----:--:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] -0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] +0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] 0100 1010 zzss sSSS:00:-NZ00:-----:--:10: TST.z s 0100 1010 11dd dDDD:00:-NZ00:-----:--:30: TAS.B d[!Areg] 0100 1010 1111 1100:00:-----:-----:T-:00: ILLEGAL @@ -148,21 +151,24 @@ 0100 1110 0111 0111:00:XNZVC:-----:-R:00: RTR 0100 1110 0111 1010:12:-----:-----:T-:10: MOVEC2 #1 0100 1110 0111 1011:12:-----:-----:T-:10: MOVE2C #1 -0100 1110 10ss sSSS:00:-----:-----:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1110 10ss sSSS:00://///://///:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] 0100 rrr1 00ss sSSS:00:-N???:-----:T-:11: CHK.L s[!Areg],Dr 0100 rrr1 10ss sSSS:00:-N???:-----:T-:11: CHK.W s[!Areg],Dr -0100 1110 11ss sSSS:00:-----:-----:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1110 11ss sSSS:00://///://///:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] 0100 rrr1 11ss sSSS:00:-----:-----:--:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar -0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] -0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] +% This variant of ADDQ is word and long sized only +0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] +0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] 0101 jjj0 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #j,d[!Areg] -0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] -0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] + +% This variant of SUBQ is word and long sized only +0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] +0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] 0101 jjj1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #j,d[!Areg] -0101 cccc 1100 1rrr:00:-----:-????:-B:31: DBcc.W Dr,#1 -0101 cccc 11dd dDDD:00:-----:-????:--:20: Scc.B d[!Areg] +0101 cccc 1100 1rrr:00:-----:-++++:-B:31: DBcc.W Dr,#1 +0101 cccc 11dd dDDD:00:-----:-++++:--:20: Scc.B d[!Areg] 0101 cccc 1111 1010:20:-----:-????:T-:10: TRAPcc #1 0101 cccc 1111 1011:20:-----:-????:T-:10: TRAPcc #2 0101 cccc 1111 1100:20:-----:-????:T-:00: TRAPcc @@ -170,30 +176,30 @@ % Bxx.L is 68020 only, but setting the CPU level to 2 would give illegal % instruction exceptions when compiling a 68000 only emulation, which isn't % what we want either. -0110 0001 0000 0000:00:-----:-----:-B:40: BSR.W #1 -0110 0001 IIII IIII:00:-----:-----:-B:40: BSR.B #i -0110 0001 1111 1111:00:-----:-----:-B:40: BSR.L #2 -0110 CCCC 0000 0000:00:-----:-????:-B:40: Bcc.W #1 -0110 CCCC IIII IIII:00:-----:-????:-B:40: Bcc.B #i -0110 CCCC 1111 1111:00:-----:-????:-B:40: Bcc.L #2 +0110 0001 0000 0000:00://///://///:-B:40: BSR.W #1 +0110 0001 IIII IIII:00://///://///:-B:40: BSR.B #i +0110 0001 1111 1111:00://///://///:-B:40: BSR.L #2 +0110 CCCC 0000 0000:00:-----:-++++:-B:40: Bcc.W #1 +0110 CCCC IIII IIII:00:-----:-++++:-B:40: Bcc.B #i +0110 CCCC 1111 1111:00:-----:-++++:-B:40: Bcc.L #2 0111 rrr0 iiii iiii:00:-NZ00:-----:--:12: MOVE.L #i,Dr 1000 rrr0 zzss sSSS:00:-NZ00:-----:--:13: OR.z s[!Areg],Dr 1000 rrr0 11ss sSSS:00:-NZV0:-----:T-:13: DIVU.W s[!Areg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Dreg],Dr -1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp +1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Dreg],Dr +1000 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp 1000 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: OR.z Dr,d[!Areg,Dreg] -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr -1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr -1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp 1000 rrr1 11ss sSSS:00:-NZV0:-----:T-:13: DIVS.W s[!Areg],Dr 1001 rrr0 zzss sSSS:00:XNZVC:-----:--:13: SUB.z s,Dr 1001 rrr0 11ss sSSS:00:-----:-----:--:13: SUBA.W s,Ar -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr -1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp 1001 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z Dr,d[!Areg,Dreg] 1001 rrr1 11ss sSSS:00:-----:-----:--:13: SUBA.L s,Ar @@ -205,18 +211,18 @@ 1100 rrr0 zzss sSSS:00:-NZ00:-----:--:13: AND.z s[!Areg],Dr 1100 rrr0 11ss sSSS:00:-NZ00:-----:--:13: MULU.W s[!Areg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Dreg],Dr -1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp +1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Dreg],Dr +1100 rrr1 00dd dDDD:00:X?Z?C:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp 1100 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: AND.z Dr,d[!Areg,Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] -1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] -1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] +1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] 1100 rrr1 11ss sSSS:00:-NZ00:-----:--:13: MULS.W s[!Areg],Dr 1101 rrr0 zzss sSSS:00:XNZVC:-----:--:13: ADD.z s,Dr 1101 rrr0 11ss sSSS:00:-----:-----:--:13: ADDA.W s,Ar -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr -1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp 1101 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z Dr,d[!Areg,Dreg] 1101 rrr1 11ss sSSS:00:-----:-----:--:13: ADDA.L s,Ar @@ -224,8 +230,8 @@ 1110 jjjf zz00 1RRR:00:XNZ0C:-----:--:13: LSf.z #j,DR 1110 jjjf zz01 0RRR:00:XNZ0C:X----:--:13: ROXf.z #j,DR 1110 jjjf zz01 1RRR:00:-NZ0C:-----:--:13: ROf.z #j,DR -1110 rrrf zz10 0RRR:00:XNZVC:-----:--:13: ASf.z Dr,DR -1110 rrrf zz10 1RRR:00:XNZ0C:-----:--:13: LSf.z Dr,DR +1110 rrrf zz10 0RRR:00:XNZVC:X----:--:13: ASf.z Dr,DR +1110 rrrf zz10 1RRR:00:XNZ0C:X----:--:13: LSf.z Dr,DR 1110 rrrf zz11 0RRR:00:XNZ0C:X----:--:13: ROXf.z Dr,DR 1110 rrrf zz11 1RRR:00:-NZ0C:-----:--:13: ROf.z Dr,DR 1110 000f 11dd dDDD:00:XNZVC:-----:--:13: ASfW.W d[!Dreg,Areg] @@ -255,7 +261,6 @@ 1111 0011 01ss sSSS:32:-----:-----:--:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] % 68040 instructions -1111 0101 iiii iSSS:40:-----:-----:T-:11: MMUOP #i,s 1111 0100 pp00 1rrr:42:-----:-----:T-:02: CINVL #p,Ar 1111 0100 pp01 0rrr:42:-----:-----:T-:02: CINVP #p,Ar 1111 0100 pp01 1rrr:42:-----:-----:T-:00: CINVA #p @@ -264,11 +269,19 @@ 1111 0100 pp11 1rrr:42:-----:-----:T-:00: CPUSHA #p % destination register number is encoded in the following word 1111 0110 0010 0rrr:40:-----:-----:--:12: MOVE16 ArP,AxP -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],L -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Areg-Aipi] -1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],L -1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Aipi-Aind] +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],Al +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Areg-Aipi] +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],Al +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 Al,d[Aipi-Aind] + +% MMU disabled +% 1111 0101 iiii iSSS:42:?????:?????:T-:11: MMUOP #i,s + +% EmulOp instructions (used by linux68k) +0111 0001 0000 0000:02:-----:XNZVC:-R:00: EMULOP_RETURN +0111 0001 EEEE EEEE:00:-----:XNZVC:-J:10: EMULOP #E -% EmulOp instructions -0111 0001 0000 0000:00:-----:-----:-R:00: EMULOP_RETURN -0111 0001 EEEE EEEE:00:-----:-----:-J:10: EMULOP #E +% NatFea instructions (do I have the srcaddr correct?) +% NatFeat disabled +% 0111 0011 0000 0000:00:-----:XNZVC:-J:00: NATFEAT_ID +% 0111 0011 0000 0001:00:-----:XNZVC:-J:00: NATFEAT_CALL From 977056a0750d46153dd1e75c7f4bed81d9c15933 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 14 Oct 2019 14:54:32 +0900 Subject: [PATCH 292/534] Use fpu_ieee instead of fpu_uae Minimize BasiliskII.app/Contents/Resources --- .../BasiliskII.xcodeproj/project.pbxproj | 66 ++----------------- BasiliskII/src/MacOSX/config.h | 2 +- 2 files changed, 7 insertions(+), 61 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 34676aa3a..8eb0925c0 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -32,13 +32,7 @@ 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD61F23B25A006B2DF2 /* ether.cpp */; }; 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD71F23B25A006B2DF2 /* extfs.cpp */; }; 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */; }; - 7539E1301F23B25A006B2DF2 /* Assets.xcassets in Resources */ = {isa = PBXBuildFile; fileRef = 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */; }; 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */; }; - 7539E1381F23B25A006B2DF2 /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; - 7539E13B1F23B25A006B2DF2 /* InfoPlist.strings in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */; }; - 7539E13E1F23B25A006B2DF2 /* HowTo.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0141F23B25A006B2DF2 /* HowTo.html */; }; - 7539E14B1F23B25A006B2DF2 /* ToDo.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E02B1F23B25A006B2DF2 /* ToDo.html */; }; - 7539E14D1F23B25A006B2DF2 /* Versions.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E02E1F23B25A006B2DF2 /* Versions.html */; }; 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0651F23B25A006B2DF2 /* main.cpp */; }; 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0681F23B25A006B2DF2 /* pict.c */; }; 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */; }; @@ -47,7 +41,6 @@ 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */; }; 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; - 7539E1751F23B25A006B2DF2 /* keycodes in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0731F23B25A006B2DF2 /* keycodes */; }; 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; @@ -58,43 +51,23 @@ 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; - 7539E1A31F23B25A006B2DF2 /* table68k in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0D11F23B25A006B2DF2 /* table68k */; }; 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */; }; - 7539E2451F23B32A006B2DF2 /* gtk-osx.patch in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */; }; - 7539E2471F23B32A006B2DF2 /* mkstandalone in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FA1F23B32A006B2DF2 /* mkstandalone */; }; - 7539E2491F23B32A006B2DF2 /* testlmem.sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */; }; 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; - 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2011F23B32A006B2DF2 /* fbdevices */; }; - 7539E2501F23B32A006B2DF2 /* install-sh in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2051F23B32A006B2DF2 /* install-sh */; }; - 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */; }; - 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */; }; - 7539E2571F23B32A006B2DF2 /* linux-ppc.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */; }; - 7539E2581F23B32A006B2DF2 /* linux-x86_64.ld in Resources */ = {isa = PBXBuildFile; fileRef = 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */; }; - 7539E25D1F23B32A006B2DF2 /* egrep.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2181F23B32A006B2DF2 /* egrep.m4 */; }; - 7539E25E1F23B32A006B2DF2 /* esd.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2191F23B32A006B2DF2 /* esd.m4 */; }; - 7539E25F1F23B32A006B2DF2 /* gettext.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21A1F23B32A006B2DF2 /* gettext.m4 */; }; - 7539E2601F23B32A006B2DF2 /* gtk-2.0.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */; }; - 7539E2611F23B32A006B2DF2 /* gtk.m4 in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21C1F23B32A006B2DF2 /* gtk.m4 */; }; - 7539E2631F23B32A006B2DF2 /* Makefile.in in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21E1F23B32A006B2DF2 /* Makefile.in */; }; - 7539E2641F23B32A006B2DF2 /* mkinstalldirs in Resources */ = {isa = PBXBuildFile; fileRef = 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */; }; 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */; }; 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22A1F23B32A006B2DF2 /* sshpty.c */; }; 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22C1F23B32A006B2DF2 /* strlcpy.c */; }; 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */; }; 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */; }; 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; - 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2331F23B32A006B2DF2 /* tunconfig */; }; 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; - 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */; }; - 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */ = {isa = PBXBuildFile; fileRef = 7539E2AA1F23CDB7006B2DF2 /* Info.plist */; }; 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; @@ -104,14 +77,12 @@ E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8FB20D260B900E437D8 /* ip_icmp.c */; }; - E413D92420D260BC00E437D8 /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E413D8FE20D260B900E437D8 /* VERSION */; }; E413D92520D260BC00E437D8 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90120D260B900E437D8 /* tcp_input.c */; }; E413D92620D260BC00E437D8 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90220D260B900E437D8 /* misc.c */; }; E413D92720D260BC00E437D8 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90520D260BA00E437D8 /* debug.c */; }; E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90620D260BA00E437D8 /* tcp_subr.c */; }; E413D92920D260BC00E437D8 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90720D260BA00E437D8 /* udp.c */; }; E413D92A20D260BC00E437D8 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90920D260BA00E437D8 /* sbuf.c */; }; - E413D92B20D260BC00E437D8 /* COPYRIGHT in Resources */ = {isa = PBXBuildFile; fileRef = E413D90C20D260BA00E437D8 /* COPYRIGHT */; }; E413D92C20D260BC00E437D8 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90D20D260BA00E437D8 /* slirp.c */; }; E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91120D260BA00E437D8 /* tcp_timer.c */; }; E413D92E20D260BC00E437D8 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91820D260BB00E437D8 /* socket.c */; }; @@ -125,7 +96,9 @@ E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; + E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; /* End PBXBuildFile section */ /* Begin PBXContainerItemProxy section */ @@ -349,7 +322,6 @@ 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; - 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_uae.cpp; sourceTree = ""; }; 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; @@ -405,6 +377,7 @@ E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -675,7 +648,7 @@ 7539E0B31F23B25A006B2DF2 /* fpu */ = { isa = PBXGroup; children = ( - 7539E29E1F23C939006B2DF2 /* fpu_uae.cpp */, + E4D8245223543D9700849B78 /* fpu_ieee.cpp */, 7539E0B41F23B25A006B2DF2 /* core.h */, 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, 7539E0B61F23B25A006B2DF2 /* exceptions.h */, @@ -964,35 +937,8 @@ isa = PBXResourcesBuildPhase; buildActionMask = 2147483647; files = ( - 7539E25D1F23B32A006B2DF2 /* egrep.m4 in Resources */, - 7539E1A31F23B25A006B2DF2 /* table68k in Resources */, 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, - 7539E2601F23B32A006B2DF2 /* gtk-2.0.m4 in Resources */, - 7539E1381F23B25A006B2DF2 /* Credits.html in Resources */, - 7539E25E1F23B32A006B2DF2 /* esd.m4 in Resources */, - 7539E2631F23B32A006B2DF2 /* Makefile.in in Resources */, - 7539E2571F23B32A006B2DF2 /* linux-ppc.ld in Resources */, - 7539E24D1F23B32A006B2DF2 /* fbdevices in Resources */, - 7539E2501F23B32A006B2DF2 /* install-sh in Resources */, - 7539E1301F23B25A006B2DF2 /* Assets.xcassets in Resources */, - 7539E2641F23B32A006B2DF2 /* mkinstalldirs in Resources */, - 7539E2581F23B32A006B2DF2 /* linux-x86_64.ld in Resources */, - 7539E2451F23B32A006B2DF2 /* gtk-osx.patch in Resources */, - 7539E2AB1F23CDB7006B2DF2 /* Info.plist in Resources */, - 7539E2471F23B32A006B2DF2 /* mkstandalone in Resources */, - 7539E14B1F23B25A006B2DF2 /* ToDo.html in Resources */, - 7539E13E1F23B25A006B2DF2 /* HowTo.html in Resources */, - 7539E1751F23B25A006B2DF2 /* keycodes in Resources */, - E413D92B20D260BC00E437D8 /* COPYRIGHT in Resources */, - 7539E14D1F23B25A006B2DF2 /* Versions.html in Resources */, - E413D92420D260BC00E437D8 /* VERSION in Resources */, - 7539E2711F23B32A006B2DF2 /* tunconfig in Resources */, - 7539E2561F23B32A006B2DF2 /* linux-i386.ld in Resources */, - 7539E2551F23B32A006B2DF2 /* freebsd-i386.ld in Resources */, - 7539E13B1F23B25A006B2DF2 /* InfoPlist.strings in Resources */, - 7539E25F1F23B32A006B2DF2 /* gettext.m4 in Resources */, - 7539E2491F23B32A006B2DF2 /* testlmem.sh in Resources */, - 7539E2611F23B32A006B2DF2 /* gtk.m4 in Resources */, + E4555EED2354434B00139FCE /* Credits.html in Resources */, ); runOnlyForDeploymentPostprocessing = 0; }; @@ -1043,13 +989,13 @@ 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, E413D93320D260BC00E437D8 /* cksum.c in Sources */, E413D92920D260BC00E437D8 /* udp.c in Sources */, + E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */, 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, 753252EE1F535DD10024025B /* defs68k.c in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, - 7539E29F1F23C939006B2DF2 /* fpu_uae.cpp in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index ab1f6ee5f..e5b8ec01c 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -815,7 +815,7 @@ don't define. */ /* #undef uintmax_t */ -#define FPU_UAE 1 +#define FPU_IEEE 1 //#define FPU_IMPLEMENTATION 1 #endif From 858f8257a657de1195b10703b762e1a004469814 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 20 Oct 2019 15:35:50 +0900 Subject: [PATCH 293/534] Fix for SDL2.0.10 --- BasiliskII/src/SDL/video_sdl2.cpp | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 21f1fecbf..42247b213 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2217,10 +2217,7 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { - if (code == 0x39) - (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); - else - ADBKeyDown(code); + ADBKeyDown(code); if (code == 0x36) ctrl_down = true; #ifdef __APPLE__ @@ -2250,8 +2247,7 @@ static void handle_events(void) } else code = event2keycode(event.key, false); if (code >= 0) { - if (code != 0x39) - ADBKeyUp(code); + ADBKeyUp(code); if (code == 0x36) ctrl_down = false; #ifdef __APPLE__ From 96a42689fd94f459fa679b0911b2cb7d06d445aa Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 24 Oct 2019 11:23:07 +0900 Subject: [PATCH 294/534] BII JIT --- .../BasiliskII.xcodeproj/project.pbxproj | 248 ++++++++++++++++-- BasiliskII/src/MacOSX/config.h | 8 +- .../src/MacOSX/run_gencomp_for_xcode.sh | 37 +++ 3 files changed, 264 insertions(+), 29 deletions(-) create mode 100755 BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8eb0925c0..70b59a664 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -12,14 +12,9 @@ 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; 753252E91F535A0C0024025B /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252E51F5359040024025B /* build68k.c */; }; - 753252EE1F535DD10024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; 753253021F535F210024025B /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = 753253011F535F210024025B /* gencpu.c */; }; 753253151F5363400024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; 753253201F53650F0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; - 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; - 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -97,7 +92,19 @@ E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; + E46AB23323612B8F009A4A18 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */; }; + E46AB23423612B8F009A4A18 /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E46AB23223612B8F009A4A18 /* compemu_support.cpp */; }; + E47303B6235743B900A68BC2 /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; + E47303B7235743B900A68BC2 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; + E47897F62357441500558C48 /* gencomp.c in Sources */ = {isa = PBXBuildFile; fileRef = E47897F52357441500558C48 /* gencomp.c */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; + E4CB2C232361291800718BD3 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; + E4CB2C242361292800718BD3 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; + E4CB2C252361292800718BD3 /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; + E4CB2C262361292800718BD3 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; + E4CB2C272361292800718BD3 /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; + E4CB2C282361293500718BD3 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E47303A2235741B300A68BC2 /* compemu.cpp */; }; + E4CB2C2B2361293500718BD3 /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E47303A3235741B300A68BC2 /* compstbl.cpp */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; /* End PBXBuildFile section */ @@ -130,6 +137,27 @@ remoteGlobalIDString = 753253161F5363D20024025B; remoteInfo = RunGencpu; }; + E47303B3235743B900A68BC2 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 753253071F5360E30024025B; + remoteInfo = RunBuild68k; + }; + E47897F72357443300558C48 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = E47303B1235743B900A68BC2; + remoteInfo = gencomp; + }; + E47897F92357446D00558C48 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; + proxyType = 1; + remoteGlobalIDString = E47303BE235743E200A68BC2; + remoteInfo = run_gencomp; + }; /* End PBXContainerItemProxy section */ /* Begin PBXCopyFilesBuildPhase section */ @@ -162,6 +190,15 @@ ); runOnlyForDeploymentPostprocessing = 1; }; + E47303B9235743B900A68BC2 /* CopyFiles */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = /usr/share/man/man1/; + dstSubfolderSpec = 0; + files = ( + ); + runOnlyForDeploymentPostprocessing = 1; + }; /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ @@ -376,6 +413,13 @@ E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_fpp.cpp; sourceTree = ""; }; + E46AB23223612B8F009A4A18 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; + E47303A1235741B300A68BC2 /* comptbl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencomp_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + E47303A2235741B300A68BC2 /* compemu.cpp */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencomp_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E47303A3235741B300A68BC2 /* compstbl.cpp */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.cpp.cpp; name = compstbl.cpp; path = gencomp_output/compstbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E47303BD235743B900A68BC2 /* gencomp */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = gencomp; sourceTree = BUILT_PRODUCTS_DIR; }; + E47897F52357441500558C48 /* gencomp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencomp.c; path = compiler/gencomp.c; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; /* End PBXFileReference section */ @@ -406,6 +450,13 @@ ); runOnlyForDeploymentPostprocessing = 0; }; + E47303B8235743B900A68BC2 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; /* End PBXFrameworksBuildPhase section */ /* Begin PBXGroup section */ @@ -472,6 +523,7 @@ 753252FF1F535E5D0024025B /* generated src */ = { isa = PBXGroup; children = ( + E47303A0235741B300A68BC2 /* gencomp output */, 753253001F535E840024025B /* build68k output */, 7532532B1F53675E0024025B /* gencpu output */, ); @@ -484,19 +536,21 @@ 753252ED1F535DD10024025B /* defs68k.c */, ); name = "build68k output"; - sourceTree = ""; + path = build68k_output; + sourceTree = BUILT_PRODUCTS_DIR; }; 7532532B1F53675E0024025B /* gencpu output */ = { isa = PBXGroup; children = ( - 7532532C1F5368370024025B /* cpuemu_nf.cpp */, + 753253301F5368370024025B /* cputbl.h */, 7532532D1F5368370024025B /* cpuemu.cpp */, - 7532532E1F5368370024025B /* cpustbl_nf.cpp */, + 7532532C1F5368370024025B /* cpuemu_nf.cpp */, 7532532F1F5368370024025B /* cpustbl.cpp */, - 753253301F5368370024025B /* cputbl.h */, + 7532532E1F5368370024025B /* cpustbl_nf.cpp */, ); name = "gencpu output"; - sourceTree = ""; + path = gencpu_output; + sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; @@ -515,9 +569,9 @@ 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, 753252DA1F5358D30024025B /* build68k */, 753252F31F535E1E0024025B /* gencpu */, + E47303BD235743B900A68BC2 /* gencomp */, ); name = Products; - path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { @@ -621,6 +675,7 @@ 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, 7539E0B31F23B25A006B2DF2 /* fpu */, 753253011F535F210024025B /* gencpu.c */, + E47897F52357441500558C48 /* gencomp.c */, 7539E0C81F23B25A006B2DF2 /* m68k.h */, 7539E0C91F23B25A006B2DF2 /* memory.cpp */, 7539E0CA1F23B25A006B2DF2 /* memory.h */, @@ -641,6 +696,8 @@ children = ( 7539E0AB1F23B25A006B2DF2 /* compemu.h */, 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, + E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */, + E46AB23223612B8F009A4A18 /* compemu_support.cpp */, ); path = compiler; sourceTree = ""; @@ -788,6 +845,17 @@ path = ../dummy; sourceTree = ""; }; + E47303A0235741B300A68BC2 /* gencomp output */ = { + isa = PBXGroup; + children = ( + E47303A1235741B300A68BC2 /* comptbl.h */, + E47303A2235741B300A68BC2 /* compemu.cpp */, + E47303A3235741B300A68BC2 /* compstbl.cpp */, + ); + name = "gencomp output"; + path = gencomp_output; + sourceTree = BUILT_PRODUCTS_DIR; + }; /* End PBXGroup section */ /* Begin PBXLegacyTarget section */ @@ -821,6 +889,21 @@ passBuildSettingsInEnvironment = 1; productName = RunGencpu; }; + E47303BE235743E200A68BC2 /* run_gencomp */ = { + isa = PBXLegacyTarget; + buildArgumentsString = "$(ACTION)"; + buildConfigurationList = E47303C1235743E200A68BC2 /* Build configuration list for PBXLegacyTarget "run_gencomp" */; + buildPhases = ( + ); + buildToolPath = "$(PROJECT_DIR)/run_gencomp_for_xcode.sh"; + buildWorkingDirectory = ""; + dependencies = ( + E47897F82357443300558C48 /* PBXTargetDependency */, + ); + name = run_gencomp; + passBuildSettingsInEnvironment = 1; + productName = RunGencpu; + }; /* End PBXLegacyTarget section */ /* Begin PBXNativeTarget section */ @@ -873,12 +956,31 @@ ); dependencies = ( 7532531F1F5364170024025B /* PBXTargetDependency */, + E47897FA2357446D00558C48 /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; productReference = 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */; productType = "com.apple.product-type.application"; }; + E47303B1235743B900A68BC2 /* gencomp */ = { + isa = PBXNativeTarget; + buildConfigurationList = E47303BA235743B900A68BC2 /* Build configuration list for PBXNativeTarget "gencomp" */; + buildPhases = ( + E47303B4235743B900A68BC2 /* Sources */, + E47303B8235743B900A68BC2 /* Frameworks */, + E47303B9235743B900A68BC2 /* CopyFiles */, + ); + buildRules = ( + ); + dependencies = ( + E47303B2235743B900A68BC2 /* PBXTargetDependency */, + ); + name = gencomp; + productName = gencpu; + productReference = E47303BD235743B900A68BC2 /* gencomp */; + productType = "com.apple.product-type.tool"; + }; /* End PBXNativeTarget section */ /* Begin PBXProject section */ @@ -926,8 +1028,10 @@ 7539DFB11F23B17E006B2DF2 /* BasiliskII */, 753252D91F5358D30024025B /* build68k */, 753252F21F535E1E0024025B /* gencpu */, + E47303B1235743B900A68BC2 /* gencomp */, 753253071F5360E30024025B /* run_build68k */, 753253161F5363D20024025B /* run_gencpu */, + E47303BE235743E200A68BC2 /* run_gencomp */, ); }; /* End PBXProject section */ @@ -984,6 +1088,13 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( + E4CB2C282361293500718BD3 /* compemu.cpp in Sources */, + E4CB2C2B2361293500718BD3 /* compstbl.cpp in Sources */, + E4CB2C242361292800718BD3 /* cpuemu.cpp in Sources */, + E4CB2C252361292800718BD3 /* cpuemu_nf.cpp in Sources */, + E4CB2C262361292800718BD3 /* cpustbl.cpp in Sources */, + E4CB2C272361292800718BD3 /* cpustbl_nf.cpp in Sources */, + E4CB2C232361291800718BD3 /* defs68k.c in Sources */, 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, @@ -994,16 +1105,13 @@ E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, - 753252EE1F535DD10024025B /* defs68k.c in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, - 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, @@ -1017,14 +1125,13 @@ 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, E413D93220D260BC00E437D8 /* if.c in Sources */, - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, + E46AB23323612B8F009A4A18 /* compemu_fpp.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, @@ -1048,6 +1155,7 @@ E413D92220D260BC00E437D8 /* mbuf.c in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, E413D93020D260BC00E437D8 /* ip_input.c in Sources */, + E46AB23423612B8F009A4A18 /* compemu_support.cpp in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, @@ -1068,6 +1176,16 @@ ); runOnlyForDeploymentPostprocessing = 0; }; + E47303B4235743B900A68BC2 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E47897F62357441500558C48 /* gencomp.c in Sources */, + E47303B6235743B900A68BC2 /* readcpu.cpp in Sources */, + E47303B7235743B900A68BC2 /* defs68k.c in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; /* End PBXSourcesBuildPhase section */ /* Begin PBXTargetDependency section */ @@ -1091,6 +1209,21 @@ target = 753253161F5363D20024025B /* run_gencpu */; targetProxy = 7532531E1F5364170024025B /* PBXContainerItemProxy */; }; + E47303B2235743B900A68BC2 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 753253071F5360E30024025B /* run_build68k */; + targetProxy = E47303B3235743B900A68BC2 /* PBXContainerItemProxy */; + }; + E47897F82357443300558C48 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = E47303B1235743B900A68BC2 /* gencomp */; + targetProxy = E47897F72357443300558C48 /* PBXContainerItemProxy */; + }; + E47897FA2357446D00558C48 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = E47303BE235743E200A68BC2 /* run_gencomp */; + targetProxy = E47897F92357446D00558C48 /* PBXContainerItemProxy */; + }; /* End PBXTargetDependency section */ /* Begin PBXVariantGroup section */ @@ -1201,12 +1334,7 @@ GCC_DYNAMIC_NO_PIC = NO; GCC_NO_COMMON_BLOCKS = YES; GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - "USE_XCODE=1", - "DEBUG=1", - ); + GCC_PREPROCESSOR_DEFINITIONS = "DEBUG=1"; GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; @@ -1257,11 +1385,7 @@ ENABLE_STRICT_OBJC_MSGSEND = YES; GCC_C_LANGUAGE_STANDARD = gnu99; GCC_NO_COMMON_BLOCKS = YES; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - "USE_XCODE=1", - ); + GCC_PREPROCESSOR_DEFINITIONS = ""; GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; @@ -1304,6 +1428,11 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1312,6 +1441,7 @@ ../MacOSX, ../include, ../uae_cpu, + ../uae_cpu/compiler, ../Unix, ../slirp, ); @@ -1321,6 +1451,10 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x1000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; @@ -1356,6 +1490,11 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 3; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1364,6 +1503,7 @@ ../MacOSX, ../include, ../uae_cpu, + ../uae_cpu/compiler, ../Unix, ../slirp, ); @@ -1372,6 +1512,10 @@ LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x1000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; @@ -1381,6 +1525,38 @@ }; name = Release; }; + E47303BB235743B900A68BC2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + CLANG_CXX_LIBRARY = "libc++"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + E47303BC235743B900A68BC2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + CLANG_CXX_LIBRARY = "libc++"; + GCC_WARN_INHIBIT_ALL_WARNINGS = YES; + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; + E47303C2235743E200A68BC2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + E47303C3235743E200A68BC2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; /* End XCBuildConfiguration section */ /* Begin XCConfigurationList section */ @@ -1438,6 +1614,24 @@ defaultConfigurationIsVisible = 0; defaultConfigurationName = Release; }; + E47303BA235743B900A68BC2 /* Build configuration list for PBXNativeTarget "gencomp" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E47303BB235743B900A68BC2 /* Debug */, + E47303BC235743B900A68BC2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + E47303C1235743E200A68BC2 /* Build configuration list for PBXLegacyTarget "run_gencomp" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E47303C2235743E200A68BC2 /* Debug */, + E47303C3235743E200A68BC2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; /* End XCConfigurationList section */ }; rootObject = 7539DFAA1F23B17E006B2DF2 /* Project object */; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index e5b8ec01c..cb14154b5 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -815,7 +815,11 @@ don't define. */ /* #undef uintmax_t */ -#define FPU_IEEE 1 -//#define FPU_IMPLEMENTATION 1 +#define DIRECT_ADDRESSING 1 +#define USE_JIT 1 +#define USE_JIT_FPU +#define X86_64_ASSEMBLY +#define OPTIMIZED_FLAGS +#define FPU_IEEE #endif diff --git a/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh b/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh new file mode 100755 index 000000000..4e68a8960 --- /dev/null +++ b/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh @@ -0,0 +1,37 @@ +#!/bin/bash -e + +# +# run_gencomp_for_xcode.sh +# +# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts +# + +if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then + echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" + exit 1 +fi + +# Log some debugging information +echo "1=$1" +echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" +echo "PROJECT_DIR=$PROJECT_DIR" + +# Perform actions, given the passed-in build step +case "$1" in + "clean") + echo "Cleaning gencomp output(s)" + rm -rf "$BUILT_PRODUCTS_DIR/gencomp_output" + ;; + "") + if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then + echo "No built products directory" + exit 1 + fi + echo "Running gencomp" + cd "$BUILT_PRODUCTS_DIR" + mkdir -p gencomp_output + cd gencomp_output + "$BUILT_PRODUCTS_DIR/gencomp" + ls -al + ;; +esac From 8e9fa5038538b3a6237916820985660a86092e47 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Thu, 24 Oct 2019 11:36:51 +0900 Subject: [PATCH 295/534] Update README.md --- README.md | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/README.md b/README.md index a9b96f1ba..e8701c347 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS 64-bit --- +macOS 64-bit JIT Linux 32-bit JIT MinGW 32-bit JIT ``` @@ -11,7 +11,7 @@ Linux 32-bit JIT MinGW 32-bit --- ``` ### How To Build -These builds need to be installed SDL2 framework/library. +These builds need to be installed SDL2.0.10+ framework/library. #### BasiliskII ##### macOS 1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj From f171c611c2f63768852fe3aed6ae976cc5db83e8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 26 Oct 2019 20:47:06 +0900 Subject: [PATCH 296/534] Adjust preprocessor definitions --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 70b59a664..ebc77c6d6 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1334,7 +1334,10 @@ GCC_DYNAMIC_NO_PIC = NO; GCC_NO_COMMON_BLOCKS = YES; GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = "DEBUG=1"; + GCC_PREPROCESSOR_DEFINITIONS = ( + "USE_XCODE=1", + "DEBUG=1", + ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; @@ -1385,7 +1388,7 @@ ENABLE_STRICT_OBJC_MSGSEND = YES; GCC_C_LANGUAGE_STANDARD = gnu99; GCC_NO_COMMON_BLOCKS = YES; - GCC_PREPROCESSOR_DEFINITIONS = ""; + GCC_PREPROCESSOR_DEFINITIONS = "USE_XCODE=1"; GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; @@ -1431,7 +1434,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", HAVE_CONFIG_H, - "USE_XCODE=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1493,7 +1495,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", HAVE_CONFIG_H, - "USE_XCODE=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; From 2ba2d12f8b2f2964a4d39972c69854d6a35feed5 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 5 Nov 2019 01:20:21 -0600 Subject: [PATCH 297/534] Scratch work in audio.cpp to re-implement driver logic in trapped-out code, but working due to change in rscr patcher --- BasiliskII/src/audio.cpp | 346 +++++++++++++++--- BasiliskII/src/include/audio_defs.h | 12 +- .../project.pbxproj | 8 +- SheepShaver/src/rom_patches.cpp | 20 + SheepShaver/src/rsrc_patches.cpp | 2 +- 5 files changed, 334 insertions(+), 54 deletions(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 1595d54f3..5e7caf702 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -32,6 +32,7 @@ #include "audio.h" #include "audio_defs.h" #include "user_strings.h" +#include "cdrom.h" #define DEBUG 0 #include "debug.h" @@ -554,7 +555,22 @@ int16 SoundInPrime(uint32 pb, uint32 dce) { D(bug("SoundInPrime\n")); //!! - return paramErr; + + uint16 code = ReadMacInt16(pb + csCode); + D(bug("SoundInControl %d\n", code)); + + if (code == 1) { + D(bug(" SoundInKillIO\n")); + //!! + return noErr; + } + + if (code != 2) + return -231; // siUnknownInfoType + + uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) + + return noErr; } @@ -575,12 +591,24 @@ int16 SoundInControl(uint32 pb, uint32 dce) if (code != 2) return -231; // siUnknownInfoType + + uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) - uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); - uint32 selector = param[0]; - D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); - +// uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); +// uint32 selector = param[0]; +// D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); +// uint32 selector_flipped = bswap_32(selector); // endianness of selector needs swapping? switch (selector) { + case siInitializeDriver: { +// If possible, the driver initializes the device to a sampling rate of 22 kHz, a sample size of 8 bits, mono recording, no compression, automatic gain control on, and all other features off. + return noErr; + } + + case siCloseDriver: { +// The sound input device driver should stop any recording in progress, deallocate the input hardware, and initialize local variables to default settings. + return noErr; + } + default: return -231; // siUnknownInfoType } @@ -591,60 +619,286 @@ int16 SoundInControl(uint32 pb, uint32 dce) * Sound input driver Status() routine */ -int16 SoundInStatus(uint32 pb, uint32 dce) +int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parameter block (pb) and A1 to device control entry (dce) { uint16 code = ReadMacInt16(pb + csCode); D(bug("SoundInStatus %d\n", code)); if (code != 2) return -231; // siUnknownInfoType - - uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); - uint32 selector = param[0]; - D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); - uint32 selector_flipped = bswap_32(selector); // endianness of selector needs swapping? - switch (selector_flipped) { + + // reading directly + uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) + uint32 bufferptr = ReadMacInt32(pb + csParam + 4); // 4-byte address to the buffer in vm memory + + // reading through location in memory +// uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); +// uint32 selector_flipped = param[0]; +// uint32 selector = bswap_32(selector_flipped); // endianness of selector needs swapping? +// D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); +// uint32 bufferptr_flipped = param[1]; // pointer to application-supplied buffer for return data +// uint32 bufferptr = bswap_32(bufferptr_flipped); // endianness of buffer address needs swapping? + + // two choices on return + // 1: if under 18 bytes, place # of bytes at (pb+csParam) and write from (pb+csParam+4) on + // 2: if over 18 bytes, place 0 at (pb+csParam) and directly write into buffer pointed to by bufferptr +// uint8 *buffer = Mac2HostAddr(bufferptr); + switch (selector) { //#if 0 - case siDeviceName: { - const char *str = GetString(STR_SOUND_IN_NAME); - param[0] = 0; - memcpy((void *)param[1], str, strlen(str)); + case siDeviceName: { // return name in STR255 format +// const char *str = GetString(STR_SOUND_IN_NAME); + const uint8 str[] = { // size 9 + 0x08, // 1-byte length + 0x42, 0x75, // Bu + 0x69, 0x6c, // il + 0x74, 0x2d, // t- + 0x69, 0x6e // in + }; + const uint8 str2[] = { // size 8 + 0x07, // 1-byte length + 0x41, 0x70, // Ap + 0x70, 0x6c, // pl + 0x65, 0x43, // eC + 0x44 // D + }; + const uint8 str3[] = { // size 12 + 0x0b, // byte size indicator (up to 255 length supported) + 0x49, 0x6e, // start of string in ASCII, In + 0x74, 0x65, // te + 0x72, 0x6e, // rn + 0x61, 0x6c, // al + 0x20, 0x43, // C + 0x44, // D + }; + const uint8 str4[] = { // size 18 + 0x10, 0x2e, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x53, 0x6f, 0x75, 0x6e, 0x64, 0x49, 0x6e, 0x70, 0x75, 0x74, 0x00 // ".AppleSoundInput" + }; + WriteMacInt32(pb + csParam, 0); // response will directly be written into buffer + vm_memcpy(bufferptr, str3, 12); +// memcpy(buffer, str, 9); return noErr; } case siDeviceIcon: { - return -192; // early return: 68k code causes crash in sheep and link error in basilisk - M68kRegisters r; - static const uint8 proc[] = { - 0x55, 0x8f, // subq.l #2,sp - 0xa9, 0x94, // CurResFile - 0x42, 0x67, // clr.w -(sp) - 0xa9, 0x98, // UseResFile - 0x59, 0x8f, // subq.l #4,sp - 0x48, 0x79, 0x49, 0x43, 0x4e, 0x23, // move.l #'ICN#',-(sp) - 0x3f, 0x3c, 0xbf, 0x76, // move.w #-16522,-(sp) - 0xa9, 0xa0, // GetResource - 0x24, 0x5f, // move.l (sp)+,a2 - 0xa9, 0x98, // UseResFile - 0x20, 0x0a, // move.l a2,d0 - 0x66, 0x04, // bne 1 - 0x70, 0x00, // moveq #0,d0 - M68K_RTS >> 8, M68K_RTS & 0xff, - 0x2f, 0x0a, //1 move.l a2,-(sp) - 0xa9, 0x92, // DetachResource - 0x20, 0x4a, // move.l a2,a0 - 0xa0, 0x4a, // HNoPurge - 0x70, 0x01, // moveq #1,d0 - M68K_RTS >> 8, M68K_RTS & 0xff +// return -192; + + WriteMacInt32(pb + csParam, 0); + WriteMacInt32(bufferptr, CDROMIconAddr); + return noErr; + + // attempt to load from external file into emulator +// FILE *fl = fopen("/Emulators/SheepShaver/Shared/SoundIcon.icn", "r"); +// fseek(fl, 0, SEEK_END); +// long len = ftell(fl); +// uint32 icnbuffer = Mac_sysalloc(len); +// uint8 *ret = (uint8*)Mac2HostAddr(icnbuffer); +// fseek(fl, 0, SEEK_SET); +// fread(ret, 1, len, fl); +// fclose(fl); +// WriteMacInt32(pb + csParam, 4); // will be the address of the icn in memory +// WriteMacInt32(pb + csParam + 4, icnbuffer); +// WriteMacInt32(bufferptr,icnbuffer); +// return noErr; + + // 68k code causes crash in sheep and link error in basilisk +// M68kRegisters r; +// static const uint8 proc[] = { +// 0x55, 0x8f, // subq.l #2,sp +// 0xa9, 0x94, // CurResFile +// 0x42, 0x67, // clr.w -(sp) +// 0xa9, 0x98, // UseResFile +// 0x59, 0x8f, // subq.l #4,sp +// 0x48, 0x79, 0x49, 0x43, 0x4e, 0x23, // move.l #'ICN#',-(sp) +// 0x3f, 0x3c, 0xbf, 0x76, // move.w #-16522,-(sp) +// 0xa9, 0xa0, // GetResource +// 0x24, 0x5f, // move.l (sp)+,a2 +// 0xa9, 0x98, // UseResFile +// 0x20, 0x0a, // move.l a2,d0 +// 0x66, 0x04, // bne 1 +// 0x70, 0x00, // moveq #0,d0 +// M68K_RTS >> 8, M68K_RTS & 0xff, +// 0x2f, 0x0a, //1 move.l a2,-(sp) +// 0xa9, 0x92, // DetachResource +// 0x20, 0x4a, // move.l a2,a0 +// 0xa0, 0x4a, // HNoPurge +// 0x70, 0x01, // moveq #1,d0 +// M68K_RTS >> 8, M68K_RTS & 0xff +// }; +// Execute68k(Host2MacAddr((uint8 *)proc), &r); +// if (r.d[0]) { +// WriteMacInt32(pb + csParam, 4); // Length of returned data +// WriteMacInt32(pb + csParam + 4, r.a[2]); // Handle to icon suite +// return noErr; +// } else +// return -192; // resNotFound + } + + case siInputSource: { +// uint32 addr = Mac_sysalloc(1); +// WriteMacInt32(addr, 0); +// param[0] = 4; +// param[1] = addr; +// WriteMacInt32(param[1], 0); +// const uint32 opt = 0; // 0 if no options box supported and 1 if so +// const uint8 ind[] = { +// 0x00, 0x00, 0x00, 0x00 +// }; +// param[0] = 0;s +// memcpy((void *)buffer, ind, 4); +// uint8 *src = (uint8 *)Mac2HostAddr(Mac_sysalloc(1)); +// *src = 0x00; +// param[0] = 4; +// param[1] = Host2MacAddr(src); +// return -231; +// uint32 opt = Mac_sysalloc(4); +// WriteMacInt32(opt, 0); +// param[0] = 4; +// param[1] = opt; +// return -231; + WriteMacInt32(pb + csParam, 4); + WriteMacInt32(pb + csParam + 4, 1); + return noErr; + } + + case siInputSourceNames: { // list of sources in str# resource format +// return -231; + +// const char names[] = { +// '\x00', '\x02', +// '\x0b', +// 'I','n','t','e','r','n','a','l',' ','C','D', +// '\x0a', +// 'M','i','c','r','o','p','h','o','n','e','\0' +// }; +// const char names2[] = { +// '\x00', 'e', 'n', 'o', 'h', 'p', 'o', 'r', 'c', 'i', 'M', '\x0a', 'D', 'C', ' ', 'l', 'a', 'n', 'r', 'e', 't', 'n', 'I', '\x0b', '\x02', '\x00' +// }; +// SheepVar names_str(26); +// strcpy((char*)Mac2HostAddr(names_str.addr()),names2); +// WriteMacInt32(pb + csParam, 0); +// WriteMacInt32(bufferptr, names_str.addr()); +// return noErr; + +// SheepString names("\00bInternal CD"); +// WriteMacInt32(pb + csParam, 0); +// WriteMacInt32(bufferptr, names.addr()); +// return noErr; +// uint32 nameshandle = Mac_sysalloc(14); + +// SheepVar names_str(25); + const uint8 str[] = { + 0x00, 0x02, // 2-byte count of #strings + 0x0b, // byte size indicator (up to 255 length supported) + 0x49, 0x6e, // start of string in ASCII, In + 0x74, 0x65, // te + 0x72, 0x6e, // rn + 0x61, 0x6c, // al + 0x20, 0x43, // C + 0x44, // D + 0x0a, // size is 10 + 0x4d, 0x69, // Mi + 0x63, 0x72, // cr + 0x6f, 0x70, // op + 0x68, 0x6f, // ho + 0x6e, 0x65, // ne }; - Execute68k(Host2MacAddr((uint8 *)proc), &r); - if (r.d[0]) { - param[0] = 4; // Length of returned data - param[1] = r.a[2]; // Handle to icon suite - return noErr; - } else - return -192; // resNotFound + const char str2[] = { + 0x00, 0x01, // 2-byte count of #strings + 0x02, // string size is 2 + 0x43, 0x44, // CD + 0x00 + }; + SheepString names(str2); +// vm_memcpy(names_str.addr(), str, 25); + WriteMacInt32(pb + csParam, 0); +// vm_memcpy(bufferptr, str, 25); + WriteMacInt32(bufferptr, names.addr()); + return noErr; + +// vm_memcpy(nameshandle, str, 14); +// memcpy(names, str, 14); + // attempt to load from external file into emulator +// FILE *fl = fopen("/Emulators/SheepShaver/Shared/soundnames.rsrc", "r"); +// fseek(fl, 0, SEEK_END); +// long len = ftell(fl); +// uint8 *ret = (uint8*)malloc(len); +// fseek(fl, 0, SEEK_SET); +// fread(ret, 1, len, fl); +// fclose(fl); +// SheepVar names_strs(len); +// vm_memcpy(names_strs.addr(), ret, len); +// WriteMacInt32(pb + csParam, 0); +// WriteMacInt32(bufferptr, names_strs.addr()); +// return noErr; +// uint32 name = Mac_sysalloc(14); +// Host2Mac_memcpy(name, str, 14); +// uint32 handle = Host2MacAddr(names); +// param[0] = 4; +// memcpy((void *)param[1], str, 14); +// return noErr; +// WriteMacInt16(param[1], 1); +// const char *str = "Internal CD"; +//// Host2Mac_memcpy(param[1]+sizeof(uint16), str, strlen(str)); +//// uint16 *num = new uint16; // number of sources (2-bytes at start of infoData +//// *num = (uint16) 1; +//// const char *str = "Built-In";//GetString(STR_SOUND_IN_SOURCE); +//// param[0] = sizeof(uint16) + strlen(str); +//// memcpy((void *)param[1], num, sizeof(uint16)); +// memcpy((void *)param[1], str, strlen(str)); +// return -231; // when only 1 source, return siUnknownInfoType + } + + case siOptionsDialog: { +// WriteMacInt32(param[1], 0); +// const uint32 opt = 0; // 0 if no options box supported and 1 if so +// param[0] = 0; +// memcpy((void *)param[1], &opt, sizeof(opt)); +// const uint8 ind[] = { +// 0x00, 0x00, 0x00, 0x00 +// }; +// uint32 opt = Mac_sysalloc(4); +// WriteMacInt32(opt, 0); +// param[0] = 0; +// WriteMacInt32(bufferptr, 0); + WriteMacInt32(pb + csParam, 4); + WriteMacInt32(pb + csParam + 4, 0); +// uint8 *src = (uint8 *)Mac2HostAddr(Mac_sysalloc(1)); +// *src = 0x00; +// param[0] = 4; +// param[1] = Host2MacAddr(src); +// uint32 opt = Mac_sysalloc(4); +// WriteMacInt32(opt, 0); +// param[0] = 4; +// param[1] = opt; + return noErr; + } + + case siPlayThruOnOff: { +// WriteMacInt32(param[1], 0); +// const uint32 plt = 7; // playthrough volume, 0 is off and 7 is max +// param[0] = 0; +// memcpy((void *)param[1], &plt, sizeof(plt)); +// uint32 opt = Mac_sysalloc(4); +// WriteMacInt32(opt, 0); +// param[0] = 0; +// WriteMacInt32(bufferptr, 7); + WriteMacInt32(pb + csParam, 4); + WriteMacInt32(pb + csParam + 4, 7); +// uint32 opt = Mac_sysalloc(4); +// WriteMacInt32(opt, 0); +// param[0] = 4; +// param[1] = opt; + return noErr; } //#endif + case FOURCC('p', 't', 'k', 'd'): { + return -231; + WriteMacInt32(pb + csParam, 1); + WriteMacInt8(pb + csParam + 4, 0); + return noErr; + } + case FOURCC('i', 'n', 'p', 't'): { + return -231; + } default: return -231; // siUnknownInfoType } diff --git a/BasiliskII/src/include/audio_defs.h b/BasiliskII/src/include/audio_defs.h index c52b7d706..4f69f38eb 100644 --- a/BasiliskII/src/include/audio_defs.h +++ b/BasiliskII/src/include/audio_defs.h @@ -72,14 +72,20 @@ const uint32 siHardwareMute = FOURCC('h','m','u','t'); // mute state of all ha const uint32 siHardwareVolume = FOURCC('h','v','o','l'); // volume level of all hardware const uint32 siHardwareVolumeSteps = FOURCC('h','s','t','p'); // number of volume steps for hardware const uint32 siHardwareBusy = FOURCC('h','w','b','s'); // sound hardware is in use +const uint32 siHardwareFormat = FOURCC('h','w','f','m'); // hardware format const uint32 siHeadphoneMute = FOURCC('p','m','u','t'); // mute state of headphone const uint32 siHeadphoneVolume = FOURCC('p','v','o','l'); // volume level of headphone const uint32 siHeadphoneVolumeSteps = FOURCC('h','d','s','t'); // number of volume steps for headphone const uint32 siSpeakerMute = FOURCC('s','m','u','t'); // mute state of all built-in speakers const uint32 siSpeakerVolume = FOURCC('s','v','o','l'); // volume level of built-in speaker -const uint32 siDeviceName = FOURCC('n','a','m','e'); -const uint32 siDeviceIcon = FOURCC('i','c','o','n'); -const uint32 siHardwareFormat = FOURCC('h','w','f','m'); +const uint32 siDeviceName = FOURCC('n','a','m','e'); // sound input name +const uint32 siDeviceIcon = FOURCC('i','c','o','n'); // sound input icon resource location +const uint32 siInputSourceNames = FOURCC('s','n','a','m'); // sound input source names +const uint32 siInputSource = FOURCC('s','o','u','r'); // sound input source selector +const uint32 siOptionsDialog = FOURCC('o','p','t','d'); // display options dialog box +const uint32 siPlayThruOnOff = FOURCC('p','l','t','h'); // play-through state +const uint32 siInitializeDriver = FOURCC('i','n','i','t'); // open sound input device +const uint32 siCloseDriver = FOURCC('c','l','o','s'); // close sound input device enum { // ComponentResource struct componentType = 0, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 061f85d2c..87cfe35ea 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -28,7 +28,6 @@ 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */; }; 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; - 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD4B14A99EEF000B1711 /* adb.cpp */; }; 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7D14A99EEF000B1711 /* disk.cpp */; }; 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */; }; 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8614A99EEF000B1711 /* emul_op.cpp */; }; @@ -77,6 +76,7 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; + 5D3967C02328D315003925D6 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; @@ -169,7 +169,6 @@ 0846E52314B129DA00574779 /* ppc_asm.S */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.asm; path = ppc_asm.S; sourceTree = ""; }; 0846E55214B12B0D00574779 /* paranoia.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = paranoia.cpp; sourceTree = ""; }; 0856CCC114A99E1C000B1711 /* SheepShaver.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaver.app; sourceTree = BUILT_PRODUCTS_DIR; }; - 0856CD4B14A99EEF000B1711 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = SOURCE_ROOT; }; 0856CD7D14A99EEF000B1711 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = SOURCE_ROOT; }; 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 0856CD8614A99EEF000B1711 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = SOURCE_ROOT; }; @@ -335,6 +334,7 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; + 5D3967BF2328D315003925D6 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../../../BasiliskII/src/adb.cpp; sourceTree = ""; }; 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue_unix.cpp; path = ../../../BasiliskII/src/Unix/bincue_unix.cpp; sourceTree = ""; }; 5D55CB442255B50E00FF8E81 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bincue_unix.h; path = ../../../BasiliskII/src/Unix/bincue_unix.h; sourceTree = ""; }; @@ -476,7 +476,7 @@ isa = PBXGroup; children = ( 087B91B11B780EC900825F7F /* CrossPlatform */, - 0856CD4B14A99EEF000B1711 /* adb.cpp */, + 5D3967BF2328D315003925D6 /* adb.cpp */, 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, 0856CD7D14A99EEF000B1711 /* disk.cpp */, @@ -1066,7 +1066,6 @@ E44C460B20D262B0000583AE /* debug.c in Sources */, 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, - 0856CFC114A99EF0000B1711 /* adb.cpp in Sources */, E44C461520D262B0000583AE /* ip_output.c in Sources */, E44C461820D262B0000583AE /* tcp_output.c in Sources */, 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, @@ -1100,6 +1099,7 @@ 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, + 5D3967C02328D315003925D6 /* adb.cpp in Sources */, 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp index 83d6f17d2..241445ffc 100644 --- a/SheepShaver/src/rom_patches.cpp +++ b/SheepShaver/src/rom_patches.cpp @@ -2341,6 +2341,15 @@ static bool patch_68k(void) if (ReadMacInt32(thing + componentPFCount)) AddSifter(ReadMacInt32(thing + componentPFResType), ReadMacInt16(thing + componentPFResID)); } +// else if (ReadMacInt32(thing) == FOURCC('s','i','n','p')) { +// D(bug("found sinp component at offset %08x in ROM\n", thing)); +// } +// else if (ReadMacInt32(thing) == FOURCC('c','d',' ',' ')) { +// D(bug("found sinp component at offset %08x in ROM\n", thing)); +// } +// else if (ReadMacInt32(thing) == FOURCC('i','m','i','c')) { +// D(bug("found sinp component at offset %08x in ROM\n", thing)); +// } thing = find_rom_resource(FOURCC('t','h','n','g'), 4711, true); } @@ -2362,6 +2371,17 @@ static bool patch_68k(void) *wp++ = htons(0x4e74); *wp++ = htons(0x0008); // rtd #8 } } + +// // Find sound input in ROM +// D(bug("Searching for sound components with type sdev in ROM\n")); +// uint32 sinp = find_rom_resource(FOURCC('s','i','n','p')); +// if (sinp == 0) { +// sinp = find_rom_resource(FOURCC('c','d',' ',' ')); +// if (sinp == 0) { +// sinp = find_rom_resource(FOURCC('i','m','i','c')); +// } +// } + return true; } diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index 8bf0ac4ff..12be57f57 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -517,7 +517,7 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - } else if (type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { + } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16501 patches the native driver and -16500 traps out to code, but very hard to re-implement there! D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); From f7da6ba4e5ed2f8bac1a69c541b592147e642f0a Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 5 Nov 2019 01:40:53 -0600 Subject: [PATCH 298/534] Cleaned up unused code for sound in traps --- BasiliskII/src/audio.cpp | 238 +++++-------------------------- SheepShaver/src/rom_patches.cpp | 19 --- SheepShaver/src/rsrc_patches.cpp | 2 +- 3 files changed, 35 insertions(+), 224 deletions(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 5e7caf702..5ad897e98 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -535,7 +535,7 @@ adat_error: printf("FATAL: audio component data block initialization error\n"); } } - +// not currently using these functions /* * Sound input driver Open() routine */ @@ -567,8 +567,6 @@ int16 SoundInPrime(uint32 pb, uint32 dce) if (code != 2) return -231; // siUnknownInfoType - - uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) return noErr; } @@ -594,10 +592,6 @@ int16 SoundInControl(uint32 pb, uint32 dce) uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) -// uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); -// uint32 selector = param[0]; -// D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); -// uint32 selector_flipped = bswap_32(selector); // endianness of selector needs swapping? switch (selector) { case siInitializeDriver: { // If possible, the driver initializes the device to a sampling rate of 22 kHz, a sample size of 8 bits, mono recording, no compression, automatic gain control on, and all other features off. @@ -626,26 +620,15 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame if (code != 2) return -231; // siUnknownInfoType - // reading directly - uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) - uint32 bufferptr = ReadMacInt32(pb + csParam + 4); // 4-byte address to the buffer in vm memory - - // reading through location in memory -// uint32 *param = (uint32 *)Mac2HostAddr(pb + csParam); -// uint32 selector_flipped = param[0]; -// uint32 selector = bswap_32(selector_flipped); // endianness of selector needs swapping? -// D(bug(" selector %c%c%c%c\n", selector >> 24, selector >> 16, selector >> 8, selector)); -// uint32 bufferptr_flipped = param[1]; // pointer to application-supplied buffer for return data -// uint32 bufferptr = bswap_32(bufferptr_flipped); // endianness of buffer address needs swapping? - // two choices on return // 1: if under 18 bytes, place # of bytes at (pb+csParam) and write from (pb+csParam+4) on // 2: if over 18 bytes, place 0 at (pb+csParam) and directly write into buffer pointed to by bufferptr -// uint8 *buffer = Mac2HostAddr(bufferptr); + uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) + uint32 bufferptr = ReadMacInt32(pb + csParam + 4); // 4-byte address to the buffer in vm memory + switch (selector) { //#if 0 case siDeviceName: { // return name in STR255 format -// const char *str = GetString(STR_SOUND_IN_NAME); const uint8 str[] = { // size 9 0x08, // 1-byte length 0x42, 0x75, // Bu @@ -653,52 +636,17 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame 0x74, 0x2d, // t- 0x69, 0x6e // in }; - const uint8 str2[] = { // size 8 - 0x07, // 1-byte length - 0x41, 0x70, // Ap - 0x70, 0x6c, // pl - 0x65, 0x43, // eC - 0x44 // D - }; - const uint8 str3[] = { // size 12 - 0x0b, // byte size indicator (up to 255 length supported) - 0x49, 0x6e, // start of string in ASCII, In - 0x74, 0x65, // te - 0x72, 0x6e, // rn - 0x61, 0x6c, // al - 0x20, 0x43, // C - 0x44, // D - }; - const uint8 str4[] = { // size 18 - 0x10, 0x2e, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x53, 0x6f, 0x75, 0x6e, 0x64, 0x49, 0x6e, 0x70, 0x75, 0x74, 0x00 // ".AppleSoundInput" - }; WriteMacInt32(pb + csParam, 0); // response will directly be written into buffer - vm_memcpy(bufferptr, str3, 12); -// memcpy(buffer, str, 9); + vm_memcpy(bufferptr, str, 9); return noErr; } case siDeviceIcon: { -// return -192; - + // Borrow ICN resource from cd rom driver, just a hack since loading a true ICN would be better WriteMacInt32(pb + csParam, 0); WriteMacInt32(bufferptr, CDROMIconAddr); return noErr; - // attempt to load from external file into emulator -// FILE *fl = fopen("/Emulators/SheepShaver/Shared/SoundIcon.icn", "r"); -// fseek(fl, 0, SEEK_END); -// long len = ftell(fl); -// uint32 icnbuffer = Mac_sysalloc(len); -// uint8 *ret = (uint8*)Mac2HostAddr(icnbuffer); -// fseek(fl, 0, SEEK_SET); -// fread(ret, 1, len, fl); -// fclose(fl); -// WriteMacInt32(pb + csParam, 4); // will be the address of the icn in memory -// WriteMacInt32(pb + csParam + 4, icnbuffer); -// WriteMacInt32(bufferptr,icnbuffer); -// return noErr; - // 68k code causes crash in sheep and link error in basilisk // M68kRegisters r; // static const uint8 proc[] = { @@ -733,172 +681,54 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame } case siInputSource: { -// uint32 addr = Mac_sysalloc(1); -// WriteMacInt32(addr, 0); -// param[0] = 4; -// param[1] = addr; -// WriteMacInt32(param[1], 0); -// const uint32 opt = 0; // 0 if no options box supported and 1 if so -// const uint8 ind[] = { -// 0x00, 0x00, 0x00, 0x00 -// }; -// param[0] = 0;s -// memcpy((void *)buffer, ind, 4); -// uint8 *src = (uint8 *)Mac2HostAddr(Mac_sysalloc(1)); -// *src = 0x00; -// param[0] = 4; -// param[1] = Host2MacAddr(src); -// return -231; -// uint32 opt = Mac_sysalloc(4); -// WriteMacInt32(opt, 0); -// param[0] = 4; -// param[1] = opt; -// return -231; - WriteMacInt32(pb + csParam, 4); - WriteMacInt32(pb + csParam + 4, 1); - return noErr; + // return -231 if only 1 or index if more + return -231; + +// WriteMacInt32(pb + csParam, 4); +// WriteMacInt32(pb + csParam + 4, 1); // index 1 +// return noErr; } - case siInputSourceNames: { // list of sources in str# resource format -// return -231; + case siInputSourceNames: { // list of sources in STR# resource format + // return -231 if only 1 or handle to STR# resource if more + return -231; -// const char names[] = { -// '\x00', '\x02', -// '\x0b', -// 'I','n','t','e','r','n','a','l',' ','C','D', -// '\x0a', -// 'M','i','c','r','o','p','h','o','n','e','\0' -// }; -// const char names2[] = { -// '\x00', 'e', 'n', 'o', 'h', 'p', 'o', 'r', 'c', 'i', 'M', '\x0a', 'D', 'C', ' ', 'l', 'a', 'n', 'r', 'e', 't', 'n', 'I', '\x0b', '\x02', '\x00' +// const uint8 str[] = { +// 0x00, 0x02, // 2-byte count of #strings +// 0x0b, // byte size indicator (up to 255 length supported) +// 0x49, 0x6e, // start of string in ASCII, In +// 0x74, 0x65, // te +// 0x72, 0x6e, // rn +// 0x61, 0x6c, // al +// 0x20, 0x43, // C +// 0x44, // D +// 0x0a, // size is 10 +// 0x4d, 0x69, // Mi +// 0x63, 0x72, // cr +// 0x6f, 0x70, // op +// 0x68, 0x6f, // ho +// 0x6e, 0x65, // ne // }; -// SheepVar names_str(26); -// strcpy((char*)Mac2HostAddr(names_str.addr()),names2); -// WriteMacInt32(pb + csParam, 0); -// WriteMacInt32(bufferptr, names_str.addr()); -// return noErr; - -// SheepString names("\00bInternal CD"); +// // WriteMacInt32(pb + csParam, 0); -// WriteMacInt32(bufferptr, names.addr()); -// return noErr; -// uint32 nameshandle = Mac_sysalloc(14); - -// SheepVar names_str(25); - const uint8 str[] = { - 0x00, 0x02, // 2-byte count of #strings - 0x0b, // byte size indicator (up to 255 length supported) - 0x49, 0x6e, // start of string in ASCII, In - 0x74, 0x65, // te - 0x72, 0x6e, // rn - 0x61, 0x6c, // al - 0x20, 0x43, // C - 0x44, // D - 0x0a, // size is 10 - 0x4d, 0x69, // Mi - 0x63, 0x72, // cr - 0x6f, 0x70, // op - 0x68, 0x6f, // ho - 0x6e, 0x65, // ne - }; - const char str2[] = { - 0x00, 0x01, // 2-byte count of #strings - 0x02, // string size is 2 - 0x43, 0x44, // CD - 0x00 - }; - SheepString names(str2); -// vm_memcpy(names_str.addr(), str, 25); - WriteMacInt32(pb + csParam, 0); // vm_memcpy(bufferptr, str, 25); - WriteMacInt32(bufferptr, names.addr()); - return noErr; - -// vm_memcpy(nameshandle, str, 14); -// memcpy(names, str, 14); - // attempt to load from external file into emulator -// FILE *fl = fopen("/Emulators/SheepShaver/Shared/soundnames.rsrc", "r"); -// fseek(fl, 0, SEEK_END); -// long len = ftell(fl); -// uint8 *ret = (uint8*)malloc(len); -// fseek(fl, 0, SEEK_SET); -// fread(ret, 1, len, fl); -// fclose(fl); -// SheepVar names_strs(len); -// vm_memcpy(names_strs.addr(), ret, len); -// WriteMacInt32(pb + csParam, 0); -// WriteMacInt32(bufferptr, names_strs.addr()); -// return noErr; -// uint32 name = Mac_sysalloc(14); -// Host2Mac_memcpy(name, str, 14); -// uint32 handle = Host2MacAddr(names); -// param[0] = 4; -// memcpy((void *)param[1], str, 14); // return noErr; -// WriteMacInt16(param[1], 1); -// const char *str = "Internal CD"; -//// Host2Mac_memcpy(param[1]+sizeof(uint16), str, strlen(str)); -//// uint16 *num = new uint16; // number of sources (2-bytes at start of infoData -//// *num = (uint16) 1; -//// const char *str = "Built-In";//GetString(STR_SOUND_IN_SOURCE); -//// param[0] = sizeof(uint16) + strlen(str); -//// memcpy((void *)param[1], num, sizeof(uint16)); -// memcpy((void *)param[1], str, strlen(str)); -// return -231; // when only 1 source, return siUnknownInfoType } case siOptionsDialog: { -// WriteMacInt32(param[1], 0); -// const uint32 opt = 0; // 0 if no options box supported and 1 if so -// param[0] = 0; -// memcpy((void *)param[1], &opt, sizeof(opt)); -// const uint8 ind[] = { -// 0x00, 0x00, 0x00, 0x00 -// }; -// uint32 opt = Mac_sysalloc(4); -// WriteMacInt32(opt, 0); -// param[0] = 0; -// WriteMacInt32(bufferptr, 0); + // 0 if no options box supported and 1 if so WriteMacInt32(pb + csParam, 4); WriteMacInt32(pb + csParam + 4, 0); -// uint8 *src = (uint8 *)Mac2HostAddr(Mac_sysalloc(1)); -// *src = 0x00; -// param[0] = 4; -// param[1] = Host2MacAddr(src); -// uint32 opt = Mac_sysalloc(4); -// WriteMacInt32(opt, 0); -// param[0] = 4; -// param[1] = opt; return noErr; } case siPlayThruOnOff: { -// WriteMacInt32(param[1], 0); -// const uint32 plt = 7; // playthrough volume, 0 is off and 7 is max -// param[0] = 0; -// memcpy((void *)param[1], &plt, sizeof(plt)); -// uint32 opt = Mac_sysalloc(4); -// WriteMacInt32(opt, 0); -// param[0] = 0; -// WriteMacInt32(bufferptr, 7); + // playthrough volume, 0 is off and 7 is max WriteMacInt32(pb + csParam, 4); - WriteMacInt32(pb + csParam + 4, 7); -// uint32 opt = Mac_sysalloc(4); -// WriteMacInt32(opt, 0); -// param[0] = 4; -// param[1] = opt; + WriteMacInt32(pb + csParam + 4, 0); return noErr; } //#endif - case FOURCC('p', 't', 'k', 'd'): { - return -231; - WriteMacInt32(pb + csParam, 1); - WriteMacInt8(pb + csParam + 4, 0); - return noErr; - } - case FOURCC('i', 'n', 'p', 't'): { - return -231; - } default: return -231; // siUnknownInfoType } diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp index 241445ffc..ef51c8286 100644 --- a/SheepShaver/src/rom_patches.cpp +++ b/SheepShaver/src/rom_patches.cpp @@ -2341,15 +2341,6 @@ static bool patch_68k(void) if (ReadMacInt32(thing + componentPFCount)) AddSifter(ReadMacInt32(thing + componentPFResType), ReadMacInt16(thing + componentPFResID)); } -// else if (ReadMacInt32(thing) == FOURCC('s','i','n','p')) { -// D(bug("found sinp component at offset %08x in ROM\n", thing)); -// } -// else if (ReadMacInt32(thing) == FOURCC('c','d',' ',' ')) { -// D(bug("found sinp component at offset %08x in ROM\n", thing)); -// } -// else if (ReadMacInt32(thing) == FOURCC('i','m','i','c')) { -// D(bug("found sinp component at offset %08x in ROM\n", thing)); -// } thing = find_rom_resource(FOURCC('t','h','n','g'), 4711, true); } @@ -2372,16 +2363,6 @@ static bool patch_68k(void) } } -// // Find sound input in ROM -// D(bug("Searching for sound components with type sdev in ROM\n")); -// uint32 sinp = find_rom_resource(FOURCC('s','i','n','p')); -// if (sinp == 0) { -// sinp = find_rom_resource(FOURCC('c','d',' ',' ')); -// if (sinp == 0) { -// sinp = find_rom_resource(FOURCC('i','m','i','c')); -// } -// } - return true; } diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index 12be57f57..3658766b4 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -517,7 +517,7 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16501 patches the native driver and -16500 traps out to code, but very hard to re-implement there! + } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native driver and traps out to code, but very hard to re-implement there! D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); From 35e6d4fcdfd4cfcc23cf89f73c00cce651000283 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 5 Nov 2019 02:18:11 -0600 Subject: [PATCH 299/534] Minor compatibility change for BII support --- BasiliskII/src/audio.cpp | 3 ++- BasiliskII/src/cdrom.cpp | 3 +++ 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 5ad897e98..6a52a0ef1 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -637,7 +637,8 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame 0x69, 0x6e // in }; WriteMacInt32(pb + csParam, 0); // response will directly be written into buffer - vm_memcpy(bufferptr, str, 9); +// vm_memcpy(bufferptr, str, 9); + memcpy(Mac2HostAddr(bufferptr),str,9); return noErr; } diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index a84ca895f..2f8bbc515 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -994,6 +994,9 @@ int16 CDROMStatus(uint32 pb, uint32 dce) case FOURCC('v','m','o','p'): // Virtual memory attributes WriteMacInt32(pb + csParam + 4, 0); // Drive not available for VM break; + case FOURCC('c', 'd', '3', 'd'): + WriteMacInt16(pb + csParam + 4, 0); + break; default: return statusErr; } From 539e436893dac20a5c3bca3ff6d3c0f67675847c Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sat, 9 Nov 2019 03:28:20 -0600 Subject: [PATCH 300/534] testing with no sound input patch --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 1 + SheepShaver/src/rsrc_patches.cpp | 5 +++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 87cfe35ea..6b4ccb4db 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1172,6 +1172,7 @@ ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_CXX_LIBRARY = "libc++"; COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; GCC_OPTIMIZATION_LEVEL = 0; diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index 3658766b4..ccd1c33dc 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -517,12 +517,13 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native driver and traps out to code, but very hard to re-implement there! + // patch for -16501 resource ID not even needed? seems to run off native driver without +/* } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native driver and traps out to code, but very hard to re-implement there! D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); D(bug(" patch 1 applied\n")); - +*/ } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); size >>= 1; From 9a18393fc545df0165aa6560685893aa712fb534 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 10 Nov 2019 05:00:01 -0600 Subject: [PATCH 301/534] testing track position hack which makes more games work with mixed-mode --- BasiliskII/src/Unix/bincue_unix.cpp | 9 ++++--- BasiliskII/src/cdrom.cpp | 39 +++++++++++++++++++++++++---- 2 files changed, 39 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index b91a861c5..ac7968531 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -686,10 +686,11 @@ bool CDResume_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; if (cs && cs == player.cs) { - if (player.audiostatus == CDROM_AUDIO_PAUSED) { - player.audiostatus = CDROM_AUDIO_PLAY; - return true; - } +// if (player.audiostatus == CDROM_AUDIO_PAUSED) { + // don't care if it was paused or not, just ensure it's playing after this call + player.audiostatus = CDROM_AUDIO_PLAY; + return true; +// } } return false; } diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 2f8bbc515..d4719c534 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -536,8 +536,10 @@ int16 CDROMControl(uint32 pb, uint32 dce) SysEject(info->fh); WriteMacInt8(info->status + dsDiskInPlace, 0); info->twok_offset = -1; + return noErr; + } else { + return offLinErr; } - return noErr; case 21: // GetDriveIcon case 22: // GetMediaIcon @@ -547,6 +549,30 @@ int16 CDROMControl(uint32 pb, uint32 dce) case 23: // GetDriveInfo WriteMacInt32(pb + csParam, 0x00000b01); // Unspecified external removable SCSI disk return noErr; + + // TODO: revist this section, is it necessary with DriverGestalt also in Status section? + case 43: { // DriverGestalt + int selector = ReadMacInt32(pb + csParam); + switch (selector) { + case FOURCC('v','e','r','s'): + WriteMacInt32(pb + csParam + 4, 0x05208000); // vers 5.2.0 + break; + case FOURCC('d','e','v','t'): + WriteMacInt32(pb + csParam + 4, FOURCC('c','d','r','m')); + break; + case FOURCC('i','n','t','f'): + case FOURCC('d','A','P','I'): + WriteMacInt32(pb + csParam + 4, FOURCC('s','c','s','i')); + break; + case FOURCC('s','y','n','c'): + WriteMacInt32(pb + csParam + 4, 1); // true/false = sync/async + break; + case FOURCC('c','d','3','d'): + WriteMacInt32(pb + csParam + 4, 1); + break; + } + return noErr; + } case 70: { // SetPowerMode uint8 mode = ReadMacInt8(pb + csParam); @@ -765,8 +791,8 @@ int16 CDROMControl(uint32 pb, uint32 dce) info->play_mode = ReadMacInt8(pb + csParam + 9) & 0x0f; if (!SysCDPlay(info->fh, start_m, start_s, start_f, info->stop_at[0], info->stop_at[1], info->stop_at[2])) return paramErr; - if (ReadMacInt16(pb + csParam + 6) == 0) // Hold - SysCDPause(info->fh); +// if (ReadMacInt16(pb + csParam + 6) == 0) // Hold +// SysCDPause(info->fh); return noErr; } @@ -775,6 +801,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; + if (ReadMacInt16(pb + csParam + 6)) { // Given stopping address if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), true, info->stop_at[0], info->stop_at[1], info->stop_at[2])) @@ -967,10 +994,12 @@ int16 CDROMStatus(uint32 pb, uint32 dce) WriteMacInt32(pb + csParam + 4, FOURCC('c','d','r','m')); break; case FOURCC('i','n','t','f'): // Interface type - WriteMacInt32(pb + csParam + 4, EMULATOR_ID_4); +// WriteMacInt32(pb + csParam + 4, EMULATOR_ID_4); + WriteMacInt32(pb + csParam + 4, FOURCC('s','c','s','i')); break; case FOURCC('s','y','n','c'): // Only synchronous operation? WriteMacInt32(pb + csParam + 4, 0x01000000); +// WriteMacInt32(pb + csParam + 4, 1); break; case FOURCC('b','o','o','t'): // Boot ID if (info != drives.end()) @@ -995,7 +1024,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) WriteMacInt32(pb + csParam + 4, 0); // Drive not available for VM break; case FOURCC('c', 'd', '3', 'd'): - WriteMacInt16(pb + csParam + 4, 0); + WriteMacInt16(pb + csParam + 4, 1); break; default: return statusErr; From 447c7b365dc901dc74f7582a399376d0ab3f19c0 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 10 Nov 2019 18:24:35 -0600 Subject: [PATCH 302/534] Better AudioPlay support and CDScan implemented --- BasiliskII/src/Unix/bincue_unix.cpp | 28 ++++++++++++++++++++-------- BasiliskII/src/cdrom.cpp | 25 ++++++++++++------------- 2 files changed, 32 insertions(+), 21 deletions(-) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index ac7968531..71cb62db6 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -659,10 +659,9 @@ bool CDPause_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; if (cs && cs == player.cs) { - if (player.audiostatus == CDROM_AUDIO_PLAY) { - player.audiostatus = CDROM_AUDIO_PAUSED; - return true; - } + // doesn't matter if it was playing, just ensure it's now paused + player.audiostatus = CDROM_AUDIO_PAUSED; + return true; } return false; } @@ -686,11 +685,9 @@ bool CDResume_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; if (cs && cs == player.cs) { -// if (player.audiostatus == CDROM_AUDIO_PAUSED) { - // don't care if it was paused or not, just ensure it's playing after this call + // doesn't matter if it was paused, just ensure it now plays player.audiostatus = CDROM_AUDIO_PLAY; return true; -// } } return false; } @@ -769,7 +766,22 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool CDScan_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) { CueSheet *cs = (CueSheet *)fh; if (cs && cs == player.cs) { - // stub + uint8 scanrate = 8; // 8x scan default but could use different value or make configurable + + MSF msf; + msf.m = start_m; msf.s = start_s; msf.f = start_f; + int current_frame = MSFToFrames(msf); + + if (reverse) { + msf.s -= scanrate; + int goto_frame = MSFToFrames(msf); + player.audioposition -= (current_frame - goto_frame) * player.cs->raw_sector_size; + } + else { + msf.s += scanrate; + int goto_frame = MSFToFrames(msf); + player.audioposition += (goto_frame - current_frame) * player.cs->raw_sector_size; + } return true; } return false; diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index d4719c534..2e2247d7f 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -140,6 +140,7 @@ struct cdrom_drive_info { uint8 toc[804]; // TOC of currently inserted disk uint8 lead_out[3]; // MSF address of lead-out track uint8 stop_at[3]; // MSF address of audio play stopping point + uint8 start_at[3]; // MSF address of position set by track search or audio play uint8 play_mode; // Audio play mode uint8 play_order; // Play mode order (normal, shuffle, program) @@ -785,14 +786,13 @@ int16 CDROMControl(uint32 pb, uint32 dce) if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - uint8 start_m, start_s, start_f; - if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, start_m, start_s, start_f)) + if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, info->start_at[0], info->start_at[1], info->start_at[2])) return paramErr; info->play_mode = ReadMacInt8(pb + csParam + 9) & 0x0f; - if (!SysCDPlay(info->fh, start_m, start_s, start_f, info->stop_at[0], info->stop_at[1], info->stop_at[2])) + if (!SysCDPlay(info->fh, info->start_at[0], info->start_at[1], info->start_at[2], info->stop_at[0], info->stop_at[1], info->stop_at[2])) return paramErr; -// if (ReadMacInt16(pb + csParam + 6) == 0) // Hold -// SysCDPause(info->fh); + if (ReadMacInt16(pb + csParam + 6) == 0) // Hold + SysCDPause(info->fh); return noErr; } @@ -808,13 +808,13 @@ int16 CDROMControl(uint32 pb, uint32 dce) return paramErr; } else { // Given starting address - uint8 start_m, start_s, start_f; - if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, start_m, start_s, start_f)) - return paramErr; - info->play_mode = ReadMacInt8(pb + csParam + 9) & 0x0f; - if (!SysCDPlay(info->fh, start_m, start_s, start_f, info->stop_at[0], info->stop_at[1], info->stop_at[2])) + if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, info->start_at[0], info->start_at[1], info->start_at[2])) return paramErr; } + // Still need to process the AudioPlay command + info->play_mode = ReadMacInt8(pb + csParam + 9) & 0x0f; + if (!SysCDPlay(info->fh, info->start_at[0], info->start_at[1], info->start_at[2], info->stop_at[0], info->stop_at[1], info->stop_at[2])) + return paramErr; return noErr; case 105: // AudioPause @@ -890,11 +890,10 @@ int16 CDROMControl(uint32 pb, uint32 dce) if (ReadMacInt8(info->status + dsDiskInPlace) == 0) return offLinErr; - uint8 start_m, start_s, start_f; - if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, start_m, start_s, start_f)) + if (!position2msf(*info, ReadMacInt16(pb + csParam), ReadMacInt32(pb + csParam + 2), false, info->start_at[0], info->start_at[1], info->start_at[2])) return paramErr; - if (!SysCDScan(info->fh, start_m, start_s, start_f, ReadMacInt16(pb + csParam + 6) != 0)) { + if (!SysCDScan(info->fh, info->start_at[0], info->start_at[1], info->start_at[2], ReadMacInt16(pb + csParam + 6) != 0)) { return paramErr; } else { return noErr; From 28cd764a31d56f6037308db59b870d7251b8065e Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 10 Nov 2019 18:58:35 -0600 Subject: [PATCH 303/534] Turn off 3d sound CD emulation since only stereo output at the moment --- BasiliskII/src/cdrom.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 2e2247d7f..4a56607eb 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -569,7 +569,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) WriteMacInt32(pb + csParam + 4, 1); // true/false = sync/async break; case FOURCC('c','d','3','d'): - WriteMacInt32(pb + csParam + 4, 1); + WriteMacInt32(pb + csParam + 4, 0); break; } return noErr; @@ -1023,7 +1023,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) WriteMacInt32(pb + csParam + 4, 0); // Drive not available for VM break; case FOURCC('c', 'd', '3', 'd'): - WriteMacInt16(pb + csParam + 4, 1); + WriteMacInt16(pb + csParam + 4, 0); break; default: return statusErr; From f07cc695317178e60dec1a9ff4ddc275e14815b9 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 9 Dec 2019 10:37:18 +0900 Subject: [PATCH 304/534] BII: Reverted to JIT disabled --- .../BasiliskII.xcodeproj/project.pbxproj | 241 ++---------------- BasiliskII/src/MacOSX/config.h | 5 - README.md | 2 +- 3 files changed, 24 insertions(+), 224 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index ebc77c6d6..8eb0925c0 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -12,9 +12,14 @@ 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; 753252E91F535A0C0024025B /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252E51F5359040024025B /* build68k.c */; }; + 753252EE1F535DD10024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; 753253021F535F210024025B /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = 753253011F535F210024025B /* gencpu.c */; }; 753253151F5363400024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; 753253201F53650F0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; + 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; + 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; @@ -92,19 +97,7 @@ E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; - E46AB23323612B8F009A4A18 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */; }; - E46AB23423612B8F009A4A18 /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E46AB23223612B8F009A4A18 /* compemu_support.cpp */; }; - E47303B6235743B900A68BC2 /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; - E47303B7235743B900A68BC2 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; - E47897F62357441500558C48 /* gencomp.c in Sources */ = {isa = PBXBuildFile; fileRef = E47897F52357441500558C48 /* gencomp.c */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; - E4CB2C232361291800718BD3 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; - E4CB2C242361292800718BD3 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; - E4CB2C252361292800718BD3 /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; - E4CB2C262361292800718BD3 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; - E4CB2C272361292800718BD3 /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; - E4CB2C282361293500718BD3 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E47303A2235741B300A68BC2 /* compemu.cpp */; }; - E4CB2C2B2361293500718BD3 /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E47303A3235741B300A68BC2 /* compstbl.cpp */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; /* End PBXBuildFile section */ @@ -137,27 +130,6 @@ remoteGlobalIDString = 753253161F5363D20024025B; remoteInfo = RunGencpu; }; - E47303B3235743B900A68BC2 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 753253071F5360E30024025B; - remoteInfo = RunBuild68k; - }; - E47897F72357443300558C48 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = E47303B1235743B900A68BC2; - remoteInfo = gencomp; - }; - E47897F92357446D00558C48 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = E47303BE235743E200A68BC2; - remoteInfo = run_gencomp; - }; /* End PBXContainerItemProxy section */ /* Begin PBXCopyFilesBuildPhase section */ @@ -190,15 +162,6 @@ ); runOnlyForDeploymentPostprocessing = 1; }; - E47303B9235743B900A68BC2 /* CopyFiles */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = /usr/share/man/man1/; - dstSubfolderSpec = 0; - files = ( - ); - runOnlyForDeploymentPostprocessing = 1; - }; /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ @@ -413,13 +376,6 @@ E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; - E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_fpp.cpp; sourceTree = ""; }; - E46AB23223612B8F009A4A18 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; - E47303A1235741B300A68BC2 /* comptbl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencomp_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; - E47303A2235741B300A68BC2 /* compemu.cpp */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencomp_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - E47303A3235741B300A68BC2 /* compstbl.cpp */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.cpp.cpp; name = compstbl.cpp; path = gencomp_output/compstbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - E47303BD235743B900A68BC2 /* gencomp */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = gencomp; sourceTree = BUILT_PRODUCTS_DIR; }; - E47897F52357441500558C48 /* gencomp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencomp.c; path = compiler/gencomp.c; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; /* End PBXFileReference section */ @@ -450,13 +406,6 @@ ); runOnlyForDeploymentPostprocessing = 0; }; - E47303B8235743B900A68BC2 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - runOnlyForDeploymentPostprocessing = 0; - }; /* End PBXFrameworksBuildPhase section */ /* Begin PBXGroup section */ @@ -523,7 +472,6 @@ 753252FF1F535E5D0024025B /* generated src */ = { isa = PBXGroup; children = ( - E47303A0235741B300A68BC2 /* gencomp output */, 753253001F535E840024025B /* build68k output */, 7532532B1F53675E0024025B /* gencpu output */, ); @@ -536,21 +484,19 @@ 753252ED1F535DD10024025B /* defs68k.c */, ); name = "build68k output"; - path = build68k_output; - sourceTree = BUILT_PRODUCTS_DIR; + sourceTree = ""; }; 7532532B1F53675E0024025B /* gencpu output */ = { isa = PBXGroup; children = ( - 753253301F5368370024025B /* cputbl.h */, - 7532532D1F5368370024025B /* cpuemu.cpp */, 7532532C1F5368370024025B /* cpuemu_nf.cpp */, - 7532532F1F5368370024025B /* cpustbl.cpp */, + 7532532D1F5368370024025B /* cpuemu.cpp */, 7532532E1F5368370024025B /* cpustbl_nf.cpp */, + 7532532F1F5368370024025B /* cpustbl.cpp */, + 753253301F5368370024025B /* cputbl.h */, ); name = "gencpu output"; - path = gencpu_output; - sourceTree = BUILT_PRODUCTS_DIR; + sourceTree = ""; }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; @@ -569,9 +515,9 @@ 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, 753252DA1F5358D30024025B /* build68k */, 753252F31F535E1E0024025B /* gencpu */, - E47303BD235743B900A68BC2 /* gencomp */, ); name = Products; + path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { @@ -675,7 +621,6 @@ 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, 7539E0B31F23B25A006B2DF2 /* fpu */, 753253011F535F210024025B /* gencpu.c */, - E47897F52357441500558C48 /* gencomp.c */, 7539E0C81F23B25A006B2DF2 /* m68k.h */, 7539E0C91F23B25A006B2DF2 /* memory.cpp */, 7539E0CA1F23B25A006B2DF2 /* memory.h */, @@ -696,8 +641,6 @@ children = ( 7539E0AB1F23B25A006B2DF2 /* compemu.h */, 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, - E46AB23123612B8F009A4A18 /* compemu_fpp.cpp */, - E46AB23223612B8F009A4A18 /* compemu_support.cpp */, ); path = compiler; sourceTree = ""; @@ -845,17 +788,6 @@ path = ../dummy; sourceTree = ""; }; - E47303A0235741B300A68BC2 /* gencomp output */ = { - isa = PBXGroup; - children = ( - E47303A1235741B300A68BC2 /* comptbl.h */, - E47303A2235741B300A68BC2 /* compemu.cpp */, - E47303A3235741B300A68BC2 /* compstbl.cpp */, - ); - name = "gencomp output"; - path = gencomp_output; - sourceTree = BUILT_PRODUCTS_DIR; - }; /* End PBXGroup section */ /* Begin PBXLegacyTarget section */ @@ -889,21 +821,6 @@ passBuildSettingsInEnvironment = 1; productName = RunGencpu; }; - E47303BE235743E200A68BC2 /* run_gencomp */ = { - isa = PBXLegacyTarget; - buildArgumentsString = "$(ACTION)"; - buildConfigurationList = E47303C1235743E200A68BC2 /* Build configuration list for PBXLegacyTarget "run_gencomp" */; - buildPhases = ( - ); - buildToolPath = "$(PROJECT_DIR)/run_gencomp_for_xcode.sh"; - buildWorkingDirectory = ""; - dependencies = ( - E47897F82357443300558C48 /* PBXTargetDependency */, - ); - name = run_gencomp; - passBuildSettingsInEnvironment = 1; - productName = RunGencpu; - }; /* End PBXLegacyTarget section */ /* Begin PBXNativeTarget section */ @@ -956,31 +873,12 @@ ); dependencies = ( 7532531F1F5364170024025B /* PBXTargetDependency */, - E47897FA2357446D00558C48 /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; productReference = 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */; productType = "com.apple.product-type.application"; }; - E47303B1235743B900A68BC2 /* gencomp */ = { - isa = PBXNativeTarget; - buildConfigurationList = E47303BA235743B900A68BC2 /* Build configuration list for PBXNativeTarget "gencomp" */; - buildPhases = ( - E47303B4235743B900A68BC2 /* Sources */, - E47303B8235743B900A68BC2 /* Frameworks */, - E47303B9235743B900A68BC2 /* CopyFiles */, - ); - buildRules = ( - ); - dependencies = ( - E47303B2235743B900A68BC2 /* PBXTargetDependency */, - ); - name = gencomp; - productName = gencpu; - productReference = E47303BD235743B900A68BC2 /* gencomp */; - productType = "com.apple.product-type.tool"; - }; /* End PBXNativeTarget section */ /* Begin PBXProject section */ @@ -1028,10 +926,8 @@ 7539DFB11F23B17E006B2DF2 /* BasiliskII */, 753252D91F5358D30024025B /* build68k */, 753252F21F535E1E0024025B /* gencpu */, - E47303B1235743B900A68BC2 /* gencomp */, 753253071F5360E30024025B /* run_build68k */, 753253161F5363D20024025B /* run_gencpu */, - E47303BE235743E200A68BC2 /* run_gencomp */, ); }; /* End PBXProject section */ @@ -1088,13 +984,6 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( - E4CB2C282361293500718BD3 /* compemu.cpp in Sources */, - E4CB2C2B2361293500718BD3 /* compstbl.cpp in Sources */, - E4CB2C242361292800718BD3 /* cpuemu.cpp in Sources */, - E4CB2C252361292800718BD3 /* cpuemu_nf.cpp in Sources */, - E4CB2C262361292800718BD3 /* cpustbl.cpp in Sources */, - E4CB2C272361292800718BD3 /* cpustbl_nf.cpp in Sources */, - E4CB2C232361291800718BD3 /* defs68k.c in Sources */, 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, @@ -1105,13 +994,16 @@ E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, + 753252EE1F535DD10024025B /* defs68k.c in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, + 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, + 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, @@ -1125,13 +1017,14 @@ 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, E413D93220D260BC00E437D8 /* if.c in Sources */, + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, - E46AB23323612B8F009A4A18 /* compemu_fpp.cpp in Sources */, + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, @@ -1155,7 +1048,6 @@ E413D92220D260BC00E437D8 /* mbuf.c in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, E413D93020D260BC00E437D8 /* ip_input.c in Sources */, - E46AB23423612B8F009A4A18 /* compemu_support.cpp in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, @@ -1176,16 +1068,6 @@ ); runOnlyForDeploymentPostprocessing = 0; }; - E47303B4235743B900A68BC2 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - E47897F62357441500558C48 /* gencomp.c in Sources */, - E47303B6235743B900A68BC2 /* readcpu.cpp in Sources */, - E47303B7235743B900A68BC2 /* defs68k.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; /* End PBXSourcesBuildPhase section */ /* Begin PBXTargetDependency section */ @@ -1209,21 +1091,6 @@ target = 753253161F5363D20024025B /* run_gencpu */; targetProxy = 7532531E1F5364170024025B /* PBXContainerItemProxy */; }; - E47303B2235743B900A68BC2 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 753253071F5360E30024025B /* run_build68k */; - targetProxy = E47303B3235743B900A68BC2 /* PBXContainerItemProxy */; - }; - E47897F82357443300558C48 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = E47303B1235743B900A68BC2 /* gencomp */; - targetProxy = E47897F72357443300558C48 /* PBXContainerItemProxy */; - }; - E47897FA2357446D00558C48 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = E47303BE235743E200A68BC2 /* run_gencomp */; - targetProxy = E47897F92357446D00558C48 /* PBXContainerItemProxy */; - }; /* End PBXTargetDependency section */ /* Begin PBXVariantGroup section */ @@ -1335,6 +1202,8 @@ GCC_NO_COMMON_BLOCKS = YES; GCC_OPTIMIZATION_LEVEL = 0; GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, "USE_XCODE=1", "DEBUG=1", ); @@ -1388,7 +1257,11 @@ ENABLE_STRICT_OBJC_MSGSEND = YES; GCC_C_LANGUAGE_STANDARD = gnu99; GCC_NO_COMMON_BLOCKS = YES; - GCC_PREPROCESSOR_DEFINITIONS = "USE_XCODE=1"; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + ); GCC_WARN_64_TO_32_BIT_CONVERSION = YES; GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; GCC_WARN_UNDECLARED_SELECTOR = YES; @@ -1431,10 +1304,6 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1443,7 +1312,6 @@ ../MacOSX, ../include, ../uae_cpu, - ../uae_cpu/compiler, ../Unix, ../slirp, ); @@ -1453,10 +1321,6 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x1000, - ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; @@ -1492,10 +1356,6 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 3; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1504,7 +1364,6 @@ ../MacOSX, ../include, ../uae_cpu, - ../uae_cpu/compiler, ../Unix, ../slirp, ); @@ -1513,10 +1372,6 @@ LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x1000, - ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; @@ -1526,38 +1381,6 @@ }; name = Release; }; - E47303BB235743B900A68BC2 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - E47303BC235743B900A68BC2 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; - E47303C2235743E200A68BC2 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - E47303C3235743E200A68BC2 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; /* End XCBuildConfiguration section */ /* Begin XCConfigurationList section */ @@ -1615,24 +1438,6 @@ defaultConfigurationIsVisible = 0; defaultConfigurationName = Release; }; - E47303BA235743B900A68BC2 /* Build configuration list for PBXNativeTarget "gencomp" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - E47303BB235743B900A68BC2 /* Debug */, - E47303BC235743B900A68BC2 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - E47303C1235743E200A68BC2 /* Build configuration list for PBXLegacyTarget "run_gencomp" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - E47303C2235743E200A68BC2 /* Debug */, - E47303C3235743E200A68BC2 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; /* End XCConfigurationList section */ }; rootObject = 7539DFAA1F23B17E006B2DF2 /* Project object */; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index cb14154b5..9b853b472 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -815,11 +815,6 @@ don't define. */ /* #undef uintmax_t */ -#define DIRECT_ADDRESSING 1 -#define USE_JIT 1 -#define USE_JIT_FPU -#define X86_64_ASSEMBLY -#define OPTIMIZED_FLAGS #define FPU_IEEE #endif diff --git a/README.md b/README.md index e8701c347..24dedbe68 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS 64-bit JIT +macOS 64-bit --- Linux 32-bit JIT MinGW 32-bit JIT ``` From 45f57ceca10bcc53751b6f1e43d5aa13cfdf4112 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Tue, 10 Dec 2019 11:06:33 +0900 Subject: [PATCH 305/534] Update README.md --- README.md | 1 + 1 file changed, 1 insertion(+) diff --git a/README.md b/README.md index 24dedbe68..4288062a5 100644 --- a/README.md +++ b/README.md @@ -16,6 +16,7 @@ These builds need to be installed SDL2.0.10+ framework/library. ##### macOS 1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj 1. Set Build Configuration to Release +1. If building with Xcode10+, set File -> Project Settings -> Build System to Legacy Build System. 1. Build ##### Linux(x86) From 75b333f805251cb8118da27398452adf879b7be2 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Mon, 23 Dec 2019 14:52:00 +0100 Subject: [PATCH 306/534] Add FP frsqrte instruction emulation Also renamed the frsqrt opcode to frsqrte to match the manuals (the vector version is also an estimate) --- .../src/Unix/dyngen_precompiled/ppc-execute-impl.cpp | 3 ++- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp | 7 ++++++- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp | 1 + SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp | 1 + SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp | 2 +- 5 files changed, 11 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp index 07706ac9d..a01eb54c8 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp @@ -57,6 +57,7 @@ template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_round(uint32); +template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); @@ -258,7 +259,7 @@ template void powerpc_cpu::execute_vector_arith, operand_vD_V16QI, operand_vA_V16QI, operand_vB_V16QI, operand_vC_NONE, fake_bit_field< bool, false >, 0 >(uint32); template void powerpc_cpu::execute_vector_arith, operand_vD_V8HI, operand_vA_V8HI, operand_vB_V8HI, operand_vC_NONE, fake_bit_field< bool, false >, 0 >(uint32); template void powerpc_cpu::execute_vector_arith, operand_vD_V4SI, operand_vA_V4SI, operand_vB_V4SI, operand_vC_NONE, fake_bit_field< bool, false >, 0 >(uint32); -template void powerpc_cpu::execute_vector_arith, 0 >(uint32); +template void powerpc_cpu::execute_vector_arith, 0 >(uint32); template void powerpc_cpu::execute_vector_arith, 0 >(uint32); template void powerpc_cpu::execute_vector_shift<-1>(uint32); template void powerpc_cpu::execute_vector_arith, operand_vD_V16QI, operand_vA_V16QI, operand_vB_V16QI, operand_vC_NONE, fake_bit_field< bool, false >, 0 >(uint32); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp index 972f26ec6..08916087a 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp @@ -475,6 +475,11 @@ const powerpc_cpu::instr_info_t powerpc_cpu::powerpc_ii_table[] = { PPC_I(FRSP), X_form, 63, 12, CFLOW_NORMAL }, + { "frsqrte", + EXECUTE_FP_ARITH(double, frsqrte, RD, RB, NONE, NONE, RC_BIT_G, false), + PPC_I(FRSQRTE), + A_form, 63, 26, CFLOW_NORMAL + }, { "fsel", EXECUTE_FP_ARITH(double, fsel, RD, RA, RC, RB, RC_BIT_G, false), PPC_I(FSEL), @@ -1551,7 +1556,7 @@ const powerpc_cpu::instr_info_t powerpc_cpu::powerpc_ii_table[] = { VX_form, 4, 132, CFLOW_NORMAL }, { "vrsqrtefp", - EXECUTE_VECTOR_ARITH(frsqrt, V4SF, NONE, V4SF, NONE), + EXECUTE_VECTOR_ARITH(frsqrte, V4SF, NONE, V4SF, NONE), PPC_I(VRSQRTEFP), VX_form, 4, 330, CFLOW_NORMAL }, diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp index 7f9e9f0bb..41d57c54f 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp @@ -481,6 +481,7 @@ DEFINE_OP(fmov_FD_F2, FD_dw = F2_dw); DEFINE_OP(fabs_FD_F0, FD = do_fabs(F0)); DEFINE_OP(fneg_FD_F0, FD = do_fneg(F0)); DEFINE_OP(fnabs_FD_F0, FD = do_fnabs(F0)); +DEFINE_OP(frsqrte_FD_F0, FD = do_frsqrte(F0)); DEFINE_OP(fadd_FD_F0_F1, FD = do_fadd(F0, F1)); DEFINE_OP(fsub_FD_F0_F1, FD = do_fsub(F0, F1)); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp index c42b61d18..b24042b3b 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp @@ -100,6 +100,7 @@ enum powerpc_instruction { PPC_I(FNMSUB), PPC_I(FNMSUBS), PPC_I(FRSP), + PPC_I(FRSQRTE), PPC_I(FSEL), PPC_I(FSUB), PPC_I(FSUBS), diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp index 47b56493e..50719ffa1 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-operations.hpp @@ -153,7 +153,7 @@ DEFINE_OP2(fsubs, float, x - y); DEFINE_OP1(exp2, float, exp2f(x)); DEFINE_OP1(log2, float, log2f(x)); DEFINE_OP1(fres, float, 1 / x); -DEFINE_OP1(frsqrt, float, 1 / sqrt(x)); +DEFINE_OP1(frsqrte, float, 1 / sqrt(x)); DEFINE_OP1(frsim, float, floorf(x)); DEFINE_OP1(frsin, float, roundf(x)); DEFINE_OP1(frsip, float, ceilf(x)); From 9817848482fd4f918d8e1684d470c547fe7c7845 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Thu, 26 Dec 2019 13:53:03 +0100 Subject: [PATCH 307/534] frsqrte updates fpscr --- SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp | 2 +- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp index a01eb54c8..41fe83a86 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp @@ -57,7 +57,7 @@ template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_round(uint32); -template void powerpc_cpu::execute_fp_arith(uint32); +template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp index 08916087a..6281b01b5 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp @@ -476,7 +476,7 @@ const powerpc_cpu::instr_info_t powerpc_cpu::powerpc_ii_table[] = { X_form, 63, 12, CFLOW_NORMAL }, { "frsqrte", - EXECUTE_FP_ARITH(double, frsqrte, RD, RB, NONE, NONE, RC_BIT_G, false), + EXECUTE_FP_ARITH(double, frsqrte, RD, RB, NONE, NONE, RC_BIT_G, true), PPC_I(FRSQRTE), A_form, 63, 26, CFLOW_NORMAL }, From a84735d3e9aaf9a48fe31ea603bf0373d4734aca Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Mon, 23 Dec 2019 18:37:15 +0100 Subject: [PATCH 308/534] Add FP fres instruction emulation --- SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp | 1 + SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp | 5 +++++ SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp | 1 + 3 files changed, 7 insertions(+) diff --git a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp index 41fe83a86..89d2c3296 100644 --- a/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp +++ b/SheepShaver/src/Unix/dyngen_precompiled/ppc-execute-impl.cpp @@ -57,6 +57,7 @@ template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_round(uint32); +template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); template void powerpc_cpu::execute_fp_arith(uint32); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp index 6281b01b5..6c5c7ad92 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-decode.cpp @@ -470,6 +470,11 @@ const powerpc_cpu::instr_info_t powerpc_cpu::powerpc_ii_table[] = { PPC_I(FNMSUBS), A_form, 59, 30, CFLOW_NORMAL }, + { "fres", + EXECUTE_FP_ARITH(double, fres, RD, RB, NONE, NONE, RC_BIT_G, true), + PPC_I(FRES), + A_form, 59, 24, CFLOW_NORMAL + }, { "frsp", EXECUTE_1(fp_round, RC_BIT_G), PPC_I(FRSP), diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp index b24042b3b..6e5b98910 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-instructions.hpp @@ -99,6 +99,7 @@ enum powerpc_instruction { PPC_I(FNMADDS), PPC_I(FNMSUB), PPC_I(FNMSUBS), + PPC_I(FRES), PPC_I(FRSP), PPC_I(FRSQRTE), PPC_I(FSEL), From 281a8a9f686a3c1c8d73fc863849ba42fc3332f2 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jan 2020 15:50:53 -0600 Subject: [PATCH 309/534] Added support for mounting multiple bin/cue files --- BasiliskII/src/Unix/bincue_unix.cpp | 322 ++++++++++++++++------------ 1 file changed, 179 insertions(+), 143 deletions(-) diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/Unix/bincue_unix.cpp index 71cb62db6..bffee0dee 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/Unix/bincue_unix.cpp @@ -41,6 +41,8 @@ #include #include +#include + #ifdef OSX_CORE_AUDIO #include "../MacOSX/MacOSX_sound_if.h" static int bincue_core_audio_callback(void); @@ -118,6 +120,7 @@ typedef struct { uint8 volume_right; // CD player volume (right) uint8 volume_mono; // CD player single-channel volume loff_t fileoffset; // offset from file beginning to audiostart + bool audio_enabled = false; // audio initialized for this player? #ifdef OSX_CORE_AUDIO OSXsoundOutput soundoutput; #endif @@ -137,15 +140,22 @@ typedef struct { static unsigned int totalPregap; static unsigned int prestart; -// Audio System State +// Audio System Variables -static bool audio_enabled = false; static uint8 silence_byte; -// CD Player state. Note only one player is supported ! +// CD Player state; multiple players supported through vectors + +std::vector players; -static CDPlayer player; +CDPlayer* CSToPlayer(CueSheet* cs) +{ + for (std::vector::iterator it = players.begin(); it != players.end(); ++it) + if (cs == (*it)->cs) // look for cuesheet matching existing player + return *it; + return NULL; // if no player with the cuesheet found, return null player +} static void FramesToMSF(unsigned int frames, MSF *msf) { @@ -456,40 +466,51 @@ static bool LoadCueSheet(const char *cuefile, CueSheet *cs) void *open_bincue(const char *name) { - CueSheet *cs; - - if (player.cs == NULL) { - cs = (CueSheet *) malloc(sizeof(CueSheet)); - if (!cs) { - D(bug("malloc failed\n")); - return NULL; - } + CueSheet *cs = (CueSheet *) malloc(sizeof(CueSheet)); + if (!cs) { + D(bug("malloc failed\n")); + return NULL; + } - if (LoadCueSheet(name, cs)) { - player.cs = cs; - player.volume_left = 0; - player.volume_right = 0; - player.volume_mono = 0; + if (LoadCueSheet(name, cs)) { + CDPlayer *player = (CDPlayer *) malloc(sizeof(CDPlayer)); + player->cs = cs; + player->volume_left = 0; + player->volume_right = 0; + player->volume_mono = 0; #ifdef OSX_CORE_AUDIO - audio_enabled = true; + player->audio_enabled = true; #endif - if (audio_enabled) - player.audiostatus = CDROM_AUDIO_NO_STATUS; - else - player.audiostatus = CDROM_AUDIO_INVALID; - player.audiofh = dup(cs->binfh); - return cs; - } + if (player->audio_enabled) + player->audiostatus = CDROM_AUDIO_NO_STATUS; else - free(cs); + player->audiostatus = CDROM_AUDIO_INVALID; + player->audiofh = dup(cs->binfh); + + // add to list of available CD players + players.push_back(player); + + return cs; } + else + free(cs); + return NULL; } void close_bincue(void *fh) { - - + CueSheet *cs = (CueSheet *) fh; + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { + free(cs); +#ifdef USE_SDL_AUDIO + if (player->stream) // if audiostream has been opened, free it as well + free(player->stream); +#endif + free(player); + } } /* @@ -610,20 +631,22 @@ bool readtoc_bincue(void *fh, unsigned char *toc) bool GetPosition_bincue(void *fh, uint8 *pos) { CueSheet *cs = (CueSheet *) fh; - if (cs && player.cs == cs) { + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { MSF abs, rel; - int fpos = player.audioposition / cs->raw_sector_size + player.audiostart; + int fpos = player->audioposition / cs->raw_sector_size + player->audiostart; int trackno = PositionToTrack(cs, fpos); - if (!audio_enabled) + if (!(player->audio_enabled)) return false; FramesToMSF(fpos, &abs); if (trackno < cs->tcnt) { // compute position relative to start of frame - unsigned int position = player.audioposition/cs->raw_sector_size + - player.audiostart - player.cs->tracks[trackno].start; + unsigned int position = player->audioposition/cs->raw_sector_size + + player->audiostart - player->cs->tracks[trackno].start; FramesToMSF(position, &rel); } @@ -631,7 +654,7 @@ bool GetPosition_bincue(void *fh, uint8 *pos) FramesToMSF(0, &rel); *pos++ = 0; - *pos++ = player.audiostatus; + *pos++ = player->audiostatus; *pos++ = 0; *pos++ = 12; // Sub-Q data length *pos++ = 0; @@ -658,9 +681,11 @@ bool GetPosition_bincue(void *fh, uint8 *pos) bool CDPause_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; - if (cs && cs == player.cs) { + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { // doesn't matter if it was playing, just ensure it's now paused - player.audiostatus = CDROM_AUDIO_PAUSED; + player->audiostatus = CDROM_AUDIO_PAUSED; return true; } return false; @@ -669,13 +694,14 @@ bool CDPause_bincue(void *fh) bool CDStop_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; - - if (cs && cs == player.cs) { + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { #ifdef OSX_CORE_AUDIO - player.soundoutput.stop(); + player->soundoutput.stop(); #endif - if (player.audiostatus != CDROM_AUDIO_INVALID) - player.audiostatus = CDROM_AUDIO_NO_STATUS; + if (player->audiostatus != CDROM_AUDIO_INVALID) + player->audiostatus = CDROM_AUDIO_NO_STATUS; return true; } return false; @@ -684,9 +710,11 @@ bool CDStop_bincue(void *fh) bool CDResume_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; - if (cs && cs == player.cs) { + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { // doesn't matter if it was paused, just ensure it now plays - player.audiostatus = CDROM_AUDIO_PLAY; + player->audiostatus = CDROM_AUDIO_PLAY; return true; } return false; @@ -695,8 +723,10 @@ bool CDResume_bincue(void *fh) bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) { - CueSheet *cs = (CueSheet *)fh; - if (cs && cs == player.cs) { + CueSheet *cs = (CueSheet *) fh; + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { int track; MSF msf; @@ -704,42 +734,42 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, SDL_LockAudio(); #endif - player.audiostatus = CDROM_AUDIO_NO_STATUS; + player->audiostatus = CDROM_AUDIO_NO_STATUS; - player.audiostart = (start_m * 60 * CD_FRAMES) + + player->audiostart = (start_m * 60 * CD_FRAMES) + (start_s * CD_FRAMES) + start_f; - player.audioend = (end_m * 60 * CD_FRAMES) + (end_s * CD_FRAMES) + end_f; + player->audioend = (end_m * 60 * CD_FRAMES) + (end_s * CD_FRAMES) + end_f; - track = PositionToTrack(player.cs, player.audiostart); + track = PositionToTrack(player->cs, player->audiostart); - if (track < player.cs->tcnt) { - player.audioposition = 0; + if (track < player->cs->tcnt) { + player->audioposition = 0; // here we need to compute silence - if (player.audiostart - player.cs->tracks[track].start > - player.cs->tracks[track].pregap) - player.silence = 0; + if (player->audiostart - player->cs->tracks[track].start > + player->cs->tracks[track].pregap) + player->silence = 0; else - player.silence = (player.cs->tracks[track].pregap - - player.audiostart + - player.cs->tracks[track].start) * cs->raw_sector_size; + player->silence = (player->cs->tracks[track].pregap - + player->audiostart + + player->cs->tracks[track].start) * cs->raw_sector_size; - player.fileoffset = player.cs->tracks[track].fileoffset; + player->fileoffset = player->cs->tracks[track].fileoffset; - D(bug("file offset %d\n", (unsigned int) player.fileoffset)); + D(bug("file offset %d\n", (unsigned int) player->fileoffset)); // fix up file offset if beyond the silence bytes - if (!player.silence) // not at the beginning - player.fileoffset += (player.audiostart - - player.cs->tracks[track].start - - player.cs->tracks[track].pregap) * cs->raw_sector_size; + if (!player->silence) // not at the beginning + player->fileoffset += (player->audiostart - + player->cs->tracks[track].start - + player->cs->tracks[track].pregap) * cs->raw_sector_size; - FramesToMSF(player.cs->tracks[track].start, &msf); + FramesToMSF(player->cs->tracks[track].start, &msf); D(bug("CDPlay_bincue track %02d start %02d:%02d:%02d silence %d", - player.cs->tracks[track].number, msf.m, msf.s, msf.f, - player.silence/cs->raw_sector_size)); + player->cs->tracks[track].number, msf.m, msf.s, msf.f, + player->silence/cs->raw_sector_size)); D(bug(" Stop %02u:%02u:%02u\n", end_m, end_s, end_f)); } else @@ -749,13 +779,13 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, SDL_UnlockAudio(); #endif - if (audio_enabled) { - player.audiostatus = CDROM_AUDIO_PLAY; + if (player->audio_enabled) { + player->audiostatus = CDROM_AUDIO_PLAY; #ifdef OSX_CORE_AUDIO D(bug("starting os x sound")); - player.soundoutput.setCallback(bincue_core_audio_callback); + player->soundoutput.setCallback(bincue_core_audio_callback); // should be from current track ! - player.soundoutput.start(16, 2, 44100); + player->soundoutput.start(16, 2, 44100); #endif return true; } @@ -764,8 +794,10 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, } bool CDScan_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) { - CueSheet *cs = (CueSheet *)fh; - if (cs && cs == player.cs) { + CueSheet *cs = (CueSheet *) fh; + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { uint8 scanrate = 8; // 8x scan default but could use different value or make configurable MSF msf; @@ -775,12 +807,12 @@ bool CDScan_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool r if (reverse) { msf.s -= scanrate; int goto_frame = MSFToFrames(msf); - player.audioposition -= (current_frame - goto_frame) * player.cs->raw_sector_size; + player->audioposition -= (current_frame - goto_frame) * player->cs->raw_sector_size; } else { msf.s += scanrate; int goto_frame = MSFToFrames(msf); - player.audioposition += (goto_frame - current_frame) * player.cs->raw_sector_size; + player->audioposition += (goto_frame - current_frame) * player->cs->raw_sector_size; } return true; } @@ -788,26 +820,29 @@ bool CDScan_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, bool r } void CDSetVol_bincue(void* fh, uint8 left, uint8 right) { - CueSheet *cs = (CueSheet *)fh; - if (cs && cs == player.cs) { + CueSheet *cs = (CueSheet *) fh; + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { // Convert from classic Mac's 0-255 to 0-128; // calculate mono mix as well in place of panning - player.volume_left = (left*128)/255; - player.volume_right = (right*128)/255; - player.volume_mono = (player.volume_left + player.volume_right)/2; // use avg + player->volume_left = (left*128)/255; + player->volume_right = (right*128)/255; + player->volume_mono = (player->volume_left + player->volume_right)/2; // use avg } } void CDGetVol_bincue(void* fh, uint8* left, uint8* right) { - CueSheet *cs = (CueSheet *)fh; - if (cs && cs == player.cs) { - // Convert from 0-128 to 0-255 scale - *left = (player.volume_left*255)/128; - *right = (player.volume_right*255)/128; + CueSheet *cs = (CueSheet *) fh; + CDPlayer *player = CSToPlayer(cs); + + if (cs && player) { // Convert from 0-128 to 0-255 scale + *left = (player->volume_left*255)/128; + *right = (player->volume_right*255)/128; } } -static uint8 *fill_buffer(int stream_len) +static uint8 *fill_buffer(int stream_len, CDPlayer* player) { static uint8 *buf = 0; static int bufsize = 0; @@ -826,44 +861,44 @@ static uint8 *fill_buffer(int stream_len) } memset(buf, silence_byte, stream_len); + + if (player->audiostatus == CDROM_AUDIO_PLAY) { + int remaining_silence = player->silence - player->audioposition; - if (player.audiostatus == CDROM_AUDIO_PLAY) { - int remaining_silence = player.silence - player.audioposition; - - if (player.audiostart + player.audioposition/player.cs->raw_sector_size - >= player.audioend) { - player.audiostatus = CDROM_AUDIO_COMPLETED; + if (player->audiostart + player->audioposition/player->cs->raw_sector_size + >= player->audioend) { + player->audiostatus = CDROM_AUDIO_COMPLETED; return buf; } if (remaining_silence >= stream_len) { - player.audioposition += stream_len; + player->audioposition += stream_len; return buf; } if (remaining_silence > 0) { offset += remaining_silence; - player.audioposition += remaining_silence; + player->audioposition += remaining_silence; } int ret = 0; - int available = ((player.audioend - player.audiostart) * - player.cs->raw_sector_size) - player.audioposition; + int available = ((player->audioend - player->audiostart) * + player->cs->raw_sector_size) - player->audioposition; if (available > (stream_len - offset)) available = stream_len - offset; - if (lseek(player.audiofh, - player.fileoffset + player.audioposition - player.silence, + if (lseek(player->audiofh, + player->fileoffset + player->audioposition - player->silence, SEEK_SET) < 0) return NULL; if (available < 0) { - player.audioposition += available; // correct end !; + player->audioposition += available; // correct end !; available = 0; } - if ((ret = read(player.audiofh, &buf[offset], available)) >= 0) { - player.audioposition += ret; + if ((ret = read(player->audiofh, &buf[offset], available)) >= 0) { + player->audioposition += ret; offset += ret; available -= ret; } @@ -871,10 +906,10 @@ static uint8 *fill_buffer(int stream_len) while (offset < stream_len) { buf[offset++] = silence_byte; if (available-- > 0){ - player.audioposition++; + player->audioposition++; } } - } + } return buf; } @@ -882,62 +917,63 @@ static uint8 *fill_buffer(int stream_len) #ifdef USE_SDL_AUDIO void MixAudio_bincue(uint8 *stream, int stream_len, int volume) { -// if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { -// uint8 *buf = fill_buffer(stream_len); -// if (buf) -// SDL_MixAudio(stream, buf, stream_len, volume); -// } - if (audio_enabled && (player.audiostatus == CDROM_AUDIO_PLAY)) { - uint8 *buf = fill_buffer(stream_len); - if (buf) - SDL_AudioStreamPut(player.stream, buf, stream_len); - int avail = SDL_AudioStreamAvailable(player.stream); - if (avail >= stream_len) { - uint8 converted[stream_len]; - SDL_AudioStreamGet(player.stream, converted, stream_len); - SDL_MixAudio(stream, converted, stream_len, player.volume_mono); + for (std::vector::iterator it = players.begin(); it != players.end(); ++it) + { + CDPlayer *player = *it; + + if (player->audio_enabled && (player->audiostatus == CDROM_AUDIO_PLAY)) { + uint8 *buf = fill_buffer(stream_len, player); + if (buf) + SDL_AudioStreamPut(player->stream, buf, stream_len); + int avail = SDL_AudioStreamAvailable(player->stream); + if (avail >= stream_len) { + uint8 converted[stream_len]; + SDL_AudioStreamGet(player->stream, converted, stream_len); + SDL_MixAudio(stream, converted, stream_len, player->volume_mono); + } } } } void OpenAudio_bincue(int freq, int format, int channels, uint8 silence, int volume) { -// audio_enabled = true; -// silence_byte = silence; - // set player volume based on SDL volume - player.volume_left = player.volume_right = player.volume_mono = volume; - // audio stream handles converting cd audio to destination output - player.stream = SDL_NewAudioStream(AUDIO_S16LSB, 2, 44100, format, channels, freq); - if (player.stream == NULL) { - D(bug("Failed to open CD player audio stream using SDL!")); - } - else { - audio_enabled = true; - silence_byte = silence; + // setup silence at init + silence_byte = silence; + + // init players + for (std::vector::iterator it = players.begin(); it != players.end(); ++it) + { + CDPlayer *player = *it; + + // set player volume based on SDL volume + player->volume_left = player->volume_right = player->volume_mono = volume; + // audio stream handles converting cd audio to destination output + player->stream = SDL_NewAudioStream(AUDIO_S16LSB, 2, 44100, format, channels, freq); + if (player->stream == NULL) { + D(bug("Failed to open CD player audio stream using SDL!")); + } + else { + player->audio_enabled = true; + } } -// audio_enabled = true; -// silence_byte = silence; -// if (freq == 44100 && format == AUDIO_S16MSB && channels == 2) { -// audio_enabled = true; -// silence_byte = silence; -// } -// else { -// D(bug("unexpected frequency %d , format %d, or channels %d\n", -// freq, format, channels)); -// } } #endif #ifdef OSX_CORE_AUDIO static int bincue_core_audio_callback(void) { - int frames = player.soundoutput.bufferSizeFrames(); - uint8 *buf = fill_buffer(frames*4); + for (std::vector::iterator it = players.begin(); it != players.end(); ++it) + { + CDPlayer *player = *it; + + int frames = player->soundoutput.bufferSizeFrames(); + uint8 *buf = fill_buffer(frames*4); - // D(bug("Audio request %d\n", stream_len)); + // D(bug("Audio request %d\n", stream_len)); - player.soundoutput.sendAudioBuffer((void *) buf, (buf ? frames : 0)); + player->soundoutput.sendAudioBuffer((void *) buf, (buf ? frames : 0)); - return 1; + return 1; + } } #endif From 35439819d35140291295312e34f9cadd4245f5bc Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Wed, 8 Jan 2020 03:02:08 -0600 Subject: [PATCH 310/534] Best guess audio CD from data calls to allow multiple discs and testing different interface identifiers --- BasiliskII/src/cdrom.cpp | 28 +++++++++++++++++++++------- SheepShaver/src/rom_patches.cpp | 14 +++++++------- 2 files changed, 28 insertions(+), 14 deletions(-) diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 4a56607eb..809be596b 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -153,6 +153,8 @@ struct cdrom_drive_info { typedef vector drive_vec; static drive_vec drives; +int last_drive_num; // track last drive called to support multiple audio CDs + // Icon address (Mac address space, set by PatchROM()) uint32 CDROMIconAddr; @@ -168,8 +170,10 @@ static drive_vec::iterator get_drive_info(int num) { drive_vec::iterator info, end = drives.end(); for (info = drives.begin(); info != end; ++info) { - if (info->num == num) + if (info->num == num) { + last_drive_num = num; return info; + } } return info; } @@ -302,6 +306,13 @@ void CDROMInit(void) if (fh) drives.push_back(cdrom_drive_info(fh)); } + + if (!drives.empty()) { // set to first drive by default + last_drive_num = drives.begin()->num; + } + else { + last_drive_num = 0; + } } @@ -516,7 +527,9 @@ int16 CDROMControl(uint32 pb, uint32 dce) if (drives.empty()) { return nsDrvErr; } else { - info = drives.begin(); // This is needed for Apple's Audio CD program + // Audio calls tend to end up without correct reference + // Real mac would just play first disc, but we can guess correct one from last data call + info = get_drive_info(last_drive_num); } } @@ -563,7 +576,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) break; case FOURCC('i','n','t','f'): case FOURCC('d','A','P','I'): - WriteMacInt32(pb + csParam + 4, FOURCC('s','c','s','i')); + WriteMacInt32(pb + csParam + 4, FOURCC('a','t','p','i')); break; case FOURCC('s','y','n','c'): WriteMacInt32(pb + csParam + 4, 1); // true/false = sync/async @@ -994,7 +1007,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) break; case FOURCC('i','n','t','f'): // Interface type // WriteMacInt32(pb + csParam + 4, EMULATOR_ID_4); - WriteMacInt32(pb + csParam + 4, FOURCC('s','c','s','i')); + WriteMacInt32(pb + csParam + 4, FOURCC('a','t','p','i')); break; case FOURCC('s','y','n','c'): // Only synchronous operation? WriteMacInt32(pb + csParam + 4, 0x01000000); @@ -1045,10 +1058,11 @@ int16 CDROMStatus(uint32 pb, uint32 dce) // Drive valid? if (info == drives.end()) { - if (drives.empty()) + if (drives.empty()) { return nsDrvErr; - else - info = drives.begin(); // This is needed for Apple's Audio CD program + } else { + info = get_drive_info(last_drive_num); + } } // Drive-specific codes diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp index ef51c8286..8f15b8052 100644 --- a/SheepShaver/src/rom_patches.cpp +++ b/SheepShaver/src/rom_patches.cpp @@ -411,12 +411,12 @@ static const uint8 sony_driver[] = { // Replacement for .Sony driver static const uint8 disk_driver[] = { // Generic disk driver // Driver header DiskDriverFlags >> 8, DiskDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, - 0x00, 0x18, // Open() offset - 0x00, 0x1c, // Prime() offset - 0x00, 0x20, // Control() offset - 0x00, 0x2c, // Status() offset - 0x00, 0x52, // Close() offset - 0x05, 0x2e, 0x44, 0x69, 0x73, 0x6b, // ".Disk" + 0x00, 0x1c, // Open() offset + 0x00, 0x20, // Prime() offset + 0x00, 0x24, // Control() offset + 0x00, 0x30, // Status() offset + 0x00, 0x56, // Close() offset + 0x08, 0x2e, 0x41, 0x54, 0x41, 0x44, 0x69, 0x73, 0x6b, 0x00, // ".ATADisk" // Open() M68K_EMUL_OP_DISK_OPEN >> 8, M68K_EMUL_OP_DISK_OPEN & 0xff, @@ -2419,7 +2419,7 @@ void InstallDrivers(void) WriteMacInt16(dce + dCtlFlags, DiskDriverFlags); // Open disk driver - SheepString disk_str("\005.Disk"); + SheepString disk_str("\010.ATADisk"); WriteMacInt32(pb + ioNamePtr, disk_str.addr()); r.a[0] = pb; Execute68kTrap(0xa000, &r); // Open() From 71cbb23b423c5e3f6e14addd919aca00dff74eb2 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 12 Jan 2020 19:59:51 +0900 Subject: [PATCH 311/534] fix for writing resource fork on APFS --- BasiliskII/src/MacOSX/extfs_macosx.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/extfs_macosx.cpp b/BasiliskII/src/MacOSX/extfs_macosx.cpp index b610ee7a2..dea61b009 100644 --- a/BasiliskII/src/MacOSX/extfs_macosx.cpp +++ b/BasiliskII/src/MacOSX/extfs_macosx.cpp @@ -251,7 +251,9 @@ static int open_rsrc(const char *path, int flag) char rsrc_path[MAX_PATH_LENGTH]; make_rsrc_path(path, rsrc_path); - return open(rsrc_path, flag); + int fd = open(rsrc_path, flag); + if (fd < 0 && flag == O_WRONLY) fd = open(rsrc_path, O_WRONLY | O_CREAT); // for APFS + return fd; } From 67dd2e6676cc16a89595626b61e8468da0466e58 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 12 Jan 2020 09:45:10 -0600 Subject: [PATCH 312/534] Disable PIE, add sanity check for >4GB --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 7 +++++++ BasiliskII/src/Unix/CMakeLists.txt | 2 +- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index d529337ff..15c110d0a 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -196,6 +196,13 @@ void * vm_acquire(size_t size, int options) errno = vm_error(ret_code); return VM_MAP_FAILED; } + + // Sanity checks for 64-bit platforms + if (sizeof(void *) > 4 && (options & VM_MAP_32BIT) && !(((char *)addr + size) <= (char *)0xffffffff)) + { + vm_release(addr, size); + return VM_MAP_FAILED; + } #elif defined(HAVE_MMAP_VM) int fd = zero_fd; int the_map_flags = translate_map_flags(options) | map_flags; diff --git a/BasiliskII/src/Unix/CMakeLists.txt b/BasiliskII/src/Unix/CMakeLists.txt index 0711d0d77..12c81e380 100644 --- a/BasiliskII/src/Unix/CMakeLists.txt +++ b/BasiliskII/src/Unix/CMakeLists.txt @@ -110,7 +110,7 @@ target_link_libraries(BasiliskII ${COREFOUNDATION_LIBRARY} ${IOKIT_LIBRARY} ${SD # set(CMAKE_POSITION_INDEPENDENT_CODE OFF) -SET( CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -pagezero_size 0x2000" ) +SET( CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -pagezero_size 0x2000 -Wl,-no_pie" ) add_definitions(-march=native) From 9dc485c56a59d0e82ef481dcfdfb6245e68de86e Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 12 Jan 2020 09:50:04 -0600 Subject: [PATCH 313/534] Sync with latest ARAnyM changes --- .../src/uae_cpu/compiler/codegen_arm.cpp | 23 +- .../src/uae_cpu/compiler/codegen_x86.cpp | 79 +-- BasiliskII/src/uae_cpu/compiler/compemu.h | 7 + .../uae_cpu/compiler/compemu_midfunc_arm.cpp | 4 + .../uae_cpu/compiler/compemu_midfunc_x86.cpp | 21 +- .../uae_cpu/compiler/compemu_midfunc_x86.h | 7 +- .../src/uae_cpu/compiler/compemu_support.cpp | 507 ++++++++++++++---- BasiliskII/src/uae_cpu/compiler/gencomp.c | 196 ++++--- BasiliskII/src/uae_cpu/gencpu.c | 25 +- BasiliskII/src/uae_cpu/m68k.h | 4 + BasiliskII/src/uae_cpu/memory-uae.h | 2 +- BasiliskII/src/uae_cpu/newcpu.cpp | 61 ++- BasiliskII/src/uae_cpu/newcpu.h | 1 + BasiliskII/src/uae_cpu/registers.h | 3 +- 14 files changed, 687 insertions(+), 253 deletions(-) diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp index 01c49e30c..334ae7533 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp @@ -1961,9 +1961,9 @@ static inline void raw_pop_preserved_regs(void) { // Verify!!! /* FLAGX is byte sized, and we *do* write it at that size */ -static inline void raw_load_flagx(uae_u32 t, uae_u32 r) +static inline void raw_load_flagx(uae_u32 t) { - raw_mov_l_rm(t,(uintptr)live.state[r].mem); + raw_mov_l_rm(t,(uintptr)live.state[FLAGX].mem); } static inline void raw_flags_evicted(int r) @@ -2007,9 +2007,9 @@ static inline void raw_reg_to_flags(int r) /* Apparently, there are enough instructions between flag store and flag reload to avoid the partial memory stall */ -static inline void raw_load_flagreg(uae_u32 t, uae_u32 r) +static inline void raw_load_flagreg(uae_u32 t) { - raw_mov_l_rm(t,(uintptr)live.state[r].mem); + raw_mov_l_rm(t,(uintptr)live.state[FLAGTMP].mem); } /* %eax register is clobbered if target processor doesn't support fucomi */ @@ -2606,12 +2606,14 @@ static inline void compemu_raw_call(uae_u32 t) #endif } +#if defined(UAE) static inline void compemu_raw_call_r(RR4 r) { PUSH(RLR_INDEX); // push {lr} BLX_r(r); // blx r0 POP(RLR_INDEX); // pop {lr} } +#endif static inline void compemu_raw_jcc_l_oponly(int cc) { @@ -2706,7 +2708,18 @@ static inline void compemu_raw_jz_b_oponly(void) LDRSB_rRI(REG_WORK1, RPC_INDEX, 3); // ldrsb r2,[pc,#3] ADD_rrr(RPC_INDEX, RPC_INDEX, REG_WORK1); // add pc,pc,r2 - skip_n_bytes(3); + skip_n_bytes(3); /* additionally 1 byte skipped by generic code */ + + // +} + +static inline void compemu_raw_jnz_b_oponly(void) +{ + BEQ_i(2); // beq jp + LDRSB_rRI(REG_WORK1, RPC_INDEX, 3); // ldrsb r2,[pc,#3] + ADD_rrr(RPC_INDEX, RPC_INDEX, REG_WORK1); // add pc,pc,r2 + + skip_n_bytes(3); /* additionally 1 byte skipped by generic code */ // } diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp index 573f2f9a5..22c010804 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -267,6 +267,7 @@ static inline void x86_64_prefix( #define compemu_raw_jmp_r(a) raw_jmp_r(a) #define compemu_raw_jnz(a) raw_jnz(a) #define compemu_raw_jz_b_oponly() raw_jz_b_oponly() +#define compemu_raw_jnz_b_oponly() raw_jnz_b_oponly() #define compemu_raw_lea_l_brr(a,b,c) raw_lea_l_brr(a,b,c) #define compemu_raw_lea_l_brr_indexed(a,b,c,d,e) raw_lea_l_brr_indexed(a,b,c,d,e) #define compemu_raw_mov_b_mr(a,b) raw_mov_b_mr(a,b) @@ -921,6 +922,11 @@ LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) TESTBrr(s, d); } +LOWFUNC(WRITE,READ,2,raw_test_b_mi,(IMM d, IMM s)) +{ + ADDR32 TESTBim(s, d, X86_NOREG, X86_NOREG, 1); +} + LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) { XORLir(i, d); @@ -1185,52 +1191,53 @@ static inline void raw_jmp(uae_u32 t) ADDR32 JMPm(t); } -static inline void raw_jl(uae_u32 t) +static inline void raw_jcc_l_oponly(int cc) { emit_byte(0x0f); - emit_byte(0x8c); - emit_long(t-(uintptr)target-4); + emit_byte(0x80+cc); } -static inline void raw_jz(uae_u32 t) +static inline void raw_jz_l_oponly(void) { - emit_byte(0x0f); - emit_byte(0x84); - emit_long(t-(uintptr)target-4); + raw_jcc_l_oponly(NATIVE_CC_EQ); } -static inline void raw_jnz(uae_u32 t) +static inline void raw_jnz_l_oponly(void) { - emit_byte(0x0f); - emit_byte(0x85); + raw_jcc_l_oponly(NATIVE_CC_NE); +} + +static inline void raw_jl(uae_u32 t) +{ + raw_jcc_l_oponly(NATIVE_CC_LT); emit_long(t-(uintptr)target-4); } -static inline void raw_jnz_l_oponly(void) +static inline void raw_jz(uae_u32 t) { - emit_byte(0x0f); - emit_byte(0x85); + raw_jz_l_oponly(); + emit_long(t-(uintptr)target-4); } -static inline void raw_jcc_l_oponly(int cc) +static inline void raw_jnz(uae_u32 t) { - emit_byte(0x0f); - emit_byte(0x80+cc); + raw_jnz_l_oponly(); + emit_long(t-(uintptr)target-4); } -static inline void raw_jnz_b_oponly(void) +static inline void raw_jcc_b_oponly(int cc) { - emit_byte(0x75); + emit_byte(0x70+cc); } -static inline void raw_jz_b_oponly(void) +static inline void raw_jnz_b_oponly(void) { - emit_byte(0x74); + raw_jcc_b_oponly(NATIVE_CC_NE); } -static inline void raw_jcc_b_oponly(int cc) +static inline void raw_jz_b_oponly(void) { - emit_byte(0x70+cc); + raw_jcc_b_oponly(NATIVE_CC_EQ); } static inline void raw_jmp_l_oponly(void) @@ -1356,7 +1363,7 @@ static inline void raw_flags_evicted(int r) live.nat[r].nholds=0; } -#define FLAG_NREG1_FLAGREG 0 /* Set to -1 if any register will do */ +#define FLAG_NREG1_FLAGREG EAX_INDEX /* Set to -1 if any register will do */ static inline void raw_flags_to_reg_FLAGREG(int r) { raw_lahf(0); /* Most flags in AH */ @@ -1370,14 +1377,14 @@ static inline void raw_flags_to_reg_FLAGREG(int r) #endif } -#define FLAG_NREG2_FLAGREG 0 /* Set to -1 if any register will do */ +#define FLAG_NREG2_FLAGREG EAX_INDEX /* Set to -1 if any register will do */ static inline void raw_reg_to_flags_FLAGREG(int r) { raw_cmp_b_ri(r,-127); /* set V */ raw_sahf(0); } -#define FLAG_NREG3_FLAGREG 0 /* Set to -1 if any register will do */ +#define FLAG_NREG3_FLAGREG EAX_INDEX /* Set to -1 if any register will do */ static __inline__ void raw_flags_set_zero_FLAGREG(int s, int tmp) { raw_mov_l_rr(tmp,s); @@ -1429,7 +1436,7 @@ static inline void raw_flags_init_FLAGSTK(void) { } /* Try to use the LAHF/SETO method on x86_64 since it is faster. This can't be the default because some older CPUs don't support LAHF/SAHF in long mode. */ -static int FLAG_NREG1_FLAGGEN = 0; +static int FLAG_NREG1_FLAGGEN = EAX_INDEX; static inline void raw_flags_to_reg_FLAGGEN(int r) { if (have_lahf_lm) { @@ -1448,7 +1455,7 @@ static inline void raw_flags_to_reg_FLAGGEN(int r) raw_flags_to_reg_FLAGSTK(r); } -static int FLAG_NREG2_FLAGGEN = 0; +static int FLAG_NREG2_FLAGGEN = EAX_INDEX; static inline void raw_reg_to_flags_FLAGGEN(int r) { if (have_lahf_lm) { @@ -1460,7 +1467,7 @@ static inline void raw_reg_to_flags_FLAGGEN(int r) raw_reg_to_flags_FLAGSTK(r); } -static int FLAG_NREG3_FLAGGEN = 0; +static int FLAG_NREG3_FLAGGEN = EAX_INDEX; static inline void raw_flags_set_zero_FLAGGEN(int s, int tmp) { if (have_lahf_lm) @@ -1474,12 +1481,12 @@ static inline void raw_flags_init_FLAGGEN(void) if (have_lahf_lm) { FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGREG; FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGREG; - FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGREG; + FLAG_NREG3_FLAGGEN = FLAG_NREG3_FLAGREG; } else { FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGSTK; FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGSTK; - FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGSTK; + FLAG_NREG3_FLAGGEN = FLAG_NREG3_FLAGSTK; } } #endif @@ -1506,23 +1513,23 @@ static inline void raw_flags_init_FLAGGEN(void) /* Apparently, there are enough instructions between flag store and flag reload to avoid the partial memory stall */ -static inline void raw_load_flagreg(uae_u32 target, uae_u32 r) +static inline void raw_load_flagreg(uae_u32 target) { /* attention: in 64bit mode, relies on LITTE_ENDIANESS of regflags.cznv */ - raw_mov_l_rm(target,(uintptr)live.state[r].mem); + raw_mov_l_rm(target,(uintptr)live.state[FLAGTMP].mem); } -static inline void raw_load_flagx(uae_u32 target, uae_u32 r) +static inline void raw_load_flagx(uae_u32 target) { #if FLAGBIT_X < 8 if (live.nat[target].canbyte) - raw_mov_b_rm(target,(uintptr)live.state[r].mem); + raw_mov_b_rm(target,(uintptr)live.state[FLAGX].mem); else #endif if (live.nat[target].canword) - raw_mov_w_rm(target,(uintptr)live.state[r].mem); + raw_mov_w_rm(target,(uintptr)live.state[FLAGX].mem); else - raw_mov_l_rm(target,(uintptr)live.state[r].mem); + raw_mov_l_rm(target,(uintptr)live.state[FLAGX].mem); } static inline void raw_dec_sp(int off) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index 10a97d14d..62ee94e44 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -169,6 +169,7 @@ extern void compiler_exit(void); extern bool compiler_use_jit(void); #endif extern void flush(int save_regs); +void flush_reg(int reg); extern void set_target(uae_u8* t); extern uae_u8* get_target(void); #ifdef UAE @@ -279,6 +280,7 @@ typedef struct { uae_u8 needflush; } freg_status; +#define SP_REG 15 #define PC_P 16 #define FLAGX 17 #define FLAGTMP 18 @@ -427,6 +429,11 @@ extern void sync_m68k_pc(void); extern uae_u32 get_const(int r); extern int is_const(int r); extern void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond); +void compemu_make_sr(int sr, int tmp); +void compemu_enter_super(int sr); +void compemu_exc_make_frame(int format, int sr, int currpc, int nr, int tmp); +void compemu_bkpt(void); +extern bool disasm_this_inst; #define comp_get_ibyte(o) do_get_mem_byte((uae_u8 *)(comp_pc_p + (o) + 1)) #define comp_get_iword(o) do_get_mem_word((uae_u16 *)(comp_pc_p + (o))) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp index 4fa745b4d..aa9a71813 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp @@ -1676,6 +1676,7 @@ MIDFUNC(2,xor_b,(RW1 d, RR1 s)) unlock2(s); } +#if defined(UAE) MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) { clobber_flags(); @@ -1689,7 +1690,9 @@ MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) prepare_for_call_2(); compemu_raw_call_r(r); } +#endif +#if defined(UAE) MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) { clobber_flags(); @@ -1725,6 +1728,7 @@ MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) live.state[out1].dirtysize=osize; set_status(out1,DIRTY); } +#endif MIDFUNC(0,nop,(void)) { diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp index c322e5904..8d35c1b95 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp @@ -1718,19 +1718,19 @@ MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) MIDFUNC(2,add_l_mi,(IMM d, IMM s)) { CLOBBER_ADD; - raw_add_l_mi(d,s) ; + raw_add_l_mi(d,s); } MIDFUNC(2,add_w_mi,(IMM d, IMM s)) { CLOBBER_ADD; - raw_add_w_mi(d,s) ; + raw_add_w_mi(d,s); } MIDFUNC(2,add_b_mi,(IMM d, IMM s)) { CLOBBER_ADD; - raw_add_b_mi(d,s) ; + raw_add_b_mi(d,s); } MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) @@ -1775,6 +1775,11 @@ MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) unlock2(s); } +MIDFUNC(2,test_b_mi,(IMM d, IMM s)) +{ + CLOBBER_TEST; + raw_test_b_mi(d,s); +} MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) { @@ -2215,6 +2220,7 @@ MIDFUNC(2,xor_b,(RW1 d, RR1 s)) unlock2(s); } +#ifdef UAE MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) { clobber_flags(); @@ -2260,7 +2266,9 @@ MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) live.state[out1].dirtysize=osize; set_status(out1,DIRTY); } +#endif +#if defined(UAE) MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) { clobber_flags(); @@ -2286,6 +2294,7 @@ MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) raw_inc_sp(8); #endif } +#endif /* forget_about() takes a mid-layer register */ MIDFUNC(1,forget_about,(W4 r)) @@ -2821,3 +2830,9 @@ static inline void write_jmp_target(uae_u32 *jmpaddr, cpuop_func* a) { static inline void emit_jmp_target(uae_u32 a) { emit_long(a-((uintptr)target+4)); } + + +void compemu_bkpt(void) +{ + emit_byte(0xcc); +} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h index 8476d9477..82b75415b 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h @@ -141,13 +141,14 @@ DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); -DECLARE_MIDFUNC(add_l_mi(IMM d, IMM s) ); -DECLARE_MIDFUNC(add_w_mi(IMM d, IMM s) ); -DECLARE_MIDFUNC(add_b_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(add_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(add_w_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(add_b_mi(IMM d, IMM s)); DECLARE_MIDFUNC(test_l_ri(RR4 d, IMM i)); DECLARE_MIDFUNC(test_l_rr(RR4 d, RR4 s)); DECLARE_MIDFUNC(test_w_rr(RR2 d, RR2 s)); DECLARE_MIDFUNC(test_b_rr(RR1 d, RR1 s)); +DECLARE_MIDFUNC(test_b_mi(IMM d, IMM s)); DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); DECLARE_MIDFUNC(and_l(RW4 d, RR4 s)); DECLARE_MIDFUNC(and_w(RW2 d, RR2 s)); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 8932e61d1..d21f1c36e 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -231,7 +231,7 @@ void jit_abort(const char *format, ...) #ifdef RECORD_REGISTER_USAGE static uint64 reg_count[16]; -static int reg_count_local[16]; +static uint64 reg_count_local[16]; static int reg_count_compare(const void *ap, const void *bp) { @@ -455,13 +455,8 @@ static void unlock2(int r); static void setlock(int r); static int readreg_specific(int r, int size, int spec); static int writereg_specific(int r, int size, int spec); -static void prepare_for_call_1(void); -static void prepare_for_call_2(void); -static void align_target(uae_u32 a); -static void inline flush_cpu_icache(void *from, void *to); static void inline write_jmp_target(uae_u32 *jmpaddr, cpuop_func* a); -static void inline emit_jmp_target(uae_u32 a); uae_u32 m68k_pc_offset; @@ -538,7 +533,9 @@ static inline blockinfo* get_blockinfo_addr(void* addr) #endif // #include "disasm-glue.h" -#ifdef JIT_DEBUG +bool disasm_this_inst; + +#if defined(JIT_DEBUG) || (defined(HAVE_DISASM_NATIVE) && defined(HAVE_DISASM_M68K)) static void disasm_block(int disasm_target, const uint8 *start, size_t length) { UNUSED(start); @@ -606,7 +603,7 @@ static inline void disasm_m68k_block(const uint8 *start, size_t length) disasm_block(TARGET_M68K, start, length); } #endif -#endif +#endif /* WINUAE_ARANYM */ /******************************************************************* @@ -1552,9 +1549,9 @@ static inline void log_visused(int r) static inline void do_load_reg(int n, int r) { if (r == FLAGTMP) - raw_load_flagreg(n, r); + raw_load_flagreg(n); else if (r == FLAGX) - raw_load_flagx(n, r); + raw_load_flagx(n); else compemu_raw_mov_l_rm(n, (uintptr) live.state[r].mem); } @@ -1775,6 +1772,7 @@ static inline void disassociate(int r) evict(r); } +/* XXFIXME: val may be 64bit address for PC_P */ static inline void set_const(int r, uae_u32 val) { disassociate(r); @@ -2591,6 +2589,80 @@ static inline int f_writereg(int r) return answer; } +/******************************************************************** + * Support functions, internal * + ********************************************************************/ + + +static void align_target(uae_u32 a) +{ + if (!a) + return; + + if (tune_nop_fillers) + raw_emit_nop_filler(a - (((uintptr)target) & (a - 1))); + else { + /* Fill with NOPs --- makes debugging with gdb easier */ + while ((uintptr)target&(a-1)) + emit_byte(0x90); // Attention x86 specific code + } +} + +static inline int isinrom(uintptr addr) +{ +#ifdef UAE + return (addr >= uae_p32(kickmem_bank.baseaddr) && + addr < uae_p32(kickmem_bank.baseaddr + 8 * 65536)); +#else + return ((addr >= (uintptr)ROMBaseHost) && (addr < (uintptr)ROMBaseHost + ROMSize)); +#endif +} + +#if defined(UAE) || defined(FLIGHT_RECORDER) +static void flush_all(void) +{ + int i; + + log_flush(); + for (i=0;i0) + free_nreg(i); + + for (i=0;i0) + f_free_nreg(i); + + live.flags_in_flags=TRASH; /* Note: We assume we already rescued the + flags at the very start of the call_r + functions! */ +} +#endif + #if defined(CPU_arm) #include "compemu_midfunc_arm.cpp" @@ -2643,6 +2715,165 @@ void sync_m68k_pc(void) } } +/* for building exception frames */ +void compemu_exc_make_frame(int format, int sr, int ret, int nr, int tmp) +{ + lea_l_brr(SP_REG, SP_REG, -2); + mov_l_ri(tmp, (format << 12) + (nr * 4)); /* format | vector */ + writeword(SP_REG, tmp, tmp); + + lea_l_brr(SP_REG, SP_REG, -4); + writelong(SP_REG, ret, tmp); + + lea_l_brr(SP_REG, SP_REG, -2); + writeword_clobber(SP_REG, sr, tmp); + remove_offset(SP_REG, -1); + if (isinreg(SP_REG)) + evict(SP_REG); + else + flush_reg(SP_REG); +} + +void compemu_make_sr(int sr, int tmp) +{ + flush_flags(); /* low level */ + flush_reg(FLAGX); + +#ifdef OPTIMIZED_FLAGS + + /* + * x86 EFLAGS: (!SAHF_SETO_PROFITABLE) + * FEDCBA98 76543210 + * ----V--- NZ-----C + * + * <--AH--> <--AL--> (SAHF_SETO_PROFITABLE) + * FEDCBA98 76543210 + * NZxxxxxC xxxxxxxV + * + * arm RFLAGS: + * FEDCBA98 76543210 FEDCBA98 76543210 + * NZCV---- -------- -------- -------- + * + * -> m68k SR: + * --S--III ---XNZVC + * + * Master-Bit and traceflags are ignored here, + * since they are not emulated in JIT code + */ + mov_l_rm(sr, uae_p32(live.state[FLAGTMP].mem)); + mov_l_ri(tmp, FLAGVAL_N|FLAGVAL_Z|FLAGVAL_V|FLAGVAL_C); + and_l(sr, tmp); + mov_l_rr(tmp, sr); + +#if (defined(CPU_i386) && defined(X86_ASSEMBLY)) || (defined(CPU_x86_64) && defined(X86_64_ASSEMBLY)) +#ifndef SAHF_SETO_PROFITABLE + ror_b_ri(sr, FLAGBIT_N - 3); /* move NZ into position; C->4 */ + shrl_w_ri(tmp, FLAGBIT_V - 1); /* move V into position in tmp */ + or_l(sr, tmp); /* or V flag to SR */ + mov_l_rr(tmp, sr); + shrl_b_ri(tmp, (8 - (FLAGBIT_N - 3)) - FLAGBIT_C); /* move C into position in tmp */ + or_l(sr, tmp); /* or C flag to SR */ +#else + ror_w_ri(sr, FLAGBIT_N - 3); /* move NZ in position; V->4, C->12 */ + shrl_w_ri(tmp, (16 - (FLAGBIT_N - 3)) - FLAGBIT_V - 1); /* move V into position in tmp; C->9 */ + or_l(sr, tmp); /* or V flag to SR */ + shrl_w_ri(tmp, FLAGBIT_C + FLAGBIT_V - 1); /* move C into position in tmp */ + or_l(sr, tmp); /* or C flag to SR */ +#endif + mov_l_ri(tmp, 0x0f); + and_l(sr, tmp); + + mov_b_rm(tmp, uae_p32(®flags.x)); + and_l_ri(tmp, FLAGVAL_X); + shll_l_ri(tmp, 4); + or_l(sr, tmp); + +#elif defined(CPU_arm) && defined(ARM_ASSEMBLY) + shrl_l_ri(sr, FLAGBIT_N - 3); /* move NZ into position */ + ror_l_ri(tmp, FLAGBIT_C - 1); /* move C into position in tmp; V->31 */ + and_l_ri(sr, 0xc); + or_l(sr, tmp); /* or C flag to SR */ + shrl_l_ri(tmp, 31); /* move V into position in tmp */ + or_l(sr, tmp); /* or V flag to SR */ + + mov_b_rm(tmp, uae_p32(®flags.x)); + and_l_ri(tmp, FLAGVAL_X); + shrl_l_ri(tmp, FLAGBIT_X - 4); + or_l(sr, tmp); + +#else +#error "unknown CPU" +#endif + +#else + + xor_l(sr, sr); + xor_l(tmp, tmp); + mov_b_rm(tmp, uae_p32(®s.c)); + shll_l_ri(tmp, 0); + or_l(sr, tmp); + mov_b_rm(tmp, uae_p32(®s.v)); + shll_l_ri(tmp, 1); + or_l(sr, tmp); + mov_b_rm(tmp, uae_p32(®s.z)); + shll_l_ri(tmp, 2); + or_l(sr, tmp); + mov_b_rm(tmp, uae_p32(®s.n)); + shll_l_ri(tmp, 3); + or_l(sr, tmp); + +#endif /* OPTIMIZED_FLAGS */ + + mov_b_rm(tmp, uae_p32(®s.s)); + shll_l_ri(tmp, 13); + or_l(sr, tmp); + mov_l_rm(tmp, uae_p32(®s.intmask)); + shll_l_ri(tmp, 8); + or_l(sr, tmp); + and_l_ri(sr, 0x271f); + mov_w_mr(uae_p32(®s.sr), sr); +} + +void compemu_enter_super(int sr) +{ +#if 0 + fprintf(stderr, "enter_super: isinreg=%d rr=%d nholds=%d\n", isinreg(SP_REG), live.state[SP_REG].realreg, isinreg(SP_REG) ? live.nat[live.state[SP_REG].realreg].nholds : -1); +#endif + remove_offset(SP_REG, -1); + if (isinreg(SP_REG)) + evict(SP_REG); + else + flush_reg(SP_REG); + /* + * equivalent to: + * if (!regs.s) + * { + * regs.usp = m68k_areg(regs, 7); + * m68k_areg(regs, 7) = regs.isp; + * regs.s = 1; + * mmu_set_super(1); + * } + */ + test_l_ri(sr, 0x2000); +#if defined(CPU_i386) || defined(CPU_x86_64) + compemu_raw_jnz_b_oponly(); + uae_u8 *branchadd = get_target(); + skip_byte(); +#elif defined(CPU_arm) + compemu_raw_jnz_b_oponly(); + uae_u8 *branchadd = get_target(); + skip_byte(); +#endif + mov_l_mr((uintptr)®s.usp, SP_REG); + mov_l_rm(SP_REG, uae_p32(®s.isp)); + mov_b_mi(uae_p32(®s.s), 1); +#if defined(CPU_i386) || defined(CPU_x86_64) + *branchadd = get_target() - (branchadd + 1); +#elif defined(CPU_arm) + *((uae_u32 *)branchadd - 3) = get_target() - (branchadd + 1); +#endif +} + /******************************************************************** * Scratch registers management * ********************************************************************/ @@ -2941,6 +3172,39 @@ static void init_comp(void) raw_fp_init(); } +void flush_reg(int reg) +{ + if (live.state[reg].needflush==NF_TOMEM) + { + switch (live.state[reg].status) + { + case INMEM: + if (live.state[reg].val) + { + compemu_raw_add_l_mi((uintptr)live.state[reg].mem, live.state[reg].val); + log_vwrite(reg); + live.state[reg].val = 0; + } + break; + case CLEAN: + case DIRTY: + remove_offset(reg, -1); + tomem(reg); + break; + case ISCONST: + if (reg != PC_P) + writeback_const(reg); + break; + default: + break; + } + Dif (live.state[reg].val && reg!=PC_P) + { + jit_log("Register %d still has val %x", reg, live.state[reg].val); + } + } +} + /* Only do this if you really mean it! The next call should be to init!*/ void flush(int save_regs) { @@ -2958,30 +3222,7 @@ void flush(int save_regs) } } for (i=0;i= uae_p32(kickmem_bank.baseaddr) && - addr < uae_p32(kickmem_bank.baseaddr + 8 * 65536)); -#else - return ((addr >= (uintptr)ROMBaseHost) && (addr < (uintptr)ROMBaseHost + ROMSize)); -#endif -} - -static void flush_all(void) -{ - int i; - - log_flush(); - for (i=0;i0) - free_nreg(i); - - for (i=0;i0) - f_free_nreg(i); - - live.flags_in_flags=TRASH; /* Note: We assume we already rescued the - flags at the very start of the call_r - functions! */ -} - /******************************************************************** * Memory access and related functions, CREATE time * ********************************************************************/ @@ -4522,6 +4691,75 @@ void compiler_dumpstate(void) } #endif + +#if 0 /* debugging helpers; activate as needed */ +static void print_exc_frame(uae_u32 opcode) +{ + int nr = (opcode & 0x0f) + 32; + if (nr != 0x45 && /* Timer-C */ + nr != 0x1c && /* VBL */ + nr != 0x46) /* ACIA */ + { + memptr sp = m68k_areg(regs, 7); + uae_u16 sr = get_word(sp); + fprintf(stderr, "Exc:%02x SP: %08x USP: %08x SR: %04x PC: %08x Format: %04x", nr, sp, regs.usp, sr, get_long(sp + 2), get_word(sp + 6)); + if (nr >= 32 && nr < 48) + { + fprintf(stderr, " Opcode: $%04x", sr & 0x2000 ? get_word(sp + 8) : get_word(regs.usp)); + } + fprintf(stderr, "\n"); + } +} + +static void push_all_nat(void) +{ + raw_pushfl(); + raw_push_l_r(EAX_INDEX); + raw_push_l_r(ECX_INDEX); + raw_push_l_r(EDX_INDEX); + raw_push_l_r(EBX_INDEX); + raw_push_l_r(EBP_INDEX); + raw_push_l_r(EDI_INDEX); + raw_push_l_r(ESI_INDEX); + raw_push_l_r(R8_INDEX); + raw_push_l_r(R9_INDEX); + raw_push_l_r(R10_INDEX); + raw_push_l_r(R11_INDEX); + raw_push_l_r(R12_INDEX); + raw_push_l_r(R13_INDEX); + raw_push_l_r(R14_INDEX); + raw_push_l_r(R15_INDEX); +} + +static void pop_all_nat(void) +{ + raw_pop_l_r(R15_INDEX); + raw_pop_l_r(R14_INDEX); + raw_pop_l_r(R13_INDEX); + raw_pop_l_r(R12_INDEX); + raw_pop_l_r(R11_INDEX); + raw_pop_l_r(R10_INDEX); + raw_pop_l_r(R9_INDEX); + raw_pop_l_r(R8_INDEX); + raw_pop_l_r(ESI_INDEX); + raw_pop_l_r(EDI_INDEX); + raw_pop_l_r(EBP_INDEX); + raw_pop_l_r(EBX_INDEX); + raw_pop_l_r(EDX_INDEX); + raw_pop_l_r(ECX_INDEX); + raw_pop_l_r(EAX_INDEX); + raw_popfl(); +} +#endif + +#if 0 +static void print_inst(void) +{ + disasm_m68k_block(regs.fault_pc + (uint8 *)MEMBaseDiff, 1); +} +#endif + + #ifdef UAE void compile_block(cpu_history *pc_hist, int blocklen, int totcycles) { @@ -4722,7 +4960,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) remove_all_offsets(); prepare_for_call_1(); prepare_for_call_2(); - raw_mov_l_ri(REG_PAR1, ((uintptr)(pc_hist[i].location)) - MEMBaseDiff); + raw_mov_l_ri(REG_PAR1, (memptr)((uintptr)pc_hist[i].location - MEMBaseDiff)); raw_mov_w_ri(REG_PAR2, cft_map(opcode)); raw_dec_sp(STACK_SHADOW_SPACE); compemu_raw_call((uintptr)m68k_record_step); @@ -4738,7 +4976,16 @@ static void compile_block(cpu_history* pc_hist, int blocklen) init_comp(); } was_comp=1; - + +#if defined(HAVE_DISASM_NATIVE) && defined(HAVE_DISASM_M68K) +/* debugging helpers; activate as needed */ +#if 1 + disasm_this_inst = false; + const uae_u8 *start_m68k_thisinst = (const uae_u8 *)pc_hist[i].location; + uae_u8 *start_native_thisinst = get_target(); +#endif +#endif + #ifdef WINUAE_ARANYM bool isnop = do_get_mem_word(pc_hist[i].location) == 0x4e71 || ((i + 1) < blocklen && do_get_mem_word(pc_hist[i+1].location) == 0x4e71); @@ -4769,6 +5016,44 @@ static void compile_block(cpu_history* pc_hist, int blocklen) nop(); was_comp=0; } +#endif +#if defined(HAVE_DISASM_NATIVE) && defined(HAVE_DISASM_M68K) + +/* debugging helpers; activate as needed */ +#if 0 + disasm_m68k_block(start_m68k_thisinst, 1); + push_all_nat(); + compemu_raw_mov_l_mi(uae_p32(®s.fault_pc), (uintptr)start_m68k_thisinst - MEMBaseDiff); + raw_dec_sp(STACK_SHADOW_SPACE); + compemu_raw_call(uae_p32(print_instn)); + raw_inc_sp(STACK_SHADOW_SPACE); + pop_all_nat(); +#endif + + if (disasm_this_inst) + { + disasm_m68k_block(start_m68k_thisinst, 1); +#if 1 + disasm_native_block(start_native_thisinst, get_target() - start_native_thisinst); +#endif + +#if 0 + push_all_nat(); + + raw_dec_sp(STACK_SHADOW_SPACE); + compemu_raw_mov_l_ri(REG_PAR1, (uae_u32)cft_map(opcode)); + compemu_raw_call((uintptr)print_exc_frame); + raw_inc_sp(STACK_SHADOW_SPACE); + + pop_all_nat(); +#endif + + if (failure) + { + bug("(discarded)"); + target = start_native_thisinst; + } + } #endif } @@ -4797,8 +5082,8 @@ static void compile_block(cpu_history* pc_hist, int blocklen) if (i < blocklen - 1) { uae_u8* branchadd; - /* if (SPCFLAGS_TEST(SPCFLAG_STOP)) popall_do_nothing() */ - compemu_raw_mov_l_rm(0,(uintptr)specflags); + /* if (SPCFLAGS_TEST(SPCFLAG_ALL)) popall_do_nothing() */ + compemu_raw_mov_l_rm(0, (uintptr)specflags); compemu_raw_test_l_rr(0,0); #if defined(USE_DATA_BUFFER) data_check_end(8, 64); // just a pessimistic guess... @@ -4810,7 +5095,7 @@ static void compile_block(cpu_history* pc_hist, int blocklen) raw_sub_l_mi(uae_p32(&countdown),scaled_cycles(totcycles)); #endif compemu_raw_jmp((uintptr)popall_do_nothing); - *branchadd=get_target()-branchadd-1; + *branchadd = get_target() - (branchadd + 1); } } } diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index 202774ac2..14b1d44fb 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -262,6 +262,7 @@ finish_braces (void) { while (n_braces > 0) close_brace (); + comprintf ("\n"); } static inline void gen_update_next_handler(void) @@ -355,7 +356,33 @@ swap_opcode (void) static void sync_m68k_pc (void) { - comprintf("\t if (m68k_pc_offset > SYNC_PC_OFFSET) sync_m68k_pc();\n"); + comprintf(" if (m68k_pc_offset > SYNC_PC_OFFSET)\n sync_m68k_pc();\n"); +} + + +static void gen_set_fault_pc(void) +{ + start_brace(); + comprintf("\tsync_m68k_pc();\n"); + comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tmov_l_mr((uintptr)®s.fault_pc,ret);\n"); +} + + +static void make_sr(void) +{ + start_brace(); + comprintf("\tint sr = scratchie++;\n"); + comprintf("\tint tmp = scratchie++;\n"); + comprintf("\tcompemu_make_sr(sr, tmp);\n"); +} + + +static void disasm_this_inst(void) +{ + comprintf("\tdisasm_this_inst = true;\n"); } @@ -1751,7 +1778,31 @@ gen_opcode (unsigned int opcode) break; case i_TRAP: +#ifdef DISABLE_I_TRAP + failure; +#endif isjump; + mayfail; + start_brace(); + comprintf(" int trapno = srcreg + 32;\n"); + gen_set_fault_pc(); + make_sr(); + comprintf(" compemu_enter_super(sr);\n"); + comprintf(" compemu_exc_make_frame(0, sr, ret, trapno, scratchie);\n"); + comprintf(" forget_about(ret);\n"); + /* m68k_setpc (get_long (regs.vbr + 4*nr)); */ + start_brace(); + comprintf(" int srca = scratchie++;\n"); + comprintf(" mov_l_rm(srca, (uintptr)®s.vbr);\n"); + comprintf(" mov_l_brR(srca, srca, MEMBaseDiff + trapno * 4); mid_bswap_32(srca);\n"); + comprintf(" mov_l_mr((uintptr)®s.pc, srca);\n"); + comprintf(" get_n_addr_jmp(srca, PC_P, scratchie);\n"); + comprintf(" mov_l_mr((uintptr)®s.pc_oldp, PC_P);\n"); + gen_update_next_handler(); + disasm_this_inst(); /* for debugging only */ + /* + * this currently deactivates this feature, since it does not work yet + */ failure; break; @@ -1792,12 +1843,12 @@ gen_opcode (unsigned int opcode) comprintf("\tadd_l_ri(offs,4);\n"); start_brace(); comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" + "\treadlong(SP_REG,newad,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc,newad);\n" "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" "\tm68k_pc_offset=0;\n" - "\tadd_l(15,offs);\n"); + "\tadd_l(SP_REG,offs);\n"); gen_update_next_handler(); isjump; break; @@ -1808,12 +1859,12 @@ gen_opcode (unsigned int opcode) #endif genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); - comprintf("\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,src,scratchie);\n" - "\tmov_l_rr(src,15);\n"); + comprintf("\tsub_l_ri(SP_REG,4);\n" + "\twritelong_clobber(SP_REG,src,scratchie);\n" + "\tmov_l_rr(src,SP_REG);\n"); if (curi->size==sz_word) comprintf("\tsign_extend_16_rr(offs,offs);\n"); - comprintf("\tadd_l(15,offs);\n"); + comprintf("\tadd_l(SP_REG,offs);\n"); genastore ("src", curi->smode, "srcreg", sz_long, "src"); break; @@ -1822,9 +1873,9 @@ gen_opcode (unsigned int opcode) failure; #endif genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - comprintf("\tmov_l_rr(15,src);\n" - "\treadlong(15,src,scratchie);\n" - "\tadd_l_ri(15,4);\n"); + comprintf("\tmov_l_rr(SP_REG,src);\n" + "\treadlong(SP_REG,src,scratchie);\n" + "\tadd_l_ri(SP_REG,4);\n"); genastore ("src", curi->smode, "srcreg", curi->size, "src"); break; @@ -1833,12 +1884,12 @@ gen_opcode (unsigned int opcode) failure; #endif comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" + "\treadlong(SP_REG,newad,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc,newad);\n" "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" "\tm68k_pc_offset=0;\n" - "\tlea_l_brr(15,15,4);\n"); + "\tlea_l_brr(SP_REG,SP_REG,4);\n"); gen_update_next_handler(); isjump; break; @@ -1863,8 +1914,8 @@ gen_opcode (unsigned int opcode) comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); comprintf("\tint ret=scratchie++;\n" "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); + "\tsub_l_ri(SP_REG,4);\n" + "\twritelong_clobber(SP_REG,ret,scratchie);\n"); comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" @@ -1895,13 +1946,14 @@ gen_opcode (unsigned int opcode) comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); comprintf("\tint ret=scratchie++;\n" "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); + "\tsub_l_ri(SP_REG,4);\n" + "\twritelong_clobber(SP_REG,ret,scratchie);\n"); comprintf("\tadd_l_ri(src,m68k_pc_offset_thisinst+2);\n"); comprintf("\tm68k_pc_offset=0;\n"); comprintf("\tadd_l(PC_P,src);\n"); comprintf("\tcomp_pc_p=(uae_u8*)(uintptr)get_const(PC_P);\n"); + gen_update_next_handler(); break; case i_Bcc: @@ -2029,7 +2081,7 @@ gen_opcode (unsigned int opcode) case 1: comprintf("\tstart_needflags();\n"); comprintf("\tsub_w_ri(src,1);\n"); - comprintf("\t end_needflags();\n"); + comprintf("\tend_needflags();\n"); start_brace(); comprintf("\tuae_u32 v2,v;\n" "\tuae_u32 v1=get_const(PC_P);\n"); @@ -2063,9 +2115,9 @@ gen_opcode (unsigned int opcode) so whether we move them around doesn't matter. However, if cc=false, we have offs==jump_pc, and src==nsrc-1 */ - comprintf("\t start_needflags();\n"); + comprintf("\tstart_needflags();\n"); comprintf("\ttest_w_rr(nsrc,nsrc);\n"); - comprintf("\t end_needflags();\n"); + comprintf("\tend_needflags();\n"); comprintf("\tcmov_l_rr(PC_P,offs,%d);\n", NATIVE_CC_NE); break; default: assert(0); @@ -2174,10 +2226,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2249,10 +2302,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2260,10 +2314,11 @@ gen_opcode (unsigned int opcode) LSL. The handling of V is, uhm, unpleasant, so if it's needed, let the normal emulation handle it. Shoulders of giants kinda thing ;-) */ - comprintf("if (needed_flags & FLAG_V) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if (needed_flags & FLAG_V) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); @@ -2323,10 +2378,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2390,10 +2446,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2457,10 +2514,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2469,9 +2527,9 @@ gen_opcode (unsigned int opcode) start_brace (); switch(curi->size) { - case sz_long: comprintf("\t rol_l_rr(data,cnt);\n"); break; - case sz_word: comprintf("\t rol_w_rr(data,cnt);\n"); break; - case sz_byte: comprintf("\t rol_b_rr(data,cnt);\n"); break; + case sz_long: comprintf("\trol_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\trol_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\trol_b_rr(data,cnt);\n"); break; } if (!noflags) { @@ -2481,13 +2539,13 @@ gen_opcode (unsigned int opcode) */ comprintf("\tif (needed_flags & FLAG_ZNV)\n"); switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; } - comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); + comprintf("\tbt_l_ri(data,0x00);\n"); /* Set C */ + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); } genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; @@ -2498,10 +2556,11 @@ gen_opcode (unsigned int opcode) #endif mayfail; if (curi->smode==Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " " RETURN "\n" - "} \n"); + comprintf( + " if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " " RETURN "\n" + " }\n"); start_brace(); } comprintf("\tdont_care_flags();\n"); @@ -2510,9 +2569,9 @@ gen_opcode (unsigned int opcode) start_brace (); switch(curi->size) { - case sz_long: comprintf("\t ror_l_rr(data,cnt);\n"); break; - case sz_word: comprintf("\t ror_w_rr(data,cnt);\n"); break; - case sz_byte: comprintf("\t ror_b_rr(data,cnt);\n"); break; + case sz_long: comprintf("\tror_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\tror_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\tror_b_rr(data,cnt);\n"); break; } if (!noflags) { @@ -2522,17 +2581,17 @@ gen_opcode (unsigned int opcode) */ comprintf("\tif (needed_flags & FLAG_ZNV)\n"); switch(curi->size) { - case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; - case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; - case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; } switch(curi->size) { - case sz_byte: comprintf("\t bt_l_ri(data,0x07);\n"); break; - case sz_word: comprintf("\t bt_l_ri(data,0x0f);\n"); break; - case sz_long: comprintf("\t bt_l_ri(data,0x1f);\n"); break; + case sz_byte: comprintf("\tbt_l_ri(data,0x07);\n"); break; + case sz_word: comprintf("\tbt_l_ri(data,0x0f);\n"); break; + case sz_long: comprintf("\tbt_l_ri(data,0x1f);\n"); break; } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); } genastore ("data", curi->dmode, "dstreg", curi->size, "data"); break; @@ -2816,7 +2875,7 @@ gen_opcode (unsigned int opcode) finish_braces (); sync_m68k_pc (); if (global_mayfail) - comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); + comprintf(" if (failure)\n m68k_pc_offset = m68k_pc_offset_thisinst;\n"); return global_failure; } @@ -3284,6 +3343,7 @@ int main(void) free (table68k); fclose (stblfile); fclose (headerfile); + (void)disasm_this_inst; return 0; } diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c index e28c370ae..295a49e50 100644 --- a/BasiliskII/src/uae_cpu/gencpu.c +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -1409,30 +1409,9 @@ static void gen_opcode (unsigned long int opcode) fill_prefetch_0 (); printf ("\tMakeFromSR();\n"); } else { - int old_brace_level = n_braces; - if (next_cpu_level < 0) + if (next_cpu_level < 0) next_cpu_level = 0; - printf ("\tuae_u16 newsr; uae_u32 newpc; for (;;) {\n"); - genamode (Aipi, "7", sz_word, "sr", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_long, "pc", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - genamode (Aipi, "7", sz_word, "format", GENA_GETV_FETCH, GENA_MOVEM_DO_INC, XLATE_LOG); - printf ("\tnewsr = sr; newpc = pc;\n"); - printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); - printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); - printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); -// printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0xa000) { m68k_areg(regs, 7) += 24; break; }\n"); - printf ("\telse if ((format & 0xF000) == 0xb000) { m68k_areg(regs, 7) += 84; break; }\n"); - printf ("\telse { Exception(14,0); goto %s; }\n", endlabelstr); - printf ("\tregs.sr = newsr; MakeFromSR();\n}\n"); - pop_braces (old_brace_level); - printf ("\tregs.sr = newsr; MakeFromSR();\n"); - printf ("\tm68k_setpc_rte(newpc);\n"); - fill_prefetch_0 (); - need_endlabel = 1; + printf ("\tex_rte();\n"); } /* PC is set and prefetch filled. */ m68k_pc_offset = 0; diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h index 6a434dafd..c307bdfd7 100644 --- a/BasiliskII/src/uae_cpu/m68k.h +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -38,7 +38,11 @@ #if (defined(CPU_i386) && defined(X86_ASSEMBLY)) || (defined(CPU_x86_64) && defined(X86_64_ASSEMBLY)) +#ifdef __cplusplus # include +#else +# include +#endif #ifndef SAHF_SETO_PROFITABLE diff --git a/BasiliskII/src/uae_cpu/memory-uae.h b/BasiliskII/src/uae_cpu/memory-uae.h index c93aeb371..cbae60b03 100644 --- a/BasiliskII/src/uae_cpu/memory-uae.h +++ b/BasiliskII/src/uae_cpu/memory-uae.h @@ -159,7 +159,7 @@ static ALWAYS_INLINE void check_ram_boundary(uaecptr addr, int size, bool write) // D(bug("BUS ERROR %s at $%x\n", (write ? "writing" : "reading"), addr)); regs.mmu_fault_addr = addr; - regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); + regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); /* MMU_SW_RW */ breakpt(); THROW(2); } diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index 351a0de36..382b2d941 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -491,6 +491,65 @@ static inline void exc_make_frame( exc_push_word((format << 12) + (nr * 4)); /* format | vector */ exc_push_long(currpc); exc_push_word(sr); +#if 0 /* debugging helpers; activate as needed */ + if (/* nr != 0x45 && */ /* Timer-C */ + nr != 0x1c && /* VBL */ + nr != 0x46) /* ACIA */ + { + memptr sp = m68k_areg(regs, 7); + uae_u16 sr = get_word(sp); + fprintf(stderr, "Exc:%02x SP: %08x USP: %08x SR: %04x PC: %08x Format: %04x", nr, sp, regs.usp, sr, get_long(sp + 2), get_word(sp + 6)); + if (nr >= 32 && nr < 48) + { + fprintf(stderr, " Opcode: $%04x", sr & 0x2000 ? get_word(sp + 8) : get_word(regs.usp)); + } + fprintf(stderr, "\n"); + } +#endif +} + + +void ex_rte(void) +{ + uae_u16 newsr; + uae_u32 newpc; + uae_s16 format; + + for (;;) + { + newsr = get_word(m68k_areg(regs, 7)); + m68k_areg(regs, 7) += 2; + newpc = get_long(m68k_areg(regs, 7)); + m68k_areg(regs, 7) += 4; + format = get_word(m68k_areg(regs, 7)); + m68k_areg(regs, 7) += 2; + if ((format & 0xF000) == 0x0000) break; + else if ((format & 0xF000) == 0x1000) { ; } + else if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; } +// else if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; } + else if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; } + else if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; } + else if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; } + else if ((format & 0xF000) == 0xa000) { m68k_areg(regs, 7) += 24; break; } + else if ((format & 0xF000) == 0xb000) { m68k_areg(regs, 7) += 84; break; } + else { Exception(14,0); return; } + regs.sr = newsr; + MakeFromSR(); + } +#if 0 /* debugging helpers; activate as needed */ + { + memptr sp = m68k_areg(regs, 7) - 8; + int nr = (format & 0xfff) >> 2; + if (/* nr != 0x45 && */ /* Timer-C */ + nr != 0x1c && /* VBL */ + nr != 0x46) /* ACIA */ + fprintf(stderr, "RTE SP: %08x USP: %08x SR: %04x PC: %08x Format: %04x olds=%d nr=%02x -> %08x\n", sp, regs.usp, newsr, m68k_getpc(), format, regs.s, nr, newpc); + } +#endif + regs.sr = newsr; + MakeFromSR(); + m68k_setpc_rte(newpc); + fill_prefetch_0(); } #ifdef EXCEPTIONS_VIA_LONGJMP @@ -570,7 +629,7 @@ void Exception(int nr, uaecptr oldpc) } else if (nr == 3) { exc_make_frame(2, regs.sr, last_addr_for_exception_3, nr, last_fault_for_exception_3 & 0xfffffffe, 0); - } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { + } else if (nr == 5 || nr == 6 || nr == 7 || nr == 9) { /* div by zero, CHK, TRAP or TRACE */ exc_make_frame(2, regs.sr, currpc, nr, oldpc, 0); } else if (regs.m && nr >= 24 && nr < 32) { diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index 13a51b82b..478a3785e 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -271,6 +271,7 @@ extern REGPARAM void put_bitfield(uae_u32 dst, uae_u32 bdata[2], uae_u32 val, ua extern void MakeSR (void); extern void MakeFromSR (void); extern void Exception (int, uaecptr); +extern void ex_rte(void); extern void dump_counts (void); extern int m68k_move2c (int, uae_u32 *); extern int m68k_movec2 (int, uae_u32 *); diff --git a/BasiliskII/src/uae_cpu/registers.h b/BasiliskII/src/uae_cpu/registers.h index c3459719c..16f670926 100644 --- a/BasiliskII/src/uae_cpu/registers.h +++ b/BasiliskII/src/uae_cpu/registers.h @@ -61,9 +61,8 @@ extern struct regstruct flagtype t0; flagtype s; flagtype m; - flagtype x; flagtype stopped; - int intmask; + uint32_t intmask; uae_u32 pc; uae_u32 fault_pc; From b5fbba6e539ed611fafa276195f0fedc16ee6d82 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 22 Jan 2020 10:48:34 +0900 Subject: [PATCH 314/534] fix for New Build System (Xcode10+) --- .../BasiliskII.xcodeproj/project.pbxproj | 324 +----------------- BasiliskII/src/MacOSX/Makefile.gencpu | 27 ++ .../src/MacOSX/run_build68k_for_xcode.sh | 37 -- .../src/MacOSX/run_gencomp_for_xcode.sh | 37 -- BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh | 37 -- 5 files changed, 37 insertions(+), 425 deletions(-) create mode 100644 BasiliskII/src/MacOSX/Makefile.gencpu delete mode 100755 BasiliskII/src/MacOSX/run_build68k_for_xcode.sh delete mode 100755 BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh delete mode 100755 BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8eb0925c0..bdcf70b15 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -11,11 +11,6 @@ 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; - 753252E91F535A0C0024025B /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252E51F5359040024025B /* build68k.c */; }; - 753252EE1F535DD10024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; - 753253021F535F210024025B /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = 753253011F535F210024025B /* gencpu.c */; }; - 753253151F5363400024025B /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = 753252ED1F535DD10024025B /* defs68k.c */; }; - 753253201F53650F0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; @@ -99,39 +94,9 @@ E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; + E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; /* End PBXBuildFile section */ -/* Begin PBXContainerItemProxy section */ - 7532530B1F53611F0024025B /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 753252D91F5358D30024025B; - remoteInfo = build68k; - }; - 7532531A1F5364030024025B /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 753252F21F535E1E0024025B; - remoteInfo = gencpu; - }; - 7532531C1F53640B0024025B /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 753253071F5360E30024025B; - remoteInfo = RunBuild68k; - }; - 7532531E1F5364170024025B /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 7539DFAA1F23B17E006B2DF2 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 753253161F5363D20024025B; - remoteInfo = RunGencpu; - }; -/* End PBXContainerItemProxy section */ - /* Begin PBXCopyFilesBuildPhase section */ 752F26F31F240140001032B4 /* Embed Frameworks */ = { isa = PBXCopyFilesBuildPhase; @@ -144,24 +109,6 @@ name = "Embed Frameworks"; runOnlyForDeploymentPostprocessing = 0; }; - 753252D81F5358D30024025B /* CopyFiles */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = /usr/share/man/man1/; - dstSubfolderSpec = 0; - files = ( - ); - runOnlyForDeploymentPostprocessing = 1; - }; - 753252F11F535E1E0024025B /* CopyFiles */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = /usr/share/man/man1/; - dstSubfolderSpec = 0; - files = ( - ); - runOnlyForDeploymentPostprocessing = 1; - }; /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ @@ -169,10 +116,7 @@ 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; - 753252DA1F5358D30024025B /* build68k */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = build68k; sourceTree = BUILT_PRODUCTS_DIR; }; 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; - 753252ED1F535DD10024025B /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = build68k_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; - 753252F31F535E1E0024025B /* gencpu */ = {isa = PBXFileReference; explicitFileType = "compiled.mach-o.executable"; includeInIndex = 0; path = gencpu; sourceTree = BUILT_PRODUCTS_DIR; }; 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; 7532532C1F5368370024025B /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; @@ -376,25 +320,12 @@ E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ - 753252D71F5358D30024025B /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 753252F01F535E1E0024025B /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - runOnlyForDeploymentPostprocessing = 0; - }; 7539DFAF1F23B17E006B2DF2 /* Frameworks */ = { isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; @@ -472,20 +403,11 @@ 753252FF1F535E5D0024025B /* generated src */ = { isa = PBXGroup; children = ( - 753253001F535E840024025B /* build68k output */, 7532532B1F53675E0024025B /* gencpu output */, ); name = "generated src"; sourceTree = ""; }; - 753253001F535E840024025B /* build68k output */ = { - isa = PBXGroup; - children = ( - 753252ED1F535DD10024025B /* defs68k.c */, - ); - name = "build68k output"; - sourceTree = ""; - }; 7532532B1F53675E0024025B /* gencpu output */ = { isa = PBXGroup; children = ( @@ -494,6 +416,7 @@ 7532532E1F5368370024025B /* cpustbl_nf.cpp */, 7532532F1F5368370024025B /* cpustbl.cpp */, 753253301F5368370024025B /* cputbl.h */, + E417913123D7D67C0009AD63 /* defs68k.c */, ); name = "gencpu output"; sourceTree = ""; @@ -513,8 +436,6 @@ isa = PBXGroup; children = ( 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, - 753252DA1F5358D30024025B /* build68k */, - 753252F31F535E1E0024025B /* gencpu */, ); name = Products; path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; @@ -790,75 +711,7 @@ }; /* End PBXGroup section */ -/* Begin PBXLegacyTarget section */ - 753253071F5360E30024025B /* run_build68k */ = { - isa = PBXLegacyTarget; - buildArgumentsString = "$(ACTION)"; - buildConfigurationList = 753253081F5360E30024025B /* Build configuration list for PBXLegacyTarget "run_build68k" */; - buildPhases = ( - ); - buildToolPath = "$(PROJECT_DIR)/run_build68k_for_xcode.sh"; - buildWorkingDirectory = ""; - dependencies = ( - 7532530C1F53611F0024025B /* PBXTargetDependency */, - ); - name = run_build68k; - passBuildSettingsInEnvironment = 1; - productName = RunBuild68k; - }; - 753253161F5363D20024025B /* run_gencpu */ = { - isa = PBXLegacyTarget; - buildArgumentsString = "$(ACTION)"; - buildConfigurationList = 753253171F5363D20024025B /* Build configuration list for PBXLegacyTarget "run_gencpu" */; - buildPhases = ( - ); - buildToolPath = "$(PROJECT_DIR)/run_gencpu_for_xcode.sh"; - buildWorkingDirectory = ""; - dependencies = ( - 7532531B1F5364030024025B /* PBXTargetDependency */, - ); - name = run_gencpu; - passBuildSettingsInEnvironment = 1; - productName = RunGencpu; - }; -/* End PBXLegacyTarget section */ - /* Begin PBXNativeTarget section */ - 753252D91F5358D30024025B /* build68k */ = { - isa = PBXNativeTarget; - buildConfigurationList = 753252E31F5358D30024025B /* Build configuration list for PBXNativeTarget "build68k" */; - buildPhases = ( - 753252D61F5358D30024025B /* Sources */, - 753252D71F5358D30024025B /* Frameworks */, - 753252D81F5358D30024025B /* CopyFiles */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = build68k; - productName = build68k; - productReference = 753252DA1F5358D30024025B /* build68k */; - productType = "com.apple.product-type.tool"; - }; - 753252F21F535E1E0024025B /* gencpu */ = { - isa = PBXNativeTarget; - buildConfigurationList = 753252F71F535E1E0024025B /* Build configuration list for PBXNativeTarget "gencpu" */; - buildPhases = ( - 753252EF1F535E1E0024025B /* Sources */, - 753252F01F535E1E0024025B /* Frameworks */, - 753252F11F535E1E0024025B /* CopyFiles */, - ); - buildRules = ( - ); - dependencies = ( - 7532531D1F53640B0024025B /* PBXTargetDependency */, - ); - name = gencpu; - productName = gencpu; - productReference = 753252F31F535E1E0024025B /* gencpu */; - productType = "com.apple.product-type.tool"; - }; 7539DFB11F23B17E006B2DF2 /* BasiliskII */ = { isa = PBXNativeTarget; buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; @@ -872,7 +725,6 @@ buildRules = ( ); dependencies = ( - 7532531F1F5364170024025B /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; @@ -887,22 +739,6 @@ attributes = { LastUpgradeCheck = 0830; TargetAttributes = { - 753252D91F5358D30024025B = { - CreatedOnToolsVersion = 8.3.3; - ProvisioningStyle = Automatic; - }; - 753252F21F535E1E0024025B = { - CreatedOnToolsVersion = 8.3.3; - ProvisioningStyle = Automatic; - }; - 753253071F5360E30024025B = { - CreatedOnToolsVersion = 8.3.3; - ProvisioningStyle = Automatic; - }; - 753253161F5363D20024025B = { - CreatedOnToolsVersion = 8.3.3; - ProvisioningStyle = Automatic; - }; 7539DFB11F23B17E006B2DF2 = { CreatedOnToolsVersion = 8.3.3; ProvisioningStyle = Automatic; @@ -924,10 +760,6 @@ projectRoot = ""; targets = ( 7539DFB11F23B17E006B2DF2 /* BasiliskII */, - 753252D91F5358D30024025B /* build68k */, - 753252F21F535E1E0024025B /* gencpu */, - 753253071F5360E30024025B /* run_build68k */, - 753253161F5363D20024025B /* run_gencpu */, ); }; /* End PBXProject section */ @@ -954,36 +786,24 @@ ); name = "Run Script"; outputPaths = ( + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "# ${PROJECT_DIR}/generate_cpu_srcs_for_xcode.sh"; + shellScript = "make -f Makefile.gencpu\n"; }; /* End PBXShellScriptBuildPhase section */ /* Begin PBXSourcesBuildPhase section */ - 753252D61F5358D30024025B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 753252E91F535A0C0024025B /* build68k.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 753252EF1F535E1E0024025B /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 753253021F535F210024025B /* gencpu.c in Sources */, - 753253201F53650F0024025B /* readcpu.cpp in Sources */, - 753253151F5363400024025B /* defs68k.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; 7539DFAE1F23B17E006B2DF2 /* Sources */ = { isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( + E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, @@ -994,7 +814,6 @@ E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, - 753252EE1F535DD10024025B /* defs68k.c in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, @@ -1070,29 +889,6 @@ }; /* End PBXSourcesBuildPhase section */ -/* Begin PBXTargetDependency section */ - 7532530C1F53611F0024025B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 753252D91F5358D30024025B /* build68k */; - targetProxy = 7532530B1F53611F0024025B /* PBXContainerItemProxy */; - }; - 7532531B1F5364030024025B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 753252F21F535E1E0024025B /* gencpu */; - targetProxy = 7532531A1F5364030024025B /* PBXContainerItemProxy */; - }; - 7532531D1F53640B0024025B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 753253071F5360E30024025B /* run_build68k */; - targetProxy = 7532531C1F53640B0024025B /* PBXContainerItemProxy */; - }; - 7532531F1F5364170024025B /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 753253161F5363D20024025B /* run_gencpu */; - targetProxy = 7532531E1F5364170024025B /* PBXContainerItemProxy */; - }; -/* End PBXTargetDependency section */ - /* Begin PBXVariantGroup section */ 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { isa = PBXVariantGroup; @@ -1105,70 +901,6 @@ /* End PBXVariantGroup section */ /* Begin XCBuildConfiguration section */ - 753252DE1F5358D30024025B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - 753252DF1F5358D30024025B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; - 753252F81F535E1E0024025B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - 753252F91F535E1E0024025B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - CLANG_CXX_LIBRARY = "libc++"; - GCC_WARN_INHIBIT_ALL_WARNINGS = YES; - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; - 753253091F5360E30024025B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - 7532530A1F5360E30024025B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; - 753253181F5363D20024025B /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Debug; - }; - 753253191F5363D20024025B /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - PRODUCT_NAME = "$(TARGET_NAME)"; - }; - name = Release; - }; 7539DFC41F23B17E006B2DF2 /* Debug */ = { isa = XCBuildConfiguration; buildSettings = { @@ -1384,42 +1116,6 @@ /* End XCBuildConfiguration section */ /* Begin XCConfigurationList section */ - 753252E31F5358D30024025B /* Build configuration list for PBXNativeTarget "build68k" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 753252DE1F5358D30024025B /* Debug */, - 753252DF1F5358D30024025B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 753252F71F535E1E0024025B /* Build configuration list for PBXNativeTarget "gencpu" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 753252F81F535E1E0024025B /* Debug */, - 753252F91F535E1E0024025B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 753253081F5360E30024025B /* Build configuration list for PBXLegacyTarget "run_build68k" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 753253091F5360E30024025B /* Debug */, - 7532530A1F5360E30024025B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 753253171F5363D20024025B /* Build configuration list for PBXLegacyTarget "run_gencpu" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 753253181F5363D20024025B /* Debug */, - 753253191F5363D20024025B /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */ = { isa = XCConfigurationList; buildConfigurations = ( diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu new file mode 100644 index 000000000..2e2ec45e0 --- /dev/null +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -0,0 +1,27 @@ +SRC = $(PROJECT_DIR)/../uae_cpu +DST = $(BUILT_PRODUCTS_DIR)/gencpu_output +VPATH = $(SRC) +CFLAGS = -DUSE_XCODE=1 -I. -I../uae_cpu -I../UNIX +CXXFLAGS = -stdlib=libc++ $(CFLAGS) +OBJS = $(addprefix $(DST)/, defs68k.o gencpu.o readcpu.o) + +all: $(DST)/gencpu + cd $(DST); ./gencpu + +$(DST)/gencpu: $(OBJS) + $(CXX) $(CXXFLAGS) -o $@ $^ + +$(DST)/%.o: %.c + $(CC) $(CFLAGS) -o $@ -c $< + +$(DST)/%.o: %.cpp + $(CXX) $(CXXFLAGS) -o $@ -c $< + +$(DST)/defs68k.c: $(DST)/build68k + $< < $(SRC)/table68k > $@ + +$(DST)/build68k: $(SRC)/build68k.c + mkdir -p $(DST) + $(CC) $(CFLAGS) -o $@ $< + +clean:; rm -fr $(DST) diff --git a/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh b/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh deleted file mode 100755 index 3a34fc014..000000000 --- a/BasiliskII/src/MacOSX/run_build68k_for_xcode.sh +++ /dev/null @@ -1,37 +0,0 @@ -#!/bin/bash -e - -# -# run_build68k_for_xcode.sh -# -# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts -# - -if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then - echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" - exit 1 -fi - -# Log some debugging information -echo "1=$1" -echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" -echo "PROJECT_DIR=$PROJECT_DIR" - -# Perform actions, given the passed-in build step -case "$1" in - "clean") - echo "Cleaning build68k output(s)" - rm -rf "$BUILT_PRODUCTS_DIR/build68k_output" - ;; - "") - if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then - echo "No built products directory" - exit 1 - fi - echo "Running build68k" - cd "$BUILT_PRODUCTS_DIR" - mkdir -p build68k_output - cd build68k_output - cat "$PROJECT_DIR/../uae_cpu/table68k" | "$BUILT_PRODUCTS_DIR/build68k" > "./defs68k.c" - ls -al - ;; -esac diff --git a/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh b/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh deleted file mode 100755 index 4e68a8960..000000000 --- a/BasiliskII/src/MacOSX/run_gencomp_for_xcode.sh +++ /dev/null @@ -1,37 +0,0 @@ -#!/bin/bash -e - -# -# run_gencomp_for_xcode.sh -# -# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts -# - -if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then - echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" - exit 1 -fi - -# Log some debugging information -echo "1=$1" -echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" -echo "PROJECT_DIR=$PROJECT_DIR" - -# Perform actions, given the passed-in build step -case "$1" in - "clean") - echo "Cleaning gencomp output(s)" - rm -rf "$BUILT_PRODUCTS_DIR/gencomp_output" - ;; - "") - if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then - echo "No built products directory" - exit 1 - fi - echo "Running gencomp" - cd "$BUILT_PRODUCTS_DIR" - mkdir -p gencomp_output - cd gencomp_output - "$BUILT_PRODUCTS_DIR/gencomp" - ls -al - ;; -esac diff --git a/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh b/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh deleted file mode 100755 index e457b8faf..000000000 --- a/BasiliskII/src/MacOSX/run_gencpu_for_xcode.sh +++ /dev/null @@ -1,37 +0,0 @@ -#!/bin/bash -e - -# -# run_gemcpu_for_xcode.sh -# -# Generates files for 68k emulation, via UAE's virtual cpu, for use on Mac OS X hosts -# - -if [ ! "$BUILT_PRODUCTS_DIR" ] || [ ! "$PROJECT_DIR" ]; then - echo "ERROR: $(basename $0) must be run from an Xcode 'External Build System' target" - exit 1 -fi - -# Log some debugging information -echo "1=$1" -echo "BUILT_PRODUCTS_DIR=$BUILT_PRODUCTS_DIR" -echo "PROJECT_DIR=$PROJECT_DIR" - -# Perform actions, given the passed-in build step -case "$1" in - "clean") - echo "Cleaning gencpu output(s)" - rm -rf "$BUILT_PRODUCTS_DIR/gencpu_output" - ;; - "") - if [ ! -d "$BUILT_PRODUCTS_DIR" ]; then - echo "No built products directory" - exit 1 - fi - echo "Running gencpu" - cd "$BUILT_PRODUCTS_DIR" - mkdir -p gencpu_output - cd gencpu_output - "$BUILT_PRODUCTS_DIR/gencpu" - ls -al - ;; -esac From 193a7d56c5fc794444f72d8d8cfc28c438a4b1db Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Wed, 22 Jan 2020 10:51:16 +0900 Subject: [PATCH 315/534] Update README.md --- README.md | 1 - 1 file changed, 1 deletion(-) diff --git a/README.md b/README.md index 4288062a5..24dedbe68 100644 --- a/README.md +++ b/README.md @@ -16,7 +16,6 @@ These builds need to be installed SDL2.0.10+ framework/library. ##### macOS 1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj 1. Set Build Configuration to Release -1. If building with Xcode10+, set File -> Project Settings -> Build System to Legacy Build System. 1. Build ##### Linux(x86) From 63ddee1be13f0d9cdcf1c75e2707b9fa8a4dad68 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Wed, 22 Jan 2020 02:35:11 -0600 Subject: [PATCH 316/534] Set areg 7 to 0x2000 on m68k reset --- BasiliskII/src/uae_cpu/newcpu.cpp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index 382b2d941..0832df820 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -1020,7 +1020,11 @@ void m68k_reset (void) // (it is definitely better than what it was before this commit // since it was reading from 0x00000000 in User mode and with active MMU) mmu_set_tc(regs.tc & ~0x8000); /* disable mmu */ +#if 0 m68k_areg (regs, 7) = phys_get_long(0x00000000); +#else + m68k_areg (regs, 7) = 0x2000; +#endif #if 0 m68k_setpc (phys_get_long(0x00000004)); #else From cfcfde04802579a3528fad1a6907caa1b7410b29 Mon Sep 17 00:00:00 2001 From: uyjulian Date: Wed, 22 Jan 2020 02:35:48 -0600 Subject: [PATCH 317/534] Use locking on idle wait cond --- BasiliskII/src/Unix/timer_unix.cpp | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Unix/timer_unix.cpp b/BasiliskII/src/Unix/timer_unix.cpp index 6fb8cf3e1..aa2e285c4 100644 --- a/BasiliskII/src/Unix/timer_unix.cpp +++ b/BasiliskII/src/Unix/timer_unix.cpp @@ -386,8 +386,16 @@ void idle_wait(void) void idle_resume(void) { //This causes events to not process randomly in JIT so commented out - if (idle_cond) - SDL_CondSignal(idle_cond); + if (idle_lock) + { + SDL_LockMutex(idle_lock); + if (idle_cond) + { + SDL_CondSignal(idle_cond); + } + SDL_UnlockMutex(idle_lock); + } + // #ifdef IDLE_USES_COND_WAIT // pthread_cond_signal(&idle_cond); // #else From 36b6d0769b71954577a75f7e8b7d5f040c0cc55c Mon Sep 17 00:00:00 2001 From: uyjulian Date: Wed, 22 Jan 2020 02:41:06 -0600 Subject: [PATCH 318/534] Zero out memory --- BasiliskII/src/Unix/main_unix.cpp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index f7dcc682d..e7879bbc3 100644 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -394,6 +394,7 @@ int main(int argc, char **argv) ErrorAlert(STR_NO_MEM_ERR); QuitEmulator(); } + memset(ram_rom_area, 0, RAMSize + 0x100000); RAMBaseHost = ram_rom_area; ROMBaseHost = RAMBaseHost + RAMSize; } @@ -405,6 +406,7 @@ int main(int argc, char **argv) ErrorAlert(STR_NO_MEM_ERR); QuitEmulator(); } + memset(ScratchMem, 0, SCRATCH_MEM_SIZE); ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block #endif From 2e001f465e3f88b7e792a1cfbabfa6d5b11ac7aa Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 28 Jan 2020 22:33:13 +0900 Subject: [PATCH 319/534] fixed autoconf build for macOS --- BasiliskII/src/Unix/Darwin/testlmem.sh | 2 ++ BasiliskII/src/Unix/configure.ac | 2 +- SheepShaver/src/CrossPlatform/sigsegv.cpp | 10 ++++++++-- SheepShaver/src/Unix/.gitignore | 2 ++ SheepShaver/src/Unix/Makefile.in | 10 +++++++--- SheepShaver/src/Unix/configure.ac | 2 +- 6 files changed, 21 insertions(+), 7 deletions(-) diff --git a/BasiliskII/src/Unix/Darwin/testlmem.sh b/BasiliskII/src/Unix/Darwin/testlmem.sh index 3c07f4375..b252c83ed 100755 --- a/BasiliskII/src/Unix/Darwin/testlmem.sh +++ b/BasiliskII/src/Unix/Darwin/testlmem.sh @@ -20,6 +20,8 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +sw_vers > /dev/null && exit 0 + PAGEZERO_SIZE=0x2000 [[ -n "$1" ]] && PAGEZERO_SIZE=$1 # You want all the output to go to stderr so that configure is quiet but diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 9bfae2533..afa459c0b 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -39,7 +39,7 @@ AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX d AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl JIT compiler options. -AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=yes]) +AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=no]) AC_ARG_ENABLE(jit-debug, [ --enable-jit-debug activate native code disassemblers [default=no]], [WANT_JIT_DEBUG=$enableval], [WANT_JIT_DEBUG=no]) dnl FPU emulation core. diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 69b48238f..244c9ac2f 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2608,8 +2608,14 @@ sigsegv_address_t sigsegv_get_fault_instruction_address(sigsegv_info_t *SIP) #if defined(__APPLE__) && defined(__x86_64__) -extern uint8_t gZeroPage[0x3000], gKernelData[0x2000]; -extern uint32_t RAMBase, ROMBase, ROMEnd; +#ifdef CONFIGURE_TEST_SIGSEGV_RECOVERY +#define EXTERN +#else +#define EXTERN extern +#endif + +EXTERN uint8_t gZeroPage[0x3000], gKernelData[0x2000]; +EXTERN uint32_t RAMBase, ROMBase, ROMEnd; template T safeLoad(uint32_t a) { if (a < 0x3000) return *(T *)&gZeroPage[a]; diff --git a/SheepShaver/src/Unix/.gitignore b/SheepShaver/src/Unix/.gitignore index 0461f22ec..8c6ac66f7 100644 --- a/SheepShaver/src/Unix/.gitignore +++ b/SheepShaver/src/Unix/.gitignore @@ -21,5 +21,7 @@ dyngen # Generated files from the Xcode build basic-dyngen-ops-x86_32.hpp basic-dyngen-ops-x86_64.hpp +basic-dyngen-ops-x86_64_macos.hpp ppc-dyngen-ops-x86_32.hpp ppc-dyngen-ops-x86_64.hpp +ppc-dyngen-ops-x86_64_macos.hpp diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in index 350ec4b0b..ed6148a47 100644 --- a/SheepShaver/src/Unix/Makefile.in +++ b/SheepShaver/src/Unix/Makefile.in @@ -176,7 +176,7 @@ uninstall: clean: rm -f $(PROGS) $(OBJ_DIR)/* core* *.core *~ *.bak ppc-execute-impl.cpp - rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc_asm.out.s + rm -f dyngen {basic,ppc}-dyngen-ops*.hpp ppc_asm.out.s rm -rf $(APP_APP) $(GUI_APP_APP) distclean: clean @@ -216,18 +216,22 @@ ifeq ($(USE_DYNGEN),yes) DYNGENDEPS = basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ifeq ($(USE_DYNGEN_PRECOMPILED),yes) -basic-dyngen-ops.hpp: dyngen_precompiled/basic-dyngen-ops.hpp basic-dyngen-ops-x86_32.hpp basic-dyngen-ops-x86_64.hpp +basic-dyngen-ops.hpp: dyngen_precompiled/basic-dyngen-ops.hpp basic-dyngen-ops-x86_32.hpp basic-dyngen-ops-x86_64.hpp basic-dyngen-ops-x86_64_macos.hpp cp -f $< $@ basic-dyngen-ops-x86_32.hpp: dyngen_precompiled/basic-dyngen-ops-x86_32.hpp cp -f $< $@ basic-dyngen-ops-x86_64.hpp: dyngen_precompiled/basic-dyngen-ops-x86_64.hpp cp -f $< $@ -ppc-dyngen-ops.hpp: dyngen_precompiled/ppc-dyngen-ops.hpp ppc-dyngen-ops-x86_32.hpp ppc-dyngen-ops-x86_64.hpp +basic-dyngen-ops-x86_64_macos.hpp: dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp + cp -f $< $@ +ppc-dyngen-ops.hpp: dyngen_precompiled/ppc-dyngen-ops.hpp ppc-dyngen-ops-x86_32.hpp ppc-dyngen-ops-x86_64.hpp ppc-dyngen-ops-x86_64_macos.hpp cp -f $< $@ ppc-dyngen-ops-x86_32.hpp: dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp cp -f $< $@ ppc-dyngen-ops-x86_64.hpp: dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp cp -f $< $@ +ppc-dyngen-ops-x86_64_macos.hpp: dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp + cp -f $< $@ else # Only GCC is supported for generating synthetic opcodes $(DYNGEN): $(DYNGENOBJS) diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 749ebdff4..81ffbdd4e 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -34,7 +34,7 @@ AC_ARG_ENABLE(ppc-emulator, [ --enable-ppc-emulator use the selected PowerPC AC_ARG_ENABLE(fbdev-dga, [ --enable-fbdev-dga use direct frame buffer access via /dev/fb0 [default=yes]], [WANT_FBDEV_DGA=$enableval], [WANT_FBDEV_DGA=yes]) AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) -AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) +AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=no]], [WANT_VOSF=$enableval], [WANT_VOSF=no]) AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI prefs editor [default=no]], [WANT_STANDALONE_GUI=$enableval], [WANT_STANDALONE_GUI=no]) AC_ARG_WITH(esd, [ --with-esd support ESD for sound under Linux/FreeBSD [default=yes]], [WANT_ESD=$withval], [WANT_ESD=yes]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], From 7ad9ab0da25a9741df6918b34b0d451963a99876 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Wed, 29 Jan 2020 11:22:52 +0900 Subject: [PATCH 320/534] Update README.md --- README.md | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/README.md b/README.md index 24dedbe68..60804e9dd 100644 --- a/README.md +++ b/README.md @@ -18,6 +18,8 @@ These builds need to be installed SDL2.0.10+ framework/library. 1. Set Build Configuration to Release 1. Build +(or same as Linux) + ##### Linux(x86) ``` $ cd macemu/BasiliskII/src/Unix @@ -36,11 +38,11 @@ $ make 1. Set Build Configuration to Release 1. Build +(or same as Linux) + ##### Linux(x86) ``` -$ cd macemu/SheepShaver -$ make links -$ cd src/Unix +$ cd macemu/SheepShaver/src/Unix $ ./autogen.sh $ make ``` From f5b277548b08d8c8b680cbeb3544821e95e6dae8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 31 Jan 2020 23:31:38 +0900 Subject: [PATCH 321/534] test for #24 --- BasiliskII/src/Unix/configure.ac | 3 +++ BasiliskII/src/Unix/main_unix.cpp | 4 ++++ 2 files changed, 7 insertions(+) mode change 100644 => 100755 BasiliskII/src/Unix/main_unix.cpp diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index afa459c0b..9fa68ca21 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -881,6 +881,9 @@ if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" ;; esac + if [[ "$WANT_GTK" != "no" ]]; then + LIBS="$LIBS -lX11" + fi fi elif [[ "x$WANT_MACOSX_GUI" != "xyes" ]]; then VIDEOSRCS="video_x.cpp" diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp old mode 100644 new mode 100755 index 48d05e227..4243744bb --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -63,6 +63,7 @@ struct sigstate { # ifdef HAVE_GNOMEUI # include # endif +# include #endif #ifdef ENABLE_XF86_DGA @@ -384,6 +385,9 @@ static void usage(const char *prg_name) int main(int argc, char **argv) { +#ifdef ENABLE_GTK + XInitThreads(); +#endif const char *vmdir = NULL; char str[256]; From 19033a4a39acba60c9d7de135362a70dcfc20a51 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 1 Feb 2020 20:44:32 +0900 Subject: [PATCH 322/534] same fix for SS --- SheepShaver/src/Unix/configure.ac | 3 +++ SheepShaver/src/Unix/main_unix.cpp | 4 ++++ 2 files changed, 7 insertions(+) diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 81ffbdd4e..7c546e27f 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -764,6 +764,9 @@ if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then CPPFLAGS="$CPPFLAGS -I../MacOSX" else EXTRASYSSRCS="$EXTRASYSSRCS ../dummy/clip_dummy.cpp" + if [[ "$WANT_GTK" != "no" ]]; then + LIBS="$LIBS -lX11" + fi fi else VIDEOSRCS="video_x.cpp" diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 34c104cc7..ad3526071 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -133,6 +133,7 @@ #ifdef ENABLE_GTK #include +#include #endif #ifdef ENABLE_XF86_DGA @@ -728,6 +729,9 @@ static bool init_sdl() int main(int argc, char **argv) { +#ifdef ENABLE_GTK + XInitThreads(); +#endif char str[256]; bool memory_mapped_from_zero, ram_rom_areas_contiguous; const char *vmdir = NULL; From eb35678f0df40ac4fb7c1dcb7101b2099d90c406 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 4 Feb 2020 06:25:12 -0800 Subject: [PATCH 323/534] add missing common prefs multiple values; remove platform prefs from unix that are common prefs --- BasiliskII/src/Unix/prefs_unix.cpp | 4 ---- BasiliskII/src/prefs_items.cpp | 8 ++++---- 2 files changed, 4 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index 4ab21b6a2..d277a336c 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -31,11 +31,7 @@ using std::string; // Platform-specific preferences items prefs_desc platform_prefs_items[] = { - {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, - {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, {"fbdevicefile", TYPE_STRING, false, "path of frame buffer device specification file"}, - {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, - {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, {"dsp", TYPE_STRING, false, "audio output (dsp) device name"}, {"mixer", TYPE_STRING, false, "audio mixer device name"}, #ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 99f818edd..033b119bb 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -68,10 +68,10 @@ prefs_desc common_prefs_items[] = { {"jitinline", TYPE_BOOLEAN, false, "enable translation through constant jumps"}, {"jitblacklist", TYPE_STRING, false, "blacklist opcodes from translation"}, {"keyboardtype", TYPE_INT32, false, "hardware keyboard type"}, - {"keycodes",TYPE_BOOLEAN,false,"use raw keycode"}, - {"keycodefile",TYPE_STRING,"Keycode file"}, - {"mousewheelmode",TYPE_BOOLEAN,"Use WheelMode"}, - {"mousewheellines",TYPE_INT32,"wheel line nb"}, + {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, + {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, + {"mousewheelmode", TYPE_INT32, false, "mouse wheel support (0=page up/down, 1=cursor up/down)"}, + {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, {"hotkey",TYPE_INT32,false,"hotkey modifier"}, {"scale_nearest",TYPE_BOOLEAN,false,"nearest neighbor scaling"}, {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, From 57b3f7cf21f73d7445837adc0b997810f65ce83a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 5 Feb 2020 15:22:58 +0900 Subject: [PATCH 324/534] keymap test --- BasiliskII/src/SDL/video_sdl2.cpp | 58 ++++++++++--------------------- 1 file changed, 19 insertions(+), 39 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 42247b213..0532e7b4b 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -68,6 +68,9 @@ #define DEBUG 0 #include "debug.h" +#define CODE_INVALID -1 +#define CODE_HOTKEY -2 + // Supported video modes using std::vector; static vector VideoModes; @@ -1207,7 +1210,7 @@ static void keycode_init(void) // Default translation table for (int i=0; i<256; i++) - keycode_table[i] = -1; + keycode_table[i] = CODE_INVALID; // Search for server vendor string, then read keycodes const char * video_driver = SDL_GetCurrentVideoDriver(); @@ -1893,27 +1896,6 @@ void video_set_cursor(void) * Keyboard-related utilify functions */ -static bool is_modifier_key(SDL_KeyboardEvent const & e) -{ - switch (e.keysym.sym) { - case SDLK_NUMLOCKCLEAR: - case SDLK_CAPSLOCK: - case SDLK_SCROLLLOCK: - case SDLK_RSHIFT: - case SDLK_LSHIFT: - case SDLK_RCTRL: - case SDLK_LCTRL: - case SDLK_RALT: - case SDLK_LALT: - case SDLK_RGUI: - case SDLK_LGUI: - case SDLK_MODE: - case SDLK_APPLICATION: - return true; - } - return false; -} - static bool is_hotkey_down(SDL_Keysym const & ks) { int hotkey = PrefsFindInt32("hotkey"); @@ -1925,8 +1907,8 @@ static bool is_hotkey_down(SDL_Keysym const & ks) /* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey + * Translate key event to Mac keycode, returns CODE_INVALID if no keycode was found + * and CODE_HOTKEY if the key was recognized as a hotkey */ static int kc_decode(SDL_Keysym const & ks, bool key_down) @@ -1982,8 +1964,8 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return CODE_HOTKEY;} else return 0x30; + case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return CODE_HOTKEY;} else return 0x24; case SDLK_SPACE: return 0x31; case SDLK_BACKSPACE: return 0x33; @@ -2018,9 +2000,9 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_LEFT: return 0x3b; case SDLK_RIGHT: return 0x3c; - case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return CODE_HOTKEY;} else return 0x35; - case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return CODE_HOTKEY;} else return 0x7a; case SDLK_F2: return 0x78; case SDLK_F3: return 0x63; case SDLK_F4: return 0x76; @@ -2056,7 +2038,7 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_KP_EQUALS: return 0x51; } D(bug("Unhandled SDL keysym: %d\n", ks.sym)); - return -1; + return CODE_INVALID; } static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) @@ -2209,11 +2191,10 @@ static void handle_events(void) // Keyboard case SDL_KEYDOWN: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else + int code = CODE_INVALID; + if (use_keycodes && event2keycode(event.key, true) != CODE_HOTKEY) + code = keycode_table[event.key.keysym.scancode & 0xff]; + if (code == CODE_INVALID) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { @@ -2240,11 +2221,10 @@ static void handle_events(void) break; } case SDL_KEYUP: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else + int code = CODE_INVALID; + if (use_keycodes && event2keycode(event.key, false) != CODE_HOTKEY) + code = keycode_table[event.key.keysym.scancode & 0xff]; + if (code == CODE_INVALID) code = event2keycode(event.key, false); if (code >= 0) { ADBKeyUp(code); From 899734d81d1d09a9a287c24605078f7b5962763a Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Wed, 5 Feb 2020 04:30:17 -0600 Subject: [PATCH 325/534] Removing core audio flag for BII builds --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 -- 1 file changed, 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index ec3f4e8ab..b9eb7180f 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1399,7 +1399,6 @@ "DEBUG=1", "USE_SDL_AUDIO=1", "BINCUE=1", - "OSX_CORE_AUDIO=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1458,7 +1457,6 @@ HAVE_CONFIG_H, "USE_XCODE=1", "USE_SDL_AUDIO=1", - "OSX_CORE_AUDIO=1", "BINCUE=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; From 1a875b1c10ca0b6ecf187d0181cd80fcad6d820b Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 7 Feb 2020 11:04:02 +0900 Subject: [PATCH 326/534] in case backend is not X --- BasiliskII/src/Unix/Makefile.in | 2 +- BasiliskII/src/Unix/main_unix.cpp | 6 ++++-- SheepShaver/src/Unix/Makefile.in | 2 +- SheepShaver/src/Unix/main_unix.cpp | 4 +++- 4 files changed, 9 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 42f1b049f..6d04f350a 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -21,7 +21,7 @@ CFLAGS = @CFLAGS@ CXXFLAGS = @CXXFLAGS@ CPUINCLUDES_FLAGS=@CPUINCLUDES@ CPUINCLUDES_FLAGS:=$(CPUINCLUDES_FLAGS:-I%=-I@top_srcdir@/%) -CPPFLAGS = @CPPFLAGS@ -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -I@top_srcdir@/../slirp +CPPFLAGS = @CPPFLAGS@ -I/opt/X11/include -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -I@top_srcdir@/../slirp DEFS = @DEFS@ @DEFINES@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 4243744bb..e16227587 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -63,7 +63,9 @@ struct sigstate { # ifdef HAVE_GNOMEUI # include # endif -# include +# ifndef GDK_WINDOWING_WAYLAND +# include +# endif #endif #ifdef ENABLE_XF86_DGA @@ -385,7 +387,7 @@ static void usage(const char *prg_name) int main(int argc, char **argv) { -#ifdef ENABLE_GTK +#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_WAYLAND) XInitThreads(); #endif const char *vmdir = NULL; diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in index ed6148a47..f190e0ada 100644 --- a/SheepShaver/src/Unix/Makefile.in +++ b/SheepShaver/src/Unix/Makefile.in @@ -17,7 +17,7 @@ CC = @CC@ CXX = @CXX@ CFLAGS = @CFLAGS@ CXXFLAGS = @CXXFLAGS@ -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform -I../slirp +CPPFLAGS = @CPPFLAGS@ -I/opt/X11/include -I../include -I. -I../CrossPlatform -I../slirp DEFS = @DEFS@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index ad3526071..98920bc0a 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -133,8 +133,10 @@ #ifdef ENABLE_GTK #include +#ifndef GDK_WINDOWING_WAYLAND #include #endif +#endif #ifdef ENABLE_XF86_DGA #include @@ -729,7 +731,7 @@ static bool init_sdl() int main(int argc, char **argv) { -#ifdef ENABLE_GTK +#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_WAYLAND) XInitThreads(); #endif char str[256]; From bb691458619afb09e80e6a4f2da23796d9cb2c29 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 6 Feb 2020 18:12:23 -0800 Subject: [PATCH 327/534] OulanB's adb button buffer proposed change --- BasiliskII/src/adb.cpp | 101 +++++++++++++++++++++++++++++++++++++---- 1 file changed, 92 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/adb.cpp b/BasiliskII/src/adb.cpp index c05c00008..5ab2b5b32 100644 --- a/BasiliskII/src/adb.cpp +++ b/BasiliskII/src/adb.cpp @@ -57,6 +57,11 @@ const int KEY_BUFFER_SIZE = 16; static uint8 key_buffer[KEY_BUFFER_SIZE]; static unsigned int key_read_ptr = 0, key_write_ptr = 0; +// O2S: Button event buffer (Mac button with up/down flag) -> avoid to loose tap on a trackpad +const int BUTTON_BUFFER_SIZE = 32; +static uint8 button_buffer[BUTTON_BUFFER_SIZE]; +static unsigned int button_read_ptr = 0, button_write_ptr = 0; + static uint8 mouse_reg_3[2] = {0x63, 0x01}; // Mouse ADB register 3 static uint8 key_reg_2[2] = {0xff, 0xff}; // Keyboard ADB register 2 @@ -245,13 +250,17 @@ void ADBMouseMoved(int x, int y) } -/* +/* * Mouse button pressed */ void ADBMouseDown(int button) { - mouse_button[button] = true; + // O2S: Add button to buffer + button_buffer[button_write_ptr] = button; + button_write_ptr = (button_write_ptr + 1) % BUTTON_BUFFER_SIZE; + + // O2S: mouse_button[button] = true; SetInterruptFlag(INTFLAG_ADB); TriggerInterrupt(); } @@ -263,7 +272,11 @@ void ADBMouseDown(int button) void ADBMouseUp(int button) { - mouse_button[button] = false; + // O2S: Add button to buffer + button_buffer[button_write_ptr] = button | 0x80; + button_write_ptr = (button_write_ptr + 1) % BUTTON_BUFFER_SIZE; + + // O2S: mouse_button[button] = false; SetInterruptFlag(INTFLAG_ADB); TriggerInterrupt(); } @@ -278,7 +291,7 @@ void ADBSetRelMouseMode(bool relative) if (relative_mouse != relative) { relative_mouse = relative; mouse_x = mouse_y = 0; - } + } } @@ -347,7 +360,40 @@ void ADBInterrupt(void) uint32 mouse_base = adb_base + 16; if (relative_mouse) { - + while (mx != 0 || my != 0 || button_read_ptr != button_write_ptr) { + if (button_read_ptr != button_write_ptr) { + // Read button event + uint8 button = button_buffer[button_read_ptr]; + button_read_ptr = (button_read_ptr + 1) % BUTTON_BUFFER_SIZE; + mouse_button[button & 0x3] = (button & 0x80) ? false : true; + } + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mouse_button[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mouse_button[1] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mouse_button[2] ? 0x08 : 0x88)); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mouse_button[0] ? 0 : 0x80)); + WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mouse_button[1] ? 0 : 0x80)); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mouse_button[0]; + old_mouse_button[1] = mouse_button[1]; + old_mouse_button[2] = mouse_button[2]; + mx = 0; + my = 0; + } +/* O2S // Mouse movement (relative) and buttons if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { @@ -363,7 +409,7 @@ void ADBInterrupt(void) WriteMacInt8(tmp_data, 2); WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - } + } r.a[0] = tmp_data; r.a[1] = ReadMacInt32(mouse_base); r.a[2] = ReadMacInt32(mouse_base + 4); @@ -375,7 +421,7 @@ void ADBInterrupt(void) old_mouse_button[1] = mb[1]; old_mouse_button[2] = mb[2]; } - +*/ } else { // Update mouse position (absolute) @@ -405,7 +451,44 @@ void ADBInterrupt(void) old_mouse_y = my; } - // Send mouse button events + // O2S: Process accumulated button events + while (button_read_ptr != button_write_ptr) { + // Read button event + uint8 button = button_buffer[button_read_ptr]; + button_read_ptr = (button_read_ptr + 1) % BUTTON_BUFFER_SIZE; + mouse_button[button & 0x3] = (button & 0x80) ? false : true; + + if (mouse_button[0] != old_mouse_button[0] || mouse_button[1] != old_mouse_button[1] || mouse_button[2] != old_mouse_button[2]) { + uint32 mouse_base = adb_base + 16; + + // Call mouse ADB handler + if (mouse_reg_3[1] == 4) { + // Extended mouse protocol + WriteMacInt8(tmp_data, 3); + WriteMacInt8(tmp_data + 1, mouse_button[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mouse_button[1] ? 0 : 0x80); + WriteMacInt8(tmp_data + 3, mouse_button[2] ? 0x08 : 0x88); + } else { + // 100/200 dpi mode + WriteMacInt8(tmp_data, 2); + WriteMacInt8(tmp_data + 1, mouse_button[0] ? 0 : 0x80); + WriteMacInt8(tmp_data + 2, mouse_button[1] ? 0 : 0x80); + } + r.a[0] = tmp_data; + r.a[1] = ReadMacInt32(mouse_base); + r.a[2] = ReadMacInt32(mouse_base + 4); + r.a[3] = adb_base; + r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 + Execute68k(r.a[1], &r); + + old_mouse_button[0] = mouse_button[0]; + old_mouse_button[1] = mouse_button[1]; + old_mouse_button[2] = mouse_button[2]; + } + } + + +/* // Send mouse button events if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { uint32 mouse_base = adb_base + 16; @@ -432,7 +515,7 @@ void ADBInterrupt(void) old_mouse_button[0] = mb[0]; old_mouse_button[1] = mb[1]; old_mouse_button[2] = mb[2]; - } + } */ } // Process accumulated keyboard events From f86b9b2abd9d1880f505302361dfaa9684bc2ab0 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Thu, 6 Feb 2020 18:14:16 -0800 Subject: [PATCH 328/534] Actually remove the commented-out code --- BasiliskII/src/adb.cpp | 59 +----------------------------------------- 1 file changed, 1 insertion(+), 58 deletions(-) diff --git a/BasiliskII/src/adb.cpp b/BasiliskII/src/adb.cpp index 5ab2b5b32..f89c40925 100644 --- a/BasiliskII/src/adb.cpp +++ b/BasiliskII/src/adb.cpp @@ -393,35 +393,7 @@ void ADBInterrupt(void) mx = 0; my = 0; } -/* O2S - // Mouse movement (relative) and buttons - if (mx != 0 || my != 0 || mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 3, ((my >> 3) & 0x70) | ((mx >> 7) & 0x07) | (mb[2] ? 0x08 : 0x88)); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, (my & 0x7f) | (mb[0] ? 0 : 0x80)); - WriteMacInt8(tmp_data + 2, (mx & 0x7f) | (mb[1] ? 0 : 0x80)); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } -*/ + } else { // Update mouse position (absolute) @@ -487,35 +459,6 @@ void ADBInterrupt(void) } } - -/* // Send mouse button events - if (mb[0] != old_mouse_button[0] || mb[1] != old_mouse_button[1] || mb[2] != old_mouse_button[2]) { - uint32 mouse_base = adb_base + 16; - - // Call mouse ADB handler - if (mouse_reg_3[1] == 4) { - // Extended mouse protocol - WriteMacInt8(tmp_data, 3); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - WriteMacInt8(tmp_data + 3, mb[2] ? 0x08 : 0x88); - } else { - // 100/200 dpi mode - WriteMacInt8(tmp_data, 2); - WriteMacInt8(tmp_data + 1, mb[0] ? 0 : 0x80); - WriteMacInt8(tmp_data + 2, mb[1] ? 0 : 0x80); - } - r.a[0] = tmp_data; - r.a[1] = ReadMacInt32(mouse_base); - r.a[2] = ReadMacInt32(mouse_base + 4); - r.a[3] = adb_base; - r.d[0] = (mouse_reg_3[0] << 4) | 0x0c; // Talk 0 - Execute68k(r.a[1], &r); - - old_mouse_button[0] = mb[0]; - old_mouse_button[1] = mb[1]; - old_mouse_button[2] = mb[2]; - } */ } // Process accumulated keyboard events From ccf38a40052753cc12037c65e8998b963ebf0437 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 7 Feb 2020 11:16:59 +0900 Subject: [PATCH 329/534] condition modified --- BasiliskII/src/Unix/main_unix.cpp | 4 ++-- SheepShaver/src/Unix/main_unix.cpp | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index e16227587..69b85d9ef 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -63,7 +63,7 @@ struct sigstate { # ifdef HAVE_GNOMEUI # include # endif -# ifndef GDK_WINDOWING_WAYLAND +# if !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) # include # endif #endif @@ -387,7 +387,7 @@ static void usage(const char *prg_name) int main(int argc, char **argv) { -#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_WAYLAND) +#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) XInitThreads(); #endif const char *vmdir = NULL; diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 98920bc0a..0c5b76a1e 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -133,7 +133,7 @@ #ifdef ENABLE_GTK #include -#ifndef GDK_WINDOWING_WAYLAND +#if !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) #include #endif #endif @@ -731,7 +731,7 @@ static bool init_sdl() int main(int argc, char **argv) { -#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_WAYLAND) +#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) XInitThreads(); #endif char str[256]; From 6d2acbb07bfdd51e1d9b72c9840ac2f6b646dfde Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 7 Feb 2020 17:57:44 +0900 Subject: [PATCH 330/534] revert Makefile.in --- BasiliskII/src/Unix/Makefile.in | 2 +- SheepShaver/src/Unix/Makefile.in | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 6d04f350a..42f1b049f 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -21,7 +21,7 @@ CFLAGS = @CFLAGS@ CXXFLAGS = @CXXFLAGS@ CPUINCLUDES_FLAGS=@CPUINCLUDES@ CPUINCLUDES_FLAGS:=$(CPUINCLUDES_FLAGS:-I%=-I@top_srcdir@/%) -CPPFLAGS = @CPPFLAGS@ -I/opt/X11/include -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -I@top_srcdir@/../slirp +CPPFLAGS = @CPPFLAGS@ -I@top_srcdir@/../include -I@top_srcdir@/. -I. -I@top_srcdir@/../CrossPlatform $(CPUINCLUDES_FLAGS) -I@top_srcdir@/../slirp DEFS = @DEFS@ @DEFINES@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in index f190e0ada..ed6148a47 100644 --- a/SheepShaver/src/Unix/Makefile.in +++ b/SheepShaver/src/Unix/Makefile.in @@ -17,7 +17,7 @@ CC = @CC@ CXX = @CXX@ CFLAGS = @CFLAGS@ CXXFLAGS = @CXXFLAGS@ -CPPFLAGS = @CPPFLAGS@ -I/opt/X11/include -I../include -I. -I../CrossPlatform -I../slirp +CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../CrossPlatform -I../slirp DEFS = @DEFS@ -D_REENTRANT -DDATADIR=\"$(datadir)/$(APP)\" LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ From 28e04851567be14a754fa34fcbccec355f37778f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 10 Feb 2020 21:48:32 +0900 Subject: [PATCH 331/534] SS: deleted sigsegv.cpp and lowmem.c from list of "make links" --- SheepShaver/Makefile | 4 +- SheepShaver/src/Unix/timer_unix.cpp | 402 +--------------------------- 2 files changed, 3 insertions(+), 403 deletions(-) mode change 100644 => 120000 SheepShaver/src/Unix/timer_unix.cpp diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index b29b1f9d4..e9e4ce7e7 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -61,7 +61,7 @@ links: BeOS/audio_beos.cpp BeOS/extfs_beos.cpp BeOS/scsi_beos.cpp \ BeOS/serial_beos.cpp BeOS/sys_beos.cpp BeOS/timer_beos.cpp \ BeOS/xpram_beos.cpp BeOS/SheepDriver BeOS/SheepNet \ - CrossPlatform/sigsegv.h CrossPlatform/sigsegv.cpp CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ + CrossPlatform/sigsegv.h CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ CrossPlatform/video_vosf.h CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ Unix/audio_oss_esd.cpp Unix/bincue_unix.cpp Unix/bincue_unix.h \ Unix/vhd_unix.cpp \ @@ -74,7 +74,7 @@ links: Unix/rpc.h Unix/rpc_unix.cpp Unix/ldscripts \ Unix/tinyxml2.h Unix/tinyxml2.cpp Unix/disk_unix.h \ Unix/disk_sparsebundle.cpp Unix/Darwin/mkstandalone \ - Unix/Darwin/lowmem.c Unix/Darwin/pagezero.c Unix/Darwin/testlmem.sh \ + Unix/Darwin/pagezero.c Unix/Darwin/testlmem.sh \ dummy/audio_dummy.cpp dummy/clip_dummy.cpp dummy/serial_dummy.cpp \ dummy/prefs_editor_dummy.cpp dummy/scsi_dummy.cpp SDL slirp \ MacOSX/sys_darwin.cpp MacOSX/clip_macosx.cpp MacOSX/clip_macosx64.mm \ diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp deleted file mode 100644 index 97372b498..000000000 --- a/SheepShaver/src/Unix/timer_unix.cpp +++ /dev/null @@ -1,401 +0,0 @@ -/* - * timer_unix.cpp - Time Manager emulation, Unix specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "macos_util.h" -#include "timer.h" - -#include - -#define DEBUG 0 -#include "debug.h" - -// For NetBSD with broken pthreads headers -#ifndef CLOCK_REALTIME -#define CLOCK_REALTIME 0 -#endif - -#if defined(__MACH__) -#include -#include - -static clock_serv_t host_clock; -static bool host_clock_inited = false; - -static inline void mach_current_time(tm_time_t &t) { - if(!host_clock_inited) { - host_get_clock_service(mach_host_self(), SYSTEM_CLOCK, &host_clock); - host_clock_inited = true; - } - - clock_get_time(host_clock, (mach_timespec_t *)&t); -} -#endif - - -/* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); -#if defined(__MACH__) - tm_time_t t; - mach_current_time(t); - uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#elif defined(HAVE_CLOCK_GETTIME) - struct timespec t; - clock_gettime(CLOCK_REALTIME, &t); - uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#else - struct timeval t; - gettimeofday(&t, NULL); - uint64 tl = (uint64)t.tv_sec * 1000000 + t.tv_usec; -#endif - hi = tl >> 32; - lo = tl; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - return TimeToMacTime(time(NULL)); -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ -#if defined(__MACH__) - mach_current_time(t); -#elif defined(HAVE_CLOCK_GETTIME) - clock_gettime(CLOCK_REALTIME, &t); -#else - gettimeofday(&t, NULL); -#endif -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ -#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) - res.tv_sec = a.tv_sec + b.tv_sec; - res.tv_nsec = a.tv_nsec + b.tv_nsec; - if (res.tv_nsec >= 1000000000) { - res.tv_sec++; - res.tv_nsec -= 1000000000; - } -#else - res.tv_sec = a.tv_sec + b.tv_sec; - res.tv_usec = a.tv_usec + b.tv_usec; - if (res.tv_usec >= 1000000) { - res.tv_sec++; - res.tv_usec -= 1000000; - } -#endif -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ -#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) - res.tv_sec = a.tv_sec - b.tv_sec; - res.tv_nsec = a.tv_nsec - b.tv_nsec; - if (res.tv_nsec < 0) { - res.tv_sec--; - res.tv_nsec += 1000000000; - } -#else - res.tv_sec = a.tv_sec - b.tv_sec; - res.tv_usec = a.tv_usec - b.tv_usec; - if (res.tv_usec < 0) { - res.tv_sec--; - res.tv_usec += 1000000; - } -#endif -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ -#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) - if (a.tv_sec == b.tv_sec) - return a.tv_nsec - b.tv_nsec; - else - return a.tv_sec - b.tv_sec; -#else - if (a.tv_sec == b.tv_sec) - return a.tv_usec - b.tv_usec; - else - return a.tv_sec - b.tv_sec; -#endif -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ -#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) - if (mactime > 0) { - // Time in milliseconds - res.tv_sec = mactime / 1000; - res.tv_nsec = (mactime % 1000) * 1000000; - } else { - // Time in negative microseconds - res.tv_sec = -mactime / 1000000; - res.tv_nsec = (-mactime % 1000000) * 1000; - } -#else - if (mactime > 0) { - // Time in milliseconds - res.tv_sec = mactime / 1000; - res.tv_usec = (mactime % 1000) * 1000; - } else { - // Time in negative microseconds - res.tv_sec = -mactime / 1000000; - res.tv_usec = -mactime % 1000000; - } -#endif -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime.tv_sec < 0) - return 0; - else { -#if defined(HAVE_CLOCK_GETTIME) || defined(__MACH__) - uint64 t = (uint64)hosttime.tv_sec * 1000000 + hosttime.tv_nsec / 1000; -#else - uint64 t = (uint64)hosttime.tv_sec * 1000000 + hosttime.tv_usec; -#endif - if (t > 0x7fffffff) - return t / 1000; // Time in milliseconds - else - return -t; // Time in negative microseconds - } -} - - -/* - * Get current value of microsecond timer - */ - -uint64 GetTicks_usec(void) -{ -#if defined(__MACH__) - tm_time_t t; - mach_current_time(t); - return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#elif defined(HAVE_CLOCK_GETTIME) - struct timespec t; - clock_gettime(CLOCK_REALTIME, &t); - return (uint64)t.tv_sec * 1000000 + t.tv_nsec / 1000; -#else - struct timeval t; - gettimeofday(&t, NULL); - return (uint64)t.tv_sec * 1000000 + t.tv_usec; -#endif -} - - -/* - * Delay by specified number of microseconds (<1 second) - * (adapted from SDL_Delay() source; this function is designed to provide - * the highest accuracy possible) - */ - -#if defined(linux) -// Linux select() changes its timeout parameter upon return to contain -// the remaining time. Most other unixen leave it unchanged or undefined. -#define SELECT_SETS_REMAINING -#elif defined(__FreeBSD__) || defined(__sun__) || (defined(__MACH__) && defined(__APPLE__)) -#define USE_NANOSLEEP -#elif defined(HAVE_PTHREADS) && defined(sgi) -// SGI pthreads has a bug when using pthreads+signals+nanosleep, -// so instead of using nanosleep, wait on a CV which is never signalled. -#include -#define USE_COND_TIMEDWAIT -#endif - -void Delay_usec(uint64 usec) -{ - int was_error; - -#if defined(USE_NANOSLEEP) - struct timespec elapsed, tv; -#elif defined(USE_COND_TIMEDWAIT) - // Use a local mutex and cv, so threads remain independent - pthread_cond_t delay_cond = PTHREAD_COND_INITIALIZER; - pthread_mutex_t delay_mutex = PTHREAD_MUTEX_INITIALIZER; - struct timespec elapsed; - uint64 future; -#else - struct timeval tv; -#ifndef SELECT_SETS_REMAINING - uint64 then, now, elapsed; -#endif -#endif - - // Set the timeout interval - Linux only needs to do this once -#if defined(SELECT_SETS_REMAINING) - tv.tv_sec = 0; - tv.tv_usec = usec; -#elif defined(USE_NANOSLEEP) - elapsed.tv_sec = 0; - elapsed.tv_nsec = usec * 1000; -#elif defined(USE_COND_TIMEDWAIT) - future = GetTicks_usec() + usec; - elapsed.tv_sec = future / 1000000; - elapsed.tv_nsec = (future % 1000000) * 1000; -#else - then = GetTicks_usec(); -#endif - - do { - errno = 0; -#if defined(USE_NANOSLEEP) - tv.tv_sec = elapsed.tv_sec; - tv.tv_nsec = elapsed.tv_nsec; - was_error = nanosleep(&tv, &elapsed); -#elif defined(USE_COND_TIMEDWAIT) - was_error = pthread_mutex_lock(&delay_mutex); - was_error = pthread_cond_timedwait(&delay_cond, &delay_mutex, &elapsed); - was_error = pthread_mutex_unlock(&delay_mutex); -#else -#ifndef SELECT_SETS_REMAINING - // Calculate the time interval left (in case of interrupt) - now = GetTicks_usec(); - elapsed = now - then; - then = now; - if (elapsed >= usec) - break; - usec -= elapsed; - tv.tv_sec = 0; - tv.tv_usec = usec; -#endif - was_error = select(0, NULL, NULL, NULL, &tv); -#endif - } while (was_error && (errno == EINTR)); -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -#ifdef HAVE_PTHREADS -#if defined(HAVE_PTHREAD_COND_INIT) -#define IDLE_USES_COND_WAIT 1 -static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; -static pthread_cond_t idle_cond = PTHREAD_COND_INITIALIZER; -#elif defined(HAVE_SEM_INIT) -#define IDLE_USES_SEMAPHORE 1 -#include -#ifdef HAVE_SPINLOCKS -static spinlock_t idle_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_IDLE spin_lock(&idle_lock) -#define UNLOCK_IDLE spin_unlock(&idle_lock) -#else -static pthread_mutex_t idle_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_IDLE pthread_mutex_lock(&idle_lock) -#define UNLOCK_IDLE pthread_mutex_unlock(&idle_lock) -#endif -static sem_t idle_sem; -static int idle_sem_ok = -1; -#endif -#endif - -void idle_wait(void) -{ -#ifdef IDLE_USES_COND_WAIT - pthread_mutex_lock(&idle_lock); - pthread_cond_wait(&idle_cond, &idle_lock); - pthread_mutex_unlock(&idle_lock); -#else -#ifdef IDLE_USES_SEMAPHORE - LOCK_IDLE; - if (idle_sem_ok < 0) - idle_sem_ok = (sem_init(&idle_sem, 0, 0) == 0); - if (idle_sem_ok > 0) { - idle_sem_ok++; - UNLOCK_IDLE; - sem_wait(&idle_sem); - return; - } - UNLOCK_IDLE; -#endif - - // Fallback: sleep 10 ms - Delay_usec(10000); -#endif -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ -#ifdef IDLE_USES_COND_WAIT - pthread_cond_signal(&idle_cond); -#else -#ifdef IDLE_USES_SEMAPHORE - LOCK_IDLE; - if (idle_sem_ok > 1) { - idle_sem_ok--; - UNLOCK_IDLE; - sem_post(&idle_sem); - return; - } - UNLOCK_IDLE; -#endif -#endif -} diff --git a/SheepShaver/src/Unix/timer_unix.cpp b/SheepShaver/src/Unix/timer_unix.cpp new file mode 120000 index 000000000..db93bbd33 --- /dev/null +++ b/SheepShaver/src/Unix/timer_unix.cpp @@ -0,0 +1 @@ +../../../BasiliskII/src/Unix/timer_unix.cpp \ No newline at end of file From 744df7adf33ace0115f1e8f3b53cb80bfed0b77e Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Tue, 11 Feb 2020 03:14:23 -0800 Subject: [PATCH 332/534] Don't try to receive frames when eth is unloaded on the MacOS side as it will call uninitialized vectors --- BasiliskII/src/Windows/ether_windows.cpp | 22 ++++++++++++++++++---- 1 file changed, 18 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/Windows/ether_windows.cpp b/BasiliskII/src/Windows/ether_windows.cpp index 8f38d2f03..60a5e67be 100755 --- a/BasiliskII/src/Windows/ether_windows.cpp +++ b/BasiliskII/src/Windows/ether_windows.cpp @@ -101,6 +101,14 @@ static int net_if_type = -1; // Ethernet device type #ifdef SHEEPSHAVER static bool net_open = false; // Flag: initialization succeeded, network device open uint8 ether_addr[6]; // Our Ethernet address + +#else +const bool ether_driver_opened = true; // Flag: Driver is open on MacOS side + // so ether.h layer is ready for + // calls. + // B2 doesn't provide this + // but also calls don't need it + #endif // These are protected by queue_csection @@ -1571,10 +1579,16 @@ unsigned int WINAPI ether_thread_feed_int(void *arg) D(bug("Triggering\n")); looping = true; while(thread_active && looping) { - trigger_queue(); - // Wait for interrupt acknowledge by EtherInterrupt() - WaitForSingleObject(int_ack,INFINITE); - if(thread_active) looping = set_wait_request(); + if (ether_driver_opened) { + trigger_queue(); + // Wait for interrupt acknowledge by EtherInterrupt() + WaitForSingleObject(int_ack,INFINITE); + if(thread_active) looping = set_wait_request(); + } else { + // Ether driver is closed on the MacOS side + // ether.h calls in this case are undefined + Delay_usec(20000); + } } D(bug("Queue empty.\n")); } From 07e9db881c109ad060611f974e2d92402ca593af Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 12 Feb 2020 16:13:26 -0800 Subject: [PATCH 333/534] failsafe for localtime(-1) on Windows to avoid segfault --- BasiliskII/src/macos_util.cpp | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/BasiliskII/src/macos_util.cpp b/BasiliskII/src/macos_util.cpp index dea66451b..ba7ac8746 100644 --- a/BasiliskII/src/macos_util.cpp +++ b/BasiliskII/src/macos_util.cpp @@ -133,6 +133,13 @@ uint32 TimeToMacTime(time_t t) // This code is taken from glibc 2.2 // Convert to number of seconds elapsed since 1-Jan-1904 + + #ifdef WIN32 + if (t == -1) { + // failsafe as this will segfault + return 0; + } + #endif struct tm *local = localtime(&t); const int TM_EPOCH_YEAR = 1900; const int MAC_EPOCH_YEAR = 1904; From 837c82d8b893804dc5242ecc378c6a228f883d03 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 12 Feb 2020 16:16:31 -0800 Subject: [PATCH 334/534] expect TCHAR returns from RegQueryValueEx now that we are potentially building with _UNICODE --- .../src/Windows/user_strings_windows.cpp | 20 ++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/Windows/user_strings_windows.cpp b/BasiliskII/src/Windows/user_strings_windows.cpp index 0d98d61ff..dc2993dab 100755 --- a/BasiliskII/src/Windows/user_strings_windows.cpp +++ b/BasiliskII/src/Windows/user_strings_windows.cpp @@ -20,7 +20,7 @@ #include "sysdeps.h" #include "user_strings.h" - +#include "util_windows.h" // Platform-specific string definitions user_string_def platform_strings[] = { @@ -81,7 +81,11 @@ static const char *get_volume_name(void) HKEY hHelpKey; DWORD key_type, cbData; - static char volume[256]; + #ifdef _UNICODE + static char out_volume[256]; + #endif + + static TCHAR volume[256]; memset(volume, 0, sizeof(volume)); // Try Windows 2000 key first @@ -118,14 +122,20 @@ static const char *get_volume_name(void) } // Fix the error that some "tweak" apps do. - if (_stricmp(volume, "%USERNAME% on %COMPUTER%") == 0) - volume[0] = '\0'; + if (_tcsicmp(volume, TEXT("%USERNAME% on %COMPUTER%")) == 0) + volume[0] = TEXT('\0'); // No volume name found, default to "My Computer" if (volume[0] == 0) - strcpy(volume, "My Computer"); + _tcscpy(volume, TEXT("My Computer")); + + #ifdef _UNICODE + strlcpy(out_volume, volume, 256); + return out_volume; + #else return volume; + #endif } From 8b44b00da3449164e9a5409ae45223ec989253b7 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 12 Feb 2020 16:28:00 -0800 Subject: [PATCH 335/534] In extfs icon creation, ensure that the times on the host file are set correctly; actually allocate space for the other HInfo that set_finfo reads, such as the times --- BasiliskII/src/Windows/posix_emu.cpp | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/Windows/posix_emu.cpp b/BasiliskII/src/Windows/posix_emu.cpp index 8d671abc2..c93b2e095 100755 --- a/BasiliskII/src/Windows/posix_emu.cpp +++ b/BasiliskII/src/Windows/posix_emu.cpp @@ -392,14 +392,23 @@ void init_posix_emu(void) int fd = my_creat( custom_icon_name, 0 ); if(fd >= 0) { my_close(fd); + struct my_stat custom_icon_stat; + int stat_result = my_stat( custom_icon_name, &custom_icon_stat ); fd = open_rfork( custom_icon_name, O_RDWR|O_CREAT ); if(fd >= 0) { my_write( fd, my_comp_icon, sizeof(my_comp_icon) ); my_close(fd); - static uint8 host_finfo[SIZEOF_FInfo]; + // need room for the things from around the finfo that set_finfo reads + static uint8 custom_icon_hfile[ioFlXFndrInfo + SIZEOF_FXInfo]; + memset(custom_icon_hfile, 0, ioFlXFndrInfo + SIZEOF_FXInfo); + static uint8 * host_finfo = custom_icon_hfile + ioFlFndrInfo; uint32 finfo = Host2MacAddr(host_finfo); get_finfo(custom_icon_name, finfo, 0, false); WriteMacInt16(finfo + fdFlags, kIsInvisible); + if (stat_result == 0) { + WriteMacInt32(finfo - ioFlFndrInfo + ioFlCrDat, TimeToMacTime(custom_icon_stat.st_ctime)); + WriteMacInt32(finfo - ioFlFndrInfo + ioFlMdDat, TimeToMacTime(custom_icon_stat.st_mtime)); + } set_finfo(custom_icon_name, finfo, 0, false); get_finfo(my_computer, finfo, 0, true); WriteMacInt16(finfo + fdFlags, ReadMacInt16(finfo + fdFlags) | kHasCustomIcon); From 831e7a2268d16d1fd132d6c864e72d6e41edbec9 Mon Sep 17 00:00:00 2001 From: Andrew Tonner Date: Wed, 12 Feb 2020 21:29:44 -0800 Subject: [PATCH 336/534] Merge fixes to SheepShaver --- .../src/Windows/user_strings_windows.cpp | 19 ++++++++++++++----- SheepShaver/src/macos_util.cpp | 4 ++++ 2 files changed, 18 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/Windows/user_strings_windows.cpp b/SheepShaver/src/Windows/user_strings_windows.cpp index 32e52d25b..eb12de57d 100755 --- a/SheepShaver/src/Windows/user_strings_windows.cpp +++ b/SheepShaver/src/Windows/user_strings_windows.cpp @@ -20,7 +20,7 @@ #include "sysdeps.h" #include "user_strings.h" - +#include "util_windows.h" // Platform-specific string definitions user_string_def platform_strings[] = { @@ -86,7 +86,11 @@ static const char *get_volume_name(void) HKEY hHelpKey; DWORD key_type, cbData; - static char volume[256]; + #ifdef _UNICODE + static char out_volume[256]; + #endif + + static TCHAR volume[256]; memset(volume, 0, sizeof(volume)); // Try Windows 2000 key first @@ -123,14 +127,19 @@ static const char *get_volume_name(void) } // Fix the error that some "tweak" apps do. - if (stricmp(volume, "%USERNAME% on %COMPUTER%") == 0) - volume[0] = '\0'; + if (_tcsicmp(volume, TEXT("%USERNAME% on %COMPUTER%")) == 0) + volume[0] = TEXT('\0'); // No volume name found, default to "My Computer" if (volume[0] == 0) - strcpy(volume, "My Computer"); + _tcscpy(volume, TEXT("My Computer")); + #ifdef _UNICODE + strlcpy(out_volume, volume, 256); + return out_volume; + #else return volume; + #endif } diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 87eabb3d6..6a3f96441 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -327,6 +327,10 @@ uint32 TimeToMacTime(time_t t) // Convert to number of seconds elapsed since 1-Jan-1904 #ifdef WIN32 + if (t == -1) { + // failsafe as this will segfault + return 0; + } struct tm *local = localtime(&t); #else struct tm result; From 1601829d22f8c27a5c4386211ab02addd99349eb Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 17 Feb 2020 11:54:48 +0900 Subject: [PATCH 337/534] BII: changed monitor default --- BasiliskII/src/Unix/configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 9fa68ca21..b3bfc3b9d 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -81,7 +81,7 @@ AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [ *) WANT_GTK="no";; esac], [WANT_GTK="gtk2 gtk"]) -AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=yes]) +AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=no]], [WANT_MON=$withval], [WANT_MON=no]) AC_ARG_WITH(bincue, AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) From e4ee28b199ad575d3a035224582eb15d09c350d1 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 5 Mar 2020 16:07:59 +0900 Subject: [PATCH 338/534] Supports etherhelper (Xcode only) --- .../BasiliskII.xcodeproj/project.pbxproj | 16 ++++++++++++++- BasiliskII/src/MacOSX/etherhelpertool.c | 20 +++++++++---------- BasiliskII/src/Unix/ether_unix.cpp | 2 ++ 3 files changed, 27 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index bdcf70b15..0e94b50fd 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -91,6 +91,9 @@ E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; + E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; + E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; @@ -320,6 +323,10 @@ E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E416BEE72410AA4E00751E6D /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; + E416BEE92410AA9800751E6D /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; + E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; + E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; @@ -331,6 +338,7 @@ buildActionMask = 2147483647; files = ( E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, + E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */, 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, @@ -392,6 +400,7 @@ 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( + E416BEE92410AA9800751E6D /* Security.framework */, E413D93520D260DA00E437D8 /* SDL2.framework */, 756C1B381F25306A00620917 /* AppKit.framework */, 752F26FA1F240E69001032B4 /* IOKit.framework */, @@ -403,6 +412,7 @@ 753252FF1F535E5D0024025B /* generated src */ = { isa = PBXGroup; children = ( + E416BEEC2410AE0000751E6D /* etherhelpertool */, 7532532B1F53675E0024025B /* gencpu output */, ); name = "generated src"; @@ -498,6 +508,8 @@ 7539DFF91F23B25A006B2DF2 /* MacOSX */ = { isa = PBXGroup; children = ( + E416BEEB2410AB0E00751E6D /* etherhelpertool.c */, + E416BEE72410AA4E00751E6D /* runtool.c */, 7539E2AA1F23CDB7006B2DF2 /* Info.plist */, 7539E27E1F23BEB4006B2DF2 /* config.h */, 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, @@ -771,6 +783,7 @@ files = ( 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, E4555EED2354434B00139FCE /* Credits.html in Resources */, + E416BEED2410AE0900751E6D /* etherhelpertool in Resources */, ); runOnlyForDeploymentPostprocessing = 0; }; @@ -794,7 +807,7 @@ ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "make -f Makefile.gencpu\n"; + shellScript = "make -f Makefile.gencpu\ncc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; }; /* End PBXShellScriptBuildPhase section */ @@ -866,6 +879,7 @@ E413D92720D260BC00E437D8 /* debug.c in Sources */, E413D92220D260BC00E437D8 /* mbuf.c in Sources */, 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + E416BEE82410AA4E00751E6D /* runtool.c in Sources */, E413D93020D260BC00E437D8 /* ip_input.c in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, diff --git a/BasiliskII/src/MacOSX/etherhelpertool.c b/BasiliskII/src/MacOSX/etherhelpertool.c index 392f871aa..8ccaa5176 100644 --- a/BasiliskII/src/MacOSX/etherhelpertool.c +++ b/BasiliskII/src/MacOSX/etherhelpertool.c @@ -435,16 +435,16 @@ static int open_tap(char *ifname) return -1; } } - - snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", - bridge, interface); - if (run_cmd(str) != 0) { - fprintf(stderr, "%s: Failed to add %s to %s\n", - exec_name, interface, bridge); - close(sd); - return -1; - } - } + } + + snprintf(str, STR_MAX, "/sbin/ifconfig %s addm %s", + bridge, interface); + if (run_cmd(str) != 0) { + fprintf(stderr, "%s: Failed to add %s to %s\n", + exec_name, interface, bridge); + close(sd); + return -1; + } } return sd; diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index 73cba7c74..f1ab9b093 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -20,6 +20,8 @@ #include "sysdeps.h" +#define ENABLE_MACOSX_ETHERHELPER + /* * NOTES concerning MacOS X issues: * - poll() does not exist in 10.2.8, but is available in 10.4.4 From 7062e864c85dad1fb59c6d4d91124d83338cad6f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 6 Mar 2020 10:38:56 +0900 Subject: [PATCH 339/534] Fixed SS build --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 10 ++++++++++ BasiliskII/src/Unix/ether_unix.cpp | 2 -- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 0e94b50fd..54a3e0473 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1050,6 +1050,11 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + ENABLE_MACOSX_ETHERHELPER, + HAVE_CONFIG_H, + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; @@ -1102,6 +1107,11 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 3; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + ENABLE_MACOSX_ETHERHELPER, + HAVE_CONFIG_H, + ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; diff --git a/BasiliskII/src/Unix/ether_unix.cpp b/BasiliskII/src/Unix/ether_unix.cpp index f1ab9b093..73cba7c74 100644 --- a/BasiliskII/src/Unix/ether_unix.cpp +++ b/BasiliskII/src/Unix/ether_unix.cpp @@ -20,8 +20,6 @@ #include "sysdeps.h" -#define ENABLE_MACOSX_ETHERHELPER - /* * NOTES concerning MacOS X issues: * - poll() does not exist in 10.2.8, but is available in 10.4.4 From f9eae2025f1dd1d28f709c136e87f902359f3870 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 6 Mar 2020 19:10:01 +0900 Subject: [PATCH 340/534] SS: Added etherhelper (Xcode only) --- .../project.pbxproj | 42 +++++++++++++++++++ SheepShaver/src/MacOSX/etherhelpertool.c | 1 + SheepShaver/src/MacOSX/runtool.c | 1 + 3 files changed, 44 insertions(+) create mode 120000 SheepShaver/src/MacOSX/etherhelpertool.c create mode 120000 SheepShaver/src/MacOSX/runtool.c diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 6aeaf02f8..2d6bc2d69 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -84,6 +84,9 @@ E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; + E4202603241250EE000508DF /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E4202602241250EE000508DF /* runtool.c */; }; + E420260524125182000508DF /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420260424125182000508DF /* Security.framework */; }; + E420260B24125442000508DF /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E420260A2412540D000508DF /* etherhelpertool */; }; E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; @@ -329,6 +332,10 @@ E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; + E4202600241250E2000508DF /* etherhelpertool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; + E4202602241250EE000508DF /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; + E420260424125182000508DF /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; + E420260A2412540D000508DF /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; @@ -392,6 +399,7 @@ buildActionMask = 2147483647; files = ( E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, + E420260524125182000508DF /* Security.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, @@ -430,6 +438,7 @@ 0856CCC814A99E30000B1711 /* Sources */, 08CD42DF14B7B865009CA2A2 /* Frameworks */, 0856CCC214A99E1C000B1711 /* Products */, + E420260924125403000508DF /* Generated */, ); sourceTree = ""; }; @@ -706,6 +715,8 @@ 0856CE0614A99EEF000B1711 /* MacOSX */ = { isa = PBXGroup; children = ( + E4202600241250E2000508DF /* etherhelpertool.c */, + E4202602241250EE000508DF /* runtool.c */, 0873A76514ABD151004F12B7 /* config */, 0856D2D614A9A704000B1711 /* Launcher */, E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */, @@ -862,6 +873,7 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { isa = PBXGroup; children = ( + E420260424125182000508DF /* Security.framework */, E420910020D0C4FA0094654F /* SDL2.framework */, 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, @@ -870,6 +882,14 @@ name = Frameworks; sourceTree = ""; }; + E420260924125403000508DF /* Generated */ = { + isa = PBXGroup; + children = ( + E420260A2412540D000508DF /* etherhelpertool */, + ); + name = Generated; + sourceTree = ""; + }; /* End PBXGroup section */ /* Begin PBXHeadersBuildPhase section */ @@ -911,6 +931,7 @@ isa = PBXNativeTarget; buildConfigurationList = 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */; buildPhases = ( + E4202606241251C6000508DF /* ShellScript */, 0856CCBD14A99E1C000B1711 /* Resources */, 0856CCBE14A99E1C000B1711 /* Sources */, 0856CCBF14A99E1C000B1711 /* Frameworks */, @@ -961,6 +982,7 @@ isa = PBXResourcesBuildPhase; buildActionMask = 2147483647; files = ( + E420260B24125442000508DF /* etherhelpertool in Resources */, E44C460820D262B0000583AE /* VERSION in Resources */, 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, @@ -986,6 +1008,23 @@ shellPath = /bin/sh; shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; }; + E4202606241251C6000508DF /* ShellScript */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputFileListPaths = ( + ); + inputPaths = ( + ); + outputFileListPaths = ( + ); + outputPaths = ( + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "cc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; + }; /* End PBXShellScriptBuildPhase section */ /* Begin PBXSourcesBuildPhase section */ @@ -1049,6 +1088,7 @@ 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, + E4202603241250EE000508DF /* runtool.c in Sources */, 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, @@ -1227,6 +1267,7 @@ GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; GCC_PREPROCESSOR_DEFINITIONS = ( + ENABLE_MACOSX_ETHERHELPER, "DATADIR=", HAVE_CONFIG_H, USE_JIT, @@ -1289,6 +1330,7 @@ GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; GCC_PREPROCESSOR_DEFINITIONS = ( + ENABLE_MACOSX_ETHERHELPER, "DATADIR=", HAVE_CONFIG_H, USE_JIT, diff --git a/SheepShaver/src/MacOSX/etherhelpertool.c b/SheepShaver/src/MacOSX/etherhelpertool.c new file mode 120000 index 000000000..f8c140033 --- /dev/null +++ b/SheepShaver/src/MacOSX/etherhelpertool.c @@ -0,0 +1 @@ +../../../BasiliskII/src/MacOSX/etherhelpertool.c \ No newline at end of file diff --git a/SheepShaver/src/MacOSX/runtool.c b/SheepShaver/src/MacOSX/runtool.c new file mode 120000 index 000000000..592a24957 --- /dev/null +++ b/SheepShaver/src/MacOSX/runtool.c @@ -0,0 +1 @@ +../../../BasiliskII/src/MacOSX/runtool.c \ No newline at end of file From 59ce931955ef12125e29335e2d293eba2c86ea37 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 8 Mar 2020 12:33:44 +0900 Subject: [PATCH 341/534] fixed destroying bridge --- BasiliskII/src/MacOSX/etherhelpertool.c | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/etherhelpertool.c b/BasiliskII/src/MacOSX/etherhelpertool.c index 8ccaa5176..2b1073e65 100644 --- a/BasiliskII/src/MacOSX/etherhelpertool.c +++ b/BasiliskII/src/MacOSX/etherhelpertool.c @@ -55,7 +55,7 @@ static void handler(int signum); static int install_signal_handlers(); static void do_exit(); -static int remove_bridge = 0; +static char remove_bridge[STR_MAX]; static const char *exec_name = "etherhelpertool"; int main(int argc, char **argv) @@ -415,7 +415,7 @@ static int open_tap(char *ifname) close(sd); return -1; } - remove_bridge = 1; + strlcpy(remove_bridge, bridge, STR_MAX); snprintf(str, STR_MAX, "/sbin/ifconfig %s up", bridge); if (run_cmd(str) != 0) { @@ -572,7 +572,9 @@ static int install_signal_handlers() { } static void do_exit() { - if (remove_bridge) { - run_cmd("/sbin/ifconfig bridge0 destroy"); + if (*remove_bridge) { + char str[STR_MAX]; + snprintf(str, STR_MAX, "/sbin/ifconfig %s destroy", remove_bridge); + run_cmd(str); } } From aeb585527d86109e4e2d3b86ed9e71663b39dcf7 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 15:11:12 -0700 Subject: [PATCH 342/534] changes for buildability under MSYS2 mingw32 --- BasiliskII/src/Windows/posix_emu.h | 47 +++++++++++++++++------------ BasiliskII/src/Windows/sysdeps.h | 1 + BasiliskII/src/slirp/slirp.h | 15 --------- SheepShaver/Makefile | 2 +- SheepShaver/src/Windows/Makefile.in | 1 + SheepShaver/src/Windows/sysdeps.h | 2 ++ 6 files changed, 33 insertions(+), 35 deletions(-) diff --git a/BasiliskII/src/Windows/posix_emu.h b/BasiliskII/src/Windows/posix_emu.h index 730d63df2..a238beceb 100755 --- a/BasiliskII/src/Windows/posix_emu.h +++ b/BasiliskII/src/Windows/posix_emu.h @@ -79,24 +79,33 @@ extern int my_errno; // must hook all other functions that manipulate file names #ifndef NO_POSIX_API_HOOK -#define stat my_stat -#define fstat my_fstat -#define open my_open -#define rename my_rename -#define access my_access -#define mkdir my_mkdir -#define remove my_remove -#define creat my_creat -#define close my_close -#define lseek my_lseek -#define read my_read -#define write my_write -#define ftruncate my_chsize -#define locking my_locking -#define utime my_utime - -#undef errno -#define errno my_errno +# ifdef stat +# undef stat +# endif +# define stat my_stat +# ifdef fstat +# undef fstat +# endif +# define fstat my_fstat +# define open my_open +# define rename my_rename +# define access my_access +# define mkdir my_mkdir +# define remove my_remove +# define creat my_creat +# define close my_close +# ifdef lseek +# undef lseek +# endif +# define lseek my_lseek +# define read my_read +# define write my_write +# define ftruncate my_chsize +# define locking my_locking +# define utime my_utime + +# undef errno +# define errno my_errno #endif //!NO_POSIX_API_HOOK #ifndef S_ISDIR @@ -125,6 +134,6 @@ struct my_utimbuf }; // Your compiler may have different "struct stat" -> edit "struct my_stat" -#define validate_stat_struct ( sizeof(struct my_stat) == sizeof(struct stat) ) +#define validate_stat_struct ( sizeof(struct my_stat) == sizeof(struct _stat) ) #define st_crtime st_ctime diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h index 3085a3104..35a92f3be 100755 --- a/BasiliskII/src/Windows/sysdeps.h +++ b/BasiliskII/src/Windows/sysdeps.h @@ -23,6 +23,7 @@ #ifdef __MINGW32__ #define _UNICODE +#define UNICODE #endif #if !defined _MSC_VER && !defined __STDC__ diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index 3f9428af7..a677185eb 100755 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -32,21 +32,6 @@ typedef unsigned long ioctlsockopt_t; # include # include -#ifdef __MINGW32__ -char * WSAAPI inet_ntop( - INT Family, - PVOID pAddr, - PTSTR pStringBuf, - size_t StringBufSize -); - -INT WSAAPI inet_pton( - INT Family, - const char * pszAddrString, - PVOID pAddrBuf -); -#endif - # include # include diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index e9e4ce7e7..585417f4f 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -99,7 +99,7 @@ links: case $$i in *codegen_x86.h) o=kpx_cpu/src/cpu/jit/x86/codegen_x86.h;; esac; \ SUB=`echo $$o | sed 's;[^/]*/;../;g' | sed 's;[^/]*$$;;'` ;\ cur_link=src/$$o ;\ - if [ -d "$$cur_link" ]; then rm -rf "$$cur_link"; fi ;\ + if [ -e "$$cur_link" ]; then rm -rf "$$cur_link"; fi ;\ ln -sf "$$PREFIX$$SUB$(B2_TOPDIR)/src/$$i" $$cur_link; \ fi; \ done; diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 4c34ffac1..67e5df9df 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -76,6 +76,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window UI_SRCS = ../prefs.cpp prefs_windows.cpp prefs_editor_gtk.cpp xpram_windows.cpp \ ../prefs_items.cpp ../user_strings.cpp user_strings_windows.cpp util_windows.cpp \ + ../dummy/prefs_dummy.cpp \ b2ether/packet32.cpp SheepShaverGUI.rc UI_APP = SheepShaverGUI.exe diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index 99834f0c2..432b7e57f 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -41,7 +41,9 @@ #undef _TEXT #include #ifdef __WIN32__ +#define WIN32_LEAN_AND_MEAN #include +#include #endif #include From f1b0a20b370bf52a14b8238da7df9981b718c5a0 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 15:55:27 -0700 Subject: [PATCH 343/534] get prefs_editor_gtk building in mingw32 --- BasiliskII/src/Windows/Makefile.in | 4 +- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 136 +++++++++++++++----- SheepShaver/src/Windows/Makefile.in | 4 +- 3 files changed, 107 insertions(+), 37 deletions(-) diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index b3a3a11bc..156d1f812 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -118,7 +118,7 @@ $(APP): $(XPLATSRCS) $(OBJ_DIR) $(OBJS) $(CXX) -o $@ $(LDFLAGS) $(OBJS) $(LIBS) $(SDL_LIBS) $(UI_APP): $(XPLATSRCS) $(OBJ_DIR) $(UI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) $(GTK_LIBS) -mwindows -mno-cygwin + $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) -Wl,-Bdynamic $(GTK_LIBS) -Wl,-Bstatic -mwindows -static-libgcc mostlyclean: rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak @@ -149,7 +149,7 @@ $(OBJ_DIR)/%.o : %.cpp $(OBJ_DIR)/%.o : %.s $(CC) $(CPPFLAGS) $(DEFS) $(CFLAGS) -c $< -o $@ $(OBJ_DIR)/prefs_editor_gtk.o: prefs_editor_gtk.cpp - $(CXX) -O2 -mno-cygwin -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ + $(CXX) -O2 -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ # Windows resources $(OBJ_DIR)/%.o: %.rc diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index 66ad44c4f..c9a5e6cf8 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -26,6 +26,8 @@ #include #include +#include + #include "user_strings.h" #include "version.h" #include "cdrom.h" @@ -76,6 +78,27 @@ enum { * Utility functions */ +gchar * tchar_to_g_utf8(const TCHAR * str) { + gchar * out; + if (str == NULL) + return NULL; + int len = _tcslen(str) + 1; + #ifdef _UNICODE + /* First call just to find what the output size will be */ + int size = WideCharToMultiByte(CP_UTF8, 0, str, len, NULL, 0, NULL, NULL); + if (size == 0) + return NULL; + out = (gchar *) g_malloc(size); + if (out == NULL) + return NULL; + WideCharToMultiByte(CP_UTF8, 0, str, len, out, size, NULL, NULL); + #else /* _UNICODE */ + out = g_locale_to_utf8(str, -1, NULL, NULL, NULL); + #endif /* _UNICODE */ + return out; +} + + struct opt_desc { int label_id; GtkSignalFunc func; @@ -672,11 +695,11 @@ static GList *add_cdrom_names(void) { GList *glist = NULL; - char rootdir[4] = "X:\\"; - for (char letter = 'C'; letter <= 'Z'; letter++) { + TCHAR rootdir[4] = TEXT("X:\\"); + for (TCHAR letter = TEXT('C'); letter <= TEXT('Z'); letter++) { rootdir[0] = letter; if (GetDriveType(rootdir) == DRIVE_CDROM) - glist = g_list_append(glist, strdup(rootdir)); + glist = g_list_append(glist, _tcsdup(rootdir)); } return glist; @@ -1466,24 +1489,25 @@ static int create_ether_menu(GtkWidget *menu) n_items++; // Basilisk II Ethernet Adapter - PacketOpenAdapter("", 0); + PacketOpenAdapter(TEXT(""), 0); { ULONG sz; - char names[1024]; + TCHAR names[1024]; sz = sizeof(names); if (PacketGetAdapterNames(NULL, names, &sz) == ERROR_SUCCESS) { - char *p = names; + TCHAR *p = names; while (*p) { - const char DEVICE_HEADER[] = "\\Device\\B2ether_"; - if (strnicmp(p, DEVICE_HEADER, sizeof(DEVICE_HEADER) - 1) == 0) { + const TCHAR DEVICE_HEADER[] = TEXT("\\Device\\B2ether_"); + if (_tcsnicmp(p, DEVICE_HEADER, sizeof(DEVICE_HEADER) - 1) == 0) { LPADAPTER fd = PacketOpenAdapter(p + sizeof(DEVICE_HEADER) - 1, 0); if (fd) { - char guid[256]; - sprintf(guid, "%s", p + sizeof(DEVICE_HEADER) - 1); - const char *name = ether_guid_to_name(guid); - if (name && (name = g_locale_to_utf8(name, -1, NULL, NULL, NULL))) { - add_menu_item(menu, name, (GtkSignalFunc)mn_ether_b2ether, strdup(guid)); - if (etherguid && strcmp(guid, etherguid) == 0 && + TCHAR guid[256]; + _stprintf(guid, TEXT("%s"), p + sizeof(DEVICE_HEADER) - 1); + const gchar *name = tchar_to_g_utf8(ether_guid_to_name(guid)); + if (name) { + std::string str_guid = to_string(guid); + add_menu_item(menu, name, (GtkSignalFunc)mn_ether_b2ether, strdup(str_guid.c_str())); + if (etherguid && to_tstring(guid).compare(to_tstring(etherguid)) == 0 && ether && strcmp(ether, "b2ether") == 0) active = n_items; n_items++; @@ -1491,26 +1515,27 @@ static int create_ether_menu(GtkWidget *menu) PacketCloseAdapter(fd); } } - p += strlen(p) + 1; + p += _tcslen(p) + 1; } } } PacketCloseAdapter(NULL); // TAP-Win32 - const char *tap_devices; + const TCHAR *tap_devices; if ((tap_devices = ether_tap_devices()) != NULL) { - const char *guid = tap_devices; + const TCHAR *guid = tap_devices; while (*guid) { - const char *name = ether_guid_to_name(guid); - if (name && (name = g_locale_to_utf8(name, -1, NULL, NULL, NULL))) { - add_menu_item(menu, name, (GtkSignalFunc)mn_ether_tap, strdup(guid)); - if (etherguid && strcmp(guid, etherguid) == 0 && + const gchar *name = tchar_to_g_utf8(ether_guid_to_name(guid)); + if (name) { + std::string str_guid = to_string(guid); + add_menu_item(menu, name, (GtkSignalFunc)mn_ether_tap, strdup(str_guid.c_str())); + if (etherguid && to_tstring(guid).compare(to_tstring(etherguid)) == 0 && ether && strcmp(ether, "tap") == 0) active = n_items; n_items++; } - guid += strlen(guid) + 1; + guid += _tcslen(guid) + 1; } free((char *)tap_devices); } @@ -1734,21 +1759,66 @@ void SysAddSerialPrefs(void) * Display alerts */ +static HWND GetMainWindowHandle() { + return NULL; +} + static void display_alert(int title_id, const char *text, int flags) { - MessageBox(NULL, text, GetString(title_id), MB_OK | flags); + HWND hMainWnd = GetMainWindowHandle(); + MessageBoxA(hMainWnd, text, GetString(title_id), MB_OK | flags); +} +#ifdef _UNICODE +static void display_alert(int title_id, const wchar_t *text, int flags) +{ + HWND hMainWnd = GetMainWindowHandle(); + MessageBoxW(hMainWnd, text, GetStringW(title_id).get(), MB_OK | flags); } +#endif + + +/* + * Display error alert + */ void ErrorAlert(const char *text) { + if (PrefsFindBool("nogui")) + return; + display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); } +#ifdef _UNICODE +void ErrorAlert(const wchar_t *text) +{ + if (PrefsFindBool("nogui")) + return; + + display_alert(STR_ERROR_ALERT_TITLE, text, MB_ICONSTOP); +} +#endif + + +/* + * Display warning alert + */ void WarningAlert(const char *text) { + if (PrefsFindBool("nogui")) + return; + display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONSTOP); } +#ifdef _UNICODE +void WarningAlert(const wchar_t *text) +{ + if (PrefsFindBool("nogui")) + return; + display_alert(STR_WARNING_ALERT_TITLE, text, MB_ICONSTOP); +} +#endif /* * Start standalone GUI @@ -1774,23 +1844,23 @@ int main(int argc, char *argv[]) // Transfer control to the executable if (start) { - char path[_MAX_PATH]; + TCHAR path[_MAX_PATH]; bool ok = GetModuleFileName(NULL, path, sizeof(path)) != 0; if (ok) { - char b2_path[_MAX_PATH]; - char *p = strrchr(path, '\\'); - *++p = '\0'; + TCHAR b2_path[_MAX_PATH]; + TCHAR *p = _tcsrchr(path, TEXT('\\')); + *++p = TEXT('\0'); SetCurrentDirectory(path); - strcpy(b2_path, path); - strcat(b2_path, PROGRAM_NAME); - strcat(b2_path, ".exe"); - HINSTANCE h = ShellExecute(GetDesktopWindow(), "open", - b2_path, "", path, SW_SHOWNORMAL); + _tcscpy(b2_path, path); + _tcscat(b2_path, TEXT(PROGRAM_NAME)); + _tcscat(b2_path, TEXT(".exe")); + HINSTANCE h = ShellExecute(GetDesktopWindow(), TEXT("open"), + b2_path, TEXT(""), path, SW_SHOWNORMAL); if ((int)h <= 32) ok = false; } if (!ok) { - ErrorAlert("Coult not start " PROGRAM_NAME " executable"); + ErrorAlert(TEXT("Could not start ") TEXT(PROGRAM_NAME) TEXT(" executable")); return 1; } } diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 67e5df9df..57d5284f3 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -129,7 +129,7 @@ $(APP): $(XPLATSRCS) $(OBJ_DIR) $(OBJS) $(CXX) -o $(APP) $(LDFLAGS) $(OBJS) $(LIBS) $(SDL_LIBS) $(UI_APP): $(XPLATSRCS) $(OBJ_DIR) $(UI_OBJS) - $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) $(GTK_LIBS) -mwindows -mno-cygwin + $(CXX) -o $@ $(LDFLAGS) $(UI_OBJS) $(LIBS) -Wl,-Bdynamic $(GTK_LIBS) -Wl,-Bstatic -mwindows -static-libgcc mostlyclean: rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak @@ -164,7 +164,7 @@ $(OBJ_DIR)/%.o : %.S $(AS) $(ASFLAGS) -o $@ $*.out.s rm $*.out.s $(OBJ_DIR)/prefs_editor_gtk.o: prefs_editor_gtk.cpp - $(CXX) -O2 -mno-cygwin -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ + $(CXX) -O2 -mms-bitfields $(CPPFLAGS) $(DEFS) $(GTK_CFLAGS) -c $< -o $@ # Windows resources $(OBJ_DIR)/%.o: %.rc From cd269a9ce1e7440ebfd0e51ee14904009a356df0 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 15:27:51 -0700 Subject: [PATCH 344/534] In SheepShaver GUI don't show JIT checkbox in non-JIT build --- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index c9a5e6cf8..7e04ba801 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -910,11 +910,12 @@ static void create_jit_pane(GtkWidget *top) #endif set_jit_sensitive(); -#endif #ifdef SHEEPSHAVER make_checkbox(box, STR_JIT_68K_CTRL, "jit68k", GTK_SIGNAL_FUNC(tb_jit_68k)); #endif + +#endif } /* From ef2f205d6b2aff62bab16471e5c9853b898bf41a Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 15:29:38 -0700 Subject: [PATCH 345/534] Remove frsqrte dyngen op def because do_frsqrte is missing --- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp | 1 - 1 file changed, 1 deletion(-) diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp index 41d57c54f..7f9e9f0bb 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen-ops.cpp @@ -481,7 +481,6 @@ DEFINE_OP(fmov_FD_F2, FD_dw = F2_dw); DEFINE_OP(fabs_FD_F0, FD = do_fabs(F0)); DEFINE_OP(fneg_FD_F0, FD = do_fneg(F0)); DEFINE_OP(fnabs_FD_F0, FD = do_fnabs(F0)); -DEFINE_OP(frsqrte_FD_F0, FD = do_frsqrte(F0)); DEFINE_OP(fadd_FD_F0_F1, FD = do_fadd(F0, F1)); DEFINE_OP(fsub_FD_F0_F1, FD = do_fsub(F0, F1)); From a667dc9787f1e43133ac1a31c0f531838e1715e7 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 16:31:00 -0700 Subject: [PATCH 346/534] SS: add pregenerated dyngen output from cygwin; on cygwin run the dyngen, otherwise on Windows use this pregenerated dyngen --- SheepShaver/src/Windows/Makefile.in | 53 +- SheepShaver/src/Windows/configure.ac | 19 + .../basic-dyngen-ops.hpp | 1679 +++ .../ppc-dyngen-ops.hpp | 11173 ++++++++++++++++ 4 files changed, 12898 insertions(+), 26 deletions(-) create mode 100644 SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp create mode 100644 SheepShaver/src/Windows/cygwin_precompiled_dyngen/ppc-dyngen-ops.hpp diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 57d5284f3..a18c9029c 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -35,7 +35,7 @@ CC = @CC@ CXX = @CXX@ CFLAGS = @CFLAGS@ $(SDL_CFLAGS) CXXFLAGS = @CXXFLAGS@ $(SDL_CFLAGS) -CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp -I../Unix/dyngen_precompiled +CPPFLAGS = @CPPFLAGS@ -I../include -I. -I../slirp DEFS = @DEFS@ LDFLAGS = @LDFLAGS@ -Wl,-Bstatic #TODO remove pthread part of that if irrelevant @@ -44,6 +44,7 @@ CPUSRCS = @CPUSRCS@ PERL = @PERL@ USE_DYNGEN = @USE_DYNGEN@ +USE_PREGENERATED_DYNGEN = @USE_PREGENERATED_DYNGEN@ DYNGENSRCS = @DYNGENSRCS@ DYNGEN_CC = $(CXX) DYNGEN_OP_FLAGS = @DYNGEN_OP_FLAGS@ @@ -134,8 +135,9 @@ $(UI_APP): $(XPLATSRCS) $(OBJ_DIR) $(UI_OBJS) mostlyclean: rm -f $(APP) $(UI_APP) $(OBJ_DIR)/* core* *.core *~ *.bak -clean: mostlyclean +clean: mostlyclean dyngenclean rm -f $(XPLATSRCS) +dyngenclean: rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc-execute-impl.cpp distclean: clean @@ -177,36 +179,35 @@ DYNGEN = dyngen.exe ifeq ($(USE_DYNGEN),yes) DYNGENDEPS = basic-dyngen-ops.hpp ppc-dyngen-ops.hpp +dyngendeps: $(DYNGENDEPS) ### -basic-dyngen-ops.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops.hpp basic-dyngen-ops-x86_32.hpp basic-dyngen-ops-x86_64.hpp - cp -f $< $@ -basic-dyngen-ops-x86_32.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops-x86_32.hpp - cp -f $< $@ -basic-dyngen-ops-x86_64.hpp: ../Unix/dyngen_precompiled/basic-dyngen-ops-x86_64.hpp - cp -f $< $@ -ppc-dyngen-ops.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops.hpp ppc-dyngen-ops-x86_32.hpp ppc-dyngen-ops-x86_64.hpp - cp -f $< $@ -ppc-dyngen-ops-x86_32.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp +$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp +$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp + +ifeq ($(USE_PREGENERATED_DYNGEN),yes) + +basic-dyngen-ops.hpp: cygwin_precompiled_dyngen/basic-dyngen-ops.hpp cp -f $< $@ -ppc-dyngen-ops-x86_64.hpp: ../Unix/dyngen_precompiled/ppc-dyngen-ops-x86_64.hpp +ppc-dyngen-ops.hpp: cygwin_precompiled_dyngen/ppc-dyngen-ops.hpp cp -f $< $@ + +else # Only GCC is supported for generating synthetic opcodes -#$(DYNGEN): $(DYNGENOBJS) -# $(HOST_CXX) -o $@ $(LDFLAGS) $(DYNGENOBJS) - -#$(OBJ_DIR)/basic-dyngen.o: basic-dyngen-ops.hpp -#$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp -# $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -#basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) -# ./$(DYNGEN) -o $@ $< - -#$(OBJ_DIR)/ppc-dyngen.o: ppc-dyngen-ops.hpp -#$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp -# $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ -#ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) -# ./$(DYNGEN) -o $@ $< +$(DYNGEN): $(DYNGENOBJS) + $(HOST_CXX) -o $@ $(LDFLAGS) $(DYNGENOBJS) + +$(OBJ_DIR)/basic-dyngen-ops.o: $(kpxsrcdir)/cpu/jit/basic-dyngen-ops.cpp + $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ +basic-dyngen-ops.hpp: $(OBJ_DIR)/basic-dyngen-ops.o $(DYNGEN) + ./$(DYNGEN) -o $@ $< + +$(OBJ_DIR)/ppc-dyngen-ops.o: $(kpxsrcdir)/cpu/ppc/ppc-dyngen-ops.cpp basic-dyngen-ops.hpp + $(DYNGEN_CC) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) $(DYNGEN_OP_FLAGS) -c $< -o $@ +ppc-dyngen-ops.hpp: $(OBJ_DIR)/ppc-dyngen-ops.o $(DYNGEN) + ./$(DYNGEN) -o $@ $< +endif $(OBJ_DIR)/sheepshaver_glue.o $(OBJ_DIR)/ppc-cpu.o $(OBJ_DIR)/ppc-decode.o $(OBJ_DIR)/ppc-translate.o $(OBJ_DIR)/ppc-jit.o: basic-dyngen-ops.hpp ppc-dyngen-ops.hpp endif diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 21571618d..12d75230c 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -192,6 +192,13 @@ if [[ "x$HAVE_GCC30" = "xyes" ]]; then CFLAGS="$SAVED_CFLAGS" fi +case $host_os in +cygwin) + CFLAGS="$CFLAGS -mwin32" + CXXFLAGS="$CXXFLAGS -mwin32" + ;; +esac + dnl CPU emulator sources CPUSRCS="\ ../kpx_cpu/src/mathlib/ieeefp.cpp \ @@ -205,6 +212,7 @@ CPPFLAGS="$CPPFLAGS -I../kpx_cpu/include -I../kpx_cpu/src" dnl Enable JIT compiler, if possible USE_DYNGEN="no" +USE_PREGENERATED_DYNGEN="no" if [[ "x$WANT_JIT" = "xyes" ]]; then case $host_cpu in i?86) @@ -216,6 +224,16 @@ if [[ "x$WANT_JIT" = "xyes" ]]; then fi ;; esac + + case $host_os in + cygwin) + USE_PREGENERATED_DYNGEN="no" + ;; + *) + USE_PREGENERATED_DYNGEN="yes" + ;; + esac + USE_DYNGEN="yes" DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -finline-limit=10000 -g0" if [[ "x$HAVE_GCC30" = "xyes" ]]; then @@ -256,6 +274,7 @@ fi dnl Generate Makefile. AC_SUBST(PERL) AC_SUBST(USE_DYNGEN) +AC_SUBST(USE_PREGENERATED_DYNGEN) AC_SUBST(DYNGENSRCS) AC_SUBST(DYNGEN_OP_FLAGS) AC_SUBST(CPUSRCS) diff --git a/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp new file mode 100644 index 000000000..f244e88e0 --- /dev/null +++ b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp @@ -0,0 +1,1679 @@ +#ifndef DEFINE_CST +#define DEFINE_CST(NAME, VALUE) +#endif +DEFINE_GEN(gen_op_mov_ad_A0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A0_im +{ + static const uint8 op_mov_ad_A0_im_code[] = { + 0xbb, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A0_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_ad_A1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A1_im +{ + static const uint8 op_mov_ad_A1_im_code[] = { + 0xbe, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A1_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_ad_A2_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_ad_A2_im +{ + static const uint8 op_mov_ad_A2_im_code[] = { + 0xbf, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_ad_A2_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_im +{ + static const uint8 op_mov_32_T0_im_code[] = { + 0xbb, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T0_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_T1 +{ + static const uint8 op_mov_32_T0_T1_code[] = { + 0x89, 0xf3 + }; + copy_block(op_mov_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_T2 +{ + static const uint8 op_mov_32_T0_T2_code[] = { + 0x89, 0xfb + }; + copy_block(op_mov_32_T0_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_im +{ + static const uint8 op_mov_32_T1_im_code[] = { + 0xbe, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T1_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_T0 +{ + static const uint8 op_mov_32_T1_T0_code[] = { + 0x89, 0xde + }; + copy_block(op_mov_32_T1_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_T2 +{ + static const uint8 op_mov_32_T1_T2_code[] = { + 0x89, 0xfe + }; + copy_block(op_mov_32_T1_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_im +{ + static const uint8 op_mov_32_T2_im_code[] = { + 0xbf, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mov_32_T2_im_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_T1 +{ + static const uint8 op_mov_32_T2_T1_code[] = { + 0x89, 0xf7 + }; + copy_block(op_mov_32_T2_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_T0 +{ + static const uint8 op_mov_32_T2_T0_code[] = { + 0x89, 0xdf + }; + copy_block(op_mov_32_T2_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T0_0 +{ + static const uint8 op_mov_32_T0_0_code[] = { + 0x31, 0xdb + }; + copy_block(op_mov_32_T0_0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T1_0 +{ + static const uint8 op_mov_32_T1_0_code[] = { + 0x31, 0xf6 + }; + copy_block(op_mov_32_T1_0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mov_32_T2_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mov_32_T2_0 +{ + static const uint8 op_mov_32_T2_0_code[] = { + 0x31, 0xff + }; + copy_block(op_mov_32_T2_0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_T2 +{ + static const uint8 op_add_32_T0_T2_code[] = { + 0x01, 0xfb + }; + copy_block(op_add_32_T0_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_T1 +{ + static const uint8 op_add_32_T0_T1_code[] = { + 0x01, 0xf3 + }; + copy_block(op_add_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_im +{ + static const uint8 op_add_32_T0_im_code[] = { + 0x81, 0xc3, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_add_32_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_1 +{ + static const uint8 op_add_32_T0_1_code[] = { + 0x43 + }; + copy_block(op_add_32_T0_1_code, 1); + inc_code_ptr(1); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_2 +{ + static const uint8 op_add_32_T0_2_code[] = { + 0x83, 0xc3, 0x02 + }; + copy_block(op_add_32_T0_2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_4 +{ + static const uint8 op_add_32_T0_4_code[] = { + 0x83, 0xc3, 0x04 + }; + copy_block(op_add_32_T0_4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T0_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T0_8 +{ + static const uint8 op_add_32_T0_8_code[] = { + 0x83, 0xc3, 0x08 + }; + copy_block(op_add_32_T0_8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_T2 +{ + static const uint8 op_sub_32_T0_T2_code[] = { + 0x29, 0xfb + }; + copy_block(op_sub_32_T0_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_T1 +{ + static const uint8 op_sub_32_T0_T1_code[] = { + 0x29, 0xf3 + }; + copy_block(op_sub_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_im +{ + static const uint8 op_sub_32_T0_im_code[] = { + 0x81, 0xeb, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_sub_32_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_1 +{ + static const uint8 op_sub_32_T0_1_code[] = { + 0x4b + }; + copy_block(op_sub_32_T0_1_code, 1); + inc_code_ptr(1); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_2 +{ + static const uint8 op_sub_32_T0_2_code[] = { + 0x83, 0xeb, 0x02 + }; + copy_block(op_sub_32_T0_2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_4 +{ + static const uint8 op_sub_32_T0_4_code[] = { + 0x83, 0xeb, 0x04 + }; + copy_block(op_sub_32_T0_4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T0_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T0_8 +{ + static const uint8 op_sub_32_T0_8_code[] = { + 0x83, 0xeb, 0x08 + }; + copy_block(op_sub_32_T0_8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_T2 +{ + static const uint8 op_add_32_T1_T2_code[] = { + 0x01, 0xfe + }; + copy_block(op_add_32_T1_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_T0 +{ + static const uint8 op_add_32_T1_T0_code[] = { + 0x01, 0xde + }; + copy_block(op_add_32_T1_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_im +{ + static const uint8 op_add_32_T1_im_code[] = { + 0x81, 0xc6, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_add_32_T1_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_1 +{ + static const uint8 op_add_32_T1_1_code[] = { + 0x46 + }; + copy_block(op_add_32_T1_1_code, 1); + inc_code_ptr(1); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_2 +{ + static const uint8 op_add_32_T1_2_code[] = { + 0x83, 0xc6, 0x02 + }; + copy_block(op_add_32_T1_2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_4 +{ + static const uint8 op_add_32_T1_4_code[] = { + 0x83, 0xc6, 0x04 + }; + copy_block(op_add_32_T1_4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_add_32_T1_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_add_32_T1_8 +{ + static const uint8 op_add_32_T1_8_code[] = { + 0x83, 0xc6, 0x08 + }; + copy_block(op_add_32_T1_8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_T2 +{ + static const uint8 op_sub_32_T1_T2_code[] = { + 0x29, 0xfe + }; + copy_block(op_sub_32_T1_T2_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_T0 +{ + static const uint8 op_sub_32_T1_T0_code[] = { + 0x29, 0xde + }; + copy_block(op_sub_32_T1_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_im +{ + static const uint8 op_sub_32_T1_im_code[] = { + 0x81, 0xee, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_sub_32_T1_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_1 +{ + static const uint8 op_sub_32_T1_1_code[] = { + 0x4e + }; + copy_block(op_sub_32_T1_1_code, 1); + inc_code_ptr(1); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_2 +{ + static const uint8 op_sub_32_T1_2_code[] = { + 0x83, 0xee, 0x02 + }; + copy_block(op_sub_32_T1_2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_4 +{ + static const uint8 op_sub_32_T1_4_code[] = { + 0x83, 0xee, 0x04 + }; + copy_block(op_sub_32_T1_4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_sub_32_T1_8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sub_32_T1_8 +{ + static const uint8 op_sub_32_T1_8_code[] = { + 0x83, 0xee, 0x08 + }; + copy_block(op_sub_32_T1_8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_umul_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_umul_32_T0_T1 +{ + static const uint8 op_umul_32_T0_T1_code[] = { + 0x0f, 0xaf, 0xde + }; + copy_block(op_umul_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_smul_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_smul_32_T0_T1 +{ + static const uint8 op_smul_32_T0_T1_code[] = { + 0x0f, 0xaf, 0xde + }; + copy_block(op_smul_32_T0_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_udiv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_udiv_32_T0_T1 +{ + static const uint8 op_udiv_32_T0_T1_code[] = { + 0x89, 0xd8, 0x31, 0xd2, 0xf7, 0xf6, 0x89, 0xc3 + }; + copy_block(op_udiv_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_sdiv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sdiv_32_T0_T1 +{ + static const uint8 op_sdiv_32_T0_T1_code[] = { + 0x89, 0xd8, 0x99, 0xf7, 0xfe, 0x89, 0xc3 + }; + copy_block(op_sdiv_32_T0_T1_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_xchg_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xchg_32_T0_T1 +{ + static const uint8 op_xchg_32_T0_T1_code[] = { + 0x87, 0xde + }; + copy_block(op_xchg_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_bswap_16_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_bswap_16_T0 +{ + static const uint8 op_bswap_16_T0_code[] = { + 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + }; + copy_block(op_bswap_16_T0_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_bswap_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_bswap_32_T0 +{ + static const uint8 op_bswap_32_T0_code[] = { + 0x0f, 0xcb + }; + copy_block(op_bswap_32_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_neg_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_neg_32_T0 +{ + static const uint8 op_neg_32_T0_code[] = { + 0xf7, 0xdb + }; + copy_block(op_neg_32_T0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_not_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_not_32_T0 +{ + static const uint8 op_not_32_T0_code[] = { + 0x85, 0xdb, 0x0f, 0x94, 0xc0, 0x0f, 0xb6, 0xd8 + }; + copy_block(op_not_32_T0_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_not_32_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_not_32_T1 +{ + static const uint8 op_not_32_T1_code[] = { + 0x85, 0xf6, 0x0f, 0x94, 0xc0, 0x0f, 0xb6, 0xf0 + }; + copy_block(op_not_32_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_and_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_and_32_T0_T1 +{ + static const uint8 op_and_32_T0_T1_code[] = { + 0x21, 0xf3 + }; + copy_block(op_and_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_and_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_and_32_T0_im +{ + static const uint8 op_and_32_T0_im_code[] = { + 0x81, 0xe3, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_and_32_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_or_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_or_32_T0_T1 +{ + static const uint8 op_or_32_T0_T1_code[] = { + 0x09, 0xf3 + }; + copy_block(op_or_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_or_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_or_32_T0_im +{ + static const uint8 op_or_32_T0_im_code[] = { + 0x81, 0xcb, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_or_32_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_xor_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xor_32_T0_T1 +{ + static const uint8 op_xor_32_T0_T1_code[] = { + 0x31, 0xf3 + }; + copy_block(op_xor_32_T0_T1_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_xor_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_xor_32_T0_im +{ + static const uint8 op_xor_32_T0_im_code[] = { + 0x81, 0xf3, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_xor_32_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_orc_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_orc_32_T0_T1 +{ + static const uint8 op_orc_32_T0_T1_code[] = { + 0x89, 0xf0, 0xf7, 0xd0, 0x09, 0xc3 + }; + copy_block(op_orc_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_andc_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_andc_32_T0_T1 +{ + static const uint8 op_andc_32_T0_T1_code[] = { + 0x89, 0xf0, 0xf7, 0xd0, 0x21, 0xc3 + }; + copy_block(op_andc_32_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_nand_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nand_32_T0_T1 +{ + static const uint8 op_nand_32_T0_T1_code[] = { + 0x89, 0xd8, 0x21, 0xf0, 0x89, 0xc3, 0xf7, 0xd3 + }; + copy_block(op_nand_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_nor_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nor_32_T0_T1 +{ + static const uint8 op_nor_32_T0_T1_code[] = { + 0x89, 0xd8, 0x09, 0xf0, 0x89, 0xc3, 0xf7, 0xd3 + }; + copy_block(op_nor_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_eqv_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_eqv_32_T0_T1 +{ + static const uint8 op_eqv_32_T0_T1_code[] = { + 0x89, 0xd8, 0x31, 0xf0, 0x89, 0xc3, 0xf7, 0xd3 + }; + copy_block(op_eqv_32_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_lsl_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsl_32_T0_T1 +{ + static const uint8 op_lsl_32_T0_T1_code[] = { + 0x89, 0xf1, 0xd3, 0xe3 + }; + copy_block(op_lsl_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_lsl_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsl_32_T0_im +{ + static const uint8 op_lsl_32_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x88, 0xc1, 0xd3, 0xe3 + }; + copy_block(op_lsl_32_T0_im_code, 9); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_lsr_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsr_32_T0_T1 +{ + static const uint8 op_lsr_32_T0_T1_code[] = { + 0x89, 0xf1, 0xd3, 0xeb + }; + copy_block(op_lsr_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_lsr_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lsr_32_T0_im +{ + static const uint8 op_lsr_32_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x88, 0xc1, 0xd3, 0xeb + }; + copy_block(op_lsr_32_T0_im_code, 9); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_asr_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_asr_32_T0_T1 +{ + static const uint8 op_asr_32_T0_T1_code[] = { + 0x89, 0xf1, 0xd3, 0xfb + }; + copy_block(op_asr_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_asr_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_asr_32_T0_im +{ + static const uint8 op_asr_32_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x88, 0xc1, 0xd3, 0xfb + }; + copy_block(op_asr_32_T0_im_code, 9); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_rol_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rol_32_T0_T1 +{ + static const uint8 op_rol_32_T0_T1_code[] = { + 0x89, 0xf1, 0xd3, 0xc3 + }; + copy_block(op_rol_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_rol_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rol_32_T0_im +{ + static const uint8 op_rol_32_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x88, 0xc1, 0xd3, 0xc3 + }; + copy_block(op_rol_32_T0_im_code, 9); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_ror_32_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ror_32_T0_T1 +{ + static const uint8 op_ror_32_T0_T1_code[] = { + 0x89, 0xf1, 0xd3, 0xcb + }; + copy_block(op_ror_32_T0_T1_code, 4); + inc_code_ptr(4); +} +#endif + +DEFINE_GEN(gen_op_ror_32_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ror_32_T0_im +{ + static const uint8 op_ror_32_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x88, 0xc1, 0xd3, 0xcb + }; + copy_block(op_ror_32_T0_im_code, 9); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_se_16_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_16_32_T0 +{ + static const uint8 op_se_16_32_T0_code[] = { + 0x0f, 0xbf, 0xdb + }; + copy_block(op_se_16_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_se_16_32_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_16_32_T1 +{ + static const uint8 op_se_16_32_T1_code[] = { + 0x0f, 0xbf, 0xf6 + }; + copy_block(op_se_16_32_T1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_ze_16_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ze_16_32_T0 +{ + static const uint8 op_ze_16_32_T0_code[] = { + 0x0f, 0xb7, 0xdb + }; + copy_block(op_ze_16_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_se_8_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_se_8_32_T0 +{ + static const uint8 op_se_8_32_T0_code[] = { + 0x0f, 0xbe, 0xdb + }; + copy_block(op_se_8_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_ze_8_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_ze_8_32_T0 +{ + static const uint8 op_ze_8_32_T0_code[] = { + 0x0f, 0xb6, 0xdb + }; + copy_block(op_ze_8_32_T0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_0 +{ + static const uint8 op_load_u32_T0_T1_0_code[] = { + 0x8b, 0x86, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_u32_T0_T1_0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_0 +{ + static const uint8 op_load_s32_T0_T1_0_code[] = { + 0x8b, 0x86, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_s32_T0_T1_0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_0 +{ + static const uint8 op_store_32_T0_T1_0_code[] = { + 0x89, 0xd8, 0x0f, 0xc8, 0x89, 0x86, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_32_T0_T1_0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_im +{ + static const uint8 op_load_u32_T0_T1_im_code[] = { + 0x8b, 0x86, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_u32_T0_T1_im_code, 10); + *(uint32_t *)(code_ptr() + 2) = param1 + 285212672; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_im +{ + static const uint8 op_load_s32_T0_T1_im_code[] = { + 0x8b, 0x86, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_s32_T0_T1_im_code, 10); + *(uint32_t *)(code_ptr() + 2) = param1 + 285212672; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_im +{ + static const uint8 op_store_32_T0_T1_im_code[] = { + 0x8d, 0x96, 0x00, 0x00, 0x00, 0x00, 0x89, 0xd8, 0x0f, 0xc8, 0x89, 0x82, + 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_32_T0_T1_im_code, 16); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_load_u32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u32_T0_T1_T2 +{ + static const uint8 op_load_u32_T0_T1_T2_code[] = { + 0x8b, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_u32_T0_T1_T2_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_load_s32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s32_T0_T1_T2 +{ + static const uint8 op_load_s32_T0_T1_T2_code[] = { + 0x8b, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb + }; + copy_block(op_load_s32_T0_T1_T2_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_32_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_32_T0_T1_T2 +{ + static const uint8 op_store_32_T0_T1_T2_code[] = { + 0x8d, 0x14, 0x3e, 0x89, 0xd8, 0x0f, 0xc8, 0x89, 0x82, 0x00, 0x00, 0x00, + 0x11 + }; + copy_block(op_store_32_T0_T1_T2_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_0 +{ + static const uint8 op_load_u16_T0_T1_0_code[] = { + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + }; + copy_block(op_load_u16_T0_T1_0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_0 +{ + static const uint8 op_load_s16_T0_T1_0_code[] = { + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, 0xd8 + }; + copy_block(op_load_s16_T0_T1_0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_0 +{ + static const uint8 op_store_16_T0_T1_0_code[] = { + 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, 0x89, 0x86, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_16_T0_T1_0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_im +{ + static const uint8 op_load_u16_T0_T1_im_code[] = { + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + }; + copy_block(op_load_u16_T0_T1_im_code, 12); + *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_im +{ + static const uint8 op_load_s16_T0_T1_im_code[] = { + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, 0xd8 + }; + copy_block(op_load_s16_T0_T1_im_code, 12); + *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_im +{ + static const uint8 op_store_16_T0_T1_im_code[] = { + 0x8d, 0x96, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, + 0x89, 0x82, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_16_T0_T1_im_code, 18); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u16_T0_T1_T2 +{ + static const uint8 op_load_u16_T0_T1_T2_code[] = { + 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, + 0xd8 + }; + copy_block(op_load_u16_T0_T1_T2_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s16_T0_T1_T2 +{ + static const uint8 op_load_s16_T0_T1_T2_code[] = { + 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, + 0xd8 + }; + copy_block(op_load_s16_T0_T1_T2_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_store_16_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_16_T0_T1_T2 +{ + static const uint8 op_store_16_T0_T1_T2_code[] = { + 0x8d, 0x14, 0x3e, 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, 0x89, 0x82, 0x00, + 0x00, 0x00, 0x11 + }; + copy_block(op_store_16_T0_T1_T2_code, 15); + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_0 +{ + static const uint8 op_load_u8_T0_T1_0_code[] = { + 0x0f, 0xb6, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_u8_T0_T1_0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_0 +{ + static const uint8 op_load_s8_T0_T1_0_code[] = { + 0x0f, 0xbe, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_s8_T0_T1_0_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_0 +{ + static const uint8 op_store_8_T0_T1_0_code[] = { + 0x88, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_8_T0_T1_0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_im +{ + static const uint8 op_load_u8_T0_T1_im_code[] = { + 0x0f, 0xb6, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_u8_T0_T1_im_code, 7); + *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_im +{ + static const uint8 op_load_s8_T0_T1_im_code[] = { + 0x0f, 0xbe, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_s8_T0_T1_im_code, 7); + *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_im +{ + static const uint8 op_store_8_T0_T1_im_code[] = { + 0x88, 0x9e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_8_T0_T1_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 285212672; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_u8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_u8_T0_T1_T2 +{ + static const uint8 op_load_u8_T0_T1_T2_code[] = { + 0x0f, 0xb6, 0x9c, 0x3e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_u8_T0_T1_T2_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_load_s8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_s8_T0_T1_T2 +{ + static const uint8 op_load_s8_T0_T1_T2_code[] = { + 0x0f, 0xbe, 0x9c, 0x3e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_load_s8_T0_T1_T2_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_store_8_T0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_8_T0_T1_T2 +{ + static const uint8 op_store_8_T0_T1_T2_code[] = { + 0x88, 0x9c, 0x3e, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_8_T0_T1_T2_code, 7); + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_execute,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_execute +{ + static const uint8 op_execute_code[] = { + 0x83, 0xec, 0x50, 0x89, 0x6c, 0x24, 0x4c, 0x8b, 0x6c, 0x24, 0x58, 0x89, + 0x5c, 0x24, 0x48, 0x89, 0x74, 0x24, 0x44, 0x89, 0x7c, 0x24, 0x40, 0xff, + 0x64, 0x24, 0x54, 0x90, 0x8d, 0x74, 0x26, 0x00, 0xff, 0x54, 0x24, 0x54, + 0x8b, 0x7c, 0x24, 0x40, 0x8b, 0x74, 0x24, 0x44, 0x8b, 0x5c, 0x24, 0x48, + 0x8b, 0x6c, 0x24, 0x4c, 0x83, 0xc4, 0x50, 0xc3, 0x90, 0x8d, 0xb4, 0x26, + 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_execute_code, 64); + inc_code_ptr(64); +} +#endif + +DEFINE_GEN(gen_op_jmp_slow,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_slow +{ + static const uint8 op_jmp_slow_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0xff, 0xe0 + }; + copy_block(op_jmp_slow_code, 7); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(7); +} +#endif + +DEFINE_GEN(gen_op_jmp_fast,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_fast +{ + static const uint8 op_jmp_fast_code[] = { + 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_jmp_fast_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 - (long)(code_ptr() + 1) + 0 -4; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_jmp_A0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jmp_A0 +{ + static const uint8 op_jmp_A0_code[] = { + 0xff, 0xe3 + }; + copy_block(op_jmp_A0_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_invoke,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke +{ + static const uint8 helper_op_invoke_code[] = { + 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 - (long)(code_ptr() + 1) + 0 -4; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0 +{ + static const uint8 helper_op_invoke_T0_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x58 + }; + copy_block(helper_op_invoke_T0_code, 12); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_T1 +{ + static const uint8 helper_op_invoke_T0_T1_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x74, 0x24, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_T0_T1_code, 18); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_T1_T2,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_T1_T2 +{ + static const uint8 helper_op_invoke_T0_T1_T2_code[] = { + 0x83, 0xec, 0x0c, 0x89, 0x7c, 0x24, 0x08, 0x89, 0x74, 0x24, 0x04, 0x89, + 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x0c + }; + copy_block(helper_op_invoke_T0_T1_T2_code, 22); + *(uint32_t *)(code_ptr() + 15) = param1 - (long)(code_ptr() + 15) + 0 -4; + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_invoke_T0_ret_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_T0_ret_T0 +{ + static const uint8 helper_op_invoke_T0_ret_T0_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x5a, + 0x89, 0xc3 + }; + copy_block(helper_op_invoke_T0_ret_T0_code, 14); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_invoke_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_im +{ + static const uint8 helper_op_invoke_im_code[] = { + 0x83, 0xec, 0x04, 0xc7, 0x04, 0x24, 0x00, 0x00, 0x00, 0x00, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x59 + }; + copy_block(helper_op_invoke_im_code, 16); + *(uint32_t *)(code_ptr() + 6) = param2 + 0; + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU +{ + static const uint8 helper_op_invoke_CPU_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x58 + }; + copy_block(helper_op_invoke_CPU_code, 12); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_T0 +{ + static const uint8 helper_op_invoke_CPU_T0_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x5c, 0x24, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_CPU_T0_code, 18); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_im +{ + static const uint8 helper_op_invoke_CPU_im_code[] = { + 0x83, 0xec, 0x08, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x04, + 0x89, 0x2c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_CPU_im_code, 23); + *(uint32_t *)(code_ptr() + 4) = param2 + 0; + *(uint32_t *)(code_ptr() + 16) = param1 - (long)(code_ptr() + 16) + 0 -4; + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_im_im,void,(long param1, long param2, long param3)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_im_im +{ + static const uint8 helper_op_invoke_CPU_im_im_code[] = { + 0x83, 0xec, 0x0c, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x08, + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x04, 0x89, 0x2c, 0x24, + 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x0c + }; + copy_block(helper_op_invoke_CPU_im_im_code, 32); + *(uint32_t *)(code_ptr() + 4) = param3 + 0; + *(uint32_t *)(code_ptr() + 13) = param2 + 0; + *(uint32_t *)(code_ptr() + 25) = param1 - (long)(code_ptr() + 25) + 0 -4; + inc_code_ptr(32); +} +#endif + +DEFINE_GEN(gen_op_invoke_CPU_A0_ret_A0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_CPU_A0_ret_A0 +{ + static const uint8 helper_op_invoke_CPU_A0_ret_A0_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x5c, 0x24, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_CPU_A0_ret_A0_code, 20); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct +{ + static const uint8 helper_op_invoke_direct_code[] = { + 0xe8, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(helper_op_invoke_direct_code, 5); + *(uint32_t *)(code_ptr() + 1) = param1 - (long)(code_ptr() + 1) + 0 -4; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0 +{ + static const uint8 helper_op_invoke_direct_T0_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x58 + }; + copy_block(helper_op_invoke_direct_T0_code, 12); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_T1 +{ + static const uint8 helper_op_invoke_direct_T0_T1_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x74, 0x24, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_direct_T0_T1_code, 18); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_T1_T2,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_T1_T2 +{ + static const uint8 helper_op_invoke_direct_T0_T1_T2_code[] = { + 0x83, 0xec, 0x0c, 0x89, 0x7c, 0x24, 0x08, 0x89, 0x74, 0x24, 0x04, 0x89, + 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x0c + }; + copy_block(helper_op_invoke_direct_T0_T1_T2_code, 22); + *(uint32_t *)(code_ptr() + 15) = param1 - (long)(code_ptr() + 15) + 0 -4; + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_T0_ret_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_T0_ret_T0 +{ + static const uint8 helper_op_invoke_direct_T0_ret_T0_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x1c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x89, + 0xc3, 0x58 + }; + copy_block(helper_op_invoke_direct_T0_ret_T0_code, 14); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_im +{ + static const uint8 helper_op_invoke_direct_im_code[] = { + 0x83, 0xec, 0x04, 0xc7, 0x04, 0x24, 0x00, 0x00, 0x00, 0x00, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x5a + }; + copy_block(helper_op_invoke_direct_im_code, 16); + *(uint32_t *)(code_ptr() + 6) = param2 + 0; + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU +{ + static const uint8 helper_op_invoke_direct_CPU_code[] = { + 0x83, 0xec, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x59 + }; + copy_block(helper_op_invoke_direct_CPU_code, 12); + *(uint32_t *)(code_ptr() + 7) = param1 - (long)(code_ptr() + 7) + 0 -4; + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_T0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_T0 +{ + static const uint8 helper_op_invoke_direct_CPU_T0_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x5c, 0x24, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_direct_CPU_T0_code, 18); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(18); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_im +{ + static const uint8 helper_op_invoke_direct_CPU_im_code[] = { + 0x83, 0xec, 0x08, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x04, + 0x89, 0x2c, 0x24, 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_direct_CPU_im_code, 23); + *(uint32_t *)(code_ptr() + 4) = param2 + 0; + *(uint32_t *)(code_ptr() + 16) = param1 - (long)(code_ptr() + 16) + 0 -4; + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_im_im,void,(long param1, long param2, long param3)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_im_im +{ + static const uint8 helper_op_invoke_direct_CPU_im_im_code[] = { + 0x83, 0xec, 0x0c, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x08, + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x44, 0x24, 0x04, 0x89, 0x2c, 0x24, + 0xe8, 0x00, 0x00, 0x00, 0x00, 0x83, 0xc4, 0x0c + }; + copy_block(helper_op_invoke_direct_CPU_im_im_code, 32); + *(uint32_t *)(code_ptr() + 4) = param3 + 0; + *(uint32_t *)(code_ptr() + 13) = param2 + 0; + *(uint32_t *)(code_ptr() + 25) = param1 - (long)(code_ptr() + 25) + 0 -4; + inc_code_ptr(32); +} +#endif + +DEFINE_GEN(gen_op_invoke_direct_CPU_A0_ret_A0,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_invoke_direct_CPU_A0_ret_A0 +{ + static const uint8 helper_op_invoke_direct_CPU_A0_ret_A0_code[] = { + 0x83, 0xec, 0x08, 0x89, 0x5c, 0x24, 0x04, 0x89, 0x2c, 0x24, 0xe8, 0x00, + 0x00, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xc4, 0x08 + }; + copy_block(helper_op_invoke_direct_CPU_A0_ret_A0_code, 20); + *(uint32_t *)(code_ptr() + 11) = param1 - (long)(code_ptr() + 11) + 0 -4; + inc_code_ptr(20); +} +#endif + +DEFINE_CST(op_exec_return_offset,0x24L) + +#undef DEFINE_CST +#undef DEFINE_GEN diff --git a/SheepShaver/src/Windows/cygwin_precompiled_dyngen/ppc-dyngen-ops.hpp b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/ppc-dyngen-ops.hpp new file mode 100644 index 000000000..9f2e1f3fd --- /dev/null +++ b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/ppc-dyngen-ops.hpp @@ -0,0 +1,11173 @@ +#ifndef DEFINE_CST +#define DEFINE_CST(NAME, VALUE) +#endif +DEFINE_GEN(gen_op_load_T0_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR0 +{ + static const uint8 op_load_T0_GPR0_code[] = { + 0x8b, 0x5d, 0x10 + }; + copy_block(op_load_T0_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR0 +{ + static const uint8 op_store_T0_GPR0_code[] = { + 0x89, 0x5d, 0x10 + }; + copy_block(op_store_T0_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR0 +{ + static const uint8 op_load_T1_GPR0_code[] = { + 0x8b, 0x75, 0x10 + }; + copy_block(op_load_T1_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR0 +{ + static const uint8 op_store_T1_GPR0_code[] = { + 0x89, 0x75, 0x10 + }; + copy_block(op_store_T1_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR0 +{ + static const uint8 op_load_T2_GPR0_code[] = { + 0x8b, 0x7d, 0x10 + }; + copy_block(op_load_T2_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR0 +{ + static const uint8 op_store_T2_GPR0_code[] = { + 0x89, 0x7d, 0x10 + }; + copy_block(op_store_T2_GPR0_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR1 +{ + static const uint8 op_load_T0_GPR1_code[] = { + 0x8b, 0x5d, 0x14 + }; + copy_block(op_load_T0_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR1 +{ + static const uint8 op_store_T0_GPR1_code[] = { + 0x89, 0x5d, 0x14 + }; + copy_block(op_store_T0_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR1 +{ + static const uint8 op_load_T1_GPR1_code[] = { + 0x8b, 0x75, 0x14 + }; + copy_block(op_load_T1_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR1 +{ + static const uint8 op_store_T1_GPR1_code[] = { + 0x89, 0x75, 0x14 + }; + copy_block(op_store_T1_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR1 +{ + static const uint8 op_load_T2_GPR1_code[] = { + 0x8b, 0x7d, 0x14 + }; + copy_block(op_load_T2_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR1 +{ + static const uint8 op_store_T2_GPR1_code[] = { + 0x89, 0x7d, 0x14 + }; + copy_block(op_store_T2_GPR1_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR2 +{ + static const uint8 op_load_T0_GPR2_code[] = { + 0x8b, 0x5d, 0x18 + }; + copy_block(op_load_T0_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR2 +{ + static const uint8 op_store_T0_GPR2_code[] = { + 0x89, 0x5d, 0x18 + }; + copy_block(op_store_T0_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR2 +{ + static const uint8 op_load_T1_GPR2_code[] = { + 0x8b, 0x75, 0x18 + }; + copy_block(op_load_T1_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR2 +{ + static const uint8 op_store_T1_GPR2_code[] = { + 0x89, 0x75, 0x18 + }; + copy_block(op_store_T1_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR2 +{ + static const uint8 op_load_T2_GPR2_code[] = { + 0x8b, 0x7d, 0x18 + }; + copy_block(op_load_T2_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR2 +{ + static const uint8 op_store_T2_GPR2_code[] = { + 0x89, 0x7d, 0x18 + }; + copy_block(op_store_T2_GPR2_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR3 +{ + static const uint8 op_load_T0_GPR3_code[] = { + 0x8b, 0x5d, 0x1c + }; + copy_block(op_load_T0_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR3 +{ + static const uint8 op_store_T0_GPR3_code[] = { + 0x89, 0x5d, 0x1c + }; + copy_block(op_store_T0_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR3 +{ + static const uint8 op_load_T1_GPR3_code[] = { + 0x8b, 0x75, 0x1c + }; + copy_block(op_load_T1_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR3 +{ + static const uint8 op_store_T1_GPR3_code[] = { + 0x89, 0x75, 0x1c + }; + copy_block(op_store_T1_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR3 +{ + static const uint8 op_load_T2_GPR3_code[] = { + 0x8b, 0x7d, 0x1c + }; + copy_block(op_load_T2_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR3 +{ + static const uint8 op_store_T2_GPR3_code[] = { + 0x89, 0x7d, 0x1c + }; + copy_block(op_store_T2_GPR3_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR4 +{ + static const uint8 op_load_T0_GPR4_code[] = { + 0x8b, 0x5d, 0x20 + }; + copy_block(op_load_T0_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR4 +{ + static const uint8 op_store_T0_GPR4_code[] = { + 0x89, 0x5d, 0x20 + }; + copy_block(op_store_T0_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR4 +{ + static const uint8 op_load_T1_GPR4_code[] = { + 0x8b, 0x75, 0x20 + }; + copy_block(op_load_T1_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR4 +{ + static const uint8 op_store_T1_GPR4_code[] = { + 0x89, 0x75, 0x20 + }; + copy_block(op_store_T1_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR4 +{ + static const uint8 op_load_T2_GPR4_code[] = { + 0x8b, 0x7d, 0x20 + }; + copy_block(op_load_T2_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR4 +{ + static const uint8 op_store_T2_GPR4_code[] = { + 0x89, 0x7d, 0x20 + }; + copy_block(op_store_T2_GPR4_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR5 +{ + static const uint8 op_load_T0_GPR5_code[] = { + 0x8b, 0x5d, 0x24 + }; + copy_block(op_load_T0_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR5 +{ + static const uint8 op_store_T0_GPR5_code[] = { + 0x89, 0x5d, 0x24 + }; + copy_block(op_store_T0_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR5 +{ + static const uint8 op_load_T1_GPR5_code[] = { + 0x8b, 0x75, 0x24 + }; + copy_block(op_load_T1_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR5 +{ + static const uint8 op_store_T1_GPR5_code[] = { + 0x89, 0x75, 0x24 + }; + copy_block(op_store_T1_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR5 +{ + static const uint8 op_load_T2_GPR5_code[] = { + 0x8b, 0x7d, 0x24 + }; + copy_block(op_load_T2_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR5 +{ + static const uint8 op_store_T2_GPR5_code[] = { + 0x89, 0x7d, 0x24 + }; + copy_block(op_store_T2_GPR5_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR6 +{ + static const uint8 op_load_T0_GPR6_code[] = { + 0x8b, 0x5d, 0x28 + }; + copy_block(op_load_T0_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR6 +{ + static const uint8 op_store_T0_GPR6_code[] = { + 0x89, 0x5d, 0x28 + }; + copy_block(op_store_T0_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR6 +{ + static const uint8 op_load_T1_GPR6_code[] = { + 0x8b, 0x75, 0x28 + }; + copy_block(op_load_T1_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR6 +{ + static const uint8 op_store_T1_GPR6_code[] = { + 0x89, 0x75, 0x28 + }; + copy_block(op_store_T1_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR6 +{ + static const uint8 op_load_T2_GPR6_code[] = { + 0x8b, 0x7d, 0x28 + }; + copy_block(op_load_T2_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR6 +{ + static const uint8 op_store_T2_GPR6_code[] = { + 0x89, 0x7d, 0x28 + }; + copy_block(op_store_T2_GPR6_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR7 +{ + static const uint8 op_load_T0_GPR7_code[] = { + 0x8b, 0x5d, 0x2c + }; + copy_block(op_load_T0_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR7 +{ + static const uint8 op_store_T0_GPR7_code[] = { + 0x89, 0x5d, 0x2c + }; + copy_block(op_store_T0_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR7 +{ + static const uint8 op_load_T1_GPR7_code[] = { + 0x8b, 0x75, 0x2c + }; + copy_block(op_load_T1_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR7 +{ + static const uint8 op_store_T1_GPR7_code[] = { + 0x89, 0x75, 0x2c + }; + copy_block(op_store_T1_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR7 +{ + static const uint8 op_load_T2_GPR7_code[] = { + 0x8b, 0x7d, 0x2c + }; + copy_block(op_load_T2_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR7 +{ + static const uint8 op_store_T2_GPR7_code[] = { + 0x89, 0x7d, 0x2c + }; + copy_block(op_store_T2_GPR7_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR8 +{ + static const uint8 op_load_T0_GPR8_code[] = { + 0x8b, 0x5d, 0x30 + }; + copy_block(op_load_T0_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR8 +{ + static const uint8 op_store_T0_GPR8_code[] = { + 0x89, 0x5d, 0x30 + }; + copy_block(op_store_T0_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR8 +{ + static const uint8 op_load_T1_GPR8_code[] = { + 0x8b, 0x75, 0x30 + }; + copy_block(op_load_T1_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR8 +{ + static const uint8 op_store_T1_GPR8_code[] = { + 0x89, 0x75, 0x30 + }; + copy_block(op_store_T1_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR8 +{ + static const uint8 op_load_T2_GPR8_code[] = { + 0x8b, 0x7d, 0x30 + }; + copy_block(op_load_T2_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR8 +{ + static const uint8 op_store_T2_GPR8_code[] = { + 0x89, 0x7d, 0x30 + }; + copy_block(op_store_T2_GPR8_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR9 +{ + static const uint8 op_load_T0_GPR9_code[] = { + 0x8b, 0x5d, 0x34 + }; + copy_block(op_load_T0_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR9 +{ + static const uint8 op_store_T0_GPR9_code[] = { + 0x89, 0x5d, 0x34 + }; + copy_block(op_store_T0_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR9 +{ + static const uint8 op_load_T1_GPR9_code[] = { + 0x8b, 0x75, 0x34 + }; + copy_block(op_load_T1_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR9 +{ + static const uint8 op_store_T1_GPR9_code[] = { + 0x89, 0x75, 0x34 + }; + copy_block(op_store_T1_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR9 +{ + static const uint8 op_load_T2_GPR9_code[] = { + 0x8b, 0x7d, 0x34 + }; + copy_block(op_load_T2_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR9 +{ + static const uint8 op_store_T2_GPR9_code[] = { + 0x89, 0x7d, 0x34 + }; + copy_block(op_store_T2_GPR9_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR10 +{ + static const uint8 op_load_T0_GPR10_code[] = { + 0x8b, 0x5d, 0x38 + }; + copy_block(op_load_T0_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR10 +{ + static const uint8 op_store_T0_GPR10_code[] = { + 0x89, 0x5d, 0x38 + }; + copy_block(op_store_T0_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR10 +{ + static const uint8 op_load_T1_GPR10_code[] = { + 0x8b, 0x75, 0x38 + }; + copy_block(op_load_T1_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR10 +{ + static const uint8 op_store_T1_GPR10_code[] = { + 0x89, 0x75, 0x38 + }; + copy_block(op_store_T1_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR10 +{ + static const uint8 op_load_T2_GPR10_code[] = { + 0x8b, 0x7d, 0x38 + }; + copy_block(op_load_T2_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR10 +{ + static const uint8 op_store_T2_GPR10_code[] = { + 0x89, 0x7d, 0x38 + }; + copy_block(op_store_T2_GPR10_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR11 +{ + static const uint8 op_load_T0_GPR11_code[] = { + 0x8b, 0x5d, 0x3c + }; + copy_block(op_load_T0_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR11 +{ + static const uint8 op_store_T0_GPR11_code[] = { + 0x89, 0x5d, 0x3c + }; + copy_block(op_store_T0_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR11 +{ + static const uint8 op_load_T1_GPR11_code[] = { + 0x8b, 0x75, 0x3c + }; + copy_block(op_load_T1_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR11 +{ + static const uint8 op_store_T1_GPR11_code[] = { + 0x89, 0x75, 0x3c + }; + copy_block(op_store_T1_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR11 +{ + static const uint8 op_load_T2_GPR11_code[] = { + 0x8b, 0x7d, 0x3c + }; + copy_block(op_load_T2_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR11 +{ + static const uint8 op_store_T2_GPR11_code[] = { + 0x89, 0x7d, 0x3c + }; + copy_block(op_store_T2_GPR11_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR12 +{ + static const uint8 op_load_T0_GPR12_code[] = { + 0x8b, 0x5d, 0x40 + }; + copy_block(op_load_T0_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR12 +{ + static const uint8 op_store_T0_GPR12_code[] = { + 0x89, 0x5d, 0x40 + }; + copy_block(op_store_T0_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR12 +{ + static const uint8 op_load_T1_GPR12_code[] = { + 0x8b, 0x75, 0x40 + }; + copy_block(op_load_T1_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR12 +{ + static const uint8 op_store_T1_GPR12_code[] = { + 0x89, 0x75, 0x40 + }; + copy_block(op_store_T1_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR12 +{ + static const uint8 op_load_T2_GPR12_code[] = { + 0x8b, 0x7d, 0x40 + }; + copy_block(op_load_T2_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR12 +{ + static const uint8 op_store_T2_GPR12_code[] = { + 0x89, 0x7d, 0x40 + }; + copy_block(op_store_T2_GPR12_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR13 +{ + static const uint8 op_load_T0_GPR13_code[] = { + 0x8b, 0x5d, 0x44 + }; + copy_block(op_load_T0_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR13 +{ + static const uint8 op_store_T0_GPR13_code[] = { + 0x89, 0x5d, 0x44 + }; + copy_block(op_store_T0_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR13 +{ + static const uint8 op_load_T1_GPR13_code[] = { + 0x8b, 0x75, 0x44 + }; + copy_block(op_load_T1_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR13 +{ + static const uint8 op_store_T1_GPR13_code[] = { + 0x89, 0x75, 0x44 + }; + copy_block(op_store_T1_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR13 +{ + static const uint8 op_load_T2_GPR13_code[] = { + 0x8b, 0x7d, 0x44 + }; + copy_block(op_load_T2_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR13 +{ + static const uint8 op_store_T2_GPR13_code[] = { + 0x89, 0x7d, 0x44 + }; + copy_block(op_store_T2_GPR13_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR14 +{ + static const uint8 op_load_T0_GPR14_code[] = { + 0x8b, 0x5d, 0x48 + }; + copy_block(op_load_T0_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR14 +{ + static const uint8 op_store_T0_GPR14_code[] = { + 0x89, 0x5d, 0x48 + }; + copy_block(op_store_T0_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR14 +{ + static const uint8 op_load_T1_GPR14_code[] = { + 0x8b, 0x75, 0x48 + }; + copy_block(op_load_T1_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR14 +{ + static const uint8 op_store_T1_GPR14_code[] = { + 0x89, 0x75, 0x48 + }; + copy_block(op_store_T1_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR14 +{ + static const uint8 op_load_T2_GPR14_code[] = { + 0x8b, 0x7d, 0x48 + }; + copy_block(op_load_T2_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR14 +{ + static const uint8 op_store_T2_GPR14_code[] = { + 0x89, 0x7d, 0x48 + }; + copy_block(op_store_T2_GPR14_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR15 +{ + static const uint8 op_load_T0_GPR15_code[] = { + 0x8b, 0x5d, 0x4c + }; + copy_block(op_load_T0_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR15 +{ + static const uint8 op_store_T0_GPR15_code[] = { + 0x89, 0x5d, 0x4c + }; + copy_block(op_store_T0_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR15 +{ + static const uint8 op_load_T1_GPR15_code[] = { + 0x8b, 0x75, 0x4c + }; + copy_block(op_load_T1_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR15 +{ + static const uint8 op_store_T1_GPR15_code[] = { + 0x89, 0x75, 0x4c + }; + copy_block(op_store_T1_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR15 +{ + static const uint8 op_load_T2_GPR15_code[] = { + 0x8b, 0x7d, 0x4c + }; + copy_block(op_load_T2_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR15 +{ + static const uint8 op_store_T2_GPR15_code[] = { + 0x89, 0x7d, 0x4c + }; + copy_block(op_store_T2_GPR15_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR16 +{ + static const uint8 op_load_T0_GPR16_code[] = { + 0x8b, 0x5d, 0x50 + }; + copy_block(op_load_T0_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR16 +{ + static const uint8 op_store_T0_GPR16_code[] = { + 0x89, 0x5d, 0x50 + }; + copy_block(op_store_T0_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR16 +{ + static const uint8 op_load_T1_GPR16_code[] = { + 0x8b, 0x75, 0x50 + }; + copy_block(op_load_T1_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR16 +{ + static const uint8 op_store_T1_GPR16_code[] = { + 0x89, 0x75, 0x50 + }; + copy_block(op_store_T1_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR16 +{ + static const uint8 op_load_T2_GPR16_code[] = { + 0x8b, 0x7d, 0x50 + }; + copy_block(op_load_T2_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR16 +{ + static const uint8 op_store_T2_GPR16_code[] = { + 0x89, 0x7d, 0x50 + }; + copy_block(op_store_T2_GPR16_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR17 +{ + static const uint8 op_load_T0_GPR17_code[] = { + 0x8b, 0x5d, 0x54 + }; + copy_block(op_load_T0_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR17 +{ + static const uint8 op_store_T0_GPR17_code[] = { + 0x89, 0x5d, 0x54 + }; + copy_block(op_store_T0_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR17 +{ + static const uint8 op_load_T1_GPR17_code[] = { + 0x8b, 0x75, 0x54 + }; + copy_block(op_load_T1_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR17 +{ + static const uint8 op_store_T1_GPR17_code[] = { + 0x89, 0x75, 0x54 + }; + copy_block(op_store_T1_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR17 +{ + static const uint8 op_load_T2_GPR17_code[] = { + 0x8b, 0x7d, 0x54 + }; + copy_block(op_load_T2_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR17 +{ + static const uint8 op_store_T2_GPR17_code[] = { + 0x89, 0x7d, 0x54 + }; + copy_block(op_store_T2_GPR17_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR18 +{ + static const uint8 op_load_T0_GPR18_code[] = { + 0x8b, 0x5d, 0x58 + }; + copy_block(op_load_T0_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR18 +{ + static const uint8 op_store_T0_GPR18_code[] = { + 0x89, 0x5d, 0x58 + }; + copy_block(op_store_T0_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR18 +{ + static const uint8 op_load_T1_GPR18_code[] = { + 0x8b, 0x75, 0x58 + }; + copy_block(op_load_T1_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR18 +{ + static const uint8 op_store_T1_GPR18_code[] = { + 0x89, 0x75, 0x58 + }; + copy_block(op_store_T1_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR18 +{ + static const uint8 op_load_T2_GPR18_code[] = { + 0x8b, 0x7d, 0x58 + }; + copy_block(op_load_T2_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR18 +{ + static const uint8 op_store_T2_GPR18_code[] = { + 0x89, 0x7d, 0x58 + }; + copy_block(op_store_T2_GPR18_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR19 +{ + static const uint8 op_load_T0_GPR19_code[] = { + 0x8b, 0x5d, 0x5c + }; + copy_block(op_load_T0_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR19 +{ + static const uint8 op_store_T0_GPR19_code[] = { + 0x89, 0x5d, 0x5c + }; + copy_block(op_store_T0_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR19 +{ + static const uint8 op_load_T1_GPR19_code[] = { + 0x8b, 0x75, 0x5c + }; + copy_block(op_load_T1_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR19 +{ + static const uint8 op_store_T1_GPR19_code[] = { + 0x89, 0x75, 0x5c + }; + copy_block(op_store_T1_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR19 +{ + static const uint8 op_load_T2_GPR19_code[] = { + 0x8b, 0x7d, 0x5c + }; + copy_block(op_load_T2_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR19 +{ + static const uint8 op_store_T2_GPR19_code[] = { + 0x89, 0x7d, 0x5c + }; + copy_block(op_store_T2_GPR19_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR20 +{ + static const uint8 op_load_T0_GPR20_code[] = { + 0x8b, 0x5d, 0x60 + }; + copy_block(op_load_T0_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR20 +{ + static const uint8 op_store_T0_GPR20_code[] = { + 0x89, 0x5d, 0x60 + }; + copy_block(op_store_T0_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR20 +{ + static const uint8 op_load_T1_GPR20_code[] = { + 0x8b, 0x75, 0x60 + }; + copy_block(op_load_T1_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR20 +{ + static const uint8 op_store_T1_GPR20_code[] = { + 0x89, 0x75, 0x60 + }; + copy_block(op_store_T1_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR20 +{ + static const uint8 op_load_T2_GPR20_code[] = { + 0x8b, 0x7d, 0x60 + }; + copy_block(op_load_T2_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR20 +{ + static const uint8 op_store_T2_GPR20_code[] = { + 0x89, 0x7d, 0x60 + }; + copy_block(op_store_T2_GPR20_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR21 +{ + static const uint8 op_load_T0_GPR21_code[] = { + 0x8b, 0x5d, 0x64 + }; + copy_block(op_load_T0_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR21 +{ + static const uint8 op_store_T0_GPR21_code[] = { + 0x89, 0x5d, 0x64 + }; + copy_block(op_store_T0_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR21 +{ + static const uint8 op_load_T1_GPR21_code[] = { + 0x8b, 0x75, 0x64 + }; + copy_block(op_load_T1_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR21 +{ + static const uint8 op_store_T1_GPR21_code[] = { + 0x89, 0x75, 0x64 + }; + copy_block(op_store_T1_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR21 +{ + static const uint8 op_load_T2_GPR21_code[] = { + 0x8b, 0x7d, 0x64 + }; + copy_block(op_load_T2_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR21 +{ + static const uint8 op_store_T2_GPR21_code[] = { + 0x89, 0x7d, 0x64 + }; + copy_block(op_store_T2_GPR21_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR22 +{ + static const uint8 op_load_T0_GPR22_code[] = { + 0x8b, 0x5d, 0x68 + }; + copy_block(op_load_T0_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR22 +{ + static const uint8 op_store_T0_GPR22_code[] = { + 0x89, 0x5d, 0x68 + }; + copy_block(op_store_T0_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR22 +{ + static const uint8 op_load_T1_GPR22_code[] = { + 0x8b, 0x75, 0x68 + }; + copy_block(op_load_T1_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR22 +{ + static const uint8 op_store_T1_GPR22_code[] = { + 0x89, 0x75, 0x68 + }; + copy_block(op_store_T1_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR22 +{ + static const uint8 op_load_T2_GPR22_code[] = { + 0x8b, 0x7d, 0x68 + }; + copy_block(op_load_T2_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR22 +{ + static const uint8 op_store_T2_GPR22_code[] = { + 0x89, 0x7d, 0x68 + }; + copy_block(op_store_T2_GPR22_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR23 +{ + static const uint8 op_load_T0_GPR23_code[] = { + 0x8b, 0x5d, 0x6c + }; + copy_block(op_load_T0_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR23 +{ + static const uint8 op_store_T0_GPR23_code[] = { + 0x89, 0x5d, 0x6c + }; + copy_block(op_store_T0_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR23 +{ + static const uint8 op_load_T1_GPR23_code[] = { + 0x8b, 0x75, 0x6c + }; + copy_block(op_load_T1_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR23 +{ + static const uint8 op_store_T1_GPR23_code[] = { + 0x89, 0x75, 0x6c + }; + copy_block(op_store_T1_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR23 +{ + static const uint8 op_load_T2_GPR23_code[] = { + 0x8b, 0x7d, 0x6c + }; + copy_block(op_load_T2_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR23 +{ + static const uint8 op_store_T2_GPR23_code[] = { + 0x89, 0x7d, 0x6c + }; + copy_block(op_store_T2_GPR23_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR24 +{ + static const uint8 op_load_T0_GPR24_code[] = { + 0x8b, 0x5d, 0x70 + }; + copy_block(op_load_T0_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR24 +{ + static const uint8 op_store_T0_GPR24_code[] = { + 0x89, 0x5d, 0x70 + }; + copy_block(op_store_T0_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR24 +{ + static const uint8 op_load_T1_GPR24_code[] = { + 0x8b, 0x75, 0x70 + }; + copy_block(op_load_T1_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR24 +{ + static const uint8 op_store_T1_GPR24_code[] = { + 0x89, 0x75, 0x70 + }; + copy_block(op_store_T1_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR24 +{ + static const uint8 op_load_T2_GPR24_code[] = { + 0x8b, 0x7d, 0x70 + }; + copy_block(op_load_T2_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR24 +{ + static const uint8 op_store_T2_GPR24_code[] = { + 0x89, 0x7d, 0x70 + }; + copy_block(op_store_T2_GPR24_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR25 +{ + static const uint8 op_load_T0_GPR25_code[] = { + 0x8b, 0x5d, 0x74 + }; + copy_block(op_load_T0_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR25 +{ + static const uint8 op_store_T0_GPR25_code[] = { + 0x89, 0x5d, 0x74 + }; + copy_block(op_store_T0_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR25 +{ + static const uint8 op_load_T1_GPR25_code[] = { + 0x8b, 0x75, 0x74 + }; + copy_block(op_load_T1_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR25 +{ + static const uint8 op_store_T1_GPR25_code[] = { + 0x89, 0x75, 0x74 + }; + copy_block(op_store_T1_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR25 +{ + static const uint8 op_load_T2_GPR25_code[] = { + 0x8b, 0x7d, 0x74 + }; + copy_block(op_load_T2_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR25 +{ + static const uint8 op_store_T2_GPR25_code[] = { + 0x89, 0x7d, 0x74 + }; + copy_block(op_store_T2_GPR25_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR26 +{ + static const uint8 op_load_T0_GPR26_code[] = { + 0x8b, 0x5d, 0x78 + }; + copy_block(op_load_T0_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR26 +{ + static const uint8 op_store_T0_GPR26_code[] = { + 0x89, 0x5d, 0x78 + }; + copy_block(op_store_T0_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR26 +{ + static const uint8 op_load_T1_GPR26_code[] = { + 0x8b, 0x75, 0x78 + }; + copy_block(op_load_T1_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR26 +{ + static const uint8 op_store_T1_GPR26_code[] = { + 0x89, 0x75, 0x78 + }; + copy_block(op_store_T1_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR26 +{ + static const uint8 op_load_T2_GPR26_code[] = { + 0x8b, 0x7d, 0x78 + }; + copy_block(op_load_T2_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR26 +{ + static const uint8 op_store_T2_GPR26_code[] = { + 0x89, 0x7d, 0x78 + }; + copy_block(op_store_T2_GPR26_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR27 +{ + static const uint8 op_load_T0_GPR27_code[] = { + 0x8b, 0x5d, 0x7c + }; + copy_block(op_load_T0_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR27 +{ + static const uint8 op_store_T0_GPR27_code[] = { + 0x89, 0x5d, 0x7c + }; + copy_block(op_store_T0_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR27 +{ + static const uint8 op_load_T1_GPR27_code[] = { + 0x8b, 0x75, 0x7c + }; + copy_block(op_load_T1_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR27 +{ + static const uint8 op_store_T1_GPR27_code[] = { + 0x89, 0x75, 0x7c + }; + copy_block(op_store_T1_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR27 +{ + static const uint8 op_load_T2_GPR27_code[] = { + 0x8b, 0x7d, 0x7c + }; + copy_block(op_load_T2_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR27 +{ + static const uint8 op_store_T2_GPR27_code[] = { + 0x89, 0x7d, 0x7c + }; + copy_block(op_store_T2_GPR27_code, 3); + inc_code_ptr(3); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR28 +{ + static const uint8 op_load_T0_GPR28_code[] = { + 0x8b, 0x9d, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR28 +{ + static const uint8 op_store_T0_GPR28_code[] = { + 0x89, 0x9d, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR28 +{ + static const uint8 op_load_T1_GPR28_code[] = { + 0x8b, 0xb5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR28 +{ + static const uint8 op_store_T1_GPR28_code[] = { + 0x89, 0xb5, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR28 +{ + static const uint8 op_load_T2_GPR28_code[] = { + 0x8b, 0xbd, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR28 +{ + static const uint8 op_store_T2_GPR28_code[] = { + 0x89, 0xbd, 0x80, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR29 +{ + static const uint8 op_load_T0_GPR29_code[] = { + 0x8b, 0x9d, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR29 +{ + static const uint8 op_store_T0_GPR29_code[] = { + 0x89, 0x9d, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR29 +{ + static const uint8 op_load_T1_GPR29_code[] = { + 0x8b, 0xb5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR29 +{ + static const uint8 op_store_T1_GPR29_code[] = { + 0x89, 0xb5, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR29 +{ + static const uint8 op_load_T2_GPR29_code[] = { + 0x8b, 0xbd, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR29 +{ + static const uint8 op_store_T2_GPR29_code[] = { + 0x89, 0xbd, 0x84, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR30 +{ + static const uint8 op_load_T0_GPR30_code[] = { + 0x8b, 0x9d, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR30 +{ + static const uint8 op_store_T0_GPR30_code[] = { + 0x89, 0x9d, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR30 +{ + static const uint8 op_load_T1_GPR30_code[] = { + 0x8b, 0xb5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR30 +{ + static const uint8 op_store_T1_GPR30_code[] = { + 0x89, 0xb5, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR30 +{ + static const uint8 op_load_T2_GPR30_code[] = { + 0x8b, 0xbd, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR30 +{ + static const uint8 op_store_T2_GPR30_code[] = { + 0x89, 0xbd, 0x88, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_GPR31 +{ + static const uint8 op_load_T0_GPR31_code[] = { + 0x8b, 0x9d, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T0_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_GPR31 +{ + static const uint8 op_store_T0_GPR31_code[] = { + 0x89, 0x9d, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T0_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T1_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_GPR31 +{ + static const uint8 op_load_T1_GPR31_code[] = { + 0x8b, 0xb5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T1_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T1_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_GPR31 +{ + static const uint8 op_store_T1_GPR31_code[] = { + 0x89, 0xb5, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T1_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T2_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T2_GPR31 +{ + static const uint8 op_load_T2_GPR31_code[] = { + 0x8b, 0xbd, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_load_T2_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T2_GPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T2_GPR31 +{ + static const uint8 op_store_T2_GPR31_code[] = { + 0x89, 0xbd, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_T2_GPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR0 +{ + static const uint8 op_load_F0_FPR0_code[] = { + 0x8d, 0x9d, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR0 +{ + static const uint8 op_store_F0_FPR0_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x94, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR0_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR0 +{ + static const uint8 op_load_F1_FPR0_code[] = { + 0x8d, 0xb5, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR0 +{ + static const uint8 op_store_F1_FPR0_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x94, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR0_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR0 +{ + static const uint8 op_load_F2_FPR0_code[] = { + 0x8d, 0xbd, 0x90, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR0 +{ + static const uint8 op_store_F2_FPR0_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x90, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x94, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR0_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR0 +{ + static const uint8 op_store_FD_FPR0_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x90, 0x00, 0x00, 0x00, 0x89, 0x95, 0x94, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR1 +{ + static const uint8 op_load_F0_FPR1_code[] = { + 0x8d, 0x9d, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR1 +{ + static const uint8 op_store_F0_FPR1_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x9c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR1_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR1 +{ + static const uint8 op_load_F1_FPR1_code[] = { + 0x8d, 0xb5, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR1 +{ + static const uint8 op_store_F1_FPR1_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x9c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR1_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR1 +{ + static const uint8 op_load_F2_FPR1_code[] = { + 0x8d, 0xbd, 0x98, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR1 +{ + static const uint8 op_store_F2_FPR1_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x98, 0x00, 0x00, 0x00, 0x89, + 0x95, 0x9c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR1_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR1 +{ + static const uint8 op_store_FD_FPR1_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x98, 0x00, 0x00, 0x00, 0x89, 0x95, 0x9c, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR1_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR2 +{ + static const uint8 op_load_F0_FPR2_code[] = { + 0x8d, 0x9d, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR2 +{ + static const uint8 op_store_F0_FPR2_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xa4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR2_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR2 +{ + static const uint8 op_load_F1_FPR2_code[] = { + 0x8d, 0xb5, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR2 +{ + static const uint8 op_store_F1_FPR2_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xa4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR2_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR2 +{ + static const uint8 op_load_F2_FPR2_code[] = { + 0x8d, 0xbd, 0xa0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR2 +{ + static const uint8 op_store_F2_FPR2_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xa4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR2_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR2 +{ + static const uint8 op_store_FD_FPR2_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xa0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xa4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR2_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR3 +{ + static const uint8 op_load_F0_FPR3_code[] = { + 0x8d, 0x9d, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR3 +{ + static const uint8 op_store_F0_FPR3_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xac, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR3_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR3 +{ + static const uint8 op_load_F1_FPR3_code[] = { + 0x8d, 0xb5, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR3 +{ + static const uint8 op_store_F1_FPR3_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xac, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR3_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR3 +{ + static const uint8 op_load_F2_FPR3_code[] = { + 0x8d, 0xbd, 0xa8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR3 +{ + static const uint8 op_store_F2_FPR3_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xac, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR3_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR3 +{ + static const uint8 op_store_FD_FPR3_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xa8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xac, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR3_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR4 +{ + static const uint8 op_load_F0_FPR4_code[] = { + 0x8d, 0x9d, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR4 +{ + static const uint8 op_store_F0_FPR4_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xb4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR4_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR4 +{ + static const uint8 op_load_F1_FPR4_code[] = { + 0x8d, 0xb5, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR4 +{ + static const uint8 op_store_F1_FPR4_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xb4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR4_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR4 +{ + static const uint8 op_load_F2_FPR4_code[] = { + 0x8d, 0xbd, 0xb0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR4 +{ + static const uint8 op_store_F2_FPR4_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xb4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR4_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR4 +{ + static const uint8 op_store_FD_FPR4_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xb0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xb4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR4_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR5 +{ + static const uint8 op_load_F0_FPR5_code[] = { + 0x8d, 0x9d, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR5 +{ + static const uint8 op_store_F0_FPR5_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xbc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR5_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR5 +{ + static const uint8 op_load_F1_FPR5_code[] = { + 0x8d, 0xb5, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR5 +{ + static const uint8 op_store_F1_FPR5_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xbc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR5_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR5 +{ + static const uint8 op_load_F2_FPR5_code[] = { + 0x8d, 0xbd, 0xb8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR5 +{ + static const uint8 op_store_F2_FPR5_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xbc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR5_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR5 +{ + static const uint8 op_store_FD_FPR5_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xb8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xbc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR5_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR6 +{ + static const uint8 op_load_F0_FPR6_code[] = { + 0x8d, 0x9d, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR6 +{ + static const uint8 op_store_F0_FPR6_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xc4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR6_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR6 +{ + static const uint8 op_load_F1_FPR6_code[] = { + 0x8d, 0xb5, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR6 +{ + static const uint8 op_store_F1_FPR6_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xc4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR6_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR6 +{ + static const uint8 op_load_F2_FPR6_code[] = { + 0x8d, 0xbd, 0xc0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR6 +{ + static const uint8 op_store_F2_FPR6_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xc4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR6_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR6 +{ + static const uint8 op_store_FD_FPR6_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xc0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xc4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR6_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR7 +{ + static const uint8 op_load_F0_FPR7_code[] = { + 0x8d, 0x9d, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR7 +{ + static const uint8 op_store_F0_FPR7_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xcc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR7_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR7 +{ + static const uint8 op_load_F1_FPR7_code[] = { + 0x8d, 0xb5, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR7 +{ + static const uint8 op_store_F1_FPR7_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xcc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR7_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR7 +{ + static const uint8 op_load_F2_FPR7_code[] = { + 0x8d, 0xbd, 0xc8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR7 +{ + static const uint8 op_store_F2_FPR7_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xcc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR7_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR7 +{ + static const uint8 op_store_FD_FPR7_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xc8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xcc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR7_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR8 +{ + static const uint8 op_load_F0_FPR8_code[] = { + 0x8d, 0x9d, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR8 +{ + static const uint8 op_store_F0_FPR8_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xd4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR8_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR8 +{ + static const uint8 op_load_F1_FPR8_code[] = { + 0x8d, 0xb5, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR8 +{ + static const uint8 op_store_F1_FPR8_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xd4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR8_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR8 +{ + static const uint8 op_load_F2_FPR8_code[] = { + 0x8d, 0xbd, 0xd0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR8 +{ + static const uint8 op_store_F2_FPR8_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xd4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR8_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR8 +{ + static const uint8 op_store_FD_FPR8_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xd0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xd4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR8_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR9 +{ + static const uint8 op_load_F0_FPR9_code[] = { + 0x8d, 0x9d, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR9 +{ + static const uint8 op_store_F0_FPR9_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xdc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR9_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR9 +{ + static const uint8 op_load_F1_FPR9_code[] = { + 0x8d, 0xb5, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR9 +{ + static const uint8 op_store_F1_FPR9_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xdc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR9_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR9 +{ + static const uint8 op_load_F2_FPR9_code[] = { + 0x8d, 0xbd, 0xd8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR9 +{ + static const uint8 op_store_F2_FPR9_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xdc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR9_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR9 +{ + static const uint8 op_store_FD_FPR9_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xd8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xdc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR9_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR10 +{ + static const uint8 op_load_F0_FPR10_code[] = { + 0x8d, 0x9d, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR10 +{ + static const uint8 op_store_F0_FPR10_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xe4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR10_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR10 +{ + static const uint8 op_load_F1_FPR10_code[] = { + 0x8d, 0xb5, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR10 +{ + static const uint8 op_store_F1_FPR10_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xe4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR10_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR10 +{ + static const uint8 op_load_F2_FPR10_code[] = { + 0x8d, 0xbd, 0xe0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR10 +{ + static const uint8 op_store_F2_FPR10_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xe4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR10_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR10 +{ + static const uint8 op_store_FD_FPR10_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xe0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xe4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR10_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR11 +{ + static const uint8 op_load_F0_FPR11_code[] = { + 0x8d, 0x9d, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR11 +{ + static const uint8 op_store_F0_FPR11_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xec, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR11_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR11 +{ + static const uint8 op_load_F1_FPR11_code[] = { + 0x8d, 0xb5, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR11 +{ + static const uint8 op_store_F1_FPR11_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xec, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR11_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR11 +{ + static const uint8 op_load_F2_FPR11_code[] = { + 0x8d, 0xbd, 0xe8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR11 +{ + static const uint8 op_store_F2_FPR11_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xec, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR11_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR11 +{ + static const uint8 op_store_FD_FPR11_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xe8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xec, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR11_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR12 +{ + static const uint8 op_load_F0_FPR12_code[] = { + 0x8d, 0x9d, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR12 +{ + static const uint8 op_store_F0_FPR12_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xf4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR12_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR12 +{ + static const uint8 op_load_F1_FPR12_code[] = { + 0x8d, 0xb5, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR12 +{ + static const uint8 op_store_F1_FPR12_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xf4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR12_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR12 +{ + static const uint8 op_load_F2_FPR12_code[] = { + 0x8d, 0xbd, 0xf0, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR12 +{ + static const uint8 op_store_F2_FPR12_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xf4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR12_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR12 +{ + static const uint8 op_store_FD_FPR12_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xf0, 0x00, 0x00, 0x00, 0x89, 0x95, 0xf4, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR12_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR13 +{ + static const uint8 op_load_F0_FPR13_code[] = { + 0x8d, 0x9d, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR13 +{ + static const uint8 op_store_F0_FPR13_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xfc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR13_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR13 +{ + static const uint8 op_load_F1_FPR13_code[] = { + 0x8d, 0xb5, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR13 +{ + static const uint8 op_store_F1_FPR13_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xfc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR13_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR13 +{ + static const uint8 op_load_F2_FPR13_code[] = { + 0x8d, 0xbd, 0xf8, 0x00, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR13 +{ + static const uint8 op_store_F2_FPR13_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00, 0x89, + 0x95, 0xfc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR13_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR13 +{ + static const uint8 op_store_FD_FPR13_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0xf8, 0x00, 0x00, 0x00, 0x89, 0x95, 0xfc, 0x00, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR13_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR14 +{ + static const uint8 op_load_F0_FPR14_code[] = { + 0x8d, 0x9d, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR14 +{ + static const uint8 op_store_F0_FPR14_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x04, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR14_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR14 +{ + static const uint8 op_load_F1_FPR14_code[] = { + 0x8d, 0xb5, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR14 +{ + static const uint8 op_store_F1_FPR14_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x04, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR14_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR14 +{ + static const uint8 op_load_F2_FPR14_code[] = { + 0x8d, 0xbd, 0x00, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR14 +{ + static const uint8 op_store_F2_FPR14_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x00, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x04, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR14_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR14 +{ + static const uint8 op_store_FD_FPR14_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x00, 0x01, 0x00, 0x00, 0x89, 0x95, 0x04, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR14_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR15 +{ + static const uint8 op_load_F0_FPR15_code[] = { + 0x8d, 0x9d, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR15 +{ + static const uint8 op_store_F0_FPR15_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x0c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR15_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR15 +{ + static const uint8 op_load_F1_FPR15_code[] = { + 0x8d, 0xb5, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR15 +{ + static const uint8 op_store_F1_FPR15_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x0c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR15_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR15 +{ + static const uint8 op_load_F2_FPR15_code[] = { + 0x8d, 0xbd, 0x08, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR15 +{ + static const uint8 op_store_F2_FPR15_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x08, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x0c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR15_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR15 +{ + static const uint8 op_store_FD_FPR15_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x08, 0x01, 0x00, 0x00, 0x89, 0x95, 0x0c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR15_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR16 +{ + static const uint8 op_load_F0_FPR16_code[] = { + 0x8d, 0x9d, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR16 +{ + static const uint8 op_store_F0_FPR16_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x14, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR16_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR16 +{ + static const uint8 op_load_F1_FPR16_code[] = { + 0x8d, 0xb5, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR16 +{ + static const uint8 op_store_F1_FPR16_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x14, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR16_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR16 +{ + static const uint8 op_load_F2_FPR16_code[] = { + 0x8d, 0xbd, 0x10, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR16 +{ + static const uint8 op_store_F2_FPR16_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x10, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x14, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR16_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR16 +{ + static const uint8 op_store_FD_FPR16_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x10, 0x01, 0x00, 0x00, 0x89, 0x95, 0x14, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR16_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR17 +{ + static const uint8 op_load_F0_FPR17_code[] = { + 0x8d, 0x9d, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR17 +{ + static const uint8 op_store_F0_FPR17_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x1c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR17_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR17 +{ + static const uint8 op_load_F1_FPR17_code[] = { + 0x8d, 0xb5, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR17 +{ + static const uint8 op_store_F1_FPR17_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x1c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR17_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR17 +{ + static const uint8 op_load_F2_FPR17_code[] = { + 0x8d, 0xbd, 0x18, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR17 +{ + static const uint8 op_store_F2_FPR17_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x18, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x1c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR17_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR17 +{ + static const uint8 op_store_FD_FPR17_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x18, 0x01, 0x00, 0x00, 0x89, 0x95, 0x1c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR17_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR18 +{ + static const uint8 op_load_F0_FPR18_code[] = { + 0x8d, 0x9d, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR18 +{ + static const uint8 op_store_F0_FPR18_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x24, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR18_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR18 +{ + static const uint8 op_load_F1_FPR18_code[] = { + 0x8d, 0xb5, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR18 +{ + static const uint8 op_store_F1_FPR18_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x24, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR18_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR18 +{ + static const uint8 op_load_F2_FPR18_code[] = { + 0x8d, 0xbd, 0x20, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR18 +{ + static const uint8 op_store_F2_FPR18_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x20, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x24, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR18_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR18 +{ + static const uint8 op_store_FD_FPR18_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x20, 0x01, 0x00, 0x00, 0x89, 0x95, 0x24, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR18_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR19 +{ + static const uint8 op_load_F0_FPR19_code[] = { + 0x8d, 0x9d, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR19 +{ + static const uint8 op_store_F0_FPR19_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x2c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR19_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR19 +{ + static const uint8 op_load_F1_FPR19_code[] = { + 0x8d, 0xb5, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR19 +{ + static const uint8 op_store_F1_FPR19_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x2c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR19_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR19 +{ + static const uint8 op_load_F2_FPR19_code[] = { + 0x8d, 0xbd, 0x28, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR19 +{ + static const uint8 op_store_F2_FPR19_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x28, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x2c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR19_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR19 +{ + static const uint8 op_store_FD_FPR19_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x28, 0x01, 0x00, 0x00, 0x89, 0x95, 0x2c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR19_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR20 +{ + static const uint8 op_load_F0_FPR20_code[] = { + 0x8d, 0x9d, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR20 +{ + static const uint8 op_store_F0_FPR20_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x34, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR20_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR20 +{ + static const uint8 op_load_F1_FPR20_code[] = { + 0x8d, 0xb5, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR20 +{ + static const uint8 op_store_F1_FPR20_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x34, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR20_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR20 +{ + static const uint8 op_load_F2_FPR20_code[] = { + 0x8d, 0xbd, 0x30, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR20 +{ + static const uint8 op_store_F2_FPR20_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x30, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x34, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR20_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR20 +{ + static const uint8 op_store_FD_FPR20_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x30, 0x01, 0x00, 0x00, 0x89, 0x95, 0x34, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR20_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR21 +{ + static const uint8 op_load_F0_FPR21_code[] = { + 0x8d, 0x9d, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR21 +{ + static const uint8 op_store_F0_FPR21_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x3c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR21_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR21 +{ + static const uint8 op_load_F1_FPR21_code[] = { + 0x8d, 0xb5, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR21 +{ + static const uint8 op_store_F1_FPR21_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x3c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR21_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR21 +{ + static const uint8 op_load_F2_FPR21_code[] = { + 0x8d, 0xbd, 0x38, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR21 +{ + static const uint8 op_store_F2_FPR21_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x38, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x3c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR21_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR21 +{ + static const uint8 op_store_FD_FPR21_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x38, 0x01, 0x00, 0x00, 0x89, 0x95, 0x3c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR21_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR22 +{ + static const uint8 op_load_F0_FPR22_code[] = { + 0x8d, 0x9d, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR22 +{ + static const uint8 op_store_F0_FPR22_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x44, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR22_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR22 +{ + static const uint8 op_load_F1_FPR22_code[] = { + 0x8d, 0xb5, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR22 +{ + static const uint8 op_store_F1_FPR22_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x44, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR22_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR22 +{ + static const uint8 op_load_F2_FPR22_code[] = { + 0x8d, 0xbd, 0x40, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR22 +{ + static const uint8 op_store_F2_FPR22_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x40, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x44, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR22_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR22 +{ + static const uint8 op_store_FD_FPR22_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x40, 0x01, 0x00, 0x00, 0x89, 0x95, 0x44, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR22_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR23 +{ + static const uint8 op_load_F0_FPR23_code[] = { + 0x8d, 0x9d, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR23 +{ + static const uint8 op_store_F0_FPR23_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x4c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR23_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR23 +{ + static const uint8 op_load_F1_FPR23_code[] = { + 0x8d, 0xb5, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR23 +{ + static const uint8 op_store_F1_FPR23_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x4c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR23_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR23 +{ + static const uint8 op_load_F2_FPR23_code[] = { + 0x8d, 0xbd, 0x48, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR23 +{ + static const uint8 op_store_F2_FPR23_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x48, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x4c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR23_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR23 +{ + static const uint8 op_store_FD_FPR23_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x48, 0x01, 0x00, 0x00, 0x89, 0x95, 0x4c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR23_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR24 +{ + static const uint8 op_load_F0_FPR24_code[] = { + 0x8d, 0x9d, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR24 +{ + static const uint8 op_store_F0_FPR24_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x54, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR24_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR24 +{ + static const uint8 op_load_F1_FPR24_code[] = { + 0x8d, 0xb5, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR24 +{ + static const uint8 op_store_F1_FPR24_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x54, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR24_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR24 +{ + static const uint8 op_load_F2_FPR24_code[] = { + 0x8d, 0xbd, 0x50, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR24 +{ + static const uint8 op_store_F2_FPR24_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x50, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x54, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR24_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR24 +{ + static const uint8 op_store_FD_FPR24_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x50, 0x01, 0x00, 0x00, 0x89, 0x95, 0x54, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR24_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR25 +{ + static const uint8 op_load_F0_FPR25_code[] = { + 0x8d, 0x9d, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR25 +{ + static const uint8 op_store_F0_FPR25_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x5c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR25_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR25 +{ + static const uint8 op_load_F1_FPR25_code[] = { + 0x8d, 0xb5, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR25 +{ + static const uint8 op_store_F1_FPR25_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x5c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR25_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR25 +{ + static const uint8 op_load_F2_FPR25_code[] = { + 0x8d, 0xbd, 0x58, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR25 +{ + static const uint8 op_store_F2_FPR25_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x58, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x5c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR25_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR25 +{ + static const uint8 op_store_FD_FPR25_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x58, 0x01, 0x00, 0x00, 0x89, 0x95, 0x5c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR25_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR26 +{ + static const uint8 op_load_F0_FPR26_code[] = { + 0x8d, 0x9d, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR26 +{ + static const uint8 op_store_F0_FPR26_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x64, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR26_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR26 +{ + static const uint8 op_load_F1_FPR26_code[] = { + 0x8d, 0xb5, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR26 +{ + static const uint8 op_store_F1_FPR26_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x64, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR26_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR26 +{ + static const uint8 op_load_F2_FPR26_code[] = { + 0x8d, 0xbd, 0x60, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR26 +{ + static const uint8 op_store_F2_FPR26_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x60, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x64, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR26_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR26 +{ + static const uint8 op_store_FD_FPR26_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x60, 0x01, 0x00, 0x00, 0x89, 0x95, 0x64, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR26_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR27 +{ + static const uint8 op_load_F0_FPR27_code[] = { + 0x8d, 0x9d, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR27 +{ + static const uint8 op_store_F0_FPR27_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x6c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR27_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR27 +{ + static const uint8 op_load_F1_FPR27_code[] = { + 0x8d, 0xb5, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR27 +{ + static const uint8 op_store_F1_FPR27_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x6c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR27_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR27 +{ + static const uint8 op_load_F2_FPR27_code[] = { + 0x8d, 0xbd, 0x68, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR27 +{ + static const uint8 op_store_F2_FPR27_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x68, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x6c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR27_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR27 +{ + static const uint8 op_store_FD_FPR27_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x68, 0x01, 0x00, 0x00, 0x89, 0x95, 0x6c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR27_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR28 +{ + static const uint8 op_load_F0_FPR28_code[] = { + 0x8d, 0x9d, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR28 +{ + static const uint8 op_store_F0_FPR28_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x74, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR28_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR28 +{ + static const uint8 op_load_F1_FPR28_code[] = { + 0x8d, 0xb5, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR28 +{ + static const uint8 op_store_F1_FPR28_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x74, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR28_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR28 +{ + static const uint8 op_load_F2_FPR28_code[] = { + 0x8d, 0xbd, 0x70, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR28 +{ + static const uint8 op_store_F2_FPR28_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x70, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x74, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR28_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR28 +{ + static const uint8 op_store_FD_FPR28_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x70, 0x01, 0x00, 0x00, 0x89, 0x95, 0x74, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR28_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR29 +{ + static const uint8 op_load_F0_FPR29_code[] = { + 0x8d, 0x9d, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR29 +{ + static const uint8 op_store_F0_FPR29_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x7c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR29_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR29 +{ + static const uint8 op_load_F1_FPR29_code[] = { + 0x8d, 0xb5, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR29 +{ + static const uint8 op_store_F1_FPR29_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x7c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR29_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR29 +{ + static const uint8 op_load_F2_FPR29_code[] = { + 0x8d, 0xbd, 0x78, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR29 +{ + static const uint8 op_store_F2_FPR29_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x78, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x7c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR29_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR29 +{ + static const uint8 op_store_FD_FPR29_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x78, 0x01, 0x00, 0x00, 0x89, 0x95, 0x7c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR29_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR30 +{ + static const uint8 op_load_F0_FPR30_code[] = { + 0x8d, 0x9d, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR30 +{ + static const uint8 op_store_F0_FPR30_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x84, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR30_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR30 +{ + static const uint8 op_load_F1_FPR30_code[] = { + 0x8d, 0xb5, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR30 +{ + static const uint8 op_store_F1_FPR30_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x84, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR30_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR30 +{ + static const uint8 op_load_F2_FPR30_code[] = { + 0x8d, 0xbd, 0x80, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR30 +{ + static const uint8 op_store_F2_FPR30_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x80, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x84, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR30_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR30 +{ + static const uint8 op_store_FD_FPR30_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x80, 0x01, 0x00, 0x00, 0x89, 0x95, 0x84, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR30_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_F0_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F0_FPR31 +{ + static const uint8 op_load_F0_FPR31_code[] = { + 0x8d, 0x9d, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F0_FPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F0_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F0_FPR31 +{ + static const uint8 op_store_F0_FPR31_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x8c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F0_FPR31_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F1_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F1_FPR31 +{ + static const uint8 op_load_F1_FPR31_code[] = { + 0x8d, 0xb5, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F1_FPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F1_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F1_FPR31 +{ + static const uint8 op_store_F1_FPR31_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x8c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F1_FPR31_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_load_F2_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_F2_FPR31 +{ + static const uint8 op_load_F2_FPR31_code[] = { + 0x8d, 0xbd, 0x88, 0x01, 0x00, 0x00 + }; + copy_block(op_load_F2_FPR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_F2_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_F2_FPR31 +{ + static const uint8 op_store_F2_FPR31_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x88, 0x01, 0x00, 0x00, 0x89, + 0x95, 0x8c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_F2_FPR31_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_store_FD_FPR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_FD_FPR31 +{ + static const uint8 op_store_FD_FPR31_code[] = { + 0x8b, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x95, 0x44, 0x08, 0x0e, 0x00, + 0x89, 0x85, 0x88, 0x01, 0x00, 0x00, 0x89, 0x95, 0x8c, 0x01, 0x00, 0x00 + }; + copy_block(op_store_FD_FPR31_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_0 +{ + static const uint8 op_load_double_FD_T1_0_code[] = { + 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x96, 0x00, 0x00, 0x00, 0x11, + 0x0f, 0xca, 0x89, 0x50, 0x04, 0x8b, 0x96, 0x04, 0x00, 0x00, 0x11, 0x0f, + 0xca, 0x89, 0x10 + }; + copy_block(op_load_double_FD_T1_0_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_0 +{ + static const uint8 op_load_single_FD_T1_0_code[] = { + 0x83, 0xec, 0x08, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x96, 0x00, + 0x00, 0x00, 0x11, 0x0f, 0xca, 0x89, 0x14, 0x24, 0x31, 0xc9, 0xd9, 0x04, + 0x24, 0x89, 0x4c, 0x24, 0x04, 0xdd, 0x1c, 0x24, 0x8b, 0x14, 0x24, 0x8b, + 0x4c, 0x24, 0x04, 0x89, 0x10, 0x89, 0x48, 0x04, 0x83, 0xc4, 0x08 + }; + copy_block(op_load_single_FD_T1_0_code, 47); + inc_code_ptr(47); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_0 +{ + static const uint8 op_store_double_F0_T1_0_code[] = { + 0x8b, 0x43, 0x04, 0x0f, 0xc8, 0x89, 0x86, 0x00, 0x00, 0x00, 0x11, 0x8d, + 0x56, 0x04, 0x8b, 0x03, 0x0f, 0xc8, 0x89, 0x82, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_double_F0_T1_0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_0 +{ + static const uint8 op_store_single_F0_T1_0_code[] = { + 0x83, 0xec, 0x18, 0x89, 0xf1, 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x44, + 0x24, 0x0c, 0x89, 0xd0, 0xc1, 0xe8, 0x14, 0x89, 0x54, 0x24, 0x10, 0x25, + 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, 0x00, 0x83, 0xf8, 0x16, + 0x76, 0x3a, 0x8b, 0x54, 0x24, 0x10, 0x89, 0xd0, 0x25, 0x00, 0x00, 0x00, + 0xc0, 0x89, 0x04, 0x24, 0x8b, 0x54, 0x24, 0x10, 0x8b, 0x44, 0x24, 0x0c, + 0x0f, 0xac, 0xd0, 0x1d, 0xc1, 0xea, 0x1d, 0x89, 0x44, 0x24, 0x0c, 0x8b, + 0x44, 0x24, 0x0c, 0x89, 0x54, 0x24, 0x10, 0x25, 0xff, 0xff, 0xff, 0x3f, + 0x09, 0x04, 0x24, 0xeb, 0x26, 0x8d, 0xb4, 0x26, 0x00, 0x00, 0x00, 0x00, + 0x8b, 0x44, 0x24, 0x0c, 0x8b, 0x54, 0x24, 0x10, 0x89, 0x44, 0x24, 0x04, + 0x89, 0x54, 0x24, 0x08, 0xdd, 0x44, 0x24, 0x04, 0xd9, 0x5c, 0x24, 0x14, + 0x8b, 0x44, 0x24, 0x14, 0x89, 0x04, 0x24, 0x8b, 0x04, 0x24, 0x0f, 0xc8, + 0x89, 0x81, 0x00, 0x00, 0x00, 0x11, 0x83, 0xc4, 0x18 + }; + copy_block(op_store_single_F0_T1_0_code, 141); + inc_code_ptr(141); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_im +{ + static const uint8 op_load_double_FD_T1_im_code[] = { + 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x96, 0x00, 0x00, 0x00, 0x11, + 0x0f, 0xca, 0x89, 0x50, 0x04, 0x8b, 0x96, 0x04, 0x00, 0x00, 0x11, 0x0f, + 0xca, 0x89, 0x10 + }; + copy_block(op_load_double_FD_T1_im_code, 27); + *(uint32_t *)(code_ptr() + 8) = param1 + 285212672; + *(uint32_t *)(code_ptr() + 19) = param1 + 285212676; + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_im +{ + static const uint8 op_load_single_FD_T1_im_code[] = { + 0x83, 0xec, 0x08, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x96, 0x00, + 0x00, 0x00, 0x11, 0x0f, 0xca, 0x89, 0x14, 0x24, 0x31, 0xc9, 0xd9, 0x04, + 0x24, 0x89, 0x4c, 0x24, 0x04, 0xdd, 0x1c, 0x24, 0x8b, 0x14, 0x24, 0x8b, + 0x4c, 0x24, 0x04, 0x89, 0x10, 0x89, 0x48, 0x04, 0x83, 0xc4, 0x08 + }; + copy_block(op_load_single_FD_T1_im_code, 47); + *(uint32_t *)(code_ptr() + 11) = param1 + 285212672; + inc_code_ptr(47); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_im +{ + static const uint8 op_store_double_F0_T1_im_code[] = { + 0x8d, 0x96, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x43, 0x04, 0x0f, 0xc8, 0x89, + 0x82, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x03, 0x8d, 0x96, 0x04, 0x00, 0x00, + 0x00, 0x0f, 0xc8, 0x89, 0x82, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_double_F0_T1_im_code, 33); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + *(uint32_t *)(code_ptr() + 21) = param1 + 4; + inc_code_ptr(33); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_im +{ + static const uint8 op_store_single_F0_T1_im_code[] = { + 0x83, 0xec, 0x18, 0x8d, 0x8e, 0x00, 0x00, 0x00, 0x00, 0x8b, 0x03, 0x8b, + 0x53, 0x04, 0x89, 0x44, 0x24, 0x0c, 0x89, 0xd0, 0xc1, 0xe8, 0x14, 0x89, + 0x54, 0x24, 0x10, 0x25, 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, + 0x00, 0x83, 0xf8, 0x16, 0x76, 0x36, 0x8b, 0x54, 0x24, 0x10, 0x89, 0xd0, + 0x25, 0x00, 0x00, 0x00, 0xc0, 0x89, 0x04, 0x24, 0x8b, 0x54, 0x24, 0x10, + 0x8b, 0x44, 0x24, 0x0c, 0x0f, 0xac, 0xd0, 0x1d, 0xc1, 0xea, 0x1d, 0x89, + 0x44, 0x24, 0x0c, 0x8b, 0x44, 0x24, 0x0c, 0x89, 0x54, 0x24, 0x10, 0x25, + 0xff, 0xff, 0xff, 0x3f, 0x09, 0x04, 0x24, 0xeb, 0x22, 0x8d, 0x76, 0x00, + 0x8b, 0x44, 0x24, 0x0c, 0x8b, 0x54, 0x24, 0x10, 0x89, 0x44, 0x24, 0x04, + 0x89, 0x54, 0x24, 0x08, 0xdd, 0x44, 0x24, 0x04, 0xd9, 0x5c, 0x24, 0x14, + 0x8b, 0x44, 0x24, 0x14, 0x89, 0x04, 0x24, 0x8b, 0x04, 0x24, 0x0f, 0xc8, + 0x89, 0x81, 0x00, 0x00, 0x00, 0x11, 0x83, 0xc4, 0x18 + }; + copy_block(op_store_single_F0_T1_im_code, 141); + *(uint32_t *)(code_ptr() + 5) = param1 + 0; + inc_code_ptr(141); +} +#endif + +DEFINE_GEN(gen_op_load_double_FD_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_double_FD_T1_T2 +{ + static const uint8 op_load_double_FD_T1_T2_code[] = { + 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x94, 0x3e, 0x00, 0x00, 0x00, + 0x11, 0x0f, 0xca, 0x89, 0x50, 0x04, 0x8b, 0x94, 0x3e, 0x04, 0x00, 0x00, + 0x11, 0x0f, 0xca, 0x89, 0x10 + }; + copy_block(op_load_double_FD_T1_T2_code, 29); + inc_code_ptr(29); +} +#endif + +DEFINE_GEN(gen_op_load_single_FD_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_single_FD_T1_T2 +{ + static const uint8 op_load_single_FD_T1_T2_code[] = { + 0x83, 0xec, 0x08, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x8b, 0x94, 0x3e, + 0x00, 0x00, 0x00, 0x11, 0x0f, 0xca, 0x89, 0x14, 0x24, 0x31, 0xc9, 0xd9, + 0x04, 0x24, 0x89, 0x4c, 0x24, 0x04, 0xdd, 0x1c, 0x24, 0x8b, 0x14, 0x24, + 0x8b, 0x4c, 0x24, 0x04, 0x89, 0x10, 0x89, 0x48, 0x04, 0x83, 0xc4, 0x08 + }; + copy_block(op_load_single_FD_T1_T2_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_store_double_F0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_double_F0_T1_T2 +{ + static const uint8 op_store_double_F0_T1_T2_code[] = { + 0x8d, 0x14, 0x3e, 0x8b, 0x43, 0x04, 0x0f, 0xc8, 0x89, 0x82, 0x00, 0x00, + 0x00, 0x11, 0x8b, 0x03, 0x0f, 0xc8, 0x89, 0x82, 0x04, 0x00, 0x00, 0x11 + }; + copy_block(op_store_double_F0_T1_T2_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_store_single_F0_T1_T2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_single_F0_T1_T2 +{ + static const uint8 op_store_single_F0_T1_T2_code[] = { + 0x83, 0xec, 0x18, 0x8d, 0x0c, 0x3e, 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, + 0x44, 0x24, 0x0c, 0x89, 0xd0, 0xc1, 0xe8, 0x14, 0x89, 0x54, 0x24, 0x10, + 0x25, 0xff, 0x07, 0x00, 0x00, 0x2d, 0x6a, 0x03, 0x00, 0x00, 0x83, 0xf8, + 0x16, 0x76, 0x39, 0x8b, 0x54, 0x24, 0x10, 0x89, 0xd0, 0x25, 0x00, 0x00, + 0x00, 0xc0, 0x89, 0x04, 0x24, 0x8b, 0x54, 0x24, 0x10, 0x8b, 0x44, 0x24, + 0x0c, 0x0f, 0xac, 0xd0, 0x1d, 0xc1, 0xea, 0x1d, 0x89, 0x44, 0x24, 0x0c, + 0x8b, 0x44, 0x24, 0x0c, 0x89, 0x54, 0x24, 0x10, 0x25, 0xff, 0xff, 0xff, + 0x3f, 0x09, 0x04, 0x24, 0xeb, 0x25, 0x8d, 0xb6, 0x00, 0x00, 0x00, 0x00, + 0x8b, 0x44, 0x24, 0x0c, 0x8b, 0x54, 0x24, 0x10, 0x89, 0x44, 0x24, 0x04, + 0x89, 0x54, 0x24, 0x08, 0xdd, 0x44, 0x24, 0x04, 0xd9, 0x5c, 0x24, 0x14, + 0x8b, 0x44, 0x24, 0x14, 0x89, 0x04, 0x24, 0x8b, 0x04, 0x24, 0x0f, 0xc8, + 0x89, 0x81, 0x00, 0x00, 0x00, 0x11, 0x83, 0xc4, 0x18 + }; + copy_block(op_store_single_F0_T1_T2_code, 141); + inc_code_ptr(141); +} +#endif + +DEFINE_GEN(gen_op_lwarx_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lwarx_T0_T1 +{ + static const uint8 op_lwarx_T0_T1_code[] = { + 0x8b, 0x86, 0x00, 0x00, 0x00, 0x11, 0x89, 0xc3, 0x0f, 0xcb, 0x89, 0xb5, + 0xbc, 0x03, 0x00, 0x00, 0xb8, 0x01, 0x00, 0x00, 0x00, 0x89, 0x85, 0xb8, + 0x03, 0x00, 0x00 + }; + copy_block(op_lwarx_T0_T1_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_stwcx_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stwcx_T0_T1 +{ + static const uint8 op_stwcx_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x8b, 0x8d, 0x90, 0x03, 0x00, + 0x00, 0xc1, 0xe0, 0x1c, 0x81, 0xe1, 0xff, 0xff, 0xff, 0x0f, 0x09, 0xc1, + 0x8d, 0x45, 0x10, 0x8b, 0x90, 0xa8, 0x03, 0x00, 0x00, 0x85, 0xd2, 0x74, + 0x2b, 0x31, 0xd2, 0x39, 0xb0, 0xac, 0x03, 0x00, 0x00, 0x89, 0x90, 0xa8, + 0x03, 0x00, 0x00, 0x75, 0x1b, 0x89, 0xd8, 0x0f, 0xc8, 0x89, 0x86, 0x00, + 0x00, 0x00, 0x11, 0x81, 0xc9, 0x00, 0x00, 0x00, 0x20, 0x8d, 0x74, 0x26, + 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, 0x89, 0x8d, 0x90, 0x03, + 0x00, 0x00 + }; + copy_block(op_stwcx_T0_T1_code, 86); + inc_code_ptr(86); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CR +{ + static const uint8 op_load_T0_CR_code[] = { + 0x8b, 0x9d, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_CR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_CR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_CR +{ + static const uint8 op_store_T0_CR_code[] = { + 0x89, 0x9d, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_CR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb0 +{ + static const uint8 op_load_T0_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xc3, 0xc1, 0xeb, 0x1f + }; + copy_block(op_load_T0_crb0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb0 +{ + static const uint8 op_store_T0_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xda, 0xc1, 0xe2, 0x1f, 0x25, + 0xff, 0xff, 0xff, 0x7f, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb0 +{ + static const uint8 op_load_T1_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xc6, 0xc1, 0xee, 0x1f + }; + copy_block(op_load_T1_crb0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb0 +{ + static const uint8 op_store_T1_crb0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf2, 0xc1, 0xe2, 0x1f, 0x25, + 0xff, 0xff, 0xff, 0x7f, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb0_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb1 +{ + static const uint8 op_load_T0_crb1_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1e, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb1_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb1 +{ + static const uint8 op_store_T0_crb1_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1e, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xbf, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb1 +{ + static const uint8 op_load_T1_crb1_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1e, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb1_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb1 +{ + static const uint8 op_store_T1_crb1_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1e, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xbf, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb2 +{ + static const uint8 op_load_T0_crb2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1d, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb2_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb2 +{ + static const uint8 op_store_T0_crb2_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1d, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xdf, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb2_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb2 +{ + static const uint8 op_load_T1_crb2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1d, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb2_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb2 +{ + static const uint8 op_store_T1_crb2_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1d, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xdf, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb2_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb3 +{ + static const uint8 op_load_T0_crb3_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1c, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb3_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb3 +{ + static const uint8 op_store_T0_crb3_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1c, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xef, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb3_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb3 +{ + static const uint8 op_load_T1_crb3_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1c, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb3_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb3 +{ + static const uint8 op_store_T1_crb3_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1c, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xef, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb3_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb4 +{ + static const uint8 op_load_T0_crb4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1b, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb4_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb4 +{ + static const uint8 op_store_T0_crb4_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1b, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xf7, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb4_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb4 +{ + static const uint8 op_load_T1_crb4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1b, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb4_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb4 +{ + static const uint8 op_store_T1_crb4_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1b, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xf7, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb4_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb5 +{ + static const uint8 op_load_T0_crb5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1a, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb5_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb5 +{ + static const uint8 op_store_T0_crb5_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1a, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfb, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb5_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb5 +{ + static const uint8 op_load_T1_crb5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x1a, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb5_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb5 +{ + static const uint8 op_store_T1_crb5_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x1a, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfb, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb5_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb6 +{ + static const uint8 op_load_T0_crb6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x19, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb6_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb6 +{ + static const uint8 op_store_T0_crb6_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x19, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfd, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb6_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb6 +{ + static const uint8 op_load_T1_crb6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x19, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb6_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb6 +{ + static const uint8 op_store_T1_crb6_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x19, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfd, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb6_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb7 +{ + static const uint8 op_load_T0_crb7_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xe3, 0x01 + }; + copy_block(op_load_T0_crb7_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb7 +{ + static const uint8 op_store_T0_crb7_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x18, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfe, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb7_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb7 +{ + static const uint8 op_load_T1_crb7_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x89, 0xc6, 0x83, 0xe6, 0x01 + }; + copy_block(op_load_T1_crb7_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb7 +{ + static const uint8 op_store_T1_crb7_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x18, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xfe, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb7_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb8 +{ + static const uint8 op_load_T0_crb8_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x17, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb8_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb8 +{ + static const uint8 op_store_T0_crb8_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x17, 0x81, 0xe2, 0xff, 0xff, 0x7f, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb8_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb8 +{ + static const uint8 op_load_T1_crb8_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x17, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb8_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb8 +{ + static const uint8 op_store_T1_crb8_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x17, 0x81, 0xe2, 0xff, 0xff, 0x7f, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb8_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb9 +{ + static const uint8 op_load_T0_crb9_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x16, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb9_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb9 +{ + static const uint8 op_store_T0_crb9_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x16, 0x81, 0xe2, 0xff, 0xff, 0xbf, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb9_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb9 +{ + static const uint8 op_load_T1_crb9_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x16, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb9_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb9 +{ + static const uint8 op_store_T1_crb9_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x16, 0x81, 0xe2, 0xff, 0xff, 0xbf, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb9_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb10 +{ + static const uint8 op_load_T0_crb10_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x15, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb10_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb10 +{ + static const uint8 op_store_T0_crb10_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x15, 0x81, 0xe2, 0xff, 0xff, 0xdf, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb10_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb10 +{ + static const uint8 op_load_T1_crb10_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x15, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb10_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb10 +{ + static const uint8 op_store_T1_crb10_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x15, 0x81, 0xe2, 0xff, 0xff, 0xdf, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb10_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb11 +{ + static const uint8 op_load_T0_crb11_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb11_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb11 +{ + static const uint8 op_store_T0_crb11_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x14, 0x81, 0xe2, 0xff, 0xff, 0xef, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb11_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb11 +{ + static const uint8 op_load_T1_crb11_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb11_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb11 +{ + static const uint8 op_store_T1_crb11_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x14, 0x81, 0xe2, 0xff, 0xff, 0xef, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb11_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb12 +{ + static const uint8 op_load_T0_crb12_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x13, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb12_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb12 +{ + static const uint8 op_store_T0_crb12_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x13, 0x81, 0xe2, 0xff, 0xff, 0xf7, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb12_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb12 +{ + static const uint8 op_load_T1_crb12_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x13, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb12_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb12 +{ + static const uint8 op_store_T1_crb12_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x13, 0x81, 0xe2, 0xff, 0xff, 0xf7, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb12_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb13 +{ + static const uint8 op_load_T0_crb13_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x12, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb13_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb13 +{ + static const uint8 op_store_T0_crb13_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x12, 0x81, 0xe2, 0xff, 0xff, 0xfb, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb13_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb13 +{ + static const uint8 op_load_T1_crb13_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x12, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb13_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb13 +{ + static const uint8 op_store_T1_crb13_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x12, 0x81, 0xe2, 0xff, 0xff, 0xfb, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb13_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb14 +{ + static const uint8 op_load_T0_crb14_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x11, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb14_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb14 +{ + static const uint8 op_store_T0_crb14_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x11, 0x81, 0xe2, 0xff, 0xff, 0xfd, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb14_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb14 +{ + static const uint8 op_load_T1_crb14_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x11, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb14_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb14 +{ + static const uint8 op_store_T1_crb14_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x11, 0x81, 0xe2, 0xff, 0xff, 0xfd, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb14_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb15 +{ + static const uint8 op_load_T0_crb15_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xe3, 0x01 + }; + copy_block(op_load_T0_crb15_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb15 +{ + static const uint8 op_store_T0_crb15_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x10, 0x81, 0xe2, 0xff, 0xff, 0xfe, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb15_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb15 +{ + static const uint8 op_load_T1_crb15_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x89, 0xc6, 0x83, 0xe6, 0x01 + }; + copy_block(op_load_T1_crb15_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb15 +{ + static const uint8 op_store_T1_crb15_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x10, 0x81, 0xe2, 0xff, 0xff, 0xfe, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb15_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb16 +{ + static const uint8 op_load_T0_crb16_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0f, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb16_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb16 +{ + static const uint8 op_store_T0_crb16_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0f, 0x81, 0xe2, 0xff, 0x7f, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb16_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb16 +{ + static const uint8 op_load_T1_crb16_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0f, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb16_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb16 +{ + static const uint8 op_store_T1_crb16_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0f, 0x81, 0xe2, 0xff, 0x7f, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb16_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb17 +{ + static const uint8 op_load_T0_crb17_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0e, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb17_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb17 +{ + static const uint8 op_store_T0_crb17_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0e, 0x81, 0xe2, 0xff, 0xbf, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb17_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb17 +{ + static const uint8 op_load_T1_crb17_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0e, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb17_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb17 +{ + static const uint8 op_store_T1_crb17_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0e, 0x81, 0xe2, 0xff, 0xbf, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb17_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb18 +{ + static const uint8 op_load_T0_crb18_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0d, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb18_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb18 +{ + static const uint8 op_store_T0_crb18_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0d, 0x81, 0xe2, 0xff, 0xdf, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb18_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb18 +{ + static const uint8 op_load_T1_crb18_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0d, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb18_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb18 +{ + static const uint8 op_store_T1_crb18_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0d, 0x81, 0xe2, 0xff, 0xdf, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb18_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb19 +{ + static const uint8 op_load_T0_crb19_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb19_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb19 +{ + static const uint8 op_store_T0_crb19_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0c, 0x81, 0xe2, 0xff, 0xef, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb19_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb19 +{ + static const uint8 op_load_T1_crb19_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb19_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb19 +{ + static const uint8 op_store_T1_crb19_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0c, 0x81, 0xe2, 0xff, 0xef, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb19_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb20 +{ + static const uint8 op_load_T0_crb20_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0b, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb20_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb20 +{ + static const uint8 op_store_T0_crb20_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0b, 0x81, 0xe2, 0xff, 0xf7, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb20_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb20 +{ + static const uint8 op_load_T1_crb20_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0b, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb20_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb20 +{ + static const uint8 op_store_T1_crb20_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0b, 0x81, 0xe2, 0xff, 0xf7, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb20_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb21 +{ + static const uint8 op_load_T0_crb21_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0a, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb21_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb21 +{ + static const uint8 op_store_T0_crb21_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0a, 0x81, 0xe2, 0xff, 0xfb, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb21_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb21 +{ + static const uint8 op_load_T1_crb21_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0a, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb21_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb21 +{ + static const uint8 op_store_T1_crb21_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x0a, 0x81, 0xe2, 0xff, 0xfb, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb21_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb22 +{ + static const uint8 op_load_T0_crb22_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x09, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb22_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb22 +{ + static const uint8 op_store_T0_crb22_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x09, 0x81, 0xe2, 0xff, 0xfd, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb22_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb22 +{ + static const uint8 op_load_T1_crb22_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x09, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb22_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb22 +{ + static const uint8 op_store_T1_crb22_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x09, 0x81, 0xe2, 0xff, 0xfd, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb22_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb23 +{ + static const uint8 op_load_T0_crb23_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb23_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb23 +{ + static const uint8 op_store_T0_crb23_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x08, 0x81, 0xe2, 0xff, 0xfe, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb23_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb23 +{ + static const uint8 op_load_T1_crb23_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb23_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb23 +{ + static const uint8 op_store_T1_crb23_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x08, 0x81, 0xe2, 0xff, 0xfe, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb23_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb24 +{ + static const uint8 op_load_T0_crb24_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x07, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb24_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb24 +{ + static const uint8 op_store_T0_crb24_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x07, 0x81, 0xe2, 0x7f, 0xff, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb24_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb24 +{ + static const uint8 op_load_T1_crb24_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x07, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb24_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb24 +{ + static const uint8 op_store_T1_crb24_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x07, 0x81, 0xe2, 0x7f, 0xff, 0xff, 0xff, 0x09, 0xc2, 0x89, 0x95, + 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb24_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb25 +{ + static const uint8 op_load_T0_crb25_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x06, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb25_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb25 +{ + static const uint8 op_store_T0_crb25_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x06, 0x83, 0xe2, 0xbf, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb25_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb25 +{ + static const uint8 op_load_T1_crb25_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x06, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb25_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb25 +{ + static const uint8 op_store_T1_crb25_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x06, 0x83, 0xe2, 0xbf, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb25_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb26 +{ + static const uint8 op_load_T0_crb26_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x05, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb26_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb26 +{ + static const uint8 op_store_T0_crb26_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x05, 0x83, 0xe2, 0xdf, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb26_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb26 +{ + static const uint8 op_load_T1_crb26_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x05, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb26_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb26 +{ + static const uint8 op_store_T1_crb26_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x05, 0x83, 0xe2, 0xdf, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb26_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb27 +{ + static const uint8 op_load_T0_crb27_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb27_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb27 +{ + static const uint8 op_store_T0_crb27_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x04, 0x83, 0xe2, 0xef, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb27_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb27 +{ + static const uint8 op_load_T1_crb27_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb27_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb27 +{ + static const uint8 op_store_T1_crb27_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x04, 0x83, 0xe2, 0xef, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb27_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb28 +{ + static const uint8 op_load_T0_crb28_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x03, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb28_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb28 +{ + static const uint8 op_store_T0_crb28_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x03, 0x83, 0xe2, 0xf7, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb28_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb28 +{ + static const uint8 op_load_T1_crb28_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x03, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb28_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb28 +{ + static const uint8 op_store_T1_crb28_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x03, 0x83, 0xe2, 0xf7, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb28_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb29 +{ + static const uint8 op_load_T0_crb29_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x02, 0x89, 0xc3, 0x83, + 0xe3, 0x01 + }; + copy_block(op_load_T0_crb29_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb29 +{ + static const uint8 op_store_T0_crb29_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x02, 0x83, 0xe2, 0xfb, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_crb29_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb29 +{ + static const uint8 op_load_T1_crb29_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x02, 0x89, 0xc6, 0x83, + 0xe6, 0x01 + }; + copy_block(op_load_T1_crb29_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb29 +{ + static const uint8 op_store_T1_crb29_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0xc1, + 0xe0, 0x02, 0x83, 0xe2, 0xfb, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T1_crb29_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb30 +{ + static const uint8 op_load_T0_crb30_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xd1, 0xe8, 0x89, 0xc3, 0x83, 0xe3, + 0x01 + }; + copy_block(op_load_T0_crb30_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb30 +{ + static const uint8 op_store_T0_crb30_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x83, 0xe0, 0x01, 0x01, + 0xc0, 0x83, 0xe2, 0xfd, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb30_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb30 +{ + static const uint8 op_load_T1_crb30_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xd1, 0xe8, 0x89, 0xc6, 0x83, 0xe6, + 0x01 + }; + copy_block(op_load_T1_crb30_code, 13); + inc_code_ptr(13); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb30 +{ + static const uint8 op_store_T1_crb30_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf0, 0x83, 0xe0, 0x01, 0x01, + 0xc0, 0x83, 0xe2, 0xfd, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb30_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_T0_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_crb31 +{ + static const uint8 op_load_T0_crb31_code[] = { + 0x8b, 0x9d, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe3, 0x01 + }; + copy_block(op_load_T0_crb31_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_store_T0_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_crb31 +{ + static const uint8 op_store_T0_crb31_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xda, 0x83, 0xe2, 0x01, 0x83, + 0xe0, 0xfe, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_crb31_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_load_T1_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T1_crb31 +{ + static const uint8 op_load_T1_crb31_code[] = { + 0x8b, 0xb5, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe6, 0x01 + }; + copy_block(op_load_T1_crb31_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_store_T1_crb31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T1_crb31 +{ + static const uint8 op_store_T1_crb31_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xf2, 0x83, 0xe2, 0x01, 0x83, + 0xe0, 0xfe, 0x09, 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T1_crb31_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr0 +{ + static const uint8 op_load_T0_cr0_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x89, 0xc3, 0xc1, 0xeb, 0x1c + }; + copy_block(op_load_T0_cr0_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr0 +{ + static const uint8 op_store_T0_cr0_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x1c, 0x81, + 0xe2, 0xff, 0xff, 0xff, 0x0f, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr0_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr1 +{ + static const uint8 op_load_T0_cr1_code[] = { + 0x0f, 0xb6, 0x85, 0x93, 0x03, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xe3, 0x0f + }; + copy_block(op_load_T0_cr1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr1 +{ + static const uint8 op_store_T0_cr1_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x18, 0x81, + 0xe2, 0xff, 0xff, 0xff, 0xf0, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr1_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr2 +{ + static const uint8 op_load_T0_cr2_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x14, 0x89, 0xc3, 0x83, + 0xe3, 0x0f + }; + copy_block(op_load_T0_cr2_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr2 +{ + static const uint8 op_store_T0_cr2_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x14, 0x81, + 0xe2, 0xff, 0xff, 0x0f, 0xff, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr2_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr3 +{ + static const uint8 op_load_T0_cr3_code[] = { + 0x0f, 0xb7, 0x85, 0x92, 0x03, 0x00, 0x00, 0x89, 0xc3, 0x83, 0xe3, 0x0f + }; + copy_block(op_load_T0_cr3_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr3 +{ + static const uint8 op_store_T0_cr3_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x10, 0x81, + 0xe2, 0xff, 0xff, 0xf0, 0xff, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr3_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr4 +{ + static const uint8 op_load_T0_cr4_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x0c, 0x89, 0xc3, 0x83, + 0xe3, 0x0f + }; + copy_block(op_load_T0_cr4_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr4 +{ + static const uint8 op_store_T0_cr4_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x0c, 0x81, + 0xe2, 0xff, 0x0f, 0xff, 0xff, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr4_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr5 +{ + static const uint8 op_load_T0_cr5_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x08, 0x89, 0xc3, 0x83, + 0xe3, 0x0f + }; + copy_block(op_load_T0_cr5_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr5 +{ + static const uint8 op_store_T0_cr5_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x08, 0x81, + 0xe2, 0xff, 0xf0, 0xff, 0xff, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr5_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr6 +{ + static const uint8 op_load_T0_cr6_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0xc1, 0xe8, 0x04, 0x89, 0xc3, 0x83, + 0xe3, 0x0f + }; + copy_block(op_load_T0_cr6_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr6 +{ + static const uint8 op_store_T0_cr6_code[] = { + 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, 0x89, 0xd9, 0xc1, 0xe1, 0x04, 0x81, + 0xe2, 0x0f, 0xff, 0xff, 0xff, 0x09, 0xca, 0x89, 0x95, 0x90, 0x03, 0x00, + 0x00 + }; + copy_block(op_store_T0_cr6_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_load_T0_cr7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_cr7 +{ + static const uint8 op_load_T0_cr7_code[] = { + 0x8b, 0x9d, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe3, 0x0f + }; + copy_block(op_load_T0_cr7_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_store_T0_cr7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_cr7 +{ + static const uint8 op_store_T0_cr7_code[] = { + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x83, 0xe0, 0xf0, 0x09, 0xd8, 0x89, + 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_cr7_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_mtcrf_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mtcrf_T0_im +{ + static const uint8 op_mtcrf_T0_im_code[] = { + 0x8b, 0x8d, 0x90, 0x03, 0x00, 0x00, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, + 0xda, 0xf7, 0xd0, 0x81, 0xe2, 0x00, 0x00, 0x00, 0x00, 0x21, 0xc8, 0x09, + 0xd0, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_mtcrf_T0_im_code, 31); + *(uint32_t *)(code_ptr() + 7) = param1 + 0; + *(uint32_t *)(code_ptr() + 17) = param1 + 0; + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_fmov_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F0_F1 +{ + static const uint8 op_fmov_F0_F1_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x03, 0x89, 0x53, 0x04 + }; + copy_block(op_fmov_F0_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_F0_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F0_F2 +{ + static const uint8 op_fmov_F0_F2_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x03, 0x89, 0x53, 0x04 + }; + copy_block(op_fmov_F0_F2_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_F1_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F1_F0 +{ + static const uint8 op_fmov_F1_F0_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x06, 0x89, 0x56, 0x04 + }; + copy_block(op_fmov_F1_F0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F1_F2 +{ + static const uint8 op_fmov_F1_F2_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x06, 0x89, 0x56, 0x04 + }; + copy_block(op_fmov_F1_F2_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_F2_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F2_F0 +{ + static const uint8 op_fmov_F2_F0_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x07, 0x89, 0x57, 0x04 + }; + copy_block(op_fmov_F2_F0_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_F2_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_F2_F1 +{ + static const uint8 op_fmov_F2_F1_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x07, 0x89, 0x57, 0x04 + }; + copy_block(op_fmov_F2_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F0 +{ + static const uint8 op_fmov_FD_F0_code[] = { + 0x8b, 0x03, 0x8b, 0x53, 0x04, 0x89, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x89, + 0x95, 0x44, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmov_FD_F0_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F1 +{ + static const uint8 op_fmov_FD_F1_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x89, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x89, + 0x95, 0x44, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmov_FD_F1_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_fmov_FD_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmov_FD_F2 +{ + static const uint8 op_fmov_FD_F2_code[] = { + 0x8b, 0x07, 0x8b, 0x57, 0x04, 0x89, 0x85, 0x40, 0x08, 0x0e, 0x00, 0x89, + 0x95, 0x44, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmov_FD_F2_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_fabs_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fabs_FD_F0 +{ + static const uint8 op_fabs_FD_F0_code[] = { + 0xdd, 0x03, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0xd9, 0xe1, 0xdd, 0x18 + }; + copy_block(op_fabs_FD_F0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_fneg_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fneg_FD_F0 +{ + static const uint8 op_fneg_FD_F0_code[] = { + 0xdd, 0x03, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0xd9, 0xe0, 0xdd, 0x18 + }; + copy_block(op_fneg_FD_F0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_fnabs_FD_F0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnabs_FD_F0 +{ + static const uint8 op_fnabs_FD_F0_code[] = { + 0xdd, 0x03, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0xd9, 0xe1, 0xd9, 0xe0, + 0xdd, 0x18 + }; + copy_block(op_fnabs_FD_F0_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_fadd_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fadd_FD_F0_F1 +{ + static const uint8 op_fadd_FD_F0_F1_code[] = { + 0xdd, 0x06, 0xdc, 0x03, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fadd_FD_F0_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fsub_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fsub_FD_F0_F1 +{ + static const uint8 op_fsub_FD_F0_F1_code[] = { + 0xdd, 0x06, 0xdc, 0x2b, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fsub_FD_F0_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmul_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmul_FD_F0_F1 +{ + static const uint8 op_fmul_FD_F0_F1_code[] = { + 0xdd, 0x06, 0xdc, 0x0b, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmul_FD_F0_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fdiv_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fdiv_FD_F0_F1 +{ + static const uint8 op_fdiv_FD_F0_F1_code[] = { + 0xdd, 0x06, 0xdc, 0x3b, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fdiv_FD_F0_F1_code, 10); + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_fmadd_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmadd_FD_F0_F1_F2 +{ + static const uint8 op_fmadd_FD_F0_F1_F2_code[] = { + 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x07, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmadd_FD_F0_F1_F2_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_fmsub_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmsub_FD_F0_F1_F2 +{ + static const uint8 op_fmsub_FD_F0_F1_F2_code[] = { + 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x27, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00 + }; + copy_block(op_fmsub_FD_F0_F1_F2_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_fnmadd_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmadd_FD_F0_F1_F2 +{ + static const uint8 op_fnmadd_FD_F0_F1_F2_code[] = { + 0xdd, 0x06, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0xdc, 0x0b, 0xdc, 0x07, + 0xd9, 0xe0, 0xdd, 0x18 + }; + copy_block(op_fnmadd_FD_F0_F1_F2_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_fnmsub_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmsub_FD_F0_F1_F2 +{ + static const uint8 op_fnmsub_FD_F0_F1_F2_code[] = { + 0xdd, 0x06, 0x8d, 0x85, 0x40, 0x08, 0x0e, 0x00, 0xdc, 0x0b, 0xdc, 0x27, + 0xd9, 0xe0, 0xdd, 0x18 + }; + copy_block(op_fnmsub_FD_F0_F1_F2_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_fadds_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fadds_FD_F0_F1 +{ + static const uint8 op_fadds_FD_F0_F1_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x03, 0xd9, 0x1c, 0x24, 0xd9, 0x04, + 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fadds_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fsubs_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fsubs_FD_F0_F1 +{ + static const uint8 op_fsubs_FD_F0_F1_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x2b, 0xd9, 0x1c, 0x24, 0xd9, 0x04, + 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fsubs_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fmuls_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmuls_FD_F0_F1 +{ + static const uint8 op_fmuls_FD_F0_F1_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x0b, 0xd9, 0x1c, 0x24, 0xd9, 0x04, + 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fmuls_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fdivs_FD_F0_F1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fdivs_FD_F0_F1 +{ + static const uint8 op_fdivs_FD_F0_F1_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x3b, 0xd9, 0x1c, 0x24, 0xd9, 0x04, + 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fdivs_FD_F0_F1_code, 20); + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_fmadds_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmadds_FD_F0_F1_F2 +{ + static const uint8 op_fmadds_FD_F0_F1_F2_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x07, 0xd9, 0x1c, 0x24, + 0xd9, 0x04, 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fmadds_FD_F0_F1_F2_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_fmsubs_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fmsubs_FD_F0_F1_F2 +{ + static const uint8 op_fmsubs_FD_F0_F1_F2_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x27, 0xd9, 0x1c, 0x24, + 0xd9, 0x04, 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x58 + }; + copy_block(op_fmsubs_FD_F0_F1_F2_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_fnmadds_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmadds_FD_F0_F1_F2 +{ + static const uint8 op_fnmadds_FD_F0_F1_F2_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x07, 0xd9, 0xe0, 0xd9, + 0x1c, 0x24, 0xd9, 0x04, 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x5a + }; + copy_block(op_fnmadds_FD_F0_F1_F2_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_fnmsubs_FD_F0_F1_F2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_fnmsubs_FD_F0_F1_F2 +{ + static const uint8 op_fnmsubs_FD_F0_F1_F2_code[] = { + 0x83, 0xec, 0x04, 0xdd, 0x06, 0xdc, 0x0b, 0xdc, 0x27, 0xd9, 0xe0, 0xd9, + 0x1c, 0x24, 0xd9, 0x04, 0x24, 0xdd, 0x9d, 0x40, 0x08, 0x0e, 0x00, 0x59 + }; + copy_block(op_fnmsubs_FD_F0_F1_F2_code, 24); + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_load_T0_VRSAVE,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_VRSAVE +{ + static const uint8 op_load_T0_VRSAVE_code[] = { + 0x8b, 0x9d, 0x9c, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_VRSAVE_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_VRSAVE,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_VRSAVE +{ + static const uint8 op_store_T0_VRSAVE_code[] = { + 0x89, 0x9d, 0x9c, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_VRSAVE_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_XER,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_XER +{ + static const uint8 op_load_T0_XER_code[] = { + 0x0f, 0xb6, 0x95, 0x94, 0x03, 0x00, 0x00, 0x8d, 0x8d, 0x94, 0x03, 0x00, + 0x00, 0x0f, 0xb6, 0x41, 0x01, 0xc1, 0xe2, 0x1f, 0xc1, 0xe0, 0x1e, 0x09, + 0xc2, 0x0f, 0xb6, 0x41, 0x02, 0xc1, 0xe0, 0x1d, 0x09, 0xc2, 0x0f, 0xb6, + 0x41, 0x03, 0x89, 0xd3, 0x09, 0xc3 + }; + copy_block(op_load_T0_XER_code, 42); + inc_code_ptr(42); +} +#endif + +DEFINE_GEN(gen_op_load_T0_PC,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_PC +{ + static const uint8 op_load_T0_PC_code[] = { + 0x8b, 0x9d, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_PC_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_PC,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_PC +{ + static const uint8 op_store_T0_PC_code[] = { + 0x89, 0x9d, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_PC_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_set_PC_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_set_PC_im +{ + static const uint8 op_set_PC_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_set_PC_im_code, 11); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_set_PC_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_set_PC_T0 +{ + static const uint8 op_set_PC_T0_code[] = { + 0x89, 0x9d, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_set_PC_T0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_inc_PC,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_inc_PC +{ + static const uint8 op_inc_PC_code[] = { + 0x81, 0x85, 0xac, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_inc_PC_code, 10); + *(uint32_t *)(code_ptr() + 6) = param1 + 0; + inc_code_ptr(10); +} +#endif + +DEFINE_GEN(gen_op_load_T0_LR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_LR +{ + static const uint8 op_load_T0_LR_code[] = { + 0x8b, 0x9d, 0xa4, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_LR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_LR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_LR +{ + static const uint8 op_store_T0_LR_code[] = { + 0x89, 0x9d, 0xa4, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_LR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CTR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CTR +{ + static const uint8 op_load_T0_CTR_code[] = { + 0x8b, 0x9d, 0xa8, 0x03, 0x00, 0x00 + }; + copy_block(op_load_T0_CTR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_T0_CTR,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_CTR +{ + static const uint8 op_store_T0_CTR_code[] = { + 0x89, 0x9d, 0xa8, 0x03, 0x00, 0x00 + }; + copy_block(op_store_T0_CTR_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_store_im_LR,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_im_LR +{ + static const uint8 op_store_im_LR_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xa4, 0x03, 0x00, 0x00 + }; + copy_block(op_store_im_LR_code, 11); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_load_T0_CTR_aligned,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_CTR_aligned +{ + static const uint8 op_load_T0_CTR_aligned_code[] = { + 0x8b, 0x9d, 0xa8, 0x03, 0x00, 0x00, 0x83, 0xe3, 0xfc + }; + copy_block(op_load_T0_CTR_aligned_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_load_T0_LR_aligned,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_T0_LR_aligned +{ + static const uint8 op_load_T0_LR_aligned_code[] = { + 0x8b, 0x9d, 0xa4, 0x03, 0x00, 0x00, 0x83, 0xe3, 0xfc + }; + copy_block(op_load_T0_LR_aligned_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_spcflags_init,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_init +{ + static const uint8 op_spcflags_init_code[] = { + 0x8d, 0x95, 0xb0, 0x03, 0x00, 0x00, 0x83, 0xec, 0x04, 0xb9, 0x01, 0x00, + 0x00, 0x00, 0x89, 0x14, 0x24, 0x8d, 0x95, 0xb4, 0x03, 0x00, 0x00, 0x89, + 0xf6, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, 0x89, 0xc8, 0x87, 0x02, + 0x85, 0xc0, 0x75, 0xf8, 0x8b, 0x04, 0x24, 0x81, 0x08, 0x00, 0x00, 0x00, + 0x00, 0xc7, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x58 + }; + copy_block(op_spcflags_init_code, 57); + *(uint32_t *)(code_ptr() + 45) = param1 + 0; + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_spcflags_set,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_set +{ + static const uint8 op_spcflags_set_code[] = { + 0x8d, 0x95, 0xb0, 0x03, 0x00, 0x00, 0x83, 0xec, 0x04, 0xb9, 0x01, 0x00, + 0x00, 0x00, 0x89, 0x14, 0x24, 0x8d, 0x95, 0xb4, 0x03, 0x00, 0x00, 0x89, + 0xf6, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, 0x89, 0xc8, 0x87, 0x02, + 0x85, 0xc0, 0x75, 0xf8, 0x8b, 0x04, 0x24, 0x81, 0x08, 0x00, 0x00, 0x00, + 0x00, 0xc7, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x58 + }; + copy_block(op_spcflags_set_code, 57); + *(uint32_t *)(code_ptr() + 45) = param1 + 0; + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_spcflags_clear,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_clear +{ + static const uint8 op_spcflags_clear_code[] = { + 0x83, 0xec, 0x08, 0x8d, 0x95, 0xb0, 0x03, 0x00, 0x00, 0xb9, 0x01, 0x00, + 0x00, 0x00, 0x89, 0x54, 0x24, 0x04, 0x8d, 0x95, 0xb4, 0x03, 0x00, 0x00, + 0xc7, 0x04, 0x24, 0x00, 0x00, 0x00, 0x00, 0x90, 0x89, 0xc8, 0x87, 0x02, + 0x85, 0xc0, 0x75, 0xf8, 0xf7, 0x14, 0x24, 0x8b, 0x44, 0x24, 0x04, 0x8b, + 0x14, 0x24, 0x21, 0x10, 0xc7, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x83, + 0xc4, 0x08 + }; + copy_block(op_spcflags_clear_code, 62); + *(uint32_t *)(code_ptr() + 27) = param1 + 0; + inc_code_ptr(62); +} +#endif + +DEFINE_GEN(gen_op_spcflags_check,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_spcflags_check +{ + static const uint8 op_spcflags_check_code[] = { + 0x8b, 0x85, 0xb0, 0x03, 0x00, 0x00, 0x85, 0xc0, 0x75, 0x05, 0xe9, 0x00, + 0x00, 0x00, 0x00 + }; + copy_block(op_spcflags_check_code, 15); + jmp_addr[0] = code_ptr() + 11; + inc_code_ptr(15); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0000,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0000 +{ + static const uint8 op_prep_branch_bo_0000_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x85, 0xf6, 0x0f, 0x94, 0xc1, 0x31, + 0xd2, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x89, 0xc7, + 0x74, 0x16, 0x84, 0xc9, 0x74, 0x12, 0xba, 0x01, 0x00, 0x00, 0x00, 0x8d, + 0xb6, 0x00, 0x00, 0x00, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, + 0x89, 0xd6 + }; + copy_block(op_prep_branch_bo_0000_code, 50); + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0001,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0001 +{ + static const uint8 op_prep_branch_bo_0001_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x85, 0xf6, 0x0f, 0x94, 0xc1, 0x31, + 0xd2, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x89, 0xc7, + 0x75, 0x16, 0x84, 0xc9, 0x74, 0x12, 0xba, 0x01, 0x00, 0x00, 0x00, 0x8d, + 0xb6, 0x00, 0x00, 0x00, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, + 0x89, 0xd6 + }; + copy_block(op_prep_branch_bo_0001_code, 50); + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_001x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_001x +{ + static const uint8 op_prep_branch_bo_001x_code[] = { + 0x31, 0xc0, 0x85, 0xf6, 0x0f, 0x94, 0xc0, 0x89, 0xc6 + }; + copy_block(op_prep_branch_bo_001x_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0100,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0100 +{ + static const uint8 op_prep_branch_bo_0100_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x85, 0xf6, 0x0f, 0x95, 0xc1, 0x31, + 0xd2, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x89, 0xc7, + 0x74, 0x16, 0x84, 0xc9, 0x74, 0x12, 0xba, 0x01, 0x00, 0x00, 0x00, 0x8d, + 0xb6, 0x00, 0x00, 0x00, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, + 0x89, 0xd6 + }; + copy_block(op_prep_branch_bo_0100_code, 50); + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_0101,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_0101 +{ + static const uint8 op_prep_branch_bo_0101_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x85, 0xf6, 0x0f, 0x95, 0xc1, 0x31, + 0xd2, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x89, 0xc7, + 0x75, 0x16, 0x84, 0xc9, 0x74, 0x12, 0xba, 0x01, 0x00, 0x00, 0x00, 0x8d, + 0xb6, 0x00, 0x00, 0x00, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, + 0x89, 0xd6 + }; + copy_block(op_prep_branch_bo_0101_code, 50); + inc_code_ptr(50); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_011x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_011x +{ + static const uint8 op_prep_branch_bo_011x_code[] = { + 0x31, 0xc0, 0x85, 0xf6, 0x0f, 0x95, 0xc0, 0x89, 0xc6 + }; + copy_block(op_prep_branch_bo_011x_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x00,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x00 +{ + static const uint8 op_prep_branch_bo_1x00_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, + 0x03, 0x00, 0x00, 0x89, 0xc7, 0x0f, 0x95, 0xc0, 0x0f, 0xb6, 0xc0, 0x89, + 0xc6 + }; + copy_block(op_prep_branch_bo_1x00_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x01,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x01 +{ + static const uint8 op_prep_branch_bo_1x01_code[] = { + 0x8b, 0x85, 0xa8, 0x03, 0x00, 0x00, 0x48, 0x85, 0xc0, 0x89, 0x85, 0xa8, + 0x03, 0x00, 0x00, 0x89, 0xc7, 0x0f, 0x94, 0xc0, 0x0f, 0xb6, 0xc0, 0x89, + 0xc6 + }; + copy_block(op_prep_branch_bo_1x01_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_prep_branch_bo_1x1x,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_prep_branch_bo_1x1x +{ + static const uint8 op_prep_branch_bo_1x1x_code[] = { + 0xbe, 0x01, 0x00, 0x00, 0x00 + }; + copy_block(op_prep_branch_bo_1x1x_code, 5); + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_branch_chain_1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_chain_1 +{ + static const uint8 op_branch_chain_1_code[] = { + 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_branch_chain_1_code, 5); + jmp_addr[0] = code_ptr() + 1; + inc_code_ptr(5); +} +#endif + +DEFINE_GEN(gen_op_branch_chain_2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_chain_2 +{ + static const uint8 op_branch_chain_2_code[] = { + 0x85, 0xf6, 0x74, 0x0c, 0xe9, 0x00, 0x00, 0x00, 0x00, 0xeb, 0x0a, 0x90, + 0x8d, 0x74, 0x26, 0x00, 0xe9, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_branch_chain_2_code, 21); + jmp_addr[0] = code_ptr() + 5; + jmp_addr[1] = code_ptr() + 17; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_branch_1_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_1_T0 +{ + static const uint8 op_branch_1_T0_code[] = { + 0x89, 0x9d, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_1_T0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_branch_1_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_1_im +{ + static const uint8 op_branch_1_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_1_im_code, 11); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_branch_2_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_2_T0_im +{ + static const uint8 op_branch_2_T0_im_code[] = { + 0x85, 0xf6, 0x89, 0xd8, 0x75, 0x05, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, + 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_2_T0_im_code, 17); + *(uint32_t *)(code_ptr() + 7) = param1 + 0; + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_branch_2_im_im,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_branch_2_im_im +{ + static const uint8 op_branch_2_im_im_code[] = { + 0x85, 0xf6, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x75, 0x05, 0xb8, 0x00, 0x00, + 0x00, 0x00, 0x89, 0x85, 0xac, 0x03, 0x00, 0x00 + }; + copy_block(op_branch_2_im_im_code, 20); + *(uint32_t *)(code_ptr() + 3) = param1 + 0; + *(uint32_t *)(code_ptr() + 10) = param2 + 0; + inc_code_ptr(20); +} +#endif + +DEFINE_GEN(gen_op_record_cr0_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr0_T0 +{ + static const uint8 op_record_cr0_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x8b, 0x95, 0x90, 0x03, 0x00, + 0x00, 0xc1, 0xe0, 0x1c, 0x81, 0xe2, 0xff, 0xff, 0xff, 0x0f, 0x09, 0xc2, + 0x85, 0xdb, 0x7d, 0x08, 0x81, 0xca, 0x00, 0x00, 0x00, 0x80, 0xeb, 0x1c, + 0x7e, 0x0a, 0x81, 0xca, 0x00, 0x00, 0x00, 0x40, 0xeb, 0x12, 0x66, 0x90, + 0x81, 0xca, 0x00, 0x00, 0x00, 0x20, 0x8d, 0x76, 0x00, 0x8d, 0xbc, 0x27, + 0x00, 0x00, 0x00, 0x00, 0x89, 0x95, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_record_cr0_T0_code, 70); + inc_code_ptr(70); +} +#endif + +DEFINE_GEN(gen_op_record_cr1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr1 +{ + static const uint8 op_record_cr1_code[] = { + 0x8b, 0x85, 0xa0, 0x03, 0x00, 0x00, 0x8b, 0x95, 0x90, 0x03, 0x00, 0x00, + 0xc1, 0xe8, 0x04, 0x81, 0xe2, 0xff, 0xff, 0xff, 0xf0, 0x25, 0x00, 0x00, + 0x00, 0x0f, 0x09, 0xc2, 0x89, 0x95, 0x90, 0x03, 0x00, 0x00 + }; + copy_block(op_record_cr1_code, 34); + inc_code_ptr(34); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_T1 +{ + static const uint8 op_compare_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x39, 0xf3, 0x7d, 0x07, 0x89, + 0xc3, 0x83, 0xcb, 0x08, 0xeb, 0x1e, 0x7e, 0x0c, 0x89, 0xc3, 0x83, 0xcb, + 0x04, 0xeb, 0x15, 0x90, 0x8d, 0x74, 0x26, 0x00, 0x89, 0xc3, 0x83, 0xcb, + 0x02, 0x8d, 0x74, 0x26, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_compare_T0_T1_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_im +{ + static const uint8 op_compare_T0_im_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x81, 0xfb, 0x00, 0x00, 0x00, + 0x00, 0x7d, 0x07, 0x89, 0xc3, 0x83, 0xcb, 0x08, 0xeb, 0x1a, 0x7e, 0x08, + 0x89, 0xc3, 0x83, 0xcb, 0x04, 0xeb, 0x11, 0x90, 0x89, 0xc3, 0x83, 0xcb, + 0x02, 0x8d, 0x74, 0x26, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_compare_T0_im_code, 48); + *(uint32_t *)(code_ptr() + 9) = param1 + 0; + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_compare_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_T0_0 +{ + static const uint8 op_compare_T0_0_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x85, 0xdb, 0x7d, 0x07, 0x89, + 0xc3, 0x83, 0xcb, 0x08, 0xeb, 0x1e, 0x7e, 0x0c, 0x89, 0xc3, 0x83, 0xcb, + 0x04, 0xeb, 0x15, 0x90, 0x8d, 0x74, 0x26, 0x00, 0x89, 0xc3, 0x83, 0xcb, + 0x02, 0x8d, 0x74, 0x26, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_compare_T0_0_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_T1 +{ + static const uint8 op_compare_logical_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x39, 0xf3, 0x73, 0x07, 0x89, + 0xc3, 0x83, 0xcb, 0x08, 0xeb, 0x1e, 0x76, 0x0c, 0x89, 0xc3, 0x83, 0xcb, + 0x04, 0xeb, 0x15, 0x90, 0x8d, 0x74, 0x26, 0x00, 0x89, 0xc3, 0x83, 0xcb, + 0x02, 0x8d, 0x74, 0x26, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_compare_logical_T0_T1_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_im +{ + static const uint8 op_compare_logical_T0_im_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x81, 0xfb, 0x00, 0x00, 0x00, + 0x00, 0x73, 0x07, 0x89, 0xc3, 0x83, 0xcb, 0x08, 0xeb, 0x1a, 0x76, 0x08, + 0x89, 0xc3, 0x83, 0xcb, 0x04, 0xeb, 0x11, 0x90, 0x89, 0xc3, 0x83, 0xcb, + 0x02, 0x8d, 0x74, 0x26, 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_compare_logical_T0_im_code, 48); + *(uint32_t *)(code_ptr() + 9) = param1 + 0; + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_compare_logical_T0_0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_compare_logical_T0_0 +{ + static const uint8 op_compare_logical_T0_0_code[] = { + 0x0f, 0xb6, 0x85, 0x94, 0x03, 0x00, 0x00, 0x85, 0xdb, 0x74, 0x07, 0x89, + 0xc3, 0x83, 0xcb, 0x04, 0xeb, 0x05, 0x89, 0xc3, 0x83, 0xcb, 0x02 + }; + copy_block(op_compare_logical_T0_0_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_divw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divw_T0_T1 +{ + static const uint8 op_divw_T0_T1_code[] = { + 0x83, 0xec, 0x04, 0x85, 0xf6, 0x89, 0x1c, 0x24, 0x74, 0x13, 0x81, 0xfb, + 0x00, 0x00, 0x00, 0x80, 0x0f, 0x94, 0xc2, 0x83, 0xfe, 0xff, 0x0f, 0x94, + 0xc0, 0x84, 0xc2, 0x74, 0x08, 0x8b, 0x0c, 0x24, 0xc1, 0xf9, 0x1f, 0xeb, + 0x0b, 0x8b, 0x04, 0x24, 0x99, 0xf7, 0xfe, 0x89, 0xc1, 0x8d, 0x76, 0x00, + 0x5a, 0x89, 0xcb + }; + copy_block(op_divw_T0_T1_code, 51); + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_divwo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwo_T0_T1 +{ + static const uint8 op_divwo_T0_T1_code[] = { + 0x83, 0xec, 0x04, 0x85, 0xf6, 0x89, 0x1c, 0x24, 0x74, 0x13, 0x81, 0xfb, + 0x00, 0x00, 0x00, 0x80, 0x0f, 0x94, 0xc2, 0x83, 0xfe, 0xff, 0x0f, 0x94, + 0xc0, 0x84, 0xc2, 0x74, 0x16, 0x80, 0x8d, 0x94, 0x03, 0x00, 0x00, 0x01, + 0x8b, 0x0c, 0x24, 0xc6, 0x85, 0x95, 0x03, 0x00, 0x00, 0x01, 0xc1, 0xf9, + 0x1f, 0xeb, 0x1d, 0xc6, 0x85, 0x95, 0x03, 0x00, 0x00, 0x00, 0x8b, 0x04, + 0x24, 0x99, 0xf7, 0xfe, 0x89, 0xc1, 0x8d, 0xb4, 0x26, 0x00, 0x00, 0x00, + 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, 0x89, 0xcb, 0x59 + }; + copy_block(op_divwo_T0_T1_code, 83); + inc_code_ptr(83); +} +#endif + +DEFINE_GEN(gen_op_divwu_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwu_T0_T1 +{ + static const uint8 op_divwu_T0_T1_code[] = { + 0x83, 0xec, 0x04, 0x31, 0xc9, 0x85, 0xf6, 0x89, 0x34, 0x24, 0x74, 0x08, + 0x89, 0xd8, 0x31, 0xd2, 0xf7, 0xf6, 0x89, 0xc1, 0x58, 0x89, 0xcb + }; + copy_block(op_divwu_T0_T1_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_divwuo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_divwuo_T0_T1 +{ + static const uint8 op_divwuo_T0_T1_code[] = { + 0x85, 0xf6, 0x89, 0xf1, 0x75, 0x10, 0x80, 0x8d, 0x94, 0x03, 0x00, 0x00, + 0x01, 0xc6, 0x85, 0x95, 0x03, 0x00, 0x00, 0x01, 0xeb, 0x0f, 0xc6, 0x85, + 0x95, 0x03, 0x00, 0x00, 0x00, 0x89, 0xd8, 0x31, 0xd2, 0xf7, 0xf6, 0x89, + 0xc1, 0x89, 0xcb + }; + copy_block(op_divwuo_T0_T1_code, 39); + inc_code_ptr(39); +} +#endif + +DEFINE_GEN(gen_op_mulhw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulhw_T0_T1 +{ + static const uint8 op_mulhw_T0_T1_code[] = { + 0x89, 0xda, 0x89, 0xf0, 0xf7, 0xea, 0x89, 0xd3 + }; + copy_block(op_mulhw_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_mulhwu_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulhwu_T0_T1 +{ + static const uint8 op_mulhwu_T0_T1_code[] = { + 0x89, 0xda, 0x89, 0xf0, 0xf7, 0xe2, 0x89, 0xd3 + }; + copy_block(op_mulhwu_T0_T1_code, 8); + inc_code_ptr(8); +} +#endif + +DEFINE_GEN(gen_op_mulli_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mulli_T0_im +{ + static const uint8 op_mulli_T0_im_code[] = { + 0x69, 0xdb, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_mulli_T0_im_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_mullwo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mullwo_T0_T1 +{ + static const uint8 op_mullwo_T0_T1_code[] = { + 0x89, 0xd8, 0x83, 0xec, 0x08, 0xf7, 0xee, 0x89, 0x04, 0x24, 0x8b, 0x04, + 0x24, 0x89, 0x54, 0x24, 0x04, 0x8b, 0x1c, 0x24, 0x99, 0x33, 0x54, 0x24, + 0x04, 0x33, 0x04, 0x24, 0x09, 0xd0, 0x0f, 0x95, 0xc0, 0x0f, 0xb6, 0xc0, + 0x88, 0x85, 0x95, 0x03, 0x00, 0x00, 0x08, 0x85, 0x94, 0x03, 0x00, 0x00, + 0x83, 0xc4, 0x08 + }; + copy_block(op_mullwo_T0_T1_code, 51); + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_slw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_slw_T0_T1 +{ + static const uint8 op_slw_T0_T1_code[] = { + 0x89, 0xf0, 0x89, 0xf1, 0xd3, 0xe3, 0xa8, 0x20, 0x74, 0x02, 0x31, 0xdb + }; + copy_block(op_slw_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_srw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_srw_T0_T1 +{ + static const uint8 op_srw_T0_T1_code[] = { + 0x89, 0xf0, 0x89, 0xf1, 0xd3, 0xeb, 0xa8, 0x20, 0x74, 0x02, 0x31, 0xdb + }; + copy_block(op_srw_T0_T1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_sraw_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sraw_T0_T1 +{ + static const uint8 op_sraw_T0_T1_code[] = { + 0x89, 0xf0, 0x83, 0xec, 0x04, 0x83, 0xe0, 0x3f, 0x89, 0xc6, 0xc1, 0xe8, + 0x05, 0x84, 0xc0, 0x74, 0x11, 0x89, 0xd8, 0xc1, 0xe8, 0x1f, 0x89, 0xc3, + 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0xf7, 0xdb, 0xeb, 0x3b, 0xc6, 0x44, + 0x24, 0x03, 0x00, 0x89, 0xf1, 0x89, 0xda, 0xd3, 0xfa, 0x85, 0xdb, 0x79, + 0x1f, 0xb8, 0xff, 0xff, 0xff, 0xff, 0xd3, 0xe0, 0xf7, 0xd0, 0x85, 0xd8, + 0x74, 0x12, 0xc6, 0x44, 0x24, 0x03, 0x01, 0x8d, 0xb6, 0x00, 0x00, 0x00, + 0x00, 0x8d, 0xbc, 0x27, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb6, 0x44, 0x24, + 0x03, 0x89, 0xd3, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x58 + }; + copy_block(op_sraw_T0_T1_code, 94); + inc_code_ptr(94); +} +#endif + +DEFINE_GEN(gen_op_sraw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_sraw_T0_im +{ + static const uint8 op_sraw_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x89, 0xda, 0x88, 0xc1, 0x83, 0xec, 0x04, + 0xd3, 0xfa, 0x85, 0xdb, 0xc6, 0x44, 0x24, 0x03, 0x00, 0x79, 0x19, 0xb8, + 0xff, 0xff, 0xff, 0xff, 0xd3, 0xe0, 0xf7, 0xd0, 0x85, 0xc3, 0x74, 0x0c, + 0xc6, 0x44, 0x24, 0x03, 0x01, 0x8d, 0xb4, 0x26, 0x00, 0x00, 0x00, 0x00, + 0x0f, 0xb6, 0x44, 0x24, 0x03, 0x89, 0xd3, 0x88, 0x85, 0x96, 0x03, 0x00, + 0x00, 0x5a + }; + copy_block(op_sraw_T0_im_code, 62); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + inc_code_ptr(62); +} +#endif + +DEFINE_GEN(gen_op_rlwimi_T0_T1,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwimi_T0_T1 +{ + static const uint8 op_rlwimi_T0_T1_code[] = { + 0xb9, 0x00, 0x00, 0x00, 0x00, 0x89, 0xf2, 0xb8, 0x00, 0x00, 0x00, 0x00, + 0xd3, 0xc2, 0x21, 0xc2, 0xf7, 0xd0, 0x21, 0xd8, 0x89, 0xd3, 0x09, 0xc3 + }; + copy_block(op_rlwimi_T0_T1_code, 24); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + *(uint32_t *)(code_ptr() + 8) = param2 + 0; + inc_code_ptr(24); +} +#endif + +DEFINE_GEN(gen_op_rlwinm_T0_T1,void,(long param1, long param2)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwinm_T0_T1 +{ + static const uint8 op_rlwinm_T0_T1_code[] = { + 0x89, 0xd8, 0xb9, 0x00, 0x00, 0x00, 0x00, 0xd3, 0xc0, 0x89, 0xc3, 0x81, + 0xe3, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_rlwinm_T0_T1_code, 17); + *(uint32_t *)(code_ptr() + 3) = param1 + 0; + *(uint32_t *)(code_ptr() + 13) = param2 + 0; + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_rlwnm_T0_T1,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_rlwnm_T0_T1 +{ + static const uint8 op_rlwnm_T0_T1_code[] = { + 0x89, 0xd8, 0x89, 0xf1, 0xd3, 0xc0, 0x89, 0xc3, 0x81, 0xe3, 0x00, 0x00, + 0x00, 0x00 + }; + copy_block(op_rlwnm_T0_T1_code, 14); + *(uint32_t *)(code_ptr() + 10) = param1 + 0; + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_cntlzw_32_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_cntlzw_32_T0 +{ + static const uint8 op_cntlzw_32_T0_code[] = { + 0xb8, 0xff, 0xff, 0xff, 0xff, 0x0f, 0xbd, 0xc3, 0xba, 0x1f, 0x00, 0x00, + 0x00, 0x89, 0xd3, 0x29, 0xc3 + }; + copy_block(op_cntlzw_32_T0_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_addo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addo_T0_T1 +{ + static const uint8 op_addo_T0_T1_code[] = { + 0x01, 0xf3, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, 0x00, 0x00, 0x88, + 0x95, 0x95, 0x03, 0x00, 0x00 + }; + copy_block(op_addo_T0_T1_code, 17); + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_addc_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addc_T0_im +{ + static const uint8 op_addc_T0_im_code[] = { + 0x8d, 0x93, 0x00, 0x00, 0x00, 0x00, 0x39, 0xda, 0x0f, 0x92, 0x85, 0x96, + 0x03, 0x00, 0x00, 0x89, 0xd3 + }; + copy_block(op_addc_T0_im_code, 17); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(17); +} +#endif + +DEFINE_GEN(gen_op_addc_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addc_T0_T1 +{ + static const uint8 op_addc_T0_T1_code[] = { + 0x01, 0xf3, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addc_T0_T1_code, 11); + inc_code_ptr(11); +} +#endif + +DEFINE_GEN(gen_op_addco_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addco_T0_T1 +{ + static const uint8 op_addco_T0_T1_code[] = { + 0x01, 0xf3, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, + 0x00, 0x00, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x88, 0x95, 0x95, 0x03, + 0x00, 0x00 + }; + copy_block(op_addco_T0_T1_code, 26); + inc_code_ptr(26); +} +#endif + +DEFINE_GEN(gen_op_adde_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_adde_T0_T1 +{ + static const uint8 op_adde_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x11, + 0xf3, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_adde_T0_T1_code, 22); + inc_code_ptr(22); +} +#endif + +DEFINE_GEN(gen_op_addeo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addeo_T0_T1 +{ + static const uint8 op_addeo_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x11, + 0xf3, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, 0x00, + 0x00, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x88, 0x95, 0x95, 0x03, 0x00, + 0x00 + }; + copy_block(op_addeo_T0_T1_code, 37); + inc_code_ptr(37); +} +#endif + +DEFINE_GEN(gen_op_addme_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addme_T0 +{ + static const uint8 op_addme_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x83, + 0xd3, 0xff, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addme_T0_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_addmeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addmeo_T0 +{ + static const uint8 op_addmeo_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x83, + 0xd3, 0xff, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, + 0x00, 0x00, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x88, 0x95, 0x95, 0x03, + 0x00, 0x00 + }; + copy_block(op_addmeo_T0_code, 38); + inc_code_ptr(38); +} +#endif + +DEFINE_GEN(gen_op_addze_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addze_T0 +{ + static const uint8 op_addze_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x83, + 0xd3, 0x00, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00 + }; + copy_block(op_addze_T0_code, 23); + inc_code_ptr(23); +} +#endif + +DEFINE_GEN(gen_op_addzeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_addzeo_T0 +{ + static const uint8 op_addzeo_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x0f, 0xba, 0xe0, 0x00, 0x83, + 0xd3, 0x00, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, + 0x00, 0x00, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x88, 0x95, 0x95, 0x03, + 0x00, 0x00 + }; + copy_block(op_addzeo_T0_code, 38); + inc_code_ptr(38); +} +#endif + +DEFINE_GEN(gen_op_subf_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subf_T0_T1 +{ + static const uint8 op_subf_T0_T1_code[] = { + 0x89, 0xf0, 0x29, 0xd8, 0x89, 0xc3 + }; + copy_block(op_subf_T0_T1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_subfo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfo_T0_T1 +{ + static const uint8 op_subfo_T0_T1_code[] = { + 0x89, 0xf0, 0x29, 0xd8, 0x0f, 0x90, 0xc2, 0x08, 0x95, 0x94, 0x03, 0x00, + 0x00, 0x89, 0xc3, 0x88, 0x95, 0x95, 0x03, 0x00, 0x00 + }; + copy_block(op_subfo_T0_T1_code, 21); + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_subfc_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfc_T0_im +{ + static const uint8 op_subfc_T0_im_code[] = { + 0xb8, 0x00, 0x00, 0x00, 0x00, 0x29, 0xd8, 0x3d, 0x00, 0x00, 0x00, 0x00, + 0x0f, 0x96, 0x85, 0x96, 0x03, 0x00, 0x00, 0x89, 0xc3 + }; + copy_block(op_subfc_T0_im_code, 21); + *(uint32_t *)(code_ptr() + 1) = param1 + 0; + *(uint32_t *)(code_ptr() + 8) = param1 + 0; + inc_code_ptr(21); +} +#endif + +DEFINE_GEN(gen_op_subfc_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfc_T0_T1 +{ + static const uint8 op_subfc_T0_T1_code[] = { + 0x89, 0xf2, 0x29, 0xda, 0xf5, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, + 0x00, 0x00, 0x89, 0xd3 + }; + copy_block(op_subfc_T0_T1_code, 16); + inc_code_ptr(16); +} +#endif + +DEFINE_GEN(gen_op_subfco_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfco_T0_T1 +{ + static const uint8 op_subfco_T0_T1_code[] = { + 0x89, 0xf1, 0x29, 0xd9, 0xf5, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, + 0x95, 0x94, 0x03, 0x00, 0x00, 0x89, 0xcb, 0x88, 0x85, 0x96, 0x03, 0x00, + 0x00, 0x88, 0x95, 0x95, 0x03, 0x00, 0x00 + }; + copy_block(op_subfco_T0_T1_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_subfe_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfe_T0_T1 +{ + static const uint8 op_subfe_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x89, 0xf2, 0x0f, 0xba, 0xe0, + 0x00, 0xf5, 0x19, 0xda, 0xf5, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, + 0x00, 0x00, 0x89, 0xd3 + }; + copy_block(op_subfe_T0_T1_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_subfeo_T0_T1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfeo_T0_T1 +{ + static const uint8 op_subfeo_T0_T1_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x89, 0xf1, 0x0f, 0xba, 0xe0, + 0x00, 0xf5, 0x19, 0xd9, 0xf5, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x08, + 0x95, 0x94, 0x03, 0x00, 0x00, 0x89, 0xcb, 0x88, 0x85, 0x96, 0x03, 0x00, + 0x00, 0x88, 0x95, 0x95, 0x03, 0x00, 0x00 + }; + copy_block(op_subfeo_T0_T1_code, 43); + inc_code_ptr(43); +} +#endif + +DEFINE_GEN(gen_op_subfme_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfme_T0 +{ + static const uint8 op_subfme_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0xba, 0xff, 0xff, 0xff, 0xff, + 0x0f, 0xba, 0xe0, 0x00, 0xf5, 0x19, 0xda, 0xf5, 0x0f, 0x92, 0xc0, 0x88, + 0x85, 0x96, 0x03, 0x00, 0x00, 0x89, 0xd3 + }; + copy_block(op_subfme_T0_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_subfmeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfmeo_T0 +{ + static const uint8 op_subfmeo_T0_code[] = { + 0x83, 0xec, 0x04, 0xb9, 0xff, 0xff, 0xff, 0xff, 0x0f, 0xb6, 0x95, 0x96, + 0x03, 0x00, 0x00, 0x89, 0xd0, 0x0f, 0xba, 0xe0, 0x00, 0xf5, 0x19, 0xd9, + 0xf5, 0x0f, 0x92, 0xc0, 0x0f, 0x90, 0xc2, 0x88, 0x85, 0x96, 0x03, 0x00, + 0x00, 0x89, 0xcb, 0x88, 0x95, 0x95, 0x03, 0x00, 0x00, 0x08, 0x95, 0x94, + 0x03, 0x00, 0x00, 0x59 + }; + copy_block(op_subfmeo_T0_code, 52); + inc_code_ptr(52); +} +#endif + +DEFINE_GEN(gen_op_subfze_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfze_T0 +{ + static const uint8 op_subfze_T0_code[] = { + 0x0f, 0xb6, 0x85, 0x96, 0x03, 0x00, 0x00, 0x31, 0xd2, 0x0f, 0xba, 0xe0, + 0x00, 0xf5, 0x19, 0xda, 0xf5, 0x0f, 0x92, 0xc0, 0x88, 0x85, 0x96, 0x03, + 0x00, 0x00, 0x89, 0xd3 + }; + copy_block(op_subfze_T0_code, 28); + inc_code_ptr(28); +} +#endif + +DEFINE_GEN(gen_op_subfzeo_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_subfzeo_T0 +{ + static const uint8 op_subfzeo_T0_code[] = { + 0x83, 0xec, 0x04, 0x31, 0xc9, 0x0f, 0xb6, 0x95, 0x96, 0x03, 0x00, 0x00, + 0x89, 0xd0, 0x0f, 0xba, 0xe0, 0x00, 0xf5, 0x19, 0xd9, 0xf5, 0x0f, 0x92, + 0xc0, 0x0f, 0x90, 0xc2, 0x88, 0x85, 0x96, 0x03, 0x00, 0x00, 0x89, 0xcb, + 0x88, 0x95, 0x95, 0x03, 0x00, 0x00, 0x08, 0x95, 0x94, 0x03, 0x00, 0x00, + 0x58 + }; + copy_block(op_subfzeo_T0_code, 49); + inc_code_ptr(49); +} +#endif + +DEFINE_GEN(gen_op_inc_32_mem,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_inc_32_mem +{ + static const uint8 op_inc_32_mem_code[] = { + 0xff, 0x05, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_inc_32_mem_code, 6); + *(uint32_t *)(code_ptr() + 2) = param1 + 0; + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_nego_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_nego_T0 +{ + static const uint8 op_nego_T0_code[] = { + 0x31, 0xd2, 0x81, 0xfb, 0x00, 0x00, 0x00, 0x80, 0x0f, 0x94, 0xc2, 0x08, + 0x95, 0x94, 0x03, 0x00, 0x00, 0xf7, 0xdb, 0x88, 0x95, 0x95, 0x03, 0x00, + 0x00 + }; + copy_block(op_nego_T0_code, 25); + inc_code_ptr(25); +} +#endif + +DEFINE_GEN(gen_op_dcbz_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_dcbz_T0 +{ + static const uint8 op_dcbz_T0_code[] = { + 0x83, 0xe3, 0xe0, 0x31, 0xc9, 0x8d, 0x83, 0x00, 0x00, 0x00, 0x11, 0x89, + 0x8b, 0x00, 0x00, 0x00, 0x11, 0x31, 0xc9, 0x89, 0x8b, 0x04, 0x00, 0x00, + 0x11, 0xc7, 0x40, 0x08, 0x00, 0x00, 0x00, 0x00, 0xc7, 0x40, 0x0c, 0x00, + 0x00, 0x00, 0x00, 0xc7, 0x40, 0x10, 0x00, 0x00, 0x00, 0x00, 0xc7, 0x40, + 0x14, 0x00, 0x00, 0x00, 0x00, 0xc7, 0x40, 0x18, 0x00, 0x00, 0x00, 0x00, + 0xc7, 0x40, 0x1c, 0x00, 0x00, 0x00, 0x00 + }; + copy_block(op_dcbz_T0_code, 67); + inc_code_ptr(67); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_im +{ + static const uint8 op_lmw_T0_im_code[] = { + 0x83, 0xec, 0x04, 0x89, 0xd9, 0xc7, 0x04, 0x24, 0x00, 0x00, 0x00, 0x00, + 0x83, 0x3c, 0x24, 0x1f, 0x77, 0x27, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x8d, + 0x54, 0x85, 0x10, 0x90, 0x8d, 0x74, 0x26, 0x00, 0x8b, 0x81, 0x00, 0x00, + 0x00, 0x11, 0x0f, 0xc8, 0xff, 0x04, 0x24, 0x83, 0xc1, 0x04, 0x89, 0x02, + 0x83, 0xc2, 0x04, 0x83, 0x3c, 0x24, 0x1f, 0x76, 0xe7, 0x58 + }; + copy_block(op_lmw_T0_im_code, 58); + *(uint32_t *)(code_ptr() + 8) = param1 + 0; + *(uint32_t *)(code_ptr() + 19) = param1 + 0; + inc_code_ptr(58); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_im,void,(long param1)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_im +{ + static const uint8 op_stmw_T0_im_code[] = { + 0x83, 0xec, 0x04, 0x89, 0xd9, 0xc7, 0x04, 0x24, 0x00, 0x00, 0x00, 0x00, + 0x83, 0x3c, 0x24, 0x1f, 0x77, 0x27, 0xb8, 0x00, 0x00, 0x00, 0x00, 0x8d, + 0x54, 0x85, 0x10, 0x90, 0x8d, 0x74, 0x26, 0x00, 0x8b, 0x02, 0x0f, 0xc8, + 0xff, 0x04, 0x24, 0x83, 0xc2, 0x04, 0x89, 0x81, 0x00, 0x00, 0x00, 0x11, + 0x83, 0xc1, 0x04, 0x83, 0x3c, 0x24, 0x1f, 0x76, 0xe7, 0x58 + }; + copy_block(op_stmw_T0_im_code, 58); + *(uint32_t *)(code_ptr() + 8) = param1 + 0; + *(uint32_t *)(code_ptr() + 19) = param1 + 0; + inc_code_ptr(58); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_29 +{ + static const uint8 op_lmw_T0_29_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x84, 0x00, + 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, + 0xc8, 0x89, 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, + 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_29_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_28 +{ + static const uint8 op_lmw_T0_28_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x80, 0x00, + 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, + 0xc8, 0x89, 0x85, 0x84, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, + 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x88, 0x00, 0x00, 0x00, + 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, + 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_28_code, 65); + inc_code_ptr(65); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_27 +{ + static const uint8 op_lmw_T0_27_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x45, 0x7c, 0x83, + 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, + 0x80, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, + 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x84, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x88, 0x00, + 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, + 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_27_code, 79); + inc_code_ptr(79); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_26 +{ + static const uint8 op_lmw_T0_26_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x45, 0x78, 0x83, + 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x45, + 0x7c, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, + 0x89, 0x85, 0x80, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, + 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x84, 0x00, 0x00, 0x00, 0x83, + 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, + 0x88, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, + 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_26_code, 93); + inc_code_ptr(93); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_30 +{ + static const uint8 op_lmw_T0_30_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x88, 0x00, + 0x00, 0x00, 0x83, 0xc3, 0x04, 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, + 0xc8, 0x89, 0x85, 0x8c, 0x00, 0x00, 0x00 + }; + copy_block(op_lmw_T0_30_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_29 +{ + static const uint8 op_stmw_T0_29_code[] = { + 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, + 0x00, 0x11, 0x8b, 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, + 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x8c, 0x00, 0x00, + 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_stmw_T0_29_code, 48); + inc_code_ptr(48); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_28 +{ + static const uint8 op_stmw_T0_28_code[] = { + 0x8b, 0x85, 0x80, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, + 0x00, 0x11, 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, + 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x88, 0x00, 0x00, + 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, + 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, + 0x83, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_stmw_T0_28_code, 65); + inc_code_ptr(65); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_27 +{ + static const uint8 op_stmw_T0_27_code[] = { + 0x8b, 0x45, 0x7c, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, + 0x85, 0x80, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, + 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, 0x83, 0xc3, + 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x88, + 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, + 0x00, 0x11, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, + 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_stmw_T0_27_code, 79); + inc_code_ptr(79); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_26 +{ + static const uint8 op_stmw_T0_26_code[] = { + 0x8b, 0x45, 0x78, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, + 0x45, 0x7c, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, + 0x11, 0x8b, 0x85, 0x80, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, + 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x84, 0x00, 0x00, 0x00, + 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11, 0x8b, + 0x85, 0x88, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, 0xc8, 0x89, 0x83, + 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x83, 0xc3, + 0x04, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_stmw_T0_26_code, 93); + inc_code_ptr(93); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_30 +{ + static const uint8 op_stmw_T0_30_code[] = { + 0x8b, 0x85, 0x88, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, + 0x00, 0x11, 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x83, 0xc3, 0x04, 0x0f, + 0xc8, 0x89, 0x83, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_stmw_T0_30_code, 31); + inc_code_ptr(31); +} +#endif + +DEFINE_GEN(gen_op_lmw_T0_31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_lmw_T0_31 +{ + static const uint8 op_lmw_T0_31_code[] = { + 0x8b, 0x83, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x85, 0x8c, 0x00, + 0x00, 0x00 + }; + copy_block(op_lmw_T0_31_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_stmw_T0_31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_stmw_T0_31 +{ + static const uint8 op_stmw_T0_31_code[] = { + 0x8b, 0x85, 0x8c, 0x00, 0x00, 0x00, 0x0f, 0xc8, 0x89, 0x83, 0x00, 0x00, + 0x00, 0x11 + }; + copy_block(op_stmw_T0_31_code, 14); + inc_code_ptr(14); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR0 +{ + static const uint8 op_load_ad_VD_VR0_code[] = { + 0x8d, 0x85, 0x90, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR0_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR0 +{ + static const uint8 op_load_ad_V0_VR0_code[] = { + 0x8d, 0x9d, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR0 +{ + static const uint8 op_load_ad_V1_VR0_code[] = { + 0x8d, 0xb5, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR0 +{ + static const uint8 op_load_ad_V2_VR0_code[] = { + 0x8d, 0xbd, 0x90, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR0_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR1 +{ + static const uint8 op_load_ad_VD_VR1_code[] = { + 0x8d, 0x85, 0xa0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR1_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR1 +{ + static const uint8 op_load_ad_V0_VR1_code[] = { + 0x8d, 0x9d, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR1 +{ + static const uint8 op_load_ad_V1_VR1_code[] = { + 0x8d, 0xb5, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR1 +{ + static const uint8 op_load_ad_V2_VR1_code[] = { + 0x8d, 0xbd, 0xa0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR1_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR2 +{ + static const uint8 op_load_ad_VD_VR2_code[] = { + 0x8d, 0x85, 0xb0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR2_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR2 +{ + static const uint8 op_load_ad_V0_VR2_code[] = { + 0x8d, 0x9d, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR2 +{ + static const uint8 op_load_ad_V1_VR2_code[] = { + 0x8d, 0xb5, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR2 +{ + static const uint8 op_load_ad_V2_VR2_code[] = { + 0x8d, 0xbd, 0xb0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR2_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR3 +{ + static const uint8 op_load_ad_VD_VR3_code[] = { + 0x8d, 0x85, 0xc0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR3_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR3 +{ + static const uint8 op_load_ad_V0_VR3_code[] = { + 0x8d, 0x9d, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR3 +{ + static const uint8 op_load_ad_V1_VR3_code[] = { + 0x8d, 0xb5, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR3,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR3 +{ + static const uint8 op_load_ad_V2_VR3_code[] = { + 0x8d, 0xbd, 0xc0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR3_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR4 +{ + static const uint8 op_load_ad_VD_VR4_code[] = { + 0x8d, 0x85, 0xd0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR4_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR4 +{ + static const uint8 op_load_ad_V0_VR4_code[] = { + 0x8d, 0x9d, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR4 +{ + static const uint8 op_load_ad_V1_VR4_code[] = { + 0x8d, 0xb5, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR4,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR4 +{ + static const uint8 op_load_ad_V2_VR4_code[] = { + 0x8d, 0xbd, 0xd0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR4_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR5 +{ + static const uint8 op_load_ad_VD_VR5_code[] = { + 0x8d, 0x85, 0xe0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR5_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR5 +{ + static const uint8 op_load_ad_V0_VR5_code[] = { + 0x8d, 0x9d, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR5 +{ + static const uint8 op_load_ad_V1_VR5_code[] = { + 0x8d, 0xb5, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR5,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR5 +{ + static const uint8 op_load_ad_V2_VR5_code[] = { + 0x8d, 0xbd, 0xe0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR5_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR6 +{ + static const uint8 op_load_ad_VD_VR6_code[] = { + 0x8d, 0x85, 0xf0, 0x01, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR6_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR6 +{ + static const uint8 op_load_ad_V0_VR6_code[] = { + 0x8d, 0x9d, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR6 +{ + static const uint8 op_load_ad_V1_VR6_code[] = { + 0x8d, 0xb5, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR6,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR6 +{ + static const uint8 op_load_ad_V2_VR6_code[] = { + 0x8d, 0xbd, 0xf0, 0x01, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR6_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR7 +{ + static const uint8 op_load_ad_VD_VR7_code[] = { + 0x8d, 0x85, 0x00, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR7_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR7 +{ + static const uint8 op_load_ad_V0_VR7_code[] = { + 0x8d, 0x9d, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR7 +{ + static const uint8 op_load_ad_V1_VR7_code[] = { + 0x8d, 0xb5, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR7,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR7 +{ + static const uint8 op_load_ad_V2_VR7_code[] = { + 0x8d, 0xbd, 0x00, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR7_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR8 +{ + static const uint8 op_load_ad_VD_VR8_code[] = { + 0x8d, 0x85, 0x10, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR8_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR8 +{ + static const uint8 op_load_ad_V0_VR8_code[] = { + 0x8d, 0x9d, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR8 +{ + static const uint8 op_load_ad_V1_VR8_code[] = { + 0x8d, 0xb5, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR8,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR8 +{ + static const uint8 op_load_ad_V2_VR8_code[] = { + 0x8d, 0xbd, 0x10, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR8_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR9 +{ + static const uint8 op_load_ad_VD_VR9_code[] = { + 0x8d, 0x85, 0x20, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR9_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR9 +{ + static const uint8 op_load_ad_V0_VR9_code[] = { + 0x8d, 0x9d, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR9 +{ + static const uint8 op_load_ad_V1_VR9_code[] = { + 0x8d, 0xb5, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR9,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR9 +{ + static const uint8 op_load_ad_V2_VR9_code[] = { + 0x8d, 0xbd, 0x20, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR9_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR10 +{ + static const uint8 op_load_ad_VD_VR10_code[] = { + 0x8d, 0x85, 0x30, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR10_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR10 +{ + static const uint8 op_load_ad_V0_VR10_code[] = { + 0x8d, 0x9d, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR10 +{ + static const uint8 op_load_ad_V1_VR10_code[] = { + 0x8d, 0xb5, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR10,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR10 +{ + static const uint8 op_load_ad_V2_VR10_code[] = { + 0x8d, 0xbd, 0x30, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR10_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR11 +{ + static const uint8 op_load_ad_VD_VR11_code[] = { + 0x8d, 0x85, 0x40, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR11_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR11 +{ + static const uint8 op_load_ad_V0_VR11_code[] = { + 0x8d, 0x9d, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR11 +{ + static const uint8 op_load_ad_V1_VR11_code[] = { + 0x8d, 0xb5, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR11,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR11 +{ + static const uint8 op_load_ad_V2_VR11_code[] = { + 0x8d, 0xbd, 0x40, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR11_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR12 +{ + static const uint8 op_load_ad_VD_VR12_code[] = { + 0x8d, 0x85, 0x50, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR12_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR12 +{ + static const uint8 op_load_ad_V0_VR12_code[] = { + 0x8d, 0x9d, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR12 +{ + static const uint8 op_load_ad_V1_VR12_code[] = { + 0x8d, 0xb5, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR12,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR12 +{ + static const uint8 op_load_ad_V2_VR12_code[] = { + 0x8d, 0xbd, 0x50, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR12_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR13 +{ + static const uint8 op_load_ad_VD_VR13_code[] = { + 0x8d, 0x85, 0x60, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR13_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR13 +{ + static const uint8 op_load_ad_V0_VR13_code[] = { + 0x8d, 0x9d, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR13 +{ + static const uint8 op_load_ad_V1_VR13_code[] = { + 0x8d, 0xb5, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR13,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR13 +{ + static const uint8 op_load_ad_V2_VR13_code[] = { + 0x8d, 0xbd, 0x60, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR13_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR14 +{ + static const uint8 op_load_ad_VD_VR14_code[] = { + 0x8d, 0x85, 0x70, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR14_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR14 +{ + static const uint8 op_load_ad_V0_VR14_code[] = { + 0x8d, 0x9d, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR14 +{ + static const uint8 op_load_ad_V1_VR14_code[] = { + 0x8d, 0xb5, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR14,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR14 +{ + static const uint8 op_load_ad_V2_VR14_code[] = { + 0x8d, 0xbd, 0x70, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR14_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR15 +{ + static const uint8 op_load_ad_VD_VR15_code[] = { + 0x8d, 0x85, 0x80, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR15_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR15 +{ + static const uint8 op_load_ad_V0_VR15_code[] = { + 0x8d, 0x9d, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR15 +{ + static const uint8 op_load_ad_V1_VR15_code[] = { + 0x8d, 0xb5, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR15,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR15 +{ + static const uint8 op_load_ad_V2_VR15_code[] = { + 0x8d, 0xbd, 0x80, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR15_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR16 +{ + static const uint8 op_load_ad_VD_VR16_code[] = { + 0x8d, 0x85, 0x90, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR16_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR16 +{ + static const uint8 op_load_ad_V0_VR16_code[] = { + 0x8d, 0x9d, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR16 +{ + static const uint8 op_load_ad_V1_VR16_code[] = { + 0x8d, 0xb5, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR16,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR16 +{ + static const uint8 op_load_ad_V2_VR16_code[] = { + 0x8d, 0xbd, 0x90, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR16_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR17 +{ + static const uint8 op_load_ad_VD_VR17_code[] = { + 0x8d, 0x85, 0xa0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR17_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR17 +{ + static const uint8 op_load_ad_V0_VR17_code[] = { + 0x8d, 0x9d, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR17 +{ + static const uint8 op_load_ad_V1_VR17_code[] = { + 0x8d, 0xb5, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR17,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR17 +{ + static const uint8 op_load_ad_V2_VR17_code[] = { + 0x8d, 0xbd, 0xa0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR17_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR18 +{ + static const uint8 op_load_ad_VD_VR18_code[] = { + 0x8d, 0x85, 0xb0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR18_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR18 +{ + static const uint8 op_load_ad_V0_VR18_code[] = { + 0x8d, 0x9d, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR18 +{ + static const uint8 op_load_ad_V1_VR18_code[] = { + 0x8d, 0xb5, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR18,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR18 +{ + static const uint8 op_load_ad_V2_VR18_code[] = { + 0x8d, 0xbd, 0xb0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR18_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR19 +{ + static const uint8 op_load_ad_VD_VR19_code[] = { + 0x8d, 0x85, 0xc0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR19_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR19 +{ + static const uint8 op_load_ad_V0_VR19_code[] = { + 0x8d, 0x9d, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR19 +{ + static const uint8 op_load_ad_V1_VR19_code[] = { + 0x8d, 0xb5, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR19,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR19 +{ + static const uint8 op_load_ad_V2_VR19_code[] = { + 0x8d, 0xbd, 0xc0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR19_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR20 +{ + static const uint8 op_load_ad_VD_VR20_code[] = { + 0x8d, 0x85, 0xd0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR20_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR20 +{ + static const uint8 op_load_ad_V0_VR20_code[] = { + 0x8d, 0x9d, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR20 +{ + static const uint8 op_load_ad_V1_VR20_code[] = { + 0x8d, 0xb5, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR20,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR20 +{ + static const uint8 op_load_ad_V2_VR20_code[] = { + 0x8d, 0xbd, 0xd0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR20_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR21 +{ + static const uint8 op_load_ad_VD_VR21_code[] = { + 0x8d, 0x85, 0xe0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR21_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR21 +{ + static const uint8 op_load_ad_V0_VR21_code[] = { + 0x8d, 0x9d, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR21 +{ + static const uint8 op_load_ad_V1_VR21_code[] = { + 0x8d, 0xb5, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR21,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR21 +{ + static const uint8 op_load_ad_V2_VR21_code[] = { + 0x8d, 0xbd, 0xe0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR21_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR22 +{ + static const uint8 op_load_ad_VD_VR22_code[] = { + 0x8d, 0x85, 0xf0, 0x02, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR22_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR22 +{ + static const uint8 op_load_ad_V0_VR22_code[] = { + 0x8d, 0x9d, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR22 +{ + static const uint8 op_load_ad_V1_VR22_code[] = { + 0x8d, 0xb5, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR22,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR22 +{ + static const uint8 op_load_ad_V2_VR22_code[] = { + 0x8d, 0xbd, 0xf0, 0x02, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR22_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR23 +{ + static const uint8 op_load_ad_VD_VR23_code[] = { + 0x8d, 0x85, 0x00, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR23_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR23 +{ + static const uint8 op_load_ad_V0_VR23_code[] = { + 0x8d, 0x9d, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR23 +{ + static const uint8 op_load_ad_V1_VR23_code[] = { + 0x8d, 0xb5, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR23,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR23 +{ + static const uint8 op_load_ad_V2_VR23_code[] = { + 0x8d, 0xbd, 0x00, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR23_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR24 +{ + static const uint8 op_load_ad_VD_VR24_code[] = { + 0x8d, 0x85, 0x10, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR24_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR24 +{ + static const uint8 op_load_ad_V0_VR24_code[] = { + 0x8d, 0x9d, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR24 +{ + static const uint8 op_load_ad_V1_VR24_code[] = { + 0x8d, 0xb5, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR24,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR24 +{ + static const uint8 op_load_ad_V2_VR24_code[] = { + 0x8d, 0xbd, 0x10, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR24_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR25 +{ + static const uint8 op_load_ad_VD_VR25_code[] = { + 0x8d, 0x85, 0x20, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR25_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR25 +{ + static const uint8 op_load_ad_V0_VR25_code[] = { + 0x8d, 0x9d, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR25 +{ + static const uint8 op_load_ad_V1_VR25_code[] = { + 0x8d, 0xb5, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR25,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR25 +{ + static const uint8 op_load_ad_V2_VR25_code[] = { + 0x8d, 0xbd, 0x20, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR25_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR26 +{ + static const uint8 op_load_ad_VD_VR26_code[] = { + 0x8d, 0x85, 0x30, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR26_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR26 +{ + static const uint8 op_load_ad_V0_VR26_code[] = { + 0x8d, 0x9d, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR26 +{ + static const uint8 op_load_ad_V1_VR26_code[] = { + 0x8d, 0xb5, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR26,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR26 +{ + static const uint8 op_load_ad_V2_VR26_code[] = { + 0x8d, 0xbd, 0x30, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR26_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR27 +{ + static const uint8 op_load_ad_VD_VR27_code[] = { + 0x8d, 0x85, 0x40, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR27_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR27 +{ + static const uint8 op_load_ad_V0_VR27_code[] = { + 0x8d, 0x9d, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR27 +{ + static const uint8 op_load_ad_V1_VR27_code[] = { + 0x8d, 0xb5, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR27,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR27 +{ + static const uint8 op_load_ad_V2_VR27_code[] = { + 0x8d, 0xbd, 0x40, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR27_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR28 +{ + static const uint8 op_load_ad_VD_VR28_code[] = { + 0x8d, 0x85, 0x50, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR28_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR28 +{ + static const uint8 op_load_ad_V0_VR28_code[] = { + 0x8d, 0x9d, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR28 +{ + static const uint8 op_load_ad_V1_VR28_code[] = { + 0x8d, 0xb5, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR28,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR28 +{ + static const uint8 op_load_ad_V2_VR28_code[] = { + 0x8d, 0xbd, 0x50, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR28_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR29 +{ + static const uint8 op_load_ad_VD_VR29_code[] = { + 0x8d, 0x85, 0x60, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR29_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR29 +{ + static const uint8 op_load_ad_V0_VR29_code[] = { + 0x8d, 0x9d, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR29 +{ + static const uint8 op_load_ad_V1_VR29_code[] = { + 0x8d, 0xb5, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR29,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR29 +{ + static const uint8 op_load_ad_V2_VR29_code[] = { + 0x8d, 0xbd, 0x60, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR29_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR30 +{ + static const uint8 op_load_ad_VD_VR30_code[] = { + 0x8d, 0x85, 0x70, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR30_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR30 +{ + static const uint8 op_load_ad_V0_VR30_code[] = { + 0x8d, 0x9d, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR30 +{ + static const uint8 op_load_ad_V1_VR30_code[] = { + 0x8d, 0xb5, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR30,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR30 +{ + static const uint8 op_load_ad_V2_VR30_code[] = { + 0x8d, 0xbd, 0x70, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR30_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_VD_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_VD_VR31 +{ + static const uint8 op_load_ad_VD_VR31_code[] = { + 0x8d, 0x85, 0x80, 0x03, 0x00, 0x00, 0x89, 0x85, 0x3c, 0x08, 0x0e, 0x00 + }; + copy_block(op_load_ad_VD_VR31_code, 12); + inc_code_ptr(12); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V0_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V0_VR31 +{ + static const uint8 op_load_ad_V0_VR31_code[] = { + 0x8d, 0x9d, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V0_VR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V1_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V1_VR31 +{ + static const uint8 op_load_ad_V1_VR31_code[] = { + 0x8d, 0xb5, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V1_VR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_ad_V2_VR31,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_ad_V2_VR31 +{ + static const uint8 op_load_ad_V2_VR31_code[] = { + 0x8d, 0xbd, 0x80, 0x03, 0x00, 0x00 + }; + copy_block(op_load_ad_V2_VR31_code, 6); + inc_code_ptr(6); +} +#endif + +DEFINE_GEN(gen_op_load_word_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_word_VD_T0 +{ + static const uint8 op_load_word_VD_T0_code[] = { + 0x89, 0xd8, 0x89, 0xda, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0xc1, 0xea, + 0x02, 0x83, 0xe0, 0xfc, 0x83, 0xe2, 0x03, 0x8b, 0x80, 0x00, 0x00, 0x00, + 0x11, 0x0f, 0xc8, 0x89, 0x04, 0x91 + }; + copy_block(op_load_word_VD_T0_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_store_word_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_word_VD_T0 +{ + static const uint8 op_store_word_VD_T0_code[] = { + 0x89, 0xd8, 0x8b, 0x95, 0x3c, 0x08, 0x0e, 0x00, 0x89, 0xd9, 0xc1, 0xe8, + 0x02, 0x83, 0xe1, 0xfc, 0x83, 0xe0, 0x03, 0x8b, 0x04, 0x82, 0x0f, 0xc8, + 0x89, 0x81, 0x00, 0x00, 0x00, 0x11 + }; + copy_block(op_store_word_VD_T0_code, 30); + inc_code_ptr(30); +} +#endif + +DEFINE_GEN(gen_op_load_vect_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_load_vect_VD_T0 +{ + static const uint8 op_load_vect_VD_T0_code[] = { + 0x89, 0xda, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x83, 0xe2, 0xf0, 0x8b, + 0x82, 0x00, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x01, 0x8b, 0x8d, 0x3c, + 0x08, 0x0e, 0x00, 0x8b, 0x82, 0x04, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, + 0x41, 0x04, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x8b, 0x82, 0x08, 0x00, + 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x41, 0x08, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, + 0x00, 0x8b, 0x82, 0x0c, 0x00, 0x00, 0x11, 0x0f, 0xc8, 0x89, 0x41, 0x0c + }; + copy_block(op_load_vect_VD_T0_code, 72); + inc_code_ptr(72); +} +#endif + +DEFINE_GEN(gen_op_store_vect_VD_T0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_vect_VD_T0 +{ + static const uint8 op_store_vect_VD_T0_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x89, 0xda, 0x83, 0xe2, 0xf0, 0x8b, + 0x00, 0x0f, 0xc8, 0x89, 0x82, 0x00, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x3c, + 0x08, 0x0e, 0x00, 0x8b, 0x40, 0x04, 0x0f, 0xc8, 0x89, 0x82, 0x04, 0x00, + 0x00, 0x11, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x8b, 0x40, 0x08, 0x0f, + 0xc8, 0x89, 0x82, 0x08, 0x00, 0x00, 0x11, 0x8b, 0x85, 0x3c, 0x08, 0x0e, + 0x00, 0x8b, 0x40, 0x0c, 0x0f, 0xc8, 0x89, 0x82, 0x0c, 0x00, 0x00, 0x11 + }; + copy_block(op_store_vect_VD_T0_code, 72); + inc_code_ptr(72); +} +#endif + +DEFINE_GEN(gen_op_record_cr6_VD,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_record_cr6_VD +{ + static const uint8 op_record_cr6_VD_code[] = { + 0x83, 0xec, 0x04, 0x8b, 0x95, 0x3c, 0x08, 0x0e, 0x00, 0xc7, 0x04, 0x24, + 0x00, 0x00, 0x00, 0x00, 0x8b, 0x0a, 0x8b, 0x42, 0x04, 0x21, 0xc8, 0x8b, + 0x4a, 0x08, 0x21, 0xc8, 0x23, 0x42, 0x0c, 0x8d, 0x8d, 0x3c, 0x08, 0x0e, + 0x00, 0x40, 0x75, 0x09, 0xc7, 0x04, 0x24, 0x08, 0x00, 0x00, 0x00, 0xeb, + 0x1f, 0x8b, 0x11, 0x8b, 0x0a, 0x8b, 0x42, 0x04, 0x09, 0xc8, 0x8b, 0x4a, + 0x08, 0x09, 0xc8, 0x0b, 0x42, 0x0c, 0x75, 0x0c, 0xc7, 0x04, 0x24, 0x02, + 0x00, 0x00, 0x00, 0x90, 0x8d, 0x74, 0x26, 0x00, 0xc1, 0x24, 0x24, 0x04, + 0x8b, 0x85, 0x90, 0x03, 0x00, 0x00, 0x8b, 0x0c, 0x24, 0x25, 0x0f, 0xff, + 0xff, 0xff, 0x09, 0xc8, 0x89, 0x85, 0x90, 0x03, 0x00, 0x00, 0x58 + }; + copy_block(op_record_cr6_VD_code, 107); + inc_code_ptr(107); +} +#endif + +DEFINE_GEN(gen_op_mfvscr_VD,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mfvscr_VD +{ + static const uint8 op_mfvscr_VD_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xc7, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xc7, 0x40, 0x04, 0x00, 0x00, 0x00, + 0x00, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xc7, 0x40, 0x08, 0x00, 0x00, + 0x00, 0x00, 0x8b, 0x95, 0x3c, 0x08, 0x0e, 0x00, 0x8b, 0x85, 0x98, 0x03, + 0x00, 0x00, 0x89, 0x42, 0x0c + }; + copy_block(op_mfvscr_VD_code, 53); + inc_code_ptr(53); +} +#endif + +DEFINE_GEN(gen_op_mtvscr_V0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mtvscr_V0 +{ + static const uint8 op_mtvscr_V0_code[] = { + 0x8b, 0x43, 0x0c, 0x89, 0x85, 0x98, 0x03, 0x00, 0x00 + }; + copy_block(op_mtvscr_V0_code, 9); + inc_code_ptr(9); +} +#endif + +DEFINE_GEN(gen_op_emms,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_emms +{ + static const uint8 op_emms_code[] = { + 0x0f, 0x77 + }; + copy_block(op_emms_code, 2); + inc_code_ptr(2); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequb,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequb +{ + static const uint8 op_mmx_vcmpequb_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x74, 0x06, 0x0f, 0x74, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpequb_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequh +{ + static const uint8 op_mmx_vcmpequh_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x75, 0x06, 0x0f, 0x75, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpequh_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpequw,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpequw +{ + static const uint8 op_mmx_vcmpequw_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x76, 0x06, 0x0f, 0x76, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpequw_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsb,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsb +{ + static const uint8 op_mmx_vcmpgtsb_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x64, 0x06, 0x0f, 0x64, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpgtsb_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsh +{ + static const uint8 op_mmx_vcmpgtsh_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x65, 0x06, 0x0f, 0x65, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpgtsh_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vcmpgtsw,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vcmpgtsw +{ + static const uint8 op_mmx_vcmpgtsw_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0x66, 0x06, 0x0f, 0x66, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vcmpgtsw_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vaddubm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vaddubm +{ + static const uint8 op_mmx_vaddubm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xfc, 0x06, 0x0f, 0xfc, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vaddubm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vadduhm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vadduhm +{ + static const uint8 op_mmx_vadduhm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xfd, 0x06, 0x0f, 0xfd, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vadduhm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vadduwm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vadduwm +{ + static const uint8 op_mmx_vadduwm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xfe, 0x06, 0x0f, 0xfe, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vadduwm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsububm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsububm +{ + static const uint8 op_mmx_vsububm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xf8, 0x06, 0x0f, 0xf8, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vsububm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsubuhm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsubuhm +{ + static const uint8 op_mmx_vsubuhm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xf9, 0x06, 0x0f, 0xf9, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vsubuhm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vsubuwm,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vsubuwm +{ + static const uint8 op_mmx_vsubuwm_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xfa, 0x06, 0x0f, 0xfa, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vsubuwm_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vand,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vand +{ + static const uint8 op_mmx_vand_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xdb, 0x06, 0x0f, 0xdb, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vand_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vandc,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vandc +{ + static const uint8 op_mmx_vandc_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x06, 0x0f, 0x6f, 0x4e, + 0x08, 0x0f, 0xdf, 0x03, 0x0f, 0xdf, 0x4b, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vandc_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vor,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vor +{ + static const uint8 op_mmx_vor_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xeb, 0x06, 0x0f, 0xeb, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vor_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vxor,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vxor +{ + static const uint8 op_mmx_vxor_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xef, 0x06, 0x0f, 0xef, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vxor_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vmaxub,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vmaxub +{ + static const uint8 op_mmx_vmaxub_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xde, 0x06, 0x0f, 0xde, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vmaxub_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vminub,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vminub +{ + static const uint8 op_mmx_vminub_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xda, 0x06, 0x0f, 0xda, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vminub_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vmaxsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vmaxsh +{ + static const uint8 op_mmx_vmaxsh_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xee, 0x06, 0x0f, 0xee, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vmaxsh_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_mmx_vminsh,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_mmx_vminsh +{ + static const uint8 op_mmx_vminsh_code[] = { + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0x0f, 0x6f, 0x03, 0x0f, 0x6f, 0x4b, + 0x08, 0x0f, 0xea, 0x06, 0x0f, 0xea, 0x4e, 0x08, 0x0f, 0x7f, 0x00, 0x0f, + 0x7f, 0x48, 0x08 + }; + copy_block(op_mmx_vminsh_code, 27); + inc_code_ptr(27); +} +#endif + +DEFINE_GEN(gen_op_store_T0_XER,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_store_T0_XER +{ + static const uint8 op_store_T0_XER_code[] = { + 0x83, 0xec, 0x04, 0x8d, 0x85, 0x94, 0x03, 0x00, 0x00, 0x89, 0xda, 0x89, + 0x04, 0x24, 0x89, 0xd8, 0xc1, 0xe8, 0x1f, 0x88, 0x85, 0x94, 0x03, 0x00, + 0x00, 0x8b, 0x0c, 0x24, 0x89, 0xd8, 0xc1, 0xe8, 0x1e, 0x83, 0xe2, 0x7f, + 0x83, 0xe0, 0x01, 0x88, 0x41, 0x01, 0x89, 0xd8, 0xc1, 0xe8, 0x1d, 0x88, + 0x51, 0x03, 0x83, 0xe0, 0x01, 0x88, 0x41, 0x02, 0x58 + }; + copy_block(op_store_T0_XER_code, 57); + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_jump_next_A0,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_jump_next_A0 +{ + static const uint8 op_jump_next_A0_code[] = { + 0x8b, 0x95, 0xac, 0x03, 0x00, 0x00, 0x89, 0xd8, 0x39, 0x13, 0x74, 0x24, + 0x89, 0xd0, 0xc1, 0xe8, 0x02, 0x25, 0xff, 0x7f, 0x00, 0x00, 0x8b, 0x84, + 0x85, 0xfc, 0x07, 0x0c, 0x00, 0x85, 0xc0, 0x74, 0x04, 0x39, 0x10, 0x74, + 0x02, 0x31, 0xc0, 0x85, 0xc0, 0x74, 0x08, 0x90, 0x8d, 0x74, 0x26, 0x00, + 0xff, 0x60, 0x40 + }; + copy_block(op_jump_next_A0_code, 51); + inc_code_ptr(51); +} +#endif + +DEFINE_GEN(gen_op_vand_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vand_VD_V0_V1 +{ + static const uint8 op_vand_VD_V0_V1_code[] = { + 0x8b, 0x16, 0x8b, 0x03, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x21, 0xd0, + 0x8b, 0x53, 0x04, 0x23, 0x56, 0x04, 0x89, 0x01, 0x89, 0x51, 0x04, 0x8b, + 0x56, 0x08, 0x8b, 0x43, 0x08, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x21, + 0xd0, 0x8b, 0x53, 0x0c, 0x23, 0x56, 0x0c, 0x89, 0x41, 0x08, 0x89, 0x51, + 0x0c + }; + copy_block(op_vand_VD_V0_V1_code, 49); + inc_code_ptr(49); +} +#endif + +DEFINE_GEN(gen_op_vandc_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vandc_VD_V0_V1 +{ + static const uint8 op_vandc_VD_V0_V1_code[] = { + 0x8b, 0x06, 0x8b, 0x56, 0x04, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0xf7, + 0xd0, 0xf7, 0xd2, 0x23, 0x03, 0x23, 0x53, 0x04, 0x89, 0x01, 0x89, 0x51, + 0x04, 0x8b, 0x46, 0x08, 0x8b, 0x56, 0x0c, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, + 0x00, 0xf7, 0xd0, 0xf7, 0xd2, 0x23, 0x43, 0x08, 0x23, 0x53, 0x0c, 0x89, + 0x41, 0x08, 0x89, 0x51, 0x0c + }; + copy_block(op_vandc_VD_V0_V1_code, 53); + inc_code_ptr(53); +} +#endif + +DEFINE_GEN(gen_op_vnor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vnor_VD_V0_V1 +{ + static const uint8 op_vnor_VD_V0_V1_code[] = { + 0x8b, 0x16, 0x8b, 0x03, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x09, 0xd0, + 0x8b, 0x53, 0x04, 0xf7, 0xd0, 0x0b, 0x56, 0x04, 0x89, 0x01, 0xf7, 0xd2, + 0x89, 0x51, 0x04, 0x8b, 0x56, 0x08, 0x8b, 0x43, 0x08, 0x8b, 0x8d, 0x3c, + 0x08, 0x0e, 0x00, 0x09, 0xd0, 0x8b, 0x53, 0x0c, 0x0b, 0x56, 0x0c, 0xf7, + 0xd0, 0x89, 0x41, 0x08, 0xf7, 0xd2, 0x89, 0x51, 0x0c + }; + copy_block(op_vnor_VD_V0_V1_code, 57); + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_vor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vor_VD_V0_V1 +{ + static const uint8 op_vor_VD_V0_V1_code[] = { + 0x8b, 0x16, 0x8b, 0x03, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x09, 0xd0, + 0x8b, 0x53, 0x04, 0x0b, 0x56, 0x04, 0x89, 0x01, 0x89, 0x51, 0x04, 0x8b, + 0x56, 0x08, 0x8b, 0x43, 0x08, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x09, + 0xd0, 0x8b, 0x53, 0x0c, 0x0b, 0x56, 0x0c, 0x89, 0x41, 0x08, 0x89, 0x51, + 0x0c + }; + copy_block(op_vor_VD_V0_V1_code, 49); + inc_code_ptr(49); +} +#endif + +DEFINE_GEN(gen_op_vxor_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vxor_VD_V0_V1 +{ + static const uint8 op_vxor_VD_V0_V1_code[] = { + 0x8b, 0x16, 0x8b, 0x03, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x31, 0xd0, + 0x8b, 0x53, 0x04, 0x33, 0x56, 0x04, 0x89, 0x01, 0x89, 0x51, 0x04, 0x8b, + 0x56, 0x08, 0x8b, 0x43, 0x08, 0x8b, 0x8d, 0x3c, 0x08, 0x0e, 0x00, 0x31, + 0xd0, 0x8b, 0x53, 0x0c, 0x33, 0x56, 0x0c, 0x89, 0x41, 0x08, 0x89, 0x51, + 0x0c + }; + copy_block(op_vxor_VD_V0_V1_code, 49); + inc_code_ptr(49); +} +#endif + +DEFINE_GEN(gen_op_vaddfp_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vaddfp_VD_V0_V1 +{ + static const uint8 op_vaddfp_VD_V0_V1_code[] = { + 0xd9, 0x06, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd8, 0x03, 0xd9, 0x18, + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x46, 0x04, 0xd8, 0x43, 0x04, + 0xd9, 0x58, 0x04, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x46, 0x08, + 0xd8, 0x43, 0x08, 0xd9, 0x58, 0x08, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, + 0xd9, 0x46, 0x0c, 0xd8, 0x43, 0x0c, 0xd9, 0x58, 0x0c + }; + copy_block(op_vaddfp_VD_V0_V1_code, 57); + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_vsubfp_VD_V0_V1,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vsubfp_VD_V0_V1 +{ + static const uint8 op_vsubfp_VD_V0_V1_code[] = { + 0xd9, 0x06, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd8, 0x2b, 0xd9, 0x18, + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x46, 0x04, 0xd8, 0x6b, 0x04, + 0xd9, 0x58, 0x04, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x46, 0x08, + 0xd8, 0x6b, 0x08, 0xd9, 0x58, 0x08, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, + 0xd9, 0x46, 0x0c, 0xd8, 0x6b, 0x0c, 0xd9, 0x58, 0x0c + }; + copy_block(op_vsubfp_VD_V0_V1_code, 57); + inc_code_ptr(57); +} +#endif + +DEFINE_GEN(gen_op_vmaddfp_VD_V0_V1_V2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vmaddfp_VD_V0_V1_V2 +{ + static const uint8 op_vmaddfp_VD_V0_V1_V2_code[] = { + 0xd9, 0x07, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd8, 0x0b, 0xd8, 0x06, + 0xd9, 0x18, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x47, 0x04, 0xd8, + 0x4b, 0x04, 0xd8, 0x46, 0x04, 0xd9, 0x58, 0x04, 0x8b, 0x85, 0x3c, 0x08, + 0x0e, 0x00, 0xd9, 0x47, 0x08, 0xd8, 0x4b, 0x08, 0xd8, 0x46, 0x08, 0xd9, + 0x58, 0x08, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x47, 0x0c, 0xd8, + 0x4b, 0x0c, 0xd8, 0x46, 0x0c, 0xd9, 0x58, 0x0c + }; + copy_block(op_vmaddfp_VD_V0_V1_V2_code, 68); + inc_code_ptr(68); +} +#endif + +DEFINE_GEN(gen_op_vnmsubfp_VD_V0_V1_V2,void,(void)) +#ifdef DYNGEN_IMPL +#define HAVE_gen_op_vnmsubfp_VD_V0_V1_V2 +{ + static const uint8 op_vnmsubfp_VD_V0_V1_V2_code[] = { + 0xd9, 0x07, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd8, 0x0b, 0xd8, 0x26, + 0xd9, 0xe0, 0xd9, 0x18, 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x47, + 0x04, 0xd8, 0x4b, 0x04, 0xd8, 0x66, 0x04, 0xd9, 0xe0, 0xd9, 0x58, 0x04, + 0x8b, 0x85, 0x3c, 0x08, 0x0e, 0x00, 0xd9, 0x47, 0x08, 0xd8, 0x4b, 0x08, + 0xd8, 0x66, 0x08, 0xd9, 0xe0, 0xd9, 0x58, 0x08, 0x8b, 0x85, 0x3c, 0x08, + 0x0e, 0x00, 0xd9, 0x47, 0x0c, 0xd8, 0x4b, 0x0c, 0xd8, 0x66, 0x0c, 0xd9, + 0xe0, 0xd9, 0x58, 0x0c + }; + copy_block(op_vnmsubfp_VD_V0_V1_V2_code, 76); + inc_code_ptr(76); +} +#endif + +#undef DEFINE_CST +#undef DEFINE_GEN From d936e9938d79cc1bac7e4154bb942443dab4a1a1 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 17:45:38 -0700 Subject: [PATCH 347/534] SS: Fix JIT on minwg32 - add wrappers with default calling convention for powerpc_cpu member functions used through nv_mem_fun ptr() ** explicit wrappers for member functions that were used explicitly ** dynamic wrapper generator in nv_mem_fun1_t for member functions used dynamically via the instruction table - add missing direct addressing (non-zero constant offset to Mac memory) support in lvx and stvx implementations - fix mismatched parameter lists between powerpc_jit member functions and the calls they get through the jit_info table to fix problems at -O2 --- SheepShaver/src/kpx_cpu/include/nvmemfun.hpp | 118 +++++++++++++++++- SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 25 +++- .../src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp | 17 ++- .../src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp | 4 + .../src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp | 43 ++++--- .../src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp | 6 +- .../src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp | 37 +++++- 7 files changed, 218 insertions(+), 32 deletions(-) diff --git a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp b/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp index 830b8ecde..e5df5dabb 100644 --- a/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp +++ b/SheepShaver/src/kpx_cpu/include/nvmemfun.hpp @@ -23,6 +23,10 @@ #include +#ifdef __MINGW32__ +#include "vm_alloc.h" +#endif + #if defined __GNUC__ #define HAVE_FAST_NV_MEM_FUN 1 #define MEM_FUN_WORDS 2 @@ -91,11 +95,123 @@ template< class R, class T, class A > class nv_mem_fun1_t : public std::binary_function { typedef R (T::*pmf_t)(A); typedef R (* PF_CONVENTION pf_t)(T *, A x); +#ifdef __MINGW32__ + typedef R (* default_call_conv_pf_t)(T *, A x); +#endif pf_t pf; public: - nv_mem_fun1_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) {} + nv_mem_fun1_t(pmf_t pmf) : pf(nv_mem_fun_of(pmf)) { + #ifdef __MINGW32__ + init_func(); + #endif + } R operator()(T *p, A x) const { return (*pf)(p, x); } + + #ifdef __MINGW32__ + + #define NVMEMFUN_THUNK_DEBUG 0 + +private: + #define DO_CONVENTION_CALL_PF_PLACEHOLDER 0x12345678 + + #define DO_CONVENTION_CALL_STATICS + static bool do_convention_call_init_done; + static int do_convention_call_code_len; + static int do_convention_call_pf_offset; + unsigned char * do_convention_call_instance_copy; + + static void init_do_convention_call() { + if (do_convention_call_init_done) return; + + const int max_code_bytes = 100; + const unsigned char last_code_byte_value = 0xc3; + + // figure out the size of the function + unsigned char * func_pos = (unsigned char *) &do_convention_call; + int i; + for (i = 0; i < max_code_bytes; i++) { + if (func_pos[i] == last_code_byte_value) { + break; + } + } + do_convention_call_code_len = i + 1; + + #if NVMEMFUN_THUNK_DEBUG + printf("do_convention_call func size %d ", do_convention_call_code_len); + #endif + + // find the position of the pf placeholder in the function + int placeholder_matches = 0; + for (i = 0; i < do_convention_call_code_len - 3; i++) { + pf_t * cur_ptr = (pf_t*)(func_pos + i); + if (*cur_ptr == (pf_t) DO_CONVENTION_CALL_PF_PLACEHOLDER) { + do_convention_call_pf_offset = i; + #if NVMEMFUN_THUNK_DEBUG + printf("ptr pos offset %x", (uint32)cur_ptr - (uint32)func_pos); + #endif + ++placeholder_matches; + } + } + + #if NVMEMFUN_THUNK_DEBUG + printf("\n"); + fflush(stdout); + #endif + + assert(placeholder_matches == 1); + + do_convention_call_init_done = true; + } + + void init_func() { + if (!do_convention_call_init_done) { + init_do_convention_call(); + } + + // copy do_convention_call and patch in the address of pf + + do_convention_call_instance_copy = (unsigned char *) vm_acquire(do_convention_call_code_len); + // Thunk buffer needs to be around while default_call_conv_ptr() is still in use, + // longer than nv_mem_fun1_t lifetime + //FIXME track the lifetime of this + if (do_convention_call_instance_copy == NULL) return; + unsigned char * func_pos = (unsigned char *) &do_convention_call; + memcpy((void *)do_convention_call_instance_copy, func_pos, do_convention_call_code_len); + + // replace byte sequence in buf copy + *(pf_t*)(do_convention_call_instance_copy + do_convention_call_pf_offset) = pf; + + #if NVMEMFUN_THUNK_DEBUG + printf("patching do_convention_call to %x; func size %d ", do_convention_call_instance_copy, do_convention_call_code_len); + for (int i = 0 ; i < do_convention_call_code_len; i ++) { + printf("%02x ", do_convention_call_instance_copy[i]); + } + printf("\n"); + fflush(stdout); + #endif + + vm_protect(do_convention_call_instance_copy, do_convention_call_code_len, VM_PAGE_READ | VM_PAGE_EXECUTE); + } + + // Cheesy thunk solution to adapt the calling convention: + // do_convention_call accepts the default calling convention and calls pf with PF_CONVENTION + // Each instance makes its own copy of do_convention_call in a buffer and patches the address of pf into it + static R do_convention_call(T * obj, A x) { + pf_t fn = (pf_t) DO_CONVENTION_CALL_PF_PLACEHOLDER; + return (*fn)(obj, x); + } + +public: + + default_call_conv_pf_t default_call_conv_ptr() const { return (default_call_conv_pf_t) do_convention_call_instance_copy; } + + #else + pf_t ptr() const { return pf; } + + #endif + + }; template< class R, class T, class A > diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp index 4f1910b24..9b6d87946 100755 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp @@ -151,9 +151,11 @@ class sheepshaver_cpu // Execute NATIVE_OP routine void execute_native_op(uint32 native_op); + static void call_execute_native_op(powerpc_cpu * cpu, uint32 native_op); // Execute EMUL_OP routine void execute_emul_op(uint32 emul_op); + static void call_execute_emul_op(powerpc_cpu * cpu, uint32 emul_op); // Execute 68k routine void execute_68k(uint32 entry, M68kRegisters *r); @@ -170,6 +172,7 @@ class sheepshaver_cpu #endif // Resource manager thunk void get_resource(uint32 old_get_resource); + static void call_get_resource(powerpc_cpu * cpu, uint32 old_get_resource); // Handle MacOS interrupt void interrupt(uint32 entry); @@ -218,6 +221,10 @@ typedef bit_field< 19, 19 > FN_field; typedef bit_field< 20, 25 > NATIVE_OP_field; typedef bit_field< 26, 31 > EMUL_OP_field; +void sheepshaver_cpu::call_execute_emul_op(powerpc_cpu * cpu, uint32 emul_op) { + static_cast(cpu)->execute_emul_op(emul_op); +} + // Execute EMUL_OP routine void sheepshaver_cpu::execute_emul_op(uint32 emul_op) { @@ -332,7 +339,7 @@ int sheepshaver_cpu::compile1(codegen_context_t & cg_context) }; uint32 old_get_resource = ReadMacInt32(get_resource_ptr[selector - NATIVE_GET_RESOURCE]); typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::get_resource).ptr(); + func_t func = &sheepshaver_cpu::call_get_resource; dg.gen_invoke_CPU_im(func, old_get_resource); status = COMPILE_CODE_OK; break; @@ -421,7 +428,7 @@ int sheepshaver_cpu::compile1(codegen_context_t & cg_context) // Invoke NativeOp handler if (!FN_field::test(opcode)) { typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_native_op).ptr(); + func_t func = &sheepshaver_cpu::call_execute_native_op; dg.gen_invoke_CPU_im(func, selector); cg_context.done_compile = false; status = COMPILE_CODE_OK; @@ -445,7 +452,7 @@ int sheepshaver_cpu::compile1(codegen_context_t & cg_context) #else // Invoke EmulOp handler typedef void (*func_t)(dyngen_cpu_base, uint32); - func_t func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_emul_op).ptr(); + func_t func = &sheepshaver_cpu::call_execute_emul_op; dg.gen_invoke_CPU_im(func, emul_op); cg_context.done_compile = false; status = COMPILE_CODE_OK; @@ -685,6 +692,10 @@ inline void sheepshaver_cpu::execute_ppc(uint32 entry) lr() = saved_lr; } +void sheepshaver_cpu::call_get_resource(powerpc_cpu * cpu, uint32 old_get_resource) { + static_cast(cpu)->get_resource(old_get_resource); +} + // Resource Manager thunk inline void sheepshaver_cpu::get_resource(uint32 old_get_resource) { @@ -897,14 +908,14 @@ void init_emul_op_trampolines(basic_dyngen & dg) // EmulOp emul_op_trampoline = dg.gen_start(); - func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_emul_op).ptr(); + func = &sheepshaver_cpu::call_execute_emul_op; dg.gen_invoke_CPU_T0(func); dg.gen_exec_return(); dg.gen_end(); // NativeOp native_op_trampoline = dg.gen_start(); - func = (func_t)nv_mem_fun(&sheepshaver_cpu::execute_native_op).ptr(); + func = &sheepshaver_cpu::call_execute_native_op; dg.gen_invoke_CPU_T0(func); dg.gen_exec_return(); dg.gen_end(); @@ -1030,6 +1041,10 @@ void HandleInterrupt(powerpc_registers *r) } } +void sheepshaver_cpu::call_execute_native_op(powerpc_cpu * cpu, uint32 selector) { + static_cast(cpu)->execute_native_op(selector); +} + // Execute NATIVE_OP routine void sheepshaver_cpu::execute_native_op(uint32 selector) { diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp index 4654a86af..eefa1f953 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp @@ -64,6 +64,12 @@ int register_info_compare(const void *e1, const void *e2) static int ppc_refcount = 0; +#ifdef DO_CONVENTION_CALL_STATICS +template<> bool nv_mem_fun1_t::do_convention_call_init_done = false; +template<> int nv_mem_fun1_t::do_convention_call_code_len = 0; +template<> int nv_mem_fun1_t::do_convention_call_pf_offset = 0; +#endif + void powerpc_cpu::set_register(int id, any_register const & value) { if (id >= powerpc_registers::GPR(0) && id <= powerpc_registers::GPR(31)) { @@ -542,7 +548,12 @@ bool powerpc_cpu::check_spcflags() } #if DYNGEN_DIRECT_BLOCK_CHAINING -void *powerpc_cpu::compile_chain_block(block_info *sbi) +void * powerpc_cpu::call_compile_chain_block(powerpc_cpu * the_cpu, block_info *sbi) +{ + return the_cpu->compile_chain_block(sbi); +} + +void * PF_CONVENTION powerpc_cpu::compile_chain_block(block_info *sbi) { // Block index is stuffed into the source basic block pointer, // which is aligned at least on 4-byte boundaries @@ -719,7 +730,11 @@ void powerpc_cpu::execute(uint32 entry) if (is_logging()) record_step(opcode); #endif +#ifdef __MINGW32__ + assert(ii->execute.default_call_conv_ptr() != 0); +#else assert(ii->execute.ptr() != 0); +#endif ii->execute(this, opcode); #if PPC_EXECUTE_DUMP_STATE if (dump_state) diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp index c418386ed..f1739a5f3 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.hpp @@ -371,8 +371,10 @@ class powerpc_cpu friend class powerpc_jit; powerpc_jit codegen; block_info *compile_block(uint32 entry); + static void call_do_record_step(powerpc_cpu * cpu, uint32 pc, uint32 opcode); #if DYNGEN_DIRECT_BLOCK_CHAINING void *compile_chain_block(block_info *sbi); + static void * call_compile_chain_block(powerpc_cpu * the_cpu, block_info *sbi); #endif #endif @@ -389,6 +391,7 @@ class powerpc_cpu // Instruction handlers void execute_nop(uint32 opcode); void execute_illegal(uint32 opcode); + static void call_execute_illegal(powerpc_cpu * cpu, uint32 opcode); template< class RA, class RB, class RC, class CA, class OE, class Rc > void execute_addition(uint32 opcode); template< class OP, class RD, class RA, class RB, class RC, class OE, class Rc > @@ -453,6 +456,7 @@ class powerpc_cpu void execute_icbi(uint32 opcode); void execute_isync(uint32 opcode); void execute_invalidate_cache_range(); + static void call_execute_invalidate_cache_range(powerpc_cpu * cpu); template< class RA, class RB > void execute_dcbz(uint32 opcode); template< bool SL > diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp index 4b294401e..57163a5bf 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp @@ -36,6 +36,11 @@ powerpc_jit::powerpc_jit(dyngen_cpu_base cpu) { } +// An operand that refers to an address relative to the emulated machine +static x86_memory_operand vm_memory_operand(int32 d, int b, int i = X86_NOREG, int s = 1) { + return x86_memory_operand(d + VMBaseDiff, b, i, s); +} + bool powerpc_jit::initialize(void) { if (!powerpc_dyngen::initialize()) @@ -239,21 +244,25 @@ bool powerpc_jit::initialize(void) // Dispatch mid-level code generators bool powerpc_jit::gen_vector_1(int mnemo, int vD) { + if (jit_info[mnemo]->handler == (gen_handler_t)&powerpc_jit::gen_not_available) return false; return (this->*((bool (powerpc_jit::*)(int, int))jit_info[mnemo]->handler))(mnemo, vD); } bool powerpc_jit::gen_vector_2(int mnemo, int vD, int vA, int vB) { + if (jit_info[mnemo]->handler == (gen_handler_t)&powerpc_jit::gen_not_available) return false; return (this->*((bool (powerpc_jit::*)(int, int, int, int))jit_info[mnemo]->handler))(mnemo, vD, vA, vB); } bool powerpc_jit::gen_vector_3(int mnemo, int vD, int vA, int vB, int vC) { + if (jit_info[mnemo]->handler == (gen_handler_t)&powerpc_jit::gen_not_available) return false; return (this->*((bool (powerpc_jit::*)(int, int, int, int, int))jit_info[mnemo]->handler))(mnemo, vD, vA, vB, vC); } bool powerpc_jit::gen_vector_compare(int mnemo, int vD, int vA, int vB, bool Rc) { + if (jit_info[mnemo]->handler == (gen_handler_t)&powerpc_jit::gen_not_available) return false; return (this->*((bool (powerpc_jit::*)(int, int, int, int, bool))jit_info[mnemo]->handler))(mnemo, vD, vA, vB, Rc); } @@ -395,8 +404,8 @@ bool powerpc_jit::gen_x86_lvx(int mnemo, int vD, int rA, int rB) gen_add_32(x86_memory_operand(xPPC_GPR(rA), REG_CPU_ID), REG_T0_ID); gen_and_32(x86_immediate_operand(-16), REG_T0_ID); #if SIZEOF_VOID_P == 8 - gen_mov_64(x86_memory_operand(0, REG_T0_ID), REG_T1_ID); - gen_mov_64(x86_memory_operand(8, REG_T0_ID), REG_T2_ID); + gen_mov_64(vm_memory_operand(0, REG_T0_ID), REG_T1_ID); + gen_mov_64(vm_memory_operand(8, REG_T0_ID), REG_T2_ID); gen_bswap_64(REG_T1_ID); gen_bswap_64(REG_T2_ID); gen_rol_64(x86_immediate_operand(32), REG_T1_ID); @@ -404,14 +413,14 @@ bool powerpc_jit::gen_x86_lvx(int mnemo, int vD, int rA, int rB) gen_mov_64(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 0, REG_CPU_ID)); gen_mov_64(REG_T2_ID, x86_memory_operand(xPPC_VR(vD) + 8, REG_CPU_ID)); #else - gen_mov_32(x86_memory_operand(0*4, REG_T0_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(1*4, REG_T0_ID), REG_T2_ID); + gen_mov_32(vm_memory_operand(0*4, REG_T0_ID), REG_T1_ID); + gen_mov_32(vm_memory_operand(1*4, REG_T0_ID), REG_T2_ID); gen_bswap_32(REG_T1_ID); gen_bswap_32(REG_T2_ID); gen_mov_32(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 0*4, REG_CPU_ID)); gen_mov_32(REG_T2_ID, x86_memory_operand(xPPC_VR(vD) + 1*4, REG_CPU_ID)); - gen_mov_32(x86_memory_operand(2*4, REG_T0_ID), REG_T1_ID); - gen_mov_32(x86_memory_operand(3*4, REG_T0_ID), REG_T2_ID); + gen_mov_32(vm_memory_operand(2*4, REG_T0_ID), REG_T1_ID); + gen_mov_32(vm_memory_operand(3*4, REG_T0_ID), REG_T2_ID); gen_bswap_32(REG_T1_ID); gen_bswap_32(REG_T2_ID); gen_mov_32(REG_T1_ID, x86_memory_operand(xPPC_VR(vD) + 2*4, REG_CPU_ID)); @@ -435,8 +444,8 @@ bool powerpc_jit::gen_x86_stvx(int mnemo, int vS, int rA, int rB) gen_and_32(x86_immediate_operand(-16), REG_T0_ID); gen_rol_64(x86_immediate_operand(32), REG_T1_ID); gen_rol_64(x86_immediate_operand(32), REG_T2_ID); - gen_mov_64(REG_T1_ID, x86_memory_operand(0, REG_T0_ID)); - gen_mov_64(REG_T2_ID, x86_memory_operand(8, REG_T0_ID)); + gen_mov_64(REG_T1_ID, vm_memory_operand(0, REG_T0_ID)); + gen_mov_64(REG_T2_ID, vm_memory_operand(8, REG_T0_ID)); #else gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 0*4, REG_CPU_ID), REG_T1_ID); gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 1*4, REG_CPU_ID), REG_T2_ID); @@ -445,14 +454,14 @@ bool powerpc_jit::gen_x86_stvx(int mnemo, int vS, int rA, int rB) gen_bswap_32(REG_T1_ID); gen_bswap_32(REG_T2_ID); gen_and_32(x86_immediate_operand(-16), REG_T0_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(0*4, REG_T0_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(1*4, REG_T0_ID)); + gen_mov_32(REG_T1_ID, vm_memory_operand(0*4, REG_T0_ID)); + gen_mov_32(REG_T2_ID, vm_memory_operand(1*4, REG_T0_ID)); gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 2*4, REG_CPU_ID), REG_T1_ID); gen_mov_32(x86_memory_operand(xPPC_VR(vS) + 3*4, REG_CPU_ID), REG_T2_ID); gen_bswap_32(REG_T1_ID); gen_bswap_32(REG_T2_ID); - gen_mov_32(REG_T1_ID, x86_memory_operand(2*4, REG_T0_ID)); - gen_mov_32(REG_T2_ID, x86_memory_operand(3*4, REG_T0_ID)); + gen_mov_32(REG_T1_ID, vm_memory_operand(2*4, REG_T0_ID)); + gen_mov_32(REG_T2_ID, vm_memory_operand(3*4, REG_T0_ID)); #endif return true; } @@ -667,7 +676,7 @@ void powerpc_jit::gen_sse2_vsplat(int vD, int rValue) } // vspltisb -bool powerpc_jit::gen_sse2_vspltisb(int mnemo, int vD, int SIMM) +bool powerpc_jit::gen_sse2_vspltisb(int mnemo, int vD, int SIMM, int unused) { switch (SIMM) { case 0: @@ -718,7 +727,7 @@ bool powerpc_jit::gen_sse2_vspltisb(int mnemo, int vD, int SIMM) } // vspltish -bool powerpc_jit::gen_sse2_vspltish(int mnemo, int vD, int SIMM) +bool powerpc_jit::gen_sse2_vspltish(int mnemo, int vD, int SIMM, int unused) { switch (SIMM) { case 0: @@ -764,7 +773,7 @@ bool powerpc_jit::gen_sse2_vspltish(int mnemo, int vD, int SIMM) } // vspltisw -bool powerpc_jit::gen_sse2_vspltisw(int mnemo, int vD, int SIMM) +bool powerpc_jit::gen_sse2_vspltisw(int mnemo, int vD, int SIMM, int unused) { switch (SIMM) { case 0: @@ -866,7 +875,7 @@ bool powerpc_jit::gen_ssse3_lvx(int mnemo, int vD, int rA, int rB) gen_and_32(x86_immediate_operand(-16), REG_T0_ID); x86_memory_operand vswapmask(gen_ssse3_vswap_mask(), X86_NOREG); - gen_movdqa(x86_memory_operand(0, REG_T0_ID), REG_V0_ID); + gen_movdqa(vm_memory_operand(0, REG_T0_ID), REG_V0_ID); gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, vswapmask, REG_V0_ID); gen_movdqa(REG_V0_ID, x86_memory_operand(xPPC_VR(vD), REG_CPU_ID)); return true; @@ -883,7 +892,7 @@ bool powerpc_jit::gen_ssse3_stvx(int mnemo, int vS, int rA, int rB) x86_memory_operand vswapmask(gen_ssse3_vswap_mask(), X86_NOREG); gen_movdqa(x86_memory_operand(xPPC_VR(vS), REG_CPU_ID), REG_V0_ID); gen_insn(X86_INSN_SSE_3P, X86_SSSE3_PSHUFB, vswapmask, REG_V0_ID); - gen_movdqa(REG_V0_ID, x86_memory_operand(0, REG_T0_ID)); + gen_movdqa(REG_V0_ID, vm_memory_operand(0, REG_T0_ID)); return true; } diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp index a8e563ae1..2117c5a71 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.hpp @@ -90,9 +90,9 @@ struct powerpc_jit bool gen_sse2_vsel(int mnemo, int vD, int vA, int vB, int vC); bool gen_sse2_vsldoi(int mnemo, int vD, int vA, int vB, int SH); void gen_sse2_vsplat(int vD, int rValue); - bool gen_sse2_vspltisb(int mnemo, int vD, int SIMM); - bool gen_sse2_vspltish(int mnemo, int vD, int SIMM); - bool gen_sse2_vspltisw(int mnemo, int vD, int SIMM); + bool gen_sse2_vspltisb(int mnemo, int vD, int SIMM, int unused); + bool gen_sse2_vspltish(int mnemo, int vD, int SIMM, int unused); + bool gen_sse2_vspltisw(int mnemo, int vD, int SIMM, int unused); bool gen_sse2_vspltb(int mnemo, int vD, int UIMM, int vB); bool gen_sse2_vsplth(int mnemo, int vD, int UIMM, int vB); bool gen_sse2_vspltw(int mnemo, int vD, int UIMM, int vB); diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp index 7d0231474..fe882373b 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-translate.cpp @@ -125,6 +125,22 @@ static void disasm_translation(uint32 src_addr, uint32 src_len, **/ #if PPC_ENABLE_JIT + +void +powerpc_cpu::call_do_record_step(powerpc_cpu * cpu, uint32 param1, uint32 param2) { + cpu->do_record_step(param1, param2); +} + +void +powerpc_cpu::call_execute_invalidate_cache_range(powerpc_cpu * cpu) { + cpu->execute_invalidate_cache_range(); +} + +void +powerpc_cpu::call_execute_illegal(powerpc_cpu * cpu, uint32 param1) { + cpu->execute_illegal(param1); +} + powerpc_cpu::block_info * powerpc_cpu::compile_block(uint32 entry_point) { @@ -169,7 +185,7 @@ powerpc_cpu::compile_block(uint32 entry_point) #if PPC_FLIGHT_RECORDER if (is_logging()) { typedef void (*func_t)(dyngen_cpu_base, uint32, uint32); - func_t func = (func_t)nv_mem_fun((execute_pmf)&powerpc_cpu::do_record_step).ptr(); + func_t func = &powerpc_cpu::call_do_record_step; dg.gen_invoke_CPU_im_im(func, dpc, opcode); } #endif @@ -1120,7 +1136,7 @@ powerpc_cpu::compile_block(uint32 entry_point) case PPC_I(ISYNC): // Instruction synchronize { typedef void (*func_t)(dyngen_cpu_base); - func_t func = (func_t)nv_mem_fun(&powerpc_cpu::execute_invalidate_cache_range).ptr(); + func_t func = &powerpc_cpu::call_execute_invalidate_cache_range; dg.gen_invoke_CPU(func); break; } @@ -1377,10 +1393,17 @@ powerpc_cpu::compile_block(uint32 entry_point) case PPC_I(STVEWX): case PPC_I(STVX): case PPC_I(STVXL): + { assert(vD_field::mask() == vS_field::mask()); assert(vA_field::mask() == rA_field::mask()); assert(vB_field::mask() == rB_field::mask()); - // fall-through + const int vD = vD_field::extract(opcode); + const int vA = vA_field::extract(opcode); + const int vB = vB_field::extract(opcode); + if (!dg.gen_vector_2(ii->mnemo, vD, vA, vB)) + goto do_generic; + break; + } case PPC_I(VCMPEQFP): case PPC_I(VCMPEQUB): case PPC_I(VCMPEQUH): @@ -1488,10 +1511,14 @@ powerpc_cpu::compile_block(uint32 entry_point) typedef void (*func_t)(dyngen_cpu_base, uint32); func_t func; do_generic: + #ifdef __MINGW32__ + func = (func_t)ii->execute.default_call_conv_ptr(); + #else func = (func_t)ii->execute.ptr(); + #endif goto do_invoke; do_illegal: - func = (func_t)nv_mem_fun(&powerpc_cpu::execute_illegal).ptr(); + func = &powerpc_cpu::call_execute_illegal; goto do_invoke; do_invoke: #if PPC_PROFILE_GENERIC_CALLS @@ -1554,7 +1581,7 @@ powerpc_cpu::compile_block(uint32 entry_point) // Generate backpatch trampolines if (use_direct_block_chaining) { typedef void *(*func_t)(dyngen_cpu_base); - func_t func = (func_t)nv_mem_fun(&powerpc_cpu::compile_chain_block).ptr(); + func_t func = (func_t)&powerpc_cpu::call_compile_chain_block; for (int i = 0; i < block_info::MAX_TARGETS; i++) { if (bi->li[i].jmp_pc != block_info::INVALID_PC) { uint8 *p = dg.gen_align(16); From 12f84691728d731e459cd0b9446cac691dfc01fd Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 18:21:36 -0700 Subject: [PATCH 348/534] fix clean of dyngen binary --- SheepShaver/src/Windows/Makefile.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index a18c9029c..cb7a06504 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -138,7 +138,7 @@ mostlyclean: clean: mostlyclean dyngenclean rm -f $(XPLATSRCS) dyngenclean: - rm -f dyngen basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc-execute-impl.cpp + rm -f $(DYNGEN) basic-dyngen-ops.hpp ppc-dyngen-ops.hpp ppc-execute-impl.cpp distclean: clean rm -rf $(OBJ_DIR) From 40cb4bf236a56328ee60978166334828ee726c12 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 18:46:40 -0700 Subject: [PATCH 349/534] implementing bswap_16 to avoid incorrect result from cygwin 1.7 gcc 3.4.4 built dyngen for lhz --- SheepShaver/src/Windows/sysdeps.h | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index 432b7e57f..0d73d2bd3 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -149,6 +149,19 @@ static inline uint32 do_opt_bswap_32(uint32 x) __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x)); return v; } + +#if defined(__CYGWIN__) || defined(__MINGW32__) + +#define opt_bswap_16 do_opt_bswap_16 +static inline uint16 do_opt_bswap_16(uint16 x) +{ + uint16 v; + __asm__ __volatile__ ("rolw $8, %0" : "=r" (v) : "0" (x)); + return v; +} + +#endif + #endif #endif From 2a6dc7e3288929e9652a3b3fedfcfbe0bd813ab0 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 18:47:02 -0700 Subject: [PATCH 350/534] clean up some warnings --- BasiliskII/src/slirp/slirp.c | 2 +- SheepShaver/src/include/ether_defs.h | 4 ++-- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp | 1 + SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp | 2 ++ 4 files changed, 6 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 0ecb09c4f..cd97e299d 100755 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -427,7 +427,7 @@ void slirp_select_poll(fd_set *readfds, fd_set *writefds, fd_set *xfds) /* Connected */ so->so_state &= ~SS_ISFCONNECTING; - ret = send(so->s, &ret, 0, 0); + ret = send(so->s, NULL, 0, 0); if (ret < 0) { /* XXXXX Must fix, zero bytes is a NOP */ if (errno == EAGAIN || errno == EWOULDBLOCK || diff --git a/SheepShaver/src/include/ether_defs.h b/SheepShaver/src/include/ether_defs.h index 390aee4cb..60468d86e 100644 --- a/SheepShaver/src/include/ether_defs.h +++ b/SheepShaver/src/include/ether_defs.h @@ -525,7 +525,7 @@ union DL_primitives { struct EnetPacketHeader { uint8 fDestAddr[6]; uint8 fSourceAddr[6]; - nw_uint16 fProto; + uint16 fProto; } PACKED__; struct T8022Header { @@ -548,7 +548,7 @@ struct T8022FullPacketHeader { struct T8022AddressStruct { uint8 fHWAddr[6]; - nw_uint16 fSAP; + uint16 fSAP; uint8 fSNAP[k8022SNAPLength]; } PACKED__; diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp index ec366e595..8e2ccac0f 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-execute.cpp @@ -90,6 +90,7 @@ static inline int ppc_to_native_rounding_mode(int round) case 2: return FE_UPWARD; case 3: return FE_DOWNWARD; } + return FE_TONEAREST; } /** diff --git a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp index d51a8db27..dc8a8d948 100644 --- a/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp +++ b/SheepShaver/src/kpx_cpu/src/mathlib/mathlib.cpp @@ -88,6 +88,7 @@ int mathlib_fpclassify (double x) int mathlib_fpclassifyl(long double x) { unimplemented("fpclassifyl"); + return -1; } @@ -114,6 +115,7 @@ int mathlib_signbit (double x) int mathlib_signbitl(long double x) { unimplemented("signbitl"); + return -1; } From 9dabd45086f6cf731015952536f1b9d702a4dfc9 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Mar 2020 19:37:58 -0700 Subject: [PATCH 351/534] bump dyngen output for updated bswap_16 --- .../basic-dyngen-ops.hpp | 73 ++++++++++--------- 1 file changed, 39 insertions(+), 34 deletions(-) diff --git a/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp index f244e88e0..de8b740f4 100644 --- a/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp +++ b/SheepShaver/src/Windows/cygwin_precompiled_dyngen/basic-dyngen-ops.hpp @@ -592,10 +592,10 @@ DEFINE_GEN(gen_op_bswap_16_T0,void,(void)) #define HAVE_gen_op_bswap_16_T0 { static const uint8 op_bswap_16_T0_code[] = { - 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + 0x0f, 0xb7, 0xc3, 0x66, 0xc1, 0xc0, 0x08, 0x0f, 0xb7, 0xd8 }; - copy_block(op_bswap_16_T0_code, 8); - inc_code_ptr(8); + copy_block(op_bswap_16_T0_code, 10); + inc_code_ptr(10); } #endif @@ -1085,10 +1085,11 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_0 { static const uint8 op_load_u16_T0_T1_0_code[] = { - 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, 0x0f, + 0xb7, 0xd8 }; - copy_block(op_load_u16_T0_T1_0_code, 12); - inc_code_ptr(12); + copy_block(op_load_u16_T0_T1_0_code, 14); + inc_code_ptr(14); } #endif @@ -1097,10 +1098,11 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_0,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_0 { static const uint8 op_load_s16_T0_T1_0_code[] = { - 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, 0xd8 + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, 0x0f, + 0xbf, 0xd8 }; - copy_block(op_load_s16_T0_T1_0_code, 12); - inc_code_ptr(12); + copy_block(op_load_s16_T0_T1_0_code, 14); + inc_code_ptr(14); } #endif @@ -1109,10 +1111,11 @@ DEFINE_GEN(gen_op_store_16_T0_T1_0,void,(void)) #define HAVE_gen_op_store_16_T0_T1_0 { static const uint8 op_store_16_T0_T1_0_code[] = { - 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, 0x89, 0x86, 0x00, 0x00, 0x00, 0x11 + 0x0f, 0xb7, 0xc3, 0x66, 0xc1, 0xc0, 0x08, 0x66, 0x89, 0x86, 0x00, 0x00, + 0x00, 0x11 }; - copy_block(op_store_16_T0_T1_0_code, 12); - inc_code_ptr(12); + copy_block(op_store_16_T0_T1_0_code, 14); + inc_code_ptr(14); } #endif @@ -1121,11 +1124,12 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_u16_T0_T1_im { static const uint8 op_load_u16_T0_T1_im_code[] = { - 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, 0xd8 + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, 0x0f, + 0xb7, 0xd8 }; - copy_block(op_load_u16_T0_T1_im_code, 12); + copy_block(op_load_u16_T0_T1_im_code, 14); *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; - inc_code_ptr(12); + inc_code_ptr(14); } #endif @@ -1134,11 +1138,12 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_load_s16_T0_T1_im { static const uint8 op_load_s16_T0_T1_im_code[] = { - 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, 0xd8 + 0x0f, 0xb7, 0x86, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, 0x0f, + 0xbf, 0xd8 }; - copy_block(op_load_s16_T0_T1_im_code, 12); + copy_block(op_load_s16_T0_T1_im_code, 14); *(uint32_t *)(code_ptr() + 3) = param1 + 285212672; - inc_code_ptr(12); + inc_code_ptr(14); } #endif @@ -1147,12 +1152,12 @@ DEFINE_GEN(gen_op_store_16_T0_T1_im,void,(long param1)) #define HAVE_gen_op_store_16_T0_T1_im { static const uint8 op_store_16_T0_T1_im_code[] = { - 0x8d, 0x96, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, - 0x89, 0x82, 0x00, 0x00, 0x00, 0x11 + 0x8d, 0x96, 0x00, 0x00, 0x00, 0x00, 0x0f, 0xb7, 0xc3, 0x66, 0xc1, 0xc0, + 0x08, 0x66, 0x89, 0x82, 0x00, 0x00, 0x00, 0x11 }; - copy_block(op_store_16_T0_T1_im_code, 18); + copy_block(op_store_16_T0_T1_im_code, 20); *(uint32_t *)(code_ptr() + 2) = param1 + 0; - inc_code_ptr(18); + inc_code_ptr(20); } #endif @@ -1161,11 +1166,11 @@ DEFINE_GEN(gen_op_load_u16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_u16_T0_T1_T2 { static const uint8 op_load_u16_T0_T1_T2_code[] = { - 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xb7, - 0xd8 + 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, + 0x0f, 0xb7, 0xd8 }; - copy_block(op_load_u16_T0_T1_T2_code, 13); - inc_code_ptr(13); + copy_block(op_load_u16_T0_T1_T2_code, 15); + inc_code_ptr(15); } #endif @@ -1174,11 +1179,11 @@ DEFINE_GEN(gen_op_load_s16_T0_T1_T2,void,(void)) #define HAVE_gen_op_load_s16_T0_T1_T2 { static const uint8 op_load_s16_T0_T1_T2_code[] = { - 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x86, 0xe0, 0x0f, 0xbf, - 0xd8 + 0x0f, 0xb7, 0x84, 0x3e, 0x00, 0x00, 0x00, 0x11, 0x66, 0xc1, 0xc0, 0x08, + 0x0f, 0xbf, 0xd8 }; - copy_block(op_load_s16_T0_T1_T2_code, 13); - inc_code_ptr(13); + copy_block(op_load_s16_T0_T1_T2_code, 15); + inc_code_ptr(15); } #endif @@ -1187,11 +1192,11 @@ DEFINE_GEN(gen_op_store_16_T0_T1_T2,void,(void)) #define HAVE_gen_op_store_16_T0_T1_T2 { static const uint8 op_store_16_T0_T1_T2_code[] = { - 0x8d, 0x14, 0x3e, 0x0f, 0xb7, 0xc3, 0x86, 0xe0, 0x66, 0x89, 0x82, 0x00, - 0x00, 0x00, 0x11 + 0x8d, 0x14, 0x3e, 0x0f, 0xb7, 0xc3, 0x66, 0xc1, 0xc0, 0x08, 0x66, 0x89, + 0x82, 0x00, 0x00, 0x00, 0x11 }; - copy_block(op_store_16_T0_T1_T2_code, 15); - inc_code_ptr(15); + copy_block(op_store_16_T0_T1_T2_code, 17); + inc_code_ptr(17); } #endif From 6fe0d3ab7cf90bb36b2573050ca6e54fc00e6284 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 18 Mar 2020 15:27:54 +0900 Subject: [PATCH 352/534] SS Windows: enabled JIT compiler by default --- SheepShaver/src/Windows/configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 12d75230c..67d4adf23 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -12,7 +12,7 @@ AC_CANONICAL_HOST AC_CANONICAL_TARGET dnl Options. -AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=no]) +AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) From c4956c40f8cb8f94a0f38c05e5aa74f966b7c71a Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Wed, 18 Mar 2020 15:29:20 +0900 Subject: [PATCH 353/534] Update README.md --- README.md | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/README.md b/README.md index 60804e9dd..da1c66204 100644 --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ MinGW 32-bit JIT ``` macOS 64-bit JIT Linux 32-bit JIT -MinGW 32-bit --- +MinGW 32-bit JIT ``` ### How To Build These builds need to be installed SDL2.0.10+ framework/library. @@ -26,7 +26,7 @@ $ cd macemu/BasiliskII/src/Unix $ ./autogen.sh $ make ``` -##### MinGW32/MSYS +##### MinGW32/MSYS2 ``` $ cd macemu/BasiliskII/src/Windows $ ../Unix/autogen.sh @@ -46,7 +46,7 @@ $ cd macemu/SheepShaver/src/Unix $ ./autogen.sh $ make ``` -##### MinGW32/MSYS +##### MinGW32/MSYS2 ``` $ cd macemu/SheepShaver $ make links From ecef51bc4791a262fced54780b52a1477c3a9ae1 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 19 Mar 2020 11:10:02 +0900 Subject: [PATCH 354/534] fixed keycodes file name (SS) fixed capslock (Windows) --- BasiliskII/src/SDL/video_sdl2.cpp | 24 +++++++++++++++++++++--- 1 file changed, 21 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 0532e7b4b..7f27557d2 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -90,11 +90,17 @@ enum { static int display_type = DISPLAY_WINDOW; // See enum above #endif +#ifdef SHEEPSHAVER +#define PROGRAM_NAME "SheepShaver" +#else +#define PROGRAM_NAME "BasiliskII" +#endif + // Constants #ifdef WIN32 -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +const char KEYCODE_FILE_NAME[] = PROGRAM_NAME "_keycodes"; #elif __MACOSX__ -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +const char KEYCODE_FILE_NAME[] = PROGRAM_NAME "_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; #endif @@ -741,7 +747,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags */ if (!sdl_window) { sdl_window = SDL_CreateWindow( - "Basilisk II", + PROGRAM_NAME, SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, window_width, @@ -2198,7 +2204,14 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { +#ifdef WIN32 + if (code == 0x39) + (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); + else + ADBKeyDown(code); +#else ADBKeyDown(code); +#endif if (code == 0x36) ctrl_down = true; #ifdef __APPLE__ @@ -2227,7 +2240,12 @@ static void handle_events(void) if (code == CODE_INVALID) code = event2keycode(event.key, false); if (code >= 0) { +#ifdef WIN32 + if (code != 0x39) + ADBKeyUp(code); +#else ADBKeyUp(code); +#endif if (code == 0x36) ctrl_down = false; #ifdef __APPLE__ From b3c4d46ca91b223a906925aff04778f2ba440ace Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 21 Mar 2020 10:21:53 +0900 Subject: [PATCH 355/534] changed default keycodes file name --- BasiliskII/src/SDL/video_sdl2.cpp | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 7f27557d2..090417f59 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -91,16 +91,16 @@ static int display_type = DISPLAY_WINDOW; // See enum above #endif #ifdef SHEEPSHAVER -#define PROGRAM_NAME "SheepShaver" +#define PREFIX "" #else -#define PROGRAM_NAME "BasiliskII" +#define PREFIX "BasiliskII_" #endif // Constants #ifdef WIN32 -const char KEYCODE_FILE_NAME[] = PROGRAM_NAME "_keycodes"; +const char KEYCODE_FILE_NAME[] = PREFIX "keycodes"; #elif __MACOSX__ -const char KEYCODE_FILE_NAME[] = PROGRAM_NAME "_keycodes"; +const char KEYCODE_FILE_NAME[] = PREFIX "keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; #endif @@ -747,7 +747,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags */ if (!sdl_window) { sdl_window = SDL_CreateWindow( - PROGRAM_NAME, + "Basilisk II", SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, window_width, @@ -1206,7 +1206,7 @@ static void keycode_init(void) const char *kc_path = PrefsFindString("keycodefile"); // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + FILE *f = fopen(kc_path && *kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); if (f == NULL) { char str[256]; snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); From 946f4bb77d02252b28006509bd0c3d617060b3cf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 21 Mar 2020 19:48:58 +0900 Subject: [PATCH 356/534] BII/SS common: read keycodes, if failed, read BasiliskII_keycodes --- BasiliskII/src/SDL/video_sdl2.cpp | 15 +++++---------- 1 file changed, 5 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 090417f59..03c55d686 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -90,19 +90,13 @@ enum { static int display_type = DISPLAY_WINDOW; // See enum above #endif -#ifdef SHEEPSHAVER -#define PREFIX "" -#else -#define PREFIX "BasiliskII_" -#endif - // Constants -#ifdef WIN32 -const char KEYCODE_FILE_NAME[] = PREFIX "keycodes"; -#elif __MACOSX__ -const char KEYCODE_FILE_NAME[] = PREFIX "keycodes"; +#if defined(__MACOSX__) || defined(WIN32) +const char KEYCODE_FILE_NAME[] = "keycodes"; +const char KEYCODE_FILE_NAME2[] = "BasiliskII_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +const char KEYCODE_FILE_NAME[] = DATADIR "/BasiliskII_keycodes"; #endif @@ -1207,6 +1201,7 @@ static void keycode_init(void) // Open keycode table FILE *f = fopen(kc_path && *kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + if (f == NULL) f = fopen(KEYCODE_FILE_NAME2, "r"); if (f == NULL) { char str[256]; snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); From 8ca7815baf09821f8d99f4d4c0375b1f66098689 Mon Sep 17 00:00:00 2001 From: emendelson Date: Sun, 22 Mar 2020 14:00:18 -0400 Subject: [PATCH 357/534] Updated icons; add Windows medium icon Replace the existing icons with the 7/8 design; add a 48x48 icon for the Windows build. --- BasiliskII/src/MacOSX/BasiliskII.icns | Bin 44909 -> 598067 bytes .../src/Unix/BasiliskII_128x128x32_icon.c | 8123 +++++++++++------ .../src/Unix/BasiliskII_32x32x32_icon.c | 499 +- .../src/Unix/BasiliskII_48x48x32_icon.c | 779 ++ BasiliskII/src/Unix/video_x.cpp | 2 + BasiliskII/src/Windows/BasiliskII.ico | Bin 2998 -> 99550 bytes 6 files changed, 6586 insertions(+), 2817 deletions(-) create mode 100644 BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c diff --git a/BasiliskII/src/MacOSX/BasiliskII.icns b/BasiliskII/src/MacOSX/BasiliskII.icns index b26870dd94b59d5f08b0047b5e4a87fc752c8450..437ac71ece7af5122858c08fae7658a778948a4e 100644 GIT binary patch literal 598067 zcmb@ucU%<9wg%edtRP9Ehy)c7Bxex;NrEVnbCR5MoMB*KU`Rub0tyl(OU{Di3<5?Z z2`WjDOuru7`<#95@7;6XAFpA$yL$EdYOSjJs#f)Mjh&^l2SCCmq^)_64FCXFI}ag2 z0KjeV5O;C_032dFM{JtJ!tp$fPi$v-`!y~W-TVFf*RN%Z zH_uZ$s~!MSxjE0D=T%j74!(Ooy6FL6B2v;K1G)p2U%i|eUX2BSFYzh<-pyV+Jubst zOI85zAu2ZFRb1B8@%x&N)@~>rjzV-kebv^ob+TN50f6}sL}G)ne%M5F|Fz%R~qI?zxj_n8ow@xX?IM+8-ywf{iNPWJE^8QK?ub!-M=RjI5DGHEGfO=T5ph zI|uu~lj~B-GJOEZNjFzr1JiJ4L}ts&P-0-(#naWr%^8V#)775u#t3{t+L^~=q8(w# z=$HsG$SZk8$jO{X3KGgn|8}zaA5P*t5QOm(^9c%SJ;DVDG+_WQ6+JyIJuL$Rud}Z$ zsT=^@3P*&YECkuYzJ8q7#RY==Gqcdhhce8;<qM9Ww7WiEfO&3-i%k<@UBi*PaG4mJ`XAfh{Xzvm1m?r! zxw+N-5CC8s3y>I*(doK7DiQ#!p#Wq2z|h$E_{8}5$Y4)<+nYxKfBsT`Y4y9M1j10L zYNEgk$4WxezXIj&t7{a3Z`o;K0O$09Fu5%yF#X7qFtLxOrxBa=L8^4CI6XxL-1pVJUQJ8itWw zYidRtU`L7yYIb5`vVI*jRDtARMj|YUE=5Bhxm7BdvIuS=1*2xh#s+JSS1CbAzLypc zOQ1i5J7 z6Qkj15>)u_1ey4;{?;`ZNVr_vKUP%VgB8Z3U{U1JffZ}^cZ-Gx-Zqczz(Ks4z`QK1 zFct}qpzvB~uu`la?C&Xx8{XN0fp|YlwAta1G$srdP8kw)fN+q|Gt}29-JU9{9@&P0 zxUX;pU;xuz6g)H(;oiLP)K^za^KK*9m)p_Z^m^tL1pVOv^Il{KEF{R|N2wh=6yaG0 zE+x0W>3!2!`}P!Ep@%{8@W2oc>EI)8Usy=6#|l_m+}oUGYSUFQ2ZBaeIl@1{U#D*B zwx+4AJ?t2a^0iY_@hxv}YB&W$v2wVtpP%zuwzjUCf|wV0WTxYv)zH=6+ETuUmDB9O zynWmen~om-em>4I;9+c4XL}308L#*kXaxg^_Ch?pZOg_D;NFCu!N0-e{N~Um%GX85 zJKVMauovLwWiwZ3?g4ivup0wgLK;F_@p3!Bd^kX~je^PW(hFtKIn1>T!kN_@^ z+%+UXY)2s=t)?n^O)Ck&87u7v{^Ev|)W5i4N=a~2N}L@y=Z2=co2RFjx0i>9tCO9b z^9|hVM!`-7W?sRXxS;@!PZAu1laK(%P$nkE-oD`%V<7+Fp{iSwD-FaEJa05IG8Dxa z8Hqy11**Bm#rHuBnH$PUw8b*SThlKd5la$>@<5wEOhA-l>G7^UHkt;ahqHJzmL56T zS*WnkyUv*4rgM7Cbi`pKxBx9qw!i6-8i=+Pg~tcf|Di{FY@*zM&?7bksce`S=a=<| z9(8C8-#_VL07JP+WMsrdxJh8?F`N?v!~GXMXcNuM1ELJndWz8Tp%UJGqazil1T$J} zQ~kq_kkBAi=ZTJFbbORY$g^jt=wzS2`9U4+9pxw=KQ>sG5EB=N@C*!yYx);IXrkf1 zVNc~De)KmaMa9O&$2xly{zVX21Z|{On5Vr0mLU}pLDA7Mu?a{YoqsWeF4Q&ZsSCsq zgC`!SsGOqo*qFEkOW@xO@$rM(_~~jrl(UNqd(qX?{wgUZ79;;RLxNo*oLnG=_AbH!$|*T$X$bIGk;h}h;w*+P{kjH)WydpKx54xh8Q~f2tG8mb$l8VV;A^` zA#IuH#QT3S#NQEVV*oKkMl&9*r2mH@ZMo4{`8h+p?2txY5JTLZVxzokA%?)3@mq4D zF=BsF#M#5&7@~-mQ*^BBODshiFfkESe^JC1W^aR~hyy&)GaO5imtl$ee<KpG*2vG#*76J*7b40}4Cj|fs`AF}JScWJ@;GQ!?#5gF}(<9hV z0l+eZjqM`D5PKT7s~jARbpIx(!FY@%L?fn16j~F|8jr;LqL$B^o(9tl932^$g{)->v(c$+Qtss8%57wHp zz-aKPd7O&>!4GdPA?I^`)WB}Bv0tR2V^sMEKf(;DHQgY77;4KgDkeX3xN(t=j`1J- z2#{p8#`5D1J*m>m?w;-<16sPv#DDW6#Nmpt2gHxSd(@oq9S}cST3l%_(?ga0X9Q7{ zqJ0nu3xPSXQ)<-ooR1(44=5Q3{^o}n2fZ-F50^*uG#Vj)_|bu&W+48XANK6RrVu~m z_~__w8UEo%dkV{CNPf-_pC|O1J`g{=9@0=-z5c_G*5oUfA^h_p#9ij98N?4CGe&By z;$}qCML0bz?qBq<=Mr-8fVmTTI0;koM`8I<`jCd~FMiy=ENBDq!}ksY{XL(!L`*`Y zDGLpN2?qe$2mqIvng9;q<55up@(>MZfpczLr>CT$roMCu_naFvgjjAkGO`ik;u6yS z&5gfjT>m5R`u~t5)*&LLqN0FeS?q?#C~^0mf})a=;ypQOaWN5A0Qt@+D*qYMh?fj2 zznHtQ@@;K>eSPiQ%GXbyKDub^PktY-c>Q6!!-NKsGr#|5^0OM@SkAF%3$H`d`DR5~J_U(UM{&%wA5`fQn zbN$~J{>NDf6wm`S|GPW}ng9T_|EqjU4d=hgJ0So5n|?V~{9o{k{||Y|{~>RLI@bS& z|5csnzskYa-2Yv^Zvg@P@8tu6DNqymZ}L~n|6N|n@ZaU}7yhgKNFSPx(QW^aTK{*l z70MpCSl-$?1u`To|1F3MrK@MkNlpq15rBFFmI)bH=h|2pzM`q%0I z4<~;=aX~%QxKBaKh;0!RD#{AjJlL=wVnS%|;qSi-9dJAz-IoVmjWDl42@+RjeGjPg zpxG!LCyvS^jxFe#j*7xvZ9S4@T{}mkY1*?-0X1=-c};A3-}^F1y4#I`QA8+W=K8xcJam8x8&H(%;S;f)eoD2t2vfmLZrhq2ipqmQsmewTg%Ix z(pLRyiu3b}rZ($8P0!f0fM>^bpFWxFdB1L8k@6-E`2AyhVvz9?8Hr{WEwPOJHFKux z96R?hrkQ!4^CDRNto9SyTjs1aH9&i{YdTMw2uwA`lfKuiPc^a;a^`;C+>b-b=W(p@ zQ`qz!zOR@KuD@#bvCBb#5kL8*;ss_VD}Ax&c2@e2X-tN1lw>7Jr1NE>qkexa4&TW6 z-evnfs^re8uajp(jqGY>S}NB)DhXRryOmzSLDF&i>r#P=Z6{OTi*?;^YK*;HXdxo> zr>qw-6n(92c=E7clSUz2-yG4{DEv*Po*2Wstyd|I=a4}zbum!HX*;#aAZPQ}>2_Cb z!CPA&WK1Z0@#(6}XWK_@H4fkVf>^vzv=`elZmGC_*eUtx}wTVfbxElhA z9`3jQlOZW8E@^ew!a| z1w^ypZp%eH#L$XhlzCp2@@MLBUHmc&KfnY`%Zd-oBDU(>5)}$6CukkmFZz{Ytc|EjmIzEhk4_=h4HY%ZdnVW^Qht zzF*?&szd(4%29+W39f4soa*Z8FnKwAE@p;k73~bGn5=7hibB_OqNSJOm?hXvnWHYW zx@~+Y`{+#MkvkUf8t1*It1Bhh8u@&_%oZiLzZsE=ykOF$9 zm5tOY9wOaLKV#h#h(7hI3m15Bf_#}m5+plAlpj8j7rOLUE#l43QFCip&9fo96FpeirtxxM_2ZI#^BfL3}*76Hh<(H2MQN#}J} z#N&02JvdnX#1?Gj=34gZj=`fDwJ@9haK&EUqg*B%*6(6t_Z@!t1O!NR{c;O!Cwg~D zmYf>HN3rJ`?X3{#;3`y2a<iQCS-or2ovI#@U_ppu|%pfl%qiQIl_nH^P7fu zES(>mPcIyV;SF7u3d+M%R~Z-An|xfvlil@cZm-X(x~QV!9aRmL3(}#TY|xdN_3)CT z5)W(95j__@($z2bl64C2kijLHg1GLv0}0PM!==yC?Z?j-Pw9yTo?a^Eo!Pp};g0)C zjWv{y_}OUvH{OD@@>)jS@Rtuo1Bv&FYbYt~v}vp#UXA^>Bq6%eeVk4p?BAV6%t>02 zx_q^P4|hq<`zmsJM9U~P_SuTx-WVR$O?_iN68)jxJIRAp`K#USm^N3$$VA#Y+ zEw*Rj(~pvO$F7amAQgM{5=9C$(E`+$mBxwgZRsxn^P0z5mV z#J@XwL2=+KPRQjre`hlz#~u{sN{3BN-p${vxcxP*eTmm!<6fLSHX~*-@DEMQepCAR z^z?Mj`ohxOGatE#JL#QV->=(Dcz>9Zc74yATOH*ns@5y==J_w*!euLtzU^sb*8cxCGeMoT5PTN>7(Q3{+#%%&X!1MZ|$L^l-`lrN}M(R3p3 zQ!)L@y>`gxTjHVlY4O9(&K-BAr;pZWCuBOlCftWHnCj_u7_Rbn$iBN6aWy=IYha<) zklrIxFua7hc1l{bK?#LVdL+bmz5GIlqbPf}#&@yRPptuN2V-}|9l6wXLs+}JvR|kr zPYoNs7A14&f8lG0pN3~s!$3=$thc$*6C)7!Soh_ZI8s-t!!jKnUjzfIUDO1ck+}zU zw`tyGuQkFWLI2^q=hswzGR%}4zPvKzTxT}*367j4*itf6O#gz%G3dlHCLu?8^g*<& z{Gpp;86$i}hj@x8tlM1X3{{2>h`J_F`;ZDlKpu;}N=rNbP!}QMFq2zSqRP#FFF8E< zB^Q@D?_H&uPQsakZ$DWYO$115%{%WNu`4gAT$=#lhr0p37D)C>0P_B^8( zNZ)ik=41V_U8x-R`*_*w2;<+&=m`;3L*R}UvCZr1IPG-<6)kKr)S~;!n ze4FNx+{zV+OB*+-OhLbwTM=(6KBkvyHaiPTY%hB=s&ny$GzKgFcW&*PtzVg~ZC;#z}p2_jncIooA zU3s5<;5+iy=Ub)fhl-;0GbuAES52g3U4lY5=nRkU=RbV8b%@H=JUg65$jImR?fO!Q z&3&b@y686){utR9`Gfq`e1jdPE+qVOV9BVqo~*~WvAmzp)(b)U%u}YEALCPuI7!%O z98gizP#gW2? zcGB38o|Tef?doG!}j#y9Hm zX83MqMBAV2RfHHz`EKQULxZl`&E$!l!pvjI?Q89~)yS`MNo+0)aJI>4(%+!e7hpT8yiR z@syGYW$oNm$yskK*I3i-Qlle|! zp+%03)bG_z0)U7w#!18>TqtpFuzf50o9^sy-v)LVGdF$`2@0TIbL_5gR(sKQkk_)}n(-s_M}NZ57oXT(@HG5a_`PddLDJ839at`q zeUQqmjcu+McRo~TU;HHU;I(s|g~Unp)5q6L4_0T}Pznot7}r>@EH;i;gmc5Ez-fwzvI z-a-F7ZN-~wFZfN~F?D&atz2UA!SlJ}TI#T=Cul3GVXH{Nbk-Pz%3E|qnf zDHEmq@GCKW4DT~3_&z*07&e)0p8djHld)Il@)N-5vqkIo7}JWw`}+H;&zAc^_l1cr zRO9-IF41d~n^u#Ji>rjM&ldP@Os;w-_`Mf|k#RrL?4L-N z3HUwKzB9lhfsm>C{Rp4$%PsLtrHM00wi>vo7>?z;jV%l{5*ywdHB*>Vh?_>hqq$fvL|NgKLqcuSUP5k)ym<-^Nl^EzdAD_ zP1T1qxm-@B$5>xhrN>g4U{X^or^_~!#8vq5@dtp^nKuG$@lPHy5 zuJuFvD|Af}85ssf#2-*IhmT(%VJpHPCR0lel`E`Q;dw2W-=s%e3Dz^J$ashof0Hef zFKy>SV*k*${D=SOp|`9^w= z>@PNa`s6UOA9!n>k@G1<3Ww}OQNHRB*GKX6!riAY$IW8DzLK5jy3@&LIwlbBq!cqs z*8K58jKhvW8ofL|pp;YD{2}f2@4RasEyCCFk~5o_e+CCZGk3EW`mK1pHvt5zOe?Q`@~jo6u>Dw$E%~jOA$?$OnSe-VJpMP(4bZ+ z_I{mC!Yf7tn?A+I^FI`>-;rkG$6qBAU#y(-r&yxcwKnTMP}W>*V+_Bt^Wi$-)d|_e zVRm}5uZ8nh?ZSL}k@c1=k%TK$nuS&62~(|;wCODj`V(*a1}{6W9j{BIvKo1Hrcp2q zD;DGvZm09IqF4=Ei@tJJd`i~>#`y7f@TAVH%rB}`ExD($|GI(0_V$X>jb|+<^JYf# zq}@C3pIY&z-|tPnxfsPQ zu<{u3rOU|}nh>PNtD!P3$=w@_?Dh<)UnJp`>JI!n-;nsaxF{k;}cUI8HL2RFy#6v zjLbHnIS(cZ3Jx-iJ^P0HksIate^ zNv=6Q8~tRQBxm~s<5s7Wp{KHsX^`Y9s`s8J2|0hDX1j#KXHOvRCL%nGexm&$HM3i3 zR5;VVf#&zZqt|o^9kkP4Z@r|4fY*JVeGC|#@z*WnQIQz)kWaF83adVwR#D5XmxI?#ZZz|mX7!Yc3*85x;9^SD59 z3B`NHTJ0kp1A5I|NwLEbRqj+vxX~A*T!Eq6U)6KUF2FKSSCYB()^f)0w<+QYrt|Jv zU6u-5Y_aSz>Owv4=i<0_wPz}Y&v5M1d@QW4u7!uY&P;QVeD`p$L0Gt~Lr^Z&WwGfJ zi=Ycejk`DPdEIq`LK>r=pZ86Na`Nq{0E=fwQ!jOh%<5EbK5+aXBu*vIj-qK&e{Aa& zp2Ts1Us&M#f_xItH!Qu^c{F+FqGOy+B!Jn&cYbW|>&C%-}Z*o;d zR!Vku7`piNrT&07h@H>@d|Gp-#3PR3ED zGxivX!^PiHGbL)gOhy(Xqp!%P4)Kg~b8%I*x+Xctne}^&Y@d#AjKc{gwayH_q#R_U zd@Z%^zgXU}D0;us%mc1(Y$$no)ftrfMU7{Zm_1%BWB(%G7opO6q1acBs>%7Iq;IPU zLDJjB9_!6=+lx7RE6?%6G7VO?>wR!TcD*T-hFH?_MI*(`n$-Om#yP5_x>{zF2cIVv znTm%#_=H0m-+cFln`98)$m~0zkKUePQ*U355S5X_*aG+zwR2P+3M3ayc?R0xoW3T3 z9_?8(f8A>&)cdJX5~9E`8^a`ai$R^Py#$L;Sgt(nnTKk2F(oMwxqK{OMEtj}? zV9BXbK+=2IPH(9(88L2Jk*y?E&xpT)`K`*s2E3QlF_r$F9N%UXcA)23sxbwv;WHmM zf0^Z;$xdlr%xe;tcVHX0FaEY0f1w;^`lA(H{;S5<-;+7wWz&}m2PI2mk$oPzuzZrT z{+zdOPhGk!QEU}buHrsC!A3z+P0azW*0vAPCM)(U*2pNJ5AUkR`tc21dFk}KmTs)A zPpTL4zYf1+TP!k9NxES)kNo}HyH1-N!R5p($|JbPB91xa^(Hza-S~>Tzhccs%&>bQ z^ZVlLLyrrH1aoFG;V)YXcc$kxn zC(-!H*;|0JGOSpc9VKO)_#r-WT68hy(Eq^UV_G)p&0;d((uAtv4R%_Tl(dF(Xh!|l zn6LD1_r7hWNnO51JYu~RWgMStWBef0i+I04DPg%)(uWR#BW04d(cQ3l@0&?8j`7}f zk;SdMUn3;Bv~_Os_~UdFw>@*&K2=t9&3=|}g@h%xK>)L8uq>Inn=HWNoo_@-!AC70 z9*srTxRm2bZ_532$LKCy9q$KZ;WdN9h{h{VpsxQ+JbMS z>5Bp(#Kb14EGfOt%wl&U$sWthru#9Jzm}K}_Zd{RAbcKJ%OAn?Ua2xf8jiP`pJq&) zSJBMEG9{iPz#!F8&03H{ixYpp>!c2s?I-@4_OQJwJL)=q7@k=F&UI@eDHh_(Z z19~XN4&*!GTEVw*>%+u5U-bXFC-x<=?RmpHTPA2axOhuLItt=JgUjyiwAQV2bCHmFUI0 zg)9*$KOSFoFUrmq;F2|Jfho^_<9D(qPj|VImY&l+wS>=jDb+P((9gM0oGVUWNsvX| zSbyA(#ga0aomg7*`XqS)6#*He9X0E`cx2}4>Q-x~z%6bg4AD1p7R%(ap^2svVpwNV zV1@R;Gt}K^u8CQTXLnjSBC&Vom|cS9y-u zm?7q%{0(-|I`vLRm1_emOBW~W&Bo>~Hc!SBer28!{5btsoP=8*&GL#c)RIob(Jpe) zr{zx9X8Xtz``GAB@?{2!TLcQUIA+fsOmK0-ly4_gvH12fq?AnBo@O2V98zC_NeYJ8L->am`O3S49bd*;Ljdvy;`m z&YtIfqhd^5PqlCjHRQ%WNHcqS-@2wGG=(5n--JgFvR8YM`63EeG z?0lg8S)H)hi1L}~6}b?#tX13(A6%2jDdvP0jEmORl3?4qQ608hup4K2U|Ac=sh?IW9gCEt zGRw(rY$Nn;(zy3?P+8k-z2I3jZt=^vghI{=+*(Dh7TEszv^dw z+_Si#=PL#5fZ(_)I+}*_$=>hxE|!jt`LoYa-p_L!OgX5Q6c8ziBgOS$ZL>%=M9zO4fGG63Kml?_N&{%erUWw+oucXvLF8G~!^ek#N@J@~F zn}De8-a`exbwlGQX>Udbm(Z3DBygEWI|W| z{xMf0?)Ei|)NMJ3!|Kk-!o^ZHHDIUtXWEua_t*!z-E=?c*A2}{c$irGXdgo%gV+Z} z`!NlvMtNoUFyYO$HLXjm7PuDFK0z!djCWYAT7nBAYo2?ci9T=`JU;eHNTK9JUpDK* z^ljB8h&qsa{iflpD~iN76Z{$8^YgI*2b#=--1@e(G#U=aLC414`pLtA(_R18b@G8& zaZDWX{iq@R<>IdJFW&yhNzUo7K?&i*HiG5l)An%>zPW!GN}-J+uVn-*#;spkSCsUQ zHgN{AK3ytVIK)}`#IS4B;;Utc%A$&7R5K(&EZ1Ka#^GSrv@E?wKFoW|J%Kz_oN>xc z!Z#dxG+WRac4#J0WI=rON$=XvpHI*(ADf>1_mqb#3fYizJ0K>-0qfwr9b zXF{VjNxyh0ZQT;Fvr!0lk49C*A(tcxmh`}T}%eQy~~KlUZnCw6Lbb(d{s z#bIt92J1KP{6-eFF+)A?kN7V7GYZ|a-xy8q zqE-u=?D^4im~W*#HPZl*v|ClZFKD@ISNup?J0O@Rg4!KQhR ze7dIP2FY&v4iOz85d2 zJx6g54}WU^ahQ@H-+fJdEvEt;Blj9J#QD8HGzk(a=*?dr^N@@pS~2FT_Fo~ zp|y~<>Gqu`NPWKa>E;EU1+LGRdRjJ?{p2WOzlh4A)URG~qJU?YvQ+<~ag z8*js3juAaNyM>bm+iyJG1XooR^0fkxohav7_@lV#JDj4*1s?Naqhk7JX2`0?CcQKdvYT-4KEJ>! zPXFv+*9QaM&McVE7`~?SAd_=JODWQQi1SiX$d5|*kImJRLY0SsgF#Hg^>_CA*NHNN z=l?=#z%52mhc z#(4(sTW#pw(!Ff?o~^*CWrZDA`^IKnaQXiD`;YY@8_1GOW>Mrp(#bb@^WO_0BxgO* zsXL=J*-O)w%R|5FsY3gg*TWg_o~h5yI6Iem(|%O%*=c2}QF#2wD`&W(=s{^**@wcD zX7wM9La3)*g}<9wTW^KN{qDO`}@ao2kHa#iw&Pt&z!ML4=*Mkm>G z6E@DF*+=~$gAG14mOph(lx^7cWx7S09F1R%wSRRItT-}=4-V!vNCSt(9M&tOXeCd7 z1^q%a2V~dJ`0>>-N&cu~YRan1+V`*X!?0SE^t6-gs+S?z{ddP)SKicrQvLDK=juM= zrfSYDrRZmEN3Fmo-Q`o<-1b1x`Vid!i^Ng$5*gVPsnmBOB?UQ2`};9>Lnd6DGYSJF z=l2EYcEYKtOc(dtgtpC6@BD0Q9IW-YAK~ZWQ(j)$X<6c-$9L;YH#((%ZB8zql9gnI zO9Q=fi@7E1j?Cq8B8m0`TYWA&`;Cdrg*!Kl)lMT{m^m{GiR?5XpSU}S>a(AmxumY< z1URp*3}@B^CaRtN`oY8eus4}6`&k{TF4K$UyZ=mGnQ>WQ3~pVSeDve9;SGZ|zt0MT z9h%bHVJLo`lD5G2&ky>p#YMsoTpR$D?s87RhM%*m>z3@sDY!8A^x0_^`oX(`{;ZRC zvN0RJDCeeLc8bcg_PY^xM>S6~LE*+2mvGrP1(hcR@Mn^oSJV%1aIdg!fh=$k*N#;4 zGI@M~AM}0PzrV!$YkeE`8hHLU2oOLoL1Jue5n8ym7z_+t0tkYjwNxM`0l>w8U@8Cy z!!Q}PVHh+R0pP{+3tvnFa4=v3fCGYU*t1Z8AVye3RG2aY(t_5mfnCrCT34mQAtE9y zay1J|O#?(2Rxx2gL2mqPC^-cXGKmV_7T|$iroBigVHK8N(bUmWTbvwdCPs#aZWsqB zC`AMX_;@Lx*CEZz-yfhrf`i32m<%oolA-~+YxmSNwGGUkI=OrK1;G&E5mD%v*!Tn( z<{I?EYJ6NwR77}au%EZP(^E5p$7=H8{5QEcxNqFNd5d32NEkm9Af@CN6yUu<3Gk#Y z!$9B+ehP;^z!|j2Nwe_#Un+IXNJu3Dz$pUjPjSIzI_O1UR{k4IA_E{~6drg|cs&NdyB4>F z&EX83m4@Ev#Xz^$LAT?8F;InF3Xr$ipsto#hh2rCLZ8AN+A2z(oT%ZIB`< zSfpg`taknC?MX7^hv?Z$cPsWJtI>yv#>c}7XB`Dj%a3Tw5RUHDx{4E&S>IB z12~BMdVHv}yyD<26e@zeFeo=@89+O9 zUk-?SdU6(duCecG=x)xT=R2LJ-7YlOv|AeQ;tr zVTKTLpgC_8>%iHu0^|U+c$MNA2)*w72;laCMMk4zLea6&IB0ZO3=KLu67FqdxQxww z_K}T~AiMY)1WkN)01M2n?HQd)oFSYX?kp=mJ}=Jaf8a=y!BcRZ4&Z}FC7_aVlaiCe zlMu=96yoIM#5km%c^u?AF_@_B`jGSTAM@sHQ3Xx?>Y_|)|9jF@y}26cK$e7LveEY`3U11oz0&Kn;f9U`#OHogRMGX05Pt~6`jMA5WvJh z>+{xg0BG48palUmL3ThdOpC=QrAK4{nV}gtnVIkm*368IOza2xOHWOR@U@=Dnzi%P z-2V2B%Z1qTKil{5Nw4Z2nM$69UWRFZ`6>)DtMM}l$0FX+C8eaxYdP+j1 zzvVDw!P&8ok%KTV_r0BSfEBC2%$hf&5WwV6M_JCVbAV-vNPtwmaHyOfdYvOJH7z@x zCN(KG)FtQuYrxn;M{OQ{cGFYnULtVG91DQ800Jn_+=5V{o`N9`z*WddMWh31=yaU4 zba*C^0ZS)JOG!WlTGpL6@@O4LF@Ap50H`d9!DTbQw92mG$KGhvZ)t69 z8JdcnBpe@XFG=72V-*b?sxjDkABL-t1wm3~S&K+Wh$$zfrKMn^gP&$VmXU(F51nNB z1^I;9&mnhgUE)hx2fGx+BqVO9&Owl4{VgvucF#*{5n3z(XoUh{ATAJ{k(A1sX)Y)x zCaRE_mXZ_~?qe~HHF4A2!kk}FkjH8e0wg&*_O?d7Xy|K`g^3dLCCp7uPC)+=lSC6^ zZyWQU9iHP(;zGE#Q2_2pQcB{#P%){=m}r551HgU=d2u}lBK|v8d zo8p#psFnww3B_#C=j0^31!*lhrlS#juFaEK770af;=%3BT=J7!+q_Qnc?3cG#s!N+pl85;*%2D z{(#A&qhW5==NVH@{5SvX&D>rX?i{aA|bpjZ#h;r zP99EpPw&9cNcbr6@IX&ebNtrVp|iK1wn&G|6cljD*St|mF&S65el5+3B}wu1#MRk3?|8!CbL$&ulKHw{qrL_mON z&pDWQZ@a%JuWyGC2Vuh`gMDwBE1yNeenMjy6se#CpkNdLV<6Pn^mvxo=rA9%{PXH@ z)N$2?ia@e%Y-D8cZF@!W9)!qv2EKPywegQiE2wN}>+bFA@9XVseDw_NF%01mfIG?2 z@f6rTClXaVb z&(qL#35m@ttf*^hYj1C^EzXK^Z-k%;!JW*A=h@IQus_)7v^W~bSbv+~V{G?;eqiq^ zCM+rtGyxwb9PDkce!c?X(ShKU6OxYafnz3?4?+AB;3=m4r}t7j-i|NZ4uGidE@Y5qQU+*%_WtG zVASbV@OSuT`8*L26}j6o0v{qC9C+K=P|yXQMV+#M;D>l!RegJ}fRJE6d-yyS3_R{eB^FjS z_tYdpP*JH+R1z8LV-bU`sAD%RdtXICQ9;8&1ccPz(_WW93Z6xuGK1jvhM*@8^vn$m z^Um7{`1M(2W^r9>_dvB72Eglyia{sF(4o;$$Y3}9H(0Z#Rg7J|Bt=980>;7yi3j@L zv{pea=?r}e1L+q_ZDd@>L1?4~H>*O?xn)qBdOKLN2DQi@R0^6lIud&N>9B=`NmjP@ zb`%yB6G$HoA0+O7+uc$Lg zLWX!6Wnpo)jCAY+%x{Z|N>mOb2Z;N6yP7NW-W-B)r?k+N;q+{~%H*DjPc#IBZHt4o ze_&#wfvB)(x~Ryo0B3_qEKZlAnQO=+K`{}P&cTQQ5(uZI=6U5e@GJqEip*$Uy`$#@ z$K;jQw{`UlR5oB8ib#&4Lm^?_R^I0wU%0BZXRwm6n4syvKx9A3+n%o0*DrGi4#5Pd zv)HfJkxx=D+q>*WS-x1}YG*;i!JnzMk&3`tq!T zc@T`p&V_bf>Zn_LhbQKi*0w=W$a#A~CZXsek#JuJlP_3=*Yc(=L7t)zLey|{A6ait zXG={{D)Pk=7J?E4*HRxovd7Z0y5LWn#_0)9iX?~#3-&Mzg`bk2`Keobz#N6e#BOH~ zMfFjNfr)|z>kcGh>VPmpbLllJL@!K zP5Jsj&)x@NiS02<29a+m`}*GYyy>s6B_cho0-Cm=Tj0>FG8PIO z!M(!A243FSUz&jWSDYS1B9cA~9^h&a58ZTj?DD|MJuplQ0#axl4DV-zjOl8vfAu^y z%I7JfXCK>2z>UhRiQm}fM+kzmPqi%xur-9hAQ{3DAwCXI`mqMh-`BJA4o0Ymh>0k_ zs;v&KVudCywbd1+1sQR{cCenqa~>YPiGoE&WpzQb&seDY{O)%T55npS#e_42!2>-k z9Coo-xsY>yFt`E~ok+;a$b?Ga$;imcz@;vW@;qwX|I<5sObf;2JTJ&g&#eD?2F5@` z(r-WPgcFKfy5O)dAUrmVIyA)3Stl3k=DwANm0JKj_>L${EL@Zvdcts9fcH8Jec&>7 zVtffast=CJdikolwx+T;C%y6$)FVQOI~rKy;0a+g2zZdEt?v0$VN5~K&MPQ1Kt?n| zj7(G%LgKq|S*#U1ou&o1(){9c%W9ii+uK?iYRYocDxe>?h=!ong|O2^Xky<5OF%$| z`MVnXp7*?o@}^F{!3bZ;NHLN>VDy@wp}~p-+(7v!KCh^6?SOTWK?`-y;p)C)`#4;1 zh%_D`>Iw-(AfTVDhz_NO1$jF>!iELlj-jTNn|}zxTQp1<5P=C3Lk~=NuhZ*(hcKbZ zaFlQ23uxr&?1H@^@9yqwZ*8b4&CYy#0CmJTU>ep&=;=XMNPH+aJjCDK>d&;TS5Dv7 zGaw{1#KFu^_lfqSM_SPTLk$&0A%pdE*yBWx_5I7tW21DS4B4DA!a9E(1qmkJXHtq#09HXDT z!XhHO$-27Q+nVZL<)#gvfmpyk{8#|5D+msYg;NCwc-U%nU_Jl&_@Sk%Zx9RxCkhGl zaj|^Za}G3P7n)xDx~07{s*B{@u$L(fhY$=7=m-t6T|sd$s*oUG7jw%EEJ%xt-cxt~ zU=)lvB*-5^P6VO2j^ykh%p?9qbyIsMx{CxVw8om^ROn|pA|PAd5ku_k3WUL6A$ZWT zZCGds33M79;N|cHJ24~$0~L)OyaIwlLSV=cqToPpXEW0^$S`8C%@Uba*3jA!-9_Hr z)79D0)>K=XR=N+N;(#XSpfMrTFnExkyUn8!tZmC`T9z)pfx)N{LdZ5dt-^Eve*0lf zYsUI_p{Jv`>l~@BB>k3W;#QCM;4wMDYK^-djMmwRH` zXU`Q(8LgCD9`2b|T#y=;#A#-mr$Sx}N*YQD;I63I&p1{cpIttG9aOryBN9hX9O(?P zT6f~e5pe(ZHLSBRjl;6vsz5Jtw6LL6x-8Gy)Z8&F&JT?>1N|8@!;-TLOX^DrB}F+Y z0nIR37GO6fHgs*-*Ij!=@YuNXjj0EXEh+%n7c5d`q#{gjOtAzx!bK;iJco?e5HUHZe9Yx4@a01ausz=q4OG zuybw8UXIL1B1mR_V==X?AlA`DNAVak^pc#Kp^a}`Ce)kKlImi7L3Xm=S`aMGZj7l} zyyd{LqkGphCd@Q3GAp+rm>Zde%{z3gs+(|d&*nw*(0T{@E-fTCk6t8~6J$gQ*xFf}swui0|+Nc|!F{_U%qk82n0Q-rSoTff9Q_$SR$ik~|#ld6Ujfe2avFkVj2V6M< z>k6p_g$0HAS;^tS&ymnN8*gtX8w;=#I&gxynX!)jJCI0b-%?UR+ALrP*~B)qe8s+_ zhYvL$BpleaZtlWfSQ^7#mpu}h(^#O8pPP~3UksI={o2zlEIBKCPL!{sH4_fahWRa@;A8B-cMGmet^AzSSP#y0XP=dC zR7zG}K~Ygb_MDg?Pe%Ax}mRa6f^7uW^Hre^1r=Svj89$z7BaHl55ga>)qM^?Z} z0Ac^G4GZg02Zd!nmE?$O$d|~=$w&xF`~p+gCr<8Ad2;gV@<|{I4w6WZPX7u*1lZSn zGMkrd-m?ISSii6al@gYHh0|iP8uG+*vr}WeT97rHEqx-BGjr&9`0UiE#E)>F0Q;s_ zT0_^S-3#^;_U%|ZuLkMoWA8+*n3Fa$CCcq6%tZP#>;hv_vvN_|wAhHj9_zkOa&71O zo%`nRC+yv}ro9HWYCd))N}Nf{#pKoGie;xKh6X|Dv+vJv3yn|9ZpbC&<>uw)W~apm zUW41AV+o9_oWFL*UJ$Zp>q=(R7qqc5FyO+GQlBfHla(6lTLfEb>z;Z02zz&JUeeIfhcf?Id^mMRN|Xx}?Z7~$t$%b%W)4c7ksQLN^~+-}+q`S<+RUz&*CJn%Ms7cOpWtT{05fqH}?!n zNXtU$vr^-Nu7Vmt_Qjd8Wo;|B?Ap_|m$+y5jtyOnMT0x1S2#09*y-=iD9^^`FflB3+_p;BzL@`+4J&xZH2b2$IkAhGF5foN-u#Qr=xAiHVt`t7^+wC)wyvvbR; zxg~SKUOsjz47%Ovb=l&XkS*tP;FF#Rd+Om5~x1_lhH+(>{ULwqnzc-FujO z1^4XPwQb$vrZmo$Gy9ehn#;mG1<4W1m=hZi0TW*KeLLsi*g2UkAO`Apz#0%E#D3%w zkWo8-)#e?$b~E+}?%ug={Zdvz-FKii;G=MumvpDsW{YQ~Cr7!X`7nE*nMYWBDhLtC z%1lp*jzLvSh`nH1RDRQrSi963>%pWa%A`;UwTeAc*Gg1?S7-$|L%>EeZ6kkMNw0hI_ox2h=ij-nD)6+NJF^b7-GnCW>YE1tD258(tq)6C;t55*O-Hh3tB0J;OI5VNPs&3?U^s zE@U?9pH zc{xQYSxg9PdUH_Xd^F=+fFa-knf0@ymtnAuC^43OP`Mq0b$S4I0d!h{MR|c!4if-3 zS;2lL`>h(P0`LxCM6BBrPLg{*uqMY>enn~6>^4rCP7EOjNxsBkLi6B$IEDu2d#K1WnU*y--BJJm0Q%Ce&ka+F54@ z1{K|O8B9gs=PZ>^p=1bYf~gvYYAJATOa;sb*nNMm%JneSQdBc^jB7s*{10|fa0Bdb zi)2yq#TWtQ*T~RM`Y2-yF~V#(5yaG3)1)3&s2s*v&c=WH@b=voSlFSRCwA`vJG92_NyJj}7|JlAYIMNN%vK&Kj-Tn8?<84Mreis}IXJ}3{!@%NH zQpK}$`N2yMp1gSb>dC`v2bUH(k`V@70zYtm8y>$FgE66*^I2%tVgy7arPbxch4@hw zS_VJp_fiZt&Cr5ojv>rPRCp!4g<$P6;KX|67FZKZ3!Ed@!d?d_EOK}=V$CZs#0Vn` z3sWm_5}?L~&yat(DeN-b!FK(vloixD;DPTtiD&&(L(T)im4bGaQ|q zU0mHgJUzX<%Dq*+ygWVJT$~+eOt+n8WiiP}Ut3KtWT0b+{|LTpKl zlrN3d%4Af~F|b`Hz+kqtHfPQNn1i|v0a5`I4vs?`uyE32ix3OpaX@)>HMMoLdR${u zBg12eXOl_3HLXk|01ZiP` zWfOEmt6CW-2`fg3%d*2-chj-VGQuFsR@KRB0Y&^QMkpCrwwPyaO9dUN>S>;B6vgK0Ioh{W`sHFkQPH5Rh7h+b5aZt9ZehJ(u#4J?A z{))0iB;%PCbR4T%3yV;8A|xcSl3WqW)|ikF=|mWH>BVEC>=kXSW|X$V(`g80C$;RP zlNj{@(SWiwRns6n{FU1{3S|=z@!h=?N|T>ObBAWemkj9yS($!_WGe+jW(1pa%ZEWW zBGG>w*}9;)5*!?j`XK<(Ng$k`*#c*a(mOy>1%sc-WIeATM^sL;xf`aOz%3{8f5?ZNLaS4%`zB^sYG@X+Ks=)%wPuK8<58}*FRFqvif@ENCtKD%j9wmiffbG11Vk0!IimC6#f(H6FnA<__e(){sGAB=1%_vy%8bZXKI|cFCEs zLBOq50+DHq^28x-jYr&iF-XHQE70T%VQaruIxA}|Y+cTTZT2d^*d!xu?Gj`aGkXpf zTk`|9US3V-W1_JHLF>p?dQ0L6Xgy~RvV)Zp0MJ@vI-`nCNX+J8)@zuYJOQfYFzbXC zdTYdgX4Y{P$R?$DUodRDd{ z2U!=OOfhN!7;}&{9+36MR^%L39uR9%N=Hk()ex~3;1KJ$QdEzcLn44!>zLF*$0oq2 zjwl%<)_4HUa8f05ZaD$c>xN}U5Ql&@0RijGgeFur#XbmFYui*o>dG)KuKt;tQ7QBf zv^pUVnZSq&L9|-aomB}1T!j{X!?YR?w0Z;JMQAG3BENyvIkB|}qEz@KAXu%P0Aj=# z)xo(VVKp9L^?DYP#Du-Ge`eLmsZib|R-%6jV%1aXp<#VwipvT8iA>NO0G#4}=6*Lk?ugqTqQ zTuQxdVGUh`8R8*lw|xb z2NhJcN9a!?jYmX!)50dYB&#vb*(YY0N0()lfvGUvs$`9Uqf^6cP${Ll^WbO!4vt>i z-rPtRXRyk`J-iSB02-Z^Rt0rXkkMRI+rdkt35Z6=p{W6>+28*sjRr~%Go9R98ujumtYoJ=-ZD4 zq6r8@$45dBC(I1>;swzH2zKsVzqq9pdWObC2Z!L_VCe94PK9v``~^dATEc2XCu~bF zTI%B6yyJd{p+hQBJxO$0K~ zD_iJ73}#t~d)Pli=#X4gH!7U}0YWDSd8f6(9G{Wr>m4^1giZ)SLm?~4X#|88`w5}* z66160VFHJNYzeR$5Q4e)n37!F1hoUss4gk4ZDvA; z!7B9)8pWT3IF-G0G=CQR$)9PdNDimvRh3mk;9E1u!m(B7%SF! zZ2FA1Fm}jog2kx_qqeNJ4dCX+*DYVbY6gK=X1&e`@*If9d1j$Q&@bd!NhgH`Vx$-i`DLu1B|PNym=l%>k$hF=`yWNAPB!JY*KLJP|;`Aa5oPg75`&7zSYngBLeP1=gV! zlre*gn*}(yIUp96V#KDTydl_3pMjl#exuBXbxv`xl|AR_Wlwi<$#dV8KjmjLRJ&%_2Ocd0{h5N%&e4 zkepGVIU;Cq4uf(z1e&7*22Co683N7Xqd;>`H>2t{JFLXJ|j|SyMV$|8%j767mK$lx;Yv~vc3g@Eb7~fo!|4g-C(Xx?oC6tu_ zlcp#?23p2}M>}euh#1<)#@wG^Il`B-ObK=v1(x-UYe62FStLIeSjGcbo?ipL#8FsO-&Ib^6ZaLS^xhP}#v1ED&TCdZZ08WjrwD z&gupb#H0~8g1AUIB%l#Wx59o1DGPFua%==>6<`+oWepN#5U_q>6%xS89RZa6W1+KR zCENT2$}wSRZ$p4t;>`uhcmT@tD*P7W^P^dQxq30$0v2b|ne3NGPeXmMoJ=i(7e z4hW^e%qY=@2PTK)K|2v>@QLJQ$<4)_Ju4cXn^-&tSh6=NP=?nG9+n)Q1c`}^pr8>f zxuyiX!Pgqffx%ps>a*z+Kc$hS6*PkFcAv7J# z5Mq`)1pWlc#6gf;oQ^hCm?pd!*(VxR$+Rh+JQz79tOiUGVnsTPfss>aFi+-djYC@? zycpRdkK-JuARLU0M;JLgu?i?ly{r3J5IH@Qlc@?xuB0J|9PEuI>rKuxc_4CpNFhvC zgjvNie8z&v8HtUs=7o8b5t79Vkv&4t^q}0*fd?Xo`NK1fbX8XNG`HVFFuwlCRYd%^v|FV~dc#%m5*4R6|;9 zYmx{cWUVrUGZ?KQya-ttRHMg&>U(4W={{ty8+$7rmruBoR3odaVbDLqjQEn5Z=GM^f} z3Da?ux)UQhNRW+mRP3|pa6bY;m2^C_rKKiZV~`yawVGO4td{nC{y};yK17c-+|p|p ztq@U5V+u1EK#y8Lb$P-RaV|>MjxQ>hGfNIB8iA6<^`-|WWtY+_;IZP;yriJ%TBP5i zWCDRCCPpCqFG_|`Xe??Y;^JcPPl!ms0dE``3XLU*QmFN^H~_&UTmyXAgu!F+{5Tw* zM!*Qr2$jSt5=O9sR8AcH8;6IFaP?R|JXCq%AzI8YLY9?nrs8E~sZs>&ASLF*lFO;f zWh97RPeg zuNb;p8VgTtKo~RJTt(#*fprrvseEKS#HVA$ zINEVs<|_)f3CiF($QSOapbAka1pFApS4f6jN#&Qp^CRFZF1w2=NH&H?SY0P*sz53c zvTj1@*t~aTySq4~l(lmk!o4UpQQjpMXs@;^BqmW*;_0JcFDJZr&tgmQ3MxNkf-9oE z60$p~M6zKJqP-dlm0-4S^)T!mj9T7ar$_-WP;~iGCj*#P9P(X3?vTQhWn?I1a-|fO zOr}&)2{WSr_G&7D5Gl)oQK)xAD7c7E29LUO5FsjC4tZ6y^Y9G}@SEjb;em0dx$?QV z(45PiBwgIS{e!}0hlT_N_ZH2z8_p z;`wE%R9PvkYEo8F8Lhm6R$azl3eUt=z?0ThGg?$rQ;iDawX zA==A{R9@#VRz<}iYk~IiiOABZMEozbSBev-9Pgt-p;9Rti1uo#Lfs(*mUCGz4p{Hj z3aCx8B7>4hLSUN=|L;(5;tXUKc}iHCm!_s7m_?Z|OnOm-@~%!3s4sjnsLT=R6_KUN zN@I8flqClPly#6r%ARpaMiVrkums3fnLP2ytGzjy10jg?ih>Zy5u`W6g^bKF4F%FW zLA45AI_L3_-t~#7C}l~I9z`dEyJdxcA-$5LqLT~abWq;pTw;OrYAaS#3BE-(i1qsCx{{sZAna{{wSWb+UX;k6ACucC^|xkF7E9gMuTMg<9! zMl6;m7Fm1*;LVTKN8%KmV>y5~H3ljfQN|(pw}f|fu^h@T8P&s~KxEMofH%XpoGL_~ z7%<3pI}<>nD0y#sVVt(F>CNT4J4&UisUixF@gwl=U>I_ngA{Zr@Guo;cKk~aa;hVEPlRFx zg~16z-oa3zRKXjQ0!IK|0R(tg)as*tKpHz%3^Ei0R1-zlm|?(cCRI%pR-75dOL*~! z@OGwi`X=Nx7z#!M-gIB6`J!awfFZ!UZ=J6gNTTR^{z`aRp5W5K+#yk;_->*VxL;&? z*f8GRQYckR6*BYXrMsNi@Hj`0s!>?h-O{r>>aw?9jnN|J^-c7WFVv)3mhn{$%j<>PYDfLvU>NNj^U+`{o z{$#0gDxR#I)bgM3?gUg$nx3QZ?#5`bda4YCYUma|3hy=*I)G>bStXviY(&g49^u^- zPiVdri-4bW7lj<}=&}-Tppq%7(|lui>26)VBWmtaT60+cjCX}#QO5~5&WW=?otL6x z*iXF62{_&Ylb;6gId!6AKMbTi2{WNVdlp9&atF(1A-zA`6 z;}kzdlNf>n0Z9~6WmP;<4kh2J$T{nV3_gxYI8A43sqcJ&BWoia5vEtdN*N;g)cAM zF+z+x>qDUwSWrt8Ok6{LMY~`?X;z$*3^L!+cWk(u7d}O~6bJcHyNjF8))<1qMwwvgujB=yrF@o(a6&0bBoO50SgIN(aQA&zV#ZeS&+(!W3I8;r)wP7lMZD`* zFUYl#k!nWEr;&(P3%OLy@h9RH#N9FAFB!iz_Q zH`*Dx8H%yTFyJMk;4y>2m9rpOC9-me?+(TlZ(O|~ZK62zj96I-n1%2VUI^IDO%5{! zmk7#1x6Dg;1vqiVoW(eaq8M5}40wmaiZ`rk2~m`4faw=!e~L?ZwNO}boG+(K)o}a` z;hm;0Q%xoM6c6)VhydoG)U``XEyNpPYQl?mBkf`27owPWjE#3A-PK^eD@eA_8OFOH z4h0l%T-D}FrqqFj5{#jEVgiaM4xR`(7ErM98Nqjb^h9pR0IV^Szz8gLbEFw`L zIB8@oag?VrWR6HSoioIDf5s9o%|UY$K3P0RXmc5HFqSw_7p>hCZGCwGZ>R-Kt%!1d z`C|dzu4EY`M;yuF0$xFGByp4*v?u|}1ScNA8{<7_lVSW2;2j-Fyue!=1j?X&k`aJ6 z9JM8aIb`x@9C3slSSCPm%oq#sa^i?rG@&^opDct>a0oAHD2{lFCghZ$WXnT%;elEx zL?T5wFzGMY9&gNUPM!g4{1Y?1H}h?f&Y+&Nnu?3Cd^F^C}+ z7>ps-l!slaUjc8#WN@W8**^LAfEPs&caCX?a?pV-9tl~M31h|&Lk|rr z3Ac>j;9V3wyn<;74#jX#G|*k*VC*o|>T;@_oZ6V7!%=>kUKFmTi0dxQmIKr9u;f8lmw>Qts6EsiNrfp;xkpC}<2Vv)sNyoeGF=oZ zyr@_OJTaJ45T}6xg@ZUFz1EE1AYDBTSdqz(z_}brX9!;FNI9F^W z&ULh?hQUPDbC~9$2;t5O9UeIi`2-Xo9Oi`j0!3>NZh-I*&5ie#LoHatpG$L5d~j!l zK3dC>QA-$#4i1`vCIb^3xG)z70mI&~HzYt&9b&mCICw$X;LeIDHz^0^`k~zl!X)RP zFgGqh4J;H;avx&3C^mR*p(fh;80;x{VXiwWW~FH!qhM|b%B6su(-6x=p~0=0itr`| zhty|s1A~L@kOwEs@ctPX3^OrEDq|bX%W@fUGT?n_)b9irY_=8;hJxq)hZ1iE_)QarP@XX}Kgf*g*~yYuNIV z+)&OCM^SSfMRJ=nG|{fHESa-GJqF43w?MftfU+AaCOFCtItb#lkYSEH7!h0*gf>1n z!zKc`1QZeMH39Y6W==dHH`X6*Sdl0Op1*?JTr(ts!ZC}>aq$ok9P9{dYl6}gUXB|z z6}(DPunGE!aRml3ZdnN0IU(>;+92&GDB9YX^6|xd4}dqJVv@(D1KdHj@i*@elcEHNY5z)QCYQ@mKoRS-4wfqDFJ(X%it$;BBsO1-sqHpDY@nq81B@({EJDO#Y5X`W9xo(DgJk@&R1xf8IzE2s3Mz*4G{iy- zagfi#HZ%=50}-&A3{^%}h6BtXjX1(oTr>-NUMOp5x3Lo=!X>kYWV{4bR+h=3YhnaM zzm~vpzjDYlfLw!2R+z(NH8B`|qJ#{!97ZjgERHH8Du8Gi3hTv*QYaEa9GCL4SV1hF z0MWW+X=xdnG@dLeLc(*9-&kS2eEj_7SPVa+j?3WZUkU2Xo;)WRcKRWp>wmBRuX%uv z4~yjoT8%D#ES8UtZ=7`E+r$UsI01{rlzW*q##R?5*Hx}0A(K21U^1~96^9cBEgsZ z38PDddx;KRgMV{AgL_CMk|4T>od1Xd1aR@7;E8ZX+dEfbih`Q9fr**rl&RCEO|_bA zY78Oeid0Ea5moPdy+BoKT#d3gl|MMXs=xRgg-@D_Zcpdc>~5$V8C;i7Q< zBTK>)40wJdR}#)UWV7eV>rR?7-Nn<_KPVWkKz|=V$kWUWw3KATg#>=J0E;66N7K-q zXbcCoqqBG{EG#BZo@_bdf;ZsoJ#?hdq)EocMurn78Vp`~6Vw$cVuE-q27_IW)SsDb zInz5RA|@d@H6t@KBRy?SN^(MUsIQByxt=OjLWsaI^=FYmH!CKqX*|`z&3l%wpPzp~ zKww}H$MTS$S8#ApP+(v{fWM#btXbX=u|14l;U}SP3 zbJd>Hm#*Ku{^y0GyVi8nmE>k5MflFN)K{U1!dNq+5D3CDT4po-W9C52HJs;N2q$_M z7ej1xNeLW4#<@!2HM|8UeHWlG?40Z@$X9wAx>6G(W;vK?P=pB>i;tlGdznvM>52<4 z`;aX|SKqt84=$-M&Wa0gw9rwI9OVL{go;UUNz1a0JNE8}v)hiJICc8W*>iuKKY!uE zMRZ-baN+zPXW`J(C&akmM>r0*-|xo`a}gWyyOL>Zr$wK zBX5WF^8W6B+P$DMH_q42NL5;RL>Z7M6I|}X0h|99*Fb+??~fn7y?uTC{e69#T+LOa z@NFpl#p1(o=;83y2PbC!yuO@WRGBr~*-TSLM1ZFfh{)+x{k-Xa@an9$rG}_qFQk04 z;{`W;-@UyZC20vs8ReY^;k-ib^{Jax9Or4NP31K}Ovz~V&<+2i-^;x%)%0#d(t%gp zV*j`+-`mE*WTL*FuAaf9nJJr~Ul_dZEv-!PnW8NtOc<_&5~^mqhCcqE{C;2HWud}p zdfe3g-D%EKO?1>0VX;D$l~-2Rp6I^dJ@>bbUl4_RS{}a7KX%0p? z>qjH+bFa6pv+PVX<;h~gfi|jhsb_vB z|G$3K^Z4GaM?9(C-n(=2`qe)#U%q^adtJW#=bu-v-?%%}7=FCI96eo^D#UdF=>LN! z{dm0mQ0#A|CdqXG_#Y1Q8Q1FrGs$J5obaFnK>v8>zi)F<$P_h+K?g{vSsv%){@tB% zbHan>Bqx0t5eA&MH(zj?Z0)Hv#YT_0hs zCXNUFf)cXbpt#IfHDnz1e`ZA4XhH*pQN^ z3VM#C{+^ad8+DHV(eg(Wp2HUAa~((hUz%r6Q{&V>v|J?!2oUfX=W*2kp(eyi1wCpB z7k4R(aT-Vc&rAHw6ookh5XT1e-+1c3k?v_EOB$Mk4w^8Y`n%&Cb)|_T7J}oN|3#tG z)Fn9M-?00~Q~&!SA5#TR_y1Gw2l^@kS# z!zD0o^}naq%Unf#XaO|-`d>!bOrVg47J%cg|Cxt@yeMH*?HkAb@9`963AAH1>KeE5 zf1oGztM|t-|96#ujr@}R@oRr~q(|)m4i?0?`Tw@qn496_rvGoDQ8jOz^M8x0?z*z$KNN@ zwPnXJVBGTmB4p|Ws>m-BpmEdxCf64j$WH{ptpMYu{{u7CXR)z3Z(4$zX~Y{8Fr`{V4hz3WJGH;K-B<~C7=XDKkw`q}$(ePI)9$ou2C{^joT zUM&r=QWpRB^gpYOv{r|s4~DMs_WvhVti2|ANc;Hv|Hpy^2W>b%V(1$0{0}Tmbkv~? zX&?XmvseAg`d26XyZK)p?=a!tEdNC@)3yG^`rq3gVe_xH|N77=D*s~t_q+t6az+2W z_V-r?Ffg92i1F@!4#Wck5KN6hvWq4OW9UjG05ufBF~D-H5!1~>Ws!{O`EK%(O{_pW_`c6xH6Bc4M4*$WT8B2o;z9-`YfCAsL4c^1i|Z-h84 zlC;X~;fLOzu4^iY@v%44Q&*Ccp+GQ}tfJZk3`MHDBc zp@*7#<|aAmN(+prCnIm=<0ptv6<2a)v)P~aw^e1w_`BLoF@rz}Lt|4*8z-OHiN*VV zaBtb}Zwu;)zu<3Pu{beRvsQHfi>5?}3FLp$4?%wdqLLBA`q}-r)-=&_k|TqCy*%9A zJ!b{Zj!h|AG4zab&r;86dh-84Jq9nXX0Zo}yj_Df2}VCD!D}i!zr-&fq%kBPCF;4p zfmvRVotBc6n3$B3p5MIn0eTx<4@zfF)`obEf6P4wgO^a7dL7;WkQQO9`5*Ly0R-F< zbocNz@aFQ~mGfB5^p?)`NAC>BB=l?xvo=v5bMt>>mhfUqGdR_yr`m6d`rw1ABkvgT z7atbmh92+k8>-p)dTzjVieCU*RGvd;Gv@^IeMf1*Zbie ztxuryhl8|=hOu)((}p8gA3lHm?(K`mH;->(rg%;%XuVgIR;}+{rINkylpJ)HRxHH`B$#-Pys~!g!*dj)tfLRH!IQlAEx}@ zWdG}d|MkHCFFlYLZ8RB!+3~X8%fnHGB!_s6h_llSA2g{zKSVV74$WK>hyKd)akR&5 zx}fj^{t!%e3d(}`4Jq`)hgr}`h2sP;&NJ+M^Z8yM6qpxwDn~1S_RF_7Ecp^NDu^0( z7`F(IC`pH)OyTj%ye!@OJgtl%iVinB^lw*aagY#-(D^{oAdIjc{ZdDS8Rjo+?3YU`c|Yx)ee6UxLW1B=Z0 z*k_V>joVe*4%@uENxi)-W6!gs_JB+6{j1A=EtbMZN72=L=?gNAERubtyM2 zdEt7;k)hOF+V@CVd7VECC%Syw#jecSBN5cbfWVdO`Xs_rm4BpmsCM&pCw|*&owdec zh0E~}(ePD=J13;G`@d=1e42l;kMZEagOg&#_xaydN>cs!79XDEG}W1!t+&Bv&quw* z11>Y|Ur*on>O*hhg~Vzvv8B2a>6XRwu{qu}>_Dr{_tvr>PZy>Q_)JyWedy4kvb+29 z-d#NS;QqsR9${& zd+Bn|S=t+%0t6)u!|#`LAI0mnXI#H1>a-Xgd*Q3&z4*HE{f8^KV~=HggTEh(n3j0-+PyH9Naal&({Yhu$E#z};Hm-UeP96-vdKUWr6(AQ)1t@vYAyA);B z1);`I$JVVBYFw|qVX>*T=$Czdo5WspNMAX7F>}%W*-ziRefu_ed)#@81q&B$mht&R zPu-%;_U&I=qq~JQ-xnNr7W6u;)6>4B4fp-eyjHQ}>(gsKb}_yFCSIE@IB{uJNX47p zCl~O4>Vy{beeCbL}Yg)D8{%K&2B> zi`}(0TseBQD$6K!;y`espW`&ISP8<$i(9hw7N^EfPCCYn_oXi@riSg!e4@O2$Bs}> zEt%z$%5UEmm>~brUnpf#ij@9b{>QGt_YA64Rvs=s^!|$Hzz2f^7wWnn%e*b^eg5@t zL)EX<3$TVu=l)&mre|}mCH%=c(SWr1H7d^Th0E5gG}h2+_S~^#OY7-FUmndjbjojc zbUJ2wXzi1LTM<^(Lf0Dt_MNDBy~9X~q9nZj>9cAIn-so}vB?G+N) zv%aZZ>F9S0xVDn zuvo*h&agt(n=^k1ItbYR(EQ8#kB(!x_zA!Y*3+GhPaIa=1 zpP=qCi3X-*zQk0b^ybfzF0?s5+P+zn=qEixNP=SPwLKCkQrosytXjM!Lhd_0C~jUz zq}>Ds^2D-(>6A~Zt@C``TnKYR+%{~R-x243=g|9aU%wvWXM8W!o*QkfIsIhE`z!9# z=eev@vdnyZIy{m=o5h|PsEZ-(U$Pl@y7J+%CHH&#YGbY(AfKGoBr{;WVxj-%$iI&z zsN-#yifxxQ>`Yv#FeBih?vEc|YIXfrg!xRb_!Czheq5{V>&C0HkuJ8el7IFndY@5r zduBrTsJp=@*rs&rotOIEw<7}0x*y_#=(n?~OJ^&01*cwDe>G|Myjg$ft~nGn_0#2d zDyugeO*}NULK+Uvzdk$vL3NqngJ*5l*;nVP*)Avv{Kmfg__0Q7(&yEZOe|CKeStSW zakBJPX_Af2W*K_`k@^@q36x2{R<+ezEIaIZ?|uYaOHD)E?9Cd|AfxQ zvnqG>!1xFl)n%(5RlF_ii%g_a zOxM{^tpmz5wFGMdKJ{i~3aEaF3N$*<5&oT+Ec@q-oVvAwCz_%>j5qvfd7`U)$0W-C ztlQ5&`*Xhi*BD)s(#O7~pYPZA_1q6E%}n^yCrw0JyT<2x_M!W$dQ+m|VK-bP z>99I3#`7Ers{hwPTOLK`9ak!htFEv)NwnbRC zAE~+YC-KMIEk<)EGw)tp-s2LPRsZdZe`bJMq0xZ__ZY2Hh(R{TDju{SZClKo`Q7Ev zS@w#(XWQ<(_L$jAv?OY#mnuDx_U-(!t**61Iecf*HBZ~?9t+>jdY-rzS9c16dLL(9>3AD>%IuZ8UfRvu`A05%5lOblKH;CO@yOjk#7Ri7>qO+H z{KvY6lkV%vll_!}!Va5Wf0E!P@#o%zIMYR4R)y<~wk4|+J!~HM<9?Q-NoAU%Uelq{ zZALY1E5w?sOx*;X-s{=zayMP2<|TXlbO3h4qb7a9Kx0RIz%tnyneo>`*h+Wm0F z%K4rRm5a1KUaxSnTGWv$_eAHr$G6&*-oZyAWJz5@WIg<+s_Ndzowpk{3;akd-kt6< zukXv@CGV4u%N$$fMKoYMKdVds!)3j9dP2&C(MIzO(UBE!-o0{x;FdGw7?RPH8R`dcU5vPjjzwCUD%Gl*DtOzETT>RO z=vQ|PNUz?qB>aK3ubiFDrj9A|YV)rr>q5OL*&V*=s9=5NyZC)Z-A9i;>^Iu?%2?m? zsNSk8YdlZ3y>H#S*J!o$CrO{6OWTBv6Ao?MxH0cshrzw$XAbEVKUn>@O!2<$H(#d` z+3%vRFrH*|(TZm%B^@aCOL@{e(KWR1?zxt~Cx&0yvT3c(g7lrX_wT$^tiLNdJ?uUi zJ9$6T;MV2KeW!(LSN~vtX}@~NaN1m(Y?E13N0JWzpN`nKSLmsiZ-~v6jIc3E^AfDP zP-SZE*=A4ax%kw(*N3Llx8pULba3%`lSA(2l${+38n>F7+#{Z7#iZ2DFknpx-k=)y z;bhfbk$L%Qa&sDF7ELJ^nIEVx=R5?V=-f21yraxIu}AjTxv zWYNWWa^KHf^2Pe#NHVQ1_0$VJ&y-4g9$eh9YuCWLLtB!s#?L#t^@T-EKsj6d)j;Kh zg$EpFyB^ANO*z)Rf9IQh`zNN}x^-91d0$86nzYrI_&0k^Kicx)b_$NDG1pg?I%pbRcDw={n(ak8K068TQ= zkH?xnUx@qoSLa#Er}_4(U1uCV1~xvO^w$=bXG`?O=blkjN}V8NJ3+W7>yni3R1M`s zCp@(}YGvjM`yA+HCQoV476`hj>>+zH>O|DlWe(XceA8M5-h6s~?Dn&+`T2dy;is(| zV`AJk6|97Uj`3;sNl7AU_m>vl*_YE*o&M>g@Qum#Z~1$~U6#OUNj={t_p+%U_sTwD z%yCT_I1%!9>Yh&zYc|&7eAz*|pAYX|mhsNK{Qk|gQ3KzP-Ha~lKmOPHvQKWQWt+TI zM0Ad?n2!tFu4`X&M!8c0*N%}s+oHpFN_`Ej@cavNTliLUO7Hy(Jr~N#;(Ke4SYDRQ zQ@?6Sj6CeJUHInF6Sb}z8~q7|5$!9<0Y3s-viR1mthyjlu6|d1vRm3!?8=sI;r5oh zFEr9m8&FR_J)q{d(=_t?(W71`zsO52?3z;i@%^TyeX1If>{hYAu(>A59||-o*RuUn ze)J!zx~Kd`r;nJo+~(uW=g*%@sjDydo%kj%m7X@xefLhrsVU}~6X}|^swC@Go3exqthAnm@z{lgdEMc?W6 zSblKTkB_es4`22Ddiuko>EZ9@Yzk>&)qYyPt_!ad}#2*XsLIYI3MY9K@VE z3@O?s=9cr1;7E*t%<9v==HaKKp31q-Psbw|XOthd z>f_kU&%}Imv^<-&<6Cw3B)+3-LsjqCt0 z$y=9h*SvLL+saE>-+%PHG`Q3J>PDX9jg;4^fxEXEY$M5gO;D)9oRj+FnvsySe8$1j zS;t;p47+sY+o5N(()w?8H%;p<+mMbuB3W#IcClyj4Xdj9r&UMo#qClpF^XFzyV#Ow z?OR({OYEDIb?iiaO_X}x+K%(z-TB_iuK4rBT5T~hW9iDrg0fw*XOs&%KXhX!(LBE& zeJ3<+B|TSRp}fKO585{0jy#UFDaiRaQ#9n$eCMP^i!PEsr74_$-TPF2e!OylUjMCD z0a7i)lRT3qb>rq^pJv}GGWFTTsP5_k{&a==7iOLzvp<|rxYZHYD|daj!<4&Qb#}ej z)wp2d{-<0iH=9}y<5Vw5$c;wXr!$SqLt}M7$6!CcP#i^EG zC?xfgmBb1cTF<4PY{Tl#f$%_KO>tk$6_<$Ekd*f6k3KidoqoZB6ruiVCI1V4Lxpo6 zw|N*Z4YoYrH2LM<2MWKuyf(w8O(#X#*mP=K)u9>?{TLI@#WVhOtN!Mzk3Hf6WVIx-BYuvg{ev^G|BD>$# z>wZ^PSFyzQ+_$!^mrWZQUYwS{xp?tnw)8A^p3D6brw13Gd^B%}J$~`cX&LsFMb(?$ zUQal1Sn^rKWcdftyN=A-+sgjj_c;2S^@38ee5<4Qx>HPjR_gbXSd{~76{_~DRCGp) zY+I1q`tHtanK!4W<($4-`0`TE+k1T{9|zpc^LzMFEbLn5w~Y%IrY5E6Yu(xYAfkR{ zrrtmnMS{=DCNnnk(W<-o&$|0>zt8KM+-bAUicd4|Xroun&NC)%srDxI2(E)ThyDT{^qjO%?D-qTD>!6=a9rUR@EOVIPiBjzxF`s37NvZI(@RlGTqkg z_YRn)b*Go`#apO-*gH`HasfW-$(1XM8)cbz|3_ZDZP=yX`s$q>QR&$-q zwymaWRS^f4uPvUioZQ`4cE|^_{EbaFv-Cqx%meZQC%cD4z4A=qYnaMs{oOT*Wt*#J zGmqNfA6$I2!k2e5Hk0R8*@@p=#9H#*%YKb4-xK?eDc`=Q9h_hGA|#Fe`p0{-X0ei& zVT#IoR~YWfnZ2FwwaA8qdei9Jy^Y867);-=LxR@yXXR5WI{xi!Eox_*Q@~>*K`}VJup)Icpw|9tJekS74JN`g+ zck9tjJ8h&f{W@;nrKol6u5XXu^v``@B<}Ly*6!JlR`o^Py=Y@L@SOc&Wqp~fv&8E&jH&4YM>v6ysyPCVNk!qk~t^{`l2Oy+4wtZ|?ul z`*-Qr={K~>6xN)2y6m-A%`E!7*E86U_W!*(DW&dY*_T5f-c7naNir4I7afsF>*wOd zCffGwy@378R#u{pd8+TP`>|QpvoOoqC7YYNo6OAf*k;$B3e&JNwa!Jpzejs@(AwX* zXJNGEewm|X7d8J%b)1+Pf3Sv>5Ovn4yZ>4CSoHH;iL+FyTFB(?8(v z$%rmhq1MnZzREsVqr-RI(NcBA9Jx+?;r>6KdGy~Da$J?me)cW5&&PH8ijqy9LVL93 z@YlNzEPrFtd9JDWq23i2TK@WJRVl0Q`QJOAzbbFeqKo=8k+03_!dJshB{I^Izh|6# z`>77AP~fQD(AqWd_3^9(%IX{Bsfw=GeD`n3eRC`PsQ065M_64~25=sd?C(X-4EwZC zWvwoK`;Ne#QpL8rdj3vHsX<*H?)?WPgSnc*(F*WAZ=QO@;$vx&dj#`zNDmFmMJkh& zuk7EoUHHJ?hcmNh%+0y9&Evt$&^nn1$Camb4xFuJ=RUU}cs%*ByzQx_+_wna@~@k3 zU)%MFaqmW<*|z=aJ*v!8tNZ7^pFH`Me);Ad`I8TyF?#sQ#O)6u+0R(<@E?huGd6zP z>G`F!@LWSrb=IQ0SN&dPF5A5bTkL)R(>=ojKUjtyckbO?Kt1(n^VV&PaGghGinTsm zzZ*MmfK6G|o3Zh`;CAr=VNt$2MV=Q1&OiAi`&}qkt=+A^ceBj9-j^ZY1EwsLoYmai zEVU*J>nW>c{K_fP)b-KK2f}ThgnQ)E?Q@ij7+ci-q%e08LmNMuU)G%F;=ZAAq01$&EfeoiTEE6=oO;IJ<+G- zYiXMA?Pu{vsDIS(^oWak7nnS^|3)5tAk(pU$8xXF+SgY5Da+mOuoHiD?@(Fa%6okt z839?*#n?9r)2CH#sb$rZ92=OVdY6W?4J0>GYGEAa_RHC%9unMfv-zsWnq#BB)~}v;Mwqhy)1o)9>2_{{m-unDc?^5+;=T{37N!>nILeV~ zw-;Zvpx+s=*)u6#c`xCp*siRW0PW^wtO}9%kT;tJQqL(hZ(96vP8$8;LF_U4YLB{l z{tbM}wF2*ttY0NanmYehiP!Pk_I1*SB0uQ6*2H>86i>I=cot)DcFslFHalDgGf&Q{ z+IVWm**wp;u6HMWxmiPT6DOsfxIZ`W@AKA2f;4;YJTs5)qK5drew7s6d+LMTwW1G_ z*Oc0p1QD0U*>)au5=_7Ov<;K~%<{p_X8V|V^Oqjq5O}EnnDnh}mWDbQ)#ASV&5D2Q zF#Ehivk7ar^i;yjDq;0?{|C!JG{5cIwaakDmy44C5RTzp=1<*Nu#a2~;RnOk#bsq8 z;sr!YQ=<39Zj+O)jpTch#!Kr{K_=XvPtC#pl5P9;D!b+heq~A9TlVP4} zMtS`_Oz-EDoAn6?Lgpb}q#2bH!#IT=iEg$>ia%lR%6t|(h&Uqcp6*q{Vs;#t0|_i6 zK7QGO#Ncy{c6cITecg?XP>!pi0Q!-d!mZJsjhA&o4?ou+v_P@`$AV!(F6xEFq5NfY zE>nObO*$L5Zya7}ctgf9GMSl7O~EI`bzO!Jc{)FZo|cS0I#sj}ZOhxoZv^jwOKQm3 zEHY6%amRvv@%S~iySUyuS{j|eOXw;16sYouKaCf0BVJ@`K^9DWd_%viA70I^^nzh& zS+DA5{ltfs3X_)jQem~?W{e{(+w7^>4`D}+cxoA6$fqglN{a;F^{rLZa{M_#0gV3740hU^lNfay zW=4Jq7lnaq<8+#{%aWim3}^f8sug+r_1klX*I(!SvP>kBwQmeVT+IX5W44$bAG z_Vq(6ED`7EUz*BF&BptxTb-J}Qcp&@=WnmrKW>Tzt4Hro@qciD>6 zL0qGCVqW_JMfA}-*A3cp!=3g}8m}&wgrC!YJ*w4H3_a~2GMskM5s% z>@=epfD#FwmT)=X+@}C;cCc56+wA4Bc8vb9>2<#p0C&h=ef3q>P%;l0p3{HaOl1H0 zwwztHem=rquu;rnzi|9A+|}Iz;dh&jZmqA8pHpZGKZWXS5q`h7r3j>q2x*C{lolb| zk;I+klTCg0{rFudV)j0TUuHEog%A%m?B}-}wv8>5QUIF%`!fK}1S-w~s@0)5DFFEi zOG3ORSONEKCK4rKlkgMn z-@o6j|H<%F05oG*_y6>zdHZ1bai0sE(_g{9HgKu+Td%by8=c^D#MfpYg~nF^8u^Js z(9WsaMNV8z2@q#mwWS40;H{?1?MP%h_<#fV+zpokeeF~BU*4J6jNE)e=PLjz1zLX} zfU^L~^E8_YXM|NWp-TYFBMP{8j?;@d87@0$XEr3^1RoWOvGSVHMdIyB?vbJv=Up^C zGbdcb6PNIl4h&Bd5{k{OJeFYG`-}a5R*pnx^+=i7u;!^l=UAMjU)?02=)9BB`J{PnV?U%9X$F|Jzjb8LK>YP|% zkBx1>)W2bR)c1v7BdA7y3B5+!5Nf||LBx%;A#Pd@&`fS;X~kMVvl~frxQTZ{olS z?|;CbhZ|2$%QoTs41-7^4FzeoVL(X&+$04~LNX{v+|rZ=o#gzboGyMkO-W5sNtN;- zZ@I*oa>_Lzg7xPh*f}V%4E9B*@`Q0qkW51kc@YH!*hci|z%STi2X2Tyuqz>M&@_ zgGW~21WAMS21b7}G=(3BP8>6nk;yozOwm4Zd&V~OVCp}|*(_;V0Nwue_(fJoG+R?6 zzT^Sn(0bn=^(jEK#6wo2mtY+&JR?bbB_L(sD*!42Dz#)|){bJs^I+~$yRi5&dfXkS zm=lgvxDAbw*#CKV%l3!=YUC)og~Conz|o)6e}4u*;io*ar)F5X27CAl0QpM1gt3{Q zQmShk6MY6|wA?>EJ^9MtJw5Tl^T(nmuDk2zpKohz>q#_VT?A%p08wJJ5DuO&aQE3d zt_7Y%l@(8OF&zv9EQdi2l*7siDY=S-tCX~qCJ>|Ir%S*a6DoZ=P66fWoMIq8t{RpP zg9&NL;XE_$k`iHBPFcBjDu|e9!R`| zuap*{6hH!WjVGGy<=Az$A@|C>5$9clcU{u7?uRdmulvfb98Umh`mZMeQUX*CngNgt zX?bA?KxIP(Q0BhrMDA|-RJMo$nYl7|m7XbE_7}f+;=#XtHp^Cyv4gu>8jG#?c9S}r zMDevekrDx?Yh_KfIJulg`Te{LajRaH>%*{e8Sfk4@4NjpmE5XZP@}J&zh|?USz#HO z!Av26SpxR%p%mh_siR=c34TdnHZGy{VDs;>{%#w@W?XM_c3-ewj{a0M?4y$6DOzj1 zXrH_(YxvH?oUg@lT!S_2cZM!-LeN-V=X3Oz;QRbgN%%wCaux;pea$woO@eG^QzB#i zi4ArLjL zh57Np_RufukNzr$VPq(Bh$Z`eEDX|JVvt)+ctbBqIm>StSgCBSz2mgStyhPbl7 zDDZ+3{u%m0pwH1SrR}oB;$C z0PzF5;rjq#3IJtTVR$lMRRNH(QmI1rGmoZTMtTZA*CrDnf;&&n&XyHH*x~AAq^;YK zz>96>QYLY(Wc)baT`7GqTzC-5a`Y!N(J+jDjV}Bw62I7Tc@N(Sslz}RpBwD9eW@1f zYMl{&mPdi-=uaa&aJ#m(;WJM^cLk;$m786oV$3*()?(JuWZhT>QrLaLr&~I$4Zgp_TK(x864Tb<-^?VW6KvD!Q>;K55w2k+LlvV>pXnotfD4 zxqQUFfz7|t!JiogKp{MGiC$RSa@Q%D~Up2qcp98~Kw$WZ3!;AyRV>%~t@_60+Fsj&ek=Y`}X@@6Q|t&kz}IKycG=iiCjB7u4ZoF1ke! zLK!l+2&gb0GM3wvViAGjjE?r)#X@K#|KB*7;mXan#xB>)^N&H}gAWBO?nw@~QU?Yrkw?tJl6`v`>t zr~52VR`@WU!oQ|5W!Lu(f><+(RB29w=*e$k^v~nqkNQDm<-d3Q5AN!LA56gPvI{}-2L<#{naLxL93}b6$8Gs zV;@|7)H(x7x1y!)T_svmN@lt8Ic#5nx?36790#+$vicIRqh-*v+wJ*bKPl zg4oK2s5N7y#!Vn!`2AUcuLM{LMK;thlZ0Lnjhx5E1iR*tV z07Bm2f=_|RrWF7Qq0T1^c0BUbZ5EQZ?n)LRVI@2jF376HJPcEKQ1B`Id?9Cj!?@kH z;xIDR!9eJv@AUWDSRrXW<*B$ve+oZO{?RYRlf(S~qOPLdupZq%&(WW||0kzfZ6Jep z`jzpz%IYc_N> zwC`LS>%`Llerk*b$!ZDU3qJ+l2|suWD4qT!fQe7w0o?Q1EHhX1QZ{^KuXhU?Ijm4QPtQ-fgW`+V3c;5sS02P6h06*Hf zE-`91_8dV^`8wM#!E4@J>4+zEa8WrXNmI-(L4(eHz;-@Q%qyj;QeIW{dd!Uz$_X}1u)&IBmhm2 z;ay-koNri&0AZQM{MF)u zY2+7F-k`r)c%`(;6NC#%Ur%19k=1BV;g_WXpq;|he^qSEZs_LdKU;8vIMdHZe=iSp z*z1^zci_YjAHiw#=gvPavYb``!V?n=yK-g0I+MU@0ldj$$tN?7812Gme-Z|VXL(?t zkets(N`N#;V_%)N5#lm?{x=5-U>&foJ=)R|k2d0dMqdF)=ou!rV8sfg0NCxc6#i@@ zUVg*zW4yjsF&|zQDe_q)&j4`7;LZR5PGQ6Xzs+1ONdlbjos4$R$w=^nFev;vyaY4} z>Aa_>zpkBs_BK}*58%;XBvyLopQAkwV{zwSFZ}q(5(l3CyKXJIAFMN91;BlWF&sG_ z&S2KTBPuY}`d-RMu$1H6{;$>+>bXoLVdF(8<_JZHayk!#{_Sp#Cf9dZ^0mR~834Op z%7AX)vJ(134Kq>9CH$q)A4&k5IF*MR6t`z+YCrOE2EYSDS_V-1xe3U-+Gh#=vJwE5 zLJXOPGXPm%31qT)Yl}?UExq-v{W<#Y9c{H|PU6v@xB16ez|o^er`P^|U$EmlFqyn^ zHC*(}+Y~H~RpSI+mySRis17Ls`B}We=3Uh}kWp=%hQPUi=c}0_@AjxNvesxD6@0QG z65qNKAMY)hYJ$%c6@{OXz5-zPb2QIJBZ(Z|*)QvHCJPuK@xmeZHCYP36oA_Vqyh+b zb|Ci;yjLRyp{%a}H2t510=TAa!1|g-Yp(rEL@n5ZhkK!oam5x!evbYWe(ocLt^Jt? zw|&{#)`G2WgJb@D>8j6S2|!Dx663pw@}JKae)##~4r|{G9kBAp=IE4ro0sG4{0-*j zk&a{}xSOa^e@+E+l&9b`GqG|@04(A&oYLV23yb1(7_|MOXvwD_=Ft&CHz^e z|6_O`>o$)5PNb^W#QqwZOxmM^U9%qjQ2}u0e|&u0Ed^K#>yknD+FIQD)6uwq$A9I* zxIxLwQ>u?Ss`>ncPC# z0H_4A7LJA_GKkb(i z;M)JvHDh&#~n>7Hsh7a zhZMq+AeNp0Xa+!dYu^#jk)Nfi&NLkTQ`ms}W`B<*G2&D3X?X$1@#DwcnSc7j3}*nF zyP*520A?lzVM*%>V_W?81>GzpEUd1=&+ujBQ7oBx*^sh#L-cz_5 zdjN}J`2GR!LFBb-LB?nK3R7M5pHD{ZQ@g_aZi%!AjmAe^D4!%?7!fOlpH?%ui;2kr zv=nHK=+no05k}!w97lal{b{-J=QjTUodUofKt9NDJ|XILqr7Q`3Cj}}uQ0)2K8DjU zT*glm78Z>6^D@2fS6Y=LsBl4zl2QO1?J4-&tfQOL|LZ%BSz7~M`l+D+sEK)n^aI%Z z1MS_&Psp`DzA5MK`=g(Ia$3J2FE17C#rFY2*+>nj6Y>&M-hxc>s;z`-ryoW)jbNQs zoYTqJR$lPB7$(KfGnaZz@=GXtS`{Dr*vCo)55#Z=pa_2$V3-sFl?3@r7EWgvuL|jQ z>ASkRYFd%CtL0LQyqBcf9Ccb;><7nu+E_HtDQw0Dp|Fn+j_g9!wZLj zvL=KPr*M|)--YpR`o+kV7c`3r-r z#t#pz)>i;b;0v`ITo5L~C-jX9XPENkakVrR0NOnBu0I*@Tr|X+C+GI=-Rp$3T06*? z>({Tho}M131S+-HX9nhx(vTA1qraLE^z5?)r26 zPk$x6S?7*z+pVSHr4p;Cz+S8etFOMgVw?Q*Z>O8Ms?9U*MVbLX@+LEG13&|B5c;xNl?+n(%s@j(X%&>@63Pvy zGkzs<7r<~tX1aqaF<+^O(mx5b&~#yC)EnmG;=4H_@e$g$zx{1DrS{{3ZjMSjcI>db z?z$@&H9hh(Ld*~pe9i!93n=H-wf&$6r_$AD09t|c94w?V>%{eIOAoM&JPPqr}Tuuw2BLc`(?}R z=T{i>(H#aE#`QFXtC}I>`t|!|(XBYSDFhM>2|wTZTiY;d+uL!^N{yX=hYR$>BS*V! z7$1=BX)aBni7Su&^5kFG=&yFN&K=u#SZ7x@8zg`n9#SO}{*&xFBRdsGMLN{i3t_)=$H@V7MRVyTkH@#WTz|^bD^ z!yKhOfD}H(bz|26?)%4Ef67z=vg0PE;`ZS2ErnX1(8EeM79SfRmfyO5%i>Wt`6?_HYp1`4C zDg$3$r38ppsF|ezLQ^bKpa>Z(E*Kv42h%UMf3fTH%cEOeMM`{n1|svqU>C4R-F_>6Qq1a|ax=NNfOh+uVll z3u3C9!5s$N7YSMlgJ>X{2(O@D;pY-m8`MU%H-~mN6!9`}WC5=NlMt8!933f~8p{>< zfe>HtCH#UCey71Wu!qrck$Qf1(IkRze7^|9c!evhnqTStv`X*C$t~!oQJ5g(I7+Ha zg$oArGQ1w6e1c>K)!{P+nS;XbMob9HEqLu03&omM@X_Dyk!E{gq!n+5&AjtZq35P0 z>(c12nTZNzeVaCIa!)KAPEY`8e86>43^py-wWh5zo^tmX1cje<%W704J?N$p&WnP} z87#!_=SqE@!=us8;we0<;qjRTh#j&XJee9naV$s*fRIF#@M{(zK@>!i*=7Nl%q}SC z6T^!*jIZPl=Jox`Bk0G`&2T?XZb3hd!UPpZNTYDUQt15tRfeDhpMH%BQUE;px300g z`FGk8@9_E`I@*i(%NyN?S2?27^2Q&o|AU)llV|8lpo&uPDgnEYegOj zM<65=MdPKStXAVr{2(=VU6&ev4RTP?g& zoR33T8if(k`ogdNcJ0LFEOCN=kLhma8%>YhQ0>G;x zF_%;Uh$wy&eOwf;Fy9|^`(@Crc!m3ADBg!kCs-|gFiv^q0)70%;68Iu@W~iF(b?^EdxA`U`Jd7|SHP-5;{}gtu|NHyZ z(k;Fbk;sg4`?XXGR~j*KSYD+e^vjXkhe}(i9Hmt{!Aj{BAB0TrTc0uH_8BCFBV9MF z7{JRoIQdsY0r1@ak@2Ma)?ahNeS+NyJe2@<{&}9B8-Xg?>a?c2B0TVDH@ zUJvFS{u8kl8^%YgI&8qjFZ7RG7ss*S4{jNKmiC1oYW<3rXbx{*#ajAt18 zMuvVFrI&xM&@XGQd6{1Ivp?zf6}uCB2t5^BHj~9s>j~S`a)_chpQ=iE&`*!=o7ny8 zP#&7Z2|g77EtLTkL8uZSZaxi>ZkAb+831eW3GBQ5+AD=C4dZL2sZ^KpsSNp5whybt z`RVF$`}O&5GPc(JB?jSZziGR!2mM)N?eFSEPd(b-ZKF9n`oqUQwf?8DA3JtzTByTt z^NC!P&e`e)-?0OsAjRt2}l7liWtL(WSA5-hIX`!*!t#Cq^qun zIsKc&x&QC88uUXxkrK4_p`NKoHyR zaEaKz-9Bh9KGtlb<1-%#Wxdl1sO%PfggYVWC&;$Ryq&@?90>jXC0%_5FGY~T-pSIre{K8` z4h;>tJpc)gijtr8uU)&=Z2;2Ea9{XXMgpJm9*M8Sciy_e5R21y#Di?Gx;sLqDC1JVSqey>bgr^)ILX9Q~(Y7&C4feMPMg?)v_P*WXU%g?g3@c5dMd9~2IK1~M`;AB zmFuVR-C=ncUn`BDPw5HC6tZFrjSzfWt|vBOm*MbFt!Ul^w-S0m zDu9V}&NfGm*y_XpM*sOuwy{F9gG1R9fA>W81vG=BKi?*j0?;NPX8`^tASJ)H^dr&y zutLUVQ<(x{7BPvSn4Gu%yrXl-Iva84UyaQ_KKeT_+G5Y1z@xv$naw{c0gj%$_m2WZ zBO&pbpBsZb{NsnwEy2?=AdV*s2V$4lrMV|7H*6j;@el`D zE@h~kqyUH$X+}dlnT~#+u2KRjgOKrrG<4T%>Pf3K!h=u>U68`B$DHXj4n9py+SM&@ z0Vm>9FE)X6$o&64GX9;TlX)KhrQqvhJX!*Tj{Znjb@yMjEQtaTu~f+q0u;lt?Y?EW z1fS4-@S~8i8+&o`ubvecnCH>{P8-9AntCB96c!2yA)oz|`Lz2Vq%-3#yzoNXuwlcr za8N)fRI)6K%A_HYwPT43u*ta6+Huspu!v&=UpdB?%IsHn4%oo=686?8gdfO?Pl&&0 zM7(GO>6Vbw%{;yk2GcQKN`UDX(**lfeM>r1_+>fzPvQ{N%EF*s)OZj$&ri%a`aicn zz3)#R%RGa2P~iR1-&X*$rv69=RO_R|%)DwbDOE0uNYMC%D@VDousAZ=#3Y%+%|nOmboI$N+1wERr~06+jqL_t)|$x++XI^uT9tCj1X{bKX) zVQ&7pOFv4RXB1f0!)N~#U>XX7FDMLSy}YKZxw+Y;mtZIz^UCs;>8S?XFA(FSLJlg6 zYd{X%T9mWjy8eh=)I4HCqopSTyt|Nl0i=&FP{dvI6HN&jCPDM#>1I5Q;9|8v^|KBd z)$0qsTl3?%vz}^9Vg_(S@=e^5G{2XBs33ENnEl?jryj@Je*|6%KP_hf6n zd^^OyX(3xyes#0ll%F-&6#U&AkJzOx!!|fF;Vv(w5}+`VMuMW3?-zZk02nUIv_8$1 zj&LEyFGmVScnJqW3BRWQ^$;9Wks6-R56y(!0&S!<`V$($t^RehMn# z$&)ADNa&C1KHXUNnl)?O69D2QBLzUH(O-(C2~Pt~G_13uk&B@K$XknV3fL4})snH_ zzTv1{)ea?aY7$Cd!nH-T65S}^a@My0(%JK`a`{+0m(9`|9`=nEAyy()02Ujs8*qzVOdd03k(I464nA z6|+{3@QD}Z4(9aJ1mnW|etNone=vQeIE6F4@AmUEyi%N>&UY)17*R}<2ea^lA6K-U zu$9U2nz#N$G5R0G=HK^++wq$4%rkomD-BQoN%%Djke~5nOz!@-wzh`0K{EgezncZ% z?ZQ|hX|E-&V-ZVc_#u-OEjjz0n~vCf`UbHa7ZVO_*icu4TMDLXbfWfxe#UD>i1c+CB|KOe)U3k~+Alh<3Wp_?;5 zPWh<-f}4N70&pWg(g0Pr_Mg%CH5$Am3V?MI5t*Qye&71({qRa|KYg%{U>-lMAE$7J z`EEar;#`6Xe}0-E^NC>`6LXr1bKy7gG_wHK%|W%TpQ6$y3@MnP@Cz5h6qaS#^tipJ z<3(%0_2@GaP^q@r;f^ivb)|0&Uu6d(>#d`;k$vMU0ImJ~qraS<(6YL@R=J26MJysx)L8S)Y;9nEtPA9Jj5Q_SSmwhgx}@n}5eDldrvNZa zBe_5N6DJ<~UAJ!CG!qMd#z_hIa7GbehLLEs7ZW$z-Pyg$wj_{G2S8r?(2f(fAsMkx zd^K;+AIn)QUTL6mBYwh5?c^1|}7 z!?}*W`R1El=ZBT4d`#Qd*Eh{DWFm&ql6j`^-v70|L-=?`?H7M| zX-3Po2Ca{u`jUC*CZzRe78HEVKHR8}k)H}+Y+}kf^C#?GtN4|rxlgR45dOXCb@rvP z8!Xw}iqE_y-J6?e6Gwf{0x0klet+sO1)v!KqUUCoOaX|PLMP}C3lF9V`or=lOi+0Q z6RmLiHibV?DAGenKjM(y?Y-f{LmC&#ibKA4cK+&fLU`n|?>8R@vu9ZZk`E zTU$#>_}#sY(I^!FX94U;3cs%aIC9cD+|d^2roUb@H%#j-^*l>gNr=K2#%CTeQ3|8~ zCC#Vof>zx6gAK512E2*Qzef8$F8*jKZ~l>CHLCIEA2J>NGC?Nh=d*b62XP5AN>3=O z@+C;kjX67(+hY52SJ{@rli;$&dr>G1Cx$_9Vtb@$@7XwLTRX<>&t6?+PY-ojR~ydN zQ{bQgC=|3*gt8P)Dh4S4DlxW0kZq%t5|9G$>7c$W;W0CNlakS9qo(~c!ar%JCe!ww z*4OQ_)&uhr{-JD_eeTrlHr3RN&%1N#pL9x(Z9*HQ065B1_^Ajq@=F2Kb?T383z}sG z5TwXF{9+yoyo6rRjUZswo7UjMjwq+9HAs&4{=bWpf1~+E>rT$x_(NtU6Z6eKmQ8oi zkfF)2y!nUk|5s7~em>@*Krk(#goeV@*oboom<3#rei@4Z+}g9mvjF1dI2ucWOLtXZNhM0oDbAy59LGJNf~9bfyInZ}Z7CGb=LJ`)Q+;l;Wyx#W`R z(NN*_Kq>&1O~IjU!pA;`lk4r3+-9glg zc3M|!)>T2>+Fd zefEKs&*Hjo@W33_{#^4P&-U6sp1RY95^J#6(>Oi5Q5(t%fWlA9HH$y``@$bS)l8a>2Boc`a^e!^BX;Xb%pBLp`8UOCZb zyC<8iqj^Rc#kgcbE&+U|4YrF+!x=z5M#_VbWwISo0u&s!A&DOf~9k4IGHE#c~cO~vdfKqLlnF;v9FSoA*=nhi?YPafT`_+F^ z;4F`pYkmno-KTKX*;Nq!pY40n8acC@qww#~thX@^nSKf^pIWS1wQ824Rhmjrg1~mLY_*3>$hKs1?e;|OhwQ!S zzXrpcnWcb_D`x{u;MAYNy#hN|j@w^wHZa^_ow!p$Gl8&K0F@!zK*9BA1EMLF9j%Po zO**n%Dgn})`K1I>skDuzGIo8_Ui;vxr>$uY!cP|9qrNxN7ulC4Znb<Kyq? z7p)ZR>4_`t8<`s{o-94#XllZH9#B-A0r+?lSKSe*(B!fItJt)GU>!f@YGNMyx4nm(p+AKY~-hj5;oj|OXy8q@zLkGEq} z2%CRRr%(S`$MEp*X$(vJ#Kgpl(|-ywaj3_rooXBNvMxdi3mLNopSF4>c@vfbdu)w6 z8*t|K1N?SqHt7oA9?1FFtS9`^C6ZX^HFWF6Zces|Rz`j)0K#b{fEhpo_HM52 z!95N&MhQ+0Gx*@gLr3tzkCN7R+Fwjc$We`_-zb>u{2&7m7mobZ9{&k%AF>?g^~;p- zGo9MVc4Z4~_Gtcn_Cu**+#GcLjP3{cIBRd zyr3T!bTf_5@Ri~juC#s{hRxOQ3aaqOvV0q+0Mgj}y9gJ4ZfL1}=_hafc^!BDy)oWw zEy;Veb5u^lrzK3Xk}_)<)o z_Oq|40EiE1&ORyQCSfAv^ZvOJsYdGA+*Bj+T%yS|GL_tl7p#`fk7N33e#Hrfm0zn2 z=bdMhyi8J43z zN0#{-l}$)X9Q?M*Jy5vFzE^m^-Jbb;d2e%OBW=EQ&o>|0j7NzZfWo!-7|FGL<8~B# zDNh~4Yy}soyfNO2Yss<3#+5`ZPy`e%S_zxz%l5J#*+y>O^2Mapi3$6uwQt&W-G_i4 zmPR%9ao7g8*2fDyhcN1YD|G{2>bbyLTR7^&mLE|PY9>MjKzyX^)$i&9;O7LXTHnu? zcFeaV3V?(>AB_ZnZIe4p36$RZPuo@9^*#GPG1*|>8)(Cucr(l?h9HBoF0TLSrXh0# z4byDgxY02ZX9^23EMN6X36M#r+l;z)+tt>Ji)yaTegz0M)iotv2u`)~y5X^W%5n|P z3cUZ~A^VX{CvE>|(w>AecoOt|>r{(nBb*h)@LBa4Wh;8JeN$lFXfbd1VDIL~FW6^2 zczj#L{>{vA7LEyfggg8b`Br;u@+x~8?@?G|n{{G2qETO?J)x%iQbeRLX-+HQ_iI8} zEfoCZb-R~D0n}alA|+(UsS_8e$g0Im3qpCs@Mi$Id=7_s3U(c?{OU_i*4`z?^#9qx zb~~PF!XcN^?z@Dakc`3gKcD~8?;F3(998)CA7>zoWyFYNN+|%gwGj+l#6tYVmOCsq zk;fsS`%xuk3uoY@U_EWq9sxe4V_Ui=Y)kiqec+-2+cVN^kM*}XyML6&Y-6~z1IiBR za38Uu+i+8J+J64xe%px`x7>JMYx9<=aH21d*};qBm)b*qD6SOW4T>L8jo@e?I0S!-N^u&$WL~PmjYXEX`cPq*#cHZ`A&2 zh{*5TJ1svE!{fmclb$U~fOz|}0xl7@^^V&%oGSdOiw5nP=(A4vUguNf~Pk1E!+6HHol6#cVd;@KeEH#EUvd^yu#a#^I7cl;$>&)a(@bAhZ1hv`B>YkYyz_rme8P5g)PDBQujuX@PTET& zE$+&1GJ+UGOhKsiKS?U)@X1TXvwHRFx}X31d4q12&$g)^LgK)%;0%O$sl;B0++q3g zm|dUy*SCF7AlM%HePz&&cO345px?26)Lt8EuvZ3~>>U?Oy88+Z%Lr~RRx_M27!Cj( zn`pQDk8iXmCNH!oru!W&m{H*FM!v%A3p?Gi>|a{a((hx^S(bH+{_NYOG|LKL9@O=P z-&X?cEPnFq&hC>K1!~{<&l$p_N84=@)6AaobYG*t7=(;K1t5kHy1t({tY5$0G1g)% z0a&(_fa)Q$Rx}WZm+dyoO(g6F>y%3%-D`Tylsn_81E~r zW=evO^BCB(`NrY3_Q2p;o5YuuJ6ofcjFk>jkxqUe%B^rh(o{C+XZ@miHCz@eZb=jX znTJL&3|YUC!E}}47#@~380Oa(%oFtcY2{WLL58yqS_!<|6gb%&+_6H|ZYZxGRbCh* zGx64+N3cQFjJ2pnexG5;94uSwf8rBnn1}0s;TV=?K4C0RhIJDk)j@pyc+R(9kKAnI z6CHMI=6_m?4M7Ra|A~a^T}oJ*6`+QCMtp3)jHROXz}|NIr~SRwpKZfy%2B+#k3AQU zPQ-T>T|B>Nr!@4FpGa4QRqA7xUB7cQ+uVjnb~TuaxBk3>ul*dDNLo8K|0u+qCK8e%XzA9gr&U#L5*PU0lPx|v2c3axg;F1N47y6u+qS8Z((ugK!Gz}d7fAl&PPRJkMR zh&{A7Zh!w;i|rc48o$-7HHmj3@}(E1Gyn*SFMPkkNGl0E-Qp?YBfoH?f2qxqD1fC# z`t2%Toh8UlRmTwd>k!rA~2U{&!ejZIGkJrNjz_oJS7Lp3)zo+Gvclt-4eHj6*fWIAD;;w;nWHvy~!Qnus2=3gRwVT$D*n|70?6a?T+MaP- z8}Aa#3=|T44h-ZEEe(9XlmPpl>BR@6oot!M9HBu^DFV`VVa&{qE1SxksuT-=L1s}= z3a7u^E=4)Wct2czK_>Fu%FHkt<&|Gy@-tp;m!ZlZ(*>RlEi!~9!P|d~xL(>x5%6-7AHH}3X9uS2YkMZ`i+j3laMY{= zw+8cB2O!3p}Uf) z6c-GaUy$YbZomAna6im<`}u-yrt@uCBfAdsl|Tw#{JpMo#Cq$x_6w)y2HWgpronn} zCSAf$=v&f`M}VmWM8`1vc(SbC3qXVU=j$gvqzfT&CM|p%T_F;SHh6!9=+GY10>b3!V{;dbj#10zX$1uvyEVf1H5`@+u-_muz@fQ(N^g>i)8I{;)T z;iY_~aM5 z@2O+$HjZb=Jo-yv4=Mo(3328lz-os0aRxvoLdH3hrWTz7_De$t8jL`WW^GGM>LQ23<)_+kL7(Bqy3D}g0b06_A*Fk)VIjBnXlIXwGs zz%9AgWB0$Lper|-y~b<59zWKKPd=AMdUmizeShRHYkv0xfZ>%4apMet>CdE*Ad5DF zK7D*e>AOpGD}B{R%w7a-ajeEBvN8Mn18eR6gDv*{3y#|Dt4~^M0t)0zHg17+5m%l9 z<)g#9HVoT!tH$hK_x0F6!yd=SO*&gj%K={jh$g%vP_!a#*!PITr&4j8a>h{jeUdCl z37jznKqje&QRkbkRz5%8chAsu#>M!c6|?$~C;u*L9HqGNE%pZ9Lr<2! z_!Bn$mqH*TaN1bSke>Vu*qJh<35{qYH)%r4a4|5UKgHELI0%)7>5JGwPhdlEA8zpZ zt>@R;tAh>p@hgsE&tNvkJ0#BXKc@(=-@{L!|MaED?e?`J_W3tg*aQ9DHp%?~@D6F= zx8J87=~*5KDEz#JnNvJ!dfoQoza}_uC9ot4z-JI3JZ;24(*YG6^G#PPpC9kLgJ>|0 zR*cP#@!jgEG^YPIt{$rI+Ann7_i!1-6fTr(#mFBNes;ER$sAMwni&Lfq~BKn)!Gx5 zcdlV7U$hYn6MWK#qnbuJU+CE;T777P?ovEw01z7}ft!0r?Vh#xB2e#$`yPNl+|3p5 zw>!Ny3fHtv*{|+AYC4LX`Lj!v2Z_{xBEr9m9usGv)Ejc`%`5`G`1aL@i&Dr<>C+V1EXu)A0FoV^##aQ|4`BG5 zX98zT0g!pvptH$T!b!~TLkYh+htK|Rz*~Q7nkOL`mDlO6y_o*LcCyv>jW^--(bIST zNtd7k;9G#KlM14e;YLwgTidi?R!X8!QdxV^il-|kp(7&j>6*fUs!Yv@|<=97~mST2+d<_JY>gq{N@3)wCnB>M4-2krV* zqxRok@3TjSdcYT@Q-h)@=}W!dUHKVIrlQvrY!kKx&WAv$yMBL!PRADrg1<0(9>r0L@~m}4#_dPDkJxR!2W?doj?w81 z!0BvrTC+-b@Wt%qu`Tx8#9G_YJYbi$9Kwuj3~BM?32z+KQOs%Oo~ZyW3)Zz~?KiGH zWY-*+u)o~3#!limxo9ie11Ac98!R`3B>ZsBGHk9!Aw3SNiv&xi0A`_gj(EiAB0ixy zgv?GiA+P*i*^sgwowbkt^3A`IbljdAXvSvN>5u)S1Ss^hGX5C=h53-UaS6cu!rPBu zh}&2;E!ej>@3X!qy#8X)eQ0Amw*Qs@Hic{HY8<oDM0T0&p!UE(Vx&ateZkqZTheD{r&yUNgRc{=%6+zZ4jz{ zrl*ykP;^n5EK77Dq|vBPB|tZEb{6{=6R@L`_$p6++};DhzjNh&TiG-|C&6bOQQWnk zDm2^o#xA$-X13W>yxm%HgHj@K`sJETUnnMRpwMAQ3!CvBz8h_8;SJjsdD(g*M;Q$% zsqeF1F7X-s)4Y`}g0 z7k8AVuPQGLa{51j3nZUCfm?qQB>|&QYvh-pkxssK^14v) zr@Pw6Fu9dMb;?iZ=apOW#G7GigW`z`4Noxz497cSW zf^=SV?v=lC)0cn`cH`#N!RrYdrr)?_ivF*hd zZB1m4TOOQ^my_^GL3?A)K6N!tLcWr-`}(7nnVA7lm?ZF0070mDLFFMyL(P&XfY6%G zp+GSaAsLBQvw$?-_PT!UFm`h5xb_Rv|L+g9+8`bQ_Oz8oEPs@ho6IW)CYe|tXBu-g z!E*dEtCi&|2EXmhLtOkY(Lpp3uEaNurBNDR5&qGO%sz2@gI%>6N(`)6?^Itna?~Hm zb=WsYciQv0i>;wCX&v~k9``&X_=Gw}O*;BU{nh}b-2|J>b=q6Go%UvCtM%m%+ZDwZ zY*XY_%mwfS2m1tP(=A1O8H(>n{Lo8{|G&LA0h8;v?t80yre}I~U@+JhVkH0)07;M_ zDUqTm(y|=Kjx0sHoJ96>EbB?OoLIK=Y=2*3eJ_6Ti(evJ$rn48p7a!3itK2$L`oD% zQG!5F0wod@K#&9ofEa+-1~Y?MdztQj=XZPlGc^~z&CV^3b*gUN zx?HOczl=h0%BwO-FAr1u3@)Zm+u~nSG->DlT?|Gvl~D-NTiJ|tpsoJb+qr)*DWerk z8y0-wM>&Kw)$rpB)iD=wKJ6&azlH{Ke!Su)ptWtp&dJ-hB;tPOo~-*P+fA%u>9UXV zCi0I5@^gJ#Ga26OzA<>a>#twx+M8px*CGF+4AzC-nv?L$0-y->C1F`?KomhE)3=5? zcQJjVdpNb;Ez9h2w`88Nb%H~-&(?Nw&Lc&@Qv$XUe|YCvclfr{vQPieG0zKF%Af?E z=l^*BT48luUhpi9(MDm*GU=+K03=9$hfrmhiF7UKr}5*2t{>-zb>GkLhyApESZRop zm+%Y1KnNs|7k_rP4!E_goYOaT)bVj3%$vd80}bw(OSbx7VDk@30Q%sA^j`RCDuAH! z@juZ9DB)L_Yr+yN(PzX){hZO}H+GM?kG{^i6^o3|j4f?L-?SVn{E1AXd#G=>+n3yG zqkW58+&uXuT?s!5z!!cL05p^p0FFM+;0ez14c3=wo1R=wZFJvBt+6S>9y_Y+8MnHTnxm z2}lu89`#dawH@^oa^-|y!gM*Aaa-Cm?&A+;+|QcXkF%o@rtJ{^3(3Xq^F4RDlWvWD zVW-hPvDFlq{Fwa`ewqJaT8f6MxMV+?0^m%7m>ufbWER12dYyYBwbGs}-0p769B|vB z&zcG_1wRi?D#8G3jYndC^}epV`##;9{OQUG)`j{^)$byrmZ z&@qLOn2J(f04hnRe8tKYgR87?I^73`y+$}G0p9%UtWUUGgJZu`b72UX$Ht;&{OO7z^NPJD(QREqW*{IsnH^5%woC?w7V?+#f%Xb?a=wI%g;s zRwt!fg76<3UgvD@*;x29`KU6(KJ_B}hX&WW&s@0E<>HHik-w=q zFZd_`1Yg201prMDUZ0i{e#%r>_>&IYiN{Ou!!S?;W)WOYu6GZaMX)+h1pD3k=nIr; zilC~Z0_sH_^u2LqtmD7DtNr$W`nmqSh75v@up|6Z0D@8sQUnM)mH-Tw5q&HixT>^D z#1B`dO6Lm%PdVWX6tj!@8Ig1L#oyPP`9HB1tBi%9nE+3oZMF07VyI?QLqi~RA{?fl%2peENP4wVeL?%eilDB}UePs+ z;CyPU`MP=PM5?7=nUQPm`YeD4|B;F4zU7`4JIex)d}R9wkw`6BY)Q5 zpZ{#ez2g=Z{-Aldq{^-l{-gFu?Y};Ehja0E*Jh)>1m7R|!z=!!=vRo2!iIb}+Cw_7 zX(uqO0Enx%GYhc@()La97ZSVOiPQ#nd-j04CGwQ54Nf>Ibl%}c%ZKU6ptd1B>)j9W{MS1H3a~%3pu}|iltG$QuqCP3JWT~U^rga zz_5ogB>03GjYrMoy>n%s9qv&6*e?$Lc(JF&9UHWHY&!LDKo* zaK7nYtL@Z>^REd*2MIqz{eStnG51S5O!$qh3iob#3=sZTM!MX8KeNY;HQJYTTk^t> z;QPYwkNmQj!Zf6|V)XFi6;}Iz#8Dn?2TBnTmcyz7>EHpp)@atbo$PnWdg< zr%srwaw%`7PI-kB%pfo3=ZnAfxm57Yzx*_+Ol?M9-u$yS+>Md0Jouv!6Z<7nKi~S> zwryK*+*e0O$HZco%wW93;&oB0A^hf9!_4TNa_9B>4021WsR2)z?UpZf)~0~&2o%|Lr~UDm!rvTI#q=O6rR{3ffJ!$Npj$oItIIZ6!A zAkQ{pWE~$U0E2<6ngyT=<|`DlO8|UGSPFnse>S%ayUi6G`^DDZL3{IWpPl;`_n!TW zk;B3-M)YY!-Mr+pef##n`T!5C5FaPv3JI;s(LJuIQ%-H>T4^XZT((~HN!cF%A$ytU z!&}d}civ==#_Y+)Ow}z|q;0F~=g#bMJ&`4Di9O@@1s`FP0+2BJf-hPDedo8yk1rG^ zFX>eVkhUwHJkX14Aaqxs<#Dm|{A`ELPm=ez?(|ys#_V_98e1g1>T3hG+wz0=wr&5y zf#j*@E@T+-Q2??65*C&f5S|L4)#-}hks!3FngWdihN2a+UAVBfR3&%JkBug&>qF8l#LX8M2q)gA6oVzpb+F;)2WxQ|g+ZIVYowy~3p7+E)U?2gv$BUvh){N^+^&GxnsrGrHHL%J`#t;xwfhhMHU4 z8g2OaFShOarBCIjerfYcQpDr^C$5IfS)Gon7cor&y_R7+c0tl3z zy@)w4! zY`wJ~Q=fMRF#QEJ1wa85ng#@;Pz79V*{A7BG2%3fs!DPnKVLAU05mG{-v7>y%Wh4} zNZDuqnE#h-BZf##+~l(bMJF!vKveZF!)yASr^*5iIK=3y`}9In{M*55P~nSbpWgY6hKiW zP!$DW6;5%!kWINUej$NWI-(V)^o8#EaY|PX`gs%v`hqYqD%vyedzW$SSGiK{zM22e zn(&`Zm>Fw}e=tzk`wS+=Q^`Iq#loc3J>?T59w(@H#nC?H1#+!+YR=C!;Z!>1e*MPN zZcS_XO;3J3g~M5Ut#z}zlhVyBqa((>gGOY4duaAS@hq6#) z70{MAN}ws`2IFhoSEBE5N3*wHH6@U>wSXOK8W(@~?#4}qyQ~0&9t8lD6@UfcTLEx% z^(+7@d2Ro?b$!ae(mbazss(=ib9*0 zJ#nVRw*A_sm0+Hjp9YA5#L$98%PDaKyye1eBwqK!_xyOZR}hn5ihv!619oQpgUfo{ z{i`kphjXgFnZT$i#lx4E+gE?q+Lv(}CZ1;aqrXgl-%^5Rq7(3HIn_yhJ`RLs37`a| zw4}_K7PQ%-X0&Osd#LUg-NDT3gXzFk!Q6P_U*6NQttA%a+&~Gx6o8a~Zvp6uK%fM! ziUn}BI&Jv+@AeU%3Z-K7_|80_tRzpG>2CI#XLZt zsje1d7i+KDs`fJSbJpRKx)JxjO=p7fp-i(2(n66;iAK})?u%zO+p&GjohMiMwb+MH zAyB^Xi!OpH?`lFR0-*X#{U=2rC7>w*$^Z+ep{dn9R{v)AROWsgV$&5FkF#kT8?v^p ziY@xJyJ8!y90a|P@Jj()VFkSA6o7~=;TP112;|v+B%5;gEVHe@l{lN{K7GE~PIYA= zD?eI@VZ=Z_Q>jSB>AG4_ZKQmK{q{;3jM#@x-@X2vTiL={hqGi2TlL?2ag95g=yWY+ zB5Smi>93Jg0wsF+G$DK~o$6N~3P+&u_7wq^K$D$V)D&-WKd66$`(ft3KnYZ{4N}tY z-_yR?SdZhw!U}+CfE0j6e>yj?0MH0??!;s&7(x;_CdU7|TE2^Mzj{KXj6Si7q9IE_#dhDZj#k$`rmPJ{%Xmrp$00_!1X(s$cQ@ zM(?u|iIVP?x+m=sA#zzAm$S8i-RtVQ-m;~B)i+-pOCSv7uD5AqW}D^7A*#9@lViK0I~uC z3ji%J=MF}j4~|ZwlW@YxhlKr6F)t9j>XCALmfD&B)@@~-ng36oX?6o+HlOuQ{S|`< zh8c)*iL0hlTd9MvyxL5ArSP`cZpYU#<*D$f?qYZ|_a8|&xNn_bZRT)(Ba<&28u2AK zqJdyBoP~Qa=(kZ}LFEZwt1ck@gy6sW>Z@+=-n|pFQeLH{4B-kSpWh}aIjo&{gSFpI zHhRQ8XeSk~uBsAnW(C~0DZXl1Jjw~e5`5qMN2~d305G@hSh)%g;)!ULR_EvO!+w5s zipuuWaZdg7&p+>0uU;MOsi$LLc+x1J1VNDd3ETX$(air!zW56T`Q$fm{>AOhG3pRA zloEU&Prp5cg`3)>`=#;}N~3aszE@i(As;$PyPv(`f^A=};Gk1gRt(zQ|3^J*+$+g; zw{%hdxw(V_C@=Z|X{+yx6#Nm@>{@=Nx&tBzak9?Vqvd3IUFEs_9{EpjEu43v!N+680a1FVi$>@AsiVKI1VkTjr@iXCa9gT* zEy2Hd@nRtK`}gm6gM)(sf6$MQKKiKJuwg?%6x2sP-h`zH!ZdHOqrT5%ZgBh3_qjL4 z9xjzY=yLZi^`$m`cno z2BUuYO3G9_DoI;u8ZjhL3IIsES?_po*=7665u^X?7&Btip%Vk`?uFqF*J{V0YpyRS z1ql?LL>s|M+ceX3C?edMGiTgWPd()h95^r`_{`mLnD2)VA9hEM9C15$?!3YZAPx9J zPauvqDNNhKG;cB9dOCBP+c0**t*<|7RseE2$Ihk!cdThxW_to!hSOO-lt?8KdO_9z zCe{I}q5#6p@(HDT#Nk9V#g~JH%JTEj5sdtNTaS*w5l220!%Hu{Q#_^gZ>>#1(6Mp?Km7c`1Or z(lcW;mv(ov+i@g_dDQnlSBY6OMRjEz2j~FlJAen%%y{-EK|plpXtR zr%cVUC6Kdmcg><`>wO!dOCEkHYiHL7!jFuHg&(aI_^K!XF`iX2;R+Fuo5kWMG8PCF z%LDO;hlhjFUmfAsL5I;HFv9us=Ys_wp55}!eQT?YeLS_`@H%7hila7|{{>LV~Zd zv06|TD2hFM_5@p`be=;TP1%kCwt;okc*a=&Cq~&)lDp9^!|c&tPH@(hdv^1j5l`+c|gL zise+9DZKY|i=DS*9X-z65`HlrPz({qrP|jLdO->QB;=Scd)&Ef{BdVFg;xe)%>P%1 zTir?fm~B(r)CEz|MYI4`%TczJJoEc!pM5qk^H~d`KM?Ffyio`r%6aUu$J|Xf-4rMb zpMR9zkE3p`fj$pVAN8ULumtvx-0rsIj@gGxhpMt5xNB9joztAa{6`27{;=Q&!f)}{ zj{<<`XnM?lh+oX9!vsl3-UKJD*ypO(wkNFk9dn>}%XmV_z&0a=tbZy4)Fg*e!3xI1p^zap<=u=T0MG{el z${rdT3Z{5ZKmD|O;e{8175!pnev#rPqA8QLB&G}xKKNk4wE!gs2WSk$0cj^?NFf0m z?Z8pKcywfJtGgq%-%`%46~N=bt;?c|8=}#8DsRRj{Jy8NCwv(@*OJcC`9z^8u5lum z!a)C?u0>G496wAt9O+(p<&|IxfVP!WnSzQ3G8z((w`2d@1DkTLvB3_5;OK->&dmSk zF1EVvkw!byZt8{*X@2nWy^2$NbRCA^QYcNa_(J&=r?v@Bj{aM{jbw>|>=dvz)G6U8tm{B5AC!CNq>U7t z+eTb7A32?a$A4)%G3e!?=82P#VfHXRM3+MNRuZQ^r5uEkm3-#*hYlSIEI&3iAz+O7 zGj-66vMJ-9d+u@f-FKf`wQ5yhzLzUgeGK$H_(Bi(B(MVPb@2<4nWi+=%&OzP?xp^hlU6bkSX4| zbLWDEJQnk?_z+fvo;3KGI&h#Y76$LW`)>EfH@-30L`HcimgzXP$M1jf1dzjGqxOEp zv&n6y061ZI?i^hiv4cW3E(u-_W|a38Krrf)WZVY}1QxzN9L$XXq6k*3SmAnmdxMdI z#UNgHr9*J)ARssjO|IrZ9BAm2hmo;9q|ETaw}b5w$m++_RsBNpt1R;u0R1u_+fm7fl>g~u>eFgh!`e@?o|TA`IW~nlQ>-y zR>u*?bAAMp9bWA5Mo3vCnivJG^D{OQHrZEL?==NbZZZbdc>nqvFWRVNZvnxmbSfQ6 zy(j|e;zFIaX`NvN+Ve6e)yisRJnq*8=o-+u&goVRyU7W z#qh)IUH5R4G4WKhU-Y3}gmHw`PKBi;5qSCs3-08}lkVuzqd~u+1aK01($Cff(;!WYV?1eXX@NwU8{R#Y@J)&z&?z*=?CGmCFd5P001;^ zNklrM`HHXf|l#V7lg(a_5qyz-1Na5;Q0CU)+SrrwG zde*@Ze(BPsfdDe9z-%X9y=aSngRaeX2ABQLoyp4gPek3h;fPz(k{`(^(|784b+)d- z0mjBkVDXB01OX+0#{`v?0K;pfP<{z7brG(_h4bio%oM26z}cJxNn! z<4i8WrG0p=5ok7P(SDR7w8tVt_$8FkOzkGmTsde@{m^yCjvayE-+1GV0o@UL?p4dt zf4--Uv<=^A(}3>W3OAVTu+ygp=WZHc{joS+XRoI@vuy)mr+ImeGzo(ySIq*b7C|d5 z*B25oK8!$zqwQe^)(IL~+TEMCy!W^ytZSngU>&Q=I>%ho|i^w8NI9h?gZz1k+|K=}Z{Is8ND5pJeg zyvTFgZMV5in>Ga&7V+x)Ijpi|QEI0TrNFV6ve5>2KGWqkG#odEE?LyHZpP|!yy+J) z6*nn(1xl!z0-!DlWjO5P;in0wD|N3}8Oj6ny#(KfN&DpT9gBxtXK?Um8SQIieB>qP zdX1t>Y`Q>)(vf(-bHR)2**KLKE(6?A4tS;$IJK9s>h<%3A5QH?2-4;|w{vn-nKlPG z%m0lU9nW1Fa-$>m7959Qn6Tp~7~Mu(;o;*}zU0bMNa#^6d{YrKAIJhQ^#*OOqM2VA zmXkaq8szB{b+4wD&Z+RDNX$r$+5?%0eb~xZD}FdYyDAF6XUa;6GneVY^%qnGCIlIK z=6CxNGrepPtJG?EaLP?0>h_)QaLYQ(w9e+|j0jcO`HUXEHy78wkQXbD_JSLXueNLS zOPV#%5ly@HhB=z|ny$NSvxyP=ZXl+$@B=q!A!aXz>rCQl6BZ3^#OmSTj+<}3Ie2rA zm3%A@-7nNfGpTbnc|;SR7KEWsy)oCt++vr?#cfxhOngN3j*6NDX$Z6qvb3fp4Yp`K=U&MkGDHki3RK8KX4u0<>{n?KK2=U)p_ zz+l3OFf=f2=Q?b&P75;yvBYeUGX*e|v`so@1(f4maFClWU1$d*J^3*2*RNk6jPe^d zZVVQ75qi=no$9&P5PYG#-(KjzH68^pV2AmR=In`3#MXl50%7Zu#8@lz2(2u?eykBS#&j}SX4d6$A^ z=ecqcWcmwQvyg|dvwF`)FJ9r+VxH2@Ro!!4j(AYza*cz3?dOuYm>bR7C&+D}DXT?; zoaO&)dTZ}`+RLhw3V=$l@Kvz@!VUJ(RpSM9FMO?dV6l6p;<<;1IRpt$n8GHsx7g@k zZx2dJJqpA8zcgZR{@JG zj<(28x2|iEUVW~*{p+Y{fQ+p$4`!R)3Zvzmbc&Uk7|V_sjeG@wcDXtVKn=YX5C*~l zeJ=q3a`ab&jpw^MSqLlROe;Tgq1BxkZFHTjlP`22_`WirTsoF`ZT8_nQWOqT1fGG* zLLiKlAf*5XVhUh29n`Tmm{}y68)ma&Qns5iZSAkb(I>KwpcyoTUI;wLwcT*T4Z+Jd zEZ`yV+=qsKzDnwuk7@iqp29n3h!14=vR9sW=K}YUu^c8S3V@E0@cZGQvZ`1BbJ2j= zlmWBIg_QtI$9Ml$G$!1-wqc`r8N1a;_IP)znezG3pN_*z0r(wB7^gbb;V?4K@!6V; zLjX_;OdD9uMvd4|$TX`W6R=sxL1)?l-Y7bzLOc#+S0?5> z0?%7^gxQ=$y!Hc-7aAh?`0LfFZ*xYY;T&gF($+b6GtkD6R63Z0`U*fw0O62;%dA?o~bdPPs z2`K>T^M&7Ur;nSDm)b=>ZSG+&y6{C%@K^^-8wB;}4}n4;XoK&lBV50KpD=X>^;o!> zZOjIzQkqmVbDS-Z9T!#ZJ-SOA3@Sq|s9xUYJFFh5XXDFMv?MRo|r)tSH`E8vP^!&>$CNu|Kvxd=zX18+1GS}6aAN9czVFxepK_Q7wz(VbtH4+Q30MWs0T$j$x)v9cs z5HDX$a<+X~_!0aG;kR&g6hIz@Yx6InQafRJDFBZC-rhRumf7w zW*BF?4QvXK7j^_*3aM0aw4)kyDplvTzNfwuoWRF)c{(_hbyBHM+?!^AaUqk=<+}TG z9QJ^)`$~YYlt7>e=Fsk#CZ=NF8na9Ml-^`pW`OYs5si}dkUF)ZI3DK_%2=%nLWGZQEae11-xTGJ-+kn)jh@e z>0XOrpGTny{V^AgJ{?L$QYSBFdBjyr_^B=MRapa|aX584LZWbRqs-rQ(krdX_X#WE z7eoof>_m^9i!uL;BLNYUeDm+s=3w+k;C)Y>QUZla5iYtX9E)8mzET)2&(Fs_xiB7z zAG2=&q|MjyvgjPRSky-SkmB*{CM-V()h)Opd|H6~mDjfRZyyRN$&{70+PZ&WG@Upx z;CNXC1)#@)zA^|#e=4ks0svPUDP{~enER#NbkY|}OB`OxKnfsjW-2G)29N(rdcZwfZIdt67Vd>{3}2VaAHH8IKlh5=2VXXxq;mFXE*r5Y8{if$efrmS z?yZ%RH~mFxL0MkH%ZJmiX<_D2o5hb@hv^e20Ce|k`@?pwo$Al^+mYbB-;VIhhZVr} zH3fh*L}(E>3_1Jn=JsLN%HuyW6m!-Q`)u`p)aGUE`)9QG=l!wEJ9eH->FAOTw1?0{V-weP&m`P!nMv1{be^zi_)n6ClBLzx!tE8Upim0-l>n?iVF6qhYXBl{n1CX(Mj>`a-ooR*67tHeL@H_@{j_KQvAn4- zftT4YfeOQL{qyY_d^v<-C=+v+)3&X)1RW~JJ!<<3>^N?Fqmr`*1BN#4^P&1j{ZV<@ z3qPgbW`)D_Kv^~h*7_W@*T(sM$5N-QB!nK}FQx#hX91{zesc=N>3*quN+YPWf_^-4 z^8QFfc+8%Ex7VfIHXi?#82&l;@1?#bcXS|bhg(cl0KOIA3%_ufYv{Mp50|Q^Sh@*( zEwgP}cIOgvcg|j0EMr@%*{6`-a{&%M{lS+w;TDFa+H*bK6Ac74FmV=LTb=Dnou$LN z>$Cl1KYlfH-ip%vU!y-z(*Rijv-}`j8HCl*Fdt6Wg|d~p7f!FVJ|v9y8P5+V?eNc? zEu(IEbJ9$%5{8eBWKY`YpS0();ZJ@~2$8i%Vd^C8!!W+Hy{2rOV7NThACA|xaOD~+ zCTCji{3u&b;e!&iAVWE4sI@iP3p_@*gfTKS7i0VMCk+0+2d~$PQ@ceIXha-Jlk+7y z>Ue55OL~|FIB_X;=~!>J&kAGY=gc!%0a6G+IzCVW^Kuc;kgM21M4SlhLop-7W&!ZF zC4<4rch(+*6>@0M(UiUUcecsSRGYf;uW5iUOq5Y=CRY0j;j6e(X?*-Nh2co^^9fS` zdD5wv89~V3SeLV-trPB)(OBD+eI-Cxo;?ccBl-uNu4gC3=R?sV&!6^^d7uF7Si0FN zV$A^7588Qq z1od^I8{1PVpd+Hv3+5VQYGq z9SPo2H)`@fb89I0W<}4~rEk5MJ!RBE0U-SHTuTXP3P9J*4+Q{YN`QT$8G?cH?GsH%c4Qq{Imb8J^Q!Se{e$Rr355Af~r$6j7#{sSUSZQ zf|Zt0ES<^}&T111V8oQ%@u7CpT(eUEs$*T74LGJ~CHz2z#q8=6@b$gQxSpW;#BZnC zFM0q|wl=jUW*?8SjX*_Mvof-n#roJw$)m&REH42`@WU2>gr82Yz5?(YUoK25MKr=V z*!=U#l=0eSs(aRqPxLI0=E$K8l65b6szn(qtx0yL+MC{Y;g zDddX9la_nnDkr?TCQN(yD$UWMHkU{@%$^BsJXzk7a;xkGtE7Ev0inlB5l9)p{P{k~ zL-6#y@V%ZO?Nghj3`Li;34eoa*jpJx0nE<)f9XQ@{9`W%=05_@CLk$*u=x)|O;`X` zdkSEcRMkOPIfX@RpqP!rKX#e<-xcR8G0HI&A}Tx?c>0`u-rL*xCt*Qg!b)Ij3G?@g zHb4)*EresH08S^H+==0Kw|$W@V2Q2K{p9AKQuBX= z2q##i=y?$hj=o3WXq$ax+db7|AEgKegju3$$9b#G7(B*4N-JChWu-)215j!%)I5SggoO za4(d1ruhn$RVWU;X_Gw4?m%Cs8%Wys2J`x?P`1kA%!1g}HRQTt371Gt3O|hQD+BsP zzK{Z_HVrCk%=A+UZ=gKwQ(Jvy7|_J%63dLZ?JZ}lvRNDjW|rLldUoWQS1xBRSV5Tn zyac2vK-m1(BA}rdXsg-S9ac>dmoNLun~E<4{W!wDkm(*J5|-y0A`22Pq60bnV?*<( zTiZI~a%D{1=X&C{LvHGeKN1+Ak55pc_a}S=m6mIq;tO5to>yFuUf2G8KkVOE7^pNr z-w7wR1tri>U+2!Ho86(yc35ffI;x*zdSRZfEVaD=w|0)$heGm)o`!{=(cd?NB^<&v z45x>|wM*^eO&AaVi5F!7NeQ43M~p^m>n_>hwEdQTX5%oUf1jN?|H-|H1J-&>ehI$J ze-wa}0KyMb$Xl?A7JvvL;smwXpRU7@`-=0^Dh}v}{qzu;dp;!0+kd-l^G}1#Pp685 zYRIp>a`e~XOZEXvQ^W`c4nZLt793rx1mUD>U?E&}zfgMR3Byup!*%%As!LEf`;aj0 ztGA~C`jl&}cU%Z&Xj0lhZQUXQIe`q>0)pHekqZ|W>*n%Ru zAm)E8mv+0C^69VQ2%8+ZOQZGf=;hdy!#|iKBP3y8yrk;hDMyb=YM0O>`10&|_{l)0 zd+~Co<5B3WoLO0StQc}Pn#DD2(*OxQOfSYq7^DC+GSW8sO?|1h3eF0rDrOeGQ~~}t z;s_)7YNwQdXfTpUxfQnfx2w%w+MD5#98B2;hI1pIcywr=RV(4g{Kq5w8vSMVYw^!e z3@q$GD(0;Mum+TM>Ht9rKaee!YwfdNo7!z#bSd+n`M)jxT}pE1-{b}$35X!VgOfri zi`+a*AiM?Du9)r3AG3G)zWM5EW8T>z%`~8;G3$Qrh5Bdw+61bIN)Rf%oVB z{^%dJ0H$>Ef>Qtx+IL~5P>0y3k=*VjL$0~p;U8Amp`J$T2pbj0&0>TDK@lX3lkfx= z3*^to-EV^w05EQIpC8#ezzdg`Ses{W1-$u&LANG8>V`*C!SUq?zAyX|2q^#w4iNA6 zDL9Awd_Iug$C0r34yg9fzOWTEJeqXNT(7%xQMV0DGh6(#S(|&|Oy<>(Ka$vMv_RN- z`3JAjUn~E<@FO^ZH=dXfq6Mb_tPxWfL>&R))e&RHM0NIMq}MIyWaQ!wvCi1@|DT!y zh}p@%nEf*SB_I-dL6s)K()B`s!dZ$UfukL2nqF^zwb zm$w2W@V+9DU@%f5C_rC`)UQCC;LNa^yIekA!bx~b@YN=b{%Uu^ra~j84FB@KP&l+#|qraX2F#2odAEDRWA6BxjkWG&MM9d5ea#r9V z6pSXqDT^OR80V+)?{hDFt+YVjOA(CPr@wbE8_J*kS7!cy+=Rc!=KpO?lLA3~VGka@ z6Ape{sW9oo?I@MrzgH+$a8er4PxvU0uB#12Z=k&R4Jajmz@yN@R?mo8 zL%Gzj`=#|S+LIT1N-%>*f2OD1`Tnu~-~WffZ(4h8bPK#pe<=We@o&lkV3>x`tZEj3 zPcSO-o$e7QVivovG=j>je1$q8YA4k0S;|XM<=x>P`%bWRh8PXTQkdLai`fK)L;2FD zrkJaIm6TH~joKrqwgNc>&2M~zv)O@ z*2?_e*DinQ`TW8k^ZjDxKb+>sAdQ~leE6F+g7{#>?T9z?~{r}HiYz#jAg+NFceBmIB6AUh{gFm%bbkvC3VtXdOd0~~i%$-$K8*jA5 zgL`qONO9K!#T|+lTD$})?ye!YODXP9ik0H-4h4$4ySqaOBjH@(mClx#XZ zj8y}#@NB*wN4+XaKDZy-$R;3b6?_X?zuEy84a1AD6y z@l}yNAvKzx+jWhfpy8>@0Z{8htcn_f5ginWsg29!pOf%a7}iTeK~TIF8sv|{n&aS} z=Vy`h+?R@wg-P~Sg=Jc+!jf%rdUKU#eQ77)`I-0OSSfe>H_&G;&4`^tsS8s``uf>; z?;om`p!!{S-!}I-{jCuazCV$)=@yMgS_DBQ`^rgx&)JP7BH z|MXcR6y2=09s{R&*C~5b=RNt$u1FAj0 zBzEczPHIb!CC-7-5~W0nvbx8f27WELyI69ojW`S*HG6N<`j4RL`kZ(d+C z)DAa#SX&3>l2T*OSQxN=MA|bJIl@uNhnT<;jXdh3iwj9}nqNkC#2T)Y4P(=vsB!|e z_5Mjw(U1QKuW$323dFIoFm~eQ5_4yDBrLK{a$e(Tqw%by0Joov#uY;+n?Nhb&1^N z?b0J|ouKVsBSFrsxTn@l>vpJ7k1qS;seVi3pVw25rRxAq&rsGA4Z@o^2G^yjpw$RL z>famFQ|3=4lJnEMqm4P+3tfw_mOk+eU2Gf$Q0NBD3-1dSYhYk%eV;X-w62Qiz(;b8 zsO+*;GxWlekQ zAKPLYM6ByyUamKosGpA$SBLkD7b7ts`Mj^1=H@%qJzL&lxjgChkM+DO=>vxEGyZTM z?{-^NE(?<0W~h_*t{sx|?gtX#+v(2sdZ3=(~m?c}aOv8Ih0B2nE*R>*xSp)6`n zO(wR_N0#1V=9!-ovx&+R+th$VhpX2U5z46{MH+(8r4K|p`SVX?hhMDyV5Y2Ry8mjh zP%Wya2KD(^W~JoS<~9gzKH(3GC#DA(GmK(O<5%G@Za~37UEcG@W7f8aqXe6n1tO^% zFcH8Q3yh%lhf`h+tU}p*RL;1^fiRK%!Ho#`ZaCJdR9G>`Tt6^f|K0WBU>s#q z)2ge=F+1>SD1eF2o+ZCdgh?&fq`B3gp1*kTmbFMr|yzu?DhN?*~n zFU~G)ioiB->(_6(A^Y&UZEB*TZw?z;c%*Bi>CZLn>q5zozIz}=mf*ih zqJfS7ZQ{T`Q{ate{*+Gf)Noyu2o&gUWfg@OewbT9liG6IvmW)<--_2_o|5(u@={21 zI{yu%gwL^muaaO<2S~W|{^+KCmzkfA8ad%hm+{_KHwKB7oCrd9iwL3zyRemV3uf8c?XQuR%i&nQp$MKQ!G^ zq_bY9X$(d*uK4^|k=+7B{x!)aLIjZEKFqRC6tXW{S)@u3NTDd0tnTPboEl0%WiHix zBL{cz#$GGpx8-!4CW z*$9GWJ6ZoDdK#PN4b?R(2{&4g)##s27Ph09roRUI9wlxx^ejoZrSV>+{AuxaCc8tm zvjVr7;~>4#g%X(+QefWu?UtX?&MnUOY#y$Ap;1F#M2?&lZZKUzcD83KMF z0wBHI@(hf$DBT|R=7wJv@;VC7)STKHY|@t2__d<-K8F-K9u@*yZ|KH#9II;hFv&sbAM#RlKhn)2K5)aRx1#F+b8l~`%aybsVz zImdq%gsD*{C#;(dW29u6WRA|`Z}dO-?3(Sj0AV^OFJNf6=|k#R+2+bSvEZDjow7=O zi^L6Y^OHu=1tIsB;U?7F=jko?2k$jg`R>2$H@bx;bSQA&!#z=Nd}93eFXm%vS&F1T5c8A#tHzO*-S({)mgVn8r+OK45>McuSe4Z9P&^If z+dc&8p_ydXNi9z22x61*?*1h0sc?MD=sM!t&s^`XJA!H$AHcU$f)8y-h3803v5Tg^ z6_i+nkw{r^<)Y2$0m%84L&b9{c~+-Re@N8$XhD)Poi zZJY(P?G)y1yDQrD@(=<%S3|kDD_mu`rMM%1vSF539gJ!mgI9}x`32o!n^1K^H_VIG zTuKT-6b_k%G-vuUCCIe%n_d|yAKoUDD1yojLpnw&*#g`*`$>Sg6}KDG)2FAp`|OwX zdGC49xzg&}md^(P7w4avtm1}?_cD)?0Z8%URB!L227w(VprL0+r?vattJ@=(i^*YF zm!IRGm3s$TDlODoPd%QTAO$yHHt*gTiDEBgD3EY5GY#{3L(wb%` z1Fr5wb>`9b^_)xk^EzVQI_y@&LiHHUFxi+b!cS&8PAF0}5hq18ksF`+Y((F6nYS@s zgpr*!Qr({ppgyqU&b5GB_>Thi8u1q#>pTQs|0PETA@a(bY;cu=P5gEsXpMq@V0~ET z9nTs}8sLWkxrc{%i}ANz*$srikg3F}EQwztcSR7*Nk=tlMd(f+#Nw(oHA`1clxCIM z@FCSf&Cv7DZy>o-te`5_<=7wjo>Hg%vDY-hiGbTtB(Ph)s9W!)bTho~J$8p5fFYr& ztmc5dEMU0R9f7Tne50X0_j%S$NeDLouJ61?&4qs*E;9pLLvy^LF9pkkBM%>ligM-J318Z+*ZPw@;Ci=3@g4@abj?6rzy=nR~)n$n^hgRCG znlI0gLB0CQ4maoAdCEqou%0^cTLkhQlGDpMrx1~JsG;WPp$ zk7Tgr=7AQxwxARNnBcRNSQD{o=jB{jRi|07)Cp#D_MSoAuYh66wlFP~|8450yebmcVisJIchEh`Ytx00Fm|16agYV6>z4N5-zy7KsqfGBsP2E5*_M?i@lNx5n@XOS zD-*Hj&$FG0LtQVfm)5w_xLA^65$`U25(K;-HT;EpVhH?!O9rj_ZDGPF`Brq;610og zsjb8*TEYLSZ>!eVt|72i$tP>JoT8B4x4hDi%A+0YGasvmh!Jn2+7HApK6E;5bSgUV zUV@5|z3&7y5qXY;`$YUE7CC>9DugFFw1Hui2d_6^e}<>Cri;q1m$jz%9ed|@abE9* z6jzWqO&G^h_?its__6m)x6N*#B{$&n(dGlp6?pA8k^A<%}V zp4{Xmx;pMZ>zosh3w^I_{*dtQR!?EV%7^-2WJIZxETU@DT&Z$lwY6Z90+ozv{ zxe+OjeltUL9(vOerNUe)L;B=c(5;Z|Bje*O{1ylCYeaX%lvbi!p<;smefz>R&PjyS$Pjr_3BpF*rD@CttB48CrhiN~7k#7gWrCuD0`>M=e@96V z5zs8OCcL$kyEEW!bNRV($aAfWHDIW6E>4KkX1HRL_Fo_*9reC#nFO(y8eI$vPvt8?ALmpwxHN&e4hZ%IX5&0sZv^gIbA+ zRWuY&`%bX6O`sR9mG9Xb1A`bozB%alkLiNHnUp2n-d($mP8+XiXJ=f(X00uDrN z>=4h*zY{C!y*sJc>;M&Y(8rBwl{g`HxwO@;51u=masR|w;%iq+%? z^bTYog<)o~fS18l<4r!AEn)1y_rqfBZr-MHESJ3nF;vnN#BC(MByq9N#f`}pIv8ZU~J5J6x54F2Q z`+vWd#@{v>6)C7Y@2tJ`)8kEzi~p+rO#!0Fm*%I)Ctl*qFMfbJO{#HkG5&h_?S3}V zZOKhMYO|$7!G|Jz(l(FK1V|O{C zI&x_Oa;{gqdJHT4$sgNS^FIFK>tW#@!+{IG`tebfFHu6?{AL9ds^UjDuEHG^R#{nD zFdyM4Zs=;Ad6Th(>+atydm%bzge&C=bzD3&cl} z3-Vd2M?(F_ZZ)mGq$l?A@9T%?aqjwF$JHg}U zJ%^`skDF!MB@z}Iw-WEz& z&^C_bAA!~qJIOrYy&ReEW@XBywvY_}#hP%?Y|t_7<+wHv?i?$6tpe_Kw?KgLo^C{9 zf|wB&fuhL9ip3alVfXo3Tb}>b0O`ZBLOxou0(Rwz3*$N5_j1kd>3pz3B^i)yLkcPi z_`z371bIS_5dT6LK}a-#cktjOj4g?GfaOZJ^=3ntn&$Uu{A(&ZC za{Rt1hu0BlCWQBjD3Yfo1xy~HA|;qN}Tp%^|MojQ=t2^1Ti}Z{}E2%|J0~~ zWGDG>5N3!+0!R+F-p5wO!`&|L`v@P87I^cbJ@f%NgS%RGuf)G0_175E zNIH%xyQ{G6prY+$jiZ~!cGGt2pJy&c4hhW&J_0D<1JXG;q?}h|6u>qpMgpZ_aa@2H=&H zWJNKeyK_GJplEI5r4@2Ue4S!2aJ&1vt50mFM`O&T*O*yk9G3EB>D+dZcNZ8Mpxt#` z7DrqD(D^`f#%6>KU)u72GXDHMqML_Xlq_h=?||{BH(Rg&%?HQmtEa%dA2HBV&1lz> zs$-s*1fas&;}H@Dn!;kQk2~UxqL*DMvdhI7Ahb7BkI=#d31uL%`U{(NqBPI|HzEbm zr&n2e!L(q`gN#I_%DX2}_jQ~5RYutQ`(I3r9)EU{c`)6KwP`~>cH^L!_Og;y%CJ_O zxC-Vf81|w9w|PD+k9SqbM~m3EAxJ`cvAD%_b_3+6ZaH7b&&~Nrg%xW}GP<6!x_nS1 zOaCn(R;l902NV64pJ(Ag!d&bOOn@I65PdbeMXv1Kjr6d~p+@qp{yAw$#`Ww1yvVKViZp4>b)^ObUP_RhyAIIfP6wR-Y&SI4&js6Y0gy(>D zg_n?frp+AuzXhW>#P^u9ESiN<|4&XZFrhHat>KutAe1fu{Pj^@U9M8bB-qBB zmmdJAKaSE=SH!`jz=VH=^HE7o3jjcXpCSOzQQ>b!uBDd$UAbu~$^a_IsgB?m7|u%i zZU6uY<9`RjM=gfS|D~IHBb;`irGFjrVDdITK418NV9gMW&L9m?HBmPskk@zpJ~%(p zXg><^wBnpFxYoNqwTfHV_$Tb=5ZAG9aKD^e!)aLiO@+VskCgJSeg@v?4?%M3IPOA| zaq1U$G0(8O^^LC}7vLc>qUOTGan6Xx@$83^-U`D7`y~!-lMKXBBE8~nK9p3}YSkbM z%>V17gZC)!4m?g$DIbuegUo80O(f#w-VM;8n{f)cW*{CApfIe4)^(1fk6 ztwCJ>O{9wu0 z_!Nlvnk4y@1ctz?=c|?&byH_&CwRTh>tdn=*RXuHAuPURd zt~VJ+etxxc_*Ap78s2!=k~HVLPi?tnu6K|BN^%W2=IN{k- zu2_6k7r9?_;+n&L;p~eWLM1}xddqU_?|zki(P;2a;XW)uVgH9bq09SUkI8>R7FYas zPww5+?p5-D880O{`BTn$YnN}v1(|%%=;Amg3W`ld_i+uf+nl7xQ$0c=917Ob^UFIexn?b5fb%Q&c%;+4+ zy^|XoFq$`SMQ%$jnM_$%37lI%N~Q-~UEH^wS?#itrtc-RC{aK?cVPyO7!n1mu{SRP z&DS;lt#4mO@V<%p5e3ozV1~ZSL}xi9oWqsPvcxxhB3CE8)x~s+8U>sBKp%M?{I5e( z2uX^^v0`reeivcIlr#Uy6_9vy*ZQRr_b8QkW@N%Or_Ff(?EL)Ppw4nkC^IXoid5?# zJH1e{)cInKc^5Y0rBDAy49&l+k16@d$WPN=Nx1#x&f(X2-!)gz=ZrD93PKHo&z|?j zQKngqe4y7*NcKu0!i!T3UCA^r~@Ymm&d&tdA-+FUQ$P(6c;9`yiWt{T&y zncm(|Hy%f>R|A_bisG6U_^1^V)$Z)Mj#k39ec!D<$N%&v``Y5VN7GbaZ=}IQTF4)? zx{Ag^d98zG&u>r2k%qLZVz9v(MqAYF-+4Ks@p{GCJ|5Y%OL`vge0aaYO?MxbiO5}$ zwh{sNmW=)Y?)`qF>y!~r`%%sJXK4{H15=zveSUS)-_E<83~nXw6h);zfzGl$-DMMz zFs%7#-PVEN(|R645^C)7{fC|X<2QXJ2I(Wr$;57$(OY}Wzwq6)A82P%UsQEhn_YH> zL_|a+PBB^tq4{}HHRO*Q@LYuen(VjLIMoFHnDEG+{QsyrEV&FCk=(&}pDM>f1#G); zmlPlv@@O&;#zl#LseOIHi3{!ZYHFNRKBb!(~| z=%B^?*^NJbP{R-t1Gk)6-G+p)wl26hx7vi_2}R#B-OyB;g^Gv^+~G`eLzk4UrK*gY zW~ln7HY3$iXRY({;r_l8Dd8!AInA7xQFbu(az;%yUAc(*1AKQ3G))N9hAHT=0WjP0 ztC0VOZ1?4FK0_nE&9oB@YR8hkO8m;wxiwwsvxbw73vlbmxwCDGsN{6F*&vX+2sWKx zU$ta|r;)>e{Y=UC6|>}~%2E~t(~oaI4Zl@A;6uG;`=ezb8Bnu!%+a-KqW8XQ8(BYo z)h#T*m?qD_ai0E!zbRe&A6sdsnb^(L1#L+c4_BvHFmYC9=De}@Ru~v#>mXUeeKzf# zR3=F80XDU}%aCMyTLPzXekZu}`Gk~k`R-Q=qH{Z0-_78l9xI1#wHY;p8OZW@R@|0p zDt1KA9+V=JY@&jobcg{O^&Wsjh-ue3fZrY25Q6yyDQR8w={chm5o0z36s!5ag+xm| zQC%fg&IZrW{Vd)IKKF&1+K`b5{FWq>&;>IxVT9}6JiEA}(OsG8@wBG`pU~~dr{z2% z%PA=?u2iUbNqgBYQ$&$hBTkp+?^eJM2H$W6!)whF{{+gGv7= zfZ@U~pE$8$kw|TGMcMkJpSjj25J$VNe9`#;xT)0(==Z0vtcN0VC(7F`gpp#0#7ViI zpe9nD&u7%)`U(2E@q6Bgp+w5q!E}bq{Wmr^d*E}x?Pe78aZ@kA)p}aX35S?DTRMOi}#Xs#kL2#i}P0%9)Xfh$k~$O%ULTE@X+k z#Cyz8oLFljk>{rW3@}|n;dl`HdXM;XHl#K(2}A>Iu$|M8npe*{*FLl&tlX|W<^!|jN-DzpnyJ!3k$4?k*(Vb7)wtI<_x5F7s{XRUPT zU3dPaT|a4Gu_iia!r=&8{6FRLPce5%^DV^eI;*WNJA+lSe+@_Jp|_D51!sV!Hdu&GsC_VA4^BD!9)DSdW; z^BeD<&edEj;ai`-xn5}Q_wV=>zmaHW2R-^dV==22V-ZH;Ol#4%A2LEP__7@b2>B9{ z12qg;$BYZj^9SDzmfgANrWie_MLNiY6|)nE20DfyGxnv zLtQE)#tv@Bg z?8qJC>r@jYX-KtZSdNWVGudPMW*;fXnaE=BhtBe9Fti0H-TNJdLo{iQXb?_@9tXuo zIRO2Dl9+9x-s(@6()X1!`Ji{gOw>{RoCFbhgo1byh-g~0WC+d*8Q-^54V96`(EF>; ze<3O=dz)mp?Ye_>-_YNEZ=?G3&LZ(2%CQIyEZ;un+q{^ugJ5_kuOTd1?efMdoo*`jeO+x0XRU2qj?2sI6dzktLrR@W zCXuQ%WqW^It=c1_Q;TI#J`LKHbpXAY>JGMEmJs?i^FQYC46vcl4zRV>;{HPa^{oi~ zFH+s3NsSefJ)xpI{GUaH^W`+3C|45mk9Q@M1 zSPs5Xbp%&x(&Di8|H?rATE`|6K1`F1j|}JQjQn6l7@{u?^c_1AlnQq-AbH*#e;fyc zt)3%#K1>mK(a(NBH|NJa3 z^rH(q<;VIFgY#cbvcLQ7@4hq$m_GIPY7X8}5@h9x`d?pG7C`A3Okqj5i-?|lc2_b>`(5@ATTWzUDF{D#*wc&nQKQDN(F} z^P!)iSZRCMs!5Z4hPRikWuy=C zl}pJ53l3E%W}+K|D?gxhA=>={IZFWywn6GuI7j_gw zu1{>bXFuQnz1oolUN}^r!>-p;S0r3zSJZ~T{hAWb&MVmz4fi1Hk;na*%1y$|C-@zQY;q>I?j+c45PG`!RM4**8!?aYsHi3)vWPB=rof7(~o%wnqz)Xeih(WL(445)!j!af2jJwYCiIoIM& z7Q7S}>`xu_nrb;~F)1}!s6qjwg#YGvu!t#LIs&x&jwilO&OCG;Xgj?ucg2c#f&Vxo z_7M2XjO1$AEr^6h?T7Zt;7L1v0KBahR+hpHOsPpK!EbeN>l=s)H>39|OC5VsLpUe@ zH9b(qj7yYIP_&Cdo<}}RVMXJ^{<55eh8dBdL8K5!xUjUV756!mi0oj(tSjsl$(d?% zTw$09b~Qk?oND<@G2bLFx?aQDc+?n^$<=n=8$QZykg~YCN@lZXfFN4uCRiymj$Zw6 z-E)%3-RYw}leyt%vfDBt_Ti2MlO9xr9;_VrIQi(#9hUtH)We2rvj8*7CKiVFDY84a z(P^^dLYOA>Cq+m{NZeGT*R|@r1qL6+Vug=a+TqyD4LP|gNjM{3=`ljvr>%zDZ~I|` zc*FGx67C@%$?PR|V8-ystiGqvd94ib0|s#2-6Hv6`SCWDkZEtSW`=eaO+J&XAAL%8 zq-cm}SI_z&pp*W%8WZ+9(UJZ_Z7DQtH!nBu?`$;_Ct2I^G|tIhNZPhG<72PYT7-}~ zaned(0lrUKyYPOvpM@j@nBE>05{4y}rqwc2Ab~=Nr($UEOuBFWc9+U*}vODzdU1ZS6Uj*6OxQqKaJE zU)@OX5kw?iEnIhs*S!zAURE!?@`SS`e~Tb6diBO=hBplJsXEFO75W($|3FkSK@DV` zY#%WicYpIKkp66naA^zd&Gf85?tqC~5gOIw)4tM$#QYjCK33Z+yN{WOmwe6Z6nVN6FUkJ?I5GQju!p^H$nF0g@+>0*1?^yw zuMtSVQ&f>tq|F$#|Gu1QYbSI|xI7HhROB@mo()|rExR*Qdk;NPd2$WXg)Vj9H$+uF z2h=>|z_v#FG+x%+GS*mR@36Ru%Q2B(oOP)Xji^!)9l66*5E*}y*47BT3pHskEc0h6 zBm5Ac|*ZqaT^XKdGrL@G9gmIQjk%;bty`DrkMKz&{C@oYP zZz(4+|4CD(lpJACCROy|$*Cg)d}Qbpe+s#LABPJ%{`!`t}f}dFB}IS z3|YIUz}~Y=FlbvDX<%U}P)6ReaM)z$0!a_nmDF3=AV~~(VO4!1B#VUQJ?x&nq;2uw zDQ_(|8SfNBP1YwQ-@hKhu8N|-fUUlD6je0W>rG{46&1~dbxUD3AmSCU;4(rUho9tqN5_0t5ruhrnT9KR@X~+R2B5Ki9dms zCV|FncY*gCD**WTUiJ!QgY-=SEm?T{#EJW8I4i=u;s?544iwoO*f0MM)L)jc6pKA! z2M?Z5Efv{cph^v_W@ZYM`MmbRGrsK6SpRMI88}n8Ts+jiWJ70T%)8jjA!mXk5a&LQ z9(xujfbZgD_vA8qeiMmE<)g?Pos{=_zpHIcQnElK_Eu%?b6d6N*)p*A)6QH^V&2Rv zvN{3m$?t$0$~@#&5^#Qj3KI>5Nzab0fdV)qy^t@js5#RZvCXL};+Zwr(f#|J2%0gx zSTVP`gK$D@X=d6Q>#*Bbx?SPJSC7eB^(_UXNYbr-8u9GckqDUQp%AM29;7gN{{zK? z33B0m)#_a1PQu25@B7*|`bWC&LnSY1m%_p)96?p}-oo9(JliLHs{gRaZxQi;5E~7- ziiZY`y8z$O=*KX(ob}l+C$2x6auEGLZQg8fw?h)S)z>!GGs%W_s%mO;kh6P9{h6-j z*DcatVI;-RE)`E0b$GAXZxGh}G{#@Y_HM|Zusq+TsJ=W`kzPC>8$RiZW)Wz|#l;bp zx*=+iGx44%nF^@vC~RRTYoKlr{Y`P8=1Hi2H%;=r5#1=}mcD`#C8+AF%K&jB=-IPx zaL>klkTS~idiSH>(_Y%y-2$+wtc;b*;$5h)6iIwCO&Q!)BGW|VUDNHnG@rlYSVVD;D-^AR&});8=cA93;SqyyYu!`vC5j}Z9o zAcL+i&cf_Is)TD8o22a~=M3I-8)ebN>wlM?AoIx|dNq{g?1QFAff-TfKPwc!_A1%T zZ$;CB+Kb!h_CuFB?q^~!j+NnA6`JEHbzEicv4d0mb_Ze~Wte(o6w)6Anh3PZp7LT0 zOtFk*kY;~G%5UOM(<=^@aEnhS{<4x4BLL13hY9jzY2?)JUKAo>yke;%UK-~r>-=|1 z;Uubfn2rORX?iPT5J%PXCUUh;I&K6qV{D6hUyKNLXl|91y2PC1zn#1G%==fA*D5Fio1CbOZM&oo2@j7s=vQ%*B=_=v5MPZQycxNW6PKRh*Zp^)JHAThHcAOdd`*8 zvPE1|#YDajUfSI&4PVvBpLg#;^Vy;nC4)@fQ6sk}Pb^a#Sep_6PBa(s&R_q=t!2Dz z$$@`MSdW!skT>oszRbEpKS(3QzD{6!E@vf?c~Dv^1YnSc1=;PmXV#7W$mhkjdOrJ2 z?DKrL;ugLDJb>1!GW=+8!iF=C`LZeq;rNV4>8%BOIpvRtN=ozv?zxN*ta(N%Hr5~} zmSCM#Rfxe&T%%Ae;SM+|z)ikNGje%w9OL;(E#hpp|JRm`_W6X1&H4E!z%QA}wYNsO zQ(E7Okd+wn4fCi=tC5{;e{~XQuGD@IV(ES}23Pgo$+C0c9~=TRN0cYgpP!#`7ChRf zbnHxwl+E5=wZHVN=^IXoJdl3-nV8+d+c{26wq|>FrZyj2CZQOhANP~uOH_nH04o!3 z{bojfGmv!c7ur<;U4THQINtWLi~V=O6~Y#;rRZ5{qe2fe<7Wi<+bPinoMpGZoO?}* zDz3E9ycw|g?>TL3@iSV!Y|lvo={NiS@1)dt#H;B~1q#Un2{3X~oj+`@mH-?*t92t* z;1oj7*w>mPk1isB*Iyv$?#qHEA1->!1^* zP@6TcGroub&mIkFA=(W2oDZS1dOIhmxSjVT^kj!;mgke0dsg)__oOB+2qM3 z4=Z~H*wZQKTy|$z)xboVv+35qU`Z1;s0*NYijtiiFI$#ZH&VmEvodHXLQ&qVC>}ji z`X>4qi1e_ElZFU7)4m6;XDr69`pX=!1K3auz%+q%fRP)4EDWpAF9HQBfPeIu&0g^{ zF(1geM6Im^8McsVh@)$+GpFRY&y>#-f07)06%glVHtHixyG(k6twBf-Jys!>YO=cP z>JX+?4E;``j^BKrnk)@+Af+xHbxXBXph@c!{_-cy*PC+VKCW>wiMe$(JVkO_>(S+F z6I_yD==gc&aH3Cww4V4Zt>$Q`@!wUP@h$&xww`H1oJ03)m#Ob8{K=2LQ~`|9p|FBy z+vOnLA6HN3Xz*rI1A-3@|I~8DD%)Bxmz&i(pkw7VK?7_Tx_o6%B3*y#7=FL8p0(!& zj(=S>qMfBHm2XKE1YML(|urAI2?Se+`{6`>*b@w4*ad>B` zbNsa|wcom6KufRpTlFXX{yQi6Y>B9#NEcP7?QV<LcPR1B$u~AB*DZbTVqrF0?3{D?mi;qng&olxte2mi`Rak@vL0cL%hKA6ROz@8wIb zLtRvM@^^_i`>t8Yuv3FALEAqkzd*WJ^21C$oCIH@Q5{4@)AID7kVe#2RkAZ?Ta%BBXJW`$jNW zTcShDlk1b2@Cvs}RJth%*+3%d2z$rbX0#HO6sfo&7&gOjbk_L~0#gHZ{T5Gl#=@0` zs5fK{6A_gXcv-QZ9Yfu;0X8kK`_?~(EnIHwNpwBcmWVtLhL~nNrFY1<*2wxgPKk7M zH{Jir=g~jg_!F(JVgKveMO?+>yq<6g6VdrW-&sS$;s)0L3Y7Cimq!9~? zSY==4*Ytgj27MVH;k(9Q;7`*iNCy2>56s z$W?G>a&uAh>PXpdY2@VU39L4bfBh_QTKHp|)xfUZI?yK2DIDCGUAS2&lm z%%q<2f!l2weA1@*@lkfgl>`L>8WXHm3%0k?erNs?h2tsKHU)X-ckmu7U#Wj5@sN9C zsq>}0O`SSaBz4mcHD66ih6{xOdWyOfEkl)!@V))tXR^HLd1J)QoI$X^E%ZG)%-{o&lzq01G`+Z$97`gzq(4 zWit2t3B|?=zL=5=OoX(-q8j7lsl?KYTgTsiRjhpPj&a!6Vsfec1{L1;$_nB!^2Qr+ zy=CT~;)xB2SECWPL3(`zIVeZ#F;uZA}kVYZ25_l698ExOSL}`(jI5`)jH{&7J-{*gdJyp5MV- z%pA=ui}TB2|0;;!=18k+9EJBBMSzjM2KQ^u>f>&~Ro~xo8_D;WYoS_*p@(9+_;M2Uln_G40l%llbOEyjwTox* zu5wlO-F_Mu6I7@Zc;t>!&NI%@p@Ea6vs>S|TIKO%$oZPlOL=Jca>H$cZ9rYqPd+Cu z<=E2uS8FLFmo7TK(tB4kEUMpaK(dmY@FeHyD2q}mnZc{L8c|3%M^KFLWojkxpN%6m z)aOMmqC;TWk#me64ZO%~qVWzi6x)fjpP_d6A_6kR?cE@!e`*lejHtb}WE2(Uysf7UWJ!?e_G~aRs z|}a7v9p-~kp}gB1^d^I^8UH(en3CV9rIafBzXLM@iO!K8Y!3Nd;t0OwgiU& z8>8cp#J(Ij-*RZ_=Py4Q*imaf)sQ+SWS;wmQF22;x_-mw;}6V0KSwxvmQiXjzi4u_ zm)!9eAbXNN%7nVEDf$MS8eP>!1iau5CS3EC#iR{UFGk#y$C=6e-v9ke3E|s~xBFJ< z*fY_eh&>yn8*wz!p6Uv4R0=9p5Y%ga6xBX!oB(-?tfMe>nt<6gx=-Mpy|rg@R9 zasKo@aXsgX`x)hxO3dB#k;)*D6R zw~*#?hhTMlldl2eQBWS3Y7=TeQ&W!CTc0KDr z@}uconS{=iQH+@D@9%ywY;AANOID~qofW9Bd987qhi|S&>ag(Q_F-9%&PIH%tXTn! zDXH-~#XXSJ2ZjBt{JB<5y(T#^mDdJiE-`SR4e@%;Qbq!tOqy)o1bIuJ>8y|jL9N=+ zx6Yfw92*lI{s%Qd%Dzv)=Aua(GAIDs2mI>jzpz%IYc_N>wC`LS>%`Llerk*b$!ZDU z3qJ+l2|suWD4qT!fQe7w0o?Q1EHhX1QZ{ z^KuXhU?Ijm4QPtQ-fgW`+V3c;5sS02P6h06*HfE-`91_8dV^`8wM#!E4@J>4+zEa8Wr zXNmI-(L4(eHz;-@Q%qyj;QeIW{dd!Uz$_X}1u)&IBmhm2;ay-koNri&0AZQM{MF)uY2+7F-k`r)c%`(;6NC#% zUr%19k=1BV;g_WXpq;|he^qSEZs_LdKU;8vIMdHZe=iSp*z1^zci_YjAHiw#=gvPa zvYb``!V?n=yK-g0I+MU@0ldj$$tN?7812Gme-Z|VXL(?tkets(N`N#;V_%)N5#lm? z{x=5-U>&foJ=)R|k2d0dMqdF)=ou!rV8sfg0NCxc6#i@@UVg*zW4yjsF&|zQDe_q) z&j4`7;LZR5PGQ6Xzs+1ONdlbjos4$R$w=^nFev;vyaY4}>Aa_>zpkBs_BK}*58%;X zBvyLopQAkwV{zwSFZ}q(5(l3CyKXJIAFMN91;BlWF&sG_&S2KTBPuY}`d-RMu$1H6 z{;$>+>bXoLVdF(8<_JZHayk!#{_Sp#Cf9dZ^0mR~834Op%7AX)vJ(134Kq>9CH$q) zA4&k5IF*MR6t`z+YCrOE2EYSDS_V-1xe3U-+Gh#=vJwE5LJXOPGXPm%31qT)Yl}?U zExq-v{W<#Y9c{H|PU6v@xB16ez|o^er`P^|U$EmlFqyn^HC*(}+Y~H~RpSI+mySRi zs17Ls`B}We=3Uh}kWp=%hQPUi=c}0_@AjxNvesxD6@0QG65qNKAMY)hYJ$%c6@{OX zz5-zPb2QIJBZ(Z|*)QvHCJPuK@xmeZHCYP36oA_Vqyh+bb|Ci;yjLRyp{%a}H2t51 z0=TAa!1|g-Yp(rEL@n5ZhkK!oam5x!evbYWe(ocLt^Jt?w|&{#)`G2WgJb@D>8j6S z2|!Dx663pw@}JKae)##~4r|{G9kBAp=IE4ro0sG4{0-*jk&a{}xSOa^e@+E+l&9b` zGqG|@04(A&oYLV23yb1(7_|MOXvwD_=Ft&CHz^e|6_O`>o$)5PNb^W#QqwZ zOxmM^U9%qjQ2}u0e|&u0Ed^K#>yknD+FIQD)6uwq$A9I*xIxLwQ>u?Ss`>ncPC#0H_4A7LJA_GKkb(i;M)JvHDh&#~n>7Hsh7ahZMq+AeNp0Xa+!dYu^#j zk)Nfi&NLkTQ`ms}W`B<*G2&D3X?X$1@#DwcnSc7j3}*nFyP*520A?lzVM*%>V_W?8 z1>GzpEUd1=&+ujBQ7oBx*^sh#L-cz_5djN}J`2GR!LFBb-LB?nK z3R7M5pHD{ZQ@g_aZi%!AjmAe^D4!%?7!fOlpH?%ui;2krv=nHK=+no05k}!w97lal z{b{-J=QjTUodUofKt9NDJ|XILqr7Q`3Cj}}uQ0)2K8DjUT*glm78Z>6^D@2fS6Y=L zsBl4zl2QO1?J4-&tfQOL|LZ%BSz7~M`l+D+sEK)n^aI%Z1MS_&Psp`DzA5MK`=g(I za$3J2FE17C#rFY2*+>nj6Y>&M-hxc>s;z`-ryoW)jbNQsoYTqJR$lPB7$(KfGnaZz z@=GXtS`{Dr*vCo)55#Z=pa_2$V3-sFl?3@r7EWgvuL|jQ>ASkRYFd% zCtL0LQyqBcf9Ccb;><7nu+E_HtDQw0Dp|Fn+j_g9!wZLjvL=KPr*M|)-- zYpR`o+kV7c`3r-r#t#pz)>i;b;0v`ITo5L~ zC-jX9XPENkakVrR0NOnBu0I*@Tr|X+C+GI=-Rp$3T06*?>({Tho}M131S+-HX9nhx z(vTA1qraLE^z5?)r26Pk$x6S?7*z+pVSHr4p;C zz+S8etFOMgVw?Q*Z>O8M zs?9U*MVbLX@+LEG13&|B5c;xNl?+n(%s@j(X%&>@63PvyGkzs<7r<~tX1aqaF<+^O z(mx5b&~#yC)EnmG;=4H_@e$g$zx{1DrS{{3ZjMSjcI>db?z$@&H9hh(Ld*~pe9i!9 z3n=H-wf&$6r_$AD09t|c94w?V>%{eIOAoM&JPPqr}Tuuw2BLc`(?}R=T{i>(H#aE#`QFXtC}I> z`t|!|(XBYSDFhM>2|wTZTiY;d+uL!^N{yX=hYR$>BS*V!7$1=BX)aBni7Su&^5kFG z=&yFN&K=u#SZ7x@8zg`n9#SO}{*& zxFBRdsGMLN{i3t_)=$H@V7MRVyTkH@#WTz|^bD^!yKhOfD}H(bz|26?)%4E zf67z=vg0PE;`ZS2ErnX1(8EeM79SfRmfyO5%i>Wt`6?_HYp1`4CDg$3$r38ppsF|ezLQ^bK zpa>Z(E*Kv42h%UMf3fTH%cEOeMM`{n1|svqU>C4R-F_>6Qq1a|ax=NNfOh+uVll3u3C9!5s$N7YSMlgJ>X{ z2(O@D;pY-m8`MU%H-~mN6!9`}WC5=NlMt8!933f~8p{>HtCH#UCey71Wu!qrc zk$Qf1(IkRze7^|9c!evhnqTStv`X*C$t~!oQJ5g(I7+Hag$oArGQ1w6e1c>K)!{P+ znS;XbMob9HEqLu03&omM@X_Dyk!E{gq!n+5&AjtZq35P0>(c12nTZNzeVaCIa!)KA zPEY`8e86>43^py-wWh5zo^tmX1cje<%W704J?N$p&WnP}87#!_=SqE@!=us8;we0< z;qjRTh#j&XJee9naV$s*fRIF#@M{(zK@>!i*=7Nl%q}SC6T^!*jIZPl=Jox`Bk0G` z&2T?XZb3hd!UPpZNTYDUQt15tRfeDhpMH%BQUE;px300g`FGk8@9_E`I@*i(%NyN? zS2?27^2Q&o|AU)llV|8lpo&uPDgnEYegOjM<65=MdPKStXAVr{2(=VU6&ev4RTP?g&oR33T8if(k`ogdNcJ0LF zEOCN=kLhma8%>YhQ0>G;xF_%;Uh$wy&eOwf;Fy9|^ z`(@Crc!m3ADBg!kCs-|gFiv^q0)70%;68Iu@W~iF(b?^EdxA`U`Jd7|SHP-5;{}gtu|NHyZ(k;Fbk;sg4`?XXGR~j*K zSYD+e^vjXkhe}(i9Hmt{!Aj{BAB0TrTc0uH_8BCFBV9MF7{JRoIQdsY0r1@ak@2Ma z)?ahNeS+NyJe2@<{&}9B8-Xg?>a?c2B0TVDH@UJvFS{u8kl8^%YgI&8qj zFZ7RG7ss*S4{jNKmiC1oYW<3rXbx{*#ajAt18MuvVFrI&xM&@XGQd6{1I zvp?zf6}uCB2t5^BHj~9s>j~S`a)_chpQ=iE&`*!=o7ny8P#&7Z2|g77EtLTkL8uZS zZaxi>ZkAb+831eW3GBQ5+AD=C4dZL2sZ^KpsSNp5whybt`RVF$`}O&5GPc(JB?jSZ zziGR!2mM)N?eFSEPd(b-ZKF9n`oqUQwf?8DA3JtzTByTt^NC! zP&e`e)-?0OsAjRt2}l7liWtL(WSA5-hIX`!*!t#Cq^qunIsKc&x&QC88uUXxkrK4_p`NKoHyRaEaKz-9Bh9KGtlb<1-%# zWxdl1sO%PfggYVWC&;$Ryq&@?90>jXC0%_5FGY~T-pSIre{K8`4h;>tJpc)gijtr8uU)&= zZ2;2Ea9{XXMgpJm9*M8Sciy_e5R21y#Di?Gx;sLqDC1JVSqey>bgr^)ILX9Q~(Y7&C4feMPMg?)v_P*WXU%g?g3@c5dMd9~2IK1~M`;ABmFuVR-C=ncUn`BDPw5HC z6tZFrjSzfWt|vBOm*MbFt!Ul^w-S0mDu9V}&NfGm*y_XpM*sOu zwy{F9gG1R9fA>W81vG=BKi?*j0?;NPX8`^tASJ)H^dr&yutLUVQ<(x{7BPvSn4Gu% zyrXl-Iva84UyaQ_KKeT_+G5Y1z@xv$naw{c0gj%$_m2WZBO&pbpBsZb{NsnwEy2?= zAdV*s2V$4lrMV|7H*6j;@el`DE@h~kqyUH$X+}dlnT~#+ zu2KRjgOKrrG<4T%>Pf3K!h=u>U68`B$DHXj4n9py+SM&@0Vm>9FE)X6$o&64GX9;T zlX)KhrQqvhJX!*Tj{Znjb@yMjEQtaTu~f+q0u;lt?Y?EW1fS4-@S~8i8+&o`ubvec znCH>{P8-9AntCB96c!2yA)oz|`Lz2Vq%-3#yzoNXuwlcra8N)fRI)6K%A_HYwPT43 zu*ta6+Huspu!v&=UpdB?%IsHn4%oo=686?8gdfO?Pl&&0M7(GO>6Vbw%{;yk2GcQK zN`UDX(**lfeM>r1_+>fzPvQ{N%EF*s)OZj$&ri%a`aicnz3)#R%RGa2P~iR1-&X*$ zrv69=RO_R|%)DwbDOE0uNYMC%D@VDousAZ=#3Y%+%| znOmboI$N+1wERr~06+jqL_t)|$x++XI^uT9tCj1X{bKX)VQ&7pOFv4RXB1f0!)N~# zU>XX7FDMLSy}YKZxw+Y;mtZIz^UCs;>8S?XFA(FSLJlg6Yd{X%T9mWjy8eh=)I4HC zqopSTyt|Nl0i=&FP{dvI6HN&jCPDM#>1I5Q;9|8v^|KBd)$0qsTl3?%vz}^9Vg_(S z@=e^5G{2XBs33ENnEl?jryj@Je*|6%KP_hf6nd^^OyX(3xyes#0ll%F-& z6#U&AkJzOx!!|fF;Vv(w5}+`VMuMW3?-zZk02nUIv_8$1j&LEyFGmVScnJqW3BRWQ z^$;9Wks6-R56y(!0&S!<`V$($t^RehMn#$&)ADNa&C1KHXUNnl)?O z69D2QBLzUH(O-(C2~Pt~G_13uk&B@K$XknV3fL4})snH_zTv1{)ea?aY7$Cd!nH-T z65S}^a@My0(%J zK`a`{+0m(9`|9`=nEAyy()02Ujs8*qzVOdd03k(I464nA6|+{3@QD}Z4(9aJ1mnW| zetNone=vQeIE6F4@AmUEyi%N>&UY)17*R}<2ea^lA6K-Uu$9U2nz#N$G5R0G=HK^+ z+wq$4%rkomD-BQoN%%Djke~5nOz!@-wzh`0K{EgezncZ%?ZQ|hX|E-&V-ZVc_#u-O zEjjz0n~vCf`UbHa7ZVO_*i zcu4TMDLXbfWfxe#UD>i1c+CB|KOe)U3k~+Alh<3Wp_?;5PWh<-f}4N70&pWg(g0Pr z_Mg%CH5$Am3V?MI5t*Qye&71({qRa|KYg%{U>-lMAE$7J`EEar;#`6Xe}0-E^NC>` z6LXr1bKy7gG_wHK%|W%TpQ6$y3@MnP@Cz5h6qaS#^tipJ<3(%0_2@GaP^q@r;f^iv zb)|0&Uu6d(>#d`;k$vMU0ImJ~qraS<(6YL@R=J26MJysx)L8 zS)Y;9nEtPA9Jj5Q_SSmwhgx}@n}5eDldrvNZaBe_5N6DJ<~UAJ!CG!qMd z#z_hIa7GbehLLEs7ZW$z-Pyg$wj_{G2S8r?(2f(fAsMkxd^K;+AIn)QUTL6mBYwh5 z?c^1|}7!?}*W`R1El=ZBT4d`#Qd z*Eh{DWFm&ql6j`^-v70|L-=?`?H7M|X-3Po2Ca{u`jUC*CZzRe z78HEVKHR8}k)H}+Y+}kf^C#?GtN4|rxlgR45dOXCb@rvP8!Xw}iqE_y-J6?e6Gwf{ z0x0klet+sO1)v!KqUUCoOaX|PLMP}C3lF9V`or=lOi+0Q6RmLiHibV?DAG zenKjM(y?Y-f{LmC&#ibKA4cK+&fLU`n|?>8R@vu9ZZk`ETU$#>_}#sY(I^!FX94U; z3cs%aIC9cD+|d^2roUb@H%#j-^*l>gNr=K2#%CTeQ3|8~CC#Vof>zx6gAK512E2*Q zzef8$F8*jKZ~l>CHLCIEA2J>NGC?Nh=d*b62XP5AN>3=O@+C;kjX67(+hY52SJ{@r zli;$&dr>G1Cx$_9Vtb@$@7XwLTRX<>&t6?+PY-ojR~ydNQ{bQgC=|3*gt8P)Dh4S4 zDlxW0kZq%t5|9G$>7c$W;W0CNlakS9qo(~c!ar%JCe!ww*4OQ_)&uhr{-JD_eeTrl zHr3RN&%1N#pL9x(Z9*HQ065B1_^Ajq@=F2Kb?T383z}sG5TwXF{9+yoyo6rRjUZsw zo7UjMjwq+9HAs&4{=bWpf1~+E>rT$x_(NtU6Z6eKmQ8oikfF)2y!nUk|5s7~em>@* zKrk(#goeV@*oboom<3#rei@4Z+}g9mvjF1dI2ucWOLtXZNhM0oDbAy59LGJNf~9bfyInZ}Z7CGb=LJ`)Q+;l;Wyx#W`R(NN*_Kq>&1O~IjU!pA;` zlk4r3+-9glgc3M|!)>T2>+FdefEKs&*Hjo@W33_{#^4P z&-U6sp1RY95^J#6(>Oi5Q5(t%fWlA9HH$y``@$bS)l8a>2Boc`a^e!^BX;Xb%pBLp`8UOCZbyC<8iqj^Rc#kgcbE&+U| z4YrF+!x=z5M#_VbWwISo0u&s!A&DOf~ z9k4IGHE#c~cO~vdfKqLlnF;v9FSoA*=nhi?YPafT`_+F^;4F`pYkmno-KTKX*;Nq! zpY40n8acC@qww#~thX@^ znSKf^pIWS1wQ824Rhmjrg1~mLY_*3>$hKs1?e;|OhwQ!SzXrpcnWcb_D`x{u;MAYN zy#hN|j@w^wHZa^_ow!p$Gl8&K0F@!zK*9BA1EMLF9j%PoO**n%Dgn})`K1I>skDuz zGIo8_Ui;vxr>$uY!cP|9qrNxN7ulC4Znb<Kyq?7p)ZR>4_`t8<`s{o-94# zXllZH9#B-A0r+?lSKSe*(B!fItJ zt)GU>!f@YGNMyx4nm(p+AKY~-hj5;oj|OXy8q@zLkGEq}2%CRRr%(S`$MEp*X$(vJ z#Kgpl(|-ywaj3_rooXBNvMxdi3mLNopSF4>c@vfbdu)w68*t|K1N?SqHt7oA9?1FFtS9`^C6ZX^H zFWF6Zces|Rz`j)0K#b{fEhpo_HM52!95N&MhQ+0Gx*@gLr3tz zkCN7R+Fwjc$We`_-zb>u{2&7m7mobZ9{&k%AF>?g^~;p-Go9MVc4Z4~_Gtcn_Cu** z+#GcLjP3{cIBRdyr3T!bTf_5@Ri~juC#s{ zhRxOQ3aaqOvV0q+0Mgj}y9gJ4ZfL1}=_hafc^!BDy)oWwEy;Veb5u^lrzK3Xk}_)<)o_Oq|40EiE1&ORyQCSfAv z^ZvOJsYdGA+*Bj+T%yS|GL_tl7p#`fk7N33e#Hrfm0zn2=bdMhyi8J43zN0#{-l}$)X9Q?M*Jy5vF zzE^m^-Jbb;d2e%OBW=EQ&o>|0j7NzZfWo!-7|FGL<8~B#DNh~4Yy}soyfNO2Yss<3 z#+5`ZPy`e%S_zxz%l5J#*+y>O^2Mapi3$6uwQt&W-G_i4mPR%9ao7g8*2fDyhcN1Y zD|G{2>bbyLTR7^&mLE|PY9>MjKzyX^)$i&9;O7LXTHnu?cFeaV3V?(>AB_ZnZIe4p z36$RZPuo@9^*#GPG1*|>8)(Cucr(l?h9HBoF0TLSrXh0#4byDgxY02ZX9^23EMN6X z36M#r+l;z)+tt>Ji)yaTegz0M)iotv2u`)~y5X^W%5n|P3cUZ~A^VX{CvE>|(w>Ae zcoOt|>r{(nBb*h)@LBa4Wh;8JeN$lFXfbd1VDIL~FW6^2czj#L{>{vA7LEyfggg8b z`Br;u@+x~8?@?G|n{{G2qETO?J)x%iQbeRLX-+HQ_iI8}EfoCZb-R~D0n}alA|+(U zsS_8e$g0Im3qpCs@Mi$Id=7_s3U(c?{OU_i*4`z?^#9qxb~~PF!XcN^?z@Dakc`3g zKcD~8?;F3(998)CA7>zoWyFYNN+|%gwGj+l#6tYVmOCsqk;fsS`%xuk3uoY@U_EWq z9sxe4V_Ui=Y)kiqec+-2+cVN^kM*}XyML6&Y-6~z1IiBRa38Uu+i+8J+J64xe%px` zx7>JMYx9<=aH21d*};qBm)b*qD6S zOW4T>L8jo@e?I0S!-N^u&$WL~PmjYXEX`cPq*#cHZ`A&2h{*5TJ1svE!{fmclb$U~ zfOz|}0xl7@^^V&%oGSdOiw5nP=(A4vUguNf~Pk1E!+6H zHol6#cVd;@KeEH#EUvd^yu#a#^I7cl; z$>&)a(@bAhZ1hv`B>YkYyz_rme8P5g)PDBQujuX@PTET&E$+&1GJ+UGOhKsiKS?U) z@X1TXvwHRFx}X31d4q12&$g)^LgK)%;0%O$sl;B0++q3gm|dUy*SCF7AlM%HePz&& zcO345px?26)Lt8EuvZ3~>>U?Oy88+Z%Lr~RRx_M27!Cj(n`pQDk8iXmCNH!oru!W& zm{H*FM!v%A3p?Gi>|a{a((hx^S(bH+{_NYOG|LKL9@O=P-&X?cEPnFq&hC>K1!~{< z&l$p_N84=@)6AaobYG*t7=(;K1t5kHy1t({tY5$0G1g)%0a&(_fa)Q$Rx}WZm+dyo zO(g6F>y%3%-D`Tylsn_81E~rW=evO^BCB(`NrY3_Q2p; zo5YuuJ6ofcjFk>jkxqUe%B^rh(o{C+XZ@miHCz@eZb=jXnTJL&3|YUC!E}}47#@~3 z80Oa(%oFtcY2{WLL58yqS_!<|6gb%&+_6H|ZYZxGRbCh*Gx64+N3cQFjJ2pnexG5; z94uSwf8rBnn1}0s;TV=?K4C0RhIJDk)j@pyc+R(9kKAnI6CHMI=6_m?4M7Ra|A~a^ zT}oJ*6`+QCMtp3)jHROXz}|NIr~SRwpKZfy%2B+#k3AQUPQ-T>T|B>Nr!@4FpGa4Q zRqA7xUB7cQ z+uVjnb~TuaxBk3>ul*dDNLo8K|0u+qCK8e%XzA9gr&U#L5*PU0lP zx|v2c3axg;F1N47y6u+qS8Z((ugK!Gz}d7fAl&PPRJkMRh&{A7Zh!w;i|rc48o$-7 zHHmj3@}(E1Gyn*SFMPkkNGl0E-Qp?YBfoH?f2qxqD1fC#`t2%Toh8UlRmTwd>k!rA~2U{&!ejZIG zkJrNjz_oJS7Lp3)zo+Gvclt-4eHj6*fWIAD;;w;nWHvy~!Qnus2=3gRwVT$D*n|70?6a?T+MaP-8}Aa#3=|T44h-ZEEe(9X zlmPpl>BR@6oot!M9HBu^DFV`VVa&{qE1SxksuT-=L1s}=3a7u^E=4)Wct2czK_>Fu z%FHkt<&|Gy@-tp;m!ZlZ(*>Rl zEi!~9!P|d~xL(>x5%6-7AHH}3X9uS2YkMZ`i+j3laMY{=w+8cB2O!3p}Uf)6c-GaUy$YbZomAna6im< z`}u-yrt@uCBfAdsl|Tw#{JpMo#Cq$x_6w)y2HWgpronn}CSAf$=v&f`M}VmWM8`1v zc(SbC3qXVU=j$gvqzfT&CM|p%30z*PSM?we8#pk9Rm7LCbjlY-mXT5)GI}>0-rtq=#|Iqo(-e+g*SWb!2x{I zEuFItC~pcpl{l^3gi;7n1bRV;w9;&#tX#SNlP#S+MgV9H@-AEngmYF%W9Jh@1|U<& z_ilhj88{}afIPJ0AwiPskk!%MWfBTW8#`0>scR404-F36=iXXj&z$Ila?V;CW&@hd`NHqd z5*SV;Kt9v{0O^GRfHKNmQ_ch=Ocb61;?V^QQvyq-0LUC{K#)m-el%n{jUN~0_QROZ zH`U^lu2LF5TyDZJ>yP{tz!c8@U*C7aS{my3;NFJjyV86mp z_@w~&VgReqs?F#%sSGKh}y* zK9@#%cCbc$f8;M~e)j}`;gt+=;|zf5&!mwci#CEjeSAgfyGwK{ebqSZh>_XSDpgpqr>Q` zI$KK10bc=#CcGn1v?6WT_lU!%QgNJe#!&cuk}OCGoG}GJCaH%}=bNrpK0n@f&(L+o z#rU8Vv-*%H|1N4CvyE-FKl#P!|L&75_6FWVPnN&<6E^*qLLeh>+E~qyp8O2hnKGma zjc6k`X+q0zF)*P&#nn1E2$hEEi`YR=U_)>pZt(f7=hxb+gAMlaD~@8%U^d4)B+l|b zrwFj$!%v|9^rgq`_O&DS`8QYC1O44L$^8NF4r$@H-=`hvSsn-|{Je&lQ#@*V-S*_B83b{p-&X+D+7p&{u3;))v=IyweA0)bnnpQa=-DP( zeQ1O3Qaon>5F03gn|nv?p0)TQQ16KQ9)LgG%@yyrJH0jv*R)O9ukJi-cMXi#-@LKP zUch$^I+`<%PMQJu%7ApGK^)(xq5|N^ADrqfSP3kN0sx}ttPx}T3@_m)6mw_5;BENi z*UmbR{!ZY{zsGS2MY8vqVunhDBz{~wa@r_dE2UjXxXLE<-9ehrA7o^W za8dvgejlcA&;D2{Yl%YI?&uk?yI1w&!=NJ;jX?m;u|0rlbk@_nt8i!GrQMVEwf#Nz zd4AUbFOYSY6{ZFjLGnUb0koiOjr^>}R|MJ*VECM80%uGCka^gkv&mG#NzCp;3BNjr z&;D<~TYqbsCm|S>*XgdknEty}PI1?pSdcHz?!SGgyRc z=vwdQlanG?E|d)B2t{m!o&zTf*)AR=`tgeg?fO-t_TOIbvqy${z!#-cgQ6+vOTGZT z_>u<|fW8kXAqq~6=y!3*hwSw|9au62zy<_OSXeO4nf3>9lAln_E~w6-KabOYH{s1c zUg}X(0e}>b;n{y7I&<+O1zSQNoaVFRDLkyFngZbCB3j|Rn6zV=DpzjNK~RG43qJ*% z3P6G{ftNoumBBOetaU`j?MJ(h*loQBZB-MF(di7p>1=aavr2dH#q8y=E%w~RTHDb) zV3)QW!i;PTY4PLW}$bEc*N);KA}2<%uY8Uul!!wkg^?}wU7St&A*X! z+@2a}#%9*(kNu4{uuy;`H;AA3Bdfq+mBy}+i$tjO-J|%m1>H>RcY`g8s^x=q1!d_2pwUxO^+tGN`E^mCx z`eH|La)$D9cE4``QaXu#@1`N!+>x^1e_@>+9w}N6B1mT%?3Hi^z@6R{EQPw7MRZB` zk(bzafK?SieUxXhb1*`F4q48+q+yItrl;lf|Ms3?>ujpy+AmE1U&4nfj--=#1T_2L zk7fbvEX@L>1Sn9|4DsNXfOwLO<&-jbWxcsOLQTm(Wp-)KsRxA z7W)?yu%nasDo=jg-UGqEbLDU!Dk&&+_j%7G~4&aF1PPyw%Js?-CA*jQX+Bs z<(f=iC?;*7&|yaloADjK8*OXh4ciuZ*?J;J84W3^@3USm@frN%-oWbCDf?|Gf&cnq z&K^F|Lx$#ZiVC0umYYE(!lRjR)A~xl_an;1qZ_L$fhAD@Vj40LjTj~fU8MJ?crR$$ z>Bsr*=>%|83is2k4PQG>ZVA@>GaP7Z;|9<uZTMtqj#Mt$(`>#2+Eo0B_nuRtF@su{O# zd|`+6X#YdB6fU9xX_(D7*>ky7_HuToZ7S@s?Zp>uO=OQ-9-NJrlkiDFdt=T%bu~^x zzLK;1`lFVanE_CkB=AxIL8y2^^u z_6yVh?+>)vARYnsw3S9If0UJ*%qs>anOGlZ8gn(la{Mx@mE|i2zwOLJT>LQ6K{OGr z#5awlQ5s(n{?UufK5=`4U9}oY46Io1R9`r9)E~)p*f&Ra+Vi=Kt)Ve#9r&&u_dF!{ zggQn|I{HTa)&Qm51e?uu+FQAu_GV_Q_2m!S6~z~9Q{+|51@Ht1`vhmxEk%48itkAL z(&a~?{v!71c%EkfxCD?e2Zi4EOYj*cH`t)^EMQ3$06T(ANJ!%|q#qYd)ltNsu5Zk)kNlvK+^bEJeGVMD}wm>q)kp zShn+Qe_vvKFMjchUm{z{7dw`o^b}i)>}a(_N)$;^fy{BTep@|r_MQbs&3u7T&oVhj6!kBt1?M14^#ULE~Zc0 z;$KrVY3Kf33`R7SQ3%po*^G6dt^U{BxqmPzqZLdW7JT7HIfOOU@Z$^BF&A+@?I_Q` zh6Zweyy7OHwQa=C$=kLh;(q6ztotY1O{`++vXAm6@{b4dbA4Mg8Q$!^F?hS{uV3og zn`5@uA^)Nb)`i}hlkm#|pa}IPVOeZI6hR}?w}v`*F@2+ZIJMp_%j|KtWS+5gf8vBSpYd0=5!=c;{Jn__oxtPyf&{&kI<}pah=h|9JmeVRc+y@GOndMq$e`>8hdt zBuIXTP-U2jbS>zo@#BQ9ALoa4-_P%d{j`2qX^4}T@C(8~2qcgfe|EMGxV5dE(>Hb0 z@o^x`o59@!4epssw)$US^AAb@`rw1~UifM%fS~g6KhXv#;a8Yz!V)aeXT(PRoYCet zc8|G_zRtN7i;T~VEp0>Jv>Yq^iAu_?kHJF4s%x6M80;t@N|d7dZ<6=RhWfOO z7z^NPJD(QREqW*{IsnH^5%woC?w7V?+#f%Xb?a=wI%g;sRwt!fg76<3UgvD@*;x29`KU6(KJ_B}hX&WW&s@0E<>HHik-w=qFZd_`1Yg201prMDUZ0i{ ze#%r>_>&IYiN{Ou!!S?;W)WOYu6GZaMX)+h1pD3k=nIr;ilC~Z0_sH_^u2LqtmD7D ztNr$W`nmqSh75v@up|6Z0D@8sQUnM)mH-Tw5q&HixT>^D#1B`dO6Lm%PdVWX6tj!@ z8Ig1L#oyPP`9HB1tBi%9nE+3oZMF07VyI?QLqi~RA{?fl%2peENP4wVeL?%eilDB}UePs+;CyPU` zMP=PM5?7=nUQPm`YeD4|B;F4zU7`4JIex)d}R9wkw`6BY)Q5pZ{#ez2g=Z{-Aldq{^-l z{-gFu?Y};Ehja0E*Jh)>1m7R|!z=!!=vRo2!iIb}+Cw_7X(uqO0Enx%GYhc@()La9 z7ZSVOiPQ#nd-j04CGwQ54Nf>Ibl%}c%ZKU z6ptd1B>)j9W{MS1H3a~%3pu}|iltG$QuqCP3JWT~U^rgaz_5ogB>03GjYrMoy>n%s z9qv&6*e?$Lc(JF&9UHWHY&!LDKo*aK7nYtL@Z>^REd*2MIqz z{eStnG51S5O!$qh3iob#3=sZTM!MX8KeNY;HQJYTTk^t>;QPYwkNmQj!Zf6|V)XFi z6;}Iz#8Dn?2TBnTmcyz7>EHpp)@atbo$PnWdgMd0Jouv!6Z<7nKi~S>wryK*+*e0O$HZco%wW93;&oB0A z^hf9!_4TNa_9B>4021WsR2)z?UpZf)~ z0~&2o%|Lr~UDm!rvTI#q=O6rR{3ffJ!$Npj$oItIIZ6!AAkQ{pWE~$U0E2<6ngyT= z<|`DlO8|UGSPFnse>S%ayUi6G`^DDZL3{IWpPl;`_n!TWk;B3-M)YY!-Mr+pef##n z`T!5C5FaPv3JI;s(LJuIQ%-H>T4^XZT((~HN!cF%A$ytU!&}d}civ==#_Y+)Ow}z| zq;0F~=g#bMJ&`4Di9O@@1s`FP0+2BJf-hPDedo8yk1rG^FX>eVkhUwHJkX14Aaqxs z<#Dm|{A`ELPm=ez?(|ys#_V_98e1g1>T3hG+wz0=wr&5yf#j*@E@T+-Q2??65*C&f z5S|L4)#-}hks!3FngWdihN2a+UAVBfR3&%JkB zug&>qF8l#LX8M2q)gA6oVzpb+F;)2WxQ|g+ZIVYowy~3p7 z+E)U?2gv$BUvh){N^+^&GxnsrGrHHL%J`#t;xwfhhMHU48g2OaFShOarBCIjerfYcQpDr^C$5IfS)Gon7cor&y_R7+c0tl3zy@)w4!Y`wJ~Q=fMRF#QEJ1wa85 zng#@;Pz79V*{A7BG2%3fs!DPnKVLAU05mG{-v7>y%Wh4}NZDuqnE#h-BZf##+~l(bMJF! zvKveZF!)yASr^*5iIK=3y`}9In{M*55P~nSbpWgY6hKiWP!$DW6;5%!kWINUej$NW zI-(V)^o8#EaY|PX`gs%v`hqYqD%vyedzW$SSGiK{zM22en(&`Zm>Fw}e=tzk`wS+= zQ^`Iq#loc3J>?T59w(@H#nC?H1#+!+YR=C!;Z!>1e*MPNZcS_XO;3J3g~M5Ut#z}z zlhVyBqa((>gGOY4duaAS@hq6#)70{MAN}ws`2IFhoSEBE5 zN3*wHH6@U>wSXOK8W(@~?#4}qyQ~0&9t8lD6@UfcTLEx%^(+7@d2Ro?b$!ae(mbazss(=ib9*0J#nVRw*A_sm0+Hjp9YA5 z#L$98%PDaKyye1eBwqK!_xyOZR}hn5ihv!619oQpgUfo{{i`kphjXgFnZT$i#lx4E z+gE?q+Lv(}CZ1;aqrXgl-%^5Rq7(3HIn_yhJ`RLs37`a|w4}_K7PQ%-X0&Osd#LUg z-NDT3gXzFk!Q6P_U*6NQttA%a+&~Gx6o8a~Zvp6uK%fM!iUn}BI&Jv+@AeU%3Z-K7_|80_tRzpG>2CI#XLZtsje1d7i+KDs`fJSbJpRK zx)JxjO=p7fp-i(2(n66;iAK})?u%zO+p&GjohMiMwb+MHAyB^Xi!OpH?`lFR0-*X# z{U=2rC7>w*$^Z+ep{dn9R{v)AROWsgV$&5FkF#kT8?v^piY@xJyJ8!y90a|P@Jj() zVFkSA6o7~=;TP112;|v+B%5;gEVHe@l{lN{K7GE~PIYA=D?eI@VZ=Z_Q>jSB>AG4_ zZKQmK{q{;3jM#@x-@X2vTiL={hqGi2TlL?2ag95g=yWY+B5Smi>93Jg0wsF+G$DK~ zo$6N~3P+&u_7wq^K$D$V)D&-WKd66$`(ft3KnYZ{4N}tY-_yR?SdZhw!U}+CfE0j6 ze>yj?0MH0??!;s&7(x;_CdU7|TE2^Mzj{ zKXj6Si7q9IE_#dhDZj#k$`rmPJ{%Xmrp$00_!1X(s$cQ@M(?u|iIVP?x+m=sA#zzA zm$S8i-RtVQ-m;~B)i+-pOCSv7uD5AqW}D^7A*#9@lViK0I~uC3ji%J=MF}j4~|ZwlW@Yx zhlKr6F)t9j>XCALmfD&B)@@~-ng36oX?6o+HlOuQ{S|`Z@+=-n|pFQeLH{4B-kSpWh}aIjo&{gSFpIHhRQ8XeSk~uBsAnW(C~0 zDZXl1Jjw~e5`5qMN2~d305G@hSh)%g;)!ULR_EvO!+w5sipuuWaZdg7&p+>0uU;MO zsi$LLc+x1J1VNDd3ETX$(air!zW56T`Q$fm{>AOhG3pRAloEU&Prp5cg`3)>`=#;} zN~3aszE@i(As;$PyPv(`f^A=};Gk1gRt(zQ|3^J*+$+g;w{%hdxw(V_C@=Z|X{+yx z6#Nm@>{@=Nx z&tBzak9?Vqvd3IUFEs_9{EpjEu43v!N+680a1FVi$>@AsiVKI1VkTjr@iXCa9gT*Ey2Hd@nRtK`}gm6gM)(s zf6$MQKKiKJuwg?%6x2sP-h`zH!ZdHOqrT5%ZgBh3_qjL49xjzY=yLZi^`$m`cno2BUuYO3G9_DoI;u8ZjhL z3IIsES?_po*=7665u^X?7&Btip%Vk`?uFqF*J{V0YpyRS1ql?LL>s|M+ceX3C?edM zGiTgWPd()h95^r`_{`mLnD2)VA9hEM9C15$?!3YZAPx9JPauvqDNNhKG;cB9dOCBP z+c0**t*<|7RseE2$Ihk!cdThxW_to!hSOO-lt?8KdO_9zCe{I}q5#6p@(HDT#Nk9V z#g~JH%JTEj5sdtNTaS*w5l220!%Hu{Q#_^gZ>>#1(6Mp?Km7c`1Or(lcW;mv(ov+i@g_dDQnlSBY6OMRjEz2j~FlJAen%%y{-EK|plpXtRr%cVUC6Kdmcg><`>wO!d zOCEkHYiHL7!jFuHg&(aI_^K!XF`iX2;R+Fuo5kWMG8PCF%LDO;hlhjFUmfAsL5I;H zFv9us=Ys_wp55}!eQT?YeLS_`@H%7hila7|{{>LV~Zdv06|TD2hFM_5@p`be=;TP1% zkCwt;okc*a=&Cq~&)lDp9^!|c&tPH@(hdv^1j5l`+c|gLise+9DZKY|i=DS*9X-z6 z5`HlrPz({qrP|jLdO->QB;=Scd)&Ef{BdVFg;xe)%>P%1Tir?fm~B(r)CEz|MYI4` z%TczJJoEc!pM5qk^H~d`KM?Ffyio`r%6aUu$J|Xf-4rMbpMR9zkE3p`fj$pVAN8UL zumtvx-0rsIj@gGxhpMt5xNB9joztAa{6`27{;=Q&!f)}{j{<<`XnM?lh+oX9!vsl3 z-UKJD*ypO(wkNFk9 zdn>}%XmV_z&0a=tbZy4)Fg*e!3xI1p^zap<=u=T0MG{el${rdT3Z{5ZKmD|O;e{81 z75!pnev#rPqA8QLB&G}xKKNk4wE!gs2WSk$0cj^?NFf0m?Z8pKcywfJtGgq%-%`%4 z6~N=bt;?c|8=}#8DsRRj{Jy8NCwv(@*OJcC`9z^8u5lum!a)C?u0>G496wAt9O+(p z<&|IxfVP!WnSzQ3G8z((w`2d@1DkTLvB3_5;OK->&dmSkF1EVvkw!byZt8{*X@2nW zy^2$NbRCA^QYcNa_(J&=r?v@Bj{aM{jbw>|>=dvz)G6U8tm{B5AC!CNq>U7t+eTb7A32?a$A4)%G3e!? z=82P#VfHXRM3+MNRuZQ^r5uEkm3-#*hYlSIEI&3iAz+O7Gj-66vMJ-9d+u@f-FKf` zwQ5yhzLzUgeGK$H_(Bi(B(MVPb@2<4nWi+=%& zOzP?xp^hlU6bkSX4|bLWDEJQnk?_z+fvo;3KG zI&h#Y76$LW`)>EfH@-30L`HcimgzXP$M1jf1dzjGqxOEpv&n6y061ZI?i^hiv4cW3 zE(u-_W|a38Krrf)WZVY}1QxzN9L$XXq6k*3SmAnmdxMdI#UNgHr9*J)ARssjO|IrZ9BAm2hmo;9q|ETaw}b5w$m++_RsBN zpt1R;u0R1u_+fm7fl>g~u>eFgh!`e@?o|TA`IW~nlQ>-yR>u*?bAAMp9bWA5Mo3vC znivJG^D{OQHrZEL?==NbZZZbdc>nqvFWRVNZvnxmbSfQ6y(j|e;zFIaX`NvN+Ve6e)yisRJnq*8=o-+u&goVRyU7W#qh)IUH5R4G4WKhU-Y3} zgmHw`PKBi;5qSCs3-08}lkVuzqd~u+1aK01($Cff(;!WYV?1eXX@NwU8{R#Y@J)&z&?z*=?CGmCFd5P001;^NklrM`HHXf|l#V7lg(a_5qyz-1Na5;Q0CU)+SrrwGde*@Ze(BPsfdDe9z-%X9 zy=aSngRaeX2ABQLoyp4gPek3h;fPz(k{`(^(|784b+)d-0mjBkVDXB01OX+0#{`v? z0K;pfP<{z7brG(_h4bio%oM26z}cJxNn!<4i8WrG0p=5ok7P(SDR7 zw8tVt_$8FkOzkGmTsde@{m^yCjvayE-+1GV0o@UL?p4dtf4--Uv<=^A(}3>W3OAVT zu+ygp=WZHc{joS+XRoI@vuy)mr+ImeGzo(ySIq*b7C|d5*B25oK8!$zqwQe^)(IL~ z+TEMCy!W^ytZSngU>&Q=I>%ho|i^w8NI9h?gZz1k+| zK=}Z{Is8ND5pJegyvTFgZMV5in>Ga&7V+x) zIjpi|QEI0TrNFV6ve5>2KGWqkG#odEE?LyHZpP|!yy+J)6*nn(1xl!z0-!DlWjO5P z;in0wD|N3}8Oj6ny#(KfN&DpT9gBxtXK?Um8SQIieB>qPdX1t>Y`Q>)(vf(-bHR)2 z**KLKE(6?A4tS;$IJK9s>h<%3A5QH?2-4;|w{vn-nKlPG%m0lU9nW1Fa-$>m7959Q zn6Tp~7~Mu(;o;*}zU0bMNa#^6d{YrKAIJhQ^#*OOqM2VAmXkaq8szB{b+4wD&Z+RD zNX$r$+5?%0eb~xZD}FdYyDAF6XUa;6GneVY^%qnGCIlIK=6CxNGrepPtJG?EaLP?0 z>h_)QaLYQ(w9e+|j0jcO`HUXEHy78wkQXbD_JSLXueNLSOPV#%5ly@HhB=z|ny$NS zvxyP=ZXl+$@B=q!A!aXz>rCQl6BZ3^#OmSTj+<}3Ie2rAm3%A@-7nNfGpTbnc|;SR z7KEWsy)oCt++vr?#cfxhOngN3j*6NDX$ zZ6qvb3fp4Yp`K=U&MkGDHki3RK8KX4u0<>{n?KK2=U)p_z+l3OFf=f2=Q?b&P75;y zvBYeUGX*e|v`so@1(f4maFClWU1$d*J^3*2*RNk6jPe^dZVVQ75qi=no$9&P5PYG# z-(KjzH68^pV2AmR=In`3#MXl50%7Zu#8@lz2(2u?eykBS#&j}SX4d6$A^=ecqcWcmwQvyg|dvwF`) zFJ9r+VxH2@Ro!!4j(AYza*cz3?dOuYm>bR7C&+D}DXT?;oaO&)dTZ}`+RLhw3V=$l z@Kvz@!VUJ(RpSM9FMO?dV6l6p;<<;1IRpt$n8GHsx7g@kZx2dJJqpA8zcgZR{@JGj<(28x2|iEUVW~*{p+Y{ zfQ+p$4`!R)3Zvzmbc&Uk7|V_sjeG@wcDXtVKn=YX5C*~leJ=q3a`ab&jpw^MSqLlR zOe;Tgq1BxkZFHTjlP`22_`WirTsoF`ZT8_nQWOqT1fGG*LLiKlAf*5XVhUh29n`Tm zm{}y68)ma&Qns5iZSAkb(I>KwpcyoTUI;wLwcT*T4Z+JdEZ`yV+=qsKzDnwuk7@iq zp29n3h!14=vR9sW=K}YUu^c8S3V@E0@cZGQvZ`1BbJ2j=lmWBIg_QtI$9Ml$G$!1- zwqc`r8N1a;_IP)znezG3pN_*z0r(wB7^gbb;V?4K@!6V;LjX_;OdD9uMvd4|$TX`W6R=sxL1)?l-Y7bzLOc#+S0?5>0?%7^gxQ=$y!Hc-7aAh? z`0LfFZ*xYY;T&gF($+b6GtkD6R63Z0`U*fw0O62;%dA?o~bdPPs2`K>T^M&7Ur;nSDm)b=> zZSG+&y6{C%@K^^-8wB;}4}n4;XoK&lBV50KpD=X>^;o!>ZOjIzQkqmVbDS-Z9T!#< zBf`!coy9r{I1tZNiCvGF`95uE6YYB~I{G3Rh~nJsejG~Xl2)un{4k{J1BFmE3&0nG zaHn#wQm3?nZJ-SOA3@Sq|s9xUYJFFh5XXDFMv?MRo|r)tSH`E8vP^!&>$CNu|Kvxd=zX18+1 zGS}6aAN9czVFxepK_Q7wz(VbtH4+Q30MWs0T$j$x)v9cs5HDX$a<+X~_!0aG;kR&g z6hIz@Yx6InQafRJDFBZC-rhRumf7wW*BF?4QvXK7j^_*3aM0a zw4)kyDplvTzNfwuoWRF)c{(_hbyBHM+?!^AaUqk=<+}TG9QJ^)`$~YYlt7>e=Fsk# zCZ=NF8na9Ml-^`pW`OY zs5si}dkUF)ZI3DK_%2=%nLWGZQEae11-xTGJ-+kn)jh@e>0XOrpGTny{V^AgJ{?L$ zQYSBFdBjyr_^B=MRapa|aX584LZWbRqs-rQ(krdX_X#WE7eoof>_m^9i!uL;BLNYU zeDm+s=3w+k;C)Y>QUZla5iYtX9E)8mzET)2&(Fs_xiB7zAG2=&q|MjyvgjPRSky-S zkmB*{CM-V()h)Opd|H6~mDjfRZyyRN$&{70+PZ&WG@Upx;CNXC1)#@)zA^|#e=4ks z0svPUDP{~enER#NbkY|}OB`OxKnfsjW-2G)29N(rdcZwfZIdt6 z7Vd>{3}2VaAHH8IKlh5=2VXXxq;mFXE*r5Y8{if$efrmS?yZ%RH~mFxL0MkH%ZJmi zX<_D2o5hb@hv^e20Ce|k`@?pwo$Al^+mYbB-;VIhhZVr}H3fh*L}(E>3_1Jn=JsLN z%HuyW6m!-Q`)u`p)aGUE`)9QG=l!wEJ9eH->FA zOTw1?0{V-weP&m`P!nMv1{be^zi_)n6ClBLzx!tE8Upim0-l>n?i zVF6qhYXBl{n1CX(Mj>`a-ooR*67tHeL@H_@{j_KQvAn4-ftT4YfeOQL{qyY_d^v<- zC=+v+)3&X)1RW~JJ!<<3>^N?Fqmr`*1BN#4^P&1j{ZV<@3qPgbW`)D_Kv^~h*7_W@ z*T(sM$5N-QB!nK}FQx#hX91{zesc=N>3*quN+YPWf_^-4^8QFfc+8%Ex7VfIHXi?# z82&l;@1?#bcXS|bhg(cl0KOIA3%_ufYv{Mp50|Q^Sh@*(EwgP}cIOgvcg|j0EMr@% z*{6`-a{&%M{lS+w;TDFa+H*bK6Ac74FmV=LTb=Dnou$LN>$Cl1KYlfH-ip%vU!y-z z(*Rijv-}`j8HCl*Fdt6Wg|d~p7f!FVJ|v9y8P5+V?eNc?Eu(IEbJ9$%5{8eBWKY`Y zpS0();ZJ@~2$8i%Vd^C8!!W+Hy{2rOV7NThACA|xaOD~+CTCji{3u&b;e!&iAVWE4 zsI@iP3p_@*gfTKS7i0VMCk+0+2d~$PQ@ceIXha-Jlk+7y>Ue55OL~|FIB_X;=~!>J z&kAGY=gc!%0a6G+IzCVW^Kuc;kgM21M4SlhLop-7W&!ZFC4<4rch(+*6>@0M(UiUU zcecsSRGYf;uW5iUOq5Y=CRY0j;j6e(X?*-Nh2co^^9fS`dD5wv89~V3SeLV-trPB) z(OBD+eI-Cxo;?ccBl-uNu4gC3=R?sV&!6^^d7uF7Si0FNV$A^7588Qq1od^I8{1PVpd+Hv3+5VQYGq9SPo2H)`@fb89I0W<}4~ zrEk5MJ!RBE0U-SHTuTXP3P9J*4+Q{YN`QT$8G?cH?GsH%c4Qq{Imb8J^Q!Se{e$Rr355Af~r$6j7#{sSUSZQf|Zt0ES<^}&T111V8oQ% z@u7CpT(eUEs$*T74LGJ~CHz2z#q8=6@b$gQxSpW;#BZnCFM0q|wl=jUW*?8SjX*_M zvof-n#roJw$)m&REH42`@WU2>gr82Yz5?(YUoK25MKr=V*!=U#l=0eSs(aRqPxLI0=E$K8l65b6szn(qtx0yL+MC{Y;gDddX9la_nnDkr?TCQN(y zD$UWMHkU{@%$^BsJXzk7a;xkGtE7Ev0inlB5l9)p{P{k~L-6#y@V%ZO?Nghj3`Li; z34eoa*jpJx0nE<)f9XQ@{9`W%=05_@CLk$*u=x)|O;`X`dkSEcRMkOPIfX@RpqP!r zKX#e<-xcR8G0HI&A}Tx?c>0`u-rL*xCt*Qg!b)Ij3G?@gHb4)*EresH08S^H+==0K zw|$W@V2Q2K{p9AKQuBX=2q##i=y?$hj=o3WXq$ax z+db7|AEgKegju3$$9b#G7(B*4N-JChWu-)215j!%)I5SggoOa4(d1ruhn$RVWU;X_Gw4 z?m%Cs8%Wys2J`x?P`1kA%!1g}HRQTt371Gt3O|hQD+BsPzK{Z_HVrCk%=A+UZ=gKw zQ(Jvy7|_J%63dLZ?JZ}lvRNDjW|rLldUoWQS1xBRSV5Tnyac2vK-m1(BA}rdXsg-S z9ac>dmoNLun~E<4{W!wDkm(*J5|-y0A`22Pq60bnV?*<(TiZI~a%D{1=X&C{LvHGe zKN1+Ak55pc_a}S=m6mIq;tO5to>yFuUf2G8KkVOE7^pNr-w7wR1tri>U+2!Ho86(y zc35ffI;x*zdSRZfEVaD=w|0)$heGm)o`!{=(cd?NB^<&v45x>|wM*^eO&AaVi5F!7 zNeQ43M~p^m>n_>hwEdQTX5%oUf1jN?|H-|H1J-&>ehI$Je-wa}0KyMb$Xl?A7JvvL z;smwXpRU7@`-=0^Dh}v}{qzu;dp;!0+kd-l^G}1#Pp685YRIp>a`e~XOZEXvQ^W`c z4nZLt793rx1mUD>U?E&}zfgMR3Byup!*%%As!LEf`;aj0tGA~C`jl&}cU%Z&Xj0lhZQUXQIe`q>0)pHekqZ|W>*n%RuAm)E8mv+0C^69VQ2%8+Z zOQZGf=;hdy!#|iKBP3y8yrk;hDMyb=YM0O>`10&|_{l)0d+~Co<5B3WoLO0StQc}P zn#DD2(*OxQOfSYq7^DC+GSW8sO?|1h3eF0rDrOeGQ~~}t;s_)7YNwQdXfTpUxfQnf zx2w%w+MD5#98B2;hI1pIcywr=RV(4g{Kq5w8vSMVYw^!e3@q$GD(0;Mum+TM>Ht9r zKaee!YwfdNo7!z#bSd+n`M)jxT}pE1-{b}$35X!VgOfrii`+a*AiM?Du9)r3AG3G) zzWM5EW8T>z%`~8;G3$Qrh5Bdw+61bIN)Rf%oVB{^%dJ0H$>Ef>Qtx+IL~5 zP>0y3k=*VjL$0~p;U8Amp`J$T2pbj0&0>TDK@lX3lkfx=3*^to-EV^w05EQIpC8#e zzzdg`Ses{W1-$u&LANG8>V`*C!SUq?zAyX|2q^#w4iNA6DL9Awd_Iug$C0r34yg9f zzOWTEJeqXNT(7%xQMV0DGh6(#S(|&|Oy<>(Ka$vMv_RN-`3JAjUn~E<@FO^ZH=dXf zq6Mb_tPxWfL>&R))e&RHM0NIMq}MIyWaQ!wvCi1@|DT!yh}p@%nEf*SB_I-dL6s)K z()B`s!dZ$UfukL2nqF^zwbm$w2W@V+9DU@%f5C_rC` z)UQCC;LNa^yIekA!bx~b@YN=b{%Uu^ra~j84FB@KP&l+#|qraX2F#2odAEDRWA6BxjkWG&MM9d5ea#r9V6pSXqDT^OR80V+)?{hDF zt+YVjOA(CPr@wbE8_J*kS7!cy+=Rc!=KpO?lLA3~VGka@6Ape{sW9oo?I@MrzgH+< zx%vy`QJLYkq3|d#Wk-em?JFDHmbN~}DL;(nGjZf=jgPqx@9J~^dSBeWfta_fWMN6c zN&$fnPB?>$a8er4PxvU0uB#12Z=k&R4Jajmz@yN@R?mo8L%Gzj`=#|S+LIT1N-%>* zf2OD1`Tnu~-~WffZ(4h8bPK#pe<=We@o&lkV3>x`tZEj3PcSO-o$e7QVivovG=j>j ze1$q8YA4k0S;|XM<=x>P`%bWRh8PXTQkdLai`fK)L;2FDrkJaIm6TH~joKrqwgNc> z&2M~zv)O@*2?_e*DinQ`TW8k^ZjDx zKb+>sAdQ~leE6F+g7{#>?T9z?~{r}HiYz#jA zg+NFceBmIB6AUh{gFm%bbkvC3VtXdOd0~~iz4Ma0Y4Igv_L+?la9YIZ|A8HS?r?9T z`*EKwteTRc9?{pQsqj!=^4P*O7e zQ35jeQ3MkH(a{mtH=J;{HJx@px9sSQO@G@k;Qs1~{zpIebn0nClhIxlfENDzxxYsK zK=A!`5%%4JQve_j@qJI6IwoQB{~b$*T}LC2mWneka@{i$wfVno0J3=%Oa_Aqih+O% zQx7hDosV5O|H2;{5~kgRfqVrioo#fVdu5aR!6oNnZ4=aEx=KhvGaC5Ez zjEPLq^Pr--P8|glljP@NS$Dg={8QH1JnVRXle?IV6`lVh5MoxrvgOX>1hfHq$@xM= zTTy=8kH>QEXrjY?_QY2Azi&AlyeHsgQ}&9W$%$KSX9fJbyDqqYwKwW651a6g=M+u- zzLapOPxYNcaFcRYzxep8EQXCP$D8>d0S=8Ma@o;=+=n(Es^8MlWBI2)*3#t5ww>bFzu5n|!#$Z-3=Kwo zgx??iG5rfEfPj{?!)P)=S4%s^Nf}RxobAQx)vLFdUype-7YeRyNk6tXte$P^4}&N`|6S0$>yfmhza_jG5%0v zW8<*F;dnfrFqpLXv@zS5#alI*tS#!~z-O-7HW&1nP8q`8=ovBQfD{pHSJc9F2J4`$ zF>wR5wd=-gHr4Q%Ul@JweVglFm$i2*X5$#mzIHg;|7(9Yd^nk@8;Qs35{A#H(Rl^x3vu+4_Lv6ge^}% z7lQ%6SziO|tjs#&Gd#TK)2YGI#PP zq@&3Xexc{HpZiJbDZ7X1k7_Guf(;r1=&+st#mRm)xXw(WNHt&v>1IJ0tq;_3cO|F@nS zcy=U}y)ZKDI7gjhS%8>XBJ$|QjT@7<+;U6mD_{A_?3Tr?(D~@#kq>?7L(zi=57wFG zR%dkOn_)I{4`>UG;~)A$^yPo}VAr2*TvoSzHc9|1;;lQfi=x@wy7zph_rS$L$D@S+W0RS}KgLGdBH*woqJI{)7fwBGZ;`sSGlzhPiYS!4gl*ZaOW zF8s6~nusoc@5#y4(URJZ(p z{%ZT%_iTu-&z2a3ENwv-Ok8aO`)|K7@OK~o&d9ec5$#4XiYHN+8u_*IuaRFgz`7|r z`dc~G+Xq15bLD8ucv<0&QYXUmGk2l&aho3m$$xal(?oAR?Nem@|vyo6E0SqUVM@(XHU5%lpBK0baeZ`#3!4dH zXpuK;soU5bk2IAUq0q3s!;#U)j|L~GP!2?s@XL(yM-jW7cbZ@7dZ9zwgL3uSB?X|S zK_7hJ4s>T5Wfd?N9=<{va{?=^vF09hoWBI7HRs_dplou=eps}kA7|Vxzt#& z04F6Nfh(l|{HXvc$yer}ruO(~`n)85k^%tw!Y@T6B_IXBb!=l>UDuzzqwP&^yR~VT z+1)czida;Gqi*P+31twaph8niy_y&JI~QdE{c| zxnKWQ>-~THhGF-X&8gtqB0PefiQ}oRS!I#mcw_6fJJ&aK{mHimp8L|_boY4OVMV~m zEAv;QU?Bw{C7|{c!j86ye+VP^@`V%tiU8pU*2n6iEx&VL!!5sgf7|O#euQj-}u7izy9*!)Im$^3qMl;=KQ|pqxPze@G(_m%}tv}7m@;?lYFnv z1KM-uXxG|B^~=%1C7qG$$K9DrmWG57PXzSC0YS&plqt|sEpUewV9vnAlT*=#5oU_B z74%dtHS)cIu_gC^^wBo=y91-{1GkLWVX8(*C^!QbC=ZTrTi4L_#a~-;|HFq9ul(^t zgU>yk|I9W0t5Mh&eiQ)sNgxR0eZf%Qst z?bnVADFNsqn!|87F?Y7)Dt91eEJF^C& zzi>;_hBs_#TJ@!a14lo#FY(g;?#xB2pMFLWAnn^`qP* z^cwXU`DrIU+{THv%~bfU%%Gvbh2Z>76LSjh+@2d6HU%s~*Ozc3sYv?La1O#kKzT8@ zV2Kj0-&-LiKtrJq4(5{p)!TFP7wq}@v-X_*-qv{5eeOuy9l2EJe(&y4w`YyXrsbOH zlmG*cJschOiN;^Or+vr!Zg1W8{nEGI+OYBMyIOZ_TNzzpHnx3g&gS|v+!Pg<{DaxvfBTL8&;Pgm$$eG_g0DxN zzTnH+k;0RLo5HiR5q_(8VJLv#`mNsrS1}-AoRk3Z^*dJ92j*CCr^KJViydv`t&IFw zC1MIHCuN4~)4l5&mQVuFJ5U6+`!Z=eBEMt1CGUk8?Y12D?8OH6D-YGVf4MX1e&x0i z*KV_QHvY_%h=BqzMPT19sDEI4+#Xx^mTgU2cC4yj8E=d>OfK-vtVO}7 zZ|2SZmlMx^^veT(bD%qO!tg=3CHz3m^$~svK2SFjE&Ta>GW z)9f+e&)pnf{e^?+ACuQSjN&uP1d%PCdgSOz|61|aB`l%@M0ZT&=WRjoN4CxOLH5<- z_^x7yO$nasHEZDEI`_6sDfi1e6K?y`{QXM0Cn%`EUr_P5KytgYCDMG~jq&yOZFTEy zDZ;+8o68O+BdNZj^w6Nanx9DJ(j&~h^;a8j&^8{RNYS=fu|P|);_g;jC>mNm#oa0H z8ni%hclWlqJHg%E-K7KzfdF~a=lQ-regAyob2x0_sq`BeO)uZm6jz^Y+L9u zs=p!b`!(w-gvox}htFj|57No|PIS^esoK_mWRZOdv!X73!@Jant?%^eVQXp?N}f&a zwTtvJg&Wmsj<0}!26Xan7oeP&R}VE}!W!N7uAIzx03S!=?%dW>k@k+#j*$kx0gNo# zcPtkcSB=;Wy@Ia%_zSm%H9Yk`n7K{?l~x*3&!vcZC$mJ|?HqbS2n?$GIFEnbq9Rb@-dyt|D=S$v6z8^nKF)AZGJg z22%(bAy@0RU`~j)`^k#^VdVPj#eQZC$Ti);=o2&JFR%Qzu+CB3O!ErEX#4rS&ChPo zm5Io|h}n*~0m!2h)RIV=2v1Th^exmghR*{I@)7Eac;#cTq}`&`8Z3mFYw-qOf^P9L zxrH?8Yv5?rb>;fnP$ zb?=x(_#sQqnIN{ehc9e9Cs&ndilXy)EB{u#lJx@WQt_ty97F+Rm|9T&o*l~-Y0TZ}ahL!svv-<@ln(DXKqZGGwD0iBR{kxql zDR5$%{p&<5@0%uX3C+B7d>O!pTRlA>zZ=#4&7r4iyyRyRU5bM*eSYXJ)Cg>`woM}f zIngPP{xChL-*%^>O9eYt1oeDm#<6&2^D{cy%zLr_Wwq#z*yok-mIpC*%4Q3b87wsb zPMZkx>YG_6gSxhbX@Zkbso?>Ngc7ukTBuRP28)Ox!KP0{CkK6lJ~T#7Ru;HT<6|f3 zDgvH;s19jq;q36e*<40647ja9SbPU6=As1It%k}s=|=tUQ?X#J%Vg-?KpZiAjDA!J z5BGNqS37@ax9p!>;Bp&ciJni3dr~Ou<{>%~9!O|#myOuwrfb8eO-SM5g6>=gpR@n* zs%R;ic)7lFNu;smxzDNyV9oUf>)1>&t^GjU&(6+}z~a8(JT`PS z{2;f@!HE@>?ww?OR)C@kSbk$#F-p+oW6CN-*lmZs^sSDa7S)DJPku-gE4f_qGOn+8 zE(zOIQ)*<77@eI64GA>l@p-r;b9P|=blmJxz;$qec-oGnNSfD?q5Jk?Otb}vmKN9T z@0-J>i-1F1>03FkZptIfKDCZbwd}acmI8^SK}_3)KA&LO7x(~&B=p!<{sFxoUC&$V zFDeW?^+rV9%YLoY{%Wr1!HN|r8;WyzCoYr@6p~Clk#OK~gtJZ*!Ng%s_Y5P77L&p_ z?avG-b<)%Mw7mLMQwjaF8Wuuo6FeF!v}*U|t!+!R@rg(7wiHu19z%(lR35_CcEr7J z3h2P{n!^A~D#DX=`;%}tTP+GbFk*SJpJ6PHRM2JK-K}0$M2G5FR5bl9JA0I?@=cu0 zXyMX0O`~p+tct_V8jZImcXCv;o{FjLy&O-9w;Ydni5IW<0oF7*2xd0^1T}@t#yKxJ zi-&DCx667`hD?6}ShO`A`Zgv2-ZvOdO* ztUVrWp=x{kc>vG`rf!8QUanW&Vy;5u+Hyjx#LQGKCJ(>kw$Dj!eVh&ZdH34CYcwET z1Vy4%Wh^A>`?#9IREYz!_;uxv1F3k7ey0~Z;P6WeARB3n;`iCtSami=DKYN^j{ogC zJbeS-{H<0ZVHPF?mV2cCw0WD=-6E$g$>xibYSQ+#yM=5wnHC5VL2F`K2PkN6VFm|m z6G)cvwUk&(<`}>}zV_OzNP?;fe&9V{6AG9OIHrS+t8o#{vEbCm5?yxk`Rea!gvP~) z>EgYT6WLfX8zU{~{JYkg<8#qRe!DE2i=8NoUvc8d@E65V>&HKY3aoUU5%Ss(WiQ~f@z+@{_CX~ecr2&Lt zEqQwotn-2lkQivWkFWHCXuGsW9<@B0=fRDA+Y5Nxw(+Hq$RHsUo}Ph)Y1e);Z!dv- zxN2kcDa{$XXKPA)@j8;jpyPqQ7yzuH($qU!O_5EipQv@)SY- z^9@_2^+oV@K+$$0=;&(Xt~dP(E@bpvR|o-c2C9zB|u{s%dn` zmK4Y^vh=+9l_Uw?Ne2;LaZ>!w{)bJfx`RNc7o=~o{Ss(Gq1)U?7m@Eh*#BD98(c_9 zmKUSDIOO8=i`FziEuN)C*UAMNYwc}8})Hbg+($BchQ;VD3W&20yGK>Qwj)gZ^e zqv%R+J8o&u-s|F{hPHI{gAZ?)=;q-T6*KnoTZ3qw{zTRa1W5^3QRSjp^1B zsv_IB5fIqR=FC z&u#_j1*5z<*Vkl-FTd0>bt(5rmoo^DgK)9kPFGx7^Xq)G9aFq zlD|e5&?}W*MhBAo`83bWg@L=+;U9zAK=)e8Zx%T+cQ;alp#u#Rhd=x($vOl`G-K8L zt!4gbm(S#N-rt-^+S6aXxqRI#Y0HWJSi=%RH2=d-B(cnHIUQ3~@4lm0u@Tg}VI70; zU6*|ff-!FHfW$7I4R|l;MxpcL&N8bONc}%@@ErF6iMurvF&BUd0ia&;pHx0pd@u~O zGT{;ipxpq&R8`~%a4B(7UlGWE{`eIDKt~;-18}fVyK9fxd(;li`K#OqK*c!q5$erz zhtFEh0018GzYPtLp85L!b~p7vJ8gg7wx*$V{mk#5MaEy5+{_mX}0S_6Qbf8(; zEb=NZd$I6(8v{G)o%`R`DtAY6h?w9fe-F&!CLE$n|KFc4dC;*p$#u1@iL9tp99v9} z*mZam|JqR5h;LjGGR+9SBOKe_H~90sp{adPVd8(p)%nVkju8H(s)W?) zSYu=PCJkvKV@@sG`fF3Fz`>P~(S{6%k=3%Y`~Q{g=mZAs6ExI&Liivv`=k=$YwF7o zyqYyX%$JoimR$THXFw2=wYuVxfADG)3Piv&9^qG-L&y*FCZ(_>xL3NAC)VG5?C?4$Scf#l*kx(=RseG&S& zN*Q2rs|OoIF!+@Gj(u}KDM4!FpgS3bgMmspK0hA(^S^VUGv31=(5`zT3;EOOf8pjC%?9+5&~KhbZ(R6B>jJb zQFP%Sh|E~OE~c%nMH1oT&fO@IlA0R7OEPDIslB~@h{k>OVyA&((a7yQdK^0Eg6Rn7)2`u* zEX&f}^K36E0`=%)5ir{aWvp!^e5s3@xU#AHkY?ftc zvXi1m^Z9C?+RO<`U7I7kWV7wFaD6jMk#yI{CrXtHAE{^bgGbUCZK#@$%KIM(szcI2pW66CKVTj(KkimygjGkbM?D@8D1stuZE>$IxabYnV-(wyEIM(qoz9j5t)%(zS;?!oHn*EwoCsp(0O> zWQC&t47h#fa~y+mS`dF*k^PY#Q0311T>cNQvv%XdVqD`(w)k{7uj-EDMt4#}uzj*a zc1;1KoMpmnk-BvQ*~w8U(j^!1ESuh~d}*icS;r?orqG6SY;h=`Qs*}6!e$!$>kQ8W zJu@paYFewqMo1-d+TNQ~cnF_lTW5d6lWi!=L%sK#o`lA_Alxf z+fU6n5vXDuu!rv;5YgkIhYuNUa1T8_y?x6;wzq^?!zo#!++8O(d)k2cyceF-r3#Nr z&6QAc55^*Z+wL=HxUXc(L$?nvL9T8f%hIJ}SJnq+Yy|NT>^ z3FZ0&m;Q83+m%7I`8R{C2CYuhyH-5IR!kZ++}Y*eOb87`bFZP4Goi#=3frf}&2IWG zS$N~&`^|@>f=e>=iP_?`>n(g67V@?I<^LcT{Zt!uC`PCxD_KOlo=~7~Rq@#>syHu| z+v%cX>BVq~NlwW&8ayrD=4P1+hB{9|lx57f#!900lpc(D{-!kKef1Te@K!q;I~{!i z3f#&HYSc8tO#szZagNNgx9<*q48lA+U6}}pv6UembL(Xu z6KDv#Yu*hT`FYpJ%v(XfQ{vr8J2}JeytA*pu6sGgFtO^z579kaPGgKQ;|3`f4<%pX zkLsU$r>)&0QN8Y<>4`VTB%J&!WaHmQpYqOD8j+h_LD=VfJpsks13uc}L5()=$Ylu$ z3Wuhz7ypPE4gHA26JuXeT8xRaj4=_3k`qYz7|WCcRWh3-x5uMBkjDDVA%g0rH;Jh^ zEc{z!;#sCZ+_dR+--!5`tNuE{+0_R;AN?WY)hOl6fvc;r^O5kQJ~q*c6QxZZ>}_;@ zw~DZyOyLmi0*JCPF?nd0bwM6Vz3$zI ziOd=KEqkI>vpHD z)p@jQ%SAVy+-7IXdwaEcW~|h=Ya`??Q??aqH{VLt%TaX(S2kAiUBNTwzXw!Fu7hGs z(%OL@E8|(B8xC;jR=as8BOSW~eS%o=@765*tm|w6$5OGO;3?PqDeq1Jg5szkil6^X zo4DFBN!ifJO};p+?l^w*ASLoCELprJ)s88Fy6rGyMs5cNi z9(PthJ@GHG3*N1zWyIxv!a~Xnd;9E->k7w`V<$V=X#MHZ?n%E}o((FpGGkAc1UFlq z#VRc}lBeyWEN9NZj6Q@e1AysQ`tG)_MEoq~)C$>{5$UBOY))yM&P!w5tcUh%MJAwG zq3F`l8@Rb}rqC%p(zSx-Se3&L%9s|wj1LlJP;0zK3ET?KmnuMLP6s@-x>VTbz7&Gy z-||d#S7%#bx8aK}d9jH!1jm>$eqYgF8tLD$s@o5;eK&NahwX#IEOBM=6?fWFS=;6# z9=*vlhCbQMwD)S5EIEdm8(wYojoCPV4kvw-ewowEvG)6=4>VHFEF~*qYl~y1ya_-* zcavI@o%ne|PGa`5h6rp#Z(EYeStuw0l(6)c9?`r#FH(=<1kzT=ARZDi&(z2`aToG| z8oPTwZ(ii8t~`4O>&m5FY;xSOZ9v<+ky^*k?UL|sTp{@kw0|)eLs(X0tnE2kSZ~*$ zBU$|h(m4}f-{U*_v9X6>K#A7fMqWZnaeoi@T3;5JQ+UOb#F}RFqo`zJaMt~(OM*g_ zAQ2n?S7zP8Dka$lgWnD(+Hkc~yoUqR@=4k?x-!(wv-(P8FQJTvv)RFh(=)QQUaezk znKfqs?@I{hxl*2M)mTG&?a)HhnUa9>ocr*CykLUl@?O@6Sop|g8%iPiW>m=ZrSQ1w zY)qN5Ve*Wk^;(yUSgp~9(mDY-ZS@fxEr<8@)(agIfqpp?he6(=&4Ip!CAPu{T_`yb zwU9&URHC9@nch20$0}2licMgbx5eWn&;sZc6%XSurUjc4oG#W3qtO1Tl$FO2-&1@* zyAt2xOihCB>t+Ew!yGvQZgnm0hEufvu)G*Z^1I+KPo;gJ{8xjFnWpQ1<>e6s{y8=s zwej>pDvIfYi-l9e^z8%h4PIxJY+;`59*Q2d3~^Fz*$pR@Lv=5i&uyT_3$>Hjow~y( zj1x)%S=U)EzHG}&^$7`$3F9eQvW+96DcrYaD8Ht7t9`T)uj1KeHwp?jxsRS<8S9H?UmW}c06_>&0fr!12*8hwP*%v83%`>PAmy=t~h11ZF zpo$sv2ts;t_}25M9@GQ)FD(@~iGf!US=TtEyyjn*8-qoK%N4)rcQ_bFe=h9%054#C z3!m`|Y(e)H9Zi>w*Y}|;CK~MGX4i@wtKSHI~n(BiW)JNE0HO~DPQ1cSyik} za8cOPa1)$Mn|Y-jsoo> z(IIelS%SLzYkK8uMztK2tms$EZ5y2jQ^;qaXYmGHzwtzkERUjW?s^*KVbiSkoop4_ zn%q!BCpAQVU~;gK`(BbpM}1}G`JUU6!5)0cnJ zUm0+cfZjSVxjkbO%QE%Srt94<%4_)@sNW$&NI(|55ah9U(URKVkI^Hv@wd*z4BV}N}I4?oH>TJSyo|R4#YBE{m;~YUqD5*6lh_6e$`MwUNGwB z>UrnGvn^UoFUv3q60hB@XqQ93Y-eRF*gPO_5 z;ETpzXRELOx2kK}9^EE&Gp)!8{)aO2>jTc?@nGJEEWbZ_Dw8zjMoi8R4Gn>`ph)r_ zPard&q4{-?I%e1()?QW(f zD_weI)1}~_T4A~ji4$e@EAHRG6L@}n%jRmh{Jo49qo3>MrT-)w0t8Y^QK4Oc7|U1z z#|fECkp(8&2`yBsf2CB@xQl7@i{0e^-nrE@4}zO#C5c^3h*P*z#2hIs&^JUJ%q?vM z-Lh=<^CPZ$#gwDXcrVs=FDibHT(txje@j6Po7U^Rf0io8$2ZA@F^}4V2J&9+s>5s~ z@H_XS>W)zk# zbA;pp?4N=!?vzvaG^F3g1(ss+qtk$VRJ8b$oQ1OU7#RBNu`b9)eylOJZ1Sv-xVw*T zQI#py*>uENA*8d_#032f#OJoArI%A%R2SWh-|y6IKVhArdHeIUsaz*qCZklsr9~~A zsoukg=2^GCO0&p|cXC*36)I|&Sp$;*Pvb-N{i~wAxQ+xn0f8D!ceUb1Ni{1PF5Y@S z##WVkx0Zi)p`q_G4K4%{ggF8|h#V>O7YNquRDSEme6r393dO4R2w&)CDGN?&`7ehv zV&}DL^Wx`oD;w=L0W@ik%NoeAobEvfa=u&#*?DM7)?1=?uc3NQ0+)H?R>P^|fw6wK z;dwZjhk`BOTu#!SS%BZ(`EzPpr(f5Adg^GKL4)rEFG;k)C~8T{G0iRG)akJx1PyLGMvS@-lg zI3^jaB$s_%A1bQyC0PiQ@KfTqr9fW~S>N@o183zsbQQnvDO8A9WwC0+AHzv}zS5M= zStlgO-*^cBR-Q}v-mE+45mIw!l6yb19GDFo#L_+^W{)i2PvjDr`a^Y^kfWAvT@yTT z9zT#e7LYP@JIEa5hG_YZ!)cjOoR3Z`$oe5kNkICKmE~19i?H$mZw?EeNH=b;L8=@Z%Vj#YrFh>UOf!snR1?UO)wDP{`;SWjdwA0 z4T#UX1+c<1kKQl=#BjeZ@ovnd3t7owXDO%#MfiwxEq?h zHJzTfek^5Qt@)npsxRA^!{GfcUQyeYaXjZuWB^F0Em4Jzjlqg?8;)IqL5wYDr--JI%z{a;5Yj>eA>_VQum1N5jWn4DV8= zXyv(57|y#-^VVYz^X5_FkE(urc0iegDtoyCwaY7f?dR=>LWADf+_70z*B$srmZI`E z5hdl5z|zO=VhPOD1W-6Dnvz36W_(E6>LCA?>x)A`z-`?ELQLedn0m9-&3!}B6y6&( z3d7||LXjh%Y`Zfb;9>KA#E91WY>Yyk)FC&H`#Le_q`o_`bF2FmRM>9?J2M?Tz!;@9 zkgW3{lK|*P(DC6FR*@;P=Ta9WhUwOM5C@}*!@L>5(y^3!tu2t>rOye}>hs;T$SB&V zrGo@^uIbuT3o}6J)jG*#_q%rUd_{MVHSL$T&wGORF@k-wE>BWQ%yy~`Ah9!crczLO z(C^p7mMuf`(%Bte-=jiu+30c)qt(*5nVC=Z!Nz@^aqx!a}I5=!uoJ<_A8luEcICXV&z2{Z! zzKx@}uV+poGnBzq4AqfNKjTKw`KT?==s$p7JagpvHV!(YWmzE&S{^hBEgb-g^0@AH zJ&4bs zKefV+ITpZ0b=cpLpq$R3ESoXC%R6M;ejrYhvY|pgvf~4lO4pOAb@2P$!$ccf8Uiv1Y(O9RG`XDu@Wit>@-wO1EjKVy8W3__mm$igvQn`6< z>ZaJLUQY|ZQ$&m-Et*a@*gz-$EvN4%ZUoM>jX>appW-y9|s#G}`HChm~_o`AGFUv7O5Fi0zdxV9c%4(2UCtOT}jV{^-x?q%oy~l`*^ve5|!{ubj_54Njk)4MPz(7_ep5sJzp+ao$MyOoB zGAAtC{wZxZr#yRTgWbhsWvDodLs^1c3zhZCE{0^IEOwt$We{26l6>O}&Ap&{%R5Yh zWlmqHHnYiS;GbPrwJ$&e{kGUYG=>cHDA`qNZ%VqOy0GW)+$*4aGzJ*B?S9#`AC4?P zI2A`uXhV@zday>~nHTBxZk}bX&&x>WJA5QqBwS@2=RiL8=X(>2%kEtaR0>{sR(KtiKSQAc}1Avny#eMj@pn#!9cQI=R=B|9{yvkQNcL!N#$dvG`NX(+K^kxRv`_~}>F!Str*VFl_Gul?J?1pF4|=-? zdj)r8+xr>LU$dWde#~(Y*V94FMw0U%yEhOKecPaq(rsoxbVZC3pLthWU(WU*o{0Xg zwEFe!-K^nTvzdfG*tm_)!*opC{ z%;SxuO7~!}X$y-DJz_Y|n=<^S29`#HcP=i8kzNzK<2tnItA6KQ%iOiGOkM9J1^Hw6 zU00!ZA-;F0VcF;FZ`ofFh@Pf7*H=*IkC(+}nad!WKf1@%Nj4 zpJ!9LPQ_nfi9A%dxgiY)o|d~nYoaxeibTmd@N0}Yu)yC@8n#q&i5J$uyXL(E9VLYD zb5ue+{Wjhks2%3@tnq1oUAIvC!YgcS?4T-1uIr8X@Z3E{mC1cnD%sM*f+Q zEE2{ltOj5-L(YGbF6hjO@tN%f86@QcpVkkhTb8nshs~j4nwGjTz}_!iqq$Ny zcte_JYNZ(fwB)zFSzAoNmXopd0rxiLqaUT?Q#8tM8;pb;d<*yUPks5hn z+Cxi4S9@cl zsf)yhHEng3z0Rz6M04T52iGA9<1g>`j@yvhJX(3GN~bGi!lL`}fy$9>n1ens;JaZS zDRQr~5elDY1p`h=mp30O!88S_m3wezS^KVSPRx8kQG`e`rV?Tj3vEFnS-Q(y4rgq| ztUW|xkQK%d1(hc3u9$j5`w=Loxx&_psY{8~AVF59lJG`ua(U_&6UmD`eNngZ zXF&`wG+v!^=Nl(>+WGtNwRW={Bf0PJN%^Ah8Id7n0#e?`V8H;RU8|$20+7j>Blk9_{5n6wU)CLE? zZBX_D)DYtFhoin{wp`!?6RZxYfcHdOS8{D&RZ$qlj%40MC`fhMNPJb)_^PdN-2iEl&icZyYYV949MY5B^vy(8tl?rCQ z&ETo)e2?$1Xd?8Llqad-b zvNp_JBd?|6%VDr$&8#SyC4uKQBDuC3ok`Jjywyf4{@t?-XG2(>p5-_p5%Ges zMEAG%GN%qb{Rv{bX7sq`Z|X4yhier1l=ZH1yNlO<_1K)+x*XS^aJLx_v^tO}T=9?C z6V&Q?a{u<*3b?R;7$@(y6XYe69DmT#41Nsp4<=sc%%40X8&hpO!c1bVXxbLU!ou>M zL+9tQ7AE+fdPf&SjqR0okT>)_4E2;1zvw0Qv-9ZPy$~UTj|h@1pdgIimA*%2tQ>1C z5|FsesJG0FL3>buqNK%lH>;|r&W`1-iFH5Y0a_ocZP8XaYm<2(rfy(${C@g?W9+Su z5-Y9KRQK|;UmR7-FHFX)cPF<|0YxQEY<$MiB}SJxwZ~Yo6vEW{RPhD>^O;S_asi*ru*auP73@k=PvBiQ+G1^Km+2bK^Y%ef8>Ebs3;Hqh_dPY zhiRz6JW7Gx-a?`fsAh8hb(_ck`Vka~(tTdC#0id60F+u~jHI z!?;BcxNC0RI1!#=%WT(nw>9Jqi<%WiE?Q+WI(glsW%F#RudUHQo$}!2vuK>O;V|#ZKhVp$}E6vQ5e+mMud^B6f$WEnC zFoYU?AMf+Q$F~b-p}zXcTnE=1m>23*awUe9-Kd)54e^3jGB=sv4P-_`H9T-iOz71- zTkGBw!g=Df{UOExa^JroR*$q|^>TXDJ&vLJbvZ#oO&!J?^#WX62NpQPCmw#X(M;31 z$XC2?Y`YAf-k*EC>29R0%u21xP*+dhPKq(eujlq3Q0~qbkHL=>4W^nta^j4zN}?Cm ztRXY+=s3|kzZ4jeb)n7)a`kAEwEV-BQJ;7djq|q6*v3W!2n6~ji9g(uwO;!Tr$N{w^HiTa()~HLlxkC# z8Ia;`N63g>D=g%L>j8=2!*T?6&Q18peZ`iMakh}SmKXEix`%>XpcvJM#Aa1}e3dH6 zsA#C_Gg0Q&05gqolMF-akVOIFzrkWN{wsVg=hL;`^H1|5UfFj+3rga9L5(r%$m+@z z_p=g=rnaQ{= zKOMOtgdHH}33o#li1q~tZ}%pK56+m-NW;^G=n(YP>CPfX%VZo+87md5v$an#zPT2U zARmw`5_#Wf;{LRzr`D=mu302h6y@(xY2h0lb5Ols(K5jmocG;$YBe0tD>D+D*W54Y zR$-~~p-Na!0IdamQ&e89FUaxdE0vKo53Qr6kpIz+&7ngy(c_rtZ%i@j-975Q?75BH zoJ4fw9#mv)nV3($tq(|6*xSiZWbKqCl4G5fN`~mIfvxE68?S{#61}&3!&YQvW!)F| zo~ErUkA=@Q4EU}etjAgOq*y^Eof8?9QQu~9yuD4^GHE4wv?Ur&KHDBd)6ePMo|m4s z?_B%_BckV2B0&tq1#0zSG6_TQ!Dm!elf>whFVH^+*<8d^WLM!{VtRinowTo%zg^;` z2?EPo{SuU%+{n4sbGNg4qI|7WSQ#hAnUVn*iFLn}v z;0}c`{cZD7yeNafZWsB)dC=dO3?r zB34N?B+m2KYyGZx2hJZtTZ^-~NIPa3rK(wbITP@#E4BUK@~lIW=q0vlZs?ob9>sZlD7&y29Tohy!p-2*W2hvO zUgJOj**`MhX1P+_&4^G9+IwC+0%OWN5)|j=PKw-UE%iE=^!0wwaX(M+hJ`J`6Sq>SJaif7Gd5Nsd5lsW7f(PxhCZKWn7}Tf%51TO+W}mLww2d&63(e> zXz#A)X=gOEm!Y7e?<0>aO0gd`s5k$#MJ=jj`%JL($YuG(kA~C%4$;=8zcP{y`<|5@ z-Vbr^zT3TPF){zS@=I|?5}?&p?RLX4mk|nWKIX^CKy82IOh2G~H<5u-DeWWDZ0#8w zwaQvZZFpv_OlI0eL8VT*a7*%CoJ9lGKI(rU$h=D!ZiSMLg>Jh!f76$Z)(-2?KA#jB z$aISs)84ZzaXvogv%4H<0~Wd$hEIYZmWjCc-KKlT0p-cCpeuPZkf_5vly4GmiH`H14|7%E5#EWU5@6uBMzd~<_S`yncgAO`1z!b&EVN9YWK)Azo)sCNCTD6Un)nCSWP zZ8Q8QDfs5O!7pU@CGpb>4=u5-Uc7{Xl~Vlv7eCLmADryaA4ma|^4QA^)ZYx2)bwm8 zGLusQC?9B047z*ODd?sw(RQMlWDfvncji7ypIenvECQgOt>*>}*TdP_*=ih*Cc8nR zJ|=##(M42^m24F($?i|XBMCS59`}DvP9s}i`znN>C!@L8`)yROuItcJwBOF3C3#E0 zbBJ$ID@*<5!tkG+6`SLX0Lq+rV-&7nlW)0~orcd}Pt=eaU}QP(C>1aW()# z5Z@c;9KWu^APDSes`YFMAn~^FX<9J;7Gn$#Y-hamIRpsxSv7-eRys{z4hwK#uP_9; zX#gxUsj<`*LcGFz9LAVcj(W{-55fXm^@o%(n#C z_O0J+n5Q89<^tXQuGmV%)ZmU+uzhaSM(9^~b>F&6$Z4$WLf9 zbxOgJDLjhfWG}nmrrpo|;E>(VbpeDb_*ne1{3X*sLS)N0;=vqoe?wTX_VO zFc8nbeonv8glj$ep)uWSsLHCy#H7CZc3td(_Po9Mq5foCxcaWY^q$jiZSIk?$MMdI*Dy{D3HXl-pn0Q|)}pqX;%D7~&ao_y_9;VG%(UHQi5t z*+N{s&s1wAaXAd9j{lJHTxg$mFB@4rK3ZhC&U2K}&5 z8MIe*ucW0#EE$%(lu{;xRv6UkTh^oScHLw0l9(qdukyRH-2!U05%(3l7nSFfOOHA^ zRPB3F8*0n2V^(kbroU}ZB^5ep8$KedKtq#M-pUo3lN00?)4b1yAEJcbpb`6-yH?J2 zXQjk2?K%i9>*T{u=_%S7&7D*}K*?!}KGc1S_D=VG83EwtE~MYZA-=s^jaq+dVo5P3_jCZ;rdR({=Jxd{N_Bq2Kt|JqeDtlSpH)82AAJ+R90a{E$#;h=I zCbeA-*!#b+&m0o0L1i5_In!*a8)U z{Bu^iKoji@!0sfhSh^fW-UwR%$+fV%j4-yh7KXC{JtmlzJGh!SBNy4Gt214dwfs}Vg+(o$>o+8xUlt! zc&&y_WXMc0LYK!zjNm+AAMc|#b&Ca-RcZiz9`PABmA}=|epb?e{ko^|!p5q^T|E-k zO)A*7U9+B2Ni%G3NM4mmg|w-)#zihs{=D+oWO+pQc-zu`KxSN zJ)98>Y>O)c`wez5)WM5r({ECI(n5CX5$4^oG>!M zL@~W?6Jln@e%Co-J>;sxmJ>W`u5PB~Qdaw9FRA`Ge*UyF<@dO#w-;Le71I^-amfY% z%_DlcWLJsv>+(0v-*Yz_>dNx3zL=yeEuOr}jt-I(fuQ+kH=tQw_O-%NZXrkZF}|ms zRa-si^DAUGa~1;TjAnw z&z#VnVu(eeBDi+gC?g?&q1ZWxe6&{A7ny2RQo@hY@mE1ieHL zFCRFybQJBpw2FN9igoRNLk`Kw#PMuHL9;QdE+>Nr$m{(uQJC^<(*!7o1Zq+ig{E2O zgHv4FZPoEn_Ku)L>9+EgzYYa^Ei!6(HERRt_DV+iS09e2dkq@KhKfnB;*7H_&6`uA$*fs zKXGH1c_VJxDE4O4>$?+i@$R*)n(O`~(c zT&ip1YEVUKE}_J}jN#nRlc5=2Rz&o)RkqPFW-J-{aE81XBFV_GC`BfY-+ z@RqMjg$EN{WqDbM3BKbWYmC>LPlkN*#wTDN8#_L{NDe+Q3FASBHbdO z5~I5m1(i~f?(S|Fj1Un?L2|&bK%~1zNq2X5!+=p^`|bVtK7Rk+f8F;v_qonF*Y$cm zuh}y5n~;tm+K|>!_5u&awP%FcXS2S)qa&bujwXwbe~RFTMDkQtu|-BaI|h3)VCieH zSLN0PRP!J%_Pf`Y{N^_j-+ZWPrnfdkad0(40vZy@Ep}eS3pjpsc-4H?W`L5B_>g!y zxtW47#L5;6;w1u$XA^6Po7kbag;|Um1ZV;@odyLt6RnGwUs3Qi|6VDbmT+z~wVYKW z=w|I4yL*riTk|$<6qL$&U8!B!^#!<`maDn0q|p*N$*ovhd7xoHa}q~Q z{!Nn^V^A4G@wN*_(x?e(dL=*3h!|d|@I z_Yk!FQi3QN!>8B?%mLa{t#?3+&ART$H2yC{NRG*wshl6gYsjM_A|2xOb@lw9!|`-3 zLyjD(`=c=Dwa!?aZ<$`>ECF;a_qQ_uKnxX(3SsN(Eb6S0ElR<3Rf!6V z_?&Rit!-!5o6D%786L}cMpbgsOQ+AIXY~XjYCtxrNsL)o!ylBHzoYhqT!gZ1B z;xc1zJFVx4^a>_R{#-1a5f(JtzFhjciokY_b53?nFI5_c2xx3?P-_Ot^l)kUw{>rv z>V0x)oib_jd(RW2j)5>Op9C zUs*V8Ju2CzFW@VMl70fovJm<7^Ys#j z1`{g&X5mOJ*>VP%F#)cVp8YQ(`~_X6+&agr$)lofa(#HNpaVM2Vd-G2AC3b&U)vu} z{+c+T`A;DakJYy%|FE~H@FweodLJ17ou{Ze)v1W5868AJj`bOWk)?if)1EMSi|L-q zLtanD#|PX0&4`%;MPoLCjaL!nyiB3hwoJW~7gWda+J{d5;U)Woue5(U9$)sLCe@Vh zRGzdl+}_@bHF&(2;6u6$X%fvMbEe(WuJ+6O1RO_PVK;Mo5({2qF^*ntK3fV!!a@!B zKAVl+K}*OWj!R}4A3h0rc~-m9+i#vO4i0~9f=QjzGBd5zJdac8UELPkvaO^AWzQq5 z$^q)~>ow7!j`&6Gx})RqlcgJl62q${iIPF%+Dv%J_eG`3dRgvt|t^jDLLw99wEXOsSo%jC?%$ez|%lp2g z**>tPR2A%4c5}rLcCxpcY$D~$R#?pfiL-^CnQH>&+K*xK`^Hf3dA8ltT zFeFr2K&^DS99JQsn{NSCwj1{}Ie7kP@A@D6^Rfpn>HW zIaS!?f-Ae#GWDxPM(R7MzdNqxHtb@A1LE$nGJZ2jbAQ-Mm>B;1l%8p(>sFaHm?uOi z-9Fn)hAF4qT-AxluSv59iKdgbq1(J~_kO3d?~CSbD#GA`Y4XSWQ#}dy{~Pkxtle{8 zZYH`w@yG*m!ll6tRV_K%ZobdSWJYG>PTJ&F9K-kKW44|GY>QT6Xs_|cj;6U9*R4?; z$(~H~2fbP+XA0obdXYNd8JnVQ$s|{5VLlITOIxc)YZBsqJfweI^ZU@X#&zLJ0t}W* zs8L+B4f@fX(o0*~O624As(YV9#l?FWZl;cVofY1 zpF^RVz+WnB{#C^c>D+U|!5-K!ao-Q~>Pu*Ss3^-pX}Qu$wSBsctwq7#dqyqe(NCs( zd&TDHiV5@*ROsZ7UvM1TD7Aov_Yd9xy=tXfk_mZvTy-hB!2)UgY3fSA#eG87Du|-7 zpr8*LF0tU>etjJmJV*4=N1%&s(CcW{SOFbv${GNjio)h&krtBN{dAaK>uC&&Jk;+< z?qdGb*-?SgdQEbrRD68as9c|vDbo89-~VR;ylFRj{m@>Czc7}7P!q-UNsu)rxrdHo zv>1??8Ol>YCLBn@?iwit-~PX?g;1_#2G{*U=xRS(y&Ya%2wOBW6)Iz=O(cFAMh8Ym zYP*@o%>-PM6A0|4`t+lpuViYI8A@M6RQq1m8bJs5ZC-lY}bcEBCry9=;|&g~RRT(jLZWZp)95KdYSARe`*^K1kgwdiUMff!F!N zm)mFT7a`!%mvQ{`h_5-;5C(dxqrUt6Of#>M-_qp$Kl|@IqU!_!8WW+UC3gYzQfYOY zSBh|1*P)-;j|(-iO2MYS162C?vZw8&K44LQ( z*llZCiv=++_vi+rht{irR5nw}ZIe7_YWESM^xZG;k}gbGYoV+o|2smuLZJS$|7FNx zL6UyF=-Q<`HbYzR>Bo`)cOS5Dq6lkpCh~ph^r>X$PUgb(_SOL_ZOt6E7xK#diz3v57*KM z>3*LK!SiM$IGp_rz2hogepO@gku`q^yww&sF@a zY7*TC9LG+6sx!4<5Or>2bo^;g^q}0gec2HN)M83G@NV(EH1{;=^oe47fHTHFJ2XAZ z$DU29Oos_b4D&-JJ+ka2_)=B0yhH_pr8CiO>a-M!;~Th?z0(#E&iwDrn!X;IDc1=XA)5N^FClyF73j@Buj<}Bi%_4twN5G59UKC#}R zX|A-aVVlz8Px~X$l|=z^b-7ZI1kH!+9N5pJmdk@PD;bXQuMuR9StD$Q@~EY*^OpL> zhYw?4L9kx!$eU&U4`MVJSjIGrP{$8j>qR#Dz~V0_!=l_Z`aiB<*OM! zn$5;VBrK`XeJ*>w+v>?xZz~=NDJue>Iv^)Ww_Sg5Nw!PmOdJ@dK(^>gWJQSXnbrw@ zX=uK4oL=XSg@@=n0}5%rb5x4|uMRQD40ikSu4p3>B3C9Z^^TvL_n;!1@82CeGp=>_ z=eC+Ko~5fn-?o|3fZ~p1S&3Zte)%@uVqZ^F0JVvlAfY4$5Z}H@y96{U@lH z^1=L{3<=yX>X8Y|PNvXcd0qS`Xdrh8CHtV8+w5h2O5?_;anE;Gx}+P8Lb8J` z2ffofit$yck(dYDH2ZRB(Hh{gHyUiS`iqPEE^2aJzq@WMtwX0iT<7K2LKiT&2C*#FcWBqYBL@+tGa}t(3jKMQ4>9pXgPj{fxBEmK6tChQ5k`} zFfp{J##6_nPnN0OUZV{+{$Y(%fhy>H&JNf^V-9uVll-A`7Nm<<}{X5W0G z8>JCV0-^uq3|MV5WFp|Ctwh!Si1`mfVzwgJ^32iIfy;D8CNt*4es+!Vs8#6XLp}rY zTGK|d!|sd21-R_>_Rq0F>)z>E8qkM0Q)zG?; zNyztW{Y#)={D+Y$58qL~^8ufBd2^ZyjWo@X``0*?W$!glhj;YxuJB&*qVu6({9RhS z&^uZ7v!C(sv{Qb?+9O0J*8MK^mG<)<*vwmGiPdl2#XS$%&9deP>%-Y=j;; zA9)n54gVyPuzOz#QUt;c@AR|Hf`U%wFKTMYlT2|)2alakzk{X}DqF+;ZGl}>58=~k zXLCiA#Qwx|=CC1CCW0&C7}J(T75M~z*fT;Q%I7?EIIEW3g6oHPO!0;IqA#k*YV|~7 z?dJf!7vk1p<8X9x{SZ@8^rE;N!Zz+qef+lwl$b}!rrvqrnKFRS`^!JeiVfNN+8Q1- zs;nsKOl_wBUbDX4s>0HBain&EB&4V*@oCu+AW!_0vdw>totB+lAimhFABe(9+TspZ z6!?*RquFtE&a9Y<`0S4nGl&CfOcetlY5&v({kz!!wS>@rZDONvWN5ldEqHBWje6ogO?gi#+`uXW`O ziF+&^US(UUc+?pa+cg%~Gb0~8M$_^3z#)rS6q{X%CmxrgQp+#adVc^tFrIge>+JgCF`>K?ZVHd9%s;}_BKXHuYptRs6X^< zd*pasA-YV__I8%S?<#HKqS@V0&c9uY$=1P`?`f~RYkv?qxGqbDvF|eQv+h5k;QN;ib~&?4OM{yt>mem zb;;i^S!^L}6Jq(c6aic3xq3;j>(|`7#malh$=P}_?K;Bt*hPc2Ut!>lUT@LHSu45N ze>H}!1NCCVz?jwxrVu~QW&dW5&l14;r;7gntV=aJH9$v0I~j*{F5-Z`t)0W0uloOe z2bF(F11I%`GfVzF!8DeEbgTXRaV*pOl~wn29OkjH=gSlKSs0k>!}Q!{*Ge4qEk zLjmK<`7gKyl<3cA+FQcfchUUu9X-BYv$%fgE~*R7jE{<1P%} zW(KDxlU%=)%JuKq!9#Drp@BAg+m$D-QJmfKRPxe=ClKtcu`HWotTZ3Y2aU8<1`A&m9_PK!}kh)5`vFi zYZI13r7?86JiZUIE#nFAtE7U{wo;w`P&RIDgs18ol3m}~KOs@{5Cob?Qlcx!uFb=G z5uWGI8-cHQBh{Zx(|_1S=eKjo*N!oM>-jGYoHj!UMPE?I&!+a(raDCD)9N?ZUU#J4 zuM$+iYZZI2w>L@&XQ|ll9psv7+DTj4TAIPT_UP>Dq6a?D%z8q!OD$5duJW~9Glu#T z(l_zp^0rs?4@207$pc~CDp{q_bvo0Yl)|+<|Cfsr4u7HRWtbSXN;WVaq=f&a41qFV zQXkEE%2L%rmq zrKNyL@gbvc1<;PhrYpFE^0;nl@~Qm_X#i`rx({tjx?-1AL+W%A`BY-zuPeWtTS*-! zwFY(PPF#cAycFeOc|2Cu4LW?7l}&-=D>rbGLr0^wx9w2J?cm4?Nar^ZSp0V~>@yqK zwNrZF&4o_VxsuNgj4WK?d=5Ou-O#DSg9|=uoaBYMAL~+mKN{swog;co+QT*uY_S!T z0sA4M(81@zR|}T0@UG!s2JY;2C2mC#IFsm@K3|<)b3xGr-rF-z9V0tuo=fUl8Df|- zkrhbi&iDSyO2H1I55lNN-SIqJ3tFPwBrsB?8k^vb;E@q=fOXQDXffG8eY$wCTupe> z2;<#av7u_t4TIMALeSlBRIUht^hsH`Ky^c5dg=&$wdP~G{hM{>v3!IUC99pc%x|rj zA$y8oB2D|veCH#(;5S%w*r%=xOV2MiqBa8>(l7(Yw3uVQ{<>FVYgluU7j$|g5d1@M^xablIsQMaiTtsvj` z_R@W9UnHMUJP>|!E@UM{$mM-9G6*>`fyc~(+&}GS*V4XgZgCKrBzV{lg2gdQ-4DL5 zq}g7uZ(5>?(U?d=_#5#1ANs4}df9H*_i?5du2pQ7N3V6Jw@7yKz^GNJo5_`<&lbQImX_`o%TNC6!uZK^WzD}=qi%#z~izibJlSg;&|??1_g@BejCt)4uh z#0$ShxwtRg3v^9J0+nqY+bVl+cM^hwl9WOU$Kf4n9*jGTG5l_$bFs~ zO|0JcyQ!`e2e<=|%lLE!wk{8!)#?4Y_}5!4*8l8Yz@iuMLVy3K#rao{CpCeMB}iL~ zmxtXS5KUwAh?vQ1#@05Bc6FZc9y%v!;76yGAjLrVTRu#w6X5xA*Te1=XAfd2;E#-N ze4ig2#8lX!ew@6VlO$rkd@~$55WbNvGHu~-D(fe?TxulJ8!N0dWiJA4;oHK{R+N3- z_e~ECc^H%czgJE4k3=s>nceXti5=3Am8g|&{|A#(1*_HyXGjHKw{jv2V_SZ*9nzM= zhJq0&gHW6OROl26?X}XH2s8ib$d#1zrRSsbY_5acGZRXGXX+`w@Px(3(J02KWmB>8YYg%!@WPFn4QwANLjk_|Nz+k&y36Uq(nAbYOYbJNr=9zuxj%WvZUbat*Za(7# zi^5|%p-*_Y_6@|V*uj+T>LfIt-Sahf-o~x zvc899$^V=IhgzSfX5{G^;D8>t=LQxWx)yEr=B^`~Y@W`JtrAIxAte1ofBR|o4eE?a zG-#5THRS~EtlNJjzBN`UP+^mPy9n!A(~6(>ck(o~U!xhy`ZKFO5O#Z<81(gXUIw+u z;Hf!v^ar(+A6$Y-e75Dsn(z8cI)}$7=aq+lDiOsAUS)Ju5m=is*pEqQhq`=xnUpc8 zd6?8VzvV$}=x}Q0BP@1OxoJK*p7qd`_L+=aW?}Ql^P#@tksmu(2^{x6@m3a$?>k)n zJ8Knd4UEP3MR_EE;>|6E2cep~jKV01LMA5hJ{u_E^NCI(Rm(~>yFNbE-8)oI#d=X6 z#fe}3tQ^*{oh+>xc>d=_ALy>rgRrzrZ*u6c*^Q%vQ;fJ##Y-}ynkAtUc%jW#R-+=F zuwtjBVIDJ`ryEwitlyYwF4hskq8XT0&x=P*KD5*sQ%+-H9FDV77bR+Fjk8DXw>)fE ztrqgGNbhdT-CR?!{H57tr&Or$S;frb>*Y|N3j6DwJl!OIbkEXnO03b2)Vo7xfNAJMB68o(p=(7HGNG`_=i}Azc2S(Y`B8XGHUe~2bF!eg_3l#2OR2DqcXtqaJcR7(H(#r4m}Pj(M8+NtZr>x?&KZFCjc5C;GkXC%p?0f#5n#$X~kZ3t^$-~v5K8Wca<~fo#dOXoss%~mL{fQIvz-=M50?$_3 zliPL1E??5o6$f-~0y(9|B>j&xs0j-Hy%@2&=gbhUmUP#@h6?3(W7F*11AZy`oQ@-w zDtYxml+B;S00ZlUuKf;jEpw%bKji*OlL?=$V}HTE+477R5jxc$^py9MpycHBT`X_D zXcPV+w>!rCHc4jNbwS-Fm*LC18glaNcTTqC5}SjI3z%#ktd>z=9Ve5N`?6C4|IBGe zh_)anp4(YE&`v8!b(RV~o8qH-HrHRtZWp>({E!IW4&%@C1aE_e8T{j$iDIj1Zu9xk zza~&Yxt!c8a{=MFpM-02Jv_ce>LhT)ZEQR>e~uaSP1s_Mt7&=Q#i3iu{$8#E!HAX* z8n+w0*8?_k30{WU_I$TdaHXL|sdPM7aO2&`NYX7;rG z0t6a>_{x1if1S2P#g7l1%3c%B@RpR;s3-Z~T8ua_ZQO`g{@e(!L_dyqS_Yoj`&*>< zzBSq5ioB54>=W;lcP*qY5f9+Y>e>eOekcu(w5bTmCStqqlQO+No!ZKea3OVQm5Z2xq?$;RV}KK1qT;sq-`6&$*ozs_xfXH@cP6n@*6`nM*NBn|J)0NZ%m) z7BZETYBXE3@jEsC;POT$ud|Sb$k)Otvypk0hwU=m3%^46rM&bi`y)3KXBJ3u%tf9# zTD~pj)(%{=eYVtKb}Qx7igSj+j#b&3DjLTa+g-?VSm&Iki?W}8w+LM-ZkgPzmfXMq z2Q4;uNTn4)^>%KuJqcuw37blte#Z;>gbe*`EGw#s@^+VUPd`5BjqS?-vt3BwUEo^h zueg!aDMb*8+@2%r)wyI|!@F)eRm?0e#xzV4c#+%{0_Vb@I@PqX>7e?#u( zn#{#-!mw9LsZdNYr>0(mK0VYe-kvyc{fFEpAOa*osl%CZR_W4Pa@YF;)-VI8e8ZIW zrZ>q60M#;>ouTH_^RchIHblsI8H!w1WKvxkwk~bIma!|K5T^zfhSL|W^L*x}qNid@ zBfebYag)JANfFzBO`MZ7&~1wv;@zvz^3&;54uk2rD3?4(9$ookCntK&tHIQjok~yNF(WOFwB&Y&UJEy2n(;7TRQ@9HTz_Icna=a` ztc854&mbpQB(z4!Mc&Qj{eW2Zex9iTsD(pN6mcD?+bkCwgH+{VqzI8?`KVsEO))e; zc$s|l2>16v4?VSAX&lE1Bc$_vJ!`{Tj2^ae-R^wf%Da4ObG@)F@+2OL?*kHas0(22f|JU8^dYo0TtS|q1rCghZ9)qmvLrXTmvW^Ml5 zcr$4D?)BgjdQ3!IjgO^%d4aKI$BLEhL7P=A(szYPGWx!hazKDb1Y3Q;GIS0gYg0(j z6b6&YUKU`fyq`44W0?o6PbVC!VPB{2mlslwu*l%U-QB;jNG#u#N_TiZ8 z=18V>{*?kHxh~;xbAUV};IiUWt3V-PDjCsTJ7F@A`KczKCCVF*GCZj6?xSUJ0#$lSexC6iD9GxQg?My|oI)!MGjYK5=N4$o4Ql0M!Jr#Wj?yO2!( z!xf%Qa%o#F2*0c7G42A){IgECP781jT7SDSY#P*r`XiQcPwSYD(iSH^Y%NpE%e-8F z^f%l@GMggfvB#?z+r3AwOZKAy4e8qvPi=DpH0YW-*^A_|ycUs$G6z9)a(8#L|UACE;=-Jf`F`75ELH48PkpZ>ObxpbzwniU6@ zzxKpCO0*7d3viXMf>`;d_C1@Etq4sqhM&Yz0&#&|phO6p^qja<9{SzhGv>1n5y~H9 z(C4OKEvM*39>oqk3-84WRDzBx;`om|VVIowE^?E#y92z-D*NUwK@+h(oAZ{mZ*6F1 z@eZ~|8qdXR%yP5<#07dh`4n8q+l^PQ&ZwpBIR#s`eBF{D$*g*c@`aH&riaY+kiUIUXj9zzxXMsh8dem>yFsj7CK;ysC zLmvY+g=sx|M3Nx0vGJ)&S`vCu9m?!-;%~NT1g$}v-9}4VuZ!jOx}lKlD+@yPXrK7x z#FBkOmf*8U@dPMbHl8`y%IeWfnWajtZT6&%=}4N~3UuPyz@t5)!o(6Pbeel4hvb$r zI@J7h&D3fTL=!hfc%>K=cbh}fL&-Y3)?x*tohQ81?@AC%_A^-f;XWqW<#G8X2y78} zD14LEqEh&6=3{llfx+kQ>PL;&y{-JP;6VSpAY6EDt_ake(r`pg(htw77_phXb3Hw9 zl@rtSfbPNdbLYE%CV05H4?N@$ve`0jP<4%oK17|bMQU=G=k!KGPDglOwP5l=PW2Rk zTpYr96ycF@^Xv5r4;eMV@C&m3``GVAwgmk(St!q%psb=Mh_Af=lRP-mV(ox5MyN!* zhc+h5m928infI$vh0UY77I}gX6&2^i#CYLkMZBwq^8SAFQqy&pwg}AWaxGjO&s~<2 z#m~WwF3isIXMDBv%-qY8rot2_gN})4V&|Z#2=`Y(2gmw8#2w<2BaAHpR2SNgAJ-YF zuUbz&L&JbQ^N^J^>=A2L+b=}K2**MpBE3@k|{hcQJbuLkDJTg)KMzV52 zHqEnP6JF-B)Z;fexteR6rNxZ&-})wZK39Kd_%H^aOW#=uYI|aDZxYJA2pD#~^C9da zp#lt49}H?9dHm(5Mb@h{czGmz;$G5aOUd1kE^RnK`!15w!Cak)n@m{2{>2St=Ictz zm6u8@=-Y6Mq9~89Nurn~-VZc3F(C zTjP*?RKruEm$S?9WGoVis$Df$--B72LF}B^C;8>*FDt5((@i+l{f8{3sRkrDhz4a) zVpr#`d2)YWWwFN#Mue+3?0DD>d?~|)Da#Bm{oGO{fq=x3gOT4B5d?M4r&~~kW zp&3EZdW)sc3(~I4m^rL(%MYyPwNyXz(`O zJabclfD`-bztqNRUFdCKGN|Omv8@KMJLfB~9G_+eizgOP5Nwl+Gvgg5`{loGsYagz zZ96#8eaxn%kvP6tF@ada8@rzZxUrPWG)cc>Gt}i;e2vpMTa~Kpbg>n8YGDz#go#t6 zWxKktp>Y3)!fB6v@feOw|6z57H0>&@q`S{dlgaWk(AV{z9K6>z z+n`yXyz#)Z*z=et^6LNHH2&2@Z$q=5PHjb5BZIwqORk|TPgSIoU$Sl_-A$|JWlsdn z_N`)$9l(`xk_aajdd*^kfp%ElAhFXXW!3t3OQjwbAL5)Llc>Hqi7F`#J2q$Ht|;_g zQnQ?#h(e!;4P*s*y=qYI0>Je*{XXrnH_=4T{>G_vk|ZYbr@AASCtP>7o1x2lDYBi@ z?9_e+V4_{IWgU)fYZQRlL`>Jn{|fy(UVISeOrbC$w~$MfkJF*CEm8X|Uo2&+xuSC)8Qy!H{^L)sWaYGz zI9v|tUwGkA+IlqNbtDqAX!PMAl9;dv) z84Za4_mXUTi60V)=_a3DTvV@~TPt!3yK`uy)Y7M735DKayRV`*LdjUMp7r+bwh0Ar z7&iRW{RmNG>66)X8eTsP8D1W3M5V@K#|IJR)Q=^A83njgm6YBs`P%MCi8a;8Si2*b zUsvn+h=)D)mDD{`iAsSK`|Yf!{->j=%?K+=m`Vh_^!Y%VO;wUv1(+pQrYBX5wtbhX;wQweHG{Yyq8}ka9oow}1 zyT$=8Z-w#!Xr2w7t!eW+KS08SvI@dHTxF|wjTbZ!rsM0EJ9k|D@W&Lt)1$oXmIfggO)l|j+>Fp_8{6*#hTTwwb#XwNEHI#&NdAscVVAUUiI#F3Y?Xb1X zKwmWxGi|`F`^O_{k8lh5oCVRais6dsl5YrP|Lqfg@Mo9Y2@c4W)Y5!cI_&e2G5IjW zTjA9l3|$a3y^@OBL|Ja6hw7q>OBX!8NS#d+Ds>?g6x`1GT*c%|2I}@OU#+*0_e{3_ zXzlH=eaBEBuhqk$VlrY?-(d`wd1)vX|t&=?p;dV{ z6?S0S&qn36;PD|;zv|z}ZPsc)(6V18+m54OFqAwagn7Pu^P;Vdb44xlNub{GQ(hOs zOzCo2>rc+Y;zW3@`Z11n4kCjs6n9lf;O2d#vT4!y}q^uhkw0!53X#Rsb=tab($RP4$9U*l4_9qru+%B3q$ z9I{Ndi)MGUn{}J&W9HO#=VsIcWUS{kG6r^AEW(WGG6v4R{!}&c{oU*_ag;2U5Wgua zB&03xfBpW~F5icy>7$pC7c0%wnzyix-4kyxwhmC;T31)Mxd?;b)?>4z1(H3J`ZhEb zsKJn)pjDSLQ}{-*SqMX69{(g|Q0lZAP9+v553+0yv1CQiFV$E$;Qrn^#W` zY{dzV55~0V8)XPpde1k;Hq_=xriU(oqD71*hhPPnlhEdii8=`j`1P<;E;PT-vc^9rfY8gZJ%z9cUX-P|lF z;UoGNRJavqARRpiKL=&u&q29U5my%0ojNOQln7mKR4s9fwqkR8-$^sBX7zh*Su*Zl zja177u~6pXZ`IU0nz$**?e}@-&>I|Vd*nAtu;g|j0#&myGZ-C7d!*L+@E+pUWCq`+ z#PfE2f(pK!@5s7qZGfRV)FdC~ffIZ0H&eXkm1A?+?M2lsFKeKs{yn%^2dS{eOySEU znp_edm<8sbfg{!5^MG+J=2<&s)x7v`E0&h3WxziZ+B-nyQ6>?>dE8K(!kPZr z;Lgh~;V3d652Zp(izjdhqXgaKA6At?|EM_6ynwtk3|eM*lJ4h&KK>PIl-v*DOXlHm zNgc`#;<+!?ajhkx6Pkayx6~XQcu>{MBn7iFy7fF_%S2U2^xL-GgKehQw(Yu}%#|;G zyO=$&6x#C7aX%o+alYG<05umE08jrfG;Jm<;b==sN{udF=Q=jd?7zGy2i6))1C|ZY z5`r77a#CLVYw;8;v5A5|9c&jnJrn*K>OK$FFx+!`lQc~O)Ki%XBVmoAvGQ=TQ^9K* zmUkC6?O(A3!B2HaXBCsKo8NRpI1ly&FG~XyljZd9&VdMX~vx~sp zt}Vx!oD=w?aI;m8u@p=TVcyxXcl%XOmY1TpEUxRMy;Lhfn4?Zz$~BvT-DFvBk43E| zBi*aELU{D0R|185s;1^=r1K-}?-VtfB(5bOCE;u`UGjq@p~4 zk+165mVoaC72d!>C`lNwj$_Y89+jzl+h212wd%yfVB@*<=<_T1v-60BvkKX@ZKWyM zgUXXRzgZz;Na=uvi|6_-X_eua6poK@$g8@fC{tX8e`&FOQZ?rL|4!%z)9QjFR`@$s?J9+*2515B>#|EM2uaCo@`1+t5k!~=< z7Hqz%xvBLZ7gnZU(IO$jG++V^h$cxDjtRg$7TyJl>u6cn|6&?B7$R1EGD#vzbGYqO z%8#*-96AXgWM7b6)q9>o66xckOBJqrB(Ox5b4piFW|s-;?xAL`HR!BAHEvv2Rmt#v zCZz^a*AdKm%TOtFTEF64zj?Rtz*0r37DdtVm3o}+p@fg9w2wz{RdMAtLxu+28@t^* z7Uz|cjvVmWjQSZbcS`5bzz^}C`Q*nmp5p)dC%MMIx@cPi`L|t1$^c0^&a1K$!;Pyo z=vh~jx8alOLCb1L=L9YllFcWvrPBA-@5OF59dh=b$NA7!@QN$#V+9U8nXuhG55*OS zlPMfXJp7C4oPU)b*9@E;YLPYw5l6~;3A<#(Ug~dAE#1)OG*dVS7f z=~D@7*p(Np0lU>@X3#SPnmxQTLH41T|6$QpI><%QRi!ogy9F2Q zP(ZOWVT*DIG{m2}WeK3`3QTZ4Jg)ADeL1)MoRUBLd%$z2t+V5SlFg|~@sQ1TYx*kb zZv)#33!20~n;3W2v*v0+=13%l48TESkM~k^WEN23#{5G&|3n_t#N^hm(32Cr!RU zYEBrva;vi){} z!1)#oxe1M?92G(YN{(-I4N*Q<6OQ~xD=AOZ0f{s7AMrXCV)EQBA_^mt_J*HnKu+3Xv0Nr@uo z|4D@u%F|WoOQ?w$@N)1sUYxZVWMZJq&SCiu4{Zc?OG0j?Bm#IAuP=P)cY@~^>6a#l z%&tZwv^F|1)4On--q}3S_Swc&GwynO3AwHF@vGjw;PsWXM4@CoBDBnW8WY4b+MR%k z`1`(cFPA`NVLFLKcZq*5c;$A20B!jREmT5e64$;vH^3iKB~}<7HtA@bUk0|*mkLQWtZ{L^TyH+F(i@L1>a(2&>{ndm4a&ao=ftAAxj^T= zBf^A^$VzE3ejF7mhBoJj^tmb@e?Qdk-{q8D9V-|paK14=%UlhzbU0}(Uhz}`L6Zb% z9HXt+m->b8x^&kz2F^NY4~LDXK6N1w_M#S~!bz{14#@s1ZKCRE5@~>PQj`O`DcOuN zk^uInCJTVHGJFpv(6i17;_}*a#_At)1p`f!6_k~ceufOcJb(chAdRP=(Qz-U)+(egD8Kt@fey zB{`l6v`-CF1xDv%N(fMImYq$j9Q+~^Mo-V?m3Z(o_a*$an6s`$XNMjTTMJ-kW9`1P3}i!Df~D5VSlA;Q>kqBY<{hd`{oK z&k&V%Z}c2JWS=+bS!~YVB^xctI80eMNO7$|JszTJH0;+{o=)$;`obs+3hY9@4SsAcN1G<2WsOqI1c>s} zd+sWMV-WN#%*^`s@0igx_q4r*DIt*=gXP7wOn?VzD5>(NRJsztvd5(daXi4VhAgU= znAWNYiM180Y~b*T?G}Qi`2u@Osd#o|z;dvE@ZhH*W0sP{6$cI+++P9K9QBxiNP#(Oib_6(2ct=_|tiqLU710=qr85&HG`Jags` zo)Im7du)N}D6OD!`qe;JURO&jSk{TkdDI(tAGjj1uA1Y1fSFzCO zd}*mO50Q1Dk@pE$pU(F~Xrw;WQ#0#q_#?4j*znb)ps=FI1b$R#DvhOZ?B~G>b)C728T4EZ=?27y0HZk$1+TsBZb>GwsY^Ki-IbRRbL5i&O} zjeoeE&T9P15|UAe3sKX6Og!W z$Q9=`(&Nff)Cv3YtH$;M!%)=QAxYwr z9pr~xfzM0;3E-XtKvw-;Uc#I{n;&2mHGuC4>RZ&v%GFg|1DK}Rz6_NNwqm}8bS6`J zC2_H2%A^xBNGlz?0QLEYygKKctfc$|$glNH@>Ht7HmWz%nG_KkZzb)R9E-!9eH`VS z$t##mm=yNXREpsEjhWxMME0~BT`vV?c0?W>afd|W{7!~cG>oF^C$#bfdc?OSvAE~+ zH;A|+*OQuD7v0+!C2>IG5w0_qso(-zleh*|gL}FYxIy_64z=ufxqSIbWrIMpS@Rqqi}VrZ=gstIUNMonFjGwJg=4Md0NE$ZCfV^_4+k;rf#_R8m`Q=&GhXVFI}5fw*RrGAe*0li3Z$S zEZf;EPlG&OQQA8q9YWd9k=KWDQbJl6^d(%a{>pb=_xgV{eP>Wp`S*7a1(l}DE{Jq- zMWrb%5JFK@bQMrhkrq(85JHDQNI*nX`qE1%qM%C&y+i0NK5JHC}v_MFn{Qfh~ ztNZHC+_`t|Ip6bXM+EQOTuz**u0Sw1kXtQXe;d=O^3PceGv^E47Z8o@Q4zWm&D6ZG zpc!m~(fslGE&W9je5p5>Hx~T3J@JBJ`a6Y@B=s`4mEYlDqM0tvbGmRO3LD37ufF#$ zWR}+}70L-6D>0HqjDr%_DLLE=#Lya@OUOw)geARGp z_|HHY%AY|Y0q3=>=F%migjt1+yZKvx0wheCVEX(D zyt5a`>d~#CO0tUZY)h-Kn*z%dA-td{EMi%7i2_Wh`ARA8jp-m2iFzrqT9cETO5fx8 z^n4j^T*3WgDEajWis_BsvSWZ0Pf)Zp;Z9BS1wumNg|Rp{FU4K{fD%S4q}O7@9ABlr z>VT<=b9T3_-c!@f$Jh@;L2AZV-x`Pq0=p9{WdW=5ouWlL$fW?d&E|lj<*8Dl=;9If ziYW_6$xqK=kM_+Qs}8~HyX%q->E#CFLMgij@1qdQZ=Y#75I8Ojwf7$iG(74FN{YCN zT^Umi2ww~@IH$q!)-|)1zzR?~PU)n8W02K~qYg&)DsU*wWZD976QmXVAo=6iGe-vp zE*1qxDnc=+o4O2LRNx9NM*BHC6g^AhV9inD3X=`?Bxh;r=%{LfMj3|gHoneq=D{9y zR&<0mPj9IV!7yj%GnsxA;lDGqI8F*ok3-^xOFbA%rLhWK*Sf}7p9MHRGmAf0h2=(7 z7lf_mdY}W8e4ZOjcD>(B{oUUi-Jr12AMEK*^MD}VyXPUk!zsqqwGE-`9g%_i<92Y; z_*s|$JIXGr2`9?I+|X51t31ZCia@Nqgu9}|o@MGTMK2|l`?|dQ{ycX+`eYsnmU<1A z@06%$9(Ds~m4|vtijuRuYwAt~ppG)~91nni+Js#*$|Ee&nK?e8lxWJFhgqE%4Px05 zM>2w}mZvfT9e0=3S~MyUCo3~!DCRUH5Q8mmwqRMlnS5qrdctmora&%NfCh&uPBxBa zFS+ltR?=a`ZoKNZd7N+7w^S`yaOHP$6Q!G-!jY!keN`L=T=2n!CTHCoGX>T^l4<7{ z=3IuXA+E|9@9vsYC0|z~3ClXPe(={1E@)?(MqY|KQJIr^{OBl0Ss| zr1=&})MNq{O8VbE_H=i!@!fQAOXGdQS)}95pEp*l3LicC!&uee)4aTIx~4QJNCj<~ z5?TGTAM7FZt{hRf=G@iba+Qtm;atp5`+IGXvo=uRi0ITC<6o!GLIu^!LK_T?weIh& zKPQawv#T&>ya$2Se%{nDb>%mk^7<_%n#pH|0sX%PDWX z&AC%K#7Xz<7Pz+b3Y7Ra^U{5ual1w+UIF<@87!}U(-(ClC-+Xp)stjoF^`ycpNluz zO(&PULIR_iSjqHY|7_p=OkG;G&N&;-U>Z3d>k8nlwOSw@yw3kzUQQzoc~L}~Jqv`k zZNzN88_ zwfG`wpo7pPRONi&S5c99%Ebg@K==93!q%(BS$By7|33>LM_F9wIV78pe^$XRaAA1v zL>4UykO0Wb8f7?nPv5x3nZ4pC`seJ$v${(E=HbB}w3m)D>1GZABOES}ac&H0W!BL6 z)XkHw34`Cqaih0F9P84fG9aSRs>R<03j1ZxGT|1{g)+v0c^ql{Qx12v1kqUV;{682 z!>L?gZ?3^oBkQ#3IL6G&%b^0XI2%tn4`sa2P((FO=SyS)f{6_HY7CZn*MPUXO7QVv zNO@Oo%X`j+$eHLIWZqX#cNXeqQfOGBT+K|lrrdFUI-{<0uxre_i$ zR+2l+?&ZAfk&ah#dLCJB{NuN*#yxF!lG-aSFz=x$&m_Kfl&XA|%%PVl^A%?2uz%WN z8-qMGYCvmzCf|tjtaJZQ4wFaXtp0OcQF2^Xh1jQNqNvg^>dq-`)dte8s8SiNqJBOo za=7ZTxc&$?&$|-xuTLpPp5`aITxQ{G&mC4z~hf(ac1TeU^IzJ?4h= zUhH<3J)^PZoDNHHlT+^Pcnjhsz}UU)a%vFP2=;TQHp<)PKJSp0UwTV69vAz*YDfr0 zY-xxR$$)X#WTeLCh;XJ_p;OE9^l`26lB*ywP`D+BhmD+sEPzBtG0DlOZ8Fk`{-1(u zQDj;Y_OBYZUDv-CgTB`%9z!1{cWfQ+Z}eZEan_AhQjZqb8fRb{Cp@#OQ{Bcn9EW0M z`S2<51_oJHqTzYx=le*!)65iL;TluaG`c+kb%S_>>YpM;I`N=&V`W(BK$v>gX@3_h z!KMIed@A9;5JC+RKuFD1v$oK$-wVGK=+Xr|A|`f6cyJ`2{O;T+j1&BjvR@HL;1$!! zdbMJAoqbj=T9}L=r}W0j7`#D`z8RKWpCg<(5HC?E>=k{NaZN!oQV@`_y!qbjivVo# z=`BQbLRIneypAyF@ov?hV2 zjMtg|HJ@PSm>sw0Rw$nq;QEUl&W9{wv??*~TW6?2`&W*BCPQwc_A$)YnT{avg_5Db z;OMdbS6hU@z173XqL@f|Req8LT|(u(M#5Tc2t7>WZDgUSWO6n*yL5c**-~Xiky^HP z#$nOLuWMWYq0ZT}dJ#N}K0JS>*l;{C;kMsxaWQA!-s8{{*16reTofu;Gw}~l#5E_* zb#QChB-tmop)$tEN*Fij0F#;X9o|p-+*A{I=td9KJqmRQfo`Nn^^O~=gFxm@r&}-} z4|%HG@uciZy0Fj2-|J2_F&d&|S{BHsF+&t9=)5D2nx5kq`yw|3gc&Dbth6AHmip3> z`Ql%pM`$g-G$LyH%k!9c2(DTGlYsW#bNFUy*HTiOjfnQ+!zZS) z2)bXwYG1^0{v*SU-w1aO)*Os>1*0~qkp&@^mFd>wgxf~&D>w|689;BB)$yp|n7q$9 zoj?2U&G}28(={Ipa16-H_u)IdieAVD+345w!m^ zuBE{F=(9XtgE|e#bD1p^$i$_1*q!xPVS({Qb0_)A=cywOjR=A%wl z)SQOCT+mg)_Kgz9H91@4f@}9pazV>9E-YTta#;vTge2;i5ns+9O;^p3X zu*Xq^k5H=3mM2eJa12_liuGxZs&uo;bPIqY{Gs=(a9R6xl#2L~ zl>nTnz%Q$us&e^_9idEIDy_saNp>QqbL{eM;dRRoHDachvUGw(#D5&|JQ-i-( z+L&16hHHkAZ}d^)lAmBO4fs-Lju9TIhY}I(yrFxbF}unQuc7t73&j3KNy=@d8)_T9ChuX`ug(EQrRYTrwRY= zz>6-qy1%;~EM)2lLi?^3|FZakZtb*82KVBbn|SrEtlwYKzfT5WKQ;csL6%EJPfN{e z%f)7XadxX}AZ!`-`HZ7A9I1Wv*?h!68_K%Ty9_~Id4Qn$ZMEo%{Sp1ROKHHGrD)yM zFz{~w<;`JoGherC7NQIec+OnXv*cE_eirZbe8EOjTiyB*Q9@DROkFp@*p;h&%OEEx z#o0r;@+{Dvn^s-Y0%T z(>3IEKFp-%xt*+Z6Bn_iCZv{{n_nCj8ck&VG|d0D0t|bW(UGEq6&GO5T8b&iE|p_J z0Xb~=_bj_WuFheZaTn?=F09%TJA|#5<AZUWC7&pzT}>oQ%{Aa)=}SmCF7cL z6np!RzvU?>bRNv*YOwfb+FPq`c~-&IG-=CTbk=>3UySWu6PWS+%^}=08AFbP;hZqQRA1R7al{2El zS&*~_vrO>StkbPrT7FT@F-nPfd`K#wOwT8>G1O(v0mv#BAT9jhXa@`Hv~zW{NBpOy zqGBQuv^SI(&H{BU_6i-{UmHIVte@J7f^IKnehCLiYARbG?=&8~d31bB3*nxt>@=-- zcniEP=k1!UANZ8~t))ClnRRIg#WOhW6Pql3`mhAn68CfjD-M#l7KPe<5VLc_CB;wg z?b{rl>G(~$^-VO+5HQ5o{OHnY)s;p4p599ijp|~Vb$T9~4ySC= z$j!gHY>biNnDlNUg`U1x3!e2JyX-qcfHjeD(Ce5YSH(-Ku0mF-AK2~DTF001p&`Iq01#lC(4!E+N%~beGV*teslC+8~&-Rtvwrwo8i)A6=u;z@}ni0yW#0r zW)7z43dMd+k6mVl4J;bnJwXf8T*2p>wv~>}GJ}dUm2LRd(Dva+%?&9M z7Fahz*&uX;@uzBRol(S8nO0k*TUty@Mfs28Yd|6&MMwWi3#amq^?==v#tqHC^!TuRCo!RazxT^I19ujy}$AHxpBdLUE$LX!>@+|5H7@>HXAsl z?^R^|YW0=+QO>S8p$+8EoyAJ%*#&axyXl$YD(-;rcQ6a7YWTLS$3L8ISo`x?j*o8O z(8_na&mB%%P7%z1%)D=cq(d_4D?k5M2h3)$9wE5iDaC2d(t;ad>HyWBXaQHD;=j20 zi^Nv14;<(9)QQMO9Z&aq`hPZ8qE*WDDUX;nsf+K2{dj>b0#84%whV$#_cHoMiorJH z=S&Tn?&MF&Wt630Ny;#1X@vW=h))$p(n?}Wh$FIX7ba1~wmb-XOg>`GTZ7-sHEF&1 zOgzd8@Qz>yG#G6ix?Q<~e#(C#bR7mj>|8wawXgKGfvV~kd5B9euSjEbC31p}s3tjn2_Fka& zKLu^H;Of>>IvW<`a5Yr*U$YrmzLoZM&#KpcarYfOlkE%G{bD9bcMAhyEpN!8R?PTE zDqAx6H7gpp1mc&E zICp-;cqKlmE@&@T5-RblU;Qe$I5sb-%Qj3i7@vT6FUyAAk5@Ii+WQ zrIA${awmmLi<^GdMjmp3G5ouJ2KM_vzEp+bs=X2GI&%G)b)0v9q z)AORFf@g1&F{0S<4Pis%$}Pp~0`BBHLAQ$s-bcoTO%9?X3s|K`qBh{ADa>~$!Dyz% z9J#gr-CB_LA9n8i9SyL^DwoeuD>V7*r;~YQt=miigZEqq$j_&}^A{S&>eAh0ehKPv zHKd@b_n%SQnA=ELPY;PrfXbi|&M0oWXiIDNSfY`Pjp)z@*S(ef; z<%#+7wBY*y&~}Q%Xfy4raaM{#n}=K3rJWa*JD)%tIj6Vyu1`-y^Q>DCxhwhR@TBho z=UeNF58_T0pjVwq2+rVee`Eg6bAE@;CXVGUst>h=~H8i>j5HAiF;w9h(|iLQropT189%0RDOrxKT2mTGR1gJZROIy6!rEmNM9(viyDk7w zGVMAc-jDXS`NdSyL%E4nJ=`(<368dcciJLGO~nG5j)l4ZSTot*40O&uUf9#Vq#bH| zAEdu`B2pn+2yNTB;WCmq;c|69L=yuUsa~_!n(n8Mf}xY!dH7h>-jF>J4kuQNBWE+Y z2+s?Nx(H=WrFQyDA}4LE)65(8Vb&Jf95&hTee1RW!PvFUBk@nvo6enqx9QAkBjXNB z(G(~T#DtdkWKHj-fH~OlHEpzDgsiI7(Vr`f zR#?Cu-SHl(Um|7@j&Db?@Li6mU$b*bk1AR&CDfH>CYQ&1kvdF9NQvnNX(oX6 z4u{ST$(u0;ocUHNMvY#9BSMiJ!|!pF;io}$m9`jX7j2r*xaVq=otf^2Pg^-M9Xj$q z%CRW3;toxvc&7G3k=SEzqyvbyrM3SlVklq674R7oHpY1;FZaB4pbMpl;1$7;y&R4w zUtklpJ#B&$snspdUCxw=hj9*q8WXXQ3b8-$7iF7n+}59vQtWeXcB%j2LL57oUd;%v z34mS_$Bif$Z=F~0N^ew$q+3CAtcjJU^04xGW5~c$v9|`o!F}NdfL>GM^OA_0D>v{!CQ#M*09%I59ni@vcKkY>R3yY8qCA^ifN8N zu4-|RxjTEeNVyG{vlk_6vQp}FnG5}%s!YC;nwkSsJ?4$C<+5x#Ehyc7cl5F;zI5^J z>QCmX#Ajxu-Zp2EL#9U14gTwZHH#CUYZ3skmcN$b*AuN|g^47azDhhQ@Hpz|zkS3H z+mH6-EDtp5^Q$`sW!r>iEkKcekUGC_O++r*?Y6Mm8m}QI{vm!(b5*B^(EFo$;|#R%37{-w16KP3)I_aDN_^{#G$ zX?-gFfh@1g9}kPg7Z}aYYwx-rH@g9nmeiXK@N){1VC50;!fP#0XDOqssF3tfdCqxP z@N!kZtsJc*PVzIlTF=eEeF7m*;1;Rc&smGrRz~DRwgayp)cd9U2h8u?Go8;MGj&A) z7;4zm6zr49U)MlOB3ywR?`Vm38|r=v=fqvRBffKTnsxpRGfNr?6-?yx>aI(*CQdz4 zXv?F@7troIXnHo~0gKi?G_AQb_I0@_J{`y(ABjfL`WcO_Jp_hAc?BsRe@zPS4Ilai z_o5^WNP+@yF+DriELmqJrk+0KBt`6G-mDf5f6CZLjnUT=LLNmIVk~Q4=H=z3^@r?V z_LVbJ2+vGUmy={2b)_FNv>!l z(U%?locTryo(_4N%-vMxTEFt7x@Fp-%7pl1f~zd;jqXM_L16MtwPjUg{rTrc^xgK5 z{qJ{$1z6~-O%|ED5?-TgWBK2xXHN(wMABig@f>YMcl{@ko2(jK=D`qvHio7Db!%gB zxn>8CL(Mojm46P6n^;S~U`E zsnW&U5b224NBCJZ)BjN%fWq~1%Q`fAL?LN%0#Um$^`V!WeBNy@Rn|U)Jo(jz$>NyY zRF#4Oz#OYjN!tXz<~JYkQd1FwNyeB4bQ1n+iJ%tLe)el4I1@`_&*)>sL=_--bvwoJxz+H9Z;DTlydJhi6`M;nDE= zH~?|X^ciXyFwmjKd2Y|tj`Ick2DcAf0Eh-RrpnbeG%h_O8pPm}bm^-_e+axPlGq=? zNE}u}&w4XJK|afl-5Sz&6qWx>o&cwH zesVenuzmR0O$VT=a_8{pPJiR&{^sV^p=wPOkgFB(N32J|*}l8oTVXmFUxM5NT@%gh zX;-)FE+ad#FgZBvVYMRBXn4G8n|u2BjEd0|$$s_z8G#H|qNI3+oUSMJA6lZ0<6GVJ zfp@K=Gd6Taeg4uq`#Wfh6-QhA(qC!QmA4!2^@6jFP>=B_<`m#)*Lr-yL9xqyvf(cb zXQpBovGjMeV4pMp8Ke0~ex*cRW{U-BdC(R7c1rWyV5tcV9r&3J4=#+*v6X7GG`2gv z2xLG*2X&YFOPUNPo&co|YQxlTn*Hqwc(obW?G_=k<}&4b6{_WY z(++*8ea`w_#T33Fazfp5l2pCs*69-OB9KB7!Glgad%7Bw3q4jFZa%KptGLHh-s^6k zrOM=E+Q(2QuMd4U+5%bFt88|;1x- z;<5ztXz_nOQcUKZl<~V~R8dm%f2UjpLGpTk-@%)E-)W;R*}$25-t-=U8RsUxJ6KPK zF@e&j@5`8V_x3n;yV5Q$87*htOi8fdgpc2MG#pb8cdW1lL^$g6DT!M)&%!hD~j-Y6T|X2euO!2`9%v?;&&yS@8L%w>3hSQ}`veazV+yC;7_~LLTK*DePb#I~z#!wM|&fKCo!?ClRzlMz+ zdIOhIA-~YPEqs%`b<~q{8)g5R4j6-I-SsO^$sG?eOg|&nM>~!-VW_MtZpA~k)6C;~ zS=@c_c|EHypjmYWTPQ|i(>Dd8fc2Nv91T%tjx}n8tr4Z{cCP3C6?xRk+6E7>$^F?aW-{h@0DXJVK- zPAvys$d^r#gzfuwd!m;lYLpic87txu3Y%+-{v6L6fS&XEHQ!P66Tc=wQgdoxhtf1{jFIGYB3n%WLK$;>f~zdN)|LC$l*t>egL#g=>^slij->jml~?Pv*-3w> zYZSq3v#w{bz+SDWs1IM``7X(9McoXTx#p6x?^54AiuYfs{X(iR%k-f2R<&2g`}lHJ zgYOHS+ZD6AIW5Ib`%XcUsv!);t|xbE-V=__E(*CXWT7(jEQXN6Eenb)uxhX;eb zrNT`_QqmgQI@7ee9BWTq^!T<*)MXO;QLHhJ6{jXOn1-8~rI?1PP?CYbrWar|G12{I zX34QYR-K5FDabsJ43d@82rND>%8Cv6#^W`slG$}pL-`CbTrc1w!drRv(pU`WuaofT zzAb>;59wy8EuFgHD3)dz3FInEjosgjbl0{J6S6 z5Nj&qojq&Ut>+S9sBH`OZy$ zW^cSr<~6%+sj-aXRBRtZAEz&&et*+}HDI4qHfnD9rN?BEQhz;juU(XhQm(OPOb}UAG3B zsGZ&+>iSlXKU+nbb=pCHDWSs{ap^XiQQg&e=)d$;Hm#bqHtH;EH&`XY_T#_}DO)Y^ zq<=I`C2qks2U2s-%}Lv-J}Bz7_TPR4Cj~S(E_PD<`#tj^8gRnR34u)Ly@TQPVI5a4 zSJ~`);!ejr_1z@D5w*rU`EiGB0I!o^(cfA%v{!Fw*{N*5qP@47r_eP=i+(v%Pir zRzYAud!SBDtJf=*GeU}I>E8L;op!TV%~qDdlx`G!adO|&wE~-U`jcqb1%1im=bAq2qyI&@8q|xJf98)w$?)=C)=6aYmKCsr{46k_idty1rM;co;J9RY)+}Occ|)PwP9vY zPrK&}7@J2OJ_oIvdmUy+UWEmp*yyrN;k5RvmV3jY>(Q?*rK;aM0ddK~6w5p}xG#}h zvCz0awsw$Km2n@(7P*w^*`@Muff+2j8CeD|8x15jqIx@YRxKu?6Lx0OEKhf1jD)z2 zt^d&)&|r4K<>r3{)kmFM@3Q8hg`+BLb=0hqZSNQXxVXZ514CmZR|`-Z9LsN-4VFYX zP?S_r$~T+hOGM}0#9WjZsOC9R)Y~Ms>zS=?X9R~Ce}!fa+p`2(2YyAKM|su!S6$uDlfJZy1Ep-blA z7b-ba@fk*NQR68$eH>e}m#-0fF6Z;^dd;P*(;&)f6m@d>m9;Ko#4IqW7uFD%H}ma~ zDH&DGTD1$QD5}tixGKpEft3hkt60ND+XrM~z%Ty?hu@HNeGbb$C`p7*bNw+S%0B6D zwTzH@m$-X5NsVt?_z(VQi4=*%nlV!aW^Y>8YP@I)ICWykWz!Tt83m1JR+or>s*tI< zoaXx}4}ImSYj3dT^4{uY*QfSASG^Z56TFvm4v`mqv>rR2H`1D3S=u{ym!=XEC8j*L zOy3+F^Zc;-NR`Trns8ut;pbVyqdV=tQlgNqTE|^O^&&RAdslsqH@IY=)$yg}sG`cK z7nySFfY!b@N9z{}o8H8@N2!A!DtZP(V31X}1UDIrDP*Th;7Tg(rEI<+_e!>#k-%JD zvQK#wa4qIA=_dK$^yE`?X6Y|#k*#As(1WIv6L=Nk>{}}wU>0k`IY2$40 zy@5~-!!Qr6r``|*WILc|na5-ltMVO|<99vWuF0N*pHDGKD>R z`?9{aOvpApp`Xp3JHNW?eEYsHLuBW1HN77B3O3RW`5PB{ojld)=vhf2#Yup#no>s(s!wn zBX(B9fWaY5P|p;AVjN3tAv5-YGeW36s;p#7iP3M0OO(@Kn{_*3*7^{#CHw~-l9)kuBO{^ zqXMyTadS0wmkc**AKu^MMsL{qs462Zc`dSfZM?x;QuAI@N!u2q4Ddfg>#TRV_Hga5 zimC28LWk9#&y00uuYuNcW%xh&%G?ng*~-mdvX{2?Tl$cLYRfuj>w!Y7)~{XTASMWbDLW;{b^Q?n8J zk~gc9@QH%BWB~>gu>K(XKa^tTIe(zK4fe>qVYr40AD>eHsO~%L*Lk6a__?W+Z!und zWVhn!)sG;mr~@O`NZh|SY_|dp-`%OU(Y{%&G3a!1Ukm87+ua`Gy6|J_*H@q{N9oYX zZo4Q&4Q~;I##=yPO~>@@%a`Qm6U;qG(!YkCLckd;dzVUegK*{1t1k))!L zyBpzY$*hG1k4?Sr1Cr+rQPg=<@3Y{6ph!p_VVX~qC7}^??Cr%6K%*1adN{!b`+eMx zU3*0%w%rpb^`ZF0t|W*v?zoxiFJa?p_nX1!QcO%Q=OjHfHEusy)N1h!K2yD=(*O2F z=VU3`NqGP2b!5WSz;4GAm+k}4%q-65h_M2{?LI%WX10b`A~0>8sn{n1Rzg}ICF`psjgpfge!s0x5>e8@I* z5{kMajPB6iR$tJ8r3WaLhWTxmY566Fj`p{#^iN?++E4q^_CdNBGHPG2uwu~)4y5cd$;{bX6` z#mXv)Kd{YNUSs`FcT^=BIu>)Vq5Q<;2JUYiF}b#SedDCmqtMqr|3b`k{jaA7j|jS+ zQB3YydKy#hsDutN@u{8a_I!CDAsv;2x7bJ}0_y*0Sf}#!&@@a=~+E)$Z-4r>7lF}|OYTx3hCUMD}S`@Fn%?M$DikYJ|JHsVM&nspLndBvE8 zqBok5&}&0SjxEzc$PDM8ePdKJmaRSW+L6eJJ$V9=SzRPgIc6yc3NHR?tCA+}PCNNO zpmMI1@prTZtLVp*_Cti)KD{JM#Na%5{T^UJUlZlaj|`fY#6K| z${~JX|ghkYShMh#sJ#fsEt?c-b)JM!m-bvziGsonBZv_6qg{d{ix+bat z%oq6^EM$Ee=q<0aTp1(4Dm`IU?(_wnSR)-NCoe8#XhvsU81W@x<7gALfgO@J(n{1* zmiI2t`H2F!1)#AWgzGfr?K3HG&8UOr3uD~lpxufBWRb}T)VE?N$y5}hfGIR3uD9WH zq6QkKqm}8C|0Zv3a}9j7fvhNbOTXxPXsJU=jleR4sG}rLkPf5mulLw9rYw{4HWDs5 zx^pwe7BzP&$v^gZ-of&iO2YMz-K@T_$+FDr!_|ONyKt!PwrpMre{qGFOSKwERqsU2b@@8%OG?#i2`o*JrTDh@ClDe-~8ov;SZyIWObU(b9cFNoK+B zqKF4uUgC7@c8A?KdU_^sarahe)0488#*2NY5!JnDEE89aROu}ucF{#=&(=r>AJkZP zOZ_tDSP&86?bOqPifqjU#j2V&o^BfB_TN;!DFQdYa)17WbMf+^sUqfbyK!EJ%Ac71 z#p)hq>)Jt2o2P6c*-E_6w0|BBDxJCC0W8O8?}t_PTXOpxUm*0RZdn*fM?8$)%?axj zdcSxR7eO*{EN=IZ_9}^y-ach5jQi8aqh#!_ZJ*=6o?l?{bN0)yyp0$u&>F7wvqdQX zJiGdBPL&t%C{_JJedfEYo21W{-Urr34$73K)~fE=)Pi=|3WAcRS=2jc=MqLY_jUq{ z*`?U2tD9#lI7ojgg*RH=Q}OQ8==^mT{7%Apchp3dme4W+=ji9WiT3H}=P|Eu?lU$0 z1wr4SmCF;?0R%SHK>d^ywMYHbJ^dXT%$t!Sj+F)6hn$@34kl75Y$G?B#Y`t7=S~(z zP3O((uF%fO78CK$^OgFdb+zb`69ZPDw3ih{;Z+0mJM8~f6~L34BOK)Ib#>(6OyztM zM8sDaLV!MvFakEMmG?)&5)?Py<>yt--XJ^%=5GiaA={&b{_+{c@kH|AHd{U64%9br z5Q@hcg zK%+BGTIw8+fE>FQKr&sK(O*4QYW@Hn{CKicb5=G*M}LHL*9AmN6!I_ zk{N(L`*6q8geL@u9=g6Jw!f^5KTL_yjVg~k2vjkC7swmR$wSiele}f!u>U~g z#O7UBqF4Z*?Rs_lc;ZuLM4Hl5M1JgTd=wFk&hZ7 zqR8SI1z8zq@;@4c8f$l>GY}0e6K1-xrMy7Yyh8Q1uUJI1WVeG;5$~#X<5a@{21y^a3GMwg_uXoUN8Nu-6d8hg0WxO^8c~3 z@k^duV7PT*al&78_U1mN3!zqf8EwDd^MhGiT&ul6+$7aX$9BcDLZ7OTR1B<@h#osw zOy*$k{uyG`JhqS_h<*0~OXknS-1-I!n) zf6(_nfygE$bq+}_pb2xuQ859Z(e&EQ$WMZI`D}2(Gw}qY?$X4y!qA31@dBT#;;GU7 z6?s5$gslXw*ClgS(Ynrh@a`)@vRi19Rp?=9o4Uzif$jm9?pCi zuo(4|g5I5q_BG_4amz7Wd9a%F2&ohRJuuA5322qy_zX+JR;iEV8vClGU}GEB%QO`~ zbz3=s+-n)_oXM?22em)ghK%X{T*}lurAD}x*;E((hCAK4m}xe;YAMCNf){qF8u8qHjA<^_Z1tFwfTG3U0;>MQOL{_;&s_4~6*HE-*V&4> zTHkVHzsZf!ynyK<>Eqdt>an4=Po2`HA!sgbTr!{N5c+Xi2^S#CE$Fm8HHSF8VY7eU>^;)n{ zTbCrN0nVidQCh2Cv&)as7T1lfaSdAw(5gyXk-n!^*~(IPCq|A*>e)fyucbx7?Q8xU^Ri1nb@39lmwaYVgeR5B z!bzWTWDNF|qC%FUpyg>ywC9-;G1@0NWNtbDjZF{PWVAF=VFbWrLvxeXsVic~LYdrj zE+g#gDxe@91Q@$K9x%8*UZ#%hj~Dtk<{kw2B~y81bkLK>1#akK{1*3TfDJ^ovp(_`iA zhB~_WtQLm95X_Ej+j^fq&Uj`Ub4=YvWiogE=3ArrpPAr~_2nG))m!JtT=WO8G7ff$ zq@^W6(jv*!_H`YsSlp9V)CQMInBZcOB^zH#=<1j<2Y~nlf|rZHTFx^I!kY@g5Z@3O zfwMewt3XE?2#7Ybn|#6Tluq6|-~rPOrH2KafbR!TKE}g2#|L*QH{0cs$_h zKvWd*>%suu$7-W=$1mbC9dA3F=Su`;58dbc-d_!ADKm4wbFmyLs)Qr#f}N*_t0~i) zd%Yu>B?{tYQOi*0<9Daki3{?YEin@;V#+NW>#~!_VzPp&8H?eD-eg|E2KUfV=9M1BO@^O1oCsfUW4Vm%LssIWYUe6GisuDWt7S9Z&Y3Sf%jH5N01 zH)Zkiq60cfK0dp5f%U!WawiVdL;SP3!aPF4L?|lVfj=Hve$Mi-rCqS1YVWjE7Yi?$ zy3RP%{eLu_XIGP5*R=yEkuKsTQiGxt5h5KS5D*2WMMXsg5|l2zw?OEiRHcbPf>J_} zUZnSq^bXPq5PCv~kUY8HG2TCLemKV-d#}0XTE~puIs4DCj{wUgp31{Iv_r_ly7k#3__a|#SC=N0j2@GYrM46U>Ds$RWn)Im7(8Qi& zO$>PVFXSD+F&S=qX(wef%xK%kk-~jON}eK8OVyXB7!WTQbsj;enL6=a>FU|$+i*x3 zOgs?Wz6?vYvodUzU-+jmr$LX=HR5NQ_IEgoT&wF&5`ayUdry1HcvZJkBzjAYRL(kn z0RJ~M$9gA<=f~E$$gkO0|8~^pL_^+ZRD71&WPJXD_stAn3$n zTguDzIiLK!@qk5gmFQfa(T|w{DEfZzJ!I=^>Kf8jEl$yGxtGaOd&r@s#ByQCX8i+f^_!*ydy=Sgwgu`af8wF#QwsGmoU9HBD)F4p+BrYE`3s7NdeZf0;5V4Kv@n zvSHh{YgI}4)(?0!i~I3+r-HJ`aeRyEqWv-9LnKC+p6Hu~2 z?C$J_9;(b_s_~A_$jiDVrUstRT1+~#;gDWANAU!~9C5Ka2hL>Cj#fwEol((nT|MYQP zRxb06Q+1MIQ(Yrr?A9wGR+?!I#qMPIX$B^vy(_KaOW5pdqjtX*>I9H#`@Xa$U{mdR(+BiW}Sz@FY3>QLUe*Z1sI%i4$aUZMsXXYUj3?C%WV%Y|PZHM98@ z|1XeMcfN~m{MK3qd|b^wc;L2L7gMA&XR@3ENN+G~x~M^WBTXHRI%aCW)@UE$T5JW9QY_`osfndV`fAM&u!scMSvx|=E zts6So_2^_TK3TpJDb{Z?CTXUk5FK^&WI$4k6@iUm{!!U4c^rj26F(NM^6tqD2>#6` z4yt3N-fXx#0%d>4wL4>Ucylsg;-ZcFJk*QB!s@v(lV2c9Iu1p&4+)y; zsT2pj#!1pVC=8YfHdt_O3P`sOKfB}~5)lQ6T~9#qFgumqx+=%_WabHCJ8xgO_1vCL z^(PCf4&L4|OVU6X=$-xFYWd-v?$Suh+PxWDb9hHBe&Xn-I7|;5t-~uK4)aOwKd~VG zPH`HcF=qbD1D7{GdB--ZnBIC@ZBP$xw!m)e7@WOKQ#g=TT_*-(rZh)&6E$pUqoa!+ z`fRA1eJH#Ixl!}Kwb#;`!ek*kKB*YFMI1CW(#$U{o0A%j!}(x2p3~3$DHVTeO7*?B zzhZli6IG1hM&#||S^B1v1FTT*(B!Q_&d6HsmeyxY z!e5rRtd&;0wx$cGAF);26&mpm9;{Cyjs#_B_`JqD{SxPxKMDf(`(vFAvHxyxb>^xs zuMCA0@~M63w=u z2qrt}v|Dz-7?Eh5_x$+g3R4ikF`C!qjHb?CJAUoDwL?>qbBHwy(AsnF}`rV}~3K z7+frPaiqr;-NH{?o^~&4Ve6weDdKkhL!9bWD=~DlDzm9KdM;)5f-3xZIeDx(1>^uA zW#8KWw+DMJUuPO6KHn%ybruh;xT1VnvfCG#Bv|qW+=)RZ{jvl zAB%_zot+Auaz1ACTA~p3wz+%3Y*X_D}0Ml|bwg93y zfSUsy_2Z|)Mb($%_ea|shYlhC>>0dul7Js$p0SS20mT;r1v9mxFW=yH{IEYy@f4lt z)H9AQfM`zn+WLDY0SqWEgqT1=0t+C*3LcpipwZJwfL=v6UpDj>43~%yVvDoG;h;QI zk2SoUtJAx+(QZNXmdzOjQLRqbh#Otnxa6s%-drO5x2++Cv&+I9^3=IO?MGUE1dw_^p&F1;rSCEoaOR5N(8wuOq@n` zn@_VKACS9`XYrc7;8~Jc-R{!UI=sVn4+0C$MA0HxC+nC+dNTG0`q81oQzJPV5f181 zJSy9Eh@7gFy#^{2Lbe4i|HhC@YBxPWILWSP4?Ydxd&CnwAzlM;3yLTaQC6WcwY@h! zA!(~n25do#q@q6Nr1@&z<2eJ~TTD3-C0F5mUgsbb#gy?XkKys)JDDsjiVdUPEb%B7~6;$^0fLo-b8`;UaGjx4;D(o<@UbEutI)-^l=%P5>Z zI*SGrpj`!X{6@o~l&u6^qpPDw2fR1ef0ku%4mb+I3kfHCSwv2L())+f-X5?RvJ<(e z4_Qn?$gAjE(8FZ<=YiyPv1!nBLoATbw^yZ#{k!rs$jK zV8*13Ye|)xv5U)(xDT}cDP{F>=63vP+7ruMDrqu7;g@B=^p7~%#y2;!8+^Clo;J@C zR`Ha&;xGCRPU#BKDP6Rsv#PVygpqT~O5BWRtz3l~PaquwF<_KNg*8l|P{LR01|{(9 zXgDSwd&93WRm`D%!yN$@)m8R6{hXKd^(H53<1-JgT7l&R(dbr*6rE#}s%{48{Hu|VFp0O5fU}b- zzGCj9%*aVC7XzC6$4>j^KUoD1XqttWLA0ogxZOn5*|h6vXAwri0NdHKvVJD{_j^{o zYofw`yaLZHMWf>a!WvjLe^iD6A4eNIuBcj_Gdxs4dObRqZvEF5P2)Kk+#gF?pjo8* ztl(}%9n}5T5%`8}wmPK!L=2xs1f`u{DAd=McJ`xw)+t`RRiF&S=l;|;|LD2h79uCK zL9*6f);gD`(7v@UYmXi4q)_K*UU(4V=D)v9w&{8EcSofPEC-OI3z`UEfK%}e(uMHV z&rHR|x5N1X~ziW-9$5BZgHZnlfK4{m$>A-jtwGr3Woezh->34X2N| zjjMH9*2qYjVdVAt6KlTGEPqMm;3wN5jts4|)_l|t#aeeUcU%^%EbKU9S!^?Aiti_zI_;>nC4`{XMj5Em5luURq&dd#lN-1W7|t zCDVy5@A+7Hs@e0i&H1ozk-n5Wkc0TRhh1WHa9Vb5#*_u`!hZf}*bD~ZQXhGAI@ajq z|K4viEdw`>tUGnEy%@WWOOKkq9dYTHG6g6;ac4@YkYo~N`ii1#T3BL9Myx&Bh7*T@ zFdsTM)uzQkV_tsodESdxUbd@a#3r_(0>Dg~uIfJq36P?)J~<3luTP#j)=NN;cJR*P zdUVmzZoD~m8ki*=D^tf)`%A&)(#~#!(gnT%@bUpy`32BE^Y=nEViDI6CNwzkXw6u9 z;?3$UTrnw;J!fP

j|D}lkFb>-qCjr^-Q z+x2i}hMibyXu$A3Aw%_{qmveRMaqx18mxPjI z@wx8CP( zWs_^^>!JxImwP_dG*53$)#rkc0loYYE)$3wY0LdubgRW|+De`eyg;KyjOe{8S6`U#W6sZMynL-bKGOjZy!^zgU0cS$7>p9uKZL2m#^|Mq{xiU zeu@9kx;4ZrRWcB7`Jf?cWIMLH>kbeq24uh;UkZ4nswk&B(EQbUQlP~x-e z?%*^y%4J8Mq54GSjkbNA#Lc7Z3I@(ooc~ujBI=E1Icl+sfIBrcXw>}+JGMU}&@ZpX z$OxW4NPpwRbj^`b&GJ~d#`FSMAFXQjU*|)fQT^RjVu>p}9i0CRKj+QxEkW}8%uf-% z)wB`{>`VfpBpPvw3*7<4U1#VNXkllmXW^i=yV+6Pyw2l$yp36a1wdP<0vA%A834RfM>Q&6nv^gRc}a~JGg$e4t(Gj|Ds@gd`N*E#hH z7LDcOvjR$b?cskQDuDehrk+o3oE+OV^)`W8qATEy#FZOSCgy$6|#+4RZs-@0_L zx7%sg_~eCclF(Tgm4U7XNa4!&?{fkJ(}LTx>9Ila)bficjG)hSU~&1udf#1w@A7Sp z8cgC3;U7xR;q0T)KTEwf4ZW6}pv8be^cnz*=PXv<={y#ZGZjnxM%L1`aF*B?U?>=D zXBx%b`&Iths3lv=7I?1&r~qdc&vcM`jE6S2fnZXjd-N4{v|DI7N__8S+$G%-Wk4v2 znf?7l9J6i1<0%{@CQdXG9X%gNa;Ck$v-3zwae|K4h>)9E^cIs zIY09EpMHtSj+CyiL^%OWMhaO7D&WH#r$WQZRtWm&NmsPKoB>#UzFp1{lNWn_nwVgt zbyZM=SmZO(@O}UJo|B?$Q%naoE(|${5+$!y;~vz`s3g49ss~`K*CuMW*e0oyWJ@V#d z2+~f$?@iii6~J`3=|t{YPH$^hZbq3KV8t`su2RB@zKu3>G37Dryg&Z*gn1n_BN;9? zoK1V2t8RozXve(HGyPw|Yd+CJyO&2^LbRIblI;wC{W|@IJ&2B_qPI|(l$znN+wUl+ z!us~7uOD(C*>v}!f2tm!j-$qOZ+F+H_jw-d4`iMOZbscxB+|&>BnI-?I@lAgtnPWV zyz7m4?Wy!v!^k++XD6_Onb5yYO-~YdOxLdypPPpXQ?{uE!z`Lk6^d>e^BD(AvVGQ8(k>$ZyD9!O@C~>~T8BPgh!s_A4SIXR{YW zJZG%f;?v1jt2VO0%Y{x*@+PS?S>+{!5TpnP@8$qUA-&i*scY|reJ|hFY z{obDt_uieS9WKy;u@u4ee*0cryZjtEzV#-3^J>ImG!{rl z$$o?M6`b-{TooLvYF?uz_HI)9D?k67$?QJfX>aKAw4ol;?KV1t#2Si@aATz#EVhjQ z`{#z&zvrHQJNHcN-2Xm(BZZ$liedcAxC*A#l_wnMxK>OI-}N@`aM(M6Y8QJ-UM}f zj^(%63NG^gN|@g{b4dmAbJ#AjuHsE*$mGf&Q91^9`2G+JI>J`m%a-@vh=;jcu|{r5 zeb3NDW}%PU&@ZOwv?)aX^?dr5`;G8$@%HULdtuCnf8pn+XGtr{z0X=7*E$5Y@aRR! zMxzneZI3f>+cJyje9L%|6KJ?*?DYD;gdvy@I!LM*xlX_*o9F? zemucpHyX825!AXG!^q73YYvahuHC@Z`j4$&gIB&U^*`F%Z5PG-Lc->S99D)3*F=}i zq4jZ;xP@oRSIaE-4b4}l*IMCErZfFrP$4GLt2@kInJcgI`^k?3HzFBstHG-$UqV0p z*<@!Z3hZ3DHfTh<7t1rgI#Wvbp71pC`x{nQm~?f5E#~b4I7eKLVO*=A8~N(XvoK-M ze!TIo-iiktPW2km$O^L!Nd%Q3zT1n0d$gra)y>UuBeuBvwIu6ff6(M zGkZO0;>17uK z4*V0G{x0`NbIzQCB|ds5nGQrPBneJ<5wD|?EgU3Q?>Az}S3X*yQU+H^CW1UW!VPa5l z#XJ%0NS~^6;P%|Cwk(T5O4VsB-2lvDp#x>rls_<$s~Zna%aB#Gc&iS@mOuBWQ-wYq zX}vda{zc5&_#Rp6@ctORvnWCFXMUIzvJfcjI+-D{7;U{m$IF-+;cVX|+NDi07%ySj`p6N$G!MF$Q1&@uSu|30^MUnm z&3fs9EDOtz){C;Oy%OZXX6&HmRhob%YhHumTnkV1a2HQ|OWT%ms@EYeM7c|3SX}`b zk&G7`&U3Tati^x&0mk3$G!iiI-;MD$FK9j{3pLAn4U2~e@CdvhcV5b^;oh$c zCbSYa>gt735-o-cyw~s3FOOiSk#gtef5JrRSZn;k1jD^hi94ufKRv4?qi`ME#>{VK zkdupabY;F#w(u<9Z)PX4h zEN4-%nION$t)J!M4Xi%qv!3nLK0!}J$qne5TcXcOk>v}=+tWr25@rsFv)?-Fde(1$ z(fuFP`aNf^?4^8IXXD7bwByuyY$7~miN`K&7}RaH2%7n#>6Gi!CxDlx-74@|+CkTb zKH@++PxCQLJKF|L$$x&Ip<5PF2Pdit=&BO&K9^9MAX=o}pWfcxI5LRDuV&Q8sSEKj zE$inXC#TJhL}*(2ByFW9BXgZr@B9_zV*ns1;7ETF>PEEZE1yR~ASurtAn`bpQ&^`1XFhR0 zE#q0Ud!B`9-_ai3yw-Lyv(ap*d?UTH5D&S{?Dr#yVZ9VKRi(JkF>pIX3`FVeGShMw z@EM4kT`C^A66mVlxXfsuCU4?#ccVZ-PO$8M-7Z=+L}Al&_YxJ`}3ruxqCvx_#c7T z?uY)&jU$$Suoesm1G^K^$-1ux%yPsh{F0suaQCL)(QvHqGDZ$Pp^k`QqyM61i(|xW z!k3&b84YvX_bNlGM&q+kUnN@prp6z2r0swxoomb#8Pg6;Rh07USW1MkU@1yxOdf%k z^BQmfdFp}i((DO!CxkFXxy9vivxqY8qR7i*t&lWcAu=|@PmLjuKleC$T|QP8!#m*u zL988Q?H(p-Yxjcp$zX-A=MiCxwr7H=C$yun?vql%tGJ5R2sSO=&_BBxUt&+T;oQgh?G`V3!mFGWFL16q+9AU{mRHjcN>Q~;X7RzSwD^<{va-emR_&*w z{q9+9&PIQ7Nm1nBJsN^BH>SxkD5K);K)=|@LUW;gM%8`5YIXj%S{5~7i3isZFU#BL zJTaehBI+)LkEFrCmXtmoqk_yWv<&kjj-X5E#h(9B!S5-v?R~&X2w`Z&Wk#&S{Z}}r zEKUyCIR6^cV9Ch6_CAbX^H=UgXb62;9%x`mM+n!I%9VGP77%8Hr z63exF5t2F54~Uw|#4R$o2DKNpmraM0Iw#grw+0d04}a?-dE`sv7+X0o$2;0<)J3`< zNqV6i)a?VSo6gNneeSon>VWsw=|4W7)L7v%m+56$g&e=%9<3ozXU^9rgkEXNB>vEM zwRe_b46<#c&7Oq8t@J&%qZd?(&MAs~hSr1zfAU3^FuUSM2eNE$d#iN^j(){yn0JMK zi!0L~lR7dcs2K#6t?? zTg<=uu!IHbHq^0mRuW|KahVHm6C7iYu3A^??bLpQR<~GOHedb9xt75`c~+dua`SMa zcE-T>4I%NhVDsPJg>3rC(&jPxB;vd(_3MO!)n7&2(Zq(tVLqLTn~#`2Ex~{V>JX6a z%$`c=dZOpTFz?4Ss&a)2>sB{WlKMAp=Qf8jxy{w+Zv_fRz|4x?XIvKtoB)wJX)nF_ zDe3E=GY31~Sx9V?U<%^j`d#wX(oxx+bE#J#bOnc~ejUZ^T(izb>Hjv6bi+eY58snV z@$BE3oL%JBlz=10|8mj_|LSrjaTdG{iIjPEBKR);?+>n>tKzl=neE!i?(=g8v-+N` zUiVnUeO#q%aztzWcuQy6Z{ZEee%5<8m?G_V7|e@MLC`q+5m##%KM9XD?F)Y zRUfZUAn3GZ+|hbcN(>gGJ#n1RNN!17AM>%P_$S;iM5Y?i26gyqru%f7+}Y>2U)2>q0>j!*f9p@o zyTZ&nI)$^SS^_7r%2SA+`VG*|lfM>A41*ZkHzN0Y43#Iz{59-91vSDXB{LsJsQ>T@ zD?-Kxl=8D#>+@Gklra1npmeJc8Ar{98)WFOQe zQ6$z$8*$eY<}hTA6qvXPyD%M0SniW!H=ogA;#2T)VR}-)J(Z=@^e{?%U!D0i1h|B3 z-#|}{u8w&Og(2@SQbCKE-(8^9$3jKUFzJuAnBlc3@YAfsApe(sYqQ5Bp*XziVs!I- zCUs^oNZj|p&bvNo2$L#en?lgEy}?=oUHS+l~rW8?QuKVqE09N=+-Db(mR9L{ynmylXUGr;W*&5a)ik?)FjgwYH%{e`(hc|StU$Hr;o5Qf} zJ)ns-?S@s29Q}}_`%NwM`e#rqQ^ylz6@ORC4?U-P~gQ`U$r z50e@Q3UkaZdZHyOrO}2zs4haIt)Edg!b4SC1|;^8Uc{#Y8KB6$=#9l}LD0o|QqMM3 zG)B$`*jVnvx5*hF79J|T+6~h5qZ-402Wf%t&jK^h`edNCuAwcQ7Yt zMbA8c2%Kfor{}iSX3+Wt8g>y#u=ZQUdUUJom(3(|p7kQ?WViV-GdRLL7Du7Ye&brM zpunA|fA{13B=u)S@bdMrGCV3|JfG6Pzg<|f)%|c>(pBhO`d z^5oi}w*(NUllqeDSU=*x_}F`k`25-PuAtGLI8$zml0xIo#@74A$~p-`x@sv8I~&*9 z0_X*EkH!#xzAnv-^#V^Phq6%Q7O6b0Wvl7Npk&J{&?4i)!9i;fpV0Ot#%>78Lb(Oc ztxTTJY#Ej$YNq(w@5Y6u_e;!fk~68}{90gquN=9#%rKOLxsud3dpzr#VA=7?3|Z&+ za_`~QVQ#5|@z=b0f;F;{djz_UnQ0sxjXtTxTBdDj1W?0#rH0(58_)Fj>$~S_8+cuz zoBQn2rkTMBvQ8uS{M2rc`B(l>syD8+Qs%_KUU(|huZ50@tJ1MqR z-FdD0rjE0y5F@Rq+%Me8KIzr{OlNLS^oDse%i`P=&TX39YkLLg0ErQ{Qb6MJV`2~H zV}=Fm3qR-Pm)X7<{jZSOL*?jv9KZjKe&1Gw>zv-A;_tGs1fSjOQB}$%!JlCRB&iH> z#kn@22z6DmH7owH3uiwl4>=&^W|C~I$BdEChvGG&jAN~pSIcA4hg*Ewdw4_-|2k%) z6R>eY!AReE(onLc8Hiac$ydZ@KxidGdq70b{X^ki2cv_Iq$oI16*zwu(Ys2jEn z3YK4SbKahP3B?^FjZTpK3g4ek9qUGMW$3l815?mw)P@7|b4^~UQSR{frK?YR&H0Kl zYh}%FxnI0Fsxe}R?q>eKMtYjkIjY=rGT2Wy$s?e^i}1TRbw@L`p4Y}_?B+N_mB%gf zL-H7^``ahJiN}@~*)bNTe|mb$qQlGE`3@ysBt3UzYPoSLJQ$m0DYiXpeF&en)wa^7 zKNC9YRw@#BF~+~~eMere%UZ-brc%Dbi^#(X%r&%t*@%qB9LeT0a3rlymRn zQaCE#ZI>@dBW4;?y&6nLVkB8;#vg;mdP}>2F^Zlz8h9b)JY|gKmWt&G5Qo0;%Ptj~ zMPp}JR9Bu;5-xThmV11=M8y|hExWibe8;bq7C*OM{uCSOMSd<-_DWOV9cP)2#W<7R zU9)hZR@rU8n3ruISvE>v?NrJ4Sv>ZsWX#S!@;{RnjFUST3$-Gpy!+CodC?_b_r-m^ zWn;TH9>N`19Y_jLzisj^9Wr-bS0;bqxAEavy_Ir5Ox22ZN3~aS`<5l88eKt-%ba#) zn^hRp2*-)uR$MD<6OmXypNJ~GNjLhz5glO!O5cH{9NPnB?$`}=5re=b?tcvP2ukjG6-)iAg^QWQ}?q|7i zr=+Ip08GO3{RwYN)5;GE!WYYLA)Bzj(Yi5Ic7~yY-{y;UEbzUUX7E7LGyPqxV}GVF zYF&@k!~+5TdsmGy0L@CM)Y5$6Cz&K+9;Kw|P_%IiwGfSOBk9-iXsYf9R8Hg=CY9k6Xoe0Jm`$n~v=>d_qAA>> zD1?{+500jHfQFEepk=}>UBtVI_Q6m&tojKEg(W7FAlW{Poh*Bi(YRs@*ALkeXf3fC z9;5mPR+a7+EMXHec>WFHT8-5uLDRTQbNOKLn(kG&-F1TT1GMEtL#^@nzUav)W412( zLj%J%neH2kG1=N;;#vvj3@Sl7v!gLJvyi=E`r-~i?#Zax@l%%^V|LScvH-?c9Yu~*M((FLLN z(eYNA$el|uI@?MNla&-VVx8?mi{7}dc^&331Bp2%XsXDXy|S*>%rrwLGiL;H^f8t5 z-F#hcBFOt?_`!DO=+BM8EvXQ%bwwIpW456Vx>#Hh%Cci`-%8Wvh*5vljJ;ub^`XCxR)skBg%#=KC7D-b=x@qtY%NFk6vjkAG}Tct!Z-fv{%!TTAxo{uiN@Cr3j- zW%HNr?)`?I%|ihXFC&+Mo!$1Ad?ycRNM#rAU!iP!EseKYq@;G2t9)p_ItI?Y<({L9NNSjaX9VXk8#@1*t?r!Q>&gnP++NYmaA=?oMR_a}i3@R*YNKx8XICJ; zG0sy3BnBLH9w*7Uq^e9WQfmhdqcLk^m6e#29nPQyPNHMM{Z~qSV+*%6{A_W9CSqW^ z@SfR=+F{EVc!}=u%dVCtW$tTDY141aBDaG-6m%oXjt^gf?AA%S(ko8d)AW&w-I z2i|Fhk-_6^L6Hi1i9zn9Rg7P1) zsnCyi9QM~I3X|O3SVh`-jt&RN9^}J!4J^}{wTqMIr{SMWl^>A?fkA90s_Q1l>0%%e zWj07sf*ZHMKoOx~mLSP!_DZRgK>d>Ij<_*4@Mt2`ir8S+c|bqg*g)MOU}PLCT0ybj zbL#xmuHm0KG<|af)+dM6!{`oYc}GpckHF0C0D1uLD59^&XGtSl?0kgw)W2N*H!y|t zAnZHQjt*8D&kxyOxC+w}FQjrBz$Ld#|@b)wr!27x!8Sxj3SxKYzC9 zZP}$?hkUwqGCaLOJA_d0qCPVuzyB!RN|k#zc!8(HT*ed=~V6QPInDXmbeSlBt~}+qocOvEOXk9WM^)qwP$hC6!HyE^n0Pf+w1Q4t{NMyWJah45!KP{l1SDjM{cMc%DO#z z0XFWkv^v{2k+1Ws^Ym$QP!Ypjgr-s&>OTH5c?25-PoBFoqr99RDg9vMCbO6<$)1lA zhvDU^{jc=(ZX@ai+sEO);Q*}8rn>gRVp`O zi*m&%ge;VW^pSAPw&49Srorpy|Lfq3H46rLna^}!85yZ!wTbP1k^mi;JRttO60w&t zujS5ZU9|Z?iu6TYP=#54tyf)Pn;7nIwHRGyBfePMTL#?9j(dm2UMxhmw!4h z+POTa#-!DU!#&{(mL}nduUDY^P#kK`GfdelsO-@iQ<$N1yb;rE>RVgAC}qX{A3hF} z@7g4;Q7{-2=2U21S)>sgf65TQ@pxnOo3^hmoRax_yY5@9BEo$x`t9AQ^Xr>c)%P?vKi*NT_+Lh10X7lHvk=>gRuY*+OQUpBsSoc`qyFs4FJ%Ij=+1&60h+`Yd z>SRsu&tO+2YN}SQdQ!c=ky1@UuYo^keN{+*&0P#1z1Azc4QQMM07+9)a$o|8-5;o#XPSaRTu#ZQN(lA;J`2k!w_PxJ*!v%L!veSP7%yqC% zkyza(5ta|O=5{8f8qfNYD$5?OW%e?CRra4|1lc!O2UOd0i@9&`EJMsg7Y`#a#8AQC#cP}hWPgAKm8N#?FGM3 z0(<*~{@ze=pVrX_bha$|AUfHv)O8N@RP0#DC3;F7TGHD~*w2V`0Nxfcai_jwNs*m- z=f&2CK=3Ai{0eNlx+&;ck=pvU=%@sjmlD1%1<<|V1tRk>CQpeN< zz`*Qpy8m7&S{vX}?C~9Q@|6-zKen~FKxHjEMC{#M$3{1K9U9YSv& z(0pHD&)9++(h)G8WNLN;&wqDmE3(QUJY2pS_AF7LP6gFm9$J%~R$agj+aS+%F483< zCC)_L+m_=nhaUALI&Lk}xBq}q^%wqOIsOv&;cS_Mi{Q4f!&mJ8@^i1hXVOSIU5GL& zCS#a&fK|+uNm*HZtJqp)yjbBc&PbSdNu|td^u3&?zoNfy_Y&@SgJW{yhmM)WFxTE@~449&6f^o(baw*jHw{hN4JMzGe)(VBwKfKF6Lp-*qEy%Uy%F`c7j zGUm@$WKxU|L0}lnVrE|TvuOe30P-YoEF)#FT0j~YzY~#U_Kt7wR3&CB>Hhh>$ciA! zxbPlatWgAEOlY%h@qoGrp)BG@=42gNUi^+)yIVW6Y|*Pr`OO_aIc0B<*_XSfA7D z7N&z%O-Y3=BzkPr?^gt;xmvLTemyS4yC1hC8+|-iE19jks-y(zfvg@q2R~SU#6tfr zpy=xVYiSnF(MkR8-K{52fAAEytMY_}!W+qX){Bbp^%kRtxOKY*Oh68ksu$ zL)1OLxj~M(CY=7I^wPqKeYbPOzp~kdfcVdITBq>@MHpmPZAo))b{#U@7?3XlNYk``t!U6BaPVpR=*8<$U=H2CdzL|(*uV>I7)eEF@k zp|Av{aL?-s-p(Eyr~o;>}Zub=K^*RH6D!;b3JZ4^P4ovGoeqY_S}f z_NWEr5_SJBxx9*8qmcOG91Kw4mvjOmW3iK@cFM@jcZ~>KL^;W4e(y*wzxzQ;3~>I@gH#fFmnujJ}hlI@^>U=h0i#gt2VE(e@BloBj+f-&(5P zK)nT~L$fDeUA3Am*7UN_LDx7g)H00NajkLD>f9NX$z{=A%jxL4%a(fz+V9=4A~ROi z_3&GYU!B_!-?0aERTC>>=Ary*7570DEB*bKL@H#j_x5(Lj#;?GVq9X7N=rcZB8t$`qg(HzGiZ&G*zfc_uovxg zb~CA!7nIc-VuBfnqk}@9FJ!P^^-~?r>DNrkiC{K@Uc7a%=#5+-q!WycGN*j}@T>WA zWhNhOHWE$< zv;4Z)=4PT>C%AdbgumV5ORQ&(X0|FZ$D96kr;(WC@>l|u%&Le)BS^Dye2@s5k5F3v z(#9W!0OiC_U9MUr~Tf&5^F)V(-;+)+NKspMmm!`yG5uMPir1qrvx&nn8+gCEgR>>soiF-6W7SE~P@ zWujTaoxuMxxbzB$pgR`{RIfGS;6fA4+TySmz6T&aT9OUNZil}?$G`WKn2NJw=IWvW zk(PD2*$~o~=m`0NVN`}lqwlPqto1M7-%yCdd3?mL%4FuqA#b%)t_bsP_rTdKFW$!l zA1UvX4&O$o4ohipTU?#Oh7887iprWXZI7QysVCa8p;khXa^K4?iT2v>EFH>)BppbX z!WZWU|AKdf7pI)Enn4wP+5umn?u~p5$1|nVs86K&KwBxO{bW1hseAt2VOFsn)(%AC zn?&6T9l)wHyZ;Y;v^1peI>Y$io62k^mJUrbLa78nK>-dGw$YJxX!6izh%6ZZ7ChNfGB6!8&dT1MfV)_Hhv3!|KE*|0`K4n(5P z{d1prQi<>4%3B%oZ~Hfb&xHnGTdw^CjlyrP8OzlGp1^pL(wGcn_Ytk5VfgZUP2Il> zeVJNoV{|!}NoCBn;R>0$tu(Y$Mo|QQ?@utx8j3#Qzdx~7%epNeWtiS{1!iG)tP|SoF3_YUSr|2V&HSn;*sIc zv2TILHR`+;3fnJ)@X_^N+w0f;GiUYpNJEB;eMduEz0@sd`e8mdy)4mRY#Zu!hoENN z?Q$-S;KK9;dOuCdAxRxqW#E5`Mxjq{?p4XR=8aXh0gRQMh-v-JR!3oVP0{8arabd5 z)Vq6-T}F2a{k4HdiCS%vM6a!0-AQchY4M=(;^<49Q@XjJX!~}7q?fBbKcT7`hvN4n z1S40zAy?j|w(CpfRx#_7z6%O?JqQ<`2ejU?_6(ncu3XA8B)hW1V#nC5lw&qBph|L{ zI@=J$%yC;4t;-0?qLkVlpF$@b{!41hDjSI+BPrJW-PA9c2(lpD>QPrw6Z1Dm_gcl^Xd<=GPfO6!~$4|^ln-OB)MPjY7 zVj$O+X#%~`IHGeF!W+(3_{;H%0LSG7;1Q&SRNj6%o59eP@fYSLzGTi}0G67s%$^*k zA84grZ~!0vo?G6Z8cmjX(Y-3;e*Kp4_{ZyuQkK!f6;GaV%18RA%I*En*I~fATfXc& z?z1{Q8J}t~wnlh}Ic_<26wX?mdMqLji>0)=+T1y!sEt`P__LUQYHipmjIdOJuM;zE z@30(8yvHIfEZRdVgW6E`8S7#vSPY;5-jIGdb>`kB6jmbLHVyc^alJqN_JPI~fAf>dEuG>sD& zJJ%-#)q)P5Itm@A6yKYRycEBDh6i6HcEwvlF9cjdF7l9aZiK0qP4Hnd8)!2bYq;_N zH_+o{9A~4^QHI$pCBn6gk$_gK=I88Ab|U`gD5DO74`OEx3cQ&*N*|a8g{f&FIGZ=! zT{QC0N8;oP85cS|)fIk(*zvp#rYbF3eu(c{Y~22X77jM<67r_#_eu^`b#l=GiUa^{ zUc5Mc7lu{GdR~`dJpDw(oMDfa<;ZDQP)B<^yO|{(Z1XwEh zKtnjAg1n@*hnVCR$D1ILOS?${fKBYQ;JQixb1(JSj?+@VV_U+e=)B z3gxZbM(gQZI|?$om$*gsRspe!XXQU_!JkT=cVr6beyIG0bwi~pbdGghDwzbJ0^?4$ z1>EjBTpw8y@m2@BSHYIqZofA579QT^%JosMg1=b_D|2DoIONwpIzCC1q+5GLScR|a zUlMTcDP<3Lho?#|yqv1KVbu>PINn_HkKtM2~IcW^Za#+#aa`wGu?sh6Nq4liVJ72j1`dW%4}bc_n%I72X) z5h@s$*{f)^>9x;nz-s!ZTyL?HVHp6Jzo1S{4B*ZVXL zJnQ6ibE@X|{QuOI<2j2D;({kfo#JRjtdM2+ocyf`t2aSS8*+H~VG-1e$|jv%lt8$I zT!{rNoA!c7FUZ%gq}0_s&Ddb^JGFHzm2gr5@(sD-c{}Oo$Gl%#$}2wZ)nsJcLmaJD z_Gf7)*{+$|HZog#Cf;w^n#2Exy{=cyMU6tA_*sqojuc_CS=Sq~Tx}enJr)g_#LoC0 zD(QCkU%tk*wGG?- z4Qr_*p#Be4?-|up;)VT!jPM_6qasBhQ5h-HL~3YpL_|fp3P=fp2uLUN5=2G;LlFV# zL_t7A2%!f;lM=WGX+Z3vP6p^(Dit-&Te?AaiU5H==+<43X1P*uWAJU!8S9*mcZP^ez7$#QeV73vWVEM$E)IksDI=CM{hTm zJ9(fudGJ1bL3U59s&gxspKg=9{<#<^jJl^ImBsl~tenpEBJS4&yl#Jb|sOoBL zq2SWxQ6b_R$Z8g^|Bv*!EW#qb%ArD#m?Q|enjeCXm-U9i_Iq)<(-264+9&u{?r0sq zRQ2}mvGleL%fiAIV%M2!@>-v2J6lus=Gk(9$<%e@!C55FD>(BI#~QG;@EGj!OD}s^ z(1btfdy@a`s&qCgLKD_y`eX5njTXts-6mmHk>`&CGbIF$}$V@K<|cRVtr=w6GS@Sfwihy-AJ zlz4A^0wjuYUlofB-WV9lHt#FO+k(DN-0IbdEy=Dk8BpUT_h?Rb({Yti!3W6+>U2Sl zoC3opfxY<64QA8H?>*l|Mo-O3g~xlljI#>EYwRQUatO!NRjB8Xlh&O32Ubwo)~k5G zow@e^IFKfmEBs-M_S@(<+?uI4=qTa|Z%4oMyJ^hHGe$iaGPvpTzSyEC;L`r+U7H2j zewmZWLsJx6C!~Pq*(*{W(DK*r?3(pC=%K7@k|{pv_&Y=qs`OSy?s`?~ce8hIr1We7 zfg+r^Dz?(#aJ0vqruVf&p+2jmc5!mUIc8}tSd;&dq8agUQoqm5> zn#reoAvfoj_O1)b?6c;zt0~@xB#_#JoO%6nAYgYOD^5WaY%|O&9HOw^`zHV(HAC!3 z{Xvp(X|Bdwvr2^~TP?I4Zl^&utG>$~zg7hH2%!Zz5ti~=^6`mc1+t?+6!PF(PJzL9 z+|=+p@=JUnZZy|)R&aDH_v=&meM6q>AnXrpJv<=Rn%#-VR+^H)ZL#iIQU|rEtJ5wq z$~(N%5$djgJ$$J_U=Sq=Nkq_kZQMP260ym*z=19?o+-U-*hTTzgtHXSBs^HFTFL7s z%`TqRsC%QuNBHJt?^s8-oe8~q5l=SRfmTU8=ta!ZeXIY7yDq=Tdt4g(QNfN(!)vYM zBl@T@hB=QaqVhop^aSXST*N`h@aeNxstyWkQ@5TR1Wf*M1)Bd8j5|dS|9f}`QfuTq z@*SHa?-J|a4dr}Iop`nL38AS5ZL|8?kWbw<2nGMmq;ArCeU6wCPk{BS>@HP$x*K!! zjThH*y-zQvHGfTV%(+mmka0oJ21I?^uvO_0J2#t>mpRzNDV$-x<x9gKOduh)m+CKB=!+=7#4@#SGF_2#z6;jsG7)MkryJV2n0Cg9E@ z(3vdOGVAs&*YOi<|8Eumu(FbZ(!>y(R79hVLW|ZgtsFa9XX}b|&@kT+>!k;lU4K{3G4_O5I7AJJZ`;=I3P&(| zq#LX?)Zg-HQMyQXC({+31_7(gcq3zrG(he>Q}VUjJrDP?H$&xwQy%vLFj%N)K=D8M zb3E3q`SB{0&Qf#H;4b+kps2LbjZ5Jp>|AV#;@_vMGMYn0Z^gx#|vX+7u@6%R(_7COSYR{DnaMwq>W)8_^ z%2_k56CUY!p7>ab2D`@=8d?eiD2|XFrWE=!HlBx%&Lurj^$a3Z{05JcrbnX zRlx*$IU$&Tt(V2~kNZJ`%{n2pdo}={(baV-dX<+3*tnlU39p4_jH~GmvG18;aO1Vc1xw-+V8OsGd8_gA*d<6l(syM;QCDetNEdOCUCfoc`&Ban|j7J zNA{<^_m%-`QJpn^lxdme@Q&u^fAk5W3hod2WU43d3T3~7UMLj#o2VfEG^;UnMvDM6 zuh{snOT<4RgINLS*LV;T;a&=>&&V00Y+xF=pujn;X=aCpxuGiO=Vp07&f^PJ%LFN- zo0vfZ7D~#z-Dwx^%U);1bFpE)t~Mj$^lvef6CUzUZSzEub3)`A z_8Yd`(NP!?LT$YCrPMdY@UYbnRPCx@cdEkcC#=K2!$F+yq z?vii$+u16jc#Sm(+|N85C{^7>!A0%4xAt~|1iTN_azX(g5mLpZ=0Xtsyh|V12gh$K z?Y5vl+#uj*-@lI@NBNgRpr2A_M(M?P<{mohB=02!Q=5R^jU?YnYY#I#ymW$DCcssw zdZ9}luYm^R6aiEJ4*`QUs?#3;KbUt9VB|Z$i7A8$4txCp1pCPPVF6mvx0 z6FLRxE+s}VuD_O^yG7KEzr}V0PvF>jzH}>kx}**KQVyxmcSV66^L)w%yYiF6(p5x* z5_#~+jbAoU^yNRU0+zEXD-13x8W9hiN$mCDCA|KMrsa&s=9F zI=S7fS0~@yA$$qlAXVLA8?q%n6AgOSga`{h+QE+pnH&u@*I#a2jyvxd`1>=|~kV3Derq=NF9w=Cu4i?UkPc8yV_3peePwEn@`< z&M)CX3zRh|-O8zH;GhGb{ipu-nlv^{F-D$Ta7^;2-BU)>^`5-HMWMzP8!O%{J@rWl z5~a<_TKqtVdwi2ajF;n>KPp?cBO!31>g`gXoZfh+2G3q3<8F9p?D?He*NP7Z3h_r} z-od>D3sbzLi5oknJB*gN#2CLC5clL~3#BisSuLxJtYXp;&sNOw%vXM0YnTx~_hmYj zNneGAM0#Mv9s7V|qS*lrRdH*Wvb8FFZrH*&+exVnAi%|3#COOg6v@P?*!g?Uw~tav zO6h{lFoUqasF$WssJz+tQFUvN>Zh@Cjpw92BVfT2EP~luMoE;c&Y%}4GtwK{&k-GJ zK_4brtQW5k|2Pa(4?wn}dNNB_V4lOjbT&xRc-Je0lYbK2I4UBs_-o?Y)u?07O_$>u z=H3Ka8S?&Y6Yi{bIj+5tQg#+<6o2r?FGo4^(_!g9xou9~+h)e6i-kEu6&H_-^1m6f zS@;80KCH&jZ_l#_4^+gJ zJhA9`^=hSkz}7|ex25~B?w6fIH>5qbzU&U343^ojgl0^qL;bxC81t=GPH5$|3M)QE z;sy5j-j$)kae3za2D4RVZqGIJkeMi^HwZ*`WuK}JR!2$QI0zwHYoCAM|1OBiqV0k$XlUq2OWl7 zcopqEO5&#j)AeYBGh1~w`pJu5AZQV|2s}=E75CfJ529-n0Ci8R`=E`b`4y@@-K}A+ zQlw!=ODU1PUu7Bjdk=v%HJ|2VoBM9{=!84~S&>&(YC+x}5M%t(0@d zIyURvj(OuA1 z$M?`|8X0;Gp(3!@+UwR@!kvODMa@40+Fz1?cCWaiCyzUH0xpZhj1{2=W$P% zk^{u4SetZNA9X*ksc}G?NN(&J0HAm85#2*mE`_iZnt-aRf^Gbli;;s3?CS}V#R-Dd zn_|b;+V|Q^rthy6e2c^vXJ^`m9XB1lRcspXA>DyJyRkQ5xvsOJsn9m-KnB;BpFQb; z9xjzD)r|^cMl0oSNL&0@1yor&Xk8;g2~XG$BsRW8#E6a0Y}hBhLN@u^o31Z@p<9>$ zWzSo|r7h3q&xGKksu(q@_X%B)^k9U{7iMifoLAAVMnX!tTIDJ{EhYGM4SsBJxR-h1 z)1lm35wcQG;K54w^T)O#H{_l~^+fR3d5Wfnw|CsaFX6XA7^~P03ta0=1?t$1)DRLNd_hKq+Le|_WbdKhAJCmrj`?T9WIt{M ztg!yRusBoyh&Kn4mD5CRTSx4PvmCy$2dC$BuZLeIifcoglNVE}&K3rh%wjMxWS}w_ z2|e7$O2vb5!$IH7@9}z?$>$IxNZ*HQ^!bVA5JvmX!U(ziq{B>p^K$Z+^F!MB4;u?+ zPz9HGhc)iM4@P%(*i9?P0*~Do!)YhG)8qur&>bti(kvH>^DN3NN75bu{y7gXIEoDp z0Qi_muj{hQpiq(aZ>~qq>`SP>#eEa~ES1^v`T*hOWNiAOa0kqacQ-O#qf;|Z%lXmz z_JHRoq}@CAJjOQE1J&ISnkTo940_fX98Fv#zQxmJ&Jsi*zUp8}i=MZ*YLj;flREP7 zD82pl(tsh-6UFv+(;rgtJ1MQ1Ly5>WC)m!*F#dYe_4f7;?UL&U^rj>B+aiTXiF@W| z__WZLnNyb!;t&ckBNEIT_KY>^F7yR@XLk*5{XodrJZKFc_ySK?stX=@%mC-8f3yuH z9A&bsdwQ~4R7&YctvioC2rJ!9ny20eJGaHK@=M`Vdj8aA=!P7O#+d=U`YtMQ2~@ug zK`#DUq{f$PKF)d4oN4ap{&ls1-s0jZ@d=3Pu*O8rumuo z6|CH0;`tnxBEi->qus4g_jeg#X3EOb#6>(#t0 zFj*FNCk}NSGJQBj?CZw1t3|fOsZflAvrs$ji5m;^r0?9cZWafMFycv4YZEg@Y~^q> z9s6hVNp)uwso}icj=La=Q?qFf&NfB{RZ|8))xvU_veuWWi!!Y%&=RH^M)L$1u()F_Wk^`xB1y?17St)Uwa{aEl6 z?Kt#oIfU)XAmVJ(+i=4ePIg%udk%1KWCkGhEY1skQ)PMD=2(gp!E*(Es2#z|Kg|jS z)rf6gQ3x5^9bBa9fqqX3a?*yvv8G5Jz`dh@PyPaOgE#(-oUGsRt@G@rCw_ecv}aud z8}6(!N(RfgPx`Pa3R$uk(Lsd45Q1hCyE!~j(LR?Hp&|@0_ zsBpA9Na_}pEj6rqX*Vpi{rTo<(C`j`XNVj~V6ZUwW#W4|BJzRO=sgJDc2w)9Jae3o z$~4Fy>6Mm70+y%fT7*dxU#N>U`4T=MEi~qhu64R*=GuL!1q^G&x75^6+uz19tG>an)-t{8 z99qD*O33jXMq)67+qK71=EPwZcH=;-qeHI`I6-K(?W(`IbYgdHTQ zs^4PN_^4TD-XOx7poD=0?>Zlz4FhV@fxY&0kW-75XG2O(;9N{4;+Qc;zhyYZE~H9Y za5eo@-iXtiEH2LJDl}dc7CO)XYbBm6iQzpNJg*N7Sx_3<5?}u{7C=E~I{D+fMo9xh z$qrf3_@9Gm{i8ciR19OK!ShRk>d)GoKBVL2G)WV3ISnGh@LyJK3;KLA{*-qjR0*R^ zea$ptdqDg``Jvts+LQT=x|0<8yW6VK$NdR|9EI}GepuNUMr)!A>&(q_zrKJHIOadH zX>SU4ww;mIufOo_bUgY0w4~DiyJ$P$3hW=L_&a1dPQ~7or&i&A;mFvPD3;Yaf>K;Zudcg#0w`g>gf zETG@tG3g^p@#x|W&U?n<8kZthc8C3=ekgS}CusU#I}QMA47(j*QGZmvPMZ5k)#=JH z-3zjRzD$)Q-P0!3ux4^7%s(8fXhUMe#7mp1ZG1!kO}z-`Q``y4H7Iy?0i%Ry1As(v zaj+ED^pix5ory|ezr{9keyDiM*6*4Y){*&f!AXIG-tGW4)I)E)LWZAwny3xR5IDxn zY|S|&$`d+}x=p%`$@x8QeOO&7eX>#tzzuJomhp>-h&9T+OjhQOe1}YQ)o2MH+_(p8 z2mQg@XoKkJT`AjR;IX>4$De)EcIMSMX~Mp?NEbZ}c_MrNN_mu(8+=N~eK_ppbUhNX z@x?xDwz(&jX}P_m#NT)wba;v^p_tRP-VT}a8*_Kd^1cXHmsr)votko1eo3IR0EB0r z`*N|8M_U%$P$){y_G97G5<{8|O9Q%Xe>ydxzPqC#@#(z_84N@I12(_oskCMfd zp>`BgxQLYIA*-;4g-4{JHDhc2i1g;9w9QXWnb|c~KLkdFd~1jq?vs1s?3@ECRo@g!OT*BGzBlJ@#15t z19F8yA`8o~K_soB8*loX>2KO`x#0Pht$$7@<@$T={T;h{*A4pa!Jb*`qvr!|M%Dlp zd$9d`Y;D=^{aG~HM~_S6#br$t6IhIXh1n}_ABmtB{_&_>z0P#X9l6*5PCAQRrF zE0TTd@b9i2th1Y297lW9PX6dXqF7w5cYCf3Zfo& z9P*won|?Nmuvn`)M>|hEnWb%gm8gy-?t6-$rjikxqxkVTRDudHrdGNPaaYZxcD#X7 zM7~qzz-}MrP)Ln{2=YO+vN#|;{fIq%TBYaJiBIBhvhnjgiimtYtP{}o%yG7*_3g0W zfYRzPUco19x0h~Pz5KA`UqwXhB}Xr^#Kt9o%n5J^K2D*{UXy(FNg>cCd{Kz^x9?c_ zseeLJzt^NtWp!gUWA3u32FRzy$BGxnu)nBqjG7+8DF@%(Kymb4~Zpcemo5wP$7sUN5$mJKF$e}MCzU+;HnZ;_4@vy z2U8(a=u*b$oliBnp_^ms*$75^xbSiibi^PeNr=VaT@UQA6G-nk~em67P+am`cC zp>#kDe+CvNU|=qv--J0NWc69}yY_m|!bBJ^>TXp%-z#DEPJfg-$x%{eQ+u?~bmn#h zA@22kS&Du;RAE@ZWu03C9T8AvTPKHl53D{M|HCa_7~B1Y^Tz^kA}?}FA4yy=C7uFp)Bu4CaC#L^*f;OoyWP_tL(Ev zX3Pl?q)!z!ZQtd+uIW*#!;j?4X_Yn*Ug!)th)YADrZnn=S(*@bOXFj|YO?*>>;CwB0Ij*Rcr9Yy30f4Z`RGd(X&~g3N~~IKNgtR zYfOduN0Kf(S%e((BbVmM6#F>E`&prG`|`Ewl7U}W^OtEOd&gFW1r2NR+_&O%Yl7&V z1-qMXY3}Fsz4oNDbtIMe>sB8o19}FT-p@T0Jfc_(s9D}8C!)oxY4-w=boq6mX)@67%Ii8U3Ooq$W zC>xe?>|b(fN@}(r@@_cK!Xv&ZIM+o|<1fc0doSjnk1W)k7+$#dT^nkA&31hLJq6VA$B zVxC`nax`y5{%~F1{j()kBdisDszoM6v>5SAi(mKqqRb{O&jt$ia9l*5pMTl`mVhD4 zN+J700d!gZ&8pbPIg!%bK_B{_Kdl$oivtKsLKE=MaQ@%?IMd&b1JdG80v0+G_cT~4 z*%G+3-c8@RjGgleJtd8!7S#~wK%4oLZ9y~8YR2b=K#CI&%;wNKOyD+}GigP;oNUiH z;ZO0y_k7+jo^-Pfbr1 z)Rawi>QC46>qi)jf3(?6l{dNh`+{HBsn`c{f%+=8p&?R@(co~nYZD`3 z8;{NgB0Wfc!^Zj#fp^YGC>=)iXDmfkP~Q;k&A(5bu@LGiF2J#|Oj$SYyEeGx#=Cm0 z4j1k24jC1mdVl&xFpRiJZBmzhp0@q@sKTNEL_aPm4_RDOXkMV5u8lb6brM-~nC4n1 z`D%ro=v5b@7{}5p5{Q6J*%P&oW{|7BWaLL@=mH}`VuQx7^h-qQfM%Yq~#6hX&1J!AVp(CqjjgwfMZKVid3I8 zFHm#A*}?7~pmjmv!OVhzqm37nttvjd;b8g;>h&*~Lm4l@7}ZfD-#`zRiO+6lRQ%C% zPK@OdSFvei zn!SW?<4iis?(ux?H#L`Ve7dj<96#J3GgaM2`%5RSA+GD5`3fDXjXQC>I?!F64K&M# z*3ekQ4rafuQ$NqMZDvJDa_uHN(M*WTmMiCk>Wei7G*rGKD~fI$g_nS@3ligX~aJ2@;YVpQDVG0H0e^e6|pJ$q9!9sW1 z_qsPcM0$cjZ}d4{@V2kceF;nktnjYAsZ5NaMmsO}4e?%u7aQ`{wIBMjHB$XIC&rf8 zQKoA@^{da%7x1EvrvcqdqhS7CrqyD4X2{h(vn&Ov+rto!((8idx?-AP!L*KD$|`vf zZXSO8w6JFG2-O(ygwX)T<{);-gaR02_3d~yLfe$`lT*HO2RlYqej)G0olmD-O1*F! zw3^eL5XR=W^-WLixryh5{~J}%c1y>n?wO7e@xf(jkivm=hoPqF9<;Z~WqBe02Uy$m z0b@|k=_Ij``q|KKP|;ZZ+g%w@AjSF{Qi(Duz1IEZ4;jyyYUiZ+Q9-jC z1yH39<9Dk-dsv5CRLGqQ5@Hj@88keucaAJ^xLY4BYy{naTY|qitYkVc?lsK23j3XJ zP1Tua(AI_~1E#YxY023k9(?$|pcfjta=nn(iUKsy%ajpUvq1;yQBD9=N;duI?Xd=l zRwm9V79^SdvgMlJ8xm#p2!KvV2@k#@`Jfp)xgN$jXI`V2R4Ox)!R?9{!OB&t!MuO} zv>yJarM8iB5IKe}0Y;QSn*ItJcKr5vq1lG#i<#;01AE4Sjox4a^H<2=nv-fDKb3z^ z^?gBRqXoCMuqT(KKGx%??hnRMP`C0Qt-r%q^YhrqB%R5NtJid+esFjHgjtIE#23L8 z?>3B<7|)GA)JzlAU>3wk=`04te~x;i`)Y^xC4rM^{hOyw&c-l&trXp}^b0F*-lclN zJc@Bzx^%Ru<@_71dg%3D_z#15QI?<OCJx#tByPDUuv?E=G2UgWP9gg#A`W{&DGm zgRq(o%23L_xew`O7nG-PaW9`OXRpcwNMfKS&Wt~q6 zY7W8f@CjF5KPVPvjZt^B$JPvAMLrks4)SvQ;F+It)M78uc+0imAF+4VtJYw3^%KKR zosdfm6Y$2#Qnq~Iq^o>2++vg0(|RKP1U*kEeB%1Mx1Mz-C$ejLG}BCVPe4GqaS%nF z`lH#<_8fo6qa-y!O#^kYNg1U1GsQB1paxEWM0Z;YK)SfR0;8iu$Y%_bUggQO-?P#D zUs0-kYK?ValTuAWZ74`AHOA!UH4rUv%PFsfFGN@n{uN^GXX?J2@EGR)#eQ_LF+LF= zU5@d21f#|0X9I07w!y#upJyK6X-GJap~f}F}FMuL_^V%FKgG3qQmf_0bhZ9<7)Wx9<`|F^Yh(R zF|zg$bheu7T!v1JSe#}Qy;iS`o~JyWiLhfhahb22xm8v$X2@)hiZ3YK)XYT85%%&O zQdKHVIvcXzye~Kndh~ge?s|4h8L5^=yqM*>q8v4t8&^%L^(-3zf$hIkv=p0j@VmFc zA98K<%YI$qh||QR)z?1ey0JBV=bIYfbANZ+5L2_9`bMjQR<(;M;SeatUEhcJI=V8T z2~BCG=qWF=9hl^ilc)U`hZ2K&lJ$_qfz^yoOA2--a<8M(opb!}VBlN0*>XC(h#$=T z&X+}Tc{%Tt4Ja4eGHmNiaiu%4V!dH4G}*DcTpG{XD1jYaJ8!#!aB98AFY=)-bX+AaT@|b!6)V+Z7;R~MUHdpB z{|>+yw)7mh++6G^ow2>3GkM!^=mSh*6lu4+h~X^# z$t={RK~jC`hp1+nnvXeoi%tD^N`UWqvv(A^_-~O-@ZOkR@aAE#M#AEWmrt+`V?|89 zpxZ3-eLFNHx=%ahr)tPduvpF38Ry@DRf+T5EJ2*i3mbl7pBw(Q+@uJzVzbiCF)!^X zr}<`&PLxZft=WaPXD}9Kmg|Auwvip6HjlqD)%>B2e4fTX%-1#V$?a1%3fC?bf0ce7 zuMjOq^4;l(e8rX@vi(E?YD=G7`okTS z$7iZUF(N}&xLNni+UBX38qN3X>>WfD(4JpMYhjhG0syY@V(D#I5jpt9y4%5E+h=={ zugS*O(Uw$oIDcxP8V8b3w46_S&te_$N=BoxJ6NW&SvNBXenMjG4(UNN`wZOciw>NO z`el#A2#wAQ)d!xE0=___l*uw0;3p^L{xWIeky9nS)(5cqNZ&f;d*0*L{RZ??0O2Fg zIqz}+pKFQ3R1Q}lOMG(Tgw=UM5N|IEH}CbVDOf3LOun(oq58^VzYu4h9lZIc@fgr8Hr#PmG0Mv#f~~GAfhPP8Vb(^H!CpaVjayNn zixtHEf~HzV;_he_RMb~}q|}Jr7Du*b^p~m*8Xc`P?mFSCtA1Mxpj?-LwU7&{dw{t1 zzY*KmHIaIiRZLWX=hb@iYY9{Fpd4}WOG&Sy9yv^5bi+!A`l_yVlasM;9!L$Qw0!uI zSo2xH?9&{ZXU(>GIAC~US0rcEg?@Yl*2^)%qo++|PNa@xPs9jQwF4my zY|ZxI41q%kKm4m~ny}90jTHO)kuwei|N9npSYLtiP6O@*KM6}Y1w`9>mCAU)aGzyw=*AIQ020edi`bY zZ@ks7=FK?bAe27bva62<9SlP-@Ws9AW>+_T_Qoh}^<{I~n(2f$G6? zLD_LvM^MLaY#O7=;PTHi*G3Y>f}|SHr+T*hjNJR4`~@PmiO>4=W!LjW zkW6bPcpagvh1n<@vZ<~dJGTEm=rAd_BM0z1Uju=D>gTlR^32E=%U}8lCY{+;lhneIDKFV?9&`|JeuweE02Y zyMxIiw7i4o6;6|HcbE4Rj|;r4cAJj-s(p7>zc0xiQh|gPuZU-#Eut-)B^4EJda&TA zeHt6wEWas&tCU)S#}du}AYRQO;7s>UmvGH(htwM?NM_S=;gi;DB6@mFm9JcZ z7oXzFMe}fZaCKKrT15C(#L&vc!@k1sVVv-cutZJeK&@QRK2|bb=HBxz_?6XU%+51C z+aA|gbg1C~R`u)oBy;?=nYzx7?hAomyBVQ8Q8#ICI z6{E0;lhl>B*`B*r9p(MZbxh%)>(Ew1(LrIF6Z7s3UQkGdIVpfei5So65;3idSt0)F zohZ1yDo?N&0b+|UWt{fOZ*33i)(0G4xBknKt;Xr?GW;tqkEXu6aDsJ{aR!peiMl9j zvh};2txNI=X!oXr)qI97Nxv{##rX0X66bHak@Drb%&HjJeKCKaPZJ5Gf9SrqnYzXw z1ccp)xUFpONu~yt8BNnlXFp{jc6!rMMq*APno@={`AZiv=1pGC0p4u4!=>I#4dQd0 zVI=6>`!~RmtgnDhiLUaA*Rp>1Q~`=E!X?{L65l8alwRixmr{2Odf~&JKh)@doW9#q zEMM5`LT@U;W^W5>O*A;FAEOCPDTvMS@gXR)IILHotCz137xJ$wzs6g^a-syqy4YD7 zElbp-Fgh9{K-l4!t;U}M!uwHsGox2@;OX6Ga?IxM;gsukX4Il7{hf-R1Ro1MTcvZq zw&-k4eSdVJU_(y@d>>l2pXp8N{zy(?qBKq(Gf0aZq-&_K4nHSP%VoVATT`#QLMAaT z8Cxu!o-EsX|MGx}YAa0$K)mPwlWFvd-Q$#i^)h>S!&tGbR%p8{5p35c+S?kdG)FO} zbtuOBRE}udkLp<+V@w1Tyq$M-s$JyU4XqU1+Y<)>1YeY|K_S;*cddNL$VzIjQqaf> zFhg3|zR!8tBUt?Jb76N8^oupY>oy<`h|2uK5h=aPLA>>&dVq^#yvn3+rEotMC?wO6 zD($et;f^I^^$Lz(SF?2_db5@++GbOx0pIA}>v477?a#1Zm0#yam^StP`KRNfU&}jd zIsa~l;08enO1$vKV*cn&Bcd2@Rdi%i-K#K0>yi^|Qvf5C+iK<7%hw`IJzkWd(exNj z_%j{b?3qm(wADW+U3y8k07o#Fe4BPlQ>AlMy4%(DhcmwFsi%o~ZqLQ~&~Rt{hchv8 zaW+B?X?#8GzenbB+S#$gLi!?8JRPKzMX~&5J>Gi+PQ=0me{r?I+iHDRO#cJyVS+c8KA*IXVsn-+D$p;SMZ(48JJ;E~ z(a_|h!5J9raCVne)%1v0siAs2DPn6(CHthts43-S5w>}sNwEsa3}EZI#Ek9qizbYB zhD-)d`AjA^G?KovMeURHTl)R{=IRp4yiv!@^#+$@8=~KI(D&CrttGk6zGgXl;jioO zlMNmuUW>VPJ+a(v%=GUuLwmfBNO$~4HR;xe!6mknuwdG%yyaxys=t$OR{Ub61LV`Q z7!j-Td#~RAX!-cSQcTw5n(ha||GiE#Vfk+SBrJS?1pR7$d&(TWbZvFLs&71mx$o6C zxj(VrhxNQ>E2M2z@rLn5tmgdj9fPb!E#R1ZR>termJBtEsSK4vETM$WX>huUrteb4 zoMYzi#H~yca96X_My;kLeIlpZ+S52O5T`8RmX2Su7g;>^#PGj|)v`aREM9gCY(^Uw z-7dQQG{T4Niu8RG{j>bVXKC5#Ul<1vzI{_@Es23I4IO;Qzis(fFU@(8@Jl=E6$}WhSz(^ znKDu+1yc>@uiQ(==Z@R+2y~1l&ngMvM?s@Cx3*4T#f|#}X1ws;rN3R&b1EK6FlYt?H#UaD(2ipovo z6#{46%G$%yJRfk}OZeLB@^w$17YU0vSq*KZZcz<3FS@AJNsNMj*Myho^NtC^`Jkrz z$7YcAV|sW!QS1YbdcWhMT_cafJERH1)?|sTx>mJv!(mTCKGg-ktHJc3EcUQ2e2W}Y zLyc-~&7^2rX5+ON-is4}v%jh*osZZdK2AQ5e$c}ESS%B0~h|3DHIVC$5Ya5X`1F{Qxk=<0cLKQ=mR$etQPTClEbRcVMbgH zog9d!eQpw;)`XP?2s>?Nt_8VO?q9=Wi=cu&W~~L;jhUfsDtj;^w2*cZueaqcL1g^t zv5`7wUwXiWl~IGY<#kz9J>cL_025$f9y8Uzqi%QOv43TrMI3noBm?bDkQ@fNxHjRp zo~5_wj1;_8^=4ad@2Itqe{V>*9YY%*a*~+(h@ddSEq^>u)s($d>#!Wm*yj~_&~%t> zv!XRE>T#s>nj8gh_v zn;3Gjybe16ADbV(hqCVykrotr1ad3`d^aqbO+qaGUNeswc!Je&CbO`^KYzM(irz%3 zDbXg=#i1Stc|Ae80fwJL5RvOkD6{_EORqzzgu5|uYLaqab0;vL@TL)_5x>tR3$v8u zOT9A%ZUx`AuIzF8TjoR0)vZs30w|9i)l7Fe+VawP?{EEH{>#()U`D_Bx{;QTK&OFV zbw~i}k?<M9a_~OM^+nGGQYXWzBLSx#ufrCg% zn}FSg!OjxYqcNRT(XKERh!|N63f0thRExuWlqUCauHqFQ>aimv!vf|KeaUS#|DJ>8 zp8K)3rQZ~~Keo$Y6BuIdY@aYx73P9~yX)d{@UOAi)Wsm`MDF+;_P2R>t^ZO~aNkah zzi(KU`EqA0E6-wGn!jJ|UCrUPmSv7NLv6!ig@()9)=xc2+iSeg%GnnTJ;I?qskUpH z&g>hp8r;eb(K!|dv5jcXS}VdbR2U?+1Z*r%sX;pYW!}*xkm`|1d?v!t(6VuiKobX- z-N`?bf5z;Rq$*3-W64VvKhM=}Tl|!JW`=$-T@rcY-KC<}@T)!xIEb2;KwCw7nhuj= zucRm35{#{FWaw9xj9l|un!L-OC8rcJD*{EdVdzl5)!|&+p;2F!g$R^3Y__sD?rAh$ z<4Ne%FHqzsxJ<>&w}BjwhG&PPxVc4OYHcEa%^ze5+f@>Han~nQ0|<YRO#ki8iG9$foZ`|zxakC={q zSE86sAGI^(*W%H?#jWY%c3!|@-GRuF({zZ2R<{c07&6PIjsiT?eecyWK;X-eWNok6 zsv^(H+rZsutZN%KeUi#nZ zCw52Sy~T~P(Mw*K^3fpuM#HlfUsEmRNJ5{flgI@AyWZc&ngxD|EU*dS!D% zfZOKj$$&(_$T0*wqs0GN$yRrSr)7piBxF3Rd#-(VVi-9e`ZMIc<$W+`%!Z4Xmb&bdxTmWJpXy)~ec-!PRpzgnp)6m- z5I3|v7>y?MlM0T%RRnZ;Z+p=p6pJd*iaf+hH-VbP#l&F5(>Ah3z;Ki*2#}vcrxQfGh%I` zzbhOJKiMn=Y~HyH_t!<#xu7}g@?Z0z3R{VoAnkTYDmIo^&^n~;L)Acnx=40fv{}J&p&-V4qI1q?+nT-NIkn?;ngV)i&mtJ#2sK*EK(W6R-YXx2`p%}T zAkD+S)vXK#)u7-PGPgF#Y2-_qU0Gt7qtK9(GWg{i8bn=hC~ zD8qmkzg@3Ugz4-2QWnm0w%dREK?0KpXasLJ_vFLxtykeoJB&rO;LH+PbF+ByAF`fp zDT_flDw_Lix(V11sc$kEooj-A_^bT$La@r3vE9TZWczpZ34ZwdMQgD4ZhGhugV_~& z#H8YD@;UQD^=KV&Y@9~%>HLf0qFiq((x8A!M5=T#i|gI9TX#c{gg8+*1wo)v=!wyh zH9XB#K`jh!xVZ4x-`d3KC@bLRW%V7ePCBboB06657|8}r{z8)=WtMrtj^?Xe(Cp0@hQrjAViE%J=^S@6_5dM9*qvlY43MAcm<#O zye1)zXK!gCJ(C}S^Qd?;IHFXQRjELCVouYNdeM`E{~;!nvRC z8Q=I>otO=us2&U8x!Z?r0UNd!WWfopnh7Hjcq5kWIbmTx6Z3aEbWXq009=>DX`khA zwu}39M>${FV>_1{&DZi`0{>}ak4hfNw9iGI__%d+VPf=}F8=^!+;lSt>~RcD@{Eo1 z0Y&B{C@xh%k15uq-U#ql*hPFP)EYP$1UWG-4e0N4$mG_PIE<-9jEW@fEqg)-V3y&v zkc9&!dIZL91cVJ-=v?iXYM?#3Jf+584^yG%8TB0Set3_-%nUr= zS0>`sFmxZ4a{&|H_}w>S2y&)psrN1(>zXTWrLFC|)?#feF5#1<<96-}W^GNS&^V}5y2eGnSXm7_I5 zP4$h>P4Cd=bR8eJz9PxU7->C^qUMZfhmTp|iHiPy9dEh#g=_147EC(Op7t^g@GVq+ z6Ylt%4f-L%CDegIAa5BN8ESe4Qwj8Cf3{|LG>ZF?bss%#W5V!~V=iU>??vv4v|Az> zkfPpT4%vj$w^GSzjeVwX#+82tY0k=j$$0!)d(QR{UeMiOhw+n^id;#;uQ{EFGX?XY z2!_3YYJ#=(rdof>&XeDSgHgTYD!m+X^a-XZS{S_1MYkaB;-=FsTGspIa9GPQ-spJa zNHii32eQ_}iVOMp$Yywsw_Veq{A6$Or@(PUn1uR+PxPJP6xxb(A$xKAODEg9<%Lnp z*qju5JW&!%plTK_CoW{E0N z=hIi^zFD7fGF1Y*AK<3#T2uUysv7=(i2C+;ruRSoE=Num9LI^uWtDSCu1jGqTQ}+A zQmH6ovXI<2cVFx`KtuCdPt_yN?J@aYn!2C6%k`Pw01A-jwDD66I?g`V7Q z|Gi`X{OnBe9Ux3A?ED6dTV;RWKCMMNu=I@iA>7*MPgBTRu6#+poN~W@eY>6}H zP7=#6>X6Ui_Z1g?)Xf?$0z!~QVaG_WD47CU^{mU-Zkfa7NI)yp1r*)2kE+P@@!b=0 zL4|siZU@pT?cr;KlMb_OUi6mOTiv7;(RfWmhg*!K1kj<^wCnBR==hPH3M;NS%(zhg z5Tx?GL=pMbc4L_4M>fs<35&oTzY^=@2;B6DZJ&MC_&qo^Ws~} zBq!uWcwk}nFP;+lWl`YW^sX4QD3hOGU*tC7zdY7N?F6DrJAo+j!#|(y*ypNF?0Fvg zVdMsxge^=Am!U@;MT2P!t^3|QetJichZ=hr1s|1GxH=6MfA zbQ{OgNa%m_YL za`dF*C1G8Ta1syD+bjfA(W*OC*sSg0Xko7)fU z3{RaSh-EOPe`cGB7yg1ci9gNkd$qy8A?08H>JkJs{mD{^t0YcI9S#VAT1KjB@0(Jj zX;32%VOc*iSt+Y9f(}n}E9%nR13uxh(<@t7V ziS(h@=60jj>h{h$Ti%x%E?OFC+_Oz;lh-?F7Ye`?KTBQcl(a#~ zl(_uc`rTSY!#eIjj0DEOWXUQ8pXnYu<#mi|0@ZtNYWpTr-0#VR7k{}~wl|Lgfa6I~ zZ}J*4)TLN7yWlezA5fI}|MLQvYMtR~Zio0+!!ag?9)1uU0j5*yA^v8PfL@YQ6xDf9 zc5Z{sgkQv=W7vM}IzdY;uvH%pP}dA`TnsHlJw9_3turMuj|P|8p(>?+wZGy30$a=m%c-mUSVe zr00JZ&a=0H3g+Dn@0YnicmV=TxmAO)20a!fSE*;%Mu~1m6O6x95Ed1x2%(Q3JBD@& z6ixj4qgY>ijh%EyBb>RC;kek?e#Gv$+-o>RtI;q^o9XB~b-lRmgXLt0+ByUD#GS8%q==kZ#)%H0KutVMp_jl1A@cJnh26M=F#-n*&Zv*G&v}Wh`wkxxuFCytzHxr*PU1sgvi#2oEtF-R2UCrr+8J!g@B*xs5 zNzu?7aHjtV0}1Iv>2cMz-R?RRpB)z#U^PY#uS#2>S|0KDySR zSH5xmJp@mV!LbGLh&Tx=C7o;uc&#SJe`_NbYl}UWs;`_O%VsM9cvWHHA)HtZa}WH! z_&%4tQ4@FRQNrxSY>&Y&VTtr?yZGRwp7%=mNR{7(gOL@`Wz3T9v=ra5_c%Nead)}A z%Q#x!@5?9I(!Yk?iUUEj8%L_+R4GhUhH|BUAG6mvana2>v2Hlvi{xJQ=_>Xg15F`( zz@tus)+ym%duyNTll3p}24p}ob!OX=eT&<5%5&>8q3g|-mj)uAgOr0;4Z^&8t_g-7 za4#`ZHY^Bw#gAayRK4}*jY~^jI}5Q;DfzD0F75RG8A+>nIoMS!`!Vcx@?A>poWKV0=2A&kqQ_`<3)&k^HsfoSgpzF>ix<8nS zD{~Cu%I9Asf1scmNJcYa@Ye*g>{vj`CYnuMx@}bd{ zKP1jVw6rFGGlsNP>pmPhpb50Ush32Y{7#|&JYBeRUsv*;YKEvOCC!)}Wx6V+6mt*r z9_*J`XGu{H!=D6a6sbE~imz0*45lDoz-=;UoX0p)rYG0Z&yWo^NebpEDy<$xU$(Kq zjyk;1H79=>wvx*`qa$7H{t-0N;?azfBhIcpbC>De?z9^2)l}J@RQA~7z+~_m*K=PpS{-_DKV^T{*mlU+u$Db&$vM}s#X_F zBEwm(&im$8I!KJ6Nkhe^y448>erviS8^ws@Out+?)urui5uxJ?SusV80VP@go5@=g zXxRda|7N&8V_|I7^vyz~Sw72(fHN<=0U~kP+@-;oxs`^ZEz28kng6i?06^MN&={9l zKjEbnnAEs@<<^<}+c`vSLkMalGgkcEL-`wlYCDII-YEtkDfxdS9pK&zTL(KxOVmy@ zW}QN|=XQD&&Vq_P&Vb_;mkm=wr@TWb57Ds>OS7&aQaE}n2?e3(@N&q=^EhN`0dZD# z^JU;KT?dk8HHPK6P*HqtCfeFE<8im+rYNph?a_Z;Ht^{uQLZU-DZ_TUTRw+ubT$%7 z0pV*qKCflAR0iKa#CQsCe%W5E*uJq2D+n_AOc_#$bt$c!>`ws6>TK!HVs5)lT*2-W64y4tA{M zv%ZFzwl#61v~5NK04LAg1JIE%p3pPJE=7YUHn7OIK?C*+qkNOt2cMDMvVK|t8ZpM^ zm;u!UmhE7MsW;1jQG6#x6K%VP@7Z z?tm>#;oBFRFHo4PI=0xAS!bwsRYi1pOHJyzeID9Y{hdc;Y6p9e8psBA%f>X1J7lD~ zA`nV|j((0Z6U(=nZdJ3J)VOVAu7$Dfe`4UvzGJKE6)z>uDjE-gK>U9V-okFd;*s?m z$tUBzy$k>2DHTc(j)XYO=bzA7YJD*&cVVJ!)*?$LN7HQkakc-J<)?^yE+QVXwHe!! zH_UU$*lreAnOc!80V_7b%sk@J(*)_RICLA@c-lMk_;A%j1%cip_YPHNa)}%n$P_0S z_hhLQxrm8bhc+92QMSLrmLI>};2tB-oHyYV_-UL+4)FxIl?&BQ?u&d&izlY8uM2ej zp1eiR557`dlZysVN9S6|Uw3>vChRu+c_+uUP2v9ks~A#EexLq71<#WXbYuai|21Zm z`|MvvgK|!^B*-^p2ZH6glyo{RChNwVkfY0aDRc@Wpr4m8jH@=JOqW1WzixH$Mv|E^ zL5ZHwD}t5*eAUL%JY(_e8#&7KMnk5V5mO^{QU~*)%fW8zutE1n_r2{xkHLXC0ZW@2 znJx29uCyH0_*nx7b?}O&KLj64H}EfHtYEa9Ee$d7`VdGRH%qgCyl+D9ZHSdBB{est z->-IxkN(x6sK+5FpJH6BcqpV$XjZ~QUizcwIKDNiA#d)z;~zJ#7XE1W4Q4#S^4Aj@ zxi513K7!yQcM$k`e7Bsvc|dwwn#@^2)zPO4m;{%JSJflE@0k5M-OZD+>g?DV$4fcA z?gp}9#SgI_o!>hG~eBvP!50$W(IOEq4FO? z34so2yYXL+x+Yu~xh}%6-2s)xvQ)#e_Ox5=mQh+wotrAYc^TJ8xoH|w$EDm6CuwpsLW7F+M&NY|dk z2#tfcWbmkcS%j65$S#Rp%N%S-O^@4Zg>^k*bDfUM@vob+b!kslclXHK!#n~3)_?hg z6i6~f+H{2;+ztx_fqK;*Tf&)lnPsPyVV83spI$y)*sx$G#gZR@iGEiwvJ!luC(N@f zO)7KHNZD*=*h*MnL!fhgfLKj#5=x}g{YseVTlEs zH=oVBUawdDA7*wcuNM(Zepi?d9G@$zj+JES^ zqBCOmu4hgePxXU-hhyvJoo*qh&`Iio z5^PEmV2huvtL6XEaQ(XpFmMQm!`p11f2BV=SDA<3Yu*8vys-fsN`Tcp)gv1CzRZ2N zf=?I5d%oYecQS(y)_ki+Z@glZuG#wP+?#OLLELlmI7(k6_eC6x7|Ix`>6@5lZx`|O zwom$>UivDZ$%-&A&%t_i=W>@=>a0fPs9xe7-KE0Vf+D5_V4-oLL%HanmrqrReww0F zL8h%5iXlG@Pc*P7uX{9`#w~2ZWgE#_F~>K-3!1hhRU^ISHlI4IrL8vmirJPV%ty9r zbvE3sNnx(2aCGP^`u-ttV_VZ&ztrVhh3j!LSnBuZ5wA`Hjno0PvOP2V8ZN3@Pu&16 z+jS8j(!i(n4Sm2e&4bP8cwA`Ds$z|W5_Gj@#AkYn&n+mmVS}n1yua-^r=f@ERz<6^O!#|%aDU%M4&=Rl z(~2Qc62xtv86;MKw~yLSd441w#rO-l@&hKj(+_wpAc~pSN4KLmQmh!|ifjuj;(_%( z%kTkZPksE|kSVyg6uUM|6+O*fwieUMbukZXiCp~N@HmJ$xtO!Lx^z&Omlz)>mIbTj z4*9r+AnI}#R}0Cyd#mxS;myC{+&IGwlp`=H9JVK;2{Dfm~ zHaKM5J=iw$VqeQA_{hdT-tp&#c)O`MG2uX-mFxXO3WD#<8)^+W5G-S%Zf&eAcx@pl zv+0>^$=FI~UBCCndOsREtoP|Z@Q*v@f);cdVX&)+{2#_)xhRJy7mWDqq0;f=ZgJ7n z0k==tbz~W>Gk&%F%MBHLrv_rWf+-!7?)uC%-1Rl&E8*$HS*F-Xq^%rD7UIddkS%E5 z&gs*H3a<`Thx&FExJu3ShNsvi*9Y*TZX<;JYVrQ)D`rUp^hj9SP(c>YZK_|nsOX$@ zlqJmD;omtq49ax8p`8KyCo?*0&yD*#@kk}l29~%WAhn19Mb2W!uESuMy{6p zqK;wbzURhi+hi9Z8T(dRBQ;zu(FzM*7!*y5R>ptC`p_hLZ7(UBE#&P9ems4X-x^`{ zF`?dF*Nsck82MiM%_=@1Dff*T!gub|g0HJtd0xB9s}e(LF;fsnC0}Q~c8P68*2l0d zi4O!8kqVb5v-ap-*h!H1iGPzX1uWcYh=@{L6}c@RZ_$i4;&&+}DpO2IDt5MI7Dc19b-- zi_j;XOP6(gZ%~?>6IoGpHLhgU+7lcvmWGgLf_7OSv6PrXzvPhIb9++%Ghehr85g^d<2}+inY1f$!%sRRBhjz>dVH+-UO^^7Xx_D_ya9>w!_|SOzhIg! z1K^VkdzIVD=k~CPe?WsCnFR6MB3Z5@f&UbFo}M6-90NX)R@8f57{HG($S}vwe{TzU z^Ud3bZekME3nB#H4O$Lj(ziVrHQwwGwnr5lfAuRf*PqUH4>sp}P7h|r%U!cA#Bxsn z8?FJA=S}X;`*+4yv##*{fvTH~SApQzAiKz_tBuKXBr=p^e2-X5%!Zq#a!@Om3)PwY zrlNOAgdDqQy-mPGnMP8D21IO^Q) zF^`2LWyWhFCq}L4t?!FU;2|hfZ8h+Zg;9bY#hSU|GamSZSAAv5*$~eM-%)Ov0KtvC z>kj#f?ONmB;uzztriMb>n%>E#sJW#0;NoRXUxg==Ti-U@+yh6W=>h4P3I_TmetJxc z+g+PR33jibN!w0A?SqSVVUpG!d#sD_FBXSUMs+KNrM|)I{R}P@Cz0KK7p9=6^D_<9 zQ9SrIel#$$lN7ZzB#`MV8pE6%EphbiN^hs{W#PKV66-@|y4d^)+ilr#60`d86FJYV zDr^!b$IffZVXsLFF#FPWtO`oZFYx=U!2RYu&%OI;2iI{ty~Bhs9lcTH`el#z3E7#7 z+tW~X{in}TAV)4>Ct3xb9W0A!QhZ3G$$_uf#NLVr)WE%C&AbFAbd_mcW-=0r289f} zO)+9dif1zmaRI-II;lsfc^WdhIRX8d`SQR_`{;s`oq~JYU|G`%kG~&dITNI_wJsYn zUCy5YDQ<7y0QFg3%NJfm-_)~nLq}?$C~&~XL}d$eW?WTC;DF+yQ(reuxT3kMZe6w# zNUlx_S4X*9M_x!>@|*0ILt0+MOb*=Ls zHg&IyjEO}KP$#PkdXSe`tu0|eP>9uRorr2DiXxo7dcTG$-VL5Z1I~m&VFg8`ewnYVM2jPGh5=qdlH}A4nKKm;lm}!& zV&(jiTv7D?8mNQYy`U`T-bStoE1gv^VD_}rg%=uCL!+yNj;d-|V~i&}YnLvLDnLmp zg2pw#hg4zob)kiiPSIrpqC>X4Y*7w*^OAG#usFi4%w+t{YqGD4o}iHx+}lU<|IsZu zN9%U$g#i7GO+Cl6H?s&Os|zzsX_>g$-;$qJ4ad$Wm=L37NIO?>W9JI0Aqs9-01(CJ zr}&CMk?s?pY+$wal|K~~W*|PJ1HSJe$PoO9?=DL~7!9_H^=#s~l!VW0@I0r$qWD}w z!_qg|(4KKa5-})b4SQ*v=d-w!R-5P81A8#K>m4*O6D?CgGLx?<36ImK1_1i9A(P-D zf?=to0JhSh%_^)}xGt;XmfDHAI}EX7#_l}~5R)qSH>DU4r`KanRNnd}gzIbhN=?AB z3RozctBsx|2WmqW2QC|+%Zq?qa!$~g8P4i|(?uOI>JMZ0&A_m<2yVM3lvr^OreocC z#VjupR8xJfPS`xkN>JULi-VCp|0Wi_V)lkq66d-MN2f9o8kxgvwurpp>uR`gHt}J| z#3bck61r!n=1Bfsn!Qf0{1-8II67va<#WsJX@a|(Y7f&5`M_iIHqE|btMq5CD3pX~ zE_=}#L4HDGmAQs>HeXqMd6V}bo!^Ll~XWjchvlkS9*>RW>!iZnKVH;iMYDi3(7{AdxADc%iNdu z+5Z+KDPp=JPQILwDWo|D^ zB7Qsp8oav74vfOB`7_G8Z!MkD9(S2?hl4!-n1&4b(0?hT;+5I03H>vC6XL#n^S?c> zFt?3&z%1*bodW)b&G_rO|6$VKPETAhRWR5S0}%IGQczOe^J|O2`q{rHvEpW$=kGUE zS9Qu{x$EzZi?Q^LPlE#-VNzX-Wkf(q0_91yf<) zqA2(}>iK%@eP=j61UC=v#pczEFRd1@eVk8pmcKXY`f<-3f3p`i8d~m=xACgTVl_ts z1Or;SsSTGh{{D8}ob#9?^X=0KokG!~!!sklJ*D@KdsKXo+uJhPHketMFQ4Jb&BU#y?^R@FoEWpM=W^qf+|K>Z{)3PXkqlo}R4rYEYd+1_VV)>of7E)`B zhPhROT|&f2PQ1qrnv%6zcdZoV8GtZW*Cy^@W#!+ya4Vd{Ps75(WZB^o&&MxD7t0&? zsm+g*VeX^VS@AQ2sV0z|@vSOej2_RSt1oqr+UbHG-KwbmQV#Hb@z3u6_El#F2~uysHT&~G<-;Vj^AKR)&s`7tCWLd|i+3qf)soS_ zfHK3k&$Cv)*6L*-l^^*Tv@gUesA(2^ElOEo{+uyK^{{pS0mGnBB!7NU?kWPNduROJ zBRUbG8W`oRpxVwe#)%oycmvXbWyZAy#1ZoB&Rx{~jq2d(hRK-$;&&U2cWG9&)-PR2 zYkCo?V7HJ-gm4p0MnVQp7HS$Y05U5spkq`zr)VTKM2+H#tF9mF|EA&;>ei#7f!pT) zOo4g{xRS1I#LdrAiPZ25W`PYzH(gsYp>*SqL`9|;o>ZPI>rbt?!3wk~{1Mu|vDDlm z#!5ijeD?3u2cgS7bt22GEnNSkNdr~wnJdG*Ia*)VjTE*&vmin+n+FA%Zv(@UkCT&= z`UFC}BXr}Qt7)j|EvsZEbyo(>SYAPvDUF44B=;YZMUdVx=yN(*IL`o+pqWACKEN;z zWV^!+{dic{?T zArQLC@6?alN&WWAVuB7jOXUJhA4GeTHrdqUk&NKVX0BOKKP5%TyJ4)Utz=lmrYhVCTY z!N|5VLb-E_gkQ*^i)|rEd_@y|*tWBgwN}mJY&#vTN2Dt6C8a|IvJlzy=Va+%^Wwn~ zzhQTt)vix7zz+36WQGMaK8Bw7p-_z~3i-R3K-Tjdn0$@VGFidzVoWRTIy2wR4^>N- zmo=Aw3+*4I++%8f4R(uwRjPWe0st6pyby|6w&vmgo71_oLMrX?-#Hul#z=a50-l-* z7wrc7P#=!CjmV8oIgFjc*X+lajIRG-e;(+70NiSa5pDnTx~={L*TY`m_JgP5WG+3B zda>ys>+3j`G|Bj<8`+pCQQiNXN#aGg##krj6KnAjI@F##Z0rRcAXEMt9BMTj9G)JD zRMvFSR!TA1ROW7`Ptbb!ZvzhI!;x95w^RNYPoo!R8SP$tH3|8i^K$ z0|L6R|D*^1Xxh0B_aEx~FE0!M9we743^poB&9ga#q%*!wOxW)*r{;%T-70JI1}Mc4 z>=9)Do0%bc@n3V<2)MjB7?GKenC6~10sFC*(o3qhWtky`=fv(|k68nQf3T{T%h{~8 zkYJmjMgNMNyn)3xT6bw{zGJ*K$iUpm<;SkCkJ8<$sPBnjNvj_W-UZX<{&H&7Y)U%` zQJ7e%?z~{b-RXN~@^<>3ka7*9g2n^QG7OKX?t_mKi!|Ft9e4>Q<4T7NsxViuj`ZoN z1piW2%31K62<%?*^@g#|kY>UED?>4Y63ChWCX!lPy z3*SpG6~pw*OQesy?y{Xz%N|_<`=gG^8|v%}*PuybAWj~;2mpY(ovKj{rVQ+tUO%r6 zY*V(u4Hs)_&3qQmiR{1qvbsbLG<~)CwlZ5O*9PX+#(xz>fy6=HbblP~!?J_}+=f}v z-pOx^viAaV8){X(%J~!DgX_yx1YNq7+3hr%75a5ic8A;NwDz+MRRZZ-?O_^4uG8Dy ztcr684r7vZyy-_TEnG581@|bpx4v49_oE-XC`(G>g;!4Y7S!RqV)9?;XO$b)B_#obR>t@GUCs8 zvo)>`C{nZK>uEtj#|=|F0KcOaEx zS(UfL{wsK@S$|{b+p+8Q57;f7^=^zfOo9b0pw^?G6V{*5@=7t#P4d#d zsOT6d#LgfhN(H;mi*5`G0cgFz19N{ra6Kg}YUi!F9R{&_=YAns`KuXCa8q13QH9tGJu?ZV{zqYwC5pyj>NbD3g zG&FFnWweD)x{T}Swa9!)%Vbv^^|GN~*J0Vie;zgTfG_oEh-O~6wHn!=jj7C8TN6A9 znjZw^7$}o%H{Sr?rQ(2Lh}%g)A5Q$EA~SG%Ql8h<`QKI=qU)Nk7UT5CIMV)wk%&G* z;<6kL+RD%=!hA+n5`%WBOT^;{c1T9orG{@rDZP(oWFV8ipK`Q2X&^;W~)A@+~u*w

7-?$bPvpN~`j1dXb zsUyGuP>yW($qI%7kEvP}egsz4ss9vC%hMMtSrj`(jPg0eViCA81!p0|bSK~4T zCK6jT{uWxtDayeWZKnCC`-Xn>{%`Is->&X(l`{gtpGh(M_&zS(p9d)H%~wcL3oGg< zU3~rW5#@cj&h2Gj$indBD4CNdM)}lzGxd}J#s^}F_bnPR^xzu+dd@f9siWTH2D5y{ zfI2Foh_#eSERn-bf6|@#Yp%rtL@I_5^W=p;9hRX%1I)zX;v;$HM2BMG<3$nR?93qe zkdscaBO+-VABs?N&Kh`X0MElvL)`P{+1Cprq2CIV~ZyKvk2ziWmpHU!IbAAP^)w?#?I2JgLX^L${gF1gUr?LEs)|J{}bTjA;49qyp+Qq zVL~!o9d!jH1zo}5hxiW22Z4Rljox6f_t`P|(_>CEd+Hzc2K>Ukec?IfKcN`D=Xt2Jc2JmcpOOOvLf@X!PUjjC;j^%Kl$ zYNnYTXtuxjnKAjXW&D2*6_c<--N96mwFo?!)K~U53!r9_buhG2?J0V%~jZi=Rg?ax+H{ zrhp}7Twlfoc07c!DKh|JUzsW=3hCJE{C*$F-gQO0@I}q3v*UAXgtMI`%K#4W_OmB8 z$9EvIlOAP~)=9t{xewvph)sKK=0i_34o8OV%sQm)c5=w% zIkltLMS?y*)r@xUBH510m`|Pj!ToyR$FwJr(w$AGB>^`2w5BZR1{#w%1127Z)RvmMzx|GZx?$MukUA}@vrgMe7o!`Z z=ksZWgWV*kGn^_c!)v>MfMj`aT4!n`5zug4iEN0AFaW&pGumgdJ!_wRe5T@kfFPG; z)0gNzDiacCWxtmEjY~Gt${6D<=dpy_z32H8{sto6<`B)a80ew{+ESBBG1wT2-rFZ0 z)iKP<5`gWHZC?29haVHoD72V~i9k%uonL7B;lyT5$`@ZPkoIjTsrs?qm$ z@bZ<;^!J3Nta?1y_CJrawIkLCI^8ILxF}Z?V@^7kj8<#a**f`RPLyd47^MP!(+1oh zT8y|rh9WLLJ{wrp`D24Ah1I6qM6f~sOJjhulnPUFA;by2_ey*%sd0~01-V@+xEGY= zpDlxfCE00j+YjA@ihXZau}*}FR$62uuzipDHJYFsLRyMWmZsdiq38x-YTp=XzkfZz z7tBVOpfdDj)K3SPcdQJ43C1*zj`_j^JG|xp3#=#R zr5bcgVlv%KrLxtR0a|Iz#ub~SmEtS-4GxPTgM9mF#XbhL!<#CiM+?q=v)6#W0hn#F z+YYfS+jXid9H9khzIL;FPh!yd3`LpT*`e}t-k4>%A5(w}lMzvSxjSMOZy{4VYpi*_ zsi}$gjA#tS$ULdP=ir_+<9=?Xb~Yy-#(Wy6-p%|I|G}eqgYOq)98|j~!rJCYZrB{HU1(rPt3 z1s}?Q=>U9>Z%3offZ4b9tyEu(r2GnJi zLVehge*|2jrm_ri*AY26!nWwsmJZmscR{k=lZT`7md!~s>&KbX8;|0TYZq}=9_%)W zyfK)G)AwV(UHtyc7C)EprTXA|A1L~|kp zOs`)yYEv8OPe9yv-_|WcY?Gb%3#2&Ki*|fA02w;;P}UPh-@U&yG)Yo$C#4(newI4t z$Ta#corHa9VC>t4sX30A*2w5%eLA?JaT|Dk{(F;?QPv|LpK23Zq8q#8Uh1cE2Ak{l zAIIh|W^kw1Cw<1(m3v27Hsy%GQ->etHQ>c@S-NAPI+%$Xd@orzWUsFqM6W%kG4{t_ ziP}-4WigG7HRq72n_a@HNtwR*PSKtpHysW!7}9UVv;BbF}+ zwrJ+ID`6RrnMFeDtJU^CCs+<9!=~E9t5D4S?^!S&Dm#Sxy zZL+CnXmYNN#G%`HS0yc1!%R~n!K0{1Gr z`tgry1+b=??Ffo#Wa@WiLx)jMUBhoU%t90}NxY`Y0*J2SIN0l4oewkO^hmi?N0rYR z3Uhz#3p=sG36UP%yLa!o!n%9XlVNXPZ~n0HOjn?t z{8*=Ad2=(MQ15DY6!W0zeFWx<@fi?v*F_V*uH)2Ba-f5qmgm09X(1ETzDe$;)Z%rl z%hV0l-9*IIxy@`pU%h`$A8tMUg%tF5BUrPJ5V~q?)r(!H*z-NdLHQZj+eQ+;ak{%3 z2snuI_E0MIRW%x@;i}00{pAj=oQjfzpvJ29HFHHRBQuAa2PR8z@ygZGr|WlpP{k{) zNoxMaXT^7N8sldE)PvJnDF@cS4*t`0@QJ2oET5I9K-y^hS1_QctK-lL$pFTYLBCXS zF1;@luh?{TsscE2fJZm@*G*`>k{ZAN!epbNnRlamHE{$6ayImvLJI+*3szv=am{|p z%gxNX8HmiGqv|=9Sc#Z(n|5m3<$d@*R^Hx$XC8#m*P#*{bld5w_TS2MVXud$~?oWOZUu*eo9NUN#rybw3-cl zB5Yf|S*vnzKm%wi2ArAc=t?jIf`xttVO6d4l7ylFFBS%mC$VgZ!*@65_L zL{&V8^xi6}=BEr&qpzW{HA}6~0|wxEU?S~&KT?i5QNG7KBzAXSl$_-qtcd;f#XOHT z6gc<-{dqn*Dd(%}k4O{Z$rPa4FWU)4k5x>=09AbHp4#s%GREjAnPwLQ9YI_V`2}5S zr8z**nWG_tgWE{q1kIszy-XaW1LQk%wLcx7G;egMOtqmx63{1cdMjUR zTj5e2M~mXJ1N)L`gkp00fXr^F-ZrgolC$_xmy6YRU#vOO2@nzk?um$t+gS)VU5VGm z4KYx`Fl_uyy|POAjoY;l8}7crY5-yL+l~@T zXrd!m)C9S6mM!P)YB2+x6E*LkaVJ4F?gtlUBNj^`R+_ ztD+m&ZZ!4NoM`rFEq^9xAzBnrWq^%Sr2qxT1MbaCK7sMqq< z9!>rgI7wY&iV;UTnQdym@(fHo=_2L-K1*S~b>i$JU%i<2;Y#@RO3#|V`!r)Z{2gE` z{T&7~{V$9aLp0(V*%l$P-nCmI?=E*Z{EbN@;)I)r!&^GA+RSCRSNzGa7?pOO_C0x_ zToWU*8S<5PoDv!BdIGibP2QxxQ2}48EwJCJ;Iix4uDjMxq{gNuS|53{ zIFW@m(ajp)qAYM9@f1IG{KwRg#Y98e2+zx?fwJJGLBcTOm6Vj@)?+|-q3tO}rE;3} zvCqDFeH;2OIg$adhOa$2uLDmm?H^K($QHv&C1;&}vXd2ent(I(qC4c2NC#650aY7bb0{<4Hr^~a>3+urK%Uft07*MdP)5m%kL1ZC5(p^i zKim5H`UhTJA#Ox|)#J+*U>z^ts(&2g+XH^}P-<4T_BGs=jPcucSo;3{5>H~c#$A{$ z+O8`F{evExTEe`G@I?;kp%uF%3wLV;jBHi9+d0@R4^otMv%BNSI+%HWOdqar(==$3 zuh>%#KxT1=14aw1`Y@sy*FixcHhdiJP)=#4EFc!hX5Qn4bcz}KF#hY-_UOIFmZQYG z_2pc{=`hGdwP>2?nb79B#ng$O6z}N3I0t2ETg0RJb*p~F=-HY0XBM;Gbe!#|$UmWN zga4o8AGZ@ckG0=!xE|wB4 zK>z~jDBo?xUG`E&dq5!Gh}wgUEivSme(D9)h`}K!@4&LV?NlzmuKRbkUe0|V^ssg6 zyXzn3QkR@KKb@SvP+E%fC`LxJ^lMYiSnAGLwZ7{fg*O=K#E- z%he$;dk@ix-5HBN z5>a`Q+wi1dmu4#D+(S}#=ewdvI{Y)3`&x!LsFy=AhTk_hs0Ah+A*`0XFLj|tvYm5N z(lp|DIhusoEdeOzvdqgiv!F8GN%Ylq?_X*c^Mv?9;htAymd$|=8Nde?vmy0av(D<% z+}d(^*D@w5c5(#St>SUL3@9!L+RZ8^;$0hE$fbwj+(BLwOIKs;tzF&Z94o9-B1>#$ ze9x)-?==n&R(YHhw8eDi5QDZ`xWnUP>ClizCcHm%R=k55cyu4>Pba!lnCyCVi~m|9 zk8>f& zH;_`b^#1#%l$I0pM?ET$g=&kD55qrb>Vt$u+o;dmZ$fb(!@t2R|J6HqO*Dk*3okBr zR0{Fx@y8fU6=1eN&7ft-IWR8C#K3=cN(KV%ENJ9q^JBDRsBgwLkF{cjc&%^@LKrLK zsj?2^K`~8gfC>;P;&)egWC>Qkb%*b&sfXVl)s5=2GWRHAO0RTwhK#gss_fQX?l5M4 zvId@!SyZ&2|JKG97Ldd;0YO9`2~k>wq7Lt$sJ(G{9S3`YZ2^A|Xr$BK-SGj4zcP*5 z?mjj%`@hxP=bh5l@fg6}v=j*d=gUNta%s~vRVTI**4=Exn|CY+n~|qtXPQCfevnmN z{4X1CQE52pHj26;3)HXRNRiZkytM$BZ$+AJJ23;rZ&G{n{D^(N_cxSr;y(^vl#b|9 z)-zLUlkBrtXy|z_N9%fqe$t~-_L#uo><JDAnUBRG|IqV>BSNB){1MFn<qW{0t(s?EhLCT57dtvxa!BJh@3Rkp-B2VdP4#<(1huv0H*M3#K9Y@qapm0!fnB3-|GDE zoW6ku_2&BWy#~Iv%yF*Hef&rQBdEE!=lBevhO--sa7gSirv+ZmT_i-emQobD?kOsqYqh^{9idF0l=%eIuXp+Bx)~n>4Ff zy+>~$NaB>&W<(|x-uy(gs4(K&OMeZ5ENu7p_87@@Nm&T1;qqB!$ZO@@3W+dYdn;~l^h9Wyozb;RL4PwkQ!jUk65ltTb8ZR+(#MO#yQg9 z+}A0KLBUkMbJ^GL0PM6m?L>LOYLLvk3n)xTu7LgtK~j zsQ_X0EN=GilD`j65VW106t{xXKs^>%@P?JpTk}3)_LxL zXgX}aP`j~ugJt4bmo&Ckm(E%PjlQ`;)t5!HNrzG0|VP@gy8Ach^mz`}D3|#`ldsc4_V#E0}R01oq@5si2y0pXDF{eUaq- zO_etRF@E9BSTEZG3t0!eAvB}^)(n~58E!Q5w9O6q4()=551Q2FrwU#_r!t=Sz9K*_|w(g zVr@-Rp`as-yE?h}QFK+Vz+V$=0`NbU54h#unXpG`p}XygEA4kaIOXjsPfnTvOh%M!nm<@HckaePB|Q^|muI`>!Zhs0Q$yDV zC30}Y+H-=ff^jp=(c&}YZOSn3#%-H+JTT8QN)*;2T!oAAtg|-TL%+hzgjIZW~Lk$av z_c$SzKf4;#2#_Uo;Ws~2mLHMAG@OW6?N;nEFfY?V$+@ro^g?-#R-c<6A)$3>4vX*i z5ZaYqR+Yf9J~pz_^KGMgfn|V3lBNh?n(!-Fc3TD4bv)38KiO!>@{|uUlpjHfQ~`i9 z?SLT`aKGZw6wHXQ`Yb;6sS#_iHJcCl?mrg@ohA`GAval_BMaI^RaoabL%OG4}yVF>B<`mHRQc zUo*<)^!FPg@P^f?;h1g*=3G|y%xYRYcy%hq!e(XAI`*1-J;b~teYh*fMhADaI)AG% zCz34&J$ONP)PvF3eE!6{ii%F2=trU4fqoE3;7rF381fg?KU?v9GYZ zzx*b7vzu0O`hnGqJO7VeI(8FZI%~g&ja~KFy6^_G$7N_q_o1$n+JoGNV>?>sFZ;|< z5I_+@y7yFuRT7rwIv`CY4(Z-%PPiX?p_OEI2;^7=(3sZ86`ggmktw2VoKTzmSnbdo z=2wWH001{44YvUsUJK2O2FWd$X?b<>o-b8tG;^J5e?6XSDQb~TG}`hRDybh<_$00>0U*p35)o+zh=LSH45GBq0s|z}P?cU2 z5_$_I2_)Rtx%a#4`vX}kXPx)#XYc)#CblNuNiE(y?Y*iCLn~YDgk4|FEmAy*o_$)O z*5c@Tob{sSV>!{g5K((VKr!GP^9ziY#Q#EE?z5U1&%^Ndq9lwR-!cr2#dq%^g_-SI z8JY7^F690fPwhNlc8KpI3|*PcTb8Fgp)iO?$GX=s&6RDZFW!0+RlB!yLu|K%aA&h8 zU(^Q2?ycU5B<>0Pj~778nLC4H&RiM+tewyeY-k7B#YW~WN^jdbOAp9AiFfEPEm}F^ z7=56{EE|inhKS0PrpnvimO(bQq+$KahE)NjIdv;@E}zO>2*<3Lfy10kLdZ;uk2oDa z$QR7i+n;6Yccbq_uSm)F!-LxwwgzH*3L^KC^cOBG2o*6Lv#Y!)_1B}ir4CU-uXvv^ z?9!t*(na_f!HJzNoRYH^bzz4ZrTAtP3ymP$h@;nFp2CMLmSF&`)maShaZ|kT3-IgM zhF{D-v&dJS{P^^v>v_NVk9oK?TNB1u-6Qn;9D7SICMHOgYZ6IwMC!qU6B9B~lNPBB z$ESwjg!UtIK_WZr$H{-V+~}TA7J&sLn@&;Dx;n7gK13qRdQ~U265m)GPyI3W4hI_@ zBOln_yc=p4KK+YUS(k(!{{zlf{noHPHYTRf`-zeZLd$A3D0$WwxMB7PzcP7SC5GeW z6oz_Dl8EWsb_svyz2mWD?Uh6aC_~1YmO=UnPzQH-ThZizLSpz(`xc4urHdHYqIN2H z8?fSOT3Wyzv~6s)iZhnLNA+OeW@5Va(5ZoIBiUs3(i43O)t zqW+zHK^;m^#&jd|^g95JC{+W0(G?V$iaQfww(*GNhBf<%Cz4MS!WWU??@8x+zT`3> z-l_T=;}Ny!i_M;94WsrY3vym6%N?V%-8Eg8;cuI<=AM5sjBPyv@B+`$y|+Si|p7cI^ zcbS_BS^lZD_iU9|a$%J;3@7U4KDwuAbh6~$`%xEbi|<5M-uDFsZ(Upj6B|09@HrCc z+t3ue>g;&l1P=;N%ORtDwRi5Pr;-P7}LoTkNn(e)Ji|?2+HO(O` z`ZB=T`@hHeOW-wKsP|>={R7h@L4D6@9w*<DX2 zt4A6k+TatgTAOYOs4>=hJo%+ecz&Yt8wdfi*$ttO7h&NL#Wf)%($)50VI2{~>AQEf zt|upa9evzEwh7+SFiDJD$+h|v`J^NBSv&iesuxWbT0%O1XrJxr)**iZ2^}&|c)K*L z-Eanj$5no|E-fr8D_a16eg%~SQo+}WM?|E{gYM$MgM zy^KCjugN~Nt+Wib!AUJcjdSJ6%6cJk=FBgJA?NcC41dG3wcnlrbJgJckAj$n9E77S zH@AfeypHS&{e`jwyG1scnU3xUT!(_+mi`unw5Bjhm|A42eKKUzM<9tod&N2$h2xw4 zJ(8Ymvv)$J)hudf@>RjTY55YMeENvz4x(;;&OcPANN-7a^l`*542_GsI+7uK`cC2%89pV1WlT9_=VwdL-<%oU2zcG9jelu@(l$*9(S+ zr{#NPkC)|>eTSasgcMggF7WJnKH>;mXC2Mza^m9?d&-;Li0IG&gxSH2h)F+KANDq4 z=>!krW56A6r-Oi@r2SdOlefS<^z?R@9r!WejoE4A%dn9 z$u{c%QAUrWNH((GI#q-jtF$-o0oVOe3z#8@n^c-11O~h4e7#f>yn{o}9tIg;sw<{* zj^K^uDeBphhJTo;Rr)!Tn{`&e2(AEI^|N}t!j?Z*HFA+H(JxTtc#FvX zGP6~t5cu=uqvZbC?t63%Euq;kf0gIgQ7&7BF%wJqf3QXPAP37Pn@JIPYZa|Kgx`G( zps(&;>J9zHjhb}7ulH+zck75(@iqJP@kciAXY=AUcg~$A?8H^HU*4uhGVs9A&pOiJ zhjsnl8Y$QJJIheQDmKu)!GxhzS{gtJ&Ulggdk7!%gd}Z6BTPXsIShbgs-NH^HFk0$A0eDjDtcNuSOv&E6?! z14p*g;8Wut4<5Nu4Y%{(C=6h|YhOojdv*&IOmq;()(80N?AB^`DR$K_Kv?ucrJ*LO z0^g;*YiS9;ucazv|J-W%V&Q`SG=$~T7Vm7Fdj$3WKGy&!J%T6?fCW(yCAUT$KoWPO z8BRxR_HTBefRTxZXAtmY98;lb+J?UkntIxtkruf#T&X!??YY%V0-Pr&+5)M<)$J-O zLqgIwTs25yTYav7dL$Tm%m=KD-k;*LDar2H*6V7Pf5q}p4*-ayNeN6)N$ye_7}zxp zO_C<6k!$kqsY|7~=oJ)(fp20itW?3W9LtvMt=f-1xb#)&R8af+kF8a3`1$&^(Axe` z8ENx;qy{eevC7`5OAKY^8DVqg*~9=BsLgpznj0P9qai*YaL zQVMb|Z&}U?;gNo>$w22T5nF3(4I!@46QuGZDfwW? zJ3^l7aA&OfeW?Sv1xk~tOaw3iy8JNO|3_&H@82BP0V!Od8uxSQni(KEt#1eb9EX`; z3aD_ys{uuUp80xH&lRP757F(Ezd}AB@JE?Hr%8L#%S13*{G(xQcfAgE4Su`nUi}Ls zo`tdJdNUdhv5$c{&qhH?KZ7>)2n}!3Rx3&!xgnBE9t66R>$$X^-)AqlRI5Y$gX|Lt z?QuJ4oDCu}W2neGcjTe+aqoQ={MfZ*TY&xqNxmu4 zm;7(i3(l|tsh`_yQB<`Wna626_z|)^2h5`@?mwDJ2k_uTs1l$iKDK~}L?UYL)tjts zpDz7tPMa5!Ykf_M0UeNXPm{v&J!1B})MFk-T(lZ|(Oq|K@y86^Z7=j%J=Kg)jnmGA zJmvs|h4t)Ty$pdPtw$_cQVXbsW{W^89 zGH=kTCt?@w#nF!-eF6GHF!${o$#=Q!4{RCGaoi^AmJ)YfqDX=Ct}KpVW1$q-Gw zbo?j-An_3z=AF#GoymrZw7Ornr2rd~61xQKwxbJ|MzbzN%xUL}{P1VR%*ZWtSLxjk zKU>7x(-0#9pYnaXXmI#s!J?|7Nk6d!CbB+4%>nDUe5I@edG4GS?_|np@f8B=nU%|Y z8Wyy}kb&|xB zf>(VYgH(!JDxytZMRcs&8^^9n!*U?_S~Zids<)d8MKGRs_}tE?)fii8UDTic+7xms%mt{b2beYecaT!MwxR6yUkU>D21jD5 z`l>_mDuSIBwf~NGwo!0M-j&vt7XGaU!l@3pbhh|Pgg}(UCn?-k83ostF?D$T$@OI+ zVg1p!3;LtIz{YC)B*yUcg4*=LhA`3zpkcst;NC;yvF}>3_YWPF;bKfxERE+3?-Q^$8 z{a+`j9%0aLfCd0r%0u+SgRn5*X`+4>u8RNMnMJ)bV88pYmz1rbvgtMe4pn)6b%wS5 zH#s5zPkh7cV9J<^Ekjd&?)sAu;Fe1f+Pak&!{@VV2lB0B2I|K!AHk9#=T~eH4TWD{ zS&V!WUGWz(?(d8t;v!aN?D{jzMa&Rz$0De!4>X2?zN+PN5VH&bqPzL`6h?sDN3IpACNDTN91(m5}(bZJ_NdB{Ugvbk=2 z>TqW=vh`M{FUZbUsq^I1?vpN->24zFH{%a!M+w|KF01z7$LEHrP}V;I(%E~9{Kb-t z68}l!E^&8ccRal3i_Ttyb*Xvyp+{zDZ?-F60ds+?u4qfAS8vP)xoA0Anxyy0?E(ez zeyOC*3CUtHz6UKX|D@WtOSTXrp2usOJ#cWSV)p ze&T>txO(**CP4m!{lBa`vZFb5*&#AwIcPG*7{=O*^siRT?=hiHL{4s>52%x2o(P4K z6?5DvpAxbGLk|^n_g4Ipt;}0%m4&iLL#n7YLNY?C^vlU($;?N~FWs^KM)u?{P;xAa z=$};|80!Aqm#Bn8gYI)!A1+(Dx|P=^uZ2Igt67`V`uLfgd&_%t|BIj5^UE~92Zj{u z#Xq%5S3Vxpv%R9G_I{RaeMU^Akt`-k#|55O(j6sdUG;ZO2Z{~C_>O1TycHTzGy*%5 z_Nr{mRY)FP14rO>$n&#ScHNEtbX^PQ`+7;$UH{YETYg9kN2Ujj+}PIpnIU(AZ2q@#3$Z1m|4BnK5)RpEoBEzL3d^115hWnA-GHpm)Xq| z%NdA>;Op>r7OP|u=?OQ3pAuP7)eki`x77sC2WY#Tp!|In|7Y{a#)sFv){=t?8E9!Z zA+Dp(>vkU%QNA;`rJoUYxjvYzak=nLZsu8Yu=^|Co){4(jeCfV`6+xA_h5b^-(G07 z%0%8VOD25d{?krVa{m`88MCTH{Wq0KpeFmV;Oyu%;_RcE2y)7n1#h{(oXCD1ckp{7 z<{&>5!&(#QBOuK0CMZHv{ zaih-!A9x5Z3Pha>U07@Z!b>d#hfkK!Pxn~ZcJ)ZX0+uZU?P(~m*26%ApR5>Bk<;9R zDG(sDv8*f%2mR>i(WB^^m*H>cMtjc;kG+F1n-%!9NjI*dfCyM+TA;Af;CK%N?|uc) zJ$x$$*GQWaL>$N`QcQL1?V56#i|BJ|!Er77n=GG1V$j6QR(%F6-D~RSNnZHR0;r8> z+cMI_xb&8_Sr)xk9ocH< z&LyqcY@AwhydAlH3R7TL$$tIiUX`DPt8Kj=YCmu5gMn6&t9)g_Ov;Sr=(yCl1nkd* zU0Ly6-sYdZy9L$-^<+dABv(7#%Vuxek2-HXu#-~2wvuDq_kF6~h&#OhT??Me>xtd@ zXaNgvdb%6<^uah$k8fJW{oTP4J`eYzgWiQxTowbem92pnJ2ZGbjN1Kq@^n7zaNNk} z%~##OzA`6OhaA?eHa_C~vn3oqs{Hs%+k~t$-a}LFd>FJSThql_3J3)cXxE z51n{NzRR3h8?RXWtSyk=EmXqW__8-ZWN)@_;TrrO@5;lAVgg^N(F~KF$f8E>V677 z=t&U9*Md-!Sw6HpSX+Ch9OT`xkv4XWh*Tk%Pl;BRt`1>$+0ot_g{Ay3+C0TBzHDOn z0MkkcqdD>8I$51i`JsHwMyrFnXwjPYr;b2WB+l|T#oi>$TAku=dYic`1gpKBbe1mDIQb5n2StB9tYkvUZ-o1UPBoQAJfA~hSN>ury>qDQgve4I;6X#bAj2`ljn<+W)nPm z{DV_K{ZBh&1MnZtK)FhP_SR2!zvA~szrfXh}A#_C5<^3F`);^SdNw} zHQSXYoRhXdJ`FM}ov!NLm0`lf>#eUn#0R#o&t83TBR6w2n-{kDbL-^>-HIRZ+wYc( z%*BHuloE?)pHUiXOSRtyBqbF^a@eNt&J(NTXW2E5)e08jzst75i6yth_(1Ot_+9~) zqVw8UP;C+C63N&R=kCN;$S1=icf)_Xq6@xn_xL{$F?{6nfJ2t#bcT%7#n*KDQClf> zPnCMcRqBxHlf+Xl$T+o_h&)(c!~BL``EyQr4th0p$yX2Za4an3=SV3>2TnCo^`KY` z0#sKuj$#6R613t(Tb<-1pRFs|QT)qw`i#;t{& zrK`=PvNhzrhut`&4bJ9~D7u|jL(0D?LVWuQeDrB{g>;c-4}0A+!E(0Sp*&4{d7Wa5 zi?f8tWKWz~JU{f3&N(vIb}<6=9&~f)w7<*BBI~Y?p(ADZJh|1ov#ks$6?*Sh2|jcC zx} z&?&ubr>j~h6$8WJ!Ms}!b;~uy%K|`F>?Vc>&ZG*ZZo};ACYSh55MyBg?l0U zP~)op$QiaOA6lR9O3X3y7pm<(0p!I_F`3if5^NJAI$9cKEbUr>l9BUY$v`ydu+!c| z6Cmd7V3z4!M+ZM-OtSE^PV##bED}@{xix?o)RM7|)SkopEE>sNO*ZMF{yS3s!32s) z8Ix8`Cp}9*CVf_3?07^xjdAfHyNT!L_90jDt+*GgP`^`+%88H3I*t8B|hH_;Vz?Mpcy25hmc&uA4*Hom{kjbSrN zOQdQK>E6^k7K*+wRhSV(()McZE!&z1l`-|6s(>en?#X}9aF}G>bq(j_H&=aBl_BPZ zdj8A~8Nw|Ydac-tyBv2&)=12DO|1Xoo8-3f&WPPMNZD$q1b*zfJ(-4=;-G4LS;rRs z{?P0>bBTCV-Di78ygTwYKqj;kZLN7A?^6ct-cC^=XNDsm%Am3I5tDD9@A^N!lVdzOf z&?+{LwNk`9yjfWY&3fdF7{gbvZ{yRKCyz#4e-+A|jAC=23fIP@y9;_1@c;`&Pdg(? z!~uAm)ErfC@oTco_>FjncZe;^Tz47tND^8l6D&8Bq^wHU3uzbBy6KwgnOGaR=iOd2 zm{$+du9WApqmw2ME>f;5gAAc+41kKlkR~W1F(OhTni$yw{%iW2o}w<}^vJ8Mw9+t_ z2R8H@Gih4KzGiz5#9QhJ^*~2w*;1;g4!lHoTnc(PD9|A{n7MukG0URVs-0gHCn$<1 zR0CFu5qTeytJbuzn;_uXsB8x<}$;r3THOzTlpd2jUCK$8vA4)o)>+ z?v2v1oeyk6ms?&g?21iIhK)y>XyItFb^XvtbV*6lK25y{PaG0RMBNsH7Nqrtq3!Wk zYsLo$Z;t8$@#H&$?gKlN?+Y(dvyo#BHgRS z7cZHgI$h=#_cG>)QMn1;Y{xmz0WT7~8>n`cQ3c3uqs3bN?K((wT?id)H?}Xhols_j zg}C%li=TH44_-W}IL;P7rtLBBC({7Z@oRI+vs?c~CGniBBZQh=d*#Fd##J>rOxNYB z*j$UX+N~5nc1%Xj?5ifKRsI4|y5?dyk9B|I20UUM$7JRvsDps)v|_xff@2T5V_8TULD4_qCYW%3qPA!PcC6j4unEPpXAl!r^M3GCDWnMj!ko$kK{FC-C%9-7jGBDpLjwFl~_)!Qe(`_sXcxe8}QOo`X49(;HE z+W7T-8@qT3i(YKOsOyMO(mQF4LEYOmN{T3v2hS4F3f`W|J+AFqC^fuV1*3SPA`y>) zyb99R!3j17{?ds6yN(*aQfR=@eeT|FkvFg{oPY~7;w+A>$48Bo*2!|0?MMSjV~*J} zRc~GpwF91Vo*PsZ$vs6@Wfos39sE4X_O;@lT%)l#U+zIHmT)-Y(}>|9&LIhDFN z;Zl)odST_qSox`JnRg+`kZsyfzghS0VSBwTKkd7xtV0ANHb)u#?Q}9NwxK@1R*+zV zh0F`^g|TPuEsh$7qx2bNW3vkU>zxT4f*$^RaAlt>m!+WaNyqtTU}*1E4ZT@laL z4j=u>nEGp1sgHcH+fXha&TSRxF7yg$di1zyUrFUw+(e;+w8v%Gs0ZCLvFxAm+-Qw< zYv6QF1_lr0%0+OH11hD-7F$-N9^Vvd&!PF`DRrIPh#h?DLimvW8295*>Vvzw<6-%n zHR-ww;VZPuwMJLP43$`fq1R|>N2%Quono02Bj#SOGoBe9YUCa9R$^Wl({&6I=) zOOi>BFDYuNJ!ebKJM-4TH05n29+9;)6P@9h#+xs&>u2?H3fpiOcaVKxm(^z06+Zod z)nops7|np-HyJ^WI1u~e??~KI-Ffa~#+%jM!|Srs{>@X051z2Y z{%Hu)Xbj;HusC!0-bl(8+f_^5@~Gdl6jsY?urcr2rN>?v7~#wBR~=YnVtBvz&J=u` z-nSNem>Tw*EK2wxes`GjP~)qx#vP#TX->FXR34%+9n)rZsz%-QOYWYLT~{(MMb438 zQg4>5cI%sOSu1qOblfe0+*bsq^DKLi;tHdTSD))Oy*)iQMp@dxRD!ynvcht=dNAaw z;>WDJx5m?03&jnqJLtV9>&Xo$L#~ByT|NaKMIkmnblXc>A%YsdCadx%R<1@bbv~86 zf+>d;GEu(!oRO#)|SA-+y;Y^L3RA<(f} zKb+fAFtE06H=j`Ao4{>rM-v;L`vmw?K%)9B^mew?4uyJtW1-QQgu?rZ!F4n z1>XjiWCO)@Gcif$8_#m*%!xER6!f8?~e)DQmNeAf%ZXHWW4%lrS)G`^!=SZtsZS1eNp%N(Rms< zJDO#f%j`2*)_Eb(Goj56@<(p`&L_inhc);!m!CPhs)oGCHcsBo)BNAnV zz0psesBB2(&Da&a!|YW_;907SomRPw!YTbAcO7W?2lgM$ljJ>Qbg2>waqjt!eeABx z$@b{FUEFS#TW+3AX;wgK0>q!}3&P9ksmGaPAb{|WRj)_Tn1FBNw;F+*sPqqT(;+c^ z`vY`TJmRtT&wF6vI^A_he}8@S7>u|^JJ!9WT+VdL(MYhzBdJ0bTTrVJ3;rv~;4|~Q zE1i*1(+1Cn5GtE(6+eWP#)Joj_&Rs`2jjn_3s(pG3bX{5WyLEmTB@-BO>;V{IvSTo z9uR9O1eSE}OA-R`mGkzWjB3AWXAseSVmamsYOhVhwlvZsCS;3d-&SiwGB#XOpIz=Y z5`{balMF>2^+^eOU`#7Hd1WU@sK4d{XKD_t9JY@me9yv2Cp-NKL77w?pSGWelo}ZV z-u;1Lv^Fs@K2&7*rCeLVS$|(=T3g^`IU^3tgW}Mn7S#^Is&6RF3Ls8r-i9;N)AoE1 zkU1$^wLMdB8iJPZPlU$ok%+rh?}d;InYhZJwK?_O!=U2ZqI0h+E}9rt28;Bitn^X* z&s9R42Bv4S1=K+f=HQ6c69U|p^&J51j}0(%00$TI@N*NxVUMRr%QYi;wBQGNOkod) zAxVxmylllRklQH%<88Z=#I#PZX4X`r;-GNrCU{0p`&kVcvJih_)w+aqK1G`r#~OT~ z@%6kq@F0}Lb>34TywR8zRDcUXw1-DWWh>{!=Lk+!(i#lpZI5{p#dEmg;`0k|7Gcz$ z${DGEg8ea{L>Kc#UgR$f-GAsf8b+Jw`n&8g2C`L$>>(73i{T15tOIA)f40XC+83*D%)c>@;M9)#Bh$vC+~pD2>5&iMKW~* z@V`H^_G1hicxp;5#f#7quJ<$TM?Wmt8WL8r{Z)Z3n1<`Gv(xz@S`aM_fP`IOvtfg7g^44a()M!<%8i2Y zP+=#nT(Z;cx29?!t8eXdFajPSWqhD$5(z0On<*-V5I|*}Mk5x7mTdyhI}le2a`$#z&dB?OzQXY*scWJtbysrh&LAYT&$4Gs`7Xvh)72NCFZgwO z6w)N1L*AeQeUmWz=C;wfJp2S}c;1pMR3GdO<*wK%3|J7M1^(_2yfzLLgb-LBt9Scp zkn>hKWh9^4azK|AkT5|;)N`b6PaHBu_W2TW7A&DWyR5;RHE)1??ehArX^kv zeS-l@)@umHEqmO?tpTv$1KP9(&n)okT*nod84SLu`0_&7zS7f;X~Lr%39OsT5R2IC z?W5=Ip3Uq;?ccbcY%?oY0~i zIE5dg$^1dr_&Gv(s>V2uIW_k^XU{1Ki4VXm?2q)0ZndAN&F0N}Pxw!ln^l*cJ`3lt zx-t%I4SjCAq;%K6{QFy6q)KP}s1d8~@%MA7a+}Sdu8bX~bbF`l7n%g&u44tGZKF>9 ze;*h3>X^a+Jk<4;)^ZksHw@sP{;<9&Z+$eHX%v~!#VL;bG#`sJW4w%1;-wIT4EI;o z+cb~suMJP%8ouydqExzksAFT1Q%rXMq-y_m!$_#?sq5sT?9QY>pU8q~&e%Y64z~ZQ zRb+}6I7Ak}(r>ye|LIf{7+QW<%Wa02F_QuhI-)IbAa517Qd!r3I=H?6I(jgZ0=y3G zhur{?zp|KvqgI1umv4u>WAI@RMf9qPXJdgFhmchAX$0dg|1q&9Jp= z9EMRO9vwMCD9S6La8o)_CsLT^tF$h;5Ms=Pdw!`-X6JlY&(d1Z9TltIzuXzwxG!_HH{uIlZ4?Oy#Qdr$*Z%$5vn*p8*SPDECZR)u?1Q_n@ z*wit;g&5L?;|ugjo~fo{eCtVC0y^D7{7#shnID&b3M*m%t0eThgYkpHU6F$0+TDS) zm#;!0%r3^8C0B8DuNtWHvWkY~@%5Z$_fXN8!D05Y!)T~_&N!}SN#dABKp z*SG%&ND6nXGnOqouP*EW#zWC5n5CvN-#Sp6_I`e%3RxR`ct4mKA4QzE$9d&)>}!JO znNR(SVJDa6!?POdnEvjF4RD0>QaqURMS?hdI|Y1WtMcE8L-5@tM(LXU&6xF>!u8n1 zIAzGb2g}f*!Ku6PTgR`DtwhBnr;GiLUrVQeiK$e~2ty}}-1TtPfh8w>^JU0663;vz z&Nj^kqljgFfp_3!8t=jcRo7S=;GLPNR#sBZgh_vn*j*KH@Ve;8+KGIJ^(hrlbmf0D zmR;I#BIzO>LN?ZH$PT_&I@}qxSGg&X$M!(sv2c@Bg?V%-ipW# zP_RU#-xr(=Z01}hvX=`p4*I~v{hJzU5l`v*s{3W+Jb1>~zU_+$u_$t*gp5A#b#$P? zOJ#4*myuF9Ole4WW8RZr)0jcOq31t@yPO-%#1f?xzKk{wj|(?Jji=^gl~n)jzDn}# zlNdRT6!~{SRYyJ#FqW6-vMbL@&~^+3Nl@oMBMeDy7-|~eKdSa)Zv-h!UM%$jK}vnj ze}i>QxAoquahEuN1#gTc0N?NP9*1~qRfAGm+) zT0&yK?F%(sPfd((yY3$m-vn$PhI0{q|Ypj9jkzeW2Nm z`0sI>y821uVXLH%z)1@=l!u#JUPPb5=v-6v#b;DWyKjo*n8>BF4eWDg6ro{ag z>4mI#&w-brpE5C^-NO#}d+XnKwwbWk0#ApZ_Br;q6JZnlMI^olMr^v^T58;Bt~vb=Aw|!ap+WyCX$|2>>r7t%p!9M=NVqmpjY(yn{Tn(23N0;TCeeb$MqGGgYnrMxR^f4fUG5>P*qDfMLk1m8cTYKH>-2~9nOnf zYsgYPK&E=;Uh{+cUkRY_&aVv z5cYV8$0BqVsC8&Uw*tJ9y52*k=`=tymimP3yn6gGI3yfS`EYXV40{+L>lu1={$58` z5BPnfEVD@lBcb(f^ef<@>W9>JlyMd}ZH^VK^6d_)@h2xZM3fj5 z5Gw<9wu|?sg3$7AlrsjoL43zCk@95}6U1hQ7Iet9+&v+fjQ6HFRQdGD%#9nD>^f?s zOdjN>A@tzw!gWz0Bv4?dM93_gjFOfO0M zENMd%_R#>kn>!j`qa+`FrwWpjFxt4-oXd3k0ET)oj>nAlBzLjx;X}x()`YOP`nlPP zIHXco`5f@-=BZ}u6(^mU_a>~f%VU(=|0v(XWwJNnqF^ls9!&t{M`F9JUIh>$;)qEg z_9||i{R*ES!9Z+Y^d2^tY6!f#MWI+E}0SxgVKYYCcp1xA2x^-+q{}NEH3E$aI3Y z5STo%9&dsH?|%Xc^i>hBkyyVcPS^Z zB2s4HV5mPA<*3{CB*MuF(AaM>uw4(K*wf^c&btF9gF+6;WkCNikvW>zfFDWQpVgHg z2&~^(rmyOy3&7A$1{_A{+D(NRQvbWcsDikPHlYD{ChRjIl zZ}(z~jPyJ7mppW{ht5Jd&5V%M=Mz_>K>lG_8fM_1e{ETkgb+g~Y9M#)K&3gjGRsv> z--dC*)$s65{{;#?;ZUhN4|&bg6dUa?XW-6j7V{>okPtyUUcQ2BIQW_p%~Tz3cpee* z+j}t_-?hRF8NNn4R)WY?t}Ne3jQ1z@qxa6A?f)zHy954~Vzy!rG<}*9Hpxg(M-HO9JUtvY2tms>HP4p%f~t*DiM~E&oE_7pTB#?H z?tp~j{(X4{(jSc+Y#WyD1o?V2X(pUE(UjpEgait9S+{GPzBlSnH1Auoq=B-eASF#? z!uL4loP&r*br*S^V$#{ow;Cl#Lt1P5L;!wE6&^dNV^vjS>g?gPhCFJj+-`ipnzG*- z7}{rVT>qyDMeTiEv6*yY#D!WWIs%ioa^tA8s&}#X~ZL z1_rEZvjbW$bO7?AArEfSu4lLbI_MSax~@_9R+0{C@>Bf$dWX`qV*Z#^8H-PLvtEj? zu<~8B%Ugc0M1U^!OfdZ~!EvRu!e&8&vp3aLZL}I4Z+TXVpjagxc|2FU{H~~=XXJ}wxaHXF3%M5gJ+!Arf27MLoXaK zqctSBlnR=h#Lz!#z#>?3su&rl7pBrYw|~J-X93P@G-M_nT#h7$xrJ$RXRD?%MFSxP zeSKMx8yOOLC*PH^x>iotmo*wasZU_NPw220a1Q+|Hh)H3Eu)qM6oi+x?l(mBJ6OeX zRae8Dl$>>zZeh!|<-o%WDAuCbtoXsnYmt!w@8P<^PnpN3P5LWxR10)XU}-;#sGb8Q z`-fbo>$OUVvpnxa{k_jP{mN44$!*iHKpdF2)pn85u#WN-eo6FI5^ZiwU=fH-~6m&vMY16~z)|aFns1Z zFiy_(XP%MDdT=%soh&}))XAXEjrsIeCk9SB(O!?-?9Y5IbvJBV2n`$BM*M?0K=1G6 z4y!MX`oMx`_)UtgZDh}(mUXf_Ot;c7Z5z<^Bpc7}u*#9k2mn30y8|FE%%P}l6E)v9 zI_k{po)VfG`zsVug&6R9eQF)$?DQx1E|YS=OtpJ*YPYNx^Af)M*Qf74=Td&8*&bLv z*llPm6gD2w?D$aC&Uw{mL0Q79EPmDp!X*&WgHzh0GZnz(qfQY_Zclsd|GR~jx6ft{ z#fS5ZQMh%JDa{}F(c+_2%)xo{FC7V)(Fj(9vR3$FS^RTE_>+Afw9T=w*I-B4sdrMr zE)nN!w>m%QnkOUF13XT1+bkKer=-n2T5Qc6vt3GVbvNF9^5}_H#oO=2WMG3g2dwR8 z=`RQFKN(2T(vsuEaXvlY88;T@eoafxpP8rk=KRO=wcj*+zY4j>Yrl`_w^B4V(kzATH z`KMKOrk(r@$(91DILG*sw9%#};ZqK@1w|#Iq#&=!nVzcC=z)M$g2iCF!zUx~a-W41 zNZlb6&b~UPyAXK5F|^v>#d|JPUw)|zgO2ZaA9()4j^AHJ9t#E^qJ>b!`tcUWO4Nh;J-0<7V9*{Q%&;7ySd;elwdwtrz z-uKrMI{3e~CwHiT@+|F1lt?0$s)(*x_cTMST#&}98A36iC_(Rhw7S11LreydQcQ}TN+gYa-*GH!z0u}-`c~f) z5ZO?gojal0(wlH;s@B_TH;Ddw`S*pwPfG(Bav@H!Nad{5pJMBN&R9Y}x$YSpafSYI zC3}zkb~Bv;AtgbEG_!qCSs3eq>C(xOzlh8sou@;j$@;TYyk>A+a0V-5ck+!4oPe$g zTC=`Wc`9#Q;DS_LPQ_aNAJDa9uhW-OtOTDXF8~TZ&;3NQ$0xt8`40}}4sV5K^m^Pf zFc9ZWd7(?4fM*SQrQ%hH5^tu@1hDpuo=F%G8o(4{{2Jt>-5aPMDqFi7uhtH&veI_F z2zcnC{So5J$mD`NL^9%urEwA3s?~A!7QBttB7a*;)COSXzHy1d<^gXh0LDA`u#ON_ zS>=v-f`e$H@~(#Cs<^*1*Dx8U#rPYXw4>#UY8&a~wm^l69qruBe2JMIJzTGQV zw5pUZGv~&zkNc&cPbJ3UW?-fZ<96N&js#395WiBuIcJpbM@FuP0)sIslyN07R zye-`I%PS9WLrgcUcP8F81czB${Yl~7jC8ai9kP;i4j(YhhP>XBGg-SFbhf6rL`Dse zA^K*IXXUBYt@?&}Sz%zw&BoS17Q-fxKRGIg8$BcBTJpymgGk;iX7$W#bAf|zXoC>H z&58;5v1(u1j0ysAT0tO^S-D+Wf6%w#dO$TW!OfzCdxJOK9$T!WVwxx-FT^0uwK_z< z<#A^qO)dN2+Vfuv=Mk5vR=fWXx?$RhI%iypWQ%0flH>PBIyP)NoD#Fp^H2$H&pnma zB?%&~8!0xMzb0$*Dg*6tbY|J>^mgY8XWM`t!`;b=?H@k7b1q>@CM-lrI%__Be@X=6 zcJ2=-`^^_mdZL<%Ck#CzT{OjJA^7wH(U$*?D=gxz$xj8+$_UBZm(TG?=sK#`=)hm# zpq@oV-pItkVuRMlQV_wdCa7l$T3PHJdZw{HPb|)HanjDIj{N%Ru+!R`qM#L^e^ZZu zVVM_OyF4v1>c~DSG~Wa^`ntV9?d=>ok!_tk)am}pOfuX4yIOb{OL`$t2mV^LNO^)i zm|@g*4gENhJ%RNeX?PsuiPn6zv+oeGZL`J5u8bSMIsfRB9qYMgy;}FP`j1s^gQ1vvmGI+I5#d3Z-qOzA2;H95sM77+T&FAEfpm`&ga3fGu_-51$AYnaJMC zbX4M&e@LBb%OB{n>x!g2O~^!;ZgZQhKSsjYNMJ(io^!YL2&HjH!~jWTt#+4siyA!c zd0EkD-9vD*CMm3Wit$%NzeWda$GnT!MPTE;{6aoy{9aN2A)jC9N3bhO>fZR6v*&2* zAK(OqeJ8TR~jL z19nO6JOQJ_G{y|wmMjmgFIO{%?lu`e546WXYptDvN-BRFH6;(wZTx^}UG1RF6Wj9) z?J&3Dd0O_>e;gd)!LLQvh=TWo;!m*KKZq>w+5-!{AqUFSD+ZC-5HaZu%}XkG1S96@ z+t$1#3z@y0=X>UxN1*%b-!h9Du2+!(rzI1=Y=F(}eEK;2u#t1EQ3HIiWdyE?wOby{ z6fCrh|36H9dpy(oA3rHNM^WjZ+=@yH%O!W4a;w}@oscmZA-8PqY)dMHEg|GqBqWo_ zbxgU;{m$I)_q*BH#m-#3Ku7I6?40DMz66j%QWe=PN?L-v z0LMD6iA1WFm^c6eB~vgbY$v8n3Oy%0*$erAio?efZUWb-&9fkiG8oHO&+0=0JrT^e z7>%NnOl+|^bA18MDVXNxXml0TmMXB=Dpr1+h0LrBWII1P$YaDXbiO5Cc_~=$ONue0 z+2?p^eTdl<;H60O`!;K^7G4%=iZ5?$!HqA7%qBX`%q@z+6FuhCnkb*R#MK6i7!lba z;^dHiRtooC;Nn0>E;m|dT-O&<$v8trOJ zH%=8lQcGy8Z6qG`F77)1R~M+_9!b#NqhWag#J}G6`U-I04gc)5a+-s6pLEnoJJlU; z3zdA+(ecsqJQlK4j3lb0w0*3l_aI_OShYFyxV4Akvd3i_(Pb}8)ZcPmg++(NBjIV; zLP@wPXPUAZY+3z3dbb$%mNV`B3y-bS5o z-0q=z@7hn!dF+a?Ee%FYHmUKm*7WRA6P?Oee9QDJ;ib@|XkhiA3a6Ilg!oC~OElug zglU&mc+)dTaq+ldXs%?EUyOyApDZFG?u#(OM74Fa_|H3L4+8sE zo&PGgYxSPX&%c%Hcpn2c5A_{9wUuBpU2XrI5AU{Hv>@y(zzeVsN?S@AMbvbZHzaAy z{Orh?%iOQ}>w*Bg?43N{$Qh6nsmijy=s2u$d!E|bAuC>$7dSQaEO@Ez^|BfM$kF&` zsJ6KBO08L{C9hl1#6V+)6(ezM+9e}JNFx1ayZcAG3uk{+U50^2j)}1(WkHD$`ZmsYamc9GfJvMzh14v(i0bXP z5+}Q%4ZCY))M>qRD2uRP82}#dBCR=o@7h$L9sF>Xs)6@5!RDeX- zHQCIU<;jqgM#OQ)%^|34yr6sX!K(f-RswQ-bskm6BnNo!zz(rdi@m-UOxLPl`YPZG z3M_8e<(or@aXv|{T26P5+~2!|#aG0tSHxzGXf)iKYTVFdHZ&-9pUhk3wlrR0u;l1Ah56ps zgSjeegmHSbAr{0+H=*L7b8$OQ#Oarf$7kO+{RSxCsA8q2j2(JYax+3YP3+cO&H;tE zpE-qrcA?2}NdNk)zYXmH?3t`d)ZtA-HFxb zUd@jsE)?WM)khz5BO~NYZyI4!HUzsCy2_Aa=!s$Vu`OHRX@POY-#^DXd0c1E2Z&FwKzW)*fHB& z^6vd~z~PaL8-COBzZ{Ib(=3d=6Y`r^}p25SoS@J)GZee7R@mo2GR+>C2_Q z@oL!Gipe%&b7F${Q<>zj)-Jcg{B^&s`;I@Wbb2vJ#oPwsJA2+;czM+}){O_y_T zBN?GiNF8KPrZjYsf<54_xGL}n@D_JomHtt+dhg|;wKQVwH0ShfNj@?1>usiHrWCrP zWVurpl#dTQC<)i@tLY*JGdJ0C8|%V*LBA}#O6MaxupI|2DYmEhBFy_N?C>w2l`VnF z(|QLU~MGutQwAH+t z%O;Y|_fJ2EhU#%y0b@hfe*hjefy|QuI^&>nA~p48GcA5Rc}j>RAe}VRUW1`YXa^?@EIYh$- zn4q@GF4zBT?8V$|pZ!?gAqz-K(qWQaN}5Fi3m9Imfc;L9KAb9`=`;yh zpfjnfI2hTkFX;T_mlACDabR7=alJ2#*|L}F_VUU;Zf+MMCbHgUvl|LU`rvy8FJ-nc zgu-WsdKfnC*SF}JO_|f3+%Z1{xtk)&K68{AJj=21ndSj8I-(Xit&7QFanqmTFpP{s z_1fi3$X?W?)2|4+!uys@SV?{~$@;+9mVM$m%-&P*kYgNVC;B6!XENr`%-f=Jt@@@7 zWx4;a{$t-Vj#)RSub-)G5p_C9p$nYy&POrR1YS3>zNAwkCR{I+)Hj*f*vm$WM%sAWJ#XnAl-6?5Sqc_ zKreA}f0(NB`Z7jQ6sLU)ib6OEXy!_iKf9A@fA=CMP1MD2Lv~)1y5{@e4-9Ps*vY(i z&H30|zmmV1)??)@Vdd3t@zT2DW`Y9aDeRqwy`0(mt9NqmSC+Kbc_zg|sY2dot4q&# zotKJpgsik~RdzT^NjblT>8(`8NQPvaWBvxvQVY-PJSHEwg?)hEKYxq=@?N&?{A|d% zoaE?=i}Y}bLHza8+qG7c6)PgCDB);X5whpGA{o)4q~P^FarTmpqGN!=?u+yPL=mdtwu7p|+rx zz0F@`n0_Svh&{IW=mTE3%dx6GE-htoGyC>Re4iY|^W@KRpPt%N^T|n}>>-aH5M}6R z6vAGX{!ZTNW>JCr@1Ks_Ai>|dV9Ez78;CQ@&Gpxuf3x#83`0q`#ZM9*yO#d-@0B$L zs-e`OhMU9&8)~?`a&Ur4RkS6h_{@ms$bbBUN5IhJDZKuSruV;NxGKXVY{7cs{`mAs z49Te0tSql}Jpf7%Ju6}VL3+g<^v%pd(nh=H_LGuT-jU-aX*qnPPh9M5|-V&ESpOQXyUeOzJO_ z>P83osf0?w1U|z}!RTA>W>^z!w7)(mZwL z>p{OhMPv6iMwM&MV^bfim3l>*=m@*ndbWQI+>SC`o%5 zkc@0o!bR!s#YHcDcp2S@SiAJ7t#wBIq49zuYNE`$jSnsiG7UzaYPcjCj2@M zuB$z`&ts=4O_nFm-#O|6A7k{kTcT?~+;pX@zxTFl(Q8!8OWVug1Ygt;jggp`(di10Gip-<_?5pLUjzIk9)nan}*kd2J zzZDQXlWN5b_>h zIW>=LfNdPeiGYT}%#f>AJoZZw>zB?4!HFa_qz# zRHAq-n6*16_$54j0t3^O!Vlj}pZyRAyr8rU1$DJ;g_SPe{J74!^Lp|Jv-vh_Noyln z7=WHFtn){r_#(GL^5c__Y250gJu6>i5SCBcZ|KdW8)GAG#+ zO$V|Z8IcXHeY4dC0h{(!0UYAin6*}*V+Yl!vh>V*8PbByoOpJOdAv}^{jQOa0pZHa zNlmVx;X7kc(z%Iq;GCgOXCHsFmd;}-brpRoQW_qmYH_@UCt1?Wl{3?7^~~P`LFF*pz55PN<&SuVVo zZsoP)CYhpE@@aMXk3_gfx$frw&Mi!3>d8o~!SXX78N380NVCUU8r@2#ibaoCc%nyc zJc>z2uF&U!-XmtuTK7qlh%WAvg_scrg)rCclz=fVw}k<2W5!>C%!LhO3_DYOifuHO z`JNK17?)`q7q5IVHxEB&oGgG%h|V`quf)+`CZRQmJb+ zxOq=?@?W3541GJ|0EHs8TU)iiIZXMjuyS$ux1g=9i-ZHx%y9U6mcq*1!3$L`WV5V{9&ELT8Ag8 z>MPKZp9Ow=Cksb2T)P-~wo7~ZU3yZqH`jThGq{Dl|NB1k1HKPKIl}4_%^nvh4`&>8 zoZ(9LHnuVOW)ROFtIXzQ5TA1SyCQI>oo-Vke0m_xEhw}yvbj`)4|kEgv&1l{?C1(I zsGhA86-kk9u|F$>5}jNqkh(?O&suy2d$*gP+tgbe)fX*vNguuB<-hZna==;t5A3al zGItHyAs3{Ffs-G61>~rXt@RN{_eeU!pJNm2af(uKqca#(+|MBKilNfBPot$RQA61} zNs_Y~iinuRa@8nvUkP!m;U`t8yEZ8AZut;Oq6n!M22~|*lnR@{5Yudu)Wjr z1WDc8+fh@tO3Zp^uxS~D0GDc*>mpk178fo`@d@T;in0I?ypzb`?JUv&XoVRmZlRs` z%?{w$d+x|@cgi#w45~LNGPI0Yb%e#$UJd5<39d6ldM9ypH@9d!RqdN5t531PCdxBQ zGZ8}$-OhBMxM^w^qtlogYCy4w5K8QEI~fO8#~=Xfg4mOlSCUlTF5W9jQ_sCF@tglsqVKtd-Tzmj$=qt)LGbVsjLVC)p3LEx>5A}DmDuqG7{Hd9 zzpvlvz`hxx+?heVAqroY!AR*&Famln)w72nEI!4y;E_aZn0CAix4F3}0npHMHR#b5MiORjPT#`rLk76mjXBOC+}%lkL?2Svl1^%a+G-T}B+QO@ z#HYYY6MZX27CQAZjExN>ZR{EZfecqo7P7kb+er`nKPR;jYj_n+s%(UP3iukE+#6RK zra$Qa`V2iKWUz~7$0bY$ANvTtH~6G@^0n|Dt2<>i+rIdTgXMp)($lKdU!CR0z85bf zp(l998y05~HK(=rqL`r)>P=8H%16ept_=pMcx0|$;d}oLe)+kOUHNem2eLc&T2<38 zIP5p0GT%=nIwQb?`7}D1JVbEi(Og8EO`^f!BMVxCAAN*-ahe$&Iud=}I%T~~WK16J z2vKLTkl^gA!=k%qK${=P2d}wci%c+E)PMSpoLx=%-FE1BscmxDvu}OxGFPoa8eC_c z26TOV8IdDbGi-S&p<)V)JF9Q^mj$c9Tb8d~(jzH&5%OK={fj9->A$x&sO)%*ZcX>_ zis}`CqfjaGy3WHNA2xyYeC$Zh z`_pWj@eZki9@sVy@n2s|6ef#DGY+PI%I)d%e;adIU25^&!6s3*qQ3wu#T{Rz`y>5E z0x8Gkj}Hqwd&Wio@FyAdcM*(i6J0pBUuvFev8XL8HI!#0Xbctz@+5Eu-7{~clJOZh zc6`ZX;M#S!r>?$C?&q&kj-*yymWuNe3u$R8hEDcaovBt}wnUBeU(K-Ny%QvRue}JI zWqeOWg5;NUAKQHPw~X%m7-$PyR~G zx{d+Ht4IrZwwPZPga3Y-+5-R&S5m2y{_kT5v{z5gIn~{iyKC2T=&y^dEMHd48QNtc zElZ?#>y+nT|53ku9lnKNJxtxa92!sM7D_ewGzY=u&Dz)h-E^*_!NCZ-+T%2wyJ8Yb zN}ERXk{PS_(GwTo)lUG`kv@SCa86t zC(j#_@~w3CjwK*I!1z!G*snP283G%BCKTutacS;h=6vhSXd){|pkgGmr6dxS{?{+|;IDFcl%T!qb}t!!2{( zU_1dL#ZSK8EO4GUsTe$4&8hDQh~v~0?D@fq-Y3C3h_wfW-Y`wOI@_2qVHhGP>{6GO zA$C<8G56IeqKiyVS!u}gL@Q6x+Oiwnv(omz8vCM7fb22OJ$|n;+D;$f^-tne2w+xH z)TYT~+BZRN%Ibgxr#b*z^SZ6aH+uh6t082Lu)}`^u_C<7`hMmSfY&fA~UTLcj^1DkSs8Tn;zOOPd5;{pR>|D*fw=YMG^y#75e!VQn9OTzjwK{o7UidNMWBT>848ToDKew{%7h!QXPo_^Ca0OVs z>HIOlrAUO-?!0&&w9-b4h+h4DUFIpzwDjce2?tjvRg^0wq&J?{#Z5SjoUtpiN4B_w z#OFu7D&^#;>nl?q0nN;kmG{*Hu{|$9(!=iwV+0$A<5Vt8ZW6$z=uGQkL~+sKhIHreUWc%^kF$6-j?e`R7%)Mc?OBE zJA#euu8WE!PwU z^Ctb<7r4i%w;(z`RPrtsj=qLZJo14+K9%vs3n4D#*%OhL-S%nGOpyd+k!}YZ1MIY* z)ObEOpb2P!jedk@!D3v*HT@2Dggq<2c}oJxh4InK(B&!vuq4lO0*lGP8~q?JsRN{uHs>aIQ1bp$KoV!b;n*>d!sEn(C>yX^;$fatywc}ZkW zD~8&i;VWI3`g1{n0NwO-Jul3frpn4fZOO-Ul=BL&rUl30pb4=;l`3&2v(pIhisi1g zW`zCBR#y<*z_ul~p|Q9X$#CoH+4hmN#Ijo%qV%Df+NK*x(Lg3M86*w%QIK2AJgk>% z5#wRX$qzdEEU#~09q)tx7p%*(S^1dtkGpXM{FnE6Py}9nrSJ8D@^9fD*jBaL zSN#89(0%M5izk+fD~GX!A4?jjo$ZnNVVyaJrYpma9;m2nancfCi<%7dg=zawMx zZwfdZ*lI_kr>mmUthU2y!bh6$LrL05?8lLRJBg1+Kb3l}zl^YX;G~G@rL1%2GB=q2 z?o}mRTbyZejZQ;&!R=LjP7s%(J!JhQCj+-dnf1#+{|uWWbohxMm~2n!*vq|!re%`U z>`Ud0ZK=3jwc#w-{zmcaa(a^dc)$Y<4x>S6dK~j6&-(d!TVFY(#2n$0PT(gZNR`T6=OY*bc$(%D-X20^k=}q?o3OPA zrooy^UzastmsUkss^{AB40*pX%MpY?-e>5ReF?dfp_13$6n}~Dw_(i%ZKDR#7h-V3 zl1Px#&W9c3@`BEu`|P%MD!ft2a<}55V)=CZe&s{zdIZDT@2!Ta^R?C?U11%wjfkQ^ zLaJ*u|l{5M( zD_IA_4sx&4mKI{@h{|vHnwQUlaI@n2KG(H$;wA#8AGe$I0x28$)pCBw)}~&axwK%c z`IyfV;MRovROu#0?wU}0f`@nJjx#!3+I8NOBJ;k1g69%siqb}{li2H!va4zmw*%Jg z?Kr!ePCFYM%;@C)D5tlYGsYJb2O?=@hZH?;jUx+wHtZK>;P0bscF$~SHAMl-9b(f; zPiNJq`BhoGoO5)j@BAsSdZ{dHg1+~~yj(H1 zBQUxD_?k)_G_&|Y{u76=|2p1hFWl+>dCbLySszt``#JxisI6pYicZ?Zg3H$feOlP~ zU_y{Sy;fGOeI&H%wqIYq;_tqhOAk{+OAQs7E#WSG?e5~XGg+vgZ9aBE_-EgAAC-1p zH0DTEQ=&HL160JON_DSE{A$&!(~I-Ld^Wj3+eP+2D)ABp_BXK?aUS8>QJO{eK4@i! zj2gjC)vvR&8X64fpaqy&>1E*2>`%%wrgC$oDboY1bWlrk+BzPM?~fhKNx+M|OojKi zZ|J3d^KKw4ZMwiO^$?w(Bm%TV`myhK|2IC?9joAm)#>+lN2hVCVM`-hDPD?5CtbSU zRA==2jm@u80NtoY$DU1xh_zPS_7l=NieUT52YZYFRF2x2cIMMILnyLG7OzRqTU6eq z&tpbxvdQ+(E{|8tIzu0trT+0#45k2$dVFL2E$+q-5BBWe@^pQU*Ej(D8}5ffQqlh` zs`GsF`H;!J3yIIJ;H4=MCRXcutJ*N9_; zS-(|S@e{N7sgww==3;u6=Zf(5%E_NJeV0$TV8HIlu#GFa>_1Z5hp>MW!)~biA{q1k zzLmi1QaVI7%8DZyUFucPhCTX0;IvG{mi(PkvF&^RN^Yl9;x9G3+SO;TK~1{#j~8EQ zufD$Y-pTW1+~Nv2`P4S1Yu+LNSN_2sT!nGbQY}UYOH?<>TtQAW3)|vR>yFTpR?P*? z2K%Z@^k1V1GVhxV6|tUT5f{muJtCuT_( zI29|QJ!r=dB(*EqC(v4o;A#B8cTwlZsy=w76=;?sp^tDq#@cMy(pW+*c>9W=rBYkn z5ddsNPmR#3#YVDVr62$JqrqM@3sb_+m2?YM0w-{>g^R!Zzmqu9`dsY!k-ss6kJFO^ z%fdSS4u&NI@ID?dTv-cNKU$)i^Z>q5^bhn&2|=dbRIIk3+9Y>fbECI$Q$%0xu6G)` zyydtPL^Ze4A`Mmg%UEI<=yA$FRW?Y@t6>=PQ>#$nQ<`0Y_*P&l_tpIxo#d(W!E2=0 zS1?al8WwM+yUS-`uf^(=TgCZFXr~<^in89CjEnX(X?`?byOL`^;z8*tZ*@uHMz&Nf z1Y?2J_{B^N7)8yNGQ)5-IV@@;2(46TSM5K@LVhu(i26VQPrZY;>y?UvO@2A@2r!VC zDwPo!qNVdw6QJ>)=fTXr|CywIg&4)RKGxl%PA>k{F(8)YRbK=ghGCc9=1yibdMLQ= zL)eZC&%q&Ftl81R24evT4RE%%^okZk-T6VfJdD7r;#AI95Oj?2d)f=oS|#x2$~PFX zb`SDSHkjksRe6>#eTFY#hkg;zKCk_m=fIC70CclvK1-ykEGLlB5D#}F)GzovQFs?I zlw#E%H{am8dA2^99rnS#FRpF=-Uj>|fHO3_fl}84#GB^e*+l=@C{~jOxYO9&qvYo{ zmdCC-PXEa_yVO4vR<;kScK^q~-Uf$dv1tm5@pgSvml8lzcyI9c6+8&wJ1QDwKz}C% zm&%3bG|@*EKs?{vAS;-ysbADrpwLgY2N32`_VRCjkST_li}_&BVUlzC6)Vog;&1^) zlf&Zat4*wb{l;VwSacR3zT-JU)^zR5%XBc(iDUUc4Q zN1j|1^JIp6tH_ukP@@;UOi7~p_NrJVJ#x;`a!+bt@ajfRh~E6cqL6k6g2|FqT*bSS z)t0*W=9=SSe$J?oz=dc~`fFGNkdRO;F01@dQyM{>&|S(e_MD9w2bqhfl6(QKaE!kv z!m%^EFH3iY;xJd;nlIv+H|IZI<+r>wUB7%kllg$j$mB4n?!;a9<(wq@J62F1!;v4( zCc#r-e7*I8kTI6#DN?ZfOu}5+PT)B+ZDeziQrS{AC=Vh^zNF@hDh=~*qJP&HKykWr zmhTIBuSu5Fws+Qj@pBs&oG4|_ypBD>I;SiWhcBvv_Q$!M%pNNlBm=jjU5|CRPWn={ zP8qz*Op!tAQyGvW!f$1$@qB{9j{&jJmxWb1$p4$Z(4L!hohOWhXSMOZ%UWhik6uYCxJA3_&+U#?B zPlAMyCVcs-))%plL2&`{qLom8LL@|?^G15HFN$_@`|7X^PTV$4Ff^vHgKmi<#U;sL z0UDm@w;N}Zi;RId?!W#){n`wgS8;1tcT*o}#W32DqkSc^gX){?uG2Pi(Vbdfj5W!$ zj-GZ6VPJwoY>)g3lAyw&ovZQLaONjCB^ev#UwO)iczN||QnvqH+qn_?m^wMua>k}l z_!o$HfGDrv&`FR96q&6 zZPvLM23tP6BD(;#?83c@?F^oqm~$yczRdo$S|1o{u-2S;hIrjhtrTPjrksA@d7fvp z+KmN}H>P?}$DNe~5h_Nyh@RKteyq70kNRb-{sc=}pzP-Uh|{Cfwt_2m)Oof=w29wL zg6EnOf;Xf*pQtj8LfpRjd$ihp3R1#qC6g{Q3_2^CBFj$YVm4$qlOyR(LB(fgBrtE# zU^cGP=r7dfM9nxKcaojI%}6Z(9eINp6)tGNAwpA9A9Jmh-c)HMrYxpfHM;@*jpJ~Z zg;MXuS8gmTxlm3oX0)w%sqH8&6_cRJe58*uZ2_`9gyw=pa3vA_5iSv*4VLzw7gcW^ zsm4wlO5rRi(cm8YvwaI<0-7i^(-E%F_&QdSoXqa|A~84dEM~i#ENJmLz#eh#HS8Y> z%3^Z`@ApQAtfNdmqU*1@zJk3ktAuFYq7DHpw}+J3U;{82{%zojAfl7rT_Jq1hS_cu z>65|fyaOLh3+5J~*4_W4x-SpfdYheQ33X(?1OkR*GlN(1sl#1pwVGACO|1@eSX>jb80 zC<~KNoZV(MaEjXc{QC=`(X#*>7)_>!s<01(+XC$EB9Qkg(`4%FupM3JFqZhHOG3&F1}1n82K%iq7=jt3FS@NmYjZa< zo6q-2FCeI!TIB={b0og4=*e0@C;suocJ59K2;H=!#K~mlXWr@3-GlD^+61h0s~RCe zt+U(651WT7IPCpuq6{51t&6}1b>I@Eq^iNKS+(DkoGqouUz#74wMA`_UYCD{=rGE> z2u$VpFu!d5Y)m$*i>u-jd>Yt>V=W*Osb)49#(%hf7@+wzH1X5zW+Zc~Po#w;@UQ%*%Vx1?#3P3BIOcU@YwcWrS>G!{h|g z2+25d?n@>A(h{{ZPY+k z{ELhatJqcWXUvh+Yqw*mak$V6C|Ut*on1*z511HMV9IUnU!U2|=dM***vaICGVz;C z{6_HeOx)_t7!8+&cSzt7^%X#T)7|*@t*~?G@(|*Jg(}@U7M225N297dsnd#9u;4R+ z`~SLw*aKbSjl5wTJo9p z_1v>v?I{Ki1G;(#RK`Pl2Mv;NVky7Mx_>XKu37r7Fqe@q^WN5H zgXhtBk*)dCGu8I_nS`YEJ5H4p1R;@bUwEA6P=FyauQ?#Xo`a5T{dJiaqjUDzQun8) zKu9qEzrU=gvWf;u5%t;P^DA5}*<)e)_aXA>z1s|A`EMFWq*=`MlEKF>~F_FT3inH8I6;T z(IN%a8&w5NCYfljyH&?C(4js_a8jzs#Gw(bTRQixB)dPGw`LawnVmG|6BqM2FgUAY z&hCj|LrO9W1-vyMNsJuS8d~Tav`??A`@ZOQf3bPhBX2_c8F(n4yqNb(r32QC~C9Y;HH?PUs z-+B?J&j)^x_?#2E96kzqC^Z~_htXbN0(KhJBA2cRoRv8(t2XuI%7u*Z*1`&{-h3Sj ze=PxUlr4RuT5-Ep=R76t*up)`S3kO zTEcT`@6O6@Z;F%6TKU@43@2HeEkD5~V^~(KTOy#K8sNd;tD4P>zDTM=1U{a!s-+~R zjeHF(J|>YvxD}q7XZ!iras<@-`31kUEn{1!rMS4RF7JX`)bh>%Y>i&^R7lW!sKl*H z)@!_KU&L4&#J8e&Si?rPPN_cN1;}G&S>~pr!f|_`)NcJ(YNvMZxklAF8PwhQtMG_y zW0+}&b)#VI&`c0@sVCSWSpbc|7xF1@1Cz`Eebk$1S3?`L{ihUkZ0^40vC_0Lo}WA) z6igoFDX5Nej1x0LFt#*iil<2#NBiwzHRqMKx|5o61M#vCK*nu6c(s#V)`L%3hWoU+ z)T*~H2Zct&=PA6ec3q|xi=>E298_)zYm&WsArjpeEiymTBb<>kWIQ%26g2fEvhC{D z%F!WAR5fQ+XQt6{{m-MYQnNQv0N7`5*6a;(SYwSaGmm8s;oR;vNva6UTDBl-AKJRj za8JyWT7Prf{_mcapL`)J2B^5yLRm_4c#&BE1uz@d3UH^5t;MZmPX+KT^9dF;x(wS)x8To8lRd*_E@XxV5;`fuwGx#XR4eEB&nTkhm@T``J~xoOHn3@IZ0p0TUdza=*1u|&V77pV_&M({^;tmd%q%R(pvbD} z*J8q8ndWnEs_!1FGaccXZ;RIYb6*RssslLrIFxBJMaRCuN+PIOH($c@A*=>{mo-1~ zl-vbDgvP&j4`(A*6IXJnh}FARglXeR@Zz!bOM#Ryszp#7r^nsgD&k8e<2rb`7rGdq zv}tFHp}ed0z?h#WU7#Q;EN`fHH0$8yV*F=r`sMJiWfV|N*e)#xA|-Wgw#*hHYu)=Q zc$|b$W=#~b-A|fewd2_w_9h4K1=K)rK#I`%Pc60nz8&*S%Du=j|HnM$5{2=q!Ip~0 z1yK%Z2le6T&;{gx-Tk76>9|=(O?n$l3NwVXDr$*BR4&L24 zY;+2^w%6W$Pr504@enldwtbpsz@7TNn?>d?nYaC@LXYD?ep!>JEm-O;_hE6ueD9cy z2N0n0f>s1S9Q2xiXbSqUaJ{z2B3wc!-ptS&bpc1VZp#Vtit264-H?5t_l|bz3h^(S9aI~cW62f&p^#FLZ? z+Yl@VsntRhH8Vat*E}AYUb_DN@o+D*&s>z&9c3fo`Km{j&^3My9l*hCvooGPL4O?? z(R|$y=^=%?7Exf4R(jvU{;SM!)$7x({7@Z>$RkQm&hJu}`v%;LY92yHIoVRIyo{xt zGWLK6ZBxXZ-4(>}Jw65TM&Rt@hp!u7(6>(eqklwB4 zt!72u&}Ts~T0^_+*Dep#kFs=XCZAWjR;lOeLPydQMWObwm%8cn#if4icV@&n)qXhz zB2dVmj6ceA9n)>dd43!FT*TFJ>Ij4st#mJ=4;L(l2ZwGg@jTlr6q)Kt$DBL8QVQmQQld2 zif7j7uZ2n!Q6ZZfML2F2*3=Y^B}A$(8-O*66O8BTkaF{I;~>^M_JD~SL+qbkN%*g7 z=n~GQE29v$wg_^8qG08`JAT_Tt; z+YMo@jIE|uX;k9g3XL6uM6|Wt_#n#YtpkexQLLT~m+SShobR{aaEU+_31)J#JHG`~ z4QnE0x|ZvWK`Sp-@1yUuktX`1MNp3f*Qlw?yT+BfmC95h=aH-MYt7M|3itX$T-)|; zZ|0ZuF*jQmkzw5%e>=$5h4JvcCjbU)zRmQ1&>PGiv+qOfE(e^`L71D7aYn`4vZZ>_ zzlv|*3#;@_h295cXvy`Lm$lBD@FPQ4KjMzUS@&(-{N#D^aFMp={U$-oetS*d1i4(n zlsUskl4uRk$N70?7P~)aYUKXFMqv#k=}C~-kzO?su1NkAwpa<_vWUg`b@QNZiu+tE z?x6W67-lXy7(+N?6-VXn>$R zUcKJb2?PmxG-@xI*$;_1# z{2!8LETwEpqcoIJFXBtr@0nn-O(FTH6`7S~GyDG7+Q#gRvYK-|q7w(4JBuBxiBFq3 zMDY~A)?tm5Jrqyqowr)o9GpW|fb7<<o zkz#&_-hFnTX~ofme`5o&?{i_)biKd-&o+Z_ z<0IPf%nbAJ*W9kl@gk4=MFO&L8LS5>WxaYTRYdjIAWjH7+-`tRWmGFVJQ_6tKMJ%f zal#^JwLdDwM_`o_b0w99v@F$UR#boWWA3OA7s}SIUl-WWa@>A@o3qmefw6$%H?CRd zO#KQUh*hUt-kr%kaFic?D#Do$wSU{i^W$8dbi?;|B;ON}Sf2-(!6#)poj+<879AXA zbfJS6vIoME7FOzBXNaWdy`t1?2zqBQ{H2PM?7{B`!pk?Fef^lB@%{6uu!k~#KA*<} z29O;_l;o(kQ4ux`L^h@#B)Hr?ez(e;Y25ogUZ;rbuIt^Q8X?O?oU{ zkZFI7)?*TIA|+hGU+O!G)(|B$km_A)vw6zFh08l(VMEvxGuNGe11ey+$meZpC9+V~ zKgyAN&U~BxtqrN97xXA4P26rhtU+Ub;O`VEnsU~WheY_GMeS4`pK>1V0jSrkqEW3y zM#|1n+9G*}Td-2=CL=$#>gF63wj`12QZQM$!DH6M%bshfy@(oT8$rrI(Z*+WReqhY zGKTP8$@yt%?@(TJQkE^4a%(4)^T$4WB?5BrxQ45aY?bV~WBt#j-I)cakhilpB>N6dE8+Xqp-md>2+=;Q5g7+KdW5r6n&uC|E zx|E*=d9rrPiFU*(oc3zylSIy~$pxaMHCa%-SzA4EWNI#0)bDe9 zV8)$Aheu$4Dr`04xN7LL5-mNczfM5ZkVsnlTEthJc};Rv=H=kM-KYEE<({KEC1l0z z4tw)4bP5EUhV?OVjsw{{MCq;mc?Jq22&b*3?@E8~J$mi!v^k%5#D==fquXZ$>OO>C zwLoR#Of|!=B3PAmKqC{dX`(Rl2~ts789Y5rpBxepyB_MO(UnTOHSMopEoi4$PrPc476i^~nXc5!)8pP-Bv=9Tds=UyXY)Z^A9 zUf`pqhOc17R``@>av&L*i+w2K!93`y{Tk^#XMdx*sA~C3>I%n%IUoGtfCR69vB3`_ z+|^~w#Se(oZoOiT)cbg9TYg!TcQ)4ARq;7bx=|hIQ5U5h99_+&g?nSi9AA-1Kk|In zcF5l#Bx&!Jb~%h}!xfl$*F_m4Y!=T>1HZbyoycu+<)rKNL(beE2c9MUzNB!--nX(F zi_A)|_mXiA+{;YbVu-UZ&zzOLZ#JK;&x{W#^FxCM0!JY@sq_uPoE!4`Pv`AUm$ZJ3 zyQb%9ra^KNe!c#mMz7N1)rZS^x<0gerCQkTU-Wxk8B@c$*1AsIFYkIFHA>p$Oppp- zx`U|)R}NS$zMTr_5{94=L1=TWxa; zKm}G1p#N)jRgN%(`-_uT&JaB1InuQ8audB*P0Kn03U#)GTa!)_o8puJ0lvcA_Gd5XzzcS|3sZvx>-fcATphm6`6z^O%=YZdEI|1FIThVM zr$T$1bjakeu*_6rNSsP=J9i{c%#El0CILB~KofoJ?66U*gR^FfT8^68L0&}X$6)ia zESA*7b)lAr+ul;^<}WWNzzxQ99!@o#%+OqM%{9F&rEyCdJ%m>)e1%IKbk6ZF@Ko8Y zWb<{UUDZFMg!~N>LRIH>Jw}kBWXH*657hKy7^4YJ}x>>!^e(nEx0fAeCanCbSgPX-@Pd89Ce=4K{!owf$ZDpZgV;VYVV`Ae(?=>mX8B1r-gX8O;Nx; zQfX0qTIq;C*Y}X=XxM>cq0wlBA9On!6YndK1-JVqc*Oh zUdk+(mx5^j%bIEMWlqj z1*wEn)9!39Y1r_>pKAs8-JzUX^ELO`Y zJ+ObKsiryph0+r%w_;cu2+<5KK1i#jT;|!^z&w&|^Ws;w&Jq~Rc6%0m(4+mj+^!TB zBBdQnYvX)B|K81GUghX%E5Tc~S@J9WywkEwfwd#5vLwu$?Ioi);?!sE+pLf8DIX4U zf`xlN7wK5NRt|kf?RoH;spt1H|JYefbBmIpR-*oBK=JUsj(??U7oe(A{0IFx`71-3 z85~&J;ht-<8V%TE>EW%flrB@Ae-XE^dD(M`Le}NqiAQ5pfvf89c^dQz z7jn2_=^cSSV$Xm+gWsXOHO%neLYBo9;e(lB4`0{bu4Qh?2#TSO{v60;jvPvCiDply zAiy-zxwXRbiLZe>5Kz)1^EdOx)tAs;Rr2h;&QA$$ijQ;AZHqRrW;UX8zb@bf=ye@u z^+=z^lO<)T2xgO+%~M&(dm*3se7k;2;kI`XHK9R04|Q6lu{ym|pP@DKR}*iOUt4(~ z!HGPyBUt?WP0|I(K%B56j~B=Hq9TaUp|8ULz28@pn|HDE4LdtzMaPW~{Gt{&nOMN!; z8Z5W+Syij`)lW-Ge7sv~e2dVEx!Cg2Lhrep!2d(lxA-&t$N$bHlp-l3j8Y``l)DXK zxlK}0u8~mg_v=Ooxh%Ps%g8+;_xq?Ymul|h&Rpj@%w;Y+AK%~OoX79{2ixcK{=D9= z*Yoxw>if=_Fnn-KIVGETnHhxNC<9J#A*~_Xiv`8?l#v>1EG0b^UU5tf+spqtl`%g0 zOmrE6oP9av*G`}p=gkUO)$7U)ZdFO=Wc8c}h8B+H2mzsI(Auqme7}xCw%c^=Ii}Q} zA^0asS7v|tAkankg z_<+0nCoQ z5heIE(b2v5qEw=kWY&2>>iOSZt0P&jMS3U?SvMcx&UG-JSil#)ilsKK!;5DKQ-Oi{ zydv7yo!Atnr89aAgu?qF`vy-HFTjZOPh+mKGp+p);8RE*ShmSW{DqiH_$Fv5k#luN zZY0ABAe2IJ$6SoC&U_pPUe&iMTV%dP8dZrrZ0;ik<2}ql56)ZXdB!>Ylm}CmHGPW% z<{2@1obVhr8w4l}5y2Bj#7VJX=#G>XM(|Mjj^`ZB+HhCmk3~7Z3lW>0 z|NM*aPKWmQs)VVCv`Q9&CLgr+-x<*7_Rgkpp0(ECoOO%_SfcqRtw1DDdO5X5bh2*J z9t(VE=vnmfc|E(Rt>tN`VB3$b;edYbYLTVu4~O^_`0Y)2ivX)Y*$s1$Xu7+DMUi|f zk`b{K#7IssYA37LkxH$Z^5ToPRKa~Y`(dty^_G~f=bY?6b@^JYslGQf$?l>_OnT;h&bZpF=wF)g&)h6yWA$?Vr5lF@fyVVl z=M&pTG|aog+nqy+bcq_~skQSaFg(hlZ*MkAVrcBp!e=Io2#6RkD^%mjNj$Y380Lvy zF=OdS>mRgtnE7n~rWH=@P^(G0)w3DUolTznx~x(y!98c%k$z%HTC2G}dkFC$|#q?!C;~ zp{=>arNiBr#ciqtCc}IQzgtr&0awUppKrfB(rN^^=vz7Cb|jAvjN@x4*!SQYJM;~K zQPUeO!tlFgYw6T`Fn3ue??ZXP$%5*)fTa>PqeqKo3aVnTv&ytPK7U)($Gn zV};0>P6Il(SUC^M^hY6J>FXEJ1Qz^0XlgltWi$5^cadT>1V>iS zaxd(65&x?9sdnz=R#@Tx;KLlJ&#Js9`7MAClddZXJ3^i+#@wVcbP=p_(4YVJn4#Li z!lo}OnnvOSO|P3_{Dq^(NhVDDzt|k9m`|ytCu?Er{IROANKVPj#k!$*A^jmmkg?LW z3QO7>PtWiF9!Y7*6-bc4msg6oc(Oe>{50tn;H&1joGQ#p5wNDvwix}@9ownLkIGtG zIR2D+Ts?h5bw@}sA44oqbm(xsX^3U^?;)#~R8&z1jVy|V4q=pD^jC|cSulX6Od3lt zl&dV69O2dw%~C=vBm>6v{VDIMz$@NIzU>&Q3WkJhw~m-|6xIv>cwN=+dg<1!2KrQ7B!oyS@IC{2c55>%c0oc2yLpjne<)%L_6E6%uI_bY_KU*Q zTpl50=ZD`Ld9)2iN_GvM+cPGjwP1^)RNuy1i47wTD<~k-i@2BPQj_X2*AYjw<~uY# zZeB(W)gq2!E>LZcrpg{1)!_q6umt>1DQaMA&;+Qg)UGDu+HpLTKc{3`&^1$GmaWg} z=wf&RdNu6duXNmNh2aE^VGgO?&1_jOEd6G;-_}%7v3mPb1pK*)Z=VWTpmh2sZLvCl zhgV)&c=RB$#Ydwh818T-B;4RemuJy!?{a7C!2)HSgBdhuWbT^_8TVm~P*CvUkQr>y zT5oyQP_XyUM8c@wB(aj2O5$4I7enqf7J69y$V_RS-W#uTC$EF5X)7-50xd)-CgjYb zyrm~EzZG~)>8rKA@{rE+BF@%Y%`~qCJD)hrtZ?A=--^LW$BLDk4sV{bLTD`e)CB)o zD9iK}>LR}iSp-@d_El?PIRemCjybw6{P^;Ubd1(I9=TgV5r^57OSbs(Sj@?;vm;0U z{AC#JL~#!X!TAD#5cjF$2?`fV@I;iyeHil+RT$}c^vgAN(Y^HRS7x5OW67Z-X5aFP zj24`}uBZ5A8@XBwHxQ;(Ftn9x%b*7eh^@9ndz1f-o5*RgP1Dv-UZRT_9C}l=`-Yc& zh0x0LSxeNr()YzQiGW*auvCJm9H#dyFc`{1kTZ)f%fvdUOMiQHOa7XEF2x?t_MN;k z4PwjxJ8%UOMRS88@Fhe0`IKjmUu6D1JXSt;o^IK82b_5-mJxKL znWiYGdS5Dnc4{fVp4E|P4dl7(8rgE|KgN}f{Ai(7y@i?NXD8`NQkyD*63Kn`AH{}; z_8*oG-sm1=rQ^JFHw3G=(O6NxRz3E$W(wKhw^Cd~bT&1FglLq9Kvpc9attHVbh)HF zvCyZ1qz=2u6DmgH@nGHGmG>#AeuyD^#_pN15Gb0SlfCBeRS^z-V6|okF(z2Z5Ax1%2#6Dfx0K9j^B5x z^kR8#F$Tw!H||DS7Xy#H+shY5Abi&yxw-Y{x+8Os6qe!olljh{igumw zHL{Cu#C$DKNs9XiKOC=$FnBe6bo?nE1H8<&s$n8n{8B%#HgWh<7>(Ci6>0k)PYaqk z`zsMm#E|o2cKxA?9y1!p17Nq0l`ns;eMsowm!3JJa zC!`}E+Vbj2TV6afi22R$Ve+;QJt^(#8&FXd>Idim~UF-;=XSrpLfNx zAj0_E1aCr^#D>FO(U@F^y~NrpwvXv%qK~&&Qc45nMFxdn2c5*8toxn;wLtv@6;4qn zH6x>NsT576+(a5{L6&xXs8We_pW43dqL)!A-rQ*7j;B?2sGT0M4&|3|CI}hHj0Fc? zlbJP`#2dvWGgY46%RSEvbX4PcXe6ptE`f(Hqm^uy@~Sr<9Pckp_g_BFms3cJ)b(w3 zpTCB`8MthODs&pSKa>MLDAaqMJY;CH&qD9JB8{)E5DEHm5C5lJF^J}_cXQdb7r!!@ z9;_#RK#@B7cxjq;h9B+j{yQKZmQK5pd`1{vi0Q>9(^+|R^exHU^ho)3QE2qHP+J6F zfZz>LdKbpn$g_%PI5U62`4ngEbyK?{JYyA>rGhkNx2p7P3e79C&abt&R~x{`%%Ow5 zMmx+-Y7oze7%i?3H^j`POOMpKzTIu_C>=v$6}~qej=NX#G9K;Mtt*Pj2|{#855|Ug z^#AccoHCHb-Crl^cs^4hr16tp`Q4$aN?`Y`jw7+&3eFpgsO6C|YqB`EU~OY-tn~`& z*{Vb@RgQ2peDMv(1LRgb<}qpqj(U9Di8<10^Fnd($2AN#FQ-JC1lZ*te>b zA6J!>-pgFii(qFY2}Bv;!~x9dUQobF+)%YOl7n*Cr ze>WCrRx8(vnJ3PGTxQ=yx4C;HL|W?;HCA+*M){9?(t?)UCYSWNaFNNoB;+N*lTwe# zh9BLBDM#)l-&K~?xFt64W2nVi_1%1G&$Exbdywn9(mxir!%%=#{TZ*kTaLNI9O|mwx_fyDx@g) zGXVJBi$DxW_(ZmRKJ6pEX>mryUkaYr2x9&U-Vp2-^o@6n$DSN^4zjnqRbKhRK0m5n zr<7Hm#;ed}7zhmQFuo4qDFqej4>w$KpH*d}Xmrj0ak*^Gb^6^|(V^?r>9*`quV0*= zC*~;IX@%PHp&u&K1^pff&6jDtJh5Z^usSNd!-rj&-RR_vPry6; zcG*Y=P_&8&EHM1~Heag{C8ecZ1E-a-!|u+Z7J)m(QYA)^3(}avsU`fZSk(L0lrY@R zzMqoNnNe_9rOEh6NBmz^Po?mn4ZNvg(>;GZ&*K5%R`$5OYKKv`iIT!%p}&94S9_=1 zV6lkW5cAd-`5q6&>>^bTPv_1xTw{V?76b*A9%NQbe;`0&~?0V{*|H z9iZ_lGh@@fD@}JHIFw@swMKB4htcCIc1A9iB z-!uJdSKiB2I)a3>^8L(~w@{IhSk4x9qf7Ayg6iYs8&cP2a@|WVmAf^a~VnfIqZSO^fj*k=EM2@a2Bu!&kp|oCV1{t}cQHc%^OK0~03dQIOW?HM*O`gG zNW&PLZ6^ZW$fNmri&z2a+VN?v4PqDBNTBW1eNboeCnq8JmiH=W^jqs+X3%~xyz-ce z!K@7hQE-q3@tjyaq+pkJ%td`T`8LD`H^iL8NRQk@i~|V|J5$b8W20J zix+cH{N@j-OwrhI9Ns#0=$e>wT_rO4jcfsS?IC81LAWA0_RjPL#ddd^={07P6}V-d z!f_C%-*{W9-Rw8Sd-l?lUO+-WQG-0i(Cx@ z_h&ixg?j`~;7THTbtIY|Q}-qV_a+7bf%PM{`(Dg!C=RV7fL%cNtw!7jmL3c2I{U#;d(wQ}UlIZYv!3_c3pduI%j@-_@p1Vhe8TUAYte z{&l2EWJ`O5ij&HBsn^)@=Xq<191D%NqaLQwKI*M$9i{Y03FwN9bh3F(TIIP`=jl31Gej zjxnu63Mc59D9G)+HKKcuv(%Hj&n@Y`Nj_4B_zy~+SCs!K(dfFULicP?_Pi3ZZd3dFkFxg3m^(AcgoiDywMDp>asK(Q%C01mi10lld?Ww67dP?mEE*SxJ3 zeS}nC(n#5dpI=sz0hW^D1Y<{W9Laed@l^~?wRPM?oHKw2$^F9!#7g!}Z?#yLoJr>c z(+ns}q0Bt1x2=xMQrq3H^?Jd52$K|LP+Zm30McyZRf)E0b;}E~{ik zfyH8Xac(Wc_jSL;lM`bl6aPUD6lL&F{cF5n;T&u2G%(}~(i<~~_1G0Orc6Z>6B!?X zr}0<{X=DsNX*b0L@8%87o0N?Oh`%W%fR?5&i@*V4N2C~B%8A>q zD4OgA{+0P@wPGw3_pr7b--=N@+!1y$@44o;)OydX~}70qV?ai)dGtk=+Z{5a4ErQ`RB+4wwewjj>FR0 z&5>0ydll$=;7VQ*=84JZ%BaM8)hlXg- zc%NGe(V*i1r+t`~j$!s#Wlu^a2(#y5zhBD_AR87y1G?EYGxjei`ZaZ2EsjZ@#MWBB zkP1K1Js;fq3+^Rn6oY2gQ2P0+6@#707k)J-6RXlrn929$hMAWiyqR7*~xsm$L=|#-j-#4tQHc#nA zE0ld3Fk)9O&>N`G_3hKM=|GdwGP7O1xSGn^`D^gJ^t+ORo^w(?35>e&clMh+V7_b1 zuU8h@z~i~dcN(yhM~h>N>ELDWc6)MYn;U2Crxxq9mTXgH%Ymq)nAm>tv3B(vdgJyx z73lLmz1K8#>Hke$caNVrt|=Z#>`OlM>jo35NN}{0f$dNO~heah}-tXEy{0rAN#L!5-MvxoHckfKlTMm*v9^Qynsr_X>>Se&lwHxu{>rSLN4>>}b`vt` z1+z1I24NI@`iPb1sLi(Z@dqR8dFLcA@~N|?KgOTc?{dEV=3$fIVfDela3|Krzwwh& z{S#BJ4+O-|q_fexs~r3lsX<|&xmLUejYsFW*>1|T4r*372f9QTBcU)oI&`J}k&x>( zg<o=t}nCG6^hDWZKz3|3xuY zVaJg}Z{&&ULM#>Byx&GFrBX^)v|tu${A|`II^8EmWwgt~t zZ6)&gcBS*EqbM7?d|&m=_EhgWpMkmCV<`*H$&(S1PAw6*bMglUa0TM|w=1ZN6ER;Z ze00HYbORV7*}T&~b-3iS!+LHwq#sp0n0BJIc(mlIf?K_=T1h7~lZq6kx4m@5{;>F> zVprV@zW_cOIr(nF)hH9Hy+j%M17}>!d?qewKXCv?t9vBRxW9AFVsUyqaBtGzncPCh zI)FCXJgZN+9YrU2*z6H3f(Dh%rRf`XCCluptz~L$EZXhmixv7JnK(xKl66eH%XuCA9;Wq;cOmccv*b( zts3GuR`F0{%BCzT{SJ(JfG^TVQThjsnkj?-T?1y`6Hhj<{LrN=I%py3_2GWbyqM6s zfhI=Wb?AFc&#|fyX%iS@4 z>Xd~<`aV0LOq*%bV)eKk4u3m!W94t3vj5+=~SM>Ktx%6K3 z-z6>ia;A~TNWI%eX#;GVsBtQ*oy) za`VAL>Kh1trym!vp%FPxQE2C3rGg)&efDeg`!RBTM;!0`HTI9W$pn_HepyceI}Xd5 zC+hnJ=o}8qogT*+y65AGObJZiHkjl%Y2V|n!m&OqNI!LFDs?h7Tw$sw<10pZF_ve{ zl`CMIR-A*TmL10*Gk0ThSH2@Y_F-y=4oTJHQL0)EHw{NvpU2@OiT6!LZ8=>FR{So5 zuo#RnIXkstYDo#Rf;wEQDFU1OWckg-!HEGlUhjc;AcsI}0o9_v*Sla&72#GEBp9P& zjn+rO)G5PpV69`*HY7;P7$gVtuRGKnE>cwM$J_?UvOXh!k+e&}N&g9SS$u?@%CCQD z=&0tR=|Y3IWV+2+ZRB0^#o5rF@e+>(#XMv|clYz*o4ZttCg~@<%KgXDJUCClZ0qS+ z#|&SH<;6@`Nd^5-iqxPHlwld4mhb&EhgIbfygA|aXE2JE(6{UTw`%wjK6O`{$6Tv2 zjLJlnP3hU5Dg$=AP$~jZhcze@QYY5LsV?`Vc@y=aO>@)recR@jMyS#@3@@b+JYpXy+T?wg+zW#d$$HLYw~ zVzEjjzFBFr@VjUcvXnD_!7838It-Tx9OKIJ5jBEHw$01W;KYe48~E8_{~|t5mHend zt%g0gX>4pQf35PXNms+7@woBWZgC~7bfDyq4+-_-;E#}q1t5I?>-5E>=vO$ak?e$r zA^B7U|3M?@R6yPkowB)&vicIkos~Z1-N%o6NA*L;4VTQfUsL|u_cPwTA$i5^J`vL( z3G1*$eil5~l6^U*lZ#V4J%WvBXZs0-NR>u@!`y_wPx_g?2V#6)XJd~Z57Pv1F&Rz( zi++iFTc0YrNt;=)IX36MWORw}?AAAn1o<+wlIykI*_OL7kLkx%b%q-<{SLP0PexW6 zzzklMV%2Cb*P1CUXaim5zbh?jAa9ECE?_4on0?BczOQ3&Z`PWO#cKSA^^Qfp4`&@q&Mco6;jQz0Veu^)$dS7~Zkq3@R zhHv@wW>PN{6f-* zl>0pFHXElKeHU%Z2RhU7WTuP3K5?E_Tmp0wL^}bC6ynnTI*-thj-6DZ=GE~5K7O@M#$V|yF_s7bu$ut?uCb3WJae5mzX!8dfFyKBo^Wo+i02(g@FR)Q={Y1mLwOJzc=)<59#nmZ1za(MpQLSxytI{(yQF6ltD9%c`j!M* z%6{k0^I(<>Nyf)JjHm>cmqhDfp479TByiJ^!3bVdqx1Mib5*o6* zMLyHKO>QCv)A0pWe?B23=6X|w(V42q zid_t9{}*4$sa~axhU36^hhTOs$A<+T@cruL;uy~09jcP|_)Mq%%=pm)ac4e#FyoIH zHq@Fv7#jE@lNWUIt@Nw3kEK zv8^hx)a*9;F4TQ~F2EQ&&r}6oaOfR`4lyGo6cV$X)$(`>sK%@w*|9S6=0qdjK=m>I z-Sp)~y3C1&SU%Hn)8qX==}#-1oE@ZTg-)isS|-j~I&ki1i(n>b7+H8!s?5(@K2muV z-g3CnY~jo+1KFQm|8g=v+&*u6gDoP;Q1430I`T`CR%6zI?HKja;sZikUAO!Lt5j%| z_YTcpTaG=5&vY=c^n_SSG=nj+LcY~*qtkvLoSTCM&H0+L&)Yg&pGGxZ(6&DiR>!Ax zWoDm0I<7lw3`(&NIGY*oCv?oFsRZu&DZ<9-d-|btu&Nfe$sg{|x+FEw(g{lQikicLfP z7X3J_LX_qE#USXSXI(eUI9f=fn;J06EPlC^YX**$Bx2IW3@56|>6yyNrDbNa0OM=(+1yRq`~P8^uYIDnwPHc>IAkP^nRr|0GX$2$y!6h_uePSb->R$RepZ>p zxQdl0`DsWZx56vO>9|ckp?#v?c#dI1I16z3dG*U$tUFO{AL=*#=@Im~Vbd1}Pn|2u z=dn}T?B>%srPwzN4G>ZzgxLyibs$Df!zwK^VhOKLg)MS)2O);-!AlxFP%4OK@u3b-O%kRRlnfgGu)>2j`L>QBYhfSacd zIwgm%?Z*=o()5utAsV!Qr38-ziH=D|mXV;qpFo<#1AE`HjiAMk3POwRRE?l~@!$2J zi}&LYS#D)K(-wFC75i-Fhi~T0dW2X zCE}%C8vc(2Ecvv@_zoYlL(eLL5a}39 z(pvg@ok>y-mF-$F!!g{zs$|6)5%eJhf!Op-0JoiyID`6UX=p?s;g{Ff{bfll+) z)-HRPgS7P>y` z9y{(e=E#gEZP#A#KJa~q!Q$l!@felu=nwc6>q|@ya_Wie{Z-`lhXJ(gO$Y>KKZ+i!WQsWVO<9Oip06^Z}pE z7k%6bUfynM!RFJcYI!1g1F!`U0r$c;=w2QENrU%BiNz3ZBGBuvr9KRo6v9Ec%@@DQqP7AOp|mZS*iY39F4U9+t^6{B zj4fuf>ykUCr#36R_A+2eqA=~$GnGyr5|!n8I((n6)aQqA*}o_Oh&-jfS+-e$zUjSn znBiI)k!poAJrJ1>+#WO|w+3|vcSb_*mfge7{(PL#2Q1{)r9>-{%)N*pvg&HesGm~zoo_O70&_!8?gQK7-~$MtK_u~%ufCF_^&i%f>y z;*UIeaQZm-^7*b?-$4P2&L<9w|IJIzGm8dX9L+wu49fVk{PL3%IB%t?EWk8lT*TBv zT@8`Pbj1bd3va#pT0D5rZBn%SCu$?}0a^A=AZhE!v^H-}a3wAovE}X|aU8?*_0isi z(=qou4eRqlx5ywm#C0}T0RjD6&04T7qqjI!)%d^?alLwxc|*<5*U?dRcYC7z=U$Ya zzcsnLORekP9<+ux07(@H#1U_%#?`ujOm-mP-HbnSSL0Y*7PfCF*qU_bfu7tQ&lbIQ z^Q*koQ1|eJP#E-0yE=1PSn%EysyV|&iuCr?3(%4Y{!>8NEld9$6Gl*=tEg)%!X_Ra({#@exv9!F!(++9>DpLX^SEzqY>|=8EIx$%LtHIKx z;A{UGwB=jc0wY0emLNN#=L-$}y4r{SfWQr?*9Q9jz6ScwBvOd^mDPYFyj*uPAs@-| zy6F69!d9l1id&jxS2kp}msO6^1&9bX!&x$DE0d5%3m%?Zm*W4e^Kx4==}N~Zq@{Ir zfzg#pqsuv5@|AvS9$H;NQn`Kxc`-_khTO5ixC>mKTd^YE2EI<8L!-}fDKZ2!gW^TZ zp$~v(B;VYb2 zm{vvHqv;O3H!907PN+oJ?BGAkG`eL!qpmo-95CbN0>6Y9-JuERI5GSAal7rR<2imw|>9!ae-A3a=ZnWkmFvkXD->^;^^7b1W zEYtCnxvea#kHW(kRg~o3y#&YE39^`Wq_RVIKOw9CrHbobug+@&aWeDUL(-;#Q+tG!KK}r@sRDdwi(?B^ayy`jV`r9TzvwzD&Z4e) zX-IvMkxR>%J)JL5m7C9_C3qG9n(hjZzV1&H6$5NwB~4zG_w`*pXN06a8G<2>Gwa{n z1ic*o$Ygc%nsLw@)AJMPAb2;r&dm;8o=z!E3J1}@=_d&Q!}d|Hj+AY)l&c#Z`V@Ch zb<%;dn8lq>zxyqML_w1OY-w5ue_LTd2@;B86u$*p^HwPj970CweFpGQ;dElI$5#o* ze@&Dnw*c}Mdw29&@)Wbo;I%D*$vI};N2Pw6FgE8c`SZvUQ{SJ12}P`y;=Tcoo{2l@ zLBEJ8NT+*)qTl!tLVU%K5JT=C@)q|YAR7bLM!?n_clxbHA6-m1r>jlR(3IKklOxkZ zx(=CV+gQBs`<+@DSzGJ1Wix zKF{zVii|G2+}z1>lCW6v0~;ywH!zG}X~|*ZQ{gz*p-UN8o&HNRS2ksgmGYheL517L zkt2!U*1^q9M|#d?evoe^m1G;`vAP4iD}i(CgmH@I$BhgvWpuQQ5hne5fE9XmHxR2! zv;K0bQwcY@S|->I!H+mcYmP4Fgb_7HbcS@CA1Vgy^sfokK)MIHA2%EEW&?=<`8=!n z;CVLu!Bq|kqY|Z=*IlvDmP4DaM?&Ey;Nv`(yyuNc1&ZRERq=sfkQ;k|??kY=ET=rM zNd2slJ&xhj3pZlP`0cT`wPs7y!t((vrWCnl?r9w3DABBUr<;AZ|31XikY^P5`SCZF zjguNLf02G-wjOY@;qaJG;pC4I$JEJ2=|cYShZJ{9uFIkM^7R9T*Z?Mp3NC@>nP z&-d+DiuKCO*14tnjA)p+c3Iwe@ZNEbYs2Fsnk9-x^qk}Yy)8{}=k=4I4%5e=dgCC8 zqx^U+^i6Dk=x=Olms=&Jdd;m#51L;`@=dpU3RjSrbT(IaB4R%E`wrmT%GO7nn=Rm`FSbTp$@3x^LRq&^c zO~#Dy&r89B8Z9)7#Ky}jNH&+A3}Pqag3C_2WN?u{?6k4@yWN8ui>1j*#YVBQB+`0?(lr~)HyAoip1Qk! zFF7umidtS@iKXSQSK0Zn%$lY_zn@x7x)1y zNayC`_=)Pib5R1Q+Ic)R@UTjmeB&l!y{!-(pThIIQ-HP6==EnFa``inXMSmv1G5q& z3{@1D@0#tTtC{+d0zH?R;rMRG96^bxy$=Pc#;7%V3lGR`T<|S~NElBMSdinVeIL-Kmu#Gf^^G zO;Dcpjc1ml^gHgtzxHOipITDqR73JT=HLgv7`f;wld;F6>we|DfZ2KAZKSzjb&>(Z zu{Arx=XTW5i|Ho8Z@+Fi3s83C7KoEN?~u_OZFNt6e{>Hk6)-miJ;2-J2?>~|ur5Qc zN~BwP2lr!%(aVkMmQ9-c$`X%8{m?5qAawfIJ}{{MqGU%-^Hius-3w9RnEpRlJ1vK4 zPW-d{q+gU)no5qRNfbq57!C`ZdqreMa6f`nYCQ|>3K~;zK50gw{4rGj^`=7NAZs3n zpfiMyUtXO4A?%=QF887@%)HoT9)8@R<7%C>HT*di_og^dV%Vaze&^%8MCpP*{5XN6 zI3nJBJ>ZjN*%*BA0=fb;U6P)7x80h*m9e%CgSQ*juj$aCAM&TCkZtGHMx_;D8O+h8 zSd_3C$fb`(7fka=0YbD(K4H)Is1yN&k`MpWYhRt51^%!Ut@+)4n))M+KSgCog+irV zatdM5X9=#z6RzU0h&zIx`L z)AA>iZPxX9iRtczaYHQFIMZi9DxxdXu+C$ECb<+nAVZX0o^x>Xk~iNGE-??CezlWe zFQAWoSae>zBPI~sl8a1KAb<0>PGCo<&lddK?;s0gnGY zwdWcVpv1@k|Io4DuYfLEK1mF=)k-SjVdCw6#2PW4FdO%G`8HS+mL&98s5t6qi7&mQ zSu#(8IEu9)jmNIti&c9GINQzj+}5(4-ow-1CNq7@XKKYxmYNqjXrbv)fp#*PX+yOSnda&KCsc!Qa2)&ezVSH`whlNyLV<9m;w(-Fk+ju! z_6NV$awtE!5S`|1qw?sl40&pB_2es`XKNTGk)exDo7*tpXZ+LQ@<*KW9pBmCuE0;S zc)`z)kEX2C8>om~YyUP!*h6LC03GvjFSS&|j7n_G6YV#pKy;P{sw;G4nlWYc7rNR& zzwznP(GvW*Vqgc_uMEg#VtkH37;*V^S^I8%h#$~D=(sL1O9>HzQQ}y25B43ki6YIC zvKh$~M<6()uC6X@q}SZ~)mT=40zo5v0G@CK_-xazUp(~d_w8*JVjN(?#P>UL+JXUFekCNhobJB_4IyFL<*q zYLLi5R(6Z>X4T5H(?Es$*wAgWE!KT9iTRZ>acD95t)Bk;hd^x1L>tGlYp{t7J6-#7 zRA5&Ms6UN3@A1aAd%qWVNB30NxdO~y_Sz=b_6-EZb;;Gv>lvsmKu7QTIs;Fg6WrHh zrja)jq6ptr-vmwp=QH~D?dq0}pU=*Tvl(BdVO(bEAZR@1;)vr@R!{G+5HCSp+tu55 z3ovP3D(b{y5E8zKp;q_nrQ;(e5(g^MPZyuH4i3sz z`g~=a!g8;*0Bj(x#7GTVf(G@h7wSbfCAUZTe0no;rA{&63smW^0NMJRfW&OCIaO_k z!prUn+>e}3>D`X+ZM6#Xjl17Rvg?xb7Hr=QhQ=KPt_}R$MF}0L32h_x!!`wgLROg{ z33+Cs^CO-cI0BY#=s!6={~xH_L- zi#`2Ap7d6Hx#ECD-Q82u==ib`YK(Iow2v7UZ|b$j#GlBOCF7>Wwg|1*NDRyVqtOo> z0Pvtq-|qdmM|)rU+D+OfAQq;gX2>oFal>kPr4VaxmJ?Ps$%gMt_1QGLc(K`=`swu{ zN6E}DeX!z&KIMeFfkV)fC*DJK(vpoW@vMO{p)ZJ9Skf&b}#4AKaOFEnaNz^ zd?i}Y?RJE#$9(>$V8obJ>T* zf%{i7=;W{hjP@MOKoH&IQN9R@VF9a}uz0l6=Kq&EcPV&*sg=gR;;B(N&xD{wU6fzE zQ*1MbXU73==bsU9i7(M-pPX#3a-h(-( zf9Ni0a7D<-c|0r7_VL=BTuQ$}tMz49azVopVKLtZ%{yLG+yH7(GjErN1{XOv}}QZMVc(Jnl@?^t7zyk>GrSMWkI=h<( zyQrF7#TRsW@`J9f{Ka-V!MX~AB0H2Q6{V+aHF;atFB{>IYzKr!kc*|?vYdi9mYdtA zXO=XcT#EJh%0AD=_dnfPW(-jLg#pKY_^H!Lg?+zTk3eP#vS{*M_Q?-){V0L>C6Li~ z%t3#i+eIoO&SdjaFvowQit}E=Ur(jG- zlcFMrR3l?aIiyI6IW7s6P^l=#tdbBjhhc^!=PjueV{(?7Lr!y+F{d1In4E2xLk@Gu zY}ozobN_yi`~KcM9{wBN@7L>fUC--zJ+J2rT+TIwj9`i?gEo!&BMx@?Hk-k8$AUPp zeQJ;7bb5e46Lxv=PVPDMVeeO$Zeuju_R^RegTEx$y-Y!R6`v#b@2Bu6Q{5arYE&pA zFdCTT=2JCOQq9`ipSZZptj> zdQG)AP4y7?qIh<$pxytdb)v)~!u9z6x0?Ysw?jum<3eoWkwp?``2~!+d^r}wj=gGZDqRJcWT|$1swnb zlfR1OH9Orla%i6IgZ1C9@`2IP`hcj*K#h0GVypYsHxAa+%1t2t+%xt0qcGc6HT1%AVN_RmyT|aKAA3T6GV$iJUjAYc&e0XRK627b`Q%(nU`00$hYmV4g_?Z|P_~KgvI;Eo zws%sOpBuU9Gg&m=QQhl;6%TZ@^i3!9-jhFdMN4Cw^->WBr=<)yQv~B?N7m&mui#Oa9qC#a{TQDtOnU`o!YqUYb#YagMjp-V4*K zmfEY5v&t6kmfAy6jI`Z1M!GqIssjcoC4Xjf63?1<0Ny@RCJrA!(>>-S%&Xf1!?-0K zyTxa7Yr*3%4LiFe8-OZRaGl5o9E$+1+x`{cX=jK)H?bTc2?6l}GFxI+sua`3zN63O z{$xRXN^qhi?H_k#<{~#^uJ@S*QM@wj$xMjlx)?K;4?wFg`uyqJ8o%NDL~eGetUnl% z`hIAUVu{tSINyXUsUA`+N(8!!m!*I#e)7o-Y9QkI9r4wGv`6=+IMM6tsDhEa%n)3D1GqHu&W$0Llx^G@w@jDO6JllsKzZ*W? zQ?5^Io6b-s-pnQ3Re|XFSW5U5DwqUKn~9EE6L)*4IQ@)NuM_Ae-D;PZ8Q35J)=YTH z?TZ?$2J`Qa8PN0L%zVI^qNJbqIR&HAedbFW?Z=qe2_HxOHu-=a}Th-$$lb zLwax(zQF8T&QotpUnoDWL_6=#;BRw+RHL^igGSYL>WFmi(6Ey!L5bg0xWbe`{*j9_ zzkYg;yK#uVgeA6M8u^@)q}o%v}liMTK>qA)v~nXm)y z;(IqQ{QW_bU({vz-ZtTo=I$c~QS~b)MO7<`j<86fnd~;2(ec!h^K7>t{rxg}i1yGN z8I+3As60uVy~o(TQ&=WIY~U&@if&0{{`Vf~CEX?EFH zj`*MVc*J{xrm}Y>;soHKF1J@9;g#K&Z6J{RpTUj$d#fXVJr|f)+tVg@bK{K?u8fw4 zxseZg1Q^=K228MG^et-?do}u_w(r(m*Bpuzw3KpjB-86pw@tuMX-$hh+zH!pxTv_+33TG+WDL$VlT|~ zU)j#m2a*pE(6@R9P!n=by#d+)9Yl_T0rRmi?@@s-B1bWv2;@d@d8G#&=f|YK`0p)>*bWwO-jQL|))izjOnB+L%h{y=CPNfy!1?omXQD*^TA3dp=RXwW= z_?vwTP=ambr=s1%+rn4n_TpMEAkQ-dY@4i2Egvgmsq zz>2BK>*7woXlVten#^Na`v4`A(?2DXXqb&H;DG|<)w01);*(*Q@M21YrZb&B(~4X1tzUmISJKdO5{Kp2KKl$b_ z>0Ne53!lYzZ9M3dYyi{tclq?6AEi0>N9ti+DIc|bSN}}MT->~Yjo}fqN)6lQZ4t0Q zMwHg`X`b7mzxf9r|8ENjdrwWLi?8nm3&@0#GxLN20oz;O`aKYPa7XSM&|*tEbTl<3 z?+c;&_vlOM^1qa*htZa@3ZD0cwP$iOUYzNgn=Po{0P*7B1xb10I3IGxx5_&GQq5ut zKeu~#DN*+y*p}Pd_2lIndSm-(pZ9=Qx3Yi+GsC>WbnpGcq1m-Zw`lc|miALwC6#kN zM|Pn>yc6TWK651V;ZN0+Rt!01&}4QmLG7xsuMmep%nE3l{-PM@M@(K+fjNv6 zuuoWX4~hPU-t=(&t(-cXZ}*2lV7@7wb+TS$u`a+=-TiNMmqAzX6EpV8_1RA+0lDAQ z{88(Z=R1J12E?>}iWTWX?y-CJy~K+pP=?243i5zmDSpjUdcjIGN#Q?p8qPUYQb%H`zVZ3(8OS^Lg>J{Ef^q zdKWj9dF}@|b^eQ`4vA)xdh5ZfqQ!WJl{ny~e}8iX7Jb={^z zx$}J$Dm>n>eJ%bkX3ou|ZkD7BDye^H%L-S51SV+5n;G|w z&MBk%m@n?;F08qI687Kr{uLDNFc{&{_`hdl(OPm`HTY*pE2FN#)01H_FuxzmPVD-hUe7)Ofe@{ zY9Yj|FTz-}zsEi|)%#$4!bI@)P;dXh&rt)jL>>G%sq@ixgVbm_*K&`0r6)A>0B@HY2%p!oSJ;`~icU+%B7rXNnbNp?Mrjyt505T*9$ z&#O1DWL>mnrT2$k&R)udu;;vYy>mEo-dD5_1Z%(9yUU-n7ynv#O|<#^KB>Z@2Gkz7 zu2XB-)4aQ1&fMGK=-gZG&&djU@qX${ex+5QUKi2ho5#1BF8zf+$Yp!R*q4*pc{olM zQZI|%TQRRnSX;7+{gd~lpz?{|@{V-K8uh0x&k4{G)izV2zd=IG6TGbhg5}zTnQ&dT zd3M{BAFIqqy2P(=)!CELjm$-%mJZyi_AW&lm#KSO(P1M{Z9)Opa-`g_=0vU%f6amS z-)F_GG9Ra9NJ6XWe`X)GH{9UA!N2}`KH2BVsiA0t!44BF;s~SmSs)l5y4tgiT2+@< z6qeDG5!BI?r?)e9;1Kq~(mBsM++?NGX}7y0f0;*+{t>%ut|kPWXRIKARb2HMJK~xY z^U9XIM|Ft&Qd_lYKaze}0kXw2os1*buKT4T@Rs1B6BswAk*8?% z!ivbyX4EEW>_{TLX$${RPB-Y)tV{u28xr(YN*11v`;+WfkT7JqN(SzYMbC~YIE!U; zxl{W^l257KFKIHZ&ovpQPbuHIP}nW$7#Dinfo-ednrcl8U(#`YunFV2#{J;8zUZKX za=sC#0orwejq`hsX)!O3ZWG&IP~TSl6^wZ&gzpx5C%~g{ac6p>1|Qnm`st7oLqcULT9BOid{7qoSw2f|EqAyLUHSqCMyrBS~NfY)3V|N=r^ix&}MKD56bH zbUo0!?`})n+-*uM*!G;+vg9XNJ*Ww9kNDO1v6x}OgdmNpuiG z%MNePv+^h==G^Vlj%vq?oG4}M3*GVmwwv^Iq}H|8`i|s$hJi;m<;)_xLUq2_MLQcL zrXP|0@+75KgwSk4QCKI{Goa`+4Qa~B*tz86h{4#?ORJWCk5tZJ{1}dk73gIEl|R^a#q$ttkNS2BOtxTQkjS zp{dR3)9fiIwxDQsfnK>()LBJ@iwd+YYp?OZgMYKUa*N1S9>&xH-u1CyzKUm!9l?8U z*?TY9SG05@ND@v4aS8}2yU4V#6)n8QO`^l(4gPn$10wqw8lMg`s)uK*Eu6wI!Pj7c zKt|!2SmKNLTg_k>1>V6ZvP*xb4Mre`1%s&YBAn`K^|cV&q?f1p6wdNZ^VT0Q4bt)~ za6YknkcZL!)K;T%%q=6b5fW5fBN9-Bf*3N_qjbwSc9gE75r#IxOah+q4MUsgNiKBZ zqtiv#{=ZY_(4!r6FlbdiQ)z$dN&B(|mYxQMf z@3TWO(=q5!MVIuB4R2ctnpG4|GRD7sw`MZt?rkz>bb}vzn(v|CB6){&=^*9dhqy7} zQH2`NF3$vG`D4YUlo$}3$Z6y`7$C#%xZso~2z)%-R6$?C46Rb;d74k~L+C1xW5b;X z{AVPg+I(*HqvGSaqaYt#TrEE6E0d%)(|&HC$cwHWA^f~nOWORJ<)1I1QS(I$+H1?) z+6x?>5TDD;>3yGOrmEcz1li^gIu+PE;2Iny%H#;-G*)a!@DT$$e33}eNHMW=U<84g zi_OtRvAtxvgJR#vOyF6V2=!A8lrdWC-=*|wL+Hgrt$XfZtyS3&uj^vsTp1qy?H_|j z#OV{S4!f-<;VB~QF1eCd?}SP&)K~H%9CeKCG#2c%4+&4%%gXGIOpkH}c*b`&n8}u% z)w4PE5tg@?D?yyu$}Jb&z4fX7kD#{eRnqVZ^gdI5?WE8Ktjss?*T)m5+C#>4W59v@ zNvp^Fe_xaiH#>+JTov>Con3P;_)P3En=;&nRrxa5eBa>Y%LJzm!6Lk{z;oiSc>Gck zdAgf3vu*mGo}@zFKIZi`{9_lox!Y&WACA1i< z*5To<*I!#GyBY>ryN#Ok^334-;8!O>| zLfJ4A(hb-5y}IdfeB^<<#PPK}@042i@%2Us$=};G32LN&tzkLRVvy($JoT!$`@i2{ zj^c0A4xx5*7*GU7Yr`mp(gU8bYYmP=p_Cw-2pUs!#~x7Uy-T76$Y=Ggts zw)X*i#+pyJ8(7!2)7PQLl)ojUK$CG2x43Yh`PIUEGefYZ$3&zvwR#34Jp8`Gqx$&H zj>Xb6FON~MPG+}9fav9h0_b|APo?@UvE$Jv@8!opMw?A>eb5PDC4~$1GpAEy*W7L# z;VUo`EQ4xXBp(c(dKc8+*6^u98x@banFY72a?g}WNsm3*As7VR*9?WS0t$aaJkvO{ zAd>ID^E(Rc559pt0arVlx4sD&f3ey8+T1UWS{iCycRfVkSa?~-f2)tBxo4t&WPu+Z zQk|;!KuxBz=(?3d;Au} zt8;oy>w}Z7u-$Ajh>=yb$jH!tYreC=U3PQ0zes?t=5vcK(+zllr~!hLuSfDuKF`@I z8kW_14zfg35<|n=&MkyIxN1{fuy3H2Lh6Km)nd2r{wN#c9IL zdqn3%P`Vj*GTd{Ds?m$i_&CjupBB)-->;d|c)&$QkfQBtqm3q;TKQ~JxfF%` zFfKEJLo_9&<$6R6oo`t-!kFXs!KCuQhx6NIWuG>mfdR1r4@AYZ#sjJmI>3?9>~H$u zOYtNu=;zoLP3-1s#?cXLak9d(@cJ-)E5yot#G#0|WtW^q<|N3hZYBcB-GvD-(625Y zeR|l<$$;$`7Ox<}3Ri0mB8M%x=9I^HFkCgC>Ws@tuEnprYbtCFP5TmSkz1EMng!J3I8~dAuLd!|Le3ENyae& zl3MW+SWB9AWLfb^>@j!LBir^Dbb(O?yUo~JyDzwGu7ZbD6?4okfql@h>IWemvYrm} zIbUrkD*;fv)e!nhzEZKTeQn~qy`hDLS)l`Ra_fOe(Vn9#L z_I=vZ3WD|q&g4K*-5jztnq=)I&|FKaA#jqtn>eUh#934vJ)pP3Y}bSJZ zwC;f{O28aAD2j_;C+p+|1tyDjTo-!D+HP$n;7Z^gRc)W@q4O7hpTVH?M1Ofp_Z1>P z20jzzoEMJjg?e7OUNQ;JGM!b2zbBmLi%{<_(U_3VVz{9kmJum*%dhKZVO5nt)SJWN zw}bW70^Hk9HPvx>FH?6Cf}MbiizP+}cRhK`tIHoBQ$X?}30jT66FyNL{3qwoej38<&Ilu@XO7z! zm$J1U>{eV?=|kz@RkImL`bL)K#_ECP&my8Ylgx3)Y#RHpr+#09y3m9;#x?H z0WWkBW|SWc3{}zwTnRC>#X8$QN&sNC4;WUEqTA)S?Xow3K&dgJvMaALw)2arBa(xfTb&e`HayaMD%MEI*HV`r zMuI}ZDxkH)i%unyQ5eKJm8oSfet4~~*O!r9H8El)B62?>+nK12^n15N_|bfzWtq7O zH>LVJ>7*;qpia$P)Z|x7bIPoe=8(qew$AuL>Xt;o+CBL87QPM_Y95SDkup(RS&w0| zCJkr?%wI0#23PPF4Ye*Xt#CgGu8T3D;S(^uOQrpWa6_-nSliO+`rF|`1=3f%r^SZ_ zA=IN`=SDf_v7(`J_Z1uDJN<$4<-u<)^7zCM?SWxW#GCWaOHWkL5v&^7oMlqtfBaJ+xExP;Pm}k66Jg2wHa(?mm)5jyeuO@U}o;7Z*k7@y; zrsv6Gd#wMj$03?eQat;D#8v9tqG*{E*3c(Rw}o%4xJlh?n3d3B%Hd@&0=sG|LD*`R zpg~pkFEjODZjyn${UB z{weARJlN}{gCY~(Eg&2yzuH2Op(ElG&%xA+^_*5*0X!b>hFI;5q#TPz$_&S&81FoOpQugRuMc$^RSEEL4!QJJr(GW6 zdZ3S;(DL-$O!tmiC3{Z4hsuSNepO#iAt8e^M@s!HM*jBeP|9);)q{yk8v9_^5UNso z=`ZGe&yjE|?N~2X+}VI=y9WnT0 zECZpHLO-BoV$$5$B>_&@E!I0`$0Yxsp)IY{g$Ur@0g0|2 z4&V#$j^MLT;j!>9$*^5=I~I?A?hue$jyZIBlk?piwtbH0sCt`V%R(H~`}4LMe;sOW zUYygA5R3~IFB9KDM3r%($8;oH?3|&uoRw2%G+Zt82hJd{tjh!H3(`_`E5(;KeSOlo ztnYL#-n>30h^oXgsM)HNiNX9{jK;ihbkg-(Le|a#HPWg7YNYFdTC=Smc!R|UNbrmV z5e>%RmGP2Z)#fN1o*ixCh1ntpf|>C#lt{Xm>Q(2npEbnw`PDj=%*&1^iy{us%sGkTkYXyV%$n&5VLy!Y5pV2+K3aB_i;oNWSnD)E2CT>QtG$V zGR5hX4eL4Pq`B?~Tmv+A()A?<`&Ea1pssN7V&&#u``Wq7rT$wDatDK_&mPmIdF{Iu zo3I#HME)%3LOWe7ci2+rY%|?Uzv5+0JnsO%bJ(G1KWQ6VV$rb-oR6}-_JZ^)BxlZb ziFiNTfv|Aje=SiMefnpO-DFqJj#g&(rT}kcJY)Ep6tmdbe*aTl;(s^}{_hQHf0*}5 zOVHyBpufM`F>R#g)`7%86c|>)*n~Bm#F*Y9#&J2S2hraM2EY0kGxV;4g-@5E_gSe~ z3>DTLm(=wFpMT)>;P)+#j~TCfC3!lpfyFCC-i} zgrdwc7M)KzSi<8bDSt~NWvFggtB&>cyBi~i#y6F`-(whmTLZ^8N_(n)WhyQCi%vv# z#s6?n9CN3Zeoi=-`B6apUgl#*mw!Z=^$<0ugV?U#y>uvuXxYB;6M>9F>h6Z?n}bE9 z`oLN6Dw!aF6cuB_z8MDZI8drE!=85NytMS(^oh5yc^UB_voh4Ci|qlh7XFb4*NrA( z0v>3Yel#;!0@oU_m4p2%s;*l=N|#IReC7SAM-+FvrG`k6!5{ys|F=L>gzFFEkouQ;Nn}#HyCSsqDUtLBEI`((p-S}a$ zoG%z)ui({$18tk_f|v2I6Dw5txwkEksOFqWrZM$QZ40O>@PcT;=i%FlhZy@+A0PVB zYD`&nO(-1`CIrt*k0x}V@2&E^Il7rcfYhApIl|W6%adXvaBs>K)SNB#01v-_3y?S= z%#7e!g#O1&ybYD}OP1Dp46t{Xf$#cBp=V)l6IwX0`R#VR5N;td<-QK3FRYihVpKJA z#<>uJ_BM4#D;@NJHew8-A-z*RYIkEUGRLStVutvDYFBs2Hjug0$bXbl&V#y^<-v(tvb+jh48maa;m@#9=)vk=ITgRF15y$Tk*Jtpjm>6(P03xupg2QafA8b<4ef&g`g{ z$2o96dq65+W9vIAi9P_YaLUi$wU}sE9kdMg`f|mj0Cc71eudfX z)559NZlbCB#|5RQN)^+$JCz!GUdwF(_irN9vIkA&_?Qn#DZRj1df>=myX1Tqe(?Q@ z2TR&QddSMI^6BueYeQtAAyZM~hq zrGBP{G4IC{siM)cHBZwPEN>k=2`!Hb=Q|pcYA9`?TkvR>S=! z6csn(oAMwgOn@HnD6W;zJ87MGqWaCoB5Py=2A!{o@IU8+UPv^7AvduHcDlx`S#Znk z{K1^OG!vW%uTujgCOGS=npUX5QF;K;0wA2VKZG{w^kSup!MTqorrLNsCKRX-7+o5P zf{0EN>EYXzn$m})cA|TIrxc3z|2a1t@ug@zFYguYV9K6$_qn&eMN69%mGnP2`7wC( z*p6iP&UxF=;ZeSb>& z0q@k>G~y?3`^0qOD;l4i$**Y>TMx>lGRjF^v>x@zbR`l_I zEBf2iQhq>Lvb*`aczRsJm9`>mVoVnziEdlHEkiHUxUgT1Ww2E+GD0fgI&de7?}s*T z@LvMW9l2kef%=LrmJ=B7(*!}_pda!KLA3#9Y)>BDZyvhVYS3HiPB9_4C1Il=fPEo* zZv9+{ogVOmpdakuGxH_P(lj z#MeMf*VbQ-`yAyS*>T)1f#~S-q_G5QTKq!y)(@}8IqTbR?)4CKi=n#H@b;r?fz%2*q=Ej!6Ls}UV~(M`QTe<%Z8tCD4r=~0Si z?W)fWYzz{-n64Hh{p?eB3#9G$UuRhHTt1j-4eb$0g^I$;29BBGy-iMo>K15kW+Mdj zju9Oh>TjxqJ4wXft=UG&mrlYeyQTCQNds90=#lRjg6XK!AD#Zme zCiq+wRoOks(ZS5IyA$nL5gu>8W}1Vor77_%xHkU#(v=TF-Wotwz3jYZhrNGcB@$r1 z*!YV~nf#x%kM)bjx_p)wDk&G|NGL=+h5wQaBA#wN)Yqc$ZhLmduHu-qLQZzRM@}&B zHH^}XkK@5JbM|gVb{J6e%QdyR7}bcPV3iqEMbq(e7ZprRveU7*n`_BkMMyQRrTC5> z%G#FN)2R_(JLbQgj3#%v1>P-nrLByY-$HA)zqe`r5~B&ujX5#>AwBBlb+A!9$kdbk zh$7+EybtI@(a+$1A_)yis$>HllK+7; z)__jIdZ|`d)LOL7H70W#N@QReJ0s&*oW9$eLs&PD;{=Jx_qh2HzK~%*mHcLT-1ZLF z_61oBvLRnb@s~+qjEq`f@G${@K<-UlP1D;zF*vhi1^AN0$!(|pn$0GrX>@Ho-%y^!u(p=X9m>4yx=oor(pmUprMnr7;c z1TIAiMs)xOfwS_rnic+fM2iK_w5@M&-=}ccTpt^eV0ITtu;%vNrnNU_ke{QALxm8s zfs#G`7QGh&qfkB&_!;mvMwt^n0ZWFmR`29hpQ}2r&=>#cA($)@lg!et)>I4S$`QX{8H-qxAa5A`Z+=m7w zax&>S-8E4haS&f`($N$xC!E488dWtvti`^Hk!O4ABCdEZ)3t+kP(9<1)yp=YRQu{X zfujVpES`Uw{uzm_fL77!M?Zo z(+Q~wavp=WSAnc-e)(U>7Jswu)$)(s-Qhc`Q`mWCT{72vUSS<=+MxORx=pud--U;vXg@g#qXw4gf+iAUE5 zo~>M!t$Xttw|fF3`*Q3R`9RbpN?&zrM8270Qpd^cHG%iwW0=U_9aacpFRrNQXd{>j zglp^V!7-}VdSt91#2xh+jX*Kr!WQm|@J(^q*tq^uk%Gj0g~#o{ zO#;)PKki43Dn*n&u=>UY<_$xq1KpU4IZV%}8>FO$ zX5#~P?Wkh2e9>zQotGlSD~Y9hKt0rSbTM*akgg%JNKCC_%9v#=Ou@^|F&paRqjl%Z zZ1>g5>|uq4kPZfq+D3~R+m*dId8@MgvCNZ3tsDOj0C1ID`5CgHZQ-UdJ(wB>jv!zL zv8#Cnn;y>XIr_2JVQ-i#3)ZnFFsDxfnBU}Ueq-($da-hS&Ecreloo~GCEJcZyF+26 zV^I*GZ~8^JV|TX>Ytl2t_*cD7XVf3Yr3to%qF*EkGKuZRy7vEsLA?{;X=DQxyT&|X z0fDspdv{ZeH)}n~f?|vbgQheNik5B$)_0>lZbZ1Di?iqo02S%fNAYoEw|!{2@9<51 zGs@Di`VGKUhC~|)H1$~7+IB5hFT8wS_sy@#@B8+=xStj7p;}MC{>zA~yr*r9-u)p( zD=jxdu}g{Oy*_vGx4_g(&dO9)Piyehlm88vkhbt* zua_2-=hq$-!0M*UzHnFCjr9^=u! zIdij8i-qMW%bs_8{^#~p<=f3xwM$-5q(wCffc&>Ia1wEG=C)u94FuUqT@%HA8E>T< zbVRQ1I6X?vxLV`<{+(BDzLEEY;9{y$GTuwkW`X+`_uCV8cL)SNfjF=R#-#K1EQ2Tk zrD<8=fR;**2)$dA!ayH4tv+5UngXzG*3EbDd)F&~KK2Ey8-Z^(l8medM*|Wn?CkNx z+Fwmoiw91R|6Tw=hw60{QZDTkp&V~o_7xWhZvDc^rxc7y zT0ChTo?H6JP7zrQ951V}WH$!y<^`koiwf@Izx|Aa?d|@lZpAE+@M!(&{+~$VgZF;` zFUY@bs#1$DAYnkN@@g_ek%nsY0Eu&cK5^|pRX^iMus-H@MOBP^B!@!p1GaXV@_@MT5vVBQWyEUwC@E2_A|a z?o(JLtEb}Pdx0hvSO@c?K&^k`0ioE%0p)4A@y*UvlDNQp+bjQt5d3GUvLziF9sUl) znmrLzXwaNy9dixFd|oN8kCkOLAYz6wHY%CZG^o?bIg`W9{~)b};sw6t)&izJ$QI;e5t8 zohF-GX`I0|$uQJ1fsQ`wG?{*=3tDVPAsEtL&5|m7ZHWalvuk&SH1yr#;!@X&K7^N) z2XS9M|8r~E4T9OA>GhNHDGz~co%*WMq^Ks+OJ(&%Rj2g{di&q(h0{6_mG-Pm^?tpyWzEt&y0a@9lAda@V}O!v+C|?wFvY*;KavC(LQL^nIZc?q z(C{`iLp@D1_yEeAEF=d@UiVcq(_c>3IVKg%R&J)JFVRWn!6us=s0_W5a@9@)oLl>g z&@)-L%Nt$^Jd5pExu=a~NSPEoi@X4&NXeu zT&Cr6Zfarn_wjc&ksIFw|8y@U*0?e_y;^0;+dHx$pk1a7Pi0g!iyG&Bwh5MV5y_Wr zv)}1hhV)1i(Aj26UaRB%CsKW!CUv2{Io*Xgl&jfvkr~_HNszK)u8?Y37cuK_!3-Jq z4Qh6?e{<{(@EZRsaeEv9ag6s8mPki-`fSD|Mz%9q^J#RJfq8%b2K25Df$|)?7PV2a zMdqj-v)m-Hz(~saAU;?h3}+Qh3~dlBZdwMzJ~%x#5fkXD$w?>BY25WP^)JqN_N|S< zOB|Z0or{BK+voXG(BhZf`C*gY9KNF#`0w5BDT*XoX2u~H=uDli=&27yuaJ%8o79$)!?CqGTP7+klgx>dki}0$Z5*->8#8L~VQg2BiVOwn})tqE1_i39J52(wf&6= z{imhYHAA%(G#~HsIF8(P?FBHi-cV9062A}p_sWD*Y@R>DY$l10remLUkg)z=86y`d zaA{|KrWqw^0l(74kcj@-6omu?Zg1)YLPn`nhn;?D(A|XIn(uL_Y5L#$pl=YpFB9px zcVxq5;$PlGcM6z*n?Aw&p5(j4rB$7ifh_D7ew?yD1rFY%e4Mp;maJ7S<@ecXTY{vf zrzxX68blNq5cm}Vj`5S0GMBLF)ed#m3#Dbbf^nfzsWRWjJUh+$dvM#(n5>v!ztO=Q z?q;dL(hc>0BtkIHaUOu=7Z4LBB6I4JZFmp?_^tE z=>7?iD9xvbSY#83E!h_0GZt;1-xC=BS2eGHe#aQOqD^cfSBr2uS1vnm-ZnW3~v6PpoG(3u~cm$O^=Sm7>U zb#J-O*>ofN`_iKpqH)SN#Ew)G(4WJfAJL56evLb*bQLirOa{3#JFn-=eUA1vSydLc zQ`3IhQMbkldf}NA=KTtDCR|c$u}nOw>>87`cfwIvU(sf4JrHvTmirp4PLLijpl)>NWYbf>k{cYaexT zvULk3({aN?>lKUeG(m#b{EJGzy>)egxkG`TGrd95fNQEZ)2$wkd92(Cf8NM;)M-Xc zh4JZ)`K(R{jX->GlpJ`657;T3q&5X1rDkuirKG7FJo!#^vF2SO#CHM$Zn%&e&cM&1PtUj#P};>Xr;Mu?$QM%4 z%!i&oM-)brogxkWk}uKq8JUdZu0nTX*BL1Rej8JkzULQ-4R-Jd-`e%y<$&O%^G3mB zmS_kKGQ}J6;-f9IKq@?f=Sp-CY_zOU}vN>p&w$;^gMIu>A|3yrCT>iOGY0Lo;z3|f65+?(nSj& zl}bL$zz@7}Tk66u>d);*Cmd3ZEn2eKKS~|H5=)VYZQtJ6j*8NE+r9!dL3P2X#)uW{ zFQ0D>sL@G-P0rBjrM=5V;^N}{8798>x$`}KY!~lv;y8!-Uv)r{kR(Fs~Kex+R z1Bi-O4|@$m8Z|p^;=N{VJC6au{~uo2K3M;@=He5l(|mxa(H(QjQCEu56TWzyu4J4n zH)*u6`M;QY_jo4%{|(%sk`7c9<;d)-z^|Dpl!6H)hD#w3) zw0Y7#bKvPA=QH84REMd;x1V%Jfn)9m-%;W$XD@F_-;OeBIyy@J!mTdw9!p8Yv7&@& z;?N)dqk-nEq&4&dIAMA6d(06$n$|p=r{h$f5igTkzAHcF47eqHm!{mxm6a{_cE=`E z*d4A)zQKj6J4$#D%xCHj9+4U4oxOdPzZ{-8mRuAq`0l+wrcd|4htGZkvh*6d_jz{4 z>xg(|&wx%o+H3XRn0#cw!k2H%{cwAQE>#D9xUqj6j(7v+{5P`|T%=;5*}m6yvJaNx ze^0B^e*>vW&W^_T^9MizimwFo-y7q2g;w9eQG{zt&X|Pn>Wkv8xAyr1-Goy=pWRFR z0|Bb0+a&<(Xa3DTuUc#cv?FNGPe`YMjlaHW9&cP6EinNmWUSv%nr`pcVV$d2g6lOm zxp#B-*N2WwF27oWI|+1^QM(fM{EZhaP+F2>Dr!e%+J*NQMo33xPgpgC1}|e#FYo!T z|LB^pOfJ*f+vmI4kwPL>!5EKyS^nhG8FM51H)px^zR#b}ehU-XHGZVR{39c!Dcly_ z@C&{eU}o`N7gl9Hu$rf#4e$a!svO&)K2$HcVyf!Q4VT4QdMS6QcyeoZcTL~)KY2QA zLik?PTI3~d>DLSPuUA&v+GIf<^`#tRvg5NLxVg6%`8N0Z)pa28N5t)U zuC&3we%mKF`h>F8`y8NllivI83bIz{KUaCvBSC1PFZPZq7)?e7c zErL&)U`po1RV>in%U*SplZ4&M!xl&ndy@$t`AGirwFi%PsOC}cV3-U^sDbch%2j2J z94e2x(!&^GVIE=*vWu3R+70)lcgDEv+`E zDQ1V4_gd?;1!d4$X5M*c?v*YMJRaQ^ySbrESOsVWZ`Z|AW9em5<=S0n&+MMhQM~at zA7l9Mnj6Mt0Q#M7|DNY&-r(;VevZ)9vr?nJy28^T6*n#UeOQX%&3sJSM%xSiOE<>7 zHh;}qG?oMy=yU{d@xI0Cg!0v6L_t>Rc>2n*5ZZ_@L*3ad(D#kp!?8Tl-PMk(IlO20G^Ir<=ax*SaZ<(zHA06&V)o2C7QQ$5o`> z$Z2aupg5W8JZm?qjiGPdx}$x<75~{zW<5+$M`Vw%mg`5aSVROLivn*do!uBOv>vMl zP}CRK%Y$})7%5eB-neKo;V3wf8EJi~@YdGZI{$IEMNU`p;m?$v_nX=*U}=lvKV5Ea zQ(ph;QI>*jvmng*0F82S*WfK*ZV#qyyfN(dw$hhQ*8@De8-8WJj<~5BO57MxM>f|6 zUruLb@lHmp&Fa197aokfMImi3WOo+NgS}9}EQos5_apOUK^5=W$;CK9Q@pe_Ucj7T zGDM}Z9b;o-7FdDGx(y32K1&wcMBY+z_){*@2@rCnw>_RnP~1 ze`&zRJ@S@Pnbn*HxcgP-w)PaZPPj{hUVnf~>aIQ@nZA#Sp?*rzcCK^3eDULGJ)MEd zZF_i$b^q}WeoFllorbZFCtmj_qWk>wSLSpJ*6z~m8HZ#nRGbHL`uNLGMV8!`Tl}nY zZ439G{bUd7WJ<5=$d{2!B4sm#E_qJG5-Zb{Clc8~ewf3$}2(Wh=t z<`mhRUG?ssPBvCj{StF^yZd|Od6jabJKS+2-Iqp0$32RF0&eK;!+Ol=yH)tf^U5RR zJ0`nMXh&Ulj1}5(T$MT|Ez!}sibk}q>kWTL{e7vAjDFq6#gZEC;gw7?{>YkC!-ezn zp8hGrY^dC*=32G7$=@7@yDjz)=R&YS%033#oW@Y61uHf zH`#$OPRZ-Xu_-x4^U$xZvrk_8q-FKRkd-;vu|nA%{nIHfx{c>^jX(9)k*(MKl2;lo z=O843huMM}A$~_rye%aq(jvYXn$vwV&N_RaHc_;#^ggB?_OhzK+qb5dL_A$=2^~CQ zn{si!`0P|RG=*9C4Gn`E%}v-FMWDTr8YgWw;X0#E1Vk&!DX@b-ZQE$H9EKg_Eh3c8 zaQVkXkijBj4Me&uN3ZwBgIH;Tq~#wA=^ga|S74UA=Py*IkLC8r92nbv9-b9`!E(Ng zOQV-x=Q#_xWZ|#X=~j&I)2CT#)HqtQwx^F{;oB>m(ym{JTz0$mG~U)M8~^Ux&|F@O z$>&z9kx=!wdufI8TuRW6Jlo*a_sA0kZ6(@&e)~nqdyWle_1J1(@D!oLkL^(C<=pXq zk6b(ty1V1y4g_PWJ`mCLt<|OnrMlnc^~WAVwWWg&LsXarNRs^4AziON@ydUhb`YQuY{j=T}l&*^~iCUZL zW81=XX*qyhDXo9+MjA|cV@g9nS?b8Cd^lTvQ(5fH4yOhZF#aLCBJPZIB8 z=*KKG3;O0iEF;v9kB;0ox3Eu{xn}Q~f|6Hra)~b=CnOqvn2>n*xAwdS>LLdkmllA6 zyN@Mm=)W9?f%s$b`d+zHndN3wUX`>h)iimrxp%%Tlv(ntz>|qceMY|EStY$!T3Y2U zAnV$=IiJ|yn9=KY7rDAS7qHmXY6Z8NBME0sSG3xPSaV-LKx2oD}7zy@6X{bU_LaB8#=^EZ!2MBtps`)2>fP%wJ ztlu<%ti776?xB^j3{%=oG(rk^`jprzJUz&%W@&9Os0N+dNie%#6~p3o9&uaO`no<$ zzs?^@*L)bvM`jqEWp}dJv{82v={=#rXpDydWFdfI*A&_6JZaP=Xp21zxOe` zyBpO0NyxKc#|68$^O4lav?Ky%o?X}LcGT%|Lmwk5!mJ5TJ#i4*C?7DcCzH!>UR#G4 zeTe?W@!u_&ERcZ+!pmX8J4uWUkJf|2b4%lAxk_~QgzSm;X6%1(eT?tTs&SAB#j;F< zDGKxV+qByjJ>@7*Y%n$V;XeSEHtW&@%#o+8)~MH?#00 zT|ON8K)*nJKDL0-5h2rnT!{f0tV*oJ zN@y6kZNzmDy!hDsBRFkUqT3X}0|ITt!iEDU1uO29$&sd!$*QpNhF{fbk-s#s^kUZ@ zsCWv=dj6Q-4g%^xxYsyrV7}k!lh?*uTc|KcZo=Hy$*({Q3gpp z-4>Ly^d+Z}KgK@D4$njs&~t)r(to;BI!fCu$qzTxB#o;;;x!w-!Y^@`&m6Wx9-alR z4aFJ-^gnXjn+-N(GKp@C@-P*2MLW@`tuy!3Tx|G}XSp_*8@fDq6TWF^MK9CBnjVWn z&3_zvJQ4cl`(9J9xb!{$``ltBAuA5#Xw+L?W%N=4ofWgJsw1R@2}n*nHU8nk6@=+v z$@^Tee^$9Yw>GC=ra$>GCp$L>w!8N;0(H&~bML5k0a!8?2WCjk^?*ucEiqNO;Q5DG z_a_tf$qSZX!%}fKh*Vd>;jz)Df-2Q)y3xU$pgdpvT`)UkY4Av;n_D2|Cree(>_s7& zl2Q4v-7kgxpF0Jrk!9ISoKkHVSsexvob9PmYE!Y6K5Q!SxK^ zQ#&B`VFjh?DrGKCiPGlp(w;N9GWpKuJ zsrT83X}ed$!#q6ydHS08>${F&vn|Z;z>hI}B>EmpDYum+1=Y=h|3^PncZ{L+*2#jf|PB3tJsPR^@}y5(msRt9WF zFZRFZ&2&$zp3beC?qqD|RLVKZHKE4!*H;7(JDQ5^N8>nr8HV&ySmn~&ks&fymRiytn^zi2t4`?41(=bx z&#q~l1|*JmcO23XuW3F%y5D^B&ya}e8$oFJ1t}-*`jCmCaBjCOnH?*)mw%^PDsr6H zTOh%>Gx?(Zinbha+|Q5}7CGyB*B_*PPh{`{@q>3_5at^nlB;uZD6lDptbN-VpP!)(m)e@{zZs z&Dr06X4`8vqr2T@SBuXsJB77QBs% z7?3r78atJo&XxHHLa!tx=0EB$AOCotYsbw2z13z#GAO)3Lx~(_xKZ-H4{h&Y_m`(T zbuJ8f)bHJ`AY+16SCFMeIA6MGyQ2aeUgvi!MzeT&Eg>>oaYakG1XHY790Y{!22hln z&`%=P{=6gUD`qNNPJ_DHJS^okOvKz}2b=%d{!Jc{QSV9Sms-|%=uV8ZbCM^5ud1Ao zQ_-7%@1z05539e9QFbQW+6LF~FnE^AH?|_e1fy{PAnjAAd7T_t$embeLvCirWaub= z4T|Mdx#b6#&*R|>=LUVpI@jfDJjo6))MFR_qzy+bw;b3MpyJt<-ZhD<#Fn6M0f-MH zl^2}E+U+ib;3>RF=S!W|hdXzh0g(6Bui8aC@DkpE5Md}2Q(z~^;Jgd zjq9#oaFC{87}2JvQf%7|DR}aG#}wE}M|NFzN9EVVJ?Ee9C}~8*=)DN`euoFo*-u)$ zlj}b7?@B56Dz9Le%5DJehZp{ZOE?c754xrYcM|^45DbN?IWMoLl7s1^D+Is0QzyUP zIPTv|cZ%4b>vAS+qDKBJ2^SkM2*e86>K)E#K=1xi0w^~!_M658(m)DQpV@D*>z$&X z0RqePGYhPZQBTQR3AyGyyT6nj8XFxYbuOnrER-t&+MM^*2>9h1s$uF#Zl0}Yj$(t@ z0#fA)a8s}QYH&7HMeKQ$0Yh4(vot50mz0?1K(&WY(Cq8-%`W=t-5ugY?^3_jd`;)+ zHI4KCoj>3No)GsayP~adR(E0cwOsMszj=#fr=rc3ISng!*IrG|Urz}VR;uyzwTgi# zcx2NXfTfHBbS7qpJCR+4I2pE9fm%R@cK@B8&#RN-(4|KhPA3(^(E%S0XdG-sf4Pnn z)xpg>tW=V*J`Iu7vb7}qs1^>acM82UFwuMFbkT_kxgX2kS@Ns$b4brP=`7vV8{yD9 zuVgI*oD$i7q|(EhlV9P!Aq|f^B;u3Lv}e#d_2$;xTe2q%h)_GqrD={0H7HMu<(+xLpLnMo46N;N?IF&N|2uk$upI+-4T5Elk|}>F1&mB_(SdV0!WOuM z0hcG7OYdQ93=O0vz5FzC+6CbKR4ys(CLi3|uWDXO_s!w$bO%@+77Ff^FaW1`dcvrz zBE<;~;>sCN*W#%o7n#hTVd#(Tgpl0#%&6d1TX5yXGscMTqMH}!8`z-v)rZFKF1z`q zQclMEsva2cd#7P5e>RkU^1Z$y8C(VdBR0KqJ8kjD7I z@djpp+xAeo+e*IW2l~9v`kz6-_}dGFPBvk{U-9R6298bqCkxH15PIAxyQLpNkpsch#3y@YGiH zxP6V9zHfK2=Eta|Z&49|SpLAp`O=@8fZV-t&r3W~N7sbum;$%31tsyKk1&)V1}|H8 zE0^cPT8Cam8Ws+-#$OR%B|2U5XR8W`p> z7fkY6>`43hCQ zX)+YoZ&roP`@0Y@U1{l?YZvbM2y|EPr%B^oJTrR6mh2{iW)4tE~u<;Tke-;nek zNDuBV{S|!!`-isBtTtN1S5iS!W-e$T@B3P-r#n=B{6+jl3TPf`#pz=>p&0&Xs!mjN z`9l-H`!=zFtbfpOcHoBA!K>+rhN>utaRK51xy3i)#IY#o{23H3;fB5DZ1f_6Gjn1p z!fwG2*c>b-`MiVZYa?aO-?w>82%{U#unf4}G7EO^~h zjh>r#!mPc5snqDSIYQ&aNRkI9qe?Hlk7DgAHUe)i=5 zYKL_*4nLl3IO(IEeBpzctY5tV8#J-nr1>~^S*BdE2DWZjX|_%ATj#gBHYxbFeQJN3 zi&iT&ciCRrcRAfRo44CrfkIX;YIpxx5M+~rcw@KED2$6ga+9<2s-0HLbwOP*?L+_Y^Hk%?0lqMo4|hhI|F67FwuNXvI6%FV!3#A_8TLp@(!S#n{U%t; zXIa|0f(!9*rc_ejDki5WV^~xMrzPXNyS5^6|8;VXvHniRpB&>9n9V@#^SbdW5BrCJ z#nJh@J1Q`TM?9BYgY`}tHR@AwROa&Xa_1-^h&@szEZLnX&Bm@}wN*tS?=fLwkifw| znd~UA(#8-amMbkf)w(v7LPr+FEz0{27ImqvnxRcppZ4b9LGp zxq1{?N08z2H+X8 z`~a+QFGs+h)AD|DP7sCv?&ZfsiEHHW3nWfsbdB_;lebHeOETWoG-bZ7^qzLzGcoob z2J7>*w|a#3&9P<1_d&xa#IBPFOsBlBlZ5WU%7NKpg7+ez zzRQ%7(|oJE!aYUW1^`xj&=n&`UP>8mflhuWNkDSQR8P*?G*&W~_pP|Sxt5rZ>c%^1 zuI9fY5^U!r?8)&^>i7`?Z^y12NZKTjopZ-X5Hvf@HKMrq;DA4HlaEu)|o0U-6 zf7}}YUXl9ZPP`jEJ+|2?jsRxxv{uLN?|>fFV_brwqe2koYB(3UHxv_n_jF3$hdimF zM%Oip*1z4WuOVghbz+$oY$SyQO5@wVA^l41^OL`)KggSS)>!Y6j4_eQF>h^bY{Wsz zJO+s%UgHmI6pEJvVbzZY?M$EA?3D@aAg+|_q^#mc2{b4qnG+u}LdUL3f-}x4IL$Wf zmzJ=4tdEEO8-MR+KW*Sr^_f$zc>8h7QjeP;Kg zy#0@=E46~o(=RD~JyltnIBBmG0VJS%KqiS+kWw)*VpKQZP}V%3&LWr zpq}|G`(vvo+=1w1)@S+OAKfTIkw>f7I$t5KX&)tOuI#;Mo*M(R?^WU1>8L-0cNeK) zx|QAq4T2Th_fsab0JaBN{_>?umjZyxDEZL-{7RR{kH<>zBbP4{f@(;Nhzl~-5QwXe zN_8I7x0Ppt9$)?Vv+;C}v?H8cA1qK0X$OZte^Eo6@K@m5S>T)J>!3gBFZb*1K+TE& z?&%1ua5W}?JDYrI0UF+*l!-B=mGU|+!MzMrwa*FV#4g(595@*9(}?-QR|Di&J#SeGd z_o5PHg7a+~GGy>!_EoS`tIcWUSzsaSLdZG8Z5uj z9F;ysY4WWL`!5-t`q7YKaNE!=vbDgZ!tc(Kytsor)u9kRn}UF~T<|jwlTps5TMC7o z%g{8AOpFRq_u1V^M0VCNVxECh;MHmn-N zidABDibwOcrb}bV>PjW4i^OkGxD}k1&!{eR{Rx)fwu{F~ zx32{(YD+J{QE4~b>JGg~Sr~hJ)qSga1?}}#NG;9PMNE{sllk-SVCpINrA2crc}Q+% z2;N*;gv;ge@}Mg6KLpcZHrBAfU&Q$o-<6l}y@N^uIYacu!Z3ziVuslq6xZPoCazPo zw6wBEe$0OC#iK;eURAPw`a@dLPl{0S2`8VC^a<#JP39Kueabgyqq|QXaW$HtA21AS zH|@}x{uAf{fadL5(^5u&6N^Ns1W!URYn-RSiO;=&X^a?u!Kvvm@^yZ3DPG{wgvC5z z!l)bL1afv|g9~V=Xf}61B5>!mqL?;&1k?9VQd@y>_IuX$neKu1#7GSw`GEg3oCt5V zGye)K_Me9A{R}?iL*%q@dfD$jCps5TFh6DxwTxz6=yRgAeg>hi1D!yluP8Md`mL{W zvvT9l!Rn`vi!P^R&va=d`MUMW(=fe;w&CLw9J8R{z-$O7ZSMC+_NP8CzuOX z=Bb$*vSBzE83#_&j`25@InbRk>hJX(WpdODSn2YT@~k1fCh7j<-&@JL+R2hQCDB#X z?AC6hPSK#~Aqs`oU?=Z>3`b54i{d7|iaJ}C_bm9w5gq}&gc`=8y_o%o42 z552ikM{6>V^u$b#N*anhcFm|WPCZ)~E&>l`2ELC`Bc4q#+A_@gB3fWVNj!jnWUfAe zTH;*p{Hy*~5;c|VTC7d->Xlb2bYnQ+iD>2$LL>rd5`ihuq!qoz zK?%Pyc=m|Y(o<3t&92hIglivhw1p~Hj>V;y#aq#)`v`~715lOrXV;R?)cexvX-O`} zA%-g!;&PppmK$#wF?6B)2@mBrW>qdLLH8BK4Z@hM9H6i44Bzv7ZzE5;$z2`DUYSrh z?yKp)>K>{+JT}92{GyhoruR+26ifq5+MdogML8O7y90^B3wXAPw*Cu>-_VQ*e&1tE zic9r)byK2w1tT!#us*#JQ!aS#kK&INz&1D19N0_PhhA1E=d$8k70=PqU=1ebXf5S! zj}6Yz24;VMtDC;~mb|iRdR*UD;_phGhF@>dTMGbr@)3_&0y?fWPjR}HMk4}ih0t1W|wW*>Z&y32A)5n{tL5;1^2PP@hcAB@b#$mhnd!F+fg7&M2CB2?_R6g`A&+b$D?&Mp1 zDV#F_`4oX*Rxv$8Bp!BQ8mFeFN(9Q+xTmjWhlzX=1`QX_<0$;TWNbCbUg!7t3tKQ> zeu<$Fyx4PF9XZ#~+RmTE45220!?S=x{M({wwmlXxeGuU!84JiX1{aeKM5s`JKns<- zTi69ZV}1jBm_Ccu*O6OL+;TFpsC-^LT?fcYUG7J!99~k{pwRMzf8&L-5o-O>%!2iB z|AI8Z0JX_0ZKJ-GN?4PboMhFV(O7mO+qVu*xUc?HAGd=Sca^GtZLf;>eB&on%Gqvf zuB+Wj{&trl?19Gf<;da3J$+Y16x2E4Z{hXQwobt_%RhjUuH8|3&qIHCWtkfEyamK3 z@AIzvh49(gltD>Y($)lCeuDju67x#iFA9!Q2Qvfu%e5Kj-k+Sk5$^I_3-A=nIgWWj z?=N7(1`5Y#nEoQ|cSuAYkXzDXxO*7IWj9d84l3m#dll%$^kOK#FVJ@+@&&tX4OgDYT?pzPnl^m6ksCV-G9s*j zf`b_bqpQlV6L3 zgSKsq6Mu0*+cslV6bf+q_o%m*JOdYU#-mg)ZCp8E-EkANnG9X0uH*1A6cA5EJTAr2 z5>0#2Qr+};3o-a#!L&%EnE!LAc6_HtyF=QaacG!**hbfI1}}>Z5zLPJlGvLE!AOB? zg430&ojUp9%!rXP-%a2$H7ZZAzV68))kQTBJ$40?0jsM#_X1-IS)~fE-fZwDZV{`4yL(w5B3G;pxh6u>3zcMQDo4yp8*NGfEUb(8Ynj8R=wOznmoftJrb z&K%cVQGE9bFe2I9iY1pFB{q|&J&89{fg?CMRNHFv>*U7^;jR(M1Eo;g(tp~L=q9&s z`(?pI^TEQs=>jbgVD9D)40=nwLE2}qh=mkjyzzyyqV&rid?l{! zhp5f!AF1zsno-OZVK%^M z4Zf6K8d#6|;!&aa;(h}!sXx>?CF0cFi{d(K4(iC&(??Nw|9kPG}b&eMc!vauq)K)9I8I<#kt+-pY#qVr|W{MY>3jFcTUI zV2y3@Y8nBHJ&6#%C9dG|ys5XJQJs3fztZPXE?q^D53z-mvzHJ@%-*7>tUFcijbnpE z((iMJ;wZRNYzt_s-rSuSr&H#6kDF^({`2P*jKrsH`EPLcJU?;D{r6$UI93xk{m8JJ zS{`WaYaTiKq1cm}AwKt@=_lvi<)`lftBj}V!@z6$OE^M{?y%5|kfVJyGur+=CbweF zELmG=sLXRXnwcj;&caB1lMuPk#Sqd-qDPTCkM75;)!poCHM;nKFy8FirvbTYvzIxG zksKSj&M&G}!HoQQ`=Z>-p@@}A)eWEvH&+EJ@4@%amcK}YB1k*#x}2{mq}W2RvIcTF zA8ht)O@&vS4OXMkhis~Wo1k&XEtfKM~W9y1qnet0vYH4(J_h$ih+f#%c>$@awh z@KIs7z-EIo2#SjP-i7#AmRU65p9W@+7b=w|oY}bUU8K}%Zz*`BlMe6R&#v3@)BFFY zrpFe5?jZ6P<+en)-Y(42r;nGr$w&i1P`s-QYsN$&%w$McRr}cEsiNHgk9-=aeOy#4 z@=#bu(VSxm$5v(6!-l@eoCyf26ZAnKRjbp37o8=EUOjh^A7Sg^w9xt&fDfKVa3f*) z-;8*#$LC3g(2}ahg!!mg6XkOEmutz+S1LIE*q;;MRk-cHhDVu${Bnw*vtAG(S)GFBMXd|N)za4+d)W6(eh?gU>ZkXED(@TNIlM|L4i$Ok9A2cqpS4|Kav*nwZ#tG=`VMrCln#s${$N8QddlXzph) zzInWiK566$+)Nk@i1qb9iWV3aT$iixn_Zb5Vp_hrG;@o4sJ4@c;(3{3c8?`k&4SJ~ z%rZn2S4>2-LX@{np-+t^gh}KjVqW^Ps_wCE@r0+FSsd*UpW~)Nt!E7yPDZO)kSdSC zY%0}=zii7mLSmoLQL!4<*L#GyT#J|C$VJeS?&Jn~?~uqTv`Nu5W&Y}Ge+1$d9fjUP zbt(>RCs+mL{<hd#-G?ozL&w&$zd><}?(q zx&GQjY1unjqTMiJL1bmta)(WJ-IVqTkGsdY`Cnt!#0|@UwF>34Xu-3H3p3J*4z!52 zmH9m0ee|xb7wZlp*2sO!9IMZUs->bD%s$gk8;uaj&-bMz1gll?eKf`qQ;fpnlB(sC zJnd_#>CE1#8cUvbn*aQtMq6j?)hxbD-@snBat&k6|Nh8Y8ohC;a&p|1|3ijDX01Tq zU6>jVf#c{e2LM*{EzNiImy4Zb1^sVmz(fVfWOxSGRt3p zf>ht?C(g~?6e4I-H1s;f095D-&59v*SG~7<=Jdj6DT2zn^sP5_u1@9>d0ccM$ST*v@=`g49T&dGl_eAChS?wHuJ6 z{!UO%?vK)Ksz@lbw4-a?O!*%i2&l|Yi67fyOWwJo`Cky75*LInN&F#vA&(3lyot)i z%^D29Hpm7&S*y)KoYz)QlGgvjnR?LkzD75EebaU0 z-|MEO*f%tb2c^O|mdr8k$~?N@?OGDMdA)B2||N&y7JNG%um{RZ(3 zMbN8w`%`HP~o z{r5-iFC~e)b>Jnu6sW4&XtOqYewi|?8fMZ+*S~Jn)nOfZ*FuTcZMSHCZxdrPTJxit z-SRUijOcmuSzmu&e7qah+TM4)rKK}8o^mtUCV@OKx?!AcUQRmM)ORFmo~E2ywWy>5 zdO1A$u}V#sM?e6XTya%9&s3b||;$sIRWIWOxiOCE*7oSxG-_ z6Z#$DX{11+BdC-+dZM(hLn&Vx6qN2a)@kP&oMn%dKMcLEd_)7RcqI9UvLYV5Cr0~6 zoojY8Ka4KpcP!(Die_hrK6_2Qz<$*F5#eiIkTuM1FFqkCUs0519o-oYp3iDovxFGLm z6o-rGnZ4^eU*myeG!z>->*fXdFS`oc^>o(`xkiReL!@b@3h-4x~*6YsTr** zG8YN=0RF?%s&eMmlgY>A%DXAJVqYinOo2jG5O%~+>j^Ji@&ovJ@bOrvoMG<9l`E$c zN|bo-_S@YTS~t0>l(UMX{QdEA*O*eo@NN+)FU$NN(PruSjbWBqb7+k@)6QnpXz#daROXxL0%xZqST14lNQd*Th(%c5^8=Xt4< z*a^S<5&rQ^&&}MtI9rx~6nb@hCD&6TctRE=_kCd4nWu~I36C90sz4ME6wWn&aM>jm zX?%?|>23;lA8u+2M`MYQ7Kh1m` z&BrM1$kqoPlM0c_kPj6RQ{A~?@bZUS^?lMXZ1|lwCzV>{LHBp+<@L)buUxsZ16j4> zc3!sI0_+*1ER1dX;RRNtVF2#jWcuJeTqZ-;qWdz-G@9IEvCqy!44ra^Z7>6f2WIrw zPldFQ7x1F@ha`E!F_>u5LiuXb-lkY2s4_+`Dr!;p^t$_ShY~JMIG>R=E@=Ensz9K~ zIiq(2&lnxj6w9?v@A`&<`Y%FBtig{U-b#$3fJ7b8)AHbDlG8Tyr}1D-xu$>x{3B!E zVE(Ed-b{17Y~C+&uil)NIXxh}h-M`>Jqg^kxNr7ah=GXyHJ6=YI}zviLDCO4m1!S< zD>qdI9uHn*P?H{q2l8kKLzoWL#wq_%3Ysf~@a-gEt3 z;;NF|uOE1J5WB5pI0*_VjS-JqbQRIUkc}vXLo4-wJ9vISxCu$(H;DT7BZGo;gzbqu zX%8+;0?qA-xle=!|H#_?N_Lxha;+8N3Yy(h+Cf>)mB4UTg_R89<{ZTpJkXxSSkGHz ztTzq71?m|4T)AELPW#Rv`D^4RyC$mpU;~viVD4H<*w7!%xh?WaZ|6&iTE%6%gRd^z z9VI&C>N?$$fhRr4D;RQxVXrLN;#4-%Sgo!2!lGP4zJrA`oNU<_R4z@v?csK1ZpHMW zmrs@{I7OZ#kKNM{{=sFsCk2eCDLV$lFChfo(er7hX0fzUN84kdb8X>ghw?y8;98*H zgh0Pqq_a>aNXaBgm6to=B|_?{RmMZfI6^sQg6<0Db0~e_)aoCb3*28VV-cgPw+(C7 zU;SJA{g8Z~b|^?VP@jw0=#a*YNiWG)3cvH)$R{ut9xmd|oXcA{pY7E8C-6^{dC)}i z9Nnf1Y8UJz6H{(zQ*Z!6a|zC8*P}ZuP5@_gdxgkFlWR66V|xxRhvVlF`%RP7Uho=1 zWYqU;&al+b&y69RV9)2GajV;*Rr4xD*yfXAIqXGFeXFXOaVa<{;ssWgbMh{jta{y9 zLqyC^^i|;gPVb|(E~ArkL!*4Memsj#1`kxPQDLo@suiwbl+yKX$0u06Ja%mu;wq;| z)YaDZTb_MdAdsfYQw2DKX!Q789ZLgv@F1VI;?==;oDXKn^yAIPI5A#Ke;R+|bzcmL z^IF1)IUdwREQOV5dkr(m8I`@p_(v`NTx2%+3}$had$6!IDe8|D9-4+I zUVpPyahK%=9u@q(yYuMF#$6jlH+{WK!3%xsFrKZF9N%5zLW|bqO%iGR#JbdQcE9t! z?9t~|!nPnO{=9fcG^1RpyBSmCd#MrqX*_YL7JhS0#8ET6}|oWPR~Jg}PBE*3+Grf+EH!Z{Qjd_XQCv;6U>^-t9InqW)tPfRbLyLz+)H}C5(g<*zWmw8Tc2^4dYPd>ak@`c(^2ihy2Z0+IU*vN3V13*c?wa zAuZ!2=#Y`(AJtX=1acOZaH}D(m?N*ux6Nla_SPBX3aEI&WEWf5t15+>X$9Lr3Rw~A zr)kcwuO~Y$5=it5+ z+TNdf+xFRYi=h`Dq&BX+aYps1t{>tVxc%tK<}3-J8j441=(HU~7yj-a1DwWs`l$bg z9H|P0z%JUQ#Br2FG-)!plJ(}q(>BI3>R1HlRtq#x)-0>n5L-}s)7N+0=9^8 ztfIq3DL3wYlU4)TqsK|qkWo}EM&x};Q&_}>s4XV0zd@B0$!^QpE)`8q!#p-w%p>s! zS2QSVz2As!5WHyRDOB5McY|^>LQa5D6rrFhwjnf?c_f=UJqFr{NFq8ye;wp?FB93DwY5>?njofz2W|6~ zQECY1*13X7ct70I;6kONVh;`k2>c#v?wl1OuKH~lHPr}7WQNt;M-%12KvthEX2|?6 z=9jsE#q#IdoBW)%FrpbMF18N501uVCWZGtTNXzWkU!^z((v z-6BJz8RJ*4P4Y^Cy1lH_FQBOewiTO^m{rp{&cq@g6fC=>(MNXMU5Ta_21J45B2k(G z0`6a1QbD!f=_cYb7ePfRy~9v zh#kjrX{tYviKkIbAXGVZI4Q0n`?*W5vI{y#51@{yd+K0em;iOH!C#`>BQ zxP5qmvw?;1%>{mCwMeiy`dIC-v7A^9wJE5erh)6!W3(__38zUfQmSqJMY5Z;L21*` zzHKRd(_c79U{7s1fz!PNRd*tzSo5z|8_LEvMm&DTWuG5Y<*&ajW(PkVo|Ov1aY+Zk z^#F%D?Zo+a-p+YKo1dSxY7RfiC z(|u?+AxYTL#@w1t23+TYcA{zFs%abFJb$Zn#JHvQ4+&=m=o(6n{Ga&6N^U$2;RJ7g zz>bf{b^9zTJad=a6EkGMH-NGQeYQ;`0H^ z!(yFpq%pJu2y^q-wUXuSsi94@V?ZMC-aWg0M3q+QHo-S~v}`W}q{`BXnbnbB-If|u zyQIQ|(M5-M4b(yQ5O|qCHLChV;0X5(b{=Kum7d+15-tYxHHJ9>M8ryi92tP)wOv%i zH?q`41}ZBl8F=^$gA?w=N0>{=Q3e?uO>#~)e@sFoS4C{41VWP&`L}Z zt)_jQA{h8HI;^6G>MvWVv~ERKWB6QRBIyZKxb>-hOZnU5*3N?;Wr;~NLOTW*`9Sx| z_v;px&KU5KW}U)ufYakWB)3+n>y_(-QKWATU5hr6=;Nad?|g@b`L(Z}5B6OfyRs{V zdCva``)wF-^czm>i&2UoEEbWIwy8yzg5UGiMM}XHGGle1s`-d=$e?g^3D>=Y?r?GX zi+GfQhOkbY&-SUBY1*i4f0ccDtSOEe zXuZ%X!t2LFFwwpv?y55ii?^I@MRWdp5ux40uaP1v*ICa(n#w`XFb9^EVvM-6i3On1 z?PE<9BY;!j2vZxq5%EkxP^TqsOLDO!L$&wX;5ykc_55Sbc4F&`{651I*^AU6LspbD z)xfXAL`5Doy51QxUF3BzPh*koXyJ?(H+HSjuvL>=8*T5?MsT&7Cv8f(RwV_FXIp5E zpKgl0vOIZ_|8HPKS;s#>ILz(ZSUJ%j(R0c?q%XHjqcT!tK5t~RDqca*VV)G`G@rI8dB5LZwUd5_J^`+k2v$A{;-9_4yC=RWuSyMOm` z&ZCHt+$S?V8pgC4%VG1)`9!Cu9+uFn=SP6jW%}kE-+LZuvjF@KvDmi72atkaAE)K* zgm0@ixF_b^qVw8`Y!bAgo3rNL6{S$KE-^YR=>hTCC*?O)@z?fVZbv|4NF2I-^Z7K;9)`>I4acR^lsi%LkKn{ zhutl_?oRTg{GENmTXHzSfdAH)XG#C+%l>yflFvbe@3H%5;WZ^Q26~K&FjRb^&L}l% zfhdgf;*$jO`_h=n-8Acx1pzBlJ+Q=H!@WXM!snL5Q^R;ZhUK=c@T6dx%ems579S69 ztz+c0aON?vrFGEMoGIyJ+?SH9gB1z+gxW!>{5{vE(V%I~Blu#8+FoH9tYFim8GCs~$l*TPVUA_``#7+%Gp z$%CQy6U%*DL@Q_#jUT?4lFaj6$_7y_W)I;UN`Y+N2x8p_TP7vWD@l&SwQaPhv8|Sn zKRgue%ErLaA9M+L9nrtBeCd-=?q`ADKUkuxz#lX?qRsTrH*Y>3{EOdwu;eW@GK|N_ z%HBb_Tq>6M_$4JxZ-bw+>NQ>u4f>&Jc53*Ufu$S^TCBdPU-b^Bk}g)TMYD5A-}%Nf zW0|R01u_rIPXtAEC@+3?^{WcRvo75tVN`$37?WDUYZUJO?_8c zl8xn*Y92&)J`Tfh8)VNo6L0Ep^*k8+evcEiJgS$+8^iE z`C)ne{gL*s5|gcC!^vpGKw(VIVz*U^Yv}7{bXf9k*|830!G+gx2iER+0$Dvf^yQZj zJ^d^DfWn|@=5@0X<%#JV zit5(l+Yix?NuI8nO}Ra)4Wt6K-0r-n3YQR~4x*GhE!bd9`hq{7GA_>6&YNliI&k#k z9g@D@T6}Y{GCM*nI?YT~F*-&5Wu4hPe`;a`&)(DoH`;HbI zx=iA4Z(Si}@M*1&2+KvZ>0#zqC=?&t)um-6o>i8czhDiZ>eW=G4Gw0a~|4vBWD@?uujL{#L-I)jJeV3F-Bf$t%DD zUTqawzTN1sV{I;T$m_-I>NMMM$>Zh0yPU>`iRr@xlg>+*`mXg>R#Y8h-YxH;nulQW zJ?oFp|C!KOC;NJ#%TQy!5jB}I*0jolly@C=!{etYrn$f3*S_L;-a5=gBw=eouMpq) zGxfxOn|8v#<%~VLyBOX$*PAu4dh%{u=rYJ)FS=kq5xDPmF?aN;pZ{IU&ektbR%Yva3r_!Fp!m;I^ZKu! zv?8{ak6O~l5#EbQ7RLW4n$Mc54NuH(8NVw6b_6K6?JI+Vk zfAJLm_7BeXJlb>Z%zAYEKr9NJR56~kG{wUP!pGTt&U#+sm_-S(GUAN+Z9{E-FW*?q z>A`^tgBS-Ggo*XHJXpbOO+M>5;#DasKjpQ+OXLEpx(d#c4@)jC^JxF{ux!lN#%Bz} zEgxj3CO(WGo}L)2S_~!pNGKQ#Y|Q0sClr`zp66mRc%gFlrg5`E} zX81WdVNBJ{QgugXdA?O`#eo#gHS_f`7$7IDsyR6iyb3l|bFzsoqUeV$1g0r&*w=2p z3_JcuAI?*bNK*?j5N^2WZRFQ2B%~EMg(sAJtS~g*zJotUm=ey=#$$*$5suC@CE*4v z+%<3Avm@98Q->8KJjt(zVVT>5XivnJ39+y!T-IXNbfn3cabL^wu{^C=GL2yd+eD>A z-|1vV%M$WHigZV2Q*p#=-_JVp2TnoK7mT`2J%i&<`>ET`?3UVLo%2o3df{lC7*m>* zG{&I+#-N$E3roJ~A7Qu!89GwZN=t%wt9vA9@`T4Z(G0++G3ea=`+K#HW~h|;Nw}h6 z39rIH29gQ~$NQB@ewJ9;tDnUPLBfK@T)Af;6V}&kt zCDH~jE)S4ODk0?Gu*v5XbkXhbhp?G;!v5w=TsbOSZG2jiQhBpiSP}(N4L%xux7Zv> zkQyhKys@`ALo#IF4&|ZyElGI8R}WZ)#>wun=N$9)o_UwE<%!>xxua|>?$rSxXg2Gl`-9^Om z%*!5CSGSJu(9vU6*jmeq@}I2%_Ui+Mq9Hy|r&A?RDD~VPRIobk+(28!VqIjpheH5R zROybhf8L_BH6Jon8a}N#3^V*d0J?|vvvB^}U=ja5h%Y2ifN-)GasP4jq$}=I%-YdPo?m0saJ!#MDJIU&TT7H-IXyI%B`?E+je>qlC-yi)kD?60F65>dz?USebw>1806q%QO=+Sm+g~Af*cxxnbqetL3ech^d)>c zn1%_rx!rZ@YuVz@5E8Q_JYx>us?Zeqh`J0}_v6k@5ddmEXo2GgDXfCd;gkl|zShA! zCaB1)t=@4}K+!ASWo9r6C%L(-x|S)<2nrRqPIY8)4DL~> z(gJX1d_;A>SoC1clsMFBM=3%6l+;tgjyXz^9c-Rk*%R;^dKLSR@Lb zCLNL`6_?@M8Cks`A$sD><$=0b%w3xZgaQ!JH1Z81g?w+*7y?oj&AT(!sWyrUGW+ZO ztq2hUTFg$>E+zvqR8oB|$w7y~dx!ouX587*FcjlLa$%6OgYL{sG4dEHXGM{$S|PdO z$1{wu)vYZ{w{1i1NttifFElU`%2;b<|n$#hyG5wID z-@1KeZhx;@=IS>tabfXWjTGVV{H?iDr$tk?y^edc?MOHZFPO$?Z)xFMKJF%D;z`l5 zFAsp~+X<6&Q)JvRR``IB8!2hUs3Ox`6-d2`${F355_*+chk(9RolL`o{n58N4dF+; zD(xV{*t|?5$m|n)$3J3xjdF8kR0fQGt8*p2oHqktg>MucTpW5(n(f44BTJ*<@?ZpB z6PGB#IjDSbD3$$)eJ0cYbpQrFn~3!06$fm`+pLs=wy|X%ylwyt`}Z`hPTN2E z)%yb=SkNDG;V9i-Zf|k4rggix2zwKT0|rG$X@qAZvP5LBnWpH0{X}7FGYg>j$oi!p zLE;*inJFZ9pL1ReDKBq=WjM_iB_=A}SVKn8D^XTWAOSNug84)$YRRZq{08yp!!5=a z{JsfBS~q^z70IrMA|Fb12=$aM1|V{g!J%&GYC415dK4Au!B@vkL^|+;Y548AujU@w z(PY_bFa^=%m2;FVesI5wA1)wMl$E%WIQvS!26FBC(!InxYa8^TQ=f@ph>@tsmkag` zcen*m0hCc_i{e+?y|T~T*;In+15xlo?7+i8y43!#15wpi%DBi82P@`n<_)u@;s|BAP3l14a>(#Zc`voij z8jGMh&!yzx5F^`@U3dvA1yT1MqZh`7q4dV52xxzRRJxt8?L_<-#UbX(&SbVz{SU); z*?Izrn_#*QFJhr?Y{(&*;y%sBgYt*AWTwuOLYk`U5umXznOWT&w4Yr;jV14kDvgcq zE8D60$A_ts0KiKm^Imq!P;V)#up-~Ya76=+hHt5dNHTl~Ae;A^O(9G06M$-L`~1%P zhYJFgEsZcV#8h=l(3o2n992M%mcwsI->{_Jbpwv2*weC7;0b`Y1Fo(pz3G*W7%i*{ z@=&%H9E=x+(4QFUvT41v_eVJfdk8+?3EXSNZ^3R&`9um-+s1%URgaOMJ01h+9nyzWS_bl9fPC9y^PFoH1-wgB9P zr<^(wzsAR%$DjfF#1_TtIYdM*A<}N|mQ-6##XIGKGc`($hb6_*F~n zb}Al!a3q>R&zBwab;3~df4f6;%{U zG(w&6wSN^`>AwOSYxi_{-Rm}b#4-thfSVg@=ighnc-VBOMrhuD&cYSDzl~BHqs|o^ z^nIhy)Et9}XaT4;0iCtd=HVkA$g2>j1pMHhJc5~Y`4A7HQeoSr9y(u%zya16kN8F0H|6U}LCfqjp<-3tTucEsBHigf6L z6Ams_GUG?*@Y>}|+78wiFV68Sty6Ra^?-V(=%>N3*KGmk+Dtp6aM`V|KBJf*3yYOO z;UcraCT!TsUq#By~Dkygi32Yi?UJ8KYqv|fCyCdqPI7bFn1DIftHIG2i~&T4Y4$ota?g`9w4G>RwR7 zjo$VS2^m@Y=QvV7rW+FL1xLPv>$tN^Go8A*`(I_$$t?}tuEa%Hm)@4g zmoZNB_6&n9v}*f_dTCVbZmO-#74uqmHa`S?4tvMjPt*IjT1Jv}d>@7;eGp{49s=?b zdB6n3f0x!*-+96kz7OMvGGC#^Veo5J7)$o1_dpLmffiy@6UXjnn2q;6`R@5fO&KJj zx*lTPw=Rj`XbBaJ%p(2ye#<+YBI0*1$(x#*4wre;Cn^m#_W+7U8OJrbk zHN)9u$W4R?{9`@Cm6(^o;qCuZPveo4M6<9%M_iF~5so1|ikkkGJ0rzO6_-JK%#E+mCe zMd+VTK~2PPQyh*1hu8sLMDjv+?7A047b2A#ZJAUSZ|?t

  • @d-f z`(kiPe1)PWQU?}w9y|C7S6!2lqi_*b^dPQ0^oQ-E{!fxy^Zpqw1Uj>?>xmLll=3beY#MjcEp_JP<__Q~-9%br zw0NnTKr=fDU$UR#2RxtKsS_(?GR-gKCB8S!_js^qSN&YCU+fF6W48NB(i<%9mj;vj z(+n1Q&pZB=N6K1(OA;RJkjp(D+AC)(2wj6cmVHunRs6|uQzCE@k#kaQ`7UO@&WW`o zI!x63`RCU-F^7Qr>Z`Aum9hv|Uf@9C;}|BI`+ zd>;h$qR>(YN8Z*|hKtz`;+3xU5_Ylsd+H&qW9ksL@@-Jqf?748r|aR2Dt`t}smCm3 z^67J%!30SS!s4nY&EuarSgk$O91)J$5H8=hA~NtphaA(V&)N*U4T7!yBdot>Dp|fU z&2M&_T%UVCKeZ+4xj0-2tLh)vK@?15ONxq&Jt+gzP9e%gZ@a0&mC`E^jMe(@BM5#u z9zPMze2^5l2-h|I^=ZV_a&&E_v?+ZRQt=tFko*pNMOI!td}Ba=@@!cI!%!D5iq~)G z9GoM*oiHx)<)#vP9HH0VE;nF%mdp2GXZag%r>^LB`s#yCrVs;_^Yed~w&}p;&#}o0 zCMs^rJ)&~3u`y2XausH+PcY1&sIpT<64dK7a?4LH9+tB>YlKzD?@+x&=BaMYtXBG|1RmX&0R}Wb)Bq2#x~SdVCv(}65+oz&d`zik9sRG zNGp4L-zt$dcBr#(>2MCkBsu+q@;d7+Z+N#`?~>`tL&5ZSkkba+=tAj2ERx7>d@c?o z3O$GxPa;7R$ejVbZ>6TX)9Ryv8CzDqYrlD=^YDi8-%1RDx_X_6-g`JTnag)ot($57 z+qOR#_{YoN()}osf7I-wAU+D>BPe_Xg@3*7M?Cn52Osg^BOZLjgO5n~5eYvc;YTF= f{~_Vm`pZs;jnA$%$u`A6z{lmZ`>BePmw)&ldygqi literal 44909 zcmeHw30zah_wNKyKoC$-aM$+NR$FV`mAZnW1uH^O)VLv_C{cr;f`F2Zkc6-%Y#KHN zR0MGYH!NDMiXv_ZuAqP-Zn)H1t@ge%_a-4B0e|+rKYreOjUNPZ?|jdhGv~~ine*jl zh39I2gz{H8Om_MbA(|1PeEkJK)VJSHq#^yk$0Pl_W8llT@BO>?*!uVG8R*xZG|)e3 zXP|#Z59tfqBf}^IWGI0z)8p`U@~)vN&0XJ=Hp$SKGb!BY-fcr8+H*q*?YN;t|F|Jv z-`(((em}$7GjE6&=id;2P9%uG6>^dCWoC^KypQ00_@?XYZ+QRjQ0nVFe18wOee?_8 zr~H~o6tnx1UlWn}-{#2ty%}1ua`-TWjJK5_y*0!d4x%|4#v#k)#IrsfzIt|He-h>p9v2id=tDGM%92aqeN@GTYxP8# zgvUnacR;QqgO4v}c{1y(*!9L$08mf7DUbx=wt5VDFo!T~%%bOEWL~`?Q6F*>$X7F;)I z^pw#hxG_L)h5QPFI8FC=1Y9tv z>=;NPjndJ1a9YEBI$-<jk2NF|829hbX){dlO{!}E*lla@|iX=}@GLqVpjhPI#zad=}OWl}dWGq?9`~jKi z=_&E|_auXVXmkilg#nBWFGMKJZC^QmC+koY@N!Nh>eieNIYs%I*KiNR;u z;b8g(3~i^3CK*E!O<+ztg*SUjn2uC54Xt8iDWVCkJ1U~dQwH`?L=#gPO&-vQiYB_F z4C082COb!EG>wMfQbZF&=I^M8CQtBpDw;Y=pzl;PGjT`AXsYm3MUypnk0TXMU>-** zoILreaI%^N?^5C9$@f%*lYdh<^@Lf5iYL&Hil;ofT0DIv31;AU8WZfIh$lv0DxPd* z!HmJEZ}2>2Jo%IHWMV#V9{8*0*Z(M>%u#zqKpC4MGYBZNe*Fdt5Y4Ki2pN!p6oERa zLZ}}k6)Nu_Ro;OVs?0m6n~fq~ED%!0OMmDu#ETJ9#0%W79WTh5iWfRUL$%_?=rk&z z;ss_a9r0p=sCY3$$VOMZAU?zk59vrd1&9ikZU|ZH3YPu@Ay{}wAA-S%jSQ_-kz$Ax zk-~-S0$Pg7MW^AO)IDu^fNLOSV zq|7!*86JFO?Mdbugy>Xk$iW!OT!Z?uQD+<*R>({d8>kx<8$$qfFfvDG%Gf~4Tw@41 z#_H2UW967tOa!)7t`z@IeD^0{6^szkUndxoXzXu2u(7Oy;0Fiu;a@Pnz(yq>*31L@ z(`7PPeyY7}z{WOwxEbE(%THI7WvN|+A5RxRuxY-f`P;G9ufO59e!apDp{y<}PVughMbqUKYw=diJqOlyw`0zuN`xm9v_0L{BeEj&u+YiJCF44XwBxJs`vrjt2 z(k{5e^nFfw&Epr3>mStJyZ7QCkpuF~{(|?OynK59UR6c;r7N!w60{tUiE_5WMT_@2 zrEu}tgX+pl=T06k{`Gkwq4&P#K5PJLGT?eAkO-IS@7}n0=9j{~`FjpF7831WKYaA~ z$)i_ka6^~BimMx5K7CMKQFf~6K<>`%+jGfV?$_O`sk&F63b$CkD6fD1(X6>_+#+lSJcXAKSaZeITF=)PUq+qPxx+;jNkh1YP~ zg`-Cg79Kiwb_?8Q_5NnV%lg_|SI!>WzblKn>(}$w?)-UxFnX1pm6?%|nR_T4#gw5( zVMO;2*Up_e^~=HC*>aggz~c$TF^TEfy9VtGiclE!-yX5 z_M~i1h>hTftXsWe+0tb`taTw=VN_f~viu@6i53dOg`(J$eB4BmLEHa(7}4`tjyy>g z70wRu^;zcSwS1*t5JwmpmzXS1O+B}tKo>b&1Acf+Dk&x+gZ9h2FrwG*+qNXeM(~3D zS1$AP@LIll{U(6~3rS5&Pd~JuFizXFiOuE-W49f|lEfM4lz^~)m!B+)7P13a%RQGY z@mjHF14k4SkK1t4QQkfRHL^q7Z({Q!5_5`iD^UizBp|Hb?M{l5goXGsmo8bn#Ea=4 z5+;dD+L8i|*cs^cUIHD&%{YSS)V*hMGhqh09Zq!Joe(SLZ17#~v3QaD(v|Brg-6FH zr=+sexfwLU**yg9O&By|^F*?&qZe_raH`qy_~`IW>sBpwU%1eH>8b#>C^i9P;btAB z&T#~Br~JmXUoy8OMaup3f>Yn}2->-g0K^H4OwK(~fq?`hkku7gWLSuwkLRKV3l=Y1 z9l#NT(%3rujE+p_`DJ2=Jj5G&`VRD?!W)@yMy+19I8x$B27`S0W zQV@~?R?fOmHk-2S?FNj+11urYHBZD|ztU?VWA40#UaJC0DCikcPL9H zy$xD?+MnptL#l%WwvUphndJKT41?+G>PY}6f_sJU%USL2D zM8R7Cd=$QE?TRG}=DPhj&UTuUTN5BC*g35B?(M6m59e-61u0uIv$DsI<&2Bjg^u!w zjyt46NqCq@x~=fS-DjkZoD5ViBrH=m`mITag(Mx&0ZiSH3U}^aGg69)!wVV ze(|@W!u|UX6dpW$#OifEOBimhuCp0Sm^0@r^7LLoBEq49Np&0V~F?d$~}%a;43N06>eTUf!X6V>vZ zqiWF;(Bx(L>4J@2=o*Ki+%i-|6WmMxq+i%y?4chT~-90^#!hl$%l7$QL| z)%F>*eN=w>KzdBLEMwo<+YMksAtcsLZ~PX|olU2^!ho+=qjk3OLSSGTc^Dhw4G@tIBhSvt*+1 zlzbdj*kI5$0D9}<0%Di>g+|D>tf1OrKM=%GO`k*4+N;0qON$nYw;jaMQwpOlCOV&9 zG}o2xLI+E&+8~Hc!jUbZ?7Vw>9eNMizP)krm)ztCVPwwnE42@6NQs?7=gp>Li3`2K zNC{iO@gkMVX4jzxY@mvggIO}MC~jZLt%k;OQd+0$q@p0rV|9=)E;%JVJxXC(5cUe2 z=FXLqdsCxD5lKfb-FsY5nnrKSTvxV>iR&B~5pHCH98?5hq)#eTe09C-SWZ%eC?@sf z_4{BH+_O%v8CXS9Rxro{6+ss10-z!Gy}D~>3%5zd5%F22cb`3`?4kFo8!5|e;qrCd zs6;Faw}Me%RzS1YpyFS*F8`V@j}}MC^U7;qQTDJ1RLWWfvNnUPXsTaQ&=3d8)9a;0 zI}#-k(yaw5Yv?`3vP{8<%hqzBUs=Cgs$tjb*IfE#yC8#{Y0z$v3EpN_eeHC?R%wJJ zDd(8dDzw5`92cWmbC;|P3QsP6DkSutp4tu>K-t4LAocalODA^Aqa$Kd_nxX(I16n( z2sNb7Ua-`Uefm!cL3?|NovxRW0ewVF5QhV!q4NBZ?FkaF%;9rSl$Loti_Ugw=Q?Mx zPxA8^g7#`3JDrLOX!IQ0tIPm)t{t#s07P% z6R-)BKli1irlxF8jEhWdh#-t!uW*>oslHcJn?bt2*ohi(eMaIZ?pSX1M zZVd^+ap{U3AW#6yrDSOYC(xJa?d9pQBs_vJ-Y?22JW+D-YWX!$MGP4#7B6t9q{K$b zG7HaKyK}GhFLH)02Q^&4aaV3Nkhhu0dmBw=&1EP}nBwQ9BR+JFs#>-o^1tdT!X zvUdPy5W=JnKydWm=`FZu!B$yhT-x4KS8jo|NQHXsAd$c>ylC7lF+0G2Z9oVoOd#O1 zFNg`_mqSO6wVmoXW9Cc�c~aVyn}Wo0pF7md8XTWF0E0th!fQr@(S{#?#`8fUwx) zEy*$oe^baNo-i^dE-ofA0n}m*9X)>XPt%<+loZs0Ila?89BzqGG4i}(@Rb?`l+_L} zlk42Y%pjq3a|&M23k0IbxP&BjvR*=54d|6Wc=(tJQ*a-{oJnIr7t2q6zjc_GWzNeF*pzGLgHd#@sQ^!hD&5J z2JLXhcyas6seS3vsCb2svFi{y5+)=X9@LoR6xfZxj)aq;pPrsp23Wt~3=|@gLE^$# z8GwaTT^+1tcWsG@*}RK#G<7T()aC18P*Vl4yw^)lF9evYkds!d=f@QW=fonpp&cHq7?xG(kigUgXI;`;dkh@mv5*fK^}`&D1d@H_T<*( zlY7#n(Fxgb@!%8#IoGfgpjUUjm?wFkyN5u_F_?7)Ss>IE4ykI833-;$oB@r35nB zfr0SE5Wgih9OJ98bT1_qM?8s8bs2d}Dfn#;@FkrXRSS4>_?I8zNc*knlsVy2id_nSOr>hxKQR|d?* z>MdLt;f!!MkL);e`oLCMY@))i_+&RBUKN8VmTgH(=VjZ016wIn}OV}W_14RUZfhrh>Sqot*7CN_Q3NngH>hRLz5oG!O8M3(K z9XQ+7G(n}{aPv__3M}NLBEs|rXft}Ot%K_VfMLUKjwz64>@F&)0N;5JKK0=)B>p_P zRF5ODoYM!C&eWw zW+j0Vql)wyaw5TtL=j<5P4i1uZ;bFHF~n5(KOpBdnRJU{E}{_dFkvTI2eTTv$^-x@ znI|*=K0rU-;hlLd^do&QEPWuYs1P71=P&igvn;u~%>xWSoE_$Qur^7&u(Jq6RK!0c zXR<_T68K65B)M?th8Rp?vfpJE%={47FdKtiVSj7!JDJuQ9*_?yd%8>uc=dID(_ICRKfkr72^UZHE=Xq;sP+_Y5>6J zW0)cs1V|C)FRLNv@7OF&%%WCCU@OoC`r{9&z>h;_IRJSYP9QNX^OXUy0w*hg!1>_; zIQ@aG2{O6DK`?{_fvXZ7j!}k<2g62YgcGz!*frQ*f4HRzU3I+yI_}9bTsN6!2ouhE|N#*{Mh- z;BEi}r-piecwi*3j5jt|N*qpm07SV9>;Ti_Rqmny%J~z3Uc1kSm*9_-jdN*>-?p^8P}9gQ@;_e*fBu-P^Y9K5^~-^FQ9clVG5n>enK| z_&Po&CC?K?NI-Ocm=Po3u*u`XU#{Z4CMpI?6?5S5-~2dB@1@ zHqha6?mv8oyOg{YpQ${<8+QR=ab z*?Uis+wU}F5L*818Cb@sCOPk9WzDPm#R5R-^ssnGf|$qQ3Zhf?oVt#WF8~I*#Ks+Z z|D^uT`9nLl?KpJd4nCepM+U|BA3nk;6`2Pwkh<`(RbE{_oGBIZxO`DU_R$N~cjog#hY8&c{c^KzSRmuLeXgIjX z$LFW7KX_S_!$s&Oc(o5@;3qYgi*mPRA2>@Ml5IupitoRwulfsc>W`OJH9W7*;Q&sT zcMmE~<|a$R;H)!gN73b)r=So3;i0Mlb>2U3xP7J|d)v+<7pk8&lx{=qL(88$tGbS@ z{I06}-jgTgFeHHU*VC$t&@)jOKH)4Vx$y|>1N9j^Si1n{{=?cU$MZ8Y^H1Wl%A8Ep zKBxM{quZrVL`1v48ehDA^B0s$-o3nE`P<%QE*V8HJYCKdP-bb>(dWVfpUaGw`YGL`k?PddtpZ7w^_L-pqm0(E_$} zmo-3{{P2o2ZDz)7`Oc4VAW{k-80%s@HUq6w=HuWFt>s=s*_!YoP>os?C0 z_Ik~u27IUo&5wkZH#XcVDa_uw{y0o`MtL5e>z;XiyFYx^?0B-ptLh5@EO~QYz2h zd-%kev**s9EIP0=V@pzU#;!wWuK`R=aU3AjynJx;!mq`rE|adAhrR=Zhjn+ZoGQ#o zPmF~F`l#5%^zC_j3knYG*_D-^B2UZSd#vQf{b$fVG!CqJv+>!z>z6KHt9tOTzBnHZ z3@vYX*-%qi^2@#*X^GO9=oo22aw;6jXKu?#Pv4rIcktxJ+qF+|YbmrYt$+EjwyL`B zQN!c%&^^dJwDkUqXSkGBv~TCO)XhokL`$e9!E!e+6d&B1yCaLety5<9_MN$V3X4vjzfx6O{}S#?0`Gxx<>SZo zP{urfz6ix2PafU7eXZ>5ug8uaEGR5Ec(~~JsdJYr?$kCkJgX@U-HZ%FbBaq#i*rIV z)at3Ywo27h4T_}h?nTPFs$q5bn4jmb@Ep@rUNt`BZnG>hM!3=2zNyY?cE){bkW3mA zvC-A_ns&jp8@>$1z^IM%aWb8y*RQHq!5wfw;OAtYUZ-iv zuNW#k_D z6P7^(NyrTMvlVDYH=n62>h_XO3X;Y|iZG+9nNakd|fukWYV};c1%{RSxmH;8?<)Kkn74C@Hf&)Y-x-{z?rqOPDd?x z7H%6O5ebEC5nqf%Jh7fgERu+6A~9QJCKPaj*ZaBosEWnkRJ*&&;-ba8K!-S;MdLYu z7Z(YMc~fSn*`|;U>->DjC#j0a-xf^?lEp=dxa+6v(p^ku;Pw&R;Pvac>uCW2?Dg#f z)|3A@@auYZ01v*ptcSPOuUqHu=j%OIz3@E9e?}z0hqKq&?QWs^9Oy2S#fsU1{(fuN zerQb$e1*Xm*N?r1?Q86`ShFxaXtRSi?oW6qbF8SP>hw|yGQe+#FPmjNgsWMo9vopC zM4Duik9|yw)#_FAKrK;dfS+#~iw`g~x9OU->mNew!)4M~N!X^<6B1f3VDqMuIP3j< zQ(0Yo*ZBEEKYe{!tnoh0s@h+yn-PgUiWlNHQP^T_+c?e!<84~M#&-vc<~_Q3mAn5k zSL_X8p+UYA1ufUQjedxfMuSI_C=QI~Melxd!Kb2x+>n5^Hi8yw-$sJb{?d@uvz({0 z$0Hm0AiW{BOfE~0IU=xmHN4;4RiqaLt@oe0rnRED-NZq|MzNTyS<5_^%Kh|LFPOsQ zu=L!fYL&&mpb$ehtX)H2&{}oe$w9q3PMffZ!!jMQLaRRBckwcr6!-*yw|LqomC4Z{ z4y)s$3EGwNzUy2ekVPDTTsd0uNd%{mc1$LUPH=vJCX!yCkNNacJ1u`an`Pl`t5t0OqAUZOJ2oFg|z^2e0Sfj96dh|(f zCfJRl4@i7%huAvJU%Y4$!^w7t-MY<9Gy=J&wrNtvK8iO+spX`^OjT0QgnNXC1 z1*7dfe0@1d3X(Gp^r|aB>BkU(jn%EG&Q&+}_`5^%?ad2419z&XV5#&ta z=Bq`FFd78$5sAZ`&FVk?C-U&0;pw?plOyrthL{Nc#`XSSPGhGLO=Jl&>}b|Fw8t0RtL8s8q|uec&?!bYjZ35NpYH0%vXy>fzG;U79CdDtx_(-I4q+P z<1`2tWQ2AaQKC(`7`h6tR1{P4qLGxLb+Ip2*eF*tFog8MnmmkdY4+HGbr3O(a84$@ zgU$NdX#$C_o0H*y_dWugq1dbr%t6iA8Qt)dWiQu3&!8qP$kx#A8>b1aFf~HRbp{W6 zD(rV{zt<#fkWt-vNVyK$2I-9w${Vdg1g@#-VsMxw#KAFvB4VKzZiAX}Ijr!+=H{!5 z%t6XfxaK$Gf1*ZNH?LzAI9nW0lyQ$cG6(Bmcv#`3jqMIy6c0)co|4%tD@u+owueb- zO589wVIf@u_JTGuw0R%a7e?T4&`JEjVyKxProZvibaOyV(o&{vfcwbv12)Ul!A^?} zLQW9$V4ZXjN(L2lrj(3k%n(yxhIlQ;*5bm}2PC-tsKpT>r^*o}I!Pi538YVw5->GD z#TPM2Pv_W!jiSO}=?dVBMrtufx}LDXfuWl^LZXX8Npv%;zXpq>dwTjHDL4~(`~c~5 zaC1HhX&QUEPC|(idJS}%G(WC2s&Pv|bz64R2z3}lmH5?ICgdDC|#RdeyMQVSsfZ_ZQcR#7wzlJH>NJQWI_ ziZFF}6=lVkr|=r=k{DhwI7;$Lcapqf2U9A2tWNfdx&$+|4p2lEQy{VgVhPa#(l5Qd%rW!@O$qlTJ^5f47ovRCndebc=1GVP*{&)@3#UeEf8J0It_s!7_OV? zf)fO+nW(YW6rv!#7^%Vl`|@}#{);8Hl*2-u1Q;VoZ#d!mL&h~7q;Mn+E{rvx%VHJj z)n>Q`Eyi->A{J}NHJ!W|BS_15TJgikLuOL(qd}3OkjXPh7Hg0uTc+DWrT`{S#!{Vh z8Ka^Z7#n;Wj<@jWslp4Y+I=YI45>Cu9(XII09SHodQco1oNH`%=p@k?!Ty6<=z{=< zNqFLE;?s1OQrP(Ll;ttFWnvAUIhmvH>Lk{Hi{hOgZ0R9K(Z{Ly5+uE)x0--O!*sB1 zEb+8S57tSy0f&JMOGR%-kKv?itC%-v5L;$N?uKA3N+oJ_3Jp1B+WexEgkww%C>R}7 z24B%2SF~(qAOqD?t>n8SCgInWR$0mjYk)PE`KD}4Z!`Ik& zM{GZtTqbIgeaJnb?GBx6A8ZNmHcDd$TMgn*_hqnrhBJKZ%n+v91R%UQ1TWS}0I~+3 zfGH5q9}o(|HMl_C;fxPXi8jEG{Ef)q}ylM`f(w~8v2ZKkX9gG}t$pztP`5m~m= zv}r<0AJ)YavI>C10HuZ9epDw6nGC{fMmRr&^9CKnA)M~92kRmZS>IAqmO0Etok3*E zhdm8-MQ^fE^ESAzR6Q z>eV=V4JQ}=84wIvEVRQ|Z-fq`&9 zH#ML|Qj}#Xj2v@}7A?A zX`};d@uYexcv9;otiopxIG$NdH;3`#ZRy@Dwy)JnC)bOuu%{eG4jQ!bVRQDBxq>~F zHphku1$#eV5zE@!X>8o5@~F&|JgO*{VL#9J@fEOoded#~rS+dksIq7xR7sZoJaXiC zdyZ3Y+wnuDa0~x;X;p!%z2>_wTN%3z=q>-!s{TKtRpoA+Fd=U7)P~GtvY&Kzn)5eYR%yHwU zQxvM|qw$RA?tM`(y9V~DoeC=B)LB5j#06u2K5 zFK)&QLS6!7Z4}xfBM3$AgNL~^=K&#S0kSgM)G`AIwcm@-wC2PgG(H@4-P9uEhbHL0 z2hj}IHRtz`&D>if_Q1no%(~8-y~u0++=cM83#L;$9-@7xMeD&pR+C%f^Gvr@=kuW6 zJY?df#pXfN;JJ!le-e#{hfI5Gb9j&!02zxuiM)e60n1UFx`VugsOzdvrR<>TT-4D* z2VsZCGlH@D>64i{s22cE)xp!DB^m=@&woJBK@mLEQK*BSg9ZqZ@2A#jvqQ+pUoo2Si zh(U+3skHbos012zZ-oYfys(ijG-tt}MIxj(wiWUVspu>%?hC30dF@-FypY~_K#TB# zHiEn_TjRMPH&C>f7R?3qf${jMWp)c0J{z^jE!Zx4rkb3V_|?wC*#q>4JFiYuiOw0Y1R8PfMukxs}E@zCO& zpux~&Bz{%}oM(NLfDEUocqKS2%zkaoDnXTEc-k@fM2sQu>`==A13E+@Lwgl@1o?q# z-)eD3kR0TgU^(>Jv*4kuhChliVD#DCAviS5E;Xlw;69>(2|_ z7}Fwhc z$rjkvJ6+bITEru(0c3GS7rO$UkMSkwWzmdNfkU(NY;8(KJnB83GP`aT#R4%hZKs1f zf#bIGW^L+3JnBZ`>0(R3voWG0kcquEM*^MUpf0_1P$c4!`8eII2zWBa*J5PygBBNp z3>FU^R0#NED-x?2`vE@}!wHc3YH=ROus@}P@<1WsYO#vt0FR+q4# zE^0$O>InL1uo>_(F;Itg%{dHYmn1qU43v4Au@*p;KHvdbTm^C(IHiNCfE9tFuc~~i zWGB$lhk-Uf<9@1h67W=DK3WGQAs(3yQxuQYSqQXrXMh>6EO{uo2V^=OrGt6^)*Ya# zqBlJYgMmSsa}3~F7{+X5(M}h~Km$ibD?ouHPBStA^(2g8(6KLda0$RbO&U@30sI_{ zRbpgD)@*f?22gi^o2ZjBfF}cUOI0V8Q~@+cjJl0$i6DTcgD08m<_F-p%2WeT`78`% zK1_=XfN)10by5Kk4h6*^YA^uc?e8?o{>TzQuIQ}#qm6L)&pL|z@U~`!AD)N70hnnz z3;ZY-CLb`c$}!cRh@k{hR`V54#J~%X%{q(uINOl=yCX)d+IFFlVfJCS(yj7pr&^9x;YvCg*waeq@^{B@BlHK%nlk5 z@KAJ%?{t^mv1LpkJk<*BC=yWYa9+@;vy+j(NoScId$h@aG^*%G!4cl-smunWx$tCM%o%M3E zOW$jh$&s@VbyN^yHJ^|19qB1L%j0-)V`8pR6-UFvky#I2<#5VhbXLRh61T%-^%^+p z1Ak!tqjvFI;V`;t-)I4R>_;EPfOV9*k-}qimAcU_=utZ-^$IuI062qmmbR5% zqocA-D_#id3{)>@RC?ORyrs!hW~ zG7gH6@j$hbG#U)2>^3b`qtQ{Acou3Eqw#|>yhX@pc~cD<9SuX4COcXzKcht)WOlxJ z^%*}b<2&3pVN=x^!5O@TwB>>`e(;8QAFX;bequ(IsSp``*;Hpn@-WmXu*DKHiUgzx ztqL=KYQ~WcfHbmI#}7fs7yXNqX57Re^eEdY1M-OYhFu* zWIZ303wk+e)se}kXXL|4p5ZrX%K9;h)n$H*wPRY%1W;>B^U^W(1dSZf%fxu`DMiT` z7j3%CZ?RmAl0mDM9->k7y$BhaICJ(N%4PKlLtVDCSRY2?0A`_9d06=v4Ns$Z)b)q+ ztyF?-O%Za^sst;aqmeu|4s|mN`P2fi>OmUfQBlac@5WCp{Hi@kL+CctJRJ4ty<*4z zZpqi*)79Q_<{WNP$-gDv|CgVnv6lSAl1XYGi~t{5@bBwi3;b(=|BEeP&^Ed|vx|$J zb%?SiG(Jg1#~uF%-s%@keg;sZHk2`Zt_yrv<^SkwQZWd@uWCdiUro|zTk-q&Q-uD< zUMlIt#i4q7`UVCD`g$~)LLBvJPyd4>&?LQ)qi@jO$k@cBgHbzug#vSN@Batw-!GpO z0RL65>C(=~#Jr1Dj~-tqUT!>IoX=*vGsvs|jrA=ixwDJYnm)AWzZxxzXr=VxCHn1+ zJ9g>Of8dZ2!$rz>KlyucbN6Xg4R__|UKQJdbhEC#2MnJ$eb(IBS3X&;s)0V~KCMbs zUK~=aXjQ#Lza2>L`|X%%bC&rBZ(M&}1^1~x>@)6QVq#*f6w%suwh}uU#vP=8_oL&2 z)uE9|Dan%C%1fX8eYI8h9zDCmhw6RoHRPfKyV};k$kej;w>Hxkt>MWsa(3rtME!I5 zeA^$(H$S+j=nYn9h4E*#mc zln$R4)|Rg)kDok!Qh)Q;)XyXT{Tq1w{`B_oq|YP&?++i||Mkb?%0kKKkq@5`{^76R zA6(e6@pH*1KD>Qibv#Ke{@T+0p#Sgxcyx7d`25e+|G(e8tT~ghPHp~c)BgYc;m@Zx z4o7>A`#k;s`)}-hJ2%pQ_&oC8zkmDuPH_@*@_#;${I~C3H(c2h#u(Z2^T_}GkLUM( zOY?Ue*yZ!cfA->0MPcNUv3=k}kd?2t^#A(DHRrN}oWJj;w*G5N`8D^iAC)bi^o2!x zW$)WI|5jC%?&7!&>u#d9VQN9y%$oXjXG6Wu)Bo!i_6iq{?q%9expxIM+Oq%U zzoxJM`Ma)0`kzUDSwXbd_I1ay;|@M zY17e%Q?d~~Ow_$Et&Qb74AAgCi#8Td{Me_X`rOBEYx#q_X?S0CTg(5v-bWCh*ZT-U z!~2l(kf-fNLBspnI{2ZR8r~P(cKudLQlI;f@_bWyu?@bf&wXvW@KE$kJ@vS^L4TWz zP)j}NGYmhWw($8J!>=K~xoz6w_oiJB`V7%e5Nh&2hx@6^Z}Z%X$5*ZY`E4=Y&1I;` zFK&LVEq+&%-`E!Nn#)j=-~3XW{Qj?el?B?w-pz%mq_^#{i%N}u<*O{9vPoP1ppyRY z__w9mRkHrIzsdriJO34{2Bi&uQ1u?6&%OTn-0MH*HZ;3Rl$!lN_xc~Hlxo8t)cW7H z2k(kLs>}Zz4yZ2wb2xyy{LgUwrM~|{D6I`0PsjM9&oBdM*#9#OfTsMmj{r^i{o33C zH07hMZLL5v`TzOM@(s4Nu>#Hdum8>Gm9N)c*tQBZ>p#t)XHAJ7I>jTJeg`XcD*4|x4*@}n<`#^p4l4U^nEuq1Gp3Q=)dGOZmf7UWCY9{Y^|(PTU=DUy=&s~_+Rcc{_*VqT4&PcTN?Bjx>oO{r z?=kH;lEKX^$d|3O{|ZeYsp6aWKs8?@>Vg%tel$ri7PUv{EM5-RcAzx_F2TS?u^ z*UxLt?c~lI)mvG~qXxjZ7`OE5^dCE)*u28+f`wyxYjBKOl8z8fuf18H(SdJpd&TSR zFYY6Hnc)#o{q;p=@6ii{`{3_FU(}Zu#;%z1byFde8~_j8w6TNL4=zEe2M(kJ%mjv; zdabEt`49p|UB0&S)tHC=I3jfU$u*{0p%Agma=~^&1ep-h=&kpXVQJ}&uf1BO9j;IhfAZ(`;M6(mRDB$^wFKu+c^t< z>~CS%)H^bXza)q~R+a<7`}Q5o;?5hjs+~syNHt+tOy?5l^vb%LvrF&ymI(*;Vw4Iu7)5u1X_1ar}X}dfo@6fIY&*l`b z*5xBTgAQH4nY5U@?ZnL&@BVJmp*Cs0Sx57(eZHTvgr9w?vijEfeQ~}{Ln+^E!nDIJ zChHklemmVidC$I72!3m|39RYHmVTn?wKKIEXt#vBt@zsg#@BCNzkGPREL-F@=DRQZ z_Wk19(T-l+jANH>RGi%_UE?yMulnF)NC-hY1Dd`ucz5SVuT z&!`zoHzn*kcK+I}JGUw>o+&^`x z#KHY6F|y9yV-T7?{BdH(jwbjoBUPZE@&io|ccJIkBkY_PG1s%hCDAd_5+OHe&9Zqv dkN@FIYjb1uX-69w+8eZMhyOBE`\277\377`>\277\377\274\254P\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\337\337\337\30PPP\377\312" - "\312\3121\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\377\337\327\40\377\207n\217\3778\16\357\377L\0\377\377[\0\377\377i\0\377" - "\377c\0\377\3778\16\357\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\342\342\342\11PPP\377PPP\377PPP\377\245\245\245X\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\307\273@\377`>\277\3779\0\377" - "\377f\0\377\377\215\0\377\377\220\0\377\377\210\0\377\377}\0\377\377g\0\377" - "\377E\36\337\0\0\0\0\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\1\\\\\\\242PPP\377PPP\377PPP\377PPP\377jjj\224\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\377\307\273@\377`>\277\377F\0\377\377z\0\377\377\224\0\377\377\223\0\377" - "\377\220\0\377\377\213\0\377\377}\0\377\377S\0\377\377S.\317\371\325\312" - "1\177\177\177\2\177\177\177\2\252\252\252\3\277\277\277\4\277\277\277\4\277" - "\277\277\4\252\252\252\3\177\177\177\2\0\0\0\1\0\0\0\1\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0jjj\224PPP\377PPP\377PPP\377PPP\377" - "PPP\377\312\312\3121\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\377\307\273@\377`>\277\377F\0\377\377z\0\377\377\223" - "\0\377\377\223\0\377\377\221\0\377\377\216\0\377\377}\0\377\377R\0\377\377" - "<\16\357\377\224~\201\252\252\252\3\277\277\277\4\324\324\324\6\337\337\337" - "\10\342\342\342\11\347\347\347\13\347\347\347\13\345\345\345\12\337\337\337" - "\10\314\314\314\5\252\252\252\3\0\0\0\1\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\245\245\245XPPP\377PPP\377PPP\377PPP\377PPP\377\245\245\245" - "X\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\337" - "\327\40\377mN\257\377F\0\377\377z\0\377\377\223\0\377\377\222\0\377\377\220" - "\0\377\377\215\0\377\377r\0\377\377N\0\377\377E\36\337\374\240\213q\361\344" - "\344\23\314\314\314\5\337\337\337\10\347\347\347\13\356\356\356\17\361\361" - "\361\23\350\350\350\27\353\353\353\32\353\353\353\32\361\344\335&\371\203" - "j\227\375R.\321\3778\16\357\375_>\300\377`>\277\377mN\257\377\223}\200\377" - "\223}\200\377\257\234`\342\257\244Z|G<\377|G<\377[NK\377PPP\377PPP\377jj" - "j\224\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377" - "\357\337\20\377\307\273@\377\257\234`\377\223}\200\377`>\277\377y^\237\377" - "\357\337\20\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\377\357\337\20\377\207n\217\3779\0\377\377s\0\377\377" - "\223\0\377\377\222\0\377\377\220\0\377\377\215\0\377\377r\0\377\377B\0\377" - "\377`>\277\374\255\235a\252\252\252\3\324\324\324\6\342\342\342\11\353\353" - "\353\15\361\361\361\23\353\353\353\32\347\347\347!\346\346\346)\344\344\344" - "0\341\341\3414\341\341\3413\361\224\200\211\377T\0\377\377{\0\377\377\213" - "\0\377\377y\0\377\377x\0\377\377r\0\377\377_\0\377\377^\0\377\377Q\0\377" - "\377E\0\377\377E\0\377\377E\0\377\3772\0\377\377,\0\377\377,\0\377\377,\0" - "\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377" - ",\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377" - "\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0" - "\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377" - ",\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377" - "\377,\0\377\377,\0\377\3772\0\377\377A\0\377\377I\0\377\377P\0\377\377_\0" - "\377\377V\0\377\377`>\277\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1\0\0\0\1" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\377\257\234`\377>\16\357\377f\0\377\377\223\0\377" - "\377\222\0\377\377\220\0\377\377\214\0\377\377|\0\377\377M\0\377\377`>\277" - "\373\310\274A\252\252\252\3\324\324\324\6\342\342\342\11\354\354\354\16\362" - "\362\362\25\355\355\355\35\345\345\345(\341\341\3413\336\336\336?\326\326" - "\326K\324\324\324T\320\320\320X\322\322\322U\365W6\322\377t\0\377\377\222" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\224\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377" - "\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377" - "\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223" - "\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0" - "\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377" - "\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377" - "\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223" - "\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0\377\377\223\0" - "\377\377\223\0\377\377\222\0\377\377\216\0\377\377\205\0\377\377|\0\377\377" - "u\0\377\377q\0\377\377p\0\377\377,\0\377\252\252\252\3\252\252\252\3\277" - "\277\277\4\277\277\277\4\277\277\277\4\252\252\252\3\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\324\311" - "0\377`>\277\377S\0\377\377\215\0\377\377\222\0\377\377\220\0\377\377\214" - "\0\377\377\210\0\377\377]\0\377\377I\35\337\374\255\235a\252\252\252\3\314" - "\314\314\5\342\342\342\11\354\354\354\16\362\362\362\25\356\356\356\37\346" - "\346\346*\337\337\3378\327\327\327G\320\320\320W\312\312\312f\303\303\303" - "s\300\300\300{\277\277\277}\302\302\302v\360S2\330\377w\0\377\377\224\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377" - "\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377" - "\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\225\0\377\377\224" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\224\0\377\377\224\0\377\377\225\0\377\377\224\0\377\377\224\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377" - "\224\0\377\377\224\0\377\377\221\0\377\377\211\0\377\377~\0\377\377v\0\377" - "\377r\0\377\377[\0\377\374kM\262\342\342\342\11\345\345\345\12\347\347\347" - "\13\347\347\347\13\347\347\347\13\342\342\342\11\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\223}\200\377@\0\377" - "\377z\0\377\377\223\0\377\377\220\0\377\377\215\0\377\377\211\0\377\377y" - "\0\377\377A\0\377\377\207n\217\361\344\344\23\314\314\314\5\337\337\337\10" - "\354\354\354\16\362\362\362\25\356\356\356\37\347\347\347+\340\340\340:\331" - "\331\331J\317\317\317\\\307\307\307n\276\276\276\177\266\266\266\215\261" - "\261\261\230\257\257\257\235\260\260\260\231\267\267\267\214\357Q0\334\377" - "x\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\223\0\377\377\224\0\377\377\223\0\377\377\224\0\377\377\224\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377" - "\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377" - "\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377\224\0\377\377\223\0\377\377\223\0\377\377\220\0\377\377\207\0\377" - "\377}\0\377\377u\0\377\377r\0\377\377F\0\377\365\246\226n\350\350\350\27" - "\352\352\352\31\353\353\353\32\354\354\354\33\352\352\352\31\363\363\363" - "\26\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\324\3110\377" - "S.\317\377`\0\377\377\223\0\377\377\221\0\377\377\216\0\377\377\211\0\377" - "\377\204\0\377\377e\0\377\377I\35\337\373\310\274A\277\277\277\4\337\337" - "\337\10\351\351\351\14\362\362\362\24\355\355\355\35\346\346\346*\337\337" - "\3379\326\326\326K\316\316\316^\304\304\304q\274\274\274\203\264\264\264" - "\224\254\254\254\241\251\251\251\252\247\247\247\256\247\247\247\254\254" - "\254\254\241\267\267\267\216\357Q0\334\377y\0\377\377\224\0\377\377\224\0" - "\377\377\223\0\377\377\222\0\377\377\221\0\377\377\220\0\377\377\220\0\377" - "\377\220\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377" - "\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221" - "\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0" - "\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377" - "\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377" - "\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221" - "\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0" - "\377\377\221\0\377\377\221\0\377\377\221\0\377\377\221\0\377\377\220\0\377" - "\377\217\0\377\377\212\0\377\377\202\0\377\377z\0\377\377t\0\377\377q\0\377" - "\3770\0\377\345\330\330<\344\344\3441\341\341\3414\342\342\3426\336\336\336" - "7\341\341\3414\347\347\347,\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\377\223}\200\377@\0\377\377\200\0\377\377\223\0\377\377\220\0\377\377" - "\214\0\377\377\206\0\377\377\201\0\377\377T\0\377\377lO\260\361\344\344\23" - "\324\324\324\6\347\347\347\13\360\360\360\22\354\354\354\33\345\345\345(" - "\336\336\3367\330\330\330I\315\315\315]\304\304\304q\273\273\273\204\262" - "\262\262\226\254\254\254\244\246\246\246\257\244\244\244\264\244\244\244" - "\264\246\246\246\257\254\254\254\244\264\264\264\223\277\277\277|\361T3\327" - "\377y\0\377\377\224\0\377\377\224\0\377\377\223\0\377\377\220\0\377\377\214" - "\0\377\377\211\0\377\377\210\0\377\377\210\0\377\377\211\0\377\377\211\0" - "\377\377\211\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377" - "\377\212\0\377\377\212\0\377\377\212\0\377\377\211\0\377\377\212\0\377\377" - "\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377\211" - "\0\377\377\212\0\377\377\211\0\377\377\212\0\377\377\212\0\377\377\212\0" - "\377\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377" - "\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377\212\0\377\377" - "\212\0\377\377\212\0\377\377\211\0\377\377\212\0\377\377\211\0\377\377\211" - "\0\377\377\211\0\377\377\210\0\377\377\206\0\377\377\201\0\377\377{\0\377" - "\377v\0\377\377r\0\377\377V\0\377\356jN\277\322\322\322V\321\321\321Y\317" - "\317\317\\\316\316\316_\316\316\316^\320\320\320X\326\326\326K\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377\337\327\40\377`>\277\377`\0\377\377\224\0\377" - "\377\222\0\377\377\217\0\377\377\212\0\377\377\203\0\377\377x\0\377\377I" - "\0\377\375\222|\201\314\314\314\5\342\342\342\11\356\356\356\17\351\351\351" - "\30\351\351\351$\341\341\3413\332\332\332E\321\321\321Z\305\305\305o\273" - "\273\273\204\262\262\262\226\253\253\253\245\246\246\246\260\243\243\243" - "\265\243\243\243\266\245\245\245\261\251\251\251\247\260\260\260\231\271" - "\271\271\210\303\303\303t\315\315\315]\365W6\321\377y\0\377\377\224\0\377" - "\377\224\0\377\377\222\0\377\377\215\0\377\377\206\0\377\377\201\0\377\377" - "~\0\377\377~\0\377\377~\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377" - "\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177" - "\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0" - "\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377" - "\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377" - "\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177" - "\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0" - "\377\377\177\0\377\377\177\0\377\377\177\0\377\377\177\0\377\377~\0\377\377" - "|\0\377\377y\0\377\377u\0\377\377r\0\377\377p\0\377\377=\0\377\315\230\214" - "\241\273\273\273\204\273\273\273\207\267\267\267\213\266\266\266\215\270" - "\270\270\212\275\275\275\200\310\310\310l\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\274" - "\254P\377D\15\357\377z\0\377\377\224\0\377\377\222\0\377\377\216\0\377\377" - "\211\0\377\377\202\0\377\377v\0\377\377D\14\357\374\253\234b\332\332\332" - "\7\351\351\351\14\362\362\362\25\347\347\347\40\343\343\343.\333\333\333" - "@\322\322\322U\310\310\310k\275\275\275\201\263\263\263\225\253\253\253\245" - "\245\245\245\261\243\243\243\266\243\243\243\266\245\245\245\261\251\251" - "\251\247\260\260\260\231\271\271\271\210\302\302\302v\313\313\313c\325\325" - "\325P\335\335\335=\370Z8\312\377y\0\377\377\224\0\377\377\224\0\377\377\222" - "\0\377\377\213\0\377\377\202\0\377\377{\0\377\377v\0\377\377u\0\377\377v" - "\0\377\377v\0\377\377v\0\377\377v\0\377\377v\0\377\377w\0\377\377w\0\377" - "\377v\0\377\377v\0\377\377v\0\377\377w\0\377\377v\0\377\377w\0\377\377v\0" - "\377\377w\0\377\377v\0\377\377w\0\377\377v\0\377\377v\0\377\377v\0\377\377" - "v\0\377\377w\0\377\377v\0\377\377w\0\377\377w\0\377\377w\0\377\377v\0\377" - "\377v\0\377\377v\0\377\377v\0\377\377v\0\377\377v\0\377\377w\0\377\377w\0" - "\377\377w\0\377\377v\0\377\377v\0\377\377w\0\377\377v\0\377\377v\0\377\377" - "u\0\377\377u\0\377\377s\0\377\377r\0\377\377p\0\377\377g\0\377\363;\24\365" - "\246\246\246\257\245\245\245\261\244\244\244\264\241\241\241\267\241\241" - "\241\267\244\244\244\262\254\254\254\243\270\270\270\211\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316" - "\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377" - "\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316" - "\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377" - "\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316" - "\316\377\352s[\377\377M\0\377\377\215\0\377\377\224\0\377\377\222\0\377\377" - "\216\0\377\377\207\0\377\377\200\0\377\377u\0\377\375B\12\377\325\256\246" - "\377\312\312\312\377\307\307\307\377\304\304\304\377\276\276\276\377\267" - "\267\267\377\256\256\256\377\246\246\246\377\234\234\234\377\224\224\224" - "\377\214\214\214\377\206\206\206\377\203\203\203\377\203\203\203\377\206" - "\206\206\377\212\212\212\377\220\220\220\377\227\227\227\377\240\240\240" - "\377\246\246\246\377\256\256\256\377\265\265\265\377\273\273\273\377\300" - "\300\300\377\342xa\377\377`\0\377\377\224\0\377\377\224\0\377\377\221\0\377" - "\377\212\0\377\377\200\0\377\377x\0\377\377s\0\377\377r\0\377\377q\0\377" - "\377r\0\377\377r\0\377\377r\0\377\377q\0\377\377r\0\377\377r\0\377\377r\0" - "\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377" - "r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377" - "\377r\0\377\377r\0\377\377r\0\377\377q\0\377\377r\0\377\377r\0\377\377r\0" - "\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377q\0\377\377" - "r\0\377\377r\0\377\377r\0\377\377r\0\377\377r\0\377\377q\0\377\377q\0\377" - "\377q\0\377\377p\0\377\377p\0\377\377p\0\377\377N\0\377\311_I\351\223\223" - "\223\324\223\223\223\325\221\221\221\327\222\222\222\330\223\223\223\326" - "\227\227\227\315\241\241\241\272\261\261\261\232\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\247\232\227\377\347I(\377\377g\0" - "\377\377\224\0\377\377\224\0\377\377\222\0\377\377\215\0\377\377\207\0\377" - "\377\177\0\377\377k\0\377\372;\11\377\260\211\200\377\235\235\235\377\232" - "\232\232\377\226\226\226\377\221\221\221\377\213\213\213\377\204\204\204" - "\377|||\377uuu\377nnn\377iii\377fff\377eee\377fff\377jjj\377ooo\377uuu\377" - "|||\377\202\202\202\377\210\210\210\377\216\216\216\377\222\222\222\377\226" - "\226\226\377\231\231\231\377\234\234\234\377\317eO\377\377`\0\377\377\224" - "\0\377\377\224\0\377\377\221\0\377\377\212\0\377\377\200\0\377\377w\0\377" - "\377r\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0" - "\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377" - "p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377" - "\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0" - "\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377" - "p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377" - "\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0" - "\377\3770\0\377\217\202\177\354\210\210\210\353\210\210\210\354\207\207\207" - "\355\210\210\210\354\211\211\211\347\221\221\221\332\235\235\235\302\257" - "\257\257\236\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\263\213\203" - "\377\364A\23\377\377z\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377" - "\215\0\377\377\206\0\377\377~\0\377\377j\0\377\356E\34\377\252\220\212\377" - "\234\234\234\377\230\230\230\377\224\224\224\377\216\216\216\377\207\207" - "\207\377\200\200\200\377www\377ppp\377jjj\377fff\377ddd\377ddd\377hhh\377" - "lll\377rrr\377zzz\377\201\201\201\377\210\210\210\377\215\215\215\377\222" - "\222\222\377\227\227\227\377\231\231\231\377\234\234\234\377\236\236\236" - "\377\236\236\236\377\312mZ\377\377Y\0\377\377\224\0\377\377\224\0\377\377" - "\221\0\377\377\211\0\377\377\177\0\377\377w\0\377\377r\0\377\377p\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377p\0\377\377" - "p\0\377\377o\0\377\377o\0\377\377o\0\377\377V\0\377\317K0\374\202\202\202" - "\367\202\202\202\367\202\202\202\367\202\202\202\367\204\204\204\364\207" - "\207\207\355\220\220\220\334\236\236\236\300\261\261\261\230\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316" - "\316\316\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\276|n\377\372E\10\377\377\207\0\377\377\224\0\377\377" - "\223\0\377\377\221\0\377\377\214\0\377\377\205\0\377\377~\0\377\377n\0\377" - "\364>\23\377\243\226\223\377\233\233\233\377\227\227\227\377\221\221\221" - "\377\213\213\213\377\203\203\203\377{{{\377sss\377lll\377fff\377ccc\377b" - "bb\377ddd\377hhh\377nnn\377vvv\377~~~\377\206\206\206\377\214\214\214\377" - "\222\222\222\377\226\226\226\377\231\231\231\377\234\234\234\377\236\236" - "\236\377\237\237\237\377\240\240\240\377\240\240\240\377\270\203x\377\377" - "F\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\211\0\377\377\177\0" - "\377\377v\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377p\0\377\377q\0\377\377r\0\377\377s\0" - "\377\377s\0\377\377r\0\377\377q\0\377\377p\0\377\377p\0\377\377o\0\377\377" - "o\0\377\377=\0\377\237j_\376~~~\375~~~\375\200\200\200\374\200\200\200\373" - "\203\203\203\366\210\210\210\353\221\221\221\327\243\243\243\266\267\267" - "\267\214\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\304ud\377\377M\0\377\377\215\0\377\377\223\0\377" - "\377\221\0\377\377\216\0\377\377\211\0\377\377\203\0\377\377|\0\377\377r" - "\0\377\372?\10\377\257\210\177\377\231\231\231\377\224\224\224\377\217\217" - "\217\377\210\210\210\377\200\200\200\377www\377ooo\377hhh\377ccc\377aaa\377" - "aaa\377ddd\377iii\377qqq\377yyy\377\201\201\201\377\211\211\211\377\220\220" - "\220\377\225\225\225\377\231\231\231\377\234\234\234\377\236\236\236\377" - "\237\237\237\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240" - "\240\377\255\222\215\377\3779\0\377\377\224\0\377\377\224\0\377\377\221\0" - "\377\377\211\0\377\377~\0\377\377v\0\377\377q\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377g\0\377\3577\20\377\177\177\177\377\177\177\177" - "\377\177\177\177\376~~~\375\200\200\200\373\204\204\204\364\213\213\213\346" - "\227\227\227\315\252\252\252\250\277\277\277}\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\320fP\377\377S\0\377\377\224" - "\0\377\377\222\0\377\377\217\0\377\377\212\0\377\377\205\0\377\377\177\0" - "\377\377z\0\377\377p\0\377\372?\10\377\256\206~\377\230\230\230\377\222\222" - "\222\377\214\214\214\377\205\205\205\377|||\377sss\377kkk\377eee\377aaa\377" - "___\377aaa\377ddd\377kkk\377sss\377|||\377\205\205\205\377\214\214\214\377" - "\222\222\222\377\230\230\230\377\233\233\233\377\235\235\235\377\237\237" - "\237\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240\240\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\365/\6\377\377\215\0\377" - "\377\223\0\377\377\217\0\377\377\207\0\377\377}\0\377\377u\0\377\377q\0\377" - "\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377I\0\377\267ZG\377\177\177" - "\177\377\177\177\177\377\177\177\177\377~~~\375\201\201\201\371\206\206\206" - "\360\217\217\217\336\236\236\236\300\261\261\261\230\310\310\310l\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\316\316\316\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\334X=\377\377`\0\377\377" - "\224\0\377\377\222\0\377\377\216\0\377\377\210\0\377\377\202\0\377\377|\0" - "\377\377w\0\377\377t\0\377\3779\0\377\256\206~\377\226\226\226\377\221\221" - "\221\377\212\212\212\377\201\201\201\377yyy\377ppp\377hhh\377bbb\377___\377" - "^^^\377```\377eee\377lll\377uuu\377~~~\377\207\207\207\377\217\217\217\377" - "\225\225\225\377\231\231\231\377\235\235\235\377\236\236\236\377\240\240" - "\240\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\206\206\206\377\3107\31" - "\377\377s\0\377\377\223\0\377\377|\0\377\377n\0\377\377T\0\377\377P\0\377" - "\377F\0\377\377=\0\377\377=\0\377\377=\0\377\3779\0\377\377,\0\377\377,\0" - "\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377" - ",\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377" - "\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0" - "\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377,\0\377\377" - ",\0\377\377,\0\377\377,\0\377\3770\0\377\377A\0\377\377k\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377k\0\377\3674\7\377\205xu" - "\377\177\177\177\377\177\177\177\377\177\177\177\376\200\200\200\374\203" - "\203\203\366\211\211\211\352\224\224\224\323\245\245\245\261\273\273\273" - "\207\317\317\317[\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\334X=\377\377m\0" - "\377\377\224\0\377\377\222\0\377\377\216\0\377\377\207\0\377\377\200\0\377" - "\377z\0\377\377v\0\377\377s\0\377\377F\0\377\300q`\377\225\225\225\377\217" - "\217\217\377\207\207\207\377~~~\377uuu\377mmm\377eee\377```\377]]]\377]]" - "]\377```\377eee\377mmm\377www\377\200\200\200\377\211\211\211\377\221\221" - "\221\377\226\226\226\377\233\233\233\377\235\235\235\377\237\237\237\377" - "\240\240\240\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223\223\377" - "PPP\377\222B2\377\377?\0\377\377,\0\377\3352\16\377\3246\25\377\331oY\377" - "\325kU\377\276n^\377\244od\377\233f[\377\230cX\377\215e]\377rrr\377rrr\377" - "rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rr" - "r\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377" - "rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377{nk\377\236\\N\377" - "\371D\5\377\377k\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377V\0" - "\377\312F+\377}}}\377\177\177\177\377\177\177\177\377\177\177\177\376\201" - "\201\201\372\205\205\205\362\215\215\215\342\231\231\231\307\254\254\254" - "\241\301\301\301u\326\326\326K\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\334X=\377\377m\0\377" - "\377\224\0\377\377\222\0\377\377\216\0\377\377\207\0\377\377\177\0\377\377" - "y\0\377\377t\0\377\377q\0\377\377R\0\377\322\\C\377\224\224\224\377\215\215" - "\215\377\205\205\205\377|||\377rrr\377jjj\377ccc\377^^^\377\\\\\\\377\\\\" - "\\\377___\377fff\377nnn\377www\377\201\201\201\377\212\212\212\377\222\222" - "\222\377\230\230\230\377\233\233\233\377\236\236\236\377\237\237\237\377" - "\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "kkk\377PPP\377[NK\377qIA\377OOO\377MMM\377\240\240\240\377\301\301\301\377" - "\255\255\255\377\230\230\230\377\207\207\207\377|||\377vvv\377sss\377rrr" - "\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377" - "rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rr" - "r\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377rrr\377" - "rrr\377\334>\35\377\377^\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\3774\0\377\204id\377}}}\377\177\177\177\377\177\177\177\376~~~\375\202\202" - "\202\370\207\207\207\355\221\221\221\331\241\241\241\271\265\265\265\217" - "\313\313\313c\335\335\335<\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\326_G\377\377f\0\377\377\224\0\377\377\223" - "\0\377\377\217\0\377\377\210\0\377\377\200\0\377\377y\0\377\377t\0\377\377" - "q\0\377\377_\0\377\345G&\377\223\223\223\377\214\214\214\377\203\203\203" - "\377yyy\377ppp\377hhh\377aaa\377\\\\\\\377ZZZ\377[[[\377___\377eee\377nn" - "n\377xxx\377\202\202\202\377\214\214\214\377\223\223\223\377\230\230\230" - "\377\234\234\234\377\236\236\236\377\240\240\240\377\240\240\240\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377" - "PPP\377PPP\377PPP\377OOO\377ggg\377\323\323\323\377\303\303\303\377\257\257" - "\257\377\234\234\234\377\212\212\212\377~~~\377xxx\377ttt\377ttt\377sss\377" - "ttt\377ttt\377ttt\377ttt\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uu" - "u\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377" - "uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377uuu\377\377" - ",\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377^\0\377\334>\35\377" - "sss\377~~~\377\177\177\177\376\177\177\177\376\200\200\200\373\204\204\204" - "\364\213\213\213\346\227\227\227\315\250\250\250\251\277\277\277}\323\323" - "\323R\343\343\343/\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\304ud\377\377S\0\377\377\224\0\377\377\223\0\377\377\220\0\377\377" - "\211\0\377\377\201\0\377\377y\0\377\377t\0\377\377q\0\377\377l\0\377\371" - "7\11\377\231\214\211\377\212\212\212\377\201\201\201\377www\377nnn\377ff" - "f\377___\377[[[\377YYY\377ZZZ\377^^^\377eee\377nnn\377yyy\377\203\203\203" - "\377\214\214\214\377\224\224\224\377\231\231\231\377\235\235\235\377\236" - "\236\236\377\240\240\240\377\240\240\240\377\240\240\240\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377kkk\377PPP\377PPP\377PPP\377" - "PPP\377OOO\377\266\266\266\377\325\325\325\377\306\306\306\377\263\263\263" - "\377\237\237\237\377\215\215\215\377\202\202\202\377zzz\377xxx\377www\377" - "xxx\377xxx\377yyy\377yyy\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zz" - "z\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377" - "zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377zzz\377\223" - "kc\377\3779\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377E\0\377" - "\252[J\377uuu\377\177\177\177\377\200\200\200\374\200\200\200\374\201\201" - "\201\371\206\206\206\360\217\217\217\335\236\236\236\277\261\261\261\230" - "\310\310\310k\334\334\334C\351\351\351$\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\304ud\377\377S\0\377\377\224\0\377\377\223\0\377\377\221\0\377" - "\377\212\0\377\377\203\0\377\377z\0\377\377u\0\377\377r\0\377\377p\0\377" - "\377=\0\377\255xm\377\211\211\211\377\200\200\200\377vvv\377lll\377ddd\377" - "]]]\377ZZZ\377XXX\377YYY\377]]]\377ddd\377mmm\377xxx\377\203\203\203\377" - "\214\214\214\377\224\224\224\377\231\231\231\377\235\235\235\377\237\237" - "\237\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377PPP\377PP" - "P\377PPP\377PPP\377\205\205\205\377\337\337\337\377\327\327\327\377\312\312" - "\312\377\270\270\270\377\245\245\245\377\224\224\224\377\210\210\210\377" - "\202\202\202\377\177\177\177\377\177\177\177\377\177\177\177\377\200\200" - "\200\377\201\201\201\377\202\202\202\377\203\203\203\377\203\203\203\377" - "\204\204\204\377\205\205\205\377\205\205\205\377\205\205\205\377\205\205" - "\205\377\205\205\205\377\205\205\205\377\205\205\205\377\205\205\205\377" - "\205\205\205\377\205\205\205\377\205\205\205\377\205\205\205\377\205\205" - "\205\377\205\205\205\377\205\205\205\377\205\205\205\377\205\205\205\377" - "\205\205\205\377\205\205\205\377\205\205\205\377\205\205\205\377\205\205" - "\205\377\205\205\205\377\205\205\205\377\273^K\377\377I\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377g\0\377\3577\20\377}}}\377zzz\377\202\202\202\377" - "\201\201\201\371\201\201\201\372\203\203\203\365\211\211\211\351\225\225" - "\225\322\246\246\246\260\273\273\273\205\321\321\321Z\342\342\3425\354\354" - "\354\33\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\263\213\203\377\372E\10\377\377\215" - "\0\377\377\224\0\377\377\221\0\377\377\214\0\377\377\204\0\377\377|\0\377" - "\377u\0\377\377r\0\377\377p\0\377\377N\0\377\310^H\377\210\210\210\377~~" - "~\377ttt\377kkk\377bbb\377\\\\\\\377XXX\377WWW\377XXX\377\\\\\\\377ccc\377" - "mmm\377www\377\202\202\202\377\214\214\214\377\224\224\224\377\231\231\231" - "\377\235\235\235\377\237\237\237\377\240\240\240\377\240\240\240\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377kkk\377PPP\377PPP\377PPP\377PPP\377PPP\377\273\273\273\377\340" - "\340\340\377\331\331\331\377\316\316\316\377\276\276\276\377\255\255\255" - "\377\236\236\236\377\223\223\223\377\215\215\215\377\213\213\213\377\213" - "\213\213\377\215\215\215\377\216\216\216\377\220\220\220\377\221\221\221" - "\377\223\223\223\377\224\224\224\377\224\224\224\377\225\225\225\377\226" - "\226\226\377\226\226\226\377\226\226\226\377\226\226\226\377\226\226\226" - "\377\226\226\226\377\226\226\226\377\226\226\226\377\226\226\226\377\226" - "\226\226\377\226\226\226\377\226\226\226\377\226\226\226\377\226\226\226" - "\377\226\226\226\377\226\226\226\377\226\226\226\377\226\226\226\377\226" - "\226\226\377\226\226\226\377\226\226\226\377\226\226\226\377\226\226\226" - "\377\353@\34\377\377b\0\377\377o\0\377\377o\0\377\377o\0\377\377N\0\377\306" - "\\F\377\206\206\206\377\200\200\200\377\207\207\207\377\204\204\204\364\203" - "\203\203\366\206\206\206\360\215\215\215\341\233\233\233\305\256\256\256" - "\237\303\303\303s\331\331\331J\346\346\346)\361\361\361\23\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316" - "\316\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\247\232\227\377\3719\11\377\377\215\0\377\377\224\0\377\377\222\0\377\377" - "\215\0\377\377\206\0\377\377}\0\377\377w\0\377\377r\0\377\377p\0\377\377" - "b\0\377\352?\33\377\207\207\207\377~~~\377ttt\377iii\377aaa\377\\\\\\\377" - "XXX\377VVV\377:::\377<<<\377AAA\377GGG\377NNN\377VVV\377\214\214\214\377" - "\224\224\224\377\231\231\231\377\235\235\235\377\237\237\237\377\240\240" - "\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377PPP\377PP" - "P\377PPP\377PPP\377\205\205\205\377\343\343\343\377\340\340\340\377\334\334" - "\334\377\323\323\323\377\306\306\306\377\271\271\271\377\254\254\254\377" - "\243\243\243\377\236\236\236\377\235\235\235\377\237\237\237\377\240\240" - "\240\377\242\242\242\377\244\244\244\377\245\245\245\377\246\246\246\377" - ";;;\377;;;\377<<<\377<<<\377<<<\377<<<\377\253\253\253\377\253\253\253\377" - "\253\253\253\377\253\253\253\377\253\253\253\377\253\253\253\377\253\253" - "\253\377\253\253\253\377\253\253\253\377\253\253\253\377\253\253\253\377" - "\253\253\253\377\253\253\253\377\253\253\253\377\253\253\253\377\253\253" - "\253\377\253\253\253\377\253\253\253\377\253\253\253\377\273\223\213\377" - "\3779\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\3774\0\377\250\216" - "\210\377\223\223\223\377\210\210\210\377\214\214\214\377\207\207\207\356" - "\205\205\205\361\211\211\211\352\223\223\223\326\243\243\243\266\266\266" - "\266\215\315\315\315a\340\340\340;\356\356\356\36\354\354\354\16\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\316\316\316\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\347I(\377\377z\0\377\377\224\0\377\377\222\0\377\377\216\0\377\377" - "\210\0\377\377\177\0\377\377x\0\377\377s\0\377\377p\0\377\377o\0\377\377" - "9\0\377\236vn\377}}}\377rrr\377iii\377aaa\377[[[\377WWW\377UUU\377VVV\377" - "<<<\377@@@\377FFF\377NNN\377UUU\377\\\\\\\377\223\223\223\377\231\231\231" - "\377\235\235\235\377\237\237\237\377\240\240\240\377\240\240\240\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377\274\274\274\377\343\343\343\377\341\341\341\377\337\337\337\377\330" - "\330\330\377\317\317\317\377\305\305\305\377\274\274\274\377\266\266\266" - "\377\263\263\263\377\263\263\263\377\264\264\264\377\266\266\266\377\267" - "\267\267\377\271\271\271\377\272\272\272\377\273\273\273\377BBB\377CCC\377" - "CCC\377CCC\377CCC\377CCC\377\277\277\277\377\277\277\277\377\277\277\277" - "\377\277\277\277\377\277\277\277\377\277\277\277\377\277\277\277\377\277" - "\277\277\377\277\277\277\377\277\277\277\377\277\277\277\377\277\277\277" - "\377\277\277\277\377\277\277\277\377\277\277\277\377\277\277\277\377\277" - "\277\277\377\277\277\277\377\277\277\277\377\343mT\377\377R\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377V\0\377\343`D\377\254\254\254\377\236\236\236" - "\377\220\220\220\377\220\220\220\377\211\211\211\347\210\210\210\353\215" - "\215\215\342\230\230\230\312\252\252\252\246\300\300\300z\325\325\325P\342" - "\342\342-\363\363\363\26\342\342\342\11\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\326_G\377\377f\0\377\377\224\0\377\377" - "\223\0\377\377\220\0\377\377\211\0\377\377\201\0\377\377y\0\377\377t\0\377" - "\377q\0\377\377p\0\377\377N\0\377\304ZD\377}}}\377rrr\377hhh\377```\377Z" - "ZZ\377VVV\377UUU\377VVV\377YYY\377???\377EEE\377LLL\377TTT\377[[[\377aaa" - "\377\231\231\231\377\235\235\235\377\237\237\237\377\240\240\240\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\223\223\223\377]]]\377PPP\377" - "PPP\377PPP\377PPP\377kkk\377\344\344\344\377\343\343\343\377\342\342\342" - "\377\340\340\340\377\335\335\335\377\327\327\327\377\320\320\320\377\313" - "\313\313\377\306\306\306\377\306\306\306\377\306\306\306\377\307\307\307" - "\377\311\311\311\377\312\312\312\377\314\314\314\377\315\315\315\377\315" - "\315\315\377HHH\377HHH\377III\377III\377III\377III\377\320\320\320\377\320" - "\320\320\377\320\320\320\377\320\320\320\377\320\320\320\377\320\320\320" - "\377\320\320\320\377\320\320\320\377\320\320\320\377\320\320\320\377\320" - "\320\320\377\320\320\320\377\320\320\320\377\320\320\320\377\320\320\320" - "\377\320\320\320\377\320\320\320\377\320\320\320\377\320\320\320\377\371" - "A\32\377\377g\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377\322\235\222" - "\377\266\266\266\377\247\247\247\377\226\226\226\377\224\224\224\377\215" - "\215\215\342\213\213\213\345\222\222\222\330\240\240\240\273\264\264\264" - "\224\311\311\311h\333\333\333@\350\350\350\"\357\357\357\20\324\324\324\6" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\316\316\316\377\241\241\241\377\241\241\241\377\271\204y\377\377" - "F\0\377\377\224\0\377\377\223\0\377\377\221\0\377\377\213\0\377\377\203\0" - "\377\377{\0\377\377u\0\377\377r\0\377\377p\0\377\377g\0\377\3608\21\377~" - "~~\377sss\377hhh\377```\377ZZZ\377VVV\377TTT\377UUU\377XXX\377]]]\377DDD" - "\377KKK\377SSS\377ZZZ\377aaa\377eee\377\234\234\234\377\236\236\236\377\240" - "\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377PPP\377\256\256\256\377\344" - "\344\344\377\344\344\344\377\343\343\343\377\342\342\342\377\340\340\340" - "\377\335\335\335\377\331\331\331\377\327\327\327\377\325\325\325\377\324" - "\324\324\377\325\325\325\377\326\326\326\377\327\327\327\377\327\327\327" - "\377\330\330\330\377\330\330\330\377\331\331\331\377LLL\377MMM\377MMM\377" - "MMM\377MMM\377MMM\377\333\333\333\377\333\333\333\377\333\333\333\377\333" - "\333\333\377\333\333\333\377\333\333\333\377\333\333\333\377\333\333\333" - "\377\333\333\333\377\333\333\333\377\333\333\333\377\333\333\333\377\333" - "\333\333\377\333\333\333\377\333\333\333\377\333\333\333\377\333\333\333" - "\377\333\333\333\377\344\257\244\377\377=\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377g\0\377\371A\32\377\313\313\313\377\275\275\275\377\253\253\253" - "\377\230\230\230\377\227\227\227\377\217\217\217\336\217\217\217\336\230" - "\230\230\314\250\250\250\253\275\275\275\201\322\322\322V\345\345\3452\352" - "\352\352\31\347\347\347\13\277\277\277\4\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\241\241" - "\241\377\247\232\227\377\3719\11\377\377\215\0\377\377\224\0\377\377\221" - "\0\377\377\215\0\377\377\205\0\377\377}\0\377\377v\0\377\377r\0\377\377p" - "\0\377\377o\0\377\377=\0\377\237j_\377ttt\377iii\377```\377ZZZ\377VVV\377" - "TTT\377TTT\377VVV\377\\\\\\\377ddd\377III\377QQQ\377YYY\377___\377ddd\377" - "ggg\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377]]]\377PPP\377PPP\377PPP\377" - "PPP\377kkk\377\344\344\344\377\344\344\344\377\344\344\344\377\343\343\343" - "\377\343\343\343\377\342\342\342\377\340\340\340\377\340\340\340\377\336" - "\336\336\377\335\335\335\377\335\335\335\377\335\335\335\377\336\336\336" - "\377\336\336\336\377\337\337\337\377\337\337\337\377\340\340\340\377\340" - "\340\340\377NNN\377NNN\377OOO\377OOO\377OOO\377OOO\377\340\340\340\377\340" - "\340\340\377\340\340\340\377\340\340\340\377\340\340\340\377\340\340\340" - "\377\340\340\340\377\340\340\340\377\340\340\340\377\340\340\340\377\340" - "\340\340\377\340\340\340\377\340\340\340\377\340\340\340\377\340\340\340" - "\377\340\340\340\377\340\340\340\377\340\340\340\377\363pT\377\377V\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377I\0\377\351\214y\377\315\315\315\377" - "\275\275\275\377\252\252\252\377\227\227\227\377\227\227\227\377\220\220" - "\220\333\223\223\223\326\236\236\236\277\261\261\261\232\305\305\305o\332" - "\332\332F\352\352\352&\360\360\360\22\332\332\332\7\177\177\177\2\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\316\316\316\377\241\241\241\377\342Q3\377\377s\0\377\377\224\0\377\377\223" - "\0\377\377\217\0\377\377\210\0\377\377\177\0\377\377x\0\377\377s\0\377\377" - "p\0\377\377o\0\377\377^\0\377\337A\40\377uuu\377jjj\377aaa\377ZZZ\377VVV" - "\377SSS\377SSS\377UUU\377ZZZ\377aaa\377kkk\377OOO\377WWW\377^^^\377ccc\377" - "ggg\377iii\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377\256\256\256\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\343\343\343\377\343\343\343\377\342\342\342\377\342" - "\342\342\377\341\341\341\377\341\341\341\377\341\341\341\377\341\341\341" - "\377\341\341\341\377\342\342\342\377\342\342\342\377\342\342\342\377\342" - "\342\342\377\342\342\342\377OOO\377OOO\377OOO\377OOO\377OOO\377OOO\377\343" - "\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343" - "\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343" - "\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343" - "\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\375" - "7\16\377\377k\0\377\377o\0\377\377o\0\377\377k\0\377\375;\15\377\332\314" - "\312\377\313\313\313\377\272\272\272\377\246\246\246\377\224\224\224\377" - "\224\224\224\377\222\222\222\330\227\227\227\315\245\245\245\261\271\271" - "\271\210\315\315\315]\336\336\3367\354\354\354\34\351\351\351\14\314\314" - "\314\5\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\316\316\316\377\276|n\377\377M\0\377\377\224\0\377" - "\377\223\0\377\377\221\0\377\377\212\0\377\377\202\0\377\377z\0\377\377t" - "\0\377\377q\0\377\377p\0\377\377o\0\377\3774\0\377\207mg\377kkk\377bbb\377" - "ZZZ\377VVV\377SSS\377SSS\377TTT\377XXX\377___\377hhh\377ttt\377UUU\377\\" - "\\\\\377bbb\377fff\377hhh\377jjj\377\240\240\240\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377kkk\377PPP\377" - "PPP\377PPP\377PPP\377]]]\377\326\326\326\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\343" - "\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343" - "\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343" - "\343\343\377\343\343\343\377\343\343\343\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343" - "\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343" - "\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343" - "\377\343\343\343\377\343\343\343\377\343\343\343\377\343\343\343\377\354" - "\252\234\377\377A\0\377\377o\0\377\377o\0\377\377o\0\377\377V\0\377\362o" - "S\377\324\324\324\377\306\306\306\377\265\265\265\377\241\241\241\377\220" - "\220\220\377\223\223\223\377\223\223\223\324\235\235\235\302\255\255\255" - "\240\302\302\302v\326\326\326L\347\347\347+\362\362\362\25\337\337\337\10" - "\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\321\304\302\377\364A\23\377\377\207\0\377" - "\377\224\0\377\377\222\0\377\377\216\0\377\377\205\0\377\377}\0\377\377v" - "\0\377\377r\0\377\377p\0\377\377o\0\377\377V\0\377\314I-\377mmm\377ccc\377" - "\\\\\\\377VVV\377SSS\377SSS\377SSS\377VVV\377\\\\\\\377eee\377ppp\377|||" - "\377ZZZ\377aaa\377fff\377hhh\377jjj\377kkk\377\240\240\240\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377\223\223\223\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377PPP\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\367fH\377\377Z\0\377\377o\0\377\377o\0\377\377o\0\377\3779\0" - "\377\341\271\261\377\320\320\320\377\301\301\301\377\255\255\255\377\233" - "\233\233\377\214\214\214\377\223\223\223\377\227\227\227\316\243\243\243" - "\265\265\265\265\217\314\314\314d\335\335\335=\347\347\347\40\354\354\354" - "\16\314\314\314\5\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\347}g\377\377`\0\377\377\224" - "\0\377\377\223\0\377\377\220\0\377\377\211\0\377\377\200\0\377\377w\0\377" - "\377s\0\377\377p\0\377\377o\0\377\377k\0\377\3705\7\377wjg\377ddd\377\\\\" - "\\\377VVV\377SSS\377RRR\377SSS\377UUU\377ZZZ\377aaa\377lll\377yyy\377\205" - "\205\205\377___\377ddd\377hhh\377iii\377jjj\377kkk\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\206\206\206" - "\377PPP\377PPP\377PPP\377PPP\377PPP\377\311\311\311\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\346\330\326\377\3770\0\377\377o\0\377\377o\0\377\377o\0\377\377b\0\377\371" - "N*\377\327\327\327\377\314\314\314\377\272\272\272\377\247\247\247\377\225" - "\225\225\377\211\211\211\377\223\223\223\377\233\233\233\305\251\251\251" - "\247\277\277\277}\323\323\323S\344\344\3440\351\351\351\30\345\345\345\12" - "\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\337\327\40\3779\0\377\377\224\0\377\377" - "\224\0\377\377\222\0\377\377\214\0\377\377\204\0\377\377{\0\377\377t\0\377" - "\377q\0\377\377p\0\377\377o\0\377\377N\0\377\270N8\377fff\377]]]\377XXX\377" - "TTT\377RRR\377RRR\377TTT\377XXX\377^^^\377hhh\377ttt\377\201\201\201\377" - "\214\214\214\377ccc\377ggg\377iii\377jjj\377kkk\377kkk\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377kkk\377P" - "PP\377PPP\377PPP\377PPP\377\206\206\206\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\356\237\216\377\377E\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "E\0\377\352\232\212\377\324\324\324\377\306\306\306\377\264\264\264\377\240" - "\240\240\377\220\220\220\377\207\207\207\377\224\224\224\377\241\241\241" - "\272\262\262\262\226\310\310\310k\334\334\334C\351\351\351$\360\360\360\21" - "\332\332\332\7\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0\377\377\224" - "\0\377\377\223\0\377\377\217\0\377\377\210\0\377\377\177\0\377\377w\0\377" - "\377r\0\377\377p\0\377\377o\0\377\377k\0\377\3675\7\377reb\377___\377XXX" - "\377UUU\377RRR\377RRR\377SSS\377VVV\377\\\\\\\377ddd\377ooo\377|||\377\210" - "\210\210\377\222\222\222\377fff\377hhh\377jjj\377kkk\377kkk\377kkk\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223\223" - "\377PPP\377PPP\377PPP\377PPP\377PPP\377\256\256\256\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\372O+\377\377b\0\377\377o\0\377\377o\0\377\377k\0\377" - "\375;\15\377\334\317\314\377\317\317\317\377\277\277\277\377\255\255\255" - "\377\232\232\232\377\214\214\214\377\206\206\206\377\231\231\231\377\247" - "\247\247\254\273\273\273\205\321\321\321Z\342\342\3425\354\354\354\33\351" - "\351\351\14\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\307\273@\377F\0\377\377\224" - "\0\377\377\224\0\377\377\221\0\377\377\214\0\377\377\203\0\377\377z\0\377" - "\377s\0\377\377q\0\377\377o\0\377\377o\0\377\377N\0\377\265K5\377aaa\377" - "ZZZ\377UUU\377SSS\377QQQ\377RRR\377TTT\377XXX\377```\377kkk\377www\377\204" - "\204\204\377\217\217\217\377\227\227\227\377hhh\377jjj\377kkk\377kkk\377" - "kkk\377kkk\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377]]]\377\326\326\326\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\347\315\307\377\3774\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377V\0\377\363oT\377\327\327\327\377\312\312\312\377\271\271\271" - "\377\245\245\245\377\224\224\224\377\211\211\211\377\207\207\207\377\235" - "\235\235\377\257\257\257\235\303\303\303s\331\331\331J\346\346\346)\361\361" - "\361\23\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0\377" - "\377\224\0\377\377\223\0\377\377\217\0\377\377\207\0\377\377~\0\377\377v" - "\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\3774\0\377w]W\377\\\\" - "\\\377VVV\377SSS\377QQQ\377QQQ\377SSS\377VVV\377\\\\\\\377fff\377rrr\377" - "\177\177\177\377\213\213\213\377\224\224\224\377\233\233\233\377iii\377j" - "jj\377kkk\377kkk\377kkk\377kkk\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377]]]\377PPP\377PPP\377PPP\377PPP\377\206\206\206\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377PPP\377PPP\377PPP\377PPP" - "\377PPP\377PPP\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\360\223\200\377\377I\0\377\377o" - "\0\377\377o\0\377\377o\0\377\3779\0\377\343\273\263\377\323\323\323\377\305" - "\305\305\377\262\262\262\377\237\237\237\377\217\217\217\377\210\210\210" - "\377\212\212\212\377\243\243\243\377\267\267\267\214\315\315\315a\340\340" - "\340;\356\356\356\37\354\354\354\16\314\314\314\5\177\177\177\2\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377" - "\307\273@\377F\0\377\377\224\0\377\377\223\0\377\377\221\0\377\377\213\0" - "\377\377\202\0\377\377y\0\377\377t\0\377\377q\0\377\377o\0\377\377o\0\377" - "\377V\0\377\306C'\377^^^\377XXX\377SSS\377RRR\377QQQ\377RRR\377UUU\377ZZ" - "Z\377aaa\377mmm\377yyy\377\206\206\206\377\221\221\221\377\230\230\230\377" - "\235\235\235\377\237\237\237\377\240\240\240\377\240\240\240\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\223\223\223\377PPP\377PPP\377PPP\377PPP\377PPP\377\256\256" - "\256\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\374C\35\377\377g\0\377\377o\0\377\377o\0" - "\377\377b\0\377\371N*\377\331\331\331\377\317\317\317\377\276\276\276\377" - "\254\254\254\377\231\231\231\377\213\213\213\377\210\210\210\377\215\215" - "\215\377\252\252\252\377\300\300\300{\322\322\322Q\343\343\343.\350\350\350" - "\27\342\342\342\11\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0\377\377" - "\224\0\377\377\222\0\377\377\216\0\377\377\207\0\377\377}\0\377\377v\0\377" - "\377r\0\377\377p\0\377\377o\0\377\377o\0\377\3779\0\377\177WO\377YYY\377" - "UUU\377RRR\377QQQ\377QQQ\377SSS\377VVV\377]]]\377ggg\377ttt\377\201\201\201" - "\377\214\214\214\377\226\226\226\377\233\233\233\377\236\236\236\377\240" - "\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\206" - "\206\206\377PPP\377PPP\377PPP\377PPP\377]]]\377\326\326\326\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\351" - "\301\271\377\3779\0\377\377o\0\377\377o\0\377\377o\0\377\377E\0\377\352\233" - "\212\377\326\326\326\377\311\311\311\377\267\267\267\377\245\245\245\377" - "\224\224\224\377\212\212\212\377\211\211\211\377\222\222\222\377\262\262" - "\262\377\311\311\311i\333\333\333A\351\351\351#\357\357\357\20\324\324\324" - "\6\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\377\324\3110\377@\0\377\377\224\0\377\377\224\0" - "\377\377\221\0\377\377\212\0\377\377\201\0\377\377x\0\377\377s\0\377\377" - "q\0\377\377p\0\377\377o\0\377\377^\0\377\330:\31\377\\\\\\\377VVV\377SSS" - "\377QQQ\377QQQ\377RRR\377UUU\377ZZZ\377bbb\377nnn\377zzz\377\210\210\210" - "\377\222\222\222\377\231\231\231\377\235\235\235\377\240\240\240\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377kkk\377" - "PPP\377PPP\377PPP\377PPP\377\206\206\206\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\363" - "}d\377\377R\0\377\377o\0\377\377o\0\377\377k\0\377\375;\15\377\335\320\315" - "\377\322\322\322\377\303\303\303\377\261\261\261\377\236\236\236\377\217" - "\217\217\377\211\211\211\377\213\213\213\377\230\230\230\377\272\272\272" - "\377\320\320\320X\341\341\3414\353\353\353\32\347\347\347\13\277\277\277" - "\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\377y^\237\377m\0\377\377\224\0\377\377\223\0\377\377\216" - "\0\377\377\206\0\377\377|\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377E\0\377\233K;\377XXX\377SSS\377QQQ\377QQQ\377QQQ\377SSS\377" - "WWW\377^^^\377hhh\377ttt\377\202\202\202\377\215\215\215\377\226\226\226" - "\377\234\234\234\377\237\237\237\377\240\240\240\377\240\240\240\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\223\223\223\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377\256\256\256\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\374C\35\377\377g\0\377" - "\377o\0\377\377o\0\377\377V\0\377\363pT\377\330\330\330\377\316\316\316\377" - "\275\275\275\377\252\252\252\377\230\230\230\377\213\213\213\377\211\211" - "\211\377\220\220\220\377\236\236\236\377\303\303\303\377\330\330\330I\345" - "\345\345(\361\361\361\23\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\357\337" - "\20\3773\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377\213\0\377\377" - "\202\0\377\377y\0\377\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377k\0" - "\377\365/\6\377ZZZ\377UUU\377RRR\377QQQ\377QQQ\377RRR\377UUU\377ZZZ\377b" - "bb\377nnn\377{{{\377\210\210\210\377\222\222\222\377\231\231\231\377\236" - "\236\236\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377\311\311\311\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\354\252\234\377\377A\0\377\377o\0\377\377o\0" - "\377\377o\0\377\3779\0\377\344\274\264\377\325\325\325\377\310\310\310\377" - "\266\266\266\377\243\243\243\377\223\223\223\377\212\212\212\377\213\213" - "\213\377\225\225\225\377\245\245\245\377\314\314\314\377\340\340\340:\356" - "\356\356\36\353\353\353\15\314\314\314\5\177\177\177\2\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\223}\200" - "\377a\0\377\377\224\0\377\377\224\0\377\377\220\0\377\377\210\0\377\377~" - "\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377V\0\377" - "\302>#\377VVV\377SSS\377QQQ\377QQQ\377QQQ\377SSS\377VVV\377]]]\377hhh\377" - "uuu\377\202\202\202\377\216\216\216\377\227\227\227\377\234\234\234\377\237" - "\237\237\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377" - "kkk\377\326\326\326\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\365qV\377\377V\0\377\377o\0\377\377o\0\377\377" - "g\0\377\373C\34\377\333\333\333\377\321\321\321\377\302\302\302\377\257\257" - "\257\377\234\234\234\377\217\217\217\377\212\212\212\377\216\216\216\377" - "\234\234\234\377\255\255\255\377\324\324\324\377\343\343\343.\363\363\363" - "\26\342\342\342\11\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377E\36\337\377\210\0\377" - "\377\224\0\377\377\223\0\377\377\216\0\377\377\205\0\377\377z\0\377\377s" - "\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\3779\0\377xQH\377UUU\377" - "RRR\377QQQ\377QQQ\377RRR\377UUU\377ZZZ\377bbb\377mmm\377{{{\377\210\210\210" - "\377\222\222\222\377\232\232\232\377\236\236\236\377\240\240\240\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377kkk\377PPP\377PPP\377PPP\377PPP\377\223\223\223\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\3758\16\377\377k\0\377\377o\0\377\377o\0\377\377I\0\377\355" - "\220}\377\330\330\330\377\314\314\314\377\274\274\274\377\250\250\250\377" - "\227\227\227\377\214\214\214\377\213\213\213\377\223\223\223\377\242\242" - "\242\377\265\265\265\377\333\333\333\377\351\351\351#\357\357\357\20\324" - "\324\324\6\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\324\3110\377@\0\377\377\224\0\377\377" - "\224\0\377\377\222\0\377\377\214\0\377\377\201\0\377\377x\0\377\377r\0\377" - "\377p\0\377\377o\0\377\377o\0\377\377g\0\377\3532\14\377VVV\377SSS\377QQ" - "Q\377QQQ\377QQQ\377SSS\377VVV\377]]]\377fff\377ttt\377\201\201\201\377\215" - "\215\215\377\226\226\226\377\234\234\234\377\245\230\225\377\276|n\377\320" - "fP\377\342Q3\377\347I(\377\347I(\377\347I(\377\342Q3\377\320fP\377\276|n" - "\377\247\232\227\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\223\223\223\377]]]\377PPP\377PPP\377PPP\377PPP\377\256" - "\256\256\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\356\237\216\377\377E\0\377\377o\0\377\377o\0\377\377" - "o\0\377\3770\0\377\337\322\317\377\325\325\325\377\306\306\306\377\265\265" - "\265\377\242\242\242\377\223\223\223\377\213\213\213\377\214\214\214\377" - "\230\230\230\377\252\252\252\377\275\275\275\377\341\341\341\377\353\353" - "\353\32\347\347\347\13\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377y^\237\377m\0\377" - "\377\224\0\377\377\224\0\377\377\220\0\377\377\210\0\377\377}\0\377\377u" - "\0\377\377q\0\377\377o\0\377\377o\0\377\377o\0\377\377R\0\377\266@'\377T" - "TT\377QQQ\377QQQ\377QQQ\377QQQ\377TTT\377XXX\377aaa\377lll\377zzz\377\207" - "\207\207\377\231\214\211\377\277p_\377\355A\36\377\3770\0\377\377A\0\377" - "\377N\0\377\377[\0\377\377_\0\377\377^\0\377\377^\0\377\377Z\0\377\377N\0" - "\377\377A\0\377\3770\0\377\355B\36\377\304ud\377\247\232\227\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\206\206\206\377PPP\377PPP\377PPP\377PPP\377PPP\377\311\311" - "\311\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\367fH\377\377Z\0\377\377o\0\377\377o\0\377\377Z\0\377\365" - "dF\377\332\332\332\377\320\320\320\377\301\301\301\377\256\256\256\377\234" - "\234\234\377\217\217\217\377\213\213\213\377\221\221\221\377\236\236\236" - "\377\261\261\261\377\304\304\304\377\347\347\347\377\361\361\361\23\337\337" - "\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\3778\16\357\377\215\0\377\377\224\0" - "\377\377\222\0\377\377\215\0\377\377\204\0\377\377z\0\377\377s\0\377\377" - "p\0\377\377o\0\377\377o\0\377\377o\0\377\3779\0\377vNF\377SSS\377QQQ\377" - "QQQ\377QQQ\377RRR\377UUU\377\\\\\\\377eee\377rrr\377\200\200\200\377\306" - "\\F\377\3707\10\377\377E\0\377\377b\0\377\377p\0\377\377p\0\377\377q\0\377" - "\377q\0\377\377q\0\377\377q\0\377\377p\0\377\377p\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377b\0\377\377E\0\377\3717\11\377\320fP\377\240\240\240\377" - "\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377\206\206" - "\206\377PPP\377PPP\377PPP\377PPP\377kkk\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\346\330\326\377\3770\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377A\0\377\351\247\231\377\327\327\327" - "\377\313\313\313\377\272\272\272\377\247\247\247\377\226\226\226\377\214" - "\214\214\377\213\213\213\377\225\225\225\377\245\245\245\377\271\271\271" - "\377\312\312\312\377\354\354\354\377\353\353\353\15\314\314\314\5\177\177" - "\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\377\324\3110\377?\0\377\377\224\0\377\377\224\0\377\377\221" - "\0\377\377\212\0\377\377\200\0\377\377w\0\377\377r\0\377\377p\0\377\377o" - "\0\377\377o\0\377\377k\0\377\365/\6\377TTT\377RRR\377QQQ\377QQQ\377QQQ\377" - "SSS\377WWW\377___\377jjj\377\231dY\377\3607\21\377\377N\0\377\377k\0\377" - "\377p\0\377\377p\0\377\377q\0\377\377s\0\377\377t\0\377\377u\0\377\377u\0" - "\377\377t\0\377\377r\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377k\0\377\377N\0\377\363;\24\377\262\212\202\377\240" - "\240\240\377\240\240\240\377\240\240\240\377kkk\377PPP\377PPP\377PPP\377" - "PPP\377\206\206\206\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\360\223\200\377\377I\0\377\377o\0\377\377o\0" - "\377\377g\0\377\373C\34\377\335\335\335\377\324\324\324\377\306\306\306\377" - "\264\264\264\377\241\241\241\377\222\222\222\377\213\213\213\377\217\217" - "\217\377\234\234\234\377\255\255\255\377\300\300\300\377\317\317\317\377" - "\360\360\360\377\342\342\342\11\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\207n\217" - "\377f\0\377\377\224\0\377\377\223\0\377\377\217\0\377\377\207\0\377\377|" - "\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377V\0\377" - "\277<\40\377SSS\377QQQ\377QQQ\377QQQ\377RRR\377UUU\377ZZZ\377bbb\377\267" - "M7\377\377=\0\377\377g\0\377\377o\0\377\377o\0\377\377p\0\377\377q\0\377" - "\377s\0\377\377v\0\377\377z\0\377\377|\0\377\377}\0\377\377z\0\377\377w\0" - "\377\377t\0\377\377r\0\377\377p\0\377\377p\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377g\0\377\3779\0\377\303sc\377\236\236\236\377\237\237" - "\237\377\\\\\\\377PPP\377PPP\377PPP\377PPP\377\241\241\241\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\372" - "O+\377\377b\0\377\377o\0\377\377o\0\377\377R\0\377\361{b\377\332\332\332" - "\377\317\317\317\377\277\277\277\377\255\255\255\377\233\233\233\377\216" - "\216\216\377\213\213\213\377\223\223\223\377\242\242\242\377\265\265\265" - "\377\306\306\306\377\324\324\324\377\363\363\363\377\324\324\324\6\177\177" - "\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377S.\317\377\200\0\377\377\224\0\377\377\223\0\377" - "\377\215\0\377\377\204\0\377\377z\0\377\377s\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377E\0\377\225F5\377RRR\377QQQ\377QQQ\377QQQ\377S" - "SS\377VVV\377]]]\377\306B'\377\377N\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377p\0\377\377g\0\377\377`\0\377\377c\0\377\377x\0\377\377\203\0\377\377" - "\207\0\377\377\207\0\377\377\204\0\377\377\177\0\377\377z\0\377\377u\0\377" - "\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377E\0\377\323]D\377\217\217\217\377NNN\377OOO\377OOO\377" - "PPP\377PPP\377\273\273\273\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\347\315\307\377\3774\0\377\377o\0\377\377o\0\377\377" - "o\0\377\3774\0\377\342\310\302\377\327\327\327\377\312\312\312\377\271\271" - "\271\377\246\246\246\377\225\225\225\377\214\214\214\377\215\215\215\377" - "\230\230\230\377\251\251\251\377\274\274\274\377\315\315\315\377\327\327" - "\327\377\365\365\365\377\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\337\327\40\377" - "9\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\213\0\377\377\201\0" - "\377\377x\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "4\0\377iNI\377QQQ\377QQQ\377QQQ\377QQQ\377SSS\377XXX\377\260F0\377\377N\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377V\0\377\3775\0\377\363;\24\377\347" - "I(\377\347I(\377\3713\12\377\377>\0\377\377j\0\377\377\217\0\377\377\215" - "\0\377\377\210\0\377\377\201\0\377\377{\0\377\377v\0\377\377r\0\377\377p" - "\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377N\0\377\305[E\377MMM\377MMM\377NNN\377OOO\377\\\\\\\377\310\310\310\377" - "\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\362\210" - "r\377\377N\0\377\377o\0\377\377o\0\377\377b\0\377\371N*\377\334\334\334\377" - "\323\323\323\377\305\305\305\377\262\262\262\377\237\237\237\377\222\222" - "\222\377\213\213\213\377\221\221\221\377\236\236\236\377\260\260\260\377" - "\303\303\303\377\321\321\321\377\333\333\333\377\367\367\367\377\252\252" - "\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377\257\234`\377S\0\377\377\224\0\377\377\223\0\377" - "\377\220\0\377\377\210\0\377\377~\0\377\377v\0\377\377r\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377g\0\377\3521\13\377RRR\377QQQ\377QQQ\377QQQ\377" - "RRR\377UUU\377dWT\377\3664\6\377\377k\0\377\377o\0\377\377k\0\377\377=\0" - "\377\331V:\377\252\220\212\377\237\237\237\377\237\237\237\377\236\236\236" - "\377\234\234\234\377\254\204|\377\327T8\377\377?\0\377\377\177\0\377\377" - "\217\0\377\377\211\0\377\377\202\0\377\377{\0\377\377v\0\377\377r\0\377\377" - "p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377E\0\377\216>.\377KKK\377LLL\377MMM\377iii\377\323\323\323\377\342\342" - "\342\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\374C\35\377\377" - "g\0\377\377o\0\377\377o\0\377\377E\0\377\354\234\214\377\331\331\331\377" - "\317\317\317\377\276\276\276\377\254\254\254\377\232\232\232\377\216\216" - "\216\377\214\214\214\377\225\225\225\377\245\245\245\377\267\267\267\377" - "\311\311\311\377\326\326\326\377\336\336\336\377\370\370\370\377\177\177" - "\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377\207n\217\377f\0\377\377\224\0\377\377\223\0\377" - "\377\217\0\377\377\206\0\377\377|\0\377\377u\0\377\377q\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377Z\0\377\3119\32\377QQQ\377QQQ\377QQQ\377QQQ\377" - "SSS\377VVV\377\206QF\377\377=\0\377\377o\0\377\377^\0\377\3706\10\377\262" - "}r\377\235\235\235\377\236\236\236\377\236\236\236\377\235\235\235\377\232" - "\232\232\377\227\227\227\377\222\222\222\377\215\215\215\377\236wn\377\351" - "B\27\377\377l\0\377\377\217\0\377\377\212\0\377\377\203\0\377\377|\0\377" - "\377v\0\377\377s\0\377\377q\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377k\0\377\3659\3\377iA9\377III\377KKK\377\201\201\201\377" - "\337\337\337\377\341\341\341\377\342\342\342\377\343\343\343\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\351\301" - "\271\377\3779\0\377\377o\0\377\377o\0\377\377o\0\377\3770\0\377\340\323\320" - "\377\326\326\326\377\311\311\311\377\267\267\267\377\245\245\245\377\224" - "\224\224\377\214\214\214\377\217\217\217\377\233\233\233\377\254\254\254" - "\377\276\276\276\377\317\317\317\377\331\331\331\377\340\340\340\377\371" - "\371\371\377\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377S.\317\377\200\0\377\377\224\0\377" - "\377\223\0\377\377\216\0\377\377\204\0\377\377z\0\377\377t\0\377\377p\0\377" - "\377p\0\377\377o\0\377\377o\0\377\377N\0\377\251?)\377QQQ\377QQQ\377QQQ\377" - "QQQ\377SSS\377XXX\377j]Z\377\3674\7\377\377E\0\377\341C\"\377\231\214\211" - "\377\232\232\232\377\235\235\235\377\236\236\236\377\234\234\234\377\231" - "\231\231\377\224\224\224\377\217\217\217\377\210\210\210\377\201\201\201" - "\377{{{\377~pn\377\311F*\377\377l\0\377\377\220\0\377\377\212\0\377\377\204" - "\0\377\377|\0\377\377w\0\377\377s\0\377\377q\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377b\0\377\3330\14\377DDD\377GGG\377{{" - "{\377\330\330\330\377\336\336\336\377\340\340\340\377\342\342\342\377\343" - "\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\363" - "}d\377\377R\0\377\377o\0\377\377o\0\377\377V\0\377\363pT\377\333\333\333" - "\377\322\322\322\377\303\303\303\377\260\260\260\377\236\236\236\377\221" - "\221\221\377\214\214\214\377\223\223\223\377\241\241\241\377\263\263\263" - "\377\305\305\305\377\323\323\323\377\334\334\334\377\340\340\340\377\372" - "\372\372\377\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377" - "\377\222\0\377\377\215\0\377\377\202\0\377\377y\0\377\377s\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377=\0\377}H=\377QQQ\377PPP\377QQQ\377" - "RRR\377UUU\377ZZZ\377ccc\377\213c[\377\257_O\377\214\214\214\377\225\225" - "\225\377\233\233\233\377\235\235\235\377\233\233\233\377\230\230\230\377" - "\222\222\222\377\214\214\214\377\204\204\204\377|||\377uuu\377ooo\377iii" - "\377fff\377\330:\31\377\377y\0\377\377\220\0\377\377\213\0\377\377\204\0" - "\377\377}\0\377\377v\0\377\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377N\0\377\2364\36\377BBB\377\214\214\214\377" - "\317\317\317\377\327\327\327\377\335\335\335\377\340\340\340\377\342\342" - "\342\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\3758\16" - "\377\377k\0\377\377o\0\377\377o\0\377\377A\0\377\351\247\231\377\330\330" - "\330\377\315\315\315\377\275\275\275\377\252\252\252\377\231\231\231\377" - "\216\216\216\377\216\216\216\377\227\227\227\377\247\247\247\377\272\272" - "\272\377\313\313\313\377\327\327\327\377\337\337\337\377\341\341\341\377" - "\372\372\372\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\324\3110\377?\0\377\377\224\0\377\377" - "\224\0\377\377\222\0\377\377\213\0\377\377\201\0\377\377x\0\377\377r\0\377" - "\377p\0\377\377o\0\377\377o\0\377\377o\0\377\3774\0\377gLG\377QQQ\377PPP" - "\377QQQ\377RRR\377VVV\377\\\\\\\377fff\377ttt\377\202\202\202\377\217\217" - "\217\377\227\227\227\377\233\233\233\377\233\233\233\377\230\230\230\377" - "\222\222\222\377\212\212\212\377\201\201\201\377yyy\377rrr\377kkk\377ggg" - "\377ccc\377aaa\377h[X\377\3548\13\377\377\206\0\377\377\221\0\377\377\213" - "\0\377\377\204\0\377\377|\0\377\377u\0\377\377r\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\3774\0\377T:4\377\213\213\213" - "\377\303\303\303\377\317\317\317\377\327\327\327\377\335\335\335\377\340" - "\340\340\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\354\252\234\377\377" - "A\0\377\377o\0\377\377o\0\377\377g\0\377\373C\34\377\335\335\335\377\325" - "\325\325\377\307\307\307\377\266\266\266\377\244\244\244\377\224\224\224" - "\377\215\215\215\377\220\220\220\377\234\234\234\377\256\256\256\377\301" - "\301\301\377\320\320\320\377\332\332\332\377\340\340\340\377\342\342\342" - "\377\372\372\372\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\257\234`\377S\0\377\377\224\0\377" - "\377\224\0\377\377\221\0\377\377\212\0\377\377\177\0\377\377w\0\377\377r" - "\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377,\0\377QQQ\377QQQ\377" - "QQQ\377QQQ\377SSS\377WWW\377___\377jjj\377xxx\377\206\206\206\377\222\222" - "\222\377\230\230\230\377\233\233\233\377\231\231\231\377\223\223\223\377" - "\213\213\213\377\201\201\201\377xxx\377ppp\377kkk\377ggg\377ddd\377ccc\377" - "bbb\377aaa\377\207RG\377\377F\0\377\377\223\0\377\377\220\0\377\377\212\0" - "\377\377\202\0\377\377{\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377V\0\377\2630\24\377\211\211\211\377" - "\252\252\252\377\266\266\266\377\301\301\301\377\311\311\311\377\317\317" - "\317\377\323\323\323\377\324\324\324\377\325\325\325\377\326\326\326\377" - "\326\326\326\377\326\326\326\377\326\326\326\377\326\326\326\377\326\326" - "\326\377\326\326\326\377\326\326\326\377\326\326\326\377\326\326\326\377" - "\326\326\326\377\326\326\326\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\365qV\377\377V\0\377\377" - "o\0\377\377o\0\377\377R\0\377\361{b\377\333\333\333\377\321\321\321\377\302" - "\302\302\377\257\257\257\377\235\235\235\377\221\221\221\377\215\215\215" - "\377\224\224\224\377\244\244\244\377\266\266\266\377\307\307\307\377\325" - "\325\325\377\335\335\335\377\341\341\341\377\343\343\343\377\373\373\373" - "\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\377\223}\200\377`\0\377\377\224\0\377\377\223\0\377" - "\377\220\0\377\377\210\0\377\377~\0\377\377u\0\377\377q\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377^\0\377\3246\25\377QQQ\377PPP\377QQQ\377QQQ\377" - "TTT\377XXX\377aaa\377mmm\377|||\377\212\212\212\377\224\224\224\377\231\231" - "\231\377\232\232\232\377\226\226\226\377\217\217\217\377\205\205\205\377" - "zzz\377qqq\377kkk\377iii\377iii\377iii\377kkk\377kkk\377kkk\377iii\377\305" - "B&\377\377m\0\377\377\223\0\377\377\220\0\377\377\211\0\377\377\201\0\377" - "\377y\0\377\377t\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\3774\0\377V<6\377CCC\377III\377PPP\377TTT\377XXX\377ZZZ\377" - "\\\\\\\377]]]\377]]]\377]]]\377]]]\377]]]\377]]]\377]]]\377]]]\377]]]\377" - "]]]\377]]]\377]]]\377\274\274\274\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\346\330\326\377\3770\0\377\377o\0\377" - "\377o\0\377\377o\0\377\3774\0\377\343\311\303\377\327\327\327\377\314\314" - "\314\377\274\274\274\377\251\251\251\377\230\230\230\377\216\216\216\377" - "\217\217\217\377\231\231\231\377\252\252\252\377\275\275\275\377\315\315" - "\315\377\330\330\330\377\337\337\337\377\342\342\342\377\343\343\343\377" - "\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377mN\257\377s\0\377\377\224\0\377\377\223" - "\0\377\377\217\0\377\377\206\0\377\377|\0\377\377u\0\377\377q\0\377\377p" - "\0\377\377o\0\377\377o\0\377\377^\0\377\3235\24\377QQQ\377PPP\377QQQ\377" - "RRR\377UUU\377ZZZ\377ddd\377qqq\377\200\200\200\377\214\214\214\377\226\226" - "\226\377\232\232\232\377\231\231\231\377\224\224\224\377\213\213\213\377" - "\200\200\200\377vvv\377ooo\377mmm\377nnn\377ppp\377ttt\377www\377yyy\377" - "xxx\377vvv\377\204id\377\3779\0\377\377\224\0\377\377\223\0\377\377\217\0" - "\377\377\210\0\377\377\177\0\377\377x\0\377\377s\0\377\377p\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377R\0\377\245.\26\377555\377:::\377" - "@@@\377EEE\377III\377MMM\377NNN\377OOO\377PPP\377PPP\377PPP\377PPP\377PP" - "P\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\311\311\311\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\356\237\216" - "\377\377E\0\377\377o\0\377\377o\0\377\377b\0\377\371N*\377\335\335\335\377" - "\324\324\324\377\306\306\306\377\265\265\265\377\242\242\242\377\224\224" - "\224\377\215\215\215\377\222\222\222\377\237\237\237\377\261\261\261\377" - "\304\304\304\377\322\322\322\377\333\333\333\377\340\340\340\377\342\342" - "\342\377\343\343\343\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0" - "\377\377\224\0\377\377\223\0\377\377\216\0\377\377\204\0\377\377z\0\377\377" - "t\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377N\0\377\250>(\377" - "QQQ\377PPP\377QQQ\377RRR\377UUU\377\\\\\\\377fff\377ttt\377\203\203\203\377" - "\217\217\217\377\230\230\230\377\233\233\233\377\231\231\231\377\223\223" - "\223\377\212\212\212\377\200\200\200\377www\377sss\377ttt\377www\377|||\377" - "\201\201\201\377\205\205\205\377\206\206\206\377\206\206\206\377\204\204" - "\204\377\200\200\200\377\315I.\377\377m\0\377\377\224\0\377\377\222\0\377" - "\377\216\0\377\377\206\0\377\377}\0\377\377v\0\377\377r\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377k\0\377\362,\3\377111\377555\377;;;" - "\377AAA\377FFF\377JJJ\377MMM\377OOO\377OOO\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377kkk\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\367fH\377\377Z\0" - "\377\377o\0\377\377o\0\377\377E\0\377\354\234\214\377\332\332\332\377\320" - "\320\320\377\300\300\300\377\256\256\256\377\234\234\234\377\220\220\220" - "\377\216\216\216\377\226\226\226\377\245\245\245\377\270\270\270\377\311" - "\311\311\377\327\327\327\377\336\336\336\377\341\341\341\377\343\343\343" - "\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\3778\16\357\377\215" - "\0\377\377\224\0\377\377\222\0\377\377\215\0\377\377\203\0\377\377z\0\377" - "\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377N\0\377\250>(" - "\377PPP\377PPP\377QQQ\377SSS\377VVV\377]]]\377iii\377www\377\205\205\205" - "\377\221\221\221\377\231\231\231\377\233\233\233\377\231\231\231\377\224" - "\224\224\377\214\214\214\377\204\204\204\377~~~\377|||\377~~~\377\203\203" - "\203\377\210\210\210\377\215\215\215\377\220\220\220\377\222\222\222\377" - "\222\222\222\377\220\220\220\377\215\215\215\377\226|v\377\3779\0\377\377" - "\224\0\377\377\224\0\377\377\222\0\377\377\214\0\377\377\203\0\377\377z\0" - "\377\377t\0\377\377p\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "A\0\377o-\37\377111\377777\377===\377CCC\377HHH\377KKK\377NNN\377OOO\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\223\223\223" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\347\315\307\377\3774\0\377\377o\0\377\377o\0\377\377o\0\377\3770\0\377" - "\341\324\321\377\327\327\327\377\313\313\313\377\272\272\272\377\247\247" - "\247\377\227\227\227\377\216\216\216\377\220\220\220\377\234\234\234\377" - "\255\255\255\377\277\277\277\377\317\317\317\377\331\331\331\377\340\340" - "\340\377\342\342\342\377\343\343\343\377\344\344\344\377\373\373\373\377" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377" - "\214\0\377\377\202\0\377\377y\0\377\377s\0\377\377p\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377N\0\377\250>(\377PPP\377QQQ\377QQQ\377SSS\377XXX\377" - "___\377kkk\377zzz\377\210\210\210\377\223\223\223\377\232\232\232\377\235" - "\235\235\377\233\233\233\377\227\227\227\377\221\221\221\377\213\213\213" - "\377\206\206\206\377\206\206\206\377\211\211\211\377\215\215\215\377\222" - "\222\222\377\226\226\226\377\230\230\230\377\231\231\231\377\231\231\231" - "\377\231\231\231\377\226\226\226\377\222\222\222\377\342D#\377\377z\0\377" - "\377\224\0\377\377\223\0\377\377\220\0\377\377\210\0\377\377~\0\377\377v" - "\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377V\0\377" - "\257,\20\377...\377333\377888\377>>>\377DDD\377III\377MMM\377NNN\377OOO\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377\274\274\274\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\360\223\200\377\377I\0\377\377o\0\377\377o\0\377\377V\0\377\364pU\377\334" - "\334\334\377\323\323\323\377\306\306\306\377\263\263\263\377\241\241\241" - "\377\223\223\223\377\216\216\216\377\224\224\224\377\241\241\241\377\264" - "\264\264\377\306\306\306\377\324\324\324\377\334\334\334\377\340\340\340" - "\377\343\343\343\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377\213" - "\0\377\377\201\0\377\377x\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377=\0\377}H=\377PPP\377QQQ\377QQQ\377TTT\377XXX\377aaa\377n" - "nn\377|||\377\212\212\212\377\225\225\225\377\233\233\233\377\235\235\235" - "\377\235\235\235\377\232\232\232\377\226\226\226\377\222\222\222\377\220" - "\220\220\377\221\221\221\377\222\222\222\377\226\226\226\377\231\231\231" - "\377\234\234\234\377\235\235\235\377\236\236\236\377\236\236\236\377\235" - "\235\235\377\233\233\233\377\231\231\231\377\274m\\\377\377S\0\377\377\224" - "\0\377\377\224\0\377\377\222\0\377\377\214\0\377\377\203\0\377\377y\0\377" - "\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377k\0\377\364.\5" - "\377QQQ\377WWW\377```\377kkk\377www\377\202\202\202\377\212\212\212\377\216" - "\216\216\377\221\221\221\377\222\222\222\377\223\223\223\377\206\206\206" - "\377PPP\377PPP\377PPP\377PPP\377]]]\377\311\311\311\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\372O+\377\377b\0\377" - "\377o\0\377\377o\0\377\377A\0\377\352\250\232\377\331\331\331\377\317\317" - "\317\377\277\277\277\377\255\255\255\377\234\234\234\377\220\220\220\377" - "\217\217\217\377\230\230\230\377\250\250\250\377\273\273\273\377\313\313" - "\313\377\327\327\327\377\337\337\337\377\342\342\342\377\343\343\343\377" - "\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377" - "\377\224\0\377\377\224\0\377\377\222\0\377\377\213\0\377\377\200\0\377\377" - "w\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377" - "}H=\377PPP\377QQQ\377QQQ\377TTT\377ZZZ\377ccc\377ppp\377\177\177\177\377" - "\215\215\215\377\226\226\226\377\234\234\234\377\236\236\236\377\236\236" - "\236\377\235\235\235\377\233\233\233\377\231\231\231\377\230\230\230\377" - "\230\230\230\377\231\231\231\377\234\234\234\377\235\235\235\377\236\236" - "\236\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240\240\377" - "\236\236\236\377\235\235\235\377\237\222\217\377\3772\0\377\377\224\0\377" - "\377\224\0\377\377\223\0\377\377\217\0\377\377\206\0\377\377|\0\377\377u" - "\0\377\377q\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\3779\0\377" - "uME\377[[[\377ccc\377nnn\377|||\377\210\210\210\377\222\222\222\377\232\232" - "\232\377\236\236\236\377\240\240\240\377\240\240\240\377\206\206\206\377" - "PPP\377PPP\377PPP\377PPP\377kkk\377\326\326\326\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\347\315\307\377\3774\0\377\377o\0\377\377" - "o\0\377\377g\0\377\373C\34\377\336\336\336\377\327\327\327\377\312\312\312" - "\377\270\270\270\377\245\245\245\377\226\226\226\377\216\216\216\377\221" - "\221\221\377\235\235\235\377\257\257\257\377\301\301\301\377\320\320\320" - "\377\332\332\332\377\340\340\340\377\342\342\342\377\343\343\343\377\344" - "\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377" - "\224\0\377\377\224\0\377\377\221\0\377\377\212\0\377\377\200\0\377\377w\0" - "\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G" - "<\377PPP\377QQQ\377RRR\377UUU\377[[[\377eee\377rrr\377\201\201\201\377\217" - "\217\217\377\230\230\230\377\235\235\235\377\237\237\237\377\240\240\240" - "\377\237\237\237\377\236\236\236\377\235\235\235\377\235\235\235\377\235" - "\235\235\377\236\236\236\377\236\236\236\377\240\240\240\377\240\240\240" - "\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240\240\377\240" - "\240\240\377\237\237\237\377\235\235\235\377\345G&\377\377y\0\377\377\224" - "\0\377\377\224\0\377\377\221\0\377\377\211\0\377\377\177\0\377\377w\0\377" - "\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377I\0\377\237B/" - "\377WWW\377^^^\377hhh\377uuu\377\202\202\202\377\216\216\216\377\227\227" - "\227\377\235\235\235\377\237\237\237\377\240\240\240\377kkk\377PPP\377PP" - "P\377PPP\377PPP\377\206\206\206\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\363}d\377\377R\0\377\377o\0\377\377o\0\377" - "\377R\0\377\361{b\377\334\334\334\377\322\322\322\377\304\304\304\377\262" - "\262\262\377\240\240\240\377\223\223\223\377\216\216\216\377\225\225\225" - "\377\244\244\244\377\266\266\266\377\307\307\307\377\325\325\325\377\335" - "\335\335\377\341\341\341\377\343\343\343\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0" - "\377\377\224\0\377\377\221\0\377\377\212\0\377\377\177\0\377\377w\0\377\377" - "r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377PPP" - "\377QQQ\377RRR\377UUU\377\\\\\\\377fff\377ttt\377\203\203\203\377\220\220" - "\220\377\231\231\231\377\235\235\235\377\240\240\240\377\240\240\240\377" - "\240\240\240\377\240\240\240\377\237\237\237\377\237\237\237\377\237\237" - "\237\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240\240\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\240\240" - "\240\377\240\240\240\377\237\237\237\377\316dN\377\377_\0\377\377\224\0\377" - "\377\224\0\377\377\222\0\377\377\214\0\377\377\202\0\377\377x\0\377\377s" - "\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377V\0\377\276:\37\377" - "UUU\377ZZZ\377bbb\377nnn\377|||\377\211\211\211\377\224\224\224\377\233\233" - "\233\377\236\236\236\377\240\240\240\377kkk\377PPP\377PPP\377PPP\377PPP\377" - "\241\241\241\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\374C\35\377\377g\0\377\377o\0\377\377o\0\377\3774\0\377" - "\344\311\304\377\331\331\331\377\316\316\316\377\276\276\276\377\253\253" - "\253\377\233\233\233\377\220\220\220\377\220\220\220\377\232\232\232\377" - "\253\253\253\377\275\275\275\377\315\315\315\377\330\330\330\377\337\337" - "\337\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377" - "\377\224\0\377\377\221\0\377\377\212\0\377\377\177\0\377\377v\0\377\377r" - "\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377PPP\377" - "QQQ\377SSS\377VVV\377]]]\377hhh\377vvv\377\205\205\205\377\221\221\221\377" - "\231\231\231\377\236\236\236\377\240\240\240\377\240\240\240\377\240\240" - "\240\377\240\240\240\377\240\240\240\377\240\240\240\377\240\240\240\377" - "\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\240\240\240\377\240\240\240\377\266\201v\377\377E\0\377\377\224\0\377\377" - "\224\0\377\377\223\0\377\377\216\0\377\377\205\0\377\377{\0\377\377t\0\377" - "\377q\0\377\377o\0\377\377o\0\377\377o\0\377\377^\0\377\3235\24\377SSS\377" - "WWW\377^^^\377iii\377vvv\377\204\204\204\377\220\220\220\377\230\230\230" - "\377\235\235\235\377\222\222\222\377]]]\377PPP\377PPP\377PPP\377PPP\377\274" - "\274\274\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\351" - "\301\271\377\3779\0\377\377o\0\377\377o\0\377\377b\0\377\371N*\377\336\336" - "\336\377\326\326\326\377\310\310\310\377\267\267\267\377\245\245\245\377" - "\225\225\225\377\217\217\217\377\223\223\223\377\237\237\237\377\261\261" - "\261\377\304\304\304\377\322\322\322\377\333\333\333\377\340\340\340\377" - "\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224" - "\0\377\377\221\0\377\377\211\0\377\377\177\0\377\377v\0\377\377r\0\377\377" - "p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377PPP\377QQQ\377" - "SSS\377VVV\377^^^\377iii\377www\377\206\206\206\377\222\222\222\377\232\232" - "\232\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\240\240\240\377\240\240\240\377\377,\0\377\377\223\0\377\377\224" - "\0\377\377\223\0\377\377\220\0\377\377\207\0\377\377}\0\377\377u\0\377\377" - "q\0\377\377p\0\377\377o\0\377\377o\0\377\377k\0\377\364.\5\377RRR\377UUU" - "\377[[[\377ddd\377ppp\377\177\177\177\377\214\214\214\377\226\226\226\377" - "\234\234\234\377\221\221\221\377PPP\377PPP\377PPP\377PPP\377PPP\377\311\311" - "\311\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\363}d\377" - "\377R\0\377\377o\0\377\377o\0\377\377E\0\377\354\234\214\377\333\333\333" - "\377\321\321\321\377\303\303\303\377\260\260\260\377\237\237\237\377\223" - "\223\223\377\217\217\217\377\226\226\226\377\246\246\246\377\270\270\270" - "\377\311\311\311\377\327\327\327\377\336\336\336\377\341\341\341\377\343" - "\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377" - "\377\221\0\377\377\211\0\377\377\177\0\377\377v\0\377\377q\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377PPP\377QQQ\377SSS\377" - "WWW\377___\377kkk\377yyy\377\207\207\207\377\223\223\223\377\233\233\233" - "\377\236\236\236\377\240\240\240\377\240\240\240\377\206\206\206\377\223" - "\223\223\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\240\240\240\377\240\240\240\377\355A\36\377\377\200\0\377\377\224\0" - "\377\377\224\0\377\377\221\0\377\377\212\0\377\377\200\0\377\377w\0\377\377" - "r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377,\0\377QQQ\377SSS" - "\377XXX\377```\377lll\377zzz\377\210\210\210\377\223\223\223\377\232\232" - "\232\377\204\204\204\377PPP\377PPP\377PPP\377PPP\377]]]\377\326\326\326\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\3758\16\377\377" - "k\0\377\377o\0\377\377o\0\377\3770\0\377\324\307\304\377\231\231\231\377" - "\251\251\251\377\275\275\275\377\252\252\252\377\232\232\232\377\220\220" - "\220\377\221\221\221\377\234\234\234\377\255\255\255\377\277\277\277\377" - "\317\317\317\377\331\331\331\377\340\340\340\377\342\342\342\377\343\343" - "\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377\377" - "\221\0\377\377\211\0\377\377\177\0\377\377v\0\377\377r\0\377\377p\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377QQQ\377QQQ\377SSS\377WWW\377" - "___\377kkk\377zzz\377\210\210\210\377\224\224\224\377\233\233\233\377\236" - "\236\236\377\240\240\240\377\206\206\206\377kkk\377kkk\377kkk\377\206\206" - "\206\377\223\223\223\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\240\240\240\377" - "\341P2\377\377r\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377\214\0" - "\377\377\202\0\377\377x\0\377\377s\0\377\377p\0\377\377o\0\377\377o\0\377" - "\377o\0\377\3770\0\377\\OL\377SSS\377VVV\377]]]\377hhh\377uuu\377\204\204" - "\204\377\220\220\220\377\231\231\231\377\203\203\203\377OOO\377PPP\377PP" - "P\377PPP\377kkk\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\354\252\234\377\377A\0\377\377o\0\377\377o\0\377\377V\0\377\326R7\377ZZ" - "Z\377KKK\377QQQ\377\240\240\240\377\244\244\244\377\225\225\225\377\217\217" - "\217\377\224\224\224\377\242\242\242\377\264\264\264\377\306\306\306\377" - "\324\324\324\377\334\334\334\377\340\340\340\377\343\343\343\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\224\0\377\377" - "\221\0\377\377\211\0\377\377\177\0\377\377w\0\377\377r\0\377\377p\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377E\0\377\222B2\377QQQ\377QQQ\377SSS\377X" - "XX\377```\377mmm\377{{{\377\211\211\211\377\224\224\224\377\233\233\233\377" - "\236\236\236\377\222\222\222\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377" - "\206\206\206\377\223\223\223\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\240\240\240\377\320fP\377\377_\0\377\377" - "\224\0\377\377\224\0\377\377\223\0\377\377\215\0\377\377\204\0\377\377y\0" - "\377\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377}H" - "=\377RRR\377UUU\377ZZZ\377ddd\377rrr\377\200\200\200\377\215\215\215\377" - "\227\227\227\377\202\202\202\377OOO\377PPP\377PPP\377PPP\377\206\206\206" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\365qV\377\377" - "V\0\377\377o\0\377\377o\0\377\377A\0\377\206D6\377MMM\377III\377DDD\377R" - "RR\377\224\224\224\377\222\222\222\377\220\220\220\377\230\230\230\377\250" - "\250\250\377\273\273\273\377\313\313\313\377\327\327\327\377\337\337\337" - "\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\377,\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\212\0\377\377" - "\177\0\377\377v\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377N\0\377\250>(\377QQQ\377QQQ\377SSS\377XXX\377aaa\377mmm\377|||\377" - "\212\212\212\377\225\225\225\377\233\233\233\377\221\221\221\377kkk\377k" - "kk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377\206\206\206" - "\377\223\223\223\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\312mZ\377\377" - "X\0\377\377\224\0\377\377\224\0\377\377\223\0\377\377\216\0\377\377\204\0" - "\377\377z\0\377\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377" - "=\0\377}H=\377QQQ\377TTT\377XXX\377aaa\377nnn\377|||\377\212\212\212\377" - "\225\225\225\377ggg\377OOO\377PPP\377PPP\377PPP\377\206\206\206\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\326\326\326\377\274\274\274\377\3702\11\377\377k\0\377\377" - "o\0\377\377k\0\377\364.\5\377NNN\377LLL\377HHH\377BBB\377;;;\377ccc\377\220" - "\220\220\377\222\222\222\377\235\235\235\377\257\257\257\377\301\301\301" - "\377\320\320\320\377\332\332\332\377\340\340\340\377\342\342\342\377\343" - "\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377\224\0" - "\377\377\224\0\377\377\221\0\377\377\212\0\377\377\200\0\377\377w\0\377\377" - "r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377N\0\377\250>(\377" - "QQQ\377QQQ\377SSS\377XXX\377aaa\377mmm\377|||\377\212\212\212\377\225\225" - "\225\377\234\234\234\377\221\221\221\377kkk\377kkk\377kkk\377kkk\377kkk\377" - "kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377\206\206\206\377" - "\223\223\223\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\270\203x\377\377E\0\377\377\224\0\377\377\224\0\377\377\223\0\377" - "\377\216\0\377\377\205\0\377\377{\0\377\377s\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377=\0\377}H=\377QQQ\377SSS\377WWW\377___\377kkk\377" - "yyy\377\207\207\207\377\223\223\223\377ggg\377OOO\377PPP\377PPP\377PPP\377" - "\223\223\223\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\326\326\326\377\311\311" - "\311\377\256\256\256\377\206\206\206\377]]]\377\222B2\377\377E\0\377\377" - "o\0\377\377o\0\377\377R\0\377\262;#\377MMM\377JJJ\377FFF\377???\377999\377" - "```\377\220\220\220\377\225\225\225\377\244\244\244\377\266\266\266\377\307" - "\307\307\377\325\325\325\377\335\335\335\377\341\341\341\377\343\343\343" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377,\0\377\377" - "\224\0\377\377\224\0\377\377\221\0\377\377\212\0\377\377\200\0\377\377w\0" - "\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377N\0\377\250" - ">(\377QQQ\377QQQ\377SSS\377XXX\377aaa\377mmm\377|||\377\212\212\212\377\225" - "\225\225\377\234\234\234\377\237\237\237\377\240\240\240\377\206\206\206" - "\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377" - "kkk\377kkk\377kkk\377kkk\377\206\206\206\377\206\206\206\377\223\223\223" - "\377\255xm\377\377E\0\377\377\224\0\377\377\224\0\377\377\223\0\377\377\217" - "\0\377\377\206\0\377\377{\0\377\377t\0\377\377q\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377=\0\377|G<\377QQQ\377SSS\377VVV\377]]]\377hhh\377www\377\205" - "\205\205\377\221\221\221\377fff\377NNN\377OOO\377PPP\377PPP\377\223\223\223" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\326\326\326\377\311\311\311\377\274\274\274" - "\377\241\241\241\377\206\206\206\377kkk\377]]]\377PPP\377PPP\377PPP\377\310" - "7\31\377\377Z\0\377\377o\0\377\377o\0\377\3779\0\377oH?\377MMM\377III\377" - "CCC\377fff\377\202\202\202\377\222\222\222\377\221\221\221\377\232\232\232" - "\377\253\253\253\377\275\275\275\377\315\315\315\377\330\330\330\377\337" - "\337\337\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\373" - "\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\3778\16\357\377\215\0\377\377\224\0\377\377" - "\221\0\377\377\212\0\377\377\200\0\377\377w\0\377\377r\0\377\377p\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377^\0\377\3235\24\377QQQ\377QQQ\377SSS\377" - "XXX\377aaa\377mmm\377|||\377\212\212\212\377\225\225\225\377\234\234\234" - "\377\237\237\237\377\240\240\240\377\241\241\241\377\241\241\241\377\206" - "\206\206\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377" - "kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377\207_W\377\377?\0\377\377\223\0" - "\377\377\224\0\377\377\223\0\377\377\217\0\377\377\207\0\377\377|\0\377\377" - "t\0\377\377q\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377QQQ" - "\377RRR\377UUU\377\\\\\\\377fff\377ttt\377\203\203\203\377\220\220\220\377" - "fff\377NNN\377OOO\377PPP\377PPP\377\241\241\241\377\326\326\326\377\311\311" - "\311\377\274\274\274\377\241\241\241\377\223\223\223\377\206\206\206\377" - "kkk\377]]]\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377[NK\377\377" - "0\0\377\377o\0\377\377o\0\377\377b\0\377\3363\17\377NNN\377XXX\377\203\203" - "\203\377\244\244\244\377\250\250\250\377\230\230\230\377\221\221\221\377" - "\224\224\224\377\240\240\240\377\261\261\261\377\304\304\304\377\322\322" - "\322\377\333\333\333\377\340\340\340\377\342\342\342\377\343\343\343\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0" - "\377\377\224\0\377\377\221\0\377\377\213\0\377\377\201\0\377\377w\0\377\377" - "r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377^\0\377\3235\24\377" - "QQQ\377QQQ\377SSS\377XXX\377aaa\377mmm\377|||\377\212\212\212\377\225\225" - "\225\377\234\234\234\377\237\237\237\377\240\240\240\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\223\223\223\377\206\206" - "\206\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377kkk\377k" - "kk\377kkk\377kkk\377kkk\377\377,\0\377\377\223\0\377\377\224\0\377\377\223" - "\0\377\377\220\0\377\377\207\0\377\377}\0\377\377u\0\377\377q\0\377\377o" - "\0\377\377o\0\377\377o\0\377\377=\0\377r=2\377CCC\377DDD\377FFF\377KKK\377" - "TTT\377___\377lll\377www\377XXX\377NNN\377OOO\377PPP\377PPP\377]]]\377]]" - "]\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377\222B2\377\377E\0\377\377o\0\377\377o\0\377\377" - "I\0\377\272]J\377\250\250\250\377\307\307\307\377\306\306\306\377\264\264" - "\264\377\242\242\242\377\224\224\224\377\221\221\221\377\227\227\227\377" - "\246\246\246\377\270\270\270\377\311\311\311\377\327\327\327\377\336\336" - "\336\377\341\341\341\377\343\343\343\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377mN\257\377s\0\377\377\224\0\377" - "\377\222\0\377\377\213\0\377\377\201\0\377\377x\0\377\377s\0\377\377p\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377,\0\377QQQ\377QQQ\377SSS" - "\377XXX\377```\377mmm\377{{{\377\212\212\212\377\224\224\224\377\233\233" - "\233\377\237\237\237\377\240\240\240\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223" - "\223\377\223\223\223\377\206\206\206\377kkk\377kkk\377kkk\377kkk\377kkk\377" - "kkk\377kkk\377kkk\377kkk\377kkk\377\377,\0\377\377\223\0\377\377\224\0\377" - "\377\224\0\377\377\221\0\377\377\210\0\377\377~\0\377\377u\0\377\377q\0\377" - "\377p\0\377\377o\0\377\377o\0\377\3779\0\377[3+\377666\377666\377888\377" - "<<<\377BBB\377KKK\377UUU\377^^^\377KKK\377NNN\377OOO\377PPP\377PPP\377PP" - "P\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377" - "PPP\377PPP\377PPP\377PPP\377PPP\377\3235\24\377\377^\0\377\377o\0\377\377" - "o\0\377\3770\0\377\342\325\322\377\332\332\332\377\317\317\317\377\277\277" - "\277\377\255\255\255\377\234\234\234\377\222\222\222\377\222\222\222\377" - "\234\234\234\377\255\255\255\377\277\277\277\377\317\317\317\377\331\331" - "\331\377\340\340\340\377\342\342\342\377\343\343\343\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\223}\200\377" - "`\0\377\377\224\0\377\377\222\0\377\377\214\0\377\377\202\0\377\377x\0\377" - "\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\3770\0" - "\377\\OL\377QQQ\377SSS\377XXX\377```\377lll\377zzz\377\211\211\211\377\224" - "\224\224\377\233\233\233\377\236\236\236\377\240\240\240\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\223\223\223\377\206\206\206\377xxx\377kkk\377kkk\377kkk\377kkk\377k" - "kk\377kkk\377\377,\0\377\377\223\0\377\377\224\0\377\377\224\0\377\377\221" - "\0\377\377\211\0\377\377~\0\377\377v\0\377\377q\0\377\377p\0\377\377o\0\377" - "\377o\0\377\377,\0\377555\377666\377666\377888\377;;;\377AAA\377JJJ\377T" - "TT\377]]]\377KKK\377NNN\377OOO\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP" - "\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377]]]\377" - "kkk\377\241\206\201\377\3774\0\377\377o\0\377\377o\0\377\377Z\0\377\366e" - "G\377\336\336\336\377\327\327\327\377\312\312\312\377\271\271\271\377\247" - "\247\247\377\230\230\230\377\221\221\221\377\225\225\225\377\242\242\242" - "\377\264\264\264\377\306\306\306\377\323\323\323\377\334\334\334\377\340" - "\340\340\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\274\254P\377M\0\377\377" - "\224\0\377\377\222\0\377\377\214\0\377\377\202\0\377\377y\0\377\377s\0\377" - "\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377=\0\377|G<\377" - "QQQ\377SSS\377WWW\377___\377kkk\377zzz\377\210\210\210\377\224\224\224\377" - "\233\233\233\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\223\223\223\377\223\223\223\377" - "\206\206\206\377\206\206\206\377xxx\377xxx\377\377,\0\377\377\223\0\377\377" - "\224\0\377\377\224\0\377\377\221\0\377\377\211\0\377\377\177\0\377\377v\0" - "\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377,\0\377555\377666\377" - "666\377888\377;;;\377AAA\377III\377TTT\377]]]\377JJJ\377MMM\377OOO\377PP" - "P\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377PPP\377" - "kkk\377\206\206\206\377\241\241\241\377\274\274\274\377\311\311\311\377\344" - "\344\344\377\360\223\200\377\377I\0\377\377o\0\377\377o\0\377\377A\0\377" - "\352\250\232\377\334\334\334\377\323\323\323\377\305\305\305\377\263\263" - "\263\377\241\241\241\377\224\224\224\377\222\222\222\377\231\231\231\377" - "\250\250\250\377\272\272\272\377\313\313\313\377\327\327\327\377\337\337" - "\337\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\324\3110\377" - "@\0\377\377\224\0\377\377\222\0\377\377\215\0\377\377\204\0\377\377z\0\377" - "\377s\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377I\0" - "\377\235@-\377QQQ\377SSS\377VVV\377^^^\377jjj\377yyy\377\207\207\207\377" - "\223\223\223\377\233\233\233\377\236\236\236\377\240\240\240\377\240\240" - "\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\223\223" - "\223\377\377,\0\377\377\223\0\377\377\224\0\377\377\224\0\377\377\221\0\377" - "\377\211\0\377\377~\0\377\377v\0\377\377q\0\377\377p\0\377\377o\0\377\377" - "b\0\377\331.\12\377555\377666\377666\377777\377;;;\377AAA\377III\377SSS\377" - "\\\\\\\377JJJ\377MMM\377OOO\377PPP\377PPP\377PPP\377kkk\377kkk\377\206\206" - "\206\377\223\223\223\377\241\241\241\377\256\256\256\377\274\274\274\377" - "\311\311\311\377\326\326\326\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\374C\35\377\377g\0\377\377o\0\377" - "\377k\0\377\3757\16\377\340\340\340\377\331\331\331\377\317\317\317\377\276" - "\276\276\377\255\255\255\377\234\234\234\377\223\223\223\377\224\224\224" - "\377\236\236\236\377\257\257\257\377\301\301\301\377\320\320\320\377\332" - "\332\332\377\340\340\340\377\342\342\342\377\343\343\343\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\377,\0\377\377\224\0\377\377\223\0\377\377\216\0\377\377\206" - "\0\377\377|\0\377\377t\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377R\0\377\262<#\377QQQ\377SSS\377VVV\377]]]\377iii\377www\377" - "\206\206\206\377\222\222\222\377\232\232\232\377\236\236\236\377\240\240" - "\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\377,\0\377\377\223\0\377\377\224\0\377\377\224\0" - "\377\377\221\0\377\377\211\0\377\377~\0\377\377v\0\377\377q\0\377\377p\0" - "\377\377o\0\377\377^\0\377\3202\21\377CCC\377CCC\377DDD\377EEE\377JJJ\377" - "QQQ\377[[[\377hhh\377ttt\377VVV\377MMM\377OOO\377PPP\377PPP\377\223\223\223" - "\377\326\326\326\377\326\326\326\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\351" - "\301\271\377\3779\0\377\377o\0\377\377o\0\377\377R\0\377\362{c\377\336\336" - "\336\377\327\327\327\377\311\311\311\377\270\270\270\377\246\246\246\377" - "\230\230\230\377\222\222\222\377\226\226\226\377\244\244\244\377\266\266" - "\266\377\307\307\307\377\325\325\325\377\335\335\335\377\341\341\341\377" - "\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377`>\277\377z\0" - "\377\377\223\0\377\377\220\0\377\377\210\0\377\377\177\0\377\377v\0\377\377" - "r\0\377\377p\0\377\377o\0\377\377o\0\377\377o\0\377\377b\0\377\3363\17\377" - "QQQ\377SSS\377VVV\377]]]\377hhh\377vvv\377\205\205\205\377\221\221\221\377" - "\231\231\231\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\377,\0\377" - "\377\224\0\377\377\224\0\377\377\224\0\377\377\220\0\377\377\210\0\377\377" - "}\0\377\377u\0\377\377q\0\377\377o\0\377\377o\0\377\377N\0\377\250>(\377" - "PPP\377QQQ\377QQQ\377SSS\377XXX\377aaa\377nnn\377}}}\377\213\213\213\377" - "ccc\377MMM\377OOO\377PPP\377PPP\377\223\223\223\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\363}d\377\377R\0\377\377o\0\377" - "\377o\0\377\3779\0\377\346\276\266\377\334\334\334\377\322\322\322\377\304" - "\304\304\377\262\262\262\377\240\240\240\377\224\224\224\377\223\223\223" - "\377\233\233\233\377\253\253\253\377\275\275\275\377\315\315\315\377\330" - "\330\330\377\337\337\337\377\342\342\342\377\343\343\343\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\373\373\373" - "\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\223}\200\377`\0\377\377\224\0\377\377\222" - "\0\377\377\214\0\377\377\202\0\377\377y\0\377\377s\0\377\377p\0\377\377p" - "\0\377\377o\0\377\377o\0\377\377o\0\377\377,\0\377QQQ\377RRR\377UUU\377\\" - "\\\\\377fff\377uuu\377\203\203\203\377\220\220\220\377\231\231\231\377\236" - "\236\236\377\240\240\240\377\240\240\240\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\377,\0\377\377\223\0\377\377" - "\224\0\377\377\223\0\377\377\220\0\377\377\207\0\377\377|\0\377\377u\0\377" - "\377q\0\377\377o\0\377\377o\0\377\377E\0\377\223C3\377PPP\377QQQ\377QQQ\377" - "SSS\377XXX\377aaa\377nnn\377}}}\377\213\213\213\377ccc\377MMM\377OOO\377" - "PPP\377PPP\377\223\223\223\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\3758\16\377\377k\0\377\377o\0\377\377b\0\377\372N+\377" - "\340\340\340\377\331\331\331\377\316\316\316\377\276\276\276\377\254\254" - "\254\377\234\234\234\377\223\223\223\377\224\224\224\377\240\240\240\377" - "\261\261\261\377\303\303\303\377\321\321\321\377\333\333\333\377\340\340" - "\340\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\377\324\3110\377@\0\377\377\224\0\377\377\223\0\377\377\217\0\377" - "\377\207\0\377\377}\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377=\0\377}H=\377RRR\377UUU\377[[[\377eee\377sss\377\201" - "\201\201\377\217\217\217\377\230\230\230\377\235\235\235\377\240\240\240" - "\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\255\222\215\377\3779\0\377\377\224\0\377\377\224\0\377\377\223\0\377" - "\377\217\0\377\377\206\0\377\377|\0\377\377t\0\377\377p\0\377\377o\0\377" - "\377o\0\377\3779\0\377rJB\377PPP\377QQQ\377QQQ\377TTT\377YYY\377bbb\377o" - "oo\377~~~\377\214\214\214\377ddd\377NNN\377OOO\377PPP\377PPP\377\206\206" - "\206\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\354\252\234\377" - "\377A\0\377\377o\0\377\377o\0\377\377I\0\377\356\222~\377\336\336\336\377" - "\326\326\326\377\310\310\310\377\267\267\267\377\245\245\245\377\227\227" - "\227\377\223\223\223\377\230\230\230\377\246\246\246\377\270\270\270\377" - "\311\311\311\377\326\326\326\377\336\336\336\377\341\341\341\377\343\343" - "\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\3778\16\357\377\215\0\377\377\224\0\377\377\221\0\377\377\213\0\377\377" - "\202\0\377\377x\0\377\377s\0\377\377p\0\377\377p\0\377\377o\0\377\377o\0" - "\377\377R\0\377\263<$\377QQQ\377TTT\377ZZZ\377ccc\377ppp\377\200\200\200" - "\377\215\215\215\377\227\227\227\377\235\235\235\377\237\237\237\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\271" - "\204y\377\377E\0\377\377\224\0\377\377\224\0\377\377\223\0\377\377\216\0" - "\377\377\205\0\377\377z\0\377\377s\0\377\377p\0\377\377o\0\377\377k\0\377" - "\364.\5\377QQQ\377PPP\377QQQ\377QQQ\377TTT\377ZZZ\377bbb\377ppp\377\177\177" - "\177\377\215\215\215\377~~~\377NNN\377OOO\377PPP\377PPP\377kkk\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\367fH\377\377Z\0\377\377o\0\377" - "\377o\0\377\3770\0\377\342\325\322\377\333\333\333\377\321\321\321\377\302" - "\302\302\377\260\260\260\377\237\237\237\377\224\224\224\377\224\224\224" - "\377\234\234\234\377\255\255\255\377\276\276\276\377\317\317\317\377\331" - "\331\331\377\340\340\340\377\342\342\342\377\343\343\343\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377y^\237\377m\0\377" - "\377\224\0\377\377\223\0\377\377\216\0\377\377\206\0\377\377}\0\377\377u" - "\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377\377b\0\377\3363\17\377" - "QQQ\377TTT\377YYY\377bbb\377nnn\377}}}\377\213\213\213\377\226\226\226\377" - "\234\234\234\377\237\237\237\377\240\240\240\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\271\204y\377\377F\0\377\377\224\0\377\377" - "\224\0\377\377\223\0\377\377\215\0\377\377\203\0\377\377y\0\377\377s\0\377" - "\377p\0\377\377o\0\377\377Z\0\377\3108\31\377QQQ\377PPP\377QQQ\377QQQ\377" - "UUU\377ZZZ\377ddd\377rrr\377\200\200\200\377\216\216\216\377~~~\377NNN\377" - "OOO\377PPP\377PPP\377kkk\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\346\330\326" - "\377\3770\0\377\377o\0\377\377o\0\377\377Z\0\377\366eG\377\337\337\337\377" - "\330\330\330\377\315\315\315\377\274\274\274\377\252\252\252\377\233\233" - "\233\377\223\223\223\377\225\225\225\377\242\242\242\377\264\264\264\377" - "\305\305\305\377\323\323\323\377\334\334\334\377\340\340\340\377\343\343" - "\343\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\377\274\254P\377M\0\377\377\224\0\377\377\224\0\377\377" - "\221\0\377\377\213\0\377\377\201\0\377\377y\0\377\377s\0\377\377p\0\377\377" - "p\0\377\377o\0\377\377o\0\377\3774\0\377gLG\377SSS\377XXX\377```\377lll\377" - "zzz\377\211\211\211\377\224\224\224\377\233\233\233\377\236\236\236\377\240" - "\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\312" - "nZ\377\377Y\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\213\0\377" - "\377\200\0\377\377x\0\377\377r\0\377\377p\0\377\377o\0\377\377E\0\377\223" - "C3\377QQQ\377PPP\377QQQ\377RRR\377UUU\377[[[\377eee\377ttt\377\202\202\202" - "\377\217\217\217\377\177\177\177\377NNN\377OOO\377PPP\377PPP\377]]]\377\326" - "\326\326\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\360\223\200\377\377I\0\377\377o\0\377\377o\0" - "\377\377A\0\377\352\250\232\377\335\335\335\377\324\324\324\377\306\306\306" - "\377\266\266\266\377\244\244\244\377\227\227\227\377\223\223\223\377\232" - "\232\232\377\250\250\250\377\272\272\272\377\313\313\313\377\327\327\327" - "\377\337\337\337\377\341\341\341\377\343\343\343\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377" - "8\16\357\377\215\0\377\377\224\0\377\377\223\0\377\377\216\0\377\377\206" - "\0\377\377}\0\377\377u\0\377\377q\0\377\377p\0\377\377o\0\377\377o\0\377" - "\377I\0\377\235A-\377SSS\377VVV\377^^^\377jjj\377xxx\377\206\206\206\377" - "\222\222\222\377\232\232\232\377\236\236\236\377\240\240\240\377\240\240" - "\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\320fP\377\377`\0\377\377" - "\224\0\377\377\223\0\377\377\217\0\377\377\207\0\377\377}\0\377\377v\0\377" - "\377q\0\377\377p\0\377\377o\0\377\3770\0\377\\OL\377QQQ\377PPP\377QQQ\377" - "RRR\377VVV\377\\\\\\\377ggg\377uuu\377\204\204\204\377\221\221\221\377\214" - "\214\214\377NNN\377OOO\377PPP\377PPP\377PPP\377\311\311\311\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\372O+\377\377b\0\377\377o\0\377\377k\0\377\3757\16\377\340\340\340\377" - "\332\332\332\377\320\320\320\377\301\301\301\377\256\256\256\377\236\236" - "\236\377\224\224\224\377\224\224\224\377\236\236\236\377\257\257\257\377" - "\301\301\301\377\320\320\320\377\332\332\332\377\340\340\340\377\342\342" - "\342\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\373\373\373\377" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\223}\200\377`\0\377\377\224" - "\0\377\377\224\0\377\377\221\0\377\377\212\0\377\377\201\0\377\377x\0\377" - "\377s\0\377\377p\0\377\377p\0\377\377o\0\377\377b\0\377\3363\17\377RRR\377" - "VVV\377\\\\\\\377hhh\377uuu\377\203\203\203\377\220\220\220\377\231\231\231" - "\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\342Q3\377\377s\0\377\377\224\0\377\377\221\0\377\377" - "\214\0\377\377\203\0\377\377y\0\377\377t\0\377\377p\0\377\377o\0\377\377" - "Z\0\377\3119\32\377QQQ\377QQQ\377PPP\377QQQ\377SSS\377VVV\377]]]\377iii\377" - "www\377\206\206\206\377\222\222\222\377\232\232\232\377[[[\377OOO\377PPP" - "\377PPP\377PPP\377\274\274\274\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\351\301\271\377\3779\0\377\377o\0\377\377" - "o\0\377\377R\0\377\362{c\377\337\337\337\377\327\327\327\377\313\313\313" - "\377\272\272\272\377\250\250\250\377\232\232\232\377\223\223\223\377\227" - "\227\227\377\245\245\245\377\266\266\266\377\307\307\307\377\325\325\325" - "\377\335\335\335\377\341\341\341\377\343\343\343\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\377\337\327\40\3779\0\377\377\224\0\377\377\224\0\377\377\223" - "\0\377\377\216\0\377\377\206\0\377\377}\0\377\377u\0\377\377q\0\377\377p" - "\0\377\377o\0\377\377o\0\377\3779\0\377sKC\377UUU\377[[[\377ddd\377rrr\377" - "\201\201\201\377\216\216\216\377\227\227\227\377\235\235\235\377\237\237" - "\237\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\355B\36" - "\377\377\200\0\377\377\223\0\377\377\217\0\377\377\207\0\377\377~\0\377\377" - "w\0\377\377r\0\377\377p\0\377\377o\0\377\377A\0\377\212G:\377QQQ\377QQQ\377" - "QQQ\377QQQ\377SSS\377WWW\377___\377kkk\377zzz\377\210\210\210\377\224\224" - "\224\377\233\233\233\377iii\377PPP\377PPP\377PPP\377PPP\377\241\241\241\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\363}d\377\377R\0\377\377o\0\377\377o\0\377\3779\0\377\346\276\266\377\334" - "\334\334\377\323\323\323\377\305\305\305\377\264\264\264\377\242\242\242" - "\377\226\226\226\377\224\224\224\377\234\234\234\377\253\253\253\377\275" - "\275\275\377\315\315\315\377\330\330\330\377\337\337\337\377\342\342\342" - "\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\373" - "\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\373w\\\242\377" - "m\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\213\0\377\377\201\0" - "\377\377y\0\377\377s\0\377\377p\0\377\377p\0\377\377o\0\377\377V\0\377\275" - ":\36\377TTT\377YYY\377bbb\377nnn\377}}}\377\213\213\213\377\225\225\225\377" - "\234\234\234\377\237\237\237\377\240\240\240\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\377,\0\377\377\224\0\377\377\222\0\377\377\214\0\377\377" - "\203\0\377\377z\0\377\377t\0\377\377q\0\377\377o\0\377\377g\0\377\3522\13" - "\377TTT\377QQQ\377QQQ\377QQQ\377QQQ\377TTT\377YYY\377aaa\377nnn\377|||\377" - "\212\212\212\377\225\225\225\377\234\234\234\377jjj\377PPP\377PPP\377PPP" - "\377PPP\377\206\206\206\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\3758\16\377\377k\0\377\377o\0\377\377b\0\377\372" - "N+\377\340\340\340\377\331\331\331\377\317\317\317\377\276\276\276\377\255" - "\255\255\377\234\234\234\377\224\224\224\377\225\225\225\377\240\240\240" - "\377\261\261\261\377\303\303\303\377\321\321\321\377\333\333\333\377\340" - "\340\340\377\342\342\342\377\343\343\343\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\367\333\333$\3779\0\377\377\224\0\377\377\224\0\377\377\223" - "\0\377\377\216\0\377\377\206\0\377\377}\0\377\377u\0\377\377q\0\377\377p" - "\0\377\377o\0\377\377k\0\377\3652\5\377^QN\377XXX\377___\377kkk\377yyy\377" - "\210\210\210\377\223\223\223\377\232\232\232\377\236\236\236\377\240\240" - "\240\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241" - "\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377" - "\241\241\241\377\241\241\241\377\271\204y\377\377F\0\377\377\223\0\377\377" - "\220\0\377\377\210\0\377\377\177\0\377\377w\0\377\377r\0\377\377p\0\377\377" - "o\0\377\377N\0\377\254B,\377SSS\377QQQ\377QQQ\377QQQ\377RRR\377UUU\377ZZ" - "Z\377ddd\377rrr\377\200\200\200\377\215\215\215\377\227\227\227\377\235\235" - "\235\377\204\204\204\377PPP\377PPP\377PPP\377PPP\377kkk\377\326\326\326\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\354\252\234\377\377A\0\377\377o" - "\0\377\377o\0\377\377I\0\377\356\222~\377\336\336\336\377\326\326\326\377" - "\311\311\311\377\270\270\270\377\246\246\246\377\230\230\230\377\224\224" - "\224\377\230\230\230\377\246\246\246\377\270\270\270\377\311\311\311\377" - "\326\326\326\377\336\336\336\377\341\341\341\377\343\343\343\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\373\373\373\377" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\277\277\277\4\373x]\243" - "\377m\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\213\0\377\377\202" - "\0\377\377y\0\377\377t\0\377\377p\0\377\377p\0\377\377o\0\377\377N\0\377" - "\251?)\377VVV\377]]]\377hhh\377uuu\377\204\204\204\377\220\220\220\377\231" - "\231\231\377\235\235\235\377\240\240\240\377\240\240\240\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\320" - "fP\377\377`\0\377\377\222\0\377\377\215\0\377\377\204\0\377\377{\0\377\377" - "t\0\377\377q\0\377\377o\0\377\377k\0\377\3663\6\377bUR\377SSS\377QQQ\377" - "QQQ\377QQQ\377SSS\377VVV\377]]]\377ggg\377uuu\377\203\203\203\377\220\220" - "\220\377\231\231\231\377\235\235\235\377\222\222\222\377PPP\377PPP\377PP" - "P\377PPP\377PPP\377\311\311\311\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\367fH\377\377Z\0\377\377o\0\377\377o\0\377\3770\0\377\342\325\322\377\333" - "\333\333\377\322\322\322\377\303\303\303\377\261\261\261\377\240\240\240" - "\377\225\225\225\377\224\224\224\377\234\234\234\377\255\255\255\377\276" - "\276\276\377\317\317\317\377\331\331\331\377\340\340\340\377\342\342\342" - "\377\343\343\343\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\252\252\252\3\370\336\327'\3779\0\377\377\224\0\377\377\224\0\377\377" - "\223\0\377\377\217\0\377\377\207\0\377\377~\0\377\377w\0\377\377r\0\377\377" - "p\0\377\377o\0\377\377k\0\377\3652\5\377`RP\377[[[\377ddd\377qqq\377\200" - "\200\200\377\215\215\215\377\226\226\226\377\234\234\234\377\237\237\237" - "\377\240\240\240\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\347I(\377\377z\0\377\377\221\0\377\377\212\0" - "\377\377\200\0\377\377x\0\377\377s\0\377\377p\0\377\377o\0\377\377N\0\377" - "\257E/\377WWW\377SSS\377QQQ\377QQQ\377QQQ\377SSS\377XXX\377___\377kkk\377" - "yyy\377\207\207\207\377\222\222\222\377\232\232\232\377\236\236\236\377\222" - "\222\222\377]]]\377PPP\377PPP\377PPP\377PPP\377\274\274\274\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\347\315\307\377\3774\0\377\377o\0\377\377o\0\377\377Z\0\377" - "\366eG\377\337\337\337\377\330\330\330\377\315\315\315\377\275\275\275\377" - "\253\253\253\377\234\234\234\377\224\224\224\377\226\226\226\377\242\242" - "\242\377\264\264\264\377\305\305\305\377\323\323\323\377\334\334\334\377" - "\340\340\340\377\343\343\343\377\343\343\343\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377" - "\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\373\373\373\377\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\177\177\177\2\324\324\324\6\371\220y\210" - "\377`\0\377\377\224\0\377\377\224\0\377\377\222\0\377\377\214\0\377\377\204" - "\0\377\377{\0\377\377u\0\377\377r\0\377\377p\0\377\377o\0\377\377N\0\377" - "\252@*\377XXX\377aaa\377mmm\377{{{\377\210\210\210\377\224\224\224\377\233" - "\233\233\377\236\236\236\377\240\240\240\377\240\240\240\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241" - "\241\241\377\241\241\241\377\241\241\241\377\241\241\241\377\241\241\241" - "\377\241\241\241\377\241\241\241\377\247\232\227\377\3773\0\377\377\223\0" - "\377\377\217\0\377\377\207\0\377\377}\0\377\377u\0\377\377q\0\377\377p\0" - "\377\377g\0\377\3544\15\377^^^\377VVV\377SSS\377QQQ\377QQQ\377RRR\377UUU" - "\377ZZZ\377bbb\377ooo\377~~~\377\213\213\213\377\225\225\225\377\233\233" - "\233\377\237\237\237\377\240\240\240\377kkk\377PPP\377PPP\377PPP\377PPP\377" - "\223\223\223\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344" - "\344\377\344\344\344\377\344\344\344\377\360\223\200\377\377I\0\377\377o" - "\0\377\377o\0\377\377A\0\377\352\250\232\377\335\335\335\377\325\325\325" - "\377\307\307\307\377\266\266\266\377\245\245\245\377\227\227\227\377\224" - "\224\224\377\232\232\232\377\250\250\250\377\273\273\273\377\313\313\313" - "\377\327\327\327\377\337\337\337\377\341\341\341\377\343\343\343\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344" - "\344\344\377\344\344\344\377\344\344\344\377\344\344\344\377\344\344\344" - "\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\1\277\277\277\4\365\342\342\33\374H\33\342\377\207\0\377\377\224\0\377" - "\377\223\0\377\377\220\0\377\377\212\0\377\377\201\0\377\377z\0\377\377t" - "\0\377\377q\0\377\377p\0\377\377k\0\377\3674\7\377xkh\377xxx\377\206\206" - "\206\377\227\227\227\377\251\251\251\377\270\270\270\377\303\303\303\377" - "\312\312\312\377\314\314\314\377\316\316\316\377\316\316\316\377\316\316" - "\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377" - "\316\316\316\377\316\316\316\377\316\316\316\377\316\316\316\377\316\316" - "\316\377\316\316\316\377\341\221\201\377\377S\0\377\377\222\0\377\377\214" - "\0\377\377\202\0\377\377y\0\377\377s\0\377\377p\0\377\377o\0\377\377A\0\377" - "\254i\\\377www\377nnn\377jjj\377hhh\377hhh\377jjj\377nnn\377www\377\204\204" - "\204\377\225\225\225\377\246\246\246\377\267\267\267\377\302\302\302\377" - "\311\311\311\377\314\314\314\377\316\316\316\377\247\247\247\377PPP\377P" - "PP\377PPP\377PPP\377kkk\377\373\373\373\377\373\373\373\377\373\373\373\377" - "\373\373\373\377\373\373\373\377\373\373\373\377\376F\37\377\377g\0\377\377" - "o\0\377\377k\0\377\3779\20\377\366\366\366\377\360\360\360\377\345\345\345" - "\377\325\325\325\377\301\301\301\377\256\256\256\377\243\243\243\377\243" - "\243\243\377\256\256\256\377\301\301\301\377\325\325\325\377\345\345\345" - "\377\360\360\360\377\366\366\366\377\371\371\371\377\372\372\372\377\373" - "\373\373\377\373\373\373\377\373\373\373\377\373\373\373\377\373\373\373" - "\377\373\373\373\377\373\373\373\377\373\373\373\377\373\373\373\377\373" - "\373\373\377\373\373\373\377\373\373\373\377\373\373\373\377\373\373\373" - "\377\373\373\373\377\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\1\252\252\252\3\337\337\337\10\365\301\267O\377F\0\377\377\224\0\377\377" - "\224\0\377\377\223\0\377\377\216\0\377\377\210\0\377\377\177\0\377\377x\0" - "\377\377s\0\377\377q\0\377\377p\0\377\377Z\0\377\330G)\372\217\217\217\336" - "\236\236\236\300\261\261\261\230\310\310\310k\334\334\334C\351\351\351$\360" - "\360\360\21\332\332\332\7\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377S.\317" - "\377\200\0\377\377\220\0\377\377\210\0\377\377~\0\377\377v\0\377\377r\0\377" - "\377p\0\377\377Z\0\377\350W9\333\241\241\241\271\220\220\220\333\206\206" - "\206\357\201\201\201\371\200\200\200\374\200\200\200\373\204\204\204\364" - "\213\213\213\346\227\227\227\315\250\250\250\251\276\276\276~\323\323\323" - "R\343\343\343.\363\363\363\26\342\342\342\11\252\252\252\3\0\0\0\1\277\277" - "\277\4PPP\377PPP\377PPP\377PPP\377PPP\377\277\277\277\4\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\377\307\273@\377=\0\377\377o\0\377\377o\0\377\377V\0\377\375" - "y]\241\351\351\351\14\355\355\355\35\337\337\3378\317\317\317\\\273\273\273" - "\205\252\252\252\246\244\244\244\264\250\250\250\253\267\267\267\216\310" - "\310\310g\333\333\333@\350\350\350\"\357\357\357\20\324\324\324\6\177\177" - "\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\177\177\177\2\314\314\314" - "\5\354\354\354\16\366\201g\235\377f\0\377\377\224\0\377\377\224\0\377\377" - "\222\0\377\377\215\0\377\377\206\0\377\377~\0\377\377w\0\377\377s\0\377\377" - "q\0\377\377p\0\377\377=\0\377\250sh\354\227\227\227\315\252\252\252\250\277" - "\277\277}\323\323\323R\343\343\343/\350\350\350\27\345\345\345\12\277\277" - "\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377\307\273@\377F\0\377\377\222\0\377\377\215\0\377" - "\377\203\0\377\377z\0\377\377t\0\377\377q\0\377\377l\0\377\3739\13\366\267" - "\252\250\235\236\236\236\300\216\216\216\337\205\205\205\361\201\201\201" - "\372\200\200\200\374\201\201\201\371\206\206\206\357\217\217\217\335\236" - "\236\236\300\261\261\261\230\310\310\310l\334\334\334C\351\351\351$\360\360" - "\360\21\332\332\332\7\177\177\177\2\0\0\0\1\0\0\0\0jjj\224PPP\377PPP\377" - "PPP\377PPP\377\337\337\337\30\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377y^\237\377" - "V\0\377\377o\0\377\377o\0\377\3779\0\377\372\317\3136\360\360\360\21\352" - "\352\352%\332\332\332E\310\310\310l\264\264\264\223\247\247\247\256\244\244" - "\244\264\255\255\255\242\275\275\275\200\320\320\320W\341\341\3413\353\353" - "\353\32\347\347\347\13\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\1\252\252\252\3\345\345\345\12\350\350\350\27\372O+\330" - "\377\200\0\377\377\224\0\377\377\224\0\377\377\221\0\377\377\214\0\377\377" - "\205\0\377\377}\0\377\377w\0\377\377s\0\377\377p\0\377\377l\0\377\3675\7" - "\376\231\214\210\332\242\242\242\270\265\265\265\217\314\314\314d\335\335" - "\335=\347\347\347!\356\356\356\17\324\324\324\6\177\177\177\2\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377" - "`>\277\377y\0\377\377\217\0\377\377\210\0\377\377~\0\377\377w\0\377\377s" - "\0\377\377p\0\377\377=\0\377\322\235\223\225\256\256\256\237\231\231\231" - "\307\214\214\214\344\204\204\204\363\201\201\201\372\201\201\201\372\203" - "\203\203\365\212\212\212\350\224\224\224\321\246\246\246\257\273\273\273" - "\205\321\321\321Z\342\342\3425\354\354\354\33\351\351\351\14\277\277\277" - "\4\0\0\0\1\0\0\0\0\0\0\0\0\312\312\3121PPP\377PPP\377PPP\377PPP\377\245\245" - "\245X\0\0\0\0\0\0\0\0\0\0\0\0\377\357\337\20\3770\0\377\377o\0\377\377o\0" - "\377\377g\0\377\377E\36\337\345\345\345\12\351\351\351\30\344\344\3440\323" - "\323\323S\300\300\300{\256\256\256\237\243\243\243\263\246\246\246\260\261" - "\261\261\227\304\304\304q\330\330\330I\345\345\345(\361\361\361\23\337\337" - "\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\177\177\177\2\324\324\324\6\356\356\356\17\356\336\336/\374<\14\363" - "\377\215\0\377\377\224\0\377\377\223\0\377\377\221\0\377\377\214\0\377\377" - "\204\0\377\377}\0\377\377w\0\377\377s\0\377\377p\0\377\377_\0\377\342D#\370" - "\231\231\231\307\255\255\255\242\303\303\303w\327\327\327N\342\342\342-\363" - "\363\363\26\345\345\345\12\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\257\234`\377S\0\377\377\220" - "\0\377\377\212\0\377\377\202\0\377\377y\0\377\377t\0\377\377p\0\377\377J" - "\0\377\350\212x\234\277\277\277|\250\250\250\251\226\226\226\317\212\212" - "\212\350\203\203\203\365\201\201\201\372\202\202\202\370\206\206\206\357" - "\217\217\217\336\235\235\235\302\260\260\260\234\304\304\304q\330\330\330" - "I\346\346\346)\361\361\361\23\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0" - "\0\0\0\0\0\277\277\277\4PPP\377PPP\377PPP\377PPP\377PPP\377\0\0\0\1\0\0\0" - "\0\0\0\0\0\377\241\215p\377I\0\377\377o\0\377\377o\0\377\377I\0\377\374\237" - "\213s\354\354\354\16\347\347\347\40\335\335\335<\313\313\313c\270\270\270" - "\212\250\250\250\251\243\243\243\265\250\250\250\251\270\270\270\212\315" - "\315\315b\335\335\335<\356\356\356\37\354\354\354\16\314\314\314\5\177\177" - "\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\277" - "\277\277\4\345\345\345\12\350\350\350\27\352\303\272U\374F\12\364\377\215" - "\0\377\377\224\0\377\377\223\0\377\377\221\0\377\377\213\0\377\377\204\0" - "\377\377}\0\377\377v\0\377\377s\0\377\377p\0\377\377V\0\377\326R7\357\244" - "\244\244\264\267\267\267\214\315\315\315a\335\335\335<\347\347\347\40\356" - "\356\356\17\324\324\324\6\177\177\177\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\377\357\337\20\377>\16\357\377\212\0\377\377\213\0" - "\377\377\203\0\377\377|\0\377\377u\0\377\377r\0\377\377V\0\377\363pU\263" - "\321\321\321Z\271\271\271\210\244\244\244\264\223\223\223\326\210\210\210" - "\354\203\203\203\366\202\202\202\370\204\204\204\364\211\211\211\347\226" - "\226\226\320\246\246\246\257\273\273\273\207\315\315\315]\337\337\3378\356" - "\356\356\36\353\353\353\15\314\314\314\5\177\177\177\2\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0jjj\224PPP\377PPP\377PPP\377PPP\377\332\332\332#\0\0\0\0\0" - "\0\0\0\377E\36\337\377g\0\377\377o\0\377\377o\0\377\3774\0\377\370\336\327" - "'\362\362\362\24\346\346\346*\331\331\331J\304\304\304r\261\261\261\230\245" - "\245\245\261\244\244\244\264\256\256\256\237\300\300\300{\323\323\323S\344" - "\344\3440\350\350\350\27\345\345\345\12\252\252\252\3\0\0\0\1\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\177\177\177\2\324\324" - "\324\6\356\356\356\17\347\347\347!\344\275\265a\374F\12\365\377\215\0\377" - "\377\224\0\377\377\223\0\377\377\221\0\377\377\213\0\377\377\204\0\377\377" - "|\0\377\377v\0\377\377r\0\377\377p\0\377\377V\0\377\331V:\351\254\254\254" - "\241\303\303\303w\325\325\325O\343\343\343.\351\351\351\30\347\347\347\13" - "\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\377\357\337" - "\20\377V,\317\377z\0\377\377\210\0\377\377\203\0\377\377|\0\377\377v\0\377" - "\377s\0\377\377V\0\377\367tY\253\336\336\336?\311\311\311h\263\263\263\225" - "\237\237\237\276\217\217\217\335\206\206\206\357\203\203\203\366\203\203" - "\203\365\207\207\207\355\220\220\220\333\236\236\236\277\261\261\261\232" - "\306\306\306p\330\330\330I\346\346\346*\362\362\362\24\342\342\342\11\252" - "\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\332\332\332#PPP\377PP" - "P\377PPP\377PPP\377jjj\224\0\0\0\0\377\274\254P\377A\0\377\377o\0\377\377" - "o\0\377\377Z\0\377\375lN\260\351\351\351\14\354\354\354\33\342\342\3425\321" - "\321\321Z\274\274\274\202\254\254\254\244\243\243\243\265\246\246\246\257" - "\264\264\264\224\310\310\310l\332\332\332E\352\352\352%\360\360\360\21\332" - "\332\332\7\177\177\177\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\277\277\277\4\345\345\345\12\363\363\363" - "\26\347\347\347,\336\266\257m\373F\11\366\377\215\0\377\377\224\0\377\377" - "\223\0\377\377\220\0\377\377\212\0\377\377\203\0\377\377{\0\377\377u\0\377" - "\377r\0\377\377p\0\377\377V\0\377\347I'\354\300\246\237\233\314\314\314d" - "\336\336\336?\351\351\351#\360\360\360\21\337\337\337\10\252\252\252\3\0" - "\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\377\357\337\20\377U,\317\377q\0\377\377\201" - "\0\377\377\177\0\377\377z\0\377\377v\0\377\377s\0\377\377V\0\377\372u[\247" - "\346\346\346*\326\326\326L\303\303\303w\254\254\254\243\231\231\231\311\214" - "\214\214\344\205\205\205\362\203\203\203\365\206\206\206\360\215\215\215" - "\342\230\230\230\312\250\250\250\251\274\274\274\202\321\321\321Y\342\342" - "\3426\355\355\355\35\353\353\353\15\314\314\314\5\177\177\177\2\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\277\277\277\4PPP\377PPP\377PPP\377PPP\377" - "PPP\377\342\342\342\11\377`>\277\377^\0\377\377o\0\377\377o\0\377\377E\0" - "\377\374\255\233d\360\360\360\21\351\351\351$\334\334\334B\307\307\307j\265" - "\265\265\221\246\246\246\255\243\243\243\266\251\251\251\247\272\272\272" - "\206\315\315\315]\337\337\3378\355\355\355\35\351\351\351\14\314\314\314" - "\5\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\1\177\177\177\2\324\324\324\6\354\354\354\16\356\356\356" - "\36\336\336\3367\330\260\252x\372:\12\367\377z\0\377\377\224\0\377\377\223" - "\0\377\377\220\0\377\377\211\0\377\377\202\0\377\377z\0\377\377u\0\377\377" - "r\0\377\377p\0\377\377^\0\377\372;\11\371\336t_\276\324\311\304`\341\341" - "\3414\354\354\354\34\354\354\354\16\324\324\324\6\177\177\177\2\0\0\0\1\0" - "\0\0\0\377\257\234`\377<\16\357\377h\0\377\377x\0\377\377x\0\377\377w\0\377" - "\377t\0\377\377r\0\377\377F\0\377\373w[\244\355\355\355\35\336\336\3367\317" - "\317\317\\\271\271\271\210\244\244\244\262\223\223\223\324\211\211\211\351" - "\205\205\205\362\205\205\205\361\211\211\211\347\223\223\223\324\243\243" - "\243\266\265\265\265\221\311\311\311i\331\331\331D\352\352\352&\361\361\361" - "\23\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0jjj\224PPP\377PPP\377PPP\377PPP\377\253\236\231b\3770\0\377" - "\377o\0\377\377o\0\377\377k\0\377\3778\16\357\345\345\345\12\350\350\350" - "\27\343\343\343/\322\322\322Q\300\300\300z\257\257\257\236\244\244\244\264" - "\244\244\244\264\257\257\257\235\303\303\303w\325\325\325O\342\342\342-\363" - "\363\363\26\342\342\342\11\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\252\252" - "\252\3\337\337\337\10\361\361\361\23\352\352\352&\334\334\334B\314\301\274" - "p\354N-\342\377Z\0\377\377\215\0\377\377\222\0\377\377\217\0\377\377\211" - "\0\377\377\200\0\377\377x\0\377\377s\0\377\377p\0\377\377p\0\377\377k\0\377" - "\377N\0\377\3739\13\366\357lP\272\361\226\201\210\365\300\263Q\367\302\270" - "H\373\270\254S\377\210o\220\377E\36\337\377F\0\377\377m\0\377\377r\0\377" - "\377s\0\377\377s\0\377\377r\0\377\377d\0\377\3779\0\377\372\254\233f\362" - "\362\362\24\345\345\345(\327\327\327G\305\305\305o\261\261\261\232\235\235" - "\235\301\217\217\217\335\210\210\210\354\206\206\206\360\211\211\211\352" - "\221\221\221\331\236\236\236\300\257\257\257\235\302\302\302v\325\325\325" - "P\344\344\3441\353\353\353\32\351\351\351\14\314\314\314\5\0\0\0\1\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\337\337\337\30PPP\377" - "PPP\377PPP\377PPP\377|G<\377\377=\0\377\377o\0\377\377o\0\377\377V\0\377" - "\375y]\241\354\354\354\16\356\356\356\37\335\335\335<\315\315\315a\270\270" - "\270\212\251\251\251\252\241\241\241\267\247\247\247\256\266\266\266\220" - "\311\311\311h\333\333\333A\351\351\351#\357\357\357\20\324\324\324\6\177" - "\177\177\2\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\177\177\177\2\314\314\314\5\347\347\347" - "\13\352\352\352\31\343\343\343.\326\326\326L\304\304\304q\322uc\305\371>" - "\10\373\377m\0\377\377\222\0\377\377\216\0\377\377\206\0\377\377}\0\377\377" - "u\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377\377k\0\377\377V\0\377" - "\377I\0\377\377=\0\377\377=\0\377\377A\0\377\377R\0\377\377g\0\377\377o\0" - "\377\377p\0\377\377p\0\377\377p\0\377\377l\0\377\377N\0\377\377S/\320\372" - "\317\3136\356\356\356\17\356\356\356\37\337\337\3378\317\317\317[\273\273" - "\273\205\246\246\246\255\227\227\227\316\214\214\214\343\207\207\207\355" - "\211\211\211\352\217\217\217\335\233\233\233\306\251\251\251\247\275\275" - "\275\201\317\317\317\\\340\340\340:\347\347\347!\357\357\357\20\332\332\332" - "\7\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\\\\\\\242PPP\377PPP\377PPP\377qIA\377\3735\14\362\377,\0" - "\377\377,\0\377\375lN\260\363\350\350\27\362\362\362\24\346\346\346)\331" - "\331\331J\304\304\304r\261\261\261\230\244\244\244\262\241\241\241\267\253" - "\253\253\245\274\274\274\202\321\321\321Y\341\341\3414\354\354\354\33\347" - "\347\347\13\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177" - "\177\2\324\324\324\6\356\356\356\17\356\356\356\36\342\342\3426\322\322\322" - "U\301\301\301y\272\237\231\252\332W;\347\3779\0\377\377k\0\377\377\212\0" - "\377\377\200\0\377\377x\0\377\377r\0\377\377p\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0" - "\377\377o\0\377\377o\0\377\377o\0\377\377g\0\377\377N\0\377\377;\16\357\375" - "\222|\201\332\332\332\7\353\353\353\15\353\353\353\32\343\343\343/\327\327" - "\327M\303\303\303s\260\260\260\233\236\236\236\277\221\221\221\331\211\211" - "\211\347\212\212\212\350\217\217\217\336\230\230\230\312\246\246\246\255" - "\270\270\270\212\311\311\311e\334\334\334C\344\344\344'\362\362\362\25\342" - "\342\342\11\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\312\312\3121PPP\377PPP\377PPP\377PPP\377" - "PPP\377\0\0\0\1\0\0\0\1\277\277\277\4\351\351\351\14\354\354\354\33\342\342" - "\3425\321\321\321Y\274\274\274\202\253\253\253\245\241\241\241\267\243\243" - "\243\263\260\260\260\231\304\304\304r\331\331\331J\346\346\346)\362\362\362" - "\24\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\1\252\252\252\3\337\337\337\10\360\360\360\22\351\351\351#\335\335" - "\335<\317\317\317[\276\276\276\177\255\255\255\242\252\216\212\310\325Q6" - "\360\3772\0\377\377L\0\377\377[\0\377\377j\0\377\377p\0\377\377o\0\377\377" - "o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377\377o\0\377" - "\377o\0\377\377g\0\377\377R\0\377\377A\0\377\377E\37\340\375\223}\202\363" - "\347\347\26\342\342\342\11\356\356\356\17\352\352\352\31\347\347\347+\332" - "\332\332E\310\310\310g\266\266\266\215\245\245\245\261\227\227\227\316\216" - "\216\216\340\214\214\214\344\217\217\217\336\230\230\230\314\245\245\245" - "\261\266\266\266\220\310\310\310l\330\330\330I\342\342\342-\352\352\352\31" - "\351\351\351\14\314\314\314\5\177\177\177\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1PPP\377PPP\377" - "PPP\377PPP\377PPP\377\272\272\272C\177\177\177\2\324\324\324\6\357\357\357" - "\20\351\351\351#\333\333\333A\311\311\311h\266\266\266\220\246\246\246\255" - "\242\242\242\270\250\250\250\253\267\267\267\213\313\313\313c\335\335\335" - "=\347\347\347\40\354\354\354\16\314\314\314\5\177\177\177\2\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\177\177\177\2\277\277\277\4\345\345\345" - "\12\362\362\362\25\344\344\344'\333\333\333@\316\316\316_\274\274\274\202" - "\254\254\254\243\235\235\235\301\231\214\210\332\265fV\361\320L1\372\356" - "5\17\376\3775\0\377\377=\0\377\377E\0\377\377N\0\377\377N\0\377\377N\0\377" - "\377N\0\377\377A\0\377\377=\0\377\3770\0\377\374D\35\343\371\202i\230\371" - "\266\250[\354\354\354\16\353\353\353\15\356\356\356\17\362\362\362\25\356" - "\356\356\36\342\342\342-\331\331\331D\315\315\315a\273\273\273\204\252\252" - "\252\246\234\234\234\304\221\221\221\327\216\216\216\337\220\220\220\333" - "\227\227\227\313\244\244\244\262\265\265\265\222\306\306\306p\327\327\327" - "N\344\344\3441\354\354\354\34\354\354\354\16\324\324\324\6\177\177\177\2" - "\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\271\271\271BPPP\377PPP\377PPP\377PPP\377\272\272" - "\272C\177\177\177\2\337\337\337\10\362\362\362\24\346\346\346*\326\326\326" - "K\303\303\303s\260\260\260\231\246\246\246\260\244\244\244\262\257\257\257" - "\236\300\300\300{\323\323\323S\344\344\3440\351\351\351\30\345\345\345\12" - "\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\1\177\177\177\2\314\314\314\5\351\351\351\14\350\350\350\27\346\346" - "\346)\334\334\334B\315\315\315a\274\274\274\202\254\254\254\243\236\236\236" - "\277\223\223\223\325\213\213\213\345\206\206\206\357\223xs\365\243nc\367" - "\263dS\365\305[E\362\312`J\350\320fO\334\327lW\316\323\221\202\246\331\243" - "\230\211\330\314\311V\337\337\3378\347\347\347+\351\351\351#\356\356\356" - "\37\356\356\356\37\350\350\350\"\346\346\346*\336\336\3367\331\331\331J\314" - "\314\314d\274\274\274\202\254\254\254\241\237\237\237\275\226\226\226\320" - "\221\221\221\331\223\223\223\326\232\232\232\310\245\245\245\261\264\264" - "\264\223\304\304\304q\322\322\322Q\341\341\3414\356\356\356\37\357\357\357" - "\20\332\332\332\7\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\277\277\277" - "\4PPP\377PPP\377\271\271\271B\277\277\277\4\0\0\0\1\252\252\252\3\342\342" - "\342\11\350\350\350\27\343\343\343/\322\322\322Q\301\301\301x\260\260\260" - "\231\251\251\251\252\253\253\253\245\266\266\266\215\311\311\311i\334\334" - "\334C\352\352\352%\360\360\360\21\332\332\332\7\177\177\177\2\0\0\0\1\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177\177" - "\2\324\324\324\6\353\353\353\15\351\351\351\30\346\346\346*\334\334\334B" - "\314\314\314`\275\275\275\200\256\256\256\237\241\241\241\272\226\226\226" - "\320\216\216\216\340\210\210\210\353\205\205\205\361\205\205\205\361\207" - "\207\207\355\215\215\215\342\225\225\225\322\240\240\240\274\254\254\254" - "\243\270\270\270\212\304\304\304r\316\316\316^\327\327\327N\331\331\331D" - "\336\336\336>\335\335\335=\333\333\333A\326\326\326K\321\321\321Z\305\305" - "\305o\273\273\273\207\254\254\254\241\241\241\241\271\230\230\230\312\225" - "\225\225\322\226\226\226\320\234\234\234\303\246\246\246\255\266\266\266" - "\220\306\306\306p\322\322\322Q\342\342\3425\347\347\347\40\360\360\360\21" - "\337\337\337\10\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\356\356\356\17\277\277\277\4\0\0\0\0\0\0\0\0\0\0\0\1\252\252\252\3\345" - "\345\345\12\350\350\350\27\343\343\343/\325\325\325O\304\304\304r\267\267" - "\267\216\260\260\260\231\265\265\265\217\301\301\301u\324\324\324T\341\341" - "\3413\354\354\354\33\351\351\351\14\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\252\252" - "\252\3\324\324\324\6\353\353\353\15\351\351\351\30\346\346\346)\333\333\333" - "A\315\315\315]\300\300\300{\261\261\261\230\244\244\244\262\232\232\232\310" - "\221\221\221\331\214\214\214\344\210\210\210\353\207\207\207\355\211\211" - "\211\352\215\215\215\341\223\223\223\324\234\234\234\303\246\246\246\257" - "\261\261\261\232\271\271\271\210\301\301\301x\307\307\307n\310\310\310g\312" - "\312\312f\310\310\310k\303\303\303t\274\274\274\202\264\264\264\224\251\251" - "\251\247\241\241\241\271\233\233\233\306\230\230\230\314\231\231\231\307" - "\241\241\241\272\253\253\253\245\270\270\270\212\310\310\310l\325\325\325" - "O\342\342\3425\347\347\347\40\360\360\360\22\342\342\342\11\277\277\277\4" - "\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\1\252\252\252\3\342\342\342\11\362\362\362\25\346" - "\346\346)\332\332\332E\315\315\315a\302\302\302v\277\277\277|\304\304\304" - "q\321\321\321Z\336\336\336>\351\351\351$\360\360\360\22\337\337\337\10\252" - "\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\252\252\252\3\324\324\324\6\353\353\353" - "\15\350\350\350\27\344\344\344'\335\335\335=\322\322\322V\304\304\304r\266" - "\266\266\215\252\252\252\246\240\240\240\274\227\227\227\315\221\221\221" - "\332\215\215\215\342\213\213\213\346\213\213\213\345\216\216\216\340\221" - "\221\221\327\227\227\227\313\240\240\240\274\247\247\247\256\255\255\255" - "\242\261\261\261\230\265\265\265\222\265\265\265\221\264\264\264\224\260" - "\260\260\233\253\253\253\245\245\245\245\261\240\240\240\273\235\235\235" - "\302\234\234\234\303\237\237\237\275\246\246\246\257\261\261\261\232\275" - "\275\275\201\311\311\311e\331\331\331J\345\345\3452\356\356\356\37\360\360" - "\360\22\342\342\342\11\277\277\277\4\177\177\177\2\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\1\177\177\177\2\332\332\332\7\357\357\357\20\356\356\356\37\341\341\341" - "4\330\330\330H\320\320\320W\321\321\321Y\325\325\325P\336\336\336>\346\346" - "\346)\350\350\350\27\347\347\347\13\277\277\277\4\0\0\0\1\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\1\177\177\177\2\324\324\324\6\351\351\351\14\362\362\362\25" - "\351\351\351$\342\342\3426\327\327\327M\311\311\311e\276\276\276~\262\262" - "\262\226\250\250\250\253\237\237\237\275\227\227\227\313\223\223\223\325" - "\220\220\220\333\217\217\217\335\220\220\220\333\223\223\223\326\226\226" - "\226\317\231\231\231\307\236\236\236\277\242\242\242\270\244\244\244\264" - "\245\245\245\261\244\244\244\262\243\243\243\265\241\241\241\271\240\240" - "\240\274\240\240\240\274\242\242\242\270\246\246\246\257\255\255\255\240" - "\267\267\267\214\303\303\303t\317\317\317[\334\334\334C\343\343\343.\355" - "\355\355\35\360\360\360\21\342\342\342\11\277\277\277\4\177\177\177\2\0\0" - "\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177\177\2\314\314\314\5\347\347\347\13\362" - "\362\362\24\350\350\350\"\343\343\343.\336\336\3367\337\337\3378\344\344" - "\3441\352\352\352%\351\351\351\30\353\353\353\15\324\324\324\6\177\177\177" - "\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177\177\2\314\314" - "\314\5\345\345\345\12\361\361\361\23\356\356\356\36\343\343\343.\333\333" - "\333A\322\322\322V\310\310\310l\274\274\274\202\262\262\262\226\251\251\251" - "\247\243\243\243\265\236\236\236\300\232\232\232\310\230\230\230\314\227" - "\227\227\316\227\227\227\315\227\227\227\313\231\231\231\307\234\234\234" - "\303\236\236\236\277\240\240\240\274\241\241\241\272\241\241\241\267\244" - "\244\244\264\246\246\246\260\251\251\251\247\260\260\260\234\267\267\267" - "\214\301\301\301y\314\314\314d\327\327\327N\337\337\3379\344\344\344'\352" - "\352\352\31\356\356\356\17\337\337\337\10\277\277\277\4\177\177\177\2\0\0" - "\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\252\252\252\3\324\324\324\6" - "\347\347\347\13\360\360\360\22\352\352\352\31\355\355\355\35\355\355\355" - "\35\352\352\352\31\361\361\361\23\351\351\351\14\324\324\324\6\252\252\252" - "\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177" - "\177\2\277\277\277\4\342\342\342\11\356\356\356\17\351\351\351\30\351\351" - "\351$\341\341\3414\332\332\332E\320\320\320X\307\307\307j\277\277\277|\267" - "\267\267\213\261\261\261\230\254\254\254\243\250\250\250\253\245\245\245" - "\261\243\243\243\265\243\243\243\266\243\243\243\266\244\244\244\264\246" - "\246\246\260\247\247\247\254\251\251\251\247\254\254\254\241\260\260\260" - "\231\266\266\266\220\274\274\274\203\303\303\303t\313\313\313c\322\322\322" - "Q\336\336\336?\343\343\343.\347\347\347\40\362\362\362\24\351\351\351\14" - "\324\324\324\6\252\252\252\3\0\0\0\1\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\1\252\252\252\3\314\314\314\5\337\337\337\10\347" - "\347\347\13\353\353\353\15\353\353\353\15\347\347\347\13\337\337\337\10\314" - "\314\314\5\252\252\252\3\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177\177\2\252\252\252\3\324\324\324" - "\6\347\347\347\13\360\360\360\22\354\354\354\33\352\352\352&\341\341\341" - "4\334\334\334B\325\325\325P\316\316\316^\310\310\310k\302\302\302v\275\275" - "\275\200\273\273\273\207\267\267\267\214\265\265\265\217\266\266\266\220" - "\265\265\265\217\267\267\267\214\271\271\271\210\274\274\274\202\300\300" - "\300z\304\304\304q\312\312\312f\321\321\321Y\326\326\326L\335\335\335=\343" - "\343\343/\351\351\351#\351\351\351\30\356\356\356\17\342\342\342\11\314\314" - "\314\5\177\177\177\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\177\177\177\2\252\252\252\3\277\277" - "\277\4\314\314\314\5\314\314\314\5\277\277\277\4\252\252\252\3\177\177\177" - "\2\0\0\0\1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0", + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, + 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, + 0x55, 0x55, 0x55, 0x03, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x7C, 0x7C, 0x7C, 0x73, 0x78, 0x78, 0x78, 0x66, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x08, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x04, + 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x91, 0x91, 0x91, 0x51, + 0x2F, 0x2F, 0x2F, 0xFC, 0x34, 0x34, 0x34, 0xF9, 0x10, 0x10, 0x10, 0x51, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x13, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x21, + 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x13, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, + 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x08, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x8B, 0x8B, 0x8B, 0x2E, 0x34, 0x34, 0x34, 0xEB, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x34, 0x34, 0x34, 0xEF, 0x11, 0x11, 0x11, 0x4B, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x2D, + 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x3D, + 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x3A, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x31, + 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1B, + 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1A, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x18, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x47, 0x47, 0x47, 0x12, 0x24, 0x24, 0x24, 0xCF, + 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x22, 0x22, 0x22, 0x98, 0x00, 0x00, 0x00, 0x1B, + 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x3B, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x4F, + 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x59, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x49, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x2A, + 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x33, + 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x36, + 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x37, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x38, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x37, + 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x36, + 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x34, + 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x31, + 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x2F, + 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2D, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, + 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x80, 0x80, 0x02, + 0x1E, 0x1E, 0x1E, 0xA3, 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x27, 0x27, 0x27, 0xC9, + 0x05, 0x05, 0x05, 0x38, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x46, + 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x60, + 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x6B, + 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x72, + 0x00, 0x00, 0x00, 0x72, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x70, + 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6D, 0x00, 0x00, 0x00, 0x6C, + 0x00, 0x00, 0x00, 0x6B, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x63, + 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x4A, + 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x2B, + 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x31, + 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x4C, + 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x54, + 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x58, + 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x59, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, + 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, + 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, + 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x59, + 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x58, + 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x53, + 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x50, + 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x4D, + 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, + 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, + 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x48, + 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x30, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x1C, 0x1C, 0x1C, 0x6D, 0x36, 0x36, 0x36, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x2B, 0x2B, 0x2B, 0xE7, 0x09, 0x09, 0x09, 0x57, 0x00, 0x00, 0x00, 0x46, + 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x6B, + 0x06, 0x02, 0x02, 0x7A, 0x39, 0x1C, 0x04, 0x90, 0x64, 0x36, 0x06, 0xA6, + 0x84, 0x48, 0x0A, 0xB8, 0xA2, 0x59, 0x0D, 0xC8, 0xAF, 0x61, 0x10, 0xD0, + 0xBA, 0x66, 0x0F, 0xD6, 0xC0, 0x6C, 0x0F, 0xD9, 0xBC, 0x69, 0x0F, 0xD6, + 0xB4, 0x64, 0x10, 0xD2, 0xA8, 0x5D, 0x0F, 0xCE, 0x95, 0x51, 0x0B, 0xC2, + 0x7B, 0x43, 0x08, 0xB6, 0x60, 0x34, 0x06, 0xA8, 0x36, 0x1A, 0x03, 0x96, + 0x0B, 0x06, 0x02, 0x88, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x76, + 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x60, + 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, + 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x26, + 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x6D, 0x00, 0x00, 0x00, 0x73, + 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x77, 0x00, 0x00, 0x00, 0x78, + 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x7A, + 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x7B, + 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, + 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, + 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x7F, + 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, + 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, + 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, + 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, + 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x7B, + 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x79, + 0x00, 0x00, 0x00, 0x78, 0x00, 0x00, 0x00, 0x77, 0x00, 0x00, 0x00, 0x76, + 0x00, 0x00, 0x00, 0x75, 0x00, 0x00, 0x00, 0x74, 0x00, 0x00, 0x00, 0x73, + 0x00, 0x00, 0x00, 0x72, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x70, + 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, + 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, + 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x60, + 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x0E, 0x0E, 0x0E, 0x37, + 0x35, 0x35, 0x35, 0xF2, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x2D, 0x2D, 0x2D, 0xFF, 0x2C, 0x2C, 0x2C, 0xF9, 0x0C, 0x0C, 0x0C, 0x7F, + 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x66, 0x14, 0x06, 0x02, 0x7E, + 0x60, 0x33, 0x06, 0xA4, 0xAD, 0x61, 0x0E, 0xCE, 0xDB, 0x7C, 0x16, 0xEA, + 0xF8, 0x8B, 0x18, 0xFC, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xF8, 0x8B, 0x17, 0xFC, 0xE3, 0x80, 0x14, 0xEF, + 0xBE, 0x6A, 0x10, 0xDB, 0x80, 0x48, 0x09, 0xBD, 0x3D, 0x20, 0x03, 0xA0, + 0x02, 0x02, 0x00, 0x89, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x73, + 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x47, + 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x32, 0x22, 0x11, 0x03, 0x5A, + 0x43, 0x25, 0x04, 0x7D, 0x4B, 0x26, 0x03, 0x92, 0x4F, 0x2B, 0x03, 0xA2, + 0x54, 0x2B, 0x04, 0xAD, 0x5B, 0x2F, 0x04, 0xB4, 0x60, 0x34, 0x06, 0xB9, + 0x68, 0x38, 0x05, 0xBB, 0x6D, 0x3A, 0x05, 0xBE, 0x72, 0x3D, 0x07, 0xC0, + 0x75, 0x40, 0x07, 0xC2, 0x79, 0x42, 0x07, 0xC4, 0x7E, 0x43, 0x06, 0xC5, + 0x80, 0x46, 0x08, 0xC7, 0x83, 0x47, 0x08, 0xC8, 0x85, 0x4A, 0x08, 0xC9, + 0x87, 0x4A, 0x08, 0xCA, 0x8A, 0x4B, 0x08, 0xCB, 0x8C, 0x4E, 0x08, 0xCC, + 0x8D, 0x4E, 0x0A, 0xCD, 0x8E, 0x50, 0x0A, 0xCD, 0x90, 0x4F, 0x0A, 0xCE, + 0x91, 0x50, 0x0A, 0xCE, 0x91, 0x50, 0x0A, 0xCF, 0x91, 0x51, 0x0A, 0xCF, + 0x91, 0x51, 0x0A, 0xCF, 0x93, 0x51, 0x09, 0xCF, 0x91, 0x51, 0x0A, 0xCF, + 0x91, 0x50, 0x0A, 0xCE, 0x90, 0x50, 0x0A, 0xCE, 0x8E, 0x4F, 0x0A, 0xCE, + 0x8D, 0x4E, 0x0A, 0xCD, 0x8A, 0x4C, 0x08, 0xCC, 0x87, 0x4A, 0x08, 0xCA, + 0x85, 0x4A, 0x08, 0xC9, 0x82, 0x47, 0x08, 0xC8, 0x7E, 0x44, 0x06, 0xC6, + 0x79, 0x42, 0x07, 0xC4, 0x76, 0x40, 0x07, 0xC3, 0x72, 0x3D, 0x07, 0xC1, + 0x6D, 0x3A, 0x05, 0xBE, 0x67, 0x38, 0x05, 0xBC, 0x60, 0x33, 0x05, 0xBA, + 0x5B, 0x2F, 0x06, 0xB7, 0x54, 0x2C, 0x04, 0xB4, 0x4B, 0x27, 0x04, 0xB0, + 0x42, 0x22, 0x04, 0xAD, 0x38, 0x1D, 0x05, 0xAA, 0x2F, 0x17, 0x02, 0xA7, + 0x2A, 0x14, 0x02, 0xA4, 0x26, 0x10, 0x02, 0xA2, 0x24, 0x10, 0x02, 0xA1, + 0x28, 0x11, 0x02, 0xA1, 0x29, 0x11, 0x02, 0xA1, 0x2B, 0x14, 0x02, 0xA2, + 0x2A, 0x14, 0x02, 0xA3, 0x2D, 0x16, 0x02, 0xA3, 0x30, 0x16, 0x02, 0xA1, + 0x33, 0x1A, 0x02, 0x9C, 0x33, 0x18, 0x02, 0x92, 0x34, 0x19, 0x06, 0x84, + 0x03, 0x03, 0x03, 0x5E, 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2E, + 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x05, + 0x0E, 0x0E, 0x0E, 0x12, 0x2F, 0x2F, 0x2F, 0xCE, 0x32, 0x32, 0x32, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x11, 0x12, 0x12, 0xAA, 0x00, 0x00, 0x00, 0x5E, 0x2B, 0x13, 0x04, 0x87, + 0x97, 0x55, 0x0D, 0xC1, 0xE5, 0x80, 0x14, 0xEE, 0xFF, 0x91, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFB, 0x8D, 0x18, 0xFD, 0xCE, 0x72, 0x13, 0xE6, + 0x7C, 0x44, 0x05, 0xBF, 0x1F, 0x0D, 0x02, 0x9A, 0x00, 0x00, 0x00, 0x83, + 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x54, + 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x21, + 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x28, + 0x15, 0x0A, 0x03, 0x4A, 0xDB, 0x79, 0x14, 0xDE, 0xFF, 0x90, 0x18, 0xFD, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0xFA, 0x8C, 0x18, 0xFE, 0xF7, 0x8B, 0x17, 0xFD, 0xF4, 0x88, 0x17, 0xFC, + 0xF2, 0x88, 0x17, 0xFB, 0xF1, 0x86, 0x17, 0xFA, 0xF2, 0x87, 0x17, 0xFA, + 0xF2, 0x88, 0x17, 0xFB, 0xF4, 0x89, 0x17, 0xFB, 0xF5, 0x89, 0x17, 0xFC, + 0xF6, 0x89, 0x17, 0xFC, 0xF7, 0x8B, 0x17, 0xFD, 0xF8, 0x8C, 0x17, 0xFD, + 0xF8, 0x8B, 0x18, 0xFC, 0xFB, 0x8F, 0x18, 0xFC, 0x90, 0x4E, 0x0C, 0xAE, + 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x20, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x05, 0x21, 0x21, 0x21, 0x94, + 0x34, 0x34, 0x34, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, + 0x27, 0x27, 0x27, 0xFF, 0x0B, 0x14, 0x1A, 0xCF, 0x1D, 0x0A, 0x02, 0x7C, + 0x99, 0x54, 0x0D, 0xC0, 0xEF, 0x86, 0x19, 0xF6, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFC, 0x8E, 0x18, 0xFF, 0xFB, 0x8C, 0x18, 0xFC, 0xFC, 0x8D, 0x18, 0xFE, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xEA, 0x82, 0x17, 0xF5, 0x8D, 0x50, 0x0A, 0xCA, 0x1C, 0x0B, 0x02, 0x9D, + 0x00, 0x00, 0x00, 0x83, 0x00, 0x00, 0x00, 0x73, 0x00, 0x00, 0x00, 0x5E, + 0x00, 0x00, 0x00, 0x49, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x25, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x2B, 0x6C, 0x3A, 0x0A, 0x84, + 0xFF, 0x93, 0x19, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xB5, 0x65, 0x10, 0xCA, 0x00, 0x00, 0x00, 0x51, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x0E, + 0x12, 0x12, 0x12, 0x55, 0x34, 0x34, 0x34, 0xFB, 0x2F, 0x2F, 0x2F, 0xFF, + 0x2B, 0x2B, 0x2B, 0xFF, 0x22, 0x24, 0x25, 0xFF, 0x12, 0x18, 0x1E, 0xED, + 0x69, 0x3A, 0x0A, 0xB4, 0xE0, 0x7D, 0x16, 0xE9, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFB, 0x8D, 0x18, 0xFC, 0xD7, 0x79, 0x12, 0xDF, 0xA8, 0x5C, 0x0F, 0xB9, + 0x7A, 0x42, 0x09, 0x96, 0x5A, 0x31, 0x04, 0x7D, 0x43, 0x22, 0x05, 0x6F, + 0x3B, 0x1D, 0x05, 0x68, 0x41, 0x1F, 0x05, 0x6A, 0x51, 0x2B, 0x05, 0x71, + 0x67, 0x37, 0x06, 0x81, 0x8E, 0x4E, 0x0A, 0x9C, 0xB6, 0x67, 0x10, 0xBD, + 0xE3, 0x80, 0x15, 0xE5, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xE4, 0x80, 0x17, 0xF3, 0x6C, 0x39, 0x05, 0xBF, + 0x00, 0x00, 0x00, 0x91, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x66, + 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x27, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x30, 0x96, 0x52, 0x0B, 0xA7, 0xFF, 0x93, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0x6F, 0x3B, 0x06, 0xA3, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x22, 0x06, 0x06, 0x06, 0x2B, 0x2B, 0x2B, 0x2B, 0xDC, + 0x2F, 0x2F, 0x2F, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x1E, 0x21, 0x24, 0xFF, + 0x24, 0x21, 0x1E, 0xFE, 0xA4, 0x5F, 0x19, 0xEB, 0xFF, 0x8F, 0x18, 0xFC, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xEE, 0x86, 0x17, 0xF2, 0x9E, 0x5A, 0x0D, 0xB6, 0x44, 0x26, 0x04, 0x78, + 0x06, 0x03, 0x03, 0x51, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x37, + 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2C, + 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x2B, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x33, 0x12, 0x07, 0x04, 0x46, + 0x4E, 0x2B, 0x05, 0x6C, 0xA6, 0x5C, 0x0D, 0xAE, 0xEB, 0x84, 0x17, 0xEB, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xB5, 0x63, 0x10, 0xDF, + 0x1D, 0x0B, 0x02, 0xA1, 0x00, 0x00, 0x00, 0x83, 0x00, 0x00, 0x00, 0x6C, + 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x27, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x35, + 0xA8, 0x5C, 0x0F, 0xB6, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xE4, 0x7E, 0x15, 0xF0, 0x15, 0x06, 0x02, 0x79, + 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x20, + 0x1E, 0x1E, 0x1E, 0xA3, 0x2F, 0x2F, 0x2F, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x1B, 0x21, 0x24, 0xFF, 0x35, 0x29, 0x1E, 0xFF, 0xCA, 0x73, 0x19, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFC, 0x8F, 0x18, 0xFD, 0xA6, 0x5C, 0x0D, 0xBF, 0x27, 0x15, 0x05, 0x6F, + 0x00, 0x00, 0x00, 0x49, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x32, + 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x18, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1B, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x27, + 0x00, 0x00, 0x00, 0x2E, 0x24, 0x0D, 0x03, 0x4D, 0x8E, 0x4F, 0x0C, 0x9A, + 0xF0, 0x87, 0x17, 0xF0, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xD8, 0x77, 0x14, 0xEF, + 0x3C, 0x1F, 0x03, 0xAF, 0x00, 0x00, 0x00, 0x86, 0x00, 0x00, 0x00, 0x6E, + 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x26, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x05, + 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x39, 0xB6, 0x64, 0x10, 0xBF, + 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0x8C, 0x4D, 0x09, 0xBD, 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x49, + 0x00, 0x00, 0x00, 0x2C, 0x0F, 0x0F, 0x0F, 0x63, 0x2F, 0x2F, 0x2F, 0xFB, + 0x2B, 0x29, 0x29, 0xFF, 0x1B, 0x21, 0x25, 0xFF, 0x3E, 0x2D, 0x1E, 0xFF, + 0xD6, 0x7A, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xE7, 0x81, 0x14, 0xEE, 0x5C, 0x31, 0x05, 0x93, + 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x32, + 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x08, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x2B, 0x36, 0x1A, 0x03, 0x59, + 0xC8, 0x6F, 0x0F, 0xCB, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xEA, 0x85, 0x17, 0xF7, + 0x48, 0x26, 0x04, 0xB5, 0x00, 0x00, 0x00, 0x87, 0x00, 0x00, 0x00, 0x6C, + 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x3B, 0xB9, 0x68, 0x0E, 0xC6, 0xFF, 0x92, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xEB, 0x83, 0x17, 0xF3, 0x24, 0x0F, 0x06, 0x88, + 0x06, 0x06, 0x06, 0x5C, 0x04, 0x04, 0x04, 0x42, 0x04, 0x04, 0x04, 0x3F, + 0x24, 0x24, 0x24, 0xD9, 0x2B, 0x2B, 0x2B, 0xFF, 0x1D, 0x21, 0x25, 0xFF, + 0x3D, 0x2C, 0x1E, 0xFF, 0xDC, 0x7D, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD9, 0x7A, 0x16, 0xE6, + 0x35, 0x1E, 0x06, 0x81, 0x00, 0x03, 0x06, 0x53, 0x0C, 0x0C, 0x0C, 0x41, + 0x0B, 0x0B, 0x0B, 0x2F, 0x0F, 0x0F, 0x0F, 0x21, 0x21, 0x21, 0x21, 0x17, + 0x30, 0x30, 0x30, 0x10, 0x40, 0x40, 0x40, 0x0C, 0x1C, 0x1C, 0x1C, 0x09, + 0x40, 0x40, 0x40, 0x08, 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, + 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, + 0x49, 0x49, 0x49, 0x07, 0x20, 0x20, 0x20, 0x08, 0x1A, 0x1A, 0x1A, 0x0A, + 0x3B, 0x3B, 0x3B, 0x0D, 0x2D, 0x2D, 0x2D, 0x11, 0x21, 0x21, 0x21, 0x17, + 0x0F, 0x0F, 0x0F, 0x21, 0x06, 0x0C, 0x0C, 0x2A, 0x13, 0x13, 0x0B, 0x43, + 0xB5, 0x67, 0x17, 0xB9, 0xFF, 0x90, 0x14, 0xFE, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xEB, 0x85, 0x17, 0xF8, + 0x46, 0x26, 0x06, 0xB5, 0x00, 0x02, 0x04, 0x88, 0x02, 0x02, 0x02, 0x69, + 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3C, + 0xBE, 0x69, 0x10, 0xC9, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xA8, 0x6A, 0x31, 0xF8, 0x46, 0x4B, 0x51, 0xE4, 0x61, 0x61, 0x62, 0xDF, + 0x6E, 0x6E, 0x6E, 0xDA, 0x4B, 0x4B, 0x4B, 0xE3, 0x28, 0x28, 0x28, 0xFF, + 0x21, 0x24, 0x25, 0xFF, 0x31, 0x28, 0x20, 0xFF, 0xD3, 0x78, 0x19, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xE4, 0x88, 0x2A, 0xFF, 0x7D, 0x71, 0x68, 0xEE, 0x7A, 0x7B, 0x7E, 0xDF, + 0x93, 0x93, 0x93, 0xDD, 0xA5, 0xA5, 0xA5, 0xD9, 0xB0, 0xB0, 0xB0, 0xD6, + 0xBA, 0xBA, 0xBA, 0xD4, 0xC2, 0xC2, 0xC2, 0xD2, 0xC7, 0xC7, 0xC7, 0xD1, + 0xCB, 0xCB, 0xCB, 0xD1, 0xCC, 0xCC, 0xCC, 0xD1, 0xCF, 0xCF, 0xCF, 0xD0, + 0xD8, 0xD8, 0xD8, 0xD0, 0xE5, 0xE5, 0xE5, 0xD0, 0xE5, 0xE5, 0xE5, 0xD0, + 0xE5, 0xE5, 0xE5, 0xD0, 0xE2, 0xE2, 0xE2, 0xD0, 0xD2, 0xD2, 0xD2, 0xD0, + 0xCE, 0xCE, 0xCE, 0xD0, 0xCC, 0xCC, 0xCC, 0xD1, 0xC9, 0xC9, 0xC9, 0xD1, + 0xC7, 0xC7, 0xC7, 0xD2, 0xC2, 0xC2, 0xC2, 0xD2, 0xBA, 0xBA, 0xBA, 0xD4, + 0xB0, 0xB0, 0xB0, 0xD6, 0xA2, 0xA4, 0xA5, 0xD7, 0x93, 0x94, 0x95, 0xDE, + 0xD9, 0x91, 0x4D, 0xFE, 0xFF, 0x8D, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE4, 0x82, 0x18, 0xFA, + 0x5F, 0x4F, 0x41, 0xEC, 0x46, 0x48, 0x4C, 0xD1, 0x03, 0x03, 0x03, 0x63, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x18, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3C, 0xBF, 0x6A, 0x10, 0xCC, + 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF1, 0x89, 0x1B, 0xFF, 0x65, 0x57, 0x4A, 0xFF, + 0x61, 0x63, 0x65, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x24, 0x25, 0x27, 0xFF, 0x20, 0x21, 0x21, 0xFF, + 0xC1, 0x6F, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xEF, 0x89, 0x20, 0xFF, 0x88, 0x76, 0x67, 0xFF, + 0x87, 0x8B, 0x8E, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, + 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, + 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB5, 0xB7, 0xB8, 0xFF, 0xA4, 0xA1, 0x9E, 0xFF, + 0xE7, 0x8F, 0x39, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xD6, 0x80, 0x28, 0xFF, + 0x4F, 0x4D, 0x4B, 0xF1, 0x02, 0x02, 0x02, 0x7C, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x3B, 0xC1, 0x6B, 0x11, 0xCD, 0xFF, 0x92, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xB6, 0x72, 0x2F, 0xFF, 0x4F, 0x55, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x45, 0x45, 0x45, 0xFF, 0x24, 0x24, 0x24, 0xFF, + 0x17, 0x1E, 0x24, 0xFF, 0x98, 0x5A, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, + 0x9C, 0x76, 0x54, 0xFF, 0x7C, 0x81, 0x85, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xAD, 0xB1, 0xB3, 0xFF, 0xAF, 0x9A, 0x88, 0xFF, + 0xF8, 0x8D, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0xA1, 0x63, 0x2A, 0xF1, + 0x00, 0x00, 0x04, 0x90, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x4A, + 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3B, + 0xBF, 0x6A, 0x10, 0xCC, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x17, 0xFF, 0xFC, 0x8E, 0x17, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x90, 0x13, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0x70, 0x59, 0x46, 0xFF, + 0x5B, 0x5F, 0x62, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x27, 0x27, 0x27, 0xFF, 0x1A, 0x20, 0x25, 0xFF, 0x62, 0x3F, 0x1E, 0xFF, + 0xFB, 0x8D, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x13, 0xFF, 0xC4, 0x7D, 0x39, 0xFF, 0x70, 0x76, 0x79, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xA4, 0xA9, 0xAC, 0xFF, 0xCE, 0x92, 0x5C, 0xFF, + 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF7, 0x8A, 0x17, 0xFC, 0x40, 0x1F, 0x04, 0xAF, + 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x3B, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, + 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x39, 0xB9, 0x67, 0x0E, 0xC4, + 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE3, 0x7E, 0x14, 0xEF, + 0xAE, 0x66, 0x1D, 0xDD, 0xA0, 0x6E, 0x41, 0xFF, 0x97, 0x70, 0x4E, 0xFF, + 0x96, 0x73, 0x54, 0xFF, 0x99, 0x76, 0x58, 0xFF, 0x9D, 0x77, 0x57, 0xFF, + 0xA2, 0x79, 0x55, 0xFF, 0xA6, 0x79, 0x53, 0xFF, 0xA9, 0x7B, 0x51, 0xFF, + 0xAE, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, + 0xAE, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, 0xB0, 0x7B, 0x4D, 0xFF, + 0xB0, 0x7B, 0x4B, 0xFF, 0xB2, 0x7C, 0x4B, 0xFF, 0xB2, 0x7C, 0x4B, 0xFF, + 0xB3, 0x7C, 0x4A, 0xFF, 0xB4, 0x7C, 0x4A, 0xFF, 0xB5, 0x7C, 0x49, 0xFF, + 0xB6, 0x7C, 0x49, 0xFF, 0xB7, 0x7D, 0x49, 0xFF, 0xB8, 0x7D, 0x48, 0xFF, + 0xB9, 0x7E, 0x48, 0xFF, 0xBA, 0x7E, 0x48, 0xFF, 0xB9, 0x7E, 0x48, 0xFF, + 0xB4, 0x7C, 0x4A, 0xFF, 0xAE, 0x7B, 0x4D, 0xFF, 0xA7, 0x79, 0x51, 0xFF, + 0xA0, 0x78, 0x56, 0xFF, 0x99, 0x77, 0x59, 0xFF, 0x93, 0x76, 0x5D, 0xFF, + 0x91, 0x76, 0x5E, 0xFF, 0x95, 0x77, 0x5C, 0xFF, 0x99, 0x78, 0x5B, 0xFF, + 0x9D, 0x78, 0x59, 0xFF, 0xA1, 0x79, 0x57, 0xFF, 0xA5, 0x79, 0x54, 0xFF, + 0xA8, 0x7A, 0x51, 0xFF, 0xAB, 0x7A, 0x4E, 0xFF, 0xAE, 0x79, 0x49, 0xFF, + 0xB0, 0x77, 0x43, 0xFF, 0xB0, 0x74, 0x3A, 0xFF, 0xA6, 0x6A, 0x34, 0xFF, + 0xCE, 0x79, 0x24, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xC7, 0x78, 0x2A, 0xFF, 0x4F, 0x54, 0x56, 0xFF, 0x68, 0x69, 0x69, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x21, 0x24, 0x24, 0xFF, + 0x29, 0x25, 0x21, 0xFF, 0xD8, 0x7A, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xF2, 0x8A, 0x1D, 0xFF, + 0x7D, 0x6E, 0x62, 0xFF, 0x83, 0x86, 0x88, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xB2, 0xB3, 0xB5, 0xFF, 0xA6, 0x9D, 0x93, 0xFF, 0xF3, 0x8E, 0x26, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xB8, 0x67, 0x10, 0xE1, 0x00, 0x00, 0x00, 0x8D, + 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x48, 0x00, 0x00, 0x00, 0x2C, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x38, 0xAF, 0x64, 0x10, 0xBB, 0xFF, 0x93, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xC9, 0x70, 0x13, 0xE4, 0x18, 0x07, 0x02, 0x8C, 0x0F, 0x19, 0x20, 0x97, + 0x5F, 0x66, 0x6A, 0xFF, 0x6B, 0x70, 0x73, 0xFF, 0x74, 0x78, 0x7B, 0xFF, + 0x78, 0x7C, 0x7F, 0xFF, 0x78, 0x7D, 0x80, 0xFF, 0x78, 0x7D, 0x81, 0xFF, + 0x78, 0x7D, 0x80, 0xFF, 0x77, 0x7C, 0x80, 0xFF, 0x77, 0x7C, 0x80, 0xFF, + 0x77, 0x7C, 0x80, 0xFF, 0x76, 0x7B, 0x80, 0xFF, 0x76, 0x7B, 0x7F, 0xFF, + 0x75, 0x7B, 0x7F, 0xFF, 0x76, 0x7B, 0x7F, 0xFF, 0x75, 0x7B, 0x7F, 0xFF, + 0x75, 0x7B, 0x7F, 0xFF, 0x75, 0x7B, 0x7F, 0xFF, 0x75, 0x7A, 0x7F, 0xFF, + 0x75, 0x7A, 0x7F, 0xFF, 0x75, 0x7A, 0x7E, 0xFF, 0x74, 0x7A, 0x7E, 0xFF, + 0x75, 0x7A, 0x7F, 0xFF, 0x74, 0x7A, 0x7E, 0xFF, 0x74, 0x7A, 0x7F, 0xFF, + 0x74, 0x7A, 0x7F, 0xFF, 0x74, 0x7A, 0x7F, 0xFF, 0x75, 0x7A, 0x7F, 0xFF, + 0x76, 0x7B, 0x7F, 0xFF, 0x77, 0x7C, 0x80, 0xFF, 0x78, 0x7D, 0x80, 0xFF, + 0x79, 0x7D, 0x80, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, 0x7B, 0x7E, 0x81, 0xFF, + 0x7B, 0x7E, 0x81, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, + 0x79, 0x7D, 0x81, 0xFF, 0x78, 0x7D, 0x81, 0xFF, 0x77, 0x7C, 0x80, 0xFF, + 0x74, 0x79, 0x7D, 0xFF, 0x6F, 0x74, 0x78, 0xFF, 0x65, 0x6B, 0x6F, 0xFF, + 0x58, 0x5E, 0x63, 0xFF, 0x3C, 0x4A, 0x54, 0xFF, 0xB7, 0x71, 0x2B, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x17, 0xFF, 0x80, 0x5E, 0x41, 0xFF, + 0x58, 0x5B, 0x5F, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x57, 0x57, 0x57, 0xFF, + 0x25, 0x25, 0x25, 0xFF, 0x17, 0x1E, 0x24, 0xFF, 0x93, 0x57, 0x1E, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xBA, 0x79, 0x3A, 0xFF, 0x6C, 0x72, 0x76, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xA1, 0xA7, 0xAA, 0xFF, 0xCF, 0x91, 0x56, 0xFF, 0xFF, 0x8E, 0x0F, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFB, 0x8D, 0x18, 0xFE, 0x44, 0x23, 0x04, 0xAF, 0x00, 0x00, 0x00, 0x77, + 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x37, + 0x9F, 0x59, 0x0D, 0xB2, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x90, 0x18, 0xFF, 0x52, 0x2B, 0x04, 0xAB, + 0x00, 0x00, 0x00, 0x6F, 0x27, 0x27, 0x27, 0x8B, 0x77, 0x77, 0x77, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x66, 0x67, 0x67, 0xFF, + 0x5B, 0x57, 0x52, 0xFF, 0xE5, 0x84, 0x20, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xD8, 0x7F, 0x24, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x66, 0x67, 0x67, 0xFF, + 0x6D, 0x6D, 0x6D, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x22, 0x24, 0x25, 0xFF, + 0x38, 0x2C, 0x21, 0xFF, 0xE9, 0x84, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, + 0x80, 0x6A, 0x58, 0xFF, 0x7C, 0x7F, 0x81, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, + 0xB4, 0xB4, 0xB4, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xAC, 0xAF, 0xB1, 0xFF, + 0xAD, 0x96, 0x82, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xA3, 0x5B, 0x0D, 0xD8, 0x00, 0x00, 0x00, 0x84, 0x00, 0x00, 0x00, 0x62, + 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x36, 0x95, 0x51, 0x0B, 0xAA, + 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xEA, 0x83, 0x17, 0xF4, 0x16, 0x07, 0x04, 0x8B, 0x00, 0x00, 0x00, 0x61, + 0x2C, 0x2C, 0x2C, 0x7F, 0x81, 0x81, 0x81, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x61, 0x65, 0x69, 0xFF, 0x8F, 0x68, 0x44, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0x93, 0x65, 0x3B, 0xFF, + 0x54, 0x59, 0x5D, 0xFF, 0x70, 0x70, 0x6F, 0xFF, 0x50, 0x50, 0x50, 0xFF, + 0x25, 0x25, 0x25, 0xFF, 0x18, 0x20, 0x25, 0xFF, 0x93, 0x58, 0x1D, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xD9, 0x81, 0x28, 0xFF, 0x68, 0x69, 0x69, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xB5, 0xB5, 0xB6, 0xFF, 0x9F, 0x9E, 0x9C, 0xFF, + 0xE9, 0x8D, 0x32, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE8, 0x82, 0x17, 0xF6, + 0x16, 0x07, 0x02, 0x98, 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x49, + 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x08, + 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x20, + 0x00, 0x00, 0x00, 0x33, 0x9B, 0x55, 0x0D, 0xAD, 0xFF, 0x93, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xCF, 0x73, 0x15, 0xE3, + 0x02, 0x02, 0x00, 0x76, 0x00, 0x00, 0x00, 0x54, 0x30, 0x30, 0x30, 0x75, + 0x89, 0x89, 0x89, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x63, 0x63, 0x63, 0xFF, 0xD8, 0x81, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xE6, 0x84, 0x1F, 0xFF, 0x5A, 0x55, 0x4F, 0xFF, 0x64, 0x65, 0x66, 0xFF, + 0x6A, 0x6A, 0x6A, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x25, 0x27, 0x28, 0xFF, + 0x29, 0x27, 0x24, 0xFF, 0xDC, 0x7D, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xB0, 0x74, 0x3A, 0xFF, 0x68, 0x6D, 0x72, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0x9D, 0xA3, 0xA7, 0xFF, 0xD2, 0x8E, 0x51, 0xFF, + 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0x52, 0x2C, 0x04, 0xB2, + 0x00, 0x00, 0x00, 0x74, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x32, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0B, 0x55, 0x55, 0x55, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x30, + 0xAF, 0x61, 0x0E, 0xB6, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xBD, 0x69, 0x12, 0xD3, 0x00, 0x00, 0x00, 0x66, + 0x00, 0x00, 0x00, 0x48, 0x33, 0x33, 0x33, 0x6E, 0x8D, 0x8D, 0x8D, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x95, 0x6D, 0x4A, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xA8, 0x6C, 0x34, 0xFF, + 0x50, 0x57, 0x5C, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x4E, 0x4E, 0x4E, 0xFF, + 0x27, 0x27, 0x27, 0xFF, 0x1E, 0x24, 0x28, 0xFF, 0x68, 0x43, 0x21, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0x8D, 0x69, 0x49, 0xFF, + 0x70, 0x74, 0x77, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xA3, 0xA8, 0xAB, 0xFF, 0xBD, 0x90, 0x69, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0x91, 0x51, 0x0A, 0xCC, 0x00, 0x00, 0x00, 0x7A, + 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x0D, 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x2A, 0xBA, 0x68, 0x10, 0xBA, + 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xAD, 0x60, 0x0C, 0xC4, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x3C, + 0x36, 0x36, 0x36, 0x68, 0x90, 0x90, 0x90, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x78, 0x78, 0x79, 0xFF, + 0x65, 0x66, 0x66, 0xFF, 0xDA, 0x82, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xF2, 0x89, 0x1A, 0xFF, 0x67, 0x57, 0x4A, 0xFF, 0x61, 0x63, 0x65, 0xFF, + 0x6A, 0x6A, 0x6A, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x18, 0x21, 0x27, 0xFF, 0xA6, 0x62, 0x1D, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xF7, 0x8B, 0x18, 0xFF, 0x77, 0x64, 0x54, 0xFF, 0x77, 0x79, 0x7B, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xA7, 0xAB, 0xAE, 0xFF, + 0xAE, 0x92, 0x7B, 0xFF, 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xB9, 0x67, 0x12, 0xDF, 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x5D, + 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0F, + 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x22, 0xBD, 0x6A, 0x10, 0xBA, 0xFF, 0x92, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9D, 0x57, 0x0D, 0xAF, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2F, 0x39, 0x39, 0x39, 0x62, + 0x92, 0x92, 0x92, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x6B, 0x6F, 0x72, 0xFF, 0x8C, 0x6C, 0x4F, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xBC, 0x74, 0x2E, 0xFF, + 0x4F, 0x55, 0x58, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, + 0x28, 0x28, 0x28, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x27, 0x27, 0x25, 0xFF, + 0xD6, 0x79, 0x1B, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xED, 0x87, 0x1D, 0xFF, + 0x69, 0x61, 0x58, 0xFF, 0x7B, 0x7C, 0x7D, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xAA, 0xAD, 0xAE, 0xFF, 0xA3, 0x93, 0x86, 0xFF, + 0xF8, 0x8D, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD6, 0x77, 0x12, 0xEC, + 0x04, 0x04, 0x00, 0x89, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x3E, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x19, + 0xC3, 0x6C, 0x11, 0xBF, 0xFF, 0x96, 0x1B, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x95, 0x19, 0xFF, 0x6E, 0x3A, 0x06, 0x7F, 0x00, 0x00, 0x00, 0x31, + 0x00, 0x00, 0x00, 0x21, 0x3B, 0x3B, 0x3B, 0x5B, 0x95, 0x95, 0x95, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x63, 0x66, 0x69, 0xFF, 0xCD, 0x7E, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFB, 0x8D, 0x18, 0xFF, 0x77, 0x5B, 0x43, 0xFF, 0x5C, 0x60, 0x63, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, + 0x27, 0x29, 0x2B, 0xFF, 0x43, 0x32, 0x24, 0xFF, 0xF2, 0x88, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xE6, 0x85, 0x20, 0xFF, 0x64, 0x60, 0x5B, 0xFF, + 0x7C, 0x7D, 0x7D, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xAC, 0xAE, 0xAF, 0xFF, 0x9E, 0x94, 0x8C, 0xFF, 0xF3, 0x8D, 0x23, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xE5, 0x81, 0x17, 0xF4, 0x0C, 0x05, 0x02, 0x8F, + 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x24, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x13, 0x4D, 0x2A, 0x03, 0x49, + 0xA6, 0x5E, 0x0D, 0x9B, 0xCD, 0x72, 0x13, 0xC0, 0xAE, 0x5F, 0x0E, 0xA6, + 0x17, 0x09, 0x05, 0x38, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x14, + 0x40, 0x40, 0x40, 0x54, 0x98, 0x98, 0x98, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x6F, 0x72, 0x73, 0xFF, 0x7D, 0x68, 0x57, 0xFF, + 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD0, 0x7C, 0x27, 0xFF, + 0x50, 0x52, 0x55, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x54, 0x54, 0x54, 0xFF, + 0x2B, 0x2B, 0x2B, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x22, 0x27, 0x2B, 0xFF, + 0x5F, 0x3F, 0x22, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xE4, 0x83, 0x20, 0xFF, 0x61, 0x5D, 0x5B, 0xFF, 0x7C, 0x7C, 0x7D, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xAD, 0xAE, 0xAF, 0xFF, + 0x9B, 0x94, 0x8E, 0xFF, 0xF0, 0x8D, 0x26, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xEA, 0x83, 0x17, 0xF7, 0x19, 0x0B, 0x04, 0x91, 0x00, 0x00, 0x00, 0x62, + 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x1B, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x09, 0x44, 0x44, 0x44, 0x4F, + 0x9A, 0x9A, 0x9A, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x63, 0x68, 0x6D, 0xFF, 0xB5, 0x77, 0x3A, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0x8B, 0x62, 0x3C, 0xFF, 0x56, 0x5B, 0x5F, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x1E, 0x25, 0x2B, 0xFF, 0x7B, 0x4D, 0x21, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xE5, 0x84, 0x20, 0xFF, + 0x60, 0x5C, 0x58, 0xFF, 0x79, 0x7A, 0x7A, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xAB, 0xAC, 0xAD, 0xFF, 0x99, 0x92, 0x8E, 0xFF, + 0xEE, 0x8C, 0x27, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEE, 0x85, 0x19, 0xF8, + 0x1F, 0x0C, 0x02, 0x92, 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x3F, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x01, 0x47, 0x47, 0x47, 0x4B, 0x9B, 0x9B, 0x9B, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x74, 0x75, 0x75, 0xFF, 0x6B, 0x65, 0x5F, 0xFF, + 0xE9, 0x87, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xE1, 0x82, 0x21, 0xFF, + 0x56, 0x52, 0x4F, 0xFF, 0x67, 0x68, 0x69, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, + 0x2C, 0x2C, 0x2C, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x1E, 0x27, 0x2C, 0xFF, 0x9B, 0x68, 0x38, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xE9, 0x85, 0x1D, 0xFF, 0x61, 0x5A, 0x54, 0xFF, + 0x75, 0x76, 0x77, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xAA, 0xAB, 0xAC, 0xFF, 0x99, 0x91, 0x8B, 0xFF, 0xF1, 0x8C, 0x24, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xEA, 0x82, 0x17, 0xF5, 0x14, 0x07, 0x02, 0x8D, + 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x0F, 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, + 0x42, 0x42, 0x42, 0x49, 0x9C, 0x9C, 0x9C, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x65, 0x65, 0x65, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x39, 0x39, 0x39, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x67, 0x6B, 0x6F, 0xFF, 0x9A, 0x6E, 0x48, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xA0, 0x69, 0x36, 0xFF, 0x50, 0x56, 0x5B, 0xFF, + 0x6D, 0x6C, 0x6C, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x33, 0x3B, 0x40, 0xFF, + 0xBF, 0x89, 0x59, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xF2, 0x89, 0x1A, 0xFF, 0x68, 0x59, 0x4D, 0xFF, 0x6F, 0x70, 0x72, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0x44, 0x44, 0x44, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x39, 0x39, 0x39, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xA7, 0xA8, 0xA9, 0xFF, + 0x9A, 0x8F, 0x86, 0xFF, 0xF4, 0x8C, 0x20, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xE3, 0x7F, 0x15, 0xF1, 0x0B, 0x06, 0x02, 0x86, 0x00, 0x00, 0x00, 0x5B, + 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0E, + 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x8A, 0x8A, 0x8A, 0x48, + 0x9A, 0x9A, 0x9A, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x44, 0x44, 0x44, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x77, 0x77, 0x78, 0xFF, 0x62, 0x64, 0x65, 0xFF, + 0xD5, 0x80, 0x2C, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEF, 0x88, 0x1C, 0xFF, + 0x61, 0x55, 0x49, 0xFF, 0x62, 0x63, 0x65, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x2B, 0x2B, 0x2B, 0xFF, 0x64, 0x6A, 0x6E, 0xFF, 0xCB, 0x94, 0x64, 0xFF, + 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, + 0x76, 0x5B, 0x45, 0xFF, 0x65, 0x68, 0x6B, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0xA4, 0xA4, 0xA4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xA2, 0xA5, 0xA7, 0xFF, 0x9F, 0x8C, 0x7C, 0xFF, + 0xF9, 0x8D, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xD3, 0x76, 0x14, 0xE8, + 0x02, 0x02, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0C, 0x55, 0x55, 0x55, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xCD, 0xCD, 0xCD, 0x48, 0x94, 0x94, 0x94, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x6C, 0x6F, 0x71, 0xFF, 0x80, 0x68, 0x54, 0xFF, 0xFA, 0x8C, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xB8, 0x72, 0x2E, 0xFF, 0x4D, 0x52, 0x57, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x39, 0x39, 0x39, 0xFF, + 0x92, 0x97, 0x9C, 0xFF, 0xC5, 0x93, 0x68, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0x93, 0x64, 0x38, 0xFF, + 0x58, 0x5D, 0x62, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0x3E, 0x3E, 0x3E, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0xD8, 0xD8, 0xD8, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0x9C, 0x9F, 0xA2, 0xFF, 0xA7, 0x89, 0x6F, 0xFF, 0xFE, 0x8D, 0x15, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xB3, 0x62, 0x0E, 0xD7, 0x00, 0x00, 0x00, 0x70, + 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x19, + 0x00, 0x00, 0x00, 0x0A, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x94, 0x94, 0x94, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x61, 0x66, 0x6A, 0xFF, + 0xB8, 0x77, 0x39, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0x74, 0x59, 0x42, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, 0x68, 0x67, 0x67, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x2D, 0x2D, 0x2D, 0xFF, 0x66, 0x66, 0x66, 0xFF, 0xA9, 0xAE, 0xB1, 0xFF, + 0xBC, 0x93, 0x6F, 0xFF, 0xFF, 0x8D, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xBC, 0x72, 0x2A, 0xFF, 0x4D, 0x52, 0x57, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0x94, 0x99, 0x9D, 0xFF, + 0xB8, 0x87, 0x5C, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0x8C, 0x4D, 0x0C, 0xBF, 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x47, + 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x08, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x93, 0x93, 0x93, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x44, 0x44, 0x44, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x72, 0x73, 0x74, 0xFF, 0x6A, 0x64, 0x5D, 0xFF, 0xEA, 0x87, 0x20, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xD1, 0x7C, 0x25, 0xFF, 0x4E, 0x50, 0x51, 0xFF, + 0x68, 0x69, 0x69, 0xFF, 0x55, 0x55, 0x55, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0xAF, 0xB1, 0xB4, 0xFF, 0xB1, 0x96, 0x7E, 0xFF, + 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xEA, 0x85, 0x1C, 0xFF, 0x57, 0x4F, 0x47, 0xFF, 0x65, 0x66, 0x67, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0x8C, 0x91, 0x94, 0xFF, 0xCE, 0x87, 0x45, 0xFF, + 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0x4B, 0x27, 0x03, 0x9D, + 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x93, 0x93, 0x93, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x65, 0x6A, 0x6E, 0xFF, + 0x99, 0x6D, 0x47, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0x8E, 0x62, 0x3A, 0xFF, 0x51, 0x57, 0x5B, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x3E, 0x3E, 0x3E, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xB0, 0xB2, 0xB4, 0xFF, 0xA8, 0x9B, 0x8F, 0xFF, 0xF7, 0x8E, 0x20, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0x92, 0x61, 0x33, 0xFF, 0x4E, 0x54, 0x58, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, + 0x3A, 0x3A, 0x3A, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xA3, 0xA3, 0xA4, 0xFF, + 0x8B, 0x89, 0x87, 0xFF, 0xE7, 0x8A, 0x2C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xE4, 0x7E, 0x15, 0xF0, 0x0C, 0x04, 0x02, 0x7B, 0x00, 0x00, 0x00, 0x52, + 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x92, 0x92, 0x92, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x60, 0x60, 0x60, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x61, 0x63, 0x65, 0xFF, 0xD2, 0x7F, 0x2C, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xE7, 0x84, 0x1D, 0xFF, 0x57, 0x51, 0x4B, 0xFF, + 0x62, 0x63, 0x64, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xB5, 0xB6, 0xB6, 0xFF, + 0xA0, 0x9F, 0x9F, 0xFF, 0xE9, 0x8E, 0x35, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE2, 0x81, 0x1D, 0xFF, + 0x50, 0x4B, 0x46, 0xFF, 0x60, 0x61, 0x62, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x2D, 0x2D, 0x2D, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0x96, 0x99, 0x9C, 0xFF, 0x99, 0x83, 0x70, 0xFF, + 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9E, 0x59, 0x0D, 0xC6, + 0x00, 0x00, 0x00, 0x63, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x2A, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x09, 0x80, 0x80, 0x80, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x92, 0x92, 0x92, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x60, 0x60, 0x60, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x44, 0x44, 0x44, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x6B, 0x6E, 0x70, 0xFF, + 0x7B, 0x66, 0x54, 0xFF, 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xAC, 0x6D, 0x31, 0xFF, 0x4A, 0x51, 0x57, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x4E, 0x4E, 0x4E, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xB9, 0xB9, 0xBA, 0xFF, 0xA2, 0xA7, 0xAA, 0xFF, + 0xD3, 0x91, 0x54, 0xFF, 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAC, 0x6A, 0x2A, 0xFF, + 0x43, 0x4B, 0x4F, 0xFF, 0x68, 0x69, 0x69, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, + 0x88, 0x8E, 0x91, 0xFF, 0xBD, 0x83, 0x4F, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFA, 0x8C, 0x18, 0xFC, 0x3A, 0x21, 0x04, 0x8D, 0x00, 0x00, 0x00, 0x54, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x91, 0x91, 0x91, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x60, 0x60, 0x60, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x60, 0x65, 0x69, 0xFF, 0xB1, 0x74, 0x3A, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0x6B, 0x56, 0x43, 0xFF, + 0x59, 0x5B, 0x5D, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x64, 0x64, 0x64, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xA9, 0xAD, 0xB0, 0xFF, 0xB7, 0x96, 0x7A, 0xFF, + 0xFF, 0x8D, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x83, 0x5A, 0x35, 0xFF, + 0x48, 0x4F, 0x54, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x2D, 0x2D, 0x2D, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0x9B, 0x9C, 0x9C, 0xFF, 0x85, 0x82, 0x7F, 0xFF, + 0xE8, 0x89, 0x29, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xB3, 0x65, 0x10, 0xD1, + 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x2C, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x04, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x90, 0x90, 0x90, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x60, 0x60, 0x60, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x71, 0x72, 0x72, 0xFF, + 0x65, 0x62, 0x5F, 0xFF, 0xE5, 0x85, 0x23, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xCB, 0x79, 0x27, 0xFF, 0x4A, 0x4E, 0x51, 0xFF, 0x66, 0x67, 0x67, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xB3, 0xB4, 0xB4, 0xFF, 0xA4, 0x9E, 0x9A, 0xFF, 0xEF, 0x8E, 0x2D, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x89, 0x1A, 0xFF, 0x72, 0x54, 0x39, 0xFF, + 0x4C, 0x51, 0x56, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x27, 0x27, 0x27, 0xFF, + 0x27, 0x27, 0x27, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x29, 0x29, 0x29, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, + 0x88, 0x8D, 0x90, 0xFF, 0xA6, 0x7E, 0x5C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xF3, 0x88, 0x18, 0xF8, 0x35, 0x1C, 0x06, 0x87, 0x00, 0x00, 0x00, 0x50, + 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x07, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x90, 0x90, 0x90, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x42, 0x42, 0x42, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x65, 0x69, 0x6D, 0xFF, 0x8E, 0x6A, 0x49, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0x89, 0x60, 0x3A, 0xFF, + 0x50, 0x55, 0x59, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xA3, 0xA8, 0xAC, 0xFF, 0xCE, 0x92, 0x5C, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xF0, 0x88, 0x1A, 0xFF, 0x76, 0x56, 0x3A, 0xFF, + 0x40, 0x47, 0x4D, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, 0x20, 0x20, 0x20, 0xFF, + 0x25, 0x25, 0x25, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x25, 0x25, 0x25, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xAC, 0xAC, 0xAC, 0xFF, 0x96, 0x97, 0x97, 0xFF, 0x7E, 0x7E, 0x7D, 0xFF, + 0xE0, 0x87, 0x2F, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x71, 0x3B, 0xEA, + 0x00, 0x03, 0x03, 0x62, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x28, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x04, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x90, 0x90, 0x90, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x5C, 0x5C, 0x5C, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x40, 0x40, 0x40, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x5D, 0x62, 0x65, 0xFF, 0xC8, 0x7C, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xE5, 0x84, 0x1F, 0xFF, 0x55, 0x4F, 0x4B, 0xFF, 0x5F, 0x60, 0x61, 0xFF, + 0x6F, 0x6F, 0x6F, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x64, 0x64, 0x64, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xAF, 0xB1, 0xB3, 0xFF, + 0xAC, 0x9C, 0x8F, 0xFF, 0xF7, 0x8E, 0x1F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0x87, 0x58, 0x2E, 0xFF, + 0x0A, 0x12, 0x17, 0xFF, 0x15, 0x17, 0x18, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, + 0x22, 0x22, 0x22, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, + 0x7F, 0x85, 0x89, 0xFF, 0xA8, 0x7C, 0x54, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xDA, 0x87, 0x35, 0xFF, 0x6E, 0x6E, 0x6C, 0xE7, 0x07, 0x07, 0x07, 0x4E, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x8F, 0x8F, 0x8F, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x47, 0x47, 0x47, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, + 0x48, 0x48, 0x48, 0xFF, 0x55, 0x55, 0x55, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x6C, 0x6E, 0x6F, 0xFF, 0x71, 0x63, 0x57, 0xFF, + 0xF2, 0x8A, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x6B, 0x2F, 0xFF, + 0x49, 0x50, 0x55, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xA2, 0xA7, 0xAA, 0xFF, + 0xD3, 0x92, 0x55, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x16, 0xFF, 0xA3, 0x5D, 0x14, 0xFF, + 0x24, 0x1E, 0x1A, 0xFF, 0x1B, 0x21, 0x25, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, + 0xAD, 0xAD, 0xAD, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0x9F, 0x9F, 0x9F, 0xFF, 0x88, 0x8A, 0x8C, 0xFF, 0x80, 0x76, 0x6E, 0xFF, + 0xED, 0x89, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xEC, 0x8A, 0x25, 0xFF, 0x8C, 0x7E, 0x73, 0xFF, + 0x7B, 0x7D, 0x81, 0xE4, 0x09, 0x09, 0x09, 0x3B, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x8E, 0x8E, 0x8E, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x60, 0x65, 0x69, 0xFF, 0xA2, 0x6F, 0x41, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xF7, 0x8C, 0x18, 0xFF, 0x6C, 0x55, 0x42, 0xFF, 0x56, 0x59, 0x5B, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xAF, 0xB1, 0xB2, 0xFF, 0xA9, 0x9D, 0x91, 0xFF, + 0xF5, 0x8E, 0x23, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xDB, 0x7F, 0x21, 0xFF, + 0x70, 0x56, 0x3D, 0xFF, 0x4A, 0x50, 0x56, 0xFF, 0x66, 0x67, 0x68, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xAE, 0xAE, 0xAE, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x8C, 0x8C, 0x8D, 0xFF, + 0x73, 0x76, 0x78, 0xFF, 0xCD, 0x82, 0x38, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xF2, 0x8B, 0x1F, 0xFF, + 0x95, 0x7E, 0x6A, 0xFF, 0x8B, 0x8F, 0x92, 0xFF, 0x90, 0x90, 0x90, 0xE1, + 0x0C, 0x0C, 0x0C, 0x2B, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x8D, 0x8D, 0x8D, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x71, 0x72, 0x72, 0xFF, 0x5F, 0x60, 0x60, 0xFF, + 0xD9, 0x81, 0x28, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xCD, 0x7A, 0x25, 0xFF, + 0x49, 0x4D, 0x4F, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x45, 0x45, 0x45, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCE, 0xCE, 0xCE, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xB9, 0xB8, 0xB8, 0xFF, 0xA4, 0xA9, 0xAD, 0xFF, 0xC9, 0x93, 0x63, 0xFF, + 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, + 0xA1, 0x67, 0x2F, 0xFF, 0x4E, 0x4D, 0x4C, 0xFF, 0x57, 0x5B, 0x5F, 0xFF, + 0x6F, 0x6F, 0x6F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xB4, 0xB4, 0xB4, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, + 0x8A, 0x8B, 0x8C, 0xFF, 0x72, 0x76, 0x7A, 0xFF, 0xB9, 0x7C, 0x45, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xF2, 0x8B, 0x20, 0xFF, 0x9B, 0x7F, 0x67, 0xFF, 0x87, 0x8C, 0x90, 0xFF, + 0xA3, 0xA3, 0xA2, 0xFF, 0x9D, 0x9D, 0x9D, 0xDE, 0x09, 0x09, 0x09, 0x1E, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x8C, 0x8C, 0x8C, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x66, 0x6A, 0x6C, 0xFF, 0x7E, 0x65, 0x4F, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0x8C, 0x60, 0x37, 0xFF, 0x4D, 0x52, 0x57, 0xFF, + 0x6A, 0x6A, 0x6A, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xB2, 0xB3, 0xB4, 0xFF, 0xA3, 0xA1, 0x9F, 0xFF, 0xE6, 0x8F, 0x3A, 0xFF, + 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xD4, 0x7B, 0x21, 0xFF, 0x6D, 0x54, 0x3D, 0xFF, 0x49, 0x4F, 0x54, 0xFF, + 0x62, 0x63, 0x64, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0xA8, 0xA8, 0xA8, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xAF, 0xAF, 0xAF, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x85, 0x87, 0x88, 0xFF, 0x72, 0x75, 0x78, 0xFF, + 0xB6, 0x7C, 0x47, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xEC, 0x8A, 0x26, 0xFF, 0x97, 0x80, 0x6D, 0xFF, + 0x89, 0x8E, 0x91, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0xA7, 0xA7, 0xA7, 0xDD, 0x0C, 0x0C, 0x0C, 0x15, 0x00, 0x00, 0x00, 0x04, + 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x74, 0x75, 0x75, 0xFF, 0x5B, 0x62, 0x66, 0xFF, + 0xB5, 0x75, 0x37, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xE9, 0x85, 0x1D, 0xFF, + 0x56, 0x4E, 0x47, 0xFF, 0x5B, 0x5C, 0x5D, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xAA, 0xAE, 0xB0, 0xFF, 0xB0, 0x9B, 0x88, 0xFF, 0xF9, 0x8E, 0x1D, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xF6, 0x8B, 0x18, 0xFF, 0xA2, 0x66, 0x2E, 0xFF, 0x4D, 0x49, 0x47, 0xFF, + 0x4C, 0x52, 0x57, 0xFF, 0x62, 0x64, 0x65, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x7C, 0x7F, 0x82, 0xFF, + 0x74, 0x73, 0x71, 0xFF, 0xC3, 0x7F, 0x3E, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xDF, 0x89, 0x34, 0xFF, + 0x91, 0x83, 0x77, 0xFF, 0x8D, 0x91, 0x94, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xAF, 0xAF, 0xAF, 0xDC, + 0x11, 0x11, 0x11, 0x0F, 0x00, 0x00, 0x00, 0x01, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x6D, 0x6E, 0x6F, 0xFF, 0x64, 0x5F, 0x5B, 0xFF, 0xE6, 0x86, 0x22, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xB2, 0x6E, 0x2C, 0xFF, 0x47, 0x4D, 0x52, 0xFF, + 0x64, 0x64, 0x64, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x55, 0x55, 0x55, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x41, 0x41, 0x41, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xA5, 0xA9, 0xAD, 0xFF, 0xC2, 0x95, 0x6F, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xDC, 0x7F, 0x1E, 0xFF, 0x90, 0x5F, 0x32, 0xFF, + 0x57, 0x4E, 0x45, 0xFF, 0x4A, 0x50, 0x55, 0xFF, 0x59, 0x5D, 0x61, 0xFF, + 0x6A, 0x6B, 0x6B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x79, 0x79, 0x7A, 0xFF, + 0x6A, 0x6F, 0x74, 0xFF, 0x81, 0x6F, 0x60, 0xFF, 0xDA, 0x84, 0x2F, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0xC3, 0x86, 0x4E, 0xFF, 0x89, 0x87, 0x85, 0xFF, 0x93, 0x96, 0x98, 0xFF, + 0xA6, 0xA6, 0xA5, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB3, 0xB3, 0xB3, 0xDB, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x62, 0x66, 0x69, 0xFF, + 0x8D, 0x68, 0x48, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0x71, 0x56, 0x3F, 0xFF, 0x51, 0x56, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x45, 0x45, 0x45, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x5B, 0x5B, 0x5B, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xA2, 0xA6, 0xA9, 0xFF, 0xCF, 0x93, 0x5D, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xEB, 0x86, 0x1C, 0xFF, + 0xB8, 0x71, 0x2A, 0xFF, 0x7D, 0x5A, 0x3C, 0xFF, 0x55, 0x50, 0x4C, 0xFF, + 0x4D, 0x52, 0x57, 0xFF, 0x58, 0x5B, 0x5D, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x5A, 0x5F, 0x62, 0xFF, 0x5B, 0x5C, 0x5C, 0xFF, 0xA1, 0x70, 0x43, 0xFF, + 0xF2, 0x8A, 0x1D, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xE2, 0x89, 0x31, 0xFF, 0x9F, 0x84, 0x6C, 0xFF, 0x88, 0x8D, 0x90, 0xFF, + 0x9B, 0x9D, 0x9D, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xB2, 0xB2, 0xB2, 0xDA, 0x66, 0x66, 0x66, 0x0A, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x59, 0x5F, 0x62, 0xFF, 0xC4, 0x7A, 0x30, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xD5, 0x7D, 0x22, 0xFF, 0x49, 0x4B, 0x4C, 0xFF, + 0x5D, 0x5F, 0x5F, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x3A, 0x3A, 0x3A, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB1, 0xB2, 0xB3, 0xFF, + 0xA2, 0xA4, 0xA4, 0xFF, 0xD3, 0x93, 0x57, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xE3, 0x83, 0x1D, 0xFF, 0xAB, 0x6B, 0x2D, 0xFF, + 0x66, 0x4F, 0x3B, 0xFF, 0x3D, 0x41, 0x42, 0xFF, 0x70, 0x55, 0x3D, 0xFF, + 0xD1, 0x7C, 0x27, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xEF, 0x8A, 0x20, 0xFF, 0xB1, 0x7D, 0x50, 0xFF, 0x82, 0x80, 0x7E, 0xFF, + 0x8C, 0x90, 0x93, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xB3, 0xB3, 0xB3, 0xDA, + 0xE3, 0xE3, 0xE3, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x89, 0x89, 0x89, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x69, 0x6B, 0x6C, 0xFF, + 0x6B, 0x60, 0x55, 0xFF, 0xF0, 0x89, 0x1D, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0x95, 0x63, 0x33, 0xFF, 0x48, 0x4F, 0x54, 0xFF, 0x65, 0x65, 0x65, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB0, 0xB1, 0xB2, 0xFF, + 0xA1, 0xA3, 0xA5, 0xFF, 0xCF, 0x93, 0x5C, 0xFF, 0xFF, 0x8D, 0x10, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, + 0xD4, 0x7A, 0x1E, 0xFF, 0xF7, 0x8A, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, + 0xF6, 0x8B, 0x1A, 0xFF, 0xB5, 0x74, 0x34, 0xFF, 0x73, 0x67, 0x5D, 0xFF, + 0x70, 0x75, 0x79, 0xFF, 0x8A, 0x8A, 0x8B, 0xFF, 0x9D, 0x9C, 0x9C, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xB5, 0xB5, 0xB5, 0xDA, 0xE3, 0xE3, 0xE3, 0x09, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x5C, 0x62, 0x67, 0xFF, 0x9C, 0x6C, 0x41, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF0, 0x88, 0x1A, 0xFF, 0x5C, 0x4E, 0x42, 0xFF, + 0x56, 0x58, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x61, 0x61, 0x61, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB0, 0xB1, 0xB2, 0xFF, + 0xA1, 0xA5, 0xA7, 0xFF, 0xC4, 0x94, 0x6B, 0xFF, 0xF9, 0x8E, 0x1D, 0xFF, + 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xF1, 0x88, 0x18, 0xFF, 0xB1, 0x69, 0x20, 0xFF, 0x5E, 0x48, 0x35, 0xFF, + 0x43, 0x49, 0x4E, 0xFF, 0x5E, 0x61, 0x62, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xB4, 0xB4, 0xB4, 0xDA, 0xE3, 0xE3, 0xE3, 0x09, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x6E, 0x6E, 0x6F, 0xFF, + 0x5A, 0x5C, 0x5D, 0xFF, 0xD3, 0x7E, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xC2, 0x74, 0x27, 0xFF, 0x45, 0x4A, 0x4E, 0xFF, 0x60, 0x60, 0x60, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x52, 0x52, 0x52, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x49, 0x49, 0x49, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xA3, 0xA8, 0xAB, 0xFF, 0xB0, 0x99, 0x85, 0xFF, 0xE8, 0x8E, 0x36, 0xFF, + 0xFF, 0x8D, 0x0F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xD6, 0x7A, 0x19, 0xFF, + 0x4F, 0x37, 0x22, 0xFF, 0x21, 0x2C, 0x32, 0xFF, 0x3F, 0x42, 0x45, 0xFF, + 0x58, 0x58, 0x58, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, 0xAD, 0xAD, 0xAD, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xAF, 0xAF, 0xAF, 0xDA, + 0xAA, 0xAA, 0xAA, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x87, 0x87, 0x87, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x64, 0x67, 0x69, 0xFF, 0x76, 0x61, 0x4F, 0xFF, + 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0x85, 0x5C, 0x37, 0xFF, + 0x4A, 0x50, 0x54, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, + 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB6, 0xB5, 0xB5, 0xFF, + 0xA7, 0xAB, 0xAE, 0xFF, 0xA0, 0x9E, 0x9B, 0xFF, 0xCA, 0x92, 0x5E, 0xFF, + 0xF9, 0x8E, 0x1D, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, + 0xB2, 0x69, 0x20, 0xFF, 0x56, 0x45, 0x33, 0xFF, 0x3D, 0x45, 0x49, 0xFF, + 0x58, 0x5A, 0x5B, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, + 0xB1, 0xB1, 0xB1, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB2, 0xB2, 0xB2, 0xDA, 0x17, 0x17, 0x17, 0x0B, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x87, 0x87, 0x87, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x59, 0x5F, 0x64, 0xFF, 0xAB, 0x70, 0x39, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xE9, 0x85, 0x1D, 0xFF, 0x53, 0x4C, 0x45, 0xFF, 0x57, 0x58, 0x59, 0xFF, + 0x6A, 0x6A, 0x6A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x3D, 0x3D, 0x3D, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xAD, 0xAE, 0xAF, 0xFF, 0x9C, 0xA0, 0xA4, 0xFF, 0xA5, 0x91, 0x80, 0xFF, + 0xDA, 0x8B, 0x3F, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, + 0xF2, 0x88, 0x1A, 0xFF, 0xA7, 0x67, 0x2A, 0xFF, 0x56, 0x4C, 0x42, 0xFF, + 0x4C, 0x51, 0x57, 0xFF, 0x65, 0x66, 0x66, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xAD, 0xAD, 0xAD, 0xDB, 0x12, 0x12, 0x12, 0x0E, 0x00, 0x00, 0x00, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x86, 0x86, 0x86, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x6B, 0x6B, 0x6C, 0xFF, 0x5E, 0x5B, 0x59, 0xFF, + 0xE0, 0x83, 0x24, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xB6, 0x70, 0x2A, 0xFF, + 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x60, 0x5F, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xA8, 0xA8, 0xA8, 0xFF, 0x97, 0x9A, 0x9C, 0xFF, 0x86, 0x88, 0x89, 0xFF, + 0xA4, 0x7D, 0x5C, 0xFF, 0xE4, 0x87, 0x27, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xE9, 0x85, 0x1C, 0xFF, 0x97, 0x63, 0x32, 0xFF, + 0x50, 0x4D, 0x4B, 0xFF, 0x52, 0x57, 0x5B, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xA5, 0xA5, 0xA5, 0xDC, + 0x0C, 0x0C, 0x0C, 0x15, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x85, 0x85, 0x85, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x60, 0x63, 0x66, 0xFF, 0x82, 0x63, 0x48, 0xFF, 0xFD, 0x8E, 0x17, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0x79, 0x57, 0x39, 0xFF, 0x4C, 0x50, 0x54, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x87, 0x88, 0x88, 0xFF, 0x6E, 0x73, 0x77, 0xFF, + 0x66, 0x63, 0x5F, 0xFF, 0x9E, 0x69, 0x3B, 0xFF, 0xE4, 0x83, 0x1F, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xDC, 0x7F, 0x1F, 0xFF, + 0x83, 0x5B, 0x38, 0xFF, 0x4B, 0x4D, 0x4F, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0xA1, 0xA1, 0xA1, 0xFF, 0x9A, 0x9A, 0x9A, 0xDE, 0x08, 0x08, 0x08, 0x1F, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x85, 0x85, 0x85, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x56, 0x5B, 0x60, 0xFF, + 0xBB, 0x76, 0x33, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xE2, 0x82, 0x1F, 0xFF, + 0x4D, 0x49, 0x46, 0xFF, 0x58, 0x58, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x63, 0x63, 0x63, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xA6, 0xA6, 0xA6, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x68, 0x6B, 0x6D, 0xFF, 0x51, 0x59, 0x5D, 0xFF, + 0x59, 0x51, 0x4B, 0xFF, 0xB2, 0x6F, 0x2C, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xC7, 0x77, 0x25, 0xFF, 0x69, 0x54, 0x40, 0xFF, 0x4C, 0x51, 0x56, 0xFF, + 0x65, 0x66, 0x67, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x8A, 0x8A, 0x8A, 0xE1, 0x0B, 0x0B, 0x0B, 0x2F, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, + 0x84, 0x84, 0x84, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x67, 0x68, 0x69, 0xFF, 0x63, 0x5B, 0x55, 0xFF, 0xEB, 0x87, 0x1F, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x6A, 0x2B, 0xFF, 0x42, 0x48, 0x4E, 0xFF, + 0x5F, 0x5F, 0x5F, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x74, 0x77, 0x7A, 0xFF, 0x64, 0x69, 0x6C, 0xFF, + 0x7B, 0x67, 0x56, 0xFF, 0xBA, 0x76, 0x36, 0xFF, 0xF1, 0x89, 0x1D, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xF5, 0x8A, 0x18, 0xFF, 0xA6, 0x69, 0x2F, 0xFF, 0x53, 0x4E, 0x4C, 0xFF, + 0x5A, 0x5D, 0x61, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xE5, + 0x08, 0x08, 0x08, 0x43, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x19, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x83, 0x83, 0x83, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x5A, 0x60, 0x63, 0xFF, + 0x90, 0x67, 0x42, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0x6F, 0x52, 0x3A, 0xFF, 0x4D, 0x50, 0x54, 0xFF, 0x64, 0x64, 0x64, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x51, 0x51, 0x51, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xAE, 0xAE, 0xAE, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x77, 0x7A, 0x7D, 0xFF, 0x67, 0x6C, 0x6F, 0xFF, + 0x83, 0x6B, 0x58, 0xFF, 0xC5, 0x7C, 0x35, 0xFF, 0xF7, 0x8C, 0x1A, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xEE, 0x8B, 0x23, 0xFF, + 0xB0, 0x7D, 0x51, 0xFF, 0x9C, 0x7C, 0x5F, 0xFF, 0xD2, 0x87, 0x40, 0xFF, + 0xF6, 0x8D, 0x1F, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xD8, 0x7E, 0x21, 0xFF, 0x67, 0x54, 0x42, 0xFF, + 0x54, 0x59, 0x5D, 0xFF, 0x62, 0x62, 0x62, 0xE9, 0x06, 0x06, 0x06, 0x5B, + 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x18, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC6, 0xC6, 0xC6, 0x48, 0x83, 0x83, 0x83, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x59, 0x5C, 0xFF, 0xC9, 0x7A, 0x2C, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xDA, 0x7E, 0x21, 0xFF, 0x47, 0x47, 0x46, 0xFF, + 0x58, 0x58, 0x59, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x49, 0x49, 0x49, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x48, 0x48, 0x48, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xB4, 0xB4, 0xB4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x7E, 0x80, 0x81, 0xFF, 0x69, 0x6E, 0x71, 0xFF, + 0x80, 0x6B, 0x59, 0xFF, 0xC5, 0x7C, 0x34, 0xFF, 0xF9, 0x8C, 0x18, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xF9, 0x8D, 0x1A, 0xFF, + 0xC4, 0x84, 0x49, 0xFF, 0x8A, 0x7F, 0x77, 0xFF, 0x80, 0x85, 0x8A, 0xFF, + 0x88, 0x8C, 0x8F, 0xFF, 0x8A, 0x8E, 0x90, 0xFF, 0x9C, 0x8E, 0x82, 0xFF, + 0xC2, 0x8D, 0x5D, 0xFF, 0xEB, 0x8D, 0x2E, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xEB, 0x86, 0x1C, 0xFF, 0x79, 0x59, 0x3F, 0xFF, + 0x43, 0x49, 0x4D, 0xED, 0x02, 0x02, 0x02, 0x76, 0x00, 0x00, 0x00, 0x54, + 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, + 0x82, 0x82, 0x82, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x62, 0x65, 0x66, 0xFF, + 0x6B, 0x5C, 0x4F, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xA0, 0x65, 0x2E, 0xFF, 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x39, 0x39, 0x39, 0xFF, + 0x3E, 0x3E, 0x3E, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, + 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, + 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, + 0x3D, 0x3D, 0x3D, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, + 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, + 0x3B, 0x3B, 0x3B, 0xFF, 0x36, 0x37, 0x37, 0xFF, 0x2B, 0x31, 0x36, 0xFF, + 0x52, 0x45, 0x3A, 0xFF, 0xB9, 0x76, 0x37, 0xFF, 0xF7, 0x8C, 0x1A, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, + 0xDD, 0x87, 0x32, 0xFF, 0x98, 0x7F, 0x6B, 0xFF, 0x82, 0x87, 0x8B, 0xFF, + 0x92, 0x94, 0x95, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0xA1, 0xA3, 0xA5, 0xFF, 0x99, 0x9F, 0xA2, 0xFF, + 0x9B, 0x97, 0x93, 0xFF, 0xB7, 0x90, 0x6F, 0xFF, 0xE2, 0x8D, 0x3A, 0xFF, + 0xFE, 0x8D, 0x15, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xF6, 0x8C, 0x1B, 0xFF, 0x79, 0x54, 0x31, 0xF1, + 0x00, 0x00, 0x04, 0x90, 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x52, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x81, 0x81, 0x81, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x56, 0x5C, 0x61, 0xFF, 0xA0, 0x6B, 0x3B, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, 0x64, 0x4F, 0x3C, 0xFF, + 0x4E, 0x51, 0x54, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x2C, 0x2C, 0x2C, 0xFF, 0x28, 0x28, 0x28, 0xFF, 0x1D, 0x20, 0x22, 0xFF, + 0x17, 0x1A, 0x1D, 0xFF, 0x7C, 0x4A, 0x17, 0xFF, 0xE5, 0x80, 0x14, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFA, 0x8D, 0x18, 0xFF, 0xB7, 0x7F, 0x4B, 0xFF, 0x7E, 0x7E, 0x7D, 0xFF, + 0x8A, 0x8E, 0x90, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, + 0xAE, 0xAE, 0xAE, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xA9, 0xAA, 0xAB, 0xFF, + 0x9E, 0xA3, 0xA7, 0xFF, 0x99, 0x9A, 0x9A, 0xFF, 0xB0, 0x91, 0x76, 0xFF, + 0xDE, 0x8D, 0x3F, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xF2, 0x89, 0x17, 0xFB, 0x4E, 0x29, 0x05, 0xBA, + 0x00, 0x00, 0x00, 0x87, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x4D, + 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC3, 0xC3, 0xC3, 0x48, 0x81, 0x81, 0x81, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x84, 0x84, 0x84, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x57, 0x58, 0x58, 0xFF, 0xD8, 0x7F, 0x26, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xD0, 0x7A, 0x22, 0xFF, 0x44, 0x45, 0x47, 0xFF, 0x58, 0x59, 0x59, 0xFF, + 0x69, 0x69, 0x69, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x18, 0x1E, 0x22, 0xFF, 0x37, 0x29, 0x1E, 0xFF, 0xBD, 0x6C, 0x1A, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xF0, 0x8A, 0x20, 0xFF, 0x98, 0x78, 0x5C, 0xFF, + 0x79, 0x7F, 0x83, 0xFF, 0x90, 0x91, 0x92, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, + 0xAC, 0xAC, 0xAC, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xAC, 0xAD, 0xAD, 0xFF, 0xA0, 0xA4, 0xA8, 0xFF, 0x98, 0x9B, 0x9C, 0xFF, + 0xAF, 0x91, 0x77, 0xFF, 0xE1, 0x8D, 0x3B, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xEA, 0x83, 0x17, 0xF7, 0x33, 0x19, 0x03, 0xAE, + 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x63, 0x00, 0x00, 0x00, 0x45, + 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, + 0x80, 0x80, 0x80, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x5D, 0x61, 0x63, 0xFF, 0x78, 0x5F, 0x49, 0xFF, + 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x93, 0x61, 0x31, 0xFF, + 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x29, 0x29, 0x29, 0xFF, 0x17, 0x1E, 0x24, 0xFF, 0x4F, 0x35, 0x1E, 0xFF, + 0xDF, 0x7E, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xEE, 0x89, 0x20, 0xFF, + 0x89, 0x73, 0x61, 0xFF, 0x7A, 0x7F, 0x83, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0xA3, 0xA3, 0xA3, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xAC, 0xAD, 0xAD, 0xFF, 0xA0, 0xA4, 0xA7, 0xFF, + 0x98, 0x99, 0x9A, 0xFF, 0xB5, 0x8F, 0x6F, 0xFF, 0xEB, 0x8D, 0x2E, 0xFF, + 0xFF, 0x8E, 0x10, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xCC, 0x71, 0x11, 0xEB, 0x0A, 0x05, 0x02, 0x9D, + 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x3C, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7F, 0x7F, 0x7F, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, + 0x52, 0x59, 0x5D, 0xFF, 0xB1, 0x71, 0x34, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xF2, 0x89, 0x1A, 0xFF, 0x5B, 0x4C, 0x3D, 0xFF, 0x4F, 0x51, 0x54, 0xFF, + 0x64, 0x64, 0x64, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x2C, 0x2C, 0x2C, 0xFF, 0x28, 0x28, 0x28, 0xFF, 0x17, 0x1E, 0x24, 0xFF, + 0x57, 0x3A, 0x1E, 0xFF, 0xEB, 0x85, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xF1, 0x8A, 0x1D, 0xFF, 0x8A, 0x71, 0x5C, 0xFF, 0x78, 0x7D, 0x81, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xAB, 0xAB, 0xAC, 0xFF, + 0x9D, 0xA2, 0xA6, 0xFF, 0x9B, 0x96, 0x92, 0xFF, 0xC7, 0x8E, 0x5B, 0xFF, + 0xF8, 0x8D, 0x1D, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0x97, 0x53, 0x0B, 0xD6, 0x00, 0x00, 0x00, 0x8D, + 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x32, + 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x05, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC3, 0xC3, 0xC3, 0x48, 0x7F, 0x7F, 0x7F, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x64, 0x65, 0x66, 0xFF, 0x5B, 0x57, 0x54, 0xFF, + 0xE5, 0x84, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xC6, 0x75, 0x24, 0xFF, + 0x40, 0x45, 0x47, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, + 0x60, 0x60, 0x60, 0xFF, 0x5B, 0x5B, 0x5B, 0xFF, 0x57, 0x57, 0x57, 0xFF, + 0x55, 0x55, 0x55, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x52, 0x52, 0x52, 0xFF, + 0x52, 0x52, 0x52, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x52, 0x52, 0x52, 0xFF, + 0x52, 0x52, 0x52, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x50, 0x50, 0x50, 0xFF, + 0x4E, 0x4E, 0x4E, 0xFF, 0x49, 0x49, 0x49, 0xFF, 0x45, 0x44, 0x44, 0xFF, + 0x33, 0x39, 0x3D, 0xFF, 0x5A, 0x42, 0x2C, 0xFF, 0xEA, 0x84, 0x17, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x93, 0x71, 0x52, 0xFF, + 0x73, 0x78, 0x7C, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xA8, 0xA8, 0xA9, 0xFF, 0x98, 0x9E, 0xA1, 0xFF, 0xA8, 0x91, 0x7E, 0xFF, + 0xE4, 0x8C, 0x37, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFA, 0x8E, 0x18, 0xFD, 0x46, 0x25, 0x04, 0xB5, 0x00, 0x00, 0x00, 0x81, + 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x27, + 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, + 0x7E, 0x7E, 0x7E, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x58, 0x5D, 0x61, 0xFF, 0x86, 0x62, 0x42, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0x88, 0x5B, 0x32, 0xFF, 0x43, 0x49, 0x4E, 0xFF, + 0x5F, 0x5F, 0x5F, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x84, 0x84, 0x84, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x5C, 0x5E, 0x61, 0xFF, 0x60, 0x55, 0x4D, 0xFF, + 0xE4, 0x84, 0x22, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xAF, 0x75, 0x42, 0xFF, 0x6C, 0x71, 0x75, 0xFF, 0x8B, 0x8C, 0x8C, 0xFF, + 0x9F, 0x9F, 0x9F, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xAE, 0xAD, 0xAD, 0xFF, 0xA0, 0xA3, 0xA6, 0xFF, 0x98, 0x96, 0x94, 0xFF, + 0xCD, 0x8D, 0x54, 0xFF, 0xFE, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xC7, 0x70, 0x11, 0xEA, 0x03, 0x02, 0x00, 0x96, 0x00, 0x00, 0x00, 0x72, + 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7D, 0x7D, 0x7D, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x51, 0x57, 0x5A, 0xFF, + 0xC0, 0x76, 0x2E, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xED, 0x86, 0x1C, 0xFF, + 0x53, 0x47, 0x3F, 0xFF, 0x50, 0x51, 0x52, 0xFF, 0x63, 0x63, 0x63, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x63, 0x63, 0x63, 0xFF, + 0x50, 0x52, 0x54, 0xFF, 0xC5, 0x77, 0x2B, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xD6, 0x81, 0x2B, 0xFF, 0x69, 0x69, 0x6A, 0xFF, + 0x82, 0x83, 0x84, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0xA7, 0xA8, 0xA8, 0xFF, 0x96, 0x9A, 0x9E, 0xFF, + 0xB8, 0x8E, 0x6A, 0xFF, 0xF9, 0x8D, 0x1B, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0x6C, 0x3C, 0x07, 0xC2, 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x60, + 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x13, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC3, 0xC3, 0xC3, 0x48, 0x7D, 0x7D, 0x7D, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x61, 0x62, 0x63, 0xFF, 0x63, 0x58, 0x4F, 0xFF, 0xEE, 0x88, 0x1D, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xBC, 0x71, 0x27, 0xFF, 0x3D, 0x44, 0x47, 0xFF, + 0x58, 0x58, 0x58, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x68, 0x68, 0x68, 0xFF, 0x51, 0x57, 0x5B, 0xFF, 0x93, 0x65, 0x3B, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, + 0x84, 0x6A, 0x54, 0xFF, 0x73, 0x77, 0x7A, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0xA4, 0xA4, 0xA4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xA9, 0xAA, 0xAA, 0xFF, 0x97, 0x9D, 0xA0, 0xFF, + 0xAD, 0x8F, 0x74, 0xFF, 0xF5, 0x8D, 0x22, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD6, 0x77, 0x12, 0xEF, + 0x09, 0x03, 0x02, 0x96, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x4D, + 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, + 0x7C, 0x7C, 0x7C, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, + 0x95, 0x67, 0x3D, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0x7C, 0x56, 0x35, 0xFF, 0x45, 0x4A, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x60, 0x61, 0x62, 0xFF, + 0x5F, 0x56, 0x4F, 0xFF, 0xE9, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xBE, 0x78, 0x34, 0xFF, 0x63, 0x69, 0x6D, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xB4, 0xB4, 0xB4, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0x98, 0x9D, 0xA1, 0xFF, + 0xAB, 0x8F, 0x75, 0xFF, 0xF7, 0x8D, 0x1F, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0x5E, 0x32, 0x05, 0xBB, + 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x39, + 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x66, 0x66, 0x66, 0xFF, 0x52, 0x56, 0x58, 0xFF, 0xCE, 0x7B, 0x2A, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xE5, 0x83, 0x1D, 0xFF, 0x4B, 0x45, 0x40, 0xFF, + 0x51, 0x52, 0x54, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x69, 0x69, 0x69, 0xFF, 0x51, 0x58, 0x5C, 0xFF, 0xA6, 0x6C, 0x37, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, 0xF6, 0x8B, 0x1A, 0xFF, + 0x79, 0x66, 0x55, 0xFF, 0x73, 0x76, 0x78, 0xFF, 0x90, 0x90, 0x90, 0xFF, + 0xA4, 0xA4, 0xA4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0x96, 0x9B, 0x9F, 0xFF, + 0xB2, 0x8D, 0x6B, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xBA, 0x68, 0x10, 0xE1, 0x00, 0x00, 0x00, 0x89, + 0x00, 0x00, 0x00, 0x65, 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x27, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xC3, 0xC3, 0xC3, 0x48, 0x7B, 0x7B, 0x7B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, + 0x4F, 0x4F, 0x4F, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x5D, 0x60, 0x62, 0xFF, + 0x6A, 0x59, 0x4C, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xAF, 0x6B, 0x28, 0xFF, 0x3C, 0x44, 0x48, 0xFF, 0x58, 0x58, 0x58, 0xFF, + 0x67, 0x67, 0x67, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x62, 0x63, 0x64, 0xFF, + 0x5E, 0x57, 0x51, 0xFF, 0xE7, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xC4, 0x79, 0x2F, 0xFF, 0x5E, 0x64, 0x67, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, + 0x5B, 0x5B, 0x5B, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x91, 0x96, 0x9A, 0xFF, + 0xCA, 0x8B, 0x51, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xEE, 0x87, 0x17, 0xF9, 0x20, 0x0E, 0x02, 0x9F, 0x00, 0x00, 0x00, 0x6F, + 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x47, 0x47, 0x47, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, + 0x66, 0x66, 0x66, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, 0x9C, 0x69, 0x3B, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0x71, 0x51, 0x36, 0xFF, + 0x46, 0x4B, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x57, 0x5B, 0x60, 0xFF, 0x8D, 0x64, 0x41, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0x8B, 0x66, 0x47, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x9F, 0x9F, 0x9F, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x5A, 0x5A, 0x5A, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB0, 0xB0, 0xB0, 0xFF, 0xA2, 0xA3, 0xA4, 0xFF, 0x94, 0x90, 0x8C, 0xFF, + 0xEA, 0x8C, 0x2D, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0x65, 0x35, 0x05, 0xBA, 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x54, + 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x36, 0x39, 0x3B, 0xFF, 0xCF, 0x7A, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xDD, 0x7F, 0x1E, 0xFF, 0x45, 0x42, 0x40, 0xFF, 0x51, 0x52, 0x52, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x67, 0x67, 0x68, 0xFF, + 0x52, 0x57, 0x5A, 0xFF, 0xC5, 0x79, 0x2C, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xEA, 0x86, 0x1F, 0xFF, 0x65, 0x5E, 0x58, 0xFF, + 0x75, 0x76, 0x77, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, + 0xB3, 0xB3, 0xB3, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x4F, 0x4F, 0x4F, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0x95, 0x9A, 0x9F, 0xFF, 0xB1, 0x8A, 0x68, 0xFF, + 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xA0, 0x59, 0x0B, 0xD4, + 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x3A, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x79, 0x79, 0x79, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x24, 0x27, 0x29, 0xFF, 0x43, 0x30, 0x20, 0xFF, + 0xF2, 0x88, 0x17, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xA5, 0x67, 0x2D, 0xFF, + 0x3D, 0x45, 0x49, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x6F, 0x6F, 0x6F, 0xFF, 0x62, 0x63, 0x65, 0xFF, 0x64, 0x59, 0x51, 0xFF, + 0xEE, 0x88, 0x1D, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xCA, 0x7A, 0x2B, 0xFF, 0x5A, 0x5F, 0x62, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0xA3, 0xA4, 0xA4, 0xFF, 0x90, 0x8F, 0x8E, 0xFF, 0xE6, 0x8B, 0x31, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xCA, 0x71, 0x13, 0xE7, 0x02, 0x00, 0x00, 0x87, + 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x79, 0x79, 0x79, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x5F, 0x5F, 0x5F, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x1B, 0x22, 0x28, 0xFF, 0x83, 0x4F, 0x1F, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xF9, 0x8C, 0x17, 0xFF, 0x57, 0x3E, 0x25, 0xFF, 0x39, 0x3D, 0x3F, 0xFF, + 0x57, 0x57, 0x57, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x5A, 0x5F, 0x62, 0xFF, 0x82, 0x62, 0x46, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xA8, 0x6D, 0x37, 0xFF, + 0x5C, 0x63, 0x68, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0x9C, 0x9C, 0x9C, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x49, 0x49, 0x49, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x57, 0x57, 0x57, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0x92, 0x97, 0x9C, 0xFF, 0xB9, 0x89, 0x5E, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xE3, 0x7F, 0x17, 0xF3, 0x0C, 0x04, 0x02, 0x91, 0x00, 0x00, 0x00, 0x65, + 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x78, 0x78, 0x78, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x47, 0x47, 0x47, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x1D, 0x21, 0x25, 0xFF, + 0xC3, 0x70, 0x1B, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD0, 0x76, 0x18, 0xFF, + 0x1A, 0x1B, 0x1B, 0xFF, 0x22, 0x22, 0x22, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x66, 0x66, 0x66, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x5A, 0x60, 0xFF, + 0xA9, 0x6E, 0x38, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0x8B, 0x64, 0x42, 0xFF, 0x64, 0x68, 0x6B, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, + 0x68, 0x68, 0x68, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x5D, 0x5D, 0x5D, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0x9D, 0x9F, 0x9F, 0xFF, + 0x98, 0x8A, 0x7E, 0xFF, 0xF7, 0x8D, 0x1F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x88, 0x17, 0xFA, + 0x26, 0x12, 0x02, 0x9A, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x45, + 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x77, 0x77, 0x77, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x62, 0x62, 0x62, 0xFF, + 0x41, 0x44, 0x45, 0xFF, 0x43, 0x35, 0x29, 0xFF, 0xEE, 0x86, 0x19, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0x8B, 0x52, 0x19, 0xFF, 0x10, 0x1A, 0x20, 0xFF, + 0x27, 0x27, 0x28, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, + 0x44, 0x44, 0x44, 0xFF, 0x50, 0x50, 0x50, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, + 0x68, 0x68, 0x68, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x69, 0x69, 0x69, 0xFF, 0x54, 0x59, 0x5C, 0xFF, 0xC8, 0x7A, 0x2C, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFA, 0x8C, 0x18, 0xFF, + 0x78, 0x61, 0x4C, 0xFF, 0x6C, 0x6F, 0x71, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, + 0x39, 0x39, 0x39, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x40, 0x40, 0x40, 0xFF, + 0x6D, 0x6D, 0x6D, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xB1, 0xB1, 0xB1, 0xFF, 0xA3, 0xA4, 0xA4, 0xFF, 0x8D, 0x8F, 0x90, 0xFF, + 0xDD, 0x89, 0x39, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFA, 0x8C, 0x18, 0xFE, 0x3B, 0x1D, 0x03, 0xA1, + 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x29, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x77, 0x77, 0x77, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, + 0x8D, 0x63, 0x3D, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF3, 0x88, 0x18, 0xFF, + 0x40, 0x2C, 0x1A, 0xFF, 0x1D, 0x20, 0x22, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x39, 0x39, 0x39, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, 0x46, 0x46, 0x46, 0xFF, + 0x4F, 0x4F, 0x4F, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, + 0x6D, 0x6D, 0x6D, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x61, 0x62, 0x62, 0xFF, + 0x55, 0x55, 0x55, 0xFF, 0xDA, 0x80, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF1, 0x88, 0x18, 0xFF, 0x4E, 0x40, 0x34, 0xFF, + 0x3D, 0x3F, 0x40, 0xFF, 0x41, 0x41, 0x41, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x56, 0x56, 0x56, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xA7, 0xA7, 0xA7, 0xFF, 0x8D, 0x92, 0x96, 0xFF, 0xC2, 0x87, 0x52, 0xFF, + 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFC, 0x8E, 0x18, 0xFF, 0x48, 0x26, 0x05, 0xA6, 0x00, 0x00, 0x00, 0x69, + 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x76, 0x76, 0x76, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x65, 0x64, 0x64, 0xFF, 0x4E, 0x54, 0x58, 0xFF, 0xBF, 0x76, 0x2E, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xC5, 0x72, 0x1E, 0xFF, 0x1E, 0x22, 0x25, 0xFF, + 0x25, 0x25, 0x25, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x2F, 0x30, 0x31, 0xFF, 0x39, 0x31, 0x2B, 0xFF, + 0xE7, 0x83, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xE5, 0x80, 0x17, 0xFF, 0x26, 0x1D, 0x15, 0xFF, 0x1A, 0x1B, 0x1D, 0xFF, + 0x25, 0x25, 0x25, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x50, 0x50, 0x50, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0xA4, 0xA4, 0xA4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0x92, 0x96, 0x9A, 0xFF, 0xAA, 0x86, 0x67, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0x4B, 0x28, 0x05, 0xA7, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x47, + 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x76, 0x76, 0x76, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x5F, 0x60, 0x61, 0xFF, + 0x5A, 0x54, 0x4F, 0xFF, 0xE8, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0x88, 0x5A, 0x31, 0xFF, 0x3F, 0x45, 0x48, 0xFF, 0x51, 0x51, 0x51, 0xFF, + 0x51, 0x51, 0x51, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x29, 0x2B, 0x2D, 0xFF, 0x42, 0x31, 0x25, 0xFF, 0xEF, 0x87, 0x19, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xDA, 0x7B, 0x17, 0xFF, + 0x1E, 0x1B, 0x18, 0xFF, 0x20, 0x20, 0x21, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x30, 0x30, 0x30, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x40, 0x40, 0x40, 0xFF, + 0x5C, 0x5C, 0x5C, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0x97, 0x99, 0x9B, 0xFF, + 0x9B, 0x86, 0x74, 0xFF, 0xFB, 0x8D, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x42, 0x22, 0x05, 0xA3, + 0x00, 0x00, 0x00, 0x67, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x28, + 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x75, 0x75, 0x75, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x68, 0x68, 0x68, 0xFF, 0x56, 0x5A, 0x5C, 0xFF, 0x7C, 0x5D, 0x42, 0xFF, + 0xFD, 0x8E, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xEC, 0x86, 0x1C, 0xFF, 0x4F, 0x45, 0x3B, 0xFF, + 0x4C, 0x4D, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x47, 0x47, 0x47, 0xFF, + 0x3E, 0x3E, 0x3E, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x28, 0x2B, 0x2D, 0xFF, + 0x49, 0x36, 0x25, 0xFF, 0xF5, 0x8A, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xD4, 0x77, 0x17, 0xFF, 0x17, 0x18, 0x18, 0xFF, + 0x20, 0x20, 0x20, 0xFF, 0x27, 0x27, 0x27, 0xFF, 0x29, 0x29, 0x29, 0xFF, + 0x2C, 0x2C, 0x2C, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x46, 0x46, 0x46, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xAC, 0xAC, 0xAC, 0xFF, 0x99, 0x9B, 0x9D, 0xFF, 0x92, 0x86, 0x7C, 0xFF, + 0xF3, 0x8C, 0x20, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xF9, 0x8B, 0x18, 0xFE, 0x37, 0x1C, 0x03, 0x9D, 0x00, 0x00, 0x00, 0x64, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x75, 0x75, 0x75, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x65, 0x65, 0x65, 0xFF, + 0x4E, 0x54, 0x59, 0xFF, 0xAB, 0x6D, 0x33, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xBA, 0x70, 0x26, 0xFF, 0x3A, 0x40, 0x44, 0xFF, 0x54, 0x54, 0x54, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x6D, 0x6D, 0x6D, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x59, 0x59, 0x59, 0xFF, + 0x4F, 0x4F, 0x4F, 0xFF, 0x47, 0x47, 0x47, 0xFF, 0x40, 0x40, 0x40, 0xFF, + 0x3B, 0x3B, 0x3B, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x24, 0x28, 0x2B, 0xFF, 0x4F, 0x37, 0x24, 0xFF, + 0xF8, 0x8B, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xCF, 0x75, 0x18, 0xFF, 0x18, 0x1A, 0x1B, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, + 0x9B, 0x9C, 0x9D, 0xFF, 0x8B, 0x86, 0x81, 0xFF, 0xED, 0x8B, 0x26, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF5, 0x8A, 0x17, 0xFB, + 0x2C, 0x13, 0x02, 0x95, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x3F, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x74, 0x74, 0x74, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x50, 0x51, 0x52, 0xFF, + 0xD7, 0x7F, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0x79, 0x54, 0x32, 0xFF, + 0x41, 0x46, 0x49, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x65, 0x65, 0x65, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x64, 0x64, 0x64, 0xFF, + 0x5F, 0x5F, 0x5F, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x50, 0x50, 0x50, 0xFF, + 0x42, 0x45, 0x47, 0xFF, 0x61, 0x4B, 0x37, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD1, 0x7A, 0x21, 0xFF, + 0x4C, 0x4E, 0x4F, 0xFF, 0x6E, 0x6F, 0x6F, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0xA4, 0xA4, 0xA4, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, 0x9B, 0x9C, 0x9C, 0xFF, + 0x89, 0x85, 0x82, 0xFF, 0xE9, 0x8A, 0x29, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xE6, 0x80, 0x17, 0xF3, 0x13, 0x06, 0x02, 0x89, + 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x20, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x74, 0x74, 0x74, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x59, 0x5B, 0x5D, 0xFF, 0x69, 0x57, 0x48, 0xFF, 0xF5, 0x8B, 0x1A, 0xFF, + 0xFF, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xE5, 0x82, 0x1D, 0xFF, 0x48, 0x42, 0x3E, 0xFF, 0x4D, 0x4D, 0x4E, 0xFF, + 0x5C, 0x5C, 0x5C, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x63, 0x65, 0x67, 0xFF, + 0x70, 0x60, 0x51, 0xFF, 0xF6, 0x8B, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xD5, 0x7C, 0x24, 0xFF, 0x52, 0x55, 0x56, 0xFF, + 0x72, 0x73, 0x73, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, + 0xAF, 0xAF, 0xAF, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, 0x86, 0x84, 0x82, 0xFF, + 0xE7, 0x8A, 0x2C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xD3, 0x76, 0x14, 0xE8, 0x02, 0x02, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0E, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x73, 0x73, 0x73, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x50, 0x56, 0x59, 0xFF, + 0x92, 0x65, 0x3B, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAF, 0x6B, 0x28, 0xFF, + 0x39, 0x3F, 0x45, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x62, 0x64, 0x65, 0xFF, 0x69, 0x5D, 0x51, 0xFF, + 0xF2, 0x89, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xD9, 0x7D, 0x21, 0xFF, 0x50, 0x51, 0x51, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, + 0x98, 0x99, 0x9A, 0xFF, 0x86, 0x83, 0x7F, 0xFF, 0xE9, 0x8A, 0x27, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xB5, 0x66, 0x0E, 0xD8, + 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x30, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x73, 0x73, 0x73, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x4C, 0x51, 0x55, 0xFF, 0xC2, 0x76, 0x2C, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0x71, 0x51, 0x33, 0xFF, 0x41, 0x46, 0x49, 0xFF, + 0x58, 0x58, 0x58, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x65, 0x65, 0x66, 0xFF, 0x60, 0x5B, 0x57, 0xFF, 0xE7, 0x85, 0x22, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x80, 0x1E, 0xFF, + 0x52, 0x50, 0x4D, 0xFF, 0x6B, 0x6C, 0x6C, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x9C, 0x9C, 0x9C, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x95, 0x96, 0x97, 0xFF, + 0x86, 0x80, 0x7A, 0xFF, 0xEE, 0x8A, 0x25, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0x84, 0x47, 0x05, 0xBC, 0x00, 0x00, 0x00, 0x67, + 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x72, 0x72, 0x72, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x5C, 0x5D, 0x5D, 0xFF, + 0x59, 0x52, 0x4D, 0xFF, 0xE8, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x81, 0x1E, 0xFF, + 0x44, 0x40, 0x3D, 0xFF, 0x4C, 0x4D, 0x4E, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, + 0x67, 0x67, 0x67, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x58, 0x5A, 0x5B, 0xFF, 0xD5, 0x7F, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xEA, 0x85, 0x1A, 0xFF, 0x58, 0x4F, 0x48, 0xFF, + 0x66, 0x68, 0x68, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0xA9, 0xA9, 0xA9, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0x90, 0x92, 0x93, 0xFF, 0x8C, 0x7E, 0x72, 0xFF, + 0xF5, 0x8C, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0x4B, 0x25, 0x03, 0x9D, 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x3F, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x72, 0x72, 0x72, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x54, 0x57, 0x5A, 0xFF, 0x7B, 0x5C, 0x41, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xAC, 0x69, 0x28, 0xFF, 0x37, 0x3F, 0x44, 0xFF, + 0x52, 0x52, 0x51, 0xFF, 0x60, 0x60, 0x60, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x56, 0x5B, 0x60, 0xFF, + 0xBC, 0x77, 0x33, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xF7, 0x8A, 0x17, 0xFF, 0x66, 0x52, 0x40, 0xFF, 0x5E, 0x61, 0x63, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, + 0xB1, 0xB1, 0xB1, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, + 0x8A, 0x8D, 0x8F, 0xFF, 0x96, 0x7C, 0x66, 0xFF, 0xFC, 0x8D, 0x17, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xE3, 0x80, 0x15, 0xF1, 0x10, 0x04, 0x02, 0x7F, + 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x72, 0x72, 0x72, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x62, 0x62, 0x62, 0xFF, + 0x4A, 0x51, 0x56, 0xFF, 0xAB, 0x6D, 0x32, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x16, 0xFF, + 0x72, 0x50, 0x32, 0xFF, 0x40, 0x44, 0x47, 0xFF, 0x56, 0x56, 0x56, 0xFF, + 0x63, 0x63, 0x63, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x59, 0x5F, 0x63, 0xFF, 0x95, 0x6A, 0x42, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0x7E, 0x59, 0x38, 0xFF, 0x55, 0x59, 0x5C, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x80, 0x86, 0x8A, 0xFF, + 0xAB, 0x7D, 0x53, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xA6, 0x5D, 0x0F, 0xCC, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x49, + 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x71, 0x71, 0x71, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x68, 0x68, 0x68, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x4E, 0x4F, 0x4F, 0xFF, + 0xD8, 0x7F, 0x24, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xE5, 0x83, 0x1C, 0xFF, 0x46, 0x40, 0x3B, 0xFF, + 0x49, 0x4B, 0x4C, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, 0x66, 0x66, 0x66, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x61, 0x63, 0x65, 0xFF, 0x72, 0x60, 0x51, 0xFF, 0xF7, 0x8B, 0x1A, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xA4, 0x67, 0x2E, 0xFF, + 0x49, 0x4F, 0x55, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x9D, 0x9D, 0x9D, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x78, 0x7D, 0x81, 0xFF, 0xC9, 0x81, 0x3D, 0xFF, + 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0x53, 0x2A, 0x03, 0x9D, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x71, 0x71, 0x71, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x66, 0x66, 0x66, 0xFF, + 0x56, 0x59, 0x5A, 0xFF, 0x69, 0x56, 0x45, 0xFF, 0xF7, 0x8B, 0x1A, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xBB, 0x6F, 0x24, 0xFF, 0x36, 0x3D, 0x40, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, + 0x5D, 0x5D, 0x5D, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x66, 0x67, 0x67, 0xFF, + 0x59, 0x5B, 0x5C, 0xFF, 0xD4, 0x7F, 0x2B, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xCF, 0x79, 0x22, 0xFF, 0x46, 0x48, 0x4B, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, + 0xAC, 0xAC, 0xAC, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x8B, 0x8C, 0x8D, 0xFF, + 0x7B, 0x76, 0x71, 0xFF, 0xE9, 0x89, 0x25, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, + 0xD2, 0x76, 0x14, 0xE5, 0x07, 0x02, 0x02, 0x72, 0x00, 0x00, 0x00, 0x4E, + 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x71, 0x71, 0x71, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x4C, 0x51, 0x56, 0xFF, + 0x98, 0x66, 0x37, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x8B, 0x5A, 0x2D, 0xFF, + 0x3A, 0x40, 0x45, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0x6A, 0x6A, 0x6A, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x70, 0x70, 0x70, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x58, 0x5D, 0x62, 0xFF, + 0x9B, 0x6C, 0x41, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xF4, 0x8A, 0x18, 0xFF, 0x5E, 0x4C, 0x3D, 0xFF, 0x57, 0x59, 0x5B, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x7D, 0x81, 0x84, 0xFF, 0x97, 0x76, 0x59, 0xFF, + 0xFE, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x6E, 0x3C, 0x08, 0xAA, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x26, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x5D, 0x5D, 0x5D, 0xFF, 0x49, 0x4D, 0x50, 0xFF, 0xCB, 0x79, 0x28, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xF8, 0x8C, 0x18, 0xFF, 0x60, 0x48, 0x35, 0xFF, 0x42, 0x45, 0x48, 0xFF, + 0x56, 0x56, 0x56, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x6C, 0x6C, 0x6C, 0xFF, 0x63, 0x64, 0x65, 0xFF, 0x66, 0x5D, 0x56, 0xFF, + 0xEB, 0x87, 0x20, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0x9C, 0x63, 0x2D, 0xFF, 0x42, 0x4A, 0x4F, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, + 0xAE, 0xAE, 0xAE, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x6F, 0x73, 0x76, 0xFF, 0xCF, 0x81, 0x35, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xDA, 0x79, 0x16, 0xE8, 0x0B, 0x07, 0x02, 0x72, 0x00, 0x00, 0x00, 0x4C, + 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x70, 0x70, 0x70, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x6D, 0x6D, 0x6D, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x57, 0x59, 0x5A, 0xFF, + 0x60, 0x52, 0x47, 0xFF, 0xF1, 0x89, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x80, 0x1E, 0xFF, + 0x41, 0x3E, 0x3B, 0xFF, 0x49, 0x4B, 0x4B, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, + 0x69, 0x68, 0x68, 0xFF, 0x57, 0x5C, 0x62, 0xFF, 0xA8, 0x70, 0x3C, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE3, 0x81, 0x1C, 0xFF, + 0x4A, 0x45, 0x3F, 0xFF, 0x57, 0x58, 0x59, 0xFF, 0x71, 0x71, 0x71, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, + 0xAF, 0xAF, 0xAF, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xB2, 0xB2, 0xB2, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x79, 0x7C, 0x7F, 0xFF, 0x88, 0x70, 0x5B, 0xFF, + 0xF9, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x19, 0xFE, 0x5F, 0x32, 0x06, 0x9E, + 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x24, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xBF, 0xBF, 0xBF, 0x48, 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x4D, 0x52, 0x57, 0xFF, 0x90, 0x63, 0x38, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xBA, 0x6F, 0x24, 0xFF, 0x35, 0x3B, 0x40, 0xFF, + 0x4E, 0x4F, 0x4F, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, + 0x63, 0x64, 0x65, 0xFF, 0x64, 0x5D, 0x57, 0xFF, 0xE7, 0x86, 0x22, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x9A, 0x61, 0x2A, 0xFF, + 0x3D, 0x45, 0x4B, 0xFF, 0x62, 0x62, 0x61, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, + 0xAF, 0xAF, 0xAF, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xB5, 0xB5, 0xB5, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, + 0xA3, 0xA3, 0xA3, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x83, 0x83, 0x84, 0xFF, + 0x6A, 0x6C, 0x6E, 0xFF, 0xD2, 0x80, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xB7, 0x66, 0x10, 0xD1, 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x46, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, + 0x6F, 0x6F, 0x6F, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x6E, 0x6E, 0x6E, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x5D, 0x5D, 0x5F, 0xFF, + 0x49, 0x4E, 0x51, 0xFF, 0xC6, 0x77, 0x28, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0x8C, 0x5A, 0x2C, 0xFF, 0x39, 0x3F, 0x44, 0xFF, 0x52, 0x52, 0x52, 0xFF, + 0x60, 0x60, 0x60, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x69, 0x69, 0x69, 0xFF, + 0x59, 0x5F, 0x62, 0xFF, 0x8F, 0x69, 0x46, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x89, 0x18, 0xFF, 0x61, 0x4B, 0x37, 0xFF, + 0x48, 0x4D, 0x50, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, + 0xAE, 0xAE, 0xAE, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x86, 0x86, 0x86, 0xFF, 0x6A, 0x70, 0x74, 0xFF, 0xA1, 0x72, 0x48, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xE6, 0x82, 0x15, 0xEF, 0x28, 0x13, 0x02, 0x7A, + 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xC1, 0xC1, 0xC1, 0x4A, 0x70, 0x70, 0x70, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x66, 0x66, 0x66, 0xFF, 0x59, 0x5A, 0x5B, 0xFF, 0x5D, 0x51, 0x49, 0xFF, + 0xEE, 0x87, 0x1C, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xF9, 0x8C, 0x18, 0xFF, 0x61, 0x49, 0x33, 0xFF, + 0x42, 0x46, 0x48, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x63, 0x63, 0x63, 0xFF, + 0x6B, 0x6B, 0x6B, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x73, 0x73, 0x73, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x66, 0x67, 0x67, 0xFF, + 0x58, 0x5B, 0x5F, 0xFF, 0xC2, 0x7A, 0x33, 0xFF, 0xFF, 0x91, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xD8, 0x7C, 0x1E, 0xFF, 0x4B, 0x44, 0x3E, 0xFF, + 0x4F, 0x52, 0x54, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, + 0xAD, 0xAD, 0xAD, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, + 0xAF, 0xAF, 0xAF, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x6D, 0x71, 0x75, 0xFF, + 0x80, 0x69, 0x56, 0xFF, 0xF3, 0x8B, 0x1B, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFC, 0x8E, 0x18, 0xFC, + 0x59, 0x30, 0x05, 0x95, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x3A, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xAD, 0xAD, 0xAD, 0x38, 0x5D, 0x5D, 0x5D, 0xE0, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x6C, 0x6C, 0x6C, 0xE2, + 0x6C, 0x6C, 0x6C, 0xE3, 0x66, 0x66, 0x66, 0xE4, 0x5C, 0x5C, 0x5C, 0xE6, + 0x4A, 0x4E, 0x52, 0xE9, 0x84, 0x5B, 0x39, 0xF4, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xE2, 0x81, 0x1C, 0xFD, 0x3E, 0x39, 0x35, 0xF0, 0x44, 0x45, 0x46, 0xEC, + 0x54, 0x54, 0x54, 0xE8, 0x60, 0x60, 0x60, 0xE5, 0x68, 0x68, 0x68, 0xE4, + 0x6D, 0x6D, 0x6D, 0xE3, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, + 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x6C, 0x6C, 0x6C, 0xE3, + 0x6B, 0x6B, 0x6B, 0xE3, 0x66, 0x66, 0x66, 0xE4, 0x5B, 0x5C, 0x60, 0xE5, + 0x5E, 0x56, 0x51, 0xE7, 0xDA, 0x80, 0x24, 0xF5, 0xFF, 0x91, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xC4, 0x74, 0x22, 0xFF, 0x3D, 0x3D, 0x3D, 0xF6, + 0x4B, 0x4C, 0x4D, 0xF2, 0x61, 0x61, 0x61, 0xF0, 0x71, 0x71, 0x71, 0xED, + 0x80, 0x80, 0x80, 0xEA, 0x8D, 0x8D, 0x8D, 0xE8, 0x96, 0x96, 0x96, 0xE6, + 0x9D, 0x9D, 0x9D, 0xE5, 0xA2, 0xA2, 0xA2, 0xE4, 0xA8, 0xA8, 0xA8, 0xE4, + 0xA9, 0xA9, 0xA9, 0xE3, 0xAB, 0xAB, 0xAB, 0xE3, 0xAC, 0xAC, 0xAC, 0xE3, + 0xAD, 0xAD, 0xAD, 0xE3, 0xAE, 0xAE, 0xAE, 0xE2, 0xAF, 0xAF, 0xAF, 0xE2, + 0xAE, 0xAE, 0xAE, 0xE2, 0xAD, 0xAD, 0xAD, 0xE3, 0xAC, 0xAC, 0xAC, 0xE3, + 0xAB, 0xAB, 0xAB, 0xE3, 0xAA, 0xAA, 0xAA, 0xE3, 0xA9, 0xA9, 0xA9, 0xE3, + 0xA4, 0xA4, 0xA4, 0xE4, 0xA0, 0xA0, 0xA0, 0xE5, 0x99, 0x99, 0x99, 0xE6, + 0x91, 0x91, 0x91, 0xE7, 0x87, 0x87, 0x87, 0xE9, 0x7A, 0x7A, 0x7A, 0xEB, + 0x63, 0x66, 0x69, 0xEC, 0x70, 0x61, 0x55, 0xF5, 0xE6, 0x86, 0x23, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0x88, 0x4A, 0x07, 0xAF, 0x00, 0x00, 0x00, 0x55, + 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x18, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x05, 0x80, 0x80, 0x80, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x02, + 0x8E, 0x8E, 0x8E, 0x12, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x33, 0x33, 0x33, 0x14, 0x1D, 0x1D, 0x1D, 0x1A, + 0x0D, 0x0D, 0x0D, 0x26, 0x0D, 0x0D, 0x0D, 0x3A, 0x03, 0x03, 0x03, 0x4F, + 0xA9, 0x5E, 0x12, 0xC1, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xAD, 0x60, 0x0E, 0xD4, + 0x02, 0x02, 0x02, 0x7B, 0x03, 0x03, 0x03, 0x5E, 0x0C, 0x0C, 0x0C, 0x41, + 0x0C, 0x0C, 0x0C, 0x2B, 0x1A, 0x1A, 0x1A, 0x1D, 0x23, 0x23, 0x23, 0x16, + 0x80, 0x80, 0x80, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, + 0x80, 0x80, 0x80, 0x14, 0x24, 0x24, 0x24, 0x15, 0x21, 0x21, 0x21, 0x17, + 0x1A, 0x1A, 0x1A, 0x1D, 0x0D, 0x0D, 0x0D, 0x27, 0x05, 0x0A, 0x0A, 0x32, + 0x3F, 0x21, 0x05, 0x5D, 0xEA, 0x83, 0x17, 0xE8, 0xFF, 0x91, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xB6, 0x67, 0x13, 0xE7, 0x0F, 0x06, 0x04, 0xAC, + 0x02, 0x03, 0x03, 0x93, 0x06, 0x06, 0x06, 0x7E, 0x0A, 0x0A, 0x0A, 0x69, + 0x0C, 0x0C, 0x0C, 0x56, 0x12, 0x12, 0x12, 0x46, 0x16, 0x16, 0x16, 0x3A, + 0x1B, 0x1B, 0x1B, 0x30, 0x1E, 0x1E, 0x1E, 0x2A, 0x1C, 0x1C, 0x1C, 0x24, + 0x1F, 0x1F, 0x1F, 0x21, 0x21, 0x21, 0x21, 0x1F, 0x23, 0x23, 0x23, 0x1D, + 0x24, 0x24, 0x24, 0x1C, 0x24, 0x24, 0x24, 0x1C, 0x24, 0x24, 0x24, 0x1C, + 0x23, 0x23, 0x23, 0x1D, 0x22, 0x22, 0x22, 0x1E, 0x1F, 0x1F, 0x1F, 0x21, + 0x1C, 0x1C, 0x1C, 0x24, 0x1A, 0x1A, 0x1A, 0x27, 0x1C, 0x1C, 0x1C, 0x2E, + 0x18, 0x18, 0x18, 0x36, 0x14, 0x14, 0x14, 0x40, 0x10, 0x10, 0x10, 0x4E, + 0x0B, 0x0B, 0x0B, 0x5F, 0x02, 0x07, 0x07, 0x6E, 0x35, 0x1D, 0x0A, 0x96, + 0xD9, 0x7B, 0x19, 0xEC, 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9A, 0x55, 0x0B, 0xBA, + 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x2B, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x2D, 0x06, 0x03, 0x00, 0x50, 0xDB, 0x7B, 0x14, 0xE2, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0x64, 0x35, 0x04, 0xAE, 0x00, 0x00, 0x00, 0x6A, + 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x20, + 0x47, 0x23, 0x03, 0x5E, 0xEA, 0x85, 0x17, 0xEE, 0xFF, 0x91, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xBC, 0x6A, 0x12, 0xE6, 0x20, 0x0E, 0x02, 0xAA, + 0x00, 0x00, 0x00, 0x8C, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x64, + 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x3C, + 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x69, + 0x48, 0x26, 0x03, 0x99, 0xE1, 0x7F, 0x14, 0xED, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xA4, 0x5B, 0x0D, 0xBF, 0x03, 0x03, 0x00, 0x59, 0x00, 0x00, 0x00, 0x41, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x55, 0x55, 0x55, 0x03, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x33, + 0x39, 0x1E, 0x05, 0x6F, 0xFA, 0x8D, 0x18, 0xFB, 0xFE, 0x8F, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEE, 0x85, 0x19, 0xF8, + 0x22, 0x0F, 0x02, 0x97, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x48, + 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x07, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x1D, + 0x4C, 0x30, 0x16, 0xA5, 0xE5, 0x83, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xDE, 0x7D, 0x16, 0xF3, 0x52, 0x2A, 0x05, 0xBB, + 0x00, 0x00, 0x00, 0x94, 0x00, 0x00, 0x00, 0x84, 0x00, 0x00, 0x00, 0x74, + 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x4B, + 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x35, + 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x2F, + 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x34, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x48, + 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x69, + 0x04, 0x02, 0x02, 0x7C, 0x84, 0x49, 0x0A, 0xBA, 0xF6, 0x8A, 0x17, 0xFA, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0x94, 0x53, 0x09, 0xB3, 0x03, 0x03, 0x00, 0x56, + 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x35, 0x74, 0x40, 0x05, 0x93, + 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xD0, 0x73, 0x12, 0xE9, 0x02, 0x02, 0x00, 0x8C, + 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x28, + 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x07, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x12, 0x03, 0x0B, 0x10, 0x60, + 0x49, 0x37, 0x2B, 0xFF, 0xD0, 0x78, 0x1D, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFB, 0x8E, 0x18, 0xFD, 0xA7, 0x5E, 0x0F, 0xDA, + 0x2B, 0x15, 0x02, 0xA8, 0x00, 0x00, 0x00, 0x8C, 0x00, 0x00, 0x00, 0x80, + 0x00, 0x00, 0x00, 0x75, 0x00, 0x00, 0x00, 0x6B, 0x00, 0x00, 0x00, 0x61, + 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x50, + 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x4D, 0x00, 0x00, 0x00, 0x4D, + 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x58, + 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x65, 0x00, 0x00, 0x00, 0x6C, + 0x02, 0x02, 0x00, 0x7B, 0x59, 0x2F, 0x05, 0xA4, 0xCC, 0x73, 0x13, 0xE3, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xF7, 0x8B, 0x1A, 0xF8, 0x7F, 0x44, 0x08, 0xA1, + 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x2B, + 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x08, + 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x37, 0xA9, 0x5E, 0x0F, 0xB8, 0xFF, 0x93, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xB6, 0x65, 0x10, 0xDC, 0x00, 0x00, 0x00, 0x86, 0x00, 0x00, 0x00, 0x65, + 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x13, + 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0B, 0x07, 0x07, 0x07, 0x24, 0x25, 0x28, 0x2D, 0xE3, + 0x34, 0x30, 0x2B, 0xFF, 0xAA, 0x65, 0x20, 0xFF, 0xFB, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xEE, 0x85, 0x19, 0xF8, + 0xA7, 0x5D, 0x0D, 0xD6, 0x49, 0x27, 0x04, 0xAC, 0x05, 0x04, 0x02, 0x90, + 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x74, + 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x6A, + 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x6A, + 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x78, + 0x28, 0x10, 0x04, 0x8D, 0x73, 0x3F, 0x07, 0xB1, 0xCA, 0x72, 0x13, 0xE1, + 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xD8, 0x7A, 0x14, 0xE1, + 0x4B, 0x26, 0x04, 0x7E, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x38, + 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, 0x04, 0x04, 0x00, 0x3C, + 0xD3, 0x76, 0x14, 0xD6, 0xFF, 0x91, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xC7, 0x6D, 0x13, 0xE2, + 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x40, + 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x06, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x04, 0x25, 0x25, 0x25, 0xA0, 0x2F, 0x30, 0x31, 0xFF, + 0x22, 0x28, 0x2D, 0xFF, 0x6C, 0x47, 0x26, 0xFF, 0xDB, 0x7D, 0x1C, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFC, 0x8D, 0x18, 0xFE, 0xDB, 0x7A, 0x14, 0xED, 0xA6, 0x5C, 0x0D, 0xD1, + 0x77, 0x3F, 0x08, 0xB9, 0x4D, 0x2A, 0x05, 0xA5, 0x34, 0x19, 0x02, 0x98, + 0x27, 0x10, 0x04, 0x91, 0x1D, 0x0B, 0x04, 0x8D, 0x22, 0x0E, 0x04, 0x8E, + 0x2F, 0x17, 0x02, 0x92, 0x46, 0x22, 0x05, 0x9C, 0x65, 0x36, 0x04, 0xAB, + 0x95, 0x51, 0x0B, 0xC2, 0xC4, 0x6E, 0x0F, 0xDD, 0xEF, 0x86, 0x19, 0xF6, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xF7, 0x8A, 0x18, 0xF8, + 0x9E, 0x57, 0x0D, 0xB2, 0x19, 0x0B, 0x03, 0x5D, 0x00, 0x00, 0x00, 0x3E, + 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x1E, 0x1E, 0x0B, 0x04, 0x44, 0xEC, 0x85, 0x14, 0xED, + 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF3, 0x88, 0x18, 0xF8, 0x2C, 0x15, 0x04, 0x85, + 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x23, + 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x14, 0x14, 0x14, 0x4C, 0x34, 0x34, 0x34, 0xFE, 0x31, 0x31, 0x31, 0xFF, + 0x25, 0x2B, 0x2F, 0xFF, 0x32, 0x2F, 0x2B, 0xFF, 0x89, 0x56, 0x22, 0xFC, + 0xE4, 0x80, 0x19, 0xEC, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF7, 0x8B, 0x17, 0xFB, 0xF1, 0x87, 0x18, 0xF8, + 0xEE, 0x85, 0x17, 0xF6, 0xEF, 0x86, 0x19, 0xF8, 0xF5, 0x89, 0x17, 0xFA, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFB, 0x8E, 0x18, 0xFB, + 0xBC, 0x69, 0x0F, 0xC7, 0x41, 0x22, 0x02, 0x72, 0x00, 0x00, 0x00, 0x42, + 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x17, + 0x41, 0x22, 0x06, 0x52, 0xFD, 0x8F, 0x18, 0xFD, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0x98, 0x55, 0x09, 0xB2, 0x00, 0x00, 0x00, 0x47, + 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x14, 0x14, 0x14, 0x0D, + 0x32, 0x32, 0x32, 0xD6, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x2F, 0x30, 0x30, 0xFF, 0x22, 0x29, 0x2F, 0xFE, 0x2A, 0x21, 0x14, 0x8D, + 0x78, 0x42, 0x04, 0x7B, 0xCD, 0x72, 0x11, 0xCD, 0xFC, 0x8E, 0x18, 0xFB, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xEE, 0x86, 0x17, 0xF0, + 0xAB, 0x5F, 0x0F, 0xB9, 0x44, 0x24, 0x07, 0x71, 0x00, 0x00, 0x00, 0x44, + 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x21, + 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x11, 0x4A, 0x27, 0x04, 0x48, + 0xFA, 0x8C, 0x1A, 0xF4, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x95, 0x19, 0xFF, + 0xD6, 0x78, 0x14, 0xD6, 0x04, 0x04, 0x04, 0x3E, 0x00, 0x00, 0x00, 0x28, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x05, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x1A, 0x1A, 0x1A, 0x80, + 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x32, 0x32, 0x32, 0xFF, 0x24, 0x24, 0x26, 0xC5, 0x00, 0x00, 0x00, 0x1F, + 0x05, 0x05, 0x00, 0x31, 0x45, 0x24, 0x03, 0x5D, 0x8C, 0x4C, 0x09, 0x94, + 0xC7, 0x70, 0x10, 0xCA, 0xEF, 0x86, 0x17, 0xEF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFD, 0x8F, 0x18, 0xFD, 0xE7, 0x81, 0x17, 0xE9, 0xBA, 0x69, 0x0E, 0xC3, + 0x6F, 0x3B, 0x07, 0x8A, 0x22, 0x11, 0x03, 0x5A, 0x00, 0x00, 0x00, 0x3D, + 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x16, 0x4A, 0x27, 0x03, 0x4F, + 0xB7, 0x67, 0x0E, 0xB0, 0xDB, 0x7B, 0x16, 0xD5, 0xD9, 0x79, 0x16, 0xD5, + 0xC3, 0x6D, 0x11, 0xC5, 0x93, 0x53, 0x0C, 0x9A, 0x31, 0x1A, 0x03, 0x4E, + 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x12, + 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x65, 0x65, 0x65, 0x26, 0x2F, 0x2F, 0x2F, 0xF3, + 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x35, 0x35, 0x35, 0xFA, 0x0B, 0x0B, 0x0B, 0x45, 0x00, 0x00, 0x00, 0x15, + 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x31, + 0x1F, 0x11, 0x03, 0x49, 0x4E, 0x2A, 0x05, 0x68, 0x7E, 0x43, 0x05, 0x8C, + 0xA3, 0x5A, 0x0D, 0xAC, 0xBD, 0x6A, 0x12, 0xC1, 0xD0, 0x73, 0x14, 0xD4, + 0xE1, 0x7E, 0x14, 0xE2, 0xE5, 0x80, 0x15, 0xE8, 0xE9, 0x82, 0x15, 0xEC, + 0xEE, 0x85, 0x17, 0xEF, 0xEB, 0x83, 0x15, 0xEE, 0xE5, 0x7F, 0x15, 0xE9, + 0xE2, 0x7E, 0x15, 0xE4, 0xD5, 0x77, 0x14, 0xD9, 0xBD, 0x69, 0x12, 0xC4, + 0xA1, 0x59, 0x0D, 0xAE, 0x7A, 0x43, 0x0B, 0x90, 0x47, 0x26, 0x05, 0x6C, + 0x13, 0x0A, 0x03, 0x4F, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x32, + 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x0B, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x1B, + 0x06, 0x06, 0x06, 0x2A, 0x06, 0x06, 0x06, 0x2E, 0x00, 0x00, 0x00, 0x2A, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x32, 0x32, 0x32, 0xA8, 0x36, 0x36, 0x36, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x26, 0x26, 0x26, 0x9C, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1F, + 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x2A, + 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x38, 0x0C, 0x04, 0x04, 0x41, + 0x12, 0x07, 0x04, 0x46, 0x15, 0x0A, 0x03, 0x4A, 0x24, 0x10, 0x03, 0x4E, + 0x1A, 0x0D, 0x03, 0x4D, 0x11, 0x07, 0x03, 0x49, 0x0B, 0x07, 0x04, 0x45, + 0x04, 0x04, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x31, + 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x29, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x19, + 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x16, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x70, 0x70, 0x70, 0x40, 0x2F, 0x2F, 0x2F, 0xFC, 0x37, 0x37, 0x37, 0xFF, + 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xEE, + 0x07, 0x07, 0x07, 0x23, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x13, + 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1C, + 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x24, + 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x22, + 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1B, + 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x07, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0A, + 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x03, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x03, + 0x2B, 0x2B, 0x2B, 0xBD, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x33, 0x33, 0x33, 0x92, + 0x00, 0x00, 0x00, 0x00, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x03, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x08, + 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0D, + 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x11, + 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0F, + 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x04, + 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, + 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, + 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x61, 0x61, 0x61, 0x4C, + 0x30, 0x30, 0x30, 0xFE, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, + 0x34, 0x34, 0x34, 0xFF, 0x3A, 0x3A, 0x3A, 0x92, 0xFF, 0xFF, 0xFF, 0x02, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, + 0x55, 0x55, 0x55, 0x03, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x05, 0x40, 0x40, 0x40, 0x04, 0x55, 0x55, 0x55, 0x03, + 0x55, 0x55, 0x55, 0x03, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, + 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x04, 0x2C, 0x2C, 0x2C, 0xC0, + 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xE9, 0x3C, 0x3C, 0x3C, 0x6B, + 0xFF, 0xFF, 0xFF, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x6A, 0x6A, 0x6A, 0x35, 0x33, 0x33, 0x33, 0x7D, + 0x79, 0x79, 0x79, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, }; diff --git a/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c b/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c index 632f4673a..807f7ec09 100644 --- a/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c +++ b/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c @@ -7,160 +7,347 @@ static const struct { unsigned char pixel_data[32 * 32 * 4 + 1]; } icon_32x32x32 = { 32, 32, 4, - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0q'\17s\377s\0\377q\37\6s\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0JJJ\377\7\7\7!\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0h(\16k\377\214\0\377" - "\356b\16\357\36\27\27!\12\12\12\30%%%)\356b\16\357\315Y\40\316\263I\40\326" - "\245B)\377\203\27\0\204z\16\0{z\16\0{\203\27\0\204z\16\0{\203\27\0\204z\16" - "\0{z\16\0{\203\27\0\204\264I\27\265,\26\15""9\0\0\0\10\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\10\377{\0\377\377\204" - "\0\377%\22\22)\27\27\27!AAARbbb\224jjj\224\377\224\0\377\377\214\0\377\377" - "\224\0\377\377\224\0\377\377\214\0\377\377\224\0\377\377\224\0\377\377\224" - "\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0\377\377\224\0" - "\377\377s\0\377,((9\37\37\37)\0\0\0\0\0\0\0\0,,,9jjj\204jjj\204aaa{jjj\204" - "\2138\40\224\377\224\0\377\377k\0\377bbb\204jjj\234zzz\306zzz\326\203\203" - "\203\316zzz\245\377\224\0\377\377\204\0\377\377s\0\377\377s\0\377\377{\0" - "\377\377s\0\377\377s\0\377\377s\0\377\377{\0\377\377s\0\377\377s\0\377\377" - "s\0\377\377s\0\377\377c\0\377zzz\306rrr\265\0\0\0\0\0\0\0\0jjj\204\234\234" - "\234\377\234\234\234\377\245\245\245\377\357c\30\377\377\224\0\377\367c\0" - "\377\224\224\224\377{{{\377ccc\377sss\377\214\214\214\377\234\234\234\377" - "\234\234\234\377\377\224\0\377\377{\0\377\377s\0\377\377k\0\377\377k\0\377" - "\377s\0\377\377k\0\377\377s\0\377\377k\0\377\377s\0\377\377s\0\377\377s\0" - "\377\377s\0\377\306Z9\377{{{\377rrr\275\0\0\0\0\0\0\0\0bbb\204\234\234\234" - "\377\245\245\245\377\367s\20\377\377\204\0\377\377k\0\377\214\214\214\377" - "kkk\377ZZZ\377{{{\377\224\224\224\377\234\234\234\377\245\245\245\377\224" - "\224\224\377\2559!\377\306\224\204\377\214kk\377kkk\377sss\377sss\377sss" - "\377sss\377sss\377sss\377sss\377\367R\10\377\377k\0\377{{{\377\203\203\203" - "\367XXX\204\0\0\0\0\0\0\0\0jjj\204\245\245\245\377\357c\30\377\377\204\0" - "\377\377s\0\377\224\204\204\377ccc\377ZZZ\377{{{\377\234\234\234\377\245" - "\245\245\377\245\245\245\377\234\234\234\377RRR\377sss\377\306\306\306\377" - "\214\214\214\377\214\214\214\377\214\214\214\377\214\214\214\377\214\214" - "\214\377\224\224\224\377\214\214\214\377\214\214\214\377\224\224\224\377" - "\377c\0\377\357R\30\377\204\204\204\377zzz\326666B\0\0\0\0\0\0\0\0aaa{\306" - "sR\377\377\224\0\377\377{\0\377\316R1\377ccc\377RRR\377JJJ\377{{{\377\234" - "\234\234\377\245\245\245\377\234\234\234\377\224\224\224\377RRR\377\336\336" - "\336\377\336\336\336\377\316\316\316\377\316\316\316\377\224\224\224\377" - "RRR\377\326\326\326\377\326\326\326\377\326\326\326\377\326\326\326\377\326" - "\306\306\377\377k\0\377\306\275\265\377\203\203\203\357jjj\234\25\25\25\30" - "\0\0\0\0\0\0\0\0jbb\204\377\224\0\377\377{\0\377\377k\0\377ccc\377RRR\377" - "kkk\377ccc\377\204\204\204\377\245\245\245\377\245\245\245\377\234\234\234" - "\377ZZZ\377ccc\377\347\347\347\377\347\347\347\377\347\347\347\377\347\347" - "\347\377\224\224\224\377RRR\377\347\347\347\377\336\336\336\377\347\347\347" - "\377\347\347\347\377\367k9\377\377c\0\377\275\275\275\377\203\203\203\347" - "IIIZ\0\0\0\0\0\0\0\0\0\0\0\0\356j\16\357\377\204\0\377\377s\0\377\234R9\377" - "RRR\377ZZZ\377\214\214\214\377ccc\377\204\204\204\377\234\234\234\377\234" - "\234\234\377\245\245\245\377RRR\377\326\326\326\377\347\347\347\377\336\336" - "\336\377\347\347\347\377\336\336\336\377\234\234\234\377JJJ\377\347\347\347" - "\377\347\347\347\377\347\347\347\377\336\336\336\377\377k\0\377\347\224\204" - "\377\234\234\234\377\203\203\203\326\36\36\36!\0\0\0\0\0\0\0\0\0\0\0\10\377" - "\224\0\377\377{\0\377\377k\0\377RRR\377RRR\377sss\377\224\224\224\377\234" - "\234\234\377\245\245\245\377\245\245\245\377\234\234\234\377\214\214\214" - "\377JJJ\377\347\347\347\377\347\347\347\377\347\347\347\377\336\336\336\377" - "\347\347\347\377\347\347\347\377\347\347\347\377\347\347\347\377\347\347" - "\347\377\336\336\336\377\347\275\265\377\377s\0\377\316\316\316\377\214\214" - "\214\377\203\203\203\265\0\0\0\10\0\0\0\0\0\0\0\0\335Y\26\336\377\214\0\377" - "\377s\0\377\316B\30\377JJJ\377ZZZ\377\204\204\204\377\234\234\234\377\245" - "\245\245\377\245\245\245\377\234\234\234\377\245\245\245\377ccc\377kkk\377" - "\347\347\347\377\336\336\336\377\347\347\347\377\347\347\347\377\347\347" - "\347\377\336\336\336\377\336\336\336\377\347\347\347\377\336\336\336\377" - "\347\347\347\377\377c!\377\367c)\377\265\265\265\377\214\214\214\377zzz\224" - "\0\0\0\0\0\0\0\0\0\0\0\0\377\224\0\377\377{\0\377\377k\0\377ZRR\377RRR\377" - "{kk\377\377Z\10\377\377s\0\377\377s\0\377\377s\0\377\357R\30\377\245\245" - "\245\377RRR\377\255\255\255\377\347\347\347\377\336\336\336\377\347\347\347" - "\377\336\336\336\377\347\347\347\377\347\347\347\377\347\347\347\377\347" - "\347\347\377\347\347\347\377\347\347\347\377\377k\0\377\336\316\316\377\234" - "\234\234\377\245\245\245\377yyy\204\0\0\0\0\0\0\0\0\36\27\27!\377\224\0\377" - "\377s\0\377\377k\0\377RRR\377ZRR\377\377k\0\377\316cJ\377\316cJ\377\377\214" - "\0\377\377s\0\377\377s\0\377\377c\0\377RRR\377\326\326\326\377\336\336\336" - "\377\347\347\347\377\347\347\347\377\347\347\347\377\336\336\336\377\347" - "\347\347\377\336\336\336\377\347\347\347\377\336\336\336\377\357\245\224" - "\377\377c\0\377\306\306\306\377\214\214\214\377\275\275\275\377yyy\204\0" - "\0\0\0\0\0\0\0\212(\16\214\377\224\0\377\377k\0\377\377R\0\377RRR\377ccc" - "\377\224\224\224\377\234\234\234\377{{{\377ccc\377\377\214\0\377\377s\0\377" - "\377s\0\377\347B\10\377\316\316\316\377\347\347\347\377\347\347\347\377\347" - "\347\347\377\336\336\336\377\347\347\347\377\347\347\347\377\347\347\347" - "\377\347\347\347\377\347\347\347\377\377R\0\377\357\204c\377\255\255\255" - "\377\224\224\224\377\326\326\326\377zzz{\0\0\0\0\0\0\0\0\335b\26\336\377" - "\214\0\377\377s\0\377\336J\20\377RRR\377kkk\377\224\224\224\377\204\204\204" - "\377kkk\377{{{\377\265ZJ\377\377\214\0\377\377s\0\377\377s\0\377111\377J" - "JJ\377RRR\377JJJ\377RRR\377\347\347\347\377\347\347\347\377\347\347\347\377" - "\336\336\336\377\347\347\347\377\377k\0\377\326\326\326\377\234\234\234\377" - "\255\255\255\377\336\336\336\377yyy\204\0\0\0\0\0\0\0\0\377Z\0\377\377\204" - "\0\377\377k\0\377\275B\30\377JJJ\377{{{\377\234\234\234\377\234\234\234\377" - "\234\234\234\377\234\234\234\377\234\234\234\377\377\224\0\377\377{\0\377" - "\377s\0\377\265B)\377sss\377\224\224\224\377kkk\377ZZZ\377\336\336\336\377" - "\336\336\336\377\347\347\347\377\347\347\347\377\367\224{\377\377Z\10\377" - "\306\306\306\377\214\214\214\377\306\306\306\377\336\336\336\377\203\203" - "\203\204\0\0\0\0\0\0\0\0\377c\0\377\377\204\0\377\377s\0\377\275B!\377RR" - "R\377{{{\377\234\234\234\377\245\245\245\377\234\234\234\377\245\245\245" - "\377\234\234\234\377\377c\0\377\377\214\0\377\377k\0\377\357J\10\377ccc\377" - "\224\224\224\377RRR\377\214\214\214\377\347\347\347\377\347\347\347\377\347" - "\347\347\377\336\336\336\377\377Z\0\377\347\245\234\377\255\255\255\377\234" - "\234\234\377\326\326\326\377\347\347\347\377zzz{\0\0\0\0\0\0\0\0\377c\0\377" - "\377\204\0\377\377s\0\377\316J\30\377RRR\377\204\204\204\377\224\224\224" - "\377kkk\377{{{\377\234\234\234\377\245\245\245\377\347c)\377\377\224\0\377" - "\377s\0\377\377R\0\377RRR\377\204\204\204\377JJJ\377\265\265\265\377\347" - "\347\347\377\336\336\336\377\347\347\347\377\336\336\336\377\377k\0\377J" - "JJ\377\214\214\214\377\265\265\265\377\336\336\336\377\347\347\347\377zz" - "z{\0\0\0\0\0\0\0\0\346b\17\347\377\214\0\377\377k\0\377\347J\10\377ZZZ\377" - "\204\204\204\377\245\245\245\377\214\214\214\377kkk\377kkk\377kkk\377\275" - "J1\377\377\224\0\377\377s\0\377\377Z\0\377JJJ\377sss\377RRR\377\214\214\214" - "\377sss\377ZZZ\377JJJ\377\275B!\377\336J\20\377\255\255\255\377\224\224\224" - "\377\316\316\316\377\336\336\336\377\347\347\347\377zzz{\0\0\0\0\0\0\0\0" - "\2437\27\245\377\214\0\377\377s\0\377\377Z\0\377RRR\377\204\204\204\377\234" - "\234\234\377\245\245\245\377\234\234\234\377\245\245\245\377\234\234\234" - "\377\306ZB\377\377\224\0\377\377s\0\377\367J\0\377111\377RRR\377RRR\377Z" - "ZZ\377sss\377\224\224\224\377\326\326\326\377\377c\0\377\336\326\316\377" - "\245\245\245\377\245\245\245\377\336\336\336\377\347\347\347\377\347\347" - "\347\377zzz{\0\0\0\0\0\0\0\0%\22\22)\377\214\0\377\377s\0\377\377k\0\377" - "RRR\377{{{\377\234\234\234\377\245\245\245\377\234\234\234\377\245\245\245" - "\377\234\234\234\377\326kJ\377\377\214\0\377\377s\0\377\306J!\377RRR\377" - "sss\377JJJ\377\265\265\265\377\336\336\336\377\347\347\347\377\347\326\326" - "\377\377c\0\377\316\316\316\377\224\224\224\377\275\275\275\377\336\336\336" - "\377\347\347\347\377\336\336\336\377zzz{\0\0\0\0\0\0\0\0\0\0\0\0\377\224" - "\0\377\377\204\0\377\377s\0\377kJJ\377kkk\377\234\234\234\377\245\245\245" - "\377\234\234\234\377\245\245\245\377\245\245\245\377\347c)\377\377\214\0" - "\377\377s\0\377cJB\377ZZZ\377{{{\377RRR\377\224\224\224\377\347\347\347\377" - "\347\347\347\377\367c)\377\367\204c\377\275\275\275\377\224\224\224\377\316" - "\316\316\377\347\347\347\377\347\347\347\377\347\347\347\377yyy\204\0\0\0" - "\0\0\0\0\0\0\0\0\0\264@\27\265\377\214\0\377\377s\0\377\357J\10\377kkk\377" - "\224\224\224\377\245\245\245\377\234\234\234\377\245\245\245\377\234\234" - "\234\377\377c\0\377\377\204\0\377\377c\0\377RRR\377ZZZ\377\204\204\204\377" - "ccc\377ccc\377\336\336\336\377\347\347\347\377\377s\0\377\326\326\326\377" - "\245\245\245\377\245\245\245\377\336\336\336\377\336\336\336\377\336\336" - "\336\377\347\347\347\377zzz{\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\10\377\224\0\377" - "\377\204\0\377\377k\0\377kkc\377\245\245\245\377\265\265\265\377\275\275" - "\275\377\265\265\265\377\265\265\265\377\377\224\0\377\377s\0\377\234ZR\377" - "ccc\377kkk\377\245\245\245\377\245\245\245\377RRR\377\357\357\357\377\357" - "\255\234\377\377R\0\377\326\326\326\377\234\234\234\377\326\326\326\377\357" - "\357\357\377\357\357\357\377\367\367\367\377\357\357\357\377zzz{\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0H%\37J\377\214\0\377\377{\0\377\367Z\0\377XXX\204" - "\17\17\17\20\0\0\0\0\0\0\0\0\2128\27\214\377{\0\377\335Q\16\336zzz\326zz" - "z\367bbb\224\17\17\17\20\0\0\0\0RRR\377\0\0\0\0\377Z\0\377W\37\26ZQQQkjj" - "j\234\27\27\27!\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0yA0\204\377\224\0\377\377{\0\377\367Z\10\3776..B\0" - "\0\0\0P\37\17R\377{\0\377\346Y\16\357QQQk\203\203\203\357zzz\316666B\0\0" - "\0\10\0\0\0\0III\336777\234\377s\0\377\27\27\27!rrr\245QQQk\0\0\0\10\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\17\17\17\20YYY{\356Y\7\367\377k\0\377\377k\0\377\377s\0\377\377c\0\377" - "a&\27c%%%)rrr\265zzz\326QQQk\0\0\0\10\0\0\0\0\0\0\0\0\0\0\0\20RRR\377\0\0" - "\0\0""777Jrrr\265$$$1\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\25\25\25\30YYY{zzz\336\203\203" - "\203\357rrr\255IIIZIIIZjjj\245zzz\316QQQk\17\17\17\20\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\10IIIZXXXs\17\17\17\20\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\10\17\17\17\20AAAJbbb\224rrr\275zzz\275jjj\255bbb\214666B\17\17\17" - "\20\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\10\0\0\0\20\17" - "\17\17\20\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" - "\0\0\0\0", -}; + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, 0x03, 0x03, 0x00, + 0x0A, 0x0A, 0x0A, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, + 0x0C, 0x0C, 0x0C, 0x00, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x19, 0x19, 0x19, 0x00, + 0x2C, 0x2C, 0x2C, 0x00, 0x27, 0x27, 0x27, 0x00, 0x1A, 0x1A, 0x1A, 0x00, + 0x13, 0x13, 0x13, 0x00, 0x11, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, + 0x12, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, + 0x12, 0x12, 0x13, 0x00, 0x19, 0x19, 0x1A, 0x00, 0x21, 0x21, 0x22, 0x00, + 0x37, 0x38, 0x38, 0x00, 0x37, 0x38, 0x38, 0x00, 0x37, 0x37, 0x38, 0x00, + 0x1E, 0x1E, 0x1E, 0x00, 0x0F, 0x0F, 0x0F, 0x00, 0x0A, 0x0A, 0x0A, 0x09, + 0x26, 0x26, 0x26, 0x57, 0x1C, 0x1D, 0x1F, 0x07, 0x1A, 0x1D, 0x21, 0x0A, + 0x04, 0x08, 0x0D, 0x11, 0x04, 0x08, 0x0C, 0x12, 0x20, 0x23, 0x26, 0x0C, + 0x25, 0x26, 0x28, 0x05, 0x24, 0x24, 0x24, 0x00, 0x12, 0x12, 0x12, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x2B, 0x2B, 0x2B, 0x03, 0x0A, 0x0C, 0x0E, 0x19, + 0x07, 0x08, 0x08, 0x39, 0x06, 0x06, 0x06, 0x41, 0x06, 0x05, 0x04, 0x42, + 0x06, 0x05, 0x04, 0x44, 0x07, 0x06, 0x04, 0x45, 0x07, 0x06, 0x04, 0x46, + 0x07, 0x06, 0x04, 0x46, 0x06, 0x05, 0x04, 0x45, 0x05, 0x05, 0x04, 0x43, + 0x05, 0x05, 0x05, 0x40, 0x05, 0x06, 0x07, 0x3C, 0x07, 0x09, 0x0C, 0x38, + 0x07, 0x09, 0x0C, 0x37, 0x08, 0x09, 0x0C, 0x35, 0x07, 0x08, 0x09, 0x1E, + 0x16, 0x16, 0x16, 0x00, 0x27, 0x29, 0x2A, 0x86, 0x22, 0x25, 0x29, 0xD5, + 0x1B, 0x0F, 0x03, 0x5B, 0x4C, 0x29, 0x04, 0x8A, 0x66, 0x39, 0x08, 0xA2, + 0x60, 0x36, 0x08, 0x9F, 0x3B, 0x20, 0x02, 0x86, 0x0F, 0x07, 0x00, 0x5C, + 0x00, 0x00, 0x04, 0x2C, 0x17, 0x18, 0x19, 0x0A, 0x26, 0x26, 0x26, 0x00, + 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0F, 0x81, 0x48, 0x0B, 0x9F, 0xC0, 0x6E, 0x11, 0xE1, + 0xC4, 0x6E, 0x12, 0xE6, 0xC7, 0x70, 0x12, 0xE7, 0xC9, 0x71, 0x12, 0xE9, + 0xCA, 0x72, 0x12, 0xE9, 0xCB, 0x73, 0x12, 0xEA, 0xCB, 0x72, 0x12, 0xEA, + 0xC9, 0x71, 0x12, 0xE9, 0xC6, 0x70, 0x12, 0xE7, 0xC2, 0x6D, 0x11, 0xE5, + 0xBC, 0x69, 0x11, 0xE2, 0xB4, 0x63, 0x10, 0xDF, 0xB3, 0x63, 0x10, 0xDE, + 0xBA, 0x69, 0x10, 0xDD, 0x43, 0x23, 0x02, 0x6E, 0x00, 0x06, 0x0C, 0x4D, + 0x33, 0x2E, 0x28, 0xF6, 0x93, 0x55, 0x12, 0xD2, 0xDF, 0x7D, 0x10, 0xEB, + 0xBF, 0x6A, 0x0C, 0xD0, 0x9D, 0x55, 0x08, 0xAF, 0xA7, 0x5B, 0x09, 0xB4, + 0xD1, 0x73, 0x0E, 0xDC, 0xDD, 0x7C, 0x10, 0xF0, 0x80, 0x48, 0x0B, 0xC0, + 0x0A, 0x04, 0x00, 0x5E, 0x0D, 0x0E, 0x0F, 0x13, 0x31, 0x31, 0x31, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x01, 0x00, 0x1D, + 0xCF, 0x74, 0x14, 0xD9, 0xFF, 0x97, 0x1A, 0xFF, 0xFF, 0x93, 0x17, 0xFF, + 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x92, 0x17, 0xFF, + 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x92, 0x17, 0xFF, + 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x93, 0x16, 0xFF, 0xFF, 0x93, 0x17, 0xFF, + 0xFF, 0x94, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFA, 0x8F, 0x1A, 0xFF, + 0x3D, 0x2C, 0x1B, 0x91, 0x2E, 0x27, 0x21, 0xD8, 0xCD, 0x77, 0x19, 0xFF, + 0xF1, 0x8E, 0x1F, 0xFC, 0x71, 0x52, 0x32, 0xA1, 0x3B, 0x3A, 0x3A, 0x4F, + 0x3D, 0x41, 0x45, 0x3B, 0x3E, 0x41, 0x45, 0x3B, 0x46, 0x41, 0x3C, 0x52, + 0x9C, 0x6C, 0x37, 0xB1, 0xFF, 0x96, 0x1D, 0xFF, 0xBE, 0x6C, 0x11, 0xE6, + 0x19, 0x11, 0x09, 0x70, 0x13, 0x14, 0x15, 0x0F, 0x17, 0x17, 0x17, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x02, 0x01, 0x00, 0x1E, 0xCC, 0x73, 0x13, 0xD8, + 0xF5, 0x8C, 0x19, 0xFC, 0xDD, 0x84, 0x26, 0xFD, 0xE2, 0x88, 0x2A, 0xFF, + 0xE3, 0x88, 0x28, 0xFF, 0xE4, 0x88, 0x28, 0xFF, 0xE4, 0x88, 0x27, 0xFF, + 0xE5, 0x89, 0x27, 0xFF, 0xE4, 0x88, 0x28, 0xFF, 0xE0, 0x88, 0x2B, 0xFF, + 0xE0, 0x88, 0x2B, 0xFF, 0xE2, 0x88, 0x29, 0xFF, 0xE3, 0x86, 0x22, 0xFF, + 0xFF, 0x8F, 0x15, 0xFF, 0xBE, 0x7B, 0x35, 0xFE, 0x44, 0x49, 0x4D, 0xFE, + 0xBD, 0x6E, 0x19, 0xFF, 0xFD, 0x90, 0x17, 0xFF, 0xA9, 0x90, 0x76, 0xFE, + 0xC1, 0xC6, 0xCC, 0xF9, 0xDA, 0xDA, 0xDA, 0xFC, 0xDD, 0xDD, 0xDD, 0xFD, + 0xDD, 0xDD, 0xDD, 0xFD, 0xD9, 0xDA, 0xDB, 0xFB, 0xC5, 0xCB, 0xD2, 0xF8, + 0xD4, 0x9D, 0x65, 0xFF, 0xFF, 0x94, 0x14, 0xFF, 0xA8, 0x62, 0x18, 0xE1, + 0x00, 0x00, 0x00, 0x3D, 0x20, 0x20, 0x21, 0x02, 0x02, 0x02, 0x02, 0x00, + 0x00, 0x00, 0x00, 0x1B, 0xCD, 0x73, 0x12, 0xD6, 0x7C, 0x4A, 0x15, 0xBC, + 0x73, 0x76, 0x79, 0xEC, 0x90, 0x90, 0x8F, 0xFF, 0x8F, 0x8E, 0x8D, 0xFF, + 0x8F, 0x8D, 0x8C, 0xFF, 0x8F, 0x8D, 0x8B, 0xFF, 0x8F, 0x8D, 0x8B, 0xFF, + 0x8F, 0x8D, 0x8C, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x86, 0x88, 0x8B, 0xFF, 0x92, 0x73, 0x52, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, + 0x71, 0x5F, 0x4D, 0xFF, 0x70, 0x4D, 0x28, 0xFF, 0xFF, 0x92, 0x13, 0xFF, + 0xCD, 0x82, 0x33, 0xFF, 0xA8, 0xAC, 0xB1, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD8, 0xD9, 0xFF, 0xC0, 0xB7, 0xAD, 0xFF, + 0xF5, 0x8E, 0x20, 0xFF, 0xF8, 0x8B, 0x15, 0xFE, 0x2B, 0x16, 0x02, 0x7D, + 0x1A, 0x1D, 0x20, 0x0A, 0x0A, 0x0A, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x13, + 0xBF, 0x6A, 0x0D, 0xC8, 0x4E, 0x32, 0x13, 0x7E, 0x85, 0x88, 0x8C, 0xE7, + 0x9D, 0x9D, 0x9E, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, + 0x9B, 0x9B, 0x9C, 0xFF, 0x9A, 0x9B, 0x9B, 0xFF, 0x9D, 0x9E, 0x9E, 0xFF, + 0x9D, 0x9E, 0x9E, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x85, 0x88, 0x8B, 0xFF, + 0xD5, 0x84, 0x2F, 0xFF, 0xD4, 0x82, 0x2A, 0xFF, 0x3B, 0x40, 0x46, 0xFF, + 0xB7, 0x6B, 0x1A, 0xFF, 0xFF, 0x92, 0x13, 0xFF, 0xB1, 0x7E, 0x4A, 0xFF, + 0xB5, 0xBA, 0xBF, 0xFF, 0xDC, 0xDC, 0xDC, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xC0, 0xC0, 0xC1, 0xFF, 0xE6, 0x90, 0x33, 0xFF, + 0xFF, 0x93, 0x15, 0xFF, 0x62, 0x37, 0x09, 0xA4, 0x01, 0x02, 0x04, 0x12, + 0x01, 0x01, 0x01, 0x00, 0x25, 0x25, 0x25, 0x04, 0x3E, 0x30, 0x22, 0x24, + 0x2D, 0x2A, 0x26, 0x29, 0x8E, 0x8E, 0x8E, 0xE9, 0x9A, 0x9A, 0x9A, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x94, 0x97, 0x9A, 0xFF, 0x90, 0x7C, 0x68, 0xFF, 0xFC, 0x8D, 0x16, 0xFF, + 0x89, 0x67, 0x44, 0xFF, 0x32, 0x35, 0x38, 0xFF, 0xDB, 0x80, 0x1F, 0xFF, + 0xFF, 0x90, 0x13, 0xFF, 0xAA, 0x7B, 0x49, 0xFF, 0xB1, 0xB6, 0xBB, 0xFF, + 0xA5, 0xA5, 0xA5, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD4, 0xD5, 0xD5, 0xFF, + 0xBE, 0xBF, 0xC1, 0xFF, 0xE2, 0x8F, 0x37, 0xFF, 0xFF, 0x94, 0x15, 0xFF, + 0x6D, 0x3C, 0x0A, 0xAA, 0x02, 0x04, 0x07, 0x12, 0x02, 0x02, 0x02, 0x00, + 0x12, 0x12, 0x12, 0x00, 0x23, 0x25, 0x27, 0x00, 0x39, 0x3A, 0x3A, 0x15, + 0x99, 0x99, 0x99, 0xEA, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x98, 0x98, 0x98, 0xFF, + 0x4B, 0x4B, 0x4B, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x89, 0x8E, 0x93, 0xFF, + 0xBD, 0x7F, 0x3D, 0xFF, 0xE6, 0x87, 0x20, 0xFF, 0x4A, 0x48, 0x46, 0xFF, + 0x57, 0x57, 0x57, 0xFF, 0xEE, 0x94, 0x34, 0xFF, 0xFF, 0x90, 0x12, 0xFF, + 0xBA, 0x79, 0x33, 0xFF, 0x95, 0x9B, 0xA0, 0xFF, 0x46, 0x46, 0x46, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD4, 0xFF, 0xB6, 0xB5, 0xB3, 0xFF, + 0xE9, 0x8C, 0x2A, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0x4E, 0x2A, 0x04, 0x8C, + 0x18, 0x1C, 0x20, 0x09, 0x0A, 0x0A, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x9A, 0x9A, 0x9A, 0xEA, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x4B, 0x4B, 0x4B, 0xFF, + 0x56, 0x57, 0x58, 0xFF, 0x86, 0x80, 0x7B, 0xFF, 0xEE, 0x89, 0x1D, 0xFF, + 0xA5, 0x71, 0x3A, 0xFF, 0x34, 0x39, 0x3E, 0xFF, 0x93, 0x96, 0x9A, 0xFF, + 0xE3, 0x9B, 0x4F, 0xFF, 0xFF, 0x8E, 0x11, 0xFF, 0xEE, 0x87, 0x1A, 0xFF, + 0x82, 0x71, 0x5F, 0xFF, 0x33, 0x38, 0x3D, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0xD8, 0xD8, 0xD8, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xCA, 0xCD, 0xD0, 0xFF, 0xB1, 0x9E, 0x8A, 0xFF, 0xFA, 0x8D, 0x18, 0xFF, + 0xE3, 0x7E, 0x13, 0xF0, 0x14, 0x0B, 0x01, 0x4B, 0x29, 0x2A, 0x2B, 0x01, + 0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x26, 0x26, 0x26, 0x17, 0x98, 0x98, 0x98, 0xEA, 0x92, 0x92, 0x92, 0xFF, + 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x5A, 0x5E, 0x63, 0xFF, + 0xA1, 0x7C, 0x55, 0xFF, 0xF5, 0x8A, 0x18, 0xFF, 0x66, 0x5A, 0x4D, 0xFF, + 0x45, 0x47, 0x49, 0xFF, 0xC1, 0xC4, 0xC8, 0xFF, 0xC8, 0xA8, 0x88, 0xFF, + 0xFD, 0x8C, 0x13, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xDF, 0x82, 0x1E, 0xFF, + 0x4C, 0x37, 0x20, 0xFF, 0x6C, 0x72, 0x77, 0xFF, 0xC8, 0xC9, 0xCA, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCE, 0xCE, 0xCF, 0xFF, 0xA9, 0xAE, 0xB4, 0xFF, + 0xCF, 0x89, 0x41, 0xFF, 0xFF, 0x92, 0x14, 0xFF, 0x85, 0x5A, 0x2E, 0xC0, + 0x0E, 0x11, 0x14, 0x0F, 0x1E, 0x1E, 0x1E, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, + 0x95, 0x95, 0x95, 0xEA, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x90, 0x90, 0x90, 0xFF, 0x7C, 0x7F, 0x82, 0xFF, 0xD2, 0x82, 0x2C, 0xFF, + 0xC9, 0x7D, 0x2C, 0xFF, 0x46, 0x49, 0x4E, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xBE, 0xC0, 0xC1, 0xFF, 0xE0, 0x95, 0x45, 0xFF, + 0xFF, 0x8D, 0x11, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xF3, 0x8A, 0x19, 0xFF, + 0xA5, 0x72, 0x3D, 0xFF, 0x83, 0x7F, 0x7A, 0xFF, 0x99, 0x9E, 0xA3, 0xFF, + 0x9A, 0x9D, 0xA1, 0xFF, 0xBE, 0x89, 0x52, 0xFF, 0xF8, 0x8B, 0x15, 0xFF, + 0xC8, 0x97, 0x63, 0xFF, 0x72, 0x75, 0x78, 0xAC, 0x2A, 0x2A, 0x2A, 0x00, + 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, 0x93, 0x93, 0x93, 0xEA, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x89, 0x8B, 0x8D, 0xFF, + 0x84, 0x76, 0x67, 0xFF, 0xF5, 0x8A, 0x17, 0xFF, 0x8C, 0x6D, 0x4B, 0xFF, + 0x3F, 0x42, 0x46, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0xD2, 0xD1, 0xD1, 0xFF, + 0xC9, 0xCB, 0xCD, 0xFF, 0xBD, 0xB5, 0xAD, 0xFF, 0xE7, 0x92, 0x37, 0xFF, + 0xFF, 0x8D, 0x11, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, + 0xE1, 0x83, 0x1C, 0xFF, 0xAF, 0x73, 0x34, 0xFF, 0xC5, 0x7B, 0x2D, 0xFF, + 0xCB, 0x7B, 0x23, 0xFF, 0xA6, 0x8E, 0x76, 0xFF, 0xBA, 0xBE, 0xC2, 0xFF, + 0xAA, 0xAA, 0xAA, 0xA8, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x25, 0x25, 0x25, 0x17, 0x91, 0x91, 0x91, 0xEA, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8B, 0x8B, 0x8A, 0xFF, 0x7C, 0x81, 0x86, 0xFF, 0xAA, 0x78, 0x43, 0xFF, + 0xE6, 0x84, 0x1B, 0xFF, 0x6A, 0x66, 0x63, 0xFF, 0x40, 0x41, 0x42, 0xFF, + 0xA6, 0xA6, 0xA6, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xC9, 0xC9, 0xFF, + 0xC7, 0xC9, 0xCB, 0xFF, 0xBB, 0xB7, 0xB3, 0xFF, 0xCE, 0x95, 0x58, 0xFF, + 0xF1, 0x8A, 0x1C, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xAB, 0x6C, 0x29, 0xFF, + 0x7A, 0x73, 0x6B, 0xFF, 0xA3, 0xA7, 0xAC, 0xFF, 0x90, 0x90, 0x91, 0xA9, + 0x1D, 0x1D, 0x1D, 0x00, 0x02, 0x02, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, + 0x8E, 0x8E, 0x8E, 0xEA, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x88, 0x88, 0xFF, + 0x75, 0x75, 0x76, 0xFF, 0xDF, 0x84, 0x23, 0xFF, 0xB2, 0x73, 0x30, 0xFF, + 0x64, 0x69, 0x6E, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC5, 0xC5, 0xC6, 0xFF, + 0xA8, 0xAE, 0xB4, 0xFF, 0x8D, 0x86, 0x7F, 0xFF, 0xC8, 0x7C, 0x2B, 0xFF, + 0xF0, 0x8B, 0x1E, 0xFF, 0xF1, 0x8B, 0x20, 0xFF, 0xFF, 0x8D, 0x12, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xEA, 0x85, 0x19, 0xFF, + 0xA6, 0x77, 0x46, 0xFF, 0x50, 0x51, 0x52, 0xB8, 0x18, 0x19, 0x19, 0x09, + 0x1A, 0x1A, 0x1A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x8C, 0x8C, 0x8C, 0xEA, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x7F, 0x82, 0x85, 0xFF, 0x86, 0x70, 0x59, 0xFF, + 0xF8, 0x8A, 0x15, 0xFF, 0x7E, 0x66, 0x4D, 0xFF, 0x6B, 0x6E, 0x71, 0xFF, + 0x38, 0x38, 0x38, 0xFF, 0x53, 0x53, 0x53, 0xFF, 0x56, 0x56, 0x56, 0xFF, + 0x54, 0x55, 0x56, 0xFF, 0x50, 0x4F, 0x4E, 0xFF, 0xA5, 0x71, 0x3A, 0xFF, + 0xEF, 0x8A, 0x1A, 0xFF, 0xD0, 0x8A, 0x3F, 0xFF, 0xA6, 0x9D, 0x94, 0xFF, + 0xB2, 0xA8, 0x9E, 0xFF, 0xCC, 0x99, 0x64, 0xFF, 0xF0, 0x8E, 0x25, 0xFF, + 0xFF, 0x8D, 0x12, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x91, 0x16, 0xFF, + 0xA3, 0x60, 0x1A, 0xE2, 0x01, 0x00, 0x00, 0x4C, 0x13, 0x13, 0x14, 0x07, + 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x24, 0x24, 0x24, 0x17, 0x89, 0x89, 0x89, 0xEA, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x72, 0x77, 0x7C, 0xFF, 0xB7, 0x79, 0x37, 0xFF, 0xDE, 0x80, 0x1C, 0xFF, + 0x66, 0x66, 0x65, 0xFF, 0x78, 0x78, 0x79, 0xFF, 0x55, 0x55, 0x55, 0xFF, + 0x4F, 0x4F, 0x4F, 0xFF, 0x4D, 0x4E, 0x4F, 0xFF, 0x40, 0x3F, 0x3E, 0xFF, + 0xAF, 0x66, 0x18, 0xFF, 0xFF, 0x90, 0x10, 0xFF, 0xC5, 0x85, 0x41, 0xFF, + 0xA0, 0xA3, 0xA7, 0xFF, 0xC0, 0xC2, 0xC4, 0xFF, 0xC3, 0xC4, 0xC6, 0xFF, + 0xBA, 0xBF, 0xC5, 0xFF, 0xB6, 0xAE, 0xA6, 0xFF, 0xD4, 0x94, 0x52, 0xFF, + 0xFD, 0x8D, 0x15, 0xFF, 0xFE, 0x8E, 0x17, 0xFF, 0xFF, 0x93, 0x18, 0xFF, + 0x6B, 0x3C, 0x09, 0xB6, 0x02, 0x03, 0x05, 0x27, 0x0F, 0x0F, 0x0F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, + 0x87, 0x87, 0x87, 0xEA, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x7F, 0x7F, 0x7F, 0xFF, 0x7D, 0x7E, 0x7F, 0xFF, 0x73, 0x6F, 0x6B, 0xFF, + 0xEA, 0x87, 0x1D, 0xFF, 0xA4, 0x6D, 0x32, 0xFF, 0x69, 0x6E, 0x73, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x75, 0x78, 0x7D, 0xFF, 0xA7, 0x75, 0x40, 0xFF, 0xFF, 0x92, 0x14, 0xFF, + 0xE1, 0x85, 0x23, 0xFF, 0x94, 0x92, 0x8E, 0xFF, 0xBF, 0xC0, 0xC1, 0xFF, + 0xC4, 0xC4, 0xC4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, + 0xB9, 0xBA, 0xBC, 0xFF, 0xB4, 0xB9, 0xBE, 0xFF, 0xC6, 0x98, 0x69, 0xFF, + 0xFC, 0x8D, 0x16, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE2, 0x7F, 0x15, 0xF6, + 0x13, 0x0B, 0x01, 0x62, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x85, 0x85, 0x85, 0xEA, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x72, 0x72, 0x72, 0xFF, + 0x3C, 0x40, 0x43, 0xFF, 0x76, 0x58, 0x39, 0xFF, 0xF9, 0x8B, 0x16, 0xFF, + 0x71, 0x5F, 0x4B, 0xFF, 0x78, 0x7B, 0x7D, 0xFF, 0x81, 0x81, 0x81, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x80, 0xFF, 0x72, 0x6E, 0x6B, 0xFF, + 0xE4, 0x85, 0x1F, 0xFF, 0xFF, 0x90, 0x12, 0xFF, 0xB0, 0x7E, 0x49, 0xFF, + 0xA9, 0xAF, 0xB4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, 0x61, 0x61, 0x61, 0xFF, + 0xC2, 0xC2, 0xC3, 0xFF, 0xB0, 0xB4, 0xB9, 0xFF, 0xD7, 0x90, 0x46, 0xFF, + 0xFF, 0x8E, 0x13, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x4E, 0x2B, 0x07, 0x96, + 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x23, 0x23, 0x23, 0x17, 0x83, 0x83, 0x83, 0xEA, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, + 0xAC, 0x6A, 0x23, 0xFF, 0xCD, 0x75, 0x17, 0xFF, 0x31, 0x32, 0x33, 0xFF, + 0x4E, 0x4E, 0x4E, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x69, 0x6B, 0x6E, 0xFF, 0x7C, 0x67, 0x51, 0xFF, 0xFB, 0x8C, 0x17, 0xFF, + 0xFE, 0x8D, 0x15, 0xFF, 0x83, 0x67, 0x49, 0xFF, 0x74, 0x77, 0x7B, 0xFF, + 0x64, 0x64, 0x64, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x47, 0x47, 0x47, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBA, 0xBE, 0xC2, 0xFF, 0xB6, 0x9B, 0x7E, 0xFF, 0xFC, 0x8C, 0x15, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0x72, 0x3F, 0x0B, 0xAE, 0x00, 0x00, 0x00, 0x1D, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x17, + 0x81, 0x81, 0x81, 0xEA, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x7A, 0x7B, 0xFF, 0x6E, 0x6B, 0x69, 0xFF, 0xE7, 0x87, 0x20, 0xFF, + 0x95, 0x65, 0x32, 0xFF, 0x54, 0x58, 0x5D, 0xFF, 0x55, 0x55, 0x55, 0xFF, + 0x48, 0x48, 0x48, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x38, 0x3B, 0x3F, 0xFF, + 0x6C, 0x4C, 0x2B, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xFA, 0x8C, 0x17, 0xFF, + 0x57, 0x42, 0x2C, 0xFF, 0x51, 0x54, 0x57, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBE, 0xC0, 0xFF, + 0xAC, 0xA0, 0x94, 0xFF, 0xF4, 0x8B, 0x1D, 0xFF, 0xFF, 0x94, 0x18, 0xFF, + 0x72, 0x3F, 0x0B, 0xAB, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x17, 0x7F, 0x7F, 0x7F, 0xEA, + 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x72, 0x75, 0x78, 0xFF, + 0x7F, 0x69, 0x52, 0xFF, 0xED, 0x86, 0x18, 0xFF, 0x69, 0x5B, 0x4E, 0xFF, + 0x73, 0x75, 0x77, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x6E, 0x72, 0x75, 0xFF, 0x89, 0x6C, 0x4E, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xF8, 0x8A, 0x15, 0xFF, 0x8B, 0x76, 0x60, 0xFF, + 0xB2, 0xB5, 0xB7, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBC, 0xBD, 0xFF, 0xA8, 0x9E, 0x94, 0xFF, + 0xF2, 0x8B, 0x1E, 0xFF, 0xFF, 0x93, 0x18, 0xFF, 0x54, 0x2F, 0x08, 0x8F, + 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x23, 0x23, 0x23, 0x17, 0x7E, 0x7E, 0x7E, 0xEA, 0x75, 0x75, 0x75, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x69, 0x6E, 0x73, 0xFF, 0xA7, 0x72, 0x3A, 0xFF, + 0xCC, 0x79, 0x20, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x74, 0x76, 0x78, 0xFF, 0x7B, 0x6D, 0x5F, 0xFF, 0xF5, 0x8B, 0x1A, 0xFF, + 0xFE, 0x8E, 0x14, 0xFF, 0x90, 0x70, 0x4E, 0xFF, 0xA2, 0xA6, 0xAA, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xB6, 0xB8, 0xBB, 0xFF, 0xA6, 0x92, 0x7E, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, + 0xEF, 0x86, 0x16, 0xF9, 0x1D, 0x0F, 0x01, 0x58, 0x19, 0x19, 0x19, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x18, + 0x7D, 0x7D, 0x7D, 0xF1, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x77, 0x77, 0xFF, + 0x66, 0x68, 0x6A, 0xFF, 0xD5, 0x7F, 0x24, 0xFF, 0x9E, 0x6A, 0x31, 0xFF, + 0x62, 0x67, 0x6C, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x76, 0xFF, + 0x6B, 0x6D, 0x70, 0xFF, 0xCE, 0x81, 0x30, 0xFF, 0xFF, 0x93, 0x13, 0xFF, + 0xB5, 0x73, 0x2C, 0xFF, 0x7F, 0x84, 0x8A, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xA0, 0xA6, 0xAD, 0xFF, + 0xBD, 0x85, 0x4A, 0xFF, 0xFF, 0x95, 0x15, 0xFF, 0x94, 0x53, 0x0D, 0xBC, + 0x05, 0x08, 0x0A, 0x1C, 0x29, 0x29, 0x29, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x22, 0x22, 0x22, 0x11, 0x75, 0x75, 0x75, 0xAD, + 0x6C, 0x6C, 0x6C, 0xBD, 0x62, 0x63, 0x65, 0xBC, 0x61, 0x53, 0x44, 0xD3, + 0xF2, 0x89, 0x18, 0xFF, 0x64, 0x4B, 0x2F, 0xD8, 0x55, 0x58, 0x5C, 0xBE, + 0x6D, 0x6D, 0x6D, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, + 0x6C, 0x6C, 0x6C, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, 0x64, 0x66, 0x69, 0xBD, + 0x66, 0x53, 0x40, 0xC1, 0xED, 0x86, 0x16, 0xF2, 0xF9, 0x8E, 0x17, 0xFF, + 0x82, 0x61, 0x3E, 0xF6, 0x66, 0x6C, 0x72, 0xD2, 0x86, 0x87, 0x89, 0xC2, + 0x8D, 0x8D, 0x8E, 0xBD, 0x8D, 0x8E, 0x8E, 0xBC, 0x89, 0x8B, 0x8C, 0xBE, + 0x75, 0x7B, 0x81, 0xC6, 0x8F, 0x75, 0x5B, 0xED, 0xF9, 0x91, 0x1C, 0xFF, + 0xD3, 0x77, 0x12, 0xE4, 0x13, 0x09, 0x00, 0x44, 0x2B, 0x2C, 0x2E, 0x02, + 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x0D, 0x0D, 0x0D, 0x00, 0x0C, 0x0C, 0x0C, 0x00, + 0x08, 0x09, 0x0A, 0x00, 0x5F, 0x35, 0x08, 0x78, 0xE8, 0x82, 0x15, 0xFB, + 0x0D, 0x06, 0x00, 0x56, 0x30, 0x31, 0x31, 0x00, 0x0D, 0x0D, 0x0D, 0x00, + 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, + 0x0C, 0x0C, 0x0C, 0x00, 0x10, 0x10, 0x10, 0x00, 0x23, 0x26, 0x29, 0x00, + 0x4B, 0x2E, 0x11, 0x7A, 0xE6, 0x87, 0x1B, 0xFF, 0xF8, 0x8C, 0x14, 0xFD, + 0x75, 0x40, 0x08, 0xBC, 0x19, 0x0D, 0x01, 0x69, 0x02, 0x00, 0x00, 0x42, + 0x02, 0x01, 0x00, 0x3D, 0x19, 0x0D, 0x01, 0x57, 0x6C, 0x3C, 0x08, 0xA3, + 0xF0, 0x88, 0x14, 0xF8, 0xC9, 0x73, 0x12, 0xDA, 0x22, 0x13, 0x03, 0x4E, + 0x22, 0x25, 0x27, 0x05, 0x1D, 0x1D, 0x1D, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0C, 0x0D, 0x0E, 0x00, + 0x85, 0x49, 0x0A, 0x93, 0xEC, 0x85, 0x15, 0xF8, 0x14, 0x09, 0x00, 0x49, + 0x3B, 0x3C, 0x3D, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x15, 0x15, 0x15, 0x00, 0x1E, 0x22, 0x26, 0x1F, + 0x41, 0x36, 0x2B, 0xF1, 0x96, 0x59, 0x16, 0xC9, 0xDC, 0x7C, 0x11, 0xDF, + 0xDD, 0x7C, 0x12, 0xF1, 0xC9, 0x70, 0x12, 0xE7, 0xC9, 0x70, 0x12, 0xE6, + 0xDC, 0x7C, 0x13, 0xEE, 0xD4, 0x77, 0x12, 0xE0, 0x76, 0x42, 0x09, 0x92, + 0x13, 0x0C, 0x07, 0x2C, 0x1A, 0x1C, 0x1F, 0x02, 0x1E, 0x1E, 0x1E, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x25, 0x26, 0x26, 0x00, 0x30, 0x26, 0x1C, 0x1F, + 0x3C, 0x28, 0x12, 0x3F, 0x26, 0x24, 0x21, 0x13, 0x24, 0x24, 0x24, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x04, 0x03, 0x03, 0x00, 0x38, 0x3A, 0x3C, 0xAC, + 0x23, 0x27, 0x2B, 0xAE, 0x21, 0x1C, 0x17, 0x15, 0x3E, 0x2C, 0x17, 0x3D, + 0x41, 0x25, 0x08, 0x54, 0x3F, 0x23, 0x06, 0x55, 0x35, 0x23, 0x10, 0x40, + 0x18, 0x15, 0x13, 0x1D, 0x13, 0x17, 0x1B, 0x03, 0x1E, 0x1F, 0x20, 0x00, + 0x0B, 0x0B, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x03, 0x03, 0x03, 0x00, 0x18, 0x19, 0x1A, 0x00, 0x0D, 0x0F, 0x12, 0x00, + 0x21, 0x21, 0x22, 0x00, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x20, 0x20, 0x20, 0x2C, 0x2D, 0x2D, 0x2D, 0x52, + 0x1A, 0x1B, 0x1C, 0x00, 0x15, 0x17, 0x19, 0x00, 0x00, 0x00, 0x02, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x0B, 0x0D, 0x10, 0x00, 0x13, 0x14, 0x15, 0x00, + 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00 + }; diff --git a/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c b/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c new file mode 100644 index 000000000..93e594e65 --- /dev/null +++ b/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c @@ -0,0 +1,779 @@ +/* GIMP C-Source image dump */ + +static const struct { + unsigned int width; + unsigned int height; + unsigned int bytes_per_pixel; /* 1:Grayscale, 3:RGB, 4:RGBA */ + unsigned char pixel_data[48 * 48 * 4 + 1]; +} icon_48x48x48 = { + 48, 48, 4, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0B, 0x0B, 0x0B, 0x00, + 0x07, 0x07, 0x07, 0x00, 0x06, 0x06, 0x06, 0x00, 0x05, 0x05, 0x05, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x05, 0x05, 0x05, 0x00, 0x06, 0x06, 0x06, 0x00, + 0x06, 0x06, 0x06, 0x00, 0x0A, 0x0A, 0x0A, 0x00, 0x0B, 0x0B, 0x0B, 0x00, + 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, + 0x08, 0x08, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x07, 0x07, 0x07, 0x02, 0x0E, 0x0E, 0x0E, 0x09, + 0x1B, 0x1B, 0x1B, 0x00, 0x3B, 0x3B, 0x3B, 0x00, 0x38, 0x38, 0x38, 0x01, + 0x1B, 0x1B, 0x1B, 0x02, 0x17, 0x17, 0x17, 0x03, 0x18, 0x18, 0x18, 0x03, + 0x30, 0x30, 0x30, 0x01, 0x57, 0x57, 0x57, 0x00, 0x23, 0x23, 0x23, 0x00, + 0x21, 0x21, 0x21, 0x00, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x3A, 0x3A, 0x3A, 0x00, 0x3A, 0x3A, 0x3A, 0x01, 0x5C, 0x5C, 0x5C, 0x03, + 0x3B, 0x3B, 0x3B, 0x05, 0x2D, 0x2D, 0x2D, 0x05, 0x2C, 0x2C, 0x2C, 0x06, + 0x1F, 0x1F, 0x1F, 0x06, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, + 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, + 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, + 0x1E, 0x1E, 0x1E, 0x06, 0x25, 0x25, 0x25, 0x06, 0x2F, 0x2F, 0x2F, 0x05, + 0x2E, 0x2E, 0x2E, 0x05, 0x52, 0x52, 0x52, 0x04, 0x5C, 0x5C, 0x5C, 0x04, + 0x5C, 0x5C, 0x5C, 0x04, 0x5C, 0x5C, 0x5C, 0x04, 0x5C, 0x5C, 0x5C, 0x04, + 0x43, 0x43, 0x43, 0x03, 0x20, 0x20, 0x20, 0x01, 0x23, 0x23, 0x23, 0x00, + 0x02, 0x02, 0x02, 0x00, 0x3C, 0x3C, 0x3C, 0x73, 0x32, 0x32, 0x32, 0xBB, + 0x1C, 0x1C, 0x1C, 0x15, 0x05, 0x06, 0x07, 0x13, 0x00, 0x02, 0x04, 0x20, + 0x00, 0x00, 0x02, 0x27, 0x00, 0x00, 0x01, 0x2A, 0x00, 0x00, 0x01, 0x29, + 0x00, 0x01, 0x04, 0x23, 0x06, 0x06, 0x07, 0x1B, 0x17, 0x17, 0x17, 0x11, + 0x25, 0x25, 0x25, 0x07, 0x36, 0x36, 0x36, 0x02, 0x23, 0x23, 0x23, 0x00, + 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x33, 0x33, 0x33, 0x02, 0x05, 0x06, 0x07, 0x0D, 0x00, 0x00, 0x00, 0x1E, + 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x37, + 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x3A, + 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, + 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3A, + 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x36, + 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x30, + 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x2C, + 0x00, 0x00, 0x00, 0x1E, 0x09, 0x09, 0x09, 0x0D, 0x1B, 0x1B, 0x1B, 0x00, + 0x23, 0x23, 0x23, 0x40, 0x37, 0x37, 0x37, 0xF8, 0x20, 0x23, 0x26, 0xD1, + 0x00, 0x00, 0x00, 0x46, 0x0E, 0x07, 0x01, 0x5E, 0x31, 0x1B, 0x04, 0x7E, + 0x45, 0x27, 0x06, 0x90, 0x48, 0x29, 0x06, 0x93, 0x3E, 0x23, 0x05, 0x8D, + 0x27, 0x15, 0x03, 0x7E, 0x09, 0x05, 0x00, 0x68, 0x00, 0x00, 0x00, 0x4E, + 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1A, 0x1A, 0x1A, 0x1A, 0x08, + 0x3B, 0x3B, 0x3B, 0x01, 0x1A, 0x1A, 0x1A, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x08, 0x0F, 0x08, 0x01, 0x34, 0x57, 0x30, 0x07, 0x8C, + 0x5F, 0x35, 0x07, 0xA9, 0x65, 0x39, 0x08, 0xB1, 0x6A, 0x3C, 0x09, 0xB4, + 0x6E, 0x3E, 0x09, 0xB7, 0x71, 0x40, 0x09, 0xB9, 0x73, 0x41, 0x09, 0xBA, + 0x74, 0x42, 0x0A, 0xBA, 0x75, 0x42, 0x0A, 0xBC, 0x75, 0x42, 0x0A, 0xBC, + 0x75, 0x42, 0x0A, 0xBB, 0x73, 0x41, 0x0A, 0xBA, 0x71, 0x40, 0x09, 0xB9, + 0x6D, 0x3D, 0x09, 0xB7, 0x69, 0x3B, 0x08, 0xB4, 0x63, 0x37, 0x08, 0xB1, + 0x5C, 0x33, 0x07, 0xAD, 0x52, 0x2D, 0x07, 0xA9, 0x4B, 0x28, 0x07, 0xA4, + 0x4C, 0x29, 0x07, 0xA4, 0x4E, 0x2A, 0x07, 0xA5, 0x53, 0x2E, 0x07, 0xA0, + 0x2E, 0x19, 0x05, 0x6E, 0x00, 0x00, 0x00, 0x1D, 0x04, 0x04, 0x04, 0x1A, + 0x2B, 0x2C, 0x2C, 0xD9, 0x20, 0x24, 0x27, 0xEE, 0x3B, 0x22, 0x0B, 0x95, + 0x9A, 0x57, 0x0D, 0xC1, 0xE3, 0x81, 0x16, 0xF3, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xDA, 0x7C, 0x14, 0xF0, 0x96, 0x55, 0x0D, 0xCD, + 0x3B, 0x20, 0x05, 0x99, 0x00, 0x00, 0x00, 0x5D, 0x00, 0x00, 0x00, 0x2F, + 0x05, 0x05, 0x05, 0x0F, 0x47, 0x47, 0x47, 0x02, 0x1F, 0x1F, 0x1F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0C, 0x63, 0x37, 0x09, 0x7E, 0xFF, 0x96, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x98, 0x19, 0xFF, + 0x8F, 0x4F, 0x0C, 0xB4, 0x00, 0x00, 0x00, 0x23, 0x1C, 0x1E, 0x20, 0xA3, + 0x2B, 0x2A, 0x29, 0xFF, 0x91, 0x56, 0x17, 0xE7, 0xF7, 0x8B, 0x16, 0xF6, + 0xFF, 0x95, 0x17, 0xFF, 0xBE, 0x6B, 0x0F, 0xD1, 0x68, 0x39, 0x06, 0x8C, + 0x40, 0x21, 0x01, 0x64, 0x37, 0x1B, 0x00, 0x5B, 0x4D, 0x29, 0x02, 0x69, + 0x81, 0x47, 0x09, 0x97, 0xD6, 0x77, 0x11, 0xDB, 0xFF, 0x96, 0x18, 0xFF, + 0xFA, 0x8E, 0x17, 0xFE, 0x9C, 0x57, 0x0F, 0xD5, 0x15, 0x0B, 0x02, 0x7F, + 0x00, 0x00, 0x00, 0x3A, 0x03, 0x03, 0x03, 0x10, 0x4A, 0x4A, 0x4A, 0x02, + 0x14, 0x14, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x10, 0x7A, 0x45, 0x0B, 0x94, 0xFF, 0x94, 0x19, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xF6, 0x8B, 0x17, 0xFC, + 0x3D, 0x24, 0x0C, 0x83, 0x0C, 0x0F, 0x13, 0x74, 0x2D, 0x2A, 0x27, 0xFD, + 0xB3, 0x6A, 0x1A, 0xFF, 0xFF, 0x94, 0x17, 0xFF, 0xF1, 0x8A, 0x18, 0xF9, + 0x6C, 0x42, 0x15, 0x9E, 0x17, 0x16, 0x14, 0x41, 0x15, 0x19, 0x1E, 0x21, + 0x1E, 0x21, 0x25, 0x17, 0x29, 0x2C, 0x2F, 0x15, 0x20, 0x23, 0x27, 0x15, + 0x14, 0x18, 0x1C, 0x1B, 0x27, 0x21, 0x1B, 0x38, 0x8A, 0x55, 0x1B, 0xA0, + 0xFB, 0x8E, 0x18, 0xFC, 0xFF, 0x95, 0x19, 0xFF, 0xC7, 0x70, 0x12, 0xEA, + 0x21, 0x14, 0x07, 0x8D, 0x00, 0x00, 0x02, 0x39, 0x0E, 0x0E, 0x0E, 0x0B, + 0x30, 0x30, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x10, 0x7D, 0x46, 0x0B, 0x98, 0xFF, 0x94, 0x19, 0xFF, + 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xC1, 0x78, 0x2B, 0xFD, + 0x5A, 0x5D, 0x61, 0xEB, 0x2E, 0x30, 0x32, 0xF8, 0xA9, 0x64, 0x1A, 0xFF, + 0xFF, 0x93, 0x17, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, 0xA4, 0x83, 0x62, 0xFA, + 0x9B, 0xA0, 0xA7, 0xE6, 0xBF, 0xC0, 0xC1, 0xE3, 0xCC, 0xCC, 0xCC, 0xE2, + 0xD0, 0xD0, 0xD0, 0xE2, 0xD7, 0xD7, 0xD7, 0xE2, 0xD2, 0xD2, 0xD2, 0xE2, + 0xCC, 0xCC, 0xCC, 0xE2, 0xC5, 0xC6, 0xC7, 0xE1, 0xAC, 0xB2, 0xB8, 0xE3, + 0xCB, 0x9A, 0x67, 0xFC, 0xFE, 0x8D, 0x13, 0xFF, 0xFF, 0x93, 0x17, 0xFF, + 0xCB, 0x7A, 0x24, 0xF9, 0x15, 0x12, 0x11, 0x83, 0x00, 0x00, 0x00, 0x22, + 0x27, 0x27, 0x27, 0x04, 0x12, 0x12, 0x12, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0F, 0x7B, 0x45, 0x0B, 0x96, 0xFF, 0x96, 0x19, 0xFF, + 0xE8, 0x82, 0x15, 0xF3, 0xB9, 0x74, 0x2B, 0xF2, 0xBF, 0x81, 0x41, 0xFF, + 0xC3, 0x83, 0x40, 0xFF, 0xC7, 0x83, 0x3D, 0xFF, 0xC7, 0x83, 0x3D, 0xFF, + 0xC7, 0x83, 0x3C, 0xFF, 0xC8, 0x84, 0x3C, 0xFF, 0xC9, 0x83, 0x3B, 0xFF, + 0xCA, 0x84, 0x3A, 0xFF, 0xCB, 0x84, 0x3B, 0xFF, 0xC7, 0x83, 0x3C, 0xFF, + 0xC1, 0x82, 0x41, 0xFF, 0xBD, 0x82, 0x44, 0xFF, 0xC1, 0x82, 0x41, 0xFF, + 0xC5, 0x83, 0x3E, 0xFF, 0xC4, 0x80, 0x39, 0xFF, 0xC9, 0x7B, 0x2A, 0xFF, + 0xFC, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, 0x85, 0x6B, 0x50, 0xFF, + 0x41, 0x4A, 0x52, 0xFF, 0x76, 0x4B, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xBC, 0x80, 0x40, 0xFF, 0x9B, 0xA1, 0xA6, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, + 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, + 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD5, 0xD6, 0xD7, 0xFF, + 0xB8, 0xB9, 0xB9, 0xFF, 0xE5, 0x90, 0x37, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0x71, 0x3F, 0x0B, 0xBF, 0x00, 0x00, 0x00, 0x45, + 0x0F, 0x0F, 0x0F, 0x0E, 0x25, 0x25, 0x25, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0F, 0x71, 0x3F, 0x0A, 0x8C, 0xFF, 0x97, 0x19, 0xFF, + 0x61, 0x34, 0x08, 0xA7, 0x4A, 0x51, 0x59, 0xC9, 0x88, 0x8D, 0x92, 0xFF, + 0x88, 0x8D, 0x92, 0xFF, 0x88, 0x8C, 0x91, 0xFF, 0x88, 0x8C, 0x90, 0xFF, + 0x87, 0x8B, 0x90, 0xFF, 0x87, 0x8B, 0x90, 0xFF, 0x87, 0x8B, 0x8F, 0xFF, + 0x87, 0x8B, 0x8F, 0xFF, 0x87, 0x8B, 0x8F, 0xFF, 0x87, 0x8B, 0x90, 0xFF, + 0x88, 0x8D, 0x91, 0xFF, 0x89, 0x8D, 0x92, 0xFF, 0x89, 0x8D, 0x92, 0xFF, + 0x88, 0x8C, 0x90, 0xFF, 0x70, 0x79, 0x82, 0xFF, 0x90, 0x6B, 0x45, 0xFF, + 0xFF, 0x91, 0x13, 0xFF, 0xD3, 0x7F, 0x27, 0xFF, 0x5B, 0x5C, 0x5F, 0xFF, + 0x39, 0x32, 0x2C, 0xFF, 0xE1, 0x80, 0x18, 0xFF, 0xFF, 0x90, 0x17, 0xFF, + 0xF3, 0x89, 0x19, 0xFF, 0x8F, 0x80, 0x70, 0xFF, 0xB8, 0xBB, 0xBD, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD6, 0xFF, + 0xC4, 0xC9, 0xCE, 0xFF, 0xC5, 0x9C, 0x70, 0xFF, 0xFE, 0x8D, 0x12, 0xFF, + 0xFF, 0x91, 0x19, 0xFF, 0xD6, 0x78, 0x14, 0xF0, 0x0C, 0x06, 0x01, 0x6E, + 0x02, 0x04, 0x05, 0x1A, 0x46, 0x46, 0x46, 0x01, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x0C, 0x78, 0x44, 0x0B, 0x8E, 0xFF, 0x95, 0x19, 0xFF, + 0x35, 0x1E, 0x04, 0x77, 0x61, 0x64, 0x67, 0xBF, 0x9E, 0x9E, 0x9E, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, + 0x95, 0x96, 0x97, 0xFF, 0x7B, 0x7A, 0x79, 0xFF, 0xDA, 0x83, 0x27, 0xFF, + 0xFF, 0x90, 0x13, 0xFF, 0x94, 0x6E, 0x46, 0xFF, 0x39, 0x42, 0x4B, 0xFF, + 0x71, 0x49, 0x1E, 0xFF, 0xFF, 0x91, 0x17, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xD8, 0x81, 0x25, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0xC5, 0xC5, 0xC6, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, + 0xCD, 0xCF, 0xD1, 0xFF, 0xB7, 0xA5, 0x94, 0xFF, 0xF8, 0x8C, 0x19, 0xFF, + 0xFF, 0x8F, 0x17, 0xFF, 0xFB, 0x8E, 0x18, 0xFF, 0x38, 0x20, 0x05, 0x92, + 0x00, 0x00, 0x01, 0x26, 0x17, 0x17, 0x17, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x04, 0x72, 0x40, 0x0A, 0x7B, 0xE9, 0x85, 0x15, 0xE9, + 0x22, 0x12, 0x03, 0x45, 0x69, 0x6B, 0x6E, 0xB8, 0x9D, 0x9D, 0x9D, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, + 0x9C, 0x9C, 0x9C, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x86, 0x8A, 0x8E, 0xFF, 0x97, 0x76, 0x54, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xE2, 0x84, 0x21, 0xFF, 0x62, 0x5E, 0x5A, 0xFF, 0x27, 0x2C, 0x31, 0xFF, + 0xAC, 0x66, 0x1C, 0xFF, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, + 0xC7, 0x7C, 0x2D, 0xFF, 0x8A, 0x8D, 0x91, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, + 0xCF, 0xD0, 0xD1, 0xFF, 0xB2, 0xAA, 0xA1, 0xFF, 0xF2, 0x8C, 0x22, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x56, 0x30, 0x09, 0xA6, + 0x00, 0x00, 0x00, 0x2C, 0x01, 0x01, 0x01, 0x04, 0x00, 0x00, 0x00, 0x00, + 0x1D, 0x1D, 0x1D, 0x03, 0x0E, 0x09, 0x03, 0x15, 0x1F, 0x13, 0x05, 0x2A, + 0x03, 0x02, 0x02, 0x0C, 0x71, 0x72, 0x72, 0xB4, 0x9D, 0x9D, 0x9D, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, + 0x99, 0x99, 0x99, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x8B, 0x8B, 0x8B, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x79, 0x7B, 0x7E, 0xFF, 0xCC, 0x80, 0x2E, 0xFF, 0xFF, 0x92, 0x12, 0xFF, + 0xA6, 0x72, 0x3D, 0xFF, 0x45, 0x4A, 0x4F, 0xFF, 0x29, 0x2A, 0x2C, 0xFF, + 0xCC, 0x79, 0x20, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, + 0xC5, 0x7A, 0x2C, 0xFF, 0x85, 0x89, 0x8C, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, + 0xCE, 0xCF, 0xD0, 0xFF, 0xAF, 0xA8, 0xA2, 0xFF, 0xEF, 0x8C, 0x24, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x5E, 0x33, 0x0A, 0xA9, + 0x00, 0x00, 0x00, 0x2B, 0x09, 0x09, 0x09, 0x03, 0x00, 0x00, 0x00, 0x00, + 0x30, 0x30, 0x30, 0x00, 0x52, 0x52, 0x53, 0x00, 0x59, 0x5B, 0x5D, 0x00, + 0x45, 0x45, 0x45, 0x00, 0x85, 0x85, 0x85, 0xB3, 0x99, 0x99, 0x99, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0x9A, 0x9A, 0x9A, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x36, 0x36, 0x36, 0xFF, + 0x4B, 0x4B, 0x4B, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x8B, 0x8D, 0x90, 0xFF, + 0x85, 0x73, 0x61, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0xF0, 0x89, 0x1B, 0xFF, + 0x6C, 0x60, 0x54, 0xFF, 0x33, 0x35, 0x37, 0xFF, 0x48, 0x49, 0x4A, 0xFF, + 0xE5, 0x8F, 0x34, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x90, 0x16, 0xFF, + 0xD2, 0x7D, 0x24, 0xFF, 0x7A, 0x7B, 0x7D, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0x65, 0x65, 0x65, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, + 0xD8, 0xD8, 0xD8, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, + 0xCA, 0xCC, 0xCE, 0xFF, 0xAC, 0xA1, 0x96, 0xFF, 0xF3, 0x8C, 0x1E, 0xFF, + 0xFF, 0x8E, 0x17, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x4D, 0x2B, 0x07, 0x98, + 0x00, 0x00, 0x03, 0x23, 0x29, 0x29, 0x29, 0x02, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0E, 0x0E, 0x0E, 0x00, 0x99, 0x99, 0x99, 0xB3, 0x96, 0x96, 0x96, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x4A, 0x4A, 0x4A, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x7B, 0x80, 0x85, 0xFF, + 0xB2, 0x79, 0x3D, 0xFF, 0xFF, 0x92, 0x12, 0xFF, 0xBB, 0x78, 0x31, 0xFF, + 0x4C, 0x50, 0x54, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, 0x80, 0x82, 0x85, 0xFF, + 0xE6, 0x97, 0x44, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xEE, 0x87, 0x19, 0xFF, 0x74, 0x68, 0x5C, 0xFF, 0xA6, 0xA8, 0xAA, 0xFF, + 0x5E, 0x5E, 0x5E, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, + 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, + 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, + 0xC1, 0xC4, 0xC8, 0xFF, 0xAE, 0x96, 0x7E, 0xFF, 0xFB, 0x8C, 0x16, 0xFF, + 0xFF, 0x8F, 0x18, 0xFF, 0xF4, 0x89, 0x17, 0xFC, 0x28, 0x15, 0x03, 0x73, + 0x01, 0x02, 0x05, 0x17, 0x41, 0x41, 0x41, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x96, 0x96, 0x96, 0xB3, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, + 0x97, 0x97, 0x97, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0x4A, 0x4A, 0x4A, 0xFF, 0x8D, 0x8E, 0x8F, 0xFF, 0x78, 0x74, 0x70, 0xFF, + 0xE6, 0x86, 0x21, 0xFF, 0xFB, 0x8E, 0x15, 0xFF, 0x7F, 0x66, 0x4C, 0xFF, + 0x3C, 0x3F, 0x42, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0xB1, 0xB6, 0xBB, 0xFF, + 0xD3, 0x99, 0x5D, 0xFF, 0xFF, 0x8D, 0x11, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xAB, 0x6F, 0x2F, 0xFF, 0x72, 0x78, 0x7E, 0xFF, + 0x50, 0x50, 0x50, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, + 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, + 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, + 0xAE, 0xB4, 0xB9, 0xFF, 0xC0, 0x8B, 0x54, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, + 0xFF, 0x92, 0x18, 0xFF, 0xBA, 0x69, 0x11, 0xD8, 0x02, 0x00, 0x00, 0x42, + 0x21, 0x21, 0x21, 0x0B, 0x26, 0x26, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x95, 0x95, 0x95, 0xB3, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x96, 0x96, 0x96, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x30, 0x30, 0x30, 0xFF, + 0x46, 0x46, 0x46, 0xFF, 0x7F, 0x84, 0x88, 0xFF, 0x94, 0x73, 0x51, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xD5, 0x7F, 0x24, 0xFF, 0x5A, 0x5B, 0x5B, 0xFF, + 0x31, 0x31, 0x32, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0xCB, 0xCE, 0xD2, 0xFF, + 0xBD, 0xA4, 0x8B, 0xFF, 0xFB, 0x8D, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFA, 0x8D, 0x17, 0xFF, 0x93, 0x69, 0x3D, 0xFF, + 0x2B, 0x30, 0x36, 0xFF, 0x22, 0x23, 0x24, 0xFF, 0x97, 0x97, 0x97, 0xFF, + 0xD2, 0xD2, 0xD2, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC2, 0xC4, 0xC5, 0xFF, + 0x9B, 0x98, 0x95, 0xFF, 0xE6, 0x89, 0x28, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, + 0xFB, 0x90, 0x1A, 0xFF, 0x4B, 0x2D, 0x0D, 0x8C, 0x00, 0x00, 0x00, 0x1C, + 0x39, 0x39, 0x39, 0x03, 0x15, 0x15, 0x15, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x94, 0x94, 0x94, 0xB3, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, + 0x93, 0x93, 0x93, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x57, 0x57, 0x57, 0xFF, + 0x62, 0x62, 0x62, 0xFF, 0x73, 0x76, 0x7A, 0xFF, 0xC7, 0x7E, 0x30, 0xFF, + 0xFF, 0x91, 0x12, 0xFF, 0x99, 0x6D, 0x3E, 0xFF, 0x4E, 0x53, 0x58, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xD2, 0xD2, 0xD3, 0xFF, + 0xB7, 0xB8, 0xB9, 0xFF, 0xE2, 0x91, 0x3D, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFA, 0x8E, 0x18, 0xFF, + 0x8C, 0x55, 0x1A, 0xFF, 0x30, 0x2F, 0x2F, 0xFF, 0x7E, 0x81, 0x85, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, + 0xCD, 0xCD, 0xCD, 0xFF, 0xC4, 0xC4, 0xC3, 0xFF, 0x9C, 0xA2, 0xA8, 0xFF, + 0xB6, 0x84, 0x50, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFF, 0x8E, 0x12, 0xFF, + 0xC2, 0x89, 0x4E, 0xFF, 0x1A, 0x1D, 0x21, 0x5A, 0x16, 0x16, 0x16, 0x05, + 0x33, 0x33, 0x33, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x93, 0x93, 0x93, 0xB3, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x93, 0x93, 0x93, 0xFF, + 0x88, 0x8A, 0x8C, 0xFF, 0x7C, 0x6F, 0x62, 0xFF, 0xF3, 0x8B, 0x1B, 0xFF, + 0xED, 0x87, 0x1A, 0xFF, 0x6C, 0x62, 0x59, 0xFF, 0x46, 0x48, 0x49, 0xFF, + 0x3F, 0x3F, 0x3F, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, + 0xC3, 0xC6, 0xC9, 0xFF, 0xBC, 0xA5, 0x8D, 0xFF, 0xF9, 0x8C, 0x19, 0xFF, + 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, + 0xFF, 0x92, 0x17, 0xFF, 0xD2, 0x7F, 0x26, 0xFF, 0x7A, 0x65, 0x50, 0xFF, + 0x74, 0x79, 0x7F, 0xFF, 0x9A, 0x9D, 0xA0, 0xFF, 0xB1, 0xB2, 0xB2, 0xFF, + 0xB2, 0xB3, 0xB4, 0xFF, 0x94, 0x9A, 0xA0, 0xFF, 0xA4, 0x81, 0x5D, 0xFF, + 0xF8, 0x8C, 0x16, 0xFF, 0xFE, 0x8D, 0x12, 0xFF, 0xC5, 0x89, 0x4B, 0xFF, + 0xA0, 0xA1, 0xA3, 0xFF, 0x2E, 0x2F, 0x2F, 0x43, 0x4A, 0x4A, 0x4A, 0x00, + 0x14, 0x14, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x92, 0x92, 0x92, 0xB3, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, + 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, + 0x77, 0x7B, 0x81, 0xFF, 0xA2, 0x74, 0x43, 0xFF, 0xFF, 0x92, 0x12, 0xFF, + 0xB7, 0x73, 0x2D, 0xFF, 0x5F, 0x63, 0x68, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, + 0x5B, 0x5B, 0x5B, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, + 0xCB, 0xCA, 0xCB, 0xFF, 0xB9, 0xBD, 0xC2, 0xFF, 0xCC, 0x9A, 0x68, 0xFF, + 0xFE, 0x8D, 0x12, 0xFF, 0xFE, 0x8E, 0x17, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xF3, 0x89, 0x18, 0xFF, + 0xAE, 0x6F, 0x2E, 0xFF, 0x7F, 0x67, 0x50, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, + 0x74, 0x72, 0x71, 0xFF, 0xB3, 0x7E, 0x47, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, + 0xF1, 0x8C, 0x20, 0xFF, 0xB7, 0x8D, 0x63, 0xFF, 0xA3, 0xA6, 0xA9, 0xFF, + 0xC3, 0xC3, 0xC4, 0xFF, 0x4C, 0x4C, 0x4C, 0x3C, 0x0F, 0x0F, 0x0F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x91, 0x91, 0x91, 0xB3, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, + 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x89, 0x89, 0xFF, + 0x6F, 0x70, 0x71, 0xFF, 0xD6, 0x81, 0x27, 0xFF, 0xFD, 0x8F, 0x14, 0xFF, + 0x7E, 0x63, 0x46, 0xFF, 0x63, 0x66, 0x6A, 0xFF, 0x31, 0x31, 0x31, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCB, 0xCB, 0xCB, 0xFF, 0xC8, 0xC8, 0xC9, 0xFF, 0xB5, 0xB8, 0xBB, 0xFF, + 0xCD, 0x99, 0x62, 0xFF, 0xFC, 0x8D, 0x15, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, 0xD0, 0x7B, 0x20, 0xFF, + 0xD4, 0x7D, 0x20, 0xFF, 0xF1, 0x88, 0x15, 0xFF, 0xAA, 0x6F, 0x2F, 0xFF, + 0x8A, 0x7F, 0x75, 0xFF, 0xA4, 0xA9, 0xAD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xD0, 0xCF, 0xCF, 0xFF, 0x81, 0x81, 0x81, 0x3B, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x90, 0x90, 0x90, 0xB3, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, + 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x7D, 0x80, 0x83, 0xFF, + 0x82, 0x6C, 0x57, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, 0xDC, 0x80, 0x1F, 0xFF, + 0x63, 0x61, 0x5F, 0xFF, 0x62, 0x63, 0x64, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, + 0x98, 0x98, 0x98, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, + 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC6, 0xC7, 0xC8, 0xFF, + 0xB6, 0xBA, 0xBE, 0xFF, 0xBF, 0x9F, 0x7F, 0xFF, 0xEC, 0x8F, 0x2B, 0xFF, + 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x17, 0xFF, + 0xFF, 0x91, 0x17, 0xFF, 0xE3, 0x81, 0x19, 0xFF, 0x76, 0x56, 0x32, 0xFF, + 0x61, 0x64, 0x67, 0xFF, 0x8E, 0x91, 0x95, 0xFF, 0xB3, 0xB3, 0xB4, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0x55, 0x55, 0x55, 0x3B, 0x12, 0x12, 0x12, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x8F, 0x8F, 0x8F, 0xB3, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, + 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x6F, 0x74, 0x79, 0xFF, + 0xB0, 0x76, 0x38, 0xFF, 0xFF, 0x93, 0x12, 0xFF, 0xA4, 0x6B, 0x31, 0xFF, + 0x65, 0x6B, 0x6F, 0xFF, 0x5B, 0x5A, 0x5A, 0xFF, 0x34, 0x34, 0x34, 0xFF, + 0xAA, 0xAA, 0xAA, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xB1, 0xB5, 0xBA, 0xFF, 0x93, 0x90, 0x8E, 0xFF, + 0xAA, 0x76, 0x40, 0xFF, 0xF3, 0x89, 0x19, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, + 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, + 0xCC, 0x7A, 0x23, 0xFF, 0x7F, 0x65, 0x4A, 0xFF, 0x74, 0x78, 0x7C, 0xFF, + 0xA1, 0xA3, 0xA4, 0xFF, 0x2E, 0x2E, 0x2E, 0x44, 0x43, 0x43, 0x43, 0x00, + 0x1D, 0x1D, 0x1D, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x8E, 0x8E, 0x8E, 0xB3, 0x86, 0x86, 0x86, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, + 0x87, 0x87, 0x87, 0xFF, 0x81, 0x82, 0x83, 0xFF, 0x6E, 0x6A, 0x67, 0xFF, + 0xE3, 0x85, 0x20, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, 0x72, 0x5C, 0x47, 0xFF, + 0x73, 0x76, 0x79, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x3C, 0x3C, 0x3C, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, + 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC5, 0xC4, 0xC4, 0xFF, + 0xAF, 0xB2, 0xB4, 0xFF, 0x8D, 0x91, 0x95, 0xFF, 0x8B, 0x79, 0x68, 0xFF, + 0xB7, 0x78, 0x35, 0xFF, 0xF7, 0x8A, 0x15, 0xFF, 0xE7, 0x89, 0x26, 0xFF, + 0xE7, 0x8A, 0x28, 0xFF, 0xFE, 0x8D, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xF8, 0x8C, 0x16, 0xFF, 0xB4, 0x72, 0x2D, 0xFF, + 0x72, 0x6B, 0x65, 0xFF, 0x1A, 0x1D, 0x20, 0x64, 0x04, 0x04, 0x04, 0x0C, + 0x39, 0x39, 0x39, 0x01, 0x03, 0x03, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x8C, 0x8C, 0x8C, 0xB3, 0x84, 0x84, 0x84, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0x75, 0x79, 0x7D, 0xFF, 0x8A, 0x6B, 0x4C, 0xFF, + 0xFE, 0x90, 0x15, 0xFF, 0xD2, 0x7C, 0x21, 0xFF, 0x5B, 0x5C, 0x5C, 0xFF, + 0x7D, 0x7E, 0x7E, 0xFF, 0x4A, 0x4A, 0x4A, 0xFF, 0x39, 0x39, 0x39, 0xFF, + 0x64, 0x64, 0x64, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x67, 0x67, 0x67, 0xFF, + 0x69, 0x69, 0x69, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x57, 0x5B, 0x5F, 0xFF, + 0x6B, 0x5E, 0x51, 0xFF, 0xBF, 0x7D, 0x37, 0xFF, 0xF8, 0x8C, 0x17, 0xFF, + 0xFD, 0x8E, 0x16, 0xFF, 0xBF, 0x88, 0x4F, 0xFF, 0x99, 0x94, 0x90, 0xFF, + 0xA2, 0x9F, 0x9C, 0xFF, 0xBD, 0x99, 0x75, 0xFF, 0xE1, 0x8F, 0x39, 0xFF, + 0xFD, 0x8D, 0x16, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x15, 0xFF, + 0xD5, 0x80, 0x23, 0xFF, 0x26, 0x1B, 0x0F, 0x9A, 0x00, 0x00, 0x00, 0x36, + 0x00, 0x00, 0x00, 0x0C, 0x26, 0x26, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x8B, 0x8B, 0x8B, 0xB3, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0xBE, 0x78, 0x30, 0xFF, + 0xFF, 0x93, 0x13, 0xFF, 0x98, 0x67, 0x33, 0xFF, 0x61, 0x66, 0x6B, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x32, 0x32, 0x32, 0xFF, + 0x2F, 0x2F, 0x2F, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, + 0x2D, 0x2C, 0x2D, 0xFF, 0x1E, 0x22, 0x27, 0xFF, 0x60, 0x3D, 0x1A, 0xFF, + 0xE1, 0x7F, 0x13, 0xFF, 0xFF, 0x91, 0x13, 0xFF, 0xF0, 0x8A, 0x1C, 0xFF, + 0x9E, 0x84, 0x69, 0xFF, 0x9D, 0xA3, 0xA8, 0xFF, 0xBA, 0xBB, 0xBC, 0xFF, + 0xC0, 0xC1, 0xC2, 0xFF, 0xB8, 0xBC, 0xC0, 0xFF, 0xAD, 0xAD, 0xAF, 0xFF, + 0xB9, 0x9B, 0x7D, 0xFF, 0xE4, 0x8E, 0x34, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, + 0xFE, 0x8E, 0x17, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFF, 0x93, 0x17, 0xFF, 0xBF, 0x6B, 0x11, 0xE7, 0x0C, 0x06, 0x01, 0x76, + 0x00, 0x00, 0x00, 0x27, 0x22, 0x22, 0x22, 0x05, 0x15, 0x15, 0x15, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x8A, 0x8A, 0x8A, 0xB3, 0x81, 0x81, 0x81, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x7A, 0x7B, 0x7D, 0xFF, 0x6F, 0x66, 0x5D, 0xFF, 0xEE, 0x88, 0x1C, 0xFF, + 0xF5, 0x8A, 0x18, 0xFF, 0x68, 0x58, 0x48, 0xFF, 0x6F, 0x72, 0x74, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x60, 0x60, 0x60, 0xFF, + 0x5F, 0x5F, 0x5F, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, + 0x4B, 0x4F, 0x53, 0xFF, 0x73, 0x52, 0x2F, 0xFF, 0xF6, 0x8C, 0x17, 0xFF, + 0xFF, 0x91, 0x17, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, 0x9B, 0x7D, 0x60, 0xFF, + 0x9D, 0xA2, 0xA8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xB7, 0xBB, 0xBF, 0xFF, 0xAB, 0xA9, 0xA9, 0xFF, 0xC7, 0x94, 0x60, 0xFF, + 0xF9, 0x8D, 0x1A, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0x7D, 0x47, 0x0B, 0xC7, + 0x00, 0x00, 0x00, 0x50, 0x06, 0x06, 0x06, 0x13, 0x0F, 0x0F, 0x0F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x89, 0x89, 0x89, 0xB3, 0x7F, 0x7F, 0x7F, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, + 0x6D, 0x71, 0x76, 0xFF, 0x95, 0x6C, 0x42, 0xFF, 0xFF, 0x92, 0x14, 0xFF, + 0xC7, 0x77, 0x23, 0xFF, 0x57, 0x59, 0x5B, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, + 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x79, 0x7B, 0x7C, 0xFF, + 0x72, 0x66, 0x5A, 0xFF, 0xED, 0x89, 0x1E, 0xFF, 0xFF, 0x90, 0x17, 0xFF, + 0xFF, 0x8F, 0x14, 0xFF, 0xB5, 0x7B, 0x3F, 0xFF, 0x8D, 0x93, 0x99, 0xFF, + 0xBB, 0xBB, 0xBA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xC7, 0xC7, 0xC7, 0xFF, 0xC0, 0xC1, 0xC1, 0xFF, 0xAD, 0xB3, 0xB8, 0xFF, + 0xB7, 0x98, 0x7B, 0xFF, 0xF5, 0x8D, 0x1E, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, + 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xEB, 0x85, 0x16, 0xF9, + 0x20, 0x11, 0x03, 0x86, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x05, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x87, 0x87, 0x87, 0xB3, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x80, 0x80, 0x80, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, + 0x65, 0x67, 0x6A, 0xFF, 0xCA, 0x7C, 0x2A, 0xFF, 0xFF, 0x92, 0x14, 0xFF, + 0x8A, 0x61, 0x36, 0xFF, 0x5F, 0x64, 0x69, 0xFF, 0x7D, 0x7C, 0x7C, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x67, 0x6B, 0x70, 0xFF, + 0xB0, 0x74, 0x34, 0xFF, 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, + 0xED, 0x87, 0x1C, 0xFF, 0x83, 0x79, 0x6F, 0xFF, 0xAA, 0xAC, 0xAE, 0xFF, + 0xC0, 0xC0, 0xC0, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xC6, 0xC6, 0xC6, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, + 0x81, 0x81, 0x81, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, + 0xAE, 0xB4, 0xBA, 0xFF, 0xB8, 0x95, 0x72, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, + 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0x72, 0x3F, 0x0A, 0xBC, 0x00, 0x00, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x0C, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x86, 0x86, 0x86, 0xB3, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, 0x2F, 0x30, 0x32, 0xFF, + 0x4F, 0x42, 0x35, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xEF, 0x88, 0x19, 0xFF, + 0x60, 0x55, 0x4B, 0xFF, 0x71, 0x72, 0x74, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, + 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x7A, 0x7B, 0xFF, 0x6B, 0x66, 0x61, 0xFF, + 0xE5, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, + 0xC3, 0x7B, 0x2F, 0xFF, 0x82, 0x86, 0x8B, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xC5, 0xC5, 0xC5, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xA2, 0xA2, 0xA2, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x3C, 0x3C, 0x3C, 0xFF, + 0x2A, 0x2A, 0x2A, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, + 0xBE, 0xBF, 0xBF, 0xFF, 0xA6, 0xA9, 0xAE, 0xFF, 0xD7, 0x8D, 0x41, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, + 0xB3, 0x65, 0x10, 0xDE, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x14, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x85, 0x85, 0x85, 0xB3, 0x7B, 0x7B, 0x7B, 0xFF, + 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7B, 0x7B, 0x7B, 0xFF, 0x69, 0x68, 0x68, 0xFF, 0x3D, 0x42, 0x47, 0xFF, + 0x78, 0x4E, 0x22, 0xFF, 0xFF, 0x95, 0x16, 0xFF, 0xB1, 0x67, 0x18, 0xFF, + 0x2C, 0x2F, 0x33, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x72, 0x72, 0x72, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, + 0x7E, 0x7E, 0x7E, 0xFF, 0x74, 0x77, 0x7A, 0xFF, 0x81, 0x6A, 0x52, 0xFF, + 0xFB, 0x8D, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, + 0xA5, 0x73, 0x40, 0xFF, 0x88, 0x8D, 0x92, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, + 0x95, 0x95, 0x95, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, + 0x31, 0x31, 0x31, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x54, 0x54, 0x54, 0xFF, + 0x8F, 0x8F, 0x8F, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, + 0xBF, 0xBF, 0xBF, 0xFF, 0xB3, 0xB6, 0xBA, 0xFF, 0xB1, 0x94, 0x75, 0xFF, + 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, + 0xD3, 0x76, 0x14, 0xED, 0x07, 0x03, 0x00, 0x61, 0x00, 0x00, 0x00, 0x19, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x83, 0x83, 0x83, 0xB3, 0x79, 0x79, 0x79, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x63, 0x66, 0x6A, 0xFF, + 0xC4, 0x79, 0x2A, 0xFF, 0xFF, 0x93, 0x15, 0xFF, 0x6F, 0x4B, 0x26, 0xFF, + 0x2A, 0x2E, 0x33, 0xFF, 0x33, 0x33, 0x33, 0xFF, 0x33, 0x33, 0x33, 0xFF, + 0x37, 0x37, 0x37, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x45, 0x45, 0x45, 0xFF, + 0x4C, 0x4C, 0x4C, 0xFF, 0x43, 0x47, 0x4C, 0xFF, 0x81, 0x5A, 0x32, 0xFF, + 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x17, 0xFF, + 0x6F, 0x4A, 0x23, 0xFF, 0x2F, 0x33, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, + 0x2E, 0x2E, 0x2E, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x48, 0x48, 0x48, 0xFF, + 0x71, 0x71, 0x71, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xBE, 0xBE, 0xBE, 0xFF, 0xB9, 0xBB, 0xBC, 0xFF, 0xA3, 0x9A, 0x92, 0xFF, + 0xF1, 0x8B, 0x20, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, 0xFF, 0x90, 0x18, 0xFF, + 0xDE, 0x7C, 0x15, 0xF2, 0x0F, 0x08, 0x01, 0x65, 0x00, 0x00, 0x00, 0x1A, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x83, 0x83, 0x83, 0xB3, 0x78, 0x78, 0x78, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, + 0x79, 0x79, 0x79, 0xFF, 0x73, 0x74, 0x76, 0xFF, 0x6A, 0x61, 0x59, 0xFF, + 0xEE, 0x88, 0x1C, 0xFF, 0xE8, 0x84, 0x1B, 0xFF, 0x59, 0x53, 0x4C, 0xFF, + 0x69, 0x6A, 0x6B, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, + 0x50, 0x50, 0x50, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, + 0x3A, 0x3A, 0x3A, 0xFF, 0x2B, 0x30, 0x34, 0xFF, 0x82, 0x52, 0x22, 0xFF, + 0xFF, 0x92, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, + 0x60, 0x41, 0x21, 0xFF, 0x3D, 0x41, 0x45, 0xFF, 0x68, 0x68, 0x68, 0xFF, + 0x85, 0x85, 0x85, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBD, 0xBD, 0xBD, 0xFF, 0xBB, 0xBB, 0xBC, 0xFF, 0x9F, 0x9D, 0x9C, 0xFF, + 0xE7, 0x8A, 0x2A, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x91, 0x18, 0xFF, + 0xD7, 0x78, 0x14, 0xEE, 0x0A, 0x05, 0x01, 0x5E, 0x00, 0x00, 0x00, 0x17, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x0F, 0x0F, 0x0F, 0x00, 0x82, 0x82, 0x82, 0xB3, 0x77, 0x77, 0x77, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, + 0x78, 0x78, 0x78, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x85, 0x66, 0x46, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0xAF, 0x6D, 0x29, 0xFF, 0x52, 0x56, 0x5B, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, + 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x73, 0x73, 0x73, 0xFF, 0x62, 0x67, 0x6C, 0xFF, 0x9A, 0x6C, 0x3D, 0xFF, + 0xFF, 0x90, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8D, 0x15, 0xFF, + 0x86, 0x69, 0x4A, 0xFF, 0x94, 0x97, 0x9B, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, + 0xC1, 0xC1, 0xC1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, + 0xE2, 0x8A, 0x2D, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x92, 0x19, 0xFF, + 0xC0, 0x6C, 0x12, 0xE0, 0x01, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x10, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x81, 0x81, 0x81, 0xB3, 0x75, 0x75, 0x75, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x60, 0x64, 0x6A, 0xFF, 0xB0, 0x72, 0x32, 0xFF, + 0xFF, 0x91, 0x14, 0xFF, 0x76, 0x58, 0x3A, 0xFF, 0x5E, 0x61, 0x66, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, + 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, + 0x77, 0x77, 0x77, 0xFF, 0x6D, 0x70, 0x75, 0xFF, 0x8F, 0x6D, 0x4A, 0xFF, + 0xFF, 0x8F, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, + 0x8D, 0x69, 0x42, 0xFF, 0x8B, 0x8E, 0x93, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, + 0xBB, 0xBB, 0xBB, 0xFF, 0xB6, 0xB7, 0xB8, 0xFF, 0x98, 0x95, 0x93, 0xFF, + 0xE7, 0x89, 0x27, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0x90, 0x50, 0x0C, 0xC1, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x09, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x80, 0x80, 0x80, 0xB3, 0x74, 0x74, 0x74, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x72, 0x73, 0x73, 0xFF, 0x5F, 0x5E, 0x5D, 0xFF, 0xDE, 0x82, 0x21, 0xFF, + 0xE7, 0x83, 0x1A, 0xFF, 0x54, 0x4F, 0x4A, 0xFF, 0x6A, 0x6B, 0x6C, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x70, 0x72, 0x74, 0xFF, 0x77, 0x68, 0x59, 0xFF, + 0xF5, 0x8B, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x15, 0xFF, + 0xA2, 0x6C, 0x33, 0xFF, 0x79, 0x7E, 0x83, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, + 0xBA, 0xBA, 0xBA, 0xFF, 0xAF, 0xB0, 0xB2, 0xFF, 0x98, 0x8A, 0x7D, 0xFF, + 0xF4, 0x8B, 0x1B, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, 0xFE, 0x90, 0x19, 0xFF, + 0x45, 0x27, 0x06, 0x8B, 0x00, 0x00, 0x00, 0x1E, 0x1F, 0x1F, 0x1F, 0x03, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x80, 0x80, 0x80, 0xB3, 0x73, 0x73, 0x73, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x6A, 0x6C, 0x6F, 0xFF, 0x73, 0x60, 0x4C, 0xFF, 0xFC, 0x8F, 0x17, 0xFF, + 0xBA, 0x71, 0x24, 0xFF, 0x4D, 0x51, 0x56, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, + 0x75, 0x75, 0x75, 0xFF, 0x73, 0x74, 0x74, 0xFF, 0x65, 0x67, 0x69, 0xFF, + 0xCD, 0x7E, 0x2B, 0xFF, 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x90, 0x17, 0xFF, + 0xCE, 0x7A, 0x21, 0xFF, 0x64, 0x65, 0x67, 0xFF, 0xA0, 0xA0, 0xA1, 0xFF, + 0xB6, 0xB6, 0xB6, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xB7, 0xB7, 0xB7, 0xFF, 0x9A, 0x9F, 0xA5, 0xFF, 0xAB, 0x81, 0x54, 0xFF, + 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xC8, 0x70, 0x13, 0xE1, + 0x08, 0x04, 0x01, 0x4A, 0x08, 0x08, 0x08, 0x0E, 0x3C, 0x3C, 0x3C, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x7F, 0x7F, 0x7F, 0xB8, 0x73, 0x73, 0x73, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x75, 0x75, 0xFF, + 0x61, 0x66, 0x6B, 0xFF, 0x9F, 0x6C, 0x37, 0xFF, 0xFF, 0x93, 0x13, 0xFF, + 0x8D, 0x61, 0x32, 0xFF, 0x57, 0x5C, 0x61, 0xFF, 0x73, 0x72, 0x72, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, + 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6B, 0x6E, 0x72, 0xFF, + 0x8A, 0x6E, 0x50, 0xFF, 0xFD, 0x90, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, + 0xFA, 0x8D, 0x17, 0xFF, 0x7C, 0x5D, 0x3D, 0xFF, 0x76, 0x7B, 0x81, 0xFF, + 0xAB, 0xAB, 0xAB, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, + 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, + 0xA8, 0xAA, 0xAC, 0xFF, 0x85, 0x81, 0x7E, 0xFF, 0xE1, 0x86, 0x25, 0xFF, + 0xFF, 0x90, 0x16, 0xFF, 0xFB, 0x8F, 0x18, 0xFE, 0x48, 0x28, 0x06, 0x86, + 0x00, 0x00, 0x00, 0x1E, 0x3C, 0x3C, 0x3C, 0x03, 0x11, 0x11, 0x11, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x10, 0x10, 0x10, 0x00, 0x82, 0x82, 0x82, 0x87, 0x72, 0x72, 0x72, 0xC6, + 0x74, 0x74, 0x74, 0xC3, 0x73, 0x73, 0x73, 0xC3, 0x61, 0x61, 0x61, 0xC4, + 0x4B, 0x4B, 0x4C, 0xCF, 0xD0, 0x7B, 0x22, 0xF9, 0xFC, 0x8E, 0x16, 0xFF, + 0x5A, 0x44, 0x2E, 0xDE, 0x4A, 0x4D, 0x4F, 0xC9, 0x68, 0x68, 0x68, 0xC3, + 0x75, 0x75, 0x75, 0xC3, 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, + 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, + 0x74, 0x74, 0x74, 0xC3, 0x75, 0x75, 0x75, 0xC3, 0x6A, 0x6A, 0x6A, 0xC3, + 0x4C, 0x4F, 0x53, 0xC5, 0xA7, 0x69, 0x27, 0xD9, 0xFF, 0x92, 0x16, 0xFF, + 0xFF, 0x90, 0x17, 0xFF, 0xE1, 0x83, 0x1C, 0xFF, 0x5F, 0x50, 0x41, 0xF1, + 0x60, 0x63, 0x68, 0xDA, 0x83, 0x83, 0x83, 0xCE, 0x90, 0x90, 0x90, 0xC7, + 0x93, 0x93, 0x93, 0xC5, 0x95, 0x95, 0x95, 0xC3, 0x95, 0x95, 0x95, 0xC3, + 0x93, 0x93, 0x93, 0xC5, 0x8F, 0x8F, 0x8F, 0xC7, 0x7F, 0x81, 0x83, 0xCD, + 0x68, 0x69, 0x6B, 0xDC, 0xBF, 0x7C, 0x36, 0xFD, 0xFF, 0x90, 0x15, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0x85, 0x4A, 0x0B, 0xAE, 0x00, 0x00, 0x00, 0x2E, + 0x17, 0x17, 0x17, 0x09, 0x40, 0x40, 0x40, 0x00, 0x03, 0x03, 0x03, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x1F, 0x1F, 0x1F, 0x00, 0x1A, 0x1A, 0x1A, 0x01, + 0x1A, 0x1A, 0x1A, 0x00, 0x1C, 0x1C, 0x1C, 0x00, 0x0F, 0x10, 0x11, 0x05, + 0x21, 0x12, 0x02, 0x4D, 0xF4, 0x8A, 0x17, 0xF7, 0xD5, 0x77, 0x14, 0xEE, + 0x0A, 0x05, 0x00, 0x62, 0x0D, 0x0E, 0x0E, 0x13, 0x34, 0x34, 0x34, 0x00, + 0x1B, 0x1B, 0x1B, 0x00, 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, + 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, + 0x1A, 0x1A, 0x1A, 0x00, 0x1B, 0x1B, 0x1B, 0x00, 0x1C, 0x1C, 0x1C, 0x00, + 0x29, 0x2A, 0x2A, 0x03, 0x09, 0x04, 0x00, 0x20, 0xA8, 0x60, 0x14, 0xC8, + 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xD5, 0x78, 0x13, 0xF0, + 0x3B, 0x1F, 0x04, 0xA4, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x02, 0x3A, + 0x00, 0x01, 0x03, 0x27, 0x02, 0x03, 0x05, 0x20, 0x01, 0x03, 0x05, 0x1F, + 0x00, 0x00, 0x03, 0x27, 0x00, 0x00, 0x02, 0x39, 0x19, 0x0E, 0x03, 0x69, + 0xA0, 0x5A, 0x0D, 0xC9, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x94, 0x19, 0xFF, + 0x92, 0x53, 0x0D, 0xB5, 0x01, 0x00, 0x00, 0x36, 0x0E, 0x0E, 0x0F, 0x0D, + 0x4D, 0x4D, 0x4D, 0x01, 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, + 0x53, 0x2E, 0x07, 0x74, 0xFF, 0x97, 0x1A, 0xFF, 0xB0, 0x63, 0x11, 0xDB, + 0x00, 0x00, 0x00, 0x54, 0x1D, 0x1E, 0x1E, 0x11, 0x4D, 0x4D, 0x4D, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x39, 0x39, 0x39, 0x00, 0x2D, 0x2E, 0x2F, 0x00, 0x0F, 0x0F, 0x10, 0x6A, + 0x92, 0x5D, 0x25, 0xFF, 0xF2, 0x8A, 0x19, 0xFF, 0xFF, 0x97, 0x19, 0xFF, + 0xF9, 0x8D, 0x17, 0xFF, 0x9E, 0x59, 0x0E, 0xD5, 0x4A, 0x29, 0x06, 0xA3, + 0x24, 0x13, 0x02, 0x82, 0x15, 0x0A, 0x01, 0x74, 0x1F, 0x10, 0x01, 0x77, + 0x3D, 0x22, 0x04, 0x8D, 0x82, 0x48, 0x0C, 0xBA, 0xE4, 0x80, 0x15, 0xF3, + 0xFF, 0x99, 0x1A, 0xFF, 0xEC, 0x87, 0x17, 0xF2, 0x6F, 0x3E, 0x0A, 0x95, + 0x00, 0x00, 0x00, 0x2E, 0x0F, 0x0F, 0x10, 0x0C, 0x4C, 0x4C, 0x4C, 0x01, + 0x0E, 0x0E, 0x0E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x17, 0x17, 0x17, 0x00, 0x07, 0x09, 0x0A, 0x02, + 0x7D, 0x44, 0x0A, 0x8C, 0xFF, 0x9D, 0x1A, 0xFF, 0xE3, 0x81, 0x16, 0xF0, + 0x12, 0x09, 0x00, 0x4D, 0x19, 0x1B, 0x1C, 0x0D, 0x4F, 0x4F, 0x4F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x37, 0x37, 0x37, 0x00, 0x21, 0x21, 0x22, 0x1D, + 0x26, 0x2B, 0x2F, 0xED, 0x4F, 0x3C, 0x29, 0xF3, 0x9C, 0x59, 0x0F, 0xAF, + 0xE2, 0x80, 0x15, 0xE5, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x96, 0x19, 0xFF, + 0xFB, 0x8D, 0x17, 0xFF, 0xF2, 0x87, 0x17, 0xFE, 0xF8, 0x8B, 0x17, 0xFF, + 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x95, 0x19, 0xFF, 0xE3, 0x81, 0x15, 0xE9, + 0x92, 0x52, 0x0E, 0xAB, 0x26, 0x14, 0x01, 0x53, 0x00, 0x00, 0x00, 0x19, + 0x10, 0x10, 0x11, 0x08, 0x3F, 0x3F, 0x3F, 0x01, 0x0F, 0x0F, 0x0F, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x0C, 0x0C, 0x0C, 0x00, 0x2C, 0x2D, 0x2D, 0x02, + 0x20, 0x0F, 0x00, 0x31, 0x71, 0x40, 0x08, 0x82, 0x5B, 0x32, 0x06, 0x72, + 0x00, 0x00, 0x00, 0x24, 0x1A, 0x1B, 0x1B, 0x06, 0x2D, 0x2D, 0x2D, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, 0x05, 0x05, 0x00, + 0x33, 0x33, 0x33, 0x9F, 0x32, 0x34, 0x37, 0xFE, 0x0A, 0x0D, 0x10, 0x5E, + 0x11, 0x09, 0x00, 0x24, 0x38, 0x1C, 0x00, 0x59, 0x63, 0x36, 0x05, 0x7D, + 0x7D, 0x45, 0x0B, 0x96, 0x89, 0x4C, 0x0D, 0x9F, 0x81, 0x48, 0x0D, 0x9A, + 0x69, 0x3B, 0x09, 0x85, 0x3C, 0x1F, 0x01, 0x61, 0x0E, 0x06, 0x00, 0x37, + 0x00, 0x00, 0x02, 0x16, 0x10, 0x13, 0x15, 0x09, 0x2A, 0x2A, 0x2A, 0x03, + 0x2A, 0x2A, 0x2A, 0x00, 0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x06, 0x06, 0x06, 0x00, 0x3A, 0x3A, 0x3A, 0x01, + 0x39, 0x3B, 0x3D, 0x01, 0x1B, 0x1F, 0x24, 0x01, 0x18, 0x1C, 0x20, 0x03, + 0x49, 0x4A, 0x4A, 0x04, 0x48, 0x48, 0x48, 0x01, 0x04, 0x04, 0x04, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x42, 0x42, 0x42, 0x37, 0x3D, 0x3D, 0x3D, 0xFF, 0x41, 0x41, 0x41, 0xB0, + 0x2A, 0x2C, 0x2D, 0x00, 0x3D, 0x40, 0x44, 0x00, 0x1E, 0x22, 0x27, 0x04, + 0x00, 0x05, 0x0A, 0x07, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, + 0x06, 0x0A, 0x0F, 0x07, 0x2C, 0x2F, 0x32, 0x04, 0x20, 0x21, 0x23, 0x03, + 0x2F, 0x2F, 0x2F, 0x01, 0x23, 0x23, 0x23, 0x00, 0x0D, 0x0D, 0x0D, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x14, 0x14, 0x14, 0x00, 0x0D, 0x0D, 0x0D, 0x00, 0x0C, 0x0C, 0x0C, 0x00, + 0x1A, 0x1A, 0x1A, 0x00, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x11, 0x11, 0x11, 0x01, 0x34, 0x34, 0x34, 0x65, 0x30, 0x30, 0x30, 0x2C, + 0x0E, 0x0E, 0x0E, 0x00, 0x19, 0x19, 0x19, 0x00, 0x0E, 0x0E, 0x0E, 0x00, + 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x06, 0x06, 0x06, 0x00, 0x12, 0x12, 0x12, 0x00, 0x0D, 0x0D, 0x0D, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 +}; + diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index e373719c2..90b7d14c9 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -461,6 +461,7 @@ struct gimp_image { // generate corresponding .h files with extern declarations, so just // #include the .c files here. #include "BasiliskII_32x32x32_icon.c" +#include "BasiliskII_48x48x32_icon.c" #include "BasiliskII_128x128x32_icon.c" // Set window icons @@ -477,6 +478,7 @@ static void set_window_icons(Window w) // Window Manager const struct gimp_image* const icons[] = {(struct gimp_image *) &icon_32x32x32, + (struct gimp_image *) &icon_48x48x32, (struct gimp_image *) &icon_128x128x32}; const unsigned int num_icons = sizeof(icons) / sizeof(icons[0]); unsigned int icon; diff --git a/BasiliskII/src/Windows/BasiliskII.ico b/BasiliskII/src/Windows/BasiliskII.ico index eb3ac0ef065e17dd4d66a244ce6c30c3f4a2c710..60901afda23a1497a8183520500068eca0309c75 100755 GIT binary patch literal 99550 zcmeF41)Nq@{{M#wx@+hd=}u{-8-|8~A%f1`U$_?pie@NXS>ybA%Muk>7U>4++`5B1cFK{k4Lx za`3MbXBR&gTi{{~Tx@}hEpV{~F1EnM7P!~~7hB+B3tVi0i!E@m1unM0#TK~O0-3Zx ze0+S<#*G^;<1s;0nq3}9&>O6eurI%X$`t?6;-MaN;GYkD6tLAyH zj@l>(v|`1IP-x)5fnkvU+h6B+-d}zm9~c)G*Rw%`2B(@eYi3ZBCQYnm%a%J-?i3yf ztc$N}+qP}PAr&PeJ>q&`yZGmv$KwCyk4naqw()h(t@AvhyrO)`NB+(!;-0YN-{|y@ z^-;OPYS*s)fXCh+WeavtQn1z`Oa#WcMAVgf<`)$Z6%vu5FOp0}1J3!L>)c1X&?fvo zrCoUbAGK{%&NDs%*wY@=hq_VclA=Hz%GiT0PqIx>7CGvHrjkpf)!vo0DAL`SnQKO>)xI6t{ty;DH zDrA@loWL9Gz#2TOil}1)QS`foGA2l3~@mM;DxM&+R1_zw>&@g>SuH zWa?v2*?smKUKP;Fs_}5`T{yH?Epw|2yz++O(;spYr7sc1dztNk_11 z7*?cWw}@K3Cq{HwmQY~m^*0xdf8degvtRym@n!G5Ut+~a|17cU(=Q^|e)V;U)t`S= zV);j(mRR=whsEc={#MaR4?JEV=D@A_IxN~2QLW3Au)M{h^}JT1Mxwf+>LPdn-2lHK zE41$)l@BNvdaFoy_3mBEB>eR6(mTycZBL@o@|sFtVOD&>8*hXs@juN?&%_;ZrDHcMb6(FfB*jC#fujZ z-f!URgL{Jp^{sx*s8hu&*Gdd;zhH5ZSuea$YRfM_d#oLAGnHvgm81j<6WDum~&(6RX1FTQmA z?(wG$HhlMEc!@e|b2@z3%HDBR78k6TFck`@%Yje@@GY;~ljX z&ndO#=bsBry8o%rsCKi|M(suL0X_z{GthtfBlytZkDZE=f7817yw~1vdN3J(>RfE< zQ}65g3ehN0TTxXJ_4wWJPsSeK#l>D#t5&_Pp=7>pjVO~@wsK3~u~OiKKKHyFc=T8$ z{&K4LqIbS55PRg6+?UV4FQQhj!=a^{Toqop`u6aA+-|$9w^=>zZhDU7Eb5@ELisp!>i>8R;MU#?=bH1A) zS`c2iMq;kZXWvn5*0b-G0&jTDzr!DS*Dm=^i{5-MyjqWC`dw#Ha}n)FtbpDnfAD+y z(fEIq0~^&eqV1fWfptL_6rKI@ry-%C3A#>ObQ0kMk`Kt`?XS*%lTQ%#$WYP3`NBrk zZr07pFL*gg=7q-@Sb&L>)t`SYG~$N0Lrc^?s^3zl6{5MK$)Y$BKHLCN9}zK6uVjkW zvA<}DXoLt^n4)%B98o{!P_fz1f8g3pmA!*lQvi5-bUk-guI z2gqgW{rG>_rp6H!T1+pM_|wnuw5ta^ELjOH6m_MpBLiJU*fR1SzbXC!*rW3)Gro2C zk_~zuF1PxlB<#KH1s&08C71sFyNFu-{-odR60H#->tjU>jAgZ5C z{M|&A<>)_vA1n(9Xfx~b8fnW2A;J->?mvk8s zx%RWK0?T`b{0aM_@%MimTCmbh`VBIVo(FgEYcB$C>V$2sASxrmM$;y|2jXvZHgbZk ztRaFYT8n5C^v0yHYF+mfU;f^g&i4r7L1!mamIA{LJtQ88(f#mSAP<}ue?W2)x@F6j zq6rBJ#WN%2#fz6OU%pI%0tKpxT84#%MHd}$<0Gkj0F}Ams9XLVDqW}RBl73Z-%eCp z@pk!3F1e(n;@M2!lUX@3y3X^fRH;&;a^=dAyi?_@o;Pnqqln6v506~^**`PF9vq5I zIPpn%&O$ebg@x`^PIFn_ym=?7{DX=XE!w$c$&xM0mMz<$LWK&o%9SfurDDa3dQIhu zs#kfvvz#aXj*5z^z;*6ZIjZYeuT-g0mn!yXTexuH-pVtL%#|y2THf+acb8uL))yt6 zy$R9-ia}`Gd;|BM6!zE>cmUpm=dfqU)H(Ttx7>0|^WnpX|6}afvF~R_Q>ILLU-ZHF z@#8;?jg9@dU+?apwiveN-z5Y6W}TN?`Tnm>TU_={=T05J7%*VKKSzxk_0hzM6F;0f zb?OJ1z2kgbr;L*)Pj=-T6+7&szJo@5Qf0;4-)Dq9?H@Jgack42%@4hL_V`x)g5S)X zIrB^L(`Si^iT~Wad-umzUw!pQ2M-?n@aWN_AKrN5jUOC4cI<6d8E7gL2S;PIa#7v zvu2raH1U898yaKX`VO~p>%R(!apemn{MQ z4-7|-jIqv>wpz(8lr0@UpSIojtu^ZrXMK8g70*nt#fuj^>?QAZ!wol>WZJ+E?7=cS z*!z1u58QRvU3UBJx0`f>Ntc-PisOMfGvcl5tOHg&O&yRFkCa&T@zdGzSfHn?9eYd&V11=;}cuQL6lwQbeZqN978?2BtxZ~>!W znLQtWQ!buO*`)t%+}JTTc=%Y0TK7rXGL`IaQPx^(*`N9YpS2)q9J>zy80vwF2nn-XsgR=jG(1MO*mUx+VIc>F!D2=CFN z&LaFl{7h#D&L+OjF8*NU^{e{OY-r42>(XzOmEHKS(>6fmudw1D*6Ol$)}u!^8#;8T zaW6XgLgSyLnfPe%$E+Y=L|NTfStW4V$sSN+td`9epKVV4I!F*=Xc7!koB}cmg{>evP<{cqdz* zv%wz>(dF0xWV=r<*?@)51?T{LfFG@C*HPBBQ+pdUXpr*(kjo3@10erA+spo-;p45+ z`p+|!{kmiJTXgsKt}gPUY}c+`CST3ze6aU2f8Txg+4&;R2k;d3jhB)24B@PCo}e)4$h0+rKODd;eW}NAC4@iFb@1KE&Eh z*_W~GV`n%0+uHOTVZ)@ucm{eO9I(w^=Y!Sx!aevoJR3cLKY)*U<&{_3nw3i}X5N)n zJUxF!_JDXGck5~7Cx(iM2das@4#-w4;PFqdZPWUmwn7J>Yl#Df#tgDfgC>!;Own85 zUuF8AtZkc1o zmpj=%eE6`#1KGTg*ux7vAN_)!!56sp+G{N_VYAJgx7ey~{4`zNMUJibyjMR84b6oP zAn%M0AU}*BkgZtYZ14vsQ#)_pE3!odszhSldUoE`R0rU}&k1Qf07Ra&=0Dth9H*a3H2pqheED_QB=1z@K-(Yw#R?0QrVZ>sDC*rN=VBUp7FoK%wDBo)^{= zMcqVoMC6_Gh_dVlo(uly0OZ-l0fPrvyV%8wwTZKnVr^us#-y8-2WVz}lk))BXYX&M zhi7)b2Y=!|V*XLX23h0z_h*9tDU00nA8Xrhyp4$);c`9reaIhj_*==o=P!5-o`d(4 zBeboFn{51&-4>bni`p_cC!GAZJRlj9ehsVI0~;=;T9foZ68D|cUEi&m_&s++z_&RwR3f07M|=(6U1p*%s< zMN~^f|06aaOP_PapSJflAZAb>Yc+01D&6aBz~tMkQ*thtI1oGSeSoy^%2NMT= zFT0i8A0S;@e$_{IS^KWC0ll0J;9h(He#n@dq4)og z;)A4RKf%AslGkm}z)!pL4+<+|c3Za%39W?kAb5y8JJx>@U7{qX7$3 zYykcuIs?8-3;#fj>5BntzVr5m-{R|GOGb_yX)!S|)~8P&>!MsE{W#OO8%!g{K@$te-AwHfT>N~@wemyk3V^U{riRg+KpB-6ZyxEMXvbxyU?7)HVW)m z5#y06iRcr`(g*yJL*M4vJ;DS0KE(zM=xvQt#es^o#HZC}oV1S01!_Ei^A+$Jyx+k) z!5QKlzM!uFe8HCdQI{@VO!H~2RjXFkqD2cgSC4r+jNy0Vxa-%q+BK?Jm1faaYP0b7 zW75)*n^JRMva)4LndX1m<(FUXd=qREeZKf$@B)1B=%bI?!w)~~&f$#UZz9K9Ypbda?lzQiJ3 zyC?a7l(XErFRWFkXcq_2XMnx{e~&f(BfJ65mtA(5n~Uf1_4Bj*Ts=Qe*U#JJIy_Lf zb`7g~X*cC{WqaWl65<*Qi8?qq-TJ(USspCNL0yekd&<*Mjx?Fx&Uq@ZLc6G7` zj)7Q%b0EeUo%{KFN%+^astwy)>GfY{j6ZsF@!M9aYz3<<{J|dFnF~ZYe0h@Q1~qWs zqkD*7SFT*?`iJn>ylyxjya4{#e{w+k_FQRm*6p)0i5i=pK|g@Irh6iy+FviQi2?k0 zYhr*bea;5|U><=VumQy2W5@)fp zKY;OM_()(aYuZ!mu2{#8 z9i42UYki#P`I9ku%a$#3#JMN*5B7(cAU0-z)mij(svN`__@h%3ezKl%3vA}}DMtLi zPcaw$Z;Z!UwQ7~iCHCyu)A^dX`nW2xs>$p(~~ z_p+6h&eiy6XLFHl{66{y@xS3IFy^@&!8o(B@qYYBe9BSMJ}H!h zajcVF`u&k#^f0&~$K>S5$8Fxc+3_Me$lHLl?1a}JT*Jr3Zv@-S_yGGs-huqXwbx#4 z%QjtQ6%+p>-!IvJPAi7tJL$2=4d4D0TD00;;g9~u{#O@e%l^}TnYD3R*ZCc~xPANf zP9M@X5WZB6sIpcudUen|8}++rY;e`f2HWLrS~y*f-p2m~_q5)TmG7`W=pJNm^vI#s zdGxA`{bsctW9*tuJ!%uj#5#H3yLYe4y%2+e2l7hX2Om8C_~Q;ku8}8(PrG&N=IV-G z0QX>j!M6qW3Y`L9@yuX?KLTz4{wsIbh>iDULH7%P{Mh9md>0y?f4eYej#+zARZ+J5 ze{l4=G^<&uqwuaW;S6T-X0k-UlBHUkq#lu?jx- zya1-y?X_#yI{%dVBm04TK)cYdn->1aK6-_`@3nicu!)=Q$lUIG{FxgRbKReX`7+Tk zQA<%pQI_+6vQ1sV-}_bBIbx%cJMuN~0QJNN!1iI!i33_q+8=~Nl1;m`?@a66qqDmg zyN&(!e3+dwa4)=o4!{PGR~$8Lu(cZ-6n_NCKRzKm&}F>FTTPwhd_ep^d;nw{{J}UY zgnfVV$tRuOK#zEtfDhmYbOhK3K8xq0XYet2=b`HlTEeznRyX0ZEXh9QXB=Qe({U$- z_dF3}0Gf#WSWum2{sDj5E~{0m^%p*F6UL5kc^$?8kbm($ z05TtlS!U<>3fKqk!%rACY?!l;Jkx*AHL&-3AAN(}*}HqY_1*kz*6cpKjPJMptN&`A z>a{|7x`?sB^+b#TVop$&KHyK=f$O;twg6s07QHS;2Mih1&uT4x@eCVKUSk8>c4EF& zUpF=!-tln=xM#O4ychkE5(f_HYt5z{Nu7f_LkBR|{s$X4exWUxH{00&@;UUwdm8{= z;F?_mZ}^9Nj{hys;yaH$`5t)V+I_oia^i7~_Ytm{`TWUsK=unyJo%nLrtb&ekK8Z5 zzaIyz)672}fAI4Z*!FzK-)UX*_XS=9JFkn;>n;~G;mq-P=-#G-mRRrZol4PC2LqCI;$1l4_ z>;ini?}D+Xe+ip^;OeVv?$%?;@m>af7D2p=?-$W%#Gi!lVi99NTZk%&3W;)xvh)Fe zWXEH8u17H9dB`#{Jw`dX=pkdy@W-(M)o0$Xv7v2J*#Pg0WVamtyx}M)kH8RrjGRoI=Hs*VAR{k)ss`&b}ugvO-~)R@3EAEuh49Lx*MyKO)B zHqFJJqIp1@T`rjMU|@#5_I3cBo*8-B5A^e}^|#z|s~x%iI@`7TDjSgaf^gRu`Al>C z_yng3?2F8J>a&p0Fl3+kAALlPMS){~bLj6ZeZU{N@ojiMj^MyE(Z%@n)Bcp(}_3@d5ZfW#Q=Zx|&0dKTST3J|1$$%q@rLPYyh%Z?1Rm z-Y!Siv12D|)1tA}X+P8=*L;>bA05!HZoHcMQv1!^X-gI)*#YKfBd=NI0groHGJm6d z`~%lqWy`i7wPpz)Cj0s6*`(8W2V$QTL;dt?c-78#3*122$L}NOmq!#P%JL@=|3KNI z?SthjJG|j_0P+le!(;kclbLs%VFSu&tY({@!)!p`XgA)6Tp)Y{?!2GhlUE?WkRJKG zqrdLsZgO(;>(;1I!>Uw>v+m7A)Y}l5ktbF2+S_DZBUs>GjjkbFEB7+B*qfg&V zU|zt>I!BMYxAEY9%PlwC4Tr9CV|k}|S4I_Y$|z`n@L=RXgP$jext zg`yZyYY}7q&r0_7yAbe4Ut?d-CxIQ$#ScKIquYmQj(xSjIfAMyK0wr>mt_Mw$_5N^ zeYn_eeg_X>3$!Lrntd$k@d5a!#{*FnN?C=P&8*Cn2a@!F-XAPyjt4erGO2IB28PVb2P2kL-8Tfq2}@?|0|vilM%u5m!*08+-QC(9qUKx-RX zkLCB+Qk7xbmQ60F=huTFM+7e*>)3~5isx>){u=cO?Xh{=Z@0@6|L*cRnUCQ)E#s*$ z_j*8Oi`@9_&k;3yljo(MCtgInhtF3*M6N%VC|h=4_qz}B4^Ciyz6l-zL;P`K!SUlp zTXgK?qZzsfeRUu9S9+Tqp+z$VaNbolxMcJSIg zw)4t;HhtSY)-v&ZE0K6A>v>#{a~elL6%+sGyRt?l|( zmAC!D$@)3j_dwa#JIGa4UiPN7A2302lbbK`sn(*Te;0qRhKRNQ3W&(_o;CLRZ3y_& z#>|1d5af9PSw^NOO`Ko@hmEm{L2L7118T<~v))~k;s9&_u>)meoJb)4=yc@z*=L`1 z*n)3nq{>qyTb$Kkc+ef)`=k6f5kbC?+Vm)W`&t}ap{Wj$T z{^;po>{$=Pf5&;?-~Rio9(g`?96Z6*&C#Ftr!#Co#Z~WH=We~64WQ2)n}Pixj~h6q z0v!Nu$bV+Ia~&NJs0VysJifcn$ujpJo4{N^^v=}DTH7k7ul48~V|At7mXW3(>Vm{rMhgig03veaVmLfL?xZagXX;scTw_VSMnAf{)1zUQBRJ_TEkaaNA- z1pRX4ZM-hPf55kA%;ts->uvt*X*P1qc#U7V#wxDkk6SSKQLz4 z2&=OCA7|u)Yt1;36bEP?5&efgf8gUh@F$kTX20;l3ulEtJmT#Exf|kl{6)rL?B9E( zZQQWVVwWDW>gzvrI?Ba@naFUqcmmw<@6H6`~_4r2EN&FDT3KFLfw@^N#BMP5-rE3t0mhu+|3PVC zoZfd{_mj6J7P$NF6L#yd8*JY-*V%|2&szB{|2;3U`x$%#pDWK*Y0`0P+-Z;-|IAu7 z_(R0U#G;HnK?h-r@K3Q#@Tqjb+mVrxSzgm2J3ImY=x63QoD0D_8U3E?yazvkSa7=P zJv?@()m-*kYX4e#vHF}x-MApujm8$zKJ@Q-ACMdXIRSJxKA`7=%#L2~gT2@J$Btfa zYxmr4mu~r|6-tzRUI;rc>`O0t!=f}dy-}UY)~S8cd~^Cbu!%c%>~MCTHOA3J$UJ2P zd+MaT#oO|C>DxQ+pS1929n6fdJlkvV06G9Xk?RSgW3^6a(D-2K$TAzgvG%=VWdjB| zn+U(Kwgi5k_XEfQl6S=hWQIG}1F>gp-|;(cw;K*0u*tg~KmRh%ye#D1+YkQU@Gr^! z9ar*CAvVo%}E5`ojbX&=WVgnkFxxxlScXc)Zd*NdM@b^9-<8@zp=_RKFXs7fDTY%oD zU6FgRCvO|O^Cc_nWd8ivdHh5d!%NRsSfup@w8k8DakfA_;B3Ffn>Lwqw+){#+ZN89 zVVflr`}d#5ADvHpN_iP|jpt)jg0R? zbO62p(2#ycoZT>Uu)*Q)_Ukt>)B_Z+Ye#* zup!P~F&8m5c9?aTaX{lrzD^KS7fAliz-uxB>Kkz$(!niNw z9{lkEnYWKVfAPf^&%ocyK6(^Ckv!imHy*a>S3GLP&c)9YW|XahayE@dZnI9kH6Bf| zO5E@m^>4+yxD>sFkAsd|Bs(`}dc2LAzS8Qic{_Pc*VDNqc!0i--s>K-wd*(9Rl9fE z;pBBl@l)Vk$^SdT^n&^S$RzOx_;d8E;{$>{Jis~mu~%Ms#rc8wf}XtWqxWgY+i$(eHtf6I z`FhzMbLnHbB-{Rj)f<1%x^(L$Sy!HN>}WT}5vA9(=qM;DM!diB*;Q*aN&A0HaMf7hMI z?b-v^Tg$BC<7RNM50OAxlC{}|VQUiSh=|D%)1HK#}L zLweWvKKOd@-@(7-I`2eY(37)f&D0)IBdx~Dw@&-Z$#Fo{MK35X-p$PuroHh2d>n`m zz<6L}9UI^YUjVz0?B9FuebW1fY|PGQl5PI!{su4C86Cl$yiNTH2drnW-r7%Wu**wR zZg6Ma5c-b58oSNdFk(3P4np^k$73EC`JIH#n{3g%S=MREeaW^Ub$Q&_v(4Yygys8e zTf%xfs6J}NhkwtLCl6zN@Bv(Z|GD=2={fEL{?sEFqYM3apbl_;;J8uNZu-I0Hh^4= z#^tmhI7NGO407@h-pnt@20+9Fv^#Nt#~*&c?$iFq@3_sjUwxxpvW2yjlVh>W^0e-{ z-mP41<>l{Kn?W;dkZkl{Cz$s zN%rrxn{GI019$jXFSV?tEBEMo#p}g~UvFh9RMA>CW!*S(-pjZY=7{=S9X!Unz#6`T zyba>W-#-3yeu(%59!S`&A3);i!TmoENL^3S**`T$wq zJGbb(^aFuE?dP#47a2%=&)@#&ucdW=THkR$ds?ub6ZYE6ExMcalE?=V3liUt8$H|_ zED2h>N$pT^%}3TFdZ5K6_X*M$1QtAtBkP1B|Kx&bb7YS>7lqz?2Z?+Zuh}nx#yOH=2@>UZ5{5c56XIltP{%-e~;%&ZXBjyn-=bYJmC4#^8k8) zvE)}?x!a8`uD|{tsd58>x&ZyxYUZ)e!ou91f0qj~#($L*ofkXc<)41X3q{03^yQ?5 zKd}d~0R4jafg?wcvrELd^?X*a_q>3PpnUiV zfE?c>`GGCx1kDpm_5(W%(mXP)F^?~S-{)-rynqb=3v4a^_wBdbXp45=<8nQzaQ1pW z)lt5laxhJYu6BJ6^vmIsGH(d%c|N?04xqfmo7utLD?Lra0a$52a{ytVju865-Oq*;2 z#xFi&TtIQ@!G=?B)_95T4u9r%f)6?XKY;Q5^q*n-Ps-QE?;EgPeqTCm8pspq*jn*7 zTXc^O@-Zj6{wZ`4n0xGb2k*mHzW(~_&emXWvPnLmss%k#^3uM*a7+l>FXP(J>2RnPrVPW>t9*( ziN<3NcDWbEg!*;Hz=m`D2=G5~;%@oa*ICmopJqNDU$&+EN{u`1(Z@z>%@A_Z_$$Qq z_$crI&*$9Z|Hd0{WE=NDK0$Y22U2vvp4~QM^`0~GUn%%YSD^z6#9Z^F@b+`RYUvz5 zAkVqj0PsggV?QqxksG7`KG^;v|JWY%4tzj9i1wcrueC&{?m5FJa(>|GEpA;8YyjiH zkx%g9*^CiE_uqB=cH6q|s8z~>-_J7}$L(-yRx>66eS}Ps$HT^W9|Qd1G0OXwzx>7J zoXI<%4Z#ce0_Xr@i9^cqtlzjfxy^e+#Saa--TW_@KJMVX6I|6lR@VT@5 zv+j5O3&=jQO`aAVf?Rt1!9EcGH{X2I`GEL=XG`b+`~YGVa{O2C*=4co@6E7(0vnLO zSHeTWd%UQN2phn-;M`~H14s|0;E$hvAqbhw2!Gz`b%2irS(kgj#1;5Gsru>h1MAJY z*I|YYAdl#E0Pz6h!dOFh;?5^Bjr$pg(R}Pqw_h~zC;55CTa(uzM#sLO_XF{VU(W~r zK8C;s;I|&UcE3&Ec!Qfe8qBBuZ}2ZT`p&-y?-`ozdXt@R6Ec|Q<6K#Vpmeyok% z^;{;tzt*CbF6lH(>yu0z=i++uy2!ncAwB-^fcO8<5pTWqmdiDeZvaP*!RP+F^p5-v z9Y8;YivtcHv?U4Gx_PF-{emg@i}wTe`x+?tnu=KaBfo56n2sr*WPLzxfbZ!uB45bd z5r}iX3sDZP8+;E|;BX;`=hJtOEk!;dWD40u@B4Sc1IQOTfd2I9lP6f$X?xG`1JMDO zPP)#94eFy_P|C7F2?6KF&_@|W9 zml^#+I|bsO9==)m9{lkE$X(v3HNn9&dV+oi`ltX+SmeTi}B_)hk%@iTjeqVy4RToc0G@JgK=R z1BS-A^`Egn^v}_60RH&(#AjdwPe7cL@BQdn1WyH(VNvDKgi{SynhD%wX14h zr(TQGUFQjX%I_Es6KpjB8;Otq`ZScgUXXFEk1*`dT`i& zhkx}bi@JPda-XW=rZjYb!(a0{hYgRjrOG+Lm&ASee&lDs`9c#sfIdOzF#l}Ju6^yRNZI64~=FZJu@e zeXRWG-=Putw+cJ(NB+~pADd5pFsg9;11G_r`nx>h;Hz)b_Z>v_<=c$L=Yj|R2>8Q$ z=pp<7`~&)1XHB1M(NhwV+vRlIxL9z`{WfG^bV|Q4YyG*tTJ_tNUHC@QJe)M-AOElX z`Y&xr+$72WVkiGT_WP~mAN}v~zx9@zY~9Z5-THv(;xE5f>;8Tb5+1%$*o_ihCc^%w zrTQMR)(KCAfBsRoJg)DFA6hG}nMm%H_RbFe=*zV9gtza(*8=YkzQXl|+pT4BU513jWd|C1$_$f%Xia zr)vY$e=?W23>|>XWkm;Y&$&>rZb<8Io{t|uxyT36FG!zX&6RJa9wRIrP;t%27CmsN zTW1&@K%Y>J>Q${u^_o_C>0i^e0r(Rw=iF|yrcO+W|B1zrNwB%l_!Iw;YjXLY>#w%H zTVBmLXQlFn*Xeg$xXlsu6*Ur}bDk0T`+|?)97z5;I*C33#t1TBbkevu>o{?1sy-p)85~*X zpS7~4YmNZxKQmUVY9-l#Av@Ex0mJ}|Ij7Gb891!*IE))3Cj&O%9~}RkufKUV`5*Pa z*a?ka-ha)t)+q7Q^v40Ij*+YW`9o-~l2-}0DWYzo+9G_s+-c;0!5`nCS%H{qkEh^| zZ@KN1h1c$POxLDMS8isk3py5mo7@}yaM%Qn!Nm1*CI3v`ksfgm@1acaC-TqOuYOub zoVXqAye=metfF;g>Hp;(#_x~|u39C^D%WXlrPq9#jt)>;X#I&H@mgn6^K%%J$yj}I z@;(MQUw8*U2iuRG!QR|)+s(FW_br+C{|~$VO<}f1gzw*0L<~<}C$0WJkAL&RV{iM@ zY5Wxf$OkAk=~17@q#(Fe8~b^v2=l3|C-~9CE^WFi|5&L zM{@&?oQoDE(J~#EEz)yRj+}c+`ki|o&tAIFRxVp4(ps;MI2ZAK^1GKVoMQ{-Ojj;= zoQ)YV#0GS4ZMA3Kb4G5D{pQ<^SfPB-kd%1>=m59o^WgM#fU^M$Pujd$Q(W$uahbt3 zAQ-!I{TtawzhL|6XS(Tz12$;8=A@>V_d{kAe?Ap{Nk`(g`67JxOGWs1 zQEOY#m>LNhAr4*F$=D?!3z)AfQ5&x@1mpDd(koLw(wT# zF#mREtDD3hu__B+JVTycU+#jZY|wycr_Y&NPTsysmC9DRs{DXOZ>E_KM2|2xcl5NS zwqf0BH;0R{ndoKoGjTe2Gv?!b5YOV7=oj?N-FF_homU^RYFmi=PwTW4oRVYq!V~U& zPdJnJjTdzl)e*5C9OHoL;|czt7sw5^DjfgN^Jm~sOf0?092aDO`3CsIo)~+6p^0}P zw~^YznwU4kcT+}4e2cyhY@eiaboqa*bIc5_DKN~<)1YsVSfFa9GFIX8(MkF>z;5_w z6w~usEPdP-&YR)lAjV@b1^_=W&<{9Q{J}m@_UTW!S##4e9HXxCMsE7gFX0v2BKwT} zq2GtN58IB6=Ssu&>uYBh9R5WnKk`DF_`?JLLj-TspLIg>1ft!V0r)k{7pzjHin9ad zhF+D9FGyeTuQp)bep|aT$qyhGgl#52b3S+=5PP12{QnPO@Az1<%94USwoO`uzJ-hR=IK| zD?R;@GCd}JlTQ;wEbG#S}fR6V0ATVU?2mQaE_&ZoH_-ld3V7-6uJ$KtR z2M$?_t)HYj<_DWrW5pX8FdZanDMI$q@AU14iqiUc{olIqqz9k*|3UuY z0dzpa_@h7e?a}$e(Q$F_YJIi0d-Uk>0eRu7@&zi@XlSJuyp|>pU;}Gy_|PWKT>90r z#f#om{P{Pde$lgQ=U2kQ z!o~>X4x(D3QX=yE>B+t>rO1D)f)nq1^8Xk7lkyv%f0wgRl?_@mJ2pH#yuIjh*?_lP zzd+^kR-sOtq`Z)HYjE4+Ta;Y%*2g(3G+mi9ETq5Y-L_-x-9m*5Rn{j`x}>mjZTZWU zE0;&d+{(M;3?{8jmrL`;a+fJnCa?O}3TRA95q`@v^5@T4D_^l<9U>>(eV_c9Q^D_d ze+&D_wV(f(vs&l7!$U(hNcJZQPxO8x5&1rHyBW#8E<60u6DkEtjQWOuu31y__%xrlLfy;Untb@bXJDZAFTV1VuOb@8?$mGli`t23 zd*bb~BKBPX1MF`e5%Y09@i($b{|hlq*5_JV>3YBsgfv!6|}1+38**cRyDt-t(QAoj>Z5hbcm*K^>b)*|?zrU)#M zMf@=Iu_wmZz#|n!U|wBRFRVb7UiqW9?2TOi%{OVw;wi_s#pl2Iby&sL`1*|TnkIt( zu=&+Qv{W5RMNq3c8`j1c3#7OUS-zWb3OVNdYc~|=M zzC7(0?GA4^bZJCXhv^aJTTP6p*e*VzcHfyfn@w1mxA&I)g(sYNpu~y~KBC<2x579T zZzby~u0^i+@Vkf>Qyx6?uf!M9+KZUN6+qO7j_kXQGjFKUG4Ez!OB!gu~I zKKs>`fi_I$Irt7)NgucbC;q=kC7tncUsiKbyP9rss0^PIx|V@5C4K_Sy16-so*F=Iyf` zdP)7#j`H-~nRM>H*Y)TvFLHnGo|~R`&)`{IRz01wHmWcArZwig9e?w^TT8BalS34M5xXOXhA~i%c4}=!4 zeNf+DA6l}msKJ5IGL83#mTJ5sXXz$u6f@D59YpA8d@yWcM8SduiwgS}=_4XHz?d<7 zf}%x>+@$Lx!i&{jUtr*sk7#eWuRK;M{1}L(J5SO#>FQN@23dp0#TVk|UyIFp@#Bb& zOCAa>P;sx`2k!Gk$UJj<@iiNWDvR(Pz0S|7-0LUqgPq{F@J}@n{M1=ANHkV7RRq8B z?)jnxBK)OA0kl}>5IV`zQk@6VGX1?g1LAt%{r))|{quPz?}jJ`<)K`2Mf7!3&RL?F zq8Z6FUB_U;Uz#KuCF(EgB%*#e4Tul^t9XyPV0Xud<}AJ} zXX8r6{`UGSSZ_+sBlVl&D?a$TaQuVs3~wTO1>!0PH?cc?FDFbDpOc3S6e~%XR7WEQQZcpfTf6kG= z=^JS;YAHgFz@GZk4zx#@D2FISG5l2K^}qv+8$%b!Km0^%Em0<9g)+v8CWnURTohie z#kQQ6jy;mM>zaED#2kFOaNKP#7aD)^jY3l%eyh-=``;)$_O4e84L|y###=m^yTjrW z(yd1o@9oxnjSYGRG5}A*!||d~BI?R}T8Qe1Dv99Jf+ETqF3O6pr`yi>gz6i9&vU3d z&n+*aJ!*;2iSR??WNM-#vI1S2OwDxk)LiGDDDT;j|2;?lT>mcrZpz`yMEM|atS_R> zP~8luwyxC>T_U2s)SLR}5k-h-7xy8CA|_<+0R8}c0LdSCCL$t&GEztI=_`s6jS`I& zO%zQQO%u%&p_>Br({%lfew`xXKJFhQiWPx*cTrmrb*H@O`ck4IqI{yWm3jR%=@T&j z3m(94L3EUXc0IL z62TW@Dgh;42~Oa3wlc4up8oiGpZX?D#B<>* z-a&ihO(x#!DZkExser!Ahzja@W|ZFVgWtv9zAPMl895@q!9+dM`i}3ZC-tS?VaR&2 zOz6+lAB{7rC)_^=ckF@Azt(!YJ#-i4fydy@C{cA0*fkP?V+#>{(OLwy5a%sL%|+-k z^j94bzvUV5I=l>j(r(nvmowcm>Yj7@cwX>F+9N$;Ea7iW>6OLf=F6SkV^$kYV;}n} zCiq3z|F>}A!svTG-~xZa2gqnK5%P*|0!Q>9x*J?Q@pmN=vJKy$zu+N$%QKJ#Fo!># zPV#ls-xoi>V+&}$;cTrzHr^KjUIQEbjs65HFoPe!51#OP4?7b`d=Jjt!@XV~@r-bf zH_zAK7eD_8TEOcau!FpQWZZpP#C3nK|LsM*{|^9tv4|I2;9?70Y=QsdEg)Ny>ho}_ zzx*E++a{e=O#8CGO~+Ho=kIp-(CpfP3+bE&-+$`Y?_Kt!evR9IIsN-W$?re&`TqCm z-5>ng!^dtq4yC^T^mBi&`-9)>>lOU{AGQ2{wD!EvDu-vB> zM3spBE~R}6-ILt@Z)8-SBd6PES8BYLuj}UOpJ+R5ukEuFI$mQ}oi0%F*{Rpke11~< zKeXc^|ATq0b@uufb}CJMc$y#l{cS70^LnWS;r&bUH_tzC3jOTOpT95onAPW7#LMod z8Q*_XO8XSrmfSvBEdTQ%pO}60xAf|JM*DnMXyLcoaL`UYopE~x^K-`KKl0ExEj&4X z{Gb&6^K#|eEj@fIR{qq<@7~0O-P^W5`r=Eky!h-Z&zrq`)!uE_?YL(9?mc@GHov@Y zoi9(tWcl*X^+%7FKi1GmThR(p4wsJ7$;Hpb7P!~~7hB*QT0moJG<+d6Bu9=M?#SQg z^TYGhAKO@cF%#7vpHE}=Q{KZnp}>#-j^71e3%u`K&v~}y6NgNkI5CIzuL{#RfiR8j z57YWop;~_|hx&`o^%d^->VFQ^{x)~e4?SYUh`k*;bO_NpnIT%EEL7ixYfb? zl_*gnLgQA#HRnB4V_0%fMvZF-Ip4T+?%X+~SFc`xO%9w~H~k>4k5%u>sq3kM(Z#d* zv~Sg(Nwgi)CKk#&0Z zAB|5A5zp_VAF@H+njc1lht>%xT%lR6I?X7}>V6oE~FiWMtHXfDb*^CrBcweaZ&$(^t5+*M`v zXx$~PCs%yYo1cW{DcoD%mmW20RCv95^>mv3kH*`CXfNlGV#SM>X;81uCynaYwhFBV zzEEKJp<^XheexM|CCXeW(tAs@j$QKjO4hO~BUjmdzf1FW)_nGL;ZZj}kh5CH=_&z2cj;xne96CnzYFH7*==&EZNHu>t@jn^vEgxj$2fpWlGSj@U-GS4 zKTvn=U6Vs&QbURr%r~)Ki;h-l(ydl{%a1AJOc{e%Y|cxc0FItkLA3i{k~k4 z+FY5lR`j)b+RZs$c+|1iO0NCvd)fmkwe_c;3&kFOAhbv&#wT1NDlC~oCbC|zpgYx$ zArTSb1#=XQiY~eK^MCQ40)4ik<(fv{TW;06 z7RfltO81NrQHidij-pPYo}ytY*YfAU~BF?lLq ziKT!2IHGF%`MO?5R7`CUk(D-({mG%e;0WA&^oBby)`=&zjzKZZd$+e&UE4*TJ_yC(xQ0oJQ3a@ktiZsjAu(2Yh1TNJbE{3h)uOw1*19_rTwD2j zGdsFxX}`ZNQ?_d@AI8Whjgv2_wTYUH++b5C#JM%0Sd*FcIGBr_6=MCKBZm*!npMlK z;i{Ld1aloUP8)rlzuTI-RsYLGB_*3-nhTO94^V&Rj#CHP!4rSam@(7hVux76={H$% z)xW~hzgXw4-EGY1IJZZ6V7vKq|NFord)OI&_C@yhWpd>iE|d5k{F!^)F#dqe zoiRo0&|K&EKD%}I_up~H?Y4c}R%@XBLsMix{91JCWABB8=46~AW0!~_&iGJ&_Tr-r z(xO>2XKDYH7^^-1AtwWs7rtOUyLWecuOK67{f6&&rho1<$$p!ehfec;a{XIQ*rD~K z=DIzYyv{?{WtY$c`>xz&t=7MsvZh*TwQq^FpZ^eAtjZ!)y0(ZhhG%@JKkE+r@&+Hl zZ{paI)@I_4r1DD!+VmM~BZm)lI)M9Gua0N1uc?0)ZNs`mtXDls^3q5;Bt`aBe{gCu zKEYOL{VVntW{nVt^{Bkw&*~AKdF{R{t?dS_o9x#Wg4eeGYB{4WyF!(|RK$3+Gd>!( zGL>>uhqQ?LO`8&L(Ici?Y3-GZ+}0Vt-|eBr`g@MQr%iMFbh2N!;zqX)%jMdqRsM%H zZ{FM*)TwS2N9?mm{0Oh3bY8ye3~Sz`zQx4Exb|mlV)kVKf7WKFJy@H^ugRa@5j}X_ z{;RC@#y_8~zutpCkh^}&4XQMDpu`!K*B8{EwdcVtEuu|kYai&5BS%;@?N5RZzz(!( zbGdcw(BADwK^+-OOdJnsomKZY<4fI~gSs`Xa?G~W^_P5>>@vqHl`ZMkEn;30^AhB@ zy0z_SSJtRQ##yJ9b;HxE|2_Adu)SJCv*D(H$OfElV|;-;&Bx!aYIYDY4)u%=^=D6R zcpxp}8f_34JJ{-slb<2{nWtB_SwE|GNkuoWjxqJ%%^n}JGj9K9_UN2Ed9w4B#*dD5 z@)Nk06VItT{%RZ2KicumkRd~iJvfMmWv|^nKb*71D`jAwQePKM^8ZT#BuF`HEkPvpq;ia&JPl==Bm}}s4CrFM4sS`kJek9N|`Bp zTGU;-UNMn15Y=ng*vc<`%ZLZcuX@kAM-Q+mlP5`T7P~!M()vB^Id{%1i;bIL71w=o z+WxElQLFxH(`L-F1J_-fBJ-@t|D@JqgWuVkk9LKxkPT!+IV0!uzz5ued>lG(jkQU5 zGxdII(tnYgfA}T5Y(w-PhcH+UjI5ru0o4d=|-Z0XH;HatXZ>W zDr;^A@@;zOv*gG19J@sF|6j)g)n}a0-dw$9=VqM2`+?7Z2WC#2Y&}OWbUvh;>x&H( z4>VnLzpYuZ*zJo)eY}hZ9?^fagZB%##=R$w-)fup+~D@n2-JIy_sQAx+4_>II7(Di z#JJouKGdJRC%`&A^6djJj?y}FRaR(SV(~yZ?J3i>PmIM+oZw`Z-*Yc}3kDM3A=4Aa zXkYX>ce=KtjFH&r%|F4r;CLP02J=9o-sroN zT1)HL(Ze=l*L@b1`0bf>$L=d1l)ul`S5?_~QGMl}^5@D$>gCK2^=HlLK)ljB2j6*f zW?FxZODMBRYdDGrs?L4H2KVo)czBk3hVmvUwjcWyNcaVHYt^tz>Rzg~NS<#lpa1GNq4^`X zsJ5L&rIo8B|8!>M^^NL2l{J^u4w(||f-FxMH`;0~e%9&1GTNW5%YZnW5LN_^zroR@6{bSbZd6BAurFQQfDq9yV=|6{3w6FIr&3$4%9q8lO2Hh+6c5)?)21 zTb;B9ANAKbc^Aj9_NmrJOGT`?jXd8ejQ8)|Z7Y^9wIOp9zb<`JdB%S`nXbG3@78dG z)^kt%$>E)Ly`@9d{@9UA7CvYF#>`b*(g&T7y(>l@w^F4_X;(b?Tdg@g72C?%(^(~W zV47n3hVy05)$Zu&^zPe&3pp+a|j-+BU6UgRlOms#ZjGkC4w2LZ3rMAL`HA z+weeE34O6}?kwvSzuxgJhT|cHJ0(@ksaxjmhP<^AQ$mk(8rT3e^2Y4TDv zhw40)b;;p@tP<_CV)-%~HzD4lR=?|bpwhCx*q}i}-2QT!XX<=rbSmo#v-Wc!(H5@m z(&_t;+-6;N$fs5v!8{elf%WE^2%B4e(jC^aQ?%1L8`iINF#$0!Jf&R1ee_MzZ=aP9 z^=A)0zfOBrkMO`;?bXwA&M~(RW2EG?ee7KMdGXd?u?sN^x)AwC20YOYl=H#+PS~dF z?y;I%zqTUMYiaYjd}QQX{8f7WS5`)AyCdtRm%eE&#wN(-Dn?fBleh_Afp*pUt@mji z*sN6D-9!D^cOt#D>C^ijURkE~(+9;bv(j3Nm@?LxafgkMi&d^*q+4G=eJ@V#1N9$# z|M30y+2#ZHTIDTCx-Kousdq{3hg*5+t9EJpe(O1OlJ$!nXO}Lx*R6+NT<@#9;qNwm z(_uSw-9EeT-h2H1qW5V|dzS03dQ4?62zVf?#6At&t3DXlM^JOctFHd#*Z$M`4;y0> zwJ$S%4|}S!&l)no`uFg_V~;#!*B-sYY6J@8%W+#Qe%vUR55eEzS$_Thr=NbxPTYCBb>I1xH-gBg{V8e%$PA_TtCqArHX+k&$n_~PZt@ey7+mE z8#&zNZHU+DD`I~Y@PGW_`)&1gvTw>C1?ze0UUJU!R;_hE>)fujC2Zbg?9qeIkIcY3 z$PsZMx#Da0?6Tp@54vZOQz@!8=&<=^`Jt1Z7Vu?DmoA+%Ha0e0zt1xV^=A(f>XjAZ z-v0gjJN-_6W;rpztm)Qh@gqsPN%`TPqvqN0p@W?cAg6_$r|fqN`*u6tb!8329=@qH z?_sOmpox_)Q_^bHs^!)sMpx2q=ul7CQ@%f`HXv`%V(m+(_eoM-rorePuc^|^Q!lRe z&vcv$^=Cg8_Fu^gaqpl(gIt~y9~XacmG*P!J3Uc0Ol!Lf#|ATRb+(E2K?d00=lN%! zwq4iXW#tloOocu7SDpKqjTkw~x^?N~)@DL?pf}(fU+>@}JaPQCV>V;sLDmdQvL9;4 z6086DZCHt_vsC};8mE<4@rZ_VrOyV`-|s`2(SA1m8utd)A75b8rj0gb+AOQGCdn5l zxAqf@89Cm%ckAMER_urTo>9cnL zx-%_;4<3H_A=kF`HlEJ=y4bhp`ukM>wxSaBf9sg;NA_(h`)`4(-;0N1@ZbI#_mbx) z&kg?ALG;E_?I+T9p882uC)U@#EM9xu59#mXKkhqv=sJtO;;mHmhwmH8hnuVYNN$#n zBaaHdU^mcre*JvbWKWB*_qW}2*rGQ*k&^o(=U;s8tDkBN$!JwN3O`u+%ar*qj z{0%V<2mKF!f@@X?eGLATll~3yk88K}YggOIY0H!sNa`c0BD+0u_;B?Pw6S_xZ)(QW z$=3dgk5bBs&MK+=U(Yd%ZEL~?Vfl!Q7p1dZ?0}AA9dTqJJ%R^Lo;YstTkk$?OV#!o z7xPni>3XYG>3YH`ujI+qAAP7?X6W!?L!q#C?b?MX?>>!w25`*^QGbp9a{V3}Z{}^*o3+PI80(Iwioa3AHo24-h`0^@4-31TXXvO&C zLh9D6W|d|>n3DIR{uS1IXz|nLD9?Sw`L5_VZ|A@~y?Xoax#zJ*9<()AX$+ayf#NH2 zzqxDmIjs6!rrcK%taS!xb#ZZxRrRmkj8)bCMXm2HtmX4I>W% zY`lBE@89#E?Q@>GHPci5s=B)B)w}n-o+Y#Mv4<4r&3H7;AFMZNhN&mE^ z(l2ef^i5kWz0&axsnm7SI)1s-oU}#Rd7R^efR_v%I$Vtd0o5C#5Byy{2ecCcXWWpa zjBI)Doz2Qu#JZP#$Hw#iXCF9o;;0m^+AcoIro^~Ue{BA}ht?IF^4VujColLyEY0|T zZg~EqfD1mLFNO1jC)$C2HVU~D&lQ}@d-aq&IhQ{8r+&-xP%i6jvh!#cw;DA|z1Ors z-J0M%a2%k%#xh%E?2$L-6=9ulNZtF-KmT05_~HvCmoHxyiuq?e{seu0=eGBx<(w}| zZ7SY-zhUccX|)y;QFr=4oq?a58^3N=-nCHwpYN;soBNmk7mwK%m6Fc<*1c<&^RKmT zbuPG~|0Cai3sf$4j)PneqTl?Kk(}`U>kH-|UcY|*UT}JL!3N$5U(rt3c{{NV+zD>v zF7U*5uUWNX&w|+nhX>6&{*wXoof`M?O!+2%^mFyPjrXG7Z6H4Ids_zw2jj4GbAw&f z%QNT4pZ_oG&wdHs0QzNQE|wy%`1||q2nh}rpMgt^`HwMXdF1|l->y~adT@+eTWd9b zP7Zc1&Q6XxFR$`e6c2YdYn`=)&e7J&+1k-i3;gHBhWz{LK6(T1@|b+?JF9Xbw0X!; z4~Fm49)3t|nb;5)#0|9dob^vN{&B1%PfF#x{Wtb3LkY{H;F)?#@EJM%E(155)@Uu7 zf!o};TGh~-A(ex~yGzzDp1D8$!oJIK(S72HOSTP$6=>Z8dups58)`IK5bdq2YwYw5 zth{UYvTK=Cte zqE;NzSXi}yGR~f!o+IkiuKhS9$nSw`Xv-bQU;aV)!e1XT#({iu*e5^gr=0%^@gL_= z)m?W{J<;=_lh|d9+mPeJSyi~lnW_jMg2rj^R z`8Yq*6~DP9pM%cedcn;6yZ}?l5!Lm5+5_@CW=E8m%2+_kH*Ktll{SD}&AE-7634Y(&Lh-cP z;{FW9{g?v$e!5kKdbw7CD({IY_z_cNFjF)H{+ zx&pIm3T~4I_k=mdbZAcp-Us-wTq)qMyWkv0)YA?&oeem5mf%)sdCixp_w!rhKkHNa z>4;aNKdAe{`+@a)snD;F=UWNS{Ug8Le^$-@Gqiau*98M$g&f&^X|r zic4y=ngIO$@Also_?z~Fc)fpjV_Co_v=NOPYAgBsXaju9TefT0)(RYDt@$-y_BxpJ!-%#V~UOmi0;}THYHgZyyO`U$k z$}0Kzc-y=TUTj`3#tFlAT^?Sq&SO_6dytLXDrtNh^tFCvSeiqtv;|Hba+W)_$y{XD zI67PF-(-l!#yK4GPdS6$)ed%!CFC#9;joD`_I5f8`<7|>-b>+U$-I6?W9Qz{*T>80 z&thH8b%*_=sTdeop=Pzk-@?WqG-|y4sRk2;1Ad=$ARR(bec4&o!~zuy;Pk4|@3dRd53q@iM9?kP)aZ;02r`cJW{7*XKZCTq6=@1F8T zT)pSaZ-20FI$=I8Rs&@?BFBZ6&&=~S_G#K(ct*8+PML4Q&DF))!acAf*6sH^rd;@5 zV{Jdw+1W{t=TPJ0=o@4wc-?gcKn@F_c_}zlfB}Ci=*wdW`6F{svy6& z2HfVEh*v%i-og=ZFOPs5akNAG_8(MC`S1aKb2VBRyHnsR9RXkS2+w<-@H^Pt zN4j_Ja4aNx-6h6Bkf-B2?W#2IGU)E;VS_J&BYO^gk&oP}_b{{)FM!Jm8g}=tgAtX*0F(6ekQxX&hpSa_T;?DTprj6?*Ju_P> z&$w#zaTfjd*rrOG8K{FF)+Lr0k4xL02h@M+)Tt%ZpIlgzOc*-`Jc&5)*&a%zNxKnK z*-^c}nco}h`1{`UoA~%Ri5@jVs->S*es#8eVDdTek%uFOWQF3-Q^!9N;_7dLU)&=T zyfyf4>8H|9Jb6`XW!nzxPiNHOx%!)QGU-CT_WQM!qvRK8pAJ2mANH0ZPk#Lwxdng6|V`fG^o5q*Wdi z_rtS_$L05p?GL_c3H31Xk4^hAh)Jmv`;Ox8HR_W9?%F`5zv+9^o^cP9$rHy(yKzMd z-zR=ezG92$0-0Nwr`p~WpYdn=ojbP6-1%=vNX|`QrN-yLu}kqGXiXo=Q-oEHt$2P* zc>S`mnUlsvOY4!@O8?MtTclsFZmRDv-o_Nm$79xm{cr53p%U=~m!WT-@lx%gXQ>%=QZ*Mb&1iq-q3}rj^n3W82SRcBUrINV{^o6J zYFoy%j2SshswN#31ID4?_7kLTjjD?KOP?0w0?7piA5$>LNQc*6l{!(GiX+7KC+91u z-2@2-CITOh;*644!gw!o=a(;Eu43KD?c{wi#r*BvvrFbIS}g&2cUAwVkI<0%)el-* z7h+!Y3zcrvAMH{?UCm?r`2Xn9(ehf02&vd9QOaR{FF)#CsarEl#om#-iaA5|IsT3@ zUCC48rQ4XyQqCFipvbs4We#vdU>1r8!hXiOn&KW9$471i$0WvaupYa&m&oLKjMp=A zo#`|8NciMCjiqh~6!$7s9tYGPT-y@rV2ZD!F1#P?7jI z{ec7fWi$BN%?mzN<0tPU{qU|MO1^@+w2M5<_2>A5xPlT>Oq@wC%n6F`gLk$g&&CL; zntED1@EpA|Bp0!AgK)3XO7%DWmi3qzGfL{kzhfN#(RYcVPe__3n>TG#?aMyTzR!A) zE698rWP=9c|N~kw=HW$WBQ4%JN zlNMv=EB%9}oREHfd#n4ybNRh_JW*;&l0=P+73M7A{KY=hEM=Q4oLeBf@mx|zb77ma z9)}Jcl$|ASOUfHN5CikG8aJss`#y5?Jg{^N;2g{)zBTnWZR|hbIF+ysO!}7Hr==vz zfRPi_ID|Ye(x%U7^q~o=-59$?z7ILg6!?&(d*}92vm54aa8>yXGcUy8w8gT1)zZ@E z)fBtMx*XWELpE%9O9sz7A>Oc2)tE!w*>`9Iy_R+Y`gXzEihgX9>T1vb!LceaZ^N?3 ztPkgcT8aCWJydtp8_GUn`@@&0xN2B8mB!Lm534R%V~KafV9{q>6+Px=%hTUpST0@VD}^#c0m=)P2{vZr8jI2V#(!D*XprbWkgJ@1XS=Ijx~xS z+Ndnnsq|<2WBe^K#rBY|X*w>uPl}%)4HDiFcih+7F>7Q(%m|5!Ld-AXnV6S=9A5HH z&4thB?rrZ%VewqWfAq@vQQ1Y$#O6V7&euW7?@PN88IlUVUD+3$OF93M@5g>aIfeVMXXiE#o#94vxtgx$^dgH7Z`@gAYFB7)N~Rg&Xw;FTCVsVj~zUl8Jc! zSL0WSJLaL7t3H|b7}1L_={@v(Fnkt`WW z@v>s+BE;&yt717=sQsYu7K(bAD=rTd29AzOlQ6?&Y@^`uHmES$}3nOR0^u7 zc+BL+@m`tBv7?7&{u_&>O3n>6MtK+iCQjAc=RtH91^cZ>-a#YZ4gJk6dN;Uk7A=T9KX3k`Ukm))k{9vW$>rtPNL#_A zzvA*DCqYEgd+Ir^ow!GObm^e%hwLoa6tCYf_8mNrj7#f3I$q_VVvY#vzjEbD#bGPU zS?4`DdGwH^FW8Ld0QV2S_ssd}p{1cpoVA74)5Oz5KhShX{>B0Q`f3=<#`Oz1#xLTh zlcPzSh&*Fp&g#74f;<@#myOtnd*YLGM|un%E8+F)A||1Y)GPW%*E;Qg#Ka4 z#}GS_t?Yf;{`Bu~ejs<)#FIAdRXoK9=VaCTEmA4pm@9^B7yG&cH$d%bz@AOM6D#}3 z*c5PlZdtllY&AY6dMEY&GcGKB0wyjs>rj|GLwY2DMG`;85^@L&SIFCL`|< z`d3dq0sd&NvMJc+6!!h+ai975M<0G5D>uF;74v^E`c9y~U9Dbgp??_ga4WVyHb;k+ ziG}o8Tlv+Wf;syD^U9E?{8t2AJV{DUk&tPZMGswDkDn*)TQn5Ewv&`i!1<_h=4UEy z_&Dq!>i0)NZs$iIoRxWR?!erEI3WBUoF=gjXfQ_$&Ki86s{cTL7yD+D^6AsItv6&{ z->&UWag9xx4bCljx8&oIfWc6 zMNHGXIL3!mt^UY+Oo@21opSF!FtixE%%hxVb3ZRbVC6tR&zfPOhLE5DgKv2cAD_UG z20lG=SD?Q?_4SEN7Ppx<65lO3&nIE_ZT-R zD$gwLA@^S37dmz>+KOuh1^D@{4y{^EJbTT)SuXG1FP_lLC1(FeHVsGTYXc*PYkb1{ zS%h|swtFq}b+;)OKQB*SV&SikU3xFMVBuf@V*xmgrKKz8e2X&nn=O2C^>np*=j-YZ z+F;vo#JhG)#%#4~I(~;;ZGeL06^y8eM3IHM**u-UM#8!rH6GcwD;z)_vY#Vbv~$R0{asp40 zEo-Vb_viy2sh96K^;~e)I-v1F{FZr)YXZM?0Y}z?_?GzwTh2mfV@@dCM~Ht_*@b6F0B{6{~`HBQ9CfaONQPkKK%DBvS}-WvSLf#9g8 z!=GPl6WV63bx_j+OG8My#@cQ)z9+|%Wdd6BwgneVVRHEYsSWE5g;B$Y%)Is1ut}IV z-Ujug=>AB+nYO_=V1qRyb0RZ`vK7jCO0ZtF1n*Aa(B#trGl_%Wb`P*U1KLe*WuXZ` zzYf7*SQQd#rPT!KY;1fmzPq7p9qbefV%XpUKBafre~`OYokPr>STnK6ml2-J-%t?$ zqG37a0-WcmOF<6{JcD+;A80QPa(8HPYyo{O!9lacv#G_}g7-?r46^+HpEo0Y=x6y2 zJh3f}d#Bc(nz1r2q4pC-m+{-+9KP#*t@?+&B;%3sJN$jSje65j>Hkj-?kdg~-r`ec zYnHGb=Nrpxpq)HCaBrCtO8+hT2j3}YJk$8$4$mf|G*5K9vZ020vlYMbwB+Z#y?+1J zc>b2dn{bY2!0(@5d6U0dzMg+Oug(y@6N%eB*KBQ@-%2nMxv{egT~;Y|I=~AyxibmyfY)XmcM(I zCd~pX1v4+O`Pa`JTUuIanlx&#sai4QhgJ)RN2;0idd)Ndu>**R)KT>ZfU%|&y zZyDh4r?JO4^Jg1kIyClev*#MJzrC-q^Jp8MZz4Nqdv^v*W2QGxt=&?nz&Z>cD5SZ`hyZ- zm;R=)aq3mOb}jXt`S?g41^vFE!9g0g8ts#PX5J7F#0%O+PTmU+dNkMDh~tRBac|ou zV^@33x^v$>?$l*VeZ@{8l`C48^<}~@?gsq%ZNzu)LmuqCExQl-q nYqlT$S^qvg z_aj%_K7MB|(IbcNi|jt~5aKU>@GN{FO^0Ot5<7O}$2l`+94;&<*jHFsus1(1XMbkO zMm`Q&TFiL|T{R?Whk3xaXGJg}p?#PFG;YRu@7LcdDwG0PMtOnlfJ zr%wP@&Uo!wndcOq5Ei#ha^aI9hG)VciK&{7-(I^y+GXz(1MDZK?(_EA+gkgY^YC$f zPxyCkn=tse@zK&KcAZ+s4jvHo3@)FT5HEwqr6`_&2mCvoCKk)awX2j*>UrFNJv+Bc z`kb{Y2DaRce?HKtPGfV_`qGelUj`@S$qvMtDJ%y*Kw{wL82>)xBb>Kvz4+z*pkjDzYxXEYXD%fa z@%r$y-ZtUh#37?&fECQVDRoB7mjQix2>i$j_icgvp3NFJkZK*q8hy|3;fA&7Exmhm zRriSNYUTzoVZyu*2lwxlc`G(a1@Ixt!!~wk7W)>iUy1|s`tXn3HetZjV^CC22^xcS z_~f%vw@z)9uY{O8@fEE1rR%6vU@E^UjzHT{(GTC#u!idaBdU7q@Rqq@~e?eq#-yL-0}LrU2dD>j=WCllvoK* z+9AGEzY@GtPm+*pn*D%zlR9_mC{3G1O8Jpn#1-qt=Gn(&-Rc!`^zcDBe)NbOJFr{U zZr(24=E1iQd`tPzvF5RB60;q=u@L$#O&hNd{NeU9*jrYH^qn{ZnA3gfi2S_FQOdk+ zh@(+C9(wicA)PvRkw%l=1it=HX_ot;%v-uvmaTtJhA(_yDi_{Sv6u8?5O44vy!skB zARc)=IaoU3MZ?(2l%2^NrVs|NQnd_z`?t|^{E?-)=Xr_FCAAN+JL1#|M+uQa@ z_?(-{U(9wU=ZJi}dU0E%dde{gN;xA5g=>Y+ATYZ1&$G>WefSe^KM(&P?va&|Dq&e4 zOIX?|>D0Eh!ddAvJallsw3`1nxu+~caSNuW99UzlSaQj{NY=X|F?M#asc7EuMw4f(8JByrK}CW{tw^f?Xtdm`o!rk z?$f)Mq)eS56>`2;eZ6VJddNpRS2{1gE^fHT-tch`nv^9G4eBaCGkr?*&C|dA;n~xY zyNvl4kf$;I`W>xDQ;?G$ zxCL`>bMB#!(BxCTaN)ch0w*TC2wX6X{q{}9ZN&R|+@CxHdZ#f5PU`D)O3$B_eRCOn z$V=dZHOb<|i;(YosS^5)^JZmB&FL4UYSwva9obmCV|Iuh_qAR6yK-RnHWd%fSa@^a zFm*Wu-+kR;U^*QC!iTQ0ve3G-{jvGD$DO@sXqUPd@0aXmp;2FZ|^uL0forpns@)PMY(Ee zz~s^Vc$b^j!cQOf{%2nKKR*nf{^g^pv#v>%S=S+7O9&E&55N5K%SV*YFJJoY<1@$Zk64Pl|7iR2 zL)TwLog)GR0?_pfBc}+Ph{)KlR*6B8BWur!oJA-f6xK;C}jhi%Y-7S3Vl6Nb>FXlFO{|!4guZdWX zxWI2<8h%|I+GH+w8-MVs`}m_b;PbobKIzmgyi4kqd)%4Z?y(U5Kk@iYw{eHRaf{x2 z&2`w;E3U&zzH*J;{iQ|FtK%JQG##tdsQZh1&$%DFrd|1m<1!XTo0_gbWMfaN0xY}o|mnyt|5FO&8@6$T0mM_+2~q9S}U=( zX=PimFhYO02Y%m}Sq@q(p`Pd}^B4!O1sN3ODc zW$J=Lu3g!$ zO+F~j@#gg{dtH;`VC6przLej$hffaq-ry?>mK4ujkUwwdha2%`X80VEY}?{3!D_n~ z+P}r^C&$m*nSQ$qzcnwD=TaB?DM&^Qfc#(hDcCOV9_4iIdJn57;}5Qk)gu1!_wkH$ zE9d2G`J*Du7cPvK?z_A}qK zZ8~wTL&x0J&h`5a#azdtRWa!6uZ$Qna9hKXv#*9nC4V$@V85+{2MyXbuz%Fn%HvBu zX`FeO81Kh3r)TcYnpyB^gWOLayEGg!(co^h6Tv_2l9`bvL*uj69GEnDk|bfRI3jMU z;z4B2ULhyJd!XHW?9e{RTzy!aC!D$J;-*)|7JQl=Ghtg#1aGz4c)Ta8XFuuJr>C?X zFhM-Czm)-F5@c$6syCLpA3 zlw|SCydo3kgV$cNS?13vl(#polTJ%+h;#fWw~)^ugbe`vz9YF!%tJOhtymf+mdNnI z{gnFJt?gg-V}G(EKc>K^6hjs%AEqAaYxPpEQ9Z(YM8c9x0OeghZis!YmX`&+H*RcqpXc&h#31MW!sf^!LRw;q`rC4BHq zS-b3YS-kVScmwAP2CrvK;TG6TdnIw%;a|h+)ehy4c?+90ZQ73WGwp+vq(tdADpqPu z-VPq(M2TGTlLSvbAkpBzUHasl>_2!|Y88C**iffKKYN|E#@oNLW9tsxhAv;SP?j!U zD7l!&vNMvU-OPj1sCO*hv35-o=WLV>Z?05x_oYwHO4RDVi>`Inavl1Y#MZvuDUC>4M!E) zTH~Fy-Zfi$f&=LdtevvA5M&G;gF8ON3d#|k8G-`-tU&bZ9tCy$IDV!^0#H literal 2998 zcmc(gzi-?46~G@&0}=>=A}w5cgGe}%5ttqv+26s+R>U!I=OC~&WKMAd5unf^mWI>N zL8*Wo$D#!SaJ!)`+ToV`1)grWa88zH%5a56!Sz&PT{vtR8Q(>G?%F;N)0GP~oN+%?FYJx4;B z?f1p`?ZTLd6Z*+uFpxzTK^Qv3p7p-Sno1I`n(*i?5S+RW2C+wW6};JmQm9hvOQ^MQ#lQ1dXH zJ$0lRN^=o$bR3xu9H>RwT&Tm@wnTeT2)?cFNI=c1OyivO^As!+1 z*w$z+a0-yiq(5gDhwPyYq(ANT(MlA$t~8qi;;X$Z`WQHFF0-dOfK80UnGAC5_f0Ns z)BIExgW2raWUyHLV&2ZDv*y7fAIw$1{b~Mu-k8tw#ns0*Wp2)A3Xc&Crgw6oa;a5oZ)B9*Z&vM9Hkn}R~vU8?VO+e?M#0B{?D?$zE1g? z;`=_0isaU7ZFc=sN z34_7|&Mm5@BE4`*9mtqxS=F0iwu zCU*f-LDGT*1xy9G3zP-93vw6aw(YRFk(0k5e?fk2Q9=HK+7vJpFcj25+eTIF+aqD; zu5F|SCHYF&N;pdL+14rtH7MaIm4g?v?Z&BurG%vfq9mam0a!{LON>ecB`o}L5r>|X zu#{R4%c9euT|fpy4MPn>4MPn>4TBvg7)lsw7-|?w7zo3KJq$GrH4HTjgyupHLk&X> zLk&Pp{*qudjx|OZF*42>9JP(DHksU(Kgp9PPlTTsdGX?fynOjmUcY`VuU@^9w{PFd zyLa#8{rmTFets?=K75dmA3w^E|ET4U-+aUOcusZoJD?l!>`CM5u@>+Dtc%b6Zn{Ba zRuCt>RBsz8o9}tuz-xT+Su5Ro=&}yebjNjjakArXIZ2%OUW$JC*{@rv>yDOP?z+-A z=k*t*PRS^BVV)cz^BVm_|<9*cTY|xlU92PBa~>j90&Fr zeRX;|bPxUW(N?#0UR5i1a^L7rhVJRw?e_A>=>`ANQ%SFy z3cp(L-E{-+T;rm)@dNKVeK+ypb9ZmIj}=Vy?D$_V!r;G4_#;;pM_91m&{IXfQJqd& zaVrSMN8LDXjjPd?bM3E1_8Oz%vXyABx*9Zi;CBB_t^T`{mY*cOUc&NY$9nUAaZIOe z{$z*~0lFK9tu&y1DGBVX5>xrQfxcop8Xs>&>Obr< zr;3blXD47P^*IUBWz{18DSd0{z_f$*VbJ3#_Q&JE?;TgwanKks04HgBd>#Y|{|MuD z(r$UguQ`P*I|Z7?54)nRn8JghD% zESFbROZ%&{;qF$|)zL%T#-D^qL?1g$!&Rj9!Chh}7 axzyF^H27RLIv1UWJvSP^=jY&OUH=5W%Erh5 From c0dfecdd1a37ff7501ceae2ef16df8b3248196cf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 23 Mar 2020 11:58:42 +0900 Subject: [PATCH 358/534] fix error for linux build --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 03c55d686..a35c798d8 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -96,7 +96,7 @@ const char KEYCODE_FILE_NAME[] = "keycodes"; const char KEYCODE_FILE_NAME2[] = "BasiliskII_keycodes"; #else const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -const char KEYCODE_FILE_NAME[] = DATADIR "/BasiliskII_keycodes"; +const char KEYCODE_FILE_NAME2[] = DATADIR "/BasiliskII_keycodes"; #endif From 0e01e5c91e9efcd429db248fe75e4dcdf5584604 Mon Sep 17 00:00:00 2001 From: emendelson Date: Thu, 26 Mar 2020 20:27:24 -0400 Subject: [PATCH 359/534] New icons; removed unused icon code Replace (again) the Windows and MacOS icons and remove the c-file icons and the reference to them in the source. --- BasiliskII/src/MacOSX/BasiliskII.icns | Bin 598067 -> 633200 bytes .../src/Unix/BasiliskII_128x128x32_icon.c | 5473 ----------------- .../src/Unix/BasiliskII_32x32x32_icon.c | 353 -- .../src/Unix/BasiliskII_48x48x32_icon.c | 779 --- BasiliskII/src/Unix/video_x.cpp | 83 - BasiliskII/src/Windows/BasiliskII.ico | Bin 99550 -> 143930 bytes 6 files changed, 6688 deletions(-) delete mode 100644 BasiliskII/src/Unix/BasiliskII_128x128x32_icon.c delete mode 100644 BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c delete mode 100644 BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c diff --git a/BasiliskII/src/MacOSX/BasiliskII.icns b/BasiliskII/src/MacOSX/BasiliskII.icns index 437ac71ece7af5122858c08fae7658a778948a4e..ba38cb1f12017c54234016d861c812258eb37f1e 100644 GIT binary patch literal 633200 zcmagFWk6d^us@st#oZlRthl>`mKHBArAVN-TX9I>p@rhbN^x4;3dKDs?oM%ccSsn+N)^6SayiyMXZ6#I!0N~(gEhGg1{OoYF78U|vg>5{Q zqW?z=Ndtg?WS(dd0DwXIsh=bOpi<@NBKkz*X}U$C&f} z-*({tw2S@U`~Sy3N=HkD2%jGRX-pzD)i-(o0Pv{_1mI#n6=q%~c2CUM9hH=H)RdH1 zb-di|99?Vy04cIBhO6$229yd>?s^5(AlCOPkhWe(>4D^+~*lNjz$LiFD`*S?( zTQZVSr3^TW`weBWcpkknTNl>&nj%TZX$_V;k_~Fhyu;lUooC(RD-LU)vTb;5D9ma z!5IE5x>u!1A)i)uRlwj%$`$ODXF(Gl#RTu}oqU9Y7-|1ZTyq@$=x39f^|2?fEuaZK zHA2+QS??v5^y@pWS*`t54=GCrXLuUzd|n=^{g6J4!IoeHD<0Vj#R&z~RkoEp8<~`m z6#Yegp<(Ro_Pg}e!tV?dU4jRZbXkjpes0&+)Xo%^A>tO_pL9di>b(>DoX|?UKzp)< zxo538Gz;HymnV-tVbcc8f!bsQcd!{3&8PJ~Hsr%q_TIc<)1v18I8&-FTcDF8lG5F- zEFs4s(*OBO*N~O)3++jAm*oKIgw4Lsu{AX9{J(SyW&5f;U;}^NgY@TtD3*`4M?wtt z6b03ibD2lD8h>T}5S4%Q21bAXIe6yViRaJ8ByR?s;vhP7Uo#nB&|CPEUwD8F8)xJE3+h)Go@`zp zFMIs;Sn5^+E}@xTm38_|CtJiG!V|*#@G^ueMDRf~`jbh^iwAb|)Q&`fXVR^w?YSIt zK~-QYisfi?hZ*NwaV~wW!JsXg?G#iSsz#2Xnz9+poLs!ses+X+GeY>l)K2>ezt-tp zeGvaS7OfZw2X;30Y_CDj=kia~CX2brMS2qby>nM=#lB`)+ux)8WpbjqRHIH~w7dH@ zL@^q3+7K29&gvq}>&IjYAsLx9S3XUSe$kC=8Be3PSNNYY$4AT|*sH|9)XIJTNeogM z&sUXIapMIKHi?+es6~C;!G=eNAy<=&UH)s#%{jq7Ivb(O!ewL)4s;W@~6fL|Ik~*F|IeV zERyu--;(sQ;1_7>3ENAM3Bc3eg@KpiNp0YHsG4{K00d8U0tz4?Ba0RQPz0#Gd1c@a zJZi`JVLt1#+IpIIs|p<*{-1m9C8+i!J*apLz;Qhdx!8PlUvScX+b-Xy`HAIzpu*I-F+87KSF=>PIffOXx!{yh?j- z!mv)7cXJ{m3F&Hv5M1|pcTTCx-xPn|@pwoU81YZq;w=U2W)I;I(O;!dF=kRf_D*So z9!dp_4fw~)|A&bMm3@7U7y0`?AA9D6t$P8F+s#+S+SxMK{fAXBi`REn&P<7cq$P5^o7RnMcQ|qw~BI?&v8)Jt*o&!Zn(bBq2kVhs(DU; zz*k>qc+@#8C2yKeP6y-K?|OTC52ix(gl{xToB(%khiA3e_B9l8j|RUUFQCEgXPpFx zEqX;6jehJp?RaytUKRg7lE1vH(YD{3A(1V0j|gO_D1+9Nm3myY=va15C&%^RLQhKlHhw2`RHtMTh=478F0&| zQhmvXj5MNvCfexRi0_>TPdwX%JQQD!Yoc_6IKoIHOi<%u$Fb*}+oBe@_1|0nRbVHQ z;M8J=V-w?zXhcran08L}d|Xf8*(mI*dKNyu$prW(MaUyZ`N2t@3snD`ycO@-;OAVM zmX&Ai)^+%blLJN76^}b_*h_Dk?8*oMEeoSYQG5EFlOcW&`r*ZS z&K&o2o!rXO`^%ZfO^yTq zXoFpy@S$^y(Zjp#H(yo{|Be00J}w{GWl^{s7De;q!aN7o7M)(NdpC$cYuH_r!kF?f zgF^*a(`*i2!_(4oM*!ICHV5(F>9Ou_>9lE-hQJFSuZf1v8-BVmgccPlL8?gc!MGHf z)XDDxH9@bZy`Oy!7-W1CoZl?>Im%t=726e$j|E2m;*-XD2P z6Aq}0V+YN}&{p2}e2Gk$Hm(2d=%5z95fQ;y!i|x;b;}X}-*%ho`b+`8A9b8RlpI1? zsxJHdJ6E1d)8V5?_rGzzz~j*6;;Z@l){J1~FK5y@C*?rl(vS9v50iw^;X~=d0&dlC zYVV#6N$fVCef{mSL#Hg)2XtY3`z?<7%RV1;bne5Ey-$iGCTfCOdKo*o-Lv8HYE@rB z^8*LcAiByR_aLI2&n*6}6G&j>hbY!}@`0l;C%tK^kycxPOL;?Ekfzuj z-S5Lk3Anwp;93yEAKHxFWH;**REyNkw3h5{2ReL{7NE=Xy4yKSTlF5?VrpHG-_cVV zH{ewe*E*zNfpDm>DAs|gBs(T$Kr7_Mh1SdLR|$s8faOa>d&=KYRxxn zVZDUH4So>y?iE?X8#VqULwg>TQrYCy1SY8L`Y-cFlX$P9o-`3miv^Dr)`F@#Upq?S zgj94F3#0!@@scFHj`b{3hZ)gv%F+I(&8)K;-&;-JJ!+}#kk5+LW79>`tY%W6n{*}~ zwNb!J1apWDa1)Un63KW@TP?UG#z)x^Xf^O{yDF#UYSHgFj)rKf=+nfOYFy%lhyiMQ zYgq)q!DRPi@pLzs4_&%B*RCJD2?HK|7b1C*H{ek)kk4I*tbIV08PJG%j)91Ha`)Em&L7-uPd%Wpi4e zVFndUg1;O>ZV*Gy`=Ai5kC9F;Qop!7N$yL*^N&*7+y&2_nD4U*Cczhz?~BZ=lzoKw zUkW|b;96lC15CYi^0&I2bh#gik&1Ptc3WJ0*_^~vYW@|{g!qzNx0GFZ`s>E-O!EFS zQD1th5>}@X#nc*V(w7bN;k*N+{%`Y=vwwZGf_vGJDKAuEMUW{dECyAP> zc8Hk{FV2Dvtig@>cR?ZzUba-T6H+NB%_B-F=)de2`?YBh%VisHzKiDbA>r@~`+(D? z&3LMC9Fj-B=)JEbVs8|k)6*9?xCi%#8~xuCWrkEo+O|Uq|t#*sU?kw9$twD-?|-dOoS2Hw&sgPE(i(QBXI>>|fF& z#hq2z%gD*PqF$1o`?sOc7Aiy6jaZf6qo_qy)&Adq(3383zdknyL{QB0G(bFFB2@8! zhRfoyGmSXX+RjkxN0$R?|2V&EPf&{%@!M7jr|t6Ya=l}2MM5Lpd1g$)P12H0jsBom zDyrZWZP;HUw{&E)oPRBC1Pwm=e!oYlH{=pgC>V00lhSBYO8){zPWYj3 zCs3JYbnM3@E@v4qjo$GJfYzy7&u`svh#3)YFa1<+#ZO3J0fFvGBx|!7X@?#klBW=B zkt2UL7&Lzt?R>9dbm9qa_ciVEB}mF=oC5}|1e}$}?oOvRM{<2G1=Gszt(!&^+LL)u zBpNbV1D$92EWbiBgxTo;xeYaw78jZfJ)ZmBu&c<^xw<^;WWzo0Qvc9tw zrRjP&pW?@aXFA--?C77{4f0DkMPU3T`;XCch2@L#8~R*C%VYUXi^av@%f#rs0#T$C z%XhHZv&;21Gu+J_q2=04hjKrQ4@eZ!zsgMfWn>BkeA7Qhi4i*F+PK_cvp4=zFmu%< zu*2%3>HbfRAeU`zcNstd^83zTrE-JkeFv>Es?O6!!I-17oGwnmGyiQVI@e_o937br zA*psR34WDnRDM6BV(V(E0)r3~k|g|XV+UGp7b6l1oizb$ijv~rOU9^;2m4XtBC*&uQpT9o$#8R>Q(i8Rj zOt5GA3l0WZJoz+A{=(K>u&p5)6Fy0Iv!TcPmkFvqK>9;6nZ91RT|$f5;cI}u zo~2lkK=7x5ZyBANqS(a2{_ab7LO5PLr6xl;^jEWPdAryE&wDEyB`bvT=WSdK)c}x{ zc3EGa&+KZZkIys?s3ZO&>Eu!)UU)^OQY?k9w~#D4!Bb5y6C8)sNxJApey17f)As~t zPdX2f~k z+AEkaas&sNKZlUd*WoY%Tg(uA5_l$Ad|m;5ZY zB9QRQ2Ms@r*;D+44sS$ghO|;f<53$W>{UU*LW*!6=ghxd`h0^QFW#NG8#RcA1ugPO#6E=0B=(dfaCpY%9s8DE;ZJ}7bb8KC7 zeyaQqA*vw{5;E7Tf$n@=$IInGfWUw?O-`7KsR@7tGzJ6nEWRf1sI`ad=Sn?pK&6+i z?#_!mPIBWJK0PwEI-f*66UO)>QImngoy0&)md)8C6rj&01Mw9}MgZ&>Ph%?1zE!JuUD;+9tS~w|^+DvkKJEKhkoafu8!x#S zQ4%LbsZ&}ukwmlZs7U{;n`rsFa=KuYXt>+j9Z36+a!|$WN0zHP+FfOEa>zoAb9I6* zJqeS{RbKmr?8qc${LE@=l1hk1C8lTv-W{(Bfu84G<6p*vKI)Y-r)BqtTdpJ4@y;&< zG*0yN^iIQI?~|ow;O+7rTZAIrqH(1=FwJ2sjUICwSr_ z)QhDGE3=2ULSMW(BZuKp1UT8}UCAW`@a3k3v^=2yHl-!I)xHR z5$?5ZQDk$2=W1*mb+RRqrBe^1Cc|FGZ1`0uVSYn*FI!W;Wh-*1&lD|jQO z@yD;#*SQfy4AhIoBvK0!n-qkI#7rw(DMg;*KU;l@@2}yh0wAj_u7jj}2quJZQ_`BW z>#V5gt<_ZGGpnsTmPm%f8%`R|CE8dl?QPSKxP0;Vz$6^0bZa2R;(yt)Zoffi3nN@^ z$S+cMz5K{>m`IzLl_&b|-DBOgxa&)arOjM72EgIlY@%Wb2v;_&e)?5oh1qSX%9qwv zm#UPMMD=1J;1d1dUGL+O33pkgx6>J2<6Oz~I3iznAkR9J|4#sh}=#NcO zAA=p#!-&S8`G&feL$TUo6)`%Ba3R-efi_J50tg{3B#SPsf1ejJDQ6UoNak}K)lvQC2FB%L z@w_NFSmY=dYVW`-%##c{ULb~x%*Bx~B=_HuGt@lRUjA&bc=Big49ez=WC^MtXD1*1 zq4q5$KR*?k8DIDokvwFpSQnWiT{S(uqc47dw1gd{HeQ%uROP(pN&B1x?g2{WpAxaK zP)XsXKH^jA1y||I`knBNWD&^wI@Le1laEcIowI@Ym1-Vs+n`(&gQD#(^6b}^u+V`M!_#P#nT<61H%3Q>Qb zN3@|e3{^o4e7URMY36$E-__fbO{K*bjnya>Q7)a#rz#0jdzNf6u_a>L_b7DQ2PJE$ zc;G9YmpY$fW@oe9G=A3}sGYZn4d2NZI4P3i{_^|PMgUZE_<$A=`@qDF ze6A61@MhTAzW4q=*uNJuf}SFn!OfLBjeQWVQ&S49jzfLAYG5-wcQ-WtQ&=L;3`mji zoy8G9lZTAJDN)<3A?-8s$U&2!t@^bk*M@y z(r8`?yp|@-MiQLU%yeUOUP#mV(~&^wp;LC#Uz}y*J8%5#Lh&=kX=mmCS!m$BW;MSZ z%0Pdayf|h>TS}X$aQE`o?uS}a7W>%?%#^oFw*z{YryGq+=fYxzF zj=3XZM2jQx6CMu0Y6>ZqlQLc^h;k3ISj7@Lsn2=XxgmQ%%Z8Zz|sXRY1 zyQGi)+Qkz5{yc|8ZRoCvcOVx8OX!%e?O>bbU|ucEgu!pOb1szg*yk~}V*z=hckAB{ z$+cx+7!9E{A@?^wOrwiG8J_=W-^?|?^*&DE*`Otfe_U@`AN4+ykNTbS{!*vy1V=8^ zEVNPfVO~J-96(ZyhXT-(Vmf6hj`@g$raWgQfm~qfq)ySUbvwHJ>x!K=;$Tw@DHtFf zC-KE>HC}PYUQ5`#4o0!lhU5NO=rdeJeGPSR`}Tq5BQ5fM@Vc@n#!b;qo4Jow=CYYw zolP7^9mk!kNItdt>nKadf&ROMtJb$qp`fhvQR##AtZV{Y)yN{Ceo*~1B>30NS#j8~dy-nVZ}oZ@xE@B4?+ z!y<9@Kby)4CBZ>Rkv#zBFd9!%x`Y8D*Z^=jgyYQFtgMw$&>jG%_L&kqpzedZ&C7P} zv@>+Z3CdA)YL%Z;dk^bQLoZboL@<)5vVzZ=cU<)A9l8jtW|s`99XLSRa@6&djD@UD zsUYP~yTyyxp}j{P-7=YnGjH#)YSxTeUT{_YuqAjYovYG-dG&ya6ZwFdROqn?w_2}Y zvJqU6wk&8Dn1Rqp64`LKdpTNB{QJ#6;wa6a?7`LV@OE=vsH{-h#C(2&RkHQ3!Im|> z{j4u1cxM?I1cG;40kDESXI`<05u=XDkgWVAbqTo& z>-K)HA6AYbXc#WV%_$*8fLOm(5u-rocqzVNZ-SMwvKtMYGmP)qy+KP;7jqG#3}cZy zMB=FRDM|{~7`z){Ob`AhWH~-up2~cTv7kcJ?vN1OQ(T!=j{M%*&-Lw|UsOeM8vuo@ znT*qnUf=fCe~ zKFL*d_{(T6TA3D8>wkOuz5kunJNbYK=FXC5gU`<8+sP!+3v9sGtkOX@E@n~BmtTU$u?6>m+G*%{f*E5cbcvSlSaFTaaxD)w4Z!wgrQXfzgnT(<7}9g zG1m;9I&u`-w!J9_ktFgpo_ASlvc03YK@nO)_dnqq%zE8BpX`r_!<%`{30$HMt-|Vg^21BB;S+ogWkofbPnV`u*NPn%Tms_d+HE-!6*33 z`nPO>gqXvO2@rxCazjsV;bDbf_E_0!j%n@IKQ@fRed(h1B~g_%sScI=*9y>v?jEIigCH~XO4&4-hy8U5k>FkO@dSW8!b<4NSH+o;O=K7EOpqIDRdzm z1iL%TcrtZ=^>RxIUMw-`Nz-8*M(~uVwuvX?5&(&E1<+`RhAaO|*&k^O>Im zE)#^yg9VI>4D^0K+~4*&yH^dTq?s-Tm-t-o!YKa)PLRMJL**+UUj_x3jZyoiaQRSLV{`>Nz1 z;7u%SL;!$Ph4hc0G=16#g&b(?sXEV=Y+0xHvf_21I^E+X{R8o8QQ*yi_s zeNFy+RlCX+p%r7*dw4j3;4qf*hL3<$y~Du)XV5jhz+GtkvuQ?phDEO0tbnuJ2CP=3 zpWDLq`qj%tSi$UF%T6Dlnhg%{SQb>A;8cG?roNt)ceKyK!X5+9Ooslfo^`O_l`2dT zTWRl}1hQih0wiBu4|s60;r~cJk}D?fOddIID6g~*>dc&SkFvJOYPw<${hxgbRZDb~ zaNjLyBnpj4p)0mQz-J^4!)(czKf;t)?N8Rt08EsE<*%K-+tlt!MN7dd<{Z6Z&EDg?)A2gYENMo&I zT1ALzv9Ml$alF8X2o*)JX&8MsyTuHS4K;#5rxGM4@UGzQ55NvzV7K!&S5J{+2xqWj*_a|RV=@&CDelZXik>SGKevv{^c5s%3P5GTg z-~|!6aog^3Au{-3JB=?mXp?^Qv+jt*mTPpfB>~chL{1*kntY&vD^`<+3zRp9r543!6X%m@D&vrmlbg*S?sr8E69l1ERJn%W2*4QuVk7aJE6Ahly|hry;y-~wd5}?)T=~1q~A4liYYQ~ZBoYL?UU?pZ=|a12ukZLz^=p2NVwl=AST%`JWUEWSfiW;ir3ssOLd*)*FzR z{RGIz!lBL0h4xd00_Cx6dgnNP8t{`0nF%jf{5^o-7|cD*g0G$ar`ti~W{DV}1V9L5 zXv*{gmGaCLQs>F+wup0Uyke^~c2^ME!L!Xz!U;%zrrYkgQmYthNs5 zf&Ju0>iOaQC&+q|&`$GivT=)j(L;<^4T}IKEA1tnJNXarcpM8QRaZr={jXtK*&0!t zexTf18ql)FQv_rBKMe+9FwV3yHmfTa@erqk1-3&?x&sPBHhj`({8l?zvnBV_2A&dm z-Nnx4N6y=PRP61r}nmy2ivKgnf75^T64+ znBPvGP_fk5*S~_qn~EA<(*CvP~GdSxnPJC^10^* z>vmMwm5QVKt>a2nOYqY66#?x*SJLJpg&@oO!ixbT@VmoD_95-6T&7pyjHN2Q->2JL z9_m3N@Bq3^u$f${3;NjS-+z^oZ{0r?7-_x|A*#%3q>3ZfGN<)>-g0tV4%*LLPeKvy_bq?#C=;%g?edUBMVXnd4G#F zC9n~e2CuMC451Jx+oXGbb=GSl0l6koyaNG|=kN0UTOOd+gEdbX9WS&Ac|*gLl3-hf zvgiVCfw44+3$Sc#6Wt7%ZJ8b2CTiXU-C)j-1Bpw%*-OKbzFTX2`0x;d-p9ACviSv# zy_|gKoaA<4mDMwGj73RJ6r0ZcLM$yuwENG_k@A{>Y=C3h@yU;|X+Y?#7j`I9=<2h6 z7t>Go(=^zjQG;$6cROUH6oO|O+$ky)#A&%AQvLT-@p!fngI=!Gn9KdN#RNI!TzTrE zth&PRK4|_VbHKCb(TkW3+ZG^OCn?#379n`M%pffX=$P-TtpAy%fmR_m3nR{7cSm&# zV*JPC|4J%uD4K2GM0u(SU()_OQV!x;rKLZ@1I#{35&pMh>N<&|m>>Y~g$stSO?|z5 zh#@k22D)kv=pGkZTY7u1{;wNLti9rlYr|<9V#duADFKf5jzA6TMpL?DZAA_NzG-V! zzBdT?W$CW}uY}W#NT^vaLJslpCYj`gmf0h1qK3YiiX2!)1$i%Oe(|FbJyKxO@p6dW zQFq0?9J9`L5alBN*3K)buvbG)aN}i8^(1An2kL0{AbwZYp)k7A5b?)ND7KqmSbp`v@p=l}a)Dq&vu=Er`_DC9%2$WZYyNLdjZJ|=qXSWh!s4~qo`OvB1u zA4%V+<%aRcziZwqQX3gE4ruDJ7po|JPEUc_Cst&|X=Hv1SvtKF#T;vV?L+r8VVz2e zKOAWQ5v-RO6a-_*G#R(aEEk^0nryt=0=e8_FD;1uSJ`<{`_UuKe-Z)MU>O=a=DPfp zA5=!bD77r|{R8yfQNa2}p4CrFMP5mXjV-NQg>0mJQ=7|xZ1FttLujumG|BQvCCE5+ zfU;-!2vB!CdmxCZ$WVtjz77CGt_kwbf?&5n*%E*Rg*%7$4SenU-+gb@Eoo?$la2sC z1W$_n69Yl-$MfMLOe((p6S3Td-|AukjPC}*LGD<58ny>Mn3hZe5abXzo?m4B8)aOW zVsyfj<_Q=qm{~MyH z>6}+#_tZGqE*Bf)28k=^Noel}yg-&srSio!aPP>_v`Dc_%Yu~^WkcD;)BWm8XDnI) zcagcDI`q#T43S>Jo4s+y1;CfU;O6)sHXVWG4Hs-{{7YxA=d4f0eb$+Hb?5d%VVQbhjh>pmC#oP52Pd8aILTG$7;y**J{6w;2`oW z7cyI{i-^zw%libr^UbYDjoyn@W^I>xiBCwY6^WER8*+ZoY_oD?pKU@#jWgOHpw@RE zGcdGEP-)E%qXVp_G<#E(X4WL@x@*9i!V? zT5Obdfw&Degp+BQjau2sK+Q#$Cc?0-u4}2Wb#WYvh6`RI#ZfwWKJLL8TN+iIPOs`h z*o|>+iTd#XX@C-|HS5ZkqSX}>eaxY@qBKA^E@}en0k0ph^|vY&j2#;6)xR>L3ID z#?XJ@P<=8B)N?Jx|1cH$88ACHj}{*OeZ0H=>8AMW^)hSaW8JaZ1FM#@V#vkAIWidO zyqrt#YuAI>kp*76ZTp2N!_NEVa3}cF=04ZmC=Fx3^=7e%f8;k>e(nN0R0aA?ap!^A z25|~QKmKU!%DsujNE1*NO*nnoEO+ixCKv#}uO34;Tc1-+5-FC-325x~x>j)<@1S!dQ$E`dG(4<|Slda-2fuzw+Ls??z%asxkBvxi zCxqgRwXSzXM%FveW>EhW6l}J<{r)^pz)`rfrJ{CF|TB!;kLTZT$d9g%pA`=Q~%b$O@6L zLN;sWw%{l&bmr2^Rm!dyS8P@)fB3&i++oEoHVHdo@?s4sY%-m>Pox%CUq5?sZxK}fmM~zz%;4vla4Tq>`?7rp~ZEFRl7|; zKV#3hs>%i9=tLD*92D>Fk909;ajHb!E0oIApLQXlpsfI~^-$BmOM$z7{J!nbEoIID zO4!R~AS3NM7+3dW?=!bCwc*HGjP0jvRvjg<%1=%i<+YXh2%SFG$9_5hO#V_73W zMNe^rb|7yplgUWWdO&F8n95nbqY00JmTW=WhT}ShEMQUI%pS}{?ASu;2kfw@SIauh z9J}KLI3#zPF()g0zEz4fFHxrLltkQVVtD(t zXH8cgLpwOMf@%fP0t>en4E9`tXxuXoI$&6?JGK9%_EwnScvJ!l=*d7%ms!Tu(s1=m z@&acPxyx32gKTde{eOqx#%Le)M}uQ>fRVnOUA-^ws8~z}QYm6zHTjQ{yR0M-u}}*T z)6#nn;J#NZdYyIU1_T+ofDAEN)y%LvTr>i+rP^O_sw5*SMV)G&!gf!Fy5jgIih}DS zFpTkcWxXV}&4*?$+lH2JRZ=e=aGCPiE}WFJjKy#2F<{iipZa9bpS%!X36skxjG4=+%n)E5w~xCJYL^n=Z`77 z6X|Pv|1bD;54jyeq5$ME3@7=41nCk~Y1qYpS>HJVO9Q##$Rz!9rv10=JzO|b>?3seJBR=K=)6CG$q3LoXZ0S64K?=&UeeX2n_Nxd3 z)NBN?p0o$e=ecYiYL^ESy`#G}?1K6~|u56ubN-Fue?v+&GNq-NWwNqmYV4J;$^!Kr(b()SH^kMfwgn8{M{frDJ4H# zZR@VNQWA|t3L_Zj3B1@ENaAmYYw=$UNd=#UvkYH+cb4hJyRuL^qaaZ`E{MjT?Va|B zY$q$}=sB|Ez(T3ZaR>OIiKR?guumIq8;&C!UZnw&;+kxDbBLS!`z-7bs~I9A%s|dr zG?QvL{o6A0buCX&dp3{G$h0?}rd&(A&wVZ=Y_aH{(!f%Oc#v(wUC^2}q1?Ammt)~f zFkfI9^lERymSo%^D~(Zze5{(H-%vHWjKHvzUIX@onL6O;=Eh8LBQuD;cL6GS6Eb{H zr>ziwHlwKoM)*#K+~?wZzD!C;qq?~2HNafS^_MUQ84GXw8(C-Ubp=41FE~7(MDj)a zBOc%UmD!|D;K)*uA@O5%66h=HaUW}c{`J}Kjofv?2dVw`l|xc? zAGi~z@nr$z$ce1^R12%gak5jL{M%klx(_?Nq&vvJDm`#1A zb_D4P3>ri`;V%&XT)6;5kNIHFx1#8vxzVwddSZVMLQw_PCO2{;tJITpA=fH$QC~kG ziA5sMrWmMu`k)q^!auLM%4dFUrEyam2RoPIca#B3Sbuax=NR64(FP9W%v@eGM(f4b zJyf|aKN4JRSiGuxDCP+Rn?l_IbC37-Xk-xsmsen6;)DK>s-A%(o)yZY^nFZ#2$UR5 z`!V==`s=3qwHCs)j#CkgXf{GeGhvU^2SW7UTz2^!TkBg9GCs9y5zRL#{hw%_z4rIH zk>wds6c5xISwV^+t=m%}V)dz$<>&2uVbVb>>Q0(}{uKohKMM8zWl`xH{mNSa$4FyY z15h`hJ%Hx$VhcLV!ex&xA`|cEp%=qb?=y=oWq^a}el~WpdHx2PgRT(j7R_^-Zv(!- z`-VtI`y{BUdTt2XC$L(v>b&Paf@C2leT3Xy#cd48qk|ebvvphaa-s78vO-d0IsE#1?2Dq4G65AMMzQ80f6Ra5sJ$E zt2Z;G%#T-%o$&md50a+nr$BU|r_JYKsWyUmQJ$Ro&;0BWXLn1B8Uj%tZT7V-CZ|XL z;hkiU8Gld`Fc1ewhh5p8MO2QlFG5oaCT~FU2o+D%zx zrE*V~xE-dp>v67==`00?Mhf#lIUQxfP0 zq|pH`HH=#M{x1EAqUh9+l&Ae5U^W=b?#<6;$?;~IFDhtl(>UWp@r_i%2p|w1MQ8>wkH&x07p|y52O(}L?Ci@GLi=zX zXjqlbz6b_CzmNQhJb(Yrm~uwU9DlwZT1jLf;wS+u5b1}X#=-G4%v2&sB?MaJ%|!m* zHP0}LLcfhXPcM}xK?Tn-0IoxM2FcCK^gyb4%iic|NZ?uDcN5-UBDe?)?4>Hg?NQXM z0Q_>)1wHd6CdOT@Eiz8cDz!vNChDWI8)TYLJf%g=aLS{NQpjV;(^A{ta`U#99|WJ( zQiQ}MdIplS1}~+qv0Sf0xSDTvN6`k}p2Ih6bmM9RQQ65Q0_PRbK69(hPI1qU#IT(u z2F%#JFNXQCfLVx_2u8s`B24KCDn4O&Svr}e$4j!W?{@#C*B(iG9R6itCdB}?z>8rR zQSjg9p`8Z-_6_L4pz|9Xic^JRke=nH=c^a7J03~|@q>x-Cm2Z{2FC7`JEm>NFHh!c zMJrZNBonyRcg{F@LqJ8=@ZCP=!YZka-qpEN6jTk?G#xcA`bx-c;K|XS#D!S}+)yel zzZ>du_6wF9wSM{qFEGUf5GS|_IEhotA{ruaPn)jv6*Z&?;tbPrMNbK$8?;PGjWJ13 za;$rCkH$YKKT9FopRb`pP9FWf(;uZ;J~oEPrNuW+jgxZ!3C-;>`8=tEC_xl?mt=p* zCsQ^2BeWudL7so#;EL<_8*O3spd0KfB7!Y~MGvhx@r ztt3OKJ0{9EcVni9=Z795n<{}K<>jSsweg>`ZW(u}FG5KmDfZo8$OmGof+#(&%Fm)*-l3KxtXvSwLkh}!6X5+SjQL_y3wX0QA&-}S$Y$88w$Pm|fBC-E$5l!K86owElCs^yg6vGAD6x((I(DBD zsaN(Yeiyuod8zWhV7Z+!E&DzVbYps4Q1y860(TLrIMxOX%!&ngW@sy725_8Pg=M1+ z_@I2_QMumE3RznVj)cpp-`9+#cqFW1;0a1I8w=Jsl(=t!FM3UV;Ysvit&;6zZb93p zFV^TtBGYRy;ip7-GZ}HFn_MSeWPT4S4|^&%?$ebxwIjlAPnkBv((CM8IFF6YkN$JD zYb!2KS08&Tk^gAL8<)E4vl+>+^3uR*7@la`fN4zs$TzoT(~;yarEe3uK!dunI8a>F z0#FAv{!{4>H8(C0DL;39c>*<#>I*w>1q3m^-x_(Nil2SaMDPUp2O={L^jM!kgOu0e z8!ZSLL6Z+kIeupv!S!ZF#hTBa0#~Q)|C6j*Lf80*QRBX==5UaX zTP0QwZ_bAOXx4y{k7AA+S*=Q#2zFa?o*%m1s^9OY8DjY0KG~t6;$@8(2agZ^C~8NS z`D&^Bxs^AEGJKN2y8<8!yvOzI*&$m0$AWgG4R%mjdIrFkw$T~IwIF5_vY8s|`V2xw z6ZJdfT!%!Q%OMgmwUiSZQF>?Y_x)U59gCnJ$NseWv00&~eW|}u=im|&W;xp0=mr2p znglYLzb~Gnz8uW-t*AcSWoGL{J+F2Vnti{Ux?F|-@+)o+S$~gOGT1U#%JZY$OM`}5 z)RAC;Byr;}4Q{n&{hVVAT#{-Q?smdZ_^UaFFa!B~vZkKFd7rDAxWlgH)%y=W9w!?` z+299b@9PQr!@I-Znji5JBUBX5;|c-=tPw7+H*KC~9Bu=E4w>OUX0zOXnu8rE&1?0o zUJWOVslT=UJ(J6}bVLsDz(i?q-?jo^n5u=&FHS#)mSMvS=8e0Xq33h%4Uee}=>0S( zgWZ$2mABQTz6P`Gb4$h!fIHKWQcTw6v~kReoZNZrEB-&TdBu-qV~meuEHqQ&$C-ur*YwA`L9NYw59 ztuj}XKHKFSRyWE!$PA^znqrt>%DI06RyPm0IMAc)PydgmuMBJQeg9q{ok|Kg5D@|C z&heE7X{1x68w5seAl)4*rIboaOLq%ONW5!=XrhVl6Uwy zt%=NHO`hmseS&q2xW;EWRt^7D-cphJvFpA7Nu83%so;%b-@W=!T-8YBhWJ~Tb%ek`|@_KcC{HS)zkjwn5@(tAYsa{DEEeNl(F{$pqesJNO>~?YC>{a}W z1BZ8i>PV9Rn-Qlcv3a+drOpTB2YAr~5a2)8KlI8vGAJripXnD{WXMHrV~YK-jT-q2 zTg@G9%m8BDvA_Pn|B|o)f(4O`?ny0xc)3#%@LVi)@6RuFc5z$)Cy{qmb^XV9goc73 z{j^NZWC8#KjhisPmdLnopuNLDJHO*~ek3!2Uu5AiM&F^y&1p!6oHQp|fJ8cWpUi^x z{vxZ(sq;dHS!>o7b1~AMc5L?O3cW_R&fT7XQ*xl!`rj{8t2ikUx=}ZIOYigR0z41Em6B|QMW@<|Td~lyC75L|$Wv5}Q8|J&2 zpSX{0O9)wsWzhOK7a5^~E__N0v%}i`Er$vq+-nLyc<{qnLs4Fv-ZqbhHez&{EArR) zz4&YY^G%PP%KBB*9rl;vb3Ejo7f0t3<{%QnjeX@j69zqW7o8%@Y!_oVKP7+=6F_f2 ze@U5cXZ5e!HAKV%&!cVf>RW7h>(Ta`Vt)uoJFBgGko16#+dIaPR6%By2kz~f+D?H| zDYc)9)gSJ7+>QHum3dqC{wUwz0W~wn*>EaBTlYrWSwt}>WXL?Ai;}Bqp9cr)=0#Rx(F)1&PDLwZ|w4Kw;<@Yu-jUZ zRO4ukR!HYwjJ)Ww%GRbWkKf1s`s}-n-zY0WQVx7llcE6 zw(^j>3PKk^<$f@%czQ)mIV_I=(R`*X&+jz#%}WZf_DrORiKg!zrNpJL!Zfp-^20s5 z+pmX=X{mZ#`qg|f2-jtej}M(izSW_jK`0M>>d?o$%C52Ywq`B9t`U(fPlC5r5wwvN zfdZsUzBmt{v6M7O{zehys%*jkCZ1c;nu#Tas~f2Ej6{Lb`1xA;N>fc54<;YjauA*M zKi_1EL-NZG~}z_I0b1^}ljzdq<4FKGMR^X)iD#D6I2zW(1A z|Nd#^Pz&^uougFhlbIDiOYs|$d@{PyQIg+o5m{7}sMX$|Bqx#TNc$tB8z7Xs!^{bA zf7LO7w2yuR4xtYCDCu)#iJJ}oedJcF#MB@FM9kH|KQN(6h}MY%)w7~xdZ z(b9Nu#C|9(-bUDurYGCAWfYyidZCA)BkPKohQuh1aTQKx{&U zpdmB42v=-Mi5Zte+%52&gR{K>U>bzZe}R6}j;{o3H2{K-$=g z_TjpL@7s&uj>nou^Yr~_6i29fC~8Nu)6lxwMJlu@gM;TWNcy{5cTpwR2=~#(IuU5M zcZAbLCq-N-SIg~&;IU61f55(`cL(G#W^4Zo=BR#k^ixvATHTF~T`E=Ugd0oVnlpj_ znG8aDEKcblHyrg>_sPXYOcT%6#2f4)5BDfPTso)4-xUP^3^8B1f&G@DnQ|*`$V=50n`j9*f^^Q{nnIR<_W29J;jnHw z_$9~dW|&qUc0g@0380{l9)PovE_ZOm&$h}?AF9-LpB4Rn8Thz}Td|pF*2Yhjf9VgFYoZ&hCMuw4IwzFIL#zDGh#Ir-zv@%uoCn4^DZMkD~Cr?#}_-=;r!g z&Vt~BhsZu1BTgQTJlWs=)F2FT#lqs^_z4%#%R@<;iR8d z79t3jyI<=RgY`>M-VED44S{kd^r6xxh5F@Vt?w7*xC3!0e2q(U#>DCsHu{b8^eY zBcB}f9atbAKa~{j6sUkp;Px3hSe4{K|v8kSTG{vS42jt!k^^ zGEQbPpzd(v}`FE@k! zWVko6$SP(42Qu-3J2mA_ajOMt8{hhVjZlMQI3c|?w*&{e*L|BGpZ(uE)v%-o@;*4t z0*!vpH>4(rc$!2YbNck2_y=MEAE>C<+(=SYVbXW^k_nu?cin$N7c4c-C>ah0Pet5HX9hBHf>QG#>$+^nvXQcOQX= z5?kF#FB>Lv|Hl?2P7SAjY&kD}mf14A8BHL5giKPyUVw{Fy-ARJ`};yjq7dOw2*+Lm zMTov(pjq%ACtu`WOA5OF*W_aNhnD^FeCr*}4afMzi-``07T>9~!Gic^52uPGc|@*r z?!$wFfApN!5koR=r1bJe!zxnV^zR>JcJI3@_@RyhyO*!glOEPP*`oMz3&ErSI827a8P^Dqf;-oaG&Qy&mIRq)yZtAi*;mA@wdHFyvCcV< zI7N6!KN~xR@6Br7?HYbT6{KVSVtD9>?|nPsp+)0Bcv?O}`t{N~_mNqS-acD9JaK^; zze(TP(~Q-izMZCcoPyv+7ud?Ci7X}NOflr5mS?%}KUuh2tCnS(e}g@lq%#ms*gUB5i(L11BQNd14y^WX z=l}f7Y=@U<>bEs-^!}-!)8ZpG7NnB+d(Urz3O@=T^^r8BagH^7U`nt%2A}w>UG7^D zf6l5Pc3-~794JA&d(8rFSQsT-Zv+6KwzbyKP5@H)8eUm(bQIsbq+>uP*Rr;2_7-M4UdtR?=FjetAy|r##|yFfOOLekW0F|vA-n{`hj@eP?UfHN zf0()SL^wuWy^drk_P0JQd?rO%Y~&nz=u5tnD72cnokyDHS5C1{yGYycyHx}%yJ<@g zgn9vypf)jpT2{(8Jov^E!E9+6ZX8X2MS+kEJjy4>{89UokydSh(5M3>=_W@$9QQI4aTL_Mp6%-V8}+x=Gh}<*|l2^RIg%{?dBZ(rhy)F<*gJL&LV(ZM1wu zBYe&cA_~*ClupQ4L*&@3zN_mJPUyU-qTfjI>KqzjEkG+eeU?>^u_dHu9Hv086Xz|%w#>$_aY zZ-c-sC2rZXQ>3!nC#@!&o@|B=H~s~@m_AtSP^IBo+k_NedebUf!H|JaxliAJB|h4?De9p06x1J|^@5(vh`X_l?T#w?7RL>KEYQLF#V_j|(4?N~o+oH~=~ z*q8zfe49rX%AS6momMgOOxK%3i3^fh;hoH{y*9AuPY~Cj-Or{S7c8%T&Gf|$i?_iH zMXP4Rwv1-|2JU)_{khqY=iJ!M`7oWIuj5j z6%vFJmj#_Eg-GMnrE4!{H(Bbn7B14JHLR|sR~p5#+QeE#kB_Qv6FMmT4(9E41OXL; z+k3CX`H? z)OZ*g)$^AC3h`3`wQU)kzhH>fvqa#|*B5dVIMl=56d|i1Aq;mB7kT^2_n=XZkGJ3t z4QE6;-qAWYr>c7%kdpDBmm>Jf@m|`knhvxi=*hX=vBg+!2Us|Df}NR^8doLMa^%7*yLzC7?CwrB^d!d zYp!DaSc0S|s?x*=aQ^K>2{u;7!I4Tcal5_s|23!3klI5;aiBXv+VIM!wEF=|;1df+ z0)RLkrCfL1^VmYs`@Dfp+xst2-FKIt`Da=;qXkm5X4>`k{XPq*^i!XQB}k)e%zn*# zdHzt!c^5iqpU~Mrc=r7WFHJSORS>`TZYgA~qI?WG>PD%{Tah;NC9ajokxxM*c=d+A zdUvL0s2)N=MzWk@PW%-7{=dk{k<=fzVK|!mvu<91l?}c3{1exoo9je!5^Ce<1zA@| zUz<@dq@Vzhhxau76$>lx@eBE!Z+zrHou%B(JqmQC!eave%+_02(_sXJ!`Ob_2sXOa zl~2Gf5wq@~V9~VB&Q=)&yX{8oDSl>uND;)rF+ydj5POKEEBHPm)u)%gchLegg!TneVaB-msUU?j3lkF8y1n}tuvMX&#gXluoNgM zS0&nKOZY;SsRbx&p)2k4Ss+@qcZk2pwf~ygt?|A5Vr?5zNlY|j3?8CM zpXeh+M8ZFA@As5@+xHAkHt>kM`uo2eXt}T7+FmcGj{n(o|0ACtPWtM?v_M9la>VpW zNTqrfHR|VMcRUCFEipSR(MNCUo|3oU&|CQt%%a%KRg9{hQawKIFa!89I9^u$(r~3So+GlWxrJ3THV^s zd^aWm|IU=KCbamu2ivp*`ckjw^UQQ)WB>13?vQ`S6z}95{q}AOSFau|bn{$Bb#L_e zh8$UQi!bgWi!2jK!k&qG&Ufc~lJr(9qTs6oH(u0lpYY=sZTf*^t8OF|GVJ(4-q^kI zp2$2)f84RmD zW|OkNm>sed%^v?He`b6H@ij-aI5tsc&bU)JC%RF@X)UmZ;y1x6Ei1kxW5qXOSf)25 z{7`Rm*q`f7&1-cR{b%-&@`XKKjkJLM{i%}GSF~kVu)I>Zy4bU%Xa)*z3VUGZ@z6zq zm80;iGmiWP1Zg$pgw>5 z!h45XD?CN(K8b%VVwgk#2>iVbqL)Vv+tW zF68zCdfaLjp5$Y*9U<2Ln?h)unf#h*fyn?O0)EHA5XH7-XKHir{fNrqHg&sqh%%Wq zl1H{S_0CH8VVXPPZ(rjuopU}NRf=!jvSNwM z4L`4bP~jAQ_jo>(V`J#`^M77i&0YiukMwkc*7(qLqu-9x*Ey}ph8__%uWoy!whf8@ zM~@a_7LMyMS90WhAbX?B#I$^T4ayt1&5SaTLQ6%5Y(jyMda6b5H+-B;nh+E(H+*R`d zzeomq@y`o`?Zp(e356vgicFUe=sj}4*k!-A0a*@A5WNdGJT4S+=5 zpG%h*=Vi}$nV7ibmVRxoq<8cj99TwtLZ8L0-e*He?*3uC8cg54gxlMKf2dTNYyD;@jRSn-HDN>N7ilRwP%FvS zu|#*GW6Z=A&owe9bOyU>|0⁡$B5ALCC@mBrR)fOv|M<1mja5`A3Iwh32}Q21q|rs)?dOqE9EgteK+)pXo7+ZD@>Gg&GUEqA@&%a5)9l|*qr>QJ4AKXMtu*xV z9wm$8vFm1zuN~Ssc((U_nx)0AUw6l-;y}67KpW_8Sv)|x4NnDs(n)httz{h7&q!)U z8n8>!*W<^aY<CW_At8xAZlv8vA z9!OuWY|Qv_s8$f~)XKHGwbgAqUS}2)9xP%Nx1BxZo^Ng#Yr_A%73PJ0L|7V$U6y!k zFB^8Z-TC(Uk;Y0l+lqAtqA$h?k98PlvA5 zP}`ZVP~|S=XWvXbS}k7WSf`ip1zjmbKN*VG{`7BcGbCYYM$M%3f3zB@^XsQG<81<54ClITn;aJ2&)G9{1KGE8B!CvJX0=(|NA3OSRWYq&jZfPp^RLg( zIxa6>Lw|gW&@n#&;Ow&1XC>Ho=YL9NA-I%=M+UsVwyl2+r@muPEN2<&AFvT7jJqTL z_-F&+dop#>n@!NuCBPTaa^*%m={MW)P}0p?XdoV-#m(aU^utX5LmegT12KfEoJD_J z80u^C`?IxZ!?`-AxETGWx%dzf8Rxr1ZR|#VIFB=w@lF}adh0}xs4JOdD0neQxWQf2 z#+8u**v9;pc4)kgGG0RoGDPDl0>5MVTS0&cI%dE>HMP5~ko4JuYg^vNj&~#D9r!kz z+Z#?4aLJhYHSOCSv83QZ-`QW2O zllzk_F!ii(GbwzMEsvbSC5Zj;cUbE$^TL6`&K;>g>SX`bt;P$@L)cB|Cr~z>!~(uH z=`k%td!a8fb-T#ZIe8m8Bi|a`-&;l*&S0GWS>C#0nP|(;Hp8M#Jbo0LO5rL&vbYoy zH%wqY+lpew3dpk>Qllx0uFRgMq2Umh&38B+Yx3%Ga|2p%?!7C!{x!H0CuX58d+ zWdHOxvtLIQu9rlb9@KBLOC9uuPvVdI+r4l4$=OXf3tLA(H6v{}i|j)U*yQTC)e_&E znAWmM?FrkMESi&!h*na3-tJ%+8#8etBAWX}N!m1VZs8PSMvxkv2*&}nY(&NZLqAu7 z{0$OeuG0=nty1$YcRGTdeBgq$C--my7J0d5YC|(yK7#Si@uf49eIN&_AmF7dsU>;! zy3vilKBv{pQrMI;Cn4urxP2!>TMr&!r28!_Lh3YZx} zW(msH=iWd_667Hie(p7sGH2MU(MY^gjGQqW3+%b*$UFJ)-6XU%U#&Xu>lc0B2Z@kI z^=IUd&HZ{JJ?w7RX8l?S00#cDtInAaO|lmbS@F13=j>j|uZjyRuWMdcBn!3ORfR$8 z)(Txv!P(*}YMj+Q#Z#!_>NOgZqpTfK}+f%dyddD_&phFegpCh|>dXA*02IeXymsI5rfDc;M!vX`Bf?U#Q& z>^8zrI!Bs z08t3ApeQFF7?&utCV}zAmF9UGEkYa-#fQ`64b)BWVT-IxJc~kvIc+mvsaq3`0L=WB zeCA^0nBUiqr$S+GgS~!3`#)vd@S5KIP7+AtngCNvNZy6oP@=d}{Z0}R7tgK4W#D#A z@8k%~LM*XHj{vuavIPomsUJ7i4E;NQoL>Q7DzUf&o~bkF?)5ktb}MF@ICn!NZ}s_aKo*F0i^%%3IpCFGYzv@;0p`7wcyckpw))oE zOWf}$#}|;=v|aa9IjGbRh~o}>7rx-;n%c&}SSuMzyV0!v=^bvD>nKqbF{0Y)aoZqX}r|=4{6-77JiI=WeQ~JL!2)o@T)QFTLlb2lT$^EwH|5&0M zG%o=8lSIyUkj$9%5rB|j79_=VG6EQUL5T7%{3Mq5iDW*tt3ZPRAnr3v`A2K*YVphp zrTROhdh3S6B%#xb@x{6_xssJsJERx29?JS0%qO&_XD|P9=>a9*+C9h@7}yZGP1no8 znr*}YcwOaJcVw?1^4F^ccP2QDCZO!aL9yrKByyYIa2%*Vvd{qpeN&LE>%_^OBOYq$ zKP)l_@x-m%EMXf+Ikn5BvT@;4w8?Il9M?d$!#QUJ+!a0pT1l3>F9JXGhV!P zo{j>;HzLbf-T_$&It|J1bHeddfZT~e;_oc@KvonZ#%C4T}RlH z&R)yj;mC>EuKWj;bGCS|$?LM?nJ64-pFT~avyL+~dXOF^`FcC{%6Bt7n6CREc)z@TuNZsVQ;YZv8bh~;TNz!QQ4nwD8ZdqO zkJa-9Z260WKU;y|3Fhm9#mz!BtSq-oWaQS#uUK7QO^r+B(TVXPAoSOVUr!-7^oIf4 z^B#Ye-8&pCMQio~IdC=&P{}(ydYR7pGjLGHEg1ez*X~iRY_-M4OW5;1ta)>56Sgag$#Y^3TlL2;zHRSPX08U zv{}a`3m*fuA0tONN!@J#FB9jvbf*FO)Cq0KhCusNlid!?dt4l#fpC1Np<6n&;@KEC zFJ?q>^16+|&Gg!9;(jqaqa1^W2XBtC+0W;CukW-RGi&Q!rIAbB(0ZO0I{wM{vL1XQ zhVwcpD^Uspvq4Xgv?ste-1gyy+5$R;iSK{Dx*K8yhT;qvN+D;T7{!AN5WOSx-z&_o zrD-EYE#j+=&XVNT_E!f1ubA*>qNU;diPHEA2A%0agDK{KUD90fXb-j4ApLt|fkj-# zfkTcY1efU=0)pr1)iUuoX3``2%>P%hi-vV@2>V!OJoc$rLqDs2`DFQ+kp_XM(t8uA#&@M>!tgxKv&@eT3O-c~&BBAvn>Q+RV*u7p} zJyO_=P^|ql;Ke-q+bbA<1Vk^ZjVC$J-1ru#265Z zgS+De0!}9A=#OWTKDilh_A)^m-?Wgx`IP6wxfnnbyA;8Fd|>3wkrX5WKZG&wo+9KR z!}^Dk?4VYTNDeURVj5%QQ@TK6hIv z`i;^|)0)%IZ687tZ1~mPG;4*f5#xgObh)#|YX$xxCz4=!&|IyyKWIHK0-Fzwh7`0rDa$ZE-$J^|6g|;kAiIEjkOy zaj|bNXX$}VN}W=DHg*mgiL?xc8z`AKegKQd-?2C~d-#{E#|Mbc&!d#idDXQI!#~k0 z0>7VN=ZIPV^w^RXEmA9EKrJ{HOZ+q$79kPmA8;2n4V67b_Cu=f9?#ZJLmva~{(kxp z`$g01-(l0`_8rE%;nLDq@7w2^XA8Ic{g9c-=2eb4euMrP(z+kl9H=%X?xD}^DOELXQ6eG2i!55(llxvm%M=;24D z5HPM0^MOO2ukquRRO^@$c}o-oN4o#TDHZ=VO*A>nPObhz;534!_EY`SmPnj(V-+XI zrB*ATyB>a{N_FS;wq_auucYDpf%86cR$xLbxiTv;j9KMwU^os-fdg;k{0GFdU$wxhGv?xW=nfI3{sG=NtYdk*41 z>;!al7V-H0a)sV_1QTIqf7ZD#Q#!!UBIT|*KG9XiCP~})FC)IOl%~SojYyIW{CC## zNPr!SnE1dQNsD@{2pGpD-~kh1q4^9GFXt$~a@Kq^*h9EFyS7*c+mD|?*riJTH-5~( zB^vX>pyV3gDw@EQCyqM9;3gfG<7hT>Gntn{hH8607B#n}#6~sfECI@$`dd?R(cH{T7={>L`CTO=h3C@&4DV z{HbxaW6ZmW2fo0a7$MNdoM-Y)1T8m0A35rub!@C&<^OfeHA& zMedoZ_Sg~3$mz5Fb=V{gHTf{7J*j#I(!?;{JIFv>o3w=l+!M3u+*5o}l1~6VJ3af; zgwuys1E1ljdSdcFctN7w4Cb|49olPEUT65Xb&p7LVSG98_@K3}Iut!p~|T7rihx3b;{W>q*{ zaGAYH4QK;8?-@ZSPc;dO9=wJWB;SyCvoM(Au)1w-*~9*8Y^Sk+-)yGZ zOn+=yK`*V4S>6mAs{JUGVF0rK;nNyeIse!TnB`@8Dasnk&%x(W>4C4hk>EmASm3lw zAL;GmF5LQDsw#VNlN3-fl#=&ZK!J83`L)rfuGxjGtAn|o(sWmRhZV!9Tq(cEnFDBT za@6z>TrXbDB4HVjmI0cM@0jA6}xoe=+JTjys8u4Pohpbsrr!ls;okqB!33 zTXOopdn!bKT+X@u)g{*b_;tvEWaar{tqlhuWv|*xyq}bS|6-~AVha>hed`p`U$&$x zn*KOYDQD_O_U#b_VynJ?*0r>9# z@bmX*poHbh-HJrjcDu3M%k$;Y?|XilRgHHS5~bsZf$kla_3y(CP5PB70C~4$(9;ib zF%)p00RT)sgn$JMRO;$go)2lK{NseUN1b-FkWGyxGD~&aB+1Y&-~Ma-N4Ulzt zH79M*1##B3m3D9Ba$^Vj&;dDVn$pEJd3_wTErlipT<*ke86AGBY9lf1pG}kwooHw>^FEHMU@Et&RljDdiB;3^Kl8^o0LL!r@ zIryOh1DL2RHq^Gt<(vZ6YX3^O0lpc7=efrf0u6?Wg z#Q)jBQi~YeTf1~NIdyIvwZQ>pkiDB5zv9-i6qdCeCS*cPRz(r5plaG^Y$aZ}k4d>W z{G^a$pRi_ajV#S;aEK3c{*Rc9R|uq*Mup^39K2)ZsN^K;>P(52HPX(P9&Gm9J5hj}(-j+6%vW zjmt1vnGG5h^tO^Q-c*Vx#EKbkq> z0>t(4z;2e%lMhKJ+=KKl@==?S5_gAzh)(SImvHTFj)N8sDiCCpOWKw;9JhwjErpG2 zY!Cii8X#b*ES9#rc`&?O(Dk;K?9DqXy`+p=UC>OxNf$w!au~+MR;fVJPj#o=&S^*d z{Y(8rn)FPf%1C{I$71VWP&qd7)w5<(!})lxof1kxDdh%5NGo?jg|x~V^e0zIFu-10 z&0zOSciVv9J4O4;b*;=i$o=VLSxLlX!`z$Q--%UgyP)nUB-`TR$eA6z@GI8U>+JVL zP2r5Bg!Xi8bsgRm8#Y^>93Kb5zB9|_wLdNq!&=hj zXdTos{JQ0Dq5LY}B^QKX6~1$wBjMeBw}Qn~2V6R3>1hVA$t~4#9}xq=AuyifvamM3 zD`2nQsb%bnVe6Akd&S|(HKfI&Q(Yw7pn_a`+O~8yVQW1g zo@jqiGHAtMt_#xHOw?fRR%8hO+nwG+zcXogr`6~{3OkK%q$FCre##QU-|a2I3csVn|hmo9RCZFXKSyUHAX7fGRe1I|Zh;ccYMkY^4xAisSx2(L({W!fI0#2CB z!N>&hsrbHzGk~5wr23~I6+ft)3v*?qeGRpIfp}k^``e9NuXw^QX+&+C2J%=X!g3jS z-0vN1AeH{0FyzZ8L0h#Vo6V7vp8XE0gG);a|LfW!mlq$uy=&kq9IAJkE;J6^J|mcl zH^0~ZycU*jNlanU0S^vhJ0DD8J8cC#flT1rey8KpvvHl;EAFA+UU2Vddtd7=ZkR!} zlN%holPk_!mn-=>xGt_CX44APx*5g-P|m1l453{Sp%W_N_SMTrlyHOgZHP^s*9;?;?hFlh5dXJa6 zD~`KAQB{9PU$WUG8lWwAKh5cEpWAnC+T~1-J&_yv!apQ>v8LIS-j(#^dc_y3RbLm1@5E$-3^G zcrY?duKxxUHA^U+yO1oC(a_CbY2MNRqauV;3cFD=n-EvMM*)kBvRbLLoo%f6`kgGR z5b;r``Nsav!T?W5!SXeGwcLH>jFrEn2#t1tL)HD)H%d(ouKJGw3GJ{)M~{o2iTh#m zbKmk|Hb7)b#xy~a^~FdlJdF=|TdK%3?o6f2SC8;PC;k7?7!47E;uRQ@+wbez{_5is zT9f_~e##p{$N2Xb!HF(=3$~O#kLLc*>@dG0I0E)-@r9h_Yh-5JH0IUOAzvM2I!3SN z$IItWdX@7<-?PcNs)YgTw-Q1oq{r0kH`k|cpD7s^67Fj>Y2&^!_Ut%@bLLVApc_OQ zN`o!=yeH+=2Gi(esjGL;!0vDQtW^zqL3-QSODB4$$Y?KG-S?G&9Z1nG7jWw;a< zvcuN?vw2V&>ZNw>!z&uho^D}d6|@w0R!X3p@d-Jozi!I2AD{Ix^LcTwzR)_&;v}xX zPsh0?n1K0rey+Ss6?GhVJ}32n#GPpU@JVK_Bem=sI3MbDvmwl#u(dOAetgfil&Vz$ z6*(1kR6gN+y10)K5tdEjR9rk)aO9flC|)f!Q!UmC9BJYOlfF5<^Rb(H9KzVRWr_Ly zLrCV=U571Z4fQg+hZQ!49pv&%gklsn0LeW9MkOLiQ%au=A;ujGBEtTxJyW@_I3+FZx zNAKQ$))r^S^O|!Oo~qE|op&);M!QeslQhBnIo?={T&HX7l~pdT=F*a;2t7C?07bF+v@{edT8_p3q~`d#C>m~q)}!qU z+ruPO-Qv0lqCxNvkWM!s63j!%Q-1N+5r8jq&4&+Bid>n z7u^6%)vc!vfuuv|nV&0h$1!S08BhAIft70CsLVd(`Ditc+t^aV6ru!>It-DaXgpG| ztGOGpEfR$ROWg#VyL`*#|M_F<7;r#e;Pr9Bo9I+cxV1a&gQ55K7}@or_qZa0)&84& zOZn!8=?NWF=9PIEV8k6lSgM)AayOJs?hfn?Fb>M zZODzyOwW?fHDF5Z`&VwEzQQrU;>Fsy;1ds00|v9sUkG8g2s$NXoA%5jm$r-@EsheI zcmQL(v}>nnCt!E3oqw~E@U>$958u6di?`zeUD*sAjnEe&$NvgXu9y5QdxOqHoX4{T zK;Z#Fzn-o)o6%|H$})gTo6$$K=X`wFTa{VIrT6U4lIDDECCN$gT;R^1D>F}Uk$X6+ zGhLmu(9^>)w2iGzJuXhM&J8%I98$dVB7{N^KV9b+e5Ncd1XQfV%ENUW`ab>x*34j8 z!6XXCjWvYQlWG_Bk(bKZl{QSNoqZBJhH-r`F#8>)z2IDf(_^nI15)C2)DZr zb=19DjpsvvJenV3-@6oi>TwI!X9!_szRPXF=G++y_?Zpoz5NY(rJh_vlJ@+IAp<{4 zxhOC7NFco%dgu;gNjR`SrA7l`w$HaB{F;%dXP7*}4S5nnYcQu1w#xCJsPJZsje@lQ z+}c9mtE2qp(fEtn^PJ57OPYXoAxyOO}{3Rc!B*--fm6TnPIYQq>(B;<|OjarHCX5pLt5`ciJG zSV=Td{REUlNTm2?S3m2GTWnofV%y?2W=86I{1?{bv>4@u_Ax~+A&BY?gBGngfuu~T zO32=#`|zPI46gvyNB9TRrwqDI3Avu!8g*yk>Yp6Po}oDNO2pp;jECO$lv(ES1%nDQ zgUHNPXSb*S6!rtk7cUe~B%Ku6 ztu)WIg0jTq9wXY{o?LuvZUhLdz+Zg(7e4fe=e0?=jtzkJcqqK~2!T2LO<&_S7DNOyuE zgKXqhEDzN5T6b~RYBCo&m~oxbWNrkVdQ)Oy({9riuFg`mr_T_b7E>oLb>oWuUkM!O z0YCja3e5?HjCYp#9YMmzlhDhp$ba1cmD5d3AXtv3V=Zu=5tso^qGp8(a6$pBh&-*8 zrz$t>(a+T6^du1pFx|6fA#WdZ7}ZT|(x~1<47n>g1lk&kmJ_+X=hPx;ZxMWIIYjL4 zkl$G**Z!P6`cC+-+I99BD1(t1-)e5lzBY75>gqEeb~J5C8u6d_Odh(2Y&Z|!01jeV z&0HG+Yny$j^7=VJcq1Xg4*m3e3GV_O$E}-(G~}wVn!9^#?Qe>SjHTI}*_S4!>Pq*_+()cr6%+x_bN7aTHrKw)M=!_dx9R_!5@K+ntM4?gvT`(2ULcTB_8^2oB(7Y%IN?W}Bi0}t~k>x5O_hkv(yuijpU-ufq7Jm3&;()e07xbBZDPS$*7 z_`7=^t~!F3s9BrBt)kfHo*C>Q*E%j%GGkfG|2*sdn@F_@UTIfW7_VFw*TYW<^cRaA zWuwr?DVQ?3k@>gBw+R_)U4#ZI{%gBuK7WM@Dy15H^*)}GM`vV( z!(=wIt?UPyY9+jsVC35NbLi3ibW*J~ilVah_CGp&7Ko=C-WsIpXqebNr@bzo*@>t; znXBDS?dC^VxpMP&vd)lg%+UPS5%!;d8Ob#y!Z1Wj5HR{7-842o03b-7UQ8-CuM&1{ z{-~#G_v%$L5ArrGX-!s`xEQVABE#4F{7cnve|@>kIY^g6&L%SIS1YHZKGJi4#%_J% zOPpa}tU!7bK!B<$BNLI@?z{ZKqohLpJExr;weIEs^SL7z0dK)~GCA{WXxf7AHH1}Z zwf;7&4G;(}pn)jTRRpbmm}E8W%|4@3 zDsUtN5FpAI@8A0F%;lII(Fkl~)OTefGpp5LIxf@}MtLFC)cGits9X}aq2@uSH15FF za>^OX)+U`W@voWCH^!6y8ljtz2fEZDerx%LK@NQx`O^;fD-GZU`R&TA!w60rp1joU zFAk^lCGy+aGA<8Bg=7RhU(HJRq@;FL>TAR;6Q(l&&VF&RFtL4FqjxOHZ{EiE(@I`L zfa!7{Hi=Z^Ruc@}eqp+oUubJ09g7pF|0fdn2#Qtx)@ErSv%B$XDa$IACJY_jP(-_o zU$+-`po5HGBxI5asMCgV!ew5{3V%Kms`Ts#c*?kZ@$Q_$P)<7is>}VsM1$>{8Q#Gw zM`Y3v8#|s8Foz53>5iw5<5ueRW>HVS7)Rq0ilj;Q4=^K_Spvx?-E{7Ny0uaxVm|4K zo16QZg&JNr+YnkxIikWO^(imUSBZrz<3riaC2UgV21%eku_W|ix>jT6C-UdAm?f9j zB&0EhR^PwC4p0eg6?rwU8g2%#I?^pDOt<&{vG?S8zh#e$jL-MhNvSG8+* zSF`GcX+!|ShF3zqt0WiYC6o65!XmrZFK&IoT_qx7_PKs_}!cHyu=m2RTu zixD4GsUW%GGFF=QZsRcbk=#wQtO<3}IwApvr;^{sz7}+Ywo01R1QzKZ6wfXj#Ai9H z)Yp32AiJz)AHXuK2{bHL7>rK{sgoZFCStNrh7<3Qa~3aUlo8}tPNsKct}0!VvVqUE zls%kW_`V0zvWQ-`y@&$}U4UQbje*qy?llhbt38Mb7B;&A95n85x@f zo6}OBE{4v+Ats1h>naQPet09ssDa=Lf%x`08>cUYC25GIj;-qWSdvR9Neg?>t6)lX z_2q91?mu7pI5{MT;QoG`-A(z*y`5XUS6m$Zhs09sB0x`wVE9z`2I;tn%s~9{$&rv zq5Zjfvq(CzfUb1AG){Z~hqLDw4*vOrRV18gY6e0n;dWE}IVqaDRXIc*eIu=Ig0ilj zT23aJG`aSQZi4;8J@BIYZ}_ATmN+hW9k`j7_od?|bql{a6}49KTxh?^=c8KC#huW= z@J}Jq;sOsEN<=Qu)O-te_^N?#ZC?dHVN&ejDXv|{Jmg)}PAc|&<9}bm$PcpoOic%1 zACFo?>dW8*0MO9CfBWjAz=MIFYoWD+#+YYZydQItc|KGGIUbU<;;~t>U1G?8 zxI~*Ukwrb{0jvyu0lMkKvX2)%2ko&^FOTIDAUH+-4=%v1IjF2G>$-Gl<}Qm$W0OqA z&`fbt{s3M{RF2wN=4FA}J3RfjhdO}en#r#%QbGgmBi}nlT(QKrB1uxp$*C`@Kc6*C zQ>q^JbYc)R4;Y>iCUA_9XC?(w_=AhCrT8RYECp-$tUO24*^=lL%t_op9A`My>&&MyM3`H-YD*I?dwf!$hB40*Y8jrK-K^b2#wF~bwjvkir4f;c%#4F^a| zN~C~#+fWcGhh{u!^4J3QFpK|VfSuRw6G>-d^Y3R2Jg#F|*=3|jH~y8fdN}({7(eou zt4ZhBV8hMN0lH(~-+IFrF&j$S#YFVD7JapJD1UstKzr(^(?I?i9bxQtKJlf!T^e=V z9$~bif~QKk4J6wW{z82thPpgpY{41l;ZnFWB>^Nca2{NWe=U$9~P**u3H#pdQl+kb`0ebGZ8fytt@QGML z?fRz$+VD>HI+~Uj!`O38N@(E$uPrfn_0llC7sT9{wII%BX^Y7Nl)$g}-V~1Osp0s* zBIHl0rZ@suFP^+!H21J=uZ(43d=R+m_3X_0M3uXZ?C;wF~VT|8f*lsh+(;50VPqSIArGAmK;(m{Wc2{s zo>yHsnCC`}hpp+2cF3QHt%vWt%9K3y=Fqx{x&cI1Sh^x#VUA)?tbR&NT9!G@fAvvk ziwlq*4dZE#ylho_aXTF%yA(YK3S?{Y(fV361Hcy-!dBl4zY*TL0pln)T}-HByKH5* zeeEP9#5wc_EWEWU3rccaXgcmZ9QLN;j0CMou=>|x)5k2ZA;f!%lhv?$(pa84T}6XG zXCzp>3zF+fxO*$F{CY!`&dMP-L_dQxcR3qNJb)olr*3GOx~tsEnfX?KE1*WhSN4jz z9qhpX#dzPhteq|K?S!}w7k8$xc|TZheJN=O=iQ(Yh9RjT;P%m|dWC+1>ao9U(-!3F zssOJBP6>zvg)IEwfj*Bu`t^OS4L1^k*H=1*{O#m3QJ2*on%z!Pvid*_CrlvX)dNGo z-Rn0+`UN+D7JGdvvC-fm7L*IQegF#dxDx0mAoe3cEs&?90~P9)ec`t^bwHVobLg*# zbVCZ0B5-HVB?7VTog8&k_eua0Pwi_R0dM4alqYyZKk>7myC zwft8spa%bQJNh+>s%R+;dkc-3>Mj3cuJYzR`Mlf1XIMAD8P9-7$cU9Y_oEs_$m=Ub zcPikopPfl4tcPkrSi}x=deOs<%@`Hj(QIjW>~Z%@S|tJwDjaE>-dPY#_61O+#9Cn% zZ9I$YHvVw4)Org?6}DX7?U<20JWmmItLlHfgF2V1*<#~&QlL$F9Y-gdX}fGpNJvP) zz0bv&sxnlr{kSBo=UpjJ!&RQC*+3-n1lUtgyYbusP2+sEYgbnS^0h8E(V7)zG&NoR z(zCdiX$-EIl+xW`**K#8*~%C8DaiR!DNC1w-p&)96%VckzWIyz!?uk8ZNe&*`ntNj z&WrSvJbcR`T-QkDoh7v~U*>;8cJ#>kZ94||lHz?GaE&q(BzU}DKdQT+wXex&$7 z)MoYF3~KAkj9iisS?N&*Ssbrt1vQsO5L37fqxYwX>TR=PSf_9Sv+##v)Q-6^x))EC z+cC=nsTB#ApHB3e`<%{yT5+UoqwsSJ0-vj!5*S|&P}(s1aM6l7^>&?OBFy8MsxT1q zUo{4A4H&V)a}9*_ShKYftD2FU4^j&=V>!+6+hiSgG}U{pn7J9Chb)Wjj^_2HJJl2w zzMw#Ky%<|SVCEf&3rH8(3%FMhkKJy>!En@c`%3x4E1W^+Zgn7C|;>fk!7APqdyv%WT?W31VM65Ax>*eIu}X;B5&uz zgny;Pw8%+Mw5e!(Hu7isAz`S{;2kZ~^Dw6tlTwCr>vP-di@e{O>BlE2kdhzw4#gjp zmJKT3tCzicX+pF9K*14n`S3M|@driAT9vY*vJziwjkwPk&H$(zg_Y1nriJLzg#qqB zv6BW=6QhYvJdt{co3c}|jCJTq zH3RV*u%-BwW_}@<^2hN=?}IhapypKr3vz=!hKHo?5dk5uV=xKl2ZWk=#q`bC0-LDq zw(Ns5Y+pZq07v0cn~jg_Sq#oD3Euano=^_Hu|tnHI!7J$JUUo_&iC$_x2?Iy%8u`X zs%#0+Eyo5g({(xAj%LBI(UF^jWpQhhsnG{bnMFUCO_lJ1h!+*7(C|KE>_411uL8lU zRx(oJ=Ul5Z-w_+)G$^XnD))%puxfQJ{n~rHd~d6l-4+ zP3X04-?0Hy!}ZILGj>rm`~kfuH~7apB)ekU4!Uk=rE+ zzOj-ASR)r|GrnYWD6LVf;5{yX&P{}RuID2*l57s(V|uCs^5Y>=7;Ks=ia?W2T!?uQ@t!V^&n4pB88lV$;LZ z#|p6~F&-JdF5|*BuME<^Y$rvgP-JrlU`e^LB8}Fw_6I0)KY>1Z22;HJ`3yS#%uUI& z@LHD&t@t)l^L~8>C<6l7%b1*St!rdD!2~ZwY_y{wZ}WvZ0UY|v_-7cajAAzt<+5` z@~O2c`A9$axO}RBr)Q8yOe6g{hf6gW7xZy$Ku9+jACr0lP~p=D|1wAPPUc(N?_0=0 zRpQ=NT1Ufi;L%TFW&&e0LoeSWw1z07A5ZYdhV$GRmJH2<;^>p@ktxaf$YX;Qav!M~ z3z7sko%yb1-~3S=Zm#75t2H6%ra83~H*}|9Gq?bgs=X-UcKA2M=%uHFVF+)%O%Z1_ zv0zn>k!ji`2M5IbM+tXHwtb9m<}-NJPiBtOue3wuZ^*~hOT0hs`u@sxOfGg`tqb00 zv}6ea8Zo6_;?4t%&7*0q0t;Nwq01}1J$TLZk*EU(1z$h6`oP(tHtFZRiI{Pz7!oz` zpF+s&_gSGvh%#(#j7gi7l3VnuSw~0h766QRSZ9{EQt;cIK-ZE^yv= z{fnX#Y%%ajxPQv^+3g8B(`!N9+Fp*-QIVePr;EV=4rXo=X?AP2>KR58u*2_w-_b~G zONouHP}MfV6p-rGvS#(gZQlpyRJsQ5S8Q*lcaNhKuYW}d({V3353Ih|reit24E4Su ze^LDOb;Ad_HsD!YsknEwX16wC1hxbbv$>u{I$so(^eUm8yQ>}*2KnP(bcG~~(WqD1 zAksBec@qP*!LS41Y0Mu;l%{K@eKl`6my_CypB8zwzZh=A|T5 z9o^DVe;45~Wf8IM;v@sc(-Q({TjlAgKeZJcc2frod?Niu(ts^a^R-5po~}R(l!_jV zJrDo#8Y71-@GCYT@(`8 zDiyeBw6e1 z+xfA=&iCm2&PpGr;2oR;{T^2p9t)eYWI**~V4!IJV6{dGIk`pxp5~ql&jhA~I9ita zK7QK^4#WPlv*6d;q1$Rl>BX8spR*TI>jgwigyG=C>e?GCj(}wn1#6+FzNl2wve{7D zC+e>x-PApM1OVJn9{R8lC-E>XC9WNucFb;rHW$DUytwLCHrA+N1;K+kX*2EVsT5p~ zT;We%vBy)_I{R8=Zxa^YYet7&g&$G0TIbJ%Ej9pRLo}MJt5Dl>=7o%U zBD4F5NWrJF1&MeEg^%!?X52&`vLzVbzVBpj>yxKu&dinJak0KF@y#HY(=a-;24v`y zKfU%m?Ld&hur>+lcW(fN&{xZo_Vtw*a;o`|>-o729ySp_3*vRE7?ftlBlwtja z+Dp}~M~7K$jMcX*79!94aJOh5?&tHBU@ynheBPcGVGh65A`b3pu70JRn|$o+@lt-r zRac&_q(=F+d~91)ASK^@YrIetbxfi>Ge1@{TayU%f@3g1CG1L&PRo9iCEOr8Gk(5x*k;7F~-W9?auf%Wl92ShNqpXw}VgG@&(dBg1u^mg5CHdLup({FK5_RrcfZytvVA zyp@R*$e@xMwly5v7OBTB<9B3>gm-~td>9{7f1PNvH_O+1TuY{lHLX&t1NTG4xy5Vz zfci}<>{A!EOM$(bLqdNN*vT7AiSDY7-PKg?F5}PdPh$0ZaCtWZ@(Y&Vv@`}sR#9}} zc1W?}e;`dkl!yK72~E$q#celw`tvrLRBAhl?&`-dUion^V6!nrs2d#ls;$`Vu_-e; z5#55!wh;ByZ#xZsTMQhuV)#Cfdn&c#ncqS=p<1I6&t7xcO)(QdhA5)zhlDI8UU}`o z>!W*=Xv^_9jIU^0c0M;$j+KN_0-Yya4`3IF*+Ww+3ZUD+o#nFY@jkp!l!oZLK@Cb-K?MZ1(xCrmHK(*3g>mX zT2Wst1Ut|X%6}(>*IT(k!Mtn8ytUL#nRrHgRArqppTRIj%r}ePv7CX@Q;LPR)J-#l zP=Ui$Hb=a}mzL<cqV6-KEj`!h6NI+7FE*Et-Otp00^z4d3bm?J=s52rV1wQMZ0;AB_&ie#I zBZgDk^{g-M1=yDlsEZeQ(u{T_z^*PgMuM$gM2 z0Bc8xSh*%)!?Dy^+1Bel>jUZL`&%B@)>dc!p^2hMZ~5IIv8Nnw2RgZJm+wxa^2`Qi zq>9sU@OrZ}1wmCkx$M-2q|0#lege5akBW1C<9?Xc`@Gz86M;Hc+CW^0M9PIxa@?7D zACl<9gRZOf!Ws+UYf_6u+%y?9xX6n#h}T(S?_wl2&6FASg4IL|=bu|iy6y0l&#VZ$s;r*1OettX8U=P=D&Bj@pRxzvnsGWqjA{hIodiF5S^<78 zc86sfQSxHNJvI#TeZvL{B(Q|!owlzXgUQ#bccz3%2^wS9UNZ-BphFeXHkljvk=$tQ zzYNN9ykEDO#~!Fcj2}rb1~jkoe1D|b;S=)eH_!^hoNn>48#R>pn+`y&8ZeJe1asIK zzepDIphloV-&y0eRaOmAH@Z5ZzNC?{`O0*dkcHxxom2k$jFPWWa^-A$duhX_{&)$1 zkLG2M7r*o-L{39x_uec=o!|!EX->;y#ef*6z6uE8$$z37FYDO;riYqsb=|B zqu94+ytFLNrT}h?o;T-DoqoWii*D^>fxINfPkg8nj469C-V6RbT(p0}OZ6aLkSeAX zZKg5-tvvx%2jsRE>!}g8+nPT=1M%*|ufI+<1|aoO6IkqiPG^^BC*BFOA{bR#3%~^QihMoqt<#5cj@;s#)Gq=q0yK zM4B6qy52AhIOsFjNr@khP6-qqL7b4r0`x0m=IqNA=ld#~)i88(+`KlF4g=WyLuo(9xc_|3m#gc$}B}fIt zhql<O;zsMK?`KzhX0NakdhY2*KkAwA22jp$LdiXfLj7tQF}#LpC`<*2NH#!jv(3O4Lo@% zTA81pv}%dJ5O@w~7nPmGrXrah(~`#W;m9Xl*4lWvjb{sxg`{R)Zl`d2MD03HPbh1) zs;u=CTx+Qf%Fsd?=kPFETl3O*eb5FCvq^H^8~)%`+yt$4EusmAxdD}feN#4wm+S^a zyKazZ>wVZPB_-?q2J53;X)Ig?bw98xtt0|4fz#gWslg zb87>f3m14V5`gUr1BStYy!WtM0byBXTR)$__Z(&hVNrAg?an}^NXPn-S$I<8y%{`R zPF_MKrT%*#WT@>jY9oHICF`##qqenG5@7k1tED{8<7(Bpzv;i6{!9Q>nK%kPpCfd| zL8>Qxn4K0Nb4J1eJXE`~LEH6ze-!adV{4JkGHvV4i#L`yyl?x%yZRp6fMU{(FovJA z9?UFJxA)Tjt~7#@{cP6Z{JHsotxe8mC1l+1GzM-^5AMrrFa15MePn?GG#jw-ka32;KyUYhcw z14iQPo8=pa%Mu&GAd{c0w9-MO0)@r({qoQJpg=QP(L!D-U`NY`lQju%U=PsutI%{W zlvK;4^=x>AU#ehvL@|{GU;NRx_i~RE7eYhb>Wbgi0@`nR)-KHJp4-zHh<}Nd@6R<3 z?d=I;RM55pbSrBG6!CWWdej+P`$+ys%Hjd&i`Bffc6ZdS3ui3ar;q2&FqF$|4^p#7 ztsNg-35!f|AM##GFO-Z*LhXC%Cg^ov*F8~?N$6bD6oqv6a{@0h6NZp=y$*Q5+4gl28dkML>MXz}i0Kh=~ivhsFLj8fzuz90CJT-aqM&bRNH}nd& zR-aAGjQ{{aV&6{-Rx=+-#lBl9{Uis`t4a9>bQFJ5)~tOgzrQi6JY7PO`SJayjS*T&3pgOZL^*5G2eT&X7N*Z_?6_HIInJgPHTs|s|KAOKJ#}VG! z|A4cF?Be&%5={V3?_T&mLhhWQ$u)3x==&4-W=k>}52{Oi#lBIqDrwRt?3+uIYOL9l zM~5T)7-;!uF&>EzoQJxYMCBfX?u87p?vNGYG+>D|On&C7)&rwcc1J9IvV2(g8`f7+D&3+tw9ap_j$JSkB#3!6P2fr4y8-L#kKGCAefh- z*Te2;&UA{Wxj#JY=QpIl;6l=Qta(hgA?s{B*&9;_9=Au7r9)@Wc4E631ScH6JShK3 z0Xn+!a>qBD*HEhc6Uxi{rK^27!Ihg&! zLIN++$&aN~%`A&@UriUqt1IHcpT`O7gm$x7)JL^O()Hf2b4;V^CI8Slw8aQ1{OtOL zczP1EKAB=VEM;zZ*B*<~WfIgN#I=s~XhwTfNxv$iS!(m`TLw9D4*jv*55hkclAlMm z!zB4do;~mO@onqX<9Q-K{J?z9BzbXEnI-tJp4@LOJ zmq@dnGRP0|@M`Xn&|{MrI|vMmWt*9ScJGVyVAWs#-fJ{7v%j@D37!kI=;AN2?5t|N zoGdQoxV2D16V`PNh)(M{bZoun%s?Zm1sr)suw%8TJ~*v3U7C@(edRUCz}N!n7V8_X zT^h_oq$6@IbHF(iqYJ{OK2*Y4Pd!*Y*x<|_OdectnE-qBx+n0b+EI<+oR}}`4`3KGj-cLd{U(Me%N;uBpTkLDT^+&b} z@2D7S=8$;o5uG(rPx~Fpxv#%S55zvJgDr1lyj#TzR~9N+xS`pSUY@hB9&(0Wd>UYS zD@-RqjVuzN76v~-k`Ec3fYbpt&gKu5aGy^m4;Z{%G1_gBoUDP@CX_Zi z$`3dLtt_1CVY;(bGk91crxgMUCM;a$pI$$!pig@cDE{uV^p#{*Df|Nr~^=Q<+*$N`XPmQ$hd{oltG$1w(q8~l5uKVvjw(5GTT?@j*NPXFJ? zx$D3IFvkBEh5w8Z3&5xVa07+awMqY%S^U)|6%!Er-zPx=g^~jpb(!)5{}AzSiYoxA zJpY|JXhef(%^16e4vPQg*&m9?0lZlMg{R^;G5|CUKrA$=fD`w>Q8b7K?ff?Zf5z~- zcgJs%l87;hKN9+LHx#op0E3kOs|5eL&J9HITNll-td1Gu&uIU;HA;x+|8?&FPl*3d zi2rvik)IAt73^_l#sxbaRu%vcj57SK!jxnvwWTC0>tXvxGrfo(Tdzf_?kC5`yCPAW z!0$up6!|{|L4kyaUTj4*`V+gmyTN-p>mvJDld~`t)WKhO2%<}Q zr~H)6tp5MPlW_p5Ze7z|&PDSRVjQV#BLL+<(`v$!RUrG@5K6p=QO1om?_yf_ryI9A z&Lju&po*5s>Z)1->U1zye?iEEM|`I8xBa`mN=0F*+fhvMpDrliXcnTk?&q6m$QUx7 zRmj-(mI|eXoujIgOPOBwNc`QA@ebBx27jxl{=rJG;P246c}Nnxb)mQT#-D zM0h_e?=r3Yd-xzURIebkPiz0eyXG*WW=+Hl7hJfqD^e;tCT79;q+bA%+9g`yZR<7ejO2O3}XUib0I+#p>KwqhPuE3-K8-?g;A+Q4#nTVg69q z>4Bu#S=PJ|P5R*Q4k|Wvw={Q4G{KI=Hjtw7 z7y{bnYx{O$j!8_k_p5P}x5{$UyL@gi|a3_{!L*g>b-@77Y&T@dO-SfH1b_u+3E z#(_W>hBb}2YSjNo1T_{t8fx$8l(49%==KIeU7KpG7uY)({uk9H_lO2*013KGd3b+1 zGh)Ra`uHL9GuDC3&h~G%N%9(+2T-!RI#Y_Vski;Wk&pecrAM8 zuxXor;D8U3D`ilEjmtwlSMo2)*AGoO>u7j9rwH}QT!PU_J8^> zpBjYWWmZ(XJ{RqL@a{*k_VCUw9CM;r+ad2iis<(pIuGQQ;f<317f;v9?l~76~{}-YhzGwP(&#|Bn$HlIPMasG6G5>Y-!bKZxbs;f1JjTA`fWtuOsorc(WoG|4PFH=ZY+(3OhTymfK>p7i!tL!q30eAV~Ob-WQ@j z&;QYDgFry?jTJAoK#&Ex8GoP7^+hNA=7O$Zi&NllMVL&zgHi8&K|akt+NuV|KpkEL zJ0+|}Se+gx|1Dw|iD}dS*)~7nnE%*75Kh}6U00BKFgD-2rn+`_irQZb9%K7Q>wNxd z8QRz150e{!hgzpH|K+iC`-lb?03lQN7481mu-B0!0Ch4!AyOd3i7j9A%K*ITw2eSU9%t17F%&FH-$NGmkD*;f^ z3#9*el`^UtFyBn&K~{pLtCTFb_U|UmjIVV+lblIt|1B2a-5i>`iE6I5^NUkZ(Z^ml zt6D<4)NUrESTiB-V{fa3rlUaF`ft{!@#-t3Q*TbLA9k{)8d9Jbp^I^PAL{k^BicWF zC};RPj7droEg8D0Eh(|yLe;BqNK-eEa^##(nEJ@iSD8&R-0k?KUvh&pO!CD{6kl1n z@Oj#c{){T|lClBneg^dyn&B}qR;AZ5mEXAS7o!w#%s-&;s)WTUU+CE%zK zn={2jyU?>qEsdP35*cd%htlH*N3Q5pU)yI zQAM%@%ff{f$Iovm;9GGNtJT{xzMckCoX1kGnx5)riF<}CI}J8wL$}G+HaqRMdb%&o zX2-ju@6Wq-Epxaf$X3XqqAoAluXhIcE99fVKWeq~WDvD9T(Z}7+xkVZNfpE0?Gm$E=C&Rb;O>wY-q3+$Q+s=@*jBT!Yd5eOdppMBYGM<^ww~kDNt^6b{HMgF# zTX22g?H&Qp<;ZnIj5)CDUcp5*hd_MwWIeW6nlL7o#K)u8x*m7I#r1OW^gkHDBhhRL z@3KQaymqufp;<7B1h-DoWsUy$`W&12j|S)Qxu4rCHwJW`M`~W$w1ikBXiu+KaICb_ zQXq2iY?O=Dx2iommn^?x&VC@jwj!u0OFWoE9KhKA>>CJnB z(sis?cT6{w%8mO2T+P#u|B6>IBW}C3DEoYRf)nA$d0F16Q{O%NVzBV` z61{P6FYq=Z2-L!_wWvy_^G@|DczRx5I8R@<%M4J;4DIk@vRGM$mcl4Fa85(wp7=Ch z-?^K!HXXjd{oGxEZt$%+8HL4i^70FUezH56?;oz$LK+IJ2Cg(484@gaEk5_>UtjyC zG;JP~1bWP-hZ59zei*~F2ff7pzEv&iu#8_M=LI6ivYr6!lRCGO!W;O~<3z)jY`i*l z(dD@Y7VMAb`lZ+t0`Bg0C-qK4sT`_*rhCmWi0Ey)DSU>iL*!GB-gGQ4Q0?ij&Ah*N zMdjJ>k&xoDVG`nZgowL+HLbmo?h*-%IEyqGYLA?UADmy7y>3t& zq|Lo-Rx;T4)+FRR2;O>znrBHB3V%~E4txWvc9S(M6GsxOHu^7-CF_KqXM4tuH_GFJ z-|VqWZ$PShNYy=pyumGqs@K;$a{qD_N2o)GZ<>ZQYMdH0)#vMMJoX_=w;VCD{W7q$ z4e-^Gw3tq-|IC%sq{;?4!uDHTp##^C`iyb;?QEEXeh)dYf#87Ld6b_W=TT|9C_Bz- zAW+>7Y*%{q3MQ-z_X{&kHb>#f;yF@0e~43_#jILl38X44CR;DjqjFE^dF-0eW;D#w z#^&g-sy_b0Ey?+Be4`XYQ@gE1c6DY->Ifkp%V8p<8>Tj|CiFP(Znsm z1d^6w>eLg031r7|??4g02t(rw*vHQS{?PJi#zBSGP_H`cqi6xXc;$&H4rA3|z)E;l zAJae$6iTg(hnHo^ZdA>e9Uc0UIuq$CoAx9L#ma|3pvW6{6egXk>K5^q=iXYiCibj% zDwlVTS{9cDdPGPaQs_7Sc#z!m&8UCPN%3}H(Tmkq@Pe_r#1U_mhJYmg}MR72M;&0 zEVHUAQ&9SHJz6PP(Q@rtW8PfTqXnEDge@ED1;km`Di*bDWQO zD2~i3n)p%&vLekXzW?*(wQGolX7I+UBrcR@027e2_jx30*}VaBVq)i#CpxnH3t3#` zv-(IT7bNX6jqi+?{~wbLA_vX}G<3)=tKD`W{mTtwRoi?ORL3uM_sT;DB*Wb){&n>L_($Kfc+b&}qSZA7oMMTcba z_Je+vA1;Y$-lBTJXcCU|8h!GZ(qB&B{3AxP5lIgCn*`|a0S~BnxfOQe3KEQ^!fVph za7U=~k!9^_7h70te7KUJSwG@RIDQrA(r*0gD|GJcH1LK0IzoOzsTBQ5$$P}HRX-|( zOL`-#{iUR7KIDPQi*-5}f0DwORzwMr$(j3l@L-3psHw zMwg7DNvK;+q2dEd2*z^pc4Nn-15Hy|*N+;t0qx!W0<3v_u>d9Reuq5PGSq4FizieI z?T?&8$Ic}(YNXktKc5U_5%$B26*+1_7`t4^!(OD>O(1Px4xh_@(|PX?n?%rz9Iy3I zs07qA0K|Cxoh~L;Y@pgy0HTn%-A-{udR9o`ahmBqO61(kFCr9Z*Y#B&FWo7A%fnS9 z6+oZsD}E1+q!JL;aE2t~Us+tH^No*ld#yHXvq z;^<>`&h{?O0QdY;2`A-`9ltm+#?ielrJa-bNwuL&`VR+6-y3BNut_l0H#V`PjCO$Z z)2$*iLdyl{1eQkD4_{{cfC9*Y8iM$jwNxniMGn9ZdXee|y#$V0kR*;;ZABabt0T~i zh~s25Wtnd&_vtn`-drYVhlk=k(BP9+94se=#e*j4;uWlh4G@@?>4eF9v|f0@!N0MP zdw~)3>r(YaC#~0a4S-sM@eb0=D#TOvOYveAQrhB#M2-xsOLzSQTI^3Cx1}r1fhG=K zB~0LQfV=m(9vXpP?+nq7v0yL~dj&rSpVnDz_i;&x9c1-YmUFJnt%s8S!5Wgsvk(M@Cqez876199OZ$}X;^Ks7qSVra zXCI!82nE*pre^dPEsGUy`SUUm)F28HCyGKphg`u~-)qd7!{ z;J8GB6I>Kv8}#MTW@;dyFDfsh$}=}>)-zl=k!W%fCrDq6ivNkjM)s4Y^oXHI$f(QI z$!11Gg0szT)1+U-qGQWmarHb82VJ*P!cmE#A*XDM1KtUaxZXgFX+bsLEFr;Ursh#{%6yFf>mgIMjrC3o{JzrMn% zKz9dd`_M%+rGzhq+aFTV52Fxw0=Cn9lCNsIb@QJiaDF3taCEAnrdDHrmsIi}s?(rA zILmj*3F|sht=$MM$8wm;Xg4W#P^{66-M+|ckbrMWft^w!ugIp9;Kdn%Vv3R=m*l`& z3MY(6G1|eI*MQ-hbYEbo-(|nw-7MI(8_q)aSTApcg%8~m)OB=!G?`vR$Og!7g$-_b z)ct--=H393iL&j}`FduY-2_49*cEtj>Z`Y&I;9PJ?eI8Z^qCMxH$ z4t`jHUdefDlYo3-{#s~)c_TCGvD&;(ou`;Ih)1juob0h9FyBS+B4$9CwekMCkr<06 zuD7RsZme_2jSKoZ-uSoH3ycbKG+Hq+WW<-*gxie0>26cSRQ`{)kL)lQzW^80E&TU- zcXodxYNkJvA&OrVPs86TcTh~m)h*%Dv=h@l!G6W$Sbe7a>+kk)cKWU$HfR|2P(y+5F*~xW#%$Iq?SKDZB^K(NebpI ze!>}DC)AmFJ5$y9{)oM%)LSoo3@6dHheaTEqR4ch^h{76mCh(#7+)$xoIhU$$C{X5 zMQZC!(S#E;G&R*PQXugx616QgxhRm7)z1v7mG8md3H$Nrb!KW~K|F~cnGnkiarH>p zC?2e&6FlFOsLGLFx|hV|;NdQl=xuZC5zV*%$x+>|R555pje3fzJh-z7DL`RayEo}u zZuR_y8~U_rsnqwn58(HtPcg=UUf*lbb&t}g%pL}Bh1wr>Af;A%`?(;ODf{q`;>o1% zO%KJib*xmiYd^2GZFpCGkh|j649ZL%t@aigI(kFzSsM(-8%tMwQW6(BlK0XyvPNYs zgehyNX}5+wAoyCx@L;B>{%T?_IJOafDab%gtR>(wfO@dY&d#>ds>Z@kTh7ePG_$H* zi}ry3Z1rvGfXx@FaK7tY`O1P=CX@nUDSLf77ka7W()DWMAbiZ~(Y44s^WxaCDW`7r zbyY*@EoG0uI-Rvk?JfC68!5m%@uE)h_G1lGLr8r|&1pW0p|Dif~ayt`SYsz~uaqS(?UE48PE3*HE|LpV|)8uYNt<4z!zQo?f)mM-(deoWEBL zc_O+Kc+NZ`Z%>agU5#jhq(0qwWKQwmV0U8~vh}sF*h)^Is2UHM|3iCoqqXU`VBt!H zc^C`!_u!YC=l9vcgM!SFQPzKoixBn zF|#Q5`KrTW;7I>&f`#H?!UkvJ^+5_q3>kg0uX*MPSa@DVUV*}Yp#8W$Ae@K>8-r0F zm^x%UZSfkQ)gbW4DD~|^cj)tmvD0Z%hL0yi(klDE-mqN;F0#6$6XpX7c&46n|SW!oq`>H2A~-I-*p za0E@btuj3~F&=<_Xm>xp@79op>HfY7=oLY8mkV>#;`-Z;TwfA!D=7h3Gzxa^v%C=s702-M~TQ}yy`|bQ^)Q8 zUzA#xDV7m_kbDr$N^HUKMCHY{6!H}d=V3|}0mY?V6;1VhS^->m2`)Jnt@JZCwDP^c z@&je_gi;SLJ0(v1)w(KqDk}T=Vq=|&TEm`+iG#gSH=1i8Y$7}q0qZ`MKsa+A$Tuod zxP#5<)DG)rs<5X3D~h{tfM(fl%sS`%b)|eC$HHNs8@X7xnVrD~1BOEyMz-+*MiwQ= zsc7Oh)-=XG!mHV^0ex}V;%2v`DXUx>Y&mQ~liP7gG8`rBSjUya<5hCnqnRi_Q>pPi zQ4IWHUjiE(8C#wy3prm-_&u0Vm2Fa1J$j6KKdAc-r{Jui`SZywc`n1*isq0h3at9ecT&Aoh53i!iH zYa0L;y!|VH9LE~FB}Y2R4MXETg)5ntsjhH1u+;`?gQNJHRlEDJ&N~yewgo{8}$aCfbRce z={w`ue!urs2d%cMW+`c_tyR<}2(6+;DXCQ>wP~puF+*rSs2OUvNbS8>ZM9<6-XpdU zI|zwH{^|GsdyoftkXK%L=RW6L=en+Q?olDc=kU#bRfYT&>mV4vBRI|?Q)CSTUDRz< zvR=Oe&^(It=%JE9T0FGmeg>OEEwf8X z{I0Q&-!qqtrC;oa!?6!4>~-)3wMX6pVVOJJG&aA)_;ve2aCt2F2XZr{IvD!>$&#Oo zmO`H+vU&$3v3Qfoutu^1@Uz9fPZMcm+PqZNP;Y+w+Y|m~)#!XW#PZJY1dji7HAS|+ zuI!g!J|D;bD%j?-(>&dR%#6z>*)F*gh-Rj9-C+urHDn*BOW zxlmXm#pht&*SYCkx(^kAtGrjl1RNJNBq|z9QR1dEg?sJQsR&wFPx3%|3vMPh^95I2 z>Dg}v9*GzH&+vQv!_9Wds>ZJ=G*o?JlKR@)%_OhfcAYxM?TuWdyBT+$5LtUROX$#< zHdcjIG*%y#_XYpi3>9JB$u>XMGGkGfcNovhf@C3nE{i!DFx|Ry^raOE% z<%s@(vN*RsHFYBx$V0a7dWZilIv5V>oNZo1mvE8gn@+dfDpL(VC3|1RmGv9;R2r{n?1Lk>w>Q;1*iHi(*l4w@bKZ;5cvj!^eby>d=15_i)+6SHyV6a2 ztWi;CKlSCPiouE9tRT-Jxy3mF3;};N&OQZfMMf3})s@_A<`^c9|Is(y|IqckhDVvQ#4bo=!O^~bD~QNsdo{H9`V~y z_gxV02G^-hAT#T%=t5|;oj=UnW<16}GWl>U-;+WYKL3%p* z*1)uCVG9fPH#ZFC;l%8yDv(HWP=zJ!PQM<`z=jJ?*Pj~?{Gi~bmT~ghItw?HofpEz z&A7Sz42I3u+w}kF(FaP?#x~H<(2y?OTFVG+N3k4;C7y&!OY+Vvt!(LZC|4Jd>ng}G zz0=|IXHi1PA0JTF#UB!HanM~VSP#;zaY=$QN*I&ApQ20rZ`tS#*lG ze^LD%5JHL$Mzr9aZd6owu~1=tlruNdnj5O^f3iF8n|XQf_2VfTjja{=J~VNGINoxA zw>JFz@sMCEci-Z5dfLeSs+SO(uYS=h%Z=|>_&UoT^%g~w1qlaovSL4MF?_SY7w zY*M_(->h?Qye)4_72ljz8|9w9z_p zG`y#*?9$AUUDS5+Sk+}HMf}XBA5ya1=_84Pb+_*K>02NAjBO5PlY2al4sp3f7K|NT z_mdR`hWh<69rEjXo)ZzXMCrfFMbgbhw6%Qh(@6q6Z1}Dy$3Nnue1^)AQ=A!_)ocdLhBFWu;o*W_cU@U`f;X* zkGr`OO5_iT-Fr-3bi+-vQ!(a$8*>%ZqC@SkhJW{mC3Ue{5hSIyk-0tDZ2&wXW=*0Ki_+0xRYQq z@LPt$=!uLM=6yY#QKE&f(cQPVvp{2}D3@XTbDKh*PRagjSHY3vmqPT3}7z@VY@4pU*L9=l;vquUQ+Z*@O*yRgW$ohK^4pD8Tm{Q@BB%k#CrFAYO; z9jK%_isar@FBo(+BDfTxjoAEK+FNo~S?6je%%D z)Y-MG4j~jJ+rV8s{6y%js3LY;W_%_ovpd&N@sO=^xH*g%yYTw+meRi*2|vfcL3icf z5eq4IJOWIunY-Bm- ze}`9rXM>tjziesoh~;QSNsq-0jhkQR{}uui4V{w={h!x?NOhha_C9s}bwFMZ&9#FD z@P`XjWFP6WYZo1c!>jn_&f#7zo4tp-??^9Fb8c=hn{13y=?P*za9xKmS`&uL^2}Ty zB8h!1R-z6mat&2$p4-Nh$s(+*|FP2Gm1eR+O5(S7aZ8flO7u04%MCo9fSg|KH#kI^ zkepg(oXC+T$ahBmdr?%FHh`V2%1ej?QBRY17GB(Y#C)6F!LlYgijnrETkNNJqPJy` zQnOz1WZy-h8XYN-|I(`#Q!nJ2NFbfZ%zcrG16iZDg_PP;#@7HS>Q~-{Qhz+G@KzAx zHS$Z7ne)LF7nxSGe}_^wO^ULdrE;j$Di}dD@Z}L{>eb>}$rH^=VP@dAPV%}WO{Q&K zR;`?r<{SlVZaZjsB?cMa|CZWw@fq5{j_F?4brm%Un0$0>XKg5O=mC6BrI{Vlb)@N= z)r%PPit)sEvefWSAVf+9pFqqpF(lLw=Tk`pS5`L$s69~H-$hhk7d z)B;@Ijrhn{C;5Dr+t|Z<&9c>ip}p_o!6`lZK9i=Mcv$eg5V<0&$Q6fM(=vmHdHsE> zuckTR1KT=9O-M{KJB7)ml{4)$Hy~(jy~W=W_bkYNNB+7V0)h@c2z$KwmsXdfxqU*5d&V z4pJ`AZ>|;a9lIfz*_`y%iGKux?-Ol-P2zWEl^mY8$VgSD9cL6$S>Vl#V)zHh(L!y( zvybFL_%yvxW%&|Ba$TtAOhc6P6Xn%Vge7g9B8!g$o4!1+?LTfIKuN!&{eq zO&l3ltby5y5sicIZEtEed!HS7?j-e^o7Zs!0D1GJfFE5RjXBTIWK$^y1sAhs0wctK1F`uhfGgX~R+W z=O31BOf2kvwz9J#OS}27TdR>`->F(X$Mry69#1GHu-+-J*Dx;kNeRF0)3<$@h1e&R z>L!-WcsE}VL}`ZGeUCJPe0PytWR6DrOnh_o%r17$0@i2D+}hgOuNc$>l&WZNWZon; zPIXcM9F@AF=ap2BM21K9^F8=&|J{r(@6kx%y=s&5QhQJ5pvB4QaIFr}8h)l2{*$e* zvb$IJ%j2du!WrPC;&;n64)s$;E#tuQz0I{QU(Y!?PtoHjwsDqYn~K`(Q*mx5eU{fH zIDv{>%R+ZF4?!Qt2r9FtxVE^{U8n4SnKp#{u0DvA&*d!r;j{|ppg-35bMDiR=R(VU zX`nT?u4s7~oSWG2_z6exXOFN$E~Z7d^nfpFmtgpE|JvCEP5Z=LQaU}e*N9z_jPe<>kjw@XF(!-_X zmusu&3yYpIjF}HoYkhgnQ(m;X-M)ah?N_+^Rx76D1>om}$+qQL$cE%|719?D3w;f$ zZ7e|L{S?YSWx-Uxddh$0EV6JkuL4}l0a^c9@o2qSA2V`dviK){kx)b!Eu=nY!XRf$Xn1G| zXwk?oeFy87Qp0e0)Ub!Xc;#YChOT~=`t@tur`avb2Jo%J5Vp#7y4r>E{WE&axQrhe z&00B;EaTC9uQ%;YKE9h^b1v*tSL){XZfRaio*tll#wP5|RZE=($8tsXz02v~+m-c> z3d&-m%{VK#+AsHTy`kj5NJ_eC{%}q+ufPxur^9tjWBB{7&hi!A_j)13a+Vm-LII%G z(IhkE-?Hm!bb4N~e8=_TJkl(H$&oB*RdL2UdZWud9RmL#K(@z!sIPY$K-k_@d(GDm z?`jXr^yb(54zrG{`2BSCXZR3$A+TbvY*A2`zKDT#%m2w4p~Uc#-XTOk%HOiU_2vhi z)GwVWR8c6jth4xs=dH6r{K1gMcT~cU7E+Ns1}_#S}!Mk{h3J56AsCE`T_k#Td_}t{@@||AhX=o;oT%K<{SZpX;O-q9g!ZzcwMDd>8 zZ>#$9g@IDHwgyq!9Oz_Z|NYcNQoSj$@H8&9-hbn%2f?wW~IdUa(dL3I6~0>iXxGkAtR>OI>N z_b+E#Q|8LpDU*75@Uqpi())xjN{Uh|q|~tQFzH$Y)Uy^D{S);ZnNamkn=mBvs`^&+ ze>M-|Vo&I47y)|lr|M=JIq)hMy>{zmK9CmwaH4pyQNLkUCK{zj7k1leNKC0;Kpu8G z=No#C%bR4__Zdq0LUTRRveloZgNuZA_-97g{v-AEhtx2(T?{TctquR4%b z!vJGf$OBZP-+!|d3VxG7`INv?(0thj#?%&JvDE}{k85fQvm0Qs834+?ks&7uO*-wH zP!LqdV51nkkAh2Rd5Oj$7)lb$`kb&a`wH_JRO#mKiHIA^rv1se7aM1y?C*Ic;~yw3 za&vA1r&7zx0AbAO{2T60@*`}o^~_5@Z7ea}MvOe;<6zQTt3fA!ZFcgzK_53#2KH$) zv*yzAu#A%LdJz&WcMMOFp7)xr$=|NK-oF`(C)}AuO$~A+ih68<8`2;TT)wn#uVJ3& zSlsMRQ(rUJJ{Te>H0^f-G<89zs9<|c5-uqZ4bz9orehl9)?1M&x%oua|Ot}Ms)iSiPlcv>KI*e>ZvfuUXEpt-~4mC1)T&A*YL=5Oi)54e7+ zTw4&N<_v;pWr6IfS|EU}ZQneggZF|uHDHhWsR4VT#9#_nFUcCq=UNwL4bVhBFKD=M zEqyvJn2L7;nrhq+q#X`S!%jw+@DTFy$4zb zO~_U|<|WGxdqFv{rjl=bK21|#v9a-V0YGVCUpr%vlk=C z^HnvED9_z}FR@1n^xxrtse^YGdd%-rM9HUkg$l2_ZzqcPsT8jO8oqEUS`g=~dvjy2 zN^O3H>xxZ+V$&R{5DZeJIKR_FGXTf4>9d{h0Gy(AVUC*M{rsQ++V|4QJ{9aVqya5% z&hyp~XHnN9)kfs|dzq)9IoZZ$IxWNk*%{SIK;Re^s2b#7Zdbb}C3?Lf%3_VHs#vir zH>a(wBx`--IY#Pf2lLd6`20ikoG^4-$)Oi+D)vO?C!%F7ozMrz#E>43^2EHBw5|S- zU6D}yGAE4%z4}aXAzYZ~s$IolI|8UZhw@6%VNSxajS- zOT`)gdn*o_(Gz#)cXZRN7z8`sU*xqLJm0S~$!#wAe4obiqN(G6L}8mD!q{5-^*1Q0 z3E;2V=zPUnZw$FiJ_(~d*C4R11@ORGy&9Z;3$?QPhHj}-NIe9Z#)Hr2uF6JJK5quq zeh8e}LZ8^MpgnUQOf5DD9>Hjyo_9DPbdOq-dt6WAw-Vmhyy~@*9xtYAo_KxaL zOF!6E<*pW_h^J@j?qTpmGG+=AZq6~ z``@2K3$}m|!@Frlz2_E~R5zueQ0^O*dKM=#)*3oyVLoO|2%gsUow00tbvt&-?_-K# z`ul1Aa2olasLBPu?Vwkwj z0#Orpott4+LvFTOSbhmGfW}GKy|#nMD~>NBbv?GHd%DsbEHEY4oCqBURK@Y(Rumjr z`0eEHJ)N-np4jJ@7Nyg*l^xZ_LAvv+AIDIRzO-!`$seVa@VPbg`znm?!n9>{0-Vs7 z204cw23qi50f6(?a`mmD%cvZt$DS8j_u9tNFZhm~T?F6->q;0&q^yg{LCm*ohKx#U z$IC}s1R2S}uX#(_2TEbo{w(_`iZa}eATHoW3LO&>t{>aqJ0JBh# zWXn;_{K=E^>9EH=$6v}yBYQHU#05y*zB7z_R!K71nKvYTr~Ax3@S%KZr!H15nJ~jU zC#nG$VWng;D$`TxpmFW8>EmJ+Q?;gk4{o2gC(CrhFNAOca#G@0Y;@_WA-o~rtkM_o zgA#KHc-4IMm$opPuakWj92PgMvhh2<2kL}IDCCzS>&@+ZC%1Y}?Y~B}NmpmZ z4`!YFB4bhshl6NhyJ%8Rvqk5)%V5n@lG9>-&;D+CUzx1;gd&?BDsYnUIGRs&e)U!Q zA!dd2{QzH268lI`^@jCbi19B^Ry<l309*{Qu`K1wawWPq)Mm54zyJM(Uu6+14_d1k7;T;5B)7uZehk@S6Z4$TW2hIPM~oR(CNaG6sM-GkWtP{QQ&*gY zRx*pDt^?R00H|Ek=G?SQll#XNlUf}q?JaTT#d#X}*`@sZtWX<<3+P&QbSYhRDk^Rl zsHVB)d54j!w6yRr_QJ{*b`gma9&KOeZ41+;jQm@P^wh2 z4dD}7xMH#nw$-ezG^D(ZiW51WkH%$|bR&s!R`_XYRKSz7d3E-d6%>zYy`O5VTRWEN zqpeSG)=(^+@Cw)is~1<-^mnV<4wLGMj*=LVUEyhHMLDkr+03!g_-~xrRqXj;3kzp` z({?~}4! zbZu$xu3t|q(FogX-)oTll{*Nk3ZlB|maX3X*c}u(+l{T{hP!rcBU-%r#wI-)svn_m zD6e3bs>K`JVJYBYmt|96CG#@aXJMH|hg$%*e|Hv6H>!QD1qeI+X!u|HTtl=O+`mbc z29I&86r!O~rulbcLoaxcml_8m|2w6AhQrU5+3#{`C-q+raCTJ}WQ-px(VWI&O<7aN z1h^wqiQ*>4*Oz4-0{3!HdqldnGGre-Fs65eUFwY@WT5r`s(?zOoZ|<7c`T$=FM=1? zo6+{D*~|mlRuAutY0~L{{CW$*^+NIU?0ZFS88799N>r9s$o#qdxZERE;2!c2zeRyi zo%wM2{|drMg7U6Ks@}7sp0=f+b@SC$4bh5usDTN8eO}<5jWRDDDo@K(BgOEyToe4K4w}2aH(nna2P7RV~sB32)QvPsF|T7Or5iLvaWyo*p((4`#eJ zJNsP&1Sc0ID=xrCj<`IvplXCLncXX`?XS4hSN~~KIGU`Zq`zxCB{&5yU>b-ibbk${vtS>=5nhe z%`r9d7nx|_zlhxNoHzk)OFd#-NnXhVMOQ>yaAWyr%W&c|Yo%w5-_^^hbt{4`@L3cb zF8+3`x5B$06-S7lPRfj8gl!SUoXvjxI0?7xgE?3C91h2~UPS$*4EF7%Qoh#Y6ddb& zJl3ub0P3B7$=!As1M@uI8G}#TB$_o*@55~gq0Pq9w)CQV#p`t%Hz_D&y=a52NaHyd zYDUP3{eUO2k@8Esgp+E?)WNrE z98Jw(x$~p-u%oZrGBurB4 zw@n5X#GyL{%8f_3PBvE$`fwHJ_-&T+DHrUj3)tH3I40wd0C$TJp-COE2T4Tvn(yZs zp8jn0WlLBfN_mRLQQ?8iuemoLSM!B3(N}na2qt=464{6Nl*#9 z5IJ8sU!9-cC0NaGdj9ZA-$?+^e1KoL$m;V~FC?V&B;2>rkRVOHwF+4_&LN*q8Cr=X z0OWVx;DZu!4)1&n__I~uHKTZ}aQF;!92f51G}R z5WLSR6w+fv^V@3{B(Gh%d2f%M2G}bNmh1-;<8C_mjPrKsJdE}esQgpfi`Ep`lh(dN81m5aQbG6fZQOmZbE(wrHzedmZkAk0Kzq^l}hMvg?gn%{Pxh zi(uE7sB;?@Gl5F>X+0NR!-u|#1phq5W(Yz|ppKmzrW;`FAZMjnLv|iaCLb`^<(3$) zeG3vJF?5CAzhN6>)Hon|>2xI&l+_)x+!Up+9yXPCxZq5>84d!Kgu&-HD+X)I=s!=A za60DhgU?Mby)S&W68xhvN<1HteUl}qMjYgMy?N~aXf-22+pY@z%ug(gQ&dxAmrDB< z7`Ten-?QS_n(Y9BrBC&zlf$W&NY`P{lnu2HTe3?zHS`xAEF%0id=ztTLHL4?Ph-Vu z0>_XF1ZLS8m*?>X;dM*wJ2o}i=Hgd54r)=x2z;h(_J>Uw6sMg@ti1-3ak|{@Q_F0@Pou8 zHl~ZOiU^71@>TVITUC@6_jgMVmK-Imqlf@iP(N<6n%K)s4u^%2dP#1xiR+bhiE~Z+ zLU3>Vw%>w><;s~|4yOr6oTBaAYw0VZQep7U_xHI_z%^1shVXl}rR^`Wd43Ae?$>E7 zKq6I2aZ&4YVr$)dvVQTe6Fz3yWMYC3E8m%d=bX3uVsfcWoevG&Z%ppm^<}3X@93}9 z516IdumXv?9p02~-WtqY4NW*8(a+SF%i4tR(&NLM0fti?5VGB)VzbuJht(>2?Q+>x zjxohAA*|~1H-`)KP`QFAwQ|FyI$dJA$F;y`w>Z|t7Bou)7X;Z4U4SFntds z1FZC1toh}xjXCkV931v&2+9jl~x!kJiK6mKJ)m=SK4Uvzef(Pu_a0V)vYtW%n+ zbz`8{W5 z5lZdBp?N3yed;a#|D(#aAogd$snd7hpNR=ugGml4jJYLW;8%aQO2eNF{n@Jb5>1jo zRT{?fscPf0hAbr0U;G$3kPlzbi8yFZE3IIkyZU+KbVO(RK`Zi|U{#f)iqkL;G;Zt7 z9w9-8F!-2ri)5nF7Z*S!LR2+qI^EBB%D?Zb&4Rf;&|G;2HJvVnh8 z&^BiAl$RFn5{MK9LG=AVH(|X>#0U-Bc?h;-u}|~w*PK74lxDkm?X{YXpWlt;9ao?6 zBEN5jG^z7A9an^!)xB>=ukj%Kwz^BbI)%I<>BXS8Yv+yT>*OBulLnK5B<>e%t=JW^05|o-#S&r+wRn~*+yH8Za28f|n zTDoN2y)_mcGj6OO7B?*VDA#?%?#b7UXd%|UEqhYC)wIeW-0|E_iO@EUY_#4Q<8kia zXZO}gzJj>)e*I8|C0U@7t-Fy1)*3wXTi7iaib$hpBA^b{Q~9q?X<9y&fXXBz*q=+SZS4W# zAwFa6+FYk`eo3J2pye&Cp1RR*pfI9r1~$%sK7y5YMfO|{5N&Xw3lv8%B*aZygx78E zVT`Lr2iyJqgCpI%`r~K!WB3IYs5i@6{>*4fyer1m(!FfsxP#k&eh6;Ctz{1;bz>;u zAB0CF^jU2R|NRHuDm=aykM*ulOPTmJ0rxqp)lEjFg^&~_>S9kgU9b!FCO!(g3Hw0B zUxen7wEnkSj!-WIi)G_B;op^v2=&*`jqOD!LwI>M|Al-j>7+)HPB6ydAGhf{|Fopn zvS8b$oZ7+zN;MD0;&uOZp2F17aFlm^vXZ6plT(RE$VSW&k47%;0sXcRNa^_0p5XPp z%ctyIxuOy`M8bw$l^mP;&Hto9{;TCK$9T^TFMuU5a!pat)w*ljXn>s2=f*Qtn)QJB zLvFZLG(+d?@WRK}o|yvk)F?p%$$d5S(f?9bHSewQKHFVy3r7Cf3RZz@0073jE7!eh z?QJ-X+2@F$r*{}=1oFg8t^N!lg81Ub&O|-ZCWgAM(zyyM9Vs-nqL#Nr!_=>ndtr@$ zQ$fgS5%dm9x>)K;few8UD{YF*8_2vBLM$u4M%*w)C%LKnieJAvL}@TX(Vqu@DBl-&Opt)K#^4|Kuam$Y{oSCS%Vw;})28GZSFFz<^8pf>DEaE2sGedteo8 zuJd1m884y~)p%I4U8v0gId6CXg71Rh3Re~SzA5?CpCX*@-_9zVTq2{76_%T}y`449 zNiqm-$h&iV?5-*4scCV?M&6+Z&Sq@3HP;&Jo6eymKzZPI6zRWhca*ukLoE_%_;%ha zm!0+>^;TscWlr2kq3AUK@WbzR)>KnG1GVR)t-p~9jRcuX%*MJ(tA?o+f~g#b;%hS zUh+wnfT?VC=@a6)+f{4gnoFYmT0*n{e~X4yP*xWU<~mgR-rcT(ettH_NBG0i$8=8$o4oE#?Qu!m~I=4P|Pj1-G} ze;%UusJ7AIOjn7%xbalo6|Nn?Q$ZufGE(2TFq)>`m>7PV5l-pcX62igg3~(`oo*!L zm|%8Rsbtp!M(=20^WRh-pHCO7?())(x%xjqYXhr#X8TOu^3~>|#C5-ZrZp;%%+)ZD zU$GMX;n$aKl2h_udSPRSUh2*WVTCTre0MpubtPI*51_-HUs&-~5E_G%4_Oec;#Kk< z5#)Z}UmMDPF<3QV&GzuLRI!G{O~L=^l>d7}_?Qa=rZ&IBx1CSKsXP?5oT)uSk63=B zi3eq0wZ6*{m;t$SMO#7ps$&ZGF3>^Nwz&O|k>@GlB0Kk?i^5{M-NDKa=8H~QDbf5W zU>=>SpN$7GAmc5ermF88KA5o6*adg7anbU-{Z# z%R`)q&1s3{?%j0Sx%h=Ts@J-5$@RO;MU3yZ_kiU7>&`do8cLF1U`(o?#sZ1^e$SOU zD&B6UDC$@tE=rcxEOJ@c$LFhA%^u6=g6tuTMwfo~RXuh6%1o$d5rbaCUAV)7`^EpF z=utHY40J}Nl$_AI-><+w$3C>$F%etl+`#PI_?%xg$`B%ppw=g!Rr+Si!zDR%Xv2b}BQ^HTa1Q&T}Bsn*z zDQnvy`R|!G+VEPMID!A7>X?eWjZO>z#N@IOer<(|-SqRH!tF$gb0Dwi{;TjW`K449 z$A4o;pve|xA~Xc9w5J`t330w$?lDs0)lLyEYnYceXi;z$)>g{%`Je>!DR2(EQXUH;>OIbwfpiu3@sW zR3F$e%nrL&TOoIUps!okKo&I_dY1CY$LG;BJKImB|13K@rBl+BW?vZM;^<=Y4;Y80 zcu8FJ+4Sd!#NW?skcA?QM;n@H zEIw@1Ucwjj2xZi(N;QAs3P;>lJ7Efs{a|L?R(j`E@xxOIQ6y$0WX5yypo@3UXJSle zP)n-D{X49D{su`!`RC5P-L-BE`-;;eH5NOOyf<5dl$t2%y-9~`LL6&9T|Tw;KY!w_ zSNgRsHNz!Jn6`DD?ZP(W?SZovomm_*p^_j&ncP*Sv3>TEXCf!AkKeNInq}xU0a7?s zyJ;-g(5ABeMah;A*l4z|w4v&wOh^pMi5Zuid7ckv^Mi=&1Tg^Fd--7jnsr&U?w1>Qb_XI{mKr)ohbLmI@cB|+R}#UT!vU#XP)U=Dp)x0?z>2e+>VP< z*tHAyhWZW^v^so}xeBzI!iZ0=`w6NmBxGo%1ZUedzYN*0j>(0MfSh-CH)Q-=cK-sX z)}{*MFrUC7ajxwr=+cIaT_$?2omJkoo<~Qk&+2q_?y&5Ymc)7P%s~IRr5&bF9GZV~ zvt)t!)ivm__kGjw;!P(4%iaeqzC5BgT-RtnVi-(K$Sy%Vl{Bm@BM;ECW-}#zLRg>BF#V5zEr3$!H4rFZ@-QA;C2V;R5t%;q7 zRGl~Y6&Px`CK~pNI&MvMjI$s|(u)QB5Fj+A6o=Q1%=730*E%~hq$CHNNoQU*A?3HEPaLZj5)b;J!GKq z<9TschWb-WULDTkxGg=+>7Lik5pBU=NX;*%XI;(1X$tS%p$5w?4ZrFjzwG^EVm%HhWezTM%KAbD+w(n! znlIYH`{sDQs62#t#W16S)1vPCuTk_~$qL&9j~R#D`2c|5=LlmW=^K0Pdk-9YU`F>M1Idd zVJSWo_bTOL+uPcg%dh=lSlzzWotrlqsQwInESS&qc7m;{dNL^k1~OztR;Yx0!AB3W z>elYP#1DB24^W7Z)Veicvv8VomjI)S;^nzjF>S$n&+gW8+?Ta=;Qi~j{k51%`yT1& zuB!Tv#ZKBao=B8~EeE13q(*2}VcU(uo{c0lVL^rg<1p5R)(!db zM!D{ff&LV3gWW{?j{l;rrDL3l`R-^l!;!0U2#SBY$DF41%@ZMgj}F%)lmgTed;nds zbQEL+G=QxVF$|QhX&=|5{o;P7i4i4G;7^Ru4b|$x!bP7OB$8i0AVE**BlJdCQgZB6;wYiO%D6vdbWr6h;1b2sRyk(aU!%&Z^sR%h1`5J_^B$r*k|UXXcKI;^u4K4-#!0P9rOI4jd2FkVI&76ajwkRnkGY zIvrm-6ahcc9Rs!85Soi{d-pNc-HB40Ad(d&eZT z1-F5|i05X4!VK(0CRwVLuzl1rq7ydL!#)fInU#ww3dlQ+KcJ~NMP0b(+fm@f)2`sZ zN%gyFniy{N|LI#51M1GWnI`I#3>FtNc0~i_+c)PGK1Kc>mOgPGajo>^=#CzP$+Go0{>h2Y|GWW~)z| z66U;zoWW3|6U8OK+vL%hWHFJl*8|{E3yMxHzl*^PF&&kbow#Bdj6f!oG1C*DpmX zSa-0n;_uBcshec&XGgh2>l(o|U6FY1bomQ+dD?BoB>6HWf2h|3>xUlQ&}og{g@#u% zaw1?&>l``oZA4;-@gTn&LE8DDe_Rs3=dp`aZ@D=Ad9#^~cLB*BAqVu4SbTvJy}4)- zY=Ro(SPzI&;Aep9S0Mi6zfeg1RZ^06O!&>AiF|3L6^E<{DD~hw8&qeb^i=&OBl!cL zNByj2Cvd9G`Rg6VD31=(4&PiqAS$)-15}$s2)!j(1aq@x%OXEu%@=3X~%7g-bJZL+f$^anX zar>Qi_aJH(LbJb-O*$V;l|#fhoTv`5_$Ut~Gw_qS4$n?Rqq8rQvqd!nzG7jNJ}XKx zJM%AiTmPSm{!C^)-22zbzd?yA-)qeS!N5Y2xCkxmQ+cTBX#5vX+BpX<{DW&Jwqb+Z zGoZRA?*E2k`lJNjh3lyfOR$J=8W3t5O^`=a(@8?*!S#=xMoDvG<6b?bif&ss)&tS| zviH|c5iB%s)K{ruzu!w?80+$wHz$?f?*Xfx6YhlL+8{s`pzuM6$WSFs0|Yzh6zE}F$7fUAnpgCst< z*&H(wnF~0H&Mot%oPushXx}_rOiC^y8jqR|2jq2p zu=%+IArZ7#8LX?-S^Jrqyp!&rmvgSj$p2h;yD>U;vp;TrOt}qla8k%_k_b%zGz>IJ zoCEz!65^t){$tstb}qn%0T`8#Z`X==&)l+C-+*X7FZOEhDEQ8)UXwIp^scS&&i1~; z34{NT3SDy(^xcJ)pr9brD+n(ludTm7s8(1+WF3>xkMg<2kQ%SeZQBPu3W_;CC8k?B zHkgksjMsQL=KA$t{!nh_vvEb(A7+svft>VB^LR7rNt&&YnOt^(jk{{edT-xe*B4wI zTt2BAU3)?fkntwIZ%J>RKqpGBjbV=QNetdPe#GHv0BMzOzz08ys_}RCGr5SlYK<~Mckma8x-i1>AWC@z*pUCTz3nzrc zMxw5gjGKRrODsaEn**6N$YkYdTOLx^w3GOEU|`)%7WU@p1XK8pAgg4;FDvdvKZ}UT z7@bJFpJ24_QV@GH9jInOe#a`poOF57sCB$=G}~C6Cz!7D<>tRh;N2RJgDK6g4>>Oq)3>y> znp?;Nsrz_>Kc_rLkzZrUdAvc9R^P_96!vx$K<|~_oBTe7~3OfKh4h^ zWd8*dby4TucNAv#c2<4U{TmGq&;!6msvR8tO#t_5Ewcom5dkZj^yW#bd;@UkA=KU()~kJ#JZ9Pgi9*a%B!QS86#CDl;`rOe-}9C8?Qv;081+GZpvB zL1t#=E;o)`;5PRb_ds!i15iG^-nZ}f4|x1^e_Z$bIp;dpxvai2p{wsiEN=a;*^g+= z_Un?=9JHP%P_AT;J$|2>7s9pr5P@=qPE4W26#`q?n#>dyn+3$* zUPoOIS^zgx1znnjx&p0XTo$b@W$)+iy>*Gt6DAn&L)15^mS^rFp-_Okmgw#ca3gJ& zIl)qQlzV?K<#fYTl<32k1um%FwT<}3qn-_DBZF`E_#*2iWPgJPuPwFokmUj|i=(rMModOWQLc7)9PE&`Gg|p4euj5jOz77`(nMVj=d|kRTRMQv zcew?#i;jtB0Wj%8Hm}c$&S5dHo2(a4uQr|Jwi~a%oTW^NGi9V_k% zG{k%Ag#K&Pp3t~e;)OT~6+8`cK$a+f_Vb@r*Wr&*+bw!Jy+7rE{>g?H{g@wfP&Slq znD>37uxeq*A#f+UEVjRLU#Ne~iQmTMce;315aD?IgD5q6W8Xc%8=2jwbUrvhjb(tv zaH3lDx*2{U4jKDu0d$w^3b83j(BC~Qlcu^WBcKVD!|_C4H6|o7I3j>w%-(ZC!nd<^beG}zg2xrRzL|H@qQ&QOVkc9WYOjj(}_jKNh zyunyiyp4nnR<%t2+{#xb!+>bu=|p{Rqv-6%1{b`zTx zobQOKZ>$~&H=-znW9`xHW^AZBuRbDd3bgTaO>aVpUni4rb|+kVE}!Cvczbd#{30 zW0ZeZF?;x4_d)?C6bO>Yty=z*5*pBiL^gll0Rlf7nVqi z_xg=Zae-PB=hHM7zi+^t@;DQH7wv`oiED<_e0_&sHgr-@Hv3;=%2Q)Jc_r-3a zPp<>twqZ0F;`#g^YWY9ayBf|GOgS-z%JF+L{MSzi6kj|(K;j~ht&*aJOc zWFkZitd?{!hi~@V$JHFTkv%hXW+lHO9Kr@;0579XgRiucWBl0f_95c6CfWA+_5%KQ z>fi(T|0r041xWt1|6S@Vz~R)_503{&{t0S*GV|{LE}!_{n{^B6Tg3^1OJkdEA>dc5 zl~Gl<(aitR?(MXM*sb=Rxs}h~j+$(S${T6ef36s|vDf3dZkg40mnelXnw>K-wW|yE zs_&EjkX&Sg5hA;AqQTMK@MfTkq2VO;JEtkrwcHfMz}Lmvqx|OAjyg;@1b%e$s4tTN zRzM|I-E4W>t>hD1sTh9IE&IbMB#m^`A+>Hd75JoXhrxzvW*4v?ccOQ3L~c$GdCl_s zYzjAiM@=f(FI0?8Yvo)pg^#o=x?d?r(BrC}>= z&mL_tsiu*z^na*fM_cziFrwZF%rv_}zupbMZ4VrU6IdbXLnKQ+|Ke7w zAVi>Hap4Aw3;e%@dPVPhY+B1@dC{JXH_U|&jDY>sJ%x7k)*HmuA(WB!*#Z|CylH46 zl<<{&kHdeHd%3w`p8p%y6(j>3-}Dvx?F|20Xg6+)hv8+gol6qvW5=7%BIx0nkDggCJ+&^A_06!jX&CiAUiyNy z#3PA&mqX6m3CguLaGXnRa!FNO@x!8~A(*YH&65WA{SwG9=>UN_2q1WG)~w8cR(uag z6M9@8kBAfXu-V+!BDd2V2aPfGuesY#h`;kt&SHM? zkrw2bZRDc3%tV@bOYcycCo&fZW4omqWoyz4vh0TiVq0DbK`L> zp5MoA2q@i-_%UpcKavz?yf@M2o@K=_pjbslH+X~A%} znPdIfc|QcXRwqz6wy}yH0-4UEtk(X^ZkF z;bu^uW;a$K=(5$jqJR6$O$x^T3!ULEQyrp%j#3}&+BG56AwJJv;S9u|;A6%EZMq`B zS`{CWxPMVks3D>FMSRY3XocNhneFNQ&FM+VK2bF~HE$p8chpHBfdBc=GcxV(Zfm`Y zffZPyE0X)v?Y;P&uPn7+tN$!>Pk3@Q!v&J`J*G!$IU7X-9mD|eXMf?(XEvWnzp=S< z_eTk?Vy@JQIT8WLvcUb6?a3)Bj~?@A?WYJ>!4BuF$j*7KDX@QSoI;+9v2F?)yVkRB z)=Q2?#QW5DlDmcEwGXnF_^cjQQj0gOCT+bdTw_!RgjU@a4Y&fAr5?KVwEPe`_89NJ zaB{T8R20@iQ4=;aI{Tmv>T49Bfks1n83$;3&Sa0q|Gc(fEmz~{cKWY#o1j)-OiXsy zk?{-&)gNK=v`{5r`Ly`7eQu1qVjz%vb|PG4&FyfvaZQAJ2swx&Cq)KQhrGu@n+8j5 zurSWPg^jXdDcfla^*hUDzYs&tHcaQ3eaRQ(4Z|s-)Zg!F$>x=#oFNsPSp#=a$N}x( zo8F|>7bSAu%Ed97l=ks~UNeG9&NcI6@7h4*v#osMDXFtM_HXE;N_QYAg-1X3NXTBh zr0!QtyXspPao@-;i3mIU@~(XgcU(SCSYu@qPfPJ$$dko2(d<7ZUU!#-<*9~itF?rN zS<>+tU)5??rArfUI`{!k7w?uJCa8(<%!mTOu{)7Wu6QSVfpANe0RM$m#d zX58Ht=XN+WsAy}b{?g5fdu_S>?Ag>xeWf)<}PBV(H|iJ#6I*3zkjl(v7oW6 zBJwkcZ_^&y#nnq)9P(-a5PAxYQEgJcqQGIE) ztP^;+v*g)=Ikuf#R;ntS-`!a-6q1W+)KtoSy@ihTm!BGb9I_f?KjaE$ed+3om(7A9 zRt`BsHe?|GT9fCYygYnKj-Sok0-in-xNJqC>+KAG~- zHoqtJ#mNU-PD-|g_Uq#RHSPlyk}RLhoO!c!3j^SK6-9{e3Yi3E#p%8%-0& z5U>0Qy;YAV!SKv0(HEZCq&|%p4eS~2jYu22aYP=3D1OUOW;mjOGssl}_7`hS1NO&) zHAdM=@kimn{?oD-^WA%$bqBn;)bM6L#srEWtVp?k(O%8?k z%8t}F9v#A?jtrfERg@vI(%fjR4Diq>lV9n(wU1iOSb0fX0xY;k%fEkV+C6w4ya_rG zWSl1cyj56pVf)zLx^&mGieGBALhj#pvQB>8KfZ>QpiFZk7S_lNgC-C1%H zuTP5|v&j`}w2E)VWKJOu7}Lim5Jr`Dbz><2>D~U=O$CQ#lU%qkFt5jrk zxN2Du2wOfP33>M;IQA?tCVvw@pU3&t&!|J_XYgiobu2Fe!P?HLnF6L*7O_P z^=(NBm#6O=@lKYXH)H^(LCI#5BJ9Wd8jmJ^qHmwGnNqLWU6fwgY42(_Q;0vgJ0G<3 zS+KSbMc2cMGCJMk9G?11&#H9>P!LNG7Olxw%tYfCwoOlI0fTv1Y%{|&|4I`d-QwF^ zlw{P!d%|p0T)HRA@}71;GEOeOd|EtBv+$b~rFU&kV(1^zbV0`tQKsq&8Cc8JNg)(k zy9O6n*Q717++@D8?Jv1mcDp!!--CI+rYl6LyMG)_oS~tFrE<_io%Mi zb%n|rX;6JA^v6dX`i~)t9%lKYXZTi+xrWTekiGV97kEC6c zx5`NEP`+pUYAvym}B+U-*GE2)33{o8g$Dil%Q;_Az-yWmgur|J}nD1Hsowz!=dpWpqF{#p48g!no=Ea5yMyOFD$-k@h>_2 zwP9mwfDFSk2%M)1ztxd`2ujst9@#3sq`d^NRU?+$o~MCirAYQ>0T;=l32VM26^O z?xV}@J2wBK_~si>Do|pil00_F(3U9C^5dPsuAP=l3q;Hjmw(XP3FdA|sad?)vknR| zCxkE-Z20_2e1YFAe>b(n8~l47nea2iB+XnD{v9O?XZo=c0CJ;szON_E)Xr_V*YA7y zwe%B%$f9y=5#c9Kmf>6e91!)rYAW!g;(PJ6J?k|D3^0Ex#7V=e=jt>&Y5|qXBBFIl zs`rYAnk!&FqKbE&I)@F-PiJ$g5ZUd;5`B$k+-J?&&G41m_X;Im z3Z=2lT>kK*bz4yPHCF?vHM-4TqB#>vMPU`0*@@tUOi&L@b)k@hI(A=3@B^%=84Qon z<4)!y#&Z8?#A$qdvSFD$!MkPOQB!;2)}Z)$H1jnLnO0;aW+^LxUYZvsHJ+Yo(g~3s z+yVaHgJ&rQ=un?8gzrj$yo(wQq61*o*_XyR{l$jDGxr$soI)Nm-wF zn2Bbo@wq~AQp|CT;<*H1k90eI(b*=AZF>F$z)iU5mO;n0Fp$m%&yK%8C3eJXICTl0Nolb_*T>!;juo@`~s%Sv37&CzT%1A{Pv*Rn!NFH{_&blUi-Z& zE=uxy@Y7EvhU^6z@{=InQ*3&L%RzPV;^qd};W#))s?f2%>Ru%sEvvCnvO_IxYusi< z)nJLECzgJ5O@~T!HA7(#cZh;dd%j}ghr3#P$3M{7p>~UUc|T>F_)ivZo~}%;-HPP&3(mV%yd;FV};g`)2P0QzC+Ry3jO%N=l z-$1!V_G3puprb!LLv^4s+f12pUZDP++1r!z!U$^P<{T(8%yl1;Rcq`SZ z&%3<)v`6#aES+(l+apd%6Rbx?34~(`Yu{V+;xl`O`~KgnZzk^i0T%YZ@ac@R>Y~Ku zD6zUdW8$0_8LKVh=JCuJZxm@kbe#*in-}OSV#op@%(~649=0ah>3F?SatF;%S+7oV zd6d{`s_7wI+`cs z4#MX`8pzeh{j!8HLdg8Hx@jiTR8NY}su3iSencLHeMW?bzt^$F^BvArSq~r2;8EXb z?)A|dEiGG zKZ6dJ!Gprp8xscL^e@Qo7#R^Z>d*ogItza>O8s+nfV%3oc9z#7EJ!Hgv5@)rnBXI# zJQh%7%X{#5AA72_($`PG9`nVA6P3_UwUp9vd1CqTkF*{&rDw${wru4~g9|jnnN~l6 zdB*MXoozW2uvg3@Fgm{mfwJcm&F=Xt_~RmPO35r}OuvDsAaeq3P*Q}|$03@dKjG^K zkl;_;wusL(Htb>l+M29!ZR*R+pZANq4`#!-_jz!wKMR&QhoN}R9o{)C7B)@LtoBRx z^;EKIq=hey!A)upF+Kk(qbjWUI=bh}ZvEI9W~?x}7&S55hXR|66A?9+!Jv&riI05| z_3D+iNS8`$7pJb_%7#Q-Q-^PprwVtaz5XcpwsC8moJed@G%(_iw1FTBHyVh`bC=fJ zUHWthbGES|*{BeZoT3?CT~p52v2m~%NN|aW}8W>l+ zb%%QXiTS%YD?tM%yR$+uA1=w*Iyd;5ND-v;IgVR$2bdrA!tk|QSQ-@GNK0!RjS=s& zq{b|K>VC%wUMrAXJmHQ=o>e?%tRy?X&z267rpGT4tnOwZ$`L5GPm4CgMZTg#vT4re1DJ>=5vbe zt@R816O3u^4X240UjVs#P7oH@xdv+E{&FPkgYl1-b{qWnYcT3Pi!W=s?5x zK|5_7UtHJt&q5l8>MZAqmennkw2Ew4%(mhVTo&531bCvGgka=nBw8l`JZiH`1h35; zAMzm5X(?NYp7`((=J|=g%eLssn)06;Q}IQV2;^C&gqiGqvC>*Um7~=$jNxueL&B1_ zb1o{2d=51p7G4r3RHQ#@28%WQtfTegYY&2HYS?ghT7N@ht63n2I@%?JU`bqvRHTWf z!|sVyE_+XrTf|iHr%cADoCOshwojSvGG(LNfo~=etY0|_@D9|u5ZJG;9C_Kwedc(V z_g45U4w{j3U&k0;MRJ8)Pc?Gt|0O(`%l2@u^e8BO^fck2%6&$x;tp>Wj@e8Ys5V|P zuD>u!7aaB$eOv#_TRAB<1;&0k2iFp~naQUnb6Sse;rzU5{s}L|u(aP(XzQCUwUt#|jYW^+tyT5d?oY zOsr_=R`&#!eKNrSEJMoat&UuLl3rGx>D2kjic{ z%KZ;zKkIj15}%)hXRu1{qSf@7)U`NQrih?8BB(*|0_ewwOIV9*&OfU%!Y>>3B_HkQ!}7PW*nc^8lnwEMHhq zSJvRgiy#JlZ@MXrZFD##LkwYS3tNbmJHGbWZ@2k3n4L#>cBZP^`fDKpfVUo_e!A3GCeOvKebgEz96YIoEkQ1t zO#>R}T2Iw(_9gBo?s?#8PF?&9x4tRLv-i(xeoVZRtcqN}pO-EGT9kF&j68XPu1gr@ zNDHahZ92VOoxB5I`JDn?13ecx->xRHYL2@jcpG z5yQ%7v#cdO=i41IMIx0|M)R{n0dPqLRmce`EXK#YPU+++WS)k5q>ZHHk*hmwBuLG= zzd>yIgQ<8!$zjeMbL8#{c7e}2Q9fPnHH!`Z(mQ=4aDpozxaRI<^DjEsWXe2LFbn=I z(hNm1oZOe`h|>+4DT9b=3PyfRHg-eEsV+)W#D*ziD{T^xOra~TuP4?Zb%1DSR8wM1 zmOt@OTHa-Ge5wF{BWGPRzQwcmhPkn874EF{!FcdXua0cyI!?P)H2l`?#g*i#t>8mN zpHbkk34W9S$fa{QlD-VYEJ2$d{dzLDovkPvv5Ua*--1h~GKIy!HRBTDjt>}Jj530_ zCQC&}c7kS}W}rU9p1K|P)=yWtGi(ngaa@AoYMao=LfOOUpdnt1zcmg_#;wXYV?3ne?(4nCARCYbZ}X zb2wflhYuEC{{AW4SjxenYb=1jfj0$EqjyAi%eqxjGw{Vft|Nl{@Q(ryTV5N_V9D{} zLX01CBOD3#7CJ%HaaAS6qAs1JiN};My1*yOcg?4Zy3h!?T@VF^_E~jA6pN33-h&4q`5cT;e+XD|FM#AF*%!G*R z^7(+}RQ-G|?#$>9wvRk>BmDzfe~p4*+g%1mHZpzt(iHJIiQ<{CrL$a;0oo?E9v)xZA3^8 zbEF7cOVDDFj$c38c%UzZy&_d5C=ZWPHJ#3o*HR*1#Z%KC=r+ zR@W|^T6<7GGPkb6D_FnJIgXQwt`eTtr?{j85Aq0Ql2D>jSP$;TJ9$^rABxBG?bdXj zgc@ZjN)%gO$gow{XaYW%y!bLf+`g!5%V0^jVLu{~{MZJVJTJ815{8rn9^2tw<|$G} z#+oo1i=P$>yu&n>=lW3|tz1yAX9v+Sh+0}4;m~~3bX42Q4HR5ejs;4`v^+7rlH-!a z$cN-S{L*0XvXvN?7P!oo_bGejw5@dn;l__EkTeiw-7r_tE~+y~B&ZI%nO)*Thn+?& z-5`{OM`x*>`$Qg#8od1hKeoWqQP&zI$NA%AcBFnmr2IQGKD#Z@lK5i!jI?%{ygN&x zS@0o-MaV&=C6`~ve>eCK#6=$}MKE!RR!ndXM343ZMr?n`11fRPDxYx|2EP2swi_%| zd(MB_>r!IPC-=7DYD&B75hV_MJOnP*S}|71SX9h0!#{sC@+yn>BLpb&>kOS@6V&N8 z2ULmVQMRu%<;c%M`kd^?7)&^H*43r;)g~R9;%yIxQCYBIY8Mz!cz{j{G3gdcq_O0e67k^Y`>bznht==m}rMaZL~J{ z?E$diq9-r>T3B~PGq_V~i)Haubm#NorJ@Z&k4jiKQukxuFVMbZL>Xq*c}Rx^dbaw1 znR77O`f00vwVwA`@d)dwt-6EF&Hi<;vOw4~efL0Eh|*oc3t;htjD~}VXpAV*$IG9~ zfeUS)A30MNe%>=C4&E_?GoR!^3b0L{Nd2v>J7x0luXe(dkO7pd3Vt-o&v*4%@r;mq z&B&9Lr)B7%Z=r*h2N5$V&l;X_XEU5NCs}jUM94o=wrr?FqYqsR zNGR6)fyRSNBv4XL7d}&|S2}D|9e4c?35FMZrW*-1NRz-X|0PUiD=)G_Ftz@jI^kS! zHZCKEjvB&p>!N}lShZFXUY1PXVE#2I3I=jQ0QNqM>3e>;EZQSFKNow;-I!%X%Rap~ zT}y<1u-kX6mf&I(EMxT1n-yY(W*4G&+{34&R)Ti3ovVB_^cP&&f<2WcbEB`UC!JLc zpsy>vBiWtGJo`R_ELrR(qH`kN<<8oC+X6Zba!D~nypFu(I^}?GbxkIi z^rsJAh1eU#25r&FXTJ9_M<34!$!Z{-p2YO&>jpv5Hwb^ zGPZx4%H%cf>**|$yXXEM9f;JdL{BQFa&a_PT4GGhaHXnS(KA1L7Vr29w%=(ucQmp3 z9y4xpJ?p7vN!{~|B{6jRO~s`D&~7)qu9h>o>L9CmVq}Z*=*71SD~mkJ* zoeY7k)PpGv?{>xP1UsvTTU|WW=AQ~+yss)6D;=FJW;%g7ftk_c|NQOxv0h&1Vgp|I zir(HHU>x&r_0FlpRJ=OfX$z0X0#4MOl(%A)8q=Y?met6 zZNdoo@U5>VmPhM+PAEYaD7h#}Dve}A4eD2Ag2Zi?qs0(t8NLf+azd?fhi^G1Q^^&# z=w7A+L$#pek*!UMKJ{C0i87~yhXHX_?EnIBBJ%r@wn*e5Rl9Nwj-L3agY@&O-i%d^*iaYBhgnst;YKk3~c8wgrp=5`xc%Rc+A8pcdEF?K<$TlZ`5SoZroF9;uC`Ur9S}tm2;z>pqK&%T zIj`yJ>s7J(gYUWhFl&y;OQlj5OX{n2``vhrfUniu8cWCYBA8=L3|W|N^TM|8pN&xT zTK()7)r7h+c^6xwU9%WX@6Fo@;3G>tVuyjYMi;T@koWlv_%|K5*)<5v)l8Vs)kP~G z+3BktkI_klxt8!C%;Ce=ncmX8BD$7)$Tbtn5UPQSax8V=Hc(G~8f`vN6#0E64xhaY zR<>e`To~Q{^QO4RP2@+g| z-H%h(XtbivO?U-&ZF;7T!r8+cHg76PYLRF!>~u7b-im6h+U=5~rO#-z%Lzb(|2ff` zcbo3pDJY*@Ze617`-xIZwTxs$lu0c#RmEoRz>Q>FEf8e_OlcDapC4Gan^k6&U-uxm* zM^WpSKN{We-joE$LdRU*R!uC}REY8oiR?`B8)hvKQP0%=TlIQZP!&?_-o2Q7N{y{o zkuTep_qg*n>E>2>fOn$vQ$%!rnXa#alFS{yd5f>Ft%-08Dlsi1K?N2sI}+dF45V)z z^flIAg}=BZ_1w5PQT2hA#^L4B-X(vgp9l%_RhRY;PJO6sYSjaYRHN zO>frDTV%GEDZi*P!tb^=Dzw=BeVfUrzRs)G0?Umjx-<3>`+Px)2{w-u-UfcHn}xOL z-K!0`H=2j;OARp1@-*7)vA4E~Icbe3QJYM=JUw4#6pQFU7WH2F=2A;hMG$)mibp2btrxL8(3ttpyOS$Cn-l?k#8 zo7MDM+wIm3dr5`1T}2Jm?%VA& zkGU@Ed_nUrdv$n}udvnRZsPE04P?KCky_}MdvWVwR(DD@Tw;GQ0b+cz4?)SRK&dbM z*}GDcZIjujQ74*>HJ_T*EUHh%E+|eJ7T`t)6hz}AZ{FH8;E6eXIN7KpO8=8!P!h>M z_-f@eTOH22^%IQe&zpjPiDfZRS!<7L(DraTXz`o!ZLYuL7W~(3u6#$A;KECpgS^!* zniC2jQHXxP$HE;E{>JZ6k@zWIjj{YHx}DAx*bpl^dfD zo6T|L@Ld-B2s-0fcw<_*m%psMe|#SrZnAi4(AhEYqt+@G z0m0 zRV$|-|6esv(Xe^eZa-RHiL0^vc=BiB-^EP($3@Y*d2y~q90wJUmF<|OD8*AH33E?ZLs0aD zuV)J|Wt2Ege$_}GFw|D4d}6sG^f_GbiPTn!F!DQgZfx#-?dGzjx3auk3;YK;VdY)a za?0QutS9}#HNhOI$9dl>NH5%`_B#@viC|9f78=Nt4Z=x{N46?ls(ID;({Nj+eC}`dE}r`&pK$+^VOyg{i}%;S|`VNhRL z|McG~QSg9`nX21^DY$(%O!qY-vVL#nCYx2M(J zlun@Ay5yc>LecVQrAF^=IHN|e=)yG%H*RgR2{=1By+O=qDlide2LQlp9tHnjZ!sxs zY8q{N@&_B_JiZ*AU?1%Dwxdk+CN+ca)=QcBN2Sz3Moe%uV-hUYtMK$|jmM?YmG>4v zKFyb7?YdSygHqtY2}^+b{g&(>SB8@ULDmWeLR}&Yr zv6l)^S%m@eZkV5S7I~@zhpooBpb{j`ig%)qzwCRFF+(a`h?;oVKWADxCr0V0;2d)q z^QstUQ^hIi20sL&%nxSuQ027k5(ZQ|4>cDW(s$)#vdcmm`(hx4nztE&GdbmMaQEGO zy=$|0sM6|kY60J6&U_8=*Q$C=KWp=XSYLfb3sQQ+uw0TS1kywo%@8nZNGul_N)7tRcyOsHY#59+rd!pt`q&xsr4WO zOeG)xMgNXf#3T=9jdp%J*-^7GTK^v$WP$|tz}XMN?wht_N6Q9=41WL$V3M?hs9i@l zPT2U=O-ZOTd8=ofsI(fpDmnUHwOHwXk5|*|If`CS+$eN!WZR)9!zT^PGguQOv zj2dN#*T1E&>t=cmv>;dnAHFr#=h9|#bmHplon-Z+a%S5fq;6TI5uFX9EJ~gWKmFq= z0AtY^pb1*|mm)t>BZsog!uyIe4%^}ezTHpn!DxIM&J(?WQ+g0Co;(n!J>nH{=OKn- z!52^J*rK`k^{}D_Z1(=O4BE_A?M$)or`(sN@Ugzhy3L|-;lASJYPrBjkD&`uVZP~) zgkIf;HNp5Tndk*poM+8ZME!KiL6Z9^>p(bIwT9P1-OXvRitKFXWfkv_ej)fL{{B5ld2|Yc+}PH5}0|lhR5)Z&UEzB4;Hm^Gv-JK56`2Trk5S*r&3bZ4UW2W zK(Ey2Bnh3&XthUBW8B-B*vuUd|3j#C&XLSu+Wt1!??Z%ZK}a4%OVSep+yQvr`GNX!_*! zHJFN8Bnkqy{usZ@JfA1OeEMTY84@tbEc^OHysG1J2UQs$pW=QjqZd?pcqgX7<(B97 z$lJW<6}aMN?Y1wg=-J)jo2*V8aYU0VO0#{#tn|G8b-)aSPn0ELygO>mJ=Q{fa*?}3 z!LW6N-IPVUQ%3D&bXn^s*$AB#|7?IBMm^xNc<+w0c81~nc!M5zCyfaQG3P0mPbJ!> zLq^%ALW-1)|#Q>U1H|G2GV}_D})qDv|UXdMHD5YQgC5(^I%y zYg-4=Gws6EgN!d+YYfoV2W3@^B4sBZX(UlK@Gj`UdaB;b)^cpCwmK-8fX5sxZyu?U z)@;??`xfW%x=L!q77-hbN>kcR-~X#{^PrG)R+r$gzk;mhBH*!lMl@oY4ZXRwsp(aU zUFJMtFMpD1l(=rgh|S*BYUzk(nJKOzo0y7<vV}^BF6w>VX4hJBAw0n|Eq6=oRjRZTBLQx z>L}lh^#sqF%@289_}!(CbN(IrjpL0b>J3h#CljiQ$B%c^KZ$pAl*t5$l|=`MY%M;T z6x=c0y5Kn|EYRjO+F8fJv|I*6X^Bz`1<{qx_;89 zOTX+*q<#&aUTQ778wy2G8ALtMkZ_Fyc@4ZZ=+*#rPOvn}=e9EHIAaZ5QjSE~txrYF z{SgUhm#eUe5y#(?w-LIr9!-BKcaeOF(EOIGa!Qle8db?=JAo6Ip$^Rz^d%fJhgRC? zUGsOigQWE$u^i7uA+V3cI4G?xTF(J`tC;udkw*t~WzpiDeepGMG$*=F6XGR8k7Int zE}x+OWtun045sX24^P}rbq(&?d{&mD4u;G%t=*C^_{u$fpmytXo~c)N9=L`FVKlIr z5WP2?+93J*SU$uMsx^k#nCbI_HXIKoyrHHzzyAPx-S}=8=}H}o*F1>|*XeB*`+GfC z`^~S!q8SOdOIaG!z^=nv4miJJ{z)oRt|Msd0^FxWAh9cEhdW2*xvbV%Rl}&vM(B3R zd#ghq1~$cZLc5CAyt$+8PRgpD{r$VX2v~zON6iN`Eqq_YuU+OFkSC4a^#5NuTTuRH zi1?H1s(ct$h!0y^i#p&v)rBYE9l+c6A)o=G6IkwH+7^s^P}(E-l0l_ z;aHu_2g@EjSgf^TdUyRmWT5o8$Kgx?)FnWS6>@OI5L(;?d%v0m0R_D_{ zEHo!D4vxDC>x7bkKHoiUYr$G}55$DW->K3ar#$QO!xGfFyM;$Ck*Spfh-SB|+dy>3 zDL+;{<_Z%BAyxLURx691e3B-}l^E_Gl<46SZc+J6TjS*wB`=Pv8f)&a1a|;_1=Meq zL-_jTb8>`JbM{hTmpaL0tC7{$gK$LA$jV0&BU^amU;c1F zRBa+=W2uV8Enqi$Q+7*nG;Oxuk^HLQUpU!wKOZqO9~M9d`nK;hvW!_hTHWZVYo2+s z@p$QcW&_up8BXJu>$)I|(4cZdg9T0owcDRk;nuvb<{$8IjJq&I=-$=&5&AP&8!KjUg*fID*HXAY=l*I| zNAgH_i*ac-NO#UEDA&4%F}%sj9h^<0_JEbwR6M8?C(V@}$8**dL#pcdCJUy=TB%*> zVM+C&UY@kx$eWnq!Ii9v@AMyXu9|tM|88k(_DmDFW+%3iJa024yB(F5D#e+tJ4l7U zc7(HxbBzOxq1+T7NaK?0^b9irm^NcoyqVRoN;!z@-?(qf%Cju3G$-n5uFTxI6?ei2&y_>bk{N;Q1n!1pg9kvK&!kOu+DMzv zs}@S5y0M=qP@;3QpM7^}*!ZG{W*}@RZlGrQ^WX*hec>55u>O9K81|mQ!1*AVj^@(# zKkc2&DCv?U(pRramlEZaG`|Jz9v*qBWR&|2`?8V4GW2rgeo&CrsSXb|R3rz5frBt; zuE!Y@$uaFeTjWK#0Y0hRQ5moxyVdc!@{y^c%a%KgX7H09%1b>iCW1fH+%k_oL&LosG=e zWr3My(mSB>1zG*}^;T8k@y(mLMO0~i6!#;llGzl=%;*0&^Qf)x)|H({VU7cRGoFOt zd`e`A){xCJ!P|Ew*^_l1p9HiB;82)DBUR@wK5)i9V*R%x=4x{=RLQ0h1-ke<)5pec zHzxk!^wX2n*3mtdz}>m}p4AE?wZtFDZ`{tVS6&q#+H% z?fDGtA&kTxdMgB@?&d2#L{66zvH79l`6T2?WPNHo#&29Xn_#*VPCBc??Y3CiOMHfJ zD-Rd3cq$qpJ+|0sBw5nYW|g4)q5c&|oROaO<*>qaocUC=7gbsECWn&BaJM*V&LG^rcYfzT42mUMT;X0BcTUWSEx1?AxU0uBq zaV5`KI_i~S>_B1HuNl|)(7+Cyy0XpUt}Bs`=fz>GnnTySO>@0`vc~7nRl*-c7aafN{R_#t3w8v_4J4-#!?oE zzs^}U#60YJ;QdX|XEkoc$(DKTYwd{6^opNjphsGTfd9ql0+ytWaEia}7jE_ z$x_D-h@vOSf{VA1o7*3qQeWqNhp;g+tRp@#8*-;e++FR#i6;RFS%`-y*EYLQNG?S& z@&2@Kob?C4$Jh(?35cimL~S(k3>%QA5r?rT;gF*Jj9)D;hczdSK!f(Bwj1*NT7S#6b*&Vgo!SFJoV{x zgl-_1#gk9RVmWvG3EP?Vgw~mM48>}=;Fya^n=!jc{(1Q)?e3XX-+VFaXyDeEg1>K_ z5u`~mPd!1C^R{5z0`F{R{i*8<-IKGAYURPV7g`6rgXV_k2%Zu4st;GPu=U!3v~hTS*lN8ldOtPnRE17M+0@hShY@)( zLB@}V6ZA8$ezZfdTTm2o8rsar6Qj&~@STZDiNdi=yw+dvl5!0~cBkeCB`*ZELpzD5 z zM!0|yn0+wwJ3ZMoBM-Yp!-QdT*{zlCR+O5R#px8A|A7CG4+By`r}IHurtiz2+Ihcw z-8$DY-)X?cQ-$t*Wvn*N=|1%<7Iaxp9_cULH-W&)`pB6IEs6rO*;jZMk#9Apu&Nfh zm)rmM)M%s%mla@A*EqE8X8YH4?XeBCT`Tky8}ukE-Q6}0A%n?rc0Y#$M2SpwazxvecUC=^7VDEC zhZ)Gq2cs`km$_HN$($6cG>CEIA+IOkI_+43X+I(@!~oxXt2cXD{&_U-{I-;3kMmi9#fG$BHBL9nAOffb=Mur-yu7sO&axK`e!RyU|(u64v`9PeP8!t8>mc90#p z3!%K`7Nb*`x?tF}@=bvI+gp^(Hv^WggDH_27K)vmSs|=z_g(ut z)T6VIsRG|Q9&+^r(6wdg+k+)H*qFtt&Bo6~H)}SVxSTM)h2?5r$gMT+A(c2}L%ANf zYM?(CYFX(w%DiU6ei}K0>z`%f32RC~NUka&6tY48=;#?QT8$zlFD_2VI#0IJeU2hf zP$hWA6pc!$XJ%pRwMz}K(1OVDi zo$22(Q4On>M`|?9h4qzW-;&TnPw_0UT}`JQ34in4M#p07CyihaUIcQVUvWT|CH3I# zhi7F1lZ_&_^Ik3^!>TEkn@+}Pm;Wj11a-?ORZ{c$;%l^8dL44J;J%Z8VWbLdEs08)EqUd+)D z+bwGyo+diG?h67tyx@O344y_9hFv-Xxh<)ejoK=;j~S?q5=u|dgoMW#55^0n*$fDO zw?0keQYQ7H#X(f^gD7li10~027_Hg57N}zLUES_~a8noOA5Fmr&UkGH8wd0%xBYP&d|A}%`WV4t9Fcqq;mdS`&U#ilX zamZPFAtS^6sK)c!qTz1f`%Ys}^1R zC*1187}X_ZXc5QbpE0nse5}$z-d$203+yl)-K{AXpV{?EB#=L>-V77FIcVdiYRvF7hhWFw#h2tR$!ALA5yqKNIJ>ejHG@yUgw?S`Yj45%A@m+sqz z6m%la-M-Aj5=)!p^6YNt6#d!Z8uD2qE?M6Bi*ZQuM1SHTYO?gdnl-&fQ1vO7uHs5( zjGq&aCQ}l|FPgLy0OlCWf010<(UUJGeGps-4<)v9*FTKRRk3eUHZ78MuzE=zJ=v#6 z#>LPBEq6N8UqmL;4YX8Pf$IN6PJ4#GO`*7B&)$xNQX;ut^HksGm!a``WM9`j~1v zcs~%F1iVbKxu1E{$_^PC9$K&BGN>WP8I?r0Zk+}%E9k&{I1IGZ0E*B`-&0ZJJ5|6X z0on0&HxP9fyfHg|1DTd|o@jZ(KSfrTpU??-k$T0*?fN~3jt0y{c|Q8IlXdWpqA;ZjoB-fq5>o}E&6o3etz7Z%6(#cv>* zsJ+5{|J%*W+!?VKOM<0|&BZDXO)Du|c4NBKYgYlGyFs zf%8<&sZR~oKA%%TX`1U@pG>RoV*>RdRfmd4o}I|RVk=Orr*nu1^lY_ERHcu%rX<;9 zv8OakRv!BSxRn>SE<2!{mA>by2^d?AE#XG2evwjCFV$nZBIxOZU`fKs?DJ||;TTE3 z1`J}|&uzVTYl~(+G+NCBJX{w#!m*Ypb~Y$Sg}A?+u#F_~<*;FnCqjZ>L~SSW)K!r+ zE!Lso2rBd#8k6lQT}$nB;3 z=&S3YwNXgpRD#80?F@ID(Z>IrQ%vyucZc%1lR58&>pR7Y=D77PVa;3oWVONPFI?QqsGJLo@pOfgY4YLfW{GvPfTT>i8!lEyRtxtH@gB<))9N z%}iUz4|LM9#7*KZ#v$2uq>&8OmM`zjolO6CZE>=z9I;GXu8teH=-m;GL#+2cgDA)n zgt_2BOgMNdg7$^0~LBO!EOCORvQOKHqZiR7AzkO9)4e{eA3_;A~0k=^p{!Y_?z7# zW0m$|swC-rX|jyt9kQN6q!n>hBea8D+Uq0%Hc z?xo+hb)5sfn2{*Yg!o~Mosh*oNCB;{xO&Ch_F)6BdcA{XJuWakj-*>Jvl$q;@U&}> z{CuDJz%ir3KqDu(ihnCgB6D4vii;~cXp7-SNWn)Wk^l#ZACNS~c1z#sqH`M*H^CmW zP}ZJ}^k6OCJT|DlT=$a50^YTHdQ714*qs`JSz<~}L)gekbQ#0H`TWV?%%W6=G1N%< zF#FAl;g@pCUrc6}Ml^b&{bka3!`H+w3|!HUmLyn?(U$A}QG6_PkR1o`Dw9@nnqr`z z%0GX|k;(hCVJg!aU!RaA_-DZ9auqqZommmJvc{u0JDi6asO$U?=e?r#e!GFnnEnL@ zOi<_IZ3Tar^a}ugJE?l}$)|TKeO?$vnk{y_EZ@E0c3ntO$dYnbbal)#SD`wF><(BQALq?I{JlCTe8GEn0(H$rX;TJkCnRG zTU5$v(1BaKbE8$4w}L(BalP^5enja`VS1t9xIVjTKevqrDkLj-eoAcE5{r+&_SJLL zwA)wzYYO>k49!t=?#miJ;~6aE=*6o(a{|lDX!2QOQYpTylO1d637dimJK>7rVqs?OslKPFi@8hug~V}QPcDVq3t*|>`d%M z8TFwq8Go5Ay?pJHF1@hLR4c}tS+Jz=s|IszkyWeQDyZ09LsyQdS?*b(c>#R6S}{i)gDYl)|X(GP_)2_x&3(75Xuc@Sc$ny zp@`(6R@wA;wv)1ziaJrZ@rN-_dpoAMc;#~?Z8S4=dpx*bJ$q}wf?EBqke><9wlVaM z*=gfl>~%GZ&9fa{pWIGXdWKOsFh_zm?_tAXW(>Kvb}(3_yE^lm^?#E;rx3frTHj|t zi@3jg&P!=yf35bf&g!=mIj6Sd(TQ=sj8KivNS5ZPg(IK~uNCw*K%tq&G2Y$Zk$}+2 zP6=eFkHUn0Lw{*ZV|-u@=Sm(U^#XT)IVNZ)lI2`*L#oUB4}VME783R2Juxe^1xYV# zn(_^J(!qnb*ipe#Vl%Wj+6k?3(t*&%&2O{uz~-_QQeNNNVaP1fiqcoiI2oOFu>P>! z;S*91D!4P*!LsTU!x}(!Ddf*Om&~4PWbEgqI?m~tIFW+Z zux#}NIV7xevG>-DEQCy}ac{O93$qDnLViRGFEo;8HF8y$p0p{w<7c`oY%CICp8sC> ze@3>L>BYe;g#Bf#+BoK(gL35QApL)G8BfUA30FS`kuGB5t3 z%5_`|eD-Hz-Bj7{wApcIT12WUQqO_CsppE2vQCr-n=dQO+fOWgBvuW-!a(SBseNS2 zmUdnfO)=lC4=QbWY~CLY?x>E}^aANvRAo8_S-J1!7dRIZtlLY1=M6W*@o|mHQ|Sh} zxHvWZR|^^g+W$p`v1fX-K+^)pO8TzhH&w(=*lG!91Pi(y37Gv zLGj&|#PU(tQX;P@z5{nXljsM7&OZbY>(B^C*#gh_unGT+-HK_GDG|o%g#6TYnyq{4=8UAgSB!7!)hCoVX*rzmo zEE7VboHgszI+OkK26(7#ubVyf1d6Iwa;zf|r{B=Ef!9!Ppy?{7z35ii4nqokrkT8a<6?|6X~ zF1$OnOB~Vd+;SzG3YEXH3gg=aK54wtfB6t@LS+5=c;#?S2#*e(!BS}1JA^P%s=?2l zk&PuZJ2pC$l8)y+Zzbb2;r8u1-<7`+B5{{0;}b36e-A=7jhoGrL;AbMeDUd1UBitJ zFFS!g*GZETrL|LFuWg#9f9rbm4J$`l@76)1eNtSdhWtm=B6h#y%BrthtxdV1`WPqw zO12n9X0g_vb-->g1RKA}v0m*hJ=tdKDe5$FNifYF%K%K&gdKxz!)M|wR`W~Om+Fv} zrUk>d4@7j~z9kqzWL+GT9A7&clI?lT1HBw2?5RN`kwJ7_p-grVMsuv&5cu5{{xwOv zRP*cVOD;s*^3flbye9lkL!HLUOwRssJBOQvz9xkkfKa!C_h6YoLLmfSvX|=)w7dg! zhg$6gu9X@XGD?eEqVCcz7;7OqaYXEGMnP`&HzUP1!D zxX!PApnhEh3>EIcD<4H^pGY({z*wT4kWzwybs=g#F}9FJw$P+4nHp3u$t4D%CndpWfg&NpD2PA zY)-gQ%)A-G!+5QyU`Q_^$g8iEc=>_uN$`SUmlXahkmIkM0&2nIL0j7g_VL1SvCfUpf2-2FIGR|mG9I~6rmF-x-jR~k(Ti+o zb7S#NWv+kGi$HTF(HJZuF^|vMADwNY_hXkC#MNhwQgnuhFh?*Yz$0;hxvnryAe8|r z^Ukn3Bvh}C9=ct@7oU#2+(GC>v3Fuh8M2nbHE@2ldvv+J@q zLjS;`D`XKZi3jwI|8FwgSvY391N)rc9UTuPq8_x*xQ~ zns=988Q=6OQjzx)1JpwA1vNYW&qGRbpR5!wcM;CSJ#@Wn1&L;MGTdyFGu8yf7)>{{ zDRQap*wz!1Hm)%J14<@bNQH<#`~#%E?Ol;_c?)(&u=bjSvHnZVk2|rxL>~SHR|HF! zNHbB?WvaC>)s!JWAv}fsGkV|h0n&2ad@FHZM48{)#e9zG#|oz?zgA*`pdG&r;Bnl? z8|4A>dA7Z&@7dXOY*Jr>c5^DIMHH^4%?s~zciOtT=I!OyK1JNt6fQD`n>2_m{CPIw z>H-UztZHpI9>y)=Qc9&It5*!%3L6}kiXnnwnFGhM-5jZVk5(twVMWJ`kz_8*Ccaxi z-s^My#`>}3gA2viKq~d1!6u^K(6m=2j#bxo zvtzv##$YgiOdARm6Fo>Qwxf1*o+;^(1;FgNf2lUy&;CWK;Gl{uZoG! zHG;Rc({w6*Nm<)0lP=%{V$-wNFnbW%HG_;rB|5d zRmO1lC)bUr`YDKmk4qV{<&#gch8ru@MAyikgPKr%pal@lO}gAgt8jP|OwRF0g01Vr zH8)fQFE_@;d!2nPH5jV8bjCLV%fH zHgfm4$S-Fk9x`LySXp8v+WvlumfvwQ z5et+u2BN=zFdD3m@et@ZyqFYfA)edr@~ZfDWZ=Ucu4Umm)NLmD z7o4VV&NS?rcuqt$uMCG}(qwJ1NAN2RS23x8m4T|ddUyx>TK?YV@4$7{F;(Gct}@=G zk+_Fq@c;F(s<-PttC(YUpj#-L;GNR2YWhFU4Z62-oeYvkrpp~J=~CK*^j zO|1^;F3k&o4YR3v!(*%In0)SIKf~4HDf{iV3Eka0$CCQcO6ko1KZ51s&%pZ>mekdF z5$eTG(_XV9SnFvmk-1V=kK1!+0|NpEABO14Vct$z^~=*_JfDRxZlnZv$bZ~}7OY-F zzHkJR_SZs$JN00jUMf%hw{GVz%`yGcc=Cy*t^`bN2C`Ch87}ZpgGZ-f+kv{Tp+2RW zWc#DiBRk(u9u#~8*K#hGAY2sl<~$K`eVx@h9GU$&wutEJa%6EJ{fSeig%>f(kf&7 zuD_?AR2)3-MhGv?gf$j^^m7ea-THLqO8rDCvN{He2DW5T@@5 zH8Mh~Q!6fmVBJ4~C~rdI=CY|LlpF`bO!M_9SMGmDo-9WTYcr_U+X9|#dqUmS+Wyuc z?JmKdNz^pHcbR=7dbZtw!o?*y@LFtz^~?_C@9Uv%`2hL2?bU294T;)ynRV0TJWxG6 z!`Vv3Cv}mypCbPXbU7{dtSx0tde#-ZYLfgAR%)j8Fva@`tM!+%j!LUCxQn;h_y)rT zGJqUx5>%JG{!F=T)x2K(Y?Ld)lg<)m7tGAWGWYM^1*TSyL6_uo-bS9F{@l3Ww`svm z5&C3)^%qLAVO@RG2beROM{kZQtHbPCet51w{KBA-`bZbb*UTRi0=7td5{JJT8k^|r zrsjMPm3&8S9i=(dst0%!r zllmv)>x<971Km%#P96exml^wO-%Y2iRye?GMT9zd1w-Cl6T6=G3m#kH+-`Hwlse9A z4e?Mlfu21bdu)(qJ}6&uC|$qzxFPp-vq6MpHS6cR^So2lo@z}r;yF`Y2!g?LK) z#5;4~sRNZFja5?-uc&h&i^QMuHOIhczuCXX-|g1Cv3qRL-_8f+U} zd*p#jO>N&QgdJ8sSYfRHpO=&RUr|RnyR_rN@GO&rPNkAaIh1Wuqp<- zknSEZ+dNoZSVzKFRWdsY!hUkYTV6j&!gD^X(7xgAt$#aO{WlJs^hFeqQ_%47PzZnu2@*tvzp-{vWrHZTm&#r>MDCIgJYLeCpJ!EJ>t z;^M^Br^e|HVrus$Pc|?qWsJ6k`yHQ&vjH<;dSmS)O!86cd5e9ipR$*~q)+q;+XR!_ z-|~W*I@)pX;%xV;Jc+~bMEj_9j^NKX(1b1a@Z>VBF%c~E%)oo(uMzX9#cmx~kW|p>0TUKps$DVyaL*}? zk?2?3y|ZYCo%7LAqkC@2oQy$DyAe9jxsmCwk6%oLM);z^qp+F@O$S#)jgx%O-|;!! z(FTgL()X7rwIOf;ya$v9s;89HI64tQbc=PB5(Dc(|LtkD4RFw*G}IQ#+|;gB>~COb z(@3^7#R+pK)K#X9dddw{lbiE0yLe5np-95&_AA`^-lY#k2T9U# zC+E`qW#)(TG81?_|K$N2Kw7ibxp9n+27^$@mHBeBL#%3O03|rjQ`Hf&t%-;z#2A-}<#&ir-33*7 z^*AeU{F58^dT->E9rsN0A8Jj^1f29`C3-g!Ek9<(s}<7pT1$__QMV8cO?YP#;Vsej~zM-BMuagYQ z!f~nwKBsn^%P$UTg28fi0d5l7tQ&f~i6B8acl+hEe67cep^DD2n8SEbzzm&+`6obte!(l-TB4_w#Kjd+ zkhlKTIAOoi%_k;8Yxda!IR#g}oDIx{4mo`%T{HOe=Yb#`7M+=3LPEbxDNEpbKOIr#{dYmV1kl^GU2e zQT?}9S#39FCTQu$3QM7PX^<*V-{)_m*F;TXRUc1wFo|oU?IkVjaF%cc$Jgy?a_T(0 zsT0K=pZMgNxn-iG72~w+wjd~Pa49?-)_d;r(zzi0Ow!jL16ukIdCxt$lHt9tXX?U# zT=QkoORo^nD7!P9Aohh*Y_?6KJ>N59FP}W79%4RPOND7CgfRP!S_r9Q|kE(rQ)LhOrXJWxD^`QrBRJG8grDj!2{`ad$xlazkfz%mT1?E1IiVQQW)e}CltK+gX2J@<_%L+jA# z*N}&C()l`?dLFbJ(c7w_aX&$FK7%SIFw08_P)*OI96&>V@h0PlWBu7llseEynp_&+ z<}x=de{0$*Ry(AE%>C6|oHBRPK9ZxhX#N6O(qD7^MA*>bREbnMHFc6-dqeDTZGG!o z&leQcV;_ZYxSD$S^U4|1cqhyT+2p`VF%kt%53MR8tB(||79?-3_POS(J>5H3`AN!n zk%NgZp38$&DiQ&H;Vodr{Hy!9vD#m$N{<#YpBh<4f7&4uBo=UL75=EAiZ^UkqODX7zeQ0%L?+OEi$=nMeJlc+)_3 z-SfVuN0suFl(i>B@ZJu+u>4{9$!&iDg6f}jWVy&wv31)>L&Yy#vx8JTb(o$Ly>xW) ztl6V{_KV)aa6ebr3$!ZR)~#so-|4p=^bG4>>N(+BxUDOM z1b&511BHmuoqlUp**h)LH+C=Gsh1^d4ka(;SaC~$DD_Qb8U}Vw&NxQFD7x6XOw9t}3ZT|LgO?~AP?{e$J2 zJK$MU>lC1v7>7!tPiNb5R(wxoGVpS zQlo~kwfc2(tCD@;1vxb`Qr51&KBWa6@FXV+0TVPOEpps$uim(Z5-%!|T)Ubl3$qGc zIn%W12qN5pSS+2pe(^YdP}T~lZ8slyxlUAGz3ETX{W{rAFQ3w5F;jqC_FkmD56maf z7)Pu(JTXnd{)k&?j`JBj);TG~*e73d(>))$-FYAjpG;F}ktJ+U=){rQ-x+w{%P4fq zSK3KFGlEj@OVM^$mr;U^DNg!+K>FQa4Ld!8&DCD|ocs(wWbtdQ2 z-Ph?HQp881TZWtQpI@^b4%Hf@F*Q{V69mKKL715D+-#FcaS3 zy|QQ>n;P(3anx8jT5j|y#OBoeU3cCxj3W-E6dTPD^+qRZSALcPSmgU5j1b@}a7u3G zu4VBsoW^-Ci0LW=X=FhtI;y-+Q5}@1^Y`IfXvwCCp4Bx0+S>#ONocbP`b2@4TelHy zCxMjXZ4s_iQqCVvuqM_9wDLK0?Z=wW{7#R&_}E?z`pwp_(4E5doU>Ce!sQ_s(o4+d z*thO7vH<|WS1sqtL{|#W^LQU_YsT$}nxB*~wgz=Veei*UN!{2()*AdJAFDb(?@m4d z@qy6ONH^mA?zXmaf_2Z6m6yr`Dm&wIz=A!5mdFz~bU#eK5YM>C3u)96Gdo{)%Z6*H zDSrOh+ptp47t_UPdf36rwl>pxdXbKi2_;;{L(I_t%k9aS-}OzjH6xxQUgw9$%eq-* zxA;=uNk>U$yJSKm*_rY zOAUBODf}_9Qx6PST3y~f07)RXHKt#iG&1Zf=H#MeLTG_3VCzek(&7bMkym%GwQ^Ix z90A6knN{QlcmEV;yK>pe1m=ayD0es@G1)byMF`vnRq<;X^ZD|6PrPM#!ZaNgcB2%x z(0RM@C&Vo#W{>RCyE`nsREIx6Sa)9f{1dWw?dOs>gMLnlPt8IJg>7srwjG$^j`Cjh z#FT^Q|N2?WrUmuFbi%-B|C}kKgNI&5u6Y%boP>xs`pe@DZ;C1kUP3{8W_a2f6a?xA zde`hNg^}J0K!LI90KKtqJfUs#+?lQ;oEJgLDF(j8Z2U|Zw&{}^oWKKJ5tUcdh6-b# zM=i_CS~F?`lg)2qBqkx3cTE&L=<<3U{#OQ8oM+fdFoC~ne~hZVm`ZB*BrDxH5!g!$ zY_DOL@m@|cf+b(WCOvnc-2BfU5+(vfWRP4WHEyJjH$-;Eo6MWAEMco)uXNRR{=BM- zOpB5Dt$AjfGwxvm+O=HN@h6KFVfgWE8|v7RcqE-%B454g%Cu<|`MCt{yDEJ$T7fQi zaJe+@`o(iwO^I}%!GvT@SEjNxwdb*oM&M$;8x(ku7C;l_zLtoQD;Te&bRmGPae>sy z;`d6aQ8P|Bg_C}-lJPRov}nf6r_*?bDfbc5O-X=r(D_wg^G!BZj;jgQUznrSe1CLd zn^i~huz9}ZN9rt>Ykv=%3~9yTp$$CTwGOB9PVs1mE%7Zh(d`!|VQ-i3?h_ns+#j-R^w z{PmKYSW)*k9L7YWQrgc}=dq2l!I#!nCRLgo6Y#oB)rEgE&esc$Z|MN5Vnyqw*WnEQ z?fu|}{Nz{=%r~&i1`CpLQ=N~&LiC+ei;YD-aty!wc6OU57|CuN&mMNZLTH^4p3=2H zm4jwZJLtgLYR{e5M+Xz8E1Om?kEAM3H0}{lnVu}lH;-n2qK%F)%??>`f z=a!^+siX!)-=n@NKW}oMQ@sRl@^uv;Ckk9{-)=%R5Q|qktSD#JUixCc=b*s-#3aNUSyzmM$#?ep?iBNn;GWu>11Jhh?lo#2XR{*Wl@Ed^NsamlWh<4JLz$|t#z5vVt>+j%025Z5@|Y!SUwhm z^w9Yb5ATm6L`jLz?9idnU0g@+|L$Bp%56&Hw%oNqnjt3xG?_S=epgt__YEc&65zetu0rJrgUwLKDLKN zbX!Mp&gS)$EPc1sv7wEJ3VPXSx`~#SaR(iNL%B%yB3%R%prt+w;v{3r?iB~q14*t7V5?VZqn*Qs`pM?h$i%S{;ef6pb ziS<`-d)-LOO}0YrlaX<*%4@c}dSzEdtZ=OJs3i_YTD)#EAW zA6cdNTs&G$!S_dznM!B^Ow_c2tu)(#nFh6qfFtrUnZZ9b9O-u@KvGT%UVY_j~&$(!#y4>5m#o36gZK5M`HR>p30>>Zt->E+~iMa9`~~p zzM852onfM$!Wm)waw_-Yh)P}dcZag(oMAxE#^T~bw)T+A)1TX|9Zr|OlnzF$`CP`H z3}M@17TOxxWo`ssz1@_)>HyuMaU*2G7Xv`VuzAzGznrU4ITW31=)eybw@E%KCt=XT z=UQ1fmUl=&BP*<~SstR@K-2Ht2w#=x#+ZU1EAT{G= zp_xl>=<_cPUNlot8s?PW@P#z+iScgj*8x1cDEkaaQUkC2f*zYGy?pY zMuR$av=_4;GKp{pCJx5MX3Hiodl|R=8gR!sSQiMX_8gl)gMc_n4HP&~Y7Et2EUq3K zpa}W*(pkrpF0D`}^LG4)H(1{14O@}zf2Zozzk+ZZ*Zr`_zK^TEwsrK++)Q;CDQ*-? z$4hcqVuTG*d5ByI||AxGQR#>cbfmkL=%_8u6r=WJL_ zFJtMTeH|8|soPBg!)mC2C(VB!=a#bD*SAGhP<1Ns62?m0sLAa+>T7jyY2LZ^0Hpov z@<6u5rV;HrQUBuCwxJX~bLQwOl<@9P5doGxmh+M^EG(O*Fx7;&nH&NZ99udyd8Yvv`FwekJprS=k6y3Jm#kcW>WJVv zc`~Nv)i#LoLdprJWut%c#`a(E7-_1)m*z^#G?~VCbE6O+rce|)Ck^P8=KGf(C6D~N zsLR5dU|r_-Z#W0`eq^kuG3?b_FJgF)|BO4~H%vYt=a%{fvcj))GLhMp2<=$y%+gSu?V@gMqLeyvT%1j!PK zbmmd@l`3|DHo~3hQgq;&QIAUBraJY}MHXJ_D0^^F{o!Ka0q_^02>P+z9akG=&bCmN z1+H>fhjXw;5QeH_cb_|0;rY%8NCH&|c8kq^GgQrgzJiT__VYRyL4gJFteHKW+V-^# z@#b45X9!a2C=+S&pLjvYQtV~`6HT6|!DRfU&Y$j!lQzXZ0f1vn;rl;FR-+~rFZ}^n+cXQn2^aOa+Zvjm2D8tD2eeQK} znaj5cuk>t?@&`d9Sy$L4F?`BHrN7xHG9OwiVXcwDQ#c^F_u`F_{Wz{>_e*46ft_ZP6!G>nMn=w2lJVPEOn-n3_9#v!j} zA9a7)_Iu{xhLe7gmAlIPY91wZ>tI_O@EQ?%=F`hAoheHoO*_|gt_m6oJ`WbcQWjfP zUZOJ6VGZA?Iwn)e{2{oNR@tsrCa=&h-ZMd48VT!s9u>_dQcsx`=pf6KGWIlH9@3k`ZvQBup!FNr!Nk^`7d&)ho| zU?Oza2K7MIYy`Yjmr0+qB7}e`Q%a?jU#4!*&JABxXr_wTEpW_@qrewwx#eBUy(_zI zzDb#6;rt9YuD~-6+#(CrbV(3#xgUKkUhl6nrz9IlHH7b?2~;R%M8Z8 zFEa-7yS?6@@8j`%-2Zs^$9;P)=Q`K9u5$pYZqn37)C^aEc-uYEAPwa#(A^7pYzzul zp}ga1tGzCzXcWI!hY)FUk;y>MHiKr$+~jON85cJu`%4F@tITZDn;YdX9OG6Dga)eN zuj-x=$@ib}&PhYJF+e6!ZdM7aotm?-9%e!ISVgol8=QNK<*^Lc>44v{_O z3v86RI8`)s;^WLCIJ;0`dnUOd|2p2Yx&KbGE?LuY=7@dcyYte@0h6MyqEM_BZL88Q zRj3krH%tNBA`51b95mMZyGxVV6~<0~KRf;h7Fh*JEc=pY`o@)|Q`+-ZblkpkXms;; zs+Q6Xi;<_HZuYnd>s4a&=nwk6;0pVtg=qXuKKZSQ&X|Y}8_rkFmzvB)MtSV$p&TM)pS2g_ zDQOuIdvqNaBMj$SFR9k9hM`CAOOn#QROD`<-sxtkL3Y$5GO7HA?k!$c_iz_YJTymLSH%e2kq^{O{n_}y3 zG2!F9JG6dfE*1MTn0P}NB&f|AjIO(yQvcCE5)@h=vuQps`S8~8s*Tht1Omc^uB+b5 zcDnkypzuA8#;DSs*f#Mjoyk8hTZP8)i#!Ow6lh*{Bz`x}Nwg9AmZM1gvJSXt-PYX88jvX)jZd?}FCpMos)K|E4!s+q zPOv;M+xG}7QMdVp5*f*aJGteL-!@X@7iZ_~+oM~L#Kk-_W|&`@E1C=~Blh9#giyT$ zY^}%Mm9@l`{^9wFyoNgE;e5^Vx$gW2V!(TQ0i}P0OFXR`v|0<%(IAuAb>$n0H&pJe zoB{J2dFp`cY?4NVC19Lq71c+~h?Y*5^6yOreW6Y}Q{ti$o6Fl3bo6p+9-S~ks)u!d3lZJ9aiC#KqE6G$bNxlsV z6ta0eM%q!HzLa(3O(wB8o76v^&AGOKS{*))gJW_OeeIN8$24ApqkB2=84Hv*E#y6) zv*jOMa?ZC1_n?)(Y38Wp2<|nR%$7%(T9j#NhbVp(QN158z|MXz+FwmnTZ*fJc##_xPkX=zS1AqXs+r>%&17a& zN?LJ=u%oBW85rOiE+eE?P4vK}(vEo~FT_?6LLjklRp-RLr$=UjVc=aRp$7+9s>nt8 zFT^S9XRUhHsx=kKe^~VmxE%{seYEekwoDZ5OJ{f=^zO>M))}aS>0C>?P(U@qLLwf0oYV{DZa~#O{R-9F(?O>o-?6|Gt-7lCa4~sXn7$sga%wV#{ss{WSddQrR`g+^qzW+@^44qqlwq za+WV1=MiJrRdmFI^Xe9ESm>kW7IWky&dT zucrS>Nm~=4*V;a6W17|EzgIjk> zHOFmdbY?VKh5|InFYO{?Q>mW?9;Un($u>}^=M4gbzSPxzqRf+hO9NWA)d#;h#L^3~ zYeN8$HZs$<^Dj!3obub77(K%7?cY8}E|Ut8+Oq8uRSBq#wlr!F@Mu4Wn<#)t{F_nfD0*Y&W6N@LfRB(?| z1Ma?u2!6epc~rvmKJxptL?5&_EGxnKT1}T@NreGnmd5UxfxYI@nd><_WwzJCF7GxC zhBo!!PD)$q?|*-;%QsW<)1YV9WTC%p?zsKmo7`-1Hw*5K*=H|?_hZ{UG;k)mlXVlp z$IL1c0Q`6PW5q~=1WuY_U4K67M$(KDe>ag@vFE58=`mHd1S4kVmXB}cpaxSZe(GOZ zr46_u*A#tX=}&BsR58z-8gbrLFB@AHdcTLe!g6iL*Yd9Ka4{o?=htip;r-S!EBsy? z0pjDlzTsb}=ka9YN54Pg$=Ot=Ap5c(XSVJ~8kK(skAiN%K%QF8zB}WXb)trF#@?(H z0;J;X@@DoimKK2_{yQ~#Pqd4Fj`_f+H9D4ov7W+icm=y0$3Ie7 zbf!Yj>{?;#+QUDKIdMZ9;~3P6K}wYm!gXUUJ7L!={Bu&p?I7)4qsPUjqs1aZ#-vcG z5RznUuH!P_{n%>=9>59NJR<7>B$#9RwVkr!66_Cj=C6G}b4-B!V_9)?6sIA`CDwn> zIvNCv&^Fru8NWz4Bh+I4sje$Z%^Y4J3n6ijXGS7E>cYY<)vZOwmhS=lNWKI&BjgsZ z))VVR^f^SZ&(`nA$^xq8?-B)v3JGM<6XW5WE|Dy6alX8bo5qYnl5ipI){Mc7iI7DY zJi448`c&a$;{zPGvgqU|&2DOKfS;zA!7|yGf{PuKR-6S_8e;byJ%RScMa+`qF1tTY z7Tb*Bo~gU(BOYA(R-yIDErE_;+eh7%hG2WgSudj1NMfVYVkQzHEfkS4QqYz?W6o(J z-GJb3DO*A_zh!4^?|jTH?Dc1(xok)m&^{UPj61A;zJQxiihsd{GU(DhVVd)9TQ;IC zo`{*pm5FygC16o2}eVxl~|8 zjzX|TglB?TfKQLgu&~|o(?~1K^jjP55yLTh2A1vXR6>tJNzwHH+40HOR-b)Joa-aP z%KGm~J+ttXQVm+@j50W3SvVnp3+wO-Nq*b6yY%tDJQA7ss+vvNy`3W^M(Mok;}9vw zACox43a+c#a?r0CJvBvqv0*22=%1J4k**3BQDIKIB;9tK@CJK70du`ErTkXis-4Sz!djAFOVj6D8k{4iC89%1U7V zb*f@)EgxgUo_bW7m)*73i^6VjA@YE+LJT5EptEgm%(oX{@Kk3@J*N6M*-cF3=da2u z8S!s`uwC8&8+qwL$O32$t-WR(PXjpalxLkO-l)~Lz!_*13=$I3-uYGS@^!W$H}q%* z5{66F4jy$37399Pm-0GHm>3dn!sT|&3+d6obUiy=2Y&e@vN?(j?EFmE@Wy+wD0^0b znYc{WQ4I5q9mH!PJr&h6&(5Z3>7knN^=kL98lQ%0n!fKOk#)eB&E2X38f}EfD}`_5 z_Y3NwhaQV_=~X1y3&;*eM`&lOlO0@uhF15=F-#Ak704X^lhgTfyFI7I6&B&A*2-x| zi@FbY?mL|JPbca%KD@P;R=efTzTl9H(HJp5!;E}^-hszU3vk{mIuJX;Xc5drW5So% zHA@6Mby^Gem8W^)))i;G#Wfe9jeHu$TsBt&!#{*tzR0P`lK6@-Ain%jZn#UP7P`He zBtEP(5X#=qu4^uI5R!6H5IftsxvG<;SS$S*_XF4o!CK-$Ut?&mI( zv&|W>CVy=-^y|l*%`N+x>b33-4p@yY71}yU# zS#-hYsFOK0i!UmBIU1?f<4YvbLRjyJQ2(Cvr?Uk&ZkAT;Dmfl(-8pVHQp~rbD#r-o z8PD_GG2uUh#a=8Ee#@;Ql2RR=|-K4bhlx$NqnI`Z7A@~C5l2+cF{ ztYP+=-ZXpS&)QKBG9vpJnAN&{{oj&p3*e&X8+Dh#mBT`iscs1rK8Lo3Tf>@@hw18( zr5GiHpy8!~@nxeDN)TJ6>bAwRfTEy`&c>y*B$5S-s%w#$Uh3HUXPp{9{8%$1`ZlXW z>F+GM>(pnE7`VcD=lR>IlzMj?p|-hJ(bTrq_IqW>4|bT+{kLp@wqo?vC3X{K+dWY> zkB>@zC6Zsz#EXHFIa$eM*~MW+pRUs;d^}ofFLO^DpA~&NnS+)sv`<*D)@myMm>e2h z=KB8191#{e5zyO@L>r&oCW%-561%#|5JGG66d9~r!i^Tn>(s;ekku~gd?Bc#7&yJq}^b(#^%loVGRHw%~SfX+lK_XlUnCm<@zqId@c zY_W4`NKroUtQA`jYRM6#V(Mh(V7w%_2>yjRzYOxlfm1g!b2DYYcdGCXRLI<*)E@#B z*+OJZYvRC`2)`9Y7;y#mTr5H+L80N@^tI6>!UP~jczk3D2TDg7u)I;H_IR!NEDJN$ zZgxif!bq7!COEw!CbrL%l-$#(x`s3r+d)-Ay^*_#GCxlL2_{Ny)p4WlafGXshL!sT zrJrZkv#r7$rH_L81?E6*3=gyfH(QA(PZ5$EHs zm>!%x$satYBBSkm4PrlK4ifIBS`s6}@V50x?QoD_Ze&X#4B>@fN&=;+rM#MN%ncl= zx<_c)B^mnK!6V&YQIzSpr!K5iT>&SI2_Mug5vunVI@Vgyt^A{}4qlM21EzK1ILnDo zhE=_LItG*p-BubFUAISOHD8emipe&dac$t=z2D0EL*HjTIXEDdK3@a|ZaF*1hrRjb zL1%wA;*^)U+>EB*{`jI>5wEx2ipqweQp|{U2_cG z8h?0k$xKegrr6P=C}qpCild6^(!7H&P84(RuFYb~SGL?iAM5&hW>* zNO`eed%<6L`YL4i#z_ms+RbWTJTsDDC?4nOX)U#;u6@f0J0QYJL@oJTbQKN{<6SI+ zXBhhSa8c&$yx~gYUQ@xc^-9@QtCfK`xM%ekxXi^Ye)|l33Mr^cQ7fU?7Wk{TY)3uh z(^R5qp~b`u8hE)4q}Kh2qn#pf4iN)95K#dR({@}~Nor;33?YP=nqgb;hI?iHa_*u6 zX`1671hNWLfOXxlk$QE$>Yx~2>B?Ll%S(SEVRvILTuI}p%R@cM(ROORDG_h$FqwDt z>6PhEQaL9ff3g(#Vd(I@eqW3K3gvebZ5CoZ&t-6(l>rNh>RBrMZ4QtW(+dYR1Nx^7 znVm`l{Dq4cMPS?Y+mS zh``HS`iCQu8Is|v#H2VZ-QQDvU1SyS};vl?b-dOa#ofdzARr4OfUKPM!LW{ zNwZx97SiD}6Lmp8Kyp0IO|8JgB_fsF)BS$zJCX%UR*eqjQ4O{|NYwP$KeX7DJ|ZV zDA3^LbKDd%d`@4>-+1uO)!1QftVU?W#rwa+>Ne`s-0^1h>&hh+ZbBB_+-F@tx#9Eb zWv74NAS!k@kXGVWz2Qr33V*e@>S`p5|C^2IHttya z%oS)7F#z1?EQ0(C@NnlhW{I0>#*Yq&FYHfyMOJs`bH2*vMl*cZD7`IxX*RTzE&*Bg*tR_S;P^_-{ckk3fHgo*QNh~8I7tZQgkGEJs*jG z-QQZ?D0B-F#2RNTw3`nvF=s0E%>OY>!PhtM7l_7m)HI)A zBTJKW^_RbKO3jrU(a!~@sx)7LVVlnK%^e1u+q>yYqd-6Ipgq}f@om%XKdlP7_Bl0! z9JW?U?vv?K`;7%d=AmQf?)hcW=lUj|sg9f&^I9I9>OKHaSe>cg5!g%-^ zHD;5MsIWD!P_hxAZV{ibI=HzEWsq0A!!Er&44-&3a-8Msh!y&n8cXnb^WnGQw!_=T zMyd4VR@Fcr3V!fOvTrU}c`6XwUdf`^F*7e_vK!7>MlZWYQGSjF$XUeNy&B3G~ROjXVX{<&pI-CcafMFr%nS0TV}A@Y)%sG*0bY0xAR zmJW-X@Abd(q#7KQH+4z@=m4s4bp~srSnirO4{|+i{M-M>oYVZA?@LhBi3m3+)wSKL zfTmD~tis0^xul59BX+}O6N^#9p7+WNuJ3f_z9R{hcL}i;7pErVD(kv5SzG@1$JTqE zw+SFCKor>gKiKs;oDxzyDNzv*`_)-jER$*@QakxpeWG$Xo;n*n)&Tb2NtM-VimSV- z=>g}W#c&6&2%_$7?z21}lgSxwPy=r-n5cK4*QJ#a`KJ#nH>P+x!U^^cPH@lHQ1^P0 zI~yo6RH@ujXXPzke=voTUU{KlAFQWDd;9bACO@MH0b%rhnw`ohOt@gB(q#F6@ez>b zvU*)WBjld(#ecWF#N>{+zma&V1BHHe(^)$inBKSUC7ay**ALy4Wc)ad{JZ%^!yhnvPso}Iw~JadX!V=qC^K#eG%#%(YF?b3H}|#`SEtgnrCuh? zxAmVBL80JKcdLG)X|WQ%&lqftM`^>$i9!! z2M;5S7V=JjEZ2&g{Uiu(e@tLY@r=Kg;u=eo#!!9MGHEU>$a4*(wh}6OGJ(~>4o4kvIx5Yp~>8S7rDi>!sc}aQcy`SAvJDhqGIT0`}bIoUmHb zy4~Z{F&oyh#luK1-ZuVpgRv{V;+=?Qo@xG0z*#&MzHg7)zZ{9Fv@_jxkf^EZy&C#P zR2u!4^DmTDYz!aZ%a_e=kp)fv0bh=0j73qCy>#M9Z6JB;!RT9U{Tgc_;YNsNIhVd` zg;v$WVM3r(`#2@*T0R@qmG@#dh|BO)(09l`%)&}<$d@s`R#KobV z_{8u1zs;a2Dy*D+Mq#H6Q2vn3|03tpj8NdbX!y=$G-p|oMrTp1p(!S9_9A?Sp0Xbn%mxy)a*Ct2!@HO8633EKuU#h1|r;8 z^x)d%Izy1xHIV^KgW?U$Sx6wy#*8b?HIsr=OscenL|WqTJWW3f+{L_fPE;L*dqV-t z<+5|Kx?1W~gmuL9`5Smkw^Ij=UB+ACr;yUb%NySSlHrR;(d6GJpVxW(FR)v7TfiX< z2xBT{7ac`C{d%pc8!0O`#xDiRpfUa^Pae5XKVeHN&|isj^}Yl&M^X*XD!=3Vr29=9 zjDLW|_Q-)aTFDwF?vCx_;LHbhkBJc^jqXM0;Nx9DOECVfjTVY_)E%fiK*)qYP>~}U zAL}~<8A>4${S9vqs2D~V17)ma(<4izkn!;m->=FKeO^~BnAdhs^3&8ad77$j_yo!I ziMc0P?4vs}3M+1Hh`lp8amnm+Q60TDofDsV81x^N=f>F5WHwvwi{6)d*jLT`i7^Kq z$G)Q2)*LqmdSO1er`E`sHWxH2rC*$cG61?Fcx3EY&J0@0XDSS z8^n7S{?nfs* zbyfc0@w3$KOx+H&c9M-HPG6*RKO(IjHHYU1&S2w+CGSBS%27#W$i3{DW{D>8_p$J~ z8Gh(byK0I)y7-U7Q-uL#&E!c<4M2UbuQD!WTukO0#7Z?@ISJ#JU!(^qtd@E4jk}YU zDt6LAW3xQBh9`hcsdARL47HfKZ1>@HmSy%+Y;Jr{I6nG^Vj@E(Te{ot;7IfE{N$-J!dQ-271)X7^2g=6}jL_->@UTJoOKvr1f}jvr!Dd)*;m_WJ8cb~g4?3M#iJ zP!>um88WU~@C>gA6IdsB&9*RFf;X|gX)`gDES?malRsa$X)OM8nWJj=0P0~pPxam9 z`YMo3$mwHMoWkh|Z(Nx$Iap}n6E)*9fwC!7mRSqGu&TLe5r1*!$);mdW4=ksg(m)M z(EZJx7IF&Mz(}QyB4Rh-{>3~}aU)=V#veo~M}1fx>6|+sS%O4*&sgq(FlVjE!}9Vg zl(+E78LMa%E8zD8(L+08uv8)U?soW<7X1p(92AROxYmG%Xh0)_HAR~C>AM-USt>6) zr^X=f-8MXeT1hl;53*%_9&x|*W-Z0zEQ#!D=lzDei~moO5YiNSa$%`il4+6hMQtn1 zV9hhzgE#iiCq2p5rs0e|v9OR#v^8S=_G1YRP9M9ai2_sy!u5bJzwsBf{sQb6e^f$o`tbZOSj8B-qNmJzTxIV}QW!_;G#Hb1~z+wRC*)1{YD?joyQz>I)rO^$9kA6=`iNp$d+=@QgPWKW|1j)R&(b zuXwRozfl251>`5~w03x_O(vqg-^YYW-?@^Xrj%e+lCzN3#Tw1=nHJR7kBX!JYqjjng2}T9+Ko7>ZN=)ZX zhP*ePi5oyQoSd}aV+7yzm;n}UzV!iZY`Mb|D5B;4p3$3YPwvL}MPB2oH1r;8-cXs{ zog|EuIt`e}P+n-Bg@0DG;xK$J3vY#Bb~N}PgL0@mIr8G~%A}}9bRZYF%J3g5pz}HS zhT~8<1*kppsPvf;LZ6T$J>l8XVx{`xhWnk;{@bz+n@L%7&0JfGtaCNlt5*#VH(Xhv z{SCgBQGv;}mM6kTZOf+Ig~BAx4~Zr7qkr`!6>g2MgOA?gX3G+^(S`qkB5i2bT9l8S z{eTg+YA7NbhM~vUN1tTSI;Vq^Y$Lf)Edy8}P z7i|VhvKSlN797Wqi{XjKcfKm#OM!fnU28jl8oCBXVl)o^-L|ikypY}|?(`)2`X37=-sF*c^DFs5<|&woJuB@KZ#FZ+SOQ1 z)T#YL#iB1-^&0sFl^j(%2{^Re{vDm^8xXrKJDz{{$138d6RcW>L7LatGPidGM6YR^ z>KF6tuI_;bHnhx;Qq)8%dp(SCzuV$$h~KdiNgz&`8xQ3sdjYbgSt(&QCB>#7HcCkL zMed8M0GWNM-sM2tdl4Z0MiE}ZU}?}O-`2}@A_$OB-sCmUJ6f2!|5$!v&~0q~{hhb5 z#^a9`r==#7jh*_E?W{g-AYAQr->H=Ytb$ox^;|Mb8I|Rv3CY*pl}?hxpMSnAI!EOUc)(yr#{k}O7qvejvbXHSt3Ky|~^+Vu2Mqqz*(mw_T%p2Gow)1dlNRr55 z1PYcdPnea?zW$;I#?qhDs?H&A%Ij{17nuczGvFh<*cKfyYvASI8zb?UD-pFzNf6ie z9m4F`;=rT}zFTG%UHWs>^M&uW_XS^DC8})oq{_#Z`KBoq7<0EVYP{=V z|8_l>hsI{`yy+~W-qoLf&}ZlqzjH3g@=JNdpQwjsw^w+_e{^p&!RS||62;3dj0>s| zOZ0*3t>1jtj%Yb+%r>9E^UcFM!QdxM@7aYQqs(U?*DsdaAGsp=7V%~!`Tc2wSyUG3SE6@e!m2JXhz zLWQd20+DLkUr0s(YV-Qj)hmzN_`$a18xdd_(vW!H4&U&e5~=N4Mz&e?Xayqs%iL>f&EyZdS`M#*+AeQ(>& z!t!%>?{^3Ih%^;R_8hutB;0*9l^)yCvKgnJ@SV?@5jBexqGatMWLBKc!a?vz{@;4| zc!cq`f$&IHfBBRouX)x{B#{3z&#&S;hjV^L_UdokCbiU*TzEd16ATexCC`LmJ* z0SY@9{RrVq{Rwz3Is@e67K#8Xhw1^H8Z*A%z1Gq|*e_b-X4~ENu=LkXJ(wCQx#&b! z)Xa8vpq9~V*3|V%0C)P48<+SR!`Bu@_3{?PZq0laLL`Y`^bkpivO_TV{mECQs$50u z@VEJ}is{iG+ip7t+q3y|+5UG6x8!!rQoD`+`R58RSA^bkx@nZGQ*jHKU=(7PXfs3a zLziVjkC*uoA1?_&LZ1Dhb~^MHxlc3*GL*XP=H51By?`g7bK)=D`yAv_aqZO?bVGq| zR@0~Y{=U~Oz+aXzvmV&5tOv8;8EgrvxGxW&d6eZ6q5bv2u9oRzeI0WN7D;0-f8Xli z-QX_T-C~*WkSvPH1KB;}@tz9J@jD&z<4G!v7_i4AtzxDrPnM~r^3p?BL8bUCE0o!T z+8bIH%bD`#e`n~S!>6I9`CjwOi16yFZUN%4)%vDo&|hil&0i*8O}<+ADHm3Cof!7@ zUZNII7k|38}0t z7KUo0e9Ka6(^Ai^`Lqa-PruF{)B9xVzt^N!F_QZ-MPmWSiZ$La{gJua3*sv>Nm{R0 z%O-)wy}Wl=B-S2D)CW?2AIPD#BCBkm<%bY(6_Fy@ejaw94GmvsmXA}|{v zYx0;HWhEwOiC99_AS>4WjGEd}a8qaqJ~I=IZw|P|?J}XY#OES}rA-@)W+3fwcmbH4tKC0}3S$x9o<8%P|;wes14&9U-$Hc%jXLpOG znx#wF#wQy*`Ptpt@>0w2Cz0jk?NJECZKu#8JM!iL*|5dzFebzN209OrI5+27K*Z7d zVSj4idLR-zfM>oenwcAth@SAlzT zziMy2O|F<0(y< z-UNB)mV&TH5GN?1_sVpWR}fsKL3^8zUmPwCS78m;UP!EX6HGBTh1A_$)K#P&89!2> zS-><>LT4z9eLO#d2l|SPe8Y_cIoOcg^jcL=J(iV5I^8fPu zB$e#cvC?}p#yboqNVoW%cS#$DMK5Xz7v=8#N{V?rp#KbhhVL?_w+qto7Q%IOtBX~M zT2el%@anc4m}BGmhZp)bzdp1+@YQnZLamIcGSZ>D=`B1f2N-$vWhQH3Y>aHh%wJv2 zOjYS@>rgcsF|HU{R2I{g?xK~s&2tJnIA6o!x}P?v(N0?38{nj0dlPZq-|!y-0w^io z0l_>t zh?J~z)8<;;8EL%;A?15sd&z_=_TpRIY!+T(J>*4lk^SFwLCl<;Js?(t$g~VzfR<#I z+!>MH{TZvA$)h>$yf=A&(<^LYb$9C99v;?cCcau@YP~qQyzyg!dm?0E5S&1pBDJ5- ztJa;ve;5DNS7RB8x7Bn^g~OaE5#%4j1G9bJPD9*B3Rn*FujE3$alG)LgkRLeL_EEx z^iglUx9oQBQ5?r-j>QR%P3#^#`#!wCT6hX?e!XP8qY`b+nu6muSLVmcn(t=?zT*~) zaD#t5R&VuiJDJ^)Tp@R;Sh<%>tVrS1Qb3RCmuad22iovp%Fym$>^F3|X&Q3m?@P(o z;nf)wBguhKrX^{OM}hf3CuEuX6kt;vrq^75v!40P5zI!*A|t$Zgt?4BZVJ{DQe7=e zm~!cC9y36ul5Xw?SQJXheFqtDA$D;jo*ehoj>v?Zrw!mk6sOX9r-F!>EI3FFAV(Tk+uezMy4Urkb(MD<)L zJ;~i~0241l+Ng~Q(^qle#ZeZ^B>&7*KVC3@R&X@Q8F>(N$I$>vYZOXWT+@IORrxdd2WBdFR$cfaUlrY+4?6N#`Gf#>}5D zoY{O=cCdvHgjrLt^Z^}uTXq5RjHFbL>0CGR1L2;^L09Ag<`%F^$c$rbLoS4xSHAy- zO&tk3aS_AAG(^aBqn0fTC^BGxPiCce?$?G3{)P?@v5Og2h^^| zXMC!)Or*nfB14_gkog-311$Av#?U*3RnNiWqt)C{9sb*x-uBrjS(DZ zGh@4FMLFOy5^Zij@;BAif2@~Ze$Z0e5{N86>m@z`u(F~_W&7yVzc~6qS4_vLc(thT z`U{NJbj>%L8rQRqywc%{R4IkBMzIgOgtE9TWr8_~nVGgGdkqukQr^-JR=HU})rQXd z9*GBgyv|Dxmvss@Au#!NcSc?DM2(ePXc^f=Yt&-JsB7J1jKzR zqdv4^5s(iYK5;;gfw@~&ckrq7bba|cMdh*x@Era#*NjoouQ$svo%Fv^tEey_xAkbx zvSp`;_FPOJsPmIGY`%=xcwKh}27J%zDKl#Xm_;jA%qrRKsM58haF6eDTUx)`>WIOL z#8Ja1uPF<&K>;i{1D#54-3xOY|5o9eCqlwwm`W?agn~0Q>g;EIqcDE)yf3yHK~m&@ zD^aXa@5(oXRm147zrhTw8V7nX8qky@+)8BSr}1QC`5k(2{f#l^hhuTSMYsq+0rT*I zow(~XHB)o8lk<=6oXcZeUGF!iJk@YVc<@G2eraFB#&7fDV3dJiwfeKeDo()IL;2|s zmBByak}{8G9>wsQGl?vm;)(el8fxS*)_HGmYTb_-!~9Kn`BpVQD>S(Mgt}S?*8bYV zp3_tY_Flc^*wIP)M?n!>@THhi=fkBDPT{bP0L4p` zrD9(s#fITRyS-zNGHRqpHH&bgki%;50FVIEpdiH{t@|T+XQpGmH>379JFR0%? z19N)+$gV-L5P+H%W3km}5v_)9xrmuADJEkyE!Q6fJ9OeFOFSbgxh<0hzbm?4f)+_- zB8W+&f2l#C4TTB{81HuYe^-HKlsRNElAkY{Jxy8%n3uT4!S$&5dr0TS*f4HWkviR8$ zw0bibb(&qz!ydM(Wko2+=AS!hXf;q2;Fn&h_p;HDOJSPH95omaGsl@s^EI+0T#JGOlN}$=BuzSw;@Y@{h10 zxcRrYJZ9Rz1h&$z?WAC`Yu`>g51_y2tvVxCk`p@)n(*&>y(@(s(9v|e>udj3r-wR( zg6CFRc|^`aUDnGZl0!sIL8R*zoKV-0EI84*JL-fa5D&FXzxs&l8424wl5aPuaW@@u z`kq@YCx<(#@U8n+({BLIulw!Cq^2w%+!vBJ zn~w%g2gXE@{F2jDdNm58u>Vk7&%mnELy~6aOuoh7z_#83 z-m3-QUuaDMTiAarZ_5u{wHB{SgG7Nb{%bm5C{01txpMNmUH+IT%M*QEOpn||g{spB0y zoo@q?bRMg0fTkNRJUTi&v~TD$loN$)}IE0OPENAf|lnX#)xnL?WL$cDke5a zyaJNE9Tb*^N+>WoXcBu##@$}%9JsXjz6oi05c(T@|3#%pqigcb=gYb-6WiJ)V*eC4 z38I^uwOuB)T1oo8Aq(-u^MXZy+Trj;ro{isr%u_tq7UBr;OT6+vl*c<PWr#z_yX zUO`qVR{iLxlSOKu1R7mff4$#$7{`Ib@ZD@8_O~x|$ai1E;^e-}@SXhf>%+t+(qqX?yPO<_Mr2*Y)77 zL@(lGUA>iQfduK-KCbLAy5|?x?2{@CMaG~%w^5vXQ&c4h!6I8_?o^=R6bz*tMJ4++-jAaxdbm&rK4N-Vg znf|KdwociF5nf@BYPW-be-myVW1eJ&zIIQghR(YPmM?j?OMnkh`Tk_-#f~smtL`^9LoOIjwi8njD(a)x)4?KFqKJ=ZjuYhy>!Dd`4;yN98{c1P zjKukYhg<8^_hJp@Bxs`oxg9mO7vfMv$vg<3?;CM9C+T~;fv zd0d(+#|2Bv0>p+7@B%%?d3yuQ(FlwjiC0-I_Y5H@(92?7Tfvn zE$p?jw$G6&VyQ&O!&2bAXJgS-|6!Gh+WeXl%pQEFe-!R(H0Qy}i)6te&Q(%&;~g<* zKsngSz1&@TSs{KA?=ksr8OM+2wO3-pYmG}V7rWx-S2hA2@IJU+VWOP@ zGoa@MaT)qt&VjME#kXeNWdEz#;bZrf4qkY-4atkXK!+wt?#&ESzok(8ax_+jHijqJ zfr8~nCD{>ifbDjW^qu?P2U*iht=pgng`shtlk1Q9JZZg&?zLs*(dXUmweh)@?ANUT zQINs)@pCiSIeDkCJlsbFv(cdUv_fhRj-PUl6xlpKcc=o9_sdczw}5^JS~>8Oob#{TI^;j*+VFlVMIlC24fk9O0w^i zwUQ)zwiz^IAM40cc4HqJV~pJlGrza`Jm25z{=+}%^}65gbIx_HbIx@l+Hd>bDDir9 zMHQ_0+BaPYuF4GxC11I~M>)*{FeZ!G*=Z9Yw5nbT#{pGGcv8cDqyi|NC{E`cK)HaQ zYp~$a5S~RfBO0Tqxg`kB=Hn?uFYhDCAtgpJ(H>b_GD3ne6ML~1b&n$y%8VoUQ`_Px zJD&bgr>Go|?ORklD||R`N^~H9_TWu^tBFN&r(QTvF1Pl3An{`) znqqgXPQI@?cYCPqt!P+NBz0aps3Kfy9|TMuEUv$>M*domZ$y2_*eRDt^Xr_{eBfGY z2PLLWX_A(R5*7MdtKvEc$p3AU60f2c*v~a=-8z zmtW7nbv5RALxF)588lG5EJHfE7M86GjkQaTWzSx-N+n{9W0^_EFYeS=EdTPgd2Mz0 z(SMP#owF`zQ(}C5iuI$GAYSx=D~Zdhu~rWI05Pk0SJ|o=;A-&3JmZCau!!g?Qmrp- zdMuVTC+iE;s9NCj>t#^-t;^Z#Zh>S=%)pK1UF+$l-($q@*2v8@r%V?rBbs`uxZt{L zE!JUpNTdy_1_TnWEhDzz+9a5oC%Obs_{n9Pkt*GSF+b=B6+2y&fw0eeu@}>Sl&iLg zhxG;9QH9(X!4iq&SZa~!HgwuQ5#`aMO|7|le0aigw$*n>6z?+F4n)wV^uz})T5!?} z?E`j-GjHyPn*8sED_8DM*3ZRWl;{Z@EAE&{rr&ldE?lg6AK-E&`zlZi0I2Z$AQnq2 z3~zAS#Lz2MQn(l?ErtLZ&2mVydD%h0+FwOeyB_Lvi+Hk73^HqUL!cTUiQB2nWh!C( z$TK^v#iSlQCsoeF;MWt0%}%Q+C+;u^PTmjD{DL!%i~a!j53Y!crjCe?gUZH^tJPgf z))!Dx2vp*Jy|mUK`3HhNVXvCzmcGGT6ku&Qcj_68XsSt2-$Q=8(k0aA>5`7+E zbMI&M=NTa;hfo#S^u?aqT{|i3l4GHyVw2a?Dml=XCnkylXwwzk9-zlKfrQSew(3x_ zy!rBnU|$USjds8n9j4P_m|Z7xRPB`>t$uK3T}M zAWl$TsqePRSB6!X*fBLdkB=a3K;~FLkfP}+)7_o_^RTg;_6HI zakjkqL#yMgv%8p|r%&^g{%53Qmz_ef+u)+_jFg$mJ{P)wEb7?WV_DTK?rPuLnqDRB zui?=AOXij%bB7ob5N03FDMW8(z9W|ms5__GElhr!G2!U8&Y&vMVw4f@K&&-rG5L15 zrY|wnG`k1>5yC>Uw69LNyo2J!dp|NphLX8Z?7q7l>rz*jAbK;5V6sx}vKmZ}_+3-UnGXTmd!Ot$dIM#1SrL5)Mpa_h8^vP>~Q zu;+=f7?moq8hr5ixivnTgQ~gzdS{G9)bLv?AipcD5cdFx5`ZdsX&$18+9cMzwBDFu zP2GN{fPPd)TYB zQQY3>m&z!n1ENhJXlGi5`AR5I=B?;F{Y-fYz{a(zDG#t44M7f~C6?t@k5jIR;AAsh z@U_gLgoX9FD)MUHcJmaX_K$}N=R|ra9*lWKpD!H98#CD*$iTF#)^m+}2W;6eN|g!n zR`b9hi$Mjj2{cw=S4bAMj>+sd^;oZ@cqXQ!M$LruPr$DmZ3GqzE8>F1DWJ2c@VX;3jph+KSJWb$W zU*1w%MvU$JDJkigPqu@YgT8I!ZdWuoY5Rz=&=-vh^?<;K`x05B}uC$Y_H7K{S>F{sO!a4NRQc~FfE&zqXb{h+_j4#IW!;+GS%8bfz(9~-+w+tRf)n_F+; z2fF7(Eknlg((BHF^DxUoi{&8hrFzLA*X5;u(#kFoZ%bsO<=@pIR$9)!S<|biHGcW) zvgmzh=t5kb@iapDb>g&YmCXLIk<3%M%#^>-qK-4ekK|VS(!WZj+QXmhziRfoQM4y( z>lIhn1AtSU9dplpvNWdLtYruaV(#uNMT7WN+TNNg>96N50TE5(@?e&FKmuxyw5J48 z3!SpmldW-+>2Lqa$k{qGQ5mpU4il@c-pu)+@VYWn64!9=aJterDYj!E?dvU84G?4N%_6Rwu9Q6JEqvv zTE&<6r&@=ihk(D6R>z}+zjsmdJf*GpWYi(8{FuCsho=f{ znPc>iGGJNy=VOI`aJdcn^7~j8s8(su8a`eCl)8{lST#R%tem5cxj6tSZggu}2E@~0 zl{RJm$ma7-^!>U9K;SBec&a|OPq|pNhxR2eXjjg&bnk_>3KtWMIii?szqLG`2-=Nx(s>pbJ3$-$4V==G~_ybxeKg9$Exj~s&AJfk!s(HuLZitTtBJf!oefF zs#y*a-rJk# z8dA8zpG#mn5$Ut!-v-+0HA8ltpxnRPY_fST>wZ_C1@IcZ7WHiYI>IK?kP_Ac&dXd2 z=t1ePA<^Ye_z}kNtURLN`T^HMv^)Z&f^CadLh2%c0YUQY;YbLR#D8@`$M&Ppswxah zs^#W6CJBWw5lcg5gxdO*u-P%5hqOcS`Bvhg`7Z|^Xve5tKesc8VIAMV(+R#MRy9AC z6tNJrVF%FJ6SeNL;D6btEj!{&WW1oVLNTDSBr?ajR3idDIEgwqWd0Vr>IeU-anIO(YM^<*RR0|(j|=x%5(>{yJ1MY?r;hU#mJ z>;AbU;O_}V_3d!nZ*JEvJc}V~STp>(Xq0!Z-?cG2Ba3-2(>06k`ragHd%N_^8=yF) z7JExOfy0kcWoCok(TpLBw710RZ`EdX#5ca#nb^XHjl>7a3x5>M*UvmXFWqYj%N}w3B%X~%3^a#gM-t~gKSTVb5zhd2JwNP=qtIg$B z`9T?H#?PmQ1*4GPS6}>1?oC1}A58w-VlrmmIc*LxZzk7J0VL99v3Xlm(eXROZR-a} z2vW6*XW5z8+|rkcmq<@n{$v-=>Vz>p8zDSxBz}d3HUX&&ar(#Oa;Z|QPgM~_Y+xca zXscE@jUfuMoeeIzkd8>QP0*B0<(p~^N~xS70otiy}QoL%Y_>k}qxvqQDG`-LRK#VH00Bd?`NP_^9BjDu-*59b78L!uI2Ftc>T9Y^lskssH)UBu-~6TS?{~$yFi{#ERuV zH{Lc^#5LXw30UmLK*z4=e$+mR1;2|pxK_8Iqh#C)Vns4FovqHbi1SkUO(e(Vr(pq< zN|kEX5h1Lw6x@iDE}L6Z+voMuWax)po^2!KVBO~Mdgga*U~^zGk2mC3PnA|owBYn} z$U_9-12__QfAVob{g`v>T5xf~gE1Sh8LnWj};Wc!)5l>e^-V`Q?r}R zZQb1f;p`gXpk%2or>=Ky?f{kmbNTgpd3 zM;5h*>sI(V`J&TDIxjL-P7fHt5Zm?qQ2%hI_2|)<(*(9(5_r!=p8O2$7@;#r#lfAx z867%Z7U+B z*EnXbMX9=dYDjB;2SCo8O#5GC@8iR64H1+xTvGc4_uE2Z-z5*fh-EoV)`ZyW79COC zmMmtdZMH^lYERN-9qGu~QxdY<(8d$veZRnW<1~axX|Z)!V+ z5NNT-(Ds#DOV+n1x$X}447tUL{&Fu$!cqjcLMwfs3CRFl7~mDy<*MJ_LuHphL0|1> zKhJjnEp&(zC|?og#0P%9aBKc*H<@t~y@noSvkIuH@^pQ^d}zON17LSI_RWbp0Js(J z9f4==qqc^p7rur{uFy0`F@2d~BFf5)mptIN zW3_`=23gIuE)LK;n}dtcFFWW@U-;^+ANA^od$HT`*H9aRt?5WgnYdv-&30 zw%4rYw3Z@f&wEz&X}s3RC$(R~ZRT=V%l@Ik{jE^y7R6*0s@lJ__cz%t96fpNAe-17 zllONbQZDJON~K74#Oeg;_z3BD*mcBTfA>zWCGoyVvhK5s?{-8_)n4YoXDNkWzIJ0y zY%c1QL|JCXldHx;EuLZ{d>a>96px-1yY=rm_PFNAPgh8)QAo=Jo0(ox|IHxY60dH(;Zstp z{0#Qs#3-(Qv};}}&Y1g3fNbi_FhzrSv95I4Jfz#W@QyiVOxanSPMDu1zVkLKHGBW( zOg0wPM|0rDpuZt7gl0gYn=8oULs^3O5vqVtjgL9pbIl=iR`BZ=JAFdU9x+TVX!#&V z_Gn)ye)D%hB9E%9k7;F`l7~HwCVFEY=&<-6Y57|f>*id0S*BsOfX4)BSfHMa5{FQ(I#aKlh|}P@xFc0&7%4p^N>yc0}3Fd!kMktEBY70;rXp< zgN?p28{|^*Oquk8iZJfL%Ic!(fnCh=qhW&DXDM%0=sDl-2SvfQeAJHr+6yKhaAJ4- zb5ioyOsiS2Yh+~)Kf1xUSEDQtj#fC)tCM<&yr=74IXds zxOMG`Hpnj&&w;(v9+E`#Cb>D{UM==#Gb=Q{TSqJ&b;^~Vy)HCO@DG!&wvcTRKr~gl z^Pd{MMXu_+KhPetq?-B<}xtHcUerUI7s^ty z+dYdXmHZ6q{5;6%=`*RJ{L$C;q^JEZt!L=g_+FZi@#zxU>&*&-NL>V0nb%?uluAD> z)ct!eLJ6m{Dic~x1)P5P_V7F}vorUjdV$cMX=WP_D8Q`uPr-m z!}g%5&?!V9ulb{)BP3wj1T4oBlvL|uKzwlq&+9VR_E>%^NxdSfAuNMabeM zkv6$Kj}MJ=*AyG7qVQ$f9E(36O5Kxkr#+ZV5H-r>2prz7X{dB4x7%d@PYYo8h28w& z^3{#Y3GK<7Nskui^!T^GLC_}C!5g+JarV`6%uyBz$!w3l9(Mc~ecJmc{{h(vR-pRo z{TOs!L4*FoA>SE`(4$NrP++ zzugmuRzd=B3&s(Qve>}F&f0-d)*?bLCB<^GE&t}B*Gd{-{rE3)sL@yRLW7Tk&o{(R z*&V2^ko&T;)421GRo`BW+#Ohq5Z7Xf=l+}FgN1Z=Zg3r-shpa<-5fsejiSApH2YQ`ZgTocj+}*+P7GzV znjg38cBv=Mt>KWhLw#M|<8Z|t^Uvz3D@iwS-hnE?mN7=yt_xX4Sp$JFa@F7g;9p|! z#%n)0pRihutL)isi%%$JS5Ykn&$-<}BJ|*ZqFokl{pEyQcIlvgsl0 z09uLJvvKLKnb0{GHd*Rnl=N`Ls^XRYXX<{rr^lHP|5M+|Q`=RYX?WMSbqB6g=*G*@ z%V?Tsc$)TBPw?;vE@qIjK|fvPxdd8P-j^i2QZ$0N$8}%;CeP%z2qK85_;rG1U^BZ@ z#SPiV%22G=p5&8(CH5@tODh+mS2D&*i!@#2Q5*UF-4whC!C1AcC+EU*cA@piPh7(_ z0iUb(Uqo_2eM*=X?%&%yg6mutpr~mIYceheATYGCOTI->gH`~(?M&`eoX=G4zr5*z zHKibW)V5N{3~B$YhvlTSpwka%oXw^Ufe%V}zx+Aq15)otS&5&cyXOCS=r^-i5viey z*h+UN7Ty`BB-iahgsmL+6TI5D;anLGc@MStxI|OMMbN-nXWXoKDztBRpYBp5_%cwE ztuy>ZJ>_pIW@$NJ=F`l=%%s<(U*}yjScD7MB_GL zhnCluuaIFXr!52be|`Uu9OABrZwp5$S*08~>&C|bH6xD~Cg>)0QZ~N=0 z&ZEDyINeQq{G_|)bBpW8%udYdyE~NEw{!h%@k_Nmb)D=Gs;~P`{s$p|wS4R_d-*>X z*24+iYqWDhF>ribc^5ZSzs+>qsNI953o0lrxEg6G_gM%23?f}pA(dACc!wyvCYOrT zIX;tzqUV)UnLYB&w>sV(QWR&xwGW#WN~^`+(X#aAh6l0CPET5-OkXby`QY8VjL4L& zkDIi^+~T5lUYtB$Qa85bCyp$iYtHw6}=f$lZqO z&tvvL#oy3b&x9ZLf=VJasu<9ojYE8X_`ZW`UX-FM1<*X+FLDP8`%!m=&48!{#4SC5 z6c>fv?JsVjuo9{IHAOlAS2hzRZn@bO0r|J-qol{k05ivFJ zSS+`870FY$c=lJ3Wgd2y2PJu!CA~vYY)K{-zR}z!Q9d>UOIi{SCaoN`n|idZT)%}| zaYtmeuH8r->LF#oh6>d*lt0RiV88${p1y1bc%nG7$vzH{PKX~hLe46$6_M+$+agKp zvzGY9N!cbmUvn#o#Q6@Vr>9mC0!kC79=Lc*mEO*4`Ym#YQuIGGV1wmc@&hBcnInC& zj#wnuv**1hf#9+-zh#vBSoA_T_fbJu(zNEWbRi9sF{rBNY}@~Z|ovv4ranqIkq!Hc$ap+P^zl z;GK3OpY)yWIaH8zXEB4VZ$nw-^7uGJ+d(g!%chQYt$eZ#I+h_XxLL^|2tK?*;0K*w z8`v39oxi7~s6X(KX##Cdl``tGqyXWrk}Vxa&+gM0#D}5@NvNn3(Qi9W#;TDNI9 zeB$0c2Rl8K)w4Vc&cO4+%`XRqj~tZ~xTgMNZMSs0I*Sx$90vOnckW4DDcFZOxZL$9 zuvGua-N$7s>y?U|>0-n;cZ4lHmEBl_@o@nQUko#pdh0evoHUY{!d?n97iyOq8fTjJ ziW3h>W|Ily*uVgI_l-fN0dnr!tSe!jt_49X!XxIX6Q|hnEOZUu_MeqsmMnVY35|sZ zN_L{5&f5a@h&rzy0hS7ZS!+pzNi9hTY*|7W=kCtkzpZutAdaM9J z7&n8632OS~Y#9i=iG~ z8<+k%3`cf4=UpH!Q9pj_DZQhau30N(GAvTJsG67X?O^H-XZV)+^<&nHYJ9m{*PK%_H%q;wHuIvCofp-A9;;;I zhp~SKvv6>&VK1+1Y%Z{JW4UCE`N0I4lkTyQK^C z9CaR)+1;)(>CFgMYRc238@hko2=L7kE|;>x1Nui<8(PbbL?%$awaylL?aG2+1Fs)( z0l!u_rwl@vCWdLiwjOJrY7eeB!Cil>oN?m-L$bSIR4%fPJfv7| zOsnfiIDB(D{-fR&#}pwX%q=CVOqr>c0fn|WvdhkLK7p`MJKMJ(0I2}i^dM-kfADl( z$kZjE$&^)?QB+d-p)qz4m0A(?48k>fg(gE z^hxxB&`bM#z{uPt#?)#Un-3q8hava7b7KO;;c|}78|=ZF$wh~Mat;6|1I9Z9S3*9Z zdKah#eGhR3EEDTtx7Iv?FgX6AJM>TD0W2YSj2Chj=2slF_LoFuGwKBGY4cN!>8S-} zDqHqJ^Y)%iMpsA@G0M?{n_)eOdHuv^b|DWFBvmWlcz8L?C9wFbK*+6sima#EAK5oX z_hA_QArm{(z4KqM1suuKThk{aZV?RdN$hFpC5=1sU4j(nxng7xU&;E0go7!y^xxBMj%ZD=Zb1tTu6;Owl)?#fwHUIRui5U6TlT_x( zWe`g?|IA%gGwoUSXuA8+JRsWrqa_Y=3+{+e39ij%wccw>2-FZlsH>!A$r*jDI!n=Fg-kgGes z!A-FzQAum7z^;Q?cW2EFKf_2~;hP43kv)Lzzw!DqM5lzqE75xpBmlVvi3%I8IbSE! z&l2D3z<~SlfWR3@Cwd)AQekIp6@hktdJa~k&?XhV%AKUirzKst;xyd?F zu?ouizOK4Iv$WeARq)T(BB~~R0?*Q_QrBQYizMH(@-7Vs?`D&>U+aGncT&5>B`EAO!jv06`j#Q+5YXiaSitV>S@iUH%wWAk07?T) zI=+Aba^B(c?NOHbsbd#pz zCB@2@7|*L&f-t{aKUOct#d@~NKIQ!D8erl=Q{+`{c8G69L;OTosY6r2w?Fqz$E{QQ znkwZul5>bX@bQ~IgzMLxlp!alD}PXCryWBG^1h$x?j1m+&r^V9y&w;s{c5|8q1434 zj&LbY=QhiJ%DzyIJ#bIjzH0k*v6W=*<)6T%7b{}IipPJV%KL;`05SH=2cIm$jN*;;DBp;_2KHOLo1Un`}lG;X{u=9BCdI5XP`>#)N9avg0PPQzGu zp5r~lv*?#0vAdX;y}Uz6*WNPNm1deKE+UA5Tle|p?JIcWnm(WGKGe*9IkMT$7M}5t zmdpDUFy2UL#0K@(T&qPR_oqYXwcMQUjS_J7Q#dx6(BgcLt5LgAYIss-drfEFN>(AP zJF(mo2r|u_&VJhy&t{AnpGP+tD+S&|UBI{`g9wLCW5jeNjAYN~#?iWmlZ)S$LFyLl~%( zWd5J;g0g?BX01gxOAWfD?c8y~s)fY3)fW0qx}Y4`qHgdVN?3@0<#zt+e4Ox_cKTa$ zSf!ldKh96bl(a{`m_oOJtvecila04rM=J6$q^y9NApjyaOINGGCqIkLVMGr(Wt95f zWgEX#q-Be&Xg6+zYpjJhaf;)LiIsm|!&z8D}!lj86yD&||9zs>)JTc3IB6v|bYu1>Ef5X7*tJU-;9Y}gw zyFI79mEg0T{;p0(WA#r7`db{rjo~L*abnN%Gd^rTr6p&1ri%L+{Acy0KDOp-tMCXHkFLb$8D^$2Hc_@>!*5j&%Vt9^ z;Qbcd_56T}A=gvA6kFTn{Q5KX)x_C?PI}0Z4!`lP>-N@t75; zC@hJP?1npJuoiO)pH@_ot=Dj{v&W8LEcVzvZc+zmshnORV7-8!t2~u{ej3VOOUx#3 zf2mL5z@><^X8jU^xzPuO?5$MWesCO!5~m$p?&|ZtM>r3YH9ttk?#k6oGB`M})%AuY zGMasTLS+|v%{GP1etYwoGuy&_y3{*)P}U;5;_XlUJFNQz9Nqr|U!3| z!eV^JNm`^IA?l!I#ucR&4@MWZ;e8}OJEvyKGY|1Eh4Nc3?ARn|q&xbSE9|VaDH<8Z zdh9iUn5F5NB5Rrfmu*7oofNS$(Z2FGBKabJBuF2w;I5%R z%j(=1;>QAU1aZ#>aEbQC@p?ihUrg+k`wW)Zrz>XaE5o~wc73$s!HDo{1Pe#|g)p!J znQi+|@_MR^yaYN|tH=@FVC*G3kZY57*T%yjQgMVeoxennRGIjne@xD=XXY*IpCXU4 z6!U&WSZeo+a8v5A#7V~I3)MF6kcX2~O+Gj~f(AeTIA%5uS}@A`shA$HSRr(g2;kb1 zAQ853)Zspv zaPo^ie^O1Tmm?vy$u`4zCNtopaDCa)#RcBcbPl&Pao{^DYc=>%wH zY|lUn7VL9+I*RDw>Fb(*gA2~G*xEoNRKGZ>4d%V9*_hk)yYV*9+mqlK)5L)g>{6t! zzRanm&=yw4Vl0+KJqxU)+~x1vkV&W_U00SH%$Znfe|?ML#4(tB>HE#?S38kO0E1B0 zx94d(GOjGq+Vd^@t}4Wrf}I}~)D!O3tFpl%WYtIX7A*2#J`~zDPJk)#(1XdqC^Ffw zcm(A-F6<|K@6Q*gXMYs3L}3-|QCM`PPl42TKpytZj%CvVPd~{H^jt2-HZKqBDZM)9IvPHa$QsTt(ZrfeAQHp&%YG=kmqg?k2*hAS?Jz{o6ADc7SBbwd&K<} zn`uJR?AKZsg&uE<8gfs6E#yTDNUhAv?bWWAB4%a5lDXw*>vQazB?3BBiyVl!y3bq{ zF5$P*^M=;G#d~oi?&?FOs&s22x@@Oo6bC}c!3W<=JnyJe<9cVlp?BiY{K;`;8|9;i zVOMQ?2_9-e1{-~*q%`iY|D(DAK)lU4=D{NMO#*Zt5>XfOzdt9_t+w!2Y^X1-SlhNe9?1RqMWx=_{m-T4UW{Y}0t}P=| zajhnKw*D%gsion3dow?zx%rPO>P64}_L?LHEVVBSy;AW4cbGeF$4$?9PH8uG&Si#a zWWXErJkO7r#6%2o7UDUfp3|Z8eT=4RR;*jx?>xDFB|XSFK=(XU3vad689~l6^#`m% zO%`!HXyB;98jzc$&5Ziw+BDcQMY$^GUOkXRC3%vR?kjhE5E2LZO7ibDSw48jP%Qa< zz|sCM`C7@=X&Iv41IfHt;U;DzEcIkje+rvC&-^_~H4OP>duy_9W1AofKG{xC2R2Kq zw*t$PMoe5;=5-1~YtG-Mx;w?IXFnUHrx^wQHZ>V6%=~_SFOH1ie>l@6FUI%Y_>sf6 z>aZ}#NMq>S%2=tV07m>8Gf19Vmmy+D9OnL=aMWW#Hh64DSBz8+|3Pa=_LBa+@)owz z5VqRragRs)>p^omEH#@9q+Qfu9XU5UiBg4x0 zzAlqmCt!x^&F8=^7Nh10t||^+!cp7_adgP^Q)~9?9g)kIAiq)05HC34%C9=P-J)nYk-au5@+x1d!okPax z;(fv=jz8JeertWYZR3141D@fLb{RmEX`If04tu-^**hoF5K@Vey|ZY%eIcc(g+_j4 ztQeLb$Zyj&@t6~>^9LHF$&FgF4{!3J)ol;ucMC5ge zK1(si>^C0VhyKTwjKXNT)i_oU9G*1r}dL}X9b&j%flG;Xi{Npup zx{XId4=6m?PNFF)%#4iG)JUs;=kq#Vut{P5qhR+Q0P%_i2tMHwT@02wU)=v7v59s1 zdQWYq)@xi*lCxF&!Z3ydx=lFG7tT}b#ef7oc`hnbH!Es(a-t4uE9T8$0TT)hvf6+M zF!QG)apJRFO6g|W;@TIFYuVwte7W%;mll!&vk|WU^^K+_P`}nP0t4%`JG#sy0=;hiBKg+HBriUg3x0Vc>0g6TFq08<&IA+-5`D#$* zs5{2$Et-4(z39DVSXH}54664W1;*jeTM-}9TVJg#Ro13SY~o4|p{?DE{(TdZaYwdx z{-^tQ!Pl>^2K|uFc%urzdqc`}kh1L|pNI*^!Q!K5TZbeGCc!{O#N?~F-CtY!Wz4<_ z@u02)^#fI^x&5cdYpezAcQ`-+l2lQICXoc%dt2msr%w!n^nH(Lro_B_{nl2J8=QV5{eQT}k%A=J_ni6d=o>zlAGI_8bsG^>y`Tg)2Q4R9>= z0X0r~89lDG#RK0&=dBvU-)8k(mGdmPYAxL8X|b*xrlx!sQ1S7^G>3U*lgoFf2>_7L z|3!g)pM~DI^&bv7Yc^TLfy>&&asyR}UHT|p0tNdg$&0&wF9zsRU;Lm1yqWCImI-Ew z(4#M1wL1iw=iAusjo6^|99JKIpxULgA9~n=^RwBIHws~T1(AOIpF|+1MPZ%=_1ouE z)P&+*3%pj|aK$pNsW@%K`PrU)nWRl`-8_Ninmi<@_R~2qaNY7|e0dgo*D* zZAa)rLY?5EfC_Y&c0T(obSqXZ5x0Fa#h-y&?W%3(a}$vjnoW_hOjBJ(=R|hbU2FVM z7}3Q%{T}!7M$e^ZGB@qGY3i-s==eh-sn!_rG`OD1j*^+L&h8lufKS|g`0F3o6BJOh zi>#~O*k`v%;6b~>Y|V+mDoy&Wa^?M`P4ClPoFWpit z7vGR|!=n4VQ0?MPB?!%N;Tg4?ZSqlV--G;@cdBMqx>-CT=*T!jPXl-NUpMOaM5=Yh z3p6+%Gu_9$NpT!^>x6(nQVWbSSGleOhE%g-J`nPk(~-uq)$E}dQYD5b7e?_eC`ojC%~f22)E}YQtC}JzZ4{OEtS5pDuWj%VT4bnE*bc z`!KTXEZ(xe0ZHZRxuKZtd%3+q`D||DY-CXBC0>ar1f#bh(+Jc!fGm&YQRd+&7DM9q zkv#UnKAe@=TZQcP5xN)avi$A_xdbm+=*oE~)@~-F*A>M;2AM|7xDS5Yzj%Dk4RQ(e z@`0()?9{xZ_0)I`a4${&W58K_4mZ!(OmDoq)wITRqOd%&-~v3a>#G-3HUEDVa0@JF zAwXB+lEK+B^8jR(EW4VkdDvI?axBBvdbraA$R*O3{FE@XkU&5?P>b@k>kK6e&DP;m z+epQnk9(gJ(HnHOth zZjq>gQw{W!Dd^I6?7+fSY= z0ugy~v;H-E*&f;BD5>8%*nx<##;Z?re+lhAag)R1(T4MF2V*49^KRC-M{}7h zU9tmLPpQoBg+%gW5>1~p+nzU!VpxF~4Aa8Xz<}z;Yp2nMB}0z&rXKa{8|A?nwK~&Q z({Rag(6rqtE|?E8zFyw9S#mAl~5xAXMcpqxk@ zk56moT3ygKLn8V@Z$}qI6q{e-zV;cVKcJv}_RH&kntjxOW*-~htt(@;b!y+c+C0?) zivy5E%HD}~y;ZwxK5&3TX2_NciNef&S{yj^KYHk0$e=4XY-QWl zpIcfVfz_jF7LkAJ_$*Tj+xq_vd~52%bqBXv5F)C*u;9ksLWtuV}ht3)-m}0 zN(m{sqcJk9`Ohob*^urX7ckCa-oACX5pzw({RhX7>#=ovlczul_}3_6Ud*hk%8v^q)23PsXgB$OUWfOY4^`ltC6r zvk&x;jnJN9n{r&2bqKIP21rTV@i`1o?~^dM~%A7RSB9k*zuuc>aBMPT$YC z%*UvDE4?1|)AMrQJ~VmbNT*^lBOAg_!#4(=jsPhG(m-QXzN= z*Q0$>v;MN;K|n1I4%3ymNDoz=S6hE*LMxc?%p-i|`RHTu-^)Vpe=+@@tjvF$AXVPB z#SuQ&DRcJ%7!aINz7&ufuP2$~~K1NPYoD#q*~^_nTX?qr5)N zA#HTz@$}bJ2M%8ALdFmHl&eUuOH=SN$tU%ybk{hQO2GR%d+L1E9HX4bVHWYCeJ{ra zZlT=JU#{TwP3CN6*FJtg#}jGmc`g&0x*&N|*`eTd{s%q6t{flaSmm2-E>t(`QLpDH z8G)L^ce0)FdNtmI`2;TT<++!4@FYMzHW4(IJ0q@+50iT5v>y2in9F~VjLB<%AbgWj z_+JV^*&-)lLA==$LFQoZM5fVFjg z=Y}r>Vy9lqIso`-U`(_u?JA$^j$X@JO>trG;YeR-kiqcbwPoxTo~vA8lK`|?{p#y^Vq{RwrQ_Nnsk837(kHU^{VDBpeOQDj=NOgRsuv~c(yi54f&^S;KL|uD#1-=_T4B}in19xup|R> zndQr|G2T2{q2$%%mA{-=#Jq5EvKQns0QUp_m7 z`LXvct{*;lpETE+M9Z$lQLZ3q#6#4*DOnXnbbGG1HGyYdZIC8+(?mQJZOHj}vbYJ) z??U>htsAAkIH87HaY((=Q}(eY8!R0j}^r#ytrewy=C!M!Fzsl$>v>W^UD=}uJ%md6+d2odm3KN!f!hi)C%#v zE|Z>js;-mhPGlUp*`ZU^_2T;Z+1(RxOaE292BmcPKe>67HlL^#|JjQf#>-h9jUwEh zcLWo=1sIBTIAQ4a&zM*tx~I|XZt@-cBH&#!?q|5o_hypcZf}1o(8OKwa4g_O|0@O9 z7E7!4z5DN;gv*9?T1O&18g*j5?yATjikcM99aY^j8Qsx1W^;O_*`@kM4>bS*$$K}N z04QBFNjclBT9A5 zxwq!L@C(-@!h8isgSU-?`C}Cz>jTuyce`p@_S`qmehZ9gfaeP-$GFqt7KDE=AJbx^ zy|T#45DTD5gIvVcf?%DwwC4Z$)lD0zYxnrp$h z6oOj?({r5(zkW6p{;&ahzp|QYSV3c6H(&rYwK0b(xfZ;s`pSnQG|q$#dG$OJn#?vg z^v`l=HjIns^8i}>N=@ue#Yod$MVpV>+|w*b|+Y(pdB4J&>|I6qP8v8E1W8lzV@*Ms5BQ?g)|^o z@4mM6O}4^|aD2)j;d~*eeO!zm2%0V=*ryKbB)jgRCRAP17&vN9jvO-}aJ`w}ee-#* zxV{fbfE7X&@BlDovE8II=sj^i3pC`L#FKtC9CJLabSdc4fU66{Cnf=L)Nya z1@HV`BW)vvhEvq(8^j;w7&C>zGWKsP&!)(EPEqkZS)Qfwsms`m<+s~qQ`&sH^h@;^ zx5`haPBj{-@3hQQ$Czcyb^U(bJ54(=_y4K+Br^SR20uR@G>qXtb^)e#W$r-~DU}(* zgM1$_bxRJsaQ-e2Yf-OM_8~*t$5~n0^Q)CqY2RN=kJ&{ut~u|{qd?6L5mCkbjb&j< zgiczZ|9eI)E6Y+P;|+%@g3M~z{Ke9!4uUZl#coeZ1oav=4(S3rBnXl__4<7z9N7;0 zbvD^EGl|f?s4*001Z;y-K#R%zR^}dikgAc_`<3VO{{f0CF!o~9vd#Y^>${_={^S42 zM=GmQC|s45j7w#YTgeWeNGM#Rl5E#@xd{p78W~wPAxZYU$h9vSH!FKw>)PvD*InOt zpT2$1@0{O1{n_cfyRYYZEIrHLKjKyYi4`?aCs*KfVoZLeId2Vccf0c6-K`wdx?tDI zwV>*o@`PK^>LOkQb-?6iU1XO5U|E0_@~STC2*luGM{q>9T{C~51RlN7+#aZSt< zUL)Dpp)hsm^K8E9LRaPwE0*2}*4O_ecf-%kB+X&dP=2$JJ>o0$j4j}Fgtyi2=Z_9> zwQjx)5|@5QaTl2cgZS+L2*Vr++)nuDR|S5>{HphWZ`)k#d2iqRBAc-gXPvKt#W4a2hCR!@`*#hb}O-aWV)3 z7PEe?bsLt$kz86rhE+hek*xe!YYUX?L*NU`gpfhQzo+cQg2o}RY7ziPXG^u@Zw_mmhwLP||1XEUeJgwwHYl%MKgwKej4$Hr|ESrk$zMbQ~SSf>z zjC%mX5I=3~U-jI;JTN|M)ih!wJz0G&BRCdq3AnnV3M##ACt%w=`m+xnIm6%msi;6r zT{y+>CrmLsd_3mh8~6&Ei2p6Ysafs~zWDaS}(NK?<_ zA6Mmb@L0r)`^F@<%qo`f0Hg1AffSBkG1kk!7a?GmMOZwIsd%x?JAA>k_0zh(bdp!= zQGn#m%=;W7eqM&ue)xLRk%gxLH#di*2A5OUB5CzviCz7c?)5pV%%$--59_=CVwMiW zb+teFHXa%Qf5!x{b$>HuE;<~-r1^X=$VgBbXMyo7OUlg0;*^%QQ*#dawXEUg!thRq zv0e~B_?cTCcXP`0C$lKG5QG3XpR0B|$xaM9z`ywQ;o&JaV_=Am+``Qdn}h^y)P{)3n~d22fpWcNztkMZepm1=99%Pz_Wd z31E#ZZldi(`Vrbzpi=|{WStw@74F@Z)@JoXWb#ZVI~H}}>U{erlLxTo^Z>?E_qfb1 zS$u`c026w4?ZaZ8Ajze^&Hr-qH>J>Nf?$e1sWYN=T4{~b(ywNw4&pge`@qtr@|e^8 z5EnYdP5v<`Kyv-)^RMoVcpDQ>Hh1=atHce*G#zBu!{ z%X!ngCmFF)>~$QLh>nmF3oxw3=-*t-o&z$NE`JX)9DGUb%e{bA+z5!d!Lb}p%r>l_ zI}QS&^Gv_{ET4tY9Y`v2;(RFF}Zt>U(3CIMpOFDbU0Z)g-P zrxM=usp4)YpY7I`_BfeK>?p`$v9?BXKDUljz>yY=)c*!+HGxTHyZHsGbZiAN2&(Sh zg$)y->x7o8eb1+4wQC3089e#C74_rhlivo_Al1VbQYjiPNr{1TFlM52-46{Zw>I_m2>x;?8 zB*{$A*1wY%7cx{07FIk9KXd)zeINK$msZbx)%uPmEslk7p$loVKqJyCB;EQuBfnsN zW@dxKI~e!xTFdT%t8)!9CTaAYU-~@2^!K{`6GNx_Qv#^95qTD)@2S^tv{K+Is+{)X z$*kqaEPmpANazEFBQ@_)Lf1O|y=XA!Elc-izV{yZi=F@Vf{p0K-m09w{oD&(DoYKv z;SuLpf+Pb2;Aa>zu|HWnyZelo+BcaFvypK0C}}0`1F?mm0TfGABUE*uT>@GqC_9{>|2hF znhdX70o)~z`;D)%gaKA1E0>JtRp?^8-yfao=Mwt7;smsUXkXPL!~YKu62ctkRP$M zHmuwUpj{L_?riIQvlYAe!rDdUh)J1G$$G514ow%M-ElayOzMSe;6@MMH&V0LmZ6lG zMH$MCOswK*VOt&i;m>6KuSg4Y5dTu^8CK9bhnrJE+sQ|UosO01N=`+83*GrIjgL8l z)p}~VfrGUX3I&?>4fHuPgR?J!F^EXcmg#dYyb=WBSa*Q!UTu2YqLy1kbrF!SBvJzR z*FJc*Y2L5MJND~@B3VFCCr~{#QzE~-QcohbCbli6pKF#0_P7?DslxXOKF1Qv`B=G% zd%r=QN&6ZI_!%Dk{QQy^nXK;0cM~_AecN!XXZq+NF@e*df%8%(eZ;xB)IoP!O?2#H z2qAVIKKjDll1J1vzZ3cxu$_Kz3reZplbF`23m*6DB{@c_i(nb@4&EcuFHQv7z0h9f z-wk)Sb_=Z_abo<)J%Z$cp4GJKeb`L}vmpUR;@Pw;MG)z*G4ggT)Epk%ql&$+l-y6v zdH~$6xIYngltrx!l)m?|nD4UUY`4rFBxMGhRScxo|827P^C`f=u{NAwZX6b@wz;7D zdTw0W2~>wKIw|wZ&r|!9R`L_Bng38SSwqzPt5D7lEfEb=6f;Y_YILH!kV()O z-50ucP?_5kg5?Gh3o1kF+E~VeZ<3bc7P&YnX=|!@O7fcVvqdic>Bdmqoj3+0*dsC; z##hI8_b{8+lf}%gS-l?v zhc(tDfZ-lS;5`a*i2&QZou@)bVrg8%)0y?p39w;rO&c=57aRZb_a>$;kFABAOdc?L z{;a9gLk{Q4+}F!N*PUf3()delRy^-aoUGVB|KE&q2^zx0N!2c!3d5spS$q1jZ zXT|F`5B}jydd&7R@rf#j=Skm5e-X>{atEBU_o53i*Fd$VOStsH?3c^gQ%YEbyvvx^ z)D#Wpk&ZTyR0;1cDW%%6D2a9o?GcrMlu75`BbsL34RIxu&A5{ zHLQXZ+7%{-I6Qroe;$C;2kQywV#PWXpL+4##-t5Ce=kBKaFdAOKw0Ww+oa^SJqyDK zHNRnM9p)lRE@s3To*z^h{~1h+Mm7J)NU}*UPyaPD4~s-PTE>GyIe5lJ)aRL8w2#&> zm4vB1fu0+ibaT%j8|fp;+klukUaM9`_s;NcD59u>pZ~3JEt>oeEu*MmOfS3)X-EN& z#YI3ptrQR|R>Mq%p?}8SniL85fhO`m3zVgr4sj<2lEr)wufWU73{w0Pn=I!&M$17_ zzA*%t)o*prO`d^~C0tZSve^$9aCI_7&)QuD+Nl#;dIPnt|BNasHKXl{+}tCX`2t?t zhMr z_$R$2)kx*d{p7>UY(DFhw6|~ks{10lMxzP}AKFw(lU)fP{+o_yC6u#DpyK-0Qpn>}GX0RQ?EUV|Fk^0% zdGG6p?jER2P7SeY%koFlr9`cx7wYv!%cZjNITUquf(mxqbV%v@!^(j%i@%3U%J~t` zqr2r~cRzB_CS|*;c~Gl2SmUrGMk39jsLth@oYDUOkHm>UgGbftW?~*Xn7m`#XnkV) z>R!6N(2*)Q;QguZ0C}daG~I2QwkfAb`Yx!C;3%P?@UK=sHBI&9oZmwH3@#Gzw zk$^GkTBAJ9Bjp2K=>e-`R^tYLW&RIq*zLULFi%1}vVp)Wy~ z2svowME~yecf|Aj`Io#ppNEF{hAGjv>Qk~{|Hh*u?s)of3?L+Dm7Fgt;jbhD;kOI= zB~`AG>rE0_@a0|Oi>ho#hX^0*X{LawA8NiK3ltlX zQ87V@ttWbUiC&Zrz@{+U$I}J~igfU}%RkFTsx@3gy3#R(%-zSkk;wk$<7D3{Ae?<{ zqX9deowecvU!``t+b}lq|+>zR{2Q zf?Q`m+Cv7y8`r^!mA=&!(lmLv=X^0JBULa}=+U4rUfwJy3rBgiDqlM-GJ~EsBf-AZV~U4im}Om zAlq9vtU#kXC|^{X8mTWu(=kU~J);u7Vlbq?d3;nm!D`-p+b)_{{`$^SGLb)^%gj^x z7StslpV)p0l}gs`*o7(%WXj!AZ2R?bb?mpM@jtPz>VFO8;zLH_T`-fjUtvo4YGopP_x!Y8?&c?@__w6U5$E0p~8r76+0 zAKSpLGIo2Fz*xAf`O-*ri!MLj%fHF9sX>e&oxr-d?3eb{6=7i)1xxSOLOn+0CvKaP z{?^5-rZZ&-^5|mOG}Uh9S2YbPn`sh!lqID06~m!eqm!}R-TQX++~L1tChIc|6Y9-* z6ClbwVz|DR+&D-XQ0-5DV82nzku;~sZC?U2HqR%)Y+q;pAh(Fe;QGBA1MXULm_uK(@DKr?Z{qMY{C$j&QlC`Q8!37h3f1esQ^QRgGC?X!kj zdDEs89U*>)btc+);*BlmLS%zwcd7jm=@r}_AJSc}^+j>}4C$~*4Xk`NW?rg#qW`ye z44}PNgZA=KOsf4wq5XU^pChauz3YBNS){}ydcC`}Z!vpx-B5Y|IaO7eyCg2r?htt9 z<7bi3`@|)C>w_)^yyiHGw3zk~Mp}0BCgx|yD6Dt0OU+oc666oiyml~SbXY-_ zeW3L4f&<%(bZ&AgLE7UQAQ1cdvSE)Nh1ee*EOet_hQJK=)i~`dDUBYqW+~nNWMPti zyy8J9HF(_du$>+Oq2;CWOzmk#<`p#yDXB@i z038qfuTA5r(oLd%=GNEhpkDZDgqaeAKhjE|uGEED748Bu<8U23Z zXJ31Cu>6EaLuZl^C#DDLGv92#p@|uv?Z*g{l-*+>yRs~m#(<8msBy5Gwo1N9c}xeM z_fsv0*%(8Y7VP9fz0D0x2VI}1mZ%xzfcF)<4?XlamFY=-+6HPRJ0-dMwzDo4-m8rD z7D;^PC8*dCbCZAyA>1hby1Nh{`GhzvV7!zj6g|fTL}~!x%mt!KLk|mE#_s=p+?4-p zJj6-0hij!AUAD^7a4UgE0 z#|<4>gizk~S3mymqquJ61z0eEd1@^MMX?NfZ^O}x0hlw- zZ*N^y1EFLdp_ne|AU&)qeobvnuG`E-Gk_Zg;jdURHKEgXr~Hz~vd0n#+K;~i*ys=E z^E9v1`3IIaY4-=?B!k#4RhJkDnK-?HSodu$TJS7UzNp9^Etx9nm)A@%q1J50EN4aV z%pa_Fm<>_KCy0B!JJAe~qrK@B^KN#RvAT0rItT2>RCV$2yNyakfzn7#9-bKCQh}OQ z$VxVV@cT=YEZ_svB!a2K#sQRH2!CqD9fBnh4MIQJuy1D=PO^v>xG*eoIG^aXR^Xy- zOGMbwr+kQXB30EMbnRSF(vz4)ze7(_qp;(AqqHuf$SY4mJ`$w_|rjvKOZpy0=t`lL_q2G!zsUB)OhMM5r9K~`#txm86A!h zm*re;1g*H@=awIE3k4$KSl>}w#nkb5lOV#*LWywaMLrmU?NZEunMlKkx0US3{Qz}% zFRK4>ziQBt_`|`T5M_=1Jl6^H=jp9_NU6E5$&>Dc8%A;vk7>*jfrofJpZPl^th^&a zDF66|ataoW;&1j;_Sh-t^trItYe5Hgj*??XofruSdAR>7HMLz}y@gsS7+6dUQ>0wssA zx3nG0MPucvJ3NOSE?eQ-=Fc0>LRlIij4>r6GcUFI;HC>d#jC$EX|{;!a%|8R3J_ZdjehMnfiC5y%_XfmfC5)m_!(y=qr5%8^6 zJmbUod5tLF<=kX>72geK0A|kRCvd4BU>Q7FC$g9XW|3xc^^w1FJ%V-3EISD`;7Lmd z*vFn@e!8#i?GduxPNjbHZvuK3TKX`cs#f0N=9T zuG7_CA&9ZM9I)}K*i%?y?6(A>k5tonP1d7}e}6zJPRIvPjVl#1DC+B4w3je&2j3H) zH1;XNRN4}4F5^Pm+rU(swWrZA#POz#vFH&Do)=a$E z54ad?pZl(U?#BEo*Ego8EA|W#<8*4I((y$JF7EHAV3RKHIlg#vfIa`<2G?Y=|5E(Y zBiDYwaOJm7Ij$v0WD@2db5O-n(h~9+y}kwO5hR5|-J~IV#%1C*Q+Jn%aY)9iLN%*4 zKSDNwJz2Y!o9i{x6bUt%b9I;%9$z4{fQV6|CLk25V6D)rM3d8#xGqI-U~f&;2-+B? zCa#N_YV)&eypcv%kau$i(dQ8PN`XTgG*YsEm8J3IjcSOG?k$zxtJXae{E*0{B0tBo1&4d)aE@ybdA)eYxgRLEvH;Z zoJ45atX(Y%L>LI+(>ctGd2)6#+}$L*`vHy&!l&F!v^Pep=x7ZFA{ar%p0hogm zn$|G3Nn6c$1ia+k#hxB6h5GS`k>!AXGuU!1_-gtv^Se27MIB{9RUWhE4v7m08mAyD z2M|Yb89Lw75+3>>=C`GV;L*5g%FeqWa_op(hCq}TIlp@0i|IvW?C$y-$N$(6$- z8V>D6Pq}fk-Oachgp(bPW|$xFKo_;lYce2`%iG-iw#|tN2ejzLvV?3wc3h9bq5$~B zn^0*%J{E6%)qX+=xl_E`+qpCM=EAqahm8^?+e-rjDDrgw^<6X~6(zp}T=j|m{6Aqj zKYzUOpx(OZt+$|@JWdIOKO@rD_epbEbbNB^K;U#=?jD-Qdog`6|02;;S=~$VOtL`> z;jEzlg!D2Eel;WFaKp*KyC}kKsxPkh47cE+{`E!i?Xf`fbY0Gk z=#)4%`haT5@26b|9eJYNPX|@7y; zo>ap{^V~T|5urqvylCLt^Zn96I8!uZ&h=UpsPXlaw|nXHw?UBL`oO%ifuLnpqy@aD z+)snX=T5*Uq*kWUdR}C`nS>Mk2sN~~8Nx#_>0x>cx#liRv)Id-q z!Gt-ZCv>(+&zQfmbo$qz&;(rI7O4Kl+C(wa60q#iflwPuZ^{Q(^|D4nMzH)T*KDUL z_DSYjlEj3Gkx6`o(vvQpH2c;|k?&+jdYKA#W(yik5t}%L$D8Cw0W%5}Tpv{I;JqKo zt#cJ?K}px_MzofTFIcL4x>sW_#($7FMWUmE^Od}*Dn|t4j04&mn4$V&BC%0OzH9%o z9?$eshwj5UoEr@uBG^G9;TpQwM?dEORLB)m}taElE;4)F5MW5 z`a;{Sy&^D}^Ot?iTF_Vv=%E%mQ;@$E_G_E zFBr>a8(xPt0Fg?zK?L5?j?c07Ob~`o zd6ed2+czY9J+2t0(Tn|A)_;!q(gbNJx;2J$pu|IXm~PhhD>lqOonSA07JJ#IPM9Y> zeV$}=)=Jem$9}zd?h8Xe>$~scMJ?ysL-|E6%w^=^e>Oe^qKk!^vUgLK9($*mxDTlm z3H()K-!uD-sC)+KS=CVhkBz>y#}whSVR-yUbK`9pZsx<12;qtJ-FguS{{cz~_E{mQ zv@i7YVROq&et74c$Ex}dN$ zqT?++>0-OhD28RyXg6PzckvWGf$WhT7IHIKpKz@C%=9&5_&+NUz(mn+wW&BS0`psB z1dzEWU)^DviwxEwFr=@Vw+1zx_TFSc+0Vb*sT{VB{&`QOe5<3qyQ}LsvdO6kE&BJN z58@_Prt615xBcQAEs)|;Pm^oG#pI}3rF-i$l^D zR(`S@VR@^MgTf9l7m83P+19l;sGL0!hy$})QjcoFgBBmFv}2$hZ2{-!p?K0K>G3oq zGe6t-LM+bT6ytvFBcS{}BG8?QpUZvLF*#}to6m6v`s?WjO4rq~b=PFDTS5zWwUxDA zoF9bL)Z|D!IWr1mGg8?T~YU8-_uZCEq;Wd&-@k^_RsLW1VVqjGuQK% z8ps;kWUBx_kYY?vzqe{{oYjk2_Npq^8%m)kla{`L86-v~DC{m9q-O2V9knX^u)$abe&`P2CY0oB)q+<%Zl9%= z;b*!Qm^IEG2tjs)cz{dB;Nk+3rtn3GbdQV~1{=&@j9#=*_q%_VCG+v}3|Dmyml!1d z%K(o)V1&5a_kdTnX)#fcNg)|azOW}_@yV{`0%6qMB=B^=nOkW>PSp^SA8`&t1+HIa zNRiDWCuw3YM45QM3giK*lftCJnpBZkoe020%QzC{SMy z$L_ok_g(%dMVYZT2Y+xy^QI!Xq8ro73($zCpi9 za9Ex#J9syZ?pJymr|Ep}r9$xo9`{Pi+>p+s4f&LuYT4qzGczn>Os9Zx)pO}zVjPY> z_lz9b7yZ0jR{l&`Zh71m`a!d>ej2~4?e z&#o4%T!fc-G5ohtxgq8c`mcQ32NtN>Q^42{cpz+YpShR<=}Y$7HaFKfXt%o(frp8M zs4rC({Vfl0bQS3gO)U;EDZOj9wbUY@`|%M8W8vQmr{;6E7eu=A zSe85;Nv}lwT*^RPBx=C4*#j@fE20qPJ7+W?WkXK}K5?q*WpesUzpFZI$}{w8j8`oY zp@twpx*Roq$KC3d$mc)5#w~Q**a37EkG+MAUKM}74`nd#c`@AZhi-i85A;*_-CNBO zu*amsTsD2k^eiitG$ECJF^%{p7|->H&WLI68XM^a6TrB%Z#b?6Ws+wohsM#%J5KC= zTaM=3)p=V((AEz4Rzf8oz?|$ie|Q8Em_OAYML-5w@;47E75E|@+{eut4i>3mVRa@&EnbLAx&R@)yc@v!!y{{+EY`xIh6 z56$tKf2S#bhw|-Z!#3gt5n-Tmd6VDhN2hpvZ`}k%x8@tjcTcp?!d|k?^wGf zJd>yA71w?CryxiyJT9k9PP?_TtL2oT^y zD5~QF!&4(jG4;;5(?v-bshB7}~$6Y?yvcxeOH>Rk~^CITMVUYr04 zK02l4=pVud&y^~bfir@7J*_*;UbD~H56~cgSEQLLT4AP)^q!}zIH?}um2)&#aaZ~C zQ%8qtL&|+0+8LLqfo7^B?(8sWu0)-Kk0aSzi2TZNw zhYfvT>F*jAL1`x!rFhd=Np-GROZP*MP<#!0@oKW=JPcAhtMAfb7L|W^RP<7wZbqkK zGC2A%+o*xtgm4sJ_ifF6e*L+W)qhh&fkJryN3x|#`#+H;E<4~#Pz?>F=R@nZui~y#?L=NQ*r-Y1Q4&Tjx&^;n8MxRrW&!d<@{RmrJt_JbXBY z4^;?q*grXi+O<$T-Pz1Io{K#x_UmbDwg9YSbA7%u!Bw;ttUA$jthF?qqxe16e&*74 zVla)99xe?fji4N@F~)8x$j9VQ186aVr9@A;o$c6rVXB^%;hE6qvLezEug-A_C{-|q zBt+kUmTiclDDBH$)rlrj5tZ%-H$px@Pt@#{YNrX36fh%eiaSe#>3cl?j5t4!@f2|X z7S^(${FA-32PiY!&v)`K3&pHo_nb7_BNiNc3~KNVAQo?y`>td~+Kbf7P09{0g`-zYAOqz*~7p0<0mIDUe|Vi# zeMxs1jCY%EM@4|1cH;ppXIs+P=(g24N$FNtMh*XQGj+u2xqg7TOYAHJ&S2md0oB-p z8RoC`rPS2LT^D>8gP@?|$i%0MwLnrKDq+sl2*Z7#=#?{T<WM^e76Pa|vm_e)zh&ie)!z|ICK^7?r}>V?;dyD^w#Es*k`7yGq~K znKf%{wMH9^Oz?4e)(zqyw`L#xoK3PhI&=^*2%^ z-hycvRN+uHk;z89mPn-KK^CX3r%&fN#J$vNNA=oUf>McvXSz0>QNZhcbK`c%LXM*9 z8;w`VPxw;PPb!VeE?6AA%PaSW{8VoIgFLZT9%BKKGM2~bY~Ef4*13Sj*TSr^mwRK8%sr>Yj;6>{2mAm2uNSp@=CxwV zAtEEj5^|E)HPqnbv!3!7wzAgoX#ThYX#so2&C)|5GkJYoujKy9-3Rsw&GDteDy}?n zlA0$sRp-4n6ooHv@~R&3&+++Guwg5}S@9eT`3*zGjh`I^U45u+kiPomH77@cZv|mx zf1C6b)-0ywYQ0o}uSY6>*zS6E?UF#Kpe*KLqyJZfqwsy%v9wTmEQT1=lZBy3^f;M8 zr+ZkGDCye1os^dnd~BJ{ibGM~QT9;0N@I(DxYMvCEbtQjl+fFwGe59z9X--Nb zr;T;RPWSkf0yW{K?Wu07bPLvAaQO;-QcB`~OuE9$R0Gzr26Npc14Ktx#<}B#A28wcj_ko)`>u+Q^MIJ(`()^b3&z4(?sL ziGR?S-?|(&c)2(G26Jpw*K!PLBWktX-o*jxCJ11Ec*wy)Vx^O^FO|}^Sf9KOYa{#{ z!@B4ZMZgCWbj$$ZeXkN$Fq4IA3c-JU5 z!n4L|H&Z8TDvI9g|4_R1u5Q0a4DCUP7(}^Wc6k>?RB1N`i#1i;G_|)nVI40}9nCAH ze;?l^n&*Yzkg#nYnnBvj*XOBSntViEj7!4|3#j+Qcj>gY#TYPUz}2w5=O1}vA~0wU zhSfoNiTr|9@E6UF^Kn-F_*$=`Ia4U&{Le-D3JT!bB}Jg_vE=mtAt_CiCKV+$EyB$j zT)0I*n$Ke8Eq=KiuOdzXb)O|7jWZy^Q@#g}ql{{$A$m9c8njh*-fN`zx%Y`s+vMGG zS$?yP5yDj6q}0p-%4KVKCJZr%M?%^D?c4o{c)&SaDs-G@IT(1q)V|bE0QgN-bxTEk zCiHw?268f08ADGXPLjIHxOA;O<1Osm6X3r><{(%-(VyR z!nfB0*su|AgGUcz&&-`?dT2D;q#3{#aV}TU=F#V`rIC!dPJa2QjTV)J+|7~UgK#Nb zX{=>3Cdj#_L9HZkjHwqcJkvW(zC)zacL-_vMyk*W=aQ3sS{m=(y}`him5G_FcU(j7 zWJ=qTBY2&koJ0)+_KlSVw>*f&sG^DSm}vj(%SpZDZS;g-IEuW~+u8G!nc$ACk@lMS zmF0GXsSZ-r7Rx>Z4;=XHN<_@E1V8(y0-=OsEb->hH`7QS6zb)pxZ^|W)|E-$aVZ+| zJ@!p{@dWu!e^4+_Bal(>sd*dfZDn48$0tlHEzOkYaGZ?UwM+nP+WcbbL{m^-ovyze zbNoYOX|oLR2J|Yx_`TedmIfHT9t>i_#NhmZ-Vgs0qUZ6vm7}wxO}cXqi}a1Yd_Zn) z@fgM{CJk8B%)?{iIK>5zv>`|L^Q;GJU+k<*LNb5NET3;+y|iA4$cs@6!qglvt0@~R zo!B~mE?9TCjWDRaC?jQ|0>Af)?~^Nv(fU3o=Jk%i3QM* zrXCE$pmfjvO|UhYB;Wxw`WpyBUq+fG=Ob*S{BqE`P<q2Ct)QpfEHV2g}8)BYOTue81hMJJ}StI?m@ z&e(LM@1O6hY4+DX&M5CG#B051agdw* zp=xjv{O_@e4*^BiOZHcdcH>lL%l3}FOyxeUQ8<4P&JrMvB&#N`qHClcSKS1_%X^j@ zvKkG-o&L`CJ1r<{QXPY$fSzalsUMm0vRaiJvgfdCs1UwoeU06#m0_m#w*{yp0(tf^ zNuTY96n1i!Ea!W+ULJ|Ka?U5R`vSv=)w&Qxukn|ek(@967sRn)Re}ESfH|bwR34;Z zY$>N$mJ2w-zfEeH=h`T{!G?{AuX$q@xPGnVV-KWd5QFlct)#c^MEgQJcpm7wdU&3L8ZUE$C)HKXn;9VS7{=KCA9M zC=KGEi`DYYAF09fh{m|P(6F_~^CH}~`m()1>R45tfcF=*IJiJ*e&~nIunD=AS@F7O zO!)%;d#iIkUo%I;BJPeC29+$75 z6Wj2tsIFg-3Q7g^3ToR|{(VT1ewlS~kydGQ|C$kp{rPY(7A82bPIuU}npv;?;kkL{ zd4jxSs&zt@;{cg@CtB*KXY#Qhc_8qKt1R^|qqIr+eo8!$+YPV>54MW1t9f6xB0<}p z|K6H;6Ls#?`>LO3$38ob{mgM35Oqw=an!?XcURJ!)QDF0y_LVFI(vJ2`7zU$n`HG( zVuO9REH)kX7EO3mr~6{;Yd`8eC%04_)Z^MSx7sl?7P$U>bP9(GGTkP=S+B-}J0s3_ ziP;~!cgp7~;hR;O^-&%q!SMU~+z@F45&ooUHu~IhuWiDc8B!o^#eDrKKA6qxkEwsvul&)9Aiq&RpP z<zn`;{;)(<#4yTfbz;OTYcwC)JpikBf$dRfU zGxrbeg;?QMOy*(li&zf5HuTNnillb7PaZUTGev^OW;#5A{W4VD)nt6Oi#66G#<5>l zUwlH^0?xpfyJcMa6T6hkOcf6TA6g$eEJznu5JvXPl5?dX+bqkS6rYUt6t}ll?I3&0 zvx4StTaqA|5*r%6x`vfMx8tYAqm?<|2J%-4r_A5vLr~2)mZ_@z9^R75Wha@yy0$U) z+WF7Eygc|el~-cy*sMPh8r7B+_%Gjp>D2G9YsJYgt>)ezy4wGva6kBC@KbVy(iGWX z??}Fgf11I7LyvjlX}Zp7mYDUj&fzeLq)qyb0(3pTEOULiigGE{_Ikkmhh?@cq+m)75?I&Uilwd-;#rn?zX zj1935p2mp0vkVpYdOFX!APV6<3k^l|Y5Eh2aF6jU$8fa(vpgO`Tc*f2LO8iMB$dre zmg=>zSoDT*PZP4$$Rs>44$Az0pLl|<_OteI_{IZB>sy0VyuDXCk{6;d?gbQkvJ&RT zxWc?%3z8bS-*`aR89QRy515sQ?DCd3$V9-Hy|=7p#^4(;C_;TXF% zRr4v3=K#DLzl+(I5R;D%E;kjAre4)o$6A_wbH@H`iu)ixb1J(A%BwD1uW{#SOHKIV zgk0HbND)gd$ozzwJ3a&Tb+i2x%3{!pr8}yaUW|5@vG~=K$*0~wet!p$HyT*BPHOQe zth6fVHqfW%eJ8|(VgS=Nk?ETw{ki%qUJJWtT@D1K1Gc4JrtvL4*xTS+|0D`g^t@RX z(-_@v!6c~X^GPdTQO3t5{Yhy{Yh9~g1Rgh(pk@wIqxJIOuc;lWS>CMlK0dTi?#MM@mz@$d4L;kTf|nqljZQo-(Peoz$RDB3e z@JGIjLqd~1-@9^GQ+2*5F6xFM$5qwaYbSHCn{+3;tXIxap)GfFB6+B}^)@=5`k4VM z`3Cta_0vp3Zj8OND(Zga^3a;-8NElt z2M>msxDSJ=HkX-1^9_bMbD;WqDXC)VSJd0QZTntF@Dn12J4X*1??xlqFAi0XiU@ir zgOwDlk_GDx2&z1Jcrxv%6hodq!a8n-f*gEdp8P;0*1v&SA<*KdhrrfZlN$8l}7`#%LwQ(zG=rKcGrYz;@+KYo<@@qLp z{d`w7Yos`!0~!n>VJ7jaasclnPby}4Rql|< zZ-AGE#u<)W7=q+3z0daD&@+SYGA&zd(v~aWb38237q~?wUHue45*sQ~@BuTy*awBP zS9k7P@^HKO{a16-{W&EY2)`57%b8w|XZ0Ra^`j!z{c)g)d1~fD!1q42f_WZpj}rO( zw}*X!l{XO^qvd(2OLt$3a^^O-X3xW%jji8$Jgya$ABG}=n6dJjD(xWG{TTXI`;jza zfuWwcvE)seHSx=NAT{|P` zz5=#=DOwt*^0k`r6kXgVaq9TtBt295Xxuk9FLPwP*1T`8k>~oOZ(rOqVx1o~Hiko) z_wD<#aUNbP%^UNyRYobA8FhZOKMp!-Z1mLwruo{rKIUzUqO`ueh4+-BiHAU)=ReSS z4{NtB)gVpBXoaHWnWjy8U&VqL{iQQgC-0r>@=ps6d3{jGpxt;VZ}7^kBzW_@c0WgQ zE2od$+h(6?OV1kzM*QP7{6qVd&o$WR)_cslvU$|7U+22O4S(KE10e{854nDYq5*0IcWY&li+ zW!<+%3L`|Xrn%2b>-!Zsxa#gtjiG;-4sJ%jKz;d`z;eL@hl~-{I_o@I_LPHj>*B}- zQ_eO2Mg0MLGb`)OcaK*W8B5`|A5R_K5c)-|3=gGj<(f2}u=5dt&#We7_uTYMU(0Y+ zE)9rG-&A(-WV2EqetJAmrbm?1SXI7++u}R>R(*YW0PjaZCH94MK1gEb!7AjvAsSy? z;1pRT=KQGpa5il9T@L(OuvMgGkyNwzRwOfcbVEZ-%ty>&n5j$skY#9=?idJ|MdTix zisYuhS6uvD>Rsf~APybOHpqxswOoWZsH~#8*{=e>`#CV>e!%YP)W7fa``@?c+Rw^L zi&(Tqhf1gOcGmc-TH4{8FLUnM&G~k!-@AgI)-4m~urg*1)WueIun-s-CK?K}3lm1F z&n^ag5p*3A1O+~1onb@G4~iTtyq*1A^!zm=+wz6izPA52*bVHyw5CIR2=*q$)WHJtm!Rdd~H^IV~)kS_NhY7F=8OQto6R2~^If_pMNj;p9VkwPrt zci&=yjB0o2RGj0eTJ<2e!lTxbTieX|t~jr^0gIXGb8PBe)kIWI=~d{R#-Zt23n0W#C3m zSRvEY)n{u~OIPh5!rNf{KbT6$z=SAV`BE%}`O1R*+BzqZH}UIVK_?E#;6@ zQb4+M^aus%u8r>A7>o1x`Tov%oqzd{J@UdNk5|z}yj&Ck-3x^E2N5?%#8a zL@s?fN=gOd-Po#-MV*`(x|??wRnJ%d zeyXv5oYK%Xsm*og7jZvzZF0`Xu8z<@_cg7`cV*tE#p3DMc^+DL>SxfIk_7IktgwBr zGpfK`U(>55+qZM*14=mzpEDMvY`m`$`(ufl7V!@e$3SDPQd4#Vw@v4n$8JCNn&hiw3xRg8@-}@EHXvkm z?4YLUTZ|U#txAiZHhGQ1jYz!^>}THLD@t29q3hYCD07WIx85I>MiW9kGB3NyGLoJd zpXfid??Pzu>f`^vvp!3walHB5ZX4bIgTy^i=iMwyCZto62E;iH3pJ;rxyk1qZ^NDs z4BSEJ27u60t$uMj=NyxZG4_;UJar_hs`V3}OXByM2(Ag9xh#yVS5nt5nVKlv>2_Q~ zUj@*IS-?5Cf3|96&jojRMK4bKSf3MWg$y1hu+lWd@_l}75UQ6SH^U`x<2cFs-dKcW z4@g?uGp+Sw;qIhVJuL_1`c#Riyb^V3x1(0?kT*aF90@}l{8_WxAEWIfH9Ik}N{Em; z9N%ohxt+z>$CA7XX+l)(G8ngGjWF_!jr4~aQ~~Oy-C&tcFfyRPbum_v#~{S3^UAKQ z@e2FOH;ZWxM2gPVLc>TgiOuw6?8xT8c=jug&yYfbLl%J?v$vQ?+kEFnHI~567A=cO zjZRlALmY6yW5RxT`8H=P&hkU$J=ClpMStRz>&C(wD0DQid6~7ztA0g+w{AQYt5k5z zWH5}`>Tm!yX6(2J6B?Y}k2U}AxX-`X2`HDIj{mwDaf&;aNC)6W?C*Y z%`44!T9UF{7XoA06x3awarsVF?F!LF-TdZt*2_X~@4lcPRT)U8uhkgWTvr^nP(LM) zum}%Dv7sB9ggqDO)fNhb-5<|!$P@^2_elRrcak_e9~EcI^r*rHdf7iG9(ZOeuJiBn z;D{ekESP~Mlw*}{tikphb9oaw0hxT{4KKv(LM!?*v}tL3CWh>pR!MtNm0mevSKi_Iq2@Mo!l3u5}oegse`Z_lYZaq+xb|_AYeS;!=1Yb zs^`1W+vonX~%N#_jZU`&QML?Hv>0DtY{y<)|hdB_{&6YqwVPT zMt_Zq#K6(1L0r*${u@V{O1-#GT|CutAQKm;_h#vWlOW-2mLQXM9IQsx-a)ZOj5mFU zs@hPV?EAs8f_&tpLxfFMUZZ$Fa~Op2p3hv95?;6?lEpbZ)!E@G0jB*qqxtmC0C%)c z%cxtGv-*afONaJLR?&W7-z#6qg54R+j4P~;G=okMJDCA%^g22Rg5R{%lc z{|-4JZXBEUq{u+!*JtUsCcr`WUqbsVQLU*KyW*7io@jKm=z=|jm4%lxg59}A;~udz zCWYQ{2(ljA?@b6&ZKNfFp{SM`)!RXt8n$P^4y;rHU*@(4wSdMp5%v~}35nOKn~GXU zezp8cU#$C_A^SFiBc_gf-RJwiNpo2bw0cAxl6ESRSyk{SXWR5w=i$Z zc=mwcPLH<4Ucld0{_lLRxLk`m0I?xD>gT>{`x{bBLI@gEAHpAG2)hTO*w{*e)ge_p z<$hRVXB0FwE(O(-ZGD*D&$1maDdMZ6Q0udV+yFHd(8|qr-71Gr7V(mIc`WrIZq8Y4 zEFdM9>#DzG+dtN8F`c}czu5v+7iXEt9bd$svesmYV@rdM*benm?B{j^%vU_}7oaaE ztrolA>2cNdUXGq`y^GC%vS##jK6B3Wx3?%_yniFuBXZ+^AAxC!=kEqp_2i>Il58Z8 z@x5;Pqlr9i&BR{~xplWPf05oURuZJRFgO+Fn(U>cc$I>970}h5HO~>y9+~~=sdo41 z*=KXq=)D244iBSZdJiRP!dj_t8~WTZh&D=jGt)%Y=e+>#%2>K6WAFt+dzp^a=mQ(B z+-}*tMsuy++HCe{&Rk)7t~H^w%#g$R2))P__ez^OQ|qH&zfH1s0?>CoUo4={eXdw{ zmC3fIV3UVxkpPc`rjEZfQ8A)f^J#gk1}y@|HeCp-skwe~w}^q438|*tD%c_VBx2_j zjHjSEW|RXelf>rji87s`CPvxXW?t5qw5AbIAxa(_na7P zi80$PdA%7}-{`ex!TlviI24Z8NcRY@*Ho<8Jonm5>0GfF%*6BmpeA8sp1_ z9gCQzjHY|DywkFM{K(wpma%-?MUt2j6J$@TtoLxxa}PEhIID7QLS-Y}0b+gc zHQ>UC0|`cL_)*c zd-DE!^!2qd!|}WT=RnXS_|Z{T`K&z2>LPybwZpHN!hc?5S8Pq|VJJP;)GM2^pc! z_Yi>s-Q#iKdcGO3`-I}<7a{<&GQ!ix=+~OX+tMPWN|{glEV3Z7+!0!5FS@R8wAf}| zDxPO#-cbL2*y2OVm5qvQw_MMaiWY??<-r zAPxr%!uYRb-&S;VP&@%hjBHs6Dg|k*nH&veFv$l=Y2O`>)k$mM-|`yh9lD4-9jhro z4=TAMA!4}+(R*Lmr3OMq&RWm8G0E#P&}#`d&LjA3i+?)QY!+=7YHD$7j z{2tI>hZHwR&rts;$2R%2$BfXbFmOk5i}L$HZ341_=!2a3p&f{@I9SI~tVv9(YQ)9u zb9QOF3QlUh%A_9yWaFs~!aN+|+1H#q`KBi(+f?RyYXri@mkW1Is7fbzRi2Zk z>TIPIn95dV>2(YX--5kJ*Fs&SSU0Vy;sn8{r0pg5Dx7b?(y!fyZ7Vbuk@#eN`mTe> z=2BcyWQUTpt`~F{$6K_-NE7+hhV=w16#Ozc%Bp(CLyU5cx1OGcVflrJ!r(tt;h>Vf zuL*x}lw-4}3=CCHIMY$Po|#;jeBxgT$)7SV?-NK6@8%sB_L-sG?%P#ro{r)^hX;EY zF!&rDmN|Z&L$YHg{V7n7zb+&y50ZVpS;TV`i}OqX>Zawy_{y%L9`H3fLrSynJoHZUz^GOFd0VH z{WlLIeJ?yrc6YRG0Y1vpv0Htw$CiNQVqzUHZ-tz)CN(WaaSoO4cw4{mDK{AYvFh*X z42jYx+jQ^#a>c=03exy{l!s@~)PS+ez1AW!uhqe7#l2q*L>>l5HtGm|>x>ACs&r~1 zc%X4we$Ml1o%Cl~Urpyi#|cUM42CVR8_fO^U+>^LYk54fv9&P*cP`~I+kz*}#34Lt(Shrh-A zO%T$?sT=uSxFR?Hd|%_zkZOv!ftN=fFguN7-CpEF( z;+*Ct{EBf{`K=_TM~L!k`hr9C%B7utW3MyMozAA5$RJ~)&`ZIGf8E6ayY_13h{fY@ z0apH3S%4ybap;5#Q77%3Rxj3M&q7LgN%-u1uICn`C>6G&Eb#`Zp9%G=jAgh}Cu4ji6uZHD&-Ci%21}78+ zs!6ZK=y3PpJ$_)wa400w+PqYv?+(K9DyS1X!$vj3erFco0iE5oTnV8SSxwI3cr)29 zzM#ckFN{`?kJA67LeBK1f&T=z6p{Z`HHl*1hX6i5`wMS$`qa>b{M1TJ!;g$yvRUhX z>h1BWrn}&^^W%A~4w=Y9FE?yyOe-dVTfyU1Tn2v{|JCf)vmI|abs+sqK7vfY(bPHC zp=Dk}0biw(m3&l=gShW&`R#Oy&G;S9#ZXTQbwLlwVwQM|-a1oi5eTz+(-8dTfz@7Q zT>G_gWa5jKF#R7&TD6OwV96+NCLY>X4VypLzs4{~uEs8+im zTUS^l+U=uUGA{vrLZh#W{PFgjj=;?B!r|Xaah<8AV|U(gpSMG|L(e^LSf0-`Aj!i_ zJgGIVwbxZiKZFX6dJ-*Q`zW`tn>ZzHn2NFhgKagi67GTB4jWE zO9!N<)!bcbxbS48^S3Y0qlDp@J^rJOQ)=n#d!3{W_);EP%HYd-NTKp>UxgJ}COdPd z!FpV@dbzYv#x{!UarvMWbUjx?iQ6Am)7C6g`uoWrZY7k3{(BWYv6H>f=%@%Irx{5< z&JPD46|t(RT(Ls4Ilwy*Az-{UG51uC{HR%}*4+H1=Vl%0rrFF+F89f!X5KLb!e{a6 zT#POyl7=NxSX8${LN`X+ydl9aLe<#>^OegJi1_N@3VTYOEhaEfCvPAeaIqr3=u>Gf znWoHa=c}bQTMOo!Bkk;SC=90X#$-DUkMtAd(cE5Sv9?0fmMF_l9PS)vs1u+-Z1RGe z5O2feQge+aNKawXq}bx?8su0l&eK6)yc5foagdKrVx?}Ygcz6Ut5P3*V7d_Qqvi&$ z4ytsR)F%znCBS;Su-hg;xncyzxpeOB@@gEV z`)=1V7Ou|c@a$4VoOhK;>oQ|AM4{%~oRs89W1|;=2kJh^^CRHkCr5mw(lVXhiNu@O zct$1lIR`*f`8TFj%EVycv8r))?{*&Vkof|E7#}JdW86b$oufb|eZE=72ndD<@2HR+yKL@ZmOiuCF_Ni-^mwq10FmWCiJL!e6 zOZ!dicR%ZQ7`Z#BW;DrePMGFry4<~OsgWVP1D_}Qw2^^ai0Vx(6EplNJ>d*8<9 zpwhW(;of@ov{?^1->@k1_XLq|T6sZvYx%{Z%K? z%j6Bf=|vvm-wrmYn2RjvAw zP~S#O;WbJ7lP=zwaMw>Vdy4$)k{E2tlYS}BWi93EjE*#lO=3c(jB))zvp z$v`qg{EDOl5ukfj*Hg2&9ppfs>BN3aSDTZM;Tux3=P*^cd1e2JBHE<@;S)EjQ@OmViL?sOWPI@Uae2 zho-KO9mW0XllC8??bk4nF0q81JprzCJ{*|48*4(TDIE{NG59&}#f5uKsPcGcar|zD z`PjsvKiL^3!~J4~unFqSrdS?bBRtLg7kQ|OW&OV|^I|<<1T<~vw7m<`b|*c2?L$W5 zB~HFFN9zELkHXygI$nzZoS2EV?!vf4!62i6idG$gVDW3pp^pD-vW!#F-9Z6SY^P`^ zmL5-9eHq3O>`&Um7z%O~f7rHM=Xn9Xw`{T7R(w)QqM46WF~UJ%=l*WY-xs}9n9k9t z3Gn!^3O$*IyGzmI&3$2gTKzJ+OR|-PR>HY{+ic6wiEWh5Q$1_eS5P)L$It@W=y4wT zbv7Q$+lIi-VD1aGB8K}9t&qYT$vpE{%R>^$`iP-M{5;WV2W22Z@TG#I6?jn zZ!0cjwd3%7^QrwdbnG!+5`y@po?8R{#n*9AbIrO)648&G$fe%lK1mQ=%Gc>W^?vDb zVkjP5ZyGJQaFx>K|J{`iMoyHW(RvGHRH!RgCm4G~oh2wCAgdst<$Dk!CM2 z@vk|H>~}{3K?1OO1=#faaPbrZKezJfy-+I=bz+XuggpHhkP355`w{Xnx}YhaMFE8|#^7c#Oyi z;yDS%;2YZjOC(NCu<9D8PA(IbY;irLxHSWHyo3awn|*f<8jGv ziQ=P1+g8iFZ^+kgEXOWW_){;4YVRMuYO|Jjz{juN&yC<)T`3rhhTqHg2=s-(%~v;h z{rH?4E49dvXjab1b*V;Vg{^GgQqinh-=_tO5L>KoTRH**zpOyr-QLQH*Irk4D@f7< zVa86qQ%J4oR8IpRf_L%rsbXqTOi+`IDuXEU!p-zf(Ur=L_5=yP=bgY{w(>^obRL|w zL?z*Ex=~{Z1rW(L>qSVyD;xRXIBX2tmNNr#uW~gVTTHQ)CX1TfnN*TWA3gEHv4#8r zbX5WMR(nj#RT6XYy$)-;GXk3Diu{Bs&b1zY`N0Sb*5*6m{<0#=$+D8? zA>K>7OQ?+!f&$t)#6)zv&}PfAG}@f)&>7J{y$z12;U~T zAv_O>ROr{n+A@cuOJiyH%@#h)j(L&qS+98P1v-KAzqC4y`WNKoGN*y;N3)E=(8qa% zPuYv~fn)LXX}!+V#pKCicb{DFcb>nC@Y8D2`!_E5Et`&9N3Ky9V;5JheC%r2lx1i5Yy(-7nkE?Pk z){{O5mEI%p&FpxEZcuV$SH26QcxYD@);C^a;9_|kV zvT+;DkH4kNo9Qo_a1C;iRj#dQYvfun9(%w*)gz6-x>s?g*t#u9RJp|5r+U#DHtd@e zRb>ww$zmgmzj<_O4fa5~SNF9}|F6e0hzP^(pMf^NHJsjz_pTr(P=)N6X?~Q1gW`oR zVlXlJDfd>jvb`7I7X$TT{DF4UEl^>ogIRT+gE(|#zc9$`jB_W1~~#-iJ|!Zk$XMrS!rsL6A`ag z(iQ5y3f=uE7lgy5yzaZF4)?B~E9 zp@B|sZn&bb{l8h(izn)|XHzd4mtUsJJv7J65<6@a7BY8q>ctzR9FPmbL%0=~Uhhx4 z*f3Vn>z%)%4VCdTI+|+QJ;EJT=0s2bUdVA%#bIZEJaSs6WimCPHu~_vC2AVlFFprn z(8|lYWsW~8yFaV$j<^LDS85lGAM_;u7ywdW5nOuaO&2|lz5VvKAl-})2PoruuvX1G zHbv!hT1M?}qo?ATndFZ&Z&y1^NgK`Ie<|2ec`_f~c7BwvJH#Ga2(2ya9$8>M{y>zC zD$IGI#s1*pEMnwnEnv*g@XZn14v+4UFAeqU*w6mRf{0s7A8g)q9gcqTjUot455%n;&0#RjST!1#>#^Jt|NmbFm5{^AQ9)g0j* zai&sVYaJzuN;_Q9n5T``IpuKnlu6{FgUkc;axq`{fyd)*lxrDO=w^JCrSASyk;x;m zUX0?E>0vrf#Mqp_X~<}T{{lFj4{;$l^6Z%NtE+v%pk#K|)v&9ad(+sQ+E%1`3)yPU=`y6x_=Q4ZJky zZk_~xBI5EE6Ukol5?dUrv)l5?a-}czX%#8^aZ2z1$8)WUdv|M`XBPAlTaX)Fivwy~ zbm{fXDnxH|R_6AJE*Vd=54%t>NB38FZiqFAu!cS6t7Co8IAm?)D#&zMP@4GgU63oP zfeyAjq>YJJl{M=2fF<|&m%PXnP4P5EufG&DkJ2zq#a;65+~eP?UK#|QH!b3Oy)NDh zvU1muGh0jDh^vYR%Wl=(RKD!B%rIEA;-_-7bGG)K?cQVa-!7EiXKVt*P~mQyny|49 z>Q5cY&hgH%-qm7aarXxv+V(-W26Y18cuBa=1Ie_XGRuhzFmghaKkozSYbiK^lt{0W z+rgrF9g0xcID?-3P>#{bXJ^h-((HNj$)7_A;GTRQd(nAI_txNqR8+Rcvl$201Ci~e z12l=jS`Xs3ul_NJSP?ks#xfYZeJzSF`(oUj_wE$@$W<=_1J?EV|997BP59<>o_-mC zV*=Q!hv{=J0PSy3{fnQdcBWmKT@0UY^gZegUTXc6y;+!v?bL0(o%?5WacRG|faS^4 zWQV4zIwqNP;vnXE#acAI|2%3a2Gj@VKZODT(!KMsC$ z^(rrW4*#L1eDz-swCSES9>Ox>h2Q!PD6J1S^b?)YUY9erzNt5U5y?LEoT(#Cc%gl-u9TM>7a|Q9|vT} zbDFqoUj%4HNJ$!^1Yr5`H5lRtv6zB>!QVpSeqlYX8GB(Z2K3jMXEYUQnB7uW~mH?F{?g zp($wVJ?!DqL7H*$?-%KFV^CE3#q&^9jBve;9+#hNl=rN&e4L2Zl_d4#e#=BFS%bmu zkn0$Ci?3p$jl$v8arF80QqIFh`X}oHn5yRZO~S179-Q@rsxKhV75e|&KYfpa_Yol&9` zoLP*0^}}?n!dSk8Y!-W`=rnUSUSPi@ncyQle=nwN7}U4sX#(yWoGrQ?#0R3&CY|DQ z1yEvY_2RP1TXl!)hwXCx&wa&^k0?Ckm_WN*V^@kI$9wczKVfdq#(2)eBWVt{D;AG+ zR;Zu%mW~Zim0AWS{u&M)db}YalBy_<`w6?BJA%-YxUu~%6vA$MCwPar<8{(I)TT@j z?$H%F%v5OkLZ}J8U>&DZ=jX3{ot5nf8>aV$#Jn?z3;iMHH(m;vAiU?*_0k()kDJ4A zK+T;Gg3x{##2+=y%0QQ+Ui zY9{7m)}6+^R`JJ&I@|M)S%U%Te0%ZwHuzXesW{0BnbNEC%;()ucT#0fu+Q#DG9?>% z;rQZWx2CGcCe>5^t98<8erdf&x?JpvWSX1u5R?OC#ocE|mf*Dqd8u4=a_BTA-Lxh! zlr%>=F(2Rl<$oL9blO0Y->3kc34ZmR=*?Cw z7A~1L4|yu3Mb(~!k9_^6KY?hGv)Rel`zNy1t{3|eJhL*!%VJ#<8E)w$FTwWOzsRVQ7JqA*l|~QuRXNyJ zT}mC~^Zj)T#*4>Gz5%r~}6k@69?Vt>kKZ&D@3^osbfqh^1n>EVf86Z`=2eIq>vrfaZPb zv5AVCME0lXSMIA_pSumnd=}2xd6JUPoi*wtSeDFT>Wa=O;aifeJ{!3MGPFYe%4Z}O zzhu?uu)AaD((jFq#Mg&^}c}7Uzwn?8FiF)7%kB*JtWN-<};O%%Du+7eZlu+BN@YalQhe*a&2p+ie+YSW? zt(kRca_;`s&`k`(hTXxx%`9eze+~d9QkBgQ?tixa2{2Bk=y;2%8{(p_uMamyj)~Mv zjcE0a{svpC$65R*jau?me9V!$LkkPMqjyePrk@EkY1v+TI8kn`lPw?Y^rm~!0?Orn ztHW~!2P3Z=)=#Xtj?*Pc*#6d)+OF~+0vRe_@|w<7rh_(il7|KMCH-dMP{vfoq@T_l zMy(e-(>G2xZhct4RSayP{J97w5E*r+g7UtXE5m0D2ZK7ecBe77c7woM<*v1(>5KY2 zm$urzitJ6#WuaUiI0selO|W4r6HSNa(ta}zgXkeC)edrM3(6O*`lqied5s$O?>oV= z;@-V@YYapAT?O`M9{H1kI@l+Cyk-Dm86(~`cZAeB1=;|El_s`o6Sfe$VE9}OH6T=Y zhHVA@WnUvY8S~szS^B7kQHT9VFN81AtKINBV%784u9!|VFfF(hlRkrNdvO2*7)zO!7G*co#s?5 zQ+5M2?tk<9le6aYV5FxpH%;>Rh${Q&Ce-U6Oy`^SQ#DzhKSonmU76;y__8_e!aWx& zoNCBWJe%^h+1NW8=i>zZ{_DxMl)gg_oN=4d=>SCPQoHvDoxr+9nXSMYoSH=W9@J3m zm!aH-H%;5(>vT_E4LXdy&N6fu_8u;#XVR4b-o+ZTvVnsprfV@s`-p3ckF^iSc^1+b zro7v+arVAfUhF+jVsrtdyBuK$9Cynu6&lO!X!5r=2uE(r+H09kV$}i6iH*vUZu(K~{e}p2y;ul))ao$S@peHo zg*4e*x@UJQ3d|H6RBu0LaoJDJqU(kOd~$$qq^auKj?#E+Q)x53rL!0(n8D32Rx1(S zq5f4it?l52@*Wv6G|_F~!+w*4;@>sjb30`)3#a_c3TV4Z z(#i6}Er4a9er|3bWc1HkBxpf9P(i(emSFLF*$E|thWb~hZg|Bt^`DMD*JS6z0LDnK zAtITcM!*JBaiZW~Og~)BArlYSe3sBu-?_9X!k_A_w;S8%iYUa~U%1b$os=K^(KPBG9YR@oN(=YdNJ*nG2Hxi`~&tMH+rP}d1kux3Q z3hRB3oDynv5-eL#0RI0`xqXJ|zYhXEY_8=T9W59@>nHVQprt3q7OTZ!Uq@5DE8jh? zG-$sVI5qg~)$m7-%NA2vkM}ZVvI<&~XkK`1j=x-jUxvm1j~>&H-Z0%+A1RpGJPiCx zm-NbZvvYq@%{q%wnN;Mq>_qk=-}*pNGUL}FUAf86V{Jzu=CN)0Hw2%|Uk~EV(|u4P z{xMWLF@w!SJ1&p<3WdCL#$dbex9k)@jKMabef!=A_C*K}|M0 zg-K_BuAX@)qRD<6xMgMS0W0^`wVY!-PnJ+Jx)UMK9DXUF1R?!$?Opbj9J9eq-W9wqLOUvcC4^Ut?M;W=O==5P^FN~Huo zNP&xw!E+*;5xqjA*VyjG+5EX>C6;U#H;q@<9ec8%#o%x_U$KmOF9|0}N$IaI&^%p~AzSO4kdd?evR#!x@VIdx;!~dgrx&Hq9Wh*lb@1ImI zCE;i|7LKS>{q^s5Q8fHlv?@`gX@65%-&HCbqn&rN6o_&pHi`gqWn0TI}KgKqfD*1!~I2n zh2mxd<3Xviun*;TQ6Mn}Z$GVA#eI}TbA$i-E^+r1@|i6h#!$QcG|!GN+_MA4x)L^U zJ1t0&!Cei|jhw}9JR1cGuv3~&-tC#At%;rQjp*ESySZy z$no?lx3eXvai1?HrQr8|7&4mJ`iE%=L((<I`VV{vW6qY>|jKQ>e7Bu#-ViQ**IUfBDfg6zIDkm zv*M;l@nq!~gG?msR7~YdqSAA|ZPAwkXYf*9Vj2)wMek0P#p{aRv5HWf zb6=+aepe@G`IHuRkF~_hsr9Q>c(~_+NS(lhHzm}?D_cxQm>#ptSqTt_t)D}zd4 zHI$S*@Y7~~L|X^-PooMc4`EmMt3RD9y+5P-CL}EsP81y8ouroHJ$-4d5n|dk#)}T~{03l&?N>HenC9g=6n5S(a|$ z@4IEmF2-(4Vx=6gFQaAakTH7K&@R69S$gR>0L0ndNID#3Wt&oO`#6(e10=*&B!`v+NQPHCIwFX=ndh7n>4{%hZc#X4kj zriDc6?tlz_FvbnTCPUP)%SkxQ-wnrB#P4Rj zj&XnTb(<}!R=b3CLWlq@yFwo*kfH?<9n}9+YKEEPCy!A=6JGVjYKg6XHvul>%i@$1 zm9hKc&=tQQTVqe$SZBpToweJo%6}S~U@rxRoDB)oa>Qf{YwJFZ)gnQMZ`haV`*2GM z&9J#oRK}j76d#b_60N@QkTx;T)A9e6)J-%%WHuv?tmtvYRG$lf|MUC&M?14_;2&(e z0=;b`1kvY~VE(+?(J3m(5?OtfzMuC#J<09FvaxlQKKh&hTh*ebL`R;{ z+$-tR7dK8%ct;I}LUowsJMM@VZ;f|Gz&>=IG%NcLz)bTafa&E%Ab0QZB zr6yG;DKgq)d}aV9%qzuzkvHn%nU0<4jL>ij-9tgx#VN2mPn6s+ibKz#LoUh9_M_G< z)~KwiLUA7lqHUjVUpf^soVEx%E3I_)XL-oiV14^{?UVMbP;!o4B9q4yF00^Y(Pup* zZyGnBKEh3p7Y);44Ls+U$AoE*JO+N%pC;Ll>t|G{a?+uuJrC5lxQOs!_Y3URQMdQ7zW+ z9-I85L3jMqMk|H_^=-p_8g7p=0DczSluiaB3)%-^lnvxf z9l*9zCVeJjc95*i?iC;Aie7Q%;=bX%_$W+9ZGi7#_7*+OLdDX7+EYLSxql0@hZ1>x zFKX}v^a8ZXu66&bRLrndvg||{Qdarwi*GWZGsEnEypwroyZQyQ^q$D0QbUjYKlD8v zy_)Y7tN6`euYs|(1aJ$ot0i>Vv~r=ewb!!mO$GT0T61>#S2!;R7U#_+!8<=yHzJjI z9s(P?Z~NbJie|bkwDd!UY&3b|?({1VQQ!tqSeCz7QDe{|u;v5xYdaUMTiWW!oMWfj zEx;4*Wl@p}Yh4_BmRte|;|cS`B?-K6mfs+*GlN4>3>y^AJI%HiGxp9m#ii6c^(C;D zY->>@&dtPp{H6FrYkutM814f|VFEacn@rx-ZU5?M3HpD`s~&g67!}W$44lhqa5C)C z1-#6*rW#b#}P}V!<;9p$d3D$wPC`b>{2@;%Coxi4#QXOK>9-{KpWnT~L`f&(6;kEQfy*Dd1&*WVis_$6~AHcw@l*Rd*6m@=oDY8BbhnK zGQgMaJY%o3C=F^s%~~;Ua7j#l>YoaZM#Q&+I^8b=dneWAj9!EbH&$E_UodO07j3lB zn}IiSXZwusuiWi(m`u52{W3n|gPLKe2WSfk=xC0{x)`SKrfxI%q3UP;&yw_Rj&8;N z?`fm~Alsyx)H?c-k#kp7H4ll%HOd%Z_dTxBQlh0d(Y>?0@uN{^h9J0_EbTzc5d(k5 zb-um(Q|+@?`?sFL5qvl4WVR2S* zTRBZ8)iv(x0-WdB@3Rc$QVLq@3@{+oMfZWKB2h^DyxK2fL*F&!<&Lkf_T=B%^>F9T z#98owUAuB07v1%p{f6k1X4|`8fH;2XKW$MZ4O@&Vw-nplO}FuY`M7U2&D)UuZz)c~ z5et_wcf#EDxacYTU^Lx4y5gPd+ zG*kWZjk7Nr9S(N9KlXbjy(?2mHe7O7DMg=KjRMfNQAS#ar-(6}^))Q@hz zZnM+Z^Sh#b?EiSyaAfOI;9KF2=zot40M~~4d?yg8rOZLw%DRLjDsY%8zSg^;>44_% zigek_$Oj^6XVsLeXn^u+^GV+DOB98v@S+cA`L8(g}&Te6^_ZPFLB z&E*H|xU$Q9!pXHZCg5h0TVooKkmc2M*SeH3N=wX{+pgTwbYk)4)Xe$Z$b33YC>(|T zbZ@g__S=plUe0u_HrklXdnV+f#9&)Ux4&oo#Q$lsYv{$A4(=a~*8&1y)uLHb>Rh>( z^Bd%{eqd7al`chws@5PVD8K+hTnMI^_8sIy`M9e44`5UUo8g*nPb6t;fA!A2d z{Z$yKzh7o?_pzm@b_L36KI6hNSeu-T)-Ir=?`Y~wm6`M1XRzMZ$UbF+0G$jr07x1X z`z^D7RhY*gTVm3h3GtgZRfepGL4c-y?JV5BNXyZc?2>1Pa@y}6rG+9J#ZO4Zls^5- zezL6=ViUtEiq5S{AVsygc27=|Q(@R$e}j6lHx+h2YGKCY2m9vlA`bV>tEe;E|6n}8 zHl=se9IK=-Xp<~6X8EsZ?v4;5bAPGVqqy_{se29n*3*ZcuLl=;*kn##DfVss?By|( zI`jD{vq(ZLC?%Ax?9v7BHgMfTz9hZI0@J*u;NI=ray$~GIklq+u?fXaB>MIEudgnx z_0AnIWP;9I_i}}ZL*zQ9UEI9z`Qi&#!>j&GyG;&jbFZjlp5+^0O7G~~D&GIq_r}k- zD6!b8fWcDct3<~~)h0jFl$APH{t>0wBQ@L#b3fC{t3MoUY~*q4w@Wv?eSI3M-pU|v zrBYy~aRv=kLwW|dXbKMTOu9yc6}v4k>OI&IB+hx6+nCD@9}sz3i5$_18fSIN^`S*u z880L)#@eB>oZv<^xPy*5KSGCRl$!*sxh>}U_DS>SJF^ai3J{RRfGcC!xO3VV2W1nT z~`)^z_yO{l1#h)79HrBq;mD9!K@5oy5!VYDI*GI|UU5XngnY3UxFqg%Qh zT?57#of`x8&gc2P*L%Ge|G>Df&-adV?)w}=QKuc`*;cA{b<Ru5}x*FNg4B&OMy`J?zJ=(Oug8OZ*38fQ@gnL)8TPK^(1 zc77R-+6O+S=gGg8-8y$tDqLeTH2L$i6@_bB)}vft4M0Y`&ZUznZbRZCwHS#?WhWe{ z{TWxPZPW1rqP?rtSpKwCFSpHwQ5%%?Sepmk2vL-pI87*@=}SN!s~C*;M7d#CfIpX$o4u8L+q zQ9Sb|9#g{}W_fFmu?`AX@Yik=yw&5OJ9^#zR&HEMfLp@2@6JV+6-JJyv%-FJiuc>n{PpSr#f9vwG{l1yE`;aE>lNIku>(=Q38a zJW^JDhWksUp^}?2vT_GE7RpeQaM~r%xj8`9^1NLt6LY?brhM|V&U$*h9c)|l5MqU& z6SDP1D@E(iJ7V`uh_$kN3obBg#0 zWwlnF6&Nm@siK`C2Gm~VBMCl(HYb2wm z^YZZd{Y6TXRQ2hLWMbm364l^jZerVdp=-Ng<uKB^~2nnk*s$I}Fq z$NT$CKk(m%+w-{;>a!&i zr5Wn6xT65gnjaP>_LFOZi49l|WjqBB6e1|vvDH{VL*XG zCMzpAMYVFdB}=Og7P&5ly7ag`7VTvFZQ4PFVvXKP`4XF1bR1j~XdA4Br`^G_jquD|sfxGi1DYLSdEC zcQT??-CvtNyK&a~1ZVxQ{jNG{Et;F2UH4pI*8F|3A?{PoU^LHtZn-WsW*vdFog{zl zsGeeXiYMPxb&f$Ju`dK^&TV8BENBax}8K_hTu90IOi3981#)UIJF} zxnSB{=ht}tY)fpR50yF5clqLr6{Z3ZlEjJqJh75yn+>d>-4f56M^>`` zi1|I*e>;DM{%072g3>kP7_;XLUhE2E>DoscYA7P!nChxC>VX4i&a#lHX019QFXs<= zv(0utc73hni04)6Af&LPk4teSTFV}?n`P7b+a1wBoN`cyr+6CG5onuIwNRp`HW3CC z4n#y|Cm{*BDe`MBsYbpbRy0M6QuJ5HjQb6MwZU&WlA;DSN%^M{@BN7Wp0n>q%f(+N z5#Ko+-blLza7Jth^z8>@vih+o$z(3OB;wL*0~g^bwcyvSkKe81OR5S<bbaTGDUKSA{a61L(sxpq#Su6DndNUixh_k^K+h1Hil5Uz`9_FvaDN?ypyA@_? z|K8W@(0JYM({E!Wq4}~axs7KB6CCkI;xRF1lapE3eZVOd0@Vm{OYu;yTcm@D*r86# zh8t#Lv_G67d?y>P-H_mq`g?ox$XmuRo~TN}1i*Vo+v+)|NMkKyZ!-s%?cuY)izwFZ zDT@pYR+H+u7h44(EZ@P{+8S9LS)uw1Jq50m0 zUQ*qC!qi9{SB!4_va2$}LMF^X4hFz&*=tG3t9HI8xS8Gz8K-t$R=fUkk^{~C;MH+| zb>(FeDbZOA&dmyvU@m# zF-#8)9cZ1$w6yOUG6{C>Gi69GY6jZSpGS!lR{Z!x9j=W|>5kQw<|3B1$ZN4n-vrtD zYlC+x7+WWrgK60)Y1lEKcFWa3@sqK$pqFy8(T3j^_0v)V*^>X#F#Eq}mz>`J@_FQz zlZLIv*8{gDOVV(26A+(vsc_*pIxEMrhN8QPVogMKG%XbiZp$Xbq1BSv;CCLBD0=e= z`n)(J4khu40^AFPDMK=ETHjlbb`jIuTWpCG;ZB9D#J!1(Xjs|9k2V!H@_~1oeB_c{ z(RIHS3AuBZx@Rbk3yn1&$6480`0oFm5JWqjQ&2*+MP~t#q2a>g_{M~k@PC%L)(&O0 zWpXOj#arJ%jXhrynR$#VO@Zo#sddLHaxwJ}w0qvSejeoeQnhQou9pd*>oYF$q8R>- zCQ2;YIH&_A5(dtvkF%KVYwy}Y7o~FOkWk`+;U`o0m`C3JJ7rnvP~y!?Dxg!7sO45V zPN++Vs6Z#(e=<9kQ?=LN5Oo{fa=bGs!IRBJ<$1Mn^{jZ4jx17t~ej(j6btr!L} zRh{HNkL1s^?*6KW%*|o6HB$!^Z@3=`&Lsj*54w6CXg@nS>+tvl8b3o$71g>}c^XiT z5bTV@uoVf_jM)Q`25*77x$~PZ6yz=iJEPEe@qF_SiR?YPO}-Dd`7WOG&CvE(SyMJ) z|Cx@-d63<&g8EY_Yjlgd>zs!1bMeRRf1ZM>(JNImvDMs%tc7|$4j)R-rAGYOyrqkL zCh?<362PK?x2$+shvCRp=q{rQ4C|}X_+bHrn|kvd8P-aNhJUqj^fry`t5lY(TPh*i z$X7{^@D4l!G)ddGE@0q#Jx8)D=v6!CK5v#hGBt4YFlv@DFL(yqpoRREEN;gLVWi65 zERFd0h&u?(SO{BaJON2*&fp8rEOE#?RRVt~niFvF+f+x(tH;WSVhL5JKF$Zwgm67L zHK!mZe4cnZ-YJd?2{u@6rakuj51b}M<|Mn`wid)XQK0=t1H+NlRRU$Q0F*D2V5(Wg zV)Pp(I>S20B|bFxIH6)UiY=?)eD`={-DS~^s$mW#gOygq`g}@xiePnURU4hT$y557 zWQMYC@RqJtWozhp-&P)Z?EMO5gzbQ8RynE*mj8*kTEbY9kADT+2s$zy@z&|{TZq7S zS*=$Z-WDKM+>RsMNZ;0n*b5{_53Y!=`d;%WN45li*_#r@Zsv@>FGfA`#*t5cRX9vK z`FGR|C~bK}C2gC?Gc>cNUIVyBzv29j0M79#qp!1M76V4SF&}s}WDS-H&j7$suf4iW z4>edNJ;=p$^pj(U3WLE-inwBjjv*W*t+RTbT6Hb@V6DFT(jZH zLe-#08(|sc3FtZJ50rCYx1t^&5ZCL3t>^_{7AbpdIAVMePN=BTrip)}u@9h1Sl>r! zCRsV|fxR{>{l!YChaS*n(S7pbx;2>1{S;yGRk+9EU5!9HVQ5$V>U6o;+mmG*n1J_| zvT>@b$Y>yMjNHD*aZ4QF3fDj^-tS*?R z@X}+`)(0Q%3CDb-AwB9jf9#atcw&>3WOb^68RLQXV=RVOh?tKaVnxCJ*=WMJ)O=FP zF{fg}z}e7tcFvK4j>zxI@90&kenBC&Z5}FY# zH?iZaK&|o+cup`r)lqcnhV${@q|sG+)wV3Ek{ubmi$ChGuKRpfa{B8@QQLPW*XXa1 zHfrFN=0%%U=_N~%GNp)=Zz+iFosdHoHEp#{UNi}^HqzCehY8U|UlZWBR>z&|{gu(~ zKlfFs4`}=6#dYZshXab+cov!Jsckf03YVt*qT>&{nW*g$q2l{3+>(r5PrKqv!z11} zKT$orf-)ar5o(l-jVk8)Al5Aij<%XCM%Hh=#ijHbMHQc{0kWO{6c>HD20E}Vr%1@* zY^d|=9&d_J^6*ib?q=xGAay|(CIJ#CNqi9{HOA~5vmvPgnx~sIn#rl+Sr0t3nr3rS zJO8dCcYe{xKSOa#rB0+%_7|mr<5&wl*cTe?!5&=HpNo?^EB+Rn!Q(9qCLjUoIWSx{ zq^sO0ZmV{kWn89kKYrivX0jK{`OWJp6x5T>`9Z^*)7$r&iWv>H(;-dnk-e3HHrHh_2Tmg27gL}aLR0I3Yz=}iCvN8ocf6s06Np%ZQ+r_5E4KR{V85JFON5PO)q1E_ zw;cIY-u18_b;_y6m<-wPxL^r-OIcKBtedtP6^m;sz5G+PLzP8U;jT;dg% zGiv6(E#jB`HYs(j*>7_m==JZrZKZU(C!E+>%GaL?vno%$AbP>1TD8V5iXb__ z*EkaJmyP!CQSJfk$4OJx88pqKkt8=#fRSXNd4x#H-sP?? z3pPXMPq^h6h{lP(rH|&xLW0n!#Q9kR?&~xN5eH&z94lCdM_HO*+yE=?P zb9xAN?X;R1?(etAeliqJUZl7LA}n&vkshx3pBrBBv`)mv6>vI1-TWJQ* zg`{i7x!Wt0{nvR40#Tr@2Bf^1Ze zA78XEQ9vZ6TBH;2NB3=303l-VXLSooS4#&G<_H~qtjvs--fHgdVvion{NN-0CbGXB z@tz#m7Ad;^+oRXHNn#eZA~f;@K#qo-bGzNQ(2Mz?=w4MyzVp=K!Wuc#2Bcu)?*{cO^4}5Zhf3C!zBJG?xQbfi1%>L*#(UX*e zabEas;S-tdTDQ9_8+Gnw4bKfgV8;7vb(da>+O>D*-~%j{ov#Ihc9ZeDt+PSbgQ_0y zqQFK-%-V0JP&10kU#O%!BHA%&9yfaY^q9)z1cbl$ucU?8|8%lP|JBKERRm1@tM1k# zeyHkVe}S0^QB2}fvFlVJeMCss>_m!R_sZ6l^0FtKP&e!C)Kj!-3B!v&IO|m-Fkt9z z$J;e&qu1xx6{Qu@FdY-hDxIuOw#lLqwwjQZtoI~8-!9CG9@-(_Zrl?^p z8!}l$7EJaY{O0NGexrmxHPsU9{9G~M-NUbVn`oUl=hkP2&W9yc9GzZ<(IAWCirYvL zkIM(rhS6p_{45!dinTopiA0>8rBA|#tJUq%qD%aR;%)*qzA=t>oy&EA0`- zn$Winr@4g3803?SGm*Ka=ip68L&Q3vU0FMsGKJys&$+Fl3llFkCZanp%x=;NHAeV8G zXoj^Kx5M!XK}dA3)Y)ES;gzo&5c5s=Sve_UIJH(^;G1oS&1%3S$N_0EZ zuUkt=969N7eL`4M!d_sd`LhB;3ewbIS-Ja6U#v1~z%}QRXX38FsTW{iD8z0uaDiU` z!uQ?C2A-0aAC+)ZDhELlS(}ZDr43~daJ(SRt;B$Of47PdB*+Ik^_edhSSuJb#|q-HxD9)XhB)N|9fp?-z=@~2gXHop|uSn)u> zQ^(zwU&7QaSXyi2H!8IOwU7_s0=Pp=UGCgE5ki9jjD?8wq|A3jlT^3!6Umca> zf=nTk^(E^|Mjtu!YL6!?OjX>^jU2E>zst(OlSh^QZ0wafvlWc?Z_-BELidWY&37i$ zA`apH@ZhRA=_L=z>8@|c^YM*ItoT-~*gS0>5=_b*W2@I@sn>nij`pV5nEe#H{-T~06L#yTQ}Vt&Z#nxMKF+R(vi>^Fa-#Zl?r1(P z{E1QPtEq#XqYB)jcBb6mY*M4=3TbrfZH`duOrUc>X9>Z|ASp@WJUO2!YWAJe?2EF4 ziMWFirnc!oK>WrIJl=w3oSR;DaR9NrCRd=@gEXUy`x{#mV!_-K+9$NgR)(bV%~i;0 z=#lGI^u89)dKX#B@XznZ%s1#-o-YpjyXb7BZ85?{C0`wMN1kZFh==pK&AU!G3Yc858xm>uT~k&|CCgDR*kles62dqm~zZuqLuH%^md1(7VNJCw$Jz8JuDu*@T^>3jUvbMk$D9e=Faa08O?<< zD&z9eBV*IT8){B1aMlXfmOCC%svnr$!N83eR@1ZM^Tj7_J!K*kJZ0eY)N1$*WCn!Pn+L_y1x0NZ}K9 zMp}C3?E(vG!o@azZK-e$DgQpNNj8r}_z3T1Ns9{qo{&lI=-d=)a_7jUrwT>%-p>1! z_G#g5lwbe!*5~b>gk9z0BI%b=FdADpdHaL6TAdGu^F_3$Cf|K9>HtcD7rj1a2G-gr zF?O(B1x~$HWAp54-=3|nru?TxSz>qB`MYQ?#Wse*8@mqyRNd`+X|j!TidL1FomaML ztq5egSm;#(VL=VebSag>|GEJ#}{X@t|^?CjHB zlYVcv(loji_HkjaD2jIbii=KFTFsQ# zUc=JD{kU%>TeuH!M#yN_Td?7y!+5wGBicgMw*UWZ5SmJPu_XkVA|@M3Hi&b&bU+~M z!$DJX{-aY%{~%hoS*np>d>C72&Qt zbl@vWQljIERKlN79(d#tofNHX)or?mb(10@DIFM5xnom5D#N20>0T`<4748U8Bojf zGttZT`SHhTB>2o5chYOD>QJ{iic1gLR&SuEW?L@J>PmG%&Zl7S&)BX!h32)Ge_j&r zbISOW^o&_PWcq687X-KT8`wko*=@h$#r>XhjcLJ6=G~IQx0X z+d2%Y`Uw^mKInd(-RlAW%0;ShCrMkrP_&*(j^0vBNvtrB9JJ-Te*(P zKA=`;7CJmV+GfdceuXC57F0E&v3x4#^kEg@-#m~ydb^a82TV9D7ote^_SLXF0C_&Lpc>6ci6po{%BpkN z{(T(u(On+>ii2wc)FsXwKDm$y8JD@UMfJyX_n&hfoL}%Qsfj(^i7jrI`_^PWkRduO zR9usO;l1t8Pfxp&8yOhKfw)yfPvbGuqVSuZ)L$Q&)5j&vR!mV>1XE%udZ z+}gpoP@|yt;fObGO72_?Ty}O|aWuIzN~NHB(C&EGM9IE)RhpJ>%Jlhod(Z1xzb8Lt zjW%k)Md^(|?{>Bk;QHDgOT@Lq{;##+`yr(>Y}6Hu;(}kZQTKOFPrppw^hni*raPJk4IZ(CN7qW+Nmg<{{w&#f2hvoQCeb-C%8RrIZ3^^Hm_8Hf7 zw7T0*`fBD}E^Gj8?hb(L(RRggdTk7;zfj@cpewUISoK319?jwk5F6?awUpC_=`GSH z&&|f2ZxXCDJioE5A{RclI*Wz2R%@GMrXELj%W$$Jo6|AA4NJR{Eo8(7Vluhh4Pv!X zdsDd_<D0u~SIqj(Hj7d_sKa@sv02_LGps^39 zHf0ANHOD~~l?+D15hxItqFiJfZW(ST8OV&>E!brM8gVkaKql^*W5>*IaB7TsgR?~@ z)H>hAz!_K&W_D~S?@M8=gV@4R%M@)rivZ@P z=evS0dM+_=-Y1}9f+tY0@$;Pl-;;~p>^$ot@G}*up@e2Hrfj|Rhw}VX#q4XD?^E}> z&I0p>(6{J~YNj7vr@vfbtbGAWEMv@cu&)tl*c=$l>U9InG~6f=(RP&NS$O8VdObmd zd;Lq==1$M%uQ`OCkF9}mW2wmGWhHHHCVX_TYS{a>d%kA*f?o4K>I_URk*8K<5#ZZ^1rXJxne z?%MO=Z`4M{Gd1r`GT;7ox0QamQNm>``g`w4^KSq?OIkJB=*{`afF4CuTJ%^gf z4Rj79oXzMK^FH||N$S(&bE&f#LO}~K6usPhScZE@IMN}e2MNwqcv2KPh6hQ6ruD9B zcuw*V5OBcnIie~UyAblXb&uD^=S;C|q_sj`_gT!7u1h;*DQ!b>*&je)>1f!bSkHU8 zT$R&d6+rT1qs%U&nq|v<;?nW_4q}uoWj?kMvo)C0>$V)|yQp}pJNv;&(S9_MD?N}( zfvF_#G4t&y*T^GOZm+dzO@f5>smCVUpM0h5m7qK!#fj$)7LX0q_SHy4?>*n6CtGgl zbN}9zfYV)WBI+00#krr%88+pyF7+ud@vh#I$<=2A5Db1kHO0`&NaCD>q_G^S{A6{K zuUFtVznpDana+dp7UEOM2_^}%5I-#x8#GV`u6ad?F1h2F0L8{Mm*KL725Ib{H% zj6in>o7*wu4?GI(aI(XsqmF~oV~R_aA7@5lP@SUuIk0U|>Fm=}`9!nt^W|MeP%#w~ zxLlAyj@5&?Iv2d`W`UW9MH<9#d=E&uaFm*}7v!1r*a(QVA1FQK^s!%8-ep3nHsb3n zIv{dAWwYL`QwQ}(a?3&J_K6J+kC)1Rzh_~d{`u}g9P~PIA7w&_|KtsykLf=eh-CHV6YM;wvQWW6RMr8;LOp3I_d?1=Dhuo;ABPW8~A6PaqJ8H zA=fG_B!u3jQf8Ugy`x&*0p|>iAK{RUzG$im*;Usi;t@{>54RM){pNMi{0V!^qtYQ> zrMH6GS4wW|5Ko^s*KeIYt24tM?J-ju571MeRO@I$?nmcvJU)Z`f}QCg5PwD}a^={b zRP^h;XwXvBtoF4qz0?g^frUO^7dtZ=oa@rtTsJ>ip!b{M_BWil#=c$l4Bz72*Xe@d zphG>H+x-(UgUl!T&3{mV$F!*3Rs84)H)AHUiRd*_9R9w#*jpA+@_H!z}R2zr>Ti~ zGf~4B^5(lrfh)RJWed!7v!^P3O3%5!u!)TSBTwuzfH*f_qj@8Kz-h^Hpv9?7aGVE% zYQol8wm`$c-+;WDnT=HHq&Iz@*U-H*R7HJP4J;?G1onJ2J4(wox% z(RTQ*Tx`SAs~lDu7%3m{vS}xxDZ%~&diQzrk$g&1RJFoB+-7k2E~Z|fJ(AP#vERBg5Fx~fR-(`SUYvU zW+~xxw^82ZxAvv>FRK~#Bgdy($V@j1u%LnT{XdKs73rGSyWR$Qk2Z#x7(L#7sPmx0Wcyw8Esme4Zw#n~88zP0mQt@ook+Zr zJ({xVY7o6_xz7oK4h64&1I*ZUkOZcq`U0pMEU?4%NcVNuQyjBaFFo~q>iO9;S*`rW z(BnSEgV(;Cd#r5KCju|LW#J+)vsKn>*I)4rnqL=t6;!`O`eRzPR)UtX1C)k`-zRpM z3r?0sY0TvAtJXwFbjePsW^0U^3a-O$`p=wlrHy}61qA+-9fmt`=IjQ|F_zqG0^DhM z;t-g6G0Eo`jH~y-kY93co$al0{VMH_4}AaJ9WCz4Q9U8Obp&?Wan5HieW~qa#NN18 z|M>u4RzO&c_UoYt%vTguWl~xaN-L-O$Z^pdU5%G{V0@zs-Cnh2^3wBke(t>KINp5Z z&nf#|X8Y9d{vHyB6!TKq z=5Pg9)^h7|jYmUhMnf!W`?l0#gsITg?P!Rj4$)0>Vpec!ZJJU%cVnn_(-mCvCDsEJ zqSjLlLzzwEBuz0- z;>5TI-8D$dpSP=I!%2BFmN2ynes=Z}%NYY|T)a(uA=4H#A67%85F!`S+}2%p*7!qnq#56(mrwP$t^AJ7y1`=5 z$q|1@FsC~Nvvvw3aqa{A9M(Q^3a+#^vnZW>E}sac%6FKy!sZw^tcvC!Q(daIjnwM* z;+veLm2O8>wY&Bq@uJmJkmgl_AuQ}0NrbDsyXb^`^0 z83v&lTSQXtcd-NI0B5%(*Bf9P8JYlKvRaR28V7V$UQ&^Mh?zQ&^i9)kHg;~`Mlt!% z>>;+uIUq^q{da5OItIYzjO4ofH+;J~Td0{%5*zEsjile7SmloMPXE3z9;g5J!WPmj zO=fwkb1Jn#3dJgLGS+9#U}R5&1jP6qBC7I_gQc#D>A2$-TGV6M?YG&bOMhf&svdFD z*xyi#hYpJ_?~-+A>Are!DhyB@JhshNj8{0;*6AXgB{a!_C)aAs7hXZMvdqm(pMEjC z(0pm?n9rA#4@9hpYCz^~;F_tZJ(3_BHBS#Vi!_DJ&SOq*JQo*N$BSKm>#BFyhN;zT zO0FpTm}sw%deMo^e?V8_@cA@o#x9l=?}Nyg`-o*36|l>7acSSCo1(4(R}#F0CbW5ineL7zw$~9CDuzn2PTu z-6QK6ZlgBRxx6ha9}wSe?DRBSAf=&G?+pHSwUiERNWyX0+t>#EtBZ^%lTQ>X@1ks& zQqWcB^XU)F9tjxcFJd`szea-HCdD0X)7qcI!;roFjS$+!c=vfD_r*Znc-C*;^um|N zXk&x-FCvU`&o7!dc*Yf#A+>7;Jm&SA^5U);;68C{jCrK~=$&5yf0d z8{8S-Cbvm9?Q<>@^%Np%Oq>+F^LUb3S`=VDxHRwf5D{S)r&m68gITs)1PC_y0k!cu3rb~5tn>|_dv4D)=cgr^BWDDEj*j!SmC`(r|!Y(FMBG}TE8$NQ6(2JaBx_^bd|gf8bk#8afFf?g zHXgv4eDE+`qkY#&W{=<|LUaF;cxj7DshRx7#|%wvn$ynld4wxz(8%cbwT1?(Ee+R+pBWb5|)xqs{464GJ&=XGebIduW~svkN~epaZj5MgYpJpX!l> z6{cJ|UXwBgj(c1lUEAx^rtKCzIU2(}B(N0hyL(z{eOk2g9cSFu*e0wsX>c~};4}6E zPucx5*xST8T*{m^9$~LTheOq{7kx|z5EjS&aL__5u!*6rB$Ij`$KJ}|ai531D zt{uBMjeRRKwtg|lARe=IG}}qb3AE{Wpjk!1Jy!x|R18|=E}Y7ZC6~-|H7l*~@o*R& ztRRfH!h^MQhN&M?)*YIt64cz;$)ZH_2qCdJTa|{ygg6&Hk=94+A4)WZ?oF{oH^F%2!nyy z50%uV?nVS3hu7FE3Fi=`Sv}02X1Rf;w4-xo9X0onCvA$f-e(!=?^^?jo#FEFkA4ML zSwOl?TET)TJu1b?QsTIMKs)!a}-HGw(NW!DN-k?F9vod>5F8yPC~*qg2B=<7r za`~G}7HL2#VJ#k;n7`rp80W`AI?f92A`coaCA+7C=Z{VaK6zpsLBB5yC-+oXHrb(6WeVK!Lu+QvG~8-%L!W zq>J(-<`;7yV$LI29|*kA9d{FYTTk!G_WnPX6~r9h>Q#$%{zIyiVO-(P8x!LuIFaWb_YFg;AYEy3rFW{itWDK(#(8B}3ZOLHnxmrGDJCN{g z?ZcU9o&PLUo|=meRCT&H!}gJ9x>0(6J(unF8Mfskp8q7u+*a+2D%&PXkw8f#s@c+_ zeJkDd!lQSzgn3|179iY5K9w_#@ z_^>AO+d+zKTR7N_OIf+nW&b8v3NYHlU_0lkQa>!HZ4@(oDO4D@OIEqrn;9}#BK|(7blH7o$6bw+7VryE4Nh3P&YufB#<&cI z7Yt@~j1wVfhB=+)M$I8<+|M7pKX?fiaNmpNFUA8g*f&+)N0bhGwBtDSPp45?;<)R^ z_$uW6Ty~zA;e!AWCs>#Z!0A}@< z4ULnWudMp}0kz$s6*>kb4tO36yQ*I&V#xUEO%63fTjgZL)XGixwMMO=MFa8XwDygt z7T)p9zHGuCj;)j3+y5#M^{0g-JE`E+=U&s^J zz>`<`<=Df42OL&gl33RfcVGgpV7WtImeGu%2MLY0|C1Op+HHUz zIQczA94;St*c5Gg{&L*B)*=nbSWC$=u#7Lm z<$uuH%wPUsZr#!?6TgMh(F7n~2T3&UTA8OM{-C|lG|O)$X0vefo5CAOTa)q;{iQBF zr*wl6?edl`!EKXJRRtJ&wqfe`s>|S4<;4447~QD6QI~m%@^o-BxJ%tygjp$653+B6jp-{`@8WiXu3*K81!# z6x_>JcKIon&7TYPL!`jqr!3NZ9BZ=5Tv454YJbTe3jK4BmKjb)S{eH?dU75-6Cq*i zH*=77JY>;vJeyh5LI^fpv0vL0s(y>|`*&WIyb$jS65xKQwHSyOrQ$EY656q;jxs06 zuF9Y2ueqSXQla{lGG8Apc;|%*a*wERvQj^Po5{vl94rlM*oG34PW8tURhR^{of!P`KZMDc%Z_xE5fznU#{#_wDQYG1IYk3`)i!d7i+d@ zLV>!0-`V%XPSLjO&N{)8v=A>iaV zw@aUJoExTyB7w<=BjtA~Wxn}mOz*cISyb*pE4VAunAzJlP}#s@X(2}sF-KlG;7vV? zJz6#nZ@dG?nRjA5&2B1+`~LY64#J1I0HGWCOprNx=jD_J2JJ&U45@Z!Vpr; z>y}IRE9m3AcT5ATvbbF)WmaUc45;;IjXCB~)ri%;3TbgxoBcd}YR;q0A^X_p5H2W4 zMqo=Dh6MziXqYXvoR%`V;|2qasiQ@*mi@P$TG{qKThdnx+1j50<4h|HprRsGz zRFHA0jNo2_N9gv&i4#ZJ;|#^vcOXdD=hngJ#*0gbJjs{|RW>%7k_@XE<~taJ*4a-y z^=t1}vId*wb8@pB!2eP@6#OJoqQql*cJq5+)3Oz(a9O4s zjqM|_Io)vC(u%t@={HjS1zqecDzGQ?wEcCGTVa6uwmX|P7iAuqK;#N2S8`2q?7(hG zFi}Fc@nrWM(-x!zcMvg9{s5)F7%k>pZj{b=JFke`fl~??oV+`rJqWXlIp2`8HmQ; z{}(v_MUiE$T`8@Y`T#BS8zPa>{Sw-kdEdv)N_4VvEgp@Rc@;G zmP?c7(yn))c@gZ}0nA$8U&Y#7`oQr@@nLxEcN^Ve&aH{<<}3MnWt0gUpt(W(8RiK0 zGh*jFyo2F9yM+&NfC_+Ny@(Mf(Ft;7zFCns&fzy<)dy-lB>WHS<`OgC<6+9OL+}x9 z#$McGd=lg>qIDo08KJXZno!$kIu$Y*JE-R-A4j?L&8haQG1>2)c&6}z4VfIJ1)3O= ztc*RfX`1Q8JA&#pCYaD?LB9-ex(&;M6Ax{L>}eq;;3|Se{xMDFaihQ{S*>{OuInAf z-qSD5z2}G8*>vY8@T{D<~2kWQDJt~57ipDs@Utf8Q2b7{pkM~usv`Oj0 zSzO+ND*leaL6YRkqrY7Te;*}|4lESjT7zDurZrRsrSKnQr+{s+gG7#ZM1|Vq-Q`y} zT1)4`mtc z77{YYgS4{*S)KMRg$uc0bB!j$fq`K958?(b?e$j=6QRgp;d{+%xRP`4Y#Yu?m z63D;YNllwaM-p1vUhh^N63$kI@GdPD(H_e#EvxAvMlm;C2yQyWU;d&UG>I=?m=s|Gd`q2b@7Gw8<+chPa@%Y@ib_+-96JX0Eu7P=`F&x z<}TVDooOshPc2LXsSK5UUiqN2+So$|d?*M|XM>(y%C{aZ-|IhT;gFpYcwKfGoAW1h z^7~Lqh6Ui(#i^V&C@bfrbrcyg_Za5`l2bt7o`sm@1~ggPvC>rBchvo3_0NJk2TO={ zLWV51saiwl_+%hI%%%O*lk?2I+?cNJ##8SKTKzF`Y^6g~X<*kk$-M9iebO)+^L%l9 z{^%*opV#G|L#f^cQqWf>4n(k|itOqa^vceqnNWonFT`4>d3Ar=k)?QpI~Gb9}m&NeB8q{!f1 z*eRKU2x|3TXIuDuKS@)T0J?2n1CS*S>ek%-QRFTO1p{|mjXYLZ`ZynMm>~4=(m1}^ zU9_%*Shw#- zY$FbAi?NHQ&lNZvzYL7#{Y(*WKY2MXV>dTCD}S_G(=O>*_*p&ii~v}BMs=uz=#8LM z9(7lP-QgGBQAc_G)=krp-ATJ!^LAW_98_tz9i$s45L&|GoJ+K zPBu_#gy*8*h`$e(x9H)|Zai0u$M^j!b#eYzlB7LC1}L=b&78t>9!ux0zBad}o0H+h<_JD~FPj@4OjG zajE<5Eye2aSz*t~7~oPw@b>h{Id${2?ouAz)ObqNw(!LN>lxD;{|{B~;ZODZ$BmPs zA}X>+B_ms8b1I>-Ly~c1gp5Ph!8t}k=E(?|*)uY-9l~*p?7cbWv5(C;$N9Z|zW04U z9>2ffJkE8!uj_g}U(fM+!)o~I=`hegc5rw7#pZ~LiNZ+F40ft|JBu-rv-1TzK;@o{ z8-ej#mFMvw?V@T&bhhT$%9&_if7y>m*J4znh6JcAFp{Vix_&)j3CypC}iwkS!DxxLS=-nXNIrd-F!t&UTzRw`U(&vK5k#Id{aOF2Bq>3 zX!yTvvl`X85D$hxC`T3B4P{!TL=LM-@>8{5YyT?bxkw2-OvbvaKV)Q9qRW`vjnS!j zBJX$GD3rG|r*FOxowYs=JxNpa@pdc=xjkp;f!iLk9ttTns>szgbyu^c94@VESGic! z*Xa9CG_owR=yOESk|mEjncUe>F^#+KUKqa>&2;rVg>iA*m?bKCFA_#zid*n99~R;D zA`2Y4JZNqq5#Mf7sXP>vqWQ|je-&7pe72yOXck;wuN z!4C&n!mjhzU$QPC`NPRHe@-a9SxV2`B$YT6rBf(~AK5XIE1lB~5&iIUQe%3l^pyq9 zQO)m&rmOeeGRLLN&*x2eSc%rHve)F_w?%k&nxYonCiDsO)H9S3I6U7?dJ(W$)8DxBvQB56{l4QHB4VnF-_3n#fQ(GsK&@^vdFJ$pZfYbb z;GuOVr#5?-C+I~gB(t+0?SRm4D{qCzA7;mMZrTScX*Lh3Ncrd6B^h2s~_p=5cHHdyZ-oSo8 z7xm%%wacLQ^jZvU1P1^mJx;y0Lzk;`5wz218~JqNplrHY#C~C)_3D5wB7Xx9g;@c1l88&P`L z{QD>klyVq-*8XC+ezU>i(ZK(foZXNVXC}QRu;I75I#f_?l5TdK59j$xK~JK7%>q<UOwHZoTuX6j2An|Cz*zFS@GQxb~8t6)0TU44HJT2wOs&;dQIE19^5 zLVSs*>9xGMPeLoESMMs7@yPF-Db2#$hSG;Q|2Pi!-UL^PJ4Jlgggx3>$o_Z-)zXy1 zd|j7oIYzr#j)~lQ&MPsLHa)W*PQ!HI-5Sd8uIbYa;glV{+aWdWi$S<^cj0M zk-y=f13tXyhC9hRmTP_$mwXjl)2v40#k%}~qW(2Jh_g}P|7HP%2NgsasS~OEjU?Qy zrV6wVBa`zzC%mkqLy^00`vU+Oerg=oF^K4?l%_SlcehY#WbVu~F+*7vXJawqG%>$} zuln%Y218nMDOIOSY2bxpH;ab2izvf$Cy&Qy`a(@>`9S?|AJ^zPU|d2Ud1Sf@Q?4=D zYOh);d@DFte9|PjcE&c@De^7ShM%XYgn)M5W`ozc&5sXx?&IvbimAzgRLNuhTwKev z)ZPG9BjcsFmpdFd6#`Gz)LrT=e*E%?HFZ+F@>8xM5z$K3bu4^ola%8ZS4CJO$=0db z-@7Z~AQ7F1kl=ifwegXA%n8i@ttpIP@OA8}vXO%K?hDJ5{L;PuKM&C=`5!G)Z>>%| zX)?3=V>A85v`G6UBE<`9i)lt_F`6pOmUs$bV(?POK_TsL=l69)b~AUk=@>~@?oL|r zflpqTGI@0Z%3k(=H2I*T$R8IA`UhB0=R2q%H9kUO>S-!(I^l)fa&YnkEk>fs%&BZJ z(j}J$(tAs7F6t7^_DnP-eRi4TLv<$j@0}Lhz{WKXD{f>43i6`5#4ObbT>sFt2{*Zt z1Mi}UJvX1ct(cxB&vNg0;Efo)Ldjp@Q6`EKVCdn&SsvHRF$F#7ePudFg_vVgx*Y5( zIosZfs70l6{Nv?E;WyIYRi@}pc;*c`G`G}dlPosyO&sH;-GtKpy>FZ1sh(3x@)%6_ z{U`Jw`NGH{LZdK8)uf6?^`EQrN1SR6U6RD+kAt+Z7xj$fqw6pI!RKf!vgy#ZNA@`! zIyppEmR=9fuexOoe#dVf(fOhw%;8}P0QLZDY8VIf0^|g&{#L!{{K!OHfE+*UP7>`0 ze5>L-U^7Y3L3rj_ z(<3D%Zxc*Dy-X;?Jf@&$(IM^O=x<~KwD~gnIT$K5`0Ko_=~W(az-G|i%!{W`Pwt*_ zl7`t$ScvpOq;iTI-F6?kEVr{fLJI1+Fj(|*YA-jmN%0%co#nqHc{!!&aF@EnO=;S_ zA5%ST>HA#3xFt7aYp~@r5uU{{mF4g#nf<{H?M4|pW8$6!R^D^whY0*A)a{6qIC_u4 zm(%%UZ|7OcPuCU~>XodQE^SN#==E3VK1UO}*^q${tlzt!+qT&;D)cB;YzGJ($_gNO$ZNG;xJnlmgBVCRA`)=8D)+|9fq{ zEHmiXcq`xfUqREl|7!7W_g@!w3G+}19T2=E#Fe7QF=NF~(J-3?xhvaQ# z%d}GVssW#H08bP-7trDst+nSq;zrQScKdUj2*sU!DElS#m_j|8{O~1LQCaWB=X{D) zHI^Qk&*XzG>tW;i2;Oo|-BrxqcT2k$_saiqDl(_v=xC#+;|0h3FwaQlO@P&jSqw5X zUOvn)39!v@Fm`=c$3qhAa%7uRI8k+h&hE2!MDEA)*FCFYY!la|HF)4-re41J`&Q}g zW%5bV>5@2K9;xj77q)tDjs}Uv`V3B`!+sOSK5H+_c%Np>(mQ)N*}&f4_1Y|TD&8tb zprM=M^V6kP;j`}MVPv#YF(LkEmRLJ7*bIcx42R!TJ*1oBHE#Ex%s9#i$8DC^{k0@S z$z9{Ap5-HF4UD2g%)B4G;wf@z`jh%3Nf7jX`!pFe6~RKJ@h=nW?z^PVW%=APO2vPi z76njJhceq6fCQ|sY`;h;Zs8rH1fX^`7q2j~9J!$I-mui1Alat2F4V4`E9+Z063{u< ztbYUfD3bp%5j<1}oxrxNd%qWGxlcQ)hI9Npt`=ckSRf>QM{8lmD6z`0MLKbQyiQbs zflU{k;+gDqx=~W^WR~y|EYW{}LW*afW4#kn4FzfklvdK%1|O1$b9wYmjg2YqiBT}U zH>W$Di;a(BIaR(^5A1j4Ft_k)Bt8&4QuG>XtJ0}j4JG|bF435qK8WWPRa^G3Z+a|# zPg`dJ^GAH(N#69e4FM-Uw$7#c@Gja^=y!g)er)=j87^rhluYrC^SSHPkdNn#>A4pf zH96fX%e)MTx`+g?b0|5VT_!Qk^P__$4JE1)mGtE7OoS$iChUCQ)NCcP8*< zoveOk4p*ddscE;Vi_X^_-{^D|k%_BVjCOU)mvEygA#Dn% zL4-uFwu{E|Mi`tRt8LQG{V8V?dtAl zR8X67#fP5H8%0rS9+bm#%y~J$FL(FmK^kM;koHJ1TIY)(ksua@?WTuw^bqs*=pIa? zOA0+6+u=1LrV0EPy)s@Je?oz0y27_WM$Tiu?HbD=>Arde_+i(M<0p6hv<7=j^XUsO zbBjwN>!*Ji6{#=Bs0UeQG7H3nQlUh<=EI-v82?eS8vD zHF*vUk;2s61}zhu}E8Fb=xbtx<=iE5YW%iwHivbT7HWK*#}Vqzw?b4GpKq@Z zP3lV?={GZT=WN`sTEmQg^+xeUi9e+NwsEQXQp_9E|7515|B>X; z=U;())%ihVgw32xB`0YPj=}a^agLysX~Ht>l#67F)I-{E!n&vL5lR-EK5xvJ>_x_P zPUW2bp@f(o<*+mhgeN5Cyv7)m@P@c8nzPt+ ztJn1M+hoXKUtddStI@Ssz5|V)-yYljlo53>Gg8tBZbRQs^<6B55L;XFG(6MFq-IWX z>9RR&OqEVN#L~y&C{n51q86(=HCScT-e)nl^sA4yQLvaD3G}P}ri;4foq(eDd?mCg zG@SX{Tf4c`5jN&PP2RvgpMs=_PJXO1^AWm9CA_S2*Q`=_!88%yMd<}?_%ztPL-j2c z9YNraLbXv9&iEsa!aQ#>lIvURy(^P=h7Vc4l>z6TZ%+JhYhHf8u*=4kV)M1n!Vdht zqG#_i7Uj+qc~;jRC3Ohb^<#a)YToUq{?~RQJM~Nqp%wjaa@z z<8u}crjMPNiT*(OAoOSfURE?2B^1s95ubWv*?1=L^L*@aZsl>-`6;FXTS+>h8@dKQ zdnNlY&*~&aL8_NE3L)mCHkX3gYMu1Lu6|$EV~xKx6|+^qFP}OZt|tEwxn^ud}rm08#V?+2Ja&vy;<`f@$3=!&oDPF zzga-H4n4re);@G*6C1EIKA5Vo>FYqd^UQ8Mr3-F&doZkb$hQvE>OxwS!`k@v>CmRb zee9P$qS>j7-;58W>$rxA)`kYBhq2(b7$%wT0}Tgu2IHbclfHV^g}-`A7i&65OzzyG+eAK!#+ktt96BVPQ$qKX}T>_Df=++W{ccdKQ-9U>oJpvx^ zcl3vw#YZz!a+Gd^mnEhqTj| zGv&LKH-sG7;Aa*9d#Wiz>P+;mfQYfqJUBrH$2x-6I1n^s2w{0)}^W4wLc2 zR-{Jq$gg|-pd7j4Z^u%2_Fso3;lg(7RDG(Wa1IfM?iNcVqe;o~ms(Mu$b-}vN3PJz z)@Xh$-IYQ7uoewA3$03P*_)ZXuoRVJ8g9fpOmt6kAJ;2=>b40! zrCxe<%c6wT74~-ZbE~JElGpl|TEubl5`32Fl7h$)PsAAm zgu%6AaaGDZ(~W7QNXoXQh&|~SjFrWUC=cB+p1_SvjewBrOb8Rq-=A$^am=^C`3?P0K_Hvd_WMZbho2G@ z>j+jvsn-$CZC%YzAa(cqMt7C>G!Wvm^0tyaYN0)`^IBTqg5tLnra?Zn)J=4&$zZm^ z6ZAoG;KY}cnJsQr?(oZ^|+mvX3a7B27f65?~8P!TCGSWkYC zP~puwk7;OHG>w;9{drFh)KKKk>Qf9o83<4_dJ1R|!?~_YzM{9Gt<^82NSe4c7badA zJG-SW)%FZ+WqK$Wa3aWfg+_p#Q-FUz%Tg>X`OdI))%5`ZU8d!Dm+F3@OZgiL*<^v` zM`=DoIiy2B^=i@|zkvh$L)l10GlNdQX8{hBO)h`1LbmSzaG;}+h6s_U zy5FZkkE(LA(VV8)aPi$psr?RGwng2VDzjmtw0@3T>tZ@#Czi5w!2*AZrBv zl>G-%QEG}+VHJ3#FRr#*-a4~!|oT}!i*440pE86 zS5g5z-0p4E=tB?l|0m7nnF|}C5mKQ%s3CQdwz%z<8|mVUhPsId-}=RWOv+}6b53*9 z5!&;@UwU!QK$+<{CoAH=Q3Li29weM)d-;)H*dr5^EZ zklkrza&+1%G@t}*t$x#0)|JIT9_o{vWPe11JpB1VT@DrSEk?N<$a_Xg;GNiNW z#!pd$kpn%-GhCd02@5Lq>tiS*Kys&KCO32QYx}Qjm6y3HA@>YSJ!jmhU5b=0T01fV zpl!b{zcW7UNeP;Gm`KXqL9_+j8VS6DIB2Znlh@5g%P9)r9g?~XHP73@`ZY)(EQs{p}R!cuG9 ziyf+t0+u^FCEPa~k6XX?++WTvg#Cs+0RmXf+;DJ!+= zt#C`Z=_`?pjI8gmN^jWH^>Cvp4Sh?gti|1rzk?4u5xJto)JW`iy}plU$aX}#zu%Ck za(n!N0IQ`y3yWaG^Kar06fLyJf2e-KYyActx39`I6#d9d|y;o=aHZBDH2$FNFd_46lZ?T~TJd zG6g8DzXJD^b?K!@SeD5W;<5dx(5E)m?HB)=3$@Sd-7tB65*$RgL~%iu(}16qO2=D0 zt@w96H2fMLziE!t&A6LX0UkV#>OPD?roxS>v>OMxr2eXz)naW=Vvk?+QJR~o#OYX% zqV$;tO;Ud=8w@wt9pxHeEvl43;5qPu7nEcQfE zp)U9(ibKOqHm!QenaVTF0g^*HX9sFwEO(fbFl9hHNB5i5Fg>fzcUtQEPs)bihpzPXDa2Ilb&X`P_Si&?KWGPKEbo2c>zEE4fNUDR&Soizad&#uN z?SLdoT|D?yvWio1oi&hf%dwfl)Wt#yZd0<`w)-10VFQ2V?{HBw zIXEYv>LVig-x5$F$@xSzv4_G|nk zLU(;89Jc8l3}s960T-4#?m${I-mh|Ci4^tr7ToKLIs&JrLUgSIKb^(nhrT!AM2CKX2z^OPCFdoPogmBPbM^v+>#10p zHF{iEbH4Q>+h@&}2{&Y(mAfM!P_un!zbMGc2R^J{dLqwd@LxTa%hC_n8PZ|i(`RGW zZ%DBXaXbp=q~_r6+|g|&RcT630VKrL54vd@%*2DV+^yp;k^$`gMp72u3TVdgJUDfz z;eX1+A|#JkkI0BE@nW8$ZQDClGJj=W2M7JE2gNX48aa%k1v`V5V z@wvCA5|>?r3+=5#HmGxL*1nDtHEnw~=MUzvMQSQwd|!}j^d`5caW9?DIuFv>qD3C1 zRmq?XEjXAs!oDi2`>j~2C_+4|9m^?AJJRv)>y;lg(4L}eTt0}ag54N6^Y>+R{)qkA z{afdx%CwM$k>XR~R8S$i=RYs6cq>>AJ*YuxnL_HsBh4f7K)GH+bx3vWnqdm>n}AHu zbR$OcrMy9ULrte7ZG~z`ip|O0bDCTpdc|AiKz?`fr5jxn)pOCDa|iNvc(x|Gd=|P0 z*+YX>>jx|v;bcgipJfk>d?N%;Pio?eKS#O=v^jji-HPkD#Zt&?wHv%r<9_Ss_vipX z?0)@afzHLj*z3Nqz4KvN%f6_P6l!ct=1NBLgidgNB5_(MZawujlc=f_A>NTI#wrZ6 zi}JydYl5W>gXNy`gug$B=?^=?pMt%yIR_bZa9iE7|ak5AIZTrFDs9jAl=*A}-VA@XehX4qeA@iLSCbO-J7Wtc}@% znwRhM8m*G^URJQ62{wC_ydDl9w8Ml+9*`TR49%!06Y(=M;wZ*RvcG#vz1|GnuR}pot-I|{m@jd zTF<)ht4D$2$)C;O!=K%l4z0sLWm7udu543xDR(BAb>8c+a3^!|sE|!xIBfX4)q6#2 z)Sp_vrf+O^_9}+3qgX61(lEEtUMlJg`7EC#LCG@&ft$SOJF&V&HvwOs3!*n(^nR;= z@5;YE{v;{xFI&>oq?Kaz9a8-H3kCp;M?;4<7EMq+n*=ZDo z?_Ozi`K8nQ?>NQ#s%=^|9zCU(P!BbjnVzMcnuiVd+-Kq?&G~NG4>f{_etC);qIU58 zzSCFI#}TF=Pw{JHY*oKi7y>&3HW{dl!rB(2AJKJ7Mzr!7D+lfBJ*txbr-uZZ)o!KR1@A$2$V>wP&T?F^5D}H_QL&htl9!ry~ z=dU-$T4bR3X79C&Mc$Z9^48^m*FESfj7=5Dy!0nTg=}PcjaqU&({#8fa$Kn8zJHQ@ zS0BGwNvo?aW~2lqP}&pFqE3$RwFcL%RQuh7ic|L1yfCi*)Id;BhFexJVs{4rMZ#zVD0`0$`EC@#N+AM)=D*DDfb4Wj^vU5?X`s~ zs{CL+OS5K7qTBKUEEVO7N6O#mAG!K+g3f$EcV@6YEbua()Q2m}%W}n;p_q&HZ;FdN zNS@!7_7ioO{lRE4i zp)qVsw!?il8kkdIoi*sLbdU0ghZUYR&D6wDN+*cooB+ay&W2@o{_Rjf<%rFJU`<2N z;mL~;G4IQSGZ;~pd&qw8lu%Pu$KyqEco=+%n*4Snf^MW${gsbQexJ9=*>ADcJFSlD z4TjD4{qYMF!q|K!0k)GDYOzPfIy1V6V&*a$_w|pGK30RPd|CPFyogH)KUQ-5Ast(! zB;aPULjXz_-!rB`Y0$1G+Y`81ayyTu{-apG)t~_T>8>9S+Y-nRX1Hl@^izN&uM6Yf%hWtg?RCg|wIJqusRaN0=RchWlr-s+BK@I?J%;u`f? zk9J0J_i_5!D9LsvWW_?d_SegSlUYw^WzcV@{YcPt)FWSJ zp5gowj((Y?@0q%~N&tnf)41#^{}-z}k(xM-+s!-@p*DoDk3*477UJaJ=;X!%yR{l% z)4h&=?P9H<1lGHLFLKSPcqg_}(Rt5914X*#`++cz4>^_KqcGy|hL&a%4Ck5GomMB^ zXoKd!5@zbBG7c*I32#n_r##;UMRwL6+~Ump#i4#XoScK2Jbur`?+{u@ExQ*c%CYrh zzT(*(DBIVC;l-QE!>4c6hI{I+-X!WD|IRPaJbu7MK+5ucQodVIOqR@}MU} zzn~sN)T2*1K^H{mv)2OpfU)^^!=vBZ18S2ulIfsovF;Oh`=_v|eRH6aHR)8J-XXIR`61EGN&8m12;J zDTHp#RmRB2Gx>CoUNw61^tkTPt);wVU(uu&Vxi992`|OnFf?z|S3N$dOecyR2ChjS zj>P?zU3(gDC4GotXdQod=@)mDYs!%~4f@NR@A{RVBMM`Zf@!s7Q9T`F*-kILj3W6b zUng{>-#}JI~7n%(Qvpwv!>=M zuqdJ(85>Ua!u)&I^T*DH-kzB|R<|)aK_f%c^bwTK6c?pn)`BM!A-3#f^Yzv7lSWpt zJ#R$KNz8qq{3$Xc`Y&aILcwtF98zr zUn06e|MgGe$pQ5^WrOoHAm*&~{#WN7BMCZZRDD5BhFQ1H?3=o4Ks|Tq z=?IWfxy>%O$)R zjr6v=^+Zabu69+G%NS%RvqDc^jjNkC({rxcGQw1Q@y>wzqa!}9!IJ~Xlv-D_!HJpHT^&~A6KAf=qf{Y+}y)mG2?ygABQ zml9&@gum5z6)2_N&177^=%;rJUxcWV_&&8CMOIW15B}I4hvp%ip48%ERG1Le8yw*^ zOUNGJdJ<6QJ8>22~Ik{z?)TfRieoXIW5!qHL5gHxQ1pw!1O*^PXq#s|AUra>Z|Xd6J3!ku?d89dA& z%y@iYFjv|6gwok^K*yh?^kO@cF}>0&b_uPCjF6m;49$TQGjd^JHwBF(7T5Io4N?_&1I zlAa^c77JT&8J7Oj>2z}YNsQ5?D{I%SkV1hAK7GNaWc91*<%`o$qVvDg5Et;>CtZ`x zLt)x!?}sDqr}_epB+Mov@TN18Nndq0vu-?8juIj4omUdBP(B1WT-GwxZ}m~~hTUMG zG0q!u8x&Q=RSBs!ux5RD!qOjpetsT4HMnAUKyj*b@VQCwk;gFf-_l=ssq#)u*Vd?Z zjSnrt1l!M9Z!6}@Ez5b*GF^~-($5h@&<&ZNeT~aKc4OMU#ixx;y%G_^y(%5$s(n35 za-Fb!Q5q8lE@#*s?S`>H&Fr>s2sa&QLeTp;HJsgN;rZ5$qqji9>r9k@DU}qRH5bmM zwv8H(sguqvO?9z812R9<$CMb;J`Hf0z{J4`C*4nWJoN|FW@hn77%(6AO>l?=SH*iB zf@#`!Pw48>lmE5#`Zr|l~bQzw|6$1PX{ z*i=`p%0R3BGF(sjEu6HWaG!}BzhS z`!5@?b<8#eK~7R9z$L?t>bJ;x6()3925HX2<`%tviJdxet+EG>bJZXK_~UklYCGpU z$wG4=w8iS@{tofYO4s49CPp%tEnddvbB0HiL-E3VzwJir@9+fe1gE`Om`p{75Mf1-)U;^FIe*5EmN`>nMSRQVFwjF{@>-FJP zV9d-TuN+UspNCca8uB8gj@nLVBDA|g#6L-QI9B`bsT|3`8>Yhf_$`%ZQfh{57eNkm z4SEF(+*;E!?HkO&tit?vZ3>BR^wi3}-eX(kDUw-%4L@$LfEPnuIYays18+b|qkP_L zdoS96;+05&q{`E4{_TeJO43yueB^^gAd7Gs>*#MmWDDir>4=Y}_~|DbekbT)+lrv^ zf7u}s7`2l9uf~_nncGbCYk|E1dE2k2SRz??of+YL+SB<6`8d@LnRNgZzBX=Bdxt zCF1^gMKmZv_O;I4*}8t&E)`sAwBibbE6C|WXGTs_Q`;XWTWBW}x_Oz}SuLUdQILKP zCU9LR8twS^{&&p+{{((!-xv@y!>XbDqao?dzYo+nX#^B~dBRA~Y#(yIjo?eE zdQzR{?R16`^b;daoM~peYozyV8txzRL9#Mi8LOkq1OLvBl+6h^R1HZ942Z6aUG~J^ zqKu7X;d?Taza?dG2mP4Zzu0_UT9D&P-#`BNK;<;(6$8=d|CF*8EB5Z+ek5i>ny+%3 zVDfA9s#6 zu#HT)oyz2s;ldeH!Df&wCm`xwcb@P%pn7$uB0ebq)#1;1O0ww#eH(>!o2@^cCrBG% zTi%2B?=3BMLW;`*1bQWB>-QQOFcKNJxX@Q{b)5JyX;N!u=TE10%YnDa%Y=JusQyU! z!BfVO71VNvV6NphpVImRylQ<}U{|$h)#mPZMJRyaFGxNS zv(NQB(MhnvMX7N%Qt87B?X%h1*J2tuC)z%niQh540a@>c8UDKzWlS^IF}&~!osys# zH&Yq{js`o_kqR7sYm!qgf1YYe+pfnn+ChB#qT6ebjZ6k}E-d&LSl1ToQcacB>sGih z!6|mb32b-eG@Q=P;a}mVelykUlYj1<;@X#h;?;S#={jn5r73<|_A>~{AfU4G{&jPzjwM`v&94+a(hWtlO40gP|2&|IF@oGe&vX%V2Hgk0H$#{drqN z;(;li6Mlz+=9S5k-LU0z@RG(oe93TVwTZ+f4ObxssrVyVtwMwsjmxix zlg-B%DX_P*bNtDm!A|*1oak}^{`JdzTH!0_e$Rz2R)6$;>9ha9U1u}T@yxW-M=WKd zV_D5>=<)pjvEz+>rW5^W#=<1`-sCEff9?uT;5s@{3*%(9RGruuxRK5TG-WqEqR~}| zF7%=-*J7^`N8}hrT5%ksT%R{6=H1sWL|0zed-)DIQ)3fxX1kSd`629;j8HT zf%um(&Ud)b+oGwwB>9HHxTH=JsB4aZM|K?D{XQt0|K-pCEJt^hI|}L`8GUox8>Py% zfn(M++{3o^_o!PoRsf%7)n>TZiBSQJLGLKj&wJZ*DUVz#k86A{r&1Ql2Ba*FE2iQN zd|jr)^eprA9th@7%{V*g3`)pyy<1*c@`yB5)l+!7r$)6S{&zawe>kv5vd}ws;sq$F z!6qcPWInGd|0d*aq|%?#Pi*MUhB3izT5y3X&t!i|^i!(+$%yo1!Qoit)^glms-Ylh zn83__E*G=#Xa>DO(?F(wzSPX(i`=hFE5xeGt9S7P6L9$-YIBc(n;X_jl8_Z=v^C zi0&)j5&4yZUNr~GQ8@neAof)Byu^FL?7=Ik zJ#czXkJtWtS`fQyB(^x#54OCdP+g^i1@a5Zah-k=$~P0$E9u`P5_V)sDV6H6q_jsH zwXMoEh+PpQ=x}Emgj^kInz(BRoa_;_Z0iOkH)Y+|EYEc*OmwQ8DA)>9vkB{DjcVJ2Bmo~fF zk4njyrrj;;j`y0rA>o@iP0;J6fd^)>K8|OU=`GS{9hv1Br2$3ho$;>zCkbF*BeiJm zK)dYO^^W>q$5$70J&X_WhKKh7aiuNCw!nY6EFm-w-fQt5652hO*GlK53HK)EKJS>h z!|L`wdq#-Z*8N6>Crj7-M|f|Gaw<0H;lfSbT#htxSsJPHB9?S3`bWBSD<0oVS>6`Y zG~mB;U|ahfwb9$hEU+k~0K~hyDUE;d*8`N7n5PQe_ZtesWls~ho+q`}r*(c)_;Kw< zCXJKL0vr6i0|G(J5q3tFNUfy5!o~{H^TJ}(DOvZUHoXxGGF3e59;UEP?YDEM&*V^n zy&vZc67W8az(%wr5c;1MNOaA^D+O)lbs!;PyGm)^Aov3Kg=ewX-Nv1OQca~B&W2Gr z=_u3KeKBCTB67OW4sM0E(3-JZ?jjo| z8RMFP6)o<179BY(>p)BvywghmtN5ks8kP6V{z^W>fyuStA3f`iT$@smC&(sw?=N$3 zNiRdc+ap%sVQM+FRo;HEgVB?Y#V0=oN3BHlKpS=SJAnQ+(HhN4QSnsC!WPK?v!HdK z8Au8+)TWez)YmskTpWU4kHe|4v=PeSm^qzmpNtwrJTfa7V5zqyUR$WXE99HCtrG%# zfC#yz+uwoV(Ln!o-sVs11$aZ!xSh{}A*W6EeUKu0T=Bxb{3nk5-uVI{A#%A>udgfU zLz#At`+-VU?CVs0li93$p7dQF&2z5qSQ6ydM8Aw{6tgPpEoWWmLs=VHk+f?~i{)r0 zcH@MsRIBUfG4)Uf?q!n)Al!*(s&?j$qcAqO2_u62Au>uHVJ4{+^E=k*9j@w=&=LiZ zoHn6@Sj5y@HL}fvmbXG6B;o-OKP=c*v-yv>{DcX`eMO=*C zk0x+>`l)V8htH-+BaA^KKtBXyDIY0?Z1u)FRCMP5TbHQRt4M+y)F)o|F}==iDaU*M zB<%do6Yb|0=xzBkep~a{1g1XueGdLSW6t(b-xp2*UzU|-Wr>zw{S5){KYJ7P^=z!3TRX}Fzg&VaW{4+eVtjk@xpGdlTRa+Ao15w zrdM>ggkF^#?VA*locy8rm?qr?^V9s;IhD=E+_h-Zkou$r57YeNsZt zNqzRUp8YsveChHlC7!^GK&-sN)SP6{;MLc0)8s!M#ka{Zg_ck!X7-Lf`>@Lj-c>YB#72PPqrO z1U^V2Q#wB7QFbKvefd=$p8?LoZ|+Cq54|1K%YWxCx!?*-F5ol!!hcaU@hX%hHH&?d zTf#!C(>9=0zgB_DjG8sO*}R?Opr+Gt(i)dlzbX2T1$nq%d})3j9PbaDC2z zPHOxqely3lUIZzqin6E7wSFRs$75G_eh?a)W;MT)wgnvLeZ{+djjw`|Osy362cvsG z?z9$%4Qyd0HLB|vG+FuEqbxFfM5J5HCV5V#&<#>s1RJgm;!1jF&8BRrbIJR?uf2y+ z@4+q8c~)w~0j)Cqe!A?xHrIwu1DQ4W0aLX$mYcWX%eB0pA#$|5UA&FZKdpz`A)0OX zqh=rCuLW=7siabL9_O~miXeKb(cI2r3(do3BdUvUH$9TRMGo+7Jty3iC99ajD+T{V}eU1x)zaVRh(qpE*9P zIq`o&_TcJGG8`r4gC`0vK3@jkM}_d~#;b(h77i`vtYSBQ{p!u@(5`|oQ!QC79xjst z*efNODAQ$u?($!6Lk}~TVmNefKlEp~cKgB8+ih&jWEB2Tn%T>DwU0`*Nxi4X$of86 ziFuQMG~Nb>M)t%pzh8|$p2tX^bf4{7qw1AGVKM1xw@QdjbLiOX5eaL9tOq(0IbB#~ zi%w&k(#3=wueEJco^<#eab`*h&o*FoQQv z%2(Knak5~+=ll9Jhc9-><(RjbK-nDCtw6DV^&hvhB%)dN*bv;*G{r?CjY8dyQeC#0 znH7A;?-dMrEF_J8lk2LWY;afGtJJd`ivih&<{(miS6KDxYeu9?M~9(H(J0bAiFkJ# zAI<=7@k_9YIS>r9;T4zVhkeJ(Tdtgg+EG>P@Ji;oD%=nHWtLK+T(vg8=won0 z&c^;AI4^WU&7s!o*KNpz#TuU$O!HW@^c=UX=y`7B#r^ZlmlJt+m#!o7)MK^Z* z(jjR){cv~Kha6m4a+z4~smQsYf;?n`0r?r3Ar z8Q^s}YVVc|@vm{c1ZS9^711=Obqmx4`egGOjweY296@{4$@{U}xZ!j2=i0&@>+e>+ z8bi96)au7IOs7utLjL?KfbYX%n@^|*+>J%EM^k)Yh-Ue8pP%>;#9Y~a_xXtr2{8MY zl4j=?Y!%Ce;_Rah?V%Pz;hBUv~q3gN0LN@o>N$?xa`_w zuWU)w2=XyKRS^mrnU}tLS7dZB^!>&Zqc2?XV;Zt{Z9@bG@mwuna^tGUBI?6~rM>az z&fs$|I~zZi#hu<{=$hj*C5g1FlhF2$#go_f#%Zd@@6Va+{T>Te*`&{aEb+l~zZFvo!zWQ!gRFg0JdCaeV#mh&Uw ze1AaxdiFN*=9o$Bm8l!K$(Rci6wC4<9waY>P2>G#KnAWHhR0&8nwbJ;G~ z@}{?KXz$dfnQEOBo=coObGTVz%66BfNBLF|lx<>v4!w+04P1iB~~SK`mx& zT9OAb9%n^jkybIe5w)d@$5g6=4mRxXMU~iZ`t^9tfV@`w+(5Wxzd2LaIiwO2R$E_5 zM5BDvSdI%wx95q|b;ZA!6HU@n-(T&ri*sdur=3>C8g@kc{}J^q{!H(G{4Sl;5t2^s zRKh7C$^BL-DwkDGxf80fncH%i%a(+MN#uSxC6?S0oBNQN+;iKQySb0C4RhP}Tj%@x zJ%0bf=lyxTUeDL_`Fy=z&OC2xwfj(C>d~te5#+1`Z9p`JAB79 z%=vI38i&%G>ra?^(XG?q+c+CT#WK$1U;S=rv1DW|Gp%#15!F(=5d+|v|FC^;xPBy6 z0vI)HTf8G)`WFCE++F2A5&q}z0D{>AJ^l-z9nn!5jWfxnH?!C>_6ftu+;y93-?hiK z%#cB#HHQHIIOl`S_F;E=%}C(5I<6nv_)Z^6r5W)xZ}#*~0*pGBl2l+G_6%oyeZ~9m zYIJ%-EEn7J7s;nC#NeI}`*B~R=b2Bx^f7v9Li)P|S~P;T;Pfpoq`#rT9KIuuSMyA! zC=Ij+83jLW{7cN{K-wrgz-Tbt;shKIa#d>@@mXmfyX+DNh|4~%+b8b{#jS?Z9Bf1^ za|~G*ArSKLPs8;HWGPxF1~w+J8fp&hf+;Jm%f@VU ze~^0r^e$a<%Oq`QSDklhLC8DlDCA3^eVn2TbW&=El{9X`s2;gi(qt?v9+;A=KMY^bI+%6p~Dg~v!_U<@@pd-fKH>1LRyKYQP!`>lP=f6suj7&oN zRt1ym&Eauu^J(L3Vv_=)jO1VEYT=cRp33_f?63Gt~c=7c6z;`SVwy{4?~)# z+d^OZ|Cgiiz$NYq)QNUE6GzePHnx$&1NxWV&rDG?wP?diN`A-ZY=tFy7wY(P1?gmaeEhan|{{`@sIC`<_hY@U67U z=!PvvjqC?)1Lay8IvnpKsaMkLaHl$!xE0lHiKm|0spI+pOXK9L<%B>WN1(!;R&ri_ z^2-Tsl(r%3#%ILr2*#S}IPA#Q0V>`+n>%Pd& z4=GZPojbUPOL`c;IT@_Rzam81x0uR{y?PRwwh*Cxl_iTMm!V1j)#yn8e4E)2FNaJj z+I8jY67O1vK_fJm>`#wx?(X=I{T3ei^4&)xK3C<1Yh75Et>-!Yjf&J2x@C+Wtk}b~ zPT(Jo0};-0dgJ$;V+|`wJ|mVsDt+n)oS{p8ozB6*;uE3H!5!@zs~fyjJ*o)2A%B{; zh4s-l;nIZbo)VAUYyiFwdHqd6Owg^yt440U@xbWvXb08CMOvdg!1K2T1T2JCI77(oF&(1GArZa(SySvS@FEl>8g2|w{(G_JSHFIa;B*C@j z%Z2AoR+H5bbDuKDaJ@y$3ruoQynzSfShd-|b$d(ksA)$+5Gt*0Avf#17x6Yqo71W3 zy8iwjA=?H5&S|Qi*OS(Il7ZfHoRIde1-<|@&;Fpca!0KNfg#V%A%~%Hc6cbfwa+TA z@=RKG7-RlpO6cuoG)X+met$C@03eO2eIz~g4!S2I8Ej7K~4R%ILpk{s+6 zAY_8K*BQ@aBn6nHc)Bg6-WuQg$YguiCM&jdedwHW-|-ICF-vxKGcnC(Nr!_?z@TSzp|uCvhV3iI19Q?_VWa{^`|i3|)sGU9ssH_E6zKKk3So6?(Vpl+msQhe4la zS@r7lsYh6keOoa|dg-x*Kj~;fb_X%u=Vv4Q_dMt32pGVOjh+18>SMkdfql|GcM=NI zP)bFKdHVCBD7Lnt?wfG%=W@uQgP|{?&3B@*EjXuAjA%9_60x_N8I@nz!`Of2@8g-Y z46!zeCeuVG>;yOG6w0z6o#lMsmz*9H?6Hk0Lmqg)A!4O>-gkWy zL7_v6epWtTRMeh3@kgmWV;Pv3NVhON@Vcxs?G6H6a*tYc+IQ?cyfjsF8}V@dWnpd( zWWD51jkM=W#+%oJz4lK1^lhZEx|5hTZ^LfTB)4ifyA!r62TCnf{l?vQ3@ifDauSUd zjTpl-Z-Kr74%mWsIcbnym-K_f4EE{Y=zKY#ug{Q=aZDyr!EazapJEOBbolkU+eg2w zJ~hvsQjw(bI#y#1^5r2f@On@5{W*6V2dX}#T;?#9)Nj`v^x*B(i>FvvoLf|db~Nw~t?@o}x<=_P>t>H(Z6JWM5z zXnP`JvVDU>4O#zVL6DDQ8cZMqwqPtl*OAudKM(V+P60nKT!n6|Y`w))ClEC@af85P zXPi|%dhAY&%zueQD+eCG-;zZqEDYuuUK_;yIU4*8hYDHTzKsbmp{UfNCkZ4;!DXSWzht}wW28z$|nerc$~dOFl5<1kHI9O7i)K^ik7;ekd;*TF|H zq{Et1t&fw|tz-HdxGUFGYO8Yw)f_wBDyJ#YB+_$+YtzNOvi!a5Nt=xW+Cou}o+3J^ zsj@0?4tKR&2!)ge&#LWKikQ1NW`A3?fe7Z$_FZp5iML!6{w}=FH`q z46uIM8jm@%c{q=OCwF4!bB^#PbG#q@U9nvKo5{Y*ECszC@ev)Z5NEt2X!MtI` z>%8C}rpx{RAS=&^Bw!yT)lVre4ok6Ls;+b&p6WJkDQgd%@gg=t4r|izU5Jonj*!=E zK6}|?(g3?kVJPns%|^me}K0nt8vGANFyRA2)ui6uvFZFeZ^noMw1>m|esn2OKs{SmP0txs|Ie zVKMIEb++q*300us^J1h0K2xW^H-;c^ilKR)h7yMXp$zm`ROfoXDfWg|O# zIeH6hH4ezT&Z+yEBS|=Mbn~$O?r5@lf8%hxIS9R#Lx;L9op)8+t{%Z8vsDWfXu&o2 z*yRcLJ}JcGiJaQ#5HW3fP|HmA%8}mLqYu;q#eC5z6WGz1^gxCg z{@XTs?)pk1USrWWQ&$1Mz&XE>C$^J-4b zWt*;biUHQ)tXz}Hh{O2iv8MIBhGoJ%cH>0YLPVs|v~z9^b@hd~o@yh05cuXyjoXSk zS>u|JfTK{UQL)8KKEmtRr@8vUmxP7Wu@5RX?08qh!#{)gLlGqz%}>f)RM?k(eOr}U z)c$fk%=+Ra%w}cO_MF;$V({d!bMOdsq2QdltIvMjj-j|QGaU5!47XCjC0}b&&2RlX zcyi(7cjg&C+}G+UbemswicYlhQU*F0$<_$F1npQ7%`l${k%`oSGlt0A=PJs1wij6i z{?Wl9k8|>2?JD)->b0T6h9;vRQB!c+fGdjPpgJAyF?Q5$y*qob?ibD__^HtEoVWDq zA4@rZMM$N6zrr`4Bbcc}z+bdvXHa7C>z2Z=O&@f;(kkCFoAqW$tGH_UzZ0iC+g>_z zSLPfbwmDBxHR03q@uz$gV+ch_l~DF$t_zBrI-)Ro8}qX&J<2#j zuL}O52MS2ab&a+-Y)XjIG)r}2O$%}%AO%!cuHO(pBlc5-T8g>?fx0=oqHc9krV z{cdCD10?U+;h?D; zex|ZrStg+!di))Ayz3Jw8951}!8YmsdaI=uW30y=p1kqbqLq3ybf$Z#MjQ~tyaO&EQ)$82Wn?O)&pG`=QT*xIa(TtiP5L*w9?N55ck5UIJB&JxCXgeQ5fKu+qfS( zpbYa0WBvTA0vt7jaas-Edlej%l(V}^T{2-FOm;KKv&;{az05%-GYx#d`S>rL9~Q~s zGT|;D?=E>vj1zKp$KDXQS^NQ3t%xx-kCd(a;&GW0b%+>1B&LO15ntK`*|!D=#<7Z2hUH+5S- ztZ_bYD#LcF>CLrWdc#nQrsF*!O?nE19}}gL1q)Jb<}*K2QUY5OqNKYG{R3qw(o!z- z7h-zDZ&)_y#E37QdO-?k&1nEhBP$)UUCEdf$TMfgRpFR7s*T$fc@yqx`yik0z~r zLpD4gw7+_O&q?N)llMJk@rFm!PIX$SodrmNea^xS>vczSCs!etc!`Lin3SMg%>%}< z`D2zo?0!|I^z=@}?wzmg16tbKhh5o&+NeJ5Z(_lFt57#fXGZ%7&i8NGSu*FG2y3~c z0X20vyC9RyxY@LFRfzkY+wNM9*YCQkLS!IixbMOk>FfSzG;N3)pC%65_gob9Ylq!d zHFqZOdh6FM0e?27s;SW(rDE!edGE@A5_RV-N50bL>jSM$IBM87d)EKTkF5(RdNEJEQdX&O zpO^65@GF3~(Q8_D5^Y;;^2hZLR=#}y`11TC#4K1{yO$t0B#3N0)xNHA?WSS0=5?Hr zg1^W9W_6ru;lxl!4~l0|hbJu^qP_UL5_w8T%F1)pIRVdY6$$668#WTE8k$FK;N@E? zul)f|$0F-n27)xS`s_k7m8TCcs#ZMm{nMlJ!+UO?voZ9mqg3w&^q8h|C=G#*gv@P2 zKCljFFB(zy5u`c-N+?u#NEUp-C`n2uok&L+Bk&`e4ngkBH0w!Y>S$zeb5+pr4a9(!6o~pA)rn&5#djLdy+O)J#v)>r=0>QUXs1+NBzGeru z5q6Q^#&fMb_WaVFwLu`=PA%m?2)X8Ur42VdK9}*5_Rp!DT{R$Vwyb9OyZa@CB^Jj% zHP(}PTUq+dXw?ul2X2@SVfF{f9~}C=u-#}Fs&238Mtp5NexDQj@-GiJ|FD_P?acl5}`$1x`}MsG^6Tyfiq1*Ij0-4<`5O2y( z{T3%9?d+$bQU9XBpDG=I zE-KFr(P&5s0T1pKd3=HU5r_iuO;X(?dwwTl42-mFDhigr*Vki&HJf>-%~6{j);sNP zVI)C)khc5o+CoG4#Ao}^^J-IIxI9HN{@LOa_9 z-%?ABG+K2Wv^FyZfXxUOU)hbbFTigmU!1`7RIrTe8eb})sjc{UhM7gY6=XFotXj9v z*AoIJWCUJSGphlQ+axCeded|#Ok}etTHQ z2CzD!Jg2K$nGw>L<9K$ZBbet`*e&Prh;OtXlD||cj-`ffwLJ9ZcR@M?d`l$mYRvZg z^2ms#dr{}Pj6;)X?XntsM(cGi#|M6xk9Z)1@a^v4_%_XC!7EKGoG!c7eEv(oG-0H^ zTwz)!P*6w5!@Vx!G}sH~34y7a!0QKAy9+k7#Jk4rXaYg5tk6t^cm%l7#Au}GWjmcJn)cuCJI?d7c zLsp-#Su%`)ou)!DN*wJyBMu`ar7e&>I6PM@@{H{3Qlhs0w%b%;f7B0@Y)jtXdf-2? zHISe(rwbl>?B3Z{u_oheiTkOVBTlL@9s{scWNYWBh!8j zoet~ET$=shmpUA%2FI5Y2QwSm)R;RDI2T{;3B8m}haCN18k2}@3Wj@3Bu=t-IW_oR z291+8fAej~e%%|;0wJSL6|z2@3Fy=Q@hRT4IKscWGSI;Vw3h0vPOGk&y@0^DN-1oL zsU6blA0D(znBl0(QH4axQ#p*Dv37QK_oMu(EI@By22K4# z%tnoW%N%=ndO5Fde%Mab~_e=PQURbSh_aijfKM_K+KBnEYGz^p_0-TfLjI-b?DQyx8Phh`{ zjs2mUD+PuX=l1Aviq;7-6@?o8ve-IFe&tw+EU8h~@q;O9rEL@DAd><|h3zrolVXR= zf}tx2n2mRTSa|K27953T!#mi!rq8z5Ds3gvb| z9c*B@L3`%3(;R7es}eGl0hd*n5{yu1Vhm>s%zlTBR=PX&=WoQO%g5D)a#)9d!cRW` zD$c!Kq~pZq4I3KnVc0;MDoqEp-Fwq8c@u%5H0X==7V#k$ROdD9*Y7P?7w1$p)_cbB z7{s_Au#cw0hhP?0R7@ZG>OV{8cCY1~PJB}NgNq-X&sck<|I4aJxB8CUu{_8d%p6}o z`D9PTabbfkzc;`M)$6Yv=z{Sy;3vHwwAIQ4&biN@+l?D@aVJT38&V`}fpRjNY1Gy@ z@uj%5qfqM~KC-xlFAI_-{&RISWn^`Ty&w`BWD#XA7M5}a*)=RNSguj4w=+{6yZDVO z;LXj8SxkhwgEkZbaKlsCyYnRwW**UXid7}jRDUpz*aDMvc&V3IpXGe{&Kf6?&7c2e zAydvy?OnKR>QMiv5Bi|Umw!CRDy#Zq-&KLqKK>GlQcUkc;p6GdhiAbjb>zcNe%V5N za9r!rG>4qm*BI~HJsQ@(u;9{Ab{Yn{(YX21H_&zp4q=YOPgNJ_A_w=iInXcU;0q(2DMI3f&(^T)(*UK=@-K#h*>z6XRCP>4{6Ky zv`OvS$6_-a$pnp>9iyZ)>k|!mDq902`XS%xE^(81BV-7(+4%-rdU!eZF;zRO@15?jz45`8I%7pK zqZTU@zBcj3cTU(p%jC1;MarO$1!gwq{;B@IbFuvNo8{O8JhfZAu_U;bFroZszZCPB zu6v^&k3{REbH@x6$)kPvD_(E(34_WQ&yyvpgy>jjN)X{?8bcRk^2cxfXJ@dt6?SA% zG(^K}X8B;3Q`hVE#D9+WBgXkyrlp}`1eE9%kO&yL>tulV;*JtQ?X=JPlt9$cb#V}n zaTKIhb7@y9vU#Ux-9U#^q001X+LJf2Cf~S%F%@|U29PsVi-O`t2i?_loFVZ*XAP~& zG*;m&B7(`$VY@KJl^a2IG;Sb`*O|%mzLL@qHkXs~_fRVL<$`xxtfBu4xlRi;?en$< zT0yFtxzZ28Z5@kGs=7Yrlk8-PK+{i*_cuV^W3^IRL=*n%;c#MRsR!-iv1F- zpBg)%?-Yz%LF~_=vvCb+=ORRh4aMc-iLa>$FuCThEZMEpDJBSR7Eg zjBwkxYYDrDgnaeaw`xTQ;m6OGol|WpM_v2*26lUR_-1LW(TS^z^goCFBPwnJjL*1m zF*h>04x-f#-b zb+PTp*xQf&x)&M$8Sf)IKCF}^KNDyKEerc`{1EhH#0SD`y`-j1AtR0$Z*DnHPQ$OV z4`XfAvN_brx-%vCR&#)JbZ~9F))J@~n5Qr1&7CH*byUL!l{spBtN38OCLjEiqs$Iv z4!8TN#Bb8X_iq5@{8Ih_FCD9vuE>hYw<9f%#$aV=rAg}pbD~w#stqE-ONHw>pOVf% zT}0c0<*pWqn2+~1Vqv>-^zDTUKGL3`^Ko7_1<37|O+G+!Nxp^#+T%-qhQhprro0KH zZUz>Dg|Xg5Wt&QmV#rNy(gCwit?8``C63`&=y{i?1vWQoBEXRX0{if^(Z{VlRJezyL zeV2q7OO{cM2N;tLsxC{YTSvJGkU)m2pL1e_@Lzx1uI;tE^S-J=WDfaOU&DL+Br&$a z%F=6Y!4TQ?KO$)C{}Ms%$DBeLfn<0irl+`JkA}b=Ch71V9SdHROp)gR2ObLAB~qk^ zlyxBB&g{3{7L#AwM1G}iRc?>?4Qbo{PX{FIE6DHt{GR9?FMqf~gq2|&awH9c%x7}K zuq4*#1_Bh$rz~FM&1UA@kJv&i71VTTVoU`~zjQy#`RHJ}t&ugT_OoOOa<$@-*xJD0 zu2m4vzZAK!?hliuCUg~+;e&obpMP-!YI&8DmYt>wJ_HAUaE3>253g8FOhzr7@Dbu) z4PTWjb(zuE`SS4z1#FNsgM#E(g(i|~rcQdg`DwbE9C$dE8Ha#yC+VUrlF#0gx8yJR zfeHRXr^z@^>E7AESIS3qJVu`^+S|yiN1Q*JPMTZ1FEC+>-R?c-sKJ_w1o5tfHH>z}um1Q6euYVDwgM%U$5*8ylkKzN&xlzlbU9 zc)Ozy$~;Z&$v=boa@gFaDD z9p`|QSSy*kjeV^;`B@|_p9cKM%o~5S9oL`X&>zvKvbjBZc@9-3vUnpe2t*5Ih;-;< z1Ox_j)WoN2voeA#lnG+7;*3)s2@ul>8lIR|;45dWacz4*2Dbj*)XE*-yWsNV@_S0e zg*2xtM-qaHmE}*!=jxF>r;hBdZ?M6WNrz+2Q&g*$*h=~wG%?8!hQm}IT-fg&HN)0X zt|cbp7W&J8gpXLQRd}QVJuJ+x$1C8^%9(3c%{BXfo1jH(zat9qc~#x4?RxhUl&|UO zVGGVRu0&SrU-Gi(nTRWV@tWa$PiX(D_R0NO_BY8!DzC}?2>naN(Ml_K)$u4m9-Nd7 zYWhOs;t%n_-6i~QqWrA+OYS%l?f#x}b64+ zQQ%L_yg)QXf-NX|=E1Shq2%?9^o+n=UZ069I&S;7?1XHI1HelTegWYHVfK3m{mGlz z92+U{_rRKFZVNrD|2vC42Md{dkN2ABy{%h)#gzV2narYt=5m35qQmqB`ple5jW?T0bctb9wsRe`9y8Um9R1)Gf!3<(`ICH1Y$L~KZekL zs#c@x{1?U)pG6M#>=Q!z26}n=NQf^?Y(}$TSLx+=JJvTr#Y_(~5dGNNGx>C2+FnHC z*FT=GlNJZ{IhOvok>UF|Zk7x9h9W6yD~4Ijv_A6Nh++nXv7wockADewgI&u_6nZiT z1#e5|YSYp-?qpUJ2@Wq^A08#NT1R?ZUZ20V9$;USUCoQ3;~fqdlAYp;&X4HJlLJ<_LuxbuIqe$;`4m~-!gVh ziYwGe+Gg8==d{cdFo_?xhcHR*M#Z7_;w4{L62$O6QUCBd>y;&459u1=h$A{hiH~Qb zh>OM_AzZ0efC>NP42v5wo7?=Wb0qpUXmv}XFNuVqHkx7;$#VZpYDLJ>Ju@y!i*airpN`>N` z#>xqWnpC)O`f_PU{&G2q8BL90OjR~6dFF$2nP-W0y9qo^&yJkjPK7iQ=*713E|1Km zeMq}+1LHi1Qh5?P4^+7JBlGpbOatwt77O1aePi;7%lH-fHtsdN1GUuQC&$=}66)?tm!K*u@OAmfIZ^Rv>X6s8&Zws5}zrr)UE_>KTnGb2mF zIQv%?e_m{0gy~C(hf8w`I8Afu#D7z4$N{1B&GV?gQqpBKI!gL13_FscSMY(KxUm(n zDq2(SUrp4h>+G(d090R$+3^c6J}xp5R66-XGltdESwVp>g~96&W=&Yz>(fV;4V+x) zm1O#g@ApZyhvpjQLgmh2cf#42Ul_x~YDW#-y5w~J@F=h_%$*3=4Qxo?_yMr}paAQ7M@2%R-7R1>5ToaLq&!FjCkVu4o^qYo6*T$V zz;aa&baV(XuG>HHfbk!%vG6Q2@qf79eCE@*2{D(BODR#?TyW(g5Dw~I7}v}PbfLYa z7FkR+tO6?S{vAFaLx?G8wg#5tAvZ<0o<}3uL&BB6*UiY@%lHM6N*P{H%hXL%l$^pkC~G z7lnW?y|u(3krV1UI(+?36@O)g;7f~@Vr$`Laq&V{JH|`5d$i+P#lW*uz|Hwjt+OW1 z-1;@i5;P-`yNwNEv8oH~<(mqZR^} zriRqB#JXc6^Uf|qyz2;OW3$Tm)pS4MF|yv#wIL*YQm9cguivoir@AP{vBqm=Gjj&b zSB(d_j1;0&dif`|s&6e1zHpayULe06dG%S%T--A`U99;!(TOq~DlHeU*nT^et*;uK ztL-Xm9Hgph**A;t$=|Nj;R`2o4onU@$VkQpdkV{#l1ve9Wn?<9x!QJX-P_eIY4xrr zNJ1s;r^$iV>oy)IZA9oBl{?P_>Zxq`eLE)Zk^EYwPk4^P*75JxkBSeOhYkC4<%PKK zLVAQh0C2)*dC8iiBs<>|>T_{!03*)K_PJ*Kjg7zH?)y09^>a_;q%!B!Kb6$}CdqtP^ii!|EQ=QA1Z|JXfo<2Z zw)+pFUQpG)1^6i$pRLA4enD?L<|I5*1%;iktzs6BN!{>k&)WP376P0IySOlceET2V zzpUQr-J`&@{l))Bd2sffsaD(ToSNLQ+g1FR4NnG=p0LkqA_-|K+Jz~^@9n>Aeu&(^ zu&tjxI_xHmuPTqP#tmYuz@L?Z)6%DoZ5ARnnyED%%6;N+dLcqxzD=QDk%-Yxp~$$a zdecTr(-8ZcP0q1EaNVs`&B9Ju_o5wn){>6c~|80k=n{F%A>;m!!x0Q7Nqv} zs!ZKTE5{=66TZcg^8{BJADEZKh{;wR6V=LZ5vq3kf*}yyb}W zE1Rvx!K>XWCC7G{nAeM_8T( zoH{WW)iCvd<<{7;J$KD{-0kPESPbEErskd@3w;ZGITrOG&q06v#2oMcDfdl{YG z%{n#wuuDqTlGX5q+5dt@>h!-Nqf0%#%V2Z5+uiyM6 z2Gy?+Kr2dz6;oFtl9HZA=KsDL+J5NY<-TQ5d6lu+xi4YLzqGv*0q)YVZR!piYi zK4TR3&i>E@?$Otd2M@CWm$_ut=J4hq-URd%&Oh^|?ljb#OIxiVTc!+rW%3Vw5QiMB zKO?w_-PpFjYhqIBwDt7%H!1P#!9^l$ZaGi`b~)j+_+xITDWLW{K_X#utM!=O)6={4 zhI&=T7_*rs#7;#Jd}aFCGn8|6Tx3$P?0+x4Hm<=i+ug7uWSNcBFva! z^1CZkAbcY~k%Ru*moLYG4p1S+TBJg+yVm}AKlHu57FXh!ch7@6reasvyl_iAoNVOc z^0M`$_kknh%@7v)Pj0%_(QGBJ&{Xr>)KZ1K(SNd4%O$2Mr#YJoT>?H7Y{<@d!VWWz zh~QaymM3|oY391aPQ4xBUUraoyk?sjsOh?G1?CSxw&%W=x@LFN{wMgKEh(-+p8rY4 z+P5A~TJ3!9G>Tg)(x`tb9S?d$`%tikDgleS}ZtC0r{#8i{x9^4Q6M_9|9 zCoe!kn02@E@QCUlJP!5ZuH#!7-b0U@y0iBGB|f=GamW$1M#et%H89^9&B=1ls|`r1 z-M;U24jX;Y(pj$xTKcS*geH=FMAFZ3SK*gzM7u1McX z&qhT6b0(SB#EXNBG!S(f)B3#i^7ozj_2_Dl5vfdxXcunHoj9?89o*BbcltdC+GEaeI-+N9FulhXc5qRC!8$%oWrJvShLXn7tfS>!4KQ4Pv^{mn`J#u7rJmD{O@J_Kzn}F zF(I3Z8ZO})l*q)<-)pr$^nI&r+wh@H*^u1LQxUq^N7YG*6gym%} zoi7GU=SRt`ZwVT9^^?ZrMB=b|yEZqaI}*6&KN-z*5Ovv*uVebyH4`>sUo9WFP2*HJ z(~-{w?4F+Wgv4>naW0HI<~LkMDywb0xPJa^?T&tKW9eOM{4TGv2i}HxcO+i0`_H^d z@{1!=wCL%Hy!ADi=gjv()!3wRdSxE?6$r9c#4JufBrLU15J#m1q8A(mE zu=>3JHAPw7xVhl~$axU_&HH(V_-NxcQRspP+6%661I;+4-nQ`S8x0L zP`ym1c;h9D!Eds&Bj&P--ch!1c1HtGI0<`1tv8)hGlMXG4U^dy`Xb*biXh3>Is1#P z&5)3rLRE#6K z=3MzgUHu~BH{TmsWarHmfTiU%9v>_gSIN=?7}LR@pMd5FZI2Vg+N_1le`9z<*VGNZ zjAiolEw?(^u+h;Drp&*tVVAaN2`fvi|(R-em@06yJ(z=2eBSfW~>Tn2UYye!P88{r+np! z;p@SSADYPC$ayn!EG-RinLEgP!a7kbJ<80xL&A=(6!sO|~;*ynJkr~9k{he(RljRgVSHtlNUMbVD@i`a#0gEWxTA|m< zW$a}Tuyt|ZlDf5Le|LL*fQvgiL4>L$q+(y6lYgoQuoviIkJz~u;OY_(#Ya|nuC`l* zx5_}<9rU3GJ4YYRl^K2$>+&~S8JB%09?%=%N`coj^1fsKnLGzQm2m7ScL$2#zu<<2 zD0`LlQj4&%f|lMA-ttkUJrW+N|6kYa{JzeV+cm#1d$N%`Es?**1%&xYd@*YVusZ3jUAHr7aQruP939`8g zo8Oo6s8fL~`2>TG>6eSstO~gjMRhr}B0)L;Z1wB&MB7gaIU<_&-J4c>nU4gzFaFDY z_2V#Cqp+fopLxMH>)atFMgr zWULPclQGE|K_KsFAa}y3|GUODbDybAidCZwjij94#w9O$Q{p$y=|n)Ty^2v*OUnvT zU5qEPl_qxedoxf^rSZ6}g>fKNKo9>=6FcA4wsTgU9G7jXN{OEZ8bSP!^PLOW9?DCA zoD*ZSHJP(<053M!i$hH0Mj*n4Sn2ns0hd@8n?Jbx`CQmz-v-l(uRFByTurI!p`Sk$!Kd;)NsP20O zKYHXrJ#>emvU?-MfPR@v)?0Rrba0yeI~%fu7*WUK5gE`w5m++Gr7D~Sj-}VaJXTF-KuWDdx zhOZeeh^`JSSI>QexXYd>0jyFFi<_G#dKgX(4{iWtef)myDZ*C({-x?f?f2?wtaC{9 zqvno=>fB-9i(b9*edazlw+HA0KGgQ@xMxm?TqT|H$}OP5_Emrd{BiLN< z!b;F2dV!5p=c7iEyNB|W&vw})sQ|+0Bld#hbp`m8eucCods0vI-ihblT|w;6y^sr( zr#^FHfjdri)}I?`pK>_6qp99Xzv_xpY!BvCRdv8_ZHh68{~EpN6ixAvju_m02;HhbD=pUu2TRY9Hf#a9j?0@m?z^8n*rq0>!~S-y(Ocj=tX`$;-YZS zu_Se3NZuEZ&u@xj>z=~K+DA+^o9=mMp42**s2f3;i(XMgWmLO;HgQWTy03?Jsn#x6 z#@uyOfuWX;2Tp1+5fD9Pydi&Ql&H~g)P%mW#`-X6aW?EU6sCxCkdnK3;sG&8e(i?O zuJdVYpS0hkF1JPz&1Y_Nb~#bx{5!$SrDCh4on7E4

    FGh^Tukg4rCij9q*!Sk#-X~qZ`V?`k~Vh^42l69ujSY9F}-a zL+5rIiRDn=U;CUJ2S2TC))VAnIs+8<1r}cJL5{GC(;r9Bc&xR_%tONQ^?K^LWiBrW z_LKkAxNVmuaWOpmo7IjeH>ZJ{`mACt9}!8%nHIS}(I_lrpM;H`jm({Bywyiu8#ki* zYxQvi-GH&~x%&VKdWk~W%rwt4OvqJZI&X=pN9K01rXvIbfjFuUE0FkS=WV!{Ty$}n z1$|55EAcknwWeHH=t29_wy8x9oVFn9H>vv+5lNvV?fqjc-cET9MJsWO&jr+@8if4Po5Al-PMrnVXwqQna30 z|9A_(#_x5NUk|Ur#`_fQ&v|C8^lI7y%n2%j<*E3Ev>oX9N`z`WwQQL&*D%>0XctEArXK$OGNvqe?xzWJ3XU>KMm zf4LJI?c7dN9hN?wHv9}ZWJ8<&EPx*68XI*k)J+ckX*-3oOhPHXZ)NcL5%%=_M>u5? z+fM$puIKY{DSOKwBxJ_D6>yJEP4`NA3C32!=i@F{-FnRrfLVJC-U8AcuHb3``{Og! z#kDqU^l8FS;=@_4?U>@dPwp;V37IuU#XC|aaoBzwk`y5LqqTR+S#cAP=57pLS}1{h%x$t zs%Of#-^yB37870{wSBe+J%QFq*$^bU%%;*`fk5T5qSyx8J;s9#moJc8bke>Vb%5MTai=;`SM-2Jwx`x$z=CvldT0;M{ zphr8)Ij*Fs30cxMttu;C<#kT&5fsd;as>I6XP&=i&-|3|7Ex@YlVU{}rGExweaQcV zNb{(SU{`M5gubt0hWT+u9m zqwf{9JcB-Ry`Cg+HvEEj@I*`TMd5>*A`@mFr*<*rp}-}kmdO0!u`*ghe$0YKSB)L(6nTbnb<$#7h3nPNx;9M5mwFG$ws|vf$bkikm}?K+ zsp#{*=!CA&6?F`-G&%K@x%xvcq#4rnyImML%)RRR`}Jl@&9z?{UQ6{c)i=@sdbO=C z2?k+_Y8u#^c-ELT6M_a*=)|wK?4awlGEEor8mG?Wjtdra>_X>$nje5#%cq%F*%H>4 zlRbB8;nd4~)hT-dkj;@Yk?f*f)E45+QDl4!GpB#dZ|#^+FwFSM7~t%{i+?%&GCX?t z=B*$o=4^JNe%{Z!PkKD=;-4ixj4zSI6?3d>TLR^&p3swJwg`g4$le>BH`tSO13b4l zx4E3A2Hg~{ghT0uJ!QI>IHOLb!j#Qj2oiUV&c5Y**m;nu$j$YFKEbwd<{77mFeD_m z?mc&XUAc(g3VT>02k7SVRq^^OS-|W3xCKf0x|a6~PTr)AdxfP3tp-^Mj#aM^&WcyN zUy5)&S5O>k#T*Ie1gtvMdNs*YoNA{&_U+V9GQEh>k)4reb3Ip+H|NRGzl-o(zY?;E z#=P)nyRTchQDREAKZKKIt*m;E!Yw&py%J71UF#;%Ran~x+xm{xa z6_lEG{u|)G_VD0k5^){L3R1DfP)KWK$CP!fyY6z%<+QmVS5do_|HAaz+65c$DK#+O zbin@+X2ev&U>BB~_tFmastapU?iXo0eYo9}Lhhyh(43zIzB z35oK5tp_a~hrdDPLP6G^xme^v`+9h2O6C5<-hamM>cPCXM5z8&g{J2`)Hg`>WG$DkVTvuK+oqT^KFxf_ zN_*;F1>bSlS~QCGx^E0?kp4k(Boix-w^140+hpJFBDbO2xsGCmWN}r&a6Q-H1uuA7 zv>EbzeksMrp6mPR(Y*Y|SpR?9JmkXhKQQCLfMKp2^{ePdikE#UFwH=H%M|w4@b8ap z|5Xji*-oZMXZOT183?l7qYH_KIPxkkNb?~yn1J8r_i@X1m3@?N9(CJ_=W2wJqlJSB zF!n_s{7Wb?@~!q#lRJ)uYc?Bg!%O(|vZZ&T|m8mun7)*LmTeP<}z5oj_ z*w1eIE3(+~*#Dca<9-h2w!)_YzRhxnt=)=UUVJG#h)U-eFKD=(u7;_JndSOhEX&V} zwo11$`J!LA_iB7WVQ3*9u`%L)rQjJr!LIaGY9;Kj(FSuUOoaqpPEZf3N3ywVk$1CfGh7Fg>VI9dY1>^!RDNUj4((*{kG4nwX#4v5zVdXl4@_n; zUW4d*gM|%}H~^7)xJ&Tg`n>z?Nj*>KaMwA@SH3+1Z#)%(Gjlj~XR*Z_NvRPs3iqnb zB=ztHOMUGy^MCqv%*oZ^Ag^KdP^^A4jUc$Se(m3sPe1*%kP&>RNeUNHf1-ZQ(eQ9{ z@NGUy!gW#qS{lGTF-GRkYc5AJRBD(dbwJc;G{Y3Pg;JsP#%a#JU-(B?tARal0UDrh zv#^4mhH>3em;<$KWev|(ej?>;-&bC&Um5dKQ7yOoqCYk>t9NY2UpeD@dr!WSTCkM> zL?A3JGBWa&4!z?3L!4J{qIib^AgSf6UV@r83YX;iZC8u+A)h$m!TP?n$;3*mu|Cqy z9I6^UR60THms$+1n~tK3JKD^To*9TqE$?JIoIZ|mKNZe3c6a{^R6wvV?5o*ETyXsk zj-c1zFR$xiyXpHQ^Y=fITCO5*hIq?8jPqIlj^I%l&wMeak zsk~MN**PWtMz=yuWF%B;(>08v~H|{ zE3f$(j;wPgfyDrl9eW8Tw}nL2>*&j6jJnUheQT ze~2Byl@WeVck1z`zw-3nyYrQkV$ijN=AJvM9ohnS7le9+{%k5n9E~XHO<7i^Qq6k{ z*xBO+!?3fhps#W~hx^puaeFYaehuBf6|?;sR-$Yk7=|SV(Z`_gsP?|FaQ32xqAGAS zFnFYUjgnKMcBe1$kIvi7z0haRrhN2MwhS{orj)Y!RI237HQj8|V}g9!%z4zNo>bEG zz)N43vrF+p{=h8mds4f}KF2%B*Tjwqh0-=n_eXJFxhV`yAOCWSIkl~Q$$wvev-4w1 z+unkg(+XkOQCkgrtcyQDC#-mp;(_AmJxGq8$R_nGdxADF&y3^!Rhz26Z;1vBG5mOf zFgKL9P5#4Bl_~H6DB4&t&Fh%1OxR6J;@X2REr^mNq-niR-`=K@B zA1Qiv(6CVYuXN}AU;QBiUuC2{b z$Ypbb>p9oY+trp7W#_EsA5N~NZEx)$6dBxZYzPpo+*s=Vor>>X(cq|~uFIzRG@wUmniN0VyP1)|nYX{NB(apjV z+jf0JaqrtgzI*cvlz%7HHmsBNL182p4fI)(`^`mTO1VP<(r-)1#}*mGS5eWhF|?k- z%rn4t#=J)yZ4MWk|J2*H@EJz6YC?K%{3-#~arqrF0?;s-Qur06>faj5*CfI9hST2+ z&kiQG`7G{fzs4iN?O(IQY3~xR^0^*-v))TmiKTf_L((yW?H1eZEu(C_j~c-gs8{)b zo{po;x~-+EDVFZJus}|m$j zMXwL$9Jayy<+j34$&<7v_D)#k*QEGa>5IdyeO1JMSA=s&k}1vmm*c6(N5$D0RyH;L z)5@EnTiP@4w{X-jaXX6d;pSS+_Gqxf)r02hAgtN^!Y?Vn(kr;?!)~iE=Xl(!lIHgp zWiv4a%H~j)S(=&AcZF-()k860XHprhl3aaHgS2x5W*Jp4?}bucJADT9QofL`(x$%y zZCcOZd!;G(sv)2>YNKqU@#OPPNSe`gc=k!pr6wkgklIx9c!K~5AwEuy${$FuoL|cm zU|MHJD?8|>FzqjiOC?{f7gKY0W-|PK z%|A6Q!p?dS29TH4ek`ZME?V*nZvkV9Xwnl59KDFF{M)zDTer@ycwh9(0Y3dY$ZtH$ z&qAD6AmY4do2X5iwrJsjmKXeloD?FpB6)NR<8X6WUDFf(UBm$C^`PVDIfDk*2mOX6 z?OjkSyGHpzz*kPfE1+V>Pnk^b7n%ebC-!UwSKfo6iF9y-6~6S+)UM^{`Bn_&)5$gz zO7`mXc-!clJ)0!cn-;7XRxRMwnZLiV4u_<%N(@*en?y6^UtuQm(mrnBmTN@0e-Y#ykH0dU0C)Lb+ZcPkf9Ej&mj}qcmG!c zO*HRZy?2{COXMWXUfB+M;7vBzJvtE%*>?YHz(9)sXFH%>H!$fMbXb04n}bJV%fS|E zEq?^7`mU^~{pV2zj?C5p+%~jypWa`dcwdq`tLWvs2)oc#VMyO;YX(7LH2H$TVD6{B zmzJE?o3xds#*CZ0IQY%?Hu}cKE~)Yj8EGW4UKZrN2shwR34ONw@#OT*v-WUi2TLJzzYw40X*d{&K}}oukuvlyz3txYR;#I_#Bczzz}pH7YlJq-hlx~z z5TNAsUE}sf-dLF&<`4rdPLft>UAaZg%1GFS0m-dt(kzK0zW^)9kf|%Z7He4?u^@?P z9r4?lQ~2m{&Oshvlb>OWDW5W!Hybg@xFGUl1dNm{l(+r-f_BA4*vOntBaCXvo@IFt zwtP7Fq1EjTZX1e9FW2|gqmk9~@{2Md0SLS2906Cx$V(<*BdHMJ%lS*M4chfzmMP*N zGiDfVt35CE4l>xHt~WC-Y3YJl?%3V=Ds1#T4loqBMQ(Ih7TvT@t;2vi&+_8bCwydSFBp$a}0)1zE*^7}q( zbd6J2QjhFefEtHiWpe~}Vj2XR`?L!?Ff7|mu|6)sBboY7YdAKa+lGC@<{^H`?nSV* ziK4G-yvx2RA!%!3>GY&#jv)4lHa!}f7*cxOX z=M1TH563KMoAkSU{8rCgglm-Nrf9VJJ}V}k3Z#Xw0v>rtMmx4OU-HKQjH3^uk>4az z9o^!!z%pp(w&-{STKBqM<+WM7d1>Q^KfW11yZu}@VhXUX7Up+VHS#1g?_7x0{*~O5 zIs%VzK*h)NpWL8GcLKM-toFs6{VXT77jn?Q*cA%v_cWP2)+gU9)y%x=s!z;bIce~s z*C98(l7Ar}%&TI+>t(Eq|H;xkSCc5`9reP6Mi`aoQI=2apXRT|P(dv(?`<~o8} zV+5-SE3S8Oh=&(C>Rw70_C2L^6iU_>&QQAq)$HAv$Nc-IuVY}&4c@25g4XGO@kR$S zY{uPUeZnyGU)S_C=Y$Q8({?ux55x^1pf3T~-Nl3p;)tGIc=DsJIi~O%-@>2s2>{SG zO!*_CGDeS_TObw90zVCSUXD;+yskX95+%)dRB=2$87B<1Z5tr$emZ2SbV*H7Hx561 zTy7#O_uNx0d%}eS8 z)J56$(H`0UJi`NMHwq-PqB`eSQE~^|-xB_8eC|O^aX^QMKbMAMYu-^L_2*x)?H~MC z_&%r7IHD@Ae(mM@Sl=bp&>L+xTP}+cel5OYxb*djQH`V?;iU+lNu(fg{*1R|e=`<+gKTJPUVYb=m9OwbvmSB*;s5Xv z!d{e#@qiMpYdl9bYazSEnr})hB^bu+xR-yobKybKa;e(`? z8sw+a5=&nbS?+XN#20O)UOtMj6;}-1m*%$1`#FFvhE3tSU%Oipl*ZGxnM6R9nGeMF zh7AR5ROW)CQ|-!&8fQNtyee9wBP&jQ{Gfjt$AErNyEw&+%Ct&U_i9|6e#=XTk2gc~ zedBb>H~vEsf_uFO6}tZu>d{A=9bVbApnZ_!^xDb=fB)5+d<9boJHpC)br_N7IpQO6 zpt3F&>1bkmvXHA8)@N#tCgQJO*gAp62%799EQHkX1h0RCHWK9xK%H1xIIw}c>W;JKCVtg|c1byYY# zZHy3sEgtO3WK-V6ZksK;9TjwdC)48SD)Uc9d%6Rp{@o3(+eDF+%TNb>7EtG^AvWH7 zrwo4N_nnrO$WrauH(oX-oYb;sWhhDK!NaOI-1RFxr+8O`zvyN~Cy$CZY!dueFP;ic+zT*MP2C7J`Qd|a#_r^je}a*P43`wYC@tZA zH@+6mFaR#Ir!jKC@Be-p)Jgk__XV_FKdnyTx=_z`R=DeMf{~1(C^*X$@&Zcy9OD?+ z6}&bpmLPT?xu_N98c@|079I6eDqZmcas_-SL$Y4;kkg&C%h!8v8rS)v%z+Z&j?5f` zD^4x;_Tbcg)&+`L;0h0xzAO>AL)f-8lqG45!GCO(CS@TW zW#ve?8 zTbat)&-xYzR3M!N-94XD9yvPny?g#=KyIdlpkb5o*wc3nR}hdUm1%2Qo1}w_Or-%C z^9q{X{&)rzPbby{4BMPyan#jD2#zVu#1Up98G$vs7%>}78aQUeD z_a>QV_x@I&thcpX6VEALZ))xB3lp2u@@@;#@&08>dLiT&EVn>$VX8P8@c3KOkuLE87VX z3Vn2ojVNQ`HKi*xw4$w0L%5`hdl)hdJN<<}cuQVm2DpiQ8{@cxxwjS`2OKI55jf2v znRedyB@FfL|E7&Pg zZ4UYCThRLFf92@-Z#wMBrqJ8$J4f0X2PvB8yJKnK z#2YSXZzZ62JP@85v7>!+FWD1%@Sp#I^RFt~cW&}DP2cWadiOdMYqD~i6;>_)385Qs zA*i&Np4`-MZr1V+{;E?Wi4ND6@a=xg)B@CmvJHHfPP$2-xWn$Y+G@(n9z*!d7LO$? z-!^_$v|dYbz(dVv#mU>Ks6>kOj=ny5oAOzL2Yfc5(XxY51Wv`s1oo;gzkCQ$l$4_( z?x5=)^R0|2v=kv4RnA!+$i3`*r90XC4rtgVRFeA4r995jP_Vn?aBeGWd&#@!f zxsRRL@k!&6`7$0Y@abBhSUyc|Ut*BN*%6EP&jJz z(St$ekq+80*}CSKaUQEWp=-8vQRVbLo-IR{4Q6O3?x;czs<9iO=hk=ZmbBT>JDa|$ zM%+313I5bZf{7!Sin@iwk|tdC1iAPNvgGBYE%6;2M_e6AgQ*xG$3hd(Cft^?uFNS* zgF_<==>bGnT2Cu9fRWXZG((9g#0{Wu@4RL4-wisGZpX0xnet$BJKYR%HZ`zJ?-+=q zi&7rQR|oW@Df=8D*RGy^TO-_|a|RLT=I1dN^f!6_atehu8WGC*Gx3pL*Q3R+v+`Fq zJu6grOcx@5*5uqTH{IHx<~TFzUYmcC!!rGWttBFWd;HejkC)$+1L_ZS4D9~c-=9QR zWE?Sd3T@3R&zr+|w~L3m1KmR9GQ(db{t~53dNdhagd?XN71{lTAp8%{+Q6wbH>?j9 z81Av`{bI5{5V1sQ5jXOS^7I!r0Xs=U(E}<89pMrjbyO9X^ttcNH%U_(?$_ubFbKCK zYLqFcg1aDZ`&!!h3a3y$GIM@D*J_E_B7Y6&DK#1o2>_)3&p0qLDjS_bY}Co;NMqHBmwT{p@G}RKI8nePWkSeQ#SJ;oy>Kok01_!{S6Hb2RiHhMI^LePtox#K4vmV^Y7^R6)^c2va)vt3{(D@ z0sJD|6)LTwonp2Ar;}Udg9B&f3}5^1Oycn7o!c{6dZ}Xer}tyG+4epSt{hR@Et#`_ z@R`c)>8%Y*905ss9%h{?VzRb*uZ`3Bb5yS6)n`6;qiqnP`84uFAV=>foy0?@popUL zj12FDM@cVA$^zzhsi7$ALu|UVMt)O8^rM9yuNfq0G95+y*F`epIdKc$=!RnS%3WW+ zTj}(n`g5Fx4|4rhG>zN;!?7pXN5UW`D+B)-aMLU9s_b2lX?Y5hYQCvCn#Il@w#1Hp zbdbs84AFVR)%XoQL$Q zeq8!5%*r)H`$lV!W`nDKS{IO0_wCTqllLq@_!pRNlC9=^F_;qL#aqTAQGXn0O*x_v z1byXJc)m`O!UWU2__?CeqHihUTj(&~znh$b^Njp6q%p1ZkW&{%lP&*MCW8Uztw#;! zAjecI$L{usG;rxndOkeOT|s{GeFeL;qnE7(m8efavo^4q=#V=u}P(=Pq|HSVKiPehULMG(J|?3}$ZoKHmkkcE5w=W?yDGM?#n5_Vg|NHI^T zOJkM17S{~7}dz#FA5(J1c4vKel18^bST$B5h*S0qbFFzM>Znn_bVs2_639Er! zzYNrafoP!h%4I}`gUydpB_Qn7V{Sd~LWDCS2yzi~GSoQ0zq!|n>e)TFB7NFZB?9Ba z^prg~V;~Ps%B;Wko0mlIA=Qd4`hM)YS(P{$7cLfav8Hr42kDuY79EJP9ejM-PV>r> zKdMx?7MpQ z;hY1(a5H;*~lSPeCBhhlOdZuPS}Ch`dR)D;jQTAxVaDc z%I!)L*N(B2<9@f((-pq)jWQb9r7PAX1y31I0lg|K&zAZj^;Jdu3L~Aq*Y4&f(?2ne zcA-46l?MYF-?Zrq997*qRC)R8JiA^;FVT#ZBx&ixi+*fvFTL?`_!zZq?b*6x=i5)8 z0`oLKGG2ZcDVBt*^p6=)c`r9z8Q^pda=?@i*m9LpPR`Pm-G0sVMG1>>JN(OHY{kbiro#xmKZD#CPY+u?l*thc^%b{JpN2<&y)_uuoVfBtBLWP zaL9rYJc?Ze*4k1=LQ!hs#z&-HQ%mFAyH7AW5SO|Uy>lX}ahHshv@yA==lgQGzjg6* zjPJAa!NKQ=1}8&VuJKt4HPlu{?@n4z;p6v}FMMC{FSbTJ*vK1c-%&90JjoU0?~#3! z;K6jEmTRS-?W1*%avak@IXT2L}Ch8h-}xLHH)e{#d00uO)hCD*o~dKl|nVtA;Kr ziCIBV%+DGr%i3>n8}_shOpAF_5;0H5tkWMP z+1p=wsM9WQU^M(1uQZ2cj%8BydCblrOLTn1(KUA zw;nmwTm86{k1d`AD-L-*z_mLjI3^$%vtVqq8%4=_u;WQY%)gHgk*w32wTKG7Z6K*k z7G=JGz!-gh6k-&hZASxVk@2CKEpwW5FXTQ3(}!-e&2bldXegDTn9I+LLbwjN{>gfd zBu;A6!Q$x5T4dP)9nS)-bm{%S#CdDh?K$o}sr^l(Qk2T;V0P{5)~`Ie%)G^5&F_cu zZ8*ITJ=49e1+@$S7DYwIXOL!y*Qh#cRK$muX*wTPuN~foE-`}K+9SNZJV*6Ux_X)7 zI`!Y0F@n6lVmSHXd7#5^4&iW#Dyu~=*Z86D*V#x6^VeO^o495sAATd)czK=Mrqp*6 z8zp2$+MUvxR7Vi z)41}ruq_DVP2tKcnK&rucB|Zd+c^8La$aSe5^9H6K#OZnY+TpMa=84)GJvSjtg*R| zB@fIwcI?bNutgml`Cl9YFWk+3w^Cc>R%ou@vg`WtH{%b>VIU4CmMvA5gDwVPP^*|q zh&nyn+5l|3}lghco^E|9>N=#FR=o%R399oXr?Xl*5w4 z$}vd}Ip;JRa|lUDNWw-4IUjOn&c|{-pA9)PbDGok-RE~*zkl}Uc3rPM50BU5e!t%y zFS?vkVwno>#p1$>;_)|BqwES5 z!@uRyI;88=POxt`qIi)`=%i^fqhuZdoiyL@-F#o?de9$KN1N zp<<@83wNV}cMd0TJ3EzKqEwt#SrMZw+>X;8+x}ac!~NvOv4@qRCBsu#rs@ZvWeAib zTtDT%3jr;EmV#~31%Ou5TfExWhB5=~-DzUtmpb+wTew;8=oKq*FFM(OcXZb7^ys|8 z(tOS255lA$F5IwEBZa}s@RpDIi-ARM!Glpx*M42FdA|10@{^9D-{3V#?T{w*ydajC zdjy)zt;mI^a;x4B`r7<)&kxi6&>3n+$M-EHhB~*JsvIK6_U-KNN_DO$K@eW!?#Yd2 zXe`a}O?nCBYTji~Lm1Y;*X3Eb<(Aot)zD^i0{Vs-Ol^Zb(bxpB~<=&BW`RQ z1V5SrBkJuyg-Z7I&Xk%CrXL9rfp_tBG~Ght+~!bR0Y0vg9KLxpXKoAU-#Mi1udj#; zZ?OLyk|(*+RPQubi3wV)KY{eO3YC1V7Tm-|?8B+~vu7QGFY-`$wdar!XzgI20+p%J|NC3gikB+Qs{ zOG=8pi@}g@SNKBq?)>nFKyt7ErR+DVwQ!BweQLyo?qz`3v`ojzCb3GOWaFigKsE=a$LkXCPUgFBq2tDvsuS$7khi4&hAf zlftK`n{Rjar#3WFM<+}vkhC^1-7t{RbMnShar*v&mTc??Ek#EE=K0T}l5Tp;pG&&u zv5(ctPDxhL9KMJ}OZZu^Lk9`cg^srYn!0HHIGNqaxsT<%&;xx2(60}qbpJ@?Ww+FDg@f17Fem+yLYKfvEsGw{a?Z!J9% zNGbpCiZ!l&pHN2gumw$!|!kr#V+Y9la#CD5$iREtTEA*m<>3(x*iM|-o{ zH_q@WITEDBq>$JczPIskRQS}Kw1ZDRWNX3k^tG2$=7c45*)D1YdY(u7)q|x_6+o3e zs7)!+|Hr4|I=cR$NAVVqeaj90AeLBTIA~d>#Yfj276?Pg#Wr~Q{vb+i@q!t;7)J_u zkA;l9?Mrp4WExE=!Amp9sBF5NX?mkgO_o>!f@X@+#vW{_bXll zMr_z)hc$rL4wP?6vFk!x&wClJ*SUy{AY8Z>mU}KnikS8hqAT zL-q7xV~b4HUS1dZB0#(``^w(XMLmG5ac0GQdTj0?K)8NM9O$J4Oyh7{FBVQ^c_SGC z*f0P8EC7Oz!k__&_vS83-{++t#8pjm$B!Bu4TKAb8*bG(;+FiMjvn$aMoI5pD|*=t zX3qkL!51HCxeMkky)s{yy=L+hEmue)QOjrKd?#_4j;AhOlgTrc{x3dT#eRXYon;C@ z4mu67t48hMKwl9Kk5$Rm^uGUIxw+ljczXRx1;3Xu?3uQu5ll>dglnl;cvw(?>75%R zYG1KP-Sd~Q>8|=aftOgD+kro}9d}hbt;2U%(w0U-RzhDaNW?IFV}5!aHO4+wK`}U8 zU9dg{6|tQh0~;=`YB(q3xt}W08;|}%{K5=gmSDy;39QsHo-o9OsB?>0js(7*ztA(h zY0L>UPJME3BkoPe2!9@}U|ei16Kg<=e%~>29Awxc zwRrCN@s+{nm9>@(iNmwpLMOULH9dYJ_n&JePJ)ooFXCJMm!`RD>C~XQx60|%&Je*m zdzT#+f|s~>;i=jVy9~yzX=`=q!dDBk(RzSD!u^{Z{Kw5+Aa%l0fFZW-F^+S(U&RGP z#%#eVj^oG7BJ9~cl#(^|AD!V6XG6hP6Fh;xo~Jo#l~%(X+D%dyad zU$A}FW*cN4zYwQ@Isfb*u|Rfu8(!OMf(0zcWu2w5xy0{+9QtvAw75k%SuWH|2Kafm zOQp)ZwT=GgS$uR&b5>k)9eMCx!s;>k_h<3?*54fFHJ2VWGb9w=$bKCxd%+F;F_O`Q z#6Ng=n0nyjyI5%0@@qAZWlm+>S=cazU0#_S2NwbON>H`1ufP8%7)PJDvIk?lqQa(a zC&ZClvOhjMi_NkVvX(+vjId_GJ!uj}a?cRUVvaKRdmEK2F+pY!;!@jKBRfXYeBmmW zTQ>}DJAXuNm~f_F*^J}SAIBQ6IO%2MDZ4YP;`A7khl$I##d!ooMm_bX=Bk%-{5^-1 zV0v!-4I7vX%fHo|FG*W1JM=qxlXs6=jDU| zgn5T&#jlI#9LG1_L|9f2r!(YiaxD%LOLjS=qC`lIk=v+b@K*0gwt0s4PGf|F$E1Q2 z-`ZiKN7Sgi%m*3Yjs(D}V*gt=aJ}L{<8W@A_AzUEL`H3`ax%azW;l#BV#A|9YOSxu zkl%}rNkCxZgPS0~*<-DWn5T;LP+#6N&Fp*Yw^|Z+IKYSRU_me5`S8FUhEP;whKk_t9o9PyVC-9 zA5c543&Ir><>oVZ972O&%YHVLPW&(AAJy8!svSKgmnl@Q@9~#6^3J2h*f(FFSKke1 zu(vp~&l!o_i8JdRmw5YVt7ulBxTs;Hh~d#xzRkb4z;(a@L(vFupz*m@Q_@}E^Ymxs zkOI9xPsRjv*5)sIfa3!WFBzrtPjemWTO$8ELL14EYn~aJc}-mJa5qE~?7^rpK-|3+!Y@(S~T{YMNoGyTMGn9!&{9pZr#z#Mesa9!uIC-V)j0Zu+~KIkg*KtWPoGE3km{&(y# z>^Htab}z)Tav44MA`r6OBfgq1%!}WxTAD}d*BHRvS*}QS@7enfGF=RpVge<$-$uqS zhsKa@FtI&gSGA0~aHIaUsOvDUN_BgV0y_DJHx;1lZCA_BozFQqTOV7=zxr%D8qEp! zzG5^R*p2hll=(K?T=GZTkF;$ONlv`Q?!;k{X)CZqpclpPK80Midm08ZvS@0b=Pr)z zP)DmmyRT^}^?up;ca#8Rq#TwVu0;uqV;dIb$Nyo{_lv5#lRLh8OMhiMQ=N`EZ6C`H zcPU?3W3SCSQZbu(X8EGq>9_RF&hq&f*-pg`GEFh!xG>XBcu5wOV+lvTCFN z2d``T6Ia*Dv+{b)cheF3?aP>f!#Ha1iD8WoDU{np-IYIvf3sVj`rG4Wl`<*yq;4cI zCz;`rb^2rF-QuNi{BtdHT|nT$dU1q#>q12I0T8?X-c67%UofQHjcpqFSz1t%ZNHHO zz$_?Jb6Q%<2HtjzR+JqM958Jb24w^Qu7M$>0DRcN(??xFQIuBL3!1Xhp)fuM-zxP1 zBW#Z_ubgVPwiRC;9oE@xB*RU$hVEF@!#Tf#EtDSDi#^vRqy76`EM=Uin^<>hQ@`n{ z%^c5DW-sMF4ofYbH16JSaHN7;m8P zJ5nEr=ioXJrg;IsJ~(3p_-rbEucRQ(CsiB< zUWI}GVj=5uls;Jj?#KJ?Nfu}lnD@roCuS~M1FvtMbMc~>amI9{3ZT)x_LuPUH*K;} zv5YaY%M#poAP?M-Y{dTg;Cb%h#Xu?kr;uPm#GB@>XP73RL)Q%=wHw5{n?*SvP1ssp zIj4|3g95-(B|qvF8fN*GeKJ&(y`y4w{!)@0tD~b8%BN)F&JUZ{wkis?a%QHz8!IaK zi{<`;>r(UU_@8&L_vSRu1_I~kiLhzUae1Gpshx&~-ga>Jf$4$Kfk#-c3E&LM0lDwb zz`=9}5|@O%qvIcMdkKHfq2J-v3)&F)1yXZM4}ny%Jk!xuKzA3ub#%3;>ZDX{v+*%9 zvuSxmF)fr{*dJ(lcU-StqvEGc^TAt1AaRBY=i96dp}i%>QBPuk-*29nb0k6O-EYGw zu?sgo+<2Xte4op=Np(6=25@zUF5|h0SNH!~aU7QG#!~aFT(8sGBYSzK+jPJ{?xn>v z40gp`pDc}u!+)Qd^qy2*(>Yf-;@i7zh1oK4+6}^cdr3`-w8;?#u%@j%e1TkPx;_6amrzu|ZK%cIk6s_Eg& z7kQ*i75~g0>hkRB3Tr&mW?irGA!B!3cD%rz=uIe_Ni3HaSMZ*2+PARK_ZE^f<$p90 z^rEi&vQ?2^*@8%&vb26j8hd=-VkFpqb=LuJXFch%52nELCtQ6_o?%di$hk)YOw?t! z;jXYSQDvDKyT0h@mod@XW@qO zJ>5KMKd<<;dq+y5j^((>sppsY821aovTWG5>EG7l6dKF!w18`D>aB*w=!TUkddV7Ss?&uf0cTrY@C?ruXxe%e(J%i z7Ku=Gu`Jv4GsnS4DKyn(Atc+954Dsx6t0zhNoARM5^X&-qF^)xE@q^fO{ELXovmOT z7iVCpVo`A(V`6HXZlS_4Rg89rdkV2+xPrA@Jmjsw1I-&mc z_@#jN^QBpCDhnDR^m4_K(WRZqhqnXRiRsZ>>ktRfaWo|v6=R0T!~9(4JMmE2jk7zv zsT*&))wM9SmAlKcscqd4$L>*?$nC@Bs=wH;ND}%zc;zrPyQsnaUgxK0mi2#JpGb9z&#=wFMSm|?SH>kQ0eCU7&{uRAkQSsaYnKZv zJ}lqqKl+Q2vkdk>b*iQL`2WEiL|0H11x2pt zK5(nqd9Y~uNfnvA5s=Gkas181caR}FzY9LBY2~FJQZI;RBQ;))fwGYaj}u!^XJbwk zT?$A39xVa29dmm}r&MrKTNGTbi}$yL=mtcQDU3w8m+Zk}NYBrl%`PP~8-Y zb9li)=okM*ZP=-FnRNQyJAFwAz*d0xPbRVaarX~gKS3*;VR!xXZnX;YBN>7p6`}&A zCP$Vp1Wvby8RRx;Gv(+%d0GnX(e&@i2#6O~T?1wmk}nEFq|7fxLTjG5|A=ePLWzD_ za!5%az*{uLC7T2DG~nr;3~Q@RN|@RyCd!maswiS6@>fNfXvY)7fE!~rH22BSpFy!> zU6m-~;}~hLI>P05t#&&`y+^A#JH3TLiw#=Qyd?-rQjv<{30h&u!ZE zzMY2)9U7cRR)F;H@(*0$BO%+;* z)ZZ113j|UV=I8L|pV{h6%V85RwYI)Nc|(P@;K{n#b{2p~{EtNQd)+?*pkM$Wcb4bC zP$K}ulv;n0ShFzl#`+Yv{^M&-*;AX&Qa;H9vifpxuNWy*oLw*qUcMw6Z_a^i%@RN+ zxUD_9;U!G-`V2)u7lQ9c$AclX7-{JTwA>y&Epw+6E{T!1A>9L+hx$@7?IT)*M z{NobEBtL+egCrN;K<5Ng%M-{cyvKvDevk>mefKdEaQWESbq6 zpWaC`N9q>!2;?*IxrnZue1vhlfaDXG*H(TpPzrw%3HlFy>A`Q0C&Ig;Gh93hyPx&j zM4^KQU{X_-6tfhh+mM|vi-)(*P+9)~z}v9;K}&@UU5@$m>Gfw8V3GDXxM}5!E-ys+ zoU^aj#cZ*DH|7$yqAwpaR=Ab&;>7aj4*9W+Irao%02tzw&rtZ8@c`lb|qd`^jyHH`cJa+L0)rGBw+NL@NK6OtD1%( zRqrkB(LIS3PR!SP_q^3boU4)f@AR7XYRqumb~r<=lWP zFyHlJdVa83dN`Z#(mjY>^-gh1R)Ke#TY>YPI#-2>_ojgmMC_DZCF_ zdwA+dY0H}tM)vlsB4^W%y^qX~EDE$$$D$$}HQqC+$5LEB-h4kNC29Lgdf< zjK~A^v*(EU+yG{A=46u#@kqQC=&`7tjw7y0hJEcUwz2@eIdFxPJXCX0^Ue2KTO)KmBu}xgT zH8lKB$xmnRD!0^wYdhu6S^nN;i!!R06<=VX1^LXGZwjLiA;)c7VCT&KSNL;tR0^QA zJq>7fPaN{GuYUhOPTd_4tnabaZW?`G9*4jMqyM*x0__>ZRHGQU+y@$=$Y0`o`x$ZA zm+_h@L?i@RM>DY-AQU;W_ag*aSm0i5Oug46*Z-HBLeGeYdP023q*(8t=baGhA%3(s zuTe$|wYln>=XGkPIKld%kB2A>SL}NB{B|t*A-`hsHZfM}+%HV5?+H?S`G@G@>b#B! zh2fwv>BqI}=TFG}uLtI;zi#%RbPg-G?@WeSO1VXMNW@PyY?ttU=A&eU%A?Tsi95tO zXG6Wz2@$-B)piX0?E3}ge{5%+IU2qr>I2=8>*MB!4siT{t5|+jzTFl^w5TlR4)ZXe=85pHLJ7 z2+pSEiRGt_3G3<~i3@L5+Gx@DT50(Ldbdt1eB_7kb>_R-N-Yb8a~;onIQWtYEKd|b zVw4;n8XG7UJR|EL8`EG-CK7G{Gx>=KBmf_*7RPUTAQPc zkvd=$Hye$H=Tnbm&l^70n>8DfJ>=c&q%YWh;vCn@j- z)w4-mbM9iH(Cp9i#0$cbmfQ``n$mC(LdH7Xis%2blZ3pW&*E-!Vc&WjeUXs+(T?s} zLhWFF_lM{PMH^lNg%}XrU8~xy>niP#m&$RAy$PvhQ7U^g`kqtclCbf%V2!O)ht~%gi>F%!Yi&tuB%cx<&&YZx)=5 zvU$$ze~)2r)XyfKnia_KkdsT*t>|H&PXNPWfg(U|GQ&WNVbS}zYRC1= zPaMwLyyGSZ*SM7|-LKGsnB>7OOAuMuDLuEtQk;yq6uMQBK@6K2CVzBx@`ag!+?;2; z8BB@+f7Ac2_)t&nPF+=$yd4Q391e0X~Bx#jVRDyzbD_Qs#i6EJ_TlG}MH#olZvsxV;LPN6DNzP_ws&Je4uY+|Ix z!jhFfG|lbxC3!{PQbe~#;Ysl9H=K{B24)~&F@xc>#CbOTM1UkY(g@Fe_o>$`V`D2u zf7Vezx2S|RKL`Oo=UzS7FH#ryknLjh9gs6C#H5ALmmX2xWw5nbY7X)x0ACrliJL+P ze${5GbB4T`d-~#z{PD*|KGnnv~KRv}gptWoO-;dd+C!@=q~@0%zbak23As z+*(;-2)%eNo`CeDoP+ZZAaKsUS|nFG842~;R10|Jx7YXrV+UE|^V|Am8iJs%M3+wm z4Vcg)va_Wx{G>UxXsLcv$o!sCs3CS`sK^d!$uHVBoaHwd1Y(cZ@7Cxwgmq|OTu$T9 z+e2)$d(Q}l+Mn3A+PHF%t0(7xM#SmFU|4r!a(-?Xc#TCVD zs68~{5tg`Iy?)oz$p4QJHGnmEey=e3R| zg}s`nKRAlk`MFaJCOA}u=xM+1IU>{&2W^I`9w)FPfia(tsKoV|*z6~g-R}+C2bvPY zi~NA>uu&G@OOlGaO<;fG&OW^{WrgYEVUJG|-V86Be5TDBjrAI|GB{t}ojKfE*c$C0 zev?|DT6_v93c?v)%(WUW7|xq*gWO4haBi5j8qfVIK!|Zpz#g;(rB*X>@I!tWGyV|e zS!-DwQH#Vm+*6rZ7N_%>Om5?=C?o%z86;|$Ey9FI-=uLjotHg=7`|1_RuxuLEAhja z6+23i%$zdRRB`2^tUMb*jawr#R4ag+k#D!V!yY2+zB)gwo(|#{BC(op`Tb-4VPX0p zO3mkTL3=zYeT1ViqrqN|e?Tqtv5+)v4W$q?bQq-)v|hw-SP~lzA?v}5R};5|xL+)Z z>fP7xVz`EbTqMtb)RDc{m%)mk5AdNDJ8$0Tb3|QNXOo2P3LJr{2z`{@<^^Q>;xlZ} zz`Gu8EvN{SYIHek_*d1llKWJpD&+}b;q}c2s$$jEuP=r~qnCnO5XU`_J{n5zw~Odh zyz?5MOmwgw4oE;*Yz+TPY~Nji5pd-5fq~?$Q(?0+e@r9_;|HSmM-Rq?;28td*Kbt` z9%Ms{|G^*HSO_19@<{}<(bh)=LH;{E)Ix6X-{|BG#J*(+FP*30GlRSxiPXnLM`h_wzklHT1ziE9nK|?V+KE12~FO`i?rS z5NuK&GYz2F@y|63Z5>u%fb&*1wre8(o^LW0`h>%!veBCS$3pBWq&xmi;=7js%LP|5 zomM=)^t}1S^&W_r`HUWCqB0eUPP$UY%V(m_&NX{(oP}qbZ62}DS@%Ub zAC4L8H87>04fmx<^`-UA=NJR@m}QAtIY9|0S$?8-_*s|`d{Jigp#O<5TcYH@JJ@BX*$%~nlf@0{h-n@&4dCSc3>qKZtjkArl@F#>09vB*@) zgc+m)TH|^)zN4zNTPWWDfo9nL$Rr_voc|F@e{-1VY0^AW?H~=XiUX+I`H#~W2Z2j@ z!jG-7n=KRdpEDFCmn^k4Q$J)}TZ2Mle5^MGeqO&Kvi@`J*zFJ3Plb`bNLFm!e)@=k zQ8Tir_V(!^?ppDr%I&9d+5UTTplI)tN`l^~>QK|*i-7^4jTS4&wC;m&B=+p@a_8H6 z98is)^uPL0sV9P|Rp+{c8zW~*n(wsVbmBS2-F1L65Ta?e5q@I+%jdkCQ*Q5%QTTaB zNaa*sTyp7c4C5jBJuS?VrEbN+?=h11g?`gI_k75@2DttY#jpoSyS z69x>E86Ox1bavVt4b^{#3v#zVA{`9-_6i30*EFO?2vp^Y`gGrPp^-&rB#ILNmf?H->-Bpj7}@Zv zr4+Au)y1bioB)p+!q;}Xb;Ya7~-o+O+*uE``-Y22AXx0igw+P`|sv_&)k7bqgJ0F?aED2HwdAXDI(1L zDu;n4=U3TUjeofkGK5jIWx%V%Zt53nax)XUM$2ZK=B{*WKrY+c6IJLa$Maq7e-ERY zO;IfhmsI=7RRu?Iruu6qtL4&}FW-s)c}{gwsWivG>v6=K(q8LCS3XcWZBOBT8dR3P za`o!17MthXB>~qju+yAj5Lu*_9TVomlR}p#;wIZql3pxG_0r`!3m33wUV)?6O3G@> z+#x9H-0%|5C&wz_=V=v8-Cup(isz?)aMa=5LF6*B*@z&V*DmUM00riV;0(gmE%cAM z*#0aocTHUCt|*}{HwA+z4KFum#%>Fo)z9%B`5li4qqagz*eI?+r1`mN^MI3>5LlH7 zP?pU4?8u0ELGHu95hdS&2z~2eU?MMXEiDn-8UgwQb%Qz#zh>i8*`iOsNuydmf!CA+ z(T1FOJD1|~s3}^%I(5bX-Rt6l?zLh~@!BX&@^9Pq+n^L|y`_$<(6}u1MN!Zl`PO@v zh_aH%0VF;C_39&DNFkm5Jia)%`it_e2c9`6nMF-WYR}514QHi{S8sE3K=(VoY+U^> zvaZ@~jn!mOGrFf1*PJQ6%doed?mKXq<{f2<;m4BIAauJIvQzN|Hmwyj^yM)Ot6wB8;)pKY_KPW5vN@pA;& z)E1Z%=nC3rG^_toNzId3GtfF7kj+XHkO$E7A!1za}-RWkVy9*mcR^HA&><|l^lH4StnEd; z06TZ8R+xa)S$%WJVHoDV8*0sADxv=RHzL8Mi~mK!&pfsorSq!!XDw25V_u7kJ9=1h zU!QK>j{N+P8r#1{PfdVj{Lm{|AP2j|^uVR?cA5KXg-tB{?30n?<}twU?esEbiRI8I z9}U|sJmPZjq>K7IuCSX0Ri zF+YlYx^PwN{d{h=3`b1y`u;*$-o~i0-8pBG!;WsZ&i+U0E5Q|)9pxbx*Oa#_p`G+oajmE=pCy9cg;u`l?f_^bw%uoy*;`c)7bWz$mB(t05 zP-ZZ75{PyI6#iu=TX$eiT0wsW!8uL*-`L5kxh_KVTvx3QF1`B*hRV4Q(+q94i#PbO zOBdrvpT+Zu%*J0oa@{;`6mHQn^+n#gm%0T~RH<*`7o}8fiEkF8xUt206K{d~^hwTU zPv%DGl87hCSwAtm6AflK>ip6~V$8KO-0BMGJR(FTL|&Cdc&MgW1nAG$6}!ZET`yZ? z$Nt~v<(isgz#T3J2Cjl9mXD?W*MGdDbWi>>R0%>H;KT~aoE^I@)o6VbcZ!eXvbL;w zhFxVA)<^fpf=&78%OSycI6<8ruE_%FCk74YMGNz|<*`IwoZ_&v78;~x_qIA?BrZ`f z^~&KFIL$F;t7Wf5VoYV~vZ+@h-N)r+(pzB_X-G@=!SHA&`jmaY{xOqc%z0PvIhnor zGGP$%^;ZY|M16}!=_QcUfcDBN6K>GzX#sFk!)(;0_b~-B; zt!~aS@2pppIs<8X&fnC!9Co<<||ddFco zOu2NX!QC$sbcSBB3LuR&@-v-X9SgK_AdU&%*ubuf9Del0p8xxmhdd!HxA7pG4Zr=A z`Duj=1y9|XD`hQrQ`gH(n>r7F9QxG~)v)G$8aK$bV7j8rC%AC5-h zNwK36E=ffoT^!EUOwkt~90Wc>L=+WY4i=~KD7chk zvDiKM!!!OHegEC*6S=6xo7mijew0%F;W~T#d1J;9KnhC|W5(6#pI#~+Nj#@2SRGQA zcXBgjQ$&=j5-^dn<)GA0c#?kt+M*y zotwT{HG#e8!e`GzBi*$XNR10x{A=%{r3bndAoq(1tljzp-rt$aPaJ~z8W#7=dmyJ} zVSN)eZ81|h2Pe$Suz;$I78OTrJ@Y%N{gpO-lRtq9K$Rp$lpgap<`3W-V8E*S+bd~J zxM+9?rke9E9FSv9ivDVm&-BoHqIP`1{4k>a4`&YhEfGWL%iHjqIlTSAu|_6U6^rr% z=f#RVSH(vbJkwgScC;w6VZ$lDsQ%3I8DHGX&Hl!W?B+-lFc%Ln;*)1<0UGz$(@ zpJ6qHe5`F;!8R(@-uU@tP_;tcfop7`&HjX{>>cjdeO`FqRO zlE}@w&v^Y*;Y@)zqGPq)NO8di@7_HD{+#P?85~716x5PhCFTSXt;whNUi%hbkEdka zmwa^ggt*@&_SDqW(SZT$kdTlh=V4%b5P!0|j1b_WmO>wPnjrui(pP`Y?pMfNZyH0* zZ(5-*>*)PgFn?&|5o5TN)mP;4=>?+e7SsWT_ZgNktR?m7`22=`rGR2+ByFXtA)K-@ z+Qt!?HpVIbGz2eb`$=UtK?E=^;x|asOr1Nw4y^^mN0~1L2}g3M*e56*Yk~c`7_#z; ziMKib<0rnc;)6~UcTwtyO0Z|-+qE5i?5j20@GJYYIWefIqVrH?QxJtB6Sq^nB|E>d z0bulnhBSyU-A(?WCB@wPpBiWQ{{~_B4{ks>PxW_Z>^J8b3+E+2#@}%)dnA()3ypjH zNK`rD(_-cqBf>|{M8kw%=*P}2w!%?!#_u0_r@nLsS zd%`guL97xeE>HtwQ$%0Q{kxvtas|2#PXpLulX0ddLmO+$o{a~sKWFzv1>m6cvL&4!txS_0DWk;x)3wdZ^w017zFwI1t6a6yxUOot&_T* zTJPQqpZV`IMM$HAM8EQCg9_TF&G6pqfG3a@Z3I7IiY%WT zPohAHIEy;*PtI1m8Ro5&jPCv@bf>@TfcDHt-%3&y=<`1XV&*(*3{S*C1 zHIVnF>^;=JyV^lMEWqsL-Rn_ct!*i)<3ddL3fInE9RI0hk{F_;nJrYwvAZG_)8lUP z&+rJ&ODV!D9yd}CR}hvze>K}>#4L2I)(R4H1(@OAyX5igZkN^2o{gK%XkS8$!J;RB zDxXme+vNR`YZYs6ER!w&<~g)f?kW&|cSV7;mE1Pg3cz_SKk|0I+_xXeb+=c6bRRF^ z`gm2%4)?Y&0+kr0bBu`UDQaN}TfCVUcL|y8l470@o>Cc_A6%L!Zv1;FPGeV^GsEpp z`UyYhe!5n1f43r=vDiVCE>+3)ONR^vDDK%~YY8Rw$reH1I*a~D(LzL0iPY`fMSuKJ z6LgxHm(N0sy1ie&42P@o;!cr0bCV&MyMTK{q>$Q-{eCDZa5T>APU_xxTMtAzbZkpU zbqVNo$c2nY@I!{9{G0Brj`H(C(I=lgn*X#WH1B1gdiM74hO=gM8E3Prm4tUqM=e)g z9l5x6+`al+g#@E)2W3-mxIZ}ZNN$@iBXu24)z+}e}Lce=Mhr8@A z6KaI4k#A~}1N8E;o4S)+T~@K?@}Dc~yE3FRGI*?g?v9j&^(4U%p*_7m((fH8)!WD) z)3%YglMXtXXse{+DS=j$$i9j~3rfrDrPp_R-~U(msY^r|EFe^B{^lT5Y4go4uN7BA zQWbOF+^2xiwI`MTcwnC^raKiL!S>%H7Jv6Gbcrux{Qmv*IC6s4ADqsHo99T(XSlN+ z^sKNaQWsOJ0_P{w@lH!`>;Cpn;Z|9zVG|uo8jG1hz7~2tbC2z@lcd}~(#df0SBs=_ z>5V_32?t`S8#6_cKM898JX3mnZO;~$aS~K_q>9UxCBvriclXw&uD3rGI}+ecI=7;> z_zT25uxY%1!i{!wK&q~3L=FKJNY1Q4WJ?L)!-MS_=TS9zfS1w44JXDiat2BcLIM*e z=TJwj3q`8lV81&)QB?Ah?wPqbQ<(`E0TvTlzPuB>`Z|1eYqMq&RkoGPb>W7;|K2uE zbB=^Q4u>~bsPZ$xnA*u&aoFT!G3tskJbow=wYc(QOm)FdINtqJLV1`jJwoH;lfUkC zfUJ|hSYn1Gy>yiSSK9y!h0)Y@tI3*c%}1LIpZgg4V&;q~n#X2;$LLtCPgSq@Ft$z~ zkHo-Lh)1d_2QP>3b6#op&%?HZmNL~0!@akJ0KcOmvuy^tA_H|p8v<*9-9ZyEsEHCSX zXY}n$mNu>SBV<(viH@#wzpS@qZdRt&_;xe#eW7kjJ5Maxnx>p|D|%W~Iy(pMj=|e* zy>x$7fzCr$A6GBv^q^c%H33X?N4=l)&p`Ovl?Z=McL>RE5$6Lmzd_!gV{p)Aw3Vk2 zs*`xopC9dbB~5);c>OzeHmz$TV*JcDpgq?0Ay3Df^j+Xo9Vfn2H)QXjqChr&C#A|9 ztLm#-V^#;Ab|NGXqt^CcBbU#N_VzM#1$CwMd*vjz9zMK6Xp~3n6~yJ6?Kwg=To{Xn zrggvlUH?|eeTCohusproS==*O0D|eRy6PNo+vVhRI0)1u0Q0yN5ErDVkX)Ob*O5z2 zq@A%=xKFe|`ZwZG12+mMUuN)3B*weM)uBI7aq7~C%7Awf`8u{q{EXA3-w%{i9O8Klg%lQxJ5V?xI6*E!wgkBM2n=eC4;l4&2J9l(1{*SX7%|5%^xSAwcnd zry=-gc8hxOa_m(gyV(x2{n=Y>+uhg^q7p=~w-?Ojn!%p$!p2f-Y{#3-lDMbYP$q-@ z(?`qK4}|r(yD%!4ht2lS^{OPsWJDVU`W;9}df@fb`nB;}TE~ zSRm)_UKop2k?vPLdn8+&wMF(QicO9pIY{;oOB%07V$PbX9+6>UMUtwQV@fM`wt}K= zM`Eb+ktm$vJtYXI*W}@FQ4^EP{!(As@Yo}(8V3l4t({o}%%dnG%*V%OigWOEoOFAz zNcYBKQ3H-v$-x$nCV>9vtN6}Cj+3(WzmE8t-TXxVjSaGEYpTMg##gzpaqmWG7kL3E zHGOlA(h>Kvu6I4z<^e{y;S{qlta~%E;>}>%r^brM-`~eB#_A|&pV+;yeQd{Es3ojQ&Vkr_hbH{ipTV}r9mq6bp_Ol4G>#ukzH94eV#j4;1kXapw~|(Vo^zN6F>Ir8n>Jgq{ zC~M-b@7^8g+w$b?jrYX1AoZ^yi|>}-`J_Y%px5>w(yEIm+q+35bzTZj ztv5L)q7_P))l}AJ+jSEEg1fGV_Lbc(!rT^KfdnP?#Uk4m0_G|$qvhzA$pK$ENB4D^ zswz}awh4(`7l@L*5{XjNyVl1cr}~<~{w_Ny6A}dT0~CRTCH29f&)bpNDVIKmW&I@z z4?VR_sVOaN%j)_L-IaLbvpW24LZZwo?QYB6o&z!VKU?ZN+IF3{UW$2pTqkISHW)M* zHB^#ot$$x{etEEGVB_}P=D$B=0a)$I_<)K{S!~{9zg>n@ui%9~)Q*0ry>7_cGnrZFc?THd(+b8=*Gf3=i*}4sC%p{JzEr;N$gjA{ zb@_a6v7>t}bfVL2=P|zqVdy`_M_Mg$LW=&`f2S~aK6pv~spAfBm@$|1v5>dDIl5>7 z8GGjvR})2g5GbYeNaV0piW!{_#gkFCLf3JXi*~_hj{o9(^mxx|aY=Qs^(tqeAUvcm zkIp@v6~Gq2lgY9S>SG7QJ@b~MP0(p_HL08G8uD(gNYLUh{`;0$+7oqyUy%!OKC2?o zx-_wJ4T(Obo`f4N+wJyXhQ>rZMcBb_)8kk;;ajP0ISRJUUf;k4^2dJA4L6n4WFa#t z3tMOB@5pM4DdO~K=gK0MN>$W9hxwDu?_ObCNwWU0;g~wR_J1^eXE>Yf|94PSk?5@z zHQVYd3>+y`ktQ|*u4jfOZnmd`m2W%EcNKv=uLY$Z5jw)%oBGcQ?kUwm$aBH)!zlG{ zdK0XqHET00_rR)Tq%YF|o8n1lTO^E$CwHs{c|F(S?(4T~iJb zY$)vqiK<&x+?nnk*6RS#!Pu-?+21WTt<@Wf$BGY(<|@t)%pZw2pZDzL9+w0lG&<#s za91Sy4a=3)>EFtppLCBZ#|r?C=L0ZYL29V&fp9N5G_4A2N*_{}Z4aaepN`Eg%b8+s zWL{lTtyy~f&>H*|WvHw8pfahiQVuj!U9`>wa(<%i_le11drlv<)J2q7{@G||s#l2|pe?W2>apfq)BEoE!#lMoO3 zW8~I@A;K@R6pVY+C9FmyVTB9}qO9Lc@_<~qjkkSMvpbR?zeE~JDIDu}9{HX5EdVF| zi&6=<29S80pznRrN~k$dz*zb$b1#>#k~{UZ>?jWB7F=M_EfDK!HviZn^*%-0e}eJb zSxXW!)bK$Bjmtad)ZRa?)(;!6k9fZ3kR{Y;pxiOR*GF0>s(hEAXm5=9kM!~gZ`5;- zaRR(uEqu=%>yyTFjXpJ5GBUuVNR_pUa-Wa7>b?QbW?;B@-K@b|ch;o<^5sE2?gMPIaV7N@+vLuURBivroi*iLkCjU91&A3iTFQd_`#bMfiY1CFBD^?5TzJTqFzzzP$ ztnRt%y*25-+6it^F!Z!EfHC%hNqR*lsrvIAPDdg?byxhO3tj0$fuv=eSiTWz!Ugcg zx}Rss6kvP4MTL4elTYANF$_D3foJu_4)m(e;B$$m5-Rke3~eFml@G>_8j$+(1eCp{ z!25!Y%T`E5*I|$AKNjy~%G-jq@+b19E>{{rt>y!0CzV@4ry#5q0KKUUpy&MmEP$1Q zqo8LP2#?>{QE681UhI8$s(O&aPl#wFT~|-_xT=;V8{YqHTJz&IAK9!^4i%Zbo?`h8 zbDEy;E7>ufZ$BiRuWF7%Qv|J5aUvaAm&)@{{=*AR%11Tw0_rcDG!6@$Z8)MN z*DAxqR^SE6 z4%qf>59`=|+Ttyq-0Y4t7t+kdPKX1^$@E(IhToh(=7qWn)gK*CO&hu;{3^rhr!ke- zttc+ksL`h#nczxlUAt_APX-h@-B6LY?eV6RP1a9@KZ~-iz+2DuJ(eDD_fSYxPHQ)s zJunlRRgUbXSzWTYqrL9B~NeO+hD4`V!H9T>Q7I>lw?(2 z^#Ci=(YY7{{nVYd>+{5RSWB(6t9W!+F>f6pcx7TDQd~EqHKby2Wld|3|Eqs&Q~3aE z2=`45OHP3JPpc|8xA&;=^2%e;`mM(UEVhzH5v7XMDZe0oaMAt|S#&ws7%YJY85wr8 zHPQ~Xcq4cp#_Fi&m_1G3ZW$H!O`96|ZI9V<4V+vqFGF9er0rzYThd64Ne^n3x15YB}P((2Ez%F|?+-wDv!T7)jZ z@@tdRXQJ*Z8#h9nl!l7&^C3M8BVF=H0S?TCo#=j=$ShckI(+0q_zy|kv`0#B)3J?} zfb1AI3<}mrOc)o}t4u7bZ;?66kluOXSAZfrTerJRR=x!G8bN}$;}FD!v)%3B1evp_ z3o2S#*0kQJzzhzoQm^iHg24IMsGwH4p&G-5wYG4w*6jqE_QajaW`i??6Y^uRb zQo<5;3j11t?kCsQ#WLCImG-?Y9TZ(-P@M`rO2O|gw?9*tP`qF(@mt&1-q~i^0kZKu z^%}fDw#W93wLw*Ta_dSxFW-2Ic>U8{Z)Dn3DyMUZLr*+rs=slT<&5B=?tISPjq!A5v z2?pkzMfjYpI7K@cZo135P4>OLB*Z3!VFkpxN0~B5rJWYBuRHFXbVi!ycl#L$-@@N<*bUPi3>`6IybT`kx55#brq(ZE zWC&#W7cwtQhRF)9!xK`)k{C6VfpKJY)oefkYQtjg_8fItInZJgezAXl-`g&&iFQz& z3d06fZcbHsIMA-fz&REczW%U-9}kUb{8kbYaZAmjd^HjaV-p2wT?Q}HJhzjG+u^*# zwOw#zAQO-H$=}4?GbkFh*-1ZL918!=f~6@Qw#bBmuyO7%_9A|IbB5oA<{Y^1b#>~cz=I2Y^j(hT=HT0$hk(J?~*xpnl1jVQc6#meUx*gR(>=D}8E5d&7RX?x~ z`VZufB!|~Da>+jUCi2WGCqUaLoIJunE+B+w?kd^NKZ|=HSJ=MCLA=Y1W%`wrT_aYt zb9144`=Y*XYUo*t2aY+L(uPRz1uQPnH^9J-!r(FoHS~6BZ8sZK=qBd$(TwRYm-QP2 zx4RJGgM2hD86@wDFNUmh9c|a`qS(1;Tn)f%CDV(JLpjt82Ua{gME7>76xCsSC5nl`JpP{2%gw4k%enFYa!^ z;pELCg4)qAKK#K{|I6G!}Fn@?FD>U2wk*iAN@2=4uEjDdt2n{>;F zo}XDxHVtbp{e`Oc>a&Ta;NW2+uNup9R0@`kL^8_kyBAs` zGg?Dcw|~t=6g(C29GE9_>(F{6&MvD$GHn%r@zg;HaROLU%d$2XZ@KvB*lpYA0h!2p4iLT$BU0j;~7A%*3ywy#=nRK1+BNCr|~ z18k1(?7PK<11PG9WqsA46K{nOq@w4zm0xmtdb*>H=SOfPMss+PO9j6Fm+3gGPHWXC zt74->cSn~F2N5%1;`pa(OF``K^4+Nx5OX|r_Ip`SI8H3f zR^bn>SY1!b|kRU{=194q%cT(_qfy3!G>o2#pni0f|A04`QcCEFx6yR6DE*OD?ku_P&A~f_B{|z_r$@N=xT4Rs1RWGWt$tL! z@{_!~`%!tL5!Z$A?S$`J*wV`01?~?S9N$Ml&a{M@s7H*k3=(?KU|s!! zQ3ys0Tv>cDp@leG&=Pl-@W4Mji(<){f)JBHjhFR=d3@E2MB%QVG@a)|CWcee*%WVP`KU!VAu{~5AxftA(Q@Y5Vr@9BE7)bNNzbr`Q7ArgXx1ahO8&SY4x5)e?t*cza`MGvt1}+&hQuo9`CG%fTR$yT9vyh*B6Bcl3M%UR1W|f5 zH8*%az8g#J!hQlnQKeBIi{Ibq8a|orN))T z(8QO^3BIr3?(hA(M~+;^WvS}FHMywAjs{A|yvUCO31rEnw&sQ{G&1tZ6w>Ni%6G5u zs4Sk&hk-tivj{EM?DeTvJ)+K-Pzc2${H z;Z}3EwmsvV#stG!;42>IWI>`>3vGT<=1kJoe%D_U_Imwz@=1;766~2Rzrmq!REb`|8RP zT8*m{M^)T3dGqO6C0$|;{R61he$3FljbE@;rTT)n+G8tt24?M1u7~B~vQA@d zx`}c=Y}#BmO$ZAII4f9vYY$&Vl0YcUw==?ENDz5|a(>&=R$rZqaC8lgK76LCs%-8E zn~ZG?64P0i3ba?TS+-E~S6ja|Ob#_q+5J_jc)ydJUhXRk-6Z;mH z9I}2%V&&E=!L&8JJL zxP}K_cc-b}6=rWeIX35SICye*4cbr!bFfG)zqz5Sxe-e6;_tp-RVRZkWOqBZ^dPwi zVB+M=XTuBT*bw|gl9FK6La6_wfUFfhN4DciyjJb0tE$TA+?<~rUHO9ZA4+&Bxd1_h zc%zO)51xwV$-J8n7-E9McwVl7>}KbYASFia^6y?-eT{G&>Ef}w!;&Ne_8!s?{<;9cEJ(u zOwD;h!@DMgGEm&it`XV{E$lPxND>Sak-tjTuUg2Fe*k7moRWccJab?9PU&3ZAtiGl z%ywnWBD(@Aetj!*k1deAQ4BfT``V|yoiE1C#+}5R#J(T6(_lKwSlk_%n)&8t{|X=X z2*d0uH(}iuO}+cEnQ6B?pzCMZoTcg^e{NNYG#Xk*baytPkXNp|AjW*8Hx|bOhAc*v zg*$7F~=DDWD)E28F7ST&TUX4b3KQ%RBG`iqYcS&a~L>l(S%rK;Ea zTM{E-Dg%`al}Z*_KN=+X^~_7PCKnqPG(E(~@aJPjed#c1if+z$uDkqoZ>3+knE800 zKXn6D;QY^6<3xmD6*1Crdy(m)kP*~VGk0_8;#uimgOhD)ez%xi)2%Ww(-X}+w~AjD zgRm3fD6654IDL`#Nyd=$T~$-Jk-ab3DTTmy)-BzUJD0U(>4NksvC+>~)K?xnPHJ~| zXjkklf=;S3@8ektQ`zlHswJDxdC4?hua@0rLM{U$=_awBK!lk8FfYMs&u=b0cFspM zewbb`MMnY@-fwVV_Q~2{@MrAjlqPet@d?M)nF|e>RRUF3Q`r&PSN888M=oCOw>z~v z4Q@7MD66}7pOz7ilheIy`q$TJwa_Ka#U;>J(9JTf^KKGOmfXpp>*X=iUH#L|yeg5q zX6K#(`}Ro_9#cimO?VyA*M6bl9pFaBm2Wpbm>SV|zLWBW>(FH?&j90a=*-v*VR)#X-ZGlp01cK~nbx|Q?~OxKmR`f(xMn4zATvKp zUWl4NF>{KD4AvZ-vnfiEOG(qQqkXpeTXz)StBE}7oIRSmSt?!kdf?8o73OCL$%T~T z!|n0@O*3llRhs&w<9|i!Fw?Y3|AmFkzm_9^0CP@EHY&p(`Q&e{&UdArkoom3@4e$4Vbp;}?imq`skTA8!6{nu{_Nd1}X0GAYW4 zdu2*!OmwCw#>=-BT!RFO2_*!Vr^d-IP9zd|&CZiA{z);8P7iDPesc&;~yfp)?JJX{k|cpV+w{%OgGv+1XPO-JP8tp!@mxQ1r~UPLZBQWHs`(4 zEHBnq6FHCS^!lFFk)Gby8=s;qivw!cpSC@hI82VsK6zIf^ycq_&$L@czbrlsX)cBO zjeP=%b*}}@ZXv$MKMkBG+@T6oT72&E`G@f9pC++pmk@NO=@*&JGS!J`!$s`|p9i8~ za9n!>AomWI=Dn~>F5QK;ftjLp5PTum1hi7r$RirVaG;GyZb^~toOa`Xc{&vU&xC|P z^~fxMHBNcxC5Diw2O-CrUb!o?VV_>TP$r_HseZ6PloO)b{WHJTlwN|!ekUkisy2Aw zotO@k*w+g3{vk9YI#U#n3(Z?kFUTcY?DVv~sW*)rd(3_7K~aHJvBQ9h_sz%!d70w; znv*7AZd-{PPZk4<B1MB4-3R~vC-lVB4 z*aW&bKE~E}&aftYej+`%}rQ^qhgIpsvO>~u=h4g_A1D!mxanQ_%&5!C$P8Jr+ zh>20-*VjjD{>@iN@b?a72N`Z=eAwXTTYU1)B|RT-@|nE>Bl^vlC&S}o?eNI8D#>C3 zeqR?3n^DRndB0-g!xDF&TGaz>1}37ixF(0*5E2c+a}a(B(?7FXb(W3(!LBTp!DnyR zEh6??{*nFNc=*P$U$w~$*v4z5bj-CRWAw~nUd{i^OK{YvX=uV7qKf^5^~FOxHJnG~ z{nI|0v3-(w%^o6Zzj(H&U9%eIO7HNfE9CdwgJ}WeMdYR9+;MraI`8{>eaEz%Rnd1o z){l4mJuUBFsahquX-H58^W09IpH&%~?CCV#`C_DT@WSpGiz0U|a{(y!_dFFgK2`td z=W-FMJv`*SiZNyK=$$jR#s-%_gz5k~2z8s7=s-~1c1CROHE`}vi^-&L0Lo!;=$v^N zXjBs5MSl*52t$tN!+PW0Ji}#+&!ycsrowV{7+F#*4|CnKRIfOom9843JwqR2^2nVR zTLisM0cFGC-*0>-^+|F&xP;yXAPU0ad3Sis4Xh&ZUpBO{H`zdj6FH6JYZ3QM0EA^r8ohlGgwt_16RpmM=>KQGwuDF|LqVWjV3#ZBPTWvZsWl!&&1+5!n zZ#V6!Hw{B}6+or@&7=)?6RRSyEag8SMgtkymoWFK+RTw4)oe`6>8k2}^eZHC;UxeB z^V=4lK#bD{e;i**i0YFFzSawXru&2IHT(eI!)^V%oglpDcL4E1szcL%I|@UDfUcFl zi+m0RZxygalw4WyJ~kD(z&YsA%44+;&e!e6!}RctQF+T8?=!mnM;8?HXh79yCN?RD z{;(SEs?AQ#Co)x6h(&9)GQaPc&p&>B@@AR_<_x(v#T@Gh5j3S^(g_{GCfrDisqy;S zo*E<{zy*r-H6-mB(pR+TNIR)3bt>rh?Ce=n`L^36EgTjn%+k+GPi>+S zTX?mK#ph?bXE@f&3gcm##{n4m1IP;VV!~RB261|k=H+=8*s|>zz-8ToM5g)g&V@vxUK_<9gYu zI89 zYhJ=nwXC(yEA}ktXl6V{y+hX7k*d4rsnAk-9#-1&15Fi+hYU^Mf10iG*WhUPehGdWar=DisR;r))3Wif7(^c5Sye&J3-I;OOzuZUem17F>D46 z5&y$4E$-NCT6!mJsSwO%f!>}LkMaJYBkU2051TcPriURKWjynbCqrw~t7D_2VxCgCmg{;~aDTS%QG46Us9d06BoqGVjf~Kizf45asMUIbKR{IX=wr_?~Z` zQ0(Mn-WWR`4;%ZTwv@Ac3-76*X5NIW5)e7-t^UO>BfUhUv+OR>Z*qq8KCDT%KmF4B z-Qqnq6RqI>K`2-DEBsO268gII4HiXrs5~Mf)f)64be&}ls$JPI;j{Nr$cQpMwnl`k z4jS#r?#y%-k`KCH;J=G@FGZnogFAHEPHKP9HlnxwzA9u|&uk+%4#wlu{Uufo+q@|) z%cCU{sc)Sgd~>XpJlmw z)aEnb5zpu1Qd)20Yb&f%en2<)^J^8k=S*3=m+Q7`3y@EiyVAR&!U3s>>{e|hVFHum ztfg55`;km)2T-i@)l};m9I@NI2W^DB5?2{bwvI z4=>KLGQrjEl()~}6bhBnAwKJe_h#D_T)}rOxkn?5@hbKD(JTk+Jgo~|6!O6A(`zop z2yee`tJtS~vyFEzVyHIi({gqOR{V((i7O+ToNkyy z%9EAV!Q9?2cLh<4Q*W?hJ%!#QlAJEf(Tsa^6^fjMb;TS{6xwV$9Tz59q*ombUDv9- z%p+kW^vX!pnbSEt=mYC=_;2NH*6KQl(yk+lTh5=5bIaynXQ0Qw{=1tG@@=n5_fU)Y z+niT`zw>+z-xkKRbgUdU2EF4dRi;|X*IHU{DHK&gZsBVeRW&?){*)Qw?(DDbKIl1B z^JSC!By_*Utkz6hqGRPjcq00wFV75cZfIqgu7%G3glz(w_Ty~Ixt4@GY})SmEyT7| z1nV2BRNCBPj}{WYqm{du%!CP;uV9L1*?!Evd{@e^sMY1M>-lxL8chyM{KolYUPH^Q z9-RmUv=dpHyT{smIkXj;+zu8AlzkV%LN$Eg%_;GwduF*TGvGJl z5pMm{;h^CJj*hule-^d7SB5?NH8H!=e48yPpslnMwLhq5x^99N6B-B}0Tb;a6CQHI zqG+q}wC||HGOU~L$f{&_VHK0~lO$>KBMiLq2Zir;?&kPuqL+jBm->2=8Pb(p!SAF~ z0(gJN%P9c)?UwhYj4u*%myQIo;NAh3D@=lqWthLbsGdI7=vxm~56?XC9%UL^_^m%( z{l@CJ_7xixvoPg7`h1Lal;uP2(`my)$e-hb=Ch-@IsQj6H`tO!gZkLvo{J~OezK`+ zW)_D&r&>RWves9kj%vjmlz=`Js%+olPz>|2vwh0cy+Tcg);*DwRx|x=p~lxt&0m@o z&PiP`yE$+9!VHV!wv=@n{*|-f(pbLBJmpQ~;7ElNE>?Ec`jd9%5M9|U?BK-@t4GE9 z?a74=G}mCKu#7HL5&L3x;oh(YTf77kvmIL8aQLdsW*MO|ODHST2+Zc4@|oJ?e^ zm5_| zv^d&BWx?@aq}bNf|9GN~2S6@wd4nxuMn(4|ar25qGquQ_KQxj`l@*RYvI#<+bQED@ zT7&1%VoxrgGt%<_jJJKZx&SBRCq3N!S*lfduO}b zG4!**j&H#T-&=++3;BHoFQ&mWOlChv!Mla|V_X&XD~yDM!| zcYRZiwv(g20K+}w@zEyfU5P^ zNY?+{g^W)4{UAI0!5dZR0?66^aBmtcG?&Y2gBN8c?C|{*B?GPw(rK(8OeA_0ZQk0E zop~-IQ~cnvJ{L++KQ=yQCa^^RYd#^P`Z!~NIP$$ zS*Y&ygUasLa9L|$cuu0V{qMCPTCCh}CQ$#rxWwLKNRKy8_&fQ8J4*^tFZEH5e=~;k z^^ujWnH-Iuqfy&NIh+MbN@jvDsjf^ZbvjRT)nlmoj1ar|kNFw|&eEx}!yhJR_d+CO z4z2M^0bdK{#sW@(YMYxj1J3G`+`0WSU=)`oc4fjb0yfT`dH8U-n*SYn?vcnQ9P(mv`L?XH0TIklPxGDQpUXLPP3B<>c z9eeRCAELwgq5>bH2cN(!DgnG6Gs7IiX(&Rpxfs67{@bPb0e&$goH;<7545`IMdcQw z4f3hj>R6sK6f9P1=2{!&?Nyh2>6mK3cM4NBQx7RqkK6*9M>PBnZf1ee*j@vCw zH2le47%c7CcbR;5IIr$I`7Hf_6(sRVODZ9t`MF77-7`%fjVyRQb9Lo1+gW@&+HHTM zmOn+likS5Km#N6i8)IN**uA$F_tg{!}nq%r!7 zN9)3Zg&uW48sOwAc-e^nL%VPGfR!z`&#USSx~Iupp;jJG?GLtIg!!g>Sl-`n&I?te zm`mV^1z3r;@M@cr)sZ}}9ZdC455*@hJ%n@z8&6Gc6=%izZA-hn!~?zM>vr4R4Ijm_ zQ1HmMY~v>VM*WicPht5+aPPDbbN-S?02nw_!qC5MG| zXJ3Dx*3bZJl}`0X6d`^Ks};dCg7Spojkce-ias}4=kH|Z$_4fQYc>M*c_92MzIoc@ z9Udn;zUJ#yV{Cg%&>>rY^TlA%C(2Xk$$ymN4lV0AVf8T~?{JTau8oq^K*<9G^DVm1 zMB-ZEQ>R8lbnu!DmFg{YDGtQKJ`+w9jS`bbnpn9!s(cpmzrCPDTcF4{y;vq-ado_U z*S>LAz(lwe_R6Z2C9!I4iDWL?Xge<$31`S>UXE7}Fc`N_cS0ShUY1<+;{{1Ls~r0i zs~1YQr)WpT!HWNk_jzqO2G(=6$iRYb`ZYh~+uyGbLw4PHsX z>k$F-KT=Nq5PwIt=A(bC99S0R9_+I{)~%Uf&Cx0?gKz#VRWv&7yfTISqwt8*l#a~N z5H{7$+T!}9p%xcA__xUNW)kr%JdD^^YRo2TrlMABDQ@Zqs7&r>9K_Pc$pNKCc}jYb zPl5x+RvsjLtO(NVlhb&^@GjY_y2j1PeNFYL_1x#qjVu2x^ZnZ5HofaF?c{Gxw8QmT zZrOHe*E3I4%fV0-k=#&q$Gd_2tZ0;JT!BiGD)t&mg;}4kN-St~{Tf`hG;y3D!Ogek zAoQ6dL-<^!r;A>C6#h4F>Mlp2(dy=#&uDGSmBr1uMD{*hoIc(9V9C2GS{CO%5*}^_ zP*fLhFnw6lcaz=6v8F0xHansU#jr3B`|eIMq@}JqER-*iGdKLQ?^1oHKyR*iI5w`U zh4ewzxYF}yEvpM48twO*|M=R8;d6&`cduXVc}BJm@Hr^s(;HhqQ6N<52Dzl^Ur-S+ zt~acSl{I?AzblklF9Z{m#aF!@hu=$TbT2?&Lv5vNlgLqZ3lB$y(=#QFL}Nr-S6BY! zw=JfVm2-*7WxHF!`*L`(8$sNH{>wUqNq>#5tv#&#BEo8EsA4yZG+1WPu3%tcClxMr zs99fYc^Ir@!en_;Leuf;!%6>9Rq#@aGq-FwR9E=)uOQvxW0bIA+u`yp>>f8{t!(2@ zyEOwyR6g9TV0L?Q=DB_E=sCY^N(J|S==FbfJT+|J)GrG|YwM)fLkWy=pJ)MwM8A8P z`|-)$yPN<4KaHwHR6|L{FD!f%?h(v^OaWklF5s?2&c zDW2;rFTCB$6t!LxZ_&oybDX3XcPlIIG)ksJ@HQVyhR@i;RGKci$g}FB(Nt-Poy2>p zR|9G8STHyj!f?R%!cgchk1|fa221WKcRD|Z9wN!kf#U?4M+i$UVe_R{)gorwxEUSi$1?e6C`lel^=w; zSt+-%-06a{{~@HM_0k$zTL7UwbA|W!EAB|AS9?m`x8&mg1Z*&`x;)d1L#l7o{IxSt zk#Bf$XvF>HAin1zSOwuwV;N=`ko1vN6O6O z&ec(IQA`Fvy1h4qtEIBfOJQgomMP$68)qTH5c0*gv~|9w>6MOIos7jUy4f%&%!{FGZ$drYO}pNk&K2MH%?~0b9%CpD_NFJfEMo zdJjf&FkEK&+NY1Q9W;9u(%Zvwc!E5&JI+&}Wu4Ai$cDs9Baf?8}J=BbrA*IC9g;(KXX zsB-r=3cNE4Fo0Zk`v(i+{ubSbxVD|MsP`jcW-xxwKeq|-7-Tn}4#V8)h!b|1-PluS zp=z=MgIfRQhqqdbGTbsFNqgZ5cNhFdbL6jXDXRTbZ2OwY(>>}in-{np8&aAERnzJy z6zO#|54qfNspr|a7>`~=5+hAO8c-{spse=qi{fRm)(VE<-KQ(6f4{k`pjCV0d@f`! z5te?keiiYhQ=Z|l=sJfv=?*pha*A3WsFA-c(Q-)mXT?|+LgZ?8aS zY3$$W$WL!9~mF{w$!7BYsdKY%5?<2aVJnM|ztTk<^yIdJeUK`*Jgc`=ZU7F1MX-MmRN8Q?fsgV8Wl}{(PqD*2DAFtOti3P{8=%HI_f{bWCH_5cU}di< z9|VmVl{FHXnnP?&B^snZg=3#o9Sqxp#SbJ>p9^~`k6Mg5sQn{?jHkoiXKX%0Q zzSYT%pb=imzMbYMf!(hn| zPYuPLyYu?X6UADc%jLE$-?fh2%+E0|@%If;pG$W|#;@P_Ot>pUV5lY(=b3G6piB=; z2tU5HMT$u>Fkd<3clrH+q}?FR2&@}=j;KESxBcgyUa-P72f$S>A7S2vCp&oq%sC?3zs9l3&hnfO!> zA?z)M!CZbz0iW0G9jeEli1)t#dj5;%pz&avCq&Fn9=CS`C&T2heDzwAijha=HIgDT zMBGIJolUvcI5lA)Kj|Dj3p{MToE-LJ+!a2zmvRc;G7x<|*m*sX@1-S8s~Lfu98S~e&4$*=fp9*9b48Q}dEyVQB?KM6C z7@T4Tm>*L(_HlT`8M(sM9KbzQ5V=9;{Z=qoJl=@R%t!<+{@VEZO**l*Ij{O`2cv-? znxUAhM>;NVLz|R^!8Q7y(tlJK?FyLYgvHiJan|{#+3yDh5QIXx}~V3XVHEf+Fo2#w@kYV80@`Uh#{2=tSVY=m~a zL||h(OkMOdjk$b_-D%7j3-w0N+j7T>YyKfZFbsYT;R8dl{dr#mjt0l4oT$pZMkaBlP&d0(=5k z>^{Swt%jo0*Th6|uz*cAe*EFpx(mU44B}t?Ux#)DhJUHoIHkPytBj#FM}8Po9l82; zoF}NeSmf^7Z=D2TH59s&IV6k8TCikG5~LXs=8uZiJ{I!8A*RD3_9$~BDpQ}sQp#K? zQ7Bt_vB%cN-qWm=fP7(}EBPAEIcK*q#{{M>eDe!zpD6f*W6{9z7Pnvu3D?@eHxV;iQJS7slAr*PdU}N9~kmM zr9_FpJLdLAr%M%P+o0Cn&+?remj+&_rGha`l+R$CuWp{ac`!N)FFs}MbArJQoj{q1)Q zW%`w;=oR-O`wWrb;z7~*kISed()2UKb#qSSGEAsJ4K-E_ClnGAJW%F94B@$QJ}1Ko z^F$Cf_MEN9A6TIO9o}uE(79|Ep~1&c+tx`GS#FG5yJXVneY*|BrR37zN0Wz5NtFrp zZwc`G$NpJ&2Yx%MLVVgr#o{VG*RO&5Z72QP2sO-}d~6Y2#aw1Wp19_4CV4(~ZTokn z)5{sC`D~AGV(2}6H7a0!KReF%=k;%5qDyN{OQM~9F$dklYPc-vfEd+cq?4c~I2>f8 zW7L4yv$j@wCK|(0e_&k2qNdpI+xTO{JjODUdWFc;U#KC%56UDx#*y?FEkD)O-Tsbs1V zk`4JohgRgbp=guZ(>L(1M6whw__{LC(<-HE_Y>zRQ)N55=*+b30waYVCw#?LKbJeT z17^}MtR|}E`zJnOq|`lYd7vkf;jGguW#Rev4cTf%xHfj>dh?4iAf=F4gL-!lih)0Z znd1hHJLIhDPr7EPyKP-b-|n*GVt8}=UjuRt&$nnsYuci+$23&xLO%rjNE9?*H3G0L3puy?5)Dkc24(GeYQG4xU3}t=WfkQQ4w~+ z8od``Ow21w+V!sSJ=HR*)vxv!pLcDO$Kb0)-1)o5iNB=?Rwr%g2lDP|J@{&`s}@82 zxA)G=R$abpR2Be+Zwh$IJ=fHYzI#48jt67g6DF502C@>8h)Ah+^lMnl9-OWTUZON7 z<`QdQ1i{m=z>IvPb$`j<#mn40pYsDCC;r_ALC;r4v}DGEaehVKb+==95tYrSO7FYHl6!cL)wLbCS&jp_Tq76T8l_=igB&+3g>l6n|oj>O|g70uO&kUR5 zSx&3ZJWh9L8L0N;ra6t$d`s)|t;!9xEb~eHNyXL#S!vhdhY`F=4>+ZR3ljVhR*sp~ zZzzt0Dq7usl&Oy6M2H(MLuFbTuxQ2g_ZtaCoG*IIW3{x}QYRp>x!79qKAF?-WSF*8 z3XS6o5&!1cy@{C(JQ0$0C;_hiA5CZd*W~}c{lSos7G;bYDf$LM=@=m(sHC9MB{7hW z!9W-wEiEMtiiC7`H=_h(G^0kx=;pi6{dnAe!1c=&uj@RI^E{r1z+U|7gPR}}zLC&LJoZ_DjuMnax%1h@q?6<4b7U~C(@Fyu1P>*c_C;bn%7 z1D85U8(GNgYJq|YmRacdj}4gtmAGD~3P2sSRr8b?Auy8>64Gt}8082rFig~b?X%M` z&sg`DF$?mqq|oshUvFWZW{angW_sMvxHrMUHk}HHgGg_#uTs2E5-#8AOe_~LHW>;J zb0CpS5?ZmhtfYhGzwpb;W(eb*%#cK|mwa7oK02k8J3{&L!?TZ$`VbS z9Gl=P@V=zIapQw$`M--rSBLt>)Uny>ObwAqsA8(cO^vRT*357FcURRnBbf6^gG%R< z{Tax$^VfS;jxDP%VTKn&emSm<^)(H)D|!w}w{v3{BngAgYhjcBERG!Rsx!%-X{$MQ zDK9+gDQi6V^$xgw60pGQ*IpEI#?P18`oOV^!-LTk^X;W$d%`+lF-2v&57+DIwE`H8 zVJf>`Dd&mQNX~CD2b-hV%@4*;LwG2LgZdIMFRPJfd5@^NgEz z@h&(25R*bMJ>`tiiZ_c-c66X(DYr^XHL0zJA>@V*V8p~{loG4#ZR zJdkhq0QJS`kqH-vfqFHpB`sxYI?0;p&~^@O{`aMnlb2(`j~W2qAM+o0N$D~^iCXYx z23$`pQLh;J>@(;Z7}s=#L*hLz0yYoz?e31qT^W38&kLw+oHiMGq&=7A&#MbPN9$!i z-{=z?9jTU5k$9k%ZUBu2sP5as4PKzAalB;~Tz^))sfyZ&H4} zRb9Nl|I+TEO^UDPLY}6s6`Bo~R}9W}%SwvG%*w7z0-8jTiP1qm|2_{uNEsH5T3x(w zok87Ljx4(av5ptl8+8C(e}#HL7QqqM4<_YgC=*k@@?!{8BYx`%=w}FO^FKNclyi0| zg&~OsvN&2@hcQ@)ui>!GSv5ucTs_PC_GFV2w4B?LQS`2^-Isy_d9fd|uaQ)b$V)q- z&e*J(2gD6E98LznlN;Usw_mw1VH0rp*=R++WCZHWzVuIs-%@V8U$ZHZDS9b;TReLW z96jnpj_aY8wI&Bxaef4(HAiJiiZ$A1Sx%EOzLwrJLR_KSl>QFn@&Eo75Ain3er&`ZSX(;|15xqyulETIj3}jve=X~`H`|n zJT*U_EP-c@fl$Zvyos*@1niSBun=ZPBVE>PZ6;W?$lBABr&!}tsJ6Ezj1%_&JccY@2m)De}A&*}4=n?D@cCUof~ap#S5 zZ!fQxHJ&S15;t7-z^@rNgukxw7*GuJmHSQ`oUrs8Vk27;>9heq6b$ZEliEGJz;T&(m2I?GqBFe;O09_qb> zSsL5TnHg#Sm1br>snl*}0Z=sc$SOD)Q(`Kjf}eIqh!Kp*qLOuOHD_y7O0g>BXhrwP zd`ppedg2UEf)O*pD2m!g84dCs>s2{ROSUB8IskGNH0tv_OSU*2V;;5E59?!MB~k-?6-T z0(_MKHrFDp0|uXLa=(;B0Yg3JqNtQm%PD5cn*V8#HR2v#9c*{@G9C*N2E;7@1Q+ts zV}HVMJGwZ(R_}Gf-G#vy6ykDCc1uYEs#;}q!Y#Y)@w?aoUnteg)=1p$E*lJ~7@N3bmVaSqD=J9*XeqAJ=SxM|Yzho(<(FnjtDJ zl_xmun0@cZR&NW$YnV1WwP6YM+%=YPChI6T*-^ zw&_q$8Rpr$kgKvA4drALhDej!RGS5E^Y_O&0xhgNV*#a{*CpE;l$uHW9oDVnM%<=f)giFq=uv2Y$Z%biSEEy%tzS(ynQas8M;A}9 zs1FyzkPbkvY#gB)mPD_#-f}g0jqAG~^lu8blIiRwy5<1_NX^%6=j`Wv@UXMV>S2B2 zQ1|;hXRFfVcysTpPX0WSng@kv*vI$VwqED?FJ)zlYo`5tgMJQT(o5Z5uEnE#5%wn> z)Khz3_U|-IBJat`x(7JO2knQWKcoQ<_}Q*%eH!-`2mGg}@7BmGhxw6TCjIO+HU%9P z%LUj`P#f%^v^g$ezHdgRIHhdB@~E`| zd^<=_V=_UVB{#RRqZ)@M4=);`i}rS2I^K}KST#e6{iNpqbEyN%L*c^90dezv=#vr2pBt&b@Zarmq=7oGO=Qj%%1g;8L{ze6PnW@ZSHXMgYQCf(9?{+ylsZ zx)--fy)h6tbWQKmhJp4b{caR=(V^EAD_!rB`CKhWo{;RKhd;p24c;n$G?uA8zn$yg zkX=irgc8$adV+QMxn?oE4*B!|;lzvw&&#L%M)e+3PO$S(l<>}3Eo=6kN2tskt1925 z3@^p3HNC)D-iXfi)8_N2AJpqYWLyutRsS5ln|%C-=~g+x2>+e=(zafUfd%6FVWOva z4j9+x`awB0)W}J86g-c@2*+5{9oJd7NUuy~JCn@AFT9Xaa#3xlZ=E4n0q5BWGRiV1T&pgan zh99=ttgf8~CrJxJn_l6O?xl$Z2LafOyP>(%*u2XE6G^6X_k% z&^rDtw~&O}6kQ)Q<7bom_iCu-Zp8)+We{7IKQ1Kh4)AC@&L+#i(hN=3ss@QBL~$wq zwPaBfvj>*;V=@jEH(aJ3UgwmX3KufoUPDx5*Z{i|6rz>g7n`B*U5b$J?fxXNM00=e zuG6ll-1f|2-1uOjvAHL&P-i{lhn_ zls2C18MPaWvf3~6G)#l2w55D!0XZeVNwa9E`lJvQJb`Qt?=;h+Hk4WVoa~Hu%`>xt zkFA@~P!X|5t@p(d+sMlu|AJUSmK%4Re)D%2iqg$F^&-*ahb4H#1&6Ov{sHWbrLO!d zRAH<)QTOC3flfZc@T%HCY``C}VSev}nF8#Q>|@sw0tW*CTR?-Jdw)JW$5#483>emlXgF?M74hYq@y3#k2$Q8sOM123kYt8WAGc4V)>@{+|FYm! zS*CV+c4FTb4S$bt7bZWJ6CgLZ{>9x}isqYWm!fsokE7czi8>O;N|#$TFFVlq_Q4oW z$oZ{Nchd169ixs;oj$eC_#?&;nigZ9S>oG-?y$r5IX@&B4LW`Pg(tT=z{{ZG)c30P zgezVko?4g>9&<4n=VCE!soxa5(HUnFQffH{X3ULJ(4Q}rlC<}3u1nJ4ku=b|mpHIca|(91ezjp)itSyWe~jx}@e=W%VFWV4zMv4~BJA1m)h zssgK9%qoyQvmH-Cf3$mpnDd&Hi^mRjd6%~aKr<#goaE&UQ&KM6?gPtn@wEHG5l_#Q z9Sxz*mdK|WSjo)m7dt28zUG*KMPeO#!rE@aEIf4b+Dek=!}!!^FZG__#rsu4=ooPf z4vfMBZ7v=r-6^h5yQ_8G?8qX0YnnVPp$qJ##yDFR3+wvT*v!GW)`Uak1iYY=zc%60 z@Nc9-nxpZ|_@lL`Bgm95+|s4=3ZW+DOg`j28G!x}V&uIt9TZ>!tfv%GAO7vnm+|e3L4RC&)h-&0FF;2PKlp0$1RV8w`IbzI0J{qm&l@s^LvQ_QyL(-^<^1{qN z?y#`erh=r*b+8GJL}dG`y`SlQHm2*ePK1<~ukP$ywtoYS!!mDumTn3{lOU&?>9_0s ztRo*=X@Hz2%s-?rc7Mh$#q2knGL|_6+UwUNXAkl*hbU@l;oWI^WS*x6Gd5v-W&{AD zr%yquEebKAkAPsYTTV#M0mTAfWL8$74i_rzNOP33d*<2^ z5RJQc_!I@i-QI0v;0>9$Oa_vDqclF*8`GZ`nq{a{uoEAYgkbTTk>5L{k7L`MQDt+u?$#_|Q{WQ6IY9Scz_7Tmx^(z66E6@Il5)zb zL$deK|GWVrhoU1W3zhEu;XFUd^t0B{QyK~vC;}Q*9a-SfqxKT<1Rj` z7MUR)$;L?F+8xIWPK1nBB)ofUr8gtpVmvnSrm)c{gYlM;lxT^YBjw?4qZ^+ebHA>d z81Mx~_o-~{osFg+D`8I5n!#dnFdAFHb5dN1H<)V2NIJMq`lJ>`q919bIxq=@;7Pob zVDD{-UiN5F8}F*#>GPLaNh6S*5fFz&xeO-G+4EnscGAks=0cZ!YpyrggL##VnWagv zf>Q$uqn$2c+G8xEw4ItH*&%OhSUkW8Gwt8)XF}7k6Y)$Hh%xf1rsQYQ zOV1aWC;;@aPgBEK;E1@}_=QJHPHfzeBop{1LIsvV_sbbw<=yGtAE{mMMkSD8xmDYb zc{*aY5kJk2aK79_5#V^-Gt%Vt0yRdD;+tvsSS+fnH7ArI*3NTI1 z9oQQ>11fa}ScIHoyHl)0by7oqTnOR!`#TCYpC1+yr!(~B$&B+;RSZHqQ0nu8+Gz2F z_L1Sb&n=Pz*_GyYcIxsEI*%8zY944a2m$|501L{lFeOmW8;LQCm>Q7v!y{FI zvrT64e?!DQT;7NrU|Zp@>lgr3ORi$+B*Q zW0T6o)GcbQPdHP{zS4&C{A@A(J}0d~FM2@U^SN+hG38|NYnDUOD4>2+FzuZnWyy#O zJRZELBpHnI!UT)8@clpOf+Drkf_XkN4OftwT_H&Y$Arg$oKJ>0M@5gShZN^(&aC(V z!-L&u0ML!fkC7>o#jlroNK8u44mC3(1}q4GJ}wGRp*BK;8tkDfQ$bQDz#0vvz@&>~ zAam2uaXNm|et2-4oGxIo>i6m*1T^s5_X<^C`!$Wa6bJfrzJ$h8e6MGnKtS56^%@)Q z2rO2fr(~`TquwEp*ji<_%vhRugeBAVF^fV~tyXWc2`%t}bgY=SRCr0SWY0pxA{tZ^ zwQ;w{VF5|z9ntdyoQ-C6?~#a48uep1ZvT^4$MEzvp;Am8-XW0>|H58!=g2INipq6n zE5w}~|NUT`_hV(CB5lvh`{-|CaD}A(MNcX|x}e3YgHOmVxNlRX4fn%rxa(!xSqTMp z-Or=@=FyqzP;b;n$Jp&tS<7M`S5Kx*P0)tE$#U{X9`r1~%oJX*8WF8#Ihsp$zWU}9 zR)5r|d+jiQ@Fo-|<=@-6oetyeH4$&|7Od!ekI&U5hA_%h1+(filNM9Eb@v0QdU*ki zs;~fs0HJKl4DXZKtfdNy44EU_CY2CxH;E35q|J!gH-AOa8GmYfm?Fq=9k&?;^@qpo zGIz5JyS`0W-~DC8MfY@=xa!oG5seGP_pU}Z&dif>ZYbQ}UM5M8xp{{ok2$&S`F1!A zERF*R$!`Cblw@YWuqsh%?~GUHz)59TmD-o%G}vq)%$KP{upF>c?lfG~QdVomr(g?E06!})^BJD zWG3^0N}>`1gbITdIV)%f!_WqPR8EYQmv^{mcG(9vX!nju2#5_iJ$PvueF_oY8|VCogEMPtuo3HGk2T; zz94c8PyyO#vm;V#qw!xyP|)x5lU5Wyk)iW+P(ezXii2EMR_1P!dLd;+@n;XqiU3u- zJ1v`{6`9|qoX$DEb!|Jn`*?T~EAJ9QTq>QwURoT`$wXdwchNW;vV58n4}7v-5|y;y zEH!R;+o`yfLmE#!k^!}nTI{t41AXj0vBrV~osArDc9=Q)ToTGNpTB8XaJt+uS+e>unJz;8@F8&54qeOb2u1 z+1=UEy*5#kbcfnth9Mj`8jr@inxmFO;~4Oho>Uw^vEbYih&A@e2yF~>vq)o+92dzP zxnqqQzdP&N^+kUbF>^d#{GWZC2QTBa9DE&b`x9Typi9xQ&x|r-h~L(ME)KeImvRs zFK5-}5>FO>nN3U!1=_>1Dh6F&Brla0j9cy_=F(;Yr|Nw<%OQ8WXnNn9QWJeIDVL?V zmf)7)JKrykggoeX3*i~Yd9ZQ56mX=dN}|Q|cRSC;vM_s!AKY@JKVr5qPGsTrpa*?x zw;hyCO>UVX&CQ=PF!7<}jk!=YeEl;XHcFMJ$H!i+zVJJP z#d!5IJLxUfg13JzCjV%k{L?x4r+3NR2d@z$pg6Xa5^f&vuK17%?r>2TPhd^_6Rlpf z%@u8Fm(uV{@L0#4;!Rsg1bOR|)*DD{AgBcC!K zt-il3u`h6Dh^R6WIFEN00>!e=@w5_6Nlb8@5tp@0sDB%%+%Ny3)PNIJVi#_G%LL2KNti5CLk(8DA zUe&{jPBjW>*pVcL^?q;Obn`wu2)yzjReO7wQ@ZZ+TJ-9G^pTCoU46=egCT~2{$Lo7+wY94V;|y z`DfmajYMb~8CE@^r)<=SJ*HF zR;0Wb)|;f6z4eL+b%ol$&O8V>Pk8giY1H7IuVIErfy`@JSW{xoDC!$nN%2SSztcCYWtc+&VqRyYco^I zhnUDV9Pc6!p)wM$#@axicDCfOFAX`S-8$+nQFOi;nRVyj@PS^?$r6!Ey~vL#?QO@# z^53hLE(nmRP(PT0F_9FXTyJPW58%yNv2C20&jlntKzeJUM+8MP;dENja9iEC*xuUN ztZ0?wq0aKQ!lWRWkwz*ywFty$s}#wl7lV6?NpO8&{PVyFa6E5}QTaP@uWPx~MmlrK zpbzyMx4JeUIlao4Wv^zafazma9t)h|xkkk2t#00hGg9|oY12p*rn)TuT=Xmuokxv>Ue zD@Ycs3x}Lo0laV20mXUI1TxxB(_ChPyi#hM$M_0Sa#pAUWiZ=-X0-Q#E{GkK__YY= zGTDErODt^ZSCnc=rbm*6-8?MPRv73X?*&BTAzc^h0KKZI zYqbL>P|Dp#AO&>@5IuS8_jiCPF@mG3v^+)ZacPg#{O5NSS$hL%yqG(+M)yC{B5a`I z3E-1SQI-Tx-T6p?$(h~W3X;3c{t1;aZU%rqvI!Hd1_+SFD2m?u`BAlJG%sW3(OPww z(_gL}*Rty08(QA+=0d}qS5`G2r(3i5 z{+~(qiwlzlSKZ$DEJOGC8P3u>HPo7!jlhGe>})D7>%7bivjIqr-gw)z*fXAJm$AU2 zPHL@?vUsXhX7VVK=sc8M^t6V$(Uxise#ZLbb>lU4bw7FN#)NT~F) zH~C^GOqpih?@XKn*}y$kCzUq*pwF;*hJA&*Sp1I%cho4_B}Vl)T;LYhxDySCjwAp! z=a!RpzPqU?3lBTwF#l)|*Z?rnfBD4jl^xJx%=~g&QGZ)gJsDDL>8{sTl_q>FY=Tw^ znS^e9ACdf~8SJCZwPwVTd3TcQc^d5`kd)n&?(^;Ltlu_>1#0Po9+;X03~CPr~?9fIf7hcL&B5Q3ZG zy<-mQG|4LP)@ZUfCEnPTK;s>$J<>j4&{iX4eHc0$v+~WEq$KQ7I{YMJ9rRDv#q|zfJHp1;cttNuP%=IRB%Z(Csyan z5C_8R62j-_bX%BGXYu?6QomF9jF1&Dt2ZX<7yc)~t0%Bch+oGm@N_cVq75;A8+@GN zdAN6XpW6=LPW7rOe-31oCHIfwaTi>ZJvyc#5X0$jm3f$UZ6dp1v8w&A*h<1@C%Nl{ zVM^S_j!@pp6?7n)W_?7}v)-p`wwoWzC4)qbnU%gOaa;NVI`FmP-=R1~(lk&Ir%8#b z$*ePcQD3aOh|yLuBFS?guvb}TBt%!S3ScC+%d2tF^w`2THv3~e0meG%c6@~hs))Ff z03N|+lf~zUX}Z*L!&J9(L5vfGQBu1lwU6h?S1^M^v zX1AP21rNz~orxdn-V!rT=Q=+Egg-UrIvM{pzo2$R^~LCgH@H|- z>q**CiHZ2~e67#>mbs5SKCdIEBYxiKu9DTa6GZz=rhZr^eejx3MP>(RI9njf=ZvlX zD#}m7u23Tepg8nnP)H>n8RmTI*{X;lDCLyo>M2?f1)bfBvAo`GI0`!_AEOcHpm)i@ zaZcGXyBMF6L`48b*fc_)su+&G=vRd$Q=8{jHxfSYQPSqzXwv5Oana7&E>Abs@Jmah z|IKAGEwL=3G$tsK>xEA=`HoKUbuaH9H9l_~v@A$2s&+(|YGoXl5X(X zOf|y$xm>1`QV;xyE$8$hLU`#~eG z*1YT$l2(%`6);DfAC1ktmmjA??;3^C5)e51f^t~k9J|S(GH_wO zkQMTeDyiQWzFT=-nQ$+xaplgt6{(jDQGy$u+D55pSfFQT%!r(^sJZy_;7<|Z|F15`4ohNfg z34q}kF_lXh#l|U(0!r9{l)dT-kymISufFy9z(|vJ1KHI$^I7_v&9f>6a>u|%c@#&{I)rkwOav^LU57_D zGZTBK{U7EMCm4+W02A!6ic#&aT$@%B3sq3UQIaBRAtcnvZm%6y45#SNKGAv-)`)kl zROdH&qi~V}=_tnvH%J(8D`Ms~oq%uPz-u#-ngT(QsN&z>;W`y1<;7`?meC-a8oK9C zcptKodMmY1J3U|Esws&q1UR`?ZJ&LlM9}KdIWx%#9Fh`2uSlrC>?aI-qy<1m*YN2K z#~d;8eDD>zsSmJo2yogl5gnqG{KdRpg{IR^yUlD(}!k)BDAr_X@W5Z*f!Y zVw2Q&Tj;C70N)>mzeNcsuA6o=^2Gp7En48mEO8ddX!yt2;S|cY9~r7&N2#npm6nF2 z_P2;NyL!lwqzI7%EWX+^Yw5rbTz?IT6FW7MZB^zcRP#MAA2wm-G-u1T0bUFDVR`DP!Nd* zGP{No1jG;oA5qmPJszTpEA9OX-AdaX#aHIP*_~z*FTE)IT>}txv0>9NSN?=^qW56s zUCB1jh=$40^*~n9q?r-p&orZt`w= zq#shK%4cl!{2USTCHAur)LT_hl3+jHVe2pjHhyNV8ZHCc%n%7*tV;Z-1=uTmiNT-n zoeVTvI82>0g#1 zbOg$=mI9uin{UE`I|)cE=!GFW{tv%9tInjTQWlz1&VRMRxcAyMy#F_9o*QM97|soP zy-`kKxjGHUw=D99o_u2sth+lgv&Z>qu+E!#vY0pIu2;H)~Q0jR+8PqD{C4U_<8U|1Qm14@q5c?qR`(TchFN5*`bw->4vl+EmNop_1QU`uA{t5DRMM<;&_qrRg+%roertn~Ts>m% z#7gJU*LHD}=AMUg+L>s3~r+EhxI3c9NY9!gTyuO-Z^jU%W7F1tZY^C||)RIYZVLu|c*; z_f_g^Yx=Gl0N5PtKHAICxic#=Go|xn@P9o53{bASsR;JW>Rs8C%tyJz#O6649y^CB zM8hjsw<@XlS!-Cg%TTe=E^olMM=8op4j1BYxz+E?ItVU~_pL4nP2V>^NVQ)n7s;X6 zB`UGm+LX~&PY&MU^~}**h~D>5O$=!9fj06_+9()>B$hYH@UP}PCDA~)yZb4pt>yPt z1jca25?knXH1+hiPMCpn|-PKvZck=V9X=x_0mEqZlN~{Nwr#q;_O%+VoHW!h$&eZJumC=0og7 zc{6<8-%0G}4-qGnu_i{!K3R_24rPCPoh-rx*p+i%ud^x1e_RJIkAl&$pe;N}bf#)c80bhwomh}IWyv?=Ur=5rptedkFq>g);3LJ-b`3|1m< zMbo_To%Ll;j^{)G#SI(foPZ6B5w)9M;#!tL39G>ff9YD6%1fhcJo(*y7l34KTx{xzX7w>6NjPqE`_+7E}I{k?* z@J++|O^*cUf};S_;c|sgPbr}r=ByKZU9Cz&!D1*58*1V;G#iD^FhDVZtFtkWIWv!w z0XLV5tn8O$X`);vM^9G7tx1z}>z`tNxG=w=Mv?y-j?6ef+TMyDIndoDz^sZLvEPac z7m@t8$E`(>c`oH6sVjkMT2qWN*a2{zwE!qn=-wM(7Fd4xSvTE2)}dY4SzNP#2n=f1 zl0Va(JxaL_8s?r3vu$Bb%-i!y6=^Kaqk~91BQ$Cu;KecX- zh+q7!m&auaK$q+{!@Nq5Nt%=-=0C;A&7K4k6A(hvt0UXaRLaP1Oi+5QSX!77v*Urt zo^s`mUBEH8#$a5ODy3<;Ay-s$4nXsXFHES7PQJ%Yn`a5qty>1~R6v7^zgv|{NqIihl>yHyVc>?MU`1^OtTAxY;eY$hE61E=bN zZgsfhxBWK*=3i}PoKizB`zqltXTg`N&Mq+|`q%RYx|xUkc1dE&AN#V)3lQqYcj1M1 z*1Qk0*}ZQ~Us!xCnMBu3vdg^7-|ZGeLI<4Yv<_Va6HB=)q~5Y59fq;G{=B67*XazO z_2Y~i!F3a=FvFvBIv1#^`40FUq?W2*S-xZOuzB%ecmuK%DaGWvpo~8C%=GzhnOocZ z%HOmdQ+)M0&4(ZT+K?>UUL?m}6XZOpAl>(NX*5W+HfRk7v}koR5EsSROsXUfR4rul_e#mZdgIy_xw$xz9d&6{h58`-UJ7;fMr(Vf=W4ZHaP ziDDa%#X+yjkllz(YDSskhhE9CxaqVi*Gfo=GINahaj30~v%ESH6L$53HK>~UOEDa= z@~@w5a7E*umE|MfTkCXCq7V>moOC8(ZaQ;xB3T=yyFr}72P+SL|YRH7F^4d6B z&#pKB{sQ}Fe1^h98}H2a17v4o7kF=!o+}?fp2=Z;mk`U<8XklMaA4>J&*>Pi!ek%W z{C$=@N1T;ollvH>SfkQeu$$xAB@#F;fs;Zk}0+HBxMwNf=Nyqz!7^sjene<|Pv3shN?CNtV4h=$4n*=TTly zEd(SDN%M!hSb95Oo>F_^!Mr=WOc7olj*bavusNOU7Ps#y2Vz~>?TVB3^%qagS#tCygWc!(l%V8^-%ziEX-to`FmQcG%-=Xp=ZD;-5?)hyJ-;;lo zn?qV+!x&HOKInMY58s!HlmKM{$k>D$*sXF%SI_(H0X?;UbA+#n{h;#iNt@pH5M@yy z-ahVV(jAj3g&TJ_Lra-silu7X^=yGGL?MiL2^#r3d{)@vD*OKQe z6~4kk%kwR6jpz@c(iD?rp;nDuRr`zMo6hJrBeZkiYx}+-fEd7!^jxyjR8nYao$_f3 zuS+fmf6M!>r+oM3iL>G@twKwAh^ex9XsF+?$b0`eJG|&Lj)M~E>gMH3!k=s}7dF2W z;NK^(rqAmp3?%9+vf+I1Yv=Q=k7w6(R~KLo%;Zo+?cg{lLkBUvmGhy7_old8@7KZh z1^0iUOimbA?NSThiG2B{CTE_$?z6mX>{#mk&&Aa-0L?5_{c4AfJL`mbLfnn!2gAkK2JJTeI|jSf}%tkFb5(; zE_I5($qKUF_r38+>KpE6>Sqf}MpIrzUXE9Ba5oK&(^1$S1d%VB+zmt0u7c0O2L$j@ zH2xAgi7PQ|qHMRHfQ(ibJF`GNWgCJ%g}r_;a7l5AJu-@B+HkTl$EPoRc}2DY{KKJR z?XEpGtM&`q-Ki`epX4v(n5eqG0%q;Omdoa`0l+zE zNNo9L_6@>y@6tG)S5i!hYxoh|2j{`I7E>wWGt1#%myA zKvH#z>xow^82`tsxGH{UR%%ITRHQbE=C<{%oAabC`qu?x2&?s>9kWY`WehEvMqFs* z{N*eYKkX&z z#z^YE%yfHSLIibkDn~P_c{=LVDbpX#=)QGQ`Lx@Va|Y9aoZYS_87*Y-HJ^UZUT3^4 z*whloa#@hRu9F5xIVljOfxX(Y$wL(xPZgC|x+1?`vq!q9VqVxZ#Z$p~2;nUHi`amk za)N5r@zrsq{AlqLxww$qIO1UnR_C-$Ao{>!biMg5!kbZYv)O!sb-y{>M5xv3Pfw}# z;PbVLWM6OZ^X$e9wN|eAGjhB#3vl7YcyI%fzU@@{9_*<3m8l9+0i{sl>29oVd;P0l z*rJ5BB{#gZIG9aKf~77#)6^83OOqT1uadKc*M% zd8L~z^h{4Ds_WOnlH!DI6c!{{6+~{p_27lQ(0-u6!Bd5+TbnFQx) z8ZrJGcQqG0EGHP`=W`gLeHM1ZK^+2&8nn0)u|AhsC&-qDhzsCfH_cXTEY_JUdnM^D z?#Ar~(GXoTml!)4BW@R(GaG=Rln`9q;W;lOiJSZj-)LwCcpbUaM^K;`yHCu^4~pc$7Vny|CbK zULUNfPG3?rCBpf##ezP)$c{pgFgx?n4PRC~K_suxW1#XfS1r$>;>?EIe~tv_S?ULB zV5Sw#gExKLByGJ1{=_E3ZDsl-U65?x9mRcWuO5#tYXk|cH*l4WaP+asi&FM~A0vgH z&kHOg^!^U1C=*KKGXBbb5kw4<2Uo^wKH-$1$Q*i$UK(jz8YdPw7rSoACt(?QSAsdK zC(PiTAXrpp>DkZbbioAEPctxE=?F#y=&c69Qm8$%DH_cQtz*k*4A2jv*~?EO%yfx* zjCjt0*M89DpCk|(Q`5h`Imi{|do54N7hg)Oe%)sI7Rl-7)Io2N5pVmPiBhg zoo+FiOeI)>{OoO)xYq&8{hs^r^MA@IO3AjR&7%L&{pWIiu+;GP@89QXwv7LV5bwlY zvm+@kAD5y0DIa?33UXL-F-9r@f}*~yn7h(Ff!FJ zBX*4UN9`UGjc`98vy&g}SQs5O6(#zl&3|l+&t6jB84AisB`T<4AW{WC&;6d0iL|x; zE0Ci`3}I!(60@<{`Yk;gAkOi5JQYrf5qq2;j?~=vDez_%Bdfbj5swV%N<83QQR$#I zR|Cyh{7vxq&dB`yzv*)Zwu&PEclG`>4ZGhr4h35CHWOCt0Bz(TS5BO5y zFyAmSB(|7lYiAc2t8Og&Q$Dio5${I?K3|}%nb)<4DD?CbyS=@AH1uMe(`@a5=Kwj5LR6aneZ``lZjoQ$9 z^^C0r=KU~%e)tcj&}u2MoVv~ARc~4lnJ|)GEVT zUg2@HzJAZP(oaYDPh%>yk0eqaQuh=2#@vX_?Mm!QjGD)F3h+bDs#f#zlWyS8U z*WHkkj-5Zi@oVeUGihPrKnVgcy@M;a8dgdFt7lC?0a=6I-xr#0gYx`Gz)LG3Kqwn; zzu`;X1J{6nfTp*ms$??p_w5P4&C&$JNFgcS^1|uj+1P#rWBsu#oBe;wt178=rzw>e zgtE_{KQ}FT@J52@B&#W{*N&r`>gDDaO;M^jD8~UOrjx2?ssd>m;2%kJ8DO4LLHJk9 zTp*S}OppJ$#U8@w_*$T;coSO_tZ8o6r|9h!cTv9>HG!pGlt%cnpLbFZ>i;(?fD!7W zJ1l}!nT!gY>aDhEyz#6|>&SR${?QI_U!59=cAKfOPZj<*$aHPivr2k$dYWP+;M6}g zgiog_>*>Fz1#yvlvvrdsmZ<|e{q#tx@cS=lx%qLm#SGDxw11;E1my&y(}t8ZtnhD4 zfPYGoW$vF=nw&J7P2Yf%{@{;RFr7~nRIc*J*~tmG_1S1wx$&s)5IA*ITqRDqyy;+_ zb>JFv9rgMwRY%z|K1ENtXMLS7{5c;*N2^6}**%^@QnJ(azAPF`+4o~Gx4I9&v`kZ*x@f!t6nRMCzWA87#+Wej`U^Ky9i%Xz*ixdm)ZGoaK zZEge-HvOvG$rT>QsVJ6W5r>JFA+Yi_n#-3cT!^WUN?@|1 zQWN;xlvMD>L?Gc|#pk}=f6ZpFDjeGH};> zQ`cpYM@?Z#3_CpI>6zI-7>kf&`!FVh0PGhr_-iYyJJ|r%SuEAb!E5EjONJf1?And} zfk-qhSXzM8vb~eT2(QW^mYn0Y0r14~r9D0Ha@&7=UX_f}0SMt3GkA-fa{wFOhtG+u zFi{c8&k#IGL>FHB!?T}!uC6WBm6l$uipss9y4VLn;6RIL315hRMdub=S76! zl53#C_CU9N&6uB3(S^WDQKyM2W-5`)^+F$P!ER79sGAoH4yeNt@{?%) zL##J>U=yKj%8EbSj`7IkT=ssU_!+3FrdE=TBJ%OEIlcV8n~wEnC_<&gYXO<+3)>|} z@;jd5V{3i?83p%hhmDOu(#SETHm=wK=K~JtOh^1SLRJaW4{SDrB+;P za_kyGc0SKWk22hx_FT3}UgKJlDl{&7IOCFdmCu^&+0plCZ9L~Qj^J!v70kt`=b-Vz zcSoAKDbS=!2rYT9MKqNaj9UBdx1T1WGK|@2`26FO1FUv+xTCpk@tSz;$z*6R>SaND zNEteDK81#eJ?%?7uc3pzu6vnT%6qufok2#nRCz)-0cI0p`@CT%Lq9;JOW`vR-;C!Ve>rS`Ph(=#T=$;3EI1$B1$)1dNx zgd;1JU_1AleQQ=p(k#XibMVnS`Zx!zZd|uXBFoM3sZm9-+jNU8y&OsGzV-N806@r6 z`L*0fn|?GldrT|i?FO>1ag(^x7=H4Dstk&ug3$Va0_02M=2qdGBK+s4rAcZ4+HjE? z<3=HY>oysy)&oJ}3kQFz60r;@j-BO>B+xbX^D3y$4CexSOJUhKAxB! zmHQtQ!`hzSx|xCPUZQJ@v*tCa_y5YMErXODNdRTE$da$65XWI5!T?!;A9%?dfew>x z>#FU`4#>MX`$N6QY~eHt_$x+;_)O3|M&=rY{p~FFQpMBSVQ788Ro=QCB0)~5FS`I0 z(O=@*>cA_Lzp5|L;LCX8*mk(>7_huX{}1ot1yTBGVx)IhAr*bZ_l~5V`Hna{v`$Ud zW{KpxVXPcEN3a@%JRWpcFgIs>la`TT)c%WS+NkXQagz63tG!HdQeu03qS?Qd&rMc` z8ie746@cY0djn+ZrE9ptjF#wIBz_mSF;9*y^n0=sl+*>|9m&MJD6Hh5u$GGJ$LHS1 zso}|>(=%Bvdwz`X>7!A2Uw>V6X2l!bjfqi9&cRAtlf`U0dAB7ds=}>lK@LF5Zrpqe z3&F<~*MX(}>aOyvHp`XCmbyy=S^95dn!a3hk?VT)XV%;RoJevVpJ5ufXSq6FW1;NR zaCW{1^7Ya;wvgT0L$5OKFf~DcjZ{ATXSBHt=&*+^1ptvFLHd zw?8=9z7F>bZtGpJM8P){jFnwhz9KuZqf^mv#GJ6)<@-r5jyphmRs_N*jRU&!o4wko zxxrJF?iswNqVvhY-D?Y@#>XX&lLcocm)DCCm0vn`v1D_O1^37&i8YBt`xY2oNYi@w zu{tY-9NB|ph=PDl)+o*jXma2t@ztQ5`k#);(edTv)H$QyOGv~Y?$gG{{q9+Gp}Ow4 zqVxT$lrCK?#6aT9PdS^~V`$VecV&z!8#*0FJ&-rjL+4WHjcswuMMw|BM=J$Zt?O9| zE*Ho*!%=e`7jR=FkXY61lPB{$0?AYp=bh|6&{9;YA4=UYKKPu7%a_XjY7_f z00P%^D36~?Jix2)rk~CO#@_FbVaS`ht%}ozdSvsGcZ9~h;Ej!y1K=HIK(sJ(-&p9^ zf*eA=|q>Dp=z&+dm74474!8-c1MDloDje83T6GUNCd~E?i zd77{8ejl2aJYA^qh}4PfrvIV1`N?CnzVfsR%^=tCg=Yt1-;pgae=$W7sbgT#FbySo zQ(J6*sT1!^l_-Y=exBt&3EdyTjfAr1$G>ehgV8GJi56111-V`S<-`B*PwCA`D%00{ z#Soc=`Zo$fbCCOWeM1FfF zc?vHM28R$GGVA7(V?;j>k^`Llp!LRW^0&WBHjEM;=7*Y|o8xI85~FFD3XwcciHtPf zO#Z8^5t8(TIKvPICg)LFRu0^rR~M*Tya1Lv>C&&#~8JvKZ$YvQ{A{h#cqC``aCUpI;3vnabQZeQ~g+ zlNL8SC<~Xd9a@@wJ=W-Mtv%rL z#);~t?f=V=*K5tQXf*v}6LZxwe6znz7UU=QwOt5hI*YM>-x-}QK;G%I4fREW%TF8* z-&!8(XJ?J44NhlF&HwCBFlXL!R2yxmv{QS-Tw;21REw)|Zg8G94NtC@0DEWK^Jrgv zam0$c1bm|z^47ZQQo$7kb14$ z=X-mx%&;`GtX6s^*rJiGCPio&sY_OW&c>H5AdOw5b*_{schI}+JwMn%u53c}+ba2M zW#R;keFam>-$ZqioZ|tBfC>r-VC5{DK=<1o;1@+K-*KgM#f-_-=@FZ3dh&Aqam7iY zxwMuoGnk@G>bU07sbcI zG@>Wb&?P_zo?rqD?jN3@qOcb?T5d?9$LrAYXOH|Z-w|D>&CC5@QAP$01=#R74PWJv zr?6mgdO=*(vFU6TB-Qgob6G!{A^J+V*D zlWxJajIqqoiZAc%$KOgRW`v)D8fckvystmIhUg=2{p{wDquamzkT(%+Wov8kVytRG zhOVzzqcB0f^H_2~Q7D9nEEY=qOVDiq`o_w5qb6Q0;?D$TO#-7L3TC#Xc|FoAC+MOD z(8CUxgfWM#HG^9&v_!zhPfad|quq7`nL1F0fs)LpcDZm!bBy`5{|WZv+S6>&MA;-- zB&opZso;D-P<}0vQ!!rsWf3d2{0O5wCBWq+wK)8s!W|dfv*<{S@p#n=J!e^gGyg zcB568!!cRAB$JBIE?eYoIfn(0kB=)-ZXAN-{Y3XJ`wc(aqDgx#gk5(=C`$QqCa0|H z$_X=z_Zx34HwaYSq`QbWfxNj;^s@lk0I$u?XRFU~C@yHOOaQV-2>RD3%xE#iOm6}b zTKQ1%0YNp+@g88DZMq~&&C{L}P(8hYZ~_De*kww}UyzG3Uv8rZboPHQkL314{=B3z ztZ(_EYsgCXk0zj2#Czw9jCC(GBR(eJDevifJ^cWE(iO{DWDd|6+XqH)*TMgp;0Z!4 z2p4q^rsjYJ2T}GBiIVkQ)L;hCPul@ZLI&B?|D1iRxm2>`JL%mG=w_hEVE%9({@Q)( zb(imX%bwY1bi1}9VS5UfEgD;3q{L&qs2|W5@%JzDmkADg>I33(v|v^lp3Zjdo2-@= zn)r%kc0uOT2s+x9)wtN}_X{}vKd=87Q+~GN%lGus5Lm1R;nH{!6%pLoy6Y8vM&=1_2Y%;ySZVg6)G3i2KOLdzA$}$%8a9 z&w~7(Pe1mqqp4&-c^r)CbRRlxXn7kw{a5mpgh;NoC<wiRDax*|WquK3HD*0{)Ee0WWB;N9b?LS z1W1lM>I`BEOP1{pP(Y3mxBDsE;0{8x%6Yjl{2_KGZvLG$@SM;69dwmJJJOTNeL(!h z&yrh{RO`&kz8VyfqMlhB`80IM=Q)=?k3i9RPHtC=Zca{HQ>9sD=pqVK;@upl<$w)E zG@Q0d8EA{5R;;{ag`HEPR#~Fb5U_fBXEurN2F^v{g3M&mLx|yeokw|8_I-1Tuz}}# z7yN4tiRJx*YooFrTteakQ)%3V!o{VYP}rMr(uN%%TY*e7)-A z^!TH`ESl#YlAPq#sNM>F* zASizr!$^nPjS}A8L&(3;OPUoymcK>{eTTZ8HgF0crBbFVnhrAi<1y{>KG&2|j$SQj zF5^*9sjMM=A9iz^WS*dpP-}luRA=d&{d3!#*ub1vps|7vJwLnm!@Fn-U*i#B@NJE3 zJup>Q(B;EAXAiE1n6nUdq>-Qfqr705Mx1(9;Lp#a$jh$$tV;T5=!a1(i2FWwmF$RaAm&vWMjIZ4}hhF&7k zT}H)&m=xv6`lulO3$*p#tw2cKi}cQbkZX`$;GR2oRGnJ%;s)I^ zS9TYsJ4<8@b4G<@PVZwxVV>cp`OJ=!R#eeRphRE04s@!)lK3@m zInN2Vp|2`@x&|Tv%KEueE#expFE7??oe+1zXDJSsJ{EI(y&4aFa6h_hHsW{P<04q@ zvKA<9Wtt;7!5h=k4$E;AXfv9PDLN2?9#_aK_-*b^a-POD2xVe45iSC^Gt#|4JiK1H zugrW+xoi!EdoTQdattM;>(j|sim6o*OMl@VoRD);6)zKO8xOwYL{&mFB~b@ee3OU$ zCED+pwrfm=1{m8%G7FQF@o_0=kNJ6d>paewva{{JZVj}MD1Zp?*I%P@tP9qz)innK zZ#ts4El754bl#I>OYGO5Z91`z&ATW>GBFEm@R!he@FfoP?8W(-E)?d3*rJIFzh^IG ztX}uOWbp}TeL3SIbP`3>e=N2yVkD`MG1==a2uK?hrMF_G+i83X&=tuul%~SPJlqk+ zIDltDeSg$%-cd}vDcK33;Cp$K9eX+O>* zzpXfn({_V&_^R8}uZIszEZ3=*$}epGFj#@n*bVxnjI3uf#reR+FXDvmUS}oDf>Yd|~q( zg@D+n!4e0=VCh*_`}p>y&o>H;oSnq|VB?kt>T<04zu)X~a5zbD$fg>*b5gYs2V1Xz z>q28udKw4@NhnV)uWmYo*DwV1N_0QFJ4I-14y;>EG1ls)qZU7UDtd5PQAneAIXHJ~LAU=#=7cZvBoe07VZ!+RJ@N)HWMv zd(FE*cOBpNc5;9m-N>0$%RognVS7tt{4)rrRv4>`$E`EW_mj}`HN&tPA*|=Sb)oR| zGqIJCJW8<)hi`Ua)3wu>U)3%Hn|i~vseTN)AS@_i1$_f+eSd~*qW5*ta(wQWsujE( zUVAD;#$g*PJBVaH&|2oK3y$C00jM9oV8VtAquhdt!zM6ZKer1N9}{rS{Wg6rTH#A^ z@ds-e%fv#h0y|rAQc@h>z%=8|_`-OG(k!RB~f(7o-MPzI$S`S}hh zIR>kaNX;}hUGi{pneBp>-0 z$2sUsPVq>#!dk~D=MfsZ92q8C8cw@Qs~mP0h`y++Q)5M%{?cGEC-37iDjESo~&4V;fh`kPpf?MgRid(OZUZppGvBm@1f6lDUmvI-UO#S?6=UMmq?jczX zJ{tjshz9n7Jip=GzzaOQcQ|QcB_hqlY^ml}{+29!Vsu3GPji-cpvP;sfy)X;l}$D+ zCGqk5b??V1IpfV&Nk+u$-3G*VVW#pqG(u!n?2>T#7K>ceR+gPN9t~lM#}bO3S*6Dt zU~4)_`=-vhg^8R>in2NNws(!-1~|IXQxTPCWgY{$Q{LE;xf+N!^8i5OFX^laYeQfj zovW*>Qi$pfj;%Dvk|Uk$TxZB+8*RsT3|*RR;(jxQRRsz3)g~zO>4?gQMwtdzGx)=( z0eSR$m39TojAFDe^lKkU5)6gXSSq#HM@!-IQVy5Cx`lZ0%e@?*4$Q_4Bb8$P}4IkCyvI@LyYQV>DExvDm|^a zO#87(%6WQ->P>Q+y>j8PcJqh(pWdR)Ypl6b)hj>s1hQK`iuK8Kb9V^3W7+RB`l4r` z$zL?=@%dbzgq%ik>(%V_eYk2Rn?Jl62R)0^p%MYYfV&jHgUz~*%%*^D+@%;VtlJ?AsXuGf{qyGnqAr1G5%WCN~2}-gubpott={CQcMhEE(PlQiKLi4{@ zI^BOQfX-4czYF$jQ3(wuj9qFd-0)i6y<)1)Er!9;KEjQYS(^X5OT$N+j<9|1;KjyB z)3O5`9^1$eT4zDm#h@YoW0xQv2Ym`%UOI^3q#b?As6#!91G9u{IqO`0rE3brorUAF z8xaCxG5{On{7=;uBkAK$kN0yG28{?z+#T(uK!zXl7)++5GXp3hY;>?fV6NmV(bzI$ zMBIHsfXAC%82V{z;d(Ez!Gz;bP+f-}7pNz0#X?rUs?NzJtsSP;hvj^K>TeIXl$p=; zUk}ex&g`I;Aqx|Z1m?(P2|>kg3vn-LaTu+pZ7Kq`fY0TkUoVDA9##wtJ>3@VBAW;y zb#Kj`#4&9!?RN7E+`u6_m_fQ?u(H?IN_~p%}0g#!)H7X8`iyKV5;3w zLcZolH$tk1g>HqIp+M2_qbR^qhbzeM!7$N9I`^)T{_-R9?e$p?p%OUt zzit-fYrEMP+Y*ClD8aJ}(3>^Hx+mSf=Dpb{0*ZPf$^vb+qM*b*oBP?1XSQoH6?A?^ z2>jDVQSTFpIiY3G?jL(eD&j#U=(>DXj3tV4DSzz$yIi26SEuGdqu~ILjJKEPN|ua< zy=e9@LTiU$@h6((t-%~X_wA<6TK}$|B2F<{`5ZVZqQ4)I7RfRR;>YIv<+cX~B!QU4 zBa9w9pjzvzR5&P_QvmkG?Cw*ca2gT8t* zv$J(z#uypyCb#&?N}`o^u0{n!9lkh}*r1iQ>Y;lMyzDrTzZa!eDO=Kyo|<+-8K|=% z#6}?PziOhIGhluf>e5PgRV=bv>+ks3tv|K2HS~k!`Br+k8?Ft-EDOV4qfrvnz$UNz zl0aHn+DVoUJL)x!6JbQkLuaNM3JLr|LeG&5%U_&;0SD!5VZCW%b_4&C#|THn7)prM z)3@F*;mi1FJzjeFdcd1Qt`2bj;mV_&$0I}ucK`E(uZ&@z1eAvfsJDSgEdjy_rDV_$ z^0}RXfq@_)Vd0gqlqbzm*l4v+E9t9u2M1_DGMC#7C|zYlQD?>$xI1QRH}nRM9~8EL z0kD@!K3?&*z336i0j>BRZ}hi<+IYRYlOhf(jAuy=Ng}qzogx7GF7-5!pD%L|#24Xo z{pV@eK2z96((#M8LxuxU#z=F-PbiDE?;BFn&|u-P_8C4ZSS^9Mk_#caS|&*wjx>|N zO^+RCem;RHnXBrH8{;_k0I;lj@51q1=677~7t15lY9 zufa#D5}w>0oMX*QP|4>qJ!atjmkHe$@;8KLreu`5>^_3B(ypoI(nR#)u6qiIoldpq zF-pAl0B(90!Kqd1KkZI$tj?;E#|3V?Rt{9C6nSkTFh_anUK0g~?-bQ+N2*xliY-ny zXM65+@YR`vpIi^eUydCOo_MY+-FfCsjdwM5Mb-w3=8c>e44~Ht(&I|XZ{(sxC)9!n z!e41*y-SdJncIx!co!Nziut`eU!jkHbt5n?yYr%LryTwUh+A3r{ZmW0z)1Qb+7~Y- zyol#$Qbggf=u!^arT)5z`9d0p=fqpEv@by1ezJ@RI&;^-n?y-$lKCq0A$#0|m>;8k ztSmUs_>R#P(darEaJ4ZXz`&4v%}(?Xm#w63hxlE5Fe@1@95w{E^ARKxpO?s_@iNiE z;v4Y3G@j+i5iRDLbKgevKU^Endd}Qttq<*rU{lTZp^a2A$LeFwTjfUOA5U^ocHpGH z@A=*KkRl?)9z$S$ZzL_$wC}@b0hYW%^k*}0RJ9^7SqTV^VuCBzy$j};HvFA4icx}* zJxX#^Bq(`*)OwIYNfd~*aX!8E>&}P@7&gm@BCPlcE(syLs;SmB363!-ak6duVaZmX zX)JTiw>k^|U6TBEEoW$Ji-JQi!SPBaahT!Z97O!Ix%MdeRMPd{^J+{D66%fS+~p)d zidr&7BGq;6Qp*;V9=%LShItB=jwFWnRA&R%G23Z9F zh`GN-h01uSbeDnJn%1?}HR}YC8xC=*f@uTc1w&HxR9EJp`vAt{=KDaNf#WV9RRY$3 zk!e4AO?5U3JDm_l4%Pf<;7mzv0}P+AC}*1guOE0IpWnX9F#`j`8hP0vX$NVm?sL$X za#nD*LJZ;0Xpqd4@&Iu^70&G|rh}Pt5|@tbjC5?n#6TI#{0YsY#ebc*S(mE@ zUajtZBPF!SS!*;pvop_hS3jm4;tVxky`e+?5Jabg3Vsnt74+Fp-d`Gc+WxR_(8Q4~ zb))BSHN)XiXuMQoc>~Mygx@4X_f1>FZRy{zb`~k=2sVV0ByU>N%+ZaQGJt~z23Vpu z(fN{?6@%!*;gR?#ujwQ2#j5aFeWj>L#=b@sfN0ktGPbgs!TuDwbfhAnL>-Nnm*0jWA$q+iJb z#|UW23%0hpHhhYXVt?lFj^twYXrmcFAyP(KZWrg;u4ufZ;KqYcpD<*m!oPw;h(^&! zwFsKL468O!nztSZ8}sIMwh#I~j0z?;z-A^m{WF10p_=98(t9(8ZTa>mbYu8@`U|9b z6ASb@b-8TI3#%mQszsHJlzHAtaX*J~i*9MTOF@$hyO2 zA7qhMV}bq-b3=*=OYKPcuS*f%s~^K7MbeehhVFFeTsQRcm}kkgN@Pbkq_gS0IW_#` z5&uj0zvmavjl=1KSt7hG*t7SW?gb6;$CE7R{AlXnxuF;4HlJWCKue;C;L(9p9cm??2HygFewb`pKMI6*gm)}b#46vO4vjg<-@~U;AInyy+Je~$1Ti8^RC0U=U zTVM)oHjrg?uttzfHYRo4cc4R33`rT)qc4fH@cjMA$Oo6?raF2d0Xj;9B?jx}ze9%y zspNaMVV*q4BNIE@F5Px2iv`CFQGs=0l_vTMLQ8s7$vMm$=|GiyQ(Elfgx+6PXl0zN zA@RbL-$Ep_8I(O+Imj9}rMlBr{T>^$wTWUb=usL3glw%(f$Ph#z`W(~J`eMl0VuT& zi{=l-xx>I#_1Ge!!F>9>WQ}KvUbDqcBj`B-a)d;*zn=}OoCo|a@UkQ*|Bj5@|Cl5$ zuaEW()u!HxurUnq98T^`E}NPhCA*hDs_Nlk^pPk z{mu#7uMWn!$e+;gHb1G~>#xOMNxn*_S@n88pP^KImO#txD~iRA#ZF&cR7o>lGYd4f zRK+uchoL%_iXVXiU#U{qzW{9kvlYg~GLQMFI8v)OTz!;fE&T|h!S+w2o@|Q-QgLy4 z`RK8L(XR;Y8-6pYGODO%lj$srz_p{fNo|KHWr}ocXMysXZZ8|}cK%Y8L|~a-z7KTk zoc~j)cB;`pAPaX;+1p(x>FRAlTISY~ zRlxJ{_If@y*Ym)OII8Pnb=D8g$vKF(q49w|XL-X)0ac!#W2E^DWR$!a#t(t_YGT$0 zi3PR8vzC6ri3L2UGFNUvHA*t-e>+6$a?a__e7oyprGcW_KeU>k*-WTP{6?M=FD1cU z@HlW36U*-Tm;oE-IBY50ju|vMk_BdB4+|BaUlJXZH@1X7RQ=@-SjGZ`I$Cc~lH}m} zK5T-BrBRKK=LWWsrz#iU$VKfjU(Dy^tE5d=YX>2li5VpuJ|+Ie?U0mzA;QN6Ee9Dz zqjbWmrP)1|5=p4Zr^o{6E6CJwS@rY54GMIv=(w3Ey@J;-0 zRd*BC)IAOFfdXjSM7Lk#1WR|?$Mp@+4ma5@uZ6I2XxJ^GbguDN8u^3D$WYqdCb?|s zQBQ$(0V}#$&VEkp*OPYnnN=T1wmAhmjURq0DR{DT7?DXN+ROiXrj zAa|1|wc}=Q)ENHLUxTK0!W1~>-1$bLcx@^$=Ur?d2QfNt;v9PWbr3%9O?$x8d5#OO z(`rXfV0Zh#)cKEw(4IV$3;f}!nl&va#yZ&pL>J&c`z&Ag4-Qw1=b{?3KyUV`Zd_^g zvIuXN#LD}ukdqc>gR>mN4kEdduktFq^zMX6F=`BjlOs|~b7GxqFh$ACAxhwB$pXzA z^nj@gnwT8J)~wt0LaF~`GSq$HPRYbL*;$tqfWcoXoc|E`(4fV2F&feLfZ}*JDN%N7 z`R?wZmkBtM|95$33^z3%GoQ3u^}&EOvZiP`Ujd3vY&SF>2b|?9m)+5N5DInvt6y~2 zQPM(+V*s5sNAo;v)6w4<9{USBtk7)$eVWF*F#KL_1YO!_vX@ystg0i;F8$#{tPQ~y zZE@QUDM!svtVX~1JGthv+_>DB*P>X(6`5r=$<1gczNWoMt6jQHhAO+)=Ff_ANXLQlgn^ zX>L&3S28}!H@@rP=4Qx22f5cY&m$V;kiC(x9_C{m_b#^6n_Qs1 zu_mbp=CZv2tbYvohZP+fuH!0N;@vtg+oL=rz=_R}`CD`DwDe61`HU9X!52EwTR@yA z0pgetupP{ePMfB@xh1y8{mL5OggojU1q4w)^!=yKRu+hp`mX0GPHUiUXBY64@YDIU0LPi9U_lA1QyEv1{Yi~AjN54rI zWg@%b6~k8@Kuc8+S@U(#;a%WMj=^|T+QXmr75}Nudr*wyOZ~y}T^k{sv5^9 z8>eHLEiR@j=OPcBBOmL{L)j3X6H5I9p=rrQFYtdh--t)jcD?Geejo7M@+5$NqRU|K z@q)R#B{79SYI$nvysg#edPC|WQ_!3DcHLi+KGYYb?xuJ0Jwco38;v7-&6nrDrwuMQ z6NNr5=wE4V~JsN=qzALpdDSI0i@wptR$8ch{G0vW4|ID!uEgif@RC1rkjp?LG* zeN1J{yDdAwIbWHU>E+^b9=<+44paRaA}`wH?y)~>@NSYRwG$f1zMkU)!qG}qRX#bl zAOWk82u*O%QNCKzRY+s1CGCSzSImVC1drwq_(;F9(^~7*>f{Iz0e!mlPUo_#NXm& z{Y)(_cRjW~%kH|`gyvBCy2(nDT)2Bt!n8kdl-G5psElwRa3=_&3M3PD(D~jZXoMkp z?0%Vpi5AtlD{lWa{z=1|bKVHnWRWJdI-K9;s=rO={jRVxdJ#oYgzOvBEix`C>C^#4 zq_Qs2rhnNivswW;QzZLTehLO+3HslzbLtNx$%n8;WohVbwG2z}OURD)G zs~guEALdR~uCg=}B#C^5nJTc`cAE~%?;mGMw0EE2#K`e0<58B6WlkAIrO&4Crql3H znu@McTfiWPyP`BqgY)Ay`F}e}`2!r&<^$DvIisGE{c$?l{4nUgIv9mTDf}?{F>TS1 zrx%S4j23Hse~&We=1j5BPgGw2a6g(@rHe9uWDlyg*Ec?AIN^R}hi|e9qe7vy6y^r= zk&us~9*aruFh4k``+s@$u&)ttHyh)3WGZ8kWxm7p@xs82bmY7n#ab-?;9R!p!HvLi zliErO@{V2-uPc34cIz+d6)dXGwVWI^$F6^}XRRY^+?M`UxZFw%-=yz_^)PQ;u7d{N zxcDZSlr;)FU=y}>wxm0BTve*A@H^jA5~dVOm2l8U?f<@$c@&MJ3a}H^Lc+G~;+%EVPh^qRMR%h#RQBs+SH%-D`YnEfVyMA8B{e{kC1qkQ8YojK)1u$pXCi3KN?!bkoID;kgb8t<2x|1KX(P~ z6%j~!x!&*Iy@j|#WMb~J<K_YlWOj(Qx+6;1dE^u(uIWYa(?a^_CYQsPF zif7PDQQpo5#tnlF>vh-xEN0t^r_~jy0@Dam0U;kV=@W6M6V!)<0|Z1-!ZNWMp6@a~ zHgma*>zefPbeJ$*ALWofaERs()75J5s~>4 zi}HZ6o1CHD%i?_WW0O@xklpy$^B8y5XK5;*{zC3)OeiADiNkSotzm4Gg<2Q6FSmid z3DcWHeE%+NRJaWLJSasCDN*Gm=hAg5W8bs2sr?I{jk%EoDR59Mt7kzV* zcuml=-L0_j?xxk4A!KvEC^{|n+ey%=NL=5ZzIdG~$nwR_>w}jEN^66R3QG!?)wVPo zl8=;dm!_#TJdYkO-44q@8m*Y@U{j1}N6J)lO3!Y(RgySk452~Y`?)Q|ql3yhX&`%( z|G-Cn8K(IkBKYqZVsKQ;bgS9Vk}7;LQwB=ndo$Xb-oFS_uNiB)@$}?RSIOv|5_Yby zQ|(t3t`H(0{dk_`PUuRBdV51k*}vQm&tY$IrPnB%3^CuVjfO=pu!b3Z9>?CEL>l*3 zV=PICiwlUXxN3dyfBHT&iE@9LwUmx@kZSim!@ev`imeHCeR_KO(cGCBx()5k&wwrzObc66S|eI=_i{0(*5K zu@R89$Fj1r@9szQaZkgR(tf969%%PqN4P-oRLmmma=cN;Ti*D*i$ER?Td^mb4>^T8UG)f01sD7pk*MJ z4nPJ!Q6IRj!%Z1q{UocQp;6w}CM^;0^bpyyBXZ1ptAPXmp2KrHsu!r052KCHPsaf@o4c-{~}aYdi?E*})- z0p+9g`>0=V9hG!l002t1|Gt6BA6Vf4fGprYCX*-ds1>(mMO*juacwHiS>0Jc*m|-^ zO@FfSXJWppJQtr}l3Y(*r}i83o4uKr2bZmQFSPj%B0f%NH-acMHQ$rQ%3nC$z^Z(ySC5WdFFU^f(TpA5p4eteR6UNYoq}Q{3c}Khx z|L;on8TZ&5^x;|AT*~UCJy`fX^+9d5F1^pI)w&{i#Z3v4zXfIS6AjR&|KH0OJehbJ z6gyj1#Fx~|4=g8#?Attxeyypm#n&&1nq`FC5{+!^82`boYiR9%H}=2j>LBxCBD#71 zx0u5E@S8}LP=@>VNPT@7jDaGNJ*S#`mD-FhsDEi_xGuwSXt}iX?*Ha?cnlr%1pn?c zhC(T1A6B&coB6YaEN9IQ3T35?Bp1o&^og`*Eibv|?~)DsF=}YV>`Ik^3kQOtN95|5 zV>6PmcT)-SWV8k`iQxcDs^AploniC)|VnKmTV79r2zJ zK$q^e#Ohge&K)A9{h@p$Lxk#SOXF$l=6((NRGJlG@8jwOeYpg`ID(F z|B5nN5q4}m%SrnG-i)7TkRW8n>O~Q#vKmQ@62>h3GxJTk(LlYtaVNdq|MAcmSaW!SxfHp2b(V4{qvisNjYW2!VTY$z zo+=V&2u!WVuSWaN?se>mId9s}vrbzM1aoeOk+k&m1f4QDV;rrmtpf}m%V(Q)H1l8F zPoqcSGp?9UH$r+OOcYs{>51l|RG{+1}2 zm11YhvLqB)b~k9AWn#LSV#uI$K1*-z45zQo5nHg`@SVH39HvRStrwD@OKm64;b!wi zB;-im7iHMr-Bg8`maCTpSCLl|J{|l$x(as2(_4@J`YcC zBjgi%OR*H67wwgRRUjflqZ_ZyXxIF|vCI#BT|A%Gu6|7yr+^PL)#vNxo%Nw{J^UkE zhlSxWyssfb{>!w}1-Fz7+qh4hQc3KzjaO5m>MP|ex*jKG-E`ulZ8@K=A=eCF#Gb0I zfkXS_)u&VMxn}7WhqX5CGe^O}RW;my=gY~SqAEi(WGU#S>(q(Mzzc5+mTT=7{v7tE(wDD9{<>)&2@IJ&yw=FdibWHLHxMq=}Uy0mqP#18mIu}juMxO`p+bd}d{wrShH28;~pjgwFW#w9FBrvdPa(bEn zTcS>3=ki4bL$Z`8War3vOs#g;wKrYIZmAzQ%iND5n>tT!SqltWb7(X0XP5b9wllQr zY}b|WB^3Lh=)q0y_LH~CVrviIF6EO75R_jbu3R4Y4+AKTA*>DFp&=E`MW zQbx2IiU#@rEjnIq4?xnP&O}ZnXM@G2ImH{mo3wb_%SE~?)aN8bS;c&+uOMzs=|+zi zZb(DkRh|opt+#UXFtHSjej|UWQLkf;m!MJemv3mAr**6UH5BuBPpH+5#@-v27+%OA ze3#e(S{e(Du~VQJaqr z+YOEv)7WFo`88CE29gm3!$zk*X)D)AIO>s}czN)QPk4!P^xN=L-tkgB64nXDJ{9T? zEaLC;)%yXhw`HYzOGH>WFnKZmNAk-+a2&oQ&w}cFOq^AWsd$tkIOTOLM-E)oe4NSw zAG9lnrNk?alMyhEsWT|{TYL;76C5{bcJXgW>e$U_mGJmn9^cn!;OlafT4vw*`N-+e zkNtn#66J@gFn#O|G-3Dh?Gg61uM51f_!gg3i`#md)LZ7f(tCRz^4AhpYOJUJQ5kuz zx2vkE8mK-}j!Q6l;GwCFO{`{0QQsKX;d(-)L>s1VvWs|$mJ>7B&k;g?>5-D}_JC)M zs68eo4~VFNdaCw#bnPW_YP&{0rZoq-rAPW2<$R7dt0F%=pQJRF7MHEdmx|tJYk&6! zUER`3jZs2$GCC)DRh(Hb)j!<+`;=`9chS_1yTDeKtlfdxl(NX$L)Kuln~JWs!L_d^ zL-08l3(u+VV3ysg{ZVse9%yCp=cO0F`SIfRc6FZlOZw}TAu87iyK=3|PpDG;e+iVe zrF=KPsng$mn$IqvF{Wv)jGjxQSrTiGD4Ca5iw<@s9!Hi0$)exQSp-=Z*)=`Gz~N=S)K$$v{P1o{01cc& zHB$^DKut7eX`+EyZFieLtCxlRm*kn?`oiKpVkcoPWs0YD`qFKQcfqNHhjO^~XkqKH z*FDb`t|em5lPu%cXnh>3I$uwfwuRa`bNZ%?+L0RTK#M@ewK)joTs!d0{gzFB}x7GyGDXW!oqWw`^Jq~@mf@* z52}p0e@MhU)}rLYo6Bd^-rDwMCdt)Y!eG7X%mvLiIBnY10b!T2s|2~7(vbS4XG)9? zB>gc&rBz?`yoL*F?d$YqDw*3mrs8Y6{fA%IcN6xhf;?=MrDauiw(%~E-ZJJCo(m+s zOtTICSv=N1?Xlk}O(Q{=h)wV-vu1ahmU4|PV3Q9xSm_+^>BzBon0A4t26y+WJQv?i zC}rSlbhPF3ifpdcYFk)*nbU{=K9uiNHP7wuNL_37z+BX^D%fSlV{lGcBtd3zJ8MYt z#}J|gwIKdYsZ$!s;=ih~HRH&>Qf8N^)kVx>HAkDs=?CVt)JE_&?cLSd%(aaL1>}tF zL470|gZvAN?Zoa4;8eu)qK+jKi7JMrhOC%Qf6Y)!Yz(`sB_2Nk1Yl87*^5J;6lq9s zK3g$~0{*w8tUU*Wp5g;rRfXoKsuB#S8^QP{If`KZ&$|3|N5GF*-fYkEJ8wvja5~*%;T*+iT$PlKDu@L!Gton z0fO_?7XEdvdK|mMVDONAOck7Uk>%>oy|_@DkWim6nv(Ulen=vP|JodNt|?k?9sd82 z^_6i=zhBq`q@?_bGz=60l@4hJh=NF|NOyyD*Tx6|X$9#vK%{eYN(`i>VbtgzFk)kS z=KuLTub#KxSKs^G_kHeju5+F1z;wJAjpvEcq2{jl%H;)H?3EN>AjBN+&MMDa3+TBn zHT!N6z=Tamk;#nd_lV>da#4oUyqDhfTn-NSr1={>VdPc}y;?at6nzxY;%GH3lf31W zgam3FRyz(&7>j@Y4A6E|YC>K3O4E>yXwE5u z3t@Aup@91A=u!X?Yap$O6D1qy2HR+ZVJ^g2GOn|HMY62dn$}8*WWg+Twl$wMy-*sw z^EUgTezSYwR%dEg4?Hd9c5IguhD}{k``73GZk*<-`$&JXpIdQ5{h28;!$|~Y#S8s_ zPulK=@a4K#@1KfTtZd1;gN^>TFN|-LBn%IZeMG$cYEHc1A0jFyiQ{OwnJ!l;aXo|w z_>hwglFB2lfv%<#-72rRr<46-ZU2ezJCu2m7DN@HW&C z!lv@n$27fC&9x6`3?E=j5VnhE=emx#Qg=E|xsDB$1cbbeK{IDjQY*#Hd}qv4PXr#L zkDut)^^4LRDcc2QZfiHs&Hm}t50pPFQb6D|zps=0$_DwQIJ8S1po$5rKjYTQ%Ob=bF}ix*4+)7 z3(6dI;GNt(Zgs38NA-W=J^kO&fAWouZ7$rw`RKIa8`HNxe!hWMV7?I8RZI1r?WDF8 zTcC>^eNw)4wqH%;S&6Vl-KN?i@C2xW`Az%;RJ8h-P2kv0J&9T_`7BQ#@ov%7wk@$$ z>3l*%7}C2tRSN9|PE(1IUPsM8*~677+KOVvrr~h7j?pomsV5NlNWxO#T_`z!bw~_4 z2wvY#X`^D&8z=cjBT+zmf}3gSVMO`1;ns#zU7t#`Un_DYBTW+(kjIryz3)Wo16QES z?bFyizf2MPpqD4ofGU}%N-{6-3o^&4Mgf8BN^C?YI=p54fZdcFzW8r8#wpEgi-$_D zGewIy%!~Zg53l@cng$?Ee--I{Z0OTP)8#!`9Eg`?J?tG_r2KMSHowN5{+8EDv=cvB zLY`E796D`|EYeFSY?~2t;XhB64-QGS;Vonj;OKawcG_+?6#iax_Vv0|DX$g_@y6-| z{wcpf1(t+rEaL5LskMLz4Y|E^PCcZWP1cYI>T! z2Kpmc+fvl{D%(jn@B1r#*B4|5M8TnAt=eZPs5HWr@M+eK<*N^{;<(jquH7Vi=b;+e zQiZlIX>R`*AkcbSfAjRm#^?4FH%ZAFQh(hdn4+!|hlqGRl($9u+OPSaUuft>WnN0_ zNTEG}0d$@$<})-)ZrUZLNiUoWBcjP_17c^oAD2a@Howakj$3Db-8B31$jQaHRgy?K z09Dg5sAjs=j-M_!!FO)EGX5?$yEb@zbnjB-zF&>7NdO7rYB_LwtWdFDm;yD%dEfwf za1|w3I<*OQc^8BrQZPSFtvzNa87wN|`}hs0j!{|1`6QK^O|Y3g zdm@5p|JJOS&Qk*gwBLZj5$Bn%QTOb$q&ouZXW~=IH^8RfqdT(BmnQd`P~)@7=D&yP?Rr*G^;PjP zZ7Owo@|u#)+im`by$Il6^>$N@_ZzP&WSw&P4U%^+?}6WPlukLPq^O?<$dqVJrMz!4 zoeGGmxw0v^o}3TQLl2M{AJ7ZNmv4R%ksbfVwx5!(o8?>+*?*MWpD`Sk4!;<96yb+y zekbHL&#NH8Wfb9zP1TfC{^jI&8v9sAYfC);v4nOXi<7!G!}NDFdAK5l55Vfk^>-<| zRjS(3Kqo+=K=Ns0%C%oB>g7@OAX;qPd&)P(LQ?ebor6no(eVQxSfH7h_?CG%8=Hq1LCYIyI9lzJ9 z2pNmIc6M(Z8C8MGn9yu6`3ovUk3!SLZ3d;f<7MC7(XQUP~B_3|329l+NeBT3UQl&N4D{kgZx@bHa#nMt|-J z>b-o`W?ZYr{@zA6HAZE5a4BD+)>J8);^B*F=V9!$ zeS*TxYp8@9P$i|xUG1AL>Xh1;vTa*>AUIF-Q*PB+JN1sEoceiOarqdq^rpKAM4FMJ z6U$Ge=@FKb9F@5^@O0Jp&Nd+IqHYEwFZ)tnzsc$Ry5Yw-)qPzS%lR={*&T46+W{E3 z-Lx4uWb`DD3V^X_B){uYzMYT{%~3-)&($v0OoOA5>(%- z7&Qb7*uQ;=F|7-rj|3xm?)Q_KI4Ut4OMdM#7X}*jh9DiXe=OH>b%b{=nYvWV@EmjN zb~34Mb|DKx4e+q*G z&6a^_d$q%P;pW2$Qa%a`e7Kre^Ohqas6Te@d|*o}ejURo`%v$K{Y?sJwWg8aS*Ve|NS z6XpHBOV%6(K(JlknyO<;b{nUZ3PEok3&zsZe9`nCS=aWa%O!4h?E5`gou~ca8*LRQ zH|q1Ju&EFiB9BRV8i%H9w6Uk7wxG^ zrf8M9_rp?#c&gjYvh9vMjm^($GwGg?Xj+HGIWay%J{0`aZEPC(IWE!DG;vU~bP_fc z>p}$Ko|1Bzt?CxK!T*5dl zArq{Trgc>oBf+E zMfr<&62g6Ps(cVlU7+8?R6$LX0-{wif0Xd4+=aN}sd&AKThqo&R8$n=#Y)4yO-Rd% z4!X#!^t<%sX)bg@lf8ZgAC0cgcb`|~a*!-j4q2Lzjns5bDXzB<+tIPoBQ!bPC{-L8 zF)_?^tbENotpF8oE!G+^8Z2Z&pzaol?vxo)+a#{ki!4`sqZDJ#eiW81%OaAQ`SKv6 zTzN5Lj)lPQe#aF{x|ojR6=dGg{x9Hy_-D=eC5lZgX5AjZdPN{t*%cAmTdl4t-+Msf z;sXx}=4yB22?@*Nib+^6j80aY_dWc1M31TbBw@xMG> z8uyn4boSoOXKl_r9J8l6k01H)>WT8FPnF{%hbLn#P%KVr-cUs+@@Lxz@ z-8VoB^VUzlI4pU%3AU>=UQzVln=a26yM9F+01LD5L%vyYAB->G+E>7j8Xx1U%+N6U z$vau~et~7alx6p(+rgm6AYT>FDIKu;(Z=ZPynh!D+bahe8YJ1XFH)llnGq1@56ut% z7;GxAX?qWLeZC&xj&@e#oR#xi@xCws-kh~&d8C`PG*K>8)4W)g(>0ZXf^{(kWS8lcYU@B|%-21j>@Xv5GQ#NfZB)onW7 zSaZC!HhY$+H4L0NYO!{$xo%o`<nA9Be9$Oz#Dp_z5qi`$FIxMFuj`?r)YBvhwbiFH^Hz##ZEc%n zw%zS6w(TMF5r1IAlSQ}DmdH?#2)WdBY+YA8Lzf)20eyd%1v#Z*n3-W1r+{%YbBYBU zz#_Ub8{HW#W6K@$+MZ{yI1(Y&U+zWLHSZz%UaoM z;C4;aH@;r4old7a>2X?w6cf1MyT+tajQee;(f&FE1+jh;mqH*wFlq_@G8TXwU(}s- z4{kB(3Vyeoe^AyQ!4iCkF~Hp{<8NpPnB_HIAfVPh#|vE<%1IvNVw1U^G@pql-#5Wu zm>d@iO*53M8&6_`zQFoX81vv4t5_z}`Hu5zSBQ>`gLKEplNIR8zv*533U|n4vDK}9 zc*}m=e3#CWT+NLJU0VL-8Oanx^6(FbKn4@&jx+G8X=BSo6C*=O0K~H{l7oT9F+qAT zN09^WKvv*KPnDpzLb$qa>9(1>n;_}V{q(;9UE2?5>&k7M?$}qAyOw9V@V)&5U8o{gPqv(mz>xhIMk+OLbDAbiL)FeSDBmTs??SwEK>Rn=DcUF6M ztiOEa1!~4j++(=cfkEotEA%4B;d(OLriex0135uM#z#OZ5RXF@jw0mRZ&du_6|M(X zZU6Sg%8)tY94l@+SM(a5GRpYG^PFBi()CKE>+72lX5HTsmtWax;Qi&1kzTxa0HCEN zZlEQjr69GhN~UG6B9;$ZdJ8gm!b76a^xeHG<1BrDXBH9E27}r9fR>#(tE=2i{szZ2 zeeZwf3kO-hd9tzFiZ>QBDtxWEzrZLXx0xKS72ira08WBj4T>o-1sx2rfNy>4_ew>b zKdXdre9NfZxO}AQ-nAx7`c+B}Bb!F5i5Vj!ngOLLciF2^3@_NVMS%wR(L4#q%Cy}T z_tnP!6ibg$_dQmgjdku+*HxEYGs^N8aIP4frq<>! z$Q9fFkCkQrg$?5A=F49*F14?f9XKCZ)dDyX%25rYX|p}O2^Yx+5jFd~~HoJT)wfC1}>ObCR$48Y(I!Unoclmh8*)BU#>s6b6!=f&O2ADch{;#W7%R?jn zg~X`g#I`&7wZa7%iDGP5pQ>XDTh)hb6z>{j|NOg0k8VF>zA2DzezC_&MT&6T`Y(_U zB46edIAM#_NGWxxIL1T#sV3N@!xc^ItHFQ+dMJ%e(ODDGZ$)CT=SuXNuhPKDv|rd z640chJp1Lxc(R~eUl%0p*`jz^1gUu!XPG$GevA&B#Bvd`-LHSM{bDazxMs!l34<47 z5`E88kiMP(?Bi?8Uc>OE}hF8W^ee0WHJp3*ee5^OY$_7{5)l7_{E}Q_$$k8utCy(VK%<% zF=b$x2>+zd{fg?70tFYbK>NYO@EliyPSz)mj}0+(W{xAYbo4Vapl-bQjy6fJ?ShMl-$ zN0|EDq{JB&N3ceQkvCDHk@N`RuVV*{!>?gGq^bM_GNcq48Cl2_@l!Ep8JhPQS6oT# zc@_ zhN8oJKc^~OXZw8DC<1ET&k1%~lWS3PwwVT!nub>=Z)Wv-e!2i_@^gBPchBGYDO5Fo z$7a|WIkrYfC@MKVC1>xTNV*i*1BQ!~Ft*Om_jUo~Nq4VyJ1(*9&LL;bxS9D~8;xl7 z&`|jFEjY=7EwQYTpv#_dCCctneKo9s5d5_`^*NE{+SZP;+ZWud4u0loX}*_MV9!(Z ziKykR{-ZGNVh#nX2ic#q?uv|0Kc_JwQRnRTJq>kEoBQ?F_f1$O-IdFgzLDxrH(`3$ z4bWceM6X)^-Zv;}>cl-OV?C!=r(Yo>BKtZ2heF6RZLNV12`-)gI1M$VJL%|)i;e`$ z>Hgc$x|L<>LuEe5t7Dj!X{v=Yn+*8!xLDv)Cxgb|i4(a4j>w{>q6&R5%GtR4)Zkpf zb^TX&72NfrZ<#u6fn=4r`gkac5YI=Rr@NUp;hq}MxnNEg`VMh>m0I%e*}~os#5$6c zN@d{KcVlFjz}>(;MeVGi5Jb>?ji%fLYs$SHp8|!@8RwB;cE5d^$;mBY?J=SUt-_`(%u<18k_F= z$gTBi6&{RE_$!0?N?Meg_6Kz@@KtFTb{@1BOblLON@brKa1HzBcLQvuebg^{Tmb&rV_J0Qy$cN3OhHKoJ~2JH2&cw z4h{<7(tKc_-L)GAUZzPu%ez<`x|X87_arhJJ=Nd0A5Ej#JNrbN(mCXDVwVb4uyF%0 zd#8>oQF|;g4Pn!~axmW83bW8>-TH5ALqbF>IlMz8JJkLO62GNEZVq18#hBZtyJ#uj0yM88U{*s`+w@)u`AvXqm`c@AV5pWRS>89pvAeRo=*Wn&!UJ-Xk9O|s~? z?wgUX$2;){dEJ=qCb9iQjoxEtj}cF}11YM5NFGqr58_-5GfhsuYFxuwQLz)7Q#a?` zFwV-{jJj-n{j{~zB#W>0qM`j--Cq@ws6WX?vQ6xG3CB65a?2RjFxt1b@0lH;B!^VJ z3jzv0dnT(ydNa|^%(R^}7aGhu+-FPrg1IXu`;Vk1zChyVyB1p;+(3Qr^u{K2{(~>C zIsFQe@I|Y&i;Dpe2ng;d&-Uy~(`$2T?JC8D#N*euuf$C7CCwsyvT&_!wO7=Tv ztJ}(iZ^Zd&cK?P~y+WzfzlHZ6hYITP@8<>tmlive-36YVI)_i+7EE4KP$j>NthQD> z^G+qjFV}?*>-FD3QqDi@B=?8=ObaV`?dOF24nbU4@D&v$W`AvT<66d7q@OEd$n#|b zhMNl)MVR7sU>K})EQ0~FWGE$X(JpsCpK~;A0+JR)n7MTvW0Pv5)<2Y@rix10xPI59 zKXURmwn@ZcG>ex3Sk(|+eqhHRT>2|xkH!4Wu95h=U6aY|v-16+b6WHkW||fmHAA;4 zNqey|I=FSfN5l|IX!pTzR}%y{t>zhpaM=qLi+^izNg)LeH#%S)Up)RAX5)`rGSh9* zDmVNg{UaeXpwb~EHfgJRv!Z!aB(m_m_4r~e;J3<9WMNaElwXCT_OmJ(GfARm;uSe{ z-QEb#k9W0)mI91+=A!<0J67P^L~^@HiF$lV`rSSHA%X=kQDHhRrT{j^)*Mn?NDCIv zkA5)rg0YRYSaGf5MD8iGi=)#0w)K+|2qtk#J6?x}{+n)n zj7kdpa^MzQ)fhc7>mA~k5iTdmEO}M8QKZ2yO2^zQ)i376IU*qHPCum-$CmTY%>3P) zZp0hT@@jouR~PFenudEIku(IwyY?{aiFD!lB<45CZAD(P9k<~ze21+;8Yg8Pm!GFb zp@@d+BP@DL?Pyuy?fML5jGpIM`X3v|gxiJ^UP@xCQFZs34n+N2Zg&!ovvMK_h(~!X zo0JUze`$@sqEN`-ejBX5mTKz{i%mV{wLp;_(Au3@r*gD{tdWUuOM|HlY z02iWw=>&BuTxE4J&SH=S(ukg;#(7pH1(Jeq)6+Ek{(+CC;{^HjH#}`xwFp}6^z}1A zWh(qIb`R)Gq8_5|Vp;tH??%~*p?;rS6P@ni4lqLtcyEV;!lY$|t4CpoEO_RFF76M@ zyzW04_BWhufvt<BD+%Y#YR3bdJjo4)*G?VzLyJTbs^LP19T#JHC@0^19L0MmZ2biu6AOjo|j(F zRT$Zsd%j~*i z5p<4GJZM*>`;Yu}LG=BC9*t@0V?h~tF1E{(SLXw`n`lKmx51VqzHex{)p4Pyn-}vs zVuP}12+fzXBc&iJni{{{QW|um7!r&%@juE8z!s9g!;aX0-uWn#?chp-6V)tLKc1&} zNlx~iDM_F#e9=w>y!k^RcV9ITH2 zk?#J-qTc?+D!ZJK>n*9$9iRC-9~v_Hh2&Zq4^5hY0gXfPlYM|T;X$Q%pEYBSz>LrKii!r^^t6Z0cZ0MvP?uu&R^K^RVk#%;}oBj^?Cg00=SAfc!D?v{TAY z3)H%2nCcDy7gIY)#-5tVqoN7UYl!HIuVs2Us~ydn$#EPR@EpvG14D+1Q}vyQ4cq1OHC6m6D_!$5kbJ)rBUquDQ_IM2Q ziKUkn8ol^OTo-63-}fF!RqTMAndsB^w}!rWqHWx1OETRY=Gu!mU$#%jL#M+1p{D}H zcBQot;$Tgidn0I?Z_e8(*FW22E)^UM`Vcqa^DC31dmSH-o7mI8?bu!>2<>g;eLHW1 z`fqIuLVXu5rP|v%nv;r5h&vyWLQYodXhMkM|2%_b z1;MMFe%RR5S6?9HPdJa-ny~eIBQn)jeWlmJ(50yx;YLf>li0T5PN7)7^+1zp3E=`k$M$HUpMvMErp75;^5`Y}f`H z)_Z6pe?Wl*e^k&{+EeYlFQx&p`vw;q_V`EZ*CC@j)-d$n|LNM{8+`D(R`Irw<@oL| zMzIs){qA`yhnpLRT;FNoOfP=^Y^(CelfnY#wLmG*4l>A)bHpbZi1pbs!yRWin6+$Nl60Um zt1+&)F@tlh8*~QtSoF8p5&m_q-5p+cmr4{EWP3bI_Q$i6f#_Zw4USRCl!@j6{0-Xk z(|3P89l-^_@4UgwKO_!~lrkpaaksdIiAofj-EUnz}KYVv@6v1>xRD- zyel`f`ecl?v}o)!FEK(IH2Xx*`7cxb9x4ejON%XP_aU$yitnnQH zc!6F;`h5#A0{g|_5g!-5*19(Ya-Ijm>?7-hE^}CN32if-EL%jxOP|MW_aPQ6Gd)lN z^H;au0&6WFmvof<#}K@6q#AsA^ptUXe2Zcev>m5LM)R8v`yW==$V9^}$mmDNMvGx2+UpOi=7(chw8Blc!04wPPTZ{f^lX5Dj{gddey6Sp(&-#DZ>;t}Pi$t;AqO)S zt-H}eAbz}0P@|~v;%lEt=2Aco>4z_VFD8M1e~yv9C_DXUR=p=DMO=;-&D3jw$^E>v(|j@689`;kSEgFT}D*GUraHlQ=@7#i$> zZI{dc$=-mwjHEV}r!vU-3z?32EQeXPwZH~vllr&lC_*v~I%n*ax|UA|v^A$virve2 zj-Y`&O_yaq=y0oL%k9I~iqY5u{0W>szv*CHY&nx}mcEtY?CRMAi7st1Qb?5}>N_dq z>gg~n*=Rbg<3%tv&7%Q{#vN#J`Lb53EijHZgT&JI)moQm`AQOdR>s$mo*6|{0$i@+ z^0-S4ar2cy7&E>{W-d3DZPNBPTh>{PD!}y&dw!J)JtJ}M;8UmN<-D@LI!P1DeR*1) zNb2>GF-`Gl+NG-9KoqzpLRAPfJ6~;u3GIb2hIUPGm3pzRE0g4%&HMj|iv;gEnm|BWsaT;LvE^ zr|0GTfa8aUR~={F#waKUS+|rCeJrZ00qI2Y`K(GzTTnbzieq5t#z@I=#C7SfZ7TA|0fPc4zc7 zuTo>(g`q357;lBN$!~$KjVuSiccn~y-Eb_c4T&tm`-0|8HK}s3TL}z0fC;)%jO#2p|@7za@uL+vHON6>gj25+FJC zUXZ0)_^J)PW{f&ydk-(NqQZR`=lRfD{((GkDyemAIT4J4;H_ZK_T{ei70OpMyl!K= zo!9`_X|3aa=xq2u3Vb-JAF&R1T;N<7!@CJv^Wu8*z~4iC|C0kHWobW+lOztvcu?4@_9uINR$}U3_;-b}SxSo%fPA>~a z(k-ml;1mv~K~s94Y_nNm zoo+$i+^uX^Kg8_$=Aj!z1@RBaS6)cnio*&hwGtH&Io(0_f-5ZhZ_Bm*&qYX2Dp;zW zA0%mmP?6E^lZ*@u1HfZROm3sj_cit>psoZpAiRIIVe33Gc)jR{D*!+W7KsVv9O^6Y zgUOetVNu@BaF321%1n)0W#s}cc<|P?t2^d0W^|6vCW%#pisI7cBgI)Wai}H{r%YV{ z>bE-XS)vN~^>H0|&SSnrxxa?&Q#%KtQH*xa|NEyh`m{t#+A%WQhmO}o|1REbtR)nk zl=wlh8^(^XXRFBVFD1wKQyJiM5^nnJ7H%1qPFMcCSUMvq?QnRp{CO=O*Z-G$x^H&5 z&MZ_&dwYXkCs+>7qZ`;guyJY_<<@l{0r;*r_WpHO1z^@lrGe<>>090*c@MI{(1@U4 zIqz@;)e-+MrK>sFkw(gbwDz~HPrCK$$?+8pM>id@E5JO%_hitf2ej7%JaTUL&&h?$ zd5^H|?`wV~(L{I&g528I3^1jY2?%Uj2j|UK2=?PLs389~Zbka>%8<@lTgNu3ytKCQ z@6SW&$uUxT{Fg7IsXtyt`D}K8@~6Gwzjb3BtBUQY(sBU8a`3JY5&-7~L+0C^iw+4- z3_Ut~qyztJH6Lc8Xp-(l;&|Xl=c#OYU7`~rC#b|b`WEx(4JEv&(TZE*VH&T)3* z1DC*v%6*cTdf%LnFX5bga7h;_deS{V)3v3fGLB z99vEA<1}V>k0p;hTY~P|d8BO(KnsL~#gX?WA@rJ#j{lx4V-zb*u9l@LN6Z>?vO^0I zrlUuQM)c15hRS(|OrRWqv;Mk^xd+qE!f8uuBbX zqL(9>5}H`wchdV*QTjJyUlmbkn5vLw)k+P%R>~mdqWycHgK_#<4HPkLi;?xbB7tdv zPtrj$*9Rlkx^``&6;*T9QPob{F@_X_&gqN6fdL9I1-7V?FvaiJ%UQq~ z8a)lJ;#;BLWbUh18U~z^5B!LZY2A)ch$4HXTGc%7Y z@a21_p$MNAn4@iNMtBRX!JZx-VC&~koei|$(ftPP zr`Rdq;0M1$MjTi|4+f1}IF8$A%G%uU)i=5p0gdg^MlM=!jvIJQ`dPC9iT?pvznEuu zKIkGzj`(rP%r@75qY4b+3l+_D%CnSXE2y#3aJd!GrUP$BGs)UBZQgZ!yVExmt8O&68eM!iV3|(}n9! z3ws`q8Xd!a9J<5Ym#(Df=oCJ|ln@S(uN`TFj8$E?{5)O`?B7>&^Igfd)c7RD($(&U z3ZgdEi5_n^x>*M=Ap#SS4@uSMLxb?LAFOgsO^J)RvLe7e9?L2UR*jR|!8{Qj}MN++Gz{=q9EpGMivR1$tZ zcLVAHI-v}~3@sHR#6AhIURcRYM8prBEwvQbbA6o{vT*BzpHM&Nh|kfynIbyQ0vH6I ziNTfN+O4H||1e<(?PjqYAaKBu!o}jLtFt1l-MaK@mE_-f(;6cRwrJmn0{>47;8l;Q z`U58w!LkHm5*-vP8Si>)7afm^Rfu3;>@khRjUwxb?%2<$c2D!2Y2MA3U>cY`l@S>!{|_NcAeRo{M>j4PbDB8Noqnhc^7L~)LNj)E6Z1a)7}iT) zuyWw#u-7H(BXA4?T;_49Sv1&rc2;cS4yj7v-Xk!sF0rQPcNhhN{f-DtKs>N`Q^#ze zTn`Mi_lw-nK%vt~;^w)K0KRibc;Ma&!yg4mwoy1e6aP5 zYA{X3qAc$$#q5bvPmn7%FfS}K*UyPlrdpqkh!h%tN_l8ANE};VzOsCW9Gc0-w5i`& zCJAWpuYRK^E|&8zXU#;0&{rT(boyGLh|5ejiN;aUA5)ls~25InLojAT`; ziP0sA;Vkl?>-eGjC@l_sK85Vnu~J#lc1Y_CWc-@!&Y>uLb-7xa0xl8WIdED;t<;3% z)Ug~Begk5KT_@=P^J%6d`KtnwBF1npg>gPT?T~oSKa=Lz!V`l}28v^!`O+|6ReB*C z&d2ArYBwlk_BwgW-mZn?i5uNTJj)0pE>A2`IfIn{JZC>f+~7*UzjLcFwZp-y164A{-(^B zS?%QuvbzA%ZlnA*@nhRj$ZzBov=<%(Zr)~dex*3XmH6J70zuIzr4?F0bVZqk>xPk> z5%0?jU+u(C&huwhxp!PdVm~Z5F4FPR;mG)%4nu?Y%i(gtd8yRe9O@N6A;U$ZDEWH> zyp}IY(ponr%;1IYOeq-cGRlLk_lBppm6Gbyqp|n48TJ*>5(GhDUo@Tl+IJpa8q_q> zXrO5_qgTH2Rt2+<5hb|fC$UBOrUypq+wS=Bx&Av zQZ{OjrqeKTAO#FCR;%P(ZGRF)_QCZ9%mQ7?BivSy*Lo9tFc)ls>NcCOtiOb!(3i7$ zF;nnpw1ObZFbxmHkI*V|R80&LBL%}dZ{tv(tFR9(Vv=rn@g@Beaf&Hb^M@Fu9fHaH z5W)+!=5NC8-;4yDec4abERnhzouGlQH)#kM-?d36&uG~rD@ul$Uk8YpGHdYeTlH>| z#Ith+1-tS7p@b#pk&p3mZ9X=L(T*b%X8!I9SnD=nBj#qTLp6Sl|0hCXxvJ2q?Ck!Y z$6`({C;r`j9?WdQHf;KVfH760MJwguz{TNGw*2+>x5*LQIMMCvwXPJxHh!5pM;hdb zr&0@@8{o>c)~DX0{4o`pXoKjK_P6VQmdQg13!_jSyRCZr9RYTEb(#*2wkS~e-8z%& z^`=;-5L<-g)bmw@RAxwK^OR|WsKHPQNUqqTJU)bqRr)#IkLP)}+zY56=bUWR<1 zKPv&o>|*nW>r@cHLkw>H@AVit|5z{q;T(LQuIYOhxs{UK^k&HgP?RnY(bk!E5CJP@LxjNtzA`PhosA3rH1*h9d2KH5i%gOO$JAXLm$ss3;7cdxAiUq#? zz1L3E56FySU03+;Ejl-i!|d6NvxRb6(m+xsE9j^N8}SusyhSHM4fH7xs!SqE`;3nX zZ`-+Bdi?-O!F?f#@JE%~uANA&e;a1@$-lAQIGmV99%5_DpI6ifbN+RuKmJuto?J}J zsnvJjoidb2Ih9Rw-khiPsT=z8?=MC>rm{(m*JlhE87sPAYq^2C$sqo1N4RXO7} zGbWLK`)Y*_1{f%=g}9THCv<)x6l#536|R0b=**Rqnd4&xnbKjL+}a=*{;REyo%9Zj zoP$9g%c~?IdsjY8Et|*|bVs=#bhi@GNzyIK@nty@isZX`!E6xFF}MZfzvSlbx|nqz z=X~U*4g8}x{K{~!eB-Q(>gm54!`6XTg-LLH*9BW>0QX8@$Ni5|M9oi>0)N|8>GWxn zAC2y09X7d10*1DB4l$pN{;lIqU}!DghW-aK4Z`pGxVpAvlO>(;9ix?CGvP&39l_vS z02Il$QSVlTZ&Xrv4{D$tZMjP=XG@Gpj6=*_eg(c?*mtg3l zp8-J5OD(_+n$p6O0F3YRpLi)^{keaKbdo0r3RnzQ0*5XJp69bmEl|vwV(m}n(2&mI zp&*7(7;#k4FStpi{NEO*pHuK)&B`IOGwNm-%%So#v@d;}c5>wooYx zU5$44Qdf$!%Rl)VcnqHbZ$1KQ^;TG-eSa$g%&O(_#Uxoi1Z5-Q_23>()j@x{(Rx z_3ix=G9@n&B6De4bS>qzRrp}O_xZC{qL=*9TFSG`?{?88Jv^YsN!Bm$e=u;y90?eG zL7z0AKGc~0KCXn(sH5?^H~ntCh$4Zj2qz5xQTcS1jw|e?($UmQ*~-(^3E6c*=QWhy z^Ha8jhw4>Xr{ml~jXZNEMpLqwqzI71Rr7;T&M~TB=zv;o6&T560Z%JiFAjWxkb3_M zjI74SYu0hn5rmWoN6LgqE;jw)g17vgM({Ej#pEKcb+ZIwQn~zI(Q=I9Fo-IY>qv?; zm%x&_y&`ohk5?O0i|;$EyKiG7WL|N|>R(Ib$Y9?e(o1{XG&B9gX_X=f*r4Ud*qN!+ zZ`+bSn?f~{T=xAcpx{PY-$k=U%e4>R;;|@0dsvf%llK6R9p>gy;{ z)Nv18bggjT7jbA(Atg@P9(wJP8H~BmPdQid+ksL>D4s9SP4c$%>GR=3&RVDWp`OPE zcM6Xt?rSXEdPD)|{7cm7ARkRO8%ITyQHvPsD9ANy|X$<gdXM`G06S3%@4csEuz@BIysMMu;e=bayBUDy5>dqkBO&3`9a{ksK*X zNQ@lK2d`bsr8dHa;F;-(YKzR9;^5<8k)R*(fR!+9sU;wyYV&f{y++of9CkDt8>= zX`vA-;W?75X_i6@iYinEU(**Lr}`wx)KZ5XCzf>lJU-aT_HcfeeoB2$^zEsLr3lGm zx1*tcp#v~7Vw%D!WH-H<@ja%=US#~%!(IwR6r0R{{#OeVUHk{R>k^j~~zyg|BC6lgR*orTpX%ySEonZj1eO^lC<$lJcsLF($m~RvR29B}3G;G%+IWXX%Ukvgtn)DyJzMtv? zhp*(ejYb@#%}l$$K#+0{oh9yoa{f-$AMC6x`SG@mHeA-!tU$R8jp>j=NT6@GrOwzF zvuuaQadF?fzCx#S>=mAaX}zEf6Z}Cj^H0LDtlt(*BvPhZ83(QyB?05naTd>5ba~fk zzWw0G|NXnR-d-U2@uGeZ{e5J5bkV7W=fZJqVkt0(}a-9!#l^*3o3L9quz(n zZAL_hrbxwMb=qCy+ME>JYUMhE+(`>OOTbjg`q?v^0~}!@%Owt;HfgG)C4Q5JAYSoz zDOm@-7wJqM#A)C2U8Pw4WwARGEEv?!(WI85vWE-CkPS{!iD@0;LIAGJJuf7ZpPle7 z^eZV$8CPD~Z~Te;r1giN9i1~}#9Om02WPI`RVNC<9ds6(?<+}ssZW8hudm`#`nC7t>Ss5c$&BoeP2EK$jw;s8 z#z)g0!Wo~-DWn!+hF%Qx6c7E{x{Tqv8^TvnFuH4h@$aNrqS+@B=lRV!h9cU`LbTsk zdz)1hD^&;rN%mO#lDrseCsnto(6H^{SKq!v|4gDA`&E+cRd&UouFZH!Ro{!empv3T zkb7T}Qr)P02TiXX>>&}7#^tXljjI+!P{=~-SPtVN-7m$Eg+X3Z-Dhi--5ftbRp+Z2 zqT(sIW|#9v4epE#DHD*9FI*1O6Xz(6Gp&igqi*}hn z(UbD2Cs&Js?&Wq@Te*610%u(de`xW>TQcwWH5)w_>wl;2lt!0pAiPZiACgjev=3Y< zV;f@%E8V|d4sI4j*_j;#MWkm?9Oh?OJc}$fYZT#VnY5o3cW)qKvwoFGcvW~iVSla) z$|Y3D=KX&B&)rjg2RGcV2jPPf4Owd)Mb>2gWZn;vxl8wPBVQUV`JdZ${W~^Mw0$Yn zbOg&K)L=hK=)mlI|)E{RPB%BEwjXFLjORe#(x+52_n3#&a+t-2IG9%Jn z2U-lb3je(vvb+mr3DSt8@v5T7dR|*&pj~vY#9uIRMbgJF-}`2r_ru%JDyCz%jY`K% zWh{@%OJzJJW+=gLksO0!_ zF9#qlz0i1z#}YG0NkQ=X-f}55-eEjWwI@BnCvWCcuy|AB*b7?=d&Wr>nf4Ol=M((& z&u4lo9@qxX7e6FboNdpW9OJ9gGDUuUJ63Et$zwJ<{1@yitdN;gX(lKdl})mu(8cRf zq)Cp&dl43Djkjwg zuYISn-))kZYEn1wi%)Gg-$FdMy;qchSCWq$`=?6YrcDPn<&PVDUE|*J{lSO-R^J$t z4dy5#fs&+l-?-m`0Kyax*pKro<&%B;l~q2*IL@^2K-l^8wsolXEVVYHqt@FAs|DO1 zv#!UJH`ndG=B?m_KbSk`>u&K^13Dq9KdGBReniTu=`_4P^fizKsqVsf9?sBtCNY%0vS-!-T!=7O3J>mf8q7&?2#9E_-egwijo@ga_!acvT8xj*miB3! z@6#Gjv)#;_NfC6f&Z_Z^g8pQTyzWebanh_q><{KT`FBD@^tkbK)!LuL=)H?;x!m@` z`=lP`kkop%XKVxCVvD>ly;>P&BBAk73Q z0&%F$*-&0T!rBU>%;cDXOctfT$TAOHC~g|xMoX{Zfc@rcytieQDQayU<-1}ipO7?^ zK>kFFxCabm*OwMmeRFe?aY{bi>yGS6q2oN4BD%nJPG9phG9(lUN#%4MSS`=Q^BFBo z785z8Z8zikW-CDtjw#cA?5llw18|AW=p)nr4d{NCoTVTM?`N-g;4tEv#Ywuli>OG| zZoK$sSU_0)m2Uy$PeI23EbGrYrVwyAyrAzn%Z&)rq)^u5u9y@4P{ z&sdyK6iS@~X=t?vm7h8wQ55$h8IfuaCKX7w-OXI1yL{9hK7l+a{&7?gMNy)R4+-TF z5u9|Swu@+b8)4TK)eyUFigjGWu70^{;ChzM|LKnqO%8Y_dL4nkR7v#36?1Fr*BLPT zI!4=(`KsvP z!PQ9YqCA!U!l-#+^NpNs0ktFpurP?ZaFsWVhn|_9Gl}eCh1XGz2qn$f{0oN0X`Qvq zYe{x4`<5L~CUO~0&U}OAI`HZ#9zr0@+?V}{OIsD#m^S*EZ;3_c$pd_HU6vbbKkT%g zhH*1RHrU3KSu5Vj)?-=x*N?weA6xw)v7$Qj5$FnLCK%La18SRsq_eYK z`fjd?Aw?6Huz1E*s2)ZkGNMtPmz6p|f&Hsy%_j9gAIU}h%4ixSP|@)N3Jlr~>r5L<02cd;=E(2euxRI#7G{9(|A z``Hf<2i|LDj}@1x+dAaOlwc~_By^ra%jAdo&f4yagHv6ozt@;STQed!s>JD|~h<)9j{!I^ot!9RNQukj8Q2Ox&GHM2pYYbc@ z#sUi#k|a`+(%6bpQkWfU^IKruh$zE7bZ=XkQ8&6>ac?wNd`8?LSCsJsuaeiU-84C! zu3SU948;Kx|I`<+z9U?7zU61aPj-dK%No+H9{>XO?}HiPb;G;5qoC+9s5N+-XtK?@^kl$}Rm#Q4`$ zrd37&)Nl3O+MtPF12#`0<*v>l6RizFa?nbynvZR<_TX<2SUR0L<%#p_2%DWp@CCbJ z@4Dp8;Ab{D-daoz?GK6+(p={ojpQ> zb*j_0MSeXLTXuTtvf-t27Oq{W#q;cs<*S7g_2slEI>jp&qN7A-|E7RY@!F3=U}Dz= z6K_dkf-?${Nbn)}bWr>d;*_0{l*v7Nzw?~!q)m+W*NE>6lUR!hX0b<+eb0ls@q!f; zhviWM2QCO)W^@M?c!j2qZ&7X6tjTXIvTJ?Tg7Ka8{b{0ut^U5t{1t97Tu=z+dpQ1# zu7a^Z4yqM%pdsquk65A?{!f|moBk5q3OuzL=_z= z{cmlm4-_QdZr&HRqFC=VUeI|{tgzGRE0lg|PNEs^9v%M!wQI!ge-bJg&N)zMZfkD4I4RQ8Ly z$t3Th<(OV+vP3Y>l3W;c#0bZG8m|0u8j``3Fsu{( zsQ#+ESpebhP4-=8Ml{@Gx_9*gN|QIn%fqwh ztdJp}F6Zd0sWsMt1MB!w4G+aw{cNeqJaMkfi3<0@V36dmomlfoRXK<~Du(imJM$1mkyh1e; zCO{0^#=^;v`pL1>w!`F4l6>sU4~@~#ABxw~6?5`QE_Lh3QrJS5XaD$ej!l{l zTcg*;PleN&+B<{$5yV;g){m-?aJ zQHA%|o4((VpOFYrTnzudq&_~`Kv3U($ZnEoNS>Kdr%LgoqdlasFH-R@e4C*IV=Mds zbd`Zt%v75oVy&jvx>j9|0gcxElwy+8`rOBFR(g^`Wb9E3So^&tT*|7cm5#I4zT9|N zV~vC*(7ALPE4&!(2S2zZGFrP{-jX}g1%i{lZQFVB{1$dK6g_$x<8X!AX;Xxf&?o-w zQ+_hqNFsa})SFV3D~YLeus^Wi{jrje=)+ojiylsX8+RY%sd#5pHtCfZm-)2ze?#T4 z1yRevf9Ickl5-n0StFs;7v}i^wWA@y#U6@l`I_@|jq+Q`I=_a>n>;y^2h_aM6N|P> zQ3Reulx#YLeR;){ZG!5yy9qA6l`k&sY}>@-pvz~rqJtA;FP3Cu=Xn?nXLO8LR<2t? zXP48l@hJIP3CQ@YVP}cZlJaQ2IWO1G&c6&R4vMAv@uNzPvnG~zF3RHQp3qGPb#Gd( z?1_2X$rC@H9NnR#YDQ?H^be56*<+%_YZAaOHYw`cs^dK{B`jWRz7RGi3unXKIa{nD zM`(gEBAMm6g1FamOW- zP2@;DfQ}R(1%O|Sk1&*YpHr3DTsoK){akcwgz=v^%jF|ImY+q=FN3W3CY2-`(P6S%_WOo@_yy3Wjr**J&7>rhz&|Y^7-@8E zn=MEfNw`Ro_B=GjUaUk{K}I<%)#WFPEqM|Pi+H5KkWhdXN&SoH+&9{Gctr$m*#{yCncm;x}#5<{9cNW%8`C+6`X!V&j`tqrYo6>dKe>nVM|;D~`1|nj|#egC7*rJ2ok*qTg-L6U&*k#*SHHT4VyznYejfjuL*c7sUGvMF7(@$-e9 z#}sh^M99Akd)hQ0Mn)jt{285h9d2CBWdld@KzEs_Vg1KV;edXqRfj`~Acd>YF{S>(W~&>zPS6UzX)YN z=D(pk_qSG}-WqDUAhBP$(Qr1kG3(-ayTrgZ5E`dI_eEa%i8L2oCT;F9p9wpKX`f#D z2zqIKFQ8v`${N{VIInIvtiL{Oja2ZQ8@BX2f(a)^qIn^?{Zm>(URkJgJE>n%Ka#;= zFqrz~3oB)AQ70~~glgtQJc-DAeCK8OS|B9{-lf*g$tI=%iNFUPI~`t`&;Rn&9?P@u5L;eR$MaY{9Wc`l0>B=LrKZ;qz5jci0Z4^!Npo_G~NYo!;zKc)^yYh5iVm+OEi@AXetY*2Y_GlOr(r_w&2Vf8Ge;=Y0<1K~k_;ms2>$ID1M^ zz)@sj_AA_$4}Ob^_KYoJmC^ zYv=Xz$nM`oUn^uraqZEl3ZsDe#yd$u>h_@v%n`GzD_=vkwX`DK=0x=?B2D${Boz>R zy3F9C@V(uWIqD_{^N*HKIcyEj=^w=R#zrObIM_MfDwC}^vQGnV7ENz`!ss>BM$BmH z%}i-}%UR88rSxq#nSc4rl+t$+o2_o_@dx8Pb`UQS6TL1kBJxSm>*~YrZT^o9lLxOt z&zCR^+Bb-`?ISljd<_8ITvJoCK94}&)Z)`*1>;@fde*d+80dr!M#hw^thVRB!P)Aa zJj$rsFl?Jb=AYFVZ&Gr>#bUD4F?4>+v|3byoKbJC-@bmjXCry*aBt)jbG;miTKDPN z$ePA1`Q*SkP`rp0yicbjcNB;@AFGivw`)4sTJ;I09)y*4nb#>Hi!@{j?e8-_Pr&-_g;W7CB^aPES~Z0-2b(1h{Am zv-=f}#o+85TQ!#WZ(>Z{->S))J}F~bdyX)Ks^zTe(s;tZDw(D+GLh8zKkA8hvJJZPJkV%=csJt)JVlHtak*I?qepJ$J8*1U8RF>o zwW$Vqkz{VW80t5C3Y@U*ZfwosqSl$rzkAoK6lxq16T~%%_G2k$+#H)<-+}s{S-_|c z+qA8!dT#X3B?}AnQefWLr!AoBFi4DKmM{>dv;qULZg6_{-Fej^`i;`vS)~xy)464hW{VG3AJr{aqaeS{3e>^WQEO8*+kM}>BwksVe-N5{d zodt})&t4@4B!jRtzHvF=OvR#udu>|oBG!|uTejgxGiCEX&!_h+L^ixKo%TpGp)^e~ zzGjkwbd&#An$}|$2#h7D665nXIS%zxyRXj6fYpYRfJMVIDd9B^1sT`fm1t`A$REPl z_BQkFE-`Z?tBA?NsZ-_jXkt47o`EN;)O+r4J@Lmul{<99f2 z{nn+WH(L*6z%Fh&5_POhU1XZN0(a1^N4sL(w;eC<<~*;nV61o9Qiu%SzW5~6Lwj`N z0KEQFM0yrK=szGXjazFTaxO}x6ia2>gPY!I3#wI7I>vRj@;z=oU_B-Yz>4-paWtNM z&vz56NXQ?#Z!R3_O%k9nKRk3KDyk?ioxlKLi9S8W7P+AS?NfD>gG;EE&3E&_K?tBT zoOYklo`vdM_Y0N35vyh8jby{#p?lB1dv{ryxSRk%_c}jObY0XA0~!S**}ze^&DBN`Vz41( zt9p+x<#|O2v>0ue_;@q1@=7hyy1hGoDs~KOq{LP8-R21u|8>ffR&R-*sa;y;=F*NSWSGBcUD2U8?fJ({0p## zYsXp@ zrO}8CfuCf+6^$xNm6UUKJgEeJRx3VREBbsX)V?sb{OCb3p0IjZ)f2nKju7Q$s%-YU zI9M=|{RFO2Fi>5Ilm_ozk1M4$x{!6o5qwYS(qLRwW9Fmh#`Px~+;r{tBDTsU9cur~ zzw*~0P#vYV&Ru{WP}QFPLO6eJTO)D#{dF*ezsGki)DdCSgwIzuGqK8pae#h@iv@_@ zr@N&kq)lE)00DSLf;uRo+M4Eezng^i2S}ig#>vI+?{B)72;j`62adc+9?VHE>%T}K z4|R9fqYu(M5L}?lJZ7q;v`s~Hb}_J38@AUTf39CuS4(kwE~7!AsVkiJj-^86xONFz zyG~QMXQ3ujjiqjjWf*08DCI6L>+bAdSzK|&lA?ul!*6zvM7bs;H}<)&f6IBw061Td(zS1X7m)@Z-EwSA0s3R zrSnT|sP(+_e7T*@)Hr?D`E+2ze+ka`M2U+?CTw-e#XgQA$QAbe*#C=bpM9Mig#k_v zG|3tUNH)s5io#MNFAO&57p@sIG1O4MT;s4}ZwRx^a=e6CkJ^{IZAI}aI>(yS6lNA5 z(}#D)C_fepJS@6QrhqBK)tck8U|hD`J%GD5v-QQdtK%H~yo;eEO{xLD0bUGE3jjSh zFb2MVh;EB~HM97FRvO9da;oI9ft_J)DTQ$(R`qZ0DM_nbyl~5O`Ffxl zP=MIKL2R$CIom_5_4aQtE;he#{bLquov%BNd7MDA5}Ij0*`p|im2JtMG$Z&U)=^o=69dP+SpRl$9(_FkXo zr>*-zEVSvF>{-abdSIut(2b0gH}Cw_xjXZg|Li>T!uWvc<#4dhT03rX8%fYVnI+vk zS-Zp#t~M7MH+8?p>fiNWT}t{P60c8sCO4Y|5^@Q5xXsyp14?g(kkiuM@ziy&XBdc^zbmjXxONEhJJK}R#(FWm}$*17NETjT{VsJVE_MUBEYPVl}%xaEU|UQrrYXLY^LwEd^S zFQbXiV7EkF8HDKxvdboY^8ZR2=-V2^>U_DW%YdDcSeG&}$3zw!N_#F*TIXk)YgIDVC@wro%8wCi(bM;M0PJUw;iJ}p1v-CrH1d8gw z!*nhK%p9@7UcIc3tUIGQErVeT!zrb+C{K!qo$*KTI@{P4+bD1Z07msItmbp*SKX)4(nPFs^uoK`f3B} zDeD`Jzu^rKcP_?XE@yNQyc#Pig-###l3g6BF?IjDy*HdwlUT3+h*7os^fGomP;L8F ziD3V^M$e9Jci-yVFgunGMzu-z#7u!PNlwQKtDFiD7hrbTR-uc?U}k4yGq8Klc4mF| zlba~5P-sejS#dQ8a4!ifQ}&ErPYPK2q+~CO7x<+vjs6v`xiVO4WyvxfICx~Uk-?5R z$KTK@pBxyn@9pm0%Qj+7Q<1vlA`olN8Db_!d4ukyU>^Zrb43`^VQQ7>2nx7?{i>!q z+m5tYn>iZ8lzLuhhYnnLh&_1O&O`tsZceR5em^-)oysFJq7`or&2eod<@Au>bxdV7 z)nvkzO-caop1xY^+(Dymm7?n+vfUkHm}l}pNwR>NxmNot3*A{EdDwkLckk87e9sK6 z#E1GCrtNikQoDt9vEYKj@**(upwL7XPwmu8b)%+^ikPi5HwvlG(}P3Nkv=x+=Ocd~9| z1_f;J!hiBc&qw%-&t$MB@Tpjz`LYEOW~g|V-(1B0ckrKy+tuaw1scF0FTrbrpxZ8{ zO~_Cx``+@7oj?@CM zDtQikDp~IG^V}ZX=ZNEkh_M}=kY*Jsys_$;<5X4-zEX6 z{A#KP4a);joT)Q+l`fj;(4X#TiE>0r5z>}TbZ&|}(QofjDbH#pM{6q2JR|BJLc8`y z7&omVQEtmyxza%9Xg))f%Q*&n^kDIIeQSYHAoksWG#P5E@neo)7ziK*+>rvvYu?R` znK9t>1T16wh?$@sMfDtyJBq6Slhm6Rfztk#Y&Syf@wBdSkJ(e@lF3+PRSsc51Azh8 z_8Ew!jHe*gl>splP?Y>} z=UJ_cFPlT-!2wS|D8ch+Kuyc|TkV)mzF?Q+rZk@LV)i;C>HvOJl>^heiBORQ)E^Mq zBS8h{_^KZ(z8Xjur(2G`{4x7FwtPGug&^LXzJh2E$mU=Z-76|#x_yJVAgP(u>J?|= zTh23`nS+hP=vp4ArJ#04U+yYJH#agmq9nF3yA<0qCO@K3Mf=U=A5cZ;>y8PZw=nwN z@&!SCA>*?9piydIrOQ_vP^XHWxTFFZ@I(5-1N0YnjpYnwhb8;}Cj% zk@j`{J#(UIwDSh33fctye9p(zqLc1*=pxMNX@Jr~T1lisO>?!VqLpRcf|G@4d%1FZ za1fP7tAd`G%jMts&{bEK0lTL1m5Cav@)ahyDdf)jI#UlP;$luzv10I?iEs!Q36`^1 zBZTV_u;WVY2=;u2yNYXTX@sAB+V~c!2MbRQ=>jNLh#Qmk6)UxHhb_ss^YgtErFyMxS@PI>jn}x$HxwM3%-@K5?nhA^~NS49Y^F!rV43v7Drwd0SF|o8( zk|#gFbJQ-$P!i}^i572K50~IaHKSn(NSsZ&RnJyTK@drAMKx9<$mWJWNIUi0-K);Y zkM(EgZ~My-p17kmsRg;u^GJ?JCPHDuVeZ~N0EZr4{&Ha*_w?gD_38^l!caBFqw!LI z3+RaFBZ~kbtOS?Mq#=Q66-~y*RUBdTU^iDwQ_t#a0YLaxCR6u;oGaQUl&*36M9(o5 zd&uN3eBwjsQmV#s5{d?hmR2U10KwUpX;F}g#kh$6Na|Ykc$wZB{8wF z)O>(O*&PQX59k|1@Nb77>G5=zT>&0Y`9*Qf2v;{z&ist09E*jy2p-aUm*85!-9|fx z18B)jYZN-x&e5XkL_#SSWiWr`C1#I%SgNhXWm%Y7Acl!m6Z-nAO zOBWbsJwne>E;5Vwv~Swkv<{Fw+~%xDmaC03CLOAoNBXYnYsgv804az5^_|nzt9JP% zgg?QokBNJSE`=75NdxsE=`}M1Z?UVS_9OXd|0=;zYb`4=FDP7R+6eGORxaRW;+HWE z8*6KF!cos!5dw$ZRl+GDeAbVn72Xk{=o!*yTQ(fbc;c`pF+)aCQCvoL6sPHE>Tc(S zKRdzBfkuuOE}JU@QTVxqbiBtA)8kY*;B|rCRbU)bsS|FwG)AD~VaFIDgbo;jFAhNm zXGc~Q1aD?LrFjdvy;Ga)FyBqi@9U1L7g+BLaP~ZQ0{fdg=J@{dI?}GHsSnz2i|{!e zxAa;YCxz1yQFa-PJs=={M@d4W@(M#Jk|pH)6alSttzr+4l#`Mv9`QS#E>PsAT`%~{ zKlmii-_B9dGz^o^C=YVx1Z`xvR@dIpL2bDCfiI;1H9rpxj#M%JcKGoLp?E#~0{ru} z)*yz6IO1j?G^=ydwTUcmHA`3cUa!xNA@I{U9~7p%$%tUAJE>u+cTH@DdQ#*NfHcsN zq-i<#_`i^%){-{HPO4?bxOtClx6kDy^aHYsvi@ts4vsbQ5?%%JKD&ksD7@Wba5V*? z0G{@}lp_NdsZQQ58M z9M?M+bM%g8Hq>9Qvlk6iBljBo*=VPfWgtL! z%b7xkGbGm}43SsPx`rN_Rw~bh{w!X9V}z}RuPCirmC87Ev@QNPQ%Ysy45tAg{Aa|a zLBWqYFLKBwbq+}Z*|MU;OpTfm1%NPlC2~l zGImpgr$h@Jwkx~~rV`Fa&y35xnQ@5p?#c!;mk7YQ^G2BZ+td&o8P%WCW!x3`cU!*v zhq$?xI!L!u43xWTk#?k2h{A2rE&CiaO!%H`Yz}1?gj=BY(0`fgqUhMt!kK8=ep{`x z$IwUbCB)j&k=$5z`VlLnvYY4uJqBU;;M}C$Cm(o4+GL*koBg+=E9A8A<-K9syK-cS z_MvVm?nNBc>43$OKK<9uj@G8`yVkH2>Ng}simtRdW5wcLqZj{ai>rNI;CDyLaLM|K zr5PthRQ>6bcY0t}?pwQM*HQ1lN}TWYI2hjabzAt)nL?#TKvTNfc{dtC43cF*^_tpp zFHW}K&5Y3!t1xQ3%QsEoU1R+eb3Sq9mCpuBr!hcC0hTs;+K98sgU<@O%fOj+3;_n1 zy?9&Bm6Vny;Co`@>+4&&XN#QW7%zvFrzk27jog2e2GO(AQVB6P&^KmLvb095Mu=(G z7gxE4)TEU)sNhV|0e*?<8*IUeM-pj=lt(SaLH8IFS6-8-+7zlHYAotcI$f_x;<;{m_Ts8I|BWE>_Z> z&9K3cA{ofO_QG83#e2^VCR^?0DRy7^rNWV4ajJr!HG#?6aT#f!XS zZ?K$BEcxg!6@|xeA_F`#-A~h%jx!a>Oi2QcH{vi50Cmmh#kI3fxgq7{$7@3_M=VXw z1&n)q3gYwwaJ3UgKycTMEyfBA0_)vMgA~BZ4GA&x*Ni2cJE>v|{*V!awO1x|9a6IH zYZWkwxFRkoYsN{a*lnM0AeM!rJ3qAnowtJuTUd)TL{{kjp9PR5%C7hhoJm7FCt&Hb zI6QyNn+5`K0Qh;eQf*zQd7hGFu6uy)&D|kY68e!dAn$bi!G;@YVC_8ubO4W2pw`ys zG_`MF&X+Q9uNOTOX?uY-waCa+FbIlX$}bQ&Ez?N%GKwnX*7nH(rqE7Vi^wsgVdR%y z)C-*GzKrCM%{^K zczqsN-jUsGPO=y=8+ca@8zR#C?&-hP`b2Ul{ zm}ZRCbTK{Tv;#}%IP7!!xzrNXmiHeFC_0(8`)E$&c+hF9!FZZJQPh7?nYbHDL#Iz{ zGe=dOgV4B%Gf>JkLFrUSsq%_i`S+ge8<)^*y^+K1#jo%Y;y;t=2`$Je2e*&)$oIrr z8PH;K%3%T%9Cl&DZme6fewq#x{z7OCxa^{}88^EX^z5gdi8uEg|Ahg@le`R_I+Xqtf`n>t~nCLuI0blowDfxc6xh3w-r!$@wuI-|Dy2`LN z+cgPbE6E-v_Ht_Cla88mdcnV3`*%LC^m7HrHHnYp^3>;gRFeZWqgYYW4WM#5_cyqu z_32HUMYR8oR(+au$OccWbFJfFK2**cN!7h^LC$erv6Ws49YL}BQAZN4&#kfw6=<4Xw*c7A9!76cS({ZJkdXai7PW&{vEbl$ug5*5&@ zV_pSH-RZRBy(PV8hlKxx@rib~>B~~jz=^%=Zn7Un3;ySzCeqdP1@(}e2eLVHpeM#0 zJ;aDuX|9iCNreMVQeDOVt>P5 z>+-JvZ&5@_0_J`->=5#J$?sQP{1x<7V%y%;=}zCHSv#c|A;~Cqxp5q-VZu4HDj7Bo zv>A%wr5Q-_s>f~ca@4x{ibps*WcmikbDGlBt-y1Hv_ z5Jm@IQh(|j^%GtEE~hORdUc4tCl73TvexrX1)C{GTePzAC^LZzPPJVGotStQ6#+1g zqEYT`4zwnT;k9UgUu@?YYIb0_=;6OXjA_Q;Put(0a_fPaFLB2Mi39#;eUEcf*;1ZzDz*6#SkN54W@a{7Vu1-)Gj<8!ikK3NnU!7om`#&O9ZW-k46t0wR=SXw`#5X707DW6$7zNN8T zSy3dBsgQbJbm!X^Ie@W!j#N3EYRQf2UXm&BjShv?VY7oF{@DponMv_k`)W}TL-oX4 zDHcdpEM#zRRVUFcyS_47>oZf&pf#L(-hKEqC8V+1=Nxt!q;wHv9SGe)Ms|;DO3KO_ zHs0*PrKmQh%5AR8n2}6wJCC<*tD~hs8^;;4ZVjm*41?VPJ7RjCmMx5LRtm2D6ZKgR zth(Hb^v`Ag2E9m=^GI1iOozRTjsy2JseGkVICo+>a*<^dU%@*L1*se*WHpHkYFJynd!ME^g%-{%6R;(f5sylcWHwBxo5w zvHt!BP@@4?#UF5v-qG>KfD|?M22-h^X{WxEeGv%*vO>9@~}Y8{4wl zrUgn@$eT6}n2dC;t8CaB-w-DA)%!^7)YAxu==&Bu_0~Vy9B;bY7}n;JOPyVJ=R*mO z;FnTlv)3D*DKr5$rDJHd3>rW#zj1tj+c6CVaT5VeSgO8Kl91&@sWw(+IGYSrxhXwF zai8X}vr`RjHj(_d==9%Wj#*Ed;o}EF=~gX*(nrFO`CI7t!N#xTi6*W5D+k#@>Qq(` z0Agk#@_Jpub|{QeNet6Fx-u?9(#+>)s@W5iVG(mahz&5h(V-3;^b&g~1?vVWfH4N5Y9%x-|c1h!- z;UnjAv+1Cxn5+IR&pn}jyPH;oG}l$|?WmQFK7>rgDbm@}&1iAgGjMQq)zWJ_KeuJy zk;Nb-lK0QVdeYW8d;6}EBAQ;^qeEsxvHQlBUF@S4`#)$wp_)%#cD>ojWrw`Ti~y(W zv}F!7Zmg|W^54ubA9sUi$YB>sK%k6mG|+}+&C1XRDnF8x9ID;HcSI})m!@1zimgl-sg01&dF94A?{p}cv(1IVJiB&+UKD{5H`sZcUMuu+Ql*Z>X;)^!ewW zjMLhqinx(=?;bt6yw6$aa{iqI#`K=#;}YWp-ifUCvAfThwvFwp+4Sf$6#Ysg=mZL@ zvy8u_E!F?R73f99OC3Z>br7VvQD^yLBFDwx2E%Ij!4am$!+~>6Vl@w$jo<*Ra#F}c zn8dPlXArWms#LZ#zLg-VBZEcaIS5_n6&=V^zT^2V`n$)q>dr5h|J7QI-o$Q2=q%56 zP$ygTk!O~ROrEp0g}B?poM3|U0*qE>G0?~B%NxM$H_sE!BT)0V!d_X9*^2+wyXJpU zfV2EG|9AeohX02>%Dn{Gm?Hb$3yMOybYoHNwB7=@pOg+Vu11|#P;Bqa_u{Q>@$pwR zCF4OEUdt~=#=HmDhjJWbtzKN#(e!ESZ|EIo?c|N)b2P! zEF9dZJzj6cWBhj@saoz)7Y)lE3<1Yd9~9?tp%Kam7En8n(wUH3YkP;{S*bO*h!TcA zKYy)ReQ$=8<%YOZ!^jta5P|TRm(4HZ>N)`&$tv4X$Or8|yE9u^xNPN^Ji{z3vd| zHz5d`G}iZgO|0wH49_=&CxSO>j}iN8i)o z+0&Y~>Wy)y@u|`vn_8xfX@~yLr@GpJTDy|FwsEg4P$mY`Khe!SmqS^IH54xXzYJ0s z4?(h*oks=|_$e2zQ~l18m#dL{rMWt=2AiE*92^w2LinSZ`+Z$1SR=J9NfE8a z6X0Dg$H;nT5y!uz!~(fFkHN=M)*4Z6TCB7&nXK|5`%<@)q^o%W8&SQ9UDY?v0*x)B z?x#Z9)#C_a`j4ma4GDBXo*bgKq&w{@SGzhV0MSd>vjWXIp3GQ6>kXwgKCQ_3rD-LX zAXEK6P}uf*S+P5vW_}AlvhL}6o({b2L$SowH78KsNeImDUNHNNz0`5H7i3g*+v+x0jfvty zkPR!E8Wlvy%d=+O>}4P47FAy%gz#7AYXwKs3-QDm>Z(jXc#|BE5_)!VfPuGL zLSRp^j2ADq#?Kh)ruHJC`%CFzp#V-9Q6qohhBIB&tEY0l zj@hEN(}L$u<+u4Kosi%Ogbz^alv4!Ev{kM6R1xCGh50^$`raEXTu0#No^6 zgKP2!w3pqzyTh|>`D;(VgJLxSLo`jQ^fzec-L&9wBY>P(jYmHFy*X#sW$Ok>w)9$M zr(NqC;?fA_SyeWMOSMTbn@GAuF4f4-xsKg+ADMwSuJu44p^6}a^qUaI&*JvP_GqH$ zjnt`}uf2Z%>Lx4xbrCDl;iv zs>Z=dse%@8Z1eq-OYr8{cLgo2`2_SFn;QLB0foOb2}IkE%R$nL5al;WPMbQ6V`j|2 zy3N~HeF@7J$=bdvcV?L%UXib0&wW47Dejck5P4yy_m4hAu%m`MSVA_VKZ>^4uDB@E zIRlvcBC80Uzp->Fa%5?4 zSwy{ggLRILHC8k+cnZ^~&i_tu;;-yDGUsH!ruXTTvDJscA4yNc2K)rP-zfxW%+1q1 z(Wdzvk@qsIdPiraWn-e%?rWN9^MGiZ=aX=y$qA}Ag%EtOIP(-mnN9+a&(*+B=7Vx* z-EKS^a$j{LR0OmQ=%{3n9EK66w*}@}QmJ1dJ1X0;!R~e0hmZzeB(!Wa+-R9#K`roZ zM||H~uJgRKv|jZZJ6BQ99vb%=YAxCjvMb^94~rMl>2iUK{%v%gf_xwA3D#y7XZ3CF zO}kx=T|Q;)``^ld`CPg_jP14DXSMl*$Tp}lKf2x+o*~OMu@50O;UU-o>fm^Vru`JFxk3BA(pjn8>Muxw z0@O_m=6y3hrq)DEPG|*oy6%8Nq$@hqgd@+^Pw9&g%~uQU8n52tPYXi*;~4>sr^!gV zPj1_MWVq1!xGC6nICnW(&t33}rwP#LlZa&BU_`L5wz4DXLE$OtUHBz`9#KT75>(pI$WPV8w}=(L785kSNOhw<9RQZ zd)E@9Dpt6kidB2Yv5Y8KOSNzyf7)m&+M2GY8_P&|u6zta68a98h4;~vy42JH1umn-OV%3p0wZgfnRZv2+#S^fDZ;1xFp@Pz#YgTpu#0wo?9Nfi^m_Q@#^aoMx`Bkj-6cR8 zFqu*2c_ky+y?dcHzUrAN8jyS{r(*um5|p<(qIcWBk5T8)+dC5fei%9jm=%}HDbxrA1UpKzbobE7BlEv!FJc78-9=)nx_2>3U7`^Lr_z7dk zdL)?Y<1P(o@P_R;;{C3Roi$TBD2 zZ%7oqasGQx6nPRYF;GVtom8PO!~6zK_}4LDKuXshZ?!buvOsQ(^u%fv%kw5wefNvV zM90BL(}FKDT|Qpb*Y=*(?Zv1w6*+$~U;C^@= z(}r@SZ){J)SNCj?^URc;No$)IA9{?}YSfN`ugZuX?t3G7101 zY+h=BMzs1>8*wArRx+g+)SBFIx{M$ox3*}g3EC|#BY2s1hPncPi+5{B`RgCkRd+4#DWM$b?&pN92hkF%{ruys|9aQK)|j6Kql*EK}?>Los)Q(n&-PrXVZ zgE&k#oQ^@cz%$RCW0q1| zMUytauyNi5rm;6@(wJd*bDaai&0Xt&cglAo(a{pT9ne)1k>ff3KgqE?zxLjNV#Qq3 zm2#oS{t?dV2SkmdnE26BaSyHXy^`X~kT7>rInFPhDsepyvwnpk)b@ArOlLK8 zK6PiV7LH{ZQEy8}+SLmE`JlYeeEY86w5aT$TZengH+THxF?J(2t})c}nlO4?#*}zj z#xJK$*)GS{vj~E(yO4&~ESlO48wyz%@I?;B82|>%O)rCBl52$ZVLMJD&4eQf;Nma< zU(PclJy||7r`Jl28b=ag%fDk^q8?HvStNce7B$mXW>je>skK<9KLj+G*4cXph=k(S z>xIjp#)2=+VA|4?j;UI<*!WJ{5P46l)7fPy zcg|N0zs-FMuxWiBa8m@JsS&Ip`|(^OQ)W8Dey|P$4?9ad{qG3&&EcKXdVxR(fg?A0meSo_PTr{!^f_8w zbd$fv0G9q{(0pA<1+V(vN(EC@i5V`pcfF=l_= zRA1p|3)_BuknXsx93;ak?9mthm4(H!_j{~m#&|SOI*VUla~1?Yt1r`4LY6K&c;Kw& z+g_qlzWKI&)4gpF(H|jxq_km>de|MB zZ||lJoq2lJ(2#`?zn3rBz!zsoJ%UeCw$h^XlYSv=nx2=Glw=P@9bFHUvXqI-&&iPj z(N9r1C$v;UiK)jOvR$Qh@Bub6nt7tI{j^`?cXvuSZ+&PmxB4&6Au-ExmATp zjSlad2|jg}whdofvdTfXn}`{&6ZLpD1%1R?=Yq=o_X`rZI-)N7temu!`DG&g+|(BC zEX2TiAoviLl)SKB4TGQ)lL^<1a?JesTb2|J|C#~y$B)hAlJrS?>RR(Y z`t$V4l55jn5`a98v>{(Cm{K~tc*h`aZRIYU*eSP#H5}vyUDS_9+9;wpTN7OJ^k6~O z9h84$hdo1dimQ86`vvW?rGSb1$t}^>+XG(juGBR>vU~EQ3sJx{v!f&m1!yvD7!r1I zTph38Vnk=-M>0$it$7)kkCi+co=)>0+ww~4Oahv|rKcu0j<7Oa2F}zkiR1gp$=##$ zE*>Auy`=1Ofj1lBgx?>1-2z(^7~|A~&tUWOF`bqFP5v;no9-N{e(#3uT=D}(JBJOl z$)A09=bEOtA_F74hpzwxBipj1np)ddjPM4@m<%vwqx=uxi*k{pafHZ8gXblGs(N_9 zs!N}$*gaW=KQk9Ej{{*2Z$MvdtvUh+M~?l5|6w68B?cgMF{mdCdU}~T2*B>iV=rxh zlH$FS?|VaS*M~YfevdY&!ByCP!~RI|DZ4Z%-$#tqMg-!d9)iu(3b7tux7^3~B%o3u z&_@ljc$2ZI`dxPH8MC6vEWv5x0W&a{o(>Yul>+;c|2at4cCi3&4Zr?9F=tPqwv?`H zF@6Uvp^7ByA9`zDU}?v(0lyH25$Z7pPMZas?n9=gon=wpGp&CiSn_32_^O{tJcDlB z%qEKo+;Zt)TBkK(b;Lu{VpffHq{RYGDTMH-+uYwOCGY3TV!2M z_Li|V=W+A3p~`mS=_e|p$4#-yl9qq_0$%Kd^?AjMZ@SM03V3R`Njm18Xt6?G*Un;E z6Q-4IW(WZ$GM4;g`=wtK{PromyR*!eL+cJXyRH(LD)2e|ZwP z-4#Yh3NX~=&ODOB^EOJd6in#eXDRp@w?P1fOb8eTua|daOe>cxEw741oG$;*M~cY5 z_hm|+SqUz>`1cn9b-R**pZ73U{`b1bEA}C@Lw`y?aL%or>mJgVYKkKb>IG8gz5RX8 zyl!+0gOa4II!I~OEFn|<3j0H=bu_yX!So zN|gpzrO{MW?}dpDSGR}wY?j9dy-KG0oarNu-G3a!$#Hw&F86Wx;2r8)IT{&Vk1ps$+G*A$Jxm> zGtf*vXWg#;*L>Ji{h+U9&2YWvVXpc6h^>j9(;X}5g77KnIK^6c>_~xBJ-JQBOe4-#aKSzaUU}FMWQk(n#5G~GYU`G)n(**9^H_J zuWfFVvZou9L5z#G)7wly`SJ%7;~yV$;IJ80&y(d3vB933K;~qcwrl6HU&QnF1l;Ze z$3wwuB8>`5u-rA_c$uBep4DX(TA@LoTUFadeHf1R9citjYh8;Cjs-q;)av{`wd|v9J15x zngVXwowppPfr)G3aKu2=rF_~tA}lo(2bV!8tI?*tyjl`cB?w|<(WS8t*CuW6|1_ue zGDSZ>1F?)#H&Yb}rkcJr)G^?28qa8is<#Q?M~x?-wme7uc2-YR0So@!(}vVmE9A3X zGXBf29?yFByc4OsZLjlHWk_C*)Uek0FoAP3NE}WG_g~Ui!xZ|R%B1g|xHAkmet80_{l+Yre5i~q6<+)x5XAHM zT>HjqiW7O+=hHqOOv4Ys>61)ruI=}ss$P~hLaOGx83w=|KfpwKy0>J0fu?|lM z3VF#zDBCzvQ{@ti;Q`@iRSh6bFU4Q^ZHKOUd0|I9{@P$20!7KXCA6ho6mDB&a$4T9 zQC&r|$aatahS{v~lp=aA_OwCtI838J5`B7sAuiz;)Xk?=IrD(m)c8V+WX>) zk(M1-B2K$NUdn&0rH(ra4#etJ3D^k1l!osz?f^&BFGJ0}ze)k)1Q(H(XC>==Xq!-8 z`=d|y=GpcG0i~B#wwQcw?sFya+jA!fKN!NOd!D{J!g;iULIPTJcn)l0OW>=U)M?UJ zh<=7Mngb7gxbEK`R0SdSh>*t0zvs|b1pOA{-z?7rQ27Vgw>ARy@5?~Gl+{N>IzIuP zh6gc^=;d+0T#%4idY}`~5xbQ0h>zp7o%GUBkI(Wrj~U@-F=>&`aNQcH!S@D6$y>z! zU%U7sMQu9+nS4f_L>p2%)Vm%e|!FA>UFv)exNIG%(*&_jqh;OxuIaL!wYu*!7H~ zrH>Fae!uNr>F1L!fZutf;7^UlgBKPDg;`z0_|Su1WJvyvW{Y9&MNVilX1cD*lsP^JdMcpkmXvD}&I@~$2kO2;B4L9G{ z81PGBi5KNq(Y@TX*KPTt!`3E})CUh)o;mXMs6`fBeCJy6E`rfy7SEBi0kFm`@0$!b zl8Tzth&rCA(#c_i6?d>L>4DCkss(IK{Fmrq(86!^o;v|9&dHtGz%G*PVG+h1xFoJC z(VIB{i6B{JN%}bjwjT&Z4l~rPB3Kd3ly#|L=sxP1SE4f~Yq2qSyKdR@7<;%N*E*-q z-w;9e$ka4l*2SMHR+!Y>`4Ev4&(#s{099T*7}<^J_|oj;Tt7(fLd;)W^evWAcTRf( zj(_hQ_E?_!{VI!LOqcC{VYOa#>W)QkCB3u}ZFu9Vg3jb4*_3#N1mf3gm)f=_H;=RH zb044?kW00WV-^RSCYA0uCqd<8Oat+4@PQuf4eRNow7t1(n~VKq6JB;x$Uhpxsx(xH z)Z&lumPFPq6olg-4qoe^ecv|I;hqVAjV*2Cd;T5+`Dh2NuiV zArI_miqCe_P$*eH=~_h84l=}zRt_g0HG!VyeNd-z2Au78$IdRN+NqDc)I3;%YRs88 z0B-y_&)ZR6AIb8o-hBPD8%ZF$0k+}Q*u3@FjC*YLX{NDdecN@Q<j!zJP$Kr_x6(J#l-NWL^n$Q0?4!;fZcnU2%u1pWXvi&hC$f)#*o#TXo74`uZ zLYqY=_wgT{3H%92OIj9iUJ}xz`m8;Ca2F~URR3^m%qZ@+&i5OB85ChpmgT2%utuSnd)?AOBfDYvgTh|40X}HNUqXPa=2h-3-3A;u@d`+6iR# z6%HuT<9Ug8whpJ)y+$(qYzc8}cVgn^lFiVFP9^+aG9yHNZ}>gf3Ax$$m$!eKHIq3y z2&rl1j3>skZ9kdcYAzNBY9{l0yE%Tt=(aFSbAsr&41}@MyocnT#4q%uDbBjC2X<@q z_!_%9Bx+1OqOkOSALVwpJp(<-A_bvm?B|AYs8TvUI-8Kr!2zWWH1IBb*xFph6`G$@ zE)_0Z-q?4$`yi0YzxTL-(h~6kI^JjZH#+*(`fRU@Zyky7Swxe4L-UT}LJ3qvaCRf3 zpx!T^TsiHmv7Q>B2p69_TT@_IiJStg4l)Y@&STd#2PO3QE|a67gB*{;S>**y6AA>I z%(VSAD|iFNTK}M5z{QoBikDUHAW>(t{aXow=I+o2j!&=`n}VZ6`<;sPubw;WF6>`YwX_1;8No7@83HH$z zqPIM$)GC*|cc8%7j&VWR$M|8irdw%z=W0)b-Vxc7@;o@^e4`F#=i~K2k_{P{bRKjj zkm?E8dRX`$TsEIISVh?$d1}=<)<_PSnpJ+M95@!#d!-TozP*ZTIaPUlzt<ojO_2 znVMoE96S)aUz-=Qzt>=|CE1`l;(Go-LnUCpuRF?P>D%m&k17&ORio$o-GZe180+vn zjI}4U{fvU`>EWQGGo2wxqtRxFJov&T(Z!9e#l*-FU>-=Ek%+HvTnlw?lm4QbQKSa9s6I8sJ@Fs^TGC&q~hwWE#676sQz1HGLQMghC^J zB-gp47@ci()xd1+p-t$zI#%6fquL#u&aeWX317S}A@_cs6V>90E~ z?3grn^g87ky`i%A4z1pHK@{lW7HLixD-c3gHQeQC*O zN9XG>=&~`Kya*pKiX0A4uq(k~xzy+)s^Mq;epFyyUixM~i>ATRAp2vF0m1lP?=(_N zG$tLDVdsWE>mUb<*!w#Eq*76`={Yql1VeMv?(=1h&cI0K2BPAS#k1a-sytV|BY|5H zX|u!oJx|>Gj(zj{iimuqTyC2jGEiagh=)BeJ|sfjG|F?-7*GmWQanHt#vPz(iZ&N} zcsL#JQ$Wr^48ymf^r_z}U!fbpc{H1)g{$6r9h2~IW>JKvB7k9hC^UBEO}xRE*Q2+q zyrd1y36-mg{(15zG5exA`luX>{jdH055CCkR|u}`(n@2O($?}cmzI!c5yi?1Ll16p z4RWCGg8d_Q4hagp1!?o7!K!Oa_@V>y@q|SPWvgn`=72 zN&g>rR4*7knS8vh@Wkvk`fqI^sje11(~PXs=$8Ti+F62wZ{G;*kfK zq=L?Lhmn%DJDSz zWiDc!_<-st(x|JM{DfGTI-aFZ)A!F1cAPs~5B-GW9$A{*bZKrU8$bgierobUF2ek! zwO8wsf%K|#dfnb&_&FrPg>?SxTCQ4B!Ikkq0`l|0bW>Ol=yrCc@|V@a>kC1G0Cu2f ziVyDAfx<5Hmk_nY{IIdwPg|IX5*fLwWAs4f(RMJFLV4>7p5q2xD}hEK$-bB zleo(^{LbEPP0nBJ8S0UZHX$n>Ned@W5Pa3Osa=1)K{A`u&1$*`=**4>PLW_?ndECtsw0UVV|rdN(L5BS7XUb79Nex(h`J6?D{eZsPQeZ*WAalPBLq(|{j#L;p?zXGIb#Mj=C z0g|ny24I6r(4J!XM?ESv2(6>ox*;3(fU_&Ofh?l6iCFxjr2V4U0p2&ulIVDXnM*~t zkC#`jL%(#wp~Z)diqj6<&e z2mC$Pb#R6r1HBJxN*EEZ%4$+Nv~N=1XAlIH?ep;0Zf=#-KK9)-It?Y;3kH`s@QhFl zMKLBDhl>7#s=YttHD8NB_9x6F4$?ZuLzsqGB=Z7#hB&NRItISKB$q#Zvk)& zsev4mk$6as>BD~YjO5JyB8-#(Jg_@I-ycaQlNd(sbvi9)J!0W}X~KNbviZgVt3(AJ z^R!fMFbS+dNthnCRnLB2TOLSkD2QhGwk>S73^@HhVdpU z?VB}23D7jz?boFxb@R7zk5x*y`Aj0Z6M6p%m_TzRaG-a7`-V7^Uxg?v(5ClPVr68x z(%=Wj{cCqaf*TJi3xM?Hhac^p#p4?hw(*E-y^~x~oS-PI4$c>{k1MBsug+i}6epj^P9Q=H31 z+7q0ePF_o6%20JRcLGmV>?|3T1g}Xr4pTIJ9mW~W!a>jo0^NbM9z9e&|C^0V!;vw| zInoETwO;SoWLU@rs$|$&mNkOT>p2=3cdoYExwEq|%Ps>dVT>FLLbnKl*KzMpvMbEn z>NStw8Bl!rzek09{^`bdW1#OrwGbQ~PMaC>g(axO9wAnRnCuGp??9S^zb14Wja4xR zRH*xhbV!+3C=nKa-P)Ma6^R!!W$^qHW{IDuzvO_DcIfmgcc2TG6ZG5c1S2ZuWF*Ah z*8fq(HA1{inC({CX@Ff!&I2u@g?}et*ZB0D4}M4gwq-^_}kw059#$XW8#(N z>0rTm$s-a9cE9O*p3_pmH(FCglhzV`htMRJf=Z=F8!8eM4IpxOpFJcZe`Mf@8DGDM zY@vBjcB#>X%kWG~KbjqB`>+O&T5h>AGf1)i)GFqReXfhNhf0|seQ{C3e7}Uhs2YVv zT8qjFHGLsRg>(*a#KZV9q^&cm3lI>_N*byyQ4xkYh@c1D z^XFwD&5#lK7r0EX=nT*YAy=*RS#2HM!#Sx4$_Q+iGW(f>kR`qsGxRy)CDbsG@wF+( zJOmCiOeQIK@ucr@tN$C~DPt%g#tlYcNvX=Ho&BDM7wzSDPoR(H-VR$&1c`de&n5*L zbIy4c8LvIu$k30F3-vrUE+`89Exr97nt`lW9xpZxRQ!TWY2B(;la1-KbyfFnqIR=n z{vJJU`o=J1V26rHvx}rgz9w3GbJ8pJ9JdOZ<;1GxUH>bx^<aCi(~R@x#t1WP&23DOl@W1D@8d@Z*SY(Rm4#wA|0^u z2G%@R_Q|TL?1NM+n=f(XWND+11vA8pT zS}MwPTGESGBuFH|OF4nvo^25?-oz_=)6CbCGvPk?@6}35Rhrn4QNBl{0mzSWgehQ) z3*e^msqF7>G7b^PZCD09CJL0b{u`(iJhr04TW926`nrO;>c7Px=9&U)B8JRvPn3jW z%f-&--zld=I~clVW9{o&T))EG%G;{W_#Q`t1DW5*K8BSO{DFxK(`9D(AsCr7<2DQAPjVVrl1+Sz1J(#^8 zgh&VYYj6wLWTj~Tofx{Get$4s>CiI#Wm)t%iK#Brhv;VgK~`1Qj*%TEiEbq>dDhoC z@DCc=7AlC!PmiAwlncW(KUS4Tc5eo6FG{R@2V+ETzJ6ttQFSVS#x7QZUD+s)d7>& zr$R@zrmB@AhEjR|P1dzj`H-(LJ~86U;T~e_Zfb%4&iE{z?%mE<2!*Eg)>_BTDE(V+ z_c*OT=yg;9U-l*=qDo>IB3rt$2f5Ism7){^$!FwUcs_0KZ?4UQVCHG=lt7lTK%Fh7{N-TH4eIeep0KjQLs%x5JG^X$ zRtWnZly`-QrcJZa*FkO1MZntTv|$xY8qUuhxLIUmjeAwg6BQT*#j(`n6U(#}Q~*hq zjx*2LU31nCk2y3c#$sbYx6hMI`NyB@7z5w8>ZJ%Dx1s>_wcN*o6W38mgY`a&PrI^C z->qjwZ4;7nsjn8n%eK=Eg2L8IWI-PS9XD>8A?`o|W_|w5wC3}Wtp`?H&JBhF{Lk)B zP+UF;i}zUcxGh!!=TE#B2j2)pbyiz?-@959At;B&?Q6PW#~Mi3ox_3g{7M<&>cmw~ zx3eK!Jk?KRMdzl2n4S+MzN#4{oGm4n-*`RM<-n(A@|ZI4-GT6X(84cZ@WyL-_G){c z$PxVwMj*|7;NDLLO)@qic3=@4e7@-1sl@*&^_9@$+QAN?pMs@AhFz(I^v>j-@91#9 z`ASQka+=htDVUKwmRu0tKwXaG!$aRKr;SYulbmXXLEs(83ni>ZaI`DG7rj5 zZe1UG7$6P}SB@6CK>D7HlA$Gb(#1ZLU}c5hY=xcUihx;?-(>PQ#+=T{nHSni2ng7h zS7{kgmO6JPpJ0p@ewEeY$7Q+YN)guf;L`rmBKw>h&Q=jzqj|ra}XV>q@RAJ#+a=1 z8`J2-T+LLNhPM1DPl{r^SHE|vmIwc4D+T7oKdr8$&6C_bKJKQ1+#aSmahlU>W#H&drPG0!QlNp3Pbi;H-Sm)5HF(P zs&sch6dK$@6891Gs21Y?SVsGTJmivJBm34C4;SD7>fx`$kAOoReWS)Yl{v=0?|$QI zIpX<8gX_YYKgjA|k+D5zy~C7?qJIoIDlf}lKdqHX@+^yDvSSaP`5l-M4gJ&BKhj6i zTHANUiXXK0=|6ZEOjLvxMp+?|&nAKoep>c^4`6RE(p~y=(jydrNrvxTuhn)7Oc6uHiUAoLq zlC@#y&vRxJO`Y~HZ+Ud@xz^MF9R|qei3R5eji`nNKlBz)T1W(Ni?p_5F^3*7wP;mXcTiZ;dL7S2nJ`=4gJ?Wq#fB^P<>ssz}w zopyv!X*nxD1_o{elEdauNy6^DS626Z{YO8qzhh~;VeVzXwl+|T>4nqJPp6T?e;{A9 z`!7Fi;-_DL)qVD!sT~FBvSsFHXTP{bowGNUmTR^9| zW_@TQj{Flg^6J=!i4BK_xp{$2o~4_ud;+Px#Y6jNp!b8^}J?5U1FgFB(kei zn%v=LE;{_UwFqC2vJr}n2;Wa7bP`ksX2|}(oZAZCq%7(Jhh(B|gvx1Y+R#Sfq0LnA zqSiB7@?L%-x^?t)F9>zL@)UnLL2B53Qr=NpH7W7<5k_8$8&aCgnO#3Df0770lR3H5 z7&`DRD&`kZ2Gq*UIN1odL~9183{lBOLO+VxOSQm5^qXR5&DHML5aa?(2! z`^owq%t=WIwXiKc$JZ5Nn!L^bv%OX~S7hDx6jn%9UM7HZ6C5M*O86Mdaro}x)A%9+ zA2Z@l9T>Vd@pI|GNrtwKoehn6GSAj=j8|IP*ndMYl(V^Gn)gMDj%yfBGcUc39-R>z z;Y(-{_}%rSL*f&D$4z53WCvS;eE@9otgsOoIoz0m9E&S435QIfA~F^@--xpx45#>7 zm(KC>qkih)S4U$jgtcpZWRqygX+Oy>pwkOixZPq~kf4#Xs3{drS~FaxLL?oE#YrQJ zZ8>clnM`N5&*EJGSQ7v?SBvW^SVg)~ex!}-y=i|Cp>=gAFeDvQ1O;b zYJ9@31AeG{UFB;NruD|2!R;0P1Zl!|D3sp{% zSyFiqw#@%>{wnK(9Bb>M36lqEO-WQ}#08Z933+um4Zc4x+o!g|{Qt86$Yp!EAA*b$ zl<+B42Hm6a9G;4KVxH{Dl1WBZBAcCc4j_Qvi)8I+(~ej3ar=tE=4tzoQ3-Gn41Kva zU#Hmo(2KeHV0zg_RfSJ5Dz=HNSc){u&u?rk9WH1l&2A&+DNiW`4NzhT?=bjgxS=DB zpD=2AUGo@Yez6q7Q<#bn+ni>_1|og~huG{90{#u;S+s7Ib%1M)dz;Nu1;=NM#$Sj} z(2Y-28357>Z}~qT?72#-L!!(g@;*aZJaXkvM65PlYdL*Ta|56V%$B29^;NlwqIIoi zZbutjSZEf&$o-Q&n%iFQ9SZ9I{1524u#%QlsCP5(s8~q)-F}6PmPLEjeiQlUcZOvx z@?^ROP@jD7KU)!PWpi4Ysf}cTD)=RBw*e%%H@;zk^43-Cly}*r)Pf{ z0ISU80U*l&1bFfjvx`(O8b6&_9TT^Xps{maS3-?4+215T;htPzmsxrz{_US6R$c+` z*9VLA;5*YO6WgS6O@rBRkI3LmfH~cdl>CmA&IO2fwM+OOr9Xfofv@FvvRa3Ve~^v8 z4NUbU5Ws@75A{QQn+p34^8=#UTsn)(6T5u=AaC^<60&A9(Lc#{zdWqze0|PNnvZ?k zC2!b5XfqCGgjq910vt|=BF6^dl|)4@3xkNNhIv|^`i$HZXa1Xh;)Qy;vb*m)v~^!W znOB*J;KLrGOYn-0r}E&bZh=mdU!_Q2fAnL(TJuMi`AYyle-=?7_A-Jpws;ywaKUfD zC1FcrWGt-T3Cjh$N9#YC-!wqW%~Ks)_f{UaZbFFzkW#sCaApYiOe?44K=A=)IRE|F z?D!A;c&HwSpf=GH@}n_lznu{ZasRiS$}4Mrg}uUbiA+z#z8w}I{6H{fTBaEg5FKA7 zsin=x)DGQx3uA7Cn**blsfZ!Y%*7_5lLd1jF^(VcRoCoizhLlp<8fCoyHeu;4)~a^+CR5|^@O`m^bmaJZo$)0L1rv>~RA|dI z-q`wBPD%Cb!C4ZZJl|jZN5n*2qL!<;e^OJ@1SWKQqo}5s5958?u7Y&B|DDVyLbXy; z3=J|(ruoniL$FFJL`B=onaxybc#)m9A%z8D+f&$u!#foL@uO3!bfI~G<6{XOo(_$? zYGy{~@;BlcmRN8e%F>~utZJ_)hgQZTl-i#NNSa<&#NS1`qxJHJ3Y90&{)xqA>*)ct zVh>-%sfTAk9XYfJzjKvwo~dQ=((G?s^E25A?>L;U z8Walc%OIT^@@FYsek_H>nQXsP*Y+YL28iT!3{nVsjxWm#Q+e-AgAQu{VNNTMZHO~r zL|Y}(?m5Q+la)>5KgPzK;@kB*svb&3XBNLva za?jOz`UXT^3g}V1B;j8p4iZL>Bxa)1J>RVtifEFsB_T!8Mp~}XnnkceO;LGvVkf#W zG|Qz~Ie+srf5-P&X=%0p#641FdcMz|E_qNMdH|-3u zny0MYb!y$`0%^D-E%WyU#^B(@=fJ6mTlA2rQvwfShF_%aWx&s{{uC6VK-RnzHL$vI zCO`P)dz*iT>R&>lPhIXLrAEcIa~ovW$FV<5vh`loaXr7HrV0yraIV-j*PX-^JQFjV zLS157X8EWZ=*j?f=X&400?s$Z_MA#>=8-{p=NGDNE!C)Dcu}kRg@q~|llHU7%;`-q zu{&1z_7>I65dY7)3Z2=)t)?es5=CclG|z%asf%AMvfKw=4en|;$|(bsS)!+-uGlf+ z8x$+-);@ADjFWhAXsTzNfxz}HB|0PdNCmA?+FxJi#ve1X|ER?DL^!S z|6<2Tg0QjdbFAzOTfceY2mCduC*!3RX*CXtuZxqpC6nljO^TKg7i|tC{YDdTW#J#T z*SZO2keh@SAH05XChn?GNJEO#YNyI2?ZYDA5rGD-cQbe}%r2mPmP_EUx4o0Tttub}Vp&D*BK2oS(x#4rG zR+#w2UZ^WNP#nNrurb42npm_MSJI|uYTZW!iH1w$ottG{NDUsjc2(&%#jLDy04)rJ zG&J+zjF#!tL+Jb<2#E})xf8@u3k!60j)h0013$n7swo_=ax_wzjDz6>*fvkb2DgQkKK7o)Ca-|rk@u4N&6jz|>*OqWh znMC?TT19N<6%(dltrV!o#pIua!bI%N_)91BSwQ7!AV*G}JjWf5&v5#-vr8$}hI_!! zdiv;{X&6g@PRH_yt&oV!qR_>Q5RbJ)V&P8r1qM)VK7#cwsXR$hwdOX zkE(*P;DtRTxfUG$^?+~du*l7QBV9Qe6{UV4y7YWs^SE>w`(`|Uv((KVr$##YvyJiG za@Ll|M5w$)5-CR=g;TVC*4LF_eKmQdNo2Tq#5%TBA}pE&va zNm|- zKb8QbDl)cLuQh|P!@I?3^;5srJxD>zc)LowMvX=sb>9y(pc4)IgwD7=FvZPJ4Ph<3 z0+3?L2Dq{U{649;+qg8(%N0JeF)?ph@V#OtEVcE=g7e>7f7eH<^XksaeisK>=9^2z zB&5;Yr{pgwt>kx;*1){%(?XCJB@6JE8l>_zN}mOgNBH=k$ez z1rBw$*^M`1o9iMW*F;P<^?^c<^CS7r+%#Tbo#psIl{gMySaMK6+tsI*j#_P|mn^tW zeVeukPUmY$KSfqoDFd7N#1nU?Ej$Z z?`+x-HrvO)K4$ZF+FJJY*-wv2^}BEFVk?we4|)H3pDYA|1o)peZsiA$1anzz z;8VI#PuPDn-~MtZ#?Y$%8%zF}?5gJ^#42 z;QzWZ{awHfzw;+hwLF*ebZ@&bcdTitUla1p9S|4)uhAP6QTy%u<@IlG(=8yC?nXJT zqzSes?A&T1*<_{%H6+hkr;dDSZO4M_GX|8Yw44mClgj*0F(^y2S|#%1=5D9_`T7Z{ z778D6M;_c=XFE-fwV7Fgq}zkHszn3zS(4ezT)lTVhnKFJG(F}M5(!;O*L3=1& zSl@Cb@|)o`o6Q6_HdJcGpC%L&`V}~mk^Dq+{R~uKMaa1jsXd7o zgw-tWU~(%3^R<*`WVA`>;dj-4*Lv@~KT-YU>DfM7+`4IMT4ver@ZdzXlM_=DQc^dV z+583YFz4y@b;bO-2^Y^vK{JoIM#@~Lh=?zPQ&{l`D#1Fy!<4Zv~Avvhzw{WA%mQ^|7*6J>e4&dyHT zvSmwDTN0dmV^dsA2YJNi;v<8n@_y9GiGGH;t0^v(09H=@9L{DV~L>_5y zm95eWR9ygaZyf1T+ER#)(ikCwKcD*D*S+64zPb{27n;O>D708@bm` zH4J8hKTrO8>c=*4BaoNyyI0%S81JZaj$O{*Z`7(z+WpnW^C0zQFsA29f zoH`mAQ3jQ4uG>i$C?`CHsk~Ymy}Yz2e&i8{mJ=Ts;}9*q2&D%U9_8RMUg%1CQ5PJS z>ME|X^ut%Bm2kLJUvfGS$x@Do~KWrKA%7F(5coDKR*%LwQE=Q`Cql+7NaNo6P7eaI>v`A z^`sMhI!DR`2+eQOUv9hCHjTe$8%l3o)vp3%L#+mE>7BHHeD@LC^VWp@mwmlU+I;;B59#t13L*#3kQCwPS5c&z|{Px~=SFwie;vEqCK|hE2LJNF9-s7u3t}G){(|siFWFUg znxRV`p57;VsQ|N{346M|Gdv0}C0%HN z_=3a}@ig8%c_sZy{4~x~Z$4Tb3GoOQBy9BXqmP}=xSzfC(3(@WF8lFM?VkP_r{6f! zX)pV)e_Q?Ae>wmX(f=Q;FJm-6U*4j(>jpa1;lv-kh#r*=)_ zs0E$ggLElvnfe~PPwkSn=G$OabY6BmjXZM zUkcp6amarEwE_G3fnFP)DEI+FJe8I=%xTbPaMF@LHijQ*c&Vp+;KlkWobm)$*{Xa6 zRfZ~8=-37$u7O{$=%3?G`*J@^{)0`!_Jy^t+1-6_dsIFw*YFixUb)b!Sn@wp?6pUD z-#>kWHTdVL9lqHQo5^di7nGf4+h|MKDzzQ=hv$xe0u+6Z4uezlnT!h#8+u%`16Y}T z$**ebE_?Hm5C*0)bx(1Fq! zs6!B*LOKO~|4&DPQ)inIRbH4xY}~lfHf-3Sj;6|x3s)l#Dg%X%Ja8O3;4>XxMhgd$ z-}B|;ZMMz-l6SoAI{QKK)Ar!>*L?W*RUh5pDu-GPxTa^?{=r?x?fy+8_O*Te_Kfd2 z8TFm=T|V)o&SO^wR|Y9?VEPIm4p=G&@u2fOQ_C>KB?m6APA1aoXi`W=!}8+B)-k)W*O&im_~{=%{^7U3&-rhE zo04z;=?KyeA$AVnI5z*0W}Yw>20NdP!)vQ(V5 zPxZfRpY@gqse=xbzrW(6^C8cbmbkLW*qW#26Z3SPp zk_>u=#|eOrW}5&@eSLjYcy(@qnGId%JWYBpCs&sf0E|xM1YWFD9P`DO%0&a^6c@DQ zl1VS>NG4tk6LHC<50qRoLGh!m@VR6$PU%zB%jASgU_7bm3DHod9;0k2JSc8F2nTGSUs4&naBg zqhsale?I@qlSkcJ;M@bdMyLD22UngV4GtejhZ!L_-XFy5rPAHDYW%3}EIr}9eEK?o z@{mk8kTQf1RCxk%f=U}UGVPK@FNfV?v)#}?@X02zGwNaxwgd70q=u3Pf6I%F`xtnRz~ zJS}@(POvT~0IHmVGi7n!t|=cn>WI#RL?T_qqll#+bbb=S%3O3HF#$*lYiMkP@RNmAUq(4os5i(R7?gs^Eu^t%a$$1R{)p7kxrFC zdVl4Ybdv8%4mlky@i6G~X<*mnkX=)JZDl_|j?uE$0)CvZKfKzF1C#datB%{xkDRo} z5B1vjk9PSdsaWLFtb~gOMjo`h$`2TQnxw4UD7zW2dI^+g@Sk$} z&h8`jvm4*A4edj&zx40>dFr3=r~aqM_u6;e&u;Xaecvy;Ug-;COW=!XqtSTwXlS^G~3r{2-NUy`$OD zTkdRhuZxEM)bjqhPJ8}TyFW#g2X#6Ebq<2$RUSDw4xFX?;o;#7S9&BD9buk~ymI_6 zD*!S67;Y(W(!#x?Q~Kb8lODOCTlSCd($b>pF|}(>qStXSSU2y4hw=`b6Mchx+V;kv1Fk^Yoj2BG8t-=bp~& zkL^`Yu{~viho|y`29KU3K+92Pa(Qi&JvbA-33s4*)c%`|@7n#V_WQ(Td7k=7*?Uu) z>|3LE**m4pKDak!M|EqUkAr>0Wg9`+MYaLTUb0oR5i%S+w@+p)czgo5d-v{{5-a!d zt}|=EEY#(BshbJFV$2sSam43}t6IGn$6~_7@ZfoIB90`MbiPk5vE^X6-~%vkbQ36CD>@h2KT9K<(a(YRv=FdvRxMn^}p_oC>g zE{~V$K$BPQy?OKIJn@q9NTbSQJ{-BcI!C3Q&J=fHSx(ux(pvjo>*wspCiybJ_e!jM z88BygW~&0zjoIsg9e$Y5_JIle;*-29H+(0$73<#_7%`cv$&Cq{3vr>1t= zq`&KL=UuQ}zC+z+jZfMn!fxa^VI2O1}Nw2%0iLbzZz*Q<-cpJZRr6M#@I zE9f#?Aa)?SwRphP)5)l#5e|&20Oiid&l2a`|NgVy(CDZX`^7=xIyK&C-#OUlo$c)I zUpfhO7V04KXmt*}|L4iePX@~pB)(uwWgZVX`P{N)OSTFS^)CgUmqzg@Lv@l$8}^#p zP1!NK&K@g$!5*6Y1Mh&YzMlroZJ&H;HW8Sa>~{F6vv;i@wYxS9+wsw6d*gJMJ$t;% z9{1IOgMOw!o4+Dp^I%gWs{ym`{Z(%%ztrolv24XtTP=DbCVlYV;Q!qCxoZyCy@QAR zb4H%}mv$K8UH`Oim3)5eCVOmrj~%tOzUtBFn+zMz5Bd!7^3=hIE8l9%$l!@jp1}o$ z%NC-s2fP`6_6h)=Pc*V#2s^o~Mm-WSFTGpZl3V)p*X+# z^pa`tmp+gIQM&w0WKZv~ZSdoNYkKy-FaJMzw9igVa5U&_XFy}815hU*sE%N!Gsxtm zlNA6QeC0uTs|M0Z@fv~i|22tNOgz=xYd#&_H$vfgVPz9+gdVhPCrJL-0{Cumr#)5t zl-)D^_3ZONU-QU|a)p;;0a{YloP0vCrlV+Uy3X1?>xS%0+gj}9lb!Z$|9$oA=eq6G zgl`b^!MTH{WZ&STG63RKUO+j?Xoqr?Ed2_I5wfoWSf|Oc&SbNe=PR0-Q&-8jduU^U$TJgi^?mLfQ6Q2wld%w z2mOKA)^|<0KWh(NbJh-xG}~jodGOie-S(pY)8f>$e?{PnGkis$`U=D`I0{ei&nvev zf7idOZ`6MA`a^ctnlsk496S7dvN2NVu%}11+oOJ>-$-Mxr`>n)&wK?zn&Y5P{lcrR zAqS7I0icyvaC!0$9_=EY>>>LIdi~Be0BWN2tH1iIrCz`B|M#EvJ=!ciXa zsGIUd1LZ;?pKln_Lq~XCm?&3#c`(MI`w2!FVN<^1OYa}U5k|E1fsq&SR0lf7p){m= zQAhCsaS^6CbR6{2*Pt)HXz8*9+3#nG-@~8(YWVFxKmK{gcUZr2rrnn`%bkQehq)km z$E)+;=w3XX4ld7TnP83!s|XDK90EkX7Zb-E(Jx5Ey;W|)l^&%{G!bJ5_=3XebaArF zY@BWOs!sw6{*?NFpAq0&2D1r4ro3`lkOgRQGtDjwx2b#DzP$5<{nQPo?CrB1_H1^( zK)1a+((Y4eFAE04nNNi`}Hf{gi^{4Dp*Pis>ZBKd|UAlMuOh@`G&hRcfP+a2!e{=RjF8#qzgMHp40AA{;kMMx<+tOA z39@=~bu|H?U}X5Y3>|gA35OG3P;o>$>ZbRLdf?KHaYtT^U;H#&s*}o<28GwXL<^?z zL|V9DyhkNmx-Y6(@~930oX$gb2Buy%;QW8mnL34y{5&3V!Ve4#*s4{lqWUGnNvFy&;z|&9ig^}| z&2VWx#aDR#7W}&1VWo*i`^fa4I_ZPV%GRXw=2v?%-o1Lnb`6Z!Pi{SJKlFP3 zSMT=tCxz{H%vTBgl-z93OT5q6bc6M@7VQ%oM(l5FKWR7iPq>&pI!m`gqvie&#s}?N zXLj22r?!>_#JdZ~mgfA}|NPPt2ap=HHJu=l@!N?OHW$^0F z)zt(*9noAymJS6Y9Q}w_6F!DX<5KuEPU#6sFUA#dg|7sw(UlJOlv8}7^PqI{(kgxF zKub@&l+Fty9=dUm5Fbc>s5BEFC~q+4xx z=?NP5M5VD#yrA8BxTmc^%iO>%4JIos~1|MAIDE!`Ww z^v{of+Gc+IqfP`^$?M5My1f6769Au(!9@)~s2RrDZ<-<&={r$^s``P&`5Okm0dkbSlr3=l_k(z7BZX z_WC>OX8ZW`A6fg#Bp{lprg+f@cUsZ9?xOv~4P*AHE&f`~X`Z@q$d}4B`hh_cezw7j zr`OsaAKq&3PxM=}@0)4&ujzaX&iT3%>riZmYNx7SqBZb~55y^+6h>L57%nkvU}tef zy58|CY675+r7SpB^!VmKcK`bcoZdOrW&*%d$a{X~ z`g13`J>J;?OC5@N;(uoun^_`Cf!Kg_4({|=a)G^!3on6^P=dAzy!WK?lR9G>Vr76Mv>eoV<%O#h=Uid(;z@b2BaO0!#JdpPc#jlcOgzu9^fV7$$t%q#PoB(lpyzUx z>J$0Jb$54P76$;$l?Tbl3+00oj@{rzn!Le}u96+#xBJ%s2W*EuVqdn8PX4K_GL8*i z`GHWhUp?UzJ=NrmGadG|_tw~xCkJfA&++eS^$oUjoSQ>ki1kFYU^O;SctM3(NE`}t zCBnL$0K`s)!W2y*MLaFEJeev7GCA=?E1Y1;Pw7-oa-i;$cMs_)e5xxNy)=9bE4ku{ zGKG^&G&#e;5C8Gc&3yac?4OC%=<`3G{zv?s z=W~8=ia)FR09BsMGf>66LCeFhG?3{BKrw8@$#*qw>(;H=20(PN!R6>;x`amvPTs{! zacqc8PZFBLJl}UgMRVOfOQogb9{j=@%@cwT5qjv{w z)Cc|!f5+eEe>U_Ql9jjWiOOHu6F<_@iL!{Nx>^4*Q{Pk%^Yj(2TBx>Ni@2)2=Thj^ z%>+P(7Q`6B1uOBQ;Zz9(kwsj(F;4MPC>>yoBl6QQqNBcef(kDhsC$4btn@?+qJxuM zu*{w1ODBelc&aa%;u9V9kVU?9fzfM_2hQzF*3md^A6esn{;Sd8pQYEI{@*#-&GnGo_r%d~)o-_y77{J|~LHf<-=5uEO*3rU9OOVON~O zffEML-Um7HpgVkDz?p_?>>G_=wA&}w+MdD_K2`IHVvRR}>fS4`HWu)v;stGXbhy#} zz?T0 zyiQmA6QIJ>1FWkFfC?cstO~D^JnBnF5Lv{ft2jkRy*&Lq9${iU5wE15cR%qIMo@gg zN_@#H!5A*$mGs4rx+xxM1_06Ea^fSyL(7Yv@b~|B_non|?c?6@*UquY>FHx#Hs-K* z=Epw_SUAclF8}MU@Z~ijfMx?A9$YTs;>`ugFFXGS2L~^RXRa`pQbztrGcMwhmJKAw zW|Xh&oCWraY%My5^D`Q4s-e%Guus|P$yIh|@jKR??F%R$wxlpC@X}i#Yd+qDj+||@ zufN@DUwO5|j*PYWdwxH+ztsnRKW&pbqqd#4f63;PlT*S{Z(^gie-jBsFV_~5BW zhs|SUU$h@xcifLUb-kINp`__rD9t!MG}&m69O$)n-~B{`)_@L7@yL^IyeBIFJjLqC zJ+Fhv<^hOJZP@C%fJE@=Yg{&`;*sO?9bk4wKsfoZKv<6Y4In1zBlj(=JRzx z8$+oF!f8LM8}Jz1qdfKz$f*~C;K)^91mUF)87}I8t3HCOPRFnc2XCfcpZ^(9)T=lA zikJY@o6)bd^yW2~m`BM4k%5aA4y4hF&i*{sHfGm%`Hz2U=;#7o@pu1+{p7z^@1)cL z(CN?-;NhiSe3Bv=I41yJtRvr?{@2mbk;Q$n@hw+)?4WW??K5C4{`|fBZeOfAq~}KXSOy4;(7_34Z=s$7g4J zvP<1od23)7FVgVj(U(kN)i$B26VSp52QPK-kjW7y)>q`}Z=@q$3X#K;i}8q8Z*XM- zP;Vtx2kA{46iHTNk!&uQbpqbVr>07F)4-6e_T~Rljh_B9^ZCZ4NBu`B-i@5^NNCvd z8tB#Gh!2!Z#Xvsd20-Og@@gO*-SF_RZP~Kr{06{k!d;F!*a#csL2O6aA{UNcbdd%Z zEy%urDeJYz8$NA^rmpqB2|i*2{)5<+)qrTl<;QoeDcR?Dc-i{%{>vvz*6RP)Xz;R9 z8LGTBU<2a-4=x@M{YWF%DuHA`oa%;PntSQNr|zl#p)Y){2?RQdJL2hm>XEM72>=BV zoeC3PEUZX_#{yIwQ9s2~oxC^{Cdw2JUUbrxTr@fgy-EWl`AZK z;Yx>efw;(rj*Un%pgR3L2ru;DlgClBZ~u#Se5BQ0I@#gN%H>0Q z=pe8SUN|t~k_$>UIXRiV|A$tdvBg3ho!f~MCv3xp4VTpkfYs&!o8XjxXmIf*gO;5r za}5CEAy*wC4164X>IAUteeiJ6JB>Hn@x~2y+w|kMyZA#Ndb}>JY!J+BwwxEv4p`*} zIQ;s9CHvVu)Asd!CHuF}HruiBMr)%)czx&Pt%02~q-RbvM|`TIzx7+cm2C=ioeKx17~nF*FSOKUn7}kiD$Kd~ z=)}SjEvT^Qz{AVUhb!Jndc=cFdZJ_eQ6_$bG499*SKJZ8k9mplM?4KfI9$qymWz1Q z1=l^nY0MF3gkKb1P#t{Kj~xMe_-T*sy7mdXb>Ng)El(x$frIan5BTywKSCi7@-$|7 z*-bLh0Cgym)e|J2D(8rk2hp;HAo->IW5+Cg@zKrm ztOkrUthMho{_5Fw z%r*la7;o@3n+9w1a*Su+R{y~yKsa>^9Ec-sXdq7a z&xo9h?n@Z(nRq|+6@c_|qPT2XbvFUPk}3pQRfeZv-f%1J85uKEh-87)Elz zN_vEmOu8|ih)XVg$wUjn2S+~-&zLip7zUQ^5q0LnV;m8W@re(Vr}5(=T}iL#yZ>+L zKV{u5{_TH_mj7w)Q&ax!|A{UeFZ$0$!tQ@M2icD_g3CkWQaL<2F*X76?w-6v9pu$G z!mnSyKKl(YHd4n_P1ws>2V2M{v7AYBw3BdP%zNag`9xOs{z{;s)%G>sV#lY}*j>}# zvl~h;`R9Tws{yIamV++(_6>TWtv(U>Uw?GcKEJbIzxPs`ePe%vjZe|W%Ab6y{Pe`1 zrcGs^)*EQNCK7DCjkE@Pc*4;ISK9*DBtSg$xu@zMP-!G>;!6*n?(2O(TpFmWm4LdM z0AO$#K0{_M;zwRJ_qFlk(=%olibjeAR}Po?sehHFOM{;?U94;Glu> zbOLy2o&X9CTm0MqkFMpqw8XQ0Nv4CjCmA}EffwOw!lfQI79=5 zH~PSG&NkY^zCm!?)ONe8_^1uqVGqKKfg08!C1M3uv;e*IOjm8UZYO+d9PO~t$%1u;Hl&DDmZB;D*muBJ{fKj3VT(T>kPmBxrJ6TGe_0GEl)R+2Ge0UA}FgD)TD;wfCDBR=K* z{_TBdZG9)3|6&XmiTg^zi|qa%YqjonJwcY+Esa)Mh`W>*1GNz9s=`)0!ZtPN4%XIdOxFulu8;dX++# zQL(du-|yXU^ytwKO#)ng*{=rFu6I=lE&-%)D1hiFq?8xs;F1H;k5067Qd#83dnsJh z7p^d=e&k18#TDfdmu`$tJYeL{6;~PtI`2O46pzA4Pcp$6N7SVe5r^UtotUL!F0|z6Y$Mf{js}xtNFTJ_Kq&hJjX?!W2#+%aUE51r$mH#MLngkVx zXmo{37Q=%_zI0Qa$OjiqSkdA|S`7zYicd|KY)9X)FaM8u9J38Bz4wA?|Mvg!BYigH z8_Wa}A8?## zaLL7soiDN&1|8`EB_kgGEI4hQ_EN*Gwts4a-D^+Vj;5Ea*}49#h{}pvW(#C10zQ9R z)lsxx+H=kxx^~q5cweu5{evDmHQsJrUL7by^$i;6q2s%KJ?RS~m#6JUTso>d$TaW^ zSDQyiZ4sP0rTVA3=Cq5-@A;Vw_=5nAU4xWxbpRP(b#$4{J?HJ}t_4saa>4~=VA0YO zM4rl0TDp-Bp2i*Jgb^*Mcyv#N7eDGnTyjCl6p#36eBw)Av|zRTc%K+XeDUUj$f8$6 zga@7nY2*c8qi<`PvO5P)`FGyvs{JSzi-SDjQl@Jm!5tOZij2I8f71Xu}^kZLi#S%&rEAPhS&pO$vZ9PT>)1Qb4^^9mF)M zpU%%#09>!Z>s;fxbLUivsN{GmeTqBFE~~Eu7TP%`+@Yw#CO^m*v|tC}b5j=_`OVXHmG zJ1!FUr~miPb@}<^9oFiz0X5+1{LD-*>g zsw?C$&qk6<2CZ;Fb;dv(9lUtRRgU5T)v=dKQ(mu{?Cs)Kdv9Wm?P++!?rnX}2AfZK zW%ga;S&S=}<+gy2(>_`@+O~ml`yX$gw9jlAvj6z{pgnb>+s=)db+=J6vx7NxLIXRH z@}(W&g~OK)d~mHEpreU{RtD4#sW0G~)N?O9VTc2{>K1(0ZE$|$%tpX+r%^VbX1kgQ z2&z7Nb-nbj1L|f15Gy5yr?FS#(3Ok0c=N$(?p2M>eD{g+#iTQapAWAl{<-p$7hXKz zTwaY4C{M$}v;2Smx|7z^GF7v0|EVQKpG-V+ywgtm@_)bY{--f(U=U7yQsd6U;farZ zN&C>yP?lHt(WP{hr8v6l)~(C#oyx96TDDPrQ6AyLi!kb{)5Y#MWO(?gBOb~%LX~$5 z{XwZ{Q>Au$a&nKoHo4JmYktG-?|jjJKkToa{I$SrkCDc_LNApCu(>Avy9X!iU*3Pn zo;liSf3UCLo;=ZOty9hZs%*B;(11+8p@AJd9oW^kXrKoYmU^T*qJD__qI#mb1C5sq zI3p{0+}YDSD**mFP!*91s=+?XR*ucG&4K6i(rBHGjo@7N|5A@T% z?cUWF|6?8Em-8{g|NPfvj~(u|j+sCIA)_qh)yRS33C_k-)>l~4%^^S+djZ|EaoBdQ8uu>-hV2jD8nAapJF|ZbwEM4x8T1+4HF(pO z*h>RXlLKVJH4y;DNrGri27ro_dPltQaPURDtN}i+oE&dt5)ka7ssp5|;e=Z`ItocV!901?Lk^9LVN#t;VdfI`B0u5^A9clxdU<%%Q~1cs3zNrF zSY!$xd6AzN9$u;+^@tNEh%UHj;dykF(U=qu{0ZL_bo;;=+t@jh@oRZ``)r%N$@0I~ zcG62D7UVwQ@}dPJAD$ei_l=H@o?j{ye<6^#*+{r?sppL+ipq_NlZt;uz^?^wUx+_v97*8hfW={TM(OV{cYN~LcFR%e0oM!`nw^QZpL z-f+h5+c0c@^!9-L^#}cSWURxwy#HvP8LTzvQ#Tlt^|VhP6LAgfKn?WB2`3-JD?Wuo z1`p>jTLEwxdjOjJ6+qlET<+YwYe{k&2YF-}oz~YR%#xCIHvzyJDuiemco;HIhF&F^ z^i>Ek9`Oh-J~%Fhi?S3iYtLRKSNK`UY@Cq?t}v0GhOd;r7(R_>t~iwURA;U@q)USV zmlv&u6d{clnhk*W4W6~0)(NL;SuKn9%>%t|hS{fk&Em!EH*+YYG*~X4x zm-1v0z)3~kWA82HkPg~B`5??EI0yO3*OX(=fOJbfp^3wQ-Bl4nd8b7jBH_{PL!-`JhfUj_Z(v48* zssv+L=|odd>I)+vLA}=ov$pup#@goGM@!-^mfcSzR{{27SWdkSQ*3O$d;&%HWFp+8Zv(T(@-kdeSY+Bqj$W; z+5c-?lzDjipZ4DfKkYk-M+z<0=P!F{ybSn)ngB!?2l^COf=IXi0U+LDARS0gPfs=p zz($L$TZ_5(a)%**(M4LgAbPRhKqHe!R>@PpkO9#bE+}55@bGmXUsE(z1YSDRV=te& z-frq%WnZ}NnBBhStZx+betl&{fTCG;M@{k%Ijqg+VV}L>v^}t4$i929$A0h4)pl&W z&G-5g{0xB$KLeypW8H}54_^}j^x{eYvPdhlu9v+6a5)2Zv%|Oo055t?0!X@WwuLBfLpynXjXsPp6W+62IE?Rik&Y_aOXS4tbuB9cz?NdxzWKGHG|L zI_=?V`($-&q}g6P=Tq4d&wK;r~ke6XMLgM^+s)oah4Y_|v2oUxzTdctn><>+Rw zTV5Sj+$FF8rBw1s{y=-tzHq}?yKCKu{eSyb*uQ@Vd+Gu049IIc>OxvK zpygFp;@}TYb%uuqWUK%a#G!+hdS*?)}6Co*m2Uf_VELoEV(O}OJD)*%h=RCZNGloG5dsX6#T=t z`t7?%`+VZ&t2kaCT9eNPH5s7%}XfGVv9!V9F;Br6-0@<3>kuAgknJT}Sa4_po7814|byYu7NM2MwDnZp3Y{@1(*m>7JJtY+qV8u`{?0e`wy=T`uPFA3g|;^o4*=R zIRjPJs#mIi(h)5PpTQsJyaxIOkAp!PCSKKmWZ(qL)a+Fg0acw!Fzb_MgVi3Zy9oe= zLFcJLi5)Mz=%goJs+;Pg7vooW@nU$%2orH=oZ=RYVZ|$J&fYW9!YjcTM~pkwSK0)l zT;bBVB8`3;7P)jHu7;y~AcH3zLFtW8m26wrs9o3XpITj5bc$k8kmu>cqb>IQsjh4S zz(7qN@EXh&v1}kZg_0}n&SyNOY;$F;ezBB98aA{Y4HVBZ=mVC zp(7Nor+iHSfZ{P35FYu$bq_(}-|De@LHh5N4AHqJ!dx$j@noK5TU>LV8D+R_MdL~AwsG@^b5jcd8-~F6CYe2-pne1 z4g+HxWfdT;3Hh_gvXQCqnjjEPlYp}H!?gG{g>^FlknzbqxLm}=1E&0xj=I97lfu0C z(lC|i`S`VvE4{?E5L~(pM#2S^t{A6ef;0qhe2R+(R`MRw_V%6icX;EjQ^Tt0s|nvd z*li)g20C+9`N1kMwBp{Omm*?|81`<6DNM|7so3ZrR-rk<2XCYxPS6$T$ zrB8GUk;9wI(+T6KI~s&zJra+BTRQOM#n-?Ne=c0%6c=#HKTl=g_y4}xZ3E}*lN(Oh zo>k{;O{c&9@!jYv1AkUTm*piZ8y_atbWYpfx#g&RbkjLMO>oe@>wg60wLqJ1-q6NB z%3gI#cv?3l2ddrAOeXm)pk4vY4ou|%e6|CrY$d|rH6Z}v;Av8@WUm5h*z0DAUb)nv z1*q&7&c+Ba++>Gqd$jn+0Zh%q2C z&}(ofy*Sap)Txt5`3s?mqr1C1n*eZ+)P@U*>vGVI>CeMc9(4i-A0O+8a3CIANk_Ji zP&flTcpUsir!eXw!nJ?P=uClxOS{>yO!9Kc%wW51gS}F8UMZimML` zFcE0*eH*)1kJ)eZAF_}5vBJOi=AgYb(q-K)Y@MlNs$Ux1Rrey44iHa&GV>FlHn&E6 z+NaY{$1z{$ssaD}VDDiGBihk&f8_V{uA;U_2Cqy2GV|8|g$kKBSY2$+h!>X!;mPMU zl*mi*Y5(?rr+@putN*Nbyfy4l{ptU$6J7S!aJ#km+5dS@`*~0Q*bc8%0MRKVzr(}B z=O+))=q%J>56%GK6hPvrSC^(;bPCBIdB!1&9zJvmH7LVRanV5eyn&yv@HOD08)=1s zKjnI3{>ZD z?XTV+u&=)BuLVZitYhYD0qOwt1+Ucs(ZE<0{h?B{I;~BBbOx1trR=H$0BS-I zbu&5rjNivW?Ir-5E}i+}T8up^#W@$BG}0J!KXg+k z9uOZJ(RtiI+39mXDq4+#V@EX8nE#7zdw?>&$XC^qqo)a+WOJ6W{tnf0L zKFaUspf;0$x|{&a7~w-5HiaaY>L5#b(gjK$dFabUdBl-NI);h3;+YS|xMJLM#g&H9 zJu2~IywZ(O_aeM>g+n7(BLPPieQZQ2KkK+X+Mebq|M}0^EdE+uD6XN2X8YcuuJb?s zA$|C~fxjA=bYdFWyeEfzF^&m9TU%Q;0l;3Quby1252Rak3MGs6K)C8qtS{6L~~ zKRD8t7yU1EHGCCTZ5pmdJ+DgHXnV7tCit)J|G>`<7__gxx5|dc+pVMJ!Y6&zQS798 zD;QP)+MLHLfY|}4e2dh)$oX^#7Ym&PS|l;wqw@)!pVLJmG& zjRY9IWGQddpSV8m-~JE!=D%7W{`2m+HsAfDQoUp8WpW!8=pPj(Vi-hj%VbVW0m z)WWgMNP6<_U5ogaA`Wa2U8H3n)=t z@8K_jjlFob*FPD&uuqHiQuWti$=hy& zuK;iqaGUon+5->=@RL6P-An+;^i0Mv#(779 zRB};2;?h@GLGkBxba4BEmQa$KYH%}+(MSbw->9nP* z&Rp@KSM5K>$!n6F(;1lBtDpjN0i#-6qXuGN-SZ2jEjgbbAH03QC zC^|xLc@6N;;DX>9)Z>6J9#A@h;)!O$$x?s8clK}V@c+sW9Py?8{nnN3=;!_Z@^pcI zCoi$0y*Iwz9y@oVJv(-dkMGU?nQFO?jyJU1Gn4)H!s+d{t?j7Y+;+gWwjQuG%_qE_ zth^pr%IeOj!rp)Z-vjVJ+;rGBca7WczP`@JC(89&^;Gq8hR#+1{5%jkF?|IP2Pis| znVu+1eUxPkzc6XgX<}J2oQ~o0!o$nr^0wvO$HlDzEKlwC6tB4YvOw&>NqMBf<<&T# zg##mf0bVTFO}#_5renhOYd8V$-TzM=?6-q{^ly{@`i}vc8TwohnLGn=B~Sj5;TVV* zWTcxh7kI%w+?O)|6z>9~SXOn)FFMhA5MJt4FW?IoWT3{2&KumtOD6#uLQ^H)@D zz8c|mih7{BB=}D0dV6=`dK;WNXV>}!U~kKtwxwmik22-sr+xqV`Nzieek=6iEx>9( zlb6XCZa8I|x+d*6pWo!a6F2MhiGk{_Vs|=Q0r0&%=>#AS;2P8k2Cl(7@)f0ExucmG zM5Uq->&21YN)Fk4o=(2Cp?*Cf$U|Fm3 zq&y;j@)36j_$M}>+;t=jn?hIs?@|Yua5FKi5s!i_G)Rhy*ahb))Y?IEzSGv z`o{gXs_`fUDI$7}x$5}g;p6f@lZr?qm%gK!K6JJp0LEgS60_Lwmwh-2YB8PlV#6(k zK`NzXq5NvnMx1iO1>u9IULAYntJ8-^rwl#i@cNEn+toKz(aJxe`@31 zKbheh%=Vj_v9?X%G31{+oM`TUV=prsW;_ay{{rXZ9IP zlv?e{;oI%0@f++&VbD*W^Zy6<#?-Vvstyt^;?Qy&HGjIa*&ZofV?EQpD$sDmwl%(G zJDOhg(Zu&m_#N>pt~M5+HFBKrE&i3jKfmXI{q~D%?YqbNtSdZ=Q^zUGnF#=U0OD5w zaj+&)*v94>XF_91UF1hR>cPjw@X{5WOFz|7 zd}*A}(iK#^3PT!%OQv+CVI&uf^1L`wp27j+eRV&{qYR$n0ScF{cq!BXpn*X&XQ@B1 z_O$QN_sxGbUV?r5Y`eWX(&j&DDd&%Tq@Hw(CtPV)o`A|Hy3xUpp8!VLLUH2aARs0Z zOhRzF??U5Rj6Qjr>wc*mUHO<+c+v%@tjSN*MPGG6gS{Yp4f4Pgk30?d;z^god;HgI zw#hg5eR9KoyT{-2_q6(Q`7$5g!v;UTYI%ENvwds$7JIv}!Pk^q{kOCZe6UCde@#BI z54h@^Abjj7hpi?{tL(MnDto82#hx$RYJ2TPyP@$N>uM-}QtL<9NPPufqy^mEwy}H4 z{{C%;t@VYHed9_0=M#o3dQBq4BOZALf<~@; zfG^tBzf5=)pOEyW0o;+g6<^S2Ue_IMe_C|0m^;Sfx^qmEM*d zb2ej2p&V8z$}vgK=i`_mA;~EuVIw)^e8}16d}hvaW^+EyoQ55~`~0r!_t*a0wd-{~ z_IN&CkLUeyUMeByHAxZ$1gJ?h{c19XIhXY60(@Z{h?*!tn{ctjl;(I2dAyI)CrfY zBo8AjX>7HJ3ZkmgfgRretgKWD2Uhc+W2WaeZTcPNVYd#SQzI)u`V*3q*ZI)`7AEUu znQi(iruFTHJTa5oVdG9ZEmM`13l}p20|#rQm7c$%_vyKqG*EYMR;qL5IoU!P4l{!FhlDz90ghUct1J;1ZLPs z%RVDq-zP$H3K?eFP6f~C4?1P{Ie9|-pHFn{e(2e)EO?+=9@K|sE|pHWIMOp{v+mH_i4o;QE0ZJ$cZ@%O_n&CvxkxA1DnwUDwN&{LzwJZJJ(O8h--J~Wjwy?H96g{ z4=;WKazRX{-^bJjR=U=i8A0CGAzr=pXz{1XUpN)~Cs9K31DHsTl`6+3wqbo_E!cD? zcj_@?*o$|u=KB$%?bbj*)NTuB8Nz^b?3pN6l+kOV(yGq(CdYodTc@lR^-XSmBs(Da zSD93jNx#2@5$c*BdW0qJ8kcSZScE+98*P#$J2~vrKWSo5-=ZG@eI{ay&s30)0`1Sj z1;iAzRo)Di!Jb9}@4zlR{OkTycvp0Whfi@gR=-UYGV~loYRZyglLB`ea0z7b@#73s z^bY|1nAOi(s$|Gg%-65)W7(OCwf}*dR=(--gH@>9xPE67Lc?y%1ym)jAaJ~BEA`EZ zdG-$ZiLB(*%npbJDP7YfC|KJzn~G`YP5D_kJhxX>kziy*VnK4!)E$kwl6KrJ;ctZ@ z`iEx~>RjCFU~*h18^KIdMzw=uSAkPbZ8lDsF1(ux$m*r|%*0p0z21>Es~o{-%)54T&Zt{1#Ic_T-Du8Y9XSth4;979FG#PXdUZYyF@V-TeT6;$ zOpzPF+x?}k;@W3{SXZw{zxHlIX>X>$c2z(>twp{v`=#7V!?QBjz=|o8q0Qk07DKP1 zy}_YKFWu^!b|Nmk^Y(G9Gga5z+LYe?6poIzeGr-w(?8rIsI;zr0ccU-IS{`!pEujc z(-+j0bVoVSA)7|{uz;yC2|}+%bI9A0ep_{+`l+$ zrvQe1$h`CC%CCR6Zr4)t{hijkfA%ViakPI+$K(3mJiIaEA;|~bBfb3l1^?3Kl~?19 z$IVg-n-6zh=}@1peOD#jtX~}s&Vi7H4$n=^`1cp>Vd-dtS_%uY)LFJGP@u%^56mGwb6VYk`1Ig@;sH8Ga)`X zY3WlSIRPbW52|?w3@VNu8{NU^n5d$+%STEmBQA&S|1|x{(}jmf%P1hJ5Q#*{j`w%;F$q7T8xZCfCx-vjTkR8#*{Kx=zClZmt#_zSLK{|>kA4iJiaVzHaf zjLW|$boS-{tD+#=bNAGu&hfYnHbUTk#02&;<56!D9;XuFV0b-4#Qxk!>0-`)gis4R z%&U#H|ElEr|9n%38L?1LurHYu=bcUM1k(?(WBvJ!vReL|tG@YOrzT1h9G`J~L}8dx z*NfNx#UUOEDy3`_^wK6ou!a`fF)+%{vuw+pl+IiY z-_Zwy-I446Ob;Jv`c7O_!OLHI`#62V3!(N_xJ~|Wb3X`s`=7P{)8cg>lzr14{ui9Xwmmt zY54~9SZ54A3M0~;1+LaoOSi&#j_2L&e93tBr;5OPv|K(08z>GmBNq@CgRv#rd$DtS zu}4O_B`RB+cZc`ytvd#N(?SuS&=pQ=`!7wc&C$k59Z;I9l?LW`Cz%^bLI<7}>%S8C zlTKc|q%yx}+RdXk`)M!wCp*B+LL!=?1^P)!Xr?zoQ zD*8p8@z<&JX-K-kOy87{ZCI*)W6RIEU(aS-l|= z1@O)1%H1y5nul?QwrsHK0%^1!*-ih|A&YtBGJ*Wb`B*O&}yDM>tqsn>J+2u zkb*!1taRYNYy8#~6wC@T?+vk1(^NETajEN*G#EyWGO26ITXHKjCw88AR#?)U7xSVi z9Sz23uAf=){GWFcpC246<|-fdqsQJC4!$34@0N9|9VF=X2!The!af8`!^HR*at7*g2^~)S&ya zmvWFS0Rf}wjFBh6cJ#6D{9yie6SqFs?IQliCe0!3`O)1Nb>Gg$QLY+RIl)xDka&zG zaj7||;Z=2$^WE)olTBrlVc&li=gH5z#*j}o3n^n9p0Xw$RvHBQ{<9;LhD~-ma^;lU z#eZ@FsP5I~AkD)i0p*dBf~4_K9QDD>0;xi)P`P=3RpPqzQP}^yy|E_u6!ovF3SV=5 z<5>N)>Y3ji7y-64lmfgg870OkYc&1*8iN&dyn6kbDay6^+}hhu%oCLHVL59>VCr6U zI4FMdm7*ax3No}N;2A#I7#nRCo#}%mlkHhI3tof&BhcBE2k(m$c>= zKy;nW5;g`Wl3TURM9KaeQgbgWENZH3{S~UWsD`wS&pP)++d4A@u&D2`}N;nFFI-S|1&(e%ByVdc9~(sBoB3& z1IfaU8F?M%Vq~KWp<9)i#ITtW@)svZU#JPt)oI52oM8!|FQae8hkj~v>Y}RbZI1_{ z(O~J!KM(kGA3#G#oPDcbih$cQS;TU=?g>z2{j$xKav|)wW-+Gyt>4T>lUG?pC1?oO z(uL(nBa(5uMNf4C#{R9J#p=j#a-%^wcLsTL8dK=gTDhM<|7+gYkUyB=9dl|EI0qTn zm@_e&CFbZGK1;(RV&&4gZ&i~D^yLh4hdHd}k|Ny~7A^E4>8|fDC@A@s8FgzEoqU}A zf%fs#2pmKbGS8isI?ZOB2$3X58)11KU;9lmH@0H*XYGY_i%S{#K}Ikt@9M#R@dKgH zInFPC0&-_>v1%FV%Z#e*p0l=EY!3FtGrcot6ElVk{;B)@fIH;F+_N`#6^_3&3aDNB zXE%OruF8M&w6bXT?T5%jG%)W9>6ZT)mRjCPo&p=S_ zzIr521{n_V+Ehor^V@5D6KDfo6Y$&mV;o{cUx}`m3LZ3MHp#^Cuq zj2Vx6J)I<@NYSzU)4VSyq;K?`@ zz^;d-SyJx3fZk-^kDZNf*M&(75!XH$b-fyji!)G`(vFw}*#8_$Nyqp3jUY%Ft zcc>PUmqlQ=yTcYN?6x{T@*o2!c#Fhgy5+ab@ypEkVU)VhrNZ_EQpV`T#!QT@yx^dE z=#yJAj2cSCYv`~@C2GA%*f1wH8i3b760Rg|-{O6*BG%k|^ zJCF3CmpE-+$JzT|d%!6P*%dkh(T()|Z8p!sGYBtG!Gj(>+FB41R<-B~j_~hll+ycj z4xosr2v~q)l{i91coA*sToiB(?7@ zLh)!ab#O3c>r~i;5)c^aALs{U4nPdWgkV{a57uv2-#o~Hlq|y@S(ynRi3&)3WW(V{q5Bkl%g7m1MAH#ly{+mpeXn!u=!ZgK zwJnnfQ-AhQaOmng2%VGQb~6Mn#6W50G0|b|8`t)|JL*256>qiqnTL5KUO+x zvFM}=?O(-Ab^BDV78ED3TuXi2bDa{NW3qX~HD`&7aylG;rH5h7pp4+srEuxE`P^3k zJvKR_R&H?ONtU1JT|stMBY`WaVj9mulW!;^V*{N7OSFNH_xOByDNR|K5$f?UmY)H) zrDv-rQFkf14aU<>Rf(u_fv95Roa10!u|Oe;YaBd{Hemv;gw(oF{_UtK?-q#-d}au? zzpzRO!RLR4GT#^>dKxy5*4W7aEaCwVYy$o<7zaU%`NB^uQJXCj4Y8R@l8ffrkJCP9 zUR{GgVtgz&g|e?*7Fo|;J9h2m$yOZ2MRK6(_cKPHzifsV*Zp^Th`w4fsruiu_?&>f zIbgK+NflmiOl`Pn=*{3Dla&?+(767ya3qS-x76v-fM!w`B>itbRPKpjZPmGE=gPvJ zn(jO8H=RTcbaNS`4Td~6*$6)|{o_OJ=9b^(IAKhOxZ1l~05sD6IPT-Hh(*m)q?X-lFfz<~zf82O=^+&>!!h zfaRuPb$pN-Pt@1@#tV(?I-^nC0FbP}`#p8^Wg@#*W$mopIKMB zqEeCiKJlhN*n95TGlH)JCRrxyt>#%L<=xH0w?ZXL za})(QYcCb;vLAov#(dA*fo!7|?k3~NO?~h@gfXUwunDRj1{qSXaJIhsj+j&4Yn|vSV3JASQ@o!Jkz=k}y>h$7>NRgE^4eK0hB6E+ z2iLM;4gCDH$oZ+5;r7$yHw#kzXY!nc3%Pz@h9TBU%j?SB!2a~Pkww0*_SH zefqkUuTOi?^pV{m_!7MNC0;ncUDV|O!jvn5ejfh7O#hgNvzM^cHF2T4vXs8m^bttI zyxp7`|4)e0Fvox7cRVWWzZF`_NplG%&CgAnB2QvMpw)&E#{0H465Z*SZxIp!hjoV<6J_Gnqus$(`KF{ z`kkE-{T3XlUK?e}0d2c}8??eL2m0s=gUixT90l1?XqCP|l#_%H!kMw}S2g*;MQ3d1 zu_YgCzNzfGW7%?3*wvM#_AIR0&=xA#2W_r)hynYzjjMMe>uX%sI1Gm#NB7jBn}5sf zp4;2b@EyFw(2lak2%^a9;4`~tbJDPdR;`r`^yM+s-^pxHaAI!ddF_l1SX|XCk2%|; z{hHs$IMYL><>Ma=60@Lh1M*zDjNTrzfOWH|PR(l?F*X8ZYz@>)Q|H<@NDr8(eoyZJ zoj=S*W>TyFGy3@}d^ zekaFtkxOEF@IrXI?0xm3CU!xt$w+eZINg(b_sBbDHM-O`s1*K*j-3)W=1(>I#q=5uzHRphm(!QdcSl3}o)!yTEcyFGpm@b~$#bwl)QDm&fiLPvKMZ zCsP00Ki*ZAR)~ctgNcLOs9Um>W7ox6tuJDZ36VUO=Cvf-g_~Tt} zV5hrFicrSMa}2e3VII9Sp2Uw<8gbG>0M%_AYBERTlWwM6KKuq_D8{U{Y?VnYX{=pV z4a%hZ==|Tz7APeK($Z}xJlc^tb>DAb+^{5&+Vzo2=4!r#9|Ax9A-JC(?o!r)Ai5mE zw3TM0T!=R5F{qQQCjj397hbkJ**`AorUf>lDA7+GBzw~lgPO-Ed=RL{x3QBa8bxFi z)v+Zp7v&)LL&fL={C8dwq4JpVk`}J33Jg`A%Rd25Xi0Dww;I^2A)jf4zF{cuO;15@ zVYkY${wEQGT?LPAiDQjioJCieY!}p7knqr~Uv|Wt3=ST~+?;FL*`OpvF_Zq{MHo8I zDFG9CQ6pm*AqD?0*Y)FbDN>`bzyZTiTm4zgR1j9y_OMO#Iw2#YB}t0~MS9#39F&8Z zVchPP#xG$fl^IZtcD^k*eNTurPVRIU>#56Nxk{Hkm6V!etg{4_ivh&N2El1lcz1jo z;#Lx<_})%ELX7_;o+gGZTK+~wqYs+`bH>wp8ebyTI}R(LDrGYmH@`?A1+ij*B#k!; zvQn;$2U*w=$8TQWK&^`$e(^<7m;dC$Pw-1^eDG$2AK9|m7VuEe)ZMuv#y{1+oR`F)%?dOa;UVteoB+!@SKY*s0{LFR$ zGo|0#TfrJpP6NH^gps_*srq6=Lrj`R5yd5!K8n%#6rC$jDAXS85k>Gi?#^AD$ayXP zq~`=W6pD0@4PCE)dZA=AiAqfLv2j^mnrY z)<@nGb^iuU4KbfH6OhM`D_ELausghrId3yZTPRK=sTY-Io?;yBu5h zY;QcOylTd7nBNhw=b4Cl$(3eQ{2S(%VAO4j2o2E^2>%{)k}9IKhUG!l`W81>RF4Uk z>`WX)ot8acv!CKqPpNj+)4)NGJ#j@+)Erq@josRv*VmZrkI}&v)gtVER{=uB?0|(u zdG_?oxbe*w1CNt6xQbu$a0j{nOj>?w^*qb`r;2z$!QPUkBz#l+1;3vfj5P>Nw6C!l zEh*gK-;)*+%)RDt&R#T-=D(<36?kG4{a8TnllE*&*WkYH%!5lgs~ z#drAe=~<%77Q_yU^%;>hs3YNYeEved(||DylD2a7Fj_?gVPy|bALkZ(7J|KL{Z(~0 zQ3UW$#BYdkXX@1XeRvI-5M{a;EF5`J)izQ2SPSIWbuKHvg!mu#9YNv;3jxSPNf)i2 zs0@8U{;#eB$F*9^3%k6}$cgcvDyD|27z1fE+4!BBExGxP4FHQTBm^VEDxUILONy=k zjyiYv|AH_AhBm<5r}{fHwwv=TMe~wh67JfUYszNELE@iiimD`jCH(&O690ue$sq9$ z;>nUwXAXsFuWd=Hbnm}cZkIa<)&)1BerG7?2uFO=j<_tkeN!87_On34^6?B0b~^{S zy>*UyhKhNME*i%99WE&!O?%+-cUhY=Th@$J9!NVVUf}?MpC^?IyWBAXe$F(g++Fvb z+#l_d@ip7+QcQh@k=|?T0!eNJ5fa$>KJ-AB!ZgmAN=dwbE0%w&T^vT6=ci3^Ln(X7 z)f5|X)R`pw&1YDCA3E08y{z6(taegk#);IVAjffEbph2wd%b zaZhjgLS4)=BxhU-+SqV-V{OT^@t~CnHDxdv8o8Bb=Zez+6t^BB>GM`QiS+d@;JdL1 zW-EvMjQ(|rjQg~en$?x99D>RLwXceXSV2cY+s!9I^!kgP0rv=p%IgsS^CA)`j>t_z z@NlM{7fB}VG{i$9;Eb8|L%2HRj{>un~r$fQ;zi$8uWT#zB?T=3SdRl`U=4KHssz@LH!!zhF$P82> z9^#_p+8uwLzYx>C!m}fe7CbdizGu|Z%o(a|-(8s&*yConY;XkQrxjzBjvMKRD@Nwof0}JF zV-`AA>uwVBgxFv|yA-fou9wsio{gJM2w!~5bAqQ}n!w9i&dK|uS1Z>(n5UTc<=eGX z?JDB`c0~cTm0dU13PJfTzw&p!-M1ahbF)erR!`q_OW%jKQunWrNwA4B)fpvR$fqe_D`D*li%n7pmn3 zWI~3KN_)1bI(%tEidpcF&f;DvhKWcjiN2jj2*4gSL8jUG1l+ zh?B4G&AqLO&3l>tJ$rjtgISaMOv>zP72c!isO9pzBWITm@hg8-Nl@B$a1ITP?nRSF z^V(#ansW_&D^KNV$sK2yj0rIdtTq=zn0K%1@Rs+n`j3(|3XBbNnY_GgrtYTHlvl1f z-*MsaD2F@2KaRK0-IX%4oWvU#X-}_@4tNJi^*0K}v~48qWB`vQ+N$VST95@T5?5Jd zMr(P$_+GsK)19KPT_P$Vp<8999}Ys5H$Uw1Tkv3#tJ(7Bz9Prgo>ndML1QbYI~6sd z`=5*me{l<4VoQO3%YE)gj*y0f)7fy-T#5NiH_n5e6|N*YA+0)Seli2=xad&dH!y`> z<*0#9bS!EReh2%S>GjM#u|-Xi@_J=bVC3&+$rUmiy`hN*_tG|IiY2r0>dT&~J-*fy z!V+47?gm$NzPxDA^v^?jZR%S4vwKHE{K-@cdP{&%%tNcj`zO2zS39`cnnvU>lOoB9 zg9+YJ3i$kRyVhw;T>;?ra^kup%Q!jHUmi>X;V0+(k6IUs)x1G|cYUJh@KOto#~RTd)yMaQm8A5vI#*q;c{!KzAA`=NND=DN~YJCMw{&HPTFREUn#Q zvi558(dM~W+&Ns#+$-ASW0St|GaQzuYL|UjTBnakV_>SpBQ@27wRefF!?hlV)?AkhcE#Z-v-ofseXQ*=pmm*XvJLIs%a!{pHr)w)d3?pwIQOt%iJH!ZP^=D zX|=xHtODQYn=(!li`K@eC*4Y(W>rp3LA&Fyw%c#r-c=&<5jDp(3pzdiE~k$HtY?n; zzv@$f*t(U70B$!h$&Y~cVKTi=-k&>Xr^{lkK*QH0^C4n2cf69PJ}g{WdZ_SV=LZE+xMskDkQnu@>mB3`6=4;xLBSAFWXS{Dnx2 zcd3irK#tsQe>9QY2YYLyEz2Yp36v+c)Qoh-HA9YiW&TzYl4#Tt< zWj&4;O7i(GXnT!mE3-<%rlo_RKEERLvvxy>=Ix14AWSBcYRp7JHS-T2}&s+VGl@_IR}Ea@c!aG^PvW8rm`|o6&I1*-#Y5#m!K?h{i)gPAvb3sD6;(KB27R9>X^=#ps@s?&eWB#1- zG|3@yKv?p>26!N)salf^y;m%$b}6Q;YG*4r>c7Z9`h286T1i?N%b$>* zOCK56w5YWM(>UANL_mB>BEkX!oW^K7Py0#NhlDd9%m^AVglaCTWGoTbtFP)i4?a%L z(f>Z`YjWc&^AAq&uC=i$r@BDZ!iMzq&@S=0cWwpZxq3M~Kr=)IPC!WBtU2tw>9Xurb)4!FADS&jW$~t3QKkk3W#bpdeKa z&Kk!LCq3E*Sh>(Sfj23k|F)7j=yMS7`lH#vzf<2R(aIm>xS-I$^;uFmhgP>PA~N^+ zC3{bMUNs1#Ylvx_8iZZDV(vX4FVz#yS==K$bFRFJN2{vHWa^?YBpxC1kD7$7YfDd!l$y^=>4>j`_!;38otzI9bCl9!F2l=)7b!u%{QCn8mPspys2cOjuj|qu# zuXOPi@t%WwT)kTl__S?0Z@<0g?S2if6^eO|d5Nha*IE9(*8KKh@41!hPpdn8ss5X1aU4O8`%UsE&2I~N1Bp#Hy52L4Wp~1O1@w%o9}x8-wtAhq zQ=a6Et^IPKX|5IK6zf($H~pLHs!OV_R9a*@Fd`7=Y+_og=$+xOc9R-zFcrH=*2p!#Pp%a}ZJ5K~P@WXeMG__jd zZz%=j^i2ic{p=;#ThAMgnK700F;lRaO?-!a8*r9xn&|{X6@wk6JBFBMVub%Tp^(7bR~T%G=OX> zewk$@+42tNm_EDa-@RuO{XNh3-ES9Lh@ABQM*isPfOgt#&ekQ&ZPanpkP`*xSGt*8 z1b?YvRy+drBQ`m#-o9CdCO;BCBO;RBT}2?xLoFyrgpN>WEbc7do${Ok8FwLN*>&bDBqW*St@zZ6n^ z#3TQvF zq~b~rjgY_?K*VB-)rjWWMe^F2f6M7gAos&{&*NbqA#o021Gm@vCv(L(O$$bF+jABt zi_6{z+{Y>=q%>GV5v#3gje#T#JYIa@T=!2TalCFW7r(vG9V zrs=xZaaORB9nmxg-`Tct7~CHTaOQIC_i23>WZ_AHi=QD21ncz3R?XZFIyv#T_LI{#Pq6z){A%+H%EVWOj0)D8NLlw=bt>8>KEkBBGcM8lm>E?}cd_DifB+%{q-Aqo>$0ajl=YzNC~3I#%Bp^Bw8CD6mn_ zImQ9-bTsikOV%ZhXTlP&rVIv{II*%;Ui#-zS6wz2b;hPWMl)?t^!~ayK<2DXn5X4U zPAUIp8=?0a%x*1zncr%a4?j8T9y*mO-u_Gq4pTJ!9=ws58PnsJ?EGnbaeYx*9v0v= ziT`Hvx<$QecfERY|LbtIOd(CvRdfhix$+dgJfJ6ie$Weha5#H?B!7oPGzk>}h>1_? zkuYx&Q9rz)2I1hsY0{eznV@^RFi0`_WD+w*pRqXfptEQxQPV`2Q?` zmHeZCXDG-;AL>zQTHjvOLuZOgfb}1UP&i#vOPO3%%bf0pdp521?Ut8R+9|t|}bhuvIzrZug5^1x)0( zTbF+ivbae96?tt2tx@}0H5NA~_3!)g2SUH4Lw$A>H}bG1!0d`#F&y8HWi(w(6ANqm znfVTz?RzffQ8*f2^kQau#}5bM%%x6_fKNC4&DwUcFJ+PP5xkyuye`XK&ypKO_mey1SC)qE zMzZ>c0%z|kbZ%p(7{r`2`s4&@f_$NPcn{c!kg%RZFeqV;51=ieMJ)cqP|*?bGo^`q zQ%w5jAA(qIQ};DXo@275FjsBO9RKT0U!6oP=5Qt@ExhYh^Kc{Y9Br$aY^OEwFR-lK z2sZmAYh=@HQSW0@f4W0`_`CgK%S}CK9#u2oan07arr7D-2OCV)H;gu(R5kVHPl;7! zRS%qFIy(DRPd90&_4fQyn@w}Agri7gNHKREAaG@3B3wi>r6uU^;K~|w@A_}wC~U>R zxggHFs-_$Okw0ctZk(Q@2Foi?gzC4R3@}@Y!NN-ADN{ZH*LjNek4Qqxi3U8N9w1D= zqZLCtgmQ;*KaSE+$#|`kyxlx1;QeE2r0hLv%h7*wxuP6-tCF^pR&PopV&bhm?|5^3 zwPoZaAJe*omzE+~jU=gqHvwBbX4O;;)%5yG{2QOnO_gMjxd!25Ob_X2k+ojXJzW!s zSv^?oVBJ$zLQ;;)mj9sZ8YNt)Y_F;k(vHqh^7>$k*E_o=M49Ho*F?GVd9V!}o-4aJ ze{*%{-z>?-?fHO8>YC@3`suk|#_c(}Isy&$cQRlM=l7aKGqt5R{;%I`iJW$H;kr&|wd};GNTw}Z8P&D#WCwy21J7U`iH{e`vGP!jZBEKPmleq|%WtCK|`1X5yp zpwt|Cg=vG|-@K!~vByO%U%AbBf4EtbJf@mG9xwvEOO@Ebm-gD*21AxMO4+JkR13eY z=3x>S09ncIL;amkZmkQaveYZ=dzxCyJAOrU%JwP*e!ANBOa&x=-V#)%?)~2G?Xopw zBRA=mTfS7UrM`+nOO3(IV)>3O>=7EKcY$Dk z5xPPQ7cAUk_dR)JL1*diRC9pBg~-xA%HOJY1MRm2S^QCrdv~@UsSC`@>eVcUR4H!& z8YY_ziZ0YfS@bwey2=YpR+LAt-E-hz#YwN*fcF~f>NPE@y_3RsXgq#NwEdbWiD5=d zqn<|k#3WYXXXw2zi({%e3m#k?3+SZXshDHS^JzHFU+ZP9+Fr7;HMyu&Xf*7!Fn`G~ zi4f0fDpe%z!hvoXb6-zH1~1Tiu#_HBGl$eZS6J9CeE}Hw8nd4zCGT<0Zc%1g$>ZdP zkq|1{wc;FCs`szJUnv_*$m}-u5VSc;$_1zT3{y@FCHWKP*z!Ba#U^Hx@v)7oXRuV_ zh$<_Hv2#u%{7jdhq8$ul<<4!ByzedYv+$$N0iv98(o5Zl#35qi*7b+*b@oA=J~FyW zjK*&>2Eyou5Xz7(xwPcUO|ThxRr*=95Y!xb++*>*Y7SY)uj*GZ9Z0A4J!}llEONV4 zbU2cw`BpWVu_upQnrN{hj348@9!z6rr8@j);*&IcfOx>$0^gL{9&Xv{gXCNAcJ{*J zf*4)3i%E7Z-7Z(~XoT02%@0DD3uXOo(zWI4g*=dj;K07a=L;ZoN&9eo0nNy;N|Coa zNSAE%E@`FbC{^;Pw9_Q&UB~^C&TylgZXcL{XwQA?-4N*ErKs9x$gmNEZJq&Nv-TyX zsr4%;NdigcrQ}P)VUn!l@Pv4=7z&KgGYGG)n)S;^Y?#d5o1-i%`kQRJUBd0}ds_X# z(hiD~Y|sIfn^RRT*0h^n-Pjive&<=ak%z`q%M|zpos!ayf5U`BScHJkt31mz*X{VF z?NIKewOyWYf2NBfC;#GhsTN4YW+(j=KNOnFjHbySHcN&8(b3K}tVP%9jVV6o8#COz zZ>wCq!DGaN<4S}R%Vqf?#7%|sjKZ+f9(Uu#y07xX_&8w!;L}7gqwW+J%$sTf2P6{1 z__0_!7IBVXRzctNH*6&z$6dLRs#?>0@XAnNR9_Oz;~0hohCcS8Y)3RK_44oR6`^zc zR1V$;ya4*bNuf2E3sR4=1)rH^_^Eq^l13Pt3kczvvr@XF;mGt**kU&z}DjGR4oX+M*G-0BhQ4ZttbH+Z-@3Iofn!N~2T+HMvL{=2AC?HQv2 zhxI!ICpn0~K@PG#5h&x>Qw&+ZaI{^w^W6nO;9DxDpA`2n0Gi#i4gN-79$6&+{An+! zh9rgvB|ym`P}^%!V;x`cV7A)ddGQKd*2zHq(}h^ZD!SK$w8X^Ip53F!gL%Ept7^8* zuX-t_wxwpUFAX5;25NMHD!8rCk0Ot&-t0VrZ#-6C4&IQb$p7v({5mr*a)C3&EL#?H zHI2WB(}i#ei%_xGmnE!s<=c_vVaB$vZ?5g`dJj?Kabj^5) z!){3-wwdL`H-YOTh$Z5<$2z;ij3mbIZ+-UE{>ZHz{KNe^SL;p(7yo8lbtD4?8{@k} zU!^G#26rB#LhG5d^QBsgA0l@~g313?N67G@KTj&!TLIBv1IasYtPfcaWH_VqEn9Rc z1(}Wm8P>Pa`%LRCg-COd8lAGY1cDwvQTAGYsqDG>Yyuk?I1F>IF+EE;M$_SNMwor~ zLQ8l`OR(~G!CY9rj-cznJc(0-)(fIuRfeQm%5ud}20bDUFJ z5(UpMjnpG9obW823<>-1L|G6J$5b($y*M}zfcKo{_xiI8&5b&Z5V$+$!-516FIF8 zy6TnoccVmeN0aUbTuQMK>CtfmxXS2ZCgu&CS+Uizo=sDxeCV=@-Kl2anHb7!Zh1gx zyKtJNY*Tx&ikblQq};~6NL+$ztitth{r$1NBi-ZN=IZLC$8D!bz=d@HA_ZdkgC;fo8?0<(`%Q5J)86Ib-RZV(^1jA&o|w~~)Z^g6xC9f2m|&!L8wSkzw78q3DUqzd zVf+HhB;rDx>W+}qO3~FjQfFF2ue=mSyTSE;aH_r*4!F+yJ`!FbJ7u@EXcE!R)vrP? zw_#xT>1GQzE|NKTBomU%{qiU$<5*`F`C_(z0>lHrLIe*kXmETV0iisn(mNM5s4HzeEClw%A5qoHW+MTwMF&{th zp29}Efb1sGq__1_78p|`fsAE070ckR!faWNG#vIjJJmac>Gf7Qxlh=&R(14CJWq+7|S}((T#81$V?@+x~r(HU;Y%NLXU_y-8se%f*hGglxBi$aX&<;|!ZT1mWR+C* z2}1O0N@n1GOgEa+g-+nHK$J#&EB-9^Gexh(ENBO@qM`@gFbcQ6zocTeq~_3c-78Ln(7q2nfjtNBbZLDZN7H<3?~3nlPvllDjNdqMfcI0v{d*XoV zrl+S3M<0HoJ+cIMx!&86xL^!yznfRASSJ5`vqJK&)7c2&@HuUZnN)@Pp9+G6B7p0_bD6wp12qvuk{3Skyv^TDhY9w1 z2&nZmj!o}S(5ODztOpq^31`T^JVUrB@> z#QW;XlJ=If;R`D>*t7;7`>jC2>mIYL>lgLEdw6*Csh+8S@gptGiHl0~Yn(a9iZg|9 zk$M7S+80Vv81FTGRW?1NN=|CrIrOxWE@5lj0HOtl8hWr%V6&=FpC4UIHgiist!Zbv znBtc;Fty2sia9pZZ!~}Kqul^@vS!(Bp{sBr5TW*QMt}zrKpHq^+cve-Rk=Vox`jj@ zK2ug!eDlF(G71wQtg$Zc|6b|svI*E1ye>LS3V!o_x1gN68h&f;I&$);HG;d(-%o$P zoVoKC)aAehgdPKO1Q!QvIV|nasaR~L*RQWWjH5X|Iu%St6q$)nqMq^)hR zVb_ES*Ji}D^F1%_IO9|<)>v6iR_34zom_p2rV#(E0Lq%?#8Esy@F3x+&2o-S%e34-e{YE-241j%LFhMZCK)*X^&W%s)V9xwvFp zU!R>%7FTi%^}p>*Q;`#3Z8;&ox!!Q_RBp|pq1?vWB&p)=hNjv^Fv0zL_j$8ANn|0b z6WP>-=)jALmVPrEnm@^sRTW!94+)o~*RT6^lKtTZ||=Oay5Ja5-@ z99l}s_n<&L5l2D?Izm~JpXU9Bm@IH_ke-dBJh&3ZI2kS3VA7Uz;W`-NaTa}UuQg`j z|7bc7cQ)Ji{|7Dg7}09Q2&&qunzcuaR$F~aX&$}&lkB{1UaYt z98llM5oDofiJ^^Q*#EfOU@%V|+-+!@ITq$8d5`*dVV0F!u-@wi9=P<>L}3@`#(4%) ziL!r-a1~#pj#*G|cN5B+>yCr_I6`c5dBSJdcuXGbnpJG1qbOw>j4KUG;e#B*Yb?3= zjYQLxP^zkF@7GR6_(tllzi>}$gczCCNVct1ec0a?8VyhwtfZz?(#YDOK%SrHZi+Qo z=>fj8!&HVp2QBJHmwr=dbIP0N#GjN^oO}`O(LQIwCMw_V#(3jY5Kk2$*k)&$<~mpx z>Z+QxwQ~KuWb)O?&RI^cpkr<3RjE&~bOi|vR>jpK%~#yS z8}C$0?9g}<0l}C0;jXOig2)keyeY+NAt`(T!5=wtnLl&s4Uqo2$%xq}tAjwv>B;d; zMurnpHf?kNG^AE>SDDUa1gUfFKRF6szJ;?qwLJA})}bb=dr4Ylgrm45H*?&^`b8~t zMRj=v_!Ib`OzoPJkgW+z9Pmzg*lZ7OwwYZam}Ge6HS56s-jvHspVJ7<(#`@5XrD;%A*EFmPNS|g>TXtrCF+vcDSqQt@9F=zU z>qH5Vk8k1Q#Qqwl8hAUM&it`I)sG6(^Yz&8+eDl#{{36>{ipNyGQHWKYo{Dy$9-v( z=YlpFmPcGGjVVn-)wQjU)WMK7!>*tGaWqg>IfFx;L$8@A#RTZZDQUe&!Emx}G5BPI zypsPa{&=yv&}Vn~?~{UyU4xl|P9#Ng=C{bznRj3Lkk0OFIm?s*L23AjUo!{5ME-nv zYD(eE%XcBeZ}?a1tlEPdk4|^~ZUv=)EnC6fyf=8n99E)fb{2;lQHAdB{lppZ?b|LG zTb#M4Mazpb_-vJQ>0_$P>K7EYH5(=)n&otT4ZTd*AxhjuwDEl6=|wX`;PC%Ws-huz^K38AOflEW zL`O_^WUeP%qLv~?GG&k>&Hv3Z9}fqgTGA9x^HXuJG*OMwcE_@jQf>JH5MM!XlwWy5 zgw*m>G@eaz_uv>68H#)$5tL3*ig3wXa=Ci<6?rcddiJAd2Bu0$Y89~DJbO-7H{8sO zU}%K6ZqP79uY^Dcs7bt96gk?9~^cqvm1dfrB=b zB&HMPTkAL&Sp4>$U&#GV461Vf1L}Y7V>Hjf?`E1(AD+_)uUhY>bBhKFd9OFiW1|yH zI7XJNj_?feSixX@Y@TDC>mycnRsMww_gq&Q%nrHz)ocyxPr{g;7pcsw!1A2O>z8|V zSpJBb;2ScFRrcN=h2&kBpa> z=wwx|KW%>_bQl+&aq^|a*M9P8@`bSOALDPssw?oaE*bGn ztEB3sGCl=W<%1=HB>2qo#^QQYQn7o+7oPhiN<#-8(MhaA`)a-(dEhzzxx&cKPuUwu z`B?~V zn9{VM@|a_M7;wAoRr(pTgzkysf&1@E>TBIhaS(=aIgo2w|Hp~ROz*>gFNK+MT*9+{T-cpE9$fGzPhQt%+vu=-beY`O#gxyBmX(U z(kqfTO!-mghqK|H8PvebgjpIX2n-+^$1?w{EoTUBTH76MU869#_v)@NAHr>x{H4=0 zxZfg{k%j3M(s>vE8kiQZd$2g>Ew%N0kP)gf@;Mz&*n=(eZR6%a!L<1NHsY$#O=nQ2 z;VJcFYRW0pi6w=YC4qC*=^qkeVKtcu@=xh<$XfQU9PgUK7;ID#C2uf*}357H|4DVSJI6AoV?X2#a~2oKWlp%DC@W>atOSw!+T7Q z)uMB$7+JG?>fO4UcEKc3Ke%-?GIMq{j?mqxL{AlZ%(Fsj`*8HMg|72;oj1V0%ac5(!=3b6;6w>1p15jrx z<=Z9;$MVZB4oNwHlVpYl4F4}ZwiK7|wIibfRU$=r?EZ5&Y)&q9&*MEkM>>I|Wm?Z_ zJ~$PU#ymZ2kB`;?EkHPh3|i*Z>P#AuevWh|e&?SzjDz-DZ%C9j9@?AW6q^iL+u3#H zj+j@(bzfUADk0C^c*b;_hNqk%is`ZGo>+*hirttLGV!}1eXP(227i95<@06rnzaDO z%PyC?0!~*7ObsB#CnXl)+?gG&@pYizb6m|%5&h_U{Y2N~X*q7SYHiO+Md)}a+v(Kq zb(NkzMWgZ24_%dmx0XlgC~^;x8E|a%*j0KnwmJ{T>;SGkJY>I(F`#kjU(hp4_bY~g z>i`<=%I0CAAAu1&DdAZHpse4<(=mYnl=brP6{7&)mUs1L()6()jpo-^zVO z$*zie>Xuo@&IjlGk?xNFoW@0Nw`?*KrU*ADNL`^3di-qFpdkO3h-fqnoq z2??rK@dD%qT6lTbLfEhE0wTeR!?TlJ1^!@G$I8+|#37GxK3z~T*Q&>n0pCANLoRJ> zru(3r=e<~%Cblsoo5=Vzr58E2B%6J~su)T`FKUeos9~wv>Q;RzUd2TyT(1=`eQdP& z?}ron*$WVp|Kl0ja2p7Z!6haM-{q&z;%z)LQD56vqwBGRNJJ0rLx=Iqz)(+}J&Mld zs@kQur6^aO0{SZhL)uJ^#m=5uXL=_u9gh7nq3Mj!%C1&)e{rsNj&Y-`AQGl}d6E_Y2nWn7#o# zCu}yYA3Ub#r;9_ysIuSF)!6c=zWP#8al7ws2qu)am4Ff)5su;WcrkUF2Ak1K+ywBU zA7PMulkOFLI_;;IG^ZEocE61P?YK)f`oI$-+$uR!)2|z0Z@6!dX03ZSdm@WI5puuj zn>42sb|K++jHM@YM+%{sg?u22F}fgH<5#CP8)a+vp?o{|8T349wE*2)JrdzlG}By} zD}ZpSX(o}d!-N30+|+M4T3`g4v%@G&)3erbGh0_&&2z%)3{5d{xnq)_>b=|?#`9wd z*iY;KyzX5nK#3#Gb}*H&+K9%)*PvruJ|CN`?XQpY`MdbU#w@6R*UPwZ@UboK0r$BQnvGPD$WhsO1t z>ichIi!}CsnfpBuz7l=5-h8kZ+q3!k<1&bkpK4m|-He&HckHZfljIP}S^j5HE7X#( zSAn*;%xILttoMO(?jm?6_QT`HCtM+nWubvBekwcLi$Y$CWo>nC;pe`8=O)6GyCm#v z&Yn|TrCUp`!Ae^5&}V{?km1=UFBM7Wznge^l-z>*EFT1Mo4qO)M*pfI=zsd9@gwss6OX8E1-y|2tB0%c zzgXm_QHG%CXU!^qXGb6^Wo(Q8PJgORstymW@6(KLL^+mhB}Fj)_6zn-nP6N%rttu@ zrsU_00g?a&k^R9!OK+VXL_XtDrkmVn#&2_Mp4XbEWV@MYH^+}A0><-{Rx*jgSXXH! zqo&R(Zoc#W>OTzPVk;MybflHb2TcC`&uWsaPJguJ8h=esMN2z>17}J6gukd;LEjO( zODF3Lm2wYCFa!Pv-Jn~Cs#i8lAt>*_y2rEQ>jcQ!kS;}Hcdoa9e9-$Ao6Fz35`yj= z+P%EkO~Co?xcApTQH0ED8g6Dqz}Reie}qe>H*bkau&MC{YnvtcJs>trI(>sOf;qfw zJ@4AA=?CauALl&!_Po+&^nYK|ck2X(T$FcfvII+?(qalc=*>bzeA`28ZG~BU9(0p4 zr&g9_!GO+#ShrJ~@BNb4lhhLu2uN_xXj7Nt#naf#n-~T${1s2=VioLuKhw4jcPI5y zppB6C_Z7zCOvI(FZQWV*5mRWZssOTpVeAc&2_ z$MYT1jvyHmma*U>tU|qZDBZyZTia64F?n!aOTeMX-NUQbG+b+7zES2@y3nDUI*;B& zg}h%z5DD@p(g(AnKJ7SKe3e2}`j|yUpld2Ae@2FMYViVE@zt>f?W3tQe{dScYSSr7B zwYm->N3ub&NFwo>!sZ9NgMG;QTqlJ0=YECW;nw?~Gv5Oy7daY!Els3pm|AZRc|=qy z%(RxTx3&pO7gj=qv9-&JDz1o@GM&yx`)j19eWyyE^pdgQC#{CHhU!9Ht4{-?(I*4h zhJY)>t0R|c=$zQ}CXfNH)4ZH{g}2MR{jt|lcx#29wvIxjxiCX0`2HictmQZwjL%{P zO(@;YzYIhfQLn-_hkqTfZAjLrGMZpFuf?(Jn56Y-1WBW9$zm*hW=6zMZP2(55Z_0M zFP~WE{lx$ec4mhSy?0-p={)sd60+}|BbKH5lv01;ww5ky6>4l;FWpD91pX$CQhT>tUZ3z*Y6p6JCZ9nZ8eGkUmv;I`gs2m_PCkyLuldVU+y%x zhtI7FeZM1d+8=MLXOC0{HvE(WQx81GXvUXHwP&mCO^<5d(?c;!Gah4a#;=aieaq6C z)j5Q;933>D|6N$%d=Yk+K4#2!fC28he4^(ik+5!Pe26$z`%REA;|lp(D`+jpil|Ve z{}q9vmXGbM;%6Qgs9LvC_~P3PwRgacA849?G)rF*{m1aZqRCss^iCEN38#@inM)3h z_ce>k$_25mu#D6zZa|WOFcDWMP0jnyO<1kjq=` z)5~a4p?xtd?0lg#t&-Ocbwv{-ctii1`=U;|3e&^d{1(uHFRy=zdBZ|!?jsZ&e`#yk zb=$ZNOYkR4ACoXKZg@$6Hc_2}mU>>d7aL${GGSOBC)&U3{BY;4Bq6+AfRU!R46+6m zguA345{q+pwf^mqu$s!07L8D{nD`vX45UjxY8Oh*Iscz|>h1K{x0qd>mo-MPN#y+aedjjA zo*0mjpwAk4m~Gl3w9KBZ$HdSZ5|~9;vY5R3)z0!^*yZ`hu3vucp29ls3OGG^t|!7% z^yia9V7X>AhTqX`wbBR57b&;Wk2yTE+kRRHua+r=frHl)ucY+sZ3Pn=k(ZYtbtfN> zfkmTc=jK1p*4k~)_WJC1z!~|ee8k%Y$EF?zkPT%c=|Q+^!>6(b8S|4n1hcDPCVCEf zB<^OnC0rfiTl^6QtdK-^zaX{sN2#p_D^X_>^>5`=+K;kuh)dFR=yfX%`hFfZbBMU-p9g_mS z7vYknG(g<`eId%Sf1gJuZ!Y&ljc^hLRVYjE(B%@_}^Fy*L{9 zisI^wT({jUb3Nuvn+ma8{GOwNXDXQ~JIvERf9x+LerSeW@%dRGIqq}HswzSOQitZJ*k%7fS|4=|;M%g=8H?b>5Ql<=hRG>4!D6apq_$b!QFYVv z5>pMxJ*LT^Nh8cR-8i^~(5w+t)?MG3d|l)?VYxEZ(2}tzYpb{D&m%j~PWzj+obggsgqYGl27ITlSyN6q4ixzQ zeyFcQ{xmU~);kP;ZpuoY06cQWhi`Ykbwrwq=%IhOv@Igy zki5yxHAQV6=R|R?v&y5H{h_w&FwZ0xlPCMl*`Jh-jfAj-{B)uAz-sf8wb5+1T}<_F z7ulEZT)@wV8c+3wi_*fqcElXsVOc$->PYR*IxoWMjm={aF0ZP zBhKO%02t_#kPfna^$so9d~s~&$#r>&*4p+j9W)Lm^B;0&Ra8J~B{R67LibW$r9zmB zZ#Fnmcju)e{~P@c&Td-fEMWgV!%-08DewEp=2`tO*iMOwbx*e%JquwT>kRF!w?l=o z$6C;n|BjEk)XXAymB+yzfi6=$o5cwqMGjsWZC@g$qSp(wY#VjZe(UCEXCC025kNYI zxj+Jch@h0WzNy2D%Gdt?n+uB7xeGm$io|`E*Cwh-R*fWXecm?Md($?$=&JRVJtO`` zi$$JbI5j@=ZlZdS>bS)|`ebwFX2N`Vv?Kz*D#`HD^sU^(nTx+gezG?v2Hdu7KGrk0 zio<*#cs0M=l_}@_vJy-kw}i~+pKUG<@qHPxEm5EITC!0@f&ze*D z_x`Y}eR;nV=85^5hWX_2=qD6)uuUd!l43^L8{A_2HiCQ>^Wslh2&ExyIq1CA1Czq6 zgMIpcpVv%X%~UHXgKtfi$m*VUbIo|SNWVC4O7hNB;WbcC+h+cwq7)H6G+Ai!Ack-r z7(f^((WB=#R8Xolxo_YFsEor=4`Su}^q^d$)NxWFBFY+LAqC_;k_D;`NUGRVyGvGz zju8uzKNAqOuKO%m5#^=gxdO{OmpzjgCzF|>)_3MvBs#<#&s|Zi2g4x*azoW4j|TGV z!ZDf&>9al2BDdiLnAx?e==?UvpMGU4Q%6xkEFA0B;AF-W-Yb=^4w^|J*i!Zc5@Uhx z+LnDXTHR!Id21n>VW2ZY`_k-S#iJ@zqSJXaFwhVnt9-w~;91SU0|tamO;yT#Mo<-s zT45gXBu!JJrH;FF$3KGS?s{d&oFQg__FOJDjT=h-1CVv*q?~z^>U@Yw$K&P}PfI~; z)<_oV&h5U}WGf%UK^ceU_{NDezUsNJL!$OS3fy}2IyK=Ex-U3M;DmZGj7I`n^?3sR zIHu7#-&+8+ous};4yjvuHpZKjDx%9D#^1KKdXLkh=#ng-MTjdSZTsy@Vg>K|vhW~@ z8u)3XO3yYWU256gbY-}Ll(sii_Nqhrm9eF0py;7$eXYr%pPW98$w~2rhTA}=Sc{^x zn^J_4NyDMCbnHEzOXKe$ygKcNMB#J_3uL`)v!%m~DkRDuk}7DOUY@(|JpTKJQzE{C z-oIPBSEZq{G=*)EuPqx|Z1xA03%ObMD;ulbdBxTsR=WK?5}Vhot> zI)leB76Qj+7J7&k*&PJ&65ZYeD;8TyW5G$Vx5 zB2GiZyLcXQ(4`>8pCw#8Cl|U_eb=2SDYg{)dgj)!w{XPcmj$6V;QL`H^p6)QCqMl} zDDvHQZ=i?XWV??OgC(@k-NaAC_lsquk>=Ip0RKn)hsOw8wauurh)DgvzyIDaU$Nbj zk6RfO1<1Wij;y{x_c%SjmF9;wr+yRU^%bNV-X7|*{5Xj0dj?W)x2`b>(S5$o zqCG&BtFW$u-s5w2v-KbLxY)yHFSA&d+a_xCIukY(eKaPS~=h*J-h)+ z<#w}(Fy^BM`NCVqqnz=skuF8sArNzgPH&pckl$&qD*(DdX?3;Z89gY&5WPgmKlwq1V+g$ zd5vXC-QJc}x>02DfyUK2Jsbtl}vBoV5l)>XjQZ)4j^Zv2V`co_Y;dgP9fdHJ^Ta?=OpcGZ;4%ZU zIyYFE`KW#bzMfx_dbP`rxV^kN0YHos81qEC?f}1 zvN$))d+^{(lx9qIvGDlo{y#FY^j9B<>4enoy|*zuYG54<2x9ogBe!W&10Q4aO+Diq zJ53+yL+!o4pGFD5&;x4BvV;pTsQbCugR7LL93V7oOhT7$X2E@XDlVIx;Ib_Sy3^=u zVfRPy{u8*saqAxgT;~i9%0OoE@CpM8qm}kDds8!IjbbCuTVZL*^*{w(jL_N6aNob@BVg{He};yWVVEd9+}gUAg3r$(OeA2RWHW z#Yj(o<%J|i@5qh2$#@xYJT)~TyGUzp4yAdjkI(zn9xNzA)qEw%qqmt1JKvNcS?O5Y zhd?cg)xj;R|E50^RW{yoTe_yX;JKy9!M(K8lww9V!02>J(9*0!9|nCtnG2kw&3L%N9S|NyquFMEWPdJRJDwmXo@qBq z%7s#-!*wEru+0-Oc`0}RZv7iwnyWqU@{;gow66g+4KC)mpkD(&xiqjigPyzo*6y;9 z?)@S3%GCrjN|610#PAB8^j3CD^qPWlv);{|tSLtGW$QQ1MfIfh*m8C;3l^7Iepy>+ zH-XsW^MPG=Lb0!){g~Fj?VD5Kj);@e`N~xAnv1BydW@(xi4)1XNAgt-N_Rpp5R~U9 zJAPA4M$Y?oolT7MX=d(d96l}*)orICu1gu~yX?)r?~{jqgj-l0pN-kj_&?eu+dNe) z?}W~i2PFWa)A|Ay^E!NZ3yJ9_B0zH1EBQpl884BRb=`f5 zRQ%PfNE#Tt=dsGpR8En~$y!$U(ki=(4k^n;p>?q@px9#PqApujeQrkXF0<3euUe~N z@XPjWLf$0JS33XH@Qu}pH;S1~%M`4Z7Qcy^qcWX(pGarJRRdPXS*IF6v1^q`Uz##L z7DSEk%iFEgUoI$DzE<^KL9w}3?n>t8h({*4fYXJghq5?LxDg*1x)hIM36FFCy!mrs zt@3n-&0o+`s*`fJQ=G<{cv~PwLDwZ!U{977a^FD+opCJCI5YK1YT7Pzp7pT#R$M^d zgd==`5`PNXe#QS`sQXSdU0&FAj&Gc(GpfF9@PGNSRmOnbcvaG1)3x2|Uie=XeBE{D zT6$ZC>7Q5u7xzkN8Q|;oWj=}9+}!l0g#ZTt1d2BVERIVbA*^381+OwU`>@R92X9`o z|H>aKnrQS+O^F6B|JnTcODwv!IlKCN7o*}%FhtQ-k9OVKfi}tWf@-v5lkzHbN!$jR z0pax_Om)ckESC3`qJpZxuPIUJ?k=bbJmi1gJv$)^ zpqHfdmxJ}FK_kg`YP*19+|Wh2JNji;hP!&C(8tCOm@XcCScjHTi=XG;84nVE}y(6;ffK}bu zL@6*$kdl&IeZS0eG;Use>!nu~(p{4S#LdB-p1w~lXe*&EFV_Y6J7GRs^qknk+jal= zaZrta<$Km0($xM^zg~QK?N4zXGsc_%sIvFk=Lt67-XcDk^-_%}UL_Q|o7O*##*C+U zTLh>Y6o5p9s~>?~I^Aajf+)ueqY5+00r6!H#~~<-%OaQUO^R09s!t9tf-6VGPGf%L zw2&{rZ_98O=DrR@;^|JTbRpvZ#HDnKgCn?$BPG?=cm{qX%ve9Hm) z^bIi)>yAGDK!B8Qh1iR2EpM96A7OJ~)~}_$x@wOHXjIIu!k>T9@BwylH12MGLOFlq zgAWUVL8jZ^PoW6|;(kXCx2xRy3`>|Kn{geFbi{G;GnW;Qg9miHK}AFSi{FW;zk9Q< zbvBHcyooSygA!`I2#znnN4cPkSTXoF@;OY@Cd^A7*!UazJ|t_tb}qbESGt>M8KlBN zP21K96`E{Lm^q|gTn>;L2rF?VrGKXnn_?=X>ObS*PmYjjGJ~ZyiV#Hmm|#Su>xKXb zXEBXz$Jfxha?l6$6fqluT|1itX{0z9)UCdh%o0;jiy1Dz1kn_2r8B_deny1n?>oN) z`B&DPR`|OI!VY>zlsePIe8Loqylr_@L4iPB4c!KJikX?hYyL3C`UAZxIwe`0XK!hk z2PpG>3NwWj(*f63xd!nhl!fu+_TKce6TToJ=%jfoSJS#i$DslIE7+au zohVxoh?#kHpU`oHuIu@LUjCa0<$KnwC6b`)P4AtjaZ%{CDQlk4H!yflC{C0ebVr`m z)il0}6w5S5Q`y15KR0W!M5XX|@^V>dXR#!7!Sr#wO8jb`Es;^9CC+KY!Mvre;w zj_sa3*>sh+HhlF?^V>4k;{rkr>dRv&2L1wO)H$TrC23lJ(ld8PYVV2pCBx7e#-4@y z0LXfF3h>Teq@__bQ?y(0kks$AzR+e+!uQVHMkL^!T05JFx73aOd5IR6`2M#P#>E#a zzBa%9*6@Z(Hd6N@SuSQiIzip&{or5Ojd5Eo)x(We>7E}7Zw&cx5Fgs&g{iSV5nQp> ze236hc&}TntaEDXd)B#oF%phUb-ZTA^-lE%!>{=#35@9nZYVO3S^Fb?sMNtWjj+%t z5YpLW412!JV8V?rd;}VQ&R2`QZi8f{`93Afa@8`XP{ah(BsN{JRvB32z1fkYo!Hju z?#AFkS%aZ1ZJ#6{w!46xX)AapQq4PlJ_h{yWxu-~A-gPw1QsDc2;bZprAD`GDYC+^&*uRG){+Tnmk0 z!&vkMNahFvO~FDz@zpk74eJ?0vo(Gz$Ia1Mgc=y0=QQABN{+V~u6T0!77JT)jt}Gn z+55`(&FZL{_=I1lSD{CpFi?+W-xJ`x!#Wo}&QLZll0#Hu&KQCMziTJdM<2BO!-gx| z^kPv6VK0g?B_^50TbpRKTw(Nk#N0eLVt}PPtv+`--MvUbb;LC-sFdWGm|bg=Z>XhP zjNyzaGQ&%VIgUIFVwZc$B<7bNg>*NyNv*a&w!v3j)a{2DXxL2oJ9VZg%!&b)O_?Wu z?V$*Zg`e3>SJqnVxP`Ws+bX`sG3lI)T&$EpBbfZ}|FY@b!pwg>0ZUjHv#v?(#IBqS zAX)1|cgLIc?fvs$;&Ppq{BjrcxDJVGi6-QS9mkchmcH+eSTC-NKK=+^fKYvlLxgd< zpinJye_(xb5RP&46h`blFH1Nr1(>^7N(K3IjM}DC4YL$xn%tO$R1T0e{IEGto43aB; z_&C|%Ee|15YFwNmHUBGNGdq5FxJs9068I%W%qT2Y;R+`VFnKTBAT?m+10}!S%YxKe zgB4M`GJ3ENrB2}82|FWZdt$lS1#&C>-NQP>OdX!u@C0lD>%zKj`$1Fsx82LrigVoJ z(YSFL{9t#Q{|x^5s*OwI%43+xalijh_qv+OS_iz5^Ye?@;YBn9r@;#u=tC=t^JPUk zlbGHsmv+thTb;#qds%PjHV*>kMf_X-1pgHmO>es4(tgK_+kNrdW0#h=RoVjPvKHUF zFQy22FgBAE0iziSuyq;lcx)aa>Gx$q<3) zYjrj}_3QJ*0j()T?$%J@ux2CumhxeGheHB@W!6%|YHhnLbd|Uq?ktlWl(s~NQGsYG zbwqK{=L_+Fy9%f&NDGfUCVw%ibuKnXlz#59?BoU%4q_l6QLrqCGYDNt|4yczy$43VGj@kF}U*lXb zZF2J=wFPz%?_@ac$+tc_TdM{be$uD`WYAFVCh}+|L3ns_HShC7bYnLjfPMsH*B`Rq z!NN0(m`xaT(FKt@2HZi?qP65^xOTF_kxmBc;$U46wEU|P^XE-D@|E+Wb^&C2Q~Z-c90V?~G$t)>tv=H8x;~yKaw&6D zA(OxrIq1qn>IACUG68G^^#Q335$Q_ubq*QUQ`fj(sH~eJPbZq6J7EZ1IW`$Q{8^TF zIDP~iUNqS?a8|q2dj;y%AG~WW=uG<%Xz=`6?Wd#v&jPq962yOJ)-{c$I6661Gr)S1 zZQ>%2!O@*uhCwE%#yE`kz&Y8BM>P3pE+8^vmt=nadMN zil%HVP@GDZpt8n5*nJL>_-6qUPDzWfV6cm+Azvm6YlRx#V3bztn&}MAi5NusD|nQ~ za6EL#T3UB+WTBIpeNO%ZGjr!0d8BjjO3QS8QpwSi=41#MR^}qfkppjdM{$U2H%hpd zGjeZpd9}FiNVAN-_M{VW#wi#>9j*Ih^}NoQ7kjkssp8+4%@uuO*hp%gMv31dFC8&U zt}5YmzD>w}(EkTqQyXV%D%F)js#Na{tkCJld2}*XadGn=v`gRRpRsnT+LV(OCy4W+rs2&hSji1h7PZ1Dz%D;T1*p9 zJ;QUYW#>5PG2S#d3#ka^s#}=aC#|dHKbMvq7(xvIOj;9I`#IiBO9t~W-rs8z;%27Z z<1z?;oZCr)IJQ8LYJ|Jw3%2dHF8!gIQPDV!fSfXyOHsEf_9xq#(U|iy!2axg+v>}X z7RiwiEd$(k|MTA-r*9^ce{#Hpi4piuMDkbbNia+0|1`)-1uvi0+m}wNUh`qb^o;=I zUG$09?x@LTWI=9~(TljtW8;rlP^z4%RJ_<;HtyFl z_LfTtPK_sZ$Ivfp;?I|!FkcdHn@htS<>HKU+kvmSLMDNXGeHjiVS+$LL}r+U=&e=s}2k=&B#WEwAw^Th>6vQ1yh2ly64(CQGS$ zun&!Efh3D-E4Dt&fMLLZ{e3EF`zmuLQq09R%KkIaF zA2)aDg5j4?Q{i2>fJ&29@WTz%o4P5K_Mkw*{4iFJi*OxB05$R6wyu8zYar~6C%ooz z^0I*cF@*G8JLOh!JaIe%G3F| zYu4BY)FcW)ReTA3Gph#TGHb_Clphjd&hOI zo3c@x|J4U|{*!*Sxh62g%>w=3VRMUbOv$;A)AQasBZQw2{_wb#?SJivgvN7+j2-zJ z7wRQqM#HRgUTg-%K*gINjr-^fZghB~B+uCh1&F-nzKaoK;(VXL$- zbf-fa#9I|Sa~XVEe6FjR1mz5eUZmK~-?MzX|5KuoZ)-T9Nbsz1Q&>pAb|2*_2$prpYOaJ?J_#~ z9ynKLAN|}Y^V(nE`CI+uC>$t+r84YedmNh1ay~6(q$|8m{qgUFB#6f-WplZTitUt+0#n(5IQrwbzmx8| zl=DJ~ga8&|N9#n0Pt?7Mj z&GY1er6@xEBa-#G+-%SFTp^vk8bf|n_dS&MZ_1nT`@eZEG~-OE|C!(QrZagiiI^Uk z+#!_%cGte9PyH1ZcaRx@$YC}maaVT4wB;{wXtFv?Ckctm%qJHfSD3uF#Yp{ulPxiB zXXG#km9IO7s2bAFJF_L`MHkwq{3?)!NyjGgKh2G=k{-D4ER26rN(u^Qe@M4csy#0b z9^fvfnyq##gu|c&6)8ylGb+-(C_Zm5fQY&5pG}F*Imv@6@tlXd(zkx&|4juad>2yT zX5luh6Hlt`6f_M^kVEf}1{wq#{K5<(zXS!yIlCT&=Mb$GtJCy-3FPC8%bGS2cB{R0 z`X2vvm!T3XC4}9dv%LnYH@SPYl6Ce%zSl$*xnZ4nta!OcMcWD1TYo9Syyh#fRjfxA z6p5cH{iz3g5wGhfk+3lX#X6zYuD?#E<~QIwpyp!NAu0&0PgrVcT7~)^8&OXUTogo4#C=yVXmF&$BL=s zK50>E@A2`3PTIkdV(JN(9Itm6|78f)Z+YdS(v&k|mnzmJ;H9OsF~>MIljQxM(l}J2 zUq;dOSVl3R2e0O;c6p)+fldVsA(NetUo}~8;-(gr54|vLPJT%do3+G0nPAOvmCo|>K zPo>&0zVnEy>Sc7UzA}jNsxQQV-|_?EsJ-btB1P@Kdm)XpG2nJUI*4XDw)2KH>WBj% zXL!@LL$ReN7xB|Uay2TqP?ms`-sC?WyL47`$ zQ3*NOy444*581g5465G)eMfF_2eUPr`OeT^#C3#_TW0;yjBFEWbC105c>;WlOAq}{ zs}AnQO2h(XL=jQP<1ublQ`Yb6gVx$&put7f!(80IA~fF56_$_c&2uc+AV#J8ncdGe zlH!ZU<+aCgNMi-U6U0V!RKB2&@wm@$Wmz#Ro!^*5!c_Dzl0_0U?xxPsLz>Pmpdes%GZZZC4f;bdi zbb)fbRFhFQ*qLSLog(U2KkL2~E78%RR)pb^$U3wAsDMoos5VP0%sHi!sYvBU~{&Z%+mBExK%m9<}HuHk^24&LE*|8mEQdk@!c$~ zI4^XI#gdnXCH){)??|o@LXe$(06D1!>qeHHsA1c~4Q#;SRn~i1L*@mF%t#KrR<<=O(dm6LO>t!OC?c;-yejU* zWGGxC)x~Ujzj)?kH*x`JvVB>lp7={)ai0{`K9+Qn)Q zA5OoCjZP2>PE+twOf10UF`hD>3t1)W-oVAIIo`TpV%*3y4glid zNJhU}7?{5hfBGvR7|RA3sVLkR2cK~l^Y-LbZyReM7DqH=LuYcTY4#R5Cw>9D!8apU zn^bF%8_)}%9wvW7fbEg*hS!@YieA}YSY7}(SW^QSDqYl?>Z0r@=H40* zNxDiF#?p~4F4r*BLMADllVR61RaEWV{KxS+l=742Mk@$pgISXLgZ*w@cQo#hQRroR za^*Fbt0;tlX5pKu{~NTgOY^L0SwpDd#tdLx;)I$UV1F1epdh285-JAu0kNW4CT&`k zy2zi7YWdZ%>@`5&;OwXR(0I^%)o471>gNx1)?__V^E1*=! zPSfKu7Zph@E+csd(x!MtRHuW=dbmfF*E+QnHW*<%(uhlrR6M6>4s@8F`zFq2oz`?I*ZzF8KO+dn3rRr}#5|#cf--8sR4+=&*?rtM`y;P~7 zE(CUcs*q=gyO_mca-3m{skwGxZ&8M4_i{HK!tQIc+JEOGn*lMN%2eSuLkquFvX?vY zezX_?fZX@3uO0q^Q}7r$_G37)O@fEtw6MU99C_kTUCw}>eBkXI0RC(HwW`yX+HY;02 zDcyQ48>2D0@mkpeXClnRJIIOLm*to=V9^rC7&qZT^r9-~KQvEF2YfWmx)eEf5#k+@ zv<;rBjT^SV{0j{|gVYo&O?Kv#p~NEJp(htyAnr>DJV0Ye zs(!ePGN9rsaqWsZYkG9AS-_2GQhV!+8tUVEKsRep%ioJ9$cjuCY4S}WkT5==bmF?v z>=$fIA^UBXG$F{39%>r~2iXtD7WaOt&_4eo7@^G|K?xBW>2*Id%6T;*seb>dosyKZ zKy6zzdjLSO_hPcFiQf zdXJC5QSN*J%eKTMYTBv&Q{YjotW862vvDxjZw)RfH9SuoaL!a7ENgDe*n5%z7|3EJ|gJ)r4&mc&J7XE zweVai28xrXDk2Ohyn)s zIwk;g9<2V{JmI|lUBG^MWg|!IG)|r_F934?PiQjGbOKcC1i?=RDnscib$Pxd9PiVC z>-+c9s7^b1Z$Bwb!fM6;*>NzaH{0(NTT}Hp6<9<9eK=a0pi+F#W?VsZ*UMKc?e2vU ziBE(IXPXywTAv^{R>0PnrO{hNMm=AP2yFRE#rkdOc~Ovo4R}LKgn`H?7AzlDs~xXL zy4Vj1NU&^;oTCw}v#5THMt;z(87AHPbnt8+k=86-v{+4TNaP|u3KU+tfS+I^e!*|& zlMeQW-kIej;(JR|cYIKkq4=OuC8y)g6zb}NMxRzuX~&@Mb**MnqQyY_MoNyWM@_9M{g^c7&~_exu>K(&=Y>U2$c;I1nF;*m7^Y`+sEL#qEFo7he#(`QcP~ z{la*>FYc9C!(sU`Fz|318}T;2`BW!|fmge%U(2>a6VG~XBY9ic9Hy-tS>6_YJ3P`` zFMjg_6eqn*gU3f5<)!oc~})y zuno^)cJW(Z1G#U5O9N?BA$Xg&k07h@g@vW~^}oxp0Eol(%tJdp4k8ObKR*A~58j&N zM54wW<1Y@Bb`c;%W(k1$Kv($SD{jE{|5oz#kwS8Z2CqGpA+N22!y5~$|M|PlhvN2{ zlmjT|u8x=Qy*txf{=-D-qzIG-&z?MHI^)Q8UH@xxlE4qp3*e-PT*Z*U_CyiQx2ZTTpOKv;Ja>TYQT0Pb?3m0%LCHB z(zf+Ra6ZBujrafe^98^*U!88Zh8WH9CD-DgeEZxFK-cjYeC6Pq@h%23+~F4G zUITPwoE_= zcUR}eYrwW?gT&gjL)>}(^AGoxb8#S$h2Nk!UIRS5f36&znTtt%?Uufie14Man&k7? zQHL_Njit=b^`LI%?c%ql2G*;4+m@V&18rxZvdnWanc=ai(`D~?+??8k*tvfru^<2K z*A{>MuU}evJ96QZzJ|Vr|9^XL0w>o|-iw}Ir)SeFni-8YOO|BWl5Bb3u!(I9m?c06 zn2_t>a0!dK7ZS+j{=yBsyxcrqLXw+=nB;{U0^!*hgNY3WV`DHF8!XF0UL?!5EXmq; zX-2d5^z?eae|7&`-;_@GY(458sYARmD*c4A?{T}|q1l0lG#yD!8tT zV+5Ygpo;9g*D3lHFmi?)N z_daVL{zEY589(0xK$=i*0HANvej5UKPBBElc2({*+B31Foq#wX7d?%atC3}?W7Fho zNF6|A9Mk4$+OI5l)S+C{!~r!9T{yMoX*?;zzN8`H&2OCkZ&=|B!%5HEb|NBuJoytp z1PePcsF1J6!RC=J1+_h?gFdoO@YrV?2d(w|=u$lJb-kdGz$2e9FF92o$F`5pGB%%e z6HL!hmAoB1CE8 zgyfZ~8Rc~yD93Dj!No>SzdOWqov94RHlvWy^@yB|ibom3V27 zeVmfC#QB$dV_r`JzZX9lSal!uW&nKsP5`Z^j{!bYDV%cJg?gH{andZS%Rpw!sYe+g z%21Dd@K_fi%a($y19H~M`d9`uWq_=kWeHgapyuiFtW!hE$&D)J`Pkv3Dcv!J}tj&8I=t{{)~PyR{?m&r{@an1DcRB(Bu&(tRa(}6-|NN?L;2O zgb;ch!&1=iY7uy8JUEpZ_0~2Wm3dg*jW5>P?Z>hQ|LMupOVTA60D*qI;EzoJgFoOz zHU*+qOvccsp4t`VwTW=iB&2h&wWa7%e3WBd!0BAnhm5$b3mS=Khy$`tmIcka$b%jo z7dR8-;M;njwJalay*Tfx)*<=%U*2WML zpEO~q@{qF(q2}RBk53)zGVcTczZQ~Nox}y#b|$rhUa zAFX9}S;(}UH1srI*Gq@iJm`|oI*L$+eNH6hT_T_V^`?3Dk8m%Sp}d`aQTe98$@~9k z3;U)aar=q@_5I|KA+i62dG6T1EDtVl=n|3#NLy%`pIje{Wi$_Em^5FvL-V1lY2tvo z3~@kY%BipG0ng4X4?W`40S`&nMV-7P{}(*X*K{8DWeEPD^xOa}c z8aO3a0Wc5pXK(q30sYSI^db+OIx{t0%>V~w zY_Jn9?FfZgwE7BxBtb!}Sn{c!Mfoz$`U)FHIxEJwM9#B~|)>`XbFnzFpJ zXS@~7@(pXbSBjrbO()?B!tr?6duUc!?i@-VXM>5}*SL%MqfzkRuUlT=R^Q z{9zxd2O3F3;zm%A>AGw=_57eNXUkEKT^D(!%4vP#EQ9*VvybIRYh8`o^{_3_0Z!V+ z^_ZO;+kn@fuJhI(>y|-E*UZC!@aeXOtasC*A@Og#6X4{p01()@$YXKm0?&X?UVfgO zyi!0Kc0vZNp~h_+b9|uVQe`cmZAx52;K+KsIF^18;}1Ukfxbc-5C3(A2fb@rcgkdx z2wbIPRz>;q$V>5;w)JNC;va4T{H_8p_!H{juW>l2-Uxv9b=os#1E9x{j-z>%z$;lV z>jKm`+o^eQT{|Y5+0Co;Vyr|q4W}raT3?{^NP$7?yx`f~(fo7lb zocv!u-elxc)vabZee9XU^%&SVX>0;QW^)(tHk@el4#wxmSYhp`kt9BT%hF-5MXq$= zdl&G3W-jau_I?n$3q?uI_t5u@jRW8 zt4V3^(#C^cSDkDut9TBKldgj&GQD5lF!G#O50lOg{@eucvOjcy1KKzOJa|Y9_JG6< zpLPU+bVhCf@?ER_zj`p}$Ch+N;U?CvpmfwPKd=H88qekWX7>)Qa_5D;=R0EcA;k2qj4$$T%;RklE}O=mPhhejuX+qCYyEoT`*%134BukIZ5 z+T;s>(@j|H@lfohV^Q<*9|Qy>1`I;ORDY;PT_qZWQjc(q&=E6c0ot4X1{&F>aTNfI zDPAP?)1%$qP4f* z;s_E*EK5G@1656%1>Bz*w*bdMAIRo$%&0?}5PXayZUyv8fPM7Pd~pD*BQ=ubVZig-65eI< zeSi^p@kK`N;bO7p8KAxRGZ2suJ@Np_*LCRN!nuata~=}ckT`T)nw$m3v#Yi(bpbi% z98;Ut$!=#F15w%gB7XUzt{ukpp6RT;4t+)~ZaeE@FLC`X5;oDh5@(0GBxylB!} z(SluUe$)*z#XpGk2Zw^*{=u+JjC?RapKwNn1RMc^nSn$1+veG{ZkjHq`3|4F1>g^U z_O$H}T8|%a&BIuO4om)3Pp7wIutk0mP#c>7+yqtfIjQT#PrMd1_0wg9`IAr ztl0oyajJ!+9d#n@nTS4hG%SbX3sy^;lHQVLdHY`_-sL2w-E^!@t~rf;dK~?O-TiEj z0K#O;ZJPB^f4Y#inQlFPKo1(@-Ce_;w6$NpX^2e;3CgpK$_6zlSa@0t|0>r$4*0y`&oo?Kbhm@H&5C| z#0g;|;G~ITOn__1F(kxTL(VZj6=u9fFX6qh<2BjjN_|xt5S;xV?N9f8;nATd`D8E*j*h60o3=9M|gdB5=0fUeMhVu@#MkdV;lds2uJnEe7(6$F{r6F+I zmil@OfOBm8AjY*+M(|%0>GR&)^;%VjA{Y*M>vv_g{?$(t8>JyQ%b#fQ=b1l)KOr^{ z8n-tC=&xCPWv-uGguyMO=|>RORHG1!T&Yw_2EOf_rRpG``lNLopzDgZW#wUFTM5&1>HJC_f8o$?G!LZ0ZxqR%sb27qKTS>!`TIU)4yAi`h+yJ{S? z&aeY%+5|NDQ-}U-){pz9VKBW2TN>mWw49Na(Q)W#rj)P>*~<@_8)Mx*qN9klXaAoUy#Vt6yH$ zBTxUc;^{!S#CuSF|9>PAHkW@{75a!^fJB_ZfjrvA4^oE^I!LE zYMOQMn1GP$OrF*Ot`qcGHzAKh8TH8rt#K`9pUBftm$7k_V_C`wQ3rAAQCHLCaa;+* zVLS{P^!l@P-goval~+T{#-LVi1<0>eR?SU%Zj>Tq^tckh%%JZFxe*}Ln*l76_J*LiaLPO{;-WVu&AJT$ z90Q549B#`%BXQx&Q~AH(`PB&?`OwjN;FAVKB9C;w_LJ=;U)M_om~E3 zJ9pT8{D-9-wZ!?i*#cF6#l*I;1sE zmn9B89uqv4BTqw?A*3#7ThFFh27H#YanML?lh$K-@<3Cc^=PPNEDIj_;Gr%ai!^m@ zNL}iY))3;I&<5qes6hW!W$WthrbE|foFaU4t6jo7bvL9 z;DTUe&p`%!KqT5YOY$K&ZbsLOJYk*9I;^l^wok9D#h>az|m9=0Cqu*;E;a!DEf^O{GzZuvM$ zB~Jfg!U6g8?`HV|U{t*ln{DHf7={{3VnTG5ud8Aq1kMDO(mV>^1Ji9K| zX+vFyma)7(F65*s2T#|*c7R8m<*3K9gpebV24q>nyvE7D)L|K|M;>*w3^=ovQwI>A z3JwNB-govb_Ku7+*34po2VdtkWxfA$$q8u_e&3zH|I6U*7YrB}c%^{4et|^?9_oRI zOq&u1P2R~-ITf3z-l-*L567>Mv<)G8Lp>YPrnEJo9-~ql0FJMQBl5fd*SGHXRyQA) zV^-(vAGgoa*xdyr{FyZy z0PR3_=eTIGkJKffj%Lfrr#|HU+K0@ue*QL`e72u7`o^Sr)PoHDAPw9vX&qe;bXk_= zpj)mUThA`9<-|)tT~;5LIH1-+J*3%2(A0;VeBel$)_7ieQcf8m<$iTQ2bsslc(NSZ zhjPR@-hjmUKwzCX#=b<8ci*0+vg$~kC|CnYy664IIV0Y0FB|gWvNOi70(9W_!x{Xw zOa}}dTsUXVyenK`&^+20Jm7@n+mI$BpY)jk{rW^6A^HiNHY8v3DC0P22$`n2Dd3oL z97zw$3!~1Bp74Ha{xOelGs>zpNkKBuDc*`!BT-VBkj?ZUFqC z-T<&e#qP=+FX9wxSe*tC~p+>zub?uGbjK@Mk3TW+Dkqm zgHtuxqKS%)}83`E;`!p-PnClUZPU{^9C`cxkB-uFFfIG>4|!;^as2~Io)EA zK-=|(1_1&*owbd?_e-z|{a?#jzvdBVT^w)lHSR~V>}-Sd8Ma%~HV&G+;<~0bP}~3z zVl0U>z!O5oV9yO5=~21#-ze|ssGfgpL}58G3-ypM&o6D z*3V1-Sn9bM0PdHI<}b(%Eq(~yvT4?D0Lu1Ggmk#^^h(M7%433SK5(0d`pC0&LE9Pn zHZuGZJM)*(JosO`lv zemu%>+*0y#GM29-WIIY7m-2}obE5ha)x&Xh+khjJ&+)|qOB{8Nq{H414=nI5Zad+% zMP*SPcWE(I&gdWPjXN82-bdH=d7phM;w4jK`+;D=;H~>eoP93WNL&e_Z8fBAP#1C5 zLp{h!;n0Olw}s_r17yE+TQ$$dLHlI}ctFS*^a(MBz%>NUU=Lhp-1kR*_q^TSMXg69 z_*W;yVVOKSkm>#WL;XMMi)Zo5Rs{c2_x&Mb@CQV|CuH!)a?NbdKAWDfZ&k-S(v#Vo zv~#l`nnxUvIP{2XK5;@$1RLh$RcIHr4|}b3c;nT{Ak5=W1!iRxfBtBl7nU<8EJR$4 z0C@=*I2JfAq&NzibC;W$~&)Yyz%d82A2YZLjym=jNKWus>`V z+RqG`JvN#~|BA8p8EvR#mC9LKYDz^k>ycC&wMA8A7Hi32i| z4_dEpz)2&RLk@_*kBndsId}~Gg!WH9hvX}1Z)n@+y`_6+)n50@`~IK*Vef-K+mYTY z{YEfH@ER40dBin@ z(=&m8b!VRpePx0_oOGvL{y!qW|Hlh}kkEE!O&g()+)sx*mLWvFeu@1pWjDJF>tQ)t z4!WGoPybBhm9wXo0jEu22huvQG4RDgIqxS&=bNhlm(4vci*jXrar*WTdhcF2?Cl$j zdUtPcmDd?#6Lab%fA$Ujq5G_lPZ@m(dcBs^}**cDPtX^ zS=NSj-7H5vU7j+1ES9H?O=OU!9$RToB^La(A)@U$lwpCas1@( zoVq^mw-)a7qVm3oY}S9xvHMeTTBgO_>j!`J)eY&*Qa8@vdFJmI^zDGJ&-gX213rTZ zATzolW~2z@_{nVm#<$U=H2emDJVI0myi~>npbU6QCc?Z}(mStpWKwM@t1Le!+$5L( zhtu-&Ke-2h1qzdw5V)qnw`GtsQJ*xRmTSHru5IHdCvT#9)ORp%0gMG~ry(Td(N2(K zoZ)wXNW`I=luN32?_TCDu9uhbG>nL>`kMgUjtEOLK6dd5uP+tyeza$f*Ceiqz99Q0 z+5s~33t8iM7XoS6LCZlS_*2ef@OXp>VEQ5}V-M)0Y*HssHu0DC^>@y-_bN?*V8Qr^Nz<1jwvuBUFEEeTv8@ z?O^R#0AmB6B1FsV@gfa~%;3kf-H2QT*d@OTxM%M&@1x6K^%~@Co2yYZdx}j!W1Z)H z;^JO!uYA>Vb8my!96Pl|>=PxR^&HeVbP$*r>_NjG$Vilt);8mDXm98ufnP3BA3Anh z#w%N{-igZWW7_RtKXiR4!%ThF1Bfy<1W#vf1bC(ont@;Ae!+iKUiF(vCA|+V-r-%? zdaQbH`;&EaPfzyHXYL<(s6Uy-XMPdn8Tc9S0d>&VfnVbjIr}%}mOsUSFFsPlAsjEc z4ZwI7njyL0gyBTtA&rg@*<9AUqT>DyTL5;450y&ge*Q5CwhaPD1Y#ef~Wsniq5I8f>_(9tn06X||Q$UC_|D@ascvsgR z@5XuZw!bR*BG%MoI+*U6y z3y4G-_C!V<#EpXdA&qiO;4x{uln!+#0(Bi)-{ynHu>rMA)8x}esE;`HK$D05lLpQV z9&w!M1K03m(C5AXjC>k8>Ahp#9`C)2Uo*dEs>ZKV%rND$nSXqI_@TR=O}`}F_Y3~q z1ORd);CCeemx}DOfAH*0fUrz54g)*OIGuDJO2>hA{-QaTp+;upX8sto?|y1KgB z`aD^Qb{7Vt=lYmVj@ zGPH#YTO<-OZ8PtLFYqZt`>|#=NuLN3i+pQ>=f{`MzvhwVaS5U0mrC*dbp3d`kG9;Fk=BqnY>1@W zgWwH0GUV(h_^=0)*3ot7y1>_ZrcS9hA#eJ7WBdNxdl$VHh=_^utzgZk2ja|MmgwBS ztsDKxpFTYNOX(|uJAyo(_-AI&2Sm{41^|#}{%AfkoDVplUlw*{P6umx10YV2yYtRF zgJ1pXS6}St=(yvmtFC&xIFH=vtK9_WWGXB!!GiM!#QB5512kDSHK2n+hkzp&aL^%n z#c3#+Oo!Gi?maga$t}oc{1*ZqZz2#iWYa-!^P$wC-rj*@xrR_q7Ou3|H6ua3WEP#Q zYz#62p`R7~ETEJDjVm)I14rT{w(=0hPb~bxY`r*Ysa8uOZb|jWaOaFXDJv(alRo0zL7b(LZ}K zc+3livyo6JBR&kD%}Uqd&%oi+1~2$G{JN+I9m-Lz;P<%#o-5P=-$xzB@1Y}d;D#32 z7#wC-GK_;+J5rrlUq z!Hify{L9QA`Y34N0ulI4V3z~Kck!q@=&)RU3&rE{Pyr8*jEsnDNW>H0O~^M_{_8cN zEC1#ljh~K%z2;ik1i;rb*<9vZ&n5QX@!i2!#D5(#WV%);K# z&|o$MVpA^kUUPGEPVCKvo|^=zwipCV88D`jq@R9kXwfgEO$Hwx9_9uhAZvi(70L#r zeJ0q84d6E>sEdA3=%O!4+u%P~>kO2Bhs2ifE8|PT4`WRi+GNp{caj<$Fe=&j7$CB& zfl;}E5W4M>=<+YWr|Fiq`aokfg1@xI!xR6HzLMDZJ6{|4Zhy)=^auaII!Q%xA#H7K#SS(ETwqura#V0`0OVEwCd6Y~ZFc+_nN%xUgYC=a z2G5b_04tUb4rcp)`0~g;Ia*SJHk@=+79+XG;F%48;0bAp*$_zZPheq`c8((Wiw+z) zEek|S=(KDUGO~%u$by(Te*CyOvl4zz=nA%2j_6WFEg-&Ud=!-y&Z^+6X5p5x55QkV z$DD-;G=3`!yYX9*hh-7RMjRX0NZ89pzp+03#CaWF<0o%u{8S+0$rA$APuPga2aQ4> zxT1bZV_hJ0`#1YH4<~cj0GL2#w@~_GScIa6ZXjpG|IJ2MY=Ho8g1^`;Jv20gIRP0K zZgV9~=0;kAdA6yk3A$O)F;H~OLN4n92|knxZ32qh z5Qb+6ADVnZG@Ur1=E-;(x%59EZ7SmAOPjd%nzQ)=KQJ&bV6GBLIRy2fyqw2uBE=3t z>3dK%4%|E<@FU>E4#wEBeqe)vjRg9GW16x8(Kll+kpVYZE-+;7cwO}TFTAbk=C+1V zV`0cde0r1lx!;b|<`3UJcz+@I!w<|_D$pmcMmn%|V&lAUP`zMD8JDVW0r(jc zeU3apvzYhw^%=h{(8RG`(0|Pto6tB*lSi?<@aG=N{NVhKNcWppM{k2y`>tA|d^!{6 z4LbGPYh#P*|Fajk{qFu3j>qwofH}*=+|%=tIQi%|`;IcC5#(qyVdsMrVd2ajft~Z) zo*SSk1GI6_NN5KVb%+~gflr)}Wl0n2_S!rx1I`RR;x>dW$ip##BNdO2O^hULCfI%r zArr?ztjyOVn=ICeaX@{vJ!oV5&%G(O_VaIUd2=l4)tONg!Rby2{+sq^x4-|czHjdz z&dA%@idRt?_-%-FQ)jO4fEZ(D`U&hro}fjW(thBXG~M-eR%`&+*;xcRG5jE%+&HxK zNkck5oj-8Z;^1mC6)^ObN!jmh9^NHY(U}0@Y?}7NadhyJC`UP$W|0L7n=;*EjwyT& zi8LU`7c$bou}}dbV-Yj>U^0{Z-Fy4Le&21)k(*b=Zk5tSCIIuvZv!CgF>5qvlhphrYswIg z;L^-lKnHy6h)EL%v@<3zc)54237@~9CDJZmwGgrbDID+~+d8s)-$3!~hmKbYa`7jG zo>@x;+KnO~(4eA#u#}RQ_+^wcgCYyT01@ z58wV^%jk_OqrZi%0}rAVPd9EFD{Xnp>gdAzKh_re@IC#{Z9bC5C0r)-k8_jrkdX6K z2UiACy|{Bjq!)VNoMT+@32AfAEkg3qHq&$cQ{;0A*N5}YZ+>X2Ih%tBZD-~@Bt#%X#^Mg1A5I;tt9rpF z&4nH|Lk11|k`EkwKqSgJ2ILu`{GlEp_!_64850r(NFMtOHgOxGzewmGWwZ-zL7Fzu z5dCKcA2@?PaYFI~YrDgp|NOq@H(kHHZUxSPs&zXF!GCX0?$Dc80pHWX1&1{?`G2Enm3a3+F34uS!3X=W?{AJWPAlrYLcPO8At&d}VJnAcvZ z+yC;aEbqDf>BH6oG`7Q$rt|6cm%>>F^2wAdRiEQm&jJ`f`mG*I;#k1!#DGOU%kw=0 zxxSIyrvG zQV)2!tZf1u{e(UsX&VQvHvoa(SQhR6t9Lfu@VcdP$zOU=?co3Tw&btxxVQhi+j@&n z`!o1!Xm0>Y1%Hk;A;-^#VwU0#T&j!(I9Ui$D{&i^n@ncnyz9b-^H9DL z9)N?V!DVz1Q9)}6SfgG%DAPRZ5&Fssm#e7bV2xYA zXA_`Xj4_7KaI68jAs`NY=wP8kD(cG1^1wggWzx?MrRtV{aeafgU%o>5sjK2%ll<7r zx*}x?SL+V~Ph&I?{nIzix%kq>v9>Qf(*MfS`!dH>dvx$)fCG;>)>AC}%&>#<;?)TdO=<(&)0%Cj!Ii|uge2yKV;m_2WKPpFZ8-TnWPRCzN5M-Um(=aQG z58ho~U!2yu#8hy(1n|<4%n4cC;Cx7MGG@|%I#I425^|ew%XJ+NKXWX=afYvIA7DVz zJ*C|6dU+$&BfBHsv3Qeg0utVpi&I`sJhN7w3qYe0klGq@ zu{*ABTJ^^B>gNC5T*DdJ?&P5NadDbs&HBb5vj(UTC^^<}7{`%+f^|DU#%pQ;%0L{}l#vJ2C zXpbpqj0MMw>I&rE9rzd9vx3Z;LOk&FR|=+dQLt|EMVQf!T8#KOdcTo34wsPpeBK4%He(Q^6{Yk zawTAgJQJ`;j*)AQ1_Lh~4||{fS)=zqUq9^Kd@j~hsYsV(4ON1;8X%u~_f~X;TmSie zZP)+K<*9xD_=~=+-`|osBu#={bTA~11s{Ca20;NhgMbbakb@7XGj+*>MQC5*w31DW zs?i0slO9Llq>0;5_szyZGjme_S_gm9;30+IyEeS^Q#UqW{%NmUhKXNEB2xvX;azc zHUMSKGbJG>5(*QyVJVqRt6=clj_^|P0MVgeKz(Wnum6pYWK(;OXZY@OR0_w`5V+1b z7-<^^&BR7R*QGPS0@ken^vG{)!NUTtW$*=w*+_*Bb_?mM%x*vKevHP!o8h?4?!4%#i z2o>}h_Fw=&|9}HxjRlT5N1S>L5E?>;I>|FlDA2?Kk!+egBeeeLaRE-6xDC-C@BnR` zJVNvnI3e}r1AoEDhpvn)egCEP7hSi!VOd=y8^sxawKsa^VLxfcgPW3%fBvEVhqoNb z9F_JX@r<7VUk7{O4En$^Rt)}t7&GuVc7zxw;Dmw}#|}6W$Mm!Xe;m|p0APj6B~GgG zYP9u8XD{x?=YPW;6`LVa^NB=un$@up52Qnw(Df7UX4uA}fgs=_d2oTKRmCCR$WPmmf z8VPbF(l%~{>JP^g(8ftKcoTw8obiHvBGmoH;Q~vWgDr1g8(I9pYZ@-Ocz)fYNHh@k z8w%Kze8t%a=)XL_eqx z2DzR5c(#tC&kzd~79{otW6vO={Qx}Ba9GL(H9W27$rXU@^7-kPo0iMn%MHkwvX=l z-lq8O@4c8lBtILAqf3%?aMVEoxTYB>Y)G2|+Bj$=E)t}{(>Q3II6is*&6VpaNEx!IQPj_`j}=4C8kN z0eK*a6M~nKS6_BUV!6gF_MMeT(yqZ|F4>YT`u1#O{Lw5%4+_SsO}3KbVi-~W94=bySi{)7F4X?_uv0bif#^K74x zfuE28UqgEwF(!KaN{$tLU(Gc(`LsZ{0hn1cb5h|b#0gJ1ax@r>UVU!;LNl#Tkxrd~ zrB=@W^}?c^u^f(rQqBf|cIhm#Kw*Jmk1_uAVdB~+fMel9f}YWpv;VYg0>XoXgBzNg zn~%wY*O}h~7`@`vfCkwF3?#$e-^wk4r}sy_KfXHdT{utP9+(T(+|>ZI+-w9=IeD>> z7d)>!+6ZYru`Y3UcB$6me0H zIN*4RW1=B&(r6csl^>LRZNLK;%Bzy!dO>*6b<1K)FIikSe@R=Q)4V!Q)+_YiY;p4X zHSw2k^?PR5=*Ca{$MAg{_azTX!_YSdc0gtXc=8$SK{NPctiWf`2d#0AB_NK01RM!8 zd4xuw=9ZyP_aCG+6GWpd$#sLZn#zA5sFS?*5xTNSRex)bNlbTx_La{kbvJXCC zF3QnCaZEa`Ilj<@`Y7NrX`DO<&mIe4{OQ{ohXrikAYEJp11$?X>RN6(FS_(Y*EA)L4y1>k*_+Pn3AeV^2kOlO zeG>7_yBo~T$Nxap;+p-WME@gw*~4FbI{w3d_}TEUdy`pw1Pyl5ft~?hZvq(P0W}Uk zM!;uAUEBZw*Xt_BL)gW!0bWdnt7=-WC_9~q+W?$CYh$qWfDo|$8#*|Y8`{_7 z#kcilhtnCeDL{u%oOY&70hu&jibov8wMi*HjA~_nsZ*)Tzjr-Sw`3le+mGF!t?~Ae_J%I zJuer$Z}rXpH~ZPa#FtXy63apUfaFy>RFQ6$_rz{r)2=hDP0Dtt zFG^y7O4=w*=|Wlr$3~O|#ys)8-_3t;eZ7xT&0^nV@8Q2#Zu;{je7Id%z!UnBN+NevA0De+o8{y0>8S zsaERBz4iL2{j3A|xq+|D^4achTtAJ~jZwbRJq~Z~`eeou)9ZEUaO<;VaClvCN#qJS z;y0UsX}5Bnj2+2Af^T7eT$#P{!a)~8m8UVHq(JlH)0n1Wm;?X zGsQ(c`SQ#>#6mDC+4a`X2L=zWXWeFPiwJ!6IN){FL+i=Z#r<=B|Ebrcg5w)(D@UHh zyp>F4;)2*muFDZICZxa-_rW8LZ8eCqxoti^B5F47liJT{wskhmPZ#0j(-!8nPB*fI ztf%w88t(wvfTSdu_tmlM9MMXTca*xy6xe@jAO1+i$40(->C%YDyYL*rsywhJWplp1 zLr&y(XP$P;)VwUPQHT|}L&FL#V9<;SsjML5>|W9cYa*w*zB(wso>S1uy6<@S=7my9 z-Lq;R zpd2r_@uxmL#}F><6+WY93PZT1K>X+<(8|M9Tl%FAYkJpDc8~K}r5K&~mG&REIurn* zEbr@3LKsid6{&>rd5&v6e9gO=Z}jf3QW8f~<6ZUw-MnLkN#1#Luw1Xq&DkLpPFH`+ z=xwdgB0|DFB*gAaR~NbH*FHZ#uY6e3Ca{_rHuH{M4b>hw0%L3YNMXU6N8kPW$@~*V z^7-b7yL$uLhE1xC-mmvB2d$YBo@>LOIA)iUz2sOhW=KiFF=x%`cy)=*%Oqi!;nSJc z#Pmd3<-^#y9_2{e_J&I`7}{fCv^`JhaSgw=jm(F#FYN+)N6E}zG*?lpnX2rYG99cg$K0aV3FrEepH_qcw9SmJ)fb z#_|Z&4&gRQ-z#pLT*2hoWRJ0p8)8AHyODeG!j`og2*VR7<0R&6i2LRja~4_BMbhk9bA=cx_UZc$AJ?d4Dl#)x=+RzD zP=SHZn%q^g{SSk(lUq6;ns@wiAoWxh`Y73L#3I$3j6BwVawh6@@$gPfLFwXRrtv-~ zji=@BEcI_2yj$E9{xIDXXIHUxRpf14B%7zC_w@U|kR7l0BJNhVEJWGEY(`u;(g)oe zfIToX)Q%ILl_wT<{lQc|PMX2LmRCMoXN z-5BoyHo_)+coJTq^ib||1?cb#E;-aseSML94_ds`MQ=U)uJ3()o24N4pD%L`YF5?t z9$uO7MP0-dPuyOJ+rFdfWKPIZbgpJj+ig|GPttLu`Hym?A{5SxsgK#NaygB;KtfkZ z?>$QRXF5s=1L^4_oPS#hT`w&1k%>f8zPFHPD!iaolV=YkuF<83 zf^C*JIl)t0^6!v_3|z0H4)6oUqoLw-Jg z7Uugx!1c+-R@^aNZIt!VV$C1Y&5p1?lp>XDZC_%le{#VEtFK1e6lg7=|gxt!{FlGqn67rh-%G85^W*6UQ777p!j~@5{+8#GJUwH6Eq^ zaQl0^q#6P323t)wJtC@s0seEjs`_qndHsh*Xxix#GNp5C6p6*t74wDebxVz_rDT;T znfTc5Zj#J6o)K}hN1B$0 zRAwmnF@~KHq6e)JFG@$ zR{LUj?yY7;`%t^wn&9EwXtGU>uy*;{aZIbCsp6r=P8I(Ts|Q_d`el2LE>H>lK+*CY zP!G8NKktbW!oz#y3@W6*X zTf~(Z2CLd26eC3LkXkMuW|Wie(8-4-XILmXem9`;<;F7+f5z34-2usI|34 z_FnaPjT6vSKK$06y(-g@xVj#7womi^(-Z}Xn{wLDT;N;mAK85Fx!|4UZYVcQG_WHz zb_)WUxM9N(yQbg~OJe2Kz#3K}lz&K%jb`sY%A^V!rLt8?nm+Hd>4^ss?GH;Lc$|aP zZ`ehBkp2W87h_qhqqTqLMMtii!vMRga!2CqkL&%yLRvXSZ=DBcpfCKPGHQBVQ$rJ3 zt~|{0!fHwTRID@!T?k>ddmXPn46u0a%ceysa$oo(;L;kNg1C$4 zMshtnFv$$IV!k6o@!^lSMVJ@aRB{Xx39ynA(2G|t7b!qr-7(1FE;p^Pyi1CEIc)LZ z@fqD~J4R*;{vb&;74HmtmFpY|-WyL2(e1kT5}%2>kqC2mNsi9n{sH$;cRHv}8SB!t}V-SuC3cH#eZ zbm({U@3^`Ta$g6Iih9UvB{`^-9xoRFq7%CBX`>(N=V~RZ3Kg`Fy}O8t9;E!(QTPNw z%ex%@C9fR|Ls#yrlTugJe>7>0mKeywki87Jb1n8Bnez4M#e|;%Y%|^Uv6IED?)T_d z7c*ayQg<_E$Fkdd_nxIFQ87$b+xNLqZzaYIB6xYO-W1y**C1nW=cG2Hyp$o0EHr2* zkMvqi?Ql<8r;*`hq~2fb+jk9;ysj{*n8OEy6Gk5ix;dPvDjOS_%;p=v3x2z6&U#521T5RClu>=6qCAnyw zjt}jBogGgHDUm6Uq&umtv3T(z@kP1ETUd-EUqcQ^^;B$rV!y0B?dd{(-|Ffu0m%3^n{fKyb_`O_jCUfq;6PLAerZH4~ZLq%Y0)R)X}i6s2L&45OQj~HW9A4 z+sLy&W~2{QCp!T%PO{&(YeR94E5UV1yw#~-0^=0*TFtt7lydx1m1G;|vRnziY`ISN zZ#M1pZX9Be)S&8W#byUxzq6eBt{3S_k8j&`|0YGE>B5_S(#J-wCe9*NZy-6R=CW0q zkNmfWCU~06cJasE==6kA+)Mr*+QC0fm0|j`^q$Zv`=5!yBR@f-4&Sfs{PK8-yApb+ zyGV5x7Fi7-e~%m{=s7!Qn258!Fh?=4Z&^2No`i&6_)UD2s-Jd81vjjD$!N)-UXr-% z{zXSJvnRT!Pq~5R#GV@$%C*yi3m56x`Ay1_eC2Ou+D%?tlLypJCx2p!Ffg|EWWMb} z8a?b#d1vzPdEnt<;7#ovPEO7RrV7lBwi{53d)!FP+z(mq?pN+4C(@N9aH|qDd+57a zuAV=gkUi=Wb28Y+q32T6mbzzc{n<>>^23h9tv$^~Nj4a3n1oQ_@Dy*a>TZ@;<0HBIpw_=SgP~CQSd^K#eTfV^v-=QWen#(nVyTsHfZe zkNrS0u`KiY#ntZd@a8Ck%1V`uaT{2n+b%njM$BsJhUM@Shk1Pg-|W;pLl#r{QPyiN zyAT$Kgqs?46h8;<8x!?C@L`b*$HPIj&sF54vQ8K~qSY?dh)&4x5O-9cM)C}t`1sXK z?8h2>bewF~v&_B=b9V1#%ddAQn2gHR1_V^{I0EnMgC8IMXTkruxI)2~tB6I%!$1fA zyv=5uqz%nbn#1%n`(kl$*i7tICn)J1HyN@+qi>5JMd_^r=VB&J8gdri={kDtY7NsT zdOUx5Gg&_CvIlM0_-8>fNAawGe%KYco3J-M%szS0rrl%1_*-1_Gl_Wn?NwI}serLH z3Z6f&Ne6rW^za;Yx{~}671jMs=E;5si{A?+w(@DGDe)3&S{I-2xrEK?$>_gV&7-{i zYJ;UkT@~aQCmBF;}_LINJ&cHBw&8x#z zd%9?cGd{dtzUqb56R8V5upy|<9# zYnuK|jev<#j{)+0iAQwT*~)JAYafM{6$LobR(>SLZ5pR4Jhmcx0~}NDMA!6*J6pNs#JiS|9t@|NFoobg|;AIuFoDSXzl_uOnBe*4NDR6s0=h=zfc z%a;C8c&PL+i*-KW-emT((t~6+;b6Hd{8#unYQ9ym4%JSOf*f_Oz25%>oLH)`Ekp8( zC7u5z>06Qs2#8)4UkK!pMqSZ*gFFja+hO{Aow5y#tE^!V?C~+)Z;GN@BLdN{KBzsY zq3e?4sdh;1%6gUo4||p)+qRa={k8f0xak7@i={mFirw+^aG&GYU;;V*c3-KpuQ-nHMoohrulbXAxWr1D2LbgdNI9;P&7S2<({ z;-yMKeA>?`o{d9xOZva>*2g>@ZL*fgrS8=X^p#3Id77M=v%2jRdT$8cAm-zJ6psDE za$2g#Yv`GlfA};iDg4jD*Zyar)&8c5D&j?|&jLAzFr+wLdFQQ^qPqSGNAQP~A`##* zS3yw?AQ|;(8Bh&3Auj zaVFaJF8AO-uFM_&Pf-e!GjhF;L5};E)xX3;XRnY%y>nh>X2_=wzFgs^R{;(_M)j-_ z_q4HZnB?3jA57*KYG;nsn7t>q&~qs@nxy=qZc}>vKvqmJqLSM-0niDnQQ`N0mU82x zo&i7j;YR^#z20bcsQLZd+i$L`H?x!b>@ zbGQTCG|bbHX}q+|jTUBH7j=*ZMSVJ_Qz-zwVtu?-6&J;}-ux&}Wzb&&F5$#JaliXM z)juPyg*nxR3~To#+d-El&z|`63)nI$Cgc2@FRqlf|5I}0#Nm1;U+=I(iM-S zA^fs#hSR0*Q=*QRQxxhlNb|KmhYQe?i>9E+;ivCuM9<)%grj^fQIGky{O}HV&*)K1 zW7MCo00hSP>*S6-lII=yLrN|oeqj2zzH@(HBT0}2=|J8RRMRvE4RDBtD_!|&`XoQ| zlgriFM1F3DlgHHo#m9l|Vail+}-YvKOPRT)8pog3{ z-{9!e%DWKH{m6&$E_}PVam8}$pz9CTC z_gTMNLF-XVMZuSX#DC+*__Z5IU*$N3&1jJ{4z9nE`6=r+PZmxDn&lOLn<)k}v+WhdXp6 zYafKk*)la(R^>N@A3D>#5Ko&SX-^e0<4ScTh4Eo;8Bzz&o&~&g%M5G^OIN&l{8gxd z>E7YHrH{Xbku^;?Q=EV+JACmWgsj^ ze`rDu&B++>L55z+hq|o%>%=Iq6(11(E6%BnlDQrzp@}qFUc2+!veFrv@ELTyFt?;v z4Q-Yd{CI;wtf2EGerZ&L;jC=q#XQ+GkW)T*K`Q)W;=MXMFl_~_+r!tEKV(sHT=W-w zF?Y;Ukhgf`^_UdJgzWkX*w8f(K>g#;z)_Gx;(u(u=^6vtN?28y09g(z`E1q14Cmb)L5&91*;eaBz>@?P1P_3=t_ z=}UPI39HJ0KGSQ@tfH8ZA(1j=03vk=B6^f4h(GRx{o)cyN=HcAT{5g>#(r<4b{I!*8 zMZ*yFzGqAWgcah+zq*^eNX*8a>;!48wx%GP?4B5ta@Bkjc#pY|+BHj4QvDtP?3<59 z+^M*`-ijtg1*^7>&6ZY*h#|xT?5t|92e74eAb%|EcQB0V?y`n$TE4qHeCMR2^Ej=b zDEUh9bu!7`caLk7yruL<+whEuMK9%BQ)qnvVHan$Wb6G>K8~D9O7uW>`b@p+jOn@B zkp9|FyziI*L485YN_iYul5r|4uWM<+k+0|a&0jg!yki@(W+o79edL-Yp%!0cW3*J2 z!#$?Nep=MdF19I8Yom)>T6KPwv-SuW-qH~H4S~^C@kTDkhAZt-O#0sQ(dqB9n5x6% zN}#sRR=}mCTX6tKPSm#*WDC}N7ViQG!x&TwR01G4VjnBVUy$t|K;8sTts+6wze!R9 z+c`R}`>mR)t$Vvf)X?{2LukOhiT)Bl#U@y^^*di94b|ymx9rJDj)D+kqPy=G2i+q%TED(AaMS_pTC6nmtXT0AKD_Fq zyqfwxFkwca{^!k#^ANd!4{~~fvuW`teyiOLXLB_WEbFOsrIS3(3&aEGe$n~@cl~Qa z3M-7t&Oq&e%cq5d8H>K1>Yrv$$_o9J7N31)N!~)-4td^wcaZE>H3>StmEr!KbYeaW zJg9LoX!Jy}43(TtC*31PM>s1h&3p6O%R{L>HWPOJ`#I%oBBJ`FwZ^&MXn*@$3)mH_ zF#chietPj^$Mr>*AO@;`*q*ppS)B~Jw7?}_kpfSBZ`9;j3No|2R%jks{Kw$u@+wK9 z=VRrn?(F+mAs6nBM44=s+FX2ClJ+2(q-(ejW}>9BaXF^36-jiHp9ov+$=SJ(p$`#; zu$^4zR+()8<9u7`+hm7P$E_wueuZ8MfwUar-jxY%#m=1Sr)0V^HT(_jhDq|G3SG|u5jp&m=t>yr+ZkOPEeKI{8y zWgE8$dJS2;=n`prap!b9|Hh?&TtPqU*=8|Q-%_NS;aML5{Q3(%D4UMo+fM}x-APO+)#JXq;+93Rx9;U`LVgjyc1g*}sE*p5Y6KLaNsShgvXle3a`;=gkZ>Z^NwiOZf8M;!|ps1?FZOO7(@oPYF}JpKMKssMbb^ zpza!q8ASyJ3E4SsBf}8F$G#B&{&MP=-?4|)_-@!Baw#3s|Krn>Pw40duyZ7iL_S51bRmHP0skClka%E}^`_zQ>vi`idF^FtIi-@{$yHS#O| z(+{6j8#vI9OiG5vHTkfxoB{VFHDbi$Bi$j5MV2P&%lE3;J+D;+v%~ab2l)jh12Gj1 z3C2euL}AG~mtBijq<%Du!mLgxUB__Ab~46Ua&F=of`?t^ZR0<%?Ni;a$R}{#$(2Kb zOu%m<)nV8IzM`Vyqwn_Q7ec?IisXaSi-Tcq09$h?g=re;!t5C|6lmmV#_B2eg~NjT zOZ9d)Azv;7RP)wfgVl9 z>KHC)PNGVaVnw=SF3g-%Lr~M#*RO=ZR1`xAmvOCV*&WeS{r2yb-4>331IuBeW_>0t z7W;p-0kFfGa(e!eZ-3p=($dra83U3!hZX7teFu#4zn}kq9f1rw<}=m(+U&V;!8z#k#Vb}L9(gS zaS{t&wcii!-C2%WjH>x`o%@QlBVkZZLQ-Ky*-fQFzU!N^Wt6al{T#VJg_5zTnIYG#PLFLnvAqF}! zhA--!4x9Q+H5|8jzVxzWGG@LyK^FDw3+75{(F zip}ZB;>T~Nh~NF+kR+oN9`Bzk*RWJpL;5#Vn|^6~8f*tr=b)wgFLud@gr_#{T1AVS zUfb8Yg%gq<)N*B6`Ac!lrO7axy20ZzN#Xx(vyJ)g!|pm8Rq#cR4b3Y4<{o~vtBHPE zEFt_l(Bcal26K1!WenN1e}#)H~>^Z{H?!V&g?mJl+$!@Vmt-q@i(QL0d1! z5q@4JrT~mzxU|48L-!#-0oU~Ef4eu4p$2R?qg=3L0Yhye<7;$`i{4WvcGcR&6;>}v|+OE|`6FAKWcjIotcRK#64 z)W}OoNF264`FI`wQVZ;C8O&5LgCaHF@Np^0af2yw?S%LYKz`_R9o7E{#(7R@>urzr zl`fa$*anMh1m;-P=9V`43{+)vA`Dl?HzxoWY6}#HvRN>y0`mV( z(&SqT+k+T0TKE#3yHkliA%E;m-F!Y5Ue(#ntui(3X*2bZ4h%KtJ*umkT0es_6vf8< z4w>Pz=dc#0iLXyo|vTD6t>4wHf z;QohLNRS@rhdwk9y7AZ*|#nak`eF8)G+|PJbW}!xdIK>BIyd4f;!wAY~ECSU$x`DMV**E0$iCMQL5=F9aVAK(r6^;MYjb zk4*;RKV?b@8b; z9?+w_lF*jUbO$@YD6I0r^eL>kC`j)7dPKd?HeaCVmaLOagVe3&nTk^<3(?QjUciN7 zHa0f2M~evBF`4}^D!3^mOt~zux|$F4hRbFCM}uAE@ruZi>wd6j zXiw#|0}k_g4yVOcUSrqaTr%OVobFSl)R1k%R^H2kZxXc{z+^Wh;Acca-qI^Egtevd zFf8;p%y!kZGkm}MYaYao0f$ICQM*czVUFK>K?hxucL)P@@=HNPBA@FNTt5>3>dT(U zxEaapNGUPb|4_H|1e%YVT_^B&F6)w%be&?{npdFRhI$Z~9KXQnfN$@_nG?2f^yLn|N2uP@mNZErY6 z%f%fai;3&aLAfiIXjf(~tEJ!D{_ZOWwnR&q=)^0V?7Y&@1EQvW;E1Z`!ZDHO(Qy%> zY6JNa!>@Lcr6#$ytzEUJrAq5>lyuP?mQP{80{62>3rJ4 z^6WIVx$J{)b51gEJDAJ|JrtiUJi73XXl1kWwOYS(5HEpzRPQQuYyn{jb&-eES)-mR z)te?EwG!(1g>5cN5d`;V`p0n93U9Lq8zyb1Si7EHU3}CiifmU`pH7K5VdaiD++uep zJA>A;uzGD_AKAV70jmnlMT%=mpO%j*M$?483c;FfnjrMCr$veldTFobg2m@!D|bw6 z`|BWjUFNxYh}Y`_m_hs`Fzd|shW4@#nICt2tK=cWbCp6@A;x+MW$7MADt%R`KyY6s z#`D5$VrRCS#m+_fbliI3O#(D$C8Xlwqy>*hyC`1StTCNgI6r`~yEQK5U}K5gy71l5 zM-P@2;b#j-ieRQY$_)FFJQ@kXr>+fizMw5g6?7+rTc~HF?>K3$TtBl;i-{%uckf9x?8GH#?4%2Yx25(VT@6cjt7O0rkd?kq$0jTozImEmH_V28+#}BfR3KHR5O^X_Erhg*S<*b- zr?M+UKDN$W12#Bb+v1A!T=CeQ>xyYAukec@I;!HP6#4o22@k+AMAx#}8o_B zS79=!wUqH%%4Od{rnNIIg14p9&Mg;axH4A3lgOFqgZ64ufl(}XF1+EU_pq7YTKice zmDjc7*Z;#q36Zqz$5|piF>Th6JDu0;?_4Rax_-kh0JJ`_whA^KSMlFpgp`6ViS?2C z1RP98OO{Rveq&DUnVmAeI9V@H+Y=@wGU`06OXA+}x^l*BJyG5ykgZwL*Q8Y{WFAp( zzipRaY{`{ofD?P>V2|J~Mq{ z3zjc6gey6A?nLh48%7cdPzmrGV#_8D=cReQq-6ax%iv5b6Li=xLQj6ZRDhJ=cdi3M(`C?`mDol`~B=)_vb*s6sBB4 z1jR12fN3@qmv%?B`uuba6_oAz&ortPpk!Bdf0e!ct-wFDBPZNhB(^o(?_{>=6A++N zZ^_{@FG+0Z<@WLfe^xoa-2`Q`Lu01yw|vk z`iU0YVOe1dZQk1l7IJk_InVG&@TtmZFbrI$x~ObIXRR0OV-~Wna1KMxOCcm1$rqIs zKlT$jN9iI>FO*5=D9&=N+?v+L1<`nsDdch~)z$?z$!H5AxK7v*+B{LWC>4@<)|VLV zWVNT>m18Y7bvS;`2@(-BJ)dk6o1V~?xbTF&?pt@bQvU@A8T@w(WWj6{2?F8Gb`KNB zr^HQ1v{hXF#0W~r)>j~0;Wl$(lgWiv+;g^|x-OB5a_)t|Tr<^~UpccYKJ9gE7@OUU z2rPGT;t8q%pH>4gt8t$@NqGhQqrPG7w=4eg5zXd#ir*_vZ;N=LK%sbbBO@bjEm@L5 z&AL#1)eBU`e&T_YgJaN01WCL%)1ui3k#=8oG!Puoe)K)54-v`5lnD`#kF{!z6T(zwplC~t!$rf_dM;Q%O5a? zxGxY#>8^g1_$R3Cx^#Da$^{3Kraaa5)U%7d*c}eO7&s-c)#l^4^(~}NXSsKhU>x}k zstI>NZf0v!a7NDq{A!Z6D68thA10#0t##yf$ys6~*!fT$hKW`eNY zP4v}la4#u&5!eqHg^9}f5i?@IZf<)GD-sVKSxKFEe#i+qPD5Acfn7Y>>kKisy>miv z$H@!&l?f3cN2r-9BUz#n^G=c*C^fD%uqXN)jSi_7DZflO6*_|NKrL6&CL$rSWI_QR^|MtMI}7?DkR~WP+D)~|B*>1hYiJS= ztKXW){%bfpLYn7NvIr?uGdg(9JP};p_2Up#QGT;e{>O$}$ud!3)C>X0`e@c= zDDGtvT|%*Rg@_e(e32^@AP2?iZvhHeW{?Q`?vmq#+MMPNfW7tjnXPXk>|?bp1g#8E z?)_4U#ybYhTkZI9P?KJLOF|YB?jBYq(W(3Nj_S#ex46HE8|X&!GI!zNKL*p97vMs0 z?_pVaz9-^1hpnn8*r&J#pjn(5Mp7&7nu~y5B zztAyTnWa89-5Y>DL1ystMB4I8ao|kxaj@&DkXPk{U(;o0aFrgoF6DWG@h@b_a;T>5 zUxN_sEWZ|dtSugTp_&^*3=KeV`dzwux@-68SXzHLz1Onlq?lt=DrDMFyr0y#1N5>< zv}H_+s=*DXkf<>eC}t=xj;t?1+s#QZ@0@5p4OMOS5?L|l1H}d5#gVWFneNH|^GAv@ z73o)iF?dL(MEa}UcalHX4XDZj!eb@|IyvY0K^7@~xPb&$0WRO{jy2iDuLj0Fx@d%~ zdg2gOo?vOjAgaz}JGFJua?l)qvLg*oZ%ysqw5R1Z!ml=r=ZHdgn^Z(pfRwLdj9ck%r`|Y`@ckYE3I`u;jgbVl;KxGo}(`R zh!2hi46_`kz={*MTLY}mE3|(Ez^C#~0U;XeLV6&xG+(D^B>gq$H^iKgr!PD`mgJWI z8fa?WBG4KLq*YGo-sfXdQCVvMHqH&~HQKA>;Z3R+F69P2FSk+5tI(dDsX&2>+hQ7z&AmUzC)TEUQ-Rjh3Ae=ZZ8E2TK+>hUl;VaK>kuSu3Fc zk|(%%qKR$>L%YYIqoAfYCK6o=(RWe4DO>^O4C#!c-9eGgz$H`5`eR1 zCgwz^44Dpl?zz>1lbUSTN2!Mo9!zN`pc!$1Yp3`$zj9-%vBK~n?6Aq@DtL5|a$4Wc zo`+|Xz?PM7J(Z7(rqPQyAxPy{JX0B8>OS7cODMa;X6q>Wx3X!V>xzE-Zdky`~Zyk4B=79 zfZCfi25V#eo zZRZb#Cg^ejFx~an^SatB=I#M!8m;~UT)1zye&e6pUd>a3@d0^>c1gpIP+rC8%|zT} zLbd3(RyU8tahLgm^S+&R0^ii$thU`-Y0&1qa_%b;*u6TW*4lWyS*RbE-5#2n}K z-RAua6k#D+m_!xKb9D2zEep%t0NAC8Zqs>={S3FgGwnLMO3oo}N^Gim>qoh$4)-6p zib%Y1x8Jp+);7QO*#-9{h{wq7X|7x6MrHU@>?Tp!&dzSYn_Nxxf+aRI*YConRu@39 zzveNQmQu}&@C9O(w{(1dLy{P>th%#mOzS_)RP(9L%8aAMpRz_((P2orYmjZ4Wxh|3 zHNY{C-rr?r6X&y`is9AleJ3a6#Zo-LN7-`=(C#?V#b4b%5|_iB0uDS7*O*NUsBF zb4*#&UaK^*VKw$3+2^QSOZ#Yhm zGfWIyy2UYkg8A8p<(4)&;O5StfoRO0egE1j0@gIY*L*~88^RU(tYMCYHeda&TD9cRSCKx= zZ9o%$K(ZF73ONz^NXrWpCIO%BprlZF`JjGAKX{obly8p2-}Yh`yq-*Kjo3E-(^rWb zQ$<@gSZ|asu-w+mzk~kk{J6lb>8 zh}#SZa7r6pJjSxY-)3RN<9V;xnmXt|IhKCl_%bSTrT(vLnW!MJ#WBZ8+stO%duE&h z_0sz1uG)dSnl@uQ$v<7V#I)9e^4Ia@mp+&~00;ZYNa{xNlhHhCCo@d{+SVOtdWrWz zGKgbMUcAz0vYyLc%{$?CSdj|uK6G+zG6)2 zkS50#rRp?afWef4#G3jB$}pf?Lgzup(S86+KlgyAcEuj7d=1j$69mmM#*%JYVz~s% zP_Y+UZ>o@io+5|w_|?QrOTir^S6=9 zVDU7e!8&85t!kEuugk?F}0SY}a`5*PpaIV;AW1)r9sKL(_oCb9KKRewX@d6Knu za6OP+11m+XKTKK5w?-lGnSl|NCF410D04x2gE$r_-DF0BJxP96L!+Fl2nod z92|(c^qlib1A%|kBMB+h#Q{3nlqKcPIv7sG@B9a${f~go3}$);@NSNgD6MEbdQ9;L?^o;2`L}ZH3qMQAoc{1;6P5)d0NDY7tzhL z4zX8HNR3Gsjl06yvfvT;Kdx=l`d}gvo?>+v?a~7}G+7H=Fh2IU^w&g|^RC4bE*~!d z;YZX8qAXTDw;EgT4Q-fChdU^<9Qz4hteP49T=ml#8CdD&;$&q#hhl{;6Llj4*5S)u zNw0;$jvwUs%8BuW)LDLwd`x=6Qhob=*`T`C!;%4f(GAWK$%_mK`-u#(_)Z$Y(TF^$mDQ@QTZ?JTtP#M~;`=r%xJ|D;N z1fV}IY5;P%kYt(|Gw%1aQ&&T~9hGfYfw^m3W%;`TU6trvQLYup_52&Q^V}lQusQ1@ z#WEGtsjtm`hU008=EuCXN?#T`gR85V8_*6(XB)bf+Hx_4kR`_wy zz>?+#(?*Jj@SK=&M>uSVkeAro0 zs0z_o)5B9Iut8lXhi9(-SRr$S#X`~D$-7n_Tj3a=<3Db}BM{nW_w+QUp|om!I~jQ6 z@p~xGW@RAPj;E}^UFPX%f&n5k(g*uXU4O_wqWNJ>aOs0%jcF#o z9T(2#6~a`6-)?qpPNqdQXj$pV?pYPE)^#}L4rM9Ryf4;koo-Y2{X6QQpphnYiq8fS zj);~e&%u~$1`>t%m3wXL6@4s5#xz#UA8dGRrz0y?y=Z|1`KJUal*E}qj*G(k@#ukB z!^Y~jMloM4-;kx(Glt+o+iGPP$|T9;NTE6Ln{04{o1W#BAyizPTIaqS$MV zqJ#z8zSTadUR76jGmHOvERXgv>q%+uwwCu95avDRQb{ND!S}R?Yx6B*g5yN53kb0o zL8c-!f6MmmV2$yet?D@tq1GFAnjb?Ymm8;HS5(oh}PUB4;gUn zsP~;_p-QZ$-^qTfqa-Eow-Fv8$wbcqD6{PS$IXjxd7ECPY%*p}v&56fUbeuV23*SdHUZ)J&kgEL)zU%DXv|6~b2%vA}7ZelQ7Pk?qe z#h9GWL9~1^4YMoLD;k1Ow}Vc&=g)NsX4(m_GL@6HW<)GzKj&r*m%XQ$XBzxRW@hnx z!@6kGYSIy~#S#A%dq$kv^tc>6C6vdU1`lO8&W$ux?Wc=%*3ETnKJ7q_oDxFiZxMoy zrNcHiozJBqm)6EUD%A_?`3jpm@rD;k>WLWDy~8h~u%nor^>2m5*;qX;1u$|D9X;?h zs%t(=WarmM{+YyC{LoNDgQ^_#RPt0$_3VpS9ak%O5Br)diQALE*bmG|zKv}CHM@N5nf{fhN3 zL7%VrfXP%DY5ZCCxbA4JuZ_s>vaj^WmflmmMbtRiTObNi(Q~ybugNm2;8Cr?AqPzY z(+4@pIPh+?;mTCKXj5Zcyv#>9uJ-_;aynAwmG3{eA)lTn6Fitu^>s(^<3wcJALErF zGp@Y(AjFdz`uU6FlljC2$>T+Vy)5MdFh{dxA`nFp>Ij%C=HR%%ycYj|sCv(!Cf6_A z8xciC#Vtxynu>^`kc~9ymaRyaqJWerph%bAQba{JQlfOFM5zKo1f)ZPC#s&bn9qUF-Q+i4O%Pg-Xt|ZT1EjY7#@*bbyf7^}V5u zS_5P-PPJb~SpRwaOLwj*9s&C5qS3%(WmTR*uO~xRMz`9Md?5C>CJo59beC2o3K#>q z+MR3lw{+{%w;z{YRIHf@{R+Xd?`={v3un_N+XHgkfy|H;$XRfk-wIqvMOI6OQeJrU zZEmUEN7qko>`fTiywrAopf<^Eo>QV8no}iNLp}opD9VgWWJ-Y;zv=Ef>Mho=avnZ1 zWneZ5|ASs-MlpRWI#y6Pf{|?2!aGM%tFh`jI_$3E(`(Q*Qd@&g!}D}m$L=-!BDH#=~4#B}N0f|(nNZt80A7*dG!a7s`5%=p_ zUHHmGDPG2aTxny3Hz5s@79!-+jUF~=Xun~0j^hA&-3_Z8f}CfBXw zSp9DRe&*}nyRyyxb0fD0O>{wO*V)2~SfRI}P2rV9^Q9**gVfVPj0piU^{ZmvpqTpX z*URcGw=Q2Cd$SaB59Q~k<2U9jO*Y<2Zam7HIdPBuDX8R>e;M~uNWdWeYV$&9mz288 z2>O_#F$CQB}T#8s?&?z?w&5xf458rhFaSU$__$5*tyxw6{g} z(@v?mEwW|tUACUKT!wC5OO$7FDISFw45G4ZSv6Q_i439}9fIj_ut z3@}1(L8dgdWO>seF3;gju&O#u>bEf5H{7&*N!sbio&Z_mT~mlP`>^U z`s+9xvuWwIFEXmP&5abeR6cE^Cq740=mR!!H}f*9m@w|@7@9XmMnb7;7`-z4RlG+ZY6f$|Kz(xo7x=-GR$ zi@@bI5Y$LnOEfuijk<+g=JxLyQd?6&V4kd)!1{6z2hO!WOKBq_&KrCDYJNA32dHl6t2 zIM4=i3J7kkBAQ)oj00|u>NHOOoi;ozR&VdlxzRBIx>F!_3AAaom7CuFcA3@?RLuHK zjvx<=&LNd+WtK$OG&gTE`3^NuMBOcT;V!~4fn!ntA=W_4wx)yNfM3L%B+-w9Ct!C0=Q$zOt;1owV zr?1((wdpcx(I)5`P!wQ+V$#xjtxF#ys8~nx=8&qSV|T2BmYde{TLnxemB5^ylQPy4 zvR(9?yhl!149l52%KM((<7>!?&rZjz)7+4a8;tk#S_XPk@v2lk1uM@T*d4?~%v`d8 zAeKE6q4Tq0mWGwz^bIhxs{WH`vH8VKH%}~dATJ(Wl{(OzSSO4Bp=#U%X8W3kI$HmB zO$;&C*i^1oLRKxhBf{zmgZCIJ0 zt2AEEvcg^L3`FrgbmWyoBc2;=BQ?ZyvP$DhC2nn^p6(BjONs@SbGlkWPG9k1Q4F*g z+ezssti*MzC?r^xXNlbqXfa6$0V=<|CuRl`6i0rSv`RP8D>}G#$8e6hv5W&p(*6+S z!X~xlK}dBe9mN67lhFw1(=EOrs;eK&!y_%>tk1E%g1c5atGw}b@8KGEC~v#^F_!9A zxmr!J_cY_23!21S^;k{{iQB529r)v3>d@3-*%eY;gbr-b8>sP~50=Ur098>{WsTdfJ=(7#R?vPj{IG;tvdH~CzJ=sKr zNgs!)+S3-Ll6@i$LB5d2NuFf+MhA;e^@;*2@Y+EpAGuika!4H)-n$-AyaYXqptI?? zttNJTV-7byt{wB3yx4cREV+iY-wfZ|1Kln!ZX_~_i^0wGAS2m3j?%~o3S4=+`e;F7 z5Mg+BxzuE2S-rhsOx3Po*b^0k&pSt_cGRkldoH$()N{Sk>WTZG1aRH~%{d{Fz4hBN z4>f|LTU14$yHA6^`G%>aS%V>F#%$qI#~)}C=wI!6YK5MQ)0+^;XoNvz**}vt`4FSD z&g#YFRms^c=h85t20M5_CJ z4x1h>FiiMsUa?vGYlT$8Up#Yzkaq~;STy0C0V&A9U_8sbxEOdx{g86VyM}jzCyjQ8 z>~%b0O7Sw+O(uSbhf>>ydawPq8H`kLlN)RJg%T*r^SlccUkxgx@ERUaE>l@z>GuyP zK@4DO;pOkmoX>Y!bWKcjOxQ-~}Ye zEkh%3IIvW#b#~(g{Yo6q<~gudQ90t?*EzW%t*3?omp3&?4H-fA9U~80nT!l*4_ z0xy)j#~%|KBTjVG0D{F7>r&=B zGaS8qBb~?6Y*W#jg)@kmsUI(~?`3&{$UsjO8AMVD`CTu;Ti%yD9kJZ%3aTfOzK9de_jtj&;CY>VJ&ipmW@MG;0g2AXj4vP zfA%E`6y2pt$Vui7&o-4AT?E>^rLzEP2JjH7Pl50M%Kl)L$aL+!lV|?kw`)?UZ%?)) zWWpE;G9Q?oiBs;Z`z1_@RLSJ)7&#lv>`{OlMcxz{>TGFD5+6`?I+C z+dRk|VQW_OLNCU;nBY@r@V3C|_*`HSTXT$p7%-_w1mk(UIEYelJ_9K=dD5$C^J6>mTQ8493hi^?@WTk zgeiWJXg}wWKlkvKZ35kSvp4Z<>7QtN?wx2S6~_B7@x@3^@s?$zhs>M9GLfe2KLX4A za`{d)bt9tHnqH++9CQoEk1h?%V#VQ!5kG5l^r4=oRx((HdgGD`pK50;VX&t5yv|L&JWxfHH zJ#}NEp@1`f8)(?Uj!wA`DgHfR7vBLD^gTs$G+ zkk;V93G=qCJ4zEqxB<~gdHJ4mU3tK=H{sS=A zX}3-vcWTi7EcF+q@W!P{y*phKEAJV1e%Y43pS!!<;WJQ_>|diF75t?956xWbfziM$ zDA~q$3@m%C;s5Ods7h9=D!aK+!2M}+v+7M!w)^rr!^t~P2bQJ#CoB8vxStFa{_}d~ z;Bwm&bVS#UV>+DHh*+~VM=FD_q5hG0a0gVyS8lMX~`v`MEo-(57NZr^mdG)b4XKynf4ur&dd68rM@ zThC@4|2BHkroslwFalRESo$z)*}TE15Yx~+Bpf0l`yor0n*+As&H4)_r*-{!x5=C2 zk=GC{E4IctU_`U26Z|!wFk&7VpELxWV>ackj?}mU)=`TOHF1E7|2KZUZ-W5R$-hqn zQ;UQ968*Z)f07caSg$RQyFkHYSVx1ME59$^e(t|Fp2)dW#7|eV0JI7l{X1Hwp`(34 z;*{8!G{386wF~n;mnI)(m|JR{gB&$J9L8X{{}XxYEbRDAjXc?^J0b234yuqtOZ!jh zYb19w&KDH<4rJbod{RhvH-D?}!KpaMr>Mwlfw3Ur27h1JkkGT%<_rPbTLN-);P%FES_;gr&Xz>CcK`noVR4 z+&lfN6`PNfrbJjx&zu3D*tl_8QY4@-+t&oi7w|_%?a5fKX-r-3p17VpFqQ0gAmAC{ zyp0*elP3$M!2Wy~@4dXyc^lNR;S>X%YPs{*OqEV8GMojl8;qCF7UsDYQ+~sNt>2CIyI54^4;w9nRV$pdx#Xdj@R|9}@18e|NZB zoTw4REG0!P4rgL@V5bi)jJ$>1jF`^G4s&(Blh8)k`!eVaUD*QM?}CMMkd&OFe6no8 z<}sJR-PhpNPPZY7kEW6I|M;B68`l*7-svXoI=-gDSD5V)A_+Zn!W9F%jc#cN@;iHE zu*?|=NVY7VY?q3}5#6(a_*i)6ljvVLkv~Qi1ROOZgMh^^@Y0P8v0&$5?@sV46`kZd zml0yDl`Yz|$V05o4AuCP_zSkoH8YL=Bq<>!;-A2as5rLXc?9F$oCdHgidzm$${=@c zCKO7S-65YQJzt%GTEqxC5bR!OyXH-tMPz>%M0@L(1Wu~adglxj-yPl-vy?SpDWWQQ z8w^9EtaWkmUfJ!1A2ohWZ6j~c?@OSnD$WsU^*My`y{w_!6hGbeT%xH(cY2N%`lmJR z3z-FA?bqZ0M50ghvb9~xbCplfq;=!pisy}GGSgJ}%J;Zn2O>RLk=GGZl&Gi5^88O& z`^`*vRz5+-F2_KRfiMVS^s1-CZEY93T;`WuLYs`lFI)=sG~JBA=aFBv1^uii=Wt## zAbjW4x9h!O8$h1B-TP2XYj-{_ml(0tRRdlywuJXIM=%!qrEF+|Xxk~|Qt`{V!FokW zfjk}yU14A&S;k-%2A5#yIb#1(3NLKt2x!XUEX=ip%Smun2sv?;KLZ1vt}VU9J@S~+ z(217nEUDwF;_CrWc3fr5Ys+!%Du{m-hsp3px#xh~tip007yHMzVHSape`wcnEA@TS zz%3fw%H8CcPXHv2;`dv;Hp@}ilZKo8W}KV6z2c6FtH)&O1IRCGX;r32pru;BJsTFc z*65jO8uRL|ZF9P=B#AJ8N#pngwG@qE-=o+GP$r>1Pj9TGrKNuy3V7;8Y z$hY}{fJCkc{F8^aidmj&J)U!OK=J9%{w$HhnzZwaO5)q3S?ooe{`OmB!1B2|cKI#M z6hp7{1@Y&pHV}RRQ-;q?U(M9cx=+yddpQ(PI%|#G!i|&yBJ+^4x+n z!Kz)`2vNSgkl7wi;qO45jgE{&h`;>v| zcntknF!u=LgS ztuyn&Gb3=Cd=)HQ= z-TgAP(5h+#X}XP6v>uXDfG*Beo{XCrZZ!5S3i=AY%OrqxLRLCYJ^!DRyJR}`cJPg*u{>Nu znH3e3O5J~$#hOdUm*SB8#;57u%dZbPEt-a1W_E^7 zuwU#Ha)8~#p1Hctly=rCw{3bB`rVFq3R@k`(c(|V;;~EJ)27MhmyX=gwGv!vw`HR= zik>`3C>|Rd?x%zXc}3P}q{6R%PW3yVkbu<04GKalU_SZHum zAY$J}u3|idua6{z(g^^*&C;G)JuXz!Af#Y z7C-MYFZ~73SlbaHJ`%Q3i@Oy`Y1S?`56~bx)P5%ofaq^aJJC$$mS<7+7W(y@H>g}A z!JuN!PnE@>VhfcydIoo6OpczLGvf;@`3Nwo;dAee{LF497St_hR=R!F-e>@!p8Z6+ zG*T(@J!OtxEvgp|8(bNKKO@ae?51$Y;!s}*Cz>Fa)hv*c`#6SWPEGXtTXf4ddyx8u zgte%Wphsx{`!pC@q$^C$9y(#j8JebgtoZmC`i`t`=@T*u%$2A4kDrb>C>}%wwD14v zfoiCV7%r!M#uZwHK>LKFgPjta7>>0NR#sO#o;R|VQ%AEjRAcoVyMMiT?!m=Tmbnl) z)o<^Gg%R&;GtX?jPHP*8Mi+omMf_ek|GfD0nQwb{sI$HA9BwJ>Lfv(J0dUufXHefh z;+xzVlnS*SQ7O<>myXtz^P*r+$F1RptB)=xd8Jv^;s*fMvB;9(nC=`pHaLh}gB);fR%UK0~A8hzII5;Rem?vNpu?L2Gbp)*Buq*)t z@{O~{W5qA45aamS+@godS;7owLkNaZcwinAwN58xU<5ZIzLSWN-GfF0TXE)-Xa7lb zOt(!IWM~EiKUu8dyeS;Wb-P>>?i0*N4nrnl=4g2yE@8c+4iqC=uQu;jeU&9a6}lBW z`_n@`^CrQST=vB<)Xt6R2#IVBg3pat04{`Z7`6}{J68Pb5$(anLFW~_wl+PL-*GjY zbF1H<8tJzK15~X`b8F=D&vE_ix43kPoyJ22aCpxyOXzvuyyiddXYgng1dNCNQGn2w zg4#n-K?8k%WJQ4SGGKw1j6VJOm>GfhHCnTjXT$7Yn%Y%m?U3r}%NZ)8bUroN(t!0! zMmLm82DrK}hP;t)O2c_6tF11oIBG3kd)3>KrVjTwydk3TV2My+fdP3ZQO$$EXmj5kj39a;Vzn7=qF3P@ndt>FJ+k zQEL;r!Q>vM1&LMTScnOpwM$&W$=rM9*?*qg0NrxLKQ^JvjRGKwIlT4@!GkiJ@6H*u z@`;5r7R_d}YrCPq59xYvo1aCOZm(f|J(ZkO&k4|Sx*A9=C`xpyj&hv!37Jsx#c#E5 zk$BM(IkcB{z`is^BEO?(4gN*{LybO|-=@mEMaY^5C^qf;^K)hCq}_MrWDpNf`I$I+ zg@iAq-`^SL*6nr%h=+TGk6B6|z$HH?b<9f7l{!jV-Uek|f!<#EcSk_JV`@_pkW9Aq zDP@ctdT5H)j1BsMptXSv<&O){P8UWqRVJ!izkm*~db8&2a?&y+LKF%u`3gEQuL05k zkSoJn>-tY|s^ko(Kahgvw{4D1m{G5>iF^`CEoyezAYjgBjps^6XgzxmKBAQ2<2Vi~ zVEDy-)5bOAf8_GMhePd|0bc^Xk}DDgrJV69LuUDItpdHtBTt*w0|=HJj}c$&LW$bP zk*r3KZ5l;%f0*~X9%4>F|6+YDcNwR*WoP(oJ8cB|Y-aU)b7Wb>U!`r!#ocnOg-8?U zIk0nCiW@@lGtyA!uzr6izDE|>%9#9Fr2E(Zy^f|+<|w^D!j;>MsHWE)q%M6Q@(lrF(2`UIED(nbGif$I z%3EzMMS>sH&X8iTNy~2$xFp-_pEfOu)_91;7n5r82!5pvB#>6zV@|(Fn`2D;z!P<0 zbVoz|s98B^iOqI>9msLH{uqe!)fAwrtqQ-p($HC>fx7MaWL*607UybUIaOzjTS`cT zswuP4G9;`UZgCwy@i)Aajy{3i+8F$3XZXZ!wo?5fa&6Q1RJ}K$uST%ttc%*49F3` z&F_D<`(c-yFz)zsVuo9l@>qy=1a6oWP`GdZj;y@JOJch{dRU9UTJ8x0yO@K3a8ZHD!|BX@8@j{(H0<9GiXL8tZm%mM z82f{MV)@NcE;Zg?E9m_izGl8P`oRn_X00D=gq%3B?I@Ss1Pg2kl5g9CEfC{AjeEmO zs>w?s`u=s5e8(=CDjC8t85r61)&blZ?&E;GB3T~Co|`kHYsh8P^EBiZq10JRNMO&Z z8l3-OmK3o0p~s)3IdHXD{d3P$)Qt8|j|m1{5j$0D0NthwreVop`6G$;v0Y~~^Nrvk z4ex*)>BDmNL&;ijdV$+bTrRHW@}`X$FX#h#XKO(;fY=Ei9GW$0@n27JQ9rYs7N=Mm z++X8qIgAUj{1ynfq%Mi=Wkd!>;d)<82s|K%(EM$KQ=6Yj>>}*s)7pUcem->BhD?TxiAIN54DG(mBh_l)}&?Z>zAD(M;8933nuu>tFmU7T#dhdIrbWYTi zFG~000YR*k;(3Ca=eP>n?T1_l0FI0e8+=!xz#bInsuVxjA&-j|4CuoZ2pIILYvT@C zG?@gd{~c06h}92%_+(3wSR=^m6jaDzLYWSR^llnCH0QtxzpTYhAIS*k$Wv2;hGFAD zkPRawlxqW_=*_!@Dp({Mmy7{WtZ_-30X@e^(C&6-srQ{F-DES&cpa%-Jl8Rx=l> zg@BSm%b`@9!B&MK&>;+UP}WAOEY_jIf@h$q^HhaUM z`b5>_{>#6W={EdIL;>GE;MI-qDG;H5MB+u(80fZIKgQ9^c8gUrQ016BEv@>Hp2C)*@Zq*>{rVq1=MrNOm$&oE zXNpH=NPFNajnt?!!HJtY+ylA?7q?NCo)2KBy6F{l)hZNV)U5Dk&}LUzI*-Cfp5wWJ zoBfy{40%H|vU61LI{mfOP2D8_pS869_Qg#2`l}+Bpy3W*Lwav4VQ{Z!W02o??;^m- zYRwO6$SD3dvKr?0R}`}VgWB{oBMj%Q1lxDSF4xNKk5)DU>KI4AbTsGCR%W8A?h)U$EzSfc7u;7N%R?ubVt{UjbHp`mgvcTAowuZ4)fa3pVV5H#QYmPY~wB9fQo0%w>y62Io7pA6{u>Cd82+wEW zQI*RaQs9(?nBd+gZR3*pK%%Z-q`rTo)FotP6djNsC6mqj_V7}g7Sjf9YzL2@=T)5f zrm#<%K028;>ZKW|f8>N^a-UQ^@n2YAYJ9^?Wk~eXv3~4wfNpQp!mT{~9XQa#-YMdQ zqB|*{XlVX;~sM$n$cE}#!9?S@n7B9g%#HFlPu95owX*z|I|Gelgg_l83vsL0wj)bEW|g@ z7dO9L6k9s}i5CT+(7oKt+hWnmx3Aqgen=Si^0~jzmkzM9j^=D`D>`T|fXed)$v*o!wmuk6c^b9{)mg(l#xGyx3s#9zqPguRRfV1|)1-M;a zQZ4ez?!`a8$5(YDvZhw1M-VgX=0OSVAk5}Ue^*U{&x%0fA)%wMBd+|EZWuIQmGc>~ z!WG};sU;c5n?E)(WB(^Ic79o9Gr&Tn*@fdPf96}kJ|O!urLKllR{;2yOdS80;Rr}f zkTTehSo}y$&o^2tceHc-<-TJsK6ixy)EK^vR3uh0@0w!yYd0#-IbVHH68?5iN{Dj` zr`2hV5(IJypT?SD*@9Nvrdq%^QwS_mF>Xqg{W`hAe%%N#8dP}uN*@Z7uOHUB-GaL8 zb;^6(THy*a7TrC;c%ik5=py)k;F>&$h;4*n_Mg^W8kg&>ScTapjazQ)P`Ukl+a`WD%=Heo|DMo9L3@Cf#2tx0uWv?5AtT*t$bUfF)v?WYT* zs9q~4bb9n8DROJH7hC7M6g^h+O_?b2O~qkEC%f{Mb-(lPu7*dzjPH{9wYFo2gqLHk z>1p3#CgIT)-c9vq5S`kjBR)GOvK-xlTgz$YZE=be2b^q&>b_O@HI_UdIG>_2$CD*m zVA+TeB|hQ?YObhY`YdKpm6a>~eOpjN_juzXXx+NY4xxvuP~w|i1S^K)<4k}4MjwH{ zzJ{DgU04(*#xx%Q^rt(ac=#YzF5vWioYlkhFGZvOC#nf ziU$o1=6y%ES});L!bz95e4>6xZNaYSXP?zZMmqXB5mNYTH?JmluG! zw9$udiz<@lQDMi|Ew7tz)<53rTbR6id_9uBxnCpaDRq!mtbh=HxQ#;-wqC_q$V523 z{crkp?cqt00V&!<7cpQ8jAh?7)eV8L;Ff6*B<+^{dbJAH0xyS>+dvjUL;_Cx_9 z=rYFf=e^ZN&?ZQ%*GowODQIk^Zw-)&`}|Xsn$W)*{tbq!g47Dk<(h()`08%-5E|Gq z@_Tl&DOHrygm8DP9fBwA2quSTcpnK{>F&Uj3*vC`n53KrWePcK5j~JiK*!IfvLja~ zH-^F%#hB)n+y$fahTMF5`+2ZVHR}~4wxQfp(_PmezrO0>Qc2CPB?U4v)pP=7m1{V# z&mp6)_}M=s`Bx=j!=@Dz>G(FsL&toKC;bdE&~fV*sN`{k0o*Drl8b{jFj>h9WnW0 z|Cl;MIl@kBV?mTR0zL)kO~e1zFUKmi0d)VP(8ZA)f~=ROR(mz{%R_oOeefju^9thz}b zW|b}6b2ZVlWPUajDj=&Ft?KCzxD%V8cxMewz3-*T^}7UFQ3LC%{*CUOoZ892IZUv` zH9`sK0UE41&m7;Fm>9mQ0FlNXTMH=rl?`+>u0Kzv#OHMtw#2Q7GL-cZVG|*>ue6$fPuRt2sF1s^1*jv z+txUyYn#aeZgI4ovz9Icf`zHTyz7^OKlhJVX6DG~Y?unx*5#TPdpJZbwL#Vz&z1oW zv-$xEp|^1UXzjU7t&QhgWp>`zORuoZUUe%}!BxNmCl%9kinxGc)Js*$82r0B$8=4L zWyCk>5IN6IsMEZ@t1K+`jQ}a7Qj!NNSUMvYW0oca?Txc`+}c*I04k z)6Pn~=hsjoeu!u6oUjR<&4i&IfCIVuTkP_2&w$R6CFaU)0Czwc8*YcWDy@4Y`z-8f z(ka;vvzZ7jCv2TS!vTK^)-xX*JwfHaEaRXAq8x-4j|s0WINA7c#ctu&)6PWBUD{J} z1JjpbgxZ|{9o{rVDcHP>~U{m&xAGyeG&`|;-`nLuvtdR7)!5FlvGuDa@jN{399ntoO8bM608CCV-E<5Pn6Mx2Zn~;4`Au^ z>}iU(UukSfHw228rQf^}j9cg;%BAd{Z+z&WzFMupYzT+XG=v5%T>Dtz&}gsj!SOYH z8YvDofvf!^=3!3O=0UM#>RN47{N__! z)`WkQ)zYP1y6tb)puZ#XEG0Hk2@%8hUqg0sESw~-Dov)xPRO+uG=)S6J(S~ zbK(9jUb4BjZO5A3X}5UpyPWe*t4Ffpj8x1u%HC^mwNExHMTdURci;_R%t4E>v8&#B zK9}kLWwXS6P}b+IWu#qen$-pY@;qM%?#HYyJzkH^@D|;>=nO*iY!d zPK`5bHl<}4xR~sDK;`T`p$F-~KkSn*4{PHc2kOi30P}e$03*iR3VI92v9ob)Slx~y z1>(VfBW0tgK^|`~^rK7{a;54JoN9Dlz=bsNS`-J&oL9&LF)!o7i&Sm2%jv6;Zym@A*D7!9i8ohh*V|QH6XmyUrWT{`+V*QXD4sG&eBdMnu)OCgEGD~!GWLu=O%?j zR*55+wFFca*K6sNm=s7qX~W1d@^Z~rMW*XuR0M}h$73G_2Qw5XMuK}2%QxVi;{4A0 z?@9hNfq#ysE@Q^O-)jWnjqj=E(>db2F))Arm&c%wZVcp|(vcuYXQ<2N3uU+$YO6n; zmi5@DZSH#E@s z4B`71k>-PbBzIXvrxLvt=#Vl0d^j9gW1y$4J*ETfRSGNI8Z0Kg!*I}+f_sZN$vDAc ztxJRIdZqXHO>~nVA0_G z|Dn~zPd`>QWp=4Qbh~-PcPL?!dQHi+^2nVV`#zsMv)@>w=@d~9&urH9C}biw;1PD^ zwfOoE%*iu&SQKeAtZWlqT@`9=1|I}Z*Cp$a)5S>on zBS-!k-ZS~>(B+;#cN}NjWZzb956?)yMsoDq94`;Vfs`w^7a{9=!&esi!Yr!G_4vy` zd=@jTngy*jJZ2nE-7Rx>zI0VucfA-jE-0+!5rPof5{NmQ*$3T>y7f!KwtjD$%C&QO zPxi1eX0Hy!Z+U{0n$49^CY9j9f)%wi{kx{(bBCTkkgb`Zyzh(GZ5=<>dok+tf3Ht+ z;=k~G)HW5H1=mb-_*aZ(aZO2k;p`FT`~gDCpQT>}^OvsuP!6?L5Pt9~z+FqMX>$L2dtb;Ni;jz4sx*_5A|>S_v=X7T{PL%~rjhi{ zskBI!O1$3V8r!DI#8}DmeKVaQ6VHzPsfZ5D`eWZYtp(>AtF(2tU3C2 zAw~b$VEA*1^}>_SWS=VQx5P9JvbG<}<0lift|aTf173ZNqHtcEo9J3IpdE7kggJr| z0quG^N1m1N98?7QE)R zPl%`QLv?Pii$8n`?OOIMP5O%?kB>iNo6X--ffuh>O2G6<0X|JG6%zyUbl?q z>Ya13t;-pWOM2Qh+?k9B?oi5$RIe?wX!3a#r}F#f!;0=_zh2KSBz}7VN{IN?_rC7> z`T9>Yg0V0(kA}v~0ID;aGl07j8{pC)bq6l7dL<6l%+IT)JtC%QKN@FZce8 z=+E!~9vB>c)i2)cwr<(HIu`l~JmxxlI~qO)01MhuyOh8Vj~f?mq@?~{(0Dw4pM}_J zInTIuI9GG}`sA;hOHM7bfAsN_=Fm^{zDm(b(c$*pmM-IxiEGd?f-D01JzPd_?~At5 z=>RL@`xxUIZIwAO2U~5G1u+xw@vjJqDdYeSDVLrtIefWQEcwK-WB<0BKfj^K{t#0-%>fH6MhCCjXvRmk3uscA;x0sX-%ApvvNi)ZF71l(PL%iV z#qc-LhDQyFw9mkj(5#eYxAUW*$2QmMMxtYvPPsh}&lWK-S_BrgY83pA1@&Bvnkrle zj?M4wPp8uBf!DXPS6hu-%Cz*TO2R@w7n=rL>Zb^Z~x`eC#z4nEw3I9 z_Rj<@91yDhSMf+n4;^nPxAUi$gJvVC*yTv`=lOm|)eFK)8^glXxQ*hPKWi$=OV}qU z><_)_w;y05W_-(%#TsX%{;JA;h-?u@9X)t)RK5>sYxz|-Q@J%8FXn(rJ4~8IxF_6i z>XG~@HSp4LX|p5Edf4@4hqr910=nvoo^8m#z&~q(pOCyg1Hx?|Kp)O4x1~+k8!+8F^r`b(4&i;3UU%-8Z?hH#OHo?y`h_#r_ zvNb{98v}-DfXcFtyOz+txtRAck6vQl{zhn)77>e-(C3`=hFoWYe#?#q%XUZ!Wv;#> zO7DJ4GE60}_5^&PU#J3X?SAKOyz_^B5bQUPjMFx|WPY6ARdB&Ur&Lt2!?yO7b91By zl-Wo+)EG)_C@-Rhz@*OKNjjHvj<|IA*IFJR_1GpghIH;FT+d4wZ4=B6Nxinv0KhFu zdJY%7S4Tuoa|#^Jx_A9A0}CszayB$^B_i=n(e?qS%5dwGNLepx%hC<1UKMPsE_M3W z^gYQjYu4?`h5B$A`31eEXO9lB+uS^mis5eI{@bH{h?8)iRp!sMzaKX`iNQJcL5mPQ zc=)0mjPm*K!4oQ)5`O~Pl}>5tKA>$1zPaHNqw>7;*tZpRel!={^A}#E7&^?`I3#CF zkM-_-?qjUEDB7hS^>8ri)AI3VbHj1H7W3KY{&3W!`peGUow6Ok%U)ERTXeHFWRKi| z%hjh9x4(Tq$egrYr>|7uUjqZ+iP_ zAq)4W>+5wJgd?Q5RbyulfU%A_QzX|7!|=D3GIDX9c3a`CjuZ4G{=_z85wqS|A>RIPT~1e4V_5ea1iR#>>N$S|#O3|gIUD?vw zkHv?2ceC5_#zS<%uKpJ`AHLLk7U*>u${)%pe~$We>-xTEu@ljUQv4hpY7TILs-km- zVtBpDXWDn&U$yJfwY#ShNczkunwkJ9`vup)Ne0OtfMD1U74ItkEB`JT^20h>_C)AL zQMjqLZ0^>H0O=-|x}%X_+77(DB^7R3{L?jrTqd_-ub1d_``+-cgRkk%6jha;#;tw& zDh`@cl{a2LAT5UPBiH?n^NsLE&D?X@&vsu9dE~!r8}2~&w_ezdtoALV5iu)kEzoHNna`C zXTYF8)$CmLYW-j>XI!I7%T1a=)L_JE@&EfJ?~$!j*FD8&Y!k~BQ$)@m_@}Mvs^arq zblV<@MQQy=bzoz|g`G^5{tFVh$52EySL9|+?S>%~rq;wfQ`RqPsBc((iHjt8~@=t~r=dL|p6GNDN2KnIav#={0)u?m<-rm8y;t8{47>N&7`5z)lVsiDd<& z2jrKf`-@EC52trgx9(}Z+?O1CBJ)(^zQzP^9T#{r#A z^c2KaBBcdl>)?Go^YN@&G`67s>m9R5iZwUa;r!U{%&y(q|BgH1g4E()i#_wYEaTi% zy-=UIakqUZm{y8ri5f(@L!SN$`7VCt__L>~Do(b>De+DhBn5wcGPAIFy#^)gJ|g#K zXA42jKmLI&yV2LDuuYkmNL$BdL*1SpLV|W>Vt~4Q%tJz`+ko;$ zvF@eyUI#wt{MeJkxC?dR3c>3@igzV;qeDwdSqj@WeG8U`Z3#A;x|lW(_5=ho3nrizmQ;&{54x&qlQjoJDv#WR}76HabGxx^e$hMDr>*9=Xe2 zw%bqW-x1^MTUYA791V2*EvORpJ1RbRdg;7&U#4#ctuTqa`b76jgx=WhvE8Ms(PP`@ z6LPu@=r8F)F)ja`-UZxcv8%@%t@N9t7Cv~q(A<@;_*b9l{pbG4hqlXBhpA=jQftnO zCAc)HbMOZ3qj1isRBN!equsmPQ+pNq(l29=_QitEpCnq-Hi~@yQFs|3efd1;dE8mY zC06SNexCG3k69P=5lzVjbJHIwu7~TBwHs42{Kq$~*?pmZqN9ABEWd`Po*CCB9yDYQ z$Y-}eM#O!Ee<6=}4ji50w2*#_u+zK_T{w9FJoZEwYMJLimKT~y{T2;wxg~8dxDstX zy({}1;I_hnOvj$hG|=rzD)OEBtu-;$XPxA5Zsi zt3BIFd0_samcW0qp;}^5f=iepx~6%koyMGyfiJ`8k09JJtWG{jcWeAvO@OK0x7(j? zzq9N+?-VT^_*Stm8Qqp#)*T>pGY$Le=8w;k;P`IC-zP6r_3s`I8$L4(Ss%UeSR7p9 zR{Tr#_#P0Rd&lbUm2+}ZQRkph+kb9lhj5F)d!Tq{kGP(jzCstkE|+{hp&}d5EwWOL zyRNl}r~Xt1J1G8pL2noQWI`eE;U=VI`;6ZMxeQhBZ*^-f)Qrl`*3J4aTmR;=lhmxs z^`{Hk+;{&KF7>X(&GA^Ez}D}{lk<8&Pqa zCM39yCv#flq}+w!7k(J*GPI@Iy99DX9^?+EUzEwH?t*UpAFAFvoXz(AAGcK%ZM9St zeX42;+EQDqXzi^8p=OCj?H#Ik+8DL9YS-Q?R_t1dy<*SWD?x1XyFKsE_mAI^{~U)S zN3Q$2uKRqA^L5HQ%A_$q%GnBhc@V%(lf_P3Rd(#B95lW@4gBru^Ag{@s=0kV$97Va zNF(bjoY8o_;>Tq{m?pQzuWO+U9P~hXC%+h}PD>LgDBS6I7oK+4fA5oDD0V)F@#$1s zXn$knwH~N>Nwb>lBYA~Ya`Eml`V>pjyB{OTQSHluPCWNg?(FDZ-xo77+mlB_c;S|- zZe6_jOK*`bUGJGfVf30`G{Z07nA|gkn+XwoooWR+dvW_9Ib##@O42k4`M=#%`xNKa zBa_Bv^lu%>u5oYvezSZH5=x8V^)c7=NlP(|QulkaH}AbCZ&Gq-l@R{FJLsbh!&(l} zm*joW+x0>Laig<#Ls#0}?w!dhhjwP7<6L7h)}vk;A@j1)ZxY0QAyaR>fSr}W>bq+J z*z?8tB_8YAco1pMu@U6Y@#hxmVeNmT_D{mWv`oT_y5Xl687W1_M(OPzkPi% zN|bl4DDUF5$QZj-<}FP+O0u1mrlEe7bRanX4_Yft)PfV6P+rL!XDs z3Z-|d5QBZih>fATLmM}!^^6_&|1LUa;V>(%}F~;K1fVN%8}>Fr-YMy_O{Xn z{)4pXz+jBV!W!S|8=-ZZoLRr_lEPsL0ARowON;sE|2EzKwx0UmKsi}g@U5GCb~vM# zG)9u1xo$z9Jtj<0o@K{dO=cH{dx4EJ6lv08W0wiDVjO1f4l-kdnx-?1vTpeHfiebB=mbPF@6}JULAkI@SsVIsnONlgZo$y_cHC}!$(F&Z|~jlBNf;< zh%r5#kR$Wvc_}xt7_Urh1AX|?MEo|wl{`ijs_|T@b(hV@`k;46_Z_7<8Wj<)X8r{3 zeS-yVX&L!dm>+D$9;Nm<)Z0%b8=5V?Lb~Z#^`-0;oH^c?@Tv<=1hv6|d`ck}xjEZ6aFz)fkHG1;tg%q&7POgHjkr6%o2GB61ErZS;((?BnD7jALUlUiKRs7oZ0{lI`yo$oK_;Qb+)7Cba2#aIS2_Z)1yi3IAbsr_ zn?I7gOKFCTP#vXU|DEDCJQ~-1SFIRdPHn#iTmf2bLGFwmwG}i2c2yhrGi`Bv3tFN7 z3L3!~e7Dw8gy-%HlF?J%6yvvhNb*mO7DLNxM;#|P(E8+bday1mBJycQ*Z(t|%)cAh zak?drUqY8yN!;G-_b%X4HDrgpPJepOK>QzLB5_*2LM-fj90a0F)QE0&6O^XD zBrIu}^++B)XCD7ev%7T*A9@rk@z_VM$?B{qYL|vNA{I%HPD*83FRTXK(EZ!ae4I-o*^Qc=0IPdC9q{%n_S4k9uC4`=}9;A6l9)bP` zf@EY$Z&oYHxm&Gch}UEVxSB~~ZfHWH2;s!Jiye1To2d8DA}ib58Rd z)ElGWoYuk1D(5!826(n*V7oc|-*&qx?PU5LGL+Z)u~;NloJ8e8?84PSN*X4I`|rg& zeeg#y2Jm%h-ApeuZ=vGQmu@+$=$B<(Sy}nE=NX%Gs)eXvF?Va)>kAeZF^(kc#RZq) zzPd2DrBv?y@IUDTEEnueuV~O{D<^GVkQt592s*elR}(*;fpNW%X%@+}=65k^pr6)R z3C>#VE)PCBSX<*C^8JJ0@RmL2 zZQox&kuxvzU7Q4^T#g!KFJ&c--`&9aW=4sV)JaDN|MyE~$hSd6us2#wO9e z*R2IGcrf5CN#8^euK~%70T4;+by=JpCkmf3gsFkKw=K)bo@gaHgqt$kEhwLJ^Mwf* zH6Do8WZnO5WevPaq#^eNFaO_T=_kK@@!JaVmAfFJhe23dShYRoN6bJ;7|QK}3PmM& zF_Kg*hxC~m@GP99B3$fA=8aPXT<4tXCBgsga!)yTiB4BQid~T{xmDDa^;fr>l6M-^ z?OjMgNzr=n!VekNiA{ZbpX^&rR{WRKBd(SLYU0XmP!|D#KadyDjXFVZF>4`|ODn*watNUtz<8!o&Yc z_`CZe6GOLaU$7EfZY4P=-j`!7I(Z@byOz0WT)i?e^ph-;s7uKpk|knar0?&cbTR_z zoug}QRZ^Sp^#JoP!{YPmB@g4yx{&Q?hha~+BlTYR{#0vv!Ib6Ax`Qu20$#l&L*;D5 zbsmgBfVvE)D{~~tkC>~dy6cZGBGgi`CC}cHg|E*Z|Aw#UTwYt#jg?os)8KhBw9$+! zOK4Gae06w-)#hR%y;1A(RF%;(Q}WLh zdYS13+_i*5`B{?OBYc6+uAy&WGI)TMBuLJ$q$e^Y6N^Mfs5!Dq%G3**Bqm);U_yo< z_Q9=IE)I6>XN=+=OcVmwU7g%w3|~=$(C=UR8a;Z)%3^$N33~5OTG6$}SJOQIjz%ga ze-@&&T%2l2B&)W$@%K*dbA(i;>2z!rmcb0_V(0mZ>5j+jF-RzVvbL?7aQzyB@TowX zB6M*IX(!cB#7a z?5SpbuP14CEVV#ttg6G;|7HrsJ!^svmD%hV`3ibTHMv5ow9{%0q0hQlKe?pMa~iCD zQz!48_}9TQz0?r{=sLBiv5pDX?}iheT0Cf~lmC|m;AgLFop7+dpC-d`?wPX^+O}L9 z<@5omUL7vhR>08XSwR;i=esucqN$ic*6l&9zkEyD19&lSjz%({{~-)pY?`c262TDr zQsv1pbL3@eqjmZ?Mf1mjb@+=zr>*ys@V%IRii-@h&QEW&BLdG!LB>yln5jT4u=e%^utoz_%xw=x!S|6P& z?5X{i%tXoN)<58xTXCz8|BQsq-Lcs$M>--7SIB%>)Z=0tS#~y~W*+`7zl>kd_sb5; z8V9EaW${?+*6~3nPM2KotNSwfOgJOL5A6*{l}m=-VRUX_mR1z``=$;vB!vPI%gokk zNa@5}pc<~SLpo;;@(3?jS5Ko7 z{D?M)?|+e^Wl{bEQ0;)eF{^Q;BUr>>;eNgPp0-i+4jsOV$l+61ulD2O;XK^M3+`!i zI@UJ~H%%%iKmQ`P5XDQq;}@Ciw0RaQF!zqtH?DQSTC#?H;8Vrw?eeUj9ObvN!wUCR zTvTIgDcg7cbdfK3?x#2zzL2cZ$X%O=_$rL&-<>&G)4c4&%>8R4JC9xLdav&cC?aT{ zO|ooC1N|{dHE$h1A-jVY0KmU~CFosWwHlrGHm?(T_ME3d%BSela*SrL9HAcmoRAE9 z@KcHzh7R|PN%1+y4_^2zCMd3l6wRk5J(Di~xQNpVS4Z`S8P(iI&{!Sl>mjbCzH_=3 z${bu>0|IjupmgLeVq})>IQWt^#}6l|4)c|*bEg&?!^7h-9ZGWz?9!t!sg+o>#1e*{ zF+@{g(P)91oLKqM*FARSL+@k<0NUV&{@MH$b0b@Xr^~Q>sjU3qmlPj&J-9lKx>eD7 z^I$g;@~``y`j}-z{2CpR%yz! z4$RyiXsWjJJ2aYenyucy=kiw1<<^X0=-h*yd_0&$?s8I);bJ4_Nvf=G`f4@FwT-G$ zBOx5NJJSS7)0}=Q&XjKr)aE$RW6N*@MZHJW+{}?N-J-~__G-HJUVqQ?C1sLg1}p3^ z*!Br)0(=RS)3jG2_mtp@I@$0jUSX~<__Ghh`K!+)-o+s{lpLRmd#-QMK`iA%@*li? zryrf77*t&Wl;j1`etup2MJ4%y>$x24J{=zkYXUZ2VC8&N6<4A*i-RgFdxbNLrV)>O z^e8gA{rbbpii=keYfXtI}?riA)UBdr9~1$=WI_Jm{M0-^+Hk@QtiaGzy}%An99GHo76HG zS#sPAzbKLY0Nra)4>Pj53T?1k zopwJ3Z5-34cEiR(yR^;)R607>3JdW*Cf;0I*DbWEs8zcS5>C9m0xV0+HYGExRs&bQ zjnR##GxoW?L9Jw3L9MyZ!3$LjYzzJ0yf=?`<$RXoso~4Ix|*_X_GZkCpM6x@rwVC* z#QEVg=Rx_5nnu3%oFomo^bxu0?hW64oq8`D^RH1j{rHOgws@#26tE0bRPwtIA5sCzDEgQxmd?Bxk^o%?k8 zG_s*2M-52;V1y+45tuL8itF^5hKguixVHR;haYicDQisjb07X1XP z^*GO9$m-2Rp4B@DJEl=Sh2#-_uxFLa*NYMx_Tw zmDPLV-@ow0nH%Ct$|k?e2~dG%N>EQPzXkc{|9-Nb*KNAc)w8p>-gKTF)|56DYOaqQ zV}~rkYbn)6o;V?_8ykT;sdAM;bR;Kg6!eBVMgGcY)iI)HqQ47aI#<@`?ruDLG_Gy^ z#3ya`>PZk}{ly)3xowkJ_eQ6hPHOW&2^2*4r}E-Vj#RFG6ak8y;_mf{6vLzhl$Et> zJd^o3w@l#Itg-lD3TuN`d0^`W!MhrecK)(Aw|39uo3b(=h;`*T^ZG<;i|d{Cen0p8 zt{4}GOZODU=e_oF9S8QB>qw-4>0Kow2l8Dv1Eg51U-axzplAkKAeOh_gvVqx6Rm>$ z8eAznAp*}+wzk`kI}<-Fcq8lc-lOK3oVKqQo8N7H2n)x>T`C6a>HAB7)C^As4PY3= z7MLv-szCZNN9=jBli7#uPp_qJb;W4lI~w#8U5z zdS(Z0ld_5X?7W*`*M)uwv_urv{;9eqr7g!0+{+Lix?5?+ZYFa;XmQt4-1Wz0F&@d) zz_-Bt$@M#eB#u;TfA}(ovdT477BZ~5tyxLS2Px_9PiUxEuvyyx!r1&3!Vk@iJ@ZVa zF77ELvXVf2EiMP(M^W8P;mL!Ra^+-jd@@~tC;1qiwS})QD$kHe=v}a;?H=h(O7bqu zbRgw5l2oO&2q%8{l;OVph|<3{+d8N0?6qH5C)So=mQyz{<(;RRi2e;NZ199xT4Tuhni|Y~FAv)HL=;tYM@b-!?WztJI)1VHa3vm3JW7 zKY*wfTP(Y!pS?TOZFUaxC%$L(VcOC(LIG4v}e1b%#a>Wfc3^|Nt*X=CH0fj?FDRzVf98m>CF=JHo2pC zL59n%(AB29k(EM|fNqGwzNH$TRO4n%Tn;{&mwT1mOFF?)Aa)RVvv34qX6z}FLvFEBp0ahT>d zooQw)K*D`4VIm;n%r;ElvJl|F0GIWC`|%sz#CX=sWDa)$CP*=T0px=OSoxbR{edws z$PKeE+4M!kEcde^G#v?Qy@qoWQppy==Z6Y3$O_?(109gx+*XN)tw>z!=yqAEDyf{` z9WJ9AW|E#4TXQb`GNC7KBWJXbZY|UvL&NX8?9=rlD{gT&9^$%(k6v>KIR5P7xRexN z>De6oU>Bc|e0wCGS^@CCD8Ae;QL*h21#>d2C2st}caB*OC0O_JnwGpiS-b6`rH3u% z?^V-E!} zqppk-(V4v!!m+t!EZkKr5Vv00{O+yshuXNx=hv*aJTbntvlk}e{&o>rL-r%d`5sjw zJ|_8|>%ImMp0-vNwWUt+SVn_*7OcaeX6wgm7hQ|P@M5-jXUDQc$q${s%T(ZpTN8^I z;z2u{g3(`o&&bO@B-P8bA>~q2@J49U3lH0S5lP$+;J(4TY4h=?qI+~e7e(BlPpy_f zd^?rEaPJb32~#YmpV`{i$1>rtlPA5etalG9x{^JLAZmEJ6^WDVOv_a6cbe61BZ;d? zx}BM<*R~Wfo@9RORR#)7qhE8OUc#!GZ#xZ+ooRE-pnA3d945aa@`bfRIX$us8GhA@ zRu;oZ&M|Tgr@iCipNXRA?0^GWeD?GNiMa^PatPgWNFSXEpkfMps5Yqx}o@ z8~E2%XE4GLou%BNtSuS$%w<16vmFn1b6B1yL3hNqDzwN`@RxPLzS`IF)~?{z3k7l6 zq3fWziejJdrZN)GWtf0zH1Qe4gRc%DR$NY29rkW6E-nk}IjQt`T2(38D0axpVBWVj zPvue0Y(Njy$%Is^iGx5`=Mt!i=gi^hrNV9=meX($$vo8wOiaeD>6VXLH_if31Y65# z&zLxB$(b+FRi!GL=!AJ{$UxWhqDNf0^<9~3nc!$B@$2ryp7}J%3l^V3#PdM-T~Knr z^Rs&>9u$!$zzKK*Z`%Yo@mr?;4;6}&*ndiN=5C<0lvvsV8%{)7x>4 zF_b=+J9$2iQVz><3Su$4W7H7sdwz^}TIu;w47=Pd=_L4^&V_XnHT$QBm!*8az+d|z z#nzhBVwIWNu_+ml*xW9#&?T2qNx z0XvI#9S^t@4ugAc?M%5dz$E-?^Q!K?M9o|yVXUfoVB;2FT~|I25ksrergKd!4GI7h zs<#(Vua0bbF3$>i&*QR!-F(RBIpI3?G_*-wk3r)?fO%u=v$eIwdCDQ$P;!VoWpV#|k&!7X$ z#EHio<6k%gpRg`V%3ct6;${}kr^gm^h&am2y~-_P#|!8tN%fs38r{#vv+skoFROWF z(w2HoD0d?p4q6M@jr3gfR)4qWAKSKCE<|a~(FNca(g#z$+78eB*EOG{hQ+i}pYYZS z3}9)-VK(gf515rOnf-w8!u`L(QOYW*uFb@p<#$3$8?7y~&0>QVgG;;tl5Lw$6#wzO z9+Dz^&*AY}=6rmDiCm5{Lcten7#a$QWH&rspDcN}2uxJ&e|D#(3QAQnY^{@~S^v=wJ_9~gr< z9LELWmxLHCqV9QDs6d;THd4maI6OXvfg_X4 zy{!Elw*~z(Q3OjP*4d6j=4A9Y<1_d(1%`P`zJuwgM-d6)-d0@yGeM ziqB`5YYFE%VJxZRc6CslI^@~SaQ`|@6DXf^!LocSlDcSJH(l7;iU%ko0@h4*>z-gF z9UG9N;gpz?A|ys~kGbwn978E1M^e%9Ffr$eM=(DvqXo3^O#SA$u40iKUMdmYqOh#& zIcTO+;@&V4=eY6T8}KPEBZXR3Tgs#1^2ZqGLRtFhN0PNSmj|q!kO#mZXr=h(rj7L` zjTc+eali6^kR`MHl|&6z>&Vzi6Hmw+MgW0%0~TJ0bs7B#)Ml3Z4Hq(b{84O%d) zu8qCp7TNC}_UU-?3Rj7Ssw(N_HN`yU=TtZb-d=1Bx_kp3KD2ESA(st%D zFMrtY%N*!=4U`3)om-_k>bR*`;;k2<)?h#^2MdMPBYV?~Jx>2bO-W*J5fI|vMs9h+ zWzu8r8=k)(y5fs)(=Pp7LGW{`til}l>cS}inC~_E`olj7s-K|G=m3}GwCyN=k8bI! zGCNC*u}{D5li}WV(q8gD5lljOe67_g0}9>jgPxX=bcH7(nka?YS1>>Cd7jHes-x^y z;}=Ra`ds~3(inCc3K@rOq0(kgmRQ%_hHrBT&is)V?PbsXdUZI}=||MZ)Zy9$=Y@!g zlVep9@L1ndJl~x6V%`a3S+IsyQ`eOF+#dA$ox@L26MsVrDS@rlH6Oh&2sX;xFBeX# z{Qf=MRO<~0TKigJlBc5D(G%>7gc?opf+6%tdTc}8wqh2bp1rZ`Fs!aR1fnmK58)lH zepPl{QpmyUTPx|vQnk5kHrd`$t!S#X^;*!T)8UiDt{1ptZ#*zhmg|b=LrO<6X|grm za5I?54XX;u5dt4EOs9)$i9caOp#bmdP{h4I9a)^JO|IPg_upaNI;!Z{@WFX2gz#26l;$;6GO9w zU1Ouv^&>VObt}H;^vd^K$C*tp)l*u-b@ z#Gs_{*jvA;Gj}fj?uuiBndnkn1NJGCD{wg>CiWHw105_wC_-*z{j!>(^45keZ4XS9 zY10dgHWqbm$Q0Lo;RQ=!rbNp@s(hJNn+nKSV3=AQ7tC^5uc>gBDq~!w-{g+wt4Iy& ztWGK!Kx39#h~@=(9gX`Q&t5S9`S|9vE9!9AAzXc_H0fJ(aApNcvY_nR70rM@fXtnj zl+l2N7O1yoFU(~C_UCCWr^(Mb9p5uK|DnXcQs=h3FA}S&>h1u#KEDMve$x3HHRfQ2 z5U}#CPl^k0J$_e|=|5-U;&7a1X1_rIc#ZM7qw=zP_;$rYZP)D)3@`5L0tSRt-ieL( zQ5j)8Z%?yW>Fu&7$e$lvi9!o6r>sni>k?H$+1c|kvUSftb*JyE`_1-H6DiIIH0C(~ zKY{oXS;O(QfRB9wW3@&;XgV-Z4CA$q$^Io)z5og$QL&LA0TmV|=2olKAc2E%j7B%w zdiyhG_Ne7h*L{r1XgRjDO3YEco`d(-A=C){Z+@71*EpCBwGnIfRm@RhVLX7g!tD^F zYc?|W^+vWgONFb-&>-Y=bWDJ7MKv?EQ+9gFn0`e!le80xOZj1S9g{ye*2u7BUcVux9pBFx;_aF5na^x3wTggTqjB; zmod#z>0vAr!%b)JCL?D*4*UfrJHXNgK${%CPky40b**{1zishKI)Rue_nVR?$$v8b za)__iD62X4uPEAds_Fk$^%vr@3izAPAAG}#e!dXRkI|LX_O#-WR9#NsGomG3$GUFk zY5a|qDIH@U`1<`y`Sc1v@QfU`y^l`_|2y`lt4j=QUUd?*%5=~O<4%M8tvaoe$YOrN zDn=p+7_+I0DYI`Ukwv#C#-)uLt4Y6bZ+)lsZ}kgFi*jwGx0S_#qV&Z35p^%sb}$&7 z1J!XK5zK$>7jGzGeOqjVddKmLPuS&KWf^lV^gEe*%ca5B4Wrfeq>=LmRJu~=wL<77 z;BhPdmXPB0Fy(RB>-sJ&aEUN~n?lx+UwlMeQS!2WA2(P@a>7T2C?j}dNzMu6V-hHu zn7b!v>9Ww^k&>}iHyp_(aTD|!+fQk#5F3a4r!gaDqY2uVA_G1@NKLuSxoxSj{^c!v z6RG66iP)$m#VymW_Y;>uxgFm?=|fR1=v*{^I!twjn8j(tE-(zp@;xk4+|7S)d1@9# zc!kmJ9}W#%I#pFQj77}UWkMGJq#^PX zx&U>rcMejyk4j6{8b+&;5%isO0a4=OD&2*Xw-RF!IXD>Q>nwZW{sL_FAw6_kSx z7?dr)vX@z17>*j`@3_-#6JvvoO<7=$GLg_o#75bL`e=bOy75<4)<@wDiW~t^_YCVq zCvoTjdvES*ueXMZCh``JSl_Xa%e)}TzNde@C2z4|HPLe3fC*kh0F)b?=}6V@UHJMqTdMaH zJ4YoahS9GohlvSgs@f-%(|hK|uHS6&AG{{6EIhRTwU#}|PAZNud8a4{Qg$uHm)T7B zja7L#4(aCHXSVE3ZkFAHQeCU?RT*O@VFCiC@%FchAF~_XD<2K~YK*#ho47^xC|!u@ zX1;@j)THVtseu6lAbG+l+Oh5^3_;b~8vJDRXn6x~?VUHAfOpRCy<>wB%&A5$vWSmt z`b7B|fsS-Sp*SP^8~MWaawpdWOB7mQCAOsiqj!+@!?hD)t4@~+%PPML%M z)QyncEjLBUWk6}7yf~QaOO`?eq`17cK7GsK3;pM3$;|WW)W!qLvxC2VtqgoYO(=%J ztc~_aEojk}NC6|@mzS4gANV!s_RWg|wkdC$cVK`#j~eq^$WkE8l6Ydsm#RDexhx8) zO{CcojO)XUAE{dEcmMW|eV2*MI+ycFdvXPTo=a#Yl_p(g7;!NkSn75$wppmp*`7^y zpX?9rLP^GR&f~d{tKBzJtz^jtYX7Ogtz`c)F3cPj0XT6k3t5_BvUI*Ibk-JTgA7za z{lI?HtQa;X);{d6vRW30tQvA|^y4p4Oh)?mFZtwRkNA(4j{G-^%a67nDe!JuJE?Aq z+|-Px^Syh~Y#Q2T=R@o>sQ-A*7&@#;taX34Q3BfQKR@@qBD@n56M0U<)a^<36!>W1 zgza!#bIN9k4DZ>?wv->!`X=J|xbs&AkcIT}3M4NpbkK+|<*`&!A=Jwu<|L_;{3rP# z%2MOq4cMF23Rm;^>V4*mDBPp`d_ljhhy`*W%U`*;*R7FSo;$IZ;*wnU`{RWl6Te{}!E|GV(cQ%|db@i$$j=e|v(3s!HF+ z;S-D6HczAU`&G^cG^JRr5vgh7laZtOIjR0@#{)v0D$d__tIW{vVb=IO-_H0v9FpAo zw8_;>$6sb`?$;bsgvNRfaS}$Gr+)Ghd$X7`TGt3!enqOja9L3sZ}ju&gbz(v`L*y9 zTj#CMEZc|S;Cxxs3<=LZ+vS%;Bo*{J$Y94Y(?;5Z)HbOf?E%Ycc}t8_Q^pkO)?)z z9w4Ab@-T7o(m*sY1?+j&$o3zuFoHd6H(>L(Um;DtdF5C8Os&JLOGeyW^YaNAJ76a1 zGj*^h58ythIB#dXR78bg9f-j~Ld^(q5~t!O5f_(`_uP~GHW({eAM>Z4@(8o&Ro!x7 zCr>g@E4#Z9;kjEo6VA_3pPCvS>@A1B=9S?_T~teo3z#X+uJ7n#84=xPbLa5Azul$Q znD~guFEP*h%!Yi}pj_WdHhm{-kUz^RsOeO;-siPOjyTKbeup0&{^Sz z`(eW{Pr5=c`Ybr;r8WPoEjV;E`QuDTKJtL>D10{EB1x^8p{gzpw@0@;uXxp>_U!5c zNm|hwbAG7Gf04B_WzKP@K4PbD=9Ds^N;M&yHKxp+_+<{0l|)ho9kiYCG&0Grp8mJ} z>~V55+4o-?+kyU(7EOnQ!#=b(WSMilYb3%%aXTbnS$~DxLq=Jj^;PN%-?SRDSjvle ztztnfzkTA z=5%%VvE)5ZrOj89+W&yT4%EBr>uI|K1s>jO&1)%B?hz54+G}6*9w?OVe26Rd69vUp zX}sjVF+1k?2`scfL0*NwDnonI>v$zM4AY`p<`t99JR*wMl}UuunK`0$1Nw*IpW$|V z$Dq^fOF^5{*(&p}x<2)(SyYP*mC(=ON$)g)Ya7+0BO-&i{> zj+1o>OIh4t$hDj7(OY*8yrOaD9$u)P(s*hgDeKgXa$_rk=OiAmNLI?*C zZ!T?_lP0HySCA4SxT$5Xq2gBK(N13$RKK&9Jx<2Y+Hf$ePvk^##D=$M>x9ow8^0(Q z$FHhiS1!uZBq7sm66g)Orfk?za6?j4GxW5H^rm5O8~kW=$(uHfuen+hGbNuAgS@^U z+Kfh`+MlM%2;k`lWK#K2FMF}6ua*~@#UJScl7KuKKf!Do!dr z#q{1|=bL_Fl{;GW#V}1bUZ?Jkfr0j99bsI{217O= z%k>=42=`BPzA7nH#Wu(fDt#DO&p;SX)~~+!Gbm$$oVY~Ey=>wk6_D2Je2t10yJll! z)0(ajdYv6oR2jqJsdn~*pw{a-;d8h##7eRk(|iA}Xrm(Xj+E*`SxjMUbPH|JIp7ps zAni@^k50D5jacN3eobYYWG}9CKO7#BpKM%eU-IaPIB909<(uzRT2jF?S#GsL%gg^K zTu@D3kvM4#{pwhWj1dhIHW`vRMcBmsu>(#L+Y+$@L5ailCWh079$lghs{0$P9W?u1 zx;^l3wg4%+@jZb{@(NlH40uX(cB(+bg8gWDaG1IT;$XD>QE$pY2I;>Ep_6lxcAVnv z**IJF$?K17j}Ht5ayX_g0}!p5)ImB7FB@@pU?MUXO|Z=@+@uWa(Loc-*-2Suwfkqk zzOQC^9YwH<)e7QqPMEixvDCWkajuXXK@DUwbARP$X8ZGCy4&Zuw^|V16P9bVZO06L zKW^;gfmR7deeBKTJ$JRsUFTDjJD8;S5ppwi`q@<)pn6MJ$b$e4lk!Ct(RXqqXKnF7 z@h~fk0S?37)nOQ2m~>6%l7CWzC25%-{ObOBYkP^);gqWRYe6_aV!Mnc4JkOcj@UN* zyIvwjCMidL4`0k$^EW?O{7~!T-)KzqMrNO=kJFZ~>6+k2M?nxPD8T~R7>CPq_s+}7 zH;F6G-zj(Il@8YSh@(#uopdl_(}XI<`ABrcYM;gL0*=nYWydC8cp=+1(6<(Sw+0Nh z5Gy^BF3;gRYV%+hVqK}5he%iO|4N?GdBB~5Q}DV-%^BrI+Y*6kG=nERe^jI{yDn{N z9C8{SmsDnl^Lnh=`=lmHJlXIn6}9*I==g;b%!*OHYDWzBZ0`RDRPa%bAu1i|XJKnh zEug1*xiiD*9o|BHl9<APOJ9S^n(m(-5 z6|Se~n-H?xuFvzSX>!4Xwio9de%sTDZo`DP2#@H4>#|+*8Lhs1iB@wV)n#t)z!)$q z8Z6_hqHF~HUKR&E@jqzPKxfH!+ff(;?Z-i{kMTpHF~VP zCbqh=7MOLyHYr=n9p*`6M+J*qiui9_cq0p%>UZuxQllxoqvfPkWL_GAZw5$^|t9dc= zGvfLFpE+GZpn5=toHkPLVoXV1gk3P#=$;bl&Ghdq&I+x#Kw%zaR|Zps=!<1XmVQ-( z3_m+o)6?C}@;&EeYt>XMe%Voaw~QP&r>Th5vf!ZB<;AiKuJDNDQMI&L-4U6gyHCnTW~1)6a=zlw(ALvtX}3yw3m%9j!w!PiR` zd0~zMN)3(d(B`7#&fKZ^Tc8IwShb^<{gS(Y#?pb4y~+=tJnixuMNO|$GY03#YvyB+}usIQa(>`fMzGI&<2Rj#7CiCv)MN4`v}@k(*>N(s@;< z^M?=A4i46b7e?}Qugnck=Xj=e6O|V49uhn@bPVQPy=^jZIlgIMKmyxtt|J!Px`|f~ zA@eHf`Bmf52OVQN4sfsBOBhL4N#u-dMsiqr!0Zy=dl4(`tV6|&-W)50*Ho6y56l&r zs^l=#Ki%8AN&4uacDWKQgW%_le-UD#OH*Z{#s#j6L#=v+N#?-bBrROij1|NO<&muX#PQRc}nz~ZQPD5hF1?hJ;%MPurc{Uv}R$DBz z?(=!>rCb3C0_@sMx`jL>K6+U)T7sDQF>y%M>>R$pzX?VM zyhTcTJMn{ow7vL~tw1yBwAvU+Tg-}{y?-{;cF}{UpVBYFxiR76jl$lxYWgX!1!0;14PvKTmEjlGKr436+y~PmnlUhk1}BEi{ZMj>Dbs_BgmkGeq*yR zT0auaJ0GuY~7b9c*H+&*3cX=-} zeql@WvSo8O%6#>SzblZ)LMQY$LxXt@GV$y<&cHd8pLXQyLMuD!xqXXF-w`PYu& z#d9;!B+~c{#?fKo{%U{88i6X^hM$2Pz$zt?$WK;%X)teGw7|g|3XhTuw-kQvIdq+YP6w?ig7L4b!6!E30lEj=z zmL1iAbh8o!3FFT5yljM**5oD5@tULSWpU`dMuJYlsiA?`sE4pNwUsViBjx-F5 z3wSzgnd}w6m&{gwpfW~3p@V-6qcv0dkg1l6-wKSS-a?h3pg)3AstH;hQ)br*b0jrB z{iR|gv94r>*3h(Z6$5(+Nj#82KyLXTGA)w%E=Q)d*;bt=2@CS~EYhla8+;>tkl6LJ zcV<0!Y;-)EZci6=nhkY}9#!UQAk`8+>;RMCIT9NrG8rkW6Fon305rs-xi=GL8*^`x z;=;m3GxnrJm)=+mc}Z=ZrH@3}lg~I42=+PNr)8#Z>+?SS-bm-rniF5Ztl!CfznbT| zCJ2(U()K%q=T_ZpB#vd~eJo}@WX6vY0j&(LPjqiC30YP(RXAoR!OL1^_Ftq*c@*!T z!b{kyWer&Vvf;%I%)F9>Yzq;9SK4VyL%q6*y5+E|k8xoyRkV8(Pwj~Y-ZJ{!($;{c zvo=cJ!s<>Ja8 zCvCDpY?6V+CB@74Y7$BD?{_*>q~(Pf^x1GJ8ymB6OUz~^6FIv55W3FyK8JK9pU+2< zNK7wu(0v-dY$m-9PuPd?|(00=;q9EN+70 zJ6&K?74zYWA9vf1Nb)3Wf~>P0Wbg%PBi(7%fQYK~M1N1u7a$_$fKUN<|GgKgSyEqd zOG$i>_Lgs`!NXK%2+6qW-QyS54*jec%orwbj|IbCbBkeI!scXo3btBKhyZ%vU?TM)&u{5?Y99QxahyP-on*e57AbcC)K?%OnuR%D9k1^ zaMv!9P8LyLa+= zW3E55my9*`@X?A0+74ZfQj}qc&j9>k-iWjCfTJ0ID}~6_IkRylvzoeweMR_2STQA( zDptFg`AVSgj9{Y$8l5+fuP57q-pZD(`|OS_7tOA3xgM<&pWokP_Eh@dN6FBh&Ed^y zefEKS%7&qf{3pyxy7j@A_uP_f$oB>gr}_0tCj#Vw-rq!(;4cfK8zLluT`+#Wm0_%iRO>bAnUedrNgH^K4wsp4^}3-MLh@`|0oi|bO7b2;tZDYV?8BjXbcZy@MeLUi)tkeztO*B-ZV<`poc+pF z2MShF10;+rw==r`m&7okmss#AVs~m1h%bO&JpZtSsw|JU{ka_;W2SPnA@0ywRz?6f zTp{3rNb1vM<=I(`J@}r{p3MYF4Q#hdBb@sQ*}mvEb&IXb6WWx7(Yx8#okx|(%u%<1`iXMRg^q3$tP}<5HZwGX}6zC__yT5dqdLq zYpgc#bpQ=%E#U(suL+2k#1Bs)QAL0A#+V#*!2U;L{}fT4(KHtoE$hmbdSh~+SLtp1 z|55C0#pO7MRh@*)U(=6+B@&my9DYev zR2~!$H6PQQGcYbr6*HJZM);XIazL&8jv=woGs`l)W>5p&aT&9I^v+B*Y)hQjFK{DN zQ{eJ|BTzO_S`SOP9BY<(flavTw{JLpPQIBMhdbWlqW-3eRms1XD_YSTb@ymhskl>I z$Gx4cj}msB!AXXPwJ;T!PqJ(y*6l$8WnP?$0z-M7EX;NeeFWp^Se~%MP34yX6jVFd>I;`hy{J5he(v5_fn_5lv{*({VKvNXp z(4cs19xbSuma(V*)f=ULy(vmkKmKw8sk8mAVcDljaMPBhSS;Ta$&jKM$GFmIzx@a7 z#kGC5*9b8{ZX3-`4utw|WJ$ZdYRRimK}uo_32htFnjC43eZaaNQk>&P0>jKw=8+G1&cg2*JcIrDqtZqGqb(s!nd8N?iah% zAhkOzf-YcP$!vCf>F3F*S6b@+SY$-GRtbXwp856IiUitCy@;#SQQGYF)Ymjw#r0Qw z&6*bD2%Xe+opWcxZ?u(wk9nJPsZCQ>qXj3L4%<$CJ>IRQa)j#AI9O%(!>6cl7|EX_ ztO3#ctOVr;Xu1rrsQAXD$Bw{uXFr?hBCKCI6DUR^YAe_I!G* zVm3QEJrv!y$rD81-~@(U2NhuBRYz4NCQC)7m!YQR3A69Jv?h48BR#hSZM+;fXSreg zGWSN1q_EAFKFe|M1}9-CPf}~}gy^_Vyl881mJ<}EAxh8%AxCThiY|)2XU{;Bb(xUUr7a{Ba94mqq+NlsDDhgCu)MC34sBBzj?joC;DvE(pvn8^7sb3Tp= z!<^6Ne3-+W55q9K-agmu`supu4{+PdUWe!7aeqFZgaByXHOn)qeCL7g{_71pdz^2} z4)WN`OQe>={`%4yXeRJaaK2SPL6ehe7}ag-kUms6F*PsFm-Ju~-p}aQj!~lxl}GQn zM-DcCo#uVq#zq+p1&fD!?keRcU4+a|6$HP>yYTVp^SfsV*R~%i)|n|y&9mEa7@R)f z44}d*Lqx`c2jW+BhscK9Z*~8+_VnZ-0@h{?Rv`41#VmI5ifq-K34@Bj1`^9y)&Gpp zkh!_J%&9YJ0Z-&s2ekQs0_s){2`kRZ<*a-=<(?(TM*p%O@mE)#VzHioET^vdX8Lm* zS!d_kw+9RYm(65vE{m<(9BK+!a1Xwwe$b?2dxW(a>>`*Y0wF-6@&8H=;9)RUk~16qJcz%HOTAmjbuf2$wfJrr`KPpdZr{J-TqY6mUPx*eRCf+xQvowc7wqe9QQKlwIIK$=l|600|F-ch z$nE9_9Nhj&cQBX5fZh4Q=OYr&eLqL#u}v(|F(AtW`+~o!G$TuWK88O0aA@w6tJl3CY=CB>Awo)W2A<{V`TokDLQc6DF2aHH#GmjNb+V z;p)gYzH#3cOv&jSd4xsGrM`N*Khkp2F~OJ_;+&E_!AUn9DU{%O%HLN^$am<{Fl8mzDXnkdOKA5!keo;DTrsN4e$t>R;c zoR=UPfGKe3(4CqbzmXl~l%(>~kHe{P4ZEjGU^G_Y_-8d=<3QT<++eRx*%k|^c5mn} zH>3gA!zyfepz*5oN)hc3`o)Pu0Uoh1g;=)?Y~VPlov&JwXnDiE>7{2}E??&L^@88> z(|7>ea9FfN?D&p`#NEAdX0yVf=?=seB>?)NJddx9ud zrt&=-T8V50djw>1IOaXU`tBS-FT0$wruDk`B76B6T(f>15xVb;xBsBF)SEvyv$E)I z$$c=ka$facCW$<3s-oxJj*gDYNoTGGY{uO@wkAv>A|z~*ggVC?y%}2NPK}d1=Jp~q zZLbo0N$DNU%Z>LaEOUdwxTR0!NnS-4ALHOj8&P{YFs_ha_IKmXKTPe6=V;{1b!-Qi zIXX($QkB*yi9V^^r*H3$f%nIcbT$j``iT)bFe2S+Zl6W`V0-5_?{07sxQYL zKR+zKYO^#PIW(xNG7?VA?&2~++zfiAbDlO3C}1O2&c`?l5HI^K^*rlSMg6e3J~|)z z#F72mh0R+l7aHD4%clRy%F6oFuL~CN0+dP8-@&V$v`P;NlYB!`$N=ZY`JcV-F*ErK zUpDx6@N?gD@hj~gT~H(-Z)fMB&;b3`^Z{ee-!Z&V6^o)h^UZx>zc&IZFX^QSft0u; zQ$vnluYUju3`VbC`kO1dQn!zl;7YK&cU5=tj=ZAiN&Arvq+6AdIRB0K&318XHIC*_ z%eqzNe^v*nn<@Q9+_;l9&O(>t{BD^O#i5^RseAVQuPBTKqMJycpAjsS^r$L(UHG|& zEE?iVuX0&+M}1c{xYG?u`5rh>lHtOLkEM@-4BXM08tdE=uN;5@*pIk-XZ^Jb3qQ_# zf7rC6W15HiC~Nd{2kAeITCc{ula}A^%~(TATrP4AE3)-{qq{9#`$M}x%iO)Q!qQ{h z@0lnT05(RxeKrBQJXQk-cOPPQJga5-3U{~dtKEXKz{QR}tHkOoI8NcefEdBk3*Ohm zKo-KyQEXZodnNa^$0qs3rFWWl>!urA?cMfL8aP!2NZtQK5HiLpXhs-*#Ab!Lkl(&D zXp|58an)^QwNj@$<#>N80lam*C89EFRI;Xr$$W2Ak|}~K4%6K#yWxbD4=uU(P737g zX1W^yD>04uQSL@g+jl8!sV7oQ!GNPWC|H+iQ&k=)yi}QV77}Xrmv1lCd~Igea7s98 z{epXE@4=407AUBP@>9&c@SBA$z5L8S4Q3wNpAb}XpbC+(5YczV*!?GZeytD?g2^2f z|K-R8Yj0j+pn7jK^^E)^33Q%6V``Yros_q2f;#nU08@?;@kQ2|IbWi9>GHd=#;I*( zuV`mG&THF$;*t>5`GLWN28Vm?PnK$)B&DkYc`Tvaa1(;HP)PZ z@dXh{?m`5gM$6BItljM?*CzExi!WSDE|A_Fn)D8p6$3DT^5c-ui=i$p>XvpHpBO-S zA>xvW1|g^T_nT7Rhb;R4M!dQcVX}->V+IhruQ{qmlE+8v{25_vKP{E(Pfdh>(I-fc zPcZYlv1=L(#z)fsg8yD_;10;9Ln_J;w9Dp_jM0V1FXQIXDq|XdaL!uzpY1sInyu(e zwlvaV{+1-FAQHfp2!z2n$|&Q?+L?tr25WMUzb45&BGwjqW-wy88GP*HLVdBhchR0e zC3V_rRQ$H6n@yABRqch{$CcrxES5UhvGJFQ~SefWoE8K_5KIS_2!_k zKiN*boZ~`j!7;%mwVK|^9NtbTCLD6H6+h7@{ZfXvTSG%H;#>MyxFtTHrueA%?ZpmB z`bGNPdSDw(T@rNaKgpTGqGFHSexUZdckJwbsW2r zqY&;=_fh9JFWt-F^R3ND3hw~>CBBH?sAYZ1%iF+yCi(_E%&lN-6~GiSuQtcCIPp>f zE9UbGI7-sF(e0*dce6bVc_`s|4Xr6Sys+1K7j&OP;Dlp|+_DA1VAODM(epKzZc*OU z%AL8DKkOa!F$HC<9*+Qm_Kv6V zDA6QU71DvyDqnOq5M=esVIyDI`#Iusm!{-m9%so?uC@|^SZ{xF(3NR!jyV_u20%rv zZUqMif83n@ecC2I9|LR8Rm-*R(bA;E|2~-^)F%wJXz(#~oF7}3ej&T`?!zx97x8!b ztAU2Q58;e&uB0U9n?^Hx^cr~7jW@pvtXPG;R+v2dW!2Lc2tLXF*Z&`ivN5lX+C$5e z?31Ns#1>Nk7pdk#<&0P9oA0aXDM>OwVD`JW&ns}UB?Cpypp@(iSU5_B($gI)K)VubWI}+L zRB5*kL`H2}AX%GJanCC}0SOJO=0dP$%zBu7^XuV^VW`tLbrEaV!M8S!y1dJ6wHkJR z=KQ*Pc0+oE**7GKgFOBL0MJtM8@=V6KHJtX$p8c%jCuOwyY7B&-`{JsS?kT(9nj?U z0Me00iH9}-v+E$FMepss9qYD)dS0dw5h47F-OmzKA`YzBLzJQ#ks& zJ8)D+jtz}&p329DR;jL(mz8a-3~Xp|@ND%xL;&qZ^ILyh

    j|D}lkFb>-qCjr^-Q z+x2i}hMibyXu$A3Aw%_{qmveRMaqx18mxPjI z@wx8CP( zWs_^^>!JxImwP_dG*53$)#rkc0loYYE)$3wY0LdubgRW|+De`eyg;KyjOe{8S6`U#W6sZMynL-bKGOjZy!^zgU0cS$7>p9uKZL2m#^|Mq{xiU zeu@9kx;4ZrRWcB7`Jf?cWIMLH>kbeq24uh;UkZ4nswk&B(EQbUQlP~x-e z?%*^y%4J8Mq54GSjkbNA#Lc7Z3I@(ooc~ujBI=E1Icl+sfIBrcXw>}+JGMU}&@ZpX z$OxW4NPpwRbj^`b&GJ~d#`FSMAFXQjU*|)fQT^RjVu>p}9i0CRKj+QxEkW}8%uf-% z)wB`{>`VfpBpPvw3*7<4U1#VNXkllmXW^i=yV+6Pyw2l$yp36a1wdP<0vA%A834RfM>Q&6nv^gRc}a~JGg$e4t(Gj|Ds@gd`N*E#hH z7LDcOvjR$b?cskQDuDehrk+o3oE+OV^)`W8qATEy#FZOSCgy$6|#+4RZs-@0_L zx7%sg_~eCclF(Tgm4U7XNa4!&?{fkJ(}LTx>9Ila)bficjG)hSU~&1udf#1w@A7Sp z8cgC3;U7xR;q0T)KTEwf4ZW6}pv8be^cnz*=PXv<={y#ZGZjnxM%L1`aF*B?U?>=D zXBx%b`&Iths3lv=7I?1&r~qdc&vcM`jE6S2fnZXjd-N4{v|DI7N__8S+$G%-Wk4v2 znf?7l9J6i1<0%{@CQdXG9X%gNa;Ck$v-3zwae|K4h>)9E^cIs zIY09EpMHtSj+CyiL^%OWMhaO7D&WH#r$WQZRtWm&NmsPKoB>#UzFp1{lNWn_nwVgt zbyZM=SmZO(@O}UJo|B?$Q%naoE(|${5+$!y;~vz`s3g49ss~`K*CuMW*e0oyWJ@V#d z2+~f$?@iii6~J`3=|t{YPH$^hZbq3KV8t`su2RB@zKu3>G37Dryg&Z*gn1n_BN;9? zoK1V2t8RozXve(HGyPw|Yd+CJyO&2^LbRIblI;wC{W|@IJ&2B_qPI|(l$znN+wUl+ z!us~7uOD(C*>v}!f2tm!j-$qOZ+F+H_jw-d4`iMOZbscxB+|&>BnI-?I@lAgtnPWV zyz7m4?Wy!v!^k++XD6_Onb5yYO-~YdOxLdypPPpXQ?{uE!z`Lk6^d>e^BD(AvVGQ8(k>$ZyD9!O@C~>~T8BPgh!s_A4SIXR{YW zJZG%f;?v1jt2VO0%Y{x*@+PS?S>+{!5TpnP@8$qUA-&i*scY|reJ|hFY z{obDt_uieS9WKy;u@u4ee*0cryZjtEzV#-3^J>ImG!{rl z$$o?M6`b-{TooLvYF?uz_HI)9D?k67$?QJfX>aKAw4ol;?KV1t#2Si@aATz#EVhjQ z`{#z&zvrHQJNHcN-2Xm(BZZ$liedcAxC*A#l_wnMxK>OI-}N@`aM(M6Y8QJ-UM}f zj^(%63NG^gN|@g{b4dmAbJ#AjuHsE*$mGf&Q91^9`2G+JI>J`m%a-@vh=;jcu|{r5 zeb3NDW}%PU&@ZOwv?)aX^?dr5`;G8$@%HULdtuCnf8pn+XGtr{z0X=7*E$5Y@aRR! zMxzneZI3f>+cJyje9L%|6KJ?*?DYD;gdvy@I!LM*xlX_*o9F? zemucpHyX825!AXG!^q73YYvahuHC@Z`j4$&gIB&U^*`F%Z5PG-Lc->S99D)3*F=}i zq4jZ;xP@oRSIaE-4b4}l*IMCErZfFrP$4GLt2@kInJcgI`^k?3HzFBstHG-$UqV0p z*<@!Z3hZ3DHfTh<7t1rgI#Wvbp71pC`x{nQm~?f5E#~b4I7eKLVO*=A8~N(XvoK-M ze!TIo-iiktPW2km$O^L!Nd%Q3zT1n0d$gra)y>UuBeuBvwIu6ff6(M zGkZO0;>17uK z4*V0G{x0`NbIzQCB|ds5nGQrPBneJ<5wD|?EgU3Q?>Az}S3X*yQU+H^CW1UW!VPa5l z#XJ%0NS~^6;P%|Cwk(T5O4VsB-2lvDp#x>rls_<$s~Zna%aB#Gc&iS@mOuBWQ-wYq zX}vda{zc5&_#Rp6@ctORvnWCFXMUIzvJfcjI+-D{7;U{m$IF-+;cVX|+NDi07%ySj`p6N$G!MF$Q1&@uSu|30^MUnm z&3fs9EDOtz){C;Oy%OZXX6&HmRhob%YhHumTnkV1a2HQ|OWT%ms@EYeM7c|3SX}`b zk&G7`&U3Tati^x&0mk3$G!iiI-;MD$FK9j{3pLAn4U2~e@CdvhcV5b^;oh$c zCbSYa>gt735-o-cyw~s3FOOiSk#gtef5JrRSZn;k1jD^hi94ufKRv4?qi`ME#>{VK zkdupabY;F#w(u<9Z)PX4h zEN4-%nION$t)J!M4Xi%qv!3nLK0!}J$qne5TcXcOk>v}=+tWr25@rsFv)?-Fde(1$ z(fuFP`aNf^?4^8IXXD7bwByuyY$7~miN`K&7}RaH2%7n#>6Gi!CxDlx-74@|+CkTb zKH@++PxCQLJKF|L$$x&Ip<5PF2Pdit=&BO&K9^9MAX=o}pWfcxI5LRDuV&Q8sSEKj zE$inXC#TJhL}*(2ByFW9BXgZr@B9_zV*ns1;7ETF>PEEZE1yR~ASurtAn`bpQ&^`1XFhR0 zE#q0Ud!B`9-_ai3yw-Lyv(ap*d?UTH5D&S{?Dr#yVZ9VKRi(JkF>pIX3`FVeGShMw z@EM4kT`C^A66mVlxXfsuCU4?#ccVZ-PO$8M-7Z=+L}Al&_YxJ`}3ruxqCvx_#c7T z?uY)&jU$$Suoesm1G^K^$-1ux%yPsh{F0suaQCL)(QvHqGDZ$Pp^k`QqyM61i(|xW z!k3&b84YvX_bNlGM&q+kUnN@prp6z2r0swxoomb#8Pg6;Rh07USW1MkU@1yxOdf%k z^BQmfdFp}i((DO!CxkFXxy9vivxqY8qR7i*t&lWcAu=|@PmLjuKleC$T|QP8!#m*u zL988Q?H(p-Yxjcp$zX-A=MiCxwr7H=C$yun?vql%tGJ5R2sSO=&_BBxUt&+T;oQgh?G`V3!mFGWFL16q+9AU{mRHjcN>Q~;X7RzSwD^<{va-emR_&*w z{q9+9&PIQ7Nm1nBJsN^BH>SxkD5K);K)=|@LUW;gM%8`5YIXj%S{5~7i3isZFU#BL zJTaehBI+)LkEFrCmXtmoqk_yWv<&kjj-X5E#h(9B!S5-v?R~&X2w`Z&Wk#&S{Z}}r zEKUyCIR6^cV9Ch6_CAbX^H=UgXb62;9%x`mM+n!I%9VGP77%8Hr z63exF5t2F54~Uw|#4R$o2DKNpmraM0Iw#grw+0d04}a?-dE`sv7+X0o$2;0<)J3`< zNqV6i)a?VSo6gNneeSon>VWsw=|4W7)L7v%m+56$g&e=%9<3ozXU^9rgkEXNB>vEM zwRe_b46<#c&7Oq8t@J&%qZd?(&MAs~hSr1zfAU3^FuUSM2eNE$d#iN^j(){yn0JMK zi!0L~lR7dcs2K#6t?? zTg<=uu!IHbHq^0mRuW|KahVHm6C7iYu3A^??bLpQR<~GOHedb9xt75`c~+dua`SMa zcE-T>4I%NhVDsPJg>3rC(&jPxB;vd(_3MO!)n7&2(Zq(tVLqLTn~#`2Ex~{V>JX6a z%$`c=dZOpTFz?4Ss&a)2>sB{WlKMAp=Qf8jxy{w+Zv_fRz|4x?XIvKtoB)wJX)nF_ zDe3E=GY31~Sx9V?U<%^j`d#wX(oxx+bE#J#bOnc~ejUZ^T(izb>Hjv6bi+eY58snV z@$BE3oL%JBlz=10|8mj_|LSrjaTdG{iIjPEBKR);?+>n>tKzl=neE!i?(=g8v-+N` zUiVnUeO#q%aztzWcuQy6Z{ZEee%5<8m?G_V7|e@MLC`q+5m##%KM9XD?F)Y zRUfZUAn3GZ+|hbcN(>gGJ#n1RNN!17AM>%P_$S;iM5Y?i26gyqru%f7+}Y>2U)2>q0>j!*f9p@o zyTZ&nI)$^SS^_7r%2SA+`VG*|lfM>A41*ZkHzN0Y43#Iz{59-91vSDXB{LsJsQ>T@ zD?-Kxl=8D#>+@Gklra1npmeJc8Ar{98)WFOQe zQ6$z$8*$eY<}hTA6qvXPyD%M0SniW!H=ogA;#2T)VR}-)J(Z=@^e{?%U!D0i1h|B3 z-#|}{u8w&Og(2@SQbCKE-(8^9$3jKUFzJuAnBlc3@YAfsApe(sYqQ5Bp*XziVs!I- zCUs^oNZj|p&bvNo2$L#en?lgEy}?=oUHS+l~rW8?QuKVqE09N=+-Db(mR9L{ynmylXUGr;W*&5a)ik?)FjgwYH%{e`(hc|StU$Hr;o5Qf} zJ)ns-?S@s29Q}}_`%NwM`e#rqQ^ylz6@ORC4?U-P~gQ`U$r z50e@Q3UkaZdZHyOrO}2zs4haIt)Edg!b4SC1|;^8Uc{#Y8KB6$=#9l}LD0o|QqMM3 zG)B$`*jVnvx5*hF79J|T+6~h5qZ-402Wf%t&jK^h`edNCuAwcQ7Yt zMbA8c2%Kfor{}iSX3+Wt8g>y#u=ZQUdUUJom(3(|p7kQ?WViV-GdRLL7Du7Ye&brM zpunA|fA{13B=u)S@bdMrGCV3|JfG6Pzg<|f)%|c>(pBhO`d z^5oi}w*(NUllqeDSU=*x_}F`k`25-PuAtGLI8$zml0xIo#@74A$~p-`x@sv8I~&*9 z0_X*EkH!#xzAnv-^#V^Phq6%Q7O6b0Wvl7Npk&J{&?4i)!9i;fpV0Ot#%>78Lb(Oc ztxTTJY#Ej$YNq(w@5Y6u_e;!fk~68}{90gquN=9#%rKOLxsud3dpzr#VA=7?3|Z&+ za_`~QVQ#5|@z=b0f;F;{djz_UnQ0sxjXtTxTBdDj1W?0#rH0(58_)Fj>$~S_8+cuz zoBQn2rkTMBvQ8uS{M2rc`B(l>syD8+Qs%_KUU(|huZ50@tJ1MqR z-FdD0rjE0y5F@Rq+%Me8KIzr{OlNLS^oDse%i`P=&TX39YkLLg0ErQ{Qb6MJV`2~H zV}=Fm3qR-Pm)X7<{jZSOL*?jv9KZjKe&1Gw>zv-A;_tGs1fSjOQB}$%!JlCRB&iH> z#kn@22z6DmH7owH3uiwl4>=&^W|C~I$BdEChvGG&jAN~pSIcA4hg*Ewdw4_-|2k%) z6R>eY!AReE(onLc8Hiac$ydZ@KxidGdq70b{X^ki2cv_Iq$oI16*zwu(Ys2jEn z3YK4SbKahP3B?^FjZTpK3g4ek9qUGMW$3l815?mw)P@7|b4^~UQSR{frK?YR&H0Kl zYh}%FxnI0Fsxe}R?q>eKMtYjkIjY=rGT2Wy$s?e^i}1TRbw@L`p4Y}_?B+N_mB%gf zL-H7^``ahJiN}@~*)bNTe|mb$qQlGE`3@ysBt3UzYPoSLJQ$m0DYiXpeF&en)wa^7 zKNC9YRw@#BF~+~~eMere%UZ-brc%Dbi^#(X%r&%t*@%qB9LeT0a3rlymRn zQaCE#ZI>@dBW4;?y&6nLVkB8;#vg;mdP}>2F^Zlz8h9b)JY|gKmWt&G5Qo0;%Ptj~ zMPp}JR9Bu;5-xThmV11=M8y|hExWibe8;bq7C*OM{uCSOMSd<-_DWOV9cP)2#W<7R zU9)hZR@rU8n3ruISvE>v?NrJ4Sv>ZsWX#S!@;{RnjFUST3$-Gpy!+CodC?_b_r-m^ zWn;TH9>N`19Y_jLzisj^9Wr-bS0;bqxAEavy_Ir5Ox22ZN3~aS`<5l88eKt-%ba#) zn^hRp2*-)uR$MD<6OmXypNJ~GNjLhz5glO!O5cH{9NPnB?$`}=5re=b?tcvP2ukjG6-)iAg^QWQ}?q|7i zr=+Ip08GO3{RwYN)5;GE!WYYLA)Bzj(Yi5Ic7~yY-{y;UEbzUUX7E7LGyPqxV}GVF zYF&@k!~+5TdsmGy0L@CM)Y5$6Cz&K+9;Kw|P_%IiwGfSOBk9-iXsYf9R8Hg=CY9k6Xoe0Jm`$n~v=>d_qAA>> zD1?{+500jHfQFEepk=}>UBtVI_Q6m&tojKEg(W7FAlW{Poh*Bi(YRs@*ALkeXf3fC z9;5mPR+a7+EMXHec>WFHT8-5uLDRTQbNOKLn(kG&-F1TT1GMEtL#^@nzUav)W412( zLj%J%neH2kG1=N;;#vvj3@Sl7v!gLJvyi=E`r-~i?#Zax@l%%^V|LScvH-?c9Yu~*M((FLLN z(eYNA$el|uI@?MNla&-VVx8?mi{7}dc^&331Bp2%XsXDXy|S*>%rrwLGiL;H^f8t5 z-F#hcBFOt?_`!DO=+BM8EvXQ%bwwIpW456Vx>#Hh%Cci`-%8Wvh*5vljJ;ub^`XCxR)skBg%#=KC7D-b=x@qtY%NFk6vjkAG}Tct!Z-fv{%!TTAxo{uiN@Cr3j- zW%HNr?)`?I%|ihXFC&+Mo!$1Ad?ycRNM#rAU!iP!EseKYq@;G2t9)p_ItI?Y<({L9NNSjaX9VXk8#@1*t?r!Q>&gnP++NYmaA=?oMR_a}i3@R*YNKx8XICJ; zG0sy3BnBLH9w*7Uq^e9WQfmhdqcLk^m6e#29nPQyPNHMM{Z~qSV+*%6{A_W9CSqW^ z@SfR=+F{EVc!}=u%dVCtW$tTDY141aBDaG-6m%oXjt^gf?AA%S(ko8d)AW&w-I z2i|Fhk-_6^L6Hi1i9zn9Rg7P1) zsnCyi9QM~I3X|O3SVh`-jt&RN9^}J!4J^}{wTqMIr{SMWl^>A?fkA90s_Q1l>0%%e zWj07sf*ZHMKoOx~mLSP!_DZRgK>d>Ij<_*4@Mt2`ir8S+c|bqg*g)MOU}PLCT0ybj zbL#xmuHm0KG<|af)+dM6!{`oYc}GpckHF0C0D1uLD59^&XGtSl?0kgw)W2N*H!y|t zAnZHQjt*8D&kxyOxC+w}FQjrBz$Ld#|@b)wr!27x!8Sxj3SxKYzC9 zZP}$?hkUwqGCaLOJA_d0qCPVuzyB!RN|k#zc!8(HT*ed=~V6QPInDXmbeSlBt~}+qocOvEOXk9WM^)qwP$hC6!HyE^n0Pf+w1Q4t{NMyWJah45!KP{l1SDjM{cMc%DO#z z0XFWkv^v{2k+1Ws^Ym$QP!Ypjgr-s&>OTH5c?25-PoBFoqr99RDg9vMCbO6<$)1lA zhvDU^{jc=(ZX@ai+sEO);Q*}8rn>gRVp`O zi*m&%ge;VW^pSAPw&49Srorpy|Lfq3H46rLna^}!85yZ!wTbP1k^mi;JRttO60w&t zujS5ZU9|Z?iu6TYP=#54tyf)Pn;7nIwHRGyBfePMTL#?9j(dm2UMxhmw!4h z+POTa#-!DU!#&{(mL}nduUDY^P#kK`GfdelsO-@iQ<$N1yb;rE>RVgAC}qX{A3hF} z@7g4;Q7{-2=2U21S)>sgf65TQ@pxnOo3^hmoRax_yY5@9BEo$x`t9AQ^Xr>c)%P?vKi*NT_+Lh10X7lHvk=>gRuY*+OQUpBsSoc`qyFs4FJ%Ij=+1&60h+`Yd z>SRsu&tO+2YN}SQdQ!c=ky1@UuYo^keN{+*&0P#1z1Azc4QQMM07+9)a$o|8-5;o#XPSaRTu#ZQN(lA;J`2k!w_PxJ*!v%L!veSP7%yqC% zkyza(5ta|O=5{8f8qfNYD$5?OW%e?CRra4|1lc!O2UOd0i@9&`EJMsg7Y`#a#8AQC#cP}hWPgAKm8N#?FGM3 z0(<*~{@ze=pVrX_bha$|AUfHv)O8N@RP0#DC3;F7TGHD~*w2V`0Nxfcai_jwNs*m- z=f&2CK=3Ai{0eNlx+&;ck=pvU=%@sjmlD1%1<<|V1tRk>CQpeN< zz`*Qpy8m7&S{vX}?C~9Q@|6-zKen~FKxHjEMC{#M$3{1K9U9YSv& z(0pHD&)9++(h)G8WNLN;&wqDmE3(QUJY2pS_AF7LP6gFm9$J%~R$agj+aS+%F483< zCC)_L+m_=nhaUALI&Lk}xBq}q^%wqOIsOv&;cS_Mi{Q4f!&mJ8@^i1hXVOSIU5GL& zCS#a&fK|+uNm*HZtJqp)yjbBc&PbSdNu|td^u3&?zoNfy_Y&@SgJW{yhmM)WFxTE@~449&6f^o(baw*jHw{hN4JMzGe)(VBwKfKF6Lp-*qEy%Uy%F`c7j zGUm@$WKxU|L0}lnVrE|TvuOe30P-YoEF)#FT0j~YzY~#U_Kt7wR3&CB>Hhh>$ciA! zxbPlatWgAEOlY%h@qoGrp)BG@=42gNUi^+)yIVW6Y|*Pr`OO_aIc0B<*_XSfA7D z7N&z%O-Y3=BzkPr?^gt;xmvLTemyS4yC1hC8+|-iE19jks-y(zfvg@q2R~SU#6tfr zpy=xVYiSnF(MkR8-K{52fAAEytMY_}!W+qX){Bbp^%kRtxOKY*Oh68ksu$ zL)1OLxj~M(CY=7I^wPqKeYbPOzp~kdfcVdITBq>@MHpmPZAo))b{#U@7?3XlNYk``t!U6BaPVpR=*8<$U=H2CdzL|(*uV>I7)eEF@k zp|Av{aL?-s-p(Eyr~o;>}Zub=K^*RH6D!;b3JZ4^P4ovGoeqY_S}f z_NWEr5_SJBxx9*8qmcOG91Kw4mvjOmW3iK@cFM@jcZ~>KL^;W4e(y*wzxzQ;3~>I@gH#fFmnujJ}hlI@^>U=h0i#gt2VE(e@BloBj+f-&(5P zK)nT~L$fDeUA3Am*7UN_LDx7g)H00NajkLD>f9NX$z{=A%jxL4%a(fz+V9=4A~ROi z_3&GYU!B_!-?0aERTC>>=Ary*7570DEB*bKL@H#j_x5(Lj#;?GVq9X7N=rcZB8t$`qg(HzGiZ&G*zfc_uovxg zb~CA!7nIc-VuBfnqk}@9FJ!P^^-~?r>DNrkiC{K@Uc7a%=#5+-q!WycGN*j}@T>WA zWhNhOHWE$< zv;4Z)=4PT>C%AdbgumV5ORQ&(X0|FZ$D96kr;(WC@>l|u%&Le)BS^Dye2@s5k5F3v z(#9W!0OiC_U9MUr~Tf&5^F)V(-;+)+NKspMmm!`yG5uMPir1qrvx&nn8+gCEgR>>soiF-6W7SE~P@ zWujTaoxuMxxbzB$pgR`{RIfGS;6fA4+TySmz6T&aT9OUNZil}?$G`WKn2NJw=IWvW zk(PD2*$~o~=m`0NVN`}lqwlPqto1M7-%yCdd3?mL%4FuqA#b%)t_bsP_rTdKFW$!l zA1UvX4&O$o4ohipTU?#Oh7887iprWXZI7QysVCa8p;khXa^K4?iT2v>EFH>)BppbX z!WZWU|AKdf7pI)Enn4wP+5umn?u~p5$1|nVs86K&KwBxO{bW1hseAt2VOFsn)(%AC zn?&6T9l)wHyZ;Y;v^1peI>Y$io62k^mJUrbLa78nK>-dGw$YJxX!6izh%6ZZ7ChNfGB6!8&dT1MfV)_Hhv3!|KE*|0`K4n(5P z{d1prQi<>4%3B%oZ~Hfb&xHnGTdw^CjlyrP8OzlGp1^pL(wGcn_Ytk5VfgZUP2Il> zeVJNoV{|!}NoCBn;R>0$tu(Y$Mo|QQ?@utx8j3#Qzdx~7%epNeWtiS{1!iG)tP|SoF3_YUSr|2V&HSn;*sIc zv2TILHR`+;3fnJ)@X_^N+w0f;GiUYpNJEB;eMduEz0@sd`e8mdy)4mRY#Zu!hoENN z?Q$-S;KK9;dOuCdAxRxqW#E5`Mxjq{?p4XR=8aXh0gRQMh-v-JR!3oVP0{8arabd5 z)Vq6-T}F2a{k4HdiCS%vM6a!0-AQchY4M=(;^<49Q@XjJX!~}7q?fBbKcT7`hvN4n z1S40zAy?j|w(CpfRx#_7z6%O?JqQ<`2ejU?_6(ncu3XA8B)hW1V#nC5lw&qBph|L{ zI@=J$%yC;4t;-0?qLkVlpF$@b{!41hDjSI+BPrJW-PA9c2(lpD>QPrw6Z1Dm_gcl^Xd<=GPfO6!~$4|^ln-OB)MPjY7 zVj$O+X#%~`IHGeF!W+(3_{;H%0LSG7;1Q&SRNj6%o59eP@fYSLzGTi}0G67s%$^*k zA84grZ~!0vo?G6Z8cmjX(Y-3;e*Kp4_{ZyuQkK!f6;GaV%18RA%I*En*I~fATfXc& z?z1{Q8J}t~wnlh}Ic_<26wX?mdMqLji>0)=+T1y!sEt`P__LUQYHipmjIdOJuM;zE z@30(8yvHIfEZRdVgW6E`8S7#vSPY;5-jIGdb>`kB6jmbLHVyc^alJqN_JPI~fAf>dEuG>sD& zJJ%-#)q)P5Itm@A6yKYRycEBDh6i6HcEwvlF9cjdF7l9aZiK0qP4Hnd8)!2bYq;_N zH_+o{9A~4^QHI$pCBn6gk$_gK=I88Ab|U`gD5DO74`OEx3cQ&*N*|a8g{f&FIGZ=! zT{QC0N8;oP85cS|)fIk(*zvp#rYbF3eu(c{Y~22X77jM<67r_#_eu^`b#l=GiUa^{ zUc5Mc7lu{GdR~`dJpDw(oMDfa<;ZDQP)B<^yO|{(Z1XwEh zKtnjAg1n@*hnVCR$D1ILOS?${fKBYQ;JQixb1(JSj?+@VV_U+e=)B z3gxZbM(gQZI|?$om$*gsRspe!XXQU_!JkT=cVr6beyIG0bwi~pbdGghDwzbJ0^?4$ z1>EjBTpw8y@m2@BSHYIqZofA579QT^%JosMg1=b_D|2DoIONwpIzCC1q+5GLScR|a zUlMTcDP<3Lho?#|yqv1KVbu>PINn_HkKtM2~IcW^Za#+#aa`wGu?sh6Nq4liVJ72j1`dW%4}bc_n%I72X) z5h@s$*{f)^>9x;nz-s!ZTyL?HVHp6Jzo1S{4B*ZVXL zJnQ6ibE@X|{QuOI<2j2D;({kfo#JRjtdM2+ocyf`t2aSS8*+H~VG-1e$|jv%lt8$I zT!{rNoA!c7FUZ%gq}0_s&Ddb^JGFHzm2gr5@(sD-c{}Oo$Gl%#$}2wZ)nsJcLmaJD z_Gf7)*{+$|HZog#Cf;w^n#2Exy{=cyMU6tA_*sqojuc_CS=Sq~Tx}enJr)g_#LoC0 zD(QCkU%tk*wGG?- z4Qr_*p#Be4?-|up;)VT!jPM_6qasBhQ5h-HL~3YpL_|fp3P=fp2uLUN5=2G;LlFV# zL_t7A2%!f;lM=WGX+Z3vP6p^(Dit-&Te?AaiU5H==+<43X1P*uWAJU!8S9*mcZP^ez7$#QeV73vWVEM$E)IksDI=CM{hTm zJ9(fudGJ1bL3U59s&gxspKg=9{<#<^jJl^ImBsl~tenpEBJS4&yl#Jb|sOoBL zq2SWxQ6b_R$Z8g^|Bv*!EW#qb%ArD#m?Q|enjeCXm-U9i_Iq)<(-264+9&u{?r0sq zRQ2}mvGleL%fiAIV%M2!@>-v2J6lus=Gk(9$<%e@!C55FD>(BI#~QG;@EGj!OD}s^ z(1btfdy@a`s&qCgLKD_y`eX5njTXts-6mmHk>`&CGbIF$}$V@K<|cRVtr=w6GS@Sfwihy-AJ zlz4A^0wjuYUlofB-WV9lHt#FO+k(DN-0IbdEy=Dk8BpUT_h?Rb({Yti!3W6+>U2Sl zoC3opfxY<64QA8H?>*l|Mo-O3g~xlljI#>EYwRQUatO!NRjB8Xlh&O32Ubwo)~k5G zow@e^IFKfmEBs-M_S@(<+?uI4=qTa|Z%4oMyJ^hHGe$iaGPvpTzSyEC;L`r+U7H2j zewmZWLsJx6C!~Pq*(*{W(DK*r?3(pC=%K7@k|{pv_&Y=qs`OSy?s`?~ce8hIr1We7 zfg+r^Dz?(#aJ0vqruVf&p+2jmc5!mUIc8}tSd;&dq8agUQoqm5> zn#reoAvfoj_O1)b?6c;zt0~@xB#_#JoO%6nAYgYOD^5WaY%|O&9HOw^`zHV(HAC!3 z{Xvp(X|Bdwvr2^~TP?I4Zl^&utG>$~zg7hH2%!Zz5ti~=^6`mc1+t?+6!PF(PJzL9 z+|=+p@=JUnZZy|)R&aDH_v=&meM6q>AnXrpJv<=Rn%#-VR+^H)ZL#iIQU|rEtJ5wq z$~(N%5$djgJ$$J_U=Sq=Nkq_kZQMP260ym*z=19?o+-U-*hTTzgtHXSBs^HFTFL7s z%`TqRsC%QuNBHJt?^s8-oe8~q5l=SRfmTU8=ta!ZeXIY7yDq=Tdt4g(QNfN(!)vYM zBl@T@hB=QaqVhop^aSXST*N`h@aeNxstyWkQ@5TR1Wf*M1)Bd8j5|dS|9f}`QfuTq z@*SHa?-J|a4dr}Iop`nL38AS5ZL|8?kWbw<2nGMmq;ArCeU6wCPk{BS>@HP$x*K!! zjThH*y-zQvHGfTV%(+mmka0oJ21I?^uvO_0J2#t>mpRzNDV$-x<x9gKOduh)m+CKB=!+=7#4@#SGF_2#z6;jsG7)MkryJV2n0Cg9E@ z(3vdOGVAs&*YOi<|8Eumu(FbZ(!>y(R79hVLW|ZgtsFa9XX}b|&@kT+>!k;lU4K{3G4_O5I7AJJZ`;=I3P&(| zq#LX?)Zg-HQMyQXC({+31_7(gcq3zrG(he>Q}VUjJrDP?H$&xwQy%vLFj%N)K=D8M zb3E3q`SB{0&Qf#H;4b+kps2LbjZ5Jp>|AV#;@_vMGMYn0Z^gx#|vX+7u@6%R(_7COSYR{DnaMwq>W)8_^ z%2_k56CUY!p7>ab2D`@=8d?eiD2|XFrWE=!HlBx%&Lurj^$a3Z{05JcrbnX zRlx*$IU$&Tt(V2~kNZJ`%{n2pdo}={(baV-dX<+3*tnlU39p4_jH~GmvG18;aO1Vc1xw-+V8OsGd8_gA*d<6l(syM;QCDetNEdOCUCfoc`&Ban|j7J zNA{<^_m%-`QJpn^lxdme@Q&u^fAk5W3hod2WU43d3T3~7UMLj#o2VfEG^;UnMvDM6 zuh{snOT<4RgINLS*LV;T;a&=>&&V00Y+xF=pujn;X=aCpxuGiO=Vp07&f^PJ%LFN- zo0vfZ7D~#z-Dwx^%U);1bFpE)t~Mj$^lvef6CUzUZSzEub3)`A z_8Yd`(NP!?LT$YCrPMdY@UYbnRPCx@cdEkcC#=K2!$F+yq z?vii$+u16jc#Sm(+|N85C{^7>!A0%4xAt~|1iTN_azX(g5mLpZ=0Xtsyh|V12gh$K z?Y5vl+#uj*-@lI@NBNgRpr2A_M(M?P<{mohB=02!Q=5R^jU?YnYY#I#ymW$DCcssw zdZ9}luYm^R6aiEJ4*`QUs?#3;KbUt9VB|Z$i7A8$4txCp1pCPPVF6mvx0 z6FLRxE+s}VuD_O^yG7KEzr}V0PvF>jzH}>kx}**KQVyxmcSV66^L)w%yYiF6(p5x* z5_#~+jbAoU^yNRU0+zEXD-13x8W9hiN$mCDCA|KMrsa&s=9F zI=S7fS0~@yA$$qlAXVLA8?q%n6AgOSga`{h+QE+pnH&u@*I#a2jyvxd`1>=|~kV3Derq=NF9w=Cu4i?UkPc8yV_3peePwEn@`< z&M)CX3zRh|-O8zH;GhGb{ipu-nlv^{F-D$Ta7^;2-BU)>^`5-HMWMzP8!O%{J@rWl z5~a<_TKqtVdwi2ajF;n>KPp?cBO!31>g`gXoZfh+2G3q3<8F9p?D?He*NP7Z3h_r} z-od>D3sbzLi5oknJB*gN#2CLC5clL~3#BisSuLxJtYXp;&sNOw%vXM0YnTx~_hmYj zNneGAM0#Mv9s7V|qS*lrRdH*Wvb8FFZrH*&+exVnAi%|3#COOg6v@P?*!g?Uw~tav zO6h{lFoUqasF$WssJz+tQFUvN>Zh@Cjpw92BVfT2EP~luMoE;c&Y%}4GtwK{&k-GJ zK_4brtQW5k|2Pa(4?wn}dNNB_V4lOjbT&xRc-Je0lYbK2I4UBs_-o?Y)u?07O_$>u z=H3Ka8S?&Y6Yi{bIj+5tQg#+<6o2r?FGo4^(_!g9xou9~+h)e6i-kEu6&H_-^1m6f zS@;80KCH&jZ_l#_4^+gJ zJhA9`^=hSkz}7|ex25~B?w6fIH>5qbzU&U343^ojgl0^qL;bxC81t=GPH5$|3M)QE z;sy5j-j$)kae3za2D4RVZqGIJkeMi^HwZ*`WuK}JR!2$QI0zwHYoCAM|1OBiqV0k$XlUq2OWl7 zcopqEO5&#j)AeYBGh1~w`pJu5AZQV|2s}=E75CfJ529-n0Ci8R`=E`b`4y@@-K}A+ zQlw!=ODU1PUu7Bjdk=v%HJ|2VoBM9{=!84~S&>&(YC+x}5M%t(0@d zIyURvj(OuA1 z$M?`|8X0;Gp(3!@+UwR@!kvODMa@40+Fz1?cCWaiCyzUH0xpZhj1{2=W$P% zk^{u4SetZNA9X*ksc}G?NN(&J0HAm85#2*mE`_iZnt-aRf^Gbli;;s3?CS}V#R-Dd zn_|b;+V|Q^rthy6e2c^vXJ^`m9XB1lRcspXA>DyJyRkQ5xvsOJsn9m-KnB;BpFQb; z9xjzD)r|^cMl0oSNL&0@1yor&Xk8;g2~XG$BsRW8#E6a0Y}hBhLN@u^o31Z@p<9>$ zWzSo|r7h3q&xGKksu(q@_X%B)^k9U{7iMifoLAAVMnX!tTIDJ{EhYGM4SsBJxR-h1 z)1lm35wcQG;K54w^T)O#H{_l~^+fR3d5Wfnw|CsaFX6XA7^~P03ta0=1?t$1)DRLNd_hKq+Le|_WbdKhAJCmrj`?T9WIt{M ztg!yRusBoyh&Kn4mD5CRTSx4PvmCy$2dC$BuZLeIifcoglNVE}&K3rh%wjMxWS}w_ z2|e7$O2vb5!$IH7@9}z?$>$IxNZ*HQ^!bVA5JvmX!U(ziq{B>p^K$Z+^F!MB4;u?+ zPz9HGhc)iM4@P%(*i9?P0*~Do!)YhG)8qur&>bti(kvH>^DN3NN75bu{y7gXIEoDp z0Qi_muj{hQpiq(aZ>~qq>`SP>#eEa~ES1^v`T*hOWNiAOa0kqacQ-O#qf;|Z%lXmz z_JHRoq}@CAJjOQE1J&ISnkTo940_fX98Fv#zQxmJ&Jsi*zUp8}i=MZ*YLj;flREP7 zD82pl(tsh-6UFv+(;rgtJ1MQ1Ly5>WC)m!*F#dYe_4f7;?UL&U^rj>B+aiTXiF@W| z__WZLnNyb!;t&ckBNEIT_KY>^F7yR@XLk*5{XodrJZKFc_ySK?stX=@%mC-8f3yuH z9A&bsdwQ~4R7&YctvioC2rJ!9ny20eJGaHK@=M`Vdj8aA=!P7O#+d=U`YtMQ2~@ug zK`#DUq{f$PKF)d4oN4ap{&ls1-s0jZ@d=3Pu*O8rumuo z6|CH0;`tnxBEi->qus4g_jeg#X3EOb#6>(#t0 zFj*FNCk}NSGJQBj?CZw1t3|fOsZflAvrs$ji5m;^r0?9cZWafMFycv4YZEg@Y~^q> z9s6hVNp)uwso}icj=La=Q?qFf&NfB{RZ|8))xvU_veuWWi!!Y%&=RH^M)L$1u()F_Wk^`xB1y?17St)Uwa{aEl6 z?Kt#oIfU)XAmVJ(+i=4ePIg%udk%1KWCkGhEY1skQ)PMD=2(gp!E*(Es2#z|Kg|jS z)rf6gQ3x5^9bBa9fqqX3a?*yvv8G5Jz`dh@PyPaOgE#(-oUGsRt@G@rCw_ecv}aud z8}6(!N(RfgPx`Pa3R$uk(Lsd45Q1hCyE!~j(LR?Hp&|@0_ zsBpA9Na_}pEj6rqX*Vpi{rTo<(C`j`XNVj~V6ZUwW#W4|BJzRO=sgJDc2w)9Jae3o z$~4Fy>6Mm70+y%fT7*dxU#N>U`4T=MEi~qhu64R*=GuL!1q^G&x75^6+uz19tG>an)-t{8 z99qD*O33jXMq)67+qK71=EPwZcH=;-qeHI`I6-K(?W(`IbYgdHTQ zs^4PN_^4TD-XOx7poD=0?>Zlz4FhV@fxY&0kW-75XG2O(;9N{4;+Qc;zhyYZE~H9Y za5eo@-iXtiEH2LJDl}dc7CO)XYbBm6iQzpNJg*N7Sx_3<5?}u{7C=E~I{D+fMo9xh z$qrf3_@9Gm{i8ciR19OK!ShRk>d)GoKBVL2G)WV3ISnGh@LyJK3;KLA{*-qjR0*R^ zea$ptdqDg``Jvts+LQT=x|0<8yW6VK$NdR|9EI}GepuNUMr)!A>&(q_zrKJHIOadH zX>SU4ww;mIufOo_bUgY0w4~DiyJ$P$3hW=L_&a1dPQ~7or&i&A;mFvPD3;Yaf>K;Zudcg#0w`g>gf zETG@tG3g^p@#x|W&U?n<8kZthc8C3=ekgS}CusU#I}QMA47(j*QGZmvPMZ5k)#=JH z-3zjRzD$)Q-P0!3ux4^7%s(8fXhUMe#7mp1ZG1!kO}z-`Q``y4H7Iy?0i%Ry1As(v zaj+ED^pix5ory|ezr{9keyDiM*6*4Y){*&f!AXIG-tGW4)I)E)LWZAwny3xR5IDxn zY|S|&$`d+}x=p%`$@x8QeOO&7eX>#tzzuJomhp>-h&9T+OjhQOe1}YQ)o2MH+_(p8 z2mQg@XoKkJT`AjR;IX>4$De)EcIMSMX~Mp?NEbZ}c_MrNN_mu(8+=N~eK_ppbUhNX z@x?xDwz(&jX}P_m#NT)wba;v^p_tRP-VT}a8*_Kd^1cXHmsr)votko1eo3IR0EB0r z`*N|8M_U%$P$){y_G97G5<{8|O9Q%Xe>ydxzPqC#@#(z_84N@I12(_oskCMfd zp>`BgxQLYIA*-;4g-4{JHDhc2i1g;9w9QXWnb|c~KLkdFd~1jq?vs1s?3@ECRo@g!OT*BGzBlJ@#15t z19F8yA`8o~K_soB8*loX>2KO`x#0Pht$$7@<@$T={T;h{*A4pa!Jb*`qvr!|M%Dlp zd$9d`Y;D=^{aG~HM~_S6#br$t6IhIXh1n}_ABmtB{_&_>z0P#X9l6*5PCAQRrF zE0TTd@b9i2th1Y297lW9PX6dXqF7w5cYCf3Zfo& z9P*won|?Nmuvn`)M>|hEnWb%gm8gy-?t6-$rjikxqxkVTRDudHrdGNPaaYZxcD#X7 zM7~qzz-}MrP)Ln{2=YO+vN#|;{fIq%TBYaJiBIBhvhnjgiimtYtP{}o%yG7*_3g0W zfYRzPUco19x0h~Pz5KA`UqwXhB}Xr^#Kt9o%n5J^K2D*{UXy(FNg>cCd{Kz^x9?c_ zseeLJzt^NtWp!gUWA3u32FRzy$BGxnu)nBqjG7+8DF@%(Kymb4~Zpcemo5wP$7sUN5$mJKF$e}MCzU+;HnZ;_4@vy z2U8(a=u*b$oliBnp_^ms*$75^xbSiibi^PeNr=VaT@UQA6G-nk~em67P+am`cC zp>#kDe+CvNU|=qv--J0NWc69}yY_m|!bBJ^>TXp%-z#DEPJfg-$x%{eQ+u?~bmn#h zA@22kS&Du;RAE@ZWu03C9T8AvTPKHl53D{M|HCa_7~B1Y^Tz^kA}?}FA4yy=C7uFp)Bu4CaC#L^*f;OoyWP_tL(Ev zX3Pl?q)!z!ZQtd+uIW*#!;j?4X_Yn*Ug!)th)YADrZnn=S(*@bOXFj|YO?*>>;CwB0Ij*Rcr9Yy30f4Z`RGd(X&~g3N~~IKNgtR zYfOduN0Kf(S%e((BbVmM6#F>E`&prG`|`Ewl7U}W^OtEOd&gFW1r2NR+_&O%Yl7&V z1-qMXY3}Fsz4oNDbtIMe>sB8o19}FT-p@T0Jfc_(s9D}8C!)oxY4-w=boq6mX)@67%Ii8U3Ooq$W zC>xe?>|b(fN@}(r@@_cK!Xv&ZIM+o|<1fc0doSjnk1W)k7+$#dT^nkA&31hLJq6VA$B zVxC`nax`y5{%~F1{j()kBdisDszoM6v>5SAi(mKqqRb{O&jt$ia9l*5pMTl`mVhD4 zN+J700d!gZ&8pbPIg!%bK_B{_Kdl$oivtKsLKE=MaQ@%?IMd&b1JdG80v0+G_cT~4 z*%G+3-c8@RjGgleJtd8!7S#~wK%4oLZ9y~8YR2b=K#CI&%;wNKOyD+}GigP;oNUiH z;ZO0y_k7+jo^-Pfbr1 z)Rawi>QC46>qi)jf3(?6l{dNh`+{HBsn`c{f%+=8p&?R@(co~nYZD`3 z8;{NgB0Wfc!^Zj#fp^YGC>=)iXDmfkP~Q;k&A(5bu@LGiF2J#|Oj$SYyEeGx#=Cm0 z4j1k24jC1mdVl&xFpRiJZBmzhp0@q@sKTNEL_aPm4_RDOXkMV5u8lb6brM-~nC4n1 z`D%ro=v5b@7{}5p5{Q6J*%P&oW{|7BWaLL@=mH}`VuQx7^h-qQfM%Yq~#6hX&1J!AVp(CqjjgwfMZKVid3I8 zFHm#A*}?7~pmjmv!OVhzqm37nttvjd;b8g;>h&*~Lm4l@7}ZfD-#`zRiO+6lRQ%C% zPK@OdSFvei zn!SW?<4iis?(ux?H#L`Ve7dj<96#J3GgaM2`%5RSA+GD5`3fDXjXQC>I?!F64K&M# z*3ekQ4rafuQ$NqMZDvJDa_uHN(M*WTmMiCk>Wei7G*rGKD~fI$g_nS@3ligX~aJ2@;YVpQDVG0H0e^e6|pJ$q9!9sW1 z_qsPcM0$cjZ}d4{@V2kceF;nktnjYAsZ5NaMmsO}4e?%u7aQ`{wIBMjHB$XIC&rf8 zQKoA@^{da%7x1EvrvcqdqhS7CrqyD4X2{h(vn&Ov+rto!((8idx?-AP!L*KD$|`vf zZXSO8w6JFG2-O(ygwX)T<{);-gaR02_3d~yLfe$`lT*HO2RlYqej)G0olmD-O1*F! zw3^eL5XR=W^-WLixryh5{~J}%c1y>n?wO7e@xf(jkivm=hoPqF9<;Z~WqBe02Uy$m z0b@|k=_Ij``q|KKP|;ZZ+g%w@AjSF{Qi(Duz1IEZ4;jyyYUiZ+Q9-jC z1yH39<9Dk-dsv5CRLGqQ5@Hj@88keucaAJ^xLY4BYy{naTY|qitYkVc?lsK23j3XJ zP1Tua(AI_~1E#YxY023k9(?$|pcfjta=nn(iUKsy%ajpUvq1;yQBD9=N;duI?Xd=l zRwm9V79^SdvgMlJ8xm#p2!KvV2@k#@`Jfp)xgN$jXI`V2R4Ox)!R?9{!OB&t!MuO} zv>yJarM8iB5IKe}0Y;QSn*ItJcKr5vq1lG#i<#;01AE4Sjox4a^H<2=nv-fDKb3z^ z^?gBRqXoCMuqT(KKGx%??hnRMP`C0Qt-r%q^YhrqB%R5NtJid+esFjHgjtIE#23L8 z?>3B<7|)GA)JzlAU>3wk=`04te~x;i`)Y^xC4rM^{hOyw&c-l&trXp}^b0F*-lclN zJc@Bzx^%Ru<@_71dg%3D_z#15QI?<OCJx#tByPDUuv?E=G2UgWP9gg#A`W{&DGm zgRq(o%23L_xew`O7nG-PaW9`OXRpcwNMfKS&Wt~q6 zY7W8f@CjF5KPVPvjZt^B$JPvAMLrks4)SvQ;F+It)M78uc+0imAF+4VtJYw3^%KKR zosdfm6Y$2#Qnq~Iq^o>2++vg0(|RKP1U*kEeB%1Mx1Mz-C$ejLG}BCVPe4GqaS%nF z`lH#<_8fo6qa-y!O#^kYNg1U1GsQB1paxEWM0Z;YK)SfR0;8iu$Y%_bUggQO-?P#D zUs0-kYK?ValTuAWZ74`AHOA!UH4rUv%PFsfFGN@n{uN^GXX?J2@EGR)#eQ_LF+LF= zU5@d21f#|0X9I07w!y#upJyK6X-GJap~f}F}FMuL_^V%FKgG3qQmf_0bhZ9<7)Wx9<`|F^Yh(R zF|zg$bheu7T!v1JSe#}Qy;iS`o~JyWiLhfhahb22xm8v$X2@)hiZ3YK)XYT85%%&O zQdKHVIvcXzye~Kndh~ge?s|4h8L5^=yqM*>q8v4t8&^%L^(-3zf$hIkv=p0j@VmFc zA98K<%YI$qh||QR)z?1ey0JBV=bIYfbANZ+5L2_9`bMjQR<(;M;SeatUEhcJI=V8T z2~BCG=qWF=9hl^ilc)U`hZ2K&lJ$_qfz^yoOA2--a<8M(opb!}VBlN0*>XC(h#$=T z&X+}Tc{%Tt4Ja4eGHmNiaiu%4V!dH4G}*DcTpG{XD1jYaJ8!#!aB98AFY=)-bX+AaT@|b!6)V+Z7;R~MUHdpB z{|>+yw)7mh++6G^ow2>3GkM!^=mSh*6lu4+h~X^# z$t={RK~jC`hp1+nnvXeoi%tD^N`UWqvv(A^_-~O-@ZOkR@aAE#M#AEWmrt+`V?|89 zpxZ3-eLFNHx=%ahr)tPduvpF38Ry@DRf+T5EJ2*i3mbl7pBw(Q+@uJzVzbiCF)!^X zr}<`&PLxZft=WaPXD}9Kmg|Auwvip6HjlqD)%>B2e4fTX%-1#V$?a1%3fC?bf0ce7 zuMjOq^4;l(e8rX@vi(E?YD=G7`okTS z$7iZUF(N}&xLNni+UBX38qN3X>>WfD(4JpMYhjhG0syY@V(D#I5jpt9y4%5E+h=={ zugS*O(Uw$oIDcxP8V8b3w46_S&te_$N=BoxJ6NW&SvNBXenMjG4(UNN`wZOciw>NO z`el#A2#wAQ)d!xE0=___l*uw0;3p^L{xWIeky9nS)(5cqNZ&f;d*0*L{RZ??0O2Fg zIqz}+pKFQ3R1Q}lOMG(Tgw=UM5N|IEH}CbVDOf3LOun(oq58^VzYu4h9lZIc@fgr8Hr#PmG0Mv#f~~GAfhPP8Vb(^H!CpaVjayNn zixtHEf~HzV;_he_RMb~}q|}Jr7Du*b^p~m*8Xc`P?mFSCtA1Mxpj?-LwU7&{dw{t1 zzY*KmHIaIiRZLWX=hb@iYY9{Fpd4}WOG&Sy9yv^5bi+!A`l_yVlasM;9!L$Qw0!uI zSo2xH?9&{ZXU(>GIAC~US0rcEg?@Yl*2^)%qo++|PNa@xPs9jQwF4my zY|ZxI41q%kKm4m~ny}90jTHO)kuwei|N9npSYLtiP6O@*KM6}Y1w`9>mCAU)aGzyw=*AIQ020edi`bY zZ@ks7=FK?bAe27bva62<9SlP-@Ws9AW>+_T_Qoh}^<{I~n(2f$G6? zLD_LvM^MLaY#O7=;PTHi*G3Y>f}|SHr+T*hjNJR4`~@PmiO>4=W!LjW zkW6bPcpagvh1n<@vZ<~dJGTEm=rAd_BM0z1Uju=D>gTlR^32E=%U}8lCY{+;lhneIDKFV?9&`|JeuweE02Y zyMxIiw7i4o6;6|HcbE4Rj|;r4cAJj-s(p7>zc0xiQh|gPuZU-#Eut-)B^4EJda&TA zeHt6wEWas&tCU)S#}du}AYRQO;7s>UmvGH(htwM?NM_S=;gi;DB6@mFm9JcZ z7oXzFMe}fZaCKKrT15C(#L&vc!@k1sVVv-cutZJeK&@QRK2|bb=HBxz_?6XU%+51C z+aA|gbg1C~R`u)oBy;?=nYzx7?hAomyBVQ8Q8#ICI z6{E0;lhl>B*`B*r9p(MZbxh%)>(Ew1(LrIF6Z7s3UQkGdIVpfei5So65;3idSt0)F zohZ1yDo?N&0b+|UWt{fOZ*33i)(0G4xBknKt;Xr?GW;tqkEXu6aDsJ{aR!peiMl9j zvh};2txNI=X!oXr)qI97Nxv{##rX0X66bHak@Drb%&HjJeKCKaPZJ5Gf9SrqnYzXw z1ccp)xUFpONu~yt8BNnlXFp{jc6!rMMq*APno@={`AZiv=1pGC0p4u4!=>I#4dQd0 zVI=6>`!~RmtgnDhiLUaA*Rp>1Q~`=E!X?{L65l8alwRixmr{2Odf~&JKh)@doW9#q zEMM5`LT@U;W^W5>O*A;FAEOCPDTvMS@gXR)IILHotCz137xJ$wzs6g^a-syqy4YD7 zElbp-Fgh9{K-l4!t;U}M!uwHsGox2@;OX6Ga?IxM;gsukX4Il7{hf-R1Ro1MTcvZq zw&-k4eSdVJU_(y@d>>l2pXp8N{zy(?qBKq(Gf0aZq-&_K4nHSP%VoVATT`#QLMAaT z8Cxu!o-EsX|MGx}YAa0$K)mPwlWFvd-Q$#i^)h>S!&tGbR%p8{5p35c+S?kdG)FO} zbtuOBRE}udkLp<+V@w1Tyq$M-s$JyU4XqU1+Y<)>1YeY|K_S;*cddNL$VzIjQqaf> zFhg3|zR!8tBUt?Jb76N8^oupY>oy<`h|2uK5h=aPLA>>&dVq^#yvn3+rEotMC?wO6 zD($et;f^I^^$Lz(SF?2_db5@++GbOx0pIA}>v477?a#1Zm0#yam^StP`KRNfU&}jd zIsa~l;08enO1$vKV*cn&Bcd2@Rdi%i-K#K0>yi^|Qvf5C+iK<7%hw`IJzkWd(exNj z_%j{b?3qm(wADW+U3y8k07o#Fe4BPlQ>AlMy4%(DhcmwFsi%o~ZqLQ~&~Rt{hchv8 zaW+B?X?#8GzenbB+S#$gLi!?8JRPKzMX~&5J>Gi+PQ=0me{r?I+iHDRO#cJyVS+c8KA*IXVsn-+D$p;SMZ(48JJ;E~ z(a_|h!5J9raCVne)%1v0siAs2DPn6(CHthts43-S5w>}sNwEsa3}EZI#Ek9qizbYB zhD-)d`AjA^G?KovMeURHTl)R{=IRp4yiv!@^#+$@8=~KI(D&CrttGk6zGgXl;jioO zlMNmuUW>VPJ+a(v%=GUuLwmfBNO$~4HR;xe!6mknuwdG%yyaxys=t$OR{Ub61LV`Q z7!j-Td#~RAX!-cSQcTw5n(ha||GiE#Vfk+SBrJS?1pR7$d&(TWbZvFLs&71mx$o6C zxj(VrhxNQ>E2M2z@rLn5tmgdj9fPb!E#R1ZR>termJBtEsSK4vETM$WX>huUrteb4 zoMYzi#H~yca96X_My;kLeIlpZ+S52O5T`8RmX2Su7g;>^#PGj|)v`aREM9gCY(^Uw z-7dQQG{T4Niu8RG{j>bVXKC5#Ul<1vzI{_@Es23I4IO;Qzis(fFU@(8@Jl=E6$}WhSz(^ znKDu+1yc>@uiQ(==Z@R+2y~1l&ngMvM?s@Cx3*4T#f|#}X1ws;rN3R&b1EK6FlYt?H#UaD(2ipovo z6#{46%G$%yJRfk}OZeLB@^w$17YU0vSq*KZZcz<3FS@AJNsNMj*Myho^NtC^`Jkrz z$7YcAV|sW!QS1YbdcWhMT_cafJERH1)?|sTx>mJv!(mTCKGg-ktHJc3EcUQ2e2W}Y zLyc-~&7^2rX5+ON-is4}v%jh*osZZdK2AQ5e$c}ESS%B0~h|3DHIVC$5Ya5X`1F{Qxk=<0cLKQ=mR$etQPTClEbRcVMbgH zog9d!eQpw;)`XP?2s>?Nt_8VO?q9=Wi=cu&W~~L;jhUfsDtj;^w2*cZueaqcL1g^t zv5`7wUwXiWl~IGY<#kz9J>cL_025$f9y8Uzqi%QOv43TrMI3noBm?bDkQ@fNxHjRp zo~5_wj1;_8^=4ad@2Itqe{V>*9YY%*a*~+(h@ddSEq^>u)s($d>#!Wm*yj~_&~%t> zv!XRE>T#s>nj8gh_v zn;3Gjybe16ADbV(hqCVykrotr1ad3`d^aqbO+qaGUNeswc!Je&CbO`^KYzM(irz%3 zDbXg=#i1Stc|Ae80fwJL5RvOkD6{_EORqzzgu5|uYLaqab0;vL@TL)_5x>tR3$v8u zOT9A%ZUx`AuIzF8TjoR0)vZs30w|9i)l7Fe+VawP?{EEH{>#()U`D_Bx{;QTK&OFV zbw~i}k?<M9a_~OM^+nGGQYXWzBLSx#ufrCg% zn}FSg!OjxYqcNRT(XKERh!|N63f0thRExuWlqUCauHqFQ>aimv!vf|KeaUS#|DJ>8 zp8K)3rQZ~~Keo$Y6BuIdY@aYx73P9~yX)d{@UOAi)Wsm`MDF+;_P2R>t^ZO~aNkah zzi(KU`EqA0E6-wGn!jJ|UCrUPmSv7NLv6!ig@()9)=xc2+iSeg%GnnTJ;I?qskUpH z&g>hp8r;eb(K!|dv5jcXS}VdbR2U?+1Z*r%sX;pYW!}*xkm`|1d?v!t(6VuiKobX- z-N`?bf5z;Rq$*3-W64VvKhM=}Tl|!JW`=$-T@rcY-KC<}@T)!xIEb2;KwCw7nhuj= zucRm35{#{FWaw9xj9l|un!L-OC8rcJD*{EdVdzl5)!|&+p;2F!g$R^3Y__sD?rAh$ z<4Ne%FHqzsxJ<>&w}BjwhG&PPxVc4OYHcEa%^ze5+f@>Han~nQ0|<YRO#ki8iG9$foZ`|zxakC={q zSE86sAGI^(*W%H?#jWY%c3!|@-GRuF({zZ2R<{c07&6PIjsiT?eecyWK;X-eWNok6 zsv^(H+rZsutZN%KeUi#nZ zCw52Sy~T~P(Mw*K^3fpuM#HlfUsEmRNJ5{flgI@AyWZc&ngxD|EU*dS!D% zfZOKj$$&(_$T0*wqs0GN$yRrSr)7piBxF3Rd#-(VVi-9e`ZMIc<$W+`%!Z4Xmb&bdxTmWJpXy)~ec-!PRpzgnp)6m- z5I3|v7>y?MlM0T%RRnZ;Z+p=p6pJd*iaf+hH-VbP#l&F5(>Ah3z;Ki*2#}vcrxQfGh%I` zzbhOJKiMn=Y~HyH_t!<#xu7}g@?Z0z3R{VoAnkTYDmIo^&^n~;L)Acnx=40fv{}J&p&-V4qI1q?+nT-NIkn?;ngV)i&mtJ#2sK*EK(W6R-YXx2`p%}T zAkD+S)vXK#)u7-PGPgF#Y2-_qU0Gt7qtK9(GWg{i8bn=hC~ zD8qmkzg@3Ugz4-2QWnm0w%dREK?0KpXasLJ_vFLxtykeoJB&rO;LH+PbF+ByAF`fp zDT_flDw_Lix(V11sc$kEooj-A_^bT$La@r3vE9TZWczpZ34ZwdMQgD4ZhGhugV_~& z#H8YD@;UQD^=KV&Y@9~%>HLf0qFiq((x8A!M5=T#i|gI9TX#c{gg8+*1wo)v=!wyh zH9XB#K`jh!xVZ4x-`d3KC@bLRW%V7ePCBboB06657|8}r{z8)=WtMrtj^?Xe(Cp0@hQrjAViE%J=^S@6_5dM9*qvlY43MAcm<#O zye1)zXK!gCJ(C}S^Qd?;IHFXQRjELCVouYNdeM`E{~;!nvRC z8Q=I>otO=us2&U8x!Z?r0UNd!WWfopnh7Hjcq5kWIbmTx6Z3aEbWXq009=>DX`khA zwu}39M>${FV>_1{&DZi`0{>}ak4hfNw9iGI__%d+VPf=}F8=^!+;lSt>~RcD@{Eo1 z0Y&B{C@xh%k15uq-U#ql*hPFP)EYP$1UWG-4e0N4$mG_PIE<-9jEW@fEqg)-V3y&v zkc9&!dIZL91cVJ-=v?iXYM?#3Jf+584^yG%8TB0Set3_-%nUr= zS0>`sFmxZ4a{&|H_}w>S2y&)psrN1(>zXTWrLFC|)?#feF5#1<<96-}W^GNS&^V}5y2eGnSXm7_I5 zP4$h>P4Cd=bR8eJz9PxU7->C^qUMZfhmTp|iHiPy9dEh#g=_147EC(Op7t^g@GVq+ z6Ylt%4f-L%CDegIAa5BN8ESe4Qwj8Cf3{|LG>ZF?bss%#W5V!~V=iU>??vv4v|Az> zkfPpT4%vj$w^GSzjeVwX#+82tY0k=j$$0!)d(QR{UeMiOhw+n^id;#;uQ{EFGX?XY z2!_3YYJ#=(rdof>&XeDSgHgTYD!m+X^a-XZS{S_1MYkaB;-=FsTGspIa9GPQ-spJa zNHii32eQ_}iVOMp$Yywsw_Veq{A6$Or@(PUn1uR+PxPJP6xxb(A$xKAODEg9<%Lnp z*qju5JW&!%plTK_CoW{E0N z=hIi^zFD7fGF1Y*AK<3#T2uUysv7=(i2C+;ruRSoE=Num9LI^uWtDSCu1jGqTQ}+A zQmH6ovXI<2cVFx`KtuCdPt_yN?J@aYn!2C6%k`Pw01A-jwDD66I?g`V7Q z|Gi`X{OnBe9Ux3A?ED6dTV;RWKCMMNu=I@iA>7*MPgBTRu6#+poN~W@eY>6}H zP7=#6>X6Ui_Z1g?)Xf?$0z!~QVaG_WD47CU^{mU-Zkfa7NI)yp1r*)2kE+P@@!b=0 zL4|siZU@pT?cr;KlMb_OUi6mOTiv7;(RfWmhg*!K1kj<^wCnBR==hPH3M;NS%(zhg z5Tx?GL=pMbc4L_4M>fs<35&oTzY^=@2;B6DZJ&MC_&qo^Ws~} zBq!uWcwk}nFP;+lWl`YW^sX4QD3hOGU*tC7zdY7N?F6DrJAo+j!#|(y*ypNF?0Fvg zVdMsxge^=Am!U@;MT2P!t^3|QetJichZ=hr1s|1GxH=6MfA zbQ{OgNa%m_YL za`dF*C1G8Ta1syD+bjfA(W*OC*sSg0Xko7)fU z3{RaSh-EOPe`cGB7yg1ci9gNkd$qy8A?08H>JkJs{mD{^t0YcI9S#VAT1KjB@0(Jj zX;32%VOc*iSt+Y9f(}n}E9%nR13uxh(<@t7V ziS(h@=60jj>h{h$Ti%x%E?OFC+_Oz;lh-?F7Ye`?KTBQcl(a#~ zl(_uc`rTSY!#eIjj0DEOWXUQ8pXnYu<#mi|0@ZtNYWpTr-0#VR7k{}~wl|Lgfa6I~ zZ}J*4)TLN7yWlezA5fI}|MLQvYMtR~Zio0+!!ag?9)1uU0j5*yA^v8PfL@YQ6xDf9 zc5Z{sgkQv=W7vM}IzdY;uvH%pP}dA`TnsHlJw9_3turMuj|P|8p(>?+wZGy30$a=m%c-mUSVe zr00JZ&a=0H3g+Dn@0YnicmV=TxmAO)20a!fSE*;%Mu~1m6O6x95Ed1x2%(Q3JBD@& z6ixj4qgY>ijh%EyBb>RC;kek?e#Gv$+-o>RtI;q^o9XB~b-lRmgXLt0+ByUD#GS8%q==kZ#)%H0KutVMp_jl1A@cJnh26M=F#-n*&Zv*G&v}Wh`wkxxuFCytzHxr*PU1sgvi#2oEtF-R2UCrr+8J!g@B*xs5 zNzu?7aHjtV0}1Iv>2cMz-R?RRpB)z#U^PY#uS#2>S|0KDySR zSH5xmJp@mV!LbGLh&Tx=C7o;uc&#SJe`_NbYl}UWs;`_O%VsM9cvWHHA)HtZa}WH! z_&%4tQ4@FRQNrxSY>&Y&VTtr?yZGRwp7%=mNR{7(gOL@`Wz3T9v=ra5_c%Nead)}A z%Q#x!@5?9I(!Yk?iUUEj8%L_+R4GhUhH|BUAG6mvana2>v2Hlvi{xJQ=_>Xg15F`( zz@tus)+ym%duyNTll3p}24p}ob!OX=eT&<5%5&>8q3g|-mj)uAgOr0;4Z^&8t_g-7 za4#`ZHY^Bw#gAayRK4}*jY~^jI}5Q;DfzD0F75RG8A+>nIoMS!`!Vcx@?A>poWKV0=2A&kqQ_`<3)&k^HsfoSgpzF>ix<8nS zD{~Cu%I9Asf1scmNJcYa@Ye*g>{vj`CYnuMx@}bd{ zKP1jVw6rFGGlsNP>pmPhpb50Ush32Y{7#|&JYBeRUsv*;YKEvOCC!)}Wx6V+6mt*r z9_*J`XGu{H!=D6a6sbE~imz0*45lDoz-=;UoX0p)rYG0Z&yWo^NebpEDy<$xU$(Kq zjyk;1H79=>wvx*`qa$7H{t-0N;?azfBhIcpbC>De?z9^2)l}J@RQA~7z+~_m*K=PpS{-_DKV^T{*mlU+u$Db&$vM}s#X_F zBEwm(&im$8I!KJ6Nkhe^y448>erviS8^ws@Out+?)urui5uxJ?SusV80VP@go5@=g zXxRda|7N&8V_|I7^vyz~Sw72(fHN<=0U~kP+@-;oxs`^ZEz28kng6i?06^MN&={9l zKjEbnnAEs@<<^<}+c`vSLkMalGgkcEL-`wlYCDII-YEtkDfxdS9pK&zTL(KxOVmy@ zW}QN|=XQD&&Vq_P&Vb_;mkm=wr@TWb57Ds>OS7&aQaE}n2?e3(@N&q=^EhN`0dZD# z^JU;KT?dk8HHPK6P*HqtCfeFE<8im+rYNph?a_Z;Ht^{uQLZU-DZ_TUTRw+ubT$%7 z0pV*qKCflAR0iKa#CQsCe%W5E*uJq2D+n_AOc_#$bt$c!>`ws6>TK!HVs5)lT*2-W64y4tA{M zv%ZFzwl#61v~5NK04LAg1JIE%p3pPJE=7YUHn7OIK?C*+qkNOt2cMDMvVK|t8ZpM^ zm;u!UmhE7MsW;1jQG6#x6K%VP@7Z z?tm>#;oBFRFHo4PI=0xAS!bwsRYi1pOHJyzeID9Y{hdc;Y6p9e8psBA%f>X1J7lD~ zA`nV|j((0Z6U(=nZdJ3J)VOVAu7$Dfe`4UvzGJKE6)z>uDjE-gK>U9V-okFd;*s?m z$tUBzy$k>2DHTc(j)XYO=bzA7YJD*&cVVJ!)*?$LN7HQkakc-J<)?^yE+QVXwHe!! zH_UU$*lreAnOc!80V_7b%sk@J(*)_RICLA@c-lMk_;A%j1%cip_YPHNa)}%n$P_0S z_hhLQxrm8bhc+92QMSLrmLI>};2tB-oHyYV_-UL+4)FxIl?&BQ?u&d&izlY8uM2ej zp1eiR557`dlZysVN9S6|Uw3>vChRu+c_+uUP2v9ks~A#EexLq71<#WXbYuai|21Zm z`|MvvgK|!^B*-^p2ZH6glyo{RChNwVkfY0aDRc@Wpr4m8jH@=JOqW1WzixH$Mv|E^ zL5ZHwD}t5*eAUL%JY(_e8#&7KMnk5V5mO^{QU~*)%fW8zutE1n_r2{xkHLXC0ZW@2 znJx29uCyH0_*nx7b?}O&KLj64H}EfHtYEa9Ee$d7`VdGRH%qgCyl+D9ZHSdBB{est z->-IxkN(x6sK+5FpJH6BcqpV$XjZ~QUizcwIKDNiA#d)z;~zJ#7XE1W4Q4#S^4Aj@ zxi513K7!yQcM$k`e7Bsvc|dwwn#@^2)zPO4m;{%JSJflE@0k5M-OZD+>g?DV$4fcA z?gp}9#SgI_o!>hG~eBvP!50$W(IOEq4FO? z34so2yYXL+x+Yu~xh}%6-2s)xvQ)#e_Ox5=mQh+wotrAYc^TJ8xoH|w$EDm6CuwpsLW7F+M&NY|dk z2#tfcWbmkcS%j65$S#Rp%N%S-O^@4Zg>^k*bDfUM@vob+b!kslclXHK!#n~3)_?hg z6i6~f+H{2;+ztx_fqK;*Tf&)lnPsPyVV83spI$y)*sx$G#gZR@iGEiwvJ!luC(N@f zO)7KHNZD*=*h*MnL!fhgfLKj#5=x}g{YseVTlEs zH=oVBUawdDA7*wcuNM(Zepi?d9G@$zj+JES^ zqBCOmu4hgePxXU-hhyvJoo*qh&`Iio z5^PEmV2huvtL6XEaQ(XpFmMQm!`p11f2BV=SDA<3Yu*8vys-fsN`Tcp)gv1CzRZ2N zf=?I5d%oYecQS(y)_ki+Z@glZuG#wP+?#OLLELlmI7(k6_eC6x7|Ix`>6@5lZx`|O zwom$>UivDZ$%-&A&%t_i=W>@=>a0fPs9xe7-KE0Vf+D5_V4-oLL%HanmrqrReww0F zL8h%5iXlG@Pc*P7uX{9`#w~2ZWgE#_F~>K-3!1hhRU^ISHlI4IrL8vmirJPV%ty9r zbvE3sNnx(2aCGP^`u-ttV_VZ&ztrVhh3j!LSnBuZ5wA`Hjno0PvOP2V8ZN3@Pu&16 z+jS8j(!i(n4Sm2e&4bP8cwA`Ds$z|W5_Gj@#AkYn&n+mmVS}n1yua-^r=f@ERz<6^O!#|%aDU%M4&=Rl z(~2Qc62xtv86;MKw~yLSd441w#rO-l@&hKj(+_wpAc~pSN4KLmQmh!|ifjuj;(_%( z%kTkZPksE|kSVyg6uUM|6+O*fwieUMbukZXiCp~N@HmJ$xtO!Lx^z&Omlz)>mIbTj z4*9r+AnI}#R}0Cyd#mxS;myC{+&IGwlp`=H9JVK;2{Dfm~ zHaKM5J=iw$VqeQA_{hdT-tp&#c)O`MG2uX-mFxXO3WD#<8)^+W5G-S%Zf&eAcx@pl zv+0>^$=FI~UBCCndOsREtoP|Z@Q*v@f);cdVX&)+{2#_)xhRJy7mWDqq0;f=ZgJ7n z0k==tbz~W>Gk&%F%MBHLrv_rWf+-!7?)uC%-1Rl&E8*$HS*F-Xq^%rD7UIddkS%E5 z&gs*H3a<`Thx&FExJu3ShNsvi*9Y*TZX<;JYVrQ)D`rUp^hj9SP(c>YZK_|nsOX$@ zlqJmD;omtq49ax8p`8KyCo?*0&yD*#@kk}l29~%WAhn19Mb2W!uESuMy{6p zqK;wbzURhi+hi9Z8T(dRBQ;zu(FzM*7!*y5R>ptC`p_hLZ7(UBE#&P9ems4X-x^`{ zF`?dF*Nsck82MiM%_=@1Dff*T!gub|g0HJtd0xB9s}e(LF;fsnC0}Q~c8P68*2l0d zi4O!8kqVb5v-ap-*h!H1iGPzX1uWcYh=@{L6}c@RZ_$i4;&&+}DpO2IDt5MI7Dc19b-- zi_j;XOP6(gZ%~?>6IoGpHLhgU+7lcvmWGgLf_7OSv6PrXzvPhIb9++%Ghehr85g^d<2}+inY1f$!%sRRBhjz>dVH+-UO^^7Xx_D_ya9>w!_|SOzhIg! z1K^VkdzIVD=k~CPe?WsCnFR6MB3Z5@f&UbFo}M6-90NX)R@8f57{HG($S}vwe{TzU z^Ud3bZekME3nB#H4O$Lj(ziVrHQwwGwnr5lfAuRf*PqUH4>sp}P7h|r%U!cA#Bxsn z8?FJA=S}X;`*+4yv##*{fvTH~SApQzAiKz_tBuKXBr=p^e2-X5%!Zq#a!@Om3)PwY zrlNOAgdDqQy-mPGnMP8D21IO^Q) zF^`2LWyWhFCq}L4t?!FU;2|hfZ8h+Zg;9bY#hSU|GamSZSAAv5*$~eM-%)Ov0KtvC z>kj#f?ONmB;uzztriMb>n%>E#sJW#0;NoRXUxg==Ti-U@+yh6W=>h4P3I_TmetJxc z+g+PR33jibN!w0A?SqSVVUpG!d#sD_FBXSUMs+KNrM|)I{R}P@Cz0KK7p9=6^D_<9 zQ9SrIel#$$lN7ZzB#`MV8pE6%EphbiN^hs{W#PKV66-@|y4d^)+ilr#60`d86FJYV zDr^!b$IffZVXsLFF#FPWtO`oZFYx=U!2RYu&%OI;2iI{ty~Bhs9lcTH`el#z3E7#7 z+tW~X{in}TAV)4>Ct3xb9W0A!QhZ3G$$_uf#NLVr)WE%C&AbFAbd_mcW-=0r289f} zO)+9dif1zmaRI-II;lsfc^WdhIRX8d`SQR_`{;s`oq~JYU|G`%kG~&dITNI_wJsYn zUCy5YDQ<7y0QFg3%NJfm-_)~nLq}?$C~&~XL}d$eW?WTC;DF+yQ(reuxT3kMZe6w# zNUlx_S4X*9M_x!>@|*0ILt0+MOb*=Ls zHg&IyjEO}KP$#PkdXSe`tu0|eP>9uRorr2DiXxo7dcTG$-VL5Z1I~m&VFg8`ewnYVM2jPGh5=qdlH}A4nKKm;lm}!& zV&(jiTv7D?8mNQYy`U`T-bStoE1gv^VD_}rg%=uCL!+yNj;d-|V~i&}YnLvLDnLmp zg2pw#hg4zob)kiiPSIrpqC>X4Y*7w*^OAG#usFi4%w+t{YqGD4o}iHx+}lU<|IsZu zN9%U$g#i7GO+Cl6H?s&Os|zzsX_>g$-;$qJ4ad$Wm=L37NIO?>W9JI0Aqs9-01(CJ zr}&CMk?s?pY+$wal|K~~W*|PJ1HSJe$PoO9?=DL~7!9_H^=#s~l!VW0@I0r$qWD}w z!_qg|(4KKa5-})b4SQ*v=d-w!R-5P81A8#K>m4*O6D?CgGLx?<36ImK1_1i9A(P-D zf?=to0JhSh%_^)}xGt;XmfDHAI}EX7#_l}~5R)qSH>DU4r`KanRNnd}gzIbhN=?AB z3RozctBsx|2WmqW2QC|+%Zq?qa!$~g8P4i|(?uOI>JMZ0&A_m<2yVM3lvr^OreocC z#VjupR8xJfPS`xkN>JULi-VCp|0Wi_V)lkq66d-MN2f9o8kxgvwurpp>uR`gHt}J| z#3bck61r!n=1Bfsn!Qf0{1-8II67va<#WsJX@a|(Y7f&5`M_iIHqE|btMq5CD3pX~ zE_=}#L4HDGmAQs>HeXqMd6V}bo!^Ll~XWjchvlkS9*>RW>!iZnKVH;iMYDi3(7{AdxADc%iNdu z+5Z+KDPp=JPQILwDWo|D^ zB7Qsp8oav74vfOB`7_G8Z!MkD9(S2?hl4!-n1&4b(0?hT;+5I03H>vC6XL#n^S?c> zFt?3&z%1*bodW)b&G_rO|6$VKPETAhRWR5S0}%IGQczOe^J|O2`q{rHvEpW$=kGUE zS9Qu{x$EzZi?Q^LPlE#-VNzX-Wkf(q0_91yf<) zqA2(}>iK%@eP=j61UC=v#pczEFRd1@eVk8pmcKXY`f<-3f3p`i8d~m=xACgTVl_ts z1Or;SsSTGh{{D8}ob#9?^X=0KokG!~!!sklJ*D@KdsKXo+uJhPHketMFQ4Jb&BU#y?^R@FoEWpM=W^qf+|K>Z{)3PXkqlo}R4rYEYd+1_VV)>of7E)`B zhPhROT|&f2PQ1qrnv%6zcdZoV8GtZW*Cy^@W#!+ya4Vd{Ps75(WZB^o&&MxD7t0&? zsm+g*VeX^VS@AQ2sV0z|@vSOej2_RSt1oqr+UbHG-KwbmQV#Hb@z3u6_El#F2~uysHT&~G<-;Vj^AKR)&s`7tCWLd|i+3qf)soS_ zfHK3k&$Cv)*6L*-l^^*Tv@gUesA(2^ElOEo{+uyK^{{pS0mGnBB!7NU?kWPNduROJ zBRUbG8W`oRpxVwe#)%oycmvXbWyZAy#1ZoB&Rx{~jq2d(hRK-$;&&U2cWG9&)-PR2 zYkCo?V7HJ-gm4p0MnVQp7HS$Y05U5spkq`zr)VTKM2+H#tF9mF|EA&;>ei#7f!pT) zOo4g{xRS1I#LdrAiPZ25W`PYzH(gsYp>*SqL`9|;o>ZPI>rbt?!3wk~{1Mu|vDDlm z#!5ijeD?3u2cgS7bt22GEnNSkNdr~wnJdG*Ia*)VjTE*&vmin+n+FA%Zv(@UkCT&= z`UFC}BXr}Qt7)j|EvsZEbyo(>SYAPvDUF44B=;YZMUdVx=yN(*IL`o+pqWACKEN;z zWV^!+{dic{?T zArQLC@6?alN&WWAVuB7jOXUJhA4GeTHrdqUk&NKVX0BOKKP5%TyJ4)Utz=lmrYhVCTY z!N|5VLb-E_gkQ*^i)|rEd_@y|*tWBgwN}mJY&#vTN2Dt6C8a|IvJlzy=Va+%^Wwn~ zzhQTt)vix7zz+36WQGMaK8Bw7p-_z~3i-R3K-Tjdn0$@VGFidzVoWRTIy2wR4^>N- zmo=Aw3+*4I++%8f4R(uwRjPWe0st6pyby|6w&vmgo71_oLMrX?-#Hul#z=a50-l-* z7wrc7P#=!CjmV8oIgFjc*X+lajIRG-e;(+70NiSa5pDnTx~={L*TY`m_JgP5WG+3B zda>ys>+3j`G|Bj<8`+pCQQiNXN#aGg##krj6KnAjI@F##Z0rRcAXEMt9BMTj9G)JD zRMvFSR!TA1ROW7`Ptbb!ZvzhI!;x95w^RNYPoo!R8SP$tH3|8i^K$ z0|L6R|D*^1Xxh0B_aEx~FE0!M9we743^poB&9ga#q%*!wOxW)*r{;%T-70JI1}Mc4 z>=9)Do0%bc@n3V<2)MjB7?GKenC6~10sFC*(o3qhWtky`=fv(|k68nQf3T{T%h{~8 zkYJmjMgNMNyn)3xT6bw{zGJ*K$iUpm<;SkCkJ8<$sPBnjNvj_W-UZX<{&H&7Y)U%` zQJ7e%?z~{b-RXN~@^<>3ka7*9g2n^QG7OKX?t_mKi!|Ft9e4>Q<4T7NsxViuj`ZoN z1piW2%31K62<%?*^@g#|kY>UED?>4Y63ChWCX!lPy z3*SpG6~pw*OQesy?y{Xz%N|_<`=gG^8|v%}*PuybAWj~;2mpY(ovKj{rVQ+tUO%r6 zY*V(u4Hs)_&3qQmiR{1qvbsbLG<~)CwlZ5O*9PX+#(xz>fy6=HbblP~!?J_}+=f}v z-pOx^viAaV8){X(%J~!DgX_yx1YNq7+3hr%75a5ic8A;NwDz+MRRZZ-?O_^4uG8Dy ztcr684r7vZyy-_TEnG581@|bpx4v49_oE-XC`(G>g;!4Y7S!RqV)9?;XO$b)B_#obR>t@GUCs8 zvo)>`C{nZK>uEtj#|=|F0KcOaEx zS(UfL{wsK@S$|{b+p+8Q57;f7^=^zfOo9b0pw^?G6V{*5@=7t#P4d#d zsOT6d#LgfhN(H;mi*5`G0cgFz19N{ra6Kg}YUi!F9R{&_=YAns`KuXCa8q13QH9tGJu?ZV{zqYwC5pyj>NbD3g zG&FFnWweD)x{T}Swa9!)%Vbv^^|GN~*J0Vie;zgTfG_oEh-O~6wHn!=jj7C8TN6A9 znjZw^7$}o%H{Sr?rQ(2Lh}%g)A5Q$EA~SG%Ql8h<`QKI=qU)Nk7UT5CIMV)wk%&G* z;<6kL+RD%=!hA+n5`%WBOT^;{c1T9orG{@rDZP(oWFV8ipK`Q2X&^;W~)A@+~u*w

    7-?$bPvpN~`j1dXb zsUyGuP>yW($qI%7kEvP}egsz4ss9vC%hMMtSrj`(jPg0eViCA81!p0|bSK~4T zCK6jT{uWxtDayeWZKnCC`-Xn>{%`Is->&X(l`{gtpGh(M_&zS(p9d)H%~wcL3oGg< zU3~rW5#@cj&h2Gj$indBD4CNdM)}lzGxd}J#s^}F_bnPR^xzu+dd@f9siWTH2D5y{ zfI2Foh_#eSERn-bf6|@#Yp%rtL@I_5^W=p;9hRX%1I)zX;v;$HM2BMG<3$nR?93qe zkdscaBO+-VABs?N&Kh`X0MElvL)`P{+1Cprq2CIV~ZyKvk2ziWmpHU!IbAAP^)w?#?I2JgLX^L${gF1gUr?LEs)|J{}bTjA;49qyp+Qq zVL~!o9d!jH1zo}5hxiW22Z4Rljox6f_t`P|(_>CEd+Hzc2K>Ukec?IfKcN`D=Xt2Jc2JmcpOOOvLf@X!PUjjC;j^%Kl$ zYNnYTXtuxjnKAjXW&D2*6_c<--N96mwFo?!)K~U53!r9_buhG2?J0V%~jZi=Rg?ax+H{ zrhp}7Twlfoc07c!DKh|JUzsW=3hCJE{C*$F-gQO0@I}q3v*UAXgtMI`%K#4W_OmB8 z$9EvIlOAP~)=9t{xewvph)sKK=0i_34o8OV%sQm)c5=w% zIkltLMS?y*)r@xUBH510m`|Pj!ToyR$FwJr(w$AGB>^`2w5BZR1{#w%1127Z)RvmMzx|GZx?$MukUA}@vrgMe7o!`Z z=ksZWgWV*kGn^_c!)v>MfMj`aT4!n`5zug4iEN0AFaW&pGumgdJ!_wRe5T@kfFPG; z)0gNzDiacCWxtmEjY~Gt${6D<=dpy_z32H8{sto6<`B)a80ew{+ESBBG1wT2-rFZ0 z)iKP<5`gWHZC?29haVHoD72V~i9k%uonL7B;lyT5$`@ZPkoIjTsrs?qm$ z@bZ<;^!J3Nta?1y_CJrawIkLCI^8ILxF}Z?V@^7kj8<#a**f`RPLyd47^MP!(+1oh zT8y|rh9WLLJ{wrp`D24Ah1I6qM6f~sOJjhulnPUFA;by2_ey*%sd0~01-V@+xEGY= zpDlxfCE00j+YjA@ihXZau}*}FR$62uuzipDHJYFsLRyMWmZsdiq38x-YTp=XzkfZz z7tBVOpfdDj)K3SPcdQJ43C1*zj`_j^JG|xp3#=#R zr5bcgVlv%KrLxtR0a|Iz#ub~SmEtS-4GxPTgM9mF#XbhL!<#CiM+?q=v)6#W0hn#F z+YYfS+jXid9H9khzIL;FPh!yd3`LpT*`e}t-k4>%A5(w}lMzvSxjSMOZy{4VYpi*_ zsi}$gjA#tS$ULdP=ir_+<9=?Xb~Yy-#(Wy6-p%|I|G}eqgYOq)98|j~!rJCYZrB{HU1(rPt3 z1s}?Q=>U9>Z%3offZ4b9tyEu(r2GnJi zLVehge*|2jrm_ri*AY26!nWwsmJZmscR{k=lZT`7md!~s>&KbX8;|0TYZq}=9_%)W zyfK)G)AwV(UHtyc7C)EprTXA|A1L~|kp zOs`)yYEv8OPe9yv-_|WcY?Gb%3#2&Ki*|fA02w;;P}UPh-@U&yG)Yo$C#4(newI4t z$Ta#corHa9VC>t4sX30A*2w5%eLA?JaT|Dk{(F;?QPv|LpK23Zq8q#8Uh1cE2Ak{l zAIIh|W^kw1Cw<1(m3v27Hsy%GQ->etHQ>c@S-NAPI+%$Xd@orzWUsFqM6W%kG4{t_ ziP}-4WigG7HRq72n_a@HNtwR*PSKtpHysW!7}9UVv;BbF}+ zwrJ+ID`6RrnMFeDtJU^CCs+<9!=~E9t5D4S?^!S&Dm#Sxy zZL+CnXmYNN#G%`HS0yc1!%R~n!K0{1Gr z`tgry1+b=??Ffo#Wa@WiLx)jMUBhoU%t90}NxY`Y0*J2SIN0l4oewkO^hmi?N0rYR z3Uhz#3p=sG36UP%yLa!o!n%9XlVNXPZ~n0HOjn?t z{8*=Ad2=(MQ15DY6!W0zeFWx<@fi?v*F_V*uH)2Ba-f5qmgm09X(1ETzDe$;)Z%rl z%hV0l-9*IIxy@`pU%h`$A8tMUg%tF5BUrPJ5V~q?)r(!H*z-NdLHQZj+eQ+;ak{%3 z2snuI_E0MIRW%x@;i}00{pAj=oQjfzpvJ29HFHHRBQuAa2PR8z@ygZGr|WlpP{k{) zNoxMaXT^7N8sldE)PvJnDF@cS4*t`0@QJ2oET5I9K-y^hS1_QctK-lL$pFTYLBCXS zF1;@luh?{TsscE2fJZm@*G*`>k{ZAN!epbNnRlamHE{$6ayImvLJI+*3szv=am{|p z%gxNX8HmiGqv|=9Sc#Z(n|5m3<$d@*R^Hx$XC8#m*P#*{bld5w_TS2MVXud$~?oWOZUu*eo9NUN#rybw3-cl zB5Yf|S*vnzKm%wi2ArAc=t?jIf`xttVO6d4l7ylFFBS%mC$VgZ!*@65_L zL{&V8^xi6}=BEr&qpzW{HA}6~0|wxEU?S~&KT?i5QNG7KBzAXSl$_-qtcd;f#XOHT z6gc<-{dqn*Dd(%}k4O{Z$rPa4FWU)4k5x>=09AbHp4#s%GREjAnPwLQ9YI_V`2}5S zr8z**nWG_tgWE{q1kIszy-XaW1LQk%wLcx7G;egMOtqmx63{1cdMjUR zTj5e2M~mXJ1N)L`gkp00fXr^F-ZrgolC$_xmy6YRU#vOO2@nzk?um$t+gS)VU5VGm z4KYx`Fl_uyy|POAjoY;l8}7crY5-yL+l~@T zXrd!m)C9S6mM!P)YB2+x6E*LkaVJ4F?gtlUBNj^`R+_ ztD+m&ZZ!4NoM`rFEq^9xAzBnrWq^%Sr2qxT1MbaCK7sMqq< z9!>rgI7wY&iV;UTnQdym@(fHo=_2L-K1*S~b>i$JU%i<2;Y#@RO3#|V`!r)Z{2gE` z{T&7~{V$9aLp0(V*%l$P-nCmI?=E*Z{EbN@;)I)r!&^GA+RSCRSNzGa7?pOO_C0x_ zToWU*8S<5PoDv!BdIGibP2QxxQ2}48EwJCJ;Iix4uDjMxq{gNuS|53{ zIFW@m(ajp)qAYM9@f1IG{KwRg#Y98e2+zx?fwJJGLBcTOm6Vj@)?+|-q3tO}rE;3} zvCqDFeH;2OIg$adhOa$2uLDmm?H^K($QHv&C1;&}vXd2ent(I(qC4c2NC#650aY7bb0{<4Hr^~a>3+urK%Uft07*MdP)5m%kL1ZC5(p^i zKim5H`UhTJA#Ox|)#J+*U>z^ts(&2g+XH^}P-<4T_BGs=jPcucSo;3{5>H~c#$A{$ z+O8`F{evExTEe`G@I?;kp%uF%3wLV;jBHi9+d0@R4^otMv%BNSI+%HWOdqar(==$3 zuh>%#KxT1=14aw1`Y@sy*FixcHhdiJP)=#4EFc!hX5Qn4bcz}KF#hY-_UOIFmZQYG z_2pc{=`hGdwP>2?nb79B#ng$O6z}N3I0t2ETg0RJb*p~F=-HY0XBM;Gbe!#|$UmWN zga4o8AGZ@ckG0=!xE|wB4 zK>z~jDBo?xUG`E&dq5!Gh}wgUEivSme(D9)h`}K!@4&LV?NlzmuKRbkUe0|V^ssg6 zyXzn3QkR@KKb@SvP+E%fC`LxJ^lMYiSnAGLwZ7{fg*O=K#E- z%he$;dk@ix-5HBN z5>a`Q+wi1dmu4#D+(S}#=ewdvI{Y)3`&x!LsFy=AhTk_hs0Ah+A*`0XFLj|tvYm5N z(lp|DIhusoEdeOzvdqgiv!F8GN%Ylq?_X*c^Mv?9;htAymd$|=8Nde?vmy0av(D<% z+}d(^*D@w5c5(#St>SUL3@9!L+RZ8^;$0hE$fbwj+(BLwOIKs;tzF&Z94o9-B1>#$ ze9x)-?==n&R(YHhw8eDi5QDZ`xWnUP>ClizCcHm%R=k55cyu4>Pba!lnCyCVi~m|9 zk8>f& zH;_`b^#1#%l$I0pM?ET$g=&kD55qrb>Vt$u+o;dmZ$fb(!@t2R|J6HqO*Dk*3okBr zR0{Fx@y8fU6=1eN&7ft-IWR8C#K3=cN(KV%ENJ9q^JBDRsBgwLkF{cjc&%^@LKrLK zsj?2^K`~8gfC>;P;&)egWC>Qkb%*b&sfXVl)s5=2GWRHAO0RTwhK#gss_fQX?l5M4 zvId@!SyZ&2|JKG97Ldd;0YO9`2~k>wq7Lt$sJ(G{9S3`YZ2^A|Xr$BK-SGj4zcP*5 z?mjj%`@hxP=bh5l@fg6}v=j*d=gUNta%s~vRVTI**4=Exn|CY+n~|qtXPQCfevnmN z{4X1CQE52pHj26;3)HXRNRiZkytM$BZ$+AJJ23;rZ&G{n{D^(N_cxSr;y(^vl#b|9 z)-zLUlkBrtXy|z_N9%fqe$t~-_L#uo><JDAnUBRG|IqV>BSNB){1MFn<qW{0t(s?EhLCT57dtvxa!BJh@3Rkp-B2VdP4#<(1huv0H*M3#K9Y@qapm0!fnB3-|GDE zoW6ku_2&BWy#~Iv%yF*Hef&rQBdEE!=lBevhO--sa7gSirv+ZmT_i-emQobD?kOsqYqh^{9idF0l=%eIuXp+Bx)~n>4Ff zy+>~$NaB>&W<(|x-uy(gs4(K&OMeZ5ENu7p_87@@Nm&T1;qqB!$ZO@@3W+dYdn;~l^h9Wyozb;RL4PwkQ!jUk65ltTb8ZR+(#MO#yQg9 z+}A0KLBUkMbJ^GL0PM6m?L>LOYLLvk3n)xTu7LgtK~j zsQ_X0EN=GilD`j65VW106t{xXKs^>%@P?JpTk}3)_LxL zXgX}aP`j~ugJt4bmo&Ckm(E%PjlQ`;)t5!HNrzG0|VP@gy8Ach^mz`}D3|#`ldsc4_V#E0}R01oq@5si2y0pXDF{eUaq- zO_etRF@E9BSTEZG3t0!eAvB}^)(n~58E!Q5w9O6q4()=551Q2FrwU#_r!t=Sz9K*_|w(g zVr@-Rp`as-yE?h}QFK+Vz+V$=0`NbU54h#unXpG`p}XygEA4kaIOXjsPfnTvOh%M!nm<@HckaePB|Q^|muI`>!Zhs0Q$yDV zC30}Y+H-=ff^jp=(c&}YZOSn3#%-H+JTT8QN)*;2T!oAAtg|-TL%+hzgjIZW~Lk$av z_c$SzKf4;#2#_Uo;Ws~2mLHMAG@OW6?N;nEFfY?V$+@ro^g?-#R-c<6A)$3>4vX*i z5ZaYqR+Yf9J~pz_^KGMgfn|V3lBNh?n(!-Fc3TD4bv)38KiO!>@{|uUlpjHfQ~`i9 z?SLT`aKGZw6wHXQ`Yb;6sS#_iHJcCl?mrg@ohA`GAval_BMaI^RaoabL%OG4}yVF>B<`mHRQc zUo*<)^!FPg@P^f?;h1g*=3G|y%xYRYcy%hq!e(XAI`*1-J;b~teYh*fMhADaI)AG% zCz34&J$ONP)PvF3eE!6{ii%F2=trU4fqoE3;7rF381fg?KU?v9GYZ zzx*b7vzu0O`hnGqJO7VeI(8FZI%~g&ja~KFy6^_G$7N_q_o1$n+JoGNV>?>sFZ;|< z5I_+@y7yFuRT7rwIv`CY4(Z-%PPiX?p_OEI2;^7=(3sZ86`ggmktw2VoKTzmSnbdo z=2wWH001{44YvUsUJK2O2FWd$X?b<>o-b8tG;^J5e?6XSDQb~TG}`hRDybh<_$00>0U*p35)o+zh=LSH45GBq0s|z}P?cU2 z5_$_I2_)Rtx%a#4`vX}kXPx)#XYc)#CblNuNiE(y?Y*iCLn~YDgk4|FEmAy*o_$)O z*5c@Tob{sSV>!{g5K((VKr!GP^9ziY#Q#EE?z5U1&%^Ndq9lwR-!cr2#dq%^g_-SI z8JY7^F690fPwhNlc8KpI3|*PcTb8Fgp)iO?$GX=s&6RDZFW!0+RlB!yLu|K%aA&h8 zU(^Q2?ycU5B<>0Pj~778nLC4H&RiM+tewyeY-k7B#YW~WN^jdbOAp9AiFfEPEm}F^ z7=56{EE|inhKS0PrpnvimO(bQq+$KahE)NjIdv;@E}zO>2*<3Lfy10kLdZ;uk2oDa z$QR7i+n;6Yccbq_uSm)F!-LxwwgzH*3L^KC^cOBG2o*6Lv#Y!)_1B}ir4CU-uXvv^ z?9!t*(na_f!HJzNoRYH^bzz4ZrTAtP3ymP$h@;nFp2CMLmSF&`)maShaZ|kT3-IgM zhF{D-v&dJS{P^^v>v_NVk9oK?TNB1u-6Qn;9D7SICMHOgYZ6IwMC!qU6B9B~lNPBB z$ESwjg!UtIK_WZr$H{-V+~}TA7J&sLn@&;Dx;n7gK13qRdQ~U265m)GPyI3W4hI_@ zBOln_yc=p4KK+YUS(k(!{{zlf{noHPHYTRf`-zeZLd$A3D0$WwxMB7PzcP7SC5GeW z6oz_Dl8EWsb_svyz2mWD?Uh6aC_~1YmO=UnPzQH-ThZizLSpz(`xc4urHdHYqIN2H z8?fSOT3Wyzv~6s)iZhnLNA+OeW@5Va(5ZoIBiUs3(i43O)t zqW+zHK^;m^#&jd|^g95JC{+W0(G?V$iaQfww(*GNhBf<%Cz4MS!WWU??@8x+zT`3> z-l_T=;}Ny!i_M;94WsrY3vym6%N?V%-8Eg8;cuI<=AM5sjBPyv@B+`$y|+Si|p7cI^ zcbS_BS^lZD_iU9|a$%J;3@7U4KDwuAbh6~$`%xEbi|<5M-uDFsZ(Upj6B|09@HrCc z+t3ue>g;&l1P=;N%ORtDwRi5Pr;-P7}LoTkNn(e)Ji|?2+HO(O` z`ZB=T`@hHeOW-wKsP|>={R7h@L4D6@9w*<DX2 zt4A6k+TatgTAOYOs4>=hJo%+ecz&Yt8wdfi*$ttO7h&NL#Wf)%($)50VI2{~>AQEf zt|upa9evzEwh7+SFiDJD$+h|v`J^NBSv&iesuxWbT0%O1XrJxr)**iZ2^}&|c)K*L z-Eanj$5no|E-fr8D_a16eg%~SQo+}WM?|E{gYM$MgM zy^KCjugN~Nt+Wib!AUJcjdSJ6%6cJk=FBgJA?NcC41dG3wcnlrbJgJckAj$n9E77S zH@AfeypHS&{e`jwyG1scnU3xUT!(_+mi`unw5Bjhm|A42eKKUzM<9tod&N2$h2xw4 zJ(8Ymvv)$J)hudf@>RjTY55YMeENvz4x(;;&OcPANN-7a^l`*542_GsI+7uK`cC2%89pV1WlT9_=VwdL-<%oU2zcG9jelu@(l$*9(S+ zr{#NPkC)|>eTSasgcMggF7WJnKH>;mXC2Mza^m9?d&-;Li0IG&gxSH2h)F+KANDq4 z=>!krW56A6r-Oi@r2SdOlefS<^z?R@9r!WejoE4A%dn9 z$u{c%QAUrWNH((GI#q-jtF$-o0oVOe3z#8@n^c-11O~h4e7#f>yn{o}9tIg;sw<{* zj^K^uDeBphhJTo;Rr)!Tn{`&e2(AEI^|N}t!j?Z*HFA+H(JxTtc#FvX zGP6~t5cu=uqvZbC?t63%Euq;kf0gIgQ7&7BF%wJqf3QXPAP37Pn@JIPYZa|Kgx`G( zps(&;>J9zHjhb}7ulH+zck75(@iqJP@kciAXY=AUcg~$A?8H^HU*4uhGVs9A&pOiJ zhjsnl8Y$QJJIheQDmKu)!GxhzS{gtJ&Ulggdk7!%gd}Z6BTPXsIShbgs-NH^HFk0$A0eDjDtcNuSOv&E6?! z14p*g;8Wut4<5Nu4Y%{(C=6h|YhOojdv*&IOmq;()(80N?AB^`DR$K_Kv?ucrJ*LO z0^g;*YiS9;ucazv|J-W%V&Q`SG=$~T7Vm7Fdj$3WKGy&!J%T6?fCW(yCAUT$KoWPO z8BRxR_HTBefRTxZXAtmY98;lb+J?UkntIxtkruf#T&X!??YY%V0-Pr&+5)M<)$J-O zLqgIwTs25yTYav7dL$Tm%m=KD-k;*LDar2H*6V7Pf5q}p4*-ayNeN6)N$ye_7}zxp zO_C<6k!$kqsY|7~=oJ)(fp20itW?3W9LtvMt=f-1xb#)&R8af+kF8a3`1$&^(Axe` z8ENx;qy{eevC7`5OAKY^8DVqg*~9=BsLgpznj0P9qai*YaL zQVMb|Z&}U?;gNo>$w22T5nF3(4I!@46QuGZDfwW? zJ3^l7aA&OfeW?Sv1xk~tOaw3iy8JNO|3_&H@82BP0V!Od8uxSQni(KEt#1eb9EX`; z3aD_ys{uuUp80xH&lRP757F(Ezd}AB@JE?Hr%8L#%S13*{G(xQcfAgE4Su`nUi}Ls zo`tdJdNUdhv5$c{&qhH?KZ7>)2n}!3Rx3&!xgnBE9t66R>$$X^-)AqlRI5Y$gX|Lt z?QuJ4oDCu}W2neGcjTe+aqoQ={MfZ*TY&xqNxmu4 zm;7(i3(l|tsh`_yQB<`Wna626_z|)^2h5`@?mwDJ2k_uTs1l$iKDK~}L?UYL)tjts zpDz7tPMa5!Ykf_M0UeNXPm{v&J!1B})MFk-T(lZ|(Oq|K@y86^Z7=j%J=Kg)jnmGA zJmvs|h4t)Ty$pdPtw$_cQVXbsW{W^89 zGH=kTCt?@w#nF!-eF6GHF!${o$#=Q!4{RCGaoi^AmJ)YfqDX=Ct}KpVW1$q-Gw zbo?j-An_3z=AF#GoymrZw7Ornr2rd~61xQKwxbJ|MzbzN%xUL}{P1VR%*ZWtSLxjk zKU>7x(-0#9pYnaXXmI#s!J?|7Nk6d!CbB+4%>nDUe5I@edG4GS?_|np@f8B=nU%|Y z8Wyy}kb&|xB zf>(VYgH(!JDxytZMRcs&8^^9n!*U?_S~Zids<)d8MKGRs_}tE?)fii8UDTic+7xms%mt{b2beYecaT!MwxR6yUkU>D21jD5 z`l>_mDuSIBwf~NGwo!0M-j&vt7XGaU!l@3pbhh|Pgg}(UCn?-k83ostF?D$T$@OI+ zVg1p!3;LtIz{YC)B*yUcg4*=LhA`3zpkcst;NC;yvF}>3_YWPF;bKfxERE+3?-Q^$8 z{a+`j9%0aLfCd0r%0u+SgRn5*X`+4>u8RNMnMJ)bV88pYmz1rbvgtMe4pn)6b%wS5 zH#s5zPkh7cV9J<^Ekjd&?)sAu;Fe1f+Pak&!{@VV2lB0B2I|K!AHk9#=T~eH4TWD{ zS&V!WUGWz(?(d8t;v!aN?D{jzMa&Rz$0De!4>X2?zN+PN5VH&bqPzL`6h?sDN3IpACNDTN91(m5}(bZJ_NdB{Ugvbk=2 z>TqW=vh`M{FUZbUsq^I1?vpN->24zFH{%a!M+w|KF01z7$LEHrP}V;I(%E~9{Kb-t z68}l!E^&8ccRal3i_Ttyb*Xvyp+{zDZ?-F60ds+?u4qfAS8vP)xoA0Anxyy0?E(ez zeyOC*3CUtHz6UKX|D@WtOSTXrp2usOJ#cWSV)p ze&T>txO(**CP4m!{lBa`vZFb5*&#AwIcPG*7{=O*^siRT?=hiHL{4s>52%x2o(P4K z6?5DvpAxbGLk|^n_g4Ipt;}0%m4&iLL#n7YLNY?C^vlU($;?N~FWs^KM)u?{P;xAa z=$};|80!Aqm#Bn8gYI)!A1+(Dx|P=^uZ2Igt67`V`uLfgd&_%t|BIj5^UE~92Zj{u z#Xq%5S3Vxpv%R9G_I{RaeMU^Akt`-k#|55O(j6sdUG;ZO2Z{~C_>O1TycHTzGy*%5 z_Nr{mRY)FP14rO>$n&#ScHNEtbX^PQ`+7;$UH{YETYg9kN2Ujj+}PIpnIU(AZ2q@#3$Z1m|4BnK5)RpEoBEzL3d^115hWnA-GHpm)Xq| z%NdA>;Op>r7OP|u=?OQ3pAuP7)eki`x77sC2WY#Tp!|In|7Y{a#)sFv){=t?8E9!Z zA+Dp(>vkU%QNA;`rJoUYxjvYzak=nLZsu8Yu=^|Co){4(jeCfV`6+xA_h5b^-(G07 z%0%8VOD25d{?krVa{m`88MCTH{Wq0KpeFmV;Oyu%;_RcE2y)7n1#h{(oXCD1ckp{7 z<{&>5!&(#QBOuK0CMZHv{ zaih-!A9x5Z3Pha>U07@Z!b>d#hfkK!Pxn~ZcJ)ZX0+uZU?P(~m*26%ApR5>Bk<;9R zDG(sDv8*f%2mR>i(WB^^m*H>cMtjc;kG+F1n-%!9NjI*dfCyM+TA;Af;CK%N?|uc) zJ$x$$*GQWaL>$N`QcQL1?V56#i|BJ|!Er77n=GG1V$j6QR(%F6-D~RSNnZHR0;r8> z+cMI_xb&8_Sr)xk9ocH< z&LyqcY@AwhydAlH3R7TL$$tIiUX`DPt8Kj=YCmu5gMn6&t9)g_Ov;Sr=(yCl1nkd* zU0Ly6-sYdZy9L$-^<+dABv(7#%Vuxek2-HXu#-~2wvuDq_kF6~h&#OhT??Me>xtd@ zXaNgvdb%6<^uah$k8fJW{oTP4J`eYzgWiQxTowbem92pnJ2ZGbjN1Kq@^n7zaNNk} z%~##OzA`6OhaA?eHa_C~vn3oqs{Hs%+k~t$-a}LFd>FJSThql_3J3)cXxE z51n{NzRR3h8?RXWtSyk=EmXqW__8-ZWN)@_;TrrO@5;lAVgg^N(F~KF$f8E>V677 z=t&U9*Md-!Sw6HpSX+Ch9OT`xkv4XWh*Tk%Pl;BRt`1>$+0ot_g{Ay3+C0TBzHDOn z0MkkcqdD>8I$51i`JsHwMyrFnXwjPYr;b2WB+l|T#oi>$TAku=dYic`1gpKBbe1mDIQb5n2StB9tYkvUZ-o1UPBoQAJfA~hSN>ury>qDQgve4I;6X#bAj2`ljn<+W)nPm z{DV_K{ZBh&1MnZtK)FhP_SR2!zvA~szrfXh}A#_C5<^3F`);^SdNw} zHQSXYoRhXdJ`FM}ov!NLm0`lf>#eUn#0R#o&t83TBR6w2n-{kDbL-^>-HIRZ+wYc( z%*BHuloE?)pHUiXOSRtyBqbF^a@eNt&J(NTXW2E5)e08jzst75i6yth_(1Ot_+9~) zqVw8UP;C+C63N&R=kCN;$S1=icf)_Xq6@xn_xL{$F?{6nfJ2t#bcT%7#n*KDQClf> zPnCMcRqBxHlf+Xl$T+o_h&)(c!~BL``EyQr4th0p$yX2Za4an3=SV3>2TnCo^`KY` z0#sKuj$#6R613t(Tb<-1pRFs|QT)qw`i#;t{& zrK`=PvNhzrhut`&4bJ9~D7u|jL(0D?LVWuQeDrB{g>;c-4}0A+!E(0Sp*&4{d7Wa5 zi?f8tWKWz~JU{f3&N(vIb}<6=9&~f)w7<*BBI~Y?p(ADZJh|1ov#ks$6?*Sh2|jcC zx} z&?&ubr>j~h6$8WJ!Ms}!b;~uy%K|`F>?Vc>&ZG*ZZo};ACYSh55MyBg?l0U zP~)op$QiaOA6lR9O3X3y7pm<(0p!I_F`3if5^NJAI$9cKEbUr>l9BUY$v`ydu+!c| z6Cmd7V3z4!M+ZM-OtSE^PV##bED}@{xix?o)RM7|)SkopEE>sNO*ZMF{yS3s!32s) z8Ix8`Cp}9*CVf_3?07^xjdAfHyNT!L_90jDt+*GgP`^`+%88H3I*t8B|hH_;Vz?Mpcy25hmc&uA4*Hom{kjbSrN zOQdQK>E6^k7K*+wRhSV(()McZE!&z1l`-|6s(>en?#X}9aF}G>bq(j_H&=aBl_BPZ zdj8A~8Nw|Ydac-tyBv2&)=12DO|1Xoo8-3f&WPPMNZD$q1b*zfJ(-4=;-G4LS;rRs z{?P0>bBTCV-Di78ygTwYKqj;kZLN7A?^6ct-cC^=XNDsm%Am3I5tDD9@A^N!lVdzOf z&?+{LwNk`9yjfWY&3fdF7{gbvZ{yRKCyz#4e-+A|jAC=23fIP@y9;_1@c;`&Pdg(? z!~uAm)ErfC@oTco_>FjncZe;^Tz47tND^8l6D&8Bq^wHU3uzbBy6KwgnOGaR=iOd2 zm{$+du9WApqmw2ME>f;5gAAc+41kKlkR~W1F(OhTni$yw{%iW2o}w<}^vJ8Mw9+t_ z2R8H@Gih4KzGiz5#9QhJ^*~2w*;1;g4!lHoTnc(PD9|A{n7MukG0URVs-0gHCn$<1 zR0CFu5qTeytJbuzn;_uXsB8x<}$;r3THOzTlpd2jUCK$8vA4)o)>+ z?v2v1oeyk6ms?&g?21iIhK)y>XyItFb^XvtbV*6lK25y{PaG0RMBNsH7Nqrtq3!Wk zYsLo$Z;t8$@#H&$?gKlN?+Y(dvyo#BHgRS z7cZHgI$h=#_cG>)QMn1;Y{xmz0WT7~8>n`cQ3c3uqs3bN?K((wT?id)H?}Xhols_j zg}C%li=TH44_-W}IL;P7rtLBBC({7Z@oRI+vs?c~CGniBBZQh=d*#Fd##J>rOxNYB z*j$UX+N~5nc1%Xj?5ifKRsI4|y5?dyk9B|I20UUM$7JRvsDps)v|_xff@2T5V_8TULD4_qCYW%3qPA!PcC6j4unEPpXAl!r^M3GCDWnMj!ko$kK{FC-C%9-7jGBDpLjwFl~_)!Qe(`_sXcxe8}QOo`X49(;HE z+W7T-8@qT3i(YKOsOyMO(mQF4LEYOmN{T3v2hS4F3f`W|J+AFqC^fuV1*3SPA`y>) zyb99R!3j17{?ds6yN(*aQfR=@eeT|FkvFg{oPY~7;w+A>$48Bo*2!|0?MMSjV~*J} zRc~GpwF91Vo*PsZ$vs6@Wfos39sE4X_O;@lT%)l#U+zIHmT)-Y(}>|9&LIhDFN z;Zl)odST_qSox`JnRg+`kZsyfzghS0VSBwTKkd7xtV0ANHb)u#?Q}9NwxK@1R*+zV zh0F`^g|TPuEsh$7qx2bNW3vkU>zxT4f*$^RaAlt>m!+WaNyqtTU}*1E4ZT@laL z4j=u>nEGp1sgHcH+fXha&TSRxF7yg$di1zyUrFUw+(e;+w8v%Gs0ZCLvFxAm+-Qw< zYv6QF1_lr0%0+OH11hD-7F$-N9^Vvd&!PF`DRrIPh#h?DLimvW8295*>Vvzw<6-%n zHR-ww;VZPuwMJLP43$`fq1R|>N2%Quono02Bj#SOGoBe9YUCa9R$^Wl({&6I=) zOOi>BFDYuNJ!ebKJM-4TH05n29+9;)6P@9h#+xs&>u2?H3fpiOcaVKxm(^z06+Zod z)nops7|np-HyJ^WI1u~e??~KI-Ffa~#+%jM!|Srs{>@X051z2Y z{%Hu)Xbj;HusC!0-bl(8+f_^5@~Gdl6jsY?urcr2rN>?v7~#wBR~=YnVtBvz&J=u` z-nSNem>Tw*EK2wxes`GjP~)qx#vP#TX->FXR34%+9n)rZsz%-QOYWYLT~{(MMb438 zQg4>5cI%sOSu1qOblfe0+*bsq^DKLi;tHdTSD))Oy*)iQMp@dxRD!ynvcht=dNAaw z;>WDJx5m?03&jnqJLtV9>&Xo$L#~ByT|NaKMIkmnblXc>A%YsdCadx%R<1@bbv~86 zf+>d;GEu(!oRO#)|SA-+y;Y^L3RA<(f} zKb+fAFtE06H=j`Ao4{>rM-v;L`vmw?K%)9B^mew?4uyJtW1-QQgu?rZ!F4n z1>XjiWCO)@Gcif$8_#m*%!xER6!f8?~e)DQmNeAf%ZXHWW4%lrS)G`^!=SZtsZS1eNp%N(Rms< zJDO#f%j`2*)_Eb(Goj56@<(p`&L_inhc);!m!CPhs)oGCHcsBo)BNAnV zz0psesBB2(&Da&a!|YW_;907SomRPw!YTbAcO7W?2lgM$ljJ>Qbg2>waqjt!eeABx z$@b{FUEFS#TW+3AX;wgK0>q!}3&P9ksmGaPAb{|WRj)_Tn1FBNw;F+*sPqqT(;+c^ z`vY`TJmRtT&wF6vI^A_he}8@S7>u|^JJ!9WT+VdL(MYhzBdJ0bTTrVJ3;rv~;4|~Q zE1i*1(+1Cn5GtE(6+eWP#)Joj_&Rs`2jjn_3s(pG3bX{5WyLEmTB@-BO>;V{IvSTo z9uR9O1eSE}OA-R`mGkzWjB3AWXAseSVmamsYOhVhwlvZsCS;3d-&SiwGB#XOpIz=Y z5`{balMF>2^+^eOU`#7Hd1WU@sK4d{XKD_t9JY@me9yv2Cp-NKL77w?pSGWelo}ZV z-u;1Lv^Fs@K2&7*rCeLVS$|(=T3g^`IU^3tgW}Mn7S#^Is&6RF3Ls8r-i9;N)AoE1 zkU1$^wLMdB8iJPZPlU$ok%+rh?}d;InYhZJwK?_O!=U2ZqI0h+E}9rt28;Bitn^X* z&s9R42Bv4S1=K+f=HQ6c69U|p^&J51j}0(%00$TI@N*NxVUMRr%QYi;wBQGNOkod) zAxVxmylllRklQH%<88Z=#I#PZX4X`r;-GNrCU{0p`&kVcvJih_)w+aqK1G`r#~OT~ z@%6kq@F0}Lb>34TywR8zRDcUXw1-DWWh>{!=Lk+!(i#lpZI5{p#dEmg;`0k|7Gcz$ z${DGEg8ea{L>Kc#UgR$f-GAsf8b+Jw`n&8g2C`L$>>(73i{T15tOIA)f40XC+83*D%)c>@;M9)#Bh$vC+~pD2>5&iMKW~* z@V`H^_G1hicxp;5#f#7quJ<$TM?Wmt8WL8r{Z)Z3n1<`Gv(xz@S`aM_fP`IOvtfg7g^44a()M!<%8i2Y zP+=#nT(Z;cx29?!t8eXdFajPSWqhD$5(z0On<*-V5I|*}Mk5x7mTdyhI}le2a`$#z&dB?OzQXY*scWJtbysrh&LAYT&$4Gs`7Xvh)72NCFZgwO z6w)N1L*AeQeUmWz=C;wfJp2S}c;1pMR3GdO<*wK%3|J7M1^(_2yfzLLgb-LBt9Scp zkn>hKWh9^4azK|AkT5|;)N`b6PaHBu_W2TW7A&DWyR5;RHE)1??ehArX^kv zeS-l@)@umHEqmO?tpTv$1KP9(&n)okT*nod84SLu`0_&7zS7f;X~Lr%39OsT5R2IC z?W5=Ip3Uq;?ccbcY%?oY0~i zIE5dg$^1dr_&Gv(s>V2uIW_k^XU{1Ki4VXm?2q)0ZndAN&F0N}Pxw!ln^l*cJ`3lt zx-t%I4SjCAq;%K6{QFy6q)KP}s1d8~@%MA7a+}Sdu8bX~bbF`l7n%g&u44tGZKF>9 ze;*h3>X^a+Jk<4;)^ZksHw@sP{;<9&Z+$eHX%v~!#VL;bG#`sJW4w%1;-wIT4EI;o z+cb~suMJP%8ouydqExzksAFT1Q%rXMq-y_m!$_#?sq5sT?9QY>pU8q~&e%Y64z~ZQ zRb+}6I7Ak}(r>ye|LIf{7+QW<%Wa02F_QuhI-)IbAa517Qd!r3I=H?6I(jgZ0=y3G zhur{?zp|KvqgI1umv4u>WAI@RMf9qPXJdgFhmchAX$0dg|1q&9Jp= z9EMRO9vwMCD9S6La8o)_CsLT^tF$h;5Ms=Pdw!`-X6JlY&(d1Z9TltIzuXzwxG!_HH{uIlZ4?Oy#Qdr$*Z%$5vn*p8*SPDECZR)u?1Q_n@ z*wit;g&5L?;|ugjo~fo{eCtVC0y^D7{7#shnID&b3M*m%t0eThgYkpHU6F$0+TDS) zm#;!0%r3^8C0B8DuNtWHvWkY~@%5Z$_fXN8!D05Y!)T~_&N!}SN#dABKp z*SG%&ND6nXGnOqouP*EW#zWC5n5CvN-#Sp6_I`e%3RxR`ct4mKA4QzE$9d&)>}!JO znNR(SVJDa6!?POdnEvjF4RD0>QaqURMS?hdI|Y1WtMcE8L-5@tM(LXU&6xF>!u8n1 zIAzGb2g}f*!Ku6PTgR`DtwhBnr;GiLUrVQeiK$e~2ty}}-1TtPfh8w>^JU0663;vz z&Nj^kqljgFfp_3!8t=jcRo7S=;GLPNR#sBZgh_vn*j*KH@Ve;8+KGIJ^(hrlbmf0D zmR;I#BIzO>LN?ZH$PT_&I@}qxSGg&X$M!(sv2c@Bg?V%-ipW# zP_RU#-xr(=Z01}hvX=`p4*I~v{hJzU5l`v*s{3W+Jb1>~zU_+$u_$t*gp5A#b#$P? zOJ#4*myuF9Ole4WW8RZr)0jcOq31t@yPO-%#1f?xzKk{wj|(?Jji=^gl~n)jzDn}# zlNdRT6!~{SRYyJ#FqW6-vMbL@&~^+3Nl@oMBMeDy7-|~eKdSa)Zv-h!UM%$jK}vnj ze}i>QxAoquahEuN1#gTc0N?NP9*1~qRfAGm+) zT0&yK?F%(sPfd((yY3$m-vn$PhI0{q|Ypj9jkzeW2Nm z`0sI>y821uVXLH%z)1@=l!u#JUPPb5=v-6v#b;DWyKjo*n8>BF4eWDg6ro{ag z>4mI#&w-brpE5C^-NO#}d+XnKwwbWk0#ApZ_Br;q6JZnlMI^olMr^v^T58;Bt~vb=Aw|!ap+WyCX$|2>>r7t%p!9M=NVqmpjY(yn{Tn(23N0;TCeeb$MqGGgYnrMxR^f4fUG5>P*qDfMLk1m8cTYKH>-2~9nOnf zYsgYPK&E=;Uh{+cUkRY_&aVv z5cYV8$0BqVsC8&Uw*tJ9y52*k=`=tymimP3yn6gGI3yfS`EYXV40{+L>lu1={$58` z5BPnfEVD@lBcb(f^ef<@>W9>JlyMd}ZH^VK^6d_)@h2xZM3fj5 z5Gw<9wu|?sg3$7AlrsjoL43zCk@95}6U1hQ7Iet9+&v+fjQ6HFRQdGD%#9nD>^f?s zOdjN>A@tzw!gWz0Bv4?dM93_gjFOfO0M zENMd%_R#>kn>!j`qa+`FrwWpjFxt4-oXd3k0ET)oj>nAlBzLjx;X}x()`YOP`nlPP zIHXco`5f@-=BZ}u6(^mU_a>~f%VU(=|0v(XWwJNnqF^ls9!&t{M`F9JUIh>$;)qEg z_9||i{R*ES!9Z+Y^d2^tY6!f#MWI+E}0SxgVKYYCcp1xA2x^-+q{}NEH3E$aI3Y z5STo%9&dsH?|%Xc^i>hBkyyVcPS^Z zB2s4HV5mPA<*3{CB*MuF(AaM>uw4(K*wf^c&btF9gF+6;WkCNikvW>zfFDWQpVgHg z2&~^(rmyOy3&7A$1{_A{+D(NRQvbWcsDikPHlYD{ChRjIl zZ}(z~jPyJ7mppW{ht5Jd&5V%M=Mz_>K>lG_8fM_1e{ETkgb+g~Y9M#)K&3gjGRsv> z--dC*)$s65{{;#?;ZUhN4|&bg6dUa?XW-6j7V{>okPtyUUcQ2BIQW_p%~Tz3cpee* z+j}t_-?hRF8NNn4R)WY?t}Ne3jQ1z@qxa6A?f)zHy954~Vzy!rG<}*9Hpxg(M-HO9JUtvY2tms>HP4p%f~t*DiM~E&oE_7pTB#?H z?tp~j{(X4{(jSc+Y#WyD1o?V2X(pUE(UjpEgait9S+{GPzBlSnH1Auoq=B-eASF#? z!uL4loP&r*br*S^V$#{ow;Cl#Lt1P5L;!wE6&^dNV^vjS>g?gPhCFJj+-`ipnzG*- z7}{rVT>qyDMeTiEv6*yY#D!WWIs%ioa^tA8s&}#X~ZL z1_rEZvjbW$bO7?AArEfSu4lLbI_MSax~@_9R+0{C@>Bf$dWX`qV*Z#^8H-PLvtEj? zu<~8B%Ugc0M1U^!OfdZ~!EvRu!e&8&vp3aLZL}I4Z+TXVpjagxc|2FU{H~~=XXJ}wxaHXF3%M5gJ+!Arf27MLoXaK zqctSBlnR=h#Lz!#z#>?3su&rl7pBrYw|~J-X93P@G-M_nT#h7$xrJ$RXRD?%MFSxP zeSKMx8yOOLC*PH^x>iotmo*wasZU_NPw220a1Q+|Hh)H3Eu)qM6oi+x?l(mBJ6OeX zRae8Dl$>>zZeh!|<-o%WDAuCbtoXsnYmt!w@8P<^PnpN3P5LWxR10)XU}-;#sGb8Q z`-fbo>$OUVvpnxa{k_jP{mN44$!*iHKpdF2)pn85u#WN-eo6FI5^ZiwU=fH-~6m&vMY16~z)|aFns1Z zFiy_(XP%MDdT=%soh&}))XAXEjrsIeCk9SB(O!?-?9Y5IbvJBV2n`$BM*M?0K=1G6 z4y!MX`oMx`_)UtgZDh}(mUXf_Ot;c7Z5z<^Bpc7}u*#9k2mn30y8|FE%%P}l6E)v9 zI_k{po)VfG`zsVug&6R9eQF)$?DQx1E|YS=OtpJ*YPYNx^Af)M*Qf74=Td&8*&bLv z*llPm6gD2w?D$aC&Uw{mL0Q79EPmDp!X*&WgHzh0GZnz(qfQY_Zclsd|GR~jx6ft{ z#fS5ZQMh%JDa{}F(c+_2%)xo{FC7V)(Fj(9vR3$FS^RTE_>+Afw9T=w*I-B4sdrMr zE)nN!w>m%QnkOUF13XT1+bkKer=-n2T5Qc6vt3GVbvNF9^5}_H#oO=2WMG3g2dwR8 z=`RQFKN(2T(vsuEaXvlY88;T@eoafxpP8rk=KRO=wcj*+zY4j>Yrl`_w^B4V(kzATH z`KMKOrk(r@$(91DILG*sw9%#};ZqK@1w|#Iq#&=!nVzcC=z)M$g2iCF!zUx~a-W41 zNZlb6&b~UPyAXK5F|^v>#d|JPUw)|zgO2ZaA9()4j^AHJ9t#E^qJ>b!`tcUWO4Nh;J-0<7V9*{Q%&;7ySd;elwdwtrz z-uKrMI{3e~CwHiT@+|F1lt?0$s)(*x_cTMST#&}98A36iC_(Rhw7S11LreydQcQ}TN+gYa-*GH!z0u}-`c~f) z5ZO?gojal0(wlH;s@B_TH;Ddw`S*pwPfG(Bav@H!Nad{5pJMBN&R9Y}x$YSpafSYI zC3}zkb~Bv;AtgbEG_!qCSs3eq>C(xOzlh8sou@;j$@;TYyk>A+a0V-5ck+!4oPe$g zTC=`Wc`9#Q;DS_LPQ_aNAJDa9uhW-OtOTDXF8~TZ&;3NQ$0xt8`40}}4sV5K^m^Pf zFc9ZWd7(?4fM*SQrQ%hH5^tu@1hDpuo=F%G8o(4{{2Jt>-5aPMDqFi7uhtH&veI_F z2zcnC{So5J$mD`NL^9%urEwA3s?~A!7QBttB7a*;)COSXzHy1d<^gXh0LDA`u#ON_ zS>=v-f`e$H@~(#Cs<^*1*Dx8U#rPYXw4>#UY8&a~wm^l69qruBe2JMIJzTGQV zw5pUZGv~&zkNc&cPbJ3UW?-fZ<96N&js#395WiBuIcJpbM@FuP0)sIslyN07R zye-`I%PS9WLrgcUcP8F81czB${Yl~7jC8ai9kP;i4j(YhhP>XBGg-SFbhf6rL`Dse zA^K*IXXUBYt@?&}Sz%zw&BoS17Q-fxKRGIg8$BcBTJpymgGk;iX7$W#bAf|zXoC>H z&58;5v1(u1j0ysAT0tO^S-D+Wf6%w#dO$TW!OfzCdxJOK9$T!WVwxx-FT^0uwK_z< z<#A^qO)dN2+Vfuv=Mk5vR=fWXx?$RhI%iypWQ%0flH>PBIyP)NoD#Fp^H2$H&pnma zB?%&~8!0xMzb0$*Dg*6tbY|J>^mgY8XWM`t!`;b=?H@k7b1q>@CM-lrI%__Be@X=6 zcJ2=-`^^_mdZL<%Ck#CzT{OjJA^7wH(U$*?D=gxz$xj8+$_UBZm(TG?=sK#`=)hm# zpq@oV-pItkVuRMlQV_wdCa7l$T3PHJdZw{HPb|)HanjDIj{N%Ru+!R`qM#L^e^ZZu zVVM_OyF4v1>c~DSG~Wa^`ntV9?d=>ok!_tk)am}pOfuX4yIOb{OL`$t2mV^LNO^)i zm|@g*4gENhJ%RNeX?PsuiPn6zv+oeGZL`J5u8bSMIsfRB9qYMgy;}FP`j1s^gQ1vvmGI+I5#d3Z-qOzA2;H95sM77+T&FAEfpm`&ga3fGu_-51$AYnaJMC zbX4M&e@LBb%OB{n>x!g2O~^!;ZgZQhKSsjYNMJ(io^!YL2&HjH!~jWTt#+4siyA!c zd0EkD-9vD*CMm3Wit$%NzeWda$GnT!MPTE;{6aoy{9aN2A)jC9N3bhO>fZR6v*&2* zAK(OqeJ8TR~jL z19nO6JOQJ_G{y|wmMjmgFIO{%?lu`e546WXYptDvN-BRFH6;(wZTx^}UG1RF6Wj9) z?J&3Dd0O_>e;gd)!LLQvh=TWo;!m*KKZq>w+5-!{AqUFSD+ZC-5HaZu%}XkG1S96@ z+t$1#3z@y0=X>UxN1*%b-!h9Du2+!(rzI1=Y=F(}eEK;2u#t1EQ3HIiWdyE?wOby{ z6fCrh|36H9dpy(oA3rHNM^WjZ+=@yH%O!W4a;w}@oscmZA-8PqY)dMHEg|GqBqWo_ zbxgU;{m$I)_q*BH#m-#3Ku7I6?40DMz66j%QWe=PN?L-v z0LMD6iA1WFm^c6eB~vgbY$v8n3Oy%0*$erAio?efZUWb-&9fkiG8oHO&+0=0JrT^e z7>%NnOl+|^bA18MDVXNxXml0TmMXB=Dpr1+h0LrBWII1P$YaDXbiO5Cc_~=$ONue0 z+2?p^eTdl<;H60O`!;K^7G4%=iZ5?$!HqA7%qBX`%q@z+6FuhCnkb*R#MK6i7!lba z;^dHiRtooC;Nn0>E;m|dT-O&<$v8trOJ zH%=8lQcGy8Z6qG`F77)1R~M+_9!b#NqhWag#J}G6`U-I04gc)5a+-s6pLEnoJJlU; z3zdA+(ecsqJQlK4j3lb0w0*3l_aI_OShYFyxV4Akvd3i_(Pb}8)ZcPmg++(NBjIV; zLP@wPXPUAZY+3z3dbb$%mNV`B3y-bS5o z-0q=z@7hn!dF+a?Ee%FYHmUKm*7WRA6P?Oee9QDJ;ib@|XkhiA3a6Ilg!oC~OElug zglU&mc+)dTaq+ldXs%?EUyOyApDZFG?u#(OM74Fa_|H3L4+8sE zo&PGgYxSPX&%c%Hcpn2c5A_{9wUuBpU2XrI5AU{Hv>@y(zzeVsN?S@AMbvbZHzaAy z{Orh?%iOQ}>w*Bg?43N{$Qh6nsmijy=s2u$d!E|bAuC>$7dSQaEO@Ez^|BfM$kF&` zsJ6KBO08L{C9hl1#6V+)6(ezM+9e}JNFx1ayZcAG3uk{+U50^2j)}1(WkHD$`ZmsYamc9GfJvMzh14v(i0bXP z5+}Q%4ZCY))M>qRD2uRP82}#dBCR=o@7h$L9sF>Xs)6@5!RDeX- zHQCIU<;jqgM#OQ)%^|34yr6sX!K(f-RswQ-bskm6BnNo!zz(rdi@m-UOxLPl`YPZG z3M_8e<(or@aXv|{T26P5+~2!|#aG0tSHxzGXf)iKYTVFdHZ&-9pUhk3wlrR0u;l1Ah56ps zgSjeegmHSbAr{0+H=*L7b8$OQ#Oarf$7kO+{RSxCsA8q2j2(JYax+3YP3+cO&H;tE zpE-qrcA?2}NdNk)zYXmH?3t`d)ZtA-HFxb zUd@jsE)?WM)khz5BO~NYZyI4!HUzsCy2_Aa=!s$Vu`OHRX@POY-#^DXd0c1E2Z&FwKzW)*fHB& z^6vd~z~PaL8-COBzZ{Ib(=3d=6Y`r^}p25SoS@J)GZee7R@mo2GR+>C2_Q z@oL!Gipe%&b7F${Q<>zj)-Jcg{B^&s`;I@Wbb2vJ#oPwsJA2+;czM+}){O_y_T zBN?GiNF8KPrZjYsf<54_xGL}n@D_JomHtt+dhg|;wKQVwH0ShfNj@?1>usiHrWCrP zWVurpl#dTQC<)i@tLY*JGdJ0C8|%V*LBA}#O6MaxupI|2DYmEhBFy_N?C>w2l`VnF z(|QLU~MGutQwAH+t z%O;Y|_fJ2EhU#%y0b@hfe*hjefy|QuI^&>nA~p48GcA5Rc}j>RAe}VRUW1`YXa^?@EIYh$- zn4q@GF4zBT?8V$|pZ!?gAqz-K(qWQaN}5Fi3m9Imfc;L9KAb9`=`;yh zpfjnfI2hTkFX;T_mlACDabR7=alJ2#*|L}F_VUU;Zf+MMCbHgUvl|LU`rvy8FJ-nc zgu-WsdKfnC*SF}JO_|f3+%Z1{xtk)&K68{AJj=21ndSj8I-(Xit&7QFanqmTFpP{s z_1fi3$X?W?)2|4+!uys@SV?{~$@;+9mVM$m%-&P*kYgNVC;B6!XENr`%-f=Jt@@@7 zWx4;a{$t-Vj#)RSub-)G5p_C9p$nYy&POrR1YS3>zNAwkCR{I+)Hj*f*vm$WM%sAWJ#XnAl-6?5Sqc_ zKreA}f0(NB`Z7jQ6sLU)ib6OEXy!_iKf9A@fA=CMP1MD2Lv~)1y5{@e4-9Ps*vY(i z&H30|zmmV1)??)@Vdd3t@zT2DW`Y9aDeRqwy`0(mt9NqmSC+Kbc_zg|sY2dot4q&# zotKJpgsik~RdzT^NjblT>8(`8NQPvaWBvxvQVY-PJSHEwg?)hEKYxq=@?N&?{A|d% zoaE?=i}Y}bLHza8+qG7c6)PgCDB);X5whpGA{o)4q~P^FarTmpqGN!=?u+yPL=mdtwu7p|+rx zz0F@`n0_Svh&{IW=mTE3%dx6GE-htoGyC>Re4iY|^W@KRpPt%N^T|n}>>-aH5M}6R z6vAGX{!ZTNW>JCr@1Ks_Ai>|dV9Ez78;CQ@&Gpxuf3x#83`0q`#ZM9*yO#d-@0B$L zs-e`OhMU9&8)~?`a&Ur4RkS6h_{@ms$bbBUN5IhJDZKuSruV;NxGKXVY{7cs{`mAs z49Te0tSql}Jpf7%Ju6}VL3+g<^v%pd(nh=H_LGuT-jU-aX*qnPPh9M5|-V&ESpOQXyUeOzJO_ z>P83osf0?w1U|z}!RTA>W>^z!w7)(mZwL z>p{OhMPv6iMwM&MV^bfim3l>*=m@*ndbWQI+>SC`o%5 zkc@0o!bR!s#YHcDcp2S@SiAJ7t#wBIq49zuYNE`$jSnsiG7UzaYPcjCj2@M zuB$z`&ts=4O_nFm-#O|6A7k{kTcT?~+;pX@zxTFl(Q8!8OWVug1Ygt;jggp`(di10Gip-<_?5pLUjzIk9)nan}*kd2J zzZDQXlWN5b_>h zIW>=LfNdPeiGYT}%#f>AJoZZw>zB?4!HFa_qz# zRHAq-n6*16_$54j0t3^O!Vlj}pZyRAyr8rU1$DJ;g_SPe{J74!^Lp|Jv-vh_Noyln z7=WHFtn){r_#(GL^5c__Y250gJu6>i5SCBcZ|KdW8)GAG#+ zO$V|Z8IcXHeY4dC0h{(!0UYAin6*}*V+Yl!vh>V*8PbByoOpJOdAv}^{jQOa0pZHa zNlmVx;X7kc(z%Iq;GCgOXCHsFmd;}-brpRoQW_qmYH_@UCt1?Wl{3?7^~~P`LFF*pz55PN<&SuVVo zZsoP)CYhpE@@aMXk3_gfx$frw&Mi!3>d8o~!SXX78N380NVCUU8r@2#ibaoCc%nyc zJc>z2uF&U!-XmtuTK7qlh%WAvg_scrg)rCclz=fVw}k<2W5!>C%!LhO3_DYOifuHO z`JNK17?)`q7q5IVHxEB&oGgG%h|V`quf)+`CZRQmJb+ zxOq=?@?W3541GJ|0EHs8TU)iiIZXMjuyS$ux1g=9i-ZHx%y9U6mcq*1!3$L`WV5V{9&ELT8Ag8 z>MPKZp9Ow=Cksb2T)P-~wo7~ZU3yZqH`jThGq{Dl|NB1k1HKPKIl}4_%^nvh4`&>8 zoZ(9LHnuVOW)ROFtIXzQ5TA1SyCQI>oo-Vke0m_xEhw}yvbj`)4|kEgv&1l{?C1(I zsGhA86-kk9u|F$>5}jNqkh(?O&suy2d$*gP+tgbe)fX*vNguuB<-hZna==;t5A3al zGItHyAs3{Ffs-G61>~rXt@RN{_eeU!pJNm2af(uKqca#(+|MBKilNfBPot$RQA61} zNs_Y~iinuRa@8nvUkP!m;U`t8yEZ8AZut;Oq6n!M22~|*lnR@{5Yudu)Wjr z1WDc8+fh@tO3Zp^uxS~D0GDc*>mpk178fo`@d@T;in0I?ypzb`?JUv&XoVRmZlRs` z%?{w$d+x|@cgi#w45~LNGPI0Yb%e#$UJd5<39d6ldM9ypH@9d!RqdN5t531PCdxBQ zGZ8}$-OhBMxM^w^qtlogYCy4w5K8QEI~fO8#~=Xfg4mOlSCUlTF5W9jQ_sCF@tglsqVKtd-Tzmj$=qt)LGbVsjLVC)p3LEx>5A}DmDuqG7{Hd9 zzpvlvz`hxx+?heVAqroY!AR*&Famln)w72nEI!4y;E_aZn0CAix4F3}0npHMHR#b5MiORjPT#`rLk76mjXBOC+}%lkL?2Svl1^%a+G-T}B+QO@ z#HYYY6MZX27CQAZjExN>ZR{EZfecqo7P7kb+er`nKPR;jYj_n+s%(UP3iukE+#6RK zra$Qa`V2iKWUz~7$0bY$ANvTtH~6G@^0n|Dt2<>i+rIdTgXMp)($lKdU!CR0z85bf zp(l998y05~HK(=rqL`r)>P=8H%16ept_=pMcx0|$;d}oLe)+kOUHNem2eLc&T2<38 zIP5p0GT%=nIwQb?`7}D1JVbEi(Og8EO`^f!BMVxCAAN*-ahe$&Iud=}I%T~~WK16J z2vKLTkl^gA!=k%qK${=P2d}wci%c+E)PMSpoLx=%-FE1BscmxDvu}OxGFPoa8eC_c z26TOV8IdDbGi-S&p<)V)JF9Q^mj$c9Tb8d~(jzH&5%OK={fj9->A$x&sO)%*ZcX>_ zis}`CqfjaGy3WHNA2xyYeC$Zh z`_pWj@eZki9@sVy@n2s|6ef#DGY+PI%I)d%e;adIU25^&!6s3*qQ3wu#T{Rz`y>5E z0x8Gkj}Hqwd&Wio@FyAdcM*(i6J0pBUuvFev8XL8HI!#0Xbctz@+5Eu-7{~clJOZh zc6`ZX;M#S!r>?$C?&q&kj-*yymWuNe3u$R8hEDcaovBt}wnUBeU(K-Ny%QvRue}JI zWqeOWg5;NUAKQHPw~X%m7-$PyR~G zx{d+Ht4IrZwwPZPga3Y-+5-R&S5m2y{_kT5v{z5gIn~{iyKC2T=&y^dEMHd48QNtc zElZ?#>y+nT|53ku9lnKNJxtxa92!sM7D_ewGzY=u&Dz)h-E^*_!NCZ-+T%2wyJ8Yb zN}ERXk{PS_(GwTo)lUG`kv@SCa86t zC(j#_@~w3CjwK*I!1z!G*snP283G%BCKTutacS;h=6vhSXd){|pkgGmr6dxS{?{+|;IDFcl%T!qb}t!!2{( zU_1dL#ZSK8EO4GUsTe$4&8hDQh~v~0?D@fq-Y3C3h_wfW-Y`wOI@_2qVHhGP>{6GO zA$C<8G56IeqKiyVS!u}gL@Q6x+Oiwnv(omz8vCM7fb22OJ$|n;+D;$f^-tne2w+xH z)TYT~+BZRN%Ibgxr#b*z^SZ6aH+uh6t082Lu)}`^u_C<7`hMmSfY&fA~UTLcj^1DkSs8Tn;zOOPd5;{pR>|D*fw=YMG^y#75e!VQn9OTzjwK{o7UidNMWBT>848ToDKew{%7h!QXPo_^Ca0OVs z>HIOlrAUO-?!0&&w9-b4h+h4DUFIpzwDjce2?tjvRg^0wq&J?{#Z5SjoUtpiN4B_w z#OFu7D&^#;>nl?q0nN;kmG{*Hu{|$9(!=iwV+0$A<5Vt8ZW6$z=uGQkL~+sKhIHreUWc%^kF$6-j?e`R7%)Mc?OBE zJA#euu8WE!PwU z^Ctb<7r4i%w;(z`RPrtsj=qLZJo14+K9%vs3n4D#*%OhL-S%nGOpyd+k!}YZ1MIY* z)ObEOpb2P!jedk@!D3v*HT@2Dggq<2c}oJxh4InK(B&!vuq4lO0*lGP8~q?JsRN{uHs>aIQ1bp$KoV!b;n*>d!sEn(C>yX^;$fatywc}ZkW zD~8&i;VWI3`g1{n0NwO-Jul3frpn4fZOO-Ul=BL&rUl30pb4=;l`3&2v(pIhisi1g zW`zCBR#y<*z_ul~p|Q9X$#CoH+4hmN#Ijo%qV%Df+NK*x(Lg3M86*w%QIK2AJgk>% z5#wRX$qzdEEU#~09q)tx7p%*(S^1dtkGpXM{FnE6Py}9nrSJ8D@^9fD*jBaL zSN#89(0%M5izk+fD~GX!A4?jjo$ZnNVVyaJrYpma9;m2nancfCi<%7dg=zawMx zZwfdZ*lI_kr>mmUthU2y!bh6$LrL05?8lLRJBg1+Kb3l}zl^YX;G~G@rL1%2GB=q2 z?o}mRTbyZejZQ;&!R=LjP7s%(J!JhQCj+-dnf1#+{|uWWbohxMm~2n!*vq|!re%`U z>`Ud0ZK=3jwc#w-{zmcaa(a^dc)$Y<4x>S6dK~j6&-(d!TVFY(#2n$0PT(gZNR`T6=OY*bc$(%D-X20^k=}q?o3OPA zrooy^UzastmsUkss^{AB40*pX%MpY?-e>5ReF?dfp_13$6n}~Dw_(i%ZKDR#7h-V3 zl1Px#&W9c3@`BEu`|P%MD!ft2a<}55V)=CZe&s{zdIZDT@2!Ta^R?C?U11%wjfkQ^ zLaJ*u|l{5M( zD_IA_4sx&4mKI{@h{|vHnwQUlaI@n2KG(H$;wA#8AGe$I0x28$)pCBw)}~&axwK%c z`IyfV;MRovROu#0?wU}0f`@nJjx#!3+I8NOBJ;k1g69%siqb}{li2H!va4zmw*%Jg z?Kr!ePCFYM%;@C)D5tlYGsYJb2O?=@hZH?;jUx+wHtZK>;P0bscF$~SHAMl-9b(f; zPiNJq`BhoGoO5)j@BAsSdZ{dHg1+~~yj(H1 zBQUxD_?k)_G_&|Y{u76=|2p1hFWl+>dCbLySszt``#JxisI6pYicZ?Zg3H$feOlP~ zU_y{Sy;fGOeI&H%wqIYq;_tqhOAk{+OAQs7E#WSG?e5~XGg+vgZ9aBE_-EgAAC-1p zH0DTEQ=&HL160JON_DSE{A$&!(~I-Ld^Wj3+eP+2D)ABp_BXK?aUS8>QJO{eK4@i! zj2gjC)vvR&8X64fpaqy&>1E*2>`%%wrgC$oDboY1bWlrk+BzPM?~fhKNx+M|OojKi zZ|J3d^KKw4ZMwiO^$?w(Bm%TV`myhK|2IC?9joAm)#>+lN2hVCVM`-hDPD?5CtbSU zRA==2jm@u80NtoY$DU1xh_zPS_7l=NieUT52YZYFRF2x2cIMMILnyLG7OzRqTU6eq z&tpbxvdQ+(E{|8tIzu0trT+0#45k2$dVFL2E$+q-5BBWe@^pQU*Ej(D8}5ffQqlh` zs`GsF`H;!J3yIIJ;H4=MCRXcutJ*N9_; zS-(|S@e{N7sgww==3;u6=Zf(5%E_NJeV0$TV8HIlu#GFa>_1Z5hp>MW!)~biA{q1k zzLmi1QaVI7%8DZyUFucPhCTX0;IvG{mi(PkvF&^RN^Yl9;x9G3+SO;TK~1{#j~8EQ zufD$Y-pTW1+~Nv2`P4S1Yu+LNSN_2sT!nGbQY}UYOH?<>TtQAW3)|vR>yFTpR?P*? z2K%Z@^k1V1GVhxV6|tUT5f{muJtCuT_( zI29|QJ!r=dB(*EqC(v4o;A#B8cTwlZsy=w76=;?sp^tDq#@cMy(pW+*c>9W=rBYkn z5ddsNPmR#3#YVDVr62$JqrqM@3sb_+m2?YM0w-{>g^R!Zzmqu9`dsY!k-ss6kJFO^ z%fdSS4u&NI@ID?dTv-cNKU$)i^Z>q5^bhn&2|=dbRIIk3+9Y>fbECI$Q$%0xu6G)` zyydtPL^Ze4A`Mmg%UEI<=yA$FRW?Y@t6>=PQ>#$nQ<`0Y_*P&l_tpIxo#d(W!E2=0 zS1?al8WwM+yUS-`uf^(=TgCZFXr~<^in89CjEnX(X?`?byOL`^;z8*tZ*@uHMz&Nf z1Y?2J_{B^N7)8yNGQ)5-IV@@;2(46TSM5K@LVhu(i26VQPrZY;>y?UvO@2A@2r!VC zDwPo!qNVdw6QJ>)=fTXr|CywIg&4)RKGxl%PA>k{F(8)YRbK=ghGCc9=1yibdMLQ= zL)eZC&%q&Ftl81R24evT4RE%%^okZk-T6VfJdD7r;#AI95Oj?2d)f=oS|#x2$~PFX zb`SDSHkjksRe6>#eTFY#hkg;zKCk_m=fIC70CclvK1-ykEGLlB5D#}F)GzovQFs?I zlw#E%H{am8dA2^99rnS#FRpF=-Uj>|fHO3_fl}84#GB^e*+l=@C{~jOxYO9&qvYo{ zmdCC-PXEa_yVO4vR<;kScK^q~-Uf$dv1tm5@pgSvml8lzcyI9c6+8&wJ1QDwKz}C% zm&%3bG|@*EKs?{vAS;-ysbADrpwLgY2N32`_VRCjkST_li}_&BVUlzC6)Vog;&1^) zlf&Zat4*wb{l;VwSacR3zT-JU)^zR5%XBc(iDUUc4Q zN1j|1^JIp6tH_ukP@@;UOi7~p_NrJVJ#x;`a!+bt@ajfRh~E6cqL6k6g2|FqT*bSS z)t0*W=9=SSe$J?oz=dc~`fFGNkdRO;F01@dQyM{>&|S(e_MD9w2bqhfl6(QKaE!kv z!m%^EFH3iY;xJd;nlIv+H|IZI<+r>wUB7%kllg$j$mB4n?!;a9<(wq@J62F1!;v4( zCc#r-e7*I8kTI6#DN?ZfOu}5+PT)B+ZDeziQrS{AC=Vh^zNF@hDh=~*qJP&HKykWr zmhTIBuSu5Fws+Qj@pBs&oG4|_ypBD>I;SiWhcBvv_Q$!M%pNNlBm=jjU5|CRPWn={ zP8qz*Op!tAQyGvW!f$1$@qB{9j{&jJmxWb1$p4$Z(4L!hohOWhXSMOZ%UWhik6uYCxJA3_&+U#?B zPlAMyCVcs-))%plL2&`{qLom8LL@|?^G15HFN$_@`|7X^PTV$4Ff^vHgKmi<#U;sL z0UDm@w;N}Zi;RId?!W#){n`wgS8;1tcT*o}#W32DqkSc^gX){?uG2Pi(Vbdfj5W!$ zj-GZ6VPJwoY>)g3lAyw&ovZQLaONjCB^ev#UwO)iczN||QnvqH+qn_?m^wMua>k}l z_!o$HfGDrv&`FR96q&6 zZPvLM23tP6BD(;#?83c@?F^oqm~$yczRdo$S|1o{u-2S;hIrjhtrTPjrksA@d7fvp z+KmN}H>P?}$DNe~5h_Nyh@RKteyq70kNRb-{sc=}pzP-Uh|{Cfwt_2m)Oof=w29wL zg6EnOf;Xf*pQtj8LfpRjd$ihp3R1#qC6g{Q3_2^CBFj$YVm4$qlOyR(LB(fgBrtE# zU^cGP=r7dfM9nxKcaojI%}6Z(9eINp6)tGNAwpA9A9Jmh-c)HMrYxpfHM;@*jpJ~Z zg;MXuS8gmTxlm3oX0)w%sqH8&6_cRJe58*uZ2_`9gyw=pa3vA_5iSv*4VLzw7gcW^ zsm4wlO5rRi(cm8YvwaI<0-7i^(-E%F_&QdSoXqa|A~84dEM~i#ENJmLz#eh#HS8Y> z%3^Z`@ApQAtfNdmqU*1@zJk3ktAuFYq7DHpw}+J3U;{82{%zojAfl7rT_Jq1hS_cu z>65|fyaOLh3+5J~*4_W4x-SpfdYheQ33X(?1OkR*GlN(1sl#1pwVGACO|1@eSX>jb80 zC<~KNoZV(MaEjXc{QC=`(X#*>7)_>!s<01(+XC$EB9Qkg(`4%FupM3JFqZhHOG3&F1}1n82K%iq7=jt3FS@NmYjZa< zo6q-2FCeI!TIB={b0og4=*e0@C;suocJ59K2;H=!#K~mlXWr@3-GlD^+61h0s~RCe zt+U(651WT7IPCpuq6{51t&6}1b>I@Eq^iNKS+(DkoGqouUz#74wMA`_UYCD{=rGE> z2u$VpFu!d5Y)m$*i>u-jd>Yt>V=W*Osb)49#(%hf7@+wzH1X5zW+Zc~Po#w;@UQ%*%Vx1?#3P3BIOcU@YwcWrS>G!{h|g z2+25d?n@>A(h{{ZPY+k z{ELhatJqcWXUvh+Yqw*mak$V6C|Ut*on1*z511HMV9IUnU!U2|=dM***vaICGVz;C z{6_HeOx)_t7!8+&cSzt7^%X#T)7|*@t*~?G@(|*Jg(}@U7M225N297dsnd#9u;4R+ z`~SLw*aKbSjl5wTJo9p z_1v>v?I{Ki1G;(#RK`Pl2Mv;NVky7Mx_>XKu37r7Fqe@q^WN5H zgXhtBk*)dCGu8I_nS`YEJ5H4p1R;@bUwEA6P=FyauQ?#Xo`a5T{dJiaqjUDzQun8) zKu9qEzrU=gvWf;u5%t;P^DA5}*<)e)_aXA>z1s|A`EMFWq*=`MlEKF>~F_FT3inH8I6;T z(IN%a8&w5NCYfljyH&?C(4js_a8jzs#Gw(bTRQixB)dPGw`LawnVmG|6BqM2FgUAY z&hCj|LrO9W1-vyMNsJuS8d~Tav`??A`@ZOQf3bPhBX2_c8F(n4yqNb(r32QC~C9Y;HH?PUs z-+B?J&j)^x_?#2E96kzqC^Z~_htXbN0(KhJBA2cRoRv8(t2XuI%7u*Z*1`&{-h3Sj ze=PxUlr4RuT5-Ep=R76t*up)`S3kO zTEcT`@6O6@Z;F%6TKU@43@2HeEkD5~V^~(KTOy#K8sNd;tD4P>zDTM=1U{a!s-+~R zjeHF(J|>YvxD}q7XZ!iras<@-`31kUEn{1!rMS4RF7JX`)bh>%Y>i&^R7lW!sKl*H z)@!_KU&L4&#J8e&Si?rPPN_cN1;}G&S>~pr!f|_`)NcJ(YNvMZxklAF8PwhQtMG_y zW0+}&b)#VI&`c0@sVCSWSpbc|7xF1@1Cz`Eebk$1S3?`L{ihUkZ0^40vC_0Lo}WA) z6igoFDX5Nej1x0LFt#*iil<2#NBiwzHRqMKx|5o61M#vCK*nu6c(s#V)`L%3hWoU+ z)T*~H2Zct&=PA6ec3q|xi=>E298_)zYm&WsArjpeEiymTBb<>kWIQ%26g2fEvhC{D z%F!WAR5fQ+XQt6{{m-MYQnNQv0N7`5*6a;(SYwSaGmm8s;oR;vNva6UTDBl-AKJRj za8JyWT7Prf{_mcapL`)J2B^5yLRm_4c#&BE1uz@d3UH^5t;MZmPX+KT^9dF;x(wS)x8To8lRd*_E@XxV5;`fuwGx#XR4eEB&nTkhm@T``J~xoOHn3@IZ0p0TUdza=*1u|&V77pV_&M({^;tmd%q%R(pvbD} z*J8q8ndWnEs_!1FGaccXZ;RIYb6*RssslLrIFxBJMaRCuN+PIOH($c@A*=>{mo-1~ zl-vbDgvP&j4`(A*6IXJnh}FARglXeR@Zz!bOM#Ryszp#7r^nsgD&k8e<2rb`7rGdq zv}tFHp}ed0z?h#WU7#Q;EN`fHH0$8yV*F=r`sMJiWfV|N*e)#xA|-Wgw#*hHYu)=Q zc$|b$W=#~b-A|fewd2_w_9h4K1=K)rK#I`%Pc60nz8&*S%Du=j|HnM$5{2=q!Ip~0 z1yK%Z2le6T&;{gx-Tk76>9|=(O?n$l3NwVXDr$*BR4&L24 zY;+2^w%6W$Pr504@enldwtbpsz@7TNn?>d?nYaC@LXYD?ep!>JEm-O;_hE6ueD9cy z2N0n0f>s1S9Q2xiXbSqUaJ{z2B3wc!-ptS&bpc1VZp#Vtit264-H?5t_l|bz3h^(S9aI~cW62f&p^#FLZ? z+Yl@VsntRhH8Vat*E}AYUb_DN@o+D*&s>z&9c3fo`Km{j&^3My9l*hCvooGPL4O?? z(R|$y=^=%?7Exf4R(jvU{;SM!)$7x({7@Z>$RkQm&hJu}`v%;LY92yHIoVRIyo{xt zGWLK6ZBxXZ-4(>}Jw65TM&Rt@hp!u7(6>(eqklwB4 zt!72u&}Ts~T0^_+*Dep#kFs=XCZAWjR;lOeLPydQMWObwm%8cn#if4icV@&n)qXhz zB2dVmj6ceA9n)>dd43!FT*TFJ>Ij4st#mJ=4;L(l2ZwGg@jTlr6q)Kt$DBL8QVQmQQld2 zif7j7uZ2n!Q6ZZfML2F2*3=Y^B}A$(8-O*66O8BTkaF{I;~>^M_JD~SL+qbkN%*g7 z=n~GQE29v$wg_^8qG08`JAT_Tt; z+YMo@jIE|uX;k9g3XL6uM6|Wt_#n#YtpkexQLLT~m+SShobR{aaEU+_31)J#JHG`~ z4QnE0x|ZvWK`Sp-@1yUuktX`1MNp3f*Qlw?yT+BfmC95h=aH-MYt7M|3itX$T-)|; zZ|0ZuF*jQmkzw5%e>=$5h4JvcCjbU)zRmQ1&>PGiv+qOfE(e^`L71D7aYn`4vZZ>_ zzlv|*3#;@_h295cXvy`Lm$lBD@FPQ4KjMzUS@&(-{N#D^aFMp={U$-oetS*d1i4(n zlsUskl4uRk$N70?7P~)aYUKXFMqv#k=}C~-kzO?su1NkAwpa<_vWUg`b@QNZiu+tE z?x6W67-lXy7(+N?6-VXn>$R zUcKJb2?PmxG-@xI*$;_1# z{2!8LETwEpqcoIJFXBtr@0nn-O(FTH6`7S~GyDG7+Q#gRvYK-|q7w(4JBuBxiBFq3 zMDY~A)?tm5Jrqyqowr)o9GpW|fb7<<o zkz#&_-hFnTX~ofme`5o&?{i_)biKd-&o+Z_ z<0IPf%nbAJ*W9kl@gk4=MFO&L8LS5>WxaYTRYdjIAWjH7+-`tRWmGFVJQ_6tKMJ%f zal#^JwLdDwM_`o_b0w99v@F$UR#boWWA3OA7s}SIUl-WWa@>A@o3qmefw6$%H?CRd zO#KQUh*hUt-kr%kaFic?D#Do$wSU{i^W$8dbi?;|B;ON}Sf2-(!6#)poj+<879AXA zbfJS6vIoME7FOzBXNaWdy`t1?2zqBQ{H2PM?7{B`!pk?Fef^lB@%{6uu!k~#KA*<} z29O;_l;o(kQ4ux`L^h@#B)Hr?ez(e;Y25ogUZ;rbuIt^Q8X?O?oU{ zkZFI7)?*TIA|+hGU+O!G)(|B$km_A)vw6zFh08l(VMEvxGuNGe11ey+$meZpC9+V~ zKgyAN&U~BxtqrN97xXA4P26rhtU+Ub;O`VEnsU~WheY_GMeS4`pK>1V0jSrkqEW3y zM#|1n+9G*}Td-2=CL=$#>gF63wj`12QZQM$!DH6M%bshfy@(oT8$rrI(Z*+WReqhY zGKTP8$@yt%?@(TJQkE^4a%(4)^T$4WB?5BrxQ45aY?bV~WBt#j-I)cakhilpB>N6dE8+Xqp-md>2+=;Q5g7+KdW5r6n&uC|E zx|E*=d9rrPiFU*(oc3zylSIy~$pxaMHCa%-SzA4EWNI#0)bDe9 zV8)$Aheu$4Dr`04xN7LL5-mNczfM5ZkVsnlTEthJc};Rv=H=kM-KYEE<({KEC1l0z z4tw)4bP5EUhV?OVjsw{{MCq;mc?Jq22&b*3?@E8~J$mi!v^k%5#D==fquXZ$>OO>C zwLoR#Of|!=B3PAmKqC{dX`(Rl2~ts789Y5rpBxepyB_MO(UnTOHSMopEoi4$PrPc476i^~nXc5!)8pP-Bv=9Tds=UyXY)Z^A9 zUf`pqhOc17R``@>av&L*i+w2K!93`y{Tk^#XMdx*sA~C3>I%n%IUoGtfCR69vB3`_ z+|^~w#Se(oZoOiT)cbg9TYg!TcQ)4ARq;7bx=|hIQ5U5h99_+&g?nSi9AA-1Kk|In zcF5l#Bx&!Jb~%h}!xfl$*F_m4Y!=T>1HZbyoycu+<)rKNL(beE2c9MUzNB!--nX(F zi_A)|_mXiA+{;YbVu-UZ&zzOLZ#JK;&x{W#^FxCM0!JY@sq_uPoE!4`Pv`AUm$ZJ3 zyQb%9ra^KNe!c#mMz7N1)rZS^x<0gerCQkTU-Wxk8B@c$*1AsIFYkIFHA>p$Oppp- zx`U|)R}NS$zMTr_5{94=L1=TWxa; zKm}G1p#N)jRgN%(`-_uT&JaB1InuQ8audB*P0Kn03U#)GTa!)_o8puJ0lvcA_Gd5XzzcS|3sZvx>-fcATphm6`6z^O%=YZdEI|1FIThVM zr$T$1bjakeu*_6rNSsP=J9i{c%#El0CILB~KofoJ?66U*gR^FfT8^68L0&}X$6)ia zESA*7b)lAr+ul;^<}WWNzzxQ99!@o#%+OqM%{9F&rEyCdJ%m>)e1%IKbk6ZF@Ko8Y zWb<{UUDZFMg!~N>LRIH>Jw}kBWXH*657hKy7^4YJ}x>>!^e(nEx0fAeCanCbSgPX-@Pd89Ce=4K{!owf$ZDpZgV;VYVV`Ae(?=>mX8B1r-gX8O;Nx; zQfX0qTIq;C*Y}X=XxM>cq0wlBA9On!6YndK1-JVqc*Oh zUdk+(mx5^j%bIEMWlqj z1*wEn)9!39Y1r_>pKAs8-JzUX^ELO`Y zJ+ObKsiryph0+r%w_;cu2+<5KK1i#jT;|!^z&w&|^Ws;w&Jq~Rc6%0m(4+mj+^!TB zBBdQnYvX)B|K81GUghX%E5Tc~S@J9WywkEwfwd#5vLwu$?Ioi);?!sE+pLf8DIX4U zf`xlN7wK5NRt|kf?RoH;spt1H|JYefbBmIpR-*oBK=JUsj(??U7oe(A{0IFx`71-3 z85~&J;ht-<8V%TE>EW%flrB@Ae-XE^dD(M`Le}NqiAQ5pfvf89c^dQz z7jn2_=^cSSV$Xm+gWsXOHO%neLYBo9;e(lB4`0{bu4Qh?2#TSO{v60;jvPvCiDply zAiy-zxwXRbiLZe>5Kz)1^EdOx)tAs;Rr2h;&QA$$ijQ;AZHqRrW;UX8zb@bf=ye@u z^+=z^lO<)T2xgO+%~M&(dm*3se7k;2;kI`XHK9R04|Q6lu{ym|pP@DKR}*iOUt4(~ z!HGPyBUt?WP0|I(K%B56j~B=Hq9TaUp|8ULz28@pn|HDE4LdtzMaPW~{Gt{&nOMN!; z8Z5W+Syij`)lW-Ge7sv~e2dVEx!Cg2Lhrep!2d(lxA-&t$N$bHlp-l3j8Y``l)DXK zxlK}0u8~mg_v=Ooxh%Ps%g8+;_xq?Ymul|h&Rpj@%w;Y+AK%~OoX79{2ixcK{=D9= z*Yoxw>if=_Fnn-KIVGETnHhxNC<9J#A*~_Xiv`8?l#v>1EG0b^UU5tf+spqtl`%g0 zOmrE6oP9av*G`}p=gkUO)$7U)ZdFO=Wc8c}h8B+H2mzsI(Auqme7}xCw%c^=Ii}Q} zA^0asS7v|tAkankg z_<+0nCoQ z5heIE(b2v5qEw=kWY&2>>iOSZt0P&jMS3U?SvMcx&UG-JSil#)ilsKK!;5DKQ-Oi{ zydv7yo!Atnr89aAgu?qF`vy-HFTjZOPh+mKGp+p);8RE*ShmSW{DqiH_$Fv5k#luN zZY0ABAe2IJ$6SoC&U_pPUe&iMTV%dP8dZrrZ0;ik<2}ql56)ZXdB!>Ylm}CmHGPW% z<{2@1obVhr8w4l}5y2Bj#7VJX=#G>XM(|Mjj^`ZB+HhCmk3~7Z3lW>0 z|NM*aPKWmQs)VVCv`Q9&CLgr+-x<*7_Rgkpp0(ECoOO%_SfcqRtw1DDdO5X5bh2*J z9t(VE=vnmfc|E(Rt>tN`VB3$b;edYbYLTVu4~O^_`0Y)2ivX)Y*$s1$Xu7+DMUi|f zk`b{K#7IssYA37LkxH$Z^5ToPRKa~Y`(dty^_G~f=bY?6b@^JYslGQf$?l>_OnT;h&bZpF=wF)g&)h6yWA$?Vr5lF@fyVVl z=M&pTG|aog+nqy+bcq_~skQSaFg(hlZ*MkAVrcBp!e=Io2#6RkD^%mjNj$Y380Lvy zF=OdS>mRgtnE7n~rWH=@P^(G0)w3DUolTznx~x(y!98c%k$z%HTC2G}dkFC$|#q?!C;~ zp{=>arNiBr#ciqtCc}IQzgtr&0awUppKrfB(rN^^=vz7Cb|jAvjN@x4*!SQYJM;~K zQPUeO!tlFgYw6T`Fn3ue??ZXP$%5*)fTa>PqeqKo3aVnTv&ytPK7U)($Gn zV};0>P6Il(SUC^M^hY6J>FXEJ1Qz^0XlgltWi$5^cadT>1V>iS zaxd(65&x?9sdnz=R#@Tx;KLlJ&#Js9`7MAClddZXJ3^i+#@wVcbP=p_(4YVJn4#Li z!lo}OnnvOSO|P3_{Dq^(NhVDDzt|k9m`|ytCu?Er{IROANKVPj#k!$*A^jmmkg?LW z3QO7>PtWiF9!Y7*6-bc4msg6oc(Oe>{50tn;H&1joGQ#p5wNDvwix}@9ownLkIGtG zIR2D+Ts?h5bw@}sA44oqbm(xsX^3U^?;)#~R8&z1jVy|V4q=pD^jC|cSulX6Od3lt zl&dV69O2dw%~C=vBm>6v{VDIMz$@NIzU>&Q3WkJhw~m-|6xIv>cwN=+dg<1!2KrQ7B!oyS@IC{2c55>%c0oc2yLpjne<)%L_6E6%uI_bY_KU*Q zTpl50=ZD`Ld9)2iN_GvM+cPGjwP1^)RNuy1i47wTD<~k-i@2BPQj_X2*AYjw<~uY# zZeB(W)gq2!E>LZcrpg{1)!_q6umt>1DQaMA&;+Qg)UGDu+HpLTKc{3`&^1$GmaWg} z=wf&RdNu6duXNmNh2aE^VGgO?&1_jOEd6G;-_}%7v3mPb1pK*)Z=VWTpmh2sZLvCl zhgV)&c=RB$#Ydwh818T-B;4RemuJy!?{a7C!2)HSgBdhuWbT^_8TVm~P*CvUkQr>y zT5oyQP_XyUM8c@wB(aj2O5$4I7enqf7J69y$V_RS-W#uTC$EF5X)7-50xd)-CgjYb zyrm~EzZG~)>8rKA@{rE+BF@%Y%`~qCJD)hrtZ?A=--^LW$BLDk4sV{bLTD`e)CB)o zD9iK}>LR}iSp-@d_El?PIRemCjybw6{P^;Ubd1(I9=TgV5r^57OSbs(Sj@?;vm;0U z{AC#JL~#!X!TAD#5cjF$2?`fV@I;iyeHil+RT$}c^vgAN(Y^HRS7x5OW67Z-X5aFP zj24`}uBZ5A8@XBwHxQ;(Ftn9x%b*7eh^@9ndz1f-o5*RgP1Dv-UZRT_9C}l=`-Yc& zh0x0LSxeNr()YzQiGW*auvCJm9H#dyFc`{1kTZ)f%fvdUOMiQHOa7XEF2x?t_MN;k z4PwjxJ8%UOMRS88@Fhe0`IKjmUu6D1JXSt;o^IK82b_5-mJxKL znWiYGdS5Dnc4{fVp4E|P4dl7(8rgE|KgN}f{Ai(7y@i?NXD8`NQkyD*63Kn`AH{}; z_8*oG-sm1=rQ^JFHw3G=(O6NxRz3E$W(wKhw^Cd~bT&1FglLq9Kvpc9attHVbh)HF zvCyZ1qz=2u6DmgH@nGHGmG>#AeuyD^#_pN15Gb0SlfCBeRS^z-V6|okF(z2Z5Ax1%2#6Dfx0K9j^B5x z^kR8#F$Tw!H||DS7Xy#H+shY5Abi&yxw-Y{x+8Os6qe!olljh{igumw zHL{Cu#C$DKNs9XiKOC=$FnBe6bo?nE1H8<&s$n8n{8B%#HgWh<7>(Ci6>0k)PYaqk z`zsMm#E|o2cKxA?9y1!p17Nq0l`ns;eMsowm!3JJa zC!`}E+Vbj2TV6afi22R$Ve+;QJt^(#8&FXd>Idim~UF-;=XSrpLfNx zAj0_E1aCr^#D>FO(U@F^y~NrpwvXv%qK~&&Qc45nMFxdn2c5*8toxn;wLtv@6;4qn zH6x>NsT576+(a5{L6&xXs8We_pW43dqL)!A-rQ*7j;B?2sGT0M4&|3|CI}hHj0Fc? zlbJP`#2dvWGgY46%RSEvbX4PcXe6ptE`f(Hqm^uy@~Sr<9Pckp_g_BFms3cJ)b(w3 zpTCB`8MthODs&pSKa>MLDAaqMJY;CH&qD9JB8{)E5DEHm5C5lJF^J}_cXQdb7r!!@ z9;_#RK#@B7cxjq;h9B+j{yQKZmQK5pd`1{vi0Q>9(^+|R^exHU^ho)3QE2qHP+J6F zfZz>LdKbpn$g_%PI5U62`4ngEbyK?{JYyA>rGhkNx2p7P3e79C&abt&R~x{`%%Ow5 zMmx+-Y7oze7%i?3H^j`POOMpKzTIu_C>=v$6}~qej=NX#G9K;Mtt*Pj2|{#855|Ug z^#AccoHCHb-Crl^cs^4hr16tp`Q4$aN?`Y`jw7+&3eFpgsO6C|YqB`EU~OY-tn~`& z*{Vb@RgQ2peDMv(1LRgb<}qpqj(U9Di8<10^Fnd($2AN#FQ-JC1lZ*te>b zA6J!>-pgFii(qFY2}Bv;!~x9dUQobF+)%YOl7n*Cr ze>WCrRx8(vnJ3PGTxQ=yx4C;HL|W?;HCA+*M){9?(t?)UCYSWNaFNNoB;+N*lTwe# zh9BLBDM#)l-&K~?xFt64W2nVi_1%1G&$Exbdywn9(mxir!%%=#{TZ*kTaLNI9O|mwx_fyDx@g) zGXVJBi$DxW_(ZmRKJ6pEX>mryUkaYr2x9&U-Vp2-^o@6n$DSN^4zjnqRbKhRK0m5n zr<7Hm#;ed}7zhmQFuo4qDFqej4>w$KpH*d}Xmrj0ak*^Gb^6^|(V^?r>9*`quV0*= zC*~;IX@%PHp&u&K1^pff&6jDtJh5Z^usSNd!-rj&-RR_vPry6; zcG*Y=P_&8&EHM1~Heag{C8ecZ1E-a-!|u+Z7J)m(QYA)^3(}avsU`fZSk(L0lrY@R zzMqoNnNe_9rOEh6NBmz^Po?mn4ZNvg(>;GZ&*K5%R`$5OYKKv`iIT!%p}&94S9_=1 zV6lkW5cAd-`5q6&>>^bTPv_1xTw{V?76b*A9%NQbe;`0&~?0V{*|H z9iZ_lGh@@fD@}JHIFw@swMKB4htcCIc1A9iB z-!uJdSKiB2I)a3>^8L(~w@{IhSk4x9qf7Ayg6iYs8&cP2a@|WVmAf^a~VnfIqZSO^fj*k=EM2@a2Bu!&kp|oCV1{t}cQHc%^OK0~03dQIOW?HM*O`gG zNW&PLZ6^ZW$fNmri&z2a+VN?v4PqDBNTBW1eNboeCnq8JmiH=W^jqs+X3%~xyz-ce z!K@7hQE-q3@tjyaq+pkJ%td`T`8LD`H^iL8NRQk@i~|V|J5$b8W20J zix+cH{N@j-OwrhI9Ns#0=$e>wT_rO4jcfsS?IC81LAWA0_RjPL#ddd^={07P6}V-d z!f_C%-*{W9-Rw8Sd-l?lUO+-WQG-0i(Cx@ z_h&ixg?j`~;7THTbtIY|Q}-qV_a+7bf%PM{`(Dg!C=RV7fL%cNtw!7jmL3c2I{U#;d(wQ}UlIZYv!3_c3pduI%j@-_@p1Vhe8TUAYte z{&l2EWJ`O5ij&HBsn^)@=Xq<191D%NqaLQwKI*M$9i{Y03FwN9bh3F(TIIP`=jl31Gej zjxnu63Mc59D9G)+HKKcuv(%Hj&n@Y`Nj_4B_zy~+SCs!K(dfFULicP?_Pi3ZZd3dFkFxg3m^(AcgoiDywMDp>asK(Q%C01mi10lld?Ww67dP?mEE*SxJ3 zeS}nC(n#5dpI=sz0hW^D1Y<{W9Laed@l^~?wRPM?oHKw2$^F9!#7g!}Z?#yLoJr>c z(+ns}q0Bt1x2=xMQrq3H^?Jd52$K|LP+Zm30McyZRf)E0b;}E~{ik zfyH8Xac(Wc_jSL;lM`bl6aPUD6lL&F{cF5n;T&u2G%(}~(i<~~_1G0Orc6Z>6B!?X zr}0<{X=DsNX*b0L@8%87o0N?Oh`%W%fR?5&i@*V4N2C~B%8A>q zD4OgA{+0P@wPGw3_pr7b--=N@+!1y$@44o;)OydX~}70qV?ai)dGtk=+Z{5a4ErQ`RB+4wwewjj>FR0 z&5>0ydll$=;7VQ*=84JZ%BaM8)hlXg- zc%NGe(V*i1r+t`~j$!s#Wlu^a2(#y5zhBD_AR87y1G?EYGxjei`ZaZ2EsjZ@#MWBB zkP1K1Js;fq3+^Rn6oY2gQ2P0+6@#707k)J-6RXlrn929$hMAWiyqR7*~xsm$L=|#-j-#4tQHc#nA zE0ld3Fk)9O&>N`G_3hKM=|GdwGP7O1xSGn^`D^gJ^t+ORo^w(?35>e&clMh+V7_b1 zuU8h@z~i~dcN(yhM~h>N>ELDWc6)MYn;U2Crxxq9mTXgH%Ymq)nAm>tv3B(vdgJyx z73lLmz1K8#>Hke$caNVrt|=Z#>`OlM>jo35NN}{0f$dNO~heah}-tXEy{0rAN#L!5-MvxoHckfKlTMm*v9^Qynsr_X>>Se&lwHxu{>rSLN4>>}b`vt` z1+z1I24NI@`iPb1sLi(Z@dqR8dFLcA@~N|?KgOTc?{dEV=3$fIVfDela3|Krzwwh& z{S#BJ4+O-|q_fexs~r3lsX<|&xmLUejYsFW*>1|T4r*372f9QTBcU)oI&`J}k&x>( zg<o=t}nCG6^hDWZKz3|3xuY zVaJg}Z{&&ULM#>Byx&GFrBX^)v|tu${A|`II^8EmWwgt~t zZ6)&gcBS*EqbM7?d|&m=_EhgWpMkmCV<`*H$&(S1PAw6*bMglUa0TM|w=1ZN6ER;Z ze00HYbORV7*}T&~b-3iS!+LHwq#sp0n0BJIc(mlIf?K_=T1h7~lZq6kx4m@5{;>F> zVprV@zW_cOIr(nF)hH9Hy+j%M17}>!d?qewKXCv?t9vBRxW9AFVsUyqaBtGzncPCh zI)FCXJgZN+9YrU2*z6H3f(Dh%rRf`XCCluptz~L$EZXhmixv7JnK(xKl66eH%XuCA9;Wq;cOmccv*b( zts3GuR`F0{%BCzT{SJ(JfG^TVQThjsnkj?-T?1y`6Hhj<{LrN=I%py3_2GWbyqM6s zfhI=Wb?AFc&#|fyX%iS@4 z>Xd~<`aV0LOq*%bV)eKk4u3m!W94t3vj5+=~SM>Ktx%6K3 z-z6>ia;A~TNWI%eX#;GVsBtQ*oy) za`VAL>Kh1trym!vp%FPxQE2C3rGg)&efDeg`!RBTM;!0`HTI9W$pn_HepyceI}Xd5 zC+hnJ=o}8qogT*+y65AGObJZiHkjl%Y2V|n!m&OqNI!LFDs?h7Tw$sw<10pZF_ve{ zl`CMIR-A*TmL10*Gk0ThSH2@Y_F-y=4oTJHQL0)EHw{NvpU2@OiT6!LZ8=>FR{So5 zuo#RnIXkstYDo#Rf;wEQDFU1OWckg-!HEGlUhjc;AcsI}0o9_v*Sla&72#GEBp9P& zjn+rO)G5PpV69`*HY7;P7$gVtuRGKnE>cwM$J_?UvOXh!k+e&}N&g9SS$u?@%CCQD z=&0tR=|Y3IWV+2+ZRB0^#o5rF@e+>(#XMv|clYz*o4ZttCg~@<%KgXDJUCClZ0qS+ z#|&SH<;6@`Nd^5-iqxPHlwld4mhb&EhgIbfygA|aXE2JE(6{UTw`%wjK6O`{$6Tv2 zjLJlnP3hU5Dg$=AP$~jZhcze@QYY5LsV?`Vc@y=aO>@)recR@jMyS#@3@@b+JYpXy+T?wg+zW#d$$HLYw~ zVzEjjzFBFr@VjUcvXnD_!7838It-Tx9OKIJ5jBEHw$01W;KYe48~E8_{~|t5mHend zt%g0gX>4pQf35PXNms+7@woBWZgC~7bfDyq4+-_-;E#}q1t5I?>-5E>=vO$ak?e$r zA^B7U|3M?@R6yPkowB)&vicIkos~Z1-N%o6NA*L;4VTQfUsL|u_cPwTA$i5^J`vL( z3G1*$eil5~l6^U*lZ#V4J%WvBXZs0-NR>u@!`y_wPx_g?2V#6)XJd~Z57Pv1F&Rz( zi++iFTc0YrNt;=)IX36MWORw}?AAAn1o<+wlIykI*_OL7kLkx%b%q-<{SLP0PexW6 zzzklMV%2Cb*P1CUXaim5zbh?jAa9ECE?_4on0?BczOQ3&Z`PWO#cKSA^^Qfp4`&@q&Mco6;jQz0Veu^)$dS7~Zkq3@R zhHv@wW>PN{6f-* zl>0pFHXElKeHU%Z2RhU7WTuP3K5?E_Tmp0wL^}bC6ynnTI*-thj-6DZ=GE~5K7O@M#$V|yF_s7bu$ut?uCb3WJae5mzX!8dfFyKBo^Wo+i02(g@FR)Q={Y1mLwOJzc=)<59#nmZ1za(MpQLSxytI{(yQF6ltD9%c`j!M* z%6{k0^I(<>Nyf)JjHm>cmqhDfp479TByiJ^!3bVdqx1Mib5*o6* zMLyHKO>QCv)A0pWe?B23=6X|w(V42q zid_t9{}*4$sa~axhU36^hhTOs$A<+T@cruL;uy~09jcP|_)Mq%%=pm)ac4e#FyoIH zHq@Fv7#jE@lNWUIt@Nw3kEK zv8^hx)a*9;F4TQ~F2EQ&&r}6oaOfR`4lyGo6cV$X)$(`>sK%@w*|9S6=0qdjK=m>I z-Sp)~y3C1&SU%Hn)8qX==}#-1oE@ZTg-)isS|-j~I&ki1i(n>b7+H8!s?5(@K2muV z-g3CnY~jo+1KFQm|8g=v+&*u6gDoP;Q1430I`T`CR%6zI?HKja;sZikUAO!Lt5j%| z_YTcpTaG=5&vY=c^n_SSG=nj+LcY~*qtkvLoSTCM&H0+L&)Yg&pGGxZ(6&DiR>!Ax zWoDm0I<7lw3`(&NIGY*oCv?oFsRZu&DZ<9-d-|btu&Nfe$sg{|x+FEw(g{lQikicLfP z7X3J_LX_qE#USXSXI(eUI9f=fn;J06EPlC^YX**$Bx2IW3@56|>6yyNrDbNa0OM=(+1yRq`~P8^uYIDnwPHc>IAkP^nRr|0GX$2$y!6h_uePSb->R$RepZ>p zxQdl0`DsWZx56vO>9|ckp?#v?c#dI1I16z3dG*U$tUFO{AL=*#=@Im~Vbd1}Pn|2u z=dn}T?B>%srPwzN4G>ZzgxLyibs$Df!zwK^VhOKLg)MS)2O);-!AlxFP%4OK@u3b-O%kRRlnfgGu)>2j`L>QBYhfSacd zIwgm%?Z*=o()5utAsV!Qr38-ziH=D|mXV;qpFo<#1AE`HjiAMk3POwRRE?l~@!$2J zi}&LYS#D)K(-wFC75i-Fhi~T0dW2X zCE}%C8vc(2Ecvv@_zoYlL(eLL5a}39 z(pvg@ok>y-mF-$F!!g{zs$|6)5%eJhf!Op-0JoiyID`6UX=p?s;g{Ff{bfll+) z)-HRPgS7P>y` z9y{(e=E#gEZP#A#KJa~q!Q$l!@felu=nwc6>q|@ya_Wie{Z-`lhXJ(gO$Y>KKZ+i!WQsWVO<9Oip06^Z}pE z7k%6bUfynM!RFJcYI!1g1F!`U0r$c;=w2QENrU%BiNz3ZBGBuvr9KRo6v9Ec%@@DQqP7AOp|mZS*iY39F4U9+t^6{B zj4fuf>ykUCr#36R_A+2eqA=~$GnGyr5|!n8I((n6)aQqA*}o_Oh&-jfS+-e$zUjSn znBiI)k!poAJrJ1>+#WO|w+3|vcSb_*mfge7{(PL#2Q1{)r9>-{%)N*pvg&HesGm~zoo_O70&_!8?gQK7-~$MtK_u~%ufCF_^&i%f>y z;*UIeaQZm-^7*b?-$4P2&L<9w|IJIzGm8dX9L+wu49fVk{PL3%IB%t?EWk8lT*TBv zT@8`Pbj1bd3va#pT0D5rZBn%SCu$?}0a^A=AZhE!v^H-}a3wAovE}X|aU8?*_0isi z(=qou4eRqlx5ywm#C0}T0RjD6&04T7qqjI!)%d^?alLwxc|*<5*U?dRcYC7z=U$Ya zzcsnLORekP9<+ux07(@H#1U_%#?`ujOm-mP-HbnSSL0Y*7PfCF*qU_bfu7tQ&lbIQ z^Q*koQ1|eJP#E-0yE=1PSn%EysyV|&iuCr?3(%4Y{!>8NEld9$6Gl*=tEg)%!X_Ra({#@exv9!F!(++9>DpLX^SEzqY>|=8EIx$%LtHIKx z;A{UGwB=jc0wY0emLNN#=L-$}y4r{SfWQr?*9Q9jz6ScwBvOd^mDPYFyj*uPAs@-| zy6F69!d9l1id&jxS2kp}msO6^1&9bX!&x$DE0d5%3m%?Zm*W4e^Kx4==}N~Zq@{Ir zfzg#pqsuv5@|AvS9$H;NQn`Kxc`-_khTO5ixC>mKTd^YE2EI<8L!-}fDKZ2!gW^TZ zp$~v(B;VYb2 zm{vvHqv;O3H!907PN+oJ?BGAkG`eL!qpmo-95CbN0>6Y9-JuERI5GSAal7rR<2imw|>9!ae-A3a=ZnWkmFvkXD->^;^^7b1W zEYtCnxvea#kHW(kRg~o3y#&YE39^`Wq_RVIKOw9CrHbobug+@&aWeDUL(-;#Q+tG!KK}r@sRDdwi(?B^ayy`jV`r9TzvwzD&Z4e) zX-IvMkxR>%J)JL5m7C9_C3qG9n(hjZzV1&H6$5NwB~4zG_w`*pXN06a8G<2>Gwa{n z1ic*o$Ygc%nsLw@)AJMPAb2;r&dm;8o=z!E3J1}@=_d&Q!}d|Hj+AY)l&c#Z`V@Ch zb<%;dn8lq>zxyqML_w1OY-w5ue_LTd2@;B86u$*p^HwPj970CweFpGQ;dElI$5#o* ze@&Dnw*c}Mdw29&@)Wbo;I%D*$vI};N2Pw6FgE8c`SZvUQ{SJ12}P`y;=Tcoo{2l@ zLBEJ8NT+*)qTl!tLVU%K5JT=C@)q|YAR7bLM!?n_clxbHA6-m1r>jlR(3IKklOxkZ zx(=CV+gQBs`<+@DSzGJ1Wix zKF{zVii|G2+}z1>lCW6v0~;ywH!zG}X~|*ZQ{gz*p-UN8o&HNRS2ksgmGYheL517L zkt2!U*1^q9M|#d?evoe^m1G;`vAP4iD}i(CgmH@I$BhgvWpuQQ5hne5fE9XmHxR2! zv;K0bQwcY@S|->I!H+mcYmP4Fgb_7HbcS@CA1Vgy^sfokK)MIHA2%EEW&?=<`8=!n z;CVLu!Bq|kqY|Z=*IlvDmP4DaM?&Ey;Nv`(yyuNc1&ZRERq=sfkQ;k|??kY=ET=rM zNd2slJ&xhj3pZlP`0cT`wPs7y!t((vrWCnl?r9w3DABBUr<;AZ|31XikY^P5`SCZF zjguNLf02G-wjOY@;qaJG;pC4I$JEJ2=|cYShZJ{9uFIkM^7R9T*Z?Mp3NC@>nP z&-d+DiuKCO*14tnjA)p+c3Iwe@ZNEbYs2Fsnk9-x^qk}Yy)8{}=k=4I4%5e=dgCC8 zqx^U+^i6Dk=x=Olms=&Jdd;m#51L;`@=dpU3RjSrbT(IaB4R%E`wrmT%GO7nn=Rm`FSbTp$@3x^LRq&^c zO~#Dy&r89B8Z9)7#Ky}jNH&+A3}Pqag3C_2WN?u{?6k4@yWN8ui>1j*#YVBQB+`0?(lr~)HyAoip1Qk! zFF7umidtS@iKXSQSK0Zn%$lY_zn@x7x)1y zNayC`_=)Pib5R1Q+Ic)R@UTjmeB&l!y{!-(pThIIQ-HP6==EnFa``inXMSmv1G5q& z3{@1D@0#tTtC{+d0zH?R;rMRG96^bxy$=Pc#;7%V3lGR`T<|S~NElBMSdinVeIL-Kmu#Gf^^G zO;Dcpjc1ml^gHgtzxHOipITDqR73JT=HLgv7`f;wld;F6>we|DfZ2KAZKSzjb&>(Z zu{Arx=XTW5i|Ho8Z@+Fi3s83C7KoEN?~u_OZFNt6e{>Hk6)-miJ;2-J2?>~|ur5Qc zN~BwP2lr!%(aVkMmQ9-c$`X%8{m?5qAawfIJ}{{MqGU%-^Hius-3w9RnEpRlJ1vK4 zPW-d{q+gU)no5qRNfbq57!C`ZdqreMa6f`nYCQ|>3K~;zK50gw{4rGj^`=7NAZs3n zpfiMyUtXO4A?%=QF887@%)HoT9)8@R<7%C>HT*di_og^dV%Vaze&^%8MCpP*{5XN6 zI3nJBJ>ZjN*%*BA0=fb;U6P)7x80h*m9e%CgSQ*juj$aCAM&TCkZtGHMx_;D8O+h8 zSd_3C$fb`(7fka=0YbD(K4H)Is1yN&k`MpWYhRt51^%!Ut@+)4n))M+KSgCog+irV zatdM5X9=#z6RzU0h&zIx`L z)AA>iZPxX9iRtczaYHQFIMZi9DxxdXu+C$ECb<+nAVZX0o^x>Xk~iNGE-??CezlWe zFQAWoSae>zBPI~sl8a1KAb<0>PGCo<&lddK?;s0gnGY zwdWcVpv1@k|Io4DuYfLEK1mF=)k-SjVdCw6#2PW4FdO%G`8HS+mL&98s5t6qi7&mQ zSu#(8IEu9)jmNIti&c9GINQzj+}5(4-ow-1CNq7@XKKYxmYNqjXrbv)fp#*PX+yOSnda&KCsc!Qa2)&ezVSH`whlNyLV<9m;w(-Fk+ju! z_6NV$awtE!5S`|1qw?sl40&pB_2es`XKNTGk)exDo7*tpXZ+LQ@<*KW9pBmCuE0;S zc)`z)kEX2C8>om~YyUP!*h6LC03GvjFSS&|j7n_G6YV#pKy;P{sw;G4nlWYc7rNR& zzwznP(GvW*Vqgc_uMEg#VtkH37;*V^S^I8%h#$~D=(sL1O9>HzQQ}y25B43ki6YIC zvKh$~M<6()uC6X@q}SZ~)mT=40zo5v0G@CK_-xazUp(~d_w8*JVjN(?#P>UL+JXUFekCNhobJB_4IyFL<*q zYLLi5R(6Z>X4T5H(?Es$*wAgWE!KT9iTRZ>acD95t)Bk;hd^x1L>tGlYp{t7J6-#7 zRA5&Ms6UN3@A1aAd%qWVNB30NxdO~y_Sz=b_6-EZb;;Gv>lvsmKu7QTIs;Fg6WrHh zrja)jq6ptr-vmwp=QH~D?dq0}pU=*Tvl(BdVO(bEAZR@1;)vr@R!{G+5HCSp+tu55 z3ovP3D(b{y5E8zKp;q_nrQ;(e5(g^MPZyuH4i3sz z`g~=a!g8;*0Bj(x#7GTVf(G@h7wSbfCAUZTe0no;rA{&63smW^0NMJRfW&OCIaO_k z!prUn+>e}3>D`X+ZM6#Xjl17Rvg?xb7Hr=QhQ=KPt_}R$MF}0L32h_x!!`wgLROg{ z33+Cs^CO-cI0BY#=s!6={~xH_L- zi#`2Ap7d6Hx#ECD-Q82u==ib`YK(Iow2v7UZ|b$j#GlBOCF7>Wwg|1*NDRyVqtOo> z0Pvtq-|qdmM|)rU+D+OfAQq;gX2>oFal>kPr4VaxmJ?Ps$%gMt_1QGLc(K`=`swu{ zN6E}DeX!z&KIMeFfkV)fC*DJK(vpoW@vMO{p)ZJ9Skf&b}#4AKaOFEnaNz^ zd?i}Y?RJE#$9(>$V8obJ>T* zf%{i7=;W{hjP@MOKoH&IQN9R@VF9a}uz0l6=Kq&EcPV&*sg=gR;;B(N&xD{wU6fzE zQ*1MbXU73==bsU9i7(M-pPX#3a-h(-( zf9Ni0a7D<-c|0r7_VL=BTuQ$}tMz49azVopVKLtZ%{yLG+yH7(GjErN1{XOv}}QZMVc(Jnl@?^t7zyk>GrSMWkI=h<( zyQrF7#TRsW@`J9f{Ka-V!MX~AB0H2Q6{V+aHF;atFB{>IYzKr!kc*|?vYdi9mYdtA zXO=XcT#EJh%0AD=_dnfPW(-jLg#pKY_^H!Lg?+zTk3eP#vS{*M_Q?-){V0L>C6Li~ z%t3#i+eIoO&SdjaFvowQit}E=Ur(jG- zlcFMrR3l?aIiyI6IW7s6P^l=#tdbBjhhc^!=PjueV{(?7Lr!y+F{d1In4E2xLk@Gu zY}ozobN_yi`~KcM9{wBN@7L>fUC--zJ+J2rT+TIwj9`i?gEo!&BMx@?Hk-k8$AUPp zeQJ;7bb5e46Lxv=PVPDMVeeO$Zeuju_R^RegTEx$y-Y!R6`v#b@2Bu6Q{5arYE&pA zFdCTT=2JCOQq9`ipSZZptj> zdQG)AP4y7?qIh<$pxytdb)v)~!u9z6x0?Ysw?jum<3eoWkwp?``2~!+d^r}wj=gGZDqRJcWT|$1swnb zlfR1OH9Orla%i6IgZ1C9@`2IP`hcj*K#h0GVypYsHxAa+%1t2t+%xt0qcGc6HT1%AVN_RmyT|aKAA3T6GV$iJUjAYc&e0XRK627b`Q%(nU`00$hYmV4g_?Z|P_~KgvI;Eo zws%sOpBuU9Gg&m=QQhl;6%TZ@^i3!9-jhFdMN4Cw^->WBr=<)yQv~B?N7m&mui#Oa9qC#a{TQDtOnU`o!YqUYb#YagMjp-V4*K zmfEY5v&t6kmfAy6jI`Z1M!GqIssjcoC4Xjf63?1<0Ny@RCJrA!(>>-S%&Xf1!?-0K zyTxa7Yr*3%4LiFe8-OZRaGl5o9E$+1+x`{cX=jK)H?bTc2?6l}GFxI+sua`3zN63O z{$xRXN^qhi?H_k#<{~#^uJ@S*QM@wj$xMjlx)?K;4?wFg`uyqJ8o%NDL~eGetUnl% z`hIAUVu{tSINyXUsUA`+N(8!!m!*I#e)7o-Y9QkI9r4wGv`6=+IMM6tsDhEa%n)3D1GqHu&W$0Llx^G@w@jDO6JllsKzZ*W? zQ?5^Io6b-s-pnQ3Re|XFSW5U5DwqUKn~9EE6L)*4IQ@)NuM_Ae-D;PZ8Q35J)=YTH z?TZ?$2J`Qa8PN0L%zVI^qNJbqIR&HAedbFW?Z=qe2_HxOHu-=a}Th-$$lb zLwax(zQF8T&QotpUnoDWL_6=#;BRw+RHL^igGSYL>WFmi(6Ey!L5bg0xWbe`{*j9_ zzkYg;yK#uVgeA6M8u^@)q}o%v}liMTK>qA)v~nXm)y z;(IqQ{QW_bU({vz-ZtTo=I$c~QS~b)MO7<`j<86fnd~;2(ec!h^K7>t{rxg}i1yGN z8I+3As60uVy~o(TQ&=WIY~U&@if&0{{`Vf~CEX?EFH zj`*MVc*J{xrm}Y>;soHKF1J@9;g#K&Z6J{RpTUj$d#fXVJr|f)+tVg@bK{K?u8fw4 zxseZg1Q^=K228MG^et-?do}u_w(r(m*Bpuzw3KpjB-86pw@tuMX-$hh+zH!pxTv_+33TG+WDL$VlT|~ zU)j#m2a*pE(6@R9P!n=by#d+)9Yl_T0rRmi?@@s-B1bWv2;@d@d8G#&=f|YK`0p)>*bWwO-jQL|))izjOnB+L%h{y=CPNfy!1?omXQD*^TA3dp=RXwW= z_?vwTP=ambr=s1%+rn4n_TpMEAkQ-dY@4i2Egvgmsq zz>2BK>*7woXlVten#^Na`v4`A(?2DXXqb&H;DG|<)w01);*(*Q@M21YrZb&B(~4X1tzUmISJKdO5{Kp2KKl$b_ z>0Ne53!lYzZ9M3dYyi{tclq?6AEi0>N9ti+DIc|bSN}}MT->~Yjo}fqN)6lQZ4t0Q zMwHg`X`b7mzxf9r|8ENjdrwWLi?8nm3&@0#GxLN20oz;O`aKYPa7XSM&|*tEbTl<3 z?+c;&_vlOM^1qa*htZa@3ZD0cwP$iOUYzNgn=Po{0P*7B1xb10I3IGxx5_&GQq5ut zKeu~#DN*+y*p}Pd_2lIndSm-(pZ9=Qx3Yi+GsC>WbnpGcq1m-Zw`lc|miALwC6#kN zM|Pn>yc6TWK651V;ZN0+Rt!01&}4QmLG7xsuMmep%nE3l{-PM@M@(K+fjNv6 zuuoWX4~hPU-t=(&t(-cXZ}*2lV7@7wb+TS$u`a+=-TiNMmqAzX6EpV8_1RA+0lDAQ z{88(Z=R1J12E?>}iWTWX?y-CJy~K+pP=?243i5zmDSpjUdcjIGN#Q?p8qPUYQb%H`zVZ3(8OS^Lg>J{Ef^q zdKWj9dF}@|b^eQ`4vA)xdh5ZfqQ!WJl{ny~e}8iX7Jb={^z zx$}J$Dm>n>eJ%bkX3ou|ZkD7BDye^H%L-S51SV+5n;G|w z&MBk%m@n?;F08qI687Kr{uLDNFc{&{_`hdl(OPm`HTY*pE2FN#)01H_FuxzmPVD-hUe7)Ofe@{ zY9Yj|FTz-}zsEi|)%#$4!bI@)P;dXh&rt)jL>>G%sq@ixgVbm_*K&`0r6)A>0B@HY2%p!oSJ;`~icU+%B7rXNnbNp?Mrjyt505T*9$ z&#O1DWL>mnrT2$k&R)udu;;vYy>mEo-dD5_1Z%(9yUU-n7ynv#O|<#^KB>Z@2Gkz7 zu2XB-)4aQ1&fMGK=-gZG&&djU@qX${ex+5QUKi2ho5#1BF8zf+$Yp!R*q4*pc{olM zQZI|%TQRRnSX;7+{gd~lpz?{|@{V-K8uh0x&k4{G)izV2zd=IG6TGbhg5}zTnQ&dT zd3M{BAFIqqy2P(=)!CELjm$-%mJZyi_AW&lm#KSO(P1M{Z9)Opa-`g_=0vU%f6amS z-)F_GG9Ra9NJ6XWe`X)GH{9UA!N2}`KH2BVsiA0t!44BF;s~SmSs)l5y4tgiT2+@< z6qeDG5!BI?r?)e9;1Kq~(mBsM++?NGX}7y0f0;*+{t>%ut|kPWXRIKARb2HMJK~xY z^U9XIM|Ft&Qd_lYKaze}0kXw2os1*buKT4T@Rs1B6BswAk*8?% z!ivbyX4EEW>_{TLX$${RPB-Y)tV{u28xr(YN*11v`;+WfkT7JqN(SzYMbC~YIE!U; zxl{W^l257KFKIHZ&ovpQPbuHIP}nW$7#Dinfo-ednrcl8U(#`YunFV2#{J;8zUZKX za=sC#0orwejq`hsX)!O3ZWG&IP~TSl6^wZ&gzpx5C%~g{ac6p>1|Qnm`st7oLqcULT9BOid{7qoSw2f|EqAyLUHSqCMyrBS~NfY)3V|N=r^ix&}MKD56bH zbUo0!?`})n+-*uM*!G;+vg9XNJ*Ww9kNDO1v6x}OgdmNpuiG z%MNePv+^h==G^Vlj%vq?oG4}M3*GVmwwv^Iq}H|8`i|s$hJi;m<;)_xLUq2_MLQcL zrXP|0@+75KgwSk4QCKI{Goa`+4Qa~B*tz86h{4#?ORJWCk5tZJ{1}dk73gIEl|R^a#q$ttkNS2BOtxTQkjS zp{dR3)9fiIwxDQsfnK>()LBJ@iwd+YYp?OZgMYKUa*N1S9>&xH-u1CyzKUm!9l?8U z*?TY9SG05@ND@v4aS8}2yU4V#6)n8QO`^l(4gPn$10wqw8lMg`s)uK*Eu6wI!Pj7c zKt|!2SmKNLTg_k>1>V6ZvP*xb4Mre`1%s&YBAn`K^|cV&q?f1p6wdNZ^VT0Q4bt)~ za6YknkcZL!)K;T%%q=6b5fW5fBN9-Bf*3N_qjbwSc9gE75r#IxOah+q4MUsgNiKBZ zqtiv#{=ZY_(4!r6FlbdiQ)z$dN&B(|mYxQMf z@3TWO(=q5!MVIuB4R2ctnpG4|GRD7sw`MZt?rkz>bb}vzn(v|CB6){&=^*9dhqy7} zQH2`NF3$vG`D4YUlo$}3$Z6y`7$C#%xZso~2z)%-R6$?C46Rb;d74k~L+C1xW5b;X z{AVPg+I(*HqvGSaqaYt#TrEE6E0d%)(|&HC$cwHWA^f~nOWORJ<)1I1QS(I$+H1?) z+6x?>5TDD;>3yGOrmEcz1li^gIu+PE;2Iny%H#;-G*)a!@DT$$e33}eNHMW=U<84g zi_OtRvAtxvgJR#vOyF6V2=!A8lrdWC-=*|wL+Hgrt$XfZtyS3&uj^vsTp1qy?H_|j z#OV{S4!f-<;VB~QF1eCd?}SP&)K~H%9CeKCG#2c%4+&4%%gXGIOpkH}c*b`&n8}u% z)w4PE5tg@?D?yyu$}Jb&z4fX7kD#{eRnqVZ^gdI5?WE8Ktjss?*T)m5+C#>4W59v@ zNvp^Fe_xaiH#>+JTov>Con3P;_)P3En=;&nRrxa5eBa>Y%LJzm!6Lk{z;oiSc>Gck zdAgf3vu*mGo}@zFKIZi`{9_lox!Y&WACA1i< z*5To<*I!#GyBY>ryN#Ok^334-;8!O>| zLfJ4A(hb-5y}IdfeB^<<#PPK}@042i@%2Us$=};G32LN&tzkLRVvy($JoT!$`@i2{ zj^c0A4xx5*7*GU7Yr`mp(gU8bYYmP=p_Cw-2pUs!#~x7Uy-T76$Y=Ggts zw)X*i#+pyJ8(7!2)7PQLl)ojUK$CG2x43Yh`PIUEGefYZ$3&zvwR#34Jp8`Gqx$&H zj>Xb6FON~MPG+}9fav9h0_b|APo?@UvE$Jv@8!opMw?A>eb5PDC4~$1GpAEy*W7L# z;VUo`EQ4xXBp(c(dKc8+*6^u98x@banFY72a?g}WNsm3*As7VR*9?WS0t$aaJkvO{ zAd>ID^E(Rc559pt0arVlx4sD&f3ey8+T1UWS{iCycRfVkSa?~-f2)tBxo4t&WPu+Z zQk|;!KuxBz=(?3d;Au} zt8;oy>w}Z7u-$Ajh>=yb$jH!tYreC=U3PQ0zes?t=5vcK(+zllr~!hLuSfDuKF`@I z8kW_14zfg35<|n=&MkyIxN1{fuy3H2Lh6Km)nd2r{wN#c9IL zdqn3%P`Vj*GTd{Ds?m$i_&CjupBB)-->;d|c)&$QkfQBtqm3q;TKQ~JxfF%` zFfKEJLo_9&<$6R6oo`t-!kFXs!KCuQhx6NIWuG>mfdR1r4@AYZ#sjJmI>3?9>~H$u zOYtNu=;zoLP3-1s#?cXLak9d(@cJ-)E5yot#G#0|WtW^q<|N3hZYBcB-GvD-(625Y zeR|l<$$;$`7Ox<}3Ri0mB8M%x=9I^HFkCgC>Ws@tuEnprYbtCFP5TmSkz1EMng!J3I8~dAuLd!|Le3ENyae& zl3MW+SWB9AWLfb^>@j!LBir^Dbb(O?yUo~JyDzwGu7ZbD6?4okfql@h>IWemvYrm} zIbUrkD*;fv)e!nhzEZKTeQn~qy`hDLS)l`Ra_fOe(Vn9#L z_I=vZ3WD|q&g4K*-5jztnq=)I&|FKaA#jqtn>eUh#934vJ)pP3Y}bSJZ zwC;f{O28aAD2j_;C+p+|1tyDjTo-!D+HP$n;7Z^gRc)W@q4O7hpTVH?M1Ofp_Z1>P z20jzzoEMJjg?e7OUNQ;JGM!b2zbBmLi%{<_(U_3VVz{9kmJum*%dhKZVO5nt)SJWN zw}bW70^Hk9HPvx>FH?6Cf}MbiizP+}cRhK`tIHoBQ$X?}30jT66FyNL{3qwoej38<&Ilu@XO7z! zm$J1U>{eV?=|kz@RkImL`bL)K#_ECP&my8Ylgx3)Y#RHpr+#09y3m9;#x?H z0WWkBW|SWc3{}zwTnRC>#X8$QN&sNC4;WUEqTA)S?Xow3K&dgJvMaALw)2arBa(xfTb&e`HayaMD%MEI*HV`r zMuI}ZDxkH)i%unyQ5eKJm8oSfet4~~*O!r9H8El)B62?>+nK12^n15N_|bfzWtq7O zH>LVJ>7*;qpia$P)Z|x7bIPoe=8(qew$AuL>Xt;o+CBL87QPM_Y95SDkup(RS&w0| zCJkr?%wI0#23PPF4Ye*Xt#CgGu8T3D;S(^uOQrpWa6_-nSliO+`rF|`1=3f%r^SZ_ zA=IN`=SDf_v7(`J_Z1uDJN<$4<-u<)^7zCM?SWxW#GCWaOHWkL5v&^7oMlqtfBaJ+xExP;Pm}k66Jg2wHa(?mm)5jyeuO@U}o;7Z*k7@y; zrsv6Gd#wMj$03?eQat;D#8v9tqG*{E*3c(Rw}o%4xJlh?n3d3B%Hd@&0=sG|LD*`R zpg~pkFEjODZjyn${UB z{weARJlN}{gCY~(Eg&2yzuH2Op(ElG&%xA+^_*5*0X!b>hFI;5q#TPz$_&S&81FoOpQugRuMc$^RSEEL4!QJJr(GW6 zdZ3S;(DL-$O!tmiC3{Z4hsuSNepO#iAt8e^M@s!HM*jBeP|9);)q{yk8v9_^5UNso z=`ZGe&yjE|?N~2X+}VI=y9WnT0 zECZpHLO-BoV$$5$B>_&@E!I0`$0Yxsp)IY{g$Ur@0g0|2 z4&V#$j^MLT;j!>9$*^5=I~I?A?hue$jyZIBlk?piwtbH0sCt`V%R(H~`}4LMe;sOW zUYygA5R3~IFB9KDM3r%($8;oH?3|&uoRw2%G+Zt82hJd{tjh!H3(`_`E5(;KeSOlo ztnYL#-n>30h^oXgsM)HNiNX9{jK;ihbkg-(Le|a#HPWg7YNYFdTC=Smc!R|UNbrmV z5e>%RmGP2Z)#fN1o*ixCh1ntpf|>C#lt{Xm>Q(2npEbnw`PDj=%*&1^iy{us%sGkTkYXyV%$n&5VLy!Y5pV2+K3aB_i;oNWSnD)E2CT>QtG$V zGR5hX4eL4Pq`B?~Tmv+A()A?<`&Ea1pssN7V&&#u``Wq7rT$wDatDK_&mPmIdF{Iu zo3I#HME)%3LOWe7ci2+rY%|?Uzv5+0JnsO%bJ(G1KWQ6VV$rb-oR6}-_JZ^)BxlZb ziFiNTfv|Aje=SiMefnpO-DFqJj#g&(rT}kcJY)Ep6tmdbe*aTl;(s^}{_hQHf0*}5 zOVHyBpufM`F>R#g)`7%86c|>)*n~Bm#F*Y9#&J2S2hraM2EY0kGxV;4g-@5E_gSe~ z3>DTLm(=wFpMT)>;P)+#j~TCfC3!lpfyFCC-i} zgrdwc7M)KzSi<8bDSt~NWvFggtB&>cyBi~i#y6F`-(whmTLZ^8N_(n)WhyQCi%vv# z#s6?n9CN3Zeoi=-`B6apUgl#*mw!Z=^$<0ugV?U#y>uvuXxYB;6M>9F>h6Z?n}bE9 z`oLN6Dw!aF6cuB_z8MDZI8drE!=85NytMS(^oh5yc^UB_voh4Ci|qlh7XFb4*NrA( z0v>3Yel#;!0@oU_m4p2%s;*l=N|#IReC7SAM-+FvrG`k6!5{ys|F=L>gzFFEkouQ;Nn}#HyCSsqDUtLBEI`((p-S}a$ zoG%z)ui({$18tk_f|v2I6Dw5txwkEksOFqWrZM$QZ40O>@PcT;=i%FlhZy@+A0PVB zYD`&nO(-1`CIrt*k0x}V@2&E^Il7rcfYhApIl|W6%adXvaBs>K)SNB#01v-_3y?S= z%#7e!g#O1&ybYD}OP1Dp46t{Xf$#cBp=V)l6IwX0`R#VR5N;td<-QK3FRYihVpKJA z#<>uJ_BM4#D;@NJHew8-A-z*RYIkEUGRLStVutvDYFBs2Hjug0$bXbl&V#y^<-v(tvb+jh48maa;m@#9=)vk=ITgRF15y$Tk*Jtpjm>6(P03xupg2QafA8b<4ef&g`g{ z$2o96dq65+W9vIAi9P_YaLUi$wU}sE9kdMg`f|mj0Cc71eudfX z)559NZlbCB#|5RQN)^+$JCz!GUdwF(_irN9vIkA&_?Qn#DZRj1df>=myX1Tqe(?Q@ z2TR&QddSMI^6BueYeQtAAyZM~hq zrGBP{G4IC{siM)cHBZwPEN>k=2`!Hb=Q|pcYA9`?TkvR>S=! z6csn(oAMwgOn@HnD6W;zJ87MGqWaCoB5Py=2A!{o@IU8+UPv^7AvduHcDlx`S#Znk z{K1^OG!vW%uTujgCOGS=npUX5QF;K;0wA2VKZG{w^kSup!MTqorrLNsCKRX-7+o5P zf{0EN>EYXzn$m})cA|TIrxc3z|2a1t@ug@zFYguYV9K6$_qn&eMN69%mGnP2`7wC( z*p6iP&UxF=;ZeSb>& z0q@k>G~y?3`^0qOD;l4i$**Y>TMx>lGRjF^v>x@zbR`l_I zEBf2iQhq>Lvb*`aczRsJm9`>mVoVnziEdlHEkiHUxUgT1Ww2E+GD0fgI&de7?}s*T z@LvMW9l2kef%=LrmJ=B7(*!}_pda!KLA3#9Y)>BDZyvhVYS3HiPB9_4C1Il=fPEo* zZv9+{ogVOmpdakuGxH_P(lj z#MeMf*VbQ-`yAyS*>T)1f#~S-q_G5QTKq!y)(@}8IqTbR?)4CKi=n#H@b;r?fz%2*q=Ej!6Ls}UV~(M`QTe<%Z8tCD4r=~0Si z?W)fWYzz{-n64Hh{p?eB3#9G$UuRhHTt1j-4eb$0g^I$;29BBGy-iMo>K15kW+Mdj zju9Oh>TjxqJ4wXft=UG&mrlYeyQTCQNds90=#lRjg6XK!AD#Zme zCiq+wRoOks(ZS5IyA$nL5gu>8W}1Vor77_%xHkU#(v=TF-Wotwz3jYZhrNGcB@$r1 z*!YV~nf#x%kM)bjx_p)wDk&G|NGL=+h5wQaBA#wN)Yqc$ZhLmduHu-qLQZzRM@}&B zHH^}XkK@5JbM|gVb{J6e%QdyR7}bcPV3iqEMbq(e7ZprRveU7*n`_BkMMyQRrTC5> z%G#FN)2R_(JLbQgj3#%v1>P-nrLByY-$HA)zqe`r5~B&ujX5#>AwBBlb+A!9$kdbk zh$7+EybtI@(a+$1A_)yis$>HllK+7; z)__jIdZ|`d)LOL7H70W#N@QReJ0s&*oW9$eLs&PD;{=Jx_qh2HzK~%*mHcLT-1ZLF z_61oBvLRnb@s~+qjEq`f@G${@K<-UlP1D;zF*vhi1^AN0$!(|pn$0GrX>@Ho-%y^!u(p=X9m>4yx=oor(pmUprMnr7;c z1TIAiMs)xOfwS_rnic+fM2iK_w5@M&-=}ccTpt^eV0ITtu;%vNrnNU_ke{QALxm8s zfs#G`7QGh&qfkB&_!;mvMwt^n0ZWFmR`29hpQ}2r&=>#cA($)@lg!et)>I4S$`QX{8H-qxAa5A`Z+=m7w zax&>S-8E4haS&f`($N$xC!E488dWtvti`^Hk!O4ABCdEZ)3t+kP(9<1)yp=YRQu{X zfujVpES`Uw{uzm_fL77!M?Zo z(+Q~wavp=WSAnc-e)(U>7Jswu)$)(s-Qhc`Q`mWCT{72vUSS<=+MxORx=pud--U;vXg@g#qXw4gf+iAUE5 zo~>M!t$Xttw|fF3`*Q3R`9RbpN?&zrM8270Qpd^cHG%iwW0=U_9aacpFRrNQXd{>j zglp^V!7-}VdSt91#2xh+jX*Kr!WQm|@J(^q*tq^uk%Gj0g~#o{ zO#;)PKki43Dn*n&u=>UY<_$xq1KpU4IZV%}8>FO$ zX5#~P?Wkh2e9>zQotGlSD~Y9hKt0rSbTM*akgg%JNKCC_%9v#=Ou@^|F&paRqjl%Z zZ1>g5>|uq4kPZfq+D3~R+m*dId8@MgvCNZ3tsDOj0C1ID`5CgHZQ-UdJ(wB>jv!zL zv8#Cnn;y>XIr_2JVQ-i#3)ZnFFsDxfnBU}Ueq-($da-hS&Ecreloo~GCEJcZyF+26 zV^I*GZ~8^JV|TX>Ytl2t_*cD7XVf3Yr3to%qF*EkGKuZRy7vEsLA?{;X=DQxyT&|X z0fDspdv{ZeH)}n~f?|vbgQheNik5B$)_0>lZbZ1Di?iqo02S%fNAYoEw|!{2@9<51 zGs@Di`VGKUhC~|)H1$~7+IB5hFT8wS_sy@#@B8+=xStj7p;}MC{>zA~yr*r9-u)p( zD=jxdu}g{Oy*_vGx4_g(&dO9)Piyehlm88vkhbt* zua_2-=hq$-!0M*UzHnFCjr9^=u! zIdij8i-qMW%bs_8{^#~p<=f3xwM$-5q(wCffc&>Ia1wEG=C)u94FuUqT@%HA8E>T< zbVRQ1I6X?vxLV`<{+(BDzLEEY;9{y$GTuwkW`X+`_uCV8cL)SNfjF=R#-#K1EQ2Tk zrD<8=fR;**2)$dA!ayH4tv+5UngXzG*3EbDd)F&~KK2Ey8-Z^(l8medM*|Wn?CkNx z+Fwmoiw91R|6Tw=hw60{QZDTkp&V~o_7xWhZvDc^rxc7y zT0ChTo?H6JP7zrQ951V}WH$!y<^`koiwf@Izx|Aa?d|@lZpAE+@M!(&{+~$VgZF;` zFUY@bs#1$DAYnkN@@g_ek%nsY0Eu&cK5^|pRX^iMus-H@MOBP^B!@!p1GaXV@_@MT5vVBQWyEUwC@E2_A|a z?o(JLtEb}Pdx0hvSO@c?K&^k`0ioE%0p)4A@y*UvlDNQp+bjQt5d3GUvLziF9sUl) znmrLzXwaNy9dixFd|oN8kCkOLAYz6wHY%CZG^o?bIg`W9{~)b};sw6t)&izJ$QI;e5t8 zohF-GX`I0|$uQJ1fsQ`wG?{*=3tDVPAsEtL&5|m7ZHWalvuk&SH1yr#;!@X&K7^N) z2XS9M|8r~E4T9OA>GhNHDGz~co%*WMq^Ks+OJ(&%Rj2g{di&q(h0{6_mG-Pm^?tpyWzEt&y0a@9lAda@V}O!v+C|?wFvY*;KavC(LQL^nIZc?q z(C{`iLp@D1_yEeAEF=d@UiVcq(_c>3IVKg%R&J)JFVRWn!6us=s0_W5a@9@)oLl>g z&@)-L%Nt$^Jd5pExu=a~NSPEoi@X4&NXeu zT&Cr6Zfarn_wjc&ksIFw|8y@U*0?e_y;^0;+dHx$pk1a7Pi0g!iyG&Bwh5MV5y_Wr zv)}1hhV)1i(Aj26UaRB%CsKW!CUv2{Io*Xgl&jfvkr~_HNszK)u8?Y37cuK_!3-Jq z4Qh6?e{<{(@EZRsaeEv9ag6s8mPki-`fSD|Mz%9q^J#RJfq8%b2K25Df$|)?7PV2a zMdqj-v)m-Hz(~saAU;?h3}+Qh3~dlBZdwMzJ~%x#5fkXD$w?>BY25WP^)JqN_N|S< zOB|Z0or{BK+voXG(BhZf`C*gY9KNF#`0w5BDT*XoX2u~H=uDli=&27yuaJ%8o79$)!?CqGTP7+klgx>dki}0$Z5*->8#8L~VQg2BiVOwn})tqE1_i39J52(wf&6= z{imhYHAA%(G#~HsIF8(P?FBHi-cV9062A}p_sWD*Y@R>DY$l10remLUkg)z=86y`d zaA{|KrWqw^0l(74kcj@-6omu?Zg1)YLPn`nhn;?D(A|XIn(uL_Y5L#$pl=YpFB9px zcVxq5;$PlGcM6z*n?Aw&p5(j4rB$7ifh_D7ew?yD1rFY%e4Mp;maJ7S<@ecXTY{vf zrzxX68blNq5cm}Vj`5S0GMBLF)ed#m3#Dbbf^nfzsWRWjJUh+$dvM#(n5>v!ztO=Q z?q;dL(hc>0BtkIHaUOu=7Z4LBB6I4JZFmp?_^tE z=>7?iD9xvbSY#83E!h_0GZt;1-xC=BS2eGHe#aQOqD^cfSBr2uS1vnm-ZnW3~v6PpoG(3u~cm$O^=Sm7>U zb#J-O*>ofN`_iKpqH)SN#Ew)G(4WJfAJL56evLb*bQLirOa{3#JFn-=eUA1vSydLc zQ`3IhQMbkldf}NA=KTtDCR|c$u}nOw>>87`cfwIvU(sf4JrHvTmirp4PLLijpl)>NWYbf>k{cYaexT zvULk3({aN?>lKUeG(m#b{EJGzy>)egxkG`TGrd95fNQEZ)2$wkd92(Cf8NM;)M-Xc zh4JZ)`K(R{jX->GlpJ`657;T3q&5X1rDkuirKG7FJo!#^vF2SO#CHM$Zn%&e&cM&1PtUj#P};>Xr;Mu?$QM%4 z%!i&oM-)brogxkWk}uKq8JUdZu0nTX*BL1Rej8JkzULQ-4R-Jd-`e%y<$&O%^G3mB zmS_kKGQ}J6;-f9IKq@?f=Sp-CY_zOU}vN>p&w$;^gMIu>A|3yrCT>iOGY0Lo;z3|f65+?(nSj& zl}bL$zz@7}Tk66u>d);*Cmd3ZEn2eKKS~|H5=)VYZQtJ6j*8NE+r9!dL3P2X#)uW{ zFQ0D>sL@G-P0rBjrM=5V;^N}{8798>x$`}KY!~lv;y8!-Uv)r{kR(Fs~Kex+R z1Bi-O4|@$m8Z|p^;=N{VJC6au{~uo2K3M;@=He5l(|mxa(H(QjQCEu56TWzyu4J4n zH)*u6`M;QY_jo4%{|(%sk`7c9<;d)-z^|Dpl!6H)hD#w3) zw0Y7#bKvPA=QH84REMd;x1V%Jfn)9m-%;W$XD@F_-;OeBIyy@J!mTdw9!p8Yv7&@& z;?N)dqk-nEq&4&dIAMA6d(06$n$|p=r{h$f5igTkzAHcF47eqHm!{mxm6a{_cE=`E z*d4A)zQKj6J4$#D%xCHj9+4U4oxOdPzZ{-8mRuAq`0l+wrcd|4htGZkvh*6d_jz{4 z>xg(|&wx%o+H3XRn0#cw!k2H%{cwAQE>#D9xUqj6j(7v+{5P`|T%=;5*}m6yvJaNx ze^0B^e*>vW&W^_T^9MizimwFo-y7q2g;w9eQG{zt&X|Pn>Wkv8xAyr1-Goy=pWRFR z0|Bb0+a&<(Xa3DTuUc#cv?FNGPe`YMjlaHW9&cP6EinNmWUSv%nr`pcVV$d2g6lOm zxp#B-*N2WwF27oWI|+1^QM(fM{EZhaP+F2>Dr!e%+J*NQMo33xPgpgC1}|e#FYo!T z|LB^pOfJ*f+vmI4kwPL>!5EKyS^nhG8FM51H)px^zR#b}ehU-XHGZVR{39c!Dcly_ z@C&{eU}o`N7gl9Hu$rf#4e$a!svO&)K2$HcVyf!Q4VT4QdMS6QcyeoZcTL~)KY2QA zLik?PTI3~d>DLSPuUA&v+GIf<^`#tRvg5NLxVg6%`8N0Z)pa28N5t)U zuC&3we%mKF`h>F8`y8NllivI83bIz{KUaCvBSC1PFZPZq7)?e7c zErL&)U`po1RV>in%U*SplZ4&M!xl&ndy@$t`AGirwFi%PsOC}cV3-U^sDbch%2j2J z94e2x(!&^GVIE=*vWu3R+70)lcgDEv+`E zDQ1V4_gd?;1!d4$X5M*c?v*YMJRaQ^ySbrESOsVWZ`Z|AW9em5<=S0n&+MMhQM~at zA7l9Mnj6Mt0Q#M7|DNY&-r(;VevZ)9vr?nJy28^T6*n#UeOQX%&3sJSM%xSiOE<>7 zHh;}qG?oMy=yU{d@xI0Cg!0v6L_t>Rc>2n*5ZZ_@L*3ad(D#kp!?8Tl-PMk(IlO20G^Ir<=ax*SaZ<(zHA06&V)o2C7QQ$5o`> z$Z2aupg5W8JZm?qjiGPdx}$x<75~{zW<5+$M`Vw%mg`5aSVROLivn*do!uBOv>vMl zP}CRK%Y$})7%5eB-neKo;V3wf8EJi~@YdGZI{$IEMNU`p;m?$v_nX=*U}=lvKV5Ea zQ(ph;QI>*jvmng*0F82S*WfK*ZV#qyyfN(dw$hhQ*8@De8-8WJj<~5BO57MxM>f|6 zUruLb@lHmp&Fa197aokfMImi3WOo+NgS}9}EQos5_apOUK^5=W$;CK9Q@pe_Ucj7T zGDM}Z9b;o-7FdDGx(y32K1&wcMBY+z_){*@2@rCnw>_RnP~1 ze`&zRJ@S@Pnbn*HxcgP-w)PaZPPj{hUVnf~>aIQ@nZA#Sp?*rzcCK^3eDULGJ)MEd zZF_i$b^q}WeoFllorbZFCtmj_qWk>wSLSpJ*6z~m8HZ#nRGbHL`uNLGMV8!`Tl}nY zZ439G{bUd7WJ<5=$d{2!B4sm#E_qJG5-Zb{Clc8~ewf3$}2(Wh=t z<`mhRUG?ssPBvCj{StF^yZd|Od6jabJKS+2-Iqp0$32RF0&eK;!+Ol=yH)tf^U5RR zJ0`nMXh&Ulj1}5(T$MT|Ez!}sibk}q>kWTL{e7vAjDFq6#gZEC;gw7?{>YkC!-ezn zp8hGrY^dC*=32G7$=@7@yDjz)=R&YS%033#oW@Y61uHf zH`#$OPRZ-Xu_-x4^U$xZvrk_8q-FKRkd-;vu|nA%{nIHfx{c>^jX(9)k*(MKl2;lo z=O843huMM}A$~_rye%aq(jvYXn$vwV&N_RaHc_;#^ggB?_OhzK+qb5dL_A$=2^~CQ zn{si!`0P|RG=*9C4Gn`E%}v-FMWDTr8YgWw;X0#E1Vk&!DX@b-ZQE$H9EKg_Eh3c8 zaQVkXkijBj4Me&uN3ZwBgIH;Tq~#wA=^ga|S74UA=Py*IkLC8r92nbv9-b9`!E(Ng zOQV-x=Q#_xWZ|#X=~j&I)2CT#)HqtQwx^F{;oB>m(ym{JTz0$mG~U)M8~^Ux&|F@O z$>&z9kx=!wdufI8TuRW6Jlo*a_sA0kZ6(@&e)~nqdyWle_1J1(@D!oLkL^(C<=pXq zk6b(ty1V1y4g_PWJ`mCLt<|OnrMlnc^~WAVwWWg&LsXarNRs^4AziON@ydUhb`YQuY{j=T}l&*^~iCUZL zW81=XX*qyhDXo9+MjA|cV@g9nS?b8Cd^lTvQ(5fH4yOhZF#aLCBJPZIB8 z=*KKG3;O0iEF;v9kB;0ox3Eu{xn}Q~f|6Hra)~b=CnOqvn2>n*xAwdS>LLdkmllA6 zyN@Mm=)W9?f%s$b`d+zHndN3wUX`>h)iimrxp%%Tlv(ntz>|qceMY|EStY$!T3Y2U zAnV$=IiJ|yn9=KY7rDAS7qHmXY6Z8NBME0sSG3xPSaV-LKx2oD}7zy@6X{bU_LaB8#=^EZ!2MBtps`)2>fP%wJ ztlu<%ti776?xB^j3{%=oG(rk^`jprzJUz&%W@&9Os0N+dNie%#6~p3o9&uaO`no<$ zzs?^@*L)bvM`jqEWp}dJv{82v={=#rXpDydWFdfI*A&_6JZaP=Xp21zxOe` zyBpO0NyxKc#|68$^O4lav?Ky%o?X}LcGT%|Lmwk5!mJ5TJ#i4*C?7DcCzH!>UR#G4 zeTe?W@!u_&ERcZ+!pmX8J4uWUkJf|2b4%lAxk_~QgzSm;X6%1(eT?tTs&SAB#j;F< zDGKxV+qByjJ>@7*Y%n$V;XeSEHtW&@%#o+8)~MH?#00 zT|ON8K)*nJKDL0-5h2rnT!{f0tV*oJ zN@y6kZNzmDy!hDsBRFkUqT3X}0|ITt!iEDU1uO29$&sd!$*QpNhF{fbk-s#s^kUZ@ zsCWv=dj6Q-4g%^xxYsyrV7}k!lh?*uTc|KcZo=Hy$*({Q3gpp z-4>Ly^d+Z}KgK@D4$njs&~t)r(to;BI!fCu$qzTxB#o;;;x!w-!Y^@`&m6Wx9-alR z4aFJ-^gnXjn+-N(GKp@C@-P*2MLW@`tuy!3Tx|G}XSp_*8@fDq6TWF^MK9CBnjVWn z&3_zvJQ4cl`(9J9xb!{$``ltBAuA5#Xw+L?W%N=4ofWgJsw1R@2}n*nHU8nk6@=+v z$@^Tee^$9Yw>GC=ra$>GCp$L>w!8N;0(H&~bML5k0a!8?2WCjk^?*ucEiqNO;Q5DG z_a_tf$qSZX!%}fKh*Vd>;jz)Df-2Q)y3xU$pgdpvT`)UkY4Av;n_D2|Cree(>_s7& zl2Q4v-7kgxpF0Jrk!9ISoKkHVSsexvob9PmYE!Y6K5Q!SxK^ zQ#&B`VFjh?DrGKCiPGlp(w;N9GWpKuJ zsrT83X}ed$!#q6ydHS08>${F&vn|Z;z>hI}B>EmpDYum+1=Y=h|3^PncZ{L+*2#jf|PB3tJsPR^@}y5(msRt9WF zFZRFZ&2&$zp3beC?qqD|RLVKZHKE4!*H;7(JDQ5^N8>nr8HV&ySmn~&ks&fymRiytn^zi2t4`?41(=bx z&#q~l1|*JmcO23XuW3F%y5D^B&ya}e8$oFJ1t}-*`jCmCaBjCOnH?*)mw%^PDsr6H zTOh%>Gx?(Zinbha+|Q5}7CGyB*B_*PPh{`{@q>3_5at^nlB;uZD6lDptbN-VpP!)(m)e@{zZs z&Dr06X4`8vqr2T@SBuXsJB77QBs% z7?3r78atJo&XxHHLa!tx=0EB$AOCotYsbw2z13z#GAO)3Lx~(_xKZ-H4{h&Y_m`(T zbuJ8f)bHJ`AY+16SCFMeIA6MGyQ2aeUgvi!MzeT&Eg>>oaYakG1XHY790Y{!22hln z&`%=P{=6gUD`qNNPJ_DHJS^okOvKz}2b=%d{!Jc{QSV9Sms-|%=uV8ZbCM^5ud1Ao zQ_-7%@1z05539e9QFbQW+6LF~FnE^AH?|_e1fy{PAnjAAd7T_t$embeLvCirWaub= z4T|Mdx#b6#&*R|>=LUVpI@jfDJjo6))MFR_qzy+bw;b3MpyJt<-ZhD<#Fn6M0f-MH zl^2}E+U+ib;3>RF=S!W|hdXzh0g(6Bui8aC@DkpE5Md}2Q(z~^;Jgd zjq9#oaFC{87}2JvQf%7|DR}aG#}wE}M|NFzN9EVVJ?Ee9C}~8*=)DN`euoFo*-u)$ zlj}b7?@B56Dz9Le%5DJehZp{ZOE?c754xrYcM|^45DbN?IWMoLl7s1^D+Is0QzyUP zIPTv|cZ%4b>vAS+qDKBJ2^SkM2*e86>K)E#K=1xi0w^~!_M658(m)DQpV@D*>z$&X z0RqePGYhPZQBTQR3AyGyyT6nj8XFxYbuOnrER-t&+MM^*2>9h1s$uF#Zl0}Yj$(t@ z0#fA)a8s}QYH&7HMeKQ$0Yh4(vot50mz0?1K(&WY(Cq8-%`W=t-5ugY?^3_jd`;)+ zHI4KCoj>3No)GsayP~adR(E0cwOsMszj=#fr=rc3ISng!*IrG|Urz}VR;uyzwTgi# zcx2NXfTfHBbS7qpJCR+4I2pE9fm%R@cK@B8&#RN-(4|KhPA3(^(E%S0XdG-sf4Pnn z)xpg>tW=V*J`Iu7vb7}qs1^>acM82UFwuMFbkT_kxgX2kS@Ns$b4brP=`7vV8{yD9 zuVgI*oD$i7q|(EhlV9P!Aq|f^B;u3Lv}e#d_2$;xTe2q%h)_GqrD={0H7HMu<(+xLpLnMo46N;N?IF&N|2uk$upI+-4T5Elk|}>F1&mB_(SdV0!WOuM z0hcG7OYdQ93=O0vz5FzC+6CbKR4ys(CLi3|uWDXO_s!w$bO%@+77Ff^FaW1`dcvrz zBE<;~;>sCN*W#%o7n#hTVd#(Tgpl0#%&6d1TX5yXGscMTqMH}!8`z-v)rZFKF1z`q zQclMEsva2cd#7P5e>RkU^1Z$y8C(VdBR0KqJ8kjD7I z@djpp+xAeo+e*IW2l~9v`kz6-_}dGFPBvk{U-9R6298bqCkxH15PIAxyQLpNkpsch#3y@YGiH zxP6V9zHfK2=Eta|Z&49|SpLAp`O=@8fZV-t&r3W~N7sbum;$%31tsyKk1&)V1}|H8 zE0^cPT8Cam8Ws+-#$OR%B|2U5XR8W`p> z7fkY6>`43hCQ zX)+YoZ&roP`@0Y@U1{l?YZvbM2y|EPr%B^oJTrR6mh2{iW)4tE~u<;Tke-;nek zNDuBV{S|!!`-isBtTtN1S5iS!W-e$T@B3P-r#n=B{6+jl3TPf`#pz=>p&0&Xs!mjN z`9l-H`!=zFtbfpOcHoBA!K>+rhN>utaRK51xy3i)#IY#o{23H3;fB5DZ1f_6Gjn1p z!fwG2*c>b-`MiVZYa?aO-?w>82%{U#unf4}G7EO^~h zjh>r#!mPc5snqDSIYQ&aNRkI9qe?Hlk7DgAHUe)i=5 zYKL_*4nLl3IO(IEeBpzctY5tV8#J-nr1>~^S*BdE2DWZjX|_%ATj#gBHYxbFeQJN3 zi&iT&ciCRrcRAfRo44CrfkIX;YIpxx5M+~rcw@KED2$6ga+9<2s-0HLbwOP*?L+_Y^Hk%?0lqMo4|hhI|F67FwuNXvI6%FV!3#A_8TLp@(!S#n{U%t; zXIa|0f(!9*rc_ejDki5WV^~xMrzPXNyS5^6|8;VXvHniRpB&>9n9V@#^SbdW5BrCJ z#nJh@J1Q`TM?9BYgY`}tHR@AwROa&Xa_1-^h&@szEZLnX&Bm@}wN*tS?=fLwkifw| znd~UA(#8-amMbkf)w(v7LPr+FEz0{27ImqvnxRcppZ4b9LGp zxq1{?N08z2H+X8 z`~a+QFGs+h)AD|DP7sCv?&ZfsiEHHW3nWfsbdB_;lebHeOETWoG-bZ7^qzLzGcoob z2J7>*w|a#3&9P<1_d&xa#IBPFOsBlBlZ5WU%7NKpg7+ez zzRQ%7(|oJE!aYUW1^`xj&=n&`UP>8mflhuWNkDSQR8P*?G*&W~_pP|Sxt5rZ>c%^1 zuI9fY5^U!r?8)&^>i7`?Z^y12NZKTjopZ-X5Hvf@HKMrq;DA4HlaEu)|o0U-6 zf7}}YUXl9ZPP`jEJ+|2?jsRxxv{uLN?|>fFV_brwqe2koYB(3UHxv_n_jF3$hdimF zM%Oip*1z4WuOVghbz+$oY$SyQO5@wVA^l41^OL`)KggSS)>!Y6j4_eQF>h^bY{Wsz zJO+s%UgHmI6pEJvVbzZY?M$EA?3D@aAg+|_q^#mc2{b4qnG+u}LdUL3f-}x4IL$Wf zmzJ=4tdEEO8-MR+KW*Sr^_f$zc>8h7QjeP;Kg zy#0@=E46~o(=RD~JyltnIBBmG0VJS%KqiS+kWw)*VpKQZP}V%3&LWr zpq}|G`(vvo+=1w1)@S+OAKfTIkw>f7I$t5KX&)tOuI#;Mo*M(R?^WU1>8L-0cNeK) zx|QAq4T2Th_fsab0JaBN{_>?umjZyxDEZL-{7RR{kH<>zBbP4{f@(;Nhzl~-5QwXe zN_8I7x0Ppt9$)?Vv+;C}v?H8cA1qK0X$OZte^Eo6@K@m5S>T)J>!3gBFZb*1K+TE& z?&%1ua5W}?JDYrI0UF+*l!-B=mGU|+!MzMrwa*FV#4g(595@*9(}?-QR|Di&J#SeGd z_o5PHg7a+~GGy>!_EoS`tIcWUSzsaSLdZG8Z5uj z9F;ysY4WWL`!5-t`q7YKaNE!=vbDgZ!tc(Kytsor)u9kRn}UF~T<|jwlTps5TMC7o z%g{8AOpFRq_u1V^M0VCNVxECh;MHmn-N zidABDibwOcrb}bV>PjW4i^OkGxD}k1&!{eR{Rx)fwu{F~ zx32{(YD+J{QE4~b>JGg~Sr~hJ)qSga1?}}#NG;9PMNE{sllk-SVCpINrA2crc}Q+% z2;N*;gv;ge@}Mg6KLpcZHrBAfU&Q$o-<6l}y@N^uIYacu!Z3ziVuslq6xZPoCazPo zw6wBEe$0OC#iK;eURAPw`a@dLPl{0S2`8VC^a<#JP39Kueabgyqq|QXaW$HtA21AS zH|@}x{uAf{fadL5(^5u&6N^Ns1W!URYn-RSiO;=&X^a?u!Kvvm@^yZ3DPG{wgvC5z z!l)bL1afv|g9~V=Xf}61B5>!mqL?;&1k?9VQd@y>_IuX$neKu1#7GSw`GEg3oCt5V zGye)K_Me9A{R}?iL*%q@dfD$jCps5TFh6DxwTxz6=yRgAeg>hi1D!yluP8Md`mL{W zvvT9l!Rn`vi!P^R&va=d`MUMW(=fe;w&CLw9J8R{z-$O7ZSMC+_NP8CzuOX z=Bb$*vSBzE83#_&j`25@InbRk>hJX(WpdODSn2YT@~k1fCh7j<-&@JL+R2hQCDB#X z?AC6hPSK#~Aqs`oU?=Z>3`b54i{d7|iaJ}C_bm9w5gq}&gc`=8y_o%o42 z552ikM{6>V^u$b#N*anhcFm|WPCZ)~E&>l`2ELC`Bc4q#+A_@gB3fWVNj!jnWUfAe zTH;*p{Hy*~5;c|VTC7d->Xlb2bYnQ+iD>2$LL>rd5`ihuq!qoz zK?%Pyc=m|Y(o<3t&92hIglivhw1p~Hj>V;y#aq#)`v`~715lOrXV;R?)cexvX-O`} zA%-g!;&PppmK$#wF?6B)2@mBrW>qdLLH8BK4Z@hM9H6i44Bzv7ZzE5;$z2`DUYSrh z?yKp)>K>{+JT}92{GyhoruR+26ifq5+MdogML8O7y90^B3wXAPw*Cu>-_VQ*e&1tE zic9r)byK2w1tT!#us*#JQ!aS#kK&INz&1D19N0_PhhA1E=d$8k70=PqU=1ebXf5S! zj}6Yz24;VMtDC;~mb|iRdR*UD;_phGhF@>dTMGbr@)3_&0y?fWPjR}HMk4}ih0t1W|wW*>Z&y32A)5n{tL5;1^2PP@hcAB@b#$mhnd!F+fg7&M2CB2?_R6g`A&+b$D?&Mp1 zDV#F_`4oX*Rxv$8Bp!BQ8mFeFN(9Q+xTmjWhlzX=1`QX_<0$;TWNbCbUg!7t3tKQ> zeu<$Fyx4PF9XZ#~+RmTE45220!?S=x{M({wwmlXxeGuU!84JiX1{aeKM5s`JKns<- zTi69ZV}1jBm_Ccu*O6OL+;TFpsC-^LT?fcYUG7J!99~k{pwRMzf8&L-5o-O>%!2iB z|AI8Z0JX_0ZKJ-GN?4PboMhFV(O7mO+qVu*xUc?HAGd=Sca^GtZLf;>eB&on%Gqvf zuB+Wj{&trl?19Gf<;da3J$+Y16x2E4Z{hXQwobt_%RhjUuH8|3&qIHCWtkfEyamK3 z@AIzvh49(gltD>Y($)lCeuDju67x#iFA9!Q2Qvfu%e5Kj-k+Sk5$^I_3-A=nIgWWj z?=N7(1`5Y#nEoQ|cSuAYkXzDXxO*7IWj9d84l3m#dll%$^kOK#FVJ@+@&&tX4OgDYT?pzPnl^m6ksCV-G9s*j zf`b_bqpQlV6L3 zgSKsq6Mu0*+cslV6bf+q_o%m*JOdYU#-mg)ZCp8E-EkANnG9X0uH*1A6cA5EJTAr2 z5>0#2Qr+};3o-a#!L&%EnE!LAc6_HtyF=QaacG!**hbfI1}}>Z5zLPJlGvLE!AOB? zg430&ojUp9%!rXP-%a2$H7ZZAzV68))kQTBJ$40?0jsM#_X1-IS)~fE-fZwDZV{`4yL(w5B3G;pxh6u>3zcMQDo4yp8*NGfEUb(8Ynj8R=wOznmoftJrb z&K%cVQGE9bFe2I9iY1pFB{q|&J&89{fg?CMRNHFv>*U7^;jR(M1Eo;g(tp~L=q9&s z`(?pI^TEQs=>jbgVD9D)40=nwLE2}qh=mkjyzzyyqV&rid?l{! zhp5f!AF1zsno-OZVK%^M z4Zf6K8d#6|;!&aa;(h}!sXx>?CF0cFi{d(K4(iC&(??Nw|9kPG}b&eMc!vauq)K)9I8I<#kt+-pY#qVr|W{MY>3jFcTUI zV2y3@Y8nBHJ&6#%C9dG|ys5XJQJs3fztZPXE?q^D53z-mvzHJ@%-*7>tUFcijbnpE z((iMJ;wZRNYzt_s-rSuSr&H#6kDF^({`2P*jKrsH`EPLcJU?;D{r6$UI93xk{m8JJ zS{`WaYaTiKq1cm}AwKt@=_lvi<)`lftBj}V!@z6$OE^M{?y%5|kfVJyGur+=CbweF zELmG=sLXRXnwcj;&caB1lMuPk#Sqd-qDPTCkM75;)!poCHM;nKFy8FirvbTYvzIxG zksKSj&M&G}!HoQQ`=Z>-p@@}A)eWEvH&+EJ@4@%amcK}YB1k*#x}2{mq}W2RvIcTF zA8ht)O@&vS4OXMkhis~Wo1k&XEtfKM~W9y1qnet0vYH4(J_h$ih+f#%c>$@awh z@KIs7z-EIo2#SjP-i7#AmRU65p9W@+7b=w|oY}bUU8K}%Zz*`BlMe6R&#v3@)BFFY zrpFe5?jZ6P<+en)-Y(42r;nGr$w&i1P`s-QYsN$&%w$McRr}cEsiNHgk9-=aeOy#4 z@=#bu(VSxm$5v(6!-l@eoCyf26ZAnKRjbp37o8=EUOjh^A7Sg^w9xt&fDfKVa3f*) z-;8*#$LC3g(2}ahg!!mg6XkOEmutz+S1LIE*q;;MRk-cHhDVu${Bnw*vtAG(S)GFBMXd|N)za4+d)W6(eh?gU>ZkXED(@TNIlM|L4i$Ok9A2cqpS4|Kav*nwZ#tG=`VMrCln#s${$N8QddlXzph) zzInWiK566$+)Nk@i1qb9iWV3aT$iixn_Zb5Vp_hrG;@o4sJ4@c;(3{3c8?`k&4SJ~ z%rZn2S4>2-LX@{np-+t^gh}KjVqW^Ps_wCE@r0+FSsd*UpW~)Nt!E7yPDZO)kSdSC zY%0}=zii7mLSmoLQL!4<*L#GyT#J|C$VJeS?&Jn~?~uqTv`Nu5W&Y}Ge+1$d9fjUP zbt(>RCs+mL{<hd#-G?ozL&w&$zd><}?(q zx&GQjY1unjqTMiJL1bmta)(WJ-IVqTkGsdY`Cnt!#0|@UwF>34Xu-3H3p3J*4z!52 zmH9m0ee|xb7wZlp*2sO!9IMZUs->bD%s$gk8;uaj&-bMz1gll?eKf`qQ;fpnlB(sC zJnd_#>CE1#8cUvbn*aQtMq6j?)hxbD-@snBat&k6|Nh8Y8ohC;a&p|1|3ijDX01Tq zU6>jVf#c{e2LM*{EzNiImy4Zb1^sVmz(fVfWOxSGRt3p zf>ht?C(g~?6e4I-H1s;f095D-&59v*SG~7<=Jdj6DT2zn^sP5_u1@9>d0ccM$ST*v@=`g49T&dGl_eAChS?wHuJ6 z{!UO%?vK)Ksz@lbw4-a?O!*%i2&l|Yi67fyOWwJo`Cky75*LInN&F#vA&(3lyot)i z%^D29Hpm7&S*y)KoYz)QlGgvjnR?LkzD75EebaU0 z-|MEO*f%tb2c^O|mdr8k$~?N@?OGDMdA)B2||N&y7JNG%um{RZ(3 zMbN8w`%`HP~o z{r5-iFC~e)b>Jnu6sW4&XtOqYewi|?8fMZ+*S~Jn)nOfZ*FuTcZMSHCZxdrPTJxit z-SRUijOcmuSzmu&e7qah+TM4)rKK}8o^mtUCV@OKx?!AcUQRmM)ORFmo~E2ywWy>5 zdO1A$u}V#sM?e6XTya%9&s3b||;$sIRWIWOxiOCE*7oSxG-_ z6Z#$DX{11+BdC-+dZM(hLn&Vx6qN2a)@kP&oMn%dKMcLEd_)7RcqI9UvLYV5Cr0~6 zoojY8Ka4KpcP!(Die_hrK6_2Qz<$*F5#eiIkTuM1FFqkCUs0519o-oYp3iDovxFGLm z6o-rGnZ4^eU*myeG!z>->*fXdFS`oc^>o(`xkiReL!@b@3h-4x~*6YsTr** zG8YN=0RF?%s&eMmlgY>A%DXAJVqYinOo2jG5O%~+>j^Ji@&ovJ@bOrvoMG<9l`E$c zN|bo-_S@YTS~t0>l(UMX{QdEA*O*eo@NN+)FU$NN(PruSjbWBqb7+k@)6QnpXz#daROXxL0%xZqST14lNQd*Th(%c5^8=Xt4< z*a^S<5&rQ^&&}MtI9rx~6nb@hCD&6TctRE=_kCd4nWu~I36C90sz4ME6wWn&aM>jm zX?%?|>23;lA8u+2M`MYQ7Kh1m` z&BrM1$kqoPlM0c_kPj6RQ{A~?@bZUS^?lMXZ1|lwCzV>{LHBp+<@L)buUxsZ16j4> zc3!sI0_+*1ER1dX;RRNtVF2#jWcuJeTqZ-;qWdz-G@9IEvCqy!44ra^Z7>6f2WIrw zPldFQ7x1F@ha`E!F_>u5LiuXb-lkY2s4_+`Dr!;p^t$_ShY~JMIG>R=E@=Ensz9K~ zIiq(2&lnxj6w9?v@A`&<`Y%FBtig{U-b#$3fJ7b8)AHbDlG8Tyr}1D-xu$>x{3B!E zVE(Ed-b{17Y~C+&uil)NIXxh}h-M`>Jqg^kxNr7ah=GXyHJ6=YI}zviLDCO4m1!S< zD>qdI9uHn*P?H{q2l8kKLzoWL#wq_%3Ysf~@a-gEt3 z;;NF|uOE1J5WB5pI0*_VjS-JqbQRIUkc}vXLo4-wJ9vISxCu$(H;DT7BZGo;gzbqu zX%8+;0?qA-xle=!|H#_?N_Lxha;+8N3Yy(h+Cf>)mB4UTg_R89<{ZTpJkXxSSkGHz ztTzq71?m|4T)AELPW#Rv`D^4RyC$mpU;~viVD4H<*w7!%xh?WaZ|6&iTE%6%gRd^z z9VI&C>N?$$fhRr4D;RQxVXrLN;#4-%Sgo!2!lGP4zJrA`oNU<_R4z@v?csK1ZpHMW zmrs@{I7OZ#kKNM{{=sFsCk2eCDLV$lFChfo(er7hX0fzUN84kdb8X>ghw?y8;98*H zgh0Pqq_a>aNXaBgm6to=B|_?{RmMZfI6^sQg6<0Db0~e_)aoCb3*28VV-cgPw+(C7 zU;SJA{g8Z~b|^?VP@jw0=#a*YNiWG)3cvH)$R{ut9xmd|oXcA{pY7E8C-6^{dC)}i z9Nnf1Y8UJz6H{(zQ*Z!6a|zC8*P}ZuP5@_gdxgkFlWR66V|xxRhvVlF`%RP7Uho=1 zWYqU;&al+b&y69RV9)2GajV;*Rr4xD*yfXAIqXGFeXFXOaVa<{;ssWgbMh{jta{y9 zLqyC^^i|;gPVb|(E~ArkL!*4Memsj#1`kxPQDLo@suiwbl+yKX$0u06Ja%mu;wq;| z)YaDZTb_MdAdsfYQw2DKX!Q789ZLgv@F1VI;?==;oDXKn^yAIPI5A#Ke;R+|bzcmL z^IF1)IUdwREQOV5dkr(m8I`@p_(v`NTx2%+3}$had$6!IDe8|D9-4+I zUVpPyahK%=9u@q(yYuMF#$6jlH+{WK!3%xsFrKZF9N%5zLW|bqO%iGR#JbdQcE9t! z?9t~|!nPnO{=9fcG^1RpyBSmCd#MrqX*_YL7JhS0#8ET6}|oWPR~Jg}PBE*3+Grf+EH!Z{Qjd_XQCv;6U>^-t9InqW)tPfRbLyLz+)H}C5(g<*zWmw8Tc2^4dYPd>ak@`c(^2ihy2Z0+IU*vN3V13*c?wa zAuZ!2=#Y`(AJtX=1acOZaH}D(m?N*ux6Nla_SPBX3aEI&WEWf5t15+>X$9Lr3Rw~A zr)kcwuO~Y$5=it5+ z+TNdf+xFRYi=h`Dq&BX+aYps1t{>tVxc%tK<}3-J8j441=(HU~7yj-a1DwWs`l$bg z9H|P0z%JUQ#Br2FG-)!plJ(}q(>BI3>R1HlRtq#x)-0>n5L-}s)7N+0=9^8 ztfIq3DL3wYlU4)TqsK|qkWo}EM&x};Q&_}>s4XV0zd@B0$!^QpE)`8q!#p-w%p>s! zS2QSVz2As!5WHyRDOB5McY|^>LQa5D6rrFhwjnf?c_f=UJqFr{NFq8ye;wp?FB93DwY5>?njofz2W|6~ zQECY1*13X7ct70I;6kONVh;`k2>c#v?wl1OuKH~lHPr}7WQNt;M-%12KvthEX2|?6 z=9jsE#q#IdoBW)%FrpbMF18N501uVCWZGtTNXzWkU!^z((v z-6BJz8RJ*4P4Y^Cy1lH_FQBOewiTO^m{rp{&cq@g6fC=>(MNXMU5Ta_21J45B2k(G z0`6a1QbD!f=_cYb7ePfRy~9v zh#kjrX{tYviKkIbAXGVZI4Q0n`?*W5vI{y#51@{yd+K0em;iOH!C#`>BQ zxP5qmvw?;1%>{mCwMeiy`dIC-v7A^9wJE5erh)6!W3(__38zUfQmSqJMY5Z;L21*` zzHKRd(_c79U{7s1fz!PNRd*tzSo5z|8_LEvMm&DTWuG5Y<*&ajW(PkVo|Ov1aY+Zk z^#F%D?Zo+a-p+YKo1dSxY7RfiC z(|u?+AxYTL#@w1t23+TYcA{zFs%abFJb$Zn#JHvQ4+&=m=o(6n{Ga&6N^U$2;RJ7g zz>bf{b^9zTJad=a6EkGMH-NGQeYQ;`0H^ z!(yFpq%pJu2y^q-wUXuSsi94@V?ZMC-aWg0M3q+QHo-S~v}`W}q{`BXnbnbB-If|u zyQIQ|(M5-M4b(yQ5O|qCHLChV;0X5(b{=Kum7d+15-tYxHHJ9>M8ryi92tP)wOv%i zH?q`41}ZBl8F=^$gA?w=N0>{=Q3e?uO>#~)e@sFoS4C{41VWP&`L}Z zt)_jQA{h8HI;^6G>MvWVv~ERKWB6QRBIyZKxb>-hOZnU5*3N?;Wr;~NLOTW*`9Sx| z_v;px&KU5KW}U)ufYakWB)3+n>y_(-QKWATU5hr6=;Nad?|g@b`L(Z}5B6OfyRs{V zdCva``)wF-^czm>i&2UoEEbWIwy8yzg5UGiMM}XHGGle1s`-d=$e?g^3D>=Y?r?GX zi+GfQhOkbY&-SUBY1*i4f0ccDtSOEe zXuZ%X!t2LFFwwpv?y55ii?^I@MRWdp5ux40uaP1v*ICa(n#w`XFb9^EVvM-6i3On1 z?PE<9BY;!j2vZxq5%EkxP^TqsOLDO!L$&wX;5ykc_55Sbc4F&`{651I*^AU6LspbD z)xfXAL`5Doy51QxUF3BzPh*koXyJ?(H+HSjuvL>=8*T5?MsT&7Cv8f(RwV_FXIp5E zpKgl0vOIZ_|8HPKS;s#>ILz(ZSUJ%j(R0c?q%XHjqcT!tK5t~RDqca*VV)G`G@rI8dB5LZwUd5_J^`+k2v$A{;-9_4yC=RWuSyMOm` z&ZCHt+$S?V8pgC4%VG1)`9!Cu9+uFn=SP6jW%}kE-+LZuvjF@KvDmi72atkaAE)K* zgm0@ixF_b^qVw8`Y!bAgo3rNL6{S$KE-^YR=>hTCC*?O)@z?fVZbv|4NF2I-^Z7K;9)`>I4acR^lsi%LkKn{ zhutl_?oRTg{GENmTXHzSfdAH)XG#C+%l>yflFvbe@3H%5;WZ^Q26~K&FjRb^&L}l% zfhdgf;*$jO`_h=n-8Acx1pzBlJ+Q=H!@WXM!snL5Q^R;ZhUK=c@T6dx%ems579S69 ztz+c0aON?vrFGEMoGIyJ+?SH9gB1z+gxW!>{5{vE(V%I~Blu#8+FoH9tYFim8GCs~$l*TPVUA_``#7+%Gp z$%CQy6U%*DL@Q_#jUT?4lFaj6$_7y_W)I;UN`Y+N2x8p_TP7vWD@l&SwQaPhv8|Sn zKRgue%ErLaA9M+L9nrtBeCd-=?q`ADKUkuxz#lX?qRsTrH*Y>3{EOdwu;eW@GK|N_ z%HBb_Tq>6M_$4JxZ-bw+>NQ>u4f>&Jc53*Ufu$S^TCBdPU-b^Bk}g)TMYD5A-}%Nf zW0|R01u_rIPXtAEC@+3?^{WcRvo75tVN`$37?WDUYZUJO?_8c zl8xn*Y92&)J`Tfh8)VNo6L0Ep^*k8+evcEiJgS$+8^iE z`C)ne{gL*s5|gcC!^vpGKw(VIVz*U^Yv}7{bXf9k*|830!G+gx2iER+0$Dvf^yQZj zJ^d^DfWn|@=5@0X<%#JV zit5(l+Yix?NuI8nO}Ra)4Wt6K-0r-n3YQR~4x*GhE!bd9`hq{7GA_>6&YNliI&k#k z9g@D@T6}Y{GCM*nI?YT~F*-&5Wu4hPe`;a`&)(DoH`;HbI zx=iA4Z(Si}@M*1&2+KvZ>0#zqC=?&t)um-6o>i8czhDiZ>eW=G4Gw0a~|4vBWD@?uujL{#L-I)jJeV3F-Bf$t%DD zUTqawzTN1sV{I;T$m_-I>NMMM$>Zh0yPU>`iRr@xlg>+*`mXg>R#Y8h-YxH;nulQW zJ?oFp|C!KOC;NJ#%TQy!5jB}I*0jolly@C=!{etYrn$f3*S_L;-a5=gBw=eouMpq) zGxfxOn|8v#<%~VLyBOX$*PAu4dh%{u=rYJ)FS=kq5xDPmF?aN;pZ{IU&ektbR%Yva3r_!Fp!m;I^ZKu! zv?8{ak6O~l5#EbQ7RLW4n$Mc54NuH(8NVw6b_6K6?JI+Vk zfAJLm_7BeXJlb>Z%zAYEKr9NJR56~kG{wUP!pGTt&U#+sm_-S(GUAN+Z9{E-FW*?q z>A`^tgBS-Ggo*XHJXpbOO+M>5;#DasKjpQ+OXLEpx(d#c4@)jC^JxF{ux!lN#%Bz} zEgxj3CO(WGo}L)2S_~!pNGKQ#Y|Q0sClr`zp66mRc%gFlrg5`E} zX81WdVNBJ{QgugXdA?O`#eo#gHS_f`7$7IDsyR6iyb3l|bFzsoqUeV$1g0r&*w=2p z3_JcuAI?*bNK*?j5N^2WZRFQ2B%~EMg(sAJtS~g*zJotUm=ey=#$$*$5suC@CE*4v z+%<3Avm@98Q->8KJjt(zVVT>5XivnJ39+y!T-IXNbfn3cabL^wu{^C=GL2yd+eD>A z-|1vV%M$WHigZV2Q*p#=-_JVp2TnoK7mT`2J%i&<`>ET`?3UVLo%2o3df{lC7*m>* zG{&I+#-N$E3roJ~A7Qu!89GwZN=t%wt9vA9@`T4Z(G0++G3ea=`+K#HW~h|;Nw}h6 z39rIH29gQ~$NQB@ewJ9;tDnUPLBfK@T)Af;6V}&kt zCDH~jE)S4ODk0?Gu*v5XbkXhbhp?G;!v5w=TsbOSZG2jiQhBpiSP}(N4L%xux7Zv> zkQyhKys@`ALo#IF4&|ZyElGI8R}WZ)#>wun=N$9)o_UwE<%!>xxua|>?$rSxXg2Gl`-9^Om z%*!5CSGSJu(9vU6*jmeq@}I2%_Ui+Mq9Hy|r&A?RDD~VPRIobk+(28!VqIjpheH5R zROybhf8L_BH6Jon8a}N#3^V*d0J?|vvvB^}U=ja5h%Y2ifN-)GasP4jq$}=I%-YdPo?m0saJ!#MDJIU&TT7H-IXyI%B`?E+je>qlC-yi)kD?60F65>dz?USebw>1806q%QO=+Sm+g~Af*cxxnbqetL3ech^d)>c zn1%_rx!rZ@YuVz@5E8Q_JYx>us?Zeqh`J0}_v6k@5ddmEXo2GgDXfCd;gkl|zShA! zCaB1)t=@4}K+!ASWo9r6C%L(-x|S)<2nrRqPIY8)4DL~> z(gJX1d_;A>SoC1clsMFBM=3%6l+;tgjyXz^9c-Rk*%R;^dKLSR@Lb zCLNL`6_?@M8Cks`A$sD><$=0b%w3xZgaQ!JH1Z81g?w+*7y?oj&AT(!sWyrUGW+ZO ztq2hUTFg$>E+zvqR8oB|$w7y~dx!ouX587*FcjlLa$%6OgYL{sG4dEHXGM{$S|PdO z$1{wu)vYZ{w{1i1NttifFElU`%2;b<|n$#hyG5wID z-@1KeZhx;@=IS>tabfXWjTGVV{H?iDr$tk?y^edc?MOHZFPO$?Z)xFMKJF%D;z`l5 zFAsp~+X<6&Q)JvRR``IB8!2hUs3Ox`6-d2`${F355_*+chk(9RolL`o{n58N4dF+; zD(xV{*t|?5$m|n)$3J3xjdF8kR0fQGt8*p2oHqktg>MucTpW5(n(f44BTJ*<@?ZpB z6PGB#IjDSbD3$$)eJ0cYbpQrFn~3!06$fm`+pLs=wy|X%ylwyt`}Z`hPTN2E z)%yb=SkNDG;V9i-Zf|k4rggix2zwKT0|rG$X@qAZvP5LBnWpH0{X}7FGYg>j$oi!p zLE;*inJFZ9pL1ReDKBq=WjM_iB_=A}SVKn8D^XTWAOSNug84)$YRRZq{08yp!!5=a z{JsfBS~q^z70IrMA|Fb12=$aM1|V{g!J%&GYC415dK4Au!B@vkL^|+;Y548AujU@w z(PY_bFa^=%m2;FVesI5wA1)wMl$E%WIQvS!26FBC(!InxYa8^TQ=f@ph>@tsmkag` zcen*m0hCc_i{e+?y|T~T*;In+15xlo?7+i8y43!#15wpi%DBi82P@`n<_)u@;s|BAP3l14a>(#Zc`voij z8jGMh&!yzx5F^`@U3dvA1yT1MqZh`7q4dV52xxzRRJxt8?L_<-#UbX(&SbVz{SU); z*?Izrn_#*QFJhr?Y{(&*;y%sBgYt*AWTwuOLYk`U5umXznOWT&w4Yr;jV14kDvgcq zE8D60$A_ts0KiKm^Imq!P;V)#up-~Ya76=+hHt5dNHTl~Ae;A^O(9G06M$-L`~1%P zhYJFgEsZcV#8h=l(3o2n992M%mcwsI->{_Jbpwv2*weC7;0b`Y1Fo(pz3G*W7%i*{ z@=&%H9E=x+(4QFUvT41v_eVJfdk8+?3EXSNZ^3R&`9um-+s1%URgaOMJ01h+9nyzWS_bl9fPC9y^PFoH1-wgB9P zr<^(wzsAR%$DjfF#1_TtIYdM*A<}N|mQ-6##XIGKGc`($hb6_*F~n zb}Al!a3q>R&zBwab;3~df4f6;%{U zG(w&6wSN^`>AwOSYxi_{-Rm}b#4-thfSVg@=ighnc-VBOMrhuD&cYSDzl~BHqs|o^ z^nIhy)Et9}XaT4;0iCtd=HVkA$g2>j1pMHhJc5~Y`4A7HQeoSr9y(u%zya16kN8F0H|6U}LCfqjp<-3tTucEsBHigf6L z6Ams_GUG?*@Y>}|+78wiFV68Sty6Ra^?-V(=%>N3*KGmk+Dtp6aM`V|KBJf*3yYOO z;UcraCT!TsUq#By~Dkygi32Yi?UJ8KYqv|fCyCdqPI7bFn1DIftHIG2i~&T4Y4$ota?g`9w4G>RwR7 zjo$VS2^m@Y=QvV7rW+FL1xLPv>$tN^Go8A*`(I_$$t?}tuEa%Hm)@4g zmoZNB_6&n9v}*f_dTCVbZmO-#74uqmHa`S?4tvMjPt*IjT1Jv}d>@7;eGp{49s=?b zdB6n3f0x!*-+96kz7OMvGGC#^Veo5J7)$o1_dpLmffiy@6UXjnn2q;6`R@5fO&KJj zx*lTPw=Rj`XbBaJ%p(2ye#<+YBI0*1$(x#*4wre;Cn^m#_W+7U8OJrbk zHN)9u$W4R?{9`@Cm6(^o;qCuZPveo4M6<9%M_iF~5so1|ikkkGJ0rzO6_-JK%#E+mCe zMd+VTK~2PPQyh*1hu8sLMDjv+?7A047b2A#ZJAUSZ|?t

    J#>pwsocK zx^odabe}HT!mE`OWwoNDzAO@GNnyOp5Tg6`FfC29kkb1R8XM9idLhqlJ$vc72x5{K zpca9{6v1}ipc4xm1sYH5x$j;KH1x2+=oO=CRl_dDd%U_xuP(rR9Y z#Ai!jYW~tIGt>=C9|Bq@ECu1LTu6Nd!{v%FyhBE%)&8M|+eU%N4&xJ4sJ_P}M^9mP z)^kSMMp+3V-E%lRIxZJYI!#Y<$ZY144^7vg9o&QkH=o%O@SWr`>XU~%9ANjTvA*22 z?^*;?!ZU>Z6kA>}wFOfVUX>Z@!l_lDS?n#&>M%8@4 z(vH7;7h$rca{!!#wOZ*Kzc<$Ao*NgActM|k!!-%)O1AC1E2+RxcHcNSHLZ*(V|!;0 z-)AK{?)z+U<)&=?FQ)Q6DZpmjc1kzwEx4`X59IqD{T{p3$3FN73f)Y6yI$~a5wXye{iO+5x zgC3+4()r3i3C4FDz(1pC7u6*3!&*lpfk?;8vGwiBL}O9&O*FU}DXM-G`pompd2^!{ z@L#O0N6g!e+ zhc$PUzIUh6gs(S=-CR5o>v-7RJe%xz`Gdrt>G#UqI_=cni4h;$DEoF)I}0taK;cn+ zsSj*@J7XHCtu?NbMnQYb%Q_67(XpR?yWG1R9-e*(uE9meEa0knkKy<`@?n&^(*Ggq zJN%m5nypb(JclNtfKsA@BGOeLv_$1dkrD+dLMQ?XNDZMAK=ep2(mN?sTZ!a#53C(jvR`tIM_ci}$g|{IkBdFKpU-q7jgDtc!!^F#%>kXR4uQ*HL;xN_p#hmcpo_?M(1zb zWr=I#VfpjEY@o%nb(((1UPg3=hkZp#fpFP`%Y?WCog6iFNqyCEWBT)>_Mm5$31$+T z-@U`R2inRKgRtSWGt6~K{5EB3@r~12iek0=T>2x))+6ona5$r6uu(>Vb7s}ZU>(}n za`Wxu#J>@7z$7g@QfS?<3ig+`CX0!~1G7DRx&!*=SS7oKYvrRL?f!U?Og>DSki7%O zDa^z^&7<%x7(YQ*+_{TIM;A6?$Jtd zk>o|{v$_H-_l48Ci6kjMNB02Nj?1B}HGL$5E6y;^4uM6d@$`#tzaGDW;>yCc$2rT~ zCw^0uhze>nMC6y|mDZX>`)|o6Jm*v+7-v;lCP=H}^k224m#g4tj6}dEA*41Uqt$o# z-?%>>DgSvERUAuLnvK$acagIHp@DOI*(bGDpQ5pdXd2j@i~G-nL?mk$dk%*oUlT$4 zffR7ID-`sHk-&bi-^^JpKsxT_yNNuy>iveg;N0aMgxK^)kNFfJw^V_tXm4nX)+j(Bu7f1#fKwn}fq4HG=K}le_^3gJUo}}lC znp%s}WAQ#}M`Q{ZpW}I9pbl3&KW=_Ps{O17I0cV=$wA1JuDo#nSB?AXpxr&kL_c+8 zUBskM8g;KnXo3-jj0Yz zNJXjk*-a~d_gQ{(4{dYPbk@>o`~L03nf_FzN*<-H8PA+r9h)e3ha?`4dEt{=gFvsa zI@BZCFZ^r;1M<+tGoPl(aXXlO$zdUm$GfF!#t6NfIs_&)0qlZ(x!S5}F1zDPbckma zFh)X{ZP)Gl*7NSv6*gdk@FyO}Ns7IXUZ05*Gn;hIt6Y}DCFrAm$L7eki@z4=8tHcx z=#q_6z1krcrMzM(Q4@VA=pEYDg(DsvR0y(U!XbTs%=dgc#Y~@>>JWCG z{1TV;|6kO9Y;ve1@W9XGLmFK{nC-nS@mRNjV0ouP?1KM&raIEEfqQ9PEU`Wr1WZAm zV{fuM(Ud3rZVf7;&~$%e@R-aSSmS>XjS_Y@t`k082ggiY4Ssj+yFm&2{xVV1HJFzxL)DZmClo? z2YzV2w7pxE%id=1t(CSow4qH}W>#ALy?P?6k%{p&N^X;`18>}n7@&PF!+BHj;LTO_rH;#vjA5+4>|hF zSzJM(|G!Y$ZCk>J^I9=?`!T-KePz7>X|-WhV?CS2E|EGmHiEPdnIw!W*?0HSalk-H z^dg7X-XC$l+YudqnZbDQ+|KSY*Q>^rxpa~>oz~vk7>*2F|5}@>^xR=6Coe^2` ze>>Whsks(18fx{smz2HpZvR<##F#F9B3atzb6^ZuKJ6DgPcR4@SJ0VdXomd zDI=t@-TbXBrgRa3Xgg5RRGo+<-7tqI*4teNwOV+x(&0M|_s>+HY$6V;HE?DH6lG=o z_FGDEJ)9|QqYqPM!rVnCjn?di19;P({_wWIUpPZD3j_cE>AMg!%x~2Eng!4`+;h}s z5^F1@g_L{7#2N!#(wR2s_Og_T+M&4eMRunruf7K6qIfuWTNU`=hnrY5` zbn&aH2_noHVVar#2Jk<<86MTkh9wDn(uz25=Gn}9k@BoByXWU!J*>Yz0uPVt~6I^a`yG1 zuKU1!@*R2a=Ct}D%)La93Cj`=%!j)5M%hp+Uw{zWw|!28O&--Zd=$wjPljaq`yX{3 zA!>K9q}2sdBcft%4}`x&pRX`6)+r4(?r@0@3|&cNtroH}r0yF=<33e(NItQ&Q=9hc zLsOTwq=Y{>u4KIADeH|}ukQua=VjR^GluUAmOp(|v`cTj_zS$L`C{YmTCk<-KW2#N zqKgP3b+>m)y?B|muK?@*m-jKf5ePqAeB^{X_#+KuLV>?GHy@?GkCSj6|5`aLmTOcsbL1W}+LXEO7hj9uZr~vGm>fkif! z;uDEhayKJZpXo*2OsuX)xBmt2=~vp?`n%eHA)&+@IGfwH_6 zo%?vN-X!~G<2le$8oL_QL>##W4b8ivH*%@i&wH~()T44kWy1=O;ItpNR4PE3@R^#c zphA6mVhqjA!#*EbH^%zu$~A<$Mi> zNo|eIU{aE*Wnv356uf8hdR_sD9N6_lp-hkP6Mi&ZcKSc$n;__qoGD&76I#`Qra|7+ zsm;;%!$+4H%e#<@>rEtiTF$j**Kk$%JS}O_nXEEyrl5A^G$g7gV5{TIKW7S5Bi|v3 z1}3D~I3rOTR8%y_QaEjaZu^E7hQFP@(Co^>|8vsk!c}|m7j_q-l#c(oaT6^^l1n&ije(*evMOn%NE}PbU>t=+$e_BDfa?+Z-(woYo#P)bj|E(Eu^?tK zT$0VH*|vBrzf|dlS`DeHbbMn^|A(gaQk$a9cObOq(o)?MlSC0m{9U}auQ%yv z?NA-P&EeG>8KAUnL3uW)>@0D#I@bOYG1V%$h`(xRGv1l_*B7aF(Ey^YSdrEY$54s; zp`fFo4k>g#fq%39Wbv$eJBBnHkhw_JrYbZ5Am%>p1enzls*B!3s4OkKR0A?z1R5Ou7KVdx-p-pQ zbc|aHb4ia($+@@fel16G%KLPs?fGt3<@j0kB2Zr7hVS;+q^G&}BKp{;H;GiB+z-BJ zboG)T?%%@X^zqVa%bSeD2ED(PEN?(~&o+lmt#N4urCz((3iI($a<;`mD$zldsM_F5 ze)p29*gBf!ov(-sU0rnWNwggRomSGVVUpF>#;W=3uRt2s@Z2*$%*i1zx3FdfE6s+v z9eb=M<}FY9*#BJx|9?jT&YH&AsL$!*OGljfw2}>X!w2;lTdv{t&Pw|EXH;lc!`#I6 z!0fG&cFx7WBI_@O=iQ{MOV$dsx5dyny2N6%pgw%3-X7taBscNkpxrsWVl=KSD8{4d zN1xHmbVB7`qSjnyh`vu9%cDi$d_&V?zLry3xM5>S!zt5Qc&QxCX>Ps`I~j24Ngsr< zHm1ydjnnE(BWf>(J`^6~zQ^nysTjOuh0mG(xY2M!rK4XvMG0O~S{*b~Jrq)Fth5&@ zf+CJOQPy&i@P{5HQ&Ii0r;adA%~_uaPcwG;!pKSJ&UIMj5i8|*K?T*PGFj)cy3;~Z zndeV3cQWMmNdsT(X2D%{N3{z$4R;y5n&XoJ9>yw>mtMGfSMCv!ey$JAPHyzda|>8D zPK2*7H<5N2R1QJ@l7nUe6O1KII(t_*%c^+D^@8@jkL27*AJVq(1(k*13+`3hxA*iv z{NqVNH&z(tsNEgFHyA2kr$K@tlY})iZAX&ue2=cm+hnHC&3s<9^m)-SEwuJqG5sP1 zgTrQ@ulE1oIQvvMi0}%%AIBaPQrc@Og`31WUZAI69J*lt*p)p2Ti*4>noC_wt~j&< z0&bA9Q+uMPtxR}|OHJEVUz&^IU$19EHWvAA?lUL0G}&}yr0rEk1`?^*hG8_*k<|7j z0dX{+mFu`GQU2PgF|XQ5y8TIGc+Rxe_zY{Jm;GphH)`45M1|E!S;{*!C0g|-s}#%; zBZ6uhaiXNyG!7KXqf>W)j-xvhb;1)xt5q@vc!Rl$!uMPPGIE-I-EiutLwtMCC7t2|u$(nfm52kJxL3Wkb*mAxldMU9a- z%C1r)GrI#f{x8leocG;ngh5-5QIoLU%U;A;`Jx>BqrqKECbm0u!2!X`xjPTyMG+&gzYd*CP1&1$Uz)sqZ}xPuYaRQ?jR!-WaM9NiD^I_`b;+^rsQ>61J=1j|wM zWcM`A@&RT}EBz{uxW6fSsSO$rW1k|9R*3E{rwX3S9w(@v_i1pI;Tp3qiZzpWgS%2 zu)84J4pDQF`P>ClTP?lMuBooOwj!Ta)}m1D2-$BZda^_rz+lpLb_(tg@IO{D(j zDA=*X7F@CKxwe35z7-Ld@;_x6&{D9KZj-stf)Mr`)}a&IrU{#~|7Df>8*UAB!7PPt zXgXGOjtn%?!;F3Yd+A4aQN}mL*zLQ=A=-Ui*J>$tWxa#Ozx=2Xt(l((J(K2OqvU@j z9vn?-Fvf>BR-$h>N>T(B)1^-CY~Zlcc1a(l-49hAhI-Wo#$#cw|9gil$O?1ndz3Z zUZVHVvIqU&l^tiF38v(jVwGWD(vX4IVlYDAbw#s-YFw(-wvkX`HLR?x!WdU2t12N| z_ramob-zC;Jd3B6iR@>H_|briZSrvb?mfCwXQ?2}Q;G|^DTkB=(Z73>;S8TU&KiBd zL$41X$X~vuSBj+iJFO(KvIWtHWEUrJi|0^G5;|fu%F0h%^TFmPSJ_#Ch$zEgvsrRt$id7+Z%yX@%DWt8A|Nn3mOCgaA02+9C+Q#sJLZ*d^9)*}3C2|$f zyG$-K&wCgB>#k&Os)@1%@f5q8YWic=LaKnM{Kw(EU0>Lmy(~!)yqbs+)HgGIT&$q1j03sx9=yt4UFC1}p-S&k*1=hs}W z^gjuhJvyb*ZF#0kYGi2+RQY7?xuu2*xq>f~2>5y|ir-#(N{O zFz$Acj)_h*FAs280=_ajo-Wu12X&QUm)U#yjTF6^-Ej6RJ1m!U_XfH-H|mR9PNhUq zXA!|-1ozZp%f{-_q+dE6gXxu%s~jpTVsxL1bm{u~P0hx+7QMN#>pB-IK4f*PPWR zUZTe6^Bfi;z0?cgerg^+=qyPXX_hw1)p9zxI91TEgmFHYZ-sQFFs=Y;-|U<?JR&BaURN-Q0RSyA!>`Kr=qn4DL8$_`Sj zmih<599e(yIOZ$sx#2CWuR;L6vsOiyye72F{)(JI`qeF6rq{n2|J!5*-uXXPn-%d{ z3cE$mxRj-~9NFd}xyB6@D~ny|g$8w}n27(Vl1!M)GmVb*V0B`u`JKtk>Fx^l$w@r2 z!0=nxi8x^-7@vf?+_+Ou^QFGaq#x$*T1hxD>9Bs;j`+c0{`|wb;e=IEZ}lD}rXVOs zdHwFZek?Jt0b4^`mHSfTPcA#+J)HYi(0|Eqehq+xtue}-Ox()X?vuYKcV@>6A-H_Z z%iY-{z|Buiuf(7G4XlO-DagI)JXp;yBdqn_v}Ko{Mk-mlw>JdKeK31- zspD%w)Q~OcAu^HsXgi9+rqd4qlfoa2E0u4@G04u+horPIKILZuAA2)>6~O0OZ}9(a z`^*Ne@|ZYhzwEk6RzS+nzyjPOy-WaoGnoL1X;nC zHx=|%Fn;Q3bI{c>X^c1v;>C(#%jsgkYQj9{Dm_~LH~9O?ZQMXl*nn&)D|gWfyQBGd z3-7UHkWU;r{Y2~6Q<4kzA1#*I$ZI^!Ev7Q>p^I~46PHGVoTFr6{{UDML9%zaO-iaw zKt?at?w#pY^Y73}uaENbNisWEwX>G;WB6SE71tBz(pS7mj zph^;ObKlLLb4|Ros@2D@PYvF5pY41&08QDuo3OhVsV`l5Rle6d&1gwC?byZZ;D~{W z`z(19IO#U7D0w>VotXAGhf%FGa_2289jwX8ojN)M7j(%O*w?DP2KM|P;CV;~JXBQe zb~t@wsL4Q!1Kmpv{@p>!&w*=l-LZ2n@!q1sra^z<6g@LHptM{wjxuCa*lfD%V)@v5 zmbI^GhjE9-UhfIJ)Af^6qOl#x6$lS}`=ncr^OEf4uaI*jk=9Gy!P-|^DVAbfQ>{}a zo{r27#CA4^2hxo{b2P=?aO>W&i^bRq4eUM~gQ~Mhc6j2==UcV|l>Kz{-CO2Q&DQw7 zE#SP*25H^{g?kh7ens{5Vb5cFzt?*;7n;?WqH&HLStNM~bAEF+G;ga!fL!N%`qbU= zlyyIM%#*a`ZF`ZX26zwatAnt@X4CF8y-N!Wdo8eEk#{MEdKl?0WsPMC2nn@{B`(~RnOMaM_0&au z7nENn86nic8iHkrk$I*|!Rbz#h8#)f@68^>YqLBgwT1H?d_1;M2jqDPB$4*O|1vS% zh-Ru%2f1iC@~M!4_hJS(^9ggO0Zj_0G3+(8exF+wN-<6kWQ>!+H`$Hixnxt4>PeB& z1PvYvLw2c%9JF)r8!?W+PVMf-1aIgK2(L3+d-*UvqWeO(g)pCKaxzuMBJl zZqXmi{0ni0jBtR6xz5oStCgO^@5}Xw(GFmLI3iEe;>Gwi#NhdemExm$6VrO)z}khm zmO9+OewlFrmcYVjVOkNr$@<~U#ni*eey6Sb1^uj1wX>=@yh*|~Yo#I-(CD4EAd5`oJ@AU2tPZOvEM)y$9 zoD3-L4Q3zNFB)MyN5gxOQUxppY5P)XB)zFI#gt!LSF{IB!$Rwh9kQ$n9}SeX3rfy( zs>;W6W3%})8FvfuNB-aPZFi=w1!l$`Lx53{@el=*l}`oVN z&VovaVGpF6*Sb2U{O(EE;K?h`2GM9Q(=>EDXX5W2|L9)ga<1#LsH^Yc6M9xY*>n$) zBtvcFT2bLze#4LT`0O{{tIPZvo67Jqb-$rVdN!#a6 ztw6@@c(o7ow4f0C1rl5#9U6$f=WJA$ajv!0`2Fha@PgQz(V*(#yYkW)YYn2suG`3k zOORME>Q6m|iWNcGi993N>pR>Hu!(?pLH!Ukx1)=77QifKR3L;FURY3?=e4jX0;U-v zBu=N!8%B;0VGb~{o{2;f)|b{TK3*6dP(M$`Z8AG@qh21rWQLC<^R6XMG(Kl_v9>vw z;lR5iEob#6x}%Jugc~JFDT>z>v#V$l?G1JFrYtm)tPhZUnh?z?EFTFczeoY9fd zR_svOsl6=P!RA4O&V%tE(88`7?8@Uq?cg!%%p1NWOC?$a`#6VW5*jA`PLazIrmHEcqNDBd`mLrvyA!RYw|TskRE@H<=Ne-#vgs1nW6fIm;{?1p;9!M^ zYYz^$*8?GlJz8ND)W@p+(J`T=`E)R0|4LEx35-EEAHTvWdplZw0B$P1aBV|;mPPOS zMEtd&!PVp%SRs;%CR}PH|7sbE2x21)c>iW2YXi9@V!2djwjO*>$&>^PoJioRo7%S}~B3|~?^q%2>bo@d-d z-}Xzvctd{=(r#vHQh=FMBaTb#I+b4vssVl&=PJ*`u44@Cy%}@&_wfC#s8u)OY_PAd zgpj%K@y+l4&$6(2n5BBY-+RgN{(YX6MQ5mk$=pI5N_N#xk!n_T9=UNtjk^XfYi)8Rui1w{ZWOh>Fj)i7~dZ^_&T9Of&B z8|Ucjbsm8c_4D6$Kjx!SjQ0ccxRMAFg3O?19-RLMD6bajWj+S)FvLB|>w)B0 zS~Gz+sik)Ncr%Z_Q%3$ToVB^|%80zQrwRQ@P9mO^SdFZzJgl)0Y`ZIh{Cr!+z>jmg zI!g?8H8<|wbqApTr@JgBl=QTbu4U^8!~z>)Mfa4P=X=gjK(bx`D><7rYHP1U)YXff zg)rJ3M@YsOWmqxufgTE&gbi1$q90UScB0jsR#G6e`OO3-e^rtEyGnarnBBV0gTHQn zuVi23XtT-zftrO=<|JPpx*78fTdQehhNL*^^@=&iyC0Ty4JteeY2K+Jg`WDloqOWT zAy+YFg0PrUKPYk&s^6MZb%@UtJf1tO{>RiqEKL7tRLOPfI9t3f{RZe+Gw-mqk3hpC z$XSOgh!akmgc{nfbsh0`;_dOrlka?E2AP>}pmTqHgYlO@d?ZMMZ*F;;xg}*XnpWg( zAqB|YM`u6kDF??QhVg<26-P0|`dq&s?L7CCWeY^(PIRj!V{&U89%*H`@ab(sVGF&4 zOQ*OF&%X4by+;iFOf#<4C^wDsJ}MDL0#R#>Dtv% zde`5M$U9XW829RBo%piakP4a^EszZi_X4f%!hkw#ua4>j;4a3SUSW%wzf~Pd!FL24 zNyitBf$Bh!l(5e@;_}mvSv<;@ujFeIOh0g{0hMDhZj`0)xS3t{n97UD*%AFYxn~Ac zLq+`;f51l`Q{n`pCzb5`tA-ZbgRo1;ySnjKiMt?b?|{=c%V)`1C(wBGygZi_*C1Ii zYB3MK{Q35B!4{Nd4%Blegr2@^nWK}@SCe9QyO$q!Nlp#W!OW!B!ke;Jm0CRsz!Fq= zQ;!Qgz`#?@^p%v&)|7zxc&%h!bVbjdG^1K|8SIz(+hy9G)M7kXH0BNy==q9Vo}lb_7l?T8WaS6|0OG6{n2z;th`l9`xyOBOnA`E7NGkW_ONIOb-NY}K?7nHh`>wc^|4mLyd*eSQ=v9`rb1H5! zjsF{{OPK@^hxP<0zWJ1v=W$Q~iSSoIX~^n|P0qd&WCq9b)X>fRUA`7lRixIuHQc(M z&(e>4$78JLxzbrk13>x3W_azEgn5{Gc_|^#*PQHgy4&(=RCQfm0PvzjUN^k)nr#1A zSy$H&lJ~$=#En@7J>lLmBo`2nDP_t~PQv*j%bXf=PB+0BWA=@juAd|o{YL?gwM(6~ z@tLz@VwC&4<-zJGW#Ok&vFX(N?EV@qQm|8@zmzeZsy8SLm+0xoOgNd^F4EaOu;KEb zgD%TwqS7YyRW@muWc=?A;zfy`HT2EoTo;FE?t5v#jdmRxb4Vji5uf)Bx)EmL*ZQsyxj`+!R&aB0AFi?%nP_BPhmBE+y z?tX}xqWcJYP=s{&)Q4!y>kz=3(H8Quma^tV{-f1c&Lp=#nGl+xEVb9^f}BMbD`E&V z&j8??N6hb&koM9@OtSD*(4eXW$y)*uWe1CSAf~gT0(hVdpoG4AiuE2g^mx?8;?{hh0g7kZNmmB#_wHzqHG1bE*b>4tk-3-WjQj;`TdGmdf4f3RS8xE$AY8 z-43?i7g0s?qVuWiyYHAM^BWk^2G;n!?KrRM?}9$YDBW`<8#n;PenvD?tEq0D`LsqN|ChA{-5YN0dL8@s}CL2WlCo#3(m#t%Y1%_T|* zoUM0AMul0g^m4Hyy{2BF?`1hihVdG&EwlB%@!C81NXu%tgQfk(LWP;o!6!qfUYz-N zZbZMG?p)H_+88X|mH0?}V~m$NRGB$=)sc1xIqL?~`%`E7POIVsoCJO3=dD;IkRttd2VpY1+hf^+EZv0jj`V zZ{6DRW^H1j5vhK$LLvhpqLU;^55g0Nt%H7e_8HdNCQ!bUK<&i3@lc&)LGk;eysfEt z30{CM1$Asqxn}rmK%c&<^JBu|qHpC)jk7s^7NLWYuS**H%U_9t&cv-`&Gm`ADzb}u zqsJ=~1)jE87b%S6%~=285-YS(k7@my&eszxk%e~&P0AIZ@Ffl01Kj=6BRu!ciYJN? z%YzOBnX^;z0jFifi`4$bbjkZ20wmfJZAV0Dz#Rtk2!Z!VGu>-;TXy*A&hiwFxFh^3~tYOUI?wkK9ud~kf3&uA_3(~sQdL>(+{K`I+^|(ym zBK)T3taCxOVNn0vSsA_xFSdM0a|ToEtO>?q#kWkkQFjDdgcP9V>279Y?|g}K?NzPa z*AXHjeR8g?k+M)OFzNI6hIoN+OU-Fz<*$5b&-aJU>z`aMJ1gB2mJvZ=b5F`$OrH{^ zBK%>x$u0@;WhmLqGEsl4e})&!#_81&pWzFQSepzmQf?kuG@DEHb?KuuzJtP{n9JMz5Bv z&YyO(WB2+=oH_MmoVY`S=&I#;b3K`_jyr(;c%ZkKh`(|m@5HAds7sWVosm}czh1`9 zzZmkpCvW1z5K($1zUN9u@W0pIWdT5q9UneMys9J2Y)%-_WYo;uSytGGr zQ@ngHGzuUlyzH)Fxm+vmr%rqx=H`&Jo+;^?lYv!*dYG4>uleEV2ol(w2U^(vRi&}{ zHFCl|x3Kx?24ThJd4;qCMOoWJ1_-gM8Ywc+!*y zW%y=r8Vx*b%Z}hXD+_~X0Qu!2WTdQrGX;%RlzL4+;091Ao8!UY*ZcvSb|bG7GA~N` zTq0iUwNse$D+=`>Onl{moFj-0Bq0A94BZyib(evDtQgyW#IGwT3F@ni$>_wgn-ZuI7{C1&@UKPg+N6m(QM-7XmZZ@q3NhfBA zpY#9jG9*>QFHYR(j~jJ8?p(LmsejWz3Ez`bZ{Xf^6-X_s{C;oQ6QJkIbhZ{a zfoFJo`}w`ryW}f{wAXX4Fw81~zT{Gs7;^WXC?2ab_azJv%Y66#(?3Y4B%jGmw~XGf z`pxUy_-aEU(Aj@4&Ezos<7txQYhkyXpd!H(I|eESzrpnY&KWcZn=ISY>`%0B>b~Kf$fS?K#l9 zu{q!+uneVGJ;Ge=nS45+z0UaodQRTZ9TiL?lmgC<&fNQJ2b<2_GGkf#$1IkaF~a+; z11RYVHW~lH*nD{Epxx+_r=q2Qwjcn0L0Gxl>pXijkC(hg6FD?)zyC-@p)mx@$X!;v zPie3$lg;v9q~Tl6@Z*5fVStP|XrItBA=&FAz~BzkvcOqWTj~k*827D0FDEz3P^gtd zcNCh?6&%p4aJ2hbySXQ8j`!TXe*<5n7hjw3^NQB7Qf?v_CIct0a>AyADDEcczaTHd zA;;&I>G|etF3`U6=YEq#*`0hXi-C=i@m`UZ-E_&WXdXw7%n|f%C+_g~K8f>Vg1e&z z)W?D-FjR8}rY^JNUVP(G7JJ#!)j&k?7SB4jG#O70GJb1P1)rQ~EpL%)&QT@7 zv?e)i*zp8sKY=Dz`9=wH!%=*dskg@?Xyf?>bm+x6Z5TgGkEM#o*t`yrpHt3BTG-=( zbKga7rFRWw>x#uppyQRSN?wG$A61OZET}j(E8kGEvCC7D-B0R)liR0G<>#&P6xjhr zUgX7qDR||KSHRf)NOPUTJouf#o`%^Gc?yJbeJ}{XTbQqrRY0CHOrI5*huH3(XnZ}9 zrx=qy$#BGJKxKRda8Joui7qd^gUVZncH2#S6wa0lu>xvBx zbvDDitz7gV7e4cY0=8!iA?>5jv~P{6i~g&qrogxFEktYcwzU0>_8RmxX}hlSDjho< zBv&KG&9Jup^Xf|LTB+=DKHAem8j2CFXaqK;GmRwqW4y z{Ws))<{Vcayu6hhB zLfWu8=C6Cva5QR`A?mF1GO12C3o*mFs%UtEjZ8b9Px@u3hWRxLpwEIb~%eP z|1m(rN$RU*fn~DI3%lS4Q>W9@R!N9by|KTNUjk3#H8+y4x+;jwEq?I^d8tzn+;iIs zF~Pw?=JE0YwTw&OPkrlZ9#bI+K67dM#+Em+xR<%S_DYT28*3ZuuB z52RD}t3ulDb2B^(zV?d_j*nWIB^zIERG+=OrY!s)go@I>PVF5Qs zOtANTN4KTh!_8~)R*n`9(rPcV)$TOk?+WLUmA6)u%ho=SM`&m?V8lPfrfGKu?&-JH*HlvOPn=4Z@M*MNf{t``)b@I0;a8sJBP=AJ z-0X24tD)@?TE70Lzby1`&Li_%f&z|Sgv5OldKS4e6m#<=A|MyBPQH#8CbggD@|*SH zy~euqIdn2c^t-VNh_}1DnkWp_8xi9xGwqW~b3UDL)*l3&IOHwvN)|U#*3!mX$lSE- zV;kC5mbmDu5IfBVH3{p3J5gTw~_fS zU7@u+AtF+4TS#FK5SKyREAaJ0wAen0daacos;$2NJgu?#Yw%2DmE5_PX_pJ1iN;{W z;W;+Ao(+Of)S(8lDxR6ap0KS;2hZCAL(XRhPaC%|V0NJEin=>4!&8EQJ9m_MY|v1r zKrufe&^*q6pQQ}~>fA}^7HdLuC~x?d!hbe(n_!>j=1irzU{CZ>|dt#m8xFyeZP+DoEKC;)DN=GIAJMPlu%roFb!d7z5?< zM3MI#)~Uh4o{@Koz{!n)MMZ~%*~xUF^?#n4Y_6EUO{aE@@_m%p*n3e)j4XEkckuT4 zdK3T_VO~oQIGg~TtvvfU06#AqXnH#iiQzf;M*;|SaQ(#|E5g!(xHj4L)f5CYOdE4N zqn$0%`JHh?bH}KD{Vf`NP}xwK*vYBs_vmAd9&HjRJ142^I_F^u<&VA@UGWdp{ec0x z3RO>iPrS|UV*VjA~*Q5z8?(`N0AmIfFAr0Lt&==K5gzW-4jMN{{-9UA$eLNGXvbi=zEfY(K~js zD9zwiG-%8%=4qOlRbJMmbS3$HWtk1G`J?R91?_lodK0Sf1eEDu3w_xjo^jFZA@F0T zhsKv~aHZ|-mNo}MdPAi; zznusmT5+slU;E5mV-&`XdQAi^x`XXJTY%e|8<-#JK01S+B?Nq;MA@E0uUn7t+EC&M z=aj!eoUe???c?wJ$SkRWkB9TX>>sP~K=nutYHSR)8jsoJ8JptTeqQ@GHdA_?``ki{ zhq?Q*3ZPJufvVBrc&21dYYO-vQ3CsYgY!p<76-Be-#*g-3>$)iX7nFMkP2!of#!s7 z&3suUg+PRQsR+R)lQti-nYpNFSg6+2nQHq5xNvhL++iOP(Z4*9!y2UlIYs}Aj>SA5 znDeM(kn&7Q_&CB?yb(A@KYcwDeN+0@a&P;O0(@Tk>%(6JZvL31?Ev8(GynA8|5M&) zo&`|q@kQL*lxaKPtEr%JIP*oso_f(OVb}X?&OgRJ<=XEl?efJ*q<>)ny^W9G=4rg+ zsm9)?)cMQIWg{)AhxAWF&sCwSUeo68Xs9?t6TK@jssitfCxnl#A0b`|NAcwDnc2!M zg*GvzU6j~sKRZ1U7G@yM2Eg2083qtf#QgP{?tv6W(gelyk5Rc)hcGqI8<6VxwOj!f z6JmSoyob^zrmz$ERwPTx1$N&;eOE%By+(9U=aBdktbE^yy&P&YJoxw7c+0WjcndX& z=K5}YGa#K;^z}`8!k1`{8XbGifQT((k21diJXu6k)UOts7b3lF<^~V`+EVosZWWk+ z(VwSeyRKMqQ-d-w{iiK0hr8U3tKv@5Rv0Ha# zgz>bMhAeE@vr}ch6JY!EvbuP_@|{(i zbAggG0+Rd!3b8;3jq7N&?)@^ZTMuH_MH+6uJG&CT?}g@5ixz2O?Im?7buAnVB-fqN zqM~G3O|yZ62d_8d!Iolay2SRmtRb|DD7SLxV(n|a%`Xb8rOLj=U|;j--Apd={ZpYV zPOsd><1(T|dL)tE&|~h$UlJZk)(#EVvZS|wJi-_e5f-TTT;eu2~Jg16ntXm7}47wbE2=jGMvKM5QD zjS|CMQE$>_`KCdc=XT7I(AQV?xw5ojHxa$la9Dj@1#v6c(RTR$X;(8lj>SP>L-<4> zsUrh>;1eB=RSsis7UCIo9?BWR2wHaD=LWfHSn|Q= zv0r>&(Rt&7KcT5n&puqfmz+kGa?961sB1)bUP>F`6_-`1wmKl&&T{Q2eKzsdOCMbr zDmtdoCtL@ewzB$e++3u08%|ev{dKldRLE-p-j+dbQw8mJ0x<-i$tfX&Sh|Y8?;J@J zt)uZay)$Q&&1HI|r$9DD6SV9Q;pLpTxl1Y2Ni7_2Av-DJ(XeSakRoubFq)C#X3xGj2-+L5&K>B-o#QG&Me6zS+XD&WO~38GhQ zY20<-c3c!em|{WJlLd{3o4bGetmnKxY_@FnZ}F|11t1}Mk7Z$e(}PkCp6t2F^gl;V zYbJ8aPpP|ZPGub3Y5f8@WgpKI_AgM_pJP|E+iVDz-84Kupv3Yr*qv|9Lj9(tZpYh) z%Kw;E%D<~3t41mv+51Pq^JfZ^U&BC3LUfjkKI56h!p*QfRTIq2P+os{K1*|>StNQE zKV+4$A0hOd;KGX#`3Yq(dLfr6l*hz{4}8~5a<1UoS6kiwn>_T(+>vSV^`O3q_X#aD zZam?b-VNIId&|1U>H!8SA*M(T+X$DW^*SKtZq?9woXgGZQ;u!WmV^e7uZ-86tz*ai z)9nU?OV}JpSqjcQn1QXP{OmZmt?lWrBOHAKpRx^E;_o5W+I_a7g9r@~hpp%un)wf8 z;h6(=w{HsUX6yE<6>_F0Ox~VM|2q3x8Lk??;5ONSx&hKybi0~!er<8;q{mxn*)z+{ z0h1v4W!0s&QYF?y<~KRoE1r*uHZJBJORIz9CeCKho*(-qlwFD-48uB-!$4czZK~~~ z#3@gXk31TY(cu6eH=lD)LNm*1kiq9Z+|OP6$0gTw^~H)ULK}I_=;g|Cwm;=0thRS0 zZxbJI{no3(#Gz+Nm~dtQ|Av40{kq(%M370He&=2$D)Duj+)vejWuWXZ-pUDyW1u6` zIHV|@w>&ufnAsU{Sfc#IxoLdRG;Q(vH@VByj8U)y&IngSE21EL{Sjx|>^1b+6Y{R- zM!n?R^-s~(KZ6|vc;R2|%?h9Y8)iMp#XV*gjl073|CsvHK&apEZSpOZGD#U_t0*C) zvK#c3eG3(3D-_uoJ7biPJ-cj^J!H)~_H~ebXE2Oq7>sq8G0Z%le!u_!d7d|3dGopF z+~+>$I@fg_LmBB|Q;q0O@ba+XX8I(9&oO-CcE(JQtPz~=Fdwq~;e3Jk>VpE6J7Niv z5=tHyvp=tKEG^xBLeYK|#^Xq%;paCBH96kg)5g)|!gg92jTPvJypEh`ox9RXP_2&H zK|hxFtWS18&taeO|LX-{Ii34&`HdrKjM9%^6|w4`Jf*w~0OJSu4=t4&1ok&>>hxun2pLqi@`c8fe1_c2;O(RJZa3M; zdWIfn95d6U4y|B-7AidnUN0R-b6HS2H*(ucd=F=9OR{BpUhVAufIxBYy@pEK*!7Vvwy*?Ooq^;^5?W2FDN=d>@M_qsFjdHkX;ab>=I!bv%=){ADw(wb(m z&lg4{)UPjId$_6n$Cdu=sHxG_c<$t8Mz_7va5~wllaV@Ww6+3%{{_10>V}r=#`^Ig z{5owRh(7o-NUnE{pE(2lR!@cza`(03GN0J6s7bQZ8?Ra}%d(!(zC}{@Cf1W|kzwHk z1N9LP;7%f%EIAYt&*ly6TGrE!FRBr_F@Etq8qiCm1E7KBljrjimYgr4HP|W^Q>Q7v zK}u6KPMBpYvn8`sopbv9hot%(+jz|Tv87s#={7$D=9=N}{3aTPF$a;X{_obXnW(fW z=>oaoe80Aaud1yf{|xqIHkh1vbhwApwrSLDL(wJ@HmbH0Zo^ZuG#*ecEF;hEG|Vr1 z48Z6p8~hzQ>F#2r2(U6_227XYIa3quO^S^FgL}Gp-!3J1!0Xs1*G7j664Fo*ey*)Y z2*TDsI=aZ-I9HA5udy=R_4x{=w#u~Tt}{bwn`J(L>3%A+6r`Mw2Z_kU8g1T=<#reG z{zd{CJ%1-2U(h{*hDIG-S*)Y5x+ZAZS5bFra*HNgCwHJ?L;Fi|8yoa{G@b4@RPScW zvmhAdeP^+WD7@FBEI%k-TGAP;p>c6Pa@INfa?)8T??qMh22JyLS+j%mX$D`3`68W( zZ3d_78Psh}(4_Hl#BirBS$}G6$jR_ZxlPSqUKt&0MyRV3`ZlY5d zr$~ng?=zenP3X1d_-m^bVr@KK0uPsF9M%^^xU3&M=K0E>uI(Y$!w=?6>S*6JT3?7Q z=MwmJdmO&=ju$FLoxA0EEKF6RF>ZK?zqJpK;^{Iz=!x>LF`Z-|@&d1(<=iATpLXIW zXh-nU65p+p^FEE-+e8lfLry2amsd^jrLD-zioBF#-3EO{Vu92{srmb4PEWM%GDJm2 z&g#H(nldwxdh`lus9pSALZgx^NvB^R;~}QQ)0YL3z#9~kdU(5&c*-kb(Uz*u6CQ|Q zcrHRWWT%|SZKMQRGp3E^>y~EbjlbM24_El*2s1WMiVSb!GX@BG8z`89WLx1@T6$F9-QrJlH@=Wt)oyy=xe za^9~MJIM(FhbStEYPazc=Zo3?`Sn$WYSyutrmn+|ev|UUL9qL@Sv-O}Z?3IDio0%L zWBkwAfO!$YFCz?pHa-CjLt&joLqo*I;6Z4(!bd|S0ZnUnKmyzpZsUOvY5mB)_00eZ zS9q-Gny`4%iOZsww<_A38Ina7udUO}*l8wo3z_hRSpVCK<&Lt^ z4R0%Q2MyTkBV=o`OB(zuqAs7~LFR0*C;~>6@L#E?cV1WS-%GKJzO<2jPJ}^f=o$v@FL`Hkq7;cZEHF{eGTo) zdf23*L+w0}7b#m9!H*p7P4jMMd1aBc*zUw0+VB-`T>5WSt5nD`Y|8{ znUT}Cf4+%1RTc!!I}7~(`JwMHz>Mrk-dlN%VpjS9K>V;s*&nETX_nkPia3eLfLkFcoJ!WAQ3p0xXhWhR~41;Idsh%&t_o+EY zzwy>PDXetjXwUs-XiL?#y|$727LNP}J^wygw7Z2bSOG}%x3_gdF>_E;;s_<%={SGw z#XhU=!TtKx%kSHw<@@I+{Q9aPyy4|cx<4&PZcrA62hw-KQK3y1i!7o&tHhs|om(1B z3HuVE*>~(S9*M#;W{a?d2@Fwm#(cw1{6~!*Dyqw(^u?mK4qcoQ$#gf-Hft51awYbn-n>v#&B$a`!6!5D z<#XAQ0vtTjv-bvPfrCu0|Dyp=ddNO+^PBeuj}GI&D8o|vNg%yJ(VPi}jsf38)DL@WqYgI8Zy9h)*6gE2!b4{p#`Yg;F zU~DBPcvMz2ncS>oZTGbGZMCPLLtVsl!;)ljur8~dlRZ2jQz^Z=(0#UE~c%eOCAAytFtRJnVe%wNiw7h49?$*L%2c z2=kUhV;LL2{;(c+)%W^og}})4mrSQuu}t54aSm>#VuEi+u8VRAXrb^w80i7%RogQ` zA(!#hB!lc}0{oz_RVb+_M8vd(v!{M$RYMrI&toRP186%mU-d9b>+`uK32>G8xj@a6 zL@+Q2Qh+^}P_Eq}PL(<>-g>W0b&zoT@!B!EgfgFytncu-ui_y?$1BYL*UZK^L z97?jX^(@lO9LzkZyCbez+ppe$Pl}d)2B;G>*=N7@L^XBC@R%ua11l1!0r8rd@p077 zdKV$H%W8J+a_*6xYbcdiRm)H0r}Dk%BY1_+(Q5X1Q>GKc^Pjrcr_`=a>W^#XC9FkP zW4{!5QCS|f?F81n&`QG8X^tGtjyd8PONt#g)Y4}xhj~TNVgQ;}6SB77^(29h`cuS5 zn#iN^r4N+AM7MwRI`lr|VJ)LayAW+^I@(O`B^Pp!`@>7FqVWS6@7~vWd6J2*iO5sh zNzD3pCZ=tpyF606bON+%Oexee^Z={77h29f8x0Y>;O1IM4h_^dl+Jd;_pQpVZ!phf>oU3|05t z1KuEvCk7VhL~039>ugi<6o4d_xS+h01=+ZILS^{(+gcaYe12_UD_AreGzYi64eEL@ zFH*=#vsWDNb!-}2dDF~VKLWSW z9NwhzT3}zBYdi+KOt|^{%U)!POxRJgcJtW4S`E8iSN%+SQNkpC?5xGA@1KnWZU{lF z_@%`46OmlXInV1BH-kvI?yGM^*5ykH&G$=}nwt zwonu+Z1VIAPcvRAWW&Lkr}kl(MGJ56*3~AC@+1wNKpT zU4J5Xdo-_ueyeZQSyskQ)TZ6z`iO1QU4IMHpY9Hf(*Ct$v}{1R-w~j!&`@UuK>UWD z*Im~?EkepT%*d#DZurr^#I?@-WZt^9mm405?X)Xm#rwcv&MZBs} zFKXs}?A*7ivezR(Z`9ocTf4xyUM%e%|8x6UO;ac7fyqc4Eavh#UH^+RR~x$L#u@kr z<>uyZ(@vXxjclb7hYaj`f)m4Z=cov*KbjJN-pH1Pt}QgycK-FL(%tQ4ki8gCPbTW*yhjZ|84 z&zf`nW}*`ltT9{=$wg_CzZ5KR0A$_;fpr%W!1VLl%&~W?jb(}Bs>8Y`y3+sn?HdM6 zfh{0q#(&QnzKM-4Jl!^LHK76hz;SZ|KZvVfzIIiy%4J>Oy8*N-{@t){Whk6p8iYdP~)G#|i{DW?3o7uya0L{8$n8pO^X95+8URB@u)DZiw| z->{&RYmpwVJ#ha(j6e zp9s?$(~S9M0#F>*yevIu<>Y?Jc5^ihV8TX0P5XA1$i;lKCUKfr0_a4hXT^?lJ_79?j1jQZy< zZ|LJ_X8??H_);~RyVw!Ap4Zb!2m7{PJojytoCV1R^@zo1chWQcbC4M;v+(C$lIT$D z>^8giw2cgV$H-p9qACTPn7 z{|aP+q9KGAHWaT*JJ1z^Et#85*MxC%Cqj#W2W!Kvp;MX;kprA&SNH_?j;Q}07!9WL zf8k4Tn*9xbBImlFJGDCb9A9fDX6`sHeKX~^%fH7b>p%N5DKm?b+r`Y4EZdQx{DiZO z>VxW8tpD6IMqZqH#79o)2%RmE_{^ddb&Zhr3m`CB)#piRfch{D_3H`n%|=HWyaPck zeQlWz!0Vk19u%70q^Ti{^8A>{;P-rk_Ji@l$5HG{Pex7!{{|ViwV@xKGE824u&4eg z(-6rQt8Bj)V)amY%(wt`6|;`Nic2|V3_(NImcNV0x z&J2a0TRhVuS-4@n%7`D6njDN^-v)$6`aT`OQL+Gnzv2;v9ueokfBDi6#9}rp$Xwq) z=VWb6Gh*|7;(J`U1En8e=xTUwr^|Yl_-sRbvG#myzQvHTzd_0GKKro&7e+DlZ0b61 zuGm0a9Gob@BqNhfIRief#^k+YPc4;x)D{jmqUO9AUD4caZQG_b@0(GM zXhYwSztzIMBo_M^^sX{6Pr4l3hxPU1B$fv5Qsc)$Rpp*Wmz$~fWlCTD70w@p|HS*f z5FE8{6Ky$SXnJyVg7l4W`ev>D#RVazOU)i&Y1ThM>(n zAP4vl%u<^P`80&npbL$-qwX~S4A*`mv>m)~yfgl9H16CcrnwnOJ>Ez~Fs-%G1tp6J zIQ|MJdEaGv+v6=!ih`cE-W5(yTLbbrHvC{s=x|``ld&1arGA%KpAeS|py&b*^yhx7 zUD|yRSOy*OF3Bg6Vm^(YP@B!X44N9P&E3mw&98KzL^EvB&*t693B`bS7PeA$z^tbEcp}p`PfAO}wN5h0l5D-5!8!2MGgOBe zTei#F8a@kyIHSHh)3=DO<|cv#>}_gtEP`^KS2!=ncpPTd?D@VB2|npIl>1rOq_>5L zSgE$QUAIc|zRjP%S$6`2&A4h^rxSyz*o>$z)hGrvyB6e=U zxy)3>R6>~y7Cug-X__DF6Z;+yz5t7wJ*YVporyu;B8bxVL~9zZ%dkN$rEpLa%OB)B zSe$73V88i*6xkwAJZ-`7ienjFfMr`hMz;>QRi-TkEpM6L3I7Vf10bn`id)>Ah)9y zlmc~kmEH}h4+DS}$35m<|HBiet;7<_A#GLJ3Y7&=;!>h{^PHre^UbW z54eywX*1@CXkk0J_{qU)`qRNflnI!Breno9QF(_?{1vC?oY&Ir_iE9-=xkJFzQmzq zN>_2TX$|qYp5MaotJpOTL$T1#M6JlDUBKSkIuQK8B}+Js)um}XsTjz{yTd(~0e65w zVN(t1pYhLiEQq(p1XQx`@?<$sTd%>wBvy7_G(1ZQnZtUQdiXm>HRF~ z93bnkyVQ8PCR(jTl5w8%BBe!$e zflO-*bpxv#JzYz6IQ8jAV7#FZuOBJTotCf)Mg05AesY(0WuK;1*{S)i!?XAQmS27V zs<+&ukt%W~4dPo}H|N)M2_1gAz;OsLinb*B#qAzw0yE#@RVCRf#b|lcj$y7dNLj^j z3)3q@gZ~_C(hZKYr;^$&r0xch^K8o+HKG#+?m+g^al0i#)$xG7s0QJUY&4*5!O_1> zglcXQ-$zbLS%tYoZ7kC(eXfsarZwv~zj{(R?tpl#FH7>a!8b2h514j3H#Pq*+6 z;taq<8mazvRBX7Y1V#`PJ}duVjta-59!4$_-O+gKl9J*zNf#$=J6}R@V4xE%ny0UV zSE4`7EXOy3n~y}O-44|0hSjw0b<3TXPGjY!S-!GCpR()!sv9JB*9HWR z2^&E2l^vfKfarO%-c1wIeVm)fTc`XXtVrt(p(D2K4!?EC)MafuiK_I%lHvjTwVu4+ z`_F9cA4@*FQN+)7<8=7LgFuuR-v1~xx<6Ece{n&CoM;X-$kOZlh!gugUmdCC&cqk= zNe7=Jzie>2;R0^MDK+qVAACW6uif$5H&Z^RhTSea549a`1UX*Imh~ug+k8YAj@cYD z2GQ&{&M5A4224wGDj{@jr&d-cZ-2jr=0=|C)g^PzC%8;2@FdT1_@I0>d}hZqe9oBL zOM3zKYLh)oY*33ox}cE{7IVQ0MnFd!SYHUF1fcTr*_!2zmK&KhD`BE9ZKfVad5`P> z5@A(wP;q&~Ovy$8#{ng9y~k&a1D6IjYGLhSl&I!o*H0!e4|yzpp4T&KzLwb}s|Y^p zCZ;%2ce#~X_EQ<#rgAY!ep^L8DPwf^r`@O0kg^ zhJVvP7L<2V;6<*x@~vpp5;kxJv;Q09Tn3JrohYr}=w+pV*IT!^vMrx^>Qb}e2hoMb zj&<*SB|Tj|Jb;b&IgiEvdIQ%`NQ|fOlkRql1cSdOnJb)~J+M;GG0>r84(n8Ox-r}$zG>x{o#(1@3 z{fw;t6&xFOVSv%#EQ@EKcNFxgV(HB>>}xRn0hAu1pt#LEcwPA13qDG<2{S4Is4$iz z+`Y7hOQX1@s55mFQG~kh?y5`~Hv0I40F~DAY)E-{>%2>Y(=qOaT#fjym z4{LHaN<<(n;ofxL3)?IW{83MIEJG~~{k=$8R-3A`Tir3mXGFM~9y;eh7g=}<&WIF9 zh1vfl65>dMp3RiG)zDMm9f?kztS!W7PQxHS22qSWer3n}v}MF*clu~~8pnn-4{1de zp4m9KFUP2;Bp`{X{yo9q*fTpe-8l0|HnPe%c4>LX;~>Ia`!qcChO>M?##6yJNGFzX z4=~s~BBuCG^Tn&C)ilrY7_0+w*)T6v#}t^_-iLg{f2!YZsvpU7dUQ}Goi68Cvj>d2 z>@n2Rkf7rILs}C4c=M3P58^J+*>W=fqy}5dV_O#JqxjlzN4r3}%&6+phYawt|#?T~59$$|o(GoeUPhkOw>qMd9Q>2|A=dqsKt- zreDvlUy-Lw4?6zA91Wu5WLCwg2A!}H$yvL@mrjtKR{XJb2I9*H1jCPa359n)*`3!( zVLctr7&8$vmG?q2OE%^)$^c0B&l2hIjOgbWxOk|K7cHZnzw1}q{4MJny#F-wA)&27 zb@SG;V2Fn6t(9oyDYyK62e$z}RaoD9%s;?nQ43jc9}p*@8PH^DdPFTL&cpf_eL?aVI86UDZCq#G&~Zt-=8P0ERy}+k6CuMs z;{CS!o;qnse!Z^kvjPr0e;sq((9amnpep*sbAIld0(0WbNRQwXtMMI2&@Riqbek>UQ}CrU99iE-!BY*?@hZ>u>OF1_PK(xZ13xJOZ?vZC zt#n=HEop!>U(2!(MZ~Y1QFH=d|9Ab<_@SboP76SPs5vq11a;=qFikV^Ht#3F35zQX zaF6AAwzGjClboffOjQBkl3`o3-7+?~C-XO6y=pX7Oa-2(vve6eKP;b?a*ttKBnJiL zUViy)lZ5d4FX?`syLM~y_f|T3S=SzlBlevA$rex-D<4m3ey7o?Jt#g}6=^A9=2V*S zpXMO<^+u#K&*VtCJC3>fkI@Z3lmR<+to9$vOT3VKoiUiYKE}5q?yZXcxLQJ;9J8s3 zRBVUDTWqv{J1x@5FS~AE8;TH#NOW~S2k6PDV5@o4>7kpXJB1cgQ0J{LjH}dbT;eyuG$i;@f(2 zWRlHay-y9JqjWxI%;>_lfyCem{@aQgI3IR?bz^X+?RHu;iq)S+TUI$@pt}%f)xg_o zr5YiHYUP9d61&HH4#b(Ul;*XhslF?{n1o8pK=hc?(&FA*W*snrNrn zk|2%o!A$H0g!Jfl;B>5{^;WR!~N{O?shl4S#s3_Vp>N1XQ2ZOEg`XL5r4&2Q`Sl#*)9L7a6` zKE|Cn?H@+S*$(y|`SnjQq&()i+{muA!G2qssb zJ($@!=Cizf!CWHsp<7oeqU=wI@CER!!$YqO*}a9fn6V8~6O~vhS=un3syEMVuE-|& z($y=>xD4QtA^T~7F_0f|$})PZq06bFQ>GfaG!I+jKmq(>h=1kG5uU8qzdf-Ls!5!h zfWCS03^93{UU&d0JLZ=1*fh%BN!SkUAfkI%H2Tf9o}&vW~#ZhuktNgZ-^+4++_ zzc8RQ*xqY(f~)??4ab5Hq07JyrQ z;m7=~vM>ar-vPD&KXkpGMm3rPZ`E%bqNNuXP2k?7wLC}KwyiyZK_&!cqU0UMfqXcy zd#B`V&EGe={6}X~2JeqaX4_FpuX|rdmYf(kjZ*}k6ivEQV-1=;nE|0M*Oxm~CthzA z-zASQ=v+kqihh5^o6jJbl6y4Qf|YK2OqbF82+7cb`n~ZYm-X$U{X#cqlzFVnmyV?0 zK}$-}Bf5RrAdaXU+BLfL>QGS9RH@&J(D^~|(w4pB=(-<3$uS2^L?;L7Pnz?@g9Lo>-8LzA+R_R?T2}a}lOBH$Zr5;x z8nFJ9(8@0&nCv_ETsvg(V*ZW~{ic6m%m%&w?1u)**eRyF7HO($>v?G{ldiNu-HZ#tk>!L z_b)N~CtBnA`lqdNhTY6hKy#`hzHLh1gQh`2OvasrkW^5HoLi31QVK&cXlOR%V@Ebu zDjFAkV#698;a?LX;?t?=V!%!|5EIbyTRdJ5kbu?aW47`C{OuTP=oEN{g6K_6vfRc& z`Q2MUEhthArH2h$%l+ko2vs?*0#4mmGOHu3z{BX{WVh?#a}u-6^U57=BGvD_DQQbc{hJ z%8hY){P=luKUGNFOn*Ogi6g|Rq-3_N8M)fOi%xP&imisF7Q>>vR?#J7pC~tBd;|E> z*twaJ&92f{4cB&1#mPrI*ru356vzs=0RIjF&_94Aj{6YU=Ze(udLcDR&V| z!)9;)d?+->cNGoC+oChi;r^vFF)<@V0z;f$1x5Qh@xB%;Hp~? zgCihTV3B1kkyg1^bYYj1iY!vAfWzirQ(?KXV-TD+%p+_B)idY8QXV< zm+8_qgYIq`8~U4{@qYQoh}k>JnSLSn_>3awQh~Ih_Q-|mi+)xN1LP2~NWQf4?`^Go zL`C_=>%oSE^=IZBopmGiVbFRn!p5KV*{tm}?jf-f%;5$RX1FAD@`{KU@e1A7__eVY z$YWF!DU{@Wj0vy|3NmJecTHrbX8`97l&#Z{4MxTEWzzHG|BM=87CTOT)}&Yy(+_Kmm>-g=S}xc5O@k22@g+4m7KqCua0H?xo!VZ|umJTj*IT?e~- z$3Gpnek&e1Dp1&ty|b6SmEcKEOByx!lQrz^Es_-(5)vWrzH%Je>?CK$t$iK)O<>?k zM0wPUh^|D(#Ywch8@j2fe_M9gnpsg0gw$LtUjU1we~$VmN$VYfr#Dor)65(ck2x%D zDizn!hyFwIt%3cR`|4a?u{C=}6ME#PG4=Ue-^=%tJubbBt5?&*-Wy~Ao;_(lRkbAU zb|!#0d-C%)<8>~{Pp9WP2@KsZN&D;70NCaNr!jx4#pz!K??o+N)oRiqFc>9S)k7?W zi1dO`%8oB=C?FaQTn?A%}X$`%G;fQ0ZZKP){ySmAbMDKPQ9L6 zegL;h9wxSTAYJQnL6LLtQOlMnWbPiyWv=Q)OUQwiz^|3kj75 z)_t*!ZTh($_fc)h1b%X9^MriZ^`2dyDXO9LxakFC_P@mn{o(6i7Youe3}yN(#R&d<>wSC#+8$uN6G z*ETA-VkQL&oBvvy<@amdz4#{Mv4lB48Tcc%i#}n;N$2EmevNCdYeQ-XsxHTY1e!Nu zq9I=xYP!ddS{BILavFV_j{8#H?TeVpE&_e1WU9;IX?4ebS7CDc=_Ro zgs&qE^@WVwzALg@r^D$blU11sZ%V6wE4a6>y)vf#aGRT!o|PWyvu@m%Q$i6{@B zdUK6*=LTAArIWDNzHWzlZf2g*Pg*i%C6-A0%-r;7T#ckbS|aHEGwq%1zRzh|_4_&ft}-hn`VkoN~DpYeFB$Ujt{3_Ys~@UKXBmsseW-n|x~dob&Mx9p$=@G_Mh22P1nzF zU~43F9s6q(b>W5ItFsOZ1bUGx-4k|~{tPm$Wkzsv-MoRjxX^T0vjoBt?O|?Ua6)1Y zh&=o^tsJ3Q%z9GlPb})MIoxidIP#vpf^~XFy^kz-k#Q~2&Xd`Yxtfz7yFVc-sxV== z+3EWOIEmdRbYb_AV_mL0{STk)3`J1xz2D+h&tD$(FNQx+mhNdp&SeLiFg1QSjAgeH zOq9xz8kznY3ILwjUw|sbp4`aTYTEYwEz!gTb7iXOi}_#VD<43TOkwms_)2O#(yTu6$ozWuVE_z*E(>^)MHm;YkdG^6xBVAB9j4M9oJlhF9dRuT*~|oafcjAdYYQDrSKKA1#M_{B^h47NUjAe8aL0j_bsimt1O zUI=Q7rerL=%!dG3S_w+ZTZP57AACX>Ka-vBG;loOR!S$8K_7Lg$bxG|oeA8Eg{RcV z42L01XMNOe%P2@+vF0~_AoUy*H7^)Wt<2x{puW0$p*`ur@YWxmqt1f+GuVOO_b++U znG}|MA7ev3@raKLxGNZ;u$)z3uq*H&3C`^(qS{)M$LJMC12>a8UBhV;CrpX@8wr6S zXz#YPagRe|Vnue-(8JY_)MwypTVf6(nahP8;rR34>f?L_?*-irWDHa~n)23*_GNQ$ zil7X|3@Al6#TT3D#ef>=AHik30W2?X@}h~)g6-O0k8w(~pSfAhTD!1c!68ag{#zfy z_$w1CU(wCk-cOoS;ZfIxZ6OzWE{9I0{m8Vp!%+Z@P#ysd&)BAKR{Vi+_PjoCOBce( zZUGIUKMZB%e_r#9yTF`hQjl>e#bT4IBHrfin_G^f^b@rT)wQdQG-Y)GYtc6GFI$ z!Bf0$9o;v4!si6;+KT`q8QdiAOMzpyKK$7P16ELtAKU(7>SlAERu{+KoCL%h7aA(}iT(vsRZ3 zy9J{$ipWFGy0NAo!*b7ilP-$A1Jn-&haa#wl7xbbS(z=Ux1pGM?%If~n^nw-VtTTcw= z(y^odG*3kfhI$vR=-vp_rRlc{btJ+$Xjze4_}hNnCR}?(w^UzIN`V0A=#64;@~AGj z>o51H<(q*=$SV;#H#Z%Z1n#MR0BZ*~qvsp{nm%l(su=RT;rY77#$4TfJG5lMCa^9( zLnuQC68GD_aQ)WCaq%ad0XlL_GsesutXLAI%=tC*^whFfC zwAOwnAU*?||1f&oA+v5|Q6rc%a$lYOoZ}ZK8qLr0*!XLc*c?u`>Q>b6YpU#WR#B57 zgRBamn$r0+IG6h}e%_&$ATyG#jG&$108XbP1s8l;*AQh$A1niws2RKfn-uAD|2IuN zhqLMFzApcfDyKZ4y@+Lru7)mB_zOvns?-QmK#}OC4%FO$wI9HY;HmLED5AwG#@vIV^Rduyp7N+_EcOLyTnLc_*$<)@AxFc zQKNfx?kp_Cy>Q`7trq{%e*$Q?B}RSkRv)x5Z_&?DF-VBf zV8%xbta%0kP@)dcu8ez7nnkl3v!POHYe`&UK#M9J)}Y~gOXO~1RfG|ru6;O7lZ_a| zd)-M?hGol_gOV5Sh_&tcm-AzZu-=l?hX&q{*ChOEh8K};Jmr80`6R2fgs~Uk)*gHC zzxT&w)W2~$GbL4{w^b)DUa*zZI8*IFjEY29?I}la-DbYAYts%G3q4u^cd?;)6{ZH9xr_h`V_yRd1^3H`YiNIryy5^G7+TN&jWZTPIBx6=heB+!O(5?spefJ) z9Lbrv)jSN|lBhS5ZDc$YX%d+_DM5EOYV&IfhX(TzYj>V(F>&x(W0DE`ppPoc4+&Xc z7&Csi#>9X!V)va5c9qK9$Ha2DWIq|`9DBCGKN20rl6wZknGo~tmA(e~kzC&6uMnQH zKf`O?#5(?fFhv8kkbG|6+cWz)1`m7*NLQ(-%lA?N7h95PFNSdGhFehW0PE~^bBnYklM}T&i?>>F31PVAgowG5{I`!B=r#ZLsU?t| zmdEBFF;w_3$91F=t!9AS(}OMwkta^$bCb*p&ENnbw$!5DbtOzprI2mbWteM=J$@gz zlertij|QUz6q3CJ94~H!z2*av!x}F7zWx2@!gj^L`_AP116ML|$~+?zJ1zGA#_5B( zicgkL?fPyO^j+w_(WdyrjuWIcJY>P$B|8FDzQnO^;&!B-U&}1oB*a1IYMFjJ_~r@`~m;L#%z>6R4cXOg^*kfg)GbSaRlRmc1Vzb zoj>lRYxHrjdABPPS~6uLyDEnd1?CKZ@xfaF%kW9t|Dq})Az#yKq7i);%+{FCAntfinNwLfMIrF6L^HUF6$kC0;Kl|0T)$Exa7hW0Fy!c81OJH1VR?Q8#b z2T7?7R_H2-^Ge6u7L3VLv?{&xO&Q}sXvJE7VqpYAt%57O+M+>9GN>M5qBbMUF$aAH zYb#PIZZN|*)6vPMR`kZd zEyXqSGY>}K$D@c>)`J-igiBsWbDqZh`ze2t2eV%2AJtz@3gZPe=vMqx$s>`zIRkqR z05lK>ud0tv$lmaOXy z*H)?hYrPOY1{oW54{ zuR;0DZx~Z!P+wJiqhcN~yuW6cytGyz2TQg%RT7!$ApxH{EqoRjYyh@{45EN?b0_Nb zn??-{Q`QB86_`#IptlPFzm}iwS9x>?h|J3X)&2>m>7}7O#Knds%CHXFNKE(h$OQ)p z`2-W5ou+TWac#5U({Nz3Zj2!yuG!P6-98;6Ol|v|?>9dX6c%!_U-O?__X#bJdV){< zsf3b^4EI~ClRjfED3QQuhM3i|Hz#ZXbVxvv3m9U(GAFeG=nfCeO;!?ErpkZV;+8TK zT5Rr^Dq1yqN}9V&ktx_RuE^EpsxBE5U`80}#WKpxcwu0V{?`kD1%-&i4!TzYT#LGr z2VU!+Os5zCX~y8bKB2P8Z9d=4e>HD3i4K5l9o)hslL4xL>2QHxk6$gq=pg!hwKQ$gn zqA%4uNr60LEeEqi0#2l<1vboYyQLzbf#|}Eva1^6mgo7edsbN@Ues&Lk@|Vw z%VG;Mlv^+QYHlTbHon-)2c=-zvtcCI)C$Z_?I*9P0uIyv)!)H(#tIH~xSUdjssQtV z&X1RIAf8_t^*C08mM3h}v1_Z2V;iN-O)}04itYfPDtLeIkEo<4qX}TL`?s@fhN5Kiq>AgL=-7ZXaWS$HE&l>x(zuf{gXhfGbJUt3Mv)*O8#(UxooL zKFz3kzy1F4NXdCXqG4X^oGIf;Fd?p{IvrA9{Fp0@QJ#-?($fmJGQV#r%LZ+CkqfG8 zUIQFO@Splc1dg$k6DDyV&iFSPF`~0n`0YBv&AIE()O18F&DJ=!>ySx7zNgZ#*X~=( za+0&oO74ImsUhNcEWdY~?764lDp`3-v)(qfSV2}iD5sDTp2ftgh4JX!QP$HCpdku- zfAy8%3-N^y+_K@_d-)g7$(1pde4+=*?N2@aKSaHEAl3gDKW-)zMM5qrNjAy8u6ip% z-0ZzW#-}f(n;dSrxdCqy9$K!F% zi=4y9W{jNv8vQjEMRYA`*7QpL6XT4Gyyv`PKN2(mGBMc?fS!sQ^eSIYvA&Xl&jU3diSEW(B=0HYG_?NOHB88{*qa;ML}~I0euY`dqw)k|as|jrJTV3e#EUoZatoS$=s4_6qG)WFCSoyP~85 zbC}k8vSMTO)J#+uusNs-)lvJtzs$#Gb6j%vp#5&K?>> zb>a-U`I2j~yp2zTi7Ndvmw0Q|Fe-hd+1+2?Ax=3L9%bbJ*s}D~Q5t1iSadOqXJVHQ zJ3?xZX3pedy4G9Ij4+s-FMnDlA5nB}=i6jxNx4<$@@wJ*w`$We98oab_1mX+?RvHb zB6)l2^e3-o?YntjV!fM>e`Ou>$#F;7gxsepDtEvB-)<3`)g-Tt^Y1EBN;pxLoD)|l zR}+1fgxyc&KPIKenN1OWyiVl{B0u;ziK?50Pt|xjc+O!$Xk;l|_K4%QNb#fVb5%4h zJq>OnA3QoOO_mebpsvH>68pV6Axhh`sz{gBK5rq>M_7R}gPB2_%1FENWV0<_n!Vft z4qmk~$Lm#OL`4IouHzgk#Pl<$^Ct=VZ)+=6?sPE5^y(n(6K?q6uz^SZl{`Lz%bKAk&+{l zrtbI_^`mbm@$+XusB>;@+&z@B7>0?D(->)_}c$mX!=y8k+hQ_^LAi^P}&(@yC$ zRjo0NcDJ2xAeB%`&Mt~SJ*Jj^gJf30n~@+>a|D`lavLTilT%skN8Rg`FDoGY_Xk1yN5){%u`btgim{{KG)gx_Uua1}_Z%?IEZ0oUTbLt?}!)I9%8BpFGWlJOT4;y4f_Nlh7uA`Y zF4#p6Y~X9c{=xogqgVao(^}1-un+MYaa|s}KEL|@nj1wn_$tftIJhG~kezlQ1MpsE zfFcZSZeSXutlks))JT8C_1pVgvPkvnG=G!sXom)}DogO9m;^iGpPM;JxOdbY__%hJt`E?!!Es13g;&j<+IC`>J zt|@L|zv?_Dj6EG--ZhIi;7zb?z-+NC`|S==#_k?9jnp#`OGZ!IyoQC~a* zew{}WG$E^TB%=Og8Sm2i6>lOwoLZ&dMj1S>Nh!)#vdb5|Nu)w`2=Q(>$(Oe*holob zdpqQ%JW756Uv#Uus7hao#GBRT2<|JLh|iv@`cD@=YE}o4a2yx%3SFIJyHX-cVkY;A zmaJxA1R;$8t%t!xU6`~oeE(CV9I>YKkQVEusM^1(B9GRBSIS(&t!MsHYRmfxL-k9T zA%Dl_3hJe!`lY%T_kj6qrI@x+ykOamsIIoToX*^pe&4Y88W&+-2kJfpV!=w;Qn>gJ zg7$Js!djL(GI77)0aeOcdB~3s!M0so0QG55eKmr{@jXodzJfCs+j2;>=13kiJvc07 zrpj{vqelJOGvmH1KdS;lG*j&r_kl47ZavOe8&8L=W+A!8OyNTx;(xSt-HV!phtoH& zVBe$f8N8+NL0EM~cvyf7|IW_2>}vcvF~^(1%*@$nrgZUkD^JdOuznt*-Ju5;TtuHi z>uNr9kJ-})E$7IwfPXJvx!<3a_Qi@zcW&l)F4k`LWv_VI?NQ4b)sn5)HqBj5 zcTJp<^U>V~y~KI4r~c2H*_g%#n56vv8p{yHfi-QoRp%dgRs-XJ0&R94tkf;G4-!%V zCNY(uo_5iRSqEaSxkTD=w`WK|<~a&! zz@AjzQE>~q2BWv*9OCoPfhC_Fd(=n&-JW+b{Z|F@#g^;1w+DlOMTu+vv!|vXWDnYJ zGL3C8RR`_p8@@}=8@EqHkoh4F0=JVQR?99FdWOpHuQ49PBseK|GEMtc>>?dGxjSOyYwd^70 zBM(t(ZWgZ$nz)yN9fqjG?b%u58yGrL@P6An31P>Gd&n?XM65>0PYeNtd2HHT8MKm; zFPvp~b_P*DUT`=`(%5BL2q_|gE!;ON~9?6cwpzUmMm;tEL(w$0ZGLJhTz-rFMb5Ek{mF9UYV5$&LFEs&n+W!y~P)* zKgDqIl?d^P^tY~%CB2@Ie=Y2Q^1NPaie0k}(s0bg3-?C!Z!Pd^K@n0KaN_AKs$n@S#f7oZ|`uLKnr$J@2J+!=YOZg)QN(Af^CLjpxZqOY~h zeVKgz_HsgP zN0nops(`Vvt{BF^sZ^qa*{R_{ZV(}tL$KuMQ*HC>{I45@2e%*n&6@6=*(3DQZltd+ z&Qzxd(2}s+Eo|)(@tU+)egk83I3GDYHU#Z4m5GuAprG2CT7<8pl;34x>hav_0x4D+MM)i?Ar8WF!uG+<2ms^uRu=J@$*BFl;luR{u_kw)dkunRO zbo+nX-T_O-TJAE51bEB=?kx6=+ZamV8kNXWdQ1&ukki0I3w%Z1OWhmVt21r zt;05Lql5gfeahike=leQU0kI?HfVOTL=P)jiWbq@SA_HDpjW9B=|rIncsG$u^xa*i z_tmAhIqvxH&bQj+l5Ft=$J}Vyozt7cjj*rApMf0G#7!Ks@di284WIWb{AH7+328Au z&hO^B$4#}xK;C&D1|2tZ(ixlfTSVd>+`g=N`cEl0^6ZfJY{ECi`pBvaaErt}=7L{M z#+cyr2iC?UV-FfveA3c$$@&p+wBJkUK1TualuI?>0#`=l1VOZ?Cr;jqk!BW3VqX3Y zuV3a#ikC>X6}t^t;iFRgOJB=^BTHeh>#&Po%zIxPhSLV;8bNOFfmasPNsVt*yDqfN zeJ9y2d+O8?WfI~pdz1^sOg-iGbP`&>czdshqvWS;|0o;Yh^;#8%dFCUsFBcmvt9z^ zY^RyY=|93^JXCk~e9M~(Id03*QDjtgnEIc~Wk!h74vF%3Hm4{vPJ8gNT_f*r3a+cN zp#bGKJA1c1r>C{*WH=cMGu;{duCExv&P+n{`BuVDjAA|ps9-$hxdMMvQ@p1(4udj6 zgqk*~{hUta=f$HX7Uc4*G)F=CSb96=zO}642pgy#hv!S2&8yYJpx$Tfr9Y^)dA|m1 zTmw>606D4ilTR@WEjO9;^(k{qYI=SDLyun6ef+x~Fmo~{IkC6!fMfE=dvikPua!a= zJ!f&?eirBT23HCQZs6jXqbWWLe3^OU_(j&47ZVYNeyY(g1jT#lg58nMW9%eo8q)rg zopvlPoe;whq<)i{tC2K?jWin#1PjlNvl9H z_YLZ+8)o7+_M)^Rm8x1UK{W%c(l!81j{_eta@pPvcjlZ^y848^!FLYVo9=4yG=jm; zfO1Fkk-$qnGyG%d4hO>6D!+U)@+Ub5yP-F}TkQtOGd&71bb7L&V7|#MA{c z42YI3?>m`;NeJWi`S%Ik*&D^uN%iN%W}C&3rcI*pD+NtxszNtD9*Rtq0GLp*HcR{D z75!`O&m2A57`M4t3*vS^`^wDLlgoRTpSX!)b}LMMR+OlN*FS`u9&PK52?l47?`n`~ z^F;S*hS-_uRYFXBSK3G5bu*=&K}TEDp^Rtp7Yp(nh`EIaoZD;7^x;%=ZT}q!kqtnp zO}9!w4$JdoF+lu}JfkES$8I)f;PRG|`QyiXRxi4%wo}uM)jswFo7y``1>S21F)di=?kyjUM<~l zh?i)HVr#g})uGxLGY&zoy_1n-&e5sbcDB?lFy- z+MWj>d`G*OhYy4YNBhTQIg8d0I=oj(VVp9M^ce5`#%Oojf4yj@1)`l)_t$Hs;sci*2ss)(_wao+ zOEBBbc?=yH$W^TA8LLD;eR)K&yus9BS1om--jDY6H_Yw)RQM_eIQiejrr`BYCMQetf*)%RTGuuw&9v)!E%f#a%hJUIXYdLQ=<`Y- z_zD|mKE==!#?!oVB$^#g6MGMd-qG;hqHE9&^l{Gh$NL7AL^0+clBCBzKh>`d3L%D- zG9s1`59l@V2A~K}LTUtPzMS(-xHAvt%j7c*Ek(6Ra16_wC8^hqxot{6kVc5F&fQVw zSWc9316K^A|Jdo_Cfham##rfZ_M?-UB?q=R`r{Q_h)Szqj%(Kf%c8>kU8RMO97LXz z25*MVZe-7mmp~?YZ5*=u>xWbecOO4}eE;dKWM3t>g9VSK+-;phJn^o8&utq`U-$YR zE_sDrfZ5_z{0WotgZ~8<4KsW?~DnwuPS-z@Hj_1BO^Zybv5ie+xFU* zW+pj)c;Q1>%`E`ldFF({IYgsW6JO9Quk#TA3SVuyCIZQGLdfZ=ZRx_h4K7 zU!S3;$q!FlB}rWZ7fED}U!ZrL*w%gP2 z9oEoUcGwcb=&a!R9o5FL#N!TXR^Y*(Q{L7jEkkcltj%2sUN3AGUQ87R+X2>JpKz<- zpO|@mm;J0G>@&J$q1>Euw1HeD(dt!Z;X1XnhZ9k+vG32G-EwxDVTP4HLV|h3-pE9H zXw!0HBCT17khs43SrpoF!89;U!OeVq{~c-L-{7phtgGdmEg4s;IfmESxo>m5(IRc| zx|b)Zt}$_TCwYOF%B~0|IvM(g@7pC#Wh)|^sXdW08EKx_@l9zH@Kqka2G9F*rOV8$ z@yO}(dvO@$JQ=1uF{1h>Mkenvfz{nNOCY$&l`5zrKn*@mw=RNQi3{Vk#Pvcqp1Brx zo&%1)x;q6du9om@p|3ilpxa^72j*bk5?CfEr*x=j-_1aM%$jL{_KNjQ-Uv>$*V^73 zkBVz=+{$g(@_uM;^||Wm65|TjX+u9YdDcqktbWJy#dy;9_n|&J;Np3(233xX^c`ph z*g1OfC%wMWHMFS!{9jLV-7us$f&`tb{H7-e@_x~1EaJ|q$72%89O+D z52l)uq~0LIaKj)>=|Clm3q5(UQs;e>lW!;(Wu3_t4vBsPNWl40eoY_@G3fXMBx^G; zU{4V8#hAH84BG0?nmq5dtlw9R4>*5ZS|L~*xI$Q&AB2YMAAU48CET=j_+btD8S-I0dI+v9`Toi3E$J*m?g}cmgpb zp}`K-x%iOT2Z-{L#mh7#U$RII1g$gpNY0zg&ywz4W~@T{VbDAumHBySfZMRHiB*Wd z5*<%+giAl}J34Bi^=9asXi!ezTEZPhKkd7EA*!d**+SzF5@bfcEHxU3G42PnJn{!8 z7IO@6C8`dO77Pz7mQ;w}gY)GrTh^YX$tNpFr$Kjt_CO;0sS~AO0IixKtl18AO zY~36^Qn9j%72a?dm@qUuE;NI!>lyi`VH?t&eMd&d7~mtvaiZ@oxudKi^BPNHw!|DpfV+-Y*VIPM0om$?XHr@#pO3 zuYWhY{DO*@QYL?W^GsOHK)0^!vxa@KQ5y2DoJke8V(1?gHmhCR7a^=>X&Z~K@#TrN z#V5s=32rTE77CkLDO^IR8vc@{k5k&z`E&s zZ;_-xydl4~#i~+Spmyi$ZPBzO>o~oejNvryn;Am^8Ojd7JM%>+nh< z{!N3Lec)-KbaAVlRY*aE@ns|BI&@D^$!b*(;<=ZQ#o`M@8H}mgW#wcDwl(}kX8BET z`9wMv{u5LdrSBwZwZ{nwYszSxsaJ+ps^;$bnS&S|XX z6GPg;64YsW6nLx?idqLJlZzMH?y+U2L;bW>BKMZA9uwoOM5M^SJ^16q8^s z{<}qVCSEV!i|cJFbX(G(U}#qT!o z%=bRFhMyHfh{jur!&WLjMSBPNGMYDRWe)J!Ch$z4Aa~~m7EFp3!cHudfU|Yb4=K)E z$>{NJEtkuv%&cD_3a3jW;^NwU=N+|_iM{t0D z()W@kRI_93%la|QW03pAcQR+IS zrIT!}Fwb@#5_sRa`PepPzK;0yN*{$4e9zkey3v*p&sDXk*UwC)G|`&P2!Fn2-fD$0P-ILjnEr0SLgFH`%H#T z8H3w@lOaI3EGP^|3&iykXwb;MoD+CAL8#Yx=dXgR~Q4DpX1A^A%NLa1wf`pwWmCN`}`zh3s$YO9lML@AKKD{%$9a;_5ooci`Z+ z$Kq>-+@8PtMs_D7m1jc!Bge&Oe=o1s8I5DTub8Jf)zfEYs-cnM4t2`O;-_cA9j>B! zW#n_tkfMDyl3&fxRm`W#|3)hFie@Lu_F!jIfc`0R6sOqq6JyCg2W(G!Q)=~aJY$on zcLcJZDP0ctW8nI@y!;LU;pYYyJibEFn|!@Ps$^$rest~Hy&0v)y4(v)c#r9t^^=f$ zdLRuzCfdx99WLZM8G602LMTi1N(`=pp=*;=5$3!x0sOs(<8qAab*?0*Z7iJ*hX*#B z0gKsT@Tc4c5~zw!t?|}xNX`FMfsslw*}fcSFBDiP>d7d5ea!Qv>Ht5}YXLA{;PQR z8(iyu^4u56CX+-mV_1H4rVC^`%vR~uRPCkT%E)O*lI;`^3FtDucCH&oU$;Jg_ms|E zMB>dQP6^@11S%QqX%k#d_m8i6uN^(uVZyrAc`Qd@Epgg#ul(g>xJx>8lVLjghv*1Z zdZ0=S_Jd~|pa&H*e3a)aiRLRgT?-rjLp#X6OEVKZNi@(jy;Z^x_s!8YiV3z zq*e4S1`z2qEzbl0(yr@rd;_&)8LIDQSaWIhh4CxWr&_t{+&2k+KSEJPD)R}_h(MKY zEw-8pch{DC;)?%6GzS_XMMyY8{f)ow`JCe0P~&JA_i*we zhL-ej0GR&p1rsJ7Fn88;9C}zLbSO`&ID_3-mR*BA>zhZJklk#@p=KepVVO{5wt@bS zJ}>@S9JZBBtGr0yp;<#@lTKqP1llX`-5b`q3C~#mYRxk>vu-51Pc2udhHNcT-WRd?!;#7p_tHfI!>{iQHU}RUUHQ0oCY%_ef|jh zywBfp(Mr9`4)-BtW*0`x$<27)atVQG^Z$7sQbz$6&;P$-iTz681~Ils|F&Om-m~EP z7`E1O*E6KBW(kw*uU|YdbTgt=yxm;rKr8n_vRB7X%o8Skah{m-Utz>?^-xv_@1R?m!VF^1_ksU0T+KZzg?^r>*h_g_4L_OH{yoFA1wH4_Uq5( z$Lrlk-_=#F=jW)a3~P(0>gh%WMs@FY?z;V9c5~O8YvvNprW7%oO$AWVcm!QqCCmbN z^-M$^wq+&2Z%uM@8cjQYLdX`l%KN>A#A?l{Swt1PJ`FiWoAcK!ASXG@| zRciI+308Fx@c%-paDqEjf~bA@VTje%;2FD(#QRoTN}IF`4la;A)kuAJ zi%I{KCSakWQJrU3AC@L-ocmtd@a;_UT9`ofr9#>@eU9W=ks;rv$N&=xi*^TA^$?{k zg=)suPNJ%yU;UwIR`SWUmIMb;!lTKVPA(oGLiIw16Jf)f>^aIEwfyMnyxqzdrs>XW zq+%g8&&gT^zQ;JGZYc(PZ%uVxOKI}iOa{Tggfa5BT&T6oBCAk`lMz(q8qBqeR_;rc%jO;xiteOyda{QpRT(&uu#@bP#I;|d ze9{TrVyn%9oue**D4_NEHE{5?WJ>ani7ZJK=g8}mb^gbM&h2W-1?3u*Vf49~sM>Q7 z3jn&?3{Bh(I2~)HMks|nmtN<_NEa1JG4Fh?SVbF00{!@kR!H}$YgX)TDZw@7fWqu_ z!G)M{_uyz)l-*f{V?C=ug|PNVUpNJ z2bIlpZIM~f*&f&Wh8Ss&3{l)Xp=Y*G3^0o`;t5-KWFw}^s_KM{@K2W&780_K%WHaV zVYuGE$R+!p&B?Q#_x#FuR3#xa{z+Te}VDx5W!mav8G(QWdDH-fKP9b-A<(oM@Y$);j+P_c^c3 zs$zl{&UXK`NO@LVH94&&&4GLoW8)xCB+hJ25Azs#x%C@5<$&x=2cxZEkqZ{+-Oh?Q z-(dW25Jz$Yx|5?Z4IRZAe)&f;0Xc05iv3h?Vj}qi3Ug&~BqlF}HizXK$#TLf7x69Z zx3-@fpTAPzfS0Sf#dhoWDszhRyGNML$HF;!`dP+$K6p?6)XFy##eEy{-uMLMuKgka z2E^pv8`W}my6yi#Ev5PQ!sGU~MVD^=3gpZ1+1Vy>>(AZ>fPM)x?KhdK9F?#v;;d|~ zX)C!fSV(m?^-Tc`6#x^a8zN}t@kD<8uvnQ-$@A6kT1|6lgnhC1vP;|WpefId(borV zm+kX5`_v+zWNmnY`xTEVMBlw(XrZc~D91>mt$h%%exb(WCJU3k>80Q)ynqXu_}W`p z=$%Q(KV9_QE7ClO+a%5{bFgUR^I$yBGh6K@DXS)oNsL}?8gsPfX+0Kpgz80#0{5v* zd#Nt2N=l*-i3`&y8i}L<~Qjq4?KI) zywc0T5F^~Ta;Z&79Ia!UK3jFGxwqUC&IR68yjy>BuJnJiQ%uK>RlcXExS{nAfgc== zO!ia%<1ChJmI-VP0Bm5oIknVZlLO_tHaV5}3f50Yt2#zGG_*<(xcYhOI zv^Xo4{%Pikd-R3n)J-NtEQXywT;T89d4y?PZbax*fQPGlUU`F0?dGjv#O0rqlSJhT9$X8roV-Yc(JPo6lR}__`>RCshsUmo07~?pzJ+%a zqdJ)r`BX&XE_iG_V zG%n%>hml4u-9Yhd?Xtjt+Ep`Ru)B=H5VWU_7eX&5i37VSMPD+=1RC&u0a5ZgPQ5?c zOQ)Qz3l|I%jhq=ldV2i;N7?<+lh5bjLiWf2OB08SHgQ`;CqCP$i{lOLK;T8@#Kcu6 z?i*2ah(H`cumdqFxL79u9<)yGOYxN)(}3z-gxD8d?E9vFMZu#diK2RPA){zKMT54z zP%rjleAtT;q4&cNi&NS(!pcEWI+??rR&r$qy|&)CxvHO8Q9s6@j+FMXqPPt(COwU0Mov3;gRCjp z9?Qu3sKMG}WlqhXkP<gr$b%M1LM0T}VTU)IeE2KS zA>P@wLWjx>Hk=yqt5-?=%LXCwHaE5A|Bmnfm@lR({k`S-E?OhSJM7sG?f|DLw%AHG zkty)k#}%_-nJU38T@tQw1a$jS9p4}%OH}SOLqD;EG>UJ}DHWNjEB&E{w069CR&+_5 z_tG9O^BW94Qu4$di4g93{|M!rnK*Z9_^8zwaPoLqv9ey5O;fS7bfoV+Q!~C#5A1T| zlDsm#uz}G_S(X3USFK8OW`+>LgpLF6M)sSaq52;hBjb!sMqy^8qvu{#fv+Yq7wl&qUTMzBV2TwHaALi=1N&Vy9iZGQCIM|NT`f9@Av!x{uaBZ;(dEwJy zv&+2p3$6az=Odb6!2Tee(+M_fT8}@b?$kG?j7rUo{=D}mX>?(y%EDR*N*x30{cEv? z9H0%7V{|3G3{=`;OxIeyz2#}6LA$UIjgB>{>-Nk!Cw@L$E*l^_2%Ssef#GkiW&dmA zaF*$i3iNB;NO0TWLnW&fu4G7rQDZwc1>nAbRM+%v8N1UdS*j&3AhiF8hc*6Xbb7P9 z>h05SBiH%|AM!l;??$8C!ItT+ZWFJqoc_l31O%gF<{Tr?)qbLJoB|rTeG3`i^Rc+i zkgP+UDRS|$UP@%xH|J%)DqOlwV+!5Hq1CBPuaqj7MDwwfqgc)cy1KzE1K}uGwQKP*zaG})V_5zMR#m0zoSbl zEyT0kI*=TH_y%I|Yw?|;6gojAIhWpNmaLKbX&BI3-2l$WL&tpGmQ&Bjd4?6c#;(e5 zGdehC_XIV|`q{zH)f9@%iK!)5e^=nsgnux!FN z{5P;$p|-lZ?W;cey7voh!aJjD(ah$T#rt(gMioj2YFZupn7Q?r!uio-<(}8e4Cn^Rb?AJ1sZPUens$%544b%e1_RD#CxJ!vobquO zz!Y+1&5>h$LRVSM#HWf%9B?<=NS8xhIg%l5d2$s17ndVsLZL``TQ9`6ufbT(<7mr= z#L*1?#!<+)RyXFZr1ih{iE_#9N{4 zqP|-#r!U*`-_%)V_H7b@-rTMACR0id*)kocYBMBX?c7~c&ibM5F48<&U#idiwa|w+ z)*kZ}Tl@7VRJq427?aIzu~*iD3NTdZp<$n3TQrSh8;zqpUWHJ8kZv?i#j9mgYi(5+ z^_Ct_C=Xjw6qc(6CqMK#2w&hG=-Qi6 zdQUbf?h9S^1>eaSCyB@vtS>E;Xuh9^;=Jw)*eeR9>&Ka45>d6ENTKe_FFTjCs$%n|dD;ueeYY75# z@HoX_Yyi{T`RO|T`!j>T@0ft7D{QB63_2?EFq|TtJ19*XM_>!&b8}O}lH690{L1B2 zFJq~J4oxtX3um($r1C%1UOob`lUt`9y1b-UJB7S2wf>oA=k%ISrp1KRS{E`|m# z>~qy`g9_2`s+c{90qnd4; zN(!b0cS#7r;nnD+NVue#Z$1FoV1Zbrm|`qD3Bf}b7f%as)*j=KEN-BhC*`y2P-%{R|~cR1U0Kd=NRGvl)D&aO$t&C_+Q zDRPo;$->a16Y9yB8lf|T!14HNx|g8m3t!1WGj>&yWN6e*ucs=h9KyL7D$Pz^caeWK zb=S+R@z815efKl}tRpe#`nqm$kqrE@bW+-HydbeRzmmbmazTc%oqf9 z>gg!>*|mR`p@9EQYfNQ0csLd;fvboP_$3zI+fGDV7U+asK{hJp4H&w{N^9)7r}6;0 z)mc$FKg8Qv!4PQf7n_x`wsvHhSWvT+FTDTrsU3hzB$-Jdea~}(MgS+*=ihCqqe}4| zdw0UJZVA|>IfTsA8o%rW;rb?K4bjWj#;(KnI(ZmT@aL`T<+WbFFV*isnho%I_pLEm z``8Vmyed(_r6<8ww^0!!w zaKLHfQK2UTkc}=q=#bX0*h+=~|5yd%g^)Zm&prR{I5Vy7?3jRGt@7?*YK5+iA~U83LePYg&R7PRnQ9-!fKssm zbyqfiYyo~-UN?XP;QLl3C&e9gZ$u)=t9tR5~&Mx~9L+pW~O#*)a77*WF6N z!PKEMclNhAZ{2eA&ix76jlhr!C` zy~*mo5x}jKu%UeDL{g1%N~%Of8NMjvRXNXhpuV$rwH)l=AmCXm@dr{Yb3!>dc|rU; zlS^}dS><=xa`Qu{f@|=EPu3hNtv|KwK_Vatr%wd=dY^8@+z?UqVM#TKdG~Fg*NWoX zY05+9a4oo-Ye|ef(fBrO1)QI18lyjZ6!;}%B{xPQ+igWpp#2_Qs_Z^RooX&JPI|af zMhf#thcmb@X6$177WdZ=x^tmiJcDPpG~PWN2KfL4DE7!taE$P zojxTk?!FQK)i49748YrN)#C*^EuqGPE~2k46U`h@w~4x^*Ga~!RF*AHDme`sH-DGN z6?&X8WR71Dw=O<76NOWmqzu`IS)D~4{K0OIr0EjV8&AgY)(096QXU5ng2*lcfls2IDmcA*QM;^47|slzYQm;(Y;3lI^Zg@fq zCzR>}H*&iF{*to(PNrIfiPj^U$jn^S$d6|xK5k3eb0eh4jU>=MfrTrW>LEF8@#4Zf znRg&=HVtrGvQp#fvc8ag!Mi^ptD$0=#e_WINL8XLPFAwAk)`(ih5ZEnOkc7um+A6n zKBKK^KAmZvd~7%QByrhQW5}Ti)Z7)lNt80Eq7qdh*eT#R=JI1o6M8IQ5zX5cn9WWJ z$B2++_C;KFTP%4`_qIhOa-{tjC~Od>l{$Koc+dUlDPOr}s>jLA%{-H;!+vO$K6d2Qa<=z$ zT?xxBX1!G<fjIaC{{lR^FNGPCrUhS>I}1(BWINg3Blwth5r z(f=IX%I(U3lPa5;N!l~ zGoOc$aIW}$UtXy>)0|c%Z*1TFcqAg6Yu+cWvOB`(o`xb1a9UsH-6pNtsHZAC50*do z@zV(L)C$RPPH`sjvHX}<+9=uzWPDcIal~-U)6MC8hsa^U?N>6Lqx2aFeYS~PswG(E zD5BQNz+9{nwY;lJTWnVKT9;OF>nd0AAi!u(QD07SBs>7jRC|D#stN5ekgMg+*DWzq z`M`bZBF18$!Zd7&8lE>~oTlU%{UVZQwnQfvDFvOETXki!qVs1!E%?@0N|*te&RXZ| z5u79^HDyyCJ^XRWLcp0dOJ98%jNajni3`N<=G!?@_^b`(J(HLWBJpDh%hVBid{pQj zaeP?`>d1^xCiz~7#8$m}F}v1)=XUqm{8_oLO2hAux%{mM*|~dV+@; z6-d%IN?l3Hva1jQe7j-2RJKZV+^#B1@mVZBBM)<=e`0gdLy{Glr^#T?Ccvx=M4%4I zB=N|&QIu}Nq`YVFQPakYT!sl*?#J!&GZnuu!lbM~+a|>~DqB!m?ikKcW6Uq8|8F%T0 zWU@gg3;V2`u^&4iZviAhA^rK;XdtzEwC%#%Nil`g+q_zxlGt#B-@N%jCl}6sLp$7` zs+3RW-dcjGCPDkZQL6d3TDgFqWd)4km9FtIx!9=pRlP#54&)}0Fq#0seu)*pk6p~> zT0qf&PO&6&07M0p)1V87lpRj%ySeWxZ@;OU7t6>fl9wdrcoaV!86hC)Xx9tf}s_5r8c# zTd~Fzn(v;o$050NB4yAes+^G_J?v?mpv+h!lZDPwo&)>%Z42~NkHdKjZ>lUXBPhu4 zvK4!R_;PYfvvVr#gBjcSA=lV#g}N%o(v*tHHkbhkYNL?cRSffIcdX0a^Q|f|f+W%` z`%O&NqJGJ^d-y+HP(q#ZA%qy@^2Ga4`gBX)6@HbAm+$}X0{HwnuNVZak{es^?&@4M zb)qtAh1)>bWg*iCFAoZ=X4%Oju=-3Y&JPHWeuwl?S*_$cE{G->PxSmK9pYtGD6RKDdqUVFmB)=y5-k17D$i(j=@+8pACYu+6Tj8{!Zzw#L__88gk-GhLT4E^@AReH&pf~X z@}m&+W>wtnRaFb8d0jD+RnE!rvMC$hv3Rggi201~vUGa~6Vq5ElZ!mDQFv3i$n%fx zmleyWOk#h&)U~@5xpzv76H^mBY=}D!#g5LF!mq|@E6V?4>6idb&6hA`0dsktIG$0Q zE(bheU&9b__`cA=-s%bh;Au7TNdQf;0FXyfKSEQB^76_sgCC8aqHut7iB=8O?$e9V zSNFq?ObzkMHCTdEah-m7Jxe4`Koqm=U_UwmmEW14;m}ZfZrZj%YkH>C3hV)Q&l&D- z!)Y7p5qEV#rjaJa<#p-ur4;th^?A^c%_)#bYld(zrjht^V8&rCI+_ zU3zcv#+5%bhU}FP7L~#l8}+tb8?DPqZ`DCZ;~gYRPAtWXidGttlA|pyXHAVbat;CXQxA=viDw49T>fH*3& zp;!=RLz)sBWnl$C-g{mKViu#pmeSMLwp015se-4d=2HDWOdLT-l7+jy4Wq97;n4Z+ z?~aw~m#1x;N+?_WA3s$C=nrk{c6a58$nSYS&Z9Y6H-^a$zCi6xozsgT!>I+TrYbyp z1-1>4n;K&=gy_ByUY<5~(lxz|fYz@CYINBIH$OI@-|COD^KJDqCV3>J1F+-xqJNq{ zbq(u{EXAXcGE&r+$KHRDqZIm!X^HXWfnlbx;*<) z#z2#0_A=LO_J?o9tkU21-HA{)nX#FC@_;B(lmj{|P^rqnA{zlLf1<~f&r)D~6Anf9 z+}%ul-A>3aT|78F05a5T!)gV*TMC4q7ti5|8&+8vs%rFH#agdld2adL*MsLbJNp-J z_Kx%;|>QU^GyA1eDICM4Z};@qEQlj1^-bCdBF7nO9Wpgw)4ZHh3C>w z`Tz&9Fv5h?_1TLWHl;_GmwWzl=vYZO;0cGhQISn$aFjADY~rC@>mkut;mVerh!wpp z2O$C2REloSM1(3uik9nW@|eNsv&^_Xqno8v2)v2Re!z^dHi;RP&sIqQ3x{M=`*hkt zN@e5QXo=}==Nyr%RkV|ph&3yayXHGCDEq@L@`2@Q*Q|?+mOsBU6({4lL2X|gxX~7HqF9?KK=}STLEj#xYT3h${NKra2-`AfNJ{7!ZS=#orG&cB7qGpPMILFDgp-cO9RnI!V!x44=SZr%$Jgt1+ zGK}ubW2OEOL(gBW?gMC#^m*~Z9(kv0Uyh4r>IfLNcaHsSAxX^gCKmISWrY+q@;ajf zu20RX^I1^7o;f7i$a&9IxEof)1164jSorjkPXWEJljNzi>Y{gQs{^SC=7QpVuV=8t z7DLc0FG&xKyA5@1CI6cQP5zI&0{iG3e*X2$YqOA;$;&<24deTwmR$hZMUWQgx{c%K zJ5DNGU)`HrPg|Z~EVCe>>aT1Rly3|$o;!)sc;0Q^dhw8c3LGRt)lvWG^3YDjcPj-^r$=G(QRnlG7NA zJrY!FJlpyx{DzAjcHQnJ&wu2wcp!f5T|QTFPc^W%IWg_7BZQ6{jO%R{BsEjBkjT9| zFF@OD#pq#ktwvV+S{gq0^%D%l4+{Moo0-QneZG=cq{k2s=x}Xjj8!wDS}6y8JtzLa zFB7+0`&a1}=9(7Ay#e=+bmB72|0E*R+l6&o5AHeT(S_Ih?GWg0tIU~Wg4L_^mijWN zM4{Db%c&|NGM&PfcCP8kfFyH_(Xx6K=(pODl}B1vyk=P~qdfSva+RFIl+7nmBHZ&l zwhp;|blfg6%Ycz6Ba~UC1#)t&OP^?HF6Jw5RlF}~w>(11(cBFZ5;OQD{wmUdx%RsT zFD?HRVdkLQrqNyLwGF~~5aj4E2$eh)qG>uqb~GjY%(r4w7n@r3C=<4~K#j~r^jVda zx}}yv)gPVIs}u&K=Y%oRFj3;8{P=_#CZNG zz_57BxrTkfTf!EPyp%k1!Mda;capj${PIk%_B|MJYS;e);|j$H$M*K7-H4K*ZTQ*es!n4p0@V#>Rrd) zydmoNq;c1SCUr1Trb1p7Hch#cwbSQRoa8%|S7mz38mNVbG<|^8zCs$0AOyIH!QLfB z82~;*@9e@j^hcB7!59fk1=$exFw6)Y`{UIc{i4!@*N`h{>~Y_|X~ z8M-QEZHcq!eOFRjB{)ezuLNbM;jAB<_f@jKq!G4V%R(>2Ks$nfq0vkbY+LV_RyE#G zeo(++KQMC}XI0C^#Xcx>NJNuMM=k zCPXJ&lsi?|Y^a=a1wP7_H?p8;;PSkSG(8g5l{uNPY^FKAi zsH6p9&+RQ`zj%CjhbYDK`TV-&(-o}5yD4`|5YE!JZ}us@b!Ul_ZutHc#}Lo;vJ_9~%Gp#o z+LeH5k4~iay4#6zRt_q~Z<#Nf7odSP2YKj16W%dHJc{5D)u5yS$C!Ox%~VX4lD(mx z0K>I)e8$G11HVE#Lix!BumBZG&zyQM8t=uH^vw4P0$F)(gZXjxZVX}HcNbzly;X{5 z;Wr}jf6o*m8?qT%2zOFN>-;f&lmuE!E(hWJphXqk*3*|z@+*bEpz)14@yjIiG5K6r zp6AWDEfgUp7xi%SjmG&yhdO;pJZEyn&TBi+Vc-i93y3|7_x${i7x%w(0)F|)_lK9K z$hQWQT%t@l?5Ia=13zrqKKPF-r{jL(V-+Fp?);pVKYesY?GEDm`T%i^vQq z9KM*~ykA{qsf)#x&8v)u>{no)b$reIt>Q1>UqL0~Ly5q+H*aX)(q~!u5Wd8m;;FzG zEB%%Olb%t;x4wL6-vo=@Q|ga5+NM>(oYctj^eO zl4GbXs1~Q>n1Gscx;6SWA1?aE3R2DHP{w6#WER2ovJF* zldFZqpOm*_N@uFRxtX!;zZxEBpa5Ap-f_O=m{8;o=ecR#vS`p+5E>+?iV7SFsD_Omrw=Qoe~{0UK(PJR_u-`VtaJZU za^t?^6Y|`R^&h_lJ6hDenBtfT?g2CZJ~GJ-dQf|(IsVxW)5jP0!hN_qrxM?iBP6a; z-^-LM{g&6O9ihUE34N z9@JO>vX?ulTC2vh_?9VZ*uAk>$cn77VD6W1P+sG?z3-?0MVsfeWzdp)XClZikWBkD}(s_HzWP5ka;aaXJaYFu$3~p-As99BC(4qf0H_CgOt~cx6 z9QAAeLsH$nEXj^H^Rrq_ScAe7IG#wCByi}N~O!8|?(n02$CacWhwTq9rklnT~2mGQx zWNMMR8gT(`8%kn4whD~pnjkqvmaO)|d(7dC5X|ufJuMOJAvch=&7SY~O~&O1pbOLc zeRi_pueGXP!N*ZRelV-p6fCv(*Pic@@~lz^RX`YtAbC%kz?lX z#!=~rYkP(C@&BF9_v<5cHU73&MBYwhnkM{~V)%M06St~D?w#3eXEPj zI7mE{!=7ka7>xiJO&@}OG2{{#yJJ~0M+<2k^HK7@P$7X~TGYE@GApcM=#ri1ZMYpO zdCTN3HVSg=JxZ1gD2MS0!Z*(IuJ`x@1BF zah(Cq_9JoqxrFGS*p~5696`S@Qm8pZHQG!}*{%3ke-#K8I+moaYqNk7nRkJib8JYl&hV^JFX}C7dz(emg^uk*-yH2b%~gEkPT9ku2nbS|5%f7 z;_1BcPl?EXM^zS=YDX3e)j{7{O8t*)p-=dX7chKA>||wRjuTfAOjt3GJTiUHAD&_I?lr6|bVI7aEr3xDqmgh| zMP%bOGmI}|`+IE(2k`=Zw1xq2?Y?L)U=E72r40%U;a_;WUz5i+vfJT4zkdW23KzF@ z6Vspa&C%V|bcL~eYde@Z`81)F4Eu;5Q2F(CM}my)U-^TOT5A{0Em&rK$Xe!S@(#+X zSCxe6V84cl=lg4SymXQz*qz(+o$udkoEJG^uYDLAs1c6dpNt8_X_C_RvWP1^Yz?LF z{<_$&gNr}`6}QB!tF*j5w#b^;h&RI_YK-+fYu%Ka_ofS@5eFEkbh(_Z`T#zH`ZWZx z;Y>a=Y#BSoH+4CWNgWg0wcb{YUNBSpp-k0Y;he{Vk$JKBO|t)F4)2BC@*2ZD&XTSY z_iyMr3`Ch1jeJ=Ay;UZ!RDpyh+8Lj!bDMC+$oEApR4iinS!&9~n{Wm5xL}KO>#G03 z{v`z@uHUY> zg~6bl-uw=Mak`fl5Ipzaqb$6>uNg2dmVcssUIRKq z-KKM|-R?zG!ekUDeJ8VwqPr9oa`g5)ZAEg9Y-4;IH=<3Bo7}FD5!UHB6{_xLbp@R0 zK4VjVZ}gX#HxXxcduf-Dv16Fqs$BV?WMUk@lOILnJt7a71Gvnt3D>|>_3dkxCpFPI z{TIO;r*hi`fU>lbIbY|UYVr?Sv^2Vr*!jAYlA31XEzJa8i15Ut7JKZ)sIvD7`Xoe< zT`z5p{z z*#usOS9m?i5v^R?X8P%;-J{^V=|s%I=b4^FmTK`~#O$hxsuF|zOwa$|;&KHlL%SD+}jh+%K zs};_9Cm7Yk2^&96CfC#4OBOcpaKSM63b1AjOIxt0>pHe^&YvooPTW;jQTtyPf9-xyqec_T2wQ1_t+nva>{d|zz{y=n8T zAw^h!!FW~w7iwhqGaz2fNimGL8M#mZD%t00%dDL}X;s^Z2D)ZyM`-M489fUEZ|-{= zX3XvSgNu_9gwFikk~5{|F@A^{OX2fBFER`yG~PO{Sd{Jjm9x}mWTWtiCLiaHqEp`G zXNAKh=5Vf#-?kd~7QO)r9y1*M%(mIsr=u1dJI){g?@pp(Y5|>LQ-K;1N1xeEWvT!Rq^Z1|q$A(5ZPNAhW#ZN}do7O*6?_{^8E?PA z#CYwBbJ9r6n~eK_o|zsmdxxIk29U^vBGfNOy+Lb}?zAzNjg@?>njUp#2WD{hiAC~8 zD*}uZ2zQSWjIE4oT}v2iWd;MwHnj^4Y;Z~AozB#;aGq9AjCVG5t($tYk z({XL(h{h>w@!J-yC4?y(_z5P_r+td~MW2Foc|0tsYV165oWEHFDF6nDQ^HR$@jm%^>!;T85S+FFq)|#bNVx z>1QgCrcxNwr~dTBI~I2EO`yYOu{8G@sVDM&tVDkN#%_{doB_zg{Ne6g0JDJIH8|G_ zU$T5f^TKHxofzWb$k@6RIEn31lk^DmbmXrcBj2tqPL!RcK9Q&OTkTqc7G}pCzV+$t zYf%$DyrcLj%@56=&IB)P1B<|xm`l0gq(OS+F%zkHis|3iLrn*BOp*fNRVK1 zZT*@>nmi!A|K`ee_O-A%h@V%}t*93zzf;7ePN3F7^9Ae>5_uWyS#nE4ljE8 zH^HB@yQ3Vr1W3<8M?sI?$l3LRiz_EUK4H)#fyl^;e9ID%QEfzO*iQ7-5#t! zhqw7TdnqG%6LYN4-vnmJQqfXvhbvR{rSpD_^?TIHEJ4pp(po(QElPvd_dI+>6}95~ zKsB)%)be7{wUoKTT@bXM`A*~!!nM0<=9&R2RM_={83Fk9uDW!`KJQSD;B;5d3JG*+0xBoLchxGW8|;LCaUL}7{qB421-4%j;9oyJ$w@zj-TuUn7d%LS%0JPVVG@LzI?& zIff(QTT=5VpM3Q8kzsM8&SWGeTW^rHh^iJM%q~*S|0=2P*Y&ptf=M&3N_{^}z8frw zumGurcY8=8sDc7lCwk!vo$peZ$P z%yA~8({7pwJ%Y|*;h5c^Cb=lSpVsO9f>drZx~CGov&@?b1y$Yg4(S|5r;8v!szDZc z=1z65)RWPAN{?feU#u+>|AEBh!RsCOCAe)PhzDbx+-8U@N%iI+)zg zDVd)I?FtG(mx6MgMtZ7K7qO_-ste%aCKM9aUG5P?@MsBlzl|F8))9lOpO39Lgu!PB z3LRBb!_4bK!$|Kk2$?$h@S5ppT~NL17fxP?V)awqiVL_k626^{AJ<0gM! zpI!P9KhyJ7&5&vkWiQ>JAz-V-z{1G9(&9hhTW!4mA>qPcQzPyR~`8f=XH z0lOiLy<4cKdsLmJ1HkCTlYh;&)UNEF8IknT1_RJ!C0^+CEkSp{-z){)2end->~vX6 zEeA;PC#RUIvnzKfono5PGv~_>=RDpYo)(F#X(u^NBEb5@x#6xhi+5*n5BM9`o)9fB z3JH;1v|3)yUPc@PJ}Zh6W62%K3b!EScANnlr-;LD^|$sfm1vhS{0}P|zBLQ4z6^(O zy+Gjr4!K3;?d{71uL#I0-m!Hm;*E;Ls|L^~fiMNN)%+sy2#0nIH(Z$G?1mlI7dCW9 z)J7A(Cg$}jaLgdJR%Lokqv#NwoL8o)FP(#+W=wAm%pagr!r>Gy5S)u9clT{vF49c< z9>c3m*I$O2A+gYm7`lNgCR819U9qQ*xVhE!tUXpo(|GC(n{x>{ld_-hlR^~Q9h_FA zpKIG9MIOFH1Exg16p4~ipObcO~KXRr%D|+<`ANOEu*`!lh|PR@BMqTT_??4~xMX6i>yfJxdNmAsY?(B}ndRJTyu1jD}$YO{B)+XJ^;-=u(E)Q<=0N&mIKT+Vk2x`D4)8n2skA zwLN|?rBL9B4DeOOQ&S^JsW++B2!9<1LYxdVn-zElZjt__BAArv5`9BdbS6pAbEQ^feOL+w@jkq2F32lp{?{tpUu;!bbOUPp%y+{xg#%NG!=<+T7!V#Iyk*YSj5~~LB0ruJ}YwWI}rsPV1 z$CD!*>XiV$@?FLn_zdV1d8Bw((P3Y%X{MlS-!8oi<*QA#Dv3z9#pJHYdar-Kzqb(< zURiv7jNw`&)XXij9r;unIuMlWHxM8`34*(Bf>MMtS7UL}SJQibtyJu+*F(RCr=S*- zV&i#wqqnS)B1EMW@16?|A+Jf2*A_hJL1SSh8lpxG^b1vux*m3??b)U!DLK&(RJ@3@ zJ)U+}f%}nZ21>6D?o|nI&%lGdsB`6Wb0Q<{jeP7=S_cCO0a> ziM%Y)b?SKYrI77FkRSlzsu+}xNklBA0vjpPiKG4#m}}g3CR7P|E7BiT+4!OdJIsoA z=QNWbm(%x}Z_W@^yy+ACGG+PhXvLvpltLG9&V)k2-s`FpLAsN%A&|C-C>J9zP}Uy; ztO`Nt8+LU>S`tEo$-HTh{JR~jG4(fR+jqU$Oup;-6bYIIt0UM=*%JiYZ=97z??VB{ z$;MJk_rK7+2DjFP>m&XafY&qWwA%#uQK$2!~hN`Qfd5s#7`tN2^|Ri9vg{W_{$9vnIx+CW913q2cyiQ7}d-7jR!?b2?l*(gt?2|l)H_`a6AcK%CXpx z=*Wg&kFvAFVWJ>bX`>9XZZIH+ZtNqyBf(9Y-`zfPJ&zQK|Fu3Hqn-9)wTHxMauoEQl)(aGVg3uo2%LxP}EF1Q#`~U$Zy72SX|u z`x)Np4XA$)HCB;SQLwqCrWb(9qNW`u(;y$c&;M>bOZw^V4c1OLTAwJOa-xs|oA4DI zMpQBQxNYjK^woZdmZ#bH-?g1=H*Ya7f7+7Lv(If(Hg%`vy#SIRQ1cMrgvP5)E(fDa zNdy%ZGngtli|MyLXwPUPLR4f*EQm(Izwk0IxuE7?-um*=Yv%J1O59-zK!Gix~Z*W^4Ms%XQVrg z6OBWwKnFcohjxoAup=Rhm=`~uqPb4qt*Pp+ib3Mi3gIx6k}p{4fx2Uuww|Lt)fY!w zwF)Ye-eJA#3q0OAVGRIuOV zPZXijR$jwm?M+==!B*B_sjwE|eX#Ejy8kewt6d1U8CCn+jHy+dMd+N)35(Lmex|yc zK@}1!4)<$>F<&!m_gi;ioN&N)z=I;$TjPm=;~L5MF)RE4SoeYdp1*sr30Njl1J43X z5O8sgQL1=+Ehv64H2ZqJmV980QYM8CHIcr8h<@CgJm(iBzyI(>w>^$nt_EM0?B8rlAt z3HxN9BmgII=Ts_i08*SK%nIwfB#2~9_1+Mt`C?Xi!n2ILvL=}b9DpP-aFBG)G| zlTlxR1wKJKMsw0f-xJZH+C}Xf8RcT6fq;+~97waUC7UwMV2JZY_l-iIz4wxT|6NcE z^}SWUOK|v7zi@F}nESWOXGh1-F27fiTMi}K$%UlRm%BT})m~oi(-y_FcEQoHB-3u* z&>6JTWAY~B9#isDSEA)K(U;~?KxI`z&sBoI&_yPDVYN3kI)An>WqfUmdlxr$H}+0S zKn1G zZ208m%HX1t1w>#0+y#&n5&$|;y=uy3jYH&rl!Uih3xFeG@{g_0=LE6NMuGS^%Z|;@ z0bx1`LKmUk-M~f-S+g1rL8##Syl}=6dkQ9B+hD%A+? zvOBe5Xe+n%VmZq5X5`i+I>Rb!4H@OJmLbDPzDlH#pr>#c^dZ3ozy*ADe8dUUUfPy5 zTql>!2@peOfebx~-_7zwZdA9why5HZoY=S~MA7|~IK`pzD4KBc zD!fA|QAY)Ey{A;4od|8mzo!9>#NFL*&?IT&h|TD&&C|jSw$6in!O){8@|H;{=mnlD zi-kMS%-LtTX(n8Or3s%sS`jP4kvhG6i93WUCx|FtrJ&BV%Ww{|xaFZ~fzrOcphvVI z%YLLUXdyaKJxRp7LcGfaY_ImQX)4dn9XIX10?3OjFt-yWa205*X@9@md>)GXMQ`ky zdvXYrtAZ1AZImWtDQ~MfdG|%NBN!c;#ct3WV~W1k&*M#4TO9OL*No#eOx{4$G@9BT zt3Sn+Y4$bn2{5=6LS}fKM`6s83(l{>?z`Ri((?%L zhPPV26KSGtPJS$+Xz1v zbhmP67OaUz&~4c<^)J<^;Ph@_2=%E;`9at3UyezyJN=sO4N3eKG&sG=um5`s0npW# zu9tqC4;vNMYvup1Cpg4&)MeP$1pd_(o- zoab@5^~oHtm#FWg*xnOKfSu=yI^vG?Yxhnd&?G{gm!Suu@x)ydp_&wU7$W-FPQf2% zae7xuBFG<}10GowoN8Wc+z%fZ4R?rGN+KCHSb0S(KT0;U?{8fg3vgd%SJ&S)oL+nv z|8`eeo6)u$(6OTO0LSv_oe>F@sxH-3? zp1p|w_&YypB2a2A;WdWUDQ;F97IAJnY-B;-R6FYmP>d{Y^pY{YV6*wRhyU)T?f7{A zpVNzPjBoJY&`Qg{;y2iI$6R49YL{c0#StS=wqCvw+3Ed@ShqP`Kk|~PQ{cmUl6og$ zUfmh8OeYz!SDtU&^-(S7oIxilkGlpkLUN*TIlbM|c)QY#dWnd*M7DM-VcQ7{m!-&( z(B|Qn#C5y%r40!PU0F+A^5ke&9KmPqvUuQKB3lPji|X6*I&fk2xuTFe*i{?iAc8sW zS`=McR;)i?b3wJc%kr?|aWWVooTbJi~8U+L&#QQ_Y)aFY4akt#dA8RN_#DJ<; zK@uC6ZDg`5q3)K6hfAdzdLcET&Do6C@H_LihSgcKCm|pKZx|m9h}=V5~v7m^D#OkXx>U8eO?!7jwikB>cF6T*^23kkY>KA|`5Z>sgeC z(n&g}PRT>Dh;loe-<|zlhj~1uuho>8zFqm-mB5)KQhhy|QuvSjf}bf%;ef|BSH5)W zq{CF+M7QO}1J%O2)%cV*+ds!$4TaZmVZ|27`612{E@@r%VFEiSGtiWkb29e`*7Ee$ zfv>Y}9C?b~w6w+P18%mGNx9Um__)h5ZFe{9K7AUIKSB|8E@p{rv7^99eJ^^%o;7V> zkD65VG`6X$0zpicpGeYpo~70i0SEn}pHNPE4Yrf1_}wJ#p2uuqw~*CgjL@5B0i&d&?_gUDxYt$Ka-8Yr=ra&-Ku9b++uKHlHZ33jv#b$}bs>BL6g?4T8_V zKBDApN*MWCb-5?9c#4iSpN8V&7#!PO9ZFTZNR!-+@7h@^@Sd_dr&95~v6FI=p{Ol{ z?}@g=HTI6jSbv@ED7vMpMhu+jLbm;2Qpo%qRwJ?+R`q_`>1Eb6 zz?=ryv?Y!EAT)RfN*=dpDkU*_e=wU-U(nsoY3cK572(u-f~j3T*qL0$E#ki)v02VS zl{@2y-)o#om>JqsHjMMw%&IbSCKT)GQBd@t;uHpiLTohtsYk#B)OO!o&7Ovhd_%W68~fBNqo|Qb5H3E^B)@4_x;{vP9e+ z7K8IDuedB`XJl|Se`3CXqv?`ly^PDy7TuX$?YCCModepr*hhDu_@*s}ri`hwqrPk& zb&2@-uG;}DKMvtC134_L{7S<#4K`B`q1zmtmLJ1E?4XN{WfpY4HyM*mkKg-sVd6kC z67%58_3&g$7bHGEqz+aLUzjG?%f|lL*`xEE__ewW=G$F&TF>CMYb&C*#e^@}C#<*4 zJ1*J7P^(wBPCdC@sN*4U8@@98xbfEK)oxwHRXINv*Mxnh=yNhzkJGYUoTBkd+1^ie zXmt2N`>%}7+0a7c7uFs7@ka58z|nc$p6J@oj|XEK&>KPy zi@OCm%W_6XWvJMSB&~C~)B6+(6T|lB4^ST24dyt|ubn94(PS+X2?rxFSS^JkclwiI z+ncBl3ie?iFZgrq4XvE_BYF)C#W8En0urE+MAM8*1t(@VnF<~zx*e>VPZN+N!Ovysl4$K5-jI2vxzDmBxF;J9P@)D3o)&@E3y~)lxZjFiJ3Aq!ygL<<9Loy|nHy{Jhqc5dJ@e08-*t4$ilv4$d$_?GCFM=aWJmiwl+NoY{ zbP{SUllX2@Kp6)9^hb15H6{#;`za=B(_m`d=Jgo6^(+#8P~`0CTv6|0A>Q=6^UeIq zrd@a({JX-y(6SfCSEeD=}n==P{(y=R&YqL17e=G!bH(H*zva-%Z zf$>i$JGE4{`Q$x9Up55(!lIQnyoL6?KkXnuryr!MIZDw<`&83-FdQB zJ7oUzXjdAxnZ0S^Y0Q>A$gr1lG^{BoIJppz?le`EW?ObT%$vs95nf?#xLUQ?_Nja^ zNckU-Qyi}w*zVm!(nBE)wQeBx<33H>r@NBb6;=d8151@VyR%{jm3az!-2X~nuHS9| zHA|$s54E`I#qr=+w=#{Vf__dX!9}`aS~s|AxM&+G?JtKBT|hiMraV3BZ7LPN4$b~U z>2>?%!MDaC(?unAJDJH_hnjaiD?B3G91W}&rE1EIscKx`!ae&lrF;|0jISu5cY11y<`^tlsfiXP0W~rIuDt* zCN>33O=}JlrH*MAIUgvy7lqq8@y-bUR>Mni`<5DHT;m=~@rO}9f_+YO5&V@PDuh;c zT1N~ULz%C^sWLI-JIwqg37C_`ZPVUdsB^EwVD3a4vZH`Wm!QlseBhpQd!tYGK!v} zFG+z@o0X+sE*@cdnmQN?@~l<8?wne39c!1yg2rXz7VSajNEX^IU5BRk_YlFp{)~i^vr)QJ8HG_~=s*+g2AEZXm;eyY=dgqfSX$)Zj0bJu=UM z43aM<((4Y)+RV(NkQ?V^yz$U4FHML2w`OYFLc&wV*&eR6Rj+al_e(K?>a zI-a$VL+(btO5k8sE|Iw(_Rs5!yUU$=j1^WQYG}yrjGN`W=Kdj0VLSe|%q2Gb;}%)* zm&7iV_C#}O=lA3(uk^9Pmh}p;{iKZb{B|0eZKtF}nR4`VNNMtux}=X=IX|m<_xZ>r za0|yd_Vfm>cVZ|f^4Nylw!C(SrmmmaV^zzBs7{Ndt`2SqMN*vkS1k&2ko4A>xs@8D6 z7n1TRhPvB2qm@Z+nO_g?M7f7qx}b)+H#Ub$zs22~eeE!RD%o6vM^+f(233?xtpslh z2<28d)^;lj)-v`K=Z7!D^&5X#480a}-5*R_Z%rQk#HAy*pupr)BR;5|RCQUbnvgv8 z(l$N({^(E0{joeAhj|F3qgUHG)W7M%%^1~=^dR(;ZoTcZM_&V?fUNr7E2kmLr6iy< zzdKLPET#~^?D^x(ze1F*2Mdg=Dd7Q;Zdv?#z zFbhAcm^GW~!6LdNW<@{@bS8K&N*bTn)9PxRPe!fHz3s^)X z{rGa7e3op+ela0$+JK%pp)iGbU*)|O&6^KQ!Bb3!oKHKt!w1Z{!JHC-Kc82c9rCB?4H>bV-&{8ZafMj*zg~ zr*ks$8=>Xwfr5_zK;3xeUSuM@C*TY7R)w6NAa7cvF5SE@#)?r%<5_o69g{i>bp9=j z2_N`QbdnB~{w^IE!w#G*pbp;O&On~Q!6S3+Vb%DiBwNc{ zfyc?ygjwX4pG(}ckzI;C&k@QkIzW9T@|oogP(ctN^a<;$pXVJ{Hb-34k zP3K}O(UfBqqP@hR_w>&-yibdX%!s}=-tm^|z47;DECra8sh3mUGTib+gD5?1&1W!%#nl{*Y4u=J7^De!el-gkPL zi9EOmKt&w!inx=oSgh4)NPD?-_U|XCJd`q*b`j&Fa*W4Qv@-g z*F7{+x?jxQl0Y#zK$x{i8(Kyr>3#Y|iHltpj*yjK+_oEm9b~(#J1T}E@dw9V!F=Mf z$N#qLFZ7%sYc_@!thQaFFP)cC=`e3x27fkE9CUUb8E=hz8mtH_G@|!;MZ80~pK^`c za#~&A`Alq@d{ZJvK4tTngY9E66)h*N*QZLP6iV`Cl(P?ciM!Swm}J!VCgr1N;tcW{ zw|1fB4?7Q2RYm1IqGz@1c}J2u2OX1@>p7>gG`MA$Kg*xkdt9Z!Y|4q_Heckx{3X&U z4*M34(p@xC@;-Dju+tD?ceu}&ne3n0t-lc+=5oQv5AahLlIGuudmQK{i0mFQ7;HE` z2Gv=IYYU|_GjY0w!^U-Q8|9D2htBaO7bu5|o;Wklr(H608LZTnJ|&?^+QIs|fg@pOCrPxf7+tB4;!r0ywyDMw2IAl;m(aAZ-7XQac3NE-W2x=Ppq=HQ ztv3>nol|m7C`c?QgXDRCR|5-VGBg0-q9c^Z-dsWO4B~KHgtjlPDc`wNtL1-Y*&pQg z*QwBU+J`lT!%%8+LF&ahs{<@DKX3373{_ zu!5Evd-gY9H5I|Yv%Urq{Z-BAKS;L|xOewZEfjPRiLgv&Fm&K!fvMH4)c0;kO+M)! zPk;T@+~Gw4{SER$`qp4KdY=sQ>%ji<8u;YAh^6v53$vAnnjE{(Y>HWx!`|64f{>vZ zwlBK)*Ckl&(nG<5g$hn_Sde49cY}pKsdsI<0@k^y)b+5&5KAoWI}^S^ed>gqgD;z$^L$ z4fs*dzVXNpe|zyjq#aA2+c@JmO2Ngvdx%!2=g_j}x_ybgo6j{h9iw$tWu zXIs0-fC6AdH03wAH{mW(Z;Bq)vczO2X`!Qh^1B~z-Bh@gam$^ax2!cED;2?_YTv&X zu+_)9r9Y;<){(s9zK9@NuRk@$COH!}**U@r#@`}UBTz$(aPn>4>fV6%n$vhgyYgkW z2gBqw9a9HfBKq1u8}SZBw#kY-L5rob^h)G>o#*#H=vXQ#zv6TskWDGms9Z{--;tTcP-A zrb`|!GdZ+J2xA80XFjG6DRt54R8fbsRB|qp*0MDIO$+GsdSv&H8J|7}Z7h{#Cxvyl z#r&TnI#2eJB}I5A2ANWS@W)9WgYvFw6BugydBd{J$shUCx}J=+sZr-oSdOrRG%xYO zUMVQ6gJ0st>6HBC8-qgJ2d*FCxZ6}D??Ot&dIDq{&ok@|*T29oD~y|gTi3Ihe)WME z(UcRHT};SlO~=YRU!kf?3{L^wJAE_=-07;p@YL*)TL7cEdR*TmJ(e4%GJ^8Hm!x_* z%CD8UOE}&uGN|7Fo6UUczPB91Hf7@R3yykV>~~)zof|KzAa(tp{FvBsEoYr2nZ#>@ zx~N`|2m9H*^w+As9;6&^RT+(?@gau5&9u5c;Bgv@4h5wc%`=O0zZcfX7y>5y{cT0w!peg*^+>fS28O`oqT@pbjxy_y4iCRZE)O;L1ICxSz) zc^Wr*$Sl?4cXTV3eb7p-nTrN{g`wy5_Omtgj2M1{6OBg!7N`+JKNTMQ{vugujvn$K;iBs zCi519?8*L$5}*$QSRd0z?vCg|!Z(4Ya_b5xZkF)HtmyV~eXMpy!b=sEUwrB&EFocF zN(8avv*h1tC)f3B#WX<7fcu;`sHi?2wvr?OCD?kjuD;moCz7zZ6QM~D5cT5S&zU@LaGV4j~wQk1!Tko z%j*XA>)0KhEruk8cVEVacf3E(UKUS(0cB1TSR}ACf#xOoUFpsb_7WmxMFhP)av-?J zx)CQo=JywUy-UVriQS(pg&O=lRS;o@2GVY*gBh;}?WFQ% zi+p}e{ZhIFp z8m6T=MQ_F?(sE?Q?l=#b46hz4)9&noAZ!1a)jcEZYX5_s0={2Y#s8$x7Tc{Zo}J0c z#h%|cNdAIY~KoVw_ly4(V4GQa|LrjyxfZ)MW5lmj5q1UvMaCH)jFWda|JmSl7Zfv`0$#!r?)4F0;P*WjC&{SV*CEdYPkMfGXwiQBMi`5 zj=T3^R1^%#U`kCw0TCuh$A;8EWPpH(lnRQpbPc8=QqoAnKtM`Bkd93W>5kEp95rBc zEPfyF`+L8h=O5T>d++3Ru5+Dw>s_|B*SEtxtF`)G;{E$OaC^;B;Gki`3AMmk6^&Ff_T}vb6(4{Zfa$=gUM~UWnnMZnY`_#Q<$Cq%a zTmGx?mGO$pKW(vlxOeCP$`>MU{|?=4-O|@gW(wb{Gs-)8d3K)+*oNNj~==3U#wIv&WWtM8(edkFb%@<$N*US#MaXlfxt0= zA@oF&#g=NMY!445+)U$nHe8v7GI<21`YRA`*dj0kORv(Zw_juK)9j}On5gEOtG1fO zDLFkQydAt??`bIytBF5-EBtkJClr`IaoWdI36fl`vZS!1F9AB87KJG<^T9wdE8QPM zF#|k{3#IzzeSbphSOXFi#huqZjjA232- zhxvjG$I#E13=l9uQJ^S`J=Fl(x^@2kz58^pj=NvspG^B$c=P<4E^rFMmsLH>{f1}_ zJtM+R{&ES*r~M-&>_J{`W=P!W-RF))N>8l%8-=C3J6ojRZ#L}w8Qr0qnlLJ=WKCph zVX3vx+BmM$j_YHbvrU~6YrY~A{<(CU{SHw1X*?%kQgP5-UCY&m8Q=L}AgA2j0kC1m z%aga-jz2t#(@(&7EE-7kekvK-Yu@U|`ceO&jFsx`$v=#iB;1gUg|`l}oig)!Ygnq% zm{Z>hy&ARTSj0rc?S_QKI4v(ZMt6Cr9`V)}nx)78DaXy+kp1>4_{uXNEWxo4G(b1scBpULvo0}-+Cb22+?ZB38 zE&=9P+(&8T0i6ZE4Sf>2`_s}wPj_H7J(h#?{Y0mX;bp}St|sspftC`? zmX$>>s(ubsp%N50IYUamcrpCS3RTams<(bFn3=;wyJr&I$T&}@IltCxp zr+dGKmykCzLy3pm#rHlMMqf+$tgr-C|xwYm3K*vwL2MRQs0|#&y zrI6h57Ot4FUzqF2kC-ijHJw5gv?b9@thudW07u-qDR&HbHb$}aiN)%`yI4nW$GJ=~vj z`3~F%A|qygUZ*%Wup4SQ1zUW_ zVD4pXr#L0N*S+RxbU^Mw7ZHA#C1*Fa*E3tgvw zy8&wII)@(0PW@EIv|ys=-xK4y@FoHpF~VUk_O?-;xqk0YVhzyNdD464PD+@%*BSp! zcqRQ}RMPj}=uVN2qF)nf&)G)!S5bmEyeGtS0ouK|jU4OXy`fN*)gJo(+Od3vwyp)a zo)yLm-EvwRoK=NI0}!MT{|_o#JLS?Z!kF<8ECspVgCBNMuCDxsuiDOi>bPEn9vl6u z_B)KhufDSEV?-`aa`^G%mS>{JxT*;&@(0R?VLc!mr1JRXAAj?M8J)CpXs4^ARS{Fa zm*eUUGP@F=j;qJ2w^y=SY@G_M1@aAZ7h@V(8&;}qF5o?5q^JkFjCr9m*;s70u2s{Ep_wVpJ|VPmqb9#;FSq-OZhT1fj*2V5YPkxM)HuyV6s zp~YOd=L?&xtH%Egn;+5YWq5nyhuEa)jK)sF>Sajz7gv6p*nFpOt5~|^_E-P>d@CwW zW4oefhgJ8I^ltl5zwU50q$=bvEAf&gpug=7)H<@;8p=CYU8$qtGr){Sx}AnEL4%N7&OX4cf#Lzt5IGER#8g&$NHW9L-D? znn&SB-!xP;8Cb?FK1xqyw(v!M%53|61un+gsE08Z@QbY5mBar-eP-BXiD;^_#}vWY zDR?cER+`eSz^wbCS@$~ZJLjZ;QGBjOTYSc+I72DDE1|aIkD@8H!~LR?(p4*=v;*oE ztY|;o*J-|c>Z*nXV)-vgmBlXLXRR(+S8(e=#wR4tj|9`FZvsSexi=r-T4 z!9UwvVO(B7_24O_78Lil?gx5}R#XYJeY(ZvS%%1e6@s}(i~p?LnXYtln_^fD0(EfE zQ89jnW?bc5x^YZGSrC;L(|mdE!~A(fxN0|31CE3(IH?(Zdt>}}f;Ep#Li)}_FMbpb zj(s#acfPJ`?xZS-6Q92sSD9L_DrZ?8>Vp(WeO3q zrmEU%JgH$|*$do3^|E~X${?w}?rVx%Noo<#a^2ezw{CUV`tq&tsQ4juu=Rz;uDR?P z;+SiQWj8PW|6h&&kU#yi_Xas=%lc$q#=mVM_;dhtB*kWQG}S@pbzSN2&<|hwI8JgH z^mYF|D4fk>fRYaOi%5LuOE=E>=B>k61`lR$147gCXxgwbt<0EEU}`ge>Nf{by68<9 z5Qa3Yvl6w~S-uLENLyQkgnkqA-xYDa@!kZki~__+7HA9c>QTBc#qQVwv)^v3>UoAG zheuX=P*(XL1rLPYK1$Lb8J#X5bpv3;ZX?W)2z53lHl+KV*DT!4!Y{BwUw=0TFlVGVM~RllWajJWljm}r4Oq}P0(jxkoEJle}J zg-yuM^5mH}rsH0bhW$!$bGcC$ktk5$RylNu)`tp3?Aak-q4wi2Sal|EH8icuNi}a@f<+u%`G;Bx;u=Fyrsmu+|X4 z1^Zu1zQ}f60yak;_7)QR1N9lK9RZtBM2WK#=`Eat6CvSrj`pTul@*TWBD46QyB&OY z;@p>S*`F7F$xV>o)xD+%GJRLqkH!rNH5T^%l3 z?#h|ST>!#O8h^CX5za$x`c<655svFs#_{ahj-kTGb;Y{lKYyT`gvy3P5h6AHhV0d{`HB)R;yq z+7$wOlrs`zdo!q58<(=MY8oM|0Q91KE?Bhl@cjk@gcE73=({a@d>TC$$!tRHZS!`J z>pqI@b2OJn#@Flp1H2hf^sa79>02d=HxYlz*+RE669{yYAK#vuS4X{b3oPODrLPIaT{3;6MXRR zMAcUZZWgs!VoLh}1o`Q+GNFSuIoKc{*^wq8PD@IC*o(Y|AG;->;>nYq>o|&9=DUL_ zkh{VUE%zWDFVRFKh1v=SJ7|Gma_cC0*zDR-+Q`)EUP-&Hd`=uaj_>IrhC=RJ)(o7y#KJFiN2 zBOcQ5_Q^}}O&5L8E2IMS(mfe4`{TbCH2{Z$7X(=x2Gs6q#>tTR%0JT_28N#7s5xs1`wVeh zQrv1j7&sGG&d`2&_JQ3;2Y_Q1nDQ*}%BPPdu2i>zvS8b{>$LSXNP#ZZU#!WVderc_ zq00rqAE#QWs^&z;{M2dwBUgOXVcKUXpU*%Xe;zzhwT?$0 z0~c^q;Pb1LlJ~Hjh|qP2FqiY)e~C+%X^aF(V z6D4!{OjbGaU-Ma6$csDu!gpD_7-W|^W)Dleri%&1>}&bARrlsmnsw)up?mrb>wNcC z?2?n7X+l=*|MN#2!b)=A5hl9Apr|9BQPr+6w6ab zUADx$3d3uabfwl`)0`Yk{72%AtGCiW*;%DTt@AA!1&rJnVFjdB=RDYy@yAM{dE(}N zCxk-6{>DkCO>gbojfgTk9!*N>@NmpM$7@oLJv**o2LKA~s&5fTwg1U}U1Z@#D7t01 zQoO^1c~9B5vbv@w-vZ~^`bPU$9-jmAb+$)`qBGT3;o33uK|&b7H%;JwTkuEi<9Xy% zOKi=xyh-X_4;D?H|KaN$Nyys`P-_Zw^5Q;{b$GC=;+{q(IGER^8d%LP&~n}SkQ>xZ zYA6IEDoPwl8?SaokG@KQd1z}{mQEVVR7MW@YC>a&M&}MTrcKut^SD%wY|{lz@*A#v ze|3~^o>dpYbVH&3|LWK8(_!+~ z<7%<$&ll|HvjPh6?W)snYylcUjO^(?OGU2qD->8BG|C zyX^_&1Z!D)2=?smX)G9N5Ti2_N<4pbH;7^JH2&{L{h)U_cI!g-JP`uAce#8nND-U2{R4F(e=KB3!Q z!+>gX$3t4-uKKw6=@X0U!@w1ZVXR$prE3RJ8b-b4{>=yDn0-)PFV<`R&%(PY6Vm!G z-B5&0-H7Q0rY9qhrRrv@EuZ@05Aen-r2fudzITH;&aQB`60CQJ`gay5;t`au&g-}8 ztUF^pC9CzV>hwGwNv|gFEdSz_Msl^Dd<%H!*}cbY?&=tMZ{;Szembkf-}fgFCjh)v z<8M+c5%;aU(svtsUsz^!!IJ-x@Ksm@X2SESMFA8*;yrF%K{l< zTbCwS4P{efivJkC?^ykOaru<8n!JtL8y~m!2l(AdL$gXJvGRZQ`!if zTx|lycKN%evR-2|S(g7tU@>Eo^3;`_EgM*uG)zkP%m+J9l0BRdY+T+v1&|OD7Bpa< z+f|zX@PxVv}jS%zUwHs@_eB$QiU;7AH>k{pFq?!#2FZzh)quG~mJ>3^ZS${-DyhrgnEm*%=9#5w8)R^8 zf6;z0p_Xwg(8ln1-g(b~Unb%mA-sI@uYsn>xklCx4F4eM>2ql#GR#53fIU3#?||{Q zn#FZY~dmUKCJjZTRJ?h-} zx7PY;w;Jg7gz3s_UX7>XTTK|9&6}QxrCZH}b*HZJP_LW_u5U{z(2%~ExpM|>HcNjG z_heTiL;*}HAN;;CvDZ9)lp8<65puXoGpn^f+kJEQOGj=zA=$G;R|&hx68k6n?~0Ma z^Sv`FzR1z=1-cG?6M@?B2Jg=tL zhGWa{?f_yK2)y%L_uHsujYSog_;yoC@us!8^m?xd$W?8^MTr`DSPUAsYz_a_j{DQR z_f_U6kPos0=-D+CN*tM*Rtf^Raf9El3Ar@wv6954r>Izo6yFo9L^M92zRMbFpu7* zFIxQkrZ_(H{StLp+2L-76K7MD!W8sDi2T3FvoHKPEmtAH%?Wd?*`?*xzAQsa5sY5C z=B8aYnwBbi#MMPA;g`z43KT0{>E^S9vMnV+nsa>~^r+3iq^?T#zPmD^)Vimlz{wh0I%lnz#)}EyNsBvIEjf$tEa5RYW&%|J9Z8J zy-guX7gVS^)&h_1>3BupM7x5N?_Ui{{`?LYk5;eXhd5Z%$yh0F719D&5OE-ILVgMT z$}kW(==Sl0x%`TH@v->%&el%jKh%L}daTQPZKig#-;uu1q%UxNI)>Xd zLq(WV5r|r{);qFfx4JiOU{W;srZ=nq@Bfs?p7eD~NxK7|m>avY%`ImRoSiM79hE&f zAoIO579gB|%Z=RNdq*x)h+@u3+mjKM&PN^!C8loMSbib~ zK~2RTYhMWtx8=Ce1If2XWHBsmHh>owR)=i=C=XvI=XzPV_I1!waR)uvJ`?ZCI{_27 zVbW3RAn{rmzXj=)6HWg0?9Z26W5ts1+;A)j_Hw7?!*8Q@BYf90_nCO&5duE?!`ZuXS9jDVc7t`U3=(O^Q%2KDY)bZ# ziHMJm{BP4-$Q(Nahm!CheQDh9Qic=P0fxnE@2v_b6E^mK>;<0z+EcQ|^IvnHju>Js zB}@}bsw{omFetyS3<@mLAfk>jli|#2>8`8Vt+<|}<*p0o!Tpr}_cH>D`Lf=6@}h9{ zfXVX7R(>xt`opc>Bk*DENI0D;`{t_4)K%QI$=oQpXoJE}W`Y*<8W`#A$6}}NU4{#a z5hq+$_P?~E5~;VStD}r*X*r{o6!8bQExLt6oj!o%Vdw4LW93wS+sgN_hQy&3xS-MU ztkhMAhuwirJskH4K^<{*vdZ{ycn|(yg>;J4^J15mWm$Y8TS!|l785?#&JW*>b03f9 zcJtk?0XLj9*TcxHpHK3xGxEgG_>h@JR(1Z9M0nooOFg6PTk^Z~o?~WMbb0d-73&e^ zWBaP5nbwf0k@1ADa3o)WH5sWA;~M&_EFNVRYJJe6RilxxzBgmcq(qE zzQRkUC*-r@U*5S5$_uA+)-^r!ddEUcqy3J;x=x-L#QT2LX+*!`k9^wJUSI0XCQm5K zy0X+xaozu_(5dnKD3*x-@k4JKKowA`@@Bin$pHh8=9>$6tXj#W+K&jRxgwlj$kMyt zV~)2JY>xRC4;%cpoT*>Zb#}}e_}#$Z^=1A!IP(J3x->5fduChRbGV*R?meUL&Dv;{ zsN-AxyPgNbVvr(5iGwXD)*%$9*0dWtf;t(wD)}>6l6IMz7klWqQfqz=CWv@N49Q<# z`n2!i~J zuJiC;gp{3`*j*g_9Et^(3ItA5u_(zpAjRlf8{ghF&p(=ZmHN$ia)2RSPwjX1^$%lp*1KyD`b2pi zi?PWjOqBXpRoTS+v%se~#_laqh8=xI-PGm&`l&6#bk**VZt3TM#7vG_#$SD>3|lj8 z6~lcjh1ss?%VkH-be?1JT&ds+B2VhEa!IG{;1PYZci-F5qA=4Cp+x4eca~vUW6Ud1owxatag+gxY-#q zR3xJhN!RohOicGe?_QFf`J7P4XlhNrZz1oczyAU?fyL!E&ka@_nMGT;wT2e(eN6P{ z*o03@&Ja_0S%dQ?%g#F^()&lhlANi;1o@0jKi9e*In=*atV7YTWvqN$jf;UjMIsdss+TXiGEXW< z?MFK`rbhh^B7{sbDASde&5FqyRiL@ z>j(;`vnDo~d2|&gZJqhT!jqF%zId31z&wjo37F$YMGdIa`QPUdJDrAg+!z5X*pT?a zfVTcCVU@-{$JJL;TdEKf#SqNJxV4nD4Uu}yI^YM~DQ>Ik5uIsRI-mkBZM1UF$43Qy zCaqlD6Do*wQd5$~o#@L(c-6l?)6xNx2%!-k2OjTZ)$I|~MWwE#or-W{r~{krMI}t+ zA)~rJk9|EsLV;-xVq&Ve;+gC<9&_DYUt=>wSM5lXV2U8@FIZfWPi)m@k&D_0Io!8Q zA4s(TOi^F%bav1xrI;HQdOSMVds~kqSgp3yiH2|F0C-K1I{za#t$7Rgevb<(k)F5% zQsJ2~D`=l^D&zFi)qvbXeIZ<6=gc*DSH(PL>ribs>CL~1hQ#UM*Yuydn`LPuKl4rb zf#d)-a}#_=<$f1VXVLnNgsHI^i4R{H8c_9xT-AcCmfOo+SfOv%{SflS92*+oHqlE$ z7>-mO)wZGnCYoS}Jv-HwsSVcFW%%H2Hy|Ux?r#yB;_aAbMFPFqt{+XbYu8=`99h1G zHfR-4HX(hWu)_L=He(5@*p)#Y^M=RuonP_i>F)I6_K<5_%Rgg>Ukg0>wYETG+k85` za%@Z6@4+^>nL3q-do8j=fn6)I+8`4#0OBA`R0iAHj4!kSE6mG+({tks!A#Sv0%D+W z(fus#Z?pliM$Ka#EqT^|DCDZf-=lB>LR+fd|AgjadwtYk)ipa$QB@10Tb)kaM_sa} z&jm$YVyWYv_Kj9l5nSwy0cnjl%Dz;MLS|my;k~Gyf%=}jE&rFZOZY}uEl}E=0>3}y z_Hf5=fe}{q*)qBBkT38qD}06T7v9&~XP1-5jQe{yo#fmXHlCceNb`nGIX^W{pcKbU zK31)}a?^}nZ_F!0mWJW9Y^1dHDOC+>CHTfqk_C7(gxXxl4L{&_;Mnwpxvc_o z05^DvuBq%1zFMM=I;xaiofk(lU2#&W?5|`>PdpT6Y2ZJqcW;?ZRP~Ts&0XWuux$Sm zDpwxu1>!ExK8a~2n%Cv$ML>tC&p}`<>Hn5Dkx9<95ngWke~H?I|84hI3{$c~!MKaL zt;H7(kDl(wtBSF*I1f@^g?+2M6V3SbGex~!i#v(!Zjr#Y^FH%u$K{VP@L&tJ64gz4 zq;mCal#YeYoL>u?JzEW-1g;&d)BIfRfT_ug z7Z%2HY5B-@70dOXzD+FODR&u_gyMV!PuF|zfAd5@CisQCWay6E*_5%#%)7_jJ2*2h z>Kx3MAp9l6b6)V&)`gdmytHSZ81wyvV2QR3ROM&^;=3K0>FSEJ;m| zI#ck^CwyTqPl!ioFXv|Qy)It7bUX?|Se{Kgbk`Rn;oSS#0t+N0ChqJSdtJbqU$Wh3Swpeeg z#i0BzX-_kDM=Z^ZOsw2D#GSi*>+PF%Ni5-UeP3x+Bg#sz@t zgX>n}UrPV=5!#!cN3yj&J_l?NQ{Z!eaWILI>tj7#62ZS_yQ)3`wFat6C)*THkEp-v z`}RW$+vVsJakg|8v)pz~LC7DVpc#c^h@3MA_qiHD`LLXs3HHRp(3NAYcLA!7?i>5H z;V9boR!j28PBmpQXFu+Jdr|d7f3w2eefnY$lXlwGIrYC!pNV8cK&Mh-#uU3Zx|VuP zG45^P?jB>XmUA%*YiXn~6tJ8?+i^s>Hz*t-V=&IW?&D;})IaspeMt?>HBraANV}(k zwAo%nI@uCiv72GPk?==P4k{CpD927Q5Bfa62Y zARfzGg=hV1Ydj+8+^Qk6y&f-JkMm8BK#=sqE)?y$5-Y4@2MUQEwx4w4kMB6JIE46fZ)Lc`r(?irX?_QS?mkt32#5uk? zpgk)+tWo!OHJQ)8&Isk(N8IhBU*<~T@6BYOIO4H~v|Ivrb{iOLlj2d78(f0Z?;Xpr zSUjr2Co+k_RE;PnPm-JCeo?VFFMn7P=Q2YQGejm9>u$R2zF^<=zr~!sprif2=Y0O6 zVt!(j+1|w+seQlxUa@2>KxAzq(je;?zesA%f6utmnFez^Tv4Zs#Q(`CE$9V3l@J9zYyvz;0x z8U^yYer^qg6}m1WKP|gbZuahY9@Sd70G|NpPpI+ty9Gz|se9`+UO_2Oc6N5!00X*J zr8Z3AMEb@9rW{L6m{pLr~ z@0!wDDGE;Q0c)jb3)e1K-YX2O+tXdnC!}~yh~q1c4b30*h0;~vCUf$Un}Nt}L^~;~ z7Hf2lRnb?KSxU)%Y5pndSf~rK8XdH?5e!ZK>7M|FU;1#*Db0Py2_BCc=FVT2t3ST7 z7wh&B?Qr<6q^p(3MZR(T-}_1N-@{O_zJ5QO>*kP8CWNxh$LKFvH@GjU{D6%}Bb;bn zxr*v)3)a<+0%-f{jYr<3(?SOE16tUO2=5;v44%9nA+C`9w6xtn*R1|CaQ2{=j5-PN z$xvmF&TjNOSlypr&2aC+`FS<)q1gT!beOYjeH~nS)>_2|I@P}DH`Zo#rKu=tJ@-Jy zf>9PG<*75#q!P?D4oXe|f+xB+1uGGXyjj91bQ22^IJHq0s2F0~?h&?)c?!A`-d(H=L zp+cQSx>=hQ?ZnODQ|)qG1#1ugYl2ezKZ++vv!lHkv3Aohwc|i9ZF~HRM+)Qj2aJtu zo)i%FQGHi^Iyf5(3}z6B1m^7z!s%V>0(HO<7Rm0`hk{?Z4~1}u-z?_8|C53S7TRG~TsyiWZ}OcdLjiNV!ChJittMVCc%p@!9!aO`%k2@#+$oxQ zSas(p?1Gd~sjXsTqB9664`R_*x@>SqLGR`b1b0o>E;ih^BHXX;As(*`RiPF>8AGVc zT~$VtaS3tsGZCtW% z6grD`ra&J050`NW^Yr~}huXyB0I_Bt?nVT(uOs(j5E`MtM$^gRAO_gcmg{wE9r2}k zSGO~&T5B&8*!I%`LJ-7x2A0^#lYFJbyRJ%gWx#Q@!}ex)4!c2Cot}$%m6*TrBQ$hh zw>)1PV7-=H!Rz(en9sY_TyG@(pY0ZE6yd4%rMQzV*u$0Rm~5m5J~8&|US`t3Pc+hY z#XxIKeKdPE_<2eG(3&l2wE(Gh7@12Fk;cjC@~S6_t$~$pn@b>IJSY zvRX6-9eX>dc+XWBMlOI(@7CL!Gxl5lJy-X#ZK@i!waQI9wroI7T0XoD)jlM@9iF)v zjt|jk)aTJ}Df2XnntCq3BJgeC+EV}LcTNYWlUw03d0xao`)9*46i{CEQrJhqlCmnB z(r!``4`199_&e~~pWE_Z)5+0%i5b)G{u9saWhrEo`$?mphO@%Fwl+;XH&akmuXu@^ zWNDs%y?U=>jH~s)v13Zx*Cw;X>wIJ3WyN-_M(e{pKDl3Jeq$eNBm7V*-HI0GGY-UOQ7lI9-n(*JTae153&6RZmu8O$du^AZm~V>I zUAyL*d3yuhA}~KK31-N4MnC$TeVAqHTC7El@dkb5%R(dJ8J+I;22K`;^#MYC(DS^l zD!thXd|)!pT})j5>3?7UzmT#*-F@S>XFNa8tGI`b;}t5owC z>gKf$AX>&)@aMg=oI7W?eUHp|aG{_W)ZK_huBej#?7gO1(MwkIF4bl`h`|FE$8FFQ z{>#gJbd!BzW=|=9_T%mq&p8SQQHLfwik^qd{D!gU1$Ih(Ja|2RQ40R$+tuBny=771gTJdzWCO807HR;#-N~bj7o> zLQUJZCb7JfUK-0E-Ggcyk%5Wc7PE|*@~+FP47U)q^W#yrM~IzJYJj^Mv~#z0PyS`P zE6^b{(m+&TN_v8@qHgp-$s8V9+eQ}X*H!agN0C%0Y0P-A86>*s(c-HR(j9qgem?jvGwY|6aWif=raIcXi<2$UxU*D!90>_AEb ze8qRF?;Q*OLg&7vEXlx&3jUx44-YR~1nWWl6{Yt-rp*MIIE2|~JrdIcoknOkjTGoB zrHQK6vlFPt6cF*ScnvZ^eQ&)K*Q@`&ea_#l(Ysn5nryEEd7uc8p`Cx2(ZBihQuPLc zOjrUzGyWW!;skI+YUxAgA=ANc!FN@;N&_x+CB(VOZ?|0MW;2Hetz9FO@5tXt{|+4% zPdTYuMD=V^itIK!mu-gPsQA>TFEKjffB7XCl-B{+C=jM60Ln*J+z?M59m@&a?LE8= z@NFn+sfBSnzpDnWPjc|t!_qRUHLsl{My8PhwV7+>W|HmR+xjH|WrEs4}Bjj%| zWqQAVuB>TLRgY{Y(pFYzxS&beH7y3K_t2#B>dBE4F{QJyP04Z7((%TA=9t}}DgakC znYz>}KS}y}m;dcKSi zTF^^hzb?pv>1+zVP%&OK?7dijLUP^i*to-dng4ww^EdN#}&b*LW2z)5Eemsip!a@Z7Q_e~;ZhN_o`y7m4 zZD0-q5Vk5RqeBtU?slB1rJygKF8;`^g1dC`a1ymieF(5w<6m8csCeCTnHoHl!iiDd zV%rTExm$mBfCH40!oAYH*=qTt?%w?mp@!|*S>MM0X#q%_Rs!KA6L}9q%I_1n>vt>r zHm2)onu0V|(CPja=hIk}De%NWTP&yi3|ed+ht+?%Jzy8spg0vH0KtkbQ@#JxMl}rwE7>oNVd1?`LR1<{uLE`3|$+IHWjS9(fyaPOPka3xD zvy4B22Pq4Jr%w(i1}r<(>A(@=M-K$4z8N1kZu~bravHftY>| z$@c0l_W3!Eo>i6f`K|(e|DDoW=N$YAzR}R!W!14b7#MxBb5Ux7K~2Dz#)0#FMwDmW zL@To$N-dV3#7ru=SycGzVq@o}SsSI5JSA7ZNjV-`8WZ=)9h0jA9+iREUF5gg$rl8| zV>pYS;6nx=Y^<|sqO{#C@4Ns>5*tKEex9ji>=#J6H?$P5qi*5lEmb`d4;&M+ z8t4v)liW&lU`wQipq^?^cK{24&%+~s#b1#e;bY7=7EnTh3QIbc_8h6A&OTjM7e+Zk zdR~#fq9;(69>nd7R=+Lxbn-TYO*Qkw&QyAXVgv77Tli+;v)Iq`pjTT)r}rpYJNxQN zWRCY;4~hGiT>W3umj6KR7Lzw*W*W(xvH6WTo^8Gn-<8-mg)q+AORsYl89Yd1rZpz) zgkl8v_6z(PJL;{IB#r8hn4%sCY(^o-kVjz#f)7zLQ_k%EyAiH4WmxyHF>LbYNfBTAjD66`Xw#bU5bR z5xvvEA32viwAJ42mxVj$-NxHM_>K3Nu_%EI>P%MP4?{p&pVHvf1*5UPnc4tsW9kcR z?4x`&d(QSCRv~ZPw>KBRi*v-K&%E|}0_O4uoiemAidFON#iof;{vwZY`1RP(E^!$4%W z%*8}k>-j)vXat)4MRlP}bs;Uvoe!GVQiSEB-2MBdpv?60s>-_)fsx*zT9Fx-^`>jO z4W3lJpP#}&G!@&quTI5mfQFZmq`#&P$0du8nn;d&4y8|+vcK9epLbhn z03YlK#V3WdpO64GBowX+M%8<)pg0*u8hL--t1ieDYjmj9p~_M8xJj9FuKvo2-S+E) za;;vf67pF~l6CFc(5sw81z$@ud|Tdz^vP`t0aUw>dn$9+*>^ez3167|6i)+M9ipR# z```3;lcg7r=sNE5t$j26U=-H0Nn@EO(pK5QbnBuL(zC2#+5A3@sS`U-C*U$Ve{>n; zqDuahUw2@FvjOgxz}Bz0Uc;DKtL^{6%MdkxW|iow(qVBWGzX_d(YlA#mO9%^eygqPDest zu09#Ur7`(2=dR`SJTd6hrIW{Zz8nM6@xQ_+b4l5mW<0)}jj3!Ee7vPy^!q?`6E&$` z4M9O|4Wo^6ez*G#1cLzGC(s>;I8x{xN%euNz<$PD!B>%)@KWy!)o&9-|NLoauUOGU za~bS-(70N072{#j6kvVyc~QhWM7R8Y$6gGa-P3XS@%Y*^uj7@x&4%T#;TsEzdhOq! zvQbFaW8N+NH0|x)-pSqw>ZX$9riYf-_mrgQLe{IWE5JxJ0o-}sbKDGKY+n_bcAM~W z_17b@-N@rhYc;IzCIJo|VVvTIn{KdK#G{)1PoOEg!%lEwsP&75f%EF^Taht+9fMNw zGgjNub=jfgek)Vz7qhu>->eAcwo4xPrP3R2cJi5Gtoxt!@NbqJRNYCkPj*V&pcAg; z`>mm|J1ANUMcgKac7zL4!-&EPSH* zbvae`r1&TR=?kOv$-C`iZ`;w@j>7i$i@7%Dj4X3QuLK1H+Sx|nD_koI$JS1(VVhSJ zJ+s>PtRmu5e+W(-ZIc0Dh+m|Gjy2x{*8j-%Z*xSIrg(rFE-?_*67-toQPdfGg$d zO50JNc?xH+vgd#(g#m0IO*U9h8D~oaVK>I&5&9J zrqZhf4FsD52d9WZ1Is^GO5VX}=>#~Ia=>GP5ge~DuJw(yxGs~c#;|$)DDAGfD%_NU z6Q#D@b;5c&N#?~-oi!P{%X*%xX|Vg7xav2}e|6zon_kXN^UrshD4Vp2k~Vs$nMPjA z%JBN8BNDHC9FEc~-JiqRnSw9ok@xpK9A<==8H7@hx(x z)HcEe(_R_)4FJNT>KR};P_RzTCuyqzi=S82^?{XR&Qm=efKq+L2i#pd`hfEA{wSdN zJqT{&a_ctrXev!*`N-#_rmPW6)*h)HAyk1aDZAVAL^Qo3T5+#s>*8gM)8I8{bM$$t zPv)(fgu<^0_@^Vg?)f?|Ce9wI%9&Ix2hv!TFirDA-vqIn+V2l;4F|omxqQxdd}=Dy zqRM|m2StcqRfRRUQ9t=5J_$H6&aj}4VUgtlcOo@-BQ@If!Z9*ik*tb->X@_mzm78^A;PHOBD6!!63Wu*DR*r3JuZzKp%E79@Ltvb4RIo+*SPNq=w;rn~r?T52&u9b$AmgSh$ z^jb9ivcPKW@Fkec&gwk+{KLY+rQvO%kpA+03ow^U&9zPv^Sx4p{zKC zBA^QbN?TciC3W7m!x%YV2O+DBgE{BX;3$Q?d4&2?z%> z@#AjE&M0JK(SZ9S8=@GHa4fl1nQ}nFkx9OX;p6~zAMyW277prj0}d*%HY;jaHID+M z@nOm8wmb&pIYxPJIUflFC*8rDm#oV^Pm6n6@G-EuY!mn%etIjhvjQqEEgxQ#CV$KY ztK7x!xhX6n8lC=*B_UN`-=EJx`GxvG4@NZ)E8%nzGIT2Xa#H-EN|UsxcANdLF}XXB z$rU~xkH?~p%aOoLj4D%XL#v6Q%0vaUm=>YywG@{R<6fj+B{E$u%`wlr zSvjGCd=!tfFcH}M14~|9izx^-)wx(C38WbHrxHa0g9medeeH(;uUUk@<&Wr zTfPQX=hBm`D{}LSG@6XBJ-uF-vYN3s%7xK$*P}DgCQ_aX+%pp=wKB(F%$<44D!9Mw z8xDvQg+63h0P7W1QYBeGr|l=Xkl%(N%{h5D4KGLDQ9GHPVA!W<+p_V8^4zgNM9ziJ{4b=0TUVEa^PVjx?6?)?cS)7iyYSdk{#ybR9ww3m23W}(2!caCXkIHXkyqxVkJ;wXhbV;3v zKT#;~xwjf`}oRSbX%T;}@^p&V1*NeOeeTQ;tkEKB~#effCs1i1rDf&0*&K zP?znFP7y$<=dNQNFdIQ!?RljMU*R@*tso^tuF?`6b%2dx9b)Cz~arcBHZe1 zkgu+a&mZ`=X*Aiv?&f5b7`shdz2H~@soekrxW^v9I|Yb)KXs^>jd@T~N%(G*#J_#* zGv>5}j@k)IIi`$vyx25DlS8F@?x}`4@ytt4Hk4k5 z{%Pnybifw#et+dkRkC`pPAn$$kH1u3nk5UH*m_#G@x2RN5}}~h;uWGHYQART@MRdX z$c%BZ-DIb)YNOTn&g@oqYlGqgfRp9azb9oc*18saB>EWJP{tav$s}ymVOUzEFU9;1 zfgCfvWzw=&oRtwpKX$=KXkIiGj(n zl4ckH*e0OMn*msp)&hh{lfzP*QaLJ9{KnCS?~|WB1KaZf z*7?x~h?}k%N_Ba@gA3`6gPzRsi@Ss|$iZIk!dEI@>gr2@hoF8xo~)z3n5~ttz z$n#(UnEJ>X{m(qlM{b8^ZT#fiyB?_132jq8W3^ZDcT3D56KNHElln6o6~GkE>eSIU z?gzV(x%%d~)Ta_wVj?$zNOy{>yxG0_;`GQIyVbwF?zZ8{dDgw(QO)IzR$#tU2Dbop684^>0;UGxHk)7{zBBxpoH{rk2PmT5(x!^+3~Eg<_dS zh}D*c-08QH3l9Po`kl9Xv}I&e@0b@d!U+Zg2v*d-+V{A;Cnt*l>6VGE`PFuWyyIlx zg=QxxIAE6|GbbzYj5`DKOh%}Z_!7z-W3~qqYLlB3$JUqjrMz$PED%BH+$y4Q9Q|fR zCooevMEEP<&u;B9NpIup4a{}~>Od&;AqU83jaL41dtU zGYx$@Vxqy;CpnP%+Iz3TV)Z&>mM5%Tc<)hi4qYnGesv~xb!y9GH8uKL_sb1aY_yvc zuc>9&Nw0`g7T;3_|M#n;ew}%C?PYJVwM5bl6SltI4bx!CkDZTmqeK731Ml%#*zGmw zj0jLR04+WTpVi=Hl3lNauQr^!Ntfb5G6gD6w{Jk@ndfuykL`w65w9-${Y#HYL^CS4 zmeA}%ZfYBdVzebM?Ao=Y|CKE<)7MS4j@9slOx zk$ag;S<=Lh^0f3Vt6?C}ZA?kZ3}-tBuKoL^)mUYJrO-&@2Xo|rM*O_5>)!XMghbB} zT@d@|bb8BJExOSh=4r$XA|`Y4SUh9)8VKFewwB_-hYrY08Wkc(6{Sf-lg?`!t?3z_ zExXCUMs;#gFy1Gx7ple@3z;M0<;RagGh~a?7^8g~Tv9@xkA;duo7=3iG@mVPqAMSp z;0)UT?(M;QC@XF~2-hn^WaZ|Y^6iR9T^7_FSTq817oM(oU$x5#ex`D}A|Lq~v9!9a z;DS1U_J&oUv7QN?>4g>4Ty#%eeB4=z84otfZ=x5e})1dQnb5{7U#cu zy~Zg)h%09GBUqOlOKb>#m-odWqi$Kmop2B|;^LaCa>8tzWBNDGzc*IgB)vvF*%-f) z8qv15i3r1-#}ltXbxyt;b7ZR)sW<^=eYxEoO4PmG+c~>$qjLX{xbQJ}LxOiJZ$ve| z-dDhDqYLvj=)4wEvi#15=&z_(B)vV>;9McFGi7|KAhAPG^n`JThW`*z01i~k^Zuk+ zznS4YP4EU$BT%0rJ1(`KJY8+f#}NpfozfDy$17(r7gT0llkKbCRQ+L7o6*013iPJjlCfg`<`T2m3~ZKEOj0>xT=ML8ng)~m8&jrG9_^00 zLb9&*SVVsrqbT*3Yuo_)7;z7sW!?vt;maDDf03>19wmJCy$uD)yPw}ObTKyc{1>%` ztzv3*$z^C$^YO$PN{di2KG*7sT3nhu%=H=A^tZB7lw_`bw;{nljUd zMj5%dv=B2+2cgJcs|!&O4(ErT?gA3kFBgS<8R*9=7virM$P{D9)i2vZCv}?ch=&Y} zsTMzFhlh|)zO)XWq~@Wh!;nXcV~OJDgRh<);eYYk>&@UF1&<(V{%&XDY%cWnoDtQG zFf#nz%=^{{h226(^<%fU?#DOh-k3jI5l(!t^1bZ0$kR!pFRoRNCISn=6BqeD2c9MCUhcB-d7iEAaA&+(9l3RkHpfAaa)ZtU zU#MnW_y_dGcJQz&@Qz>uVI1&4mXAE%8RiDnUzmQpBJZ_n&XN2r=cyT_=Hx;OyY9GZ zT+F=(we|r!a5g+}y;i0bY;X3@Z&&BP%OohP=X|0cG>&3=sK^d=vjT~Deef%BA#yiW z*WjZV?Y9vf?6OSYJHed~{4yoCymVzgl4nw5IVgh-;?COq{kd}QD{A&K!+3tqBVpj5 z*Z}uI8V}mESXdPLmpJ5RpEUeC3LnetlDS~HWU=5X}geo zlm@XGCjKpy;H0=-VUsSIcP?&VN2sK21R|6o|J6BRX+RRiyNM%d*p@!5vQH{9;Uefn zBuiy~j6K!6;QI^&#`-6dB)PC#j!?e@GNOJkW;d8j(+D0+Lal!$pWQM`nqRu{A#@%c zEeoAtA_L%?-w}){E~jGQ=_Ij(=}APYo&AN)f*4y=PJ9B3(fdAl5wri zVcXCDA>-Jd7LNiw_F~f8KddGf9@;O_EtA7Co=Dh3X16;%!&g`2l+9-b&pj2SzbNSG zfX`nwlF!rTLS2wN{W!KJN{{p=a#Pi6;*-SQK+U+_gfn<&{q8ZHIQ zf;G+i4DcNdwFPt}fw2)p`X+IEp#&55lDa;V;}6ngRL|Jg;Ypjb(_3low-BBz^ZM~1 zl$5+aMh`=mY?R$BS=Lx@#MZL>Bl2qq=4bW; zIK^Fii&QRZ|2aKXbFsdf_hrjB>?GA}HrFpLr3N8)UGjs>ta5!)S%@BK_VUYkXp1iq%>k{dt8C_H#l~ z4tz0j^Y~I>Tq`dE0pDFAR|b-Q-hg-?y|7miO3K>E>e=``O>TP~1;dPX&U?6BrwFSb zsB$Ea<~%bKtLa!X&tn&oQf@K#9E!u_whyd?nw;$iB6<%p*b>dRAT3`RHTgc|Xz-L{ z=cla%f5<##M)-AVAx{ClKrHke&T;fJ@`msD*)B=zBR^%LNeCsnW#0$9UIwoJp{#=Y zhJ(+0ZVWuIrN`%WMZ?#A8z?)MJ94f*$D_(pdrw$P&t=1#L25$RblZMDaU9IIo#{O* z-4l6wYi_09bcpfs-0iTua$RJX^*HKc~I zgNTTCM4d=>t&X^$n}*QBNE3RwNr{=Nx9}6VrpUWM@U-J9b3H_v)0jT@ws-(%i~Z?22X)hMO&-*UCu~aygMEbpU{MkG8+wKa7UMWn%``Vu23L(sX*%d|cqo%OOmx0ms?};}Owf2g- ziPCU=%Ah_qC)j11s^%X1cJIw}jKvjvgTTpUF`*vGMdtxbvY*FFdwUa1+h_f{80eC^ z&DuambihGF3F1dicwQswOMm%Esgjeenw}QwSxz;9*q#^2$#Iv^^WGR)@;0j#AGY&d zP9>w;>LUI~_j0XtDS1sgs6X`qq_nff>W|RW*M&}~-e5>!a>J0%XP(QUylYP@Z<$_F zyL^cdif$E09c6ttU`##q11;Yh%gr%T9msX0AaDNWp`+;6&sjqpT9I zA75)EcH_Eh^t$6xxetBfqOvo>R@lTOLdq?o%H2#>3tLa9x^4ToU1)KFW)tox|9WOf zg=TsCRZA8=Mm*W1nxS0{Nf{N~SC2E$hq?J+pH41*<7r-*_boJf;ISQ&dC(cym5E@i z5bR6Sq_||?KkCgb9IDl>B=tQ1J*A*fF8gbFM_g&gF^;WSCnRUGp5BvR*06KI?QxR? zRE#?2hOaITG!T4s{kvkKH*^aZ^R^*leO-NwqTP!Wya)Y_qO!y;F>mkBUZC^=*)#F|ZF|By>JG<~E1f6*gkX%6i> z756hl0vx_JQ%7z&zEl_927@u42K%@aFToDEPCR|2(&6;W~fyOn`c5os3#BQ+>(|sQ)a&12F-hZK~ltZ zJ$62vN>Q5t^<>7r&2;tZ{&~^b*<(x*wh)vaVy7H>@xwDt6La5flAbi#iw)=PCZ5CtkVnp&(9w3(~*c^9Lq*w3OY4IV?{mIjLhw{m?`^bV;l`d-k zSH7nsPWqh}6tC_k8|7uAED|DZpeX!{Y}i);adr8VVf@dMXnCn_{pznjp9(8l$w zGe37pvOc*oJ4H1MK^w@tJt$g>i@EcedY0o(j<#fv&**@jd00AQ;~B*u!^zV%Yd^n0 ziT8jPe6t6&6P?*3tZ4jKrr0aQ2GMy&)Y*h>Ic!mhE#CiC0c1YEC*({jMmG7oEc}t~ z?V_;Of&Z>eorkei!}nCtP3llpp?5+&b1?|;d5#Z)NTp(eypOi5tXaMxX)$E2cqV1g zBb({V(2HCOU00=gL4G2J2M$Cs9+U*8M)75(Nrq|c^H_pdWtksaw9D#EKiq#3Jhmt^~)W1XbZ7s zt!r3;-64@qgzTgDQ8_#3ZE)-GGj$?NLy=8A*r9hF%vrjOW_}q$i1lcs;F45PcNa%m z`BE|)_CR?I(Vv%l_^)%>pw2@A&7mPJsHv9PilG#61s6vzTf0)x`I1^|2n%d!n^<}+ zXZ|?kdP9A`isfl>&!qj)!6FjqI9xmU8<j9NQi5GWVJ^3sgtnk|sXBnaNEJv=~@M8cCkUG9p? zarHeuUxZ91Pq%&}Z!As)CCu(wqxg1H9mhmX8#Yz^d+;G|YmfbM9lGkUW ze=Bc^MxjZbaQu13T+%z4Q0U1$i8f^Rbwp#shXidMoah=>Q(SdB0Uhe@cD938Z7nX9 zp37Z4=WH{gkx@|o{Yo?A2$zB;rCWQ@a%PM`s`$Or%ggut3r#@s4QVlm?!Gwt`Sy_U zEje5G>{bazYc%{q2b%9V(3QF6|5(nYG+eeLOSPrm(9G*E^R}k%-c zxl&-Q;;`xUOyY$9<89Mni>+}|7ig518Jm#YKu(C7KdLYv`d5-pxafyVIvtP*VZFCs z$O)rQK!nqR&K4F#${QC%w|9EBl+4#Nl0c$Q8R8{mwUp9<6m>n+uq9EptT|8}m~^eKgB>P~Y6z&a0reaGOSM->sj4y7m5yiiox1n@tG3u=DRa zacN~Uap7rRskHIrRMIHbG{ol`Z_*_g-#BL7I}<1NaA_hu4^>isd0?aaKs9y0p%iL4 zs#l(DlSN|XB$zv*ck$cpJLXF*>_XO}rj{PIt3*7kjweMGr!65S+PXn)Uf0*WFeI;; zVtgI10PRa&3G*r>{TK@5tIJ^+nuTCPm<6u3D>KIs*y0%ehS5~#gZ)>c;c@OsMWnwq z`#y_vXGON1Or6ArA!~j^3Uol}bov5q!=}uQU~li5Ie}~Ux~15?28b{WIv@;B&DX4h6*eK*GZ7|@X2&nhXa^k3Dvn#9UN+yl z=sqsY9I*|X0tabtHBiDr+_94(_EmG3gZ`!Z8)mafYx^q*&+ZZIBHr3N4g5lcQvxc{LAuu{|4SNT@!w8xQ1E1 zZt&cAuS{mK!4K4;0bvl?WVgqS7KLIe^w&yL#p!oYb7M*+(;2RVS)x=)b7M=uAx$ss z0Ppo5rU-6Nd9@C~+(N^@aog_jO`cU<8n#JG?iLB(XldMs`#39JuZGY+YLmj8sAVQJ z6A9!&eumA_yd28}1EO+;VUnEC>qxvKrjUJomw1Azyf*bbSxC8!PJlltSUgw0$GC8ENnsD#9i~c+&aW9ZB+kQKWw%}8k$dHAyRCznEQ3) z_8sn_XD0inZ}IScTGotr0<{!+G%HGIFTSP1eZ2^d2vJj9XY>)M=7;rcDMjqsmRMM) z7!nR{4C(|9DSI4wt;>js*G8wyHy1YN%$7_|je6X6_tNbO=J3*8{GpL#%vtZ|(K&$` z`MuyM?auPI$pMA5^RKXKd$!M({cVV(~H=-p&|dlW_Vt`ky=+qwy!3k;tX4QCoGnQ4S=HZ1%vMQ5MebDTq{c!G0Hvg4*e3tic zPA1&@vRW5D?%;3s=`X0$#`ieI!LW@ckHyJTSnZJCe3B@V?poTk#k#|BcB?IYE~6ev zTOo0)(i`p#-AZm(9oP9s=aTI})Fb&YjJ`>&jcD(oi*4MmTA5N4fm)hNss(O(|82#s z6@w_4B|+K(DNY`3lpflt2;>*)g@_z4tb(kO!3DGUfr~A>FIV4XbbrX$P@VVcOhC{E zox-}K_&`UsQgRqsW>$*L@me~)hCMLn2;GZnTHL9sY4OHCQyuj8FlAiAnVpbu-ppv& zCFpcyH0fovPo~}SxZ-J3Gi?zr(^t|}aAQtm!H=Hv&VV<(4;t>dlF*qp*?TNU8f2|$ ziZjMAtZ!V7XxEwj8)tbPv+aNtlqxY{Q9M8jLP=~cG5wHDv5Z{5ZIAc|11RpIf=(bB z^u)qWfnq2zi=p^UDS9ngjSH^d;0=YWUqRt6n7eh)S{a~a=q_IV#uOwXhDx2t#jVwZ z_A}iz11Y<&(PdR>^s*imcjv4TezK-Hzj$jKBf}$<9o-v8<+Eb#T^sE*;sU>1=#92XIBwwzJvzM%v6qRBLjH)2GO~KLqR^f0pDjdn zxETMG)7X-8mgnnKbAHfmob&fQEShzIa3M&%hlc$gL6mxXf};37W}8Ony0;cM=$8@) zrmd!to7pS|`$-{VinSClu!RJ}iO4x<2y1I#+=R3Al%Zw<>qE8pX~HynI%4q4itPvU z>HhMz-#0XK>NlwV`;zcUcUUp;Q2jboy=4Qde=OnQIX2A)nKfa^ZEvHPsWRqa^nq~3 zSj|?Rt>{^ar&oadbu9zDHbOlU#x6m;fktE2vkD3zHX0lmDZ;e zbk>XpLrB_FM3cR1rvqLt_D8C=td6~uZ!{Is$kn1|v{e=DH%u7wmqAac8Icbkfv|ZC znsY5jD{In=*i2bSql;B?-P%gz4V0(yNLUTPh2fY&tbCrDDFwlU=%&C2)?71*!R~hK zU2QCGXEM#A)cO05Q5Bs7<5qwV!sf55d#$xRShDY~I0<-o#I28hx~>I)W%mwN`#;Ed zx`v<>C0D+a`A>}%H5O^A zd>9ZD0fuit>oJbx;~#s&tVOWTcovqGFXC@YNvzY9;Zt3&+NZcP6B;qf6H=%4@BSRP zvfCH&Fr(+p-m5#4&lIjZHFQsA8AxnuHfqX(l+_by)pOMM@CAZN`-W#3u%sc)+<(a* z%P$mG%&doopEK?G>!a&%9A80i7p{O6jD1wysrY_fBaBZu*7o+HUbVdz7d&s^Ek$hQ z<~En=#O22c`u>XKY*<55*p>-uJ&HGApB8UlZO|DTBCgc~!O}OFHC@IDW(W?oJLLVd zV2nWxYMDyTRcD0PQKZKw`uXPzoaBU zf+4G^`Ye_d7})4-jhYI})0;mv5@35gF*A;4TRNdx)}Elf>>Bj)AbC`{u$cYlN9d)% z=bcWk-Ks{+++NvEVRdF5nKm**=!JE47P zPSD+D1GKa|1~6l%WO-SAsXkBmEm`0fmVmm6pQ>k%T*Arof%RNwMpqqpx)gD(x`bS! zwD0kvvN`z%XwyDy3!Gd*YwkJjF~wJlTJi~vR(Ky@Z&ZHYXh2eW2PDEPO9%YH!x^Z< zHr7Am5|--ia-PHub7co>H1Cduwd#J3tAy)O^oP`RV@By56--=A08jn~9c<9~L3S4y zLk8iCL3?#M;h4QJ;e?LGXy>o*joVdWjmdb_l!z5x}3&MYtw^aGqcTS-iz zSt-MH!H@tjPMc>z-iKzEvPF~_lHVQ7SdU%*8RmxbUN_)H6`qrZo|bK^sDX2-#rGBl zgmxc1=R+<^g4WZ7p6uyFY4*?@QNva(m9YtgNj28F#)h;*AdUlPOgmgcdQEm{VH9Oe zxi-o!Eug8$hm8i0b@#z$uh6$*@N?bQ$4YeSO3IEYfNWO9^vgunhb?my=&6Ul3Tp#2* z0|t+-g{0O5$~oOW%)-Fe_0c=ga&71Xd`RN3gR{v$o+F(Ra@LF&5jSdpc2#7AX~=e4 zFi&sdGx+TqA+R&U7R@zUlFw)m@5C1oFMAwGvED<+*NWN826fO^2;bFWgd*kQXC#7B zy6kjw$nRMC2NvbCe7WUDK27`1cpU|j0Q1xv#yrtjhh&F$CjdYXqNk3x;^tXOb*;a8 zXMh67g9PWFz_*;GW$>A_v6q__uI?n!!~l`}j(gf1YLT9sE}$ZAD2(Nb$<1Qc`Hxb| zT`jqoa&rv1LDq^4C~z62BFn9j6AAZ*tNq|T6*2ym z8!iylzVVG*u={4T2Ci0G+a-o;+p(VYsm*At2TWP?%ajL~)ChVJo<}jBffOUvh5f7N zF4tULh>fb{X}OEb2ftSoa1B5ClSEwzSTd%H1@SWkbIvZ>>j=B7s>&71?{5IOEV*EE4pX5b4cq%{)EijIL-W$y=VvK<94S8u zZDaqUf%WCKQTF6waL$8?d5qfZh2YyhH2YZ8c3+>G)iLW$uprsx3TDm;1oLql5?l(1 z8B@Sj*i37#GzefV&E#zhAB0y*3?+y*+j}ln6X(|kuC)jvk1x5p-XNLpk8c7+@Hl-K z@pErV>V!u#9Jk~t6k37i{c-?XWZGHtgs;^am@n>bEur=gr`qLKheL9H(@@<`HuF60 zGlSNbKnvDS!~?B?ra*@m0-GbBc)mu|9dS!agq-;ZYU2rY{L!4eBAQg~1z(u#ft5D*(;ePZk+m;`+^yS7&xIL1i} z>#)7>1V5vhIXs-;k-c!7rF>uhE0^!+wI^ z$LEp8dltn(TDbqbmM~JrAFIjh-Tl0>>ceKm;4M==j!NMNCeJzdV^26~I)yberGW*Q z4F~C@+=cB<_v^<8hnk+~qcQ`h?c;Jj_(o?HRB-!^8^>68EU(8RvH*DKHBC;UJxP17 zHW-P~Q}Wgm4Hv&$?ugdo?o@iZTmgT=oLwASM<%bpD!TI@3p@wt*Yb{RKs(@Q z2V)H_9S<#yvqU<;4+VN$A5)kAAnp8z?W#4Y>L15hlwJuoR3h+aWcZZNG~c}?q0dOU z?bw(Op^QGnT$48J@Dmt5j?8f1-{8;~UAowe^rO9xp}+4KpDp0xwA$c%HAk?|Q@<@! zXIvPE)C(o9vl2)nELcLM>HUT`K*W&ysAl&)xA1}oBBgq8(Ravw7A@sZD?~4~}3XX#f+~hG8@#xBwrR22x~O}cyOC(39KXrsGA@piEgo=E38O+&6K~5_#xG8b zpPnDBKDjhf{l&vYC<+R;NLZLT)v8&?aMEn$Yj9X^lC{llr+)vyjrJpQ<@irpbQN{z zKzHhrbg!tAhOtPB6n0Kgu$1E$U|rzgc9-hsP!e`p^u-$La`5Ud(-iru z1K7m=Q1epXo42}PwG)Zb?UeYwHJf-0;KCF{L4ARqldafD1uXgZD@Dz=v@r@D&L?T=R3w;H zIWxfO%)zwpKU3XqJ6coSYTJ_5)TGa_z8Qw|n)96;ZrGTgHw`zxcXM3ojM9Mf;H}NM z{W@>#1{5~Yd*HB_!_aP!0xIZpT}XV89UMhb?s`(CCOw=8$|yU6Vl}n@6cmjQyA#))xLT&pGJU; zFKhC4Yni~l#X4mU%_!%ALG!=hib_+XV0q0~W6sSJ_e$zD93w|pFr)b2uzRLX_&06wCm~JalKYzUpZ7c*NP^m10ZgZ71MzQ2U52R`vvzrbpxT{Us|10DoF7i_$`i&Z}+s^OfIhn3Th zrLQ0dQ&f&FS~m?`k&aQvS3Hw%zUxDSD5~RIczD9k8Mkkg$Vr^a2Yk0MI>Wo!el<(Z z-NT({!ouOyrBW`AQ{81F8`bxGQVHBj2`%xzam{duN>WAq)l~P1pXgIM;Oy8GDd;*O z!5;Fy;fsNNq?4YP0G_aL9D<_9gP0799W^PcwYiK)!Ew>#cl7NCzeHUh%_3ihQVpjb z*B32;ICpYLo+sLFw4xHT0dSm5QB2I9ZN9OMqQ)( z+_4EHe}P#Btd5~~q-BuV!zmc?%&{q-ebnLY1f)t2(4Mpc{`WiL5OVYO6}VV#c7=T3 z0Y$Nz{`eQ{XIF&R+`I+WY_>JK-CBIjcrevf0Xwxe(>!Pv`YrZL(Ve}Y$*E4L`l5yd z6Wj-$r}r?A2FigV*fdgEmKSTes%>&Le2ZaT);s8)SYu48r6tLvd4{%p|j$(ZL}NGpYR0FSrTH+QHkSSz8#(az`FDUg z<)5HifmSjjvLEZ;=6)8LTLZ1|}ovlOk}H>`*P@k6QY3Ty$s1fFre>hvR)poR=mzQJf<8k;wljO;(#oijOn4Ix$kO~N3 zFZr)zNGvS`Ep;y}#DZZ#)O>w8XwVTt%ZC;UW*|e+$I4w;4i2rikM8R{wfH#xG>^CQ zD^=muwv*PYqsxzBViFVT-=pcleoM$+h2$wcGI%|(Qq?h61~4oO^j)l*IZX{6U2*;% zSX$)@!5~$ld&2;fqvBux-hubOu-RDO$Z{F{diK}T=8u0WT~c$hFSokup@^jKsX4)SLpVMjb}iSM&_IG(!+p%D zmy115;2sS}W^vztx$a}mcMTwwagEJJ0B%LFgnv^1=y4q;$Y7M!G7k!cz4e=$;*j$A zIH~+28ejNPC;Lmo3-k|Dd>pS6-wWtBq5hp^n72u+E7QLdGv%jr7&9m})t#}R6*4Q) zN*gq9=p!|9ajG_;)pwq0R^>Wj2K}L4hl2))V8;xwNGbnx==$*18h&`|wlZStMjJD= zeaX4?{UN%DxxKakC>Uj&YjPW)!|dr^IS8%!$XWt@j6$%F`=J0_KSyo0Q%I3}5BLZx z*z*ZYg121kKlW{D{7vKxw#d~!SFJQ``J<~I?swe$TBn%MCd+)$K%cUh8pGhu!(ssyUGOpDUTn%b8LkPD6p>fB*5vs%;lekRX<(eyC` zUz(I4wR=+3q}n5MqvYP*?$8w^H(Pdz1i`%)xHxLVB{FCq<;{KJc_}cP+cigzZ&m;( zp!}r$B|;@_F|h$wy%5GA1>|Z5Y_ln^n~(29k=5UH=sps%gUwBSE6(QCkf1FTW1Epi z(&^x@GMbl}mK*V_9;QUM1D5IiUYk#K59#E-+Xdla4S zpCP_$$AwdS_7baNztvIY0G||fKcfxQvjn{#*cyCuI>pe8A>ER~kK9Z?E!6*6A4j~W zky|681V<&W0sL8GRa7kj6ACmdBwk6uj36;U^AeC^-Knbb+i#tSKX3j~oZ~#U*;8YMWk%WSK9EsKCurp1d zgrh%j8u5(L`650c*(#L?2kHOPx$EU+EOFmSv7b({v{(2Od}NV;T%t6=4r zi34YSY3l<-CJ}Y+nkdyu0`rc^7%( zd{gGU@3>KT{V03EFZz3d$h9or<{MEMl&&FC;g#O@%5Q=Pf4lv#6QReuD;3*m_$uPU zU>Pt|!_a^C@tNI_J&1R5W)yGZgo8(Mkmxo6LXyXieKJ|J7~K2WW`2|`zaG{z8Z%;qUxdfjh zzF4^BKiKBtZd6!P^!#No=O#bLxa+g5XOR{sRL)_G`hshPF}rQr-uf$l$itTf>{A^t z`k_kz;p}gqm}~>NSm9DFRqFCb{H0$?D=GR>+@mBzEUt+aQ?b69< z1dxaz0ETt5px9u;7RElwozQ8&Q=(0B3I9R~pXANc^Cvj|_0SO2jI(=ZPE|XUczd|o zm(gbq&FU5o+mdu0n9r>9`S}WC%UR;NaoOD3m%ia59x=%k*d(g0rTgWm>3BYj_~XNCYaQ{$+` zFM0juu#PP2X(DMp_P?&`|8pCcJX?(iD&;^Vo-TEpEWP#id57w`-&cySF6>>C0=pvC z-r<=o>6B(K`n3hz>|bxx^#@Gtom!O6^M3kOgVY56*H>2a;`H^N@%U`%S;wlsL8=E= zQ_Y+(`ON&=ks^L64~CfH<{@^vhFJ6ys;eEa7%)k7@n{wgX47hDs{pHRZ8WaF&x^KHJnJ18ZmM^BK){$e5*HLaX4M*%{mX2Vc_BO*-IBC_vNDfC1pr2MfK z&n0IequKMH3eHOE?SZW;G(c%>93Q@zbw3H5id8wP{TGdnP~9ORf&t4^NgbybAVe z+Y*H2SXPYv@9dG?ukDhrc0>81>d+T@F{Wm^0Qn-JFtraf10*!zCX{(YM0pVSG8Xw@ zp&_wQotGk%?21UJlZ+gk1EJ7v1 z`3Y(yIfM&6?&*^wtwr8${V{w}0|IHo1Ab4=$ zi>(nJ0YN|b+8bD15&W?D>eKw$JI2O~VP=Nv9?r?}DF{I0OhWDu*BhE6CYU`)aEZX{wB&-8d}VHqyA2x7erbGQ;`_v zIO#+O)Lp51=!jB010aVRYq53;2Y3yZRx|ahS^-?bG)xH-n~@ebKd8x#xuwFg6?M;Zj=iWz)2<}H$U?Pcxsa43**6%rbH0|X>A zk2D4WC*VCen*wC8fo3INwNln{l5Eg~)(u%R-gSu8eqT=E)bgc*+*9Ts!#IC-T(9Ic z{+o05!8?_6s_ianrT{H{c-g0p7hmyvM=gjvw+{e5=dVgD4)oY&D6w00BgB zpu~RORh+!gT8GF&@91k-g;C`HFqN^EkuNynfna1%p!d~vT0TjQU<1gh z8?I9e0YbQmy-j9qm*jLUE;Hg_DNdqBKMD@L3U2R>;?MHi)`Nd2_$GyZE(wC4bMmy? zl6JSNW?a^X`3@uhN_&7V8A{W)4NTFx^J=>jtAj~`gqetpx!_A-UQ0oVNC|aR;n7=K z$an0U-Q_L{ttB4xUskCqaXr71AC>(TXEq2XJuK>{cU=H@!}5BxeZ7l;}_ z8kT(q_{nLRk46vw1Cw3fn3qGNRsI>=fAF{Zu69QAUCn7xt#p_8y2!xl=0W)$N?ltJ zu3d<}qm?4`KUoJ`d9vjUN&B~EujTL7v--p(CI7r~{D8cZp``5lAcpXs-AxRxz7R3z z(MsZL;^JVJHjEBw^w76T)c{2CI{VL%6ozxxg89-eFiWMo_M-jJ61tdts7p76ZwU`P z3$INn{U6VuXni6hSBMtR_ezm`DW&p7542y2W9%$*+X^yM!0%1O389bE3huPAD$smh zz??t|*7WGV){U9ckYuAi>{k#0Dt`2~qO4Id98jJM)?_s%Hu<^UMH$}y>i;YIx@J^f z$z45HpHSFLz;OdHlv@nw!w825%PlD%UwsO#FMtl|<y3~}FLel`!AuqTsE zxH`nzq25Un^22A*MY5_qE;7$^Iv=a||04Z(kth4a2BMPhzYwfgqY3%tZf}VQ zLg6oV-%e{>$#`N^R5AnXTfd|5OI-uRQL*|)+objL{-)o)otu#2I6YwYt-QmTb2|6E zu(}A}G%+!dFNE~jHS(#Z{)Y34M}JQ6m)gWN>aJ3ClY{u!%Rh4GgS@tiRAOt-J!=DG zT+{xX_1iD`PRK%0$KxdE$;ASvANJTP%VedjrvJm;TSrCNzw4uffRai#Dk9P%or59* z(%m48(mf(Iln6+Uh|-O8OG`=(-7-iG9S%Lj(B~Q7cklDv=lu3M{~y5(VmE|&!+{xpfduwpCAC<3aPu|5kbe7MY}CA z#MrUYSs)Opc62k8DewD|tjrzibG+76A`vRUv7q%{Q;gm>RfGUi%&9ENSp2`MFimD` zlJf#WC{?gvi#-oH97P|-b%Wk%b*}xiTeeAwv{-o*Be2DCaX9a`!FeTEjwm07NuZcJ z{qDW_N$3Z@jkptV2J6;16?y>Il9m##eXF>JU%S`0_Ff>>#Obzfb_K9B^^-J8#}P*7 z)NOuFtOBE^d8Vz$?oZ}K#0&NxBNk$YOn?)C`AKo5=$nBzVt(f&K`)65T#X;lUl1Yyfk-<6eugKZBk_l{9} zlY{QE_J}I_NdI!P&3_!~2v26@1m{nQs{Paq{PB_L_inB2~F4n@G_jqX_%l!p`gy(E z=~Dy{2O-&ScOa>K;PeZ%L5Ez~P^eYrdJdT-Eo4x_uW>C^oF2Rpvn1c``!ePnYY-CF z5IUorYvP?@R)^aXwpe5alx@Gjc=h)p$r6^9D(6T9v*^0I1Mqa)ingAW-a;GAE1m3| zjhvIm{879;efi~yIrPan;wd+nLD@_Dn&jTqFo{tYHT|<#0d!M{_P=q&M*}&!;_bEM z8qec}V2UeDRr*m$>p*qGe)q0rycqWKcYhKXuMw^!{R%-3ie0}7w$MDA|EYFCjf5;_ zKE$Q#%W$_fT~%-#o25>%Ka}^MjCcF8e9FLSK;JN}5_cyom=*93>SYcdfzo2OSVE-mzh#I^fUQS{Nv`BiutqrPalI`R zWi*x->NIdKPUFwf+aqLj4mA*LLEHHqH_aaqsHJprb+(=3YG8y-9<$ggMbe2f@=n!p zWtw|-XgNK4!!mvu3wf(`)04QI6|bcjr&i4W&*N0gYGa zNO{}>!;i^jMnyqb4%t0)4vT+i5g7n|0Onsn2V^!r{hLgGL6b)_;KrV2zeyTfKH&ZC ziPGgo?>=IsFq_H@hbRS~$GQFmfWj#91wLIdm^=ak#ig$b@d{~bZCcW@3h~2FrO!41 zv=z+5x*mvp)=v*;Ae?LLH2*@23kAA?G9LnNB@R0D9XShdj+>#})?&Lxr;)gr-I;(J zBjtFn&s8Q?s;&>k-2g)cDPUu0VfP6gd)>z-v@PO{MPy70D!~?DMs%*(u%c&_(?_*J zy?B7!fqT&^;){U9#q+#PP1l_0`l=1e>1KhHQeN?0b1;xuK*}mtY#0UCA)J2p z0CBO7$WgKB!9ELn0&?8g7I~T(WKV+3L5niLyjMyxC;Nan*ufl|C5Z@llX>X^ zQ2hsJ$Eff=z|P!i_~ZrvAfSCu)_^{k2EP(hH~K0`g~>`n!%d9VB#T^>0;z=AY!wy< zZNvNrvNA}Qy#}(vlIyJgvc=Khf7#;E;=p6d>x97Hr1|_{BlA2vQiN}6!|VNHu0Xbi zlX>4$J)Gm@k8ZoMAce@w3YUhRWQZCQXc^e+@OZnv-*t5lk^xwMib!%}UlonH4HGLMBin+yhD-rT7lYWX(n5uKvDc$;&l2cObT$9o_S3rWi!)90%_cUc#F zTYWEMO0wW21nLI#7G3)pF5q8!r&a#~6_Mz0<*{awu*b_EE&h=0UB%LXjio*V;h(&mcC3xHUo1ou$->!*AYPPziRd!b2{BT&p3^8Q+m&njhmK9k7{@&wkA6fe(Sj_o zX6BPOi)&11_WdwvU#sYRZ^T zPJN=2&#R4yWDHEhh8Sc&G*4Hr@gRjT0C1L2IQ+C2RrmA26rI`9`*5%u<$jxn;!^HFOuXo{I{~TEw;4HcOIP{HchZ= z0)Mz6wkY4wEWJ5uRkkjkpXM;^)h*;-zqv)=kG}8JbHbFYCVmO8m8I(j0Ht$6td_vm z*?#5QQ>unh1$WSLlTqiB2@mfHp=jn-BgGl&&0>VVEo)`8{gSbM&b{d4mBUXb#18-= zq@SM>051CPqWI1kqZyrqWX7S=E~p=vso1pLPm@1PPt!HaqD1!^>hn9oN4t+W5YerU zT+|YjG$UdV?6$f(@hp&7cIUncqxDDlv42vR9uJRQmjI`V0*iB!(~#4${xJbtKdTo+ zr4w{4fExh)(~D8VXr}OL7;EGU47;%|W1+4*gO-D@P~x_e(0R39YQK$8_)HufoCEIR zhWH)V^V7!SGdY`lAEnlIUZOL!(u+!ZWqb%Sxrmz0^lb%;U9J2{U5NSJz#a3ZAtEb| z&aGq~yvy!3@7p3e`LyLBiyfN?v}^IMF-0$xwM1DsYUK21*e6L+OO*Y*#q)oYPn8m; z>o;66%z(y4afh$)R$3r&r-GI&QU1DYQyA}7rx9j9#CC=J-f23O$ORTZl6>3J+2xzZ z3}kCtHKLR}FGjI2O^?BX*{%=b(&@8{6Z}EH^HNo4bCW7e>^yxr)omKdUys7-f^5;h z+3N4bQec4sTdDXu<<{TQqs%pRJvN{|DC|v>NQR?7zG_Z^8~)Z02iKaglM(pF>fxcs zH2Eqe)tO;g2Tg|6@AJSHzR(e*4FEb^ETG0k);j@Gr5(Wara$chfl5{|g!NesTLj!t z#iD_hou4I6)YfBA)G!^zS`vWoHHUnk+;*!Vkha}X2t0a7&zL`WKlxrmjB(G=f;zpJ zAzRp0$h??e<-MDW5sOmU!RZb1-Plkg8?w?!G2>inq!GGWZ8PpX}ophFxmwrQR z6`YZ{y-K!uxGB*Mns&Yj*Z_)EcN?co{ah?9o{mqK$S6G`W7QILmvfgE?W7scdbjtH zuUcS@5iCVX_cEan>0lYvQ6Ck~AMohK)fZ-WiU`@dtd_jBLW;qFxeLcFLn7#>$~~4Y zA-3kQea4>4D2-pj=JEZ~(m;a(kjrX4#qdZCR?se6oO12QA>sb)lBtdTB!1#UnE}Cc zh~{k69^g=d{Dbi5)Fm(m0h!a{`4rI{Ly31x9*KzFBnql z6}h~S&NqE#mD8H~eOl_+Gq1|+3TN?bYF0an@yPEdJ2z}JpQmoV>;$x$3H+CXNK7;m zL*$fNpI^^*!g?Ykt2a(>#1Hl*b-Jm?zr>(O)%PV*LXqnD?XX*m%k{wmD^g#5?8r2E ztd$ZWQ#bE5^CutCdg!GN1Q%Ec+W&D(bry;a=G5oAJ;`9w@B~Cuk8=I=4imHVWVrXj z`*Z7rN3sE+hzFeKsDFU{J9s{x@grZRyOD08k{zm^YAGL7>7Fe;Q}t%76RSOF5;%1m z|4G*^?=-qW#P*!7?|ybyllS-46X<1t!`Xv;Y#LZV%p3_cvDjjB39!75@!%}B8PkcE zO*ezjn)@CeZ+^(YOu=Q3#bo!xHKfPZx@E`Y)sSH0xCV*gdf`@S1Es)djQ zC$BSq5Q;eo5)JhUkbwi?Lzx1!VY1ueoKV;=S5EuRTt}1BFKHdkIHFExs%w0mD zt1qClYJ3s?OANE_lhdS1+w;5y(-cxBve|$?pl^3{0)VbMh75?*T%g=omtg7Z_7m-I z|4jLkxLN}j`fc!lBW2)i+G=?M%E$Mv+d39qyaZ~4hw+_cTN1<(x~n$6G3#CR=R}KO zurIRj>uJ+M84&F}$|>(z|9M+ciubjKbjcOWxV0JW;TOfD9s{1(&(AJ%vnq2K`nv89 zgG-;CK!K`pnZratu2jIBbmkt}0*`Mh6^J{CCyOvW!GauR=O&s|;#o8!Ry`pf>d#Z3 zoYC70eHvw>6CJg9UD{IQVkAnK5;fA`KH63y!|1gCG@7S_i0;pyVk>Od48RaQ2lV-G zTN{Azj#ErRB3(_Rp?fX=+>LqDiJU?jC^`u^#@0IT&PG;+_55Po@+A>0-PQ86*uJoy z^*hs*Uj9QQb1-0Ix=S%w>CxyiR0c4W=w3{^bcTRiHCMr@WmHfAqidf8JT-k+(saXA zL;*5ad;26KQBW8U?KBTMDN6P!LPw<+whpz&;0Nflv?;i3Q<}? z?}ApCs`CPYaNe&Kqcz~?2E{z2KaWP+cJQuq@Pqf?z3$i>RA2@uXW3hFrk8CY7^7?3 zn9^Q%2vEQ~Tq;V(t%WV5WnL#{UeUoxJ^2!bqr4-(y?hn0UDmjB*63SVAEs=rfh!bk z7`g>vjhue!cNTM*sW>q7Qv^e;8>0%Y2ORJcct5eVtlaOY-q58?YxlIQBV&xXlH7`!vbj@QUVRg}lF8$Nxs^gD6v@mh!lcJM&O&|8Az zE7~@sY>)Cms!v~VU~|S<>*{#M)uF}tUKr>?lPSUPwJou6%5Sjru*XtN1e^&now;0` zR(%g>0RRIxfVxc#`XSnYqXt&{gM+&3y%vWhdbe%`&`^(rnoO9v|HK?t-fA#s(xFk)|!GmoVeG3t0R{4<~T`VlGT{shad@440{Jk}2sZ z7~Cs!=uPP*lG&X`0Q>9F0~G6b@sKp+xUeocngZ$E{jnkRCLI|_evq66Xv|?zIc@vj z_L66B8qsn*Y2w_l%I&=F-HFv!aw(6^fI& z=tD=ZwSJ!i3r7V1>6h?RiCgSgw>oIgW)q`87A&;)_$HsBP0u{%MBEsF(kVMg@nGmb z5IbiUo(puDDWG~=B)~gmos#v&Eb^)pnc>WKaxKCne@;Ni_6&wqe?HYbH=1n8kCUS1 z9M)RjZK)p+fsR1F^@dg}bpJ|ChwUh}ma&Ko$;t|so2vtx<)tAHVEapPVl)lio2wLE zVOGso-}J)QQQJ&!R($120Rvv=slXipt=+k0}@&~w9QG0AHmvAT+KLnm>b)kpb&6%=2i znL5tLd8BBc3D{%I+ zF}Gbd77$x|?O)!?OQ&|e|4?*-|F7&c>~W+rgryarMs#)%vMI+;rGBxIzaV4NWu0~7 z&Jc4JI1J9PG7HXqBXP&-@=hDozUZVfvo=AsTv=7+_e>uq#KJSD`#%zKN0Y0W2 zG@sAywjlemJ*G|wPoD^%^eULVR`<>2`;BQa`1uu|t&d$Xac)b)33b`#M{e8x_qyCW zG+ar7<)N9LtT92lr@Jl$16~FgsZY!TyCwA2=_5~f7UTn)$iUhfzye~06;IN9t5qW< zj&!d5Xe5lVCj51ChKDFof!x6@oTKj06ri1ye3->R8~oE%4_I~s)1F>AQiaP+LGB(b zz&0;GoYm}LbRCgnvoS60#$U~eqmr)#L{h+%p3>M}Q|@ujY&O|-=#1^21|X%7r$ZJj zcID0YlL2*9{W3PuW=U)QY^-+?%O{5DlwoHOve#*=MMG|y32F8*+-`F$|e33qAL776Jp zBdWsvzGrmp9k7Kx(939KWB8KG6s+FM)W3N|bp*K5zj|98=;|v;xWgN$Oy~X+nZLp) ztPB^J*EhKQI&F>GWme1gLb(*x)(U{&qr0a9e7~#WE9Jg7-~Wg3qXA45k^S@@m$*o40^Q%? zvmDO$01UBmLZRr4=<#L=k{8f+2*nWEGXo_ZW|7ip-{iwedWk!J>4Kri{&1iaMAPr5 z&|AKPfnB>XgA(TpgFZLzRA6rky;4vQC@S%IryRR6^74OP7>k`Ho-cvvWbENyK;nHW zy%4k1%svm4v>;-x7}#3FR&M>xzl+)mi`qJYt8d?bKJVF#GCQ&98Vxz`48tkuXz_fm zChI0H@q14zC;Dyu8HDvbVHn6kNa0KNLSN##ve&M#7?;R^YvpSaO^XmZSrE{xsp?XW-ReAFTExX8;FNuFm(==DIK00n|5eB&ZI(DMNco zZ6RSapE&Q31Igo~2jEBXeSoZI&sgFiT9)3YcrSnM97T4@8XTO=Cfy-8xV)ru!JChu z^_vq-rQ4nx#(c_499XZ=EVGwE&cu#){n+1)U(>yT9s80~S==mOx9&Q0Y-fd9j?$hC z{`Tm?D7OYswt4WY%XRCLU%nsn>8@vZIn(`f>X0L2|6@>@6zAU_CqQ(gM(|k!mp5QI zVDA3Ld;cYQoXPq6FeOEFYLrHj`PT3`E#j&AFhabuO;v|?JcssjYG@gpilH8GH>FAt z%m}GNvWK6dMl% zZy2updy?$auqVk6h3c##e#@T@l@G<1;9ibY>}af3_iGwkJ3ff`iOnYch{rs)i00fr z@`%<=rxpO!mO!4z$laEYGd-Pfm45wDWMk`1b6GWoLS!;PfTz4q7wQD_qJ`Af@6Q1w za4T2-+&?3BlO=I!1?5p8seku_&kGts*n#Chq6LsOh0<$k`}r%FR4c5pTF;h{Mr&w^`u2p@nXGAt{|QVey~O7W#(ISwH7r`BCaY1vFM&mP|bJjBzNBfrOe%)TSM zr2nxbSO`SX0wNEq6bvXRg#*;=9j12PwdDFJh@sc{rC=H+Z)zquXXlE3c*z#aRkAG! z)|Qns7LkRWGq8<)l#sM>9(xV;j~8-DY@Ub?(EmDK`U|LdySzgD4kIQt?se>~&|m;Ki&k2g1X&;ojKV1=-gn0^Q? z7}Qif(w&8b3R^K83nRMTMAc#G^tFACaxB6V@d2wr(fs7D;YmQq{{^ZuByNl?(ecmQ z9NdFKv!X;v1Okqt@vt>FHpwp_emy6KD+lZPOf+8~mHfSp*f{Gdo@{c)B74WbJ51OL z7^T2z84DpBQ<&HDj7Y2RK#8UxqVr99#wq&S1B%Pco)*?~z|^5!-4Q=|Jpu68()Abo zJZ;HFV(j%{%|CYLyrL}s`0KY1nm~QeZDMU_y-Y}~a5Wbd(=(WY>y!HSycy`gyPB=7)cFU~WsOSMjK1NLnNm;UnFz zfZxnFjXk81(1?sxrJ20SR^JRQri1XHKSbo#jDlHca{z1PMAopf^>dK>fc|bh9ejh$ zBGHc3V$p-IMmxq`5-amgYySfE;d$)p)~OH}A=Di%Ro3svJpJRLY!?(A2#gNqAl)TB z#2i|k7z~0>SNxj>0AA&gm~_kI_f!j!w=^)mecqUO%RD>&v8t)3)mi@G5|XfGA4hJO z_krLU94Y!e0f6?B;aDPd=0=t1%%pBu$?&~7u)K8l3OFhp^wEPw#4w#Wlz5^Qmz033 zj{9*Xo^j&u4{77fgIa<$v6Dgv;mg5ecEgwz$E`Zx0`!b23| z%|2Fz-fr_@JxMEQq(DwG6oHOMNJV1a!m@%Qe)@`Y*o^jDm6T)vHnXxkJ)`EH=S*U= zC$MfZghV0+7*V%^ay76#WYDUN3{a231Pv~puAF;4E_{!z)Hu5#_eiNhFDN$h9zW@$ zFMzX?*t^FZK^86VNa`olE1o>kaF+JR*ZFUWOpUkJUs4LNJeS;$zn^r4SGuT;%6I}c zui9xr^lU_89EL7TuDg@qJ%ja@IbAJQseUqlMuC<|qAR|ngcPMnd znq{0i!P|drIPSCbAvJ26i%%t-iU)|WAJP_$sT%;N|HD%EG}Ha!!#EfSh zpQNRFX!&)CViA`YDIqrHHQ`2r5!lj4y&#lnP|#($Sd}B2w(~?7;PUDKbHE~MjkX*B zuAXk0bka$qrhBwuc{JR&sZnfKq-P1cQ1NcUnjP)sBI*n?5Ukm55oTC#*n44)O1AqZ zN0Y7#ocPCus$btub3b;+r50PimqA~k-R_&Xx<@-g7(m=T*yZQ-{D?^e3L|stdOh!) zwbeZNq82!f{|IYi3)^~R69=p6KnmE)ioKDUYd4Y9VP`#mHzft@1EG6$A#;~M$ZmsC zm~;{%5l`_%yUzP%agFLTB^HSL!x!nI-*{?=|M=KhD8Ce!!?NtS5e8}+&IAulF`a{+ zJty?cx_1Df{=c;Lb>EBiJBV&C+F{|dlc`TH9QB!|zf&vxJED@d50{UJ8tXuBe6T^a z5i{Au?82Qes}*Yr;7GH>T3|VejzzUS^Vi8WCnb*M$Kp*137cgS1{OOuP&21T8T1>= zIYCAPSf2qbR}!pQ6Id=u>~hTmtRT*-obP%$1_GPjln}9S#Xj#%GpR9XwC(1Dmg%2yZ?C z)rEXdLuC0$MFNq|$rODCfKkdRk1R#uIs}>G)`Pof<8zFLurI>u+)i05uuJs#8o=apAs<5&)=j z4`6`+l}I!>;A23KVB4$xQ2zhQA)%NB^X7z!{_r!&mi4lZs#(?XiP5JB(Z$MWXwpfm zCT+RQ97Nx14uh?4lE>CUh<7gOBjBxgR040m4@%ghFoFgl1JxeHsZP&N$y3?# zcSZrgQ}Vle@Rz5+XNIYahX+euMzV|>epzHzW>jSH`R~K9rrY(VLMgw7I>BUpy=7c9 zC)<&r#Wq-7BN9w@+Dyjv2dH`eC=oS-4NydXe0Be#^A`b%@gta=;<+@fYL4-ujhy}j z5?S*mT1@sV_lqip#H<{j?O|$9N7B=~vTI{NUr?1!Zoi5UbRLJ8PqgRvJ#V9oZ7ZZ{ zq*t(xO`hM?BjAFkqB|to<;s6a=cv$o{zOuGW?({gJm0?gc(cjAL#1Ea>YwcE4vitW zHEMlk=K4#*zYiB&cVk6$TFn5e%g9Rr<3VW-pliFTP&j8hUD^J(ku#DA=Goo-tS0(? zsNIv@fGl2f-yiE+%N{J%z|k-b!wv$adB}Kx(R(!*nVh9237B04#)#M|a&jlb=BXb( zk{Q#7W8c603x2&On4A@BCX_!nr%lQ3Vm?W8V3ohpbS&Xpr$473ukyEpOij&Pi#Q9= z9&Ok-$-qxVA@DP8=17Pf9iX6g=|!E{0OAhCZ@`gU_}FwuBs#|;h>YLbC#6aK-T0I! ziAZ(06QjzyL5hWOJmudeGHrzgZG`8X9=~6gM>%Dex8%H=@)uouIuu(g6SXcsKLUK8 zd#L=jPi29k#q#s*ic80V^oJ~w=x1!5KaLrAH3-VVSnJ@y>rdu)!CkSapz6YYjHlXr zFTj3Bl4cfHnWaQ?V#p^doxP&j_mH^s2#VtB6b{w zSVkQb`d(<7)6VEdZfBRHBaIKMnE!lURS%DivobsR_J(W!qaIMo!dxl#Ee~?Y;~E%A zmo_^Q?Kd~;K`d6i+2udkYi4JXvhc5_4=_Qv#clU?bDNvrvB<2wu&@!*L#=AZmatiY zon%~Qpj(Wu9;J7cB>>+v1NLq1UP^ClNBP*~GOscRV>b`H_wW}r%$k7QYrkDN+Uab? zjAzyh|MmNtJKF!cCrz3};~@NOZV>wjDAj=$Yb)JG|-sw8t<1ZiGE!C((Z2z z3lPT21hp0AG21!v`v9V6mOt+xM4RI%zuntFE54d+`6!>x!~oIYJQm7$G))O?%_Mef zU|QI%5%j6DFH&s9GpVzKX?8#K|QD*YS2!E5nMrVa9El_*x3U#RZ(YPSCN zt#$UFgi|}EF|Ah426u){lXr>3xg=J0I(`iOHuy}bu7rK;EpK*|aEv)Y?b}iJ*Xkvr z?d)j%iRb@V{KC?<_~Xe!u`#eWQ8dbr8I^Nl?lN75K<0_{W1HPE3lB*|AIY23p^WoQ zl8I9@u?sCuE(Pv7>(uAs zdt?xlt38{}LEefhIZ#h*%{D1A45-S1R*8UDSO1w}n(x)b<2n+VGCdn}a&A%ej|x^V zXcK6+k?ZU&oqx!fZ<+$c+%7$o)$GODTg&)DQ0*CwDT3*T6@IW2iXt8eo z?=b$!C~g?M>ZiC-Fp(!Vn^Frlbv3yhVXNPXme{`UJUyJZy@Y|ZIv z!rFfq2CLNu0zW+(@oz-gWeK zU|e67d=I2nEa?ReVrM8?ZdUV8EdTFe!@hMOW(5B|c;9(~?5ff$ z#r`vAHP)njXsPrt{*PB-KR~e@kMqd#>D&Zcb9qg&mfqcBVDLRf+Qxq;`(K0jk1?qm z5)7qQpbN+UN$39`kNf-M-9q3QN)g)H|LZf1v6EHyRYXDmV`cxxhkeoo%)|o)u0mkR z|Hm)>>qpK~?3BJW=Xl8epT>aQDkbbu`kehm_y7C^y`VUKtd|>`AC=7bj~V`tAw9q* z3Cdb8i~i>+`0pXLDPtE*+-}!4P2+!??q}=;`Syt8AML>Z`;!*FVQpe+wP*DZ7P$WJ zXaC;L%S|HBKhe&sILOXdG|GK&V-Lm072lpQjOs&RFHtslP^7KDO_dh1}|F7eLxyGfYeY=dyuug#k{83g= ze_rsaf_776>|D-t?LM^gH-0a_u-MLafW^eV0oE;6nuhHgA!{Wz)A=Mg~aHv(GZY4U$ z*wqovqM7%`MQ`90<0bf|QhJTTIc3!Efo{c&aHD8SZ#EH1H%(a!)LB~K)Az(J>Nzw0 zxNjX>Rr=Y|eRxp-=2j17n{~$;b*_M^XrNh7Nyklg!2TxqptZRYUlPIg1*f3m7_--sKg$2afF8r zWz{#jz+HVz^%Qs`wxCDHZozWl=S#n$B#UG>{k0Es{Z+2z7Lkrv72lO!o~SPz#|}e)?>^NiVqwpDFTo8rdv=j`gVd{(~-UrK$` zOn(A=59JF{X^tm7A3{3%Ed}puj8Qtyc}u{S;UA*D(>3#DYvoG8%UxT0D-A(9zi}_v ztg5yiGucpms}P$?*}AFnQ}QP{0kON2Bn|ht-=iaRlZJ;bt)#lv{TwqZ^H-VJ0|G*%X_rQeV)-qx+-LDEZ> zX8O0pRrYE%zI^*P=!Gdb2-64=-MU>Lir>;2&1A&oX^ZxBPaU%7zcWo;jgRn>OpoAH z3g3;?=!7o`;nk%#VazcPEAsGay6Gz%62DCu88q`JM3QGK z7r&bn?V~aHU0zhqbqm^8|HSN)#=Jv>(2Q9((V>X`7pSLKyn2rC^4q?B)XF#=x~C3QcV$Ns9sOutTF+5hA&k|LtU#W#Y^p5Hy{#Md z3Ovyp=6o*2CdPPOCdMdbasQfj^bHzhgyZJr$izbhn2lSmN=6VI99j5_p4RqZ7C z<`3iC-8r*H*7zFvULxl6x4EbzyEJo)ZWK}0i*jf}oX8s`|6qTT!_&jp{1seuqs;P_ zE?Jw1^y#lG0}f3Q96gqTmkW&Xa=&m)JK`)@eDwalFzEl|g#i+wE%v{Pru#>oYX%P} z3m5|r+zY#pgKq2qHMn76qzvEtF`Va_XZBy`KFMXBal49r)8`v|b8FUnJ*}UJjPdXb z4RZ?ZRrk0C=(3RCK$mZ%82b=&8k?H$?v#d=R$Wtq;BK6&)rP}-jWo%l9#na&c}8S8 z;kh#2FO@)l%EOx3sG#c^(JN`ponCuV{KjAhBiRJVmL9&VL~a0CwI9%%=_-f};vpp; zoj?fa@;!aMr@744{)FEsO2CncHLr1Oq+H0eP*Wo-4#+Ra&0W za}M_~g1-3c3P)S*eA_kMDdxC6{+en#*I?Yo0$8Du^C!(~4nXI;xqYGwaO2%5N#~pI z?gfZA2q21`$1Abp`kmdr=;pKT?(RS1f!cz{Dh2j9X9@!db@oja*^I5e zkK5DN7R`I@B&Z+SdC7I24>X%^O-Z?zOj=PsLVwq=SsCLLxM5~$SinM0I5`$nMVB%e zJ*QW)t7=nLBMr>8bkK_}x-KojZ`#2vt(mMoyP0%#ESZ+v*o;}TfRCD_>RDDrvUJF^ zQGN+xaQ~_cl>we;Mb)=g$)ue9eR<&{zJa2DHRes3r!V~leLYGz=%CBy&UngY4n7-4`=W38~GA`D* z6VRD{3M%vWF$Xn1e%JZ&Da8!&wPse{UWG>F)&8;6L>oyDJhw0>%CkC^VT9eR0*PLG zOiUjJSsOCGzn?zEHBl`+KWm8obuWeA`AFG?E&xU0(dyQ_Fk}C05mNgk z;QIro&p|Ai_|QQ9y9uxVJZnox$QZ;STzvf}CZ6%e`3ZvtoqWH=wAB$=|9)+jGgDw* zuDpNwZDNa?RI0RbYCfuzNsMC5dvqqirw# zL@_D0RZFFEl_jrJfFmpYy3D-!jH~#K2c5k=WDZ&3)f47G95Vbnrl}^q5a<}Bk9rMZ z)SzPwH-cDko523i=129J313@6&Us^5@LxB+U(>vp{zOLB$`)*Jx?Vjeiu11dbwy1I zzh`3g!$f)8K(=x;+^c>5o&*E&#qG^c5AWaN(BkC%{!_t}Wd7&F&-)Lldvj+Kn@fzx zNF###lLYylE81uwT}xtwO&*&%t3@dLRHw^p06I7!GJ6E~xQ+n26xeutvBSR@rInZ? zgf_d?q7RWevZ}@$r@9g4x*2~$i+N3B6zoC#gNZ^n;wgK#g6y>?Xa*bK;5Zi7Hsxue zeO|TiJh}BNQC_nUw+&f#NAAH&x%N3_4^!{Uh8cX&8&!_Tu&s58#;?{Uzn?Pkmlo=N zU6RsXIgCZ3`j8A|s4LMn8wY^}UyN5k17W>2!o#=fR3il}*4d0}`$>YIA=CYA4V8d| z^sTToPRp!m%a54ywv1{%@^_jri4L%;{A90$XHfriW207?`T14;h$%A@pKz|0>@B*0 zqH3kAg?3ui=j=hsB zUFYw9D?fW@O)Uufdfmas?6s3WE5@h^Mx1K0Vp?`Nnk$=3+bf76$~rFLvrQ;o%iFHY zj;f~L$M`#M|BAU-`o=@nY8&P4{6wt(N%B4V3V~T+Ug{Pf%id3`<>@~TXFRu~>Bv^{ z-j1#)MaLdI(Y;t*nR|l6!D5{_cr0|6C7<+tq2ZSdF1KFiK&9_XR)ot5!9K;?jy_Tn zA7iEm5$ovn@riH4!4{UMNpbkfYiPbj-!(LP2NKsCCe%vJz)`CKy>1Rk;1qfH$8)Yu zy|u}AW8~-ctA+%)UNTLqC||KZrEVl6&!udH4qg)FlbV^iG0JyT+>_KAW{$U9$ay~) z;gf_I#m}(brG}Fdhvd2?w5bQF^s;m_$ed_BWXP~0Kb5O4v|i!lO?yZ_uIyDJK}syf zc|zThsk3O{!Xo4KD?FsD9EP00XIM}R8@P9S; z8p30fTfZDb6HG*LH*iC) zeSG#8rbn3=TWl+f!pD-(-4ja!JRbcxQzizrcfJR)+uwTr%rfA;e6xWIY^Y#x=p6=Oo!7&%8DfnuAdsw>d;`1)b_ zTZQZH7go}X0B5_jY>C1A_VTp3)3NHjZi=pRg}{IxG^(?VOGc0d;yz*&BJHCiEG4v1Mvr zR3*vb*RZIw*eiBr#y|Pu;oqLp2mRD{PC9Ln_Nt-}r6ayR-|Uj__CsTG1^jk2ztp`h zWW3)>N&2+T8SlV4-pRIwKl>#!SrPv(+%C>*^ zW|tEai7yzY)hF>`>~7>UHJ+g9C|p~rn}5t+VQoY8oky^MR^MqY`pRDnZ|=v9%sK`^ z%ov;rd@44Mjv<~SCFMD3psD1W}(ZYGFNBhAi;HxQYPFIw@&CMJ6+S^)-D={a8 z{?xADc%C{___xJWQI0Z1PP{g`2I*wVTupVQEhY@JD1U!@!{7L~<&eHgL8akEdj%QU zb%J;72O>fLAl7tGR?LA-MfHUe>~T|x@1&$Uz`8869$Qk-tcMxC5Gc0%icuAY* zCriM~-rI>{af~%Dnnl%FZ9jT@X}=QAUfL^_a+=yU?gVo$(Oi zoViYj<92TOTHX@#;=}4q6(w(wrA84P?twt2cz8?@fm&h?KJTDaVg%9s6v*CDSYNRXZ6HO;?TZ(Kx{Vxp?w zo!#f8Pp_?SUfc5afn;IQAcG-*HJsXm(Jter63HMgJHz{L7m%jXuFwY?ca{tGA|GCq zQwTR>W`a8$kja93><(dM7&${1mh~4a&-xi%tduKg!{|0g@%&}TbmCX^z3DCJWDjDr zL_`9F9OMSW-icLFwe@JfbkC>#Wj((V{xpC-D4hYPGv7&L>z$-~C{>5V&ho*Pu*2(Q zRyIVeh0brSmj18&xjl8e%N%0S3aOZlx&c>R#cyfv+tV}ZF2W)gRaL|<9DGwIjVQ~V zy|b;EiNlxuRG3Rgs+LNOs`3~%T3=m7^)bBvz5o+36cm5(NODiC=0kb2d)}hw)@j3B zL4VtB5XBUM*C~yDi+h_5sg^y9>uNuyFm&W#o<$9L_Gh4de>kS>)N#rgzfG9GiZ`jn zg!waA)%7N*@y6V?^(;N^c}hJG)b>{eZb)k?10mE(!}`W2iEXQ!x+J-o^-LQM>?6Qc zq=Ozx7LlgYe>8h2O7navy7i{QH%soV&)zQOdy|a@p3#FuS;iYG>?d81A8F1B=`(OoHM5X1tcjgD&Iq zeiCWl!QXupm@wz2LkHUI6FebP@=S=vJbo)BhU1PGhqlWCW4=HbC~jr_Somr=uNNQY z=i_L(y)-An1I`sQqJ1EAmoFxRaxbdHhcv`k#S;&)OAKp)U;>jRugUcnnI?pR!$6!+wgS#jHJx-KGko9E9yR*0VwjD693vc=J-rt*HbY(io;}d$ zA=5h1>)#XSm-J~WJe;m17`)c{u~8FY zWquI9N}o@r`Nz05<>p|W4DqX_0EyYdv;92Ros1Z!w^uBU4m;rlf_Rmp-;;^BJ~NTu zNqgA!*jtDFv4;VsEv|}4Y+z<~&xE%4s;V{f1|?--t*i*%oDZ=a#URcDJm53s5DLmA z&q|w2p|V4WapNcZH3{*Ow&qz1?EV}2nUKP&pFl;R7O+&be? zB++&|tNY0egVWCM+0VILo^Wp69cd3Cp|fXXWV9c!fb7gR-~z2&%NxA*mvACsLt})u zkrNZT8t(?HnH^OXm|xpHAH7bb#Xkls6BH+4@Q#-5o;yFa z0vXD z4*XG(-wziA&xCQiE1v_h4}Wij>rjf$!ZpVpscjtoWqy_m95 zX@^9cb-edy@YE5`Sy2e#m5wKpMjg5oS(liNe3lVP#zZ@lPa!@nx=cliiA}M*DK5vI zU%3L8Gdybh$`7(k<^1zG#~q@2q@d((rQ&Zi;b*4=!k#jQ`8ge~2!f1X`cABi|U5}jSn zaAv|mDWs9*i~4h>wbo2Ltt&A-DO3z;L^_s#`4amw|1r73xLrh?8lM}-ko)H(Qtb-* zcc)OI-%6~HLdQk$+jWAsWb|}im5brMU(yt&w&)93>I{EnbEx?E)PA2tj>24$npSk0 z2whdePBJhmc9bMbe6i=Z_U@CdLG;PBRlT?s)b?c%*$BbAK$qfx8%3C&Ol?`bVRc4c zLGV^zJy3u>Q~01)PE#K|M8-L(#=H=Re}Snv&m>z?9|%yy^oE>OtTk{x^XlmCN~2Nd zjkr-K9$G9B$Ezd;QYMHq8eMtv27dK;7ank@w&aqx@VEH>IO_xUSIY)!%|05LGlXqx zIs7|$;#?tRPnWy{R0l5a-s(wEw(5g(ZQC!MR<6RCYkm^yhN8J@zQccgk<;Zare?oO zz{5$=*h}aau=ho^!B4d9uIA5sK@P*|GFqFsu}e9egAj}5puJ7V=49*S{a*rZPw=4) zrE7I?f6iSKD)knW4nqZQLtDmrV9eW~SngjSInqZPYVIvW-gHM(2F{nU-Dl4DeMPH zcm9Vn6OPk{n{%Vhz&HvgiA_E7$~|Aep}mw60*D~%*lG! znB^6x*M1pz)0HqI?p9-t@HEuzC2`KcO@W%gW?NyKIZ)`jP3gz&&-|Y+ZkYr;(6iGh zrw;;-a#gs;L+kUtsHD165wwe4gz{oqCBgWq_oQ8<}GXN#Xulp0d4{})Z)84lO?Mmu8!(R*hI zB8cAW_(h_3qC^j(_vp-w2%-lOL>Y;e2$AT~W}^2ldT-Ht8D`9#|9$TLaz3Bu?6dc~ z-nG_#7ePI|I`Z~1+bW^#_4AYL)^&uTvxa^|D_rxlGA8j`>Oaa4u z(KagTqX_A{ApUT=s>dZ&1GiFE;pux?%|1OemXBAAK2~s1S63L?=<*{XuSSNDE{*7I z%>=3}Ir*aP#PRqWVm zWou6sRibOx|9-+4FlaOhJJVE=AV_D(i#YzhoBx<@II^0& zf5Xv|J{v+$d}>nF*s3)i99Jhw7X^ghcTx=6|0$Eew~|HB4t5(2L`rw}hrl!r(mwi)^m%uxgSxsm6Y62q<9oNJO^qF#rR)mqr9M!Z z{boE%YNykGGsK<~@m|b+bnts7=K;Z-22-nRYC>08W!87}$L3!C_qW258nT-J7<8rZ zr$^_zpN_p>eH+E3Jga`~naoSDi%_OKdDcrC7CvN??3PJBS-KB-@%9)wqg?X#kHyq$ zrHZx?1>JcEt1?ED_s>4|>N)5shmLW!f4$d#??kzkMiw{61AM|IAAad+9eBRg%EpMBi=G-U_L8?r9j8eZ#Ty0^1WZi zD+0dDe_3$)kJ)mQqq;+LP}=1(aOWdaN4;gkE9@w zo1dW)-KKN*hut_THQ$Z?6gk&8QiBr$&@H43QY(5V=JNn6DfoEpuNmGoqzEQEu8Gd=)`JMbC z;@^Wzwy94UyU%#u#~S(icIW!|HlGl4*kD~-YVGGoS~`F#`hIY*&1k6yb_{nE z_{WqT5kU0`G)eqHat4z2YMtRazC)DupK=fECPkyY4}s-Mn*XgxKileONa>Fn6E5%F za0Zft2H8`gWS6wh{Q|@XRU&wk6o2wf8Z`fMVjt|uk#zYQUs;{$S}A^L8zjaCO&!b zx938Yj#3hIVHFJQi|wBae7*n81xHfQb-!IFJ0iW*_alNv*(L&RK35_$2ZK1^bI}mw z&E6+`srzG$_(t|%fx}pygkM!@nD8kcq6mxiz|ys*oL0z3vb9 z)`E7@ymE1_@)n)HtU2Cz`yx?O^USGQt$iOPK;!bK(LG9XNo1LNKMlBo8=A%WB{Jo$ z@2+V{k_U_;^%T?)4?_QYej2W$Q=nZeb)t=accfcz*>5*2wIMEVt=%NH(5Gf{sMvET z6nS>UGJn^+U@6i^Ac8{e?d=uiy}L?z^LF6J9d9{UiZLIH3eIq~<6b^1aJ3)|s=V`M zU+MXEN@l^#txAFNTOwJ>;-OL`WD)KLj@gYk77|0sQ}487PQzKoJ7=3YDVUIFSq}fA zOg{JWiB)08Ijl=;;C#-V0)4Llj2sJWZ64|wH-4-|2cJ;ovVc%E)#qc>PJuz~6FeYQ z>?|bzL+!Y}rhWcqTa{o@_s05brUYQl1{_#$PJDd2~~J!suC7@yGfSokvCtBBjGjBwy( z5^_icfYyZe4q`_VW@qdxmC?3m3?0;euXGG=&zKw; z+g}?f;IWwk=^u15N`b#FqO(oWQ_iPPY*E(?!vUG!>8oD*ZJJ#B2T++UXQ8w99obxy ze(P3?KSclcw&k(2EUuoCg)xPa-T4T?n_7A5__VY$zUF4)M^@eVw}=Aee#=SMEUsFP z8B}^>WXj3DpktLC97D|89vZ%>Z}X?P<{_vE3vpU z1d(Wyco{4F;GgCb3BtF$qJ1BGptVIm$Cd3Ii5}6q+^D%*MW&UP_@|cle1odTxjd#~ z8p$6x1Og%sFW0kuZc6LN$lz5Bi05{(fMc@jjiRLfv6L+a+$PuD2wT+I_a&xw947Ja z09;r9uNs<9P2pfu`zCN}-)OCZF1+LLB;d>7`zRKphgrFB2?8bBr=VIo&7t_N*HK~f zfX-4qv6lP~ddwN!gki@uw2y4Ht0a8o^%~oyRM|Jy=~M3SQ0;84Woqn@Udc{3Mm8r{ zMQ}f(o5t~xIs#EtC5h*$-FlQ1(Qz@X8Q=I>fZg$f8y47B>sCZdgEW|`=wPVxdX0+p z%jH`ARQtI`|6{1&*v5njzw>w4?_B6E9k$r!H9?s${$PP_@^fH6`+So0+x?yQ6e8s^ z1_`uvZSnSGeqEtLf1sGtK1!Mee62uZDa4<03t&626PN^(8sz-ybd|VVpaiG^uEhy- z6}o|Hg*K`mGA?w4EsR5Vr9rBW4*`?hG708%gT-W+b1k>d@E9&zw*n!R5f)m%&5$Hr z*oU6&vmNs{b^(0QvlIHo7Ta<+ClyJt7fQ0ZNl+CBZ$j$zrw&S?p&7%wse{-AZRj{} znc~IGsgyaL-nRn_6!d3@1YjXiOhG#Ig*CeFpbTkqHgP-RNe?0}FMi5_hcdQAuGKlN7y`xUakJ4YgACm!#Ot;DYP7Yd zTk9_$UKL>y`r{a2zvWM9^c3nK+-8T(PNLhsfXWH09or2s)|6l z$d8|mbBZ&C_OjZv{+?I-y6mPF11NP0G>B{1hUOTLezhMJnM=&;7?F+@586V_0;ivW z-XG#ovE0bJKcbZDsyhCYhgLuBLwCJE)K-50uI<@RA2I_SX77_>I#;<6c2GGqx8EAq zW_;AShMV@4+fr3i#KPt|8S`#O`uaSbDA=Opw9m{=Z|{zGz@Q4j@n1CiH;wL(lP#Xu zI*0@+lx5w{S}D^LcM$mZO{MHJpV!4^y8lT~ROU4>Bvb0!Fb8ut9bSEh?0k~Fi9h>} zL>aUs5kNDILa#H`&uKzC*tSG;nz9ZPUaCsa@zc&e+~p{fPoNh+rA=!!lD{1P=Iegl z_>QTATz(d~k)H%;28e(r-vshqYOy+Md3_TlSM_|~eWuDo*|XtZVx09ZuJ}X0&=0A` zR37qg5ldjY0n9bVIsH~xo9lu?M5$5o{;r4ww_Z_56Bg#!UyXNkJTM>^f=8*PBR5JE zam4~6BUv)1c8W=jEK@Yj<*!)QF|(GqdK+P4XmZBozbs<;o0SIa3v48Aht#>s=?g6B zY+TPH-TTxbuWRgpke-nuDTnicR2Kd|>#wbS^%YaaP`9ju!|ahs0DRh?2+jdtzSrw% z_4;;_i3lFw?@e&CMMF&|daNVxL4%Gm3n3xbd&`h=-x+G!&7YZgwv#oVs-%ukW-QIC zEs5@d6^(O--s4V~2i0%dLY&>@6nC4%P^}96%zTi8$L|zFj_pnLO9a5|#D9F;v~4L# z?=s$et+=H7?ff*}PfPra`SZSdIR7#;>;8Sf^qm~}n=LD^abnd}5kL@1G-IorF@Y703K*?we3+0l_#KyM%yP%%D*My$|6=+yLOcfqtch zY3LVwACtddA6iq0{WgwOy2d`upn9NheaD=pV`8nLWT&BlzLm5&&2GRA6Ct)nEm_Nd_JIDMHfW`BA&Wn0m;B%$*8^)GJ;y~WnePW$M+$GBzbovv(4Qp)blL2FeZ~>Z(Mj5y=C$I;QD5WD+oR68YWh zj{2zQ$KWd{{5?BCB&e=KGfx%;w*lW-@fi&nNT7-1*TV=wM8GY z8O(t3T6wfPyZD&Z(ABjm{WJSl}$gA*t832BWwW~$_vslk?B&O1Gbcpr$X?pVdY$|BRT1t0lMn; zSq)x4{P@D}QX>KoX%%A`gPqU^=< zIK=BVlVj|2w132Ucd~gg@DVWLcS<;qp~&KzCy^uRnTJ0&7rywfB@kma&VE$-cfQC# z*vbM-zxSCaYAsh@$^6OZ%iQt2Yfx*G58r1Hd&lOBcHnN4Qt4#_wXg5bVgJ6ox%lj@`sK+YSLI#pffklaUtKlw6nlb>Kzl4A zSc6`5f!gxyR<2sUT$d9SesR4K{p@s$@G;9G*lE6;FBKm8fm5D2C4y_f-m7k5Ii0SL zkhr_-h7QDK5G{W*o|Hzg6Bf8AbHd@};@TPs`VKxFYQq;(hoIom^ zc%*r?BQCDaWBL>0XGwvQCCsI5-@!=>_XD3cy_ng%fuqpy3%fwKL5H1JUr$@X{Q zj+`wK@%p&jg{AWk+fw{Vd711M!(~RLHs!4FpstCl_?oNY@5m*lRPA&RS?uVm+ev3H zJZ%MpZf>5~aoVH3WOiEOuY{1NLgGHjt-+iEI1+csHw|z95#q=MpyVm+MuJ;}Mc7KR{xUa#7$FGEBk* zAG{5HWuHMqecXl5ry0>Wu5+^#G}TuuZdr3%B~S#+D_gtRaZtK7Q3nItZ0of0j&euN zf=+uxfh^zeJc9IXS#(*XPA@xQlQIgfso{LGTfaf$6@l+7rG78aXKj6rz0oBI2yV@r ztUQ3V@#%-xh~h-%u1?up_(gFf$G$AUD1;AV$eF=Ll;~)DDj0$ zN72?Gb^}?SgfeiB1zWypGcC=Dtb;uw@M4=jyo7A+BqPd!|0o24ic;?P?6qf4ygHP> za0!Vat;HhR#3TXe10-<CV1 z_-?I~K~;2HIxh&=^S;%_^`8~QAoe8!m}QOgfafR;@#F|5hpVV7_UP#-?NpJ6YB`A# z;!h8zw=?;IjGkCa*Y@pL!7{e(>M;z zXx3-tHmmx6kk))b!=cH5`?^X^t%0`)Xw-b^U$wr4HtBHZ`kU|-M{=e2ug^xJIgmlX za@hI5F=wh#*SsutG1`%zbiL0t6Uxb+e`D1_;xSVj3irDq*RFvR!rDCtlf8@_yk#*^ zNjaXF6 zLk6%8Q)T&=VXu`fWvXZO0`opZnB__1-oLG0<=!cukyh?^_kOG)Rzz$Q93wBW-;nY?ogBv1WX-E)vmb-4zy z)JsTMIP+MDND8-lF@zO_b$Ps`>Z-fewvc(~atpyQgx6#=2%xL9(~Y1P8cOl+UZ5!@ z;*KZS7`u94whzTWU+{mQ`m&KFz-S)f@r|^t9Qc(hyDg#M`ISF&SYN@^*#&!oaY`+= z%4_kC?0n7kzgldWV3eH|%m*-Yck6;fm$LEuhn1vZO$IcLP2KK0V0^z>B!)`BXziF^ zMsVjmX}n!&B424ck|0RnA$PMD_sztT#F#Vw=v=rL0H4`dTmpT6Zr1f!>eE5>KyY8>QrD2qJVm*Jr8a>1Bgo;rFS>P1_ zV?E9nXoD)VWdW5e`gTxQ1|$qT7@V-kEj?2J_U8mUy;3X;G1cw&f-*Mgo-n=d3j*HO z$GN$r!!)%Kk+{IHpQ=?SU2n`+NB;36GtR^6f9c9>r6uvoF6#X9UAU`iP`Z42J@i}l zEnNqHH@f)2#slr`M3Ow>R*W{CxludAH+O(wLa7gJ^#P0+pEdfa^|2rv!1IH_q(5!> zZo&h9+OiK{+JWy(SuH0z-L%pL91Fe-e?iRwSF*}O3k1XaL{^Sttt-j)Cp?Y z^BJ~4cm`4oubIK1p{ zr@(|rW}e)r_ppZ?&GGAx*F9XBj})(}#xD_S5#s?keZS*4j@?yrJ#+~dJDMT{pu&sV z#=gb-hQJe37M5&%fP2#T?{o`MrCH8k;xomvJUEKCTfDX23LE~dJkzPO+ z3*b!0toiYug?K-l`%r8W&`;&MBgn8`wo=!fF4_{d~|Ma44O4H0>%RDb+3ZO}Q z;Om{Y8ulb#;mXHuynXM?yAPiFAf(6IUFG7G3YA53+zfE%(VNE&pX1uUpp9}8gLtY} zMu??KoKF&PokaK4KbQD_Wm4$IRq>{Vl8Fyr>xOdTK8(Hx-kZ=%dvVm#pQG`Bh9I{-wG%bdp^9LzC9?3EviaG2aD0dxH@B^{X0T2x?ki z6`Gvp7e>n!v5>g}zF3Cx|GwNF#+e5A4PNrFjB548=VyEsIjMm4*f^}WOZ&B@MQtsx zfszVio);wnrlI~41jT)6NHsiE#AA3x7KMeoGn#jL+kbOv_T_!|{(w2D2_Q|VG9*Df z>W2-yeK*vl9@ig!a!E{gq*4YkwqN)A??KX*uNqlOf12_kLAtN0xexu8Rm;Jn!`T|i ziX{xy7|G8Y58}cBpek4Nc8^C%mE2nQ^2`wiriE;rj31T!Pt3ay-{_B%ARR(4>D3nX z20A=~Bb0_6@e;hq1P4Hx>^$@^Sv8MhfXpXrvNA~WIbHa}D19&7geb0F--_BCM1@h} z`j>oX{+a%*9J-Zz1rvFA7yOZRKhyrMAyO$TrD0-}THqHP(PjB|-0=GAb!ouY{Fovd z&F8UhY^||I5kV3XL=uFouF?@c~JW+VuYNSjgGNgO8lv$ zKyNf6`FQ5i+W3AjZh&UuD-5lyEPrJ{%FVT5-l07Yqk?{L>3m0%LrZf=ZetN@HE34* zT#zTB^vAx4YX8yHNKX#p7U7G7gETRJEzKImZHel4rmN-Bv-Ubk?Y5*;X3w@XezK zD=buTIn^N45k=wDr(~;j{zHG7V5|oApT?!nWF>LUkhnMAX+tT$%F9oD*T8ufGE=j% zZBPE&Tg?W^i-2H|Fn?|5BdAzKJ6NF-GhazucS2C zk~Kiim}dC^D@iqJ+`C;`dPg={kBZo1>z2g>92kzW*(M*yPdgMMf&I+Nf%9TmsWFH~X4s-km5XQ^yZUDX&#RO7Iu@62Uu55nH%RiJ zc1JAg$ae z-)$9cG-|IP?R&g4h(b{wOw@GawFNDF(-Ma_zFP&&>z_n>(($KRB|Qoe&e62YeJokVN*1v5XGGr{e?g-5-=8WQ zRr%xXhlAQ?g}b?M2EqxpF^+;;Jg~aNk`Tl8^IxmE{+iNX$>M%L-oed@bBnnm;yTiZ zlDjrJ`Q^(58&*2*6Wg^6fAdGMeo~67bZ~{ z%jT2X3`kNvkp|5s(0Bg&T>C0f5a2HDR8`x3L`Y&TL13EkQQ$o>fQ7+ZO3XldBq-d) zwWm$Y?FtdgK^z=gbaZFx+UV`xr%Xwn_fDKlDPfPomJxHF^~W7`uFPRD<9v5M(3Wvz zO?Qc1V_Fw#OU64nuxnk3IozYWqK-Z#HI?{H`yCmD-~iYoUGNkwHvP{v!uDT=`0+a z(~UtR-R{9EFV@w+Kf#vCbjLY*dZL%bTvm{B0q%1Dv)HPEZ!1YW0YCO4LrSKWwKbv( zh+$2q8fs$hlVAN60c*U{#q11SPSo-jK~JYRR5fUKU)_8;V9Q815j6cN8V~bY(#xUs zkp5bWg+yHYn$kzHifDKxxHwxk2YJQBHgiU9t-=^%E5pUf7lZJ304)`j2-MKeuDvvD z#hxb#DLAlmr3tnJjd;nPQd>S;`>@h zdwHng=mp^43O)sZ(lvDVJ4Xszb348sMM#JC#bN6Heh%%P(ulIfF1~V8Oy`_l4z`m+ zlOZUW$_B}XykoLxsION$e~}%>>a4gNTA+atA*8iC0CS1#S#f#y90aEi%TWkCw8LY= zzd1tMKXA^37)sT}bujG7BeH&B5gsm;2wH+@t^Yp@;QClZ2s!ttC$~qBvTO+(C3Ze? zhuC;-mU4I5^A|*-2{$-)rQt1pPxLfo)i9|ZKk!o)kYi`rJK)lnk>n^9%+QhT)jWtr zte%^|m?-|lOo8LoYZoGc3BldeKX+Zgm)U8FxJ_4ylH^kq#M>`?uq%MhlkRx5WA$3} z?zVBa=74y`A7ER^bPR-?Rm6OPN@l?k!pM3o9P9{}gutisVP3ejQfooi#2o@W;mY)O zYPJFo*Q*BqfC*ZY0HhE2{);za*Hj(3b^L<;2gn$H)Yf0y^KE+pgk;q}oMZ0BUh_xk zL|y;WN0~eP^i+&$%;XnlB~be2-Cq1da6ssAWBoqCPUnDtr%{@mdcJ`-nwT}PODt?p zKL814z1!ORe0Ny4I`}CyW~~-&^eUaEW!#&qV9kR#^i&z9G@Piupa1rH%$W21JibwQ zYy3HGL0D)|462mZ9O^{?%>~;m-wGo|Kw^NVld{mM{!|*kH9FHy9hIbD6&VBwJ?1IV zG;`T9x7KLEgS>P@+41JELojL@Ulg*$4bL7)^hdX=LNEArn?eiWVrkV@p1%kcCy+B+ zS^TrarNr=1`L1E?WC1(aO7&J};E*yo=%==4`!0h_>>krg~pzc9A$SvuMIt# zPR^HkoYZ^2tTTt$%+HONk3^=?A+D+XuDbJp7^Q1Vbf^!g%mxt9yYS?b8r9wFy6JMT zeC!|n*RP1VjvdM8tZz+R%<%xWN$?ltX|OwTrJ) z=**{4kP1C7`f1BIx4v0;QwNp+9fJ>;+4c}v;zF4#kn5D{$a-tFx@s%I%nAU$%5^{_ zMp%3+HQp-DHCO_S`|ht6SS3HtLOvfZMt%#%Ro(NA&ED%KN>Kz?yVx=Nrj)s+j6zdf ze5kI^yIP0Y%&}JyO4g0&JI_O<>$***f0kIS>HgGT_O{Y6&)eVYRK0bJaRDsb9rfX= zFPNj0j*CnyhFe}Qs0xMSS@>$trp)oxOWeEX9uvKPz*$6;J^_b_WuU9R5o0SZ)vg&J zkaqMa0hIQ4{%QX9;oZ;3q*{J!oa{3Bs`mR~i@xk$JjejE z9+80NA(mge2+W3$20+r_1sW(jAC9W3L}EH`DOr4(mp^?WIfE%iM&!nR(YWI+&Fw_vLo+o@Mm5bRP>sg9@IeAQe9_X$9|o{iww^ni+tr zpZ^0M%vVj72z6Z9W&nI~@;!1jbI>Ee-85IdtN+KO9dZ5(Mu(lo9f#Y<5`6Vc{G1XX zV&t5snqmiktG1DPXFA=t7ccQeD)CJeQ-ZIG?L|7?y`azL=vqA}`tY89RiwGxT@H@^ z1rgGH|^Q+vn*wGHC0K-nMc$AN0^BfbF()siMt-@1oC#ZTqn zImu)^JYGP8J}%4nDO?xvwQ_GnrGnr00Z3NfmMGPhXTFs)(E0c{9vxxrgPvlN>yOx2 zzidxDFe_C?M|YBByT8f;wOJAU*e`%j$`LF{bVV>~wFEEWZ6@QUWyDHu)H@H3%=7vM z$@zzScy!tq48#=B1y`|j2%rVrVmgq@Rp?rJ;CIVl3i9w%I2^ENlZZwfzE+9U}@ND-Ja{_)9Ef?H-0 zUMn}2ETNlD9fZtY0!R`~i5-@~M`e)S47ml}fJ@HlMz9JE5xWYte#;)u>iKxEI^N9W zS8*t}rB0;kuz2n`%+*KA`?e zCA=S-`#0Ya%N?$yYU9p9B_{!7E4zDpk}LP&Qc+<3-DE1bsd>0{8D!d4INoz_M}+rlV>+s%XnGEL+bP?It*!28^gTtS{ZR|CL6NZs(@MJW3DR;3J2C(}3dVV9H+Q zfA~sK()TqCZJd?47kE4|QVvulRW42sz%`QDq>MM?=I%fdBES|N{gpCOfi!bLdNr=| z(Bt{rwVx_HbI)ZQpOs)vNc3IsBtaJD)1R*uKn$0%|7qQE8 z=E(Jlh2yB;tn&$oMLI)7d@5HRScJI$fUsAm?Fa2exwU6Uj9c8LZY)blsKZGSuOfAc zg-6su5aquV$<>eB1>_mQ6;ykS3yk$cEz%&BO=o6&I4y96pj8&2ot5^L5W2BQJX7`^ z4@W;dp@J!dA0jC4Mzud@X8bgR>D2;Kjo-)8_Kw*^8Rj+K?kCo^J)AQEpG-j7&uN~; zt*2B)aP3=$_+(@EWjo$nK&Tvp<`@4ge&fz|!S+yx@KC31g&_#U5@}>2+ad}c2e71` z8mC^}RwS6`&FOZ;j4}GvFl=+Aa$FLuMn!M6IT{4Y!~~w1#S~?1sUPzYt5W>C2gM^W zy!Ic0kznjK3P`b*u3FnQ_Bq?7ER3V&FoAL5*%Ftb%%GK>-!Pvc+Z-V8kB>Wia8(}r zZ#u>#<3^9Fm^ae=QGEm4h1h5AxhgvG&Lqri{Zz|-(>?7sxnNRR492HpT(2tj*An&M zFYzQDqpheM@*l66xO{IS+{Q$bEiX36+?ZB;EQ;~pSDO9M#3DCl@4zL2S6OE1hMIPZLa`wO!ld2$bk>#7jb6#inR*x@VW86Buhsp-OeHIb=doiz4Ei zS<1{^88M8VLy?DmLb3D3h4QsCfY6nG4HX6ABmM7Fo=*xxDe~Rr&i5Ow=DBZ$E39JDdKV3I1)NFNK#+;SYl{1VA}@H`o&nc`_p<HT2E9pR}sN0xu=Mq^VMUvsMh{ zq3+PaKUE=QdGt~pO`f7Kf28Bojd@Y{Ns6??Z9aI&EPP8{NagfoMZ^1(K_lKzHqC^G ze_@ZN_7{*^41#N$;G&BFMh*Lrm2ima30`S!C)r?l+Rv?z#hwttgPztN+v(JPiaS^D#Dl`f(F#}?)HFE%{lS-+DNPH%4<@tM zauO8wgvWDhx@NZB$#Qy(d)bU55*2m2?4P}Hgc}?XtX6i&mc>kP&uvFZs1VP}nGkMs z?o^V{;5lfeWb7HNY#6IUl{{mS8-eaAC*j(teL+A?vqEq!r$TV54p+jvOV=LFY;x5Z z%%5jW>DgZ?EjP$!waT{093B3=Nk&oy@6WyZCjqGJ-QIm7*X3dM0Q@kj(M-G{Hj*9A zUm;4juGPc%k^85@%j$U!3-?Dqfi*n^dD)%LfATJT)Ef?>;yT8NA>d$5g4Qjwvqvlm zCU!7C_j4qQXVx`i9W7<$O}6q9stktU%@BbW`tPaTfTIoBS% zG5HbF2nvm`N)yYeM2v+P%GjVKc~lvZY%A6FrI}$JYhJQqIO5benzED_5aNbbo`;*Q zci@M$+^gO7{}rbwc+CNU+ly{ zdihN>UgpjqmH`!1t7N*INgipjHv?5{jg@s&ya#2hOv{WfQNucIQsrK5MEURcg6 zH1u&#Gp259d%c1_=~pAB93ciJe{ybBsH{dkV8sdlp_4^_{fpIy&{b?p_7(1aP5^yJ z>C3O!Ekq254DRCS#_0pg4VPNs@04dIIcrBkcwNU^v)*L;?w2tOUfnap`Y*^*X%a@D z)*%G_AjC1=B>XLp=BxO7eas$?`3F9NC|#t+xMmaK%`P5_N{ep9%ANW0Ou1q&OgeI> zr(zqrhiZi2e~+k~RNaDi(M7A5bo1@P7jf+y9YOFz2O+tI-IZdy6tZYu8Na!9gdbVw z&u7=r)gH7z{Yy?UqT-MRD`Bfebi2tN zko{i7I2g~hmE#*BdL~M@Y9qjJyj|lNa$GR52DuFUI!Tq>!4_p?fYD;Upn@^Q9%|XW z8x6996VUjZ+8+^jf#ffreeLWpvHjL6z0V>oEpI)c@|(jo>zOs{7$vXeAvnn9y4kIf z`s1_@l}CycN9@$$Pc^9&+l<^8}VFI8}h-|FZ1{wnoQ0av={$pO-udAg|J#l z+y!%@ZvO>q7aggl{#HkpH}xG0RREO>5OvgdUTE(oHRFL7e{JZUgAT!)f{R$l2h%2K zedM(x;A(|`KmQZ)hOQi)XcjS4rJ_1(j{{JL*gg;VCuHz8%>a`sww5`a;bew+apvze zOrbPsL0PzBaRF?rydiecC1Yb+W~d*uW}#YOerbS5ZjhrE>$jIva)zRcn4NA zaA{P^_CPN-kob9(uma8RnCk&77;n|P8L6DX^&kTAD#nxSo@&*PnXrl{@jF$mjI6{M z=*-=!Xy*|>rctWxJRQ#J`;5)8V(8TPSt@>1V$-8G$`Nb;G0asWM-zE5-RXXpZIFi& z9e~|o&@wBc(~ETc`fu?;kBOV|qC_RkaaW=FFRy;AmiCIxiw-sdqh+DsE zkJrMJa_QlYke%;I0Hsz!O`-{R{R!>n5qv!(s~)JwEh=4&91&!jl629pbU70ehW!s_ z1M*SEGis(K0=~K z?UJCvZ}OKlZP;P3m)S3^cSgYl6IUEk^+s=~*+O}BNWCUt^4Hjsf`VvOiBtaZYEW zWh!9&lmA@6zx&gj_);pk`nr1@rAQKQNpt8nU_r-|$DP^49e>0{W126$NhgA5 zkhBWk0g^pQ00SW|j|Xq2yJ?Noarb0lTB^3)iP6_z-oHLwduKjd>z){I+Blm8msa+; zO)UEw-~~3mCp101y|sv(_uiGWNCVPoU<66zxVgRIP6btnpIbA$`6rti$=jiLI{MiF zbZ2nyPJ>|m*(l}vj9eO59R+lObVw!`F zNLHnDdBWK(e^%W}RKI%J%hgjCNwmehwHppfT?0H$#HiPA=;0XCYBwdAH(_I%|&>FA>AO|UE90o^Zo_Dxc8oO?)k>KC{R3%!$dZ~n;HDw$wtKGb@)dN4NbNJ zRaZ1%kgKlQ4j$u0I(r}cBG{T1Z1j~nMt`)ICL>LUNW#=TkH74?)5^kPHp#D@Hl^GC zk>}2OiUIyWO3GebS`h)btFSr-fV5u>%UDhm%t;m6Hj-8gcz3lke-it~pXP1G1Wzz! zJtA@RW1;&2YiTsj>(A@h79Ue4eqFN~`C<;jVn8!~ZP7s>;AxTgr5S%WfIV5W^HCxP zZ(T>|2fh1y(=gp>l>J}RTPO4rs?yWVpw9-b#RZ1qm`D&SD!zg#rc;*CoL-076vX9} zpZ}>VW$65nU{k&MwncD#GetPx6*hWC8BNBu!TpiF#Vh~MCldJmMPY@f`y-G2&af_l z=6^0P8F$}0LHSnpO8rIOAq%+OfeWX;;33`5q6Z)>_@L(Lw6ko6)L35=%T-w3dSR&H ze(ffU_`e479rCTI@!@tNGJRCJu6N^Yx`cW@#j-!Z z*CPGo_Shx3km5Lr2ylWl-5DT}ky?wV7a2P47I-8G5_}Y&{SWxN1@D@Mfe3JaTuQlm zH@!^ryX_Lz;GZJNQK`_pk5hFAiVQOsaICvk^ooBQ^Lm4<*^xn=??xSGmNeP%7d;rp?*a-Py6XK+i_XSE@OQL+#c zFPEwb$y4;@uTZQL6jYyy5ytv**itrlC+5MNuUZ-SE%&`Ab~L13nfVc&u~&DftM%>L zj8`)*K*w8Z)gc-3j+osxB@*N6oZ2JyO>TZ!rAnnN_C@PmMUZsOTAt&zf2!zPC63DO zg30TG$~8)Z!<6lpD_aMzCROd(giEpDs2}pi0vXwE{-QOPDQgPv45n&(agp~il4~d3 z*y@&{vQ+U2b+@3FcPrX09Wl>hOIdtJ!v2MNPV!#-k-F$GZM*p6YP}JB+%YVzh&rJC z*pHU-c>fo#=OZ>x!bWgheySN~^uAI_wX7yjmnTs9r6eS)$=P`y;e(F^=HzE&10$ke zti3{cVnXvAr5YXvh~mR=^7?DW`Ox`h25$LCAr7l#8D(?)VStg>;-}d!(5D{Nqw&(P z5B}~W(tYWv7QBWxBQXLAoa11MS7LVo7Npml@m|MK(F zkji=E9G|wart95Ne0B-smS=PUFe}q)?snVhc0L#o>#al!Lk@<71GJ#CLrH!)%_ zLGeHvjJhF|xAJTRkOHFmhj0GX7$74U-VA7_g?(I%K0Y63TK!<|F6wod;R%Ru*s6K1 z;8)}Y#9)U#^SPM1rn-J$26fa1cOPs-YviYNre{UY)OIO{|Iv{Q> ze~?wK$|LC`#DUAPmawF|3r3-JB@~V<5Y&WMQa`9*K04uJdNrPF5lz_MPZ4&L|2U>G? zCfDZU4gRfE_9M9l?wTSEiGPD2EY_RSdPHo=ypO~g?zi0jLy2x4cmXRv389_?#QM+3 z0eHAGAn_;1!+-&Hyld~gbdjud!nyd)993F?=%*plF}1bJg;TR@#SvuXzZ*7#s1A2} z_H~6v@@C>~ke=)HfM={=z87m+HnQA{*ra@G_aIN8Z(ZmXbr0LKR6SaNN`+U=q0JlN zKkm(#JHf$cT+$v)EB0)Z5W4vtgMoUlVs}LKanJcL~3^*~mR1m`o z)iJOYb9}g@tpM#q1ouB>?gr_B0T@AsJn}T1UerGa(KAf*qs;h9f-3Z-No2+0X$*92 zZ*>45^8{!5vjm(!S_0>dPDi5OK%6mPhbU9@v#U~z-}`%gfd!1mfo+Bu1mo$71i`bk zs-N)KCDR~!jsJ_-`9m6*4*P7xGoxh_A?!s_Uv0mX#fn={E5+BB>Y_l&(E`67*|o$S zHG`^~ko;GMH-zM+PVWf{5{D;;*0$*uKk;&+-bK8at94fuogbs1nq#NPV-8i9O%Ypu89j`okz8thusP*5V+LJDu)Ug;fb`J_^{8h ze7J=1hd{JaT6sRlVVw^U=|Armf_NggX<`)YIu@5CY2gi+4}vd$T2_nB89V}wy~!W~ zy(px!#eb|Ob69T=$l!0O@BWA$dUBsj3E>TkSL`gv0JZCKa!C8DOD$)kj+f8-uDUTI zK3F_&MZq`uZO6h&EOnkAx>)eyR{oE2Qs+PKp5wY0k=F70t2M-yqXYo}2sjqEy)W{K z#PQ8&le@u#{!KF>oKImcn3EPXzC+^Q%LiV$ITVLP;UMX=?n#jQN#@1!QUhuk!WsOe zESbiyDbgdDBzKa%Bdt@bCn9t*r6p$lB=B>D3SW2hGY$YctN=nD zm<+Uta{1cE&xv`kCx|`S6J#%=#KICUfKm4k%`f}SChI1!&fey|{7!20&YZ)`c@IMA zulvo#FlCv#9_5I3bG);{Y5|Tt!hgj`jv1O>hgk+UrK8_NE=(NC@seLoOQh#+ON=AQ z9y)1O`F^(ul(rvH$NSW4y#4`R7I>6TrY_27s{DJSRA_CyUX9vBY*ges_Y4j2iF}86 zuZ6X(YBUwC?#8vGwim#J?gtvfW)IFyq1#7veEmi0kX2b-H}vyiSzv?#JxlOxtlNqx ze}O^)1!~5iSfVGfu#i^~-adC>Q_@l=D}9iPJGzn=<^wZ4C?VxGU<>w`>BG_A7D^6T_{A*w09V!LjA!ZrA{E$(0DKT`NHYBcyyKS{9u z-oB<;=3t-*cBbR=N=m92!P>uC(WS~JM9(2^IKHTCsMC6Zh89j(94`GD0UsF2y2g)H zSgB!%|M69hf2hkJ3{&w>!+3*()Z}U-0>cqBw3+OiGF`ziH&!upTneQe>Z>7bMY22h z4^>kLcsV6UF-H5yQHDaAaweCf=u=9a!Ej73jZ4}>4(BH6FFmmRRN2#&?}g8zp}Ur( zD{%2jBZd83`9T6U-Th^yfntSScCZJ=3K>-W9w8_U^rdC1O+*zoBg6WM%slzq=kNi3 zwBY-mVLP^*EImy_P2IUdqdbBCDwMm^QD@Yqj$eT3f+<=#ZODz|h24Yd?5?Rp$rBNj z`dgsX?SVo``y~E5T`iLh{zM;NFRNcOl`g+ZZ2>iykf{SNFK`>cdE5bL@5txzY;=;o zarMVX&HSu!St7NCpN2xO*wU%X!(${Yyq6H)8H?g!mcwGi{jX2E$pu)@i19$KP^xP> zIlw5!0S_1r3&^G&=bk0~#!>ZMXBXk*;M8pDZ!>xdVG%F54*q*@c zFE2o88O*W`xXm{&(%5R5+c#D(v;R1C+yA2jS7X}Cco^-iAZSC2@7H|tz;zv4qU+he z5w}fR5oe=RVF#U-wD-;{Po4kkMT=d_a<#S}ro<29supv@TS~1X#{OG46s!r5Q2=4x}>CjzpUYLz5eR^^_)_~!MRsxwZP(8t; zF)Tk!Ro==|k*5$7Dt((LO@MI#|ICOUPidoIeW!8=DB+>yy$#5Q$H~*!r;1AM8{cK| zuPa;<2sZ;v$di8!1gco1!U$Jl-0L8%cyr5JXx4lI@L^` zuo{)6)hCtXgDb6ulN&B9XZm9xG0v0UHQWN(RPFtT!-AyOEci|CoT8kQsM;195e(N$ zd`wU>4*c+V(}z|~C8ZbUhf<>lBf(S&~dn(h<#Kd z6$$|`GkaD(;xmE)7=emp<+jfAiTPvQa-M*myrORCYJvQmz zkECnSwCpef^a|Ia4bhGh^w+@fXLMqSd@XUgb4+%@pLm(HXX@!h0IN;IF$18g6F_gZ z_LPFDTvkQW>p8cm)v)*>qV*$M2?Nvb@^NpbAQ_n-`;<|H`+@=fjk&OSw=83Q5E~Qe z`emNS8x8^<(IXC+i@db`QP;Q9x%~;}_Uj6PZZL<4QcRV@W*BRfpE(DW-#J0bm6>`^ z=u&~Gtocf)) z!H7Oj>z7_mF9`-u*L&8@pH5bHe!z>Qcq;iWNEbe|yDNVQOiF(|b8f*x$GPC{?xmAh z(KNIY%rf_z_Yi&ZWg_Aux@Olm(hScMpt;F*NQ?|N)Vttg`8yx|M9~=h_zf)>za%`s zs>1P%1lD3BBUA_93}e%Ld=em#w_SGgu7f1~i+Mo2~l<6*Qs)bO`ZlXwG8Ulxz*k-VY=^*&I+I0L~Nd0Jc2_(vdRwI6#+iTHyuU)Q!A=k)w0+sBc z$c~-nrKcbqq?f#NkiJexZihnRQ&Lri&YVgz~C~bSE(|z(!q3XD7F-wcpE9 z&gNoWEjbHve=<>07&1{etGzQ4U9q+U>Iz$7T38r9wWbl0dA53$>Ve-7OizSoL)}`_ z{*h$E;-4E^Anw2>TQmhIWSi!h0nRf7+XttDYIV2^p2a76`t?9uL5v}nRY}_rvKLYd zu4uoVstCpS(1zqXZ)jY7=+M@6~o>&R~@GN4R5f5ulEfu z` zva5U-oDkeq`1V!CtB+lG%V<=k&xL)8);k|2=wdb3ApsDKgz+4e1hw*A0(-PhOv9IT zTNpNNp!Un!P2}3s_hjgmIe5X8O4^hi;Zd78;`~UfVB9NaSZRwALiaYrbP0IW_t9TRJP|t& znVT+XrIc^6Iegr`*G{&7VM^kCRh{q1p7!0cjx%qt)_y8aKVa(=cQVrWUj6G@P@*XT ziAg)$-;e2RAdcyz1;79q$FcfB&8KDIG`U;QO|v!c(%$M(?INn1M7Evj@4uZX%3G5u z_SL^8qVCJ48K`A5h!LQWR7;PfS{9}j$or?jgQq21BAwb0SdPb=vqKCO&}4!gq;wnr z!v`EXU0!9hFKW45NqeEuoeKz#=6*bX&g-Va;8(qq(|c9y0FW$gBxPs-Wt{K3N0}W^ zBgbt~7y2wH%3ZNt+Z4nW`CQ47Iq_x}EmNx&ECI>C_r2Wz!u4wXy%dhd60#B&`{@_2 zS6U*(qNo1Ze|srx<6j9vwli||{(i6PTGg=X3TWxNYVM=UX%eJGx5QO;)Rj(F8JM_e zv5DVLRqAq*(a|=$=g_djkr;jq9nR$+e0je1t|75AhT&@26RlQT8}?~^YZlRARU%Em zZ61mfoSO!Ns5{dF3+~*VdpigL z+#oqiS1gs#`|@csZ!uv?bsyV``)}Iv4Yp42=>Sn}F!DpX0%lP!bav(kKGX(?SYDsf zPpr0J#SBX|FzcV3hicHj_L;{rR>RAnVOVhSa5c)(W!nfjttRm{!G(4&z3(t`== zq!a|K{TGECm-ww@v$;NX%Pg;-hqtHNppIE(^y$$Tj_HdR08Kxl09^c5itGjvtf8w< zyf|ed$CJsCA!}VUF==<6mVeTegpI@_+b9*ETg%y>3sP^BCpi}6vB1_|TVNLjxGSA~ z;(h7Ql4xRK=C>GeT7;{Rl)f_Xe%+8~FES-9nYFu72MFIX)yQY=vO9d6(S6KS8^eX^dUL(n&A#y;z56(v0k2IB7WkdEb%_ zf40XC2`@)L;fWX9&ob|df~2Y11j=vsjhJj(X1e`_ny>v_pvZp$$-%lZ2iRF{`8OB0 zUcKXY=M4yIg1DV*x$vvN&v!pLdE2f<&qDxeZ&M@gj@sML9a;(PKKA@IH#t3;dpB$1 zrYK#oZTaO=Z-+rP<{g+n<0IN6)BXy5=^pX&p@RmDv7D_UCyA;$g9GV3H^7f!uJ%M9 z0=Uj!1h7G%vk5Vic&==(0QuqBRFoud)$9tqiHvbHuPM27S`N3)tqx+YYZlfG5OsoM zKx$2&P%sZEPwDv|I{=R46(8aSZ1_{e9YK>6!s=eU`2yAG~fY?2<&9+ywVzajRK3` z_?$U@&*cAE{O<^`Pm|-GHvSR+L`kTnDh6~^+6k)&q#xX5{rm2=EvJ-F|zNjwCL(_ofur7owvKVCiT@n4O(eS zRy-n%{#tY^fK-7J3~5*rV4<9ef%1quQwS{ zt7b~kf{L0R4yn%g_|Ug+XY3X|SRBNR`C1EOVz)Sa{a;9_W^dAm#dL{2#{;j zW3-23PI|Yq|9e{Gv!{2N&FG9fT>&qnp{x%hAQ|P@D#8TTTwPjz#?qI(6vMtW&JTlk zC{w)ty-6iX$WxnaGrVs}(OSB(<6IDiFH}0S8bPaUuU`snHe0-r@Sa_p_mw%!Zu%8@ zUcJ5p$DRm&&2XCEOD_&zPu{8mPTrlm0Ip0;0HJ^}e?B1@ZY$h~dGY%lp6Gi!zp8WgZ!A=yf z09hJ5(C|5}rhQbV8<%R$X|Qs--EZb=j;umaZJ*JA`|c9cEIxlwPO=}dvEt0u)L330 zpmgE<&CBC+Jjb6*uP*250k#}%5`bbwq!mDdm5&lO^@pW`LTWkf=_(~!U&^yMpY8F0 z&sq|~Q8Z5&@nazUzd10DZ~cH^4!%UH7iWHdMnd}~uM!;JiV=2@sJBqEs`;geK=XnRo<8f;kJ zeg#TQsg-btlc;^o{uG+jOZenRxU8~KM;5Eg2OU=(hl2z_l|%;^GQjl6j1gN&t7Qi> zR`Y4Ttr6!5W%7pK$wyK&Y|44c#K}Rt`h*$LVKRBltr?O3{}9;U4SxRTmvlw|WVEBi z>ktw&8uPH!vhueJ@b+XAK-*YZKHmxb zQMyV!1trlx#W9=xXHy+8Eq?ix5B)1)Q3CN=bUN#yn|LS-M+XjKTuojZ2CEwdR=EEh z$GdqY%p#r6x`=iD5W%IHwW7;eW;T1LV(x8-3Js^+oZ$=TQ}bg!g+8=QHXKYz&ayOE z3H}-EWz#Z*;loUd`WU5Kc8b;uHctkg~>mZR|iIj{!py(`*V2gzh{KJ;^ zQa+cvopz$n>00h3H{wa^dyUk`pOt=pJVNe_>cW=!Fh*JRniuXYHQQ@@ zOrqCJP3V?W1J8XCmC;2s&qo(dB53ioAfO4I@~ud|gC6X|%fvq(j2^4GXT<6$Ryp4G z%Q7itOMYK!)~MW^qdlDZ)X(8a6&CyK+%7Nb5GE|GO$DDS9WJcU)IXv9C)zY5!qGSW zY5F%o(R|;uMUfIU4#?A{LZzr9vSUsDEM zjTAH^{Zve~`87#-%k67w97c$nGu9fU;&6z-C8Mn-@~J(3X)I@(wbD&-P^m)G z58@8w7HV+r-y!<1cM0JYBt#dfCJ6Wym}nTD?E?^elvqFnoqHQ}W=!7QxpOHK%d>Ku z5VIyFL{RYX#!-^5hc&lisIRtE@(iR&0<{PYYi!}Ld%xngH*LMXksG1g8!nL801zOn zNJ>V;w|OoFx)zox|KPB;rqJB%e|l!eiOZYwgBWUjC7m#@c?EeUzgl}6)C%wg=TJiA zsLT9T11FebXX?zn|Caa_HEw?k)<`8{>j>fc>f*S#lZAC0#y=Qrbm}R!e2yJ402fiZaR0$` zdp5)1kWyd^rMx2shz-c2V;}fRzH5$9Z?4~W0HUy+>KCr~z137la%V$kF~uyNGU(xRT|U(kPR(w_zQ#)A0^Soz zpBi--2V9a{O6cq9i*mPipXc;T=ay$Ax=@M4%T5>U@j5H*Y2JZLyOo$hCKfDvUo zLh5o{YP>YT#ghXF-&3@#<_OGK_ z%d)Cu>Tdec8WPRdsIHHk=CK9|z}WHi=r1~1<;7VPBZD}U_#;r)<9=dsFYD2V2SOUS z>nF^uv8^AE3#oaRv{Zpo(xpZGh*NPf^zi-L>NoLY+o5n;pQ4FWgo#=H^HgBzfb>pf zyPn7jnw9u;rJYF-s_ zN$t$H-hvIyTM91I3nMLmFK^*5Q4AcC*WEADfMQpsGR0G-df{qr6ox~YoNbuyA)Z88 zO<^lC>Yz990h!|1Cta;mAXbZt ztgs}q{afV=*rYCNOZTQ}T~?9;O~Y0z3?Ej#{OHaeha7BX%Xv|kAn+0F%)L0uJNge= zBuI%1#t#mB&7ZAo?V}tSXwFw+79J3GsC(BsC%=)0Hmpet(RE_z?j;v*2(>dsw6lr3 z?%%0Q?-=q-o2inMUDqa z_lOZ=?)LS+Mi#jF^5GX(GG8^MJGPV&9C64v|1C9ngXU zR?Qb}BV{T}rU#n?%pW>jY<5V5NQL)*`1-uJ@~y|bCMZtBc-dn;CZ;nj>YYj7joeE;3JriGgCwy?A zJBj4k)l_s>_0|{db2PfgLw#7p9ix^PBwu+Zs0uP8sKZRlZxw{)U#vzM1g{H%Om^gk zMZah4>VNEW#Z|QeShqBN!Wf=d=Jh|MkSd)_P!65^a7Awdkye-%_h%773X_gYM~WaH zAgV2S1nRq$Inr@e&%g^KjOjJCMQuUt%r*pwqXxSF=HYhLR3KjM-GXE_C2iRAPMMy= zFSgW^iPPRW8+<}^W+#g1cmIi`;4w_6$eLQl9p?yp2KX4T|6Cqs>-gn@Nx)~Su&9b6 z^DeAb)g14z9V@<=y`Ex`t986X5MVa-MZ-d+xwHa*kD~QYE7ojP&Gju8k0+q3hHp~SZ@{k z?a8VDAA#cc)t_6zjVvR)4US?xIg z4V4{nwDO=8)-{7+D8?phM6D(EM7TMJl1eBF`2B7(8{!T>ME`3{D`8l5T>M=mAaS~yB@5ZlE9LlQKvANFz$1i5+L=zBiBpH-fIasnzU>xE4 zux^N8M-x+h3#S|Hq1MaIsYm_RM@6gfn>HN>k8NAaOuN^3X8h3lUlmO2 z1AXdhY)gP?|D+%)J0JFrzTjWhoBlpX;U6OXY{;L*$Q1iwv&663tPhjBnyXijt<&!e z_z7NU<}s34R4dCM@)Ym)lU?^pDuU~sd?ii|%AIC+k8b#KsTl?(T6Zf@7XNNdty*hR zIPN&4GpVy-d77asEXwr>U7pKsx_an;2r^yxwQOvh3Ni8o{LbNG+Mc8j4<^e<0!1Ed20QWqREiNID*spl^F zax>0VUQ2<&`dn$@%9F7IJ&D&{dN1zhqE%Ou7o{V(+JlV(%jW?^P%&KngSb2KojX%J zt@f*FeO&LIqVB*x5)!=QFu?K~m#WB2&*k>hzT@#A2ydeFrW|KjBQ9ggG8YOuRFS2J zJCw`8>~)iDYMuAh>22h@{;&U`@>()mx)7I7KcYY6QT$jd!hwb}WtcSmS)=Q(c7d_q zf7l6cFbGk-Vec{ZXF_5r{#r9GlKXr{_KSdEzO3Ug%KYDI<{!MbV^&y}6qbPdCzJX$ zAHM3IhN-siAZ~6-2^$`00EyDk%kct8!Q_*{FPq&2i3q}9Kc~>Yy@IEk3VULTddMp` z9!ufHiX^;#Yzg=ee$!xF_5~PmH|LO9jUD44`OyE4q+|VWL`I0oLdh`%c?d+h%&f}h zrHB0|%&~#R3?_WDq_!(J?HjsAq5gRVn;N$>H``cE8~9-}Np^i^>!c6pO}4x0JA0Rb zSATFDHg+@jr)y-h5B>W%}o;`?J3oIBt=JUkIG z;o`^tqyZHzbEDx$3mnYv%f!Tbq!EHc>d0gm9DC}(s_qAJe=6WXaA4OZ7k*UZ$a&5nNUiJ7gThg~~L}m{&m#f2R>vv{^TXhpp zAD4ZPYD#o;bU40sMS-pgtpbRfT?O4>ES}{3y*B{(oY3v@1x0j@1}N8eZV~_d9qZ`bIRP z@~XV~s?}qn;z-hM81|#jWoT~w!A&)s$ zdORJQf9};&*Mvw%fX!17jo8 z`vylUW7{od)L%Qd4(-T$W#YvWaYRwU_^F%42#>~%?kr`&`5O4i#0*m%R-!cGhdsh; zv)$xMQ$*s;Qmpu3c1q_v<>_u618b`=ws<*9^_HMyl_C1?jo36QygSz2GFQdF4Zoe9 zWg{x%@sFWTepZcX;Ww+^ys~@x@3Fck_S&%wkFAo1bE8gGc~xbIt3jGI77T#&rFId! zDsYlqy|N$}t?)8H8e+9Wpc!<3_-Xn?D__@jY$mkuV*5YHFbvG7?zZo(!`%m3_sqK9y7dY;XrS3rwEWYJs~C$@{A(qRYK`G z*38{aEpth_@2Wn&zzqp~3E(MP?RE?Hxk$m=Cnx;UJ`}?vJaz0ZYjV=-Az*?7=u`A7 zxbOOLs^$4Mvd*0t>^wDg{mqQW_hiAeb#mhFXbtLWH#_;by`Vgv-CmP0l59m|7DQ-` zbx1#bSts3Ex1N`szUWh5@RrOHuSG*=4=!Iev>BB3wF!l{8KY~dW)Y$h4~mLgQuK-C zcT6(8A^D_>@>?oAl>YgoFO{=BGKUCK_QPu9-B3)`IyO5g8()&@?&Hu6VY?>wW!EuH zJAZc1TZ6k0Cj#d1C5Sf}+_Ub=Fqt5sl`QtO-!3mbAazt|7!>iY2tE)Q%_Fizvaa=6 zLht6oXm|5y7@8`qEBZ2mYDM_!P7|b<^q0vz5>Q@!kj}Sf-+HDsA&%O{jS!Qvusm|PWG7Xi8P@$-&GOhxL;D@i2LyM^H)+Fh# z7n)Z#Jk*;u8Fq}u?r*sOx^W+>PxJOM9{zw~yzdITxmLuF(u+Hlqbnb`mNYX67V;6@ z%Tap0uY9*p9(CuU25?0$H|E*o^=fWXuMMA|9wtux`jK)s+2qk_=BTLCU%g zQhS*JB{erbcdDLhm*Srn;{8|L?X|@>o88RBZ0aKZa2y3+PPEm(!oyLTAKKE|@F?n6 z`7Fr4EWVoXvRgA+P{nop9M2Yn$~SZS z%lB^oOo({+{nFHUOaU&4{a_oq{>y}uX{@?BE)T+U!_EPjlN~b6 z-fO*!dd&d_3GJ@-tdkEvPOE221%}21qzt|Z@_5&q5=g(_92GN*BEqJd2Gj)qdazj} zeXH`h`}aNKs4nB+CbzfcG~y(mjGfpPWEl{00%}RJihoWtHD2t;v})-XnZ}sqfzHk< zL7!TzQw1x`JCT3&HCgIk3n`hz3T?_?#F*4tX{!C zSw;&ryOr}MlZn=Sx3bT@=HWp&##i!J7I~zE6tFzh<+Jmg2QvJrmZkcuUm5g%KV-1T zGpoXHqbX{u&6y(-XvLOuO|S&8bxeMG6H)37My{<74-s}SCSnE*ipmJODDn2{&4dPR zqvpM9{zzJc&4Nov$-xoP9e;LDn!V1Y90X8Lj7q{QQ!C_|3-KDUT2*d1bom#yt#P9$ zFG6(VL@s~b4pR4-I*n?JkIee8+@FEjWJJvxhk0@)C5DQaSE2ws?EK`)+^$^p^Q?BJ zpMHn`PDZ;r%Wd_?=ysE2OY7dO8P;Fj|5AeGKw5%cbIH!_pC)PC4kn00_*Y@08;Zsd zj??Rypc|?e70fa%O7FUX7imACLG^|M#;A$bRfLq=?E)HhRbDx)iAnB0=CoK;&jul7 zocR17SofW0wbOX((CxC^DjQL_8Re?sOs7~_)Kdp7>(Sy_FZ`am zRQi9f67lxb9 zhigVPqt{<%t$Psan;!uO9y{EU*`^XrJnWK`;dg+MH*qJ_U9Khbu`4Zr)M$f_`Z|m} zXGzRzD6!}lDTV2|YH0@HQP~rs_IY0kdakdw_lkYo-M`f6*b9EB2za~RSBB(Ky)&>n zb_L{ppkls-pZB6DTXD8Y829f0WysfSGak*gSnqU85VuQsx=kbggryg@>1xrxga%f=K-hnzVhjO*_^1I%F7jg(b2F^gKg3IdbSIFHW`H)hGv%CgmtdSHLqB;f`(HWV*;+}taZ$ai^$6vg z*J>RpGhVIlIyo-vX05+pcajkNMXZx5_k?az`oxf$0m@$cJ>@RUTxY{LN>YY^4v_h^9eOqzcW%EvNXSEjNd$&W1*r1kbCT)u&u_MC_mOTj-=dHrF0F2tnkPh%(kueP%e2y? z>c21Su2*qCCNI=5 zGk9bK6)ILtB{x&Z#)|nii&}^PPCb8G8T1{$8zLLhCdQk1o&S~!m`?=Dy`&LG>T;h} z7pG0`60T2YBgQoKa9tm8-O=XUDxoLt=!br3m0;Fqbb-^|9u6hu&l)MsaOQL>Oddip zb#BGxOF;9s3+}l$*R{w&!!b!1dFz=hw%kBn@BT&(f4{A@;#um4Ap)VT@RHIs+0M48 z#5(GJf?fqqA|;A!RCR3rP|UZydx9P-=KT9)3WePy$W8n>VfE=SV7o0_Y``?}b$5mD zGkbP0DP&n?SB!4<_eX=5?pS!Biibl1zZ^Qxi_qn261_GnfrE~!y9zdd3TZ-ryqqcx zVRhq?%n3dXXe}L&^)*B1o^?y@RAnp;5H{m;)Ov+lIJS4eQuiSW6an=diJhI2!0R8* zOQ+TiTzFDD{KdBL*LL?97P;z+B9vsAGg2vp{pfrN9O*tK}y>%?MScmUHyiCxRPPh{B+XXkTgu3zSou97EV{>Uw60Au!beI6R|6YtN@(10J} z#r-}mbXUt!pCBY^Uq~LBU3`(ILYwH~&75tObXFpav(8lTSS%~H>`G87Z-nx!M%g`G z`#cF!@muX9sWuN_XWwp!@eRh!0y|Das2~~*OU%w>&U^#r= z&{;3e7e%%*DnG+#MkPQRC`uSU*_pm5L_ZN7o>^(eM>o)_`*X?u;)Y3bl|EY%hWeT< zO&1gYT1VY>FwRmDb9$9mLuz-GmuyYkL;bur6=qx4NEC1Ejz2(Uy#aLmF3z)i=@1c0 zlkY;6PdQHN!(^^+TcWlgwd@H27GH2zbP?mJjI0#U!Jk#7mlq3&Mzh4;<41B>WwsxK z&aezpc#VB7exRNwQAiwn_l=m|~ec`ZRwevO#GgsOIDn_p0%_{#F z#(s#%2o?aF8NG1D0fg8!qEUD47A@Xtl1$JhXWV_PjQ05|t6@_;$+GlcUlV!!uIDPx zr&(+G^p}!0f3aJnYPSU7#inA|Jd&wc##+ z{FQ;&A}bmpoU~__ks-2N(h7h(HEjy1evL*UC3!`|TN*S~=-SdNgDXTEeuvd<;}y?VeBn6&lN z-ruV%DStW?ru1E~-Q3_bko1K#iT%o)m|Cj+)+*+tVY7GsvN^9ZFzH=2*TF&VxP2Jm zSHOGj*73jg6$FN&K5b22qc^(@&8^ZWcXvJ_8wY>Nq2ZjgkCUGhDtCrxz-=LxqP9VB z-^~+8Uvo(THtMwIY#Z>u%ks^%Xl`?@_ zX=}hr2G|Ab7vYSxKB2i5ow^@nKckt?X{qIAPbcf<6jS6JF1?p&VgjZ&>4Y7aE zqNs92sq0~=GBl-dM!qqV*(CX<-7%aF;YrQAf9@~ z`+wY$bb7}H0Gx3mB=qf{5aIIoCyGTxLuL5g0B8~UDlyV3rW5*PKr+C>;cw|pRnpz( z-iWCzA9g9b1spQ~KT!g!>TOZ-MI|-`RH;W|fE?Oc3(E6=|M|dB@Ht&;$bKm}4_NO( zOUlG_V1+%0yIfwRt>Dh`t9D$#)?D#titw(wF3vmux_sr5`B`o#Aj2P>2QpdnAz9jGLQI3~7#xD+1ybEXG51Rd}gXG$`4&!^I~0 zf;9ZjW_-iQwDW64Br2~wiq2X;6;Fg(*c^&Z?JK$Y9xixn~-!5oajrfZ2S6h$60>F%{%p>2=yXm*Dq$^GmF6PdVHu6j67+fgw( zw8TQCe3=421g(+s*2?9QJ{K34>wzUi{O<~`@5mGF-g}tT#t@kl*@mb~H|y}SCYyYBzuvRFAWSxYEvq?hR+1$sVLIqQ^B2G^g{W`7BWfuX z;Wz<_!mp+fY|5toyyTs4c`iHk#NP|>0J=pLm$4{`7iaY3F+(}ZNH+EMgbwkX0g3^+ zg|~+}+=2CRAa(&_MUIJjEVL=AW(OQu~@3BcSlTjr~C3)xXS+~Vl_BOeaApq4B6Fm&TCGk z2~0@dK%e=dTTei+@144`Gsd}ggZDlYrTg=kSxgi!4pt{1zNq%#7muv}^ApGiMhR?D`t}%_ ziW7t`PK*j8t{6~#`j*MvyA-{?8^2+d{pc$U)JK{eEwE_YzA~czT3I6 z{mbJ@YbyRVO?jlmGHz%vp6Ro`1E613?|UV0Pnh3dOUF>@#H^xs028r4A02(&_5UU? zRi3`g;4LsyD(sHdaz*-%PjAKl$nl*B*~qVuPR>HcJ@u4FKUW+HdQkxJG)L!!@m5}W zYspnT@``P)c)R(&^&AG^hsm3oQ+-Es!|$r@8~k@yxoDMp->bOgZPi%5ki9Ap>Z=|AusgMP`n2ectZQa#d`neB-;O+yhRude#+L2 z({}?PKeAFvA1gl?1zVYN3jt7Sgd;yI$q?XD;UX^)$bR~$0sx>Q4^aWwn8=?i&*^&r z0R4@Xq~vE=Ny(R=ogFN!Y|Q}x!RKM>YYt0lBw~>cD!<4;FSTSMzV}qAtLipWQ&se0 z$|e<_$dMHu%(K4P78Zysp~hM|Xe?Fs2@=43L=j&=Bl-k!#(=rppeLI1+|NUT}7h-i#h?(0<1rI!QQvQi3tGdq*u#M7~yr*pt%wQQqQz8J@Oj zlqYG&dbqV}!d$+jIiKQ3M=e85_51n4bE1z~ROuB6Cw83mh_nJ5j0ptKTW~cQ8=_J4 zCvB+PQ~!N!kx*BWXzV<;!4>D!^bSG9ndx?QtRJHF@UyVl^bb+wDjQ6#EfO@>a7A-2 zUu{^`ENdKqaT|9(>5J+~|K+MA(a&{tPsY%&f@BqQ6~kx3u^3PB!P@Pe4-G}l#5Lnl zT0eu}oZHtIb-&01&opl9=S}w$e)p?dtsAd*$oZ9~8)i6Z?1ruk)#;=UqcX&qwHJ?U z2Vw<+>MOv%F-9hZ1>WbALFF}V>?=zo7ArHfzu>`n(nSp7`dRE+k~@FU4-x)#&!Ze7 zlk1&0U<#3n|v`oXJzu(6_dhi9t0NV+Qp<<(w|l_X)J)q?0@{ophU)D zGE*Wa^6PUp&yVg_X?`FhPk(4w*O2kM*UFPGY*)O5;3 zfm9bz9_dZ$j=8D7691|en9n@MmhTYmAjH6Rwi700o$`BoeF;`}QzH{r`V4&(_j~*8 z%jm)x)%{4^Q+P(TJlhq6^7uPm-4o)MSj3iY0+V9JHa4JRLf{}~%kAh%n~ja@qtj)~ zN|aq6f3vH$&MmavnC)D^C4=J<%d zKjs=?zHFKMEdL;>=0a6z6$_5<;2$3S8JP&u5nj@JJtOdf#?)D(y-M1P3(8_?7E$5G5lP~clUjM6xQ|M*3G?wPurLYs>0Q453~pJ zn=7tO6P|%L>SN3wMd$^n5S0Q{B8IOKWE19>AZ>t?r!6%bF;Z>dIDXQ00RZrj$9Tjj zfDB{_BY-&IpO=Ow%5f{sAN@J?J+D(A??l_76y%qKC~-$Sn^+{0w$B~&B?*aBnk1?s zMFwlB>NCq+%)cL0rm;xgD;9sRtdw&L@I|IjR5&vwc0N9>ZV7?y&M$rln$!_`iUpyp|7oi!^e}G+* zXqy1SLvyvf^S^jtlzx|&KK}tDN^fL-oRp2+Jyhct|AR|3inA zJS-@t5hbDbsq=sF{*gxLKZJ=F{r^al5`|^oc83g5Uv}*JyED1AJa!y(;EC*8(N=|R zCXy`GW)n^)q}u_4Gj%~hL2=9e4=3$eljhnmi1Vd5k{P&~#P*&nkoW$XOSjGg`g-r@ zdR7U4xM{y>dpKR1i?HJ#pc8!cZ}yqDt9O;miP%9z=i@mmH*3bCXE!AXyRNRTvqxxZ zJJ{vUi|t0xC-*IsBM^x9ua7BUtkQLa(9x&%jvTSQ2(;A4{yoCsZe-uMiO+Vx|0X7? z6U}{h%n!chH3$OH{CO+QEnxBri2OIajcdKHNSZ^+y&!b=4_0i)5nok|`~@AER)@S& zOR=Eu0rGC!&Mp7g@w*l9YObmY+7$%%W?ka&`p0C6^qtE{*4#M=+Vb45GL+egKzq1W zYt)^j>u&<2T%GUqekEczBsz~YJc7H@-5iPk9F4Q*7HCa#Bc;qo*8W=c(lvq{9qDBUYC;_0~d zQKo#!#c8b_w%gs^?bCi$$YocCk={=yDDgkjun*a_Hz)dONtf2q=YQ`W26y;Dw2E9j zdt7I|qP8GnHzwMi1Eij>?-U_NNKSNKljHU0DqwEKV+}sKvpMyTC4DjeujERd1bO{E z8gE;KkDChN3xYEks4zAYo*vV+n9Y_#FPEAI*RieHr-535;p#+ z6qu1so!|M}@pHcV<2AY_UHz&LiyzwRR#=g${&g>Nn^t|)yLm1#VOWpI;)%F?)&&&y zPq@!6##+bdv|Q;S9R zS5#FrB=HOfK`OnM4eNCtzQej3Vcn2X4Ikent#^$s*D%pqY z?mhu6mUeYEM2*TUjWMyYwnLf0>0Yiid!y8WJz^i4{g86pkEAa`$!9GlL?E^dNRe|>j zb*LI#`(IE;bTI)nCc?cXydHA@lvRJl(*W|^9~d-hH{FV^7cU1lxZfVmGNSd2SD-c8 z*f$+_q;A8x^|Na&7F)|4iK56_BJ`$%B>Q?BE0!j*=X`uhMYfKEwk`toT?lT%kH8#w zSbDYDdn))BC4ML+pFB3I_*LG>=A1EP=3BwVq-)TKdY! zeFzquD|D~mC$(|5K;>le*2P3tELuC%(YIgv1Aq3R-RPR^n7KIi;~Ism=PqvRY2p)- zZE04m&TulFvNA0OWC@^+%F2J!8)pL)XqJPWjCvqGcAZb#zPH0gmwT$$X~dJt?x*>B-m`jl_Xa5!qHLe)U-B6lp_M)rm7uhK*JZ_LT#jPNN z5U<+cu%&>3$BUqkXBLXQNe@qA`vR+d%R~Uy0XI zvX^jevH$p0FY#2%ehM1taG!W`^eKlggagx!m?sJ z5WCmbUa8Qig9fs#Ift3)3TBEe)!PtMDeJg~Izdh>cjM$5UZvc{h%21c6gejcjsTio zsEk`9zWCT~GRV8V&p4cnWYvu)5Es0pr@BRkOpi6C_oBFdFLaZxs>f4RXggGuvOCpY zcwdS#AJbW|rf)3Ccg!bpgQXhO~J2g0ENAm*Pal zv|Bvi%&-OAXh-pn8J88gt>s*oG~|26=_lMe>6$5JPjd!8NmG}Vj6(S|l5o?4US_;b zk~?e~{gIV==bf>SrXiwy@PDEYa- z0{)g*I#UKWKXHmJ@pvtPgp-DOSLe5w<4{GlL51~pr*EsfmJd=77mf318~&QIOaX>+ zaxGzAQxhj~#OYi9rvnooU&te^GriRv=(Waq`ZKJ^vIX;l6wO!{G-#*;*0yu(Y3)A~ zL@i2mzHxZ2@CeR7rHSe~u9&njeuhV_jU2AhAWJqsXcAqu1{hhc=O|cX-JEh&qnHh6 zaGuyGFqvmF2JI?WZL08>xDSjTffbz1-f@ULLXzVYnLKB>nN7zsF8&y!WrpbLp3KtY z*K5#GHha%R#46T5ZPv@gihi-aJTp0mfDKWws|L&UuANuzbnT#yYxsaWbi67fgY+5x zqEd48DoMh(^z~Qc;=`$vUJrIIchM2H09qr))PTK7G}UOIBZc>$FwUE8iOu_5AeV~( z&veUb%Q_p7)v(`-`KM;S3t~y4=*KmemB%fX05OBRBP45~w%ZLbVLiFniT(WAYHFIA zAwsK3ABR_z%B+sKl6zZ`xp=&j4ZAL~9DwM>Y?cD3Q7Tp3Bp&)bTd=8v8kQp3CklCb zD=BVuOx#c;%AE3Ts+rgfzuW!7^M7*Nb)r0iITa~U%I^7R) zk^+VBo-|-9iu4b!&g1m!4jqn3+mzk1u8D8C-mk5g9N-pgtyjH!uTGHYrN{R0GFHG) zbpqe7ie&GyaZ(oZ%&LJ@h<7|Ry#+YsmQ*;W{c5?bBF_zKRCZlfjNjNq+w8n^^Q3ae zi0&|6Q;&0;r(tHI0pv!E0qQY@zcM@lOkZ2!TB>wV)2fXtur{(M`@Y~;C#aRk1*@op zAI7t9?Q8_4M~htkCLjKFEa<>``|#J)rz$hpLLx?S_fjDW0sU(D(86Hf#SVQ4kBC^K zPA#5`Jc9+MYtM8&* z0D}?P;;IW`ar-|i77yL}yZh>INnqEOtriRrWU{t)5snM6T;S{g8&(wPsY$cKciWHn zgkIF;VIQQ1`-<}WUNdR~>l)ARR_DiVumeEn#Kc9kCars;F)oIst8_zY+_>`9+%LIn z?Yq#Li+a!YKczH;V5UzC0t*&*ky}BYN|yex!&jFThM$tj$M_r={*pI7o;+U*g!#8y zddCz$)Lg*E`|7NIx4~|L{**6lGcz%*KJ0J>coh$VGvnCx8=zm0H`)x7*w@w8i?ONoiz&)Gw@6(Z29D>!K{8lPCLoYF3|TX5d)5sHsG*&3#~O zNi6l-OLb>m+Li*9QSNMkGEdLv8T?+~yj-tlhD6V-l0y`rB)zfFN2WmH+v^njy6&S8 zBCXO@DhjH%PYdQ>E4=&4j-u#Aw-Pp#6IOz(*SbSam&5 zf8FD$cI6D}ba>&LOJ!JXdJBbSle9z{Td~Xzqwf)PMvoX%v?4j0E?>+?(ECo#!TS_t zVhvkDIP9nOOY{PpE>k9M>UOEG%F< z-ulCkB+eTbGVdD7@`^)MuF&T`!aWR8tpn<*ekp&3M?mY5VtF=`($&T-eQbS9-yfDL zU~Q3+`Fz~tIs)UIm6!J@B9TZLcLIC2!nVzNS;s(zb5M8{SVgo+nSh)@5uf)`gy4{8m%j1?OkIS<;W;_-|GDQoG&nB*d&c+rmfy zXXgG{H{Op;6-yEB*N0)6%-`unJRZ)AN9s$Y2Utd?&iO3qW`h;biH46b108-7RcJLZ zOb@q~3M>p;X3!WYVU9()L%kUS%d^e634O&PRe26F9JhFF2IF_47SZ6NK?{wSO0pv? zT=El%EVo@Q+6~?qj<)%5%`$q*yX?{owIlUl2b}s;Who!OpG}-|qfhPj!#}g&OMZx( zfPFl}TexnO!QCsLT7=;ospRbt{M@?6F$v%6n9md1ip=#|*)l+YeY;fw+w1FH3TQoA zp9dLS+ujCpvL>f>8eod*i~VpITPA?_6oxd}($V;K9fb67FfYjDeSQ~=lFiXFAMP+G$^*@mzSjZL9{;2>@IF8t zr4HisAi4aDLeb*9A3OWKV=RoR`T<;$!EzC59Q-!F?{A4`D&KU$0A>MLV#7aUd-RQH z7FePvwI1s}9qrJFYsml^xD>W!K6J^lh!rph&!D`Z1%zn!GWnZy6%+(eq?H8t9%x17 zaKgMKD`3+Itm9b-7V3KekVn8_k552lL;f{FM>NX^?rVNUMg5G^5A86rShdy@zvnW} z=}&!Zz}>wGI&94Gso3tXn75_Ly8KsBoq&DmX3>NZm7X9a6nlLSd!&gHZyEBUSup&~$EL%ZpCyclT+te`y?0 zt9M#Ze1`}1zfjtd=YY>FANK6MthaIMaxod5#nIluYK?Mpz|Y@`)>KmmQkO+)6h@w4$=pLWw^}|MH(~5TGm#a!_izfSadcY~~21L&e1aDn1 zuRT&qhY&e}Kwmg$x&9WY)$x3Gu9D7o2!k!^tS+Eqv|*mmv20s~ZPEdK{C*^Gmf?;gjIqEi zQ0Kskw(f!npxc&sAHQ**+;J{`gclbR9e`+1j`o}3oz6Aeext*~olBOiciplqfQr|G z;#m<>&xDQkLivT6e`0^HsdArr9vT?@Y3M*Gt#QhE}VC~I3OAyMd!v{?hy2HT@3F0-iwk9XR+279G8qHyIz(TEIPFY{CUY*Hmz!xft5mD=iQ+)(Vfw!p^UYN~j#codGg>UIA)N*U%V zPL1-ok2sSO-B76XN`scAmPlU*>wG+-khepveh4S+?j7ogo!F#J72`i>21Ng;jz5qC>j-d@}O zk#3v9C_jy+8q@Ap=CqaTMd{HR$Fs$*?+e_kpVyG~r>#U=(&U(OG4ExTW?J>w*(wNF zR=0Rxu&6?@;QFEg-N)zr3=QVskI2$baj3i#cajc&E~kTTeu`>=aU=+A(UG!xWYNR4*#&n`MVV4TW7w0+E= z?#}qS-UYinP~rYkANO>+8rk%;>|!dS2Qx5BuW{k+EPhb|g{GxedUjE-I#%f4?;Wqr zUSk&L0SV`M+S+fEL*nA9=;@h($;g7IdeCB49hB*c66A|Yn{0kq4xgXvtd+Sah-cy{ zU2N=@MYb?VwPSIp2nO*C|i5_59#4=##T14kTzoKW*4Hs9F}`ztH_EDts?7#Xlmc6K@@6R#bUC z&c~h_1L<@CY&#R+gm65gHN8rduz{jCs|vnQ*UWzD2&&;=Z5T*5hoWDJTOa!gsNVaV zYm8p>w#%aA@ZSj?9MJZje<2OgM4CGqHxd$Za1_q8<09oy`gp;HdQyFYjW%oEM-@4Z zWAIfa42Z2AY9*yl;cXTih_$=!OdTD?nw=6K$W&evbzwYoS#7@Q=Z^(*T&p@3;)gEn z`7?&Omn6^U?X?^5qnd z6_eKVn&|J*0xR5}D;qE}*a%#->RVDu)zB@@y;Huq+-`0e zwnbTAWhgkwF?hJO{F7)*=EQkxz(NXUMDxjT&M+&Lgl#@_XxOeuPjqgRE9B3Wzr{ox zd9ghWWEJB-Ms)UwD^gZm7qn{BLn* zy&^vg@_7+hky~`8r}+~xbQIx#{(T0`A%SO|Z6uTp)mcA=?L!^5=|{QE5(%92{q^Uj z>nH=Fh)~krnGD=gMaT_xnT~1sqNxH-qI%(s=!-EATH)lG$wK9Q#`Lg*NX+^Y_p8;D z{Ek63?eD3v&_WLp-)_E7TtQ=O3$~lhoB{kxf7OPdri;9%R~3y>m|r9>ar#B8+jHGT(e9uz5C@q2Y(3PMtjbUmo@Z|N{LqKvpi(&~9oNJ(TdplR zenp?j=WfBxa_a)hh=5yAJ$mUUE;0G&JscY#HelTzm42>2G)Dl}6E~W?f}v%DO7(s3 z2+ooQ;}v{yeJEX7)BnhG`U}r5k$If38Gvop_Nx%5UTkepVjC=fiyrZ)6U{HS0&5p3 z-Rdc`<0KMNO9Ihd!wFhx>ESq9xySvTwx!Wv8r=(UDYjZ>pep9~rju6ZnVg?(ez*Ee zh3NRciv8=!;Fw68b1&;WI|Iou=0#~ECkKG_jb>>0^bjSd_@4~&7+=3!>Ye5-*eejMq8xX}`i>WSl@prEE6w59P9FxR2E5ES_75qj-}QaC9f!d{pYq=#Y|zk+h%VZGXI~OvmaDpA}*YI8Mx)jp>LlQ+|jsQMd|xiTgPA zE>AI#i=b6}>y3eXG?y2jXW|f@*dqE*VJ+|sKMJCYALWd{VwWvtyz|F1If3%YXxmUu zYJODaNhTu{dzA888CxCjZ&eZ?8U)dTN%4Yc^(4F3f>q2sB$|br{8`gi&clB5(O4|+ zkszezx!%<7#8`Yb4aSbxs{LvGVu82MQ!%CrK?xLCZ1b2hWdP~!#K^~aC1Y!Bz754> zW4R4M#^znbPzz-LMW%ShiYDyirv``%a^o04N$l~TD9Q@k$oprAEi-Zrd=wzx+js?5 z?Ga__L~)P83;5s$xyW|~F~g=97h657W2uyLnVT~fuK7M2{%)(4QBO%Dl52PRHkkg{ z#sm)4hYPtV{(7$0%W>MNtH-LXop=BjmRT$zVR_%;jupar&=+6WuuS-xDV4PXqjj8a z$S|{Mi#Lj4S7a?t+6^1P-M)IH_ZYS=OQ*AGD2Zy^q?x#py763%>Dm$UUM*NFPLIdZ z0WSx2;ntU><%ex4Q1w97++yL_OWbrxE&r->-fH;GQIEWgC&|dKDO72%AH)v0!T3A8 z5_YdMTR5KX3W#sgeu06yWZF%=TFPbU)yg^~9k`EIsB{XHa?-QotMyh>5q4k7L)u55 z!fb}bB4s-exMlA0$=Vfa+D;Df4;tPX^0PDHvI}tyeQRyI8#T)6;3hH-c6v{IQT0uy zo)TN%^l4@Tx4yJpIVR+j1mI{lKqC zN4F0)V^jXYhJv)e>_cnA8L*9M9Q!Tz_PdSy*IS#Jq~*w#I)~_V)-UCDFVwspM5wQP z=LD$j4ElLgOiN+BcPd_B1D+jHE_U795=#zIR<_mc*F-zNUsA$?g!n!6|MAnjz-)!`RlDsfHU2ZOTYT=n!Jw= zeD>+WCBXe@kSJStd~+Zg+6>^%1oVC^#8^!8Bo3?qWKyIhZ~UnNx3MqCrp%**J$D8X zM?X&(&fcr;axo_GrsfS0VDg3lIr(-R_9e{8-`JwQv|TOMp|d4>7~7l&^f%NrojV-s z5Ed9b%{p3}{8lhjDo;{u_bj@5sQ6ms&i+dNIdAxs)q`vAN0*MhNOMJ?T_RyQ&wXCQ z)vfDJx4CZtuCwnH;KO8IGoZ6ksG6e%S<-@LZ#=b6Ek-Cv|_{2Za?(|4o5%VE`% z62#j3B`S;B=bkq;#edK4Ty_I$7=5?*!gRzd@@GCcDqQB~fG(RN;IJ4aunT<4)Ud34 zi-uJyX#U}YE6sFIABE4r56v|1Tv3gc&Z5)9=fJ>K$zl1qH>s0DbFzL~@Dis03hULeKv$bc$=#770RQp$7 z$6_Ii674s{#re)VfB7COKH|b%n2gprPdCRee`gIr8Z?jdLbBXhu3+n;Pc3AD zHksn~H{Jm($*(RT#!P~%Vd{6qQGP8&nF325!1carhAg2OUiy0c-1uR*% zU?p?KFx8386PA-+4aGvtnf8asF8k zXuvo}O>$vEFFkv(VR%XNL)71M5g|i(cB=I&xZRqo?66+CRZX5niudM`83O^+J;}KN zZj`G92iG_c5h-c~t(Yo5_$HRcQj{qfUw4}BQ%u9OI1N^V`!vAC=4|QJV;?EC!j3R5*!;U5Rrwe%l^B&%(_Fte$$7A8*bkR~X)IOG%FT z4aH8h^RPTw_}egu+vm9QCZ@kx?Wg*{*PBeLwpsWWslt$j$<>di)56AtXBAG?2hjQT zPu-cE{2fwp`wh;%TfNzWQWN;RwJ3-nlqM09%*yBFfhJ|qs7SU;beA0RW}^#X7u z5tf5HEHgl=J3G$q*Bd#hy(a_5iIF&1=RlV|qZr;^iT^4t>yG%bt3A1pMBDoq?Y-+y zl73Y|#;D5&s9$UT3}-bU3u~@q9jEF@ij97!r{0XE{C53&wky%(}( z)iDji*F2KXWz_*an&2g^cW@j@U!put3nb1@m%wo6zSr^p2-aQ?enP< zKlYkqHw&zTHij;K|ufCj(FCzty!pm#c1KMj#4CPs0=i?A9;a^y%+} zmNI-p81J$dr%{vXF0WKXNk>SfpCT3DrG^jvZ4>#L=W%Fts7=AbzdgeBwZz zVHN8weNJOkV)u_kMtD6+E-D8cgyWvi)Uv&?^UINYNZP7*;5Ks6Byj8C$ltBY zz#M9STa#wb1&B@Mhq__5w-YZ?aBV~M!w3|S8Tr_L%nhmXR7LFmDWQ7`fp19`_zqQC zp#?^IqgTuZ%HmeBhaNtMiN)DMegzG2wj5`<)3mQzy2#$Gg6dx~N|FyT`z__HBZTFx z3#}{hisD&csmjmjT(Dm(am;kIzl~kM@;}aQ=X`ir)=HW(wM-;B-ONO7->y}q>}(@! zm@fV87c(3J4pg{On_s%G&9F2q-v48_S=@P5msXFnu0eVh(M^OIPNto3!Su5KL`Ia9 zh_H?bLoqVTzwU(ve7^pPbefFmLHOv zXk6SIh{j&12muFR866MiiRiE)?fAfkRsS`TU4?_@g{O)LvlKjw`SDc>gr#M?}utz=j2V>a;7;wTguK zv`^A9@<^&izu=i*XCcz@#w>VYaND!?Hnwe7w-Xb6pgR;k_OUDky#gI1CPsH#Q&W>0 z5s^Z3Oe_rbNgq_Fn_*O-&dn4TgKF`5<@Vs&(5M$}Z>r8WNz~sEc)h`58<5s=t~PT3 zBekPHPQJ}`1pe_D!pWE^h61DSaHU;V_PzwkIXrTY4OpM+lFx!2oFQ=gF*)h2iIZ~^r&aM2waGfjUk_{)H@yT zk0E?VPbF-u@?zN=X?2YybuNDpUr2{uuz7Z8RqcM9(-SX}RCkdELwz!JEIu3yhM;5| zvNx=>n|+}jsLg6Ve&ZZ;;=-IoOr}?I-=UML_2<*M&VK(HIWL)u>-^ibf;cgqsoIlb z14CE_?9;^(R-*@2z$q!)ZJGF;EQJuSnCb_nj4i8F#=Qc~)$8^v{3mp)Yvm5Tjx{X* z3EZpNF!Gr8Pl`c?*W=q1+w#>f_*t5J*=9==2K@XFfU{|@qmX-<<++^cImD9#anms? zt#j=K^VNu*&B?ve2X$MW<`)oky52H8h4Hgwz|IVCpS9Sm-1{=K(50N?IPUH|sbj|w z+%jKxkg++#wyG5;*F$3{h1K^AD*4jO09Ma1#giztD z1bShImX?+}!6trcaz7}F8Ov{*lt(~ss~C-c`$G6pqI%yzxEXK46-;c47O{=4tYyT>)6nNqUIOlvwHLgrlYwRM!2q$5kL7q+S>?8$?mz39oxij4hb>?~mts zJE;jx^?-bCFHE`w<7_k`q9$$3RTfj|mKU`l#dmW3Qgz|ye{&vKmxCPci%bwVk7vd~ zeQF(Y^H|oFj8{$&dRp3wkQUT7+w+34BQ#uIoM%WoNB<2Kd0fo}&=kN$bJSBne&X~@ z8q_A5zeDZGSQ{zLMa})S&uHZN-H*mqx4t-Xk5#y#aAqJ^CcS-K=cv)R3AZ*V6QDQn zh~1}KN;4&E>(1emRzCv%%^y~Um_n%e?)HtbgpVz}=#BQDz~Y81fJ_N6r$NenUgHyn zM=jRUp|)Qf{wc+0;1`Iuw;s)${Bq|k56<|+y)G~1WHfZYYOOR zCw@SKhad1RH%Y%-{sMThcI_ANR7Ss+Km>217a)8U5KoO!bYOlNQo5@x>B+z8A1x>7 zeXwgX20~PL8yAD>NfqLuygb1|Jg&IMsuSC)2GxV;522$W!Mr>%lF>D{$;-|6sq3nkGxh+@_9&k;Q~ zMhsjlGm{^MXX4qGiXH0X&)>)U8au(zyh%}}YNm1uTDHokB}DO`8-4n>;o*ZaUww0O zah`@z0NILxflmqhIotDsxqJ-}-)c(%6uep#?lIq0psNU>%~EbX|DOq$UoMsz3Jc!a zqUZ<5eH_rfE!=oKI7ZJe#r?^guG-iqlz|r?JKzYx94=EYoI!WLU_l~X-7H4^g%wPC_^jodOgKXt;xbMZ~{<6EI8 zDoQQQ#{~hzr;CsPI9AUyiDW;(nB}tVK%CWzIPu|pf`W^LZ}dc8ZtaPn{eo(so&7t% zMqc1q32jf9A>8xgO7RTaPV=DyFmH(Rd7|IED{b5`CT}~LqhYRsCsV2!M=PEn5I$Go z7v}furT8@sFM;TZMN3oDOq^TsrL`4>kDQ27K~wjgP7bQ(=O#*%rz^gv zv>kr?GcQfz2FJ*Qa$D0Yzr%m@!&yVO%OGZe&)`8%R7KLCB7NMVi=hua`8}KEkPq%0 zMn*Z~v_j6mJa>{cKZtn}{g@%LwWR0t-+?62s-9vTAqJ*EGzuQ5CyvZA2h63aD(8E$ zE;kn4r#X)vJ^Nm%5kIezKIZraLQ!a2QAPO2H(RqT7k=v*MwmgFW6s4A$4sLMI!L_A zlW3?J9hkNEtKn}0^qQ_%%3;9=ApiqeI6Co5Q6fbV#-u8%p@eI4vVgmkGnTfavnLtt zV|jjqIEsOgpy-`9+oUG zVSIJDQ=%{<)ye{4M#o9CG{*3(iZY*j=3hm|Z%{a7FxClYr7&@eCj9y7Y8)&Zs& zvE&39E#;t7aqf)C1WevE8<#{9XyO1a3B6=&ZL3E%!(=4E57-^f zQWyvLmJG#Z7RyILn`BSzGWOHA?O0Wz&Fs2vWgX>o7kK{AeE^d^j7 zHpJ^opO>1!tTOIZR2`&%kUhgGyb^Ow>vrV z@7S54a*nN}{W8J$oXgE+^S9@F-}f3i9570N-vdkW8xNn>cK|GU^>0 zG^+@!kl@Gui1*$J&IF*|t-Uf5=b12a1@`E5ZIWmKf=V))FmISxsUZ$a}*9OcLA`nK!_LBNv3(+kx zI53=zMHi|b;Oys#UQ|Aw7(&K(s#+rfsTgxY95u9p88_EzXz++ z{|)h34YGbJHyk}T`3+incVdk~nI}ppwV=iRT`{oJ(Q?`s?t3v&!_{_hcvv!+%C^>T&f7V~Vn8qwq?RrC z&Iw3Vv?Nd4bOB_Us~-hUZOGoSEDlX$w&R@NljskXOR_VmuYM-+`$32QNyB;P^+E75 zoNYENO#QH=nylIYDB%u;f%u3ls&x4)6ew$24xw`7xjlHMnLs3BZH^0d@$yD#UnL3EQD*Dh`WOd zkCGiC&qZxA?aoWpL_MI^ODbw{Fj7JK-?mv53_hYWdy8GBZ z9?rDbz7*I9YShQD%rXhZ)Uc1dbLNy^iZNZXw;LDjW>Kkp;$msHN}C-KC9L+YB9Z5`=zbZ5P@r?-vDwx;;RSItBU^|8lRkGXy=}(J z=iMK;yH{_BMLflMwQ#a5eWkPN$tl~yrQ7xr=g4o?uC$z1G|vdkNfDOjmG2XEQDnJ= zG6QQ5W5f0as1`MnC)9p8yRfZi*CL(!o{~)>L<=0(!EA*U588M%6ZJUN{wigO&Yy93 z)^vKUJE~BTbOcnXAxIsGU7f}sH`j1_)ag_%`5P}_idPrgR;+A{P4@LGAv!EcoD1Ka zX8cw-y)5o;An6u5ZG)Mkrg(BkYQ>W@<9WZElNYi3!-3=PinO4*2D6(+oFcCIA*d1< z9rK~;t1lIkWANAUk>afHu!XB#&yZ-&A1SSb-757*F?lQSw`cDEOcbPDSlBP zV{rPr>itqLMw_X|LrlJ3r{Q#jZO+{`HElciaW$u@RorVJouAE!IG$viG<1DJo-iBf zJ_&s*Bk{RHqkV@6LoCj(I?n3&Q@<23yA)m-o##YnKcJzbNzs*<$zhqXRv}Rn-NnzD_;#?EK(eIS>!M8L;A++akxcvw&Lt-OZlu> zczUfRkSowe6z+g!yOnlP&mg|dWpTwPmOWRQ*oTbV)L0-@aQLHLTebUdp3RMJ$_IkasMA^dJ#@`fvMeg%cm=VALQj&r^)cOm9|)wOd$cK)Z#0NgfD|GEPPpJM zUN^q-w{=R=zebzZ4Yv_krxG^UK1-&W~b7> zktrSl2wS?Y5>kN}WIz_TY-=!vo~Fluc5RL3u2^+@jC~3qv+RM z3NJsHWia_o2wS#qzUS>^6*<>ZGN8?)#(8Iuv-~M_cITq=c7hp@;ZM2$n@pMsTlAeY zhZ#G$EpfFGHGq1^t^w~+yPCe*c{Mfm(z*G?@|zp}@!eBLcct-N(r49`_J8Bb(s;Wf zk5PJ8;%@3zvIv$i>}8yatPK}9l$y-wORXvn8_PmKmsP?)v~z4}**gZ97rbd_OUys; zpWd~AK#`c&Sh(mlZgR2gN-gduxY~>n7xjaR1LOY(^*{>0eaGl?#U*3z(mxBWe51_5 z$bF*kal%J97&%{bbI(NV`}QBJ0}Vk&K}W$}fk%7_E9is0y~+ZU03Qg{e_?`K9L#-? z7cDGX1^pOPE;2A>lb`|BDIT5V9tUCdBU>-?{ZScSCR)BAFLsiH(MhJ@FFF3EUU+Pz zhd#9Fy5jNI+*n-p^{4C5XIri*U{XzrjVE5p?9RRA6cyu$1srI4by z?xD{YpE&QDx^H?TfXx7q@*iVK|LK=uTA;{9OA?(4vmJR^sSyhW3$_6m9Ua*=w4z#7 z_v44iPjVriiB!Q^DH#g8tloab%41W(8GLws%J_LYTmRZBqDOyl(B{b#D^BjuI9nw> zaOv2Q;?!`&C)LHqvC(4VIQLqn0bKpz-SXYaW7`6*6l}IhXYVcZL6J#^F!NO>Ps~lG zG~nq{()nc}uXhZU*xU1jv3Qc;-A8xgjfIRoyC!hUlSJWY5@+kf;@@i{GpMN*C%RJ&{JQ9@guYXIy^K11R5-zg1<0w*^5?LzFg{8ePHP%Phn&Lwo?Ip z^`O2YQ}6~$j=gxb7vE8rbe_kjYBx4YyKedJV#|Zu!ozqxlvnJuHz+Q$!0a32X%x%_ zK(xoDrZcx>D|w8!nBWOZcJhA7v(FYAp59ixc)@kCReeQZlEMV^3$Qr^5j$IsRhO_4 zO*Zl`$W?#^+W@TI-rhNW%_{yK(At6pmjGREvhYW5(0~%`IUC^eJOQ8kg8s67?@}gd zpC4Rl?^u^Nl%F41S-faT@bHSYHa}Fc&C$U%#nD!;o6pLb@nZ78N$t^M^LRN)PASHU zi^od(H5I;bn8}!ceJ0yh9ydZITId>zSZ2)}Y z6Q(`P3*H*4uHa1AS=s)#zB>dV0*!*Tr&B>68Nr?ejXgA&giK{AkSWm73*T30B?WYR z=mWlJ>4mi+@R+i+2>`2XVagV*w!j1ErUKb|I|cM!`SAlFTd>N4mYFq7#j8 zk@+-y&PB!7-|<7m>puG5%4XS{9c{ZM*Rrc{OpPu;K!0^BKyyWN2xDY4H+2<2_Cb%a zncL>HeU%Z_8znb9@`d8B&P6a8bX!0g`YS&mqkjfG?h1s~8dj~s>K43c%9-~~z=CZ6 zO7FC`nFnqUw4JrL&Xs?VOoleQLk@l}i?R?*GuUrC>vzWPg7i=hwsp$Tt?Ppe&?M#-@r%(%($DU?U ze(9x`!XhTQiiVfWW6`p^dg9gM+mG44Uclv5fd16U2o_-Y80foC#58;)S#`gbYdJ{=(BP5BLX=e^ds3_cCY&fAU}_tiFQxyyjbrSHAMM#hK4MUp^4{ zoE3gqsG|F)?jD3qAn_F&ct5X1%g%U2k(=!K6cavd$qsY=eet=^JW#xF!L=rs3~U0b zKp*-e3;JRGr6!z3HL4vG9Hv&l1EDDu4ubjqSI9>gR|ZL_1GeQ|vlvZSj&_Uf;3uwBl)dZ~9QXeEmcd6zmUj#)8Sogw3$L zJ+Q~VvA<`3i`s@ z40uc)Kh+#Vpeq1DSN-@F$8z$7mRouAdKF+{Hvr=kU$og@I>Q!HT+n{i ze%K7K1N0ATl~!H9M{TG5+}gFpH`bk7JiBIn@$BmL#mj?sVK>_KGtq3eb>$Vq0BT}O zmT@V_OV|JaKmbWZK~(lY>;ay>C;ipRBgM_5dy0Q~$j(#%rj@~Rq>e4KP=iTW?tSz$7Q{4Y)|)te;1ks%UV}5hJ_iK2Ylp{ z*NJv}i+y*zxfnU;k`P2VemTY!yrC6b6y$|jytO_k_=A;KL5niubwPdr<0F!SIdre! zpV|aaPJGrc-^alpxqy6vCR+L!dwc2Pej-oV$sV20Y8c;V6WA+KVd%MUTXs!T)k@esdFz_wd1T!#WSaGE?!=>E=(kUu(vGuYcMFr)4o{b zBtMb8elgQceOkt<%j=h zmgam4^Dx|j0|)BkMK*DFH1}dXul@b#F?a9(HRcQ6q|h=K7lhm=?>cCfOBP*d5?}p$ zx>MM`Tko6{^a<>&1wP0t*lPnIJ{A1Q>jRk88o>7zngFImpe9Wf{Lzy~8v)8m1%H*R zI^hM#0O6Pp%Ie44czKF$vW?fqCOeghz1r*jNIvBF7aMrV7!PQC$e28P$9LNX;8)8c z-Bke95#~b87@@Gr)F|E4nRD=LHWiMItZkqp;A3>{Etctta-Lne>+8kcXKb3}Z`ur~ zue2Wk(?>V9+Fb>ShvNx{Fpe{7<-=U}V- zSKE$`{{7#7-!FdHY;R?9g^5!-yLOcZ0zof2HL+t^UFa+kzCE*4WG-fbJiu7)u-i(% zdg_+qxA#3>w&E!}cKrrmCWo?KPqmU~>)}7mKX59&@WKmWan_8H z_`3XU>#qUCoq~P z$VrvB#FaoYQwLBU80Fbyv{enqVvv0yRa`bPuw*;(f*tNZTr|4{(HG(Fq;Pdz5T?X zK>!27F&&h%{NwAI<)UZ3xTVzAS?~Nb3e@7%PnHK)@EO7i{6DplOjw7#_^I$bKm12< zJaXhnee5t-G+#VTv&Bn~Y=b>C`4dO#cP4GYuGTjC?GwfVFZW9!G)H@NJO^`Re7C)V zy|=xy4lD}t1R7`p2@5hw!Cp4fc??Zr+$lo=i>lN|-)9A9AJ`T2g;T*F9eK$oOt~r# zta_m1`h&o=NxZl7ve~BP3(ED!h?mE8VyC`%zbZdi`N516etO}p-)kFy|4OwP)j=CyPhcln>z2 zMvfJM+U|LKeU=*h27uPU18NyIt|eV94~Fygv)~(m@$rEV4-S^Q?P8++*F)RKK2vob z2Qjqe(J&2K|{r81P!^!$Y>o zm|>xs`(Onc$`{SOe-GYXGq7IHx#x%^e{K5x5n!739GR>V6Y|jKv#_TsB|=5#>O~K>q+R{vr{?Ib(-b&=-z_ zzcva!pU(D?c^Y02`&#Xg9-NYS{an$iSAkshNG@I&JNkx?!3zBN8yP-=CO_kM_?kBt zuUz@j;>_)jmABV;7R>I?cRdS0;hJM%jEpIVs>JBvYmD9m@PKSfuJen2i>2yr*4F19 zD;_xi#-LaKm_N`S)32&OluTTuq^1sA? zd}qko=46{Y8bQXh`AnsgeKIwc+xkXdbf#*f$s~n4 zk>=n20`WNeHYk5=BVJf`!pKPn4<0Oz9Xl2lX33OCJb66r%UEOIRe0C2&YJ_pCDKNi zhoJ zyk30E_t*yDmxH``%FqQR+4ZYw!d#;0IGiHK1`LQ7EfM*2&W^o(`O|i^Ve_%|r5B40 zd!H_L+p_>_AN}&dAD+!+C8q?HMvYAgJ0&A)z`h16b51t_3%&uUdzvP222QG-f|CIT zgNYOadfA{8?`4t;YqENbt_k9@n(R{Yro2t^R2g$ETTE@4jlOEJnT@i%Z?3S{0&6H^ zb;;JVwbr^B>|`;?Yk%$^|J*;cF184~Z-eG+(y$U@pGv5A@7`VO;AIExL3PIZYbN%U z4?<$h**}XX{g0ChlUzK9vrL=)6U z^_jKC2X1&D^wEijj)OnCR2ixVov$}ARXaort4-n;16G^-apq;vnx|m;i_gJ64>Ej* z{ZYHhbL@=YD^|a1m&5D|P}@HC*0TAPyb8elQJ8>cjs=;ceULYCt%n9&9zOfs=Koey z4+Cy``N`siwR|YRvRT`hXC7-aP|ZJTCazMVwj|JTGLf$}(8vJwqU7fAcd>5(`szA^ zArK7~?RCgB89j}SCS#mW`KQ8hzL-zt@5d&UPqLZjS2-s#o-H3~e#lom`R;*}+({72 z#MfAa<=ktjx(fY?ll%L(zp1`?nP{*QZG`5Fe|++ng;;jz0NDyl7L=8q_x^wEm^(ec zSlR^EQYaPO?i{uyojUtxkHuRS1_!R$Y7hUtrkJn=m>^ETV9^zZt`^}*L0@)F!Czym z{>mp{1%I8z$H87aSTwfeh4*EsEME_O6E7O<0sUeJwNbvLy^{I1qsJ!z;{lDG#xy8a zt}1rl_V(h!yZ$t=;gbA@lI;4GTbNH2$?<~>UURI*M#ztnnb{;j$8&$x!+`DN&YXd+@BxXOYBS{7>olxr46BBo}oOF3?rF@GBo~(4V|0LIny^en7L#5;9)YJN12@TK6YFDMcKzU)YY}4_8=7}VH zDX@n1)w~F^)TF|-K_7&B_3!Uiozpds;=21Ntt-FmnJ-HF_U)@_^peN4=ly)U%Fh1l zfB18nS@B=oQs8$+_{IB%EIylfVfQ)YLtAeOK|;aY2Yb=r_>3Q!l7b98$9j`r!~6#NzRwFywr7p81zK>mzzP*y+EdD&v7X>aUT$$Ve1!4HfBNj{-(*d4jr zg040I_7G@$tIge&rn4owo7O8&vR6Lo#CJ8wnC~8TXaASm z@xURGTH=&Zet?gcJkEs@$5g>*mn%4US$X*%AJBG=Z(*H*!7EAcZ3r~*3jW@o>L-B+ z8b3jU70iVd>=pba_n5rOFHE`60CWlmq0@_BN?3i1{R@xIWBdzvTgGSPvYU#1*Ir$$ zd*Gq+f5q@HC=Zx=5X&^dpM3dGQwAL56($_}F9RyCiR*K8FQYELK51~_-e-y(XI>K8 z&b*=zO3WwvP;ERZL016!*#M}8A=4y{8MESe1B!7TWdi;wX1|E6n;@hb4M2rIDw$7lWUUap`o ztPKEF0_vy7tO@W6>I(WEqf?+4_A<&?Zo$9wX!(o({CtIv0ln5=uz)c-aN`~21_0r+ zmbevfCX=oLs94P{k4004hbFmf+*`ia?tZ%X>_wfx&)n1e05h-XTlE?sag|xGjQ}-~ z!WP6Zos>*iGv8D-pqo=z3L5}9pvxJWNMN5Z7O#xr!J1&2l<-V6AlCW(qQR8oaW6X7 zg^Y_5>jQV_AG`?O&F_MdhPbKdCYr#?;*^w9Ua`BSEzhTUMwTrK(*`?X8AdeAXZLa}R zY`olYOqGXKZC<#`|9h`}eF*p*s|w;^QY!efKqJQ<+UJ8#`Hub(tc9U{Fjs&F>oUJ= zu+zqXbp*M`DwEF1k1c0A0YmspnP2NTxaE=N`0|Q8fK!aHeeU`8w#+#Po-JNldqLf1+D=<_ zELH8NBrfr26F_kBiQ3_XvDbz`tw1M07I>>~)~^CA<_&nOuKiMb;dt@X)I574@UV&&~_J&vmhj?i^0m2(#;)^pyo5BiVll6&$?e zhTsc-*3ZJL;GWt9_@FPlrr=LK>ND$sk^;GcJ6M|nPa`A0HUy%z79m$1DIApcL%tIc z)Gt4Wk;U^He=$a2VC=k0i$hmlQLNqeVCfdF3h{)#sl!zOO%b^bo~)^d0V#pd%TPr5 zSo$fio{K7v+W?Q3#+&y(TfBJM`C-n{cIFiG4xqizHYdrc;4kbq0KNsZl)_1(jqKWv zl$9f$16a%(0N>p%CulNhvS5fzNxbx6CYm+^;-#0pCa19EU_kYjT$-QC#+MV@HkIr1 z$YwgYsh;VSv0QBZ*!Sx5))5x~?dxIng3>ips}dv=jthRaBlz2s&#UJd4?Gge^W(2Z~IYyh4&LHR~r(A9HEbBsBpIp#6eHE)EqBYKSUKix&13a=Ia4AHi7-XvI+Rjn!us1Fg;# zDdw!&0M-~u7BadY>A@r&3z$G3I&{ccm!xbxMicYO_?A)EcP++r!F4Ox(ogMQyxs?T zmON``7r?sz1iJr{&9*A?gmveVJ`1h_yaK;u3i#r|KKRRb^bhd;#78XX!V2=j3i2Lf z3lF9&<@LO;OLd0Is~_pT>_nyMtHyvnikA=2;XAF{$F91?tbVU_2XD%>qxljFu^-L9 zFs{a6CK))zleZV}U5l!a%lEz#+Jrf6WnO`qZ{Uh11J@Y*ZGc{z09wXTLOv2lgm@zZ zs29{RtG5A`!UjN2U{ZKT)J~W4!J0T=Pcy0fq@z$xFf9(qVjIc?ghfw>S01oH`GqAH zj^!~gyCytc`=)Z1vpk*)^2I=VqPXUeeV|03kKc&bEEPsBnxH7)Fn6)^o;7C{hX+@e zrv+xmyo`Z1X>8;6A(t-Bhn%y2<&mv$%04a&{$jf!+V$|CUVn@W@Vx7CSmLBB53Q2Z z@+X<|%YjR;sn7mdY<+-N@E7(v{HH{}V}Gje9uw%{;{fk3_iHl%W{rt4GL;D}Kn4iM za`DRn;{(k_`YT?(K_}mhZM>{FeEG%2DUUrF-Uevf=8%s9aiC0j8z2;3d6ap`5O7%O zHUPZlXE{73sKDgmqd?r^vqxS|wz+rif#-@BPAjj{(N^Y^HUjWQQ;HA%(5ey489tLj zEueOIFp2z1@N)`FX#)_Pp^1W5G+DqtF>x3eWYA0|CGSo2vh#Xqm5+@;bu{TD_gJ(q zM>4PnZ{uliBf3f7Bv-zSr{@991)uBEgU@tW_oQ$T>W~#iD7uhSdi zVf7=qmn|2XzQ<$Y=Qgx_cy#Lx$sud&-@})8vvd0_u2?h6B9%UUM=?6#5K?==IpFp1z40D02}!D zV?bdzm@q!!3?_&sjn^TU4m~Lb<&!>TqcX`0-GpOZ%C1S~y#H8$-iybotmGc+z$J``!0BS<+8B!RmW6af|fqF&p2@5Ra#ub zMu5PMFMPmfA+8qSfMtW9kb^a*>I-#>1}k`btbngzFJ9{lJURfG%7X^Piw?r-2i%_nM&RvbE1h_6FP)cpT6&MC(tF!}>A5Jg-@50*j`5uhP&u!)hk;=yVYw8jlPXrHEY_V3G5naH-Z4;5FARj(_Y zZ1u%o{&QWlhLNQNN7f5)=P)T3Wq8RBTZZ!C>f+exrxn91*A!#bd;JRZ3jQ%hui!8L z>G)Q2gykOveEg;WuYfPCKo2ik`6x$u<$LN-`Jz>CiubzZM&qY=9*dW5`1-eW+!CId zvB|=GA#8F{U4V@FW@QGV=4DXnVS}BMH<4$k5c?p|;RB(qI!0+9a}JEGYPU833i$D6 z0J&}j_zeJZDpOJm!9b@WB|qce#l8XP*>Rjs;-J%jK*#1}JhtLh4t6iR@Is@l?1Zrw4ffD=`F~@n z3*Doy>aWiL?d2*?7`>|K3&vBIJ$i%4qhkOQ>I>wO!MrxIuX$`k9WCe%p!T401^ zQ(pd8rl{LNj0|^aDMQH0?Lm6K0XX-fdIO-qt_^_rYT@nL1mG9sO@5dujt9y}t@TJ|+(bI6j-+Y$ut=(16chO3Gi! zy^Yt$w6~9SnV%aET>Hw7PQg5gRIUl7tc&)HseSOr+MWIX!*+hxK9}RZi^OXNfVTDvgEYXN#`~I z2hP2?-T)Bz75roDHv{+sACcr66|H`Q@udw3TMoQXJh^srXeV<_ zzmz&_AxQ=m}t3{OOdtht{=9?Mc23RT^068P{ zTn84IgAT`wW+425=xw2;Cl3JcabWBR+c+;e$x}M%Q@BZn98h^BH<_2*<2aAkWqS5K zu-X14=td@c)?)2FPgnoD)fao|URz1u@^vJ~vQ-PMmrsnD=Id1BhaEN~J^Am;hL+yr zSnl%-TElPh|M@U{9nD)b(CQ}Gxhq(^W6bN?)zkmjjILf;*f-WJ(2v$<{(cj{F|Cb& z5BkvZALYd&}858zA2&;zouv(73v04NTc zo=vz1*zRnl*2`1#5vwM-samI7d#Zvr9WEaNR{J#9z|j=|Z3I%AfTrM2OUdUq0mcSU zXHz|t&9v~M-2gQ8f=S@P^UxfKF-Yzg1`Qszo`#RhluUAPik2N1@HVBS{FU6>c)h1n z{qg!MhjF>Hl6h=Czt-KH|ZWa>+IsiwddRA|IYDD zy-kVnB%x1@t(WcDvnK>c$-q9TIl|J32TQiKy|*~E%^GH4!9V;rHs8-q^V5rOnbQia z2!Du5CY$PmE3o^|*-)ST$F~3!{1x~;mj6^FSbY)ZxFQkcNyxoSn*lGAjqHW7@qk^1 znR@^~GM0eoV_RQaoV2}s6Cn8@ps$u;AiFR+@zBg+!myWl8XE!f>P-Md>yFu*0ISP4 z0ca!h&y711!l$NSkB!&SQe-~(BU7RkU0`+2=r+KT+W@Hdnh?(E^#JIAL`Pz9v}kHV zfkms#7%M+=Pm32uClD}@>lZBlfR9fwcy4TXbysojzUt|;lgvBo zBMWLxzK{5lgiJJ;!0%-Q zdFd7KDH9td&-?l$k7b!ZJ`dpUv9mAeWad>`Af89?ns>n<@q<3jSD7)dyHv7uZvvb? ze4yC7YHb}uH2-WalGO))(FFQbVrMNIVU>~E2+&Hk2s|TLN*jRi03f|(BBT~T4pbHZ z09qh>4H8)3Y00n`hz5&B7xQs_vQat0aT$^~VQ(MX^wPz)nV*>lE_iikrvU!}oG4(` zMx7~Ei;5#gzECQLR}2=-DK_>9DWEoG-1Ne}!6pU`TP-GE~C)|yi<-WQ|6$~T~<5A_8 zEErTjl#LB0=mi|t<*-XqUID1y1UO^lVDXe`G|#|FCRQK^Q%WkxdmB&F3V2!oR?Co+ z#DixHOJxI~PIq-Ub%1eTx`7A>DZDlYUPoc@F~sGeVh@=kEW9f5PGoQnY*{Uua>iu?WlT$hfF+`=?8s z-KWm}@e^{ePn03wfYncreGvD7+|z6Vyq##u_hoq=I>YRH0Do&t$1ZtIr-E?1s561g z%vq3eFrZuZqzwwT*dL0Xawt?Aio?eUd)L%I|Si^z5QV zy#X-C>OsKJYaO6CT9X2t0?9Q% zhYuePPs>9KL^qY;<;o*``Gk8ZpNIb_w$lxnrDYv$n(8z$t+#sOvwwW0z%Q%~0EOsy zhgQF#1-`G)_?ZMv(DzpYysfvBy~-5EUf^lTGM>2ycoU!o_rPc^^YhcwGUyD^7|Obyu_oZ8ytpzoI^U$3NAVI%N8m8@^Plr{jNQ+^^K5bqB{$-Ew#LDE3M zPX#Jd82c3MWxh-=_q4ZZqNi)$R8E%9+yj?9^GK%(uReP01A9y>&`a*IbiOQT51#k5x5@O(Jb+)r9Iy>^4XLXD zwK5_YG98=X?jekfr^nJRwXZ6f(n(=fSGeDefb3L8jMWP(c4n}oHUM@|hK}QC4p0_N zK#m8C_VQrl?8NuNl;c6Xuyo>uCHJ_O&fBGE`k7(jJh1xM!Q#?gyE+X>UH(Vg>ySj} z&TO}DdTp4$EE)plNIXwsne@UwFZ3&~xQ7gk_xVM8Odj#jfOs%)Sw97Qs}1$ub&@PKIL5%zUtdj32x ze%84~p;rNU6X2{Kbu+j6ou3qgZNq#-odV_^bHdF(&FZG$&%{!YkFoNC(bW$Y80~e_ z>6K+o!=m2+m{Yr+15h_~5V8OO@PG!x4@j&FhLx>o+4RH5w&Y34RF*IcOE2iBj9&S( zZuUKJ?n{q%3Z2g7|4uH8%*IqF(z`ZnD0ZK@xoBBHW4xP^&n_EeqTON>OgZyEX8)-S zy|?R^4w<4K9ss;@wEAd)>G&ARv=`IRfT-X;+4e;Eu*#%>ub|(w0gw+u)sc^paU2rd zg|UZ@lYFi6rs7o}IK$j{fH4?7dt;|?y$aZoloW@750RetL7wnY?(^ajCh`3HYujc9 z`PTiN*K83e?%159CIxQMsUSaUspt_zIj1z2>)szddwF%|CDN0Se~u9C;A zGyM2LKp*(Yz%lKQYhOs*M~+eT7p$O99?y%`Re|@t?|t<+DZlE0KVCTh{PT+sedt5S zn?2{7Ee|kfry9m7^wAu|I+fzU5070F_GOq^U8ZkwzegPTyI@Id0L-z;s{r(bgAd0m z_%>|>)a&UStWCD6>v+mko_=vt8~V+EqS!5jA66YZP+YugN5_TkA)t=1fzlz#yZ^hz z*uMc-|Npc1Cg65mSDoj6u{95tHP5qUTb8GIz;+TRu^l@k1d<|zbSgkslK|aGbqc6T zK{3Nu6r`yt;Hy-ao1(u!nxg3hsD^~eB!oC|;vtqTYp^v~wq|RzBulo{>%Y(WowLq< z=iGbWeNRvCNoRlGzH8jWS$m(g_SyFgYZ?j+jV*h4hja3z8p;y35+oxN^gMJuAKu~t z_Xn%{+tt@q!OO#}up=QirZj|LNuU?xKY!smZe@?FYVqj1hr*Q!=ED6#fZYHV1L$Yn zEiW>l1>1DtEO2hx6=ma^qRg$5+Z(3&T35CczoBN%#T@#e4PF=c>v+;0FGJbH46f8LFCAw%Z^vEI@?t>T56;% zaCY?#WtGg&k~35Pfwf}UYJ+j$G|)$cmZhz8a?j2f@xJsPh7oyWR1rIMo zKiW3WzXgW0{omA`!=>PfHCKmIld_MB*9CV1eVt6TATMjoF#pM4&J7R2eK~l7;9jn` z;eF&I9|@Cpm3J@3Cjh+C`NG|&hUY*3bPVze^lblo`*@ppoMYnn1btv9sC&7`C0Fu1 z=qSj4ByZEjX@Tzh&Ds3uaP$P}6l!vb*D2ViWm3AfS(}g28&VoqI{+M6dYt~`M`t8p z+RjMS+14>WEHG&Mzn^aBAO2C%?MtqUH4wl=fHy&|aAU#bM{`r}{D1l7@-aQBFlPl* zJmpa(eDw9y#o}}B13>!!U#_K>YYhL?a?t=t0=u{?uJ~mi;Y!#fwHY;Y44(GK2kx)@ zg*PnZZM^*>br1(mLy_}U%x$b9NE&$R4X;0A9 zA}u`}3yjG2zn=ZiU;TS@#d!vlQtws23pV7-c7}{<{VLw2K^{Ki*z(76eUoru>#3#}?4}*KjU$ zIx6N8=V}LCoj`TDF5t5msMA*yoQ#6Q3jV50jkT$@Kx+YKfkE5smn=CPa~*67_>^XW zAUd@ZIxQRr7SI*`C?(BRmwd1WuY=td0aWROJ@p{#3$_b@zRcDZx>zkRV%z`u#rgi( zv%-NntD?Dlzyb&QAO{Z{i&g>(*JppzM35rbNuJ^<&(|?++O+Vtx4q4?GTghJ!P1fC zxOXkgckw;+{`GyS}qMFJ~+Tp%|(9a`~G&oe~UN|)4_=|<@WDD$pom92QMRUAB z@svaZkqI^heDq_X{HKoRCLf%@1)K1+{DcV;!iPTe zp@RLolkO>ii3NKwlDeT0^eA?RM6`_>#Rk|0IJiSq4mR*G-4XD#O0y^sPC4Oi8p9Uo zF|c2NBj60_7TBBQ>N0hJLsO>j!y3WUweLQ(1zQV@2@8zK_P_3(%iqhhb@_^LbcVh9 z*Af9sPyxS=$3no%qN4lJ7yp!%2u^||&rA7~LD$2pufDnne7>C585P{^HY_-@KiUnu zcpLW8m(&)XR{4~M=b`X4T~Pa^ooVU*El{2|-Rm&jbM9ZagHtBQGR&cx3Vd*;B@dBz zf~qzxQ`1z*vi_i7GCN@H0-%F&TG6Ftff3pMcd!24y6oCPSFUxzpTH(-vp^86OMCW| zFXu_+bd?9DrSjuKq0FJZwox0u>LSHH?IW&1{;~cZ9>uP`pR1bs?C##NO zrFH=@Ec3O6FD46Iwf*t(aEAKsdzDno+?zRxv-UQ<7v^PO{v%j z7f^EHB+o~d^3YwhXi-?OAls>cH*wbspkdVB0;m>emB+B~aP}yow*`37xh@Dc5%j^_ z^L-WY>vX+di(fzsyjH&Yy02c8Q>-jr$19~>G3HH;qG}$ATvK(y>bv*t0-&&Ai(JYU zm~nJZxaOIynF(}OXe+v0@b_k#EM7(3r&q3y+y4q!N(8P>&|mGQWkf&!{PXdy_&R3; zPta$TgBDKmy!X84J(2Bs=nV;aH{@||M~~N3K2X^KI2#6Ddo|ils@`_cHB}5cULBW` zhfP=fUN07Ef5w~zCO!F3*{5!g>H7KRacUS!1ayA^9GWt%m}kr@s?4D#oj(h_7@3EX zL!;};V7ysi(LQ(A`+PgcxcgsDqt0>E9iV&p&oj%eD>MjP zVt^Cuf$%*nD#(!&C)|yBInO&EaKSp9`jCm{#Xradz1;I7F8AYIkeDeQ6^HTTz6Y@M z#qEX7WE&DVu&&SI!S}EUr*1*YqU&WXKE^FjPLrW`w9{O63xF3V&FHmmf5v#6^6+T6 ziI#qDq!9lLc1qda^v6x~qzAPDR`Q{>y)J*A5C?KG>@P$LieROnl?M5g zCh(__TK#+f;Q@Vc2PddWC&kgxqkr#v-}_=U@VqYdX9^Xn_m_y{gjKxG5hv9~(!C4d zij(C60NYSRbY1etKv0JVR5@h64#~ZaWOY1Wro~6s0+XKndfDKd9JRUCFdZ@lrV3Ep zp@vMq0GM>epm~z_q!Un!X{+!&^mV`&&*NUFZ@gUq^liGf;KgEr%J%YQ-Tl9H+2BY22=c(D#ek|~5kS>~{=NS=8ldDJ zhlU6AeDP+^oEhfNpD%V%9^K3QmjEYr@iSe-v4KuMsV&tXHx5(Io(&6*?JI#{l#);Z6KhucgP91tx#Ogb znt;fNzPra~_w?C?{t)L8wE?LITCfgBZ^R*oIpP(!6}A=_4;EOz^|7*>?!V`f*#VPN zIb_*w|LGFI=hHoBuMcETG95;gCF@>P($FHC%uF^^skthkoDC zdllSShsszJR8+FfiO5=eB)bowA~yotrTmt@cr9?*zMbX4X%}ASVBHOX1pK-iPnna< zQ)t!fanU5V%lE>JZvPWD)+0Ne3 zy6K+%e{|i=m7qj`@-V&X_cGxm@RKL?d|{Rd)&zNR!GZ8R4Np*M)v8rRxr|fRBl_&x z@+QV`xa?DOYjRU$3VYbejk&5~5l?$ZExxA7%yrsv6 z1uoy8|6QlfN zy8tL{(PEdF1(v+U3Cg zqWK#LX*Df<@miqr2w>fgou6lQW?)VN>vU3{>U28*`(`XkHM-Git(O*?^wP2^-L3sb zxj%&)m0Ce-fs4@sH*Weyd02JMq?FcU+WtS4iT2N)6%NcfuTzh5ZO*x|$Z z?u0Qq1$P2HI?&VuEjWAj?4mBuM|Y?&{$ENV@0L97owC2ur(6?scX+Qn_IyPP`&O6< zk?N$hSMMbAdM$ooEiiGX+X0yECYk1#pJ(7H^xgN9*Hz_JgrCd5?;(8K+`*1Q=aCXH z65W4Ps6(sWD;Nolb^$OFR&47ScNSQ(`-w2~ME+)v8P@%Nw*L>7hrMyljYaT>tDxd@ zFIW94OEBWIztl&-7VVu)%J(wL0>AsazZ-PqVCu%294pRPErSE=db7A>-nFm(mB6J& zi(Tv%xNPsU;j)wY4Y9WUKQO_LxR?L`nLNFRBimuuKWxR`imF{j?b#X)p{n+1?HP(% zMXcIl6m2PLws!4RyEX}GxAv$Vdv79$a z)s~gQJ|bma7#*4yIQ`S{ZpuPnQWQ^c%juI=FM&|bf+@#dx8g{>l<}e!3lIbfLhGdp zhLxCLh>c7JlWTpxaKWDCCKF=dGv`q*~ zAAr_NBOFc)E!Q9NdpP6Pj@gdvda1nt9`FEl2EugCQdTDHW(gQ_0~!t%wLvXjjaziy zpX7|kTBv(J29JGI)!Moi)7Kzvdn-2lM2tF&MKr#^IU)a-QUa4{+oS?!8*_G4>yON} z!5B^a95%UVxU06AN^wpP^F{k(oRme?30rBF2N3v1Q^UqT1wAk-B7mmHZz5V@Bxxy8CLGn!2TDe7WWXUZmJSWH`zaHF2CW8j#!u^*zM+4c43Xb` zL1jF17d1Mmd+|x4C@hKe%4g)6U$@{077KEy9$A*y7S#AGy>VXhc#cscq1-h*^d8!I zUhle5+cn(tzi3beQx(Hr*LDkCI6M0bm5h#fkuiCQMA-x)%C{pK<0e7M&g=g=^4{FA+{C-Pvt0{Yf}8!08A zHWqu7=!4#URv7Wq%QgJeCERxuX!(B0$~Ntf=(n6d3*ek&u|E~Kr^|kiiz56&4A0z< zW$8{&lTfN5Z*&58A_*_IU;qjxX?JV^3DEb@d<>%7Ki?H_149c1c4|9Ub(!2)8#iQd z6H-(rIkSWwe(kZ{)tb`^Z#SzU5C6+c%QcP+P5N8_&4Bkx~B>q`X5 zx||fQ@7={{)`#d1StiqLj%;!)JNVeLYq^NY0OS#>R$*#6&wo+qp(KK^9ePB8|KYoo z{gwPvIAs|Qb=~iu5Z?)-gcOHyWh9J+1ykB`4X7~p^4&& zjX?LO>s{x#pN{{6|K{(seA+y~2Qa}tFa{+QrY87ysf_?1?J1`}F{x?3%f(`$fos1{ z77tPxTS&L2xw=m7U&ucFYO)#7Q?ZoVcQ1ZA|0h7ynnHN7O-}o5kd;`b=St4;b?K5- z*MhO(F@`_Pzf@_RnaHJoxU1LX1bR7b62*l7jQ*MipS^`&`3 zgfwH%kk!ZIlkoRwXL)hn*8@OpZpQndDliX6nj5v&~Qg2eBFd|YDxXrLhM;Th!l=8%O9y1D}%&&-G-fH{lMWIeEtn)o8 z3`|)VzJpM1YON_I-P_Y;*F8Z>?h1BUG*+UI={Ytf|8~I~P13}kkYl!jvI@l3I!L{` zDu+mN87%l+Dn$P)P z3u5B>gXxM?xntE&Q_)#}WT(L!M((6Xse~3x;B3vd@rI*I1pZfLika1&FR~XUJ0DG! zjd74g*vzJHT)}oJ-f>9uGUy6w-SeO3d+^g_tdfd&8N~@v^1X7wA+oD#4C7KtFdmLe zvl4^$KU=0_CbV9rg1Tk2NhRIVWwI3+ZTX>vd@Cq7A#ShLvm4Tl1P4ByJ&lE2g}X)l zZ9gpBJ=A)#e=o^Itixr>DqhfmrVv%lS z3?o~kN4r~fxbm{}7dk4sK&vw;Py?AhCNyBEs=!(|VW(?o&c*~h`r=qp9kF&XOM2xA zrFD1+UpOhiv(y)8FFS9@c@<44;si+e``F@tvj8CAA3c|TIv6r!CJiU03HyQ(X)Ux1 zLMo~JC5j%YM#V0s!pzYs!WKfIeLc@S^wLDU#fxb*A)tVpnB+B4X+FnjMR`~@@8#6l zlhvuhU0$9pG+N`u!(D*55gq7nC)-UY@Mhp98uw#7CVv6?GyeLq!99NW!n0mb*% z3qQa2sNm3Htt@MMwJ$8?Tw0e+#t~wZBv4h5PrH1Qzc4tse-i(1o&L5KFGj5Nv`lE7 znP9?oa>pD|XGhXK71L?>)Wzc%ERaP0>qS0Fmx3Bn~WpuH)Oy+@OO=d7UqPtu&iQkZEBiJfPER^QXI2p4a{ z%2cH3)lrsU;O!V(xaU~7GRhAC`PM9pu_l@EAd&s(>vLV=P)6kXW@?#7C-$Y z7ClU}E!JCS)fO(a^kO3T)NILyx{EpCp{E4-Dr(}@o7(aPNZl=@r?E(@r*lpy-xTx* zV8gw`d8(ju`mZoU#|!(Dm-o&&^P_p)FLcbRqm_rRDe6_*7jT zn`r;2^url7qflJdVOHOa)UUJo7wOr~Z$Yoy**P=d-QP8bI97+r);yzP9o%D8M$>YL z<$Y@OO=wqN9iDY6Sxlk7#C+roRTpe4sziKsUEV3WLl_bpvUj&RTo46mbYiS83Uu4> zcIFI!uK71AIoz(mUN+1|P9UM7++P1BjJq#YH6lLUM<@Z9C4n}t!nv~>u|;Y%d}As> zEVA-Avh-()is(PBKnM309WUMfqYi-Xl!{<)3qkLdY!$hBi@Z6o?!tJFU+e04$!L)x zOb3t()FuoTQ~?M3L=`X#y@S47A_%-5y$~~Q!p7=~^M}zF%6d~jW>1LKooLyvOhP|l zBdKnGcwn8lba%W>c;0zNxh=|XKh|gMc zKRYQ%S7zTsP0t*b||6J`raEFV(f1j_|Kvw+M|Ug=ftEY*X+a9qG$Li22qF| zYL`NXEI$fuO#f(_n{bmvQyVr`-%L~5bh-k%l~hb-pz1w_9Z&dU(=}tc_+pioqjgtg z^;h^TqqnloO#pYRmY|SO5Vc-nrOSUgZ_T7+c=$@%xVE@zVPLT}wvq))FiF9}&HL~?Cm)Omz3U$}~Cr9C#^&RZUcTOO_YIZl;WEpVs zM&?l4`c@|Fh3p$;Z8JDqc-m(OOqTWw`a#7b7&Dh59mFSw%;@dOv-`kYiBlk$Z?k|V zC9BZOO+JCi|1eej{M;Qs&%{ie3V*mdM8CZ6FVf~Zyuh@mQgy?^Itb?_B%yX`cZmB8 zC=NZ<>)s?uuy@DEqcDUu4GI=D=KO0eeopSzR~jz2SYc zQxPP$()VPu0_sVu_>uJLyV6>~UbvGDXaOszbwbideyCQBnI^~+D7w)JjN|}ZeAXG6 z3cBY*wA#}{RX#Em9_x7Kly4ZlVByBNc?>Xpe`entbj%~jnB3&cUM0cJQ_ac`dfDlI z!juD|(8gAPgoVHkc7KC4el#FnJ@<|a;2T&>W;3IXJ%lcy(#6ie4XT*>3ipbv0>PnR zblOK^aSo9$f`n$mjiGh-mO$IFsS=egte5m(xo}_2?cF*!<&rCv<<9={^z(d(ZugwC3VKQh}je zl9+Z}mMFoS_xp1n1~s~P&e_Aut%}cDU*EDR_~2NxoGQ%MBK_8mVv|EFyxwFyrPO|5U!k?2cww2owlq92$?z9Rkm~k@$J&(OgNe^$`!ar{jFu+r|+^TO}X(XtDG7 zbm;zSp+Y4qvwz1TiINr0qxSSQ)7Uh2s{iTR>D`y3s%hV87@c19bc>I?+WO`~Z=G&* z>0Z&_v9dmx$x)gODv$Og3Cw|{PZ{tA9(ek5%m6~fuKX*Ti``Kw5rO>XndTI69|3%N zIlzaPg{j&Zg;#KDg`fVSevbsp+psYiKATYeZR<3oG%i5hrJ@o4L)5W|WcaQGTBM>+ zQoz$sqptE=~P)>8Z%4AZ}cOk z@+owNA(RXbUa9zl6T^&?OXh-?enZg?NW3v3)QjSpFFjZNPEtSnv~2h z(H?Y{Exomf@~pL{l)FBC;I$fC1Fr<#{5mVGYQ&!@fQII1xUAC!JUDyzPpVX|Kzkxs zz&Kx=eX8K+N*;mAiVsw_0a0#Ky-}%u){v_cb+L+r7U0#jZKKnWd5DLRATH~9ij@q)$Bc&lyg|Bq2V;c zr}{d{^wZG9kx#&f_@D!CyU`*X{r2y1Fj8n0ws^6uyk5vveZ?a#n%y_JuX)Uni+a(F zJ{w-QS~e$oZ0GF(PMG}5gnWzZJ3{%i=j#*4trEv0~cWR8`I++;^IHT~{yD=E1=aGg_sR&HW4xCNV1mnu@wch--N5 z8(b$f3jFF(?RvWsvedY(*lO|@^lK~aAw-`eCJ#?pyex7}fX*M@atk6)=8TB_$8qJe z=JPW67VMVYx#}J+y!%$YrBGLy#p+zRw>RBy;LU4}Qu$P(j{V4zw+1W@V*v`O4p0EF zW<7R%IrN=9w)ON?joQ{_6pzYLzrIeB^9Ny@(Yw)`^%Y^ENxPg$Vb?67Inu3<4PTv6 z!vgx4D;iK#>pnD>+;O)8w~hxj!P&Pk8tL=LAVZ$$Fstx2P1K|-O%!e#waQ=PLhO_% z-c6I0g%_oT&A$aK{~?0fe*0wi6N4)Zt)`#I0wMRMmD86m(aRN8#PD>|ocYRjEe{*& zlI5)EMys`G*C(vZT5;%FWhz|fO>86WpMH80aQs!?G)p3wF|5Sv1kf>@Y#oPu5-*8f~*Oq>8FH%3$g)4HYMDum;XX@sj3g32b4eTK8rsbM`_!`!R+bELTr z-rbSevmtd|A9Q|jaO`-y(t+Ndb6_O~Kt`Sre00i+!da)rNI<@V(0%n3W9Wp^F`Jg5 z_U4=TizRHQn&Z<&qokv3(y!kGX^-CtYzELZF^YoD8>rDH$pv8Sjsfl+6z3q2JE=ll`}MW46Nu8K^mS|RXG zy3_U;x}Q@-9c{@KhG*?@26s9ervPP-{BYX0*`adnuEUX0-u;6VYde6Dv^e3=lG=Ey zKmASfwP}031g)nYH|d;$M%5Bi3C_O{`(s{;T^amav!voOHR0 z%5q4pooRM$--FeMHf3d23MIbOqG>xuF0xA6Oz}AE{VrLH)t=~I*Tfnl; zT1z?If>YNYe^{s7;|fgriac6k9i9a^jrP=*X7!i#?^l`sB1dxVToRK7*=Mz0B45|1 zTZO$|xN-kbN8kKy-0T?#pWtFPH$pITeLRJT=rlFU8vO=g;UxZniUb*R9C86;wtESg z{pOzqzz1@z3uZ{3yqUcI_gU>sww=jXM0~ZSq$f)c^Lns-sPA2xL!adHTiZ&ZV4-4e zWJ_h)XAQ>+#^oQlt9e1V!a-fxQ6Py4eaGV3Cl@s}i8rl3?@FL3>2xx@d7Trc|@{$u{wH_BJhIqKzFNVhg2@-IIf3F8{y5I5}Gr`SG(PLVv)$DR3Z z1|qeQ66k);D>cXFlMVK(bR(ci{y4tMTAXSm#hL?xTkprl@?TZIZ?`~{TwLu;o7Qwu zN(IeM2aQa5x3EQ;Up7*tJ&G>S z`!HL}P|S+GNLA}=$+VSjaE_5@ID##S_WjUj4gl&SbSwA6G@*hF3K1uPy^G+wO8ZvSrw^ zB}9Nt5QSfi)I7fAuW7}6ADw(A_j-|lrTgv4wo@4FG-!}jC*?RIY`=q7=GT1k=h83T z$cgpRN8@E>EdQ=Evl8R#M3`3$0{+hilRVU$mQxh&Dnj3^3U5-lQ*S>1F4pJy=G}cM zf_AQW5Eao5!FLiD3d<|twSRK`q?GxSm0md{BBd#vcVg>rVas1h zW01|WB;a;a5A8C&saIl$*|&Rt0#-LfWE=q(R$*w4PxBAZjQ3?f=Zu7eZhofXaM#=1 zSP*RRXUTNo(e{mFVa7iS!arWT_;Mm*!6{sI^2C@3`bEf}yhGdVS|aTa|DZZYj9;0` z(j{oSX^|C+o`K;uOpJ%x8~07AY$e9XulySNP!f3Ym6I7gYAK=cF5pV-bCkT@LBDZx z9VfVtHm4l7tIsojt08bd@><^$yv!;0_p{8yGAq2ek1PwCeGver!-d!HRs0yP>hG|@ z0q)MX;K65MQ*zRBlwjh1ZvTys)?(jyvtk}Y*fgr>mHEHlQ^a{>?yYdE&8Bk-pf{Qp zO^kolzbKfDN+GP$+H#gZA}FOCS!e^UO3-esCk?!*h6QwyyRCQ+NT`e#JAb)eH1=FF{zXy(NntYAmVbdmun=o9NK(t4o6b zqGSPkK;W;q3COI=NPYLOY{aLhs^MqeFL+c9e9uZR?eB=tc#cHJcNyplCs+sra0%1@ zwPZx8Aq&9LvLl_{;4!-{{%HS$U$Tax@7|O+6odXpc>`}aT%B;Nf~uJHzW4ro4dw+* z1~DAxb-lXq`F+U0xw;Gq*TL`Fc#Dy=8H*P4X!oHzL4E;KG`+jofAfbF^+4)~!Uh-u zCoz$VlUmoC8~`q@eFwaS?t#H?#E^aN|KvL&#nah+TIC z%*gB!$Gy&H?mwhf6~JXV$Di$(<;o$G-3q`{?iAfAs3wN*S1OUb-f4UCXfd}=Mev^> z?qF;Ej}{cQa?i^>gkBwB`<}=!@ppi(JEX!^h^D_!IcF)j-fll3Q+xQ;k53?n$*LJ* zJ0$1?cI;v!_IiKX3RydnNqy3+Rvz6>p#*0(OyWNSu6lXftNi`OYqjc_uZj40b5r}s zN^AEaBAmaI>FDkz_qQtENUjy$ILB-=!(%w$E?A%S4*;TE`1 z>}UGU!d|oK-JaTtCELT2O3qb$vSgw+rilPpXdT+i3{{qZF_i6Gi++RKKV#EAS$nZ= zCX?p7J|H)A#a-#Z`I`*27G5&8A4IWJI>?r|qgkg&wPtirp7#Hlz)-dD3FaKpXU}Ha zyM8AfkWC8slmZiw!ltaTp6+DDBiuzrlLDMTfAN_gpF<$T{a=-W6h>p&hoQ^YBYyEi zNRXRx4)H%{OExj`Rp3>b;*ZQ8A3DfFqt5CQ z4W_YWYi|5I6F7bRMu%EUGWMN;%==ew z&wMyGRgK!!=aG65xSe5VB|Tp+{g`oc+Frbk`@y2u*Lq|rI`8#yL$T|1$R$>3;5TiVGfw%yt88R}NC6 zqS=T>SWEC|w(-BP-R0A(#B(T^v!aTUiT%e{oExpYB2Yn}L=#K3`rc1$~vb2+5_qM zE}9-aY+i1HePV*a&B?4^9q{!y^8Ym&upg-iv?-BTwCDONHoW^eck>f=Z~|`{Aj1~>kjKibtIhVsxWLsWjDNOMQQkcpm4%KdQ&F-e znI;^X$SkhL25hf-rZODbK03=4s!rkmsh3ibjvW1>N4R)eTo>U;C1U5?cV(?wC!Gld zRla!pSuk@iD4pL@U~{wKjfQr!9^I2x!X|SbnbIG^f1h~?w_jC<$_US2JJE?ZKR1NX zj=aI!*^Z>)D*q~npYzLW_f8NsiY+@9%DtMU;JtL>Tc6Ux8Sd=de+MKbM8bX1Y;|F6Il- z8c0HPAv(+5lBkqw_c2Rc0_pPiCdWz^e!ZxxU<^%9>ldg2QBVY|&!U-z3D=-#$vm}X z|4Ipbh$N)Bc@te9x?R$<8MCyMZ|>haiq5bKq{4)Xl3u;i+CDT95o+Js{m$8lfZkaM z+HFR59#l)Lu@N&*eJfu79-j`BD*QwEJ%&1k zoGBWaniK!emvbFzjVa(iw;nA2*BY!UD;W~HTIflf6cN9uYPYbK|%3ue$x0y0e&n5n* zsDtAU5t9n-rQs*u-N*P;>|?Wp$BhSyTt1^9j6?H!7gnnM{nlnPEtfd$34l>wdgNrx zmii;#^xqhHjvHo*tShNw3Ik4@FJk2I?KY}>B^d8MYoAJDWkBAe9dG;3j@q{rg2dP? zzxQbh+gJk_NBj~*&r_FvOiu0Yh^jenW5?+o+~|p2h71G#_75%-Y#@(g9bsO*N=}h8 zK38WY-o2xr5l`X{9o+!wmB$-;lmGAQ=>OLtvg(25d>jOGyS`cb(612`6DEbX_BgCF z&LztI=7ux=MJvZu1Ijt$shhbEP$1XK7yWgk!)N7ocrPa{*K5#ErdKstfZ$72yh+aB zdDJAOyF{xdPaeZRUplT3Ey6%GxP?d?EWQeQc6!1Nz3{f3$thVMq3U`_h04GC7i8`$ zg%Pk;i}kB5oXbU{dyhPI+4awQzD%)kJwBNT10IyG;x z?k`ULfc4~_X5T;DU;vJ7SseD9V_*-A6>pd&WKpVN5kw~OCr|W(PxO^uy}^X3 zy~Xg%^`^Z=pYoR{+zOzo8w;jt-?PMYopUwCN2{JIYlN?e$m@yaFu%wA_J~er{`m#z zNJ+Xw^i4;>nK%hi$br`%H$pHO<2F5*AW?(-rXQ^ht(5TcNkL) zTenFh3vAh0aBtH=L=+bsqiyCeG7MnDzH!NBEsNmXzl58vIfA)o)+YYhT5-y~M80+H z7QGLZLIwf=9~{yC-g#|eO8GMAzqwHhperHUAvwR(fisYG+;@NbdAg1Edyh^i_)!$C?0B3zlkiajW!xN9vv)q(zEkJ`jY9%N z`?p^|eWZnPR@m?S)f|_Y`OSLN5@YC%k}a{>d`Z7V=9WRbE6>@>tk)5JO>y*s7?A5;b~S6vaSe{ z2LXgCL%vV|`*d!G@>BDoyhZ6z;Y84Jd9m{#yx^0oW*RgR)ZZl~&i8d`)o=TdWLy`F zlav-dxB-}l2vQHBAsF9M4P2B$%}w_|p{0RijL8#RjgP*`B_G6Oatp*Cj((9!}#G-<<*u7cBlTwKZmx?82s3gcjoMl z*5gI;pM~NXg7pys!fk7^)I)5j_1%6IU!y3PMOP=|m8=unFSZDJ>OK`8VD(5M8hh-Z z=(KM7=t}m++N7OVD~+o)Pyg=0nW)mdT~=p6{u@FfYaAO~BDllWuNrvYs#F3+3^I)ew7>{9B<;^I>7=c^>l@8U_q z!mrwE29Hoe*^yT;uFP`(^;^5-{l~bJ7t3@Xga_OGUL)r$N4A=gmGqs`%lHn#qTF3KgQ9 z%fjkqq5KSF?0$qC;wHO(gd^?r?$_%pWKE%G1-5%q3HMC0{xAYK|Kg7mJ=`(MP>bM*d))z}VCSYPkrwyB+7nAND zYGJ!D)mirhiIm0XiiyC@JNDSXeSteLUML-c5c=7*vDi$_lEeQ!8sHWp ze4;&t#np?QmG^Fg6i)xOtTir=BC!%ep}>l@ojB*nPBedi{yF7i;NJm5itR`8W`B_Z z;VL)3Z2}nab8QaUwFS>N$7XR|EY`v#{;YsXs10wcd30_#{PQD{>JKI1Ok%#6Vg^6_ z*P(@nYQ9s0QS`H?Jpy7-ldlu={*R zA;l;QrEuK(sB>)hIY zzZ1XWtLA?M!aB&h`Q6yDj^Ot1!5MaXuiB)_sy3!nI%;W(4o| zp84_C%FE!($oj`NjYTzsUOvvhxl1-bnk?dMOo(7Jn~7aJ+rJ}+4wpE3q^%9xBx=F1 z-;GZyI4F_WPRaJ&kLx7t2JMjn5nf{$FaU}W{>5U)l)(J$uOb^MAUojT_ID$V??yMT zj8py)^~?n|`tLr(3!uD*luC-lo6e^4Z6u}rqV+Obi^Gc{%W7$Lst3qZ`?I zea1AGz;{uM&(9ll6#FuFNOW z)~6`hC#r*x(A$aqe5upzG>C&7ah3}EJv{*tE%3&NUw5jPef~Ld z2=|Z9y{3~D^yu{Ltsttp!P>U%chxUD-ukb;O7mZ}8qt^IWlJ#B!s_oPjFKny8<}js zfAp+`z9Zc0dtlm@A;Eej_*PtaYr*e;$2*ao1hBf>70?mU29Q0Z6;GWR|BtARi-cZ( zXI3?*?%=r*)WX9xoURGJm#vrLi#*>0yGd*Il zK{t5Kk(9R@TM0any#LYBS|H;Co&@QG zf)&-UjH@HY#Zy;i04YNeVhAiX2)@%=5hIEdPJ7L`c*DO$r<0!G-x z5`tP-VW>jaV`W@#xX(?FrAI+?moKQnN4ogRN80*>ZBI`dNW~RK;{$sW1Ug0v%Y}4& zqYC*$2G{l;ilj_dftQ#19{ReKwO$(!oV6?&Uo)iDmnimR>12vvEoIv=QmavZcVU3~ z1-rbl#fK8_$%X$(MD372Ja0e$;yR2STEVp7WFcgoK*;nl-?JkYVh008BJxAo@|JTVTFGeras^CKP;_O(|fHdYh= zXwl(BfiOZYjs_6|!|$-Qt7hV5+*qF>Q(C9W&#J1q={N~+B-U&}b2R6$4fd~?coO*fb2<}HC*CW^o2&JvNuz4^;Xu23tsTc2HOj<2peot6oNHCjXb3(-) zLI+`PL}c?sUUT@CiNaQ+F~!u%b$eVDH2=)?zr)4U6Pb@9J5dLu+8NRsOuLPQWA{)- zX_ZH$34=GLh?AEDxR~tMnl~2xrMN7875{MKR;ttJw?^!_kTfo$lG#yrawHqU_i>W; zg<3Pc&!aQWMyvu22_cOd&-^eVCP3r7KB^>&kf z4Y#}{u2RWaD*4kg;z0!XbHrY%*8?2ek>AjJYzDE;N)v;$16?iXc zRv%THn4J=a7$XY3<0+L5(6 zm-X@UwY||Y3r}kEzVfHQ)w7b*y8V2jy+E*UwaL&_FV<2RB@qtsKlakW`31UJ>!6w482#7Lm9AG z7gPXl-^1>RMN7>tzRL1;8Oe<#3Yk+zOaH4URrk1H5V1lD?$?7nI;f(CG4@sHaEu2Y z6M)(!57#3is(Zug-saR@WYm2cvcF4N{{I2gMX+gJ-5qF_?Qj+A41pE< z?$k8D$LZNEZ`O+;y?sz--AW5~>ZS8#$X;L5huJDi+C!%d91?A&M*p_pB3xBO17We@ZoyU_iE6a8WO88-)E zf0rDt(!nC+x^nYG<$_mF07ll5(^?7<4TNzq$qTwq4G|>t7Yc?ov)83KFP7DbNzem? zZg?(0Y4V}ck^tYQ%UU?^{axIP^>RMnEoA#I!G4qC>zR(47eRd&2QXb7EsON(k6?_H z2d(peXncf{9DS|=h^dit=s71S2lN)N$0j>6nk1zaBH3G_E8_9~q;;VG!4w$(Hgu&MI6xn%W_B=QH#S6#DcJ8tvG#N#YyP+yK96@7}p62Me zrdGG@&8~;UDBjesZtQa=zC4f#nGN8xOw1E8m+b=6nul9U15e2?DSF&)y?uuyL1ak| z-VtplJ`1^dqeu`g2El<>g=|?Pc?t-T(*Fvy79VAvz&-rw4hw;5Q~zam(~btOj!R6Z z>u*ajN@i~t&Mu?YzpB6m5Mc=4i1II94u4tFI`K&RAC~nih=gV!{$|RcqDkzXzt=v` z?Yul(#bIf-E%fzvo#-w=`Kdc$Z1Va&fu`*rnsA0AW=ajuPg+(CPelmEVgX5w|XIe4VbhZ5Q;>B?1A zUZM{3pYdZChvL`JjvbuE;=yS3Wm3wc=~c27Msa9A%aO2YIw1~MFef?70_vJ-8BMrO zT9w;)6b{5jOBAltv9kR{o=V;OPACDx$u)u17aPH^x7Rj(>rBHd2+dEB3m#&7NOWzq zx8+{?JFlIf(5Kq-Eq|@!l2_X2_V4h@m6W5o8QhimmT9;+@CU{oG6pjs>q+%hL%H=A z)W^+#LE{xl@Ao5oO-Xm6p5J%`w~;NOQ#vFw@62W2pHrX&b`*CCCNOF1wUD1oyfSs)RN3mAFhdI56 z@_*%#V*}8(DCYe}L~P@9=u8(q4Fi?fkKd+hcyGS0z4|sBWk4B9-eKvxH?Hh<;uL?> z*xr9{G41+~8jK}H1vL$Mf5f=D@r$*4E_F6K-NcG>>yN2`|-}n>Ccsz(DXvJ z2QjVDg+sZ{AlgEQZkfIi9MyreR_3aqy6=5R!~L>`I#b$La+KH zHN>$cj{btNtSOw@}jMujkAW=V1*LVdpkejYD65!IN+Tq|g)+tDoG6 z-OLltZhYo68e$+YVP=8uHN<9+EI9wE%)Y8 z+ou_ROTUl}h$#j)qNmlxq-FacG9GuY<4R1I0nZBrS#bE7@4+0`JkgyfL1}ta*xp+S z1ZyEQDLEL5AiG&V3l__Ciek>lZ(JL_Kk^1qb9&}yTBsV7&vb*u9)B#kQ8nN^EYktWL^UhjL_Xm* z^m-!B+4YGYt_D)_^XpQ~V`f`kB1Z^-Q9JLSsewaV7GXN<)D2v+AzC;atwp=(sLhw- z!gbsZuoXt+L6E5MO)}^Y^-D3bx)@gCs&hJikZyz)Id3%o)X9#-C68j+^UN^#VWeCu z+?4J^PO|NPbFXsWW61gQl-S97`!@;f*3gCm+H|piET6Px3Q(?Z*{aS(5!V;c*W(S8#V` zh}a{OH3N`#5c=>Bkh|JZL$~rj`uzWKZ$x*dC3lD{2wVQ3tN>T5(q5tp_b|7>DkN+t zP@QFz;b?dQ1277hl1*_Q3km%D|2@M`fIGfJiO9S7kZpfzixkyr|oE_P+BORF62P z|I;K*FS^;O{DObpewwE0Q$L}fT$OURKoURljR`5--Y9zrc^o}tu#N!>zGCEbHEFp%-jQ)5lr2j4n;aIZzQ@X-se&o{1zehUSp+A} z1fe~Qk2lG6V0W;0UzYSzt%~-7d4giNErYq_IhcHBxiG{^Yzb4ip$F~7pCfoX1Ppv; z?Y@^5Y{bz}_6zZs+x@#fU7=8`uJ66C5gW$;45h>wX4p4*_9pG;yfE4OKYV|NeP-$d zU(f0=8+4lYZ91N+WeE>9$vF6gP2p1&S~+#e=cM~}*CzM?k9Y`(Q!O9Xm$>t%(M-}3)pP6SLvJ&#DZ2hX%=QpNKvZSPYv;}D;CLVGtArJ_ZB^aJ%F z?4IV9flP~!(Um$MyV&6R3&MAiR)s>AGTeIBgzKQAcPwztc}I+ZI)$S|o{|n1bCovYs+mC1OL>U)!i-42Nts2x zK=9jJJ0rEp8_NfV6R&hBuOG`SJe@VqYXi(E*fo7hzKBTrQLJLj1yja}Fry-t;Hj`= z`V_)bANHyUonXOKhC~LQPsa3*O6vIJ0{3UD6C8f@Gi;zja(k1{f75}^d0>px)v#8> z@rQ^mYQ?Y4V?>jxVJ>Ozc2C3G^SlalMYWa!#2OfX7FrW10!lgOd#L%&To|*~BLy;E zJQ~=3*8q^b$ceF~;i$-!QZ#?)(7S1E{*P7ygO1KvkGZ60BcX!ExpRTF*OVm~Eh z9cVqFH6piVVZ{}rcEYS(jk?1@EgFnDo_I-=kj0w~;0L{{spHU>wU0scq&EPSI)I`RO%&&Qax#L#L=IA-on}P6ms;h1tZfe13R*+f%u3>&Up1pe@h>O ze6+>N&CGLvb=Q5zk8J$?qqQGpoapk@h}`HP@omFoN^D|24ARxbvP^d0XEi*>CAK51 znebmxESItl}4KGX&Fgu(8Scz{EitrtJpzl=Q|FB2e=wyS9jbv5^tgBMbls z0_g^Vrhc-mHM$D}|2{>{M+!`Y10f1o1xoA*xpqX*2&t|G5?@aAFRsKt!)A|2U+3IR zrTOQF&j4PMmAaFO{pTz*N4$C|Pj&a$ugIgXb?o7$jSA!mC#Blq`xewFdvBs_xV!?v`p^ORrfbx9>@sne_aB*B zaowXKywzD{pS``Z$?El8|JI`5WhN7B3VxNK&^IKiujc=w=`0_j?4q?l3@t6ffTZv! zNDV1nA|N>;C|x2YEuBLM2na}bDxlKcCBjhB9Yc2w49&zlp7)#&_dl@jz1Lp*TG#rm zb5%IY6KB64B$v3HN9Ow8>TlA`-*ig_gaxFx3LX;rZ)Wl;e`gpgY=gRuzLxp}10SLa z639YJ+vtg=N^T$1^2@l)#?x~W@li;q2o~Ql>}fB?&HyuT-LwIPqRR547>7Ig&Uf?j z{%_~R{jGKKyqO6CPWutTJfDYq3ZE-^oaM;{O6^C1Ge0SX62G8oo&{Af0on!5P6;M4 z(yE5cOmTiI(wJGqVQWXNj7;o``C`+5;Ebma1gj%|58w)A&k?eemBA4|vTJHU2DL6`y0U`LH7%G9cNbKht>c2eQxvyuqPc*?Q$o51<|2slm zm`(Vzz7B)(JMJF&=;aStEy?_X8@stxBXD!G??J~H?|**hC5BS@cao*b` zP6?LlNGjV=rs(+LjR{;wxtJmppM5LS1NKn4BNeUbXR=1K3CuD zFPq2bOBG_@sySU7&J8ynwxf zHXOq1EsOoclBHbH*WilqU{_#AevQv&a&cLxd<^k6-_cmZ?SHwC%P1azpCG|uKK%j& zIIa-r_r6mW3xAc}N~++RBZjZNLrre#2sZjn89v)hwAf)fxEBFeBxy5h2VXn&<2)#Okpg$TQH%>@(4|RJ8jztm3PF$2G^cdA= zJRMtGA}AJ0ZrWD0`q zV1-Giq;kT29GO5Lvu6->cSB|}irG1c#34g)AW%qHTZx-+Xl`Z2_c|Z-?CXyvxp6N9 zREa<5?k1}?pHl=QV7%wBdjgS}Qg0;TwJ{ad~y&JWmIltQLNz6Xx z+E}%9*Z9kL59Z>p{W3>qRNcx4NoX#d)id;anpIK1dZk~b9|1u`&NRb-U3u~Ad(3*k zTVH~aX{lGps9*>J;u}=JZsMNU8_e#mxAkc<)%Ef2%lDkQ-x#Yfmlmt)2|AA!#PQ;y zGZt0+>i>EDkLNOeI(S{yqEF=d8gY&y_0?^e!w0L=P3IHYo;-J2+Sj{)%_W(Y4IV=N z^kS)8IN*mKm&Q=MvJtuu&Z=*|CGnUxZ-X{DjPBL5X3qa(0hpi7KG7sMhTpmL6r^A| zm#*hmsM7KV^gXj29nA!xeyu4NY>|nEZndjVlRF!^gxtZE_-O^>F zYCQ>1nsdLC?nx***bvAHZK@fO&jHKLm7rQyPj-?{c-&QyeYT-ZJ|@#W`1cWFR}&WC z-2Jz{t_y{M_(VREXIqMk!a}!5!A_C|_w4=onJ@Ww0daSCzL(Z&sw37Oc zeB7$MFXa%oE)?b_K5q<=-cahdj>F!Oa};9;GbhUQ_~m}84d-s%bTF`RzD<)nrF@IA zc2+rfzkqVBL%uKtw+{WNUw=j2WR$kVQ#1}}oGzISY+?ZXM7i~$4GJ4fcp9B&TlsB! z81Hb|*<}{(QKQ$S7$bt+ws8Zp8gA;G+%)^i;m1IC-PN>g3ouFUnKG{~Rnr2Ez-P_C zfM)YLz5mS5WPvAo_GoN4`2VB4P z;po7%6w>3C-eU?9s5NwUR}Igkoa)o+Q@t^D-$GrS0*xT=wxXALYM^dE8guXR8)jV9 zhm-WDyi?C4>q*g(6goRCq9H`hCc@z_wM%UqQP}%fle=(vDsSi+tOunk&t_K5L`b(= ze=!OS?j(>Po~Hmzy!lJBjiYFHFDW%3AJ5L+w0}LILdArISt1gp)^N1m)S<3P8=)fjy10iLm^H%2Z^v0GEft@KyC1qw4 zH?hEvA1sS%P*F50)Rfms>ugawtc9w7nf`fG`g`N#+HS7?vcUBq49aZ7Hqj9O7|q}Hyvz9&(-`vvV!(Ws z!iu%O-2NbMkGp_O)A#k)kB!Q~U}Axn(!T>gto!FUH{Bl6dj1CGtRte?oyi$rkTO<9 zfl`REC()ggLvh*kM&)@-NL_P^j=2 z@yAn=>)&)^31o?DrP`e&`4oGkT%`iH?5qPD{Ry$e|JI_1+ms{F1c#72dwJ)317RiB z8~9%+jIgbfXt$DZsEmxFu(0B3o17w_@KI!v`Pk5^2BfKEjr2Bof64!(-7H{yjk)sh z$qo;9uB$1{AfAZa$Fam1u9tFkmzM~TMkQ5D9_Dq^&Dv3i0PtuKGZ5g_h8KK){kW~d`kfTf)_Z5FES!(KiyH(#I>g;jXT=3e46Rw ze3gvOA{{5rr#7e%Tw;5JQ-NY;01tko5}@FC+H;DAo3;q~Az-8Lu)-YSsIp zw4OjL!qzer-N~HPkb5=9P(wWyr;xdi!#pNP>E2`h92aRe^Qq)E_ZU9}Ct8%PGwnhFHpkIbj*C5O6!G$+K98!# z)aN^&pN@;Yd6hO*B>c?!VZDqM&zTsSEEH) z=S@BzyHIrO8D{r6xyn!PKY$q4Ww*O7Zv}q5tU+uZfWmF{mzdu=V^w@6Y0Y^-KtJj4 zXtqFYGCZ_cmn_gz<*|gHAHR-{i>s+&0KL&J zmSn%|hU7HOC@*H#l@*KDfK!$3*eCri53=3P^seK;Xyv)~n*szx91hAgZ!3_9Cs`u! z`-|_|{UA+FDpNPH$0|-ufZ6Ed{QyW9nYtWY7iU#I;q;+7hYlQb4IV*d(KG){Ar~kA zv=F@KA&OBJid`VBiVdA7^dmzX)Dou!@ywF156EB3?gKd@iFm%6-cy5(Uhn#B1&GnF zli3b`8uI0xj!ii?AOJu{%pS7Vswy<{w+fZPPwjk=y5^PUBxPc%74b{tk7>>)gb^XQ zrhv#fN29ick>Y?S#T2Kjlkyfu3D*RtJ{Sgk)BM3;Y3>UK(9^vAsJHTZDhg22B`3bS z(kHtV@i$J)8dq%OCwB*GFiD#$R@{N#%%7mDHEe(9n`r%j*N*MXmL-94f{HQiH-^%?KFVzue&^YLt30teyZt%W9L-)k9$Tx zNKpLBmHv6pcNtMOvtOwl#2n1rKak{yVs~dSBLd%J+U##TuAenKm5q-LxHMAcU%%n~2PD)jANB74ee)kR3l(y|u)~!Z7%(mo z>wy;>WE4@uIRdDwLGP(I_!Eiw5GaGjnY_n{Nq_ND0zuE&_(LptR}om z+)>qH=$$diA;zZ37RhNj!RwnmZyPvoTXbAg);RyvdU*&D6h!KitYv@Q-qohj{)2K~ z+**?LHemu0BKnrVjV`~2IsA=oT12B8O@2$Dw4Q@&ml^wm74D{ao>dIsPH@f`yM`s3 zb-q#Yx&FJt5;srLkx4w53EC`P13lNWNt{@{J5#!!qx=_a!jIsIO<9T_5Ma6>YCT~ln;8Q!7_|+ zODM&I0Xb>rW6@}301#+$4~JbL^_bGtr_7Nu1h>`6ICX=L+;+98-S^-0NAFKus9j7W zK7jCeB0Elq1EM^?t@1zPddoQFtbnmU3HQGY_YT~i?dg+-KgjJkQF5cKA{h&y7U&NJ z7$M1IT`e5n!rrUNP;n;w3vMxZIG7!%hdXY=>K{zy7&R)dPy@XzI~;=)XZqNFp*6rOGHJ}Co7_Kw3}-`!{hSevrj z%pMJKC{X6L1XsJ7u`cy&h=3w0wX;ACqlR>H*ND7G-ZP;uqdz;RMN13?xl4k9M+8ls zgwJHoi>h3&8W5X}f!x_9ZdSOhEu9_j+2kW9()mYM-SYjme80@eyY3-lR&Xlkhj^)}5#ZuCdF6$7Z$}+sjQu@HZZ58;ZZ0b0+KsN&|FqJ6(7whUZ?F?Wf8{y z<)LZyhdHK&wm7*%c@@S-;KmR9C+zv~s50&Y1{JUQI_#X({CDsu zzspobfp2i7Je}5E%MZl3XkRR8N?yf2#=%Z;wr)?OFa{cVr?~ZkEvuP3;I_eq_oy5+ zP5ndNS$3w>EO2kcq_;?T`;BLUXJ|4)YF*KP2}#l)>S?$YtsMMxYHtd$o~am+61zna z{T3MNzus%n5xG!50fFdR)l)|?#Y=uvDT3v+|aP zR!Mn$mo>J)!H4~&Ff&+Bp9xxt_cL!WFK<&A?Gj<{72XP%@@p-LgrK*lkC&Mo=>>=4 zvi@`GhXn2sRG8gec9{`H3c_29!=diVK7~r1-gY_bRkd2m$P%mF)EEWlXfu6Jf1{?? zluX|E+)4JJ+pnSc4&`CD3;9S;3~M0Y(%FzaL$Q;0<^8MhhpssXIj_ZiOKLWhXK*R? z&`Zd?u=B{J1vmxgD$Cz9aBvof7;bv(aeoq0~}lc z!t!p%a|>E^{=k2G)&=W+cJQ5RgCH3GXi5_A;!AMyb1?qZtLs-2OU=gI%pG zBTD`s|7C=BB=)H*!np?M4iD~cJkHo3TM<)7Iep6_EkcfVT(??IV*-?aHvgE_5osrg z`D`t5ir-v)&vflSa3nFG6)2m$7?qs*)+YKxv$o!^O3duE2Ft!TkBbz&M|D*00|veH zX!jp2TCqI5;w0*i(?HYLJS=jq-~ML#7Gsq^)XYkv(#%O(;q8)#*oOE&Zqp{?sIfLn zxu2xtnN*2UdC&L0{-=Akl@RM~0G;`A_3gu*{5HSq^d)Ra?vfT6XK;$j0^{n!B&vsu zF4^bUQFxZhqNhn@2H^-k07#$!AW)zNkS4PCD&BwWkg7@X_C74GyzK2_^+rF-Q{HxA zwNep}32i_AR%jiqw6nKr!en()>f~GI`PB7P4&M7kcHdtb7QcAS3`hi!-X~B9CLj$4 zl+0dCORluv%}8H$+_3`g`!xBNxA^}sZQa+Ko^N%|8K7llrlsqX$;M3w^Nh*AJ>4XR zZAt@P#Y@r0x9H3$bNXMkt~kxuhwpL0Lh;iYApC{R)u1WYZJrfH5+?n<;h z`}^Mf=Dks^v?G^qZH8M>4rhB;{J5E!sZ#$ze`d-L%HIzv!X#?~G_CMq_np2Nk-L5o zV(=gS#?xbFNRY2ruVHLce`)_(^3&^Qwlf!nmE=-gp&H0GUkH5wCvP1D-}EwL1+sJK z&mntB)@dSYNZ?w5KTNZuZ9NiDll=rMwG# z>&S`GtRIV+!w}0zQrxqk4GH-VtYTyMz6ZcHmO{>*EF!?jz=2mDI59g|>XH4wO>K8tFEl+fWc{g;V1nKG=XJKKj6AaWbG59Hsf zALaM({+j>EF~>F>ddc=-I|839M7f#5SBaPZ@7{09=@0NJXq~jWXt#%vN;;IeG6pX` z=({KxDoMp9Rguhz#VozbP?@VTGlBhEcouG$?LWU3<aU;a(PBY`==M--HLw>(g2|$77ovUj`&u-?LpAPqAwPECIwqXz4#`Fs!Fj3gHB&2W zzUw-}zs+ELqF+hik*uPp`S$HoqcIVFU_`p{SC~gM)dzUUbM+l&iS!B#2r9mOH*OA& z0c@v+ur0V}+z|d{2Ersi=SW~z3D5hb=`3pi5_GCZ51f$;u#?f)g#DrKGlAP1y)qO9gp2{8}VRGBnNa`;I;VIj1v%x{H zynr1G47N0`e=E`L=RKWw;0ZE^N}fRH)kbWNyj$Ef86MIuQ#4>L=4hN(kqa zln|BQP%3}@Zr%1?<*vb&!!SozbvV&TCsM=y;soO-1qIQF0A{amV523_4DlWyRHP^~ z)KqjOe=bwxR~PiWOk}cg)>&P?%|~gWVe@PvXfc&({?0b4j41Bnr#pR`$CYxK_Ui@I z;fM!XB)(W&?&3wuTra>O^r-pxh_RN0-3_co!BS{c6ji4it&O>i|?3|#H9v;&v?cVCH z&LFf`N3%5b&U{rkK#FEPAoeUNC6^DNJ(G|Td1Taa)m`_F&HIJ*sts3zuq_!xluM+S z)y&@sJm$Y1;#RTBom460H5C@uHQ@A|GL}>DXl1m+g%dPOsVM0KtUbZI6^V-vi1l2z zU4i-=p;914F`WSi7S<+8ox;)%4dciq?x?PHk6%JXt?v&NWHWWsBYzwlwsE5yadn0TTPQkLGPtvO6mWt0P>t&w#jmd%!w|vd@X4qamr1sX%($;x% zMAKc_QdgUK#X|GL1BVRQ+aabSn$BhbT6I`7ooccnt^##`N{3+r@JF)MP632|yZlaU zWL}KVAZKT^wdS0cTRaW_85G4f|0im#BUN)z8BbP7**FLF4W{U77maGYF&IF zU$2m%)VdLT$jc16aT5>z*dP3o*Wn`(bc2IERi`v1rC7n6A2@aNyU4;>yPl-U^{S)p z#vHwjJ8(BlTLUzGI4sPLWL*$`tsBaOnmjB18E0BS@9?6IZ2oO&1THJlFF$~EMmIXP z*FwkKamskBZ*W5S!LyY7)f>VJd&v63(o)XUMz^D8V*@*g->&6AO^<7xq^50ebhFHT zq2UEo;v_T=uinK|M+Y`n8*W!svU<57X!h>UG*dcS-o_$6xnw}?#^ z7GB06AfFI;MX*ZrVM)7Y;ZXSS9Kma$opLdnH32CKWSTmfBl0d1h=)54`l8N-H)2 z{ZUrXm)mxqe_ehw@it4mroH?x;Q(h%io-Bf%8QbspVWc=Z0|TyWI^CPC#+RO zl54T3CY3K}l>i{fC8cH*P}lxc!}Mb9TN%R#XvDyc#9soN+*7Pz3b*<2-av zH*kq%l=z*1Q!f!GsvXaY!Am__sGF|zh+g3<_5wQxDI%`$Hzz&b+3Xt8Wgnq9v(JkG z_^^*?d4w~_Oo>oQZ^oo}Thap?E83n0LiZwU9wFxN_e?-6bx?nS-cY+hXEre7Ltt|Y zQQ^IseyXR7yb_bn!JboIelY-HDV`U}L#f*jmS=*GCY?)XtqTo01g>~rw30NPA@kHC zQ_D2(%&{Q#S6o%K47Mhu*IzCL%DtRUb|Llk2`DTUn(B;F_c3~e=LGgpSwxO_t5VDTj zpLOReXg{fgpO-e&F;0UU4Ua_1zQsL8h@ilm9{Ra#mLsxhCz3ZK&@1nWj%j@^pgeXz zknB5Np4(;htM>tx)UFk3OoCm*8e49;uZYY{l2uUot@0}YJ_mzEd&D5qTzLIe?m3)` zbuZ0_oozI%nZI(NkYe~CC{>T2x8$>5w!j4a?w|6+R=ldeKcD?rek@W&rNq)JL$H?I=0 z)ED=%X7BIKhiZ)^>3o0%H6cZ=3gS78c|cX5*$15p+f%-S^#|*Bhx~^|^XM)48c9Z3 zd&x&?XYU|-)n2{Xn?jG`+eEeDZO`@OcVo%OK+nLR8TGLqlhRiqi<7@cQ3rL1tZ6SO zhCy@TtAE&05RhcxCos;##=lKT*Q$8W+r0pBjjmvF(Y(T3uc)hzn45$`SrC!2B7SDN zHWiGb>5)X_gNd`&R_WP2)GdQY(%AL$y&-t2vvGs;a?MWed1`y>L(hsAh|#Np05g-k zoogN{GY3ZTg9HxO+wJXGMpPIJ2hzj~zpOL)$d2vJdm*QX1_bPR%F>`Vk*m9%k0JOE zH1~=j802|QCuVd4Sz56h%eb-W9K5kx5!?}mvE^gYbtMyp(}$3~M<;!t!KFSD!n6Uu z{VXi*I*0a#^+X_x^|*jjW|ZM&9^kuySCdXV{y@7UcUT58*Uwv8I{PzJEqm2;PQk+W zqWibtLcr;Wa3$!gvi$y6Rpt~@r zlp`ND6#64|}a#`U2RBaJ(Gqqg|ImL8be$O$nhs&bMAdI9C_UJ|lmE|8qv z@Y#1@CU!GcE}PD+w!ThGviY|@f7FBu;{B=k(*1-ea1Mv9=}yRbmggv4CBG(1zwDy~ zB~_Dy-((5f|6RUFt#E5+=!&zhlLWQ7?~I%mPzBlvDDOCBP=IBVFt8m~?SuG+Qu+Ag zBMfsBQLeJ>OO~0;VrBtGfW}Z5DF%h4a$Q-uEjmB1KY3~EE8G5;Nen*B1te6&cRdzz zNlzmR+?-2r(V}8MJGlAz+)?TKK)lQrn^Dap^iX!iiZ}GuVexo(g{`YJ2AT9pSA0wO z{3rT;>mvb@k7XW0ue2YXkJmG&ct3yZN@J1n19YH7327JM1FBC~AJ3(}w9+LZiy-u! zwcBTz?<(gmsrz^kX8*Sl%YKAP$jjW8H=!0Z3!dw+88&8n5%aF}Ril`eGWYv_tH})= zKQW6MfRC6TTJ#rk0(N}lf(8F2mRmf+?zm@g-R+Q?V>a5NcH%_2ELc#SV67`-q81|U z{ftEGv4c>{GlAtOM?b2iv)@*G&=Hp|Ccrk;$#J~*m9$uwX|h~iOnkl%-` zJ`cnh)8MtFnFYveX=e>M>eidOL6SkMO6`zB1nRd!{sIG^kO5S!LLo1y9D@*X9m~y* zSmdFn`%hV?c1Ls_7`rFYoBhLdK;@5&HO+xwx6odHN_QRxN{MTL7$X}h}z`maa}P>#AnV}oh4D1dljKrCG76T-tK+?zr<*f zM4yB|ehBijuL4JWFj!^#9pGW0AX1Mt14+aftoa$K$~Y%HL8C;4?Xyj*67GWBUFiq=zS034m^$47f4u3~nTC!f%9z6MPgkxFwRx4mm#dH2pF z12o9sUJywBm40sDM~_t*k_tO}V@e>A+yD*bl6773TV3KD{jMd=dc2r5bP4rIxoa3| zcwn6CV*x1P`O{|UF_jXhO=rtTm0BruIZ#=k@%BLTdJk8)2VE6G@6Khzy7QoDmw`YT zzH1S}{Xbv7sQbv?$D$U&ebzkfP49IUP9bs$X2WbTZYV~i#PJyoEnrNXx?h!PE-l_b zy8nB(4%fD2t2V)Z)?=R0zGIv6ZsQB*Q22Goxl2RaV-^ZLzG_;8Ir6cnnWrP$gwLbF zLs<5#G(|sgVXg<2ZD@_G+?X3*HU8+{-)4A9WZbKB;V?7YC_a67)<>%aiJU=t8ezNCkqzdK$h}GhPZU_ z%tn4Q&D-Ed)_(Naxve^a0)@C()mr+tb!2@_^CureTKdK%RhjmcGemu98J6+o{WlBF z3zTHC=vMcaTuicv7(`eC))Exo1CkDHTtTtML=04zqveVaW>lJhdOQY8~QNpBYAGvMS}xnX}Re>S3X2Jq3P`NTH#D3J)aMbD}k-M*igdYax&E0<0f zv)!5b?Tkdmm^H6m9vnF0kdF!YW z_EW?IX2Hq*`T^0ORH#o0;Pg9@#?$^fg;%0JcBkb1n)-#p+4KmKN@ zl(u%wh^AP_$^=yoYU6UnF)a#Z%{_j`uddmUCX5R`5Qf!cArP^JOj= z+@~@e2`WUsAd=_nMOki53qeC8uK>mv?Btr$Ua`+Nw#CsKKaZ0mPlBq7)yli6oOM4u z*YBP%6_VqpKSQxr*mJBl*d%i$HR<5vVFq}j*ZD4tFErp!b@sWSrYs*YJ8v$6=tI_E zA-^?^64^p%W8CLFGY_@fjZ%18P}6$%xyV%zKfmOJ98tHkLeSfwXn*{(yK}NXN{uTq zYbYi89k)V%b>uharzY6<;T!EF++^V<@t)$#68%XfW_A;y6gRH{jX8&Q_u4OKAVt`k z<6F@bFyWl}HEl5AqkO0vjs7Pzp@NRRwOGxS<0C6{^uN#(>}T)&BMD$6KzO!}j&@0o(E?>Wb=on(S%#hB0|ap(!WT^YO(JfqE@hro$H z{8*?5Vy*712-E%`YUdUyo;x8~PHdZvXr=^7JQ*(h5G^CBI1n5=qT7t{7M(#Mp{P8x zmmg*VWuPd=#T``E6=3PW;A$2%K${(Jid02g8Zf2Oan3q_PYIC)=d+mwS>M)+n`Jut z?jG#1#LG>kZ{d-9;a7|t?R--|FJRa5R&R_H^$=&@rgFa;r%DTnGJ;>#hcUHEN)1g)I)o5tTmt_%&F@55z^~t7w6L zQQ1EzG~R)#49;>ayuICti_4ATTg(HM1IzV^-WiuH54p^8Ty4e+5-Nwoke^aO8={`s zrlP`O^5?aqmn$zo7xi3ET!54Q`A7jMkbL$Q&*U9zry(J<^`WC<5jKTw@bWhW)bWlM zW!^uFLcS=Nv3KVgsZIwU1ti5YJp7DQGCJhw@_p(B{~=D>z*_aJ0B?chk5$6k*$oN5 zzQXfn2YB9b`+MWtRax_+6Qa#ZcJ0&cHt|j5AF!{mN-&xXtcBhAuoo0j%{98|(XS4( zqOn-61}=Uc4p>xb9MksIJJVIyU3=X{;T^#1v~qpxVewZCzk3Da-qyuOc@_wqT0b0m zPnD@?H}}e_^3qHLY0&xZf1VfOaufS(2r!cs z^=&x6Qn%;z@QHDs;vU^YDWaQsiDk=Y-vXYC%L*R($s6PHnsqrEfWCw-!h5buNQd?6 zpefT^lnMP-`{?*`$XCZ6;hig?x+(OSMW{|jDz#L|S4^;zn`tLiDw#MtX`egBJ&Au; z%3Ri!qJg5h4hCp2oeN*-c;|lm=OC@vm=$H?hZeZ(6+wLON;_-5Dqd3QsC&5r)T$-+ zJzEfz@DR^`aLENq$BD&meVU7uV|A+dN^<5fUg!>|#cdVwgXM9;>1rNpn?FJT8&f+%F;6To z9A)|RDR!4tXgsM=RDc!$+r$clKA%#&8p&Q*rMmkA3o1e(y`2TQ^0g4~>2mGiB%*I6 zauQF5UURLY@I*St2xng%bi?vpe`4pyuiOR_dwC;-CVlUwtpSP|XcH6wC6 zmSNcO%Hka}Y=;@Z*if@#2(Za z+Ce0do#_mV%wJ-QDl|oJhHl^*Zoi%9q-cqYu}9HSJuSq99yaXAAorLe0*+HT;L{+C-m$37HWDer!=`ZuU;{3JTt zHL(7!ho2|jpoAhWYBdp77W|Q6*J)nCUtheCOa21aVe| zLI0{UnYw>%!P}-#WC^s}e?#fzEQwv!>i^!mZ;#&*A#sIs!>2SJ&8ezLtN9C<<;h_# z%{5P2caVGhi;G}?)_$?TM|rk4vJ_-ZzO|Cc#Vhs%GJm5a;@=n&a4Wey+(D)NM%X`^nnOrUp8VjYL0k~}?vCV4mPkHvzzdOSqYb6_eY{}NLF(MoNE@_TNgN=vuBGv zABweqCf$+hWS$ovugqeR*7IEY*(M%Nh=2WNSFu0b#)!aRPC0ld|ID#UZ-s8vNms|t zAx@OTjG&+LP0&4{&&e#d^PKJM`EK*pfx0=zHwdSk-#K@xZFK3(pTit5UQ;k`74YiVm!wB zyTfA7W<5M$TRKeM+rT`L_SlKtT19_u>o#50^C3NITsl4WlP#KR+0}FbnP9G^EBS*F zkq#QOz|Uo9#$$Vk`xa!Xg`GY$=K8yty$n;k$c|CWlX;zNsO@;;r#(*8^(@5K@o$6Q zZ~~0p?}^WuB)t5IxjDq;$ow(#<@qU%tTRZJ?+K89) zKK_-LE$K)TY{S>TR9!JR_^R1SvC|N6-BeJFj?lE(Lvx0 zB+fg;9^0$@(_pE7LbW^`a^4{t z7pJ=gW}UM%PPh1>txycx)%HES(Hl#I75pXbW;R5qD~ZkbqU%4$LaQ3eOniyXhZUo| z#3G&KXP8!1l`f)Lsp>M%;PEYnPjmEk@%jrJMMqOizHtM!;GBw|Y2?+Ru_9*;W@)Kg1J9}9rrqmN zrRIa2tlCr5IX)uwWF@tsy!8=FhmX_RjT;Ss#S4%LBw-5nUMv|w+9fX{X_25j2j?sd7*kYpUKvjY`LmmSBjLm;os6TZOa^ujO=Kepzj zDzVApXVji{JUOP?ona#Jj7p#iM*L9UphTye&9vi?zGCbUwTsP-+XkWAvhfYFr3plR z!o(Ti0LnOFd(2*MO>%YiTyuu;B>wh&>Yd~|#XL!y=PJ)t7i6q0c8VG_9#6*~(M$$8 z0vqx+lp^9_&h3aPd@8MW;pe!Ne`tbB~z==din67^aAX4ar`gnRjSN-Sb)2^+AB zkj`3kr|mpZ+oVB=8H`?NdI(m$+7|q|!1KE)gCU=Yfa$#)6?vsF?BLQ)Q@#CDvN&7B z&guA(-b7bL=cV|hyZ+J=+1yJ~3j$eSZa3w8)%#Vh&X_p7shcOxS>t54h+#2Wyp(3T zBq@wqVUE0^UH$zYzx2#BLvKpy^(rHF?MEIUenfsV?EIWVCB4A5fyVZ71+vL zC1~9ho!4W1`^37r1*DTi#X0n5Q&7@%V%0~_14Kv+rjL&2!?c?&K)~ulHVOJ9Q zosC=V_Aa=|U%cjb--`X{@yv(Oh!L3=0jgcPU$-SY-l-4U;C9L&X+7VWQ%+IKt$D}R zQG-CfZZ%WCv2OwBJ~5I! z1=~|L-Rghxb!9{30(Gv6Cc$8kjY%Hu#bP+(=zt>f1+qo_8m z<9~9tzv*Vldr9Y1wc^MrfH7R zAnO;Oy`ud=?wIgow?|b|;Y-L$K-i<3g=l2lueA_~$nOX2lx+B@AK}4xAmb68_X|W+ z_~(GdZMR@a`YK_cb4fX&3$;mz7zG4c(8#;OezkaFm@bEi#U|6s&&oYQOjnWQXL#s1 zI&Z4-1Eb9Z81l%g_!!3I++%v)!ncKF@K1;o1m>O$J}YUHB&Ib|x0*yWg?J@3OaNH7z_74&MX1+-;u} zGhNoZeBQ{Xz<3hB(4Qq5EWE$vVVv_p+7ol^xEiv~6tf-Id5RNEW5q8*MHOQtE!l~) z`Z;%Ly1M!~o#Z|uyWNg;p31z6Z$*Z)tG&zpx^Dpn7iWuZt#bB7Tu5H+x5PZZv$}H> zx6apMW)qH!ePKG7pWsOdy^EWdYzqvAC2_ z-g5yUUuC-uLuR41rV-(*EOCop`f3^;);v8#CsO^D&xznoN78%p+b&N4mw~y`cD|&5 z-ueGD@%R+0XbXPUrEK2D4gI^DKAXxE>`dXq+R%A@+31{$B=l7nkAkd>lOvmk|(5Bh#j=zhT-YZJaKuJ!_9qyr3sZD@S zuUl`DtD$;?^Y0+1m|V1p;ixpf*%Q*2!}x-Dg9hYG)-(7|sDdlHpMB&DJ|c2Au^1fsrutlEdF-4`=5}xo ze4xVWNom?9fG)WT;zn8#0A`N zYc##|>BP?K_lOb}(SuBHT3Rvl}HxK&nb^6+U0KMwtVS`e!94{AN4zFgbX)%=JY=<(^R| z1Bv{&_}>3Fi#MhHXhruiT?Dm?-jSMyR=#O2l@ zkJ;C9;P?5Q`3+aQh0EBpYo_n385)?$$h5aysmilcVmo#b?mvqu;1=5n-E6t5@i^Wi&d<@QnXWb2zd}4rP5)g5)fbg`AS6!was~RWtRoXH6x?gLFZC0PyatlG4P<$Vu68aWrVuX`11Qv|$ zx%pZ5zFYw1PvoSzyQ7_hz@Q5V3mMJsMF=7bW?UiGnoLL$IlJ|o^j~HPbZ`$`W|%^v zqNmZy@9eVIvnsqtq|u^oMa>RI?oleeIYKZtj&Do9Ce<4qo<&8b>QF^*L=Z9k^& zIJ=%PpzQrgbx;zi8N@9&dVb$*-n+Ye=Oxplbpwr=t`aYkJl~sD+0m&oUkUjv9SVDJ z_D4ZL`jOa^f@hxe0iO*t+iD+E_S-g?UuWL^`<5v6TK+x`d+OYC$wX4xEgy+vB@ zdviWIBUs~Uj~y+%7Vz?PRy|X4gEWa48op%5%e(5VhJnct{L zt%cQ@_pKf_AZOoGvWodBvU)L-9tvM{#D!5Cjt%jfWZ@5Qh}x`vYr;oJEG=m2O}*6> zICV%glgSJy)VA`LDQ3tvEl?!@n;TCxnM9hpyge5HU#=}JP8KdF@*1C(>*>&R_a%`+ z$QAvC@0Gtau0GGH*&Cg@pW(Z!3#tVme@Aftwc!0Vkym3~RYWPT2dp=rB_}qS-hMKV z)Lqau2BFt%Zcg1f&id#S2Jgg(CKaz# ze9LlkmPXS4;u!ey+MhrkS*_XYQ0msYKnHwn-xa{OgB~=??K_^n|3$0E@yS!$@6Gtt zNrEPRkHL%j0|hpm=EMwZcHI;CN3UKT{1IMm5FmY zLBbJQ0X=jjrk(oY4%(v2d0~_r=6}50G76SbDYA zXIX+`Q#VUa)(so01@nc>=T`-u>F(#Ez$T^mZXT6$3j4!yj5L)|=;!TUhKHZ;N*)dm zLHRhP3Aqe4ci!L14bQ>Q;LY47tTUB@Gh7b`pE}964U!8T-?lRilZ*+zbMk~tUc|jK zv9P2aI(_{L7+BR2P&ai6JO2Ry-Lfsj~!^O>MHg~2yJKDXa#oBeEyjqS8} zZh1(p{qRfAQ7AoU+u-D%{rXle`C820)9DMxMYP6YEJcT?PJBBrmu_sb_NJoj zP>H(X5SiBoERaKi!e{Y;BT`3=!xM1(Qut6^JM7L}kUc$bxiF3+4ZykQRnk47qWYsy zGrK)roG#TPXdt-2F=1q5*hivG!4JcEHP(!u+ej&E0zsd(gJW5 zluRUKxM!AuO>4w>LJGIyy9S#w-BUP~%FAW#cH8Qej_9MlO#df0=s%bof#(eg29 zQ|<$K0dOD$XZ0#HX;4~L-oFnDzBhbFk>Y}lF(y8Tl8###{(98NHKLJp+%*(p2Dpzx z({TnP0!>&kIi1sC5_+JPQ#Hde6`N3yol6uzcP>-2+m6!jae0}aiuBcczd8HNc2Lw{ zhhz(w-`~T;d*QrotOk39Gek(8^OjQ=MB03kT~x`jS2vU{PE(S$o$IRKsBY8R(}ef$Enad zz#lTQVyCmgyu|vonlNIt^a8b|8RT&SnDv`-U*uH>^_JY&phb*;@!H zAY@tT!mncAw$*65g~T#{A>W-x(DPPb?8m7GvWoRjxyuXkWP`gf7~!oz zoRXOPGj^OnDBCn%8=OQd(A>h@eP@%K%rDyL77LPi;ASYJKcg>DjoOqqG8c3PfQKkr z%)4nFZW=*d=vuz@pZEt-(8q9&6!#hC?ZDNS05+qmyE1jm3cZH6rU_uLxgm`8X4dN+ z&)qMnC$+vB2=LHzhr2&hXk8IK(R`krNC8Fdrk>S{6`DZjL6x*_Ozluil5|l!Q=YAH z!UI9F`G$>%lSbvM(J{fyh|UH;#RGkji%6R5l_HSM?qn%9Avqgd4eROudAK!6W=A+T zg=8jeoHQKW#&^ok6;<6JTu*C5+D8EB&2MYADcFCD_^lxo8Uib`(i1Q$1@65sWI*;p zs)}i!p(#QGv_WSBe`G08T0@<-|GT_LQG)iqUjI}^VC3q+t9Wwurw%#Q@`cx=Oz6X2 z%+?VI_bV_!Ge(&H3pQ!ypSEPVFG0*T?YG%jdvN3u(mZLYY0?-Dk&CNxps|d=t?PQw zam6E(xskSGy8_(nxm=BRa~_pABTS4|xqTIX&BrDM4Xl(gv#hCrPt4B&+4FhV$X(5) z)9S6^5WAfzU8 zmXtu7UsV8N^~O-9q2C$dx|6rK;n`HywWMp}w}NHVvvcpf^){W9cfy=GofE$6F%N<8 zTS>U;0m+1b@>^lWV+k-_R7rJ#VgD3t`uJs`(4NqH1Rr^z5?ii{Q&PmFos{# z*|*!OUa)c&Ces$#LqXMwFsz`IWlc;yVH+kB!(#40C;nzrrpu6gJ?W(f^3*{&5i)vMTXC!G2^m}eOEQ1iXy#S}#NVk*#N5u%!KdL6*iz>5A!gQsT)a9R2HnD;4e zw{!sAN}3DQt?-rh*j03yh!!`0mz7-}ikBO{y4)b|fi=ASFc@}+)iSen_wr=#{Q4DQ z#&f+B(G~~+{Dq9X{wJLOIB$^G*Pud$>^K2S;kv=wP>>K&TK~t8;-157v#im@pUwtbXBa2LH(6 zYdzjQ@g`j%zvBasnT=t*!(HeDTw6X+yc6XQta17W-m)injz41DysmT*}W>`3RuHW9Plo}S! z+1sGG9p^{K)0>oD6@CoIF_jM$&$@S@kN4)Cq}SOSO2Lz@ke9IISLvD)qvRgJE^gA% znD%6j*Y=#f-Ju@NF+CbzB2Ss9CoBVaGZ%WqX}ct{10e;?BntmeQW8%1Cxz#{hI@jo}13FHwZ(L^m*(w&dy0|GpU` zEb4ouj&g~zzWl6SeVRFzr91KlU~)h)toFo{eBXO1Y&6oEkx_JQXio!^5wLizDA5}6 z`U*X-^zUX}0Os%DNQ0;fD@L4#E(UDpT=Dx$d=`J$Sr<8g?4OlgdiKp`r}0X==)Mt4 zAL3o$@HPhZhb0U7ld@}{q>iAoYYSSm{w>Jf{3Wm3Ah@Fs>QTB2#R=krB{$Xds87V@ zOCF3sqI3D-jFH~G2`S~iZDwsphjnvp!(ch%i)troP;lOOiYi~}+@IrnUShvE=-qmT z3X*yEe3vT`dye+_8^-ZFo41a_7w8X7{5h{vbSV6pNu32CNSNd_lH#3^D3WyzeaDJE z&iXMOJ9b2)MswlNsNuG9+x5|(aodFvt9bQdl(2LE8J*jjwDHv~&fqo?$l=Jxv{6nd z-umj}h7U=>tj;&jfmq{He$@Cu z_6_=X3>==pY3=2GUAuc>a2pC%rTAE?t$9= z^(R7wLpO?rjuDl_`B@LTr8p9r2xrkx3IQ6U{IwTX9t+@R?oZ)65Cl|xi~Yk3_FWph zsRe#V5=`O8Oxn-BasQnQP)SxWosL2*h#7K7AyTPCZC6273^(+drHlh?q`J|EX6blm zcAiZ~J&UU|;t0Fp;>1mZ-LpFT$maY{Hbx^iYLZC3UZ9udD9z%(A9sdgu0a z!6T$Vym3TL{HJ)BSi)~;XA+qe(9vrCe4`}lCH#~$N^$9FBy28t`1#h)81*3vTg@o* zvAQZ;xTFKYm{5th_Nc>#*5NDOf!8*lITv+ST8Z~AydCB#ii~YXq09Txpbh%2RSp+_p-Ex-8frr$DGI6HcC{!YuU^&WamS2N z^zHKX^qt?$4vuTm5?=5T|HEm$`!hPj&XwP;aq8u-JrM_mS7A_tw);rl4w8-78rLHA z#j&20^~j7QGq;?%zxRQFBC(U1b?vSc z)SCa*$0_ns?O=cBqhQdMbyW86Jpx(er?dDSMNQRs_Yo~MHV&l?G1^Ipmcq80&v8cP z*#V;MsC+MA<%un-NIQx}Uq?kxjyBeK=HB_o%&U!B1nY&`#k9EN9yuhqS;>S0bIXrZ zUTFzAMC{grNh|_Z?a@Izx{UG2SeO!3qtZLhV{<*S?6dYt1_3eY83YTYKxF{j39jGRisih)F&PTd`Suwt&aYop!NrI+tHJ}gT5KfA-}e^LhW znMS!Q!Yf27$io+>Nf}MV!-s_@G+G?xv&d)I-SRgBdZwN$k@fzp)eFdEcPLs>_G8{x1a2YP>p`vu`mhelwQ zbmDvhO$1jJXhVuT+rg)tUDR&`usv+WZW}g#d z)pnto^-$0;+mjMW4oJpvc?bx5rh{Sf(+|ldShN39ytrT}`Mp4LdfRPyI;0Nx1z^l) zbnB5O-lD_Z$0kdp;tph?Pyi4=b@Lo51jlhX`Z98}p^H~lc{kvYm2{J)3CKhT|H$eb zspTLATUEx621cSjV@ba3k^Vxa+ph;dPs)x*oA}gBUsQvS(K4)?wuU<@#?7Bz46dUn zsWpgIA$o>%p20iX&UnvYh_XyM{;>dB)~Gm&coqFZ`%GOS{VPH-Yz;Ggp+1%_!R=@JX&cnuNui}l~NHYUb=mvmX# zAWuL%`!&tQEx&b2U(SmRHJG@#Fn;hsaDDrCMU6}nkV3(;DO$_Q@^`}SkKheLh0~h5 zvS~o#CsBMuT5zyyK=e6?-5pv0V^>o(dW-^O%%rVT1@?CO(m)%``h!{(viiL>xrPcW z$<~ed2LmT%A=XBj6Xtt04+~g!W7UX+s3)NEbo$!Zy=sbtpJvN0p_{G{bKsv| zdnPsu6NkMVVZbG(s_rd;0QtiZiwXhZ4;MMtXl3vqS z0V2;LXg;m!QABa1cr3^Ep)PY`)rxS*o+6`0dmlfUUy(HWSrQs<-y0hWlUz*pI?|?_ zCcl@ihBdW-WS%yOZJ&HA1zrwLysW40{;9E+5NLZ_QpLn)khR#gj{lx3liO2L|0E8* zjKWfZ^a;vG=i=VVfp@uuhP+LOGUZXH;h*H4p)!Jm;}^(Pf&XwP0pm7&(((+|AlPA! z;C|>?7Wqq1hI6ezUqCZOS7A0FvmE&}bJ2j{wV!26DAnARTTkXOGB?tU77phtT**9n znIZ_s*XpFU`K?22Mr6|j@wlNZQ%9sV$-{R6*3M`TL<8-0{u7C%a%F$jR}dWZ1#2 z2C93!Y^wFg#TLqB{h~I)u63F9{0FItx#YQJRpA{^1Kw@?^d>RgLzmqroT|xekA8)0 zmRUr~y~JtED>%)hNYZBp$sb;FeDJvprLO_7)wHZ6VnYBgWUqGzWSNR^?U2HcfJz}?(SxhQI$JDw>aW> zmC#7HrOKIUlu<9QUf-9d`KIm_rafL#n0l|_#6oYJ?Bv@X!}FUB(WIZnt}*9X3e)#J zNw?8-pp73)s}0hW)GrT(!@1xj&nf&jlgGzC{T+USl*x~*xQVcj#OlN?HhVf=4lG>{ zeACPU({V_}C}3mZ)by`AVUM(&yL=xS1u^beG=4mW5kKa9TI!AUbtL70K+vcpM$TJE*>KApfJ`DuV4z zO%#JEW9`3G{GUFVyP37sJuBRM%M?IaWUWfP@b?oLV_t`*vyIh_0ljyc9hcfpS`YjL z7hH$rBU%~(bA&Vxxp_euBLDf!Qh){GWq({CsNu`#!YNUM)zT$0O{M5KX<0THh>(S@ z!Fs#$kTrT8@gHXz{P%JY>hjf-0awAYvo&K$uj97$N&fv{+H6*|!YGSE3p&beNspPR zU`6-}2Re6k+%D^vC+*tToz$kHK(dUF)tM;T`wLm8JVHyiGe(?b@o&iwgGd9mjf z_@bR|6s2%hc|wP82S3AqQy|}OScSb>d=`%Sm5I_ZzobY>_77zm8#=sNyo^iTUZM)H zcvYVuAdUz#ApKdAiNcy~M~JlyyG0rXcL*To1Yajv<8XG0=jt9%>el0Dth3$`vu!+O4qA>!pC%dp5NM5uNCV%_;Sr`S zF7o_!ge?08vPglqvN|Sd1y#!JN@TTplYzlKk-D=kor+hh9B`J69M=e4wuNLNONf1* z?9%7G)$>!jBkVkn97gzVuJX4o`k;gz2k(ZbioGIw53$Squ?WxgKPPJ`%pS%BPqhFX zkqfvgSIH*4x^oenZ$2Cddrskli5FFT6g(->a{S$UHT}C=hBdnh|8<0>@8bpcDWk2! z&-fY*%FEML5W(xsm@DN|j=~Ko=~HJet}Oq*0#e&?aB44yG21alM?W9^)9CUCZE}xg zzA_^r;S$GG#!)>DvN1D(jlAV;$D*^ZD22+GQ%#IbhK&RLI&juy_~4UK1Pm`Il)s#RFSuDht#j-@9EDQ8!hL7bZLK>tR_&!i5@p-f!U6Y5W0?%2VKu)U zO<29rz=yIVM6p^vQQJ(DzLtJy6v5E#zGj9Q(R!uNLk5)GviN%AUrhOYhb2C9cK-C- zuMi4g*Jog6Sa|Ir3VD4gvh}!REg4Be;>`ka(tw0h9HTu?c&{(}sKy#MGUw(<9u7C( z9FUqyv?G8fUR{|M0Lkp&gupjOk$_|5NT$1VJvR1qovS8bv6#m0m@q1M^Y7(h7&yJ{ zIOBkt248o)Ig+Ph;(vc%M#1uo9>YmyF>3176?9@TPd=S^LjmOrC=-Zs<=rl#O5E3M z#J@}wDV^Vn{_^Y#*?b!nVBx8?0NT8Ll49NN9v#&#{uq=9vj5U2Q-veNqGO3+%q%nV zg{tdgnqZ^4E0jGyZG0cuPnAff{0F?B;xhu9{-uqX*wGty$4sU} zVTXVNed@meBELD;urSCFmCJ_}FO8$u2ENy9y1lVAgq-3O>_-_p5=4D(9@%++W+^wU z7p3+*!Hky~Hni%j#gbd+A87Kw<#o9yG#$CHEqNhImkchD5-i~!BuBB?i5xO^(@2>@ z$XX%T=~5f}pg^f4J20QPkrl_0lC+N2Wj zp`g*X@)bJ58I))#!n-$JnRl{PDTbLeaC}!k@1o9{m$Exd7qChiP2JXY!n68|c3K6w zc#gL-23-H!qfTe(rlOpY2iD}p$zMxRD_7swmvgXr~>vG zSD5RIJ{?S|R}&g|XWQ8#vuYzSRxq{g12h&M{&y>(XR07FN*C}+j zZgu%jb3|C>aIQ)%4!b)^4p%Q|D(JE{xqmzY>ul3m%O`(G{Iv` zG!RGZ2;sMusp+d_Lwa5qvrBqY-z}X0VX(`M?AS50N&MgpGE8KE?XWxpdVpfDfb8Q@F#D^l=gf5k&r%MeTQv*`pfllt6;DQre93t3 zHUCOFqt-HpBsMH_2zdrQI2|OC`ukAD#eg&?{-COEWdoQ%_1rGvnKH9yJ|B@?yrggi zJr8mntxIZjlSwFR+WsBbd_x3uWvzvHIZ*>g_eJ+9Y&Qa0+JTLc0BpQ+T*cGU)-PFg zfL^vToXXih0M8xh7Whtc=Cm6 zUg2&yzW4eWdY{V@bf2+fv`CR?Bm#(sH`TVLFBAtS_TP>pM@AXBxx6^k1@W9m1QpYT zG@t+1b%X0m7VuDuiQdY3g8K^n>aA~^a`7rrToG@0K$U~!^6etn?d~D97H`jshA|>9 zw30E`CwAY{dbMB}UiCIi;K0DvgdqeSNhPpJj%~m=4#N%b-RbOu%+WG+Fk5;2A%%xc zh2$0M#YC(c5s$DJh6J?O({q7ikxT?0Fs`Sn6Z#m>;#PYT2EP6b5j(uxDL?4lj~}5s zl7rm@&HG-(35RkYplco9^pGP5<&GR^{n)zyb(R-g9*JNm zIIhXvoo>UO@H7AX2=)3YSFbpb_b>IX=*X;+ri|Gv$-zjw=O3bqZib%+aTrJm+>}Nz zj?A9#EsaR-sD3gL5q&VpeQtO(8_1Z+s80#teolt^u%lP$;>CGegLL+ZiFxlcZJoEq z%rW34)4oaBtFRjGxV(9C$a5HpUgp514$xsP@Nzfd);9b3 z2y$BB@_A;*+DzDXtfq;Ym;dp=R%31PC{DIIxTjfF8@@r_QPBs;Tj#J^#RTfUDU*~e zh?Oc|e$08QHjJzL}}i0T?iV@bO0_!sZMXxd9{mm zZ`~c(?mKqcdY>xaahDlB{v)@Xtb_iwGIff2LS zcHX6%#Os*7=lU9R2mat{Ru*}jh(U%ye=B!^&J<&4;? z0UOeaG(EJw-a!v>kZd>p`)vol zVdw~-502#b*9)_ZX_5!>0xSJa3}||hqfsO^=JkZctX*cG22GEDA#JC>E1SaepZCYR z2=uA(m1>k~D%?}JdooBhsGs$8oWb@7d|H&ukmn?qFOgkk!)$C@buyUPDVFnU&;*@d zA73m+eB-4HldN(w@~R6^c05p@Pc>2THPuq!dRbAPA%WX*<2;td`J3Cl{{wX8w0Y>pD|NUFq%Myk1 zytk>9roiE;AtM6JZpB2>YWgdfOS48wGsSaIi&uNHgQ1l4GW-^fY1P}zW5Xf9vPPKG z-0Xu$cOI8K<9?N7>-wV~J*1|uQRz`;K-_8z=41o#PD~BnJ?%$6|^qqi6b@uf3pDZUMfjU6P>*8Q= z)3!~YjG5o4DImi*JX7?P1ub8VnG2Px zmnpb5?|2i0q%n`FTd1EotJ&Vtm(u>O1Tw;<^txkET+w^aPAo`-O4T)t+i%W^%cz6b z;q>2~t|LGqH}|auIi*+oPdZx#e{LB2KIAuPljAp@_f?IFn=z%6*I<))Aw!4FX=b2p zRxjh5{Uq7D&eiIm6W-#x>>QsK4(a$}s7cerg=rABT&W;)I#=JI>nC4-J%4$SDw(W0 zsH^H^*Dh=-+vfZTjeuHi5@*~cEgrRGu=n*`>(T02|0schV}?MQC`|L0%dw*eV;hu< zM|d|p^dh6+wkDZV76Z|XMbm|{ko<>&klUsK1;;6-^XA9cb0$g+a%0N*KNB07pZo6X zv5TiXdlLkA8%QfG!*C69Q^11ccAhu_h$7g)eJKbl9tV;cH%a`|^3JMl#j=QBF}CsP4RUjS%OT8(Nwm%{hvG|^TG`y{OgTl|GM*K_ZGFad z;6_?Tpp(O+nhAxTj$1zh9dvl^Cgj*lPTr(oYHyzsDH{VO8f5$WP9EM?-(_3VO36tb zt~Z8=c%$>+eWieCCK%NJTuQfj= z_vHlwd2d*TTp_~VQDn#HZgI!n`2#VPKF)KEHdV1h^@b?PYhi1xgVbgw3z(5 zjlc8?f1f_`5I`yi-$56YAssU1@Zg>JlP;ZeYJ; z@8v9o5`%gl!JQ$?za@V%CmO{ME)vuK;twn_R-@!pwIZCNVt-F;kTJ3Sk;iP7UdQbL zO|^3C4?0<)6+$mqFGhriJ$st$`gNu65)XUbg_G?UNA3dLt%LxL54J>~m=y4tRsb|) z0CsaRaTEyiP(MefSm)bs7>PKE_?QJtGcn!T{d%ZC20KW19elpTjV=z^Ob!))D5KZg zG4+e+StObm28SFTKS(_2D}T?}#005j{J{LyxK${8pOVu{ao%an$Vk_AQDGuV`Zuik z_*)|bGaxmx0q6=c?Mr?c zs)Dpzq`7w$q+q#A4iQoWx^uLxH@S^Sw#^h(QdJ1OmFjMbP*u~TQx}_QHC?I_eY|U) zOKMz{(5e&bz~;-Iof=BE|VpSMxrvJT_b@K-qfz%4C*thLO#1?2ssv(O%QD^75d(VB?Sst`sU#vIgwC zban5Dy)CbkU&5)Mg(Zo(@dLJLhy931nOpjc(zyM``V#$D?^-x&42=kaRvo^=hrt7` z_<#(uwKu`6*8g%q$)sJ#ngbU@l=###>$=03lnn~q=xe~eD+phvCZO7QhNf83xrD>K zRIwx(t*rlLj4;#Mo&h$q`Hbd<9Jyc8SUF+k^=!LkH_gT()-m$_!ZYh$Ersb^>C_rs z9@_owYoc-><7=rqw&adog$}piCm!r}kTrQ6XMmpjRB^HIjAhbO1~@5pvV67C-D_E0 zZ8R-wo$qVTOhOVn9e4yBjJI1xpMfb>?vyH7^yWLq56Pb!;>4a)0Xak?Nk;#KP(_jz z$_*-p0VcO12M+#BI%fL*T^mr-Z7xOtbe(#rQPZH&0^T5PVB786trCB)?>kmFloJlR z>kYxjBKVRNuKwUt+>zFXGP6MMo+dF2kI_z%5=9;$HmyikI`48gk|~Cxk0DEsgPy2C zKN$DA{x<1@qa+yzFsW&dZIF_3vOx>p^|A7()_ai6yp{(-H{Nl3egJ9}#Ot^zamqa7 zpU;(WWg=^pLYv+%kuB}N0&A!$6f{J-r@Yduj&5h~7(d@jP#tJ8EtB_lwJhW(|3#ccBHPHn$ zZbb*MkxpS{E~b3>WPN5ua}|Q)gTwO6R067+sQDwSyzW=-_dE@lfiL%H2SGb@O#Iwu z6rj76s9vg|b#Ka}oh+KE5bH~w=?U`X>Xmwapf4nV$H{GF)a>nVov}}a$ChCMeGi{F zyjWu(Ij1>%pv;g&HynK@jQmx~SqVy|5lI zVXEy{UN6^`zqtKO`}TVTk!h1qUIK6a`qC%5z~(ZKeA30@R6^{I#uFM@V&E({L;h#gmaE!ZYIcV@ zpN`|7(!J+dF)nr?oC3+y`2eZ3X_AN}V{e6TmDZ}J8|OrLbPc;hUf$QZ7^B$XA-3pcP7va+rty7 zy(7~VxJPJTxDq(ss;Yn-CPZG87=q+%Xs~OqBNOy`MX;utUQX}SQku5E1a|^7I4Kc6 z=lf>CeH46m8>s1tOagn{#uiM@q*my3cFlxYd zVt-rZv#wU4N$1p>4(&LK{fQBji}M##V3L^IgKCH@ZchH0JWjJFZ2r>3SZ3B#3!N9%?6LQv$xs1F5+vBPnOh}gDlBf2eNK+_RiqLC?vB|I_wq?@ zTXdNs^*07l``lLx)>okr(uad2{4W@J;nS6+!hxWfU^)d|CZ9#YKZ7v=FmF>u+3oOH zvXxYUl)?)-Kcp{|aJ7`Rc(d=BRioCyBE$pOOkx(;Te_XhoPbe9QWdWgk2Ac)2i5Q8I)&4cotUeUxMBCaxrh4jR7W2)Lf? z8<6<6x^I~6^-e8r)G%%14GUp_aktU;Ac}*A_vYlpVEf85V8<5_KSO0`-b6cTqnyLIht*h{h>Up%z4DYIE3r$}c-p_>KJokG78&RQ zdB^YD!K>3dHwWo~3RM{Qt!tk-utj zA0cBkJOJDK($QWDcU|4_=N|%6gos}#{uy`%Y+IL!$Yq|+BSZPG$wTtqa#qS5ioc@d zBicQPU`IzZ`XjM3qt|o0`W#=vQ~)GBR? zd{4P+pz+9M5wc4X*%x?ksxO68*v{V^bHPvjWefey-pg_w9=R&qC8DLENK^!qEjW7% zlYv6?GB^6%OyruBo!0g`$m)%1_~aoT3iOm`u&Y3jvM|~QtID_V@fU2irCS~Tr!u`J z*@fqBOFHuL=lf0(B+rdY zfmlsK^eQnXiKX)7WYq5_S!XWF!&W9yR?h~wwAy%+b=8>V)0sI3&A(a+p_w`_ras`> zqB8itP=vRCc(eN%+t%eZUZkRI9$1|V#$A1iO^fdm?QWSd-3#ECEZy%RedsY}qv|+w z*@~w>p4gswd7%us`lCc9oUE4mA~!E7^WDVAn;mrL?AA&`#DqMnli|a^o>E?oL?z(N zBT~Yys?k@c`aqGSgALnvsM{kUub9QztL4at|70dPDUB3KyLP}zS$K!Bu`tLwO264c zm|&6L7~#G*Tf2pVUZXU7`0>tH2}kYFmWHp&h}U|CFkxXWR*AhB_~%@ct&-=Zp0xoj zDGU$3a*Y~^U<;M@o3R2!KTuQssdQiv#s~Da)$>nQ796*t2RvUc0WIEu?XH#pAYt)# zx{mb+A=^AMmNrgrnIdq#fAg^8(hn+<9){M63-C>X8>`DD25*2(JkAKWtZf%*t;s37 zqBHw3Aw;&vQ{sJVI79ZmvXOfH8_&;QYfEsw@g17M|2=3D@j)k=>(A)Kplwx>ewU*o9~xkN zNrX^)g6%CHAaNMm=HhP4kx^AMD1}`euH73;1Z^={Z6?fq_E^|te)p}Z;15+mTh@UR z%r)RKmZ=w6sTU+9^Ke#r8?m$oR(lfh^6i2##X8HKjGH{Ut|Y>4>$>~a zk7~i^SufU8J>6zw3tnExoU)4m^N(RtiBTG|qnqQte3CiJbkq$Id_$`eJV*?nsVLN^ z(?5eN|IVI^UbzjFHz`Zz3xnXo1(cvOY~&keD)Os3z|b7O6f@69Z_W)kI#kkJyqs(|&fNal9xM13rRg?F;bLhPnIZ_Pgsdb>W^K_72|LmB zUobp;5VpMOG91fH$II+6+O&gdyK<)eYew{XHyMNRcuCZFm`Pij?e!pjB(vihaIS48 zV_CLY8tiE{pB>5)QP0$jPSfcG=Y01uzb^MpYMS-K4b{cpDSu7z)nPp$ac3)At%p*0 zSZKUDuBMc5Y;J{`5=}Ij{+to&`UEtGGSZgfr~DhEnIkLip?z){Lf31XTl|yQ=cq3} zFlYGu+$nffxErw;GQl2VJ6FiQbhSuE>3^22wuJfJ#iwty;`mR9CqQoOg%o}zrC%1W zRjw|jCC}sBpa{ar_3&aZGgVQ zA(Ht~BBOm&iQb=@E$+V;fK_F-YyBm55WhXwZ5IDC)+J21N_9IOFSW9pOi}GhIWbBW z;{MPpJo{s-ivyB?Ha=Sej2C8V0BS}&y*tQGt%956Lc5^CbL24pXq$=cU6p##g?{Ha zw`g_|jM4OUGS9n??d$33B4!NF4=dZOjT6U~qpp*7I{(90pTq_2H)foE1DR>c*}-vq z>jrg+&&#jKAqQ`X7VO*mDI3?R8J_u_lye&uOqgJrgJG7PVaSh?g)aGu%|A7^6XIi} zjf6GbTQSrpQc^&5u8V3eCp0oJ2vVKq-7$NQvyN7#mv8E+C>=+iD()Mwn$o*0ZvwPp z6^ggH3kU4`+FaO9rYoD*ef_k$&5>NX=X{D9Sv67EARXE~-oM!?ryHt*o15l}f_${<9IAnvG%GAs4cyR=xwy{@i^V&KlMM?8d3cpQgMTDUnsZ+W-l6UlY6I2k{CIW z+!H2vCGs15Qs|2mh$LCu88i!!M3PV(J8$YsCZ?2j6zW z31`DJn(hGXQz;|9uF8XGLXie=lI}l3YnRUEiEt7Nzm{)1fg;oe%P9Ag@^Yu{(Os^; zBd1aCWn=XQLq5ApIfi0Dn$nT;4{*xj26c8Rb~~UU*j~lyXz!_?jjqL62#xp&_EV`B zpKrquW-Ez7lB8-pb7w{?Dbn|ynturwQ3TbsU4YARBj&SY*?0~ zQr@1WxM7=W2l@3WxgG$Ls1gN?W~nZGQ5kB~M)zK+m5r4P*Tt*I^u}b-IxY4sPp;{# zP$11W$EBFRibiEb$f5o%DVdDGX;I3&Od=Xys$9`!1wi}w>-*<)4q)5CZx&0u0|FLm z>B8hFT(`oTzwq)5UF%D{Un1^4=jjw)$HAT_aF=)T;7dK_U&JUMnXj8Er1CPtT5w;Z zLRhkG{u2S_!%SZWs#}?SXsee3tbY$$3~2d`<`g(_wQ7Ib)<*SUHvxU7!!D`$5sWh% zuxhUlMn*E-xpJc&b`YAZknJ@PzQQ<_5}PAg9VJzFII&mG;e8ZKpDJqES^ZXDPJ5;j zOSECDY}y*vkvZ=cwHbqjT~Sum5KXiODsJGMOe8_=ek`AouGw<66Jf~XuD3E1Lr4u4tQa1z3xO6UiZ4f4N7%PFG@<~z{TGe!z-Pz88 zJeD1doMUE+ccjcL8jP?`t???6`M)36KmB{N)xyC-RnqNhF+bGqy?G@v;y^fP^y*2k zCoDYOynFd6UwhJ7tsg9S5uU>=h$qbWFgi7t6%QV_oS!_=OH|XVyAO$Z3a{dn4QBiy zHGSus^pmZ!Z{L>HH@_9!CH=sxEGhPJ;=Z!D5z&5x;&)RZY14}dMdf_ur%ymByHbN| ze_^Xyb(U{3E&H$!^*Y$SZ-(R%u6R#`-+uGK8}DG>$@9JD(AKlrtKI4|{i}4J{l>yX zI^BqZ-G%1*`FooXQv2IA!bk}}_Y0POq;J^|m{PrnaME!EXkfDTN2|lePT3f-OnVOw zHb#f+&YCY(QUlj#e>NT|9M7(9Qd*Zcx8acKi)7hr@^48U$JFNvuA|I%BmklXYk%+C z%|O&#P1SJQOO6h$O$V|*PhA;gr_1-#Cm*IWXOIQC)B0d}gt%P&TA_fDqrM# zPpT8SK!Toz0|(D{yMqS*W4-nYLUJg+@~@`E##LFwM^V0dT=0GADX}2WT`~KZ5!%MX zH#`|1Hc39%Kdg6H(C6`~&EcG$^E_e53hWwS^3OiIhi0UVWHtv>bFYvDpIBs7ubz_i zuN61ZDEb>~JllFcr0~fQJ4`kpJg~7vC`@~BIxWp?8FyjV15UbdC0Qa9AXMubl<9`d|U*ciEnAAFFX^X1|lQlQLlg9y(uc6*9kge$f?R^04K@ zKFd#6VIKeYMQL$FY*TvZ50?C?x5KjIVoPJoZ^Uj@-#?ApT`1H}kb7Rf#1hxb-+8(hp-o6PV6w^ybqvPVLG1{~676w~5v zw*2gFsp|Y0qtTphE7yb-0NL5PegP~93wYVGVqQ1j0Xd!U`r?9b0qdKH}4o2;@L3gxzf^@ z6CT`z|FzeOPf2G9Q?vT>s4PQNoatK`*0$vi&KI28hQz>!=K&WX>Ta1%ALW5!9YIE{ zq|as<$^9!=3o&PM&kOaQ5jxTKIr7u(``?R%WCw^uNzkZXzIsc`_%>h5WYTlF-?ISW z8LvSRkZUZ-ESDSjuiHD7<}(q|wWp!@RtnX%|M=|wVRhH-+J>cS(0D63?31j5l0;`5 zYke7Z7T)`{V;J42TC?Bgz}Yg&4Yd>_aH9Iuv1s>Tqk=~Lh?sqJdvaiRN=Ca$8+Q2o zjr77*;Ce`Pf%=4MN>r4{9Ql&l@e_%z6_H7HxWzU>1zkvr@6}5|!YeR{&ZBx&9=$ve zOyKwJP&M@b?*dp4eanb!5O}njkTv$_$~ybmS2tDoP&eTZ1%3_?4!nQUvW!8}ja9NzIwf`S1zn_jsst4DAvPc#!Uk&dg`vIbV_!y5`}c$qiZBo%fWnMT+aOqM*dL!B2~9ispc9G$VxL4ubX z(JH2&fLr#ddiit&0MJpwImZMK8)?LoX0Ce7#>$+*}3SS_cx38J3@u z%u&yILp`0f%OLo=weD6EzT|eIbMV*DbumL)4-8w-u%tdlxOQh;K#cfx76fp^(J{&j zXUQX~t{!`Y8Ua$ZJ{7>!rQbA=*Pto>y(V-5C|^^8apO6m27$(u7yf^p)13HvtU7?fl}THw+38IF_JLbEtt;CVNz4T$fw* zn!dw_F@#>rB7-f@HxcAkZ;-WQufWzasNOB7jikdC>`=BE0 zSR^b$rOb6A5Ur#A`JbKs_%r>+!fuJ1X%ek==jt)RbLV})wNQ4b0b=zw$r3FGt@<;K z&_ci$uLCV)ALMl{85p7;$%ot8&sQFZ;r;gjpXSewn8)_Pcf`Nl+wXuqoZXZ?Iqzqh z@Vj%qA3kMZu62s>Np>L?wq1#AxRCsK|L1iWunD4J=QbXEm@jQTR_^mC4c&jS-$AU8 z@T`m)I>I0Hk{BYMx`4XJCyoL@+vBhi=1Z|~$&P2L++sh1EQqmQ&xAzXuu(*urH($X zmMfvX=Wwj{lJ@k70?jflgA_DHKGx(rlZfOf^dM{r>7>|cAqIEWcC6UE=-QF)=D98t zs)^>$sA!xpC#WJm{%aQ&P!T=$7@@=sEHE_yTHXW0T5}&$#(`~aA5!D-8<-r^G zMgV}{vU;x)41Hu$AYGf>%o0a|!d`dt%J!*K)4$aQ3pAGCs2uuze3(G{n||4v7H`)3 zUPeIxk25BeU6bk^o5AbZ-ah^4tRpgGC?Xh>br2Oz-_&u7s^+WNQANM-24WWPe|X)x zVmxbKn5n_-X)13l^)z>Dg2g{Nm)>txI{@I&Sc5kb<23&#omiRjb+G75>zYbNO5j!? z1wjpJvCZk@LiIskZfM<|kLu`wPyf>RtmM}_d z{`y<%*8ly7np68&Ewdj*Z7x^{V6e`Sd4KzQvfB@JXNfZYQS6W`(6ei^Hl{TdG*@zz)bolllkY?{7S`B1> z%H&#a-w~qat4?Uj#GH%XSYBIY5yx#APk%1;#+g^bn`^&y>%%`#wHBiDyQ75?FA}!` zq6u5siwws6TZ4`Kt8-3msip3~%SH@E;FqO@DqlS8bME(k-^SuCv3UOyV;}+b&|$Cb z;^&Ke=s-Ki(2wuIC0f=}qdfdV-p5M4xZWSeLwslUBw9M!88p-#&$gN3>z6$yho%Uz zy0U)iaH^Sw3Y5+8ANW3AjX9LLPTzrOp@~*I&U9X=Rd5!BRqV=zPb#|`nw?0eP7Yy0{A}oW*13}yCDYMBr);IxlJhn@w*bue0&JIXR#&!HG$x%D)dp3 z^bTNAmQZ;4exbvCp)i9kkm*6I_p6ww33I0y-|VF#6X9rId}zK=R#|8A@-y=f&U4NU z+g>LnqJ))Q?v}!Z=c{>FxwWoxC6TQ2{mOifKVK!k(VL>z1fo(D&nwHEpZ*(dD3uqU zZy9>?wxK-fN2E_%wb@7;xg0=x^egh{s-u7Bss>FBrJ~)w=mL|&yc~pA)yCLn(|BVatY+5JmK%o zB&#mv9fd##{nNj$UCqD7Hse#)YPd3=^ON`(sKgO}Hw&`no|JYp^Qo;U%8ISh%w@V? z6HTPbsf4ncWBfwQcOFXKHc}!^Xyh|5i~UQ8R7irNSya(23)mMvZU?cDcaT4u1BELK zx>DCP-&6c^^GvLu;fHRTQXL0jHVk|HFB58&&Q12I9-Dko+i5vkub=iit@?CapGl7A zn>|%JzD_(ulz%Ai4Lv+M$qUV(T>eWYdpl@ zxG2Psa{InaS!S@9b8iJdTdtrNs+=b4G5;~Cz4w~l547~J^etnjh?Pjgm`=(l(d6Q0 zw~hI`ps_$g!BIWD1J3&H>w{n7r0ZfEoX#sCXFz`7_82VQ7jFfevSEA0>J1>XtF?M@ z^SF|qIDldGLRcKu{N74JDz{+AmZyH##~31$(mmT8Bs$H_T*qW%KCllCm~;4X3_m#o z=PWinD*Ta{fUjRK#x_Cyn>lSLC5F=uq2W{Rx?7yq1c&u9?#k(?E$ojv#Tm1`D<#@5 zYk565LyK;da1Njg!B7pseJ!0hHakPGzo#8u^v*jQdQE>S2z?SzU>7y`Pv~3~7}_$o zA+w~Pt6T!26lGp&IOxen|56RKni^o6v!0lq{8Q&OAL8R3)P(<|?6W^j780BB4=?9x zdB~>NOH^MT#~oVn*}9uvf@cS-EyEfu!+c{)!hfHCTjGcA0EXbOw6P48*C@J7P~Q<3 z2lV^bXH-RfG~dJ9&0#=%dw^LUT5beB>oV(NKL-0Li{Hm7>a_K^k^;=(1FKXK=`F~{`%BoPjWu`>!daPN`Zlzi;2dg#_b zEv5fNgXZ(CiWy+&J>%6Ow1$3I_TH;=lQtiN%EUbz^M7PN+p&%bAKfV->ld=^(86Oa zze{VOqS3rk@!`D-EVC^{X-rUG8WB(dWIi7+6LB^<5Za=D^V!QD(wqNnf+Q1;gOzKY zHnku$GI(c6o2*c%30tE6iB2P}>q@@9arpzrQyE>b(qUr6njd&XCKdGWenOb+gRM}P zk5+CSLh%t2wY*J}>NP>R(_@y`s8R}+jZg>IxydCm5n(|L47dN?aP#W{c>4MJ1$a#F z;Q_)~q!A|hni`0OG~C|~tR>TImuCJbPM0^|ojJOj%MjF)XkaQ_Yn>&1zpay@P4d_& zTDWf?oIRn)#^-czj_fZ94Vcl;n1Cen%!ys#~gR z_J{3lq~y0vE6u~VRxE~7c#H|EDQ4cv5Od~@5}w3#lkcoImwHKhWlxxqV{)Rn45Pm{ zx^(@*S_OGG?SK2!`0scXNyY62)^rIY>&c_z*)0Q@f0j#HT4m{acp?Lukm&-}S!Vtt z%WFV|zVEuL$zFAlZ+-N^b}UU;IS5Ap>n+?2l;ARiZQ=zBugF1E6XBl|eX`#s_OdO9 zo#R$NKlIv4UakXxVVrfzCqt6$fwt!7`AwqXvp~qECvI|)Q?%kG#%Mh@Buj&0ukx3q zcpe1tH7-7bK-Wl7!ff$R*X86AzFls~=5yp##N9D`;K=Zf=8v&?K@%1siNBU{8){tp z@|rZQ*;W;^HC(+r1&l_C6DB!9d1y&(3>@tRH|o1LS#;;^#Di^mp?B0PLn*iUp{3SI zJ#_uoL?Sc0S2T`90|g6O)0B7vq#=sqUeP}jGtRigIwT_@Q@p5IO+8$o%Rie43K?*} z!8!$$D&CP1KOM3d{--tlYa!g`9T(CW?`!sEY?Cw42NulsrgHQX$c+611aoPwlKh@y zFES#@)UpBcJVtdyQBJuajJGWMWsL%nt_krkcnD^rJW9!?FS50QjD|xK_nRO7^L}UMz_7{OK_0ku(^&t{#uJq zEwDB-u8=}ptx5@$n5j4|+##tL4Asv!r(vwLaPZ%P|jM)@Y~SlZIb4`1~x87LsIH za)R4O`RPjhYD-RH9qLK~`}F!jgM4Fnv&39o53{(I;CB>;2QL_8hIC;yo)0A%SF^;r z+AR_bK6}Z$&62-KVRP(_S2-7EGg%XU4CtQ94^>ZEMv(D05xO{>PKPXDTkZ+aE6eBs zIqw-At88#_xTkHH3|dbWSB+COrohUPtJXrbWr}zZ{)UzjcE#V+?uxAtv>v^s)3}&A=1< zq=MCLx}G1>ci0IupRUnk_u1G#<~2aQ`|S6MNg*8QbS0oZ9&$bEY7Yl2)uuk_w4e`+ za=$fn+{mJ$pd*VIPPT_-BEz!%TVbz(0e-2?ev>Lkray>_Ia!VXR?G!RGAW<&eszVr z5_{pX1g2PkU<#orDB@Wp7k=RTtk+)w!@PD~GQaSXW4lP%&N*kwR%Bkyi$5xNNn|Ze zGH%moti=VTt)M$37V;?ZX{QcaKZod8VQ}KaEF(`gx}8kAA}w*{m}LqzE9S~qV1S_Y zW9%?^rTAP*E!&x<@W8`o$08yLVH-5(ZLP$cL_de4HvQ!S+Gg+asVz-$4}OySH`WGz zTUnq6Tx-FdZvbu{39aq-2jpK-{F5OBRw3tanFPhcH-WiC+0P!7>N`K+60Lsl%xX^2 z#uu;J)t^G{kYMPVrZl3QIAEy|Ep`VD8pNR?egDC+vBI+>Pl_YqnY!aXx|tWw|Jo5Q zH^F3&`&nYB=nn}Sdklg+8zP*NZ8FM90-0y`0#PkgxG z{z|F9@mu)fb2k69jgnoVNqfyOCHSri&L9GC1|ecjbkGGmAehS?8{ueS`||r>WI9xY zZhR{ja0O!rS?HWI!M52E{WI&rX1Awj2%u3MOH2|;lgVnaf~B9u7L=m1R~1b3CvclJ zN8aV3PzTx<9Or3DAXFPsE*qz$E9M|Gg0d>uJ#HHZRL-?vrc#yf%I#B1wwCI)pvgy( z`I!ZyM1Lpora;3EIQDU_&CB}P3RKi=hq|zV=}ua^;CKoZ>L;gdG#6&8$YdfVvyDDe@Gej=-G(YL|zn!95;xKn8xLC z(Y>Q5CIg>)vUf}sdyD*Z{zb~2@DN{T;E^S;wn{l0iS5Z`-jQvgz?BD`l@f`Ir$7&y zSdjo1gn0{dB=1~vk>T%qq%CGG8}r%co>_w24OUR+uR4S-h+bU^)jz~cAV{rc<^@^% zUP@c;0@k)qADBPrXHBb$M#pfzu>dnlAV{#jd zl{sdFTaF=vQXDUX{6Zo)zNloB{?ATghI=~S-Yq{Fivu5(_eP)AkZ6p(scD2}F)fSV zGd*;c1Z~4Zf-&Mgg(n%!Hxkr`c&{!aud;7)xaSm}`yw~pQetWXTNkf%a~Dr`%w(~o zelp9qO}l%l4qd5a;EGx!E$@dyeRhSOU#%dYy;6F^XCPY!-{QXi(wLmmYTgK~5eWz2 zCRSJ*=nSZMBM~9n-p){>Qb5QCpW2#F_7)VUI9Uky)Q%Px|g-7&yeJVqK_NS%iy z&bcyQ4;Q5$Xx`sU@hq}9*Im<#SEEJ6pJOGGm+yZROHjPZSkGh4B%jV`kdNXMY;5l= z&blD`dA-J&i@$RLrrAnQl~Um87poc<%lMxcKkK;e9NfUj8Ry)i91> zGbz1Wb1$aR<}0S;J{?X&l7hGSmbiVJKguZlqmzP((81)jlGM(g&v4~)`}7s4Td+eX z1F6f$m)C$7B?|B1E~}=NzWCqyAt%^-ut8Y4^8EMCSgA5d8hJegacD&t@v-`}wA&1ELeqGcU{3o<9a+vU%qP4CYipXWSN+BkTVg!72$$G;xH;-fam zGmVuY?sZO!6Ij@Mwu&-!ae!GvGo=`E&GLR%*fM>ZbHhA|Lp zA~*yxDk$4xZ^oYpyI$k&b}cmA*xhRAcXClBv;$iz(#T9Ex58fTn%j@dArV;A;8JhH zo9_vFm?*e18DBgoAv`3r+AbzyIFa(cN%wx16VFAJG-G4mfw;ycmnd2Bsb-6sNQ^1& zL{M_cejnj?pX80j7uX;hl*#7(mg)=b|2^$1UO`M-3TCVSd6w(=Qnh)%g-3@&|m z8wYAgPg*N`aiz`QiCdvlRM&BdUFPeE#vbw9s_iHu2yI~T)!KS#6=9D6f3`gDGw-Zu z8E04DgdFzD+z)!f{OinSCEb=)5)H=W;&@ylfIRbHPr}go_jUgtxuPsN5xq{Y)cECHDCm*TeT=40`vTRp=RkGi8aPwg#s8 zf#ia(C#C3Cg8y}Xd2O}!4Iwr?IZ(IT+FnctCemHH++6$Kc6dns&Q}ILK;rCFp0pbN zNuF8uebnOb>5U*!oyE@minSPF@!2{Gvu-%USZI0@6@wZM>07UPo^O>S#0>&gE<4KWG-{`stL32w6lv4_%KqXd`u#2bw^zODaK>lXB=L*j1Ux z;$`xB?)2u>0LYS%et$)>UBt$GtPERE|3H>C1BhD_XLgqrSi;^)ms6q66VFY+4X*Cd zJH)=OIK=1#UG~?|a0gMa;KHN@AC=OZ|MTfZ%3Qmjg zk(W3xbp0W-Qc$2!C-=WG)5xa{d!--LspvwCb@iaML)D;x)Lr-57OhixtaQW~`! z2ae79oE{Bp?i>%CiFEX_JkY=A(JB{NS+EG6id z2ocESy>QN7w^sb*&QUvfN>3%@B%W7{W#G}YFD3pT;kv$<1mK+GkF$wsJe0F^y0rRO z_zdI95y`4ZaxBn#%Od9D$o!?J90}w*um?WeP7ZP*Z0#L%{STL5me0nUNejWUG+SPZ zsRF>tt$$}?B0@Es8|mLFK1aNg&nyH5G@}XEj|B_wWMRu40Y>5cGFwk&pIm%8*ByDM zl{K;|*?!N)+@a{rISsaie(1jZnk-jl=4fA=Y^=?%9q)|9+cvc{WO542B51#f7T%Av zEvx(3aFtZc=4Hi2oY0MVBxDFY3b)(V0xpQkY7umnyTPa>ssZUL3|#40({rIk>m4X!$q1L78o*pnK#JlSzq7g zpulE`A^U*z-(WVqrPuddH>2Yzs3`0|7Ud$yP)cDlby-;%d6|+ggK`*X6`|VZWAB6 z!jucGds^>lCJ6*BRO*Emm8nA7dp0@b&gs${HV477!EF40KW?v%qxn z@eIkE!@OXNNVd@E=Vbv6=eE~^=I672^x`#WXA>@i9|`^j;vXwp5Qu$Ezy}O%>z`0$ zE|YETfNxVcL4*i!!PYkTwv3Wkf&2aV>hB}Oj}O+=%B8M`-Y6b(cxgiaxatY=Ze5A% zpy7A05O-}-=64yg@dl;R#P_5y>C*o0wjo0e_|)CkQ(5dLg*9v+Od0V;Sjgg`cTXxw z@?;5T@MJ-=@=oH+`1urIuT&qz%!H)h!g;%rvHWi2E9aGN?ML?u5F4xIWC0m`8&CK> zYj*^SEHvAj(8`6>SD}Q&4v^l{ou~ECqoM+nySRA_6jh}+6|PQ z>Z5hoxe*YrNjm-@8u=2(y)zmMTO~NBcEE1#vKCr#2gsF#)u#1)P~2lGvSSh3_@caE z!QJpKj`bm~YWEQV^-~$#fMAIhF|#Sdp-bf{$^|^rq-Dt*?$qs;v!VZ7@Gg?$=$5*B zaA3m(&%2|z3wx5j1-&Zgx>gA>{_6JbYbqB`!wjiDIV;KvVO*1kRq8SEZsT;Z41Lye zvsP@WH`So3%y+zqrV>#P)_M3JPv(ZkHUNVesRGyWN{ z17LcltMDX^C^|%Y>pbB`L`HJ!?ehZf)$T4jphQdasS&ug^HnNvMQNue=$#ZBL>YF! zNatyl;C%@xzs3y#={+KYDG6Q!+NqK}ot=m{VZ#5OA1C#>Pm2u2WOzrz#xfLf(&07waSV<>&xdT)q4i~pkj z2P2PY>><6hu`#RJeI}{7HkyxOs$o?();qlwY4K~Fq*bjHnd4-6Cr#jq+XFK&{g^LS z=G}EjncQ`<9Ohq1dL+zRV|TYIz~1sfr;wucu@5V$7-0^0g;B4)<(70h6$}`^tp4({B5_Ew!k?`qn|rDaZ<_1z zqr}HqE8Sj!9wN>0itmqqtqVLxq|sPc1yXc{6Sc9fceMb9e`INTMM&x|((8L)(#2`X zTo2n&88Ozw&8XHT%{M$)Gvp04oIC&IokrKRR`^}TVjy>`oD#@SdJ0!$?4EluL7mWr z@IT2>QSw^C&=ig1tKTq9>?tHFqvcMZj#x@UY{g?s8@UOkx#&~>q{IG`W+t`FVfyU?ze;XHb@=w0Nr|KP8vU6GF5Ud4`&Y9( zmvqrSV&E^E7%s@BPnBKZQwA1D3E%n7LuLznz)M6B?-1F~yDL_4O3XG7o5@{S@VBwA z8Y!cqfWY5%8_tDgn8P$&e!sZ5q=nZ=)|?Su-WMaB@<39_!juBNiV*i8C&9Z&nl8lh zz`oK;%sesy`eb-pTnQCFYR# z_of4r_DL75*(i+;nlxNv2WA5B&wOBqvS)V8UYl``4WeiVZ1XeY!>V^JiWxS^zKbz4 zbMqi`}RcUhGrp8OGF2Q|!;>KV?wTQ?N>O41XfubMcN+y@&78{VP71s$sMNPj=+lP}~k zUss7A6>ztm*~de_o+1%TmUj%ss32l6d+}Yj8QQ@s7<@_%n)dkz$(POlv?!svSU}Lx zbXwd#@`AmDbyeK_^3iZ!*6U+F*igjg>aUD53cSF1ih#rp0dl3=j}!0zek--N$iPAA z^GYxpk9oUje$ju@OD!rd;yX zdMz{)uqn{V%`3a{KF(c4 za$n%sjf)f`q+FbUTKcgfYvwA;;`KQAQ@h*0>k_Qn!IDy8_W@5mn@nh@rfLcI3(x8+ zDvKlX?tuV)x77`B-ov*$3t%cgG^y@gTSB5l+gwJaRJqdYN#>h!$iE3v+vdo7b7Tgk7EF)ai6x!FsdK3k$l+$Y;A z#|mTD!FKVTQh8hPukvoF2czF=LVm90W=dn(uiFHQeu1DuP4(+r(L8P64SR98~3IoQe+I%X|se#%HZ%__09-^7)ncc*zx`)7QS^IkF# zFh#UFvN7YkC=p!R|0BDE&Wv50>4$7pZ{sw0#>a*wHu%mM$8}R zeB3ZvZ8zZU=tQt45N>qoXib%vB=kye?7?rA`gfya^J4gD{;Ld!x$wg!Z?n4X79|IW z7i&h;mB<&>%(UV%pOa(x=AU~qiGRuBrJKs$?23a+>jsxt0*m{OHPMPc&WFPXvtS7& z!7ArB#m9P9g~V_dnHs;909k#`yFAw+R$~n^uXyP{ACA1%iqGFssHeKN5r*Uy6StXo z1HoK;!E9cPA)$z0M;T~TmzLQaa@X%aB)*6Ni;+CN!hBWMkri|>$%|Igqz>S=mz$H#%5Nlk_;bH7{4#!I3DY#P?bggqBGlT)UF~Exny2C7OHX&~JTI0tYj4K%2z}c%4ycbFa9wOVA{D%# z&P&YvzCR~UprIN)7P=d!vH$PN>Q(q(ob=!qObgYm!7Mf2RhPmMj2;^Q)nwkd>`bq@ z`w=_`I0vOcl^>5Qq-}NAN6J7?r~VVy@KDNEtLl1BnvBmYYzmJ%9Ijm*QvE(26o*^T ztblqWUVEk15GYza5Em!RPCD$Qv`3 z&dJLj$QwEpe*{17{G@0Y^AOi45W{*qKvY;=Ix{kD0MM6>3 zK^mn#+Z=cSE@o$%@^sEg4(LSZb^032Oqr()BR zw7ZjX`o(aua))d$pL+@?TkPnO|D^1f~T zPYq)RzwAI?#^MkNGkL&`tO*rRl%o;iYrp+7b)~P!-Q0?+ltqov0?!sFq@S64X)zxC zXP5Ah@nM2-$tk=Cw zO!)-23e>W}b-nGxS&YyLFQR2iOB&$NYgi~Pgx)^7wUryj?twAOm}rbCE6U9}{p41c zvr!5)Nr__miOA119!gG3#nKhMS|VbSaCUY_CSgIwj0w}qEZ~*fb$TxaaT%gMQ&{*1c}<6t5&naTF`_PM7TP@96rGsylE zsn0;H>N`PC&M1zfO(qk7#E-m=!^W<&z}L+bB+I*=J}Hy5xH^_AkyoNm*WSn)qQ);s zxS4rX06pFiADQq*Re3PZn2*mnHw00y?APM+)C_PLD+s%kFfuE3Ak?EiF|1r zWVbib6M`55S^G5cqSADu#QwuKcQW5W0c&P^LD(z3 zSUPd1DmWJ^&#LBhD|l6=@S??2KtfK9k&zKGBth-QKfEjBtihi>ANpRHapD=bbq~Qz z7S;Msd#iA_Cj6%&lBD{+#|k)-iV}({Q)oeFkEYocnC=<)TKt{Q_kC)ZKy;nLX~Sfu zPf`$;I9sfckN(DD*c^^)3JdNGvq%pg z)p2)v^xGAoNsyaUF2nhX^W~Cmd*}Q;s)ap78w zS!X3S20J?-QOSyqqZvLcMd`I`xO&Diww^(LeAw-JnsBxRzJGc58~aHLyefJ=@Ub&Q zc55+afD#5kYItIf$(?=?MYO+i4F{C7H`UO)0FsNXZwq)#cT6k|_i;wu zW6~DjbC&;gIXpp2vY?8y?G8NnCu=s8tW2FSXM>+cz%AQvqX^&kmT62;Zf+NGan$HX zCH@&sWux!FG+;{b^mZoWs~v?7yY{ zUwX?Q3xr>S@+AYiX=I^-D5-vD)YAGw>=T}ij2HXHsh2$9GLx)}9zO|aA}zhX5OeO8 zM0c!&y+FMO6B5!-CDSz2`{v)0Yun9$D@ifZfI*jy(RKUn_+fH^O8^>-yqcGl@H<+e zc{HuqQ?8W6Bq0R4I$E7vi5%=xdc?1~m0tgK{q=U`J3aQg2h)yb@JD+yr`m5YXIEEO z+KU%CWCk&MRfeMF)E*gJtNM>CXrvoFHb=OQ>%U#JT9;Dar7N);M*oNqq6F(AC=z?g zUOgo^;hJ<0R^jdBE`}gaa=dd3uG(0Qh25>3%WH6zMTL)!JapV}7XvMSouN&QgzE~S z^ zGnS)#U21o2`;sR}WL|C5Oo87RT~5$`o4NXdzx7nd<~yq^dL=j5ZIeCV>^X|%)wOFv zk%3kxL;4@D;QKwMA28M>GtQI&jjMrYGc}mKrJ8_Cy~Mr0!XCKM#z{J}z`A(%p4jkb zj5N&d9(xnt6k-D`V-vVz!Os}Uy96x1)!s^P^u0T;)*KdiT%*$Ehq*?1)0bLRv!8xH z@G@E}%bzbT$*W5yWfgw9&2;&7Y_pwQ-MD3^@d3A97SUNN!uwS4Wm6?)S;*ycu;q+6 zWf%VokoCj&xzf&j?LU9|S=h~}X89NwNB+3yt0qw&i!s(ZWW6WJM-M1pw^Y^OGyDkf zyV`v1eO9o2aB6467O0I6TzQJ6%7n)UU$q~rBHc%}l=R|h8NVBEVZ)cH)X#!yCO-(=l$*o* z&bk);;HyYV-MaX-I-rOA%_R5L#9vF<%kE!#cAix%fm*v5NHzWrlcTn2 z1&a#3SF|M&g-Itmb+=mI|K{T`#1p0eYfG4XY;QdEmK_r$l!`r!Y=y{{9TN^#xSkTS zhT4T_2DDq!B!3o5Gv8UYCZu=Qy2z&mtH~2Db$=d*Z4F({EbZRsY&K-9&YRe(qPA&53lG=bZ^cYFSp?$<+?#u;-x_jcQmQv=AlV-qkKof(ce ztdO*!aeJY?SbPMPhZ7EcaQZ|8cl>K4x$|Cy9drxhZl_F(aC(+;V@-lKCrm`RjR+Hg76u3#7 z_;2^~u@INE{$IteHEpuRrSl|XaBTO264O*SxWil`83F4ruUNU z65L8NV$ffvL3-%DOktRb7&_=4HwZ-b0!MQ%t;jfDfY8AvR);Sq(N;a`8IYVVx9Lby`Z`y`-d=c^1`Fiv7C~MZ;cIXBsN_>${#0uP77 z^8Q~MR+7hg{Mj75hBLU#B-+Osu9Fn1V&2zdzqlS-@D5lHe0^Rmz!0z;jbOlQ-zsiJ z>jf~I6UT`VvKJT28v9mt0s4v7eZx97W+sEY7&5DIN)(hF*s&ct443k$pi;(7hA_^`Xp=T?$j~3&gN$zp4zVYM`|{%tNG9i%^2E{fJN1n(`!|w z@tkId8E^tQ-1Sd%rFvFp)Fkp970LW~_QvlV!Iwj+f1FOM9(tR_Dqg@KE;oZ2SlNf_ zxP!FL)n6~HYi1riHK`T7nske>7m5a^b@^FsnTPw4Tm%>H$}^F^C7$no{yT(L7Gh zVDfm8Um$EZ<95F+m~R+znpvPH7GPeZ$9N2VVx!Fv8Zt>b+sP~vWBm0VrQ*M*L4VyC za_7prK32-tQw!y~S40f}hA3z)i2nRE^f$ShwYQ#qsKH4b*(NcbkN}$byN_i@AjET? zFzLV1o6lRS!VNju-dq1Eu?HwB2`A%iE5iB1Y!H7F{YoC-!qXHzw0X&lxl3aGdbNsP znY*`z3OMk7$;^6U7y_!@Sk685`;H`U7Gv14fIb{&;2Xaw_SC&Qh!(5z)A}Oy2s-)m z8T}(ZHIn*>blGPR;)!3X?lV|MT)!-~6Fc?h*3pvX&%4zwX~rb=gYW z>tVS7?M!C23^#<&VuIJ=>&(z6?|HD>qd+cX=PJotkw{VY zf=ACzCx^bv)iY>(m&8}9Honf;;SBE5XDxKOb`1BnFdy>=u~cjyrU^R=rB3A-gmQwf zznJW`3yR*!Li{gRktBTMgs3Rb%-$D4wY%oTd&MX0DnavUfEbznDfjHANBd$O0yg~G zDnG8R$Un*2{?>-KSj?JZgx$7AQsNX#m6ml4lX-S#x_U#}zMpyDKwt)HvNufvOa=QW z@S7&fpAS_jSgpv*wOV@{Cmo7gp?vM}aR)1XU-8FzP}BaGDZ{K?V655QM#bsbP6dk{ zO(8MirMCJKA+a;Tv|;Pn3l;`7_#*iP(E0q+^A6AAFuiJ)YfSFA(KRP_w^Y-#AVZa^ zz+7K8etI^+ioh)?#zan;7eU$obC^dD%UaA{Y!<6vAG}s3%a7;{-mM_4)UfENm!LE+ zx99kpkp4&Q;Rnn~Om5NKX#RydFzD#4ZDgb7PadfSa4VSNeXnFxsmXzqB7)lMo?n_< zPG80f?($B*q$5W%s0d0&;(eFAsRobtwRTQQ zfr14XY_?KdM@EU4#dq2TKVDKo4@Gcs%i4)hD@1=vMQT*`^U$nalxX)+fC6Y zQbL;T=RYNrZtZLB$=G8gFFe0aRcFnAIt*crv6CVJUwqf7ckQhvO^|NNzbLQ!p!>G| zf(lM5ym{)dD4K&Li;qtfp~U7(N02WH>m(>)@Z0X-_0+nmem^$^0p`EM++~<(%9tZ2 z)$5!-Q{K2|W!^v=ez0dE$-bi)OoN{@fV1N-Yq59Yia>$j&oh}A^^k%CjNxN@QkA4> zCA?)`2B5bZ%SMeT_$m~ z{NPi8JF}?GeA4_!Tk~f6iQIa$3wF0mXmh{%sN-=NhkL;AIng%y0<8I>2|Jmtpg>yI zJ-Yh|MMv3ei32|C&~bL(J0`xiRNvZoTeiQ@>+6UM&%M+bE(qlIcfowVNB~ybSizCgzKm zPWZv1JVB61<*Io?yB~wJPYtFBSR179+2)KEO=L(F)f+{ry1`DJkqx;xhe|Zn6Q6X& z>Wv&4!o=@Y7yT;Dy?eq`P=IOMx#)`b?`~mkL#Q60>mLXh!c@FaeeRJjAql>W{d+u*`q-;9z>gLS_o*rGROZ2z(BDa&#e7XWG(w6o$rK@&L=-0h#kU*2dBaNsT-hE6x4 zX+pGGe@bPt=A={5x)CWVmLc_S<|HQT+H#Y6P2@cIsPKJ9AbWM_z+ew_ap?ELH4157 z^@WPG+9^WCXL}l?(jTf@p+gl`L2f^N8-fNT|22n8X$PE!9BP;!QI{6 z1{i$jzTNi&w$AC1?yfp5<@E`o0HpzK?fo;i>Bn=NO^M;_j=HA*@mK_%!*kE%XpPh_ z?|j+sjg?3}BczYGyFCPJkN1{lQm+(pzQZ4;>}Ks~I1=-CA8CB3Z@@wdCH`mdG!{~i za^cmo^~otIblZl5<{P#sFZ-K><)#bRAy`AfgeYpQ?l!}7xWFaMeHo?#LwW=YsbWM> zc5|C+^vH85EUl_>8iP;c+2Z@F(^F>Si{Q5NPl7{<=8rKC^9sSw+X71f0F$kpq__t2 zU)~pFLN@r;FbQ9(AFmR)t$IC{=%n6Hy5vmm@S~p+_s&?E!|pZH3&K8McZvB@h5kGV zJS93B?tQyryys2B9sPWa42(~hC_UwWGC>eWD++m<60?92V{?lQKuQ<)e0#pPwBKlR z^T`f?YyJdL6&TPh$zy%LNRo+0oBI`FW7Wp*D3u{794! z(^V2Fo-owO)fgXo zlwy-0eAUYM03R?JO+EJe7pV6H9w3Y#!^Xp9HPhD#gZbxptG7Nk$P6dYbWf!Z*2$5` zw+13K(@jW1@?zf#AOXzKt5AIQ|9QHzONR6Ea&%D6<|dvx8}g+&Nd`$?JE5`@WeVDc zCK$JU-1_g_k{yQB&RHa7P}#}JQEuKBktPr4=Q~4T*L{?$6>ZxDfjC4_gbF$P(ByQ- zj>TTfJ-PSW0GWRQSs-rcw;~7i?WR0h&WPDCc!jjdvb*Wo6a=duT1=h6z&d*oD>S$6iun`tF zjmE2d_OXu)_|O@F;dcV8IjO*$%Bahby@O@H9M^HDJg6L*HP~aJF(7QVi}4e@>a(5@ z!gU?Q1j)BKbf&9Py>g9W3hs4i1a7d3G53qVU0>JL?85HcpC;OW)_-bR7_QRHy;197 z?-_oZ0)2EkRX}?1RiP~`(OtyTs-VPzuilV3ijgv49Nv|Po$dYxLABoZj<ugE%Y3S zm)K7k6LDw1sb4uy~5PDBWP!rQ`#rGryV`9;ia`@_*J^*ndN1p6>tf2reN!j429 zPt396ii+M#-ei9EA&LFshEUZ(qS~gmtNqO|O1DlLu5qRu!vDH;-N5tYihjd}IFjcJ z!lukoH>)VB1hBZvzM!ipZt@88+>SrDC#+lii*3Y3YoPmA@jUiJkHA#-TkK%S;M^RL zfV%MJsC`cU*?Uf0km2OaSmq7-D{WZUjAZehGAFCiN|18hWXq?)c!rbj0qk#i6hd0B zt9Xy;7|&(2?@&Ktu`k#saYSyEIjnX`2>o`+niePu(dvbCAfWAGQ4^9nmWX0%{x))i zxwt?Jbw5P)U|S1cLPOOMh!-(b#?|;l-A3%%N82xcf z?^LM5)=QehQ(9KR#&>5p+y7e%V{_QBT*6@T=)H+M!QfRoEXL>tZ z(NZUiR#iO7S$X7O-yG2#BY)G7-=UB+77lG4y*bkQ+|Sb=PzCCnk`43aRn?|AxmYfU4yOeOcY;sZ2~cd zmjIfBbon9%Kw8`n;2cTxRD6!w>nkW_(596nf4?FCZ(jF}2cZgK8MgRz$LeQci?YAi-0U$$RfX6} z90U)c38X|FwQGf}6vgqWpQd*D!uGF_HgLMf)HlTC4E>54NDBN{z7EJJDI*Mf!I!Un zbcR&}KmOw6p{Y9Y@?(zU2nX3Szb{#01W=93s)xbtan<9_(G8xI&i{@kb98#&NSmYKH=T zJrXx5J%XP`(;>vy%1y*b3)6fhD3TzR0d=qDK?mzC?zU#|OxdZ2H*)i%G_NfzD8DLj zlT6`~+7wUrkh(Yy1m(J;PeG(rp^kxBo~p`S62}8APmMm`it3#KD_Sb-PI?5IGj$b_ zp`J_N0p%CH&xs%PZ}-fDSUW}E2aamIxpQOZw2DKSf7e=IGOa4;-a=-5J6NTOOXR0# zDlms-SNmw(bEsx$d_7OYI?1?r!a6Ce95o)ja=>sMDYDw7Z3=1KVNT8@MR8X zU>u+WCLu98smmU=4zLns0Zy$E+}r(OGoe`JS8t`TMKjDW=uUt_&dH(=kuiOn6t0m9 zt&T`2L?rDIfZz9fq4&`fc+?e5>4ygeThsxSJsViRYxSt%gpG;<6i^}w%+Db(Z>r8D z68hn%zl01z=k$tyl%Ic&?OrEs*D?Y4o3e!;w+){Gl!C^_`0A54?GYa)!OE_Yl9&F) z{dftATJM^>cMwO9*gJ^*50?H#1!8`f7lW$v4F7vuon=g3^vgy1upsQS7)j8?Oq~7i zJkqdxxHM;yoW&>tM_l2{W&dZb@W0t4Q?>5ScKU~nLolqBHN50;w~nqQk;a(KFQV`B z`|~w+ZI-(gRB1fLB3D$@@JKi*Le)`pUHr;8-Agm%J|LNo@z~m7!5Q*?+1vOWIv(#V zR~X7%f6|DSR8IUG6mkM?YckSd2tD|03+=WWIaX4`bm6{L>e`!88}0>I^5K`r$4N-9 zLXgS|?P>)x#MOzcu0;u%$|KL=Id`8CU);g*h5zJ)@g~%BxzU~%h1MfuI(7X+DJHq= zilXH-U9T}vDG)^S^15$5NU)0nUP=&IT0?Yn(BH!JfYt zb_<_Nya&;R8IDd127dp{3;Z;D3^&Xz+#~l86$NolMh3VY%-y3a_Zl5BtrjXhSpuNG z&dU?1YVmqb-F2(O0-q#V#@Lw)VK9eT_{BAG)^^`d%B0S6#3NLoi_vXbpXw8=*z#Fg zHu3Z?Vi2oTv;2xWqEC>2UIoywMGUao4A9Zq&d}Ho)A)?$&oKs^c0l?J7&5yJjF}m9 zHJD1!^mQml*j-B!DWJMAyV_?3g~<9`>Zf4wW+=W*bu!kY()MY1fJbGR1g4Jd!j)x$ zB0*jx!H2Ifjk71I9wCq-RDbKl%0S|@v<#;|L|f5X5WMOr(*d#&%j%R}zvUM5r!rVJ zejcUIdmSlJ%6cb5GWeyOvfcUZOGq9$5wm@KTn|CX;?PU5f#*Xy@Zo&D$r*IurfXM9 zffAp->!>M)9Giw!(s33kt-_U<@~s&&gB|0P5tx$l`Tdxu+drrXH$AXxFJSk2KhL2n zVAtjwElRX_AHP7HO0;RR7qq4Uw#uvrF;RwqakJ6~RkgUKRM;}D;_VL(0?16pNz(-2 zqV6+!=DQl{mp6k#w@*7?L+I*4_V{7u)SCxM+NxRGrytGFj+TG>^MK-pcyqI|pR;NM zUE2Gnq=7Nte34HhKhfh~5DrTp-a|UGBnB-Z>D#CbEq`sHxk$i+^YLVY4|eM{tc zJ`itIeGq2Osd_}>X#C8s&DX$paSn=k-mA@5S>Sm$9F_Np7Zu%`aNZiCPJdrB$*Dn* zKd>eb^AcGHWB-J;?OyGVdSUHXLgRlC@Jk)Qh-|KcQ|FK*~-BqSLXMg_4 zhI@#(RR1&g_)vKQv&HATpO(10z3rM*N2tc+=gJMBh|I>62^|XBs8c82;HmWgsikOH zgD``IA_60Dm6W)##RdNqYt|Qh0w&%rWYnyF#nPBtmUX@=`y0S_u)f2Q{}S8Di4=ti4cmzhX` zkv+L@>(_Wft@%@Zc1a};p=0J+wxh{oYbQxGV9GDT{@M2Gr#60SVA$N(N++hwP-fH| zg;N^elOirVYu0w$_&JZr5sU zjuaa;fcQJTfFBh2t>I13wjE*t z1}!WOzI!BBD59-m^3e&np2p;WBJ@}xAPxqx|8*FFfhXN*Bm6(N>n6@<<||Rt!83z) zZ&0RNA@yqRk$5-d^pL*c9@>kAFq5@88H!QUp-Dwm+>cs|0w#7bJAWOq55DKVk$J;) zAFF+orHue^uWEm}qpn;^7f9$~{wP1W*$z-7LzdBGpYTqo!ezsgCeBFyE%I9*joWZ0 znJ198FmA1fB}41W_=<Uo{ZT;NjVmNib=~3_FoG=c6mjdkGTY~Km7MB z!dGBBcF-KaRV@V{pY_7_FFV3j>L0ylM$~g;-ve50ma4nay)tG0F%DDcYufq@TQgQ? zx^YtWKevfFY|m-Jwdv;9pjm_z-uPB6wg#S6Z25fy=@`&@`&IE#?nFqx&U-$`zu`~^ z)SZp&GcO5g1vJ-uVM1xfOLpR~`E!&3mLMH7p2W}+P#z<9ubt2;D2FF&MXpm?-ove9 z9JHPVzFQ@C!xz`hV|J|$FX5rcLJ)^=ndcJeHC<-5wx{%;09~w$an;loK_`}bK1~S& zQ`RD{?>_YQuU1oDj=uPz_;90!e9chT-uPMPwTay5_(3b4S9zTeUFWMYAVyWTJq2r z>`~n*2A+VW)tf2@9Zu&7+C6H5^l*!pX=x)j+yL&HABNBMc~7B`)iJw0Rkfw^g(>o| zM=2R^UbREP*Tjb)17`9V@Q~llT`moA^tx19)I}w(5IlM3$AC=z)6g#b%|ynQvHaIX8hcfD#=rJ zfJUQPss7!bG}h4B6>2_KB;ZlLV239s+Zx?=+gbI?&tts{mc3DZY9Px7Y$>{S8`5&K z!`7A1?Fe-q3Z4o}!QY{t$^?$GN+M?IfbH1bSqDL{!9~p+E^oOl7nm6KbaITFkUni`vzPRpv@xc82@9PM)H6OEw~a_Ffb5x9L)wIE{O$_%&a% zoij7wEbPf*Ch-!!S0^yDy`8m4qHwX}CP)p?n~-LBrVnxMAA9-C*k@@W&`lO=?dhr! zeBFT07ot_z>ks}EKM~xwqs^52+S;dC|M-cY1OU=jtVbA;bF#?Jfz6`};DMWe`D7eq z#Hf#|@b88njLy1=n$gXP7z~!R1#FVs2UH?s3v-b`d9uk-_#Ii}U=WEoK5lq?C^k}! z25OV^RSFtLnDag(X86DS9(>yJn*~dy*RV{k)tZ=Xq}?Qqd4E^9<20akzKc;GB%4xJ z-l%&U0g-L}HQhxg`Ft0TxalMxqxp@=i8wcd_S^;KiettOPOuy(Ix30MQy}+BK8G6- zsWiYl$PA1!jkYOUU;FA4OFbFXFDZ;}wS(PHu#sEEAYjP$Br zBm9@|ZlU5w0nr=#qcA79^B@HvCII~(mKJ4d3W}pAJ^&>& zzqp9iyJezOBnbM|6; zSE)C$Q+(fUGr4QsE2NjQR6iS*S<>Sash4uC1f6K@&zVvWYPgbyUE@paDB z`el-*atM)iUSsnMTu4s{GsXU4eA#=yE|X(rk~TNeGhb|1cakA8=On55c1PwP5r3M7 zI&veZ<;}UR96u*$A&#g%`<$&O6Kyx+{I9Vk1VaLN;pDo13JkG_ujkC~$*_gq=e?ad zk)5ZA_JBUF2!!~9o69za>{g6{3;?64U|J7l*_;Qse0TIUW zXD7XQ#?xm(2hS4$*#wT~yxhfK;8bh{(Dz+d&~X>z_qf8@69p@gA=k>){g>qsX0PD_ zOPKgE_B~BqD>6%Y;GLwJ2R}#cX|}t*)iaj+G$|sV{SEG60!{TkOD2tIq|B7v2#fEf zkfhuHWd8lVX$3S74?x-oQ50oZNPB++VxuervKB70FJAXOh7wuZa-V;jqZX;&&QbOI zk=u*t5YVW@j38)esdslW@JSTr^OA%R%JpB_O-+SJl%S+uL44s-QUTXvQzwFL-hTKq zi8BSRGt}`mEQ^ak2@U8j=1Q|96BSD36pbDOdI9D#{Ts+?GIIz%Is89<45?vK8+1JjsX0z$o!MbBwipTwHGNuV4 zS%N_66AmlpFULIDXcx zEbThF)3ZsaOge8~AD<@(!w`OzUY>0Y7YHB>F%dO7%Evr;GmtFLVaWK<^5 z3R~n+?543rZCJB7mnzh`ZiKJlS9SHqQcL=o;uwAf@83xMV`Xjl1GtHlK*r+iwVT4wd*4Cc;7p zSAFQw?IY7Ono!WEpkF;+M>&s^5EcC+m9LfZgI`}){d7V3N`RaYiB9G0f?wCLl}IO} zB?KpYd4)t-d#UK0el}_yfn7d&@0?_!9gfvjR%Ll$$0`K7 z!xZtbivr+BfflhuAbR7+-+$iXL{8(iy{>4UvGf9iF2)DfSm8&d;Mh>%52~H|2q464z-0S?@$ zm4ol9&uSMDZwgZP*>z(Y;b$SMu!`5tXjNS=fL%$~;LaOoz8Rf@Ig-kN;0$Y+^$(Bc z?2JX@yg*Z}c=$yv^m-6=o)Cz3_rYgfHHuc6+<)8Lj)r{KeS8&j$vfjAY$(Qw=nvYk zAZk4c;_0*K_+yKFb9lA9sH?L8+V8ZZ3g{Pn#e?dNSeU{*Jnr(4>Mn@wPpDV{fZ8RO zMq*ZODXIp^kbt-(@UQ&totbPfjaM??T&TRsy;=4wBx7aIR$o0#Bg~=ah%XN_3nvR_ zgko5rXQWuoB18*kN|<1}pdFGrDhu_#@Vm5HIUI4hpG-Mjb~yX@9&D>`F^4ID3w;nB zk+QQ9rFCGT@gbKhnIR^wYE)N8sa?usd#dfbtVR(i$cGX%*ardzf z?)R6Ms)t50@tKXb`=)hxuZ`0G&Kw`I`IVu!eX^8_U11+C9-8K_Y#kXz7_I$$o+!w2 z_%$PAFT-=cZq#}~Ft367_hSkP!d>}|0CV^0UUBWbxH3d1Cl`vD5~^kRZ@_M7pYx%f z;KH}5KBx1T5UHJvre%n2Qq)y`R!||NAZYMFC6$WeYM%32)toz}bvBq8L}Wv$vXXbo zH=QIausn6WK>Q^>V!k}_bunkg1-^7y(F!gUlLT@hh0D9YSu2%O7+WnS-YJjq2z-t& z?-KAd4gy)i+{1|p;^*uo9o3$q&sIO>4}@f{rf%OhFB}P@kJ?5n22X#Km@z^8^8X>u_R2c&P4Lkpd>!S#bGb z1%1D|Y7O7ihl8Q#$bI@!&0DGCZy-=qi@}$7R{PK;1|$`N&E%o>VDIFK11X z^}=wN{(6rF3&rOK_EOGIOQ)%J$6cx-pf-Va;GW;KGWi##2$zKPhT5?6`hTJkjm)X8 zMSNxZ(|u*8{TS`CvvAM}c2_Z75ELooiJNl3z%I9-T-UHIpZ`vhJS=~lL1Wg|nTOWC zH`;DpYqImvja&iP+?|ma?Zsbxhxa=I(JO6exqfun1m|pz=^Bivu&zVjbnF zT@-y>2PHyguu2?;it9?a*ilKp__0T8^<{&7oq~2;R(T#-C?wmNuVR*m_+Hl||0|x~ z2RW4A1rT!@(bJAlw^NBb1)1Z|`P@7`@!@>YO=bKdAG*{s>kvJrCwkbkpx{;^Bhej) z{(OIItzi1s?C~=>u+fPG%5V)72tiy2BUf@6aliJgn9E(uu& z2w?#U-wl4(xYKV()0#h@d z5^U^LuT`g@J6w;VLP2(EvE4G>v(q2(A<;2-W!UC~?M0kUD+3=_-JDQ^FM|Jp4jvQq zxb)@P*I~T%(Eq&mXjFwzolhI0Niqtd`W8i{z#^kBU=LtGS8eeVy#ql3e;LOd#GRA^8Ry}2-r^Yg@6#?1>p|GJ*>mcrgN=KL)xyEB1 zjm362i9L9ZaOA}~WOUFnonM%p{U$C10poqwu6e`VW%>4g*JjeXiW$#LnHtBQQ759@ zG!DpDUXP^bjDVdwmXEOT$3>{_ku|eGM2gX$GK3DlxP`gy$ONmc49)XOmtzQXAC>sG zBifGOPnWMj*fIzZZNl{%M?E%lmP#oA1D~ACZL2LnOV7xV3G|r>@Yr&CC#lEahp@~Z zBLD-*0PAp`hW40xCq85^HiK8un*<+RU=+jGU4oCRX=mnu+7pJ8)qDWruSKuV1;qLy%t5^ ztu-F-;3cH5d07AK=C?cSUDAR{8J6V+o&;HAe2t32oZ$5ZPM8WtHyWk{$(u-MDQNf{2t!)V6YH3$KDqfLet zjprEIG<|RvB>^qaOt~H1&q#&`?(Ad4pi(M;0FALMP!05bp!i3!3S&24gsfE@Tsf2 zpS-Z#7tcx{Kv2GBJP-c^!hWyA;C>42jTn=k3j(~fdX54Mw|_8}?FMhp{FcCv}6VcoAE8hHdGE(tvnxtO_4MVEc|F%zBg z@q0RZxI^nX|K^!%8l$0kysL${j{LIY#e{ob!T=wwEE0BtzgbmFL9F{e|DY#ph56zM zhyEcqO#ulX9i5$T?Og2(8NhE2yFK=0g-ONacnF3+J6Z48;6>8TDn&XfGj})3Rn9fK z^Fm*YR-$*(Z1qi3QJNRL^NL#|Pk2HXYVjySBH(PG1x3tZu0K(9F)QPKf!ox^N6;Sr zH@K9;o>t2nE!D&*$(P_m5f>&JmzDlOBcaS%9k`&~saAtmtGmODa1UIk=v8nzfeZ&? zSu099n3e7oVLTT3cP_8*C2o?gUJ*Us2Fsq-!S;-4c@AIb@#2B6$UOs|Sfvp z?s?cUqtysH4*PT_(+fg0 zMX2?AwT^o1883aEezyH^xD46&!IUSl7iivG`FY=?)lKN2&uy{wa}rJ-umAbCpjYH= zsoc;*dThM*OkMmyEX}=PtjQ?@SzM#Prw626x;wtbJY|VM zgaPwYdt~^)AvX;nI8EhB6!|l@GpL&+jP8ZSo8u$jL2&)gQfK}sC^pcn?#pVL?6i`ZRjw3S+M{l?rB zglBpYJL||5*0Bn!l}#9AH-cw+gSY%#qAjZ|homhHlSorKi^ac5CFr}M3FYrVfze^m z@MDY8ib7AznP(!Vt!|a;NmqNYGC_vYPzDgTY@p6`XL;B9(fc4)A-s9IW88N`(nCLw|z4Cgm2O(grjgYq4`vaKT3UW9iJ( z^$l0^??1y`<-OuK4dQL(Tzoc{w)*X;ku!;?l9`5s#@Z=gv|%ezbY8Mm7cYg zrY4hdj_D}$71CSLKuTbx1cOuS1pK!1#O12#p2^;zaG!3qi-r;PJC{ZDC5=>%GOkvs z(&ufr@m*cLF3 z#g32X?gwA@(i@uqu2SDyPxFRUc5;dkm&>3thy?(b);2WW9he?oA{ zn6J_TDxva7WBqBjB<(K(t-WajR7)IWRoC1+X(n42Ih!=v=|qRXMa@@XmbOU~?#F5B zvx`^und5NTM`R8A;jM2A?b<@X!TOcsu=OOCp{eCky4#Urau(JKU|sRw3tD4+Pb}SK z^j3`H{8g+9RIVKMC*($C+tP(<7RIA4(}|NV)9zfXD}DvfMrFP$Ez{PkmZ6O1!yXkL zn@Pp^c78}QN~pg0of(MAw-H;;SN>qboW`_j;Ho+!Dy+HNZ)N#N0G z-b$eu?s6+Mfi1G?Piq*lN#ToG_-)(GSJwc#(J{;wK*zXD5=s;_B(ZV4784gXifwTN zgIf&j=b7)MiaPCeX6=x^KF$m>7*6A7LhM0$rOv(S1>?i=(KFnVr`%`eLr4-5b#$Vn+nR(~}Lwl-zw002n% zqg0h;(2$9dA&1c9WF^%g-(vr5i13ila%-ne005T8T0%lqPC|lG)!D(q+SVKZ;KK_0 zzU8o{fh!W_pjL!0N~t9i5j|M*U0t`8gt%%5UM{8hLLR^PWcdrtz5s7j841GLNmIFs zPY^HsE0ov@42G-_6&k#W&&oqjqnvugmvT8-pW^`xD!L1}?>p`8CiLn9diT#`{9F7- zf=32xlEQ}8e=~``N2XO&=S`|wUeEEsLRUbi`(dBsv8tmKZemt|m$Lx>RzcIozPe0& zwK`M#8_FBUZ$X2EkSBZ>CdZ~G!^#997{@4E8{bpER@L$7OCcPqz-gS^9a#$jD&{uj~TOn zQkliJ-SFa1*c%RwttaSYF8Ed~I9%h{JzA$Fs=fmCN@3D)&PHO1Q&h{loOO<<&@0f3 z4u|Y)CxG{5&X3{#u0zF517AQ{_4ZZFk0J8g1D+08!5j{s2`Ul?*p1kO?v2lHMx{KS0u^Z;8wI6Eg125OqF~8cWK?@prN2mSy zckSMXziV>xD>aaa#?^Q-J%O*XKwN6R2-worJE)4L_Cs`Y_+X5^`bC!soy* z4QUL9R=DD8ujQqbsPT*pErY0m?t0k=Y0;hnxzY5pQCBf41H-$V(9O9WU;{8+Z3)c% zdkPMlfWWpLlOpX1=WdRG(+?>SvTN4#guXxg7J7kPh5I7UKRnHqn(~^@NWTACIP@1} zBJd`-@TLwJcsyD<`(g@dxvbp z{7zIG;N)pb!iWQ@Hjo@;wOs%JeA@puC^ORPzSn5j{2Hj@0WgA_%?O4 z+A&oVX_{V1ReVtm+L#D16Esv|&~{Xz?y_0L47hZ^jkQW>tuqoaIWW_3u`_?;OHipo zhomG9IFau1HPNosGuI^BjjnnKpHww(dE{2#?#o6Ojc_VHSx&Z}X}^E?emK9oe2gM*uiDg9we5tHh&Z*Sh|qX2Nv2eebjqy+mG#;wa01W|ICr? zSnBkrmqBkCudn2oljeF)e$?8hb;$)an2)8^+~j1==ypD$leSU+_;o96&`rRes*Q49 zSEpsHRrmL^cKlMA%cn_d+@X}h`x3v}fH5p@-dkphGq~v!RFi?IQ~nzDq%j{a zp(``%ody@ow^seJ>;Wq<4J3Ec9V4nSDsCj-z-y1_oiAjfug2~ogzK$UKc7c~q zn|UVu-yd`Y$<7#-6S=3#510^!SkV>pFUlNLcpK_z1# z$xb4!Iw~ZwFc-orN43|8egtD}+76tK!%Q0y1t^WECwc^oLG_xiUx@jWsV5aSB>p7q z=Sg8~jTt3P*K4^qoL7tv6;KSn<{36F>zrttKUFfGE4KHxwl>mUzcxo#+2sjN!2|OZ zG$;?GDpt$IsSrpkneo_Js9J&@6FTmjirT*Xr0>HaqrIgwT9W&CZ-*xkQ6L>Cm^pS7 z7w`4sm)wYd*MY6xYX@RQp%u^PflsF{`DZr|)*x)s*YNQ0_1@lIjV3_Nl8rP$%%CkJ zNA~l^c9P&fG3JElNHU2=Q_8!+{>Rt-KexBHY{K$W_2y$gzw`bcqNdzE@5}!# zaUq}BM#*nSs>-o9dK9He_x86Q%z?En=}BrVh^72UM6xwiUTKg`R!T>Ge0CnTl`~^S0!cnGD@*VP2M5RY;|moDK604q)=E$%g&(}+ihHmzK00*k06y^T^!Cx1#KenC(eYu``I`K zX6C<7U6^@^*9-)Eu#~*mRp{#-9_DTfn+voG9?j?lH8l>P1#R+?>2fQK%Pkk=-%A3B z2DNql=?=uyOza#S!RKBl;A_n9uL2yBadD5UeC<1|)2fCELqpONZ3okP6164Luo!f4qmfBg8~sk0|n_`1EkL$>hoY?6>W~<|Ayr{lU2O0q>-@ z2@0lr3z8^Wl4C4HtA3YBZex7f4=)j5MR9i-0>gjrxy--Usg<1zudZe(y|{RQlT2H_ z9^~hL>*=}03%}vCoD6(`8XO$VCs!Hqb?zoMv>LmJyx@aZ!J1K^Ec!KE+xSjD^{m^xyBcl2@~g5@hptZ{1X30Y!FifQOo{KZ9lQo+;pD51Q% zGjr-a>YwIj%?|u}E|=H-YUT_LKz;3(f)h61SFjUjp?7y|xco8JFP=*YSCQ{lZ1IW1 z5xMIeTEg^b&@}sB8KE8UBX%(BNoyUaS2jYnWuxoBDELf0evcawMr`cXkjYq*Ci{(_ ztGVaHa`dbHxMIl{B|x@aBQg_ceI|`WISnz4lK#d`7r7xtDcq6+4{NDCsG@yoOuM?e z?p@?NWp(uwYeVR+SwVnd{3boLm7!S?LPR)b^Xm{;PHLco5#SZKf+-9qm>9y3XO1taKrsVZg982>22*d`@SnLi6C|RUV-Df!d$Ct1}=_= zq^~KDLM*UhgodQ8654TxwMX9!b8aY6zl|bF64lhiapNB{=aaOdHA=^d6BE%-Zp5US ztoR+5-%bhdDa>N%^m^;}{8m%AQ{k>MKShTgm*sY!*58T2N0OK)xA|RWAwfyEMvKQ1u%Sgz>V9B6FzfB`Q0cWSvpup@ z08n3v5|?A&iIEx6UL#7ksu?@as@pLQ)S{M+DC=(Lj~POD)G*%bZ=`T`>DF-4W6I+1 za{aJ>K-onHYauVXa71^;ly7`VF3BZ?Da~@B14x2(wi0F|TA5+va2LT~l6S-x zJRPjN|Bm>%M?SHjhYBC5HxXp4Y;_!}lV z3~xnGv?ey&DfPXA61nRO*yS}ZZh74FiR;;%v3|R5s%Og${Rh!+2aplpU(|rtvzO_) zIn&b;AQ0t&K>ImaVrT4AV0{TMCc*1T{S;g5FAPnsGo655F9==J)E4A_npGQ*1yyO1 z#wdWUjwtzc^&U&_W_~I0=Gc8ehHla>@~M%!eMg(zg1jdo2?WvMdiQH|b^Yy6>l!{E zEE?ie2rWcoHL1~Kr#k#A4hal#n{;ffN9OR=nf(%*_L2ThufBdZ+|yJgyY|7+vG9#A zTAK!d_o*+y57$e^FyyFz;W%I_juLSRuLp^}$HR~QMdBTq8J25I3Py9q^XujK9@x0$- z;kEA*etr|yrkhinII?(I>o*$DAG4|~&52$Qa7Cg`2tN|9%(TLtB3j!W9jJ5yu5p9Q zR$6*w??5MW($`N1J_D7#0?$)$U$}#kWLPXSQLf5DvMS?`Spsx+AC)a1;i*e;1CsT@Ck%d(7T=G1e(W zIkyZqdrO^gq}`pZCd@K>$F;Vtu_Z*$Ezw?J~E z+#15(PSQ_j#4u$ucb<)rOV;kKQvo3YF2MRRN#>Y;NS?o z=ifmo;s*{bo-_hnz!LbR6ddp+IiIE|_-|HXW;({&4rTJj@OA19oW^Kb0X zjy64d);E&fjP6Pjl5Vgu_*rl~)1>_UPy+z}4i_p~6>u>-A^iv!fYck-ZLxpBu-BSr zbV1*o-?2xjhVT6OtvoJAJL|f0m*m>&-J)Z0=-_}e`v#wbSup9}r)11XL>s6YhlXzt z9=ygaPvfa)QT%t%rq`A+!2vEhBJgXInNo2U22w?X(+?MG6HmpWL^oKz#@m>;vnN+I z^frQ|F&5c zP0d7n(3thm^EhbYmr-V(i}U)B(EBZP6l@U9GebX>jmC_9`L?7LBbe(4-=%~bEEK$) zifM~Xm1WOiN_evM#Kf}c)tzuTt)RkIeaDZ}Q(uzO<1OF0*jIMyMtH8&B4X~Es+s*I zp5RU;`iaDBQ%+;tvkD<@%bRq9KvzkOdS5nfe=ep4fs(3pL&V@ps}4)^>J|Op>Tf>- znZq)qAvi_Sh2W`tez0JbK#>KQ%`RQ!o+#ZN^~?blVR6- z=u8_v(swl!^Ek#IRnlYnTd)tcSU*EOjpp5*2~H>-|4d&vYxxyoX0IY^sB@&!I3m3q?hvk4K3w1qj$!0R80h-GwD zqR2qQRKmjI4#No6{vN{y>bJaqSB#cc=JbRzi85)qwP=dJeM-4(Ir%lZ4nev)o@$!$Yk<$LH!i>{Q=E4`YX+5 zv_|*?Sq)!?ZT7PFa-Ej$R{fPVLmt4Pm-6joa8K5F64Nz{Zru*nA774>vwS>>sq5=% z7z#n=!vIKKMc6#Uy)%040R}@TFoN8BB%j%HfqTT(ABw@E{VTp^`VP}rD;*qdH)%S}sN?#OT#zeC+az7FU z`B+TnHSU=B$?+j~nPYn)iCVST;JYJLhv+lWhz@n>g6(Uz$%#Lz^HOKh>_u7qtM3k~ zVV^OQuCzT3bfx~@I|lX@CDBcO8_{j_Y-F{=steqQQ?d~t$w#|_JNI0FUaL|0c@@!) z68x{A`j#!s_BVO4$XCEtTTFK}o~waOYNpLPjP1sO4B=Zi2#|2$$Iaejb<)GC7- z8RPCcQjR=1!mc^FDT3joYb!-8_I50G(Sm;ctlXT>JfVT6>nlQq74W}5ZCtmBSo!Hp z)slH}HA zUAjx$wj_iCbBdC;st1b=)~TTnIQ&C36DhL=v)}^ZLhF@|wz_hyPX>@sfv-O<*rx{= z&*wtx8YAM96EhTkLT#BTouN7@l3xuIZ-O&>J`l0;R=QG8dpDk`N-5B5fd8m= zfAP-ROYNQ;8bx8VeMstw{4)^v``g?S%*4Qz&tjmWLPV>e<=AhHn550$u=o+{Q66l` z#B<3oU(skKMQ}7jodaUxt;E(U%6Il<5_#Fiub5EEKb7m9{Av7BO(ZK0ccg~dQB3LlIdM9IzXu=#m{E*HQJzEAAp@%oVTQh@8PdBqFL$ z{4_3EMO~c`}gk9`T6wa9|{_ZJ5yli$6`duX)?io zky}ayMVrW~d$wG-67p%apeXrpBNz`CL0!*~;Gj1|$QHDm%kL+5TqFKlF?4nOb?Mku zdu*e&L+8A3a{S>VZu$fs6DI5Z-YHznfTTi_GHQGw2U1ML21 z&-wsn2j?%->!#liz9|~q*HPS8!~aM~9g;Y)18luckPki(B?5uKDZhndUm3JpS~IXx z=bASdpz=sRU?St=Np+#IpYug1#p^w7g}g7Y@T24yeYoL2<@>tF2zjUsG;`B0Z^ypK z-z5YW;~l4?*XA^~#nt~1ewtIxsEXUA2)6=fBd(I)o;%iU)m?6zyKk4m5_WGy6G|6) zEak*POWY0W`)uz@tbj*zJuNrkxdT_SUjwFBQ zb)zD3+nIs)dF%EhZM&V; zj~43i-*o$knT4KPgwbQu16@>YPbPajp!)N*NimS`vH1u2cx4mBIa}chQmUEP{j4cJ zg-dlY82$$X*2WtWCV_4n?fQ1j@1sO#_3L;$+kkr9IeMdXBs$o4xM2|S$Ik?{J!F_O zk(FlbxtB6M%eEFb{W5f4%>|5CCov3qH&fJbs;9t=nz|aoZ76p^F_0C4lVNyzfQM<- zvFMBbRkRdZRpc#$18ZgV_a>*9Hg0R}dJDDjnzGsPH&Pz7*1vw4Ulm8H*)K&DxZjYw ze1A1XvVPYTX~@}|z!`ZYgEzmMa-*@(Q7D)VI@?XKute52-)7u^VCMAk=SfUlCHC{#hb9nHr?TXXVeDy~Rte^qFmS3{tx(e%x0hm?K#`Gv0sX z|5;Jf7fN5=i-yR~(>$@lH}6hwEMsWMB7K;B3xBMiEqgsKnvjhA`>_iLgvT>e9xyESg* z%9o|bkCyO=5txG)@q=1E!8?ryzY4Ga2=5fd*@~Of0?!J<^`QI z>ldEpmn@SUZ7_aiw~I6DA@=FDsreS~echl0+Wy*KU;%niUE$xM#L8Y5O*3^l`*ft{ zteM@xAB(o%)fvwQdU|U|j^jN0bstv*OKcGJj$l#b$&_E!sx?mv@Mv|D{6mR|w)j*W7S%l@%eVz^}l?4;m#U58kVY*>= zs6VyCfI$}Tnsod1*?jN%$4EIjIefILWF=RvyP|C~9JV}{H;?+~h5LSOe$r06+oQS2 z*Of|t@?&S@a$W?-iI5;J>Z&XmxxUYjq2G~vLKEu(jp2hCab4i54QvSlmjhI*DrR^y z8N8^hE_NeSeO3svylq$*sj2U+{pbv{gMJtU_iI`bAQLhEv6y2~W=KRq3tlY73)f)? zG4Ah4`zcF@$yat95L*)HDR1zDfsa!##1uDJYe<|9mmbmIE^T}l_J?A@$|ZI|lS zrDvE+peKBfzVE5vJst281Jz|)jEK;(x1UC7te@|pUk1-ulSV#KpQx9AR~#dw`H~U3S3Rq)Tw3m*d^cWpKUg_m&NRWQ3OuAEpD2LIu+Cr5& zMP`JDPjzV~K1#H!h9do@P;aE(PCAUoIXR7MT_v%o6@znkaBvXp?WVyE*1bzFDC8bH zIC=__Q`{|8BMmFWA^Lktw-tg_AwXJibK<5my*2I3KtJNZK(9E>v%@Qb*uTw4{;=~v zoKHyC$ndw(kbB4fHiIDuL@k@^G+CVFuw)Je`Co0k8}b(-Mj zXb{pe-(4jt0WUjo%W%0<CP+T z)%Hj)a_Ny55s-~!-0tOU7>D1%G1Hf!4j_FsnQO@;*24bKwdi#UU18cY>^nUCx*JXB z*x_ZQyEQZIt;|0Vk1p|>?t-HT=eCZ54iFrw-8}0{8l|RjM=6r2{8tuhtC3pfMycf?4`*1-HpDHU;@G#U)MGwhWMC}()Us9p4VB3V~I={7VO7CZmNcRn`I z;U>vTa4kz8_^J6-2UVjxhI;8siPVuCFQ*}ncgMce#!VZK`U~f9FBeH{{n|8EMbWtf z7nfR_;Vn&vZn5*bWmWC$?z1a@8BCd&3I5>yKkBHH9^Jw3-vVX)MkVuGChw?vggUab zkD*K7e}}ecQ1KNunb!<7YxmF&b&;Q?StlFn$Cd==65Alpk3+bb^dmmU%iCH>%_ch> z0!f-VVlTf#aKX7UEjErP13#1FZYy*z?++3Be}*d@0chV7>IDpV(Euo<2|yU-pp!Hf z4}TDn>ox9POIOIF5Q1OpTS(gJv*x!a6Oav zGL`T&oLPu#J|}oi?&+aSo7x4y!l^puST}FK#;QLkC(d1-=?=YZ%Sb25*2WMqAiS@0 zIGUq5Y`d=u7{7wh(3YfrUWkSLmcNx9`sjq_AX%p- zJ^XeXSS-Z%#yyeT>BRm-!S#~z+ZCLJD*K|D%9PDMib4aHgxFC;_LV|&Et~*UHKJh&& zD;fWDx%u{BZE9L5m(21}Pg^?$hb;T3`l)V4-g0(zLK+ec%`oa6y_9K+IG3oJB6-0P zhRZJTLSS_0hxKrNclZFOVF7q@bk3V!9etnv&GuZ-7H*Be|o0ZG&x}4L$ zv7hFrrwx@m>g($Xk*3IFp)q&kuCA|JNA{XOha7)}@^f}Bek-H7+<2lsS-pQ9MUt6i zOV2+pB9~)nM8K$f*<2TuB^j^hvw2CIOLKRLHbv0HA4})E_ZjwOI$D7K`{$(U=VV2q z5@!g`c7pU-P!AVvE{1D;XNAy4Q~0k7>S6o6KNYY$JTjWWM!y8Pm%+gAEsMD3hEI)s zyi4Y1{T=b(o@_>)hRKkEWr*su;BxaA)ozLKlF^aEqnik z+rd<>d~C}wEtWy-j_!A~DgauB%Ki6k>oefTADobOP1l-RJG6F}q@Qf9E`Y#$X)r4_ zCh|4yQ#6jwlsWs`1@y8|`_e!Zy|eI^7M&QHiGgl^(H8+BrUkn*rXf?$$(%%m2}fxB zohU@al;j4rZy#kFFwyqEt7H>To4c-^rez7i7+iob8RN{XWsM1k59dltnYJicg(ZyOq&EM0HLMMbb8?jr(FkJv8b9z|ae2+sHqtx2YAEgVJCA#?xdFk;b%Ip<2mFYc*O*BCcVflky+H z1p6D3NS!){2AHTgGY7EJkl8oT%#GY;Iu^@m*YzD89Ys7>`Pe?{J*M!~{r>&i24e#j zNb)6}h{DQ%7xnurypa-Ax^DUGYF%|DXVD1&j)>_k>V6dkzZr^@1YDv0jT>AxwYWO0 zay);vVcF&HB^$NaS>H%Npt7ut{{7aBZ)7sC^7xath-qO!F7!`Z)vDAesDY7rA!^T5 zr=?-NJ>QR9@;?#n61pAskD_<{34ZlTaQ+(lLa{18 zhct98pYKj<#e&hajEr(EpOpwUy04U8A1=3bqwu?~+OL%OCr+ck1jAEI5zjJc{-m#T zYi)nsU$+C5O<`YVBvOTL?)&#yh6NUW zRbS|#K7IF*^1d1hrr$sR;5xpm&$C3>m^eRw#)a+*YmvM2Q7Wjv#<70tdcu@X;Lg4* zkmD5K?IX`98z+eOXy8*@=Y|C{rZs8qHWYZI55{|U!-(uzlPN(| zQ#B%xQ;COwlDfNXqFD$D;qK#jrWpl`AfKvu*zSypimpGE+~~{4&e@(9LoInzZrj;_ zh7ZT4d|#awb+9cClmww!G&|We65GD2h*aknsPf$_v?{owi*;Sa%GRx#W;(Pp{8H9n zRybp9+Bj!$Ua-bnUe33FXV_98;cDCIpJUY4XEiIjspZyNsz8?kj$?$4S!$^&X^9se zLIyU_vKSlKC;Y3Fz?!Hi7z1ioS!+B_Do(?N<9>OCY}LfKYA4g$daR*JEcRJ50SxYH z^Pi80`o|eZ-{PL@^>95u!8J^0DfDxu#+XGV&)Jr_gSZ~)R)zlaHG?Sx2o6bqjtPi< zxP&?}B1TiCMmX3_;B=`f7#K#ksw52P%iw^vx28X+XU$F^DXR4V)z;VJzIU!4 z8USPQ?8m_a(T02_KkqzMZoJMNA*a_~3Kwxp zZObw>dBPr0G#DU6AQ~^KHmU|GyuP0AwF$ldNB8PW*c*L4T(4g+EXf*VTl&CvB#xi6 zd9-Cmgy15ZHjnsha7h68_baL6=)j#sCd!LzRMTMB`9ojogIM5jS`xOWO`f`3Z_b`r zgOXpdzj7HiP)9d~2nX|kWHBEA2LqhNOe(9Q9N&xPAsX-@0S(RL$ld$#-8|EwRDpVn zE!3;8+aLf~Rcn3=9xl{Ty3{;A2y^wM&vE+;O+MQ-;ch=9t;;wzUmBhO!aqgQ)!Qs_ z{#NWP^GIakyz6#+E-)$fXNtEKJ{>G%J+u34KBdzaJ;2`r64nKkq`k&J<<3(w|7CG{ z3i zT4($(kI(Y9)nR?%P117g1L}hP$$)U=`(bM4GmH8XV!}Z;`|VYsh#%&J%hG$eEnVmf z3hmA48$WKFyc<9g=e#PTp;?#gC2A2Is|6qT*!*z#!mhN*_mkp98XBP#aVkCuP~{Oc zZ&skR)Ke0%08Pmhv>eL$EhEbv`T#o(~EvULFdwf9q%BJb}V zGy}+j1WUt+ag4rR&Glwo1K0JY(fmOnEp{mRxD5?jE){1#oW_uGm15a&@c$lMZQeE| zJu9|o2wo$+i}}tgT076xDm@b9(!NZcqw!?&T9^Fd*wH1h59b2Khsfk#QJ{wHI+I8+ z(}XEO2@6MMNI%4oau@(#i_v&gN&7un6jL{nabIfUf5Je~7hKA%CI4at-PKIO13KzL!D^-S$HRQ1J>xn1uYY-doHv zTgb0!)Hh-F&``hOfoo_18A2RDb+Rb;s$IvrCzcA<&Jfjj%EWSQ%P%w`k=vxKR(pjj z3=U`)`7pCJ@7|A;0us@G#Xv+vEdI7!*?vX^U}Sk+;iu)POSl>K!tUBdau|%#XL?7y zy}^P@R*xAHE5n|FsOzQ>5h#u6mIvS$619;0uOb6&!d4?cpd_%`vpGshSi# z3Cu1MmSy!a>CB<`ytQ*sR~LHN)$ny#>)n!X%+BZbj=lhJDDsYY_%cyC{^h;I2oWLx zb2`SR%Ni)NIYPgFUCvSI=3U*nc*lX(KOR`k8C_feLkI^Yx?NfEn6p zC3Xn|H}kq&=~FcloR0^6X7iJ~I%!+`4|ccBBFG8S>^~U<+n)ZygNN)SUII(4hgry%*tO#UfcK<+Z}7HN0&Ny1$LDv z#*0%-Aj+q#%iKn>j*n|ke;TD|0B~1y;2e`)+do(bkv`}k)Bs`5037&Gf zU%1Kx$RdkJN7~;|rm!V9FW~8A&@hO|mskq=Y8B?Xq81n}Jj@XD-6_!d2Rn#eHH>wx4M z*W5_!xb+TVp62K%t|&AI}AtM znH#i9Dm>`L&N6rMdjOhiuS?$4_=W*Uga?dK@plDlrycH3WSJ2}%E7p#`Cg4&j_A1= zyNT0YuwIBK-(mL!_tEa81rG9Hgnc~Y)J{trCAti}vlDO3=4U*wx9@udr85S;Oa-GVI;ZADG7ljh5^ZeEo&c&_4 z)7A1TLNY(Pel@HIY}8kJTcZO`W4aWwZ)DtleICMkVU9Dj2uq%zTP*)YERXg@RKAS5 zx8GfZQ37-BAB2VfjQ+TYpm{8y@~~oAHnM#zF{Z4m$fd~jQvJGslO;%d$LnA+hdJP z;kaJ?&$(}CTS*CUT+4Cy`yxpz3VzSTxFCLTA$Y6R;zSlx~4xzAUhD$mgfg<7*WP-WG? zKRLZn3p47@?F^b)i%V1($&dTRRO;l|x2JNVtt zk3KgdLYNo>=xyH5C{4|fv-Vhs_REXG?Sj$x3dant|L7*T0w8>zHb_BhV9gvl9duMI#S@GBHS}d1FRE5i}5uNWQ%&(YVdyNUQ}!J?zebz zYIW?!K|lc36^m~QqIEWjK;GFI-9%DHi0C>q!|VKxQKxNZ>$hC$8|t*1hi;@9Otr$W z`Hd!6dSI*zqlujNfpPL_=%B5Qwfbr?5a@Hd`(g9?cOlsaDczs91MI$5_Yy-n_VXT7 zy9LqgT1}Pc%w5)Bl=%G|7Kkx|(>`bpCA)ZzoWBkdb>3nww>k!Y(Ay&v19d;VJ!RoC zw@z493}GnH|ytqZ4a?UNaP&!+nwR=L4F_r?`8h> zP+Xrrupc^DEG}D4b9s~43N4{|5=v7s3oT~%9DPwzD4V3uAXZRRQnFteuG95tr@S!? zE}t>}Eu_BR1}Nvy9-u;{KqvmpEW}2JYCZTPWi^CvTQ$b*JGjIir!eSku=BI*F)P9Q z@KoLFzNYTV)I{EJFuJtHbM&>OF%XOFp}_fX^MyLwF#H8ZH#@Q_$X!c|(A7L~loM3< zrukMIUuje!vy+=KjAqklj!J}Tq=~l>VKlR^M@pOdgU3T3^Zs0y+4fYJ6rjm;dUwTX z-G)G+HEmt)xyI!Hw+2Z9Rt0QzF+j8I6Vu9NlS%&kK1ud=JvNI~00`6D`u8KNV*LA}nbOFO^itIzD zxyXP1+|}Gg#Ee$f$&FnuZP&=^N&+M8abK-^TM=K!J|BhL=6daMe^n`z&woGfj6XfA zbc|;b0|<4hjWss1OA!1J%Po4?zoKp1j=)Vk^A2)cl*M?Nb4mp z?>ehNKgWFZV6I@3x4Nv+BSYFQZhc7!-ODHI&Vb@8pToQhAnwk(W(fW>!#X9@a?0cL z_72eq6T>v}hv&5Cd)<$jp1YrD0@)Q)?1x9Jc0a6JR=yl^Gk7T?C0P36Avn=MJn)*a zY`{hU$l!hP!coyCH4gIn%|%3fqEt6+#0?dmxWSdqdLd-*T?)E$?>$6Sj8=Es$4;~68xD*F zEArE)v>gv#UBdkN=(wL5wg061@rnINK-i^iro?jhRqHzXS!&YZO=mE&(O??I6cfgm zhUA{?^exv7%V~^rp~;Kfmj=GX=NSG(@V1h<<$4g$Q+PKs`)X$iI&?u-WGa4w4{;pX zY+Xlaf4V=fJ-~%zDh><;-xGZ=9EY!T9rL^ac~b0Oy{b8_2x1BW_p1Ua zoZmY&1WEne(fzu_6oN=IB?SPxH)E+Cu}4kpo=**PSB1}ob7qe!70yEf6a-HzG#_li zF*)!1MBl#?7!ADc+@x1lqhZ8l4t8<}wG>6!7_AsxZ_Ga<2nInP}cSIUTW z$4%0?^-Lvna7p^{bYe7e(9M8tjV!W|2}51rFJYxGq(IIUDPZM^F6_vnd6fZe$Jn%U z+t6Z|xLEl%!=zIyvyKqYT@>F_0t+Lj+_Evj*c&&B$#>|+_18Uqf^+Q?0t`rGW3fe- zwBn~&ZTsV^{!&XJX;mkKPXg{Z-^|tS-Qk$QqhPihKh(yBGilb@?S;}BOx0PX$3nx+ zB(r2h#@zjSkyhuwK-&4Wm1&X}CBi^3^@ab1OrHc=5KS-}Xl`fN!qQ{EbNNlMWyR#> zRG!Zkf){=|3i#2G28jwvRnxQxT?uct>1RfLWiu~o}R~gliWWXAFm+$Sk=r!66*f$%Mz@f>DT&>)SpG?e_wlo z#L%CT9YiC+V0=sEvi|D4sRwL8%Up%APgFy{UD!WYYIKgAk@C%8S$-BRFp15pIH%&` z!INXUm|=BrZFgt`!l;GwXcZks+MGtmxW8v1D{y-5zFNE7j_KF!!Jj!Xr$Sl8lhu2z z3YhsvD#>!zJG>!9e20nbFQO(uuRX1rhp=L7frMcdJ#YY0n6wWi@Edx2q+Tp zPQJ`2Wp-A)lOW0?qKslMVR5+ToQjZ?YQ4Eu2LRoB2r)epUm%g({`*c{Xj)?@#$mb1`hS;O2t zt}*$nD+Q$*Rfw2oI1@^KAMJKX#LTuIphgQb02p6kE}zcf660Z=-Z)W67^b}0LjEXJ zHbkz!WYv3ZbDOqfhU+`vH?y3f$5|%#KsSC=4dOBd6CgQ~x^8v(qv!#EGwjvek_y zrFal#$3HQk;bPLoGeD4;uUcfCpk%h4Jzr5!rn`w`e&QJ+g4XSQPbJX&4cpX7Y2L8&cqMun;8x2CM5Rh{NU2*Ky2YuVm?(KOTty-XcWI z`11fEbbu}z_NKvq*|yW$VESOcq~w>g%caVQRRx^U%7snjPU%_Zr^vO%fyq0w2;WD` zHOs{<`!qfA$YW=Ycm-^UE~15HnPU#e=8D^p^bXHR-FD+b+=b&fCa~}}k{i!Td$NKj zjA~Sm`P1}~Yi7`t7I!~310KQ-ZiU;8;PYx8QmOm4=gN{eP`PP%PXhGAZR|C1(1BRI zC!R)II_nI+w=NX~k!d4hm!t+8(aczJ9%ChN3N^I*1Z1S1R4_~&b1>{QZvOYZVI+L2|(?=<-(=0D_Y8@Ywwe+wMwfWn)usHb*n zvaf!t+Uq5}i``NZ2bm%YS)HeRqsObg2+I+mxKg)Ja6bPYxIW>kW?-mt_V&a3j8VZ) zt(NL*+wJkU#w$!K)rYhXbP2~Qmv4>kabxmBgKSblx}j>#O+S4`q{uQ&e(ZHDvRl8w zcb00@+#b4lJEi>L?UaGdcJ<#C2a1(|v`*SXia}=JBpE?_mGnS092Y8?a z;?{XjE*Cw8g|WzQ4(D$w8#ZAFjzdynl7y=JeVVpNQ+?JFyvo9~u(77MWh)`$NKw3i z>ViOilZ@bm)LRN%7GHfz5ZRxs;l?+mW2wI5RLUQ-#|B3Ik%A zf~e(2_tBoNB-@xCg1TDfA*X7tCHMG3MFH^OMmCsJd>K2RDpiK? zx0`N8^>oVJPSIhLTh?_HNvChrZTO}UJ$ABZ}hQ`4qw8kv%ke7>0bm+6V{q; z4L}3Cj-==SLI^g&tpEFdWm89%5Wjp&e_m6DOJpLb0iMTj<3>2Z1OT}31J=pU)e|hu zzj7x$oEimMT=EN|ba;At+`aG+nT5Z7mGhV^f)YOb!I-;L`bw(Anr4jW!;q?)>+EY( zrlS9FGq1qtbrXGC+x~M1Yu_;V2$tz_#CLh6sg26yj^T) zv+RQnY!2x9TYf%0Mg(N~HC@*aCnt zYmb&t9o|ZC5-`ySUKZ8U^d9_Tlzcdz?(rm|>^zYlG&!R?IUC$F+fPDq<-y{cW-Lbs+b25?LI8vKdV=hJyWuTHfI(ciOsiCqv^EHrfGA#XZNB3!|g+lJO zKYjYoAF-^9kI^J0_=fe_tMvyA$kg(#-rk935)1o3cJ&_1CVC-4NmrZb3VR^%l{wZ0 zIoSM&^UW}NLT{rbHCudpPkbX(niAm_3I=@S0mEC7=qvqCFaMJp@GUfr)GykQjr%y{ zee$vjTV592^RhWWZMH0~Bl9(GhZHT>n%j_INM}iZ&+q*0ra_rR(pqZ!Pxu5yY z1T$t(3RJ`<=JVd?Ao+YC&vFAJA^cUUo|m&gotpJe{!jx21kSiY55P4Y2f+iM+?5FD8ILduU3(rZs1~QLapB`YzVC)EL*IAHMRcSK>uY)gPviPG-|39MW$!^ z$GajJcHc1*^x4t6vXeBQU>^`jRMbo?+pE5M4r#AUJCO;K$GCNlhfWU4#rh3R;#e-l zn}465FXz%bKAKwe7eAS-)ZyAy`*Luh--Yvx9QWdkg3#%3`^~iM>MW-*G*o5bmWIBm zZs}R|iX0IRZ4x5#@tLVn5m%N(_}YiRoA@#e$d1;-6_-QYTahTnB~HK3?9Q#k0srpO z^mM7-WstLzhZ>J12Q4nNV}-N3eML~3Q|`Mk;QvzF~d*#v`vhQ7 zXM6p=NpIM7I>RfL={GXcLV{m4-8O%I$GC97YHiR-1j3XpmBpD{?GoqR#0E0GZxM!A zrv;QxamDP^6P&5NCP|M7x!%Lhgw*5v7gL`tD9|pOr%>73>MJlPTX<4X#qfT_G-X+&WX ze49Z!AI-Pd%ul9QgbiHqv$EW@u0zIAv8GfuGP<#L$K!K6-_e1pV@krCb3hlJajv`@ zWp|^(AEO{N3Z^4!UdhY4x1Dil8dujS0s!IR>rLk4A|8%T7MTTayR`CN;gUi0o*J1~ z3%76DKo=*M4+mt~%MA#W&XEFVL4=XJ@gZm3%H~GxTl|k+ODdIK4(HnDXgDE)OzyBq z;@&!_8&y7CZ5DHMgXrqVo^S!X0mrm)U$(;NE54l3pLmT9Cqnq!*J6y#iY5ba0da&u z@+}75JHX(Ba7@#3`e!m$(I20odTKcD7yI(cVD8cRntTa&SNm1cOvMf~ed{1nn#5uU zU_U)r@ze<89D*{O<3K=HpQB+{Q5)r~fAlXdVRj4W(-Ymob|^#P%OI)es5|gb;Druz z9{KP7j8}Qdo*RUvkMFs>yvCKaj+?^rhJ$)wX_c*%sGOaXj+EfJ`~31xg}vS$N$Qal zAjWTP_YJxK7unkp)RS1pb@Tn6I-Piu+cq_fx}|}vf7|6F%s2MQ%ws9myfu3`U3mp? zuL`O@QNoA((gl*2OPa-Rt^kb{sj@F}7KnEOn#U{4F4L=dBEgZ2G(1|3e*vD}BPl^& z+eGRL$x1X805^s~WhGtJ7yYBv(%6Lks@V8LzIb@K@y?(DN zI^ar-3MUJj&fTqgYP9=3UvQ|QOk$Qx?P;BB9a|dffDW8L@thsNLU-M)T9zwzK1}sO zEL|b~DrGGtOR!o_>27@U^yBoIURA^QxOeV&8TmRWuVz&HUsgqRb1pk9e1tNC+_H-Au8 z$=#nDjv&d3G(MG^31)9fDmATOC~+vE70PZ>9&6rHMm@iscVH>-nNCJVhT;78mlcX{ z048opnLcC8o^pDc2Y)a9T0qQSk|1o`G{vBMHwzQ^f}EYjPZ|!6geBTybRwClL=w0e z%}1K~dKf^}nJrwVXE~OToiN#VW_5l|J!AK$_Dm{R7Z|YML+_SS2boiM{u5WS9xUb; zYoQD%I}GFpPc?_k*|hS3OmyZMUrD?6${hTxU-6+L2>H+5WGn8@&h=xd+!K1&DGN>8 zq$r1_QU}a!5`LB#=5M$zarFfPPKqT%(t-{5p?|>3mh1Y z-*Z%7L_bFNN1^IiYd&phts=`vg}QQ@_v;t^#Ev1zt!s1oz7uBb2Zg^Thnw%GrN$Ot zhUc)Rx8VF2E7&h6cjBwQvrp|C3NW9ngOCK16R6y2$%#&azLSEZRI&#&HW7`VcM^oA zfsI0=nkci4Z>t)Ewfh>aXh4xR@Gl;hZ)I&)PwuvA1Id?@XU9SR_9h$ifzK#u9%3A- zqW&sOWV;`rF!4=y$L9dE@e~Bk$_2i}`r9($K_f({b$;~=Y^po<7ljgc#t!FPJi|Q& zWtDmm8~J{wIXI~*lN_Uc*hCR>jXhjxZqm1)EH{JUfibXacgEv>92sqS)t3=V1k9XvqZ6phpKuDMNM#&S zq%i#KNHBL&VKqbzhxEosiCzxdZj2(dl^T%#eN`mCDIc>m z9uht!yteD>{_W)_9+-dKRB-*-u|cRjDLB8k+Az)@2_0|?I$t$Oy$-i>{POG4K1ww0 zGVI>fo_bIU514zuOC*$a?Co@ZR{qoAB1m=Y-)pW)`H8fvSVYw$5V_v!IlTGj z+t(TyWJiY`s_&>x{`5+1yunPS>$LjLcF5s%LN9$SoheIWHd8q|*>K1XaC|p^TxL9d zy_<;D2B9Q;Kj5=xbV5(mFCzFMx~Y3St)uVANMz z0H5*630X|50S&P(>R#KtMUJd0nHSwovYc#J3e@GojnMTN5~FkPs`-&F&XGSsun7v! zXMds9m+VDiwG$p7-4LJAi{vAoN60uGjgPpJ#)|%+6jx<#tB-l?w2eqZjPc-<^T?y; z-mD<>ljl}DlS`t_y;btFcI&}B+mS2UYuP!BQ@nh4xQ9NTnqch*H&DC+BAN)bUI|?@ zb4jsoX|{%diu&%~R^N|_4Vmw>B|0YeY~2;&g`QPe6YNn&-#E!NrdMRI((EKTd5}nf zDW3aLxbZ-gK4CqLvSZ2JNM%|j0xEMyP|u$F*P{aFF@TW9iN7<85WO`A>$_Y(LtI-} zI&pJ}U4Ov>g5f{}z!{)ttXddGB23`sVU5gE)!k_Ta-9>T|IN=>WNKpqdPBS(at4YO zO5I~nV{cBUf^76B%Q&bx`kiY_D)`%}GK8nj?kgqq=>W^1n%_zT^p}+nU zl^Ym%eR}pVmuyLk-9&`$8H&q@{Zen{ylS4r!(-BhrQx<~1o@h_!VOAu<)8o#Uenk0 z&U`a-e5vf(gg5_6Jx?|Gep&Htc{=Qj9_^Uat~;B^NW6qrJcq@=S2cD~^67EVSU*pp zP5~Gq({==sTJK=qXx$#<>9sG52-hjMlEgL<%c~=gHLh=$`}bRz3n^r~Xlz6Mo3Tcu z9-V&h1K_*Apf1Lj$t`(PX%zJfv)gvp{mAN{i?gItLZi`n&-m0)1MvyV){Ya>o!+%_ zP@^c&e0q=MeV-9^4!wgd%Plka(EF%+Bp-VZVQbLOYNpA21q3X#Y1Q572_7#S*v{#X zusIdv%j@nalbRKVJ<;g`x)Zj}l=uO15S;MTHtyw*d%$K>N^~PNPfDyRuXufM?rwjt zP-EHSW0dO6`NP32wa*^qU2=|D;86-xV1$!hUWlWgwtr8a?%nL_{M7Ub&Ut%MG^_{i zW1CAr6yAroTiXG5?M+`;Qc9Gn_4>kS>hRWg6);6EYtpwj!(PTS|;Wr%5$!=iVkTO8+4{6l(j zESALR)Hz>jJG|&|)DtW3bK9rf&eOBz2U3(V!1;?3$Ezn=MM~eG~UE(R~@-ws&Pd9ILXQG?{NY-QE^3I)ut*D;EmoRiGH^F%M=X zNXd;Zf)7*tteuP|ljbkBg8D?s>*%5jMjoSl86SyTk^_CyC+ECSa6OFg+ots`(coo| z$36Z!{lPq8gz~LnEzW8jGQ%psc&zQRqL`5ogwj$7b5IL%tW&ga;fE|}16V7vpFxOL5ve1doK(#acWI#*K zHgT2j?(?O#Ff^hKRyo@3E@FD4HzpU}XCIr3GGg6V!)=5m>U}>Netq1CAMEeZ_Wl!h zBlp?WWa*41rLT9^rh3WEt?II@2c;6E{@cz+W@^_1Zsy_Hn{;8@d2i%eC5w! z)nmoSZR;pYIVwMdZ5KPN*rAc%ch5ueRP zC+C0u>$FE=<0md7dqB{8%>3E6fV<-I+6>$583tzi{Slq8xaAUll&}zR2KG_Vz!W$S z9fc&Al}*~m)M+b;+%Y2H`AeIG5664P%xSH!^uONqM0i^YVx#G}_9t7V>#D}?%v=_> zD~odITOxDpxnm|pYF^eWPjAKKM864JQ})?8+s$nPjlA>XP5wSL9$A__PQGe;^&#qYL5{zR$z2f$!$){@kXk>~ox*)H)luSGmrN8gN%P!u6xZ;H-9gWb@m>1~t%7PO^ePv3xR*n+|**k-!Oaz~6bVTXfrO`?ZI z`*ezP`3z<8lH5utd$jpom$`tSp1_I$+cG!b36^CHfK)nJaFL=%d4`LHPnsVu6UDD7 zRCJAnu**f?Fe5@gON%1!nM=yA*I>GAPx%wmO0CKbN{y~F!WZ6QL|ybnS=54!blH2t zl-Dc9R7=J)Ba1T^ZfR17Mi-5zg{_)71g-0WkjwD)-D5Xzbzr)tBd09Y;qhHEj8v zS{rO@2#*a2hr@dViU;YLY%efuA8F*NWvWJOQ!hD+9^QbqCVVS7fEhcJ_!8+z$|Y7)G%M*$iDN#AO2qjdV*mh}0J ztoY*g@_Sh}KcB*0blppx1`p1a<>!JouU|J}=0=>pVj+(%jS70lN*mOiH1#Y@v*8=w z+b^t4uFf+*rOQKdK{PFG^Vae+C(Bno620>a1lcT~-B88TAxB_TUWTzxB=QG8WT(3C z_O4$q50~(v$l3+TfuGfQ%0Vu}*g(eiJG(%-Mqll5tg(ukN*q3)GnHp1{>4Ol#^>XM z5kcImTtd0{rCAC|*IF0b_YRL)=06S z$GAt#edFCTxwa*g@XAmaWqxpkX!v&(gp8lg$Y6qf?dsb*Cf@+c!}=16!aR?Rwg?B<7we11O(+S@*rJ_b^WjSdh!*bE7N=j`u3g;5RP%~|C~0u-KEZ5~3nMF5 zi`dHnamLu4DK2b^mM9#e{TA?gnx_tX0{4o7>5O4pF-NMPQzO%HA05HgjIZCS(w8Zz z#73+_dF#aXc1jk zb=J}~+Txj1B|DG2bmYD-2S3$_4S!A+?fi1+2kw-+#Se;i>PkL$HkEXL!aS+Ozbf$}dDrxbG@*y=IBSSwD*z7t+R8$+! z(0?>d4-Pu#Myq476ZOvIKXrYh{mH-4&tpys){SEEEU=lU*gi7Y#~R-+Iext`eR*!z zOw#T2%~#)9(Fe4U@K$=#uP%hb);UY|ao>J^GW@Vd!81IvzrKP|G>%61;_QIt^7)9e zgV|G^+A0me9tf~oUFBbNANicD)8>@hip5GGguTS^$HN#$2H7G8;lOtU32(Bf?pera zJ+Y7jLS9S47l6&5zCUCYSlG}UZ=`oa&QYvwQ6K2z|JDCdqW6XO(vh5h#*DEvE#nI0 zNyBIQh;IfHXW{E9#FmfR@Bus#z32ei3t*2vL{>b3^7IFJ%#~Vp^v9fZqoKK_o~ug1 zx8HDmT^9luIA-=mv+^T}v%L~lt)Bv#;~tY%n056uwAJcRJ>UE3=rM<8LMsTiS>ZB8*hPRA2c`4d|c5O~NH1dg92{Co>u;rl{86%M~ForfUMVK@5gOF}qYo3{hrS`c6R zYqSCmFP(-UFwV0abu_gCwQ)4U;cX&1a9B!cJ7gAp=<;ekF%W?k199*S^v8jO465P-O&|%!%n|=c6J*M4_CSs zU&mrr!oLgib#Fr8I6L!mvs*|@oNfQqfMak!o+q<&P-IVFokQX0wJ{;JfwzZ>{qcOm zhFf!Xc6uooj(+wfbzu4r0iy<37*<{T&=+#v_#!ZhxVyQh`-~;k{Nc|@qZsu&K zDJ>!4u?@c(!v-J_F@dpEb#Q+%WgQ)pJ~;e2r-X!zY4PkDQU>10kXQobySf{D+F6_Q z!r`)VA>Dzqz*YEF6UHAhdNzE-+%Yf~9obr^Hh31ef$UhopIRq8+7yD+O5t#Cq(*oE zhiTqwv9WPma5wWvq!zb+wUZV!OSl4q7fb&smcpmCtb=3G3y$IA-yt)YtLN}l4>>?E z0v!&22LQZA;MOg|PmrDqhwt*=l+j`5PXK@r1nTpMBM2OIFO?30+=_N!2>`r7V1Yo) zPqd!kphJ*_n_pCJF+?yR6Y(1ebWTnlF0Nosd@kanf2O6(0GoW7ox zCc&n6?R^XdIi$U;b8ir_bpt!xAj0)rPFP$bP!dN<#PgX5i<_z6Eg~Ie!MaiZiinD{ zB&T?wmg5Z~uYAq_aMxQz-sosv{8@GYta!I2f218HPmvMg%8FTg&JMkp_J?h$p6-hrz3q zzbLV>RJo<(PP6JO2S>1{pQG1rQb=^nG;c}Kkh9X$mr(_SeSJNCqY|K_ZghhRNYTeQ zIW^^jp|f|81>{duEUcAoP>Ip>vv$5k#lg!b=-J<>Xqaf}U1x z4^;9jAWwhe05(uFxk1Iq$C>R0l@AWSe7`jlYvo&1oa}u$Z%}dbG5JG_jg3U^^%j*# zO@Gx0Br4@5V2$6XIKEU?y+OrA%SSE?iOM%Uu$s{=Dq?O7x2SNdxoLrfrS+X8?%bjx zsf2ff3Q&+&Mc+_YmI3P)6%OQ`A8!yCAP@yUF@Dhh1{72*Ow3RWOiU~!B*H`xEL2QP zBqV59Ky2&~AU-xW768PB3&h021S0JH0HrvekYWR$ z-9ph%j!pD86c%`R(wugWv60U*+(7XX2n78Fg(~n75(*Eb`Ght@vsOT$>|an|Jpw*O zLNRh5f(-$QJDS>g%Xhck4r}_9R#VO0bl%P0-pgW zcgutv3Gm)?F8n}j6rJBlxMPzT-XQT951TALH6>9Pc}O^3e;{%9IgslHiAXAJpy@3V zst|0Hhkv>}^6EhYRJuVz4~R|p2NDerk=FjHQ+qrE-n~Ua02}+>pGa5%v2lJQ0Rld} zMS=nwNctxdQNLv*646vZ)mtQxI^`coBmj|n|MLoA3#2r@L4pq(NOOaPFA$sjw4)NwQ*8lf~unBo%``-(5K%lj$+3jL#7c2(=6eChAXT}P((f_EEfcV#C z6zc_I4{lyzq`~QXX z(tkR>-5XE(hw*``A?f@l-IVMf^?ftyf7F+BDF0FKmB;@_y_N^*KqgI1gNTz~y-l}E zKOAv>^Rf?$IGs*LHosZY5vfWyLw&QjArO1{$xSfCz)SNR_qbWgS6<3t{_zq3SUtT& zI_yG-ygm=gpWE)zKI8cg}k za_&InuJMTehZLyv$ollRDNtR#y-)s|0`T-t&O)%WW4UO-+k3y+Zd*H*Z)R7ry-){SU7Bfcv;XV3$7B*xB^7Q-3v<6caCUDa1vmx(fHTv~qLGSp5u2n70;o2&ZK70X~|;F@SSPzKm2CpJ6{sl7BKNZ9d}(^Ut&Eez`)@|?4A zj*KZz2$s5si}^P5+atxR<@u*yhMGM$2PD-x56h`ab#PULmrdGf0-EsCmgNfa9@QXc zo^|@cCOM;qWA>d?*^Jr{PgY@~S5%{2VzWqc+FpQ!oSY4l8XqgWsJ~zN1PX0^YBObh z#K6zKkUbZoC=wOA`_$e$<2kWem}n?IO)GLPn*6Ewjnpwk! zh#r05d-MbPfNX3*53al*-}{4pjlG^&kD={XE2B_3YxS&Sd{UCiGB+KJVI=WYw?9Qj zx5CR3J!YF%zH_%z$jPn(p4w5a$8q9Dt4Jy=&R056Ep=4HGVf~?7#QOeFPqgLmSFVC zN00#4nwl_tx{SjfHg|1S9Kaf}W4hYXu-5P(Y?nd1@}F(B>Jkq0*~x^`lobnLchv%Y zxgU_fjS=u9qD5dm@^S?oor&Rhof71hq`Vq~J@Eb^_{gWyev(&`8KUmuPtE;IR`uZ- z1K|*Zi2=Z<5v*6;ok<%!u-CSL$NVbrK}$YJQ?r5%$6=2!R#xOYB|{*gA``KI!_@26 z)+gazG|A&E2e=hd4haV;H~|J(s#}4R_UYeI5{juy*XL#HeNfVPP+QcAaunL^M1!-r zgXk;~LHj4ZLCLV{z{!E1<(r}e&la}<{25#owC7j;S%it#-d+9sBw`KdvLoSo;@-i)wwv^lTX zMe`6bbLrP_WK+$deBIna?d9pz*z0Dyntj$D~_pWaecDUL@dIRvqzJF#0oFgW;hc4Yh16qyV2+qZ9$wVQO31RR9PHG>qTLw$VA z044>U_g`t?Pr;3WriB<_Fj)Rhzh&9;heWX?>L)R8Iqy(b8*pl9Yk#S%^hjY=XZ@ad zuUmm&k}7%R;pV&kN9C@l&e0zCjj5h?eMNhj=dBfS+9+OZTO;o$fI4{3iX6j!zEs*~ zU0vB~E`*Sjv9(#YcJ1w+2c^b<&DqC?CwT8(;UID&Bg)Y&1U}frN)SvaBpd|mxx8zp znwiPmuKhZK3Wj{9=)XH0IZT>L3W=5bV*Wii(Po&ZmK1u->s@@}lc>5_8k8-#!>+tA zmJl$TpXp0B-2~y0^v(Q86TuP_LdJO6kEwbmY2Cs@yA?;RA$RaJ7SFv}@APTRu6+c) zPlII&F+;HGV3%45w511Hru4a4?{B^t{WY7q>&<_eP$%9XP(a*4h}STd6Ct8pXJ-%Fk@~we%gET& z3;o&I`3pY)BBuVQHY5i3>)O!HS-CalanJvfnD=eih*4cg4S3~U*AB3N5Qal_Lr-{A0``X za@ZIkO?G?nhsnm$LY}4y$@RAKw8e|HEMz{7-$;1ZWP*fCK zA?FG}+NVw^WBmlkfV5W#>!vKq?BXE>6hzt!LjET!Hj+{yGS&y1VRp8Mgb8WybG#dS znSsJuq{KJ&B10~L2vl|~bjW|0>v|jUL-{-6_k!@o?E%kQ%SuX$t1{>}J4SjW0RXE% z!ez(1@X4PW*Ixm5hyOKxwg~_<{cHIc@88QC|4|8nFPLMh3{u}Z5Z^Yxj5s&{yJpKGHs&Cn0(DK^j%*UJ7fTI-&I^%-SbvBUmJlm2$$1isan` zd`YC~@ufpzdtMQR#uD~^5o=Fenfz|w*GA=3JTJZ;uvZJ)b)EO~E}Ju&pZ1LM(eue@ zfKnLe&pMJ*e8>8GO-#bVOw{&tbt?OpjR%r*fE92o==WNJ3yKv4^g0i^CjDLQ2$Oyw zaObbpVk58~MdwX$dfmsr+94Z(@y!W-uk6wUD|pSk)F(5mf48eg>2{^}`MsJ@c+)!p z5*I(Mb6Wk?ZUs*=9c}WjwRaE=j8=k+1@aXBs~xh@5p_51?^WjwZ8sIfLTIC=_wROK zwAgh?=lCA^@jg|!l2FA?z!*-j} zhAniV%`V51NN3=x5?{ZzMDF|JC)x#G39Cy#xBVhyy7Q(p!D~#@a}c|pY6zF<0jr;t-l$Vh*mU@wE@4YW$+IP3F_)cGTefu_r;L! zc4zU_zzW&t%?03Q+Dn)X+fJyJnu))VGt*ozI4KY7=rKUSeZ{5j#vQ|L#7@SGtB%?N zue@2OIlwng_MWbF2I-osn}N$-8^y-5tD$JHQ;kafVcPC0K;p^4YNr(eyD`B*nDO?N z8|~%xxbDSbvp*Si zD(dBjur$Tt!Y2BbopO;gj_kr6U?~|fILsr?o(M3u)ic&83!aCEUacDEhHy6 zD9r#@p9GB0dLo|^US0ZiSAsvA5-mZ2GC%By0k|5}_t`Wqt>b1`qhlcjjrU^bL!jOg(8V zn`QMF6L`?c+^AC?!85@nE&}Zko!XUDNIN`&-oU+oIM6UatK&xd?Yf7c1#u~CKO^q5 zv7ZUst8<#C9^=W~sM9YbtuiWI8WXA3ZmHKSFDx#sh~xbk*o?e)+_+p177lH%gtjB| zv-$W=>+n>%opAr1_ne!jl&zMH4m_tJYs zpoSxQRcl{K1<8WZs>sMT^oa|%@tjh6MXanlJ*jcxsF`z5_+ z<4SeWaqL}Ntm9i+p-_x8%b&62_xwhN-#y2yE1tc(w;SuHzH3TO6%-aL(^S3n87g?$ zpNdD`aO28D1gefENN+!AMm~sN4<60aJkxa=?|T`uTZx!;N-sR>s>E;L__$aVAqvAk z&(Ysy)^%o{C@y`<&HSyn}hUwoeryBB|2_neqLJdX& zrMo&S3#W(D$9;VAM3;90mk%L^u6So}w(B|WU>S%w0yu{%WtpLA&(9n=&Ry3el3Frg z*N?Almt3xV>S)K0yZuU26=oK~xgR8>Zf~V$nFD z_CHeXhJ5ToJJUB^HFtIH#xV(A_%yX*ppA=9wya$|H_FMh$I3JnkS2)MFQ@Rl}Sglk3;MAitqW)?BjLy(+|YMDuX|SN_%4Eg`7lI!iec$%oWRXmHNTsRhZLZ z^kcPOdMjs*#?L6sv^&w&4YM6o6yb~HRWY*-BpD}-SJ3Hz9{6G4(|t=NzBt&m_=ezI z7xO}fB?=7csziJn{hl!-$>ev4&p}({A9&XioXAY5Wx9 zlq}O!2bQ+D7(6GU)Gt?{VN=Pe*38-Yz?Egzz9)LUv8hP0QV&hSzVrZUt}m1-K3#5y zSFEDv_WD)xuJu}se8v65izrFO{nBig1V|sCib!qH7NP26zr>*6{y1f8IE+<47Ee;> zn2z$?Hc5S;D!CKIEj-Izrnvl$x?X-OB}DH~{7qS{#LRgr^t zODG%&$^$%2O;5@$7F)W7BVHTES^-)u0)$Nx?g~!gE{i8KrEm)nC)yJae#et~rDf69 z`Zj9kwUWjU#f7Fc)Oe4EMk|$HFO|zigH&yg z_e~F)>y1%>#XkxRPF-d%^c{|z=WziS=y!@ujFLwMvh&C_i>2`&(UqSJO8!h52E!a& zFCs(j0W>CzNdfD_XzGzZ+lr5$V;t1j6I*n-HXly`yppX;tjp{qY<~I?OAs) z(Hj%eXkS9nHYov6I}$Tp!C5PfvIj-mtVXRKp#E?O65~h}EAw4xSnE=3AROQtU^`b2 zU1=!UoEn%I(3WS=SKl{296UIE?673NUd(y5U*a;}=P}7Ta5;DEhv;mUux9*dh1NLa zyk+0yR+yI@nKKNd{*|o#tMt_UBvaktlvf3I`AqQTm_a)E#LGO9PNu0CQ^W9};ZJ3}- z^vzYdjfe&8$X9$N$ZPJwnfHJwIATFF(C|%z@`-7y$7V(xMEK6N7IapL4tD<_#;|P5 zX@|5?#Xaqm_?+wU{H*CF&X?tdVxGsEc<;dmY%uz0L1XnHT)$$H_2bH6Im~^V3Q}Rd z!Pm)kV!zzuvc`4q&omZ(c0V%7Kh4jk(Dv5j=`~w{Rs9ZG<2RSDQ7&I;{aiv6x|$9TJw6H zPq}i%Z`;N~zUM1(v;z~kp0~ZxrTBm7KBKbRG$=&*@!Qk+H&u1 z?G}RoaEVD}KbgbRbvQhJ*&reTwk)8q^Bb zdERdgF7WnxCxG6rsVk`TL;GT7OcYC7-lFp0%cA?^U*%7AFJ6}(mU}f-=TYO=Gd-Ua zoV2_MTMqP6w)Tf^-9Iigex5)+!0*IROI``zy*m$q`Zrm7N9Dju521ryWj5a$p=W{B z1(PexOiXjIRjvSV&X4-k7oSl<#=~*zNOx}syLAB2cwiI`zF6}SF z7V5Qj#1k|19SunJ(I3aJZ1i>8&O^YXKy6KKeS0P^W#S|mu|hJ+x*n4=Cp6+>AQ>v@ zDbIzLHG=)>Qvun*Odp*MtAELjnFos-c_rkK@1;aH;FdWK`9Ny!N;kQ-I*~+MDSzEM zT>Wa@W2#68eQr%)Ue(rBtkw|WGaa!{vQYp>Wk1xob7&B-JFtaF^VzFe=d1|ry&{7L zB+)bIHj524O+HFH%nxnlO%G2>>+(v43?zfhq(0eQLZWk{sU96`y6Dr?eNpS@P8ZDg z^17QM0DcR0I~nZ-?b{>-D;|+_MjyeMAjIdViH>FM+rb1nd2^KaC?8!$tAxR)$^T89Sji-J(@{=iPb;*Bo@NNKidt(s2RK za!K28(eT8j`<_kVQh*Ep!f|M*#0k`}z-~Kd#6IFp7u&yc)0QCs7p3|r^=_le;hJ#oF4671nf13EJPu{+MY^FOP{&3 zSS3@?&@?P67+(%o9wZDw7i8@V7lf~gs%HW!@O}uB?)%W|Rr79cz53FPaBn-@ePcE<~h zR1NH6a1Des%8MMWWmwk8P+A1%a387jC$)QANQv9FHinP@_AUI=&b;AOh0~!Pr&}S~ z%;9vRp0Ii^i8kYK;Lj2n^_tg;?c7?TW4N5je~fPQe`gn#AtRt(i(YhqV`h-a(a>+*P`63bJ>U< z3vU?+VJd;u=cce6zJ3|>D6^|J*DHyCN zMk1^GA_w5_ll_3vJ|9mg@Rs>`DTE-p>cp##p> zIS#er-qxlI3RWP!fDM@%(B88z>Y12BEY#Z|<6ryY4MNLZ{nXyG9nxrm#dPd*j`KB3 zzhq{c%LvK!NDb}_hveb@h!AA#D;7XIO6C@^K5Vt+x%@CzOYMYOvRa3N%yMO@O5s4B zQNM2uTXzK8u3(pa!en%jMB{;eH~ExNfA?{xkzq_8R&2-(BM_fka~2V z{G0t@1kHA{{?4vJH?(i;L-v}&OmVJ#_Hfr~M|~ns4`_c==-d_a)H5-!7m*<(=6fYE zt16adn%&%JK16#atsb(2>Y#FE+~l$<-+#T11HH&DxsgHBpQY%-BA4eH_iZ z7bnLn;g~KnKp~-0q)kxpjstR~UVNB&m4P2!DN%KOI8>~uwyOM+D>z*)vsS~Oi`;No zqQUuKY`lopw-*K!)VkS6dchj*w=3raTFeG>=_*zNRdN1oFOjtAZba+%oo$%0Q z70l7B^%OKd=z4*mlW$}25b&OoX4sFmJ>)oMG+hH*AF}9uHxl@4TX%wpk@-29g&^2R zTrzXgQC*C^NcJx(b4<63bfT$cqD>QHh{Ro>MJy-sh%8q%zuMn;dgz0A1?%qe&z*Bo zVhtJA$lTa8wOn*N`T$O9@OoL1<266YCeUD}bU3yB26GO4`65CE>Ly8r0^dOFKLaf) z7J)w;guvr6$j4z3{NfN0?YWF7H zh$_&1d=B=}picgXG{Z!vq6;B@Dkgk#iGYK!q#`=e&UGJo9kaIz*J8TqTi9Bq21>-8 zn3s^Ow8V2PQ+)OpVx|O#S0^dEW*M(cSE2VrIu!7gG0t?zj(=pl|MhS)q(QN~EAaZ@ zLfWbNcqH)bBS@znTMEw}9m(p6yIf71ie#UXTZMS04PLA*DF~$;`=GMBhOxPG%+L>P zQGc~BU{819@GEbOgsEyJvjuP@S281jiaft+GMY;z{|D+N5r0w4)zvFB}KmSPtV@kWc-!6We-oGYEQ9RXoDVa zs&T89$6W8tg;ib8xSEL?K#k0kOI`U|bBGF$jy@z6d9_i^ITspUuJ6o`onq#E7Q>(5 zZEQME2#$#8^M8?&(hN$?I`CyNi9v&dxy zs<%w_W-H{w{Yy0Irk17|lDh^w_U);?uRPNQ4$!EyNt|#|uMU2WX|X*)R2M>DJ+p2c zb1739YV3&TFzS-GC5GTtq3>0!7!}Wm3LNTNfkZB)ehKtR>&4oJm}eKA4)U`nMK!lN z0aje_u!A`WY0OUEOW7Tv*Qg5-X=&Ar1qjd4r8yh_95~{SD_uekds2sSOQ^shv zcR($o@X0z)yAs1%TX3O@j9^VqjD;{2ltvuB>^&~ASn~77f;!I^?+6PVO|Sbi%n(Wv zufNV<%?heFSNg!46|tGS6=$>?LY~%Yqy?Y4kQTf;&qdppa44CG%zUFza1UNMY)hw& z{um8X=zdqlh>^igt#5zsDl?1B((Ceb@^e}>wi2$cY2_p>{hU;;X|9i0*_1G&%XrSj z4l$5YPxg`IubCs4Al>Pb#8iE~cNyB| z?H*RxD0i0YF(_(T(|2Z-UxMD`%XZL3D)qDqAxuE;X}@hcw`dtg(#ucK8(3=Cqb839ulq z7m&hF+4~0C9}&IVq5cQqqi9a=co*3EUbCUP7)G%@DFd24m0!x0!cN{;xNEk6(gQ-g zChZ(e!O2rOk~ReeQ#{_@=Z} zQGpJpU!s+h(KbfpJR=u-JT zEV)_ET_sXNuPiCyV8i#*Og;v%9V5gdwB57F&n;fN4{$nkrp+hxI{$}qc^41fe%y~( zMPD2r3OCl|Y6VVzk%?(C&s{d7db|0JV#FSpt?`K14$I%NLo#AlTh(50{xGp!GjVK? zMC#eJU}W3RcRC-E-(c%}+Uah!&x@?5)<3Mz18Sr~)G@=Wb{kwqGd?!@of|S`q2u~0 zbuT2;M}^rPfNeiJ7)ggPPsy0Past?%X}^9m(o4Z9S)D>2J*`jE(&5+IAopqc8^GNHgx5+^?rJHyob0$6Wk;&)*^b= zRfjV8V3UV09S|Y#9aB^Muy(v*56dB~J}QoJOkr{ANa!sAwfDDbhlz&Zt|~bAWmFjR9 zFp~+2BTB({S$nCtOUHkR{X zb?mysC@R79T8rL9tVsMW0V;r`5I45b5s4%2^}YP8M)K}aV(XMoMm~zo;f;KPbB>67 zO@bJ>$Ruukg?t##m#Cj+7>COptOH3DVX{j{V_`4dCHe($~2IU67;ITQZhLeOaabelcnBt_IVobMs@3Ae|TkUTdd2 z8K{%zzASa|_IYCJo9Y&plRIEZvuTaYlhz5FpAWY?6lA?f`o8``l>x^SJK+T3uJTDa zJV>qMxW4#8eD>jMy_i0kZdIp_NA2~w;N;9>Fwi*fR=I&DZRxXHBYVyjyfE8M0d$8YExXbtEmkrFV^QmjgdYFZhn8SPg0^ZBd z6({HZJTeVyWmU+iEKQ5{n+TQbKDNbo?0ZN`c;A9o$|soXi`rFX?EIXMEJiN+#g2cf z@8%-rA5T+Se!uH=R+>}0f8n|oP|E1LvL2!*S(rKc#98t9Q-;KGRp=EoO1a+kYT3*< zzhIe~^;zHq?1>xoNJrN_pPqQ_58j_ZTC=U$ds}zKAal|`6~-SX&6(A2?mo+L-u{IZ zPCj4ay0U(~1pgfH>f%Qr)e|Xip;&#?xMp*IV#0AuI<(~?C4h)=!H&|{_kCjY%37il z|B};aEKdE4jf$8U-w7Ah@My_CSMIELpL+14QG^9(#|0EFY@3k*&7IG|X&x*m&;`(S z9T~(fRnqayJAftO{$cY=CZV|y&5N7}zq;&H!D&yig{~5YG~rP`x^moam^5n#DaI*Z zSkmn4l`WJ))O-6hz+a2SVRvAMZNz63!)*b!9IPsBXpJ3%{)cAoUZ0_a^FE(o#Ynxw zS-lWYfpLHu=gNehw-2*ppr?)p`Fl+vWbya+biM{P*>dG?mCH0}D6l-^JA*T0AfWoY z8E0aP1sXv?r7pb$N;-kFW-2h>_xaKH@|9nnwwi6+8-eO@8qEcDY1QXguqBra1ltpd zd3+V}8eRU<1U;~jZhGN_+M1th`Gd(sjg$DN8}TQtZ}!`F({NG&b9-I|J4<5;g~sPA z&!h+ZdZUM$cv-G3{p}be9W&hc-X}kt>!y6d-!_2+72sC0)q3y==ESX_Fl<)sfB~_i5@Z| zJ}`hQ4!@wj#X3boeRb8v<8(12sdKkyhrDeSF@h;cn*VhEi8T=jqm0}3UAqxD64%>F z!V4KAbu>WUDFRdNCt+&X>O$m>CpY0}@0v)~>uu_@r{r8U72)2GNxLA1w>2eXk?4Bw zpgnf`NYbq?#29f5JMwGD9OWzlq+yNcE?^gLKVzd??I<^ADY)!mNb!DJHHi*i%>KN8 zeyxt>4|sO2;ve92zV_oQTTaiC5&*n4Y(o8f@2UItyIh?7FYXD3*e1WUujoRn(s>Vj z0?NS$g9JO&2w#gZe%CoC^hi8<8t=|9EjEnc@M7DYa#I#Z)HOdedIHSIJFA_X&w>s; zaAk?TMD0zdb>=mcxi0MEhw|YCsUU)Ov(@$B@%!VLQUdI&{_4%|0kK>Y+V_$rMZ6Li z44WpBhT_+2qL;p4F^SuKoXa_EXnnNyZiqKyBblszB=eEJ{egT*6*B_yrGGC(Nzh^8 zxY3aALU=mGH<uwy%)INwoD?_ac5)mu+8sg!q z6O!PFQ!G507;)$Nr2fAE073u0K+gr9Mi%q3>xHQw=!Jb7p{Xa9h5YZ?HTsvurlF#1 z6TnRt{p)ulJ78J-CICfK50Hl$s;Z3-HIk_UrwW^n&zPXvB;UDa#jpPC*{vV?&D~>9 znl)pfc`i&Llt?WC)ha&5su3Jusci!0eFI<%#ZGfl=`9Y>co0iX@849OdI+Md)3Nng zQ~A8U7d?}_y~@qH*YYpz1G%qu9-5|#>VgI$FUO#+o0E0ovEQ!=lI z=D4XI{)7GFL!*4lu4w~+iFyRB)__S0uPlV>5%xZhY`~;}%Pza@opv0*-e_}4`QAUY zASFW=%O`!?pWy#GOKPQRt_!A+Dj`!#)mrf^@!Kuc!M`Yu*#~~?p1&^p``lQQ(_?6o z5ANcd0>9+4QyId(4z<*(sC|vhgS>!D^i3E);0?}x+> z28I?{k?|%V$n8fx6%P)x4+Tw$pb~M2a@e-H{qO~2>>mi(rLnXB&H8~~{mtD4S0}La ziBjRU8ITS+K!u`%pps#y#()DXrA@%Re+OXf%Aq@2D+WIoJhk3_-xTId>ABhdt%qcm z3uf3eEKLuj=7g7dnjVT5?vhnPEe*11!agswpGTfX=ONZTYs%`s)qQg9S;c=oqkQ(t zXCcrw0UK~_!ol`Wdjc=o{)KOlA%~9B$jC@>-+erCU|opvONLxYGBAJ~;9vUw*L@Ec zC$%dF^8UhYrdw%=_Itn59VIeDQ;ZTa(JUzsT6zYf5?=Vl-zbj0=3BxB1j)pN{m(?J zg9NPvKR!Ml__49EpofQ+9PAT1@_U)eRUXwPOdFt^KtA$VG6yu?0;2s&1=u&M|k`vpX!*9jMC&^kFEcAUwY}KZ$WQ#r(y() z5a$01z+h`%HEcyOT6#o-HS7MVD=JGqp5d6YwyCpoxc^ZV%MvSi#GS9^MAuwErbAV8 zM!fQSn_6Z<>^Oq~n(8dI-M?f}9m%qtx$Gozf$eiAof8&ZsrtcMmsq$+@LK4|?-w){ zb9C4!-=mK{TGO)ar(R$7n)XQX+XuFH2Y>DrEBLEG`AHZ#G(J;8CYs}EmnG+;SKjr% z^bGz4Y4uORT*2Q5e$fi_vV|9ozer7iU-i)B801T^5;iHh#w*sTOv!zI={(k$B8zFY z6|A5xnV%EV$&b{H-M!bpqu8+j<>J!ks{2)JTDcOyRUXEx3rx`Ol>p_{Jm@N?WUPAg zo27HCE$ol^@RPyiU%b26v+0`R)hpguk2!MRNBRZ`r+lgYtFOW#WA$UQMgP^ndEWpG zJv6dy{F>??OWA`O3{rr32!yJts&V$woL4aWO+H~uU=u3#nT_`4OYdcvOU}c82N4v-6RS=t9v(W2)7etsep%2`z(Pe5U?*OS z8Vfq$dC||=Vt(k*p?YytIn%{Id-(BU!#Iy?SHL}Dz9+9{(*$VovV*7jO2|dChVZ(d z`zqXlZ~CTU|M&dwVS&d~!AjT%YG@_&aljuP9j$}A0={hUqtELD3N#524vhWC_Zk?h$6Kl#(@AW0Eqj=>&Ag~Kg|Gk9|5SYD$ImH-&)E{jjDFDv zFu>VAV+{t>KTpSb(9vJ(yJ|*+Y*B9l=6wSYyb}K?_;$_kjYjuHUKf8lU=M!@jUV0^?iT-s~_Ky5B;|vHx40xkQ)W2 z>1FeSs^(ckcsAmGj7m6q>E>e3KmV;Q_Qb^^kl_I;4gyo`P!r%md=XymlvQ@8v;an9fT zesSs%yBQDgKN#L z+yAGy_gx<-hK9;VXMCTa3I5Ch0G>^Nfc}x_pXAs$pf$C?e6VOY0SmGLFwcD6Jajt_ zYuli-Hn`Dqq;qJROxb!_Jp}3O$1U}B9Csl((5UiX83DL}Ds zdm3Ic1%C9L1xkmUgxuSphnMeSOk?FgX!%|=JpKeL!TW@*YzR2sE>(_~i3axqwb5hW z7ifZ_m(h24+9bLBC^`Nb8CX~R**E`4@q>T;2gMLUm3;uuXxwbck7?aN6YAKJOmjhe zjM2xSvh6r-*;9aRZZUnfG(7LA9mR!T{dn>8P45V8SNp*L*k1uq(a2@Pn9yI1q2!e< zwb!jOn?<<^Sda~X{nxF1g?$hpK=mBJq=}%xtGqc0O{FJ;x2cC>Qc3*@d|CbF$W}|; z166#~m4UD}Fb|kZ9;f;lY|JQ}p_oDU31D{_ zT?(f0%R^(Q?gi`r$K6nU(Z92+HXCt2vQ{V0E2xAZBj_JZky0A5M`1QQ@V4^2BIldoyZ zk@XiAfBBa0DZcCP{zqBtOEzAQ7|DZyjO8RSp*8``2iZV-pqb$qlYv*3Q%Tdab*61> zuQvTdWg)NsyN?yGZrD;Byx{84W`8w+QsfVn2(La%M&AJX3=KA*F=}<)VjH7Hw+UF7 z4M4l#(a?9`sqn8PF9=j;kSn$xbn#6%J@y@I4Mj(C{M1x+9e>F==R$kH&l69_8-ZT! z^!b9FO&D7^!V6`r4e`>T`Q-CK1JXewt3GT3`**80Oj@9j1M$Lzi~tb>GA-=Vr}C2T zsi&Tbvp4dTrSiPd&mVrW`=LMnk39VfNuBmNDjF5dk5e@+#bGmeu#dk~D@egh=CP--B_Z?WsZ7;Hy(z#a1PPL8VFh@vi)GkK2CclJg{j-ql-Uo^ z4?uGO94FbR&tUZ%T0EFwDW8E~+Wea03pYJiyy>g=l+EFa4R3-a9}2|82AtsD8QLqmv(dZ304u(C|Rf zI<+zgY+M%ACSXA}0Orh{Owa&)smqU>r%Q|Sw@L18n&_G2Z7Ngpxhz|CWIQ__(BU|p z(tMuOMnHOD$`&om1h)mGYZKtxP}{k@Do1v&8o?C+gXdSQEFKv=qh6>>Y42YaFoBLe z$-pGZWhcCQ_wH~7KntMcDV!<;8Tb8f7^&_7lkq0=iGS!18S5_1j1$LLoD|boM+hX< zm64J2&Msbk&o5erbnsVz@`1?*`6gQSso;-JzNFsRm-L^6|9p~+KtuApxAQvLpcgGn z-O$3G4#FvZ;y#EMRv`2kS^-hM6_2lIC+$ZE|L|+yQJlT^#p3dB@aYNzp3cA3@F~{r zvgtuw|1cL)atzRUi1|tviU^y8N^rdu$VY+@R-muzPy(TI*!}(4Sf1m#Kok3iFr& z;Ie<$rT_n6r*1=CXQc#a1uX?~VLjQe`~58Nl6e|?cm+9O`BPZUgU3Hg3gW^FjN-vc zzcWW6RgFHxSy_n7F!Xblayt zTHJN^mg2~n7j!)osEqVMFx4i&`bzC;0U4n^4n^5mEQ(El!fFVmK z%9ktO$YnIb(sjwEXUI8F316$HF&pZ9MQsYIrey1 z@vjc==!m)8yNM1?6Ud^3{|F36%wZ46X+`nsJMJuouXuf9@b>}S2YdpQcm;p3>?I?3 zVM~Gr@U8qC1one37{Ycb3h+2U26j9PsmqV_kOWQnXqwy>NAyv+mX>3FJo)i1rxabTeu#6mE{-uDwbctA8*37u$sMxC@58NP-_zUPwH7x&-v zSaID~?+s-Y|7c~dGm={YNiaE^fU@e2h3Cl{+E$g(RFraaE8w28fE&O5m12iIqj2E7 zE2XXbSqmJ|v52)qUMAd1m_ez?o)RzRH`zJ$QjN;@m(@{we2lM~?fN zpqGw38iI!WZN9K}s50W=#6!;TB}YTX)RblwgcKO;v!X80@L_9Ml&{C~e$R=LBD zRc;077*s>R%o*la)2#sX9>jO1q}P@-HoPgyl_Y~Jo_wNs_|mTzFWZ#>zIU;5<;pIs z{+HI}@xu7gCjgp$8R)1MMkWY7F-9$9EEjAOuwWYi8_R9A3;bEIAFy)XmyYvtxf0wY z_cqYx?r?Ta(B>5ou&!>pkE@t8!-?zx#@&ziv)!Ey+XZe%ai(ft*)2}DWFM+&t?IU` zgFo}HI+R(TY#l7Y$tT%*9oDI3LN@OCyFWjP2K5ID1hI8Wjx0{QcI^sTC5Q2}%1z18 zeaGl?#U*3z(mxBWe51_5$bF*kal%J97&%{bbI(NV`}QBJ0}Vk&K}W$}fk%7_E9is0 zy~+ZU03Qg{e_?`K9L#-?7cDGX1^pOPE;2A>lb`|BDIT5V9tUCdBU>-?{ZScSCR)BA zFLsiH(MhJ@FFF3EUU+Pzhd#9Fy5jNI+*n-p^{4C5XIri*U{XzrjV zE5p?9RRA6cyu$1srI4by?xD{YpE&QDx^H?TfXx7q@*iVK|LK=uTA;{9OA?(4vmJR^ zsSyhW3$_6m9Ua*=w4z#7_v44iPjVriiB!Q^DH#g8tloab%41W(8GLws%J_LYTmRZB zqDOyl(B{b#D^BjuI9nw>aOv2Q;?!`&C)LHqvC(4VIQLqn0bKpz-SXYaW7`6*6l}Ih zXYVcZL6J#^F!NO>Ps~lGG~nq{()nc}uXhZU*xU1jv3Qc;-A8xgjfIRoyC!h zUlSJWY5@+kf;@@i{GpMN*C%RJ&{JQ9@guYXIy^K11R5-zg1<0w*^5?L zzFg{8ePHP%Phn&Lwo?Ip^`O2YQ}6~$j=gxb7vE8rbe_kjYBx4YyKedJV#|Zu!ozqx zlvnJuHz+Q$!0a32X%x%_K(xoDrZcx>D|w8!nBWOZcJhA7v(FYAp59ixc)@kCReeQZ zlEMV^3$Qr^5j$IsRhO_4O*Zl`$W?#^+W@TI-rhNW%_{yK(At6pmjGREvhYW5(0~%` zIUC^eJOQ8kg8s67?@}gdpC4Rl?^u^Nl%F41S-faT@bHSYHa}Fc&C$U%#nD!;o6pLb z@nZ78N$t^M^LRN)PASHUi^od(H5I;bn8}!ceJ0yh9ydZITId>zSZ2)}Y6Q(`P3*H*4uHa1AS=s)#zB>dV0*!*Tr&B>68Nr?ejXgA& zgiK{AkSWm73*T30B?WYR=mWlJ>4mi+@R+i+2>`2XVagV*w!j1ErUKb|I|cM!`SAlF zTd>N4mYFq7#j8k@+-y&PB!7-|<7m>puG5%4XS{9c{ZM*Rrc{OpPu;K!0^B zKyyWN2xDY4H+2<2_Cb%ancL>HeU%Z_8znb9@`d8B&P6a8bX!0g`YS&mqkjfG?h1s~ z8dj~s>K43c%9-~~z=CZ6O7FC`nFnqUw4JrL&Xs?VOoleQLk@l}i?R?*GuUrC>vzWPg7i=hwsp$Tt z?Ppe&?M#-@r%(%($DU?Ue(9x`!XhTQiiVfWW6`p^dg9gM+mG44Uclv5fd16U2o_-Y z80foC#58;)S#`gbYdJ{=(BP5BLX=e^ds3_cCY&fAU}_tiFQx zyyjbrSHAMM#hK4MUp^4{oE3gqsG|F)?jD3qAn_F&ct5X1%g%U2k(=!K6cavd$qsY= zeet=^JW#xF!L=rs3~U0bKp*-e3;JRGr6!z3HL4vG9Hv&l1EDDu4ubjqSI9>gR|ZL_1GeQ|vlvZSj&_Uf;3uwBl)dZ~9QX zeEmcd6zmUj#)8Sogw3$LJ+Q~VvA<`3i`s@40uc)Kh+#Vpeq1DSN-@F$8z$7mRouAdKF+{ zHvr=kU$og@I>Q!HT+n{ie%K7K1N0ATl~!H9M{TG5+}gFpH`bk7JiBIn@$BmL#mj?s zVK>_KGtq3eb>$Vq0BT}OmT@V_OV|JaKmbWZK~(lY>;ay>C;ipRBgM_5dy0Q~$j(#% zrj@~Rq>e4KP=iTW?tSz$7Q{4Y)|)t ze;1ks%UV}5hJ_iK2Ylp{*NJv}i+y*zxfnU;k`P2VemTY!yrC6b6y$|jytO_k_=A;K zL5niubwPdr<0F!SIdre!pV|aaPJGrc-^alpxqy6vCR+L!dwc2Pej-oV$sV20Y8c;V6WA+KVd%MUTXs!T)k@esdFz_wd1T!#WSaGE?!=> zE=(kUu(vGuYcMFr)4o{bBtMb8elgQceOkt<%j=hmgam4^Dx|j0|)BkMK*DFH1}dXul@b#F?a9(HRcQ6q|h=K z7lhm=?>cCfOBP*d5?}p$x>MM`Tko6{^a<>&1wP0t*lPnIJ{A1Q>jRk88o>7zngFIm zpe9Wf{Lzy~8v)8m1%H*RI^hM#0O6Pp%Ie44czKF$vW?fqCOeghz1r*jNIvBF7aMrV z7!PQC$e28P$9LNX;8)8c-Bke95#~b87@@Gr)F|E4nRD=LHWiMItZkqp;A3>{Etctt za-Lne>+8kcXKb3}Z`ur~ue2Wk(?>V9+F zb>ShvNx{Fpe{7<-=U}V-SKE$`{{7#7-!FdHY;R?9g^5!-yLOcZ0zof2HL+t^UFa+k zzCE*4WG-fbJiu7)u-i(%dg_+qxA#3>w&E!}cKrrmCWo?KPqmU~>)}7mKX59&@WKmW zan_8H_`3XU>#qUCoq~P$VrvB#FaoYQwLBU80Fbyv{enqVvv0yRa`bPuw*;(f*tN zZTr|4{(HG(Fq;Pdz5T?XK>!27F&&h%{NwAI<)UZ3xTVzAS?~Nb3e@7%PnHK)@EO7i z{6DplOjw7#_^I$bKm12C`4dO#cP4GYuGTjC?GwfV zFZW9!G)H@NJO^`Re7C)Vy|=xy4lD}t1R7`p2@5hw!Cp4fc??Zr+$lo=i>lN|-)9A9 zAJ`T2g;T*F9eK$oOt~r#ta_m1`h&o=NxZl7ve~BP3(ED!h?mE8VyC`%zbZdi`N516 zetO}p-)kFy|4OwP)j=CyPhcln>z2MvfJM+U|LKeU=*h27uPU18NyIt|eV94~Fygv)~(m@$rEV z4-S^Q?P8++*F)RKK2vob2Qjqe(J&2K|{r81P!^!$Y>om|>xs`(Onc$`{SOe-GYXGq7IHx#x%^e{K5x5n!739GR>V6Y|jKv#_TsB|=5#>O~ zK>q+R{vr{?Ib(-b&=-z_zcva!pU(D?c^Y02`&#Xg9-NYS{an$iSAkshNG@I&JNkx? z!3zBN8yP-=CO_kM_?kBtuUz@j;>_)jmABV;7R>I?cRdS0;hJM%jEpIVs>JBvYmD9m z@PKSfuJen2i>2yr*4F19D;_xi#-LaKm_N`S)32&OluTTuq^1sA?d}qko=46{Y8bQXh`AnsgeKIwc+xkXdbf#*f$s~n4k>=n20`WNeHYk5=BVJf`!pKPn4<0Oz9Xl2lX33OCJb66r z%UEOIRe0C2&YJ_pCDKNihoJyk30E_t*yDmxH``%FqQR+4ZYw!d#;0IGiHK1`LQ7EfM*2 z&W^o(`O|i^Ve_%|r5B40d!H_L+p_>_AN}&dAD+!+C8q?HMvYAgJ0&A)z`h16b51t_ z3%&uUdzvP222QG-f|CITgNYOadfA{8?`4t;YqENbt_k9@n(R{Yro2t^R2g$ETTE@4 zjlOEJnT@i%Z?3S{0&6H^b;;JVwbr^B>|`;?Yk%$^|J*;cF184~Z-eG+(y$U@pGv5A z@7`VO;AIExL3PIZYbN%U4?<$h**}XX{g0ChlUzK9vrL=)6U^_jKC2X1&D^wEijj)OnCR2ixVov$}ARXaort4-n;16G^- zapq;vnx|m;i_gJ64>Ej*{ZYHhbL@=YD^|a1m&5D|P}@HC*0TAPyb8elQJ8>cjs=;c zeULYCt%n9&9zOfs=Koey4+Cy``N`siwR|YRvRT`hXC7-aP|ZJTCazMVwj|JTGLf$} z(8vJwqU7fAcd>5(`szA^ArK7~?RCgB89j}SCS#mW`KQ8hzL-zt@5d&UPqLZjS2-s# zo-H3~e#lom`R;*}+({72#MfAa<=ktjx(fY?ll%L(zp1`?nP{*QZG`5Fe|++ng;;jz z0NDyl7L=8q_x^wEm^(ecSlR^EQYaPO?i{uyojUtxkHuRS1_!R$Y7hUtrkJn=m>^ET zV9^zZt`^}*L0@)F!Czym{>mp{1%I8z$H87aSTwfeh4*EsEME_O6E7O<0sUeJwNbvL zy^{I1qsJ!z;{lDG#xy8at}1rl_V(h!yZ$t=;gbA@lI;4GTbNH2$?<~>UURI*M#ztn znb{;j$8&$x!+`DN&YXd+@BxXOYBS{7>olxr46BBo} zoOF3?rF@GBo~(4V|0LIny^en7L#5;9)YJN12@TK6YFDM zcKzU)YY}4_8=7}VHDX@n1)w~F^)TF|-K_7&B_3!Uiozpds;=21Ntt-FmnJ-HF z_U)@_^peN4=ly)U%Fh1lfB18nS@B=oQs8$+_{IB%EIylfVfQ)YLtAeOK|;aY2Yb=r z_>3Q!l7b98$9j`r!~6#NzRwFywr7p81zK>mzzP*y+EdD&v7X>aUT z$$Ve1!4HfBNj{-(*d4jrg040I_7G@$tIge&rn4owo7O8& zvR6Lo#CJ8wnC~8TXaASm@xURGTH=&Zet?gcJkEs@$5g>*mn%4US$X*%AJBG=Z(*H* z!7EAcZ3r~*3jW@o>L-B+8b3jU70iVd>=pba_n5rOFHE`60CWlmq0@_BN?3i1{R@xI zWBdzvTgGSPvYU#1*Ir$$d*Gq+f5q@HC=Zx=5X&^dpM3dGQwAL56($_}F9RyCiR*K8 zFQYELK51~_-e-y(XI>K8&b*=zO3WwvP;ERZL016!*#M}8A=4y{8MESe1B!7TWdi;wX1|E6n; z@hb4M2rIDw$7lWUUap`otPKEF0_vy7tO@W6>I(WEqf?+4_A<&?Zo$9wX!(o({CtIv z0ln5=uz)c-aN`~21_0r+mbevfCX=oLs94P{k4004hbFmf+*`ia?tZ%X>_wfx&)n1e z05h-XTlE?sag|xGjQ}-~!WP6Zos>*iGv8D-pqo=z3L5}9pvxJWNMN5Z7O#xr!J1&2 zl<-V6AlCW(qQR8oaW6X7g^Y_5>jQV_AG`?O&F_MdhPbKdCYr#?;*^w9Ua`BSEzhTUM zwTrK(*`?X8AdeAXZLa}RY`olYOqGXKZC<#`|9h`}eF*p*s|w;^QY!efKqJQ<+UJ8# z`Hub(tc9U{Fjs&F>oUJ=u+zqXbp*M`DwEF1k1c0A0YmspnP2NTxaE=N`0|Q8fK!aHeeU`8 zw#+#Po-JNldqLf1+D=<_ELH8NBrfr26F_kBiQ3_XvDbz`tw1M07I>>~)~^CA<_&nOuKiMb;dt@X)I574@UV&&~_J&vmhj?i^0m z2(#;)^pyo5BiVll6&$?ehTsc-*3ZJL;GWt9_@FPlrr=LK>ND$sk^;GcJ6M|nPa`A0 zHUy%z79m$1DIApcL%tIc)Gt4Wk;U^He=$a2VC=k0i$hmlQLNqeVCfdF3h{)#sl!zO zO%b^bo~)^d0V#pd%TPr5So$fio{K7v+W?Q3#+&y(TfBJM`C-n{cIFiG4xqizHYdrc z;4kbq0KNsZl)_1(jqKWvl$9f$16a%(0N>p%CulNhvS5fzNxbx6CYm+^;-#0pCa19E zU_kYjT$-QC#+MV@HkIr1$YwgYsh;VSv0QBZ*!Sx5))5x~?dxIng3>ips}dv=jthRa zBlz2s&#UJd4?Gge^W(2Z~IYyh4&LHR~r(A9HE zbBsBpIp#6eHE)EqBYKSUKix&13a=Ia4 zAHi7-XvI+Rjn!us1Fg;#Ddw!&0M-~u7BadY>A@r&3z$G3I&{ccm!xbxMicYO_?A)E zcP++r!F4Ox(ogMQyxs?TmON``7r?sz1iJr{&9*A?gmveVJ`1h_yaK;u3i#r|KKRRb z^bhd;#78XX!V2=j3i2Lf3lF9&<@LO;OLd0Is~_pT>_nyMtHyvnikA=2;XAF{$F91? ztbVU_2XD%>qxljFu^-L9Fs{a6CK))zleZV}U5l!a%lEz#+Jrf6WnO`qZ{Uh11J@Y* zZGc{z09wXTLOv2lgm@zZs29{RtG5A`!UjN2U{ZKT)J~W4!J0T=Pcy0fq@z$xFf9(q zVjIc?ghfw>S01oH`GqAHj^!~gyCytc`=)Z1vpk*)^2I=VqPXUeeV|03kKc&bEEPsB znxH7)Fn6)^o;7C{hX+@erv+xmyo`Z1X>8;6A(t-Bhn%y2<&mv$%04a&{$jf!+V$|C zUVn@W@Vx7CSmLBB53Q2Z@+X<|%YjR;sn7mdY<+-N@E7(v{HH{}V}Gje9uw%{;{fk3 z_iHl%W{rt4GL;D}Kn4iMa`DRn;{(k_`YT?(K_}mhZM>{FeEG%2DUUrF-Uevf=8%s9 zaiC0j8z2;3d6ap`5O7%OHUPZlXE{73sKDgmqd?r^vqxS|wz+rif#-@BPAjj{(N^Y^ zHUjWQQ;HA%(5ey489tLjEueOIFp2z1@N)`FX#)_Pp^1W5G+DqtF>x3eWYA0|CGSo2 zvh#Xqm5+@;bu{TD_gJ(qM>4PnZ{uliBf3f7Bv-zSr{@991)uBEgU@tW_oQ$T>W~#i zD7uhSdiVf7=qmn|2XzQ<$Y=Qgx_cy#Lx$sud&-@})8vvd0_u2?h6B9%UUM=?6 z#5K?==IpFp1z40D02}!DV?bdzm@q!!3?_&sjn^TU4m~Lb<&!>TqcX`0-GpOZ%C1S~ zy#H8$-iybotmGc+z$J``!0BS<+8B! zRmW6af|fqF&p2@5Ra#ubMu5PMFMPmfA+8qSfMtW9kb^a*>I-#>1}k`btbngzFJ9{l zJURfG%7X^Piw?r-2i%_nM&RvbE1h_6FP)cpT6&MC(tF!}>A5Jg-@50* zj`5uhP&u!)hk;=yVYw8jlPXrHEY z_V3G5naH-Z4;5FARj(_YZ1u%o{&QWlhLNQNN7f5)=P)T3Wq8RBTZZ!C>f+exrxn91 z*A!#bd;JRZ3jQ%hui!8L>G)Q2gykOveEg;WuYfPCKo2ik`6x$u<$LN-`Jz>CiubzZ zM&qY=9*dW5`1-eW+!CIdvB|=GA#8F{U4V@FW@QGV=4DXnVS}BMH<4$k5c?p|;RB(q zI!0+9a}JEGYPU833i$D60J&}j_zeJZDpOJm!9b@WB|qce#l8XP*>Rjs;-J%jK*#1}JhtLh4t6iR z@Is@l?1Zrw4ffD=`F~@n3*Doy>aWiL?d2*?7`>|K3&vBIJ$i%4qhkOQ>I>wO!M zrxIuX$`k9WCe%p!T401^Q(pd8rl{LNj0|^aDMQH0?Lm6K0XX-fdIO-qt_^_rYT@nL z1mG9sO@5dujt9 zy}t@TJ|+(bI6j-+Y$ut=(16chO3Gi!y^Yt$w6~9SnV%aET>Hw7PQg5gRIUl7tc&)HseSOr+MWIX z!*+hxK9}R zZi^OXNfVTDvgEYXN#`~I2hP2?-T)Bz75roDHv{+sACcr66|H`Q@udw3TMoQXJh^srXeV<_zmz&_AxQ=m}t3{OO zdtht{=9?Mc23RT^068P{Tn84IgAT`wW+425=xw2;Cl3JcabWBR+c+;e$x}M%Q@BZn z98h^BH<_2*<2aAkWqS5Ku-X14=td@c)?)2FPgnoD)fao|URz1u@^vJ~v zQ-PMmrsnD z=Id1BhaEN~J^Am;hL+yrSnl%-TElPh|M@U{9nD)b(CQ}Gxhq(^W6bN?)zkmjjILf; z*f-WJ(2v$<{(cj{F|Cb&5BkvZALYd&}8 z58zA2&;zouv(73v04NTco=vz1*zRnl*2`1#5vwM-samI7d#Zvr9WEaNR{J#9z|j=| zZ3I%AfTrM2OUdUq0mcSUXHz|t&9v~M-2gQ8f=S@P^UxfKF-Yzg1`Qszo`#RhluUAP zik2N1@HVBS{FU6>c)h1n{qg!MhjF>Hl6h=Czt-K zH|ZWa>+IsiwddRA|IYDDy-kVnB%x1@t(WcDvnK>c$-q9TIl|J32TQiKy|*~E%^GH4 z!9V;rHs8-q^V5rOnbQia2!Du5CY$PmE3o^|*-)ST$F~3!{1x~;mj6^FSbY)ZxFQkc zNyxoSn*lGAjqHW7@qk^1nR@^~GM0eoV_RQaoV2}s6Cn8@ps$u;AiFR+@zBg+!myWl z8XE!f>P-Md>yFu*0ISP40ca!h&y711!l$NSkB!&SQe-~(BU7RkU0`+2=r+KT+W@Hd znh?(E^#JIAL`Pz9v}kHVfkms#7%M+=Pm32uClD}@>lZBlfR9fw zcy4TXbysojzUt|;lgvBoBMWLxzK{5lgiJJ;!0%-QdFd7KDH9td&-?l$k7b!ZJ`dpUv9mAeWad>`Af89?ns>n< z@q<3jSD7)dyHv7uZvvb?e4yC7YHb}uH2-WalGO))(FFQbVrMNIVU>~E2+&Hk2s|TL zN*jRi03f|(BBT~T4pbHZ09qh>4H8)3Y00n`hz5&B7xQs_vQat0aT$^~VQ(MX^wPz) znV*>lE_iikrvU!}oG4(`Mx7~Ei;5#gzECQLR}2=-DK_>9DWEoG-1Ne}!6pU`TP-GE~ zC)|yi<-WQ|6$~T~<5A_8EErTjl#LB0=mi|t<*-XqUID1y1UO^lVDXe`G|#|FCRQK^ zQ%WkxdmB&F3V2!oR?Co+#DixHOJxI~PIq-Ub%1eTx`7A>DZDlYUPoc@F~sGeVh@=kEW9f5PGoQnY*{ zUua>iu?WlT$hfF+`=?8s-KWm}@e^{ePn03wfYncreGvD7+|z6Vyq##u_hoq=I>YRH z0Do&t$1ZtIr-E?1s561g%vq3eFrZuZqzwwT*dL0Xawt z?Aio?eUd)L%I|Si^z5QVy#X-C>OsKJYaO6CT9X2t0?9Q%hYuePPs>9KL^qY;<;o*``Gk8ZpNIb_w$lxnrDYv$n(8z$ zt+#sOvwwW0z%Q%~0EOsyhgQF#1-`G)_?ZMv(DzpYysfvBy~-5EUf^lTGM>2ycoU!o z_rPc^^YhcwGUyD^7|Obyu_oZ8ytpzoI^U$3NAVI%N8m8@^Plr{jN zQ+^^K5bqB{$-Ew#LDE3MPX#Jd82c3MWxh-=_q4ZZqNi)$R8E%9+yj?9^GK%(uReP01A9y>&`a*IbiOQT51#k5 zx5@O(Jb+)r9Iy>^4XLXDwK5_YG98=X?jekfr^nJRwXZ6f(n(=fSGeDefb3L8jMWP( zc4n}oHUM@|hK}QC4p0_NK#m8C_VQrl?8NuNl;c6Xuyo>uCHJ_O&fBGE`k7(jJh1xM z!Q#?gyE+X>UH(Vg>ySj}&TO}DdTp4$EE)plNIXwsne@UwFZ3&~xQ7gk_xVM8Odj#j zfOs%)Sw97Qs} z1$ub&@PKIL5%zUtdj32xe%84~p;rNU6X2{Kbu+j6ou3qgZNq#-odV_^bHdF(&FZG$ z&%{!YkFoNC(bW$Y80~e_>6K+o!=m2+m{Yr+15h_~5V8OO@PG!x4@j&FhLx>o+4RH5 zw&Y34RF*IcOE2iBj9&S(ZuUKJ?n{q%3Z2g7|4uH8%*IqF(z`ZnD0ZK@xoBBHW4xP^ z&n_EeqTON>OgZyEX8)-Sy|?R^G<}6%(_#BHH9|^6N?H)4OHxuqL?o214MbXClr&=? zpn`NucXxM4cjxHt+=#Kgd!FC>`~~~${@!uUxz2SRvZO3#Caf0cnmcRg{tfM54b9ZJ zf5DpU0{rbw#UO@RWvtdHdhB*^v>d*`WzErN;r(gq^EDuR<>YNf`$b&& zu!{J9hO=x$tMVtsRONHK4o#7N|0pq4K;9Vc@!=pSyeH78j5urupzqpOq4X$ zBRj*&`+DJ@^S*$iGC9@lfnvx6+ zrm@gj9Vnvp)c0C~tNj2f2b4e~FGI$$ zZjoqUlIQ5uuFP=TY^w4NYq)Zt80+dsAbB6pjhH>&^x-~3iCSIJp~s+hnxB&v{oM#8 zYo6~1vo7OnP2(0j<-VX3){O89=p^evGrGBFz8za1jjl#;tbI4pOWpOW6eW)r9jmr5 ziqH4x`2K{mlJPY=Ui9-HuH5o^F<3Aaw?_pZ6ok6^HaPtMxMD+vBE z!2UzRX@fPM&#ppLzs}OGhF!I8=CFP2Hnn=xZ+F>y)mKB~RK*Ii+Ge-hZQz|=3tvEx z*gbnh@`umcBgEw*=h@(sx+m;xlvmQOGR!L**a(8+`=yyVoz9`|k_t9f@w`_*OjR;y zw&Wn|QVtdo#kS{r%^_WJL_1v%Z~S3c)VOIxpB^k;-B-IcvBydWk;o z)=;mGvOUvsw1?p?gA_<}bLcT?B_wY^PVY6&>}|}8)x?;ruK$8=mB31p@GI=VI{N-D zMK<0@x+-(- z{P>SoT3?U)y0TwhaL9V8HHiB5+Ijq>9d=&VJ2)PeI z7kw)T#R@mr6(z<2D{S>=42A1eN-gP#8rtUYfxlmqTEq>HMT^)b_5yeForTF?H4or< zS}SEz=A065fi%RoH(={G;I#&tPN@d=UIAax3W~?~iUp}09)H|2@d^0e; zRY>ci;8vvT=KIW3t>n9DaR?sMY4Pf&ErC2| zrigPNE}Zk5a*x>~<>FMc@6~*=Z;443QR$-p9_5r-p)Z@!8X76Iz(l>3z7A;)4{RI2 zGnpH%X$bl*A|>axKjjF3*zN$(@Eg-|FfM(n;)t_eOS?eS9Vp z8x6wy8DBbS-iNOisU#bU&2r~Qks-GDij40u4OCG-YL+qUw|jE&?Q*r`%Tk9VECCs? zLe;KT!mm)Kj?31AL#&y#h7T!gG+9#;0CIu1a*JYP?SSB#ht=uS?%cIsqIw}(F;x-2 z=K$_FzNsH;Sp@8c1Koeo-s7)FiuuM3p06oqfp=ry3%v{Jy_fwEcE_n68|caX$O3W?e1*6F)Ykde z9M^ol#pk9vgTE1z^q-&Uy~biN@Jc~#DO<6dE{?vRUYHe<`2hl z&J$Sgahe-=%5E%}*FVg&*V2i)kfg!;2u{k8LE?Omv^5Ml-Rdi9{p+z@COvFAg5jO3 zm--|u%DMzIIX52yT2taaHJ(@*WA+WMjmG%&b3Pdc;;?>rd)mVo#_HZki61vD)Cv=*FY zsAd4VCX^vvZUyK>ji=_8hm2?HqaMGV1M|B|aqm3YwIwh~m3M38U#q4qn9`$62@B|c zgev;@r?#+G-VWOes<4FqF5+|i2O{;5d;zWMQZ8#MY*?hB31OX&)oQJ(BZ;|`bQ^@_ zSbbxNe$^p!<+IN2`WEE59k(7#??71odflNMzABrc+5Q+Yqv*NNOW?bnmiOq0Xylxb z+w;9CjR5QbQB_0Yh8v|=4`wjRh*&#~sI%m^-f$bjLqGk_6OzLJ^W=3cv45M|9CeF6 zpXLJU^eTBm9bZD9e>B~wp)5aR)kY{%tk!O>EK6OI<@Cqr)lgUcMO7N${z_FAs!K zV{7jR%3QM?64zmVd3ct(NuN*f%M$vw=N7e4-365_&T91Oz#+I}At0v@)x~)+B*3ca6`E9_vz{4nbmu!nRG=9CV=-?JLz40B^zQrc8>fm)}F)*8F+a zgFlZi(V(b9CUzzWqd2SiQ2p|;y5ze3vu^4=p$d>c+ZxF}_59zh17SCRMXkKk?q{7- zwWqQ*03+fsqW>P0lhmQrp=!6=-(c6^*1NeU*s7Y??csfII)<{c?k8x_v2ldz0qkR{ zx3LOy-Nof?O@uyeDRXpG%g1885>;}Gq|F}m@X3T}>NMTk*x=pFvsWgX_c^IH`zSum zG%?trAk5_iR3E6t(I-5dnf%BHocDq}$~~Y+j8AJyd!P!H0TO;~idmOHCqqmn3`((p zaxX{0nvNC~^vc{i(>plqs^uS-sCvU=1$I@o-A4N_TO9ob3U=4z&YEf-0S>-9@s86TUj8fj zs~RrWO0#1DLb2(4zHH$t<`$q-+nA8Uq0w|+XCG6JzZf^EvHqlA!Ln57FYYu)oMAS- zf>S_k71vjB28O@Pst0&XH1ZRQQCxK{U;0v=9lEvxLqYPyExK)YP36E?trA{fA5X4{ z(2m-lEL)~u##(Nj2h9k~`c#;O8V^z@I=N~z>?D;Y5xMGG^E4TsAuN-5fl9D^y|VBn z^dtQbcxCG2pyND?w{jTFcV2cQWreFTZWR|ut$xvhXxWvCI`-TnCGryAa&lCTnA4Wk zT)>u~#|L_gE~*!;d>!|$L&W~w?T(Wz?FT$p z2sT5qaA~5|Fi+8NCP%6qaSLryNVH=1;ZPv%;T6}M2*cny!q}#G-q5tgz;r^^eeT}p zbzj3hNIiShX__&^`*uuZsEp?oq45`g$|LBR3@>+o6eUJ0@su2U%?$38O1X>twbLWl zkJq|<$;OY^G>J^)Vx$T=-)tkOxav6$8u?29M53Z>Y@-uVL6q;HFqm~{!6)0xr>P#3 z>0UEs{GHgJhI3@E)&bJ%k#ccn-S{isuSk*6xBENxc>Vrj08I=)_tdLOI;E-jw}ZOU z5*jrGahW4~WGp*hEELeX+s*Sj#!NYa>Cfo{CksW!xT?(<%?f+_^{f$((PnIMP(!+5 zra8Q5_qVntHK;em?clu`=l@hg3p6n*P`Wr0Vl!i~k?#YlA0^0)CcPs(q&3;oiYV&0rqibJ(w+tySH*a`7 z;axWnn!7W*&C^{tAoANZHzN-JHkRWoKhp5Q8@-P03nt(!P~q&En8=2ldavGp5j|_+ zzqWcrRfI_Rx%oqUE1ucl_O6Rb&$;Dj3f<0Fy1@5OOt2wj0v6}@a}kq&l~8rL zLcSTytSGI~G*aU5Q!Z-lBHJ8lJSiZxyqd{Bj()9Ye#FWHIQwk=sXNRr#Cy%}C8U%U4-nAPswNcQjl+1A`=g}7P>LOtH4sKqWMFsvX`cKpX0BDq0T zPgO@vOHQrdeqCAh_oRI{dI38|OY-Z2J^B>r3d=B!1D+SZ3up;R6EH4Z`imAW<;@tN zTaT1ZJNTF?C29v=D`PE zXiMGhw4nj+n!-r^@sLgQ8c8w3TGlg1P800)Lx`?02Q;PF>>GQg$>-xkqp!n>M!gm7 zaZ3Tc$$**%xzq9W5+i4hh0&Gqrv0=Bh%0O)F5|8Lg<$IeLU^71EQa&i$1I+37SGeE z6M801s-bCv2|rY74AYuryE|IE;OGT69BH}QIct4=Ut4oi^8pyH zh85Qdtn^7pR~LI9n%7j=lG_&y;9pHgo8+G~M^{GpmTbb&#Z$09kC$(>cl}xr1u@=0o4lhU zwN#ZDSLasfe()|V(fhzv-#P1+p3p{=&-dIg7M_}JH>c3Z$Ra~&rhj)!~LG*Ek3U<)Y2^?{UyLX=YZlgJ|v*wE^xwv2Ou{0{O zVFMlGOlQFAA-o;*a(sTh`}X9AkQ9be$w-Y)~Y z=STWb`zfo>(sF0`o871i(DDNO8u7i-6t(x2oVqb^Ek(2la8P+8{!B5U2gVxt-p1%k-c(nSp0i zpAYlkdQ~@kU8yZc#dYMq3pF{SZuoXuywP9G-t%^ZCRXlf^jj}6jeDu+Ci*ZCq2@)b9>sCj%CJL#p>q_vgshV-~Eq7pbTw>!q6p=C9kx~swWY@!%q>9GqJ z;ZhzCJ&ANh?!V3nD0Q}jp4&p*#-xqE!%WQLhxrrJhL=ETF#^NIn5*mS0ShtoN&w4H zn-2D%@c~z)CSz<8vmv}!#85S=qN1b@q6))(d*M|EQLQHx? zk2RCC6Pd33?Wn_?pIT5EZ>=!xl?+H&tTEr`gM)_tVsqXb#RyX57lbkXp%tPXu@rpk(5&oc5-cSmQ>>8{Mjb=k*`G zOTk0lBeoTdx+mE8Faha-JPzJI6m<-N`)zZG5R94z_3xXHBkvD;54RiYv%!A?qrv1s zY@q?jz66ciG>7wv+KzvmZN_2^{Tu*2^fO(#h@7|xw@&3zY4!t!1W~<;hKF=C8sfF_ z?`-)fj;fJxXNINojP^=GEJ|1`tL*J(BF^tJ$I z(z&FoeTw4r_b8Cxq`|Z88|v)QJA+)$=mk+@zkYH{j?LIezR@qO;dOU(+KN~)GJe?A zp<oN4LA+rM`8KbG2ozs+Q3i;lv^ug zj*l?;!0|TQ4mv>3%uVm=_=`6w*hWh5#pizMkE~R*a%Bco6cb$H8(mtV2|-$v`8qqK zN+Cp3X=K$+nN%2#tyryBEHlbi;k8S-O+n(9Qy(j8wul;&BgrZbpxJ3IbtZoQh*vEs z$R9+K1KnFwsBfysBRn`zXH-9f3-5Dx8r78`PoFSt3y*ZRTj|9Mh(1E?c&B6wY_t+O zcS`wja;l~7ZGq(lY$kQma~I$yKXf?pS4n=36uue1tZ*5;^cl>;{ju6bYz5^4p$!*2 zZn;rmeLfVqO01#p&*P9O!xA%~Egc8KlQ>)>YEbHj=82k<>ox2s1>)KDy+0CH`FlV0 zR&+6xh1bBecS6Pt7H&1jf9;Kc0K5MKz6X9yg~}@m780M~#XK$I9wb7Pqo`o9K3Etn z%|rmw_j-kb1{b(O3b9Xa7Ky&6_{)&1v*V8BaVsX-2HSsrpIVck!`=VuLM#-FfZ7L* zv>fN`AFGP)dCb3h7i+UVU)iyx+@>juh6JhQ@8gP%&dLd!T)Pl5^fPGxGq1X9RAH2q z&et>Djksm{D=aB3*QX}$`h_z(0H)%_PM8*d;ZwfrG&p@8=@x_`i^abTgF<_7LgDsA zl%qRiC;K~9nCAsH0vY39daO3ZRRNwk#nqxLD@FtB(K8j~7vo%xykHMGtGZ$7!N#0n88I4|Vc zq`{fAo7yv6t1>6(nht5x7PECc3JZO^^Nwo((0eAFN1}PhT3F8 zPH#t9N@Khjs=bj3PUi{^w+6FFaedt8Ng2h+X$_=aX`U^1gdIR{-?7Qz)$q+6d z*}>Wp9t4%XGi!geNsiq8_JT=T^RY=}= zjD8`elgP8L`Mx9NTsV(d6Gn4l19{KgoLjOMWw)}I`>>{sug%!iY;lF>tH3!H>Q{8*j;D;RfOE2#whqFs{*&5)}eEiD>%j# zz3C*RFk)$GtRnxss+WaBqnfjN-$^S#eOi&brxB+IAyM||eWR42bk&va0jDbB6sEIG z?5_rhlm3Y7!>tJNaSh6*;rRx62gC8Y9lH|Htw)Ed3v&8D$&qj&d&w9Psy^AcTM~^F zWgsYTd42?pggu<@;$C)LPTGd)I=)}K8lRdh-1JWCYn5#<1r4N6`s$2R+wuv{@(IoX zSzjL=qh+=~IhfR0YGx$7B4v{JDfQC#^!+>Ad(btv%{^L?`A+lQH1ZDc_K!r>=%~w> zO52Yy;ZHG?*DH983O8NrT8t1}`OSkbA(T`7->TM#U>+MpH*K=QE$7%(w z?UC8$SfscUe?;|-#oP1N3)MHHLp2RPywaa3hU`S=5osy8jH4$ahD|$XjhEl9KW1v$ z=UcCZ&QZB2sNH$8HmP#+@OYDHM3&h8SM&Z59n%3l^A1i)mZ7nx!swFX7+$%%!jvyC zd|mwjDUj|HD{tdV?sy&e>L&jcG=~h{^pK8kZ(Vlt&@h}P^BVZje&V*k6<#*CAFQ_m zIQt@g{1JFB?*CTei^4~P4hCraZ*aTB<3Gq}#q8}gEV2|}*AOBd%d^+C(&<9y(jboQ zZ1UKY9A|r}2x^bxIKj(H2kZ9+FTqibH$FC$2EjrPl2j*m7rTI4G zY#NSVLSrQSBcB(O2W3u3KNmSfzrqBIWXQ*U{oE9KZN$veyw7i|YDx3a9c3kuPJC}Q zR`oYPmm1&$W=ZT&Wxbd-yJ~tUe@6tzb2a5|-c9q);`bpBLPP_T+H17Exs+S`BH7eL zUVy7UrBSAFy60&VtXn(_^xJI3qA%e6fjCCKqxIlxwi{ZaUREr-qoW__c!5hmX4_&B z_8XArcdpU3O%U7SpQ}YUB0$lx8 z8=dxk>Wa7C-A!6FIt>lAy0FgD4qh^{r`kRR=zqWX+TeZ4#!VGd@5Wdr#L8Aq&nfq= z&EbqXO^)~@x>$~v2V`MB;-ivTv-atYOPD7||8fk20a@rV1a^}kZ~>}OLRA+#6sKf! z5Bj`!nqYj=dWiQI-gGcnz;zxMX%$P`76YiKJI}M3wS9r1-h}|}CA3%Wk!H+Fz%CF~ zZKVJ|0Hs>BeifZl5rCl(opi>L9}%r2OkhkD)~EDh3fCyaqcPnyJVDS@_HCAyQoVoh zQ;!wg)3yu1r`WZXJ?jtja&0tgmfR%k&F<0`5r7k}ZzfMi`hM|1&PACXVJcSrw47hZ z1MHv45bupZw8ZR(o=p!mQ73E~Up*gXytgrADf%f8KdGc7#(Xu~KC(><+5U4{XInkK zx9i_$a{iOU<;Ni2z*8u-_UU0j`y8fEFX5(J{TRn|p5q%2?GQCB9Nzw&wU)5r>PT3I zvPBsG@q`3kgv*PhH?EY*6yeNs$JaZ>zg43w8Dv~Bs##hYDk@jAsWngU*aWL51`96M zal`Ka$h#bBejSMq?vRheCD>SLq1V1mVK#RRjA0%(TEB3_E9iGWzA2LbxU#bLjIzpu zDMZ)oYMrPn;yns?_0rJihC1=Qag~e5z{0$wu}c~|D{695NB2pX3)#CZGL#b{O4emW z)C>_#&%G4S{ZhMzF> z#0vVNIsIil+DadNk0}&@@RnLO?mmDcmA3FE-t%oOyvOv;OW zx$X3Pkaj&sri7lxqji};-UQ=O6Z=d(K7*d_6SJJze>bKSpF~b&{kFSHaP-qoqU{r4 zg3h%=abN4|=D=U3f>gPpU?&2vG;qSS)(fvACl97sfUf|;qog6v;YKmQi_`G0A#vDG z0Eb4J^z-YSxR1#>hz>HDQV)K2cJ88PbV#!6Hbiq57!QAiX`t>@R0+@Ix5_0LddP?5 zDryqsGx!9^ymBV5eb6|_2~ijK@ancVI}m3YnTFHpM@&mO|T?gwnz}4trp7h-zvg0cUJKGc2U~cboem+j`JGan}k@6+P|Lxv5b68|IrS z;jH|R0}c`e_eMcZl|T~7+w*76>!B4LC31JQ7X@W?*t6LXzcdxwO$yIv7vJVZ3M8{X zPWo`^W(hJ*XP2&K;3%%TLL_R|icHJ5N@OAqcY&yEJf0t(l=C_WF?Y}tNE@Tj~OK5FfJ$wW4`SW-3RK4qiq|o~hJ(t3g7O)C( zW&>=}s441FZ9OXvE?4}cR;=ARBPh~xxSz)pL>vfYTLR4ly~3qePfQg0-ebvZ%d8W+Mrg-gAcoqnEe%3_U z+zfGPq7dYAK~0B{^hZ|v#h5srn@Q&0rLjQQVXb5-yyKLd&*VWL!0>ZZjr#;a|mmiF%$!N$IBu`B3@iJD&kshhl(Xa8aKD zpRAPgD?Ry!KlpDv`bPQ8)KES03q}J35J@i_=~3ArH**z}qOl<*9#79+8;EyhN0{8L zhFRC;UBo~%^-)u2%sF2M>kn0rN_kZFI;XeaZ=N%`!beqCBi<_%Kw}?!p|oUz4}Lx} zX>o&o^u2!v_bnFfG>Ajgod)yA-OcnHzn<;u+t zFXG@bXLNxKZ^V_ME|E-RKh%#`+vT!gI5i2B(}jxTLx*+fR)_YR!lhHL(38;#;aN-d z`stTKm;7-iSSl|Q-ZV8Eiu}k_F);1 zTS2b#&!3dCFDF1p|Jrm4@(J1u&2=4Vp#2O&QTL~@i8S(s_s^Z6HY7JpX%%lGicI6- zCbb;j+Ae*2)X6u8Z<8m_08?9|N?!3@uR0WQC#>Re*NM3m^uULd7X{Np8W_Ob^PzOK zp{k>+^>6o<$ZfUv<Wq1%+L#FllUPf`h^lDrjpyNonFal_95`*lySeK9DE%j$4U#G~mbxe9w5;w}tMfKm7Tu z?1(hVQZeIVz9f0p*VG# z!%c?!>K7~H4|;H#&K>U(n7MVzg{C8H{vG#)d=?N;wY=o!=e0+Q0{Zu)EdekzDgslw zT)#=Nh^w4!uxmLKo*{fr19WM-WqNY8u7JSdn!=kwRz%Cm{BOfn_}8K5j+TMnEfSZ| z^m9NF>w8e#=F1B(NXXd82!*3z45a zb%Kfi=cPM`A5~8p5+@8^GjVV)r?Reb|J|I3#lt&~O93LktQlDg{vaiQhn)IewbPit z1J5OTqyVs`SvI+oh0nfB-Om43zL034*5wmiZ_Mvb(LjA3Xc_GN7H`oj{N~=QgvW;` zj}_inQutfNs+eje6LU1La95egN?NmpQGVa(?0O}Grl+uGG#Bk~WQDCC#_(1O!v^CB z#>dYz7cj`EfZFc5ujW7Ik3*d-MYWS2mZb!s9-c?h`KUk3#Fn6T?;-K-F=U#6T@$nC zyD0ILNAn?vX`hs>8qT&D5eYiddRY_LiW^}{fy5gYYpfcXTPq_c|( zY>gjtm6Un(=&Ly8-p0RXuWD??Ea1j|_WP0Z+XytpKPQI093Sfet&}Pet5M#sdsv0;4QIpG z?g={9^w+K`?@B^B_ibq8sn#d`okP|-=1oyCgFW$SxllX4Ck;v+^)e6d8!nRsdY!&} zqZPqvVF{Nb#oNP4BCsVku26&V2|hrOmTre=4kdflM1ktcSg%O4<)+f!LP3VFCsgjO9{k>`2nSKp%XpbX;4 z?V97yO;q*Nw2J@pLLj&0k{2Gnp?8_drp@e4>hd<`CHn|TvZhL$(+KzqV%r`BHZ9v% zq6kCa4RZvb7JbK$g&NbJ1ddbh4~9M0xA?@Z09PjdNTy$l&yZBK62H?%ef_q7lQKDI zY;P@b*LcwVwPpM07Dh*ded3LMx_tHLjL(Rfx9m(*7Z37>$Kz4!NBdi$_+ie0_e>$~ zg^I9ix!w9@dNgvj9g{FI;rCUycUo~LGDK>%cJN2O*HsiV4RXv_NamX-Liu-)l=)Gg zZbKC_sP}PN5hkn8DSW5K>oD+E(+RY~EIIO9{CS}XR@hIvr4PLU0P5qV&)*f@DG}8V zXdh1pn|si}YyWAdwAmY*mi61l$A3j6H~Evb`xL(qD0r`rrGOslx6Q`HVoM=T zn>P#O=7SzMNo-8BN_Er$G`HcF`dTEcyxY}7eI0s@7O-d zwuWmhe+hkr;~~2Z_*<16_ies#)U~^;rZl6rBdDU|z(gZ{WRzzjO{g_V9P-w>-Ir1t zhU$yTAC<330njz>y-KZdoZA#+Km6eyqay2eFf9l{A?Hc%I%H#rPF29?V^S&SDrQ>{|$n8Z_?09Xob{CnBu_#KBO@&upvnnl@{)2kG@ z=eaQ(TlIgkAis%2M*1-XafI#_6{qHGmAh>f@n6N8Nt(7vk+Hkq6(v%B9_7x#l}2sS z05%)swgy>sGT=LZKW_qWoQTJXHYgVbw-C#B&}c_FcuUp&t5v?52xm zFmU$puiISvX9kV?b2EXMukF$Kmx`__;=x-pcmOn{3h8WcQy78LmT21u{({M$F>RTu zyxKGnk9XVbmmEZ}mRKV+tj&HUT#N&#M~ zQ(K3Tqv{%W4yLeBN|S(fQ}78USM9{ajgQ zHYz76BmE-t1p&>~wJD&JLJj50F!6h75JLp>01h5^#TG6jG(EZMzgw-te1^btT>!Jy zqqv}82E0-Fd@S-^>^}?-Sx*$hnPd#c#tpa*i&?*(AAmg?q>W8o|Gbm;PMiY~vG>2Abl~F0xmsM4 zHn~P#uBW4KAtX~kAAWoS$o8qzpUQy1-r3EwHLY?}De}*Yhrp7CG(Y*@mGOO47-5gImYR5be17)R6^My8z@pfQrk(5`^jX>P>PwzD2 zv8ilq7aqt@Hi^_stl(@RTPVF-QF3+L~i?S`}lsGk5ss86AzVN6n~}DkeMf<+hHu6F-F`; zbH!f)jtI^{rZ^bm6_D<~qzj86TuG|8Dxu@l2txRv$h({VK(z3@1KN9y8px?J07X?? z%#1OLMEW@#m;CNaaJAoVe)o0=43=f+(KCijHt`}w`SBAXKB?{=>+$il?Cd8o*R4Sw zjJVCW1KW!=$d|Ie3m>jy+-b6x@misqYqlq7_G{nm4w@S_8~`&gM?Id{I=N2BvtO!_dM zHQ%m*EIH&lIq}nhL+as6|GgzF&K0n-Zng1W^jpDW&#`E!v*lk)>t7W>79B1I3T)li z*xURTR(p8VijS|gf4$g$iA~BlK8Jf+cO=W=Iwps*XxQvTi?n>-*=~5uBKY_WK&AO= z^laRW>?g;}NQe~E9Sv~`LgbWKiy7mK7(KS!y(wDt!J?(_Rg5h0%wXSh`TE=H<2^Aq zK03wyd%VmpTC1HY90t~KQhzcosr+z4+K{oeXZ@{1N7Ou7oDzFClSL2h#b#B7n^CQp zmTQB}(pG}?^rSREH0;>Q9*|ISx}`Do|5r!zzYdXgM>O+G?{@p!yNw@xD&8UfB3K(Q z{oBH9gBcvL5EW z4c$agTtMYe_sX1wbfn(QTDjH3wS_wA2dzYNapkQ97^QR4@uv0~z^&+@WD_ z)BDf`fzEqrjvjZ{h>(Q2(!pd&+q%V1o7pYy17yXEd@+69aU_xrcxs_or%c&HuYz|a zjn6sw@uV7cr|1&Rnt2cgfp&ZE39CWUPgbr&+Mnsl-q8q2+$i}6;OT{*iE8+qY07{4 zg7R0kM6oUO#9JcIIg29hxo*nqvZpJ*(}i?ivebtMD_tt6Kv(&sGz8LUzN7v*1}D&z z{()PO5boi*_o}{`52Kpy-)d)SHH3Z*V zjLZ6Onnn_NHSR4rG^?!z7+BcJpU+-$0=)MSsshgZ#{p3 z`+wqYFHhN;-2GHL=sP5dG&w-dOr67e(9OIo`JY~nl$k*}d}bDsroId|nLqy}N1jh@ zS$-T3t8CBcv#`RDGdW;blE>FYimjHX>}SNBH^fbhSj>A<9b-5Om^rEj-&|AOrjed1 z$2e;(iM6G!uXr(5*d$KiVDe;)jmW+A%>UOKQg58`J~)#V2Kr;11E28=(CEV_WPl{= z^v{yQ_vu0{$M%kaB^@>4zrjC##W>!Lf-P0x)LrBDH1Z+3GA*`_k$M>v7n*0_P#? zk^hXLOc7wsv$^>8mApT#t)*JVn?>yJgJ&7W6=jpMY$EIU|K1Z?bZL&wA6o!(i6qJkrF>*Bf@V!jCX|DmD5PX zwVGmaKKJ{tuj1gWg-)bu_iX(W8SGPF`QOLkEvE!SJ2k{>u+Ol_wPl%C0#D~;&kBSl z;hQwrdpTvFTuEMeG9PR``BnbZjr2`6bI@%10z9Fkb+)3e{L=MyL9Z({{lRfP4~;tQ z-fA7A#(vw3jrUYxheUzUaOS3wbvZv4UR4=BhmSV80Gcmx^e1{1WMzrM1@vd*+P#Mz zPZ1Dy2IShST*XcOY6S!$IfXat1K?TwHrVJ6R=v&ad*LzN!94d`Z1N)!Ti-Ms(D`>Y%$zIn*!k z73wqs3WR@-PpuSHXb-of@FxoeC|Dfe7O9P@C@>=%?`Ve0Q3hBy{sJk>Pj4y-D@JV( z27l&bd`=r2_B;%v#JqlfT8$6oXjE$8Nuw_YGUe;7eojHgCQxc#jAC=HXM$gxzIthd zK+9n>(h~2=o#AzA-D2!PhXw#(K8SFPCi(svds=eBA)7{3{wG^N3bXGp6}_` z4kWU5%;zQZN#R=^y^%Q(KXic@e%I_oUrYUzR>e7C-P9w{dDraHbT9`)c}}jXHKQXm zLJ}POjLep%+p0w2a0zT?CiC^ovuSurNC0NuvEvqI1s*_HeiUoCkl%K7c?QbHOdj8n z0DE8Fvyang%zLr7`rUqj*!sVgwYrrtI9iCuPr7(xFU%&e4awP;bxHD4dZb^Qc$Zzu zUPdy2ZhFl4k^6Fcd=7(R(MEdV7ulpd%~(4PV+%vj-|PhCKk}i}0&b{0 zN_XtfemTd=ZqozP#>w6Wc=~jWlY8n;od+~-MD8~7<>jq?RYu=N7p~tlY{tk@&Z1V^ zX*o`O^KOjfp_urnOIFg)S#d~XGt_uWLMOedVB3ng?Zs170`8H^-I&b+=>BbSDSyV`P)DBmN7P_H6H`h$$fLPkEa0 zH=;c3!Y1S%5Q=OeVMuakIrG0mIwpg8Hz@nHr1@}1(CBe_5NFG$z&c{^9>}NV+i2al zv2BEI>@Z&Uf_I(A{&Or(lBaNy=uoVgR8qG(!pDD9-vz5u+uL-kypjaByKPt=4q4D? zv=6o4#etW~k>JGpwfyd40V@q(5_gIWucXkfz7NSY+ji&IZE*=mV+(l0ir3H9&$NAG zTd5hny5!f=--4*#T-KZ_GLzmzuIjt&a1)fg_k3dPE$9_S<-kYkU>Z#KzqAFku$2hO zi}N;y>MV#7SxYOJ7LG|v4Dj>X7D!&;NHpY?yCY;DimVAFy!#>S`JZwd&;Ob0WU~pczjFu$p- zkVaoyN;$Loz@-kv$k7f;QQvWpsuAl3zdQih3+*hSF@^=(WfUSD+c;cN;&GeQmeYhY zgR}G+#lS670uxt{lJ|-XVp(fEP2-lBC<3V=_gSocDj>PJFYBp9iS&^$?N2KpSMm=m zA;M?bt4jXKh!d*ib2}Ow=NXk}i8kggq1W4g;&)@aZ0^Z|NYU4;A;o^j5aOw}TZGb@ z*~;UT44vpkHbTZIBthfuAF;B(57fx62;ILk>ir+g&6LU2wDE2^j5iC&ogQMST#Zni z--aLv$lW)O+XF`-GfU=Fm%?L0_(lxTNxwdxCUs(3_dM{}X@%$xQ$K{twl7A6VyzpJ zY-v)T5&K^afik0m3%+THT7a`rS*g|P;!dEJ|*leQ@+om?XNe;@`PI{8OSSeE#F_l zw8lF)_-1L9vJ6>`7Pq@&z0^B>H72)k{gw=LqK>U_@=_LmQBEYX4zSr2l5 z@CQ^cnP-eIKNtG`h<9EnXz$VU%a+SOc0=gFRa7IUECjFO@|`*5czr^LZ=q!o{jFdt zv+w`$^c4i^Eb-ppd;^|DcZOo6MEm`Cc`n(P@Hh?4nW|IypukgC`s(1xBA1CaIbVk z8;JKy(I#R$QO`)#SoAL`OK6W+#RL%S6Yveht!g%%uY^>*m(!yix2jCtK{8Yvx!}4c=CN#7oaP32jf-J znPVH1Mnlx!F*6JaW&*evT+q3OnQIfwDe^>gSDGU_K4J4 z>?yw(PNI_0QiVE{fIs;V5b2kV!G;mPMHmK^n+ePB zWAk#TBC%a<{f+quB2cx}xc38B%X|1D8E`m6LCNZ*DPZakUkY3!Lu84Pr^=oh|+Ylz>bhS zjeY@N_1FLabvgWLC*LA~&s*-y5DB0ad(!++%|^Sa;4t^;v&DPcd`9GWi?gji1Y|Dr z!r&*Pl+&R~F4%0>lfwNLs;Vsfm`#pIz_D1HjDX3%&1`F~q$kZ4+?sbK@;~L~%Lj@~ zTBqh#XkVxA6O*BLe`HhmEL8dZuxQ@JZi7Narx$cG-5rK=f(iX+713fd)ugXo&gccr zuK4z<-3K= z%cMeJ{bmi@C*^0`ySlLG-p(`CR%0|H%~?89oL11Zyn8Gbz^(4qMjE@oW1-)nQuh4K zMyvt%_C+I$!pCKK$Q#%6r_0uzNy*;4DOn94)(Ty_dtgAVQWG|+#nUC%-JZHH(`BYK z2lnZ>Nwl8sf+$Aw))J$(&;N5{>;-=TPIrqxf$XNKs-?cG`5V{|K{6+S?L@uk+ zYROTuVOQP@JKvedf&MZn{g9oYw?h(F>Du6u9XYu|lF$_t(K~aINex+e4Z*jtgn6wO zdPowwGg-Zg>Fb|3E|wX}!0!Q4D=3FZVf>N8;?pPL=auc;%saS@r84*3$$#q~{$8Ej z+o_g{SAIQb`)yipG)z*;zgl2KU1&c32je3ZB^qR_%?W2U%Byv_Fc5W z(DX*9xfecf>1PL}G6^C4$In6`eGV*%=Gpo48jYO{E@It(lFz3D@xPam2)s{KSc&2J>kEiKHL1epWF%{ z?R`|-D=Qd~j{KJ)eice${V}cbWlrn)!3u7cX5BLX zqoM0P(BD$T0{d<9ZRgJ3;k|O92H%lK?GurS!vz2O6AgH``fy}?nnLISxn<+s8`13u z3)t`9RRJgVKcdqJvpdC5y(IzsH5xqv31v4iIBU|*65NpOE!mde(U3w6gEx6}7y%%C zlkzg<8q(~)-t0eq{p5;&yQm{aS#gmn5HjV>_6&wsK{K*{5(#Ld(H2kq6-uX+C5ymK z`W!~HU3s+* zeY>@~;aO!ER6<~kx|nwX?OvcOL)}exQyf2U`vttvoNM@J{w-m-d3Ns(@Jm54^dY^o z;*%w6PIkP$kw=VB`ip8(ZRLQ6+VihRjsL)+Wq&gFB0UXBw?kguxIml87SV|ZuqA3^u($eaj z6s*0ssP`eb%$&Xsi%1LB?o=b~Rm1UYKf?liO+9)0X;%zIv@Z61*j0t9ACng!J%qxs1-;EOSxB@y%&rpj!Tl2h^9d<_b(E@h1)}CIDpl3l_I~UPE>H; z#I5S24u;-!}PrEg}b@1szgkFa<DE^=1z_ShuiFq`86&I3;RO;%?!J@j~Zs)30=v~y4VcvXPCB3KOoWY#^zsgfO zCv5d|$wY_6L0IkYJ{%UmN+{SdVT2Uhy=pBz3eD^fA~Jlzmn$boxT0gC5V4=zT5?t{O&sscUe_w@4L&V87~8tBXle~JASN0fczy1 zH&!0Ew5xI)jlPq|9+$M9p>l&fgDf_D8+H*O2g!21Z|)i+B#vcBGR(ch)$3A`09pmM z!~*BZmHGANx3`&o=|%TWDt^*V1+g3=5bT_6pyL5|GKLo24~UJ=wQ&WwI3Xfi|cPihD$^* zfAHPM&CgFB%yP~V-U;FVObH3xwG~FPyY`di5$c0S{8PnJR4~(|^ad!rpEMHBhS0}W`7Z<}b)$W+Ln7t(m z>^0*3T6CkV%W+WrMqWIGzmNO|iI{AIbQ%!??j8jq!9KxK^ z^MAz75w-I&H#mKOFx9(_ix1oza~gO%_U+@R=U`k7q~PJvBA>%dH>g|;dr7NW z1T-wPy6EW~A}v^?@! zaE*K1p*$0)ZQ*k+x#E`@f$ayul8x<#v|oZJ3T~c){dN95rB^8tqKcUS#6`gPqjnM) z6D9HU@9EsuqjD_w6CmpC-yUo%<6>rj*d>D{ohW%f;L(uG!*V+{tS`OH#cw7iqbUxAsUOs9>1QSFS!6KcT^>q_#Fy&Fn3n#@!+DPsjbA zG#cG6+g&*-BDb0UgkI?&7kKe6k%`MDbezTmi-%u0>)@8MVgHYYRHAbKH`T=%`4x62{D_*&y)G0#@fl3avR$hutDTer}F% zKWvJ{J$h<1xgXhZVQH!b;Z=m#!V>pOzilAi*tzcG0;|Qs5hq&C7OjIG-;*4XR%`Nj zDULEmb=_a%DP`rjQUgY%zYlxDuiVTo5o8f@#+H`bdUEypkLWGzs;IMHyiH#J_p!dZ z<%3jz6wfvR<95L^13E6R++FJc2hz^l3EiVR>o6kC?`RX+)+o|NO*c5)jdYX{SdV^; zUL2?HzsbH&*~6pl+*i&xYNxYNkMcow$uh-~=9JzL|Z8 zRCbDYXJw3s%pn&(agwQ;YuNK$cv~&n;;LXdsw2n!)h{GmJrfKckh|iC(DxBF5y8s2 zWGFE;#Xf~TTjeO(f0NRRW;L#N)6_z|4_Z0N@t7!o>H0c=wZk&(*r4g$h;NUE;?L_| z+AWM;pLfYh3D*9uVcH(W53a@DEe^;|(JowIFAAm^qr+D-{Un}@E*U9y=}Hc0hiO4Y zKmfYmgs-MgdDm>rh0qcF9wt{;YCFd_Ry!bWKbw10jo6=!J*T;w2vO3YI?TKJ63C#wsVm;#@$T~V6E;x)+A9LbV6%LFQ}Ktp z&o7R5EM`234$C<)71?aQc^4{*-^UN=TBE#7 z7DPHhXs1Zz1%FXL41_m9tP!e0ybab9{N}#qV;aMfnqx1aZS;NFEOs*;AFHkz$&{7JH5u$wFV26W0z1;<} zq{t=d-tq+}oBFn7mdoHFgE^vKpF>PNbibobmT#tB5}9`}+kIu_=|xn26}P9&RV8$y zb&YNsBvW7odC-fM7fLW$rA@23jS6qU&6)7to;$MvslfiFT`PD6Tl7%s7FJeCkG5y> z>xRv`3<}^8S@_jl;*KS9CNdaaK1@$!gD+NtU)M{vxk`Jc3+a(le=N&H(C06k`9py% zCdY~p1{dv^C-LM!|KW@s8Z>%L`ZoJ!A{p{MXo^UM?58ss=)Zp%2-i`OqP*kvE^sRQ zqwp~(#7{h|ADX0z5ZW8w!hPKh$qV%N6ZH@W36c%%MCED43r;g!q~+Q6WDkOK2X~LicqoZ|mCXWaL^Xk6fHIuY9?JNGZ3Ur25rL zFpL!s{whJTJhGAb(1GwAIgj1po*`2$ta>~ESeaJz*xfB2FJIe%G!{UYm<+Iqcx8P2 zsTWs06=$kTY)_nhf0AC{dLEgpd&o|*^-jixJfb|Z8wC#ugLhLo<(+9J3Y)+Vhrn%Co{-<{hp1s44t3oSGK;T})XXf%$YR z-}Yfv-cNr<+|NcQ$D5T9dfbN!!Je zLrRHz7d6VsE=4>-@!w&f1$nOkEmaU%l}e)Bl{L#9FjQjbZXzahFnih5h?Ms|{T0~_ zJ72}#JqztL0OFBCBhC*@>aOAG_%j4y8ko>Q5iWr@PvYwe_gkE7+toALB_3mc#_>eO zARnbJ!Xfh2K!;iR18&HjJ9W&g(GLU6;&Nyb2R8fJIR{3f`Q~It9d~GjfNcL`JMcFV z9&~4~8E4_8&-QU_!BVauHn1!t&=tQmw+gbJSXc^|k0jX?I2ftDd7RB%O346vataED z^a&B-e1(9WyG|Kwf))15$BmX8TMHKKkX9 z@GrLyQ^~TWJb#g*-YSMR+Fzk$UQxO9$6wU~``pOK*WwfYzUXV#l?}Kv=`?_?8+0CD zyAN0`*+vGo)wB^VEK7wv6a92Q|1nC&M{+Pp86ag|4rj^3hrI5G7RqRga33v&OpiX5 zXL7t!tRs6nG`K=Z#MHBs7rWH!7PIk=wI;0}et81E`)qi+c0{JTuiHgf4&-##+xRk`?8?3U+L|l-$NdV-#e1ZBoX*2J zalGh=w0RZZKmT$44`c~x*eFo%Y{n=QiC*SQGt*dRo`hv{z z8Xu8hYN1s265yvEkH%n(vhiKd61#!Lh6Fc#&KiAUFr)U12Co100C=u!$zs7hdW=C*d9cLV1W3& zH@0AV(=ZcA+ZxcHh_sowzCQ2GV|r^W{tR~jiUxOKT`dOfk} zx}nQK-E;(1nsL9C?uskeTNBEF*H;b8XMyBqiqMV7qpgG^K6lmA9y@qF#B{QYfDZNi za_l`QdspAbb?&?W=zw}57yrBXb03=W@2+^^UU;r}QOhr6XYl7RpfOYF;xpmIyvI&h z_pSOozs>Tf0!b30ab(PoIDvnBnzM#FCtdv@UXoBQ6qGSYD?&WpGY8t|6ZPuhn z`n_?#dRjSfH;-ziRsMSt?j8Ejzy682$tZ1zCu!`_I$f|D+C~BdiL?K}YZca5@HE;^ zHgcPHFy0}u(~E3c2;;Y87-Pci=21iPDqfnb?39n=L)`f8y2zBw_aM^j6J>r~>iRia zp|6_$dH&RsE;--IM4DYGkS%3*JqiZ%LZl(X$t)#c?A<@wO`MB%$AVJrDfjdgPK&ItqfR2LxD#I-*}&84T6ObX zZla^FhT{|{tQhlddpN&xuDjMEC4y*^9b$VmkM+~|B>SfjeUg)fvtqi$V-KL$bBe$I zLJ#M;=>}SS)9R2WcHPnGIfeSTa*_v1`Fr&6uculYxJnw?vzAB41ahW%Tr7IPt~%k9 zmgh=2k*S7eJ3>Zchix!m`c3l=j=V2pEgOnpTqJO=24JBo+qc6ifxwc_UXm3VZ zPL*EIOCt0$@j^ppj!up)TuwKos3QnX$*J@z*f6g~e*0}snDTY$LOTUNG?HzT@5dj@ zAKp@iV-^zL0T*o{T<%x_==tGgsO+Figuxx5PgEs`%ka3N1orq;SwhhW@}OQ>zA8TN*?A#lSuoT zk~|?P5vIve253W9;OgHdi?2&M*N(32XZ~E|x$XtSSZz7RYGb(X1lwP>J8QFyu#Tbn zEv6~0*!zBe+{@YF%_Gixv%(}u)NCU}#wEuu` zkr9&5$D~)Cj3aU6@hc@-ZKS!BJ7hd1LN}c3{cC-3Q6&GpMHjExBY#tzh1|*OTc2w% zJBeQZ|1*UVv2zmZP!fU5$S8`4C>}S={;v;!p%hg<5pnw|X)R8%uxAoU6h%iZz1JQdmq~f@VHHwcV zSb4KzqngZ`{Xx^~;%GwDJ?`UgAMcoJNELchj_cRItL^r_eqv!UM{UI~q2>~CR9 zdHc#ziWcpjF@cwk@plDl5U<(LN7}A$@6qYWfFWl3P1~a+nE)zvZ!Ui(c6DeV6)ZHWS~>H5#x{uaIn1LZ-0ID^V|F&c1NfmhgnmQzjX&QcQA% z^~KlOP)0rI(TwZE1SYTf=J^T`{krl}TTsO@1yh2wnJ3T2GE802Ba zi27{X%j41K@3d1U3PfJmJoqDH#dq@jjxjgBHPf}A=J1)X~c+2^v00sAT)?v3K!VK$3@KdMF6)&OF-Mcx8^bS%BR0g~9;${SNT+dwp@e@{zPya`4-rQ*8QtH1g_ShD06j!I zTcU4fZDNXMxECw?^78v8=&?#i)RR6JhD^5;y{l-@o$^e}bsh>Vz68v+XwH*}AzdK! z{YT*1!H^;+m987#WfiR^#A^JR4hjw?SC?DT#Zi@yxFED=u>M1yfdiQA-PC`ikn^Me zun@eLL5kt;72APt%GPwAFbxl`(MTNU#jr}g-J^IbyNmxQjF>Oh?4DXL;%XbR0e#N2 zN^UpwWzdIzGAilJkPrYKHh;igt*THb*d$!KbZief)wL+MAT52aS{AcF!A*NMCV~pW zi2}lA9F3dfh6|xj3Mr3~k8RnIN;+5`SxUhr?$uLb59q(eve0 z_e$_Fz=PF@Cn!E{7t+^5j~gl0KGq10wU$A&QUE@`ZgZH7=y6E-u_grPom1gA>KVZh zrx?qV`gO-=5mh?1Tdozr8pzt$pWut;bZ0gv2Hj&>?`uB%Gi|;%3uF|!?c0>I)Ht>Q z=X!h@{OCt&A(KOff#=g#Gli+X7^2QNu)t=O+ z_Q`iBEAQnXKIo+Xy?;wcrT4p&Y}E~SmzR}SmQE)4ZA@h~uZy}Cd*n!1GqhP}eE81Y zH*Vxd@+k|EOMtJ{3~Fe6h2yAE-f`X)mdTOMCD(V`tuTe4e1z2X&OK4(fxb(n1+q|boYC!D=R*9R3gd) zFEGG3w2FOd$J9GZ@V(G#zE$$?r1r|-Ddd?{FY?K~z8h86@$|$E%k1W{sAgRJ-Cf zlI%BeW2hi8eL^?J+$z?Pce*K|b#An|jsDVlpIqC`IT@CD>u33p7{Kkb858UZmVDaz zS_N|TZ<#H6ma;XSWFQ^5UWf$Ax%ZO<>}q=_=65XwN8?|vZA8mDkK&MT=di=o?fP1* zT{h&YG_w=dzy)x4z_|!q{m+_*n1r>B4`7hXxh<~f5tP^~3E@q%pG=Y>wm&P_qyLN` z*kS>U0HqTJn_D(gD~nlcDpegufw*+a|?|jGplp1%jlYGLfQp z)8oa^IlFTH`yLVAdr<@3i+~3>azJb%81j`QLiv?>&mNh2+^;R28RJcl)0o5)oPIezLA-vRSKRIyvK+Cyaebe-thni?gj!6zZ~1nD9qFyjW?_gpq%# zGx=F{NgBI(xJ18%W@)2ImOU%#ZuseD+X_itoxn>pB_nMM-`ZGX!+p6mf5KijEbwrV z^~pSm;)irQo)zsn?7N8;v>guaP)7C&5V{HC{|D?r_*C!j0tOVX1X}H#)cm&asPbhh z!a>)#Rh~}Mwxt6JF54GMno(46jy&R|JX!rnt1to_{-C(=iX)?e7kX3c!hi4^I7#zU z-C1_3#N2;p*tEMqWb>V8oF_aHCAF&Pw{S|@2lq7Eh)@oEIT1{7kCPi&fM(E?i z{pKJyChw6#d+Wb5anax< z%>zRBP-@KfHmA(6A|=ty`~AU=@*ah9o$eMn8>Ct_RalYLc5kCz({s~frXPndFDbV?{d1!kO!_=ds%PAeTu5ql&5el_26qW z>pNWKNY9!d{IP3yi&Zd!o<{6(DFU|Eo$jHwb%LkqV@^8#1E0hacpojXZ4_%6Yt_V0 z4@yifKmRnPcRz(W#J{4PDkm3|jsHSS(IU1Tlv&~r37`c~Ss!!0o*!NR8>;xsF0&kI zA-+VoA(bWrsne9){Rkh^u#qyYT1P4zuTC}#uW|=`$DOvOVyXm6tE=q7_qbmYT+S-) zjd%H^L-z|@$IGEILkm~$-3~uT6BO{7ZZ(24_u8e>w#+mke)Pz0vGlcVL!7w)nC-)s z=LW3ejKObn+6C)=vX{@ZMi{vCa6%IA{99n+OAx`O_LcV7Lc`&hEiX}TWtrpd0hQp- z$7%4^_#Sn|C7yo9{XM!h?zG*J<>%^Xrym()1*eGCt0v1y3{<(e;peoDXbWNFR~w0A zf`-a_W-E_DVI%@pz)XrlbYil;ZG=OEmfo*&%=DxN+pagCixiVbWq39NvtDY1`_INV zQGER3r0U!$z{x83X&RPBG)w@%CsY6sD$oGP;yJq&>9{{7Yf|dd^+x|L)t|3i>tlP$-y)(`BI+@w z6_EwD>uS`fD*JqtgUQK?)Pgh`{|JtbV)mv6TJb;XjP$7_zED%sMeLg9< z+;Tf5ec5`;4xoe7`~7b8`)Ss+t2a5@B!_x~VNT~z&M@9lZt`oxWB}IVv$tBXX4dKe|@pdQwtSzps zjjN>{d3>tV+zPU|TH0eq&CSh}`u6(LlYUZlGL!{NRzWqb2zu$9z8O=veiLT)8~VZ5 zWo|^6tM^C4#P-j{$G4JS-oCJ#I{#iyA=M7oIBoU;GeNodYrq6%7ir7jt$n{ovKQoS zrea2fu4M#6v|C!Hgo#7wt_4^2DR)vI!Rm$L2p;l4UC(u`6)%uf1;5$d``Z(a%u&-? z?B$vC`*|Ca0kuIghey+Z@=|hDS;6l-%mT=QZV9^GuUZ|=ypgr}O%>6_{6`+KqjsLl zgBhwE539>_?-LNfWZBO$tne;!mCUlSo@%SI_9TrgmQUB!KBxqba%y zS?P!OOGtmML?z9vW4RMuZyz`BX$)j)lTl+kDW#+qCOy#&ejRXHz z;@1b?s#z2i8>Qz3-uw`7`c4(Cl-bX&Cn7|qxq+Z8n*XeF`zGie&ZqF3wf8NjRU9q z=6zVq42DETlJeer`kn;G#ND>8aqNx1bc6=Jx{LAeJ{ta1kR8(|;X*oi4+UzO{QG0i>{XbD;Q9`7pPO z|JQ8sqZy7N_yvc(QOE{6 z$SD9$ISQpj%WOUJauxe(JIWa?*`tJQL?9Y1f3c<80fay)mt^hE-9#?EYim%f|gSYlloZBu6gDHa$f$ad=~j->$8z} zJw(il(rGX?tBUTSC~@Nlhm_J$c67l%g2o^>@*IV4sSGi~)dbJ@5Zzyz@J97X%+f=k znaT=|ul!`lorh1ul<7H`1}d)dRL9?8(MS2Wau=Y%NA2CYr{O+?g4A9QX>5kotY4-K zHR}?AnE*utum2@@Ro%h5FWCN#KD*tly5lg%oN5Pv>Vr(a9ZR)mh*OADK0t3+Uw-L* z+NYF3tYK|&f8ejo!7HOT79O;I?ew|jI7xPE&-o*OKhQdvD5q{~rDnHna}T|Iqry=1 z*Y}f#*Y=*Vu;+t{QuA*EyuPsEtvftR=URQgZP%r|nE=axT-h%F$m__Qhtm!F+j%wU z?UkApRELLRli^2^QxJKC-CTr^K~JM5Xt2utHt6TJzGK|6?x1X_@e)7Hy#^YE^$+bQ z1UG5-pBR)AdL*joY3l1gH69Ta#1Bn1iS6}>pmtaada1s}Dv?@-0m8%=Z$~Xak$}zQ zAdWfrv}>Y&toXf>U$Z2zNTRboX-3N`fCQuJ0fY1DT<_6dU4W0=N88&C6V}zG&A)Q- z7OPdCHa0&X5*STMu<1nr-^y<(>O|vX_cRRj`xcCq%esb&YHgqUSKW=g?0kysG zTj!YVXkGu6-?f}|wcUco$Ul|y`8y-)uvzkM(UatOr}jZNBW`7#IegD>fx*Z196aZ9 z=WluIImt@J=ZIbQ@1ER2N&2*bNZi{Ms1MYBQ?Tj|#oUZ2$TZ}+5hA6ES~SX=Qz$NX{;F}N8}JE!&~SKgznYZO4fKYR?YnV7c#YyfrC0K&5Vwak5tOl&ZNwrX zYnFa$fl$p}5kZS|{DVgTvw4HHRFbSbnTMz{O=yAe@T2#GZD_;Bt)shB50A;D7H@S| zXW*SzYlAe+)@(%xK#F!18g-J8lq~?znu<#cJ1}m&?5O#`;r+@6Y0Fb9Vn+@Z;}Pv< zH}`V_jrgqwxs@S#6Uv3XCW52e`<-4=MR7elSVpwEZ~>>O6eS_})kkp~E}|_$%3DuK>K$U;OZV zc=ow~Vb&I+sp^cMS3HH_1q{tmbc9_47Zz6|o^FZYDNlaY>@LlzBjYSn*0C zG|fELNsRFqG=8-oANiOq^?IgsvT0rwDWJ^2G2qjB21_h{9u$nr8gZf?v2e>=CqYFbiV9#? zEFZ6nFgYCoR!V^^==wOS9L)!eS3l;X#m18q{45wYcOV_tJCWioqE0PmJ!fbQkhu7x zO&(f%7P7Bmy&ahhGNI|^8(|13`AU8TV{Zu9cO3J3$G^!ayrx}TxZZ6f1R#z7=G=i| zwM>TU&GoYf{H(xhH}SyFeSxp}KYb>Ktv%vQ)+tF!Dpc?m#Gg3mEO_s%^@p_H^|H0* z+Tv~z7jV}s8~wCBI9r%4$(jIyYB#hg4Mj%G3$B#B?xA@d+1#6wP+V7H@Ouy37E$Ne zQVkn%$06fQK7nz+_g*CBBCmAlFeYY+9tGZlkBsJ~2BN}Ar zgoozP@#C;)-1TZ|xyvRjw;{2PSkbIo~Ev0zTk(s-Ol*a|pN5xj3qf(-OKf-ImdFa{$Pbs7ZRwjdpSA}21@3h63 zyQ)3%zm6{&j{>`Z<pBp@UDZ&7A_SUH?cSKHni>6Z`wqeWYq7O9TERk#>1ss zo2DM2z3ho5yaXbJG^&Ig`bC0IUQ3?)^Vpc@JRm1FyW1T4vGqp^O9}5xIpld7!e#8W zZobB>yYzKsfXoOFz$pTo8n=&FuF0~O2+nL+%TH^U;+Xt5=|8U2IkV{5vSj)x`TzXz zBB(9uV>hRm_c@jm(S+F}8lx{UD0FE%2Nf+2zDNuV@M76d<7hQbt$ncH0YC7Tqsrje zp6o55JZ^PQURQ39+8KtHchrOcj{1?r-GlCPvGkWR6v0xFnRpTcnHca>zo)amB zrog|-3I=kU?z3-yAB^c|h*!1z{ztTTinbK?w$p`l--+oc6>QQb$SS+rM@h0k(2f(< zDm1~hP)w8B2Z$sDJmZm4Gltf*Jk>BeU-?nW>;Mbxzn1t%XnPnmR!4G?-wi{-^0{;F zx;pR|*bpQigq*sGxzH_mR?J@N5yBmeB?n9jvDkC$47h-#%+G@CaBIDNSeJ8{^5kPq zBmlxW{Kg}MS!P0%T6#S)$=i|%zpkwLsXuHd)b=52hG54O$W{aM6Y7TB`#W=h?mxh9 zXe9oAud0vw={�xO1TAgqLq5Ktzh~RpMasCd1-X;K8_a$+XRP!&ae7{#Q+;^(Ut} zYGKKxnzt5Mpt?3sMK!aXDcRMxprE!y#M&b-DD$|3fGohITOvC#GO!;%mtt#u>(ymD zqjcvv%(*XJ@XJ=o(UM13pzg*x*L6AH*udXiIG#^Na2I24uiAF+=VV~afUX_9cQ1&% z^`^MyZ28VtYOnahmL}3^V6FC{Xz7n=Zj>k*wC-V$&0#q#n{p(1Jq)|_9&4R6;K7&2 z?)sDGCS2qy<3xIwVI|2yT-UO=**Ab-(U-%Oz~rtQDKM-*i-`pA>y6JK<6l{@%iw$$L8Bxp7pM~=rk<;4*>z=;xr1Mc zMCzM+X@hru!@gP_X{rEVPEA;mr;KCIuFg8?Jl&G({ zu5H`gJE}F)H18MB)+0Ninva?C8^kUUk_E~aE(*w`4S180~9@N}4 zXX}cO+Wgaf@x8c5t~Z;TQTNfoY>!S&y$DL%5)bS--dPJfJuoEX%u$vGHj7@~Zha0S zV9?wt1Y=Imvf40+vD1>W?Wp@}>&}5|+hu{R!5BLMHeFY8u_dM;a_hSU2U=X~BOyW$ z?eu;B{s>J4yHgdU4lLcz9s zVN$X;hZgIHE$e>*deitq@!SXBTcQ-ii7~IKt3@^ChMRq%qq}GQnXN4!RBs}s+j3sW zkE=*$<7~7L8OABcNs_U?KRA=l%eC8+h!j(Yxlzfm#W&8_6wDv6-F zjl^2JY4J8AdvMDWp~Y}VU+RUEPOBZ*uuD4&V3YdjFvj~*`gyxqO&3A5Sm;K>6bBqj zuEA8u)`q$q&zo)*Jr>FN{$P_3DhorZ5#Phdza*pKO(iEL^+*kK3&>kr@K_2QO#(&r z$)Btm3xT42y#?E(?gl!OcB1?a-@q`VDCJ@KK_}QV@1?!d=B+!{i%6Ay10aFh!`$I- z5-ft)?dlKX1;N~<1W(Vy6tbk@1V=G0ylRzkDfkgD_36T@V#!Y^`*p=_zqdR^6(a5e zd>uA=JWwYr16Pvf?}1(mTPyeox9;RM(lmNinomi@z&@+fUm*M^;&@jB!tO|PXZ|$nSNSVrL%a8^LwKhzsiRtumzRXR%l?!H;!9l$ zz1F^A3FFXmk)MP0za1SAcP>CP8;}tb)0h??))caZe&veNSrBu%R|dx_VYkV}6 za5??Zxb^AXnbNYB0lU40bGuCt8VqsJ?U~+eK+rS7?})*to6R)#lnpGo{%+WjQ$^dn zHBJBZ$%8<|NjxKv;y%QUkK(PLKzC-FXVbDti}10{h-ZY)$hy4S=-e4>=_=^VrM8)yjS^3wk{)Go$}MK@>Bun# zc{s4&n>j5_*+=p{+k@H;UL`9x;wDf@fY|xhu#^-Qt$ijEY>qp{XRws<*=kNAU^D?- zP~v=-b%s7gq!dYA^@7`DQoGGHuQ;!!fRxfw(abdB6a;9#4r>zRyWOktyt#Mag`D9* z9vwXM;ZBxWTY|9a&ycN~iUSzFFb}(0W6!3JtdCjlI5)VlXH-&^Wmh>(%!i(NkwD&W zJ?|_}NhX64xx3(EnnBDg$_8DDQ?v#o?Ay8mqfCgIsWAtOWkIay6e0B(3<&$ArN-7> z>PMF9Pm!e|AbwG5gP4FJ7tiuFr@s8ju+9kpqD%XQWAI@-G42;Vsl4x&e`Mxqb~CA5 zGG@YYYwo)>92RNbuyV0?;H%nvtV~)|g2UcAH)j@7v_yWT-DH^2u zjw->$q8`2Pxp?0)5D&g8TcB=##JS8$X6ijZJx;$@_U5)6YK18OTUiPIgNNwk12O#k zm!?wE)IKGaWD_M5P(GlA>lH_y%h1od?F27e?tQGbQs|7MmUrtWg`@Ek98tZnx4Hkey|5j$6J=2sGz|YK?2_<&O z82Bz|L#sqS2d|6%nq%&vcC%KploC+C+Hod&86YSqIVMNk;j9p#9}wY3aB_P_{#U7P zIdTQ9B){eM-B11Whx1cYtaZp*3n?#oh-r+c_@YE#LXo-s*#DvFtN)sQ-*5*bR7ynY zP*Fm0mUe{fb=b7nkZ~Quc}H`^k}$mQzaCRoEmBuKy_Ol2uayAK%}4 zrx5R3F)VRU4sy8Iswp-Lozxe}L6g8A5hBC~y;6fIBDCI)+PuKZWsfS9Q#)m%8|hi( z`TFzUe^r)N?}2_BG-^cqOHbml5PZ&+Um#%=Z=x>4FA!3O46=1$^|XrWVakMAVzsYq zO*oS8@J_iGCWWeqjCI9$}qS*5#!w|2L=V5;M(>twWkz>2~B&4TC0d3W{vpVvo9 z`^eqhVODBfjxwXLS@KgiDCMxFl-nQ=vXx+%>AcL=p9;S6A7fY~VAqTEj}5Or@LyJ6 zoeh~7*%OPQBt@n7KYsO=iI9`B^4V9>|FZJOkT94FL)jwNf#k*pf|Qr*<<>cS;5`eq z-~H20x!C!wvOFC}^5WtB;n+_}EUVJKnU>O$;h^K+L#InmSWasB`8>$SKIURYA>_1E z7i1Q8+z3-jNHe>uYY{Ptr}y*^9mMsL32)s!g~vY0n{@VmG+31?wjY!LV`cw>)iB$; zj|2<)E&h;Ws^hMd%_Ez=_SZiC&D5%VU|0TeqswB>LF-%di)9t-{X?oX_+9;@jTX5z z>|Zgkq!#pwMof>m`F=a(a~1#4nosw0ls%)(LKXSkm;RtRjrw7I@GFebbEB1)NIL%@ zA-ART3m=;S8DRSo!Mg=1OpggBAOE-4_m&}D{oV8nd-$o94%P%=_rK?boGR15fKz0b z_Q7_B`3OI%ID5y%y>$=cbDl|KZa|*SjW6iWg&TFe>_0T`Qs2JAu1JNOkzcTtEeLun zry{-|2r?)2HUCr@0mkx1X#Z)Xgdz9YZbQ1iG{@B&{r!W}KCq!P+CN)fdrjgYmqd-S zVsfbjSVkNnz_FREm`I(OupA$)oU%YS)#dE(7N-{<<|Wmy z#M%lzl7M^E3X0EZLVancop-iH$or$4>O#RKlM3U*z`cV;MACtlFMB~Rc^^<|)SC5jDUGZ||7sm@DA4k~%Nd2DAI z6|HX%(hDk9U#yjav(g=YsE$@C$iKL!_=-!YTC@>Y)#8WjSTo%8$y4$;T`i5HV6?Cn zQ?D6LaIl)qBS*cZbr4Rnr@FXoL}#}xpok;z;!P`Jn-#$4fVDe~pGqU=>~mx+tC@;K zT`t+CjV*=&OU9Opd#lRo*#^~<*g}D?(LG^nkFvRP zSpEZd;LZGhk9I;u%n?&^wZ9Bv^&&{>S`~AzIEx&7EzqNkyERBd(Q+0o+GzX?B3&!_ z4Q`YFkY_*ROAG<~TcIw%iDqSn7&&F7Bob$@@5IG5D=^EK%cM^IYn5UZe?L}n^zsZF zk*|6;2YJlBMN7cx_-tc-Ay}Ea98J(u(w%ma=PrZF$Bj|Pkyl3{7s>u5B_S6DKyMV% ztx^hbKT;O(cuGBIe^Ef2h0E0$_K^hv^$d{tD;%JQD3t=rY%_R=XIqp%f1CH?jWCbl`T^LCbi0{UTM{ zmz^0uqLljWlhYN$f~VyyHr`s#NZ|(?I+bPE2AIv-NXElX`ev1@B;DTEXMgmvdK&)h zBr{q)NBL!NP=AC9DH{rQ9jFWJk4G^F@&#ZN7Rz_7GE_rWI=7wNiK{*%@w|Gz zpzdfW-T+K?=#fh#`&I7j;I_r>$-a>^9BZ!gWe-9WVj3Pr}Jmf)9!XZ?e%$uk+8n1dri45ZCj{qd*bY`I9s&+;!~!z zOalpI0uT5E`M@>bzM4KAD34&T7!snELeOFe&DvT>swu^)GGFM(I_sxt=65jT+0~-` zaSm`S9UFLDJFT@(t{6hBV<6hg4H_`xMFEmuUW3zn^GJz zh;R(P*fUq>ttQORx9gC()!|zG?!k3$XJ!08!XE?C$%jkHb>+?XxY`2TR&ZX704_g3 zI{7sYsQ+BaAogA2oOyE5l0o-<(&K&0_vn-SB)82aq_gc5r&32u8EF5fIux2nQtNEP zN8ZVdW!40!K)X4mO)bbvh3xVEc??A+F?gIjb6~aBic|syIPFl-uRny=SOjsF_on@lFs9nW zui6l{JEOw=hw3&gHXWyjMM^B?uS#wF0hsyaFY{zC_-mdRw!6`_W>-DjVc^s}z^=Ca z2Pjf?+5h3xVQ^ja`-qUABmSnWBhDEheqSM+W~f@mOhTTC zWqw3-EZI1Y&pl&=<^tU>!$g+Ucqf5)8qWqDfL(YEzGtuix{WY3c zaKX})-(f5TkVZ@8@GG^zjWDsIvxSLlVrGZ+VBJzOj0vQ6A}cg1eIs@MzM6TW?~hJV z^5XoLlL@a4xH;5ZNsY}so^3~0c~RU0aT#0VwoeBp`}@o0CT1NVjG_cgmc3TAqZ`K9 zmRGklk+hze0jP2z{?8TDj1@$9wg#l;jQ%BNu+;rPL6|FL@VTmDrJ@11`LN8EK*4H^ zH2qC0U9j`X`-~E$B{uw0X0Tby21uV@!lL1iBBQ`H&)%wsbRmi?wAN>HkUm)P)gd9` z_yfmQ8a0JTLc1uHEEefo2|uYR;o4*~X_Bs@>mB6qq+RP5ddYR}Vx`jC)p%X(F8p3y zMBQXN51Xtqy>o1i;)*@wZupseE~0+D)!BpO{3T?4Sx_9vOlIAGg&tIX5~PhZirY|V zvwPm}NV+M#*K36_ZdpZ57uId-`*n(l+r6k4`{ZTwzh#c-C_~%c`G2nTsl&v$U7vp9 zr)M+EJf%IKPGdy#J@|+|`;XGy6@Y&A18gF6bk^ z9H?&GYbue$`)b@=Ml~XOR&-UCH6nbNoi#68q0>8Vl}oO?%Dx4c)9F)%OTiy^#K_-u z8+Y6XWZ$#Xb8T#Dq%aiLiNr9-ZUwW?nGv@Zt_n66NFkDa<$<{V`=t708!$C( zhB8wU*3-s`n^{)zyZjyI<4lug&89%otPbyF)1TW%a0Je5c_65@qTGx2KtqyHnwV2SQpzwRR*{|5xUn`;V zk%hZ=>3M+o9}!S87V|;Fx3g3Xz+=GNh8I+Uxl%IVSV2|doN zuWU(+0_E=n3136mxSVSZYiUknJCNcQ<_XkfO`w*Gn4bm!^HGmK0u zc&BY$#AAEgenN6GVsV??<8tG$nB%n8pDO1^{x*X7WE z9MK!Gh$9kU`c3X6Oj!$hv+wOH>D5(4b){Kp~`^+voZpTJU ztTm^Y_Xi8M9yPTa$$I@BWrrTgRU9niwrrNU&haLd>kHiP#r3E z!yi*EHtZ{HgEl<)0H?v(O7Fne0i81sbjgI(E1B|s)+DW6#Pg)E1P6am*q`WY>S+tYbhtmv}d*-FQKo7iZ~8hOCb$Y z8*Kw~gw8X1-(Uq^!X@dU1=ptlG8@%eWb0_}llVK>aSjiC>P37?;MC#ur~N>2vR*aE zN=fKFe)N=Lcf24BOE;^awGigr16Bvf+>@%*z-lRA@+~ZnD<8sD943K$4A6>p*$=|d zeJXDYo8G!X^v=n`I#2^5HZe9h9v3b-oM79YKgZM7IQ~`}k73z!j>6?M9l}^-${YS<&8cyj z&3B)@e-_g%+HAzP^JFi>NUXf^Zx@3ghe=AYerYjhIX@&I)&AwiQM-mWel%HA-`Y?N zH~y2>@)mA1GPztQCuB)1SreJxv41!Cp;-E2#${j0Csu=W3aa~DEM$5I%O2wowaw$Z z;O{uV-sgHUYbVWd^QyF_cN2#wH;pMu@Zh)07eVy+sfQ_d(h1#HkKHU&00K6D6l-b& zs>s=XbGw#ynvN$V7!Y}|q9n9X%|PE~P{s2g-f6U$i{Y$KY(K%?Xk{HVH@WoU>xz%v zpOI^ZsxewAE$s5on!oGQ=(e%4zu+tX_TBW#r1;j5&}n`Nj{$_xN34SA;;b!kiWc0( zqx(L=PQ8y8c#0M7LYBHBp!b?6IE5qrlFVHPi~wvd;nBp2FPJ4uwhK z3L)6#ZH>MB==mTP@?KiP=|fCMpO{V#p~_m9=ll;suT>K%hiSYj0JnMm7FSDP)55aRS_hsl4DHe z2FiUc2FN^;eo!pn&j__OH)yN9Pu=g*V2{rd2E1TPxk@1=FB?gMU;w6M@+|5E)lVaV9H!;<)M>1goy*!S?M*t$)p z@(&RG+x zB`AGJDx2AkTfFU`E_2+FOGcf8PrIoG7Sqs{TQ(V#-}_KTAn!G6RDZ z?`@0%Is8BEBD}#TBqMhb*Z&8&VaJ^g!l{5Qu{vc5x6D7|*?l~_^SsQK({2SOM>S~% zq!U_JnsfA14i?8i7x)k&W%O@@UiWgJ)&&Ocr*2(P;oapyyZk=v^zCZ7JXkSrbzR(@pVJs+~O8MtLnN3edJOz$Dz;$k5kUaXE>cD5EX z*L0Gs2c!~$_9nTV2H_6dzQKiJsWxYo1ZLq2cQaG?t%jcYa!+ZEwh- zhle1-TnfbeTQ%2TP~?BfTc;z~`Aj%vtA}TKqX!>)sIp=vh3h2Dc-b>vaU+$+#v` zqm5LMII{$>ONBmT=>JLm<}f4|LD#=f^?QM^*|>i?Mn=tSnd(>GRIDKQn~B`#DdTF8 zk40}m{|Cm^7=VPd{&iKpEK`x+nW-44EW0~__+f#V48O7^s!gpEn(v>v?Y7O@x?tiv z-wHaQX?1iPl)4`El3RXe%BxblzW;Fg++%TBA01ECA!VG{F2rjRpK7$F zrZiNhV=)8_*o+P3RHgd3c*g^2tj*~UxOO3d)-j5_J{RW3CC(1CS`-KgJ7kea)Yz}{vZBq?i=eitgCd_SS6z_FM$Kp}8>LGz|Z5Y)m1{~-C zxJqhfG9XUCA+%|YWKT%tQ+mUEOR;+jr&)EeV$|;P`(MYmqrU8r2Up8~)=#}?{|Ti2 zxZY%STfhiLM&g3#u)*lF@%Eod48YW8^s!9kQT)dXYRI!3&Wx{f#9i6-Gr-A^GUv#T z!j4-;PUAe2RGh4_*Pz@UdUf0PT zidnk;ZueJd#v4%G>s!3$Ib$6+1udI5^NyWL-E+k%cgUga_V*Y6L>E>4;?`Dw?D(fx zFhP^v9d?(A4Ktk!5+cQ~bhdyuo%Ak6EjJ4$Nx5BcE51xn#v z>+2HRp*VGEUjYuB=x6q6f)OZ%UbMM|rTh98A29fvB?T*zRB*F2mTi~MQH@5_SBmEh z=775>`gOf&V?H`D6UbVT)1SmU@{s#5&NSZ{mYvYm#{hQA%NvSyEULX06w^ddz}(Qf z(^k&YUH`pz>BqG}`UudFp!?)BQCxDsOxyh%865G}8v%{cf4?@^Pbzirw-l@%JjI`AZslH;L!-fxu> zJUR0+x_5p1hzIvG6lxGB!T1i7GV{DGRry^QOHKPVcD5cIrK|#fMtX+AI;Z6MC7jzz zQIrB-&x5VJXFWI4hIK8*J)O(f*PHXJ!db4z8N%JFMQUC*sp@0otyq+7L_fwA4k(?? zdq?jXES>z`9*%H*=wM^fC@4;jCHsOUR~(9vr0bj*R8+xcfTfE2xP)EUcqmbmWJZ9Z5ojZ-c8nhZs_qE2r9b=^RlNfpoaQ_nNv zS5uZD9>R7C?)QLP5)@7mSvr;!Yl15KU2M@m6+4Z6Tq1YF=ri6n);L3^F4jzy=bYn^ z@PTLr!!x+GyJ(%Wah0Uf|8R~DcQG@KrX#F(Audl^1l=yTVTCMK?u%&cyK-!6bQgAO zq?v;zz#+@Xi*cFLhc=6a0`v~}mi8Zo!WxCD1WqEa1OKv^O9DKpxiHKJo_oLtxoy%m zX{2xJEFn32YwiwgLfOGCTysnt$F&OCq=WlmMX8{qV=KhCh{$ zGs#w&Qjd{kfi}2B>aow-+-|+-A&4l+wm}(a6zF>L8c1e=a)H9yTch82jH_>rBh}Vi z6cuew?Ae^rL6LVp*3-4^oOR7Z^jKu|rIot=DYFd{;$#;dYvE868}abDTdSe8R=s8x ze*=H)o5CX&;H`ox;7%AVKAe9Tb=Tm9-1!t(;(RL9dJ(LZbb^QSH?S=i(h(Rr0KASN zJ@$QSJ1rgDK4s0tI*x=YH_YmCg`^>$NSC8)0ZNDuwz|@w;)k)gb~ilsI-5gw>)yrj z{u%xWV#a@?6VVn52K)t&JbnH}1Y0mD6l7kh3B)F0sJu6Y8j6#m%Ip7FP~CK&ZC0{8 z|6@z85Y7Tr^qB$?E0#SJT*rTMS|&$JndVM?QFc_B?Kf;lb10DJ11E6*2(&pl@Dxd9 zvLT()zSKNvHuC*cc<#k}adbG{j^e-c5-3Nn5Dn>DPE@EY}DBukY#cTBcJlKmKFdR)}^yVLi25jzZwGCz3# zNm>mn*X%W(xm~Y&*y%0mfXd)o*tn{@YNy@1ko)`do(dZr4dtN8R`BCk?2}A`iBU?w z@DDx;-`3kxIiI?5^>%;u^NQ=ye;0kiOgrHK70O=dk)eCf&(_Z?yA^H8`NJrs9QL;$ z9~}QVN5kB2!8JkNO&p;Aek$=Eq*IyfbrBKp$Ffelfc`9No1ABABO> za}odD8A}Z6Yn8D^nTDCltZ99QJ%+VA`U+ruNHwhez@PFUa4B*$+KGutYHes=e?1Gj zh*y(sje2^yJg@$8s}8#UcW|UZN|S9}hK?Z)s?}wNaSf3B>?#R-yS2!RbYw*dOuI_eK=4ziHC>wv6|XuRjbv*`3ojHCHoLAQB$M<2wmd=G*XBZSLs zX`9j>%czvy83BLG7lAQF2lghV!GqfD+K$k5b8W*QWvlbwp0qsS1>{}rxYdO)ql$1v!-BmNx>D~CJ9E5 zyv`Wqf)Jc8UvGXSE1os}4?9^f4WC8wmRDzWD;K>^=NM&*5aY_r?;-$#K4_ zBB1)(3ggz4O0yiIx2E6fJ?y8@GHXXJV@LOL~-{)P<$KEGb z)`uW0#PDF~Te-o{ES})}1Zj_P1jLecy->Tc6nzMpgAp2!_eN`hQx{jpVzHq)olqL` z@L*cPAjc-7-Yri5@Qn8UyNjJn-6Ru39**P=QN;)E_Ko1aTCN}aVfd)r^5(j4oZ{9o zG4{|i6ZtpJu}q6?QC9`?Z8P3um!q*R86}~W83btq0p3?roL+?6>v$&ItlwInT+~rygI9@tcaxx z*gModz`r3@x_6^k8JJKhT(+i=ZMBil$uL&4ln8DsREW{yzx$%NncGu@4g?WZ-{N-n zoMVrUVDpx+D+i(qW+CtA*u1Uxfm>ZkER%ssI*bL3rjo2ur**9amclGP&Qd1;Hq(6= zKj#<+W_O-W#|R|US#m~R@p9p&LB2VieZaYp*XJet5eAfMWrH;}; z^@L+QL7!h-mGt6>nfPzxVPc7}X_QT3RzOC7ixgR=&@K_C6i{kQ52It}!iNR73*&T# zs9X$U?8oY=abM)ziB`la1m3R>^SO>tsRvry67c%bS>-6xxAoP>++-`)9xaxnY!T8o z1U$r79q)aYdDuYeQgny;e?-T(qn6?Q%RHNmU8|fQLc}K}7;9)PEaj=>d)u{RECYJA zn#Vn|MwhR_H!^pBHM@JPDaZ!EMncfjrnhH|hrOyk;c+_fr~Zh;lFLYldE0HIPzTv& ze2w=HoyD=9w2kPj6g!{1xxcr$0oeS?$?IoiEhm{$vJS89gk-+k-GqhmfY+H+TS_Ip<_W87o$37)Eyjk6v zbDbiXTt$5eIYjE#!pYu3SKXGw_)VA+k@2zWG>z(dTv&TkVD4#qmDTorSBR@oVk`S` zrQcoZ{uDTDf}jx_dv(8#__rBLlbzl80Kvh!OsRghA@Mc-m&@Q9ev}i79CaA1RhInR z!gjhHJ(2l3H;wy4xcr85q(@$j=NKi8tm7>*83rBS<->pWrhCptOd`WzQNayhj!WmG1BjMr05)=9@9x6GMGaNoeThN{N|S~&USk}ip`E24iO0JT z0-6Fs#Bm&7Z61{!)a1})_<~yc;hx^4~ zO=wFHYbL3nIPQ@O3JZ_&_*T``kW#Y~Fo@XPT6*?0gy28bJJ4!V!Nw&SYv!avTk2w3 zO-#B!THnuM+3Znt0~bqOWs$UgJy^{ zojKrIcWgU1$hj-#k?T*5qy(hmc>P2r{4+tZD${ok-7n$G%*;swK1u1OLmkZkhm3 zbcl?s&XGF|Qn6QO?dq?~)@LoLRNOOL$oBbpr|`G}JK7|yZS&|i2)nGvw&h~6t7+Bz z=F#8=ikeoR6ctjZNUs@!hs#Xh%sOc;Q(0sTO3xOPK$WOzR^paz!sSW9$r!5@DSe}W zdR%d2F{p%E^{~H|7?7szloDAYuMJkzOwS8XhKW8udr)kVVVxs3}By!;C&MAU7sDrr9v$SJnWF!cKcf#x2zpCkHlkun)3rx{FRKfKmeDA>; z#7m|P_LMTXNmruuioE!6&zz)l5WhFH0K%-M>-Shf73~z9(na@o`!aYoS47f*W4{;-HX>I5u#$G{qkxVsNT25$DVg~Q}C&XS5pV@ z1@%qxocfYBm=UPo4~j@^O=DL!WT!8BDm25|KIU#|o}Vgugsd~j+4V_NH0&f-X=%CX z5-|rV4A{4JUYJ1laz=75F;{1NZSL(CXDQ-dC)I^!j75}sHu3-zawOkQ@>h%eXA-_T z|AnmA<_T0%Ad2qInkiKbXPVzid>`r}FJAixF4bRh)N=pz8~aPL#$X3x!?l}ZLy>Ze zsR2hu4AYc1Gqo``Z^79oP0~BZpUSx}1}7fZ({>l?uO)@LT$9tZ{y4~1>Rl&t)0^4n zA$dp&r)gG6xoGAD^}REhK#kBFeBwiaHbdDesFN>mRJf4~NHbBLg=WK%53?7|i2(;WF2r(!J>`v5eoK2xgKrXF zgiHQqA3shLgArziU(uwS@9@NQe*$>e`k1yI0XINu{d?&lk znGkxNt^K-cZ(N@gq=scP!&d?Ew>vc5qmUnUSfYCJGmq|wwIHneOAjoV)A@K0Bo02t zF3Lq7QZ&%q6k^w^$Ckd;0QO5cOL*61*NYscC+AbO+3+7 z+!=ij-l}*Tt^63LKd@OSui^XjLjaSp9?FWvDmap+~K$Me_BYE4@}r^P@zGc%|n&% z4VO{u&uU_B*)Y|m67Sj)6`oJYygE2HAF-_$exae6o zZ;>Di6Z4IBjUlJy4a9$(Y0%$`LCA;q{Y-P2s?SXS<2F}!huWl`FyoY?NAkAuS3GRNjy_DW_%7O-2v*?M zog*M@T0W?V)Dd&s8i3KFx=O~@8O7Ba?drhVg2~YEo@kTV51ne4tDG>_%{=cY6ZVBv zaR;zlfzp!g{_5EY!x3hlUwK{PM!v?UF2=B=UH8C-hibi&rgt$bBJl|SjX%e0X)JzL zM1O54j>H9ARjy)}SlvAjFR~vFjTNN&xSlAbb}xKVwgvk&a5eL*PnHvhwFo}SAn5*r z@08^>+LlnGPknK+%0mozHs($Jkh5e{Ug5-xmp3Qmuc-V^0*p4meavNy$s_oq*~vHf zoi^qBitkyF;4iXR8mpL|2Bo-}&_*G68&+!e3AH$UCEeP}de|y7xC7@@K?pw{)hOqi zePD)U|P*im|WnAY1z8$p*=n6Z2J5M>Cd_@HjhE|Bicnj_P zph-S3Xe2yNmMov&{`OAb9dN#l2C(qZNp#u1eUfU!^(F(&9s$df%;Wa1Pq7+Dj#-W; znK84@sFY}Jj2VC|>n>4lBJ_!Uz(UPv=At`7ZxXXYo0QEvj9r&TzN86~n*OEDnfTEw z4v%bRw1hkK(2VvkfW&Xkw9eKNC3DK9d=+xsJ5^FrXOWal5V!vIk4M?yj>zCTj;KT-Ze9EU^y+oxlel}v{0S;% zY`!;>o1ra^KQb)1DP29%0$0IKuJ58>I2(U$=Tt0CVCPe!$uOTx@Zt?z>`^pWy!(h^G*eq=?Y|bXCFec9rz{q`8M){rm?Vwt}?1VFu_b`8V3Ou4Dey zpY+q3$i*{)s}%tMvPXx(!ADagd5Q3X+E(W~3V&Nl8Qm*66Fy%&|6?1xMP8L%f!Q>D z_B?uUYaj6AS#i`G&)j9hs0cL@l35!{E6(5=oe?uX(ukmb`&O43Q1nrMfu|1R6@$7l zJ>B}z|JlI}{4`1HW}sq=G}OnrSp6X}K3P2h{hFHvK7SQ`JKtD3{*|nntZ>Wb|=*9&lwJ7q#GYTS+U2}gUa;I zqpb<+*7}Ge4upiRLwe?F#gJ*hy4?k%P0+S6R08zjN@)zsVx2fR1IgV3=&EF+l2cym z(fAiVWs+Sz3E3<$5=qu5ZV|DHb4b+8lCPh`Q{uP*Brk`gmUrwfVX|z~E><`JS2poL zVZPjmr*jXmfh2ComT%`zZ8SU!a){!n1RoGkv2K?+f-H4J|8h=}T6HWEz+lZETRIsn z`7TQ^VE&0hR;@!ES$t&n5b_jqcrr*L_4lDlO92_4B4O3t8s@R0zvuQ40vas-MZzR@ z@sjE#0eaahaGIyj0sgy?i?JMi1LdQ?Ubyh#2}k^2_|+`D2o`c&U^$Z|8N1}oPKje5 zgCj{xVOWE<-Jv2K;_}&Zt3YAi1E*N*@1E_e(FKR2ub(QMvhQ2OMLl*>{j9&8?QX>F z_uw7Pyy}fFgkHSB@&T^{&uylT(I09gArU|#tf{s&bD=amx&K-MB{Ig+=ffkk2@n5S zR9GoPMDy8yT{oz{Y=HoIJJDNJPxSrAxJvP9OF2<9hBxXNKTp*lrAoUbW~X~dyCu;7 zykU&Q3$0?x{}_MZ@3dMx46D|S6g@O|vAz|t98Dv-MTu!x_ZWtm6S^}w23fu-*2TK0 z5YSY9&XsbPZ08g4+9W)}O#%#Uabx5K#Uq)C{2*LUbtmLLfz_w>DiVaZ1xuqZcHxJ; z2Z(k2@;?A4wq{^p7l^72bGW9>4Vw3UwWyCt&Bu{aIVDNj+Isx{V@{* z<)FZ%=XtCt-%8D%YzG6uhL}lNy;-H&C>jB|98x_y0rMqMH%nN1#Kg zxwjM$Oe3>r`%5EoyIOCoC8h36@|{^6&4w~%Gnr8X_ymEdSG%TF9|E|p>66bsu(t0N zFf!J)Vu=GS+4M~+T}IaMB^1n4f;XbQf<~7`SrR)bwS29o3B=!+Ly&bw|I|zxwHM=X z?Fr0n^M#QiaY}+xYLPD>Oui-5GA5>JKx$e$7*kWu$^Amq@>99RMSwl`QU?z@pZj7j ziDHN2Yy>$idLfwIu{IOA6K`Ox9T0*Y*lw&X9mOgA4)1B!GJj=n701iNSMGD2XbKo^RMMgXT?LJErusTjEHW z^0KbPX!`jN-DCk+jvhRI{W|Q<<*X7Co4k&Ug#6Oz;yG1QypgmLM#1&YQ%AFK?)|z^ zOU|RkD8ry-{k3&mm7{?7J~1_;*W|E z$3XQ&dq+GS9Wk4NN!{bnAKHXX~$i`5W_i-gWOSVP5O=xJRhl5HnCasd* za`V~!P;K2+nK!UHCgZbrnhyVeg6EFwxmI>Yg_JTQw=T^ zPZCb16*nZ}ay0;Q!gx%`&ofe8Msgww+%$e#*Q4zNs2`|oe* zFUnNm1-j`~Hr&HgLzcu?*MHV>j??c!yaqM$25J6-hC)V@9k7_I9r%y9;<#m=3DtS~u=}?;*E&ipq?!kY!3j8+lZTf>e6<|K;y|##TN~zoJf(e+zqa(qAikTA|#MKIqjCrA=;Ekht8{vSGx$@eRk%*>M;sl$=kUdVbp5^But zfiDdQHSIX}DcS{(+5ocbLlYFXrcg2&+CY2L%OBi2K5_93evBkh(1C>%G66MzC7zYb zF?(^iPKBy>^KKwfTw(n_Z40e{m$nOqnY__gbskGxTCeXqiuc>T!0}r$@p2t~tM;oi z(lHtnjJZPgrt65{=&b|CK`w>W{^QP8vBFKOpt~a0ZOS56^Fdm12{SefD*EiQj}#d& zdCj-zn{_ILXWz*6Zt%9c8-HmDTJcKE_yX>DXJJ6s#Jk=g;qb2#=y|5I$utl12m$mrS0%Kp)^KN|8$$730;vTc$ri)o`es?i; zbZ2andhv+hLx7xT6<;#|dgk0BX|Wi5pe~{Ot}5=cWlqI;vfg?1eN2#68?-Tpt6Nz+}kh5kTE>VXPy3wmn;3{T0D>DM_wNP zL#C$&uT%R9Lb-*mSckm95`i&5>~gn^NALWhv}PaInSPs=G+L)2Mh-9GWO$g~%=|Xi zUw^iaG~3i%jPxIZyM=n_kb;}06bd>WgWxuZ=vW(5( zFoL`1hX@y|cfAr{r;q$Zks9IGmy0Wq9@!4-A{=gWRN^1*jrQK(PzWY$W8btH@5Hy7 z5Tgn=G4FEs^Oio7jC$|Eyud5J>|HU^Mnl@?jtR1yd6_6x_?H7}t^l=p&oN6&6PHER zi5P`nvCY^|jkj0;>Cp|`{@||hSJWTYy8qn=m~rd2VIODMyj4r=JoOoAi9Z}vIuwTO zdTru^C@(&1B3&2hZeE6|I_yz`#nrfdIomdxd`9HjW`0!BREq1$ceh1pX`3?WNYAv| zELBV0-?PsrxB8LPY8>y*9>kHGo>=|%Z?Aov_T(M>1Q+#`imehUDy$4L|5D_jA9}Gt zm7q=+J4+S}4mOuLPA*O~wwJ^{9phpRr;SVNS*95#c8f7IX-&px&D1f#kNTXQQ!czp z{D-;|;NU}7_pY=qyiR2ar*j&aBJCpr*r6W|CLv`$nUBg74jSvr%%14AaMoB@62%-l zf+W!41KtE^7I5uZIGfW;P6$xp1F$)CF+yEfJG-tsl3ByN#D}p4)cX$+#N5QKJ)UJC zopL7YJ}+M?2c%aDxrmcsUfVavWH+DET~Q(r${MRC90LS)TJ|!W-^P1H-(C=K>NQlI z&R0mUG2y2_*uj%F2eRIm`(nzjyH*+?1VW{CU8MbeWyxGgJv939^QhHVfiNp^|!r6UWr30XBIeVK^ksOsc5p% zKM^$1z!K#_wMf9^cJ#pEpGlAGpucMa+9u7V2!M%a4=rk%XS7%-%!s?~+O<~Mzxdl8 zmF{rjVRyX+2rEe_OXKYiKfxUtZfdZI_U;>y%UFQ0ZwkhVuCj=#gw`9Ag|X zGXZj}4S8kN>;22R4~CLs8dy)y@Mr^;AR)vDz)(zhlrTYgd- zN$hu0O{nu&Qa!9c+1|Z&%wcef?;pbVXVza7wAxBv?YF$pW`hCSDwUV0(Qn%rp!MXj zO$^Y+?Qc+a@+pks`Badw(#Kh;eAV#8@W`SHO=xu!tw?lr!0oDoo`=vG*h-I4*#DvF zD;%P1pJ)jIl@yRJMM1i2X%P?+7DT$GyK9N1k?xK~5Rj1WT)Kn>mhSFume{-B@80_t z?7Qzf&&)Yz<~alI)-?2Wo09+^R`n0z25y6J&JG~>Ga(iT&DklewVL$?4muw%e`ZJ5 z^@$%}OElpcMHgma{=*FK>{&O7(QoiiU&|1u5{^Z`2*di6eqBp{_NVoaN6Gl`_0g`7 z*9(as&nIW@R3pn7C&r^{wJuJ1LWX5;wyDtqgvlvP5_oq)8%Zs}G;ICT{)9}FlfPO5 z#qU)6jVfr5mVIxQ_DT&Ot=IKT&PJNdm#V}s(hHHZ*>@;yM{K&tKUUswtUsou79~?u z4_{!c-YW?Jw-hK(F#oVxj2M#D{gc_Q&=S9W{z2`zN(XAvCb^<4w#E9RdGv%nMZZ~Y zh0|YP^iZw^N+|q~7@e~bp$XZ}s!VLeN*a)1)OeZ39U+Bio;RGp%ILgT?zW-H?3^dTc;oSuNL(t|6OfrQBHEGQ-x?vj`+hw2LNP^=NdYx7qDjae( zLmT1O*>CNOFe8w*(*{9J#^{d7NfB`zSQ_Tlth@x3^CI+JABAHX3LQ-*H&MjJQar-^ zu4~LhAx5x=AJRX3tMH33N4owq;@o4TzZ)p^Ym5rG*u2BnEVvXWM{BY=*q#;JcHq0} z<0IPf)Bhppj!llP!~0X-_Eb~jBI!M$3iG-_sWbA54l9ctErTFas3X+?Wc7Ar`y8be z;~H8+#J8&|an0vwThkjK&sT!Hbp5i9z}92MGoFHV8+iMh?=evyI{_Uzt3}lKVKwBF zUIVG)LlJJ-LR}m94;x}rF7~@{ZeHUSOj;>|;Xaw>q|Z1D^9cyh|8c)rh1r{lv^D;pNdi z<4h}$OUFvub6_$ldN&+m9v#EWGx51wjVUEa1Bd-n_6H#_e_?RJ@BU6y$CZ_@c{>i} z0~|b>2K=3hBg~XT=XpNJ9I18y=nFVPb}rp>UhP#^dYvXm-j?ani&^2HZ+?zU)*j+L zHv)P(D#@oe?^_1-qAAnjba>w!{|Fk!W`Eh3%E0+@zj{86@OE*hd&6SQeoLEvfqREs zf1W5`trf<)i01jB1MPY2K_eVFG5U&!X~R=gW9TiDe^uH~%BR;al9U>XTm z>*+^_euk9P!cq8(#*XbFwhA#$j|+O3pNUu&`TUkIn)rvvA$N?xAFIbK>YwUGD2_@W zHu?!l|JXSeKL>rMV!oZ(lBerL;oEBOZTUhVp<`PXxce;r_ZF8}q94Bmnc%_^SebWu zce-o(BGUqy-+ldCovCo3k)IhHJfIk4^3l)$FmI%~njhBUe#F|WCjmtdn3&Hl@6(dSeW(`(!zeljD+ycdY}H?$0Q$Kg zLJ2K0?`5v8(K!DYkdc(={?B;K^$gDRqFX{=s1F!=oZ5_H$4bG?emw4ZTK=fFP|8+Z^hhympk z#pm|;cRww@!s56UVE4$lGl!hBN4h99Ej@MEtgT-TG~K-lB>Etx-TS>zO_R*a>``uu zauHx;D!@TVm(o0BC7B}MC;5?>sH1tn9$kpMntOE_qdvxqYU6ug2rO89VqQT5hd9)6 z%p6TM+Ad6j`eaqmE;pA^fGr8D3Bv0hfO{V6uWB$2VNg@ zE~Ip5Z}0H>FXkRKOCbh&Re4^-{@67CNG?Az|FBdgm8SOF@X?@)z~7anR<*FNt;4U0 z@X^Y!V)iG~)@VNX$qYmv6D?wFWOE!QZ(o*ta4LUsQ%7Bb{OpAok`3}$#dFywEz53c zuDcr`beR|m6FEvhH=*seM9Lewq(_KfEZR+YTSWhpR zjJK}E)SNE;H}n7@G-;2_KecV|Y_d7brZ*xhy_Ae?aqebr5%l+1>vsxc8k47NMor9n zy^@)cqC}xo<@f*A-KI*^_b};ip)Y)cPd;6}cs$7pkf`2r+k5a{kmN0M>c49?TM`Zx z8nrnWAq*A206v{z!t$Da=n@aJm7YQ4mEF7iwPv=HO=+g(uIZ2!P zoQ^#5*?i1?zfEzk{I9fCfK!1_IP5692j26EapixJ=W`Pe3x_&1mSM7J=z~}oqp7sd zR+A0hv5QeWfnrbQC+@5+0_|jxQwsSRnFjfopBHv+%LQ=3|GjM|BsAHU>8BRRq zqYOs+tG8#W)#5D(s(U-UF18cbm7h$GWco&$&YYLM4$&ir1BhmZ(`k8Z{YXp`zDBYZ_Wa^;C?*>f99qX?}Tv=S2tqm&yyX)k$s z2dlmFd+W*JQ{t44dJH`t!k$g2n}Bm~Fp!6G`qqvO0lcXvJ2p!F&&NYPkqc1Qh+&O& z<)k`FkN**I>5lnJ!8UdtALF&%uhU}6gETE@3U@o2uiNVfKlB3!Ii8&Elg~QAt&P?) z9iO%JVt9B|DFu(>VvX|*_sUrQder&1rW3!mW}MLHJui|zZaL>f`GFeg%w*98Zh6yx zZS&}YKw|IKwdrow%IKFLC2j9l(CB#tItjbCUx(~71I(-(zmkRD4fW)oPl~**Ol1hI z6X0Z@mTao25FCA^Yi4%paE0tUi>OY|*#5b;gLC5y;f^9+cK6XXZA{JNC{F>-R{^Rz z+O?DK`5>){ua#4CSEi6bxc;2cuXsaUCm#ww++Csg)>yWvij2Nul7fe^bzRxrP*OKA z=)VU|MLp=YyK1J-RqalSn%RVS*lEId**xq!hZQ~*CVzEmo4Rn z3@v;ZO=9a?aZNa%Gpnd!sdF}aQIG9q5%sUjKO~V4stS=+uT>?t86g@orsziG*>Y(| z$YosPS=0hra1ClMXrZEscF?0q(svG3wrjXPA58ycbC};?vubty2}DeH8szN%?u_U9 z+7EP{#&$OQ5t+_KU*)x)CIs2Thw(V#|GOn-cpbL3>pT`uPRK@XKhb=!)qd|p(DMW3 z^==4{VfGZPb^jq^_Ty-_|J@9s2ORHZh^#b1Qck*oS-v@=CiVnkDHK!w6=RAJ+D{d zZDPAy(3+`wASCtpa_BpsRnq5IB(3OtctV5sRVx^7Ra0d5K*pWo2=&tLP#D^{$tvfn&`W<5nG=rtNS~Pim=Ai>< zuWI3AT9IvF(G7HrW1`*A=A~={-_k#)MAv9)-YxyvhcsrT?)`_^*+1l4%n9Z;key41 z*0a9LPC~!aPZ|PTb~|&9C3NKY71WZ6?AyBaDJ&KDSY9VzQ5Nj`$LTu{8QC5My*LXy zm1J8%_$Ol&2V-6dWlMeHmAhTFHd6v{j3(r!*0VUgOJQL;MaJ72M#oiXK%iGmCa8O! zh_;>pFvLFdo{x}bSne*Et_BBGo^4SrA145t1#Kh^$hz>8;Q|KKdyL-~^}?LHKiW8Y844s|{!5&MmUIH-T~lCfv}DoRB(UVAje*iG0Wbc-G+61n*LPDVht z-ZtI#fF2feRCzTqbmeQMWqKWgFK~IT@z;~xrxCWbmr5*zUOky}FsGUt>7yj?SH_6C z1l6}+c=yW{wVwrIhX_1EW|vkdsU4AZh<`G|c|MQ*NHx<*?>j8*a)OqMo5HC-k9+IW zpDmB4PxMK?9A3dwpCk(yih~e1E)TCwZ)&b%Lrr!kg~_e?qO!xq`oEQxO^4s9;s8FT zq6{x(?+GFP;9-u2e+!x?G5bLZ%Vi*c|D`&@FfnYGy`L?XY|O9+9YK{9RQ9>a!uGrf z^0Ice1; zVAo%epuMY;?`q$i(2jZZA2u3u&L{{cncIn}@%*l@4;aW3o9MRn!iR+HZ_+%~)6 zKNpjYa4P?-8wNOy7wo|GPL+Ud0PW`w_J4W36&;OSASX+5z{&YD8g7wM>sbc)|39vC z)$_R5N<)ELHsE5q2J|4swwhKnh$KOH_C>JByS?(@;5EhF;KG*}-^pc!_|>OK zWd!t5_9NIO%>fwAtW#1l1v2m7(Wf5@k8bwFY^c_oDdd<9pEGE8Q-dC1;vFte9v!~N zEhh?~AfM@*qn6ON>-qb`nrof=Ebrr{q7*`{@WR8TmWD;5T`vr~=e0agL0`99ihod_ z@`M=a240@ji*Wjp>AHkA`<;VwIO>=Vot*4Uz-+Hu5V9Eo+w;Gh&Ll48H+FF>Dq7m_ zpjpe9xtro&F&yBE3xy9+CI^COe1)4mq_%Tj@-9a5cl#?2_HE54qTcUah(%{BjQQ89&~96soA)~{I^-!j4$P9p!{Kv1ty`PcRq$W!ZWh7hb+o` zeKjjWZkBj!J1CiY>w><5$%(QO5n)IW1q`eer|LC0VwGTC&j0XrTkQ}VTM8t3aUIjY zK!twKA(5BgHQzJmLttZ55)~P3h!2l(0eqf;aexrRn^UElse^tSebK!(1{WFYC8g!8 z5axLBZWHkufk7bOst2~~t&(Nhh3Ty>n#XkqmP*XBxd=0Ca9gxlQ1{G3k2dR+uktMX zKH`kAZDpE#Cz$Ks&UMFi6?*d{aGEVFHQS>{rv}lZgm9=2d6K%G0$bVF2vtWFnh+)w%B|6Z6nd}tVMK}xZ6xjESKyt zp-I_L&*5^>%=`m=G@%FXNww&2$Jbzc%v>_tXEa64(OaQ!DMXp>inIU&di2dz^C~6O z*z4@cNuU|!zHv*~YpS-5gzl7&NA4;8qm|aO*!P%m!2xt%1(=t1%zmR6(KE}9$_4Q2`wv6u)%r2wZD>M zimi$?P_WHcmmc@c3^l%2>00j7rPSM8%{Q2~WIZ;VrVl2L!m zR?{DMS?+bofxAR06L@FpiPB1C`fPW)C6N5U#=djW5!#I>y7L;HIXWrtcv#;wQS=>c z#)p2Bl#v%{kEE|ILe9Xt)7l0R^@qL?f*7_$-`W-}pKq3sD4pUk4)2Zk z9ZX1kZ}<*9c`GcwaO<<-U!J2hrWhX@%0G+0a3XL$ zj*jtlG@o4B9xHHka;$w$*P>HLK40=G2i|NF{soO26)FDm^<=Qe-7lswFmG-1tRMmB zLG=W2{r(ZIH2f02salS)2l&MZIlD7)vPdd}N`o~L``#n0)TUTqS`JeUh1%bCQWDfw z7h7U1@BGo4Od1%yUW#a!z|RyNu@@!nJgv$bO5BMX&>C#WLhO;6hUl#nglNYiT2F-j zI@X`;f0+dbMZub4B%s=uBksbwOD|F{@N9j4c=P#S-8U^it&oqD(i7Uoc5wJ!C%Js_ z&gp?~Le6cU#R*~V7d@}Cm}b)mTU)zNPD` zs88UiKXQ^wDV*h`7$8K;q3trClMHgqYem57aw^zqw-`ia4(e%!7#8%GoYMpB794Cs z0T2|OvC3EhFV`c!7<>cnS|w;^lVbotr_onTV{8n#!LJ)xo>}+rjx+TuVmH!Nr?S%l zKF#741ULy&)47iPv;B>1kSRIXA);c}w_L05!hTbyGrubKXyFr?T05N zu1igioEascb`WGQAe7AM-^f)>* zQ%0lG`i1ipUD-Ho=v(#x7rXC85Oj@7C(|(xd`p2@7*FknpbnYy6NB%dsMZr-<^Cv_ zAP!F|1aQw(H{xNJji*Q5Y@*YtNuW$$ii0M=Du-Q2ZCv4Tr{cQvD5C^FSKDuS>=+gE zoRy(;yk8+{fxq)gm4^SlC3Oza1th3_%YiD13)kUSAPBa3Fzw)i7yR4NBspUZ_|U@f z%@Pg=}Ht&jwr_2F;C4sOfw?5ZcgfBaz4uw z-Gv0~%;d~HFG)S)4-EcN zeC;9D1R+)XcX|@828S))`4~$+&+1sx)F z-CrdldasY#aJ1kqrJ)0-=>4uD12_}cwN6nn!vN6UD0GPSMleXU?TsR<;2&RO9Hi?T zUI9mBC^mDUjk|-%YC!iD4EcTO`{a-e$ub$0SZ%y?g#K?De$nCDG(y_%#D{|_?=lVFWV3ja2`R{9gj`9+0Cxh|` z9m>@z+$&kps_P4IzNFc)Y*2h;(B_%x?$HWMJ;l?jh5J3F9*2feHnctLlyg+< zDdjc?rYN(z7)a}hQDp9p(RqbsQhKg^_Xb$kSD+1r+s;oX;V2OD z_zAo>t0<)=1n&9}U{vfZw%DpHlpptG22?$|D-Iv?*3lK;7r~F+l^du^SPvb_CGXaI zV&*1yR8I2M_;%Fh?|wD!{@-t?I&p+lGyId+VvmFX`m1bckM{1yJ3V(EO?LFYIiOYk z4(3$p0wzj`DbTa~&WDqELYaOh&bnw-*Snj^`s8A+tUXcA)|59ryXoLOnz3FJ)2YRh z$Ccj8$*pa!w`%mNeOwFJ$?@hCeg5z%IS+mj4J>fu3@Z#ul3!li;=^R~5Z57e-;C<( zxBm6qhve`$>?_FXg2tiRs?A@`LkZJ>hBgzixxBtcCxmhtPkJjRY{xF*#&XoW`*|Bw zt_E-aZDTCYzJjuVXh4>BulPM}uS18ntLze*Dv8_B(%}Qa=tc1X3fC`t?0Vf~Tj<0I5|RIT9eIE^`bko2oyC{C=9-nb~jbZul9nn;XE3?4igWv0}XUW zF>J+qc&3j?Aqf0UZ_OyIFH}=^d?b^-`hJg=Kb=V2CGA7h5ZG&Nm+J4nmN4f8mK;b0 zjVn0m7+&}ZTjj?Xnxm4-s!MPEk%vHj4(tegf3Sjs+96iE^+Mk@;~~BP#OZ)NrScN` z%y?HiEgFMDvG!H0_!5|eKkE7ux}H&D9+WN_T<_8~lU%*Zy}BYi1PpD)YniG_&z@2!x ztI{GnitXXLLTSGFrUBuPb;YrNLfl)*4ToCrr2yi?X)C9Qyg5m-ZDrZRcXXrutO0ntGRzxoyLJyRF)R*OP`e;qHLo(o{dT) z2!Hx57eLO7qv!U==`{!+3AoxQDdrqH8f!+jqT<&pSW@0{zHrz65{dKM(ASK0T-?Uc zy|N@PHR7*oCJk0a7`7s_{Eq1?^-mm*s{s6#p#mXHUH5rOPgRwzu(TPQ}EF|(kBW>H*f~9vrnYmYEMqjvjUO{m*?=rJZ99|(-4f*8mSv_D~(Uf zm*3R3?vbT7Phmijg4q_3KBAYZd6|T_Ut%aJ#elUt$HejwL~ZITEI!#j6r(M{m%D(} z^*FY~&eDCZWS5hH%0g7}53)rH68-tihpXu6QaRnV3W<`=^D42e-FK9ppr!4?kJRn_ zru=my>hZ(a zI|6&pTK_qNonL}87VBQ+{)vf3*Qyp|7$g2in>Y|3&TI)+b}x1~$WLs5LA$9Bq}0DI z91Yt>>M?vO#6Bu&;_06vL)44dd6WA;5e>jROl+C9+WnFLCavFf&)ey^PJYV?c4-^4tWZw=ahx1_IKJFqP!lG-$AWLP$0S$z%UCTH3XZnpRu@MAPd|0ssky9K z5An?lR675@bgUy5(|WB;^5fx)Az(n3`u3!@f^tyu*@r9r7I*E^m_u`;ZM?Epq)oJn z6Cq^dTC%k^_e{<6#*8;_IIB=-@bDT*YXOlT;nos|dzS!duSSdb?evd%cPWK`xLQHF zvww}fNP(eX<$Ak$B?z(Nx4-lqFPFCgS)lZdTsg7hR=T==`SX*D0wQO%O<$Kj+vgNd z%y%0rI#BZYZh*atsbd>&RIo@Td&9U=g>UBMh{@efApzZHfVIQy_!1sJANLa!<^Qg; zm39oCe7kWC9?^Vx47cO2hl=tL1CfwAtUaGfJk?flS`{JktohEA;e$*n->w*K1HMYL zRB^19cB&T9Gutq}o+EJjm>dI#?Xy|D-=L;)@o<^MO|>!*I!IYflXX@;bMd>u#BYNa z4~z5r5@9jzE|=%xTMqTMWDi%HV|O@Du*8LL_J zns#MGN&r=1v<`=t?%tVwS$UlFdZ5so8~yvDQ$a+gNdLR(EdEY0O&+`I&du zJ`%4E#6M&Q6q?0$k@wzV^G_YzlGtGPFhLy!6U$O|ciH1NX*mq`B zHBpH!`*O_Jzt8C&Y3p4m_lSo>FV_lP%F>Ry+r1J<7p?;(i=bReebFD5w zL57pYD$1xkHIA=7l_`*qH=z< zTG>YA^In72Mldy8z>m9s{`SZUa5D&hTY=};?SkUozX)ljBpv@7=ubNO`qFYotCraU zxIWgUcg7e5T!_2@oYCS*V!|NxRez9_+~*FIla}SD1qpIET^SD5ab7>q*f>&$+dW^` z)l{H!(m|SD#7W{~JiN+IlIQ%oWGmRFB+qq3spZ?xF@iRO!_x6Gm1PO`NT754j!I%c z16twoQj~fvRj{MgI40+ZtHj4t>HByFo9?JDS9}cm>wKhu&WY>*rPyUS9%lolz4gVU z{{ph<85gC3geH*rneN$_O%^7n#7+Hvvx)q_!-~e+n4;+=%1P+~Eu8Iz@#hXD3ae~D z!?&f>Z*WQjxiQ_fmnz?0Mkc>3AABH&Cf402Wk7?fFzpl72;nGojIQ{L87qADnzJBD zZO#gwnEPn2lFVa)72ilSO$2~D9@796{3e72-A6W+Ck-&jZrLGGgB};rfy;2kJXN$R z@nK%*Rk3{xePOI#i*kJ>Dk<&yKCU1kuVN_L)e%}5*k>~RW9Np+S(0I`c;Y3AF{@{E z6FW144jeh!a57KoHti2`Z^gc*+mYlRJG<{22gkxKd}rOvXHnFqx0vg@;iqh3 z69d!>KhKjC`tIRRhvw2l*VEUqOp+8N3oV3l4b4tyBZ$VFzDO0pX1b2!12%;|}OC#%$)u z5K|Mw&ws~5lL7qXqq~`aTPP#QSpA9yy2l9bo!a0te7LxT19c z_Sx9}N;DcTs{LYL-x)ac&S@%KBd|ziheCW1ZNFG%dF>7c9la>GrIP&K`;sv5)te!; zv8+%gDOL~z4v9T!-m}x!`h7pT()SJIy7N5Mw?m}P*>LWX(eR?_o5k#O1rH@s9`SZ} zz@^9Sr6Mtl7eHr{2!3ySxKR^r2>Wbfp3c8#xJ`yloAc>cE~(tCb*8m;Y3i8v@NNwP z#c3QG5Tw#1Ss$#pE^@OEU~HcWwOp#hBjvdin=5{rr+#_`f&_AM9%X__+LfBocgD+#PmN z@j`h-xT3x`m1bG!nZb#jC}<}TH|Iw1%D6#bz_CTj$E6FJp}H*=Vn)nT?p{scL!-x-dCm8?fH8nRSm8Y87u*#0QPK9f)^8OC+u0Tc>X1``&;(`8~6LOAx2JMFyE6o3Hj}R+@B;r>? z;3uZIe3&2v_$XRPAiJ0P{ct6t;rUy9^-Uk{E6u&PB-zl*gHIbGSq8?OLe2w|r36YG)yeZUr`#B;x6h?*_g< zFtQqzT7e^X`j@)vgnvhCK83;*@HnDC(Lw$x<(A>WgE53y`khCqwrtmb#i{Fij)jzO zSOoC$FI1bp@`oFsRs_Wr9Q9yMhF9!SKn^CuKIao~ol!PE_;ox=#&$9Rkwpzimlp;S ziDXxYymISLvgc$P-^k-`7aTL`uGPNM7q@Qg2x6|ZZq_LU;RIdg&Q4zbsRwKZQyYh{ z283nj4s(B^fYbWl(rKPvd(ulG1fcD{ZMquAy2_>c`;n83{T1U_HLuVVm;Wo5iINu$ zBdb4PI*9mtYQMsl50Rj{q}cVMcemd;+ff!ec~xyU$YqYUFytxQ!`FQ|IHox?s{FfV zVoBgD!1S&Q7VZA3nqGSOz5hwK1eWh>+L}xA)g%jgQ3UuY6UF0V0Qf1#hax(5|L%IH zrSejx_%&~gHg`q(p7Xk*B<$G{=ms?>2faNjM_-UXCOvi%@f+pTFA;CoSzgKpQfWSW zQ=+L0PLaf^wa_-m_QB`o85bj8_1kX$$z!_y3obZ0-dA4MYZ0O>@$xUAY^~Lt1lJ#&tp_wWI!%i60NI+675!F`|(l=Xo zx!Ns;3+lLOqcZNCm3Br~G%!tQ{~D=>yaR>_px`%6Mzj!UF9vxhMHK@C)n~I;QbVWn>7H@V)L0m9xnLKWOTj{w9bG%$1HRV!5O+LlSu{&vGgTL& z?pa0*&5(JI&VTC{TW63+x&30zL7V)Q7hs$q9PX!eD44q>SnEiZF_885I9SmP`w|A; zkQSoU6op^)o0_C9nqM)WF@VAt!&0IDeULZNk?Ts=0{%V+gUp$ozn{`B=BisP zivX6!o~hx-MpiKBJ`9=qBPk35!#ZAR`8d9o1Z;+AW1gZ zBD}eLO=#H)A_ze>{MaCUS-y-p$7b}n_F+p{d{-&;IGSs?iO=bz2O;`2UsX?dG;r4D z&*j)8+K!!glDN`H&=mFR>5Db~xCo%xu5tMFsnL5EsTYvnz%JNeD?Z2`v$?z9;XhpR zw0t?*h?@(RB-wS9OW*>Q?rvWS^7B?OZzlaJ`4Rj4IOEQJl!Pv~dFuvo zO6*cdzP|o;r7`qLEp=#3wDp;}k#(N%6$!F{asW$uU6LgwWw@tBGQzxO-z_=jq2+7h zN?bhMBIu}r4A#41QBerC!CI`9P(9@*r91u2ki_kg2ml`@}?|%*;d?68oiA?tmiW8RW-)$ikP2E2H}G(V(m5 zdD$%V$BPw25o9mgs2%x`D)tCwST@~~{??~($_X3a<#}Jc@&BUE`T$fOq`yBdyS%m` zgqd+sVd&%w@6>lE&yBxUd!{B!GLFG*{H2>WVz6ZmSBqo14MMaM z&-#v72@qB6U>*hYU^1K}+985G z+gxlv1anB#!2Jrjb+DqbD{FO2(vE&yw|__Hx;mu8vM1u`H(A1_DH{S0J`rmkK+O-3 zxy5{SC7akAV0G*2%?`+a+L6Qu(={NS&Pj)9c*j{jgrj}AedkLIsQ#`@eYsjN)7dp5 zb}`>E-Ic{1x6#$iv}Tkt*-Z3}-z)BaK=d;O zV+_HxXmr59p4K@*$}-;WKKLP?8H5Q3=j`r*ABqTZWLRZK*Z!Tt|9mzhRw#7Paob@t zf)z&hjw+t7JZ{Ld9M}Ex<7KUkP5CW>H(DoO7$b`d6))`VY#Go|hD|)CT}UFg2+W{I zV8UQwK3?OOZe0m4;>HV@{l;?|74~DMMz1CShlN@oTACHgUDRop*ONX7`Czx&`TZ4E z4t#U17|%PIWAinqOXWUSp0R3c141E}_%;9&#~RXo^R4X7ddFlz$6F~*_Rmf%hZ1C9 z?1@sOVmBAnjAdWZg%(1ckrfVc9Vh4XC6O+$IlLq>wvdN0fA>DfTvkKK?E_h2k>AN& zp67QN@b4Q()W0jvS#Z*MjHG{w>e{KmYdyd8Z$gmRi%&E0g8@s$@d`O?lek53OiskD zCNlxs_Gs5}k>pFAT_~`jkLK2v-+??&+O54UX1V*~ub1ZdDJ_8orD6J)pI_#s`ctn< zLrXPj*!NJnSh5yp${+@=?%YSjkVq*wE+H zA)?kdx@W84$cacbX{z|QZDP%4s0fwE;=pkQC>@WY6vT!Aj>=F5kOrzQq9E`(E6tT8 z(&`q)qTtZyl9~AyS*}-tCn$3U3*BehA)#m zxz%x}7#SOhGlGZ5UI$y|mS{e(3z6$uYLU`w73gZo{=z{&Q#~6Cas(Yn+R6LN6T~WQ zcG0pg;_Z5%f`1BZ4Vawj$URTQ4)g!Mdlh}pFCn`7@okRVT4x72P^78xLKj@w{viRl zD!!eq5#FpQ>XaLjU^)HS-;68eu%9-A;PXrHc^nJz8@UPhxy;@M@fB7ll%kW zsV+O*&0QF`i~r(w)#X0|dEDN4R>0;yF|`qpnPXoX_*WRZo5AOf+FVwi6Mre{0}|Fc zQWcUmKO4YL<-D%`L(L`-aY8Asr$=vyMI$!bLZTw582I1XX_ir;n$|zpe zc>{Rt;n)yNIpTqo_;lxABy|@j^|W1(6aqCc~#0Sp+uDgXJtBxXRh z#EYRIopquGZIXrbRSaqBYNxA@Gk;^0oa|Z61{Wzjk;Lq;4?#x|b_@MRM-yQ1PpYbG zu&CA|rIyxJcZhGXZ!Vwb@Ty@_4zOq$Ia^0i! zO`a(V?<=j~HvNI+T-WWc;s%fV|b1)ybz;`Ic95ByHZGh+n92zSB2 z(?}E%KmZFOXuu?7AA&7q_MMB4rjeUNXX`l!;L1xJ{ks-eW9;wRW~(zoxh-L(YrV&v z%_cxY^2C-3e^$v)`sez=w8G+%nqFU@?oJ$|IuH&wL2R02h=Y|$udPjtK_^egl1zZt z&@e$bUB>U@Gyt)WP7#9Ub45@HB*2^NZhF0#Px-*DEY6gxfE^f)^IbWfb!b&Lnw<6{ ziPqE@i$?Ym*6j@24SATmAo%Cj6ANU^{ja4D1r;5nfa7ZaC9N?!;62=zeE_fQ@s?hQ z@M({YLI1JH@7GA0a{RCWz~^7prd@8)(@7$#zF%M8kijZMD=sl_ummwDoL7h>q4GYi zdGKeDbH9TXk`DNC-;vFSz-=Q?YoCyehI;a!1+-gR_BV({`4cNSzEtp&OT(XK+IKQ7 zLbmLlcZ8v5_#$sBPGb|_h&MRrP5 zVEKV@KGhc9Z$Vm`4$85W$MXA|js@4#2;mz9>p+qIPVQy8ii@NZt#%wNnR<-jQ_az@DeWe(_ZHawG7g4dCLu-;Al3Rf=XUf#x%wz=(Tj$^(R85Je<-O zh_O+{il71>OaNDGj<-4zGXSKU@ljO@HPxk_BCYl12S)Ij;aT2r99i%#>ARX1v=gpt z@}2fmt)tj)9uQKFjsj02;6W>`yR%j`K@1Wv>kRz#1s?u%7}fER{M~Q$37t@xq;>vz z+)d-Q8ey#l65x9}nHYJra?Mykzb0gK^J*|FmFJ8DIuN|IR+D^5faWt#;2qP(g)jf0 zGA29stI*0g83m=UO2NR0_ENT7k?4;NNQm{rYSrd-hwb1mbPrq0{l&BRg0xKzu|I#Z z_Z3ddGv{6ZJ9UeAo7?xp6`nR{4^$$iQmt&hI+`kWuY#ea7oo}=2kC!;niokmNsnYp zKsWd10>_<%OCD-Gyi?v=T?rrdt>DLv(;|u~c08;^sNWn} z9vZ4u<%y~o*_Ml|d_Nn@g@zJ><9-csT!ZDe6CP9OHwx~xZKt@&!Ny3IzZe*=He zysGbO|4&8i9H_h}=K89T^s}1CL+^MYLVNX&i|#|a%MC|?*~2W4M6_fnr_z%_5y;cg zO6=mz5<$!n-fl6H54i!hjA|Fl+Ku{!m{@J0+Rz7+ z>;}D49xL;%5)kl{nvFN20@_RH(YMn=VoJzvCb8wdt+lp6cfw)L38B!Kf3Bq!z1&8=m^f+Wb4_W zlO;F9s=X$8Yltg-a_BApPsNnP{37@BGwH^%Ly4Fw5mxCjzAe zhZao#tbCjneK#POg~N}*mD)c5UUQm^*y&I+oLxEa{11sQK7siSb`t<)S@UMfr57}@ ztwN34B>l|s4aRjUv@e#gsBHLHP*~)a59)P)E^w{x-!9*_&?m>B%)=_u6jsCAgQ~e> zAcj*t%H98B)nr8z{oIP{+&IwV%f?CxIaKtz*&wzJxaaCEyFHk+c8JkQmZ}=r=q5iP%T+(an?cn+KmG`dj==>1>lCbuLQKt%4T&R#zaa zhLtOoTY21Mn8H)j^}x_vxJ0mpR1_B*@b!PQ1dNgYZcs!6Tg)RS=nHCVhxd?3UE+F= zFt-@N@j1L|}nCd-DwGv5l$dxDq~yj^dk zK!b11-sZgH%Nzt3%*!XKorv`qGwq^vpPhg_G02caSd%p;dV_)^L2yXRf&1-S)28p zgLQ(Z%5i>>G07^ZJDA5cp#o$1@-${Wg83w)>ID=6H;RdE(Q950!MgROj#VyR^!;ap ztpUE;cwD(Rq-!6)>4FH8fANyXyj{*W9`-xw*tkcko?UJ^{7IBJ8}-EitI#^%;1>D* zeARLKeT_e0huBxS(0z{y&D-AaQdOGVF4h_mW4A$B@if(hRC^cG#cXS+u2&ydT8n2XV3@1jU1R6k<5p7goMiy?+6EK@sLDo7@Oq$> zOIwrgEB6Onxgs4?a%JEDm~~1YOcoU^YK4w%@t&IUSD!rIv?7vwyB+SNR(eN!dOq!8 zo@0*RM&9E+X_B1Yd^b7 z$wnlU1YQxLNQv6~VaQnrDEA2x@`pL=GTNfR>(-=_6PSP{~LTAV8j7s`pacxG?0{;cG-~G z56gjAM2nYj{~4%)*&P8=A!ms#+i#bV8HL^+dn4!(y07so!n?fQd$2rC@#d>RUO||U zM9H}$yQyZsac~5))EAMn7Gq3*JbzSbLWfF-OzG=Zg(f+16 zOM-GCU5Tt;yZ=+eXu5H}Gh1VW4NeJ`m`1QcMZhj>`+l_jk9v&|t0?+ZiX^p(%rBr|1pD#Uvof^FAzL(}>vFIjzJZL3-5DlL~a;)rSq{ zW9orZlAFk!tz}uNcPCKXDNvwTC=^m$in~i`vEc5(HCT|`eBXQD zKj7|f*=J{-?C#9$IdeYJu|TceU{}xt1D#Mvebhl{DDr!8M6;jo(wj?&|H|t;YwCst z3$zg7t{r*#ex0I3*0J2Mypw&qkN<2zYWzb4TNpO^;Ny*nQAuJNYQqU;JUlMBVUXg@ zqa5w(l`GqeHf*Q^WPSz)ZCM_NAnpv~sYIQtCODyawl!D#p_?*=H?3ZL;&PgF zbaapraZ-2Q(IXibZQk!o;YxyZlP_L>>O-5&BHpfaw2g3YMx_>##5eN0P(UWB&^OUw zg;x0Yv2^&2yfKWdXCtoyGVcJ!7;xCLL5=Zh8c;XfEnS|X63u+Xkx+t5?j z)fw9delvw1X~4S-ah?B=t%)Lg|CO+b%n|9ufz=jdL-7hy`C=!oquCRw)VtHFc9K) z@QgxtK0{r6h({EIaBud1EThmr(K9w;A_sM!d3%sAEI)fKB1vDepo*jY2{=5LH6Km@ z)to%6CTAij9ZUdlQe%f*>c^Oj&)^^DXI~vEj~SVH7(;90iDF z4E97%;!X|1H(TR!xIn`hnh`HMFsQ_>i{VaUA`?~NCCq~7 zGd7C5L-G-Rp6nQ^k5AUU4BG7x))-QC?8tlZ=f7{?h_nFyDWdVb^FG$Jo2lWz3f z{lj@t|Kq0ZQz_|Fh6;;G%&*8d0N@7*QF1@QD{8b$&MA*jb?&a$#h~@e9G~2RyLKis zK@VG(vKnM%QQ@5v7uD+tS7ZHv_anR7N%!S%QjcDKvp5Ky(q^B!&$Q~I4sP7^M`X!- zc+AxTta?7sWXbRX@w@vuG!SN;f!8}of{swD-M<{Q`%;H{dp52Rp(V{RO9fstco|y9 zW9FtRZ`;*-yPr&M@QvJ1_g$7C*h?tmt9!SkB4hn7+Kf5xP|Q9H)#pzovo3(3rp;j3 zY|ZoWYE96sVe;{!peK^rI7MX{T$kw47a#G0j*P*>^LX-yLVS=-eA4T9;0rp!Za$kI zwU5#}1B%zxx}$vLHR|2|&-YLtno`?pmaCtq-lkjN{H4;8yt-6;CPC^0`rGV(yB&mD zX03-!IIj(}uwZQvpDTX0=8EUFH?AK;ZDvIQ-Mp-UpYW7&rCoSBDl7f19cDGMe9elZ zeqs1&ir2?Ko9Ul1VMy}ONR(~cXlV18yp!<1+ZFJE6&##iIoL4=8=&fJP$P&lClW*N zIxaNUJ^t*g7$#EE{WRN0M63~O!9r@}?3-#ZihrNInb-f_;7?k}YoTT)bLXR)6m$;J z(SAMyp6?9IM~vNHuPe{2$^05Q-Qd#rxrk|mWTcrFO^JlwI= zq7mf8l)e4?3OZXi-Y!=iYxejwrONkEW;HPY>t6An*jxvEs7u_c(-HCjBoat3;cl-V ze$&M;PBBwaNE-&8bJPwiIn2sKi2g>SRHEC?Db8a{S$1Ec;|4Ks!w58;=@2&(_Y=3X z-LwsB&xXCd2V2GR^-}Ie`A)V)oS!B|7#Z9RX5UGgsk$p}W+?A@(l-%SkTvslMU;r6 zhZYnbUBL@hRhrg4Y_}q=C$G)^{L?)-!|7>Pr)N6NPZOWXRKPJ0{J_7&@e*Q=CH=m- zX6p6b}dk$D$9?Wo!);NjgU$O~%p zdtZ?7-|=|bBg=Ehn>55(R2xVZe1Se(?skRF6z&kF8`NP#mikd7-Rf}j6FQBD{!Kn5 zP*WazwfEzA&;H2m?CKFFM~ewv^*6FUWQZ#)?5QzRN*Rp$Yy3W=v`T{HBn;B-1xIsV z^6ALm|B!v=+B9or=+R*xc4Z9Oc52oMg=a=U&dMe2$lO^CR*KIX2VNic=l2-Tf9yU?T3G_FaTEX&BQy=RfsAh@_>9Fo7ylU6P;<$U zK_;b04h^3bvB$x7cqT?Y+>)7Q_E9^07O7_UF+m|8Px51S{6dMmpxIul(T-=u8!PZw zB`*W@jUqK9l4voa3{2=t4-OG$G9P_{0-Fu67kgj+3v*2${9Wu;(=JGJ5cFey$x5!Y(GX`t^qwb%^zB|1H5Su#N1G@gP_m|IBBN$Rrb)cMjMy;|k?< z)ALR|(VfXYmgNGp5pp3$OBgFA9%X*tf`eP2KUlaOPSkvK%L3)?$j+CKhM&Q*Qou(Z z-DS#i{d;F8RtEFMMj4Cp+_1Qcp>7-RU>FyPxWxyZAz=Y6(=U+wuZB3DP~A5mUGQuv zEP+^^mw22Nkq%D>25RTeyM#cMz|a*H`H3GN&{X8}oHU-*Z^#e)FR7|-8U`t|Wg;;* z82t!je0mtTrwPpb?&InDzVf|lH@uYfAwu_<4=#1|^Z$%Q%nIp4k$kS9Ith;$@}%ND z{rm}PK@ZT=A82-_Ul6xa_ZedG zTCjwp9ye7p7p0S>r;F&WPG1Fh+)tI*&GH%2b0&54GK+ZntD|C=vPr*&3mNf*z*C>9 zz)f5rnqmigX=IfgFP>`5)#x#|9jPIw3_bK7( zRs(&GE8Fn}iaPZ=0@u}iv_Wez5L%Ru{o*#bVGx5Ac7hN(OL4KRnO{}6#NdTj%ZIL=eD}RQm?pMSR|!2-O~ws@`-ZTk|1B+1CoebdR(d621ei8S(*=XKNHxF1E39r zI-LjMqZ3lzw($AGDJQb?)>n)6Xn#-6KMuc{UP?bKN=phWz@21AYO!@*WlS-39Zg>V z>+C9nQ8bUN-jOnM-YtdS=*Cfo1+8doT-|G^jOVm`o&_cmPPom*RA^;&MNh3O65}q7 zf8Y6=!_PL7Hs^d*h38`#uYA)3a(x*7hLFY6LK@P#RA=9Os+q;1Hm?=Fn{tnId=sOS z-tBL@Zx!K>dlOoCBu|h37JI4p<=-$$ZLzy^B4=HFOsBL8D(foF2xGlE9ux|j1w!>SQ+OCa>sAW>6HW?wj(O@C%3Mj2M z45>Y^+ie&89?>5P59zkJ^a|8Ox9Aa{{`<4RPA7G|$UnH}=-cB7IFx4;bd_0PC=z5< zV@P+=Kw)P<8y+@=Ki|b56la!=0Z`tf4q0@k&0PR@zpIe1Cw-IaQ64=cF+xOXjWt(k z5@3Ee@AzpRPn!cfs$G0MDJgJv@dUvFfr#c%&>M*vF6FIOAxTd57~7TN#}Y*)5d_@r zMacOuAHv&Avymrp<7ELK*}Y|WeoA4=zT1RvEMV+IgHC_i!UAh|)^e}>f36d@ zh|nHdH{gxa@{B(edwqC1jS;Ex*N>GVX_%^fK|{i$iCZ6;A^QS^J^5S1V-`V&#LFVO z5Yu9hPBx5likrtyCXZ5alsJN>$?rJ|ye1TYmtQAhbTytQw6qbPX7`BZZ%rn|kVpF0 zi~6h__Ys{*ARDG{4stBR{i%TM>=QqHSFP!D$Dk@HpycI ztWZwrl+dnKQFV9~Ks)p%1yFrwf8Eo7+rpMZys&yi{&-<4+#|^l8y!R{N(Us!Fxlea<0AXtxnl zq3gXccB9Kicn^WzSF;U`&8!0qNbF3&hRG}x6EWGP)DPG)f0<9jp7iAX1(9j}4u7o0$WV$C*{cp5}ZwuEK+ZT(GCpNrcXcsddj zPB#X!QOCKUGXb|>N13{T2+OCP@+;V3IimwvAvXH0fz~QIwhP*fNgIrnkydkJg>X{G zsl*FzlL-!_oWJA;y1owdtf>@q#Ya_EDs+EO}q z$3GqsBvNkA&whhO0-UfbW4-JjKSTffMenM$2LSNDX zzbD?-BA!H*b@)O*&SpMqg%zAWn~*!=tEbGUpsaDz>iB5VZJOyyDl?lnS{T+Wg&DeE zlyC8Lht9>zKCH}LFg?vRUeBYk;wQ;9)VyGlS05|473R*;LW#3%ei&9(c?O9Qg#2EQ zxY|mEWgv#Eysq-n1@QY?i)binRp83htqReB#Al)b&QK)#)WUt@hfY-FJ+$Lzw(WZK zl+FYPOR*`xO5|;7N7Qnf^rgXkz;XBiSp0kqN3XzxLD+67W$B&0RSV5zZav%;aRh#| zds2PgNe*WB2pYY{I)L8*by=GcQyB^h_~72LBRwb;pv49m_-r?fv-myH^R%b=)h60A zFE-rYN8Wgyg}(7Q>%3i~k9l6%X5pZat-svbf^g+L>PeCQlc73%)U1X5{lli3-D8&ur?ZtR!x6Ib>51YoCwpFL~0c8mw%A8sj%{KKNAZ$ zUO#T}pH-1*{4^*DwC<1R(cK+IUz(>X?jgYHEeS4jL4z>>r8aJ5kPA6$=<4bG<9+}e zNQWWmO8Y35bDE6D{kxrZp%Hlg`_aSmq5VHnrthzx9d?oF-TgIyu}jtnWWUFFtR~A* zTp&@qY><_x*O1Jfog6+Xzh#l#47(UYkCkxYWtCY%Q%E=(2bjMOw2Co}FEQn9l zwdbbvo6C9f5TpA20Ug)DgF`*x#o<2-w}_;TM{tQrumj=9@45wutITY%_kpqSxz#AjsI7+ER`B}_utH(YOA8zcW(&63Yq+ot z0-oelYWcXSZy35i7Q^la?-?JhQTi5GsQSL461QiB{+4{Jhiduu+TK>_kx4Ch7-1t| z+fGQPFhhaJ6eD;77c*&z!|x_ZaC@|i&lVgH4(ZX_R^1GrNM%I@o)qlYyzbn-7-)Q? ziCeC_%=RBH@{00ZK(7EOkC5P2j7X}kZ3vA*{pX`Hs~RQ&Vg_)#_m3X;ISmhz8=jx3 z_7s{CV}741Bsn)E=21|%oz)cO4R{(wAMmL8v09@Pf?s@iR3L9P>#--I54<;J5S`IG?RRka~}_!obvD2q4@nrYf_JGM{S2bnP+=Ggu`w0`bb1wZ*o97OIKxu>#4TBEEEZpQ{g*in zUne^8kNx%D`hsv!_6%QvWExg zZaKe?e8zOd>*lX2xa!6!m7Vw#XiltO$lL!qHbUlI07{!jvCQFR2M5ps&}*3{KTr6T zrL^}B{@J3jbBaU~jx2VCnrmcQmV3usul=^#^CeK_50H_e^+hgB813n&oBl=K#t(w#VzgapbxkF z1PcAaBOg)Zf5}nGc|!tK)F;Q+Z}q2G3Y4NB(kXHzP)^tq3u7;iz|0BnT1JGLR#hQj z8Dm;(K}C+WKu`GD7kxsd1dJHFiw5f@G1tV~SCnYkVbNC-eEAvR{K~k~i0$2lkbLjI z9w5|wm1T^5sWC7{o|pAK);qYF6!v)?(gZ2EIdZD2QonMUX#(?cXasYximTvts7qhh z+4SrdC}OlVO2%8@Wyx1PQHVs7QGEb?oo`C zfs-iCWL%tgR;jAZ-gi9xIdEglVQjrK5&WtLtJMGNe zXp_oX+1WRuMJ-wn10@Q=b@1W}4(A09xl+leb@k6Y|K(eWR9>-;m|YLU=>1)b?&Lhj zEGcK>@iWXWIes)-yKSo>(M2FqTU?1Z6anN>S}3DtV$Hbcfm03WHagj%JuhC%2Q$&* zgZ2d-G?5;YNCnt5L01HjuEILjVwDZX_ZbxT@)ob<>3pZT>#!?sIbsH_XEEe<>|3|3 z_HPzD-JkfV_TR3y7P=t2e?aZ1Ge3^-QA{OBr@mbNN(Ot~wjIb&ea3P|m&>}#uo0K} zAgzfFBJboigY9|l*CAfur%vv>Hv9tRUe3SG}lC=MK1rs+f!ET{v_@sf-k1^=@isQ)n%5pCbZ zsZxV*7y(-q(#krBn%1lHpttHU&R2yj&D0P^c>dvGJ3ai4f-8 zvuh29sj~yfHr~4|_)wSFx-=ZpPePW(KygKc;UegGw_aglUH-k}s-Evou%gw^TlaD} zo}jU{mIs2ej=2V>Qp43ElN))O_9nS((ngETF%>m%#QLAKhiHf3$e;N`;-oU!wmOe2 zL*aE1F4p17H7q}ge@Ciq42WJ7Eyo{1(%3^6OD4g!C@VG%D9J1iA0>>!XtF&XEJNT$ zYQw1ozGmKj#drG#7ff7Sp06*m=JN%4rA);*j3mI7$v)m#(@?#Z5+0?eTk|P;%#sAnd1Cm-ojOvZ*cp2yuufV_W{nZoNZL% zVV~=;L(TVr%rq2A*Me_#ynaO1EI+Iz*2S~{^aB30C($PnaBt_Noam-OIoLVCvK>dN z7fw{S)o^LMvPM#2frOt`#iUwqsBR)t=xI7?my7wBN|G~PPHgr??VRDRl68;iuga@g zhWz|ZR}{MVc0ff-8+$kat9%*J8C4BNG?IY`-+73N6aOWX4tM2wp0@`8U;I_okHXv* zswaoA4<7uQ`5sU2o4p0^3>U%IX!;s=x`C00idm)l8OgKC_p`kVs}25aizJ#bNkj9z zLKPn5bG`_?k&rM6WjNoM$=L#t=O&!dhqT>6AwdbkkT)cSpj2tnyQ2NQzMjjw=|HP6 z-LS9t8l^8MRex+onX@yd$`n>OeZw!(REe7I`>or+NnE8BUMqdgxbi4BYF=om{OW{r z6GZtb``4N;_f+tZ2mE4pKTp$7*;jFKb$x0F23rjRD~Gynuf`x=e4b5P*lDn34IM6+ zQG;A)Rl}_Z2(*o&s8ud0=N3P6Ib(IKEx)xf%?-Mhf$pjLLyO}Ob+e_w*mQgn5bF? z|BaY>WE~O$ex@(}GMt?F2xVTagD45b&c9T}FYP`2%g~ZE6jv6L#o(|hWAux`)e_9` z+eonRiVvvqB-in%Y?XqGu$5Bl=NWo`ZqQo$8*?$H*^>ut((;2|a( z%b0q14e0`d!OzDl?J2=L(XY4$*uh_Mxjgh$_gV+|XmU{w9kG4eLosqt`P7##l}Kf? zZ2{~DU@6Zu*_+sezBMNASdCV9Tzne3_864!*V~cT@&71TDw?wPc8k_ofR#O~B;RYz zSTLonegZY{W2rtJBVpbzI=|9!4Bt0WzmhuU(EOnd|2(#J{&l048%4Y+Px^Ml5{|+w zX>CoZKYr03gZTJG+dEeAG_<6jB1O~a*>LL$>FAMog|z=6F+ZumDU1qu_0Drj{JE{p zJ^>W}aFR7Fi2;|R3;#Ej%A9anH=}DJA7f0nzE`7QX3O9;w%%hvA_4RZy-)k5` z=c}v{WlXws_b!dKCT@O^eV*Bwsc~tu->P_#DN-VH_JRcqmn>bXI*z?dT$`+Weu^;& zrh@pJSUW5^#n`WUnVioq5}50a&Rh^mAJdW{NO^(JNG0sZKtGJ62Oq5yUUuUpDjL|# zUbiZp2XYx>K7dORA*o`5)Eqig8GLBo4(LNdop}02%*d@g#(a@u-zoXIO|oFDmmYv8 zsh-o-c2FE)kBZI2`3J3pw5~IzmcuNwhA^!#80*91j^iNJ7XICQip=~nj=P)rI&rYz ziVoN2ihF=`E%@wU_X#b)j;<=OhK%nWU0C2%Umh}5klb%Zr1TE_7Ead} zRp!w?N#-^2v~|gD>O-@ZATHf#5%Ws+qdBo9Gid=(_D?-vO$sCkqhDg)3J<+tqRr3F zzH7e|?lDz+jE|Yri&P#jMPWGyfh4M00^k{2K6NB_2Vd}<|ctggeX zL8FBbF5qDYGG+j%Z2jiS$!4!1)Y`j~;TjsT^#v^VU*wxn#n$v0 z_@KYqC$UicDx(yLO`K=X>{B$UK(SPaU};uQe|j@&FjJ)Y`hkOm!r`wnvi=BTO-ISQ zC3lq$n4Mg1r|Qb3uw3X1iv?@=CSnE}`0n|As}r|#QLM6#P-?nvGjX;6;E)TPp3eEa zFVYjG{$>9XO+%lC;(Bm*{m?J2eM@cqCq^CD#q*E~O)z>9 z{u!dNi;O07EW6hyI>zKCUNGboJQqIzn4U+t&iEK{w2a>okluVry!$DkGgkyD>R>g_ zK~h6hR2EJkz*vn*8d%Yt(iWDNFkqYwDZuh0e_Kc=2ZU&hQH;TCos~<@WAPcIV zXJw)w-ib!(`N@-+@wgAaZRxj6E*lPCX~NF9E|=5o=;dL?v`z_A%Ib>Zub z5}R0?6ug#rlwFV{m$_)4cG2k=!XPM=dOGUe$oH#yHRf+W5_21G| zGDYo}xW_rKx`1QSF*0NyDI@vU<8Y74vAAJ=I#qessBrO7 z^UP5aPR<4Ph$tPgJ`!%YC8Aig@VW(W)1BeVw#uo;r;z(wGot(?N|XYV0cbmwTzVv-U zX5N?3$EvzB5izvPbu9|BNJE~X@(S?~< zumy%xi7{`+C_m2l!;_!LSb%j$BRf3vQbxe$n%CU;%@k=K;x#{@*>?)`W7gvUBMI#> zM&H_hMn&aV46S%|S_|9cbzFmv)8J=^v~H}Dx*6iGrQvxBd{rdk5HsgkA*-g#*4g=x z<0VQL-&|5Pi(UAE{dQ1O%D{x9%;R$qhwG!mM1XrRWh5o$sHIpl>Ukh#?s09ZFcBp# z5pN7fFEmXy7lksqmXDhVNMv=)W&54peEIAIW7MsZN}#CTp5$ZdO}GUQW5V4~$i?lJAEV4=RI`*(*9aAZ zPPKTB|J(ctHX*O$1t`-JS*PuJeFTw6)Pep&c#8t}XN~80(;S|ZPc99^VpFcB4R8#v zOnv&-C6+9F_k(aG;R;{sYS$1gtET10BmRWuI+;F1(k3D_=-Tgxm>AIn+GNrBbmrYx zE`qvL+X$t89CurB;c=a`2^W+Gt7)bFt)5K2$mvBEF+N-{v{16cUyy&9eWUHD`r-4w z*$MCVs5uLmcNOCok#QUDLbKcYnbhS73kaV=hqtJ4sHZaJO<5%kk1}v0ackO5GGK7d zFkdK8ZQTof%E4h$S+3$;?Muz062*QwaXftkJy|0jwyHVf>bU`??P9#96{}E+O=G+N%gf|{U-~wUxeFd!`wZ)EUy9SAz>GEP zu}9QA?DFz4KDg!;8@{W4gXdNz0f|qHvt-(1-7X_v<0kcS>0`yyMHYA8l7N zFTRcizSp=Cv|#hRO3)uT-L~7G$#>d*PqG znR3CDEC4v+rHLFiN&5hcD?U^rni>b$z)9pzA~p1#R{usua;|L#qdM(| zZ;}3qu>1>X?1YT0uqV`3pwn%5U?4T(Vzq& zCqM#_=nshzb4EJ8yFVogeq>?EPrksWofO6sW5q*-FqZ9e6C76f3Rc*^a6W2F)&-jv z8Tc&0AWS{qr4VnyLK^;V`?u$augLh3N#!ZXgQ1pON#6m7Pjgy@%ECt_nf^X_1@q2O zci05&xAOGPwo~-QCQ{8gfd5&i-pWPud86&)RqJ*!hmyVi(Xh(AnV?L)l6NKSz-R|z z!!l^#O&@Q@kJAenlA4AN-SQL&R3a7|a4?G~o45HESc*NF6rifAfcM_1`aBi`*xQ>ssVey#RuE(;(DJ{ zJbj?yAT#7$xwP}J5Wy2LTx5@)JSMPhXzIXVuMWOa)bkU6Q+t@_YwiFi@tvf{5p%sD z-%DYw-r>z*m5o)Ia2eqZK9y4R`JchRvpuOn=;w!$IYJZ192L>t{~M=4^%b5GIZrS} z_ccI^p>3frw9Va!-fRH_|wISM%b);~lA#_CWw~fT^Buv2ot&6A9_UlI-X6f{QTIi`>aUVsFKN5XE;8^tDj3=Tlaak{45Sc`#k>q^l+`&2~Vqu zSUvNKOYmX8D#E-I>zHGEGpoVdZelt){gr^*|rm9=R72-v41(`hyGRStgS3CSogVv5I z>QCMV+Bz~#IS;k?&}VojOL-))w<`35vjZ2&s?d0jy$B|#i`p2AZG}g&oa}JPBuE&z zF9{S=)2{IK^3q$i)xjN0NbC-G%*_@)ia0)+j6F8ZlQ`un@hoqxj@~yTVUcdZ4(oBOu#*wowhD6S0y({RR?Z zX%P`$b>wmv&i^A)t_X$2tAJHuT5UeA2G^2`wlu6!ee23r^$Tl2niwQf{o}Q5-ZXMx zY=LcRwR z9;Y3ip}o5s`s+MV8h6D(IPSQ4c{s`@7-*EpzpI!nC;!f>u8!IG7q|1Faqxm3Q<$U} ze)wP?8XAj=PBtb>A`fLH{1w%ZrztV5KemPqma{qeye04nY-1oADSJ(bgo{S|aW9SS z?Ch{uBH;7gT#0a6vVTkRr`gv#3-i@OBRP~jRvUejCZgw7S&dWsd;B3~L~Sqal@b>P zhD(Mf#VcD!MzKe0Ige8%dH3FCXK!cw@6?St&PsxQvwXizr^CJ~zmVYRKHM&;osri@ z>f{ul@-U;e3^xL|BKth|%p_-ZC;B{&6C#v0vzr!>wn=ekg}LFy$cbPeg8KEBEV<#a zs6)-MM`q`5TZ@=H)OUQ0o$5^oX&SuuT@Ofq2}Hu{d$BH_oTRXaE(bQr*%G=iA>3$n z-zP_{awcnsxzsD|F%b#Q0rC75K98Bg9jQ&tr?K$;Qxxv--{h#A&9ykZp}X>OTX-Nz zl)e>AxgiPyU!z!wk9oP6g;7O)-@0lopY(^npg|ae`Z7MXvLs(1p{RCY*Cc+ZjEO&7 z=FUAY<~~g(|8PXoIRU_3F3SL~5o4!HhC7kJOX>nngq6IQTbL#+C_+bAm4W;8+DDsS z3!jSgt<2J(4zkJgTDfNV%Zhv_mctz9+pHw`K^GXOY9U4@O|_f8N)^D`6t;nDahuAt zZ^SY}3d*Z`!=5YuiAFT=WO)A+E8CguE3@ebw5v{IqNTW;C3GQCq{t_3^9CJbp#}fE zhJWGs`&Y%i^4lpw9%GXkG~;Wljn?HRmmt&FMHHv2BRZ>{eVg@`GVQn#U!x>6wl0{Yh>0`W$Dd3V7c;hSDd zBDcIuitRjS2@6AFk1MhNP0#m(Z?vB!aPk|7GNA+;8MK{}JjusmKK}lcn88FgDj~5q zU3xinIDV7=dIWM&F_(~;=%!nLVJNB57mmlgzej3!RtF0B!!@WdYKQa80HA#pbz{363Y(sZ6LRl>{(n&AFM6w&X7&RK!JCJ>T8^-3v4=$SyLaxPBHR= zE(WPANv|t0(^QGTqbkAWF$|XWm3(vH8qTS%Y9Rwu>{oeQ@tbKuX)+&#o~E#$m{VMj zF5)Qf1jPQ;k?LgQgE*!Rq~h&Ezuy|f1n!jmgVFP6(%%RqAW^M5p&Hd_AnZ1%?>6gmdaEZaOt z18B3@RIrk&n^S5iWhfCucVm)%r@=xyCR~?(=A7HNR#n*5g=`UqbfZYB@6Wh&3_PM) z(g6Tkm7rYPc>@_BAEGc94QZ;L|1eB#MzwUL2#w#<_1qI19AF+sdQd>w8qswuTkBNW zRXudd@#xDlx!sEXXMyX+QRn8h#_R2mi2p*cK8jnh|3el$b#b!*m<=SUXKwH}Sio?g zB0Qm%wzO&;B>$(=5v9jya9hV}w-HU}dIzB%dGL%F9kkC9mlhDXNQ%G)Ja4%)uljl| zTwZTEjXPHHP}pj-khyZ1#FX14fyK(}am_rjNi)U@v1fmHN!8u*uorx3N})kaOJ|?jGu_NQVHdin3~FEt22s` znUy6sjFTJXw&n0j(d<C ze!=Kf=w;(s>QQ6YlpkJJ@gWqGNl-L0gqs+dT__+IlPGq{tvW-#9I}AkfeYVS3_Ipi zwEgg&W&mwGX(*mYJHl|=7jY(g-h&>PohsbdW>Xaxqg^*g^~RxgN4q%dB`e6Z zaw7b=vA5P~;kpp1D{nR>rFM$^v^$+fLZ;buuBT-@ZR9CeGi*pHRoAdN0x#!#ef?12 z+V@-hqYNm7UwY)+&r$j)qWPmFkpO_RUPWIIPagUyZf2fZc}!`3m#8}9t*pMHIGa-| z+`n?jI6;$OJK8wf(=>P!A+yAB{$xt3PTZSgLb~Um`J06$cFg?urKwxlUr98JvQ*FgZ`v-dnd1nfQMpU1bO> z3Ha!tjfw7OHRb6Yj*Yk4rou-kvX5tzHMoVJLKtSN-A)u@r6PjKxt{I|LI8v8ZMK_8 z6gP9yiOl5n-m0rg;J9PABxMk{ghgEcdWamJ;#M1l|GuYWhW^W4G{21dy#nclzH(Q= zBw9xco&sSrYF;2-JU<{0OGcf-&-@2jx8fwcX zNg`Mrc6*gkmuQljX}NLA`$WEWUsaA>?+$4W)EK5u_n*#4jMVs?_BETEK z-TvEeV0uf%&()qY87f`pOTEIsYD9;YXASLn<<76jU#+7(hTKu1b%!9)T(Z@w_(8vM z#iW1le1Go@n`Vo?Hqrm5>*uOsNK zxxK@gm%63#vh|sWFMA(kD?1Ssa({GlMc8w!>tA4#U|_hvWrVYW_plkjO@3Ya3M*b) zChCB4t*VxZ*7SMi#!S_L_`x5O2%$E~ggg)(ot;nZLhZBJU|qMZ9@nzsuO*BW*p{C= z`L6h}WHOH`WjZQzw${pZjt#m&kq=gj@tc{><~AAl&9i}^lGfM*k;vIv3Z{q{OeZu+ znNR5FFPXY{w8>v%t{GEe8xQ{(oX;1?tQCz{YT{B9O9^61ijqyr%|fs$X!BKv%^G*= z)lk%$Zt`GXgIAb(HM|ax=|Cc1MQI0**0mG`$7#n-b(9KWZ*vip@gSFTKu z+iMPrWbh+i&wxM4uNV`hF@-hr%y^{)d?gl5Sq~o%v3L45n$3wXTq7yAC*@#N+6ic~ zNodXnxk)G!uwOUi;A-3173_*=|BE1=zORN)!d>G~ng8DRJT2`jz<=*Mi@vMt*LsdD zZSIji{c+P4r{l{jeS{i*xHF2KXUETe1q;4$Dyl&vIosJFxu_Nlp&bH}gM zM{2jvXRej=D;Y>M^jJ6i5pP4OAaaj`l%hSylroIOaC?|!e8NJN+^X?#m%ht%Gq^;g zEEO_QDW?xyA!=l2S}{giZ%I=FXC}58D8WNM22z-Y+Lid~NBl>q7heJ0vvU{w(BQ$l z`p<`6bC+AP>9)$Y==|y1t=h(sZEx*7CZoR8jeD@jM2qo}x*IxwyXu1F?x}`rz1e{! zyn6R}@~nK0v}>8I(kQ9lT9}FY$Sh`a1+T&}QDdpH3BYh6d1N+tDJ~@2vc$Vb-|~AL zcfw?@iU^`V}lJJ_-$MY))BI>V6^TNXDksr*h@%**1nsxTP|x1(GcrW-{4X z-n9aK9waHo`jq9K^xo2DUSLDwD6dv@DEjDBUI5ywF=sb0^iQKU9kL8y3cFBge9>!xIo{;e9>YPOX`bX*Ex}nVO zD3RkAP=+S^u6Tz1 z1Kt;vrZErX{e4dKgUwBt|C5}z7OS*FO{s($tlV#vW;SB8x!U|jZAn5_bw7RjI+bUN zmq#D(abQB_r5CI*&DLay`Qb1F?iG-C2(uAI3KJC2iB+St!$ z`9L+(a!D3ZRy6-S5H{5JB(k5zuP3~x6@xtP9{O_eX- zF^^eRzcBaU$ieY+LhDd@%|(;v@7CX^e|P+|k&LeXpW}+U%y`G<;YoC8qYW^$ZV}(O z$JKcui#p<_KU;YmSlO9z7 literal 598067 zcmb@ucU%<9wg%edtRP9Ehy)c7Bxex;NrEVnbCR5MoMB*KU`Rub0tyl(OU{Di3<5?Z z2`WjDOuru7`<#95@7;6XAFpA$yL$EdYOSjJs#f)Mjh&^l2SCCmq^)_64FCXFI}ag2 z0KjeV5O;C_032dFM{JtJ!tp$fPi$v-`!y~W-TVFf*RN%Z zH_uZ$s~!MSxjE0D=T%j74!(Ooy6FL6B2v;K1G)p2U%i|eUX2BSFYzh<-pyV+Jubst zOI85zAu2ZFRb1B8@%x&N)@~>rjzV-kebv^ob+TN50f6}sL}G)ne%M5F|Fz%R~qI?zxj_n8ow@xX?IM+8-ywf{iNPWJE^8QK?ub!-M=RjI5DGHEGfO=T5ph zI|uu~lj~B-GJOEZNjFzr1JiJ4L}ts&P-0-(#naWr%^8V#)775u#t3{t+L^~=q8(w# z=$HsG$SZk8$jO{X3KGgn|8}zaA5P*t5QOm(^9c%SJ;DVDG+_WQ6+JyIJuL$Rud}Z$ zsT=^@3P*&YECkuYzJ8q7#RY==Gqcdhhce8;<qM9Ww7WiEfO&3-i%k<@UBi*PaG4mJ`XAfh{Xzvm1m?r! zxw+N-5CC8s3y>I*(doK7DiQ#!p#Wq2z|h$E_{8}5$Y4)<+nYxKfBsT`Y4y9M1j10L zYNEgk$4WxezXIj&t7{a3Z`o;K0O$09Fu5%yF#X7qFtLxOrxBa=L8^4CI6XxL-1pVJUQJ8itWw zYidRtU`L7yYIb5`vVI*jRDtARMj|YUE=5Bhxm7BdvIuS=1*2xh#s+JSS1CbAzLypc zOQ1i5J7 z6Qkj15>)u_1ey4;{?;`ZNVr_vKUP%VgB8Z3U{U1JffZ}^cZ-Gx-Zqczz(Ks4z`QK1 zFct}qpzvB~uu`la?C&Xx8{XN0fp|YlwAta1G$srdP8kw)fN+q|Gt}29-JU9{9@&P0 zxUX;pU;xuz6g)H(;oiLP)K^za^KK*9m)p_Z^m^tL1pVOv^Il{KEF{R|N2wh=6yaG0 zE+x0W>3!2!`}P!Ep@%{8@W2oc>EI)8Usy=6#|l_m+}oUGYSUFQ2ZBaeIl@1{U#D*B zwx+4AJ?t2a^0iY_@hxv}YB&W$v2wVtpP%zuwzjUCf|wV0WTxYv)zH=6+ETuUmDB9O zynWmen~om-em>4I;9+c4XL}308L#*kXaxg^_Ch?pZOg_D;NFCu!N0-e{N~Um%GX85 zJKVMauovLwWiwZ3?g4ivup0wgLK;F_@p3!Bd^kX~je^PW(hFtKIn1>T!kN_@^ z+%+UXY)2s=t)?n^O)Ck&87u7v{^Ev|)W5i4N=a~2N}L@y=Z2=co2RFjx0i>9tCO9b z^9|hVM!`-7W?sRXxS;@!PZAu1laK(%P$nkE-oD`%V<7+Fp{iSwD-FaEJa05IG8Dxa z8Hqy11**Bm#rHuBnH$PUw8b*SThlKd5la$>@<5wEOhA-l>G7^UHkt;ahqHJzmL56T zS*WnkyUv*4rgM7Cbi`pKxBx9qw!i6-8i=+Pg~tcf|Di{FY@*zM&?7bksce`S=a=<| z9(8C8-#_VL07JP+WMsrdxJh8?F`N?v!~GXMXcNuM1ELJndWz8Tp%UJGqazil1T$J} zQ~kq_kkBAi=ZTJFbbORY$g^jt=wzS2`9U4+9pxw=KQ>sG5EB=N@C*!yYx);IXrkf1 zVNc~De)KmaMa9O&$2xly{zVX21Z|{On5Vr0mLU}pLDA7Mu?a{YoqsWeF4Q&ZsSCsq zgC`!SsGOqo*qFEkOW@xO@$rM(_~~jrl(UNqd(qX?{wgUZ79;;RLxNo*oLnG=_AbH!$|*T$X$bIGk;h}h;w*+P{kjH)WydpKx54xh8Q~f2tG8mb$l8VV;A^` zA#IuH#QT3S#NQEVV*oKkMl&9*r2mH@ZMo4{`8h+p?2txY5JTLZVxzokA%?)3@mq4D zF=BsF#M#5&7@~-mQ*^BBODshiFfkESe^JC1W^aR~hyy&)GaO5imtl$ee<KpG*2vG#*76J*7b40}4Cj|fs`AF}JScWJ@;GQ!?#5gF}(<9hV z0l+eZjqM`D5PKT7s~jARbpIx(!FY@%L?fn16j~F|8jr;LqL$B^o(9tl932^$g{)->v(c$+Qtss8%57wHp zz-aKPd7O&>!4GdPA?I^`)WB}Bv0tR2V^sMEKf(;DHQgY77;4KgDkeX3xN(t=j`1J- z2#{p8#`5D1J*m>m?w;-<16sPv#DDW6#Nmpt2gHxSd(@oq9S}cST3l%_(?ga0X9Q7{ zqJ0nu3xPSXQ)<-ooR1(44=5Q3{^o}n2fZ-F50^*uG#Vj)_|bu&W+48XANK6RrVu~m z_~__w8UEo%dkV{CNPf-_pC|O1J`g{=9@0=-z5c_G*5oUfA^h_p#9ij98N?4CGe&By z;$}qCML0bz?qBq<=Mr-8fVmTTI0;koM`8I<`jCd~FMiy=ENBDq!}ksY{XL(!L`*`Y zDGLpN2?qe$2mqIvng9;q<55up@(>MZfpczLr>CT$roMCu_naFvgjjAkGO`ik;u6yS z&5gfjT>m5R`u~t5)*&LLqN0FeS?q?#C~^0mf})a=;ypQOaWN5A0Qt@+D*qYMh?fj2 zznHtQ@@;K>eSPiQ%GXbyKDub^PktY-c>Q6!!-NKsGr#|5^0OM@SkAF%3$H`d`DR5~J_U(UM{&%wA5`fQn zbN$~J{>NDf6wm`S|GPW}ng9T_|EqjU4d=hgJ0So5n|?V~{9o{k{||Y|{~>RLI@bS& z|5csnzskYa-2Yv^Zvg@P@8tu6DNqymZ}L~n|6N|n@ZaU}7yhgKNFSPx(QW^aTK{*l z70MpCSl-$?1u`To|1F3MrK@MkNlpq15rBFFmI)bH=h|2pzM`q%0I z4<~;=aX~%QxKBaKh;0!RD#{AjJlL=wVnS%|;qSi-9dJAz-IoVmjWDl42@+RjeGjPg zpxG!LCyvS^jxFe#j*7xvZ9S4@T{}mkY1*?-0X1=-c};A3-}^F1y4#I`QA8+W=K8xcJam8x8&H(%;S;f)eoD2t2vfmLZrhq2ipqmQsmewTg%Ix z(pLRyiu3b}rZ($8P0!f0fM>^bpFWxFdB1L8k@6-E`2AyhVvz9?8Hr{WEwPOJHFKux z96R?hrkQ!4^CDRNto9SyTjs1aH9&i{YdTMw2uwA`lfKuiPc^a;a^`;C+>b-b=W(p@ zQ`qz!zOR@KuD@#bvCBb#5kL8*;ss_VD}Ax&c2@e2X-tN1lw>7Jr1NE>qkexa4&TW6 z-evnfs^re8uajp(jqGY>S}NB)DhXRryOmzSLDF&i>r#P=Z6{OTi*?;^YK*;HXdxo> zr>qw-6n(92c=E7clSUz2-yG4{DEv*Po*2Wstyd|I=a4}zbum!HX*;#aAZPQ}>2_Cb z!CPA&WK1Z0@#(6}XWK_@H4fkVf>^vzv=`elZmGC_*eUtx}wTVfbxElhA z9`3jQlOZW8E@^ew!a| z1w^ypZp%eH#L$XhlzCp2@@MLBUHmc&KfnY`%Zd-oBDU(>5)}$6CukkmFZz{Ytc|EjmIzEhk4_=h4HY%ZdnVW^Qht zzF*?&szd(4%29+W39f4soa*Z8FnKwAE@p;k73~bGn5=7hibB_OqNSJOm?hXvnWHYW zx@~+Y`{+#MkvkUf8t1*It1Bhh8u@&_%oZiLzZsE=ykOF$9 zm5tOY9wOaLKV#h#h(7hI3m15Bf_#}m5+plAlpj8j7rOLUE#l43QFCip&9fo96FpeirtxxM_2ZI#^BfL3}*76Hh<(H2MQN#}J} z#N&02JvdnX#1?Gj=34gZj=`fDwJ@9haK&EUqg*B%*6(6t_Z@!t1O!NR{c;O!Cwg~D zmYf>HN3rJ`?X3{#;3`y2a<iQCS-or2ovI#@U_ppu|%pfl%qiQIl_nH^P7fu zES(>mPcIyV;SF7u3d+M%R~Z-An|xfvlil@cZm-X(x~QV!9aRmL3(}#TY|xdN_3)CT z5)W(95j__@($z2bl64C2kijLHg1GLv0}0PM!==yC?Z?j-Pw9yTo?a^Eo!Pp};g0)C zjWv{y_}OUvH{OD@@>)jS@Rtuo1Bv&FYbYt~v}vp#UXA^>Bq6%eeVk4p?BAV6%t>02 zx_q^P4|hq<`zmsJM9U~P_SuTx-WVR$O?_iN68)jxJIRAp`K#USm^N3$$VA#Y+ zEw*Rj(~pvO$F7amAQgM{5=9C$(E`+$mBxwgZRsxn^P0z5mV z#J@XwL2=+KPRQjre`hlz#~u{sN{3BN-p${vxcxP*eTmm!<6fLSHX~*-@DEMQepCAR z^z?Mj`ohxOGatE#JL#QV->=(Dcz>9Zc74yATOH*ns@5y==J_w*!euLtzU^sb*8cxCGeMoT5PTN>7(Q3{+#%%&X!1MZ|$L^l-`lrN}M(R3p3 zQ!)L@y>`gxTjHVlY4O9(&K-BAr;pZWCuBOlCftWHnCj_u7_Rbn$iBN6aWy=IYha<) zklrIxFua7hc1l{bK?#LVdL+bmz5GIlqbPf}#&@yRPptuN2V-}|9l6wXLs+}JvR|kr zPYoNs7A14&f8lG0pN3~s!$3=$thc$*6C)7!Soh_ZI8s-t!!jKnUjzfIUDO1ck+}zU zw`tyGuQkFWLI2^q=hswzGR%}4zPvKzTxT}*367j4*itf6O#gz%G3dlHCLu?8^g*<& z{Gpp;86$i}hj@x8tlM1X3{{2>h`J_F`;ZDlKpu;}N=rNbP!}QMFq2zSqRP#FFF8E< zB^Q@D?_H&uPQsakZ$DWYO$115%{%WNu`4gAT$=#lhr0p37D)C>0P_B^8( zNZ)ik=41V_U8x-R`*_*w2;<+&=m`;3L*R}UvCZr1IPG-<6)kKr)S~;!n ze4FNx+{zV+OB*+-OhLbwTM=(6KBkvyHaiPTY%hB=s&ny$GzKgFcW&*PtzVg~ZC;#z}p2_jncIooA zU3s5<;5+iy=Ub)fhl-;0GbuAES52g3U4lY5=nRkU=RbV8b%@H=JUg65$jImR?fO!Q z&3&b@y686){utR9`Gfq`e1jdPE+qVOV9BVqo~*~WvAmzp)(b)U%u}YEALCPuI7!%O z98gizP#gW2? zcGB38o|Tef?doG!}j#y9Hm zX83MqMBAV2RfHHz`EKQULxZl`&E$!l!pvjI?Q89~)yS`MNo+0)aJI>4(%+!e7hpT8yiR z@syGYW$oNm$yskK*I3i-Qlle|! zp+%03)bG_z0)U7w#!18>TqtpFuzf50o9^sy-v)LVGdF$`2@0TIbL_5gR(sKQkk_)}n(-s_M}NZ57oXT(@HG5a_`PddLDJ839at`q zeUQqmjcu+McRo~TU;HHU;I(s|g~Unp)5q6L4_0T}Pznot7}r>@EH;i;gmc5Ez-fwzvI z-a-F7ZN-~wFZfN~F?D&atz2UA!SlJ}TI#T=Cul3GVXH{Nbk-Pz%3E|qnf zDHEmq@GCKW4DT~3_&z*07&e)0p8djHld)Il@)N-5vqkIo7}JWw`}+H;&zAc^_l1cr zRO9-IF41d~n^u#Ji>rjM&ldP@Os;w-_`Mf|k#RrL?4L-N z3HUwKzB9lhfsm>C{Rp4$%PsLtrHM00wi>vo7>?z;jV%l{5*ywdHB*>Vh?_>hqq$fvL|NgKLqcuSUP5k)ym<-^Nl^EzdAD_ zP1T1qxm-@B$5>xhrN>g4U{X^or^_~!#8vq5@dtp^nKuG$@lPHy5 zuJuFvD|Af}85ssf#2-*IhmT(%VJpHPCR0lel`E`Q;dw2W-=s%e3Dz^J$ashof0Hef zFKy>SV*k*${D=SOp|`9^w= z>@PNa`s6UOA9!n>k@G1<3Ww}OQNHRB*GKX6!riAY$IW8DzLK5jy3@&LIwlbBq!cqs z*8K58jKhvW8ofL|pp;YD{2}f2@4RasEyCCFk~5o_e+CCZGk3EW`mK1pHvt5zOe?Q`@~jo6u>Dw$E%~jOA$?$OnSe-VJpMP(4bZ+ z_I{mC!Yf7tn?A+I^FI`>-;rkG$6qBAU#y(-r&yxcwKnTMP}W>*V+_Bt^Wi$-)d|_e zVRm}5uZ8nh?ZSL}k@c1=k%TK$nuS&62~(|;wCODj`V(*a1}{6W9j{BIvKo1Hrcp2q zD;DGvZm09IqF4=Ei@tJJd`i~>#`y7f@TAVH%rB}`ExD($|GI(0_V$X>jb|+<^JYf# zq}@C3pIY&z-|tPnxfsPQ zu<{u3rOU|}nh>PNtD!P3$=w@_?Dh<)UnJp`>JI!n-;nsaxF{k;}cUI8HL2RFy#6v zjLbHnIS(cZ3Jx-iJ^P0HksIate^ zNv=6Q8~tRQBxm~s<5s7Wp{KHsX^`Y9s`s8J2|0hDX1j#KXHOvRCL%nGexm&$HM3i3 zR5;VVf#&zZqt|o^9kkP4Z@r|4fY*JVeGC|#@z*WnQIQz)kWaF83adVwR#D5XmxI?#ZZz|mX7!Yc3*85x;9^SD59 z3B`NHTJ0kp1A5I|NwLEbRqj+vxX~A*T!Eq6U)6KUF2FKSSCYB()^f)0w<+QYrt|Jv zU6u-5Y_aSz>Owv4=i<0_wPz}Y&v5M1d@QW4u7!uY&P;QVeD`p$L0Gt~Lr^Z&WwGfJ zi=Ycejk`DPdEIq`LK>r=pZ86Na`Nq{0E=fwQ!jOh%<5EbK5+aXBu*vIj-qK&e{Aa& zp2Ts1Us&M#f_xItH!Qu^c{F+FqGOy+B!Jn&cYbW|>&C%-}Z*o;d zR!Vku7`piNrT&07h@H>@d|Gp-#3PR3ED zGxivX!^PiHGbL)gOhy(Xqp!%P4)Kg~b8%I*x+Xctne}^&Y@d#AjKc{gwayH_q#R_U zd@Z%^zgXU}D0;us%mc1(Y$$no)ftrfMU7{Zm_1%BWB(%G7opO6q1acBs>%7Iq;IPU zLDJjB9_!6=+lx7RE6?%6G7VO?>wR!TcD*T-hFH?_MI*(`n$-Om#yP5_x>{zF2cIVv znTm%#_=H0m-+cFln`98)$m~0zkKUePQ*U355S5X_*aG+zwR2P+3M3ayc?R0xoW3T3 z9_?8(f8A>&)cdJX5~9E`8^a`ai$R^Py#$L;Sgt(nnTKk2F(oMwxqK{OMEtj}? zV9BXbK+=2IPH(9(88L2Jk*y?E&xpT)`K`*s2E3QlF_r$F9N%UXcA)23sxbwv;WHmM zf0^Z;$xdlr%xe;tcVHX0FaEY0f1w;^`lA(H{;S5<-;+7wWz&}m2PI2mk$oPzuzZrT z{+zdOPhGk!QEU}buHrsC!A3z+P0azW*0vAPCM)(U*2pNJ5AUkR`tc21dFk}KmTs)A zPpTL4zYf1+TP!k9NxES)kNo}HyH1-N!R5p($|JbPB91xa^(Hza-S~>Tzhccs%&>bQ z^ZVlLLyrrH1aoFG;V)YXcc$kxn zC(-!H*;|0JGOSpc9VKO)_#r-WT68hy(Eq^UV_G)p&0;d((uAtv4R%_Tl(dF(Xh!|l zn6LD1_r7hWNnO51JYu~RWgMStWBef0i+I04DPg%)(uWR#BW04d(cQ3l@0&?8j`7}f zk;SdMUn3;Bv~_Os_~UdFw>@*&K2=t9&3=|}g@h%xK>)L8uq>Inn=HWNoo_@-!AC70 z9*srTxRm2bZ_532$LKCy9q$KZ;WdN9h{h{VpsxQ+JbMS z>5Bp(#Kb14EGfOt%wl&U$sWthru#9Jzm}K}_Zd{RAbcKJ%OAn?Ua2xf8jiP`pJq&) zSJBMEG9{iPz#!F8&03H{ixYpp>!c2s?I-@4_OQJwJL)=q7@k=F&UI@eDHh_(Z z19~XN4&*!GTEVw*>%+u5U-bXFC-x<=?RmpHTPA2axOhuLItt=JgUjyiwAQV2bCHmFUI0 zg)9*$KOSFoFUrmq;F2|Jfho^_<9D(qPj|VImY&l+wS>=jDb+P((9gM0oGVUWNsvX| zSbyA(#ga0aomg7*`XqS)6#*He9X0E`cx2}4>Q-x~z%6bg4AD1p7R%(ap^2svVpwNV zV1@R;Gt}K^u8CQTXLnjSBC&Vom|cS9y-u zm?7q%{0(-|I`vLRm1_emOBW~W&Bo>~Hc!SBer28!{5btsoP=8*&GL#c)RIob(Jpe) zr{zx9X8Xtz``GAB@?{2!TLcQUIA+fsOmK0-ly4_gvH12fq?AnBo@O2V98zC_NeYJ8L->am`O3S49bd*;Ljdvy;`m z&YtIfqhd^5PqlCjHRQ%WNHcqS-@2wGG=(5n--JgFvR8YM`63EeG z?0lg8S)H)hi1L}~6}b?#tX13(A6%2jDdvP0jEmORl3?4qQ608hup4K2U|Ac=sh?IW9gCEt zGRw(rY$Nn;(zy3?P+8k-z2I3jZt=^vghI{=+*(Dh7TEszv^dw z+_Si#=PL#5fZ(_)I+}*_$=>hxE|!jt`LoYa-p_L!OgX5Q6c8ziBgOS$ZL>%=M9zO4fGG63Kml?_N&{%erUWw+oucXvLF8G~!^ek#N@J@~F zn}De8-a`exbwlGQX>Udbm(Z3DBygEWI|W| z{xMf0?)Ei|)NMJ3!|Kk-!o^ZHHDIUtXWEua_t*!z-E=?c*A2}{c$irGXdgo%gV+Z} z`!NlvMtNoUFyYO$HLXjm7PuDFK0z!djCWYAT7nBAYo2?ci9T=`JU;eHNTK9JUpDK* z^ljB8h&qsa{iflpD~iN76Z{$8^YgI*2b#=--1@e(G#U=aLC414`pLtA(_R18b@G8& zaZDWX{iq@R<>IdJFW&yhNzUo7K?&i*HiG5l)An%>zPW!GN}-J+uVn-*#;spkSCsUQ zHgN{AK3ytVIK)}`#IS4B;;Utc%A$&7R5K(&EZ1Ka#^GSrv@E?wKFoW|J%Kz_oN>xc z!Z#dxG+WRac4#J0WI=rON$=XvpHI*(ADf>1_mqb#3fYizJ0K>-0qfwr9b zXF{VjNxyh0ZQT;Fvr!0lk49C*A(tcxmh`}T}%eQy~~KlUZnCw6Lbb(d{s z#bIt92J1KP{6-eFF+)A?kN7V7GYZ|a-xy8q zqE-u=?D^4im~W*#HPZl*v|ClZFKD@ISNup?J0O@Rg4!KQhR ze7dIP2FY&v4iOz85d2 zJx6g54}WU^ahQ@H-+fJdEvEt;Blj9J#QD8HGzk(a=*?dr^N@@pS~2FT_Fo~ zp|y~<>Gqu`NPWKa>E;EU1+LGRdRjJ?{p2WOzlh4A)URG~qJU?YvQ+<~ag z8*js3juAaNyM>bm+iyJG1XooR^0fkxohav7_@lV#JDj4*1s?Naqhk7JX2`0?CcQKdvYT-4KEJ>! zPXFv+*9QaM&McVE7`~?SAd_=JODWQQi1SiX$d5|*kImJRLY0SsgF#Hg^>_CA*NHNN z=l?=#z%52mhc z#(4(sTW#pw(!Ff?o~^*CWrZDA`^IKnaQXiD`;YY@8_1GOW>Mrp(#bb@^WO_0BxgO* zsXL=J*-O)w%R|5FsY3gg*TWg_o~h5yI6Iem(|%O%*=c2}QF#2wD`&W(=s{^**@wcD zX7wM9La3)*g}<9wTW^KN{qDO`}@ao2kHa#iw&Pt&z!ML4=*Mkm>G z6E@DF*+=~$gAG14mOph(lx^7cWx7S09F1R%wSRRItT-}=4-V!vNCSt(9M&tOXeCd7 z1^q%a2V~dJ`0>>-N&cu~YRan1+V`*X!?0SE^t6-gs+S?z{ddP)SKicrQvLDK=juM= zrfSYDrRZmEN3Fmo-Q`o<-1b1x`Vid!i^Ng$5*gVPsnmBOB?UQ2`};9>Lnd6DGYSJF z=l2EYcEYKtOc(dtgtpC6@BD0Q9IW-YAK~ZWQ(j)$X<6c-$9L;YH#((%ZB8zql9gnI zO9Q=fi@7E1j?Cq8B8m0`TYWA&`;Cdrg*!Kl)lMT{m^m{GiR?5XpSU}S>a(AmxumY< z1URp*3}@B^CaRtN`oY8eus4}6`&k{TF4K$UyZ=mGnQ>WQ3~pVSeDve9;SGZ|zt0MT z9h%bHVJLo`lD5G2&ky>p#YMsoTpR$D?s87RhM%*m>z3@sDY!8A^x0_^`oX(`{;ZRC zvN0RJDCeeLc8bcg_PY^xM>S6~LE*+2mvGrP1(hcR@Mn^oSJV%1aIdg!fh=$k*N#;4 zGI@M~AM}0PzrV!$YkeE`8hHLU2oOLoL1Jue5n8ym7z_+t0tkYjwNxM`0l>w8U@8Cy z!!Q}PVHh+R0pP{+3tvnFa4=v3fCGYU*t1Z8AVye3RG2aY(t_5mfnCrCT34mQAtE9y zay1J|O#?(2Rxx2gL2mqPC^-cXGKmV_7T|$iroBigVHK8N(bUmWTbvwdCPs#aZWsqB zC`AMX_;@Lx*CEZz-yfhrf`i32m<%oolA-~+YxmSNwGGUkI=OrK1;G&E5mD%v*!Tn( z<{I?EYJ6NwR77}au%EZP(^E5p$7=H8{5QEcxNqFNd5d32NEkm9Af@CN6yUu<3Gk#Y z!$9B+ehP;^z!|j2Nwe_#Un+IXNJu3Dz$pUjPjSIzI_O1UR{k4IA_E{~6drg|cs&NdyB4>F z&EX83m4@Ev#Xz^$LAT?8F;InF3Xr$ipsto#hh2rCLZ8AN+A2z(oT%ZIB`< zSfpg`taknC?MX7^hv?Z$cPsWJtI>yv#>c}7XB`Dj%a3Tw5RUHDx{4E&S>IB z12~BMdVHv}yyD<26e@zeFeo=@89+O9 zUk-?SdU6(duCecG=x)xT=R2LJ-7YlOv|AeQ;tr zVTKTLpgC_8>%iHu0^|U+c$MNA2)*w72;laCMMk4zLea6&IB0ZO3=KLu67FqdxQxww z_K}T~AiMY)1WkN)01M2n?HQd)oFSYX?kp=mJ}=Jaf8a=y!BcRZ4&Z}FC7_aVlaiCe zlMu=96yoIM#5km%c^u?AF_@_B`jGSTAM@sHQ3Xx?>Y_|)|9jF@y}26cK$e7LveEY`3U11oz0&Kn;f9U`#OHogRMGX05Pt~6`jMA5WvJh z>+{xg0BG48palUmL3ThdOpC=QrAK4{nV}gtnVIkm*368IOza2xOHWOR@U@=Dnzi%P z-2V2B%Z1qTKil{5Nw4Z2nM$69UWRFZ`6>)DtMM}l$0FX+C8eaxYdP+j1 zzvVDw!P&8ok%KTV_r0BSfEBC2%$hf&5WwV6M_JCVbAV-vNPtwmaHyOfdYvOJH7z@x zCN(KG)FtQuYrxn;M{OQ{cGFYnULtVG91DQ800Jn_+=5V{o`N9`z*WddMWh31=yaU4 zba*C^0ZS)JOG!WlTGpL6@@O4LF@Ap50H`d9!DTbQw92mG$KGhvZ)t69 z8JdcnBpe@XFG=72V-*b?sxjDkABL-t1wm3~S&K+Wh$$zfrKMn^gP&$VmXU(F51nNB z1^I;9&mnhgUE)hx2fGx+BqVO9&Owl4{VgvucF#*{5n3z(XoUh{ATAJ{k(A1sX)Y)x zCaRE_mXZ_~?qe~HHF4A2!kk}FkjH8e0wg&*_O?d7Xy|K`g^3dLCCp7uPC)+=lSC6^ zZyWQU9iHP(;zGE#Q2_2pQcB{#P%){=m}r551HgU=d2u}lBK|v8d zo8p#psFnww3B_#C=j0^31!*lhrlS#juFaEK770af;=%3BT=J7!+q_Qnc?3cG#s!N+pl85;*%2D z{(#A&qhW5==NVH@{5SvX&D>rX?i{aA|bpjZ#h;r zP99EpPw&9cNcbr6@IX&ebNtrVp|iK1wn&G|6cljD*St|mF&S65el5+3B}wu1#MRk3?|8!CbL$&ulKHw{qrL_mON z&pDWQZ@a%JuWyGC2Vuh`gMDwBE1yNeenMjy6se#CpkNdLV<6Pn^mvxo=rA9%{PXH@ z)N$2?ia@e%Y-D8cZF@!W9)!qv2EKPywegQiE2wN}>+bFA@9XVseDw_NF%01mfIG?2 z@f6rTClXaVb z&(qL#35m@ttf*^hYj1C^EzXK^Z-k%;!JW*A=h@IQus_)7v^W~bSbv+~V{G?;eqiq^ zCM+rtGyxwb9PDkce!c?X(ShKU6OxYafnz3?4?+AB;3=m4r}t7j-i|NZ4uGidE@Y5qQU+*%_WtG zVASbV@OSuT`8*L26}j6o0v{qC9C+K=P|yXQMV+#M;D>l!RegJ}fRJE6d-yyS3_R{eB^FjS z_tYdpP*JH+R1z8LV-bU`sAD%RdtXICQ9;8&1ccPz(_WW93Z6xuGK1jvhM*@8^vn$m z^Um7{`1M(2W^r9>_dvB72Eglyia{sF(4o;$$Y3}9H(0Z#Rg7J|Bt=980>;7yi3j@L zv{pea=?r}e1L+q_ZDd@>L1?4~H>*O?xn)qBdOKLN2DQi@R0^6lIud&N>9B=`NmjP@ zb`%yB6G$HoA0+O7+uc$Lg zLWX!6Wnpo)jCAY+%x{Z|N>mOb2Z;N6yP7NW-W-B)r?k+N;q+{~%H*DjPc#IBZHt4o ze_&#wfvB)(x~Ryo0B3_qEKZlAnQO=+K`{}P&cTQQ5(uZI=6U5e@GJqEip*$Uy`$#@ z$K;jQw{`UlR5oB8ib#&4Lm^?_R^I0wU%0BZXRwm6n4syvKx9A3+n%o0*DrGi4#5Pd zv)HfJkxx=D+q>*WS-x1}YG*;i!JnzMk&3`tq!T zc@T`p&V_bf>Zn_LhbQKi*0w=W$a#A~CZXsek#JuJlP_3=*Yc(=L7t)zLey|{A6ait zXG={{D)Pk=7J?E4*HRxovd7Z0y5LWn#_0)9iX?~#3-&Mzg`bk2`Keobz#N6e#BOH~ zMfFjNfr)|z>kcGh>VPmpbLllJL@!K zP5Jsj&)x@NiS02<29a+m`}*GYyy>s6B_cho0-Cm=Tj0>FG8PIO z!M(!A243FSUz&jWSDYS1B9cA~9^h&a58ZTj?DD|MJuplQ0#axl4DV-zjOl8vfAu^y z%I7JfXCK>2z>UhRiQm}fM+kzmPqi%xur-9hAQ{3DAwCXI`mqMh-`BJA4o0Ymh>0k_ zs;v&KVudCywbd1+1sQR{cCenqa~>YPiGoE&WpzQb&seDY{O)%T55npS#e_42!2>-k z9Coo-xsY>yFt`E~ok+;a$b?Ga$;imcz@;vW@;qwX|I<5sObf;2JTJ&g&#eD?2F5@` z(r-WPgcFKfy5O)dAUrmVIyA)3Stl3k=DwANm0JKj_>L${EL@Zvdcts9fcH8Jec&>7 zVtffast=CJdikolwx+T;C%y6$)FVQOI~rKy;0a+g2zZdEt?v0$VN5~K&MPQ1Kt?n| zj7(G%LgKq|S*#U1ou&o1(){9c%W9ii+uK?iYRYocDxe>?h=!ong|O2^Xky<5OF%$| z`MVnXp7*?o@}^F{!3bZ;NHLN>VDy@wp}~p-+(7v!KCh^6?SOTWK?`-y;p)C)`#4;1 zh%_D`>Iw-(AfTVDhz_NO1$jF>!iELlj-jTNn|}zxTQp1<5P=C3Lk~=NuhZ*(hcKbZ zaFlQ23uxr&?1H@^@9yqwZ*8b4&CYy#0CmJTU>ep&=;=XMNPH+aJjCDK>d&;TS5Dv7 zGaw{1#KFu^_lfqSM_SPTLk$&0A%pdE*yBWx_5I7tW21DS4B4DA!a9E(1qmkJXHtq#09HXDT z!XhHO$-27Q+nVZL<)#gvfmpyk{8#|5D+msYg;NCwc-U%nU_Jl&_@Sk%Zx9RxCkhGl zaj|^Za}G3P7n)xDx~07{s*B{@u$L(fhY$=7=m-t6T|sd$s*oUG7jw%EEJ%xt-cxt~ zU=)lvB*-5^P6VO2j^ykh%p?9qbyIsMx{CxVw8om^ROn|pA|PAd5ku_k3WUL6A$ZWT zZCGds33M79;N|cHJ24~$0~L)OyaIwlLSV=cqToPpXEW0^$S`8C%@Uba*3jA!-9_Hr z)79D0)>K=XR=N+N;(#XSpfMrTFnExkyUn8!tZmC`T9z)pfx)N{LdZ5dt-^Eve*0lf zYsUI_p{Jv`>l~@BB>k3W;#QCM;4wMDYK^-djMmwRH` zXU`Q(8LgCD9`2b|T#y=;#A#-mr$Sx}N*YQD;I63I&p1{cpIttG9aOryBN9hX9O(?P zT6f~e5pe(ZHLSBRjl;6vsz5Jtw6LL6x-8Gy)Z8&F&JT?>1N|8@!;-TLOX^DrB}F+Y z0nIR37GO6fHgs*-*Ij!=@YuNXjj0EXEh+%n7c5d`q#{gjOtAzx!bK;iJco?e5HUHZe9Yx4@a01ausz=q4OG zuybw8UXIL1B1mR_V==X?AlA`DNAVak^pc#Kp^a}`Ce)kKlImi7L3Xm=S`aMGZj7l} zyyd{LqkGphCd@Q3GAp+rm>Zde%{z3gs+(|d&*nw*(0T{@E-fTCk6t8~6J$gQ*xFf}swui0|+Nc|!F{_U%qk82n0Q-rSoTff9Q_$SR$ik~|#ld6Ujfe2avFkVj2V6M< z>k6p_g$0HAS;^tS&ymnN8*gtX8w;=#I&gxynX!)jJCI0b-%?UR+ALrP*~B)qe8s+_ zhYvL$BpleaZtlWfSQ^7#mpu}h(^#O8pPP~3UksI={o2zlEIBKCPL!{sH4_fahWRa@;A8B-cMGmet^AzSSP#y0XP=dC zR7zG}K~Ygb_MDg?Pe%Ax}mRa6f^7uW^Hre^1r=Svj89$z7BaHl55ga>)qM^?Z} z0Ac^G4GZg02Zd!nmE?$O$d|~=$w&xF`~p+gCr<8Ad2;gV@<|{I4w6WZPX7u*1lZSn zGMkrd-m?ISSii6al@gYHh0|iP8uG+*vr}WeT97rHEqx-BGjr&9`0UiE#E)>F0Q;s_ zT0_^S-3#^;_U%|ZuLkMoWA8+*n3Fa$CCcq6%tZP#>;hv_vvN_|wAhHj9_zkOa&71O zo%`nRC+yv}ro9HWYCd))N}Nf{#pKoGie;xKh6X|Dv+vJv3yn|9ZpbC&<>uw)W~apm zUW41AV+o9_oWFL*UJ$Zp>q=(R7qqc5FyO+GQlBfHla(6lTLfEb>z;Z02zz&JUeeIfhcf?Id^mMRN|Xx}?Z7~$t$%b%W)4c7ksQLN^~+-}+q`S<+RUz&*CJn%Ms7cOpWtT{05fqH}?!n zNXtU$vr^-Nu7Vmt_Qjd8Wo;|B?Ap_|m$+y5jtyOnMT0x1S2#09*y-=iD9^^`FflB3+_p;BzL@`+4J&xZH2b2$IkAhGF5foN-u#Qr=xAiHVt`t7^+wC)wyvvbR; zxg~SKUOsjz47%Ovb=l&XkS*tP;FF#Rd+Om5~x1_lhH+(>{ULwqnzc-FujO z1^4XPwQb$vrZmo$Gy9ehn#;mG1<4W1m=hZi0TW*KeLLsi*g2UkAO`Apz#0%E#D3%w zkWo8-)#e?$b~E+}?%ug={Zdvz-FKii;G=MumvpDsW{YQ~Cr7!X`7nE*nMYWBDhLtC z%1lp*jzLvSh`nH1RDRQrSi963>%pWa%A`;UwTeAc*Gg1?S7-$|L%>EeZ6kkMNw0hI_ox2h=ij-nD)6+NJF^b7-GnCW>YE1tD258(tq)6C;t55*O-Hh3tB0J;OI5VNPs&3?U^s zE@U?9pH zc{xQYSxg9PdUH_Xd^F=+fFa-knf0@ymtnAuC^43OP`Mq0b$S4I0d!h{MR|c!4if-3 zS;2lL`>h(P0`LxCM6BBrPLg{*uqMY>enn~6>^4rCP7EOjNxsBkLi6B$IEDu2d#K1WnU*y--BJJm0Q%Ce&ka+F54@ z1{K|O8B9gs=PZ>^p=1bYf~gvYYAJATOa;sb*nNMm%JneSQdBc^jB7s*{10|fa0Bdb zi)2yq#TWtQ*T~RM`Y2-yF~V#(5yaG3)1)3&s2s*v&c=WH@b=voSlFSRCwA`vJG92_NyJj}7|JlAYIMNN%vK&Kj-Tn8?<84Mreis}IXJ}3{!@%NH zQpK}$`N2yMp1gSb>dC`v2bUH(k`V@70zYtm8y>$FgE66*^I2%tVgy7arPbxch4@hw zS_VJp_fiZt&Cr5ojv>rPRCp!4g<$P6;KX|67FZKZ3!Ed@!d?d_EOK}=V$CZs#0Vn` z3sWm_5}?L~&yat(DeN-b!FK(vloixD;DPTtiD&&(L(T)im4bGaQ|q zU0mHgJUzX<%Dq*+ygWVJT$~+eOt+n8WiiP}Ut3KtWT0b+{|LTpKl zlrN3d%4Af~F|b`Hz+kqtHfPQNn1i|v0a5`I4vs?`uyE32ix3OpaX@)>HMMoLdR${u zBg12eXOl_3HLXk|01ZiP` zWfOEmt6CW-2`fg3%d*2-chj-VGQuFsR@KRB0Y&^QMkpCrwwPyaO9dUN>S>;B6vgK0Ioh{W`sHFkQPH5Rh7h+b5aZt9ZehJ(u#4J?A z{))0iB;%PCbR4T%3yV;8A|xcSl3WqW)|ikF=|mWH>BVEC>=kXSW|X$V(`g80C$;RP zlNj{@(SWiwRns6n{FU1{3S|=z@!h=?N|T>ObBAWemkj9yS($!_WGe+jW(1pa%ZEWW zBGG>w*}9;)5*!?j`XK<(Ng$k`*#c*a(mOy>1%sc-WIeATM^sL;xf`aOz%3{8f5?ZNLaS4%`zB^sYG@X+Ks=)%wPuK8<58}*FRFqvif@ENCtKD%j9wmiffbG11Vk0!IimC6#f(H6FnA<__e(){sGAB=1%_vy%8bZXKI|cFCEs zLBOq50+DHq^28x-jYr&iF-XHQE70T%VQaruIxA}|Y+cTTZT2d^*d!xu?Gj`aGkXpf zTk`|9US3V-W1_JHLF>p?dQ0L6Xgy~RvV)Zp0MJ@vI-`nCNX+J8)@zuYJOQfYFzbXC zdTYdgX4Y{P$R?$DUodRDd{ z2U!=OOfhN!7;}&{9+36MR^%L39uR9%N=Hk()ex~3;1KJ$QdEzcLn44!>zLF*$0oq2 zjwl%<)_4HUa8f05ZaD$c>xN}U5Ql&@0RijGgeFur#XbmFYui*o>dG)KuKt;tQ7QBf zv^pUVnZSq&L9|-aomB}1T!j{X!?YR?w0Z;JMQAG3BENyvIkB|}qEz@KAXu%P0Aj=# z)xo(VVKp9L^?DYP#Du-Ge`eLmsZib|R-%6jV%1aXp<#VwipvT8iA>NO0G#4}=6*Lk?ugqTqQ zTuQxdVGUh`8R8*lw|xb z2NhJcN9a!?jYmX!)50dYB&#vb*(YY0N0()lfvGUvs$`9Uqf^6cP${Ll^WbO!4vt>i z-rPtRXRyk`J-iSB02-Z^Rt0rXkkMRI+rdkt35Z6=p{W6>+28*sjRr~%Go9R98ujumtYoJ=-ZD4 zq6r8@$45dBC(I1>;swzH2zKsVzqq9pdWObC2Z!L_VCe94PK9v``~^dATEc2XCu~bF zTI%B6yyJd{p+hQBJxO$0K~ zD_iJ73}#t~d)Pli=#X4gH!7U}0YWDSd8f6(9G{Wr>m4^1giZ)SLm?~4X#|88`w5}* z66160VFHJNYzeR$5Q4e)n37!F1hoUss4gk4ZDvA; z!7B9)8pWT3IF-G0G=CQR$)9PdNDimvRh3mk;9E1u!m(B7%SF! zZ2FA1Fm}jog2kx_qqeNJ4dCX+*DYVbY6gK=X1&e`@*If9d1j$Q&@bd!NhgH`Vx$-i`DLu1B|PNym=l%>k$hF=`yWNAPB!JY*KLJP|;`Aa5oPg75`&7zSYngBLeP1=gV! zlre*gn*}(yIUp96V#KDTydl_3pMjl#exuBXbxv`xl|AR_Wlwi<$#dV8KjmjLRJ&%_2Ocd0{h5N%&e4 zkepGVIU;Cq4uf(z1e&7*22Co683N7Xqd;>`H>2t{JFLXJ|j|SyMV$|8%j767mK$lx;Yv~vc3g@Eb7~fo!|4g-C(Xx?oC6tu_ zlcp#?23p2}M>}euh#1<)#@wG^Il`B-ObK=v1(x-UYe62FStLIeSjGcbo?ipL#8FsO-&Ib^6ZaLS^xhP}#v1ED&TCdZZ08WjrwD z&gupb#H0~8g1AUIB%l#Wx59o1DGPFua%==>6<`+oWepN#5U_q>6%xS89RZa6W1+KR zCENT2$}wSRZ$p4t;>`uhcmT@tD*P7W^P^dQxq30$0v2b|ne3NGPeXmMoJ=i(7e z4hW^e%qY=@2PTK)K|2v>@QLJQ$<4)_Ju4cXn^-&tSh6=NP=?nG9+n)Q1c`}^pr8>f zxuyiX!Pgqffx%ps>a*z+Kc$hS6*PkFcAv7J# z5Mq`)1pWlc#6gf;oQ^hCm?pd!*(VxR$+Rh+JQz79tOiUGVnsTPfss>aFi+-djYC@? zycpRdkK-JuARLU0M;JLgu?i?ly{r3J5IH@Qlc@?xuB0J|9PEuI>rKuxc_4CpNFhvC zgjvNie8z&v8HtUs=7o8b5t79Vkv&4t^q}0*fd?Xo`NK1fbX8XNG`HVFFuwlCRYd%^v|FV~dc#%m5*4R6|;9 zYmx{cWUVrUGZ?KQya-ttRHMg&>U(4W={{ty8+$7rmruBoR3odaVbDLqjQEn5Z=GM^f} z3Da?ux)UQhNRW+mRP3|pa6bY;m2^C_rKKiZV~`yawVGO4td{nC{y};yK17c-+|p|p ztq@U5V+u1EK#y8Lb$P-RaV|>MjxQ>hGfNIB8iA6<^`-|WWtY+_;IZP;yriJ%TBP5i zWCDRCCPpCqFG_|`Xe??Y;^JcPPl!ms0dE``3XLU*QmFN^H~_&UTmyXAgu!F+{5Tw* zM!*Qr2$jSt5=O9sR8AcH8;6IFaP?R|JXCq%AzI8YLY9?nrs8E~sZs>&ASLF*lFO;f zWh97RPeg zuNb;p8VgTtKo~RJTt(#*fprrvseEKS#HVA$ zINEVs<|_)f3CiF($QSOapbAka1pFApS4f6jN#&Qp^CRFZF1w2=NH&H?SY0P*sz53c zvTj1@*t~aTySq4~l(lmk!o4UpQQjpMXs@;^BqmW*;_0JcFDJZr&tgmQ3MxNkf-9oE z60$p~M6zKJqP-dlm0-4S^)T!mj9T7ar$_-WP;~iGCj*#P9P(X3?vTQhWn?I1a-|fO zOr}&)2{WSr_G&7D5Gl)oQK)xAD7c7E29LUO5FsjC4tZ6y^Y9G}@SEjb;em0dx$?QV z(45PiBwgIS{e!}0hlT_N_ZH2z8_p z;`wE%R9PvkYEo8F8Lhm6R$azl3eUt=z?0ThGg?$rQ;iDawX zA==A{R9@#VRz<}iYk~IiiOABZMEozbSBev-9Pgt-p;9Rti1uo#Lfs(*mUCGz4p{Hj z3aCx8B7>4hLSUN=|L;(5;tXUKc}iHCm!_s7m_?Z|OnOm-@~%!3s4sjnsLT=R6_KUN zN@I8flqClPly#6r%ARpaMiVrkums3fnLP2ytGzjy10jg?ih>Zy5u`W6g^bKF4F%FW zLA45AI_L3_-t~#7C}l~I9z`dEyJdxcA-$5LqLT~abWq;pTw;OrYAaS#3BE-(i1qsCx{{sZAna{{wSWb+UX;k6ACucC^|xkF7E9gMuTMg<9! zMl6;m7Fm1*;LVTKN8%KmV>y5~H3ljfQN|(pw}f|fu^h@T8P&s~KxEMofH%XpoGL_~ z7%<3pI}<>nD0y#sVVt(F>CNT4J4&UisUixF@gwl=U>I_ngA{Zr@Guo;cKk~aa;hVEPlRFx zg~16z-oa3zRKXjQ0!IK|0R(tg)as*tKpHz%3^Ei0R1-zlm|?(cCRI%pR-75dOL*~! z@OGwi`X=Nx7z#!M-gIB6`J!awfFZ!UZ=J6gNTTR^{z`aRp5W5K+#yk;_->*VxL;&? z*f8GRQYckR6*BYXrMsNi@Hj`0s!>?h-O{r>>aw?9jnN|J^-c7WFVv)3mhn{$%j<>PYDfLvU>NNj^U+`{o z{$#0gDxR#I)bgM3?gUg$nx3QZ?#5`bda4YCYUma|3hy=*I)G>bStXviY(&g49^u^- zPiVdri-4bW7lj<}=&}-Tppq%7(|lui>26)VBWmtaT60+cjCX}#QO5~5&WW=?otL6x z*iXF62{_&Ylb;6gId!6AKMbTi2{WNVdlp9&atF(1A-zA`6 z;}kzdlNf>n0Z9~6WmP;<4kh2J$T{nV3_gxYI8A43sqcJ&BWoia5vEtdN*N;g)cAM zF+z+x>qDUwSWrt8Ok6{LMY~`?X;z$*3^L!+cWk(u7d}O~6bJcHyNjF8))<1qMwwvgujB=yrF@o(a6&0bBoO50SgIN(aQA&zV#ZeS&+(!W3I8;r)wP7lMZD`* zFUYl#k!nWEr;&(P3%OLy@h9RH#N9FAFB!iz_Q zH`*Dx8H%yTFyJMk;4y>2m9rpOC9-me?+(TlZ(O|~ZK62zj96I-n1%2VUI^IDO%5{! zmk7#1x6Dg;1vqiVoW(eaq8M5}40wmaiZ`rk2~m`4faw=!e~L?ZwNO}boG+(K)o}a` z;hm;0Q%xoM6c6)VhydoG)U``XEyNpPYQl?mBkf`27owPWjE#3A-PK^eD@eA_8OFOH z4h0l%T-D}FrqqFj5{#jEVgiaM4xR`(7ErM98Nqjb^h9pR0IV^Szz8gLbEFw`L zIB8@oag?VrWR6HSoioIDf5s9o%|UY$K3P0RXmc5HFqSw_7p>hCZGCwGZ>R-Kt%!1d z`C|dzu4EY`M;yuF0$xFGByp4*v?u|}1ScNA8{<7_lVSW2;2j-Fyue!=1j?X&k`aJ6 z9JM8aIb`x@9C3slSSCPm%oq#sa^i?rG@&^opDct>a0oAHD2{lFCghZ$WXnT%;elEx zL?T5wFzGMY9&gNUPM!g4{1Y?1H}h?f&Y+&Nnu?3Cd^F^C}+ z7>ps-l!slaUjc8#WN@W8**^LAfEPs&caCX?a?pV-9tl~M31h|&Lk|rr z3Ac>j;9V3wyn<;74#jX#G|*k*VC*o|>T;@_oZ6V7!%=>kUKFmTi0dxQmIKr9u;f8lmw>Qts6EsiNrfp;xkpC}<2Vv)sNyoeGF=oZ zyr@_OJTaJ45T}6xg@ZUFz1EE1AYDBTSdqz(z_}brX9!;FNI9F^W z&ULh?hQUPDbC~9$2;t5O9UeIi`2-Xo9Oi`j0!3>NZh-I*&5ie#LoHatpG$L5d~j!l zK3dC>QA-$#4i1`vCIb^3xG)z70mI&~HzYt&9b&mCICw$X;LeIDHz^0^`k~zl!X)RP zFgGqh4J;H;avx&3C^mR*p(fh;80;x{VXiwWW~FH!qhM|b%B6su(-6x=p~0=0itr`| zhty|s1A~L@kOwEs@ctPX3^OrEDq|bX%W@fUGT?n_)b9irY_=8;hJxq)hZ1iE_)QarP@XX}Kgf*g*~yYuNIV z+)&OCM^SSfMRJ=nG|{fHESa-GJqF43w?MftfU+AaCOFCtItb#lkYSEH7!h0*gf>1n z!zKc`1QZeMH39Y6W==dHH`X6*Sdl0Op1*?JTr(ts!ZC}>aq$ok9P9{dYl6}gUXB|z z6}(DPunGE!aRml3ZdnN0IU(>;+92&GDB9YX^6|xd4}dqJVv@(D1KdHj@i*@elcEHNY5z)QCYQ@mKoRS-4wfqDFJ(X%it$;BBsO1-sqHpDY@nq81B@({EJDO#Y5X`W9xo(DgJk@&R1xf8IzE2s3Mz*4G{iy- zagfi#HZ%=50}-&A3{^%}h6BtXjX1(oTr>-NUMOp5x3Lo=!X>kYWV{4bR+h=3YhnaM zzm~vpzjDYlfLw!2R+z(NH8B`|qJ#{!97ZjgERHH8Du8Gi3hTv*QYaEa9GCL4SV1hF z0MWW+X=xdnG@dLeLc(*9-&kS2eEj_7SPVa+j?3WZUkU2Xo;)WRcKRWp>wmBRuX%uv z4~yjoT8%D#ES8UtZ=7`E+r$UsI01{rlzW*q##R?5*Hx}0A(K21U^1~96^9cBEgsZ z38PDddx;KRgMV{AgL_CMk|4T>od1Xd1aR@7;E8ZX+dEfbih`Q9fr**rl&RCEO|_bA zY78Oeid0Ea5moPdy+BoKT#d3gl|MMXs=xRgg-@D_Zcpdc>~5$V8C;i7Q< zBTK>)40wJdR}#)UWV7eV>rR?7-Nn<_KPVWkKz|=V$kWUWw3KATg#>=J0E;66N7K-q zXbcCoqqBG{EG#BZo@_bdf;ZsoJ#?hdq)EocMurn78Vp`~6Vw$cVuE-q27_IW)SsDb zInz5RA|@d@H6t@KBRy?SN^(MUsIQByxt=OjLWsaI^=FYmH!CKqX*|`z&3l%wpPzp~ zKww}H$MTS$S8#ApP+(v{fWM#btXbX=u|14l;U}SP3 zbJd>Hm#*Ku{^y0GyVi8nmE>k5MflFN)K{U1!dNq+5D3CDT4po-W9C52HJs;N2q$_M z7ej1xNeLW4#<@!2HM|8UeHWlG?40Z@$X9wAx>6G(W;vK?P=pB>i;tlGdznvM>52<4 z`;aX|SKqt84=$-M&Wa0gw9rwI9OVL{go;UUNz1a0JNE8}v)hiJICc8W*>iuKKY!uE zMRZ-baN+zPXW`J(C&akmM>r0*-|xo`a}gWyyOL>Zr$wK zBX5WF^8W6B+P$DMH_q42NL5;RL>Z7M6I|}X0h|99*Fb+??~fn7y?uTC{e69#T+LOa z@NFpl#p1(o=;83y2PbC!yuO@WRGBr~*-TSLM1ZFfh{)+x{k-Xa@an9$rG}_qFQk04 z;{`W;-@UyZC20vs8ReY^;k-ib^{Jax9Or4NP31K}Ovz~V&<+2i-^;x%)%0#d(t%gp zV*j`+-`mE*WTL*FuAaf9nJJr~Ul_dZEv-!PnW8NtOc<_&5~^mqhCcqE{C;2HWud}p zdfe3g-D%EKO?1>0VX;D$l~-2Rp6I^dJ@>bbUl4_RS{}a7KX%0p? z>qjH+bFa6pv+PVX<;h~gfi|jhsb_vB z|G$3K^Z4GaM?9(C-n(=2`qe)#U%q^adtJW#=bu-v-?%%}7=FCI96eo^D#UdF=>LN! z{dm0mQ0#A|CdqXG_#Y1Q8Q1FrGs$J5obaFnK>v8>zi)F<$P_h+K?g{vSsv%){@tB% zbHan>Bqx0t5eA&MH(zj?Z0)Hv#YT_0hs zCXNUFf)cXbpt#IfHDnz1e`ZA4XhH*pQN^ z3VM#C{+^ad8+DHV(eg(Wp2HUAa~((hUz%r6Q{&V>v|J?!2oUfX=W*2kp(eyi1wCpB z7k4R(aT-Vc&rAHw6ookh5XT1e-+1c3k?v_EOB$Mk4w^8Y`n%&Cb)|_T7J}oN|3#tG z)Fn9M-?00~Q~&!SA5#TR_y1Gw2l^@kS# z!zD0o^}naq%Unf#XaO|-`d>!bOrVg47J%cg|Cxt@yeMH*?HkAb@9`963AAH1>KeE5 zf1oGztM|t-|96#ujr@}R@oRr~q(|)m4i?0?`Tw@qn496_rvGoDQ8jOz^M8x0?z*z$KNN@ zwPnXJVBGTmB4p|Ws>m-BpmEdxCf64j$WH{ptpMYu{{u7CXR)z3Z(4$zX~Y{8Fr`{V4hz3WJGH;K-B<~C7=XDKkw`q}$(ePI)9$ou2C{^joT zUM&r=QWpRB^gpYOv{r|s4~DMs_WvhVti2|ANc;Hv|Hpy^2W>b%V(1$0{0}Tmbkv~? zX&?XmvseAg`d26XyZK)p?=a!tEdNC@)3yG^`rq3gVe_xH|N77=D*s~t_q+t6az+2W z_V-r?Ffg92i1F@!4#Wck5KN6hvWq4OW9UjG05ufBF~D-H5!1~>Ws!{O`EK%(O{_pW_`c6xH6Bc4M4*$WT8B2o;z9-`YfCAsL4c^1i|Z-h84 zlC;X~;fLOzu4^iY@v%44Q&*Ccp+GQ}tfJZk3`MHDBc zp@*7#<|aAmN(+prCnIm=<0ptv6<2a)v)P~aw^e1w_`BLoF@rz}Lt|4*8z-OHiN*VV zaBtb}Zwu;)zu<3Pu{beRvsQHfi>5?}3FLp$4?%wdqLLBA`q}-r)-=&_k|TqCy*%9A zJ!b{Zj!h|AG4zab&r;86dh-84Jq9nXX0Zo}yj_Df2}VCD!D}i!zr-&fq%kBPCF;4p zfmvRVotBc6n3$B3p5MIn0eTx<4@zfF)`obEf6P4wgO^a7dL7;WkQQO9`5*Ly0R-F< zbocNz@aFQ~mGfB5^p?)`NAC>BB=l?xvo=v5bMt>>mhfUqGdR_yr`m6d`rw1ABkvgT z7atbmh92+k8>-p)dTzjVieCU*RGvd;Gv@^IeMf1*Zbie ztxuryhl8|=hOu)((}p8gA3lHm?(K`mH;->(rg%;%XuVgIR;}+{rINkylpJ)HRxHH`B$#-Pys~!g!*dj)tfLRH!IQlAEx}@ zWdG}d|MkHCFFlYLZ8RB!+3~X8%fnHGB!_s6h_llSA2g{zKSVV74$WK>hyKd)akR&5 zx}fj^{t!%e3d(}`4Jq`)hgr}`h2sP;&NJ+M^Z8yM6qpxwDn~1S_RF_7Ecp^NDu^0( z7`F(IC`pH)OyTj%ye!@OJgtl%iVinB^lw*aagY#-(D^{oAdIjc{ZdDS8Rjo+?3YU`c|Yx)ee6UxLW1B=Z0 z*k_V>joVe*4%@uENxi)-W6!gs_JB+6{j1A=EtbMZN72=L=?gNAERubtyM2 zdEt7;k)hOF+V@CVd7VECC%Syw#jecSBN5cbfWVdO`Xs_rm4BpmsCM&pCw|*&owdec zh0E~}(ePD=J13;G`@d=1e42l;kMZEagOg&#_xaydN>cs!79XDEG}W1!t+&Bv&quw* z11>Y|Ur*on>O*hhg~Vzvv8B2a>6XRwu{qu}>_Dr{_tvr>PZy>Q_)JyWedy4kvb+29 z-d#NS;QqsR9${& zd+Bn|S=t+%0t6)u!|#`LAI0mnXI#H1>a-Xgd*Q3&z4*HE{f8^KV~=HggTEh(n3j0-+PyH9Naal&({Yhu$E#z};Hm-UeP96-vdKUWr6(AQ)1t@vYAyA);B z1);`I$JVVBYFw|qVX>*T=$Czdo5WspNMAX7F>}%W*-ziRefu_ed)#@81q&B$mht&R zPu-%;_U&I=qq~JQ-xnNr7W6u;)6>4B4fp-eyjHQ}>(gsKb}_yFCSIE@IB{uJNX47p zCl~O4>Vy{beeCbL}Yg)D8{%K&2B> zi`}(0TseBQD$6K!;y`espW`&ISP8<$i(9hw7N^EfPCCYn_oXi@riSg!e4@O2$Bs}> zEt%z$%5UEmm>~brUnpf#ij@9b{>QGt_YA64Rvs=s^!|$Hzz2f^7wWnn%e*b^eg5@t zL)EX<3$TVu=l)&mre|}mCH%=c(SWr1H7d^Th0E5gG}h2+_S~^#OY7-FUmndjbjojc zbUJ2wXzi1LTM<^(Lf0Dt_MNDBy~9X~q9nZj>9cAIn-so}vB?G+N) zv%aZZ>F9S0xVDn zuvo*h&agt(n=^k1ItbYR(EQ8#kB(!x_zA!Y*3+GhPaIa=1 zpP=qCi3X-*zQk0b^ybfzF0?s5+P+zn=qEixNP=SPwLKCkQrosytXjM!Lhd_0C~jUz zq}>Ds^2D-(>6A~Zt@C``TnKYR+%{~R-x243=g|9aU%wvWXM8W!o*QkfIsIhE`z!9# z=eev@vdnyZIy{m=o5h|PsEZ-(U$Pl@y7J+%CHH&#YGbY(AfKGoBr{;WVxj-%$iI&z zsN-#yifxxQ>`Yv#FeBih?vEc|YIXfrg!xRb_!Czheq5{V>&C0HkuJ8el7IFndY@5r zduBrTsJp=@*rs&rotOIEw<7}0x*y_#=(n?~OJ^&01*cwDe>G|Myjg$ft~nGn_0#2d zDyugeO*}NULK+Uvzdk$vL3NqngJ*5l*;nVP*)Avv{Kmfg__0Q7(&yEZOe|CKeStSW zakBJPX_Af2W*K_`k@^@q36x2{R<+ezEIaIZ?|uYaOHD)E?9Cd|AfxQ zvnqG>!1xFl)n%(5RlF_ii%g_a zOxM{^tpmz5wFGMdKJ{i~3aEaF3N$*<5&oT+Ec@q-oVvAwCz_%>j5qvfd7`U)$0W-C ztlQ5&`*Xhi*BD)s(#O7~pYPZA_1q6E%}n^yCrw0JyT<2x_M!W$dQ+m|VK-bP z>99I3#`7Ers{hwPTOLK`9ak!htFEv)NwnbRC zAE~+YC-KMIEk<)EGw)tp-s2LPRsZdZe`bJMq0xZ__ZY2Hh(R{TDju{SZClKo`Q7Ev zS@w#(XWQ<(_L$jAv?OY#mnuDx_U-(!t**61Iecf*HBZ~?9t+>jdY-rzS9c16dLL(9>3AD>%IuZ8UfRvu`A05%5lOblKH;CO@yOjk#7Ri7>qO+H z{KvY6lkV%vll_!}!Va5Wf0E!P@#o%zIMYR4R)y<~wk4|+J!~HM<9?Q-NoAU%Uelq{ zZALY1E5w?sOx*;X-s{=zayMP2<|TXlbO3h4qb7a9Kx0RIz%tnyneo>`*h+Wm0F z%K4rRm5a1KUaxSnTGWv$_eAHr$G6&*-oZyAWJz5@WIg<+s_Ndzowpk{3;akd-kt6< zukXv@CGV4u%N$$fMKoYMKdVds!)3j9dP2&C(MIzO(UBE!-o0{x;FdGw7?RPH8R`dcU5vPjjzwCUD%Gl*DtOzETT>RO z=vQ|PNUz?qB>aK3ubiFDrj9A|YV)rr>q5OL*&V*=s9=5NyZC)Z-A9i;>^Iu?%2?m? zsNSk8YdlZ3y>H#S*J!o$CrO{6OWTBv6Ao?MxH0cshrzw$XAbEVKUn>@O!2<$H(#d` z+3%vRFrH*|(TZm%B^@aCOL@{e(KWR1?zxt~Cx&0yvT3c(g7lrX_wT$^tiLNdJ?uUi zJ9$6T;MV2KeW!(LSN~vtX}@~NaN1m(Y?E13N0JWzpN`nKSLmsiZ-~v6jIc3E^AfDP zP-SZE*=A4ax%kw(*N3Llx8pULba3%`lSA(2l${+38n>F7+#{Z7#iZ2DFknpx-k=)y z;bhfbk$L%Qa&sDF7ELJ^nIEVx=R5?V=-f21yraxIu}AjTxv zWYNWWa^KHf^2Pe#NHVQ1_0$VJ&y-4g9$eh9YuCWLLtB!s#?L#t^@T-EKsj6d)j;Kh zg$EpFyB^ANO*z)Rf9IQh`zNN}x^-91d0$86nzYrI_&0k^Kicx)b_$NDG1pg?I%pbRcDw={n(ak8K068TQ= zkH?xnUx@qoSLa#Er}_4(U1uCV1~xvO^w$=bXG`?O=blkjN}V8NJ3+W7>yni3R1M`s zCp@(}YGvjM`yA+HCQoV476`hj>>+zH>O|DlWe(XceA8M5-h6s~?Dn&+`T2dy;is(| zV`AJk6|97Uj`3;sNl7AU_m>vl*_YE*o&M>g@Qum#Z~1$~U6#OUNj={t_p+%U_sTwD z%yCT_I1%!9>Yh&zYc|&7eAz*|pAYX|mhsNK{Qk|gQ3KzP-Ha~lKmOPHvQKWQWt+TI zM0Ad?n2!tFu4`X&M!8c0*N%}s+oHpFN_`Ej@cavNTliLUO7Hy(Jr~N#;(Ke4SYDRQ zQ@?6Sj6CeJUHInF6Sb}z8~q7|5$!9<0Y3s-viR1mthyjlu6|d1vRm3!?8=sI;r5oh zFEr9m8&FR_J)q{d(=_t?(W71`zsO52?3z;i@%^TyeX1If>{hYAu(>A59||-o*RuUn ze)J!zx~Kd`r;nJo+~(uW=g*%@sjDydo%kj%m7X@xefLhrsVU}~6X}|^swC@Go3exqthAnm@z{lgdEMc?W6 zSblKTkB_es4`22Ddiuko>EZ9@Yzk>&)qYyPt_!ad}#2*XsLIYI3MY9K@VE z3@O?s=9cr1;7E*t%<9v==HaKKp31q-Psbw|XOthd z>f_kU&%}Imv^<-&<6Cw3B)+3-LsjqCt0 z$y=9h*SvLL+saE>-+%PHG`Q3J>PDX9jg;4^fxEXEY$M5gO;D)9oRj+FnvsySe8$1j zS;t;p47+sY+o5N(()w?8H%;p<+mMbuB3W#IcClyj4Xdj9r&UMo#qClpF^XFzyV#Ow z?OR({OYEDIb?iiaO_X}x+K%(z-TB_iuK4rBT5T~hW9iDrg0fw*XOs&%KXhX!(LBE& zeJ3<+B|TSRp}fKO585{0jy#UFDaiRaQ#9n$eCMP^i!PEsr74_$-TPF2e!OylUjMCD z0a7i)lRT3qb>rq^pJv}GGWFTTsP5_k{&a==7iOLzvp<|rxYZHYD|daj!<4&Qb#}ej z)wp2d{-<0iH=9}y<5Vw5$c;wXr!$SqLt}M7$6!CcP#i^EG zC?xfgmBb1cTF<4PY{Tl#f$%_KO>tk$6_<$Ekd*f6k3KidoqoZB6ruiVCI1V4Lxpo6 zw|N*Z4YoYrH2LM<2MWKuyf(w8O(#X#*mP=K)u9>?{TLI@#WVhOtN!Mzk3Hf6WVIx-BYuvg{ev^G|BD>$# z>wZ^PSFyzQ+_$!^mrWZQUYwS{xp?tnw)8A^p3D6brw13Gd^B%}J$~`cX&LsFMb(?$ zUQal1Sn^rKWcdftyN=A-+sgjj_c;2S^@38ee5<4Qx>HPjR_gbXSd{~76{_~DRCGp) zY+I1q`tHtanK!4W<($4-`0`TE+k1T{9|zpc^LzMFEbLn5w~Y%IrY5E6Yu(xYAfkR{ zrrtmnMS{=DCNnnk(W<-o&$|0>zt8KM+-bAUicd4|Xroun&NC)%srDxI2(E)ThyDT{^qjO%?D-qTD>!6=a9rUR@EOVIPiBjzxF`s37NvZI(@RlGTqkg z_YRn)b*Go`#apO-*gH`HasfW-$(1XM8)cbz|3_ZDZP=yX`s$q>QR&$-q zwymaWRS^f4uPvUioZQ`4cE|^_{EbaFv-Cqx%meZQC%cD4z4A=qYnaMs{oOT*Wt*#J zGmqNfA6$I2!k2e5Hk0R8*@@p=#9H#*%YKb4-xK?eDc`=Q9h_hGA|#Fe`p0{-X0ei& zVT#IoR~YWfnZ2FwwaA8qdei9Jy^Y867);-=LxR@yXXR5WI{xi!Eox_*Q@~>*K`}VJup)Icpw|9tJekS74JN`g+ zck9tjJ8h&f{W@;nrKol6u5XXu^v``@B<}Ly*6!JlR`o^Py=Y@L@SOc&Wqp~fv&8E&jH&4YM>v6ysyPCVNk!qk~t^{`l2Oy+4wtZ|?ul z`*-Qr={K~>6xN)2y6m-A%`E!7*E86U_W!*(DW&dY*_T5f-c7naNir4I7afsF>*wOd zCffGwy@378R#u{pd8+TP`>|QpvoOoqC7YYNo6OAf*k;$B3e&JNwa!Jpzejs@(AwX* zXJNGEewm|X7d8J%b)1+Pf3Sv>5Ovn4yZ>4CSoHH;iL+FyTFB(?8(v z$%rmhq1MnZzREsVqr-RI(NcBA9Jx+?;r>6KdGy~Da$J?me)cW5&&PH8ijqy9LVL93 z@YlNzEPrFtd9JDWq23i2TK@WJRVl0Q`QJOAzbbFeqKo=8k+03_!dJshB{I^Izh|6# z`>77AP~fQD(AqWd_3^9(%IX{Bsfw=GeD`n3eRC`PsQ065M_64~25=sd?C(X-4EwZC zWvwoK`;Ne#QpL8rdj3vHsX<*H?)?WPgSnc*(F*WAZ=QO@;$vx&dj#`zNDmFmMJkh& zuk7EoUHHJ?hcmNh%+0y9&Evt$&^nn1$Camb4xFuJ=RUU}cs%*ByzQx_+_wna@~@k3 zU)%MFaqmW<*|z=aJ*v!8tNZ7^pFH`Me);Ad`I8TyF?#sQ#O)6u+0R(<@E?huGd6zP z>G`F!@LWSrb=IQ0SN&dPF5A5bTkL)R(>=ojKUjtyckbO?Kt1(n^VV&PaGghGinTsm zzZ*MmfK6G|o3Zh`;CAr=VNt$2MV=Q1&OiAi`&}qkt=+A^ceBj9-j^ZY1EwsLoYmai zEVU*J>nW>c{K_fP)b-KK2f}ThgnQ)E?Q@ij7+ci-q%e08LmNMuU)G%F;=ZAAq01$&EfeoiTEE6=oO;IJ<+G- zYiXMA?Pu{vsDIS(^oWak7nnS^|3)5tAk(pU$8xXF+SgY5Da+mOuoHiD?@(Fa%6okt z839?*#n?9r)2CH#sb$rZ92=OVdY6W?4J0>GYGEAa_RHC%9unMfv-zsWnq#BB)~}v;Mwqhy)1o)9>2_{{m-unDc?^5+;=T{37N!>nILeV~ zw-;Zvpx+s=*)u6#c`xCp*siRW0PW^wtO}9%kT;tJQqL(hZ(96vP8$8;LF_U4YLB{l z{tbM}wF2*ttY0NanmYehiP!Pk_I1*SB0uQ6*2H>86i>I=cot)DcFslFHalDgGf&Q{ z+IVWm**wp;u6HMWxmiPT6DOsfxIZ`W@AKA2f;4;YJTs5)qK5drew7s6d+LMTwW1G_ z*Oc0p1QD0U*>)au5=_7Ov<;K~%<{p_X8V|V^Oqjq5O}EnnDnh}mWDbQ)#ASV&5D2Q zF#Ehivk7ar^i;yjDq;0?{|C!JG{5cIwaakDmy44C5RTzp=1<*Nu#a2~;RnOk#bsq8 z;sr!YQ=<39Zj+O)jpTch#!Kr{K_=XvPtC#pl5P9;D!b+heq~A9TlVP4} zMtS`_Oz-EDoAn6?Lgpb}q#2bH!#IT=iEg$>ia%lR%6t|(h&Uqcp6*q{Vs;#t0|_i6 zK7QGO#Ncy{c6cITecg?XP>!pi0Q!-d!mZJsjhA&o4?ou+v_P@`$AV!(F6xEFq5NfY zE>nObO*$L5Zya7}ctgf9GMSl7O~EI`bzO!Jc{)FZo|cS0I#sj}ZOhxoZv^jwOKQm3 zEHY6%amRvv@%S~iySUyuS{j|eOXw;16sYouKaCf0BVJ@`K^9DWd_%viA70I^^nzh& zS+DA5{ltfs3X_)jQem~?W{e{(+w7^>4`D}+cxoA6$fqglN{a;F^{rLZa{M_#0gV3740hU^lNfay zW=4Jq7lnaq<8+#{%aWim3}^f8sug+r_1klX*I(!SvP>kBwQmeVT+IX5W44$bAG z_Vq(6ED`7EUz*BF&BptxTb-J}Qcp&@=WnmrKW>Tzt4Hro@qciD>6 zL0qGCVqW_JMfA}-*A3cp!=3g}8m}&wgrC!YJ*w4H3_a~2GMskM5s% z>@=epfD#FwmT)=X+@}C;cCc56+wA4Bc8vb9>2<#p0C&h=ef3q>P%;l0p3{HaOl1H0 zwwztHem=rquu;rnzi|9A+|}Iz;dh&jZmqA8pHpZGKZWXS5q`h7r3j>q2x*C{lolb| zk;I+klTCg0{rFudV)j0TUuHEog%A%m?B}-}wv8>5QUIF%`!fK}1S-w~s@0)5DFFEi zOG3ORSONEKCK4rKlkgMn z-@o6j|H<%F05oG*_y6>zdHZ1bai0sE(_g{9HgKu+Td%by8=c^D#MfpYg~nF^8u^Js z(9WsaMNV8z2@q#mwWS40;H{?1?MP%h_<#fV+zpokeeF~BU*4J6jNE)e=PLjz1zLX} zfU^L~^E8_YXM|NWp-TYFBMP{8j?;@d87@0$XEr3^1RoWOvGSVHMdIyB?vbJv=Up^C zGbdcb6PNIl4h&Bd5{k{OJeFYG`-}a5R*pnx^+=i7u;!^l=UAMjU)?02=)9BB`J{PnV?U%9X$F|Jzjb8LK>YP|% zkBx1>)W2bR)c1v7BdA7y3B5+!5Nf||LBx%;A#Pd@&`fS;X~kMVvl~frxQTZ{olS z?|;CbhZ|2$%QoTs41-7^4FzeoVL(X&+$04~LNX{v+|rZ=o#gzboGyMkO-W5sNtN;- zZ@I*oa>_Lzg7xPh*f}V%4E9B*@`Q0qkW51kc@YH!*hci|z%STi2X2Tyuqz>M&@_ zgGW~21WAMS21b7}G=(3BP8>6nk;yozOwm4Zd&V~OVCp}|*(_;V0Nwue_(fJoG+R?6 zzT^Sn(0bn=^(jEK#6wo2mtY+&JR?bbB_L(sD*!42Dz#)|){bJs^I+~$yRi5&dfXkS zm=lgvxDAbw*#CKV%l3!=YUC)og~Conz|o)6e}4u*;io*ar)F5X27CAl0QpM1gt3{Q zQmShk6MY6|wA?>EJ^9MtJw5Tl^T(nmuDk2zpKohz>q#_VT?A%p08wJJ5DuO&aQE3d zt_7Y%l@(8OF&zv9EQdi2l*7siDY=S-tCX~qCJ>|Ir%S*a6DoZ=P66fWoMIq8t{RpP zg9&NL;XE_$k`iHBPFcBjDu|e9!R`| zuap*{6hH!WjVGGy<=Az$A@|C>5$9clcU{u7?uRdmulvfb98Umh`mZMeQUX*CngNgt zX?bA?KxIP(Q0BhrMDA|-RJMo$nYl7|m7XbE_7}f+;=#XtHp^Cyv4gu>8jG#?c9S}r zMDevekrDx?Yh_KfIJulg`Te{LajRaH>%*{e8Sfk4@4NjpmE5XZP@}J&zh|?USz#HO z!Av26SpxR%p%mh_siR=c34TdnHZGy{VDs;>{%#w@W?XM_c3-ewj{a0M?4y$6DOzj1 zXrH_(YxvH?oUg@lT!S_2cZM!-LeN-V=X3Oz;QRbgN%%wCaux;pea$woO@eG^QzB#i zi4ArLjL zh57Np_RufukNzr$VPq(Bh$Z`eEDX|JVvt)+ctbBqIm>StSgCBSz2mgStyhPbl7 zDDZ+3{u%m0pwH1SrR}oB;$C z0PzF5;rjq#3IJtTVR$lMRRNH(QmI1rGmoZTMtTZA*CrDnf;&&n&XyHH*x~AAq^;YK zz>96>QYLY(Wc)baT`7GqTzC-5a`Y!N(J+jDjV}Bw62I7Tc@N(Sslz}RpBwD9eW@1f zYMl{&mPdi-=uaa&aJ#m(;WJM^cLk;$m786oV$3*()?(JuWZhT>QrLaLr&~I$4Zgp_TK(x864Tb<-^?VW6KvD!Q>;K55w2k+LlvV>pXnotfD4 zxqQUFfz7|t!JiogKp{MGiC$RSa@Q%D~Up2qcp98~Kw$WZ3!;AyRV>%~t@_60+Fsj&ek=Y`}X@@6Q|t&kz}IKycG=iiCjB7u4ZoF1ke! zLK!l+2&gb0GM3wvViAGjjE?r)#X@K#|KB*7;mXan#xB>)^N&H}gAWBO?nw@~QU?Yrkw?tJl6`v`>t zr~52VR`@WU!oQ|5W!Lu(f><+(RB29w=*e$k^v~nqkNQDm<-d3Q5AN!LA56gPvI{}-2L<#{naLxL93}b6$8Gs zV;@|7)H(x7x1y!)T_svmN@lt8Ic#5nx?36790#+$vicIRqh-*v+wJ*bKPl zg4oK2s5N7y#!Vn!`2AUcuLM{LMK;thlZ0Lnjhx5E1iR*tV z07Bm2f=_|RrWF7Qq0T1^c0BUbZ5EQZ?n)LRVI@2jF376HJPcEKQ1B`Id?9Cj!?@kH z;xIDR!9eJv@AUWDSRrXW<*B$ve+oZO{?RYRlf(S~qOPLdupZq%&(WW||0kzfZ6Jep z`jzpz%IYc_N> zwC`LS>%`Llerk*b$!ZDU3qJ+l2|suWD4qT!fQe7w0o?Q1EHhX1QZ{^KuXhU?Ijm4QPtQ-fgW`+V3c;5sS02P6h06*Hf zE-`91_8dV^`8wM#!E4@J>4+zEa8WrXNmI-(L4(eHz;-@Q%qyj;QeIW{dd!Uz$_X}1u)&IBmhm2 z;ay-koNri&0AZQM{MF)u zY2+7F-k`r)c%`(;6NC#%Ur%19k=1BV;g_WXpq;|he^qSEZs_LdKU;8vIMdHZe=iSp z*z1^zci_YjAHiw#=gvPavYb``!V?n=yK-g0I+MU@0ldj$$tN?7812Gme-Z|VXL(?t zkets(N`N#;V_%)N5#lm?{x=5-U>&foJ=)R|k2d0dMqdF)=ou!rV8sfg0NCxc6#i@@ zUVg*zW4yjsF&|zQDe_q)&j4`7;LZR5PGQ6Xzs+1ONdlbjos4$R$w=^nFev;vyaY4} z>Aa_>zpkBs_BK}*58%;XBvyLopQAkwV{zwSFZ}q(5(l3CyKXJIAFMN91;BlWF&sG_ z&S2KTBPuY}`d-RMu$1H6{;$>+>bXoLVdF(8<_JZHayk!#{_Sp#Cf9dZ^0mR~834Op z%7AX)vJ(134Kq>9CH$q)A4&k5IF*MR6t`z+YCrOE2EYSDS_V-1xe3U-+Gh#=vJwE5 zLJXOPGXPm%31qT)Yl}?UExq-v{W<#Y9c{H|PU6v@xB16ez|o^er`P^|U$EmlFqyn^ zHC*(}+Y~H~RpSI+mySRis17Ls`B}We=3Uh}kWp=%hQPUi=c}0_@AjxNvesxD6@0QG z65qNKAMY)hYJ$%c6@{OXz5-zPb2QIJBZ(Z|*)QvHCJPuK@xmeZHCYP36oA_Vqyh+b zb|Ci;yjLRyp{%a}H2t510=TAa!1|g-Yp(rEL@n5ZhkK!oam5x!evbYWe(ocLt^Jt? zw|&{#)`G2WgJb@D>8j6S2|!Dx663pw@}JKae)##~4r|{G9kBAp=IE4ro0sG4{0-*j zk&a{}xSOa^e@+E+l&9b`GqG|@04(A&oYLV23yb1(7_|MOXvwD_=Ft&CHz^e z|6_O`>o$)5PNb^W#QqwZOxmM^U9%qjQ2}u0e|&u0Ed^K#>yknD+FIQD)6uwq$A9I* zxIxLwQ>u?Ss`>ncPC# z0H_4A7LJA_GKkb(i z;M)JvHDh&#~n>7Hsh7a zhZMq+AeNp0Xa+!dYu^#jk)Nfi&NLkTQ`ms}W`B<*G2&D3X?X$1@#DwcnSc7j3}*nF zyP*520A?lzVM*%>V_W?81>GzpEUd1=&+ujBQ7oBx*^sh#L-cz_5 zdjN}J`2GR!LFBb-LB?nK3R7M5pHD{ZQ@g_aZi%!AjmAe^D4!%?7!fOlpH?%ui;2kr zv=nHK=+no05k}!w97lal{b{-J=QjTUodUofKt9NDJ|XILqr7Q`3Cj}}uQ0)2K8DjU zT*glm78Z>6^D@2fS6Y=LsBl4zl2QO1?J4-&tfQOL|LZ%BSz7~M`l+D+sEK)n^aI%Z z1MS_&Psp`DzA5MK`=g(Ia$3J2FE17C#rFY2*+>nj6Y>&M-hxc>s;z`-ryoW)jbNQs zoYTqJR$lPB7$(KfGnaZz@=GXtS`{Dr*vCo)55#Z=pa_2$V3-sFl?3@r7EWgvuL|jQ z>ASkRYFd%CtL0LQyqBcf9Ccb;><7nu+E_HtDQw0Dp|Fn+j_g9!wZLj zvL=KPr*M|)--YpR`o+kV7c`3r-r z#t#pz)>i;b;0v`ITo5L~C-jX9XPENkakVrR0NOnBu0I*@Tr|X+C+GI=-Rp$3T06*? z>({Tho}M131S+-HX9nhx(vTA1qraLE^z5?)r26 zPk$x6S?7*z+pVSHr4p;Cz+S8etFOMgVw?Q*Z>O8Ms?9U*MVbLX@+LEG13&|B5c;xNl?+n(%s@j(X%&>@63Pvy zGkzs<7r<~tX1aqaF<+^O(mx5b&~#yC)EnmG;=4H_@e$g$zx{1DrS{{3ZjMSjcI>db z?z$@&H9hh(Ld*~pe9i!93n=H-wf&$6r_$AD09t|c94w?V>%{eIOAoM&JPPqr}Tuuw2BLc`(?}R z=T{i>(H#aE#`QFXtC}I>`t|!|(XBYSDFhM>2|wTZTiY;d+uL!^N{yX=hYR$>BS*V! z7$1=BX)aBni7Su&^5kFG=&yFN&K=u#SZ7x@8zg`n9#SO}{*&xFBRdsGMLN{i3t_)=$H@V7MRVyTkH@#WTz|^bD^ z!yKhOfD}H(bz|26?)%4Ef67z=vg0PE;`ZS2ErnX1(8EeM79SfRmfyO5%i>Wt`6?_HYp1`4C zDg$3$r38ppsF|ezLQ^bKpa>Z(E*Kv42h%UMf3fTH%cEOeMM`{n1|svqU>C4R-F_>6Qq1a|ax=NNfOh+uVll z3u3C9!5s$N7YSMlgJ>X{2(O@D;pY-m8`MU%H-~mN6!9`}WC5=NlMt8!933f~8p{>< zfe>HtCH#UCey71Wu!qrck$Qf1(IkRze7^|9c!evhnqTStv`X*C$t~!oQJ5g(I7+Ha zg$oArGQ1w6e1c>K)!{P+nS;XbMob9HEqLu03&omM@X_Dyk!E{gq!n+5&AjtZq35P0 z>(c12nTZNzeVaCIa!)KAPEY`8e86>43^py-wWh5zo^tmX1cje<%W704J?N$p&WnP} z87#!_=SqE@!=us8;we0<;qjRTh#j&XJee9naV$s*fRIF#@M{(zK@>!i*=7Nl%q}SC z6T^!*jIZPl=Jox`Bk0G`&2T?XZb3hd!UPpZNTYDUQt15tRfeDhpMH%BQUE;px300g z`FGk8@9_E`I@*i(%NyN?S2?27^2Q&o|AU)llV|8lpo&uPDgnEYegOj zM<65=MdPKStXAVr{2(=VU6&ev4RTP?g& zoR33T8if(k`ogdNcJ0LFEOCN=kLhma8%>YhQ0>G;x zF_%;Uh$wy&eOwf;Fy9|^`(@Crc!m3ADBg!kCs-|gFiv^q0)70%;68Iu@W~iF(b?^EdxA`U`Jd7|SHP-5;{}gtu|NHyZ z(k;Fbk;sg4`?XXGR~j*KSYD+e^vjXkhe}(i9Hmt{!Aj{BAB0TrTc0uH_8BCFBV9MF z7{JRoIQdsY0r1@ak@2Ma)?ahNeS+NyJe2@<{&}9B8-Xg?>a?c2B0TVDH@ zUJvFS{u8kl8^%YgI&8qjFZ7RG7ss*S4{jNKmiC1oYW<3rXbx{*#ajAt18 zMuvVFrI&xM&@XGQd6{1Ivp?zf6}uCB2t5^BHj~9s>j~S`a)_chpQ=iE&`*!=o7ny8 zP#&7Z2|g77EtLTkL8uZSZaxi>ZkAb+831eW3GBQ5+AD=C4dZL2sZ^KpsSNp5whybt z`RVF$`}O&5GPc(JB?jSZziGR!2mM)N?eFSEPd(b-ZKF9n`oqUQwf?8DA3JtzTByTt z^NC!P&e`e)-?0OsAjRt2}l7liWtL(WSA5-hIX`!*!t#Cq^qun zIsKc&x&QC88uUXxkrK4_p`NKoHyR zaEaKz-9Bh9KGtlb<1-%#Wxdl1sO%PfggYVWC&;$Ryq&@?90>jXC0%_5FGY~T-pSIre{K8` z4h;>tJpc)gijtr8uU)&=Z2;2Ea9{XXMgpJm9*M8Sciy_e5R21y#Di?Gx;sLqDC1JVSqey>bgr^)ILX9Q~(Y7&C4feMPMg?)v_P*WXU%g?g3@c5dMd9~2IK1~M`;AB zmFuVR-C=ncUn`BDPw5HC6tZFrjSzfWt|vBOm*MbFt!Ul^w-S0m zDu9V}&NfGm*y_XpM*sOuwy{F9gG1R9fA>W81vG=BKi?*j0?;NPX8`^tASJ)H^dr&y zutLUVQ<(x{7BPvSn4Gu%yrXl-Iva84UyaQ_KKeT_+G5Y1z@xv$naw{c0gj%$_m2WZ zBO&pbpBsZb{NsnwEy2?=AdV*s2V$4lrMV|7H*6j;@el`D zE@h~kqyUH$X+}dlnT~#+u2KRjgOKrrG<4T%>Pf3K!h=u>U68`B$DHXj4n9py+SM&@ z0Vm>9FE)X6$o&64GX9;TlX)KhrQqvhJX!*Tj{Znjb@yMjEQtaTu~f+q0u;lt?Y?EW z1fS4-@S~8i8+&o`ubvecnCH>{P8-9AntCB96c!2yA)oz|`Lz2Vq%-3#yzoNXuwlcr za8N)fRI)6K%A_HYwPT43u*ta6+Huspu!v&=UpdB?%IsHn4%oo=686?8gdfO?Pl&&0 zM7(GO>6Vbw%{;yk2GcQKN`UDX(**lfeM>r1_+>fzPvQ{N%EF*s)OZj$&ri%a`aicn zz3)#R%RGa2P~iR1-&X*$rv69=RO_R|%)DwbDOE0uNYMC%D@VDousAZ=#3Y%+%|nOmboI$N+1wERr~06+jqL_t)|$x++XI^uT9tCj1X{bKX) zVQ&7pOFv4RXB1f0!)N~#U>XX7FDMLSy}YKZxw+Y;mtZIz^UCs;>8S?XFA(FSLJlg6 zYd{X%T9mWjy8eh=)I4HCqopSTyt|Nl0i=&FP{dvI6HN&jCPDM#>1I5Q;9|8v^|KBd z)$0qsTl3?%vz}^9Vg_(S@=e^5G{2XBs33ENnEl?jryj@Je*|6%KP_hf6n zd^^OyX(3xyes#0ll%F-&6#U&AkJzOx!!|fF;Vv(w5}+`VMuMW3?-zZk02nUIv_8$1 zj&LEyFGmVScnJqW3BRWQ^$;9Wks6-R56y(!0&S!<`V$($t^RehMn# z$&)ADNa&C1KHXUNnl)?O69D2QBLzUH(O-(C2~Pt~G_13uk&B@K$XknV3fL4})snH_ zzTv1{)ea?aY7$Cd!nH-T65S}^a@My0(%JK`a`{+0m(9`|9`=nEAyy()02Ujs8*qzVOdd03k(I464nA z6|+{3@QD}Z4(9aJ1mnW|etNone=vQeIE6F4@AmUEyi%N>&UY)17*R}<2ea^lA6K-U zu$9U2nz#N$G5R0G=HK^++wq$4%rkomD-BQoN%%Djke~5nOz!@-wzh`0K{EgezncZ% z?ZQ|hX|E-&V-ZVc_#u-OEjjz0n~vCf`UbHa7ZVO_*icu4TMDLXbfWfxe#UD>i1c+CB|KOe)U3k~+Alh<3Wp_?;5 zPWh<-f}4N70&pWg(g0Pr_Mg%CH5$Am3V?MI5t*Qye&71({qRa|KYg%{U>-lMAE$7J z`EEar;#`6Xe}0-E^NC>`6LXr1bKy7gG_wHK%|W%TpQ6$y3@MnP@Cz5h6qaS#^tipJ z<3(%0_2@GaP^q@r;f^ivb)|0&Uu6d(>#d`;k$vMU0ImJ~qraS<(6YL@R=J26MJysx)L8S)Y;9nEtPA9Jj5Q_SSmwhgx}@n}5eDldrvNZa zBe_5N6DJ<~UAJ!CG!qMd#z_hIa7GbehLLEs7ZW$z-Pyg$wj_{G2S8r?(2f(fAsMkx zd^K;+AIn)QUTL6mBYwh5?c^1|}7 z!?}*W`R1El=ZBT4d`#Qd*Eh{DWFm&ql6j`^-v70|L-=?`?H7M| zX-3Po2Ca{u`jUC*CZzRe78HEVKHR8}k)H}+Y+}kf^C#?GtN4|rxlgR45dOXCb@rvP z8!Xw}iqE_y-J6?e6Gwf{0x0klet+sO1)v!KqUUCoOaX|PLMP}C3lF9V`or=lOi+0Q z6RmLiHibV?DAGenKjM(y?Y-f{LmC&#ibKA4cK+&fLU`n|?>8R@vu9ZZk`E zTU$#>_}#sY(I^!FX94U;3cs%aIC9cD+|d^2roUb@H%#j-^*l>gNr=K2#%CTeQ3|8~ zCC#Vof>zx6gAK512E2*Qzef8$F8*jKZ~l>CHLCIEA2J>NGC?Nh=d*b62XP5AN>3=O z@+C;kjX67(+hY52SJ{@rli;$&dr>G1Cx$_9Vtb@$@7XwLTRX<>&t6?+PY-ojR~ydN zQ{bQgC=|3*gt8P)Dh4S4DlxW0kZq%t5|9G$>7c$W;W0CNlakS9qo(~c!ar%JCe!ww z*4OQ_)&uhr{-JD_eeTrlHr3RN&%1N#pL9x(Z9*HQ065B1_^Ajq@=F2Kb?T383z}sG z5TwXF{9+yoyo6rRjUZswo7UjMjwq+9HAs&4{=bWpf1~+E>rT$x_(NtU6Z6eKmQ8oi zkfF)2y!nUk|5s7~em>@*Krk(#goeV@*oboom<3#rei@4Z+}g9mvjF1dI2ucWOLtXZNhM0oDbAy59LGJNf~9bfyInZ}Z7CGb=LJ`)Q+;l;Wyx#W`R z(NN*_Kq>&1O~IjU!pA;`lk4r3+-9glg zc3M|!)>T2>+Fd zefEKs&*Hjo@W33_{#^4P&-U6sp1RY95^J#6(>Oi5Q5(t%fWlA9HH$y``@$bS)l8a>2Boc`a^e!^BX;Xb%pBLp`8UOCZb zyC<8iqj^Rc#kgcbE&+U|4YrF+!x=z5M#_VbWwISo0u&s!A&DOf~9k4IGHE#c~cO~vdfKqLlnF;v9FSoA*=nhi?YPafT`_+F^ z;4F`pYkmno-KTKX*;Nq!pY40n8acC@qww#~thX@^nSKf^pIWS1wQ824Rhmjrg1~mLY_*3>$hKs1?e;|OhwQ!S zzXrpcnWcb_D`x{u;MAYNy#hN|j@w^wHZa^_ow!p$Gl8&K0F@!zK*9BA1EMLF9j%Po zO**n%Dgn})`K1I>skDuzGIo8_Ui;vxr>$uY!cP|9qrNxN7ulC4Znb<Kyq? z7p)ZR>4_`t8<`s{o-94#XllZH9#B-A0r+?lSKSe*(B!fItJt)GU>!f@YGNMyx4nm(p+AKY~-hj5;oj|OXy8q@zLkGEq} z2%CRRr%(S`$MEp*X$(vJ#Kgpl(|-ywaj3_rooXBNvMxdi3mLNopSF4>c@vfbdu)w6 z8*t|K1N?SqHt7oA9?1FFtS9`^C6ZX^HFWF6Zces|Rz`j)0K#b{fEhpo_HM52 z!95N&MhQ+0Gx*@gLr3tzkCN7R+Fwjc$We`_-zb>u{2&7m7mobZ9{&k%AF>?g^~;p- zGo9MVc4Z4~_Gtcn_Cu**+#GcLjP3{cIBRd zyr3T!bTf_5@Ri~juC#s{hRxOQ3aaqOvV0q+0Mgj}y9gJ4ZfL1}=_hafc^!BDy)oWw zEy;Veb5u^lrzK3Xk}_)<)o z_Oq|40EiE1&ORyQCSfAv^ZvOJsYdGA+*Bj+T%yS|GL_tl7p#`fk7N33e#Hrfm0zn2 z=bdMhyi8J43z zN0#{-l}$)X9Q?M*Jy5vFzE^m^-Jbb;d2e%OBW=EQ&o>|0j7NzZfWo!-7|FGL<8~B# zDNh~4Yy}soyfNO2Yss<3#+5`ZPy`e%S_zxz%l5J#*+y>O^2Mapi3$6uwQt&W-G_i4 zmPR%9ao7g8*2fDyhcN1YD|G{2>bbyLTR7^&mLE|PY9>MjKzyX^)$i&9;O7LXTHnu? zcFeaV3V?(>AB_ZnZIe4p36$RZPuo@9^*#GPG1*|>8)(Cucr(l?h9HBoF0TLSrXh0# z4byDgxY02ZX9^23EMN6X36M#r+l;z)+tt>Ji)yaTegz0M)iotv2u`)~y5X^W%5n|P z3cUZ~A^VX{CvE>|(w>AecoOt|>r{(nBb*h)@LBa4Wh;8JeN$lFXfbd1VDIL~FW6^2 zczj#L{>{vA7LEyfggg8b`Br;u@+x~8?@?G|n{{G2qETO?J)x%iQbeRLX-+HQ_iI8} zEfoCZb-R~D0n}alA|+(UsS_8e$g0Im3qpCs@Mi$Id=7_s3U(c?{OU_i*4`z?^#9qx zb~~PF!XcN^?z@Dakc`3gKcD~8?;F3(998)CA7>zoWyFYNN+|%gwGj+l#6tYVmOCsq zk;fsS`%xuk3uoY@U_EWq9sxe4V_Ui=Y)kiqec+-2+cVN^kM*}XyML6&Y-6~z1IiBR za38Uu+i+8J+J64xe%px`x7>JMYx9<=aH21d*};qBm)b*qD6SOW4T>L8jo@e?I0S!-N^u&$WL~PmjYXEX`cPq*#cHZ`A&2 zh{*5TJ1svE!{fmclb$U~fOz|}0xl7@^^V&%oGSdOiw5nP=(A4vUguNf~Pk1E!+6HHol6#cVd;@KeEH#EUvd^yu#a#^I7cl;$>&)a(@bAhZ1hv`B>YkYyz_rme8P5g)PDBQujuX@PTET& zE$+&1GJ+UGOhKsiKS?U)@X1TXvwHRFx}X31d4q12&$g)^LgK)%;0%O$sl;B0++q3g zm|dUy*SCF7AlM%HePz&&cO345px?26)Lt8EuvZ3~>>U?Oy88+Z%Lr~RRx_M27!Cj( zn`pQDk8iXmCNH!oru!W&m{H*FM!v%A3p?Gi>|a{a((hx^S(bH+{_NYOG|LKL9@O=P z-&X?cEPnFq&hC>K1!~{<&l$p_N84=@)6AaobYG*t7=(;K1t5kHy1t({tY5$0G1g)% z0a&(_fa)Q$Rx}WZm+dyoO(g6F>y%3%-D`Tylsn_81E~r zW=evO^BCB(`NrY3_Q2p;o5YuuJ6ofcjFk>jkxqUe%B^rh(o{C+XZ@miHCz@eZb=jX znTJL&3|YUC!E}}47#@~380Oa(%oFtcY2{WLL58yqS_!<|6gb%&+_6H|ZYZxGRbCh* zGx64+N3cQFjJ2pnexG5;94uSwf8rBnn1}0s;TV=?K4C0RhIJDk)j@pyc+R(9kKAnI z6CHMI=6_m?4M7Ra|A~a^T}oJ*6`+QCMtp3)jHROXz}|NIr~SRwpKZfy%2B+#k3AQU zPQ-T>T|B>Nr!@4FpGa4QRqA7xUB7cQ+uVjnb~TuaxBk3>ul*dDNLo8K|0u+qCK8e%XzA9gr&U#L5*PU0lPx|v2c3axg;F1N47y6u+qS8Z((ugK!Gz}d7fAl&PPRJkMR zh&{A7Zh!w;i|rc48o$-7HHmj3@}(E1Gyn*SFMPkkNGl0E-Qp?YBfoH?f2qxqD1fC# z`t2%Toh8UlRmTwd>k!rA~2U{&!ejZIGkJrNjz_oJS7Lp3)zo+Gvclt-4eHj6*fWIAD;;w;nWHvy~!Qnus2=3gRwVT$D*n|70?6a?T+MaP- z8}Aa#3=|T44h-ZEEe(9XlmPpl>BR@6oot!M9HBu^DFV`VVa&{qE1SxksuT-=L1s}= z3a7u^E=4)Wct2czK_>Fu%FHkt<&|Gy@-tp;m!ZlZ(*>RlEi!~9!P|d~xL(>x5%6-7AHH}3X9uS2YkMZ`i+j3laMY{= zw+8cB2O!3p}Uf) z6c-GaUy$YbZomAna6im<`}u-yrt@uCBfAdsl|Tw#{JpMo#Cq$x_6w)y2HWgpronn} zCSAf$=v&f`M}VmWM8`1vc(SbC3qXVU=j$gvqzfT&CM|p%T_F;SHh6!9=+GY10>b3!V{;dbj#10zX$1uvyEVf1H5`@+u-_muz@fQ(N^g>i)8I{;)T z;iY_~aM5 z@2O+$HjZb=Jo-yv4=Mo(3328lz-os0aRxvoLdH3hrWTz7_De$t8jL`WW^GGM>LQ23<)_+kL7(Bqy3D}g0b06_A*Fk)VIjBnXlIXwGs zz%9AgWB0$Lper|-y~b<59zWKKPd=AMdUmizeShRHYkv0xfZ>%4apMet>CdE*Ad5DF zK7D*e>AOpGD}B{R%w7a-ajeEBvN8Mn18eR6gDv*{3y#|Dt4~^M0t)0zHg17+5m%l9 z<)g#9HVoT!tH$hK_x0F6!yd=SO*&gj%K={jh$g%vP_!a#*!PITr&4j8a>h{jeUdCl z37jznKqje&QRkbkRz5%8chAsu#>M!c6|?$~C;u*L9HqGNE%pZ9Lr<2! z_!Bn$mqH*TaN1bSke>Vu*qJh<35{qYH)%r4a4|5UKgHELI0%)7>5JGwPhdlEA8zpZ zt>@R;tAh>p@hgsE&tNvkJ0#BXKc@(=-@{L!|MaED?e?`J_W3tg*aQ9DHp%?~@D6F= zx8J87=~*5KDEz#JnNvJ!dfoQoza}_uC9ot4z-JI3JZ;24(*YG6^G#PPpC9kLgJ>|0 zR*cP#@!jgEG^YPIt{$rI+Ann7_i!1-6fTr(#mFBNes;ER$sAMwni&Lfq~BKn)!Gx5 zcdlV7U$hYn6MWK#qnbuJU+CE;T777P?ovEw01z7}ft!0r?Vh#xB2e#$`yPNl+|3p5 zw>!Ny3fHtv*{|+AYC4LX`Lj!v2Z_{xBEr9m9usGv)Ejc`%`5`G`1aL@i&Dr<>C+V1EXu)A0FoV^##aQ|4`BG5 zX98zT0g!pvptH$T!b!~TLkYh+htK|Rz*~Q7nkOL`mDlO6y_o*LcCyv>jW^--(bIST zNtd7k;9G#KlM14e;YLwgTidi?R!X8!QdxV^il-|kp(7&j>6*fUs!Yv@|<=97~mST2+d<_JY>gq{N@3)wCnB>M4-2krV* zqxRok@3TjSdcYT@Q-h)@=}W!dUHKVIrlQvrY!kKx&WAv$yMBL!PRADrg1<0(9>r0L@~m}4#_dPDkJxR!2W?doj?w81 z!0BvrTC+-b@Wt%qu`Tx8#9G_YJYbi$9Kwuj3~BM?32z+KQOs%Oo~ZyW3)Zz~?KiGH zWY-*+u)o~3#!limxo9ie11Ac98!R`3B>ZsBGHk9!Aw3SNiv&xi0A`_gj(EiAB0ixy zgv?GiA+P*i*^sgwowbkt^3A`IbljdAXvSvN>5u)S1Ss^hGX5C=h53-UaS6cu!rPBu zh}&2;E!ej>@3X!qy#8X)eQ0Amw*Qs@Hic{HY8<oDM0T0&p!UE(Vx&ateZkqZTheD{r&yUNgRc{=%6+zZ4jz{ zrl*ykP;^n5EK77Dq|vBPB|tZEb{6{=6R@L`_$p6++};DhzjNh&TiG-|C&6bOQQWnk zDm2^o#xA$-X13W>yxm%HgHj@K`sJETUnnMRpwMAQ3!CvBz8h_8;SJjsdD(g*M;Q$% zsqeF1F7X-s)4Y`}g0 z7k8AVuPQGLa{51j3nZUCfm?qQB>|&QYvh-pkxssK^14v) zr@Pw6Fu9dMb;?iZ=apOW#G7GigW`z`4Noxz497cSW zf^=SV?v=lC)0cn`cH`#N!RrYdrr)?_ivF*hd zZB1m4TOOQ^my_^GL3?A)K6N!tLcWr-`}(7nnVA7lm?ZF0070mDLFFMyL(P&XfY6%G zp+GSaAsLBQvw$?-_PT!UFm`h5xb_Rv|L+g9+8`bQ_Oz8oEPs@ho6IW)CYe|tXBu-g z!E*dEtCi&|2EXmhLtOkY(Lpp3uEaNurBNDR5&qGO%sz2@gI%>6N(`)6?^Itna?~Hm zb=WsYciQv0i>;wCX&v~k9``&X_=Gw}O*;BU{nh}b-2|J>b=q6Go%UvCtM%m%+ZDwZ zY*XY_%mwfS2m1tP(=A1O8H(>n{Lo8{|G&LA0h8;v?t80yre}I~U@+JhVkH0)07;M_ zDUqTm(y|=Kjx0sHoJ96>EbB?OoLIK=Y=2*3eJ_6Ti(evJ$rn48p7a!3itK2$L`oD% zQG!5F0wod@K#&9ofEa+-1~Y?MdztQj=XZPlGc^~z&CV^3b*gUN zx?HOczl=h0%BwO-FAr1u3@)Zm+u~nSG->DlT?|Gvl~D-NTiJ|tpsoJb+qr)*DWerk z8y0-wM>&Kw)$rpB)iD=wKJ6&azlH{Ke!Su)ptWtp&dJ-hB;tPOo~-*P+fA%u>9UXV zCi0I5@^gJ#Ga26OzA<>a>#twx+M8px*CGF+4AzC-nv?L$0-y->C1F`?KomhE)3=5? zcQJjVdpNb;Ez9h2w`88Nb%H~-&(?Nw&Lc&@Qv$XUe|YCvclfr{vQPieG0zKF%Af?E z=l^*BT48luUhpi9(MDm*GU=+K03=9$hfrmhiF7UKr}5*2t{>-zb>GkLhyApESZRop zm+%Y1KnNs|7k_rP4!E_goYOaT)bVj3%$vd80}bw(OSbx7VDk@30Q%sA^j`RCDuAH! z@juZ9DB)L_Yr+yN(PzX){hZO}H+GM?kG{^i6^o3|j4f?L-?SVn{E1AXd#G=>+n3yG zqkW58+&uXuT?s!5z!!cL05p^p0FFM+;0ez14c3=wo1R=wZFJvBt+6S>9y_Y+8MnHTnxm z2}lu89`#dawH@^oa^-|y!gM*Aaa-Cm?&A+;+|QcXkF%o@rtJ{^3(3Xq^F4RDlWvWD zVW-hPvDFlq{Fwa`ewqJaT8f6MxMV+?0^m%7m>ufbWER12dYyYBwbGs}-0p769B|vB z&zcG_1wRi?D#8G3jYndC^}epV`##;9{OQUG)`j{^)$byrmZ z&@qLOn2J(f04hnRe8tKYgR87?I^73`y+$}G0p9%UtWUUGgJZu`b72UX$Ht;&{OO7z^NPJD(QREqW*{IsnH^5%woC?w7V?+#f%Xb?a=wI%g;s zRwt!fg76<3UgvD@*;x29`KU6(KJ_B}hX&WW&s@0E<>HHik-w=q zFZd_`1Yg201prMDUZ0i{e#%r>_>&IYiN{Ou!!S?;W)WOYu6GZaMX)+h1pD3k=nIr; zilC~Z0_sH_^u2LqtmD7DtNr$W`nmqSh75v@up|6Z0D@8sQUnM)mH-Tw5q&HixT>^D z#1B`dO6Lm%PdVWX6tj!@8Ig1L#oyPP`9HB1tBi%9nE+3oZMF07VyI?QLqi~RA{?fl%2peENP4wVeL?%eilDB}UePs+ z;CyPU`MP=PM5?7=nUQPm`YeD4|B;F4zU7`4JIex)d}R9wkw`6BY)Q5 zpZ{#ez2g=Z{-Aldq{^-l{-gFu?Y};Ehja0E*Jh)>1m7R|!z=!!=vRo2!iIb}+Cw_7 zX(uqO0Enx%GYhc@()La97ZSVOiPQ#nd-j04CGwQ54Nf>Ibl%}c%ZKU6ptd1B>)j9W{MS1H3a~%3pu}|iltG$QuqCP3JWT~U^rga zz_5ogB>03GjYrMoy>n%s9qv&6*e?$Lc(JF&9UHWHY&!LDKo* zaK7nYtL@Z>^REd*2MIqz{eStnG51S5O!$qh3iob#3=sZTM!MX8KeNY;HQJYTTk^t> z;QPYwkNmQj!Zf6|V)XFi6;}Iz#8Dn?2TBnTmcyz7>EHpp)@atbo$PnWdg< zr%srwaw%`7PI-kB%pfo3=ZnAfxm57Yzx*_+Ol?M9-u$yS+>Md0Jouv!6Z<7nKi~S> zwryK*+*e0O$HZco%wW93;&oB0A^hf9!_4TNa_9B>4021WsR2)z?UpZf)~0~&2o%|Lr~UDm!rvTI#q=O6rR{3ffJ!$Npj$oItIIZ6!A zAkQ{pWE~$U0E2<6ngyT=<|`DlO8|UGSPFnse>S%ayUi6G`^DDZL3{IWpPl;`_n!TW zk;B3-M)YY!-Mr+pef##n`T!5C5FaPv3JI;s(LJuIQ%-H>T4^XZT((~HN!cF%A$ytU z!&}d}civ==#_Y+)Ow}z|q;0F~=g#bMJ&`4Di9O@@1s`FP0+2BJf-hPDedo8yk1rG^ zFX>eVkhUwHJkX14Aaqxs<#Dm|{A`ELPm=ez?(|ys#_V_98e1g1>T3hG+wz0=wr&5y zf#j*@E@T+-Q2??65*C&f5S|L4)#-}hks!3FngWdihN2a+UAVBfR3&%JkBug&>qF8l#LX8M2q)gA6oVzpb+F;)2WxQ|g+ZIVYowy~3p7+E)U?2gv$BUvh){N^+^&GxnsrGrHHL%J`#t;xwfhhMHU4 z8g2OaFShOarBCIjerfYcQpDr^C$5IfS)Gon7cor&y_R7+c0tl3z zy@)w4! zY`wJ~Q=fMRF#QEJ1wa85ng#@;Pz79V*{A7BG2%3fs!DPnKVLAU05mG{-v7>y%Wh4} zNZDuqnE#h-BZf##+~l(bMJF!vKveZF!)yASr^*5iIK=3y`}9In{M*55P~nSbpWgY6hKiW zP!$DW6;5%!kWINUej$NWI-(V)^o8#EaY|PX`gs%v`hqYqD%vyedzW$SSGiK{zM22e zn(&`Zm>Fw}e=tzk`wS+=Q^`Iq#loc3J>?T59w(@H#nC?H1#+!+YR=C!;Z!>1e*MPN zZcS_XO;3J3g~M5Ut#z}zlhVyBqa((>gGOY4duaAS@hq6#) z70{MAN}ws`2IFhoSEBE5N3*wHH6@U>wSXOK8W(@~?#4}qyQ~0&9t8lD6@UfcTLEx% z^(+7@d2Ro?b$!ae(mbazss(=ib9*0 zJ#nVRw*A_sm0+Hjp9YA5#L$98%PDaKyye1eBwqK!_xyOZR}hn5ihv!619oQpgUfo{ z{i`kphjXgFnZT$i#lx4E+gE?q+Lv(}CZ1;aqrXgl-%^5Rq7(3HIn_yhJ`RLs37`a| zw4}_K7PQ%-X0&Osd#LUg-NDT3gXzFk!Q6P_U*6NQttA%a+&~Gx6o8a~Zvp6uK%fM! ziUn}BI&Jv+@AeU%3Z-K7_|80_tRzpG>2CI#XLZt zsje1d7i+KDs`fJSbJpRKx)JxjO=p7fp-i(2(n66;iAK})?u%zO+p&GjohMiMwb+MH zAyB^Xi!OpH?`lFR0-*X#{U=2rC7>w*$^Z+ep{dn9R{v)AROWsgV$&5FkF#kT8?v^p ziY@xJyJ8!y90a|P@Jj()VFkSA6o7~=;TP112;|v+B%5;gEVHe@l{lN{K7GE~PIYA= zD?eI@VZ=Z_Q>jSB>AG4_ZKQmK{q{;3jM#@x-@X2vTiL={hqGi2TlL?2ag95g=yWY+ zB5Smi>93Jg0wsF+G$DK~o$6N~3P+&u_7wq^K$D$V)D&-WKd66$`(ft3KnYZ{4N}tY z-_yR?SdZhw!U}+CfE0j6e>yj?0MH0??!;s&7(x;_CdU7|TE2^Mzj{KXj6Si7q9IE_#dhDZj#k$`rmPJ{%Xmrp$00_!1X(s$cQ@ zM(?u|iIVP?x+m=sA#zzAm$S8i-RtVQ-m;~B)i+-pOCSv7uD5AqW}D^7A*#9@lViK0I~uC z3ji%J=MF}j4~|ZwlW@YxhlKr6F)t9j>XCALmfD&B)@@~-ng36oX?6o+HlOuQ{S|`< zh8c)*iL0hlTd9MvyxL5ArSP`cZpYU#<*D$f?qYZ|_a8|&xNn_bZRT)(Ba<&28u2AK zqJdyBoP~Qa=(kZ}LFEZwt1ck@gy6sW>Z@+=-n|pFQeLH{4B-kSpWh}aIjo&{gSFpI zHhRQ8XeSk~uBsAnW(C~0DZXl1Jjw~e5`5qMN2~d305G@hSh)%g;)!ULR_EvO!+w5s zipuuWaZdg7&p+>0uU;MOsi$LLc+x1J1VNDd3ETX$(air!zW56T`Q$fm{>AOhG3pRA zloEU&Prp5cg`3)>`=#;}N~3aszE@i(As;$PyPv(`f^A=};Gk1gRt(zQ|3^J*+$+g; zw{%hdxw(V_C@=Z|X{+yx6#Nm@>{@=Nx&tBzak9?Vqvd3IUFEs_9{EpjEu43v!N+680a1FVi$>@AsiVKI1VkTjr@iXCa9gT* zEy2Hd@nRtK`}gm6gM)(sf6$MQKKiKJuwg?%6x2sP-h`zH!ZdHOqrT5%ZgBh3_qjL4 z9xjzY=yLZi^`$m`cno z2BUuYO3G9_DoI;u8ZjhL3IIsES?_po*=7665u^X?7&Btip%Vk`?uFqF*J{V0YpyRS z1ql?LL>s|M+ceX3C?edMGiTgWPd()h95^r`_{`mLnD2)VA9hEM9C15$?!3YZAPx9J zPauvqDNNhKG;cB9dOCBP+c0**t*<|7RseE2$Ihk!cdThxW_to!hSOO-lt?8KdO_9z zCe{I}q5#6p@(HDT#Nk9V#g~JH%JTEj5sdtNTaS*w5l220!%Hu{Q#_^gZ>>#1(6Mp?Km7c`1Or z(lcW;mv(ov+i@g_dDQnlSBY6OMRjEz2j~FlJAen%%y{-EK|plpXtR zr%cVUC6Kdmcg><`>wO!dOCEkHYiHL7!jFuHg&(aI_^K!XF`iX2;R+Fuo5kWMG8PCF z%LDO;hlhjFUmfAsL5I;HFv9us=Ys_wp55}!eQT?YeLS_`@H%7hila7|{{>LV~Zd zv06|TD2hFM_5@p`be=;TP1%kCwt;okc*a=&Cq~&)lDp9^!|c&tPH@(hdv^1j5l`+c|gL zise+9DZKY|i=DS*9X-z65`HlrPz({qrP|jLdO->QB;=Scd)&Ef{BdVFg;xe)%>P%1 zTir?fm~B(r)CEz|MYI4`%TczJJoEc!pM5qk^H~d`KM?Ffyio`r%6aUu$J|Xf-4rMb zpMR9zkE3p`fj$pVAN8ULumtvx-0rsIj@gGxhpMt5xNB9joztAa{6`27{;=Q&!f)}{ zj{<<`XnM?lh+oX9!vsl3-UKJD*ypO(wkNFk9dn>}%XmV_z&0a=tbZy4)Fg*e!3xI1p^zap<=u=T0MG{el z${rdT3Z{5ZKmD|O;e{8175!pnev#rPqA8QLB&G}xKKNk4wE!gs2WSk$0cj^?NFf0m z?Z8pKcywfJtGgq%-%`%46~N=bt;?c|8=}#8DsRRj{Jy8NCwv(@*OJcC`9z^8u5lum z!a)C?u0>G496wAt9O+(p<&|IxfVP!WnSzQ3G8z((w`2d@1DkTLvB3_5;OK->&dmSk zF1EVvkw!byZt8{*X@2nWy^2$NbRCA^QYcNa_(J&=r?v@Bj{aM{jbw>|>=dvz)G6U8tm{B5AC!CNq>U7t z+eTb7A32?a$A4)%G3e!?=82P#VfHXRM3+MNRuZQ^r5uEkm3-#*hYlSIEI&3iAz+O7 zGj-66vMJ-9d+u@f-FKf`wQ5yhzLzUgeGK$H_(Bi(B(MVPb@2<4nWi+=%&OzP?xp^hlU6bkSX4| zbLWDEJQnk?_z+fvo;3KGI&h#Y76$LW`)>EfH@-30L`HcimgzXP$M1jf1dzjGqxOEp zv&n6y061ZI?i^hiv4cW3E(u-_W|a38Krrf)WZVY}1QxzN9L$XXq6k*3SmAnmdxMdI z#UNgHr9*J)ARssjO|IrZ9BAm2hmo;9q|ETaw}b5w$m++_RsBNpt1R;u0R1u_+fm7fl>g~u>eFgh!`e@?o|TA`IW~nlQ>-y zR>u*?bAAMp9bWA5Mo3vCnivJG^D{OQHrZEL?==NbZZZbdc>nqvFWRVNZvnxmbSfQ6 zy(j|e;zFIaX`NvN+Ve6e)yisRJnq*8=o-+u&goVRyU7W z#qh)IUH5R4G4WKhU-Y3}gmHw`PKBi;5qSCs3-08}lkVuzqd~u+1aK01($Cff(;!WYV?1eXX@NwU8{R#Y@J)&z&?z*=?CGmCFd5P001;^ zNklrM`HHXf|l#V7lg(a_5qyz-1Na5;Q0CU)+SrrwG zde*@Ze(BPsfdDe9z-%X9y=aSngRaeX2ABQLoyp4gPek3h;fPz(k{`(^(|784b+)d- z0mjBkVDXB01OX+0#{`v?0K;pfP<{z7brG(_h4bio%oM26z}cJxNn! z<4i8WrG0p=5ok7P(SDR7w8tVt_$8FkOzkGmTsde@{m^yCjvayE-+1GV0o@UL?p4dt zf4--Uv<=^A(}3>W3OAVTu+ygp=WZHc{joS+XRoI@vuy)mr+ImeGzo(ySIq*b7C|d5 z*B25oK8!$zqwQe^)(IL~+TEMCy!W^ytZSngU>&Q=I>%ho|i^w8NI9h?gZz1k+|K=}Z{Is8ND5pJeg zyvTFgZMV5in>Ga&7V+x)Ijpi|QEI0TrNFV6ve5>2KGWqkG#odEE?LyHZpP|!yy+J) z6*nn(1xl!z0-!DlWjO5P;in0wD|N3}8Oj6ny#(KfN&DpT9gBxtXK?Um8SQIieB>qP zdX1t>Y`Q>)(vf(-bHR)2**KLKE(6?A4tS;$IJK9s>h<%3A5QH?2-4;|w{vn-nKlPG z%m0lU9nW1Fa-$>m7959Qn6Tp~7~Mu(;o;*}zU0bMNa#^6d{YrKAIJhQ^#*OOqM2VA zmXkaq8szB{b+4wD&Z+RDNX$r$+5?%0eb~xZD}FdYyDAF6XUa;6GneVY^%qnGCIlIK z=6CxNGrepPtJG?EaLP?0>h_)QaLYQ(w9e+|j0jcO`HUXEHy78wkQXbD_JSLXueNLS zOPV#%5ly@HhB=z|ny$NSvxyP=ZXl+$@B=q!A!aXz>rCQl6BZ3^#OmSTj+<}3Ie2rA zm3%A@-7nNfGpTbnc|;SR7KEWsy)oCt++vr?#cfxhOngN3j*6NDX$Z6qvb3fp4Yp`K=U&MkGDHki3RK8KX4u0<>{n?KK2=U)p_ zz+l3OFf=f2=Q?b&P75;yvBYeUGX*e|v`so@1(f4maFClWU1$d*J^3*2*RNk6jPe^d zZVVQ75qi=no$9&P5PYG#-(KjzH68^pV2AmR=In`3#MXl50%7Zu#8@lz2(2u?eykBS#&j}SX4d6$A^ z=ecqcWcmwQvyg|dvwF`)FJ9r+VxH2@Ro!!4j(AYza*cz3?dOuYm>bR7C&+D}DXT?; zoaO&)dTZ}`+RLhw3V=$l@Kvz@!VUJ(RpSM9FMO?dV6l6p;<<;1IRpt$n8GHsx7g@k zZx2dJJqpA8zcgZR{@JG zj<(28x2|iEUVW~*{p+Y{fQ+p$4`!R)3Zvzmbc&Uk7|V_sjeG@wcDXtVKn=YX5C*~l zeJ=q3a`ab&jpw^MSqLlROe;Tgq1BxkZFHTjlP`22_`WirTsoF`ZT8_nQWOqT1fGG* zLLiKlAf*5XVhUh29n`Tmm{}y68)ma&Qns5iZSAkb(I>KwpcyoTUI;wLwcT*T4Z+Jd zEZ`yV+=qsKzDnwuk7@iqp29n3h!14=vR9sW=K}YUu^c8S3V@E0@cZGQvZ`1BbJ2j= zlmWBIg_QtI$9Ml$G$!1-wqc`r8N1a;_IP)znezG3pN_*z0r(wB7^gbb;V?4K@!6V; zLjX_;OdD9uMvd4|$TX`W6R=sxL1)?l-Y7bzLOc#+S0?5> z0?%7^gxQ=$y!Hc-7aAh?`0LfFZ*xYY;T&gF($+b6GtkD6R63Z0`U*fw0O62;%dA?o~bdPPs z2`K>T^M&7Ur;nSDm)b=>ZSG+&y6{C%@K^^-8wB;}4}n4;XoK&lBV50KpD=X>^;o!> zZOjIzQkqmVbDS-Z9T!#ZJ-SOA3@Sq|s9xUYJFFh5XXDFMv?MRo|r)tSH`E8vP^!&>$CNu|Kvxd=zX18+1GS}6aAN9czVFxepK_Q7wz(VbtH4+Q30MWs0T$j$x)v9cs z5HDX$a<+X~_!0aG;kR&g6hIz@Yx6InQafRJDFBZC-rhRumf7w zW*BF?4QvXK7j^_*3aM0aw4)kyDplvTzNfwuoWRF)c{(_hbyBHM+?!^AaUqk=<+}TG z9QJ^)`$~YYlt7>e=Fsk#CZ=NF8na9Ml-^`pW`OYs5si}dkUF)ZI3DK_%2=%nLWGZQEae11-xTGJ-+kn)jh@e z>0XOrpGTny{V^AgJ{?L$QYSBFdBjyr_^B=MRapa|aX584LZWbRqs-rQ(krdX_X#WE z7eoof>_m^9i!uL;BLNYUeDm+s=3w+k;C)Y>QUZla5iYtX9E)8mzET)2&(Fs_xiB7z zAG2=&q|MjyvgjPRSky-SkmB*{CM-V()h)Opd|H6~mDjfRZyyRN$&{70+PZ&WG@Upx z;CNXC1)#@)zA^|#e=4ks0svPUDP{~enER#NbkY|}OB`OxKnfsjW-2G)29N(rdcZwfZIdt67Vd>{3}2VaAHH8IKlh5=2VXXxq;mFXE*r5Y8{if$efrmS z?yZ%RH~mFxL0MkH%ZJmiX<_D2o5hb@hv^e20Ce|k`@?pwo$Al^+mYbB-;VIhhZVr} zH3fh*L}(E>3_1Jn=JsLN%HuyW6m!-Q`)u`p)aGUE`)9QG=l!wEJ9eH->FAOTw1?0{V-weP&m`P!nMv1{be^zi_)n6ClBLzx!tE8Upim0-l>n?iVF6qhYXBl{n1CX(Mj>`a-ooR*67tHeL@H_@{j_KQvAn4- zftT4YfeOQL{qyY_d^v<-C=+v+)3&X)1RW~JJ!<<3>^N?Fqmr`*1BN#4^P&1j{ZV<@ z3qPgbW`)D_Kv^~h*7_W@*T(sM$5N-QB!nK}FQx#hX91{zesc=N>3*quN+YPWf_^-4 z^8QFfc+8%Ex7VfIHXi?#82&l;@1?#bcXS|bhg(cl0KOIA3%_ufYv{Mp50|Q^Sh@*( zEwgP}cIOgvcg|j0EMr@%*{6`-a{&%M{lS+w;TDFa+H*bK6Ac74FmV=LTb=Dnou$LN z>$Cl1KYlfH-ip%vU!y-z(*Rijv-}`j8HCl*Fdt6Wg|d~p7f!FVJ|v9y8P5+V?eNc? zEu(IEbJ9$%5{8eBWKY`YpS0();ZJ@~2$8i%Vd^C8!!W+Hy{2rOV7NThACA|xaOD~+ zCTCji{3u&b;e!&iAVWE4sI@iP3p_@*gfTKS7i0VMCk+0+2d~$PQ@ceIXha-Jlk+7y z>Ue55OL~|FIB_X;=~!>J&kAGY=gc!%0a6G+IzCVW^Kuc;kgM21M4SlhLop-7W&!ZF zC4<4rch(+*6>@0M(UiUUcecsSRGYf;uW5iUOq5Y=CRY0j;j6e(X?*-Nh2co^^9fS` zdD5wv89~V3SeLV-trPB)(OBD+eI-Cxo;?ccBl-uNu4gC3=R?sV&!6^^d7uF7Si0FN zV$A^7588Qq z1od^I8{1PVpd+Hv3+5VQYGq z9SPo2H)`@fb89I0W<}4~rEk5MJ!RBE0U-SHTuTXP3P9J*4+Q{YN`QT$8G?cH?GsH%c4Qq{Imb8J^Q!Se{e$Rr355Af~r$6j7#{sSUSZQ zf|Zt0ES<^}&T111V8oQ%@u7CpT(eUEs$*T74LGJ~CHz2z#q8=6@b$gQxSpW;#BZnC zFM0q|wl=jUW*?8SjX*_Mvof-n#roJw$)m&REH42`@WU2>gr82Yz5?(YUoK25MKr=V z*!=U#l=0eSs(aRqPxLI0=E$K8l65b6szn(qtx0yL+MC{Y;g zDddX9la_nnDkr?TCQN(yD$UWMHkU{@%$^BsJXzk7a;xkGtE7Ev0inlB5l9)p{P{k~ zL-6#y@V%ZO?Nghj3`Li;34eoa*jpJx0nE<)f9XQ@{9`W%=05_@CLk$*u=x)|O;`X` zdkSEcRMkOPIfX@RpqP!rKX#e<-xcR8G0HI&A}Tx?c>0`u-rL*xCt*Qg!b)Ij3G?@g zHb4)*EresH08S^H+==0Kw|$W@V2Q2K{p9AKQuBX= z2q##i=y?$hj=o3WXq$ax+db7|AEgKegju3$$9b#G7(B*4N-JChWu-)215j!%)I5SggoO za4(d1ruhn$RVWU;X_Gw4?m%Cs8%Wys2J`x?P`1kA%!1g}HRQTt371Gt3O|hQD+BsP zzK{Z_HVrCk%=A+UZ=gKwQ(Jvy7|_J%63dLZ?JZ}lvRNDjW|rLldUoWQS1xBRSV5Tn zyac2vK-m1(BA}rdXsg-S9ac>dmoNLun~E<4{W!wDkm(*J5|-y0A`22Pq60bnV?*<( zTiZI~a%D{1=X&C{LvHGeKN1+Ak55pc_a}S=m6mIq;tO5to>yFuUf2G8KkVOE7^pNr z-w7wR1tri>U+2!Ho86(yc35ffI;x*zdSRZfEVaD=w|0)$heGm)o`!{=(cd?NB^<&v z45x>|wM*^eO&AaVi5F!7NeQ43M~p^m>n_>hwEdQTX5%oUf1jN?|H-|H1J-&>ehI$J ze-wa}0KyMb$Xl?A7JvvL;smwXpRU7@`-=0^Dh}v}{qzu;dp;!0+kd-l^G}1#Pp685 zYRIp>a`e~XOZEXvQ^W`c4nZLt793rx1mUD>U?E&}zfgMR3Byup!*%%As!LEf`;aj0 ztGA~C`jl&}cU%Z&Xj0lhZQUXQIe`q>0)pHekqZ|W>*n%Ru zAm)E8mv+0C^69VQ2%8+ZOQZGf=;hdy!#|iKBP3y8yrk;hDMyb=YM0O>`10&|_{l)0 zd+~Co<5B3WoLO0StQc}Pn#DD2(*OxQOfSYq7^DC+GSW8sO?|1h3eF0rDrOeGQ~~}t z;s_)7YNwQdXfTpUxfQnfx2w%w+MD5#98B2;hI1pIcywr=RV(4g{Kq5w8vSMVYw^!e z3@q$GD(0;Mum+TM>Ht9rKaee!YwfdNo7!z#bSd+n`M)jxT}pE1-{b}$35X!VgOfri zi`+a*AiM?Du9)r3AG3G)zWM5EW8T>z%`~8;G3$Qrh5Bdw+61bIN)Rf%oVB z{^%dJ0H$>Ef>Qtx+IL~5P>0y3k=*VjL$0~p;U8Amp`J$T2pbj0&0>TDK@lX3lkfx= z3*^to-EV^w05EQIpC8#ezzdg`Ses{W1-$u&LANG8>V`*C!SUq?zAyX|2q^#w4iNA6 zDL9Awd_Iug$C0r34yg9fzOWTEJeqXNT(7%xQMV0DGh6(#S(|&|Oy<>(Ka$vMv_RN- z`3JAjUn~E<@FO^ZH=dXfq6Mb_tPxWfL>&R))e&RHM0NIMq}MIyWaQ!wvCi1@|DT!y zh}p@%nEf*SB_I-dL6s)K()B`s!dZ$UfukL2nqF^zwb zm$w2W@V+9DU@%f5C_rC`)UQCC;LNa^yIekA!bx~b@YN=b{%Uu^ra~j84FB@KP&l+#|qraX2F#2odAEDRWA6BxjkWG&MM9d5ea#r9V z6pSXqDT^OR80V+)?{hDFt+YVjOA(CPr@wbE8_J*kS7!cy+=Rc!=KpO?lLA3~VGka@ z6Ape{sW9oo?I@MrzgH+$a8er4PxvU0uB#12Z=k&R4Jajmz@yN@R?mo8 zL%Gzj`=#|S+LIT1N-%>*f2OD1`Tnu~-~WffZ(4h8bPK#pe<=We@o&lkV3>x`tZEj3 zPcSO-o$e7QVivovG=j>je1$q8YA4k0S;|XM<=x>P`%bWRh8PXTQkdLai`fK)L;2FD zrkJaIm6TH~joKrqwgNc>&2M~zv)O@ z*2?_e*DinQ`TW8k^ZjDxKb+>sAdQ~leE6F+g7{#>?T9z?~{r}HiYz#jAg+NFceBmIB6AUh{gFm%bbkvC3VtXdOd0~~i%$-$K8*jA5 zgL`qONO9K!#T|+lTD$})?ye!YODXP9ik0H-4h4$4ySqaOBjH@(mClx#XZ zj8y}#@NB*wN4+XaKDZy-$R;3b6?_X?zuEy84a1AD6y z@l}yNAvKzx+jWhfpy8>@0Z{8htcn_f5ginWsg29!pOf%a7}iTeK~TIF8sv|{n&aS} z=Vy`h+?R@wg-P~Sg=Jc+!jf%rdUKU#eQ77)`I-0OSSfe>H_&G;&4`^tsS8s``uf>; z?;om`p!!{S-!}I-{jCuazCV$)=@yMgS_DBQ`^rgx&)JP7BH z|MXcR6y2=09s{R&*C~5b=RNt$u1FAj0 zBzEczPHIb!CC-7-5~W0nvbx8f27WELyI69ojW`S*HG6N<`j4RL`kZ(d+C z)DAa#SX&3>l2T*OSQxN=MA|bJIl@uNhnT<;jXdh3iwj9}nqNkC#2T)Y4P(=vsB!|e z_5Mjw(U1QKuW$323dFIoFm~eQ5_4yDBrLK{a$e(Tqw%by0Joov#uY;+n?Nhb&1^N z?b0J|ouKVsBSFrsxTn@l>vpJ7k1qS;seVi3pVw25rRxAq&rsGA4Z@o^2G^yjpw$RL z>famFQ|3=4lJnEMqm4P+3tfw_mOk+eU2Gf$Q0NBD3-1dSYhYk%eV;X-w62Qiz(;b8 zsO+*;GxWlekQ zAKPLYM6ByyUamKosGpA$SBLkD7b7ts`Mj^1=H@%qJzL&lxjgChkM+DO=>vxEGyZTM z?{-^NE(?<0W~h_*t{sx|?gtX#+v(2sdZ3=(~m?c}aOv8Ih0B2nE*R>*xSp)6`n zO(wR_N0#1V=9!-ovx&+R+th$VhpX2U5z46{MH+(8r4K|p`SVX?hhMDyV5Y2Ry8mjh zP%Wya2KD(^W~JoS<~9gzKH(3GC#DA(GmK(O<5%G@Za~37UEcG@W7f8aqXe6n1tO^% zFcH8Q3yh%lhf`h+tU}p*RL;1^fiRK%!Ho#`ZaCJdR9G>`Tt6^f|K0WBU>s#q z)2ge=F+1>SD1eF2o+ZCdgh?&fq`B3gp1*kTmbFMr|yzu?DhN?*~n zFU~G)ioiB->(_6(A^Y&UZEB*TZw?z;c%*Bi>CZLn>q5zozIz}=mf*ih zqJfS7ZQ{T`Q{ate{*+Gf)Noyu2o&gUWfg@OewbT9liG6IvmW)<--_2_o|5(u@={21 zI{yu%gwL^muaaO<2S~W|{^+KCmzkfA8ad%hm+{_KHwKB7oCrd9iwL3zyRemV3uf8c?XQuR%i&nQp$MKQ!G^ zq_bY9X$(d*uK4^|k=+7B{x!)aLIjZEKFqRC6tXW{S)@u3NTDd0tnTPboEl0%WiHix zBL{cz#$GGpx8-!4CW z*$9GWJ6ZoDdK#PN4b?R(2{&4g)##s27Ph09roRUI9wlxx^ejoZrSV>+{AuxaCc8tm zvjVr7;~>4#g%X(+QefWu?UtX?&MnUOY#y$Ap;1F#M2?&lZZKUzcD83KMF z0wBHI@(hf$DBT|R=7wJv@;VC7)STKHY|@t2__d<-K8F-K9u@*yZ|KH#9II;hFv&sbAM#RlKhn)2K5)aRx1#F+b8l~`%aybsVz zImdq%gsD*{C#;(dW29u6WRA|`Z}dO-?3(Sj0AV^OFJNf6=|k#R+2+bSvEZDjow7=O zi^L6Y^OHu=1tIsB;U?7F=jko?2k$jg`R>2$H@bx;bSQA&!#z=Nd}93eFXm%vS&F1T5c8A#tHzO*-S({)mgVn8r+OK45>McuSe4Z9P&^If z+dc&8p_ydXNi9z22x61*?*1h0sc?MD=sM!t&s^`XJA!H$AHcU$f)8y-h3803v5Tg^ z6_i+nkw{r^<)Y2$0m%84L&b9{c~+-Re@N8$XhD)Poi zZJY(P?G)y1yDQrD@(=<%S3|kDD_mu`rMM%1vSF539gJ!mgI9}x`32o!n^1K^H_VIG zTuKT-6b_k%G-vuUCCIe%n_d|yAKoUDD1yojLpnw&*#g`*`$>Sg6}KDG)2FAp`|OwX zdGC49xzg&}md^(P7w4avtm1}?_cD)?0Z8%URB!L227w(VprL0+r?vattJ@=(i^*YF zm!IRGm3s$TDlODoPd%QTAO$yHHt*gTiDEBgD3EY5GY#{3L(wb%` z1Fr5wb>`9b^_)xk^EzVQI_y@&LiHHUFxi+b!cS&8PAF0}5hq18ksF`+Y((F6nYS@s zgpr*!Qr({ppgyqU&b5GB_>Thi8u1q#>pTQs|0PETA@a(bY;cu=P5gEsXpMq@V0~ET z9nTs}8sLWkxrc{%i}ANz*$srikg3F}EQwztcSR7*Nk=tlMd(f+#Nw(oHA`1clxCIM z@FCSf&Cv7DZy>o-te`5_<=7wjo>Hg%vDY-hiGbTtB(Ph)s9W!)bTho~J$8p5fFYr& ztmc5dEMU0R9f7Tne50X0_j%S$NeDLouJ61?&4qs*E;9pLLvy^LF9pkkBM%>ligM-J318Z+*ZPw@;Ci=3@g4@abj?6rzy=nR~)n$n^hgRCG znlI0gLB0CQ4maoAdCEqou%0^cTLkhQlGDpMrx1~JsG;WPp$ zk7Tgr=7AQxwxARNnBcRNSQD{o=jB{jRi|07)Cp#D_MSoAuYh66wlFP~|8450yebmcVisJIchEh`Ytx00Fm|16agYV6>z4N5-zy7KsqfGBsP2E5*_M?i@lNx5n@XOS zD-*Hj&$FG0LtQVfm)5w_xLA^65$`U25(K;-HT;EpVhH?!O9rj_ZDGPF`Brq;610og zsjb8*TEYLSZ>!eVt|72i$tP>JoT8B4x4hDi%A+0YGasvmh!Jn2+7HApK6E;5bSgUV zUV@5|z3&7y5qXY;`$YUE7CC>9DugFFw1Hui2d_6^e}<>Cri;q1m$jz%9ed|@abE9* z6jzWqO&G^h_?its__6m)x6N*#B{$&n(dGlp6?pA8k^A<%}V zp4{Xmx;pMZ>zosh3w^I_{*dtQR!?EV%7^-2WJIZxETU@DT&Z$lwY6Z90+ozv{ zxe+OjeltUL9(vOerNUe)L;B=c(5;Z|Bje*O{1ylCYeaX%lvbi!p<;smefz>R&PjyS$Pjr_3BpF*rD@CttB48CrhiN~7k#7gWrCuD0`>M=e@96V z5zs8OCcL$kyEEW!bNRV($aAfWHDIW6E>4KkX1HRL_Fo_*9reC#nFO(y8eI$vPvt8?ALmpwxHN&e4hZ%IX5&0sZv^gIbA+ zRWuY&`%bX6O`sR9mG9Xb1A`bozB%alkLiNHnUp2n-d($mP8+XiXJ=f(X00uDrN z>=4h*zY{C!y*sJc>;M&Y(8rBwl{g`HxwO@;51u=masR|w;%iq+%? z^bTYog<)o~fS18l<4r!AEn)1y_rqfBZr-MHESJ3nF;vnN#BC(MByq9N#f`}pIv8ZU~J5J6x54F2Q z`+vWd#@{v>6)C7Y@2tJ`)8kEzi~p+rO#!0Fm*%I)Ctl*qFMfbJO{#HkG5&h_?S3}V zZOKhMYO|$7!G|Jz(l(FK1V|O{C zI&x_Oa;{gqdJHT4$sgNS^FIFK>tW#@!+{IG`tebfFHu6?{AL9ds^UjDuEHG^R#{nD zFdyM4Zs=;Ad6Th(>+atydm%bzge&C=bzD3&cl} z3-Vd2M?(F_ZZ)mGq$l?A@9T%?aqjwF$JHg}U zJ%^`skDF!MB@z}Iw-WEz& z&^C_bAA!~qJIOrYy&ReEW@XBywvY_}#hP%?Y|t_7<+wHv?i?$6tpe_Kw?KgLo^C{9 zf|wB&fuhL9ip3alVfXo3Tb}>b0O`ZBLOxou0(Rwz3*$N5_j1kd>3pz3B^i)yLkcPi z_`z371bIS_5dT6LK}a-#cktjOj4g?GfaOZJ^=3ntn&$Uu{A(&ZC za{Rt1hu0BlCWQBjD3Yfo1xy~HA|;qN}Tp%^|MojQ=t2^1Ti}Z{}E2%|J0~~ zWGDG>5N3!+0!R+F-p5wO!`&|L`v@P87I^cbJ@f%NgS%RGuf)G0_175E zNIH%xyQ{G6prY+$jiZ~!cGGt2pJy&c4hhW&J_0D<1JXG;q?}h|6u>qpMgpZ_aa@2H=&H zWJNKeyK_GJplEI5r4@2Ue4S!2aJ&1vt50mFM`O&T*O*yk9G3EB>D+dZcNZ8Mpxt#` z7DrqD(D^`f#%6>KU)u72GXDHMqML_Xlq_h=?||{BH(Rg&%?HQmtEa%dA2HBV&1lz> zs$-s*1fas&;}H@Dn!;kQk2~UxqL*DMvdhI7Ahb7BkI=#d31uL%`U{(NqBPI|HzEbm zr&n2e!L(q`gN#I_%DX2}_jQ~5RYutQ`(I3r9)EU{c`)6KwP`~>cH^L!_Og;y%CJ_O zxC-Vf81|w9w|PD+k9SqbM~m3EAxJ`cvAD%_b_3+6ZaH7b&&~Nrg%xW}GP<6!x_nS1 zOaCn(R;l902NV64pJ(Ag!d&bOOn@I65PdbeMXv1Kjr6d~p+@qp{yAw$#`Ww1yvVKViZp4>b)^ObUP_RhyAIIfP6wR-Y&SI4&js6Y0gy(>D zg_n?frp+AuzXhW>#P^u9ESiN<|4&XZFrhHat>KutAe1fu{Pj^@U9M8bB-qBB zmmdJAKaSE=SH!`jz=VH=^HE7o3jjcXpCSOzQQ>b!uBDd$UAbu~$^a_IsgB?m7|u%i zZU6uY<9`RjM=gfS|D~IHBb;`irGFjrVDdITK418NV9gMW&L9m?HBmPskk@zpJ~%(p zXg><^wBnpFxYoNqwTfHV_$Tb=5ZAG9aKD^e!)aLiO@+VskCgJSeg@v?4?%M3IPOA| zaq1U$G0(8O^^LC}7vLc>qUOTGan6Xx@$83^-U`D7`y~!-lMKXBBE8~nK9p3}YSkbM z%>V17gZC)!4m?g$DIbuegUo80O(f#w-VM;8n{f)cW*{CApfIe4)^(1fk6 ztwCJ>O{9wu0 z_!Nlvnk4y@1ctz?=c|?&byH_&CwRTh>tdn=*RXuHAuPURd zt~VJ+etxxc_*Ap78s2!=k~HVLPi?tnu6K|BN^%W2=IN{k- zu2_6k7r9?_;+n&L;p~eWLM1}xddqU_?|zki(P;2a;XW)uVgH9bq09SUkI8>R7FYas zPww5+?p5-D880O{`BTn$YnN}v1(|%%=;Amg3W`ld_i+uf+nl7xQ$0c=917Ob^UFIexn?b5fb%Q&c%;+4+ zy^|XoFq$`SMQ%$jnM_$%37lI%N~Q-~UEH^wS?#itrtc-RC{aK?cVPyO7!n1mu{SRP z&DS;lt#4mO@V<%p5e3ozV1~ZSL}xi9oWqsPvcxxhB3CE8)x~s+8U>sBKp%M?{I5e( z2uX^^v0`reeivcIlr#Uy6_9vy*ZQRr_b8QkW@N%Or_Ff(?EL)Ppw4nkC^IXoid5?# zJH1e{)cInKc^5Y0rBDAy49&l+k16@d$WPN=Nx1#x&f(X2-!)gz=ZrD93PKHo&z|?j zQKngqe4y7*NcKu0!i!T3UCA^r~@Ymm&d&tdA-+FUQ$P(6c;9`yiWt{T&y zncm(|Hy%f>R|A_bisG6U_^1^V)$Z)Mj#k39ec!D<$N%&v``Y5VN7GbaZ=}IQTF4)? zx{Ag^d98zG&u>r2k%qLZVz9v(MqAYF-+4Ks@p{GCJ|5Y%OL`vge0aaYO?MxbiO5}$ zwh{sNmW=)Y?)`qF>y!~r`%%sJXK4{H15=zveSUS)-_E<83~nXw6h);zfzGl$-DMMz zFs%7#-PVEN(|R645^C)7{fC|X<2QXJ2I(Wr$;57$(OY}Wzwq6)A82P%UsQEhn_YH> zL_|a+PBB^tq4{}HHRO*Q@LYuen(VjLIMoFHnDEG+{QsyrEV&FCk=(&}pDM>f1#G); zmlPlv@@O&;#zl#LseOIHi3{!ZYHFNRKBb!(~| z=%B^?*^NJbP{R-t1Gk)6-G+p)wl26hx7vi_2}R#B-OyB;g^Gv^+~G`eLzk4UrK*gY zW~ln7HY3$iXRY({;r_l8Dd8!AInA7xQFbu(az;%yUAc(*1AKQ3G))N9hAHT=0WjP0 ztC0VOZ1?4FK0_nE&9oB@YR8hkO8m;wxiwwsvxbw73vlbmxwCDGsN{6F*&vX+2sWKx zU$ta|r;)>e{Y=UC6|>}~%2E~t(~oaI4Zl@A;6uG;`=ezb8Bnu!%+a-KqW8XQ8(BYo z)h#T*m?qD_ai0E!zbRe&A6sdsnb^(L1#L+c4_BvHFmYC9=De}@Ru~v#>mXUeeKzf# zR3=F80XDU}%aCMyTLPzXekZu}`Gk~k`R-Q=qH{Z0-_78l9xI1#wHY;p8OZW@R@|0p zDt1KA9+V=JY@&jobcg{O^&Wsjh-ue3fZrY25Q6yyDQR8w={chm5o0z36s!5ag+xm| zQC%fg&IZrW{Vd)IKKF&1+K`b5{FWq>&;>IxVT9}6JiEA}(OsG8@wBG`pU~~dr{z2% z%PA=?u2iUbNqgBYQ$&$hBTkp+?^eJM2H$W6!)whF{{+gGv7= zfZ@U~pE$8$kw|TGMcMkJpSjj25J$VNe9`#;xT)0(==Z0vtcN0VC(7F`gpp#0#7ViI zpe9nD&u7%)`U(2E@q6Bgp+w5q!E}bq{Wmr^d*E}x?Pe78aZ@kA)p}aX35S?DTRMOi}#Xs#kL2#i}P0%9)Xfh$k~$O%ULTE@X+k z#Cyz8oLFljk>{rW3@}|n;dl`HdXM;XHl#K(2}A>Iu$|M8npe*{*FLl&tlX|W<^!|jN-DzpnyJ!3k$4?k*(Vb7)wtI<_x5F7s{XRUPT zU3dPaT|a4Gu_iia!r=&8{6FRLPce5%^DV^eI;*WNJA+lSe+@_Jp|_D51!sV!Hdu&GsC_VA4^BD!9)DSdW; z^BeD<&edEj;ai`-xn5}Q_wV=>zmaHW2R-^dV==22V-ZH;Ol#4%A2LEP__7@b2>B9{ z12qg;$BYZj^9SDzmfgANrWie_MLNiY6|)nE20DfyGxnv zLtQE)#tv@Bg z?8qJC>r@jYX-KtZSdNWVGudPMW*;fXnaE=BhtBe9Fti0H-TNJdLo{iQXb?_@9tXuo zIRO2Dl9+9x-s(@6()X1!`Ji{gOw>{RoCFbhgo1byh-g~0WC+d*8Q-^54V96`(EF>; ze<3O=dz)mp?Ye_>-_YNEZ=?G3&LZ(2%CQIyEZ;un+q{^ugJ5_kuOTd1?efMdoo*`jeO+x0XRU2qj?2sI6dzktLrR@W zCXuQ%WqW^It=c1_Q;TI#J`LKHbpXAY>JGMEmJs?i^FQYC46vcl4zRV>;{HPa^{oi~ zFH+s3NsSefJ)xpI{GUaH^W`+3C|45mk9Q@M1 zSPs5Xbp%&x(&Di8|H?rATE`|6K1`F1j|}JQjQn6l7@{u?^c_1AlnQq-AbH*#e;fyc zt)3%#K1>mK(a(NBH|NJa3 z^rH(q<;VIFgY#cbvcLQ7@4hq$m_GIPY7X8}5@h9x`d?pG7C`A3Okqj5i-?|lc2_b>`(5@ATTWzUDF{D#*wc&nQKQDN(F} z^P!)iSZRCMs!5Z4hPRikWuy=C zl}pJ53l3E%W}+K|D?gxhA=>={IZFWywn6GuI7j_gw zu1{>bXFuQnz1oolUN}^r!>-p;S0r3zSJZ~T{hAWb&MVmz4fi1Hk;na*%1y$|C-@zQY;q>I?j+c45PG`!RM4**8!?aYsHi3)vWPB=rof7(~o%wnqz)Xeih(WL(445)!j!af2jJwYCiIoIM& z7Q7S}>`xu_nrb;~F)1}!s6qjwg#YGvu!t#LIs&x&jwilO&OCG;Xgj?ucg2c#f&Vxo z_7M2XjO1$AEr^6h?T7Zt;7L1v0KBahR+hpHOsPpK!EbeN>l=s)H>39|OC5VsLpUe@ zH9b(qj7yYIP_&Cdo<}}RVMXJ^{<55eh8dBdL8K5!xUjUV756!mi0oj(tSjsl$(d?% zTw$09b~Qk?oND<@G2bLFx?aQDc+?n^$<=n=8$QZykg~YCN@lZXfFN4uCRiymj$Zw6 z-E)%3-RYw}leyt%vfDBt_Ti2MlO9xr9;_VrIQi(#9hUtH)We2rvj8*7CKiVFDY84a z(P^^dLYOA>Cq+m{NZeGT*R|@r1qL6+Vug=a+TqyD4LP|gNjM{3=`ljvr>%zDZ~I|` zc*FGx67C@%$?PR|V8-ystiGqvd94ib0|s#2-6Hv6`SCWDkZEtSW`=eaO+J&XAAL%8 zq-cm}SI_z&pp*W%8WZ+9(UJZ_Z7DQtH!nBu?`$;_Ct2I^G|tIhNZPhG<72PYT7-}~ zaned(0lrUKyYPOvpM@j@nBE>05{4y}rqwc2Ab~=Nr($UEOuBFWc9+U*}vODzdU1ZS6Uj*6OxQqKaJE zU)@OX5kw?iEnIhs*S!zAURE!?@`SS`e~Tb6diBO=hBplJsXEFO75W($|3FkSK@DV` zY#%WicYpIKkp66naA^zd&Gf85?tqC~5gOIw)4tM$#QYjCK33Z+yN{WOmwe6Z6nVN6FUkJ?I5GQju!p^H$nF0g@+>0*1?^yw zuMtSVQ&f>tq|F$#|Gu1QYbSI|xI7HhROB@mo()|rExR*Qdk;NPd2$WXg)Vj9H$+uF z2h=>|z_v#FG+x%+GS*mR@36Ru%Q2B(oOP)Xji^!)9l66*5E*}y*47BT3pHskEc0h6 zBm5Ac|*ZqaT^XKdGrL@G9gmIQjk%;bty`DrkMKz&{C@oYP zZz(4+|4CD(lpJACCROy|$*Cg)d}Qbpe+s#LABPJ%{`!`t}f}dFB}IS z3|YIUz}~Y=FlbvDX<%U}P)6ReaM)z$0!a_nmDF3=AV~~(VO4!1B#VUQJ?x&nq;2uw zDQ_(|8SfNBP1YwQ-@hKhu8N|-fUUlD6je0W>rG{46&1~dbxUD3AmSCU;4(rUho9tqN5_0t5ruhrnT9KR@X~+R2B5Ki9dms zCV|FncY*gCD**WTUiJ!QgY-=SEm?T{#EJW8I4i=u;s?544iwoO*f0MM)L)jc6pKA! z2M?Z5Efv{cph^v_W@ZYM`MmbRGrsK6SpRMI88}n8Ts+jiWJ70T%)8jjA!mXk5a&LQ z9(xujfbZgD_vA8qeiMmE<)g?Pos{=_zpHIcQnElK_Eu%?b6d6N*)p*A)6QH^V&2Rv zvN{3m$?t$0$~@#&5^#Qj3KI>5Nzab0fdV)qy^t@js5#RZvCXL};+Zwr(f#|J2%0gx zSTVP`gK$D@X=d6Q>#*Bbx?SPJSC7eB^(_UXNYbr-8u9GckqDUQp%AM29;7gN{{zK? z33B0m)#_a1PQu25@B7*|`bWC&LnSY1m%_p)96?p}-oo9(JliLHs{gRaZxQi;5E~7- ziiZY`y8z$O=*KX(ob}l+C$2x6auEGLZQg8fw?h)S)z>!GGs%W_s%mO;kh6P9{h6-j z*DcatVI;-RE)`E0b$GAXZxGh}G{#@Y_HM|Zusq+TsJ=W`kzPC>8$RiZW)Wz|#l;bp zx*=+iGx44%nF^@vC~RRTYoKlr{Y`P8=1Hi2H%;=r5#1=}mcD`#C8+AF%K&jB=-IPx zaL>klkTS~idiSH>(_Y%y-2$+wtc;b*;$5h)6iIwCO&Q!)BGW|VUDNHnG@rlYSVVD;D-^AR&});8=cA93;SqyyYu!`vC5j}Z9o zAcL+i&cf_Is)TD8o22a~=M3I-8)ebN>wlM?AoIx|dNq{g?1QFAff-TfKPwc!_A1%T zZ$;CB+Kb!h_CuFB?q^~!j+NnA6`JEHbzEicv4d0mb_Ze~Wte(o6w)6Anh3PZp7LT0 zOtFk*kY;~G%5UOM(<=^@aEnhS{<4x4BLL13hY9jzY2?)JUKAo>yke;%UK-~r>-=|1 z;Uubfn2rORX?iPT5J%PXCUUh;I&K6qV{D6hUyKNLXl|91y2PC1zn#1G%==fA*D5Fio1CbOZM&oo2@j7s=vQ%*B=_=v5MPZQycxNW6PKRh*Zp^)JHAThHcAOdd`*8 zvPE1|#YDajUfSI&4PVvBpLg#;^Vy;nC4)@fQ6sk}Pb^a#Sep_6PBa(s&R_q=t!2Dz z$$@`MSdW!skT>oszRbEpKS(3QzD{6!E@vf?c~Dv^1YnSc1=;PmXV#7W$mhkjdOrJ2 z?DKrL;ugLDJb>1!GW=+8!iF=C`LZeq;rNV4>8%BOIpvRtN=ozv?zxN*ta(N%Hr5~} zmSCM#Rfxe&T%%Ae;SM+|z)ikNGje%w9OL;(E#hpp|JRm`_W6X1&H4E!z%QA}wYNsO zQ(E7Okd+wn4fCi=tC5{;e{~XQuGD@IV(ES}23Pgo$+C0c9~=TRN0cYgpP!#`7ChRf zbnHxwl+E5=wZHVN=^IXoJdl3-nV8+d+c{26wq|>FrZyj2CZQOhANP~uOH_nH04o!3 z{bojfGmv!c7ur<;U4THQINtWLi~V=O6~Y#;rRZ5{qe2fe<7Wi<+bPinoMpGZoO?}* zDz3E9ycw|g?>TL3@iSV!Y|lvo={NiS@1)dt#H;B~1q#Un2{3X~oj+`@mH-?*t92t* z;1oj7*w>mPk1isB*Iyv$?#qHEA1->!1^* zP@6TcGroub&mIkFA=(W2oDZS1dOIhmxSjVT^kj!;mgke0dsg)__oOB+2qM3 z4=Z~H*wZQKTy|$z)xboVv+35qU`Z1;s0*NYijtiiFI$#ZH&VmEvodHXLQ&qVC>}ji z`X>4qi1e_ElZFU7)4m6;XDr69`pX=!1K3auz%+q%fRP)4EDWpAF9HQBfPeIu&0g^{ zF(1geM6Im^8McsVh@)$+GpFRY&y>#-f07)06%glVHtHixyG(k6twBf-Jys!>YO=cP z>JX+?4E;``j^BKrnk)@+Af+xHbxXBXph@c!{_-cy*PC+VKCW>wiMe$(JVkO_>(S+F z6I_yD==gc&aH3Cww4V4Zt>$Q`@!wUP@h$&xww`H1oJ03)m#Ob8{K=2LQ~`|9p|FBy z+vOnLA6HN3Xz*rI1A-3@|I~8DD%)Bxmz&i(pkw7VK?7_Tx_o6%B3*y#7=FL8p0(!& zj(=S>qMfBHm2XKE1YML(|urAI2?Se+`{6`>*b@w4*ad>B` zbNsa|wcom6KufRpTlFXX{yQi6Y>B9#NEcP7?QV<LcPR1B$u~AB*DZbTVqrF0?3{D?mi;qng&olxte2mi`Rak@vL0cL%hKA6ROz@8wIb zLtRvM@^^_i`>t8Yuv3FALEAqkzd*WJ^21C$oCIH@Q5{4@)AID7kVe#2RkAZ?Ta%BBXJW`$jNW zTcShDlk1b2@Cvs}RJth%*+3%d2z$rbX0#HO6sfo&7&gOjbk_L~0#gHZ{T5Gl#=@0` zs5fK{6A_gXcv-QZ9Yfu;0X8kK`_?~(EnIHwNpwBcmWVtLhL~nNrFY1<*2wxgPKk7M zH{Jir=g~jg_!F(JVgKveMO?+>yq<6g6VdrW-&sS$;s)0L3Y7Cimq!9~? zSY==4*Ytgj27MVH;k(9Q;7`*iNCy2>56s z$W?G>a&uAh>PXpdY2@VU39L4bfBh_QTKHp|)xfUZI?yK2DIDCGUAS2&lm z%%q<2f!l2weA1@*@lkfgl>`L>8WXHm3%0k?erNs?h2tsKHU)X-ckmu7U#Wj5@sN9C zsq>}0O`SSaBz4mcHD66ih6{xOdWyOfEkl)!@V))tXR^HLd1J)QoI$X^E%ZG)%-{o&lzq01G`+Z$97`gzq(4 zWit2t3B|?=zL=5=OoX(-q8j7lsl?KYTgTsiRjhpPj&a!6Vsfec1{L1;$_nB!^2Qr+ zy=CT~;)xB2SECWPL3(`zIVeZ#F;uZA}kVYZ25_l698ExOSL}`(jI5`)jH{&7J-{*gdJyp5MV- z%pA=ui}TB2|0;;!=18k+9EJBBMSzjM2KQ^u>f>&~Ro~xo8_D;WYoS_*p@(9+_;M2Uln_G40l%llbOEyjwTox* zu5wlO-F_Mu6I7@Zc;t>!&NI%@p@Ea6vs>S|TIKO%$oZPlOL=Jca>H$cZ9rYqPd+Cu z<=E2uS8FLFmo7TK(tB4kEUMpaK(dmY@FeHyD2q}mnZc{L8c|3%M^KFLWojkxpN%6m z)aOMmqC;TWk#me64ZO%~qVWzi6x)fjpP_d6A_6kR?cE@!e`*lejHtb}WE2(Uysf7UWJ!?e_G~aRs z|}a7v9p-~kp}gB1^d^I^8UH(en3CV9rIafBzXLM@iO!K8Y!3Nd;t0OwgiU& z8>8cp#J(Ij-*RZ_=Py4Q*imaf)sQ+SWS;wmQF22;x_-mw;}6V0KSwxvmQiXjzi4u_ zm)!9eAbXNN%7nVEDf$MS8eP>!1iau5CS3EC#iR{UFGk#y$C=6e-v9ke3E|s~xBFJ< z*fY_eh&>yn8*wz!p6Uv4R0=9p5Y%ga6xBX!oB(-?tfMe>nt<6gx=-Mpy|rg@R9 zasKo@aXsgX`x)hxO3dB#k;)*D6R zw~*#?hhTMlldl2eQBWS3Y7=TeQ&W!CTc0KDr z@}uconS{=iQH+@D@9%ywY;AANOID~qofW9Bd987qhi|S&>ag(Q_F-9%&PIH%tXTn! zDXH-~#XXSJ2ZjBt{JB<5y(T#^mDdJiE-`SR4e@%;Qbq!tOqy)o1bIuJ>8y|jL9N=+ zx6Yfw92*lI{s%Qd%Dzv)=Aua(GAIDs2mI>jzpz%IYc_N>wC`LS>%`Llerk*b$!ZDU z3qJ+l2|suWD4qT!fQe7w0o?Q1EHhX1QZ{ z^KuXhU?Ijm4QPtQ-fgW`+V3c;5sS02P6h06*HfE-`91_8dV^`8wM#!E4@J>4+zEa8Wr zXNmI-(L4(eHz;-@Q%qyj;QeIW{dd!Uz$_X}1u)&IBmhm2;ay-koNri&0AZQM{MF)uY2+7F-k`r)c%`(;6NC#% zUr%19k=1BV;g_WXpq;|he^qSEZs_LdKU;8vIMdHZe=iSp*z1^zci_YjAHiw#=gvPa zvYb``!V?n=yK-g0I+MU@0ldj$$tN?7812Gme-Z|VXL(?tkets(N`N#;V_%)N5#lm? z{x=5-U>&foJ=)R|k2d0dMqdF)=ou!rV8sfg0NCxc6#i@@UVg*zW4yjsF&|zQDe_q) z&j4`7;LZR5PGQ6Xzs+1ONdlbjos4$R$w=^nFev;vyaY4}>Aa_>zpkBs_BK}*58%;X zBvyLopQAkwV{zwSFZ}q(5(l3CyKXJIAFMN91;BlWF&sG_&S2KTBPuY}`d-RMu$1H6 z{;$>+>bXoLVdF(8<_JZHayk!#{_Sp#Cf9dZ^0mR~834Op%7AX)vJ(134Kq>9CH$q) zA4&k5IF*MR6t`z+YCrOE2EYSDS_V-1xe3U-+Gh#=vJwE5LJXOPGXPm%31qT)Yl}?U zExq-v{W<#Y9c{H|PU6v@xB16ez|o^er`P^|U$EmlFqyn^HC*(}+Y~H~RpSI+mySRi zs17Ls`B}We=3Uh}kWp=%hQPUi=c}0_@AjxNvesxD6@0QG65qNKAMY)hYJ$%c6@{OX zz5-zPb2QIJBZ(Z|*)QvHCJPuK@xmeZHCYP36oA_Vqyh+bb|Ci;yjLRyp{%a}H2t51 z0=TAa!1|g-Yp(rEL@n5ZhkK!oam5x!evbYWe(ocLt^Jt?w|&{#)`G2WgJb@D>8j6S z2|!Dx663pw@}JKae)##~4r|{G9kBAp=IE4ro0sG4{0-*jk&a{}xSOa^e@+E+l&9b` zGqG|@04(A&oYLV23yb1(7_|MOXvwD_=Ft&CHz^e|6_O`>o$)5PNb^W#QqwZ zOxmM^U9%qjQ2}u0e|&u0Ed^K#>yknD+FIQD)6uwq$A9I*xIxLwQ>u?Ss`>ncPC#0H_4A7LJA_GKkb(i;M)JvHDh&#~n>7Hsh7ahZMq+AeNp0Xa+!dYu^#j zk)Nfi&NLkTQ`ms}W`B<*G2&D3X?X$1@#DwcnSc7j3}*nFyP*520A?lzVM*%>V_W?8 z1>GzpEUd1=&+ujBQ7oBx*^sh#L-cz_5djN}J`2GR!LFBb-LB?nK z3R7M5pHD{ZQ@g_aZi%!AjmAe^D4!%?7!fOlpH?%ui;2krv=nHK=+no05k}!w97lal z{b{-J=QjTUodUofKt9NDJ|XILqr7Q`3Cj}}uQ0)2K8DjUT*glm78Z>6^D@2fS6Y=L zsBl4zl2QO1?J4-&tfQOL|LZ%BSz7~M`l+D+sEK)n^aI%Z1MS_&Psp`DzA5MK`=g(I za$3J2FE17C#rFY2*+>nj6Y>&M-hxc>s;z`-ryoW)jbNQsoYTqJR$lPB7$(KfGnaZz z@=GXtS`{Dr*vCo)55#Z=pa_2$V3-sFl?3@r7EWgvuL|jQ>ASkRYFd% zCtL0LQyqBcf9Ccb;><7nu+E_HtDQw0Dp|Fn+j_g9!wZLjvL=KPr*M|)-- zYpR`o+kV7c`3r-r#t#pz)>i;b;0v`ITo5L~ zC-jX9XPENkakVrR0NOnBu0I*@Tr|X+C+GI=-Rp$3T06*?>({Tho}M131S+-HX9nhx z(vTA1qraLE^z5?)r26Pk$x6S?7*z+pVSHr4p;C zz+S8etFOMgVw?Q*Z>O8M zs?9U*MVbLX@+LEG13&|B5c;xNl?+n(%s@j(X%&>@63PvyGkzs<7r<~tX1aqaF<+^O z(mx5b&~#yC)EnmG;=4H_@e$g$zx{1DrS{{3ZjMSjcI>db?z$@&H9hh(Ld*~pe9i!9 z3n=H-wf&$6r_$AD09t|c94w?V>%{eIOAoM&JPPqr}Tuuw2BLc`(?}R=T{i>(H#aE#`QFXtC}I> z`t|!|(XBYSDFhM>2|wTZTiY;d+uL!^N{yX=hYR$>BS*V!7$1=BX)aBni7Su&^5kFG z=&yFN&K=u#SZ7x@8zg`n9#SO}{*& zxFBRdsGMLN{i3t_)=$H@V7MRVyTkH@#WTz|^bD^!yKhOfD}H(bz|26?)%4E zf67z=vg0PE;`ZS2ErnX1(8EeM79SfRmfyO5%i>Wt`6?_HYp1`4CDg$3$r38ppsF|ezLQ^bK zpa>Z(E*Kv42h%UMf3fTH%cEOeMM`{n1|svqU>C4R-F_>6Qq1a|ax=NNfOh+uVll3u3C9!5s$N7YSMlgJ>X{ z2(O@D;pY-m8`MU%H-~mN6!9`}WC5=NlMt8!933f~8p{>HtCH#UCey71Wu!qrc zk$Qf1(IkRze7^|9c!evhnqTStv`X*C$t~!oQJ5g(I7+Hag$oArGQ1w6e1c>K)!{P+ znS;XbMob9HEqLu03&omM@X_Dyk!E{gq!n+5&AjtZq35P0>(c12nTZNzeVaCIa!)KA zPEY`8e86>43^py-wWh5zo^tmX1cje<%W704J?N$p&WnP}87#!_=SqE@!=us8;we0< z;qjRTh#j&XJee9naV$s*fRIF#@M{(zK@>!i*=7Nl%q}SC6T^!*jIZPl=Jox`Bk0G` z&2T?XZb3hd!UPpZNTYDUQt15tRfeDhpMH%BQUE;px300g`FGk8@9_E`I@*i(%NyN? zS2?27^2Q&o|AU)llV|8lpo&uPDgnEYegOjM<65=MdPKStXAVr{2(=VU6&ev4RTP?g&oR33T8if(k`ogdNcJ0LF zEOCN=kLhma8%>YhQ0>G;xF_%;Uh$wy&eOwf;Fy9|^ z`(@Crc!m3ADBg!kCs-|gFiv^q0)70%;68Iu@W~iF(b?^EdxA`U`Jd7|SHP-5;{}gtu|NHyZ(k;Fbk;sg4`?XXGR~j*K zSYD+e^vjXkhe}(i9Hmt{!Aj{BAB0TrTc0uH_8BCFBV9MF7{JRoIQdsY0r1@ak@2Ma z)?ahNeS+NyJe2@<{&}9B8-Xg?>a?c2B0TVDH@UJvFS{u8kl8^%YgI&8qj zFZ7RG7ss*S4{jNKmiC1oYW<3rXbx{*#ajAt18MuvVFrI&xM&@XGQd6{1I zvp?zf6}uCB2t5^BHj~9s>j~S`a)_chpQ=iE&`*!=o7ny8P#&7Z2|g77EtLTkL8uZS zZaxi>ZkAb+831eW3GBQ5+AD=C4dZL2sZ^KpsSNp5whybt`RVF$`}O&5GPc(JB?jSZ zziGR!2mM)N?eFSEPd(b-ZKF9n`oqUQwf?8DA3JtzTByTt^NC! zP&e`e)-?0OsAjRt2}l7liWtL(WSA5-hIX`!*!t#Cq^qunIsKc&x&QC88uUXxkrK4_p`NKoHyRaEaKz-9Bh9KGtlb<1-%# zWxdl1sO%PfggYVWC&;$Ryq&@?90>jXC0%_5FGY~T-pSIre{K8`4h;>tJpc)gijtr8uU)&= zZ2;2Ea9{XXMgpJm9*M8Sciy_e5R21y#Di?Gx;sLqDC1JVSqey>bgr^)ILX9Q~(Y7&C4feMPMg?)v_P*WXU%g?g3@c5dMd9~2IK1~M`;ABmFuVR-C=ncUn`BDPw5HC z6tZFrjSzfWt|vBOm*MbFt!Ul^w-S0mDu9V}&NfGm*y_XpM*sOu zwy{F9gG1R9fA>W81vG=BKi?*j0?;NPX8`^tASJ)H^dr&yutLUVQ<(x{7BPvSn4Gu% zyrXl-Iva84UyaQ_KKeT_+G5Y1z@xv$naw{c0gj%$_m2WZBO&pbpBsZb{NsnwEy2?= zAdV*s2V$4lrMV|7H*6j;@el`DE@h~kqyUH$X+}dlnT~#+ zu2KRjgOKrrG<4T%>Pf3K!h=u>U68`B$DHXj4n9py+SM&@0Vm>9FE)X6$o&64GX9;T zlX)KhrQqvhJX!*Tj{Znjb@yMjEQtaTu~f+q0u;lt?Y?EW1fS4-@S~8i8+&o`ubvec znCH>{P8-9AntCB96c!2yA)oz|`Lz2Vq%-3#yzoNXuwlcra8N)fRI)6K%A_HYwPT43 zu*ta6+Huspu!v&=UpdB?%IsHn4%oo=686?8gdfO?Pl&&0M7(GO>6Vbw%{;yk2GcQK zN`UDX(**lfeM>r1_+>fzPvQ{N%EF*s)OZj$&ri%a`aicnz3)#R%RGa2P~iR1-&X*$ zrv69=RO_R|%)DwbDOE0uNYMC%D@VDousAZ=#3Y%+%| znOmboI$N+1wERr~06+jqL_t)|$x++XI^uT9tCj1X{bKX)VQ&7pOFv4RXB1f0!)N~# zU>XX7FDMLSy}YKZxw+Y;mtZIz^UCs;>8S?XFA(FSLJlg6Yd{X%T9mWjy8eh=)I4HC zqopSTyt|Nl0i=&FP{dvI6HN&jCPDM#>1I5Q;9|8v^|KBd)$0qsTl3?%vz}^9Vg_(S z@=e^5G{2XBs33ENnEl?jryj@Je*|6%KP_hf6nd^^OyX(3xyes#0ll%F-& z6#U&AkJzOx!!|fF;Vv(w5}+`VMuMW3?-zZk02nUIv_8$1j&LEyFGmVScnJqW3BRWQ z^$;9Wks6-R56y(!0&S!<`V$($t^RehMn#$&)ADNa&C1KHXUNnl)?O z69D2QBLzUH(O-(C2~Pt~G_13uk&B@K$XknV3fL4})snH_zTv1{)ea?aY7$Cd!nH-T z65S}^a@My0(%J zK`a`{+0m(9`|9`=nEAyy()02Ujs8*qzVOdd03k(I464nA6|+{3@QD}Z4(9aJ1mnW| zetNone=vQeIE6F4@AmUEyi%N>&UY)17*R}<2ea^lA6K-Uu$9U2nz#N$G5R0G=HK^+ z+wq$4%rkomD-BQoN%%Djke~5nOz!@-wzh`0K{EgezncZ%?ZQ|hX|E-&V-ZVc_#u-O zEjjz0n~vCf`UbHa7ZVO_*i zcu4TMDLXbfWfxe#UD>i1c+CB|KOe)U3k~+Alh<3Wp_?;5PWh<-f}4N70&pWg(g0Pr z_Mg%CH5$Am3V?MI5t*Qye&71({qRa|KYg%{U>-lMAE$7J`EEar;#`6Xe}0-E^NC>` z6LXr1bKy7gG_wHK%|W%TpQ6$y3@MnP@Cz5h6qaS#^tipJ<3(%0_2@GaP^q@r;f^iv zb)|0&Uu6d(>#d`;k$vMU0ImJ~qraS<(6YL@R=J26MJysx)L8 zS)Y;9nEtPA9Jj5Q_SSmwhgx}@n}5eDldrvNZaBe_5N6DJ<~UAJ!CG!qMd z#z_hIa7GbehLLEs7ZW$z-Pyg$wj_{G2S8r?(2f(fAsMkxd^K;+AIn)QUTL6mBYwh5 z?c^1|}7!?}*W`R1El=ZBT4d`#Qd z*Eh{DWFm&ql6j`^-v70|L-=?`?H7M|X-3Po2Ca{u`jUC*CZzRe z78HEVKHR8}k)H}+Y+}kf^C#?GtN4|rxlgR45dOXCb@rvP8!Xw}iqE_y-J6?e6Gwf{ z0x0klet+sO1)v!KqUUCoOaX|PLMP}C3lF9V`or=lOi+0Q6RmLiHibV?DAG zenKjM(y?Y-f{LmC&#ibKA4cK+&fLU`n|?>8R@vu9ZZk`ETU$#>_}#sY(I^!FX94U; z3cs%aIC9cD+|d^2roUb@H%#j-^*l>gNr=K2#%CTeQ3|8~CC#Vof>zx6gAK512E2*Q zzef8$F8*jKZ~l>CHLCIEA2J>NGC?Nh=d*b62XP5AN>3=O@+C;kjX67(+hY52SJ{@r zli;$&dr>G1Cx$_9Vtb@$@7XwLTRX<>&t6?+PY-ojR~ydNQ{bQgC=|3*gt8P)Dh4S4 zDlxW0kZq%t5|9G$>7c$W;W0CNlakS9qo(~c!ar%JCe!ww*4OQ_)&uhr{-JD_eeTrl zHr3RN&%1N#pL9x(Z9*HQ065B1_^Ajq@=F2Kb?T383z}sG5TwXF{9+yoyo6rRjUZsw zo7UjMjwq+9HAs&4{=bWpf1~+E>rT$x_(NtU6Z6eKmQ8oikfF)2y!nUk|5s7~em>@* zKrk(#goeV@*oboom<3#rei@4Z+}g9mvjF1dI2ucWOLtXZNhM0oDbAy59LGJNf~9bfyInZ}Z7CGb=LJ`)Q+;l;Wyx#W`R(NN*_Kq>&1O~IjU!pA;` zlk4r3+-9glgc3M|!)>T2>+FdefEKs&*Hjo@W33_{#^4P z&-U6sp1RY95^J#6(>Oi5Q5(t%fWlA9HH$y``@$bS)l8a>2Boc`a^e!^BX;Xb%pBLp`8UOCZbyC<8iqj^Rc#kgcbE&+U| z4YrF+!x=z5M#_VbWwISo0u&s!A&DOf~ z9k4IGHE#c~cO~vdfKqLlnF;v9FSoA*=nhi?YPafT`_+F^;4F`pYkmno-KTKX*;Nq! zpY40n8acC@qww#~thX@^ znSKf^pIWS1wQ824Rhmjrg1~mLY_*3>$hKs1?e;|OhwQ!SzXrpcnWcb_D`x{u;MAYN zy#hN|j@w^wHZa^_ow!p$Gl8&K0F@!zK*9BA1EMLF9j%PoO**n%Dgn})`K1I>skDuz zGIo8_Ui;vxr>$uY!cP|9qrNxN7ulC4Znb<Kyq?7p)ZR>4_`t8<`s{o-94# zXllZH9#B-A0r+?lSKSe*(B!fItJ zt)GU>!f@YGNMyx4nm(p+AKY~-hj5;oj|OXy8q@zLkGEq}2%CRRr%(S`$MEp*X$(vJ z#Kgpl(|-ywaj3_rooXBNvMxdi3mLNopSF4>c@vfbdu)w68*t|K1N?SqHt7oA9?1FFtS9`^C6ZX^H zFWF6Zces|Rz`j)0K#b{fEhpo_HM52!95N&MhQ+0Gx*@gLr3tz zkCN7R+Fwjc$We`_-zb>u{2&7m7mobZ9{&k%AF>?g^~;p-Go9MVc4Z4~_Gtcn_Cu** z+#GcLjP3{cIBRdyr3T!bTf_5@Ri~juC#s{ zhRxOQ3aaqOvV0q+0Mgj}y9gJ4ZfL1}=_hafc^!BDy)oWwEy;Veb5u^lrzK3Xk}_)<)o_Oq|40EiE1&ORyQCSfAv z^ZvOJsYdGA+*Bj+T%yS|GL_tl7p#`fk7N33e#Hrfm0zn2=bdMhyi8J43zN0#{-l}$)X9Q?M*Jy5vF zzE^m^-Jbb;d2e%OBW=EQ&o>|0j7NzZfWo!-7|FGL<8~B#DNh~4Yy}soyfNO2Yss<3 z#+5`ZPy`e%S_zxz%l5J#*+y>O^2Mapi3$6uwQt&W-G_i4mPR%9ao7g8*2fDyhcN1Y zD|G{2>bbyLTR7^&mLE|PY9>MjKzyX^)$i&9;O7LXTHnu?cFeaV3V?(>AB_ZnZIe4p z36$RZPuo@9^*#GPG1*|>8)(Cucr(l?h9HBoF0TLSrXh0#4byDgxY02ZX9^23EMN6X z36M#r+l;z)+tt>Ji)yaTegz0M)iotv2u`)~y5X^W%5n|P3cUZ~A^VX{CvE>|(w>Ae zcoOt|>r{(nBb*h)@LBa4Wh;8JeN$lFXfbd1VDIL~FW6^2czj#L{>{vA7LEyfggg8b z`Br;u@+x~8?@?G|n{{G2qETO?J)x%iQbeRLX-+HQ_iI8}EfoCZb-R~D0n}alA|+(U zsS_8e$g0Im3qpCs@Mi$Id=7_s3U(c?{OU_i*4`z?^#9qxb~~PF!XcN^?z@Dakc`3g zKcD~8?;F3(998)CA7>zoWyFYNN+|%gwGj+l#6tYVmOCsqk;fsS`%xuk3uoY@U_EWq z9sxe4V_Ui=Y)kiqec+-2+cVN^kM*}XyML6&Y-6~z1IiBRa38Uu+i+8J+J64xe%px` zx7>JMYx9<=aH21d*};qBm)b*qD6S zOW4T>L8jo@e?I0S!-N^u&$WL~PmjYXEX`cPq*#cHZ`A&2h{*5TJ1svE!{fmclb$U~ zfOz|}0xl7@^^V&%oGSdOiw5nP=(A4vUguNf~Pk1E!+6H zHol6#cVd;@KeEH#EUvd^yu#a#^I7cl; z$>&)a(@bAhZ1hv`B>YkYyz_rme8P5g)PDBQujuX@PTET&E$+&1GJ+UGOhKsiKS?U) z@X1TXvwHRFx}X31d4q12&$g)^LgK)%;0%O$sl;B0++q3gm|dUy*SCF7AlM%HePz&& zcO345px?26)Lt8EuvZ3~>>U?Oy88+Z%Lr~RRx_M27!Cj(n`pQDk8iXmCNH!oru!W& zm{H*FM!v%A3p?Gi>|a{a((hx^S(bH+{_NYOG|LKL9@O=P-&X?cEPnFq&hC>K1!~{< z&l$p_N84=@)6AaobYG*t7=(;K1t5kHy1t({tY5$0G1g)%0a&(_fa)Q$Rx}WZm+dyo zO(g6F>y%3%-D`Tylsn_81E~rW=evO^BCB(`NrY3_Q2p; zo5YuuJ6ofcjFk>jkxqUe%B^rh(o{C+XZ@miHCz@eZb=jXnTJL&3|YUC!E}}47#@~3 z80Oa(%oFtcY2{WLL58yqS_!<|6gb%&+_6H|ZYZxGRbCh*Gx64+N3cQFjJ2pnexG5; z94uSwf8rBnn1}0s;TV=?K4C0RhIJDk)j@pyc+R(9kKAnI6CHMI=6_m?4M7Ra|A~a^ zT}oJ*6`+QCMtp3)jHROXz}|NIr~SRwpKZfy%2B+#k3AQUPQ-T>T|B>Nr!@4FpGa4Q zRqA7xUB7cQ z+uVjnb~TuaxBk3>ul*dDNLo8K|0u+qCK8e%XzA9gr&U#L5*PU0lP zx|v2c3axg;F1N47y6u+qS8Z((ugK!Gz}d7fAl&PPRJkMRh&{A7Zh!w;i|rc48o$-7 zHHmj3@}(E1Gyn*SFMPkkNGl0E-Qp?YBfoH?f2qxqD1fC#`t2%Toh8UlRmTwd>k!rA~2U{&!ejZIG zkJrNjz_oJS7Lp3)zo+Gvclt-4eHj6*fWIAD;;w;nWHvy~!Qnus2=3gRwVT$D*n|70?6a?T+MaP-8}Aa#3=|T44h-ZEEe(9X zlmPpl>BR@6oot!M9HBu^DFV`VVa&{qE1SxksuT-=L1s}=3a7u^E=4)Wct2czK_>Fu z%FHkt<&|Gy@-tp;m!ZlZ(*>Rl zEi!~9!P|d~xL(>x5%6-7AHH}3X9uS2YkMZ`i+j3laMY{=w+8cB2O!3p}Uf)6c-GaUy$YbZomAna6im< z`}u-yrt@uCBfAdsl|Tw#{JpMo#Cq$x_6w)y2HWgpronn}CSAf$=v&f`M}VmWM8`1v zc(SbC3qXVU=j$gvqzfT&CM|p%30z*PSM?we8#pk9Rm7LCbjlY-mXT5)GI}>0-rtq=#|Iqo(-e+g*SWb!2x{I zEuFItC~pcpl{l^3gi;7n1bRV;w9;&#tX#SNlP#S+MgV9H@-AEngmYF%W9Jh@1|U<& z_ilhj88{}afIPJ0AwiPskk!%MWfBTW8#`0>scR404-F36=iXXj&z$Ila?V;CW&@hd`NHqd z5*SV;Kt9v{0O^GRfHKNmQ_ch=Ocb61;?V^QQvyq-0LUC{K#)m-el%n{jUN~0_QROZ zH`U^lu2LF5TyDZJ>yP{tz!c8@U*C7aS{my3;NFJjyV86mp z_@w~&VgReqs?F#%sSGKh}y* zK9@#%cCbc$f8;M~e)j}`;gt+=;|zf5&!mwci#CEjeSAgfyGwK{ebqSZh>_XSDpgpqr>Q` zI$KK10bc=#CcGn1v?6WT_lU!%QgNJe#!&cuk}OCGoG}GJCaH%}=bNrpK0n@f&(L+o z#rU8Vv-*%H|1N4CvyE-FKl#P!|L&75_6FWVPnN&<6E^*qLLeh>+E~qyp8O2hnKGma zjc6k`X+q0zF)*P&#nn1E2$hEEi`YR=U_)>pZt(f7=hxb+gAMlaD~@8%U^d4)B+l|b zrwFj$!%v|9^rgq`_O&DS`8QYC1O44L$^8NF4r$@H-=`hvSsn-|{Je&lQ#@*V-S*_B83b{p-&X+D+7p&{u3;))v=IyweA0)bnnpQa=-DP( zeQ1O3Qaon>5F03gn|nv?p0)TQQ16KQ9)LgG%@yyrJH0jv*R)O9ukJi-cMXi#-@LKP zUch$^I+`<%PMQJu%7ApGK^)(xq5|N^ADrqfSP3kN0sx}ttPx}T3@_m)6mw_5;BENi z*UmbR{!ZY{zsGS2MY8vqVunhDBz{~wa@r_dE2UjXxXLE<-9ehrA7o^W za8dvgejlcA&;D2{Yl%YI?&uk?yI1w&!=NJ;jX?m;u|0rlbk@_nt8i!GrQMVEwf#Nz zd4AUbFOYSY6{ZFjLGnUb0koiOjr^>}R|MJ*VECM80%uGCka^gkv&mG#NzCp;3BNjr z&;D<~TYqbsCm|S>*XgdknEty}PI1?pSdcHz?!SGgyRc z=vwdQlanG?E|d)B2t{m!o&zTf*)AR=`tgeg?fO-t_TOIbvqy${z!#-cgQ6+vOTGZT z_>u<|fW8kXAqq~6=y!3*hwSw|9au62zy<_OSXeO4nf3>9lAln_E~w6-KabOYH{s1c zUg}X(0e}>b;n{y7I&<+O1zSQNoaVFRDLkyFngZbCB3j|Rn6zV=DpzjNK~RG43qJ*% z3P6G{ftNoumBBOetaU`j?MJ(h*loQBZB-MF(di7p>1=aavr2dH#q8y=E%w~RTHDb) zV3)QW!i;PTY4PLW}$bEc*N);KA}2<%uY8Uul!!wkg^?}wU7St&A*X! z+@2a}#%9*(kNu4{uuy;`H;AA3Bdfq+mBy}+i$tjO-J|%m1>H>RcY`g8s^x=q1!d_2pwUxO^+tGN`E^mCx z`eH|La)$D9cE4``QaXu#@1`N!+>x^1e_@>+9w}N6B1mT%?3Hi^z@6R{EQPw7MRZB` zk(bzafK?SieUxXhb1*`F4q48+q+yItrl;lf|Ms3?>ujpy+AmE1U&4nfj--=#1T_2L zk7fbvEX@L>1Sn9|4DsNXfOwLO<&-jbWxcsOLQTm(Wp-)KsRxA z7W)?yu%nasDo=jg-UGqEbLDU!Dk&&+_j%7G~4&aF1PPyw%Js?-CA*jQX+Bs z<(f=iC?;*7&|yaloADjK8*OXh4ciuZ*?J;J84W3^@3USm@frN%-oWbCDf?|Gf&cnq z&K^F|Lx$#ZiVC0umYYE(!lRjR)A~xl_an;1qZ_L$fhAD@Vj40LjTj~fU8MJ?crR$$ z>Bsr*=>%|83is2k4PQG>ZVA@>GaP7Z;|9<uZTMtqj#Mt$(`>#2+Eo0B_nuRtF@su{O# zd|`+6X#YdB6fU9xX_(D7*>ky7_HuToZ7S@s?Zp>uO=OQ-9-NJrlkiDFdt=T%bu~^x zzLK;1`lFVanE_CkB=AxIL8y2^^u z_6yVh?+>)vARYnsw3S9If0UJ*%qs>anOGlZ8gn(la{Mx@mE|i2zwOLJT>LQ6K{OGr z#5awlQ5s(n{?UufK5=`4U9}oY46Io1R9`r9)E~)p*f&Ra+Vi=Kt)Ve#9r&&u_dF!{ zggQn|I{HTa)&Qm51e?uu+FQAu_GV_Q_2m!S6~z~9Q{+|51@Ht1`vhmxEk%48itkAL z(&a~?{v!71c%EkfxCD?e2Zi4EOYj*cH`t)^EMQ3$06T(ANJ!%|q#qYd)ltNsu5Zk)kNlvK+^bEJeGVMD}wm>q)kp zShn+Qe_vvKFMjchUm{z{7dw`o^b}i)>}a(_N)$;^fy{BTep@|r_MQbs&3u7T&oVhj6!kBt1?M14^#ULE~Zc0 z;$KrVY3Kf33`R7SQ3%po*^G6dt^U{BxqmPzqZLdW7JT7HIfOOU@Z$^BF&A+@?I_Q` zh6Zweyy7OHwQa=C$=kLh;(q6ztotY1O{`++vXAm6@{b4dbA4Mg8Q$!^F?hS{uV3og zn`5@uA^)Nb)`i}hlkm#|pa}IPVOeZI6hR}?w}v`*F@2+ZIJMp_%j|KtWS+5gf8vBSpYd0=5!=c;{Jn__oxtPyf&{&kI<}pah=h|9JmeVRc+y@GOndMq$e`>8hdt zBuIXTP-U2jbS>zo@#BQ9ALoa4-_P%d{j`2qX^4}T@C(8~2qcgfe|EMGxV5dE(>Hb0 z@o^x`o59@!4epssw)$US^AAb@`rw1~UifM%fS~g6KhXv#;a8Yz!V)aeXT(PRoYCet zc8|G_zRtN7i;T~VEp0>Jv>Yq^iAu_?kHJF4s%x6M80;t@N|d7dZ<6=RhWfOO z7z^NPJD(QREqW*{IsnH^5%woC?w7V?+#f%Xb?a=wI%g;sRwt!fg76<3UgvD@*;x29`KU6(KJ_B}hX&WW&s@0E<>HHik-w=qFZd_`1Yg201prMDUZ0i{ ze#%r>_>&IYiN{Ou!!S?;W)WOYu6GZaMX)+h1pD3k=nIr;ilC~Z0_sH_^u2LqtmD7D ztNr$W`nmqSh75v@up|6Z0D@8sQUnM)mH-Tw5q&HixT>^D#1B`dO6Lm%PdVWX6tj!@ z8Ig1L#oyPP`9HB1tBi%9nE+3oZMF07VyI?QLqi~RA{?fl%2peENP4wVeL?%eilDB}UePs+;CyPU` zMP=PM5?7=nUQPm`YeD4|B;F4zU7`4JIex)d}R9wkw`6BY)Q5pZ{#ez2g=Z{-Aldq{^-l z{-gFu?Y};Ehja0E*Jh)>1m7R|!z=!!=vRo2!iIb}+Cw_7X(uqO0Enx%GYhc@()La9 z7ZSVOiPQ#nd-j04CGwQ54Nf>Ibl%}c%ZKU z6ptd1B>)j9W{MS1H3a~%3pu}|iltG$QuqCP3JWT~U^rgaz_5ogB>03GjYrMoy>n%s z9qv&6*e?$Lc(JF&9UHWHY&!LDKo*aK7nYtL@Z>^REd*2MIqz z{eStnG51S5O!$qh3iob#3=sZTM!MX8KeNY;HQJYTTk^t>;QPYwkNmQj!Zf6|V)XFi z6;}Iz#8Dn?2TBnTmcyz7>EHpp)@atbo$PnWdgMd0Jouv!6Z<7nKi~S>wryK*+*e0O$HZco%wW93;&oB0A z^hf9!_4TNa_9B>4021WsR2)z?UpZf)~ z0~&2o%|Lr~UDm!rvTI#q=O6rR{3ffJ!$Npj$oItIIZ6!AAkQ{pWE~$U0E2<6ngyT= z<|`DlO8|UGSPFnse>S%ayUi6G`^DDZL3{IWpPl;`_n!TWk;B3-M)YY!-Mr+pef##n z`T!5C5FaPv3JI;s(LJuIQ%-H>T4^XZT((~HN!cF%A$ytU!&}d}civ==#_Y+)Ow}z| zq;0F~=g#bMJ&`4Di9O@@1s`FP0+2BJf-hPDedo8yk1rG^FX>eVkhUwHJkX14Aaqxs z<#Dm|{A`ELPm=ez?(|ys#_V_98e1g1>T3hG+wz0=wr&5yf#j*@E@T+-Q2??65*C&f z5S|L4)#-}hks!3FngWdihN2a+UAVBfR3&%JkB zug&>qF8l#LX8M2q)gA6oVzpb+F;)2WxQ|g+ZIVYowy~3p7 z+E)U?2gv$BUvh){N^+^&GxnsrGrHHL%J`#t;xwfhhMHU48g2OaFShOarBCIjerfYcQpDr^C$5IfS)Gon7cor&y_R7+c0tl3zy@)w4!Y`wJ~Q=fMRF#QEJ1wa85 zng#@;Pz79V*{A7BG2%3fs!DPnKVLAU05mG{-v7>y%Wh4}NZDuqnE#h-BZf##+~l(bMJF! zvKveZF!)yASr^*5iIK=3y`}9In{M*55P~nSbpWgY6hKiWP!$DW6;5%!kWINUej$NW zI-(V)^o8#EaY|PX`gs%v`hqYqD%vyedzW$SSGiK{zM22en(&`Zm>Fw}e=tzk`wS+= zQ^`Iq#loc3J>?T59w(@H#nC?H1#+!+YR=C!;Z!>1e*MPNZcS_XO;3J3g~M5Ut#z}z zlhVyBqa((>gGOY4duaAS@hq6#)70{MAN}ws`2IFhoSEBE5 zN3*wHH6@U>wSXOK8W(@~?#4}qyQ~0&9t8lD6@UfcTLEx%^(+7@d2Ro?b$!ae(mbazss(=ib9*0J#nVRw*A_sm0+Hjp9YA5 z#L$98%PDaKyye1eBwqK!_xyOZR}hn5ihv!619oQpgUfo{{i`kphjXgFnZT$i#lx4E z+gE?q+Lv(}CZ1;aqrXgl-%^5Rq7(3HIn_yhJ`RLs37`a|w4}_K7PQ%-X0&Osd#LUg z-NDT3gXzFk!Q6P_U*6NQttA%a+&~Gx6o8a~Zvp6uK%fM!iUn}BI&Jv+@AeU%3Z-K7_|80_tRzpG>2CI#XLZtsje1d7i+KDs`fJSbJpRK zx)JxjO=p7fp-i(2(n66;iAK})?u%zO+p&GjohMiMwb+MHAyB^Xi!OpH?`lFR0-*X# z{U=2rC7>w*$^Z+ep{dn9R{v)AROWsgV$&5FkF#kT8?v^piY@xJyJ8!y90a|P@Jj() zVFkSA6o7~=;TP112;|v+B%5;gEVHe@l{lN{K7GE~PIYA=D?eI@VZ=Z_Q>jSB>AG4_ zZKQmK{q{;3jM#@x-@X2vTiL={hqGi2TlL?2ag95g=yWY+B5Smi>93Jg0wsF+G$DK~ zo$6N~3P+&u_7wq^K$D$V)D&-WKd66$`(ft3KnYZ{4N}tY-_yR?SdZhw!U}+CfE0j6 ze>yj?0MH0??!;s&7(x;_CdU7|TE2^Mzj{ zKXj6Si7q9IE_#dhDZj#k$`rmPJ{%Xmrp$00_!1X(s$cQ@M(?u|iIVP?x+m=sA#zzA zm$S8i-RtVQ-m;~B)i+-pOCSv7uD5AqW}D^7A*#9@lViK0I~uC3ji%J=MF}j4~|ZwlW@Yx zhlKr6F)t9j>XCALmfD&B)@@~-ng36oX?6o+HlOuQ{S|`Z@+=-n|pFQeLH{4B-kSpWh}aIjo&{gSFpIHhRQ8XeSk~uBsAnW(C~0 zDZXl1Jjw~e5`5qMN2~d305G@hSh)%g;)!ULR_EvO!+w5sipuuWaZdg7&p+>0uU;MO zsi$LLc+x1J1VNDd3ETX$(air!zW56T`Q$fm{>AOhG3pRAloEU&Prp5cg`3)>`=#;} zN~3aszE@i(As;$PyPv(`f^A=};Gk1gRt(zQ|3^J*+$+g;w{%hdxw(V_C@=Z|X{+yx z6#Nm@>{@=Nx z&tBzak9?Vqvd3IUFEs_9{EpjEu43v!N+680a1FVi$>@AsiVKI1VkTjr@iXCa9gT*Ey2Hd@nRtK`}gm6gM)(s zf6$MQKKiKJuwg?%6x2sP-h`zH!ZdHOqrT5%ZgBh3_qjL49xjzY=yLZi^`$m`cno2BUuYO3G9_DoI;u8ZjhL z3IIsES?_po*=7665u^X?7&Btip%Vk`?uFqF*J{V0YpyRS1ql?LL>s|M+ceX3C?edM zGiTgWPd()h95^r`_{`mLnD2)VA9hEM9C15$?!3YZAPx9JPauvqDNNhKG;cB9dOCBP z+c0**t*<|7RseE2$Ihk!cdThxW_to!hSOO-lt?8KdO_9zCe{I}q5#6p@(HDT#Nk9V z#g~JH%JTEj5sdtNTaS*w5l220!%Hu{Q#_^gZ>>#1(6Mp?Km7c`1Or(lcW;mv(ov+i@g_dDQnlSBY6OMRjEz2j~FlJAen%%y{-EK|plpXtRr%cVUC6Kdmcg><`>wO!d zOCEkHYiHL7!jFuHg&(aI_^K!XF`iX2;R+Fuo5kWMG8PCF%LDO;hlhjFUmfAsL5I;H zFv9us=Ys_wp55}!eQT?YeLS_`@H%7hila7|{{>LV~Zdv06|TD2hFM_5@p`be=;TP1% zkCwt;okc*a=&Cq~&)lDp9^!|c&tPH@(hdv^1j5l`+c|gLise+9DZKY|i=DS*9X-z6 z5`HlrPz({qrP|jLdO->QB;=Scd)&Ef{BdVFg;xe)%>P%1Tir?fm~B(r)CEz|MYI4` z%TczJJoEc!pM5qk^H~d`KM?Ffyio`r%6aUu$J|Xf-4rMbpMR9zkE3p`fj$pVAN8UL zumtvx-0rsIj@gGxhpMt5xNB9joztAa{6`27{;=Q&!f)}{j{<<`XnM?lh+oX9!vsl3 z-UKJD*ypO(wkNFk9 zdn>}%XmV_z&0a=tbZy4)Fg*e!3xI1p^zap<=u=T0MG{el${rdT3Z{5ZKmD|O;e{81 z75!pnev#rPqA8QLB&G}xKKNk4wE!gs2WSk$0cj^?NFf0m?Z8pKcywfJtGgq%-%`%4 z6~N=bt;?c|8=}#8DsRRj{Jy8NCwv(@*OJcC`9z^8u5lum!a)C?u0>G496wAt9O+(p z<&|IxfVP!WnSzQ3G8z((w`2d@1DkTLvB3_5;OK->&dmSkF1EVvkw!byZt8{*X@2nW zy^2$NbRCA^QYcNa_(J&=r?v@Bj{aM{jbw>|>=dvz)G6U8tm{B5AC!CNq>U7t+eTb7A32?a$A4)%G3e!? z=82P#VfHXRM3+MNRuZQ^r5uEkm3-#*hYlSIEI&3iAz+O7Gj-66vMJ-9d+u@f-FKf` zwQ5yhzLzUgeGK$H_(Bi(B(MVPb@2<4nWi+=%& zOzP?xp^hlU6bkSX4|bLWDEJQnk?_z+fvo;3KG zI&h#Y76$LW`)>EfH@-30L`HcimgzXP$M1jf1dzjGqxOEpv&n6y061ZI?i^hiv4cW3 zE(u-_W|a38Krrf)WZVY}1QxzN9L$XXq6k*3SmAnmdxMdI#UNgHr9*J)ARssjO|IrZ9BAm2hmo;9q|ETaw}b5w$m++_RsBN zpt1R;u0R1u_+fm7fl>g~u>eFgh!`e@?o|TA`IW~nlQ>-yR>u*?bAAMp9bWA5Mo3vC znivJG^D{OQHrZEL?==NbZZZbdc>nqvFWRVNZvnxmbSfQ6y(j|e;zFIaX`NvN+Ve6e)yisRJnq*8=o-+u&goVRyU7W#qh)IUH5R4G4WKhU-Y3} zgmHw`PKBi;5qSCs3-08}lkVuzqd~u+1aK01($Cff(;!WYV?1eXX@NwU8{R#Y@J)&z&?z*=?CGmCFd5P001;^NklrM`HHXf|l#V7lg(a_5qyz-1Na5;Q0CU)+SrrwGde*@Ze(BPsfdDe9z-%X9 zy=aSngRaeX2ABQLoyp4gPek3h;fPz(k{`(^(|784b+)d-0mjBkVDXB01OX+0#{`v? z0K;pfP<{z7brG(_h4bio%oM26z}cJxNn!<4i8WrG0p=5ok7P(SDR7 zw8tVt_$8FkOzkGmTsde@{m^yCjvayE-+1GV0o@UL?p4dtf4--Uv<=^A(}3>W3OAVT zu+ygp=WZHc{joS+XRoI@vuy)mr+ImeGzo(ySIq*b7C|d5*B25oK8!$zqwQe^)(IL~ z+TEMCy!W^ytZSngU>&Q=I>%ho|i^w8NI9h?gZz1k+| zK=}Z{Is8ND5pJegyvTFgZMV5in>Ga&7V+x) zIjpi|QEI0TrNFV6ve5>2KGWqkG#odEE?LyHZpP|!yy+J)6*nn(1xl!z0-!DlWjO5P z;in0wD|N3}8Oj6ny#(KfN&DpT9gBxtXK?Um8SQIieB>qPdX1t>Y`Q>)(vf(-bHR)2 z**KLKE(6?A4tS;$IJK9s>h<%3A5QH?2-4;|w{vn-nKlPG%m0lU9nW1Fa-$>m7959Q zn6Tp~7~Mu(;o;*}zU0bMNa#^6d{YrKAIJhQ^#*OOqM2VAmXkaq8szB{b+4wD&Z+RD zNX$r$+5?%0eb~xZD}FdYyDAF6XUa;6GneVY^%qnGCIlIK=6CxNGrepPtJG?EaLP?0 z>h_)QaLYQ(w9e+|j0jcO`HUXEHy78wkQXbD_JSLXueNLSOPV#%5ly@HhB=z|ny$NS zvxyP=ZXl+$@B=q!A!aXz>rCQl6BZ3^#OmSTj+<}3Ie2rAm3%A@-7nNfGpTbnc|;SR z7KEWsy)oCt++vr?#cfxhOngN3j*6NDX$ zZ6qvb3fp4Yp`K=U&MkGDHki3RK8KX4u0<>{n?KK2=U)p_z+l3OFf=f2=Q?b&P75;y zvBYeUGX*e|v`so@1(f4maFClWU1$d*J^3*2*RNk6jPe^dZVVQ75qi=no$9&P5PYG# z-(KjzH68^pV2AmR=In`3#MXl50%7Zu#8@lz2(2u?eykBS#&j}SX4d6$A^=ecqcWcmwQvyg|dvwF`) zFJ9r+VxH2@Ro!!4j(AYza*cz3?dOuYm>bR7C&+D}DXT?;oaO&)dTZ}`+RLhw3V=$l z@Kvz@!VUJ(RpSM9FMO?dV6l6p;<<;1IRpt$n8GHsx7g@kZx2dJJqpA8zcgZR{@JGj<(28x2|iEUVW~*{p+Y{ zfQ+p$4`!R)3Zvzmbc&Uk7|V_sjeG@wcDXtVKn=YX5C*~leJ=q3a`ab&jpw^MSqLlR zOe;Tgq1BxkZFHTjlP`22_`WirTsoF`ZT8_nQWOqT1fGG*LLiKlAf*5XVhUh29n`Tm zm{}y68)ma&Qns5iZSAkb(I>KwpcyoTUI;wLwcT*T4Z+JdEZ`yV+=qsKzDnwuk7@iq zp29n3h!14=vR9sW=K}YUu^c8S3V@E0@cZGQvZ`1BbJ2j=lmWBIg_QtI$9Ml$G$!1- zwqc`r8N1a;_IP)znezG3pN_*z0r(wB7^gbb;V?4K@!6V;LjX_;OdD9uMvd4|$TX`W6R=sxL1)?l-Y7bzLOc#+S0?5>0?%7^gxQ=$y!Hc-7aAh? z`0LfFZ*xYY;T&gF($+b6GtkD6R63Z0`U*fw0O62;%dA?o~bdPPs2`K>T^M&7Ur;nSDm)b=> zZSG+&y6{C%@K^^-8wB;}4}n4;XoK&lBV50KpD=X>^;o!>ZOjIzQkqmVbDS-Z9T!#< zBf`!coy9r{I1tZNiCvGF`95uE6YYB~I{G3Rh~nJsejG~Xl2)un{4k{J1BFmE3&0nG zaHn#wQm3?nZJ-SOA3@Sq|s9xUYJFFh5XXDFMv?MRo|r)tSH`E8vP^!&>$CNu|Kvxd=zX18+1 zGS}6aAN9czVFxepK_Q7wz(VbtH4+Q30MWs0T$j$x)v9cs5HDX$a<+X~_!0aG;kR&g z6hIz@Yx6InQafRJDFBZC-rhRumf7wW*BF?4QvXK7j^_*3aM0a zw4)kyDplvTzNfwuoWRF)c{(_hbyBHM+?!^AaUqk=<+}TG9QJ^)`$~YYlt7>e=Fsk# zCZ=NF8na9Ml-^`pW`OY zs5si}dkUF)ZI3DK_%2=%nLWGZQEae11-xTGJ-+kn)jh@e>0XOrpGTny{V^AgJ{?L$ zQYSBFdBjyr_^B=MRapa|aX584LZWbRqs-rQ(krdX_X#WE7eoof>_m^9i!uL;BLNYU zeDm+s=3w+k;C)Y>QUZla5iYtX9E)8mzET)2&(Fs_xiB7zAG2=&q|MjyvgjPRSky-S zkmB*{CM-V()h)Opd|H6~mDjfRZyyRN$&{70+PZ&WG@Upx;CNXC1)#@)zA^|#e=4ks z0svPUDP{~enER#NbkY|}OB`OxKnfsjW-2G)29N(rdcZwfZIdt6 z7Vd>{3}2VaAHH8IKlh5=2VXXxq;mFXE*r5Y8{if$efrmS?yZ%RH~mFxL0MkH%ZJmi zX<_D2o5hb@hv^e20Ce|k`@?pwo$Al^+mYbB-;VIhhZVr}H3fh*L}(E>3_1Jn=JsLN z%HuyW6m!-Q`)u`p)aGUE`)9QG=l!wEJ9eH->FA zOTw1?0{V-weP&m`P!nMv1{be^zi_)n6ClBLzx!tE8Upim0-l>n?i zVF6qhYXBl{n1CX(Mj>`a-ooR*67tHeL@H_@{j_KQvAn4-ftT4YfeOQL{qyY_d^v<- zC=+v+)3&X)1RW~JJ!<<3>^N?Fqmr`*1BN#4^P&1j{ZV<@3qPgbW`)D_Kv^~h*7_W@ z*T(sM$5N-QB!nK}FQx#hX91{zesc=N>3*quN+YPWf_^-4^8QFfc+8%Ex7VfIHXi?# z82&l;@1?#bcXS|bhg(cl0KOIA3%_ufYv{Mp50|Q^Sh@*(EwgP}cIOgvcg|j0EMr@% z*{6`-a{&%M{lS+w;TDFa+H*bK6Ac74FmV=LTb=Dnou$LN>$Cl1KYlfH-ip%vU!y-z z(*Rijv-}`j8HCl*Fdt6Wg|d~p7f!FVJ|v9y8P5+V?eNc?Eu(IEbJ9$%5{8eBWKY`Y zpS0();ZJ@~2$8i%Vd^C8!!W+Hy{2rOV7NThACA|xaOD~+CTCji{3u&b;e!&iAVWE4 zsI@iP3p_@*gfTKS7i0VMCk+0+2d~$PQ@ceIXha-Jlk+7y>Ue55OL~|FIB_X;=~!>J z&kAGY=gc!%0a6G+IzCVW^Kuc;kgM21M4SlhLop-7W&!ZFC4<4rch(+*6>@0M(UiUU zcecsSRGYf;uW5iUOq5Y=CRY0j;j6e(X?*-Nh2co^^9fS`dD5wv89~V3SeLV-trPB) z(OBD+eI-Cxo;?ccBl-uNu4gC3=R?sV&!6^^d7uF7Si0FNV$A^7588Qq1od^I8{1PVpd+Hv3+5VQYGq9SPo2H)`@fb89I0W<}4~ zrEk5MJ!RBE0U-SHTuTXP3P9J*4+Q{YN`QT$8G?cH?GsH%c4Qq{Imb8J^Q!Se{e$Rr355Af~r$6j7#{sSUSZQf|Zt0ES<^}&T111V8oQ% z@u7CpT(eUEs$*T74LGJ~CHz2z#q8=6@b$gQxSpW;#BZnCFM0q|wl=jUW*?8SjX*_M zvof-n#roJw$)m&REH42`@WU2>gr82Yz5?(YUoK25MKr=V*!=U#l=0eSs(aRqPxLI0=E$K8l65b6szn(qtx0yL+MC{Y;gDddX9la_nnDkr?TCQN(y zD$UWMHkU{@%$^BsJXzk7a;xkGtE7Ev0inlB5l9)p{P{k~L-6#y@V%ZO?Nghj3`Li; z34eoa*jpJx0nE<)f9XQ@{9`W%=05_@CLk$*u=x)|O;`X`dkSEcRMkOPIfX@RpqP!r zKX#e<-xcR8G0HI&A}Tx?c>0`u-rL*xCt*Qg!b)Ij3G?@gHb4)*EresH08S^H+==0K zw|$W@V2Q2K{p9AKQuBX=2q##i=y?$hj=o3WXq$ax z+db7|AEgKegju3$$9b#G7(B*4N-JChWu-)215j!%)I5SggoOa4(d1ruhn$RVWU;X_Gw4 z?m%Cs8%Wys2J`x?P`1kA%!1g}HRQTt371Gt3O|hQD+BsPzK{Z_HVrCk%=A+UZ=gKw zQ(Jvy7|_J%63dLZ?JZ}lvRNDjW|rLldUoWQS1xBRSV5Tnyac2vK-m1(BA}rdXsg-S z9ac>dmoNLun~E<4{W!wDkm(*J5|-y0A`22Pq60bnV?*<(TiZI~a%D{1=X&C{LvHGe zKN1+Ak55pc_a}S=m6mIq;tO5to>yFuUf2G8KkVOE7^pNr-w7wR1tri>U+2!Ho86(y zc35ffI;x*zdSRZfEVaD=w|0)$heGm)o`!{=(cd?NB^<&v45x>|wM*^eO&AaVi5F!7 zNeQ43M~p^m>n_>hwEdQTX5%oUf1jN?|H-|H1J-&>ehI$Je-wa}0KyMb$Xl?A7JvvL z;smwXpRU7@`-=0^Dh}v}{qzu;dp;!0+kd-l^G}1#Pp685YRIp>a`e~XOZEXvQ^W`c z4nZLt793rx1mUD>U?E&}zfgMR3Byup!*%%As!LEf`;aj0tGA~C`jl&}cU%Z&Xj0lhZQUXQIe`q>0)pHekqZ|W>*n%RuAm)E8mv+0C^69VQ2%8+Z zOQZGf=;hdy!#|iKBP3y8yrk;hDMyb=YM0O>`10&|_{l)0d+~Co<5B3WoLO0StQc}P zn#DD2(*OxQOfSYq7^DC+GSW8sO?|1h3eF0rDrOeGQ~~}t;s_)7YNwQdXfTpUxfQnf zx2w%w+MD5#98B2;hI1pIcywr=RV(4g{Kq5w8vSMVYw^!e3@q$GD(0;Mum+TM>Ht9r zKaee!YwfdNo7!z#bSd+n`M)jxT}pE1-{b}$35X!VgOfrii`+a*AiM?Du9)r3AG3G) zzWM5EW8T>z%`~8;G3$Qrh5Bdw+61bIN)Rf%oVB{^%dJ0H$>Ef>Qtx+IL~5 zP>0y3k=*VjL$0~p;U8Amp`J$T2pbj0&0>TDK@lX3lkfx=3*^to-EV^w05EQIpC8#e zzzdg`Ses{W1-$u&LANG8>V`*C!SUq?zAyX|2q^#w4iNA6DL9Awd_Iug$C0r34yg9f zzOWTEJeqXNT(7%xQMV0DGh6(#S(|&|Oy<>(Ka$vMv_RN-`3JAjUn~E<@FO^ZH=dXf zq6Mb_tPxWfL>&R))e&RHM0NIMq}MIyWaQ!wvCi1@|DT!yh}p@%nEf*SB_I-dL6s)K z()B`s!dZ$UfukL2nqF^zwbm$w2W@V+9DU@%f5C_rC` z)UQCC;LNa^yIekA!bx~b@YN=b{%Uu^ra~j84FB@KP&l+#|qraX2F#2odAEDRWA6BxjkWG&MM9d5ea#r9V6pSXqDT^OR80V+)?{hDF zt+YVjOA(CPr@wbE8_J*kS7!cy+=Rc!=KpO?lLA3~VGka@6Ape{sW9oo?I@MrzgH+< zx%vy`QJLYkq3|d#Wk-em?JFDHmbN~}DL;(nGjZf=jgPqx@9J~^dSBeWfta_fWMN6c zN&$fnPB?>$a8er4PxvU0uB#12Z=k&R4Jajmz@yN@R?mo8L%Gzj`=#|S+LIT1N-%>* zf2OD1`Tnu~-~WffZ(4h8bPK#pe<=We@o&lkV3>x`tZEj3PcSO-o$e7QVivovG=j>j ze1$q8YA4k0S;|XM<=x>P`%bWRh8PXTQkdLai`fK)L;2FDrkJaIm6TH~joKrqwgNc> z&2M~zv)O@*2?_e*DinQ`TW8k^ZjDx zKb+>sAdQ~leE6F+g7{#>?T9z?~{r}HiYz#jA zg+NFceBmIB6AUh{gFm%bbkvC3VtXdOd0~~iz4Ma0Y4Igv_L+?la9YIZ|A8HS?r?9T z`*EKwteTRc9?{pQsqj!=^4P*O7e zQ35jeQ3MkH(a{mtH=J;{HJx@px9sSQO@G@k;Qs1~{zpIebn0nClhIxlfENDzxxYsK zK=A!`5%%4JQve_j@qJI6IwoQB{~b$*T}LC2mWneka@{i$wfVno0J3=%Oa_Aqih+O% zQx7hDosV5O|H2;{5~kgRfqVrioo#fVdu5aR!6oNnZ4=aEx=KhvGaC5Ez zjEPLq^Pr--P8|glljP@NS$Dg={8QH1JnVRXle?IV6`lVh5MoxrvgOX>1hfHq$@xM= zTTy=8kH>QEXrjY?_QY2Azi&AlyeHsgQ}&9W$%$KSX9fJbyDqqYwKwW651a6g=M+u- zzLapOPxYNcaFcRYzxep8EQXCP$D8>d0S=8Ma@o;=+=n(Es^8MlWBI2)*3#t5ww>bFzu5n|!#$Z-3=Kwo zgx??iG5rfEfPj{?!)P)=S4%s^Nf}RxobAQx)vLFdUype-7YeRyNk6tXte$P^4}&N`|6S0$>yfmhza_jG5%0v zW8<*F;dnfrFqpLXv@zS5#alI*tS#!~z-O-7HW&1nP8q`8=ovBQfD{pHSJc9F2J4`$ zF>wR5wd=-gHr4Q%Ul@JweVglFm$i2*X5$#mzIHg;|7(9Yd^nk@8;Qs35{A#H(Rl^x3vu+4_Lv6ge^}% z7lQ%6SziO|tjs#&Gd#TK)2YGI#PP zq@&3Xexc{HpZiJbDZ7X1k7_Guf(;r1=&+st#mRm)xXw(WNHt&v>1IJ0tq;_3cO|F@nS zcy=U}y)ZKDI7gjhS%8>XBJ$|QjT@7<+;U6mD_{A_?3Tr?(D~@#kq>?7L(zi=57wFG zR%dkOn_)I{4`>UG;~)A$^yPo}VAr2*TvoSzHc9|1;;lQfi=x@wy7zph_rS$L$D@S+W0RS}KgLGdBH*woqJI{)7fwBGZ;`sSGlzhPiYS!4gl*ZaOW zF8s6~nusoc@5#y4(URJZ(p z{%ZT%_iTu-&z2a3ENwv-Ok8aO`)|K7@OK~o&d9ec5$#4XiYHN+8u_*IuaRFgz`7|r z`dc~G+Xq15bLD8ucv<0&QYXUmGk2l&aho3m$$xal(?oAR?Nem@|vyo6E0SqUVM@(XHU5%lpBK0baeZ`#3!4dH zXpuK;soU5bk2IAUq0q3s!;#U)j|L~GP!2?s@XL(yM-jW7cbZ@7dZ9zwgL3uSB?X|S zK_7hJ4s>T5Wfd?N9=<{va{?=^vF09hoWBI7HRs_dplou=eps}kA7|Vxzt#& z04F6Nfh(l|{HXvc$yer}ruO(~`n)85k^%tw!Y@T6B_IXBb!=l>UDuzzqwP&^yR~VT z+1)czida;Gqi*P+31twaph8niy_y&JI~QdE{c| zxnKWQ>-~THhGF-X&8gtqB0PefiQ}oRS!I#mcw_6fJJ&aK{mHimp8L|_boY4OVMV~m zEAv;QU?Bw{C7|{c!j86ye+VP^@`V%tiU8pU*2n6iEx&VL!!5sgf7|O#euQj-}u7izy9*!)Im$^3qMl;=KQ|pqxPze@G(_m%}tv}7m@;?lYFnv z1KM-uXxG|B^~=%1C7qG$$K9DrmWG57PXzSC0YS&plqt|sEpUewV9vnAlT*=#5oU_B z74%dtHS)cIu_gC^^wBo=y91-{1GkLWVX8(*C^!QbC=ZTrTi4L_#a~-;|HFq9ul(^t zgU>yk|I9W0t5Mh&eiQ)sNgxR0eZf%Qst z?bnVADFNsqn!|87F?Y7)Dt91eEJF^C& zzi>;_hBs_#TJ@!a14lo#FY(g;?#xB2pMFLWAnn^`qP* z^cwXU`DrIU+{THv%~bfU%%Gvbh2Z>76LSjh+@2d6HU%s~*Ozc3sYv?La1O#kKzT8@ zV2Kj0-&-LiKtrJq4(5{p)!TFP7wq}@v-X_*-qv{5eeOuy9l2EJe(&y4w`YyXrsbOH zlmG*cJschOiN;^Or+vr!Zg1W8{nEGI+OYBMyIOZ_TNzzpHnx3g&gS|v+!Pg<{DaxvfBTL8&;Pgm$$eG_g0DxN zzTnH+k;0RLo5HiR5q_(8VJLv#`mNsrS1}-AoRk3Z^*dJ92j*CCr^KJViydv`t&IFw zC1MIHCuN4~)4l5&mQVuFJ5U6+`!Z=eBEMt1CGUk8?Y12D?8OH6D-YGVf4MX1e&x0i z*KV_QHvY_%h=BqzMPT19sDEI4+#Xx^mTgU2cC4yj8E=d>OfK-vtVO}7 zZ|2SZmlMx^^veT(bD%qO!tg=3CHz3m^$~svK2SFjE&Ta>GW z)9f+e&)pnf{e^?+ACuQSjN&uP1d%PCdgSOz|61|aB`l%@M0ZT&=WRjoN4CxOLH5<- z_^x7yO$nasHEZDEI`_6sDfi1e6K?y`{QXM0Cn%`EUr_P5KytgYCDMG~jq&yOZFTEy zDZ;+8o68O+BdNZj^w6Nanx9DJ(j&~h^;a8j&^8{RNYS=fu|P|);_g;jC>mNm#oa0H z8ni%hclWlqJHg%E-K7KzfdF~a=lQ-regAyob2x0_sq`BeO)uZm6jz^Y+L9u zs=p!b`!(w-gvox}htFj|57No|PIS^esoK_mWRZOdv!X73!@Jant?%^eVQXp?N}f&a zwTtvJg&Wmsj<0}!26Xan7oeP&R}VE}!W!N7uAIzx03S!=?%dW>k@k+#j*$kx0gNo# zcPtkcSB=;Wy@Ia%_zSm%H9Yk`n7K{?l~x*3&!vcZC$mJ|?HqbS2n?$GIFEnbq9Rb@-dyt|D=S$v6z8^nKF)AZGJg z22%(bAy@0RU`~j)`^k#^VdVPj#eQZC$Ti);=o2&JFR%Qzu+CB3O!ErEX#4rS&ChPo zm5Io|h}n*~0m!2h)RIV=2v1Th^exmghR*{I@)7Eac;#cTq}`&`8Z3mFYw-qOf^P9L zxrH?8Yv5?rb>;fnP$ zb?=x(_#sQqnIN{ehc9e9Cs&ndilXy)EB{u#lJx@WQt_ty97F+Rm|9T&o*l~-Y0TZ}ahL!svv-<@ln(DXKqZGGwD0iBR{kxql zDR5$%{p&<5@0%uX3C+B7d>O!pTRlA>zZ=#4&7r4iyyRyRU5bM*eSYXJ)Cg>`woM}f zIngPP{xChL-*%^>O9eYt1oeDm#<6&2^D{cy%zLr_Wwq#z*yok-mIpC*%4Q3b87wsb zPMZkx>YG_6gSxhbX@Zkbso?>Ngc7ukTBuRP28)Ox!KP0{CkK6lJ~T#7Ru;HT<6|f3 zDgvH;s19jq;q36e*<40647ja9SbPU6=As1It%k}s=|=tUQ?X#J%Vg-?KpZiAjDA!J z5BGNqS37@ax9p!>;Bp&ciJni3dr~Ou<{>%~9!O|#myOuwrfb8eO-SM5g6>=gpR@n* zs%R;ic)7lFNu;smxzDNyV9oUf>)1>&t^GjU&(6+}z~a8(JT`PS z{2;f@!HE@>?ww?OR)C@kSbk$#F-p+oW6CN-*lmZs^sSDa7S)DJPku-gE4f_qGOn+8 zE(zOIQ)*<77@eI64GA>l@p-r;b9P|=blmJxz;$qec-oGnNSfD?q5Jk?Otb}vmKN9T z@0-J>i-1F1>03FkZptIfKDCZbwd}acmI8^SK}_3)KA&LO7x(~&B=p!<{sFxoUC&$V zFDeW?^+rV9%YLoY{%Wr1!HN|r8;WyzCoYr@6p~Clk#OK~gtJZ*!Ng%s_Y5P77L&p_ z?avG-b<)%Mw7mLMQwjaF8Wuuo6FeF!v}*U|t!+!R@rg(7wiHu19z%(lR35_CcEr7J z3h2P{n!^A~D#DX=`;%}tTP+GbFk*SJpJ6PHRM2JK-K}0$M2G5FR5bl9JA0I?@=cu0 zXyMX0O`~p+tct_V8jZImcXCv;o{FjLy&O-9w;Ydni5IW<0oF7*2xd0^1T}@t#yKxJ zi-&DCx667`hD?6}ShO`A`Zgv2-ZvOdO* ztUVrWp=x{kc>vG`rf!8QUanW&Vy;5u+Hyjx#LQGKCJ(>kw$Dj!eVh&ZdH34CYcwET z1Vy4%Wh^A>`?#9IREYz!_;uxv1F3k7ey0~Z;P6WeARB3n;`iCtSami=DKYN^j{ogC zJbeS-{H<0ZVHPF?mV2cCw0WD=-6E$g$>xibYSQ+#yM=5wnHC5VL2F`K2PkN6VFm|m z6G)cvwUk&(<`}>}zV_OzNP?;fe&9V{6AG9OIHrS+t8o#{vEbCm5?yxk`Rea!gvP~) z>EgYT6WLfX8zU{~{JYkg<8#qRe!DE2i=8NoUvc8d@E65V>&HKY3aoUU5%Ss(WiQ~f@z+@{_CX~ecr2&Lt zEqQwotn-2lkQivWkFWHCXuGsW9<@B0=fRDA+Y5Nxw(+Hq$RHsUo}Ph)Y1e);Z!dv- zxN2kcDa{$XXKPA)@j8;jpyPqQ7yzuH($qU!O_5EipQv@)SY- z^9@_2^+oV@K+$$0=;&(Xt~dP(E@bpvR|o-c2C9zB|u{s%dn` zmK4Y^vh=+9l_Uw?Ne2;LaZ>!w{)bJfx`RNc7o=~o{Ss(Gq1)U?7m@Eh*#BD98(c_9 zmKUSDIOO8=i`FziEuN)C*UAMNYwc}8})Hbg+($BchQ;VD3W&20yGK>Qwj)gZ^e zqv%R+J8o&u-s|F{hPHI{gAZ?)=;q-T6*KnoTZ3qw{zTRa1W5^3QRSjp^1B zsv_IB5fIqR=FC z&u#_j1*5z<*Vkl-FTd0>bt(5rmoo^DgK)9kPFGx7^Xq)G9aFq zlD|e5&?}W*MhBAo`83bWg@L=+;U9zAK=)e8Zx%T+cQ;alp#u#Rhd=x($vOl`G-K8L zt!4gbm(S#N-rt-^+S6aXxqRI#Y0HWJSi=%RH2=d-B(cnHIUQ3~@4lm0u@Tg}VI70; zU6*|ff-!FHfW$7I4R|l;MxpcL&N8bONc}%@@ErF6iMurvF&BUd0ia&;pHx0pd@u~O zGT{;ipxpq&R8`~%a4B(7UlGWE{`eIDKt~;-18}fVyK9fxd(;li`K#OqK*c!q5$erz zhtFEh0018GzYPtLp85L!b~p7vJ8gg7wx*$V{mk#5MaEy5+{_mX}0S_6Qbf8(; zEb=NZd$I6(8v{G)o%`R`DtAY6h?w9fe-F&!CLE$n|KFc4dC;*p$#u1@iL9tp99v9} z*mZam|JqR5h;LjGGR+9SBOKe_H~90sp{adPVd8(p)%nVkju8H(s)W?) zSYu=PCJkvKV@@sG`fF3Fz`>P~(S{6%k=3%Y`~Q{g=mZAs6ExI&Liivv`=k=$YwF7o zyqYyX%$JoimR$THXFw2=wYuVxfADG)3Piv&9^qG-L&y*FCZ(_>xL3NAC)VG5?C?4$Scf#l*kx(=RseG&S& zN*Q2rs|OoIF!+@Gj(u}KDM4!FpgS3bgMmspK0hA(^S^VUGv31=(5`zT3;EOOf8pjC%?9+5&~KhbZ(R6B>jJb zQFP%Sh|E~OE~c%nMH1oT&fO@IlA0R7OEPDIslB~@h{k>OVyA&((a7yQdK^0Eg6Rn7)2`u* zEX&f}^K36E0`=%)5ir{aWvp!^e5s3@xU#AHkY?ftc zvXi1m^Z9C?+RO<`U7I7kWV7wFaD6jMk#yI{CrXtHAE{^bgGbUCZK#@$%KIM(szcI2pW66CKVTj(KkimygjGkbM?D@8D1stuZE>$IxabYnV-(wyEIM(qoz9j5t)%(zS;?!oHn*EwoCsp(0O> zWQC&t47h#fa~y+mS`dF*k^PY#Q0311T>cNQvv%XdVqD`(w)k{7uj-EDMt4#}uzj*a zc1;1KoMpmnk-BvQ*~w8U(j^!1ESuh~d}*icS;r?orqG6SY;h=`Qs*}6!e$!$>kQ8W zJu@paYFewqMo1-d+TNQ~cnF_lTW5d6lWi!=L%sK#o`lA_Alxf z+fU6n5vXDuu!rv;5YgkIhYuNUa1T8_y?x6;wzq^?!zo#!++8O(d)k2cyceF-r3#Nr z&6QAc55^*Z+wL=HxUXc(L$?nvL9T8f%hIJ}SJnq+Yy|NT>^ z3FZ0&m;Q83+m%7I`8R{C2CYuhyH-5IR!kZ++}Y*eOb87`bFZP4Goi#=3frf}&2IWG zS$N~&`^|@>f=e>=iP_?`>n(g67V@?I<^LcT{Zt!uC`PCxD_KOlo=~7~Rq@#>syHu| z+v%cX>BVq~NlwW&8ayrD=4P1+hB{9|lx57f#!900lpc(D{-!kKef1Te@K!q;I~{!i z3f#&HYSc8tO#szZagNNgx9<*q48lA+U6}}pv6UembL(Xu z6KDv#Yu*hT`FYpJ%v(XfQ{vr8J2}JeytA*pu6sGgFtO^z579kaPGgKQ;|3`f4<%pX zkLsU$r>)&0QN8Y<>4`VTB%J&!WaHmQpYqOD8j+h_LD=VfJpsks13uc}L5()=$Ylu$ z3Wuhz7ypPE4gHA26JuXeT8xRaj4=_3k`qYz7|WCcRWh3-x5uMBkjDDVA%g0rH;Jh^ zEc{z!;#sCZ+_dR+--!5`tNuE{+0_R;AN?WY)hOl6fvc;r^O5kQJ~q*c6QxZZ>}_;@ zw~DZyOyLmi0*JCPF?nd0bwM6Vz3$zI ziOd=KEqkI>vpHD z)p@jQ%SAVy+-7IXdwaEcW~|h=Ya`??Q??aqH{VLt%TaX(S2kAiUBNTwzXw!Fu7hGs z(%OL@E8|(B8xC;jR=as8BOSW~eS%o=@765*tm|w6$5OGO;3?PqDeq1Jg5szkil6^X zo4DFBN!ifJO};p+?l^w*ASLoCELprJ)s88Fy6rGyMs5cNi z9(PthJ@GHG3*N1zWyIxv!a~Xnd;9E->k7w`V<$V=X#MHZ?n%E}o((FpGGkAc1UFlq z#VRc}lBeyWEN9NZj6Q@e1AysQ`tG)_MEoq~)C$>{5$UBOY))yM&P!w5tcUh%MJAwG zq3F`l8@Rb}rqC%p(zSx-Se3&L%9s|wj1LlJP;0zK3ET?KmnuMLP6s@-x>VTbz7&Gy z-||d#S7%#bx8aK}d9jH!1jm>$eqYgF8tLD$s@o5;eK&NahwX#IEOBM=6?fWFS=;6# z9=*vlhCbQMwD)S5EIEdm8(wYojoCPV4kvw-ewowEvG)6=4>VHFEF~*qYl~y1ya_-* zcavI@o%ne|PGa`5h6rp#Z(EYeStuw0l(6)c9?`r#FH(=<1kzT=ARZDi&(z2`aToG| z8oPTwZ(ii8t~`4O>&m5FY;xSOZ9v<+ky^*k?UL|sTp{@kw0|)eLs(X0tnE2kSZ~*$ zBU$|h(m4}f-{U*_v9X6>K#A7fMqWZnaeoi@T3;5JQ+UOb#F}RFqo`zJaMt~(OM*g_ zAQ2n?S7zP8Dka$lgWnD(+Hkc~yoUqR@=4k?x-!(wv-(P8FQJTvv)RFh(=)QQUaezk znKfqs?@I{hxl*2M)mTG&?a)HhnUa9>ocr*CykLUl@?O@6Sop|g8%iPiW>m=ZrSQ1w zY)qN5Ve*Wk^;(yUSgp~9(mDY-ZS@fxEr<8@)(agIfqpp?he6(=&4Ip!CAPu{T_`yb zwU9&URHC9@nch20$0}2licMgbx5eWn&;sZc6%XSurUjc4oG#W3qtO1Tl$FO2-&1@* zyAt2xOihCB>t+Ew!yGvQZgnm0hEufvu)G*Z^1I+KPo;gJ{8xjFnWpQ1<>e6s{y8=s zwej>pDvIfYi-l9e^z8%h4PIxJY+;`59*Q2d3~^Fz*$pR@Lv=5i&uyT_3$>Hjow~y( zj1x)%S=U)EzHG}&^$7`$3F9eQvW+96DcrYaD8Ht7t9`T)uj1KeHwp?jxsRS<8S9H?UmW}c06_>&0fr!12*8hwP*%v83%`>PAmy=t~h11ZF zpo$sv2ts;t_}25M9@GQ)FD(@~iGf!US=TtEyyjn*8-qoK%N4)rcQ_bFe=h9%054#C z3!m`|Y(e)H9Zi>w*Y}|;CK~MGX4i@wtKSHI~n(BiW)JNE0HO~DPQ1cSyik} za8cOPa1)$Mn|Y-jsoo> z(IIelS%SLzYkK8uMztK2tms$EZ5y2jQ^;qaXYmGHzwtzkERUjW?s^*KVbiSkoop4_ zn%q!BCpAQVU~;gK`(BbpM}1}G`JUU6!5)0cnJ zUm0+cfZjSVxjkbO%QE%Srt94<%4_)@sNW$&NI(|55ah9U(URKVkI^Hv@wd*z4BV}N}I4?oH>TJSyo|R4#YBE{m;~YUqD5*6lh_6e$`MwUNGwB z>UrnGvn^UoFUv3q60hB@XqQ93Y-eRF*gPO_5 z;ETpzXRELOx2kK}9^EE&Gp)!8{)aO2>jTc?@nGJEEWbZ_Dw8zjMoi8R4Gn>`ph)r_ zPard&q4{-?I%e1()?QW(f zD_weI)1}~_T4A~ji4$e@EAHRG6L@}n%jRmh{Jo49qo3>MrT-)w0t8Y^QK4Oc7|U1z z#|fECkp(8&2`yBsf2CB@xQl7@i{0e^-nrE@4}zO#C5c^3h*P*z#2hIs&^JUJ%q?vM z-Lh=<^CPZ$#gwDXcrVs=FDibHT(txje@j6Po7U^Rf0io8$2ZA@F^}4V2J&9+s>5s~ z@H_XS>W)zk# zbA;pp?4N=!?vzvaG^F3g1(ss+qtk$VRJ8b$oQ1OU7#RBNu`b9)eylOJZ1Sv-xVw*T zQI#py*>uENA*8d_#032f#OJoArI%A%R2SWh-|y6IKVhArdHeIUsaz*qCZklsr9~~A zsoukg=2^GCO0&p|cXC*36)I|&Sp$;*Pvb-N{i~wAxQ+xn0f8D!ceUb1Ni{1PF5Y@S z##WVkx0Zi)p`q_G4K4%{ggF8|h#V>O7YNquRDSEme6r393dO4R2w&)CDGN?&`7ehv zV&}DL^Wx`oD;w=L0W@ik%NoeAobEvfa=u&#*?DM7)?1=?uc3NQ0+)H?R>P^|fw6wK z;dwZjhk`BOTu#!SS%BZ(`EzPpr(f5Adg^GKL4)rEFG;k)C~8T{G0iRG)akJx1PyLGMvS@-lg zI3^jaB$s_%A1bQyC0PiQ@KfTqr9fW~S>N@o183zsbQQnvDO8A9WwC0+AHzv}zS5M= zStlgO-*^cBR-Q}v-mE+45mIw!l6yb19GDFo#L_+^W{)i2PvjDr`a^Y^kfWAvT@yTT z9zT#e7LYP@JIEa5hG_YZ!)cjOoR3Z`$oe5kNkICKmE~19i?H$mZw?EeNH=b;L8=@Z%Vj#YrFh>UOf!snR1?UO)wDP{`;SWjdwA0 z4T#UX1+c<1kKQl=#BjeZ@ovnd3t7owXDO%#MfiwxEq?h zHJzTfek^5Qt@)npsxRA^!{GfcUQyeYaXjZuWB^F0Em4Jzjlqg?8;)IqL5wYDr--JI%z{a;5Yj>eA>_VQum1N5jWn4DV8= zXyv(57|y#-^VVYz^X5_FkE(urc0iegDtoyCwaY7f?dR=>LWADf+_70z*B$srmZI`E z5hdl5z|zO=VhPOD1W-6Dnvz36W_(E6>LCA?>x)A`z-`?ELQLedn0m9-&3!}B6y6&( z3d7||LXjh%Y`Zfb;9>KA#E91WY>Yyk)FC&H`#Le_q`o_`bF2FmRM>9?J2M?Tz!;@9 zkgW3{lK|*P(DC6FR*@;P=Ta9WhUwOM5C@}*!@L>5(y^3!tu2t>rOye}>hs;T$SB&V zrGo@^uIbuT3o}6J)jG*#_q%rUd_{MVHSL$T&wGORF@k-wE>BWQ%yy~`Ah9!crczLO z(C^p7mMuf`(%Bte-=jiu+30c)qt(*5nVC=Z!Nz@^aqx!a}I5=!uoJ<_A8luEcICXV&z2{Z! zzKx@}uV+poGnBzq4AqfNKjTKw`KT?==s$p7JagpvHV!(YWmzE&S{^hBEgb-g^0@AH zJ&4bs zKefV+ITpZ0b=cpLpq$R3ESoXC%R6M;ejrYhvY|pgvf~4lO4pOAb@2P$!$ccf8Uiv1Y(O9RG`XDu@Wit>@-wO1EjKVy8W3__mm$igvQn`6< z>ZaJLUQY|ZQ$&m-Et*a@*gz-$EvN4%ZUoM>jX>appW-y9|s#G}`HChm~_o`AGFUv7O5Fi0zdxV9c%4(2UCtOT}jV{^-x?q%oy~l`*^ve5|!{ubj_54Njk)4MPz(7_ep5sJzp+ao$MyOoB zGAAtC{wZxZr#yRTgWbhsWvDodLs^1c3zhZCE{0^IEOwt$We{26l6>O}&Ap&{%R5Yh zWlmqHHnYiS;GbPrwJ$&e{kGUYG=>cHDA`qNZ%VqOy0GW)+$*4aGzJ*B?S9#`AC4?P zI2A`uXhV@zday>~nHTBxZk}bX&&x>WJA5QqBwS@2=RiL8=X(>2%kEtaR0>{sR(KtiKSQAc}1Avny#eMj@pn#!9cQI=R=B|9{yvkQNcL!N#$dvG`NX(+K^kxRv`_~}>F!Str*VFl_Gul?J?1pF4|=-? zdj)r8+xr>LU$dWde#~(Y*V94FMw0U%yEhOKecPaq(rsoxbVZC3pLthWU(WU*o{0Xg zwEFe!-K^nTvzdfG*tm_)!*opC{ z%;SxuO7~!}X$y-DJz_Y|n=<^S29`#HcP=i8kzNzK<2tnItA6KQ%iOiGOkM9J1^Hw6 zU00!ZA-;F0VcF;FZ`ofFh@Pf7*H=*IkC(+}nad!WKf1@%Nj4 zpJ!9LPQ_nfi9A%dxgiY)o|d~nYoaxeibTmd@N0}Yu)yC@8n#q&i5J$uyXL(E9VLYD zb5ue+{Wjhks2%3@tnq1oUAIvC!YgcS?4T-1uIr8X@Z3E{mC1cnD%sM*f+Q zEE2{ltOj5-L(YGbF6hjO@tN%f86@QcpVkkhTb8nshs~j4nwGjTz}_!iqq$Ny zcte_JYNZ(fwB)zFSzAoNmXopd0rxiLqaUT?Q#8tM8;pb;d<*yUPks5hn z+Cxi4S9@cl zsf)yhHEng3z0Rz6M04T52iGA9<1g>`j@yvhJX(3GN~bGi!lL`}fy$9>n1ens;JaZS zDRQr~5elDY1p`h=mp30O!88S_m3wezS^KVSPRx8kQG`e`rV?Tj3vEFnS-Q(y4rgq| ztUW|xkQK%d1(hc3u9$j5`w=Loxx&_psY{8~AVF59lJG`ua(U_&6UmD`eNngZ zXF&`wG+v!^=Nl(>+WGtNwRW={Bf0PJN%^Ah8Id7n0#e?`V8H;RU8|$20+7j>Blk9_{5n6wU)CLE? zZBX_D)DYtFhoin{wp`!?6RZxYfcHdOS8{D&RZ$qlj%40MC`fhMNPJb)_^PdN-2iEl&icZyYYV949MY5B^vy(8tl?rCQ z&ETo)e2?$1Xd?8Llqad-b zvNp_JBd?|6%VDr$&8#SyC4uKQBDuC3ok`Jjywyf4{@t?-XG2(>p5-_p5%Ges zMEAG%GN%qb{Rv{bX7sq`Z|X4yhier1l=ZH1yNlO<_1K)+x*XS^aJLx_v^tO}T=9?C z6V&Q?a{u<*3b?R;7$@(y6XYe69DmT#41Nsp4<=sc%%40X8&hpO!c1bVXxbLU!ou>M zL+9tQ7AE+fdPf&SjqR0okT>)_4E2;1zvw0Qv-9ZPy$~UTj|h@1pdgIimA*%2tQ>1C z5|FsesJG0FL3>buqNK%lH>;|r&W`1-iFH5Y0a_ocZP8XaYm<2(rfy(${C@g?W9+Su z5-Y9KRQK|;UmR7-FHFX)cPF<|0YxQEY<$MiB}SJxwZ~Yo6vEW{RPhD>^O;S_asi*ru*auP73@k=PvBiQ+G1^Km+2bK^Y%ef8>Ebs3;Hqh_dPY zhiRz6JW7Gx-a?`fsAh8hb(_ck`Vka~(tTdC#0id60F+u~jHI z!?;BcxNC0RI1!#=%WT(nw>9Jqi<%WiE?Q+WI(glsW%F#RudUHQo$}!2vuK>O;V|#ZKhVp$}E6vQ5e+mMud^B6f$WEnC zFoYU?AMf+Q$F~b-p}zXcTnE=1m>23*awUe9-Kd)54e^3jGB=sv4P-_`H9T-iOz71- zTkGBw!g=Df{UOExa^JroR*$q|^>TXDJ&vLJbvZ#oO&!J?^#WX62NpQPCmw#X(M;31 z$XC2?Y`YAf-k*EC>29R0%u21xP*+dhPKq(eujlq3Q0~qbkHL=>4W^nta^j4zN}?Cm ztRXY+=s3|kzZ4jeb)n7)a`kAEwEV-BQJ;7djq|q6*v3W!2n6~ji9g(uwO;!Tr$N{w^HiTa()~HLlxkC# z8Ia;`N63g>D=g%L>j8=2!*T?6&Q18peZ`iMakh}SmKXEix`%>XpcvJM#Aa1}e3dH6 zsA#C_Gg0Q&05gqolMF-akVOIFzrkWN{wsVg=hL;`^H1|5UfFj+3rga9L5(r%$m+@z z_p=g=rnaQ{= zKOMOtgdHH}33o#li1q~tZ}%pK56+m-NW;^G=n(YP>CPfX%VZo+87md5v$an#zPT2U zARmw`5_#Wf;{LRzr`D=mu302h6y@(xY2h0lb5Ols(K5jmocG;$YBe0tD>D+D*W54Y zR$-~~p-Na!0IdamQ&e89FUaxdE0vKo53Qr6kpIz+&7ngy(c_rtZ%i@j-975Q?75BH zoJ4fw9#mv)nV3($tq(|6*xSiZWbKqCl4G5fN`~mIfvxE68?S{#61}&3!&YQvW!)F| zo~ErUkA=@Q4EU}etjAgOq*y^Eof8?9QQu~9yuD4^GHE4wv?Ur&KHDBd)6ePMo|m4s z?_B%_BckV2B0&tq1#0zSG6_TQ!Dm!elf>whFVH^+*<8d^WLM!{VtRinowTo%zg^;` z2?EPo{SuU%+{n4sbGNg4qI|7WSQ#hAnUVn*iFLn}v z;0}c`{cZD7yeNafZWsB)dC=dO3?r zB34N?B+m2KYyGZx2hJZtTZ^-~NIPa3rK(wbITP@#E4BUK@~lIW=q0vlZs?ob9>sZlD7&y29Tohy!p-2*W2hvO zUgJOj**`MhX1P+_&4^G9+IwC+0%OWN5)|j=PKw-UE%iE=^!0wwaX(M+hJ`J`6Sq>SJaif7Gd5Nsd5lsW7f(PxhCZKWn7}Tf%51TO+W}mLww2d&63(e> zXz#A)X=gOEm!Y7e?<0>aO0gd`s5k$#MJ=jj`%JL($YuG(kA~C%4$;=8zcP{y`<|5@ z-Vbr^zT3TPF){zS@=I|?5}?&p?RLX4mk|nWKIX^CKy82IOh2G~H<5u-DeWWDZ0#8w zwaQvZZFpv_OlI0eL8VT*a7*%CoJ9lGKI(rU$h=D!ZiSMLg>Jh!f76$Z)(-2?KA#jB z$aISs)84ZzaXvogv%4H<0~Wd$hEIYZmWjCc-KKlT0p-cCpeuPZkf_5vly4GmiH`H14|7%E5#EWU5@6uBMzd~<_S`yncgAO`1z!b&EVN9YWK)Azo)sCNCTD6Un)nCSWP zZ8Q8QDfs5O!7pU@CGpb>4=u5-Uc7{Xl~Vlv7eCLmADryaA4ma|^4QA^)ZYx2)bwm8 zGLusQC?9B047z*ODd?sw(RQMlWDfvncji7ypIenvECQgOt>*>}*TdP_*=ih*Cc8nR zJ|=##(M42^m24F($?i|XBMCS59`}DvP9s}i`znN>C!@L8`)yROuItcJwBOF3C3#E0 zbBJ$ID@*<5!tkG+6`SLX0Lq+rV-&7nlW)0~orcd}Pt=eaU}QP(C>1aW()# z5Z@c;9KWu^APDSes`YFMAn~^FX<9J;7Gn$#Y-hamIRpsxSv7-eRys{z4hwK#uP_9; zX#gxUsj<`*LcGFz9LAVcj(W{-55fXm^@o%(n#C z_O0J+n5Q89<^tXQuGmV%)ZmU+uzhaSM(9^~b>F&6$Z4$WLf9 zbxOgJDLjhfWG}nmrrpo|;E>(VbpeDb_*ne1{3X*sLS)N0;=vqoe?wTX_VO zFc8nbeonv8glj$ep)uWSsLHCy#H7CZc3td(_Po9Mq5foCxcaWY^q$jiZSIk?$MMdI*Dy{D3HXl-pn0Q|)}pqX;%D7~&ao_y_9;VG%(UHQi5t z*+N{s&s1wAaXAd9j{lJHTxg$mFB@4rK3ZhC&U2K}&5 z8MIe*ucW0#EE$%(lu{;xRv6UkTh^oScHLw0l9(qdukyRH-2!U05%(3l7nSFfOOHA^ zRPB3F8*0n2V^(kbroU}ZB^5ep8$KedKtq#M-pUo3lN00?)4b1yAEJcbpb`6-yH?J2 zXQjk2?K%i9>*T{u=_%S7&7D*}K*?!}KGc1S_D=VG83EwtE~MYZA-=s^jaq+dVo5P3_jCZ;rdR({=Jxd{N_Bq2Kt|JqeDtlSpH)82AAJ+R90a{E$#;h=I zCbeA-*!#b+&m0o0L1i5_In!*a8)U z{Bu^iKoji@!0sfhSh^fW-UwR%$+fV%j4-yh7KXC{JtmlzJGh!SBNy4Gt214dwfs}Vg+(o$>o+8xUlt! zc&&y_WXMc0LYK!zjNm+AAMc|#b&Ca-RcZiz9`PABmA}=|epb?e{ko^|!p5q^T|E-k zO)A*7U9+B2Ni%G3NM4mmg|w-)#zihs{=D+oWO+pQc-zu`KxSN zJ)98>Y>O)c`wez5)WM5r({ECI(n5CX5$4^oG>!M zL@~W?6Jln@e%Co-J>;sxmJ>W`u5PB~Qdaw9FRA`Ge*UyF<@dO#w-;Le71I^-amfY% z%_DlcWLJsv>+(0v-*Yz_>dNx3zL=yeEuOr}jt-I(fuQ+kH=tQw_O-%NZXrkZF}|ms zRa-si^DAUGa~1;TjAnw z&z#VnVu(eeBDi+gC?g?&q1ZWxe6&{A7ny2RQo@hY@mE1ieHL zFCRFybQJBpw2FN9igoRNLk`Kw#PMuHL9;QdE+>Nr$m{(uQJC^<(*!7o1Zq+ig{E2O zgHv4FZPoEn_Ku)L>9+EgzYYa^Ei!6(HERRt_DV+iS09e2dkq@KhKfnB;*7H_&6`uA$*fs zKXGH1c_VJxDE4O4>$?+i@$R*)n(O`~(c zT&ip1YEVUKE}_J}jN#nRlc5=2Rz&o)RkqPFW-J-{aE81XBFV_GC`BfY-+ z@RqMjg$EN{WqDbM3BKbWYmC>LPlkN*#wTDN8#_L{NDe+Q3FASBHbdO z5~I5m1(i~f?(S|Fj1Un?L2|&bK%~1zNq2X5!+=p^`|bVtK7Rk+f8F;v_qonF*Y$cm zuh}y5n~;tm+K|>!_5u&awP%FcXS2S)qa&bujwXwbe~RFTMDkQtu|-BaI|h3)VCieH zSLN0PRP!J%_Pf`Y{N^_j-+ZWPrnfdkad0(40vZy@Ep}eS3pjpsc-4H?W`L5B_>g!y zxtW47#L5;6;w1u$XA^6Po7kbag;|Um1ZV;@odyLt6RnGwUs3Qi|6VDbmT+z~wVYKW z=w|I4yL*riTk|$<6qL$&U8!B!^#!<`maDn0q|p*N$*ovhd7xoHa}q~Q z{!Nn^V^A4G@wN*_(x?e(dL=*3h!|d|@I z_Yk!FQi3QN!>8B?%mLa{t#?3+&ART$H2yC{NRG*wshl6gYsjM_A|2xOb@lw9!|`-3 zLyjD(`=c=Dwa!?aZ<$`>ECF;a_qQ_uKnxX(3SsN(Eb6S0ElR<3Rf!6V z_?&Rit!-!5o6D%786L}cMpbgsOQ+AIXY~XjYCtxrNsL)o!ylBHzoYhqT!gZ1B z;xc1zJFVx4^a>_R{#-1a5f(JtzFhjciokY_b53?nFI5_c2xx3?P-_Ot^l)kUw{>rv z>V0x)oib_jd(RW2j)5>Op9C zUs*V8Ju2CzFW@VMl70fovJm<7^Ys#j z1`{g&X5mOJ*>VP%F#)cVp8YQ(`~_X6+&agr$)lofa(#HNpaVM2Vd-G2AC3b&U)vu} z{+c+T`A;DakJYy%|FE~H@FweodLJ17ou{Ze)v1W5868AJj`bOWk)?if)1EMSi|L-q zLtanD#|PX0&4`%;MPoLCjaL!nyiB3hwoJW~7gWda+J{d5;U)Woue5(U9$)sLCe@Vh zRGzdl+}_@bHF&(2;6u6$X%fvMbEe(WuJ+6O1RO_PVK;Mo5({2qF^*ntK3fV!!a@!B zKAVl+K}*OWj!R}4A3h0rc~-m9+i#vO4i0~9f=QjzGBd5zJdac8UELPkvaO^AWzQq5 z$^q)~>ow7!j`&6Gx})RqlcgJl62q${iIPF%+Dv%J_eG`3dRgvt|t^jDLLw99wEXOsSo%jC?%$ez|%lp2g z**>tPR2A%4c5}rLcCxpcY$D~$R#?pfiL-^CnQH>&+K*xK`^Hf3dA8ltT zFeFr2K&^DS99JQsn{NSCwj1{}Ie7kP@A@D6^Rfpn>HW zIaS!?f-Ae#GWDxPM(R7MzdNqxHtb@A1LE$nGJZ2jbAQ-Mm>B;1l%8p(>sFaHm?uOi z-9Fn)hAF4qT-AxluSv59iKdgbq1(J~_kO3d?~CSbD#GA`Y4XSWQ#}dy{~Pkxtle{8 zZYH`w@yG*m!ll6tRV_K%ZobdSWJYG>PTJ&F9K-kKW44|GY>QT6Xs_|cj;6U9*R4?; z$(~H~2fbP+XA0obdXYNd8JnVQ$s|{5VLlITOIxc)YZBsqJfweI^ZU@X#&zLJ0t}W* zs8L+B4f@fX(o0*~O624As(YV9#l?FWZl;cVofY1 zpF^RVz+WnB{#C^c>D+U|!5-K!ao-Q~>Pu*Ss3^-pX}Qu$wSBsctwq7#dqyqe(NCs( zd&TDHiV5@*ROsZ7UvM1TD7Aov_Yd9xy=tXfk_mZvTy-hB!2)UgY3fSA#eG87Du|-7 zpr8*LF0tU>etjJmJV*4=N1%&s(CcW{SOFbv${GNjio)h&krtBN{dAaK>uC&&Jk;+< z?qdGb*-?SgdQEbrRD68as9c|vDbo89-~VR;ylFRj{m@>Czc7}7P!q-UNsu)rxrdHo zv>1??8Ol>YCLBn@?iwit-~PX?g;1_#2G{*U=xRS(y&Ya%2wOBW6)Iz=O(cFAMh8Ym zYP*@o%>-PM6A0|4`t+lpuViYI8A@M6RQq1m8bJs5ZC-lY}bcEBCry9=;|&g~RRT(jLZWZp)95KdYSARe`*^K1kgwdiUMff!F!N zm)mFT7a`!%mvQ{`h_5-;5C(dxqrUt6Of#>M-_qp$Kl|@IqU!_!8WW+UC3gYzQfYOY zSBh|1*P)-;j|(-iO2MYS162C?vZw8&K44LQ( z*llZCiv=++_vi+rht{irR5nw}ZIe7_YWESM^xZG;k}gbGYoV+o|2smuLZJS$|7FNx zL6UyF=-Q<`HbYzR>Bo`)cOS5Dq6lkpCh~ph^r>X$PUgb(_SOL_ZOt6E7xK#diz3v57*KM z>3*LK!SiM$IGp_rz2hogepO@gku`q^yww&sF@a zY7*TC9LG+6sx!4<5Or>2bo^;g^q}0gec2HN)M83G@NV(EH1{;=^oe47fHTHFJ2XAZ z$DU29Oos_b4D&-JJ+ka2_)=B0yhH_pr8CiO>a-M!;~Th?z0(#E&iwDrn!X;IDc1=XA)5N^FClyF73j@Buj<}Bi%_4twN5G59UKC#}R zX|A-aVVlz8Px~X$l|=z^b-7ZI1kH!+9N5pJmdk@PD;bXQuMuR9StD$Q@~EY*^OpL> zhYw?4L9kx!$eU&U4`MVJSjIGrP{$8j>qR#Dz~V0_!=l_Z`aiB<*OM! zn$5;VBrK`XeJ*>w+v>?xZz~=NDJue>Iv^)Ww_Sg5Nw!PmOdJ@dK(^>gWJQSXnbrw@ zX=uK4oL=XSg@@=n0}5%rb5x4|uMRQD40ikSu4p3>B3C9Z^^TvL_n;!1@82CeGp=>_ z=eC+Ko~5fn-?o|3fZ~p1S&3Zte)%@uVqZ^F0JVvlAfY4$5Z}H@y96{U@lH z^1=L{3<=yX>X8Y|PNvXcd0qS`Xdrh8CHtV8+w5h2O5?_;anE;Gx}+P8Lb8J` z2ffofit$yck(dYDH2ZRB(Hh{gHyUiS`iqPEE^2aJzq@WMtwX0iT<7K2LKiT&2C*#FcWBqYBL@+tGa}t(3jKMQ4>9pXgPj{fxBEmK6tChQ5k`} zFfp{J##6_nPnN0OUZV{+{$Y(%fhy>H&JNf^V-9uVll-A`7Nm<<}{X5W0G z8>JCV0-^uq3|MV5WFp|Ctwh!Si1`mfVzwgJ^32iIfy;D8CNt*4es+!Vs8#6XLp}rY zTGK|d!|sd21-R_>_Rq0F>)z>E8qkM0Q)zG?; zNyztW{Y#)={D+Y$58qL~^8ufBd2^ZyjWo@X``0*?W$!glhj;YxuJB&*qVu6({9RhS z&^uZ7v!C(sv{Qb?+9O0J*8MK^mG<)<*vwmGiPdl2#XS$%&9deP>%-Y=j;; zA9)n54gVyPuzOz#QUt;c@AR|Hf`U%wFKTMYlT2|)2alakzk{X}DqF+;ZGl}>58=~k zXLCiA#Qwx|=CC1CCW0&C7}J(T75M~z*fT;Q%I7?EIIEW3g6oHPO!0;IqA#k*YV|~7 z?dJf!7vk1p<8X9x{SZ@8^rE;N!Zz+qef+lwl$b}!rrvqrnKFRS`^!JeiVfNN+8Q1- zs;nsKOl_wBUbDX4s>0HBain&EB&4V*@oCu+AW!_0vdw>totB+lAimhFABe(9+TspZ z6!?*RquFtE&a9Y<`0S4nGl&CfOcetlY5&v({kz!!wS>@rZDONvWN5ldEqHBWje6ogO?gi#+`uXW`O ziF+&^US(UUc+?pa+cg%~Gb0~8M$_^3z#)rS6q{X%CmxrgQp+#adVc^tFrIge>+JgCF`>K?ZVHd9%s;}_BKXHuYptRs6X^< zd*pasA-YV__I8%S?<#HKqS@V0&c9uY$=1P`?`f~RYkv?qxGqbDvF|eQv+h5k;QN;ib~&?4OM{yt>mem zb;;i^S!^L}6Jq(c6aic3xq3;j>(|`7#malh$=P}_?K;Bt*hPc2Ut!>lUT@LHSu45N ze>H}!1NCCVz?jwxrVu~QW&dW5&l14;r;7gntV=aJH9$v0I~j*{F5-Z`t)0W0uloOe z2bF(F11I%`GfVzF!8DeEbgTXRaV*pOl~wn29OkjH=gSlKSs0k>!}Q!{*Ge4qEk zLjmK<`7gKyl<3cA+FQcfchUUu9X-BYv$%fgE~*R7jE{<1P%} zW(KDxlU%=)%JuKq!9#Drp@BAg+m$D-QJmfKRPxe=ClKtcu`HWotTZ3Y2aU8<1`A&m9_PK!}kh)5`vFi zYZI13r7?86JiZUIE#nFAtE7U{wo;w`P&RIDgs18ol3m}~KOs@{5Cob?Qlcx!uFb=G z5uWGI8-cHQBh{Zx(|_1S=eKjo*N!oM>-jGYoHj!UMPE?I&!+a(raDCD)9N?ZUU#J4 zuM$+iYZZI2w>L@&XQ|ll9psv7+DTj4TAIPT_UP>Dq6a?D%z8q!OD$5duJW~9Glu#T z(l_zp^0rs?4@207$pc~CDp{q_bvo0Yl)|+<|Cfsr4u7HRWtbSXN;WVaq=f&a41qFV zQXkEE%2L%rmq zrKNyL@gbvc1<;PhrYpFE^0;nl@~Qm_X#i`rx({tjx?-1AL+W%A`BY-zuPeWtTS*-! zwFY(PPF#cAycFeOc|2Cu4LW?7l}&-=D>rbGLr0^wx9w2J?cm4?Nar^ZSp0V~>@yqK zwNrZF&4o_VxsuNgj4WK?d=5Ou-O#DSg9|=uoaBYMAL~+mKN{swog;co+QT*uY_S!T z0sA4M(81@zR|}T0@UG!s2JY;2C2mC#IFsm@K3|<)b3xGr-rF-z9V0tuo=fUl8Df|- zkrhbi&iDSyO2H1I55lNN-SIqJ3tFPwBrsB?8k^vb;E@q=fOXQDXffG8eY$wCTupe> z2;<#av7u_t4TIMALeSlBRIUht^hsH`Ky^c5dg=&$wdP~G{hM{>v3!IUC99pc%x|rj zA$y8oB2D|veCH#(;5S%w*r%=xOV2MiqBa8>(l7(Yw3uVQ{<>FVYgluU7j$|g5d1@M^xablIsQMaiTtsvj` z_R@W9UnHMUJP>|!E@UM{$mM-9G6*>`fyc~(+&}GS*V4XgZgCKrBzV{lg2gdQ-4DL5 zq}g7uZ(5>?(U?d=_#5#1ANs4}df9H*_i?5du2pQ7N3V6Jw@7yKz^GNJo5_`<&lbQImX_`o%TNC6!uZK^WzD}=qi%#z~izibJlSg;&|??1_g@BejCt)4uh z#0$ShxwtRg3v^9J0+nqY+bVl+cM^hwl9WOU$Kf4n9*jGTG5l_$bFs~ zO|0JcyQ!`e2e<=|%lLE!wk{8!)#?4Y_}5!4*8l8Yz@iuMLVy3K#rao{CpCeMB}iL~ zmxtXS5KUwAh?vQ1#@05Bc6FZc9y%v!;76yGAjLrVTRu#w6X5xA*Te1=XAfd2;E#-N ze4ig2#8lX!ew@6VlO$rkd@~$55WbNvGHu~-D(fe?TxulJ8!N0dWiJA4;oHK{R+N3- z_e~ECc^H%czgJE4k3=s>nceXti5=3Am8g|&{|A#(1*_HyXGjHKw{jv2V_SZ*9nzM= zhJq0&gHW6OROl26?X}XH2s8ib$d#1zrRSsbY_5acGZRXGXX+`w@Px(3(J02KWmB>8YYg%!@WPFn4QwANLjk_|Nz+k&y36Uq(nAbYOYbJNr=9zuxj%WvZUbat*Za(7# zi^5|%p-*_Y_6@|V*uj+T>LfIt-Sahf-o~x zvc899$^V=IhgzSfX5{G^;D8>t=LQxWx)yEr=B^`~Y@W`JtrAIxAte1ofBR|o4eE?a zG-#5THRS~EtlNJjzBN`UP+^mPy9n!A(~6(>ck(o~U!xhy`ZKFO5O#Z<81(gXUIw+u z;Hf!v^ar(+A6$Y-e75Dsn(z8cI)}$7=aq+lDiOsAUS)Ju5m=is*pEqQhq`=xnUpc8 zd6?8VzvV$}=x}Q0BP@1OxoJK*p7qd`_L+=aW?}Ql^P#@tksmu(2^{x6@m3a$?>k)n zJ8Knd4UEP3MR_EE;>|6E2cep~jKV01LMA5hJ{u_E^NCI(Rm(~>yFNbE-8)oI#d=X6 z#fe}3tQ^*{oh+>xc>d=_ALy>rgRrzrZ*u6c*^Q%vQ;fJ##Y-}ynkAtUc%jW#R-+=F zuwtjBVIDJ`ryEwitlyYwF4hskq8XT0&x=P*KD5*sQ%+-H9FDV77bR+Fjk8DXw>)fE ztrqgGNbhdT-CR?!{H57tr&Or$S;frb>*Y|N3j6DwJl!OIbkEXnO03b2)Vo7xfNAJMB68o(p=(7HGNG`_=i}Azc2S(Y`B8XGHUe~2bF!eg_3l#2OR2DqcXtqaJcR7(H(#r4m}Pj(M8+NtZr>x?&KZFCjc5C;GkXC%p?0f#5n#$X~kZ3t^$-~v5K8Wca<~fo#dOXoss%~mL{fQIvz-=M50?$_3 zliPL1E??5o6$f-~0y(9|B>j&xs0j-Hy%@2&=gbhUmUP#@h6?3(W7F*11AZy`oQ@-w zDtYxml+B;S00ZlUuKf;jEpw%bKji*OlL?=$V}HTE+477R5jxc$^py9MpycHBT`X_D zXcPV+w>!rCHc4jNbwS-Fm*LC18glaNcTTqC5}SjI3z%#ktd>z=9Ve5N`?6C4|IBGe zh_)anp4(YE&`v8!b(RV~o8qH-HrHRtZWp>({E!IW4&%@C1aE_e8T{j$iDIj1Zu9xk zza~&Yxt!c8a{=MFpM-02Jv_ce>LhT)ZEQR>e~uaSP1s_Mt7&=Q#i3iu{$8#E!HAX* z8n+w0*8?_k30{WU_I$TdaHXL|sdPM7aO2&`NYX7;rG z0t6a>_{x1if1S2P#g7l1%3c%B@RpR;s3-Z~T8ua_ZQO`g{@e(!L_dyqS_Yoj`&*>< zzBSq5ioB54>=W;lcP*qY5f9+Y>e>eOekcu(w5bTmCStqqlQO+No!ZKea3OVQm5Z2xq?$;RV}KK1qT;sq-`6&$*ozs_xfXH@cP6n@*6`nM*NBn|J)0NZ%m) z7BZETYBXE3@jEsC;POT$ud|Sb$k)Otvypk0hwU=m3%^46rM&bi`y)3KXBJ3u%tf9# zTD~pj)(%{=eYVtKb}Qx7igSj+j#b&3DjLTa+g-?VSm&Iki?W}8w+LM-ZkgPzmfXMq z2Q4;uNTn4)^>%KuJqcuw37blte#Z;>gbe*`EGw#s@^+VUPd`5BjqS?-vt3BwUEo^h zueg!aDMb*8+@2%r)wyI|!@F)eRm?0e#xzV4c#+%{0_Vb@I@PqX>7e?#u( zn#{#-!mw9LsZdNYr>0(mK0VYe-kvyc{fFEpAOa*osl%CZR_W4Pa@YF;)-VI8e8ZIW zrZ>q60M#;>ouTH_^RchIHblsI8H!w1WKvxkwk~bIma!|K5T^zfhSL|W^L*x}qNid@ zBfebYag)JANfFzBO`MZ7&~1wv;@zvz^3&;54uk2rD3?4(9$ookCntK&tHIQjok~yNF(WOFwB&Y&UJEy2n(;7TRQ@9HTz_Icna=a` ztc854&mbpQB(z4!Mc&Qj{eW2Zex9iTsD(pN6mcD?+bkCwgH+{VqzI8?`KVsEO))e; zc$s|l2>16v4?VSAX&lE1Bc$_vJ!`{Tj2^ae-R^wf%Da4ObG@)F@+2OL?*kHas0(22f|JU8^dYo0TtS|q1rCghZ9)qmvLrXTmvW^Ml5 zcr$4D?)BgjdQ3!IjgO^%d4aKI$BLEhL7P=A(szYPGWx!hazKDb1Y3Q;GIS0gYg0(j z6b6&YUKU`fyq`44W0?o6PbVC!VPB{2mlslwu*l%U-QB;jNG#u#N_TiZ8 z=18V>{*?kHxh~;xbAUV};IiUWt3V-PDjCsTJ7F@A`KczKCCVF*GCZj6?xSUJ0#$lSexC6iD9GxQg?My|oI)!MGjYK5=N4$o4Ql0M!Jr#Wj?yO2!( z!xf%Qa%o#F2*0c7G42A){IgECP781jT7SDSY#P*r`XiQcPwSYD(iSH^Y%NpE%e-8F z^f%l@GMggfvB#?z+r3AwOZKAy4e8qvPi=DpH0YW-*^A_|ycUs$G6z9)a(8#L|UACE;=-Jf`F`75ELH48PkpZ>ObxpbzwniU6@ zzxKpCO0*7d3viXMf>`;d_C1@Etq4sqhM&Yz0&#&|phO6p^qja<9{SzhGv>1n5y~H9 z(C4OKEvM*39>oqk3-84WRDzBx;`om|VVIowE^?E#y92z-D*NUwK@+h(oAZ{mZ*6F1 z@eZ~|8qdXR%yP5<#07dh`4n8q+l^PQ&ZwpBIR#s`eBF{D$*g*c@`aH&riaY+kiUIUXj9zzxXMsh8dem>yFsj7CK;ysC zLmvY+g=sx|M3Nx0vGJ)&S`vCu9m?!-;%~NT1g$}v-9}4VuZ!jOx}lKlD+@yPXrK7x z#FBkOmf*8U@dPMbHl8`y%IeWfnWajtZT6&%=}4N~3UuPyz@t5)!o(6Pbeel4hvb$r zI@J7h&D3fTL=!hfc%>K=cbh}fL&-Y3)?x*tohQ81?@AC%_A^-f;XWqW<#G8X2y78} zD14LEqEh&6=3{llfx+kQ>PL;&y{-JP;6VSpAY6EDt_ake(r`pg(htw77_phXb3Hw9 zl@rtSfbPNdbLYE%CV05H4?N@$ve`0jP<4%oK17|bMQU=G=k!KGPDglOwP5l=PW2Rk zTpYr96ycF@^Xv5r4;eMV@C&m3``GVAwgmk(St!q%psb=Mh_Af=lRP-mV(ox5MyN!* zhc+h5m928infI$vh0UY77I}gX6&2^i#CYLkMZBwq^8SAFQqy&pwg}AWaxGjO&s~<2 z#m~WwF3isIXMDBv%-qY8rot2_gN})4V&|Z#2=`Y(2gmw8#2w<2BaAHpR2SNgAJ-YF zuUbz&L&JbQ^N^J^>=A2L+b=}K2**MpBE3@k|{hcQJbuLkDJTg)KMzV52 zHqEnP6JF-B)Z;fexteR6rNxZ&-})wZK39Kd_%H^aOW#=uYI|aDZxYJA2pD#~^C9da zp#lt49}H?9dHm(5Mb@h{czGmz;$G5aOUd1kE^RnK`!15w!Cak)n@m{2{>2St=Ictz zm6u8@=-Y6Mq9~89Nurn~-VZc3F(C zTjP*?RKruEm$S?9WGoVis$Df$--B72LF}B^C;8>*FDt5((@i+l{f8{3sRkrDhz4a) zVpr#`d2)YWWwFN#Mue+3?0DD>d?~|)Da#Bm{oGO{fq=x3gOT4B5d?M4r&~~kW zp&3EZdW)sc3(~I4m^rL(%MYyPwNyXz(`O zJabclfD`-bztqNRUFdCKGN|Omv8@KMJLfB~9G_+eizgOP5Nwl+Gvgg5`{loGsYagz zZ96#8eaxn%kvP6tF@ada8@rzZxUrPWG)cc>Gt}i;e2vpMTa~Kpbg>n8YGDz#go#t6 zWxKktp>Y3)!fB6v@feOw|6z57H0>&@q`S{dlgaWk(AV{z9K6>z z+n`yXyz#)Z*z=et^6LNHH2&2@Z$q=5PHjb5BZIwqORk|TPgSIoU$Sl_-A$|JWlsdn z_N`)$9l(`xk_aajdd*^kfp%ElAhFXXW!3t3OQjwbAL5)Llc>Hqi7F`#J2q$Ht|;_g zQnQ?#h(e!;4P*s*y=qYI0>Je*{XXrnH_=4T{>G_vk|ZYbr@AASCtP>7o1x2lDYBi@ z?9_e+V4_{IWgU)fYZQRlL`>Jn{|fy(UVISeOrbC$w~$MfkJF*CEm8X|Uo2&+xuSC)8Qy!H{^L)sWaYGz zI9v|tUwGkA+IlqNbtDqAX!PMAl9;dv) z84Za4_mXUTi60V)=_a3DTvV@~TPt!3yK`uy)Y7M735DKayRV`*LdjUMp7r+bwh0Ar z7&iRW{RmNG>66)X8eTsP8D1W3M5V@K#|IJR)Q=^A83njgm6YBs`P%MCi8a;8Si2*b zUsvn+h=)D)mDD{`iAsSK`|Yf!{->j=%?K+=m`Vh_^!Y%VO;wUv1(+pQrYBX5wtbhX;wQweHG{Yyq8}ka9oow}1 zyT$=8Z-w#!Xr2w7t!eW+KS08SvI@dHTxF|wjTbZ!rsM0EJ9k|D@W&Lt)1$oXmIfggO)l|j+>Fp_8{6*#hTTwwb#XwNEHI#&NdAscVVAUUiI#F3Y?Xb1X zKwmWxGi|`F`^O_{k8lh5oCVRais6dsl5YrP|Lqfg@Mo9Y2@c4W)Y5!cI_&e2G5IjW zTjA9l3|$a3y^@OBL|Ja6hw7q>OBX!8NS#d+Ds>?g6x`1GT*c%|2I}@OU#+*0_e{3_ zXzlH=eaBEBuhqk$VlrY?-(d`wd1)vX|t&=?p;dV{ z6?S0S&qn36;PD|;zv|z}ZPsc)(6V18+m54OFqAwagn7Pu^P;Vdb44xlNub{GQ(hOs zOzCo2>rc+Y;zW3@`Z11n4kCjs6n9lf;O2d#vT4!y}q^uhkw0!53X#Rsb=tab($RP4$9U*l4_9qru+%B3q$ z9I{Ndi)MGUn{}J&W9HO#=VsIcWUS{kG6r^AEW(WGG6v4R{!}&c{oU*_ag;2U5Wgua zB&03xfBpW~F5icy>7$pC7c0%wnzyix-4kyxwhmC;T31)Mxd?;b)?>4z1(H3J`ZhEb zsKJn)pjDSLQ}{-*SqMX69{(g|Q0lZAP9+v553+0yv1CQiFV$E$;Qrn^#W` zY{dzV55~0V8)XPpde1k;Hq_=xriU(oqD71*hhPPnlhEdii8=`j`1P<;E;PT-vc^9rfY8gZJ%z9cUX-P|lF z;UoGNRJavqARRpiKL=&u&q29U5my%0ojNOQln7mKR4s9fwqkR8-$^sBX7zh*Su*Zl zja177u~6pXZ`IU0nz$**?e}@-&>I|Vd*nAtu;g|j0#&myGZ-C7d!*L+@E+pUWCq`+ z#PfE2f(pK!@5s7qZGfRV)FdC~ffIZ0H&eXkm1A?+?M2lsFKeKs{yn%^2dS{eOySEU znp_edm<8sbfg{!5^MG+J=2<&s)x7v`E0&h3WxziZ+B-nyQ6>?>dE8K(!kPZr z;Lgh~;V3d652Zp(izjdhqXgaKA6At?|EM_6ynwtk3|eM*lJ4h&KK>PIl-v*DOXlHm zNgc`#;<+!?ajhkx6Pkayx6~XQcu>{MBn7iFy7fF_%S2U2^xL-GgKehQw(Yu}%#|;G zyO=$&6x#C7aX%o+alYG<05umE08jrfG;Jm<;b==sN{udF=Q=jd?7zGy2i6))1C|ZY z5`r77a#CLVYw;8;v5A5|9c&jnJrn*K>OK$FFx+!`lQc~O)Ki%XBVmoAvGQ=TQ^9K* zmUkC6?O(A3!B2HaXBCsKo8NRpI1ly&FG~XyljZd9&VdMX~vx~sp zt}Vx!oD=w?aI;m8u@p=TVcyxXcl%XOmY1TpEUxRMy;Lhfn4?Zz$~BvT-DFvBk43E| zBi*aELU{D0R|185s;1^=r1K-}?-VtfB(5bOCE;u`UGjq@p~4 zk+165mVoaC72d!>C`lNwj$_Y89+jzl+h212wd%yfVB@*<=<_T1v-60BvkKX@ZKWyM zgUXXRzgZz;Na=uvi|6_-X_eua6poK@$g8@fC{tX8e`&FOQZ?rL|4!%z)9QjFR`@$s?J9+*2515B>#|EM2uaCo@`1+t5k!~=< z7Hqz%xvBLZ7gnZU(IO$jG++V^h$cxDjtRg$7TyJl>u6cn|6&?B7$R1EGD#vzbGYqO z%8#*-96AXgWM7b6)q9>o66xckOBJqrB(Ox5b4piFW|s-;?xAL`HR!BAHEvv2Rmt#v zCZz^a*AdKm%TOtFTEF64zj?Rtz*0r37DdtVm3o}+p@fg9w2wz{RdMAtLxu+28@t^* z7Uz|cjvVmWjQSZbcS`5bzz^}C`Q*nmp5p)dC%MMIx@cPi`L|t1$^c0^&a1K$!;Pyo z=vh~jx8alOLCb1L=L9YllFcWvrPBA-@5OF59dh=b$NA7!@QN$#V+9U8nXuhG55*OS zlPMfXJp7C4oPU)b*9@E;YLPYw5l6~;3A<#(Ug~dAE#1)OG*dVS7f z=~D@7*p(Np0lU>@X3#SPnmxQTLH41T|6$QpI><%QRi!ogy9F2Q zP(ZOWVT*DIG{m2}WeK3`3QTZ4Jg)ADeL1)MoRUBLd%$z2t+V5SlFg|~@sQ1TYx*kb zZv)#33!20~n;3W2v*v0+=13%l48TESkM~k^WEN23#{5G&|3n_t#N^hm(32Cr!RU zYEBrva;vi){} z!1)#oxe1M?92G(YN{(-I4N*Q<6OQ~xD=AOZ0f{s7AMrXCV)EQBA_^mt_J*HnKu+3Xv0Nr@uo z|4D@u%F|WoOQ?w$@N)1sUYxZVWMZJq&SCiu4{Zc?OG0j?Bm#IAuP=P)cY@~^>6a#l z%&tZwv^F|1)4On--q}3S_Swc&GwynO3AwHF@vGjw;PsWXM4@CoBDBnW8WY4b+MR%k z`1`(cFPA`NVLFLKcZq*5c;$A20B!jREmT5e64$;vH^3iKB~}<7HtA@bUk0|*mkLQWtZ{L^TyH+F(i@L1>a(2&>{ndm4a&ao=ftAAxj^T= zBf^A^$VzE3ejF7mhBoJj^tmb@e?Qdk-{q8D9V-|paK14=%UlhzbU0}(Uhz}`L6Zb% z9HXt+m->b8x^&kz2F^NY4~LDXK6N1w_M#S~!bz{14#@s1ZKCRE5@~>PQj`O`DcOuN zk^uInCJTVHGJFpv(6i17;_}*a#_At)1p`f!6_k~ceufOcJb(chAdRP=(Qz-U)+(egD8Kt@fey zB{`l6v`-CF1xDv%N(fMImYq$j9Q+~^Mo-V?m3Z(o_a*$an6s`$XNMjTTMJ-kW9`1P3}i!Df~D5VSlA;Q>kqBY<{hd`{oK z&k&V%Z}c2JWS=+bS!~YVB^xctI80eMNO7$|JszTJH0;+{o=)$;`obs+3hY9@4SsAcN1G<2WsOqI1c>s} zd+sWMV-WN#%*^`s@0igx_q4r*DIt*=gXP7wOn?VzD5>(NRJsztvd5(daXi4VhAgU= znAWNYiM180Y~b*T?G}Qi`2u@Osd#o|z;dvE@ZhH*W0sP{6$cI+++P9K9QBxiNP#(Oib_6(2ct=_|tiqLU710=qr85&HG`Jags` zo)Im7du)N}D6OD!`qe;JURO&jSk{TkdDI(tAGjj1uA1Y1fSFzCO zd}*mO50Q1Dk@pE$pU(F~Xrw;WQ#0#q_#?4j*znb)ps=FI1b$R#DvhOZ?B~G>b)C728T4EZ=?27y0HZk$1+TsBZb>GwsY^Ki-IbRRbL5i&O} zjeoeE&T9P15|UAe3sKX6Og!W z$Q9=`(&Nff)Cv3YtH$;M!%)=QAxYwr z9pr~xfzM0;3E-XtKvw-;Uc#I{n;&2mHGuC4>RZ&v%GFg|1DK}Rz6_NNwqm}8bS6`J zC2_H2%A^xBNGlz?0QLEYygKKctfc$|$glNH@>Ht7HmWz%nG_KkZzb)R9E-!9eH`VS z$t##mm=yNXREpsEjhWxMME0~BT`vV?c0?W>afd|W{7!~cG>oF^C$#bfdc?OSvAE~+ zH;A|+*OQuD7v0+!C2>IG5w0_qso(-zleh*|gL}FYxIy_64z=ufxqSIbWrIMpS@Rqqi}VrZ=gstIUNMonFjGwJg=4Md0NE$ZCfV^_4+k;rf#_R8m`Q=&GhXVFI}5fw*RrGAe*0li3Z$S zEZf;EPlG&OQQA8q9YWd9k=KWDQbJl6^d(%a{>pb=_xgV{eP>Wp`S*7a1(l}DE{Jq- zMWrb%5JFK@bQMrhkrq(85JHDQNI*nX`qE1%qM%C&y+i0NK5JHC}v_MFn{Qfh~ ztNZHC+_`t|Ip6bXM+EQOTuz**u0Sw1kXtQXe;d=O^3PceGv^E47Z8o@Q4zWm&D6ZG zpc!m~(fslGE&W9je5p5>Hx~T3J@JBJ`a6Y@B=s`4mEYlDqM0tvbGmRO3LD37ufF#$ zWR}+}70L-6D>0HqjDr%_DLLE=#Lya@OUOw)geARGp z_|HHY%AY|Y0q3=>=F%migjt1+yZKvx0wheCVEX(D zyt5a`>d~#CO0tUZY)h-Kn*z%dA-td{EMi%7i2_Wh`ARA8jp-m2iFzrqT9cETO5fx8 z^n4j^T*3WgDEajWis_BsvSWZ0Pf)Zp;Z9BS1wumNg|Rp{FU4K{fD%S4q}O7@9ABlr z>VT<=b9T3_-c!@f$Jh@;L2AZV-x`Pq0=p9{WdW=5ouWlL$fW?d&E|lj<*8Dl=;9If ziYW_6$xqK=kM_+Qs}8~HyX%q->E#CFLMgij@1qdQZ=Y#75I8Ojwf7$iG(74FN{YCN zT^Umi2ww~@IH$q!)-|)1zzR?~PU)n8W02K~qYg&)DsU*wWZD976QmXVAo=6iGe-vp zE*1qxDnc=+o4O2LRNx9NM*BHC6g^AhV9inD3X=`?Bxh;r=%{LfMj3|gHoneq=D{9y zR&<0mPj9IV!7yj%GnsxA;lDGqI8F*ok3-^xOFbA%rLhWK*Sf}7p9MHRGmAf0h2=(7 z7lf_mdY}W8e4ZOjcD>(B{oUUi-Jr12AMEK*^MD}VyXPUk!zsqqwGE-`9g%_i<92Y; z_*s|$JIXGr2`9?I+|X51t31ZCia@Nqgu9}|o@MGTMK2|l`?|dQ{ycX+`eYsnmU<1A z@06%$9(Ds~m4|vtijuRuYwAt~ppG)~91nni+Js#*$|Ee&nK?e8lxWJFhgqE%4Px05 zM>2w}mZvfT9e0=3S~MyUCo3~!DCRUH5Q8mmwqRMlnS5qrdctmora&%NfCh&uPBxBa zFS+ltR?=a`ZoKNZd7N+7w^S`yaOHP$6Q!G-!jY!keN`L=T=2n!CTHCoGX>T^l4<7{ z=3IuXA+E|9@9vsYC0|z~3ClXPe(={1E@)?(MqY|KQJIr^{OBl0Ss| zr1=&})MNq{O8VbE_H=i!@!fQAOXGdQS)}95pEp*l3LicC!&uee)4aTIx~4QJNCj<~ z5?TGTAM7FZt{hRf=G@iba+Qtm;atp5`+IGXvo=uRi0ITC<6o!GLIu^!LK_T?weIh& zKPQawv#T&>ya$2Se%{nDb>%mk^7<_%n#pH|0sX%PDWX z&AC%K#7Xz<7Pz+b3Y7Ra^U{5ual1w+UIF<@87!}U(-(ClC-+Xp)stjoF^`ycpNluz zO(&PULIR_iSjqHY|7_p=OkG;G&N&;-U>Z3d>k8nlwOSw@yw3kzUQQzoc~L}~Jqv`k zZNzN88_ zwfG`wpo7pPRONi&S5c99%Ebg@K==93!q%(BS$By7|33>LM_F9wIV78pe^$XRaAA1v zL>4UykO0Wb8f7?nPv5x3nZ4pC`seJ$v${(E=HbB}w3m)D>1GZABOES}ac&H0W!BL6 z)XkHw34`Cqaih0F9P84fG9aSRs>R<03j1ZxGT|1{g)+v0c^ql{Qx12v1kqUV;{682 z!>L?gZ?3^oBkQ#3IL6G&%b^0XI2%tn4`sa2P((FO=SyS)f{6_HY7CZn*MPUXO7QVv zNO@Oo%X`j+$eHLIWZqX#cNXeqQfOGBT+K|lrrdFUI-{<0uxre_i$ zR+2l+?&ZAfk&ah#dLCJB{NuN*#yxF!lG-aSFz=x$&m_Kfl&XA|%%PVl^A%?2uz%WN z8-qMGYCvmzCf|tjtaJZQ4wFaXtp0OcQF2^Xh1jQNqNvg^>dq-`)dte8s8SiNqJBOo za=7ZTxc&$?&$|-xuTLpPp5`aITxQ{G&mC4z~hf(ac1TeU^IzJ?4h= zUhH<3J)^PZoDNHHlT+^Pcnjhsz}UU)a%vFP2=;TQHp<)PKJSp0UwTV69vAz*YDfr0 zY-xxR$$)X#WTeLCh;XJ_p;OE9^l`26lB*ywP`D+BhmD+sEPzBtG0DlOZ8Fk`{-1(u zQDj;Y_OBYZUDv-CgTB`%9z!1{cWfQ+Z}eZEan_AhQjZqb8fRb{Cp@#OQ{Bcn9EW0M z`S2<51_oJHqTzYx=le*!)65iL;TluaG`c+kb%S_>>YpM;I`N=&V`W(BK$v>gX@3_h z!KMIed@A9;5JC+RKuFD1v$oK$-wVGK=+Xr|A|`f6cyJ`2{O;T+j1&BjvR@HL;1$!! zdbMJAoqbj=T9}L=r}W0j7`#D`z8RKWpCg<(5HC?E>=k{NaZN!oQV@`_y!qbjivVo# z=`BQbLRIneypAyF@ov?hV2 zjMtg|HJ@PSm>sw0Rw$nq;QEUl&W9{wv??*~TW6?2`&W*BCPQwc_A$)YnT{avg_5Db z;OMdbS6hU@z173XqL@f|Req8LT|(u(M#5Tc2t7>WZDgUSWO6n*yL5c**-~Xiky^HP z#$nOLuWMWYq0ZT}dJ#N}K0JS>*l;{C;kMsxaWQA!-s8{{*16reTofu;Gw}~l#5E_* zb#QChB-tmop)$tEN*Fij0F#;X9o|p-+*A{I=td9KJqmRQfo`Nn^^O~=gFxm@r&}-} z4|%HG@uciZy0Fj2-|J2_F&d&|S{BHsF+&t9=)5D2nx5kq`yw|3gc&Dbth6AHmip3> z`Ql%pM`$g-G$LyH%k!9c2(DTGlYsW#bNFUy*HTiOjfnQ+!zZS) z2)bXwYG1^0{v*SU-w1aO)*Os>1*0~qkp&@^mFd>wgxf~&D>w|689;BB)$yp|n7q$9 zoj?2U&G}28(={Ipa16-H_u)IdieAVD+345w!m^ zuBE{F=(9XtgE|e#bD1p^$i$_1*q!xPVS({Qb0_)A=cywOjR=A%wl z)SQOCT+mg)_Kgz9H91@4f@}9pazV>9E-YTta#;vTge2;i5ns+9O;^p3X zu*Xq^k5H=3mM2eJa12_liuGxZs&uo;bPIqY{Gs=(a9R6xl#2L~ zl>nTnz%Q$us&e^_9idEIDy_saNp>QqbL{eM;dRRoHDachvUGw(#D5&|JQ-i-( z+L&16hHHkAZ}d^)lAmBO4fs-Lju9TIhY}I(yrFxbF}unQuc7t73&j3KNy=@d8)_T9ChuX`ug(EQrRYTrwRY= zz>6-qy1%;~EM)2lLi?^3|FZakZtb*82KVBbn|SrEtlwYKzfT5WKQ;csL6%EJPfN{e z%f)7XadxX}AZ!`-`HZ7A9I1Wv*?h!68_K%Ty9_~Id4Qn$ZMEo%{Sp1ROKHHGrD)yM zFz{~w<;`JoGherC7NQIec+OnXv*cE_eirZbe8EOjTiyB*Q9@DROkFp@*p;h&%OEEx z#o0r;@+{Dvn^s-Y0%T z(>3IEKFp-%xt*+Z6Bn_iCZv{{n_nCj8ck&VG|d0D0t|bW(UGEq6&GO5T8b&iE|p_J z0Xb~=_bj_WuFheZaTn?=F09%TJA|#5<AZUWC7&pzT}>oQ%{Aa)=}SmCF7cL z6np!RzvU?>bRNv*YOwfb+FPq`c~-&IG-=CTbk=>3UySWu6PWS+%^}=08AFbP;hZqQRA1R7al{2El zS&*~_vrO>StkbPrT7FT@F-nPfd`K#wOwT8>G1O(v0mv#BAT9jhXa@`Hv~zW{NBpOy zqGBQuv^SI(&H{BU_6i-{UmHIVte@J7f^IKnehCLiYARbG?=&8~d31bB3*nxt>@=-- zcniEP=k1!UANZ8~t))ClnRRIg#WOhW6Pql3`mhAn68CfjD-M#l7KPe<5VLc_CB;wg z?b{rl>G(~$^-VO+5HQ5o{OHnY)s;p4p599ijp|~Vb$T9~4ySC= z$j!gHY>biNnDlNUg`U1x3!e2JyX-qcfHjeD(Ce5YSH(-Ku0mF-AK2~DTF001p&`Iq01#lC(4!E+N%~beGV*teslC+8~&-Rtvwrwo8i)A6=u;z@}ni0yW#0r zW)7z43dMd+k6mVl4J;bnJwXf8T*2p>wv~>}GJ}dUm2LRd(Dva+%?&9M z7Fahz*&uX;@uzBRol(S8nO0k*TUty@Mfs28Yd|6&MMwWi3#amq^?==v#tqHC^!TuRCo!RazxT^I19ujy}$AHxpBdLUE$LX!>@+|5H7@>HXAsl z?^R^|YW0=+QO>S8p$+8EoyAJ%*#&axyXl$YD(-;rcQ6a7YWTLS$3L8ISo`x?j*o8O z(8_na&mB%%P7%z1%)D=cq(d_4D?k5M2h3)$9wE5iDaC2d(t;ad>HyWBXaQHD;=j20 zi^Nv14;<(9)QQMO9Z&aq`hPZ8qE*WDDUX;nsf+K2{dj>b0#84%whV$#_cHoMiorJH z=S&Tn?&MF&Wt630Ny;#1X@vW=h))$p(n?}Wh$FIX7ba1~wmb-XOg>`GTZ7-sHEF&1 zOgzd8@Qz>yG#G6ix?Q<~e#(C#bR7mj>|8wawXgKGfvV~kd5B9euSjEbC31p}s3tjn2_Fka& zKLu^H;Of>>IvW<`a5Yr*U$YrmzLoZM&#KpcarYfOlkE%G{bD9bcMAhyEpN!8R?PTE zDqAx6H7gpp1mc&E zICp-;cqKlmE@&@T5-RblU;Qe$I5sb-%Qj3i7@vT6FUyAAk5@Ii+WQ zrIA${awmmLi<^GdMjmp3G5ouJ2KM_vzEp+bs=X2GI&%G)b)0v9q z)AORFf@g1&F{0S<4Pis%$}Pp~0`BBHLAQ$s-bcoTO%9?X3s|K`qBh{ADa>~$!Dyz% z9J#gr-CB_LA9n8i9SyL^DwoeuD>V7*r;~YQt=miigZEqq$j_&}^A{S&>eAh0ehKPv zHKd@b_n%SQnA=ELPY;PrfXbi|&M0oWXiIDNSfY`Pjp)z@*S(ef; z<%#+7wBY*y&~}Q%Xfy4raaM{#n}=K3rJWa*JD)%tIj6Vyu1`-y^Q>DCxhwhR@TBho z=UeNF58_T0pjVwq2+rVee`Eg6bAE@;CXVGUst>h=~H8i>j5HAiF;w9h(|iLQropT189%0RDOrxKT2mTGR1gJZROIy6!rEmNM9(viyDk7w zGVMAc-jDXS`NdSyL%E4nJ=`(<368dcciJLGO~nG5j)l4ZSTot*40O&uUf9#Vq#bH| zAEdu`B2pn+2yNTB;WCmq;c|69L=yuUsa~_!n(n8Mf}xY!dH7h>-jF>J4kuQNBWE+Y z2+s?Nx(H=WrFQyDA}4LE)65(8Vb&Jf95&hTee1RW!PvFUBk@nvo6enqx9QAkBjXNB z(G(~T#DtdkWKHj-fH~OlHEpzDgsiI7(Vr`f zR#?Cu-SHl(Um|7@j&Db?@Li6mU$b*bk1AR&CDfH>CYQ&1kvdF9NQvnNX(oX6 z4u{ST$(u0;ocUHNMvY#9BSMiJ!|!pF;io}$m9`jX7j2r*xaVq=otf^2Pg^-M9Xj$q z%CRW3;toxvc&7G3k=SEzqyvbyrM3SlVklq674R7oHpY1;FZaB4pbMpl;1$7;y&R4w zUtklpJ#B&$snspdUCxw=hj9*q8WXXQ3b8-$7iF7n+}59vQtWeXcB%j2LL57oUd;%v z34mS_$Bif$Z=F~0N^ew$q+3CAtcjJU^04xGW5~c$v9|`o!F}NdfL>GM^OA_0D>v{!CQ#M*09%I59ni@vcKkY>R3yY8qCA^ifN8N zu4-|RxjTEeNVyG{vlk_6vQp}FnG5}%s!YC;nwkSsJ?4$C<+5x#Ehyc7cl5F;zI5^J z>QCmX#Ajxu-Zp2EL#9U14gTwZHH#CUYZ3skmcN$b*AuN|g^47azDhhQ@Hpz|zkS3H z+mH6-EDtp5^Q$`sW!r>iEkKcekUGC_O++r*?Y6Mm8m}QI{vm!(b5*B^(EFo$;|#R%37{-w16KP3)I_aDN_^{#G$ zX?-gFfh@1g9}kPg7Z}aYYwx-rH@g9nmeiXK@N){1VC50;!fP#0XDOqssF3tfdCqxP z@N!kZtsJc*PVzIlTF=eEeF7m*;1;Rc&smGrRz~DRwgayp)cd9U2h8u?Go8;MGj&A) z7;4zm6zr49U)MlOB3ywR?`Vm38|r=v=fqvRBffKTnsxpRGfNr?6-?yx>aI(*CQdz4 zXv?F@7troIXnHo~0gKi?G_AQb_I0@_J{`y(ABjfL`WcO_Jp_hAc?BsRe@zPS4Ilai z_o5^WNP+@yF+DriELmqJrk+0KBt`6G-mDf5f6CZLjnUT=LLNmIVk~Q4=H=z3^@r?V z_LVbJ2+vGUmy={2b)_FNv>!l z(U%?locTryo(_4N%-vMxTEFt7x@Fp-%7pl1f~zd;jqXM_L16MtwPjUg{rTrc^xgK5 z{qJ{$1z6~-O%|ED5?-TgWBK2xXHN(wMABig@f>YMcl{@ko2(jK=D`qvHio7Db!%gB zxn>8CL(Mojm46P6n^;S~U`E zsnW&U5b224NBCJZ)BjN%fWq~1%Q`fAL?LN%0#Um$^`V!WeBNy@Rn|U)Jo(jz$>NyY zRF#4Oz#OYjN!tXz<~JYkQd1FwNyeB4bQ1n+iJ%tLe)el4I1@`_&*)>sL=_--bvwoJxz+H9Z;DTlydJhi6`M;nDE= zH~?|X^ciXyFwmjKd2Y|tj`Ick2DcAf0Eh-RrpnbeG%h_O8pPm}bm^-_e+axPlGq=? zNE}u}&w4XJK|afl-5Sz&6qWx>o&cwH zesVenuzmR0O$VT=a_8{pPJiR&{^sV^p=wPOkgFB(N32J|*}l8oTVXmFUxM5NT@%gh zX;-)FE+ad#FgZBvVYMRBXn4G8n|u2BjEd0|$$s_z8G#H|qNI3+oUSMJA6lZ0<6GVJ zfp@K=Gd6Taeg4uq`#Wfh6-QhA(qC!QmA4!2^@6jFP>=B_<`m#)*Lr-yL9xqyvf(cb zXQpBovGjMeV4pMp8Ke0~ex*cRW{U-BdC(R7c1rWyV5tcV9r&3J4=#+*v6X7GG`2gv z2xLG*2X&YFOPUNPo&co|YQxlTn*Hqwc(obW?G_=k<}&4b6{_WY z(++*8ea`w_#T33Fazfp5l2pCs*69-OB9KB7!Glgad%7Bw3q4jFZa%KptGLHh-s^6k zrOM=E+Q(2QuMd4U+5%bFt88|;1x- z;<5ztXz_nOQcUKZl<~V~R8dm%f2UjpLGpTk-@%)E-)W;R*}$25-t-=U8RsUxJ6KPK zF@e&j@5`8V_x3n;yV5Q$87*htOi8fdgpc2MG#pb8cdW1lL^$g6DT!M)&%!hD~j-Y6T|X2euO!2`9%v?;&&yS@8L%w>3hSQ}`veazV+yC;7_~LLTK*DePb#I~z#!wM|&fKCo!?ClRzlMz+ zdIOhIA-~YPEqs%`b<~q{8)g5R4j6-I-SsO^$sG?eOg|&nM>~!-VW_MtZpA~k)6C;~ zS=@c_c|EHypjmYWTPQ|i(>Dd8fc2Nv91T%tjx}n8tr4Z{cCP3C6?xRk+6E7>$^F?aW-{h@0DXJVK- zPAvys$d^r#gzfuwd!m;lYLpic87txu3Y%+-{v6L6fS&XEHQ!P66Tc=wQgdoxhtf1{jFIGYB3n%WLK$;>f~zdN)|LC$l*t>egL#g=>^slij->jml~?Pv*-3w> zYZSq3v#w{bz+SDWs1IM``7X(9McoXTx#p6x?^54AiuYfs{X(iR%k-f2R<&2g`}lHJ zgYOHS+ZD6AIW5Ib`%XcUsv!);t|xbE-V=__E(*CXWT7(jEQXN6Eenb)uxhX;eb zrNT`_QqmgQI@7ee9BWTq^!T<*)MXO;QLHhJ6{jXOn1-8~rI?1PP?CYbrWar|G12{I zX34QYR-K5FDabsJ43d@82rND>%8Cv6#^W`slG$}pL-`CbTrc1w!drRv(pU`WuaofT zzAb>;59wy8EuFgHD3)dz3FInEjosgjbl0{J6S6 z5Nj&qojq&Ut>+S9sBH`OZy$ zW^cSr<~6%+sj-aXRBRtZAEz&&et*+}HDI4qHfnD9rN?BEQhz;juU(XhQm(OPOb}UAG3B zsGZ&+>iSlXKU+nbb=pCHDWSs{ap^XiQQg&e=)d$;Hm#bqHtH;EH&`XY_T#_}DO)Y^ zq<=I`C2qks2U2s-%}Lv-J}Bz7_TPR4Cj~S(E_PD<`#tj^8gRnR34u)Ly@TQPVI5a4 zSJ~`);!ejr_1z@D5w*rU`EiGB0I!o^(cfA%v{!Fw*{N*5qP@47r_eP=i+(v%Pir zRzYAud!SBDtJf=*GeU}I>E8L;op!TV%~qDdlx`G!adO|&wE~-U`jcqb1%1im=bAq2qyI&@8q|xJf98)w$?)=C)=6aYmKCsr{46k_idty1rM;co;J9RY)+}Occ|)PwP9vY zPrK&}7@J2OJ_oIvdmUy+UWEmp*yyrN;k5RvmV3jY>(Q?*rK;aM0ddK~6w5p}xG#}h zvCz0awsw$Km2n@(7P*w^*`@Muff+2j8CeD|8x15jqIx@YRxKu?6Lx0OEKhf1jD)z2 zt^d&)&|r4K<>r3{)kmFM@3Q8hg`+BLb=0hqZSNQXxVXZ514CmZR|`-Z9LsN-4VFYX zP?S_r$~T+hOGM}0#9WjZsOC9R)Y~Ms>zS=?X9R~Ce}!fa+p`2(2YyAKM|su!S6$uDlfJZy1Ep-blA z7b-ba@fk*NQR68$eH>e}m#-0fF6Z;^dd;P*(;&)f6m@d>m9;Ko#4IqW7uFD%H}ma~ zDH&DGTD1$QD5}tixGKpEft3hkt60ND+XrM~z%Ty?hu@HNeGbb$C`p7*bNw+S%0B6D zwTzH@m$-X5NsVt?_z(VQi4=*%nlV!aW^Y>8YP@I)ICWykWz!Tt83m1JR+or>s*tI< zoaXx}4}ImSYj3dT^4{uY*QfSASG^Z56TFvm4v`mqv>rR2H`1D3S=u{ym!=XEC8j*L zOy3+F^Zc;-NR`Trns8ut;pbVyqdV=tQlgNqTE|^O^&&RAdslsqH@IY=)$yg}sG`cK z7nySFfY!b@N9z{}o8H8@N2!A!DtZP(V31X}1UDIrDP*Th;7Tg(rEI<+_e!>#k-%JD zvQK#wa4qIA=_dK$^yE`?X6Y|#k*#As(1WIv6L=Nk>{}}wU>0k`IY2$40 zy@5~-!!Qr6r``|*WILc|na5-ltMVO|<99vWuF0N*pHDGKD>R z`?9{aOvpApp`Xp3JHNW?eEYsHLuBW1HN77B3O3RW`5PB{ojld)=vhf2#Yup#no>s(s!wn zBX(B9fWaY5P|p;AVjN3tAv5-YGeW36s;p#7iP3M0OO(@Kn{_*3*7^{#CHw~-l9)kuBO{^ zqXMyTadS0wmkc**AKu^MMsL{qs462Zc`dSfZM?x;QuAI@N!u2q4Ddfg>#TRV_Hga5 zimC28LWk9#&y00uuYuNcW%xh&%G?ng*~-mdvX{2?Tl$cLYRfuj>w!Y7)~{XTASMWbDLW;{b^Q?n8J zk~gc9@QH%BWB~>gu>K(XKa^tTIe(zK4fe>qVYr40AD>eHsO~%L*Lk6a__?W+Z!und zWVhn!)sG;mr~@O`NZh|SY_|dp-`%OU(Y{%&G3a!1Ukm87+ua`Gy6|J_*H@q{N9oYX zZo4Q&4Q~;I##=yPO~>@@%a`Qm6U;qG(!YkCLckd;dzVUegK*{1t1k))!L zyBpzY$*hG1k4?Sr1Cr+rQPg=<@3Y{6ph!p_VVX~qC7}^??Cr%6K%*1adN{!b`+eMx zU3*0%w%rpb^`ZF0t|W*v?zoxiFJa?p_nX1!QcO%Q=OjHfHEusy)N1h!K2yD=(*O2F z=VU3`NqGP2b!5WSz;4GAm+k}4%q-65h_M2{?LI%WX10b`A~0>8sn{n1Rzg}ICF`psjgpfge!s0x5>e8@I* z5{kMajPB6iR$tJ8r3WaLhWTxmY566Fj`p{#^iN?++E4q^_CdNBGHPG2uwu~)4y5cd$;{bX6` z#mXv)Kd{YNUSs`FcT^=BIu>)Vq5Q<;2JUYiF}b#SedDCmqtMqr|3b`k{jaA7j|jS+ zQB3YydKy#hsDutN@u{8a_I!CDAsv;2x7bJ}0_y*0Sf}#!&@@a=~+E)$Z-4r>7lF}|OYTx3hCUMD}S`@Fn%?M$DikYJ|JHsVM&nspLndBvE8 zqBok5&}&0SjxEzc$PDM8ePdKJmaRSW+L6eJJ$V9=SzRPgIc6yc3NHR?tCA+}PCNNO zpmMI1@prTZtLVp*_Cti)KD{JM#Na%5{T^UJUlZlaj|`fY#6K| z${~JX|ghkYShMh#sJ#fsEt?c-b)JM!m-bvziGsonBZv_6qg{d{ix+bat z%oq6^EM$Ee=q<0aTp1(4Dm`IU?(_wnSR)-NCoe8#XhvsU81W@x<7gALfgO@J(n{1* zmiI2t`H2F!1)#AWgzGfr?K3HG&8UOr3uD~lpxufBWRb}T)VE?N$y5}hfGIR3uD9WH zq6QkKqm}8C|0Zv3a}9j7fvhNbOTXxPXsJU=jleR4sG}rLkPf5mulLw9rYw{4HWDs5 zx^pwe7BzP&$v^gZ-of&iO2YMz-K@T_$+FDr!_|ONyKt!PwrpMre{qGFOSKwERqsU2b@@8%OG?#i2`o*JrTDh@ClDe-~8ov;SZyIWObU(b9cFNoK+B zqKF4uUgC7@c8A?KdU_^sarahe)0488#*2NY5!JnDEE89aROu}ucF{#=&(=r>AJkZP zOZ_tDSP&86?bOqPifqjU#j2V&o^BfB_TN;!DFQdYa)17WbMf+^sUqfbyK!EJ%Ac71 z#p)hq>)Jt2o2P6c*-E_6w0|BBDxJCC0W8O8?}t_PTXOpxUm*0RZdn*fM?8$)%?axj zdcSxR7eO*{EN=IZ_9}^y-ach5jQi8aqh#!_ZJ*=6o?l?{bN0)yyp0$u&>F7wvqdQX zJiGdBPL&t%C{_JJedfEYo21W{-Urr34$73K)~fE=)Pi=|3WAcRS=2jc=MqLY_jUq{ z*`?U2tD9#lI7ojgg*RH=Q}OQ8==^mT{7%Apchp3dme4W+=ji9WiT3H}=P|Eu?lU$0 z1wr4SmCF;?0R%SHK>d^ywMYHbJ^dXT%$t!Sj+F)6hn$@34kl75Y$G?B#Y`t7=S~(z zP3O((uF%fO78CK$^OgFdb+zb`69ZPDw3ih{;Z+0mJM8~f6~L34BOK)Ib#>(6OyztM zM8sDaLV!MvFakEMmG?)&5)?Py<>yt--XJ^%=5GiaA={&b{_+{c@kH|AHd{U64%9br z5Q@hcg zK%+BGTIw8+fE>FQKr&sK(O*4QYW@Hn{CKicb5=G*M}LHL*9AmN6!I_ zk{N(L`*6q8geL@u9=g6Jw!f^5KTL_yjVg~k2vjkC7swmR$wSiele}f!u>U~g z#O7UBqF4Z*?Rs_lc;ZuLM4Hl5M1JgTd=wFk&hZ7 zqR8SI1z8zq@;@4c8f$l>GY}0e6K1-xrMy7Yyh8Q1uUJI1WVeG;5$~#X<5a@{21y^a3GMwg_uXoUN8Nu-6d8hg0WxO^8c~3 z@k^duV7PT*al&78_U1mN3!zqf8EwDd^MhGiT&ul6+$7aX$9BcDLZ7OTR1B<@h#osw zOy*$k{uyG`JhqS_h<*0~OXknS-1-I!n) zf6(_nfygE$bq+}_pb2xuQ859Z(e&EQ$WMZI`D}2(Gw}qY?$X4y!qA31@dBT#;;GU7 z6?s5$gslXw*ClgS(Ynrh@a`)@vRi19Rp?=9o4Uzif$jm9?pCi zuo(4|g5I5q_BG_4amz7Wd9a%F2&ohRJuuA5322qy_zX+JR;iEV8vClGU}GEB%QO`~ zbz3=s+-n)_oXM?22em)ghK%X{T*}lurAD}x*;E((hCAK4m}xe;YAMCNf){qF8u8qHjA<^_Z1tFwfTG3U0;>MQOL{_;&s_4~6*HE-*V&4> zTHkVHzsZf!ynyK<>Eqdt>an4=Po2`HA!sgbTr!{N5c+Xi2^S#CE$Fm8HHSF8VY7eU>^;)n{ zTbCrN0nVidQCh2Cv&)as7T1lfaSdAw(5gyXk-n!^*~(IPCq|A*>e)fyucbx7?Q8xU^Ri1nb@39lmwaYVgeR5B z!bzWTWDNF|qC%FUpyg>ywC9-;G1@0NWNtbDjZF{PWVAF=VFbWrLvxeXsVic~LYdrj zE+g#gDxe@91Q@$K9x%8*UZ#%hj~Dtk<{kw2B~y81bkLK>1#akK{1*3TfDJ^ovp(_`iA zhB~_WtQLm95X_Ej+j^fq&Uj`Ub4=YvWiogE=3ArrpPAr~_2nG))m!JtT=WO8G7ff$ zq@^W6(jv*!_H`YsSlp9V)CQMInBZcOB^zH#=<1j<2Y~nlf|rZHTFx^I!kY@g5Z@3O zfwMewt3XE?2#7Ybn|#6Tluq6|-~rPOrH2KafbR!TKE}g2#|L*QH{0cs$_h zKvWd*>%suu$7-W=$1mbC9dA3F=Su`;58dbc-d_!ADKm4wbFmyLs)Qr#f}N*_t0~i) zd%Yu>B?{tYQOi*0<9Daki3{?YEin@;V#+NW>#~!_VzPp&8H?eD-eg|E2KUfV=9M1BO@^O1oCsfUW4Vm%LssIWYUe6GisuDWt7S9Z&Y3Sf%jH5N01 zH)Zkiq60cfK0dp5f%U!WawiVdL;SP3!aPF4L?|lVfj=Hve$Mi-rCqS1YVWjE7Yi?$ zy3RP%{eLu_XIGP5*R=yEkuKsTQiGxt5h5KS5D*2WMMXsg5|l2zw?OEiRHcbPf>J_} zUZnSq^bXPq5PCv~kUY8HG2TCLemKV-d#}0XTE~puIs4DCj{wUgp31{Iv_r_ly7k#3__a|#SC=N0j2@GYrM46U>Ds$RWn)Im7(8Qi& zO$>PVFXSD+F&S=qX(wef%xK%kk-~jON}eK8OVyXB7!WTQbsj;enL6=a>FU|$+i*x3 zOgs?Wz6?vYvodUzU-+jmr$LX=HR5NQ_IEgoT&wF&5`ayUdry1HcvZJkBzjAYRL(kn z0RJ~M$9gA<=f~E$$gkO0|8~^pL_^+ZRD71&WPJXD_stAn3$n zTguDzIiLK!@qk5gmFQfa(T|w{DEfZzJ!I=^>Kf8jEl$yGxtGaOd&r@s#ByQCX8i+f^_!*ydy=Sgwgu`af8wF#QwsGmoU9HBD)F4p+BrYE`3s7NdeZf0;5V4Kv@n zvSHh{YgI}4)(?0!i~I3+r-HJ`aeRyEqWv-9LnKC+p6Hu~2 z?C$J_9;(b_s_~A_$jiDVrUstRT1+~#;gDWANAU!~9C5Ka2hL>Cj#fwEol((nT|MYQP zRxb06Q+1MIQ(Yrr?A9wGR+?!I#qMPIX$B^vy(_KaOW5pdqjtX*>I9H#`@Xa$U{mdR(+BiW}Sz@FY3>QLUe*Z1sI%i4$aUZMsXXYUj3?C%WV%Y|PZHM98@ z|1XeMcfN~m{MK3qd|b^wc;L2L7gMA&XR@3ENN+G~x~M^WBTXHRI%aCW)@UE$T5JW9QY_`osfndV`fAM&u!scMSvx|=E zts6So_2^_TK3TpJDb{Z?CTXUk5FK^&WI$4k6@iUm{!!U4c^rj26F(NM^6tqD2>#6` z4yt3N-fXx#0%d>4wL4>Ucylsg;-ZcFJk*QB!s@v(lV2c9Iu1p&4+)y; zsT2pj#!1pVC=8YfHdt_O3P`sOKfB}~5)lQ6T~9#qFgumqx+=%_WabHCJ8xgO_1vCL z^(PCf4&L4|OVU6X=$-xFYWd-v?$Suh+PxWDb9hHBe&Xn-I7|;5t-~uK4)aOwKd~VG zPH`HcF=qbD1D7{GdB--ZnBIC@ZBP$xw!m)e7@WOKQ#g=TT_*-(rZh)&6E$pUqoa!+ z`fRA1eJH#Ixl!}Kwb#;`!ek*kKB*YFMI1CW(#$U{o0A%j!}(x2p3~3$DHVTeO7*?B zzhZli6IG1hM&#||S^B1v1FTT*(B!Q_&d6HsmeyxY z!e5rRtd&;0wx$cGAF);26&mpm9;{Cyjs#_B_`JqD{SxPxKMDf(`(vFAvHxyxb>^xs zuMCA0@~M63w=u z2qrt}v|Dz-7?Eh5_x$+g3R4ikF`C!qjHb?CJAUoDwL?>qbBHwy(AsnF}`rV}~3K z7+frPaiqr;-NH{?o^~&4Ve6weDdKkhL!9bWD=~DlDzm9KdM;)5f-3xZIeDx(1>^uA zW#8KWw+DMJUuPO6KHn%ybruh;xT1VnvfCG#Bv|qW+=)RZ{jvl zAB%_zot+Auaz1ACTA~p3wz+%3Y*X_D}0Ml|bwg93y zfSUsy_2Z|)Mb($%_ea|shYlhC>>0dul7Js$p0SS20mT;r1v9mxFW=yH{IEYy@f4lt z)H9AQfM`zn+WLDY0SqWEgqT1=0t+C*3LcpipwZJwfL=v6UpDj>43~%yVvDoG;h;QI zk2SoUtJAx+(QZNXmdzOjQLRqbh#Otnxa6s%-drO5x2++Cv&+I9^3=IO?MGUE1dw_^p&F1;rSCEoaOR5N(8wuOq@n` zn@_VKACS9`XYrc7;8~Jc-R{!UI=sVn4+0C$MA0HxC+nC+dNTG0`q81oQzJPV5f181 zJSy9Eh@7gFy#^{2Lbe4i|HhC@YBxPWILWSP4?Ydxd&CnwAzlM;3yLTaQC6WcwY@h! zA!(~n25do#q@q6Nr1@&z<2eJ~TTD3-C0F5mUgsbb#gy?XkKys)JDDsjiVdUPEb%B7~6;$^0fLo-b8`;UaGjx4;D(o<@UbEutI)-^l=%P5>Z zI*SGrpj`!X{6@o~l&u6^qpPDw2fR1ef0ku%4mb+I3kfHCSwv2L())+f-X5?RvJ<(e z4_Qn?$gAjE(8FZ<=YiyPv1!nBLoATbw^yZ#{k!rs$jK zV8*13Ye|)xv5U)(xDT}cDP{F>=63vP+7ruMDrqu7;g@B=^p7~%#y2;!8+^Clo;J@C zR`Ha&;xGCRPU#BKDP6Rsv#PVygpqT~O5BWRtz3l~PaquwF<_KNg*8l|P{LR01|{(9 zXgDSwd&93WRm`D%!yN$@)m8R6{hXKd^(H53<1-JgT7l&R(dbr*6rE#}s%{48{Hu|VFp0O5fU}b- zzGCj9%*aVC7XzC6$4>j^KUoD1XqttWLA0ogxZOn5*|h6vXAwri0NdHKvVJD{_j^{o zYofw`yaLZHMWf>a!WvjLe^iD6A4eNIuBcj_Gdxs4dObRqZvEF5P2)Kk+#gF?pjo8* ztl(}%9n}5T5%`8}wmPK!L=2xs1f`u{DAd=McJ`xw)+t`RRiF&S=l;|;|LD2h79uCK zL9*6f);gD`(7v@UYmXi4q)_K*UU(4V=D)v9w&{8EcSofPEC-OI3z`UEfK%}e(uMHV z&rHR|x5N1X~ziW-9$5BZgHZnlfK4{m$>A-jtwGr3Woezh->34X2N| zjjMH9*2qYjVdVAt6KlTGEPqMm;3wN5jts4|)_l|t#aeeUcU%^%EbKU9S!^?Aiti_zI_;>nC4`{XMj5Em5luURq&dd#lN-1W7|t zCDVy5@A+7Hs@e0i&H1ozk-n5Wkc0TRhh1WHa9Vb5#*_u`!hZf}*bD~ZQXhGAI@ajq z|K4viEdw`>tUGnEy%@WWOOKkq9dYTHG6g6;ac4@YkYo~N`ii1#T3BL9Myx&Bh7*T@ zFdsTM)uzQkV_tsodESdxUbd@a#3r_(0>Dg~uIfJq36P?)J~<3luTP#j)=NN;cJR*P zdUVmzZoD~m8ki*=D^tf)`%A&)(#~#!(gnT%@bUpy`32BE^Y=nEViDI6CNwzkXw6u9 z;?3$UTrnw;J!fP

  • @d-f z`(kiPe1)PWQU?}w9y|C7S6!2lqi_*b^dPQ0^oQ-E{!fxy^Zpqw1Uj>?>xmLll=3beY#MjcEp_JP<__Q~-9%br zw0NnTKr=fDU$UR#2RxtKsS_(?GR-gKCB8S!_js^qSN&YCU+fF6W48NB(i<%9mj;vj z(+n1Q&pZB=N6K1(OA;RJkjp(D+AC)(2wj6cmVHunRs6|uQzCE@k#kaQ`7UO@&WW`o zI!x63`RCU-F^7Qr>Z`Aum9hv|Uf@9C;}|BI`+ zd>;h$qR>(YN8Z*|hKtz`;+3xU5_Ylsd+H&qW9ksL@@-Jqf?748r|aR2Dt`t}smCm3 z^67J%!30SS!s4nY&EuarSgk$O91)J$5H8=hA~NtphaA(V&)N*U4T7!yBdot>Dp|fU z&2M&_T%UVCKeZ+4xj0-2tLh)vK@?15ONxq&Jt+gzP9e%gZ@a0&mC`E^jMe(@BM5#u z9zPMze2^5l2-h|I^=ZV_a&&E_v?+ZRQt=tFko*pNMOI!td}Ba=@@!cI!%!D5iq~)G z9GoM*oiHx)<)#vP9HH0VE;nF%mdp2GXZag%r>^LB`s#yCrVs;_^Yed~w&}p;&#}o0 zCMs^rJ)&~3u`y2XausH+PcY1&sIpT<64dK7a?4LH9+tB>YlKzD?@+x&=BaMYtXBG|1RmX&0R}Wb)Bq2#x~SdVCv(}65+oz&d`zik9sRG zNGp4L-zt$dcBr#(>2MCkBsu+q@;d7+Z+N#`?~>`tL&5ZSkkba+=tAj2ERx7>d@c?o z3O$GxPa;7R$ejVbZ>6TX)9Ryv8CzDqYrlD=^YDi8-%1RDx_X_6-g`JTnag)ot($57 z+qOR#_{YoN()}osf7I-wAU+D>BPe_Xg@3*7M?Cn52Osg^BOZLjgO5n~5eYvc;YTF= f{~_Vm`pZs;jnA$%$u`A6z{lmZ`>BePmw)&ldygqi diff --git a/BasiliskII/src/Unix/BasiliskII_128x128x32_icon.c b/BasiliskII/src/Unix/BasiliskII_128x128x32_icon.c deleted file mode 100644 index 3de082615..000000000 --- a/BasiliskII/src/Unix/BasiliskII_128x128x32_icon.c +++ /dev/null @@ -1,5473 +0,0 @@ -/* GIMP RGBA C-Source image dump (BasiliskII_128x128x32_icon.c) */ - -static const struct { - unsigned int width; - unsigned int height; - unsigned int bytes_per_pixel; /* 2:RGB16, 3:RGB, 4:RGBA */ - unsigned char pixel_data[128 * 128 * 4 + 1]; -} icon_128x128x32 = { - 128, 128, 4, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, - 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, - 0x55, 0x55, 0x55, 0x03, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x7C, 0x7C, 0x7C, 0x73, 0x78, 0x78, 0x78, 0x66, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x04, - 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x91, 0x91, 0x91, 0x51, - 0x2F, 0x2F, 0x2F, 0xFC, 0x34, 0x34, 0x34, 0xF9, 0x10, 0x10, 0x10, 0x51, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x13, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x21, - 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x13, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, - 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x8B, 0x8B, 0x8B, 0x2E, 0x34, 0x34, 0x34, 0xEB, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x34, 0x34, 0x34, 0xEF, 0x11, 0x11, 0x11, 0x4B, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x2D, - 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x3D, - 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x3A, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x31, - 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1B, - 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1A, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x18, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x47, 0x47, 0x47, 0x12, 0x24, 0x24, 0x24, 0xCF, - 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x22, 0x22, 0x22, 0x98, 0x00, 0x00, 0x00, 0x1B, - 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x3B, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x4F, - 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x59, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x49, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x2A, - 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x33, - 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x36, - 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x37, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x38, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x37, - 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x36, - 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x34, - 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x31, - 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x2F, - 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2D, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x2D, - 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x80, 0x80, 0x02, - 0x1E, 0x1E, 0x1E, 0xA3, 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x27, 0x27, 0x27, 0xC9, - 0x05, 0x05, 0x05, 0x38, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x46, - 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x60, - 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x6B, - 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x72, - 0x00, 0x00, 0x00, 0x72, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x70, - 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6D, 0x00, 0x00, 0x00, 0x6C, - 0x00, 0x00, 0x00, 0x6B, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x63, - 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x4A, - 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x2B, - 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x31, - 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x4C, - 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x54, - 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x58, - 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x59, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, - 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, - 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, - 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x5B, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x59, - 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x58, - 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x53, - 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x50, - 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x4D, - 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, - 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4C, - 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x48, - 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x30, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x1C, 0x1C, 0x1C, 0x6D, 0x36, 0x36, 0x36, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x2B, 0x2B, 0x2B, 0xE7, 0x09, 0x09, 0x09, 0x57, 0x00, 0x00, 0x00, 0x46, - 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x6B, - 0x06, 0x02, 0x02, 0x7A, 0x39, 0x1C, 0x04, 0x90, 0x64, 0x36, 0x06, 0xA6, - 0x84, 0x48, 0x0A, 0xB8, 0xA2, 0x59, 0x0D, 0xC8, 0xAF, 0x61, 0x10, 0xD0, - 0xBA, 0x66, 0x0F, 0xD6, 0xC0, 0x6C, 0x0F, 0xD9, 0xBC, 0x69, 0x0F, 0xD6, - 0xB4, 0x64, 0x10, 0xD2, 0xA8, 0x5D, 0x0F, 0xCE, 0x95, 0x51, 0x0B, 0xC2, - 0x7B, 0x43, 0x08, 0xB6, 0x60, 0x34, 0x06, 0xA8, 0x36, 0x1A, 0x03, 0x96, - 0x0B, 0x06, 0x02, 0x88, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x76, - 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x60, - 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x26, - 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x6D, 0x00, 0x00, 0x00, 0x73, - 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x77, 0x00, 0x00, 0x00, 0x78, - 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x7A, - 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x7B, - 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, - 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, - 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x7F, - 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, - 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, 0x00, 0x00, 0x00, 0x7F, - 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7D, - 0x00, 0x00, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7C, - 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x7B, - 0x00, 0x00, 0x00, 0x7A, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x79, - 0x00, 0x00, 0x00, 0x78, 0x00, 0x00, 0x00, 0x77, 0x00, 0x00, 0x00, 0x76, - 0x00, 0x00, 0x00, 0x75, 0x00, 0x00, 0x00, 0x74, 0x00, 0x00, 0x00, 0x73, - 0x00, 0x00, 0x00, 0x72, 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x70, - 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, - 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6F, - 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x60, - 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x0E, 0x0E, 0x0E, 0x37, - 0x35, 0x35, 0x35, 0xF2, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x2D, 0x2D, 0x2D, 0xFF, 0x2C, 0x2C, 0x2C, 0xF9, 0x0C, 0x0C, 0x0C, 0x7F, - 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x66, 0x14, 0x06, 0x02, 0x7E, - 0x60, 0x33, 0x06, 0xA4, 0xAD, 0x61, 0x0E, 0xCE, 0xDB, 0x7C, 0x16, 0xEA, - 0xF8, 0x8B, 0x18, 0xFC, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xF8, 0x8B, 0x17, 0xFC, 0xE3, 0x80, 0x14, 0xEF, - 0xBE, 0x6A, 0x10, 0xDB, 0x80, 0x48, 0x09, 0xBD, 0x3D, 0x20, 0x03, 0xA0, - 0x02, 0x02, 0x00, 0x89, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x73, - 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x57, 0x00, 0x00, 0x00, 0x47, - 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x32, 0x22, 0x11, 0x03, 0x5A, - 0x43, 0x25, 0x04, 0x7D, 0x4B, 0x26, 0x03, 0x92, 0x4F, 0x2B, 0x03, 0xA2, - 0x54, 0x2B, 0x04, 0xAD, 0x5B, 0x2F, 0x04, 0xB4, 0x60, 0x34, 0x06, 0xB9, - 0x68, 0x38, 0x05, 0xBB, 0x6D, 0x3A, 0x05, 0xBE, 0x72, 0x3D, 0x07, 0xC0, - 0x75, 0x40, 0x07, 0xC2, 0x79, 0x42, 0x07, 0xC4, 0x7E, 0x43, 0x06, 0xC5, - 0x80, 0x46, 0x08, 0xC7, 0x83, 0x47, 0x08, 0xC8, 0x85, 0x4A, 0x08, 0xC9, - 0x87, 0x4A, 0x08, 0xCA, 0x8A, 0x4B, 0x08, 0xCB, 0x8C, 0x4E, 0x08, 0xCC, - 0x8D, 0x4E, 0x0A, 0xCD, 0x8E, 0x50, 0x0A, 0xCD, 0x90, 0x4F, 0x0A, 0xCE, - 0x91, 0x50, 0x0A, 0xCE, 0x91, 0x50, 0x0A, 0xCF, 0x91, 0x51, 0x0A, 0xCF, - 0x91, 0x51, 0x0A, 0xCF, 0x93, 0x51, 0x09, 0xCF, 0x91, 0x51, 0x0A, 0xCF, - 0x91, 0x50, 0x0A, 0xCE, 0x90, 0x50, 0x0A, 0xCE, 0x8E, 0x4F, 0x0A, 0xCE, - 0x8D, 0x4E, 0x0A, 0xCD, 0x8A, 0x4C, 0x08, 0xCC, 0x87, 0x4A, 0x08, 0xCA, - 0x85, 0x4A, 0x08, 0xC9, 0x82, 0x47, 0x08, 0xC8, 0x7E, 0x44, 0x06, 0xC6, - 0x79, 0x42, 0x07, 0xC4, 0x76, 0x40, 0x07, 0xC3, 0x72, 0x3D, 0x07, 0xC1, - 0x6D, 0x3A, 0x05, 0xBE, 0x67, 0x38, 0x05, 0xBC, 0x60, 0x33, 0x05, 0xBA, - 0x5B, 0x2F, 0x06, 0xB7, 0x54, 0x2C, 0x04, 0xB4, 0x4B, 0x27, 0x04, 0xB0, - 0x42, 0x22, 0x04, 0xAD, 0x38, 0x1D, 0x05, 0xAA, 0x2F, 0x17, 0x02, 0xA7, - 0x2A, 0x14, 0x02, 0xA4, 0x26, 0x10, 0x02, 0xA2, 0x24, 0x10, 0x02, 0xA1, - 0x28, 0x11, 0x02, 0xA1, 0x29, 0x11, 0x02, 0xA1, 0x2B, 0x14, 0x02, 0xA2, - 0x2A, 0x14, 0x02, 0xA3, 0x2D, 0x16, 0x02, 0xA3, 0x30, 0x16, 0x02, 0xA1, - 0x33, 0x1A, 0x02, 0x9C, 0x33, 0x18, 0x02, 0x92, 0x34, 0x19, 0x06, 0x84, - 0x03, 0x03, 0x03, 0x5E, 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2E, - 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x05, - 0x0E, 0x0E, 0x0E, 0x12, 0x2F, 0x2F, 0x2F, 0xCE, 0x32, 0x32, 0x32, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x11, 0x12, 0x12, 0xAA, 0x00, 0x00, 0x00, 0x5E, 0x2B, 0x13, 0x04, 0x87, - 0x97, 0x55, 0x0D, 0xC1, 0xE5, 0x80, 0x14, 0xEE, 0xFF, 0x91, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFB, 0x8D, 0x18, 0xFD, 0xCE, 0x72, 0x13, 0xE6, - 0x7C, 0x44, 0x05, 0xBF, 0x1F, 0x0D, 0x02, 0x9A, 0x00, 0x00, 0x00, 0x83, - 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x54, - 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x21, - 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x28, - 0x15, 0x0A, 0x03, 0x4A, 0xDB, 0x79, 0x14, 0xDE, 0xFF, 0x90, 0x18, 0xFD, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0xFA, 0x8C, 0x18, 0xFE, 0xF7, 0x8B, 0x17, 0xFD, 0xF4, 0x88, 0x17, 0xFC, - 0xF2, 0x88, 0x17, 0xFB, 0xF1, 0x86, 0x17, 0xFA, 0xF2, 0x87, 0x17, 0xFA, - 0xF2, 0x88, 0x17, 0xFB, 0xF4, 0x89, 0x17, 0xFB, 0xF5, 0x89, 0x17, 0xFC, - 0xF6, 0x89, 0x17, 0xFC, 0xF7, 0x8B, 0x17, 0xFD, 0xF8, 0x8C, 0x17, 0xFD, - 0xF8, 0x8B, 0x18, 0xFC, 0xFB, 0x8F, 0x18, 0xFC, 0x90, 0x4E, 0x0C, 0xAE, - 0x00, 0x00, 0x00, 0x4B, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x20, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x05, 0x21, 0x21, 0x21, 0x94, - 0x34, 0x34, 0x34, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, - 0x27, 0x27, 0x27, 0xFF, 0x0B, 0x14, 0x1A, 0xCF, 0x1D, 0x0A, 0x02, 0x7C, - 0x99, 0x54, 0x0D, 0xC0, 0xEF, 0x86, 0x19, 0xF6, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFC, 0x8E, 0x18, 0xFF, 0xFB, 0x8C, 0x18, 0xFC, 0xFC, 0x8D, 0x18, 0xFE, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xEA, 0x82, 0x17, 0xF5, 0x8D, 0x50, 0x0A, 0xCA, 0x1C, 0x0B, 0x02, 0x9D, - 0x00, 0x00, 0x00, 0x83, 0x00, 0x00, 0x00, 0x73, 0x00, 0x00, 0x00, 0x5E, - 0x00, 0x00, 0x00, 0x49, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x25, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x2B, 0x6C, 0x3A, 0x0A, 0x84, - 0xFF, 0x93, 0x19, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xB5, 0x65, 0x10, 0xCA, 0x00, 0x00, 0x00, 0x51, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x0E, - 0x12, 0x12, 0x12, 0x55, 0x34, 0x34, 0x34, 0xFB, 0x2F, 0x2F, 0x2F, 0xFF, - 0x2B, 0x2B, 0x2B, 0xFF, 0x22, 0x24, 0x25, 0xFF, 0x12, 0x18, 0x1E, 0xED, - 0x69, 0x3A, 0x0A, 0xB4, 0xE0, 0x7D, 0x16, 0xE9, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFB, 0x8D, 0x18, 0xFC, 0xD7, 0x79, 0x12, 0xDF, 0xA8, 0x5C, 0x0F, 0xB9, - 0x7A, 0x42, 0x09, 0x96, 0x5A, 0x31, 0x04, 0x7D, 0x43, 0x22, 0x05, 0x6F, - 0x3B, 0x1D, 0x05, 0x68, 0x41, 0x1F, 0x05, 0x6A, 0x51, 0x2B, 0x05, 0x71, - 0x67, 0x37, 0x06, 0x81, 0x8E, 0x4E, 0x0A, 0x9C, 0xB6, 0x67, 0x10, 0xBD, - 0xE3, 0x80, 0x15, 0xE5, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xE4, 0x80, 0x17, 0xF3, 0x6C, 0x39, 0x05, 0xBF, - 0x00, 0x00, 0x00, 0x91, 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00, 0x66, - 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x27, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x30, 0x96, 0x52, 0x0B, 0xA7, 0xFF, 0x93, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0x6F, 0x3B, 0x06, 0xA3, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x22, 0x06, 0x06, 0x06, 0x2B, 0x2B, 0x2B, 0x2B, 0xDC, - 0x2F, 0x2F, 0x2F, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x1E, 0x21, 0x24, 0xFF, - 0x24, 0x21, 0x1E, 0xFE, 0xA4, 0x5F, 0x19, 0xEB, 0xFF, 0x8F, 0x18, 0xFC, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xEE, 0x86, 0x17, 0xF2, 0x9E, 0x5A, 0x0D, 0xB6, 0x44, 0x26, 0x04, 0x78, - 0x06, 0x03, 0x03, 0x51, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x37, - 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2C, - 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x2B, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x33, 0x12, 0x07, 0x04, 0x46, - 0x4E, 0x2B, 0x05, 0x6C, 0xA6, 0x5C, 0x0D, 0xAE, 0xEB, 0x84, 0x17, 0xEB, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xB5, 0x63, 0x10, 0xDF, - 0x1D, 0x0B, 0x02, 0xA1, 0x00, 0x00, 0x00, 0x83, 0x00, 0x00, 0x00, 0x6C, - 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x27, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x35, - 0xA8, 0x5C, 0x0F, 0xB6, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xE4, 0x7E, 0x15, 0xF0, 0x15, 0x06, 0x02, 0x79, - 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x20, - 0x1E, 0x1E, 0x1E, 0xA3, 0x2F, 0x2F, 0x2F, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x1B, 0x21, 0x24, 0xFF, 0x35, 0x29, 0x1E, 0xFF, 0xCA, 0x73, 0x19, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFC, 0x8F, 0x18, 0xFD, 0xA6, 0x5C, 0x0D, 0xBF, 0x27, 0x15, 0x05, 0x6F, - 0x00, 0x00, 0x00, 0x49, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x32, - 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x18, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1B, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x27, - 0x00, 0x00, 0x00, 0x2E, 0x24, 0x0D, 0x03, 0x4D, 0x8E, 0x4F, 0x0C, 0x9A, - 0xF0, 0x87, 0x17, 0xF0, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xD8, 0x77, 0x14, 0xEF, - 0x3C, 0x1F, 0x03, 0xAF, 0x00, 0x00, 0x00, 0x86, 0x00, 0x00, 0x00, 0x6E, - 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x26, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x05, - 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x39, 0xB6, 0x64, 0x10, 0xBF, - 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0x8C, 0x4D, 0x09, 0xBD, 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x49, - 0x00, 0x00, 0x00, 0x2C, 0x0F, 0x0F, 0x0F, 0x63, 0x2F, 0x2F, 0x2F, 0xFB, - 0x2B, 0x29, 0x29, 0xFF, 0x1B, 0x21, 0x25, 0xFF, 0x3E, 0x2D, 0x1E, 0xFF, - 0xD6, 0x7A, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xE7, 0x81, 0x14, 0xEE, 0x5C, 0x31, 0x05, 0x93, - 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x32, - 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x2B, 0x36, 0x1A, 0x03, 0x59, - 0xC8, 0x6F, 0x0F, 0xCB, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xEA, 0x85, 0x17, 0xF7, - 0x48, 0x26, 0x04, 0xB5, 0x00, 0x00, 0x00, 0x87, 0x00, 0x00, 0x00, 0x6C, - 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x3B, 0xB9, 0x68, 0x0E, 0xC6, 0xFF, 0x92, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xEB, 0x83, 0x17, 0xF3, 0x24, 0x0F, 0x06, 0x88, - 0x06, 0x06, 0x06, 0x5C, 0x04, 0x04, 0x04, 0x42, 0x04, 0x04, 0x04, 0x3F, - 0x24, 0x24, 0x24, 0xD9, 0x2B, 0x2B, 0x2B, 0xFF, 0x1D, 0x21, 0x25, 0xFF, - 0x3D, 0x2C, 0x1E, 0xFF, 0xDC, 0x7D, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD9, 0x7A, 0x16, 0xE6, - 0x35, 0x1E, 0x06, 0x81, 0x00, 0x03, 0x06, 0x53, 0x0C, 0x0C, 0x0C, 0x41, - 0x0B, 0x0B, 0x0B, 0x2F, 0x0F, 0x0F, 0x0F, 0x21, 0x21, 0x21, 0x21, 0x17, - 0x30, 0x30, 0x30, 0x10, 0x40, 0x40, 0x40, 0x0C, 0x1C, 0x1C, 0x1C, 0x09, - 0x40, 0x40, 0x40, 0x08, 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, - 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, 0x55, 0x55, 0x55, 0x06, - 0x49, 0x49, 0x49, 0x07, 0x20, 0x20, 0x20, 0x08, 0x1A, 0x1A, 0x1A, 0x0A, - 0x3B, 0x3B, 0x3B, 0x0D, 0x2D, 0x2D, 0x2D, 0x11, 0x21, 0x21, 0x21, 0x17, - 0x0F, 0x0F, 0x0F, 0x21, 0x06, 0x0C, 0x0C, 0x2A, 0x13, 0x13, 0x0B, 0x43, - 0xB5, 0x67, 0x17, 0xB9, 0xFF, 0x90, 0x14, 0xFE, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xEB, 0x85, 0x17, 0xF8, - 0x46, 0x26, 0x06, 0xB5, 0x00, 0x02, 0x04, 0x88, 0x02, 0x02, 0x02, 0x69, - 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3C, - 0xBE, 0x69, 0x10, 0xC9, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xA8, 0x6A, 0x31, 0xF8, 0x46, 0x4B, 0x51, 0xE4, 0x61, 0x61, 0x62, 0xDF, - 0x6E, 0x6E, 0x6E, 0xDA, 0x4B, 0x4B, 0x4B, 0xE3, 0x28, 0x28, 0x28, 0xFF, - 0x21, 0x24, 0x25, 0xFF, 0x31, 0x28, 0x20, 0xFF, 0xD3, 0x78, 0x19, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xE4, 0x88, 0x2A, 0xFF, 0x7D, 0x71, 0x68, 0xEE, 0x7A, 0x7B, 0x7E, 0xDF, - 0x93, 0x93, 0x93, 0xDD, 0xA5, 0xA5, 0xA5, 0xD9, 0xB0, 0xB0, 0xB0, 0xD6, - 0xBA, 0xBA, 0xBA, 0xD4, 0xC2, 0xC2, 0xC2, 0xD2, 0xC7, 0xC7, 0xC7, 0xD1, - 0xCB, 0xCB, 0xCB, 0xD1, 0xCC, 0xCC, 0xCC, 0xD1, 0xCF, 0xCF, 0xCF, 0xD0, - 0xD8, 0xD8, 0xD8, 0xD0, 0xE5, 0xE5, 0xE5, 0xD0, 0xE5, 0xE5, 0xE5, 0xD0, - 0xE5, 0xE5, 0xE5, 0xD0, 0xE2, 0xE2, 0xE2, 0xD0, 0xD2, 0xD2, 0xD2, 0xD0, - 0xCE, 0xCE, 0xCE, 0xD0, 0xCC, 0xCC, 0xCC, 0xD1, 0xC9, 0xC9, 0xC9, 0xD1, - 0xC7, 0xC7, 0xC7, 0xD2, 0xC2, 0xC2, 0xC2, 0xD2, 0xBA, 0xBA, 0xBA, 0xD4, - 0xB0, 0xB0, 0xB0, 0xD6, 0xA2, 0xA4, 0xA5, 0xD7, 0x93, 0x94, 0x95, 0xDE, - 0xD9, 0x91, 0x4D, 0xFE, 0xFF, 0x8D, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE4, 0x82, 0x18, 0xFA, - 0x5F, 0x4F, 0x41, 0xEC, 0x46, 0x48, 0x4C, 0xD1, 0x03, 0x03, 0x03, 0x63, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x18, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3C, 0xBF, 0x6A, 0x10, 0xCC, - 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF1, 0x89, 0x1B, 0xFF, 0x65, 0x57, 0x4A, 0xFF, - 0x61, 0x63, 0x65, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x24, 0x25, 0x27, 0xFF, 0x20, 0x21, 0x21, 0xFF, - 0xC1, 0x6F, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xEF, 0x89, 0x20, 0xFF, 0x88, 0x76, 0x67, 0xFF, - 0x87, 0x8B, 0x8E, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, - 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, - 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB5, 0xB7, 0xB8, 0xFF, 0xA4, 0xA1, 0x9E, 0xFF, - 0xE7, 0x8F, 0x39, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xD6, 0x80, 0x28, 0xFF, - 0x4F, 0x4D, 0x4B, 0xF1, 0x02, 0x02, 0x02, 0x7C, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x3B, 0xC1, 0x6B, 0x11, 0xCD, 0xFF, 0x92, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xB6, 0x72, 0x2F, 0xFF, 0x4F, 0x55, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x45, 0x45, 0x45, 0xFF, 0x24, 0x24, 0x24, 0xFF, - 0x17, 0x1E, 0x24, 0xFF, 0x98, 0x5A, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, - 0x9C, 0x76, 0x54, 0xFF, 0x7C, 0x81, 0x85, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xAD, 0xB1, 0xB3, 0xFF, 0xAF, 0x9A, 0x88, 0xFF, - 0xF8, 0x8D, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0xA1, 0x63, 0x2A, 0xF1, - 0x00, 0x00, 0x04, 0x90, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x4A, - 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x3B, - 0xBF, 0x6A, 0x10, 0xCC, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x17, 0xFF, 0xFC, 0x8E, 0x17, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFF, 0x90, 0x13, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0x70, 0x59, 0x46, 0xFF, - 0x5B, 0x5F, 0x62, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x27, 0x27, 0x27, 0xFF, 0x1A, 0x20, 0x25, 0xFF, 0x62, 0x3F, 0x1E, 0xFF, - 0xFB, 0x8D, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x13, 0xFF, 0xC4, 0x7D, 0x39, 0xFF, 0x70, 0x76, 0x79, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xA4, 0xA9, 0xAC, 0xFF, 0xCE, 0x92, 0x5C, 0xFF, - 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF7, 0x8A, 0x17, 0xFC, 0x40, 0x1F, 0x04, 0xAF, - 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x3B, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, - 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x39, 0xB9, 0x67, 0x0E, 0xC4, - 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE3, 0x7E, 0x14, 0xEF, - 0xAE, 0x66, 0x1D, 0xDD, 0xA0, 0x6E, 0x41, 0xFF, 0x97, 0x70, 0x4E, 0xFF, - 0x96, 0x73, 0x54, 0xFF, 0x99, 0x76, 0x58, 0xFF, 0x9D, 0x77, 0x57, 0xFF, - 0xA2, 0x79, 0x55, 0xFF, 0xA6, 0x79, 0x53, 0xFF, 0xA9, 0x7B, 0x51, 0xFF, - 0xAE, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, - 0xAE, 0x7B, 0x4E, 0xFF, 0xAF, 0x7B, 0x4E, 0xFF, 0xB0, 0x7B, 0x4D, 0xFF, - 0xB0, 0x7B, 0x4B, 0xFF, 0xB2, 0x7C, 0x4B, 0xFF, 0xB2, 0x7C, 0x4B, 0xFF, - 0xB3, 0x7C, 0x4A, 0xFF, 0xB4, 0x7C, 0x4A, 0xFF, 0xB5, 0x7C, 0x49, 0xFF, - 0xB6, 0x7C, 0x49, 0xFF, 0xB7, 0x7D, 0x49, 0xFF, 0xB8, 0x7D, 0x48, 0xFF, - 0xB9, 0x7E, 0x48, 0xFF, 0xBA, 0x7E, 0x48, 0xFF, 0xB9, 0x7E, 0x48, 0xFF, - 0xB4, 0x7C, 0x4A, 0xFF, 0xAE, 0x7B, 0x4D, 0xFF, 0xA7, 0x79, 0x51, 0xFF, - 0xA0, 0x78, 0x56, 0xFF, 0x99, 0x77, 0x59, 0xFF, 0x93, 0x76, 0x5D, 0xFF, - 0x91, 0x76, 0x5E, 0xFF, 0x95, 0x77, 0x5C, 0xFF, 0x99, 0x78, 0x5B, 0xFF, - 0x9D, 0x78, 0x59, 0xFF, 0xA1, 0x79, 0x57, 0xFF, 0xA5, 0x79, 0x54, 0xFF, - 0xA8, 0x7A, 0x51, 0xFF, 0xAB, 0x7A, 0x4E, 0xFF, 0xAE, 0x79, 0x49, 0xFF, - 0xB0, 0x77, 0x43, 0xFF, 0xB0, 0x74, 0x3A, 0xFF, 0xA6, 0x6A, 0x34, 0xFF, - 0xCE, 0x79, 0x24, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xC7, 0x78, 0x2A, 0xFF, 0x4F, 0x54, 0x56, 0xFF, 0x68, 0x69, 0x69, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x21, 0x24, 0x24, 0xFF, - 0x29, 0x25, 0x21, 0xFF, 0xD8, 0x7A, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xF2, 0x8A, 0x1D, 0xFF, - 0x7D, 0x6E, 0x62, 0xFF, 0x83, 0x86, 0x88, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xB2, 0xB3, 0xB5, 0xFF, 0xA6, 0x9D, 0x93, 0xFF, 0xF3, 0x8E, 0x26, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xB8, 0x67, 0x10, 0xE1, 0x00, 0x00, 0x00, 0x8D, - 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x48, 0x00, 0x00, 0x00, 0x2C, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x38, 0xAF, 0x64, 0x10, 0xBB, 0xFF, 0x93, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xC9, 0x70, 0x13, 0xE4, 0x18, 0x07, 0x02, 0x8C, 0x0F, 0x19, 0x20, 0x97, - 0x5F, 0x66, 0x6A, 0xFF, 0x6B, 0x70, 0x73, 0xFF, 0x74, 0x78, 0x7B, 0xFF, - 0x78, 0x7C, 0x7F, 0xFF, 0x78, 0x7D, 0x80, 0xFF, 0x78, 0x7D, 0x81, 0xFF, - 0x78, 0x7D, 0x80, 0xFF, 0x77, 0x7C, 0x80, 0xFF, 0x77, 0x7C, 0x80, 0xFF, - 0x77, 0x7C, 0x80, 0xFF, 0x76, 0x7B, 0x80, 0xFF, 0x76, 0x7B, 0x7F, 0xFF, - 0x75, 0x7B, 0x7F, 0xFF, 0x76, 0x7B, 0x7F, 0xFF, 0x75, 0x7B, 0x7F, 0xFF, - 0x75, 0x7B, 0x7F, 0xFF, 0x75, 0x7B, 0x7F, 0xFF, 0x75, 0x7A, 0x7F, 0xFF, - 0x75, 0x7A, 0x7F, 0xFF, 0x75, 0x7A, 0x7E, 0xFF, 0x74, 0x7A, 0x7E, 0xFF, - 0x75, 0x7A, 0x7F, 0xFF, 0x74, 0x7A, 0x7E, 0xFF, 0x74, 0x7A, 0x7F, 0xFF, - 0x74, 0x7A, 0x7F, 0xFF, 0x74, 0x7A, 0x7F, 0xFF, 0x75, 0x7A, 0x7F, 0xFF, - 0x76, 0x7B, 0x7F, 0xFF, 0x77, 0x7C, 0x80, 0xFF, 0x78, 0x7D, 0x80, 0xFF, - 0x79, 0x7D, 0x80, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, 0x7B, 0x7E, 0x81, 0xFF, - 0x7B, 0x7E, 0x81, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, 0x7A, 0x7E, 0x81, 0xFF, - 0x79, 0x7D, 0x81, 0xFF, 0x78, 0x7D, 0x81, 0xFF, 0x77, 0x7C, 0x80, 0xFF, - 0x74, 0x79, 0x7D, 0xFF, 0x6F, 0x74, 0x78, 0xFF, 0x65, 0x6B, 0x6F, 0xFF, - 0x58, 0x5E, 0x63, 0xFF, 0x3C, 0x4A, 0x54, 0xFF, 0xB7, 0x71, 0x2B, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x17, 0xFF, 0x80, 0x5E, 0x41, 0xFF, - 0x58, 0x5B, 0x5F, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x57, 0x57, 0x57, 0xFF, - 0x25, 0x25, 0x25, 0xFF, 0x17, 0x1E, 0x24, 0xFF, 0x93, 0x57, 0x1E, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xBA, 0x79, 0x3A, 0xFF, 0x6C, 0x72, 0x76, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xA1, 0xA7, 0xAA, 0xFF, 0xCF, 0x91, 0x56, 0xFF, 0xFF, 0x8E, 0x0F, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFB, 0x8D, 0x18, 0xFE, 0x44, 0x23, 0x04, 0xAF, 0x00, 0x00, 0x00, 0x77, - 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x37, - 0x9F, 0x59, 0x0D, 0xB2, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x90, 0x18, 0xFF, 0x52, 0x2B, 0x04, 0xAB, - 0x00, 0x00, 0x00, 0x6F, 0x27, 0x27, 0x27, 0x8B, 0x77, 0x77, 0x77, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x66, 0x67, 0x67, 0xFF, - 0x5B, 0x57, 0x52, 0xFF, 0xE5, 0x84, 0x20, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xD8, 0x7F, 0x24, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x66, 0x67, 0x67, 0xFF, - 0x6D, 0x6D, 0x6D, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x22, 0x24, 0x25, 0xFF, - 0x38, 0x2C, 0x21, 0xFF, 0xE9, 0x84, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, - 0x80, 0x6A, 0x58, 0xFF, 0x7C, 0x7F, 0x81, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, - 0xB4, 0xB4, 0xB4, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xAC, 0xAF, 0xB1, 0xFF, - 0xAD, 0x96, 0x82, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xA3, 0x5B, 0x0D, 0xD8, 0x00, 0x00, 0x00, 0x84, 0x00, 0x00, 0x00, 0x62, - 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x36, 0x95, 0x51, 0x0B, 0xAA, - 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xEA, 0x83, 0x17, 0xF4, 0x16, 0x07, 0x04, 0x8B, 0x00, 0x00, 0x00, 0x61, - 0x2C, 0x2C, 0x2C, 0x7F, 0x81, 0x81, 0x81, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x61, 0x65, 0x69, 0xFF, 0x8F, 0x68, 0x44, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0x93, 0x65, 0x3B, 0xFF, - 0x54, 0x59, 0x5D, 0xFF, 0x70, 0x70, 0x6F, 0xFF, 0x50, 0x50, 0x50, 0xFF, - 0x25, 0x25, 0x25, 0xFF, 0x18, 0x20, 0x25, 0xFF, 0x93, 0x58, 0x1D, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xD9, 0x81, 0x28, 0xFF, 0x68, 0x69, 0x69, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xB5, 0xB5, 0xB6, 0xFF, 0x9F, 0x9E, 0x9C, 0xFF, - 0xE9, 0x8D, 0x32, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE8, 0x82, 0x17, 0xF6, - 0x16, 0x07, 0x02, 0x98, 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x49, - 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x08, - 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x20, - 0x00, 0x00, 0x00, 0x33, 0x9B, 0x55, 0x0D, 0xAD, 0xFF, 0x93, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xCF, 0x73, 0x15, 0xE3, - 0x02, 0x02, 0x00, 0x76, 0x00, 0x00, 0x00, 0x54, 0x30, 0x30, 0x30, 0x75, - 0x89, 0x89, 0x89, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x63, 0x63, 0x63, 0xFF, 0xD8, 0x81, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xE6, 0x84, 0x1F, 0xFF, 0x5A, 0x55, 0x4F, 0xFF, 0x64, 0x65, 0x66, 0xFF, - 0x6A, 0x6A, 0x6A, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x25, 0x27, 0x28, 0xFF, - 0x29, 0x27, 0x24, 0xFF, 0xDC, 0x7D, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xB0, 0x74, 0x3A, 0xFF, 0x68, 0x6D, 0x72, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0x9D, 0xA3, 0xA7, 0xFF, 0xD2, 0x8E, 0x51, 0xFF, - 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0x52, 0x2C, 0x04, 0xB2, - 0x00, 0x00, 0x00, 0x74, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x32, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0B, 0x55, 0x55, 0x55, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x30, - 0xAF, 0x61, 0x0E, 0xB6, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xBD, 0x69, 0x12, 0xD3, 0x00, 0x00, 0x00, 0x66, - 0x00, 0x00, 0x00, 0x48, 0x33, 0x33, 0x33, 0x6E, 0x8D, 0x8D, 0x8D, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x95, 0x6D, 0x4A, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xA8, 0x6C, 0x34, 0xFF, - 0x50, 0x57, 0x5C, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x4E, 0x4E, 0x4E, 0xFF, - 0x27, 0x27, 0x27, 0xFF, 0x1E, 0x24, 0x28, 0xFF, 0x68, 0x43, 0x21, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0x8D, 0x69, 0x49, 0xFF, - 0x70, 0x74, 0x77, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xA3, 0xA8, 0xAB, 0xFF, 0xBD, 0x90, 0x69, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0x91, 0x51, 0x0A, 0xCC, 0x00, 0x00, 0x00, 0x7A, - 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x0D, 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x2A, 0xBA, 0x68, 0x10, 0xBA, - 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xAD, 0x60, 0x0C, 0xC4, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x3C, - 0x36, 0x36, 0x36, 0x68, 0x90, 0x90, 0x90, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x78, 0x78, 0x79, 0xFF, - 0x65, 0x66, 0x66, 0xFF, 0xDA, 0x82, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xF2, 0x89, 0x1A, 0xFF, 0x67, 0x57, 0x4A, 0xFF, 0x61, 0x63, 0x65, 0xFF, - 0x6A, 0x6A, 0x6A, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x18, 0x21, 0x27, 0xFF, 0xA6, 0x62, 0x1D, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xF7, 0x8B, 0x18, 0xFF, 0x77, 0x64, 0x54, 0xFF, 0x77, 0x79, 0x7B, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xA7, 0xAB, 0xAE, 0xFF, - 0xAE, 0x92, 0x7B, 0xFF, 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xB9, 0x67, 0x12, 0xDF, 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x5D, - 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0F, - 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x22, 0xBD, 0x6A, 0x10, 0xBA, 0xFF, 0x92, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9D, 0x57, 0x0D, 0xAF, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x2F, 0x39, 0x39, 0x39, 0x62, - 0x92, 0x92, 0x92, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x6B, 0x6F, 0x72, 0xFF, 0x8C, 0x6C, 0x4F, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xBC, 0x74, 0x2E, 0xFF, - 0x4F, 0x55, 0x58, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, - 0x28, 0x28, 0x28, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x27, 0x27, 0x25, 0xFF, - 0xD6, 0x79, 0x1B, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xED, 0x87, 0x1D, 0xFF, - 0x69, 0x61, 0x58, 0xFF, 0x7B, 0x7C, 0x7D, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xAA, 0xAD, 0xAE, 0xFF, 0xA3, 0x93, 0x86, 0xFF, - 0xF8, 0x8D, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD6, 0x77, 0x12, 0xEC, - 0x04, 0x04, 0x00, 0x89, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x3E, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x19, - 0xC3, 0x6C, 0x11, 0xBF, 0xFF, 0x96, 0x1B, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x95, 0x19, 0xFF, 0x6E, 0x3A, 0x06, 0x7F, 0x00, 0x00, 0x00, 0x31, - 0x00, 0x00, 0x00, 0x21, 0x3B, 0x3B, 0x3B, 0x5B, 0x95, 0x95, 0x95, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x63, 0x66, 0x69, 0xFF, 0xCD, 0x7E, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFB, 0x8D, 0x18, 0xFF, 0x77, 0x5B, 0x43, 0xFF, 0x5C, 0x60, 0x63, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, - 0x27, 0x29, 0x2B, 0xFF, 0x43, 0x32, 0x24, 0xFF, 0xF2, 0x88, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xE6, 0x85, 0x20, 0xFF, 0x64, 0x60, 0x5B, 0xFF, - 0x7C, 0x7D, 0x7D, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xAC, 0xAE, 0xAF, 0xFF, 0x9E, 0x94, 0x8C, 0xFF, 0xF3, 0x8D, 0x23, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xE5, 0x81, 0x17, 0xF4, 0x0C, 0x05, 0x02, 0x8F, - 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x24, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x13, 0x4D, 0x2A, 0x03, 0x49, - 0xA6, 0x5E, 0x0D, 0x9B, 0xCD, 0x72, 0x13, 0xC0, 0xAE, 0x5F, 0x0E, 0xA6, - 0x17, 0x09, 0x05, 0x38, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x14, - 0x40, 0x40, 0x40, 0x54, 0x98, 0x98, 0x98, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x6F, 0x72, 0x73, 0xFF, 0x7D, 0x68, 0x57, 0xFF, - 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD0, 0x7C, 0x27, 0xFF, - 0x50, 0x52, 0x55, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x54, 0x54, 0x54, 0xFF, - 0x2B, 0x2B, 0x2B, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x22, 0x27, 0x2B, 0xFF, - 0x5F, 0x3F, 0x22, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xE4, 0x83, 0x20, 0xFF, 0x61, 0x5D, 0x5B, 0xFF, 0x7C, 0x7C, 0x7D, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xAD, 0xAE, 0xAF, 0xFF, - 0x9B, 0x94, 0x8E, 0xFF, 0xF0, 0x8D, 0x26, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xEA, 0x83, 0x17, 0xF7, 0x19, 0x0B, 0x04, 0x91, 0x00, 0x00, 0x00, 0x62, - 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x1B, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x09, 0x44, 0x44, 0x44, 0x4F, - 0x9A, 0x9A, 0x9A, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x63, 0x68, 0x6D, 0xFF, 0xB5, 0x77, 0x3A, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0x8B, 0x62, 0x3C, 0xFF, 0x56, 0x5B, 0x5F, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x1E, 0x25, 0x2B, 0xFF, 0x7B, 0x4D, 0x21, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xE5, 0x84, 0x20, 0xFF, - 0x60, 0x5C, 0x58, 0xFF, 0x79, 0x7A, 0x7A, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xAB, 0xAC, 0xAD, 0xFF, 0x99, 0x92, 0x8E, 0xFF, - 0xEE, 0x8C, 0x27, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEE, 0x85, 0x19, 0xF8, - 0x1F, 0x0C, 0x02, 0x92, 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x3F, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x01, 0x47, 0x47, 0x47, 0x4B, 0x9B, 0x9B, 0x9B, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x74, 0x75, 0x75, 0xFF, 0x6B, 0x65, 0x5F, 0xFF, - 0xE9, 0x87, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xE1, 0x82, 0x21, 0xFF, - 0x56, 0x52, 0x4F, 0xFF, 0x67, 0x68, 0x69, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, - 0x2C, 0x2C, 0x2C, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x1E, 0x27, 0x2C, 0xFF, 0x9B, 0x68, 0x38, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xE9, 0x85, 0x1D, 0xFF, 0x61, 0x5A, 0x54, 0xFF, - 0x75, 0x76, 0x77, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xAA, 0xAB, 0xAC, 0xFF, 0x99, 0x91, 0x8B, 0xFF, 0xF1, 0x8C, 0x24, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xEA, 0x82, 0x17, 0xF5, 0x14, 0x07, 0x02, 0x8D, - 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x0F, 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, - 0x42, 0x42, 0x42, 0x49, 0x9C, 0x9C, 0x9C, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x65, 0x65, 0x65, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x39, 0x39, 0x39, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x67, 0x6B, 0x6F, 0xFF, 0x9A, 0x6E, 0x48, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xA0, 0x69, 0x36, 0xFF, 0x50, 0x56, 0x5B, 0xFF, - 0x6D, 0x6C, 0x6C, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x33, 0x3B, 0x40, 0xFF, - 0xBF, 0x89, 0x59, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xF2, 0x89, 0x1A, 0xFF, 0x68, 0x59, 0x4D, 0xFF, 0x6F, 0x70, 0x72, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0x44, 0x44, 0x44, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x39, 0x39, 0x39, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xA7, 0xA8, 0xA9, 0xFF, - 0x9A, 0x8F, 0x86, 0xFF, 0xF4, 0x8C, 0x20, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xE3, 0x7F, 0x15, 0xF1, 0x0B, 0x06, 0x02, 0x86, 0x00, 0x00, 0x00, 0x5B, - 0x00, 0x00, 0x00, 0x3A, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0E, - 0x40, 0x40, 0x40, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x8A, 0x8A, 0x8A, 0x48, - 0x9A, 0x9A, 0x9A, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x44, 0x44, 0x44, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x77, 0x77, 0x78, 0xFF, 0x62, 0x64, 0x65, 0xFF, - 0xD5, 0x80, 0x2C, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEF, 0x88, 0x1C, 0xFF, - 0x61, 0x55, 0x49, 0xFF, 0x62, 0x63, 0x65, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x2B, 0x2B, 0x2B, 0xFF, 0x64, 0x6A, 0x6E, 0xFF, 0xCB, 0x94, 0x64, 0xFF, - 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, - 0x76, 0x5B, 0x45, 0xFF, 0x65, 0x68, 0x6B, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0xA4, 0xA4, 0xA4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xA2, 0xA5, 0xA7, 0xFF, 0x9F, 0x8C, 0x7C, 0xFF, - 0xF9, 0x8D, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xD3, 0x76, 0x14, 0xE8, - 0x02, 0x02, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0C, 0x55, 0x55, 0x55, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xCD, 0xCD, 0xCD, 0x48, 0x94, 0x94, 0x94, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x6C, 0x6F, 0x71, 0xFF, 0x80, 0x68, 0x54, 0xFF, 0xFA, 0x8C, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xB8, 0x72, 0x2E, 0xFF, 0x4D, 0x52, 0x57, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x39, 0x39, 0x39, 0xFF, - 0x92, 0x97, 0x9C, 0xFF, 0xC5, 0x93, 0x68, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0x93, 0x64, 0x38, 0xFF, - 0x58, 0x5D, 0x62, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0x3E, 0x3E, 0x3E, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0xD8, 0xD8, 0xD8, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0x9C, 0x9F, 0xA2, 0xFF, 0xA7, 0x89, 0x6F, 0xFF, 0xFE, 0x8D, 0x15, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xB3, 0x62, 0x0E, 0xD7, 0x00, 0x00, 0x00, 0x70, - 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x19, - 0x00, 0x00, 0x00, 0x0A, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x94, 0x94, 0x94, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x61, 0x66, 0x6A, 0xFF, - 0xB8, 0x77, 0x39, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0x74, 0x59, 0x42, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, 0x68, 0x67, 0x67, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x2D, 0x2D, 0x2D, 0xFF, 0x66, 0x66, 0x66, 0xFF, 0xA9, 0xAE, 0xB1, 0xFF, - 0xBC, 0x93, 0x6F, 0xFF, 0xFF, 0x8D, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xBC, 0x72, 0x2A, 0xFF, 0x4D, 0x52, 0x57, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0x94, 0x99, 0x9D, 0xFF, - 0xB8, 0x87, 0x5C, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0x8C, 0x4D, 0x0C, 0xBF, 0x00, 0x00, 0x00, 0x66, 0x00, 0x00, 0x00, 0x47, - 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x08, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x93, 0x93, 0x93, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x44, 0x44, 0x44, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x72, 0x73, 0x74, 0xFF, 0x6A, 0x64, 0x5D, 0xFF, 0xEA, 0x87, 0x20, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xD1, 0x7C, 0x25, 0xFF, 0x4E, 0x50, 0x51, 0xFF, - 0x68, 0x69, 0x69, 0xFF, 0x55, 0x55, 0x55, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0xAF, 0xB1, 0xB4, 0xFF, 0xB1, 0x96, 0x7E, 0xFF, - 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xEA, 0x85, 0x1C, 0xFF, 0x57, 0x4F, 0x47, 0xFF, 0x65, 0x66, 0x67, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0x8C, 0x91, 0x94, 0xFF, 0xCE, 0x87, 0x45, 0xFF, - 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0x4B, 0x27, 0x03, 0x9D, - 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x93, 0x93, 0x93, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x61, 0x61, 0x61, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x65, 0x6A, 0x6E, 0xFF, - 0x99, 0x6D, 0x47, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0x8E, 0x62, 0x3A, 0xFF, 0x51, 0x57, 0x5B, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x3E, 0x3E, 0x3E, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xB0, 0xB2, 0xB4, 0xFF, 0xA8, 0x9B, 0x8F, 0xFF, 0xF7, 0x8E, 0x20, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0x92, 0x61, 0x33, 0xFF, 0x4E, 0x54, 0x58, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, - 0x3A, 0x3A, 0x3A, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xA3, 0xA3, 0xA4, 0xFF, - 0x8B, 0x89, 0x87, 0xFF, 0xE7, 0x8A, 0x2C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xE4, 0x7E, 0x15, 0xF0, 0x0C, 0x04, 0x02, 0x7B, 0x00, 0x00, 0x00, 0x52, - 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x92, 0x92, 0x92, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x60, 0x60, 0x60, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x61, 0x63, 0x65, 0xFF, 0xD2, 0x7F, 0x2C, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xE7, 0x84, 0x1D, 0xFF, 0x57, 0x51, 0x4B, 0xFF, - 0x62, 0x63, 0x64, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xB5, 0xB6, 0xB6, 0xFF, - 0xA0, 0x9F, 0x9F, 0xFF, 0xE9, 0x8E, 0x35, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE2, 0x81, 0x1D, 0xFF, - 0x50, 0x4B, 0x46, 0xFF, 0x60, 0x61, 0x62, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x2D, 0x2D, 0x2D, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0x96, 0x99, 0x9C, 0xFF, 0x99, 0x83, 0x70, 0xFF, - 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9E, 0x59, 0x0D, 0xC6, - 0x00, 0x00, 0x00, 0x63, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x2A, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x09, 0x80, 0x80, 0x80, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x92, 0x92, 0x92, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x60, 0x60, 0x60, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x44, 0x44, 0x44, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x6B, 0x6E, 0x70, 0xFF, - 0x7B, 0x66, 0x54, 0xFF, 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xAC, 0x6D, 0x31, 0xFF, 0x4A, 0x51, 0x57, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x4E, 0x4E, 0x4E, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xB9, 0xB9, 0xBA, 0xFF, 0xA2, 0xA7, 0xAA, 0xFF, - 0xD3, 0x91, 0x54, 0xFF, 0xFF, 0x8E, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAC, 0x6A, 0x2A, 0xFF, - 0x43, 0x4B, 0x4F, 0xFF, 0x68, 0x69, 0x69, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, - 0x88, 0x8E, 0x91, 0xFF, 0xBD, 0x83, 0x4F, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFA, 0x8C, 0x18, 0xFC, 0x3A, 0x21, 0x04, 0x8D, 0x00, 0x00, 0x00, 0x54, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x91, 0x91, 0x91, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x60, 0x60, 0x60, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x60, 0x65, 0x69, 0xFF, 0xB1, 0x74, 0x3A, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0x6B, 0x56, 0x43, 0xFF, - 0x59, 0x5B, 0x5D, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x64, 0x64, 0x64, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xA9, 0xAD, 0xB0, 0xFF, 0xB7, 0x96, 0x7A, 0xFF, - 0xFF, 0x8D, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x83, 0x5A, 0x35, 0xFF, - 0x48, 0x4F, 0x54, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x2D, 0x2D, 0x2D, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0x9B, 0x9C, 0x9C, 0xFF, 0x85, 0x82, 0x7F, 0xFF, - 0xE8, 0x89, 0x29, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xB3, 0x65, 0x10, 0xD1, - 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x2C, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x04, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x90, 0x90, 0x90, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x60, 0x60, 0x60, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x71, 0x72, 0x72, 0xFF, - 0x65, 0x62, 0x5F, 0xFF, 0xE5, 0x85, 0x23, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xCB, 0x79, 0x27, 0xFF, 0x4A, 0x4E, 0x51, 0xFF, 0x66, 0x67, 0x67, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xB3, 0xB4, 0xB4, 0xFF, 0xA4, 0x9E, 0x9A, 0xFF, 0xEF, 0x8E, 0x2D, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x89, 0x1A, 0xFF, 0x72, 0x54, 0x39, 0xFF, - 0x4C, 0x51, 0x56, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x27, 0x27, 0x27, 0xFF, - 0x27, 0x27, 0x27, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x29, 0x29, 0x29, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, - 0x88, 0x8D, 0x90, 0xFF, 0xA6, 0x7E, 0x5C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xF3, 0x88, 0x18, 0xF8, 0x35, 0x1C, 0x06, 0x87, 0x00, 0x00, 0x00, 0x50, - 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x07, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x90, 0x90, 0x90, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x42, 0x42, 0x42, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x65, 0x69, 0x6D, 0xFF, 0x8E, 0x6A, 0x49, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0x89, 0x60, 0x3A, 0xFF, - 0x50, 0x55, 0x59, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xA3, 0xA8, 0xAC, 0xFF, 0xCE, 0x92, 0x5C, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xF0, 0x88, 0x1A, 0xFF, 0x76, 0x56, 0x3A, 0xFF, - 0x40, 0x47, 0x4D, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, 0x20, 0x20, 0x20, 0xFF, - 0x25, 0x25, 0x25, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, 0x25, 0x25, 0x25, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xAC, 0xAC, 0xAC, 0xFF, 0x96, 0x97, 0x97, 0xFF, 0x7E, 0x7E, 0x7D, 0xFF, - 0xE0, 0x87, 0x2F, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x71, 0x3B, 0xEA, - 0x00, 0x03, 0x03, 0x62, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x28, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x04, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x90, 0x90, 0x90, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x5C, 0x5C, 0x5C, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x40, 0x40, 0x40, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x5D, 0x62, 0x65, 0xFF, 0xC8, 0x7C, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xE5, 0x84, 0x1F, 0xFF, 0x55, 0x4F, 0x4B, 0xFF, 0x5F, 0x60, 0x61, 0xFF, - 0x6F, 0x6F, 0x6F, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x64, 0x64, 0x64, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xAF, 0xB1, 0xB3, 0xFF, - 0xAC, 0x9C, 0x8F, 0xFF, 0xF7, 0x8E, 0x1F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0x87, 0x58, 0x2E, 0xFF, - 0x0A, 0x12, 0x17, 0xFF, 0x15, 0x17, 0x18, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, - 0x22, 0x22, 0x22, 0xFF, 0x1E, 0x1E, 0x1E, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, - 0x7F, 0x85, 0x89, 0xFF, 0xA8, 0x7C, 0x54, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xDA, 0x87, 0x35, 0xFF, 0x6E, 0x6E, 0x6C, 0xE7, 0x07, 0x07, 0x07, 0x4E, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x8F, 0x8F, 0x8F, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x47, 0x47, 0x47, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, - 0x48, 0x48, 0x48, 0xFF, 0x55, 0x55, 0x55, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x6C, 0x6E, 0x6F, 0xFF, 0x71, 0x63, 0x57, 0xFF, - 0xF2, 0x8A, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x6B, 0x2F, 0xFF, - 0x49, 0x50, 0x55, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xA2, 0xA7, 0xAA, 0xFF, - 0xD3, 0x92, 0x55, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8F, 0x16, 0xFF, 0xA3, 0x5D, 0x14, 0xFF, - 0x24, 0x1E, 0x1A, 0xFF, 0x1B, 0x21, 0x25, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, - 0xAD, 0xAD, 0xAD, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0x9F, 0x9F, 0x9F, 0xFF, 0x88, 0x8A, 0x8C, 0xFF, 0x80, 0x76, 0x6E, 0xFF, - 0xED, 0x89, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xEC, 0x8A, 0x25, 0xFF, 0x8C, 0x7E, 0x73, 0xFF, - 0x7B, 0x7D, 0x81, 0xE4, 0x09, 0x09, 0x09, 0x3B, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x8E, 0x8E, 0x8E, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x60, 0x65, 0x69, 0xFF, 0xA2, 0x6F, 0x41, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xF7, 0x8C, 0x18, 0xFF, 0x6C, 0x55, 0x42, 0xFF, 0x56, 0x59, 0x5B, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xAF, 0xB1, 0xB2, 0xFF, 0xA9, 0x9D, 0x91, 0xFF, - 0xF5, 0x8E, 0x23, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xDB, 0x7F, 0x21, 0xFF, - 0x70, 0x56, 0x3D, 0xFF, 0x4A, 0x50, 0x56, 0xFF, 0x66, 0x67, 0x68, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xAE, 0xAE, 0xAE, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x8C, 0x8C, 0x8D, 0xFF, - 0x73, 0x76, 0x78, 0xFF, 0xCD, 0x82, 0x38, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xF2, 0x8B, 0x1F, 0xFF, - 0x95, 0x7E, 0x6A, 0xFF, 0x8B, 0x8F, 0x92, 0xFF, 0x90, 0x90, 0x90, 0xE1, - 0x0C, 0x0C, 0x0C, 0x2B, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x8D, 0x8D, 0x8D, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x71, 0x72, 0x72, 0xFF, 0x5F, 0x60, 0x60, 0xFF, - 0xD9, 0x81, 0x28, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xCD, 0x7A, 0x25, 0xFF, - 0x49, 0x4D, 0x4F, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x45, 0x45, 0x45, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCE, 0xCE, 0xCE, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xB9, 0xB8, 0xB8, 0xFF, 0xA4, 0xA9, 0xAD, 0xFF, 0xC9, 0x93, 0x63, 0xFF, - 0xFF, 0x8D, 0x0F, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, - 0xA1, 0x67, 0x2F, 0xFF, 0x4E, 0x4D, 0x4C, 0xFF, 0x57, 0x5B, 0x5F, 0xFF, - 0x6F, 0x6F, 0x6F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xB4, 0xB4, 0xB4, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, - 0x8A, 0x8B, 0x8C, 0xFF, 0x72, 0x76, 0x7A, 0xFF, 0xB9, 0x7C, 0x45, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xF2, 0x8B, 0x20, 0xFF, 0x9B, 0x7F, 0x67, 0xFF, 0x87, 0x8C, 0x90, 0xFF, - 0xA3, 0xA3, 0xA2, 0xFF, 0x9D, 0x9D, 0x9D, 0xDE, 0x09, 0x09, 0x09, 0x1E, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x8C, 0x8C, 0x8C, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x66, 0x6A, 0x6C, 0xFF, 0x7E, 0x65, 0x4F, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0x8C, 0x60, 0x37, 0xFF, 0x4D, 0x52, 0x57, 0xFF, - 0x6A, 0x6A, 0x6A, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xB2, 0xB3, 0xB4, 0xFF, 0xA3, 0xA1, 0x9F, 0xFF, 0xE6, 0x8F, 0x3A, 0xFF, - 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xD4, 0x7B, 0x21, 0xFF, 0x6D, 0x54, 0x3D, 0xFF, 0x49, 0x4F, 0x54, 0xFF, - 0x62, 0x63, 0x64, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0xA8, 0xA8, 0xA8, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xAF, 0xAF, 0xAF, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x85, 0x87, 0x88, 0xFF, 0x72, 0x75, 0x78, 0xFF, - 0xB6, 0x7C, 0x47, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xEC, 0x8A, 0x26, 0xFF, 0x97, 0x80, 0x6D, 0xFF, - 0x89, 0x8E, 0x91, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0xA7, 0xA7, 0xA7, 0xDD, 0x0C, 0x0C, 0x0C, 0x15, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x74, 0x75, 0x75, 0xFF, 0x5B, 0x62, 0x66, 0xFF, - 0xB5, 0x75, 0x37, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xE9, 0x85, 0x1D, 0xFF, - 0x56, 0x4E, 0x47, 0xFF, 0x5B, 0x5C, 0x5D, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xAA, 0xAE, 0xB0, 0xFF, 0xB0, 0x9B, 0x88, 0xFF, 0xF9, 0x8E, 0x1D, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xF6, 0x8B, 0x18, 0xFF, 0xA2, 0x66, 0x2E, 0xFF, 0x4D, 0x49, 0x47, 0xFF, - 0x4C, 0x52, 0x57, 0xFF, 0x62, 0x64, 0x65, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x7C, 0x7F, 0x82, 0xFF, - 0x74, 0x73, 0x71, 0xFF, 0xC3, 0x7F, 0x3E, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xDF, 0x89, 0x34, 0xFF, - 0x91, 0x83, 0x77, 0xFF, 0x8D, 0x91, 0x94, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xAF, 0xAF, 0xAF, 0xDC, - 0x11, 0x11, 0x11, 0x0F, 0x00, 0x00, 0x00, 0x01, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x6D, 0x6E, 0x6F, 0xFF, 0x64, 0x5F, 0x5B, 0xFF, 0xE6, 0x86, 0x22, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xB2, 0x6E, 0x2C, 0xFF, 0x47, 0x4D, 0x52, 0xFF, - 0x64, 0x64, 0x64, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x55, 0x55, 0x55, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x41, 0x41, 0x41, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xA5, 0xA9, 0xAD, 0xFF, 0xC2, 0x95, 0x6F, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xDC, 0x7F, 0x1E, 0xFF, 0x90, 0x5F, 0x32, 0xFF, - 0x57, 0x4E, 0x45, 0xFF, 0x4A, 0x50, 0x55, 0xFF, 0x59, 0x5D, 0x61, 0xFF, - 0x6A, 0x6B, 0x6B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x79, 0x79, 0x7A, 0xFF, - 0x6A, 0x6F, 0x74, 0xFF, 0x81, 0x6F, 0x60, 0xFF, 0xDA, 0x84, 0x2F, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0xC3, 0x86, 0x4E, 0xFF, 0x89, 0x87, 0x85, 0xFF, 0x93, 0x96, 0x98, 0xFF, - 0xA6, 0xA6, 0xA5, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB3, 0xB3, 0xB3, 0xDB, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x62, 0x66, 0x69, 0xFF, - 0x8D, 0x68, 0x48, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0x71, 0x56, 0x3F, 0xFF, 0x51, 0x56, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x45, 0x45, 0x45, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x5B, 0x5B, 0x5B, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xA2, 0xA6, 0xA9, 0xFF, 0xCF, 0x93, 0x5D, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xEB, 0x86, 0x1C, 0xFF, - 0xB8, 0x71, 0x2A, 0xFF, 0x7D, 0x5A, 0x3C, 0xFF, 0x55, 0x50, 0x4C, 0xFF, - 0x4D, 0x52, 0x57, 0xFF, 0x58, 0x5B, 0x5D, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x5A, 0x5F, 0x62, 0xFF, 0x5B, 0x5C, 0x5C, 0xFF, 0xA1, 0x70, 0x43, 0xFF, - 0xF2, 0x8A, 0x1D, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xE2, 0x89, 0x31, 0xFF, 0x9F, 0x84, 0x6C, 0xFF, 0x88, 0x8D, 0x90, 0xFF, - 0x9B, 0x9D, 0x9D, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xB2, 0xB2, 0xB2, 0xDA, 0x66, 0x66, 0x66, 0x0A, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8D, 0x8D, 0x8D, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x59, 0x5F, 0x62, 0xFF, 0xC4, 0x7A, 0x30, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xD5, 0x7D, 0x22, 0xFF, 0x49, 0x4B, 0x4C, 0xFF, - 0x5D, 0x5F, 0x5F, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x3A, 0x3A, 0x3A, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB1, 0xB2, 0xB3, 0xFF, - 0xA2, 0xA4, 0xA4, 0xFF, 0xD3, 0x93, 0x57, 0xFF, 0xFF, 0x8D, 0x0F, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xE3, 0x83, 0x1D, 0xFF, 0xAB, 0x6B, 0x2D, 0xFF, - 0x66, 0x4F, 0x3B, 0xFF, 0x3D, 0x41, 0x42, 0xFF, 0x70, 0x55, 0x3D, 0xFF, - 0xD1, 0x7C, 0x27, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xEF, 0x8A, 0x20, 0xFF, 0xB1, 0x7D, 0x50, 0xFF, 0x82, 0x80, 0x7E, 0xFF, - 0x8C, 0x90, 0x93, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xB3, 0xB3, 0xB3, 0xDA, - 0xE3, 0xE3, 0xE3, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x89, 0x89, 0x89, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x69, 0x6B, 0x6C, 0xFF, - 0x6B, 0x60, 0x55, 0xFF, 0xF0, 0x89, 0x1D, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0x95, 0x63, 0x33, 0xFF, 0x48, 0x4F, 0x54, 0xFF, 0x65, 0x65, 0x65, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB0, 0xB1, 0xB2, 0xFF, - 0xA1, 0xA3, 0xA5, 0xFF, 0xCF, 0x93, 0x5C, 0xFF, 0xFF, 0x8D, 0x10, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, - 0xD4, 0x7A, 0x1E, 0xFF, 0xF7, 0x8A, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, - 0xF6, 0x8B, 0x1A, 0xFF, 0xB5, 0x74, 0x34, 0xFF, 0x73, 0x67, 0x5D, 0xFF, - 0x70, 0x75, 0x79, 0xFF, 0x8A, 0x8A, 0x8B, 0xFF, 0x9D, 0x9C, 0x9C, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xB5, 0xB5, 0xB5, 0xDA, 0xE3, 0xE3, 0xE3, 0x09, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x5C, 0x62, 0x67, 0xFF, 0x9C, 0x6C, 0x41, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF0, 0x88, 0x1A, 0xFF, 0x5C, 0x4E, 0x42, 0xFF, - 0x56, 0x58, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x61, 0x61, 0x61, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB0, 0xB1, 0xB2, 0xFF, - 0xA1, 0xA5, 0xA7, 0xFF, 0xC4, 0x94, 0x6B, 0xFF, 0xF9, 0x8E, 0x1D, 0xFF, - 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xF1, 0x88, 0x18, 0xFF, 0xB1, 0x69, 0x20, 0xFF, 0x5E, 0x48, 0x35, 0xFF, - 0x43, 0x49, 0x4E, 0xFF, 0x5E, 0x61, 0x62, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xB4, 0xB4, 0xB4, 0xDA, 0xE3, 0xE3, 0xE3, 0x09, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x88, 0x88, 0x88, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x6E, 0x6E, 0x6F, 0xFF, - 0x5A, 0x5C, 0x5D, 0xFF, 0xD3, 0x7E, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xC2, 0x74, 0x27, 0xFF, 0x45, 0x4A, 0x4E, 0xFF, 0x60, 0x60, 0x60, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x52, 0x52, 0x52, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x49, 0x49, 0x49, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xA3, 0xA8, 0xAB, 0xFF, 0xB0, 0x99, 0x85, 0xFF, 0xE8, 0x8E, 0x36, 0xFF, - 0xFF, 0x8D, 0x0F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xD6, 0x7A, 0x19, 0xFF, - 0x4F, 0x37, 0x22, 0xFF, 0x21, 0x2C, 0x32, 0xFF, 0x3F, 0x42, 0x45, 0xFF, - 0x58, 0x58, 0x58, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, 0xAD, 0xAD, 0xAD, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xAF, 0xAF, 0xAF, 0xDA, - 0xAA, 0xAA, 0xAA, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x87, 0x87, 0x87, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x64, 0x67, 0x69, 0xFF, 0x76, 0x61, 0x4F, 0xFF, - 0xF8, 0x8C, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0x85, 0x5C, 0x37, 0xFF, - 0x4A, 0x50, 0x54, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, - 0xCA, 0xCA, 0xCA, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB6, 0xB5, 0xB5, 0xFF, - 0xA7, 0xAB, 0xAE, 0xFF, 0xA0, 0x9E, 0x9B, 0xFF, 0xCA, 0x92, 0x5E, 0xFF, - 0xF9, 0x8E, 0x1D, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, - 0xB2, 0x69, 0x20, 0xFF, 0x56, 0x45, 0x33, 0xFF, 0x3D, 0x45, 0x49, 0xFF, - 0x58, 0x5A, 0x5B, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, - 0xB1, 0xB1, 0xB1, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB2, 0xB2, 0xB2, 0xDA, 0x17, 0x17, 0x17, 0x0B, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x87, 0x87, 0x87, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x59, 0x5F, 0x64, 0xFF, 0xAB, 0x70, 0x39, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xE9, 0x85, 0x1D, 0xFF, 0x53, 0x4C, 0x45, 0xFF, 0x57, 0x58, 0x59, 0xFF, - 0x6A, 0x6A, 0x6A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x3D, 0x3D, 0x3D, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xAD, 0xAE, 0xAF, 0xFF, 0x9C, 0xA0, 0xA4, 0xFF, 0xA5, 0x91, 0x80, 0xFF, - 0xDA, 0x8B, 0x3F, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x16, 0xFF, - 0xF2, 0x88, 0x1A, 0xFF, 0xA7, 0x67, 0x2A, 0xFF, 0x56, 0x4C, 0x42, 0xFF, - 0x4C, 0x51, 0x57, 0xFF, 0x65, 0x66, 0x66, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xAD, 0xAD, 0xAD, 0xDB, 0x12, 0x12, 0x12, 0x0E, 0x00, 0x00, 0x00, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x86, 0x86, 0x86, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x89, 0x89, 0x89, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x6B, 0x6B, 0x6C, 0xFF, 0x5E, 0x5B, 0x59, 0xFF, - 0xE0, 0x83, 0x24, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xB6, 0x70, 0x2A, 0xFF, - 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x60, 0x5F, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xA8, 0xA8, 0xA8, 0xFF, 0x97, 0x9A, 0x9C, 0xFF, 0x86, 0x88, 0x89, 0xFF, - 0xA4, 0x7D, 0x5C, 0xFF, 0xE4, 0x87, 0x27, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xE9, 0x85, 0x1C, 0xFF, 0x97, 0x63, 0x32, 0xFF, - 0x50, 0x4D, 0x4B, 0xFF, 0x52, 0x57, 0x5B, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xA5, 0xA5, 0xA5, 0xDC, - 0x0C, 0x0C, 0x0C, 0x15, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x85, 0x85, 0x85, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x60, 0x63, 0x66, 0xFF, 0x82, 0x63, 0x48, 0xFF, 0xFD, 0x8E, 0x17, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0x79, 0x57, 0x39, 0xFF, 0x4C, 0x50, 0x54, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x87, 0x88, 0x88, 0xFF, 0x6E, 0x73, 0x77, 0xFF, - 0x66, 0x63, 0x5F, 0xFF, 0x9E, 0x69, 0x3B, 0xFF, 0xE4, 0x83, 0x1F, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xDC, 0x7F, 0x1F, 0xFF, - 0x83, 0x5B, 0x38, 0xFF, 0x4B, 0x4D, 0x4F, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0xA1, 0xA1, 0xA1, 0xFF, 0x9A, 0x9A, 0x9A, 0xDE, 0x08, 0x08, 0x08, 0x1F, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x85, 0x85, 0x85, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x56, 0x5B, 0x60, 0xFF, - 0xBB, 0x76, 0x33, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xE2, 0x82, 0x1F, 0xFF, - 0x4D, 0x49, 0x46, 0xFF, 0x58, 0x58, 0x59, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x63, 0x63, 0x63, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xA6, 0xA6, 0xA6, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x68, 0x6B, 0x6D, 0xFF, 0x51, 0x59, 0x5D, 0xFF, - 0x59, 0x51, 0x4B, 0xFF, 0xB2, 0x6F, 0x2C, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xC7, 0x77, 0x25, 0xFF, 0x69, 0x54, 0x40, 0xFF, 0x4C, 0x51, 0x56, 0xFF, - 0x65, 0x66, 0x67, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x8A, 0x8A, 0x8A, 0xE1, 0x0B, 0x0B, 0x0B, 0x2F, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, - 0x84, 0x84, 0x84, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x67, 0x68, 0x69, 0xFF, 0x63, 0x5B, 0x55, 0xFF, 0xEB, 0x87, 0x1F, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xAB, 0x6A, 0x2B, 0xFF, 0x42, 0x48, 0x4E, 0xFF, - 0x5F, 0x5F, 0x5F, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xCA, 0xCA, 0xCA, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x74, 0x77, 0x7A, 0xFF, 0x64, 0x69, 0x6C, 0xFF, - 0x7B, 0x67, 0x56, 0xFF, 0xBA, 0x76, 0x36, 0xFF, 0xF1, 0x89, 0x1D, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xF5, 0x8A, 0x18, 0xFF, 0xA6, 0x69, 0x2F, 0xFF, 0x53, 0x4E, 0x4C, 0xFF, - 0x5A, 0x5D, 0x61, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xE5, - 0x08, 0x08, 0x08, 0x43, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x19, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC6, 0xC6, 0xC6, 0x48, 0x83, 0x83, 0x83, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x5A, 0x60, 0x63, 0xFF, - 0x90, 0x67, 0x42, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0x6F, 0x52, 0x3A, 0xFF, 0x4D, 0x50, 0x54, 0xFF, 0x64, 0x64, 0x64, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x51, 0x51, 0x51, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xAE, 0xAE, 0xAE, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x77, 0x7A, 0x7D, 0xFF, 0x67, 0x6C, 0x6F, 0xFF, - 0x83, 0x6B, 0x58, 0xFF, 0xC5, 0x7C, 0x35, 0xFF, 0xF7, 0x8C, 0x1A, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x10, 0xFF, 0xEE, 0x8B, 0x23, 0xFF, - 0xB0, 0x7D, 0x51, 0xFF, 0x9C, 0x7C, 0x5F, 0xFF, 0xD2, 0x87, 0x40, 0xFF, - 0xF6, 0x8D, 0x1F, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xD8, 0x7E, 0x21, 0xFF, 0x67, 0x54, 0x42, 0xFF, - 0x54, 0x59, 0x5D, 0xFF, 0x62, 0x62, 0x62, 0xE9, 0x06, 0x06, 0x06, 0x5B, - 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x18, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC6, 0xC6, 0xC6, 0x48, 0x83, 0x83, 0x83, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x59, 0x5C, 0xFF, 0xC9, 0x7A, 0x2C, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xDA, 0x7E, 0x21, 0xFF, 0x47, 0x47, 0x46, 0xFF, - 0x58, 0x58, 0x59, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x49, 0x49, 0x49, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x48, 0x48, 0x48, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xB4, 0xB4, 0xB4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x7E, 0x80, 0x81, 0xFF, 0x69, 0x6E, 0x71, 0xFF, - 0x80, 0x6B, 0x59, 0xFF, 0xC5, 0x7C, 0x34, 0xFF, 0xF9, 0x8C, 0x18, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xF9, 0x8D, 0x1A, 0xFF, - 0xC4, 0x84, 0x49, 0xFF, 0x8A, 0x7F, 0x77, 0xFF, 0x80, 0x85, 0x8A, 0xFF, - 0x88, 0x8C, 0x8F, 0xFF, 0x8A, 0x8E, 0x90, 0xFF, 0x9C, 0x8E, 0x82, 0xFF, - 0xC2, 0x8D, 0x5D, 0xFF, 0xEB, 0x8D, 0x2E, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xEB, 0x86, 0x1C, 0xFF, 0x79, 0x59, 0x3F, 0xFF, - 0x43, 0x49, 0x4D, 0xED, 0x02, 0x02, 0x02, 0x76, 0x00, 0x00, 0x00, 0x54, - 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, - 0x82, 0x82, 0x82, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x62, 0x65, 0x66, 0xFF, - 0x6B, 0x5C, 0x4F, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xA0, 0x65, 0x2E, 0xFF, 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x39, 0x39, 0x39, 0xFF, - 0x3E, 0x3E, 0x3E, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, - 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, - 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, - 0x3D, 0x3D, 0x3D, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, - 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, 0x3B, 0x3B, 0x3B, 0xFF, - 0x3B, 0x3B, 0x3B, 0xFF, 0x36, 0x37, 0x37, 0xFF, 0x2B, 0x31, 0x36, 0xFF, - 0x52, 0x45, 0x3A, 0xFF, 0xB9, 0x76, 0x37, 0xFF, 0xF7, 0x8C, 0x1A, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, - 0xDD, 0x87, 0x32, 0xFF, 0x98, 0x7F, 0x6B, 0xFF, 0x82, 0x87, 0x8B, 0xFF, - 0x92, 0x94, 0x95, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0xA1, 0xA3, 0xA5, 0xFF, 0x99, 0x9F, 0xA2, 0xFF, - 0x9B, 0x97, 0x93, 0xFF, 0xB7, 0x90, 0x6F, 0xFF, 0xE2, 0x8D, 0x3A, 0xFF, - 0xFE, 0x8D, 0x15, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xF6, 0x8C, 0x1B, 0xFF, 0x79, 0x54, 0x31, 0xF1, - 0x00, 0x00, 0x04, 0x90, 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x52, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x81, 0x81, 0x81, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x56, 0x5C, 0x61, 0xFF, 0xA0, 0x6B, 0x3B, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, 0x64, 0x4F, 0x3C, 0xFF, - 0x4E, 0x51, 0x54, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x2C, 0x2C, 0x2C, 0xFF, 0x28, 0x28, 0x28, 0xFF, 0x1D, 0x20, 0x22, 0xFF, - 0x17, 0x1A, 0x1D, 0xFF, 0x7C, 0x4A, 0x17, 0xFF, 0xE5, 0x80, 0x14, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFA, 0x8D, 0x18, 0xFF, 0xB7, 0x7F, 0x4B, 0xFF, 0x7E, 0x7E, 0x7D, 0xFF, - 0x8A, 0x8E, 0x90, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, - 0xAE, 0xAE, 0xAE, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xA9, 0xAA, 0xAB, 0xFF, - 0x9E, 0xA3, 0xA7, 0xFF, 0x99, 0x9A, 0x9A, 0xFF, 0xB0, 0x91, 0x76, 0xFF, - 0xDE, 0x8D, 0x3F, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xF2, 0x89, 0x17, 0xFB, 0x4E, 0x29, 0x05, 0xBA, - 0x00, 0x00, 0x00, 0x87, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x4D, - 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC3, 0xC3, 0xC3, 0x48, 0x81, 0x81, 0x81, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x84, 0x84, 0x84, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x57, 0x58, 0x58, 0xFF, 0xD8, 0x7F, 0x26, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xD0, 0x7A, 0x22, 0xFF, 0x44, 0x45, 0x47, 0xFF, 0x58, 0x59, 0x59, 0xFF, - 0x69, 0x69, 0x69, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x3D, 0x3D, 0x3D, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x18, 0x1E, 0x22, 0xFF, 0x37, 0x29, 0x1E, 0xFF, 0xBD, 0x6C, 0x1A, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xF0, 0x8A, 0x20, 0xFF, 0x98, 0x78, 0x5C, 0xFF, - 0x79, 0x7F, 0x83, 0xFF, 0x90, 0x91, 0x92, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, - 0xAC, 0xAC, 0xAC, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xAC, 0xAD, 0xAD, 0xFF, 0xA0, 0xA4, 0xA8, 0xFF, 0x98, 0x9B, 0x9C, 0xFF, - 0xAF, 0x91, 0x77, 0xFF, 0xE1, 0x8D, 0x3B, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xEA, 0x83, 0x17, 0xF7, 0x33, 0x19, 0x03, 0xAE, - 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x63, 0x00, 0x00, 0x00, 0x45, - 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, - 0x80, 0x80, 0x80, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x5D, 0x61, 0x63, 0xFF, 0x78, 0x5F, 0x49, 0xFF, - 0xFB, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x93, 0x61, 0x31, 0xFF, - 0x42, 0x49, 0x4E, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x29, 0x29, 0x29, 0xFF, 0x17, 0x1E, 0x24, 0xFF, 0x4F, 0x35, 0x1E, 0xFF, - 0xDF, 0x7E, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xEE, 0x89, 0x20, 0xFF, - 0x89, 0x73, 0x61, 0xFF, 0x7A, 0x7F, 0x83, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0xA3, 0xA3, 0xA3, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xAC, 0xAD, 0xAD, 0xFF, 0xA0, 0xA4, 0xA7, 0xFF, - 0x98, 0x99, 0x9A, 0xFF, 0xB5, 0x8F, 0x6F, 0xFF, 0xEB, 0x8D, 0x2E, 0xFF, - 0xFF, 0x8E, 0x10, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xCC, 0x71, 0x11, 0xEB, 0x0A, 0x05, 0x02, 0x9D, - 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x59, 0x00, 0x00, 0x00, 0x3C, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7F, 0x7F, 0x7F, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, - 0x52, 0x59, 0x5D, 0xFF, 0xB1, 0x71, 0x34, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xF2, 0x89, 0x1A, 0xFF, 0x5B, 0x4C, 0x3D, 0xFF, 0x4F, 0x51, 0x54, 0xFF, - 0x64, 0x64, 0x64, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x2C, 0x2C, 0x2C, 0xFF, 0x28, 0x28, 0x28, 0xFF, 0x17, 0x1E, 0x24, 0xFF, - 0x57, 0x3A, 0x1E, 0xFF, 0xEB, 0x85, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xF1, 0x8A, 0x1D, 0xFF, 0x8A, 0x71, 0x5C, 0xFF, 0x78, 0x7D, 0x81, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xAB, 0xAB, 0xAC, 0xFF, - 0x9D, 0xA2, 0xA6, 0xFF, 0x9B, 0x96, 0x92, 0xFF, 0xC7, 0x8E, 0x5B, 0xFF, - 0xF8, 0x8D, 0x1D, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0x97, 0x53, 0x0B, 0xD6, 0x00, 0x00, 0x00, 0x8D, - 0x00, 0x00, 0x00, 0x6E, 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x32, - 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x05, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC3, 0xC3, 0xC3, 0x48, 0x7F, 0x7F, 0x7F, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x64, 0x65, 0x66, 0xFF, 0x5B, 0x57, 0x54, 0xFF, - 0xE5, 0x84, 0x22, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xC6, 0x75, 0x24, 0xFF, - 0x40, 0x45, 0x47, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, - 0x60, 0x60, 0x60, 0xFF, 0x5B, 0x5B, 0x5B, 0xFF, 0x57, 0x57, 0x57, 0xFF, - 0x55, 0x55, 0x55, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x52, 0x52, 0x52, 0xFF, - 0x52, 0x52, 0x52, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x52, 0x52, 0x52, 0xFF, - 0x52, 0x52, 0x52, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x50, 0x50, 0x50, 0xFF, - 0x4E, 0x4E, 0x4E, 0xFF, 0x49, 0x49, 0x49, 0xFF, 0x45, 0x44, 0x44, 0xFF, - 0x33, 0x39, 0x3D, 0xFF, 0x5A, 0x42, 0x2C, 0xFF, 0xEA, 0x84, 0x17, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x93, 0x71, 0x52, 0xFF, - 0x73, 0x78, 0x7C, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xA8, 0xA8, 0xA9, 0xFF, 0x98, 0x9E, 0xA1, 0xFF, 0xA8, 0x91, 0x7E, 0xFF, - 0xE4, 0x8C, 0x37, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFA, 0x8E, 0x18, 0xFD, 0x46, 0x25, 0x04, 0xB5, 0x00, 0x00, 0x00, 0x81, - 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x27, - 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, - 0x7E, 0x7E, 0x7E, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x58, 0x5D, 0x61, 0xFF, 0x86, 0x62, 0x42, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0x88, 0x5B, 0x32, 0xFF, 0x43, 0x49, 0x4E, 0xFF, - 0x5F, 0x5F, 0x5F, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x84, 0x84, 0x84, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x5C, 0x5E, 0x61, 0xFF, 0x60, 0x55, 0x4D, 0xFF, - 0xE4, 0x84, 0x22, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xAF, 0x75, 0x42, 0xFF, 0x6C, 0x71, 0x75, 0xFF, 0x8B, 0x8C, 0x8C, 0xFF, - 0x9F, 0x9F, 0x9F, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xAE, 0xAD, 0xAD, 0xFF, 0xA0, 0xA3, 0xA6, 0xFF, 0x98, 0x96, 0x94, 0xFF, - 0xCD, 0x8D, 0x54, 0xFF, 0xFE, 0x8E, 0x14, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xC7, 0x70, 0x11, 0xEA, 0x03, 0x02, 0x00, 0x96, 0x00, 0x00, 0x00, 0x72, - 0x00, 0x00, 0x00, 0x50, 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7D, 0x7D, 0x7D, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x51, 0x57, 0x5A, 0xFF, - 0xC0, 0x76, 0x2E, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xED, 0x86, 0x1C, 0xFF, - 0x53, 0x47, 0x3F, 0xFF, 0x50, 0x51, 0x52, 0xFF, 0x63, 0x63, 0x63, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x63, 0x63, 0x63, 0xFF, - 0x50, 0x52, 0x54, 0xFF, 0xC5, 0x77, 0x2B, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xD6, 0x81, 0x2B, 0xFF, 0x69, 0x69, 0x6A, 0xFF, - 0x82, 0x83, 0x84, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0xA7, 0xA8, 0xA8, 0xFF, 0x96, 0x9A, 0x9E, 0xFF, - 0xB8, 0x8E, 0x6A, 0xFF, 0xF9, 0x8D, 0x1B, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0x6C, 0x3C, 0x07, 0xC2, 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x60, - 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x13, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC3, 0xC3, 0xC3, 0x48, 0x7D, 0x7D, 0x7D, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x61, 0x62, 0x63, 0xFF, 0x63, 0x58, 0x4F, 0xFF, 0xEE, 0x88, 0x1D, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xBC, 0x71, 0x27, 0xFF, 0x3D, 0x44, 0x47, 0xFF, - 0x58, 0x58, 0x58, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x68, 0x68, 0x68, 0xFF, 0x51, 0x57, 0x5B, 0xFF, 0x93, 0x65, 0x3B, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, - 0x84, 0x6A, 0x54, 0xFF, 0x73, 0x77, 0x7A, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0xA4, 0xA4, 0xA4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xA9, 0xAA, 0xAA, 0xFF, 0x97, 0x9D, 0xA0, 0xFF, - 0xAD, 0x8F, 0x74, 0xFF, 0xF5, 0x8D, 0x22, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD6, 0x77, 0x12, 0xEF, - 0x09, 0x03, 0x02, 0x96, 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x4D, - 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, - 0x7C, 0x7C, 0x7C, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, - 0x95, 0x67, 0x3D, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0x7C, 0x56, 0x35, 0xFF, 0x45, 0x4A, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x60, 0x61, 0x62, 0xFF, - 0x5F, 0x56, 0x4F, 0xFF, 0xE9, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xBE, 0x78, 0x34, 0xFF, 0x63, 0x69, 0x6D, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xB4, 0xB4, 0xB4, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0x98, 0x9D, 0xA1, 0xFF, - 0xAB, 0x8F, 0x75, 0xFF, 0xF7, 0x8D, 0x1F, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0x5E, 0x32, 0x05, 0xBB, - 0x00, 0x00, 0x00, 0x7B, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x39, - 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x66, 0x66, 0x66, 0xFF, 0x52, 0x56, 0x58, 0xFF, 0xCE, 0x7B, 0x2A, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xE5, 0x83, 0x1D, 0xFF, 0x4B, 0x45, 0x40, 0xFF, - 0x51, 0x52, 0x54, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x69, 0x69, 0x69, 0xFF, 0x51, 0x58, 0x5C, 0xFF, 0xA6, 0x6C, 0x37, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8E, 0x18, 0xFF, 0xF6, 0x8B, 0x1A, 0xFF, - 0x79, 0x66, 0x55, 0xFF, 0x73, 0x76, 0x78, 0xFF, 0x90, 0x90, 0x90, 0xFF, - 0xA4, 0xA4, 0xA4, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0x96, 0x9B, 0x9F, 0xFF, - 0xB2, 0x8D, 0x6B, 0xFF, 0xFD, 0x8D, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xBA, 0x68, 0x10, 0xE1, 0x00, 0x00, 0x00, 0x89, - 0x00, 0x00, 0x00, 0x65, 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x27, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xC3, 0xC3, 0xC3, 0x48, 0x7B, 0x7B, 0x7B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, - 0x4F, 0x4F, 0x4F, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x5D, 0x60, 0x62, 0xFF, - 0x6A, 0x59, 0x4C, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xAF, 0x6B, 0x28, 0xFF, 0x3C, 0x44, 0x48, 0xFF, 0x58, 0x58, 0x58, 0xFF, - 0x67, 0x67, 0x67, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x62, 0x63, 0x64, 0xFF, - 0x5E, 0x57, 0x51, 0xFF, 0xE7, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xC4, 0x79, 0x2F, 0xFF, 0x5E, 0x64, 0x67, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, - 0x5B, 0x5B, 0x5B, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x91, 0x96, 0x9A, 0xFF, - 0xCA, 0x8B, 0x51, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xEE, 0x87, 0x17, 0xF9, 0x20, 0x0E, 0x02, 0x9F, 0x00, 0x00, 0x00, 0x6F, - 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xC3, 0xC3, 0xC3, 0x48, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x47, 0x47, 0x47, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, - 0x66, 0x66, 0x66, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, 0x9C, 0x69, 0x3B, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0x71, 0x51, 0x36, 0xFF, - 0x46, 0x4B, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x57, 0x5B, 0x60, 0xFF, 0x8D, 0x64, 0x41, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0x8B, 0x66, 0x47, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x9F, 0x9F, 0x9F, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x5A, 0x5A, 0x5A, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB0, 0xB0, 0xB0, 0xFF, 0xA2, 0xA3, 0xA4, 0xFF, 0x94, 0x90, 0x8C, 0xFF, - 0xEA, 0x8C, 0x2D, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0x65, 0x35, 0x05, 0xBA, 0x00, 0x00, 0x00, 0x76, 0x00, 0x00, 0x00, 0x54, - 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x36, 0x39, 0x3B, 0xFF, 0xCF, 0x7A, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xDD, 0x7F, 0x1E, 0xFF, 0x45, 0x42, 0x40, 0xFF, 0x51, 0x52, 0x52, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x67, 0x67, 0x68, 0xFF, - 0x52, 0x57, 0x5A, 0xFF, 0xC5, 0x79, 0x2C, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xEA, 0x86, 0x1F, 0xFF, 0x65, 0x5E, 0x58, 0xFF, - 0x75, 0x76, 0x77, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, - 0xB3, 0xB3, 0xB3, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x4F, 0x4F, 0x4F, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0x95, 0x9A, 0x9F, 0xFF, 0xB1, 0x8A, 0x68, 0xFF, - 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xA0, 0x59, 0x0B, 0xD4, - 0x00, 0x00, 0x00, 0x7E, 0x00, 0x00, 0x00, 0x5B, 0x00, 0x00, 0x00, 0x3A, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x79, 0x79, 0x79, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x24, 0x27, 0x29, 0xFF, 0x43, 0x30, 0x20, 0xFF, - 0xF2, 0x88, 0x17, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xA5, 0x67, 0x2D, 0xFF, - 0x3D, 0x45, 0x49, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x6F, 0x6F, 0x6F, 0xFF, 0x62, 0x63, 0x65, 0xFF, 0x64, 0x59, 0x51, 0xFF, - 0xEE, 0x88, 0x1D, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xCA, 0x7A, 0x2B, 0xFF, 0x5A, 0x5F, 0x62, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0xA3, 0xA4, 0xA4, 0xFF, 0x90, 0x8F, 0x8E, 0xFF, 0xE6, 0x8B, 0x31, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xCA, 0x71, 0x13, 0xE7, 0x02, 0x00, 0x00, 0x87, - 0x00, 0x00, 0x00, 0x61, 0x00, 0x00, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x79, 0x79, 0x79, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x5F, 0x5F, 0x5F, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x1B, 0x22, 0x28, 0xFF, 0x83, 0x4F, 0x1F, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xF9, 0x8C, 0x17, 0xFF, 0x57, 0x3E, 0x25, 0xFF, 0x39, 0x3D, 0x3F, 0xFF, - 0x57, 0x57, 0x57, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x5A, 0x5F, 0x62, 0xFF, 0x82, 0x62, 0x46, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xA8, 0x6D, 0x37, 0xFF, - 0x5C, 0x63, 0x68, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0x9C, 0x9C, 0x9C, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x49, 0x49, 0x49, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x57, 0x57, 0x57, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0x92, 0x97, 0x9C, 0xFF, 0xB9, 0x89, 0x5E, 0xFF, 0xFF, 0x8E, 0x10, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xE3, 0x7F, 0x17, 0xF3, 0x0C, 0x04, 0x02, 0x91, 0x00, 0x00, 0x00, 0x65, - 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x78, 0x78, 0x78, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x47, 0x47, 0x47, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x1D, 0x21, 0x25, 0xFF, - 0xC3, 0x70, 0x1B, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xD0, 0x76, 0x18, 0xFF, - 0x1A, 0x1B, 0x1B, 0xFF, 0x22, 0x22, 0x22, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x66, 0x66, 0x66, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x55, 0x5A, 0x60, 0xFF, - 0xA9, 0x6E, 0x38, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0x8B, 0x64, 0x42, 0xFF, 0x64, 0x68, 0x6B, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, - 0x68, 0x68, 0x68, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x5D, 0x5D, 0x5D, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0x9D, 0x9F, 0x9F, 0xFF, - 0x98, 0x8A, 0x7E, 0xFF, 0xF7, 0x8D, 0x1F, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x88, 0x17, 0xFA, - 0x26, 0x12, 0x02, 0x9A, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x45, - 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x77, 0x77, 0x77, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x62, 0x62, 0x62, 0xFF, - 0x41, 0x44, 0x45, 0xFF, 0x43, 0x35, 0x29, 0xFF, 0xEE, 0x86, 0x19, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0x8B, 0x52, 0x19, 0xFF, 0x10, 0x1A, 0x20, 0xFF, - 0x27, 0x27, 0x28, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, - 0x44, 0x44, 0x44, 0xFF, 0x50, 0x50, 0x50, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, - 0x68, 0x68, 0x68, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x69, 0x69, 0x69, 0xFF, 0x54, 0x59, 0x5C, 0xFF, 0xC8, 0x7A, 0x2C, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFA, 0x8C, 0x18, 0xFF, - 0x78, 0x61, 0x4C, 0xFF, 0x6C, 0x6F, 0x71, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, - 0x39, 0x39, 0x39, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x40, 0x40, 0x40, 0xFF, - 0x6D, 0x6D, 0x6D, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xB1, 0xB1, 0xB1, 0xFF, 0xA3, 0xA4, 0xA4, 0xFF, 0x8D, 0x8F, 0x90, 0xFF, - 0xDD, 0x89, 0x39, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFA, 0x8C, 0x18, 0xFE, 0x3B, 0x1D, 0x03, 0xA1, - 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x29, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x77, 0x77, 0x77, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, - 0x8D, 0x63, 0x3D, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF3, 0x88, 0x18, 0xFF, - 0x40, 0x2C, 0x1A, 0xFF, 0x1D, 0x20, 0x22, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x39, 0x39, 0x39, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, 0x46, 0x46, 0x46, 0xFF, - 0x4F, 0x4F, 0x4F, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, - 0x6D, 0x6D, 0x6D, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x61, 0x62, 0x62, 0xFF, - 0x55, 0x55, 0x55, 0xFF, 0xDA, 0x80, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF1, 0x88, 0x18, 0xFF, 0x4E, 0x40, 0x34, 0xFF, - 0x3D, 0x3F, 0x40, 0xFF, 0x41, 0x41, 0x41, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x56, 0x56, 0x56, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xA7, 0xA7, 0xA7, 0xFF, 0x8D, 0x92, 0x96, 0xFF, 0xC2, 0x87, 0x52, 0xFF, - 0xFF, 0x8E, 0x10, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFC, 0x8E, 0x18, 0xFF, 0x48, 0x26, 0x05, 0xA6, 0x00, 0x00, 0x00, 0x69, - 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x76, 0x76, 0x76, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x65, 0x64, 0x64, 0xFF, 0x4E, 0x54, 0x58, 0xFF, 0xBF, 0x76, 0x2E, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xC5, 0x72, 0x1E, 0xFF, 0x1E, 0x22, 0x25, 0xFF, - 0x25, 0x25, 0x25, 0xFF, 0x29, 0x29, 0x29, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x2F, 0x30, 0x31, 0xFF, 0x39, 0x31, 0x2B, 0xFF, - 0xE7, 0x83, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xE5, 0x80, 0x17, 0xFF, 0x26, 0x1D, 0x15, 0xFF, 0x1A, 0x1B, 0x1D, 0xFF, - 0x25, 0x25, 0x25, 0xFF, 0x2C, 0x2C, 0x2C, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x50, 0x50, 0x50, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0xA4, 0xA4, 0xA4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0x92, 0x96, 0x9A, 0xFF, 0xAA, 0x86, 0x67, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0x4B, 0x28, 0x05, 0xA7, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x47, - 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x76, 0x76, 0x76, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x5F, 0x60, 0x61, 0xFF, - 0x5A, 0x54, 0x4F, 0xFF, 0xE8, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0x88, 0x5A, 0x31, 0xFF, 0x3F, 0x45, 0x48, 0xFF, 0x51, 0x51, 0x51, 0xFF, - 0x51, 0x51, 0x51, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x29, 0x2B, 0x2D, 0xFF, 0x42, 0x31, 0x25, 0xFF, 0xEF, 0x87, 0x19, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xDA, 0x7B, 0x17, 0xFF, - 0x1E, 0x1B, 0x18, 0xFF, 0x20, 0x20, 0x21, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x30, 0x30, 0x30, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x40, 0x40, 0x40, 0xFF, - 0x5C, 0x5C, 0x5C, 0xFF, 0x81, 0x81, 0x81, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xAA, 0xAA, 0xAA, 0xFF, 0x97, 0x99, 0x9B, 0xFF, - 0x9B, 0x86, 0x74, 0xFF, 0xFB, 0x8D, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, 0x42, 0x22, 0x05, 0xA3, - 0x00, 0x00, 0x00, 0x67, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x28, - 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x75, 0x75, 0x75, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x68, 0x68, 0x68, 0xFF, 0x56, 0x5A, 0x5C, 0xFF, 0x7C, 0x5D, 0x42, 0xFF, - 0xFD, 0x8E, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xEC, 0x86, 0x1C, 0xFF, 0x4F, 0x45, 0x3B, 0xFF, - 0x4C, 0x4D, 0x4E, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x47, 0x47, 0x47, 0xFF, - 0x3E, 0x3E, 0x3E, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x28, 0x2B, 0x2D, 0xFF, - 0x49, 0x36, 0x25, 0xFF, 0xF5, 0x8A, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xD4, 0x77, 0x17, 0xFF, 0x17, 0x18, 0x18, 0xFF, - 0x20, 0x20, 0x20, 0xFF, 0x27, 0x27, 0x27, 0xFF, 0x29, 0x29, 0x29, 0xFF, - 0x2C, 0x2C, 0x2C, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x46, 0x46, 0x46, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xAC, 0xAC, 0xAC, 0xFF, 0x99, 0x9B, 0x9D, 0xFF, 0x92, 0x86, 0x7C, 0xFF, - 0xF3, 0x8C, 0x20, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xF9, 0x8B, 0x18, 0xFE, 0x37, 0x1C, 0x03, 0x9D, 0x00, 0x00, 0x00, 0x64, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x26, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x75, 0x75, 0x75, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x65, 0x65, 0x65, 0xFF, - 0x4E, 0x54, 0x59, 0xFF, 0xAB, 0x6D, 0x33, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xBA, 0x70, 0x26, 0xFF, 0x3A, 0x40, 0x44, 0xFF, 0x54, 0x54, 0x54, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x6D, 0x6D, 0x6D, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x59, 0x59, 0x59, 0xFF, - 0x4F, 0x4F, 0x4F, 0xFF, 0x47, 0x47, 0x47, 0xFF, 0x40, 0x40, 0x40, 0xFF, - 0x3B, 0x3B, 0x3B, 0xFF, 0x39, 0x39, 0x39, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x35, 0x35, 0x35, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x24, 0x28, 0x2B, 0xFF, 0x4F, 0x37, 0x24, 0xFF, - 0xF8, 0x8B, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xCF, 0x75, 0x18, 0xFF, 0x18, 0x1A, 0x1B, 0xFF, 0x2B, 0x2B, 0x2B, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0xA5, 0xA5, 0xA5, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, - 0x9B, 0x9C, 0x9D, 0xFF, 0x8B, 0x86, 0x81, 0xFF, 0xED, 0x8B, 0x26, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xF5, 0x8A, 0x17, 0xFB, - 0x2C, 0x13, 0x02, 0x95, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x3F, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x74, 0x74, 0x74, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x61, 0x61, 0x61, 0xFF, 0x50, 0x51, 0x52, 0xFF, - 0xD7, 0x7F, 0x25, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0x79, 0x54, 0x32, 0xFF, - 0x41, 0x46, 0x49, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x65, 0x65, 0x65, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x64, 0x64, 0x64, 0xFF, - 0x5F, 0x5F, 0x5F, 0xFF, 0x59, 0x59, 0x59, 0xFF, 0x50, 0x50, 0x50, 0xFF, - 0x42, 0x45, 0x47, 0xFF, 0x61, 0x4B, 0x37, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xD1, 0x7A, 0x21, 0xFF, - 0x4C, 0x4E, 0x4F, 0xFF, 0x6E, 0x6F, 0x6F, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0xA4, 0xA4, 0xA4, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, 0x9B, 0x9C, 0x9C, 0xFF, - 0x89, 0x85, 0x82, 0xFF, 0xE9, 0x8A, 0x29, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xE6, 0x80, 0x17, 0xF3, 0x13, 0x06, 0x02, 0x89, - 0x00, 0x00, 0x00, 0x5C, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x20, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x74, 0x74, 0x74, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x59, 0x5B, 0x5D, 0xFF, 0x69, 0x57, 0x48, 0xFF, 0xF5, 0x8B, 0x1A, 0xFF, - 0xFF, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xE5, 0x82, 0x1D, 0xFF, 0x48, 0x42, 0x3E, 0xFF, 0x4D, 0x4D, 0x4E, 0xFF, - 0x5C, 0x5C, 0x5C, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x63, 0x65, 0x67, 0xFF, - 0x70, 0x60, 0x51, 0xFF, 0xF6, 0x8B, 0x1A, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xD5, 0x7C, 0x24, 0xFF, 0x52, 0x55, 0x56, 0xFF, - 0x72, 0x73, 0x73, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, - 0xAF, 0xAF, 0xAF, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, 0x86, 0x84, 0x82, 0xFF, - 0xE7, 0x8A, 0x2C, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xD3, 0x76, 0x14, 0xE8, 0x02, 0x02, 0x00, 0x7D, 0x00, 0x00, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x0E, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x73, 0x73, 0x73, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x50, 0x56, 0x59, 0xFF, - 0x92, 0x65, 0x3B, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xAF, 0x6B, 0x28, 0xFF, - 0x39, 0x3F, 0x45, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x62, 0x64, 0x65, 0xFF, 0x69, 0x5D, 0x51, 0xFF, - 0xF2, 0x89, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xD9, 0x7D, 0x21, 0xFF, 0x50, 0x51, 0x51, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0xAE, 0xAE, 0xAE, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, - 0x98, 0x99, 0x9A, 0xFF, 0x86, 0x83, 0x7F, 0xFF, 0xE9, 0x8A, 0x27, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xB5, 0x66, 0x0E, 0xD8, - 0x00, 0x00, 0x00, 0x71, 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x30, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x73, 0x73, 0x73, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x4C, 0x51, 0x55, 0xFF, 0xC2, 0x76, 0x2C, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0x71, 0x51, 0x33, 0xFF, 0x41, 0x46, 0x49, 0xFF, - 0x58, 0x58, 0x58, 0xFF, 0x64, 0x64, 0x64, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x65, 0x65, 0x66, 0xFF, 0x60, 0x5B, 0x57, 0xFF, 0xE7, 0x85, 0x22, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x80, 0x1E, 0xFF, - 0x52, 0x50, 0x4D, 0xFF, 0x6B, 0x6C, 0x6C, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x9C, 0x9C, 0x9C, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, 0x95, 0x96, 0x97, 0xFF, - 0x86, 0x80, 0x7A, 0xFF, 0xEE, 0x8A, 0x25, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0x84, 0x47, 0x05, 0xBC, 0x00, 0x00, 0x00, 0x67, - 0x00, 0x00, 0x00, 0x47, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x72, 0x72, 0x72, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x5C, 0x5D, 0x5D, 0xFF, - 0x59, 0x52, 0x4D, 0xFF, 0xE8, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x81, 0x1E, 0xFF, - 0x44, 0x40, 0x3D, 0xFF, 0x4C, 0x4D, 0x4E, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, - 0x67, 0x67, 0x67, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x58, 0x5A, 0x5B, 0xFF, 0xD5, 0x7F, 0x29, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xEA, 0x85, 0x1A, 0xFF, 0x58, 0x4F, 0x48, 0xFF, - 0x66, 0x68, 0x68, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0xA9, 0xA9, 0xA9, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0x90, 0x92, 0x93, 0xFF, 0x8C, 0x7E, 0x72, 0xFF, - 0xF5, 0x8C, 0x1D, 0xFF, 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0x4B, 0x25, 0x03, 0x9D, 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x3F, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x72, 0x72, 0x72, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x54, 0x57, 0x5A, 0xFF, 0x7B, 0x5C, 0x41, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xAC, 0x69, 0x28, 0xFF, 0x37, 0x3F, 0x44, 0xFF, - 0x52, 0x52, 0x51, 0xFF, 0x60, 0x60, 0x60, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x56, 0x5B, 0x60, 0xFF, - 0xBC, 0x77, 0x33, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xF7, 0x8A, 0x17, 0xFF, 0x66, 0x52, 0x40, 0xFF, 0x5E, 0x61, 0x63, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, - 0xB1, 0xB1, 0xB1, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, - 0x8A, 0x8D, 0x8F, 0xFF, 0x96, 0x7C, 0x66, 0xFF, 0xFC, 0x8D, 0x17, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xE3, 0x80, 0x15, 0xF1, 0x10, 0x04, 0x02, 0x7F, - 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x36, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x72, 0x72, 0x72, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x62, 0x62, 0x62, 0xFF, - 0x4A, 0x51, 0x56, 0xFF, 0xAB, 0x6D, 0x32, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x16, 0xFF, - 0x72, 0x50, 0x32, 0xFF, 0x40, 0x44, 0x47, 0xFF, 0x56, 0x56, 0x56, 0xFF, - 0x63, 0x63, 0x63, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x59, 0x5F, 0x63, 0xFF, 0x95, 0x6A, 0x42, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0x7E, 0x59, 0x38, 0xFF, 0x55, 0x59, 0x5C, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0xAF, 0xAF, 0xAF, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x80, 0x86, 0x8A, 0xFF, - 0xAB, 0x7D, 0x53, 0xFF, 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xA6, 0x5D, 0x0F, 0xCC, 0x00, 0x00, 0x00, 0x68, 0x00, 0x00, 0x00, 0x49, - 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x71, 0x71, 0x71, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x68, 0x68, 0x68, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x4E, 0x4F, 0x4F, 0xFF, - 0xD8, 0x7F, 0x24, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xE5, 0x83, 0x1C, 0xFF, 0x46, 0x40, 0x3B, 0xFF, - 0x49, 0x4B, 0x4C, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, 0x66, 0x66, 0x66, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x61, 0x63, 0x65, 0xFF, 0x72, 0x60, 0x51, 0xFF, 0xF7, 0x8B, 0x1A, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xA4, 0x67, 0x2E, 0xFF, - 0x49, 0x4F, 0x55, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x9D, 0x9D, 0x9D, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x78, 0x7D, 0x81, 0xFF, 0xC9, 0x81, 0x3D, 0xFF, - 0xFF, 0x8F, 0x13, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0x53, 0x2A, 0x03, 0x9D, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x71, 0x71, 0x71, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x66, 0x66, 0x66, 0xFF, - 0x56, 0x59, 0x5A, 0xFF, 0x69, 0x56, 0x45, 0xFF, 0xF7, 0x8B, 0x1A, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xBB, 0x6F, 0x24, 0xFF, 0x36, 0x3D, 0x40, 0xFF, 0x4F, 0x4F, 0x4F, 0xFF, - 0x5D, 0x5D, 0x5D, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x66, 0x67, 0x67, 0xFF, - 0x59, 0x5B, 0x5C, 0xFF, 0xD4, 0x7F, 0x2B, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xCF, 0x79, 0x22, 0xFF, 0x46, 0x48, 0x4B, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, - 0xAC, 0xAC, 0xAC, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0x8B, 0x8C, 0x8D, 0xFF, - 0x7B, 0x76, 0x71, 0xFF, 0xE9, 0x89, 0x25, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, - 0xD2, 0x76, 0x14, 0xE5, 0x07, 0x02, 0x02, 0x72, 0x00, 0x00, 0x00, 0x4E, - 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x71, 0x71, 0x71, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x62, 0x62, 0x62, 0xFF, 0x4C, 0x51, 0x56, 0xFF, - 0x98, 0x66, 0x37, 0xFF, 0xFF, 0x91, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x8B, 0x5A, 0x2D, 0xFF, - 0x3A, 0x40, 0x45, 0xFF, 0x52, 0x52, 0x52, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0x6A, 0x6A, 0x6A, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x70, 0x70, 0x70, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x58, 0x5D, 0x62, 0xFF, - 0x9B, 0x6C, 0x41, 0xFF, 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xF4, 0x8A, 0x18, 0xFF, 0x5E, 0x4C, 0x3D, 0xFF, 0x57, 0x59, 0x5B, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x7D, 0x81, 0x84, 0xFF, 0x97, 0x76, 0x59, 0xFF, - 0xFE, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x6E, 0x3C, 0x08, 0xAA, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x26, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x5D, 0x5D, 0x5D, 0xFF, 0x49, 0x4D, 0x50, 0xFF, 0xCB, 0x79, 0x28, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xF8, 0x8C, 0x18, 0xFF, 0x60, 0x48, 0x35, 0xFF, 0x42, 0x45, 0x48, 0xFF, - 0x56, 0x56, 0x56, 0xFF, 0x63, 0x63, 0x63, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x6C, 0x6C, 0x6C, 0xFF, 0x63, 0x64, 0x65, 0xFF, 0x66, 0x5D, 0x56, 0xFF, - 0xEB, 0x87, 0x20, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0x9C, 0x63, 0x2D, 0xFF, 0x42, 0x4A, 0x4F, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0xA4, 0xA4, 0xA4, 0xFF, - 0xAE, 0xAE, 0xAE, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xB2, 0xB2, 0xB2, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0x9E, 0x9E, 0x9E, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x6F, 0x73, 0x76, 0xFF, 0xCF, 0x81, 0x35, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xDA, 0x79, 0x16, 0xE8, 0x0B, 0x07, 0x02, 0x72, 0x00, 0x00, 0x00, 0x4C, - 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, 0x70, 0x70, 0x70, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x6D, 0x6D, 0x6D, 0xFF, 0x65, 0x65, 0x65, 0xFF, 0x57, 0x59, 0x5A, 0xFF, - 0x60, 0x52, 0x47, 0xFF, 0xF1, 0x89, 0x1B, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE0, 0x80, 0x1E, 0xFF, - 0x41, 0x3E, 0x3B, 0xFF, 0x49, 0x4B, 0x4B, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, - 0x69, 0x68, 0x68, 0xFF, 0x57, 0x5C, 0x62, 0xFF, 0xA8, 0x70, 0x3C, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xE3, 0x81, 0x1C, 0xFF, - 0x4A, 0x45, 0x3F, 0xFF, 0x57, 0x58, 0x59, 0xFF, 0x71, 0x71, 0x71, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, - 0xAF, 0xAF, 0xAF, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xB2, 0xB2, 0xB2, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x79, 0x7C, 0x7F, 0xFF, 0x88, 0x70, 0x5B, 0xFF, - 0xF9, 0x8D, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x19, 0xFE, 0x5F, 0x32, 0x06, 0x9E, - 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x3C, 0x00, 0x00, 0x00, 0x24, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xBF, 0xBF, 0xBF, 0x48, 0x70, 0x70, 0x70, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x4D, 0x52, 0x57, 0xFF, 0x90, 0x63, 0x38, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xBA, 0x6F, 0x24, 0xFF, 0x35, 0x3B, 0x40, 0xFF, - 0x4E, 0x4F, 0x4F, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x70, 0x70, 0x70, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, - 0x63, 0x64, 0x65, 0xFF, 0x64, 0x5D, 0x57, 0xFF, 0xE7, 0x86, 0x22, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0x9A, 0x61, 0x2A, 0xFF, - 0x3D, 0x45, 0x4B, 0xFF, 0x62, 0x62, 0x61, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, - 0xAF, 0xAF, 0xAF, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xB5, 0xB5, 0xB5, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xAC, 0xAC, 0xAC, 0xFF, - 0xA3, 0xA3, 0xA3, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x83, 0x83, 0x84, 0xFF, - 0x6A, 0x6C, 0x6E, 0xFF, 0xD2, 0x80, 0x30, 0xFF, 0xFF, 0x90, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xB7, 0x66, 0x10, 0xD1, 0x00, 0x00, 0x00, 0x62, 0x00, 0x00, 0x00, 0x46, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x05, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x48, - 0x6F, 0x6F, 0x6F, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x6E, 0x6E, 0x6E, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x5D, 0x5D, 0x5F, 0xFF, - 0x49, 0x4E, 0x51, 0xFF, 0xC6, 0x77, 0x28, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0x8C, 0x5A, 0x2C, 0xFF, 0x39, 0x3F, 0x44, 0xFF, 0x52, 0x52, 0x52, 0xFF, - 0x60, 0x60, 0x60, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, 0x69, 0x69, 0x69, 0xFF, - 0x59, 0x5F, 0x62, 0xFF, 0x8F, 0x69, 0x46, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF2, 0x89, 0x18, 0xFF, 0x61, 0x4B, 0x37, 0xFF, - 0x48, 0x4D, 0x50, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xA7, 0xA7, 0xA7, 0xFF, - 0xAE, 0xAE, 0xAE, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xB4, 0xB4, 0xB4, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x86, 0x86, 0x86, 0xFF, 0x6A, 0x70, 0x74, 0xFF, 0xA1, 0x72, 0x48, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xE6, 0x82, 0x15, 0xEF, 0x28, 0x13, 0x02, 0x7A, - 0x00, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xC1, 0xC1, 0xC1, 0x4A, 0x70, 0x70, 0x70, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x66, 0x66, 0x66, 0xFF, 0x59, 0x5A, 0x5B, 0xFF, 0x5D, 0x51, 0x49, 0xFF, - 0xEE, 0x87, 0x1C, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xF9, 0x8C, 0x18, 0xFF, 0x61, 0x49, 0x33, 0xFF, - 0x42, 0x46, 0x48, 0xFF, 0x57, 0x57, 0x57, 0xFF, 0x63, 0x63, 0x63, 0xFF, - 0x6B, 0x6B, 0x6B, 0xFF, 0x71, 0x71, 0x71, 0xFF, 0x73, 0x73, 0x73, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0x66, 0x67, 0x67, 0xFF, - 0x58, 0x5B, 0x5F, 0xFF, 0xC2, 0x7A, 0x33, 0xFF, 0xFF, 0x91, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xD8, 0x7C, 0x1E, 0xFF, 0x4B, 0x44, 0x3E, 0xFF, - 0x4F, 0x52, 0x54, 0xFF, 0x69, 0x69, 0x69, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0xA6, 0xA6, 0xA6, 0xFF, - 0xAD, 0xAD, 0xAD, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, 0xB3, 0xB3, 0xB3, 0xFF, - 0xAF, 0xAF, 0xAF, 0xFF, 0xA9, 0xA9, 0xA9, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x86, 0x86, 0x86, 0xFF, 0x6D, 0x71, 0x75, 0xFF, - 0x80, 0x69, 0x56, 0xFF, 0xF3, 0x8B, 0x1B, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFC, 0x8E, 0x18, 0xFC, - 0x59, 0x30, 0x05, 0x95, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x3A, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xAD, 0xAD, 0xAD, 0x38, 0x5D, 0x5D, 0x5D, 0xE0, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x6C, 0x6C, 0x6C, 0xE2, - 0x6C, 0x6C, 0x6C, 0xE3, 0x66, 0x66, 0x66, 0xE4, 0x5C, 0x5C, 0x5C, 0xE6, - 0x4A, 0x4E, 0x52, 0xE9, 0x84, 0x5B, 0x39, 0xF4, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xE2, 0x81, 0x1C, 0xFD, 0x3E, 0x39, 0x35, 0xF0, 0x44, 0x45, 0x46, 0xEC, - 0x54, 0x54, 0x54, 0xE8, 0x60, 0x60, 0x60, 0xE5, 0x68, 0x68, 0x68, 0xE4, - 0x6D, 0x6D, 0x6D, 0xE3, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, - 0x64, 0x64, 0x64, 0xE2, 0x64, 0x64, 0x64, 0xE2, 0x6C, 0x6C, 0x6C, 0xE3, - 0x6B, 0x6B, 0x6B, 0xE3, 0x66, 0x66, 0x66, 0xE4, 0x5B, 0x5C, 0x60, 0xE5, - 0x5E, 0x56, 0x51, 0xE7, 0xDA, 0x80, 0x24, 0xF5, 0xFF, 0x91, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xC4, 0x74, 0x22, 0xFF, 0x3D, 0x3D, 0x3D, 0xF6, - 0x4B, 0x4C, 0x4D, 0xF2, 0x61, 0x61, 0x61, 0xF0, 0x71, 0x71, 0x71, 0xED, - 0x80, 0x80, 0x80, 0xEA, 0x8D, 0x8D, 0x8D, 0xE8, 0x96, 0x96, 0x96, 0xE6, - 0x9D, 0x9D, 0x9D, 0xE5, 0xA2, 0xA2, 0xA2, 0xE4, 0xA8, 0xA8, 0xA8, 0xE4, - 0xA9, 0xA9, 0xA9, 0xE3, 0xAB, 0xAB, 0xAB, 0xE3, 0xAC, 0xAC, 0xAC, 0xE3, - 0xAD, 0xAD, 0xAD, 0xE3, 0xAE, 0xAE, 0xAE, 0xE2, 0xAF, 0xAF, 0xAF, 0xE2, - 0xAE, 0xAE, 0xAE, 0xE2, 0xAD, 0xAD, 0xAD, 0xE3, 0xAC, 0xAC, 0xAC, 0xE3, - 0xAB, 0xAB, 0xAB, 0xE3, 0xAA, 0xAA, 0xAA, 0xE3, 0xA9, 0xA9, 0xA9, 0xE3, - 0xA4, 0xA4, 0xA4, 0xE4, 0xA0, 0xA0, 0xA0, 0xE5, 0x99, 0x99, 0x99, 0xE6, - 0x91, 0x91, 0x91, 0xE7, 0x87, 0x87, 0x87, 0xE9, 0x7A, 0x7A, 0x7A, 0xEB, - 0x63, 0x66, 0x69, 0xEC, 0x70, 0x61, 0x55, 0xF5, 0xE6, 0x86, 0x23, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0x88, 0x4A, 0x07, 0xAF, 0x00, 0x00, 0x00, 0x55, - 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x18, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x05, 0x80, 0x80, 0x80, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x02, - 0x8E, 0x8E, 0x8E, 0x12, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x33, 0x33, 0x33, 0x14, 0x1D, 0x1D, 0x1D, 0x1A, - 0x0D, 0x0D, 0x0D, 0x26, 0x0D, 0x0D, 0x0D, 0x3A, 0x03, 0x03, 0x03, 0x4F, - 0xA9, 0x5E, 0x12, 0xC1, 0xFF, 0x93, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xAD, 0x60, 0x0E, 0xD4, - 0x02, 0x02, 0x02, 0x7B, 0x03, 0x03, 0x03, 0x5E, 0x0C, 0x0C, 0x0C, 0x41, - 0x0C, 0x0C, 0x0C, 0x2B, 0x1A, 0x1A, 0x1A, 0x1D, 0x23, 0x23, 0x23, 0x16, - 0x80, 0x80, 0x80, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, 0x8C, 0x8C, 0x8C, 0x14, - 0x80, 0x80, 0x80, 0x14, 0x24, 0x24, 0x24, 0x15, 0x21, 0x21, 0x21, 0x17, - 0x1A, 0x1A, 0x1A, 0x1D, 0x0D, 0x0D, 0x0D, 0x27, 0x05, 0x0A, 0x0A, 0x32, - 0x3F, 0x21, 0x05, 0x5D, 0xEA, 0x83, 0x17, 0xE8, 0xFF, 0x91, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xB6, 0x67, 0x13, 0xE7, 0x0F, 0x06, 0x04, 0xAC, - 0x02, 0x03, 0x03, 0x93, 0x06, 0x06, 0x06, 0x7E, 0x0A, 0x0A, 0x0A, 0x69, - 0x0C, 0x0C, 0x0C, 0x56, 0x12, 0x12, 0x12, 0x46, 0x16, 0x16, 0x16, 0x3A, - 0x1B, 0x1B, 0x1B, 0x30, 0x1E, 0x1E, 0x1E, 0x2A, 0x1C, 0x1C, 0x1C, 0x24, - 0x1F, 0x1F, 0x1F, 0x21, 0x21, 0x21, 0x21, 0x1F, 0x23, 0x23, 0x23, 0x1D, - 0x24, 0x24, 0x24, 0x1C, 0x24, 0x24, 0x24, 0x1C, 0x24, 0x24, 0x24, 0x1C, - 0x23, 0x23, 0x23, 0x1D, 0x22, 0x22, 0x22, 0x1E, 0x1F, 0x1F, 0x1F, 0x21, - 0x1C, 0x1C, 0x1C, 0x24, 0x1A, 0x1A, 0x1A, 0x27, 0x1C, 0x1C, 0x1C, 0x2E, - 0x18, 0x18, 0x18, 0x36, 0x14, 0x14, 0x14, 0x40, 0x10, 0x10, 0x10, 0x4E, - 0x0B, 0x0B, 0x0B, 0x5F, 0x02, 0x07, 0x07, 0x6E, 0x35, 0x1D, 0x0A, 0x96, - 0xD9, 0x7B, 0x19, 0xEC, 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x9A, 0x55, 0x0B, 0xBA, - 0x00, 0x00, 0x00, 0x58, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x2B, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x2D, 0x06, 0x03, 0x00, 0x50, 0xDB, 0x7B, 0x14, 0xE2, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0x64, 0x35, 0x04, 0xAE, 0x00, 0x00, 0x00, 0x6A, - 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x20, - 0x47, 0x23, 0x03, 0x5E, 0xEA, 0x85, 0x17, 0xEE, 0xFF, 0x91, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xBC, 0x6A, 0x12, 0xE6, 0x20, 0x0E, 0x02, 0xAA, - 0x00, 0x00, 0x00, 0x8C, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x64, - 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x3C, - 0x00, 0x00, 0x00, 0x4A, 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x69, - 0x48, 0x26, 0x03, 0x99, 0xE1, 0x7F, 0x14, 0xED, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xA4, 0x5B, 0x0D, 0xBF, 0x03, 0x03, 0x00, 0x59, 0x00, 0x00, 0x00, 0x41, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1C, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x55, 0x55, 0x55, 0x03, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x33, - 0x39, 0x1E, 0x05, 0x6F, 0xFA, 0x8D, 0x18, 0xFB, 0xFE, 0x8F, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xEE, 0x85, 0x19, 0xF8, - 0x22, 0x0F, 0x02, 0x97, 0x00, 0x00, 0x00, 0x6A, 0x00, 0x00, 0x00, 0x48, - 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x07, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x1D, - 0x4C, 0x30, 0x16, 0xA5, 0xE5, 0x83, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xDE, 0x7D, 0x16, 0xF3, 0x52, 0x2A, 0x05, 0xBB, - 0x00, 0x00, 0x00, 0x94, 0x00, 0x00, 0x00, 0x84, 0x00, 0x00, 0x00, 0x74, - 0x00, 0x00, 0x00, 0x64, 0x00, 0x00, 0x00, 0x56, 0x00, 0x00, 0x00, 0x4B, - 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x35, - 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x2F, - 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x31, 0x00, 0x00, 0x00, 0x34, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x3F, 0x00, 0x00, 0x00, 0x48, - 0x00, 0x00, 0x00, 0x52, 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x69, - 0x04, 0x02, 0x02, 0x7C, 0x84, 0x49, 0x0A, 0xBA, 0xF6, 0x8A, 0x17, 0xFA, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0x94, 0x53, 0x09, 0xB3, 0x03, 0x03, 0x00, 0x56, - 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x35, 0x74, 0x40, 0x05, 0x93, - 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xD0, 0x73, 0x12, 0xE9, 0x02, 0x02, 0x00, 0x8C, - 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00, 0x28, - 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x07, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x12, 0x03, 0x0B, 0x10, 0x60, - 0x49, 0x37, 0x2B, 0xFF, 0xD0, 0x78, 0x1D, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFB, 0x8E, 0x18, 0xFD, 0xA7, 0x5E, 0x0F, 0xDA, - 0x2B, 0x15, 0x02, 0xA8, 0x00, 0x00, 0x00, 0x8C, 0x00, 0x00, 0x00, 0x80, - 0x00, 0x00, 0x00, 0x75, 0x00, 0x00, 0x00, 0x6B, 0x00, 0x00, 0x00, 0x61, - 0x00, 0x00, 0x00, 0x5A, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00, 0x50, - 0x00, 0x00, 0x00, 0x4E, 0x00, 0x00, 0x00, 0x4D, 0x00, 0x00, 0x00, 0x4D, - 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x58, - 0x00, 0x00, 0x00, 0x5E, 0x00, 0x00, 0x00, 0x65, 0x00, 0x00, 0x00, 0x6C, - 0x02, 0x02, 0x00, 0x7B, 0x59, 0x2F, 0x05, 0xA4, 0xCC, 0x73, 0x13, 0xE3, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xF7, 0x8B, 0x1A, 0xF8, 0x7F, 0x44, 0x08, 0xA1, - 0x00, 0x00, 0x00, 0x4F, 0x00, 0x00, 0x00, 0x3D, 0x00, 0x00, 0x00, 0x2B, - 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x37, 0xA9, 0x5E, 0x0F, 0xB8, 0xFF, 0x93, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xB6, 0x65, 0x10, 0xDC, 0x00, 0x00, 0x00, 0x86, 0x00, 0x00, 0x00, 0x65, - 0x00, 0x00, 0x00, 0x43, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x13, - 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0B, 0x07, 0x07, 0x07, 0x24, 0x25, 0x28, 0x2D, 0xE3, - 0x34, 0x30, 0x2B, 0xFF, 0xAA, 0x65, 0x20, 0xFF, 0xFB, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xEE, 0x85, 0x19, 0xF8, - 0xA7, 0x5D, 0x0D, 0xD6, 0x49, 0x27, 0x04, 0xAC, 0x05, 0x04, 0x02, 0x90, - 0x00, 0x00, 0x00, 0x81, 0x00, 0x00, 0x00, 0x79, 0x00, 0x00, 0x00, 0x74, - 0x00, 0x00, 0x00, 0x6F, 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x6A, - 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x69, 0x00, 0x00, 0x00, 0x6A, - 0x00, 0x00, 0x00, 0x6C, 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x78, - 0x28, 0x10, 0x04, 0x8D, 0x73, 0x3F, 0x07, 0xB1, 0xCA, 0x72, 0x13, 0xE1, - 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xD8, 0x7A, 0x14, 0xE1, - 0x4B, 0x26, 0x04, 0x7E, 0x00, 0x00, 0x00, 0x46, 0x00, 0x00, 0x00, 0x38, - 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x22, 0x04, 0x04, 0x00, 0x3C, - 0xD3, 0x76, 0x14, 0xD6, 0xFF, 0x91, 0x19, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xC7, 0x6D, 0x13, 0xE2, - 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x00, 0x40, - 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x06, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x04, 0x25, 0x25, 0x25, 0xA0, 0x2F, 0x30, 0x31, 0xFF, - 0x22, 0x28, 0x2D, 0xFF, 0x6C, 0x47, 0x26, 0xFF, 0xDB, 0x7D, 0x1C, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFC, 0x8D, 0x18, 0xFE, 0xDB, 0x7A, 0x14, 0xED, 0xA6, 0x5C, 0x0D, 0xD1, - 0x77, 0x3F, 0x08, 0xB9, 0x4D, 0x2A, 0x05, 0xA5, 0x34, 0x19, 0x02, 0x98, - 0x27, 0x10, 0x04, 0x91, 0x1D, 0x0B, 0x04, 0x8D, 0x22, 0x0E, 0x04, 0x8E, - 0x2F, 0x17, 0x02, 0x92, 0x46, 0x22, 0x05, 0x9C, 0x65, 0x36, 0x04, 0xAB, - 0x95, 0x51, 0x0B, 0xC2, 0xC4, 0x6E, 0x0F, 0xDD, 0xEF, 0x86, 0x19, 0xF6, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xF7, 0x8A, 0x18, 0xF8, - 0x9E, 0x57, 0x0D, 0xB2, 0x19, 0x0B, 0x03, 0x5D, 0x00, 0x00, 0x00, 0x3E, - 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x1E, 0x1E, 0x0B, 0x04, 0x44, 0xEC, 0x85, 0x14, 0xED, - 0xFF, 0x90, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF3, 0x88, 0x18, 0xF8, 0x2C, 0x15, 0x04, 0x85, - 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x23, - 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x14, 0x14, 0x14, 0x4C, 0x34, 0x34, 0x34, 0xFE, 0x31, 0x31, 0x31, 0xFF, - 0x25, 0x2B, 0x2F, 0xFF, 0x32, 0x2F, 0x2B, 0xFF, 0x89, 0x56, 0x22, 0xFC, - 0xE4, 0x80, 0x19, 0xEC, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x91, 0x19, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF7, 0x8B, 0x17, 0xFB, 0xF1, 0x87, 0x18, 0xF8, - 0xEE, 0x85, 0x17, 0xF6, 0xEF, 0x86, 0x19, 0xF8, 0xF5, 0x89, 0x17, 0xFA, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFB, 0x8E, 0x18, 0xFB, - 0xBC, 0x69, 0x0F, 0xC7, 0x41, 0x22, 0x02, 0x72, 0x00, 0x00, 0x00, 0x42, - 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x2A, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x17, - 0x41, 0x22, 0x06, 0x52, 0xFD, 0x8F, 0x18, 0xFD, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0x98, 0x55, 0x09, 0xB2, 0x00, 0x00, 0x00, 0x47, - 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x06, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x14, 0x14, 0x14, 0x0D, - 0x32, 0x32, 0x32, 0xD6, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x2F, 0x30, 0x30, 0xFF, 0x22, 0x29, 0x2F, 0xFE, 0x2A, 0x21, 0x14, 0x8D, - 0x78, 0x42, 0x04, 0x7B, 0xCD, 0x72, 0x11, 0xCD, 0xFC, 0x8E, 0x18, 0xFB, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xEE, 0x86, 0x17, 0xF0, - 0xAB, 0x5F, 0x0F, 0xB9, 0x44, 0x24, 0x07, 0x71, 0x00, 0x00, 0x00, 0x44, - 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x21, - 0x00, 0x00, 0x00, 0x17, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x02, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x11, 0x4A, 0x27, 0x04, 0x48, - 0xFA, 0x8C, 0x1A, 0xF4, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x95, 0x19, 0xFF, - 0xD6, 0x78, 0x14, 0xD6, 0x04, 0x04, 0x04, 0x3E, 0x00, 0x00, 0x00, 0x28, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x05, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x1A, 0x1A, 0x1A, 0x80, - 0x37, 0x37, 0x37, 0xFF, 0x34, 0x34, 0x34, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x32, 0x32, 0x32, 0xFF, 0x24, 0x24, 0x26, 0xC5, 0x00, 0x00, 0x00, 0x1F, - 0x05, 0x05, 0x00, 0x31, 0x45, 0x24, 0x03, 0x5D, 0x8C, 0x4C, 0x09, 0x94, - 0xC7, 0x70, 0x10, 0xCA, 0xEF, 0x86, 0x17, 0xEF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFD, 0x8F, 0x18, 0xFD, 0xE7, 0x81, 0x17, 0xE9, 0xBA, 0x69, 0x0E, 0xC3, - 0x6F, 0x3B, 0x07, 0x8A, 0x22, 0x11, 0x03, 0x5A, 0x00, 0x00, 0x00, 0x3D, - 0x00, 0x00, 0x00, 0x33, 0x00, 0x00, 0x00, 0x2C, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x16, 0x4A, 0x27, 0x03, 0x4F, - 0xB7, 0x67, 0x0E, 0xB0, 0xDB, 0x7B, 0x16, 0xD5, 0xD9, 0x79, 0x16, 0xD5, - 0xC3, 0x6D, 0x11, 0xC5, 0x93, 0x53, 0x0C, 0x9A, 0x31, 0x1A, 0x03, 0x4E, - 0x00, 0x00, 0x00, 0x29, 0x00, 0x00, 0x00, 0x1D, 0x00, 0x00, 0x00, 0x12, - 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x04, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x65, 0x65, 0x65, 0x26, 0x2F, 0x2F, 0x2F, 0xF3, - 0x36, 0x36, 0x36, 0xFF, 0x35, 0x35, 0x35, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x35, 0x35, 0x35, 0xFA, 0x0B, 0x0B, 0x0B, 0x45, 0x00, 0x00, 0x00, 0x15, - 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x31, - 0x1F, 0x11, 0x03, 0x49, 0x4E, 0x2A, 0x05, 0x68, 0x7E, 0x43, 0x05, 0x8C, - 0xA3, 0x5A, 0x0D, 0xAC, 0xBD, 0x6A, 0x12, 0xC1, 0xD0, 0x73, 0x14, 0xD4, - 0xE1, 0x7E, 0x14, 0xE2, 0xE5, 0x80, 0x15, 0xE8, 0xE9, 0x82, 0x15, 0xEC, - 0xEE, 0x85, 0x17, 0xEF, 0xEB, 0x83, 0x15, 0xEE, 0xE5, 0x7F, 0x15, 0xE9, - 0xE2, 0x7E, 0x15, 0xE4, 0xD5, 0x77, 0x14, 0xD9, 0xBD, 0x69, 0x12, 0xC4, - 0xA1, 0x59, 0x0D, 0xAE, 0x7A, 0x43, 0x0B, 0x90, 0x47, 0x26, 0x05, 0x6C, - 0x13, 0x0A, 0x03, 0x4F, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x32, - 0x00, 0x00, 0x00, 0x2D, 0x00, 0x00, 0x00, 0x27, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x0B, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x1B, - 0x06, 0x06, 0x06, 0x2A, 0x06, 0x06, 0x06, 0x2E, 0x00, 0x00, 0x00, 0x2A, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x06, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x32, 0x32, 0x32, 0xA8, 0x36, 0x36, 0x36, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x26, 0x26, 0x26, 0x9C, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x1B, 0x00, 0x00, 0x00, 0x1F, - 0x00, 0x00, 0x00, 0x22, 0x00, 0x00, 0x00, 0x25, 0x00, 0x00, 0x00, 0x2A, - 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x38, 0x0C, 0x04, 0x04, 0x41, - 0x12, 0x07, 0x04, 0x46, 0x15, 0x0A, 0x03, 0x4A, 0x24, 0x10, 0x03, 0x4E, - 0x1A, 0x0D, 0x03, 0x4D, 0x11, 0x07, 0x03, 0x49, 0x0B, 0x07, 0x04, 0x45, - 0x04, 0x04, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x37, 0x00, 0x00, 0x00, 0x31, - 0x00, 0x00, 0x00, 0x2E, 0x00, 0x00, 0x00, 0x2B, 0x00, 0x00, 0x00, 0x29, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x19, - 0x00, 0x00, 0x00, 0x13, 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x16, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x03, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x70, 0x70, 0x70, 0x40, 0x2F, 0x2F, 0x2F, 0xFC, 0x37, 0x37, 0x37, 0xFF, - 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xFF, 0x36, 0x36, 0x36, 0xEE, - 0x07, 0x07, 0x07, 0x23, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x13, - 0x00, 0x00, 0x00, 0x16, 0x00, 0x00, 0x00, 0x19, 0x00, 0x00, 0x00, 0x1C, - 0x00, 0x00, 0x00, 0x1F, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x24, - 0x00, 0x00, 0x00, 0x24, 0x00, 0x00, 0x00, 0x23, 0x00, 0x00, 0x00, 0x22, - 0x00, 0x00, 0x00, 0x21, 0x00, 0x00, 0x00, 0x1E, 0x00, 0x00, 0x00, 0x1B, - 0x00, 0x00, 0x00, 0x18, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x07, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x0A, - 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x03, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x03, - 0x2B, 0x2B, 0x2B, 0xBD, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, 0x33, 0x33, 0x33, 0x92, - 0x00, 0x00, 0x00, 0x00, 0x80, 0x80, 0x80, 0x02, 0x00, 0x00, 0x00, 0x03, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x00, 0x0A, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00, 0x0D, - 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x12, 0x00, 0x00, 0x00, 0x11, - 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x0F, - 0x00, 0x00, 0x00, 0x0D, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x04, - 0x00, 0x00, 0x00, 0x03, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, - 0x80, 0x80, 0x80, 0x02, 0x55, 0x55, 0x55, 0x03, 0x55, 0x55, 0x55, 0x03, - 0x80, 0x80, 0x80, 0x02, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x61, 0x61, 0x61, 0x4C, - 0x30, 0x30, 0x30, 0xFE, 0x37, 0x37, 0x37, 0xFF, 0x37, 0x37, 0x37, 0xFF, - 0x34, 0x34, 0x34, 0xFF, 0x3A, 0x3A, 0x3A, 0x92, 0xFF, 0xFF, 0xFF, 0x02, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0xFF, 0xFF, 0xFF, 0x01, 0x80, 0x80, 0x80, 0x02, - 0x55, 0x55, 0x55, 0x03, 0x40, 0x40, 0x40, 0x04, 0x40, 0x40, 0x40, 0x04, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x05, 0x40, 0x40, 0x40, 0x04, 0x55, 0x55, 0x55, 0x03, - 0x55, 0x55, 0x55, 0x03, 0x80, 0x80, 0x80, 0x02, 0xFF, 0xFF, 0xFF, 0x01, - 0xFF, 0xFF, 0xFF, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0xBF, 0xBF, 0xBF, 0x04, 0x2C, 0x2C, 0x2C, 0xC0, - 0x36, 0x36, 0x36, 0xFF, 0x2F, 0x2F, 0x2F, 0xE9, 0x3C, 0x3C, 0x3C, 0x6B, - 0xFF, 0xFF, 0xFF, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x6A, 0x6A, 0x6A, 0x35, 0x33, 0x33, 0x33, 0x7D, - 0x79, 0x79, 0x79, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, -}; - diff --git a/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c b/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c deleted file mode 100644 index 807f7ec09..000000000 --- a/BasiliskII/src/Unix/BasiliskII_32x32x32_icon.c +++ /dev/null @@ -1,353 +0,0 @@ -/* GIMP RGBA C-Source image dump (BasiliskII_32x32x32_icon.c) */ - -static const struct { - unsigned int width; - unsigned int height; - unsigned int bytes_per_pixel; /* 2:RGB16, 3:RGB, 4:RGBA */ - unsigned char pixel_data[32 * 32 * 4 + 1]; -} icon_32x32x32 = { - 32, 32, 4, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x03, 0x03, 0x03, 0x00, - 0x0A, 0x0A, 0x0A, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, - 0x0C, 0x0C, 0x0C, 0x00, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x19, 0x19, 0x19, 0x00, - 0x2C, 0x2C, 0x2C, 0x00, 0x27, 0x27, 0x27, 0x00, 0x1A, 0x1A, 0x1A, 0x00, - 0x13, 0x13, 0x13, 0x00, 0x11, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, - 0x12, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, 0x12, 0x12, 0x12, 0x00, - 0x12, 0x12, 0x13, 0x00, 0x19, 0x19, 0x1A, 0x00, 0x21, 0x21, 0x22, 0x00, - 0x37, 0x38, 0x38, 0x00, 0x37, 0x38, 0x38, 0x00, 0x37, 0x37, 0x38, 0x00, - 0x1E, 0x1E, 0x1E, 0x00, 0x0F, 0x0F, 0x0F, 0x00, 0x0A, 0x0A, 0x0A, 0x09, - 0x26, 0x26, 0x26, 0x57, 0x1C, 0x1D, 0x1F, 0x07, 0x1A, 0x1D, 0x21, 0x0A, - 0x04, 0x08, 0x0D, 0x11, 0x04, 0x08, 0x0C, 0x12, 0x20, 0x23, 0x26, 0x0C, - 0x25, 0x26, 0x28, 0x05, 0x24, 0x24, 0x24, 0x00, 0x12, 0x12, 0x12, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x2B, 0x2B, 0x2B, 0x03, 0x0A, 0x0C, 0x0E, 0x19, - 0x07, 0x08, 0x08, 0x39, 0x06, 0x06, 0x06, 0x41, 0x06, 0x05, 0x04, 0x42, - 0x06, 0x05, 0x04, 0x44, 0x07, 0x06, 0x04, 0x45, 0x07, 0x06, 0x04, 0x46, - 0x07, 0x06, 0x04, 0x46, 0x06, 0x05, 0x04, 0x45, 0x05, 0x05, 0x04, 0x43, - 0x05, 0x05, 0x05, 0x40, 0x05, 0x06, 0x07, 0x3C, 0x07, 0x09, 0x0C, 0x38, - 0x07, 0x09, 0x0C, 0x37, 0x08, 0x09, 0x0C, 0x35, 0x07, 0x08, 0x09, 0x1E, - 0x16, 0x16, 0x16, 0x00, 0x27, 0x29, 0x2A, 0x86, 0x22, 0x25, 0x29, 0xD5, - 0x1B, 0x0F, 0x03, 0x5B, 0x4C, 0x29, 0x04, 0x8A, 0x66, 0x39, 0x08, 0xA2, - 0x60, 0x36, 0x08, 0x9F, 0x3B, 0x20, 0x02, 0x86, 0x0F, 0x07, 0x00, 0x5C, - 0x00, 0x00, 0x04, 0x2C, 0x17, 0x18, 0x19, 0x0A, 0x26, 0x26, 0x26, 0x00, - 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0F, 0x81, 0x48, 0x0B, 0x9F, 0xC0, 0x6E, 0x11, 0xE1, - 0xC4, 0x6E, 0x12, 0xE6, 0xC7, 0x70, 0x12, 0xE7, 0xC9, 0x71, 0x12, 0xE9, - 0xCA, 0x72, 0x12, 0xE9, 0xCB, 0x73, 0x12, 0xEA, 0xCB, 0x72, 0x12, 0xEA, - 0xC9, 0x71, 0x12, 0xE9, 0xC6, 0x70, 0x12, 0xE7, 0xC2, 0x6D, 0x11, 0xE5, - 0xBC, 0x69, 0x11, 0xE2, 0xB4, 0x63, 0x10, 0xDF, 0xB3, 0x63, 0x10, 0xDE, - 0xBA, 0x69, 0x10, 0xDD, 0x43, 0x23, 0x02, 0x6E, 0x00, 0x06, 0x0C, 0x4D, - 0x33, 0x2E, 0x28, 0xF6, 0x93, 0x55, 0x12, 0xD2, 0xDF, 0x7D, 0x10, 0xEB, - 0xBF, 0x6A, 0x0C, 0xD0, 0x9D, 0x55, 0x08, 0xAF, 0xA7, 0x5B, 0x09, 0xB4, - 0xD1, 0x73, 0x0E, 0xDC, 0xDD, 0x7C, 0x10, 0xF0, 0x80, 0x48, 0x0B, 0xC0, - 0x0A, 0x04, 0x00, 0x5E, 0x0D, 0x0E, 0x0F, 0x13, 0x31, 0x31, 0x31, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x01, 0x00, 0x1D, - 0xCF, 0x74, 0x14, 0xD9, 0xFF, 0x97, 0x1A, 0xFF, 0xFF, 0x93, 0x17, 0xFF, - 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x92, 0x17, 0xFF, - 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x92, 0x17, 0xFF, - 0xFF, 0x92, 0x16, 0xFF, 0xFF, 0x93, 0x16, 0xFF, 0xFF, 0x93, 0x17, 0xFF, - 0xFF, 0x94, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFA, 0x8F, 0x1A, 0xFF, - 0x3D, 0x2C, 0x1B, 0x91, 0x2E, 0x27, 0x21, 0xD8, 0xCD, 0x77, 0x19, 0xFF, - 0xF1, 0x8E, 0x1F, 0xFC, 0x71, 0x52, 0x32, 0xA1, 0x3B, 0x3A, 0x3A, 0x4F, - 0x3D, 0x41, 0x45, 0x3B, 0x3E, 0x41, 0x45, 0x3B, 0x46, 0x41, 0x3C, 0x52, - 0x9C, 0x6C, 0x37, 0xB1, 0xFF, 0x96, 0x1D, 0xFF, 0xBE, 0x6C, 0x11, 0xE6, - 0x19, 0x11, 0x09, 0x70, 0x13, 0x14, 0x15, 0x0F, 0x17, 0x17, 0x17, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x02, 0x01, 0x00, 0x1E, 0xCC, 0x73, 0x13, 0xD8, - 0xF5, 0x8C, 0x19, 0xFC, 0xDD, 0x84, 0x26, 0xFD, 0xE2, 0x88, 0x2A, 0xFF, - 0xE3, 0x88, 0x28, 0xFF, 0xE4, 0x88, 0x28, 0xFF, 0xE4, 0x88, 0x27, 0xFF, - 0xE5, 0x89, 0x27, 0xFF, 0xE4, 0x88, 0x28, 0xFF, 0xE0, 0x88, 0x2B, 0xFF, - 0xE0, 0x88, 0x2B, 0xFF, 0xE2, 0x88, 0x29, 0xFF, 0xE3, 0x86, 0x22, 0xFF, - 0xFF, 0x8F, 0x15, 0xFF, 0xBE, 0x7B, 0x35, 0xFE, 0x44, 0x49, 0x4D, 0xFE, - 0xBD, 0x6E, 0x19, 0xFF, 0xFD, 0x90, 0x17, 0xFF, 0xA9, 0x90, 0x76, 0xFE, - 0xC1, 0xC6, 0xCC, 0xF9, 0xDA, 0xDA, 0xDA, 0xFC, 0xDD, 0xDD, 0xDD, 0xFD, - 0xDD, 0xDD, 0xDD, 0xFD, 0xD9, 0xDA, 0xDB, 0xFB, 0xC5, 0xCB, 0xD2, 0xF8, - 0xD4, 0x9D, 0x65, 0xFF, 0xFF, 0x94, 0x14, 0xFF, 0xA8, 0x62, 0x18, 0xE1, - 0x00, 0x00, 0x00, 0x3D, 0x20, 0x20, 0x21, 0x02, 0x02, 0x02, 0x02, 0x00, - 0x00, 0x00, 0x00, 0x1B, 0xCD, 0x73, 0x12, 0xD6, 0x7C, 0x4A, 0x15, 0xBC, - 0x73, 0x76, 0x79, 0xEC, 0x90, 0x90, 0x8F, 0xFF, 0x8F, 0x8E, 0x8D, 0xFF, - 0x8F, 0x8D, 0x8C, 0xFF, 0x8F, 0x8D, 0x8B, 0xFF, 0x8F, 0x8D, 0x8B, 0xFF, - 0x8F, 0x8D, 0x8C, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x86, 0x88, 0x8B, 0xFF, 0x92, 0x73, 0x52, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, - 0x71, 0x5F, 0x4D, 0xFF, 0x70, 0x4D, 0x28, 0xFF, 0xFF, 0x92, 0x13, 0xFF, - 0xCD, 0x82, 0x33, 0xFF, 0xA8, 0xAC, 0xB1, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD8, 0xD9, 0xFF, 0xC0, 0xB7, 0xAD, 0xFF, - 0xF5, 0x8E, 0x20, 0xFF, 0xF8, 0x8B, 0x15, 0xFE, 0x2B, 0x16, 0x02, 0x7D, - 0x1A, 0x1D, 0x20, 0x0A, 0x0A, 0x0A, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x13, - 0xBF, 0x6A, 0x0D, 0xC8, 0x4E, 0x32, 0x13, 0x7E, 0x85, 0x88, 0x8C, 0xE7, - 0x9D, 0x9D, 0x9E, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, 0x9B, 0x9B, 0x9C, 0xFF, - 0x9B, 0x9B, 0x9C, 0xFF, 0x9A, 0x9B, 0x9B, 0xFF, 0x9D, 0x9E, 0x9E, 0xFF, - 0x9D, 0x9E, 0x9E, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, 0x85, 0x88, 0x8B, 0xFF, - 0xD5, 0x84, 0x2F, 0xFF, 0xD4, 0x82, 0x2A, 0xFF, 0x3B, 0x40, 0x46, 0xFF, - 0xB7, 0x6B, 0x1A, 0xFF, 0xFF, 0x92, 0x13, 0xFF, 0xB1, 0x7E, 0x4A, 0xFF, - 0xB5, 0xBA, 0xBF, 0xFF, 0xDC, 0xDC, 0xDC, 0xFF, 0xD7, 0xD7, 0xD7, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xC0, 0xC0, 0xC1, 0xFF, 0xE6, 0x90, 0x33, 0xFF, - 0xFF, 0x93, 0x15, 0xFF, 0x62, 0x37, 0x09, 0xA4, 0x01, 0x02, 0x04, 0x12, - 0x01, 0x01, 0x01, 0x00, 0x25, 0x25, 0x25, 0x04, 0x3E, 0x30, 0x22, 0x24, - 0x2D, 0x2A, 0x26, 0x29, 0x8E, 0x8E, 0x8E, 0xE9, 0x9A, 0x9A, 0x9A, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x94, 0x97, 0x9A, 0xFF, 0x90, 0x7C, 0x68, 0xFF, 0xFC, 0x8D, 0x16, 0xFF, - 0x89, 0x67, 0x44, 0xFF, 0x32, 0x35, 0x38, 0xFF, 0xDB, 0x80, 0x1F, 0xFF, - 0xFF, 0x90, 0x13, 0xFF, 0xAA, 0x7B, 0x49, 0xFF, 0xB1, 0xB6, 0xBB, 0xFF, - 0xA5, 0xA5, 0xA5, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD4, 0xD5, 0xD5, 0xFF, - 0xBE, 0xBF, 0xC1, 0xFF, 0xE2, 0x8F, 0x37, 0xFF, 0xFF, 0x94, 0x15, 0xFF, - 0x6D, 0x3C, 0x0A, 0xAA, 0x02, 0x04, 0x07, 0x12, 0x02, 0x02, 0x02, 0x00, - 0x12, 0x12, 0x12, 0x00, 0x23, 0x25, 0x27, 0x00, 0x39, 0x3A, 0x3A, 0x15, - 0x99, 0x99, 0x99, 0xEA, 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x98, 0x98, 0x98, 0xFF, - 0x4B, 0x4B, 0x4B, 0xFF, 0x58, 0x58, 0x58, 0xFF, 0x89, 0x8E, 0x93, 0xFF, - 0xBD, 0x7F, 0x3D, 0xFF, 0xE6, 0x87, 0x20, 0xFF, 0x4A, 0x48, 0x46, 0xFF, - 0x57, 0x57, 0x57, 0xFF, 0xEE, 0x94, 0x34, 0xFF, 0xFF, 0x90, 0x12, 0xFF, - 0xBA, 0x79, 0x33, 0xFF, 0x95, 0x9B, 0xA0, 0xFF, 0x46, 0x46, 0x46, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xD3, 0xD3, 0xD4, 0xFF, 0xB6, 0xB5, 0xB3, 0xFF, - 0xE9, 0x8C, 0x2A, 0xFF, 0xFF, 0x92, 0x16, 0xFF, 0x4E, 0x2A, 0x04, 0x8C, - 0x18, 0x1C, 0x20, 0x09, 0x0A, 0x0A, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x9A, 0x9A, 0x9A, 0xEA, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x96, 0x96, 0x96, 0xFF, 0x4B, 0x4B, 0x4B, 0xFF, - 0x56, 0x57, 0x58, 0xFF, 0x86, 0x80, 0x7B, 0xFF, 0xEE, 0x89, 0x1D, 0xFF, - 0xA5, 0x71, 0x3A, 0xFF, 0x34, 0x39, 0x3E, 0xFF, 0x93, 0x96, 0x9A, 0xFF, - 0xE3, 0x9B, 0x4F, 0xFF, 0xFF, 0x8E, 0x11, 0xFF, 0xEE, 0x87, 0x1A, 0xFF, - 0x82, 0x71, 0x5F, 0xFF, 0x33, 0x38, 0x3D, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0xD8, 0xD8, 0xD8, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xCA, 0xCD, 0xD0, 0xFF, 0xB1, 0x9E, 0x8A, 0xFF, 0xFA, 0x8D, 0x18, 0xFF, - 0xE3, 0x7E, 0x13, 0xF0, 0x14, 0x0B, 0x01, 0x4B, 0x29, 0x2A, 0x2B, 0x01, - 0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x26, 0x26, 0x26, 0x17, 0x98, 0x98, 0x98, 0xEA, 0x92, 0x92, 0x92, 0xFF, - 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, 0x92, 0x92, 0x92, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x5A, 0x5E, 0x63, 0xFF, - 0xA1, 0x7C, 0x55, 0xFF, 0xF5, 0x8A, 0x18, 0xFF, 0x66, 0x5A, 0x4D, 0xFF, - 0x45, 0x47, 0x49, 0xFF, 0xC1, 0xC4, 0xC8, 0xFF, 0xC8, 0xA8, 0x88, 0xFF, - 0xFD, 0x8C, 0x13, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xDF, 0x82, 0x1E, 0xFF, - 0x4C, 0x37, 0x20, 0xFF, 0x6C, 0x72, 0x77, 0xFF, 0xC8, 0xC9, 0xCA, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCE, 0xCE, 0xCF, 0xFF, 0xA9, 0xAE, 0xB4, 0xFF, - 0xCF, 0x89, 0x41, 0xFF, 0xFF, 0x92, 0x14, 0xFF, 0x85, 0x5A, 0x2E, 0xC0, - 0x0E, 0x11, 0x14, 0x0F, 0x1E, 0x1E, 0x1E, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, - 0x95, 0x95, 0x95, 0xEA, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x90, 0x90, 0x90, 0xFF, 0x7C, 0x7F, 0x82, 0xFF, 0xD2, 0x82, 0x2C, 0xFF, - 0xC9, 0x7D, 0x2C, 0xFF, 0x46, 0x49, 0x4E, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xBE, 0xC0, 0xC1, 0xFF, 0xE0, 0x95, 0x45, 0xFF, - 0xFF, 0x8D, 0x11, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xF3, 0x8A, 0x19, 0xFF, - 0xA5, 0x72, 0x3D, 0xFF, 0x83, 0x7F, 0x7A, 0xFF, 0x99, 0x9E, 0xA3, 0xFF, - 0x9A, 0x9D, 0xA1, 0xFF, 0xBE, 0x89, 0x52, 0xFF, 0xF8, 0x8B, 0x15, 0xFF, - 0xC8, 0x97, 0x63, 0xFF, 0x72, 0x75, 0x78, 0xAC, 0x2A, 0x2A, 0x2A, 0x00, - 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, 0x93, 0x93, 0x93, 0xEA, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x89, 0x8B, 0x8D, 0xFF, - 0x84, 0x76, 0x67, 0xFF, 0xF5, 0x8A, 0x17, 0xFF, 0x8C, 0x6D, 0x4B, 0xFF, - 0x3F, 0x42, 0x46, 0xFF, 0x8B, 0x8B, 0x8B, 0xFF, 0xD2, 0xD1, 0xD1, 0xFF, - 0xC9, 0xCB, 0xCD, 0xFF, 0xBD, 0xB5, 0xAD, 0xFF, 0xE7, 0x92, 0x37, 0xFF, - 0xFF, 0x8D, 0x11, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, - 0xE1, 0x83, 0x1C, 0xFF, 0xAF, 0x73, 0x34, 0xFF, 0xC5, 0x7B, 0x2D, 0xFF, - 0xCB, 0x7B, 0x23, 0xFF, 0xA6, 0x8E, 0x76, 0xFF, 0xBA, 0xBE, 0xC2, 0xFF, - 0xAA, 0xAA, 0xAA, 0xA8, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x25, 0x25, 0x25, 0x17, 0x91, 0x91, 0x91, 0xEA, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8B, 0x8B, 0x8A, 0xFF, 0x7C, 0x81, 0x86, 0xFF, 0xAA, 0x78, 0x43, 0xFF, - 0xE6, 0x84, 0x1B, 0xFF, 0x6A, 0x66, 0x63, 0xFF, 0x40, 0x41, 0x42, 0xFF, - 0xA6, 0xA6, 0xA6, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, 0xCA, 0xC9, 0xC9, 0xFF, - 0xC7, 0xC9, 0xCB, 0xFF, 0xBB, 0xB7, 0xB3, 0xFF, 0xCE, 0x95, 0x58, 0xFF, - 0xF1, 0x8A, 0x1C, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xAB, 0x6C, 0x29, 0xFF, - 0x7A, 0x73, 0x6B, 0xFF, 0xA3, 0xA7, 0xAC, 0xFF, 0x90, 0x90, 0x91, 0xA9, - 0x1D, 0x1D, 0x1D, 0x00, 0x02, 0x02, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x25, 0x25, 0x25, 0x17, - 0x8E, 0x8E, 0x8E, 0xEA, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x88, 0x88, 0xFF, - 0x75, 0x75, 0x76, 0xFF, 0xDF, 0x84, 0x23, 0xFF, 0xB2, 0x73, 0x30, 0xFF, - 0x64, 0x69, 0x6E, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC5, 0xC5, 0xC6, 0xFF, - 0xA8, 0xAE, 0xB4, 0xFF, 0x8D, 0x86, 0x7F, 0xFF, 0xC8, 0x7C, 0x2B, 0xFF, - 0xF0, 0x8B, 0x1E, 0xFF, 0xF1, 0x8B, 0x20, 0xFF, 0xFF, 0x8D, 0x12, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xEA, 0x85, 0x19, 0xFF, - 0xA6, 0x77, 0x46, 0xFF, 0x50, 0x51, 0x52, 0xB8, 0x18, 0x19, 0x19, 0x09, - 0x1A, 0x1A, 0x1A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x8C, 0x8C, 0x8C, 0xEA, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x7F, 0x82, 0x85, 0xFF, 0x86, 0x70, 0x59, 0xFF, - 0xF8, 0x8A, 0x15, 0xFF, 0x7E, 0x66, 0x4D, 0xFF, 0x6B, 0x6E, 0x71, 0xFF, - 0x38, 0x38, 0x38, 0xFF, 0x53, 0x53, 0x53, 0xFF, 0x56, 0x56, 0x56, 0xFF, - 0x54, 0x55, 0x56, 0xFF, 0x50, 0x4F, 0x4E, 0xFF, 0xA5, 0x71, 0x3A, 0xFF, - 0xEF, 0x8A, 0x1A, 0xFF, 0xD0, 0x8A, 0x3F, 0xFF, 0xA6, 0x9D, 0x94, 0xFF, - 0xB2, 0xA8, 0x9E, 0xFF, 0xCC, 0x99, 0x64, 0xFF, 0xF0, 0x8E, 0x25, 0xFF, - 0xFF, 0x8D, 0x12, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x91, 0x16, 0xFF, - 0xA3, 0x60, 0x1A, 0xE2, 0x01, 0x00, 0x00, 0x4C, 0x13, 0x13, 0x14, 0x07, - 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x24, 0x24, 0x24, 0x17, 0x89, 0x89, 0x89, 0xEA, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x72, 0x77, 0x7C, 0xFF, 0xB7, 0x79, 0x37, 0xFF, 0xDE, 0x80, 0x1C, 0xFF, - 0x66, 0x66, 0x65, 0xFF, 0x78, 0x78, 0x79, 0xFF, 0x55, 0x55, 0x55, 0xFF, - 0x4F, 0x4F, 0x4F, 0xFF, 0x4D, 0x4E, 0x4F, 0xFF, 0x40, 0x3F, 0x3E, 0xFF, - 0xAF, 0x66, 0x18, 0xFF, 0xFF, 0x90, 0x10, 0xFF, 0xC5, 0x85, 0x41, 0xFF, - 0xA0, 0xA3, 0xA7, 0xFF, 0xC0, 0xC2, 0xC4, 0xFF, 0xC3, 0xC4, 0xC6, 0xFF, - 0xBA, 0xBF, 0xC5, 0xFF, 0xB6, 0xAE, 0xA6, 0xFF, 0xD4, 0x94, 0x52, 0xFF, - 0xFD, 0x8D, 0x15, 0xFF, 0xFE, 0x8E, 0x17, 0xFF, 0xFF, 0x93, 0x18, 0xFF, - 0x6B, 0x3C, 0x09, 0xB6, 0x02, 0x03, 0x05, 0x27, 0x0F, 0x0F, 0x0F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, - 0x87, 0x87, 0x87, 0xEA, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x7F, 0x7F, 0x7F, 0xFF, 0x7D, 0x7E, 0x7F, 0xFF, 0x73, 0x6F, 0x6B, 0xFF, - 0xEA, 0x87, 0x1D, 0xFF, 0xA4, 0x6D, 0x32, 0xFF, 0x69, 0x6E, 0x73, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x75, 0x78, 0x7D, 0xFF, 0xA7, 0x75, 0x40, 0xFF, 0xFF, 0x92, 0x14, 0xFF, - 0xE1, 0x85, 0x23, 0xFF, 0x94, 0x92, 0x8E, 0xFF, 0xBF, 0xC0, 0xC1, 0xFF, - 0xC4, 0xC4, 0xC4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xC4, 0xC4, 0xC4, 0xFF, - 0xB9, 0xBA, 0xBC, 0xFF, 0xB4, 0xB9, 0xBE, 0xFF, 0xC6, 0x98, 0x69, 0xFF, - 0xFC, 0x8D, 0x16, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xE2, 0x7F, 0x15, 0xF6, - 0x13, 0x0B, 0x01, 0x62, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x24, 0x24, 0x24, 0x17, 0x85, 0x85, 0x85, 0xEA, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x72, 0x72, 0x72, 0xFF, - 0x3C, 0x40, 0x43, 0xFF, 0x76, 0x58, 0x39, 0xFF, 0xF9, 0x8B, 0x16, 0xFF, - 0x71, 0x5F, 0x4B, 0xFF, 0x78, 0x7B, 0x7D, 0xFF, 0x81, 0x81, 0x81, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x7F, 0x7F, 0x80, 0xFF, 0x72, 0x6E, 0x6B, 0xFF, - 0xE4, 0x85, 0x1F, 0xFF, 0xFF, 0x90, 0x12, 0xFF, 0xB0, 0x7E, 0x49, 0xFF, - 0xA9, 0xAF, 0xB4, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x5A, 0x5A, 0x5A, 0xFF, 0x61, 0x61, 0x61, 0xFF, - 0xC2, 0xC2, 0xC3, 0xFF, 0xB0, 0xB4, 0xB9, 0xFF, 0xD7, 0x90, 0x46, 0xFF, - 0xFF, 0x8E, 0x13, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x4E, 0x2B, 0x07, 0x96, - 0x00, 0x00, 0x00, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x23, 0x23, 0x23, 0x17, 0x83, 0x83, 0x83, 0xEA, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x55, 0x5A, 0x5F, 0xFF, - 0xAC, 0x6A, 0x23, 0xFF, 0xCD, 0x75, 0x17, 0xFF, 0x31, 0x32, 0x33, 0xFF, - 0x4E, 0x4E, 0x4E, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x69, 0x6B, 0x6E, 0xFF, 0x7C, 0x67, 0x51, 0xFF, 0xFB, 0x8C, 0x17, 0xFF, - 0xFE, 0x8D, 0x15, 0xFF, 0x83, 0x67, 0x49, 0xFF, 0x74, 0x77, 0x7B, 0xFF, - 0x64, 0x64, 0x64, 0xFF, 0x48, 0x48, 0x48, 0xFF, 0x47, 0x47, 0x47, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0xAB, 0xAB, 0xAB, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBA, 0xBE, 0xC2, 0xFF, 0xB6, 0x9B, 0x7E, 0xFF, 0xFC, 0x8C, 0x15, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0x72, 0x3F, 0x0B, 0xAE, 0x00, 0x00, 0x00, 0x1D, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x17, - 0x81, 0x81, 0x81, 0xEA, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x7A, 0x7B, 0xFF, 0x6E, 0x6B, 0x69, 0xFF, 0xE7, 0x87, 0x20, 0xFF, - 0x95, 0x65, 0x32, 0xFF, 0x54, 0x58, 0x5D, 0xFF, 0x55, 0x55, 0x55, 0xFF, - 0x48, 0x48, 0x48, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0x38, 0x3B, 0x3F, 0xFF, - 0x6C, 0x4C, 0x2B, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xFA, 0x8C, 0x17, 0xFF, - 0x57, 0x42, 0x2C, 0xFF, 0x51, 0x54, 0x57, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0xB8, 0xB8, 0xB8, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBC, 0xBE, 0xC0, 0xFF, - 0xAC, 0xA0, 0x94, 0xFF, 0xF4, 0x8B, 0x1D, 0xFF, 0xFF, 0x94, 0x18, 0xFF, - 0x72, 0x3F, 0x0B, 0xAB, 0x00, 0x00, 0x00, 0x1A, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x17, 0x7F, 0x7F, 0x7F, 0xEA, - 0x77, 0x77, 0x77, 0xFF, 0x77, 0x77, 0x77, 0xFF, 0x72, 0x75, 0x78, 0xFF, - 0x7F, 0x69, 0x52, 0xFF, 0xED, 0x86, 0x18, 0xFF, 0x69, 0x5B, 0x4E, 0xFF, - 0x73, 0x75, 0x77, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x6E, 0x72, 0x75, 0xFF, 0x89, 0x6C, 0x4E, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xF8, 0x8A, 0x15, 0xFF, 0x8B, 0x76, 0x60, 0xFF, - 0xB2, 0xB5, 0xB7, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBC, 0xBD, 0xFF, 0xA8, 0x9E, 0x94, 0xFF, - 0xF2, 0x8B, 0x1E, 0xFF, 0xFF, 0x93, 0x18, 0xFF, 0x54, 0x2F, 0x08, 0x8F, - 0x00, 0x00, 0x00, 0x0E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x23, 0x23, 0x23, 0x17, 0x7E, 0x7E, 0x7E, 0xEA, 0x75, 0x75, 0x75, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x69, 0x6E, 0x73, 0xFF, 0xA7, 0x72, 0x3A, 0xFF, - 0xCC, 0x79, 0x20, 0xFF, 0x5A, 0x5D, 0x60, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x74, 0x76, 0x78, 0xFF, 0x7B, 0x6D, 0x5F, 0xFF, 0xF5, 0x8B, 0x1A, 0xFF, - 0xFE, 0x8E, 0x14, 0xFF, 0x90, 0x70, 0x4E, 0xFF, 0xA2, 0xA6, 0xAA, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xB6, 0xB8, 0xBB, 0xFF, 0xA6, 0x92, 0x7E, 0xFF, 0xFB, 0x8D, 0x18, 0xFF, - 0xEF, 0x86, 0x16, 0xF9, 0x1D, 0x0F, 0x01, 0x58, 0x19, 0x19, 0x19, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x23, 0x23, 0x23, 0x18, - 0x7D, 0x7D, 0x7D, 0xF1, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x77, 0x77, 0xFF, - 0x66, 0x68, 0x6A, 0xFF, 0xD5, 0x7F, 0x24, 0xFF, 0x9E, 0x6A, 0x31, 0xFF, - 0x62, 0x67, 0x6C, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x76, 0xFF, - 0x6B, 0x6D, 0x70, 0xFF, 0xCE, 0x81, 0x30, 0xFF, 0xFF, 0x93, 0x13, 0xFF, - 0xB5, 0x73, 0x2C, 0xFF, 0x7F, 0x84, 0x8A, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xA0, 0xA6, 0xAD, 0xFF, - 0xBD, 0x85, 0x4A, 0xFF, 0xFF, 0x95, 0x15, 0xFF, 0x94, 0x53, 0x0D, 0xBC, - 0x05, 0x08, 0x0A, 0x1C, 0x29, 0x29, 0x29, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x22, 0x22, 0x22, 0x11, 0x75, 0x75, 0x75, 0xAD, - 0x6C, 0x6C, 0x6C, 0xBD, 0x62, 0x63, 0x65, 0xBC, 0x61, 0x53, 0x44, 0xD3, - 0xF2, 0x89, 0x18, 0xFF, 0x64, 0x4B, 0x2F, 0xD8, 0x55, 0x58, 0x5C, 0xBE, - 0x6D, 0x6D, 0x6D, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, - 0x6C, 0x6C, 0x6C, 0xBD, 0x6C, 0x6C, 0x6C, 0xBD, 0x64, 0x66, 0x69, 0xBD, - 0x66, 0x53, 0x40, 0xC1, 0xED, 0x86, 0x16, 0xF2, 0xF9, 0x8E, 0x17, 0xFF, - 0x82, 0x61, 0x3E, 0xF6, 0x66, 0x6C, 0x72, 0xD2, 0x86, 0x87, 0x89, 0xC2, - 0x8D, 0x8D, 0x8E, 0xBD, 0x8D, 0x8E, 0x8E, 0xBC, 0x89, 0x8B, 0x8C, 0xBE, - 0x75, 0x7B, 0x81, 0xC6, 0x8F, 0x75, 0x5B, 0xED, 0xF9, 0x91, 0x1C, 0xFF, - 0xD3, 0x77, 0x12, 0xE4, 0x13, 0x09, 0x00, 0x44, 0x2B, 0x2C, 0x2E, 0x02, - 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x0D, 0x0D, 0x0D, 0x00, 0x0C, 0x0C, 0x0C, 0x00, - 0x08, 0x09, 0x0A, 0x00, 0x5F, 0x35, 0x08, 0x78, 0xE8, 0x82, 0x15, 0xFB, - 0x0D, 0x06, 0x00, 0x56, 0x30, 0x31, 0x31, 0x00, 0x0D, 0x0D, 0x0D, 0x00, - 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, - 0x0C, 0x0C, 0x0C, 0x00, 0x10, 0x10, 0x10, 0x00, 0x23, 0x26, 0x29, 0x00, - 0x4B, 0x2E, 0x11, 0x7A, 0xE6, 0x87, 0x1B, 0xFF, 0xF8, 0x8C, 0x14, 0xFD, - 0x75, 0x40, 0x08, 0xBC, 0x19, 0x0D, 0x01, 0x69, 0x02, 0x00, 0x00, 0x42, - 0x02, 0x01, 0x00, 0x3D, 0x19, 0x0D, 0x01, 0x57, 0x6C, 0x3C, 0x08, 0xA3, - 0xF0, 0x88, 0x14, 0xF8, 0xC9, 0x73, 0x12, 0xDA, 0x22, 0x13, 0x03, 0x4E, - 0x22, 0x25, 0x27, 0x05, 0x1D, 0x1D, 0x1D, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0C, 0x0D, 0x0E, 0x00, - 0x85, 0x49, 0x0A, 0x93, 0xEC, 0x85, 0x15, 0xF8, 0x14, 0x09, 0x00, 0x49, - 0x3B, 0x3C, 0x3D, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x15, 0x15, 0x15, 0x00, 0x1E, 0x22, 0x26, 0x1F, - 0x41, 0x36, 0x2B, 0xF1, 0x96, 0x59, 0x16, 0xC9, 0xDC, 0x7C, 0x11, 0xDF, - 0xDD, 0x7C, 0x12, 0xF1, 0xC9, 0x70, 0x12, 0xE7, 0xC9, 0x70, 0x12, 0xE6, - 0xDC, 0x7C, 0x13, 0xEE, 0xD4, 0x77, 0x12, 0xE0, 0x76, 0x42, 0x09, 0x92, - 0x13, 0x0C, 0x07, 0x2C, 0x1A, 0x1C, 0x1F, 0x02, 0x1E, 0x1E, 0x1E, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x25, 0x26, 0x26, 0x00, 0x30, 0x26, 0x1C, 0x1F, - 0x3C, 0x28, 0x12, 0x3F, 0x26, 0x24, 0x21, 0x13, 0x24, 0x24, 0x24, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x04, 0x03, 0x03, 0x00, 0x38, 0x3A, 0x3C, 0xAC, - 0x23, 0x27, 0x2B, 0xAE, 0x21, 0x1C, 0x17, 0x15, 0x3E, 0x2C, 0x17, 0x3D, - 0x41, 0x25, 0x08, 0x54, 0x3F, 0x23, 0x06, 0x55, 0x35, 0x23, 0x10, 0x40, - 0x18, 0x15, 0x13, 0x1D, 0x13, 0x17, 0x1B, 0x03, 0x1E, 0x1F, 0x20, 0x00, - 0x0B, 0x0B, 0x0A, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x03, 0x03, 0x03, 0x00, 0x18, 0x19, 0x1A, 0x00, 0x0D, 0x0F, 0x12, 0x00, - 0x21, 0x21, 0x22, 0x00, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x20, 0x20, 0x20, 0x2C, 0x2D, 0x2D, 0x2D, 0x52, - 0x1A, 0x1B, 0x1C, 0x00, 0x15, 0x17, 0x19, 0x00, 0x00, 0x00, 0x02, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x0B, 0x0D, 0x10, 0x00, 0x13, 0x14, 0x15, 0x00, - 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00 - }; - diff --git a/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c b/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c deleted file mode 100644 index 93e594e65..000000000 --- a/BasiliskII/src/Unix/BasiliskII_48x48x32_icon.c +++ /dev/null @@ -1,779 +0,0 @@ -/* GIMP C-Source image dump */ - -static const struct { - unsigned int width; - unsigned int height; - unsigned int bytes_per_pixel; /* 1:Grayscale, 3:RGB, 4:RGBA */ - unsigned char pixel_data[48 * 48 * 4 + 1]; -} icon_48x48x48 = { - 48, 48, 4, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0B, 0x0B, 0x0B, 0x00, - 0x07, 0x07, 0x07, 0x00, 0x06, 0x06, 0x06, 0x00, 0x05, 0x05, 0x05, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, 0x04, 0x04, 0x04, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x05, 0x05, 0x05, 0x00, 0x06, 0x06, 0x06, 0x00, - 0x06, 0x06, 0x06, 0x00, 0x0A, 0x0A, 0x0A, 0x00, 0x0B, 0x0B, 0x0B, 0x00, - 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, 0x0B, 0x0B, 0x0B, 0x00, - 0x08, 0x08, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x07, 0x07, 0x07, 0x02, 0x0E, 0x0E, 0x0E, 0x09, - 0x1B, 0x1B, 0x1B, 0x00, 0x3B, 0x3B, 0x3B, 0x00, 0x38, 0x38, 0x38, 0x01, - 0x1B, 0x1B, 0x1B, 0x02, 0x17, 0x17, 0x17, 0x03, 0x18, 0x18, 0x18, 0x03, - 0x30, 0x30, 0x30, 0x01, 0x57, 0x57, 0x57, 0x00, 0x23, 0x23, 0x23, 0x00, - 0x21, 0x21, 0x21, 0x00, 0x05, 0x05, 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x3A, 0x3A, 0x3A, 0x00, 0x3A, 0x3A, 0x3A, 0x01, 0x5C, 0x5C, 0x5C, 0x03, - 0x3B, 0x3B, 0x3B, 0x05, 0x2D, 0x2D, 0x2D, 0x05, 0x2C, 0x2C, 0x2C, 0x06, - 0x1F, 0x1F, 0x1F, 0x06, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, - 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, - 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, 0x1F, 0x1F, 0x1F, 0x07, - 0x1E, 0x1E, 0x1E, 0x06, 0x25, 0x25, 0x25, 0x06, 0x2F, 0x2F, 0x2F, 0x05, - 0x2E, 0x2E, 0x2E, 0x05, 0x52, 0x52, 0x52, 0x04, 0x5C, 0x5C, 0x5C, 0x04, - 0x5C, 0x5C, 0x5C, 0x04, 0x5C, 0x5C, 0x5C, 0x04, 0x5C, 0x5C, 0x5C, 0x04, - 0x43, 0x43, 0x43, 0x03, 0x20, 0x20, 0x20, 0x01, 0x23, 0x23, 0x23, 0x00, - 0x02, 0x02, 0x02, 0x00, 0x3C, 0x3C, 0x3C, 0x73, 0x32, 0x32, 0x32, 0xBB, - 0x1C, 0x1C, 0x1C, 0x15, 0x05, 0x06, 0x07, 0x13, 0x00, 0x02, 0x04, 0x20, - 0x00, 0x00, 0x02, 0x27, 0x00, 0x00, 0x01, 0x2A, 0x00, 0x00, 0x01, 0x29, - 0x00, 0x01, 0x04, 0x23, 0x06, 0x06, 0x07, 0x1B, 0x17, 0x17, 0x17, 0x11, - 0x25, 0x25, 0x25, 0x07, 0x36, 0x36, 0x36, 0x02, 0x23, 0x23, 0x23, 0x00, - 0x07, 0x07, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x33, 0x33, 0x33, 0x02, 0x05, 0x06, 0x07, 0x0D, 0x00, 0x00, 0x00, 0x1E, - 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x37, - 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x3A, - 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, - 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x3A, - 0x00, 0x00, 0x00, 0x39, 0x00, 0x00, 0x00, 0x38, 0x00, 0x00, 0x00, 0x36, - 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x32, 0x00, 0x00, 0x00, 0x30, - 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x2F, 0x00, 0x00, 0x00, 0x2C, - 0x00, 0x00, 0x00, 0x1E, 0x09, 0x09, 0x09, 0x0D, 0x1B, 0x1B, 0x1B, 0x00, - 0x23, 0x23, 0x23, 0x40, 0x37, 0x37, 0x37, 0xF8, 0x20, 0x23, 0x26, 0xD1, - 0x00, 0x00, 0x00, 0x46, 0x0E, 0x07, 0x01, 0x5E, 0x31, 0x1B, 0x04, 0x7E, - 0x45, 0x27, 0x06, 0x90, 0x48, 0x29, 0x06, 0x93, 0x3E, 0x23, 0x05, 0x8D, - 0x27, 0x15, 0x03, 0x7E, 0x09, 0x05, 0x00, 0x68, 0x00, 0x00, 0x00, 0x4E, - 0x00, 0x00, 0x00, 0x34, 0x00, 0x00, 0x00, 0x1A, 0x1A, 0x1A, 0x1A, 0x08, - 0x3B, 0x3B, 0x3B, 0x01, 0x1A, 0x1A, 0x1A, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x08, 0x0F, 0x08, 0x01, 0x34, 0x57, 0x30, 0x07, 0x8C, - 0x5F, 0x35, 0x07, 0xA9, 0x65, 0x39, 0x08, 0xB1, 0x6A, 0x3C, 0x09, 0xB4, - 0x6E, 0x3E, 0x09, 0xB7, 0x71, 0x40, 0x09, 0xB9, 0x73, 0x41, 0x09, 0xBA, - 0x74, 0x42, 0x0A, 0xBA, 0x75, 0x42, 0x0A, 0xBC, 0x75, 0x42, 0x0A, 0xBC, - 0x75, 0x42, 0x0A, 0xBB, 0x73, 0x41, 0x0A, 0xBA, 0x71, 0x40, 0x09, 0xB9, - 0x6D, 0x3D, 0x09, 0xB7, 0x69, 0x3B, 0x08, 0xB4, 0x63, 0x37, 0x08, 0xB1, - 0x5C, 0x33, 0x07, 0xAD, 0x52, 0x2D, 0x07, 0xA9, 0x4B, 0x28, 0x07, 0xA4, - 0x4C, 0x29, 0x07, 0xA4, 0x4E, 0x2A, 0x07, 0xA5, 0x53, 0x2E, 0x07, 0xA0, - 0x2E, 0x19, 0x05, 0x6E, 0x00, 0x00, 0x00, 0x1D, 0x04, 0x04, 0x04, 0x1A, - 0x2B, 0x2C, 0x2C, 0xD9, 0x20, 0x24, 0x27, 0xEE, 0x3B, 0x22, 0x0B, 0x95, - 0x9A, 0x57, 0x0D, 0xC1, 0xE3, 0x81, 0x16, 0xF3, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xDA, 0x7C, 0x14, 0xF0, 0x96, 0x55, 0x0D, 0xCD, - 0x3B, 0x20, 0x05, 0x99, 0x00, 0x00, 0x00, 0x5D, 0x00, 0x00, 0x00, 0x2F, - 0x05, 0x05, 0x05, 0x0F, 0x47, 0x47, 0x47, 0x02, 0x1F, 0x1F, 0x1F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0C, 0x63, 0x37, 0x09, 0x7E, 0xFF, 0x96, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x91, 0x18, 0xFF, 0xFF, 0x98, 0x19, 0xFF, - 0x8F, 0x4F, 0x0C, 0xB4, 0x00, 0x00, 0x00, 0x23, 0x1C, 0x1E, 0x20, 0xA3, - 0x2B, 0x2A, 0x29, 0xFF, 0x91, 0x56, 0x17, 0xE7, 0xF7, 0x8B, 0x16, 0xF6, - 0xFF, 0x95, 0x17, 0xFF, 0xBE, 0x6B, 0x0F, 0xD1, 0x68, 0x39, 0x06, 0x8C, - 0x40, 0x21, 0x01, 0x64, 0x37, 0x1B, 0x00, 0x5B, 0x4D, 0x29, 0x02, 0x69, - 0x81, 0x47, 0x09, 0x97, 0xD6, 0x77, 0x11, 0xDB, 0xFF, 0x96, 0x18, 0xFF, - 0xFA, 0x8E, 0x17, 0xFE, 0x9C, 0x57, 0x0F, 0xD5, 0x15, 0x0B, 0x02, 0x7F, - 0x00, 0x00, 0x00, 0x3A, 0x03, 0x03, 0x03, 0x10, 0x4A, 0x4A, 0x4A, 0x02, - 0x14, 0x14, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x10, 0x7A, 0x45, 0x0B, 0x94, 0xFF, 0x94, 0x19, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xF6, 0x8B, 0x17, 0xFC, - 0x3D, 0x24, 0x0C, 0x83, 0x0C, 0x0F, 0x13, 0x74, 0x2D, 0x2A, 0x27, 0xFD, - 0xB3, 0x6A, 0x1A, 0xFF, 0xFF, 0x94, 0x17, 0xFF, 0xF1, 0x8A, 0x18, 0xF9, - 0x6C, 0x42, 0x15, 0x9E, 0x17, 0x16, 0x14, 0x41, 0x15, 0x19, 0x1E, 0x21, - 0x1E, 0x21, 0x25, 0x17, 0x29, 0x2C, 0x2F, 0x15, 0x20, 0x23, 0x27, 0x15, - 0x14, 0x18, 0x1C, 0x1B, 0x27, 0x21, 0x1B, 0x38, 0x8A, 0x55, 0x1B, 0xA0, - 0xFB, 0x8E, 0x18, 0xFC, 0xFF, 0x95, 0x19, 0xFF, 0xC7, 0x70, 0x12, 0xEA, - 0x21, 0x14, 0x07, 0x8D, 0x00, 0x00, 0x02, 0x39, 0x0E, 0x0E, 0x0E, 0x0B, - 0x30, 0x30, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x10, 0x7D, 0x46, 0x0B, 0x98, 0xFF, 0x94, 0x19, 0xFF, - 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x91, 0x16, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xC1, 0x78, 0x2B, 0xFD, - 0x5A, 0x5D, 0x61, 0xEB, 0x2E, 0x30, 0x32, 0xF8, 0xA9, 0x64, 0x1A, 0xFF, - 0xFF, 0x93, 0x17, 0xFF, 0xF8, 0x8C, 0x18, 0xFF, 0xA4, 0x83, 0x62, 0xFA, - 0x9B, 0xA0, 0xA7, 0xE6, 0xBF, 0xC0, 0xC1, 0xE3, 0xCC, 0xCC, 0xCC, 0xE2, - 0xD0, 0xD0, 0xD0, 0xE2, 0xD7, 0xD7, 0xD7, 0xE2, 0xD2, 0xD2, 0xD2, 0xE2, - 0xCC, 0xCC, 0xCC, 0xE2, 0xC5, 0xC6, 0xC7, 0xE1, 0xAC, 0xB2, 0xB8, 0xE3, - 0xCB, 0x9A, 0x67, 0xFC, 0xFE, 0x8D, 0x13, 0xFF, 0xFF, 0x93, 0x17, 0xFF, - 0xCB, 0x7A, 0x24, 0xF9, 0x15, 0x12, 0x11, 0x83, 0x00, 0x00, 0x00, 0x22, - 0x27, 0x27, 0x27, 0x04, 0x12, 0x12, 0x12, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0F, 0x7B, 0x45, 0x0B, 0x96, 0xFF, 0x96, 0x19, 0xFF, - 0xE8, 0x82, 0x15, 0xF3, 0xB9, 0x74, 0x2B, 0xF2, 0xBF, 0x81, 0x41, 0xFF, - 0xC3, 0x83, 0x40, 0xFF, 0xC7, 0x83, 0x3D, 0xFF, 0xC7, 0x83, 0x3D, 0xFF, - 0xC7, 0x83, 0x3C, 0xFF, 0xC8, 0x84, 0x3C, 0xFF, 0xC9, 0x83, 0x3B, 0xFF, - 0xCA, 0x84, 0x3A, 0xFF, 0xCB, 0x84, 0x3B, 0xFF, 0xC7, 0x83, 0x3C, 0xFF, - 0xC1, 0x82, 0x41, 0xFF, 0xBD, 0x82, 0x44, 0xFF, 0xC1, 0x82, 0x41, 0xFF, - 0xC5, 0x83, 0x3E, 0xFF, 0xC4, 0x80, 0x39, 0xFF, 0xC9, 0x7B, 0x2A, 0xFF, - 0xFC, 0x8E, 0x18, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, 0x85, 0x6B, 0x50, 0xFF, - 0x41, 0x4A, 0x52, 0xFF, 0x76, 0x4B, 0x1C, 0xFF, 0xFF, 0x92, 0x18, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xBC, 0x80, 0x40, 0xFF, 0x9B, 0xA1, 0xA6, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, - 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, - 0xD9, 0xD9, 0xD9, 0xFF, 0xD9, 0xD9, 0xD9, 0xFF, 0xD5, 0xD6, 0xD7, 0xFF, - 0xB8, 0xB9, 0xB9, 0xFF, 0xE5, 0x90, 0x37, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0x71, 0x3F, 0x0B, 0xBF, 0x00, 0x00, 0x00, 0x45, - 0x0F, 0x0F, 0x0F, 0x0E, 0x25, 0x25, 0x25, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0F, 0x71, 0x3F, 0x0A, 0x8C, 0xFF, 0x97, 0x19, 0xFF, - 0x61, 0x34, 0x08, 0xA7, 0x4A, 0x51, 0x59, 0xC9, 0x88, 0x8D, 0x92, 0xFF, - 0x88, 0x8D, 0x92, 0xFF, 0x88, 0x8C, 0x91, 0xFF, 0x88, 0x8C, 0x90, 0xFF, - 0x87, 0x8B, 0x90, 0xFF, 0x87, 0x8B, 0x90, 0xFF, 0x87, 0x8B, 0x8F, 0xFF, - 0x87, 0x8B, 0x8F, 0xFF, 0x87, 0x8B, 0x8F, 0xFF, 0x87, 0x8B, 0x90, 0xFF, - 0x88, 0x8D, 0x91, 0xFF, 0x89, 0x8D, 0x92, 0xFF, 0x89, 0x8D, 0x92, 0xFF, - 0x88, 0x8C, 0x90, 0xFF, 0x70, 0x79, 0x82, 0xFF, 0x90, 0x6B, 0x45, 0xFF, - 0xFF, 0x91, 0x13, 0xFF, 0xD3, 0x7F, 0x27, 0xFF, 0x5B, 0x5C, 0x5F, 0xFF, - 0x39, 0x32, 0x2C, 0xFF, 0xE1, 0x80, 0x18, 0xFF, 0xFF, 0x90, 0x17, 0xFF, - 0xF3, 0x89, 0x19, 0xFF, 0x8F, 0x80, 0x70, 0xFF, 0xB8, 0xBB, 0xBD, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xD6, 0xD6, 0xD6, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, 0xD7, 0xD7, 0xD6, 0xFF, - 0xC4, 0xC9, 0xCE, 0xFF, 0xC5, 0x9C, 0x70, 0xFF, 0xFE, 0x8D, 0x12, 0xFF, - 0xFF, 0x91, 0x19, 0xFF, 0xD6, 0x78, 0x14, 0xF0, 0x0C, 0x06, 0x01, 0x6E, - 0x02, 0x04, 0x05, 0x1A, 0x46, 0x46, 0x46, 0x01, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x0C, 0x78, 0x44, 0x0B, 0x8E, 0xFF, 0x95, 0x19, 0xFF, - 0x35, 0x1E, 0x04, 0x77, 0x61, 0x64, 0x67, 0xBF, 0x9E, 0x9E, 0x9E, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, 0x9B, 0x9B, 0x9B, 0xFF, - 0x95, 0x96, 0x97, 0xFF, 0x7B, 0x7A, 0x79, 0xFF, 0xDA, 0x83, 0x27, 0xFF, - 0xFF, 0x90, 0x13, 0xFF, 0x94, 0x6E, 0x46, 0xFF, 0x39, 0x42, 0x4B, 0xFF, - 0x71, 0x49, 0x1E, 0xFF, 0xFF, 0x91, 0x17, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xD8, 0x81, 0x25, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0xC5, 0xC5, 0xC6, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, 0xD6, 0xD6, 0xD6, 0xFF, - 0xCD, 0xCF, 0xD1, 0xFF, 0xB7, 0xA5, 0x94, 0xFF, 0xF8, 0x8C, 0x19, 0xFF, - 0xFF, 0x8F, 0x17, 0xFF, 0xFB, 0x8E, 0x18, 0xFF, 0x38, 0x20, 0x05, 0x92, - 0x00, 0x00, 0x01, 0x26, 0x17, 0x17, 0x17, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x04, 0x72, 0x40, 0x0A, 0x7B, 0xE9, 0x85, 0x15, 0xE9, - 0x22, 0x12, 0x03, 0x45, 0x69, 0x6B, 0x6E, 0xB8, 0x9D, 0x9D, 0x9D, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, - 0x9C, 0x9C, 0x9C, 0xFF, 0x9A, 0x9A, 0x9A, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x86, 0x8A, 0x8E, 0xFF, 0x97, 0x76, 0x54, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xE2, 0x84, 0x21, 0xFF, 0x62, 0x5E, 0x5A, 0xFF, 0x27, 0x2C, 0x31, 0xFF, - 0xAC, 0x66, 0x1C, 0xFF, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, - 0xC7, 0x7C, 0x2D, 0xFF, 0x8A, 0x8D, 0x91, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xD8, 0xD8, 0xD8, 0xFF, 0xD8, 0xD8, 0xD8, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, 0xD5, 0xD5, 0xD5, 0xFF, - 0xCF, 0xD0, 0xD1, 0xFF, 0xB2, 0xAA, 0xA1, 0xFF, 0xF2, 0x8C, 0x22, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x56, 0x30, 0x09, 0xA6, - 0x00, 0x00, 0x00, 0x2C, 0x01, 0x01, 0x01, 0x04, 0x00, 0x00, 0x00, 0x00, - 0x1D, 0x1D, 0x1D, 0x03, 0x0E, 0x09, 0x03, 0x15, 0x1F, 0x13, 0x05, 0x2A, - 0x03, 0x02, 0x02, 0x0C, 0x71, 0x72, 0x72, 0xB4, 0x9D, 0x9D, 0x9D, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x99, 0x99, 0x99, 0xFF, - 0x99, 0x99, 0x99, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x8B, 0x8B, 0x8B, 0xFF, 0x99, 0x99, 0x99, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x79, 0x7B, 0x7E, 0xFF, 0xCC, 0x80, 0x2E, 0xFF, 0xFF, 0x92, 0x12, 0xFF, - 0xA6, 0x72, 0x3D, 0xFF, 0x45, 0x4A, 0x4F, 0xFF, 0x29, 0x2A, 0x2C, 0xFF, - 0xCC, 0x79, 0x20, 0xFF, 0xFF, 0x90, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, - 0xC5, 0x7A, 0x2C, 0xFF, 0x85, 0x89, 0x8C, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xB7, 0xB7, 0xB7, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xD4, 0xD4, 0xD4, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD4, 0xD4, 0xD4, 0xFF, - 0xCE, 0xCF, 0xD0, 0xFF, 0xAF, 0xA8, 0xA2, 0xFF, 0xEF, 0x8C, 0x24, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x93, 0x19, 0xFF, 0x5E, 0x33, 0x0A, 0xA9, - 0x00, 0x00, 0x00, 0x2B, 0x09, 0x09, 0x09, 0x03, 0x00, 0x00, 0x00, 0x00, - 0x30, 0x30, 0x30, 0x00, 0x52, 0x52, 0x53, 0x00, 0x59, 0x5B, 0x5D, 0x00, - 0x45, 0x45, 0x45, 0x00, 0x85, 0x85, 0x85, 0xB3, 0x99, 0x99, 0x99, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0x9A, 0x9A, 0x9A, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x36, 0x36, 0x36, 0xFF, - 0x4B, 0x4B, 0x4B, 0xFF, 0x97, 0x97, 0x97, 0xFF, 0x8B, 0x8D, 0x90, 0xFF, - 0x85, 0x73, 0x61, 0xFF, 0xF7, 0x8C, 0x18, 0xFF, 0xF0, 0x89, 0x1B, 0xFF, - 0x6C, 0x60, 0x54, 0xFF, 0x33, 0x35, 0x37, 0xFF, 0x48, 0x49, 0x4A, 0xFF, - 0xE5, 0x8F, 0x34, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x90, 0x16, 0xFF, - 0xD2, 0x7D, 0x24, 0xFF, 0x7A, 0x7B, 0x7D, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0x65, 0x65, 0x65, 0xFF, 0x30, 0x30, 0x30, 0xFF, 0xA3, 0xA3, 0xA3, 0xFF, - 0xD8, 0xD8, 0xD8, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, 0xD3, 0xD3, 0xD3, 0xFF, - 0xCA, 0xCC, 0xCE, 0xFF, 0xAC, 0xA1, 0x96, 0xFF, 0xF3, 0x8C, 0x1E, 0xFF, - 0xFF, 0x8E, 0x17, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0x4D, 0x2B, 0x07, 0x98, - 0x00, 0x00, 0x03, 0x23, 0x29, 0x29, 0x29, 0x02, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0E, 0x0E, 0x0E, 0x00, 0x99, 0x99, 0x99, 0xB3, 0x96, 0x96, 0x96, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, 0x95, 0x95, 0x95, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x4A, 0x4A, 0x4A, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x7B, 0x80, 0x85, 0xFF, - 0xB2, 0x79, 0x3D, 0xFF, 0xFF, 0x92, 0x12, 0xFF, 0xBB, 0x78, 0x31, 0xFF, - 0x4C, 0x50, 0x54, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, 0x80, 0x82, 0x85, 0xFF, - 0xE6, 0x97, 0x44, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xEE, 0x87, 0x19, 0xFF, 0x74, 0x68, 0x5C, 0xFF, 0xA6, 0xA8, 0xAA, 0xFF, - 0x5E, 0x5E, 0x5E, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0xA1, 0xA1, 0xA1, 0xFF, - 0xD7, 0xD7, 0xD7, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, - 0xD1, 0xD1, 0xD1, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xD2, 0xD2, 0xD2, 0xFF, - 0xC1, 0xC4, 0xC8, 0xFF, 0xAE, 0x96, 0x7E, 0xFF, 0xFB, 0x8C, 0x16, 0xFF, - 0xFF, 0x8F, 0x18, 0xFF, 0xF4, 0x89, 0x17, 0xFC, 0x28, 0x15, 0x03, 0x73, - 0x01, 0x02, 0x05, 0x17, 0x41, 0x41, 0x41, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x96, 0x96, 0x96, 0xB3, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, 0x94, 0x94, 0x94, 0xFF, - 0x97, 0x97, 0x97, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0x4A, 0x4A, 0x4A, 0xFF, 0x8D, 0x8E, 0x8F, 0xFF, 0x78, 0x74, 0x70, 0xFF, - 0xE6, 0x86, 0x21, 0xFF, 0xFB, 0x8E, 0x15, 0xFF, 0x7F, 0x66, 0x4C, 0xFF, - 0x3C, 0x3F, 0x42, 0xFF, 0x42, 0x42, 0x42, 0xFF, 0xB1, 0xB6, 0xBB, 0xFF, - 0xD3, 0x99, 0x5D, 0xFF, 0xFF, 0x8D, 0x11, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xAB, 0x6F, 0x2F, 0xFF, 0x72, 0x78, 0x7E, 0xFF, - 0x50, 0x50, 0x50, 0xFF, 0x2D, 0x2D, 0x2D, 0xFF, 0xA0, 0xA0, 0xA0, 0xFF, - 0xD5, 0xD5, 0xD5, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, - 0xD0, 0xD0, 0xD0, 0xFF, 0xD0, 0xD0, 0xD0, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, - 0xAE, 0xB4, 0xB9, 0xFF, 0xC0, 0x8B, 0x54, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, - 0xFF, 0x92, 0x18, 0xFF, 0xBA, 0x69, 0x11, 0xD8, 0x02, 0x00, 0x00, 0x42, - 0x21, 0x21, 0x21, 0x0B, 0x26, 0x26, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x95, 0x95, 0x95, 0xB3, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x96, 0x96, 0x96, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x30, 0x30, 0x30, 0xFF, - 0x46, 0x46, 0x46, 0xFF, 0x7F, 0x84, 0x88, 0xFF, 0x94, 0x73, 0x51, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xD5, 0x7F, 0x24, 0xFF, 0x5A, 0x5B, 0x5B, 0xFF, - 0x31, 0x31, 0x32, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, 0xCB, 0xCE, 0xD2, 0xFF, - 0xBD, 0xA4, 0x8B, 0xFF, 0xFB, 0x8D, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFA, 0x8D, 0x17, 0xFF, 0x93, 0x69, 0x3D, 0xFF, - 0x2B, 0x30, 0x36, 0xFF, 0x22, 0x23, 0x24, 0xFF, 0x97, 0x97, 0x97, 0xFF, - 0xD2, 0xD2, 0xD2, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xCF, 0xCF, 0xCF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC2, 0xC4, 0xC5, 0xFF, - 0x9B, 0x98, 0x95, 0xFF, 0xE6, 0x89, 0x28, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, - 0xFB, 0x90, 0x1A, 0xFF, 0x4B, 0x2D, 0x0D, 0x8C, 0x00, 0x00, 0x00, 0x1C, - 0x39, 0x39, 0x39, 0x03, 0x15, 0x15, 0x15, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x94, 0x94, 0x94, 0xB3, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, 0x91, 0x91, 0x91, 0xFF, - 0x93, 0x93, 0x93, 0xFF, 0x84, 0x84, 0x84, 0xFF, 0x57, 0x57, 0x57, 0xFF, - 0x62, 0x62, 0x62, 0xFF, 0x73, 0x76, 0x7A, 0xFF, 0xC7, 0x7E, 0x30, 0xFF, - 0xFF, 0x91, 0x12, 0xFF, 0x99, 0x6D, 0x3E, 0xFF, 0x4E, 0x53, 0x58, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x9D, 0x9D, 0x9D, 0xFF, 0xD2, 0xD2, 0xD3, 0xFF, - 0xB7, 0xB8, 0xB9, 0xFF, 0xE2, 0x91, 0x3D, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFA, 0x8E, 0x18, 0xFF, - 0x8C, 0x55, 0x1A, 0xFF, 0x30, 0x2F, 0x2F, 0xFF, 0x7E, 0x81, 0x85, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xCD, 0xCD, 0xCD, 0xFF, - 0xCD, 0xCD, 0xCD, 0xFF, 0xC4, 0xC4, 0xC3, 0xFF, 0x9C, 0xA2, 0xA8, 0xFF, - 0xB6, 0x84, 0x50, 0xFF, 0xFF, 0x8E, 0x13, 0xFF, 0xFF, 0x8E, 0x12, 0xFF, - 0xC2, 0x89, 0x4E, 0xFF, 0x1A, 0x1D, 0x21, 0x5A, 0x16, 0x16, 0x16, 0x05, - 0x33, 0x33, 0x33, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x93, 0x93, 0x93, 0xB3, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, 0x8F, 0x8F, 0x8F, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0x90, 0x90, 0x90, 0xFF, 0x93, 0x93, 0x93, 0xFF, - 0x88, 0x8A, 0x8C, 0xFF, 0x7C, 0x6F, 0x62, 0xFF, 0xF3, 0x8B, 0x1B, 0xFF, - 0xED, 0x87, 0x1A, 0xFF, 0x6C, 0x62, 0x59, 0xFF, 0x46, 0x48, 0x49, 0xFF, - 0x3F, 0x3F, 0x3F, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, - 0xC3, 0xC6, 0xC9, 0xFF, 0xBC, 0xA5, 0x8D, 0xFF, 0xF9, 0x8C, 0x19, 0xFF, - 0xFE, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, - 0xFF, 0x92, 0x17, 0xFF, 0xD2, 0x7F, 0x26, 0xFF, 0x7A, 0x65, 0x50, 0xFF, - 0x74, 0x79, 0x7F, 0xFF, 0x9A, 0x9D, 0xA0, 0xFF, 0xB1, 0xB2, 0xB2, 0xFF, - 0xB2, 0xB3, 0xB4, 0xFF, 0x94, 0x9A, 0xA0, 0xFF, 0xA4, 0x81, 0x5D, 0xFF, - 0xF8, 0x8C, 0x16, 0xFF, 0xFE, 0x8D, 0x12, 0xFF, 0xC5, 0x89, 0x4B, 0xFF, - 0xA0, 0xA1, 0xA3, 0xFF, 0x2E, 0x2F, 0x2F, 0x43, 0x4A, 0x4A, 0x4A, 0x00, - 0x14, 0x14, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x92, 0x92, 0x92, 0xB3, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, - 0x8E, 0x8E, 0x8E, 0xFF, 0x8E, 0x8E, 0x8E, 0xFF, 0x8D, 0x8D, 0x8D, 0xFF, - 0x77, 0x7B, 0x81, 0xFF, 0xA2, 0x74, 0x43, 0xFF, 0xFF, 0x92, 0x12, 0xFF, - 0xB7, 0x73, 0x2D, 0xFF, 0x5F, 0x63, 0x68, 0xFF, 0x3A, 0x3A, 0x3A, 0xFF, - 0x5B, 0x5B, 0x5B, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, - 0xCB, 0xCA, 0xCB, 0xFF, 0xB9, 0xBD, 0xC2, 0xFF, 0xCC, 0x9A, 0x68, 0xFF, - 0xFE, 0x8D, 0x12, 0xFF, 0xFE, 0x8E, 0x17, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x16, 0xFF, 0xF3, 0x89, 0x18, 0xFF, - 0xAE, 0x6F, 0x2E, 0xFF, 0x7F, 0x67, 0x50, 0xFF, 0x6D, 0x6D, 0x6D, 0xFF, - 0x74, 0x72, 0x71, 0xFF, 0xB3, 0x7E, 0x47, 0xFF, 0xFF, 0x8F, 0x16, 0xFF, - 0xF1, 0x8C, 0x20, 0xFF, 0xB7, 0x8D, 0x63, 0xFF, 0xA3, 0xA6, 0xA9, 0xFF, - 0xC3, 0xC3, 0xC4, 0xFF, 0x4C, 0x4C, 0x4C, 0x3C, 0x0F, 0x0F, 0x0F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x91, 0x91, 0x91, 0xB3, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, - 0x8C, 0x8C, 0x8C, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0x88, 0x89, 0x89, 0xFF, - 0x6F, 0x70, 0x71, 0xFF, 0xD6, 0x81, 0x27, 0xFF, 0xFD, 0x8F, 0x14, 0xFF, - 0x7E, 0x63, 0x46, 0xFF, 0x63, 0x66, 0x6A, 0xFF, 0x31, 0x31, 0x31, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0xD1, 0xD1, 0xD1, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCB, 0xCB, 0xCB, 0xFF, 0xC8, 0xC8, 0xC9, 0xFF, 0xB5, 0xB8, 0xBB, 0xFF, - 0xCD, 0x99, 0x62, 0xFF, 0xFC, 0x8D, 0x15, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, 0xD0, 0x7B, 0x20, 0xFF, - 0xD4, 0x7D, 0x20, 0xFF, 0xF1, 0x88, 0x15, 0xFF, 0xAA, 0x6F, 0x2F, 0xFF, - 0x8A, 0x7F, 0x75, 0xFF, 0xA4, 0xA9, 0xAD, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xD0, 0xCF, 0xCF, 0xFF, 0x81, 0x81, 0x81, 0x3B, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x90, 0x90, 0x90, 0xB3, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, - 0x8A, 0x8A, 0x8A, 0xFF, 0x8A, 0x8A, 0x8A, 0xFF, 0x7D, 0x80, 0x83, 0xFF, - 0x82, 0x6C, 0x57, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, 0xDC, 0x80, 0x1F, 0xFF, - 0x63, 0x61, 0x5F, 0xFF, 0x62, 0x63, 0x64, 0xFF, 0x2F, 0x2F, 0x2F, 0xFF, - 0x98, 0x98, 0x98, 0xFF, 0xCF, 0xCF, 0xCF, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, - 0xC9, 0xC9, 0xC9, 0xFF, 0xC9, 0xC9, 0xC9, 0xFF, 0xC6, 0xC7, 0xC8, 0xFF, - 0xB6, 0xBA, 0xBE, 0xFF, 0xBF, 0x9F, 0x7F, 0xFF, 0xEC, 0x8F, 0x2B, 0xFF, - 0xFF, 0x90, 0x14, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x17, 0xFF, - 0xFF, 0x91, 0x17, 0xFF, 0xE3, 0x81, 0x19, 0xFF, 0x76, 0x56, 0x32, 0xFF, - 0x61, 0x64, 0x67, 0xFF, 0x8E, 0x91, 0x95, 0xFF, 0xB3, 0xB3, 0xB4, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0x55, 0x55, 0x55, 0x3B, 0x12, 0x12, 0x12, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x8F, 0x8F, 0x8F, 0xB3, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x89, 0x89, 0x89, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, - 0x88, 0x88, 0x88, 0xFF, 0x88, 0x88, 0x88, 0xFF, 0x6F, 0x74, 0x79, 0xFF, - 0xB0, 0x76, 0x38, 0xFF, 0xFF, 0x93, 0x12, 0xFF, 0xA4, 0x6B, 0x31, 0xFF, - 0x65, 0x6B, 0x6F, 0xFF, 0x5B, 0x5A, 0x5A, 0xFF, 0x34, 0x34, 0x34, 0xFF, - 0xAA, 0xAA, 0xAA, 0xFF, 0xCC, 0xCC, 0xCC, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, 0xC8, 0xC8, 0xC8, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xB1, 0xB5, 0xBA, 0xFF, 0x93, 0x90, 0x8E, 0xFF, - 0xAA, 0x76, 0x40, 0xFF, 0xF3, 0x89, 0x19, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, - 0xFF, 0x8E, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, - 0xCC, 0x7A, 0x23, 0xFF, 0x7F, 0x65, 0x4A, 0xFF, 0x74, 0x78, 0x7C, 0xFF, - 0xA1, 0xA3, 0xA4, 0xFF, 0x2E, 0x2E, 0x2E, 0x44, 0x43, 0x43, 0x43, 0x00, - 0x1D, 0x1D, 0x1D, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x8E, 0x8E, 0x8E, 0xB3, 0x86, 0x86, 0x86, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, 0x87, 0x87, 0x87, 0xFF, - 0x87, 0x87, 0x87, 0xFF, 0x81, 0x82, 0x83, 0xFF, 0x6E, 0x6A, 0x67, 0xFF, - 0xE3, 0x85, 0x20, 0xFF, 0xFA, 0x8C, 0x16, 0xFF, 0x72, 0x5C, 0x47, 0xFF, - 0x73, 0x76, 0x79, 0xFF, 0x51, 0x51, 0x51, 0xFF, 0x3C, 0x3C, 0x3C, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xCE, 0xCE, 0xCE, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, - 0xCC, 0xCC, 0xCC, 0xFF, 0xCB, 0xCB, 0xCB, 0xFF, 0xC5, 0xC4, 0xC4, 0xFF, - 0xAF, 0xB2, 0xB4, 0xFF, 0x8D, 0x91, 0x95, 0xFF, 0x8B, 0x79, 0x68, 0xFF, - 0xB7, 0x78, 0x35, 0xFF, 0xF7, 0x8A, 0x15, 0xFF, 0xE7, 0x89, 0x26, 0xFF, - 0xE7, 0x8A, 0x28, 0xFF, 0xFE, 0x8D, 0x14, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xF8, 0x8C, 0x16, 0xFF, 0xB4, 0x72, 0x2D, 0xFF, - 0x72, 0x6B, 0x65, 0xFF, 0x1A, 0x1D, 0x20, 0x64, 0x04, 0x04, 0x04, 0x0C, - 0x39, 0x39, 0x39, 0x01, 0x03, 0x03, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x8C, 0x8C, 0x8C, 0xB3, 0x84, 0x84, 0x84, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, 0x85, 0x85, 0x85, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0x75, 0x79, 0x7D, 0xFF, 0x8A, 0x6B, 0x4C, 0xFF, - 0xFE, 0x90, 0x15, 0xFF, 0xD2, 0x7C, 0x21, 0xFF, 0x5B, 0x5C, 0x5C, 0xFF, - 0x7D, 0x7E, 0x7E, 0xFF, 0x4A, 0x4A, 0x4A, 0xFF, 0x39, 0x39, 0x39, 0xFF, - 0x64, 0x64, 0x64, 0xFF, 0x68, 0x68, 0x68, 0xFF, 0x67, 0x67, 0x67, 0xFF, - 0x69, 0x69, 0x69, 0xFF, 0x67, 0x67, 0x67, 0xFF, 0x57, 0x5B, 0x5F, 0xFF, - 0x6B, 0x5E, 0x51, 0xFF, 0xBF, 0x7D, 0x37, 0xFF, 0xF8, 0x8C, 0x17, 0xFF, - 0xFD, 0x8E, 0x16, 0xFF, 0xBF, 0x88, 0x4F, 0xFF, 0x99, 0x94, 0x90, 0xFF, - 0xA2, 0x9F, 0x9C, 0xFF, 0xBD, 0x99, 0x75, 0xFF, 0xE1, 0x8F, 0x39, 0xFF, - 0xFD, 0x8D, 0x16, 0xFF, 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8F, 0x18, 0xFF, 0xFF, 0x91, 0x15, 0xFF, - 0xD5, 0x80, 0x23, 0xFF, 0x26, 0x1B, 0x0F, 0x9A, 0x00, 0x00, 0x00, 0x36, - 0x00, 0x00, 0x00, 0x0C, 0x26, 0x26, 0x26, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x8B, 0x8B, 0x8B, 0xB3, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0xBE, 0x78, 0x30, 0xFF, - 0xFF, 0x93, 0x13, 0xFF, 0x98, 0x67, 0x33, 0xFF, 0x61, 0x66, 0x6B, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x44, 0x44, 0x44, 0xFF, 0x32, 0x32, 0x32, 0xFF, - 0x2F, 0x2F, 0x2F, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, 0x2E, 0x2E, 0x2E, 0xFF, - 0x2D, 0x2C, 0x2D, 0xFF, 0x1E, 0x22, 0x27, 0xFF, 0x60, 0x3D, 0x1A, 0xFF, - 0xE1, 0x7F, 0x13, 0xFF, 0xFF, 0x91, 0x13, 0xFF, 0xF0, 0x8A, 0x1C, 0xFF, - 0x9E, 0x84, 0x69, 0xFF, 0x9D, 0xA3, 0xA8, 0xFF, 0xBA, 0xBB, 0xBC, 0xFF, - 0xC0, 0xC1, 0xC2, 0xFF, 0xB8, 0xBC, 0xC0, 0xFF, 0xAD, 0xAD, 0xAF, 0xFF, - 0xB9, 0x9B, 0x7D, 0xFF, 0xE4, 0x8E, 0x34, 0xFF, 0xFF, 0x8D, 0x13, 0xFF, - 0xFE, 0x8E, 0x17, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFF, 0x93, 0x17, 0xFF, 0xBF, 0x6B, 0x11, 0xE7, 0x0C, 0x06, 0x01, 0x76, - 0x00, 0x00, 0x00, 0x27, 0x22, 0x22, 0x22, 0x05, 0x15, 0x15, 0x15, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x8A, 0x8A, 0x8A, 0xB3, 0x81, 0x81, 0x81, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x7A, 0x7B, 0x7D, 0xFF, 0x6F, 0x66, 0x5D, 0xFF, 0xEE, 0x88, 0x1C, 0xFF, - 0xF5, 0x8A, 0x18, 0xFF, 0x68, 0x58, 0x48, 0xFF, 0x6F, 0x72, 0x74, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0x6B, 0x6B, 0x6B, 0xFF, 0x60, 0x60, 0x60, 0xFF, - 0x5F, 0x5F, 0x5F, 0xFF, 0x5F, 0x5F, 0x5F, 0xFF, 0x5D, 0x5D, 0x5D, 0xFF, - 0x4B, 0x4F, 0x53, 0xFF, 0x73, 0x52, 0x2F, 0xFF, 0xF6, 0x8C, 0x17, 0xFF, - 0xFF, 0x91, 0x17, 0xFF, 0xF7, 0x8B, 0x18, 0xFF, 0x9B, 0x7D, 0x60, 0xFF, - 0x9D, 0xA2, 0xA8, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xC3, 0xC3, 0xC3, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xB7, 0xBB, 0xBF, 0xFF, 0xAB, 0xA9, 0xA9, 0xFF, 0xC7, 0x94, 0x60, 0xFF, - 0xF9, 0x8D, 0x1A, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, 0x7D, 0x47, 0x0B, 0xC7, - 0x00, 0x00, 0x00, 0x50, 0x06, 0x06, 0x06, 0x13, 0x0F, 0x0F, 0x0F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x89, 0x89, 0x89, 0xB3, 0x7F, 0x7F, 0x7F, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, 0x80, 0x80, 0x80, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x82, 0x82, 0x82, 0xFF, - 0x6D, 0x71, 0x76, 0xFF, 0x95, 0x6C, 0x42, 0xFF, 0xFF, 0x92, 0x14, 0xFF, - 0xC7, 0x77, 0x23, 0xFF, 0x57, 0x59, 0x5B, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x82, 0x82, 0x82, 0xFF, 0x83, 0x83, 0x83, 0xFF, - 0x83, 0x83, 0x83, 0xFF, 0x83, 0x83, 0x83, 0xFF, 0x79, 0x7B, 0x7C, 0xFF, - 0x72, 0x66, 0x5A, 0xFF, 0xED, 0x89, 0x1E, 0xFF, 0xFF, 0x90, 0x17, 0xFF, - 0xFF, 0x8F, 0x14, 0xFF, 0xB5, 0x7B, 0x3F, 0xFF, 0x8D, 0x93, 0x99, 0xFF, - 0xBB, 0xBB, 0xBA, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xC7, 0xC7, 0xC7, 0xFF, 0xC0, 0xC1, 0xC1, 0xFF, 0xAD, 0xB3, 0xB8, 0xFF, - 0xB7, 0x98, 0x7B, 0xFF, 0xF5, 0x8D, 0x1E, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, - 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x90, 0x18, 0xFF, 0xEB, 0x85, 0x16, 0xF9, - 0x20, 0x11, 0x03, 0x86, 0x00, 0x00, 0x00, 0x28, 0x00, 0x00, 0x00, 0x05, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x87, 0x87, 0x87, 0xB3, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x80, 0x80, 0x80, 0xFF, 0x6C, 0x6C, 0x6C, 0xFF, 0x6E, 0x6E, 0x6E, 0xFF, - 0x65, 0x67, 0x6A, 0xFF, 0xCA, 0x7C, 0x2A, 0xFF, 0xFF, 0x92, 0x14, 0xFF, - 0x8A, 0x61, 0x36, 0xFF, 0x5F, 0x64, 0x69, 0xFF, 0x7D, 0x7C, 0x7C, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x67, 0x6B, 0x70, 0xFF, - 0xB0, 0x74, 0x34, 0xFF, 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, - 0xED, 0x87, 0x1C, 0xFF, 0x83, 0x79, 0x6F, 0xFF, 0xAA, 0xAC, 0xAE, 0xFF, - 0xC0, 0xC0, 0xC0, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xC6, 0xC6, 0xC6, 0xFF, 0xC7, 0xC7, 0xC7, 0xFF, 0xB1, 0xB1, 0xB1, 0xFF, - 0x81, 0x81, 0x81, 0xFF, 0xB5, 0xB5, 0xB5, 0xFF, 0xC2, 0xC2, 0xC2, 0xFF, - 0xAE, 0xB4, 0xBA, 0xFF, 0xB8, 0x95, 0x72, 0xFF, 0xFB, 0x8D, 0x17, 0xFF, - 0xFE, 0x8E, 0x18, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0x72, 0x3F, 0x0A, 0xBC, 0x00, 0x00, 0x00, 0x3E, 0x00, 0x00, 0x00, 0x0C, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x86, 0x86, 0x86, 0xB3, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, 0x2F, 0x30, 0x32, 0xFF, - 0x4F, 0x42, 0x35, 0xFF, 0xF4, 0x8A, 0x1A, 0xFF, 0xEF, 0x88, 0x19, 0xFF, - 0x60, 0x55, 0x4B, 0xFF, 0x71, 0x72, 0x74, 0xFF, 0x7F, 0x7F, 0x7F, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x7E, 0x7E, 0x7E, 0xFF, 0x7D, 0x7D, 0x7D, 0xFF, - 0x7D, 0x7D, 0x7D, 0xFF, 0x79, 0x7A, 0x7B, 0xFF, 0x6B, 0x66, 0x61, 0xFF, - 0xE5, 0x85, 0x1F, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, 0xFF, 0x90, 0x15, 0xFF, - 0xC3, 0x7B, 0x2F, 0xFF, 0x82, 0x86, 0x8B, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xC5, 0xC5, 0xC5, 0xFF, 0xC6, 0xC6, 0xC6, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xA2, 0xA2, 0xA2, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, 0x3C, 0x3C, 0x3C, 0xFF, - 0x2A, 0x2A, 0x2A, 0xFF, 0x8C, 0x8C, 0x8C, 0xFF, 0xC5, 0xC5, 0xC5, 0xFF, - 0xBE, 0xBF, 0xBF, 0xFF, 0xA6, 0xA9, 0xAE, 0xFF, 0xD7, 0x8D, 0x41, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x93, 0x19, 0xFF, - 0xB3, 0x65, 0x10, 0xDE, 0x00, 0x00, 0x00, 0x53, 0x00, 0x00, 0x00, 0x14, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x85, 0x85, 0x85, 0xB3, 0x7B, 0x7B, 0x7B, 0xFF, - 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7B, 0x7B, 0x7B, 0xFF, 0x69, 0x68, 0x68, 0xFF, 0x3D, 0x42, 0x47, 0xFF, - 0x78, 0x4E, 0x22, 0xFF, 0xFF, 0x95, 0x16, 0xFF, 0xB1, 0x67, 0x18, 0xFF, - 0x2C, 0x2F, 0x33, 0xFF, 0x54, 0x54, 0x54, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x72, 0x72, 0x72, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x7C, 0x7C, 0x7C, 0xFF, - 0x7E, 0x7E, 0x7E, 0xFF, 0x74, 0x77, 0x7A, 0xFF, 0x81, 0x6A, 0x52, 0xFF, - 0xFB, 0x8D, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x14, 0xFF, - 0xA5, 0x73, 0x40, 0xFF, 0x88, 0x8D, 0x92, 0xFF, 0xA8, 0xA8, 0xA8, 0xFF, - 0x95, 0x95, 0x95, 0xFF, 0x73, 0x73, 0x73, 0xFF, 0x4C, 0x4C, 0x4C, 0xFF, - 0x31, 0x31, 0x31, 0xFF, 0x31, 0x31, 0x31, 0xFF, 0x54, 0x54, 0x54, 0xFF, - 0x8F, 0x8F, 0x8F, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xC0, 0xC0, 0xC0, 0xFF, - 0xBF, 0xBF, 0xBF, 0xFF, 0xB3, 0xB6, 0xBA, 0xFF, 0xB1, 0x94, 0x75, 0xFF, - 0xFD, 0x8D, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x19, 0xFF, - 0xD3, 0x76, 0x14, 0xED, 0x07, 0x03, 0x00, 0x61, 0x00, 0x00, 0x00, 0x19, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x83, 0x83, 0x83, 0xB3, 0x79, 0x79, 0x79, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x7B, 0x7B, 0x7B, 0xFF, 0x63, 0x66, 0x6A, 0xFF, - 0xC4, 0x79, 0x2A, 0xFF, 0xFF, 0x93, 0x15, 0xFF, 0x6F, 0x4B, 0x26, 0xFF, - 0x2A, 0x2E, 0x33, 0xFF, 0x33, 0x33, 0x33, 0xFF, 0x33, 0x33, 0x33, 0xFF, - 0x37, 0x37, 0x37, 0xFF, 0x3E, 0x3E, 0x3E, 0xFF, 0x45, 0x45, 0x45, 0xFF, - 0x4C, 0x4C, 0x4C, 0xFF, 0x43, 0x47, 0x4C, 0xFF, 0x81, 0x5A, 0x32, 0xFF, - 0xFF, 0x91, 0x16, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFF, 0x91, 0x17, 0xFF, - 0x6F, 0x4A, 0x23, 0xFF, 0x2F, 0x33, 0x37, 0xFF, 0x35, 0x35, 0x35, 0xFF, - 0x2E, 0x2E, 0x2E, 0xFF, 0x32, 0x32, 0x32, 0xFF, 0x48, 0x48, 0x48, 0xFF, - 0x71, 0x71, 0x71, 0xFF, 0x9F, 0x9F, 0x9F, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xC3, 0xC3, 0xC3, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xBE, 0xBE, 0xBE, 0xFF, 0xB9, 0xBB, 0xBC, 0xFF, 0xA3, 0x9A, 0x92, 0xFF, - 0xF1, 0x8B, 0x20, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, 0xFF, 0x90, 0x18, 0xFF, - 0xDE, 0x7C, 0x15, 0xF2, 0x0F, 0x08, 0x01, 0x65, 0x00, 0x00, 0x00, 0x1A, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x83, 0x83, 0x83, 0xB3, 0x78, 0x78, 0x78, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x79, 0x79, 0x79, 0xFF, - 0x79, 0x79, 0x79, 0xFF, 0x73, 0x74, 0x76, 0xFF, 0x6A, 0x61, 0x59, 0xFF, - 0xEE, 0x88, 0x1C, 0xFF, 0xE8, 0x84, 0x1B, 0xFF, 0x59, 0x53, 0x4C, 0xFF, - 0x69, 0x6A, 0x6B, 0xFF, 0x6A, 0x6A, 0x6A, 0xFF, 0x5C, 0x5C, 0x5C, 0xFF, - 0x50, 0x50, 0x50, 0xFF, 0x46, 0x46, 0x46, 0xFF, 0x3F, 0x3F, 0x3F, 0xFF, - 0x3A, 0x3A, 0x3A, 0xFF, 0x2B, 0x30, 0x34, 0xFF, 0x82, 0x52, 0x22, 0xFF, - 0xFF, 0x92, 0x17, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x17, 0xFF, - 0x60, 0x41, 0x21, 0xFF, 0x3D, 0x41, 0x45, 0xFF, 0x68, 0x68, 0x68, 0xFF, - 0x85, 0x85, 0x85, 0xFF, 0xA2, 0xA2, 0xA2, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xC2, 0xC2, 0xC2, 0xFF, 0xC1, 0xC1, 0xC1, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBD, 0xBD, 0xBD, 0xFF, 0xBB, 0xBB, 0xBC, 0xFF, 0x9F, 0x9D, 0x9C, 0xFF, - 0xE7, 0x8A, 0x2A, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x91, 0x18, 0xFF, - 0xD7, 0x78, 0x14, 0xEE, 0x0A, 0x05, 0x01, 0x5E, 0x00, 0x00, 0x00, 0x17, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x0F, 0x0F, 0x0F, 0x00, 0x82, 0x82, 0x82, 0xB3, 0x77, 0x77, 0x77, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, 0x78, 0x78, 0x78, 0xFF, - 0x78, 0x78, 0x78, 0xFF, 0x69, 0x6D, 0x71, 0xFF, 0x85, 0x66, 0x46, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0xAF, 0x6D, 0x29, 0xFF, 0x52, 0x56, 0x5B, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x7A, 0x7A, 0x7A, 0xFF, - 0x7A, 0x7A, 0x7A, 0xFF, 0x79, 0x79, 0x79, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x73, 0x73, 0x73, 0xFF, 0x62, 0x67, 0x6C, 0xFF, 0x9A, 0x6C, 0x3D, 0xFF, - 0xFF, 0x90, 0x15, 0xFF, 0xFD, 0x8E, 0x18, 0xFF, 0xFE, 0x8D, 0x15, 0xFF, - 0x86, 0x69, 0x4A, 0xFF, 0x94, 0x97, 0x9B, 0xFF, 0xBE, 0xBE, 0xBE, 0xFF, - 0xC1, 0xC1, 0xC1, 0xFF, 0xBF, 0xBF, 0xBF, 0xFF, 0xBD, 0xBD, 0xBD, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0x9C, 0x9C, 0x9C, 0xFF, - 0xE2, 0x8A, 0x2D, 0xFF, 0xFF, 0x8E, 0x15, 0xFF, 0xFF, 0x92, 0x19, 0xFF, - 0xC0, 0x6C, 0x12, 0xE0, 0x01, 0x00, 0x00, 0x4C, 0x00, 0x00, 0x00, 0x10, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x81, 0x81, 0x81, 0xB3, 0x75, 0x75, 0x75, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x60, 0x64, 0x6A, 0xFF, 0xB0, 0x72, 0x32, 0xFF, - 0xFF, 0x91, 0x14, 0xFF, 0x76, 0x58, 0x3A, 0xFF, 0x5E, 0x61, 0x66, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, - 0x76, 0x76, 0x76, 0xFF, 0x76, 0x76, 0x76, 0xFF, 0x77, 0x77, 0x77, 0xFF, - 0x77, 0x77, 0x77, 0xFF, 0x6D, 0x70, 0x75, 0xFF, 0x8F, 0x6D, 0x4A, 0xFF, - 0xFF, 0x8F, 0x16, 0xFF, 0xFE, 0x8E, 0x18, 0xFF, 0xFF, 0x8F, 0x15, 0xFF, - 0x8D, 0x69, 0x42, 0xFF, 0x8B, 0x8E, 0x93, 0xFF, 0xB6, 0xB6, 0xB6, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, 0xBB, 0xBB, 0xBB, 0xFF, - 0xBB, 0xBB, 0xBB, 0xFF, 0xB6, 0xB7, 0xB8, 0xFF, 0x98, 0x95, 0x93, 0xFF, - 0xE7, 0x89, 0x27, 0xFF, 0xFF, 0x8E, 0x16, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0x90, 0x50, 0x0C, 0xC1, 0x00, 0x00, 0x00, 0x35, 0x00, 0x00, 0x00, 0x09, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x80, 0x80, 0x80, 0xB3, 0x74, 0x74, 0x74, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x72, 0x73, 0x73, 0xFF, 0x5F, 0x5E, 0x5D, 0xFF, 0xDE, 0x82, 0x21, 0xFF, - 0xE7, 0x83, 0x1A, 0xFF, 0x54, 0x4F, 0x4A, 0xFF, 0x6A, 0x6B, 0x6C, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x70, 0x72, 0x74, 0xFF, 0x77, 0x68, 0x59, 0xFF, - 0xF5, 0x8B, 0x1A, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, 0xFF, 0x90, 0x15, 0xFF, - 0xA2, 0x6C, 0x33, 0xFF, 0x79, 0x7E, 0x83, 0xFF, 0xB0, 0xB0, 0xB0, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, 0xBA, 0xBA, 0xBA, 0xFF, - 0xBA, 0xBA, 0xBA, 0xFF, 0xAF, 0xB0, 0xB2, 0xFF, 0x98, 0x8A, 0x7D, 0xFF, - 0xF4, 0x8B, 0x1B, 0xFF, 0xFF, 0x8E, 0x17, 0xFF, 0xFE, 0x90, 0x19, 0xFF, - 0x45, 0x27, 0x06, 0x8B, 0x00, 0x00, 0x00, 0x1E, 0x1F, 0x1F, 0x1F, 0x03, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x80, 0x80, 0x80, 0xB3, 0x73, 0x73, 0x73, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x6A, 0x6C, 0x6F, 0xFF, 0x73, 0x60, 0x4C, 0xFF, 0xFC, 0x8F, 0x17, 0xFF, - 0xBA, 0x71, 0x24, 0xFF, 0x4D, 0x51, 0x56, 0xFF, 0x6F, 0x6F, 0x6F, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x75, 0x75, 0x75, 0xFF, 0x75, 0x75, 0x75, 0xFF, - 0x75, 0x75, 0x75, 0xFF, 0x73, 0x74, 0x74, 0xFF, 0x65, 0x67, 0x69, 0xFF, - 0xCD, 0x7E, 0x2B, 0xFF, 0xFF, 0x90, 0x15, 0xFF, 0xFF, 0x90, 0x17, 0xFF, - 0xCE, 0x7A, 0x21, 0xFF, 0x64, 0x65, 0x67, 0xFF, 0xA0, 0xA0, 0xA1, 0xFF, - 0xB6, 0xB6, 0xB6, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xB7, 0xB7, 0xB7, 0xFF, 0x9A, 0x9F, 0xA5, 0xFF, 0xAB, 0x81, 0x54, 0xFF, - 0xFF, 0x8E, 0x14, 0xFF, 0xFF, 0x92, 0x19, 0xFF, 0xC8, 0x70, 0x13, 0xE1, - 0x08, 0x04, 0x01, 0x4A, 0x08, 0x08, 0x08, 0x0E, 0x3C, 0x3C, 0x3C, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x7F, 0x7F, 0x7F, 0xB8, 0x73, 0x73, 0x73, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x76, 0x75, 0x75, 0xFF, - 0x61, 0x66, 0x6B, 0xFF, 0x9F, 0x6C, 0x37, 0xFF, 0xFF, 0x93, 0x13, 0xFF, - 0x8D, 0x61, 0x32, 0xFF, 0x57, 0x5C, 0x61, 0xFF, 0x73, 0x72, 0x72, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, - 0x74, 0x74, 0x74, 0xFF, 0x74, 0x74, 0x74, 0xFF, 0x6B, 0x6E, 0x72, 0xFF, - 0x8A, 0x6E, 0x50, 0xFF, 0xFD, 0x90, 0x19, 0xFF, 0xFF, 0x8F, 0x18, 0xFF, - 0xFA, 0x8D, 0x17, 0xFF, 0x7C, 0x5D, 0x3D, 0xFF, 0x76, 0x7B, 0x81, 0xFF, - 0xAB, 0xAB, 0xAB, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, - 0xBC, 0xBC, 0xBC, 0xFF, 0xBC, 0xBC, 0xBC, 0xFF, 0xB9, 0xB9, 0xB9, 0xFF, - 0xA8, 0xAA, 0xAC, 0xFF, 0x85, 0x81, 0x7E, 0xFF, 0xE1, 0x86, 0x25, 0xFF, - 0xFF, 0x90, 0x16, 0xFF, 0xFB, 0x8F, 0x18, 0xFE, 0x48, 0x28, 0x06, 0x86, - 0x00, 0x00, 0x00, 0x1E, 0x3C, 0x3C, 0x3C, 0x03, 0x11, 0x11, 0x11, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x10, 0x10, 0x10, 0x00, 0x82, 0x82, 0x82, 0x87, 0x72, 0x72, 0x72, 0xC6, - 0x74, 0x74, 0x74, 0xC3, 0x73, 0x73, 0x73, 0xC3, 0x61, 0x61, 0x61, 0xC4, - 0x4B, 0x4B, 0x4C, 0xCF, 0xD0, 0x7B, 0x22, 0xF9, 0xFC, 0x8E, 0x16, 0xFF, - 0x5A, 0x44, 0x2E, 0xDE, 0x4A, 0x4D, 0x4F, 0xC9, 0x68, 0x68, 0x68, 0xC3, - 0x75, 0x75, 0x75, 0xC3, 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, - 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, 0x74, 0x74, 0x74, 0xC3, - 0x74, 0x74, 0x74, 0xC3, 0x75, 0x75, 0x75, 0xC3, 0x6A, 0x6A, 0x6A, 0xC3, - 0x4C, 0x4F, 0x53, 0xC5, 0xA7, 0x69, 0x27, 0xD9, 0xFF, 0x92, 0x16, 0xFF, - 0xFF, 0x90, 0x17, 0xFF, 0xE1, 0x83, 0x1C, 0xFF, 0x5F, 0x50, 0x41, 0xF1, - 0x60, 0x63, 0x68, 0xDA, 0x83, 0x83, 0x83, 0xCE, 0x90, 0x90, 0x90, 0xC7, - 0x93, 0x93, 0x93, 0xC5, 0x95, 0x95, 0x95, 0xC3, 0x95, 0x95, 0x95, 0xC3, - 0x93, 0x93, 0x93, 0xC5, 0x8F, 0x8F, 0x8F, 0xC7, 0x7F, 0x81, 0x83, 0xCD, - 0x68, 0x69, 0x6B, 0xDC, 0xBF, 0x7C, 0x36, 0xFD, 0xFF, 0x90, 0x15, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0x85, 0x4A, 0x0B, 0xAE, 0x00, 0x00, 0x00, 0x2E, - 0x17, 0x17, 0x17, 0x09, 0x40, 0x40, 0x40, 0x00, 0x03, 0x03, 0x03, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x1F, 0x1F, 0x1F, 0x00, 0x1A, 0x1A, 0x1A, 0x01, - 0x1A, 0x1A, 0x1A, 0x00, 0x1C, 0x1C, 0x1C, 0x00, 0x0F, 0x10, 0x11, 0x05, - 0x21, 0x12, 0x02, 0x4D, 0xF4, 0x8A, 0x17, 0xF7, 0xD5, 0x77, 0x14, 0xEE, - 0x0A, 0x05, 0x00, 0x62, 0x0D, 0x0E, 0x0E, 0x13, 0x34, 0x34, 0x34, 0x00, - 0x1B, 0x1B, 0x1B, 0x00, 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, - 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, 0x1A, 0x1A, 0x1A, 0x00, - 0x1A, 0x1A, 0x1A, 0x00, 0x1B, 0x1B, 0x1B, 0x00, 0x1C, 0x1C, 0x1C, 0x00, - 0x29, 0x2A, 0x2A, 0x03, 0x09, 0x04, 0x00, 0x20, 0xA8, 0x60, 0x14, 0xC8, - 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x92, 0x18, 0xFF, 0xD5, 0x78, 0x13, 0xF0, - 0x3B, 0x1F, 0x04, 0xA4, 0x00, 0x00, 0x00, 0x60, 0x00, 0x00, 0x02, 0x3A, - 0x00, 0x01, 0x03, 0x27, 0x02, 0x03, 0x05, 0x20, 0x01, 0x03, 0x05, 0x1F, - 0x00, 0x00, 0x03, 0x27, 0x00, 0x00, 0x02, 0x39, 0x19, 0x0E, 0x03, 0x69, - 0xA0, 0x5A, 0x0D, 0xC9, 0xFF, 0x92, 0x17, 0xFF, 0xFF, 0x94, 0x19, 0xFF, - 0x92, 0x53, 0x0D, 0xB5, 0x01, 0x00, 0x00, 0x36, 0x0E, 0x0E, 0x0F, 0x0D, - 0x4D, 0x4D, 0x4D, 0x01, 0x0C, 0x0C, 0x0C, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, - 0x53, 0x2E, 0x07, 0x74, 0xFF, 0x97, 0x1A, 0xFF, 0xB0, 0x63, 0x11, 0xDB, - 0x00, 0x00, 0x00, 0x54, 0x1D, 0x1E, 0x1E, 0x11, 0x4D, 0x4D, 0x4D, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x39, 0x39, 0x39, 0x00, 0x2D, 0x2E, 0x2F, 0x00, 0x0F, 0x0F, 0x10, 0x6A, - 0x92, 0x5D, 0x25, 0xFF, 0xF2, 0x8A, 0x19, 0xFF, 0xFF, 0x97, 0x19, 0xFF, - 0xF9, 0x8D, 0x17, 0xFF, 0x9E, 0x59, 0x0E, 0xD5, 0x4A, 0x29, 0x06, 0xA3, - 0x24, 0x13, 0x02, 0x82, 0x15, 0x0A, 0x01, 0x74, 0x1F, 0x10, 0x01, 0x77, - 0x3D, 0x22, 0x04, 0x8D, 0x82, 0x48, 0x0C, 0xBA, 0xE4, 0x80, 0x15, 0xF3, - 0xFF, 0x99, 0x1A, 0xFF, 0xEC, 0x87, 0x17, 0xF2, 0x6F, 0x3E, 0x0A, 0x95, - 0x00, 0x00, 0x00, 0x2E, 0x0F, 0x0F, 0x10, 0x0C, 0x4C, 0x4C, 0x4C, 0x01, - 0x0E, 0x0E, 0x0E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x17, 0x17, 0x17, 0x00, 0x07, 0x09, 0x0A, 0x02, - 0x7D, 0x44, 0x0A, 0x8C, 0xFF, 0x9D, 0x1A, 0xFF, 0xE3, 0x81, 0x16, 0xF0, - 0x12, 0x09, 0x00, 0x4D, 0x19, 0x1B, 0x1C, 0x0D, 0x4F, 0x4F, 0x4F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x37, 0x37, 0x37, 0x00, 0x21, 0x21, 0x22, 0x1D, - 0x26, 0x2B, 0x2F, 0xED, 0x4F, 0x3C, 0x29, 0xF3, 0x9C, 0x59, 0x0F, 0xAF, - 0xE2, 0x80, 0x15, 0xE5, 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x96, 0x19, 0xFF, - 0xFB, 0x8D, 0x17, 0xFF, 0xF2, 0x87, 0x17, 0xFE, 0xF8, 0x8B, 0x17, 0xFF, - 0xFF, 0x94, 0x19, 0xFF, 0xFF, 0x95, 0x19, 0xFF, 0xE3, 0x81, 0x15, 0xE9, - 0x92, 0x52, 0x0E, 0xAB, 0x26, 0x14, 0x01, 0x53, 0x00, 0x00, 0x00, 0x19, - 0x10, 0x10, 0x11, 0x08, 0x3F, 0x3F, 0x3F, 0x01, 0x0F, 0x0F, 0x0F, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x0C, 0x0C, 0x0C, 0x00, 0x2C, 0x2D, 0x2D, 0x02, - 0x20, 0x0F, 0x00, 0x31, 0x71, 0x40, 0x08, 0x82, 0x5B, 0x32, 0x06, 0x72, - 0x00, 0x00, 0x00, 0x24, 0x1A, 0x1B, 0x1B, 0x06, 0x2D, 0x2D, 0x2D, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x05, 0x05, 0x05, 0x00, - 0x33, 0x33, 0x33, 0x9F, 0x32, 0x34, 0x37, 0xFE, 0x0A, 0x0D, 0x10, 0x5E, - 0x11, 0x09, 0x00, 0x24, 0x38, 0x1C, 0x00, 0x59, 0x63, 0x36, 0x05, 0x7D, - 0x7D, 0x45, 0x0B, 0x96, 0x89, 0x4C, 0x0D, 0x9F, 0x81, 0x48, 0x0D, 0x9A, - 0x69, 0x3B, 0x09, 0x85, 0x3C, 0x1F, 0x01, 0x61, 0x0E, 0x06, 0x00, 0x37, - 0x00, 0x00, 0x02, 0x16, 0x10, 0x13, 0x15, 0x09, 0x2A, 0x2A, 0x2A, 0x03, - 0x2A, 0x2A, 0x2A, 0x00, 0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x06, 0x06, 0x06, 0x00, 0x3A, 0x3A, 0x3A, 0x01, - 0x39, 0x3B, 0x3D, 0x01, 0x1B, 0x1F, 0x24, 0x01, 0x18, 0x1C, 0x20, 0x03, - 0x49, 0x4A, 0x4A, 0x04, 0x48, 0x48, 0x48, 0x01, 0x04, 0x04, 0x04, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x42, 0x42, 0x42, 0x37, 0x3D, 0x3D, 0x3D, 0xFF, 0x41, 0x41, 0x41, 0xB0, - 0x2A, 0x2C, 0x2D, 0x00, 0x3D, 0x40, 0x44, 0x00, 0x1E, 0x22, 0x27, 0x04, - 0x00, 0x05, 0x0A, 0x07, 0x00, 0x00, 0x00, 0x09, 0x00, 0x00, 0x00, 0x09, - 0x06, 0x0A, 0x0F, 0x07, 0x2C, 0x2F, 0x32, 0x04, 0x20, 0x21, 0x23, 0x03, - 0x2F, 0x2F, 0x2F, 0x01, 0x23, 0x23, 0x23, 0x00, 0x0D, 0x0D, 0x0D, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x14, 0x14, 0x14, 0x00, 0x0D, 0x0D, 0x0D, 0x00, 0x0C, 0x0C, 0x0C, 0x00, - 0x1A, 0x1A, 0x1A, 0x00, 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x11, 0x11, 0x11, 0x01, 0x34, 0x34, 0x34, 0x65, 0x30, 0x30, 0x30, 0x2C, - 0x0E, 0x0E, 0x0E, 0x00, 0x19, 0x19, 0x19, 0x00, 0x0E, 0x0E, 0x0E, 0x00, - 0x04, 0x04, 0x04, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x06, 0x06, 0x06, 0x00, 0x12, 0x12, 0x12, 0x00, 0x0D, 0x0D, 0x0D, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 -}; - diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index 90b7d14c9..00e5437d2 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -446,89 +446,6 @@ static void set_window_name(Window w, int name) } } -// This struct is designed to match the ones generated by GIMP in -// BasiliskII_*_icon.c -struct gimp_image { - unsigned int width; - unsigned int height; - unsigned int bytes_per_pixel; - unsigned char pixel_data[0]; // Variable-length -}; - -// These were generated by using 'icns2png -x -// ../MacOSX/BasiliskII.icns', then using GIMP to convert the -// resulting .png files into "C source code (*.c)". GIMP doesn't -// generate corresponding .h files with extern declarations, so just -// #include the .c files here. -#include "BasiliskII_32x32x32_icon.c" -#include "BasiliskII_48x48x32_icon.c" -#include "BasiliskII_128x128x32_icon.c" - -// Set window icons -static void set_window_icons(Window w) -{ - // As per the _NET_WM_ICON documentation at - // https://standards.freedesktop.org/wm-spec/wm-spec-latest.html#idm140200472568384, - // "The first two cardinals are width, height." - const unsigned int HEADER_SIZE = 2; - // We will pass 32-bit values to XChangeProperty() - const unsigned int FORMAT = 32; - - // Icon data from GIMP to be converted and passed to the - // Window Manager - const struct gimp_image* const icons[] = - {(struct gimp_image *) &icon_32x32x32, - (struct gimp_image *) &icon_48x48x32, - (struct gimp_image *) &icon_128x128x32}; - const unsigned int num_icons = sizeof(icons) / sizeof(icons[0]); - unsigned int icon; - - // Work out how big the buffer needs to be to store all of our icons - unsigned int buffer_size = 0; - for (icon = 0; icon < num_icons; icon++) { - buffer_size += HEADER_SIZE + - icons[icon]->width * icons[icon]->height; - } - - // As per the XChangeProperty() man page, "If the specified - // format is 32, the property data must be a long array." - unsigned long buffer[buffer_size]; - // This points to the start of the current icon within buffer - unsigned long *buffer_icon = buffer; - - // Copy the icons into the buffer - for (icon = 0; icon < num_icons; icon++) { - const unsigned int pixel_count = icons[icon]->width * - icons[icon]->height; - assert(icons[icon]->bytes_per_pixel == 4); - buffer_icon[0] = icons[icon]->width; - buffer_icon[1] = icons[icon]->height; - unsigned long *const buffer_pixels = buffer_icon + HEADER_SIZE; - - unsigned int i; - for (i = 0; i < pixel_count; i++) { - const unsigned char *src = - &icons[icon]->pixel_data[i * icons[icon]->bytes_per_pixel]; - buffer_pixels[i] = (src[3] << 24 | - src[0] << 16 | - src[1] << 8 | - src[2]); - } - - buffer_icon += HEADER_SIZE + pixel_count; - } - - Atom net_wm_icon = XInternAtom(x_display, "_NET_WM_ICON", False); - if (net_wm_icon == None) { - ErrorAlert(STR_X_ICON_ATOM_ALLOC_ERR); - // We can still continue running, just without an icon - return; - } - XChangeProperty(x_display, w, net_wm_icon, XA_CARDINAL, FORMAT, - PropModeReplace, (const unsigned char *) buffer, - buffer_size); -} - // Set window input focus flag static void set_window_focus(Window w) { diff --git a/BasiliskII/src/Windows/BasiliskII.ico b/BasiliskII/src/Windows/BasiliskII.ico index 60901afda23a1497a8183520500068eca0309c75..0c88aca1922c4fbd520ffc047678110d490d7509 100755 GIT binary patch literal 143930 zcmeFYc|4U}*Eqh8c^1kn6loHbsmM?&2??ce45cz=igSzy5hqEJ@l?l9GK8ekF;hsQ ziHJ-Ui83bhIp2M#`+4sBxu4(nec#Xfem}oI-sSA;y7pRYuf6u#Yp*?A7XS?Kf}-LI zbY}tw7J#1sASJb&A7lWqW(5!y{*}i7?Bf7fv0^#D9_6=i0V)ruJR4;30379}m;aS# z1E7l0%P;4jA^Djy^zzGj2WEh?n^1)aFdzjjo&fKVtl;3~{CYMFZ z%eSTHKVO0o5n+OZmv88b9#IO0s;VkPpe_A?Mx#HWg#PF#`sIHF-2aVK94qdhNXfss zSlM?_NPpy@^vW*+BPp4bOey}&#(wYDlP@J0fSt6=77;;A#Np}SOG%1BZSti=(E0Fq zFA5G9fq+O+i$O3;QKjP%B6*pgM8eO|ft0w+k0&kjldeY6=mkimU;Lz{3UHLd$e0+! zPodBoL9cKL?@Nip&&<$bW{698dWA(e1inRyta!Q{B1LhT|9r9s4yWo!DcrLMhl&s> z^ade*9L00LD$bX()%~235)R3yw+zY0#U;`;BE{h&abA0nK6E*Bexwk(ktn#xnFw4Y zX~_~x7AU5-YzGO4M|u(|bTiTUBZzTyIYdelJ~AefLZKiuT|OR%EVN(fB#9Ie8A&Al z(O$ZRJWkr3Lk7j+NR-l~-~4z|qK^=2Q6j|`aVN*n@pSnSzQrDAkY%P3mP8`Y{K1d9 zh85Xt2^|;t5B~EMPjkA#=nxsPgs1C+T8v|jq>&JI2PG*Y@(=luq(pZ@1VYEqh?K{; zKjh=%kd0?46fJrsiA(q;eIkg(?sz1gZvI)yAN;6O65VkW)GTwlvP=EG#P4;U;;pGeeg zh@F_6ykqG{Q8gza(?p_vtVDQHY3Z+DqUUjB%SfUxg>HWevUxHx7~MHg2LtP}mjKRlw?mqMiYQYgeEU{z%!B^M(he}z54f5j~4Q2_og0vfLfmSWLg?~}jq z6Oweg7Oj_&ewU>6E`>8Pt$Kz4Fh;MJ_y2N7>Mim8SMUEf`Tq~;y}#O9^)Gi!RWGs! z!dKDlgYF-f>_wxE|FYx!-`SZy&q$%9jneOV2GE@P_YjOG6+}Vv%F+#8(c^#bJi`j^ zs0IYASC(!bza5lw*&#`)%VCo(A{mbcfqxu5zTyEQ@#-kX;Ymp|D4^r$d3uz`QPj}L zB0i+&qfpR9Qvsq!p@AHU_btZZ&=i43bQBOHQS32CF<9CT7a4^DKgv^1;&2pIoZXpU zbdotff+Q3?suduRQ6fB(W5YTYBK5(|uKWqew|KV&YQ!@HqcOIZ_;o z`4qKfdA<*Y)RR02O96{69~bA20yKg4OCO}Y4@uRF5E+$-!ZbbD_zUbPMxlm2YZS~5tn9}r5ye8Z$iP+FkiZSr_Iu;v}R~klDzJMP2L?PQk1O?5^ z>SP+-NAbRDcs!aWXOO`oq7oy{Q(|Uf5EF6)lF{y9vF`%YZrqXp1zMUXX;z8CDdh7=I-Uy8mkQqEQox5~HSM>Ow?q^n2)Q`l-NZ-h~U^ahT zMB&W5F4SlR0T>w_2E)TxFflQK*A%rzlUQ4C6_NmxYiS_!7EMR45fF`UL_fP>#1IO$seP60XK zNyvaR0mZ<3tOg`3Ye4u=JFGua2kR|cf!nbQgid$D2D_)AcJd|2xwe3U?FW!??S!57 zZ$QcQHE24%138~=Q1NU94NrtS*998B9l)vo75EH$LHNiZFz#OfcJnz{d2|+JvHc)r zLj!h~0T4br0-_$DV5Qf05J!pGj3&3%55irhF;5$134DLUH%lii~cvFGX zYYxDV3Id)#K-hf@_|MG&pZ`3F`7gkR6JJ63OdqT}_YpREeuTB2Utul&J8TXd0oA}E z*zC9nN~n%C0W+ZHJ_EZ?)quX|Q`qa(2!?*mVCqu^mVtF}B%l$Fpr7np^<2IJ6nun(yL zhtO(pimZcE5e?|M0nSA~0pBan!T!QK2uOSldKbQddB`YeUz&nL!E2P zMKF(@Mtq;aCGjhGB@e=xxH<5Mn}C3{5jdSrg>#vUKuDv3R~8k5if9lTdLGV)5g{rn z3NAz?LG;xdfI=h0UQ2=-H*Ubi*t?LBatl(fr^405EQn3Yg5;Yy5E^qIVy;)h&0CKk zH8mA(W#&R=Rxae^ljptQ6UV#zfSo!$Z|cRL~H{xc{pt%XPBZy}sK z0Fk%8LPEiJNWS+Ot`~lT@PY-n_2>)Sulxv=)wNLa^aB(>9fX=EPoVzUb7*XAg!;x7 zXnxfKZ{NO!H!bbZ*3ktYK74@sS6|@y>wb9G@fo^%Kf|X_pZ*8W2bSZ?fA^Iio$dT* zfQJVXua=elZ4n#me?g0|9l%;UIyzcgqp9?-U`Mw3D{39q*%50;AYiTCoX`UCFW~go z3Zkq%tkD{P4p=8AyXB{)YdeCMSjY2XVlU{A%V1_rwz&C|x(uO?Zgwx~e-~L|uywPM z5Nl}u&E9HFc3j`H_=}&4B|G8&%pYrwRTZgk{$0SzBNh8>;x{{W(1~oV^C$Ulv5vdM zBwqaDZ?#T!lWm&(gP)2`^|1OAe>;w@(6e9smz>FttDAqTkBWtQq*^QeDzL0G2`MBd z@k=3`2icmX`Jd!hApz=t;%~<~nTUzi*Gq_riHKNwq*|~r@r!l-)~L#j?4kc>e!Q~< zKQF(Ch=?%aCzGw28Mt`(_=M}1v_kU9zZ4* z2{+UA{|o;M5fQB80b!A43tehKJlHG!P+S|Lvd)jOf zdzuISU-(GO?cUZEcvqvg9HI0lNrT!~_^GhtU5DyRklKdZd zY#OpU8A-Rc`Y<{Bulz_MH!E>It|k6?8;>+3I@JS>gpXbA?GrQqs!w~YwY91+7Z2TK zY*LZ*R3|LK&e{?Cwd+Om$lvh4!di!kG4a$>sm0D|^O)X5wj&M}1`Rx`BtcX{kuD8yWj|{KD;M)JQOK2@}X<=kuKnyu2@#_{XftPMUuw zznx@lt;@s2LqG#q1@ZGO^Dkgi-F^?pfA|~Hr@0;LY$V3SMUOxA?MOZvTXgv6c+%Yd zD~h}j5o<>ZVI{b@tXR%*(x;Qt4#wDiEP_3BZs^fY-E^Z4C>yKT{o#T@~e@?_WlAYt|uQ?FJ zd!+ptkV|4kB=}ZfJ*>Y^bai%ibw*i}J?v(F`7^RK@h2;r;#<^JDsKKW~(%0w6b z3+Q`PdP1;8Q5n?L)j?BJ6Eyc2!Ja*PVDH|&ps%kFhK7c4`0!ycF*SoDM~=Wz^J8%A z*fBVC)EUfX`>{2pbAI7SVupiGqNj zQ1A=90JdkZfUEya@D7ZH-A-v>;+6?U9vNWjl?yh$d2kGm_Md2DwpBZ5E zp9AIqg!5kn2&4i#VHP+Di?G6b5=3xgu)=>FRvHM+;HzP`Up?9rR)Jw)J?Qwo0NtRMU`D6|?+_B$1XBQaJ_Fn$%h3MsA=Y zaGswA2%!QCN)S#3j*vNE3#9>1@B-Qw(ts%n;iGB57C8@W7Z+hw@C2+1{Q)b_&x1h7 z0;~*Q01>pu6AzmQal`{xXt4Ie2--(}MtjInSRXbC(&wole_#7AZH8$^Tw9WnZm=v;o`-M5FH&2 zF;^1c>eZ_dA0H1XDJgLC=1mB_lnSAjvmoN?U5H7@hHJ^0Xm6PYNu*nla3ddrV+w(s zo&_l6!>wDlAUiu7^7HfI-o1P9@Zm!!DJg-+lyWF9FNZMFGl)%n3Mtvo;l|x2h|c~1 z$$9VLLB&gWT+sjpC2!z1r3-RPIv^r%1jxn1aIb0z9zOjFk88g!y-TjEs{^$Dh34jF zc>Ve{w6?awo7QgV=;(m%?rvy!{RLjU>4%Q)0qE}e3_ZPl@UCwh`uh6dI z21x&=m)e_c5H1iG7v33Qis32hqI0}6CGPx9uXZ$*VB=r4N_Z#U2gAh5&Mo|GsMVCX z_ZR(Pft=Y6o>dPXmL}ry5+a*ca5()4`#kWS;=y(#G!tYF26WW3#=&{A}#(Ji2&nO-;=cN7DeJ z<*Q%yBYLTpnH)D8zu+ply{1^j^}0TIBJuk0Z#puais?FG7Gcz`PxdCJK0f#WeCp62 z^wR1oikY4e%c{YlPkT)e4Ig0ZS>5{wy{f9ZRL4w?nSH3=HY^|jZyRH3+fe#o=(l{j z=~YbCSy;MSOah2DH~RZ?Oifktp8Td)RafP0F*D;~5Kj*v>WK(F8yw6uF;y)1O-Fqz zD6DNN$HIJjaI5vq%b&B>szeoM2b&C2y$E9@%eNCdHZ-vgtEy38>cxgRiWn~5C)@PU29}W%< z;N;{2XV0EpT7P(Zd(*$#Kx>a65HyYlW%DRdut|ZfHc23FdjlkGvSE#7Du_Fjfw4mz zn7YKlQP%`?wtXF3Q8#(v!@wsX8XRzm;2e+)N4?WvpU)#W=yMN@{EAU30aM=xAnyDW zxSe0YYVS9&9<4RD;p#!fyB@7CYCze)38a0|88*HL&F@{XmGB05T!%mett%M)e*#m$ z6k2agpf$oIV1m&3Gg>bQoI`7bb3b53;5hIHEr7JgXOPAXfL!1gkn;NqD!#q2->(|> z1=fPLUjqc3j|IPwYv37?4JRVX!T0hb@VZLmtF&C)7hVpFanSOSRxkLq~OK5EnHV%9tQy>{K4Wh&!z_+wEmaMfR4N?1^#cfZhr#961lZl0 z1+TmX@Xn(_NJt2Tg@r-bg=ioWiE!!CB?u!XLTqg8(pn%nIT=W#>r3l_uq$~>>ww5> zc_^O>Ay*0^ET!_-{C|6C{?E(HTRKCg&;7*o7Z8&62Cn6|!kxl8xbxr@+$#M5!C4<6 z=HUqBSM@+v%@EwH9fIoWYIyeS+0xwpdp>{J`UyI^KEsFZ&+zf%N9g<1zch#cyK(rx z_ivanJ?=I?BpRlkE~+UFR2@vZ^K?uc zSeUs>eJPSA#2IJ`M8(A=7^T1DvGZ_n2x%%`$;vWNw>pZ@NKRbbA!R{kRxa+%%F3e3nwC~Rzwilhn#!y! zg@w2Fs;gUA9(P?@|IqpA8Zl>y-}q?B zUCIpXyDW9s!wU=X>LS1JaYQaxWegK)CmUMJ5A$|4)k*|CVSGCxLHCo#M5j?Phf*Qi_4;V6O)lKjd#1`?X; zDs(+HEiBYE=|2l)kd)C>R#yH;x6-R$0_N)w_WSwo?{pvffA{`;c^><{zh2VlpXM>N zRsdr&8$d@spm)RtPMkQgv}d+G?F}cL@ZjO$f!?_iz#A6`{{H^p>lX+?K|vsf-m@y7 z%>y~l3Q!KHgri=G;B+n=PWeQ`Io~kY@0|%pd~Sg;E*JEC?t?h~HEcw4(q^w(Q1)$w zZNBeeC!rH0eEVQ8davknJ^}p0uY*Mx1&&=PgHvI-a5_8>TrXt9naDf{h)e~1^j$a; zT@FrY4)M5jA3S49fsjxNs%T%Q72F1*=f8p^dN;@vjNY4~_lp?%{DJnIaFGf^;o~57 zX$B;&%z$jz7f=X6^B3_OtiL=9DwifeGwCNNCC`BF`Bw0{Rs}fH3oyJs3KqA2fLCT8 z1Y{4xiPQ;jN*x2Y?4RIqZyfxK&|a{Riaxi9SbBd*-~U~Vz6MvWT!m}buKlt9qsRE9 z8#$1aTDTPB(E^YDsSbpsH$d9MCdhdF9(_VG0+ml1p`dPgk5*e-3te4Z%klc-@}BGO zz3G3k|7(H&yaoP0=P@Qx@ulquoRB_t#^KBsmHj7oi(3QO9Fu0Xu&`8Pa&mG~S%LBv z+gI?Ih^R4HIyvcy(enbl44lGh7z~Dew+hN*kDvmUD!kSW}Q&UrLUdmfaGcg#dX&uxNv02KSi1K38r5UVGsR=CQdDz4;Dl0JN zj#}t|auX{H8=Eu}?}{_d4)lp(r>d%|ni?;Y^rq7yYW9E*5B2o)b{oJ7Nv+*~W1^+A z;E4bF_cugiqy5|*q8vyx_W?a!^lEQ8u(GirjFo5BX#goWpsQnszy7V<_ndfJ;OK02 z_p4)iSKx67r?$y0y^B#YPHDP_WAkb+%9vWO@r^tAMK*}|<;Hejqjhoi-Tp?_3$gfh z$!f_BAJrP7B+h(%>f;h+{c$hA>Xh}Lxa3qf-%wXSGbiq}e$BSGa>h?u&)-nTRj{g6 zcztP(dHI9VBGvoi2YZXVx9yka8*PlGA->&~HXj~3w<$FDZfMnx2B*hN?G&#s8ewBL z1%W@f#=5bkKHS)exExFt1(dBs1L92jSRaeEe?QKu`~sYqjGsI>fkct_u$6GPt<{rq zA&X|RD+{Gwa6B*cWB&9io7q|tG+0*F1iS(CvYe6(GeTM%|B0$qoUbJg3MTiIhHoxip>vFUq z!S#9KdR1#$%->kTz7VV4w??UN=c)egAsUaT6~h|0SH%#=^KwI0Z0TTd?`i1L#WR`D zPs)}GZoONca7OX7#wmOy%cc)Fr*LHxv6K~k-rF>`-&i*$GqETY8q~8bu(!KG<6{|X z;(mAhp$4AG4IGbKW(}{IpUE#a!U(XL2s77}dFOlR>DX%N1D8!&#qsf5epFjH@L zqfOsLL-x+(72m>hn#URgtJ~eRp}HT*;kBE&QG^Qwhh|?4ap_jr9I< z7x%4OA#JuzD(N^!Wya=%588&BT50059p}^|)@xRobADvY6WaHBondBve=I8xL{z`M zXSy5IaU%;a&Eys^m6f_qm^iC4*%!KyeJ)UaczE8Rz)-I6raY`oX;)ulMK9^vi?_4`AfGM|Y3! zFe`4IHo)0$ahJF!K8X3U((>b28^!-I^_f~_<%nf_VbtOG<}$*!Ma4vk4_ zzO|G6#mdZ~;#}E6&q}e=u^mB;>&9}7Z}7R@o(PEOrJa2fn7MY=r~}0kLd?d=MVpkF zYIdt2usXDB_n7&yAol(?KfbM(sBg}fxThQUh86F+?%}(3;1!?8pnJ7P>W+bX4aF;2 zLOyl3D(F5HGRu9U%Qi8a@bYdzzAWDhMx)*5!fcM4zH~i_8&{3i8gOIp4)i@`cX{NJ z?R_RGYJl>ZT+Rx=w`OVkJ1bT`ZYiEWkuU!OmuI%0#FlDaHuXlhXOD1wrd#&GkX}Zv zUd@HEC#q7O)K$_(A(c1rLt|yT=e%Gu<59mew*0)TcFp8{Og$H`&PccQ)z4~ZeSJCp zE%uD>`P4~A3vsE5Gi`4QDIxvNq{ps7mpVl~T|PaS7Ms#8#aXk5h8EQPysp43h}kdo zrfJ}UFd^BG^+rQifCU;;+nghjvah%zNvTB{a~4AQIGRl!(O(vA_m5KA`UBqU*fMx- zaqC{(c80G{K2YJvAZN$NC|w!;S+cbG%Bqwasmhd~$=l4~#Qn+VSKRk`@lh)AY_G$( zF!PK_M}H^xp`xhNd-d_(vmPBSzCjDP64a|P#xhpS`(WEN&fIgfgQfd5!?b(Ld{ca6 zu+4QTzQHKm2~GB=A>3@awvsJ-XPSsOMVde3LiK!4@7+GlX3;fCRx8G=yU#bOI_^o* znb3=8p=PdGf!`5VW6wl8q1Wr3%6d6-CeQiiC))M^(^U&)_Y*pqQ^#KI;ax0tP?~dW ze9!7m$d9633))k5?1JKST#_V#mG72DxYVXp>j1?fb5le|X?rRnTlaeT6r3 z<=plA&6sf3)p*;J8mkE+RUS38vgy;jljARf#!txJOLE>_i9w_3BnmlEUbQ6)|Byn?Z>@4`d+SKs;r;qOY9+PHIY|r`LXrMiM7EO!zA5r zYQB6rCp1eU9DCWR)mC>ts^q<{YE2C`^M=-QY}9(^+2ag7+s^K+W;K`dxJkL$-sSI0 zT+^VxE!bpLPK9b-(rSjPv74gU+Ix8?H!9FfV)Y&-M1K!58`}9k=#X_$;x)h1kwSd8 zRfbg0H7PJ_<$U{6F^nCZyER;5DP=X!8b;W)Mmv+Ua^(|Fwm6#7W1d3>pJzyQXYjG9 zFuYr`?cF+t^>Q;|<<#26vi6kThjNd`LcV+XO1eqsK%2>}gUU~Cb5t5JiPbuduxsAC zo%}53tc+)mbJ-=S_iQ?AUgcpT4vu}c7RNm6bmsSayVJ!|YowO#jZ4^fi`MBUo8{iB zgxO3px%1RbUSE8s`EyN;*+vbo2$EUj6SM@&Q818&4k=3T|b<52e*~`Z?x5BsH*e@%=@K}b`QsCH_taII@?+tu=Ql>#kbB+{4m^i@b>P4ihSM3 zGo`8Kp`O!qf}2$MLK^PJj+qeV_xY|$TlCJ#BwR=zm}U%(5>lWNux+kB*zrB%P)nofxs~ zYBCH~{61A86wf5Xm7sl4NQ*EmzJ~P0b1a&#j?H3&NeYM6?t``_OuZVl*3+wXpPJ@v z;1oFf)_H2tGc-_^t>U6$b+K#X%1zf|Lx_62dggd9Pnzng9W0NUh%^z%t|7DDSM56Y zmJylpXO*LK2aRfFZam{%WV5SHJV?ZKHFe!jrOJJ;0?d^IL(|7{Wu(Gw+Gd8lvvGM= z?uJ4^l*=$eP_MgLp>(pc?9#Yl*9Ues{#Wv<@k{~p2WC&jFbSR;uORg7KK-?5L8u>h z|G9)o%*M)Ht}^c9Tj7S+rmfztqv7nc@%r#6iCE%lX|_q5##{D*#y7xq$)&@uzN_P< z`sGhMFMryX@p`wCsQlAU<5uW!V+&GuXn1)0*K<2N-@cu^*RrsV$t19i@5OlTRnHAa z>x17a7M|_Q-BtNBCeZCv5xLoZ+f{>g0tfEAy*fTV?yxcb;;pw|={F+-1KsV(21@bz zdyC$?$RsxIotO=fA-`15AKp1c*>QP~lBl;t{rITuWTp2=YJH*y&q8L3JeFk=T>p?f;u&Q7bWj26Xk3L*3 z%_G#wcx+{Q#e6PyjoQkG{5taWr{eg2Hik&K2)?!tvyo%C!K5)s+wb+Rc#F}NAY&o> zdXGrmHAqVO>-FRK>$+=n)?7`^&%eAlKfN}*PM5)%b#@gQd zTZYH^akRQ1$YUk#Y~)w}CSJ?6D0pNK3rNYBgNFhdVYA%`H8AyVx^Z_#fjLlBAN3 zrJS|m3AN^lPoX{9+p4nVc8o5M8skZ$>vv9Wl1kjumM~GxfZ7`pL0g!e(HFW7pW>|{XR*V4)&xuCq{S8(-T|CFFvR9heks%Kf{$MnGn=&6;l81c|V?kw|6xbGoMX1 zrb|os8Q91U%0^26h)7#(l~XI9ILg6oh*_gA!w*OVtrGdiz!-MrmITnfMR}9;fZa}K zv)C3K|9YXBx8drWtL%5?tC~$^&v+t-8eeJlJ)N_y?@0vXe1h&mk(-xW{(gtWscTL_ ztr^W2x!UPDNgCHD2~uEMbH69j+Ga);gF1*T?z!5xq5XW$`0ZB*^Ri>LHw$j(*G6N8 zA~dl&TV_QI)t45)YTorCDm%t&c+w_Jl~3l?=^070zP2Lu;o3k)b*f74%|-r*(K%V# zbU$rHOjMs}EECdbWXzDA-QXrzmAJFU7Ufcha49q0~n zny8Sb!fiOptq$gDb7c4hnRM2l*!poC-(c|&WTdkO&I!x#J?}XZZexL=SY3{@Tzz6> z#`j%i#ldTfTT=D#Z>Dr8a!xMVBSjo)JkB=r>&_%v)sLlEGV0#t_uMR)VZ45D_R$9E zkf=fk;)=9OiIWaaUWvlJ>n^N?JUQ{8`;N$78;+lQEqC-Qg`S=}kAHlNP%!@teNH4h zaR0+upSK#0==$T@)a}$V*F6STN~4WMFW`=+5Ha3WabZSvlXE zZw@7F<)q~ChisV{n#!K8uJq;*N%?>|a16OO^0&=`pI+Udg$!JM`#_Sw%p?5~<9GE+ z!>Ks3@*0LaZaQB`J^kUQNC!{I5Bd5D2B$bD@$)BXV4e=H;l1QvAh(A>YUlmuC%L5W zzvh3^;Vdw>aV9!Bth|ey?10{8)E+#L0Pb-?x&| zyEJnZl6RR~&C1xSTkKV{(%6w*Tw9wp?ysyj*|UM&o-f6bP5Rp&wrWYzw*s4eYG-_V z_E~WT*GAeNE}y=6c5C|;R=@aOGDF;}gVIFZHOPg~7cO^0z4lWdyrNEBV_E#XBRi8I z7T!Q1n?L^DQRY;SJN+mncch-Ua0^{y?b(5kpXD}W9cb*P4v~L@pO$xJVrLIf! z5RZtMy!o{!M9TljeC}Za1z*bR7gYIU_DG-kBBAw58)KkJ`|!|^{-Yy3^a4Ve;^%0V zvY`%2L#!;VEsoQRG|tK9Z)bw0Ni`joyAN00UM0mD*k69QxHClMnCFP%_XxuCugW;# zhMhNz8l4WbUVS{6+FQ#P+_+usgQ4W^MzW4ZSxVKN^aDn%#cx)*rM-0QP1>Glt=b?` zoG(-Cf4h30@z6Xi$NfWHfL8J6m+qD$n>k}*qAI=RcMqORYoqzaK!v2Gh@Vl(D)+t` zW|Qn|k{(CTpT7KQtl|ToiXcnasr#`eedf$sp~AsRm<&=+!&pb>Gv6A8hm~6v-i)dy zFXr59lub6c;1skdI_0dYQ{ZkUk4e60+BP&g)ipO63Pw^)C>WTnQIzMYSapv&_Ey|7 zDDEoM)z_a&e$enUMTy-?9HWbu5V|UGgeB(kx-U1>-&FYajSm?44Rxp;3?%j>Hl3DE zERuL1sef$2v);0hxonkXl~(Jjnc5#>8tvY@*($RKb;J1=)Fs#jPq)7yY*0hz^|Ivb zno0L=uYswo%GEP*&Ti9_#e`Iu4ux#zl8y?CEwm*FuwmJS? zOeXJ|91fxVAaYZh$G+Mdzvjl5PPgdE4~JII{it7a^_g3vR?mUk`qUMswjN+q|8kS_hW%ya;y`S9obyk8(c}9D>7QP0&FX1@i%51d~qo!r|tlU)T z_~nJClAt*J#TCZVbg9E;7w>+{vM$!LDzZi29oEHLJ)`j@EN=pKV)Tl%uIe$p2=d)E zr)ER;l_{Ytc)Atj96++`@_0*8K_(LB$e@d-Yc)Ll4@$+D^ehPcGp0}zM9EJ@ar#??;rP>InAvHq@J!a)wV=rVJI`o^5fyZlvdVgkXA_8S31EgexY$)JT*zyAxcPq(+As zQpFN@#ryJZtFp3HaWdpEr3!?c+qUHfr)@Cdz`APlMx`ThHVWp-$>;hbrM?A96h*Ia z5xH{tx+-Z%{Doj})cOSdYGQjpb6pA%@3^Uz-&px}&Z41aUO=Gyle-%)MLJcU4vk4z zy$~1G7W8dlPW@n*wFRTeO#cr3zQnH@foAFAvS%h|`=_uQ2W6zX+8mVhgU0pi+CJz$ z=`+{;kQr{mph&^Q8YD(0w(*F6?nDbX9~6HcfIW>RPS)7l!hPpvXyZHC#K?QyIwMc> zdX5b z?tpC5U58I?bu6AdQJl8Qa)B?GPSQYsJ6;8_2Z@{6)W62X(mr@-R}1vZpO#v@k7TWbEAb1*Ol%0xpg0waCpny zn6u&HE&pTpc@z9QW&aojalG(m~S zw&P83&cIcsD|#{vHEvFNb^;5E3|F$u-oAXqdH~0)a$Re^%DL|a`Q@3C1zSGoYOLnv zvM5xZzfw`TL3Y!0=eL_e1C`?G;-{$@cW=`w@q1ElC+foxWw4y>cCQ>iQTxT9=PT+8 znGlx{`0|Q|C;*FDS zB;nTFbbQi$+$yTmPs&QgTFg;$psCB|DkHc#Tj@4_^u*O;w$Ge2$qI!jEoFpbcTb({ zjwFtgHc%bSI^()p|oLdnL3OwL%QH^aqIs`f?V@tYgjE6=+#&e@J1 zQ>g#q^K3P{r&1~rel#53_+3IdP)EB;5AJ7Lv>NlzF>We$4YkQjAb;n*GF*cGrzzES z=7AoqVe78B^KV#h^^Vm{T~c|-XLyJ4Y}|*V``e~|{9t-eX~ZBk@-iVbvC))u>(GWx z$~1+(Xg|$zTlx3n63P zsgvQUW;gxe_{Kosmem`n)G%5`$to#E!n!_l+Mv^mMW@x5-!Dit%oonR82-q8WIn^y z|21uGluA6?rPW=m9$NeN@6Q`wHAOwU87~;Tb4-p)lrO7E<96;H-k-1KA+S?$k|HjZ z7yRwwREq@u@MDbp1&OKooQj)rM;q&2W_J?b))bx9De;cru`@K7hbeH)Y(1&Y zYFM<~WV_b4a%6hfLA7#o7d`H~aoRkU-PHDvO}ZaU7lme$rnm*n!bhlKf)Jp{?SWT^4JNlm&h zTQu)|6nr!8cirWk{v}Tlad9rTij50H6}cQ7n5^|ertdbxk;z=9R3{ob$@Yt}H?t?aIw1AA+i6Si0|vC-Jcar3_08QRAEBx+ zMMLX68^Q)f4UHF7RoZ*!*Tpp)5U84nE4ax0-n!|BExx*PanmCrmTP3?%5Xn>`>;!@ zWi2azn1;I)#tGV-UBBbHk9+9OI%k%+14>MO)ZuLFsp%gFG|W!y^qsILa@syg+Y@nG z7ISS?CCBPh^_>m#1aHnNrClYf8Iwdfwc94lQz|vFgWuk-Rq0S9MQpHT+oJU7&09Zi z`y$!s%|~?C@HJoGA@FL!ZfkJf)xM9Towjf6yW3a>+q>LzX3#qd0%ukV-h-!e%R2=cg1c2>|^gf)mBG~!)t?&2P@YHZB!9-mV6d*OHxnA zeE#&lAxr&*pk0G18X5-c;R>>j7i^*1)6Q8xz>=+=ieqB zsEw7yXk$B{Z>7aM&}0u@lqY=Lq2oA1NB`Y(RX+C6v#c@InB zMA*+OgJb)sr#^Cve|wyFm!_qpq`OmoXtuGR+S$?J;OICmsrb6?qOFjaVqA!8()~6a z{FC0aoRKH-7aS^8wJaD1DhPJWM?Pr_UWlF4^W74>J7L}Pq-(tg>Eb=U_jR4f=(>OY z%RElL>l)j6|1{gUj8&c?aMQ@-cZ6-V~u5CTIWtZ_HT?y z`7586mR&Z=QNLXZDvaIpFApi3aTauF}8x_!(E^d(DqayUS<1lxFLp&8yDi($Fiz=!IW2t5F zA;otZPv!7caoI(4QRVM{yTUjZK5KK}M`b~Q!h;FkiwV^qYol@xR(=gj)oSsSVC_iL zBoCDIJ$d&eo1s9UCSIEF#oy zD}7d@O`Zdlx(Zjq*K(>}xhP^9ymLzmn-h~Fql1{*Q6-uytw{Ct0QIu#sU||3_kr6_ z%|7-|(3+Z>>R3eIHyfTf$yPe*#vgQpEdjXidCUk;Zhw--P+;=}DcxXRA*W(*(e?nH z4jh`7w7_HA54C5hZhr4T*BXX-cgd@`R9CK4+$c);(S&u1rXIu$jg0)X3`sml^Y-x( zZKCZye<$C5h2rMYyQP>CyP?{GN8Dx7-H*7iJj18lDd|Bkd225i!O%i^rYtMIs8G`4 zUbPQCuC92I(-?!kbg^Z*w{T1K2QK6ks|cG@&o|BsE!2`RMyto}Y3Xlz9F(4C#ArGx z(a};wQ_*AX5(9` zXP4|zfAg*b8&kN7A`SM-I}E2VD_RyVe9o2G_NivNc-4u6lZ4tw_eI~HrjqmtUz$il z&lZQDJ@hT-DtD~dod=7rO%s{i^JboZKV!4;HT99}<1)q&?nAVU_G6c4slnww1qWS5 zzPF#vO@F{%QDXL;rG>4R|B2gz9m)5M*=EMcgf~59n{6jZn}bJ2Mq*Jg?(OM#=)6eY zdR5ye{EPo{HEqi7w~C{aqJ{Ij$`uOF{kV4ZY0K~%Vy~y}+YyDRXr32-?|l@e89%M* zRd2sn<-qJqOEeratWh}Zg*hz{FxexxIQ@VYa=G(vxR%{OWfODcz6@%Wq}W8>P3F{6 zFb+7@y7i15Q|d8H@eTi`O2O86b}#2Gsx6gcOs}b?HPZ$4n`7q|89fThFMTC#8r>|! zyVa4V(PzKnqA12{_g&4oyNWcSld81-XO&mdDsxiNnPqCg*HQE;qH$m`kkeM!|6Yy> zXBBfkqhM9^;{4%!=~KqrxYpr8~3= zcQ@&hJ@DZ1*LVBJP*&iqn967^?FOT zG$tw(;7_b*%}d^(6!=BqX)pO`sA*3235PYoXHz*ZSeTCu)!kUR?#(-%L)`=yfq*WK ztafhn4HdJ4vvWqC{N3Y0zGf}cFNfz!-CD7$Za3PG$K(yzsM0p+_;uxdv>P#P-u{Ba zSW@)>%SO!Ry^k4K`v%@BjF%_GWAYT__zufoKNL7*O4Us(3cRQ&m$+e$x=ArA?Z8X~ zT$SyARxmEQ#P`@XlTtX z`)2s8fLLJrCX8Wzusn-AHiYLf^@CX1aFr@!Xu(Svd*_WiExST?^vnqK%@WPSJH`yD?+-BCwE*XYX)QB54{qfiI0xu#4jualHZI4ix%@B$0Xs_m46 zLu7y^uki_HgSv%8y{@q>g&z98ZwFYiie3+|&N1T14Q9SK^<&dFwIA5E>{$XAhq9aB zN6rb|v~9-G^vedHieKEmm)gT%RP!}@dSb3gGX4M1^p;^!ec$`=3?VH@Do98wEe#3- zf*>UgDls6^sdUbOA}Zabgi0d=(m6;g1J6oZv4bLG1#FA{HqQ0y)hzxb}EI;ZvOWzsIUYimtwllF!M$T=G|;k5b&1 zPGwQlz(c_ns^Y5J-tL0qXJ3%{uP-1U$HS%eizx`cKTY2ekJOPP{nLy1JyX&G;rUWE zt5K3FDkMMr#l0hU_54FgE?pii9=Y)iP=AMl?g zH#%g#8J|MW@ipYcsgA^K0!=v{+UULd{dCLzBGk&gWT|a{3YpD9Sp!<109(;l!0RXi zeD>%G?+QcO^#xPze0iGDNGh%PQu6hB-ODjAfL3Gta`MMl(#uZNDS`OtQ2+2)ww((* zR)eU=vBOdA^nZO0ccK5CoPi)&d#bU4rR)zKk^$X8BEMa%nHR~f6QS_WUn`PidkROGY-?8{Xf#dh0Oo7Eh~@S_7$oMue%szStgqDdV5 zNJ9NPu2UF)ErM(1cC32{{gxLIq`trRyT}-Pp{Wlmi+Cy&gXzwFXT|n}^c1W@(D_}`fUs2ey=1r_-x}u$+BXqyc4@|0{z66QNb5ZA z&()og*29MW#_LVK3v7hipFdv6oj}qTpp2@#Nr|kg*9)Y+AL*V#sbOZ>(65^$dQ2o9 zNTKnI(R9+;K^RbYSyN!!AnGc_cg;P3{d%C?z2+oBAvb+(PKq=*+mNM9)0Sz)ujd8f z52WS*p`y8$K#(((lv%nT(OZlhiX8nXN=VdURd41MsGA+AC-+^91^eYs=)mkKSzG9&9IORN!I~CNC!%ba9T# z54@{2BrnQg&tlI5KyH#W?J`#vVCBT;?eT;@h&qZ7xmtYr9VtPYBe+lhxLlKkpuxME zqH1sdt)C>*_sHP?3}em>kU!?ih^Ayj+7ViT>Gpj9^=_sW{ znInC8^?C(9pt%ZmurQ%dp{kTbosHXQ9KmR%aSq+N#O-*w4CSAm(YE<`qFXRK`*TE% z9@q2oKJ-#~*gz^Pl}xg*lOC`c>wg#aDUn`c(bWS}kVE{5HJBTN*5Lxm67v=ZqFT6% z(St;@hiCing>zNJ4axbmvK=o>e0z!WY5HUbm9r9tU0(}o|F0No7uXk_HFy32;yVWs zNFZDHR~*9ca)7xJDf;t?9AqC1X%+ioAPq8sTd1YT>RDwMY zV3>U9dD%Xb5h)=C$6zqG3$KV}ZbUyI-eos5LP6Bm5~?PkeXmKDVD3c_W{ylf7OMZ- zW-2McIn$hUqHR40?cQUDbHxZWO$dh0mFmhWO#5Wn;J>X4P~0Ak8uBP zy=cd>)rMY3{O7T%7h$<)&5OAHr&DfEKF?_Z@49<|Gps#Ie-=B286NQ3c|qiFpWzNV zN}+8hHsFX)S;Ad*izi)-OHJXlXZd-0^E#^*bx3ByD=BT2ybRI^cc6|K#SYfH|G&V3 zqIDZ7epa-CI;zTSXi2`=!I$t*YGZao;d)e)N9-T;4K)x2Lr{n^7yRUf5ZKRB;tP4r zxkbVc$fgISh#SfMH^(wl=-b~9%3&*q$!;D(v-Ppv{iGVbT9K%Xu9_|~sB0MFtJmN6 z*hcS*H9hy%!MnH}-)sPhgYO__v3pnHI~Q(7u+pp2@^ZeMVOB~BOlcFS20Sf8c+$74 ziy>rPBPzr*WnRtBT$1KjSC11%OuJs+?)942hM}|<+R?DL7MmS9VOkEBLSX#s=`|8L zwhn(qao*wP0ZUB=@lGCZ@JrHS07(!(kSLd0yo>XR_r=CuCHK^pBb48Po-5r;FeD z1?hX8nVDHqLgEb+-Aux*ll81-1sFd{;(YSDZ*df%wO|(f5l{a;Doci2l_yks(q%qT zO`ymRg)Zf)SN~gh%s(R7dT~~4%@*osnT>Obn&A%X)4GK`czW~>O5I*|rQeCr!kN`T zS+OOZh!oX_Ttcids|rse?y-i`Hhg~{qbeIljBlXOB1ED40&e%s5e>qNT(OU1+@mPi z=y!CrcyC-=#^y9u>Mo|hpvqK@4)thvI2ZjGj8Bv{{ft#PJ>PQ=nMPrALqZF6eB&DA zEQI;%aq_b`X2O5p2ZeAAuPcsVM;hsbl1An|;V(fTga9&FCwENGR8hW((q(}r$mGM% zO_)TY2|LW$etEh85o|)4wIxRmHglh=vRl~w>$mrfs7&ODdK3|5Kzz#s&iMMkR*5{N zV=o=v&zqPRZEfE4tZ}C$I99FwoRNg@BHW4+Rsb*8fA!ThT(%EEgDf4>0+6dIXdMZ^ z;*-^jUX|^D-~NSW|2_JhD~7=7Cc$~(#la+A2P-h-VUJ6%BPsd`dJ>iWG=<)WpRwRD z36;OX`m7bJTSc)d57lby*gd7*MhHyxSo%_4sR;(5;2z zJK`0KT#|VG$11MP1_|ejt~m5co-j^IdAo_$L>ynqMu$asDLm{0QEDdM6J zUy|~Uio10!AtF5O6GK_Zh`%UqHHRgU`A4R6Kjm9Dk z)c#k&*5d_tzOV5%v-Nge?>sWgwA!ruq0NnXIt{r>xT>PeK;s)wbTE~ER- z%ez9*=KE6rQ5{%=tOC`hAmA4#O42I2(|pfJpF5Qn=qSG5&Z=yD=3SXxT_+G zC(F;6)uB;s7P9B?m#hkv{$>ysktPvpMw_gd@PS73?E2rAZ09;pR9RNaBvcij7QUa5 z{jl3%-(h!Osd|5y`!%kaVyB1r`%;h}#drMf zn^(oz#Enm|@9&2<-Uv*-+M$nLQ>b`R=ZXll0s_c-iuO6`wbS6F)jpi_X ziAe|b*^Ott72Q?-{c~h?zF}7!vuJ)Lo>Yl;cnZxX8edLVgX%$tzF###Y#*EW+BO!$ zGXSSFfLBi<`|cf;1Q7lT3kw~xD}OQvzc!R%M{ED6tQhOzXYuf_jbsAPM#h$cZGVDJX{hpH;`?2_o|YJ8Du zp8M;fYXQ^f|2-TXoy!VTYM|7}V=dUJl$8JmDt^iKQA5FR*Yq*CTE5!uGG zP;Jn0;KRhfsk46Dy%)zAOrCugN6Vb|+4D{RJT{H7k5!cHcMlgW7+cGk(-m6$I5K6ro4J76=xONzg=z~B~*mXZok>e|o zEJopq(*#VS)hAjwb&g0r;C-j|LPAcT+E|7_I8X#G%cr>5%}O<+pazorlOvDwp8a+b zlvi&TVzXXB7Yy$bPA)3dd}&muZ$}PGghi!~*PJcmYy_1WE-T@}IBAEIJ>bhf&d+X# zQJDWRuf9T16Mz4H;=B&6Wct|cYwdVUW8c84JcI>PcOr%2z?ZM0AQ-;>-? zkh)_n^%&H7i`4;C0ABSQ`Kk0D*zlgIg=%{`p@JX0c)^=Qd9QC(NIo?4ynspc-wum; z$L*oVsxv8+L7bW-f&uC*Z&FrrM9HShycxuQ8Fw?UMCY$*v3E9{%BU-f;K< zs_1qKsI6=FSU{QEy6t&62cvw4_88I<`)q&Fpm?$eB}2EO`zzY-d(%@#J>t0xDE%*; zN$LJuL-FnkLf>*Fp+yk8_vOq)fQ+T=C`W7uU+;OW_bgjI_9`I+l@k+~EpjJ9(xOA=WP>9@n+TbvW!w)3aeExk~BR>3&VL}$|*zzQ7P?PNBL0WPIZseh@2m=fM z*vUYE0(u+fus%YMooCV}OFNhPtOJCv$v{47036OeZ1F|y>@e(>p$HpAqBY!+apOtH z>)Y&4TYt4WA^*CmzhK}yWPR!7xfJ)iq4*QhugDI}G_G`AUR)^4pxXWK?R_Tv6!b|K z`ATBI5X*;xc|kW-goxyGuw0C4_~_Jb#d>ex-rkLw0kvnCI-**Ep)C-T|1xNddZ^D$m_`!OLs0s&B3M{;~h1*FK_q~%kKE;1_M6+ge|nc$7I$1+*}fe} z-Fj)m^t6<7qwQguRY$2nz-f1KOH=qILjY~-$ZoaC%MWklzn*y4g?E~2k{G(u zkTVe?v!z&;;N52T zbwi1`9mT7|^j{nXB*r!5PsO`Fd*QTSr*lq^T1074XMcuwaRktNV|oK>4l4~LlSC5F zg6}*sxZvviGQ#`v`8a&avmAyu7u3<*s^h$?&lgu2hhD-@S66WCFj<`-pZb- z57T$iVyGOW6b;*dpf_aQUCPOgrntWI3;C!ZUz5Z4Q??ACMJ6xX$Fi~FCWm3u9AOcq9o8btb^Ic1s(YCR4&0W;R9P)69RixL?zeKJv;L7++}15qq6&RzQfz44wBmn zaphy|09Xo1!x4{j=8@h^7rv05rQ%#RlVEz@3UHXJMW#r8<#Z;T`U~aQdCuDp+GoFH zM{&ws9wN7FLM(ZdMXe*P#EZ8$i@N_SowM9sJa5rMK}@!|m5+*(J2n{bP?MYM5&vEv z45L5D&+yi^yY801fC_*da@%~kF^9BXu-K94&26 z@c#%N1L0^-IYyl`C@bNe89}>*zFdq_VUa=d%HmF_i}jv*=}ZF8kf&E=8&I6-8sp^t zo?oc#^Wtdgm2CfgG-GpA{;~;`S<3)w5&4FqFT>pqo5bzCR+?ca@wM&h+WyzV%&f>z zMhv=qZ0nI>LJPYB`Ru_JD}}srcQ@`anB*oWXB_YPw8n#!|1IhhhHx(qqUVA1p#Pam zNTEmk(R!)Y`1srZ&jqMwP*c4`JiZ()Lm*t$zJQ(@F%uF(-~Za@=0Th-jQ$s*y6*fk zDcvv=QLXzt_4Gm6gZvq~62Du3sv(s3*TFEi?f2@q7J7V3iQo_~S^mgb|y z3NZT6Dt7xpBlk?(<>umtqSw9-SMg6$+s z7>@=I;vH$i1x}Ud9orJ|n(yWjuF5$_S`1792Ta`bDo5OkNc{a18>0lJ$@m2~XdaZF zvQaM>|L#XyeXh=w(^b-7&K@j2B4}`a0&P;MNT|OnW)tQ8+IOx3RExFcC8I@Illpco zylqizb*1<=_(>3GuIEhaQ&k7V;l!Ly9vKXBRP2#1-sRA zT_rdbioxyj8Z6~FT;N(%el-C}lTFqWKA@zmSAVBLKgHvBU8|GvHu_$juaw!x=Xnd3 zm7`+FTyF6feV2Psd!LI_Ue!R-&WVV8O?nQBd`opqz*(RwquuLPu-iE?acl9Db*_-0 zAU}9JV3FCbBojb^4Z#D~h^f8Y>iRSy2iRgJIHoE)(n6XFdg<`Vfd0I{haY!C<83V0 z&4pv|hzjoB&s_727f=>|vpuJ@kka!zsTaCmyw$(J)%{3)X;g)rzkq(ui)ICW-tr{e zop08x=L-MnyC6-qr~pcNz&|TEp7xC5HcOo5#gFzFn*F`kx3w5mjUW6hZ<9-tjsgOB z7TY?0&|)g;#TvcYiiZbMe-o)~KYWex?hS&Y@GS1eyHOa4vF_|d!x|qTS7U@i1xT8< zBTURLr*pAC(e=#X^PZM3$ajxkbP!?uO(o`VtJWzF#M0$Wwrp1Ki(JHq`{X=NR3FbN zfRtIvK9wHy=mwg1VAKsx-S>oV_a%v|Ci5(nX~6BQS!GG?z6G{-|1MHsmP2Gl(2XGR ztg0iAHMHnx`Bz4e_rG^zmz=58$b*Y=T{5Ga8*!xUjrjYTTM~TVhD+R}F3?&2>tW;M z(EWOmmZR(;n2F+R-lQWUpPvmRi0h=$dUk2FX8i60o2%jz{(PGUnNcVWk`qEi70G!Q zCPm_Ok}e_9pH)gl#giA5M(I14&np5%3J!+#hbV@`NNJi`G7Q1&1;#C#=BcOGQnRdK zzkg}3+3u8IkY|A*cGgCq#HWgcFLw$gT67bwidCH>q)*|n-q>|n{b*j zYtXk2=-LID(ui>-U^^vZ64(6!IZk(Pz^caWgTS3ZHAcg?p@Qpg_c<|$7#lyxRz_=r_)9+=}uE83iP}I zGIk*I@f8b}gZz$3y4%ox)Wb{V&ac3#+5jIrNE;>@vyL$92%noe6_%(Bf&<`B;S*4h z$Ng#R0qAvrfADBb&b#8}DbxdZV+Kue7r@|yRvnYca8w2}Jhrh!RiiDr3s$)&!C+BGkECx$&Oz5m`xTTOn6y+bH{gqUc=u5%i}jsRk?I3 zcE8AuOO3>E7?wtMl1UC7U4IJ=_1*7KlcJG(d?O96IQaDi2@5?(X&QO##wy z&vV_?3>75%F=FbCu{4PsZ=yL|sqqOl(w8Rw4}OsU=UT;|3w68CgG2D_8)IT1>r1}` zYnEw+Du(1O<3Ezi)8__%IhUw^2gm4;VVud!StNbR9MkQk0M88&mOPMXT6iutkBSJJ zv_!F(8*p@9$Y1Ii6l8*&qZYkm*Gh4p+-{UTa>iR>nNnw#>U1})zwL(&fOG3XJHH!O0JFE zN>p>9Fww)HgRO->wlt3#_4yMGmuH!Nmf0IevV(6{VYX{JafqtJJWmXufwq$(`Y~o| zpZ=dEZY8i#{;;RPmAXKd$Q8h`U8Q>mtKFUG_AwxSqei-TC)`_+U+P3WqUYL`rJUGJ zBump1ba8fG8M5YH8!Ezf!>hthY#q`iBh9GnxEP`ZqQ(_DwX*?+JJ5TLMpayMin0U# za}z0l;sunw&U(3P?%=oFh-M2Eg8PV^y6kgERIS41nvPd?O zD^ZoC>x6|VZ+V6xFHgWcan?ry&m$GvUv@sK#zZ}?P@`|6R}+~2qG{09>#Me0&Pu>m|JFu7qw5yE%%ko5hk^Q7^}khKjjF8HGa^Wn#XQ>g2( zS7g7K;i!f9$wMDE&%aageLWcowrt@5Cr@DC_t6pin0v1J1GPIA+8wXJnYZgemFy%p zIXKFlk-!@P_p#Gfz&mq-c4jTors``(g^dm`r8BV~L+I)Hbz*0Azh7&idqZqHyOi1yJiWcL<* zG(CmRIx=KAr%C{{;yujasr;Gv2YmkYe4-(LBf~Tl*3D(=SSo`59LO zU>5yNvKSGSgLy z)9cp@&))bkbO8L{-y7YjKYvD@e^&H)R%HwJ@OW&7l39=#BJ#5gW9)Y=p!$1=d0PUu z?YeoO*SoB5g2RU^EgFz}wW+iRN!idSuH*l%!s4RUBHdHSaW_-z$$&^i{Vt%_h7i^u zn+b&N1QP5(Fc=+xt{7ff;sW1Rt<_C2NjK=FPUK(NDSP#f|8arb4fwrlwr{|pyp4aY z;kmh7->zVQtS_GPLGN-~$j;6V0CJ@tV&#R?BZ71v0|4DDw`>P_;R0&r(q3?g*dgQe z=IhgvW!%L;c;4@ZjM#rE*-(Rv(jue|*~EH=TNBZgnh1P=E8G@j6hXuwPTz9lIuwdK zkB%hsuz$96mK%D=*JTxd=x!rVyIyXso#-+@Mlh0eRGpJVASXtIhs@#pk!2(i7PaI6 z8C%cG%WGQ&5D!ik8%!=P4t6aWe3bW4htUC{`VVBe2kySfCh==cE@Cl0(D!VHQSKCK ztqFgvkm|LPI(hT=>7G62*TYIEb;}>1N!N^;vE&t&zYae(mWX<-NDHuS*XEt_9Dv^u z7lY49_yWS;)#u@AN@$+xx@>%pBjZ2A9{jZg|Df8Xx^}6j!BF@}e&v%Oe625mqW1O8 z&En|iQp;@17o%gB>Il3AMOJD#F305*l@Rb`pS!+fmESBUXp?y0E`9u}m45+%T`Yz5 z<%!e6kh%-vtAlZ1iwFJvD5T)CNjvXeUv{{88q|I@?3K;{f5^>2wVv@qpw3sU-y~WC z`N8p@IVd%`lIj$0Qq}ZP;KMaHxmEcl&`eo}NIK{`r;>(XN@*Z*_**WgoAm$qV=m6e zSVB}G0S^D@ER4%K_~3sN=h`Q*Kw-DQ?SYMbw*PcgfO|B968Vu5U8w?;xr?!7bjb%O zWZof+i2eL9DA`n4_KJfH(94DsFJO5FFwCStUQ|*?)Z((%$zC2yk5NuF4J?xb^vl-v zhAWGv0H7xF`OOE-A{#@YM#shs%}`Aq-Frv2(nN=RH-ez1me$9wjI3(mhQw6Rk zY3ZocBz1Jp05T_tNN$c8+2J>$!;m;AwHah1*3o<|ogwyj34cCg#1B>;xJdkeAv~Z| zHw$xm-kj&)f;iT?bxO?Yd?fx4Wx&sPC+W%9+}smUR*_?(8JL~}^T33^N&`bI>tSNW zXBf(61Q^(ij8M^jFz!>`ex2Z23wf7A7*)ZFjw)Z=26%ZnZwh9Q*Ha9B+V@?D$d+_! zkQ{WT{ZHWZ{(iScDS_?obdOyfXr&Lt{x#fOurmciK8Fi~=JFXMBnqN3*=uAx@D}zmx<0N5) zsY7Hwcun;#$7YQ*9=n#<)^^+nqyJk z5T88U*D8|AU!sw{>$eNVGp{V|IuY~}GheQ+Q1inBAC6$qd$%|^zBM#t0PTr?Ms)0H zwRCG{CBZ`2m2@?)Sg6U7V;jJ_nW@}V?d+P zLth?b0Ctjw5keV1cE`r!NHx&hl#^56gVyVX&vw~upH-YY?Rqbf0F14}?eeXDGsdYX zo9icvZ`LVCA;gDxJRVTLr93Sz-ugSJDxB2E6*A;}60If>;a)s@=hd@tXRPsbaf!(X z@ol+Z64fM?&qxvha+auNeXPS^`Zx+@0EI$3luLf&C~|XZ-W$DSroLia1seR2>2MK3 zRYteB@0OZ=YHwHhd)(-CM@ClmYEL(+$EnS2#`4RK2B|88)Y$m=C#&f6juApK6`W*U&jr_m#WG*}o*S2;1`k z{R=2+Cj8TcKc5^;$4!dHzf`J^EiE~K2`sU3alj%+J32rO^xTZx3y%0>=8fg|@yQg{ zLL@A%7#(O!WM|VczPDKx90*v{(DIJ<5-JZ_oCG^2Vi$TlYKuQW%*_) zh(ZEG)Aa<^fqF1E&k#^5X$r67j>HiP0qncDrX~gGAyIt2-y z;7pl3E=n14{JKBTt0a1iB;v$$N9xI&#H?rl`Su3?$W*Wb09C?u0GKS;T5OQcCnryvwo;&2aosNn!a&l5iDxQQpCf8Ie(HH@Yq*-|8FDe&*KcTfFWWw}tSffRN8L zW5og z!#sCf^~)T@K3@_gFdP>!Ek=<5xDw==M<$WJknH{*!}&_o=gMK+?5s)YF$b_oJUkq* z=li|m!4}L`p)qa`6Z#vZAG`Rj%1>OGX@jQE@Oxf1@5_fVe7ZIpw6e*!H8nK>s%iMg zvU}tT9Arq9!?`9nLqk=&QAD;Cr1h4xuz0vm$cqYJI8HIBvN~C57G4- z;5AH4O=AaB9?%z2EHOUto+ETcDr?7@>Lw>&0gACv z8i*0ihH+KB+`!y~p)VpQoyL^>cL2YKZ96N_f8px;pi6q)&tM=ok~@+i$3U-V+0+{r=-VXwv`rf6qNnoV`FS z{p{k$5WoT?UT*e3)XfFTmOiST$=>AR63iI9FDIv|l6T>Q%?LKNqH3k?^gCV&>Rx*d zz&3!(X>L|}VQC5YA4lLr1AcNGFemWJz=FdMiRC&g0%bp%KqxW%qO|WVmAbHU(Mn;G z|0f%Y#pKw}Ywuu-<(hzOxo#qC~}{ zl|UT!5DAgAkN>P@;g=xZGW6T@FRz=pG5NRiSy+Lvl^L0#(V|!3A@t7o!@PF~MCd>- z_e5|BCd3ITQaMd#8RSZykRG>v7Gldm;cfQI+}|V8!hb0xne%3xmb6Dk4+}&B{%KmP zOSypsJ0|Q<^U>y&$@GK1;D6t)Qo>5{N0A5^45^){`4eMoF@DFjt-q5og6O zrRhxHnBt|^wrckJKWh$g?uca*Q{1sXZm;Yu`z#N+AS@HgJ z<;(oR>qP}KX3s!~1a@gq5vt{1)_lCY!ozffNe*<~AzI!Ht^6t~CHcTaB#4KR_t8cl4oc&EmM+feD^?kj-0_SHb z3=(HmGVChzngUS}%sC5{wNTDWP!Z9VFvWdZ%(HS5a$Uk{At4m%^!=OomsTW`Zo&OHMdCRKw!+FTC1$(MII)q(r zd*GCqps__~ER1XZ2#qJx8Cfagfy-`0!bnx0rV@(m(FM|kxlNq33(OBW|886`0hrjV z2G7@&+F?VC_B03HN6*b#+&*y>p=@4Y;M~5!K{scKh@zW6jwP_I>2~%ql||a*D-7Bz z@-`|_cE}Swb|8Sn$PHyYgR`)sCX}`xxXTa)g4uqsaGX?2#R-tMkgqg>_Qxll4$4`@ z@f!xL1XULpbQqV?tl%LMeTx)z>d`LPHySJU=PCsz?>2;>ESoS6$5T|n6OgW)B{}qh zh_*tO;@BMXt|ac?WTj9I@i^gcQ~3KvfU;z?Cs5Wc{NppE6ZrS}UQv%Zc#h`Ps_Nbg zO+M{37ya-y=3qY$CR}+RIVIyp&|dPtnV%7z(v0z__#z!Z5- zNhWwdd5Pwwbz>(LPwin|>o}0zdZAuUE=e>dRokuYUD;luU$&{=7%8A2Y$HaTZZf zX<}iog&17&6ykn{a%T=@5z6pl;Rp`;*e@#k9F*(W(p0ISSqM}I$3%=+Lj5Sw)2fu= zAVVP__=Jk*p2NcW-y>h4loq_U)iFx}9)qg@7 zpW4ek1_*)e=O6rX7%8?7XWvq*Ma)wDIwPdPor&6im#{?Q`N+d3@w@G7dAai@Ax|EO z)IO@HZ5H^X{<%|*;n$;2whYvQ@5uTxbsptgm3F_LuUt>~etTd}+w@nFJ0qjy{lDIS zBgvw^-4?#h$mo>FaP7{Iv4dTkxwP5^H%;lKFOcQdEL3aIl61LGaX`D7wU5W>Q{=^i zcH~-{`3BIyBMs$0IHIn~eY+I$Hn-nrV>X+UU5?LI8ni&k!xcfv0q+PSt}{?$yeh9U zG zjFa5n#Mhl?#g<#P;lmf-fW&eNg^?~~L;QAJyl$Y1Gn8q#?m495RHEVnH3KreK39L_ zivCU$fW-+s5Uk8>(;lwi`r$(3gyC&mA;4@ zy6@oM(mqO+bipIbg`AjjancE0s>Mp^w~7|;Hncihk^P`Qa41M)3dFp0$)`?iar$Dw zYh#fLR+ZU7_Qqdjak#yb8ZFpRT}-kAmkZLZ1aa~4@sZQ=l#~j8((ZUKFLefG2kpEa z?#{b`g;kveYr3-QlioA=`E#eQ2v;xJq12Hi4VsCAkhBs0f$1ay%&>yKC%Kzpakl#m|h7U7-&7^e?B?y&a5p>gdp=pB&*y%wS7QQ6; zMkOinBUA;!-V)r@=-lvh--sK#R|3sjR_XTO5ULUKxo2>S+VaCId@mSicxHC> zHrD-BDm0kbKS$#&cSyW9MuAhP4KvjL8LK_%#)r8i6+z-j^zLJhC~^h*mXidK z<+RIUhK-Y$TFiYaV?yfd?>#6oa}dwVYx!`(;#oBrhP(EtuYOm8`V9IlWW>RD1RKfz zE!ObbPf*T{%pXsi!Y1y#kDm5d-y|uQEHWE$4)?DM{s|8~lmJepZ|S6xM0=F7^az!h zdWr$D@I;r-@C^wAuOsNE2vG(vFM*Xze2<@GOa3tXoC$7s3^Uzad|HE;u{0?6cT-#4xv);=8n?2{4Ka#?wi{U;3e;> zeJhpLZS#kt06ar+OUrTwwRz=mlOY@Qj`9|KEDgrq3&^^LknZ^DOiJL5kPa%ABUfVR zuhApe&*eECutd*MI%#&E^^azPBdO25GeZ6A2Rd?lsIaTU3FV6u zlDEz~s%YTP#>a0{A-=YJcA!s{xYK^*z6JhP&})~(=`VNBQ13Q4{sE%`7z6&B5wNBZ zS}{xM`!$^=+KgPU07_QdIq~+3)e`y**JScCG@8_o?$O$%H1P z;hd_Ff5<=qOQf%pzn-2WKOM;RyT=squKzV2*yCDtct;wHF)O6Z{fkeK^C(gbe6weh zn`7PYUrvxXw`iM9+qUM%O#RFPN!p{|?@25U!rz|yBeRNeMO74H?d+q@fev)~5)Z%I z)E0bBc!fUhT2_V(Uk`PcZ@tzf{*4lrMWvDFnR3zU!Xn(gX{-kz7pRph;b8e-N- zo*17;I&o+Y#ybZ4ZQb`^3)R_oiZER)3fQIZcLF(j!C70R;X_Z&Gya9;NYndAvq!vn z2}XM<_oe0$3xn^|XFk5e^vTFsvf-O6p`$&<)A4&z5+JNlU}Xnd3zn4$Cxq^LaY<1< ztHovD57utSOvd*XsJsYiC~qb*A4kZLMH1+z^y|`zk^Y40{c{cn459#WNE~U)^6*I) zVXdNTv52u74Q(K;vFkOI81(nZcU<>2AFEp_HooWf+`E-MBAfGYD>?kM$^>RP;YI&^ z1J!i0csA0WXeyi*Ft?4g&E<+(hG-X@EVjZ{cyd!0-#&<+q-*t;YG3S59hwou>IbvgE?V34oPIplczP@_ z`tI4imqu>$Tis-(MH<{@S&_0B!vk7yx>C zbmSfC>nkItq{OZZyoaySKG0Bzy=MV-5iRy3)Yt;vX z{YX6Hx;Rmc2RwRK{cnbTTc9O_F0RDVO7GF@55jKz8n3slW3LyO|-#Whdf@&biaG5pyz2-s5&T^ zKB?4BsQVK)+SVbpV7MALPh%$>PFslMEhSvApShjcZ|k(3-Be)Q^>pz5yq(N&)?4;^vOtv6DKUC`o zoOB92YaR8Wk7ivYT-Kk|)+AiI$+)(wZ0JrJqBaxjtTU^zgG*`ET$W5okZ-Zl1BhK*4AtRrMlIwUF4_d=yr4wj@(U|E z*>h{?&o?FTKM&C4J#BvW7g6G#-T*#&PM#P?EG+pQFJgPjgXEdR=A_TMH_5ainY}&~ z-GGPkZIO6lIUdgBtP8<)T>V~Ngd5&umjUZW$T=gNuJY<%6EQJY>`|Jkqx~-S;BX4$ z4zvqKBD{oT&NQ&==_4_Knm8z)P;Oy7$nH^3oi=37rv^9H;m*vu#?Lz%C2AVf}M=FPE5459DzwjMh3Zkoe zrW2=nYZm=h(WV5>SC*j^leo3@*{eH>S>^KaN^g1%dhy2Bm`ZL!xs$$13D1g2n%ejOQYY$nPQ+ z$Y|J~q5oaAwmK+YB$`kvLyASYR|1Z{=ovo`!uzj0Jdr=2lJ=D1;;xH)Q;cZ@db`Ua zN9cbma)v!AoLxqJCnTTm@u{hhDirl{GYJ*a27b!lM*g`NJyXiUE~8_Q7|$;uv4q9? z=TaQXXhox_GgS7`?){I-VYO&zuqy{~Qxhg{aj5ozi%||Gax@Md0bpxy z8$MWWWA@^?;B#phAN@-a3xjP`sdI(6UnR>8p+it_sBp)?iE)`*RZhP--U${P-Zh@k$L?4wV%aJ5{QGRDM zD|orL)4^4;)c5>!_o_04?&5k=Yi(GnmUvinLmY}P4vq^ev>pOh`kv($>lOMRg|yM? ztCVBt8BCG|r6#sJUrFHKIYD^Q9gT{}jlWg?Gc|y)hl#DOBjPrRJ z2Tp{M0wLmbC7_Bn+W(<=haGtp?;*Wo^64ce$NiH;f)TUN{11ZrloR^9MPq_h5wJ|< zrgkPy?4YDp2yEZ``z-ezahn)n3dYOV5FJ;A-4oCs zHHaRGDu2i)a<|$T68a90!}9W)Xy%eUUzxc>*bcZ12dXJE)!Xw<io%glID~UOCEsWRNoJ0xR3cDW9`MxRj&iU)MlQ=-UH~%Hn zD#0&$^5MkK+`9GIONR-G511Tn$gRW0XQgRS%R``j6O3 zhx;_K0~_PoW6C0^+YS9NlUG(!!n`sunN-H4Z}0svmuoR;>{;yjVuoc_K2SH>lO}C{ z9^Mij`|ag%jiIzRWu5vs&-|B9w=d(8!`qhme%>g&G>IM6N4cC{ULWAu@5iz7>>Sg> z&ZuA)-QiXzX~^`>SmYT-?G}-L^%ksV^00BE`X8;T9M&rshJJ3dk9_wJc?-M94nGSq z@*>>3R+<~!I@kDmt!NK{47U(v&7oVts*r|@B{ZIH`*JiEmSx0T=Q8^Ev*vd~^+rP$ zpRlt3?TsInv7_{sBjet`udEl-$i95z-Z&loZGuZ3&Ccad5dYI5m@2xHX(J5dj4Esg zlE}`3D~Ax@`x_9!EKvw){tj|DXWMSL+W~QQ>h;cv*wsw@R7ZHK!Iz&T3xe+jEyMcO zj=eHrXUz}ZS|p3%Y(nK5%wZ!#VcIN<29JCGIFdV6d=*s=8dL0PAN*%DmT=vbFBSia z1v-W&KI%^}cTK_M40!2cqV6GMFNXb5_PdufkDlLx>m3rAvyHl32EiBLZ;9tuN1OCJ zUu7^7ZO9*_W3*sF;fexPsVu9>v9Tk%rnkx6lb##~x0PcalwG{B9Cq^DD=_`6Uh=G& zCGDNaW~r=ug;zz@y|!=_AVitm-3Rr|Uhnx%u>1emI}h+Ei>?iCNC>?NA_@pdFH!{r z1Og!;AtChMd+)t>rS~dL6tMzIQBhPZdN6nckyJ<^l~YGuNu=ZqRpLw?aLqR z`_?Pl&c2X++~Nc4)(9+IQ^Ona>6^e*F`3p~n-YPA=`$a@h8cukC%{?fV{l=fOVFJ9E@7G^l%) zHqCc^lVZyY?dA_pmn^X3x34~UVq>S0yBlQq@6m5x|E_b!{6#lsd2sHU-!ioL@`*8< zBhMX6wz7R>)dpwlq}(+%pzE2OBU5~~Wx=?U8wYPYwzJ#%(?$F5%(my;zIi8K4KDj! z&7JEnyt~=-|D;iteHU|O*l;1BNvlDh>^*+`_y-eyNY(Xlw$&Rqp01Pr?g#D<32*kp z;x`VKc=5S2(;B?gHYVq^XU*D7kJtZvN7i$VW;b~1zV40hjX1lt-~HR8)~EgH=zm*m zNVB}t2NRamSh%aty6@(td3bzdHCmr_r;0xQ*@=nov~6~mC(ZvRZr|DG?b*Al&iJ~| z%i`q~v+I9jYTO$boTo&u7y2LD)#ZT?Ua9c?e;)ZfrDFf)gX6oGj;YmdS&kHEKFyJ} zRhb2o(ww}1MEA1y-dlF~(vQ9h-F0GL;aP`5yH)uv=DB`nNA%qLdYc?;PNf(&=4{I` zoqLohzweg=3xD0!(-f{Zdh&w-v*)czH+JUsuir2Fxo7X(X*>V-=Cq)*hui#E_py5i z)%_|g`I{*Z4*hDzGdXq)3;*F{m%}3)-8KH+7B8It^~jO7Q;%#fmAm?;s>^mh+w7OU z#h*GcedEc+jlVkbpY}r=Rq6e}%sYPjx&4vtIkzsJ@Z;M*&04*GWBE6Jcr6TI?z9qJA_D7%jjm8&^2L(} zA6jD`Yxs@%IrlR)*h}MykXMF1kt=)VY&mj_9Jpsq?K*R#9$69{QXtFt-|u^G#MfK? zQ*T#r@iix2{K&LFw7S}`{9EQc(QDAkUOoDZT6cD7otM5}(CD`3QjYJs?6X1Z)|L+X zqRra+zh}?BA+p*Br|+JnZDV@%p8fQ^3H{3-TeD`(fdX|_od2IDGL)%Y7_E(dCmq8k0TqKAUTzdVixu*q-nC-LU$ZKj`#Ip2=hHO!iI5 zkOpO2+?(~(Q_Y&**7=?nJ+p3qe|+*Z<#x1x{>SR=l5ZP1Fvk-wJpcU9+g=-Wu3UpB zpWXhSL(6`9Wa9EAo6^)e^4YK7rTP5nXPf5Vx%&4PZfjF`=WFv?51KkPVD_fn%ZBb* z8uI1KJ<4S2aG=Yp<8OOTs~&tkH-FUe`)6)Un>x#DM+Wuk_1|Ud)~&0#v(Jul=|bw} z=y`H~iS60;w;$HvqsI>}Ub>+B;&xN+eZTzjX}eEH?HW_7Qp{uRJ<%dXua4~_>pXnt zq6Hgv*H50m?axQISKd~+-1_yowx2%!?Vcxw{P@|%6QQXWyq={joYf7$=sC==8DblBeKdmVToP&>A? z4%l>H{^6mOk7yq^tqu6&-1SX6_ZVEa#o!OmFOC{M{QXi~wjnJ+xPv(5B81xt3FH)-n8T-jf%+4-w=}@vG!wzRw zzpJX|N555NezESyo(|tVDe|LfosRU{RVnNKt?TC(ULNv7qrCOA6j*TV-1biwE?Zc9 zPoV_?y+(cBd01qD-uXtQskN(Nwr%~|9^18`RklM9FWGS9zSq<4>lbB)cJDZ?aO#NN0yHMxlV;+Hc?1_6P zJ=~~dxse%$MsNKg_~Nf;PpmY_Z%+-lzuG&`jV-)w*0@}2 zwG&^+$Q%tPytw&jaQ^S#d-?qH*~aC5xldHY!r_aju7ADG#j2;z7OvSa+t_Yfc7M=w zP>V86GVZO=_>G^xEdIy{4fY=T&$$h)KFzZ--8WnM?`+a@>6=SerYJiu`JLn1Z)&4b zjsJLLiDHozdS_{qw@BKMstf0S`$?h4e@OdP$4Bo;yJKkY4#}$x=>FJ+az9pW9Ne}; zz?wXTK7A=mzR<5~t$4JpXIt-}p4D^TId=4>vP-8QNHwiwbm$|wdJSmy^vAho1*B{r zSnjQi4d>?gt$&uXfw@;62--HW*PH*jusSTq@s`OyIXxlE;g*%uaodyWofGwg$9El> z?bY&~I=6hcZo{;m{mBb{Q)WiVPPz7FE?+I7vIs z9H?8$b9;?U1#7L#``9_JNc>;glsPUEw?4LV(zlb#F|HIapkzp}4)>UsizL3tx zazk5L259?A`$?&be?R}Wz`rf1MtQ=Yu*1 z3a$+}=iWcfF>&?Ou%IWUz~16%1#PzO$t2t+Xd`qB&bh~T{D$B1KeW+5g(s*-^4NN% z*O9sc&Z#f$#Bct#pXAAtC*z|EP#5Z?jqN?R3);}$lS{}i6cmaG#e{of!8!N%E}y_} z`JXHT&v5PIWJS0BRv+2~UWT`+)7=7X0rCiU2=Kw*f(K$^V#=zlai7eYGbd9rb5M#D zDN>63)FZ2qQz#&m5XuWxgc?GmP+O?$2k!A5zu~w1PjP`Z;#u$!&-T>|y8K&wpnocX zI>6twUsa)+P)UIQvkTNOx$u|$K>Ip%>KNg;^1;hz%a$!j^iLTa9E>i5kMj!9je3O( z^@SEfN1>b0Tj(eB7Y4+FbMEmSzv&?GKkx|8s3`EvdjxnZy#OElUGxFvOees{_X#mV zYoVRcOrVbFLfQ{LfnWZTAJP5eSo$0Bf{Bcb{EzbJimI^Cy_5h?L$@|UPhqeyS{N@p z7>mg|`s1P4?B3Zj?;WPa-sgJ|%JQdi(z=uG5^_Hs5sr+>juaF#$%U>f`wY+0z# zSwJ3W2jl=fNZXYZ&;iuvFZU76Ux4nKK4NJv**CHQrdY9Jn^oBM0(74w%o64c3uBMa zAA0lM7y-T?E)0tW=iD1B@EgZBb96pe;7D81X0%m1AxgkUpiOTV@DY;>e?480uSff2n%p%a<>iXn!8sM@2=Mh=>SNqecx=wQALi zsZ*zhe#kp=OMRAjk|kf}2~7F0Ct2$Go@A+}>Nr-%A)dfgeRSSQ-^soQBFoSb-fu3z zLp=m&3_s9Dj+Ykcoc7`!@KA4|iGVIBBG6x;-Tpc}P}OAgRR6J>C*PFXo}2?k_f*dQ zWBX|@>a#?kPJM-1LLniO@RzXx_vFo=EV_2>DUSBqlfs0ChC+K}f1k=a*%O$0g(pMB z7d$!pf8r_f#5bP%KK`Gl;)&lqm43Pqi}O0h;`?7c6%K#rDf#LLo;;)0ccJa6;%otCk zP*Zr|_)$-q;x$#aXo0e$7ok6Oqn_|HZGdm{m$3nN=P4W{JAV|phxW*QNJxmezd}V5 ze0%tdqW5u6h2!TuHB`rFp}x>uXe)Gz2km0Nucsrw4;LOdb=p&M>#LqS+qD$=imLu4 z1n7!hK-R|!v={VW8GGa!J<&-(c1j9=4IT(H?JVtkt8OEO{z8mU>cy=pV@08x01qz~ z773FC{2ONjuxGcHhgE<(a}^B=35~qZ>3r;crOMS!p0d46stUU=TAD*gXxc}ht`mew z!W3b;FwGC#e^B6eqXho1jX?Xr3l)wY_2e4d-;*L8@gU?H8-aZsE}$#nfmH&0fW1MN zb`|&?eGqs6TX5@iXmwN8Q(bi#BrFi-3A9nwGrxFJ=Bc5wH50}Nlph|LF2Lu`24vLv ztt-D?o;iE5WLa{RNv%APXS{yCe7*adnlzO^@Y1Q7>eEjcCrlQgtD`OV1`F_i4!o%NPrJ2e*KjvN9T4PPl|jhPGv#5!S*LcOwBF#s*-=ZpkNg z))L9m=PVx_lrnu5(f;R<>JcVe#RbO7dqdR$8bUJ%=nws%FMLs3h!n7UHOxh|g@gAQ z+;1Rs6yOu|17@Q1$;ruj}QESaJO*FY(UEF4+JI8 zm^*#Rk|irus1j|`gzWe7ZWomw`XIN+FLfF(bQaLxH7*)YrEiaWN~~Y!DKMdvC)c2g zo|3N=5gm(3ri%)t#S_hRoZ|^KdpsfLtmUc3`d@g8XTwuGmv-a15ki&!e(%Xr3)z4V z-~nU>nR!fjT7VCbBWwX}SY0R}WD!ybH{X_qnKGVg;(K%&^v4#$?^S+3BO4H^GEtwA z0`-6grV7{q__rW2)%5Ap-*o+zA#aUjX>wLdr81<;UZV3`LDf$iPhFLJsDLd;Rsnh& zIjtig-zDGpz>}?Mz2xZ%+?Kn`j-Y(K_XOw}m;XeV+XExb=zvi3gZROCnhN*?&>vpl z9YX}(5o*qR@=hG32bL4s2-r{L{z>6kVU2(sjS#RE$WfkvfPnNm-t>0#j4{aqLN9)8 z^`WzK_yh2Bj^6!LCU}%1_6+*d*BvS}6tH1gbL7YotmDo61mp=F9F+3*f~h?D9-I;o zdfuz2kws{a%saYt)j4|n{?C8(+!i@Nh0LG+&VuRgtvxEZK;?GVCU4Oub;{_AW2Fy% zw>q=0p6hfBJb;eD?$i+SPe)$x2e9|}(2oevf1Q9Wm@QDA`U18TU*MML(&Q26XWBM$ zJWV~2rP6P_BO3r8cNEb3_<{2T^p|`d%ey&6|J22c7r(Z))ITToleb*MWcj1UB=_W- zIMCW{^fL7Jr+s_fgBC?r@Ao9n&|2@Kzm~nweYMh*4Q+v}U0L?yD`cp-Cos$$vAUqU zp6_@7eSlp+Kk(jslhO6Hgh2vrhYom7fCnBC;0yR8Tqq>mCR~>+tyr<5>?4mnvi@>d zx$=?q%U3+Qe#!F3)-PQ4`1<}2y|Ohh^n&pqE3OW$jY%8+^SK^92fo>{W5-?f>ec&H z{py2?qaT*9^?8#fO+M<l`X#S zDDR4utJW`FzH0rVrH`(kw`A3GO}k8eC$Q#)i&ow!Gjs^lN7o-c`jy3(Iv)A* z>-Aq8`Fj1~FTP%X@bK5`KNt2N`g;AR2am1ad*Immw?90wsa%gUKg)I+4?N&_kFo&# zOT9m)^Xfy>r%!)RD>!}Dym|94>(;G%T;mfb8Z>BdEO+kQ@Bw}{b^u>1r;t`iv@D7K zebt8MT2Zp~S6&@T8^XirHtEftgXbA7{%1sI)3aw!BbuA;-MgEC0|&CRmYF?!wpp@d ziP3wn`JLBVM)&(^Gv}Ku(I>sWH)X|darT~b?0vW~Ra$Q{nu1|ObF*vLF0*gnK6B*A z5%bkoUzxAJ{yIs}cz3~f3_kgr^|%@#9n-h4B9^k~z! zZ(q~3YgY@-xhLK>ixw?1l6xb$zbQO$Z?iqdQ%mKe|4zRZ-A}tCgZKc^#^kB!HXm?=}H%*Uej3Sqo}uUJvYB_vu0B$ocO7d>s#NBm|y*i7gTWCOBB zpD@#=&oYxHO|mkN?4tvu&kS{-KJ(_yGfS5)y(#o>*>{bXPl@Tw5s)<}bMQh-V}h&w zUQOD*KKH-raM;eCV>N_-+(;}gsg@Ue*v77-Hd2PBsM=++7y4|)5?E>@;KVL;7` zrr)r+)&@Xt=#CD!6*ge{%mpS>ZRuOl*wP+(cY1%8&WT+~@0W|2X?c=5X$2zl?z``r z{rmS@-S23Y)W_u;zBlR@c;kr99wGmf3tm;ZS`U2Q>Pc(>_Ebw??h~!o3(JJDLJOh1 zKx{ZseSzztf1io3(tq{ZPxzSlXKiD`+dgR)ELdRqwqL(~aW;VSn`r|gdhGJ*ecE-l z;N%RQOFJu$nX1A&X4Ke+tgU_g@yE@pufA$N_~3&ZqWk@MsP?d5jVDUwpnSf40?H~~ znlb7(GilmVBY)ZIPK`_M7o9f?YXrs&x(i`Ket~#Epm0r}>!JU`hu4@aF{g~DmCEaE zfMhLuov$SSv#kx#?%t+Hj~Zl(>GHvd_ZHbQo`tIEb$1-cd4cQS_Ut!d2NrMuep z#U?%d^wUN&Z_URae{2pPK72!Tzb_ALe(PHkOl+~c$^t(+-Q@Iv{F3`yy={Hwkt0VM z^_f2takmI-1^SA_Rfq=^7ZT+MUJw1zmo>WY^YSou3mwoW)&>lpV{I3{>#eW>b^3ki zjnyMp$P;D5#&SJZ=x9vxN{3CE@*&nI!6()9W%KsiZ^zkwUs~O$^SUEspQJNwx$prg zBW0zGJ&Z{v{n}&5LfdzWrT;6U^#KG#eC!INJy0j@tox&3Uw z*s)_x|Ni}rHqo%S8U27oOV^mJF+Y39Cg-b6$Ubt9d?8z0YaHgbQnO68YSk?L6^k$% zHf%6EcI=4j_uVL(`#$%{m(?$&{fI+59Y9$rC;U)XzF?ErtuB@QNB_Sn_}T#CLDhx4 z!Zr5;u9yDHRy=BQ)c?Vo8$r3T1I`A_nq%8`@ZiBW)duvLxYg^Iz>Cn|`F&2VM(SRe zF*%AgHVqp#G?OP!Hp`YRGn+PTGCOzfys7j*eB_wP-$H$Xb}Ex^{{%h7_T241BeG^6s~DZ;Cktg4XEAsBd@NdU1?(<8$i5=*hTN& zy)Wqp;M4M*;%rGC3kvO~aXrN%tURInoo~eveo&hRRz7L+7rM{(QSq;cM{M4_*~WeF z{k4={lJ@(3W#0e1^`!rK$AX-0!UiBm=mW|u`w-G%jVWEaH2pv5|FS?VaEZW}AwB@H z>f43n!c~8gg8pM?ZZtL?EPG|??`%N3CynB~1{&^0H@u2s-3mcPA zTiLuF=lju?=m2PsFCcw-d$HcwQ)`pEUb96I4Uv>RnV;pMF5Kc3Tt+T4=_N8y9B- z&;d8f1~eb4m`_cW0og&8{QFeI+9Qp*vsgQ$JRnQ|DO09c{}1}(|J~@=pTGUb2Q1j? zcW*4+@vN^8z&*uSQdZc0Mj;;TKlFb=aB(1VuBr;Tg@jj_1ff5+z}W!Cx#)i-g%1$bTVp-ZdN*=|KMnnne`E@O8s8*bzJJli zrb2}Zc5Ds*pYe!|8#kJF-g)Py`u~m>s`OH+ptNs_ z#*Y5vhs_ka3Dtx=0)4=nF8|QK)v$NG<66Yk(E)u0$zrde^Ua(&bF8iPwE_5q=mo}$ zoej7e9)MPiBRcR5{7F!>8GFG(AdAD zx$m)RAC09!e|Qv{Lwn}~LVvZX^2v-Red+f^U+n*jf}?+Torel825?L0KXu+(lPX+# ztW#|HW5g3%b`%c?cQ-U zM}KEa9sLz&QU03ARV2z3E?n3YEvj7;?z_*<{it8RzAYd8bu;3>zVxrsE0+H7sG~o6 z3)_zmh~0`1vNk3LfDhp4Pk!BBg8t}$(rv!<=2=i)__wuD?!`}L%CtEKJL~d7oDIMx zzyru3aU#ZuE=S)heV42D$KG5T+7TPzPyZ3Rr((0@54eQ>^Z{KT0Qx(gz^>)&_m${P|KHIc{SW<#0p26rGW`$z zFUbp`4*do3ZMQ)S>=-L;3GEv(-`Ir%rMGgDcTFq3;XSl?`gB zcRKlZ_TR~Wtp3kgtcj(6p+be2?`Qi0_uqfN)dS22gZ|75cIyIgBv#nIeS52ulA0ev zoc@Q_&>#Je{L^2-CQu*6tUY2C+q{rS>9P(gD|KN0L>*(w zHhtCl|1Dayuykk6m2v}FYr&v*xlh}=e6fV+d!_q-(*M5nrya>vkWZ4MSW8o+ND%}5 zu>s1hFy+dXGgYcovE^cJm_Pk}d4Y4~G}`h$`Q($=r5lcZ^|iULv;05BrL3;^r9bjd zx#0`)R*O9Tljw~8XAIzRVY<*+s3MRHbj$pI=nrgOh-hx(S@3{zgwoXb!8B{x!L)4I z(kQ3V>R9NHtkKR*n>ICV+qN~GJ9oC@L|3A-@Avoy4yBuH^TvLC<)8itc7S{6q*}&g zySJ;Qd%=PQEgujI!Vh@hfd}k7VE7WXcdUA`%6D1% zKkDdD|Nk*zvd~VbB;*tr1H2{vAGF7JYSMe1H=lW6YJ9Mym6WOAT zoefaFxRrnWKgJ6f8}g^^)m(QUC;1Q4`|v;Un;rcr2knXu&^+!8<=2`@l6CqcfcPYF zK>8r~p~R@sNBAa}qxI#!!>(b|uA~!IKBYd3d*DY|B**@udhDlyl{Qx2iI14vA5KtqcJIJ{LeIL-rmYNHUJ*r zi0$VY6DLlzbSD<1awUrX6I~o~u-@t7|GXa^058yvT~wBe2Ta*=m27_m`qTd)KYjlE z`R1voo{Gx>K5*cG%>||}ihf77FGur)zEdv09qWou2lSt+m_@Y81%E5ZWC_m_%AxypY~iwwVCf7gYT#MpnHc1;_>PYz4^?pujleYkoz%X z#$0!P_`}Oqo7>#W2iAhigbO1WY=>V4ts_pF) zoCku9hZm6V_-O9#!7IMBcXLX%z5S8b_9G|QeiySqU%{`G7d}P@#0a^D9v5-f3HW{w z3HW|)>?e)RZ#w<)`TS#ZL)%U8`X zDzCDe-iPe?wka|NPe|U9RXcA+PFikx5gA7Q$ybF38IvL(oVj4k2VgE3cEHiiSC->D zrwyD=AP2_%2HKNb!gF@M`=QC%Nbz#zcUT&uudw}&SK(WH|D^(c6n<^y@LeJ>=#3um)x$P7u%7w>k~Lc=bZ`@63N$)o=FFX!pbbchypXD0 zKlA#Zv?1*Z-FZKH2%E}v9b+mqTy5<=?}P`SKRgKi7!%SQQ0ogaC&1YOXy^2|qiaG( zf4OHqq0=S(9+KZ5p>j|zWE|b^%85Rpobc*$VUT>5s*0o=FlpC1XybyBIf|%#uOYcUnIvYS+ zqf3!1^#jr>F10}O7?_g^51^Ca1IDVbQM{jV!8hN0(`Zj%Lw^7oUJDO6eb4{#|M1a< z&95uxLwQQ{k)b{1K~KS-*nX$`DLeAtN%Pby9XRI+2uAnM6$T1*gyKRL;hOq=`n~-m zrTjaZ`yR*4*kl5$E4I-?b-=DM??OI7REIToOwcz!+>Hs+{z;J=SgF%NFYobQbO18t zs{@Ejh&LPdebv&KF-T$n(4KzHgAYDv?ZBgtK5F{|_yWkYp7BKTO7`s8 zW8Qmjx2e*3uh*U<@7O3`*+>67-4AcT0}U0kDEkPpzoi1Q-(Dc*n@3151Pa&uxzY63 zJbZIctd*0W(Buj+OFItbF0NAE?)LU(x3 z$rx=dKcIa3&&=!F-Y{#|uC+QJ-a`jLf69SurbDjwOeOx0J_%YhdUcUP5|xipBLijdM(GY?Z5EK8~qR3 z)yWx0eZI!^aG$j{6I{CST1>j_yfo@at$Bg(*f2D;F=sF z=+1m1))Sy_*l*l3CV7}_p?qK~^Tc#`zw`OwOZdR~eZ&LM0rfRUx%unFOBwU;B!mft z1ZVdXCHwmSn?iqRRk-;HZ~WTvIJto_3Fihfmf-9!{X^oej1eXVbsKj!w}mSvBwOzx z7D1aMXOso`r@a+_V+`ier@U)FFb|xyAXcqfW%&R;WR4&_z#1X&2sA~mckkY9W5nnL z){Wqr`^1m18T_`((5LJ?9vj2weaJTDK<^_Hlm&j|+Q~kC{}3Tmyg65 zsXehnw6pU^@U`KGy2j*f{o#C>8!#0a4E>#x6V zk6c4@Y{{dKK4$84)p#g6zo~$a?@N35&&dSkfG3c7WS`$DW_oXvkJS%-mN*IhKIVDk z%$O;2TJ24A&Ha67?)$mX{-4v+I9!7hq3{cTEAiaE9||$4WMsG&KTpu zj1~FPGco6u2WlukEllr5=hNPf2jBFJDz(?R3`|;4UMW$#Y#rJCHxg7=kJg4({AGCMx=N#T}vX9*#Ac${9 zO?lG1@x~jBQO*?Y@}y3kHsjrQ=ML81MAs$z@WIWZKYS3kW)yK*ctAeTZBeJqLsMq| zDL0UKFyjN{<`O%PFCQy0JP;An#$*mxjv(>~O=y4gFGu*HuMnnnjCy@%KHjs>@&L9T zJpf(t1Mmqc7l1#}QH+1{9d=^QoVliX&!r|)gy!}}>UsSIWZC(8zO|mSuG7TijgU?bkuN6S%Fexp2e1M7Up)o!K;<4M%=UM7TYJuU zAaMZvLHdO*R*0WU%!qsNLa%|7O@VrndD(2crW^Ey_RtoZ;_ErN=R4lZJ@h{OK`a2> zFMlLs)LFCo$<4N}fj_x!{f1#7HKJ2i4XK_aw7=Q(pSkd9lcwfbuiPR3^aJP`pI9IK zSHqZL(_gVMBl?i^Eq1;4;lMie8Yda;Z#Mn00r#~#;+^XZ?P-e+#-vk>X5vG$Y=4jT zBnAZioek)qoFV^wEa;z5%>7#K@BQ?U=|1s2lPXHOpti~b-JKrjqw{FxE@~Z_m~I=* zxJh$tpM?G@eA$1%K+~%8Xj87i6Y8I9oCDvoi-1g{$MN&g>rUn!?XfjZ?)eS0$1i~P z*nH8x<&ZaQKayB6u|r}E`}Tj%nqNu!xtaDK`ga?v{4CYau8U0@(7#c;wdy(F+D`N; zIe*X}Fh0n*F!{o)*YBH;c`bCl(r-6!ecx2+rZp`k^ES_7kdDYJv5MA0q~e6iU&>!+ zx21QP`cIndk$W}oU1JQ$dwT(&7CjG5p*jDLJ)xe^e4+qvp5BkIwHWgc}pu zQ?X*j5Ew7;9cwsz_(jz$mrdRsjjl~k9rJeWe*=rt}x7pm&;HcMrqYI!D^cyC05{TW@iA8fA zdkW|>LDHQx2Hckpi1Wh zUR{g5rA@m0kr#q}h2AbN1YZF8XMY}l8-VS1ZIhTIv07-4eI=HMpHDw)*~%wP&N_+} z$TzX{f|d@@5qiV7(ASsVj^@+}Ip;TkbN5?(KxmI&z}OD=n+ej1?MJ?Cbv<>VZ2sd* zy7!Nuf86>!{bTEoY(*N=pxa~C2H;Pl_kC>udBOl2;9>!c(I7hwPWZ2mDe{jE_|v+9U5yC}zhH)qjeqS}Y=4OMXTt`#xmo@>l~>CP zZaf~{zvY!TOx-?jiSD9_qdPhsIzfNVp+9^IO&xs`I>HnD&R6b{dGtN@4xb^+n0yTm znEsjAEQ5pjrNs&=nBo_lX-U!x;xrC+2=X% z4tYK`weCp$Q>M?jP3Fm`p0?vi#E)Ix9P5u_gWh`UEo+nTOI+VCR%iVq^gr@Xo_=<% zb8h9q$(H<}-1U#xybxlm#8>bYH4(^tIN{Xb~$U~>a&seMKZw3lqIZ(fN1 z+Of>j^S1%$ifiEkemi!aazbk8eJup&y+lCfIfrKGe98l@ooqv6M_23tz_z>J@;iR- ze39e(FHUM51#& z;^T)~N&jI}U$kp+SYL~FgAZzJ{qS~wtQ*J}fa?cn&qf323pyJR-<+Du@x!#`nrj8^ z6<@dV?)1H*Jv4>Rj_!`;+;{YLegU%GUBIT-7v$5~SP?WQU)%W(#5zJXrquI0^XB&V zEgvA)%r9cBm~lg7ANrGf#ux+F%tPaQeg_XoFASH?OR0UTlPm^&E9oDX8z|r3$__Fn zx@4$@g>jMiDBzl|@B&c`ovv`1zsgTE}} z2cQ@5<2Vi$ct)gR!_gPaeI33x^@pD{VFP|O_cS|a0^u*|d>b#qZon_Sy!SHd{Sy}L zw*7njeDZ_H5h1@28$iyJ8&f3D0N!vs!1!OLOqnujj(V`xD@YO^xRvzB4%F?hb-E+e zHpmh>ps!FOuO>e~^9vbIF~5d^x#4eE17fu8Zac*3t8!H)E{M z-a}Jp@AN$~kE}boJKHc+_u$oVpWyTyC|Ie8% zTekH1^XI?r+z;%*t)_q6+Ogf#F3_JgiZSMaHruQ%bh&|y2b2579DRQqK)=bge?rHR z^ED4abhGmimg$K6BhSbtw05+o4Crm>#rOOUT^`$SE79gVv*6L~^2@)t;ydAkqHQ(5 zN4npR3&CSNzlTsu`ET`qH}fCeW%Gl{Ga+9Hy${{VhXLdozytUR@`cI$W}f$*x8Hty z>c3n5hx7aVkC)^IB71GM)@9VscFibcfm}dm16ZTQf1M`AUlXD`_jm6-VeV|GcwQSl zn=v+QK6>BL-sya3gUoZ^=>}*OA)8eHS2J$z+nT#^;Ii-XFUOw!$4%5w<)By7b2D&|Uz@K5g%-_o1~v z?XeBSXW_%ff@HT&?|00$H+R~15SItO&%c`U)(>ipZ+M`K0R4GBeuj7*dl1=YzwH~+ zCm_cZxrhGnHatMinZ~}D_uopex!=nFWX{)h^#}e6^q->Kz?8nZfsC)zb9o^PZ2id% z#0C%pMhCD?5B&h*g3PZ?h$gJ9o4bkf4jG?C??YScIr<%bfCe1l1xI^iv$o>$wN9DQ z(>KP=|0Q0S(0i_i2U<=P4^-E)dkfCy@b2z{__Jc?Bj&{|uUk7n9{{@32gV0NA81{g zZK5|Z0CIp?@8Na<9gyglz+Zv>=z!v_eAbRdHbk%V5x zoAJ?L>GR)v?Js^fx*xqxOwP4G@{hge9(G}b5TW@=^}aMqRy(# zkC`g0^Co$>`X4=j-@*Ig3GqPr4hPM%>o?mN0JabLCntuy2>@nFVeh{Y!~CKum3FLw`LkC_#D6klqr@6!n(X| z`~Kt@V*~Ji7!xmBw(R?&`5b|H-?aqhfMgUB-52<)(Em@lfyk@;qmoVEvw0!p2DZJp>=(Z%Ple9I(OqeAocwA0CL^|C2tzD4~f^ zMo84U5Bfj*xmonben(7&>q@!Vs7T|S}$ad^?_Y(AT~cf8$ch~ zx9y+X_MJBtgFQ$0JG)O?JH6}rcrBEN82+;vI(m+c#V`&-?3MW)#Af~TOo`$8zUx}g z>y4CNl76#wb^OQ?JJechy=zYD@Cn{FL-rXDkKO;}F%fRE&|Y{z$SE)nC{aGZ&7wba zXDr7b=ygZ`E@NWXZ5gOGzy=U+Q5!YszS7db*9J%z+E{?^m>{uY-&oMt70T_csb@I- zj(_LuKK#Xf{6XF)Kfi9rrM9n4ERNVac_H|mzBz|3$NYM8kKTI!8V$T;&F4VC`6Zb?Ad$ zY+_8|#{1L{^yb~W+(7*QE7^edQ%-y1edu>UJJYs27d}8Aa8G@Wd@(ze+xw7}bJqMI z4-6THUmeYTkJn3o^hFc)0#`r7mWlFEF3Lx_`YARLratfh@7{mZJ9ht9)_q$b3=pCO z=L7uh>5m?W+f#UKY+H0wUP#UJX2iI;)^?x^$q#onfHA>@`T^mC#7o5Kk#XWZ*ji)^ z{m(h~`wQxqx9&bIF5b#Mki=veqrtEArMo*%3i?00^`y-Kvf~L(2RJ`~^2z_Xx6yX> z11DJhAG`nSI?;TIFjQdu5Bh=EyzZa=$A11w@(=z0w5Krru_(o0I`l^@aB!~TK`VF3BeZW}yuNUF)0a^R2flyK)4v?rmz+a92D^=*vrhA`}cFiwhuH<6eO!`k-qj^K>@5Rj_fIs1T zd{cO~kufD2ykz5mlK=k~^uHuGkhX}8$Fi?HeKBkRu^@5+kbnF@-!VbKeX8DOY>#flL@9sIF`Gv|8=&kZV zZ|aMW0{tnsbYIGlA5E`5gYf?y{aO2SxKLjxF0c;FKSuv!18Vi&>&>AdCX3$gU`!Z)AO8;K)z{(l_(BmL-)jdJuKEZ;|YL~XiFV2>i=Kdk>aUtk}U#D9qW-*Wm7lKj`WVA_iQ+OKr4=>3E+Q|K;) z3VDUJLZae7@^|}^Zw$l>m%!b3G`XJR)x>}OpC6YWj_jiYqzf6J>)3amjRnyUg#PTY zK^(w0764D=4Vi1#bh7pyoA2yD{2+fTQ1ah<_!8TvWQ?7$7V=G4!^f@texu^Q$bOvs z`|E#S`4|1!TfJ@f3B>>Rh|a5o2ZeS5c_29i_WViINB!M?(3yS@eP8z8KnHRJ+yi{? z_`~tVwH$dCc})JmpO5c3@WQb1OH2U1kz%27edGG-4>jJd{FrGrHyHYp|Kt2X7YksH z=)ILXdVL7m6PpkH-8pe3$$$4@-nGjaTVP!e_>^}uKZ7-Qhy~q<@gGP3T^}F!`hW6o zF0ucvk80_E(X{I^2|xEk5gFeP-=DrexqyuSkpq&bkNll}&=&d-(_pL}8E|lG8nN~r zd5FOAhCAXjIXHf~-XmpNxM+#Fqqf$LB^HD|1fA4p5C7E+96G^{iLzf9^8oP!=?A#{ zVB*6St2a}AoyLC|M?&VEZ;dX9rGLLMkJ~zvXUbSRJ|OkN2OuYt+z;}8e8-g>?ULfS z;pGoakYYTx|3{ycGQy+KAOByxpS;>Hrf0v==(pV>vhVnRVO?hw66O2DFrw!G>WkeY z$BaG@F*f>G9BB_^7P(-ZD{>Nm;}4GHD#0g74a!xywbsh5W9x_^Fh7HFAanpZAW5wUdQQ?>VYO8j=uQ2QeRKfjB_1H3H&^XFYV(QI=}pmm zuuxYhArSXXAtdTkxmt9x=`-dGLH3bxXpB#d&x>6}w-RHapUqr*Vs5Ojc#fSY&dNsTge{Ikqrmh{Upi#0q_BIcYYu?pj4F( z)@QVH%V<;AzO=Xc29-M>QjW(aYrkj%co`i?n=tQ!JOI`PNy;2Brvu=n%H1{pn7IYW zJ~|)%L{CvyAb;on#?M%NtA5SPB6LR~M8NM)FC?npr~mU*tJ5!V;^aBQ(cj1&^n&)x zsbZf_$ox> zn_K|5E<;l3fbBa!GHKcOvA4>CtULRJp5i)oe5yr{#g;!c*NNCKvR_ij8Wa?iQpZH~ z`#c^KP;2lj$t1Ufv3KY`6@g+xP(ABo@BUgYOE3Km5m9 zJdOu6W}2qD=2p~gVe`M)N07N-lnc5$KM)&`J7lrd^;WMs8RJOIU46hg%U-tgt$o+` zgb!#J=3_G+gdK4EK;a7{mIwGhmrFQ&mUMrl%7Dxx>)3rj9r68oX#BUvX*2$zxwahY z=RPKSTf3h+b?WqqUH?~etjnqI^JVh#udl6AckHT%rp%OmnP7D|`X0JLb0=3EeL*_| z#~(>?vm@?rb;`ZA@2jB;=UNrQ_4`j|@rRt582dH^i z&W0fWuC428KdOP=^`FS~qwfdZoxkfl2Xp7nowh%aSUmvU;T>{`8J{ZNR^wAGRTlJ; z^G%%Y=UyXYN;lnZ=LOOqk!@Zm`WF)IvuF;Wrhg@F{ojD_3-fFadW_x?p}fbipG=;Z zk4?##$4&XDiROXmVWwJi4-*#E%G8RkZ=!0~H??DgIt}7bw{Csy-I;XoeRj0o6&~Hv zRIb(A6sa-Yq^Y7cBkQTG&>i|CyZCQSjJc!wR+Xck-A5E10576HZ2wPl1e_n3quP_+ zF=cFrYipjTzCq@g^XBDOx7(O6dw>v+fCsPvZZ0w^vs8QA z++OXiBmvLzeSUD|Z%ts;Urj&_l_gq0MxYygcxXl&!2{Bdl(TA7w>TSsp29}qt04d6 z1`!VqsZrMiOPAVuqF>Pg_}Qa{TE=u5yVKH?Ie6rMp$CYEK!4&t_yX_%^RtKxkQ++B z0D6)i4o%?&UvLlbJ-_4k#1mfL`j*MvP=25I*YdODN6G_#(^pl_OMyoF&C}1UwXsOn z0#P}}mMmF1y?mQQ_xCmbsEDVkIcak&m+C#sgyq7+!UBQ!)7JE}iMRF~7-LNS(8X~!03CoG!DmGmxG^E(frUcGcxA4? z{trGv-q0f*6jPEP_Uy(TcD-GA0DX%;Kn%jg|KI`o1jGc9M|1&vfIeWY9`c3gCpd5q z@I8G9evco~pwH{xJ_+@sPVgddvQN89_6JXV%KDzp$>r9E=uO-quI09ORsI)wplt8 z2ZHYS0f4wBJ|Sa7_=WHR^F*L4bV5!YxMm!Y@0p{{Z~Km0|HpiAd_L*|AHvV*V~* zeuG~z=Aq>#ZOt=Yy^pL@AL>G#s3Uc5uDzZjFPfE)Z?b((ai*DDL@GH{)YZVWC5BifA!nk1h@ZKg_sQLrgU!Kb|ctpj6BLga^YXTLhP?CMM+5eLvcKP+y?crG zUf(Cwtbxz1-$PrwHg;`Ed$_iyZ0_0}-S2MX(Y>Gc@dfuCt&kl+9eN1Wg>5`cXN44L@o5r$5#x{(g6DNY{eCzLGrSjmZi;_k8yRz*T}J{DiC{V zEA$iw3FKgn7I@cKVO%UG=t!KNvP|;a)!|i7)&F^EkFD{gJ?)R4qYgENBCB4||1hU3 zYrayUX)A^`366+qdVM-y4~zTMFwa{0<9j&$W7$1S|&?`hJrrf#a_<)Z7=z-#n2h`8D{UF+dcak$yL;FLAeE&)E zob}1CVPEy^0x@^^fcf{$gbqRv0X`!i3w{_8i=mzrch2w>dGw%N|3x~=>Mlon+MGJ! z19TU{g?pcVRsWkUMaCTIbCirub?*ZWf+|$IPJ6EhUh)Yu8|}M>>wT`BolN<*v1?y< zbnVWOI{3r)`)fJ(e-78~ogAHQp`DNufUb0K*NhQY{^^t_W!6yD_kN+gK%BIIaA$CE zij0Z{z6jlYQ95e2=qy_xpUcLS-~n_2G^r(2zj!9_zOD0dUDekRjk#}2~G-=Xi$#Q#ep1cJDMf=mf^yi#-SBmOCT(ETLqGuqR z(1$*73n5adcIIqA#Y69U@{FJ2$=NT)b65LNPr4EnJ()skda^cY?zyYua8I5w&v@?J zdBjuYxAXRY_+R9VXCY%e7nwsoMhWPhFrnnLD?CLzrb-s`LSV8x$_2*J>PDP|n)SAx z#66HLM|0PX^yhs0dGx~oeX=XT{q|apS9)fA-}8LRNdM6FKhXnqh5O#w;3+jcxhGSp z6v8;u;<7*-$7G&$k|u^A9;uFoMZnx3;aIx;%QIWOof>@QJ>ARXj3R=k;`c=N}LG_w29M0;2T?3Gl%AnswUHhxqsN z4{ia`K8tWF0Ur4AA6)f+s}|b=qJ2WXz}9~o>HkLyhzADv=>T$V{{8$vY5~#zG2y&$ zsqgpys15$VS5>rUyyxG~zb)`@3;f#x|F*!tE%0v({M!P5yB08s|7^?P{oid>?eUDV zo9xNhT=uZdUyw@o>*y}NzdF=HzzOU+cZ6D};%viqXm*>6L zT-viUKGy;I{)~se7wz|dT%Whs6u|qvO3!Bu&-323*Hzv1Po4lC5qEt=ZyBq3)%MBy zFRqVpy-mORrbyMU0;bG z{Q0MnpYYmA=0c zegEp;U#Wgq`aTy*&*$^!Yo9N5TGgv}<8Jz2kBQa8?gwaJ-;dvQfZuiC6|OV*eV@zk zdd#KQVn_G>AW9*76?<)!f2{WBn*hUK3E|)JfHkha(F5Tc?8~@WFO_G zWEFO3-fC8Tk_QF`Qa5sr?-$tfp@q;%=q7X)S_yT8iURr0nS>idmw+IiOD=RfVT8as zWOoWl#)qo=bBe=~tA9ajdQH@`BLwp7IiD%a5@ra~V~^b9nmHGJglK^{F1(Vo`LvlU zQh(Z*IUtLLQ3AY>Tu71+V-U<$V9t{Ed7Yz&QorTG5@E71P=Nkzg^mJs9xKci_zl1B zB~%uW70P`5pUB_e^+cRG;mO%6Tn}q1EEFhTErGVa?oV{>n2FS#{hdpfE_2G0_rZ@m z6?UESg#C2R=2MYV1tQL$*S(XTvhQs6=d2NcG2anO#qXlFj z(a%p?s7*kLvQ_S`TC)`K@-|Jh|baKOEMx8VGX*bWeC% zeRNFJCrgQ@$#Xt1`Q^Y!?G-#u&nJhprP`pz_ooBOygVR(t;bN@@U1n;I<%WU<3%;iPI9F)C?EtMK*KyghWgWDBTHOD;=lCC2=($UlJ)c^H#hfZA?~Mb~LvYQ3`2W(}6KI`S`Pn`<2IbqiY zN!9$U=|1-5>ym-Abu=ITLD37{MVp3wZP#ySzI|f%Sj^N=^nnNT+~6)3P4%9ivlamK ze??d-)D`fNTZ@ zyXF<^jIi#*3RRN!%qmV<0*A`x>{#FK9vwnT>=1>IIKV@3}6RXLzT5uSxc95_N!xEO@GAIf1;kj z{6#%Seu~lh6?Xkf*0P~ZSwr_)b)kJW&qS}Pjgx5)MNf+CJ5=u^tN(q{eb66Ys6nrd zb{$aG+M?gex_zvj?_X!%>xAl08)&V2yLOLa0CDrRSq~5$OM6^S{^RHmZ&81>L-I!Q zEweSHP+GA3B;I4X~+ci?zdxZ67ScitPy86Ng0G@EL z^=JMf_D{STSnF4lzqlq?Nd~mnt6jUytyw}m#22h{#=ZyW3IDdR@?T%_@9M9kxBkuc ztIq2L)~+ZhBuf4#PMjFW(?K=mb4mt~uQna}*mWW4yR!xlGQgUu{(8V&Tm6UpFi%pt zDoDO{zH%My8pG_z!+ThJ8odhbee3Ug&Udt_YX__U+e`l=|HziwIJW-KA0Lo@Ku#f1 z_K&rR9bNBf@PUv(^`I`jNF3Gd7T}qfMEU2^OILr2kXiMIVs31u+uh*YSR? zRDa6vYv0nw$cI%tCPnRYX3~tuEsd}P(2#W`U47#_TK^aRM+e9c465^sY29O{r9FIx zEoJ>E)}u;jok>@B+GxV^uT82>sz0*NGih7#e;{(|<^AqD-Xp{-`!vYa)Ze!*)q04J zyQ=K!7d9Qd)2^R=wK8CRY58Z?Po=!-zvgIk(5|UP-;#aV@E2H1i?#IPYXjEQWsR(t zUXv`!hT1x-Ep7d22l-f8>m9tHs!bC@g+%v%ee3Pc$Isdz8BqHwMn`;rH6zjW$N=)n z`ugs-@f{1bRey?pJHDFuHCVQ4<#R{OmMvTCnseAY)*yW0g%|7^#7-8dH*1Q*8!v5n z%@pK0%rnRC)0W79ct5!PSrguFE&ac?LM|cE@sIe*&plrmcxcuWR`#hsx&R->UtjrN zv-U!8gw}Y+Rs)qih2l)_ynooPs|WwnrvRL@9{29uyY2ogtf{wT#d?#s#ZePTKN@$F%`^8=Ivy zCy3`9IQXTdIsA`qrGLp@4Xj0o&)Id@leT^~9t_>lcl*gH^d9;TJ%}%;_0lX4psQIoJU-NK+EweZe`csS4vDEhJYZvk(gEm#QB&8($pCAT;}b(`WWm>t#dl5&2R#<77#{t2`WZ1j zUo*{nK5QCwUSRSy{>ZE6;1zrvbRGPT4W;hzJ@@sD9lH-%oq6==S0{XFe7W<));}&b zC|eNHeZTd8=mWt2)wKpE<2t^6N_=(a9y2O0+v@ zQZ$z=z~AU|=nFUp)SGMg9{yLGq-g)U$=&K_^XglBt!?0WvG2R#^^cPQ*)n8c^t5$x zu|d}1buw_d`lIjaj`+qK4`=Mh$u;$K_Q4%p-9>lee9*l8h&SW*?qKaz+7fTfP5^S<9DR{o*Ce{2vLAU+-v5@Oe4Mg|hs~bJTIsjqk>E}jt*!jvlVi58#NLhcJMf*cL-qYwS*Ps}!TXVphG+tS_1I66&j zk(}?u-_ZH#S56xG`1Et}5#riGYgqFfc%C{Fhs6J+4HQrPAvierPJQBydHA-)_0~VW z_&DqEYX4HZM;AVTZ~Ym&qHebC=x@j8@V{uEy5aAp!RV9b;Gv_J{GWRUbxzk>?W34K z$NT%9G4Fr4*F5#qQ+CfPV$<5w<+SQpO?#$X*7v6!uDAaFGT>r^>`9?0X_d8>PJF6XKA2^ojaoWZYpuhYM#y_SDm4yWR{`xLa^e0x~Vtn}NaWWu1 zKwO0QIBSv<*F+bxM+N1Mi`60b&>kHp83XuR(}&ycm8sG@jh4oI5~=ypVS>M zn6SQwtPCh-MEzF?IP*WBScgzqhx_3GY*8?7qrO?1w%c{oHG*|4ZAy zwf=zRBk@!6E*DHxw^v;K$pb+Lf7aYXzV_E)%;`oj~}mhe1msQQuF8hz_qe{!R4O8w(xK>ZP7gA-@0wlcu} zWb9GLSV^s(@7lPpUGs;(X^-t6Mchh0uV|H&r;%L_@|8eza z{XOcBKOuRF)qks0y=DSAkqLfO?h}mPI#7=*!C(Ko-^a;-`b5MBh-nfRLI&s)m5&%= z(l%GzB-X!8+v1$*J!YNtnTh`s-@01;@ARRizhC{eem(kszCixZWplu&KmIduCd!LF z!;i<0;XZPCEwFY#HkomPUc;B$m>B&bY(eGlRwgJ)@pJrK$$z>Q=gpYeugC2*x_0ea z+kbI&yP9JT`5Z2f%+X(M{+sGe4qOT0&$)EE={_q~tUN)T@tdF(`(DzAfyQITjEUO= z)$N6PrDKtn`@FfD-88=4_$_Pu8QaAl#uu=$PjtUPKepGj!#3WF?@pVuw}^}RUQPY| z^_R}GTh0j7PPqK7PsMzpf6VysH zmOKV3x0AYK&*1@l;+zqiOkhXRj5g?ROxTc9Hr@yS6YnJE%ieqO#s2-<D5n6$~v)Qf3&4+|6NT_+I`!UOZRQdmaQ*4?xB3*&DIxNtp5cIV?jPH`D6|% zl&L$-y59_&0=E^)<@(1)dC-k|3wb*#V8kT&_gkts;_;oJdc-)6e+S%Jh__w0AnD@ z7^hVIleIVI_GagQUA$^b5B1&q$p%hU{CJi2b9!2MMzO@FK)v-eC4B^-~Hf|76%R<3X%L@{u8BjJY}b?9-^%95ak82eX2wq z>C@4Uv15SWGA7fk^hS-^ynWh`#tss*3CD1O%tMUB4q| zrKZqIz>gp3xjkmJr^c}}9`YTiJLP2DApFPAQDXiVG~VxLKWuaTY?`rih=We|VYaCV0MFf&9R z+Nn7Y=R9rn`~|tJe{~q+m&Rp}OBL{1)2=JCg3n zf1f9*?$rfymHz$w+X6SN1&r_KybS0WVOt7geyZwSLFcDjI(o(!@3E>mlFR&L*TczW zj<6EY5xcZR3VXcUlY$_FK7oG6fY@vQqbK%$VvqjMbJzawcja=&46*Ocb(Kf=d-wnD z=>H!7YgZosqyO*XuGO}DQXJ7AeNr6JAAK?$u?J5szvCG1b%5b`#FK(!z)zlBma1p^ z+Jhx2XXm|_m;5cH|05B;t>D&)7@J=g|9?O9j}z`AC%#>HCgX0zo*0J)^hdAWKi7}1 z@Zp(v3FLQX6cSwz<*W5qpR9PMOqqfL0sDj<+IOZ+fWpdV6MU>?aGLJHyfJ^?|L zndf#EDhLV2YV=)#AKA^!f}KNOqC|;F`eAc{ocFQ9xL9yLMi?fv7pNO?;meMV>ihUV zwRWWQlzF+fzN{xq6*>ub3fKIJj;=k8ynpoxFQ&{;c&;Z$k8Pfk>kfEIz4)o8^w#%1 z1?E2KxxMxPJ-DMlOp|fV2|^PguW;?OU~YF^`O^Q_-IaiKRi*ulEG~fN?zp5@YGyf8 zS>}?svM;WnfPjD?ASei;35p9YnUgwYshB#sO-}WtWoe~onK_M(<5yO0xuGdq;EHVL z`~BX(=Rfz)Cf0nSu}j^0;#c4p`lGyzmP;2)@~{TsTp#=c>UhfLTnIUKZ^-z)xIKhLsX9AZC%fIIAL4#Tdi znM-$z-PdgE)3#2Q^mjAXgK?s?+dMMvhFbp0>tdhBxGx0aPXQ{?5!$L}ZdaeT8-ut@ z=+aG*he-b;W0&uh!=ayL40yc}@O8rOYKQ#oj=mp>@1C|wGtL#y`3|)8k#-rg&@=A5 z#(xWN4*^v2)mMkVjya&OaZ1LY#BY(6l_j=Ajc0XbyI_11o3=yRx}a0fowrDQZ`Jj^ z`8~`z$Mj{zq;JB9lk9c?cjj4fF5B>s>hRZbGt46hNZcd-7y7|TL-fT}hr7hzv+s#J z#;;+2OWZtdqh>s7I+rn^%^ZF3yP(So^z$k3=6vS5U^9=a!=L!++-TAeV_dL*f#gFl zkEJ^N15yrK>^rax+eP0|t)F|*>iez3UIKQ`k9`Te*8_Y2HaxH< z{B>R@X((;xt3pG}wo~HY{>gBO(_-8K zpRFn8M!%EbPa7S^P{yI>9*Xjt0bG-9V$SY`zm6Me;B!-A9~e7NTA4@5RR) zc1ul|b5L^VIA-)4R^>aTPn~h1%n`Brb>OdK&W!O;))zq97huDC_#$YtO8G(KqD#q% z0#EyW#0hKON_Be!EPs8A#m~Vth;tBY@Y;*HLtY11YdGx(q-J{`G8@@}2N@{~R24Sh|Vw~PVA`uog;vkI}wy{q%p*A{;> z4TYz@EAkxWI`bT?_#Wba1N}4KgmJXbB;Hip-`^?m81O?1O$AQgVHv9o;7flV$BQNL z$GGj>b65==;$2B@(_>Iu{7FZWQ#1*(ZRmN4L7_ZBoS9F?waLuG^*Loq&lhegmr-TP z5q?3^VgIOHiK(pbgZzRB@Jj8I)VN~|>J2SbJ9d93^!3T^eKsb@&U+XoDV-8CGP~vtCul{*PHKM*w zKRD@`zI)<~bwTqPq?|c2@RQL8PdJ1qvVB*yI`M_Mga908vuN}jz@oomPq~x=Qs0AbKW`0_!!YM zm^-s?-#*6W(57Xhw`dx=U;HcTHJrnY`C$Afd5Z3PuMEgc6QK+K2{@BR5HBFIF!0V^ zd%;TEyq|I7j1!{F!+oxpAHn`-yb#w5@X!9>pH+^*{o>CtFzYqsp^RJOJ{OElBtA!v zf!?Xdz6QKGKY=@Wd$*{3b@<3p8{GB#a=$Kl2gu&8$X)PFKQA&N*BI=1IvM@_pzd>X z`D^eu(-3uI@=wMdF$S6VP={^695V88;BOyWB0P7`-uZ(-37k>NU)(WE?$dh%r*69htN2d(eG-aTkz*QNGxuw zg@(w7NJEUrZZQ&j2QcP{^aC1TOe^^bV=(W9KWT{1$g|)_Ek;}<{u_a-KcE3|HXqm{ zupad&4aBP|VBDk5snNgdcyh|5mV{GVW9F|6-oA=JO9f|4F$7f&RH>K=Vo9#lpnSVl?0{3yDEJ@v*eR?mDz5<=L3iw|3Ib#1KCJ%dzKyQMq-~wJgW9i?m zcDtJ5mnkp3urgorREWP5Y^P(>KUK)n8wwj@CEcrzcWGNE?`wy+-;`(YLghDXtmq@$ z1Bl~%FYpgcQjPtvZx!?m2d~@8-9JY5k0CE&461!3^jO4I^_X}=_Rb^?k!~1o$rw|! zJyhgWKV~9tv_q({Rf-{W5Ldr$v} za!3Db1>zHo!#!ilN{pc;MSx<_#b|5cbzgvg**U}a%i8%mz15qDD=Zay_f>_4zxoMq z5s-Hu!22&r9oz@ntMt#hd(i()fWO3!`2`HW>g;zu-Y%f@IPkRHKinVw&H(ite3A5X z{YM?Z-$SptJ^_I{1-Zyld-Qul#00l6Vw9^9tt#`D|Dd-3{)_IuL-v0VTK9zt@b7hB z5BxvA*%CB_PviUpJ}QNBF2cYNJ%RExca&20C>x>Vm$+bgkrJ8@%B%vEr`b1V(Rp>9J z3c*oXmfS6IiUa|}Vo2|g(i*45Xqo>zhZ9ik0I=~TRfj(2USs&ZMnR53FB;5!_yb@N zU;y9=0Ob>mOf3#?)!6u5_+z+}F+kL5@A(|ok=4}e+O+HXiqW|L2BZ1NzZ#96e--LX z7EI~@V;X?^L8bTtT(dob$`2WlMK_Fwy&0229Gq=$sQh0)_u$*j2dybL#@{NJJt84* zOFlx#&o_+6UwzAPYCQu_(LX&Bz`m{aupd?Sq3CAamvJqb3*De|wKwC3W&=N+TQ3%J zBz3{~Tg486Mf)8`mA`8rTK+9$<8qNVM*Ng-I6wJE+)f|c5P;2k1er4vkVlv_@6#*H z>uw%>t}Hw}`a0r5u0Z#b-}F7YOk40#zGEWdRv=$Bi#T1r^_^W;PMtoRcjoN*ywhjS z=WX7VpWikGaue*2tz+}c;wR0$1zYkLXy3+G1buO{)){lwys3VdP@wD}*GElUAa?Ys z{PC-BUz>QufIzmY6MId)p7U3$ZO*K3y}$Res-Fg#4LJ0h@G0fj^JqU1V3pm>?Gq2b z)FYx_4<5HpbS>(P8b4i5oU_Mb--ZpU+4D=pcW7?cd>**)rpTc7z@umXh%0D26To>Q zN5%Ft7JndmO^4W1Dmi7U_;Yl-x*VADy+y8teAu~HLXGV&*@AweT^_i$9kk*m8eI

    lchZ$vV6xsSaf#k(qb~W1WT3!3Z!7urs*l4=@Efd=@?M~XhMmt0MNW4GWhaIZ*wR0+Y`LFYsWmsbYg+|8NgM+UzwhtZRBsp+yg|wqKWWR^#g0XFKfYN8-*&4rX}# zi$aIy_9xEWZJ|H(X_H~Q5WkWoHX!;N+3(bYiOa#ieXX9zgbqp_1bSfO;6r!N|FpGP zc>vzYX8iR#j+u`A4q#*H8}S#h?J&Pw|F#A+@=!d+m1BT=Qs=%cHkIw$w_9zn^fyOl zeP;2Wu&>bmSA_*(pA7?j^Ko%X`W*8EsR4g8t36?LmXH=CAzB)wQAZ-8lx;wa<5bA`$j7=v~3F zF9}`I7sl8C`ojppG4oZ+FxV(C586%oS&d2BsQQjxrCeivviRufd!d~g5Wnbe>W5>; zwy;g}QB(V283)Av@m%B%83Wo5D*6)l|NWHe91D9C^+e8d>XvMmHV%#t{vWqEPwXME ziEK8v&GVYtr%%lxu~aol_(dg7&Ja5==}OP-JqORJPLnTN)*rT~f$I@;?{+CADs|pA z*fidf+*ZWc-Pikb44zK3*nmcje_7F&qHG>-!KK^lRQ&sQu95I(UjN0dq@wkcl$-<(EfG`?@yV`deqcDc`o^F zucVVgrtEb8GPD#ZoC?o;vYWD2;;$N$({g9Us zCrkRArBqLkv`c8%rvG!+ys?Ec2KTF=PmpmiX5eq^(`O=g3P0;PY>BLQO~LnR%WIZ! z88X6r*?(O3ySentzWe^zr`CUT`U$jewHMlXmv?^oVXZ)18?XM3XQ_ZHq-i`5ZlJqlt zhRb&2(_8=Izus!8j1BmP-HdW&2U@X9FRL1|P!H!goEL*)Z5`FWC zmGF2HpxzZ3o%BiGNjqV6Hcnn=`}EsJ-pQ}y=+*$S4XMxjrKtvE^GoFWEYY{hjNps6 zj9BO*Tnn%+;hSvV!;aU*rd|CHuY0LQ$furv{SSK zP+8Y@iik=cWc>Ks59;u=4g71~*HmX6PtuFd@u~7ojQ0c3`@ieZ;bDJ-Opim@XabrD z!_DOFHu9xS1^5o1G5Yo~qt%G@xb9{1o9Ul{gMDA>(mx&FwmWsp2*>;mD=0TSKR<7@ z7|G|T&vys#y=)IR^@!y9`+uE}*PYb1ZCgj%8*tSvzoYZW)5YW&$Ui8oJErX2x*_Fz zv7bqq_zRv`b_jPZ!E+DkXCXJ(W1SNDyL%F3(zs$ZK5m-uTz#G8TEG(t_#N_B>(C?W zt3%&d`SH&EmsGoSti|99gCivFe-i4KxrzE6bUo3tAn!nS8Wg-l)**eJ<CB9|dhR2j| zg}*wEJ&CIbPiuJRu=O#g3!Tz*jD*X1`;d4O@I!#Y~8|&Yi02 zm+ukA-%t-koWnP4LM2vI)8U@|->D}iowL-*b(L}hpuw!$YSgSF*q`<^`VJbcoHEfDkjWxaH^}^AJcq9T)whwm1bxH-K6^WdCbY52 z7+`)@TYola&@QDM@%>v=uRfm20dzz9o1F26e7ne8|K^>r2f!XdK5FOkKf6BJuO6HXn+oJm&*|T*Zr!@M-mO1EWV;-^7w2A8Ks^lL9Q60%{{4p> z?c}>w`k>9YQ`g*r{`h0xz?aXtL|-oDy3i=$dhxo=JGQS{wc4_N4OYY8t1J>(F&%5r z)GC12sYk|_-?nQW+8S%`*)IMYOW+T`!#$$p`^HJIH;*a*#&G+oo8Ybg(5COH!XRT# zg(k2_i#6clm*JZ2-V3G@hk?|7ZWtIBug(eo2m7XGu{3nj(P zLvwGB965R~9u{2TJGeyKVf)EfRcOp~>$oNe$#Edh95(4KnP2X{A=b5=bINzwE#(l8Z*UmKIP>%4({fbf z&_iO=qpfu~pU0f<{+y3>t>Sv>z7+g09X!QwmbFf|Pu|xt>7ojXN*9@I>57fYVNQ{1 z@BgCWp7vair)MryPK(P`^R#bab2d7f+vhtB%{;8S2j_^bn6g2?z$L07?C#@VSg+zT za#XWf;2E%QB)_!nI-ljC+voFhmcFN2#Gb_WS^^}7?)2$%YT!IP1Kvw;z+8`>_Yw7A z+8pFCKhHY4q+C=zhlGl)I5r3C3)Y=3a|=}Fn+2-tjA9j-wv{qwA>xx|9WX!7*k6y7 zPt+r$R>3ajtJ=I+s+v#z4tClI8H1f)UQ!O=(*r|h7o+huM8Nz!ZCDA(vsLT(Gpc7F z59OG7LwO`w;_S2ysnfz@^p#EPA++GU5nON;u^)McS3!V0TgyN2PsO@>_*ALCT%2nd2WFf3iRs)9=LEE) OL7K!huCQvYVf+tN&MDvk literal 99550 zcmeF41)Nq@{{M#wx@+hd=}u{-8-|8~A%f1`U$_?pie@NXS>ybA%Muk>7U>4++`5B1cFK{k4Lx za`3MbXBR&gTi{{~Tx@}hEpV{~F1EnM7P!~~7hB+B3tVi0i!E@m1unM0#TK~O0-3Zx ze0+S<#*G^;<1s;0nq3}9&>O6eurI%X$`t?6;-MaN;GYkD6tLAyH zj@l>(v|`1IP-x)5fnkvU+h6B+-d}zm9~c)G*Rw%`2B(@eYi3ZBCQYnm%a%J-?i3yf ztc$N}+qP}PAr&PeJ>q&`yZGmv$KwCyk4naqw()h(t@AvhyrO)`NB+(!;-0YN-{|y@ z^-;OPYS*s)fXCh+WeavtQn1z`Oa#WcMAVgf<`)$Z6%vu5FOp0}1J3!L>)c1X&?fvo zrCoUbAGK{%&NDs%*wY@=hq_VclA=Hz%GiT0PqIx>7CGvHrjkpf)!vo0DAL`SnQKO>)xI6t{ty;DH zDrA@loWL9Gz#2TOil}1)QS`foGA2l3~@mM;DxM&+R1_zw>&@g>SuH zWa?v2*?smKUKP;Fs_}5`T{yH?Epw|2yz++O(;spYr7sc1dztNk_11 z7*?cWw}@K3Cq{HwmQY~m^*0xdf8degvtRym@n!G5Ut+~a|17cU(=Q^|e)V;U)t`S= zV);j(mRR=whsEc={#MaR4?JEV=D@A_IxN~2QLW3Au)M{h^}JT1Mxwf+>LPdn-2lHK zE41$)l@BNvdaFoy_3mBEB>eR6(mTycZBL@o@|sFtVOD&>8*hXs@juN?&%_;ZrDHcMb6(FfB*jC#fujZ z-f!URgL{Jp^{sx*s8hu&*Gdd;zhH5ZSuea$YRfM_d#oLAGnHvgm81j<6WDum~&(6RX1FTQmA z?(wG$HhlMEc!@e|b2@z3%HDBR78k6TFck`@%Yje@@GY;~ljX z&ndO#=bsBry8o%rsCKi|M(suL0X_z{GthtfBlytZkDZE=f7817yw~1vdN3J(>RfE< zQ}65g3ehN0TTxXJ_4wWJPsSeK#l>D#t5&_Pp=7>pjVO~@wsK3~u~OiKKKHyFc=T8$ z{&K4LqIbS55PRg6+?UV4FQQhj!=a^{Toqop`u6aA+-|$9w^=>zZhDU7Eb5@ELisp!>i>8R;MU#?=bH1A) zS`c2iMq;kZXWvn5*0b-G0&jTDzr!DS*Dm=^i{5-MyjqWC`dw#Ha}n)FtbpDnfAD+y z(fEIq0~^&eqV1fWfptL_6rKI@ry-%C3A#>ObQ0kMk`Kt`?XS*%lTQ%#$WYP3`NBrk zZr07pFL*gg=7q-@Sb&L>)t`SYG~$N0Lrc^?s^3zl6{5MK$)Y$BKHLCN9}zK6uVjkW zvA<}DXoLt^n4)%B98o{!P_fz1f8g3pmA!*lQvi5-bUk-guI z2gqgW{rG>_rp6H!T1+pM_|wnuw5ta^ELjOH6m_MpBLiJU*fR1SzbXC!*rW3)Gro2C zk_~zuF1PxlB<#KH1s&08C71sFyNFu-{-odR60H#->tjU>jAgZ5C z{M|&A<>)_vA1n(9Xfx~b8fnW2A;J->?mvk8s zx%RWK0?T`b{0aM_@%MimTCmbh`VBIVo(FgEYcB$C>V$2sASxrmM$;y|2jXvZHgbZk ztRaFYT8n5C^v0yHYF+mfU;f^g&i4r7L1!mamIA{LJtQ88(f#mSAP<}ue?W2)x@F6j zq6rBJ#WN%2#fz6OU%pI%0tKpxT84#%MHd}$<0Gkj0F}Ams9XLVDqW}RBl73Z-%eCp z@pk!3F1e(n;@M2!lUX@3y3X^fRH;&;a^=dAyi?_@o;Pnqqln6v506~^**`PF9vq5I zIPpn%&O$ebg@x`^PIFn_ym=?7{DX=XE!w$c$&xM0mMz<$LWK&o%9SfurDDa3dQIhu zs#kfvvz#aXj*5z^z;*6ZIjZYeuT-g0mn!yXTexuH-pVtL%#|y2THf+acb8uL))yt6 zy$R9-ia}`Gd;|BM6!zE>cmUpm=dfqU)H(Ttx7>0|^WnpX|6}afvF~R_Q>ILLU-ZHF z@#8;?jg9@dU+?apwiveN-z5Y6W}TN?`Tnm>TU_={=T05J7%*VKKSzxk_0hzM6F;0f zb?OJ1z2kgbr;L*)Pj=-T6+7&szJo@5Qf0;4-)Dq9?H@Jgack42%@4hL_V`x)g5S)X zIrB^L(`Si^iT~Wad-umzUw!pQ2M-?n@aWN_AKrN5jUOC4cI<6d8E7gL2S;PIa#7v zvu2raH1U898yaKX`VO~p>%R(!apemn{MQ z4-7|-jIqv>wpz(8lr0@UpSIojtu^ZrXMK8g70*nt#fuj^>?QAZ!wol>WZJ+E?7=cS z*!z1u58QRvU3UBJx0`f>Ntc-PisOMfGvcl5tOHg&O&yRFkCa&T@zdGzSfHn?9eYd&V11=;}cuQL6lwQbeZqN978?2BtxZ~>!W znLQtWQ!buO*`)t%+}JTTc=%Y0TK7rXGL`IaQPx^(*`N9YpS2)q9J>zy80vwF2nn-XsgR=jG(1MO*mUx+VIc>F!D2=CFN z&LaFl{7h#D&L+OjF8*NU^{e{OY-r42>(XzOmEHKS(>6fmudw1D*6Ol$)}u!^8#;8T zaW6XgLgSyLnfPe%$E+Y=L|NTfStW4V$sSN+td`9epKVV4I!F*=Xc7!koB}cmg{>evP<{cqdz* zv%wz>(dF0xWV=r<*?@)51?T{LfFG@C*HPBBQ+pdUXpr*(kjo3@10erA+spo-;p45+ z`p+|!{kmiJTXgsKt}gPUY}c+`CST3ze6aU2f8Txg+4&;R2k;d3jhB)24B@PCo}e)4$h0+rKODd;eW}NAC4@iFb@1KE&Eh z*_W~GV`n%0+uHOTVZ)@ucm{eO9I(w^=Y!Sx!aevoJR3cLKY)*U<&{_3nw3i}X5N)n zJUxF!_JDXGck5~7Cx(iM2das@4#-w4;PFqdZPWUmwn7J>Yl#Df#tgDfgC>!;Own85 zUuF8AtZkc1o zmpj=%eE6`#1KGTg*ux7vAN_)!!56sp+G{N_VYAJgx7ey~{4`zNMUJibyjMR84b6oP zAn%M0AU}*BkgZtYZ14vsQ#)_pE3!odszhSldUoE`R0rU}&k1Qf07Ra&=0Dth9H*a3H2pqheED_QB=1z@K-(Yw#R?0QrVZ>sDC*rN=VBUp7FoK%wDBo)^{= zMcqVoMC6_Gh_dVlo(uly0OZ-l0fPrvyV%8wwTZKnVr^us#-y8-2WVz}lk))BXYX&M zhi7)b2Y=!|V*XLX23h0z_h*9tDU00nA8Xrhyp4$);c`9reaIhj_*==o=P!5-o`d(4 zBeboFn{51&-4>bni`p_cC!GAZJRlj9ehsVI0~;=;T9foZ68D|cUEi&m_&s++z_&RwR3f07M|=(6U1p*%s< zMN~^f|06aaOP_PapSJflAZAb>Yc+01D&6aBz~tMkQ*thtI1oGSeSoy^%2NMT= zFT0i8A0S;@e$_{IS^KWC0ll0J;9h(He#n@dq4)og z;)A4RKf%AslGkm}z)!pL4+<+|c3Za%39W?kAb5y8JJx>@U7{qX7$3 zYykcuIs?8-3;#fj>5BntzVr5m-{R|GOGb_yX)!S|)~8P&>!MsE{W#OO8%!g{K@$te-AwHfT>N~@wemyk3V^U{riRg+KpB-6ZyxEMXvbxyU?7)HVW)m z5#y06iRcr`(g*yJL*M4vJ;DS0KE(zM=xvQt#es^o#HZC}oV1S01!_Ei^A+$Jyx+k) z!5QKlzM!uFe8HCdQI{@VO!H~2RjXFkqD2cgSC4r+jNy0Vxa-%q+BK?Jm1faaYP0b7 zW75)*n^JRMva)4LndX1m<(FUXd=qREeZKf$@B)1B=%bI?!w)~~&f$#UZz9K9Ypbda?lzQiJ3 zyC?a7l(XErFRWFkXcq_2XMnx{e~&f(BfJ65mtA(5n~Uf1_4Bj*Ts=Qe*U#JJIy_Lf zb`7g~X*cC{WqaWl65<*Qi8?qq-TJ(USspCNL0yekd&<*Mjx?Fx&Uq@ZLc6G7` zj)7Q%b0EeUo%{KFN%+^astwy)>GfY{j6ZsF@!M9aYz3<<{J|dFnF~ZYe0h@Q1~qWs zqkD*7SFT*?`iJn>ylyxjya4{#e{w+k_FQRm*6p)0i5i=pK|g@Irh6iy+FviQi2?k0 zYhr*bea;5|U><=VumQy2W5@)fp zKY;OM_()(aYuZ!mu2{#8 z9i42UYki#P`I9ku%a$#3#JMN*5B7(cAU0-z)mij(svN`__@h%3ezKl%3vA}}DMtLi zPcaw$Z;Z!UwQ7~iCHCyu)A^dX`nW2xs>$p(~~ z_p+6h&eiy6XLFHl{66{y@xS3IFy^@&!8o(B@qYYBe9BSMJ}H!h zajcVF`u&k#^f0&~$K>S5$8Fxc+3_Me$lHLl?1a}JT*Jr3Zv@-S_yGGs-huqXwbx#4 z%QjtQ6%+p>-!IvJPAi7tJL$2=4d4D0TD00;;g9~u{#O@e%l^}TnYD3R*ZCc~xPANf zP9M@X5WZB6sIpcudUen|8}++rY;e`f2HWLrS~y*f-p2m~_q5)TmG7`W=pJNm^vI#s zdGxA`{bsctW9*tuJ!%uj#5#H3yLYe4y%2+e2l7hX2Om8C_~Q;ku8}8(PrG&N=IV-G z0QX>j!M6qW3Y`L9@yuX?KLTz4{wsIbh>iDULH7%P{Mh9md>0y?f4eYej#+zARZ+J5 ze{l4=G^<&uqwuaW;S6T-X0k-UlBHUkq#lu?jx- zya1-y?X_#yI{%dVBm04TK)cYdn->1aK6-_`@3nicu!)=Q$lUIG{FxgRbKReX`7+Tk zQA<%pQI_+6vQ1sV-}_bBIbx%cJMuN~0QJNN!1iI!i33_q+8=~Nl1;m`?@a66qqDmg zyN&(!e3+dwa4)=o4!{PGR~$8Lu(cZ-6n_NCKRzKm&}F>FTTPwhd_ep^d;nw{{J}UY zgnfVV$tRuOK#zEtfDhmYbOhK3K8xq0XYet2=b`HlTEeznRyX0ZEXh9QXB=Qe({U$- z_dF3}0Gf#WSWum2{sDj5E~{0m^%p*F6UL5kc^$?8kbm($ z05TtlS!U<>3fKqk!%rACY?!l;Jkx*AHL&-3AAN(}*}HqY_1*kz*6cpKjPJMptN&`A z>a{|7x`?sB^+b#TVop$&KHyK=f$O;twg6s07QHS;2Mih1&uT4x@eCVKUSk8>c4EF& zUpF=!-tln=xM#O4ychkE5(f_HYt5z{Nu7f_LkBR|{s$X4exWUxH{00&@;UUwdm8{= z;F?_mZ}^9Nj{hys;yaH$`5t)V+I_oia^i7~_Ytm{`TWUsK=unyJo%nLrtb&ekK8Z5 zzaIyz)672}fAI4Z*!FzK-)UX*_XS=9JFkn;>n;~G;mq-P=-#G-mRRrZol4PC2LqCI;$1l4_ z>;ini?}D+Xe+ip^;OeVv?$%?;@m>af7D2p=?-$W%#Gi!lVi99NTZk%&3W;)xvh)Fe zWXEH8u17H9dB`#{Jw`dX=pkdy@W-(M)o0$Xv7v2J*#Pg0WVamtyx}M)kH8RrjGRoI=Hs*VAR{k)ss`&b}ugvO-~)R@3EAEuh49Lx*MyKO)B zHqFJJqIp1@T`rjMU|@#5_I3cBo*8-B5A^e}^|#z|s~x%iI@`7TDjSgaf^gRu`Al>C z_yng3?2F8J>a&p0Fl3+kAALlPMS){~bLj6ZeZU{N@ojiMj^MyE(Z%@n)Bcp(}_3@d5ZfW#Q=Zx|&0dKTST3J|1$$%q@rLPYyh%Z?1Rm z-Y!Siv12D|)1tA}X+P8=*L;>bA05!HZoHcMQv1!^X-gI)*#YKfBd=NI0groHGJm6d z`~%lqWy`i7wPpz)Cj0s6*`(8W2V$QTL;dt?c-78#3*122$L}NOmq!#P%JL@=|3KNI z?SthjJG|j_0P+le!(;kclbLs%VFSu&tY({@!)!p`XgA)6Tp)Y{?!2GhlUE?WkRJKG zqrdLsZgO(;>(;1I!>Uw>v+m7A)Y}l5ktbF2+S_DZBUs>GjjkbFEB7+B*qfg&V zU|zt>I!BMYxAEY9%PlwC4Tr9CV|k}|S4I_Y$|z`n@L=RXgP$jext zg`yZyYY}7q&r0_7yAbe4Ut?d-CxIQ$#ScKIquYmQj(xSjIfAMyK0wr>mt_Mw$_5N^ zeYn_eeg_X>3$!Lrntd$k@d5a!#{*FnN?C=P&8*Cn2a@!F-XAPyjt4erGO2IB28PVb2P2kL-8Tfq2}@?|0|vilM%u5m!*08+-QC(9qUKx-RX zkLCB+Qk7xbmQ60F=huTFM+7e*>)3~5isx>){u=cO?Xh{=Z@0@6|L*cRnUCQ)E#s*$ z_j*8Oi`@9_&k;3yljo(MCtgInhtF3*M6N%VC|h=4_qz}B4^Ciyz6l-zL;P`K!SUlp zTXgK?qZzsfeRUu9S9+Tqp+z$VaNbolxMcJSIg zw)4t;HhtSY)-v&ZE0K6A>v>#{a~elL6%+sGyRt?l|( zmAC!D$@)3j_dwa#JIGa4UiPN7A2302lbbK`sn(*Te;0qRhKRNQ3W&(_o;CLRZ3y_& z#>|1d5af9PSw^NOO`Ko@hmEm{L2L7118T<~v))~k;s9&_u>)meoJb)4=yc@z*=L`1 z*n)3nq{>qyTb$Kkc+ef)`=k6f5kbC?+Vm)W`&t}ap{Wj$T z{^;po>{$=Pf5&;?-~Rio9(g`?96Z6*&C#Ftr!#Co#Z~WH=We~64WQ2)n}Pixj~h6q z0v!Nu$bV+Ia~&NJs0VysJifcn$ujpJo4{N^^v=}DTH7k7ul48~V|At7mXW3(>Vm{rMhgig03veaVmLfL?xZagXX;scTw_VSMnAf{)1zUQBRJ_TEkaaNA- z1pRX4ZM-hPf55kA%;ts->uvt*X*P1qc#U7V#wxDkk6SSKQLz4 z2&=OCA7|u)Yt1;36bEP?5&efgf8gUh@F$kTX20;l3ulEtJmT#Exf|kl{6)rL?B9E( zZQQWVVwWDW>gzvrI?Ba@naFUqcmmw<@6H6`~_4r2EN&FDT3KFLfw@^N#BMP5-rE3t0mhu+|3PVC zoZfd{_mj6J7P$NF6L#yd8*JY-*V%|2&szB{|2;3U`x$%#pDWK*Y0`0P+-Z;-|IAu7 z_(R0U#G;HnK?h-r@K3Q#@Tqjb+mVrxSzgm2J3ImY=x63QoD0D_8U3E?yazvkSa7=P zJv?@()m-*kYX4e#vHF}x-MApujm8$zKJ@Q-ACMdXIRSJxKA`7=%#L2~gT2@J$Btfa zYxmr4mu~r|6-tzRUI;rc>`O0t!=f}dy-}UY)~S8cd~^Cbu!%c%>~MCTHOA3J$UJ2P zd+MaT#oO|C>DxQ+pS1929n6fdJlkvV06G9Xk?RSgW3^6a(D-2K$TAzgvG%=VWdjB| zn+U(Kwgi5k_XEfQl6S=hWQIG}1F>gp-|;(cw;K*0u*tg~KmRh%ye#D1+YkQU@Gr^! z9ar*CAvVo%}E5`ojbX&=WVgnkFxxxlScXc)Zd*NdM@b^9-<8@zp=_RKFXs7fDTY%oD zU6FgRCvO|O^Cc_nWd8ivdHh5d!%NRsSfup@w8k8DakfA_;B3Ffn>Lwqw+){#+ZN89 zVVflr`}d#5ADvHpN_iP|jpt)jg0R? zbO62p(2#ycoZT>Uu)*Q)_Ukt>)B_Z+Ye#* zup!P~F&8m5c9?aTaX{lrzD^KS7fAliz-uxB>Kkz$(!niNw z9{lkEnYWKVfAPf^&%ocyK6(^Ckv!imHy*a>S3GLP&c)9YW|XahayE@dZnI9kH6Bf| zO5E@m^>4+yxD>sFkAsd|Bs(`}dc2LAzS8Qic{_Pc*VDNqc!0i--s>K-wd*(9Rl9fE z;pBBl@l)Vk$^SdT^n&^S$RzOx_;d8E;{$>{Jis~mu~%Ms#rc8wf}XtWqxWgY+i$(eHtf6I z`FhzMbLnHbB-{Rj)f<1%x^(L$Sy!HN>}WT}5vA9(=qM;DM!diB*;Q*aN&A0HaMf7hMI z?b-v^Tg$BC<7RNM50OAxlC{}|VQUiSh=|D%)1HK#}L zLweWvKKOd@-@(7-I`2eY(37)f&D0)IBdx~Dw@&-Z$#Fo{MK35X-p$PuroHh2d>n`m zz<6L}9UI^YUjVz0?B9FuebW1fY|PGQl5PI!{su4C86Cl$yiNTH2drnW-r7%Wu**wR zZg6Ma5c-b58oSNdFk(3P4np^k$73EC`JIH#n{3g%S=MREeaW^Ub$Q&_v(4Yygys8e zTf%xfs6J}NhkwtLCl6zN@Bv(Z|GD=2={fEL{?sEFqYM3apbl_;;J8uNZu-I0Hh^4= z#^tmhI7NGO407@h-pnt@20+9Fv^#Nt#~*&c?$iFq@3_sjUwxxpvW2yjlVh>W^0e-{ z-mP41<>l{Kn?W;dkZkl{Cz$s zN%rrxn{GI019$jXFSV?tEBEMo#p}g~UvFh9RMA>CW!*S(-pjZY=7{=S9X!Unz#6`T zyba>W-#-3yeu(%59!S`&A3);i!TmoENL^3S**`T$wq zJGbb(^aFuE?dP#47a2%=&)@#&ucdW=THkR$ds?ub6ZYE6ExMcalE?=V3liUt8$H|_ zED2h>N$pT^%}3TFdZ5K6_X*M$1QtAtBkP1B|Kx&bb7YS>7lqz?2Z?+Zuh}nx#yOH=2@>UZ5{5c56XIltP{%-e~;%&ZXBjyn-=bYJmC4#^8k8) zvE)}?x!a8`uD|{tsd58>x&ZyxYUZ)e!ou91f0qj~#($L*ofkXc<)41X3q{03^yQ?5 zKd}d~0R4jafg?wcvrELd^?X*a_q>3PpnUiV zfE?c>`GGCx1kDpm_5(W%(mXP)F^?~S-{)-rynqb=3v4a^_wBdbXp45=<8nQzaQ1pW z)lt5laxhJYu6BJ6^vmIsGH(d%c|N?04xqfmo7utLD?Lra0a$52a{ytVju865-Oq*;2 z#xFi&TtIQ@!G=?B)_95T4u9r%f)6?XKY;Q5^q*n-Ps-QE?;EgPeqTCm8pspq*jn*7 zTXc^O@-Zj6{wZ`4n0xGb2k*mHzW(~_&emXWvPnLmss%k#^3uM*a7+l>FXP(J>2RnPrVPW>t9*( ziN<3NcDWbEg!*;Hz=m`D2=G5~;%@oa*ICmopJqNDU$&+EN{u`1(Z@z>%@A_Z_$$Qq z_$crI&*$9Z|Hd0{WE=NDK0$Y22U2vvp4~QM^`0~GUn%%YSD^z6#9Z^F@b+`RYUvz5 zAkVqj0PsggV?QqxksG7`KG^;v|JWY%4tzj9i1wcrueC&{?m5FJa(>|GEpA;8YyjiH zkx%g9*^CiE_uqB=cH6q|s8z~>-_J7}$L(-yRx>66eS}Ps$HT^W9|Qd1G0OXwzx>7J zoXI<%4Z#ce0_Xr@i9^cqtlzjfxy^e+#Saa--TW_@KJMVX6I|6lR@VT@5 zv+j5O3&=jQO`aAVf?Rt1!9EcGH{X2I`GEL=XG`b+`~YGVa{O2C*=4co@6E7(0vnLO zSHeTWd%UQN2phn-;M`~H14s|0;E$hvAqbhw2!Gz`b%2irS(kgj#1;5Gsru>h1MAJY z*I|YYAdl#E0Pz6h!dOFh;?5^Bjr$pg(R}Pqw_h~zC;55CTa(uzM#sLO_XF{VU(W~r zK8C;s;I|&UcE3&Ec!Qfe8qBBuZ}2ZT`p&-y?-`ozdXt@R6Ec|Q<6K#Vpmeyok% z^;{;tzt*CbF6lH(>yu0z=i++uy2!ncAwB-^fcO8<5pTWqmdiDeZvaP*!RP+F^p5-v z9Y8;YivtcHv?U4Gx_PF-{emg@i}wTe`x+?tnu=KaBfo56n2sr*WPLzxfbZ!uB45bd z5r}iX3sDZP8+;E|;BX;`=hJtOEk!;dWD40u@B4Sc1IQOTfd2I9lP6f$X?xG`1JMDO zPP)#94eFy_P|C7F2?6KF&_@|W9 zml^#+I|bsO9==)m9{lkE$X(v3HNn9&dV+oi`ltX+SmeTi}B_)hk%@iTjeqVy4RToc0G@JgK=R z1BS-A^`Egn^v}_60RH&(#AjdwPe7cL@BQdn1WyH(VNvDKgi{SynhD%wX14h zr(TQGUFQjX%I_Es6KpjB8;Otq`ZScgUXXFEk1*`dT`i& zhkx}bi@JPda-XW=rZjYb!(a0{hYgRjrOG+Lm&ASee&lDs`9c#sfIdOzF#l}Ju6^yRNZI64~=FZJu@e zeXRWG-=Putw+cJ(NB+~pADd5pFsg9;11G_r`nx>h;Hz)b_Z>v_<=c$L=Yj|R2>8Q$ z=pp<7`~&)1XHB1M(NhwV+vRlIxL9z`{WfG^bV|Q4YyG*tTJ_tNUHC@QJe)M-AOElX z`Y&xr+$72WVkiGT_WP~mAN}v~zx9@zY~9Z5-THv(;xE5f>;8Tb5+1%$*o_ihCc^%w zrTQMR)(KCAfBsRoJg)DFA6hG}nMm%H_RbFe=*zV9gtza(*8=YkzQXl|+pT4BU513jWd|C1$_$f%Xia zr)vY$e=?W23>|>XWkm;Y&$&>rZb<8Io{t|uxyT36FG!zX&6RJa9wRIrP;t%27CmsN zTW1&@K%Y>J>Q${u^_o_C>0i^e0r(Rw=iF|yrcO+W|B1zrNwB%l_!Iw;YjXLY>#w%H zTVBmLXQlFn*Xeg$xXlsu6*Ur}bDk0T`+|?)97z5;I*C33#t1TBbkevu>o{?1sy-p)85~*X zpS7~4YmNZxKQmUVY9-l#Av@Ex0mJ}|Ij7Gb891!*IE))3Cj&O%9~}RkufKUV`5*Pa z*a?ka-ha)t)+q7Q^v40Ij*+YW`9o-~l2-}0DWYzo+9G_s+-c;0!5`nCS%H{qkEh^| zZ@KN1h1c$POxLDMS8isk3py5mo7@}yaM%Qn!Nm1*CI3v`ksfgm@1acaC-TqOuYOub zoVXqAye=metfF;g>Hp;(#_x~|u39C^D%WXlrPq9#jt)>;X#I&H@mgn6^K%%J$yj}I z@;(MQUw8*U2iuRG!QR|)+s(FW_br+C{|~$VO<}f1gzw*0L<~<}C$0WJkAL&RV{iM@ zY5Wxf$OkAk=~17@q#(Fe8~b^v2=l3|C-~9CE^WFi|5&L zM{@&?oQoDE(J~#EEz)yRj+}c+`ki|o&tAIFRxVp4(ps;MI2ZAK^1GKVoMQ{-Ojj;= zoQ)YV#0GS4ZMA3Kb4G5D{pQ<^SfPB-kd%1>=m59o^WgM#fU^M$Pujd$Q(W$uahbt3 zAQ-!I{TtawzhL|6XS(Tz12$;8=A@>V_d{kAe?Ap{Nk`(g`67JxOGWs1 zQEOY#m>LNhAr4*F$=D?!3z)AfQ5&x@1mpDd(koLw(wT# zF#mREtDD3hu__B+JVTycU+#jZY|wycr_Y&NPTsysmC9DRs{DXOZ>E_KM2|2xcl5NS zwqf0BH;0R{ndoKoGjTe2Gv?!b5YOV7=oj?N-FF_homU^RYFmi=PwTW4oRVYq!V~U& zPdJnJjTdzl)e*5C9OHoL;|czt7sw5^DjfgN^Jm~sOf0?092aDO`3CsIo)~+6p^0}P zw~^YznwU4kcT+}4e2cyhY@eiaboqa*bIc5_DKN~<)1YsVSfFa9GFIX8(MkF>z;5_w z6w~usEPdP-&YR)lAjV@b1^_=W&<{9Q{J}m@_UTW!S##4e9HXxCMsE7gFX0v2BKwT} zq2GtN58IB6=Ssu&>uYBh9R5WnKk`DF_`?JLLj-TspLIg>1ft!V0r)k{7pzjHin9ad zhF+D9FGyeTuQp)bep|aT$qyhGgl#52b3S+=5PP12{QnPO@Az1<%94USwoO`uzJ-hR=IK| zD?R;@GCd}JlTQ;wEbG#S}fR6V0ATVU?2mQaE_&ZoH_-ld3V7-6uJ$KtR z2M$?_t)HYj<_DWrW5pX8FdZanDMI$q@AU14iqiUc{olIqqz9k*|3UuY z0dzpa_@h7e?a}$e(Q$F_YJIi0d-Uk>0eRu7@&zi@XlSJuyp|>pU;}Gy_|PWKT>90r z#f#om{P{Pde$lgQ=U2kQ z!o~>X4x(D3QX=yE>B+t>rO1D)f)nq1^8Xk7lkyv%f0wgRl?_@mJ2pH#yuIjh*?_lP zzd+^kR-sOtq`Z)HYjE4+Ta;Y%*2g(3G+mi9ETq5Y-L_-x-9m*5Rn{j`x}>mjZTZWU zE0;&d+{(M;3?{8jmrL`;a+fJnCa?O}3TRA95q`@v^5@T4D_^l<9U>>(eV_c9Q^D_d ze+&D_wV(f(vs&l7!$U(hNcJZQPxO8x5&1rHyBW#8E<60u6DkEtjQWOuu31y__%xrlLfy;Untb@bXJDZAFTV1VuOb@8?$mGli`t23 zd*bb~BKBPX1MF`e5%Y09@i($b{|hlq*5_JV>3YBsgfv!6|}1+38**cRyDt-t(QAoj>Z5hbcm*K^>b)*|?zrU)#M zMf@=Iu_wmZz#|n!U|wBRFRVb7UiqW9?2TOi%{OVw;wi_s#pl2Iby&sL`1*|TnkIt( zu=&+Qv{W5RMNq3c8`j1c3#7OUS-zWb3OVNdYc~|=M zzC7(0?GA4^bZJCXhv^aJTTP6p*e*VzcHfyfn@w1mxA&I)g(sYNpu~y~KBC<2x579T zZzby~u0^i+@Vkf>Qyx6?uf!M9+KZUN6+qO7j_kXQGjFKUG4Ez!OB!gu~I zKKs>`fi_I$Irt7)NgucbC;q=kC7tncUsiKbyP9rss0^PIx|V@5C4K_Sy16-so*F=Iyf` zdP)7#j`H-~nRM>H*Y)TvFLHnGo|~R`&)`{IRz01wHmWcArZwig9e?w^TT8BalS34M5xXOXhA~i%c4}=!4 zeNf+DA6l}msKJ5IGL83#mTJ5sXXz$u6f@D59YpA8d@yWcM8SduiwgS}=_4XHz?d<7 zf}%x>+@$Lx!i&{jUtr*sk7#eWuRK;M{1}L(J5SO#>FQN@23dp0#TVk|UyIFp@#Bb& zOCAa>P;sx`2k!Gk$UJj<@iiNWDvR(Pz0S|7-0LUqgPq{F@J}@n{M1=ANHkV7RRq8B z?)jnxBK)OA0kl}>5IV`zQk@6VGX1?g1LAt%{r))|{quPz?}jJ`<)K`2Mf7!3&RL?F zq8Z6FUB_U;Uz#KuCF(EgB%*#e4Tul^t9XyPV0Xud<}AJ} zXX8r6{`UGSSZ_+sBlVl&D?a$TaQuVs3~wTO1>!0PH?cc?FDFbDpOc3S6e~%XR7WEQQZcpfTf6kG= z=^JS;YAHgFz@GZk4zx#@D2FISG5l2K^}qv+8$%b!Km0^%Em0<9g)+v8CWnURTohie z#kQQ6jy;mM>zaED#2kFOaNKP#7aD)^jY3l%eyh-=``;)$_O4e84L|y###=m^yTjrW z(yd1o@9oxnjSYGRG5}A*!||d~BI?R}T8Qe1Dv99Jf+ETqF3O6pr`yi>gz6i9&vU3d z&n+*aJ!*;2iSR??WNM-#vI1S2OwDxk)LiGDDDT;j|2;?lT>mcrZpz`yMEM|atS_R> zP~8luwyxC>T_U2s)SLR}5k-h-7xy8CA|_<+0R8}c0LdSCCL$t&GEztI=_`s6jS`I& zO%zQQO%u%&p_>Br({%lfew`xXKJFhQiWPx*cTrmrb*H@O`ck4IqI{yWm3jR%=@T&j z3m(94L3EUXc0IL z62TW@Dgh;42~Oa3wlc4up8oiGpZX?D#B<>* z-a&ihO(x#!DZkExser!Ahzja@W|ZFVgWtv9zAPMl895@q!9+dM`i}3ZC-tS?VaR&2 zOz6+lAB{7rC)_^=ckF@Azt(!YJ#-i4fydy@C{cA0*fkP?V+#>{(OLwy5a%sL%|+-k z^j94bzvUV5I=l>j(r(nvmowcm>Yj7@cwX>F+9N$;Ea7iW>6OLf=F6SkV^$kYV;}n} zCiq3z|F>}A!svTG-~xZa2gqnK5%P*|0!Q>9x*J?Q@pmN=vJKy$zu+N$%QKJ#Fo!># zPV#ls-xoi>V+&}$;cTrzHr^KjUIQEbjs65HFoPe!51#OP4?7b`d=Jjt!@XV~@r-bf zH_zAK7eD_8TEOcau!FpQWZZpP#C3nK|LsM*{|^9tv4|I2;9?70Y=QsdEg)Ny>ho}_ zzx*E++a{e=O#8CGO~+Ho=kIp-(CpfP3+bE&-+$`Y?_Kt!evR9IIsN-W$?re&`TqCm z-5>ng!^dtq4yC^T^mBi&`-9)>>lOU{AGQ2{wD!EvDu-vB> zM3spBE~R}6-ILt@Z)8-SBd6PES8BYLuj}UOpJ+R5ukEuFI$mQ}oi0%F*{Rpke11~< zKeXc^|ATq0b@uufb}CJMc$y#l{cS70^LnWS;r&bUH_tzC3jOTOpT95onAPW7#LMod z8Q*_XO8XSrmfSvBEdTQ%pO}60xAf|JM*DnMXyLcoaL`UYopE~x^K-`KKl0ExEj&4X z{Gb&6^K#|eEj@fIR{qq<@7~0O-P^W5`r=Eky!h-Z&zrq`)!uE_?YL(9?mc@GHov@Y zoi9(tWcl*X^+%7FKi1GmThR(p4wsJ7$;Hpb7P!~~7hB*QT0moJG<+d6Bu9=M?#SQg z^TYGhAKO@cF%#7vpHE}=Q{KZnp}>#-j^71e3%u`K&v~}y6NgNkI5CIzuL{#RfiR8j z57YWop;~_|hx&`o^%d^->VFQ^{x)~e4?SYUh`k*;bO_NpnIT%EEL7ixYfb? zl_*gnLgQA#HRnB4V_0%fMvZF-Ip4T+?%X+~SFc`xO%9w~H~k>4k5%u>sq3kM(Z#d* zv~Sg(Nwgi)CKk#&0Z zAB|5A5zp_VAF@H+njc1lht>%xT%lR6I?X7}>V6oE~FiWMtHXfDb*^CrBcweaZ&$(^t5+*M`v zXx$~PCs%yYo1cW{DcoD%mmW20RCv95^>mv3kH*`CXfNlGV#SM>X;81uCynaYwhFBV zzEEKJp<^XheexM|CCXeW(tAs@j$QKjO4hO~BUjmdzf1FW)_nGL;ZZj}kh5CH=_&z2cj;xne96CnzYFH7*==&EZNHu>t@jn^vEgxj$2fpWlGSj@U-GS4 zKTvn=U6Vs&QbURr%r~)Ki;h-l(ydl{%a1AJOc{e%Y|cxc0FItkLA3i{k~k4 z+FY5lR`j)b+RZs$c+|1iO0NCvd)fmkwe_c;3&kFOAhbv&#wT1NDlC~oCbC|zpgYx$ zArTSb1#=XQiY~eK^MCQ40)4ik<(fv{TW;06 z7RfltO81NrQHidij-pPYo}ytY*YfAU~BF?lLq ziKT!2IHGF%`MO?5R7`CUk(D-({mG%e;0WA&^oBby)`=&zjzKZZd$+e&UE4*TJ_yC(xQ0oJQ3a@ktiZsjAu(2Yh1TNJbE{3h)uOw1*19_rTwD2j zGdsFxX}`ZNQ?_d@AI8Whjgv2_wTYUH++b5C#JM%0Sd*FcIGBr_6=MCKBZm*!npMlK z;i{Ld1aloUP8)rlzuTI-RsYLGB_*3-nhTO94^V&Rj#CHP!4rSam@(7hVux76={H$% z)xW~hzgXw4-EGY1IJZZ6V7vKq|NFord)OI&_C@yhWpd>iE|d5k{F!^)F#dqe zoiRo0&|K&EKD%}I_up~H?Y4c}R%@XBLsMix{91JCWABB8=46~AW0!~_&iGJ&_Tr-r z(xO>2XKDYH7^^-1AtwWs7rtOUyLWecuOK67{f6&&rho1<$$p!ehfec;a{XIQ*rD~K z=DIzYyv{?{WtY$c`>xz&t=7MsvZh*TwQq^FpZ^eAtjZ!)y0(ZhhG%@JKkE+r@&+Hl zZ{paI)@I_4r1DD!+VmM~BZm)lI)M9Gua0N1uc?0)ZNs`mtXDls^3q5;Bt`aBe{gCu zKEYOL{VVntW{nVt^{Bkw&*~AKdF{R{t?dS_o9x#Wg4eeGYB{4WyF!(|RK$3+Gd>!( zGL>>uhqQ?LO`8&L(Ici?Y3-GZ+}0Vt-|eBr`g@MQr%iMFbh2N!;zqX)%jMdqRsM%H zZ{FM*)TwS2N9?mm{0Oh3bY8ye3~Sz`zQx4Exb|mlV)kVKf7WKFJy@H^ugRa@5j}X_ z{;RC@#y_8~zutpCkh^}&4XQMDpu`!K*B8{EwdcVtEuu|kYai&5BS%;@?N5RZzz(!( zbGdcw(BADwK^+-OOdJnsomKZY<4fI~gSs`Xa?G~W^_P5>>@vqHl`ZMkEn;30^AhB@ zy0z_SSJtRQ##yJ9b;HxE|2_Adu)SJCv*D(H$OfElV|;-;&Bx!aYIYDY4)u%=^=D6R zcpxp}8f_34JJ{-slb<2{nWtB_SwE|GNkuoWjxqJ%%^n}JGj9K9_UN2Ed9w4B#*dD5 z@)Nk06VItT{%RZ2KicumkRd~iJvfMmWv|^nKb*71D`jAwQePKM^8ZT#BuF`HEkPvpq;ia&JPl==Bm}}s4CrFM4sS`kJek9N|`Bp zTGU;-UNMn15Y=ng*vc<`%ZLZcuX@kAM-Q+mlP5`T7P~!M()vB^Id{%1i;bIL71w=o z+WxElQLFxH(`L-F1J_-fBJ-@t|D@JqgWuVkk9LKxkPT!+IV0!uzz5ued>lG(jkQU5 zGxdII(tnYgfA}T5Y(w-PhcH+UjI5ru0o4d=|-Z0XH;HatXZ>W zDr;^A@@;zOv*gG19J@sF|6j)g)n}a0-dw$9=VqM2`+?7Z2WC#2Y&}OWbUvh;>x&H( z4>VnLzpYuZ*zJo)eY}hZ9?^fagZB%##=R$w-)fup+~D@n2-JIy_sQAx+4_>II7(Di z#JJouKGdJRC%`&A^6djJj?y}FRaR(SV(~yZ?J3i>PmIM+oZw`Z-*Yc}3kDM3A=4Aa zXkYX>ce=KtjFH&r%|F4r;CLP02J=9o-sroN zT1)HL(Ze=l*L@b1`0bf>$L=d1l)ul`S5?_~QGMl}^5@D$>gCK2^=HlLK)ljB2j6*f zW?FxZODMBRYdDGrs?L4H2KVo)czBk3hVmvUwjcWyNcaVHYt^tz>Rzg~NS<#lpa1GNq4^`X zsJ5L&rIo8B|8!>M^^NL2l{J^u4w(||f-FxMH`;0~e%9&1GTNW5%YZnW5LN_^zroR@6{bSbZd6BAurFQQfDq9yV=|6{3w6FIr&3$4%9q8lO2Hh+6c5)?)21 zTb;B9ANAKbc^Aj9_NmrJOGT`?jXd8ejQ8)|Z7Y^9wIOp9zb<`JdB%S`nXbG3@78dG z)^kt%$>E)Ly`@9d{@9UA7CvYF#>`b*(g&T7y(>l@w^F4_X;(b?Tdg@g72C?%(^(~W zV47n3hVy05)$Zu&^zPe&3pp+a|j-+BU6UgRlOms#ZjGkC4w2LZ3rMAL`HA z+weeE34O6}?kwvSzuxgJhT|cHJ0(@ksaxjmhP<^AQ$mk(8rT3e^2Y4TDv zhw40)b;;p@tP<_CV)-%~HzD4lR=?|bpwhCx*q}i}-2QT!XX<=rbSmo#v-Wc!(H5@m z(&_t;+-6;N$fs5v!8{elf%WE^2%B4e(jC^aQ?%1L8`iINF#$0!Jf&R1ee_MzZ=aP9 z^=A)0zfOBrkMO`;?bXwA&M~(RW2EG?ee7KMdGXd?u?sN^x)AwC20YOYl=H#+PS~dF z?y;I%zqTUMYiaYjd}QQX{8f7WS5`)AyCdtRm%eE&#wN(-Dn?fBleh_Afp*pUt@mji z*sN6D-9!D^cOt#D>C^ijURkE~(+9;bv(j3Nm@?LxafgkMi&d^*q+4G=eJ@V#1N9$# z|M30y+2#ZHTIDTCx-Kousdq{3hg*5+t9EJpe(O1OlJ$!nXO}Lx*R6+NT<@#9;qNwm z(_uSw-9EeT-h2H1qW5V|dzS03dQ4?62zVf?#6At&t3DXlM^JOctFHd#*Z$M`4;y0> zwJ$S%4|}S!&l)no`uFg_V~;#!*B-sYY6J@8%W+#Qe%vUR55eEzS$_Thr=NbxPTYCBb>I1xH-gBg{V8e%$PA_TtCqArHX+k&$n_~PZt@ey7+mE z8#&zNZHU+DD`I~Y@PGW_`)&1gvTw>C1?ze0UUJU!R;_hE>)fujC2Zbg?9qeIkIcY3 z$PsZMx#Da0?6Tp@54vZOQz@!8=&<=^`Jt1Z7Vu?DmoA+%Ha0e0zt1xV^=A(f>XjAZ z-v0gjJN-_6W;rpztm)Qh@gqsPN%`TPqvqN0p@W?cAg6_$r|fqN`*u6tb!8329=@qH z?_sOmpox_)Q_^bHs^!)sMpx2q=ul7CQ@%f`HXv`%V(m+(_eoM-rorePuc^|^Q!lRe z&vcv$^=Cg8_Fu^gaqpl(gIt~y9~XacmG*P!J3Uc0Ol!Lf#|ATRb+(E2K?d00=lN%! zwq4iXW#tloOocu7SDpKqjTkw~x^?N~)@DL?pf}(fU+>@}JaPQCV>V;sLDmdQvL9;4 z6086DZCHt_vsC};8mE<4@rZ_VrOyV`-|s`2(SA1m8utd)A75b8rj0gb+AOQGCdn5l zxAqf@89Cm%ckAMER_urTo>9cnL zx-%_;4<3H_A=kF`HlEJ=y4bhp`ukM>wxSaBf9sg;NA_(h`)`4(-;0N1@ZbI#_mbx) z&kg?ALG;E_?I+T9p882uC)U@#EM9xu59#mXKkhqv=sJtO;;mHmhwmH8hnuVYNN$#n zBaaHdU^mcre*JvbWKWB*_qW}2*rGQ*k&^o(=U;s8tDkBN$!JwN3O`u+%ar*qj z{0%V<2mKF!f@@X?eGLATll~3yk88K}YggOIY0H!sNa`c0BD+0u_;B?Pw6S_xZ)(QW z$=3dgk5bBs&MK+=U(Yd%ZEL~?Vfl!Q7p1dZ?0}AA9dTqJJ%R^Lo;YstTkk$?OV#!o z7xPni>3XYG>3YH`ujI+qAAP7?X6W!?L!q#C?b?MX?>>!w25`*^QGbp9a{V3}Z{}^*o3+PI80(Iwioa3AHo24-h`0^@4-31TXXvO&C zLh9D6W|d|>n3DIR{uS1IXz|nLD9?Sw`L5_VZ|A@~y?Xoax#zJ*9<()AX$+ayf#NH2 zzqxDmIjs6!rrcK%taS!xb#ZZxRrRmkj8)bCMXm2HtmX4I>W% zY`lBE@89#E?Q@>GHPci5s=B)B)w}n-o+Y#Mv4<4r&3H7;AFMZNhN&mE^ z(l2ef^i5kWz0&axsnm7SI)1s-oU}#Rd7R^efR_v%I$Vtd0o5C#5Byy{2ecCcXWWpa zjBI)Doz2Qu#JZP#$Hw#iXCF9o;;0m^+AcoIro^~Ue{BA}ht?IF^4VujColLyEY0|T zZg~EqfD1mLFNO1jC)$C2HVU~D&lQ}@d-aq&IhQ{8r+&-xP%i6jvh!#cw;DA|z1Ors z-J0M%a2%k%#xh%E?2$L-6=9ulNZtF-KmT05_~HvCmoHxyiuq?e{seu0=eGBx<(w}| zZ7SY-zhUccX|)y;QFr=4oq?a58^3N=-nCHwpYN;soBNmk7mwK%m6Fc<*1c<&^RKmT zbuPG~|0Cai3sf$4j)PneqTl?Kk(}`U>kH-|UcY|*UT}JL!3N$5U(rt3c{{NV+zD>v zF7U*5uUWNX&w|+nhX>6&{*wXoof`M?O!+2%^mFyPjrXG7Z6H4Ids_zw2jj4GbAw&f z%QNT4pZ_oG&wdHs0QzNQE|wy%`1||q2nh}rpMgt^`HwMXdF1|l->y~adT@+eTWd9b zP7Zc1&Q6XxFR$`e6c2YdYn`=)&e7J&+1k-i3;gHBhWz{LK6(T1@|b+?JF9Xbw0X!; z4~Fm49)3t|nb;5)#0|9dob^vN{&B1%PfF#x{Wtb3LkY{H;F)?#@EJM%E(155)@Uu7 zf!o};TGh~-A(ex~yGzzDp1D8$!oJIK(S72HOSTP$6=>Z8dups58)`IK5bdq2YwYw5 zth{UYvTK=Cte zqE;NzSXi}yGR~f!o+IkiuKhS9$nSw`Xv-bQU;aV)!e1XT#({iu*e5^gr=0%^@gL_= z)m?W{J<;=_lh|d9+mPeJSyi~lnW_jMg2rj^R z`8Yq*6~DP9pM%cedcn;6yZ}?l5!Lm5+5_@CW=E8m%2+_kH*Ktll{SD}&AE-7634Y(&Lh-cP z;{FW9{g?v$e!5kKdbw7CD({IY_z_cNFjF)H{+ zx&pIm3T~4I_k=mdbZAcp-Us-wTq)qMyWkv0)YA?&oeem5mf%)sdCixp_w!rhKkHNa z>4;aNKdAe{`+@a)snD;F=UWNS{Ug8Le^$-@Gqiau*98M$g&f&^X|r zic4y=ngIO$@Also_?z~Fc)fpjV_Co_v=NOPYAgBsXaju9TefT0)(RYDt@$-y_BxpJ!-%#V~UOmi0;}THYHgZyyO`U$k z$}0Kzc-y=TUTj`3#tFlAT^?Sq&SO_6dytLXDrtNh^tFCvSeiqtv;|Hba+W)_$y{XD zI67PF-(-l!#yK4GPdS6$)ed%!CFC#9;joD`_I5f8`<7|>-b>+U$-I6?W9Qz{*T>80 z&thH8b%*_=sTdeop=Pzk-@?WqG-|y4sRk2;1Ad=$ARR(bec4&o!~zuy;Pk4|@3dRd53q@iM9?kP)aZ;02r`cJW{7*XKZCTq6=@1F8T zT)pSaZ-20FI$=I8Rs&@?BFBZ6&&=~S_G#K(ct*8+PML4Q&DF))!acAf*6sH^rd;@5 zV{Jdw+1W{t=TPJ0=o@4wc-?gcKn@F_c_}zlfB}Ci=*wdW`6F{svy6& z2HfVEh*v%i-og=ZFOPs5akNAG_8(MC`S1aKb2VBRyHnsR9RXkS2+w<-@H^Pt zN4j_Ja4aNx-6h6Bkf-B2?W#2IGU)E;VS_J&BYO^gk&oP}_b{{)FM!Jm8g}=tgAtX*0F(6ekQxX&hpSa_T;?DTprj6?*Ju_P> z&$w#zaTfjd*rrOG8K{FF)+Lr0k4xL02h@M+)Tt%ZpIlgzOc*-`Jc&5)*&a%zNxKnK z*-^c}nco}h`1{`UoA~%Ri5@jVs->S*es#8eVDdTek%uFOWQF3-Q^!9N;_7dLU)&=T zyfyf4>8H|9Jb6`XW!nzxPiNHOx%!)QGU-CT_WQM!qvRK8pAJ2mANH0ZPk#Lwxdng6|V`fG^o5q*Wdi z_rtS_$L05p?GL_c3H31Xk4^hAh)Jmv`;Ox8HR_W9?%F`5zv+9^o^cP9$rHy(yKzMd z-zR=ezG92$0-0Nwr`p~WpYdn=ojbP6-1%=vNX|`QrN-yLu}kqGXiXo=Q-oEHt$2P* zc>S`mnUlsvOY4!@O8?MtTclsFZmRDv-o_Nm$79xm{cr53p%U=~m!WT-@lx%gXQ>%=QZ*Mb&1iq-q3}rj^n3W82SRcBUrINV{^o6J zYFoy%j2SshswN#31ID4?_7kLTjjD?KOP?0w0?7piA5$>LNQc*6l{!(GiX+7KC+91u z-2@2-CITOh;*644!gw!o=a(;Eu43KD?c{wi#r*BvvrFbIS}g&2cUAwVkI<0%)el-* z7h+!Y3zcrvAMH{?UCm?r`2Xn9(ehf02&vd9QOaR{FF)#CsarEl#om#-iaA5|IsT3@ zUCC48rQ4XyQqCFipvbs4We#vdU>1r8!hXiOn&KW9$471i$0WvaupYa&m&oLKjMp=A zo#`|8NciMCjiqh~6!$7s9tYGPT-y@rV2ZD!F1#P?7jI z{ec7fWi$BN%?mzN<0tPU{qU|MO1^@+w2M5<_2>A5xPlT>Oq@wC%n6F`gLk$g&&CL; zntED1@EpA|Bp0!AgK)3XO7%DWmi3qzGfL{kzhfN#(RYcVPe__3n>TG#?aMyTzR!A) zE698rWP=9c|N~kw=HW$WBQ4%JN zlNMv=EB%9}oREHfd#n4ybNRh_JW*;&l0=P+73M7A{KY=hEM=Q4oLeBf@mx|zb77ma z9)}Jcl$|ASOUfHN5CikG8aJss`#y5?Jg{^N;2g{)zBTnWZR|hbIF+ysO!}7Hr==vz zfRPi_ID|Ye(x%U7^q~o=-59$?z7ILg6!?&(d*}92vm54aa8>yXGcUy8w8gT1)zZ@E z)fBtMx*XWELpE%9O9sz7A>Oc2)tE!w*>`9Iy_R+Y`gXzEihgX9>T1vb!LceaZ^N?3 ztPkgcT8aCWJydtp8_GUn`@@&0xN2B8mB!Lm534R%V~KafV9{q>6+Px=%hTUpST0@VD}^#c0m=)P2{vZr8jI2V#(!D*XprbWkgJ@1XS=Ijx~xS z+Ndnnsq|<2WBe^K#rBY|X*w>uPl}%)4HDiFcih+7F>7Q(%m|5!Ld-AXnV6S=9A5HH z&4thB?rrZ%VewqWfAq@vQQ1Y$#O6V7&euW7?@PN88IlUVUD+3$OF93M@5g>aIfeVMXXiE#o#94vxtgx$^dgH7Z`@gAYFB7)N~Rg&Xw;FTCVsVj~zUl8Jc! zSL0WSJLaL7t3H|b7}1L_={@v(Fnkt`WW z@v>s+BE;&yt717=sQsYu7K(bAD=rTd29AzOlQ6?&Y@^`uHmES$}3nOR0^u7 zc+BL+@m`tBv7?7&{u_&>O3n>6MtK+iCQjAc=RtH91^cZ>-a#YZ4gJk6dN;Uk7A=T9KX3k`Ukm))k{9vW$>rtPNL#_A zzvA*DCqYEgd+Ir^ow!GObm^e%hwLoa6tCYf_8mNrj7#f3I$q_VVvY#vzjEbD#bGPU zS?4`DdGwH^FW8Ld0QV2S_ssd}p{1cpoVA74)5Oz5KhShX{>B0Q`f3=<#`Oz1#xLTh zlcPzSh&*Fp&g#74f;<@#myOtnd*YLGM|un%E8+F)A||1Y)GPW%*E;Qg#Ka4 z#}GS_t?Yf;{`Bu~ejs<)#FIAdRXoK9=VaCTEmA4pm@9^B7yG&cH$d%bz@AOM6D#}3 z*c5PlZdtllY&AY6dMEY&GcGKB0wyjs>rj|GLwY2DMG`;85^@L&SIFCL`|< z`d3dq0sd&NvMJc+6!!h+ai975M<0G5D>uF;74v^E`c9y~U9Dbgp??_ga4WVyHb;k+ ziG}o8Tlv+Wf;syD^U9E?{8t2AJV{DUk&tPZMGswDkDn*)TQn5Ewv&`i!1<_h=4UEy z_&Dq!>i0)NZs$iIoRxWR?!erEI3WBUoF=gjXfQ_$&Ki86s{cTL7yD+D^6AsItv6&{ z->&UWag9xx4bCljx8&oIfWc6 zMNHGXIL3!mt^UY+Oo@21opSF!FtixE%%hxVb3ZRbVC6tR&zfPOhLE5DgKv2cAD_UG z20lG=SD?Q?_4SEN7Ppx<65lO3&nIE_ZT-R zD$gwLA@^S37dmz>+KOuh1^D@{4y{^EJbTT)SuXG1FP_lLC1(FeHVsGTYXc*PYkb1{ zS%h|swtFq}b+;)OKQB*SV&SikU3xFMVBuf@V*xmgrKKz8e2X&nn=O2C^>np*=j-YZ z+F;vo#JhG)#%#4~I(~;;ZGeL06^y8eM3IHM**u-UM#8!rH6GcwD;z)_vY#Vbv~$R0{asp40 zEo-Vb_viy2sh96K^;~e)I-v1F{FZr)YXZM?0Y}z?_?GzwTh2mfV@@dCM~Ht_*@b6F0B{6{~`HBQ9CfaONQPkKK%DBvS}-WvSLf#9g8 z!=GPl6WV63bx_j+OG8My#@cQ)z9+|%Wdd6BwgneVVRHEYsSWE5g;B$Y%)Is1ut}IV z-Ujug=>AB+nYO_=V1qRyb0RZ`vK7jCO0ZtF1n*Aa(B#trGl_%Wb`P*U1KLe*WuXZ` zzYf7*SQQd#rPT!KY;1fmzPq7p9qbefV%XpUKBafre~`OYokPr>STnK6ml2-J-%t?$ zqG37a0-WcmOF<6{JcD+;A80QPa(8HPYyo{O!9lacv#G_}g7-?r46^+HpEo0Y=x6y2 zJh3f}d#Bc(nz1r2q4pC-m+{-+9KP#*t@?+&B;%3sJN$jSje65j>Hkj-?kdg~-r`ec zYnHGb=Nrpxpq)HCaBrCtO8+hT2j3}YJk$8$4$mf|G*5K9vZ020vlYMbwB+Z#y?+1J zc>b2dn{bY2!0(@5d6U0dzMg+Oug(y@6N%eB*KBQ@-%2nMxv{egT~;Y|I=~AyxibmyfY)XmcM(I zCd~pX1v4+O`Pa`JTUuIanlx&#sai4QhgJ)RN2;0idd)Ndu>**R)KT>ZfU%|&y zZyDh4r?JO4^Jg1kIyClev*#MJzrC-q^Jp8MZz4Nqdv^v*W2QGxt=&?nz&Z>cD5SZ`hyZ- zm;R=)aq3mOb}jXt`S?g41^vFE!9g0g8ts#PX5J7F#0%O+PTmU+dNkMDh~tRBac|ou zV^@33x^v$>?$l*VeZ@{8l`C48^<}~@?gsq%ZNzu)LmuqCExQl-q nYqlT$S^qvg z_aj%_K7MB|(IbcNi|jt~5aKU>@GN{FO^0Ot5<7O}$2l`+94;&<*jHFsus1(1XMbkO zMm`Q&TFiL|T{R?Whk3xaXGJg}p?#PFG;YRu@7LcdDwG0PMtOnlfJ zr%wP@&Uo!wndcOq5Ei#ha^aI9hG)VciK&{7-(I^y+GXz(1MDZK?(_EA+gkgY^YC$f zPxyCkn=tse@zK&KcAZ+s4jvHo3@)FT5HEwqr6`_&2mCvoCKk)awX2j*>UrFNJv+Bc z`kb{Y2DaRce?HKtPGfV_`qGelUj`@S$qvMtDJ%y*Kw{wL82>)xBb>Kvz4+z*pkjDzYxXEYXD%fa z@%r$y-ZtUh#37?&fECQVDRoB7mjQix2>i$j_icgvp3NFJkZK*q8hy|3;fA&7Exmhm zRriSNYUTzoVZyu*2lwxlc`G(a1@Ixt!!~wk7W)>iUy1|s`tXn3HetZjV^CC22^xcS z_~f%vw@z)9uY{O8@fEE1rR%6vU@E^UjzHT{(GTC#u!idaBdU7q@Rqq@~e?eq#-yL-0}LrU2dD>j=WCllvoK* z+9AGEzY@GtPm+*pn*D%zlR9_mC{3G1O8Jpn#1-qt=Gn(&-Rc!`^zcDBe)NbOJFr{U zZr(24=E1iQd`tPzvF5RB60;q=u@L$#O&hNd{NeU9*jrYH^qn{ZnA3gfi2S_FQOdk+ zh@(+C9(wicA)PvRkw%l=1it=HX_ot;%v-uvmaTtJhA(_yDi_{Sv6u8?5O44vy!skB zARc)=IaoU3MZ?(2l%2^NrVs|NQnd_z`?t|^{E?-)=Xr_FCAAN+JL1#|M+uQa@ z_?(-{U(9wU=ZJi}dU0E%dde{gN;xA5g=>Y+ATYZ1&$G>WefSe^KM(&P?va&|Dq&e4 zOIX?|>D0Eh!ddAvJallsw3`1nxu+~caSNuW99UzlSaQj{NY=X|F?M#asc7EuMw4f(8JByrK}CW{tw^f?Xtdm`o!rk z?$f)Mq)eS56>`2;eZ6VJddNpRS2{1gE^fHT-tch`nv^9G4eBaCGkr?*&C|dA;n~xY zyNvl4kf$;I`W>xDQ;?G$ zxCL`>bMB#!(BxCTaN)ch0w*TC2wX6X{q{}9ZN&R|+@CxHdZ#f5PU`D)O3$B_eRCOn z$V=dZHOb<|i;(YosS^5)^JZmB&FL4UYSwva9obmCV|Iuh_qAR6yK-RnHWd%fSa@^a zFm*Wu-+kR;U^*QC!iTQ0ve3G-{jvGD$DO@sXqUPd@0aXmp;2FZ|^uL0forpns@)PMY(Ee zz~s^Vc$b^j!cQOf{%2nKKR*nf{^g^pv#v>%S=S+7O9&E&55N5K%SV*YFJJoY<1@$Zk64Pl|7iR2 zL)TwLog)GR0?_pfBc}+Ph{)KlR*6B8BWur!oJA-f6xK;C}jhi%Y-7S3Vl6Nb>FXlFO{|!4guZdWX zxWI2<8h%|I+GH+w8-MVs`}m_b;PbobKIzmgyi4kqd)%4Z?y(U5Kk@iYw{eHRaf{x2 z&2`w;E3U&zzH*J;{iQ|FtK%JQG##tdsQZh1&$%DFrd|1m<1!XTo0_gbWMfaN0xY}o|mnyt|5FO&8@6$T0mM_+2~q9S}U=( zX=PimFhYO02Y%m}Sq@q(p`Pd}^B4!O1sN3ODc zW$J=Lu3g!$ zO+F~j@#gg{dtH;`VC6przLej$hffaq-ry?>mK4ujkUwwdha2%`X80VEY}?{3!D_n~ z+P}r^C&$m*nSQ$qzcnwD=TaB?DM&^Qfc#(hDcCOV9_4iIdJn57;}5Qk)gu1!_wkH$ zE9d2G`J*Du7cPvK?z_A}qK zZ8~wTL&x0J&h`5a#azdtRWa!6uZ$Qna9hKXv#*9nC4V$@V85+{2MyXbuz%Fn%HvBu zX`FeO81Kh3r)TcYnpyB^gWOLayEGg!(co^h6Tv_2l9`bvL*uj69GEnDk|bfRI3jMU z;z4B2ULhyJd!XHW?9e{RTzy!aC!D$J;-*)|7JQl=Ghtg#1aGz4c)Ta8XFuuJr>C?X zFhM-Czm)-F5@c$6syCLpA3 zlw|SCydo3kgV$cNS?13vl(#polTJ%+h;#fWw~)^ugbe`vz9YF!%tJOhtymf+mdNnI z{gnFJt?gg-V}G(EKc>K^6hjs%AEqAaYxPpEQ9Z(YM8c9x0OeghZis!YmX`&+H*RcqpXc&h#31MW!sf^!LRw;q`rC4BHq zS-b3YS-kVScmwAP2CrvK;TG6TdnIw%;a|h+)ehy4c?+90ZQ73WGwp+vq(tdADpqPu z-VPq(M2TGTlLSvbAkpBzUHasl>_2!|Y88C**iffKKYN|E#@oNLW9tsxhAv;SP?j!U zD7l!&vNMvU-OPj1sCO*hv35-o=WLV>Z?05x_oYwHO4RDVi>`Inavl1Y#MZvuDUC>4M!E) zTH~Fy-Zfi$f&=LdtevvA5M&G;gF8ON3d#|k8G-`-tU&bZ9tCy$IDV!^0#H From a528b0a40f1039208422d35a013adb56de6689d8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 16 May 2020 21:18:16 +0900 Subject: [PATCH 360/534] BII: fixed writing xpram file --- BasiliskII/src/SDL/xpram_sdl.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/xpram_sdl.cpp b/BasiliskII/src/SDL/xpram_sdl.cpp index 4526bae64..c6f558004 100644 --- a/BasiliskII/src/SDL/xpram_sdl.cpp +++ b/BasiliskII/src/SDL/xpram_sdl.cpp @@ -71,7 +71,7 @@ void SaveXPRAM(void) SDL_snprintf(full_path, sizeof(full_path), "%s/%s", dir, XPRAM_FILE_NAME); // Save the XPRAM file - FILE *f = fopen(XPRAM_FILE_NAME, "wb"); + FILE *f = fopen(full_path, "wb"); if (f != NULL) { fwrite(XPRAM, 256, 1, f); fclose(f); From a01387b1af07eb4217a3ea9b6561125dbd1c060c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 18 May 2020 17:39:05 +0900 Subject: [PATCH 361/534] prefs item "sdlrender" --- BasiliskII/src/SDL/video_sdl2.cpp | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index a35c798d8..85b14e855 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -763,11 +763,17 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } if (!sdl_renderer) { + const char *render_driver = PrefsFindString("sdlrender"); + if (render_driver) { + SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); + } + else { #ifdef WIN32 - SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); + SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); #else - SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); + SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); #endif + } sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); if (!sdl_renderer) { shutdown_sdl_video(); From 7eb7a477d06704c529fc7708f21af396a40ebbd9 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 25 May 2020 15:58:15 -0500 Subject: [PATCH 362/534] clang debug flag adjustment --- .../xcshareddata/WorkspaceSettings.xcsettings | 8 ++++++++ .../project.pbxproj | 18 +++++++++++++++--- 2 files changed, 23 insertions(+), 3 deletions(-) create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings new file mode 100644 index 000000000..f9b0d7c5e --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings @@ -0,0 +1,8 @@ + + + + + PreviewsEnabled + + + diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 6b4ccb4db..6da3a8632 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1030,7 +1030,7 @@ ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\""; + shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\"\n"; }; /* End PBXShellScriptBuildPhase section */ @@ -1171,6 +1171,7 @@ ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULE_DEBUGGING = YES; COPY_PHASE_STRIP = NO; DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = NO; @@ -1199,6 +1200,11 @@ ); INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CPLUSPLUSFLAGS = ( + "$(OTHER_CFLAGS)", + "-DDEBUG", + "-g", + ); PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; @@ -1210,11 +1216,12 @@ ALWAYS_SEARCH_USER_PATHS = NO; ARCHS = "$(ARCHS_STANDARD_64_BIT)"; CLANG_CXX_LIBRARY = "libc++"; - COPY_PHASE_STRIP = YES; + CLANG_ENABLE_MODULE_DEBUGGING = YES; + COPY_PHASE_STRIP = NO; DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = YES; GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_OPTIMIZATION_LEVEL = 3; + GCC_OPTIMIZATION_LEVEL = 0; GCC_PREPROCESSOR_DEFINITIONS = ( "DATADIR=", HAVE_CONFIG_H, @@ -1238,6 +1245,11 @@ ); INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CPLUSPLUSFLAGS = ( + "$(OTHER_CFLAGS)", + "-DDEBUG", + "-g", + ); PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; From bebeacc895c8188fc369cf49053d1de68fc80a4e Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 25 May 2020 16:52:45 -0500 Subject: [PATCH 363/534] adding adb back for build, fixing automerge problem --- .../BasiliskII.xcodeproj/project.pbxproj.orig | 1216 ++++++++++++++ .../project.pbxproj | 14 +- .../project.pbxproj.orig | 1490 +++++++++++++++++ 3 files changed, 2719 insertions(+), 1 deletion(-) create mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig create mode 100755 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig new file mode 100644 index 000000000..1d013f0c0 --- /dev/null +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig @@ -0,0 +1,1216 @@ +// !$*UTF8*$! +{ + archiveVersion = 1; + classes = { + }; + objectVersion = 46; + objects = { + +/* Begin PBXBuildFile section */ + 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95132255D076004D0E79 /* AudioDevice.cpp */; }; + 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95152255D076004D0E79 /* audio_macosx.cpp */; }; + 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */; }; + 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */; }; + 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */; }; + 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; + 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; + 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; + 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; + 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; + 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; + 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; + 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; + 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; + 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */; }; + 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */; }; + 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */; }; + 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */; }; + 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD41F23B25A006B2DF2 /* disk.cpp */; }; + 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */; }; + 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD61F23B25A006B2DF2 /* ether.cpp */; }; + 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD71F23B25A006B2DF2 /* extfs.cpp */; }; + 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */; }; + 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */; }; + 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0651F23B25A006B2DF2 /* main.cpp */; }; + 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0681F23B25A006B2DF2 /* pict.c */; }; + 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */; }; + 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06D1F23B25A006B2DF2 /* prefs.cpp */; }; + 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */; }; + 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */; }; + 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; + 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; + 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; + 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; + 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; + 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A41F23B25A006B2DF2 /* timer.cpp */; }; + 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */; }; + 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */; }; + 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B71F23B25A006B2DF2 /* flags.cpp */; }; + 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; + 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; + 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; + 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; + 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; + 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; + 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */; }; + 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; + 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */; }; + 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22A1F23B32A006B2DF2 /* sshpty.c */; }; + 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22C1F23B32A006B2DF2 /* strlcpy.c */; }; + 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */; }; + 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */; }; + 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; + 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; + 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; + 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; + 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; + 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; + 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; + 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; + 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; + 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; + 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; + 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; + E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; + E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; + E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; + E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8FB20D260B900E437D8 /* ip_icmp.c */; }; + E413D92520D260BC00E437D8 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90120D260B900E437D8 /* tcp_input.c */; }; + E413D92620D260BC00E437D8 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90220D260B900E437D8 /* misc.c */; }; + E413D92720D260BC00E437D8 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90520D260BA00E437D8 /* debug.c */; }; + E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90620D260BA00E437D8 /* tcp_subr.c */; }; + E413D92920D260BC00E437D8 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90720D260BA00E437D8 /* udp.c */; }; + E413D92A20D260BC00E437D8 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90920D260BA00E437D8 /* sbuf.c */; }; + E413D92C20D260BC00E437D8 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90D20D260BA00E437D8 /* slirp.c */; }; + E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91120D260BA00E437D8 /* tcp_timer.c */; }; + E413D92E20D260BC00E437D8 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91820D260BB00E437D8 /* socket.c */; }; + E413D92F20D260BC00E437D8 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91B20D260BC00E437D8 /* bootp.c */; }; + E413D93020D260BC00E437D8 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91C20D260BC00E437D8 /* ip_input.c */; }; + E413D93120D260BC00E437D8 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91D20D260BC00E437D8 /* ip_output.c */; }; + E413D93220D260BC00E437D8 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91E20D260BC00E437D8 /* if.c */; }; + E413D93320D260BC00E437D8 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91F20D260BC00E437D8 /* cksum.c */; }; + E413D93420D260BC00E437D8 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D92020D260BC00E437D8 /* tcp_output.c */; }; + E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E413D93520D260DA00E437D8 /* SDL2.framework */; }; + E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; + E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; + E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; + E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; + E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; + E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; + E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; + E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; + E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; +/* End PBXBuildFile section */ + +/* Begin PBXCopyFilesBuildPhase section */ + 752F26F31F240140001032B4 /* Embed Frameworks */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = ""; + dstSubfolderSpec = 10; + files = ( + E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */, + ); + name = "Embed Frameworks"; + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXCopyFilesBuildPhase section */ + +/* Begin PBXFileReference section */ + 5DDE95122255D075004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioBackEnd.h; sourceTree = ""; }; + 5DDE95132255D076004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioDevice.cpp; sourceTree = ""; }; + 5DDE95142255D076004D0E79 /* AudioDevice.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioDevice.h; sourceTree = ""; }; + 5DDE95152255D076004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_macosx.cpp; sourceTree = ""; }; + 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = MacOSX_sound_if.cpp; sourceTree = ""; }; + 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioBackEnd.cpp; sourceTree = ""; }; + 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = MacOSX_sound_if.h; sourceTree = ""; }; + 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; + 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; + 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; + 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; + 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; + 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; + 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; + 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; + 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; + 7532532C1F5368370024025B /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532E1F5368370024025B /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl_nf.cpp; path = gencpu_output/cpustbl_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; + 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; + 7539DFCA1F23B25A006B2DF2 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = ""; }; + 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../cdrom.cpp; sourceTree = ""; }; + 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sigsegv.cpp; sourceTree = ""; }; + 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sigsegv.h; sourceTree = ""; }; + 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_blit.cpp; sourceTree = ""; }; + 7539DFD01F23B25A006B2DF2 /* video_blit.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_blit.h; sourceTree = ""; }; + 7539DFD11F23B25A006B2DF2 /* video_vosf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_vosf.h; sourceTree = ""; }; + 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = vm_alloc.cpp; sourceTree = ""; }; + 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = vm_alloc.h; sourceTree = ""; }; + 7539DFD41F23B25A006B2DF2 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = ""; }; + 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = ""; }; + 7539DFD61F23B25A006B2DF2 /* ether.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether.cpp; path = ../ether.cpp; sourceTree = ""; }; + 7539DFD71F23B25A006B2DF2 /* extfs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = extfs.cpp; path = ../extfs.cpp; sourceTree = ""; }; + 7539DFD91F23B25A006B2DF2 /* adb.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = adb.h; sourceTree = ""; }; + 7539DFDA1F23B25A006B2DF2 /* audio.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio.h; sourceTree = ""; }; + 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs.h; sourceTree = ""; }; + 7539DFDC1F23B25A006B2DF2 /* cdrom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cdrom.h; sourceTree = ""; }; + 7539DFDD1F23B25A006B2DF2 /* clip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = clip.h; sourceTree = ""; }; + 7539DFDE1F23B25A006B2DF2 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; + 7539DFDF1F23B25A006B2DF2 /* disk.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk.h; sourceTree = ""; }; + 7539DFE01F23B25A006B2DF2 /* emul_op.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = emul_op.h; sourceTree = ""; }; + 7539DFE11F23B25A006B2DF2 /* ether.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether.h; sourceTree = ""; }; + 7539DFE21F23B25A006B2DF2 /* ether_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether_defs.h; sourceTree = ""; }; + 7539DFE31F23B25A006B2DF2 /* extfs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs.h; sourceTree = ""; }; + 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs_defs.h; sourceTree = ""; }; + 7539DFE51F23B25A006B2DF2 /* macos_util.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util.h; sourceTree = ""; }; + 7539DFE61F23B25A006B2DF2 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; + 7539DFE71F23B25A006B2DF2 /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; + 7539DFE81F23B25A006B2DF2 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs.h; sourceTree = ""; }; + 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs_editor.h; sourceTree = ""; }; + 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rom_patches.h; sourceTree = ""; }; + 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rsrc_patches.h; sourceTree = ""; }; + 7539DFEC1F23B25A006B2DF2 /* scsi.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = scsi.h; sourceTree = ""; }; + 7539DFED1F23B25A006B2DF2 /* serial.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial.h; sourceTree = ""; }; + 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial_defs.h; sourceTree = ""; }; + 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slot_rom.h; sourceTree = ""; }; + 7539DFF01F23B25A006B2DF2 /* sony.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sony.h; sourceTree = ""; }; + 7539DFF11F23B25A006B2DF2 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sys.h; sourceTree = ""; }; + 7539DFF21F23B25A006B2DF2 /* timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = timer.h; sourceTree = ""; }; + 7539DFF31F23B25A006B2DF2 /* user_strings.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings.h; sourceTree = ""; }; + 7539DFF41F23B25A006B2DF2 /* version.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = version.h; sourceTree = ""; }; + 7539DFF51F23B25A006B2DF2 /* video.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video.h; sourceTree = ""; }; + 7539DFF61F23B25A006B2DF2 /* video_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_defs.h; sourceTree = ""; }; + 7539DFF71F23B25A006B2DF2 /* xpram.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xpram.h; sourceTree = ""; }; + 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = ""; }; + 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; + 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs_macosx.h; sourceTree = ""; }; + 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = BasiliskII.icns; sourceTree = ""; }; + 7539E00A1F23B25A006B2DF2 /* Credits.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Credits.html; sourceTree = ""; }; + 7539E0101F23B25A006B2DF2 /* English */ = {isa = PBXFileReference; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; + 7539E0141F23B25A006B2DF2 /* HowTo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = HowTo.html; sourceTree = ""; }; + 7539E02B1F23B25A006B2DF2 /* ToDo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = ToDo.html; sourceTree = ""; }; + 7539E02E1F23B25A006B2DF2 /* Versions.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Versions.html; sourceTree = ""; }; + 7539E0651F23B25A006B2DF2 /* main.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = main.cpp; path = ../main.cpp; sourceTree = ""; }; + 7539E0681F23B25A006B2DF2 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../prefs_items.cpp; sourceTree = ""; }; + 7539E06D1F23B25A006B2DF2 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../prefs.cpp; sourceTree = ""; }; + 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rom_patches.cpp; path = ../rom_patches.cpp; sourceTree = ""; }; + 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rsrc_patches.cpp; path = ../rsrc_patches.cpp; sourceTree = ""; }; + 7539E0701F23B25A006B2DF2 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = ""; }; + 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; + 7539E0731F23B25A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; + 7539E0771F23B25A006B2DF2 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = ""; }; + 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; + 7539E0A31F23B25A006B2DF2 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = ""; }; + 7539E0A41F23B25A006B2DF2 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = ""; }; + 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = basilisk_glue.cpp; sourceTree = ""; }; + 7539E0AB1F23B25A006B2DF2 /* compemu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = compemu.h; sourceTree = ""; }; + 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags_x86.h; sourceTree = ""; }; + 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; + 7539E0B41F23B25A006B2DF2 /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = core.h; sourceTree = ""; }; + 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = exceptions.cpp; sourceTree = ""; }; + 7539E0B61F23B25A006B2DF2 /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = exceptions.h; sourceTree = ""; }; + 7539E0B71F23B25A006B2DF2 /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = flags.cpp; sourceTree = ""; }; + 7539E0B81F23B25A006B2DF2 /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags.h; sourceTree = ""; }; + 7539E0B91F23B25A006B2DF2 /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu.h; sourceTree = ""; }; + 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_ieee.h; sourceTree = ""; }; + 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_uae.h; sourceTree = ""; }; + 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86.h; sourceTree = ""; }; + 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86_asm.h; sourceTree = ""; }; + 7539E0C11F23B25A006B2DF2 /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = impl.h; sourceTree = ""; }; + 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; + 7539E0C31F23B25A006B2DF2 /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mathlib.h; sourceTree = ""; }; + 7539E0C41F23B25A006B2DF2 /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rounding.cpp; sourceTree = ""; }; + 7539E0C51F23B25A006B2DF2 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rounding.h; sourceTree = ""; }; + 7539E0C61F23B25A006B2DF2 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = types.h; sourceTree = ""; }; + 7539E0C81F23B25A006B2DF2 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = m68k.h; sourceTree = ""; }; + 7539E0C91F23B25A006B2DF2 /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = memory.cpp; sourceTree = ""; }; + 7539E0CA1F23B25A006B2DF2 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; + 7539E0CC1F23B25A006B2DF2 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = newcpu.h; sourceTree = ""; }; + 7539E0CD1F23B25A006B2DF2 /* noflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = noflags.h; sourceTree = ""; }; + 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = readcpu.cpp; sourceTree = ""; }; + 7539E0CF1F23B25A006B2DF2 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = readcpu.h; sourceTree = ""; }; + 7539E0D01F23B25A006B2DF2 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = spcflags.h; sourceTree = ""; }; + 7539E0D11F23B25A006B2DF2 /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = table68k; sourceTree = ""; }; + 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; + 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; + 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; + 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; + 7539E1F11F23B329006B2DF2 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; + 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-osx.patch"; sourceTree = ""; }; + 7539E1FA1F23B32A006B2DF2 /* mkstandalone */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkstandalone; sourceTree = ""; }; + 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = testlmem.sh; sourceTree = ""; }; + 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = disk_sparsebundle.cpp; sourceTree = ""; }; + 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk_unix.h; sourceTree = ""; }; + 7539E2011F23B32A006B2DF2 /* fbdevices */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = fbdevices; sourceTree = ""; }; + 7539E2051F23B32A006B2DF2 /* install-sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = "install-sh"; sourceTree = ""; }; + 7539E20A1F23B32A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; + 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "freebsd-i386.ld"; sourceTree = ""; }; + 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-i386.ld"; sourceTree = ""; }; + 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-ppc.ld"; sourceTree = ""; }; + 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-x86_64.ld"; sourceTree = ""; }; + 7539E2181F23B32A006B2DF2 /* egrep.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = egrep.m4; sourceTree = ""; }; + 7539E2191F23B32A006B2DF2 /* esd.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = esd.m4; sourceTree = ""; }; + 7539E21A1F23B32A006B2DF2 /* gettext.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gettext.m4; sourceTree = ""; }; + 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-2.0.m4"; sourceTree = ""; }; + 7539E21C1F23B32A006B2DF2 /* gtk.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gtk.m4; sourceTree = ""; }; + 7539E21E1F23B32A006B2DF2 /* Makefile.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = Makefile.in; sourceTree = ""; }; + 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkinstalldirs; sourceTree = ""; }; + 7539E2231F23B32A006B2DF2 /* rpc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rpc.h; sourceTree = ""; }; + 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rpc_unix.cpp; sourceTree = ""; }; + 7539E2251F23B32A006B2DF2 /* semaphore.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = semaphore.h; sourceTree = ""; }; + 7539E22A1F23B32A006B2DF2 /* sshpty.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sshpty.c; sourceTree = ""; }; + 7539E22B1F23B32A006B2DF2 /* sshpty.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sshpty.h; sourceTree = ""; }; + 7539E22C1F23B32A006B2DF2 /* strlcpy.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = strlcpy.c; sourceTree = ""; }; + 7539E22D1F23B32A006B2DF2 /* strlcpy.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = strlcpy.h; sourceTree = ""; }; + 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_unix.cpp; sourceTree = ""; }; + 7539E22F1F23B32A006B2DF2 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sysdeps.h; sourceTree = ""; }; + 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = timer_unix.cpp; sourceTree = ""; }; + 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = tinyxml2.cpp; sourceTree = ""; }; + 7539E2321F23B32A006B2DF2 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tinyxml2.h; sourceTree = ""; }; + 7539E2331F23B32A006B2DF2 /* tunconfig */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = tunconfig; sourceTree = ""; }; + 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; + 7539E27E1F23BEB4006B2DF2 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; + 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; + 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_dummy.cpp; sourceTree = ""; }; + 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; + 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; + 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; + 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; + 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; + 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; + 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; + 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; + 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; + 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; + 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; + 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; + E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; + E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; + E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; + E413D8F920D260B900E437D8 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = mbuf.c; sourceTree = ""; }; + E413D8FA20D260B900E437D8 /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tftp.h; sourceTree = ""; }; + E413D8FB20D260B900E437D8 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_icmp.c; sourceTree = ""; }; + E413D8FC20D260B900E437D8 /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bootp.h; sourceTree = ""; }; + E413D8FD20D260B900E437D8 /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcpip.h; sourceTree = ""; }; + E413D8FE20D260B900E437D8 /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION; sourceTree = ""; }; + E413D8FF20D260B900E437D8 /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip_icmp.h; sourceTree = ""; }; + E413D90020D260B900E437D8 /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp_config.h; sourceTree = ""; }; + E413D90120D260B900E437D8 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_input.c; sourceTree = ""; }; + E413D90220D260B900E437D8 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = misc.c; sourceTree = ""; }; + E413D90320D260BA00E437D8 /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = udp.h; sourceTree = ""; }; + E413D90420D260BA00E437D8 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; + E413D90520D260BA00E437D8 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = debug.c; sourceTree = ""; }; + E413D90620D260BA00E437D8 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_subr.c; sourceTree = ""; }; + E413D90720D260BA00E437D8 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = udp.c; sourceTree = ""; }; + E413D90820D260BA00E437D8 /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mbuf.h; sourceTree = ""; }; + E413D90920D260BA00E437D8 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sbuf.c; sourceTree = ""; }; + E413D90A20D260BA00E437D8 /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ctl.h; sourceTree = ""; }; + E413D90B20D260BA00E437D8 /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp.h; sourceTree = ""; }; + E413D90C20D260BA00E437D8 /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = COPYRIGHT; sourceTree = ""; }; + E413D90D20D260BA00E437D8 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = slirp.c; sourceTree = ""; }; + E413D90E20D260BA00E437D8 /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = socket.h; sourceTree = ""; }; + E413D90F20D260BA00E437D8 /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = if.h; sourceTree = ""; }; + E413D91020D260BA00E437D8 /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = misc.h; sourceTree = ""; }; + E413D91120D260BA00E437D8 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_timer.c; sourceTree = ""; }; + E413D91220D260BB00E437D8 /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sbuf.h; sourceTree = ""; }; + E413D91320D260BB00E437D8 /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp.h; sourceTree = ""; }; + E413D91420D260BB00E437D8 /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip.h; sourceTree = ""; }; + E413D91520D260BB00E437D8 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; + E413D91620D260BB00E437D8 /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_timer.h; sourceTree = ""; }; + E413D91720D260BB00E437D8 /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_var.h; sourceTree = ""; }; + E413D91820D260BB00E437D8 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = socket.c; sourceTree = ""; }; + E413D91920D260BB00E437D8 /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = libslirp.h; sourceTree = ""; }; + E413D91A20D260BC00E437D8 /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = icmp_var.h; sourceTree = ""; }; + E413D91B20D260BC00E437D8 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = bootp.c; sourceTree = ""; }; + E413D91C20D260BC00E437D8 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_input.c; sourceTree = ""; }; + E413D91D20D260BC00E437D8 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_output.c; sourceTree = ""; }; + E413D91E20D260BC00E437D8 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = if.c; sourceTree = ""; }; + E413D91F20D260BC00E437D8 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = cksum.c; sourceTree = ""; }; + E413D92020D260BC00E437D8 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_output.c; sourceTree = ""; }; + E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; + E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; + E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E416BEE72410AA4E00751E6D /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; + E416BEE92410AA9800751E6D /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; + E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; + E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; + E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; + E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; +/* End PBXFileReference section */ + +/* Begin PBXFrameworksBuildPhase section */ + 7539DFAF1F23B17E006B2DF2 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */, + 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */, + 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */, + E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, + E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */, + 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, + 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, + 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXFrameworksBuildPhase section */ + +/* Begin PBXGroup section */ + 4ECAC23C1F8A89ED0013B963 /* slirp */ = { + isa = PBXGroup; + children = ( + E413D91B20D260BC00E437D8 /* bootp.c */, + E413D8FC20D260B900E437D8 /* bootp.h */, + E413D91F20D260BC00E437D8 /* cksum.c */, + E413D90C20D260BA00E437D8 /* COPYRIGHT */, + E413D90A20D260BA00E437D8 /* ctl.h */, + E413D90520D260BA00E437D8 /* debug.c */, + E413D91520D260BB00E437D8 /* debug.h */, + E413D91A20D260BC00E437D8 /* icmp_var.h */, + E413D91E20D260BC00E437D8 /* if.c */, + E413D90F20D260BA00E437D8 /* if.h */, + E413D8FB20D260B900E437D8 /* ip_icmp.c */, + E413D8FF20D260B900E437D8 /* ip_icmp.h */, + E413D91C20D260BC00E437D8 /* ip_input.c */, + E413D91D20D260BC00E437D8 /* ip_output.c */, + E413D91420D260BB00E437D8 /* ip.h */, + E413D91920D260BB00E437D8 /* libslirp.h */, + E413D90420D260BA00E437D8 /* main.h */, + E413D8F920D260B900E437D8 /* mbuf.c */, + E413D90820D260BA00E437D8 /* mbuf.h */, + E413D90220D260B900E437D8 /* misc.c */, + E413D91020D260BA00E437D8 /* misc.h */, + E413D90920D260BA00E437D8 /* sbuf.c */, + E413D91220D260BB00E437D8 /* sbuf.h */, + E413D90020D260B900E437D8 /* slirp_config.h */, + E413D90D20D260BA00E437D8 /* slirp.c */, + E413D90B20D260BA00E437D8 /* slirp.h */, + E413D91820D260BB00E437D8 /* socket.c */, + E413D90E20D260BA00E437D8 /* socket.h */, + E413D90120D260B900E437D8 /* tcp_input.c */, + E413D92020D260BC00E437D8 /* tcp_output.c */, + E413D90620D260BA00E437D8 /* tcp_subr.c */, + E413D91120D260BA00E437D8 /* tcp_timer.c */, + E413D91620D260BB00E437D8 /* tcp_timer.h */, + E413D91720D260BB00E437D8 /* tcp_var.h */, + E413D91320D260BB00E437D8 /* tcp.h */, + E413D8FD20D260B900E437D8 /* tcpip.h */, + E413D8F820D260B900E437D8 /* tftp.c */, + E413D8FA20D260B900E437D8 /* tftp.h */, + E413D90720D260BA00E437D8 /* udp.c */, + E413D90320D260BA00E437D8 /* udp.h */, + E413D8FE20D260B900E437D8 /* VERSION */, + ); + name = slirp; + path = ../slirp; + sourceTree = ""; + }; + 752F26F71F240E51001032B4 /* Frameworks */ = { + isa = PBXGroup; + children = ( +<<<<<<< HEAD + 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */, + 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */, + 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */, +======= + E416BEE92410AA9800751E6D /* Security.framework */, +>>>>>>> master + E413D93520D260DA00E437D8 /* SDL2.framework */, + 756C1B381F25306A00620917 /* AppKit.framework */, + 752F26FA1F240E69001032B4 /* IOKit.framework */, + 752F26F81F240E51001032B4 /* Foundation.framework */, + ); + name = Frameworks; + sourceTree = ""; + }; + 753252FF1F535E5D0024025B /* generated src */ = { + isa = PBXGroup; + children = ( + E416BEEC2410AE0000751E6D /* etherhelpertool */, + 7532532B1F53675E0024025B /* gencpu output */, + ); + name = "generated src"; + sourceTree = ""; + }; + 7532532B1F53675E0024025B /* gencpu output */ = { + isa = PBXGroup; + children = ( + 7532532C1F5368370024025B /* cpuemu_nf.cpp */, + 7532532D1F5368370024025B /* cpuemu.cpp */, + 7532532E1F5368370024025B /* cpustbl_nf.cpp */, + 7532532F1F5368370024025B /* cpustbl.cpp */, + 753253301F5368370024025B /* cputbl.h */, + E417913123D7D67C0009AD63 /* defs68k.c */, + ); + name = "gencpu output"; + sourceTree = ""; + }; + 7539DFA91F23B17E006B2DF2 = { + isa = PBXGroup; + children = ( + E4150D1320D559800077C51A /* SDL2.framework */, + 7539E1E41F23B25E006B2DF2 /* src */, + 753252FF1F535E5D0024025B /* generated src */, + 7539DFB31F23B17E006B2DF2 /* Products */, + 752F26F71F240E51001032B4 /* Frameworks */, + ); + sourceTree = ""; + }; + 7539DFB31F23B17E006B2DF2 /* Products */ = { + isa = PBXGroup; + children = ( + 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, + ); + name = Products; + path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; + sourceTree = BUILT_PRODUCTS_DIR; + }; + 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { + isa = PBXGroup; + children = ( + 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */, + 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */, + 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */, + 7539DFD01F23B25A006B2DF2 /* video_blit.h */, + 7539DFD11F23B25A006B2DF2 /* video_vosf.h */, + 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */, + 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */, + ); + name = CrossPlatform; + path = ../CrossPlatform; + sourceTree = ""; + }; + 7539DFD81F23B25A006B2DF2 /* include */ = { + isa = PBXGroup; + children = ( + 7539DFD91F23B25A006B2DF2 /* adb.h */, + 7539DFDA1F23B25A006B2DF2 /* audio.h */, + 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */, + 7539DFDC1F23B25A006B2DF2 /* cdrom.h */, + 7539DFDD1F23B25A006B2DF2 /* clip.h */, + 7539DFDE1F23B25A006B2DF2 /* debug.h */, + 7539DFDF1F23B25A006B2DF2 /* disk.h */, + 7539DFE01F23B25A006B2DF2 /* emul_op.h */, + 7539DFE11F23B25A006B2DF2 /* ether.h */, + 7539DFE21F23B25A006B2DF2 /* ether_defs.h */, + 7539DFE31F23B25A006B2DF2 /* extfs.h */, + 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */, + 7539DFE51F23B25A006B2DF2 /* macos_util.h */, + 7539DFE61F23B25A006B2DF2 /* main.h */, + 7539DFE71F23B25A006B2DF2 /* pict.h */, + 7539DFE81F23B25A006B2DF2 /* prefs.h */, + 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */, + 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */, + 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */, + 7539DFEC1F23B25A006B2DF2 /* scsi.h */, + 7539DFED1F23B25A006B2DF2 /* serial.h */, + 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */, + 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */, + 7539DFF01F23B25A006B2DF2 /* sony.h */, + 7539DFF11F23B25A006B2DF2 /* sys.h */, + 7539DFF21F23B25A006B2DF2 /* timer.h */, + 7539DFF31F23B25A006B2DF2 /* user_strings.h */, + 7539DFF41F23B25A006B2DF2 /* version.h */, + 7539DFF51F23B25A006B2DF2 /* video.h */, + 7539DFF61F23B25A006B2DF2 /* video_defs.h */, + 7539DFF71F23B25A006B2DF2 /* xpram.h */, + ); + name = include; + path = ../include; + sourceTree = ""; + }; + 7539DFF91F23B25A006B2DF2 /* MacOSX */ = { + isa = PBXGroup; + children = ( + E416BEEB2410AB0E00751E6D /* etherhelpertool.c */, + E416BEE72410AA4E00751E6D /* runtool.c */, + 7539E2AA1F23CDB7006B2DF2 /* Info.plist */, + 7539E27E1F23BEB4006B2DF2 /* config.h */, + 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, + 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, + 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, + E490334D20D3A5890012DD5F /* clip_macosx64.mm */, + 7539E00A1F23B25A006B2DF2 /* Credits.html */, + E413D93920D2614E00E437D8 /* extfs_macosx.cpp */, + 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, + 7539E0141F23B25A006B2DF2 /* HowTo.html */, + 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */, + 7539E02B1F23B25A006B2DF2 /* ToDo.html */, + 756C1B321F252FC100620917 /* utils_macosx.h */, + 756C1B331F252FC100620917 /* utils_macosx.mm */, + 7539E02E1F23B25A006B2DF2 /* Versions.html */, + 5DDE95152255D076004D0E79 /* audio_macosx.cpp */, + 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */, + 5DDE95122255D075004D0E79 /* AudioBackEnd.h */, + 5DDE95132255D076004D0E79 /* AudioDevice.cpp */, + 5DDE95142255D076004D0E79 /* AudioDevice.h */, + 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */, + 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */, + ); + name = MacOSX; + sourceTree = ""; + }; + 7539E0711F23B25A006B2DF2 /* SDL */ = { + isa = PBXGroup; + children = ( + 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, + 7539E0731F23B25A006B2DF2 /* keycodes */, + 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, + E40CEEC420D7910D00BCB88D /* SDLMain.h */, + E40CEEC520D7910E00BCB88D /* SDLMain.m */, + 75CBCF761F5DB65E00830063 /* video_sdl.cpp */, + 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, + 752F27021F242F51001032B4 /* xpram_sdl.cpp */, + ); + name = SDL; + path = ../SDL; + sourceTree = ""; + }; + 7539E0A51F23B25A006B2DF2 /* uae_cpu */ = { + isa = PBXGroup; + children = ( + 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, + 753252E51F5359040024025B /* build68k.c */, + 7539E0A81F23B25A006B2DF2 /* compiler */, + 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, + 7539E0B31F23B25A006B2DF2 /* fpu */, + 753253011F535F210024025B /* gencpu.c */, + 7539E0C81F23B25A006B2DF2 /* m68k.h */, + 7539E0C91F23B25A006B2DF2 /* memory.cpp */, + 7539E0CA1F23B25A006B2DF2 /* memory.h */, + 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */, + 7539E0CC1F23B25A006B2DF2 /* newcpu.h */, + 7539E0CD1F23B25A006B2DF2 /* noflags.h */, + 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */, + 7539E0CF1F23B25A006B2DF2 /* readcpu.h */, + 7539E0D01F23B25A006B2DF2 /* spcflags.h */, + 7539E0D11F23B25A006B2DF2 /* table68k */, + ); + name = uae_cpu; + path = ../uae_cpu; + sourceTree = ""; + }; + 7539E0A81F23B25A006B2DF2 /* compiler */ = { + isa = PBXGroup; + children = ( + 7539E0AB1F23B25A006B2DF2 /* compemu.h */, + 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, + ); + path = compiler; + sourceTree = ""; + }; + 7539E0B31F23B25A006B2DF2 /* fpu */ = { + isa = PBXGroup; + children = ( + E4D8245223543D9700849B78 /* fpu_ieee.cpp */, + 7539E0B41F23B25A006B2DF2 /* core.h */, + 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, + 7539E0B61F23B25A006B2DF2 /* exceptions.h */, + 7539E0B71F23B25A006B2DF2 /* flags.cpp */, + 7539E0B81F23B25A006B2DF2 /* flags.h */, + 7539E0B91F23B25A006B2DF2 /* fpu.h */, + 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */, + 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */, + 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */, + 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */, + 7539E0C11F23B25A006B2DF2 /* impl.h */, + 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */, + 7539E0C31F23B25A006B2DF2 /* mathlib.h */, + 7539E0C41F23B25A006B2DF2 /* rounding.cpp */, + 7539E0C51F23B25A006B2DF2 /* rounding.h */, + 7539E0C61F23B25A006B2DF2 /* types.h */, + ); + path = fpu; + sourceTree = ""; + }; + 7539E1E41F23B25E006B2DF2 /* src */ = { + isa = PBXGroup; + children = ( + 7539DFC91F23B25A006B2DF2 /* adb.cpp */, + 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, + 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, + 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */, + 7539DFD41F23B25A006B2DF2 /* disk.cpp */, + 7539E2811F23C52C006B2DF2 /* dummy */, + 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */, + 7539DFD61F23B25A006B2DF2 /* ether.cpp */, + 7539DFD71F23B25A006B2DF2 /* extfs.cpp */, + 7539DFD81F23B25A006B2DF2 /* include */, + 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */, + 7539DFF91F23B25A006B2DF2 /* MacOSX */, + 7539E0651F23B25A006B2DF2 /* main.cpp */, + 7539E0681F23B25A006B2DF2 /* pict.c */, + 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */, + 7539E06D1F23B25A006B2DF2 /* prefs.cpp */, + 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */, + 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */, + 7539E0701F23B25A006B2DF2 /* scsi.cpp */, + 7539E0711F23B25A006B2DF2 /* SDL */, + 7539E0771F23B25A006B2DF2 /* serial.cpp */, + 4ECAC23C1F8A89ED0013B963 /* slirp */, + 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, + 7539E0A31F23B25A006B2DF2 /* sony.cpp */, + 7539E0A41F23B25A006B2DF2 /* timer.cpp */, + 7539E0A51F23B25A006B2DF2 /* uae_cpu */, + 7539E1E91F23B329006B2DF2 /* Unix */, + 7539E1221F23B25A006B2DF2 /* user_strings.cpp */, + 7539E1231F23B25A006B2DF2 /* video.cpp */, + 7539E1241F23B25A006B2DF2 /* xpram.cpp */, + ); + name = src; + sourceTree = ""; + }; + 7539E1E91F23B329006B2DF2 /* Unix */ = { + isa = PBXGroup; + children = ( + 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */, + 7539E1F11F23B329006B2DF2 /* bincue_unix.h */, + 7539E1F71F23B329006B2DF2 /* Darwin */, + 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */, + 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */, + E413D93720D2613500E437D8 /* ether_unix.cpp */, + 7539E2011F23B32A006B2DF2 /* fbdevices */, + 7539E2051F23B32A006B2DF2 /* install-sh */, + 7539E20A1F23B32A006B2DF2 /* keycodes */, + 7539E20B1F23B32A006B2DF2 /* ldscripts */, + 7539E2171F23B32A006B2DF2 /* m4 */, + 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */, + 7539E21E1F23B32A006B2DF2 /* Makefile.in */, + 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */, + 7539E2231F23B32A006B2DF2 /* rpc.h */, + 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */, + 7539E2251F23B32A006B2DF2 /* semaphore.h */, + 7539E22A1F23B32A006B2DF2 /* sshpty.c */, + 7539E22B1F23B32A006B2DF2 /* sshpty.h */, + 7539E22C1F23B32A006B2DF2 /* strlcpy.c */, + 7539E22D1F23B32A006B2DF2 /* strlcpy.h */, + 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */, + 7539E22F1F23B32A006B2DF2 /* sysdeps.h */, + 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */, + 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */, + 7539E2321F23B32A006B2DF2 /* tinyxml2.h */, + 7539E2331F23B32A006B2DF2 /* tunconfig */, + 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */, + 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */, + ); + name = Unix; + path = ../Unix; + sourceTree = ""; + }; + 7539E1F71F23B329006B2DF2 /* Darwin */ = { + isa = PBXGroup; + children = ( + 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */, + 7539E1FA1F23B32A006B2DF2 /* mkstandalone */, + 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */, + ); + path = Darwin; + sourceTree = ""; + }; + 7539E20B1F23B32A006B2DF2 /* ldscripts */ = { + isa = PBXGroup; + children = ( + 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */, + 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */, + 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */, + 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */, + ); + path = ldscripts; + sourceTree = ""; + }; + 7539E2171F23B32A006B2DF2 /* m4 */ = { + isa = PBXGroup; + children = ( + 7539E2181F23B32A006B2DF2 /* egrep.m4 */, + 7539E2191F23B32A006B2DF2 /* esd.m4 */, + 7539E21A1F23B32A006B2DF2 /* gettext.m4 */, + 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */, + 7539E21C1F23B32A006B2DF2 /* gtk.m4 */, + ); + path = m4; + sourceTree = ""; + }; + 7539E2811F23C52C006B2DF2 /* dummy */ = { + isa = PBXGroup; + children = ( + 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */, + 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, + 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, + 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, + ); + name = dummy; + path = ../dummy; + sourceTree = ""; + }; +/* End PBXGroup section */ + +/* Begin PBXNativeTarget section */ + 7539DFB11F23B17E006B2DF2 /* BasiliskII */ = { + isa = PBXNativeTarget; + buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; + buildPhases = ( + 752F27181F251CB1001032B4 /* Run Script */, + 7539DFAE1F23B17E006B2DF2 /* Sources */, + 7539DFAF1F23B17E006B2DF2 /* Frameworks */, + 7539DFB01F23B17E006B2DF2 /* Resources */, + 752F26F31F240140001032B4 /* Embed Frameworks */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = BasiliskII; + productName = BasiliskII; + productReference = 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */; + productType = "com.apple.product-type.application"; + }; +/* End PBXNativeTarget section */ + +/* Begin PBXProject section */ + 7539DFAA1F23B17E006B2DF2 /* Project object */ = { + isa = PBXProject; + attributes = { + LastUpgradeCheck = 0830; + TargetAttributes = { + 7539DFB11F23B17E006B2DF2 = { + CreatedOnToolsVersion = 8.3.3; + ProvisioningStyle = Automatic; + }; + }; + }; + buildConfigurationList = 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */; + compatibilityVersion = "Xcode 3.2"; + developmentRegion = English; + hasScannedForEncodings = 0; + knownRegions = ( + en, + Base, + English, + ); + mainGroup = 7539DFA91F23B17E006B2DF2; + productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; + projectDirPath = ""; + projectRoot = ""; + targets = ( + 7539DFB11F23B17E006B2DF2 /* BasiliskII */, + ); + }; +/* End PBXProject section */ + +/* Begin PBXResourcesBuildPhase section */ + 7539DFB01F23B17E006B2DF2 /* Resources */ = { + isa = PBXResourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, + E4555EED2354434B00139FCE /* Credits.html in Resources */, + E416BEED2410AE0900751E6D /* etherhelpertool in Resources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXResourcesBuildPhase section */ + +/* Begin PBXShellScriptBuildPhase section */ + 752F27181F251CB1001032B4 /* Run Script */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputPaths = ( + ); + name = "Run Script"; + outputPaths = ( + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "make -f Makefile.gencpu\ncc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; + }; +/* End PBXShellScriptBuildPhase section */ + +/* Begin PBXSourcesBuildPhase section */ + 7539DFAE1F23B17E006B2DF2 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, + 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, + 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, + 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, + E413D93320D260BC00E437D8 /* cksum.c in Sources */, + E413D92920D260BC00E437D8 /* udp.c in Sources */, + E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */, + 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, + E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, + 753253351F53688D0024025B /* readcpu.cpp in Sources */, + 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, + E413D93120D260BC00E437D8 /* ip_output.c in Sources */, + 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, + 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, + 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, + 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, + 753253341F5368370024025B /* cpustbl.cpp in Sources */, + 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, + E413D92620D260BC00E437D8 /* misc.c in Sources */, + 753253321F5368370024025B /* cpuemu.cpp in Sources */, + 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */, + 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, + 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, + 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, + 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, + 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, + 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, + 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, + 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, + 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, + 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, + 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, + 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, + E413D93220D260BC00E437D8 /* if.c in Sources */, + 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, + 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, + 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, + E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, + 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, + 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, + E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, + 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, + 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, + E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, + 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, + E413D92E20D260BC00E437D8 /* socket.c in Sources */, + 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, + 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, + 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, + 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, + 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */, + 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */, + E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, + E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, + 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, + 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, + E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */, + 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, + 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, + 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, + 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, + 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */, + 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, + E413D92720D260BC00E437D8 /* debug.c in Sources */, + E413D92220D260BC00E437D8 /* mbuf.c in Sources */, + 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, + E416BEE82410AA4E00751E6D /* runtool.c in Sources */, + E413D93020D260BC00E437D8 /* ip_input.c in Sources */, + 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, + 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, + 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, + E413D92C20D260BC00E437D8 /* slirp.c in Sources */, + 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, + E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */, + 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, + 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, + E413D92520D260BC00E437D8 /* tcp_input.c in Sources */, + E413D92120D260BC00E437D8 /* tftp.c in Sources */, + 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, + 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, + E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */, + 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, + 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, + E413D92F20D260BC00E437D8 /* bootp.c in Sources */, + 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, + 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXSourcesBuildPhase section */ + +/* Begin PBXVariantGroup section */ + 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { + isa = PBXVariantGroup; + children = ( + 7539E0101F23B25A006B2DF2 /* English */, + ); + name = InfoPlist.strings; + sourceTree = ""; + }; +/* End PBXVariantGroup section */ + +/* Begin XCBuildConfiguration section */ + 7539DFC41F23B17E006B2DF2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_ANALYZER_NONNULL = YES; + CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = NO; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_DYNAMIC_NO_PIC = NO; + GCC_NO_COMMON_BLOCKS = YES; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + "DEBUG=1", + ); + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + ../MacOSX, + ../include, + ../uae_cpu, + ../UNIX, + ); + MACOSX_DEPLOYMENT_TARGET = 10.7; + MTL_ENABLE_DEBUG_INFO = YES; + ONLY_ACTIVE_ARCH = YES; + SDKROOT = macosx; + }; + name = Debug; + }; + 7539DFC51F23B17E006B2DF2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_ANALYZER_NONNULL = YES; + CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = NO; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + ENABLE_NS_ASSERTIONS = NO; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_NO_COMMON_BLOCKS = YES; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + HAVE_CONFIG_H, + "USE_XCODE=1", + ); + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", + ../MacOSX, + ../include, + ../uae_cpu, + ../UNIX, + ); + MACOSX_DEPLOYMENT_TARGET = 10.7; + MTL_ENABLE_DEBUG_INFO = NO; + SDKROOT = macosx; + }; + name = Release; + }; + 7539DFC71F23B17E006B2DF2 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; + CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = NO; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES; + CLANG_WARN_SUSPICIOUS_MOVE = NO; + CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + COMBINE_HIDPI_IMAGES = NO; + ENABLE_NS_ASSERTIONS = YES; + ENABLE_TESTABILITY = NO; + FRAMEWORK_SEARCH_PATHS = ( + "$(inherited)", + "$(LOCAL_LIBRARY_DIR)/Frameworks", + ); + GCC_CW_ASM_SYNTAX = NO; + GCC_C_LANGUAGE_STANDARD = "compiler-default"; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", +<<<<<<< HEAD + HAVE_CONFIG_H, + "USE_XCODE=1", + "DEBUG=1", + "USE_SDL_AUDIO=1", + "BINCUE=1", +======= + ENABLE_MACOSX_ETHERHELPER, + HAVE_CONFIG_H, +>>>>>>> master + ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu, + ../Unix, + ../slirp, + ); + INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; + ONLY_ACTIVE_ARCH = NO; + OTHER_CFLAGS = ""; + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; + PRODUCT_NAME = "$(TARGET_NAME)"; + USE_HEADERMAP = YES; + VALID_ARCHS = x86_64; + WARNING_CFLAGS = ""; + }; + name = Debug; + }; + 7539DFC81F23B17E006B2DF2 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; + CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = NO; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES; + CLANG_WARN_SUSPICIOUS_MOVE = NO; + CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + COMBINE_HIDPI_IMAGES = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_NS_ASSERTIONS = YES; + ENABLE_TESTABILITY = NO; + FRAMEWORK_SEARCH_PATHS = ( + "$(inherited)", + "$(LOCAL_LIBRARY_DIR)/Frameworks", + ); + GCC_CW_ASM_SYNTAX = NO; + GCC_C_LANGUAGE_STANDARD = "compiler-default"; + GCC_DYNAMIC_NO_PIC = YES; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_OPTIMIZATION_LEVEL = 3; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", +<<<<<<< HEAD + HAVE_CONFIG_H, + "USE_XCODE=1", + "USE_SDL_AUDIO=1", + "BINCUE=1", +======= + ENABLE_MACOSX_ETHERHELPER, + HAVE_CONFIG_H, +>>>>>>> master + ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu, + ../Unix, + ../slirp, + ); + INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; + INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CFLAGS = ""; + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; + PRODUCT_NAME = "$(TARGET_NAME)"; + USE_HEADERMAP = YES; + VALID_ARCHS = x86_64; + WARNING_CFLAGS = ""; + }; + name = Release; + }; +/* End XCBuildConfiguration section */ + +/* Begin XCConfigurationList section */ + 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 7539DFC41F23B17E006B2DF2 /* Debug */, + 7539DFC51F23B17E006B2DF2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 7539DFC71F23B17E006B2DF2 /* Debug */, + 7539DFC81F23B17E006B2DF2 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; +/* End XCConfigurationList section */ + }; + rootObject = 7539DFAA1F23B17E006B2DF2 /* Project object */; +} diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 36120c062..e254656cc 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -76,7 +76,6 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; - 5D3967C02328D315003925D6 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; @@ -95,6 +94,7 @@ 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; + 5DE93B46247C71F200B2C821 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; @@ -469,6 +469,7 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */, 0856CCC214A99E1C000B1711 /* Products */, E420260924125403000508DF /* Generated */, + 5DE93B45247C71A700B2C821 /* Recovered References */, ); sourceTree = ""; }; @@ -920,6 +921,16 @@ name = Frameworks; sourceTree = ""; }; + 5DE93B45247C71A700B2C821 /* Recovered References */ = { + isa = PBXGroup; + children = ( + 5DDE95062255C844004D0E79 /* AudioUnit.framework */, + 5DDE95042255C822004D0E79 /* CoreAudio.framework */, + 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */, + ); + name = "Recovered References"; + sourceTree = ""; + }; E420260924125403000508DF /* Generated */ = { isa = PBXGroup; children = ( @@ -1099,6 +1110,7 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( + 5DE93B46247C71F200B2C821 /* adb.cpp in Sources */, E44C460B20D262B0000583AE /* debug.c in Sources */, 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig new file mode 100755 index 000000000..6dba7421b --- /dev/null +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig @@ -0,0 +1,1490 @@ +// !$*UTF8*$! +{ + archiveVersion = 1; + classes = { + }; + objectVersion = 45; + objects = { + +/* Begin PBXBuildFile section */ + 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */; }; + 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */; }; + 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */; }; + 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */; }; + 08163339158C121000C449F9 /* dis-asm.h in Headers */ = {isa = PBXBuildFile; fileRef = 08163337158C121000C449F9 /* dis-asm.h */; }; + 08163340158C125800C449F9 /* ppc-dis.c in Sources */ = {isa = PBXBuildFile; fileRef = 08163338158C121000C449F9 /* ppc-dis.c */; }; + 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */; }; + 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */; }; + 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E372016EFE87200CCCA59 /* tinyxml2.cpp */; }; + 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDF714A99EEF000B1711 /* ieeefp.cpp */; }; + 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDFD14A99EEF000B1711 /* mathlib.cpp */; }; + 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */; }; + 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */; }; + 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */; }; + 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */; }; + 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */; }; + 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */; }; + 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */; }; + 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */; }; + 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; + 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; + 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7D14A99EEF000B1711 /* disk.cpp */; }; + 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */; }; + 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8614A99EEF000B1711 /* emul_op.cpp */; }; + 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8914A99EEF000B1711 /* ether.cpp */; }; + 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8C14A99EEF000B1711 /* extfs.cpp */; }; + 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */; }; + 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE0514A99EEF000B1711 /* macos_util.cpp */; }; + 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */; }; + 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */; }; + 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */ = {isa = PBXBuildFile; fileRef = 0856CE8314A99EF0000B1711 /* SheepShaver.icns */; }; + 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */; }; + 0856D05B14A99EF1000B1711 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8814A99EF0000B1711 /* main.cpp */; }; + 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8914A99EF0000B1711 /* name_registry.cpp */; }; + 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */; }; + 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8B14A99EF0000B1711 /* prefs.cpp */; }; + 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */; }; + 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */; }; + 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8E14A99EF0000B1711 /* scsi.cpp */; }; + 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */; }; + 0856D06614A99EF1000B1711 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9514A99EF0000B1711 /* serial.cpp */; }; + 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC014A99EF0000B1711 /* sony.cpp */; }; + 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC114A99EF0000B1711 /* thunks.cpp */; }; + 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC214A99EF0000B1711 /* timer.cpp */; }; + 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */; }; + 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEE314A99EF0000B1711 /* ether_unix.cpp */; }; + 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEFB14A99EF0000B1711 /* main_unix.cpp */; }; + 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */; }; + 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */; }; + 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */; }; + 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6414A99EF0000B1711 /* sshpty.c */; }; + 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6614A99EF0000B1711 /* strlcpy.c */; }; + 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6814A99EF0000B1711 /* sys_unix.cpp */; }; + 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */; }; + 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */; }; + 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */; }; + 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7714A99EF0000B1711 /* user_strings.cpp */; }; + 0856D11814A99EF1000B1711 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7814A99EF0000B1711 /* video.cpp */; }; + 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CFC014A99EF0000B1711 /* xpram.cpp */; }; + 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D21414A9A6C6000B1711 /* IOKit.framework */; }; + 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */; }; + 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856D31214A9A704000B1711 /* VMSettingsController.mm */; }; + 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0873A80114AC515D004F12B7 /* utils_macosx.mm */; }; + 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91B71B780FFC00825F7F /* sigsegv.cpp */; }; + 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91B91B780FFC00825F7F /* video_blit.cpp */; }; + 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */; }; + 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; + 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; + 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; + 5D3967C02328D315003925D6 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; + 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; + 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; + 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; + 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; + 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; + 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; + 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; + 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */; }; + 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95042255C822004D0E79 /* CoreAudio.framework */; }; + 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95062255C844004D0E79 /* AudioUnit.framework */; }; + 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; + 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; + 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; + 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; + 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; + 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; + 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; + A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; + E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; + E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; + E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; + E4202603241250EE000508DF /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E4202602241250EE000508DF /* runtool.c */; }; + E420260524125182000508DF /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420260424125182000508DF /* Security.framework */; }; + E420260B24125442000508DF /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E420260A2412540D000508DF /* etherhelpertool */; }; + E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; + E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; + E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; + E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; + E44C460720D262B0000583AE /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DF20D262AD000583AE /* ip_icmp.c */; }; + E44C460820D262B0000583AE /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E44C45E220D262AE000583AE /* VERSION */; }; + E44C460920D262B0000583AE /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E520D262AE000583AE /* tcp_input.c */; }; + E44C460A20D262B0000583AE /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E620D262AE000583AE /* misc.c */; }; + E44C460B20D262B0000583AE /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E920D262AE000583AE /* debug.c */; }; + E44C460C20D262B0000583AE /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EA20D262AE000583AE /* tcp_subr.c */; }; + E44C460D20D262B0000583AE /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EB20D262AE000583AE /* udp.c */; }; + E44C460E20D262B0000583AE /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45ED20D262AE000583AE /* sbuf.c */; }; + E44C460F20D262B0000583AE /* COPYRIGHT in Resources */ = {isa = PBXBuildFile; fileRef = E44C45F020D262AE000583AE /* COPYRIGHT */; }; + E44C461020D262B0000583AE /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F120D262AE000583AE /* slirp.c */; }; + E44C461120D262B0000583AE /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F520D262AF000583AE /* tcp_timer.c */; }; + E44C461220D262B0000583AE /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FC20D262AF000583AE /* socket.c */; }; + E44C461320D262B0000583AE /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FF20D262AF000583AE /* bootp.c */; }; + E44C461420D262B0000583AE /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460020D262AF000583AE /* ip_input.c */; }; + E44C461520D262B0000583AE /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460120D262AF000583AE /* ip_output.c */; }; + E44C461620D262B0000583AE /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460220D262AF000583AE /* if.c */; }; + E44C461720D262B0000583AE /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460320D262AF000583AE /* cksum.c */; }; + E44C461820D262B0000583AE /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460420D262AF000583AE /* tcp_output.c */; }; + E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */; }; + E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */; }; + E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */; }; + E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4CBF46020CFC451009F40CC /* video_sdl.cpp */; }; +/* End PBXBuildFile section */ + +/* Begin PBXContainerItemProxy section */ + 0846E4A614B1253500574779 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = 0856CCAE14A99DE0000B1711 /* Project object */; + proxyType = 1; + remoteGlobalIDString = 0846E49914B124DE00574779; + remoteInfo = kpx_cpu; + }; +/* End PBXContainerItemProxy section */ + +/* Begin PBXCopyFilesBuildPhase section */ + E413A40820CF7EF800FBE967 /* Embed Frameworks */ = { + isa = PBXCopyFilesBuildPhase; + buildActionMask = 2147483647; + dstPath = ""; + dstSubfolderSpec = 10; + files = ( + E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */, + ); + name = "Embed Frameworks"; + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXCopyFilesBuildPhase section */ + +/* Begin PBXFileReference section */ + 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; + 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops.hpp"; path = "dyngen_precompiled/basic-dyngen-ops.hpp"; sourceTree = ""; }; + 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; + 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops.hpp"; sourceTree = ""; }; + 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = "ppc-execute-impl.cpp"; path = "dyngen_precompiled/ppc-execute-impl.cpp"; sourceTree = ""; }; + 08163337158C121000C449F9 /* dis-asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dis-asm.h"; sourceTree = ""; }; + 08163338158C121000C449F9 /* ppc-dis.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = "ppc-dis.c"; sourceTree = ""; }; + 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; + 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk_sparsebundle.cpp; path = ../Unix/disk_sparsebundle.cpp; sourceTree = SOURCE_ROOT; }; + 083E370B16EFE85000CCCA59 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = disk_unix.h; path = ../Unix/disk_unix.h; sourceTree = SOURCE_ROOT; }; + 083E372016EFE87200CCCA59 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = tinyxml2.cpp; path = ../Unix/tinyxml2.cpp; sourceTree = SOURCE_ROOT; }; + 083E372116EFE87200CCCA59 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tinyxml2.h; path = ../Unix/tinyxml2.h; sourceTree = SOURCE_ROOT; }; + 0846E49A14B124DE00574779 /* libkpx_cpu.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libkpx_cpu.a; sourceTree = BUILT_PRODUCTS_DIR; }; + 0846E52314B129DA00574779 /* ppc_asm.S */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.asm; path = ppc_asm.S; sourceTree = ""; }; + 0846E55214B12B0D00574779 /* paranoia.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = paranoia.cpp; sourceTree = ""; }; + 0856CCC114A99E1C000B1711 /* SheepShaver.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaver.app; sourceTree = BUILT_PRODUCTS_DIR; }; + 0856CD7D14A99EEF000B1711 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = SOURCE_ROOT; }; + 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; + 0856CD8614A99EEF000B1711 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = SOURCE_ROOT; }; + 0856CD8914A99EEF000B1711 /* ether.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether.cpp; path = ../ether.cpp; sourceTree = SOURCE_ROOT; }; + 0856CD8C14A99EEF000B1711 /* extfs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = extfs.cpp; path = ../extfs.cpp; sourceTree = SOURCE_ROOT; }; + 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = gfxaccel.cpp; path = ../gfxaccel.cpp; sourceTree = SOURCE_ROOT; }; + 0856CD8F14A99EEF000B1711 /* about_window.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = about_window.h; sourceTree = ""; }; + 0856CD9014A99EEF000B1711 /* adb.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = adb.h; sourceTree = ""; }; + 0856CD9114A99EEF000B1711 /* audio.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio.h; sourceTree = ""; }; + 0856CD9214A99EEF000B1711 /* audio_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs.h; sourceTree = ""; }; + 0856CD9314A99EEF000B1711 /* cdrom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cdrom.h; sourceTree = ""; }; + 0856CD9414A99EEF000B1711 /* clip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = clip.h; sourceTree = ""; }; + 0856CD9514A99EEF000B1711 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; + 0856CD9614A99EEF000B1711 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; + 0856CD9714A99EEF000B1711 /* disk.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk.h; sourceTree = ""; }; + 0856CD9814A99EEF000B1711 /* emul_op.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = emul_op.h; sourceTree = ""; }; + 0856CD9914A99EEF000B1711 /* ether.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether.h; sourceTree = ""; }; + 0856CD9A14A99EEF000B1711 /* ether_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether_defs.h; sourceTree = ""; }; + 0856CD9B14A99EEF000B1711 /* extfs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs.h; sourceTree = ""; }; + 0856CD9C14A99EEF000B1711 /* extfs_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs_defs.h; sourceTree = ""; }; + 0856CD9D14A99EEF000B1711 /* macos_util.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util.h; sourceTree = ""; }; + 0856CD9E14A99EEF000B1711 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; + 0856CD9F14A99EEF000B1711 /* name_registry.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = name_registry.h; sourceTree = ""; }; + 0856CDA014A99EEF000B1711 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs.h; sourceTree = ""; }; + 0856CDA114A99EEF000B1711 /* prefs_editor.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs_editor.h; sourceTree = ""; }; + 0856CDA214A99EEF000B1711 /* rom_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rom_patches.h; sourceTree = ""; }; + 0856CDA314A99EEF000B1711 /* rsrc_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rsrc_patches.h; sourceTree = ""; }; + 0856CDA414A99EEF000B1711 /* scsi.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = scsi.h; sourceTree = ""; }; + 0856CDA514A99EEF000B1711 /* serial.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial.h; sourceTree = ""; }; + 0856CDA614A99EEF000B1711 /* serial_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial_defs.h; sourceTree = ""; }; + 0856CDA714A99EEF000B1711 /* sony.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sony.h; sourceTree = ""; }; + 0856CDA814A99EEF000B1711 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sys.h; sourceTree = ""; }; + 0856CDA914A99EEF000B1711 /* thunks.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = thunks.h; sourceTree = ""; }; + 0856CDAA14A99EEF000B1711 /* timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = timer.h; sourceTree = ""; }; + 0856CDAB14A99EEF000B1711 /* user_strings.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings.h; sourceTree = ""; }; + 0856CDAC14A99EEF000B1711 /* version.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = version.h; sourceTree = ""; }; + 0856CDAD14A99EEF000B1711 /* video.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video.h; sourceTree = ""; }; + 0856CDAE14A99EEF000B1711 /* video_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_defs.h; sourceTree = ""; }; + 0856CDAF14A99EEF000B1711 /* xlowmem.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xlowmem.h; sourceTree = ""; }; + 0856CDB014A99EEF000B1711 /* xpram.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xpram.h; sourceTree = ""; }; + 0856CDB314A99EEF000B1711 /* a.out-defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "a.out-defs.h"; sourceTree = ""; }; + 0856CDB414A99EEF000B1711 /* basic-blockinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-blockinfo.hpp"; sourceTree = ""; }; + 0856CDB514A99EEF000B1711 /* basic-cpu.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-cpu.hpp"; sourceTree = ""; }; + 0856CDB614A99EEF000B1711 /* basic-plugin.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-plugin.hpp"; sourceTree = ""; }; + 0856CDB714A99EEF000B1711 /* block-alloc.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "block-alloc.hpp"; sourceTree = ""; }; + 0856CDB814A99EEF000B1711 /* elf-defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "elf-defs.h"; sourceTree = ""; }; + 0856CDB914A99EEF000B1711 /* nvmemfun.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = nvmemfun.hpp; sourceTree = ""; }; + 0856CDBA14A99EEF000B1711 /* task-plugin.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "task-plugin.hpp"; sourceTree = ""; }; + 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sheepshaver_glue.cpp; sourceTree = ""; }; + 0856CDBE14A99EEF000B1711 /* block-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "block-cache.hpp"; sourceTree = ""; }; + 0856CDC114A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; + 0856CDC214A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; + 0856CDC314A99EEF000B1711 /* jit-target-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-codegen.hpp"; sourceTree = ""; }; + 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "basic-dyngen.cpp"; sourceTree = ""; }; + 0856CDC614A99EEF000B1711 /* basic-dyngen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-dyngen.hpp"; sourceTree = ""; }; + 0856CDCA14A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; + 0856CDCB14A99EEF000B1711 /* dyngen-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-exec.h"; sourceTree = ""; }; + 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "jit-cache.cpp"; sourceTree = ""; }; + 0856CDCE14A99EEF000B1711 /* jit-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-cache.hpp"; sourceTree = ""; }; + 0856CDCF14A99EEF000B1711 /* jit-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-codegen.hpp"; sourceTree = ""; }; + 0856CDD014A99EEF000B1711 /* jit-config.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-config.hpp"; sourceTree = ""; }; + 0856CDD114A99EEF000B1711 /* jit-target-dispatch.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "jit-target-dispatch.h"; sourceTree = ""; }; + 0856CDD314A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; + 0856CDD414A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; + 0856CDD614A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; + 0856CDD714A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; + 0856CDD914A99EEF000B1711 /* codegen_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = codegen_x86.h; sourceTree = ""; }; + 0856CDDA14A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; + 0856CDDB14A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; + 0856CDDC14A99EEF000B1711 /* jit-target-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-codegen.hpp"; sourceTree = ""; }; + 0856CDDE14A99EEF000B1711 /* genexec.pl */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.perl; path = genexec.pl; sourceTree = ""; }; + 0856CDDF14A99EEF000B1711 /* ppc-bitfields.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-bitfields.hpp"; sourceTree = ""; }; + 0856CDE014A99EEF000B1711 /* ppc-blockinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-blockinfo.hpp"; sourceTree = ""; }; + 0856CDE114A99EEF000B1711 /* ppc-config.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-config.hpp"; sourceTree = ""; }; + 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-cpu.cpp"; sourceTree = ""; }; + 0856CDE314A99EEF000B1711 /* ppc-cpu.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-cpu.hpp"; sourceTree = ""; }; + 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-decode.cpp"; sourceTree = ""; }; + 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-dyngen.cpp"; sourceTree = ""; }; + 0856CDE714A99EEF000B1711 /* ppc-dyngen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-dyngen.hpp"; sourceTree = ""; }; + 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-execute.cpp"; sourceTree = ""; }; + 0856CDE914A99EEF000B1711 /* ppc-execute.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-execute.hpp"; sourceTree = ""; }; + 0856CDEA14A99EEF000B1711 /* ppc-instructions.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-instructions.hpp"; sourceTree = ""; }; + 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-jit.cpp"; sourceTree = ""; }; + 0856CDEC14A99EEF000B1711 /* ppc-jit.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-jit.hpp"; sourceTree = ""; }; + 0856CDED14A99EEF000B1711 /* ppc-operands.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-operands.hpp"; sourceTree = ""; }; + 0856CDEE14A99EEF000B1711 /* ppc-operations.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-operations.hpp"; sourceTree = ""; }; + 0856CDEF14A99EEF000B1711 /* ppc-registers.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-registers.hpp"; sourceTree = ""; }; + 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-translate.cpp"; sourceTree = ""; }; + 0856CDF114A99EEF000B1711 /* spcflags.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = spcflags.hpp; sourceTree = ""; }; + 0856CDF214A99EEF000B1711 /* vm.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = vm.hpp; sourceTree = ""; }; + 0856CDF714A99EEF000B1711 /* ieeefp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ieeefp.cpp; sourceTree = ""; }; + 0856CDF814A99EEF000B1711 /* ieeefp.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = ieeefp.hpp; sourceTree = ""; }; + 0856CDFD14A99EEF000B1711 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; + 0856CDFE14A99EEF000B1711 /* mathlib.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = mathlib.hpp; sourceTree = ""; }; + 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "utils-cpuinfo.cpp"; sourceTree = ""; }; + 0856CE0314A99EEF000B1711 /* utils-cpuinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-cpuinfo.hpp"; sourceTree = ""; }; + 0856CE0414A99EEF000B1711 /* utils-sentinel.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-sentinel.hpp"; sourceTree = ""; }; + 0856CE0514A99EEF000B1711 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; + 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util_macosx.h; sourceTree = ""; }; + 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = prefs_macosx.mm; sourceTree = ""; }; + 0856CE8314A99EF0000B1711 /* SheepShaver.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepShaver.icns; sourceTree = ""; }; + 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; + 0856CE8814A99EF0000B1711 /* main.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = main.cpp; path = ../main.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8914A99EF0000B1711 /* name_registry.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = name_registry.cpp; path = ../name_registry.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../prefs_items.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8B14A99EF0000B1711 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../prefs.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rom_patches.cpp; path = ../rom_patches.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rsrc_patches.cpp; path = ../rsrc_patches.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE8E14A99EF0000B1711 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = SOURCE_ROOT; }; + 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; + 0856CE9114A99EF0000B1711 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; + 0856CE9514A99EF0000B1711 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = SOURCE_ROOT; }; + 0856CEC014A99EF0000B1711 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = SOURCE_ROOT; }; + 0856CEC114A99EF0000B1711 /* thunks.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = thunks.cpp; path = ../thunks.cpp; sourceTree = SOURCE_ROOT; }; + 0856CEC214A99EF0000B1711 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = SOURCE_ROOT; }; + 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = about_window_unix.cpp; sourceTree = ""; }; + 0856CEE314A99EF0000B1711 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; + 0856CEFB14A99EF0000B1711 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; + 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_unix.cpp; sourceTree = ""; }; + 0856CF5B14A99EF0000B1711 /* rpc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rpc.h; sourceTree = ""; }; + 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rpc_unix.cpp; sourceTree = ""; }; + 0856CF5D14A99EF0000B1711 /* semaphore.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = semaphore.h; sourceTree = ""; }; + 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_unix.cpp; sourceTree = ""; }; + 0856CF6114A99EF0000B1711 /* sigregs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sigregs.h; sourceTree = ""; }; + 0856CF6414A99EF0000B1711 /* sshpty.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sshpty.c; sourceTree = ""; }; + 0856CF6514A99EF0000B1711 /* sshpty.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sshpty.h; sourceTree = ""; }; + 0856CF6614A99EF0000B1711 /* strlcpy.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = strlcpy.c; sourceTree = ""; }; + 0856CF6714A99EF0000B1711 /* strlcpy.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = strlcpy.h; sourceTree = ""; }; + 0856CF6814A99EF0000B1711 /* sys_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_unix.cpp; sourceTree = ""; }; + 0856CF6914A99EF0000B1711 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sysdeps.h; sourceTree = ""; }; + 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = timer_unix.cpp; sourceTree = ""; }; + 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; + 0856CF6D14A99EF0000B1711 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; + 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_unix.cpp; sourceTree = ""; }; + 0856CF7714A99EF0000B1711 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = SOURCE_ROOT; }; + 0856CF7814A99EF0000B1711 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = SOURCE_ROOT; }; + 0856CFC014A99EF0000B1711 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = SOURCE_ROOT; }; + 0856D21414A9A6C6000B1711 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = /System/Library/Frameworks/IOKit.framework; sourceTree = ""; }; + 0856D30814A9A704000B1711 /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMSettingsWindow.nib; sourceTree = ""; }; + 0856D31114A9A704000B1711 /* VMSettingsController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = VMSettingsController.h; sourceTree = ""; }; + 0856D31214A9A704000B1711 /* VMSettingsController.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = VMSettingsController.mm; sourceTree = ""; }; + 0873A53F14AAF18E004F12B7 /* cxxdemangle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cxxdemangle.cpp; sourceTree = ""; }; + 0873A54014AAF18E004F12B7 /* cxxdemangle.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cxxdemangle.h; sourceTree = ""; }; + 0873A54114AAF18E004F12B7 /* dyngen.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = dyngen.c; sourceTree = ""; }; + 0873A5D514AB80CA004F12B7 /* basic-dyngen-ops.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "basic-dyngen-ops.cpp"; sourceTree = ""; }; + 0873A5D714AB80E3004F12B7 /* ppc-dyngen-ops.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-dyngen-ops.cpp"; sourceTree = ""; }; + 0873A76614ABD151004F12B7 /* config-macosx-x86_64.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-x86_64.h"; sourceTree = ""; }; + 0873A76714ABD151004F12B7 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; + 0873A80014AC515D004F12B7 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; + 0873A80114AC515D004F12B7 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; + 0879BD5B15A88F6300DC277D /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; + 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-ppc_32.h"; sourceTree = ""; }; + 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-x86_32.h"; sourceTree = ""; }; + 0879BDAF15A8B1AA00DC277D /* Info.plist.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.xml; path = Info.plist.in; sourceTree = ""; }; + 087B91B71B780FFC00825F7F /* sigsegv.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sigsegv.cpp; path = ../CrossPlatform/sigsegv.cpp; sourceTree = SOURCE_ROOT; }; + 087B91B81B780FFC00825F7F /* sigsegv.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = sigsegv.h; path = ../CrossPlatform/sigsegv.h; sourceTree = SOURCE_ROOT; }; + 087B91B91B780FFC00825F7F /* video_blit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_blit.cpp; path = ../CrossPlatform/video_blit.cpp; sourceTree = SOURCE_ROOT; }; + 087B91BA1B780FFC00825F7F /* video_blit.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = video_blit.h; path = ../CrossPlatform/video_blit.h; sourceTree = SOURCE_ROOT; }; + 087B91BB1B780FFC00825F7F /* video_vosf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = video_vosf.h; path = ../CrossPlatform/video_vosf.h; sourceTree = SOURCE_ROOT; }; + 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = vm_alloc.cpp; path = ../CrossPlatform/vm_alloc.cpp; sourceTree = SOURCE_ROOT; }; + 087B91BD1B780FFC00825F7F /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = vm_alloc.h; path = ../CrossPlatform/vm_alloc.h; sourceTree = SOURCE_ROOT; }; + 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; + 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; + 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; + 5D3967BF2328D315003925D6 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../../../BasiliskII/src/adb.cpp; sourceTree = ""; }; + 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; + 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue_unix.cpp; path = ../../../BasiliskII/src/Unix/bincue_unix.cpp; sourceTree = ""; }; + 5D55CB442255B50E00FF8E81 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bincue_unix.h; path = ../../../BasiliskII/src/Unix/bincue_unix.h; sourceTree = ""; }; + 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = MacOSX_sound_if.h; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h; sourceTree = ""; }; + 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = MacOSX_sound_if.cpp; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp; sourceTree = ""; }; + 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; + 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioBackEnd.cpp; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp; sourceTree = ""; }; + 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; + 5DDE95042255C822004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; + 5DDE95062255C844004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; + 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioDevice.cpp; path = ../../../BasiliskII/src/MacOSX/AudioDevice.cpp; sourceTree = ""; }; + 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; + 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = audio_defs_macosx.h; path = ../../../BasiliskII/src/MacOSX/audio_defs_macosx.h; sourceTree = ""; }; + 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio_macosx.cpp; path = ../../../BasiliskII/src/MacOSX/audio_macosx.cpp; sourceTree = ""; }; + 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../../../BasiliskII/src/audio.cpp; sourceTree = ""; }; + A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; + A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; + E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; + E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; + E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; + E4202600241250E2000508DF /* etherhelpertool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; + E4202602241250EE000508DF /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; + E420260424125182000508DF /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; + E420260A2412540D000508DF /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; + E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; + E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; + E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + E44C45DC20D262AD000583AE /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../../BasiliskII/src/slirp/tftp.c; sourceTree = ""; }; + E44C45DD20D262AD000583AE /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../../BasiliskII/src/slirp/mbuf.c; sourceTree = ""; }; + E44C45DE20D262AD000583AE /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../../BasiliskII/src/slirp/tftp.h; sourceTree = ""; }; + E44C45DF20D262AD000583AE /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../../BasiliskII/src/slirp/ip_icmp.c; sourceTree = ""; }; + E44C45E020D262AE000583AE /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../../BasiliskII/src/slirp/bootp.h; sourceTree = ""; }; + E44C45E120D262AE000583AE /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../../BasiliskII/src/slirp/tcpip.h; sourceTree = ""; }; + E44C45E220D262AE000583AE /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = VERSION; path = ../../../BasiliskII/src/slirp/VERSION; sourceTree = ""; }; + E44C45E320D262AE000583AE /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../../BasiliskII/src/slirp/ip_icmp.h; sourceTree = ""; }; + E44C45E420D262AE000583AE /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../../BasiliskII/src/slirp/slirp_config.h; sourceTree = ""; }; + E44C45E520D262AE000583AE /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../../BasiliskII/src/slirp/tcp_input.c; sourceTree = ""; }; + E44C45E620D262AE000583AE /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../../BasiliskII/src/slirp/misc.c; sourceTree = ""; }; + E44C45E720D262AE000583AE /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = udp.h; path = ../../../BasiliskII/src/slirp/udp.h; sourceTree = ""; }; + E44C45E820D262AE000583AE /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = main.h; path = ../../../BasiliskII/src/slirp/main.h; sourceTree = ""; }; + E44C45E920D262AE000583AE /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../../BasiliskII/src/slirp/debug.c; sourceTree = ""; }; + E44C45EA20D262AE000583AE /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../../BasiliskII/src/slirp/tcp_subr.c; sourceTree = ""; }; + E44C45EB20D262AE000583AE /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../../BasiliskII/src/slirp/udp.c; sourceTree = ""; }; + E44C45EC20D262AE000583AE /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = mbuf.h; path = ../../../BasiliskII/src/slirp/mbuf.h; sourceTree = ""; }; + E44C45ED20D262AE000583AE /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../../BasiliskII/src/slirp/sbuf.c; sourceTree = ""; }; + E44C45EE20D262AE000583AE /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ctl.h; path = ../../../BasiliskII/src/slirp/ctl.h; sourceTree = ""; }; + E44C45EF20D262AE000583AE /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp.h; path = ../../../BasiliskII/src/slirp/slirp.h; sourceTree = ""; }; + E44C45F020D262AE000583AE /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = COPYRIGHT; path = ../../../BasiliskII/src/slirp/COPYRIGHT; sourceTree = ""; }; + E44C45F120D262AE000583AE /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../../BasiliskII/src/slirp/slirp.c; sourceTree = ""; }; + E44C45F220D262AE000583AE /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = socket.h; path = ../../../BasiliskII/src/slirp/socket.h; sourceTree = ""; }; + E44C45F320D262AF000583AE /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = if.h; path = ../../../BasiliskII/src/slirp/if.h; sourceTree = ""; }; + E44C45F420D262AF000583AE /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = misc.h; path = ../../../BasiliskII/src/slirp/misc.h; sourceTree = ""; }; + E44C45F520D262AF000583AE /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../../BasiliskII/src/slirp/tcp_timer.c; sourceTree = ""; }; + E44C45F620D262AF000583AE /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = sbuf.h; path = ../../../BasiliskII/src/slirp/sbuf.h; sourceTree = ""; }; + E44C45F720D262AF000583AE /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp.h; path = ../../../BasiliskII/src/slirp/tcp.h; sourceTree = ""; }; + E44C45F820D262AF000583AE /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip.h; path = ../../../BasiliskII/src/slirp/ip.h; sourceTree = ""; }; + E44C45F920D262AF000583AE /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = debug.h; path = ../../../BasiliskII/src/slirp/debug.h; sourceTree = ""; }; + E44C45FA20D262AF000583AE /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_timer.h; path = ../../../BasiliskII/src/slirp/tcp_timer.h; sourceTree = ""; }; + E44C45FB20D262AF000583AE /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_var.h; path = ../../../BasiliskII/src/slirp/tcp_var.h; sourceTree = ""; }; + E44C45FC20D262AF000583AE /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../../BasiliskII/src/slirp/socket.c; sourceTree = ""; }; + E44C45FD20D262AF000583AE /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = libslirp.h; path = ../../../BasiliskII/src/slirp/libslirp.h; sourceTree = ""; }; + E44C45FE20D262AF000583AE /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = icmp_var.h; path = ../../../BasiliskII/src/slirp/icmp_var.h; sourceTree = ""; }; + E44C45FF20D262AF000583AE /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../../BasiliskII/src/slirp/bootp.c; sourceTree = ""; }; + E44C460020D262AF000583AE /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../../BasiliskII/src/slirp/ip_input.c; sourceTree = ""; }; + E44C460120D262AF000583AE /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../../BasiliskII/src/slirp/ip_output.c; sourceTree = ""; }; + E44C460220D262AF000583AE /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../../BasiliskII/src/slirp/if.c; sourceTree = ""; }; + E44C460320D262AF000583AE /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../../BasiliskII/src/slirp/cksum.c; sourceTree = ""; }; + E44C460420D262AF000583AE /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../../BasiliskII/src/slirp/tcp_output.c; sourceTree = ""; }; + E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; + E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; + E4CBF46020CFC451009F40CC /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl.cpp; path = ../../../BasiliskII/src/SDL/video_sdl.cpp; sourceTree = ""; }; +/* End PBXFileReference section */ + +/* Begin PBXFrameworksBuildPhase section */ + 0846E49814B124DE00574779 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; + 0856CCBF14A99E1C000B1711 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */, + 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */, + 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */, + E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, + E420260524125182000508DF /* Security.framework in Frameworks */, + 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, + 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, + 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXFrameworksBuildPhase section */ + +/* Begin PBXGroup section */ + 08003F841E0624BD00A3ADAB /* dyngen_precompiled */ = { + isa = PBXGroup; + children = ( + 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */, + E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */, + 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */, + 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */, + E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */, + 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */, + 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */, + ); + name = dyngen_precompiled; + sourceTree = ""; + }; + 082AC25614AA59DA00071F5E /* Darwin */ = { + isa = PBXGroup; + children = ( + E4302EE21FBFE7FA00A5B500 /* lowmem.c */, + ); + name = Darwin; + sourceTree = ""; + }; + 0856CCAC14A99DE0000B1711 = { + isa = PBXGroup; + children = ( + E4150D1120D557820077C51A /* SDL2.framework */, + 0856CCC814A99E30000B1711 /* Sources */, + 08CD42DF14B7B865009CA2A2 /* Frameworks */, + 0856CCC214A99E1C000B1711 /* Products */, + E420260924125403000508DF /* Generated */, + ); + sourceTree = ""; + }; + 0856CCC214A99E1C000B1711 /* Products */ = { + isa = PBXGroup; + children = ( + 0856CCC114A99E1C000B1711 /* SheepShaver.app */, + 0846E49A14B124DE00574779 /* libkpx_cpu.a */, + ); + name = Products; + sourceTree = ""; + }; + 0856CCC814A99E30000B1711 /* Sources */ = { + isa = PBXGroup; + children = ( + 087B91B11B780EC900825F7F /* CrossPlatform */, + 5D3967BF2328D315003925D6 /* adb.cpp */, + 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, + 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, + 0856CD7D14A99EEF000B1711 /* disk.cpp */, + 0856CD7E14A99EEF000B1711 /* dummy */, + 0856CD8614A99EEF000B1711 /* emul_op.cpp */, + 0856CD8914A99EEF000B1711 /* ether.cpp */, + 0856CD8C14A99EEF000B1711 /* extfs.cpp */, + 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */, + 0856CD8E14A99EEF000B1711 /* include */, + 0856CDB114A99EEF000B1711 /* kpx_cpu */, + 0856CE0514A99EEF000B1711 /* macos_util.cpp */, + 0856CE0614A99EEF000B1711 /* MacOSX */, + 0856CE8814A99EF0000B1711 /* main.cpp */, + 0856CE8914A99EF0000B1711 /* name_registry.cpp */, + E444DC1420C8F06700DD29C9 /* pict.c */, + 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */, + 0856CE8B14A99EF0000B1711 /* prefs.cpp */, + 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */, + 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */, + 0856CE8E14A99EF0000B1711 /* scsi.cpp */, + 0856CE8F14A99EF0000B1711 /* SDL */, + 0856CE9514A99EF0000B1711 /* serial.cpp */, + 0856CE9614A99EF0000B1711 /* slirp */, + 0856CEC014A99EF0000B1711 /* sony.cpp */, + 0856CEC114A99EF0000B1711 /* thunks.cpp */, + 0856CEC214A99EF0000B1711 /* timer.cpp */, + 0856CEC314A99EF0000B1711 /* Unix */, + 0856CF7714A99EF0000B1711 /* user_strings.cpp */, + 0856CF7814A99EF0000B1711 /* video.cpp */, + 0856CFC014A99EF0000B1711 /* xpram.cpp */, + ); + name = Sources; + sourceTree = ""; + usesTabs = 1; + }; + 0856CD7E14A99EEF000B1711 /* dummy */ = { + isa = PBXGroup; + children = ( + 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */, + 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */, + ); + name = dummy; + path = ../dummy; + sourceTree = SOURCE_ROOT; + }; + 0856CD8E14A99EEF000B1711 /* include */ = { + isa = PBXGroup; + children = ( + 0856CD8F14A99EEF000B1711 /* about_window.h */, + 0856CD9014A99EEF000B1711 /* adb.h */, + 0856CD9114A99EEF000B1711 /* audio.h */, + 0856CD9214A99EEF000B1711 /* audio_defs.h */, + 0856CD9314A99EEF000B1711 /* cdrom.h */, + 0856CD9414A99EEF000B1711 /* clip.h */, + 0856CD9514A99EEF000B1711 /* cpu_emulation.h */, + 0856CD9614A99EEF000B1711 /* debug.h */, + 0856CD9714A99EEF000B1711 /* disk.h */, + 0856CD9814A99EEF000B1711 /* emul_op.h */, + 0856CD9914A99EEF000B1711 /* ether.h */, + 0856CD9A14A99EEF000B1711 /* ether_defs.h */, + 0856CD9B14A99EEF000B1711 /* extfs.h */, + 0856CD9C14A99EEF000B1711 /* extfs_defs.h */, + 0856CD9D14A99EEF000B1711 /* macos_util.h */, + 0856CD9E14A99EEF000B1711 /* main.h */, + 0856CD9F14A99EEF000B1711 /* name_registry.h */, + 0879BD5B15A88F6300DC277D /* pict.h */, + 0856CDA014A99EEF000B1711 /* prefs.h */, + 0856CDA114A99EEF000B1711 /* prefs_editor.h */, + 0856CDA214A99EEF000B1711 /* rom_patches.h */, + 0856CDA314A99EEF000B1711 /* rsrc_patches.h */, + 0856CDA414A99EEF000B1711 /* scsi.h */, + 0856CDA514A99EEF000B1711 /* serial.h */, + 0856CDA614A99EEF000B1711 /* serial_defs.h */, + 0856CDA714A99EEF000B1711 /* sony.h */, + 0856CDA814A99EEF000B1711 /* sys.h */, + 0856CDA914A99EEF000B1711 /* thunks.h */, + 0856CDAA14A99EEF000B1711 /* timer.h */, + 0856CDAB14A99EEF000B1711 /* user_strings.h */, + 0856CDAC14A99EEF000B1711 /* version.h */, + 0856CDAD14A99EEF000B1711 /* video.h */, + 0856CDAE14A99EEF000B1711 /* video_defs.h */, + 0856CDAF14A99EEF000B1711 /* xlowmem.h */, + 0856CDB014A99EEF000B1711 /* xpram.h */, + ); + name = include; + path = ../include; + sourceTree = SOURCE_ROOT; + }; + 0856CDB114A99EEF000B1711 /* kpx_cpu */ = { + isa = PBXGroup; + children = ( + 08163337158C121000C449F9 /* dis-asm.h */, + 08163338158C121000C449F9 /* ppc-dis.c */, + 0856CDB214A99EEF000B1711 /* include */, + 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */, + 0856CDBC14A99EEF000B1711 /* src */, + ); + name = kpx_cpu; + path = ../kpx_cpu; + sourceTree = SOURCE_ROOT; + }; + 0856CDB214A99EEF000B1711 /* include */ = { + isa = PBXGroup; + children = ( + 0856CDB314A99EEF000B1711 /* a.out-defs.h */, + 0856CDB414A99EEF000B1711 /* basic-blockinfo.hpp */, + 0856CDB514A99EEF000B1711 /* basic-cpu.hpp */, + 0856CDB614A99EEF000B1711 /* basic-plugin.hpp */, + 0856CDB714A99EEF000B1711 /* block-alloc.hpp */, + 0856CDB814A99EEF000B1711 /* elf-defs.h */, + 0856CDB914A99EEF000B1711 /* nvmemfun.hpp */, + 0856CDBA14A99EEF000B1711 /* task-plugin.hpp */, + ); + path = include; + sourceTree = ""; + }; + 0856CDBC14A99EEF000B1711 /* src */ = { + isa = PBXGroup; + children = ( + 0856CDBD14A99EEF000B1711 /* cpu */, + 0856CDF314A99EEF000B1711 /* mathlib */, + 0856CE0114A99EEF000B1711 /* utils */, + ); + path = src; + sourceTree = ""; + }; + 0856CDBD14A99EEF000B1711 /* cpu */ = { + isa = PBXGroup; + children = ( + 0856CDBE14A99EEF000B1711 /* block-cache.hpp */, + 0856CDBF14A99EEF000B1711 /* jit */, + 0856CDDD14A99EEF000B1711 /* ppc */, + 0856CDF114A99EEF000B1711 /* spcflags.hpp */, + 0856CDF214A99EEF000B1711 /* vm.hpp */, + ); + path = cpu; + sourceTree = ""; + }; + 0856CDBF14A99EEF000B1711 /* jit */ = { + isa = PBXGroup; + children = ( + 0856CDC014A99EEF000B1711 /* amd64 */, + 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */, + 0856CDC614A99EEF000B1711 /* basic-dyngen.hpp */, + 0873A5D514AB80CA004F12B7 /* basic-dyngen-ops.cpp */, + 0856CDC914A99EEF000B1711 /* dummy */, + 0873A54114AAF18E004F12B7 /* dyngen.c */, + 0856CDCB14A99EEF000B1711 /* dyngen-exec.h */, + 0873A53F14AAF18E004F12B7 /* cxxdemangle.cpp */, + 0873A54014AAF18E004F12B7 /* cxxdemangle.h */, + 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */, + 0856CDCE14A99EEF000B1711 /* jit-cache.hpp */, + 0856CDCF14A99EEF000B1711 /* jit-codegen.hpp */, + 0856CDD014A99EEF000B1711 /* jit-config.hpp */, + 0856CDD114A99EEF000B1711 /* jit-target-dispatch.h */, + 0856CDD214A99EEF000B1711 /* mips */, + 0856CDD514A99EEF000B1711 /* ppc */, + 0856CDD814A99EEF000B1711 /* x86 */, + ); + path = jit; + sourceTree = ""; + }; + 0856CDC014A99EEF000B1711 /* amd64 */ = { + isa = PBXGroup; + children = ( + 0856CDC114A99EEF000B1711 /* dyngen-target-exec.h */, + 0856CDC214A99EEF000B1711 /* jit-target-cache.hpp */, + 0856CDC314A99EEF000B1711 /* jit-target-codegen.hpp */, + ); + path = amd64; + sourceTree = ""; + }; + 0856CDC914A99EEF000B1711 /* dummy */ = { + isa = PBXGroup; + children = ( + 0856CDCA14A99EEF000B1711 /* jit-target-cache.hpp */, + ); + path = dummy; + sourceTree = ""; + }; + 0856CDD214A99EEF000B1711 /* mips */ = { + isa = PBXGroup; + children = ( + 0856CDD314A99EEF000B1711 /* dyngen-target-exec.h */, + 0856CDD414A99EEF000B1711 /* jit-target-cache.hpp */, + ); + path = mips; + sourceTree = ""; + }; + 0856CDD514A99EEF000B1711 /* ppc */ = { + isa = PBXGroup; + children = ( + 0856CDD614A99EEF000B1711 /* dyngen-target-exec.h */, + 0856CDD714A99EEF000B1711 /* jit-target-cache.hpp */, + ); + path = ppc; + sourceTree = ""; + }; + 0856CDD814A99EEF000B1711 /* x86 */ = { + isa = PBXGroup; + children = ( + 0856CDD914A99EEF000B1711 /* codegen_x86.h */, + 0856CDDA14A99EEF000B1711 /* dyngen-target-exec.h */, + 0856CDDB14A99EEF000B1711 /* jit-target-cache.hpp */, + 0856CDDC14A99EEF000B1711 /* jit-target-codegen.hpp */, + ); + path = x86; + sourceTree = ""; + }; + 0856CDDD14A99EEF000B1711 /* ppc */ = { + isa = PBXGroup; + children = ( + 0856CDDE14A99EEF000B1711 /* genexec.pl */, + 0856CDDF14A99EEF000B1711 /* ppc-bitfields.hpp */, + 0856CDE014A99EEF000B1711 /* ppc-blockinfo.hpp */, + 0856CDE114A99EEF000B1711 /* ppc-config.hpp */, + 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */, + 0856CDE314A99EEF000B1711 /* ppc-cpu.hpp */, + 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */, + 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */, + 0856CDE714A99EEF000B1711 /* ppc-dyngen.hpp */, + 0873A5D714AB80E3004F12B7 /* ppc-dyngen-ops.cpp */, + 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */, + 0856CDE914A99EEF000B1711 /* ppc-execute.hpp */, + 0856CDEA14A99EEF000B1711 /* ppc-instructions.hpp */, + 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */, + 0856CDEC14A99EEF000B1711 /* ppc-jit.hpp */, + 0856CDED14A99EEF000B1711 /* ppc-operands.hpp */, + 0856CDEE14A99EEF000B1711 /* ppc-operations.hpp */, + 0856CDEF14A99EEF000B1711 /* ppc-registers.hpp */, + 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */, + ); + path = ppc; + sourceTree = ""; + }; + 0856CDF314A99EEF000B1711 /* mathlib */ = { + isa = PBXGroup; + children = ( + 0856CDF714A99EEF000B1711 /* ieeefp.cpp */, + 0856CDF814A99EEF000B1711 /* ieeefp.hpp */, + 0856CDFD14A99EEF000B1711 /* mathlib.cpp */, + 0856CDFE14A99EEF000B1711 /* mathlib.hpp */, + ); + path = mathlib; + sourceTree = ""; + }; + 0856CE0114A99EEF000B1711 /* utils */ = { + isa = PBXGroup; + children = ( + 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */, + 0856CE0314A99EEF000B1711 /* utils-cpuinfo.hpp */, + 0856CE0414A99EEF000B1711 /* utils-sentinel.hpp */, + ); + path = utils; + sourceTree = ""; + }; + 0856CE0614A99EEF000B1711 /* MacOSX */ = { + isa = PBXGroup; + children = ( + E4202600241250E2000508DF /* etherhelpertool.c */, + E4202602241250EE000508DF /* runtool.c */, + 0873A76514ABD151004F12B7 /* config */, + 0856D2D614A9A704000B1711 /* Launcher */, + 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */, + 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */, + 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */, + 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */, + 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */, + 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */, + E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */, + 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */, + 0879BDAF15A8B1AA00DC277D /* Info.plist.in */, + 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */, + 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */, + 0856CE8314A99EF0000B1711 /* SheepShaver.icns */, + 3D2C25B4221092BA00B635DE /* SheepVM.icns */, + 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */, + 0873A80014AC515D004F12B7 /* utils_macosx.h */, + 0873A80114AC515D004F12B7 /* utils_macosx.mm */, + 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */, + 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */, + ); + name = MacOSX; + sourceTree = ""; + }; + 0856CE8F14A99EF0000B1711 /* SDL */ = { + isa = PBXGroup; + children = ( + 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */, + 0856CE9114A99EF0000B1711 /* keycodes */, + E41936C220CFE64D003A7654 /* SDLMain.h */, + E41936C320CFE64D003A7654 /* SDLMain.m */, + E4CBF46020CFC451009F40CC /* video_sdl.cpp */, + E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */, + ); + name = SDL; + path = ../SDL; + sourceTree = SOURCE_ROOT; + }; + 0856CE9614A99EF0000B1711 /* slirp */ = { + isa = PBXGroup; + children = ( + E44C45FF20D262AF000583AE /* bootp.c */, + E44C45E020D262AE000583AE /* bootp.h */, + E44C460320D262AF000583AE /* cksum.c */, + E44C45F020D262AE000583AE /* COPYRIGHT */, + E44C45EE20D262AE000583AE /* ctl.h */, + E44C45E920D262AE000583AE /* debug.c */, + E44C45F920D262AF000583AE /* debug.h */, + E44C45FE20D262AF000583AE /* icmp_var.h */, + E44C460220D262AF000583AE /* if.c */, + E44C45F320D262AF000583AE /* if.h */, + E44C45DF20D262AD000583AE /* ip_icmp.c */, + E44C45E320D262AE000583AE /* ip_icmp.h */, + E44C460020D262AF000583AE /* ip_input.c */, + E44C460120D262AF000583AE /* ip_output.c */, + E44C45F820D262AF000583AE /* ip.h */, + E44C45FD20D262AF000583AE /* libslirp.h */, + E44C45E820D262AE000583AE /* main.h */, + E44C45DD20D262AD000583AE /* mbuf.c */, + E44C45EC20D262AE000583AE /* mbuf.h */, + E44C45E620D262AE000583AE /* misc.c */, + E44C45F420D262AF000583AE /* misc.h */, + E44C45ED20D262AE000583AE /* sbuf.c */, + E44C45F620D262AF000583AE /* sbuf.h */, + E44C45E420D262AE000583AE /* slirp_config.h */, + E44C45F120D262AE000583AE /* slirp.c */, + E44C45EF20D262AE000583AE /* slirp.h */, + E44C45FC20D262AF000583AE /* socket.c */, + E44C45F220D262AE000583AE /* socket.h */, + E44C45E520D262AE000583AE /* tcp_input.c */, + E44C460420D262AF000583AE /* tcp_output.c */, + E44C45EA20D262AE000583AE /* tcp_subr.c */, + E44C45F520D262AF000583AE /* tcp_timer.c */, + E44C45FA20D262AF000583AE /* tcp_timer.h */, + E44C45FB20D262AF000583AE /* tcp_var.h */, + E44C45F720D262AF000583AE /* tcp.h */, + E44C45E120D262AE000583AE /* tcpip.h */, + E44C45DC20D262AD000583AE /* tftp.c */, + E44C45DE20D262AD000583AE /* tftp.h */, + E44C45EB20D262AE000583AE /* udp.c */, + E44C45E720D262AE000583AE /* udp.h */, + E44C45E220D262AE000583AE /* VERSION */, + ); + name = slirp; + path = ../slirp; + sourceTree = SOURCE_ROOT; + }; + 0856CEC314A99EF0000B1711 /* Unix */ = { + isa = PBXGroup; + children = ( + 08003F841E0624BD00A3ADAB /* dyngen_precompiled */, + 082AC25614AA59DA00071F5E /* Darwin */, + 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */, + 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */, + 5D55CB442255B50E00FF8E81 /* bincue_unix.h */, + 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */, + 083E370B16EFE85000CCCA59 /* disk_unix.h */, + 0856CEE314A99EF0000B1711 /* ether_unix.cpp */, + 0856CEFB14A99EF0000B1711 /* main_unix.cpp */, + 0846E55214B12B0D00574779 /* paranoia.cpp */, + 0846E52314B129DA00574779 /* ppc_asm.S */, + 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */, + 0856CF5B14A99EF0000B1711 /* rpc.h */, + 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */, + 0856CF5D14A99EF0000B1711 /* semaphore.h */, + 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */, + 0856CF6114A99EF0000B1711 /* sigregs.h */, + 0856CF6414A99EF0000B1711 /* sshpty.c */, + 0856CF6514A99EF0000B1711 /* sshpty.h */, + 0856CF6614A99EF0000B1711 /* strlcpy.c */, + 0856CF6714A99EF0000B1711 /* strlcpy.h */, + 0856CF6814A99EF0000B1711 /* sys_unix.cpp */, + 0856CF6914A99EF0000B1711 /* sysdeps.h */, + 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */, + 083E372016EFE87200CCCA59 /* tinyxml2.cpp */, + 083E372116EFE87200CCCA59 /* tinyxml2.h */, + 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */, + 0856CF6D14A99EF0000B1711 /* user_strings_unix.h */, + 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */, + ); + name = Unix; + path = ../Unix; + sourceTree = SOURCE_ROOT; + }; + 0856D2D614A9A704000B1711 /* Launcher */ = { + isa = PBXGroup; + children = ( + A7B1921218C35D4700791D8D /* DiskType.h */, + A7B1921318C35D4700791D8D /* DiskType.m */, + 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */, + 0856D31114A9A704000B1711 /* VMSettingsController.h */, + 0856D31214A9A704000B1711 /* VMSettingsController.mm */, + ); + path = Launcher; + sourceTree = ""; + }; + 0873A76514ABD151004F12B7 /* config */ = { + isa = PBXGroup; + children = ( + 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */, + 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */, + 0873A76614ABD151004F12B7 /* config-macosx-x86_64.h */, + 0873A76714ABD151004F12B7 /* config.h */, + ); + path = config; + sourceTree = ""; + }; + 087B91B11B780EC900825F7F /* CrossPlatform */ = { + isa = PBXGroup; + children = ( + 087B91B71B780FFC00825F7F /* sigsegv.cpp */, + 087B91B81B780FFC00825F7F /* sigsegv.h */, + 087B91B91B780FFC00825F7F /* video_blit.cpp */, + 087B91BA1B780FFC00825F7F /* video_blit.h */, + 087B91BB1B780FFC00825F7F /* video_vosf.h */, + 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */, + 087B91BD1B780FFC00825F7F /* vm_alloc.h */, + ); + name = CrossPlatform; + sourceTree = ""; + }; + 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { + isa = PBXGroup; + children = ( +<<<<<<< HEAD + 5DDE95062255C844004D0E79 /* AudioUnit.framework */, + 5DDE95042255C822004D0E79 /* CoreAudio.framework */, + 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */, +======= + E420260424125182000508DF /* Security.framework */, +>>>>>>> master + E420910020D0C4FA0094654F /* SDL2.framework */, + 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, + 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, + 0856D21414A9A6C6000B1711 /* IOKit.framework */, + ); + name = Frameworks; + sourceTree = ""; + }; + E420260924125403000508DF /* Generated */ = { + isa = PBXGroup; + children = ( + E420260A2412540D000508DF /* etherhelpertool */, + ); + name = Generated; + sourceTree = ""; + }; +/* End PBXGroup section */ + +/* Begin PBXHeadersBuildPhase section */ + 0846E49614B124DE00574779 /* Headers */ = { + isa = PBXHeadersBuildPhase; + buildActionMask = 2147483647; + files = ( + 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */, + 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */, + 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, + E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, + E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, + 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */, + 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */, + 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */, + 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */, + 08163339158C121000C449F9 /* dis-asm.h in Headers */, + 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, + 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXHeadersBuildPhase section */ + +/* Begin PBXNativeTarget section */ + 0846E49914B124DE00574779 /* kpx_cpu */ = { + isa = PBXNativeTarget; + buildConfigurationList = 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */; + buildPhases = ( + 0846E49614B124DE00574779 /* Headers */, + 0846E49714B124DE00574779 /* Sources */, + 0846E49814B124DE00574779 /* Frameworks */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = kpx_cpu; + productName = kpx_cpu; + productReference = 0846E49A14B124DE00574779 /* libkpx_cpu.a */; + productType = "com.apple.product-type.library.static"; + }; + 0856CCC014A99E1C000B1711 /* SheepShaver */ = { + isa = PBXNativeTarget; + buildConfigurationList = 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */; + buildPhases = ( + E4202606241251C6000508DF /* ShellScript */, + 0856CCBD14A99E1C000B1711 /* Resources */, + 0856CCBE14A99E1C000B1711 /* Sources */, + 0856CCBF14A99E1C000B1711 /* Frameworks */, + 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */, + E413A40820CF7EF800FBE967 /* Embed Frameworks */, + ); + buildRules = ( + ); + dependencies = ( + 0846E4A714B1253500574779 /* PBXTargetDependency */, + ); + name = SheepShaver; + productName = SheepShaver; + productReference = 0856CCC114A99E1C000B1711 /* SheepShaver.app */; + productType = "com.apple.product-type.application"; + }; +/* End PBXNativeTarget section */ + +/* Begin PBXProject section */ + 0856CCAE14A99DE0000B1711 /* Project object */ = { + isa = PBXProject; + attributes = { + LastUpgradeCheck = 0820; + }; + buildConfigurationList = 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver_Xcode8" */; + compatibilityVersion = "Xcode 3.0"; + developmentRegion = English; + hasScannedForEncodings = 0; + knownRegions = ( + English, + Japanese, + French, + German, + ); + mainGroup = 0856CCAC14A99DE0000B1711; + productRefGroup = 0856CCC214A99E1C000B1711 /* Products */; + projectDirPath = ""; + projectRoot = ""; + targets = ( + 0856CCC014A99E1C000B1711 /* SheepShaver */, + 0846E49914B124DE00574779 /* kpx_cpu */, + ); + }; +/* End PBXProject section */ + +/* Begin PBXResourcesBuildPhase section */ + 0856CCBD14A99E1C000B1711 /* Resources */ = { + isa = PBXResourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E420260B24125442000508DF /* etherhelpertool in Resources */, + E44C460820D262B0000583AE /* VERSION in Resources */, + 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, + E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, + 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */, + 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXResourcesBuildPhase section */ + +/* Begin PBXShellScriptBuildPhase section */ + 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputPaths = ( + ); + name = "Preprocess Info.plist"; + outputPaths = ( + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\"\n"; + }; + E4202606241251C6000508DF /* ShellScript */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputFileListPaths = ( + ); + inputPaths = ( + ); + outputFileListPaths = ( + ); + outputPaths = ( + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "cc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; + }; +/* End PBXShellScriptBuildPhase section */ + +/* Begin PBXSourcesBuildPhase section */ + 0846E49714B124DE00574779 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, + 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, + 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */, + 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, + 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, + 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, + 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, + 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, + 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, + 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */, + 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, + 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, + 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, + 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, + 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, + 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, + 08163340158C125800C449F9 /* ppc-dis.c in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; + 0856CCBE14A99E1C000B1711 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E44C460B20D262B0000583AE /* debug.c in Sources */, + 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, + E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, + E44C461520D262B0000583AE /* ip_output.c in Sources */, + E44C461820D262B0000583AE /* tcp_output.c in Sources */, + 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, + 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, + E44C460E20D262B0000583AE /* sbuf.c in Sources */, + 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, + 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, + 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */, + 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, + 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */, + 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, + 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, + 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, + E44C461620D262B0000583AE /* if.c in Sources */, + 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, + E44C460520D262B0000583AE /* tftp.c in Sources */, + 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, + E44C460A20D262B0000583AE /* misc.c in Sources */, + E44C461120D262B0000583AE /* tcp_timer.c in Sources */, + 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, + E444DC1520C8F06700DD29C9 /* pict.c in Sources */, + 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, + E44C460D20D262B0000583AE /* udp.c in Sources */, + E44C461420D262B0000583AE /* ip_input.c in Sources */, + E44C461320D262B0000583AE /* bootp.c in Sources */, + 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, + 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */, + 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, + 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, + 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, + 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, + 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, + E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, +<<<<<<< HEAD + 5D3967C02328D315003925D6 /* adb.cpp in Sources */, +======= + E4202603241250EE000508DF /* runtool.c in Sources */, +>>>>>>> master + 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, + 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, + 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, + 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, + 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, + E44C460720D262B0000583AE /* ip_icmp.c in Sources */, + E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */, + 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */, + 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, + 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, + E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */, + 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */, + 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */, + 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */, + 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */, + 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */, + 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, + E44C461720D262B0000583AE /* cksum.c in Sources */, + 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, + 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, + E44C461020D262B0000583AE /* slirp.c in Sources */, + 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, + 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */, + 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, + E44C460920D262B0000583AE /* tcp_input.c in Sources */, + 0856D11814A99EF1000B1711 /* video.cpp in Sources */, + 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */, + E41936C420CFE64D003A7654 /* SDLMain.m in Sources */, + E44C461220D262B0000583AE /* socket.c in Sources */, + 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, + 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */, + E44C460620D262B0000583AE /* mbuf.c in Sources */, + 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */, + 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */, + 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */, + 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */, + A7B1921418C35D4700791D8D /* DiskType.m in Sources */, + 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */, + 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */, + 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXSourcesBuildPhase section */ + +/* Begin PBXTargetDependency section */ + 0846E4A714B1253500574779 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + target = 0846E49914B124DE00574779 /* kpx_cpu */; + targetProxy = 0846E4A614B1253500574779 /* PBXContainerItemProxy */; + }; +/* End PBXTargetDependency section */ + +/* Begin PBXVariantGroup section */ + 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */ = { + isa = PBXVariantGroup; + children = ( + 0856D30814A9A704000B1711 /* English */, + ); + name = VMSettingsWindow.nib; + sourceTree = ""; + }; +/* End PBXVariantGroup section */ + +/* Begin XCBuildConfiguration section */ + 0846E49B14B124DF00574779 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULE_DEBUGGING = YES; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + GCC_DYNAMIC_NO_PIC = NO; + GCC_ENABLE_FIX_AND_CONTINUE = YES; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "DATADIR=", + HAVE_CONFIG_H, + USE_JIT, + "_GNU_SOURCE=1", + _THREAD_SAFE, + _REENTRANT, + "USE_SDL_AUDIO=1", + "BINCUE=1", + ); + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers/, + ./config/, + ../Unix, + ../MacOSX/Launcher, + ../slirp, + ../kpx_cpu/src, + ../kpx_cpu/include, + ../include, + ../Unix/dyngen_precompiled, + ); + INSTALL_PATH = /usr/local/lib; + MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CPLUSPLUSFLAGS = ( + "$(OTHER_CFLAGS)", + "-DDEBUG", + "-g", + ); + PRODUCT_NAME = kpx_cpu; + VALID_ARCHS = x86_64; + }; + name = Debug; + }; + 0846E49C14B124DF00574779 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULE_DEBUGGING = YES; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + GCC_DYNAMIC_NO_PIC = YES; + GCC_ENABLE_FIX_AND_CONTINUE = NO; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "DATADIR=", + HAVE_CONFIG_H, + USE_JIT, + "_GNU_SOURCE=1", + _THREAD_SAFE, + _REENTRANT, + "USE_SDL_AUDIO=1", + "BINCUE=1", + ); + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers/, + ./config/, + ../Unix, + ../MacOSX/Launcher, + ../slirp, + ../kpx_cpu/src, + ../kpx_cpu/include, + ../include, + ../Unix/dyngen_precompiled, + ); + INSTALL_PATH = /usr/local/lib; + MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CPLUSPLUSFLAGS = ( + "$(OTHER_CFLAGS)", + "-DDEBUG", + "-g", + ); + PRODUCT_NAME = kpx_cpu; + VALID_ARCHS = x86_64; + }; + name = Release; + }; + 0856CCAF14A99DE0000B1711 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + COPY_PHASE_STRIP = NO; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_PARAMETER = NO; + GCC_WARN_UNUSED_VARIABLE = YES; + }; + name = Debug; + }; + 0856CCB014A99DE0000B1711 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + COPY_PHASE_STRIP = YES; + GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + GCC_WARN_UNINITIALIZED_AUTOS = YES; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_PARAMETER = NO; + GCC_WARN_UNUSED_VARIABLE = YES; + }; + name = Release; + }; + 0856CCC514A99E1C000B1711 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; + CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; + COPY_PHASE_STRIP = NO; + FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; + GCC_CW_ASM_SYNTAX = NO; + GCC_DYNAMIC_NO_PIC = NO; + GCC_ENABLE_FIX_AND_CONTINUE = NO; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_ENABLE_TRIGRAPHS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PRECOMPILE_PREFIX_HEADER = NO; + GCC_PREFIX_HEADER = ""; + GCC_PREPROCESSOR_DEFINITIONS = ( + ENABLE_MACOSX_ETHERHELPER, + "DATADIR=", + HAVE_CONFIG_H, + USE_JIT, + "_GNU_SOURCE=1", + _THREAD_SAFE, + _REENTRANT, + "BINCUE=1", + "USE_SDL_AUDIO=1", + ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers, + ./config/, + ../Unix, + ../MacOSX/Launcher, + ../slirp, + ../kpx_cpu/src, + ../kpx_cpu/include, + ../include, + ../CrossPlatform, + ); + INFOPLIST_FILE = Info.plist.in; + INFOPLIST_PREFIX_HEADER = ""; + INFOPLIST_PREPROCESS = NO; + INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CFLAGS = ""; + OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x3000, + "-lkpx_cpu", + ); + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; + PRODUCT_NAME = SheepShaver; + VALID_ARCHS = x86_64; + WARNING_LDFLAGS = ""; + }; + name = Debug; + }; + 0856CCC614A99E1C000B1711 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + ARCHS = "$(ARCHS_STANDARD_64_BIT)"; + CLANG_CXX_LIBRARY = "libc++"; + CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; + COPY_PHASE_STRIP = NO; + DEAD_CODE_STRIPPING = NO; + FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; + GCC_CW_ASM_SYNTAX = NO; + GCC_DYNAMIC_NO_PIC = YES; + GCC_ENABLE_FIX_AND_CONTINUE = NO; + GCC_ENABLE_PASCAL_STRINGS = NO; + GCC_ENABLE_TRIGRAPHS = NO; + GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_OPTIMIZATION_LEVEL = 3; + GCC_PRECOMPILE_PREFIX_HEADER = NO; + GCC_PREFIX_HEADER = ""; + GCC_PREPROCESSOR_DEFINITIONS = ( + ENABLE_MACOSX_ETHERHELPER, + "DATADIR=", + HAVE_CONFIG_H, + USE_JIT, + "_GNU_SOURCE=1", + _THREAD_SAFE, + _REENTRANT, + "BINCUE=1", + "USE_SDL_AUDIO=1", + ); + GCC_SYMBOLS_PRIVATE_EXTERN = NO; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + HEADER_SEARCH_PATHS = ( + /Library/Frameworks/SDL2.framework/Headers, + ./config/, + ../Unix, + ../MacOSX/Launcher, + ../slirp, + ../kpx_cpu/src, + ../kpx_cpu/include, + ../include, + ../CrossPlatform, + ); + INFOPLIST_EXPAND_BUILD_SETTINGS = NO; + INFOPLIST_FILE = Info.plist.in; + INFOPLIST_PREFIX_HEADER = ""; + INFOPLIST_PREPROCESS = NO; + INSTALL_PATH = "$(HOME)/Applications"; + LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + MACOSX_DEPLOYMENT_TARGET = 10.7; + OTHER_CFLAGS = ""; + OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x3000, + "-lkpx_cpu", + ); + PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; + PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; + PRODUCT_NAME = SheepShaver; + VALID_ARCHS = x86_64; + }; + name = Release; + }; +/* End XCBuildConfiguration section */ + +/* Begin XCConfigurationList section */ + 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 0846E49B14B124DF00574779 /* Debug */, + 0846E49C14B124DF00574779 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver_Xcode8" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 0856CCAF14A99DE0000B1711 /* Debug */, + 0856CCB014A99DE0000B1711 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + 0856CCC514A99E1C000B1711 /* Debug */, + 0856CCC614A99E1C000B1711 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; +/* End XCConfigurationList section */ + }; + rootObject = 0856CCAE14A99DE0000B1711 /* Project object */; +} From 23da9e72ebef35f3cf67b0a443cad09ad0ee28ff Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 25 May 2020 18:55:56 -0500 Subject: [PATCH 364/534] Fix handling of nocdrom --- BasiliskII/src/cdrom.cpp | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 809be596b..896383229 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -295,16 +295,18 @@ static bool position2msf(const cdrom_drive_info &info, uint16 postype, uint32 po void CDROMInit(void) { // No drives specified in prefs? Then add defaults - if (PrefsFindString("cdrom", 0) == NULL) + if (PrefsFindString("cdrom", 0) == NULL) { SysAddCDROMPrefs(); - - // Add drives specified in preferences - int index = 0; - const char *str; - while ((str = PrefsFindString("cdrom", index++)) != NULL) { - void *fh = Sys_open(str, true); - if (fh) - drives.push_back(cdrom_drive_info(fh)); + } + else { + // Add drives specified in preferences + int index = 0; + const char *str; + while ((str = PrefsFindString("cdrom", index++)) != NULL) { + void *fh = Sys_open(str, true); + if (fh) + drives.push_back(cdrom_drive_info(fh)); + } } if (!drives.empty()) { // set to first drive by default From 9895200f791cc10018568ddd9444581916a36749 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 2 Jun 2020 22:49:03 +0900 Subject: [PATCH 365/534] fixed video contstants --- SheepShaver/src/include/video_defs.h | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/include/video_defs.h b/SheepShaver/src/include/video_defs.h index ef9e2824c..039684364 100644 --- a/SheepShaver/src/include/video_defs.h +++ b/SheepShaver/src/include/video_defs.h @@ -164,9 +164,9 @@ enum { enum { kDisplayModeIDCurrent = 0x00, /* Reference the Current DisplayModeID */ - kDisplayModeIDInvalid = (long)0xFFFFFFFF, /* A bogus DisplayModeID in all cases */ - kDisplayModeIDFindFirstResolution = (long)0xFFFFFFFE, /* Used in cscGetNextResolution to reset iterator */ - kDisplayModeIDNoMoreResolutions = (long)0xFFFFFFFD /* Used in cscGetNextResolution to indicate End Of List */ + kDisplayModeIDInvalid = 0xFFFFFFFF, /* A bogus DisplayModeID in all cases */ + kDisplayModeIDFindFirstResolution = 0xFFFFFFFE, /* Used in cscGetNextResolution to reset iterator */ + kDisplayModeIDNoMoreResolutions = 0xFFFFFFFD /* Used in cscGetNextResolution to indicate End Of List */ }; /* codes for Display Manager status requests */ From 607f4ed354d6017132d0c1e8e4a4617b86c2aebf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 3 Jun 2020 19:10:08 +0900 Subject: [PATCH 366/534] avoid compile error in g++10 --- SheepShaver/src/video.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index d0eda93db..60ef8c135 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -736,7 +736,7 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) case cscGetNextResolution: { D(bug("GetNextResolution \n")); - int work_id = ReadMacInt32(param + csPreviousDisplayModeID); + unsigned int work_id = ReadMacInt32(param + csPreviousDisplayModeID); switch (work_id) { case kDisplayModeIDCurrent: work_id = csSave->saveData; From 66a69dc79ba6a661c6235918fd9dce972f972d91 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 5 Jul 2020 23:54:53 -0500 Subject: [PATCH 367/534] Refactoring to handle crossplatform bincue support --- .../BasiliskII.xcodeproj/project.pbxproj | 23 ++++++++++++++----- BasiliskII/src/SDL/audio_sdl.cpp | 2 +- BasiliskII/src/Unix/sys_unix.cpp | 2 +- .../src/{Unix/bincue_unix.cpp => bincue.cpp} | 2 +- .../{Unix/bincue_unix.h => include/bincue.h} | 2 +- .../project.pbxproj | 16 ++++++------- SheepShaver/src/Unix/bincue_unix.cpp | 1 - SheepShaver/src/Unix/bincue_unix.h | 1 - SheepShaver/src/bincue.cpp | 1 + SheepShaver/src/include/bincue.h | 1 + 10 files changed, 31 insertions(+), 20 deletions(-) rename BasiliskII/src/{Unix/bincue_unix.cpp => bincue.cpp} (99%) rename BasiliskII/src/{Unix/bincue_unix.h => include/bincue.h} (95%) delete mode 120000 SheepShaver/src/Unix/bincue_unix.cpp delete mode 120000 SheepShaver/src/Unix/bincue_unix.h create mode 120000 SheepShaver/src/bincue.cpp create mode 120000 SheepShaver/src/include/bincue.h diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 3dbae0ebe..8ba0c506d 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -7,6 +7,7 @@ objects = { /* Begin PBXBuildFile section */ + 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D5C3B0924B2DF3400CDAB41 /* bincue.cpp */; }; 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95132255D076004D0E79 /* AudioDevice.cpp */; }; 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95152255D076004D0E79 /* audio_macosx.cpp */; }; 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */; }; @@ -56,7 +57,6 @@ 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; - 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */; }; 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */; }; 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22A1F23B32A006B2DF2 /* sshpty.c */; }; @@ -122,6 +122,8 @@ /* End PBXCopyFilesBuildPhase section */ /* Begin PBXFileReference section */ + 5D5C3B0924B2DF3400CDAB41 /* bincue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue.cpp; path = ../bincue.cpp; sourceTree = ""; }; + 5D5C3B0B24B2DF4200CDAB41 /* bincue.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = bincue.h; sourceTree = ""; }; 5DDE95122255D075004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioBackEnd.h; sourceTree = ""; }; 5DDE95132255D076004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioDevice.cpp; sourceTree = ""; }; 5DDE95142255D076004D0E79 /* AudioDevice.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioDevice.h; sourceTree = ""; }; @@ -243,8 +245,6 @@ 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; - 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; - 7539E1F11F23B329006B2DF2 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-osx.patch"; sourceTree = ""; }; 7539E1FA1F23B32A006B2DF2 /* mkstandalone */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkstandalone; sourceTree = ""; }; 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = testlmem.sh; sourceTree = ""; }; @@ -417,6 +417,16 @@ path = ../slirp; sourceTree = ""; }; + 5D5C3B0824B2DEDF00CDAB41 /* Recovered References */ = { + isa = PBXGroup; + children = ( + 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */, + 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */, + 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */, + ); + name = "Recovered References"; + sourceTree = ""; + }; 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( @@ -459,6 +469,7 @@ 753252FF1F535E5D0024025B /* generated src */, 7539DFB31F23B17E006B2DF2 /* Products */, 752F26F71F240E51001032B4 /* Frameworks */, + 5D5C3B0824B2DEDF00CDAB41 /* Recovered References */, ); sourceTree = ""; }; @@ -492,6 +503,7 @@ 7539DFD91F23B25A006B2DF2 /* adb.h */, 7539DFDA1F23B25A006B2DF2 /* audio.h */, 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */, + 5D5C3B0B24B2DF4200CDAB41 /* bincue.h */, 7539DFDC1F23B25A006B2DF2 /* cdrom.h */, 7539DFDD1F23B25A006B2DF2 /* clip.h */, 7539DFDE1F23B25A006B2DF2 /* debug.h */, @@ -634,6 +646,7 @@ children = ( 7539DFC91F23B25A006B2DF2 /* adb.cpp */, 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, + 5D5C3B0924B2DF3400CDAB41 /* bincue.cpp */, 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */, 7539DFD41F23B25A006B2DF2 /* disk.cpp */, @@ -669,8 +682,6 @@ 7539E1E91F23B329006B2DF2 /* Unix */ = { isa = PBXGroup; children = ( - 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */, - 7539E1F11F23B329006B2DF2 /* bincue_unix.h */, 7539E1F71F23B329006B2DF2 /* Darwin */, 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */, 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */, @@ -866,6 +877,7 @@ 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, + 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, @@ -928,7 +940,6 @@ 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, E413D92F20D260BC00E437D8 /* bootp.c in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, - 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, ); runOnlyForDeploymentPostprocessing = 0; }; diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 46d285d33..fc179a40c 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -34,7 +34,7 @@ #include "debug.h" #if defined(BINCUE) -#include "bincue_unix.h" +#include "bincue.h" #endif diff --git a/BasiliskII/src/Unix/sys_unix.cpp b/BasiliskII/src/Unix/sys_unix.cpp index 173cddf87..9cfc06cec 100755 --- a/BasiliskII/src/Unix/sys_unix.cpp +++ b/BasiliskII/src/Unix/sys_unix.cpp @@ -59,7 +59,7 @@ #include "disk_unix.h" #if defined(BINCUE) -#include "bincue_unix.h" +#include "bincue.h" #endif diff --git a/BasiliskII/src/Unix/bincue_unix.cpp b/BasiliskII/src/bincue.cpp similarity index 99% rename from BasiliskII/src/Unix/bincue_unix.cpp rename to BasiliskII/src/bincue.cpp index bffee0dee..80fd8f616 100644 --- a/BasiliskII/src/Unix/bincue_unix.cpp +++ b/BasiliskII/src/bincue.cpp @@ -53,7 +53,7 @@ static int bincue_core_audio_callback(void); #include #endif -#include "bincue_unix.h" +#include "bincue.h" #define DEBUG 0 #include "debug.h" diff --git a/BasiliskII/src/Unix/bincue_unix.h b/BasiliskII/src/include/bincue.h similarity index 95% rename from BasiliskII/src/Unix/bincue_unix.h rename to BasiliskII/src/include/bincue.h index b07ab4a82..85a894862 100644 --- a/BasiliskII/src/Unix/bincue_unix.h +++ b/BasiliskII/src/include/bincue.h @@ -1,5 +1,5 @@ /* - * bincue_unix.h -- support for cdrom image files in bin/cue format + * bincue.h -- support for cdrom image files in bin/cue format * * (C) 2010 Geoffrey Brown * diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index e254656cc..d5d10f829 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -76,9 +76,9 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; + 5D2143D324B2DD81008BB372 /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D2143D224B2DD81008BB372 /* bincue.cpp */; }; + 5D2143D524B2DD90008BB372 /* bincue.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D2143D424B2DD90008BB372 /* bincue.h */; }; 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; - 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; - 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; @@ -337,10 +337,10 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; + 5D2143D224B2DD81008BB372 /* bincue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue.cpp; path = ../bincue.cpp; sourceTree = ""; }; + 5D2143D424B2DD90008BB372 /* bincue.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue.h; sourceTree = ""; }; 5D3967BF2328D315003925D6 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../../../BasiliskII/src/adb.cpp; sourceTree = ""; }; 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; - 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue_unix.cpp; path = ../../../BasiliskII/src/Unix/bincue_unix.cpp; sourceTree = ""; }; - 5D55CB442255B50E00FF8E81 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bincue_unix.h; path = ../../../BasiliskII/src/Unix/bincue_unix.h; sourceTree = ""; }; 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = MacOSX_sound_if.h; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h; sourceTree = ""; }; 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = MacOSX_sound_if.cpp; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp; sourceTree = ""; }; 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; @@ -488,6 +488,7 @@ 087B91B11B780EC900825F7F /* CrossPlatform */, 5D3967BF2328D315003925D6 /* adb.cpp */, 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, + 5D2143D224B2DD81008BB372 /* bincue.cpp */, 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, 0856CD7D14A99EEF000B1711 /* disk.cpp */, 0856CD7E14A99EEF000B1711 /* dummy */, @@ -539,6 +540,7 @@ 0856CD9014A99EEF000B1711 /* adb.h */, 0856CD9114A99EEF000B1711 /* audio.h */, 0856CD9214A99EEF000B1711 /* audio_defs.h */, + 5D2143D424B2DD90008BB372 /* bincue.h */, 0856CD9314A99EEF000B1711 /* cdrom.h */, 0856CD9414A99EEF000B1711 /* clip.h */, 0856CD9514A99EEF000B1711 /* cpu_emulation.h */, @@ -841,8 +843,6 @@ 08003F841E0624BD00A3ADAB /* dyngen_precompiled */, 082AC25614AA59DA00071F5E /* Darwin */, 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */, - 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */, - 5D55CB442255B50E00FF8E81 /* bincue_unix.h */, 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */, 083E370B16EFE85000CCCA59 /* disk_unix.h */, 0856CEE314A99EF0000B1711 /* ether_unix.cpp */, @@ -950,10 +950,10 @@ 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */, 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, + 5D2143D524B2DD90008BB372 /* bincue.h in Headers */, E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */, 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */, - 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */, 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */, 08163339158C121000C449F9 /* dis-asm.h in Headers */, 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, @@ -1167,6 +1167,7 @@ 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, E44C461720D262B0000583AE /* cksum.c in Sources */, 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, + 5D2143D324B2DD81008BB372 /* bincue.cpp in Sources */, 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, E44C461020D262B0000583AE /* slirp.c in Sources */, 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, @@ -1174,7 +1175,6 @@ 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, E44C460920D262B0000583AE /* tcp_input.c in Sources */, 0856D11814A99EF1000B1711 /* video.cpp in Sources */, - 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */, E41936C420CFE64D003A7654 /* SDLMain.m in Sources */, E44C461220D262B0000583AE /* socket.c in Sources */, 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, diff --git a/SheepShaver/src/Unix/bincue_unix.cpp b/SheepShaver/src/Unix/bincue_unix.cpp deleted file mode 120000 index f9ed574d0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/bincue_unix.h b/SheepShaver/src/Unix/bincue_unix.h deleted file mode 120000 index 9c7e8c5c0..000000000 --- a/SheepShaver/src/Unix/bincue_unix.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/bincue_unix.h \ No newline at end of file diff --git a/SheepShaver/src/bincue.cpp b/SheepShaver/src/bincue.cpp new file mode 120000 index 000000000..a3de57df0 --- /dev/null +++ b/SheepShaver/src/bincue.cpp @@ -0,0 +1 @@ +../../BasiliskII/src/bincue.cpp \ No newline at end of file diff --git a/SheepShaver/src/include/bincue.h b/SheepShaver/src/include/bincue.h new file mode 120000 index 000000000..59a01bfbc --- /dev/null +++ b/SheepShaver/src/include/bincue.h @@ -0,0 +1 @@ +../../../BasiliskII/src/include/bincue.h \ No newline at end of file From 30cf26e1f6e42e09ca9b32a23c7ce8dd3566fd69 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jul 2020 00:04:08 -0500 Subject: [PATCH 368/534] Windows bincue support --- BasiliskII/src/Windows/sys_windows.cpp | 324 +++++++++++++++++-------- BasiliskII/src/bincue.cpp | 13 +- 2 files changed, 233 insertions(+), 104 deletions(-) diff --git a/BasiliskII/src/Windows/sys_windows.cpp b/BasiliskII/src/Windows/sys_windows.cpp index 21e2df0e0..8e876307a 100755 --- a/BasiliskII/src/Windows/sys_windows.cpp +++ b/BasiliskII/src/Windows/sys_windows.cpp @@ -40,6 +40,10 @@ using std::min; #include "cdenable/cache.h" #include "cdenable/eject_nt.h" +#if defined(BINCUE) +#include "bincue.h" +#endif + #define DEBUG 0 #include "debug.h" @@ -56,6 +60,12 @@ struct file_handle { loff_t file_size; // Size of file data (only valid if is_file is true) cachetype cache; bool is_media_present; + +#if defined(BINCUE) + bool is_bincue; // Flag: BIN CUE file + void *bincue_fd; + file_handle() {is_bincue = false;} // default bincue false +#endif }; // Open file handles @@ -462,6 +472,11 @@ void *Sys_open(const char *path_name, bool read_only) read_only = true; // Open file + +#if defined(BINCUE) + void *binfd = open_bincue(name); // check if bincue +#endif + HANDLE h = CreateFile( name, read_only ? GENERIC_READ : GENERIC_READ | GENERIC_WRITE, @@ -486,6 +501,16 @@ void *Sys_open(const char *path_name, bool read_only) fh->is_floppy = false; fh->is_cdrom = false; +#if defined(BINCUE) + if (binfd) { + fh->bincue_fd = binfd; + fh->is_bincue = true; + fh->is_media_present = true; + sys_add_file_handle(fh); + return fh; + } +#endif + // Detect disk image file layout loff_t size = GetFileSize(h, NULL); DWORD bytes_read; @@ -517,6 +542,11 @@ void Sys_close(void *arg) sys_remove_file_handle(fh); +#if defined(BINCUE) + if (fh->is_bincue) + close_bincue(fh->bincue_fd); +#endif + if (fh->is_cdrom) { cache_final(&fh->cache); SysAllowRemoval((void *)fh); @@ -543,6 +573,11 @@ size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) if (!fh) return 0; +#if defined(BINCUE) + if (fh->is_bincue) + return read_bincue(fh->bincue_fd, buffer, offset, length); +#endif + DWORD bytes_read = 0; if (fh->is_file) { @@ -623,6 +658,11 @@ loff_t SysGetFileSize(void *arg) if (!fh) return true; +#if defined(BINCUE) + if (fh->is_bincue) + return size_bincue(fh->bincue_fd); +#endif + if (fh->is_file) return fh->file_size; else if (fh->is_cdrom) @@ -644,6 +684,13 @@ void SysEject(void *arg) if (!fh) return; +#if defined(BINCUE) + if (fh->is_bincue) { + fh->is_media_present = false; + return; + } +#endif + if (fh->is_cdrom && fh->fh) { fh->is_media_present = false; // Commented out because there was some problems, but can't remember @@ -782,16 +829,26 @@ void SysAllowRemoval(void *arg) bool SysCDReadTOC(void *arg, uint8 *toc) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - DWORD dummy; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_READ_TOC, - NULL, 0, - toc, min((int)sizeof(CDROM_TOC), 804), - &dummy, - NULL) != FALSE; +#if defined(BINCUE) + if (fh->is_bincue) + return readtoc_bincue(fh->bincue_fd, toc); +#endif + + if (fh->is_cdrom) { + + DWORD dummy; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_READ_TOC, + NULL, 0, + toc, min((int)sizeof(CDROM_TOC), 804), + &dummy, + NULL) != FALSE; + + } else + return false; } @@ -802,26 +859,34 @@ bool SysCDReadTOC(void *arg, uint8 *toc) bool SysCDGetPosition(void *arg, uint8 *pos) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - SUB_Q_CHANNEL_DATA q_data; - - CDROM_SUB_Q_DATA_FORMAT q_format; - q_format.Format = IOCTL_CDROM_CURRENT_POSITION; - q_format.Track = 0; // used only by ISRC reads +#if defined(BINCUE) + if (fh->is_bincue) + return GetPosition_bincue(fh->bincue_fd, pos); +#endif - DWORD dwBytesReturned = 0; - bool ok = DeviceIoControl(fh->fh, - IOCTL_CDROM_READ_Q_CHANNEL, - &q_format, sizeof(CDROM_SUB_Q_DATA_FORMAT), - &q_data, sizeof(SUB_Q_CHANNEL_DATA), - &dwBytesReturned, - NULL) != FALSE; - if (ok) - memcpy(pos, &q_data.CurrentPosition, sizeof(SUB_Q_CURRENT_POSITION)); - - return ok; + if (fh->is_cdrom) { + SUB_Q_CHANNEL_DATA q_data; + + CDROM_SUB_Q_DATA_FORMAT q_format; + q_format.Format = IOCTL_CDROM_CURRENT_POSITION; + q_format.Track = 0; // used only by ISRC reads + + DWORD dwBytesReturned = 0; + bool ok = DeviceIoControl(fh->fh, + IOCTL_CDROM_READ_Q_CHANNEL, + &q_format, sizeof(CDROM_SUB_Q_DATA_FORMAT), + &q_data, sizeof(SUB_Q_CHANNEL_DATA), + &dwBytesReturned, + NULL) != FALSE; + if (ok) + memcpy(pos, &q_data.CurrentPosition, sizeof(SUB_Q_CURRENT_POSITION)); + + return ok; + } else + return false; } @@ -832,24 +897,32 @@ bool SysCDGetPosition(void *arg, uint8 *pos) bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - CDROM_PLAY_AUDIO_MSF msf; - msf.StartingM = start_m; - msf.StartingS = start_s; - msf.StartingF = start_f; - msf.EndingM = end_m; - msf.EndingS = end_s; - msf.EndingF = end_f; +#if defined(BINCUE) + if (fh->is_bincue) + return CDPlay_bincue(fh->bincue_fd, start_m, start_s, start_f, end_m, end_s, end_f); +#endif - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_PLAY_AUDIO_MSF, - &msf, sizeof(CDROM_PLAY_AUDIO_MSF), - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; + if (fh->is_cdrom) { + CDROM_PLAY_AUDIO_MSF msf; + msf.StartingM = start_m; + msf.StartingS = start_s; + msf.StartingF = start_f; + msf.EndingM = end_m; + msf.EndingS = end_s; + msf.EndingF = end_f; + + DWORD dwBytesReturned = 0; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_PLAY_AUDIO_MSF, + &msf, sizeof(CDROM_PLAY_AUDIO_MSF), + NULL, 0, + &dwBytesReturned, + NULL) != FALSE; + } else + return false; } @@ -860,16 +933,24 @@ bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end bool SysCDPause(void *arg) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_PAUSE_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; +#if defined(BINCUE) + if (fh->is_bincue) + return CDPause_bincue(fh->bincue_fd); +#endif + + if (fh->is_cdrom) { + DWORD dwBytesReturned = 0; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_PAUSE_AUDIO, + NULL, 0, + NULL, 0, + &dwBytesReturned, + NULL) != FALSE; + } else + return false; } @@ -880,15 +961,23 @@ bool SysCDPause(void *arg) bool SysCDResume(void *arg) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_RESUME_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, NULL) != FALSE; +#if defined(BINCUE) + if (fh->is_bincue) + return CDResume_bincue(fh->bincue_fd); +#endif + + if (fh->is_cdrom) { + DWORD dwBytesReturned = 0; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_RESUME_AUDIO, + NULL, 0, + NULL, 0, + &dwBytesReturned, NULL) != FALSE; + } else + return false; } @@ -899,16 +988,24 @@ bool SysCDResume(void *arg) bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_STOP_AUDIO, - NULL, 0, - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; +#if defined(BINCUE) + if (fh->is_bincue) + return CDStop_bincue(fh->bincue_fd); +#endif + + if (fh->is_cdrom) { + DWORD dwBytesReturned = 0; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_STOP_AUDIO, + NULL, 0, + NULL, 0, + &dwBytesReturned, + NULL) != FALSE; + } else + return false; } @@ -919,21 +1016,30 @@ bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return false; - CDROM_SEEK_AUDIO_MSF msf; - msf.M = start_m; - msf.S = start_s; - msf.F = start_f; +#if defined(BINCUE) + if (fh->is_bincue) + return CDScan_bincue(fh->bincue_fd,start_m,start_s,start_f,reverse); +#endif - DWORD dwBytesReturned = 0; - return DeviceIoControl(fh->fh, - IOCTL_CDROM_SEEK_AUDIO_MSF, - &msf, sizeof(CDROM_SEEK_AUDIO_MSF), - NULL, 0, - &dwBytesReturned, - NULL) != FALSE; + if (fh->is_cdrom) { + + CDROM_SEEK_AUDIO_MSF msf; + msf.M = start_m; + msf.S = start_s; + msf.F = start_f; + + DWORD dwBytesReturned = 0; + return DeviceIoControl(fh->fh, + IOCTL_CDROM_SEEK_AUDIO_MSF, + &msf, sizeof(CDROM_SEEK_AUDIO_MSF), + NULL, 0, + &dwBytesReturned, + NULL) != FALSE; + } else + return false; } @@ -944,22 +1050,30 @@ bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reve void SysCDSetVolume(void *arg, uint8 left, uint8 right) { file_handle *fh = (file_handle *)arg; - if (!fh || !fh->fh || !fh->is_cdrom) + if (!fh) return; - VOLUME_CONTROL vc; - vc.PortVolume[0] = left; - vc.PortVolume[1] = right; - vc.PortVolume[2] = left; - vc.PortVolume[3] = right; +#if defined(BINCUE) + if (fh->is_bincue) + CDSetVol_bincue(fh->bincue_fd,left,right); +#endif + + if (fh->is_cdrom) { + + VOLUME_CONTROL vc; + vc.PortVolume[0] = left; + vc.PortVolume[1] = right; + vc.PortVolume[2] = left; + vc.PortVolume[3] = right; - DWORD dwBytesReturned = 0; - DeviceIoControl(fh->fh, - IOCTL_CDROM_SET_VOLUME, - &vc, sizeof(VOLUME_CONTROL), - NULL, 0, - &dwBytesReturned, - NULL); + DWORD dwBytesReturned = 0; + DeviceIoControl(fh->fh, + IOCTL_CDROM_SET_VOLUME, + &vc, sizeof(VOLUME_CONTROL), + NULL, 0, + &dwBytesReturned, + NULL); + } } @@ -974,21 +1088,27 @@ void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) return; left = right = 0; - if (!fh->fh || !fh->is_cdrom) - return; - VOLUME_CONTROL vc; - memset(&vc, 0, sizeof(vc)); +#if defined(BINCUE) + if (fh->is_bincue) + CDGetVol_bincue(fh->bincue_fd,&left,&right); +#endif + + if (fh->is_cdrom) { - DWORD dwBytesReturned = 0; - if (DeviceIoControl(fh->fh, - IOCTL_CDROM_GET_VOLUME, - NULL, 0, - &vc, sizeof(VOLUME_CONTROL), - &dwBytesReturned, - NULL)) - { - left = vc.PortVolume[0]; - right = vc.PortVolume[1]; + VOLUME_CONTROL vc; + memset(&vc, 0, sizeof(vc)); + + DWORD dwBytesReturned = 0; + if (DeviceIoControl(fh->fh, + IOCTL_CDROM_GET_VOLUME, + NULL, 0, + &vc, sizeof(VOLUME_CONTROL), + &dwBytesReturned, + NULL)) + { + left = vc.PortVolume[0]; + right = vc.PortVolume[1]; + } } } diff --git a/BasiliskII/src/bincue.cpp b/BasiliskII/src/bincue.cpp index 80fd8f616..c9e9d00f7 100644 --- a/BasiliskII/src/bincue.cpp +++ b/BasiliskII/src/bincue.cpp @@ -53,6 +53,11 @@ static int bincue_core_audio_callback(void); #include #endif +#ifdef WIN32 +#define bzero(b,len) (memset((b), '\0', (len)), (void) 0) +#define bcopy(b1,b2,len) (memmove((b2), (b1), (len)), (void) 0) +#endif + #include "bincue.h" #define DEBUG 0 #include "debug.h" @@ -420,8 +425,12 @@ static bool LoadCueSheet(const char *cuefile, CueSheet *cs) if (!ParseCueSheet(fh, cs, cuefile)) goto fail; // Open bin file and find length - - if ((binfh = open(cs->binfile,O_RDONLY)) < 0) { + #ifdef WIN32 + binfh = open(cs->binfile,O_RDONLY|O_BINARY); + #else + binfh = open(cs->binfile,O_RDONLY); + #endif + if (binfh < 0) { D(bug("Can't read bin file %s\n", cs->binfile)); goto fail; } From c3ccdcec5d23ee7092b261e3d6e47fcc1400f787 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jul 2020 02:09:47 -0500 Subject: [PATCH 369/534] Updated links for bincue under Windows --- SheepShaver/Makefile | 1 + 1 file changed, 1 insertion(+) diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index 585417f4f..ab0773058 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -52,6 +52,7 @@ links: (cd src/Windows; if [ ! -e m4 ]; then ln -s ../../../BasiliskII/src/Unix/m4; fi) @list='adb.cpp audio.cpp cdrom.cpp disk.cpp extfs.cpp pict.c \ prefs.cpp scsi.cpp sony.cpp xpram.cpp \ + bincue.cpp include/bincue.h \ include/adb.h include/audio.h include/audio_defs.h \ include/cdrom.h include/clip.h include/debug.h include/disk.h \ include/extfs.h include/extfs_defs.h include/pict.h \ From a5e7e80cdadf178e0f9619d3a4239a4d4d2cec95 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jul 2020 02:19:49 -0500 Subject: [PATCH 370/534] updated makefile template for bincue --- SheepShaver/src/Windows/Makefile.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index cb7a06504..2ca61f479 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -66,7 +66,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window sys_windows.cpp cdenable/cache.cpp cdenable/eject_nt.cpp cdenable/ntcd.cpp \ ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ ../macos_util.cpp ../timer.cpp timer_windows.cpp ../xpram.cpp xpram_windows.cpp \ - ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ + ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../bincue.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp video_blit.cpp \ ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ From 80399941b221fe634ef2133bdcbfb6f8cab28104 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jul 2020 18:47:26 -0500 Subject: [PATCH 371/534] Cleaning up build scripts with Bincue for Windows and *nix --- BasiliskII/src/Unix/Makefile.in | 2 +- BasiliskII/src/Unix/configure.ac | 2 +- BasiliskII/src/Windows/Makefile.in | 8 +++++++- BasiliskII/src/Windows/configure.ac | 17 +++++++++++++++++ SheepShaver/src/Unix/Makefile.in | 2 +- SheepShaver/src/Unix/configure.ac | 2 +- SheepShaver/src/Windows/Makefile.in | 10 ++++++++-- SheepShaver/src/Windows/configure.ac | 17 +++++++++++++++++ 8 files changed, 53 insertions(+), 7 deletions(-) diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 42f1b049f..1b911c689 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -100,7 +100,7 @@ define GUI_SRCS_LIST_TO_OBJS endef GUI_OBJS = $(GUI_SRCS_LIST_TO_OBJS) ifeq ($(USE_BINCUE),yes) -GUI_OBJS += bincue_unix.o +GUI_OBJS += bincue.o endif GUI_SRCS := $(GUI_SRCS:%=@top_srcdir@/%) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index b3bfc3b9d..2c29cd70b 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -898,7 +898,7 @@ fi dnl BINCUE overrides if [[ "x$have_bincue" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS bincue_unix.cpp" + EXTRASYSSRCS="$EXTRASYSSRCS bincue.cpp" fi dnl libvhd overrides diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index 156d1f812..663db7fb2 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -31,6 +31,8 @@ SLIRP_SRCS = \ ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=$(OBJ_DIR)/slirp-%.o) +USE_BINCUE = @USE_BINCUE@ + LN_S = @LN_S@ WINDRES = @WINDRES@ CC = @CC@ @@ -42,6 +44,7 @@ DEFS = @DEFS@ @DEFINES@ LDFLAGS = @LDFLAGS@ -Wl,-Bstatic LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ +EXTRASRCS = @EXTRASRCS@ HOST_CC = gcc HOST_CXX = g++ @@ -68,7 +71,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../extfs.cpp extfs_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ vm_alloc.cpp sigsegv.cpp posix_emu.cpp util_windows.cpp \ ../dummy/prefs_editor_dummy.cpp BasiliskII.rc \ - $(CDENABLESRCS) $(ROUTERSRCS) $(CPUSRCS) $(SLIRP_OBJS) + $(CDENABLESRCS) $(ROUTERSRCS) $(CPUSRCS) $(EXTRASRCS) $(SLIRP_OBJS) UI_SRCS = ../prefs.cpp prefs_windows.cpp prefs_editor_gtk.cpp xpram_windows.cpp \ ../prefs_items.cpp ../user_strings.cpp user_strings_windows.cpp util_windows.cpp \ @@ -109,6 +112,9 @@ define UI_SRCS_LIST_TO_OBJS $(basename $(notdir $(file)))))) endef UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) +ifeq ($(USE_BINCUE),yes) +UI_OBJS += bincue.o +endif SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) VPATH := diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index a13a39835..04f231ee3 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -36,6 +36,9 @@ AC_ARG_ENABLE(fpe, dnl External packages. AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) +AC_ARG_WITH(bincue, + AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) + dnl Addressing modes. AC_ARG_ENABLE(addressing, [ --enable-addressing=AM specify the addressing mode to use [default=fastest]], @@ -85,6 +88,13 @@ AC_SUBST(WANT_GTK) dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE +dnl BINCUE +AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) +AS_IF([test "x$have_bincue" = "xyes" ], [ + DEFINES="$DEFINES -DBINCUE" + AC_SUBST(USE_BINCUE, yes) +], [AC_SUBST(USE_BINCUE, no)]) + dnl Checks for header files. AC_HEADER_STDC @@ -304,6 +314,11 @@ elif [[ "x$HAVE_GCC30" = "xyes" -a "x$HAVE_X86_64" = "xyes" ]]; then fi fi +dnl BINCUE overrides +if [[ "x$have_bincue" = "xyes" ]]; then + EXTRASRCS="$EXTRASRCS bincue.cpp" +fi + dnl Enable JIT compiler, if possible. if [[ "x$WANT_JIT" = "xyes" -a "x$CAN_JIT" ]]; then JITSRCS="$JITSRCS ../uae_cpu/compiler/compemu_support.cpp ../uae_cpu/compiler/compemu_fpp.cpp compstbl.o cpustbl_nf.o" @@ -552,6 +567,7 @@ dnl Generate Makefile. AC_SUBST(DEFINES) AC_SUBST(CPUINCLUDES) AC_SUBST(CPUSRCS) +AC_SUBST(EXTRASRCS) AC_CONFIG_FILES([Makefile]) AC_OUTPUT @@ -564,6 +580,7 @@ echo JIT debug mode ......................... : $WANT_JIT_DEBUG echo Floating-Point emulation core .......... : $FPE_CORE echo Assembly optimizations ................. : $ASM_OPTIMIZATIONS echo Addressing mode ........................ : $ADDRESSING_MODE +echo BINCUE support ......................... : $have_bincue echo GTK user interface ..................... : $WANT_GTK echo echo "Configuration done. Now type \"make\" (or \"gmake\")." diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in index ed6148a47..419fa176f 100644 --- a/SheepShaver/src/Unix/Makefile.in +++ b/SheepShaver/src/Unix/Makefile.in @@ -106,7 +106,7 @@ define GUI_SRCS_LIST_TO_OBJS endef GUI_OBJS = $(GUI_SRCS_LIST_TO_OBJS) ifeq ($(USE_BINCUE),yes) -GUI_OBJS += bincue_unix.o +GUI_OBJS += bincue.o endif define DYNGENSRCS_LIST_TO_OBJS diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 7c546e27f..fb22fb898 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -781,7 +781,7 @@ fi dnl BINCUE overrides if [[ "x$have_bincue" = "xyes" ]]; then - EXTRASYSSRCS="$EXTRASYSSRCS bincue_unix.cpp" + EXTRASYSSRCS="$EXTRASYSSRCS bincue.cpp" fi dnl libvhd overrides diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 2ca61f479..40f4d4f1f 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -29,6 +29,8 @@ SLIRP_SRCS = \ ../slirp/ip_input.c ../slirp/socket.c ../slirp/udp.c SLIRP_OBJS = $(SLIRP_SRCS:../slirp/%.c=$(OBJ_DIR)/slirp-%.o) +USE_BINCUE = @USE_BINCUE@ + LN_S = @LN_S@ WINDRES = @WINDRES@ CC = @CC@ @@ -41,6 +43,7 @@ LDFLAGS = @LDFLAGS@ -Wl,-Bstatic #TODO remove pthread part of that if irrelevant LIBS = @LIBS@ -lws2_32 -lwsock32 -liphlpapi CPUSRCS = @CPUSRCS@ +EXTRASRCS = @EXTRASRCS@ PERL = @PERL@ USE_DYNGEN = @USE_DYNGEN@ @@ -66,14 +69,14 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window sys_windows.cpp cdenable/cache.cpp cdenable/eject_nt.cpp cdenable/ntcd.cpp \ ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ ../macos_util.cpp ../timer.cpp timer_windows.cpp ../xpram.cpp xpram_windows.cpp \ - ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../bincue.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ + ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp video_blit.cpp \ ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ about_window_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ ../dummy/prefs_editor_dummy.cpp clip_windows.cpp util_windows.cpp \ vm_alloc.cpp sigsegv.cpp posix_emu.cpp SheepShaver.rc \ - $(CPUSRCS) $(ROUTERSRCS) $(SLIRP_OBJS) + $(CPUSRCS) $(ROUTERSRCS) $(EXTRASRCS) $(SLIRP_OBJS) UI_SRCS = ../prefs.cpp prefs_windows.cpp prefs_editor_gtk.cpp xpram_windows.cpp \ ../prefs_items.cpp ../user_strings.cpp user_strings_windows.cpp util_windows.cpp \ @@ -115,6 +118,9 @@ define UI_SRCS_LIST_TO_OBJS $(basename $(notdir $(file)))))) endef UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) +ifeq ($(USE_BINCUE),yes) +UI_OBJS += bincue.o +endif define DYNGENSRCS_LIST_TO_OBJS $(addprefix $(OBJ_DIR)/, $(addsuffix .ho, $(foreach file, $(DYNGENSRCS), \ diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 67d4adf23..7064f93a0 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -16,6 +16,9 @@ AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [defa AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) +AC_ARG_WITH(bincue, + AS_HELP_STRING([--with-bincue], [Allow cdrom image files in bin/cue mode])) + dnl Checks for programs. AC_PROG_CC AC_PROG_CPP @@ -199,6 +202,18 @@ cygwin) ;; esac +dnl BINCUE +AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) +AS_IF([test "x$have_bincue" = "xyes" ], [ + DEFINES="$DEFINES -DBINCUE" + AC_SUBST(USE_BINCUE, yes) +], [AC_SUBST(USE_BINCUE, no)]) + +dnl BINCUE overrides +if [[ "x$have_bincue" = "xyes" ]]; then + EXTRASRCS="$EXTRASRCS bincue.cpp" +fi + dnl CPU emulator sources CPUSRCS="\ ../kpx_cpu/src/mathlib/ieeefp.cpp \ @@ -278,6 +293,7 @@ AC_SUBST(USE_PREGENERATED_DYNGEN) AC_SUBST(DYNGENSRCS) AC_SUBST(DYNGEN_OP_FLAGS) AC_SUBST(CPUSRCS) +AC_SUBST(EXTRASRCS) AC_OUTPUT([Makefile]) dnl Print summary. @@ -286,6 +302,7 @@ echo SheepShaver configuration summary: echo echo Enable JIT compiler .............. : $WANT_JIT echo GTK user interface ............... : $WANT_GTK +echo BINCUE support ......................... : $have_bincue echo Enable VOSF ...................... : $WANT_VOSF echo echo "Configuration done. Now type \"make\"." From 1775fb37760d9854851104a011ee1bc124445c20 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 6 Jul 2020 22:02:19 -0500 Subject: [PATCH 372/534] Adding bincue flag in configure --- BasiliskII/src/Unix/configure.ac | 1 + BasiliskII/src/Windows/Makefile.in | 3 --- BasiliskII/src/Windows/configure.ac | 1 + SheepShaver/src/Unix/Makefile.in | 3 --- SheepShaver/src/Unix/configure.ac | 1 + SheepShaver/src/Windows/Makefile.in | 3 --- SheepShaver/src/Windows/configure.ac | 1 + 7 files changed, 4 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 2c29cd70b..a812738b4 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -369,6 +369,7 @@ AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) AS_IF([test "x$have_bincue" = "xyes" ], [ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then DEFINES="$DEFINES -DBINCUE" + CPPFLAGS="$CPPFLAGS -DBINCUE" AC_SUBST(USE_BINCUE, yes) else AC_MSG_ERROR([You need SDL Audio to use BINCUE support.]) diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index 663db7fb2..40fc67db1 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -112,9 +112,6 @@ define UI_SRCS_LIST_TO_OBJS $(basename $(notdir $(file)))))) endef UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) -ifeq ($(USE_BINCUE),yes) -UI_OBJS += bincue.o -endif SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) VPATH := diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index 04f231ee3..33540135b 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -92,6 +92,7 @@ dnl BINCUE AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) AS_IF([test "x$have_bincue" = "xyes" ], [ DEFINES="$DEFINES -DBINCUE" + CPPFLAGS="$CPPFLAGS -DBINCUE" AC_SUBST(USE_BINCUE, yes) ], [AC_SUBST(USE_BINCUE, no)]) diff --git a/SheepShaver/src/Unix/Makefile.in b/SheepShaver/src/Unix/Makefile.in index 419fa176f..88ef33944 100644 --- a/SheepShaver/src/Unix/Makefile.in +++ b/SheepShaver/src/Unix/Makefile.in @@ -105,9 +105,6 @@ define GUI_SRCS_LIST_TO_OBJS $(basename $(notdir $(file)))))) endef GUI_OBJS = $(GUI_SRCS_LIST_TO_OBJS) -ifeq ($(USE_BINCUE),yes) -GUI_OBJS += bincue.o -endif define DYNGENSRCS_LIST_TO_OBJS $(addprefix $(OBJ_DIR)/, $(addsuffix .dgo, $(foreach file, $(DYNGENSRCS), \ diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index fb22fb898..88a08c965 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -698,6 +698,7 @@ AS_IF([test "x$have_bincue" = "xyes" ], [ AC_SUBST(USE_BINCUE, no) else CPPFLAGS="$CPPFLAGS -DBINCUE $OSX_CORE_AUDIO" + DEFINES="$DEFINES -DBINCUE" AC_SUBST(USE_BINCUE, yes) fi ], [AC_SUBST(USE_BINCUE, no)]) diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 40f4d4f1f..6e3fedaa5 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -118,9 +118,6 @@ define UI_SRCS_LIST_TO_OBJS $(basename $(notdir $(file)))))) endef UI_OBJS = $(UI_SRCS_LIST_TO_OBJS) -ifeq ($(USE_BINCUE),yes) -UI_OBJS += bincue.o -endif define DYNGENSRCS_LIST_TO_OBJS $(addprefix $(OBJ_DIR)/, $(addsuffix .ho, $(foreach file, $(DYNGENSRCS), \ diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 7064f93a0..73adb19d0 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -206,6 +206,7 @@ dnl BINCUE AS_IF([test "x$with_bincue" = "xyes" ], [have_bincue=yes], [have_bincue=no]) AS_IF([test "x$have_bincue" = "xyes" ], [ DEFINES="$DEFINES -DBINCUE" + CPPFLAGS="$CPPFLAGS -DBINCUE" AC_SUBST(USE_BINCUE, yes) ], [AC_SUBST(USE_BINCUE, no)]) From 084a8fbd74c64e41a0a179ceb25f9611b437d97d Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 7 Jul 2020 00:18:18 -0500 Subject: [PATCH 373/534] Does Win BII need Unicode? removing... no others have it and prefer to add it to both sheep and BII together --- BasiliskII/src/Windows/sysdeps.h | 5 ----- 1 file changed, 5 deletions(-) diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h index 35a92f3be..ac040a43e 100755 --- a/BasiliskII/src/Windows/sysdeps.h +++ b/BasiliskII/src/Windows/sysdeps.h @@ -21,11 +21,6 @@ #ifndef SYSDEPS_H #define SYSDEPS_H -#ifdef __MINGW32__ -#define _UNICODE -#define UNICODE -#endif - #if !defined _MSC_VER && !defined __STDC__ #error "Your compiler is not ANSI. Get a real one." #endif From 47fca465ba38443a6f8138ee22635b632de28686 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 7 Jul 2020 01:05:41 -0500 Subject: [PATCH 374/534] Remove the one dependency on unicode for reading rom file --- BasiliskII/src/Windows/main_windows.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index 3cdb871c8..e8d390950 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -361,10 +361,10 @@ int main(int argc, char **argv) D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); // Get rom file path from preferences - auto rom_path = tstr(PrefsFindString("rom")); + const char* rom_path = PrefsFindString("rom"); // Load Mac ROM - HANDLE rom_fh = CreateFile(rom_path ? rom_path.get() : ROM_FILE_NAME, + HANDLE rom_fh = CreateFile((rom_path != NULL) ? rom_path : ROM_FILE_NAME, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, From 3e32a6da32c3ac7e781ba2cf2f2ddf5840918a13 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Fri, 10 Jul 2020 17:02:04 -0500 Subject: [PATCH 375/534] Enforce only one player at a time, pause any other --- BasiliskII/src/SDL/audio_sdl.cpp | 4 +- BasiliskII/src/bincue.cpp | 37 +++++++++++++++++-- .../project.pbxproj | 8 ++-- 3 files changed, 40 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index fc179a40c..452867381 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -249,11 +249,13 @@ static void stream_func(void *arg, uint8 *stream, int stream_len) } else { // Audio not active, play silence -silence: memset(stream, silence_byte, stream_len); + silence: memset(stream, silence_byte, stream_len); } + #if defined(BINCUE) MixAudio_bincue(stream, stream_len, audio_volume); #endif + } diff --git a/BasiliskII/src/bincue.cpp b/BasiliskII/src/bincue.cpp index c9e9d00f7..8eed6fad4 100644 --- a/BasiliskII/src/bincue.cpp +++ b/BasiliskII/src/bincue.cpp @@ -153,6 +153,7 @@ static uint8 silence_byte; // CD Player state; multiple players supported through vectors std::vector players; +CDPlayer* current_player = NULL; CDPlayer* CSToPlayer(CueSheet* cs) { @@ -687,14 +688,25 @@ bool GetPosition_bincue(void *fh, uint8 *pos) return false; } +void CDPause_currentplayer(CDPlayer* player) { + if (current_player && current_player != player) { + current_player->audiostatus = CDROM_AUDIO_PAUSED; + current_player = NULL; + } +} + bool CDPause_bincue(void *fh) { CueSheet *cs = (CueSheet *) fh; CDPlayer *player = CSToPlayer(cs); if (cs && player) { + // Pause another player if needed + CDPause_currentplayer(player); + // doesn't matter if it was playing, just ensure it's now paused player->audiostatus = CDROM_AUDIO_PAUSED; + current_player = NULL; return true; } return false; @@ -706,11 +718,16 @@ bool CDStop_bincue(void *fh) CDPlayer *player = CSToPlayer(cs); if (cs && player) { + // Pause another player if needed + CDPause_currentplayer(player); + #ifdef OSX_CORE_AUDIO player->soundoutput.stop(); #endif if (player->audiostatus != CDROM_AUDIO_INVALID) player->audiostatus = CDROM_AUDIO_NO_STATUS; + + current_player = NULL; return true; } return false; @@ -722,8 +739,12 @@ bool CDResume_bincue(void *fh) CDPlayer *player = CSToPlayer(cs); if (cs && player) { - // doesn't matter if it was paused, just ensure it now plays + // Pause another player if needed + CDPause_currentplayer(player); + + // doesn't matter if it was paused, just ensure this one plays now player->audiostatus = CDROM_AUDIO_PLAY; + current_player = player; return true; } return false; @@ -736,6 +757,9 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, CDPlayer *player = CSToPlayer(cs); if (cs && player) { + // Pause another player if needed + CDPause_currentplayer(player); + int track; MSF msf; @@ -796,6 +820,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, // should be from current track ! player->soundoutput.start(16, 2, 44100); #endif + current_player = player; return true; } } @@ -926,9 +951,13 @@ static uint8 *fill_buffer(int stream_len, CDPlayer* player) #ifdef USE_SDL_AUDIO void MixAudio_bincue(uint8 *stream, int stream_len, int volume) { - for (std::vector::iterator it = players.begin(); it != players.end(); ++it) - { - CDPlayer *player = *it; + +// for (std::vector::iterator it = players.begin(); it != players.end(); ++it) +// { +// CDPlayer *player = *it; + + if (current_player) { + CDPlayer *player = current_player; if (player->audio_enabled && (player->audiostatus == CDROM_AUDIO_PLAY)) { uint8 *buf = fill_buffer(stream_len, player); diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index d5d10f829..2b55a2437 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -76,8 +76,8 @@ 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; - 5D2143D324B2DD81008BB372 /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D2143D224B2DD81008BB372 /* bincue.cpp */; }; 5D2143D524B2DD90008BB372 /* bincue.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D2143D424B2DD90008BB372 /* bincue.h */; }; + 5D35961124B8F5FB0081EC8A /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D35961024B8F5FA0081EC8A /* bincue.cpp */; }; 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; @@ -337,8 +337,8 @@ 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; - 5D2143D224B2DD81008BB372 /* bincue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue.cpp; path = ../bincue.cpp; sourceTree = ""; }; 5D2143D424B2DD90008BB372 /* bincue.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue.h; sourceTree = ""; }; + 5D35961024B8F5FA0081EC8A /* bincue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue.cpp; path = ../../../BasiliskII/src/bincue.cpp; sourceTree = ""; }; 5D3967BF2328D315003925D6 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../../../BasiliskII/src/adb.cpp; sourceTree = ""; }; 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = MacOSX_sound_if.h; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h; sourceTree = ""; }; @@ -488,7 +488,7 @@ 087B91B11B780EC900825F7F /* CrossPlatform */, 5D3967BF2328D315003925D6 /* adb.cpp */, 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, - 5D2143D224B2DD81008BB372 /* bincue.cpp */, + 5D35961024B8F5FA0081EC8A /* bincue.cpp */, 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, 0856CD7D14A99EEF000B1711 /* disk.cpp */, 0856CD7E14A99EEF000B1711 /* dummy */, @@ -1167,7 +1167,7 @@ 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, E44C461720D262B0000583AE /* cksum.c in Sources */, 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, - 5D2143D324B2DD81008BB372 /* bincue.cpp in Sources */, + 5D35961124B8F5FB0081EC8A /* bincue.cpp in Sources */, 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, E44C461020D262B0000583AE /* slirp.c in Sources */, 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, From 7441d04a281451f78fa902b1e978270707f21d10 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 12 Jul 2020 16:54:40 -0500 Subject: [PATCH 376/534] Minor cleanup of bincue vars --- BasiliskII/src/bincue.cpp | 40 +++++++++++++++++++-------------------- 1 file changed, 19 insertions(+), 21 deletions(-) diff --git a/BasiliskII/src/bincue.cpp b/BasiliskII/src/bincue.cpp index 8eed6fad4..83232c9e0 100644 --- a/BasiliskII/src/bincue.cpp +++ b/BasiliskII/src/bincue.cpp @@ -153,7 +153,8 @@ static uint8 silence_byte; // CD Player state; multiple players supported through vectors std::vector players; -CDPlayer* current_player = NULL; + +CDPlayer* currently_playing = NULL; CDPlayer* CSToPlayer(CueSheet* cs) { @@ -688,10 +689,10 @@ bool GetPosition_bincue(void *fh, uint8 *pos) return false; } -void CDPause_currentplayer(CDPlayer* player) { - if (current_player && current_player != player) { - current_player->audiostatus = CDROM_AUDIO_PAUSED; - current_player = NULL; +void CDPause_playing(CDPlayer* player) { + if (currently_playing && currently_playing != player) { + currently_playing->audiostatus = CDROM_AUDIO_PAUSED; + currently_playing = NULL; } } @@ -702,11 +703,11 @@ bool CDPause_bincue(void *fh) if (cs && player) { // Pause another player if needed - CDPause_currentplayer(player); + CDPause_playing(player); // doesn't matter if it was playing, just ensure it's now paused player->audiostatus = CDROM_AUDIO_PAUSED; - current_player = NULL; + currently_playing = NULL; return true; } return false; @@ -719,7 +720,7 @@ bool CDStop_bincue(void *fh) if (cs && player) { // Pause another player if needed - CDPause_currentplayer(player); + CDPause_playing(player); #ifdef OSX_CORE_AUDIO player->soundoutput.stop(); @@ -727,7 +728,7 @@ bool CDStop_bincue(void *fh) if (player->audiostatus != CDROM_AUDIO_INVALID) player->audiostatus = CDROM_AUDIO_NO_STATUS; - current_player = NULL; + currently_playing = NULL; return true; } return false; @@ -740,11 +741,11 @@ bool CDResume_bincue(void *fh) if (cs && player) { // Pause another player if needed - CDPause_currentplayer(player); + CDPause_playing(player); // doesn't matter if it was paused, just ensure this one plays now player->audiostatus = CDROM_AUDIO_PLAY; - current_player = player; + currently_playing = player; return true; } return false; @@ -758,7 +759,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, if (cs && player) { // Pause another player if needed - CDPause_currentplayer(player); + CDPause_playing(player); int track; MSF msf; @@ -820,7 +821,7 @@ bool CDPlay_bincue(void *fh, uint8 start_m, uint8 start_s, uint8 start_f, // should be from current track ! player->soundoutput.start(16, 2, 44100); #endif - current_player = player; + currently_playing = player; return true; } } @@ -951,15 +952,11 @@ static uint8 *fill_buffer(int stream_len, CDPlayer* player) #ifdef USE_SDL_AUDIO void MixAudio_bincue(uint8 *stream, int stream_len, int volume) { - -// for (std::vector::iterator it = players.begin(); it != players.end(); ++it) -// { -// CDPlayer *player = *it; - - if (current_player) { - CDPlayer *player = current_player; + if (currently_playing) { - if (player->audio_enabled && (player->audiostatus == CDROM_AUDIO_PLAY)) { + CDPlayer *player = currently_playing; + + if (player->audiostatus == CDROM_AUDIO_PLAY) { uint8 *buf = fill_buffer(stream_len, player); if (buf) SDL_AudioStreamPut(player->stream, buf, stream_len); @@ -970,6 +967,7 @@ void MixAudio_bincue(uint8 *stream, int stream_len, int volume) SDL_MixAudio(stream, converted, stream_len, player->volume_mono); } } + } } From ed5f7f22b8774b6ee7cda58291bdee954068a0b0 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 12 Jul 2020 17:08:40 -0500 Subject: [PATCH 377/534] Removing coreaudio dependency, using SDL for current builds --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 6 ------ 1 file changed, 6 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 2b55a2437..78543887e 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -83,16 +83,13 @@ 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; - 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */; }; 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95042255C822004D0E79 /* CoreAudio.framework */; }; 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95062255C844004D0E79 /* AudioUnit.framework */; }; - 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; - 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; 5DE93B46247C71F200B2C821 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; @@ -1151,11 +1148,9 @@ 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, - 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, E44C460720D262B0000583AE /* ip_icmp.c in Sources */, E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */, - 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */, 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */, @@ -1171,7 +1166,6 @@ 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, E44C461020D262B0000583AE /* slirp.c in Sources */, 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, - 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */, 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, E44C460920D262B0000583AE /* tcp_input.c in Sources */, 0856D11814A99EF1000B1711 /* video.cpp in Sources */, From 12ac0d303258fec9dafe1bdc7c3065a819ba8931 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 12 Jul 2020 17:10:28 -0500 Subject: [PATCH 378/534] Cleaning up frameworks in Sheepshaver build --- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 6 ------ 1 file changed, 6 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 78543887e..d03b35c46 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -84,9 +84,6 @@ 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */; }; - 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95042255C822004D0E79 /* CoreAudio.framework */; }; - 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95062255C844004D0E79 /* AudioUnit.framework */; }; 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; @@ -422,9 +419,6 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( - 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */, - 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */, - 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */, E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, E420260524125182000508DF /* Security.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, From 059d88ce756605323d4a7e8ed9cc059f21504e8a Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 12 Jul 2020 22:22:25 -0500 Subject: [PATCH 379/534] Removing more unused dependencies for Mac build --- .../project.pbxproj | 34 ++----------------- 1 file changed, 2 insertions(+), 32 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index d03b35c46..0c08ee93c 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -79,15 +79,6 @@ 5D2143D524B2DD90008BB372 /* bincue.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D2143D424B2DD90008BB372 /* bincue.h */; }; 5D35961124B8F5FB0081EC8A /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D35961024B8F5FA0081EC8A /* bincue.cpp */; }; 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; - 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; - 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; - 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; - 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; - 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; - 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; 5DE93B46247C71F200B2C821 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; @@ -938,14 +929,10 @@ buildActionMask = 2147483647; files = ( 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */, - 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */, 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, 5D2143D524B2DD90008BB372 /* bincue.h in Headers */, E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, - 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */, - 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */, - 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */, 08163339158C121000C449F9 /* dis-asm.h in Headers */, 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */, @@ -1079,17 +1066,13 @@ files = ( 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, - 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */, 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, - 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, - 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */, 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, - 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, @@ -1103,7 +1086,6 @@ files = ( 5DE93B46247C71F200B2C821 /* adb.cpp in Sources */, E44C460B20D262B0000583AE /* debug.c in Sources */, - 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, E44C461520D262B0000583AE /* ip_output.c in Sources */, E44C461820D262B0000583AE /* tcp_output.c in Sources */, @@ -1220,8 +1202,6 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, - "USE_SDL_AUDIO=1", - "BINCUE=1", ); HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers/, @@ -1236,11 +1216,7 @@ ); INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CPLUSPLUSFLAGS = ( - "$(OTHER_CFLAGS)", - "-DDEBUG", - "-g", - ); + OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; @@ -1265,8 +1241,6 @@ "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, - "USE_SDL_AUDIO=1", - "BINCUE=1", ); HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers/, @@ -1281,11 +1255,7 @@ ); INSTALL_PATH = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CPLUSPLUSFLAGS = ( - "$(OTHER_CFLAGS)", - "-DDEBUG", - "-g", - ); + OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; VALID_ARCHS = x86_64; }; From 2c8678417c93fbac19c2dcf6f0d0b65de265ffdc Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 12 Jul 2020 23:34:19 -0500 Subject: [PATCH 380/534] Remove coreaudio embed from BII builds since using SDL2 audio --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8ba0c506d..6e1fd7b33 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -8,13 +8,6 @@ /* Begin PBXBuildFile section */ 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D5C3B0924B2DF3400CDAB41 /* bincue.cpp */; }; - 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95132255D076004D0E79 /* AudioDevice.cpp */; }; - 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95152255D076004D0E79 /* audio_macosx.cpp */; }; - 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */; }; - 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */; }; - 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */; }; 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; @@ -354,9 +347,6 @@ isa = PBXFrameworksBuildPhase; buildActionMask = 2147483647; files = ( - 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */, - 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */, - 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */, E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */, 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, @@ -874,7 +864,6 @@ 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, - 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */, @@ -905,8 +894,6 @@ 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, - 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */, - 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */, E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, @@ -916,7 +903,6 @@ 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, - 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */, 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, E413D92720D260BC00E437D8 /* debug.c in Sources */, E413D92220D260BC00E437D8 /* mbuf.c in Sources */, From c7a7e034ed4a035996d70ae786e00999b2d4a140 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 13 Jul 2020 01:16:25 -0500 Subject: [PATCH 381/534] Cleaning associated xcode project files --- .../BasiliskII.xcodeproj/project.pbxproj.orig | 1216 -------------- .../xcshareddata/IDEWorkspaceChecks.plist | 8 - .../xcshareddata/WorkspaceSettings.xcsettings | 8 - .../xcschemes/BasiliskII.xcscheme | 92 - .../project.pbxproj | 4 +- .../project.pbxproj.orig | 1490 ----------------- .../contents.xcworkspacedata | 7 - .../xcshareddata/IDEWorkspaceChecks.plist | 8 - .../xcschemes/SheepShaver.xcscheme | 92 - 9 files changed, 2 insertions(+), 2923 deletions(-) delete mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig delete mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist delete mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings delete mode 100644 BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme delete mode 100755 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig delete mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata delete mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist delete mode 100644 SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig deleted file mode 100644 index 1d013f0c0..000000000 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj.orig +++ /dev/null @@ -1,1216 +0,0 @@ -// !$*UTF8*$! -{ - archiveVersion = 1; - classes = { - }; - objectVersion = 46; - objects = { - -/* Begin PBXBuildFile section */ - 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95132255D076004D0E79 /* AudioDevice.cpp */; }; - 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95152255D076004D0E79 /* audio_macosx.cpp */; }; - 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */; }; - 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */; }; - 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */; }; - 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26F81F240E51001032B4 /* Foundation.framework */; }; - 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; - 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; - 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; - 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; - 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; - 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; - 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; - 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; - 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */; }; - 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */; }; - 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */; }; - 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */; }; - 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD41F23B25A006B2DF2 /* disk.cpp */; }; - 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */; }; - 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD61F23B25A006B2DF2 /* ether.cpp */; }; - 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFD71F23B25A006B2DF2 /* extfs.cpp */; }; - 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */; }; - 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */ = {isa = PBXBuildFile; fileRef = 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */; }; - 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0651F23B25A006B2DF2 /* main.cpp */; }; - 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0681F23B25A006B2DF2 /* pict.c */; }; - 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */; }; - 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06D1F23B25A006B2DF2 /* prefs.cpp */; }; - 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */; }; - 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */; }; - 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0701F23B25A006B2DF2 /* scsi.cpp */; }; - 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */; }; - 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0771F23B25A006B2DF2 /* serial.cpp */; }; - 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; - 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; - 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A41F23B25A006B2DF2 /* timer.cpp */; }; - 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */; }; - 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */; }; - 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B71F23B25A006B2DF2 /* flags.cpp */; }; - 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; - 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; - 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; - 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; - 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; - 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; - 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */; }; - 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */; }; - 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */; }; - 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22A1F23B32A006B2DF2 /* sshpty.c */; }; - 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22C1F23B32A006B2DF2 /* strlcpy.c */; }; - 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */; }; - 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */; }; - 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */; }; - 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */; }; - 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; - 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; - 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; - 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; - 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; - 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; - 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; - 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; - 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; - 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; - E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; - E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; - E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; - E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8FB20D260B900E437D8 /* ip_icmp.c */; }; - E413D92520D260BC00E437D8 /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90120D260B900E437D8 /* tcp_input.c */; }; - E413D92620D260BC00E437D8 /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90220D260B900E437D8 /* misc.c */; }; - E413D92720D260BC00E437D8 /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90520D260BA00E437D8 /* debug.c */; }; - E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90620D260BA00E437D8 /* tcp_subr.c */; }; - E413D92920D260BC00E437D8 /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90720D260BA00E437D8 /* udp.c */; }; - E413D92A20D260BC00E437D8 /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90920D260BA00E437D8 /* sbuf.c */; }; - E413D92C20D260BC00E437D8 /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D90D20D260BA00E437D8 /* slirp.c */; }; - E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91120D260BA00E437D8 /* tcp_timer.c */; }; - E413D92E20D260BC00E437D8 /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91820D260BB00E437D8 /* socket.c */; }; - E413D92F20D260BC00E437D8 /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91B20D260BC00E437D8 /* bootp.c */; }; - E413D93020D260BC00E437D8 /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91C20D260BC00E437D8 /* ip_input.c */; }; - E413D93120D260BC00E437D8 /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91D20D260BC00E437D8 /* ip_output.c */; }; - E413D93220D260BC00E437D8 /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91E20D260BC00E437D8 /* if.c */; }; - E413D93320D260BC00E437D8 /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D91F20D260BC00E437D8 /* cksum.c */; }; - E413D93420D260BC00E437D8 /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D92020D260BC00E437D8 /* tcp_output.c */; }; - E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E413D93520D260DA00E437D8 /* SDL2.framework */; }; - E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93720D2613500E437D8 /* ether_unix.cpp */; }; - E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413D93920D2614E00E437D8 /* extfs_macosx.cpp */; }; - E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1320D559800077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; - E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; - E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; - E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; - E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; - E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; - E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; - E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; -/* End PBXBuildFile section */ - -/* Begin PBXCopyFilesBuildPhase section */ - 752F26F31F240140001032B4 /* Embed Frameworks */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = ""; - dstSubfolderSpec = 10; - files = ( - E4150D1420D559800077C51A /* SDL2.framework in Embed Frameworks */, - ); - name = "Embed Frameworks"; - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXCopyFilesBuildPhase section */ - -/* Begin PBXFileReference section */ - 5DDE95122255D075004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioBackEnd.h; sourceTree = ""; }; - 5DDE95132255D076004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioDevice.cpp; sourceTree = ""; }; - 5DDE95142255D076004D0E79 /* AudioDevice.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = AudioDevice.h; sourceTree = ""; }; - 5DDE95152255D076004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_macosx.cpp; sourceTree = ""; }; - 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = MacOSX_sound_if.cpp; sourceTree = ""; }; - 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioBackEnd.cpp; sourceTree = ""; }; - 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = MacOSX_sound_if.h; sourceTree = ""; }; - 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; - 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; - 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; - 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; - 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; - 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; - 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; - 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; - 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; - 7532532C1F5368370024025B /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 7532532E1F5368370024025B /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl_nf.cpp; path = gencpu_output/cpustbl_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; - 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; - 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; - 7539DFCA1F23B25A006B2DF2 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = ""; }; - 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../cdrom.cpp; sourceTree = ""; }; - 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sigsegv.cpp; sourceTree = ""; }; - 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sigsegv.h; sourceTree = ""; }; - 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_blit.cpp; sourceTree = ""; }; - 7539DFD01F23B25A006B2DF2 /* video_blit.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_blit.h; sourceTree = ""; }; - 7539DFD11F23B25A006B2DF2 /* video_vosf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_vosf.h; sourceTree = ""; }; - 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = vm_alloc.cpp; sourceTree = ""; }; - 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = vm_alloc.h; sourceTree = ""; }; - 7539DFD41F23B25A006B2DF2 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = ""; }; - 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = ""; }; - 7539DFD61F23B25A006B2DF2 /* ether.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether.cpp; path = ../ether.cpp; sourceTree = ""; }; - 7539DFD71F23B25A006B2DF2 /* extfs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = extfs.cpp; path = ../extfs.cpp; sourceTree = ""; }; - 7539DFD91F23B25A006B2DF2 /* adb.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = adb.h; sourceTree = ""; }; - 7539DFDA1F23B25A006B2DF2 /* audio.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio.h; sourceTree = ""; }; - 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs.h; sourceTree = ""; }; - 7539DFDC1F23B25A006B2DF2 /* cdrom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cdrom.h; sourceTree = ""; }; - 7539DFDD1F23B25A006B2DF2 /* clip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = clip.h; sourceTree = ""; }; - 7539DFDE1F23B25A006B2DF2 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; - 7539DFDF1F23B25A006B2DF2 /* disk.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk.h; sourceTree = ""; }; - 7539DFE01F23B25A006B2DF2 /* emul_op.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = emul_op.h; sourceTree = ""; }; - 7539DFE11F23B25A006B2DF2 /* ether.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether.h; sourceTree = ""; }; - 7539DFE21F23B25A006B2DF2 /* ether_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether_defs.h; sourceTree = ""; }; - 7539DFE31F23B25A006B2DF2 /* extfs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs.h; sourceTree = ""; }; - 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs_defs.h; sourceTree = ""; }; - 7539DFE51F23B25A006B2DF2 /* macos_util.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util.h; sourceTree = ""; }; - 7539DFE61F23B25A006B2DF2 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; - 7539DFE71F23B25A006B2DF2 /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; - 7539DFE81F23B25A006B2DF2 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs.h; sourceTree = ""; }; - 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs_editor.h; sourceTree = ""; }; - 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rom_patches.h; sourceTree = ""; }; - 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rsrc_patches.h; sourceTree = ""; }; - 7539DFEC1F23B25A006B2DF2 /* scsi.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = scsi.h; sourceTree = ""; }; - 7539DFED1F23B25A006B2DF2 /* serial.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial.h; sourceTree = ""; }; - 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial_defs.h; sourceTree = ""; }; - 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slot_rom.h; sourceTree = ""; }; - 7539DFF01F23B25A006B2DF2 /* sony.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sony.h; sourceTree = ""; }; - 7539DFF11F23B25A006B2DF2 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sys.h; sourceTree = ""; }; - 7539DFF21F23B25A006B2DF2 /* timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = timer.h; sourceTree = ""; }; - 7539DFF31F23B25A006B2DF2 /* user_strings.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings.h; sourceTree = ""; }; - 7539DFF41F23B25A006B2DF2 /* version.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = version.h; sourceTree = ""; }; - 7539DFF51F23B25A006B2DF2 /* video.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video.h; sourceTree = ""; }; - 7539DFF61F23B25A006B2DF2 /* video_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_defs.h; sourceTree = ""; }; - 7539DFF71F23B25A006B2DF2 /* xpram.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xpram.h; sourceTree = ""; }; - 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = ""; }; - 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */ = {isa = PBXFileReference; lastKnownFileType = folder.assetcatalog; path = Assets.xcassets; sourceTree = ""; }; - 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs_macosx.h; sourceTree = ""; }; - 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = BasiliskII.icns; sourceTree = ""; }; - 7539E00A1F23B25A006B2DF2 /* Credits.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Credits.html; sourceTree = ""; }; - 7539E0101F23B25A006B2DF2 /* English */ = {isa = PBXFileReference; lastKnownFileType = text.plist.strings; name = English; path = English.lproj/InfoPlist.strings; sourceTree = ""; }; - 7539E0141F23B25A006B2DF2 /* HowTo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = HowTo.html; sourceTree = ""; }; - 7539E02B1F23B25A006B2DF2 /* ToDo.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = ToDo.html; sourceTree = ""; }; - 7539E02E1F23B25A006B2DF2 /* Versions.html */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.html; path = Versions.html; sourceTree = ""; }; - 7539E0651F23B25A006B2DF2 /* main.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = main.cpp; path = ../main.cpp; sourceTree = ""; }; - 7539E0681F23B25A006B2DF2 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; - 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../prefs_items.cpp; sourceTree = ""; }; - 7539E06D1F23B25A006B2DF2 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../prefs.cpp; sourceTree = ""; }; - 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rom_patches.cpp; path = ../rom_patches.cpp; sourceTree = ""; }; - 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rsrc_patches.cpp; path = ../rsrc_patches.cpp; sourceTree = ""; }; - 7539E0701F23B25A006B2DF2 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = ""; }; - 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; - 7539E0731F23B25A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 7539E0771F23B25A006B2DF2 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = ""; }; - 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; - 7539E0A31F23B25A006B2DF2 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = ""; }; - 7539E0A41F23B25A006B2DF2 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = ""; }; - 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = basilisk_glue.cpp; sourceTree = ""; }; - 7539E0AB1F23B25A006B2DF2 /* compemu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = compemu.h; sourceTree = ""; }; - 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags_x86.h; sourceTree = ""; }; - 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; - 7539E0B41F23B25A006B2DF2 /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = core.h; sourceTree = ""; }; - 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = exceptions.cpp; sourceTree = ""; }; - 7539E0B61F23B25A006B2DF2 /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = exceptions.h; sourceTree = ""; }; - 7539E0B71F23B25A006B2DF2 /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = flags.cpp; sourceTree = ""; }; - 7539E0B81F23B25A006B2DF2 /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags.h; sourceTree = ""; }; - 7539E0B91F23B25A006B2DF2 /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu.h; sourceTree = ""; }; - 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_ieee.h; sourceTree = ""; }; - 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_uae.h; sourceTree = ""; }; - 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86.h; sourceTree = ""; }; - 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86_asm.h; sourceTree = ""; }; - 7539E0C11F23B25A006B2DF2 /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = impl.h; sourceTree = ""; }; - 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; - 7539E0C31F23B25A006B2DF2 /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mathlib.h; sourceTree = ""; }; - 7539E0C41F23B25A006B2DF2 /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rounding.cpp; sourceTree = ""; }; - 7539E0C51F23B25A006B2DF2 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rounding.h; sourceTree = ""; }; - 7539E0C61F23B25A006B2DF2 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = types.h; sourceTree = ""; }; - 7539E0C81F23B25A006B2DF2 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = m68k.h; sourceTree = ""; }; - 7539E0C91F23B25A006B2DF2 /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = memory.cpp; sourceTree = ""; }; - 7539E0CA1F23B25A006B2DF2 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; - 7539E0CC1F23B25A006B2DF2 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = newcpu.h; sourceTree = ""; }; - 7539E0CD1F23B25A006B2DF2 /* noflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = noflags.h; sourceTree = ""; }; - 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = readcpu.cpp; sourceTree = ""; }; - 7539E0CF1F23B25A006B2DF2 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = readcpu.h; sourceTree = ""; }; - 7539E0D01F23B25A006B2DF2 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = spcflags.h; sourceTree = ""; }; - 7539E0D11F23B25A006B2DF2 /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = table68k; sourceTree = ""; }; - 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; - 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; - 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; - 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = bincue_unix.cpp; sourceTree = ""; }; - 7539E1F11F23B329006B2DF2 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bincue_unix.h; sourceTree = ""; }; - 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-osx.patch"; sourceTree = ""; }; - 7539E1FA1F23B32A006B2DF2 /* mkstandalone */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkstandalone; sourceTree = ""; }; - 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = testlmem.sh; sourceTree = ""; }; - 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = disk_sparsebundle.cpp; sourceTree = ""; }; - 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk_unix.h; sourceTree = ""; }; - 7539E2011F23B32A006B2DF2 /* fbdevices */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = fbdevices; sourceTree = ""; }; - 7539E2051F23B32A006B2DF2 /* install-sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = "install-sh"; sourceTree = ""; }; - 7539E20A1F23B32A006B2DF2 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "freebsd-i386.ld"; sourceTree = ""; }; - 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-i386.ld"; sourceTree = ""; }; - 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-ppc.ld"; sourceTree = ""; }; - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-x86_64.ld"; sourceTree = ""; }; - 7539E2181F23B32A006B2DF2 /* egrep.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = egrep.m4; sourceTree = ""; }; - 7539E2191F23B32A006B2DF2 /* esd.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = esd.m4; sourceTree = ""; }; - 7539E21A1F23B32A006B2DF2 /* gettext.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gettext.m4; sourceTree = ""; }; - 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "gtk-2.0.m4"; sourceTree = ""; }; - 7539E21C1F23B32A006B2DF2 /* gtk.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gtk.m4; sourceTree = ""; }; - 7539E21E1F23B32A006B2DF2 /* Makefile.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = Makefile.in; sourceTree = ""; }; - 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = mkinstalldirs; sourceTree = ""; }; - 7539E2231F23B32A006B2DF2 /* rpc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rpc.h; sourceTree = ""; }; - 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rpc_unix.cpp; sourceTree = ""; }; - 7539E2251F23B32A006B2DF2 /* semaphore.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = semaphore.h; sourceTree = ""; }; - 7539E22A1F23B32A006B2DF2 /* sshpty.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sshpty.c; sourceTree = ""; }; - 7539E22B1F23B32A006B2DF2 /* sshpty.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sshpty.h; sourceTree = ""; }; - 7539E22C1F23B32A006B2DF2 /* strlcpy.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = strlcpy.c; sourceTree = ""; }; - 7539E22D1F23B32A006B2DF2 /* strlcpy.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = strlcpy.h; sourceTree = ""; }; - 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_unix.cpp; sourceTree = ""; }; - 7539E22F1F23B32A006B2DF2 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sysdeps.h; sourceTree = ""; }; - 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = timer_unix.cpp; sourceTree = ""; }; - 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = tinyxml2.cpp; sourceTree = ""; }; - 7539E2321F23B32A006B2DF2 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tinyxml2.h; sourceTree = ""; }; - 7539E2331F23B32A006B2DF2 /* tunconfig */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; path = tunconfig; sourceTree = ""; }; - 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; - 7539E27E1F23BEB4006B2DF2 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; - 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; - 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_dummy.cpp; sourceTree = ""; }; - 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; - 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; - 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; - 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; - 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; - 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; - 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; - 756C1B331F252FC100620917 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; - 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; - 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; - 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; - 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; - E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; - E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; - E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; - E413D8F920D260B900E437D8 /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = mbuf.c; sourceTree = ""; }; - E413D8FA20D260B900E437D8 /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tftp.h; sourceTree = ""; }; - E413D8FB20D260B900E437D8 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_icmp.c; sourceTree = ""; }; - E413D8FC20D260B900E437D8 /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bootp.h; sourceTree = ""; }; - E413D8FD20D260B900E437D8 /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcpip.h; sourceTree = ""; }; - E413D8FE20D260B900E437D8 /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION; sourceTree = ""; }; - E413D8FF20D260B900E437D8 /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip_icmp.h; sourceTree = ""; }; - E413D90020D260B900E437D8 /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp_config.h; sourceTree = ""; }; - E413D90120D260B900E437D8 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_input.c; sourceTree = ""; }; - E413D90220D260B900E437D8 /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = misc.c; sourceTree = ""; }; - E413D90320D260BA00E437D8 /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = udp.h; sourceTree = ""; }; - E413D90420D260BA00E437D8 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; - E413D90520D260BA00E437D8 /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = debug.c; sourceTree = ""; }; - E413D90620D260BA00E437D8 /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_subr.c; sourceTree = ""; }; - E413D90720D260BA00E437D8 /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = udp.c; sourceTree = ""; }; - E413D90820D260BA00E437D8 /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mbuf.h; sourceTree = ""; }; - E413D90920D260BA00E437D8 /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sbuf.c; sourceTree = ""; }; - E413D90A20D260BA00E437D8 /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ctl.h; sourceTree = ""; }; - E413D90B20D260BA00E437D8 /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp.h; sourceTree = ""; }; - E413D90C20D260BA00E437D8 /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = COPYRIGHT; sourceTree = ""; }; - E413D90D20D260BA00E437D8 /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = slirp.c; sourceTree = ""; }; - E413D90E20D260BA00E437D8 /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = socket.h; sourceTree = ""; }; - E413D90F20D260BA00E437D8 /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = if.h; sourceTree = ""; }; - E413D91020D260BA00E437D8 /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = misc.h; sourceTree = ""; }; - E413D91120D260BA00E437D8 /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_timer.c; sourceTree = ""; }; - E413D91220D260BB00E437D8 /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sbuf.h; sourceTree = ""; }; - E413D91320D260BB00E437D8 /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp.h; sourceTree = ""; }; - E413D91420D260BB00E437D8 /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip.h; sourceTree = ""; }; - E413D91520D260BB00E437D8 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; - E413D91620D260BB00E437D8 /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_timer.h; sourceTree = ""; }; - E413D91720D260BB00E437D8 /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcp_var.h; sourceTree = ""; }; - E413D91820D260BB00E437D8 /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = socket.c; sourceTree = ""; }; - E413D91920D260BB00E437D8 /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = libslirp.h; sourceTree = ""; }; - E413D91A20D260BC00E437D8 /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = icmp_var.h; sourceTree = ""; }; - E413D91B20D260BC00E437D8 /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = bootp.c; sourceTree = ""; }; - E413D91C20D260BC00E437D8 /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_input.c; sourceTree = ""; }; - E413D91D20D260BC00E437D8 /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_output.c; sourceTree = ""; }; - E413D91E20D260BC00E437D8 /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = if.c; sourceTree = ""; }; - E413D91F20D260BC00E437D8 /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = cksum.c; sourceTree = ""; }; - E413D92020D260BC00E437D8 /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_output.c; sourceTree = ""; }; - E413D93520D260DA00E437D8 /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; - E413D93720D2613500E437D8 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; - E413D93920D2614E00E437D8 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; - E4150D1320D559800077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; - E416BEE72410AA4E00751E6D /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; - E416BEE92410AA9800751E6D /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; - E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; - E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; - E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; - E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; - E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; -/* End PBXFileReference section */ - -/* Begin PBXFrameworksBuildPhase section */ - 7539DFAF1F23B17E006B2DF2 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - 5DDE95222255D0C2004D0E79 /* AudioUnit.framework in Frameworks */, - 5DDE95202255D0B6004D0E79 /* AudioToolbox.framework in Frameworks */, - 5DDE951E2255D0A9004D0E79 /* CoreAudio.framework in Frameworks */, - E413D93620D260DA00E437D8 /* SDL2.framework in Frameworks */, - E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */, - 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, - 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, - 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXFrameworksBuildPhase section */ - -/* Begin PBXGroup section */ - 4ECAC23C1F8A89ED0013B963 /* slirp */ = { - isa = PBXGroup; - children = ( - E413D91B20D260BC00E437D8 /* bootp.c */, - E413D8FC20D260B900E437D8 /* bootp.h */, - E413D91F20D260BC00E437D8 /* cksum.c */, - E413D90C20D260BA00E437D8 /* COPYRIGHT */, - E413D90A20D260BA00E437D8 /* ctl.h */, - E413D90520D260BA00E437D8 /* debug.c */, - E413D91520D260BB00E437D8 /* debug.h */, - E413D91A20D260BC00E437D8 /* icmp_var.h */, - E413D91E20D260BC00E437D8 /* if.c */, - E413D90F20D260BA00E437D8 /* if.h */, - E413D8FB20D260B900E437D8 /* ip_icmp.c */, - E413D8FF20D260B900E437D8 /* ip_icmp.h */, - E413D91C20D260BC00E437D8 /* ip_input.c */, - E413D91D20D260BC00E437D8 /* ip_output.c */, - E413D91420D260BB00E437D8 /* ip.h */, - E413D91920D260BB00E437D8 /* libslirp.h */, - E413D90420D260BA00E437D8 /* main.h */, - E413D8F920D260B900E437D8 /* mbuf.c */, - E413D90820D260BA00E437D8 /* mbuf.h */, - E413D90220D260B900E437D8 /* misc.c */, - E413D91020D260BA00E437D8 /* misc.h */, - E413D90920D260BA00E437D8 /* sbuf.c */, - E413D91220D260BB00E437D8 /* sbuf.h */, - E413D90020D260B900E437D8 /* slirp_config.h */, - E413D90D20D260BA00E437D8 /* slirp.c */, - E413D90B20D260BA00E437D8 /* slirp.h */, - E413D91820D260BB00E437D8 /* socket.c */, - E413D90E20D260BA00E437D8 /* socket.h */, - E413D90120D260B900E437D8 /* tcp_input.c */, - E413D92020D260BC00E437D8 /* tcp_output.c */, - E413D90620D260BA00E437D8 /* tcp_subr.c */, - E413D91120D260BA00E437D8 /* tcp_timer.c */, - E413D91620D260BB00E437D8 /* tcp_timer.h */, - E413D91720D260BB00E437D8 /* tcp_var.h */, - E413D91320D260BB00E437D8 /* tcp.h */, - E413D8FD20D260B900E437D8 /* tcpip.h */, - E413D8F820D260B900E437D8 /* tftp.c */, - E413D8FA20D260B900E437D8 /* tftp.h */, - E413D90720D260BA00E437D8 /* udp.c */, - E413D90320D260BA00E437D8 /* udp.h */, - E413D8FE20D260B900E437D8 /* VERSION */, - ); - name = slirp; - path = ../slirp; - sourceTree = ""; - }; - 752F26F71F240E51001032B4 /* Frameworks */ = { - isa = PBXGroup; - children = ( -<<<<<<< HEAD - 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */, - 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */, - 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */, -======= - E416BEE92410AA9800751E6D /* Security.framework */, ->>>>>>> master - E413D93520D260DA00E437D8 /* SDL2.framework */, - 756C1B381F25306A00620917 /* AppKit.framework */, - 752F26FA1F240E69001032B4 /* IOKit.framework */, - 752F26F81F240E51001032B4 /* Foundation.framework */, - ); - name = Frameworks; - sourceTree = ""; - }; - 753252FF1F535E5D0024025B /* generated src */ = { - isa = PBXGroup; - children = ( - E416BEEC2410AE0000751E6D /* etherhelpertool */, - 7532532B1F53675E0024025B /* gencpu output */, - ); - name = "generated src"; - sourceTree = ""; - }; - 7532532B1F53675E0024025B /* gencpu output */ = { - isa = PBXGroup; - children = ( - 7532532C1F5368370024025B /* cpuemu_nf.cpp */, - 7532532D1F5368370024025B /* cpuemu.cpp */, - 7532532E1F5368370024025B /* cpustbl_nf.cpp */, - 7532532F1F5368370024025B /* cpustbl.cpp */, - 753253301F5368370024025B /* cputbl.h */, - E417913123D7D67C0009AD63 /* defs68k.c */, - ); - name = "gencpu output"; - sourceTree = ""; - }; - 7539DFA91F23B17E006B2DF2 = { - isa = PBXGroup; - children = ( - E4150D1320D559800077C51A /* SDL2.framework */, - 7539E1E41F23B25E006B2DF2 /* src */, - 753252FF1F535E5D0024025B /* generated src */, - 7539DFB31F23B17E006B2DF2 /* Products */, - 752F26F71F240E51001032B4 /* Frameworks */, - ); - sourceTree = ""; - }; - 7539DFB31F23B17E006B2DF2 /* Products */ = { - isa = PBXGroup; - children = ( - 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */, - ); - name = Products; - path = ../../../../../../../../Documents/Code/macemu/BasiliskII/src/MacOSX; - sourceTree = BUILT_PRODUCTS_DIR; - }; - 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */ = { - isa = PBXGroup; - children = ( - 7539DFCD1F23B25A006B2DF2 /* sigsegv.cpp */, - 7539DFCE1F23B25A006B2DF2 /* sigsegv.h */, - 7539DFCF1F23B25A006B2DF2 /* video_blit.cpp */, - 7539DFD01F23B25A006B2DF2 /* video_blit.h */, - 7539DFD11F23B25A006B2DF2 /* video_vosf.h */, - 7539DFD21F23B25A006B2DF2 /* vm_alloc.cpp */, - 7539DFD31F23B25A006B2DF2 /* vm_alloc.h */, - ); - name = CrossPlatform; - path = ../CrossPlatform; - sourceTree = ""; - }; - 7539DFD81F23B25A006B2DF2 /* include */ = { - isa = PBXGroup; - children = ( - 7539DFD91F23B25A006B2DF2 /* adb.h */, - 7539DFDA1F23B25A006B2DF2 /* audio.h */, - 7539DFDB1F23B25A006B2DF2 /* audio_defs.h */, - 7539DFDC1F23B25A006B2DF2 /* cdrom.h */, - 7539DFDD1F23B25A006B2DF2 /* clip.h */, - 7539DFDE1F23B25A006B2DF2 /* debug.h */, - 7539DFDF1F23B25A006B2DF2 /* disk.h */, - 7539DFE01F23B25A006B2DF2 /* emul_op.h */, - 7539DFE11F23B25A006B2DF2 /* ether.h */, - 7539DFE21F23B25A006B2DF2 /* ether_defs.h */, - 7539DFE31F23B25A006B2DF2 /* extfs.h */, - 7539DFE41F23B25A006B2DF2 /* extfs_defs.h */, - 7539DFE51F23B25A006B2DF2 /* macos_util.h */, - 7539DFE61F23B25A006B2DF2 /* main.h */, - 7539DFE71F23B25A006B2DF2 /* pict.h */, - 7539DFE81F23B25A006B2DF2 /* prefs.h */, - 7539DFE91F23B25A006B2DF2 /* prefs_editor.h */, - 7539DFEA1F23B25A006B2DF2 /* rom_patches.h */, - 7539DFEB1F23B25A006B2DF2 /* rsrc_patches.h */, - 7539DFEC1F23B25A006B2DF2 /* scsi.h */, - 7539DFED1F23B25A006B2DF2 /* serial.h */, - 7539DFEE1F23B25A006B2DF2 /* serial_defs.h */, - 7539DFEF1F23B25A006B2DF2 /* slot_rom.h */, - 7539DFF01F23B25A006B2DF2 /* sony.h */, - 7539DFF11F23B25A006B2DF2 /* sys.h */, - 7539DFF21F23B25A006B2DF2 /* timer.h */, - 7539DFF31F23B25A006B2DF2 /* user_strings.h */, - 7539DFF41F23B25A006B2DF2 /* version.h */, - 7539DFF51F23B25A006B2DF2 /* video.h */, - 7539DFF61F23B25A006B2DF2 /* video_defs.h */, - 7539DFF71F23B25A006B2DF2 /* xpram.h */, - ); - name = include; - path = ../include; - sourceTree = ""; - }; - 7539DFF91F23B25A006B2DF2 /* MacOSX */ = { - isa = PBXGroup; - children = ( - E416BEEB2410AB0E00751E6D /* etherhelpertool.c */, - E416BEE72410AA4E00751E6D /* runtool.c */, - 7539E2AA1F23CDB7006B2DF2 /* Info.plist */, - 7539E27E1F23BEB4006B2DF2 /* config.h */, - 7539DFFA1F23B25A006B2DF2 /* Assets.xcassets */, - 7539DFFB1F23B25A006B2DF2 /* audio_defs_macosx.h */, - 7539E0021F23B25A006B2DF2 /* BasiliskII.icns */, - E490334D20D3A5890012DD5F /* clip_macosx64.mm */, - 7539E00A1F23B25A006B2DF2 /* Credits.html */, - E413D93920D2614E00E437D8 /* extfs_macosx.cpp */, - 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */, - 7539E0141F23B25A006B2DF2 /* HowTo.html */, - 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */, - 7539E02B1F23B25A006B2DF2 /* ToDo.html */, - 756C1B321F252FC100620917 /* utils_macosx.h */, - 756C1B331F252FC100620917 /* utils_macosx.mm */, - 7539E02E1F23B25A006B2DF2 /* Versions.html */, - 5DDE95152255D076004D0E79 /* audio_macosx.cpp */, - 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */, - 5DDE95122255D075004D0E79 /* AudioBackEnd.h */, - 5DDE95132255D076004D0E79 /* AudioDevice.cpp */, - 5DDE95142255D076004D0E79 /* AudioDevice.h */, - 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */, - 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */, - ); - name = MacOSX; - sourceTree = ""; - }; - 7539E0711F23B25A006B2DF2 /* SDL */ = { - isa = PBXGroup; - children = ( - 7539E0721F23B25A006B2DF2 /* audio_sdl.cpp */, - 7539E0731F23B25A006B2DF2 /* keycodes */, - 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, - E40CEEC420D7910D00BCB88D /* SDLMain.h */, - E40CEEC520D7910E00BCB88D /* SDLMain.m */, - 75CBCF761F5DB65E00830063 /* video_sdl.cpp */, - 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, - 752F27021F242F51001032B4 /* xpram_sdl.cpp */, - ); - name = SDL; - path = ../SDL; - sourceTree = ""; - }; - 7539E0A51F23B25A006B2DF2 /* uae_cpu */ = { - isa = PBXGroup; - children = ( - 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, - 753252E51F5359040024025B /* build68k.c */, - 7539E0A81F23B25A006B2DF2 /* compiler */, - 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, - 7539E0B31F23B25A006B2DF2 /* fpu */, - 753253011F535F210024025B /* gencpu.c */, - 7539E0C81F23B25A006B2DF2 /* m68k.h */, - 7539E0C91F23B25A006B2DF2 /* memory.cpp */, - 7539E0CA1F23B25A006B2DF2 /* memory.h */, - 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */, - 7539E0CC1F23B25A006B2DF2 /* newcpu.h */, - 7539E0CD1F23B25A006B2DF2 /* noflags.h */, - 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */, - 7539E0CF1F23B25A006B2DF2 /* readcpu.h */, - 7539E0D01F23B25A006B2DF2 /* spcflags.h */, - 7539E0D11F23B25A006B2DF2 /* table68k */, - ); - name = uae_cpu; - path = ../uae_cpu; - sourceTree = ""; - }; - 7539E0A81F23B25A006B2DF2 /* compiler */ = { - isa = PBXGroup; - children = ( - 7539E0AB1F23B25A006B2DF2 /* compemu.h */, - 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, - ); - path = compiler; - sourceTree = ""; - }; - 7539E0B31F23B25A006B2DF2 /* fpu */ = { - isa = PBXGroup; - children = ( - E4D8245223543D9700849B78 /* fpu_ieee.cpp */, - 7539E0B41F23B25A006B2DF2 /* core.h */, - 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, - 7539E0B61F23B25A006B2DF2 /* exceptions.h */, - 7539E0B71F23B25A006B2DF2 /* flags.cpp */, - 7539E0B81F23B25A006B2DF2 /* flags.h */, - 7539E0B91F23B25A006B2DF2 /* fpu.h */, - 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */, - 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */, - 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */, - 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */, - 7539E0C11F23B25A006B2DF2 /* impl.h */, - 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */, - 7539E0C31F23B25A006B2DF2 /* mathlib.h */, - 7539E0C41F23B25A006B2DF2 /* rounding.cpp */, - 7539E0C51F23B25A006B2DF2 /* rounding.h */, - 7539E0C61F23B25A006B2DF2 /* types.h */, - ); - path = fpu; - sourceTree = ""; - }; - 7539E1E41F23B25E006B2DF2 /* src */ = { - isa = PBXGroup; - children = ( - 7539DFC91F23B25A006B2DF2 /* adb.cpp */, - 7539DFCA1F23B25A006B2DF2 /* audio.cpp */, - 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */, - 7539DFCC1F23B25A006B2DF2 /* CrossPlatform */, - 7539DFD41F23B25A006B2DF2 /* disk.cpp */, - 7539E2811F23C52C006B2DF2 /* dummy */, - 7539DFD51F23B25A006B2DF2 /* emul_op.cpp */, - 7539DFD61F23B25A006B2DF2 /* ether.cpp */, - 7539DFD71F23B25A006B2DF2 /* extfs.cpp */, - 7539DFD81F23B25A006B2DF2 /* include */, - 7539DFF81F23B25A006B2DF2 /* macos_util.cpp */, - 7539DFF91F23B25A006B2DF2 /* MacOSX */, - 7539E0651F23B25A006B2DF2 /* main.cpp */, - 7539E0681F23B25A006B2DF2 /* pict.c */, - 7539E06C1F23B25A006B2DF2 /* prefs_items.cpp */, - 7539E06D1F23B25A006B2DF2 /* prefs.cpp */, - 7539E06E1F23B25A006B2DF2 /* rom_patches.cpp */, - 7539E06F1F23B25A006B2DF2 /* rsrc_patches.cpp */, - 7539E0701F23B25A006B2DF2 /* scsi.cpp */, - 7539E0711F23B25A006B2DF2 /* SDL */, - 7539E0771F23B25A006B2DF2 /* serial.cpp */, - 4ECAC23C1F8A89ED0013B963 /* slirp */, - 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, - 7539E0A31F23B25A006B2DF2 /* sony.cpp */, - 7539E0A41F23B25A006B2DF2 /* timer.cpp */, - 7539E0A51F23B25A006B2DF2 /* uae_cpu */, - 7539E1E91F23B329006B2DF2 /* Unix */, - 7539E1221F23B25A006B2DF2 /* user_strings.cpp */, - 7539E1231F23B25A006B2DF2 /* video.cpp */, - 7539E1241F23B25A006B2DF2 /* xpram.cpp */, - ); - name = src; - sourceTree = ""; - }; - 7539E1E91F23B329006B2DF2 /* Unix */ = { - isa = PBXGroup; - children = ( - 7539E1F01F23B329006B2DF2 /* bincue_unix.cpp */, - 7539E1F11F23B329006B2DF2 /* bincue_unix.h */, - 7539E1F71F23B329006B2DF2 /* Darwin */, - 7539E1FD1F23B32A006B2DF2 /* disk_sparsebundle.cpp */, - 7539E1FE1F23B32A006B2DF2 /* disk_unix.h */, - E413D93720D2613500E437D8 /* ether_unix.cpp */, - 7539E2011F23B32A006B2DF2 /* fbdevices */, - 7539E2051F23B32A006B2DF2 /* install-sh */, - 7539E20A1F23B32A006B2DF2 /* keycodes */, - 7539E20B1F23B32A006B2DF2 /* ldscripts */, - 7539E2171F23B32A006B2DF2 /* m4 */, - 7539E27F1F23C4CA006B2DF2 /* main_unix.cpp */, - 7539E21E1F23B32A006B2DF2 /* Makefile.in */, - 7539E21F1F23B32A006B2DF2 /* mkinstalldirs */, - 7539E2231F23B32A006B2DF2 /* rpc.h */, - 7539E2241F23B32A006B2DF2 /* rpc_unix.cpp */, - 7539E2251F23B32A006B2DF2 /* semaphore.h */, - 7539E22A1F23B32A006B2DF2 /* sshpty.c */, - 7539E22B1F23B32A006B2DF2 /* sshpty.h */, - 7539E22C1F23B32A006B2DF2 /* strlcpy.c */, - 7539E22D1F23B32A006B2DF2 /* strlcpy.h */, - 7539E22E1F23B32A006B2DF2 /* sys_unix.cpp */, - 7539E22F1F23B32A006B2DF2 /* sysdeps.h */, - 7539E2301F23B32A006B2DF2 /* timer_unix.cpp */, - 7539E2311F23B32A006B2DF2 /* tinyxml2.cpp */, - 7539E2321F23B32A006B2DF2 /* tinyxml2.h */, - 7539E2331F23B32A006B2DF2 /* tunconfig */, - 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */, - 7539E2351F23B32A006B2DF2 /* user_strings_unix.h */, - ); - name = Unix; - path = ../Unix; - sourceTree = ""; - }; - 7539E1F71F23B329006B2DF2 /* Darwin */ = { - isa = PBXGroup; - children = ( - 7539E1F81F23B329006B2DF2 /* gtk-osx.patch */, - 7539E1FA1F23B32A006B2DF2 /* mkstandalone */, - 7539E1FC1F23B32A006B2DF2 /* testlmem.sh */, - ); - path = Darwin; - sourceTree = ""; - }; - 7539E20B1F23B32A006B2DF2 /* ldscripts */ = { - isa = PBXGroup; - children = ( - 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */, - 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */, - 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */, - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */, - ); - path = ldscripts; - sourceTree = ""; - }; - 7539E2171F23B32A006B2DF2 /* m4 */ = { - isa = PBXGroup; - children = ( - 7539E2181F23B32A006B2DF2 /* egrep.m4 */, - 7539E2191F23B32A006B2DF2 /* esd.m4 */, - 7539E21A1F23B32A006B2DF2 /* gettext.m4 */, - 7539E21B1F23B32A006B2DF2 /* gtk-2.0.m4 */, - 7539E21C1F23B32A006B2DF2 /* gtk.m4 */, - ); - path = m4; - sourceTree = ""; - }; - 7539E2811F23C52C006B2DF2 /* dummy */ = { - isa = PBXGroup; - children = ( - 7539E2861F23C56F006B2DF2 /* ether_dummy.cpp */, - 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */, - 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */, - 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */, - ); - name = dummy; - path = ../dummy; - sourceTree = ""; - }; -/* End PBXGroup section */ - -/* Begin PBXNativeTarget section */ - 7539DFB11F23B17E006B2DF2 /* BasiliskII */ = { - isa = PBXNativeTarget; - buildConfigurationList = 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */; - buildPhases = ( - 752F27181F251CB1001032B4 /* Run Script */, - 7539DFAE1F23B17E006B2DF2 /* Sources */, - 7539DFAF1F23B17E006B2DF2 /* Frameworks */, - 7539DFB01F23B17E006B2DF2 /* Resources */, - 752F26F31F240140001032B4 /* Embed Frameworks */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = BasiliskII; - productName = BasiliskII; - productReference = 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */; - productType = "com.apple.product-type.application"; - }; -/* End PBXNativeTarget section */ - -/* Begin PBXProject section */ - 7539DFAA1F23B17E006B2DF2 /* Project object */ = { - isa = PBXProject; - attributes = { - LastUpgradeCheck = 0830; - TargetAttributes = { - 7539DFB11F23B17E006B2DF2 = { - CreatedOnToolsVersion = 8.3.3; - ProvisioningStyle = Automatic; - }; - }; - }; - buildConfigurationList = 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */; - compatibilityVersion = "Xcode 3.2"; - developmentRegion = English; - hasScannedForEncodings = 0; - knownRegions = ( - en, - Base, - English, - ); - mainGroup = 7539DFA91F23B17E006B2DF2; - productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; - projectDirPath = ""; - projectRoot = ""; - targets = ( - 7539DFB11F23B17E006B2DF2 /* BasiliskII */, - ); - }; -/* End PBXProject section */ - -/* Begin PBXResourcesBuildPhase section */ - 7539DFB01F23B17E006B2DF2 /* Resources */ = { - isa = PBXResourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 7539E1341F23B25A006B2DF2 /* BasiliskII.icns in Resources */, - E4555EED2354434B00139FCE /* Credits.html in Resources */, - E416BEED2410AE0900751E6D /* etherhelpertool in Resources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXResourcesBuildPhase section */ - -/* Begin PBXShellScriptBuildPhase section */ - 752F27181F251CB1001032B4 /* Run Script */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Run Script"; - outputPaths = ( - $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu_nf.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "make -f Makefile.gencpu\ncc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; - }; -/* End PBXShellScriptBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 7539DFAE1F23B17E006B2DF2 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, - 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, - 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, - 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, - E413D93320D260BC00E437D8 /* cksum.c in Sources */, - E413D92920D260BC00E437D8 /* udp.c in Sources */, - E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */, - 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, - E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, - 753253351F53688D0024025B /* readcpu.cpp in Sources */, - 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, - E413D93120D260BC00E437D8 /* ip_output.c in Sources */, - 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, - 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, - 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, - 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 753253341F5368370024025B /* cpustbl.cpp in Sources */, - 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, - E413D92620D260BC00E437D8 /* misc.c in Sources */, - 753253321F5368370024025B /* cpuemu.cpp in Sources */, - 5DDE951C2255D076004D0E79 /* AudioBackEnd.cpp in Sources */, - 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, - 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, - 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, - 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, - 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, - 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, - 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, - 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, - 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, - 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, - 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, - 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, - E413D93220D260BC00E437D8 /* if.c in Sources */, - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, - 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, - 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, - E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, - 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, - 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, - E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, - 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, - E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, - 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, - E413D92E20D260BC00E437D8 /* socket.c in Sources */, - 7539E12D1F23B25A006B2DF2 /* ether.cpp in Sources */, - 7539E26C1F23B32A006B2DF2 /* sshpty.c in Sources */, - 7539E1781F23B25A006B2DF2 /* serial.cpp in Sources */, - 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, - 5DDE951B2255D076004D0E79 /* MacOSX_sound_if.cpp in Sources */, - 5DDE951A2255D076004D0E79 /* audio_macosx.cpp in Sources */, - E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, - E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, - 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, - 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, - E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */, - 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, - 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */, - 7539E26F1F23B32A006B2DF2 /* timer_unix.cpp in Sources */, - 7539E12E1F23B25A006B2DF2 /* extfs.cpp in Sources */, - 5DDE95192255D076004D0E79 /* AudioDevice.cpp in Sources */, - 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, - E413D92720D260BC00E437D8 /* debug.c in Sources */, - E413D92220D260BC00E437D8 /* mbuf.c in Sources */, - 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, - E416BEE82410AA4E00751E6D /* runtool.c in Sources */, - E413D93020D260BC00E437D8 /* ip_input.c in Sources */, - 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, - 7539E16D1F23B25A006B2DF2 /* pict.c in Sources */, - 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */, - E413D92C20D260BC00E437D8 /* slirp.c in Sources */, - 7539E12F1F23B25A006B2DF2 /* macos_util.cpp in Sources */, - E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */, - 7539E24A1F23B32A006B2DF2 /* disk_sparsebundle.cpp in Sources */, - 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */, - E413D92520D260BC00E437D8 /* tcp_input.c in Sources */, - E413D92120D260BC00E437D8 /* tftp.c in Sources */, - 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, - 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, - E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */, - 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, - 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, - E413D92F20D260BC00E437D8 /* bootp.c in Sources */, - 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, - 7539E23F1F23B32A006B2DF2 /* bincue_unix.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXVariantGroup section */ - 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { - isa = PBXVariantGroup; - children = ( - 7539E0101F23B25A006B2DF2 /* English */, - ); - name = InfoPlist.strings; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - 7539DFC41F23B17E006B2DF2 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_ANALYZER_NONNULL = YES; - CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; - CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULES = YES; - CLANG_ENABLE_OBJC_ARC = NO; - CLANG_WARN_BOOL_CONVERSION = YES; - CLANG_WARN_CONSTANT_CONVERSION = YES; - CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; - CLANG_WARN_DOCUMENTATION_COMMENTS = YES; - CLANG_WARN_EMPTY_BODY = YES; - CLANG_WARN_ENUM_CONVERSION = YES; - CLANG_WARN_INFINITE_RECURSION = YES; - CLANG_WARN_INT_CONVERSION = YES; - CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; - CLANG_WARN_SUSPICIOUS_MOVE = YES; - CLANG_WARN_UNREACHABLE_CODE = YES; - CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; - CODE_SIGN_IDENTITY = "-"; - COPY_PHASE_STRIP = NO; - DEBUG_INFORMATION_FORMAT = dwarf; - ENABLE_STRICT_OBJC_MSGSEND = YES; - ENABLE_TESTABILITY = YES; - GCC_C_LANGUAGE_STANDARD = gnu99; - GCC_DYNAMIC_NO_PIC = NO; - GCC_NO_COMMON_BLOCKS = YES; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - "USE_XCODE=1", - "DEBUG=1", - ); - GCC_WARN_64_TO_32_BIT_CONVERSION = YES; - GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; - GCC_WARN_UNDECLARED_SELECTOR = YES; - GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", - ../MacOSX, - ../include, - ../uae_cpu, - ../UNIX, - ); - MACOSX_DEPLOYMENT_TARGET = 10.7; - MTL_ENABLE_DEBUG_INFO = YES; - ONLY_ACTIVE_ARCH = YES; - SDKROOT = macosx; - }; - name = Debug; - }; - 7539DFC51F23B17E006B2DF2 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_ANALYZER_NONNULL = YES; - CLANG_ANALYZER_NUMBER_OBJECT_CONVERSION = YES_AGGRESSIVE; - CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULES = YES; - CLANG_ENABLE_OBJC_ARC = NO; - CLANG_WARN_BOOL_CONVERSION = YES; - CLANG_WARN_CONSTANT_CONVERSION = YES; - CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; - CLANG_WARN_DOCUMENTATION_COMMENTS = YES; - CLANG_WARN_EMPTY_BODY = YES; - CLANG_WARN_ENUM_CONVERSION = YES; - CLANG_WARN_INFINITE_RECURSION = YES; - CLANG_WARN_INT_CONVERSION = YES; - CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; - CLANG_WARN_SUSPICIOUS_MOVE = YES; - CLANG_WARN_UNREACHABLE_CODE = YES; - CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; - CODE_SIGN_IDENTITY = "-"; - COPY_PHASE_STRIP = NO; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - ENABLE_NS_ASSERTIONS = NO; - ENABLE_STRICT_OBJC_MSGSEND = YES; - GCC_C_LANGUAGE_STANDARD = gnu99; - GCC_NO_COMMON_BLOCKS = YES; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", - HAVE_CONFIG_H, - "USE_XCODE=1", - ); - GCC_WARN_64_TO_32_BIT_CONVERSION = YES; - GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; - GCC_WARN_UNDECLARED_SELECTOR = YES; - GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - "$(BUILT_PRODUCTS_DIR)/SDL2.framework/Headers", - ../MacOSX, - ../include, - ../uae_cpu, - ../UNIX, - ); - MACOSX_DEPLOYMENT_TARGET = 10.7; - MTL_ENABLE_DEBUG_INFO = NO; - SDKROOT = macosx; - }; - name = Release; - }; - 7539DFC71F23B17E006B2DF2 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; - CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULES = NO; - CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; - CLANG_WARN_OBJC_ROOT_CLASS = YES; - CLANG_WARN_SUSPICIOUS_MOVE = NO; - CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; - COMBINE_HIDPI_IMAGES = NO; - ENABLE_NS_ASSERTIONS = YES; - ENABLE_TESTABILITY = NO; - FRAMEWORK_SEARCH_PATHS = ( - "$(inherited)", - "$(LOCAL_LIBRARY_DIR)/Frameworks", - ); - GCC_CW_ASM_SYNTAX = NO; - GCC_C_LANGUAGE_STANDARD = "compiler-default"; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", -<<<<<<< HEAD - HAVE_CONFIG_H, - "USE_XCODE=1", - "DEBUG=1", - "USE_SDL_AUDIO=1", - "BINCUE=1", -======= - ENABLE_MACOSX_ETHERHELPER, - HAVE_CONFIG_H, ->>>>>>> master - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; - GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, - ../MacOSX, - ../include, - ../uae_cpu, - ../Unix, - ../slirp, - ); - INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; - INSTALL_PATH = "$(HOME)/Applications"; - LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; - ONLY_ACTIVE_ARCH = NO; - OTHER_CFLAGS = ""; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; - PRODUCT_NAME = "$(TARGET_NAME)"; - USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; - WARNING_CFLAGS = ""; - }; - name = Debug; - }; - 7539DFC81F23B17E006B2DF2 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - ASSETCATALOG_COMPILER_APPICON_NAME = AppIcon; - CLANG_CXX_LANGUAGE_STANDARD = "compiler-default"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULES = NO; - CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES; - CLANG_WARN_OBJC_ROOT_CLASS = YES; - CLANG_WARN_SUSPICIOUS_MOVE = NO; - CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; - COMBINE_HIDPI_IMAGES = NO; - DEBUG_INFORMATION_FORMAT = dwarf; - ENABLE_NS_ASSERTIONS = YES; - ENABLE_TESTABILITY = NO; - FRAMEWORK_SEARCH_PATHS = ( - "$(inherited)", - "$(LOCAL_LIBRARY_DIR)/Frameworks", - ); - GCC_CW_ASM_SYNTAX = NO; - GCC_C_LANGUAGE_STANDARD = "compiler-default"; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PREPROCESSOR_DEFINITIONS = ( - "$(inherited)", -<<<<<<< HEAD - HAVE_CONFIG_H, - "USE_XCODE=1", - "USE_SDL_AUDIO=1", - "BINCUE=1", -======= - ENABLE_MACOSX_ETHERHELPER, - HAVE_CONFIG_H, ->>>>>>> master - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; - GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, - ../MacOSX, - ../include, - ../uae_cpu, - ../Unix, - ../slirp, - ); - INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; - INSTALL_PATH = "$(HOME)/Applications"; - LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CFLAGS = ""; - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; - PRODUCT_NAME = "$(TARGET_NAME)"; - USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; - WARNING_CFLAGS = ""; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - 7539DFAD1F23B17E006B2DF2 /* Build configuration list for PBXProject "BasiliskII" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 7539DFC41F23B17E006B2DF2 /* Debug */, - 7539DFC51F23B17E006B2DF2 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 7539DFC61F23B17E006B2DF2 /* Build configuration list for PBXNativeTarget "BasiliskII" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 7539DFC71F23B17E006B2DF2 /* Debug */, - 7539DFC81F23B17E006B2DF2 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 7539DFAA1F23B17E006B2DF2 /* Project object */; -} diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist deleted file mode 100644 index 18d981003..000000000 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist +++ /dev/null @@ -1,8 +0,0 @@ - - - - - IDEDidComputeMac32BitWarning - - - diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings deleted file mode 100644 index f9b0d7c5e..000000000 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.xcworkspace/xcshareddata/WorkspaceSettings.xcsettings +++ /dev/null @@ -1,8 +0,0 @@ - - - - - PreviewsEnabled - - - diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme deleted file mode 100644 index 8594df9ad..000000000 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/xcshareddata/xcschemes/BasiliskII.xcscheme +++ /dev/null @@ -1,92 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 0c08ee93c..c7c6bfa25 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1194,7 +1194,7 @@ DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = NO; GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_OPTIMIZATION_LEVEL = 0; + GCC_OPTIMIZATION_LEVEL = 3; GCC_PREPROCESSOR_DEFINITIONS = ( "DATADIR=", HAVE_CONFIG_H, @@ -1233,7 +1233,7 @@ DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; GCC_DYNAMIC_NO_PIC = YES; GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_OPTIMIZATION_LEVEL = 0; + GCC_OPTIMIZATION_LEVEL = 3; GCC_PREPROCESSOR_DEFINITIONS = ( "DATADIR=", HAVE_CONFIG_H, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig deleted file mode 100755 index 6dba7421b..000000000 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj.orig +++ /dev/null @@ -1,1490 +0,0 @@ -// !$*UTF8*$! -{ - archiveVersion = 1; - classes = { - }; - objectVersion = 45; - objects = { - -/* Begin PBXBuildFile section */ - 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */; }; - 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */; }; - 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */; }; - 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */ = {isa = PBXBuildFile; fileRef = 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */; }; - 08163339158C121000C449F9 /* dis-asm.h in Headers */ = {isa = PBXBuildFile; fileRef = 08163337158C121000C449F9 /* dis-asm.h */; }; - 08163340158C125800C449F9 /* ppc-dis.c in Sources */ = {isa = PBXBuildFile; fileRef = 08163338158C121000C449F9 /* ppc-dis.c */; }; - 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */; }; - 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */; }; - 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 083E372016EFE87200CCCA59 /* tinyxml2.cpp */; }; - 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDF714A99EEF000B1711 /* ieeefp.cpp */; }; - 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDFD14A99EEF000B1711 /* mathlib.cpp */; }; - 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */; }; - 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */; }; - 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */; }; - 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */; }; - 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */; }; - 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */; }; - 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */; }; - 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */; }; - 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */; }; - 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */; }; - 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD7D14A99EEF000B1711 /* disk.cpp */; }; - 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */; }; - 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8614A99EEF000B1711 /* emul_op.cpp */; }; - 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8914A99EEF000B1711 /* ether.cpp */; }; - 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8C14A99EEF000B1711 /* extfs.cpp */; }; - 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */; }; - 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE0514A99EEF000B1711 /* macos_util.cpp */; }; - 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */; }; - 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */; }; - 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */ = {isa = PBXBuildFile; fileRef = 0856CE8314A99EF0000B1711 /* SheepShaver.icns */; }; - 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */; }; - 0856D05B14A99EF1000B1711 /* main.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8814A99EF0000B1711 /* main.cpp */; }; - 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8914A99EF0000B1711 /* name_registry.cpp */; }; - 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */; }; - 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8B14A99EF0000B1711 /* prefs.cpp */; }; - 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */; }; - 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */; }; - 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE8E14A99EF0000B1711 /* scsi.cpp */; }; - 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */; }; - 0856D06614A99EF1000B1711 /* serial.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CE9514A99EF0000B1711 /* serial.cpp */; }; - 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC014A99EF0000B1711 /* sony.cpp */; }; - 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC114A99EF0000B1711 /* thunks.cpp */; }; - 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC214A99EF0000B1711 /* timer.cpp */; }; - 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */; }; - 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEE314A99EF0000B1711 /* ether_unix.cpp */; }; - 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CEFB14A99EF0000B1711 /* main_unix.cpp */; }; - 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */; }; - 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */; }; - 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */; }; - 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6414A99EF0000B1711 /* sshpty.c */; }; - 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6614A99EF0000B1711 /* strlcpy.c */; }; - 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6814A99EF0000B1711 /* sys_unix.cpp */; }; - 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */; }; - 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */; }; - 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */; }; - 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7714A99EF0000B1711 /* user_strings.cpp */; }; - 0856D11814A99EF1000B1711 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CF7814A99EF0000B1711 /* video.cpp */; }; - 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 0856CFC014A99EF0000B1711 /* xpram.cpp */; }; - 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 0856D21414A9A6C6000B1711 /* IOKit.framework */; }; - 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */ = {isa = PBXBuildFile; fileRef = 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */; }; - 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0856D31214A9A704000B1711 /* VMSettingsController.mm */; }; - 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 0873A80114AC515D004F12B7 /* utils_macosx.mm */; }; - 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91B71B780FFC00825F7F /* sigsegv.cpp */; }; - 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91B91B780FFC00825F7F /* video_blit.cpp */; }; - 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */; }; - 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */; }; - 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */; }; - 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */ = {isa = PBXBuildFile; fileRef = 3D2C25B4221092BA00B635DE /* SheepVM.icns */; }; - 5D3967C02328D315003925D6 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D3967BF2328D315003925D6 /* adb.cpp */; }; - 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB3F225584D000FF8E81 /* cdrom.cpp */; }; - 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */; }; - 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */ = {isa = PBXBuildFile; fileRef = 5D55CB442255B50E00FF8E81 /* bincue_unix.h */; }; - 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */; }; - 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */; }; - 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */; }; - 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */; }; - 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */; }; - 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95042255C822004D0E79 /* CoreAudio.framework */; }; - 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 5DDE95062255C844004D0E79 /* AudioUnit.framework */; }; - 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; - 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */; }; - 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */; }; - 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */ = {isa = PBXBuildFile; fileRef = 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */; }; - 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; - 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */; }; - 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */; }; - A7B1921418C35D4700791D8D /* DiskType.m in Sources */ = {isa = PBXBuildFile; fileRef = A7B1921318C35D4700791D8D /* DiskType.m */; }; - E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */; }; - E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */ = {isa = PBXBuildFile; fileRef = E4150D1120D557820077C51A /* SDL2.framework */; settings = {ATTRIBUTES = (CodeSignOnCopy, RemoveHeadersOnCopy, ); }; }; - E41936C420CFE64D003A7654 /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E41936C320CFE64D003A7654 /* SDLMain.m */; }; - E4202603241250EE000508DF /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E4202602241250EE000508DF /* runtool.c */; }; - E420260524125182000508DF /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420260424125182000508DF /* Security.framework */; }; - E420260B24125442000508DF /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E420260A2412540D000508DF /* etherhelpertool */; }; - E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; - E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; - E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; - E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; - E44C460720D262B0000583AE /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DF20D262AD000583AE /* ip_icmp.c */; }; - E44C460820D262B0000583AE /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E44C45E220D262AE000583AE /* VERSION */; }; - E44C460920D262B0000583AE /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E520D262AE000583AE /* tcp_input.c */; }; - E44C460A20D262B0000583AE /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E620D262AE000583AE /* misc.c */; }; - E44C460B20D262B0000583AE /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E920D262AE000583AE /* debug.c */; }; - E44C460C20D262B0000583AE /* tcp_subr.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EA20D262AE000583AE /* tcp_subr.c */; }; - E44C460D20D262B0000583AE /* udp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45EB20D262AE000583AE /* udp.c */; }; - E44C460E20D262B0000583AE /* sbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45ED20D262AE000583AE /* sbuf.c */; }; - E44C460F20D262B0000583AE /* COPYRIGHT in Resources */ = {isa = PBXBuildFile; fileRef = E44C45F020D262AE000583AE /* COPYRIGHT */; }; - E44C461020D262B0000583AE /* slirp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F120D262AE000583AE /* slirp.c */; }; - E44C461120D262B0000583AE /* tcp_timer.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45F520D262AF000583AE /* tcp_timer.c */; }; - E44C461220D262B0000583AE /* socket.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FC20D262AF000583AE /* socket.c */; }; - E44C461320D262B0000583AE /* bootp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45FF20D262AF000583AE /* bootp.c */; }; - E44C461420D262B0000583AE /* ip_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460020D262AF000583AE /* ip_input.c */; }; - E44C461520D262B0000583AE /* ip_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460120D262AF000583AE /* ip_output.c */; }; - E44C461620D262B0000583AE /* if.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460220D262AF000583AE /* if.c */; }; - E44C461720D262B0000583AE /* cksum.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460320D262AF000583AE /* cksum.c */; }; - E44C461820D262B0000583AE /* tcp_output.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C460420D262AF000583AE /* tcp_output.c */; }; - E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */; }; - E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */; }; - E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */ = {isa = PBXBuildFile; fileRef = E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */; }; - E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4CBF46020CFC451009F40CC /* video_sdl.cpp */; }; -/* End PBXBuildFile section */ - -/* Begin PBXContainerItemProxy section */ - 0846E4A614B1253500574779 /* PBXContainerItemProxy */ = { - isa = PBXContainerItemProxy; - containerPortal = 0856CCAE14A99DE0000B1711 /* Project object */; - proxyType = 1; - remoteGlobalIDString = 0846E49914B124DE00574779; - remoteInfo = kpx_cpu; - }; -/* End PBXContainerItemProxy section */ - -/* Begin PBXCopyFilesBuildPhase section */ - E413A40820CF7EF800FBE967 /* Embed Frameworks */ = { - isa = PBXCopyFilesBuildPhase; - buildActionMask = 2147483647; - dstPath = ""; - dstSubfolderSpec = 10; - files = ( - E4150D1220D557820077C51A /* SDL2.framework in Embed Frameworks */, - ); - name = "Embed Frameworks"; - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXCopyFilesBuildPhase section */ - -/* Begin PBXFileReference section */ - 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; - 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops.hpp"; path = "dyngen_precompiled/basic-dyngen-ops.hpp"; sourceTree = ""; }; - 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_32.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_32.hpp"; sourceTree = ""; }; - 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops.hpp"; sourceTree = ""; }; - 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = "ppc-execute-impl.cpp"; path = "dyngen_precompiled/ppc-execute-impl.cpp"; sourceTree = ""; }; - 08163337158C121000C449F9 /* dis-asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dis-asm.h"; sourceTree = ""; }; - 08163338158C121000C449F9 /* ppc-dis.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = "ppc-dis.c"; sourceTree = ""; }; - 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; - 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk_sparsebundle.cpp; path = ../Unix/disk_sparsebundle.cpp; sourceTree = SOURCE_ROOT; }; - 083E370B16EFE85000CCCA59 /* disk_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = disk_unix.h; path = ../Unix/disk_unix.h; sourceTree = SOURCE_ROOT; }; - 083E372016EFE87200CCCA59 /* tinyxml2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = tinyxml2.cpp; path = ../Unix/tinyxml2.cpp; sourceTree = SOURCE_ROOT; }; - 083E372116EFE87200CCCA59 /* tinyxml2.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tinyxml2.h; path = ../Unix/tinyxml2.h; sourceTree = SOURCE_ROOT; }; - 0846E49A14B124DE00574779 /* libkpx_cpu.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libkpx_cpu.a; sourceTree = BUILT_PRODUCTS_DIR; }; - 0846E52314B129DA00574779 /* ppc_asm.S */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.asm; path = ppc_asm.S; sourceTree = ""; }; - 0846E55214B12B0D00574779 /* paranoia.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = paranoia.cpp; sourceTree = ""; }; - 0856CCC114A99E1C000B1711 /* SheepShaver.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = SheepShaver.app; sourceTree = BUILT_PRODUCTS_DIR; }; - 0856CD7D14A99EEF000B1711 /* disk.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = disk.cpp; path = ../disk.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; - 0856CD8614A99EEF000B1711 /* emul_op.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = emul_op.cpp; path = ../emul_op.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD8914A99EEF000B1711 /* ether.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = ether.cpp; path = ../ether.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD8C14A99EEF000B1711 /* extfs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = extfs.cpp; path = ../extfs.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = gfxaccel.cpp; path = ../gfxaccel.cpp; sourceTree = SOURCE_ROOT; }; - 0856CD8F14A99EEF000B1711 /* about_window.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = about_window.h; sourceTree = ""; }; - 0856CD9014A99EEF000B1711 /* adb.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = adb.h; sourceTree = ""; }; - 0856CD9114A99EEF000B1711 /* audio.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio.h; sourceTree = ""; }; - 0856CD9214A99EEF000B1711 /* audio_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = audio_defs.h; sourceTree = ""; }; - 0856CD9314A99EEF000B1711 /* cdrom.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cdrom.h; sourceTree = ""; }; - 0856CD9414A99EEF000B1711 /* clip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = clip.h; sourceTree = ""; }; - 0856CD9514A99EEF000B1711 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; - 0856CD9614A99EEF000B1711 /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = debug.h; sourceTree = ""; }; - 0856CD9714A99EEF000B1711 /* disk.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = disk.h; sourceTree = ""; }; - 0856CD9814A99EEF000B1711 /* emul_op.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = emul_op.h; sourceTree = ""; }; - 0856CD9914A99EEF000B1711 /* ether.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether.h; sourceTree = ""; }; - 0856CD9A14A99EEF000B1711 /* ether_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ether_defs.h; sourceTree = ""; }; - 0856CD9B14A99EEF000B1711 /* extfs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs.h; sourceTree = ""; }; - 0856CD9C14A99EEF000B1711 /* extfs_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = extfs_defs.h; sourceTree = ""; }; - 0856CD9D14A99EEF000B1711 /* macos_util.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util.h; sourceTree = ""; }; - 0856CD9E14A99EEF000B1711 /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = main.h; sourceTree = ""; }; - 0856CD9F14A99EEF000B1711 /* name_registry.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = name_registry.h; sourceTree = ""; }; - 0856CDA014A99EEF000B1711 /* prefs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs.h; sourceTree = ""; }; - 0856CDA114A99EEF000B1711 /* prefs_editor.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = prefs_editor.h; sourceTree = ""; }; - 0856CDA214A99EEF000B1711 /* rom_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rom_patches.h; sourceTree = ""; }; - 0856CDA314A99EEF000B1711 /* rsrc_patches.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rsrc_patches.h; sourceTree = ""; }; - 0856CDA414A99EEF000B1711 /* scsi.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = scsi.h; sourceTree = ""; }; - 0856CDA514A99EEF000B1711 /* serial.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial.h; sourceTree = ""; }; - 0856CDA614A99EEF000B1711 /* serial_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = serial_defs.h; sourceTree = ""; }; - 0856CDA714A99EEF000B1711 /* sony.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sony.h; sourceTree = ""; }; - 0856CDA814A99EEF000B1711 /* sys.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sys.h; sourceTree = ""; }; - 0856CDA914A99EEF000B1711 /* thunks.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = thunks.h; sourceTree = ""; }; - 0856CDAA14A99EEF000B1711 /* timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = timer.h; sourceTree = ""; }; - 0856CDAB14A99EEF000B1711 /* user_strings.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings.h; sourceTree = ""; }; - 0856CDAC14A99EEF000B1711 /* version.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = version.h; sourceTree = ""; }; - 0856CDAD14A99EEF000B1711 /* video.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video.h; sourceTree = ""; }; - 0856CDAE14A99EEF000B1711 /* video_defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = video_defs.h; sourceTree = ""; }; - 0856CDAF14A99EEF000B1711 /* xlowmem.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xlowmem.h; sourceTree = ""; }; - 0856CDB014A99EEF000B1711 /* xpram.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = xpram.h; sourceTree = ""; }; - 0856CDB314A99EEF000B1711 /* a.out-defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "a.out-defs.h"; sourceTree = ""; }; - 0856CDB414A99EEF000B1711 /* basic-blockinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-blockinfo.hpp"; sourceTree = ""; }; - 0856CDB514A99EEF000B1711 /* basic-cpu.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-cpu.hpp"; sourceTree = ""; }; - 0856CDB614A99EEF000B1711 /* basic-plugin.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-plugin.hpp"; sourceTree = ""; }; - 0856CDB714A99EEF000B1711 /* block-alloc.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "block-alloc.hpp"; sourceTree = ""; }; - 0856CDB814A99EEF000B1711 /* elf-defs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "elf-defs.h"; sourceTree = ""; }; - 0856CDB914A99EEF000B1711 /* nvmemfun.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = nvmemfun.hpp; sourceTree = ""; }; - 0856CDBA14A99EEF000B1711 /* task-plugin.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "task-plugin.hpp"; sourceTree = ""; }; - 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sheepshaver_glue.cpp; sourceTree = ""; }; - 0856CDBE14A99EEF000B1711 /* block-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "block-cache.hpp"; sourceTree = ""; }; - 0856CDC114A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; - 0856CDC214A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; - 0856CDC314A99EEF000B1711 /* jit-target-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-codegen.hpp"; sourceTree = ""; }; - 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "basic-dyngen.cpp"; sourceTree = ""; }; - 0856CDC614A99EEF000B1711 /* basic-dyngen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "basic-dyngen.hpp"; sourceTree = ""; }; - 0856CDCA14A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; - 0856CDCB14A99EEF000B1711 /* dyngen-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-exec.h"; sourceTree = ""; }; - 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "jit-cache.cpp"; sourceTree = ""; }; - 0856CDCE14A99EEF000B1711 /* jit-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-cache.hpp"; sourceTree = ""; }; - 0856CDCF14A99EEF000B1711 /* jit-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-codegen.hpp"; sourceTree = ""; }; - 0856CDD014A99EEF000B1711 /* jit-config.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-config.hpp"; sourceTree = ""; }; - 0856CDD114A99EEF000B1711 /* jit-target-dispatch.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "jit-target-dispatch.h"; sourceTree = ""; }; - 0856CDD314A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; - 0856CDD414A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; - 0856CDD614A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; - 0856CDD714A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; - 0856CDD914A99EEF000B1711 /* codegen_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = codegen_x86.h; sourceTree = ""; }; - 0856CDDA14A99EEF000B1711 /* dyngen-target-exec.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "dyngen-target-exec.h"; sourceTree = ""; }; - 0856CDDB14A99EEF000B1711 /* jit-target-cache.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-cache.hpp"; sourceTree = ""; }; - 0856CDDC14A99EEF000B1711 /* jit-target-codegen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "jit-target-codegen.hpp"; sourceTree = ""; }; - 0856CDDE14A99EEF000B1711 /* genexec.pl */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.perl; path = genexec.pl; sourceTree = ""; }; - 0856CDDF14A99EEF000B1711 /* ppc-bitfields.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-bitfields.hpp"; sourceTree = ""; }; - 0856CDE014A99EEF000B1711 /* ppc-blockinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-blockinfo.hpp"; sourceTree = ""; }; - 0856CDE114A99EEF000B1711 /* ppc-config.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-config.hpp"; sourceTree = ""; }; - 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-cpu.cpp"; sourceTree = ""; }; - 0856CDE314A99EEF000B1711 /* ppc-cpu.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-cpu.hpp"; sourceTree = ""; }; - 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-decode.cpp"; sourceTree = ""; }; - 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-dyngen.cpp"; sourceTree = ""; }; - 0856CDE714A99EEF000B1711 /* ppc-dyngen.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-dyngen.hpp"; sourceTree = ""; }; - 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-execute.cpp"; sourceTree = ""; }; - 0856CDE914A99EEF000B1711 /* ppc-execute.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-execute.hpp"; sourceTree = ""; }; - 0856CDEA14A99EEF000B1711 /* ppc-instructions.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-instructions.hpp"; sourceTree = ""; }; - 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-jit.cpp"; sourceTree = ""; }; - 0856CDEC14A99EEF000B1711 /* ppc-jit.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-jit.hpp"; sourceTree = ""; }; - 0856CDED14A99EEF000B1711 /* ppc-operands.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-operands.hpp"; sourceTree = ""; }; - 0856CDEE14A99EEF000B1711 /* ppc-operations.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-operations.hpp"; sourceTree = ""; }; - 0856CDEF14A99EEF000B1711 /* ppc-registers.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "ppc-registers.hpp"; sourceTree = ""; }; - 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-translate.cpp"; sourceTree = ""; }; - 0856CDF114A99EEF000B1711 /* spcflags.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = spcflags.hpp; sourceTree = ""; }; - 0856CDF214A99EEF000B1711 /* vm.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = vm.hpp; sourceTree = ""; }; - 0856CDF714A99EEF000B1711 /* ieeefp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ieeefp.cpp; sourceTree = ""; }; - 0856CDF814A99EEF000B1711 /* ieeefp.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = ieeefp.hpp; sourceTree = ""; }; - 0856CDFD14A99EEF000B1711 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; - 0856CDFE14A99EEF000B1711 /* mathlib.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = mathlib.hpp; sourceTree = ""; }; - 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "utils-cpuinfo.cpp"; sourceTree = ""; }; - 0856CE0314A99EEF000B1711 /* utils-cpuinfo.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-cpuinfo.hpp"; sourceTree = ""; }; - 0856CE0414A99EEF000B1711 /* utils-sentinel.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = "utils-sentinel.hpp"; sourceTree = ""; }; - 0856CE0514A99EEF000B1711 /* macos_util.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = macos_util.cpp; path = ../macos_util.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = extfs_macosx.cpp; sourceTree = ""; }; - 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = macos_util_macosx.h; sourceTree = ""; }; - 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = prefs_macosx.mm; sourceTree = ""; }; - 0856CE8314A99EF0000B1711 /* SheepShaver.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepShaver.icns; sourceTree = ""; }; - 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; - 0856CE8814A99EF0000B1711 /* main.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = main.cpp; path = ../main.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8914A99EF0000B1711 /* name_registry.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = name_registry.cpp; path = ../name_registry.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs_items.cpp; path = ../prefs_items.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8B14A99EF0000B1711 /* prefs.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = prefs.cpp; path = ../prefs.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rom_patches.cpp; path = ../rom_patches.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rsrc_patches.cpp; path = ../rsrc_patches.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE8E14A99EF0000B1711 /* scsi.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = scsi.cpp; path = ../scsi.cpp; sourceTree = SOURCE_ROOT; }; - 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = audio_sdl.cpp; sourceTree = ""; }; - 0856CE9114A99EF0000B1711 /* keycodes */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = keycodes; sourceTree = ""; }; - 0856CE9514A99EF0000B1711 /* serial.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = serial.cpp; path = ../serial.cpp; sourceTree = SOURCE_ROOT; }; - 0856CEC014A99EF0000B1711 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = SOURCE_ROOT; }; - 0856CEC114A99EF0000B1711 /* thunks.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = thunks.cpp; path = ../thunks.cpp; sourceTree = SOURCE_ROOT; }; - 0856CEC214A99EF0000B1711 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = SOURCE_ROOT; }; - 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = about_window_unix.cpp; sourceTree = ""; }; - 0856CEE314A99EF0000B1711 /* ether_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = ether_unix.cpp; sourceTree = ""; }; - 0856CEFB14A99EF0000B1711 /* main_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = main_unix.cpp; sourceTree = ""; }; - 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_unix.cpp; sourceTree = ""; }; - 0856CF5B14A99EF0000B1711 /* rpc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rpc.h; sourceTree = ""; }; - 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rpc_unix.cpp; sourceTree = ""; }; - 0856CF5D14A99EF0000B1711 /* semaphore.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = semaphore.h; sourceTree = ""; }; - 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_unix.cpp; sourceTree = ""; }; - 0856CF6114A99EF0000B1711 /* sigregs.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sigregs.h; sourceTree = ""; }; - 0856CF6414A99EF0000B1711 /* sshpty.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = sshpty.c; sourceTree = ""; }; - 0856CF6514A99EF0000B1711 /* sshpty.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sshpty.h; sourceTree = ""; }; - 0856CF6614A99EF0000B1711 /* strlcpy.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = strlcpy.c; sourceTree = ""; }; - 0856CF6714A99EF0000B1711 /* strlcpy.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = strlcpy.h; sourceTree = ""; }; - 0856CF6814A99EF0000B1711 /* sys_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_unix.cpp; sourceTree = ""; }; - 0856CF6914A99EF0000B1711 /* sysdeps.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = sysdeps.h; sourceTree = ""; }; - 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = timer_unix.cpp; sourceTree = ""; }; - 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; - 0856CF6D14A99EF0000B1711 /* user_strings_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = user_strings_unix.h; sourceTree = ""; }; - 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_unix.cpp; sourceTree = ""; }; - 0856CF7714A99EF0000B1711 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = SOURCE_ROOT; }; - 0856CF7814A99EF0000B1711 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = SOURCE_ROOT; }; - 0856CFC014A99EF0000B1711 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = SOURCE_ROOT; }; - 0856D21414A9A6C6000B1711 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = /System/Library/Frameworks/IOKit.framework; sourceTree = ""; }; - 0856D30814A9A704000B1711 /* English */ = {isa = PBXFileReference; lastKnownFileType = wrapper.nib; name = English; path = English.lproj/VMSettingsWindow.nib; sourceTree = ""; }; - 0856D31114A9A704000B1711 /* VMSettingsController.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = VMSettingsController.h; sourceTree = ""; }; - 0856D31214A9A704000B1711 /* VMSettingsController.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = VMSettingsController.mm; sourceTree = ""; }; - 0873A53F14AAF18E004F12B7 /* cxxdemangle.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = cxxdemangle.cpp; sourceTree = ""; }; - 0873A54014AAF18E004F12B7 /* cxxdemangle.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cxxdemangle.h; sourceTree = ""; }; - 0873A54114AAF18E004F12B7 /* dyngen.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = dyngen.c; sourceTree = ""; }; - 0873A5D514AB80CA004F12B7 /* basic-dyngen-ops.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "basic-dyngen-ops.cpp"; sourceTree = ""; }; - 0873A5D714AB80E3004F12B7 /* ppc-dyngen-ops.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = "ppc-dyngen-ops.cpp"; sourceTree = ""; }; - 0873A76614ABD151004F12B7 /* config-macosx-x86_64.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-x86_64.h"; sourceTree = ""; }; - 0873A76714ABD151004F12B7 /* config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = config.h; sourceTree = ""; }; - 0873A80014AC515D004F12B7 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; - 0873A80114AC515D004F12B7 /* utils_macosx.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = utils_macosx.mm; sourceTree = ""; }; - 0879BD5B15A88F6300DC277D /* pict.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = pict.h; sourceTree = ""; }; - 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-ppc_32.h"; sourceTree = ""; }; - 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = "config-macosx-x86_32.h"; sourceTree = ""; }; - 0879BDAF15A8B1AA00DC277D /* Info.plist.in */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.xml; path = Info.plist.in; sourceTree = ""; }; - 087B91B71B780FFC00825F7F /* sigsegv.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sigsegv.cpp; path = ../CrossPlatform/sigsegv.cpp; sourceTree = SOURCE_ROOT; }; - 087B91B81B780FFC00825F7F /* sigsegv.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = sigsegv.h; path = ../CrossPlatform/sigsegv.h; sourceTree = SOURCE_ROOT; }; - 087B91B91B780FFC00825F7F /* video_blit.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_blit.cpp; path = ../CrossPlatform/video_blit.cpp; sourceTree = SOURCE_ROOT; }; - 087B91BA1B780FFC00825F7F /* video_blit.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = video_blit.h; path = ../CrossPlatform/video_blit.h; sourceTree = SOURCE_ROOT; }; - 087B91BB1B780FFC00825F7F /* video_vosf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = video_vosf.h; path = ../CrossPlatform/video_vosf.h; sourceTree = SOURCE_ROOT; }; - 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = vm_alloc.cpp; path = ../CrossPlatform/vm_alloc.cpp; sourceTree = SOURCE_ROOT; }; - 087B91BD1B780FFC00825F7F /* vm_alloc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = vm_alloc.h; path = ../CrossPlatform/vm_alloc.h; sourceTree = SOURCE_ROOT; }; - 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Cocoa.framework; path = /System/Library/Frameworks/Cocoa.framework; sourceTree = ""; }; - 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Carbon.framework; path = /System/Library/Frameworks/Carbon.framework; sourceTree = ""; }; - 3D2C25B4221092BA00B635DE /* SheepVM.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; path = SheepVM.icns; sourceTree = ""; }; - 5D3967BF2328D315003925D6 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../../../BasiliskII/src/adb.cpp; sourceTree = ""; }; - 5D55CB3F225584D000FF8E81 /* cdrom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cdrom.cpp; path = ../../../BasiliskII/src/cdrom.cpp; sourceTree = ""; }; - 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = bincue_unix.cpp; path = ../../../BasiliskII/src/Unix/bincue_unix.cpp; sourceTree = ""; }; - 5D55CB442255B50E00FF8E81 /* bincue_unix.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bincue_unix.h; path = ../../../BasiliskII/src/Unix/bincue_unix.h; sourceTree = ""; }; - 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = MacOSX_sound_if.h; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.h; sourceTree = ""; }; - 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = MacOSX_sound_if.cpp; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp; sourceTree = ""; }; - 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; - 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioBackEnd.cpp; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp; sourceTree = ""; }; - 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; - 5DDE95042255C822004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; - 5DDE95062255C844004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; - 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioDevice.cpp; path = ../../../BasiliskII/src/MacOSX/AudioDevice.cpp; sourceTree = ""; }; - 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; - 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = audio_defs_macosx.h; path = ../../../BasiliskII/src/MacOSX/audio_defs_macosx.h; sourceTree = ""; }; - 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio_macosx.cpp; path = ../../../BasiliskII/src/MacOSX/audio_macosx.cpp; sourceTree = ""; }; - 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../../../BasiliskII/src/audio.cpp; sourceTree = ""; }; - A7B1921218C35D4700791D8D /* DiskType.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = DiskType.h; sourceTree = ""; }; - A7B1921318C35D4700791D8D /* DiskType.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = DiskType.m; sourceTree = ""; }; - E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl2.cpp; path = ../../../BasiliskII/src/SDL/video_sdl2.cpp; sourceTree = ""; }; - E4150D1120D557820077C51A /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; - E41936C220CFE64D003A7654 /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = SDLMain.h; path = ../../../BasiliskII/src/SDL/SDLMain.h; sourceTree = ""; }; - E41936C320CFE64D003A7654 /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; name = SDLMain.m; path = ../../../BasiliskII/src/SDL/SDLMain.m; sourceTree = ""; }; - E4202600241250E2000508DF /* etherhelpertool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; - E4202602241250EE000508DF /* runtool.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = runtool.c; sourceTree = ""; }; - E420260424125182000508DF /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; - E420260A2412540D000508DF /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; - E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; - E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; - E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; - E44C45DC20D262AD000583AE /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../../BasiliskII/src/slirp/tftp.c; sourceTree = ""; }; - E44C45DD20D262AD000583AE /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../../BasiliskII/src/slirp/mbuf.c; sourceTree = ""; }; - E44C45DE20D262AD000583AE /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../../BasiliskII/src/slirp/tftp.h; sourceTree = ""; }; - E44C45DF20D262AD000583AE /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../../BasiliskII/src/slirp/ip_icmp.c; sourceTree = ""; }; - E44C45E020D262AE000583AE /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../../BasiliskII/src/slirp/bootp.h; sourceTree = ""; }; - E44C45E120D262AE000583AE /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../../BasiliskII/src/slirp/tcpip.h; sourceTree = ""; }; - E44C45E220D262AE000583AE /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = VERSION; path = ../../../BasiliskII/src/slirp/VERSION; sourceTree = ""; }; - E44C45E320D262AE000583AE /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../../BasiliskII/src/slirp/ip_icmp.h; sourceTree = ""; }; - E44C45E420D262AE000583AE /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../../BasiliskII/src/slirp/slirp_config.h; sourceTree = ""; }; - E44C45E520D262AE000583AE /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../../BasiliskII/src/slirp/tcp_input.c; sourceTree = ""; }; - E44C45E620D262AE000583AE /* misc.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = misc.c; path = ../../../BasiliskII/src/slirp/misc.c; sourceTree = ""; }; - E44C45E720D262AE000583AE /* udp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = udp.h; path = ../../../BasiliskII/src/slirp/udp.h; sourceTree = ""; }; - E44C45E820D262AE000583AE /* main.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = main.h; path = ../../../BasiliskII/src/slirp/main.h; sourceTree = ""; }; - E44C45E920D262AE000583AE /* debug.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = debug.c; path = ../../../BasiliskII/src/slirp/debug.c; sourceTree = ""; }; - E44C45EA20D262AE000583AE /* tcp_subr.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_subr.c; path = ../../../BasiliskII/src/slirp/tcp_subr.c; sourceTree = ""; }; - E44C45EB20D262AE000583AE /* udp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = udp.c; path = ../../../BasiliskII/src/slirp/udp.c; sourceTree = ""; }; - E44C45EC20D262AE000583AE /* mbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = mbuf.h; path = ../../../BasiliskII/src/slirp/mbuf.h; sourceTree = ""; }; - E44C45ED20D262AE000583AE /* sbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = sbuf.c; path = ../../../BasiliskII/src/slirp/sbuf.c; sourceTree = ""; }; - E44C45EE20D262AE000583AE /* ctl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ctl.h; path = ../../../BasiliskII/src/slirp/ctl.h; sourceTree = ""; }; - E44C45EF20D262AE000583AE /* slirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp.h; path = ../../../BasiliskII/src/slirp/slirp.h; sourceTree = ""; }; - E44C45F020D262AE000583AE /* COPYRIGHT */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = COPYRIGHT; path = ../../../BasiliskII/src/slirp/COPYRIGHT; sourceTree = ""; }; - E44C45F120D262AE000583AE /* slirp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = slirp.c; path = ../../../BasiliskII/src/slirp/slirp.c; sourceTree = ""; }; - E44C45F220D262AE000583AE /* socket.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = socket.h; path = ../../../BasiliskII/src/slirp/socket.h; sourceTree = ""; }; - E44C45F320D262AF000583AE /* if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = if.h; path = ../../../BasiliskII/src/slirp/if.h; sourceTree = ""; }; - E44C45F420D262AF000583AE /* misc.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = misc.h; path = ../../../BasiliskII/src/slirp/misc.h; sourceTree = ""; }; - E44C45F520D262AF000583AE /* tcp_timer.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_timer.c; path = ../../../BasiliskII/src/slirp/tcp_timer.c; sourceTree = ""; }; - E44C45F620D262AF000583AE /* sbuf.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = sbuf.h; path = ../../../BasiliskII/src/slirp/sbuf.h; sourceTree = ""; }; - E44C45F720D262AF000583AE /* tcp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp.h; path = ../../../BasiliskII/src/slirp/tcp.h; sourceTree = ""; }; - E44C45F820D262AF000583AE /* ip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip.h; path = ../../../BasiliskII/src/slirp/ip.h; sourceTree = ""; }; - E44C45F920D262AF000583AE /* debug.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = debug.h; path = ../../../BasiliskII/src/slirp/debug.h; sourceTree = ""; }; - E44C45FA20D262AF000583AE /* tcp_timer.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_timer.h; path = ../../../BasiliskII/src/slirp/tcp_timer.h; sourceTree = ""; }; - E44C45FB20D262AF000583AE /* tcp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcp_var.h; path = ../../../BasiliskII/src/slirp/tcp_var.h; sourceTree = ""; }; - E44C45FC20D262AF000583AE /* socket.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = socket.c; path = ../../../BasiliskII/src/slirp/socket.c; sourceTree = ""; }; - E44C45FD20D262AF000583AE /* libslirp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = libslirp.h; path = ../../../BasiliskII/src/slirp/libslirp.h; sourceTree = ""; }; - E44C45FE20D262AF000583AE /* icmp_var.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = icmp_var.h; path = ../../../BasiliskII/src/slirp/icmp_var.h; sourceTree = ""; }; - E44C45FF20D262AF000583AE /* bootp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = bootp.c; path = ../../../BasiliskII/src/slirp/bootp.c; sourceTree = ""; }; - E44C460020D262AF000583AE /* ip_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_input.c; path = ../../../BasiliskII/src/slirp/ip_input.c; sourceTree = ""; }; - E44C460120D262AF000583AE /* ip_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_output.c; path = ../../../BasiliskII/src/slirp/ip_output.c; sourceTree = ""; }; - E44C460220D262AF000583AE /* if.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = if.c; path = ../../../BasiliskII/src/slirp/if.c; sourceTree = ""; }; - E44C460320D262AF000583AE /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../../BasiliskII/src/slirp/cksum.c; sourceTree = ""; }; - E44C460420D262AF000583AE /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../../BasiliskII/src/slirp/tcp_output.c; sourceTree = ""; }; - E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; - E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; - E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; - E4CBF46020CFC451009F40CC /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl.cpp; path = ../../../BasiliskII/src/SDL/video_sdl.cpp; sourceTree = ""; }; -/* End PBXFileReference section */ - -/* Begin PBXFrameworksBuildPhase section */ - 0846E49814B124DE00574779 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0856CCBF14A99E1C000B1711 /* Frameworks */ = { - isa = PBXFrameworksBuildPhase; - buildActionMask = 2147483647; - files = ( - 5DDE95072255C844004D0E79 /* AudioUnit.framework in Frameworks */, - 5DDE95052255C822004D0E79 /* CoreAudio.framework in Frameworks */, - 5DDE95032255C7FE004D0E79 /* AudioToolbox.framework in Frameworks */, - E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */, - E420260524125182000508DF /* Security.framework in Frameworks */, - 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, - 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, - 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXFrameworksBuildPhase section */ - -/* Begin PBXGroup section */ - 08003F841E0624BD00A3ADAB /* dyngen_precompiled */ = { - isa = PBXGroup; - children = ( - 08003F851E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp */, - E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */, - 08003F871E0624D100A3ADAB /* basic-dyngen-ops.hpp */, - 08003F881E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp */, - E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */, - 08003F8A1E0624D100A3ADAB /* ppc-dyngen-ops.hpp */, - 08003F8B1E0624D100A3ADAB /* ppc-execute-impl.cpp */, - ); - name = dyngen_precompiled; - sourceTree = ""; - }; - 082AC25614AA59DA00071F5E /* Darwin */ = { - isa = PBXGroup; - children = ( - E4302EE21FBFE7FA00A5B500 /* lowmem.c */, - ); - name = Darwin; - sourceTree = ""; - }; - 0856CCAC14A99DE0000B1711 = { - isa = PBXGroup; - children = ( - E4150D1120D557820077C51A /* SDL2.framework */, - 0856CCC814A99E30000B1711 /* Sources */, - 08CD42DF14B7B865009CA2A2 /* Frameworks */, - 0856CCC214A99E1C000B1711 /* Products */, - E420260924125403000508DF /* Generated */, - ); - sourceTree = ""; - }; - 0856CCC214A99E1C000B1711 /* Products */ = { - isa = PBXGroup; - children = ( - 0856CCC114A99E1C000B1711 /* SheepShaver.app */, - 0846E49A14B124DE00574779 /* libkpx_cpu.a */, - ); - name = Products; - sourceTree = ""; - }; - 0856CCC814A99E30000B1711 /* Sources */ = { - isa = PBXGroup; - children = ( - 087B91B11B780EC900825F7F /* CrossPlatform */, - 5D3967BF2328D315003925D6 /* adb.cpp */, - 5DF4CB7E22B5BD5D00512A86 /* audio.cpp */, - 5D55CB3F225584D000FF8E81 /* cdrom.cpp */, - 0856CD7D14A99EEF000B1711 /* disk.cpp */, - 0856CD7E14A99EEF000B1711 /* dummy */, - 0856CD8614A99EEF000B1711 /* emul_op.cpp */, - 0856CD8914A99EEF000B1711 /* ether.cpp */, - 0856CD8C14A99EEF000B1711 /* extfs.cpp */, - 0856CD8D14A99EEF000B1711 /* gfxaccel.cpp */, - 0856CD8E14A99EEF000B1711 /* include */, - 0856CDB114A99EEF000B1711 /* kpx_cpu */, - 0856CE0514A99EEF000B1711 /* macos_util.cpp */, - 0856CE0614A99EEF000B1711 /* MacOSX */, - 0856CE8814A99EF0000B1711 /* main.cpp */, - 0856CE8914A99EF0000B1711 /* name_registry.cpp */, - E444DC1420C8F06700DD29C9 /* pict.c */, - 0856CE8A14A99EF0000B1711 /* prefs_items.cpp */, - 0856CE8B14A99EF0000B1711 /* prefs.cpp */, - 0856CE8C14A99EF0000B1711 /* rom_patches.cpp */, - 0856CE8D14A99EF0000B1711 /* rsrc_patches.cpp */, - 0856CE8E14A99EF0000B1711 /* scsi.cpp */, - 0856CE8F14A99EF0000B1711 /* SDL */, - 0856CE9514A99EF0000B1711 /* serial.cpp */, - 0856CE9614A99EF0000B1711 /* slirp */, - 0856CEC014A99EF0000B1711 /* sony.cpp */, - 0856CEC114A99EF0000B1711 /* thunks.cpp */, - 0856CEC214A99EF0000B1711 /* timer.cpp */, - 0856CEC314A99EF0000B1711 /* Unix */, - 0856CF7714A99EF0000B1711 /* user_strings.cpp */, - 0856CF7814A99EF0000B1711 /* video.cpp */, - 0856CFC014A99EF0000B1711 /* xpram.cpp */, - ); - name = Sources; - sourceTree = ""; - usesTabs = 1; - }; - 0856CD7E14A99EEF000B1711 /* dummy */ = { - isa = PBXGroup; - children = ( - 082AC22C14AA52E900071F5E /* prefs_editor_dummy.cpp */, - 0856CD8414A99EEF000B1711 /* scsi_dummy.cpp */, - ); - name = dummy; - path = ../dummy; - sourceTree = SOURCE_ROOT; - }; - 0856CD8E14A99EEF000B1711 /* include */ = { - isa = PBXGroup; - children = ( - 0856CD8F14A99EEF000B1711 /* about_window.h */, - 0856CD9014A99EEF000B1711 /* adb.h */, - 0856CD9114A99EEF000B1711 /* audio.h */, - 0856CD9214A99EEF000B1711 /* audio_defs.h */, - 0856CD9314A99EEF000B1711 /* cdrom.h */, - 0856CD9414A99EEF000B1711 /* clip.h */, - 0856CD9514A99EEF000B1711 /* cpu_emulation.h */, - 0856CD9614A99EEF000B1711 /* debug.h */, - 0856CD9714A99EEF000B1711 /* disk.h */, - 0856CD9814A99EEF000B1711 /* emul_op.h */, - 0856CD9914A99EEF000B1711 /* ether.h */, - 0856CD9A14A99EEF000B1711 /* ether_defs.h */, - 0856CD9B14A99EEF000B1711 /* extfs.h */, - 0856CD9C14A99EEF000B1711 /* extfs_defs.h */, - 0856CD9D14A99EEF000B1711 /* macos_util.h */, - 0856CD9E14A99EEF000B1711 /* main.h */, - 0856CD9F14A99EEF000B1711 /* name_registry.h */, - 0879BD5B15A88F6300DC277D /* pict.h */, - 0856CDA014A99EEF000B1711 /* prefs.h */, - 0856CDA114A99EEF000B1711 /* prefs_editor.h */, - 0856CDA214A99EEF000B1711 /* rom_patches.h */, - 0856CDA314A99EEF000B1711 /* rsrc_patches.h */, - 0856CDA414A99EEF000B1711 /* scsi.h */, - 0856CDA514A99EEF000B1711 /* serial.h */, - 0856CDA614A99EEF000B1711 /* serial_defs.h */, - 0856CDA714A99EEF000B1711 /* sony.h */, - 0856CDA814A99EEF000B1711 /* sys.h */, - 0856CDA914A99EEF000B1711 /* thunks.h */, - 0856CDAA14A99EEF000B1711 /* timer.h */, - 0856CDAB14A99EEF000B1711 /* user_strings.h */, - 0856CDAC14A99EEF000B1711 /* version.h */, - 0856CDAD14A99EEF000B1711 /* video.h */, - 0856CDAE14A99EEF000B1711 /* video_defs.h */, - 0856CDAF14A99EEF000B1711 /* xlowmem.h */, - 0856CDB014A99EEF000B1711 /* xpram.h */, - ); - name = include; - path = ../include; - sourceTree = SOURCE_ROOT; - }; - 0856CDB114A99EEF000B1711 /* kpx_cpu */ = { - isa = PBXGroup; - children = ( - 08163337158C121000C449F9 /* dis-asm.h */, - 08163338158C121000C449F9 /* ppc-dis.c */, - 0856CDB214A99EEF000B1711 /* include */, - 0856CDBB14A99EEF000B1711 /* sheepshaver_glue.cpp */, - 0856CDBC14A99EEF000B1711 /* src */, - ); - name = kpx_cpu; - path = ../kpx_cpu; - sourceTree = SOURCE_ROOT; - }; - 0856CDB214A99EEF000B1711 /* include */ = { - isa = PBXGroup; - children = ( - 0856CDB314A99EEF000B1711 /* a.out-defs.h */, - 0856CDB414A99EEF000B1711 /* basic-blockinfo.hpp */, - 0856CDB514A99EEF000B1711 /* basic-cpu.hpp */, - 0856CDB614A99EEF000B1711 /* basic-plugin.hpp */, - 0856CDB714A99EEF000B1711 /* block-alloc.hpp */, - 0856CDB814A99EEF000B1711 /* elf-defs.h */, - 0856CDB914A99EEF000B1711 /* nvmemfun.hpp */, - 0856CDBA14A99EEF000B1711 /* task-plugin.hpp */, - ); - path = include; - sourceTree = ""; - }; - 0856CDBC14A99EEF000B1711 /* src */ = { - isa = PBXGroup; - children = ( - 0856CDBD14A99EEF000B1711 /* cpu */, - 0856CDF314A99EEF000B1711 /* mathlib */, - 0856CE0114A99EEF000B1711 /* utils */, - ); - path = src; - sourceTree = ""; - }; - 0856CDBD14A99EEF000B1711 /* cpu */ = { - isa = PBXGroup; - children = ( - 0856CDBE14A99EEF000B1711 /* block-cache.hpp */, - 0856CDBF14A99EEF000B1711 /* jit */, - 0856CDDD14A99EEF000B1711 /* ppc */, - 0856CDF114A99EEF000B1711 /* spcflags.hpp */, - 0856CDF214A99EEF000B1711 /* vm.hpp */, - ); - path = cpu; - sourceTree = ""; - }; - 0856CDBF14A99EEF000B1711 /* jit */ = { - isa = PBXGroup; - children = ( - 0856CDC014A99EEF000B1711 /* amd64 */, - 0856CDC514A99EEF000B1711 /* basic-dyngen.cpp */, - 0856CDC614A99EEF000B1711 /* basic-dyngen.hpp */, - 0873A5D514AB80CA004F12B7 /* basic-dyngen-ops.cpp */, - 0856CDC914A99EEF000B1711 /* dummy */, - 0873A54114AAF18E004F12B7 /* dyngen.c */, - 0856CDCB14A99EEF000B1711 /* dyngen-exec.h */, - 0873A53F14AAF18E004F12B7 /* cxxdemangle.cpp */, - 0873A54014AAF18E004F12B7 /* cxxdemangle.h */, - 0856CDCD14A99EEF000B1711 /* jit-cache.cpp */, - 0856CDCE14A99EEF000B1711 /* jit-cache.hpp */, - 0856CDCF14A99EEF000B1711 /* jit-codegen.hpp */, - 0856CDD014A99EEF000B1711 /* jit-config.hpp */, - 0856CDD114A99EEF000B1711 /* jit-target-dispatch.h */, - 0856CDD214A99EEF000B1711 /* mips */, - 0856CDD514A99EEF000B1711 /* ppc */, - 0856CDD814A99EEF000B1711 /* x86 */, - ); - path = jit; - sourceTree = ""; - }; - 0856CDC014A99EEF000B1711 /* amd64 */ = { - isa = PBXGroup; - children = ( - 0856CDC114A99EEF000B1711 /* dyngen-target-exec.h */, - 0856CDC214A99EEF000B1711 /* jit-target-cache.hpp */, - 0856CDC314A99EEF000B1711 /* jit-target-codegen.hpp */, - ); - path = amd64; - sourceTree = ""; - }; - 0856CDC914A99EEF000B1711 /* dummy */ = { - isa = PBXGroup; - children = ( - 0856CDCA14A99EEF000B1711 /* jit-target-cache.hpp */, - ); - path = dummy; - sourceTree = ""; - }; - 0856CDD214A99EEF000B1711 /* mips */ = { - isa = PBXGroup; - children = ( - 0856CDD314A99EEF000B1711 /* dyngen-target-exec.h */, - 0856CDD414A99EEF000B1711 /* jit-target-cache.hpp */, - ); - path = mips; - sourceTree = ""; - }; - 0856CDD514A99EEF000B1711 /* ppc */ = { - isa = PBXGroup; - children = ( - 0856CDD614A99EEF000B1711 /* dyngen-target-exec.h */, - 0856CDD714A99EEF000B1711 /* jit-target-cache.hpp */, - ); - path = ppc; - sourceTree = ""; - }; - 0856CDD814A99EEF000B1711 /* x86 */ = { - isa = PBXGroup; - children = ( - 0856CDD914A99EEF000B1711 /* codegen_x86.h */, - 0856CDDA14A99EEF000B1711 /* dyngen-target-exec.h */, - 0856CDDB14A99EEF000B1711 /* jit-target-cache.hpp */, - 0856CDDC14A99EEF000B1711 /* jit-target-codegen.hpp */, - ); - path = x86; - sourceTree = ""; - }; - 0856CDDD14A99EEF000B1711 /* ppc */ = { - isa = PBXGroup; - children = ( - 0856CDDE14A99EEF000B1711 /* genexec.pl */, - 0856CDDF14A99EEF000B1711 /* ppc-bitfields.hpp */, - 0856CDE014A99EEF000B1711 /* ppc-blockinfo.hpp */, - 0856CDE114A99EEF000B1711 /* ppc-config.hpp */, - 0856CDE214A99EEF000B1711 /* ppc-cpu.cpp */, - 0856CDE314A99EEF000B1711 /* ppc-cpu.hpp */, - 0856CDE414A99EEF000B1711 /* ppc-decode.cpp */, - 0856CDE614A99EEF000B1711 /* ppc-dyngen.cpp */, - 0856CDE714A99EEF000B1711 /* ppc-dyngen.hpp */, - 0873A5D714AB80E3004F12B7 /* ppc-dyngen-ops.cpp */, - 0856CDE814A99EEF000B1711 /* ppc-execute.cpp */, - 0856CDE914A99EEF000B1711 /* ppc-execute.hpp */, - 0856CDEA14A99EEF000B1711 /* ppc-instructions.hpp */, - 0856CDEB14A99EEF000B1711 /* ppc-jit.cpp */, - 0856CDEC14A99EEF000B1711 /* ppc-jit.hpp */, - 0856CDED14A99EEF000B1711 /* ppc-operands.hpp */, - 0856CDEE14A99EEF000B1711 /* ppc-operations.hpp */, - 0856CDEF14A99EEF000B1711 /* ppc-registers.hpp */, - 0856CDF014A99EEF000B1711 /* ppc-translate.cpp */, - ); - path = ppc; - sourceTree = ""; - }; - 0856CDF314A99EEF000B1711 /* mathlib */ = { - isa = PBXGroup; - children = ( - 0856CDF714A99EEF000B1711 /* ieeefp.cpp */, - 0856CDF814A99EEF000B1711 /* ieeefp.hpp */, - 0856CDFD14A99EEF000B1711 /* mathlib.cpp */, - 0856CDFE14A99EEF000B1711 /* mathlib.hpp */, - ); - path = mathlib; - sourceTree = ""; - }; - 0856CE0114A99EEF000B1711 /* utils */ = { - isa = PBXGroup; - children = ( - 0856CE0214A99EEF000B1711 /* utils-cpuinfo.cpp */, - 0856CE0314A99EEF000B1711 /* utils-cpuinfo.hpp */, - 0856CE0414A99EEF000B1711 /* utils-sentinel.hpp */, - ); - path = utils; - sourceTree = ""; - }; - 0856CE0614A99EEF000B1711 /* MacOSX */ = { - isa = PBXGroup; - children = ( - E4202600241250E2000508DF /* etherhelpertool.c */, - E4202602241250EE000508DF /* runtool.c */, - 0873A76514ABD151004F12B7 /* config */, - 0856D2D614A9A704000B1711 /* Launcher */, - 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */, - 5DDE950E2255C8B3004D0E79 /* audio_macosx.cpp */, - 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */, - 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */, - 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */, - 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */, - E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */, - 0856CE2D14A99EF0000B1711 /* extfs_macosx.cpp */, - 0879BDAF15A8B1AA00DC277D /* Info.plist.in */, - 0856CE6D14A99EF0000B1711 /* macos_util_macosx.h */, - 0856CE7014A99EF0000B1711 /* prefs_macosx.mm */, - 0856CE8314A99EF0000B1711 /* SheepShaver.icns */, - 3D2C25B4221092BA00B635DE /* SheepVM.icns */, - 0856CE8714A99EF0000B1711 /* sys_darwin.cpp */, - 0873A80014AC515D004F12B7 /* utils_macosx.h */, - 0873A80114AC515D004F12B7 /* utils_macosx.mm */, - 5DDE94F82255C70C004D0E79 /* MacOSX_sound_if.h */, - 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */, - ); - name = MacOSX; - sourceTree = ""; - }; - 0856CE8F14A99EF0000B1711 /* SDL */ = { - isa = PBXGroup; - children = ( - 0856CE9014A99EF0000B1711 /* audio_sdl.cpp */, - 0856CE9114A99EF0000B1711 /* keycodes */, - E41936C220CFE64D003A7654 /* SDLMain.h */, - E41936C320CFE64D003A7654 /* SDLMain.m */, - E4CBF46020CFC451009F40CC /* video_sdl.cpp */, - E413A40220CF7E6D00FBE967 /* video_sdl2.cpp */, - ); - name = SDL; - path = ../SDL; - sourceTree = SOURCE_ROOT; - }; - 0856CE9614A99EF0000B1711 /* slirp */ = { - isa = PBXGroup; - children = ( - E44C45FF20D262AF000583AE /* bootp.c */, - E44C45E020D262AE000583AE /* bootp.h */, - E44C460320D262AF000583AE /* cksum.c */, - E44C45F020D262AE000583AE /* COPYRIGHT */, - E44C45EE20D262AE000583AE /* ctl.h */, - E44C45E920D262AE000583AE /* debug.c */, - E44C45F920D262AF000583AE /* debug.h */, - E44C45FE20D262AF000583AE /* icmp_var.h */, - E44C460220D262AF000583AE /* if.c */, - E44C45F320D262AF000583AE /* if.h */, - E44C45DF20D262AD000583AE /* ip_icmp.c */, - E44C45E320D262AE000583AE /* ip_icmp.h */, - E44C460020D262AF000583AE /* ip_input.c */, - E44C460120D262AF000583AE /* ip_output.c */, - E44C45F820D262AF000583AE /* ip.h */, - E44C45FD20D262AF000583AE /* libslirp.h */, - E44C45E820D262AE000583AE /* main.h */, - E44C45DD20D262AD000583AE /* mbuf.c */, - E44C45EC20D262AE000583AE /* mbuf.h */, - E44C45E620D262AE000583AE /* misc.c */, - E44C45F420D262AF000583AE /* misc.h */, - E44C45ED20D262AE000583AE /* sbuf.c */, - E44C45F620D262AF000583AE /* sbuf.h */, - E44C45E420D262AE000583AE /* slirp_config.h */, - E44C45F120D262AE000583AE /* slirp.c */, - E44C45EF20D262AE000583AE /* slirp.h */, - E44C45FC20D262AF000583AE /* socket.c */, - E44C45F220D262AE000583AE /* socket.h */, - E44C45E520D262AE000583AE /* tcp_input.c */, - E44C460420D262AF000583AE /* tcp_output.c */, - E44C45EA20D262AE000583AE /* tcp_subr.c */, - E44C45F520D262AF000583AE /* tcp_timer.c */, - E44C45FA20D262AF000583AE /* tcp_timer.h */, - E44C45FB20D262AF000583AE /* tcp_var.h */, - E44C45F720D262AF000583AE /* tcp.h */, - E44C45E120D262AE000583AE /* tcpip.h */, - E44C45DC20D262AD000583AE /* tftp.c */, - E44C45DE20D262AD000583AE /* tftp.h */, - E44C45EB20D262AE000583AE /* udp.c */, - E44C45E720D262AE000583AE /* udp.h */, - E44C45E220D262AE000583AE /* VERSION */, - ); - name = slirp; - path = ../slirp; - sourceTree = SOURCE_ROOT; - }; - 0856CEC314A99EF0000B1711 /* Unix */ = { - isa = PBXGroup; - children = ( - 08003F841E0624BD00A3ADAB /* dyngen_precompiled */, - 082AC25614AA59DA00071F5E /* Darwin */, - 0856CEC414A99EF0000B1711 /* about_window_unix.cpp */, - 5D55CB422255B4FD00FF8E81 /* bincue_unix.cpp */, - 5D55CB442255B50E00FF8E81 /* bincue_unix.h */, - 083E370A16EFE85000CCCA59 /* disk_sparsebundle.cpp */, - 083E370B16EFE85000CCCA59 /* disk_unix.h */, - 0856CEE314A99EF0000B1711 /* ether_unix.cpp */, - 0856CEFB14A99EF0000B1711 /* main_unix.cpp */, - 0846E55214B12B0D00574779 /* paranoia.cpp */, - 0846E52314B129DA00574779 /* ppc_asm.S */, - 0856CF5A14A99EF0000B1711 /* prefs_unix.cpp */, - 0856CF5B14A99EF0000B1711 /* rpc.h */, - 0856CF5C14A99EF0000B1711 /* rpc_unix.cpp */, - 0856CF5D14A99EF0000B1711 /* semaphore.h */, - 0856CF5E14A99EF0000B1711 /* serial_unix.cpp */, - 0856CF6114A99EF0000B1711 /* sigregs.h */, - 0856CF6414A99EF0000B1711 /* sshpty.c */, - 0856CF6514A99EF0000B1711 /* sshpty.h */, - 0856CF6614A99EF0000B1711 /* strlcpy.c */, - 0856CF6714A99EF0000B1711 /* strlcpy.h */, - 0856CF6814A99EF0000B1711 /* sys_unix.cpp */, - 0856CF6914A99EF0000B1711 /* sysdeps.h */, - 0856CF6A14A99EF0000B1711 /* timer_unix.cpp */, - 083E372016EFE87200CCCA59 /* tinyxml2.cpp */, - 083E372116EFE87200CCCA59 /* tinyxml2.h */, - 0856CF6C14A99EF0000B1711 /* user_strings_unix.cpp */, - 0856CF6D14A99EF0000B1711 /* user_strings_unix.h */, - 0856CF7614A99EF0000B1711 /* xpram_unix.cpp */, - ); - name = Unix; - path = ../Unix; - sourceTree = SOURCE_ROOT; - }; - 0856D2D614A9A704000B1711 /* Launcher */ = { - isa = PBXGroup; - children = ( - A7B1921218C35D4700791D8D /* DiskType.h */, - A7B1921318C35D4700791D8D /* DiskType.m */, - 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */, - 0856D31114A9A704000B1711 /* VMSettingsController.h */, - 0856D31214A9A704000B1711 /* VMSettingsController.mm */, - ); - path = Launcher; - sourceTree = ""; - }; - 0873A76514ABD151004F12B7 /* config */ = { - isa = PBXGroup; - children = ( - 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */, - 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */, - 0873A76614ABD151004F12B7 /* config-macosx-x86_64.h */, - 0873A76714ABD151004F12B7 /* config.h */, - ); - path = config; - sourceTree = ""; - }; - 087B91B11B780EC900825F7F /* CrossPlatform */ = { - isa = PBXGroup; - children = ( - 087B91B71B780FFC00825F7F /* sigsegv.cpp */, - 087B91B81B780FFC00825F7F /* sigsegv.h */, - 087B91B91B780FFC00825F7F /* video_blit.cpp */, - 087B91BA1B780FFC00825F7F /* video_blit.h */, - 087B91BB1B780FFC00825F7F /* video_vosf.h */, - 087B91BC1B780FFC00825F7F /* vm_alloc.cpp */, - 087B91BD1B780FFC00825F7F /* vm_alloc.h */, - ); - name = CrossPlatform; - sourceTree = ""; - }; - 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { - isa = PBXGroup; - children = ( -<<<<<<< HEAD - 5DDE95062255C844004D0E79 /* AudioUnit.framework */, - 5DDE95042255C822004D0E79 /* CoreAudio.framework */, - 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */, -======= - E420260424125182000508DF /* Security.framework */, ->>>>>>> master - E420910020D0C4FA0094654F /* SDL2.framework */, - 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, - 08CD42DB14B7B85B009CA2A2 /* Cocoa.framework */, - 0856D21414A9A6C6000B1711 /* IOKit.framework */, - ); - name = Frameworks; - sourceTree = ""; - }; - E420260924125403000508DF /* Generated */ = { - isa = PBXGroup; - children = ( - E420260A2412540D000508DF /* etherhelpertool */, - ); - name = Generated; - sourceTree = ""; - }; -/* End PBXGroup section */ - -/* Begin PBXHeadersBuildPhase section */ - 0846E49614B124DE00574779 /* Headers */ = { - isa = PBXHeadersBuildPhase; - buildActionMask = 2147483647; - files = ( - 08003F8F1E0624D100A3ADAB /* ppc-dyngen-ops-x86_32.hpp in Headers */, - 5DDE94F92255C70C004D0E79 /* MacOSX_sound_if.h in Headers */, - 08003F8E1E0624D100A3ADAB /* basic-dyngen-ops.hpp in Headers */, - E4C9A03E1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp in Headers */, - E4C9A0401FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp in Headers */, - 5DDE950C2255C896004D0E79 /* AudioBackEnd.h in Headers */, - 5DDE950F2255C8B4004D0E79 /* audio_defs_macosx.h in Headers */, - 5D55CB452255B50E00FF8E81 /* bincue_unix.h in Headers */, - 5DDE94FE2255C740004D0E79 /* AudioBackEnd.h in Headers */, - 08163339158C121000C449F9 /* dis-asm.h in Headers */, - 08003F8C1E0624D100A3ADAB /* basic-dyngen-ops-x86_32.hpp in Headers */, - 08003F911E0624D100A3ADAB /* ppc-dyngen-ops.hpp in Headers */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXHeadersBuildPhase section */ - -/* Begin PBXNativeTarget section */ - 0846E49914B124DE00574779 /* kpx_cpu */ = { - isa = PBXNativeTarget; - buildConfigurationList = 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */; - buildPhases = ( - 0846E49614B124DE00574779 /* Headers */, - 0846E49714B124DE00574779 /* Sources */, - 0846E49814B124DE00574779 /* Frameworks */, - ); - buildRules = ( - ); - dependencies = ( - ); - name = kpx_cpu; - productName = kpx_cpu; - productReference = 0846E49A14B124DE00574779 /* libkpx_cpu.a */; - productType = "com.apple.product-type.library.static"; - }; - 0856CCC014A99E1C000B1711 /* SheepShaver */ = { - isa = PBXNativeTarget; - buildConfigurationList = 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */; - buildPhases = ( - E4202606241251C6000508DF /* ShellScript */, - 0856CCBD14A99E1C000B1711 /* Resources */, - 0856CCBE14A99E1C000B1711 /* Sources */, - 0856CCBF14A99E1C000B1711 /* Frameworks */, - 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */, - E413A40820CF7EF800FBE967 /* Embed Frameworks */, - ); - buildRules = ( - ); - dependencies = ( - 0846E4A714B1253500574779 /* PBXTargetDependency */, - ); - name = SheepShaver; - productName = SheepShaver; - productReference = 0856CCC114A99E1C000B1711 /* SheepShaver.app */; - productType = "com.apple.product-type.application"; - }; -/* End PBXNativeTarget section */ - -/* Begin PBXProject section */ - 0856CCAE14A99DE0000B1711 /* Project object */ = { - isa = PBXProject; - attributes = { - LastUpgradeCheck = 0820; - }; - buildConfigurationList = 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver_Xcode8" */; - compatibilityVersion = "Xcode 3.0"; - developmentRegion = English; - hasScannedForEncodings = 0; - knownRegions = ( - English, - Japanese, - French, - German, - ); - mainGroup = 0856CCAC14A99DE0000B1711; - productRefGroup = 0856CCC214A99E1C000B1711 /* Products */; - projectDirPath = ""; - projectRoot = ""; - targets = ( - 0856CCC014A99E1C000B1711 /* SheepShaver */, - 0846E49914B124DE00574779 /* kpx_cpu */, - ); - }; -/* End PBXProject section */ - -/* Begin PBXResourcesBuildPhase section */ - 0856CCBD14A99E1C000B1711 /* Resources */ = { - isa = PBXResourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - E420260B24125442000508DF /* etherhelpertool in Resources */, - E44C460820D262B0000583AE /* VERSION in Resources */, - 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, - E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, - 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */, - 0856D33514A9A704000B1711 /* VMSettingsWindow.nib in Resources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXResourcesBuildPhase section */ - -/* Begin PBXShellScriptBuildPhase section */ - 08CD3F3214B665E1009CA2A2 /* Preprocess Info.plist */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputPaths = ( - ); - name = "Preprocess Info.plist"; - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "sed -i '' 's/@PACKAGE_VERSION@/2.5/g' \"${BUILT_PRODUCTS_DIR}/${INFOPLIST_PATH}\"\n"; - }; - E4202606241251C6000508DF /* ShellScript */ = { - isa = PBXShellScriptBuildPhase; - buildActionMask = 2147483647; - files = ( - ); - inputFileListPaths = ( - ); - inputPaths = ( - ); - outputFileListPaths = ( - ); - outputPaths = ( - ); - runOnlyForDeploymentPostprocessing = 0; - shellPath = /bin/sh; - shellScript = "cc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; - }; -/* End PBXShellScriptBuildPhase section */ - -/* Begin PBXSourcesBuildPhase section */ - 0846E49714B124DE00574779 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - 0846E4B114B1264700574779 /* ieeefp.cpp in Sources */, - 0846E4B314B1264F00574779 /* mathlib.cpp in Sources */, - 5DDE950A2255C88E004D0E79 /* AudioDevice.cpp in Sources */, - 0846E4B514B1265500574779 /* utils-cpuinfo.cpp in Sources */, - 0846E4B614B1265A00574779 /* ppc-translate.cpp in Sources */, - 0846E4B814B1266000574779 /* ppc-jit.cpp in Sources */, - 0846E4B914B1266600574779 /* ppc-execute.cpp in Sources */, - 0846E4BC14B1267200574779 /* ppc-dyngen.cpp in Sources */, - 5DDE94FC2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, - 5DDE95112255C8B4004D0E79 /* audio_macosx.cpp in Sources */, - 0846E4BE14B1267A00574779 /* ppc-decode.cpp in Sources */, - 0846E4C014B1267F00574779 /* ppc-cpu.cpp in Sources */, - 5DDE95012255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, - 0846E4C114B1268B00574779 /* jit-cache.cpp in Sources */, - 0846E4C214B1269600574779 /* basic-dyngen.cpp in Sources */, - 0846E51314B128ED00574779 /* sheepshaver_glue.cpp in Sources */, - 08163340158C125800C449F9 /* ppc-dis.c in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; - 0856CCBE14A99E1C000B1711 /* Sources */ = { - isa = PBXSourcesBuildPhase; - buildActionMask = 2147483647; - files = ( - E44C460B20D262B0000583AE /* debug.c in Sources */, - 5DDE94FB2255C712004D0E79 /* MacOSX_sound_if.cpp in Sources */, - E44C460C20D262B0000583AE /* tcp_subr.c in Sources */, - E44C461520D262B0000583AE /* ip_output.c in Sources */, - E44C461820D262B0000583AE /* tcp_output.c in Sources */, - 0856CFE614A99EF0000B1711 /* disk.cpp in Sources */, - 0856CFEC14A99EF0000B1711 /* scsi_dummy.cpp in Sources */, - E44C460E20D262B0000583AE /* sbuf.c in Sources */, - 0856CFEE14A99EF0000B1711 /* emul_op.cpp in Sources */, - 0856CFF014A99EF0000B1711 /* ether.cpp in Sources */, - 5DF4CB7F22B5BD5D00512A86 /* audio.cpp in Sources */, - 0856CFF314A99EF0000B1711 /* extfs.cpp in Sources */, - 0856CFF414A99EF0000B1711 /* gfxaccel.cpp in Sources */, - 0856D00914A99EF0000B1711 /* macos_util.cpp in Sources */, - 0856D02514A99EF0000B1711 /* extfs_macosx.cpp in Sources */, - 0856D05014A99EF1000B1711 /* prefs_macosx.mm in Sources */, - E44C461620D262B0000583AE /* if.c in Sources */, - 0856D05A14A99EF1000B1711 /* sys_darwin.cpp in Sources */, - E44C460520D262B0000583AE /* tftp.c in Sources */, - 0856D05B14A99EF1000B1711 /* main.cpp in Sources */, - E44C460A20D262B0000583AE /* misc.c in Sources */, - E44C461120D262B0000583AE /* tcp_timer.c in Sources */, - 0856D05C14A99EF1000B1711 /* name_registry.cpp in Sources */, - E444DC1520C8F06700DD29C9 /* pict.c in Sources */, - 0856D05D14A99EF1000B1711 /* prefs_items.cpp in Sources */, - E44C460D20D262B0000583AE /* udp.c in Sources */, - E44C461420D262B0000583AE /* ip_input.c in Sources */, - E44C461320D262B0000583AE /* bootp.c in Sources */, - 0856D05E14A99EF1000B1711 /* prefs.cpp in Sources */, - 5D55CB40225584D000FF8E81 /* cdrom.cpp in Sources */, - 0856D05F14A99EF1000B1711 /* rom_patches.cpp in Sources */, - 0856D06014A99EF1000B1711 /* rsrc_patches.cpp in Sources */, - 0856D06114A99EF1000B1711 /* scsi.cpp in Sources */, - 0856D06214A99EF1000B1711 /* audio_sdl.cpp in Sources */, - 0856D06614A99EF1000B1711 /* serial.cpp in Sources */, - E456E2AD20C82B61006C8DC2 /* clip_macosx64.mm in Sources */, -<<<<<<< HEAD - 5D3967C02328D315003925D6 /* adb.cpp in Sources */, -======= - E4202603241250EE000508DF /* runtool.c in Sources */, ->>>>>>> master - 0856D07B14A99EF1000B1711 /* sony.cpp in Sources */, - 0856D07C14A99EF1000B1711 /* thunks.cpp in Sources */, - 0856D07D14A99EF1000B1711 /* timer.cpp in Sources */, - 5DDE95002255C74C004D0E79 /* AudioBackEnd.cpp in Sources */, - 0856D07E14A99EF1000B1711 /* about_window_unix.cpp in Sources */, - E44C460720D262B0000583AE /* ip_icmp.c in Sources */, - E4CBF46120CFC451009F40CC /* video_sdl.cpp in Sources */, - 5DDE95102255C8B4004D0E79 /* audio_macosx.cpp in Sources */, - 0856D09814A99EF1000B1711 /* ether_unix.cpp in Sources */, - 0856D0AA14A99EF1000B1711 /* main_unix.cpp in Sources */, - E413A40320CF7E6D00FBE967 /* video_sdl2.cpp in Sources */, - 0856D10614A99EF1000B1711 /* prefs_unix.cpp in Sources */, - 0856D10714A99EF1000B1711 /* rpc_unix.cpp in Sources */, - 0856D10814A99EF1000B1711 /* serial_unix.cpp in Sources */, - 0856D10C14A99EF1000B1711 /* sshpty.c in Sources */, - 0856D10D14A99EF1000B1711 /* strlcpy.c in Sources */, - 0856D10E14A99EF1000B1711 /* sys_unix.cpp in Sources */, - E44C461720D262B0000583AE /* cksum.c in Sources */, - 0856D10F14A99EF1000B1711 /* timer_unix.cpp in Sources */, - 0856D11114A99EF1000B1711 /* user_strings_unix.cpp in Sources */, - E44C461020D262B0000583AE /* slirp.c in Sources */, - 0856D11614A99EF1000B1711 /* xpram_unix.cpp in Sources */, - 5DDE95092255C88E004D0E79 /* AudioDevice.cpp in Sources */, - 0856D11714A99EF1000B1711 /* user_strings.cpp in Sources */, - E44C460920D262B0000583AE /* tcp_input.c in Sources */, - 0856D11814A99EF1000B1711 /* video.cpp in Sources */, - 5D55CB432255B4FE00FF8E81 /* bincue_unix.cpp in Sources */, - E41936C420CFE64D003A7654 /* SDLMain.m in Sources */, - E44C461220D262B0000583AE /* socket.c in Sources */, - 0856D13F14A99EF1000B1711 /* xpram.cpp in Sources */, - 0856D33914A9A704000B1711 /* VMSettingsController.mm in Sources */, - E44C460620D262B0000583AE /* mbuf.c in Sources */, - 082AC22D14AA52E900071F5E /* prefs_editor_dummy.cpp in Sources */, - 0873A80214AC515D004F12B7 /* utils_macosx.mm in Sources */, - 083E370C16EFE85000CCCA59 /* disk_sparsebundle.cpp in Sources */, - 083E372216EFE87200CCCA59 /* tinyxml2.cpp in Sources */, - A7B1921418C35D4700791D8D /* DiskType.m in Sources */, - 087B91BE1B780FFC00825F7F /* sigsegv.cpp in Sources */, - 087B91BF1B780FFC00825F7F /* video_blit.cpp in Sources */, - 087B91C01B780FFC00825F7F /* vm_alloc.cpp in Sources */, - ); - runOnlyForDeploymentPostprocessing = 0; - }; -/* End PBXSourcesBuildPhase section */ - -/* Begin PBXTargetDependency section */ - 0846E4A714B1253500574779 /* PBXTargetDependency */ = { - isa = PBXTargetDependency; - target = 0846E49914B124DE00574779 /* kpx_cpu */; - targetProxy = 0846E4A614B1253500574779 /* PBXContainerItemProxy */; - }; -/* End PBXTargetDependency section */ - -/* Begin PBXVariantGroup section */ - 0856D30714A9A704000B1711 /* VMSettingsWindow.nib */ = { - isa = PBXVariantGroup; - children = ( - 0856D30814A9A704000B1711 /* English */, - ); - name = VMSettingsWindow.nib; - sourceTree = ""; - }; -/* End PBXVariantGroup section */ - -/* Begin XCBuildConfiguration section */ - 0846E49B14B124DF00574779 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULE_DEBUGGING = YES; - COPY_PHASE_STRIP = NO; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = YES; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - "USE_SDL_AUDIO=1", - "BINCUE=1", - ); - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ../Unix/dyngen_precompiled, - ); - INSTALL_PATH = /usr/local/lib; - MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CPLUSPLUSFLAGS = ( - "$(OTHER_CFLAGS)", - "-DDEBUG", - "-g", - ); - PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; - }; - name = Debug; - }; - 0846E49C14B124DF00574779 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_CXX_LIBRARY = "libc++"; - CLANG_ENABLE_MODULE_DEBUGGING = YES; - COPY_PHASE_STRIP = NO; - DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - "USE_SDL_AUDIO=1", - "BINCUE=1", - ); - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers/, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ../Unix/dyngen_precompiled, - ); - INSTALL_PATH = /usr/local/lib; - MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CPLUSPLUSFLAGS = ( - "$(OTHER_CFLAGS)", - "-DDEBUG", - "-g", - ); - PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; - }; - name = Release; - }; - 0856CCAF14A99DE0000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = NO; - GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; - GCC_WARN_UNINITIALIZED_AUTOS = YES; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_PARAMETER = NO; - GCC_WARN_UNUSED_VARIABLE = YES; - }; - name = Debug; - }; - 0856CCB014A99DE0000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - COPY_PHASE_STRIP = YES; - GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; - GCC_WARN_UNINITIALIZED_AUTOS = YES; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_PARAMETER = NO; - GCC_WARN_UNUSED_VARIABLE = YES; - }; - name = Release; - }; - 0856CCC514A99E1C000B1711 /* Debug */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_CXX_LIBRARY = "libc++"; - CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; - COPY_PHASE_STRIP = NO; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = NO; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 0; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - ENABLE_MACOSX_ETHERHELPER, - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - "BINCUE=1", - "USE_SDL_AUDIO=1", - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ../CrossPlatform, - ); - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-lkpx_cpu", - ); - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; - PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; - WARNING_LDFLAGS = ""; - }; - name = Debug; - }; - 0856CCC614A99E1C000B1711 /* Release */ = { - isa = XCBuildConfiguration; - buildSettings = { - ALWAYS_SEARCH_USER_PATHS = NO; - ARCHS = "$(ARCHS_STANDARD_64_BIT)"; - CLANG_CXX_LIBRARY = "libc++"; - CODE_SIGN_ENTITLEMENTS = SheepShaver.entitlements; - COPY_PHASE_STRIP = NO; - DEAD_CODE_STRIPPING = NO; - FRAMEWORK_SEARCH_PATHS = /Library/Frameworks; - GCC_CW_ASM_SYNTAX = NO; - GCC_DYNAMIC_NO_PIC = YES; - GCC_ENABLE_FIX_AND_CONTINUE = NO; - GCC_ENABLE_PASCAL_STRINGS = NO; - GCC_ENABLE_TRIGRAPHS = NO; - GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 3; - GCC_PRECOMPILE_PREFIX_HEADER = NO; - GCC_PREFIX_HEADER = ""; - GCC_PREPROCESSOR_DEFINITIONS = ( - ENABLE_MACOSX_ETHERHELPER, - "DATADIR=", - HAVE_CONFIG_H, - USE_JIT, - "_GNU_SOURCE=1", - _THREAD_SAFE, - _REENTRANT, - "BINCUE=1", - "USE_SDL_AUDIO=1", - ); - GCC_SYMBOLS_PRIVATE_EXTERN = NO; - GCC_WARN_UNUSED_FUNCTION = YES; - GCC_WARN_UNUSED_VARIABLE = YES; - HEADER_SEARCH_PATHS = ( - /Library/Frameworks/SDL2.framework/Headers, - ./config/, - ../Unix, - ../MacOSX/Launcher, - ../slirp, - ../kpx_cpu/src, - ../kpx_cpu/include, - ../include, - ../CrossPlatform, - ); - INFOPLIST_EXPAND_BUILD_SETTINGS = NO; - INFOPLIST_FILE = Info.plist.in; - INFOPLIST_PREFIX_HEADER = ""; - INFOPLIST_PREPROCESS = NO; - INSTALL_PATH = "$(HOME)/Applications"; - LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - MACOSX_DEPLOYMENT_TARGET = 10.7; - OTHER_CFLAGS = ""; - OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-lkpx_cpu", - ); - PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; - PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; - PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; - }; - name = Release; - }; -/* End XCBuildConfiguration section */ - -/* Begin XCConfigurationList section */ - 0846E4A114B1251400574779 /* Build configuration list for PBXNativeTarget "kpx_cpu" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0846E49B14B124DF00574779 /* Debug */, - 0846E49C14B124DF00574779 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCB114A99DE0000B1711 /* Build configuration list for PBXProject "SheepShaver_Xcode8" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCAF14A99DE0000B1711 /* Debug */, - 0856CCB014A99DE0000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; - 0856CCC714A99E1D000B1711 /* Build configuration list for PBXNativeTarget "SheepShaver" */ = { - isa = XCConfigurationList; - buildConfigurations = ( - 0856CCC514A99E1C000B1711 /* Debug */, - 0856CCC614A99E1C000B1711 /* Release */, - ); - defaultConfigurationIsVisible = 0; - defaultConfigurationName = Release; - }; -/* End XCConfigurationList section */ - }; - rootObject = 0856CCAE14A99DE0000B1711 /* Project object */; -} diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata deleted file mode 100644 index 919434a62..000000000 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/contents.xcworkspacedata +++ /dev/null @@ -1,7 +0,0 @@ - - - - - diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist deleted file mode 100644 index 18d981003..000000000 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.xcworkspace/xcshareddata/IDEWorkspaceChecks.plist +++ /dev/null @@ -1,8 +0,0 @@ - - - - - IDEDidComputeMac32BitWarning - - - diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme deleted file mode 100644 index baa5b56b1..000000000 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/xcshareddata/xcschemes/SheepShaver.xcscheme +++ /dev/null @@ -1,92 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - From 4191a8689535e840d3402023de6506b773613349 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Mon, 13 Jul 2020 01:25:37 -0500 Subject: [PATCH 382/534] Removing recovered references to coreaudio, not needed for sdl2 builds --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 14 -------------- .../SheepShaver_Xcode8.xcodeproj/project.pbxproj | 14 -------------- 2 files changed, 28 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 6e1fd7b33..a1097e6c1 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -124,9 +124,6 @@ 5DDE95162255D076004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = MacOSX_sound_if.cpp; sourceTree = ""; }; 5DDE95172255D076004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = AudioBackEnd.cpp; sourceTree = ""; }; 5DDE95182255D076004D0E79 /* MacOSX_sound_if.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = MacOSX_sound_if.h; sourceTree = ""; }; - 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; - 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; - 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; 752F26F81F240E51001032B4 /* Foundation.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Foundation.framework; path = System/Library/Frameworks/Foundation.framework; sourceTree = SDKROOT; }; 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; @@ -407,16 +404,6 @@ path = ../slirp; sourceTree = ""; }; - 5D5C3B0824B2DEDF00CDAB41 /* Recovered References */ = { - isa = PBXGroup; - children = ( - 5DDE95212255D0C2004D0E79 /* AudioUnit.framework */, - 5DDE951F2255D0B6004D0E79 /* AudioToolbox.framework */, - 5DDE951D2255D0A9004D0E79 /* CoreAudio.framework */, - ); - name = "Recovered References"; - sourceTree = ""; - }; 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( @@ -459,7 +446,6 @@ 753252FF1F535E5D0024025B /* generated src */, 7539DFB31F23B17E006B2DF2 /* Products */, 752F26F71F240E51001032B4 /* Frameworks */, - 5D5C3B0824B2DEDF00CDAB41 /* Recovered References */, ); sourceTree = ""; }; diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index c7c6bfa25..a686e0fb7 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -330,9 +330,6 @@ 5DDE94FA2255C712004D0E79 /* MacOSX_sound_if.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = MacOSX_sound_if.cpp; path = ../../../BasiliskII/src/MacOSX/MacOSX_sound_if.cpp; sourceTree = ""; }; 5DDE94FD2255C740004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; 5DDE94FF2255C74C004D0E79 /* AudioBackEnd.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioBackEnd.cpp; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.cpp; sourceTree = ""; }; - 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioToolbox.framework; path = System/Library/Frameworks/AudioToolbox.framework; sourceTree = SDKROOT; }; - 5DDE95042255C822004D0E79 /* CoreAudio.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = CoreAudio.framework; path = System/Library/Frameworks/CoreAudio.framework; sourceTree = SDKROOT; }; - 5DDE95062255C844004D0E79 /* AudioUnit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AudioUnit.framework; path = System/Library/Frameworks/AudioUnit.framework; sourceTree = SDKROOT; }; 5DDE95082255C88E004D0E79 /* AudioDevice.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = AudioDevice.cpp; path = ../../../BasiliskII/src/MacOSX/AudioDevice.cpp; sourceTree = ""; }; 5DDE950B2255C895004D0E79 /* AudioBackEnd.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = AudioBackEnd.h; path = ../../../BasiliskII/src/MacOSX/AudioBackEnd.h; sourceTree = ""; }; 5DDE950D2255C8B3004D0E79 /* audio_defs_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = audio_defs_macosx.h; path = ../../../BasiliskII/src/MacOSX/audio_defs_macosx.h; sourceTree = ""; }; @@ -451,7 +448,6 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */, 0856CCC214A99E1C000B1711 /* Products */, E420260924125403000508DF /* Generated */, - 5DE93B45247C71A700B2C821 /* Recovered References */, ); sourceTree = ""; }; @@ -903,16 +899,6 @@ name = Frameworks; sourceTree = ""; }; - 5DE93B45247C71A700B2C821 /* Recovered References */ = { - isa = PBXGroup; - children = ( - 5DDE95062255C844004D0E79 /* AudioUnit.framework */, - 5DDE95042255C822004D0E79 /* CoreAudio.framework */, - 5DDE95022255C7FE004D0E79 /* AudioToolbox.framework */, - ); - name = "Recovered References"; - sourceTree = ""; - }; E420260924125403000508DF /* Generated */ = { isa = PBXGroup; children = ( From 8124b61d2b42cd1a1ba80f7a791c6121611df13c Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 14 Jul 2020 16:48:06 -0500 Subject: [PATCH 383/534] Enable optimization by fixing inits and access bounds --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 1 + BasiliskII/src/bincue.cpp | 2 +- BasiliskII/src/cdrom.cpp | 7 +++++++ .../MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 2 +- 4 files changed, 10 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index a1097e6c1..4bb52379d 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1064,6 +1064,7 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; + GCC_OPTIMIZATION_LEVEL = 3; GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", ENABLE_MACOSX_ETHERHELPER, diff --git a/BasiliskII/src/bincue.cpp b/BasiliskII/src/bincue.cpp index 83232c9e0..fe654bcc7 100644 --- a/BasiliskII/src/bincue.cpp +++ b/BasiliskII/src/bincue.cpp @@ -681,7 +681,7 @@ bool GetPosition_bincue(void *fh, uint8 *pos) *pos++ = rel.m; *pos++ = rel.s; *pos++ = rel.f; - *pos++ = 0; +// *pos++ = 0; // D(bug("CDROM position %02d:%02d:%02d track %02d\n", abs.m, abs.s, abs.f, trackno)); return true; } diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 896383229..36250297f 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -234,6 +234,11 @@ static void read_toc(cdrom_drive_info &info) } #endif + // Default start + info.start_at[0] = 0; + info.start_at[1] = 0; + info.start_at[2] = 0; + // Find lead-out track info.lead_out[0] = 0; info.lead_out[1] = 0; @@ -410,6 +415,8 @@ int16 CDROMOpen(uint32 pb, uint32 dce) info->block_size = 512; info->twok_offset = -1; info->play_mode = 0x09; + info->play_order = 0; + info->repeat = 0; info->power_mode = 0; // Allocate drive status record diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index a686e0fb7..086523f95 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1286,7 +1286,7 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_ENABLE_TRIGRAPHS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 0; + GCC_OPTIMIZATION_LEVEL = 3; GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; GCC_PREPROCESSOR_DEFINITIONS = ( From d7fb0ac29874eb75d6960c146bea42d5c4599ec8 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 14 Jul 2020 19:13:33 -0500 Subject: [PATCH 384/534] Audio CD format as default and update based on data mode --- BasiliskII/src/bincue.cpp | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/bincue.cpp b/BasiliskII/src/bincue.cpp index fe654bcc7..a500811f3 100644 --- a/BasiliskII/src/bincue.cpp +++ b/BasiliskII/src/bincue.cpp @@ -263,6 +263,11 @@ static bool ParseCueSheet(FILE *fh, CueSheet *cs, const char *cuefile) totalPregap = 0; prestart = 0; + + // Use Audio CD settings by default, otherwise data mode will be specified + cs->raw_sector_size = 2352; + cs->cooked_sector_size = 2352; + cs->header_size = 0; while (fgets(line, MAXLINE, fh) != NULL) { Track *curr = &cs->tracks[cs->tcnt]; @@ -321,7 +326,7 @@ static bool ParseCueSheet(FILE *fh, CueSheet *cs, const char *cuefile) } curr->number = i_track; - // parse track type + // parse track type and update sector size for data discs if applicable field = strtok(NULL, " \t\n\r"); if (!strcmp("MODE1/2352", field)) { // red-book CD-ROM standard From 478fc396508e50986a718aefb234d63ecb2794ad Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 14 Jul 2020 23:07:46 -0500 Subject: [PATCH 385/534] Setting optimization level --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 +- .../src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 4bb52379d..6b9cd01d1 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1064,7 +1064,7 @@ GCC_C_LANGUAGE_STANDARD = "compiler-default"; GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 3; + GCC_OPTIMIZATION_LEVEL = 0; GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", ENABLE_MACOSX_ETHERHELPER, diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 086523f95..a686e0fb7 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1286,7 +1286,7 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_ENABLE_TRIGRAPHS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; - GCC_OPTIMIZATION_LEVEL = 3; + GCC_OPTIMIZATION_LEVEL = 0; GCC_PRECOMPILE_PREFIX_HEADER = NO; GCC_PREFIX_HEADER = ""; GCC_PREPROCESSOR_DEFINITIONS = ( From 1da83854b0e67ac5061db878c27fc6247ad2362b Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 25 Jul 2020 22:45:07 +0900 Subject: [PATCH 386/534] fix freezing bug on launch --- SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp | 1 + SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp | 6 ++++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp index eefa1f953..39a31ecb1 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-cpu.cpp @@ -372,6 +372,7 @@ powerpc_cpu::powerpc_cpu(task_struct *parent_task) #if PPC_ENABLE_JIT use_jit = false; #endif + spcflags().init(); ++ppc_refcount; initialize(); } diff --git a/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp b/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp index 0b521d534..d379f1cb1 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/spcflags.hpp @@ -41,8 +41,10 @@ class basic_spcflags public: basic_spcflags() - : mask(0), lock(SPIN_LOCK_UNLOCKED) - { } + { init(); } + + void init() + { mask = 0; lock = SPIN_LOCK_UNLOCKED; } bool empty() const { return (mask == 0); } From 7c6b9a67f6b737dc91c0cd254f60ab9b544dfe2a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 8 Aug 2020 11:50:55 +0900 Subject: [PATCH 387/534] the first steps for Apple Silicon --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 9 + BasiliskII/src/CrossPlatform/sigsegv.h | 16 + .../BasiliskII.xcodeproj/project.pbxproj | 4 +- BasiliskII/src/slirp/sbuf.c | 2 +- SheepShaver/src/CrossPlatform/sigsegv.cpp | 9 + .../project.pbxproj | 10 +- .../src/MacOSX/config/config-macosx-aarch64.h | 527 ++++++++++++++++++ SheepShaver/src/MacOSX/config/config.h | 4 +- .../src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp | 5 + .../src/kpx_cpu/src/cpu/jit/jit-cache.cpp | 5 + .../src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp | 5 + .../src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp | 5 + 12 files changed, 593 insertions(+), 8 deletions(-) create mode 100644 SheepShaver/src/MacOSX/config/config-macosx-aarch64.h diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index f1322d1e7..bd089de9c 100755 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -2499,6 +2499,15 @@ static bool arm_skip_instruction(unsigned long * regs) } #endif +#ifdef _STRUCT_ARM_THREAD_STATE64 +static bool aarch64_skip_instruction(unsigned long *regs) { + _STRUCT_ARM_THREAD_STATE64 t; + const int PC = &t.__pc - &t.__x[0]; + if (!regs[PC]) return false; + regs[PC] += 4; + return true; +} +#endif // Fallbacks #ifndef SIGSEGV_FAULT_ADDRESS_FAST diff --git a/BasiliskII/src/CrossPlatform/sigsegv.h b/BasiliskII/src/CrossPlatform/sigsegv.h index d95ca8340..5bfbfe8e7 100644 --- a/BasiliskII/src/CrossPlatform/sigsegv.h +++ b/BasiliskII/src/CrossPlatform/sigsegv.h @@ -105,6 +105,22 @@ extern "C" { #define SIGSEGV_SKIP_INSTRUCTION ix86_skip_instruction #define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIP->thr_state.MACH_FIELD_NAME(rax)) /* RAX is the first GPR we consider */ #endif + +#ifdef __aarch64__ +#if __DARWIN_UNIX03 && defined _STRUCT_ARM_THREAD_STATE64 +#define MACH_FIELD_NAME(X) __CONCAT(__,X) +#endif +#define SIGSEGV_EXCEPTION_STATE_TYPE arm_exception_state64_t +#define SIGSEGV_EXCEPTION_STATE_FLAVOR ARM_EXCEPTION_STATE64 +#define SIGSEGV_EXCEPTION_STATE_COUNT ARM_EXCEPTION_STATE64_COUNT +#define SIGSEGV_FAULT_ADDRESS SIP->exc_state.MACH_FIELD_NAME(far) +#define SIGSEGV_THREAD_STATE_TYPE arm_thread_state64_t +#define SIGSEGV_THREAD_STATE_FLAVOR ARM_THREAD_STATE64 +#define SIGSEGV_THREAD_STATE_COUNT ARM_THREAD_STATE64_COUNT +#define SIGSEGV_REGISTER_FILE ((SIGSEGV_REGISTER_TYPE *)&SIP->thr_state.MACH_FIELD_NAME(x[0])) /* x[0] is the first GPR we consider */ +#define SIGSEGV_SKIP_INSTRUCTION aarch64_skip_instruction +#endif + #ifdef __x86_64__ #define SIGSEGV_FAULT_ADDRESS_FAST (((uint64_t)code[1])|0x100000000) #else diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 6b9cd01d1..24415cd18 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1095,7 +1095,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_CFLAGS = ""; }; name = Debug; @@ -1154,7 +1154,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_CFLAGS = ""; }; name = Release; diff --git a/BasiliskII/src/slirp/sbuf.c b/BasiliskII/src/slirp/sbuf.c index 0d8800920..2d078f381 100755 --- a/BasiliskII/src/slirp/sbuf.c +++ b/BasiliskII/src/slirp/sbuf.c @@ -5,7 +5,7 @@ * terms and conditions of the copyright. */ -// #include +#include #include /* Done as a macro in socket.h */ diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 244c9ac2f..f26c476ab 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2499,6 +2499,15 @@ static bool arm_skip_instruction(unsigned long * regs) } #endif +#ifdef _STRUCT_ARM_THREAD_STATE64 +static bool aarch64_skip_instruction(unsigned long *regs) { + _STRUCT_ARM_THREAD_STATE64 t; + const int PC = &t.__pc - &t.__x[0]; + if (!regs[PC]) return false; + regs[PC] += 4; + return true; +} +#endif // Fallbacks #ifndef SIGSEGV_FAULT_ADDRESS_FAST diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index a686e0fb7..30b69bfb9 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -390,6 +390,7 @@ E44C460320D262AF000583AE /* cksum.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cksum.c; path = ../../../BasiliskII/src/slirp/cksum.c; sourceTree = ""; }; E44C460420D262AF000583AE /* tcp_output.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_output.c; path = ../../../BasiliskII/src/slirp/tcp_output.c; sourceTree = ""; }; E456E2AC20C82B60006C8DC2 /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; + E4989F3224DE4438004D43E2 /* config-macosx-aarch64.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = "config-macosx-aarch64.h"; sourceTree = ""; }; E4C9A03D1FD55CDC00CABBF9 /* basic-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "basic-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/basic-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; E4C9A03F1FD55CE700CABBF9 /* ppc-dyngen-ops-x86_64_macos.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; name = "ppc-dyngen-ops-x86_64_macos.hpp"; path = "dyngen_precompiled/ppc-dyngen-ops-x86_64_macos.hpp"; sourceTree = ""; }; E4CBF46020CFC451009F40CC /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video_sdl.cpp; path = ../../../BasiliskII/src/SDL/video_sdl.cpp; sourceTree = ""; }; @@ -865,6 +866,7 @@ 0873A76514ABD151004F12B7 /* config */ = { isa = PBXGroup; children = ( + E4989F3224DE4438004D43E2 /* config-macosx-aarch64.h */, 0879BD8515A891EC00DC277D /* config-macosx-ppc_32.h */, 0879BD8615A891EC00DC277D /* config-macosx-x86_32.h */, 0873A76614ABD151004F12B7 /* config-macosx-x86_64.h */, @@ -1204,7 +1206,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Debug; }; @@ -1243,7 +1245,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Release; }; @@ -1330,7 +1332,7 @@ PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_LDFLAGS = ""; }; name = Debug; @@ -1396,7 +1398,7 @@ PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Release; }; diff --git a/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h b/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h new file mode 100644 index 000000000..aa04b6a95 --- /dev/null +++ b/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h @@ -0,0 +1,527 @@ +/* config.h. Generated from config.h.in by configure. */ +/* config.h.in. Generated from configure.ac by autoheader. */ + +#ifndef CONFIG_H +#define CONFIG_H + + +/* Define if building universal (internal helper macro) */ +/* #undef AC_APPLE_UNIVERSAL_BUILD */ + +/* Define if using a PowerPC CPU emulator. */ +#define EMULATED_PPC 1 + +/* Define to enable dyngen engine */ +#define ENABLE_DYNGEN 0 + +/* Define is using ESD. */ +/* #undef ENABLE_ESD */ + +/* Define if using Linux fbdev extension. */ +/* #undef ENABLE_FBDEV_DGA */ + +/* Define if using GTK. */ +/* #undef ENABLE_GTK */ + +/* Define if using "mon". */ +/* #undef ENABLE_MON */ + +/* Define if your system supports TUN/TAP devices. */ +/* #undef ENABLE_TUNTAP */ + +/* Define if using video enabled on SEGV signals. */ +/* #undef ENABLE_VOSF */ + +/* Define if using XFree86 DGA extension. */ +/* #undef ENABLE_XF86_DGA */ + +/* Define if using XFree86 DGA extension. */ +/* #undef ENABLE_XF86_VIDMODE */ + +/* Define to 1 if you have the header file. */ +#define HAVE_ARPA_INET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_AVAILABILITYMACROS_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_BYTESWAP_H */ + +/* Define to 1 if you have the `ceil' function. */ +#define HAVE_CEIL 1 + +/* Define to 1 if you have the `ceilf' function. */ +#define HAVE_CEILF 1 + +/* Define to 1 if you have the `cfmakeraw' function. */ +#define HAVE_CFMAKERAW 1 + +/* Define to 1 if you have the `clock_gettime' function. */ +/* #undef HAVE_CLOCK_GETTIME */ + +/* Define to 1 if you have the `clock_nanosleep' function. */ +/* #undef HAVE_CLOCK_NANOSLEEP */ + +/* Define if you have /dev/ptmx. */ +/* #undef HAVE_DEV_PTMX */ + +/* Define if you have /dev/ptc. */ +/* #undef HAVE_DEV_PTS_AND_PTC */ + +/* Define to 1 if you have the header file. */ +#define HAVE_DIRENT_H 1 + +/* Define to 1 if you have the `exp2' function. */ +#define HAVE_EXP2 1 + +/* Define to 1 if you have the `exp2f' function. */ +#define HAVE_EXP2F 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FCNTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_FENV_H 1 + +/* Define to 1 if you have the `floor' function. */ +#define HAVE_FLOOR 1 + +/* Define to 1 if you have the `floorf' function. */ +#define HAVE_FLOORF 1 + +/* Define if framework AppKit is available. */ +#define HAVE_FRAMEWORK_APPKIT 1 + +/* Define if framework AudioToolbox is available. */ +#define HAVE_FRAMEWORK_AUDIOTOOLBOX 1 + +/* Define if framework AudioUnit is available. */ +#define HAVE_FRAMEWORK_AUDIOUNIT 1 + +/* Define if framework Carbon is available. */ +#define HAVE_FRAMEWORK_CARBON 1 + +/* Define if framework CoreAudio is available. */ +#define HAVE_FRAMEWORK_COREAUDIO 1 + +/* Define if framework CoreFoundation is available. */ +#define HAVE_FRAMEWORK_COREFOUNDATION 1 + +/* Define if framework IOKit is available. */ +#define HAVE_FRAMEWORK_IOKIT 1 + +/* Define if framework SDL is available. */ +/* #undef HAVE_FRAMEWORK_SDL */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_HISTORY_H */ + +/* Define to 1 if you have the `inet_aton' function. */ +#define HAVE_INET_ATON 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_INTTYPES_H */ + +/* Define to 1 if you have the header + file. */ +#define HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDEVICE_H 1 + +/* Define to 1 if you have the `curses' library (-lcurses). */ +/* #undef HAVE_LIBCURSES */ + +/* Define to 1 if you have the `c_r' library (-lc_r). */ +/* #undef HAVE_LIBC_R */ + +/* Define to 1 if you have the `Hcurses' library (-lHcurses). */ +/* #undef HAVE_LIBHCURSES */ + +/* Define to 1 if you have the `m' library (-lm). */ +#define HAVE_LIBM 1 + +/* Define to 1 if you have the `ncurses' library (-lncurses). */ +/* #undef HAVE_LIBNCURSES */ + +/* Define to 1 if you have the `posix4' library (-lposix4). */ +/* #undef HAVE_LIBPOSIX4 */ + +/* Define to 1 if you have the `pthread' library (-lpthread). */ +#define HAVE_LIBPTHREAD 1 + +/* Define to 1 if you have the `PTL' library (-lPTL). */ +/* #undef HAVE_LIBPTL */ + +/* Define to 1 if you have the `readline' library (-lreadline). */ +/* #undef HAVE_LIBREADLINE */ + +/* Define to 1 if you have the `termcap' library (-ltermcap). */ +/* #undef HAVE_LIBTERMCAP */ + +/* Define to 1 if you have the `terminfo' library (-lterminfo). */ +/* #undef HAVE_LIBTERMINFO */ + +/* Define to 1 if you have the `termlib' library (-ltermlib). */ +/* #undef HAVE_LIBTERMLIB */ + +/* Define to 1 if you have the `vhd' library (-lvhd). */ +/* #undef HAVE_LIBVHD */ + +/* Define if there is a linker script to relocate the executable above + 0x70000000. */ +#define HAVE_LINKER_SCRIPT 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LINUX_IF_TUN_H */ + +/* Define to 1 if you have the `log2' function. */ +#define HAVE_LOG2 1 + +/* Define to 1 if you have the `log2f' function. */ +#define HAVE_LOG2F 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_LOGIN_H */ + +/* Define if your system supports Mach exceptions. */ +#define HAVE_MACH_EXCEPTIONS 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_MACH_INIT_H 1 + +/* Define to 1 if you have the `mach_task_self' function. */ +#define HAVE_MACH_TASK_SELF 1 + +/* Define if your system has a working vm_allocate()-based memory allocator. + */ +#define HAVE_MACH_VM 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_MACH_VM_MAP_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_MALLOC_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_MEMORY_H */ + +/* Define to 1 if you have the `mmap' function. */ +#define HAVE_MMAP 1 + +/* Define if defines MAP_ANON and mmap()'ing with MAP_ANON works. + */ +/* #undef HAVE_MMAP_ANON */ + +/* Define if defines MAP_ANONYMOUS and mmap()'ing with + MAP_ANONYMOUS works. */ +/* #undef HAVE_MMAP_ANONYMOUS */ + +/* Define if your system has a working mmap()-based memory allocator. */ +/* #undef HAVE_MMAP_VM */ + +/* Define to 1 if you have the `mprotect' function. */ +#define HAVE_MPROTECT 1 + +/* Define to 1 if you have the `munmap' function. */ +#define HAVE_MUNMAP 1 + +/* Define to 1 if you have the `nanosleep' function. */ +#define HAVE_NANOSLEEP 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_NET_IF_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_NET_IF_TUN_H */ + +/* Define if you are on NEWS-OS (additions from openssh-3.2.2p1, for + sshpty.c). */ +/* #undef HAVE_NEWS4 */ + +/* Define to 1 if you have the `poll' function. */ +#define HAVE_POLL 1 + +/* Define if pthreads are available. */ +#define HAVE_PTHREADS 1 + +/* Define to 1 if you have the `pthread_cancel' function. */ +#define HAVE_PTHREAD_CANCEL 1 + +/* Define to 1 if you have the `pthread_cond_init' function. */ +#define HAVE_PTHREAD_COND_INIT 1 + +/* Define to 1 if you have the `pthread_mutexattr_setprotocol' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL 1 + +/* Define to 1 if you have the `pthread_mutexattr_setpshared' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETPSHARED 1 + +/* Define to 1 if you have the `pthread_mutexattr_settype' function. */ +#define HAVE_PTHREAD_MUTEXATTR_SETTYPE 1 + +/* Define to 1 if you have the `pthread_testcancel' function. */ +#define HAVE_PTHREAD_TESTCANCEL 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_PTY_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_HISTORY_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_READLINE_READLINE_H */ + +/* Define to 1 if you have the `round' function. */ +#define HAVE_ROUND 1 + +/* Define to 1 if you have the `roundf' function. */ +#define HAVE_ROUNDF 1 + +/* Define to 1 if you have the `sem_init' function. */ +#define HAVE_SEM_INIT 1 + +/* Define to 1 if you have the `sigaction' function. */ +#define HAVE_SIGACTION 1 + +/* Define if we know a hack to replace siginfo_t->si_addr member. */ +/* #undef HAVE_SIGCONTEXT_SUBTERFUGE */ + +/* Define if your system support extended signals. */ +/* #undef HAVE_SIGINFO_T */ + +/* Define to 1 if you have the `signal' function. */ +#define HAVE_SIGNAL 1 + +/* Define if sa_restorer is available in struct sigaction. */ +/* #undef HAVE_SIGNAL_SA_RESTORER */ + +/* Define if we can ignore the fault (instruction skipping in SIGSEGV + handler). */ +#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 + +/* Define if slirp library is supported */ +#define HAVE_SLIRP 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STDINT_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STDLIB_H */ + +/* Define to 1 if you have the `strdup' function. */ +#define HAVE_STRDUP 1 + +/* Define to 1 if you have the `strerror' function. */ +#define HAVE_STRERROR 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_STRINGS_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_STRING_H */ + +/* Define to 1 if you have the `strlcpy' function. */ +#define HAVE_STRLCPY 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BITYPES_H */ + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_BSDTTY_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_FILIO_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_IOCTL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_MMAN_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_POLL_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SELECT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_SOCKET_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_STAT_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_TIME_H 1 + +/* Define to 1 if you have the header file. */ +/* #undef HAVE_SYS_TYPES_H */ + +/* Define to 1 if you have the header file. */ +#define HAVE_SYS_WAIT_H 1 + +/* Define to 1 if you have the `task_self' function. */ +/* #undef HAVE_TASK_SELF */ + +/* Define to 1 if you have the `trunc' function. */ +#define HAVE_TRUNC 1 + +/* Define to 1 if you have the `truncf' function. */ +#define HAVE_TRUNCF 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UNISTD_H 1 + +/* Define to 1 if you have the header file. */ +#define HAVE_UTIL_H 1 + +/* Define to 1 if you have the `vhangup' function. */ +/* #undef HAVE_VHANGUP */ + +/* Define to 1 if you have the `vm_allocate' function. */ +#define HAVE_VM_ALLOCATE 1 + +/* Define to 1 if you have the `vm_deallocate' function. */ +#define HAVE_VM_DEALLOCATE 1 + +/* Define to 1 if you have the `vm_protect' function. */ +#define HAVE_VM_PROTECT 1 + +/* Define if your system supports Windows exceptions. */ +/* #undef HAVE_WIN32_EXCEPTIONS */ + +/* Define to 1 if you have the `_getpty' function. */ +/* #undef HAVE__GETPTY */ + +/* Define to the floating point format of the host machine. */ +#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT + +/* Define to 1 if the host machine stores floating point numbers in memory + with the word containing the sign bit at the lowest address, or to 0 if it + does it the other way around. This macro should not be defined if the + ordering is the same as for multi-word integers. */ +/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ + +/* Define constant offset for Mac address translation */ +/* #undef NATMEM_OFFSET */ + +/* Define to the address where bug reports for this package should be sent. */ +#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" + +/* Define to the full name of this package. */ +#define PACKAGE_NAME "SheepShaver" + +/* Define to the full name and version of this package. */ +#define PACKAGE_STRING "SheepShaver 2.5" + +/* Define to the one symbol short name of this package. */ +#define PACKAGE_TARNAME "SheepShaver" + +/* Define to the home page for this package. */ +#define PACKAGE_URL "" + +/* Define to the version of this package. */ +#define PACKAGE_VERSION "2.5" + +/* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this + system. */ +#define PAGEZERO_HACK 1 + +/* Define as the return type of signal handlers (`int' or `void'). */ +#define RETSIGTYPE void + +/* Define if your system requires sigactions to be reinstalled. */ +/* #undef SIGACTION_NEED_REINSTALL */ + +/* Define if your system requires signals to be reinstalled. */ +/* #undef SIGNAL_NEED_REINSTALL */ + +/* The size of `double', as computed by sizeof. */ +#define SIZEOF_DOUBLE 8 + +/* The size of `float', as computed by sizeof. */ +#define SIZEOF_FLOAT 4 + +/* The size of `int', as computed by sizeof. */ +#define SIZEOF_INT 4 + +/* The size of `long', as computed by sizeof. */ +#define SIZEOF_LONG 8 + +/* The size of `long long', as computed by sizeof. */ +#define SIZEOF_LONG_LONG 8 + +/* The size of `short', as computed by sizeof. */ +#define SIZEOF_SHORT 2 + +/* The size of `void *', as computed by sizeof. */ +#define SIZEOF_VOID_P 8 + +/* Define to 1 if you have the ANSI C header files. */ +#define STDC_HEADERS 1 + +/* Define to 1 if you can safely include both and . */ +#define TIME_WITH_SYS_TIME 1 + +/* Define to 1 if your declares `struct tm'. */ +/* #undef TM_IN_SYS_TIME */ + +/* Define if BSD-style non-blocking I/O is to be used */ +/* #undef USE_FIONBIO */ + +/* Define to enble SDL support. */ +#define USE_SDL 1 + +/* Define to enable SDL audio support */ +#define USE_SDL_AUDIO 1 + +/* Define to enable SDL video graphics support. */ +#define USE_SDL_VIDEO 1 + +/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most + significant byte first (like Motorola and SPARC, unlike Intel). */ +#if defined AC_APPLE_UNIVERSAL_BUILD +# if defined __BIG_ENDIAN__ +# define WORDS_BIGENDIAN 1 +# endif +#else +# ifndef WORDS_BIGENDIAN +/* # undef WORDS_BIGENDIAN */ +# endif +#endif + +/* Define to 1 if the X Window System is missing or not being used. */ +/* #undef X_DISPLAY_MISSING */ + +/* Number of bits in a file offset, on hosts where this is settable. */ +/* #undef _FILE_OFFSET_BITS */ + +/* Define for large files, on AIX-style hosts. */ +/* #undef _LARGE_FILES */ + +/* Define to empty if `const' does not conform to ANSI C. */ +/* #undef const */ + +/* Define to `__inline__' or `__inline' if that's what the C compiler + calls it, or to nothing if 'inline' is not supported under any name. */ +#ifndef __cplusplus +/* #undef inline */ +#endif + +/* Define to `off_t' if does not define. */ +#define loff_t off_t + +/* Define to `long int' if does not define. */ +/* #undef off_t */ + +/* Define to `unsigned int' if does not define. */ +/* #undef size_t */ + +/* Define to 'int' if doesn't define. */ +/* #undef socklen_t */ + +#endif /* CONFIG_H */ + diff --git a/SheepShaver/src/MacOSX/config/config.h b/SheepShaver/src/MacOSX/config/config.h index bb5a07813..a615bca30 100644 --- a/SheepShaver/src/MacOSX/config/config.h +++ b/SheepShaver/src/MacOSX/config/config.h @@ -4,6 +4,8 @@ #include "config-macosx-x86_32.h" #elif defined(__ppc__) #include "config-macosx-ppc_32.h" +#elif defined(__aarch64__) + #include "config-macosx-aarch64.h" #else #error Unknown platform -#endif \ No newline at end of file +#endif diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp index 2423d67a2..b74fda81f 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/jit/basic-dyngen.cpp @@ -19,6 +19,9 @@ */ #include "sysdeps.h" + +#if ENABLE_DYNGEN + #include "basic-dyngen.hpp" int __op_param1, __op_param2, __op_param3; @@ -181,3 +184,5 @@ basic_dyngen::gen_align(int align) #endif return code_ptr(); } + +#endif //ENABLE_DYNGEN diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp index 77762e92f..dfe1dbeef 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/jit/jit-cache.cpp @@ -19,6 +19,9 @@ */ #include "sysdeps.h" + +#if ENABLE_DYNGEN + #include "vm_alloc.h" #include "cpu/jit/jit-cache.hpp" @@ -146,3 +149,5 @@ basic_jit_cache::copy_data(const uint8 *block, uint32 size) D(bug("basic_jit_cache: DATA %p, %d bytes [data=%p, offs=%u]\n", ptr, size, data, data->offs)); return ptr; } + +#endif //ENABLE_DYNGEN diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp index 8d8451cb1..84b70891b 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-dyngen.cpp @@ -19,6 +19,9 @@ */ #include "sysdeps.h" + +#if ENABLE_DYNGEN + #include "utils/utils-cpuinfo.hpp" #include "cpu/ppc/ppc-dyngen.hpp" #include "cpu/ppc/ppc-bitfields.hpp" @@ -311,3 +314,5 @@ void powerpc_dyngen::gen_store_vect_VS_T0(int vS) gen_load_ad_VD_VR(vS); gen_op_store_vect_VD_T0(); } + +#endif //ENABLE_DYNGEN diff --git a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp index 57163a5bf..27d3e2c92 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/ppc/ppc-jit.cpp @@ -19,6 +19,9 @@ */ #include "sysdeps.h" + +#if ENABLE_DYNGEN + #include "cpu/jit/dyngen-exec.h" #include "cpu/ppc/ppc-jit.hpp" #include "cpu/ppc/ppc-cpu.hpp" @@ -949,3 +952,5 @@ bool powerpc_jit::gen_ssse3_vperm(int mnemo, int vD, int vA, int vB, int vC) return true; } #endif + +#endif //ENABLE_DYNGEN From d906fb23b0b417df8527f416a4f3206bcb8e282c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 10 Aug 2020 13:01:22 +0900 Subject: [PATCH 388/534] CD fix default palette --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 7 +++---- BasiliskII/src/SDL/video_sdl2.cpp | 5 +++++ BasiliskII/src/cdrom.cpp | 2 ++ SheepShaver/src/CrossPlatform/sigsegv.cpp | 7 +++---- 4 files changed, 13 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index bd089de9c..73ca8330c 100755 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -2501,10 +2501,9 @@ static bool arm_skip_instruction(unsigned long * regs) #ifdef _STRUCT_ARM_THREAD_STATE64 static bool aarch64_skip_instruction(unsigned long *regs) { - _STRUCT_ARM_THREAD_STATE64 t; - const int PC = &t.__pc - &t.__x[0]; - if (!regs[PC]) return false; - regs[PC] += 4; + _STRUCT_ARM_THREAD_STATE64 *ts = (_STRUCT_ARM_THREAD_STATE64 *)regs; + if (!ts->__pc) return false; + ts->__pc += 4; return true; } #endif diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 85b14e855..a17921a68 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1030,6 +1030,11 @@ void driver_base::init() set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); adapt_to_video_mode(); + + // set default B/W palette + sdl_palette = SDL_AllocPalette(256); + sdl_palette->colors[1] = (SDL_Color){ .r = 0, .g = 0, .b = 0 }; + SDL_SetSurfacePalette(s, sdl_palette); } void driver_base::adapt_to_video_mode() { diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index 36250297f..ee8d2350f 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -539,6 +539,7 @@ int16 CDROMControl(uint32 pb, uint32 dce) // Audio calls tend to end up without correct reference // Real mac would just play first disc, but we can guess correct one from last data call info = get_drive_info(last_drive_num); + if (info == drives.end()) return nsDrvErr; } } @@ -1071,6 +1072,7 @@ int16 CDROMStatus(uint32 pb, uint32 dce) return nsDrvErr; } else { info = get_drive_info(last_drive_num); + if (info == drives.end()) return nsDrvErr; } } diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index f26c476ab..d117366ea 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -2501,10 +2501,9 @@ static bool arm_skip_instruction(unsigned long * regs) #ifdef _STRUCT_ARM_THREAD_STATE64 static bool aarch64_skip_instruction(unsigned long *regs) { - _STRUCT_ARM_THREAD_STATE64 t; - const int PC = &t.__pc - &t.__x[0]; - if (!regs[PC]) return false; - regs[PC] += 4; + _STRUCT_ARM_THREAD_STATE64 *ts = (_STRUCT_ARM_THREAD_STATE64 *)regs; + if (!ts->__pc) return false; + ts->__pc += 4; return true; } #endif From 1f2b35fef2d09effc2f7f2016a65adc82f828bac Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 12 Aug 2020 11:39:58 +0900 Subject: [PATCH 389/534] reserve framebuffer --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 11 ++++++++++- BasiliskII/src/CrossPlatform/vm_alloc.h | 2 ++ BasiliskII/src/SDL/video_sdl2.cpp | 6 +++++- 3 files changed, 17 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 005cb727c..cc51bd295 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -222,6 +222,13 @@ void vm_exit(void) #endif } +static void *reserved_buf; +static const size_t RESERVED_SIZE = 64 * 1024 * 1024; // for 5K Retina + +void *vm_acquire_reserved(size_t size) { + return reserved_buf && size <= RESERVED_SIZE ? reserved_buf : VM_MAP_FAILED; +} + /* Allocate zero-filled memory of SIZE bytes. The mapping is private and default protection bits are read / write. The return value is the actual mapping address chosen or VM_MAP_FAILED for errors. */ @@ -243,11 +250,13 @@ void * vm_acquire(size_t size, int options) #if defined(HAVE_MACH_VM) // vm_allocate() returns a zero-filled memory region - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, TRUE); + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, reserved_buf ? size : size + RESERVED_SIZE, TRUE); if (ret_code != KERN_SUCCESS) { errno = vm_error(ret_code); return VM_MAP_FAILED; } + if (!reserved_buf) + reserved_buf = (char *)addr + size; #elif defined(HAVE_MMAP_VM) int fd = zero_fd; int the_map_flags = translate_map_flags(options) | map_flags; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.h b/BasiliskII/src/CrossPlatform/vm_alloc.h index c44e853be..bc5aba974 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.h +++ b/BasiliskII/src/CrossPlatform/vm_alloc.h @@ -99,6 +99,8 @@ extern void vm_exit(void); extern void * vm_acquire(size_t size, int options = VM_MAP_DEFAULT); +extern void * vm_acquire_reserved(size_t size); + /* Allocate zero-filled memory at exactly ADDR (which must be page-aligned). Returns 0 if successful, -1 on errors. */ diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index a17921a68..2dc0a3ca9 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -215,6 +215,9 @@ extern void SysMountFirstFloppy(void); static void *vm_acquire_framebuffer(uint32 size) { +#ifdef HAVE_MACH_VM + return vm_acquire_reserved(size); +#else // always try to reallocate framebuffer at the same address static void *fb = VM_MAP_FAILED; if (fb != VM_MAP_FAILED) { @@ -228,11 +231,12 @@ static void *vm_acquire_framebuffer(uint32 size) if (fb == VM_MAP_FAILED) fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); return fb; +#endif } static inline void vm_release_framebuffer(void *fb, uint32 size) { - vm_release(fb, size); +// vm_release(fb, size); } static inline int get_customized_color_depth(int default_depth) From 630f4ffafbc4918f8231e68f9ece8ea7cba64af8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 12 Aug 2020 20:49:14 +0900 Subject: [PATCH 390/534] fixed leak --- BasiliskII/src/SDL/video_sdl2.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 2dc0a3ca9..dcd71dc7e 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -236,7 +236,9 @@ static void *vm_acquire_framebuffer(uint32 size) static inline void vm_release_framebuffer(void *fb, uint32 size) { -// vm_release(fb, size); +#ifndef HAVE_MACH_VM + vm_release(fb, size); +#endif } static inline int get_customized_color_depth(int default_depth) From 6985ad67fe0ecebe71c9d832a611a757a938df88 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 13 Aug 2020 21:00:42 +0900 Subject: [PATCH 391/534] BII: prepare JIT --- .../BasiliskII.xcodeproj/project.pbxproj | 35 ++++++-- BasiliskII/src/MacOSX/Makefile.gencpu | 12 +-- BasiliskII/src/MacOSX/config.h | 7 ++ BasiliskII/src/Unix/sysdeps.h | 90 ------------------- .../src/uae_cpu/compiler/compemu_fpp.cpp | 4 + .../src/uae_cpu/compiler/compemu_support.cpp | 4 + BasiliskII/src/uae_cpu/compiler/gencomp.c | 6 ++ 7 files changed, 56 insertions(+), 102 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 24415cd18..da18b1ce4 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -97,6 +97,10 @@ E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; + E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */; }; + E4ED8EE224E39BC400843219 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE024E39BC400843219 /* compemu.cpp */; }; + E4ED8EE324E39BC400843219 /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE124E39BC400843219 /* compstbl.cpp */; }; + E4ED8EE524E39C0D00843219 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */; }; E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; /* End PBXBuildFile section */ @@ -337,6 +341,11 @@ E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; + E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; + E4ED8EDF24E39B2A00843219 /* comptbl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencpu_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + E4ED8EE024E39BC400843219 /* compemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencpu_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4ED8EE124E39BC400843219 /* compstbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compstbl.cpp; path = gencpu_output/compstbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_fpp.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -428,6 +437,9 @@ 7532532B1F53675E0024025B /* gencpu output */ = { isa = PBXGroup; children = ( + E4ED8EE024E39BC400843219 /* compemu.cpp */, + E4ED8EE124E39BC400843219 /* compstbl.cpp */, + E4ED8EDF24E39B2A00843219 /* comptbl.h */, 7532532C1F5368370024025B /* cpuemu_nf.cpp */, 7532532D1F5368370024025B /* cpuemu.cpp */, 7532532E1F5368370024025B /* cpustbl_nf.cpp */, @@ -588,6 +600,8 @@ isa = PBXGroup; children = ( 7539E0AB1F23B25A006B2DF2 /* compemu.h */, + E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */, + E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */, 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, ); path = compiler; @@ -818,6 +832,8 @@ $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, + $BUILT_PRODUCTS_DIR/gencpu_output/compemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/compstbl.cpp, ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; @@ -831,6 +847,7 @@ buildActionMask = 2147483647; files = ( E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, + E4ED8EE524E39C0D00843219 /* compemu_fpp.cpp in Sources */, 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, @@ -840,6 +857,8 @@ 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, + E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */, + E4ED8EE324E39BC400843219 /* compstbl.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, @@ -847,6 +866,7 @@ 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, + E4ED8EE224E39BC400843219 /* compemu.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, @@ -1068,10 +1088,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", ENABLE_MACOSX_ETHERHELPER, - HAVE_CONFIG_H, - "USE_XCODE=1", - "DEBUG=1", - "USE_SDL_AUDIO=1", "BINCUE=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1091,6 +1107,10 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x1000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; @@ -1129,9 +1149,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "$(inherited)", ENABLE_MACOSX_ETHERHELPER, - HAVE_CONFIG_H, - "USE_XCODE=1", - "USE_SDL_AUDIO=1", "BINCUE=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1150,6 +1167,10 @@ LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; + OTHER_LDFLAGS = ( + "-pagezero_size", + 0x1000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu index 2e2ec45e0..d4eaf42ba 100644 --- a/BasiliskII/src/MacOSX/Makefile.gencpu +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -1,14 +1,16 @@ SRC = $(PROJECT_DIR)/../uae_cpu DST = $(BUILT_PRODUCTS_DIR)/gencpu_output -VPATH = $(SRC) +VPATH = $(SRC) $(SRC)/compiler CFLAGS = -DUSE_XCODE=1 -I. -I../uae_cpu -I../UNIX CXXFLAGS = -stdlib=libc++ $(CFLAGS) -OBJS = $(addprefix $(DST)/, defs68k.o gencpu.o readcpu.o) -all: $(DST)/gencpu - cd $(DST); ./gencpu +all: $(DST)/gencpu $(DST)/gencomp + cd $(DST); ./gencpu; ./gencomp -$(DST)/gencpu: $(OBJS) +$(DST)/gencpu: $(addprefix $(DST)/, defs68k.o readcpu.o gencpu.o) + $(CXX) $(CXXFLAGS) -o $@ $^ + +$(DST)/gencomp: $(addprefix $(DST)/, defs68k.o readcpu.o gencomp.o) $(CXX) $(CXXFLAGS) -o $@ $^ $(DST)/%.o: %.c diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index 9b853b472..896af06c2 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -817,4 +817,11 @@ #define FPU_IEEE +#if USE_JIT +#define DIRECT_ADDRESSING 1 +#define USE_JIT_FPU +#define X86_64_ASSEMBLY +#define OPTIMIZED_FLAGS +#endif + #endif diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 76406ae3e..51a53c783 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -184,96 +184,6 @@ typedef off_t loff_t; typedef char * caddr_t; #endif - -/** - * Helper functions to byteswap data - **/ - -#if defined(__GNUC__) -#if defined(__x86_64__) || defined(__i386__) -// Linux/AMD64 currently has no asm optimized bswap_32() in -#define opt_bswap_32 do_opt_bswap_32 -static inline uint32 do_opt_bswap_32(uint32 x) -{ - uint32 v; - __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x)); - return v; -} -#endif -#endif - -#ifdef HAVE_BYTESWAP_H -#include -#endif - -#ifdef opt_bswap_16 -#undef bswap_16 -#define bswap_16 opt_bswap_16 -#endif -#ifndef bswap_16 -#define bswap_16 generic_bswap_16 -#endif - -static inline uint16 generic_bswap_16(uint16 x) -{ - return ((x & 0xff) << 8) | ((x >> 8) & 0xff); -} - -#ifdef opt_bswap_32 -#undef bswap_32 -#define bswap_32 opt_bswap_32 -#endif -#ifndef bswap_32 -#define bswap_32 generic_bswap_32 -#endif - -static inline uint32 generic_bswap_32(uint32 x) -{ - return (((x & 0xff000000) >> 24) | - ((x & 0x00ff0000) >> 8) | - ((x & 0x0000ff00) << 8) | - ((x & 0x000000ff) << 24) ); -} - -#if defined(__i386__) -#define opt_bswap_64 do_opt_bswap_64 -static inline uint64 do_opt_bswap_64(uint64 x) -{ - return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32)); -} -#endif - -#ifdef opt_bswap_64 -#undef bswap_64 -#define bswap_64 opt_bswap_64 -#endif -#ifndef bswap_64 -#define bswap_64 generic_bswap_64 -#endif - -static inline uint64 generic_bswap_64(uint64 x) -{ - return (((x & UVAL64(0xff00000000000000)) >> 56) | - ((x & UVAL64(0x00ff000000000000)) >> 40) | - ((x & UVAL64(0x0000ff0000000000)) >> 24) | - ((x & UVAL64(0x000000ff00000000)) >> 8) | - ((x & UVAL64(0x00000000ff000000)) << 8) | - ((x & UVAL64(0x0000000000ff0000)) << 24) | - ((x & UVAL64(0x000000000000ff00)) << 40) | - ((x & UVAL64(0x00000000000000ff)) << 56) ); -} - -#ifdef WORDS_BIGENDIAN -static inline uint16 tswap16(uint16 x) { return x; } -static inline uint32 tswap32(uint32 x) { return x; } -static inline uint64 tswap64(uint64 x) { return x; } -#else -static inline uint16 tswap16(uint16 x) { return bswap_16(x); } -static inline uint32 tswap32(uint32 x) { return bswap_32(x); } -static inline uint64 tswap64(uint64 x) { return bswap_64(x); } -#endif - - /* Time data type for Time Manager emulation */ #if defined(__MACH__) typedef mach_timespec_t tm_time_t; diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp index bb536634f..cadecf98e 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -34,6 +34,8 @@ #include "sysdeps.h" +#if USE_JIT + #include #include @@ -1635,3 +1637,5 @@ void comp_fpp_opp (uae_u32 opcode, uae_u16 extra) m68k_setpc (m68k_getpc () - 4); fpuop_illg (opcode,extra); } + +#endif //USE_JIT diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 1713b734a..608f4e55b 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -25,6 +25,8 @@ #include "sysdeps.h" +#if USE_JIT + #if !REAL_ADDRESSING && !DIRECT_ADDRESSING #error "Only Real or Direct Addressing is supported with the JIT Compiler" #endif @@ -7125,3 +7127,5 @@ void m68k_compile_execute (void) m68k_do_compile_execute(); } } + +#endif //USE_JIT diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index 2e16972d5..14ad85a50 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -3038,6 +3038,9 @@ main (int argc, char **argv) stblfile = fopen ("compstbl.cpp", "wb"); freopen ("compemu.cpp", "wb", stdout); + fprintf(stblfile, "#if USE_JIT\n"); + printf("#if USE_JIT\n"); + generate_includes (stdout); generate_includes (stblfile); @@ -3059,6 +3062,9 @@ main (int argc, char **argv) noflags=1; generate_func (noflags); + fprintf(stblfile, "#endif //USE_JIT\n"); + printf("#endif //USE_JIT\n"); + free(opcode_map); free(opcode_last_postfix); free(opcode_next_clev); From ffee1ebad210fb75b239e1bbeac31c85411090d9 Mon Sep 17 00:00:00 2001 From: rakslice Date: Mon, 17 Aug 2020 21:05:08 -0700 Subject: [PATCH 392/534] Add gamma support for direct color modes --- BasiliskII/src/SDL/video_sdl2.cpp | 36 ++++++++++++++++++++++++-- SheepShaver/src/video.cpp | 43 ++++++++++++++++++++++++++++++- 2 files changed, 76 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 7f27557d2..7d059dfd0 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -700,6 +700,10 @@ static void shutdown_sdl_video() delete_sdl_video_window(); } +static uint16 last_gamma_red[256]; +static uint16 last_gamma_green[256]; +static uint16 last_gamma_blue[256]; + static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) { if (guest_surface) { @@ -1739,9 +1743,37 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) { const VIDEO_MODE &mode = get_current_mode(); - // FIXME: how can we handle the gamma ramp? - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) + if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { + // handle the gamma ramp + + uint16 red[256]; + uint16 green[256]; + uint16 blue[256]; + + for (int i = 0; i < 256; i++) { + red[i] = pal[i*3 + 0] << 8; + green[i] = pal[i*3 + 1] << 8; + blue[i] = pal[i*3 + 2] << 8; + } + + bool changed = (memcmp(red, last_gamma_red, 512) != 0 || + memcmp(green, last_gamma_green, 512) != 0 || + memcmp(blue, last_gamma_blue, 512) != 0); + + if (changed) { + int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); + + if (result < 0) { + printf("SDL_SetWindowGammaRamp returned %d, SDL error:", result, SDL_GetError()); + } + + memcpy(last_gamma_red, red, 512); + memcpy(last_gamma_green, green, 512); + memcpy(last_gamma_blue, blue, 512); + } + return; + } LOCK_PALETTE; diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index d0eda93db..fc884e658 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -211,6 +211,10 @@ static bool allocate_gamma_table(VidLocals *csSave, uint32 size) return true; } + static inline uint8 max(uint8 a, uint8 b) { + return a > b? a : b; + } + static int16 set_gamma(VidLocals *csSave, uint32 gamma) { if (gamma == 0) { // Build linear ramp, 256 entries @@ -229,8 +233,11 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) // Build the linear ramp uint32 p = csSave->gammaTable + gFormulaData; - for (int i=0; i<256; i++) + + for (int i=0; i<256; i++) { WriteMacInt8(p + i, i); + mac_pal[i].red = mac_pal[i].green = mac_pal[i].blue = i; + } } else { // User-supplied gamma table @@ -256,7 +263,41 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) // Copy table Mac2Mac_memcpy(csSave->gammaTable, gamma, size); + + // Save new gamma data for video impl + if (data_width != 8) { + // FIXME: handle bit-packed data + } else { + uint32 p = csSave->gammaTable + gFormulaData + gFormulaSize; + + uint32 p_red; + uint32 p_green; + uint32 p_blue; + + // make values increasing as some implementations really don't like it when gamma tables aren't + uint8 max_red = 0; + uint8 max_green = 0; + uint8 max_blue = 0; + + if (chan_cnt == 3) { + p_red = p; + p_green = p + data_cnt; + p_blue = p + data_cnt * 2; + } else { + p_red = p_green = p_blue = p; + } + for (int i=0; i < data_cnt; i++) { + max_red = max(max_red, ReadMacInt8(p_red++)); + max_green = max(max_green, ReadMacInt8(p_green++)); + max_blue = max(max_blue, ReadMacInt8(p_blue++)); + mac_pal[i].red = max_red; + mac_pal[i].green = max_green; + mac_pal[i].blue = max_blue; + } + } } + + video_set_palette(); return noErr; } From 792ad5ccff7bb3bd8635e2e20ba3f12024569fd9 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 03:28:23 -0700 Subject: [PATCH 393/534] cleanup --- BasiliskII/src/SDL/video_sdl2.cpp | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 7d059dfd0..d7694c771 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -174,6 +174,11 @@ static SDL_mutex *frame_buffer_lock = NULL; #define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) #define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) +// Previously set gamma tables +static uint16 last_gamma_red[256]; +static uint16 last_gamma_green[256]; +static uint16 last_gamma_blue[256]; + // Video refresh function static void VideoRefreshInit(void); static void (*video_refresh)(void); @@ -700,10 +705,6 @@ static void shutdown_sdl_video() delete_sdl_video_window(); } -static uint16 last_gamma_red[256]; -static uint16 last_gamma_green[256]; -static uint16 last_gamma_blue[256]; - static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) { if (guest_surface) { From d1fcff0a08a70bc5f180303a2e3f62d998bf2c65 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 03:28:43 -0700 Subject: [PATCH 394/534] corresponding gamma change for sdl1 --- BasiliskII/src/SDL/video_sdl.cpp | 36 ++++++++++++++++++++++++++++++-- 1 file changed, 34 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index d7a464791..d3e764bb4 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -155,6 +155,11 @@ static SDL_mutex *frame_buffer_lock = NULL; #define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) #define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) +// Previously set gamma tables +static uint16 last_gamma_red[256]; +static uint16 last_gamma_green[256]; +static uint16 last_gamma_blue[256]; + // Video refresh function static void VideoRefreshInit(void); static void (*video_refresh)(void); @@ -1363,9 +1368,36 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) { const VIDEO_MODE &mode = get_current_mode(); - // FIXME: how can we handle the gamma ramp? - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) + if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { + // handle the gamma ramp + uint16 red[256]; + uint16 green[256]; + uint16 blue[256]; + + for (int i = 0; i < 256; i++) { + red[i] = pal[i*3 + 0] << 8; + green[i] = pal[i*3 + 1] << 8; + blue[i] = pal[i*3 + 2] << 8; + } + + bool changed = (memcmp(red, last_gamma_red, 512) != 0 || + memcmp(green, last_gamma_green, 512) != 0 || + memcmp(blue, last_gamma_blue, 512) != 0); + + if (changed) { + int result = SDL_SetGammaRamp(red, green, blue); + + if (result < 0) { + printf("SDL_SetGammaRamp returned %d, SDL error:", result, SDL_GetError()); + } + + memcpy(last_gamma_red, red, 512); + memcpy(last_gamma_green, green, 512); + memcpy(last_gamma_blue, blue, 512); + } + return; + } LOCK_PALETTE; From b4b652d696e87b1a7cc0e6f7756d5905c67a79dc Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 04:13:50 -0700 Subject: [PATCH 395/534] fix sdl error message output --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index d3e764bb4..609323d09 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1388,7 +1388,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) int result = SDL_SetGammaRamp(red, green, blue); if (result < 0) { - printf("SDL_SetGammaRamp returned %d, SDL error:", result, SDL_GetError()); + printf("SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); } memcpy(last_gamma_red, red, 512); diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index d7694c771..697446c06 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1765,7 +1765,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); if (result < 0) { - printf("SDL_SetWindowGammaRamp returned %d, SDL error:", result, SDL_GetError()); + printf("SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); } memcpy(last_gamma_red, red, 512); From bb080a262eb5ce8750fd82d20fbc7d942bf162fa Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 04:21:23 -0700 Subject: [PATCH 396/534] repeat gamma entries to handle B2 thousands (16-bit) color mode; ignore its solid grey palettes such as those that happen during mode changes --- BasiliskII/src/SDL/video_sdl.cpp | 25 ++++++++++++++++++++----- BasiliskII/src/SDL/video_sdl2.cpp | 24 +++++++++++++++++++----- 2 files changed, 39 insertions(+), 10 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 609323d09..c57035c93 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1370,19 +1370,34 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { // handle the gamma ramp + + if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey + return; // ignore + uint16 red[256]; uint16 green[256]; uint16 blue[256]; - for (int i = 0; i < 256; i++) { - red[i] = pal[i*3 + 0] << 8; - green[i] = pal[i*3 + 1] << 8; - blue[i] = pal[i*3 + 2] << 8; + int repeats = 256 / num_in; + + for (int i = 0; i < num_in; i++) { + for (int j = 0; j < repeats; j++) { + red[i*repeats + j] = pal[i*3 + 0] << 8; + green[i*repeats + j] = pal[i*3 + 1] << 8; + blue[i*repeats + j] = pal[i*3 + 2] << 8; + } + } + + // fill remaining entries (if any) with last value + for (int i = num_in * repeats; i < 256; i++) { + red[i] = pal[(num_in - 1) * 3] << 8; + green[i] = pal[(num_in - 1) * 3 + 1] << 8; + blue[i] = pal[(num_in - 1) * 3 + 2] << 8; } bool changed = (memcmp(red, last_gamma_red, 512) != 0 || memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); + memcmp(blue, last_gamma_blue, 512) != 0); if (changed) { int result = SDL_SetGammaRamp(red, green, blue); diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 697446c06..0c81deedc 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1746,20 +1746,34 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { // handle the gamma ramp + + if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey + return; // ignore uint16 red[256]; uint16 green[256]; uint16 blue[256]; - for (int i = 0; i < 256; i++) { - red[i] = pal[i*3 + 0] << 8; - green[i] = pal[i*3 + 1] << 8; - blue[i] = pal[i*3 + 2] << 8; + int repeats = 256 / num_in; + + for (int i = 0; i < num_in; i++) { + for (int j = 0; j < repeats; j++) { + red[i*repeats + j] = pal[i*3 + 0] << 8; + green[i*repeats + j] = pal[i*3 + 1] << 8; + blue[i*repeats + j] = pal[i*3 + 2] << 8; + } + } + + // fill remaining entries (if any) with last value + for (int i = num_in * repeats; i < 256; i++) { + red[i] = pal[(num_in - 1) * 3] << 8; + green[i] = pal[(num_in - 1) * 3 + 1] << 8; + blue[i] = pal[(num_in - 1) * 3 + 2] << 8; } bool changed = (memcmp(red, last_gamma_red, 512) != 0 || memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); + memcmp(blue, last_gamma_blue, 512) != 0); if (changed) { int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); From d853f9abae41f828ea9e5a6f5d17f23ad5a62c61 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Tue, 18 Aug 2020 14:47:03 -0500 Subject: [PATCH 397/534] Restoring driver patch for sound id -16501 for New World ROMs --- SheepShaver/src/rsrc_patches.cpp | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index ccd1c33dc..23b1b9b4a 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -517,13 +517,11 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - // patch for -16501 resource ID not even needed? seems to run off native driver without -/* } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native driver and traps out to code, but very hard to re-implement there! + } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native sound input driver and traps out to code in audio.cpp D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); D(bug(" patch 1 applied\n")); -*/ } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); size >>= 1; From 639f05da7e419afda6410b32004a7c978e5db8ef Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 20:53:39 -0700 Subject: [PATCH 398/534] don't call SetWindowGammaRamp without sdl_window --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 7f148689a..151e90300 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1787,7 +1787,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) memcmp(green, last_gamma_green, 512) != 0 || memcmp(blue, last_gamma_blue, 512) != 0); - if (changed) { + if (changed && sdl_window) { int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); if (result < 0) { From e5c4699923afe64b6703932e156fe4a193a947ff Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 18 Aug 2020 21:09:28 -0700 Subject: [PATCH 399/534] put error message on stderr --- BasiliskII/src/SDL/video_sdl.cpp | 2 +- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index c57035c93..395778a00 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -1403,7 +1403,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) int result = SDL_SetGammaRamp(red, green, blue); if (result < 0) { - printf("SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + fprintf(stderr, "SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); } memcpy(last_gamma_red, red, 512); diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 151e90300..22723ed46 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1791,7 +1791,7 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); if (result < 0) { - printf("SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); } memcpy(last_gamma_red, red, 512); From bb5caf093ab3d5ce5e5be56502c81e1b0bba609d Mon Sep 17 00:00:00 2001 From: uyjulian Date: Sun, 23 Aug 2020 08:34:42 -0500 Subject: [PATCH 400/534] Merge latest ARAnyM changes --- .../src/uae_cpu/compiler/compemu_fpp.cpp | 3 + BasiliskII/src/uae_cpu/compiler/gencomp.c | 304 ++++++++++-------- BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 81 +++-- BasiliskII/src/uae_cpu/fpu/mathlib.h | 23 ++ 4 files changed, 244 insertions(+), 167 deletions(-) diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp index 5d5de2cdd..4ffcca0d0 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -282,6 +282,8 @@ STATIC_INLINE int get_fp_value(uae_u32 opcode, uae_u16 extra) mov_w_mr(((uintptr) temp_fp) + 8, S2); add_l_ri(ad, 4); readlong(ad, S2, S3); + // always set the explicit integer bit. + or_l_ri(S2, 0x80000000); mov_l_mr((uintptr) (temp_fp) + 4, S2); add_l_ri(ad, 4); readlong(ad, S2, S3); @@ -1891,6 +1893,7 @@ void comp_fpp_opp(uae_u32 opcode, uae_u16 extra) return; } + // FIXME: the quotient byte must be computed dont_care_fflags(); src = get_fp_value(opcode, extra); if (src < 0) diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index 14b1d44fb..d301ced78 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -147,6 +147,13 @@ static int comp_index=0; # endif #endif +#define GENA_GETV_NO_FETCH 0 +#define GENA_GETV_FETCH 1 +#define GENA_GETV_FETCH_ALIGN 2 +#define GENA_MOVEM_DO_INC 0 +#define GENA_MOVEM_NO_INC 1 +#define GENA_MOVEM_MOVE16 2 + static int cond_codes[]={-1,-1, NATIVE_CC_HI,NATIVE_CC_LS, @@ -395,8 +402,8 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n switch (mode) { case Dreg: /* Do we need to check dodgy here? */ - assert (!movem); - if (getv == 1 || getv == 2) + assert (movem == GENA_MOVEM_DO_INC); + if (getv == GENA_GETV_FETCH || getv == GENA_GETV_FETCH_ALIGN) { /* We generate the variable even for getv==2, so we can use it as a destination for MOVE */ @@ -405,12 +412,12 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n return; case Areg: - assert (!movem); - if (getv == 1 || getv == 2) + assert (movem == GENA_MOVEM_DO_INC); + if (getv == GENA_GETV_FETCH || getv == GENA_GETV_FETCH_ALIGN) { /* see above */ comprintf("\tint %s = dodgy ? scratchie++ : %s + 8;\n", name, reg); - if (getv == 1) + if (getv == GENA_GETV_FETCH) { comprintf("\tif (dodgy) \n"); comprintf("\t\tmov_l_rr(%s, %s + 8);\n", name, reg); @@ -431,7 +438,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n switch (size) { case sz_byte: - if (movem) + if (movem != GENA_MOVEM_DO_INC) { comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); comprintf("\tif (dodgy)\n"); @@ -446,7 +453,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n } break; case sz_word: - if (movem) + if (movem != GENA_MOVEM_DO_INC) { comprintf("\tint %sa=dodgy?scratchie++:%s+8;\n", name, reg); comprintf("\tif (dodgy) \n"); @@ -461,7 +468,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n } break; case sz_long: - if (movem) + if (movem != GENA_MOVEM_DO_INC) { comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); comprintf("\tif (dodgy)\n"); @@ -515,7 +522,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n comprintf("\tmov_l_ri(%sa, %s); /* absl */\n", name, gen_nextilong()); break; case imm: - assert (getv == 1); + assert (getv == GENA_GETV_FETCH); switch (size) { case sz_byte: @@ -536,22 +543,22 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n } return; case imm0: - assert (getv == 1); + assert (getv == GENA_GETV_FETCH); comprintf("\tint %s = scratchie++;\n", name); comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); return; case imm1: - assert (getv == 1); + assert (getv == GENA_GETV_FETCH); comprintf("\tint %s = scratchie++;\n", name); comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); return; case imm2: - assert (getv == 1); + assert (getv == GENA_GETV_FETCH); comprintf("\tint %s = scratchie++;\n", name); comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); return; case immi: - assert (getv == 1); + assert (getv == GENA_GETV_FETCH); comprintf("\tint %s = scratchie++;\n", name); comprintf("\tmov_l_ri(%s, %s);\n", name, reg); return; @@ -562,7 +569,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n /* We get here for all non-reg non-immediate addressing modes to * actually fetch the value. */ - if (getv == 1) + if (getv == GENA_GETV_FETCH) { char astring[80]; sprintf(astring, "%sa", name); @@ -602,7 +609,7 @@ static void genamode(amodes mode, const char *reg, wordsizes size, const char *n /* We now might have to fix up the register for pre-dec or post-inc * addressing modes. */ - if (!movem) + if (movem == GENA_MOVEM_DO_INC) { switch (mode) { @@ -731,8 +738,8 @@ static void genmov16(uae_u32 opcode, struct instr *curi) } else { /* Other variants */ - genamode (curi->smode, "srcreg", curi->size, "src", 0, 2); - genamode (curi->dmode, "dstreg", curi->size, "dst", 0, 2); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_NO_FETCH, GENA_MOVEM_MOVE16); comprintf("\tmov_l_rr(src,srca);\n"); comprintf("\tmov_l_rr(dst,dsta);\n"); } @@ -797,7 +804,7 @@ genmovemel (uae_u16 opcode) comprintf ("\tint native=scratchie++;\n"); comprintf ("\tint i;\n"); comprintf ("\tsigned char offset=0;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC); #ifdef UAE if (table68k[opcode].size == sz_long) comprintf("\tif (1 && !special_mem) {\n"); @@ -870,7 +877,7 @@ genmovemle (uae_u16 opcode) comprintf ("\tint i;\n"); comprintf ("\tint tmp=scratchie++;\n"); comprintf ("\tsigned char offset=0;\n"); - genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_NO_INC); #ifdef UAE /* *Sigh* Some clever geek realized that the fastest way to copy a @@ -1406,8 +1413,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_OR_AND_EOR failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); switch(curi->mnemo) { case i_OR: genflags (flag_or, curi->size, "", "src", "dst"); break; case i_AND: genflags (flag_and, curi->size, "", "src", "dst"); break; @@ -1431,8 +1438,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_SUB failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); genflags (flag_sub, curi->size, "", "src", "dst"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; @@ -1441,8 +1448,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_SUBA failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint tmp=scratchie++;\n"); switch(curi->size) { @@ -1460,8 +1467,8 @@ gen_opcode (unsigned int opcode) failure; #endif isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); genflags (flag_subx, curi->size, "", "src", "dst"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; @@ -1475,8 +1482,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_ADD failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); genflags (flag_add, curi->size, "", "src", "dst"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; @@ -1485,8 +1492,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_ADDA failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint tmp=scratchie++;\n"); switch(curi->size) { @@ -1504,8 +1511,8 @@ gen_opcode (unsigned int opcode) failure; #endif isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); genflags (flag_addx, curi->size, "", "src", "dst"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); @@ -1520,7 +1527,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_NEG failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); comprintf("\tint dst=scratchie++;\n"); comprintf("\tmov_l_ri(dst,0);\n"); @@ -1533,7 +1540,7 @@ gen_opcode (unsigned int opcode) failure; #endif isaddx; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); comprintf("\tint dst=scratchie++;\n"); comprintf("\tmov_l_ri(dst,0);\n"); @@ -1550,7 +1557,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_CLR failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint dst=scratchie++;\n"); comprintf("\tmov_l_ri(dst,0);\n"); @@ -1562,7 +1569,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_NOT failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); comprintf("\tint dst=scratchie++;\n"); comprintf("\tmov_l_ri(dst,0xffffffff);\n"); @@ -1574,7 +1581,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_TST failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); genflags (flag_logical, curi->size, "src", "", ""); break; case i_BCHG: @@ -1584,8 +1591,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_BCHG_BCLR_BSET_BTST failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint s=scratchie++;\n" "\tint tmp=scratchie++;\n" @@ -1626,8 +1633,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_CMPM_CMP failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); genflags (flag_cmp, curi->size, "", "src", "dst"); break; @@ -1636,8 +1643,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_CMPA failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", sz_long, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint tmps=scratchie++;\n"); switch(curi->size) { @@ -1668,14 +1675,14 @@ gen_opcode (unsigned int opcode) switch(curi->dmode) { case Dreg: case Areg: - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); genflags (flag_mov, curi->size, "", "src", "dst"); genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); break; default: /* It goes to memory, not a register */ - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); genflags (flag_logical, curi->size, "src", "", ""); genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); break; @@ -1686,8 +1693,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_MOVEA failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint tmps=scratchie++;\n"); @@ -1713,7 +1720,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_SWAP failure; #endif - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); comprintf("\tdont_care_flags();\n"); comprintf("\trol_l_ri(src,16);\n"); genflags (flag_logical, sz_long, "src", "", ""); @@ -1724,8 +1731,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_EXG failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tint tmp=scratchie++;\n" "\tmov_l_rr(tmp,src);\n"); @@ -1737,7 +1744,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_EXT failure; #endif - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); comprintf("\tdont_care_flags();\n"); start_brace (); switch (curi->size) @@ -1838,7 +1845,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_RTD failure; #endif - genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); /* offs is constant */ comprintf("\tadd_l_ri(offs,4);\n"); start_brace(); @@ -1857,8 +1864,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_LINK failure; #endif - genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", sz_long, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); comprintf("\tsub_l_ri(SP_REG,4);\n" "\twritelong_clobber(SP_REG,src,scratchie);\n" "\tmov_l_rr(src,SP_REG);\n"); @@ -1872,7 +1879,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_UNLK failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); comprintf("\tmov_l_rr(SP_REG,src);\n" "\treadlong(SP_REG,src,scratchie);\n" "\tadd_l_ri(SP_REG,4);\n"); @@ -1909,7 +1916,7 @@ gen_opcode (unsigned int opcode) failure; #endif isjump; - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); comprintf("\tint ret=scratchie++;\n" @@ -1928,7 +1935,7 @@ gen_opcode (unsigned int opcode) failure; #endif isjump; - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC); comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" @@ -1941,7 +1948,7 @@ gen_opcode (unsigned int opcode) failure; #endif is_const_jump; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); comprintf("\tint ret=scratchie++;\n" @@ -1961,7 +1968,7 @@ gen_opcode (unsigned int opcode) failure; #endif comprintf("\tuae_u32 v,v1,v2;\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); /* That source is an immediate, so we can clobber it with abandon */ switch(curi->size) { case sz_byte: comprintf("\tsign_extend_8_rr(src,src);\n"); break; @@ -2020,8 +2027,8 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_LEA failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); break; @@ -2037,8 +2044,8 @@ gen_opcode (unsigned int opcode) table68k[opcode].smode==Ad8r) comprintf("if (srcreg==7) dodgy=1;\n"); - genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode (Apdi, "7", sz_long, "dst", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_NO_FETCH, GENA_MOVEM_DO_INC); + genamode (Apdi, "7", sz_long, "dst", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); genastore ("srca", Apdi, "7", sz_long, "dst"); break; @@ -2048,8 +2055,8 @@ gen_opcode (unsigned int opcode) #endif isjump; uses_cmov; - genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "offs", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); /* That offs is an immediate, so we can clobber it with abandon */ switch(curi->size) { @@ -2130,7 +2137,7 @@ gen_opcode (unsigned int opcode) #ifdef DISABLE_I_SCC failure; #endif - genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genamode (curi->smode, "srcreg", curi->size, "src", GENA_GETV_FETCH_ALIGN, GENA_MOVEM_DO_INC); start_brace (); comprintf ("\tint val = scratchie++;\n"); @@ -2183,8 +2190,8 @@ gen_opcode (unsigned int opcode) failure; #endif comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); /* To do 16x16 unsigned multiplication, we actually use 32x32 signed, and zero-extend the registers first. That solves the problem of MUL needing dedicated registers @@ -2201,8 +2208,8 @@ gen_opcode (unsigned int opcode) failure; #endif comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + genamode (curi->smode, "srcreg", sz_word, "src", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", sz_word, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); comprintf("\tsign_extend_16_rr(scratchie,src);\n" "\tsign_extend_16_rr(dst,dst);\n" "\timul_32_32(dst,scratchie);\n"); @@ -2235,8 +2242,8 @@ gen_opcode (unsigned int opcode) } comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); if (!noflags) @@ -2245,31 +2252,40 @@ gen_opcode (unsigned int opcode) uses_cmov; start_brace(); comprintf("\tint zero = scratchie++;\n"); + comprintf("\tint tmpcnt = scratchie++;\n"); comprintf("\tint minus1 = scratchie++;\n"); - comprintf("\tand_l_ri(cnt,63);\n"); + comprintf("\tint cdata = minus1;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n"); + comprintf("\tand_l_ri(tmpcnt,63);\n"); comprintf("\tmov_l_ri(zero, 0);\n"); comprintf("\tmov_l_ri(minus1, -1);\n"); switch(curi->size) { case sz_byte: comprintf("\ttest_b_rr(data,data);\n"); comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); - comprintf("\ttest_l_ri(cnt, 0x38);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshra_b_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x38);\n"); + comprintf("\tmov_l_rr(cdata,data);\n"); + comprintf("\tcmov_l_rr(cdata, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_b_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_b_rr(data,cdata);\n"); break; case sz_word: comprintf("\ttest_w_rr(data,data);\n"); comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); - comprintf("\ttest_l_ri(cnt, 0x30);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshra_w_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x30);\n"); + comprintf("\tmov_l_rr(cdata,data);\n"); + comprintf("\tcmov_l_rr(cdata, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_w_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_w_rr(data,cdata);\n"); break; case sz_long: comprintf("\ttest_l_rr(data,data);\n"); comprintf("\tcmov_l_rr(zero, minus1, NATIVE_CC_MI);\n"); - comprintf("\ttest_l_ri(cnt, 0x20);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshra_l_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x20);\n"); + comprintf("\tmov_l_rr(cdata,data);\n"); + comprintf("\tcmov_l_rr(cdata, zero, NATIVE_CC_NE);\n"); + comprintf("\tshra_l_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_l_rr(data,cdata);\n"); break; default: assert(0); } @@ -2288,7 +2304,7 @@ gen_opcode (unsigned int opcode) comprintf("\tlive_flags();\n"); comprintf("\tend_needflags();\n"); if (curi->smode!=immi) - comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + comprintf("\tsetcc_for_cntzero(tmpcnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); else comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); @@ -2320,32 +2336,38 @@ gen_opcode (unsigned int opcode) " " RETURN "\n" " }\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + start_brace(); if (!noflags) comprintf("\tstart_needflags();\n"); if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint zero = scratchie++;\n"); - comprintf("\tand_l_ri(cnt,63);\n"); - comprintf("\tmov_l_ri(zero, 0);\n"); + comprintf("\tint cdata = scratchie++;\n"); + comprintf("\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n"); + comprintf("\tand_l_ri(tmpcnt,63);\n"); + comprintf("\tmov_l_ri(cdata, 0);\n"); switch(curi->size) { case sz_byte: - comprintf("\ttest_l_ri(cnt, 0x38);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_b_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x38);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_b_rr(data, cdata);\n"); break; case sz_word: - comprintf("\ttest_l_ri(cnt, 0x30);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_w_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x30);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_w_rr(data, cdata);\n"); break; case sz_long: - comprintf("\ttest_l_ri(cnt, 0x20);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_l_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x20);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_l_rr(data, cdata);\n"); break; default: assert(0); } @@ -2364,7 +2386,7 @@ gen_opcode (unsigned int opcode) comprintf("\tlive_flags();\n"); comprintf("\tend_needflags();\n"); if (curi->smode!=immi) - comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + comprintf("\tsetcc_for_cntzero(tmpcnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); else comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); @@ -2387,8 +2409,8 @@ gen_opcode (unsigned int opcode) } comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); if (!noflags) @@ -2396,24 +2418,29 @@ gen_opcode (unsigned int opcode) if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint zero = scratchie++;\n"); - comprintf("\tand_l_ri(cnt,63);\n"); - comprintf("\tmov_l_ri(zero, 0);\n"); + comprintf("\tint cdata = scratchie++;\n"); + comprintf("\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n"); + comprintf("\tand_l_ri(tmpcnt,63);\n"); + comprintf("\tmov_l_ri(cdata, 0);\n"); switch(curi->size) { case sz_byte: - comprintf("\ttest_l_ri(cnt, 0x38);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshrl_b_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x38);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshrl_b_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_b_rr(data, cdata);\n"); break; case sz_word: - comprintf("\ttest_l_ri(cnt, 0x30);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshrl_w_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x30);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshrl_w_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_w_rr(data, cdata);\n"); break; case sz_long: - comprintf("\ttest_l_ri(cnt, 0x20);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshrl_l_rr(data, cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x20);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshrl_l_rr(cdata, tmpcnt);\n"); + comprintf("\tmov_l_rr(data, cdata);\n"); break; default: assert(0); } @@ -2432,7 +2459,7 @@ gen_opcode (unsigned int opcode) comprintf("\tlive_flags();\n"); comprintf("\tend_needflags();\n"); if (curi->smode!=immi) - comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + comprintf("\tsetcc_for_cntzero(tmpcnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); else comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); @@ -2455,8 +2482,8 @@ gen_opcode (unsigned int opcode) } comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace(); if (!noflags) @@ -2464,24 +2491,29 @@ gen_opcode (unsigned int opcode) if (curi->smode!=immi) { uses_cmov; start_brace(); - comprintf("\tint zero = scratchie++;\n"); - comprintf("\tand_l_ri(cnt,63);\n"); - comprintf("\tmov_l_ri(zero, 0);\n"); + comprintf("\tint cdata = scratchie++;\n"); + comprintf("\tint tmpcnt = scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n"); + comprintf("\tand_l_ri(tmpcnt,63);\n"); + comprintf("\tmov_l_ri(cdata, 0);\n"); switch(curi->size) { case sz_byte: - comprintf("\ttest_l_ri(cnt, 0x38);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_b_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x38);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_b_rr(data, cdata);\n"); break; case sz_word: - comprintf("\ttest_l_ri(cnt, 0x30);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_w_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x30);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_w_rr(data, cdata);\n"); break; case sz_long: - comprintf("\ttest_l_ri(cnt, 0x20);\n"); - comprintf("\tcmov_l_rr(data, zero, NATIVE_CC_NE);\n"); - comprintf("\tshll_l_rr(data,cnt);\n"); + comprintf("\ttest_l_ri(tmpcnt, 0x20);\n"); + comprintf("\tcmov_l_rr(cdata, data, NATIVE_CC_EQ);\n"); + comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); + comprintf("\tmov_l_rr(data, cdata);\n"); break; default: assert(0); } @@ -2500,7 +2532,7 @@ gen_opcode (unsigned int opcode) comprintf("\tlive_flags();\n"); comprintf("\tend_needflags();\n"); if (curi->smode!=immi) - comprintf("\tsetcc_for_cntzero(cnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); + comprintf("\tsetcc_for_cntzero(tmpcnt, data, %d);\n", curi->size == sz_byte ? 1 : curi->size == sz_word ? 2 : 4); else comprintf("\tduplicate_carry();\n"); comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); @@ -2522,8 +2554,8 @@ gen_opcode (unsigned int opcode) start_brace(); } comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); switch(curi->size) { @@ -2564,8 +2596,8 @@ gen_opcode (unsigned int opcode) start_brace(); } comprintf("\tdont_care_flags();\n"); - genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "cnt", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); + genamode (curi->dmode, "dstreg", curi->size, "data", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); start_brace (); switch(curi->size) { @@ -2696,7 +2728,7 @@ gen_opcode (unsigned int opcode) comprintf("\tint r2=(extra>>12)&7;\n" "\tint tmp=scratchie++;\n"); - genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", GENA_GETV_FETCH, GENA_MOVEM_DO_INC); /* The two operands are in dst and r2 */ comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ "\tint r3=(extra&7);\n" diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp index c76d56e62..ce18967e2 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -508,7 +508,14 @@ PRIVATE inline void FFPU extract_double(fpu_register const & src, fpu_double value; uae_u32 parts[2]; } dest; +#if defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE) + fpu_register_parts p = { src }; + // always set the explicit integer bit. + p.parts[1] |= 0x80000000; + dest.value = (fpu_double)p.val; +#else dest.value = (fpu_double)src; +#endif #ifdef WORDS_BIGENDIAN *wrd1 = dest.parts[0]; *wrd2 = dest.parts[1]; @@ -975,37 +982,40 @@ PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_registe case 1: put_long (ad, extract_single(value)); break; - case 2: { - uae_u32 wrd1, wrd2, wrd3; - extract_extended(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); + case 2: + { + uae_u32 wrd1, wrd2, wrd3; + extract_extended(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } break; - } - case 3: { - uae_u32 wrd1, wrd2, wrd3; - extract_packed(value, &wrd1, &wrd2, &wrd3); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); - ad += 4; - put_long (ad, wrd3); + case 3: + { + uae_u32 wrd1, wrd2, wrd3; + extract_packed(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } break; - } case 4: put_word(ad, (uae_s16) toint(value)); break; - case 5: { - uae_u32 wrd1, wrd2; - extract_double(value, &wrd1, &wrd2); - put_long (ad, wrd1); - ad += 4; - put_long (ad, wrd2); + case 5: + { + uae_u32 wrd1, wrd2; + extract_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + } break; - } case 6: put_byte(ad, (uae_s8) toint(value)); break; @@ -2209,7 +2219,7 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) fpu_debug(("FREM %.04f\n",(double)src)); // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; { - fpu_register quot = fp_round_to_nearest(FPU registers[reg] / src); + fpu_register quot = fp_round_to_even(FPU registers[reg] / src); uae_u32 sign = get_quotient_sign(FPU registers[reg],src); FPU registers[reg] = FPU registers[reg] - quot * src; make_fpsr(FPU registers[reg]); @@ -2347,17 +2357,26 @@ void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) case 0x38: /* FCMP */ fpu_debug(("FCMP %.04f\n",(double)src)); set_fpsr(0); - if (isinf(FPU registers[reg])) + if (isnan(src) || isnan(FPU registers[reg])) + { + make_nan(src, false); + make_fpsr(src); + } else if (isinf(FPU registers[reg])) { if (isinf(src) && isneg(FPU registers[reg]) == isneg (src)) + { make_fpsr(0); - else + } else + { make_fpsr(FPU registers[reg]); - } - else if (isinf(src)) + } + } else if (isinf(src)) + { make_fpsr(-src); - else + } else + { make_fpsr(FPU registers[reg] - src); + } break; case 0x3a: /* FTST */ fpu_debug(("FTST %.04f\n",(double)src)); diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h index 26e47ff8f..8b03dd2af 100644 --- a/BasiliskII/src/uae_cpu/fpu/mathlib.h +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -648,6 +648,17 @@ PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_regis /* --- Math functions --- */ /* -------------------------------------------------------------------------- */ +#ifdef __HAIKU__ +#ifdef __cplusplus +extern "C" { +#endif +/* Haiku seems to lack some declarations, even if the functions are there */ +extern long double exp10l(long double); +#ifdef __cplusplus +} +#endif +#endif + #if defined(FPU_USE_ISO_C99) && (defined(USE_LONG_DOUBLE) || defined(USE_QUAD_DOUBLE)) # ifdef HAVE_LOGL # define fp_log logl @@ -1169,6 +1180,14 @@ DEFINE_ROUND_FUNC(zero, CW_RC_ZERO) DEFINE_ROUND_FUNC(nearest, CW_RC_NEAR) #endif +#undef fp_round_to_even +#ifdef HAVE_RINTL +#define fp_round_to_even rintl +#else +#define fp_round_to_even fp_do_round_to_even +DEFINE_ROUND_FUNC(even, CW_RC_NEAR) +#endif + #undef fp_ceil #define fp_ceil fp_do_round_to_plus_infinity @@ -1194,4 +1213,8 @@ DEFINE_ROUND_FUNC(nearest, CW_RC_NEAR) #define fp_round_to_nearest(x) ((int)((x) + 0.5)) #endif +#ifndef fp_round_to_even +#define fp_round_to_even fp_round_to_nearest +#endif + #endif /* FPU_MATHLIB_H */ From 64b38dbec85db65f615613cf7055369fde46b19a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 24 Aug 2020 11:51:31 +0900 Subject: [PATCH 401/534] SS: fix double pref item (ignoresegv) BII: fix for JIT --- BasiliskII/src/MacOSX/Makefile.gencpu | 2 +- SheepShaver/src/Unix/prefs_unix.cpp | 6 ------ 2 files changed, 1 insertion(+), 7 deletions(-) diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu index d4eaf42ba..ba11ccb42 100644 --- a/BasiliskII/src/MacOSX/Makefile.gencpu +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -1,7 +1,7 @@ SRC = $(PROJECT_DIR)/../uae_cpu DST = $(BUILT_PRODUCTS_DIR)/gencpu_output VPATH = $(SRC) $(SRC)/compiler -CFLAGS = -DUSE_XCODE=1 -I. -I../uae_cpu -I../UNIX +CFLAGS = -DUSE_JIT_FPU -I. -I../uae_cpu -I../UNIX CXXFLAGS = -stdlib=libc++ $(CFLAGS) all: $(DST)/gencpu $(DST)/gencomp diff --git a/SheepShaver/src/Unix/prefs_unix.cpp b/SheepShaver/src/Unix/prefs_unix.cpp index 2a81e7bd9..a4380d100 100644 --- a/SheepShaver/src/Unix/prefs_unix.cpp +++ b/SheepShaver/src/Unix/prefs_unix.cpp @@ -37,9 +37,6 @@ prefs_desc platform_prefs_items[] = { {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, {"dsp", TYPE_STRING, false, "audio output (dsp) device name"}, {"mixer", TYPE_STRING, false, "audio mixer device name"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, @@ -135,9 +132,6 @@ void AddPlatformPrefsDefaults(void) #else PrefsReplaceString("dsp", "/dev/dsp"); PrefsReplaceString("mixer", "/dev/mixer"); -#endif -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); #endif PrefsAddBool("idlewait", true); } From ec032ffd75730d16e7974fecd317820bebfa67c2 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 28 Aug 2020 14:06:29 +0900 Subject: [PATCH 402/534] provisional fix for SEGV --- SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp index 9b6d87946..de7b0d6fb 100755 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp @@ -765,6 +765,10 @@ static void dump_disassembly(const uint32 pc, const int prefix_count, const int } } +static bool isSegvBinCue(uint32 a) { + return a == 0x389e00 || a == 0x389e08 || a == 0x389fe0 || a == 0x489e00 || a == 0x489e08 || a == 0x489fe0; +} + sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) { #if ENABLE_VOSF @@ -816,6 +820,9 @@ sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) else if ((uint32)(addr - SheepMem::ZeroPage()) < (uint32)SheepMem::PageSize()) return SIGSEGV_RETURN_SKIP_INSTRUCTION; + else if (ROMType == ROMTYPE_NEWWORLD && isSegvBinCue(pc - ROMBase)) + return SIGSEGV_RETURN_SKIP_INSTRUCTION; + // Ignore all other faults, if requested if (PrefsFindBool("ignoresegv")) return SIGSEGV_RETURN_SKIP_INSTRUCTION; From 4b93738773bd06aa7dbfc8a1a1cd6edb6f58f87f Mon Sep 17 00:00:00 2001 From: rakslice Date: Fri, 28 Aug 2020 03:01:38 -0700 Subject: [PATCH 403/534] Windows configure.ac: fix AC_CACHE_CHECK miss case with value with setting in side effecting AC_SUBST which won't get cached --- BasiliskII/src/Windows/configure.ac | 5 ++++- SheepShaver/src/Windows/configure.ac | 5 ++++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index 33540135b..bb8e1a22d 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -280,10 +280,13 @@ if [[ "x$HAVE_GCC30" = "xyes" ]]; then AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], ac_cv_gcc_no_strict_aliasing, [ AC_TRY_COMPILE([],[], - [ac_cv_gcc_no_strict_aliasing=yes; AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing")], + [ac_cv_gcc_no_strict_aliasing=yes], [ac_cv_gcc_no_strict_aliasing=no]) ]) CFLAGS="$SAVED_CFLAGS" + if test "x$ac_cv_gcc_no_strict_aliasing" = xyes; then + AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing") + fi fi dnl Select appropriate CPU source and REGPARAM define. diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index 73adb19d0..f646bb6ed 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -189,10 +189,13 @@ if [[ "x$HAVE_GCC30" = "xyes" ]]; then AC_CACHE_CHECK([whether the compiler supports -fno-strict-aliasing], ac_cv_gcc_no_strict_aliasing, [ AC_TRY_COMPILE([],[], - [ac_cv_gcc_no_strict_aliasing=yes; AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing")], + [ac_cv_gcc_no_strict_aliasing=yes], [ac_cv_gcc_no_strict_aliasing=no]) ]) CFLAGS="$SAVED_CFLAGS" + if test "x$ac_cv_gcc_no_strict_aliasing" = xyes; then + AC_SUBST(SLIRP_CFLAGS, "-fno-strict-aliasing") + fi fi case $host_os in From 92a1ee212859f1c5aae086bf225acd15ba22effa Mon Sep 17 00:00:00 2001 From: rakslice Date: Fri, 28 Aug 2020 03:09:37 -0700 Subject: [PATCH 404/534] Windows configure.ac: fix broken SDL check with macro intended for configure script contents context being used in shell variable contents context --- BasiliskII/src/Windows/configure.ac | 3 ++- SheepShaver/src/Windows/configure.ac | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index bb8e1a22d..88adb1bd5 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -543,7 +543,8 @@ CPUINCLUDES="-I../uae_cpu" CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) +AC_CHECK_TOOL(sdl_config, sdl2-config, no) +AS_IF([test "x$sdl_config" = xno], [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) #if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index f646bb6ed..b5347be27 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -275,7 +275,8 @@ dnl Use the dummy prefs file. CPUSRCS="$CPUSRCS ../dummy/prefs_dummy.cpp" dnl We really want SDL for now -AC_CHECK_TOOL(sdl_config, sdl2-config, [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) +AC_CHECK_TOOL(sdl_config, sdl2-config, no) +AS_IF([test "x$sdl_config" = xno], [AC_MSG_ERROR([Sorry, you currently need SDL for this port])]) SDL_CFLAGS=`$sdl_config --cflags` AC_SUBST(SDL_CFLAGS) SDL_LIBS=`$sdl_config --static-libs` From 38611779197a9119a93bb60e4e08117f68f50dd7 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 30 Aug 2020 15:09:09 +0900 Subject: [PATCH 405/534] add pref item "mag_rate" BII: JIT --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 ++ BasiliskII/src/SDL/video_sdl2.cpp | 16 ++++++++++++---- BasiliskII/src/prefs_items.cpp | 1 + SheepShaver/src/prefs_items.cpp | 1 + 4 files changed, 16 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index da18b1ce4..23626461e 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1089,6 +1089,7 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1150,6 +1151,7 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 22723ed46..daa76a6e2 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -705,6 +705,12 @@ static void shutdown_sdl_video() delete_sdl_video_window(); } +static int get_mag_rate() +{ + int m = PrefsFindInt32("mag_rate"); + return m < 1 ? 1 : m > 4 ? 4 : m; +} + static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) { if (guest_surface) { @@ -751,12 +757,13 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags window_flags |= SDL_WINDOW_RESIZABLE; */ if (!sdl_window) { + int m = get_mag_rate(); sdl_window = SDL_CreateWindow( "Basilisk II", SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, - window_width, - window_height, + m * window_width, + m * window_height, window_flags); if (!sdl_window) { shutdown_sdl_video(); @@ -1044,7 +1051,7 @@ void driver_base::init() // set default B/W palette sdl_palette = SDL_AllocPalette(256); - sdl_palette->colors[1] = (SDL_Color){ .r = 0, .g = 0, .b = 0 }; + sdl_palette->colors[1] = (SDL_Color){ .r = 0, .g = 0, .b = 0, .a = 255 }; SDL_SetSurfacePalette(s, sdl_palette); } @@ -1626,7 +1633,8 @@ static void do_toggle_fullscreen(void) display_type = DISPLAY_WINDOW; SDL_SetWindowFullscreen(sdl_window, 0); const VIDEO_MODE &mode = drv->mode; - SDL_SetWindowSize(sdl_window, VIDEO_MODE_X, VIDEO_MODE_Y); + int m = get_mag_rate(); + SDL_SetWindowSize(sdl_window, m * VIDEO_MODE_X, m * VIDEO_MODE_Y); SDL_SetWindowGrab(sdl_window, SDL_FALSE); } else { display_type = DISPLAY_SCREEN; diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 033b119bb..7039a5e52 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -77,6 +77,7 @@ prefs_desc common_prefs_items[] = { {"scale_integer",TYPE_BOOLEAN,false,"integer scaling"}, {"yearofs", TYPE_INT32, 0, "year offset"}, {"dayofs", TYPE_INT32, 0, "day offset"}, + {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index c34396013..f3055976d 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -65,6 +65,7 @@ prefs_desc common_prefs_items[] = { {"cpuclock", TYPE_INT32, 0, "CPU clock [MHz] of system info"}, {"yearofs", TYPE_INT32, 0, "year offset"}, {"dayofs", TYPE_INT32, 0, "day offset"}, + {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {NULL, TYPE_END, false, NULL} // End of list }; From 722b777ee81e139948c4f9fc13af6d76ef57850d Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Sun, 30 Aug 2020 15:14:03 +0900 Subject: [PATCH 406/534] Update README.md --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index da1c66204..de61234b6 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS 64-bit --- +macOS 64-bit JIT Linux 32-bit JIT MinGW 32-bit JIT ``` From d58aa827a48ca47e1bee2c6a8a35ce14ab02785d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 30 Aug 2020 22:25:47 +0900 Subject: [PATCH 407/534] revert BII JIT --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 -- README.md | 2 +- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 23626461e..da18b1ce4 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1089,7 +1089,6 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", - "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1151,7 +1150,6 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", - "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; diff --git a/README.md b/README.md index de61234b6..da1c66204 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS 64-bit JIT +macOS 64-bit --- Linux 32-bit JIT MinGW 32-bit JIT ``` From 98e12fbc2e343c046958c8269d1ed81826cd53e3 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 1 Sep 2020 22:25:04 +0900 Subject: [PATCH 408/534] BII: JIT --- .../src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 ++ BasiliskII/src/Unix/configure.ac | 8 ++++++-- README.md | 2 +- 3 files changed, 9 insertions(+), 3 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index da18b1ce4..56ff5dba0 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1108,6 +1108,7 @@ ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; OTHER_LDFLAGS = ( + "-Wl,-no_pie", "-pagezero_size", 0x1000, ); @@ -1168,6 +1169,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_LDFLAGS = ( + "-Wl,-no_pie", "-pagezero_size", 0x1000, ); diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index a812738b4..643ce699c 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -39,7 +39,7 @@ AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX d AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl JIT compiler options. -AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=no]], [WANT_JIT=$enableval], [WANT_JIT=no]) +AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) AC_ARG_ENABLE(jit-debug, [ --enable-jit-debug activate native code disassemblers [default=no]], [WANT_JIT_DEBUG=$enableval], [WANT_JIT_DEBUG=no]) dnl FPU emulation core. @@ -612,7 +612,6 @@ mips-sony-bsd|mips-sony-newsos4) ;; *-*-darwin*) no_dev_ptmx=1 - LIBS="$LIBS -lstdc++" ;; *-*-freebsd*) no_dev_ptmx=1 @@ -1466,6 +1465,11 @@ if [[ "x$WANT_JIT" = "xyes" -a "x$ADDRESSING_MODE" = "xmemory banks" ]]; then AC_MSG_ERROR([Sorry, the JIT Compiler requires Direct Addressing, at least]) fi +if [[ "x$OS_TYPE" = "xdarwin" ]]; then + WANT_VOSF=no + LDFLAGS="$LDFLAGS -Wl,-no_pie -pagezero_size 0x1000" +fi + dnl Enable VOSF screen updates with this feature is requested and feasible if [[ "x$WANT_VOSF" = "xyes" -a "x$CAN_VOSF" = "xyes" ]]; then AC_DEFINE(ENABLE_VOSF, 1, [Define if using video enabled on SEGV signals.]) diff --git a/README.md b/README.md index da1c66204..de61234b6 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS 64-bit --- +macOS 64-bit JIT Linux 32-bit JIT MinGW 32-bit JIT ``` From 09429e6021cfa782ee88ec6af101895635715f33 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 4 Sep 2020 19:06:49 +0900 Subject: [PATCH 409/534] SS: Patch the sound input driver if using New World ROM and ignore SEGV is false --- SheepShaver/src/include/rom_patches.h | 1 + SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp | 7 ------- SheepShaver/src/rom_patches.cpp | 3 +++ SheepShaver/src/rsrc_patches.cpp | 5 ++--- 4 files changed, 6 insertions(+), 10 deletions(-) diff --git a/SheepShaver/src/include/rom_patches.h b/SheepShaver/src/include/rom_patches.h index c263606a0..a4b4e283e 100644 --- a/SheepShaver/src/include/rom_patches.h +++ b/SheepShaver/src/include/rom_patches.h @@ -31,6 +31,7 @@ enum { ROMTYPE_NEWWORLD }; extern int ROMType; +extern bool SoundPatchFlag; extern bool DecodeROM(uint8 *data, uint32 size); extern bool PatchROM(void); diff --git a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp index de7b0d6fb..9b6d87946 100755 --- a/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp +++ b/SheepShaver/src/kpx_cpu/sheepshaver_glue.cpp @@ -765,10 +765,6 @@ static void dump_disassembly(const uint32 pc, const int prefix_count, const int } } -static bool isSegvBinCue(uint32 a) { - return a == 0x389e00 || a == 0x389e08 || a == 0x389fe0 || a == 0x489e00 || a == 0x489e08 || a == 0x489fe0; -} - sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) { #if ENABLE_VOSF @@ -820,9 +816,6 @@ sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) else if ((uint32)(addr - SheepMem::ZeroPage()) < (uint32)SheepMem::PageSize()) return SIGSEGV_RETURN_SKIP_INSTRUCTION; - else if (ROMType == ROMTYPE_NEWWORLD && isSegvBinCue(pc - ROMBase)) - return SIGSEGV_RETURN_SKIP_INSTRUCTION; - // Ignore all other faults, if requested if (PrefsFindBool("ignoresegv")) return SIGSEGV_RETURN_SKIP_INSTRUCTION; diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp index 8f15b8052..804d6a975 100644 --- a/SheepShaver/src/rom_patches.cpp +++ b/SheepShaver/src/rom_patches.cpp @@ -67,6 +67,7 @@ const uint32 ADDR_MAP_PATCH_SPACE = 0x2fd140; // Global variables int ROMType; // ROM type +bool SoundPatchFlag; static uint32 sony_offset; // Offset of .Sony driver resource // Prototypes @@ -694,6 +695,8 @@ bool PatchROM(void) else return false; + SoundPatchFlag = ROMType == ROMTYPE_NEWWORLD && !PrefsFindBool("ignoresegv"); + // Check that other ROM addresses point to really free regions if (!check_rom_patch_space(CHECK_LOAD_PATCH_SPACE, 0x40)) return false; diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index ccd1c33dc..3b30c3087 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -517,13 +517,12 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - // patch for -16501 resource ID not even needed? seems to run off native driver without -/* } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native driver and traps out to code, but very hard to re-implement there! + } else if (SoundPatchFlag && type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); D(bug(" patch 1 applied\n")); -*/ + } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); size >>= 1; From 95437fbf899fb4666ccbddefffd21f21369532a8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 6 Sep 2020 22:25:55 +0900 Subject: [PATCH 410/534] fix BII build --- BasiliskII/src/MacOSX/Makefile.gencpu | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu index ba11ccb42..3762cb5d1 100644 --- a/BasiliskII/src/MacOSX/Makefile.gencpu +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -1,7 +1,7 @@ SRC = $(PROJECT_DIR)/../uae_cpu DST = $(BUILT_PRODUCTS_DIR)/gencpu_output VPATH = $(SRC) $(SRC)/compiler -CFLAGS = -DUSE_JIT_FPU -I. -I../uae_cpu -I../UNIX +CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu -I../UNIX CXXFLAGS = -stdlib=libc++ $(CFLAGS) all: $(DST)/gencpu $(DST)/gencomp From 177555e0d17918b558d3b0d59591b8efcb35379e Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Thu, 10 Sep 2020 00:51:24 -0500 Subject: [PATCH 411/534] Loading soundin patch with resources writing to ROM --- BasiliskII/src/audio.cpp | 161 +++++++++++++++++++++++----- BasiliskII/src/include/audio.h | 3 + BasiliskII/src/include/audio_defs.h | 1 + SheepShaver/src/rsrc_patches.cpp | 38 ++++++- 4 files changed, 174 insertions(+), 29 deletions(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 6a52a0ef1..261616d16 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -33,6 +33,7 @@ #include "audio_defs.h" #include "user_strings.h" #include "cdrom.h" +#include "vm_alloc.h" #define DEBUG 0 #include "debug.h" @@ -53,6 +54,11 @@ static int open_count = 0; // Open/close nesting count bool AudioAvailable = false; // Flag: audio output available (from the software point of view) +uint32 SoundInNameAddr; +uint32 SoundInSourcesAddr; +int SoundInSource = 2; +int SoundInPlaythrough = 7; +int SoundInGain = 65536; // FIXED 4-byte from 0.5 to 1.5; this is middle value (1) as int /* * Reset audio emulation @@ -603,6 +609,25 @@ int16 SoundInControl(uint32 pb, uint32 dce) return noErr; } + case siInputSource: { + SoundInSource = ReadMacInt16(pb + csParam + 4); + return noErr; + } + + case siPlayThruOnOff: { + SoundInPlaythrough = ReadMacInt16(pb + csParam + 4); + return noErr; + } + + case siOptionsDialog: { + return noErr; + } + + case siInputGain: { + SoundInGain = ReadMacInt32(pb + csParam + 4); + return noErr; + } + default: return -231; // siUnknownInfoType } @@ -636,9 +661,34 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame 0x74, 0x2d, // t- 0x69, 0x6e // in }; +// const uint8 str[] = { // size 12 +// 0x0b, // 1-byte length +// 0x53, 0x68, // Sh +// 0x65, 0x65, // ee +// 0x70, 0x73, // ps +// 0x68, 0x61, // ha +// 0x76, 0x65, // ve +// 0x72 // r +// }; WriteMacInt32(pb + csParam, 0); // response will directly be written into buffer // vm_memcpy(bufferptr, str, 9); - memcpy(Mac2HostAddr(bufferptr),str,9); +// memcpy(Mac2HostAddr(bufferptr),str,9); + + vm_memcpy(bufferptr, str, sizeof(str)); +// memcpy(Mac2HostAddr(bufferptr),str,sizeof(str)); + +// WriteMacInt32(pb + csParam, sizeof(str)); +// uint8* virtual_addr = (uint8*) vm_acquire(sizeof(str)); +// memcpy((uint8*) virtual_addr, str, sizeof(str)); +// WriteMacInt32(bufferptr, Host2MacAddr(virtual_addr)); +// WriteMacInt32(ReadMacInt32(bufferptr), SoundInNameAddr); + +// vm_memcpy(bufferptr, SoundInNameAddr, 12); + +// uint32 virtual_addr = Mac_sysalloc(sizeof(str)); +// Host2Mac_memcpy(virtual_addr, str, sizeof(str)); +// WriteMacInt32(bufferptr, virtual_addr); + return noErr; } @@ -646,6 +696,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame // Borrow ICN resource from cd rom driver, just a hack since loading a true ICN would be better WriteMacInt32(pb + csParam, 0); WriteMacInt32(bufferptr, CDROMIconAddr); +// vm_memcpy(bufferptr, CDROMIconAddr, sizeof(CDROMIcon)); return noErr; // 68k code causes crash in sheep and link error in basilisk @@ -683,52 +734,108 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame case siInputSource: { // return -231 if only 1 or index if more - return -231; +// return -231; -// WriteMacInt32(pb + csParam, 4); -// WriteMacInt32(pb + csParam + 4, 1); // index 1 -// return noErr; + WriteMacInt32(pb + csParam, 2); + WriteMacInt16(pb + csParam + 4, SoundInSource); // index of selected source + return noErr; } case siInputSourceNames: { // list of sources in STR# resource format // return -231 if only 1 or handle to STR# resource if more - return -231; +// return -231; -// const uint8 str[] = { -// 0x00, 0x02, // 2-byte count of #strings -// 0x0b, // byte size indicator (up to 255 length supported) -// 0x49, 0x6e, // start of string in ASCII, In -// 0x74, 0x65, // te -// 0x72, 0x6e, // rn -// 0x61, 0x6c, // al -// 0x20, 0x43, // C -// 0x44, // D -// 0x0a, // size is 10 -// 0x4d, 0x69, // Mi -// 0x63, 0x72, // cr -// 0x6f, 0x70, // op -// 0x68, 0x6f, // ho -// 0x6e, 0x65, // ne -// }; + const uint8 str[] = { + 0x00, 0x02, // 2-byte count of #strings + 0x0a, // byte size indicator (up to 255 length supported) + 0x4d, 0x69, // Mi + 0x63, 0x72, // cr + 0x6f, 0x70, // op + 0x68, 0x6f, // ho + 0x6e, 0x65, // ne + 0x0b, // size is 11 + 0x49, 0x6e, // start of string in ASCII, In + 0x74, 0x65, // te + 0x72, 0x6e, // rn + 0x61, 0x6c, // al + 0x20, 0x43, // C + 0x44, // D + }; // -// WriteMacInt32(pb + csParam, 0); + WriteMacInt32(pb + csParam, 0); // vm_memcpy(bufferptr, str, 25); -// return noErr; + +// vm_memcpy(bufferptr, SoundInSourcesAddr, sizeof(str)); +// WriteMacInt32(bufferptr, SoundInSourcesAddr); + +// WriteMacInt32(ReadMacInt32(bufferptr),SoundInSourcesAddr); + + M68kRegisters r; +// r.d[0] = audio_channel_counts.size() * 2; + r.d[0] = sizeof(str); + Execute68kTrap(0xa122, &r); // NewHandle() + uint32 h = r.a[0]; + if (h == 0) + return memFullErr; +// WriteMacInt16(infoPtr + sil_count, audio_channel_counts.size()); + WriteMacInt32(bufferptr, h); + uint32 sp = ReadMacInt32(h); + vm_memcpy(sp, str, sizeof(str)); +// for (unsigned i=0; i> 8, M68K_EMUL_OP_SOUNDIN_CLOSE & 0xff, 0x4e, 0x75, // rts }; +static const uint8 sound_input_resources[] = { + // DRVR resources + // Name + 0x0b, // 1-byte length + 0x53, 0x68, // Sh + 0x65, 0x65, // ee + 0x70, 0x73, // ps + 0x68, 0x61, // ha + 0x76, 0x65, // ve + 0x72, // r + + // Source list + 0x00, 0x02, // 2-byte count of #strings + 0x0b, // byte size indicator (up to 255 length supported) + 0x49, 0x6e, // start of string in ASCII, In + 0x74, 0x65, // te + 0x72, 0x6e, // rn + 0x61, 0x6c, // al + 0x20, 0x43, // C + 0x44, // D + 0x0a, // size is 10 + 0x4d, 0x69, // Mi + 0x63, 0x72, // cr + 0x6f, 0x70, // op + 0x68, 0x6f, // ho + 0x6e, 0x65, // ne +}; +bool audio_patched = false; /* * Search resource for byte string, return offset (or 0) @@ -517,10 +545,16 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - } else if (type == FOURCC('D','R','V','R') && (id == -16501)){// || id == -16500)) { // -16500 will patch over native sound input driver and traps out to code in audio.cpp + } else if (type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { // -16500 will patch over native sound input driver and traps out to code in audio.cpp D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver - memcpy(p, sound_input_driver, sizeof(sound_input_driver)); + vm_memcpy(Host2MacAddr((uint8 *) p), sound_input_driver, sizeof(sound_input_driver)); + vm_memcpy(Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver), sound_input_resources, sizeof(sound_input_resources)); + if (!audio_patched) { + SoundInNameAddr = Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver); + SoundInSourcesAddr = Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver) + 12; + audio_patched = true; + } D(bug(" patch 1 applied\n")); } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); From 2a904af8e703611c6846b790f6b967ab5a720275 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Thu, 10 Sep 2020 01:36:49 -0500 Subject: [PATCH 412/534] Cleaner soundin driver implementation --- BasiliskII/src/audio.cpp | 83 ++++++++++------------------- BasiliskII/src/include/audio.h | 3 -- BasiliskII/src/include/audio_defs.h | 2 +- SheepShaver/src/rsrc_patches.cpp | 37 +------------ 4 files changed, 30 insertions(+), 95 deletions(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 261616d16..9485d75fb 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -33,7 +33,6 @@ #include "audio_defs.h" #include "user_strings.h" #include "cdrom.h" -#include "vm_alloc.h" #define DEBUG 0 #include "debug.h" @@ -54,8 +53,6 @@ static int open_count = 0; // Open/close nesting count bool AudioAvailable = false; // Flag: audio output available (from the software point of view) -uint32 SoundInNameAddr; -uint32 SoundInSourcesAddr; int SoundInSource = 2; int SoundInPlaythrough = 7; int SoundInGain = 65536; // FIXED 4-byte from 0.5 to 1.5; this is middle value (1) as int @@ -647,12 +644,11 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame // two choices on return // 1: if under 18 bytes, place # of bytes at (pb+csParam) and write from (pb+csParam+4) on - // 2: if over 18 bytes, place 0 at (pb+csParam) and directly write into buffer pointed to by bufferptr + // 2: if over 18 bytes, place 0 at (pb+csParam) and directly write into address pointed to by (pb+csParam+4) uint32 selector = ReadMacInt32(pb + csParam); // 4-byte selector (should match via FOURCC above) uint32 bufferptr = ReadMacInt32(pb + csParam + 4); // 4-byte address to the buffer in vm memory switch (selector) { -//#if 0 case siDeviceName: { // return name in STR255 format const uint8 str[] = { // size 9 0x08, // 1-byte length @@ -662,7 +658,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame 0x69, 0x6e // in }; // const uint8 str[] = { // size 12 -// 0x0b, // 1-byte length +// 0x0b, // 1-byte length // 0x53, 0x68, // Sh // 0x65, 0x65, // ee // 0x70, 0x73, // ps @@ -670,33 +666,26 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame // 0x76, 0x65, // ve // 0x72 // r // }; - WriteMacInt32(pb + csParam, 0); // response will directly be written into buffer -// vm_memcpy(bufferptr, str, 9); -// memcpy(Mac2HostAddr(bufferptr),str,9); - + WriteMacInt32(pb + csParam, 0); // response will be written directly into buffer vm_memcpy(bufferptr, str, sizeof(str)); -// memcpy(Mac2HostAddr(bufferptr),str,sizeof(str)); - -// WriteMacInt32(pb + csParam, sizeof(str)); -// uint8* virtual_addr = (uint8*) vm_acquire(sizeof(str)); -// memcpy((uint8*) virtual_addr, str, sizeof(str)); -// WriteMacInt32(bufferptr, Host2MacAddr(virtual_addr)); -// WriteMacInt32(ReadMacInt32(bufferptr), SoundInNameAddr); - -// vm_memcpy(bufferptr, SoundInNameAddr, 12); - -// uint32 virtual_addr = Mac_sysalloc(sizeof(str)); -// Host2Mac_memcpy(virtual_addr, str, sizeof(str)); -// WriteMacInt32(bufferptr, virtual_addr); return noErr; } case siDeviceIcon: { - // Borrow ICN resource from cd rom driver, just a hack since loading a true ICN would be better + // todo: add soundin ICN, borrow from CD ROM for now WriteMacInt32(pb + csParam, 0); - WriteMacInt32(bufferptr, CDROMIconAddr); -// vm_memcpy(bufferptr, CDROMIconAddr, sizeof(CDROMIcon)); + + M68kRegisters r; + r.d[0] = sizeof(CDROMIcon); + Execute68kTrap(0xa122, &r); // NewHandle() + uint32 h = r.a[0]; + if (h == 0) + return memFullErr; + WriteMacInt32(bufferptr, h); + uint32 sp = ReadMacInt32(h); + vm_memcpy(sp, CDROMIcon, sizeof(CDROMIcon)); + return noErr; // 68k code causes crash in sheep and link error in basilisk @@ -733,21 +722,20 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame } case siInputSource: { - // return -231 if only 1 or index if more -// return -231; - + // return -231 if only 1 or index of current source if more + WriteMacInt32(pb + csParam, 2); WriteMacInt16(pb + csParam + 4, SoundInSource); // index of selected source return noErr; } - case siInputSourceNames: { // list of sources in STR# resource format + case siInputSourceNames: { // return -231 if only 1 or handle to STR# resource if more -// return -231; const uint8 str[] = { 0x00, 0x02, // 2-byte count of #strings - 0x0a, // byte size indicator (up to 255 length supported) + // byte size indicator (up to 255 length supported) + 0x0a, // size is 10 0x4d, 0x69, // Mi 0x63, 0x72, // cr 0x6f, 0x70, // op @@ -761,36 +749,26 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame 0x20, 0x43, // C 0x44, // D }; -// + WriteMacInt32(pb + csParam, 0); -// vm_memcpy(bufferptr, str, 25); - -// vm_memcpy(bufferptr, SoundInSourcesAddr, sizeof(str)); -// WriteMacInt32(bufferptr, SoundInSourcesAddr); - -// WriteMacInt32(ReadMacInt32(bufferptr),SoundInSourcesAddr); - + M68kRegisters r; -// r.d[0] = audio_channel_counts.size() * 2; r.d[0] = sizeof(str); Execute68kTrap(0xa122, &r); // NewHandle() uint32 h = r.a[0]; if (h == 0) return memFullErr; -// WriteMacInt16(infoPtr + sil_count, audio_channel_counts.size()); WriteMacInt32(bufferptr, h); uint32 sp = ReadMacInt32(h); vm_memcpy(sp, str, sizeof(str)); -// for (unsigned i=0; i> 8, M68K_EMUL_OP_SOUNDIN_CLOSE & 0xff, 0x4e, 0x75, // rts }; -static const uint8 sound_input_resources[] = { - // DRVR resources - // Name - 0x0b, // 1-byte length - 0x53, 0x68, // Sh - 0x65, 0x65, // ee - 0x70, 0x73, // ps - 0x68, 0x61, // ha - 0x76, 0x65, // ve - 0x72, // r - - // Source list - 0x00, 0x02, // 2-byte count of #strings - 0x0b, // byte size indicator (up to 255 length supported) - 0x49, 0x6e, // start of string in ASCII, In - 0x74, 0x65, // te - 0x72, 0x6e, // rn - 0x61, 0x6c, // al - 0x20, 0x43, // C - 0x44, // D - 0x0a, // size is 10 - 0x4d, 0x69, // Mi - 0x63, 0x72, // cr - 0x6f, 0x70, // op - 0x68, 0x6f, // ho - 0x6e, 0x65, // ne - -}; -bool audio_patched = false; /* * Search resource for byte string, return offset (or 0) @@ -545,16 +516,10 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) D(bug(" patch applied\n")); } - } else if (type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { // -16500 will patch over native sound input driver and traps out to code in audio.cpp + } else if (type == FOURCC('D','R','V','R') && (id == -16501 || id == -16500)) { // patch over native sound input driver and trap out to code in audio.cpp D(bug("DRVR -16501/-16500 found\n")); // Install sound input driver vm_memcpy(Host2MacAddr((uint8 *) p), sound_input_driver, sizeof(sound_input_driver)); - vm_memcpy(Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver), sound_input_resources, sizeof(sound_input_resources)); - if (!audio_patched) { - SoundInNameAddr = Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver); - SoundInSourcesAddr = Host2MacAddr((uint8 *) p) + sizeof(sound_input_driver) + 12; - audio_patched = true; - } D(bug(" patch 1 applied\n")); } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); From 40e2d3d84b4179b9ce2ffbac8a0201a519e6047c Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Thu, 10 Sep 2020 17:31:21 -0500 Subject: [PATCH 413/534] Removing temp ignoresegv patch --- SheepShaver/src/include/rom_patches.h | 1 - SheepShaver/src/rom_patches.cpp | 3 --- SheepShaver/src/rsrc_patches.cpp | 1 - 3 files changed, 5 deletions(-) diff --git a/SheepShaver/src/include/rom_patches.h b/SheepShaver/src/include/rom_patches.h index a4b4e283e..c263606a0 100644 --- a/SheepShaver/src/include/rom_patches.h +++ b/SheepShaver/src/include/rom_patches.h @@ -31,7 +31,6 @@ enum { ROMTYPE_NEWWORLD }; extern int ROMType; -extern bool SoundPatchFlag; extern bool DecodeROM(uint8 *data, uint32 size); extern bool PatchROM(void); diff --git a/SheepShaver/src/rom_patches.cpp b/SheepShaver/src/rom_patches.cpp index 804d6a975..b9ccc9868 100644 --- a/SheepShaver/src/rom_patches.cpp +++ b/SheepShaver/src/rom_patches.cpp @@ -67,7 +67,6 @@ const uint32 ADDR_MAP_PATCH_SPACE = 0x2fd140; // Global variables int ROMType; // ROM type -bool SoundPatchFlag; static uint32 sony_offset; // Offset of .Sony driver resource // Prototypes @@ -694,8 +693,6 @@ bool PatchROM(void) ROMType = ROMTYPE_NEWWORLD; else return false; - - SoundPatchFlag = ROMType == ROMTYPE_NEWWORLD && !PrefsFindBool("ignoresegv"); // Check that other ROM addresses point to really free regions if (!check_rom_patch_space(CHECK_LOAD_PATCH_SPACE, 0x40)) diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index 06ab27b88..344b1bad5 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -522,7 +522,6 @@ void CheckLoad(uint32 type, int16 id, uint16 *p, uint32 size) // Install sound input driver memcpy(p, sound_input_driver, sizeof(sound_input_driver)); D(bug(" patch 1 applied\n")); -*/ } else if (type == FOURCC('I','N','I','T') && id == 1 && size == (2416 >> 1)) { D(bug("INIT 1 (size 2416) found\n")); size >>= 1; From 25e2d4af6f9ebe24bb8476d2444078ef23ee74b9 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Fri, 11 Sep 2020 14:44:58 -0500 Subject: [PATCH 414/534] Removing vm_memcpy dependency for BII --- BasiliskII/src/audio.cpp | 22 ++++++++++++++-------- 1 file changed, 14 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index 9485d75fb..fa861f283 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -667,7 +667,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame // 0x72 // r // }; WriteMacInt32(pb + csParam, 0); // response will be written directly into buffer - vm_memcpy(bufferptr, str, sizeof(str)); + Host2Mac_memcpy(bufferptr, str, sizeof(str)); return noErr; } @@ -684,7 +684,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame return memFullErr; WriteMacInt32(bufferptr, h); uint32 sp = ReadMacInt32(h); - vm_memcpy(sp, CDROMIcon, sizeof(CDROMIcon)); + Host2Mac_memcpy(sp, CDROMIcon, sizeof(CDROMIcon)); return noErr; @@ -760,7 +760,7 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame return memFullErr; WriteMacInt32(bufferptr, h); uint32 sp = ReadMacInt32(h); - vm_memcpy(sp, str, sizeof(str)); + Host2Mac_memcpy(sp, str, sizeof(str)); return noErr; } @@ -794,12 +794,18 @@ int16 SoundInStatus(uint32 pb, uint32 dce) // A0 points to Device Manager parame case siSampleRateAvailable: { WriteMacInt32(pb + csParam, 0); + + M68kRegisters r; + r.d[0] = 4; + Execute68kTrap(0xa122, &r); // NewHandle() + uint32 h = r.a[0]; + if (h == 0) + return memFullErr; + WriteMacInt16(bufferptr, 1); // 1 sample rate available + WriteMacInt32(bufferptr + 2, h); // handle to sample rate list + uint32 sp = ReadMacInt32(h); + WriteMacInt32(sp, 0xac440000); // 44100.00000 Hz, of Fixed data type - uint32 virtual_addr = Mac_sysalloc(4); - WriteMacInt32(virtual_addr, 0xac440000); // 44100.00000 Hz, of Fixed data type - - WriteMacInt16(bufferptr, 1); // 1 sample rate available - WriteMacInt32(bufferptr + 2, virtual_addr); // handle to the sample rate list return noErr; } From 21c16f991e8e566894516d1a0e46cf35e30f92c9 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 13 Sep 2020 13:49:48 +0900 Subject: [PATCH 415/534] switchable gamma ramp --- BasiliskII/src/SDL/video_sdl2.cpp | 29 ++++++++++++++++++++++------- BasiliskII/src/prefs_items.cpp | 1 + SheepShaver/src/prefs_items.cpp | 1 + 3 files changed, 24 insertions(+), 7 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index daa76a6e2..fb7d27f6f 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1618,6 +1618,25 @@ void VideoQuitFullScreen(void) quit_full_screen = true; } +static void ApplyGammaRamp() { + if (sdl_window) { + int result; + const char *s = PrefsFindString("gammaramp"); + if (!s) s = "on"; + if (strcmp(s, "off") && (strcmp(s, "fullscreen") || display_type == DISPLAY_SCREEN)) + result = SDL_SetWindowGammaRamp(sdl_window, last_gamma_red, last_gamma_green, last_gamma_blue); + else { + Uint16 ident[256]; + for (int i = 0; i < 256; i++) + ident[i] = (i << 8) | i; + result = SDL_SetWindowGammaRamp(sdl_window, ident, ident, ident); + } + if (result < 0) { + fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + } + } +} + static void do_toggle_fullscreen(void) { #ifndef USE_CPU_EMUL_SERVICES @@ -1654,6 +1673,7 @@ static void do_toggle_fullscreen(void) #ifdef SHEEPSHAVER video_set_palette(); #endif + ApplyGammaRamp(); drv->update_palette(); // reset the video refresh handler @@ -1795,16 +1815,11 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) memcmp(green, last_gamma_green, 512) != 0 || memcmp(blue, last_gamma_blue, 512) != 0); - if (changed && sdl_window) { - int result = SDL_SetWindowGammaRamp(sdl_window, red, green, blue); - - if (result < 0) { - fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - } - + if (changed) { memcpy(last_gamma_red, red, 512); memcpy(last_gamma_green, green, 512); memcpy(last_gamma_blue, blue, 512); + ApplyGammaRamp(); } return; diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 7039a5e52..d6e531f85 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -78,6 +78,7 @@ prefs_desc common_prefs_items[] = { {"yearofs", TYPE_INT32, 0, "year offset"}, {"dayofs", TYPE_INT32, 0, "day offset"}, {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, + {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index f3055976d..5897affa7 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -66,6 +66,7 @@ prefs_desc common_prefs_items[] = { {"yearofs", TYPE_INT32, 0, "year offset"}, {"dayofs", TYPE_INT32, 0, "day offset"}, {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, + {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {NULL, TYPE_END, false, NULL} // End of list }; From 6de9a5032d2e6b5485d1fafd40c7bc8cf619cb30 Mon Sep 17 00:00:00 2001 From: Seth Polsley Date: Sun, 13 Sep 2020 03:41:23 -0500 Subject: [PATCH 416/534] Splitting mac_pal and mac_gamma to always allow SDL gamma changes --- BasiliskII/src/SDL/video_sdl2.cpp | 106 +++++++++++++++++------------- SheepShaver/src/include/video.h | 2 + SheepShaver/src/video.cpp | 11 ++-- 3 files changed, 70 insertions(+), 49 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index fb7d27f6f..19d86f1ab 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -341,8 +341,10 @@ class monitor_desc { virtual void switch_to_current_mode(void) = 0; // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) virtual void set_palette(uint8 *pal, int num) = 0; + + // Called by the video driver to set the gamma table (in direct modes) + virtual void set_gamma(uint8 *gamma, int num) = 0; }; // Vector of pointers to available monitor descriptions, filled by VideoInit() @@ -387,6 +389,7 @@ class SDL_monitor_desc : public monitor_desc { virtual void switch_to_current_mode(void); virtual void set_palette(uint8 *pal, int num); + virtual void set_gamma(uint8 *gamma, int num); bool video_open(void); void video_close(void); @@ -1778,53 +1781,26 @@ void video_set_palette(void) } monitor->set_palette(pal, n_colors); } + +void video_set_gamma(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 gamma[256 * 3]; + for (int c = 0; c < n_colors; c++) { + gamma[c*3 + 0] = mac_gamma[c].red; + gamma[c*3 + 1] = mac_gamma[c].green; + gamma[c*3 + 2] = mac_gamma[c].blue; + } + monitor->set_gamma(gamma, n_colors); +} #endif - + void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) { + const VIDEO_MODE &mode = get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { - // handle the gamma ramp - - if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey - return; // ignore - - uint16 red[256]; - uint16 green[256]; - uint16 blue[256]; - - int repeats = 256 / num_in; - - for (int i = 0; i < num_in; i++) { - for (int j = 0; j < repeats; j++) { - red[i*repeats + j] = pal[i*3 + 0] << 8; - green[i*repeats + j] = pal[i*3 + 1] << 8; - blue[i*repeats + j] = pal[i*3 + 2] << 8; - } - } - - // fill remaining entries (if any) with last value - for (int i = num_in * repeats; i < 256; i++) { - red[i] = pal[(num_in - 1) * 3] << 8; - green[i] = pal[(num_in - 1) * 3 + 1] << 8; - blue[i] = pal[(num_in - 1) * 3 + 2] << 8; - } - - bool changed = (memcmp(red, last_gamma_red, 512) != 0 || - memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); - - if (changed) { - memcpy(last_gamma_red, red, 512); - memcpy(last_gamma_green, green, 512); - memcpy(last_gamma_blue, blue, 512); - ApplyGammaRamp(); - } - - return; - } - + LOCK_PALETTE; // Convert colors to XColor array @@ -1867,6 +1843,48 @@ void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) UNLOCK_PALETTE; } + +void SDL_monitor_desc::set_gamma(uint8 *gamma, int num_in) +{ + // handle the gamma ramp + + if (gamma[0] == 127 && gamma[num_in*3-1] == 127) // solid grey + return; // ignore + + uint16 red[256]; + uint16 green[256]; + uint16 blue[256]; + + int repeats = 256 / num_in; + + for (int i = 0; i < num_in; i++) { + for (int j = 0; j < repeats; j++) { + red[i*repeats + j] = gamma[i*3 + 0] << 8; + green[i*repeats + j] = gamma[i*3 + 1] << 8; + blue[i*repeats + j] = gamma[i*3 + 2] << 8; + } + } + + // fill remaining entries (if any) with last value + for (int i = num_in * repeats; i < 256; i++) { + red[i] = gamma[(num_in - 1) * 3] << 8; + green[i] = gamma[(num_in - 1) * 3 + 1] << 8; + blue[i] = gamma[(num_in - 1) * 3 + 2] << 8; + } + + bool changed = (memcmp(red, last_gamma_red, 512) != 0 || + memcmp(green, last_gamma_green, 512) != 0 || + memcmp(blue, last_gamma_blue, 512) != 0); + + if (changed) { + memcpy(last_gamma_red, red, 512); + memcpy(last_gamma_green, green, 512); + memcpy(last_gamma_blue, blue, 512); + ApplyGammaRamp(); + } + +} + /* diff --git a/SheepShaver/src/include/video.h b/SheepShaver/src/include/video.h index 3b82203ef..5f2b2dda0 100644 --- a/SheepShaver/src/include/video.h +++ b/SheepShaver/src/include/video.h @@ -106,6 +106,7 @@ extern uint32 screen_base; // Frame buffer base address extern int cur_mode; // Number of current video mode (index in VModes array) extern int display_type; // Current display type (see above) extern rgb_color mac_pal[256]; +extern rgb_color mac_gamma[256]; extern uint8 remap_mac_be[256]; extern uint8 MacCursor[68]; @@ -140,6 +141,7 @@ extern void VideoInstallAccel(void); extern void VideoQuitFullScreen(void); extern void video_set_palette(void); +extern void video_set_gamma(void); extern void video_set_cursor(void); extern bool video_can_change_cursor(void); extern int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr); diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index dd7870085..99642150b 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -46,6 +46,7 @@ uint32 screen_base = 0; // Frame buffer base address int cur_mode; // Number of current video mode (index in VModes array) int display_type = DIS_INVALID; // Current display type rgb_color mac_pal[256]; +rgb_color mac_gamma[256]; uint8 remap_mac_be[256]; uint8 MacCursor[68] = {16, 1}; // Mac cursor image @@ -236,7 +237,7 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) for (int i=0; i<256; i++) { WriteMacInt8(p + i, i); - mac_pal[i].red = mac_pal[i].green = mac_pal[i].blue = i; + mac_gamma[i].red = mac_gamma[i].green = mac_gamma[i].blue = i; } } else { // User-supplied gamma table @@ -290,14 +291,14 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) max_red = max(max_red, ReadMacInt8(p_red++)); max_green = max(max_green, ReadMacInt8(p_green++)); max_blue = max(max_blue, ReadMacInt8(p_blue++)); - mac_pal[i].red = max_red; - mac_pal[i].green = max_green; - mac_pal[i].blue = max_blue; + mac_gamma[i].red = max_red; + mac_gamma[i].green = max_green; + mac_gamma[i].blue = max_blue; } } } - video_set_palette(); + video_set_gamma(); return noErr; } From d851a65548b2acb6f743a7062cbca5fef286d66e Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 13 Sep 2020 23:03:51 +0900 Subject: [PATCH 417/534] fix gamma ramp when 16-bit color --- BasiliskII/src/SDL/video_sdl2.cpp | 3 +-- SheepShaver/src/include/video.h | 2 +- SheepShaver/src/video.cpp | 5 ++--- 3 files changed, 4 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 19d86f1ab..578b35186 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1782,10 +1782,9 @@ void video_set_palette(void) monitor->set_palette(pal, n_colors); } -void video_set_gamma(void) +void video_set_gamma(int n_colors) { monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); uint8 gamma[256 * 3]; for (int c = 0; c < n_colors; c++) { gamma[c*3 + 0] = mac_gamma[c].red; diff --git a/SheepShaver/src/include/video.h b/SheepShaver/src/include/video.h index 5f2b2dda0..f3a30f044 100644 --- a/SheepShaver/src/include/video.h +++ b/SheepShaver/src/include/video.h @@ -141,7 +141,7 @@ extern void VideoInstallAccel(void); extern void VideoQuitFullScreen(void); extern void video_set_palette(void); -extern void video_set_gamma(void); +extern void video_set_gamma(int n_colors); extern void video_set_cursor(void); extern bool video_can_change_cursor(void); extern int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr); diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index 99642150b..330a7051f 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -239,7 +239,7 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) WriteMacInt8(p + i, i); mac_gamma[i].red = mac_gamma[i].green = mac_gamma[i].blue = i; } - + video_set_gamma(256); } else { // User-supplied gamma table // Validate header @@ -296,9 +296,8 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma) mac_gamma[i].blue = max_blue; } } + video_set_gamma(data_cnt); } - - video_set_gamma(); return noErr; } From 7313b0284c8e111437965a3314fdaa0cb1e2335d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 17 Sep 2020 11:10:15 +0900 Subject: [PATCH 418/534] BII: fix gamma ramp --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- BasiliskII/src/include/video.h | 8 +++++--- BasiliskII/src/video.cpp | 12 +++++------- 3 files changed, 11 insertions(+), 11 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 578b35186..0a5f69b48 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -343,7 +343,7 @@ class monitor_desc { // Called by the video driver to set the color palette (in indexed modes) virtual void set_palette(uint8 *pal, int num) = 0; - // Called by the video driver to set the gamma table (in direct modes) + // Called by the video driver to set the gamma table virtual void set_gamma(uint8 *gamma, int num) = 0; }; diff --git a/BasiliskII/src/include/video.h b/BasiliskII/src/include/video.h index 208881baf..fe4404ef7 100644 --- a/BasiliskII/src/include/video.h +++ b/BasiliskII/src/include/video.h @@ -205,8 +205,8 @@ class monitor_desc { // Set palette to 50% gray void set_gray_palette(void); - // Load gamma-corrected black-to-white ramp to palette for direct-color mode - void load_ramp_palette(void); + // Load gamma-corrected black-to-white ramp + void load_gamma_ramp(void); // Allocate gamma table of specified size bool allocate_gamma_table(int size); @@ -250,8 +250,10 @@ class monitor_desc { virtual void switch_to_current_mode(void) = 0; // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) virtual void set_palette(uint8 *pal, int num) = 0; + + // Called by the video driver to set the gamma table + virtual void set_gamma(uint8 *gamma, int num) = 0; }; // Vector of pointers to available monitor descriptions, filled by VideoInit() diff --git a/BasiliskII/src/video.cpp b/BasiliskII/src/video.cpp index 3b46864ef..bd78fdbd9 100644 --- a/BasiliskII/src/video.cpp +++ b/BasiliskII/src/video.cpp @@ -235,10 +235,10 @@ void monitor_desc::set_gray_palette(void) /* - * Load gamma-corrected black-to-white ramp to palette for direct-color mode + * Load gamma-corrected black-to-white ramp */ -void monitor_desc::load_ramp_palette(void) +void monitor_desc::load_gamma_ramp(void) { // Find tables for gamma correction uint8 *red_gamma = NULL, *green_gamma = NULL, *blue_gamma = NULL; @@ -273,7 +273,7 @@ void monitor_desc::load_ramp_palette(void) *p++ = blue; } - set_palette(palette, num); + set_gamma(palette, num); } @@ -354,8 +354,7 @@ int16 monitor_desc::set_gamma_table(uint32 user_table) Mac2Mac_memcpy(gamma_table, user_table, size); } - if (IsDirectMode(*current_mode)) - load_ramp_palette(); + load_gamma_ramp(); return noErr; } @@ -636,8 +635,7 @@ int16 monitor_desc::driver_control(uint16 code, uint32 param, uint32 dce) pat = ~pat; } - if (IsDirectMode(*current_mode)) - load_ramp_palette(); + load_gamma_ramp(); return noErr; } From be17ba904475e2fc1019b129f9bca56882b3aae7 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 18 Sep 2020 10:29:16 +0900 Subject: [PATCH 419/534] save initial gamma tables change default gammaramp to off --- BasiliskII/src/SDL/video_sdl2.cpp | 25 ++++++++++++++++--------- 1 file changed, 16 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 0a5f69b48..ba724a08a 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -168,6 +168,12 @@ static SDL_mutex *frame_buffer_lock = NULL; #define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) #define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) +// Initially set gamma tables +static uint16 init_gamma_red[256]; +static uint16 init_gamma_green[256]; +static uint16 init_gamma_blue[256]; +static bool init_gamma_valid; + // Previously set gamma tables static uint16 last_gamma_red[256]; static uint16 last_gamma_green[256]; @@ -1624,19 +1630,20 @@ void VideoQuitFullScreen(void) static void ApplyGammaRamp() { if (sdl_window) { int result; + if (!init_gamma_valid) { + result = SDL_GetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); + if (result < 0) + fprintf(stderr, "SDL_GetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + init_gamma_valid = true; + } const char *s = PrefsFindString("gammaramp"); - if (!s) s = "on"; + if (!s) s = "off"; if (strcmp(s, "off") && (strcmp(s, "fullscreen") || display_type == DISPLAY_SCREEN)) result = SDL_SetWindowGammaRamp(sdl_window, last_gamma_red, last_gamma_green, last_gamma_blue); - else { - Uint16 ident[256]; - for (int i = 0; i < 256; i++) - ident[i] = (i << 8) | i; - result = SDL_SetWindowGammaRamp(sdl_window, ident, ident, ident); - } - if (result < 0) { + else + result = SDL_SetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); + if (result < 0) fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - } } } From 4e98699ee1870107a6e26ba63ac7043696e6ed7a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 18 Sep 2020 18:42:36 +0900 Subject: [PATCH 420/534] fix link file list of SS --- SheepShaver/Makefile | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index ab0773058..0a511ff3a 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -64,7 +64,7 @@ links: BeOS/xpram_beos.cpp BeOS/SheepDriver BeOS/SheepNet \ CrossPlatform/sigsegv.h CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ CrossPlatform/video_vosf.h CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ - Unix/audio_oss_esd.cpp Unix/bincue_unix.cpp Unix/bincue_unix.h \ + Unix/audio_oss_esd.cpp \ Unix/vhd_unix.cpp \ Unix/extfs_unix.cpp Unix/serial_unix.cpp \ Unix/sshpty.h Unix/sshpty.c Unix/strlcpy.h Unix/strlcpy.c \ From 37b36ef33202cae3afbdd864b2cf29f7e6fe4d3c Mon Sep 17 00:00:00 2001 From: rakslice Date: Mon, 21 Sep 2020 20:33:26 -0700 Subject: [PATCH 421/534] actually use dynamically detected cdroms; if read via cdenable doesn't work use the logical drive handle instead --- BasiliskII/src/Windows/sys_windows.cpp | 47 +++++++++++++++++++------- BasiliskII/src/cdrom.cpp | 17 +++++----- 2 files changed, 42 insertions(+), 22 deletions(-) diff --git a/BasiliskII/src/Windows/sys_windows.cpp b/BasiliskII/src/Windows/sys_windows.cpp index 8e876307a..264ee3668 100755 --- a/BasiliskII/src/Windows/sys_windows.cpp +++ b/BasiliskII/src/Windows/sys_windows.cpp @@ -84,7 +84,7 @@ static char *sector_buffer = NULL; // Prototypes static bool is_cdrom_readable(file_handle *fh); - +static DWORD file_offset_read(HANDLE fh, loff_t offset, int count, char *buf); /* * Initialization @@ -266,12 +266,42 @@ void SysAddSerialPrefs(void) * Can't give too much however, would be annoying, this is difficult.. */ -static inline int cd_read_with_retry(file_handle *fh, ULONG LBA, int count, char *buf ) +static inline int cd_read_with_retry(file_handle *fh, ULONG offset, int count, char *buf ) { if (!fh || !fh->fh) return 0; - return CdenableSysReadCdBytes(fh->fh, LBA, count, buf); + DWORD bytes_read = CdenableSysReadCdBytes(fh->fh, offset, count, buf); + + if (bytes_read == 0) { + // fall back to logical volume handle read in the case where there's no cdenable + bytes_read = file_offset_read(fh->fh, offset, count, buf); + } + + return bytes_read; +} + +/* + * Generic offset read function for a file or a device that behaves like one + */ + +static DWORD file_offset_read(HANDLE fh, loff_t offset, int count, char *buf) +{ + // Seek to position + LONG lo = (LONG)offset; + LONG hi = (LONG)(offset >> 32); + DWORD r = SetFilePointer(fh, lo, &hi, FILE_BEGIN); + if (r == INVALID_SET_FILE_POINTER && GetLastError() != NO_ERROR) { + return 0; + } + + DWORD bytes_read; + + // Read data + if (ReadFile(fh, buf, count, &bytes_read, NULL) == 0) + bytes_read = 0; + + return bytes_read; } static int cd_read(file_handle *fh, cachetype *cptr, ULONG LBA, int count, char *buf) @@ -581,16 +611,7 @@ size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) DWORD bytes_read = 0; if (fh->is_file) { - // Seek to position - LONG lo = (LONG)offset; - LONG hi = (LONG)(offset >> 32); - DWORD r = SetFilePointer(fh->fh, lo, &hi, FILE_BEGIN); - if (r == INVALID_SET_FILE_POINTER && GetLastError() != NO_ERROR) - return 0; - - // Read data - if (ReadFile(fh->fh, buffer, length, &bytes_read, NULL) == 0) - bytes_read = 0; + bytes_read = file_offset_read(fh->fh, offset, length, (char *)buffer); } else if (fh->is_cdrom) { int bytes_left, try_bytes, got_bytes; diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index ee8d2350f..ce2a398aa 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -303,15 +303,14 @@ void CDROMInit(void) if (PrefsFindString("cdrom", 0) == NULL) { SysAddCDROMPrefs(); } - else { - // Add drives specified in preferences - int index = 0; - const char *str; - while ((str = PrefsFindString("cdrom", index++)) != NULL) { - void *fh = Sys_open(str, true); - if (fh) - drives.push_back(cdrom_drive_info(fh)); - } + + // Add drives specified in preferences + int index = 0; + const char *str; + while ((str = PrefsFindString("cdrom", index++)) != NULL) { + void *fh = Sys_open(str, true); + if (fh) + drives.push_back(cdrom_drive_info(fh)); } if (!drives.empty()) { // set to first drive by default From 561f1dfcde9105e8368cbbc420f0ae8a58393a11 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 24 Sep 2020 19:09:54 -0700 Subject: [PATCH 422/534] For NewWorld ROM, implement the bootdriver setting by reordering the drive queue once CD-ROM drives are added --- BasiliskII/src/cdrom.cpp | 3 ++ BasiliskII/src/include/cdrom.h | 2 + BasiliskII/src/main.cpp | 2 + SheepShaver/src/include/macos_util.h | 1 + SheepShaver/src/macos_util.cpp | 57 ++++++++++++++++++++++++++++ SheepShaver/src/main.cpp | 11 ++++++ 6 files changed, 76 insertions(+) diff --git a/BasiliskII/src/cdrom.cpp b/BasiliskII/src/cdrom.cpp index ce2a398aa..964f116df 100644 --- a/BasiliskII/src/cdrom.cpp +++ b/BasiliskII/src/cdrom.cpp @@ -448,6 +448,9 @@ int16 CDROMOpen(uint32 pb, uint32 dce) Execute68kTrap(0xa04e, &r); // AddDrive() } } + + CDROMOpenDone(); + return noErr; } diff --git a/BasiliskII/src/include/cdrom.h b/BasiliskII/src/include/cdrom.h index 0ab114a57..bf899e617 100644 --- a/BasiliskII/src/include/cdrom.h +++ b/BasiliskII/src/include/cdrom.h @@ -40,4 +40,6 @@ extern int16 CDROMPrime(uint32 pb, uint32 dce); extern int16 CDROMControl(uint32 pb, uint32 dce); extern int16 CDROMStatus(uint32 pb, uint32 dce); +extern void CDROMOpenDone(void); // Called by CDROMOpen() once drives have been to the drive queue + #endif diff --git a/BasiliskII/src/main.cpp b/BasiliskII/src/main.cpp index dcb86e9c2..e010a19ce 100644 --- a/BasiliskII/src/main.cpp +++ b/BasiliskII/src/main.cpp @@ -202,6 +202,8 @@ bool InitAll(const char *vmdir) return true; } +void CDROMOpenDone() { +} /* * Deinitialize everything diff --git a/SheepShaver/src/include/macos_util.h b/SheepShaver/src/include/macos_util.h index aec13cff5..50bcee3bc 100644 --- a/SheepShaver/src/include/macos_util.h +++ b/SheepShaver/src/include/macos_util.h @@ -353,6 +353,7 @@ extern void Enqueue(uint32 elem, uint32 list); // Enqueue QElem to list extern int FindFreeDriveNumber(int num); // Find first free drive number, starting at "num" extern void MountVolume(void *fh); // Mount volume with given file handle (see sys.h) extern void FileDiskLayout(loff_t size, uint8 *data, loff_t &start_byte, loff_t &real_size); // Calculate disk image file layout given file size and first 256 data bytes +extern void MoveDrivesFromDriverToFront(uint32 driverRefNum); // Move drives from the given driver to the head of the drive queue extern uint32 FindLibSymbol(const char *lib, const char *sym); // Find symbol in shared library extern void InitCallUniversalProc(void); // Init CallUniversalProc() extern long CallUniversalProc(void *upp, uint32 info); // CallUniversalProc() diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 6a3f96441..62a83f30a 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -103,6 +103,32 @@ void Enqueue(uint32 elem, uint32 list) } } +static void InsertQueueEntry(uint32 elem, uint32 at, uint32 list) { + uint32 next = ReadMacInt32(at); + WriteMacInt32(at, elem); + WriteMacInt32(elem + qLink, next); + if (next == 0) { + // inserted at end + WriteMacInt32(list + qTail, elem); + } +} + +static void RemoveQueueEntry(uint32 at, uint32 list) { + uint32 e = ReadMacInt32(at); + uint32 next = ReadMacInt32(e + qLink); + + if (next == 0) { + // removing from end + if (at == list + qHead) { + WriteMacInt32(list + qTail, 0); + } else { + WriteMacInt32(list + qTail, at - qLink); + } + } + + WriteMacInt32(at, next); + WriteMacInt32(e + qLink, 0); +} /* * Find first free drive number, starting at num @@ -127,6 +153,37 @@ int FindFreeDriveNumber(int num) return num; } +/* + * Move drives of the given driver to the front of the drive queue + */ +void MoveDrivesFromDriverToFront(uint32 driverRefNum) { + + const uint32 DrvQHdr = 0x308; // drive queue address + + uint32 nextInsertPos = DrvQHdr + qHead; + + uint32 ptrToElem = DrvQHdr + qHead; + uint32 e = ReadMacInt32(ptrToElem); + while (e) { + uint32 next = ReadMacInt32(e + qLink); + + uint32 d = e - dsQLink; + uint32 curRefNum = ReadMacInt16(d + dsQRefNum); + + if ((curRefNum & 0xffff) == (driverRefNum & 0xffff)) { + RemoveQueueEntry(ptrToElem, DrvQHdr); + InsertQueueEntry(e, nextInsertPos, DrvQHdr); + + nextInsertPos = e + qLink; + + // after the removal, ptrToElem already points to next + } else { + ptrToElem = e + qLink; + } + + e = next; + } +} /* * Mount volume with given file handle (call this function when you are unable to diff --git a/SheepShaver/src/main.cpp b/SheepShaver/src/main.cpp index e34b24be7..b725e08f6 100755 --- a/SheepShaver/src/main.cpp +++ b/SheepShaver/src/main.cpp @@ -264,6 +264,17 @@ bool InitAll(const char *vmdir) return true; } +void CDROMOpenDone() { + // At this point, any initial CD-ROM drives have been added to the drive queue. + if (ROMType == ROMTYPE_NEWWORLD) { + // The PRAM boot device setting has no apparent effect, + // but we can achieve a boot with the specified device by reordering the drive queue ourselves. + int bootdriver = PrefsFindInt32("bootdriver"); + if (bootdriver) { + MoveDrivesFromDriverToFront(bootdriver); + } + } +} /* * Deinitialize everything From ca9191fcb188416abd7c6689d359f55ecbc5efa9 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 24 Sep 2020 19:44:33 -0700 Subject: [PATCH 423/534] Fix whitespace --- SheepShaver/src/macos_util.cpp | 70 +++++++++++++++++----------------- 1 file changed, 35 insertions(+), 35 deletions(-) diff --git a/SheepShaver/src/macos_util.cpp b/SheepShaver/src/macos_util.cpp index 62a83f30a..d6fe84297 100644 --- a/SheepShaver/src/macos_util.cpp +++ b/SheepShaver/src/macos_util.cpp @@ -104,30 +104,30 @@ void Enqueue(uint32 elem, uint32 list) } static void InsertQueueEntry(uint32 elem, uint32 at, uint32 list) { - uint32 next = ReadMacInt32(at); - WriteMacInt32(at, elem); - WriteMacInt32(elem + qLink, next); - if (next == 0) { - // inserted at end - WriteMacInt32(list + qTail, elem); - } + uint32 next = ReadMacInt32(at); + WriteMacInt32(at, elem); + WriteMacInt32(elem + qLink, next); + if (next == 0) { + // inserted at end + WriteMacInt32(list + qTail, elem); + } } static void RemoveQueueEntry(uint32 at, uint32 list) { - uint32 e = ReadMacInt32(at); - uint32 next = ReadMacInt32(e + qLink); - - if (next == 0) { - // removing from end - if (at == list + qHead) { - WriteMacInt32(list + qTail, 0); - } else { - WriteMacInt32(list + qTail, at - qLink); - } - } - - WriteMacInt32(at, next); - WriteMacInt32(e + qLink, 0); + uint32 e = ReadMacInt32(at); + uint32 next = ReadMacInt32(e + qLink); + + if (next == 0) { + // removing from end + if (at == list + qHead) { + WriteMacInt32(list + qTail, 0); + } else { + WriteMacInt32(list + qTail, at - qLink); + } + } + + WriteMacInt32(at, next); + WriteMacInt32(e + qLink, 0); } /* @@ -158,31 +158,31 @@ int FindFreeDriveNumber(int num) */ void MoveDrivesFromDriverToFront(uint32 driverRefNum) { - const uint32 DrvQHdr = 0x308; // drive queue address + const uint32 DrvQHdr = 0x308; // drive queue address - uint32 nextInsertPos = DrvQHdr + qHead; + uint32 nextInsertPos = DrvQHdr + qHead; - uint32 ptrToElem = DrvQHdr + qHead; - uint32 e = ReadMacInt32(ptrToElem); - while (e) { - uint32 next = ReadMacInt32(e + qLink); + uint32 ptrToElem = DrvQHdr + qHead; + uint32 e = ReadMacInt32(ptrToElem); + while (e) { + uint32 next = ReadMacInt32(e + qLink); - uint32 d = e - dsQLink; + uint32 d = e - dsQLink; uint32 curRefNum = ReadMacInt16(d + dsQRefNum); - if ((curRefNum & 0xffff) == (driverRefNum & 0xffff)) { - RemoveQueueEntry(ptrToElem, DrvQHdr); - InsertQueueEntry(e, nextInsertPos, DrvQHdr); + if ((curRefNum & 0xffff) == (driverRefNum & 0xffff)) { + RemoveQueueEntry(ptrToElem, DrvQHdr); + InsertQueueEntry(e, nextInsertPos, DrvQHdr); - nextInsertPos = e + qLink; + nextInsertPos = e + qLink; // after the removal, ptrToElem already points to next - } else { + } else { ptrToElem = e + qLink; } - e = next; - } + e = next; + } } /* From dd9cfec0e7635d7134afeb4885204f9f07c75e36 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 6 Oct 2020 15:10:21 +0900 Subject: [PATCH 424/534] BII: JIT enabled --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 2 ++ 1 file changed, 2 insertions(+) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 56ff5dba0..fb25c8ba7 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1089,6 +1089,7 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1151,6 +1152,7 @@ "$(inherited)", ENABLE_MACOSX_ETHERHELPER, "BINCUE=1", + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; From d20ba5d17969a109b5acc73c71a31237de9985ec Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 6 Oct 2020 15:38:35 +0900 Subject: [PATCH 425/534] test a pref item swap_opt_cmd --- BasiliskII/src/SDL/video_sdl2.cpp | 43 ++++++++++--------------------- BasiliskII/src/prefs_items.cpp | 7 +++++ SheepShaver/src/prefs_items.cpp | 7 +++++ 3 files changed, 28 insertions(+), 29 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index ba724a08a..06717ec23 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2017,6 +2017,14 @@ static bool is_hotkey_down(SDL_Keysym const & ks) (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); } +static bool swap_opt_cmd() { + static bool f, c; + if (!f) { + f = true; + c = PrefsFindBool("swap_opt_cmd"); + } + return c; +} /* * Translate key event to Mac keycode, returns CODE_INVALID if no keycode was found @@ -2092,17 +2100,8 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_RCTRL: return 0x36; case SDLK_LSHIFT: return 0x38; case SDLK_RSHIFT: return 0x38; -#ifdef __APPLE__ - case SDLK_LALT: return 0x3a; - case SDLK_RALT: return 0x3a; - case SDLK_LGUI: return 0x37; - case SDLK_RGUI: return 0x37; -#else - case SDLK_LALT: return 0x37; - case SDLK_RALT: return 0x37; - case SDLK_LGUI: return 0x3a; - case SDLK_RGUI: return 0x3a; -#endif + case SDLK_LALT: case SDLK_RALT: return swap_opt_cmd() ? 0x37 : 0x3a; + case SDLK_LGUI: case SDLK_RGUI: return swap_opt_cmd() ? 0x3a : 0x37; case SDLK_MENU: return 0x32; case SDLK_CAPSLOCK: return 0x39; case SDLK_NUMLOCKCLEAR: return 0x47; @@ -2320,17 +2319,10 @@ static void handle_events(void) #endif if (code == 0x36) ctrl_down = true; -#ifdef __APPLE__ - if (code == 0x3a) - opt_down = true; - if (code == 0x37) - cmd_down = true; -#else - if (code == 0x37) + if (code == (swap_opt_cmd() ? 0x37 : 0x3a)) opt_down = true; - if (code == 0x3a) + if (code == (swap_opt_cmd() ? 0x3a : 0x37)) cmd_down = true; -#endif } else { if (code == 0x31) @@ -2354,17 +2346,10 @@ static void handle_events(void) #endif if (code == 0x36) ctrl_down = false; -#ifdef __APPLE__ - if (code == 0x3a) - opt_down = false; - if (code == 0x37) - cmd_down = false; -#else - if (code == 0x37) + if (code == (swap_opt_cmd() ? 0x37 : 0x3a)) opt_down = false; - if (code == 0x3a) + if (code == (swap_opt_cmd() ? 0x3a : 0x37)) cmd_down = false; -#endif } break; } diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index d6e531f85..7ee0f670d 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -79,6 +79,7 @@ prefs_desc common_prefs_items[] = { {"dayofs", TYPE_INT32, 0, "day offset"}, {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, + {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {NULL, TYPE_END, false, NULL} // End of list }; @@ -118,4 +119,10 @@ void AddPrefsDefaults(void) #endif PrefsAddInt32("keyboardtype", 5); + +#ifdef __APPLE__ + PrefsAddBool("swap_opt_cmd", false); +#else + PrefsAddBool("swap_opt_cmd", true); +#endif } diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 5897affa7..5afc9e2b1 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -67,6 +67,7 @@ prefs_desc common_prefs_items[] = { {"dayofs", TYPE_INT32, 0, "day offset"}, {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, + {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {NULL, TYPE_END, false, NULL} // End of list }; @@ -101,4 +102,10 @@ void AddPrefsDefaults(void) PrefsAddBool("jit68k", false); PrefsAddInt32("keyboardtype", 5); + + #ifdef __APPLE__ + PrefsAddBool("swap_opt_cmd", false); + #else + PrefsAddBool("swap_opt_cmd", true); + #endif } From 43cb7718e6868326b6c9f2b799d46820fc73fbbf Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 8 Oct 2020 17:10:49 +0900 Subject: [PATCH 426/534] ignore key repeat --- BasiliskII/src/SDL/video_sdl2.cpp | 2 ++ SheepShaver/src/prefs_items.cpp | 10 +++++----- 2 files changed, 7 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 06717ec23..1b62dd251 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2302,6 +2302,8 @@ static void handle_events(void) // Keyboard case SDL_KEYDOWN: { + if (event.key.repeat) + break; int code = CODE_INVALID; if (use_keycodes && event2keycode(event.key, true) != CODE_HOTKEY) code = keycode_table[event.key.keysym.scancode & 0xff]; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 5afc9e2b1..b9587b28a 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -103,9 +103,9 @@ void AddPrefsDefaults(void) PrefsAddInt32("keyboardtype", 5); - #ifdef __APPLE__ - PrefsAddBool("swap_opt_cmd", false); - #else - PrefsAddBool("swap_opt_cmd", true); - #endif +#ifdef __APPLE__ + PrefsAddBool("swap_opt_cmd", false); +#else + PrefsAddBool("swap_opt_cmd", true); +#endif } From 83d7702f2837df28ffea7d3f82a14369c81fd64f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 9 Oct 2020 13:54:42 +0900 Subject: [PATCH 427/534] add gnome_keybindings.txt --- SheepShaver/doc/Linux/gnome_keybindings.txt | 162 ++++++++++++++++++++ 1 file changed, 162 insertions(+) create mode 100644 SheepShaver/doc/Linux/gnome_keybindings.txt diff --git a/SheepShaver/doc/Linux/gnome_keybindings.txt b/SheepShaver/doc/Linux/gnome_keybindings.txt new file mode 100644 index 000000000..37ceadcf7 --- /dev/null +++ b/SheepShaver/doc/Linux/gnome_keybindings.txt @@ -0,0 +1,162 @@ +------------------------------------------------------------------------------------------------------ +org.gnome.desktop.wm.keybindings: + + CHANGE ALL SETTINGS TO: + UseDefaultValue: OFF + Custom Value: [] + +------------------------------------------------------------------------------------------------------ +org.gnome.mutter: + +org.gnome.mutter.overlay-key + DEFAULT: 'Super_L' + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: + + +------------------------------------------------------------------------------------------------------ +org.gnome.mutter.keybindings: + +org.gnome.mutter.keybindings.switch-monitor + DEFAULT: ['p', 'XF86Display'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: ['XF86Display'] + + +org.gnome.mutter.keybindings.toggle-tiled-left + DEFAULT: ['Left'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.gnome.mutter.keybindings.toggle-tiled-right + DEFAULT: ['Right'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +------------------------------------------------------------------------------------------------------ +org.gnome.mutter.wayland.keybindings: + +org.gnome.mutter.wayland.keybindings.restore-shortcuts + DEFAULT: ['Escape'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + + +------------------------------------------------------------------------------------------------------ +org.pantheon.desktop.gala.keybindings: + +org.pantheon.desktop.gala.keybindings.cycle-workspaces-next + DEFAULT: ['Tab'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: ['Tab'] + + +org.pantheon.desktop.gala.keybindings.cycle-workspaces-previous + DEFAULT: ['Tab'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: ['Tab'] + + +org.pantheon.desktop.gala.keybindings.expose-all-windows + DEFAULT: ['a'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.expose-windows + DEFAULT: ['w'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.move-to-workspace-first + DEFAULT: ['Home'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.move-to-workspace-last + DEFAULT: ['End', '0'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.pip + DEFAULT: ['f'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.switch-input-source + DEFAULT: [''] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.switch-input-source-backward + DEFAULT: ['Space'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.switch-to-workspace-first + DEFAULT: ['Home'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.switch-to-workspace-last + DEFAULT: ['End', '0'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.zoom-in + DEFAULT: ['plus', 'KP_Add'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] + + +org.pantheon.desktop.gala.keybindings.zoom-out + DEFAULT: ['minus', 'KP_Subtract'] + + CHANGE TO: + UseDefaultValue: OFF + Custom Value: [] From edf8d14f096449c65c6749a40699fa3229d4774d Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Fri, 9 Oct 2020 14:03:53 +0900 Subject: [PATCH 428/534] Update README.md --- README.md | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/README.md b/README.md index de61234b6..097db1c63 100644 --- a/README.md +++ b/README.md @@ -54,3 +54,7 @@ $ cd src/Windows $ ../Unix/autogen.sh $ make ``` +### Recommended key bindings for gnome +https://github.com/kanjitalk755/macemu/blob/master/SheepShaver/doc/Linux/gnome_keybindings.txt + +(from https://github.com/kanjitalk755/macemu/issues/59) From 232efdaa8cbfd79aac5502aa79922c3914cbdf61 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 10 Oct 2020 15:07:12 +0900 Subject: [PATCH 429/534] change pref default (jit and ignoresegv) --- BasiliskII/src/Unix/prefs_unix.cpp | 6 ------ BasiliskII/src/Windows/prefs_windows.cpp | 6 ------ BasiliskII/src/prefs_items.cpp | 4 +++- SheepShaver/src/Windows/prefs_windows.cpp | 6 ------ SheepShaver/src/prefs_items.cpp | 2 +- 5 files changed, 4 insertions(+), 20 deletions(-) diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index d277a336c..4ca5fa284 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -34,9 +34,6 @@ prefs_desc platform_prefs_items[] = { {"fbdevicefile", TYPE_STRING, false, "path of frame buffer device specification file"}, {"dsp", TYPE_STRING, false, "audio output (dsp) device name"}, {"mixer", TYPE_STRING, false, "audio mixer device name"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, @@ -133,9 +130,6 @@ void AddPlatformPrefsDefaults(void) #else PrefsReplaceString("dsp", "/dev/dsp"); PrefsReplaceString("mixer", "/dev/mixer"); -#endif -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); #endif PrefsAddBool("idlewait", true); } diff --git a/BasiliskII/src/Windows/prefs_windows.cpp b/BasiliskII/src/Windows/prefs_windows.cpp index ed837b865..40af3e879 100755 --- a/BasiliskII/src/Windows/prefs_windows.cpp +++ b/BasiliskII/src/Windows/prefs_windows.cpp @@ -35,9 +35,6 @@ prefs_desc platform_prefs_items[] = { {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {"enableextfs", TYPE_BOOLEAN, false, "enable extfs system"}, {"debugextfs", TYPE_BOOLEAN, false, "debug extfs system"}, @@ -123,9 +120,6 @@ void AddPlatformPrefsDefaults(void) PrefsReplaceString("extdrives", "CDEFGHIJKLMNOPQRSTUVWXYZ"); PrefsReplaceInt32("mousewheelmode", 1); PrefsReplaceInt32("mousewheellines", 3); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif PrefsAddBool("idlewait", true); PrefsReplaceBool("etherpermanentaddress", true); PrefsReplaceInt32("ethermulticastmode", 0); diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 7ee0f670d..b54be7802 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -80,6 +80,7 @@ prefs_desc common_prefs_items[] = { {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, + {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, {NULL, TYPE_END, false, NULL} // End of list }; @@ -108,7 +109,7 @@ void AddPrefsDefaults(void) #if USE_JIT // JIT compiler specific options - PrefsAddBool("jit", true); +// PrefsAddBool("jit", true); PrefsAddBool("jitfpu", true); PrefsAddBool("jitdebug", false); PrefsAddInt32("jitcachesize", 8192); @@ -125,4 +126,5 @@ void AddPrefsDefaults(void) #else PrefsAddBool("swap_opt_cmd", true); #endif + PrefsAddBool("ignoresegv", true); } diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp index 3f83b045d..067b2aaca 100755 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ b/SheepShaver/src/Windows/prefs_windows.cpp @@ -36,9 +36,6 @@ prefs_desc platform_prefs_items[] = { {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, {"mousewheelmode", TYPE_INT32, false, "mouse wheel support mode (0=page up/down, 1=cursor up/down)"}, {"mousewheellines", TYPE_INT32, false, "number of lines to scroll in mouse wheel mode 1"}, -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, -#endif {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, {"keycodes", TYPE_BOOLEAN, false, "use keycodes rather than keysyms to decode keyboard"}, {"keycodefile", TYPE_STRING, false, "path of keycode translation file"}, @@ -131,9 +128,6 @@ void AddPlatformPrefsDefaults(void) PrefsReplaceInt32("mousewheellines", 3); PrefsAddInt32("windowmodes", 3); PrefsAddInt32("screenmodes", 0x3f); -#ifdef HAVE_SIGSEGV_SKIP_INSTRUCTION - PrefsAddBool("ignoresegv", false); -#endif PrefsAddBool("idlewait", true); PrefsReplaceBool("etherpermanentaddress", true); PrefsReplaceInt32("ethermulticastmode", 0); diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index b9587b28a..11581edd2 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -90,7 +90,7 @@ void AddPrefsDefaults(void) PrefsAddBool("nosound", false); PrefsAddBool("nogui", false); PrefsAddBool("noclipconversion", false); - PrefsAddBool("ignoresegv", false); + PrefsAddBool("ignoresegv", true); PrefsAddBool("ignoreillegal", false); #if USE_JIT From 73f194f422f0cf6363074eb1fde80d89bb401c3f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 16 Oct 2020 19:17:58 +0900 Subject: [PATCH 430/534] remove .travis.yml reduce warnings --- .travis.yml | 20 ---------------- .../BasiliskII.xcodeproj/project.pbxproj | 4 ++++ BasiliskII/src/uae_cpu/compiler/gencomp.c | 24 +++++++++---------- 3 files changed, 16 insertions(+), 32 deletions(-) delete mode 100644 .travis.yml diff --git a/.travis.yml b/.travis.yml deleted file mode 100644 index 27c17b7a2..000000000 --- a/.travis.yml +++ /dev/null @@ -1,20 +0,0 @@ -language: cpp - -matrix: - include: - - os: linux - dist: trusty - sudo: required - compiler: gcc - -addons: - apt: - packages: - - libsdl1.2-dev - - libgtk2.0-dev - -script: - - cd BasiliskII/src/Unix - - NO_CONFIGURE=1 ./autogen.sh - - ./configure --enable-sdl-video --enable-sdl-audio --disable-vosf --disable-jit-compiler --with-x --with-gtk --with-mon - - make -j 4 diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index fb25c8ba7..3194bf897 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1093,7 +1093,9 @@ ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = NO; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, @@ -1156,7 +1158,9 @@ ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = NO; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; + GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c index 14ad85a50..7055e5818 100644 --- a/BasiliskII/src/uae_cpu/compiler/gencomp.c +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -1359,7 +1359,7 @@ gen_opcode (unsigned long int opcode) case i_BCLR: case i_BSET: case i_BTST: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); start_brace(); @@ -1541,7 +1541,7 @@ gen_opcode (unsigned long int opcode) failure; break; case i_RTD: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); /* offs is constant */ comprintf("\tadd_l_ri(offs,4);\n"); @@ -1557,7 +1557,7 @@ gen_opcode (unsigned long int opcode) isjump; break; case i_LINK: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); comprintf("\tsub_l_ri(15,4);\n" @@ -1569,7 +1569,7 @@ gen_opcode (unsigned long int opcode) genastore ("src", curi->smode, "srcreg", sz_long, "src"); break; case i_UNLK: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); comprintf("\tmov_l_rr(15,src);\n" "\treadlong(15,src,scratchie);\n" @@ -1790,7 +1790,7 @@ gen_opcode (unsigned long int opcode) break; case i_Scc: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); start_brace (); comprintf ("\tint val = scratchie++;\n"); @@ -1837,7 +1837,7 @@ gen_opcode (unsigned long int opcode) failure; break; case i_MULU: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ comprintf("\tdont_care_flags();\n"); genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); @@ -1852,7 +1852,7 @@ gen_opcode (unsigned long int opcode) genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); break; case i_MULS: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ comprintf("\tdont_care_flags();\n"); genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); @@ -1886,7 +1886,7 @@ gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); if (curi->smode!=immi) { -/* failure; /* UNTESTED: NEW: from "Ipswitch Town" release */ +/* failure; UNTESTED: NEW: from "Ipswitch Town" release */ if (!noflags) { uses_cmov; start_brace(); @@ -2039,7 +2039,7 @@ gen_opcode (unsigned long int opcode) break; case i_ASL: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ mayfail; if (curi->smode==Dreg) { comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" @@ -2186,7 +2186,7 @@ gen_opcode (unsigned long int opcode) break; case i_LSR: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ mayfail; if (curi->smode==Dreg) { comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" @@ -2337,7 +2337,7 @@ gen_opcode (unsigned long int opcode) genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); if (curi->smode!=immi) { -/* failure; /* UNTESTED: NEW: from "Ipswitch Town" release */ +/* failure; UNTESTED: NEW: from "Ipswitch Town" release */ if (!noflags) { uses_cmov; start_brace(); @@ -2609,7 +2609,7 @@ gen_opcode (unsigned long int opcode) failure; break; case i_MULL: -/* failure; /* NEW: from "Ipswitch Town" release */ +/* failure; NEW: from "Ipswitch Town" release */ if (!noflags) { failure; break; From 1892cf0a7ead3be2e8945b9368d39be9db6dc15f Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 22 Oct 2020 15:44:37 -0700 Subject: [PATCH 431/534] remove errant return in audio component close handler --- BasiliskII/src/audio.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/audio.cpp b/BasiliskII/src/audio.cpp index fa861f283..f3543fc79 100644 --- a/BasiliskII/src/audio.cpp +++ b/BasiliskII/src/audio.cpp @@ -411,8 +411,8 @@ adat_error: printf("FATAL: audio component data block initialization error\n"); // Close Apple Mixer r.a[0] = AudioStatus.mixer; Execute68k(audio_data + adatCloseMixer, &r); + D(bug(" CloseMixer() returns %08lx, mixer %08lx\n", r.d[0], AudioStatus.mixer)); AudioStatus.mixer = 0; - return r.d[0]; } r.a[0] = audio_data; Execute68kTrap(0xa01f, &r); // DisposePtr() From a14362b18391e6a3e2e774a425f1c74c421f2ec0 Mon Sep 17 00:00:00 2001 From: rakslice Date: Sun, 25 Oct 2020 16:28:19 -0700 Subject: [PATCH 432/534] Windows: add a critical section for slirp calls to avoid unsafe use from multiple threads --- BasiliskII/src/Windows/ether_windows.cpp | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/Windows/ether_windows.cpp b/BasiliskII/src/Windows/ether_windows.cpp index 60a5e67be..aa40a8b8d 100755 --- a/BasiliskII/src/Windows/ether_windows.cpp +++ b/BasiliskII/src/Windows/ether_windows.cpp @@ -144,6 +144,8 @@ static LPPACKET send_queue = 0; static CRITICAL_SECTION wpool_csection; static LPPACKET write_packet_pool = 0; +// Calling slirp functions from multiple threads concurrently is unsafe; guard it +static CRITICAL_SECTION slirp_single_call_csection; // Try to deal with echos. Protected by fetch_csection. @@ -416,6 +418,8 @@ bool ether_init(void) InitializeCriticalSectionAndSpinCount( &send_csection, 5000 ); InitializeCriticalSectionAndSpinCount( &wpool_csection, 5000 ); + InitializeCriticalSection( &slirp_single_call_csection ); + ether_th = (HANDLE)_beginthreadex( 0, 0, ether_thread_feed_int, 0, 0, ðer_tid ); if (!ether_th) { D(bug("Failed to create ethernet thread\n")); @@ -565,6 +569,7 @@ void ether_exit(void) DeleteCriticalSection( &queue_csection ); DeleteCriticalSection( &send_csection ); DeleteCriticalSection( &wpool_csection ); + DeleteCriticalSection( &slirp_single_call_csection ); D(bug("Freeing read packets\n")); free_read_packets(); @@ -1018,7 +1023,9 @@ unsigned int WINAPI ether_thread_write_packets(void *arg) } break; case NET_IF_SLIRP: + EnterCriticalSection( &slirp_single_call_csection ); slirp_input((uint8 *)Packet->Buffer, Packet->Length); + LeaveCriticalSection( &slirp_single_call_csection ); Packet->bIoComplete = TRUE; recycle_write_packet(Packet); break; @@ -1372,7 +1379,9 @@ unsigned int WINAPI slirp_receive_func(void *arg) FD_ZERO(&rfds); FD_ZERO(&wfds); FD_ZERO(&xfds); + EnterCriticalSection( &slirp_single_call_csection ); timeout = slirp_select_fill(&nfds, &rfds, &wfds, &xfds); + LeaveCriticalSection( &slirp_single_call_csection ); #if ! USE_SLIRP_TIMEOUT timeout = 10000; #endif @@ -1388,8 +1397,11 @@ unsigned int WINAPI slirp_receive_func(void *arg) tv.tv_usec = timeout; ret = select(0, &rfds, &wfds, &xfds, &tv); } - if (ret >= 0) + if (ret >= 0) { + EnterCriticalSection( &slirp_single_call_csection ); slirp_select_poll(&rfds, &wfds, &xfds); + LeaveCriticalSection( &slirp_single_call_csection ); + } } D(bug("slirp_receive_func exit\n")); From 87d4660aa6ef772613cee6f6997070102d241db8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 28 Oct 2020 12:57:28 +0900 Subject: [PATCH 433/534] test for issue64 --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index cc51bd295..3aa369dab 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -263,11 +263,11 @@ void * vm_acquire(size_t size, int options) if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) return VM_MAP_FAILED; - +#if USE_JIT // Sanity checks for 64-bit platforms if (sizeof(void *) == 8 && (options & VM_MAP_32BIT) && !((char *)addr <= (char *)0xffffffff)) return VM_MAP_FAILED; - +#endif next_address = (char *)addr + size; #elif defined(HAVE_WIN32_VM) int alloc_type = MEM_RESERVE | MEM_COMMIT; From 6c20f2c4d9fab2d8f580d6d158550aad48053dd2 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 7 Nov 2020 11:52:24 +0900 Subject: [PATCH 434/534] fix for deadlock in timer --- SheepShaver/src/timer.cpp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/SheepShaver/src/timer.cpp b/SheepShaver/src/timer.cpp index 3edd6ca0d..f8a52ecc4 100644 --- a/SheepShaver/src/timer.cpp +++ b/SheepShaver/src/timer.cpp @@ -375,8 +375,8 @@ int16 RmvTime(uint32 tm) thread_suspend(timer_thread); #endif #if PRECISE_TIMING_POSIX - timer_thread_suspend(); pthread_mutex_lock(&wakeup_time_lock); + timer_thread_suspend(); #endif if (ReadMacInt16(tm + qType) & 0x8000) { @@ -492,8 +492,8 @@ int16 PrimeTime(uint32 tm, int32 time) thread_suspend(timer_thread); #endif #if PRECISE_TIMING_POSIX - timer_thread_suspend(); pthread_mutex_lock(&wakeup_time_lock); + timer_thread_suspend(); #endif WriteMacInt16(tm + qType, ReadMacInt16(tm + qType) | 0x8000); enqueue_tm(tm); @@ -647,8 +647,8 @@ void TimerInterrupt(void) thread_suspend(timer_thread); #endif #if PRECISE_TIMING_POSIX - timer_thread_suspend(); pthread_mutex_lock(&wakeup_time_lock); + timer_thread_suspend(); #endif wakeup_time = wakeup_time_max; for (TMDesc *d = tmDescList; d; d = d->next) From c044312b3c7a2812bfb4b5667fa56e00e1147372 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 12 Nov 2020 22:51:46 -0800 Subject: [PATCH 435/534] In vosf full screen update use chunk size based on pixel size (cherry picked from commit 108071e1a1ed9f43229fc81ca882fbb6c2de7eec) --- BasiliskII/src/CrossPlatform/video_vosf.h | 27 +++++++++++++++++++++-- 1 file changed, 25 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index f99b44bf5..fc26a3472 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -540,6 +540,27 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) #ifndef TEST_VOSF_PERFORMANCE #if REAL_ADDRESSING || DIRECT_ADDRESSING + +static uint32 get_chunk_size_for_depth(const uint32 mode, const uint32 n_pixels) { + assert(n_pixels % 8 == 0); + switch(mode) { + case APPLE_1_BIT: + return n_pixels / 8; + case APPLE_2_BIT: + return n_pixels / 4; + case APPLE_4_BIT: + return n_pixels / 2; + case APPLE_8_BIT: + return n_pixels; + case APPLE_16_BIT: + return n_pixels * 2; + case APPLE_32_BIT: + return n_pixels * 4; + default: + assert(false); + } +} + static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) { VIDEO_MODE_INIT; @@ -574,8 +595,10 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) const uint32 n_pixels = 64; const uint32 n_chunks = VIDEO_MODE_X / n_pixels; const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); - const uint32 src_chunk_size = src_bytes_per_row / n_chunks; - const uint32 dst_chunk_size = dst_bytes_per_row / n_chunks; + const uint32 src_chunk_size = get_chunk_size_for_depth(VIDEO_MODE_DEPTH, n_pixels); + const uint32 dst_chunk_size = get_chunk_size_for_depth(DepthModeForPixelDepth(VIDEO_DRV_DEPTH), n_pixels); + assert(src_chunk_size <= src_bytes_per_row); + assert(dst_chunk_size <= dst_bytes_per_row); const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); const uint32 dst_chunk_size_left = dst_bytes_per_row - (n_chunks * dst_chunk_size); From 85da18e38fb3595b940799d2b0108402c2744b87 Mon Sep 17 00:00:00 2001 From: rakslice Date: Fri, 13 Nov 2020 00:13:34 -0800 Subject: [PATCH 436/534] fix for misaligned rows in screen buffer in VOSF full screen mode when screen buffer has slack and source doesn't (cherry picked from commit cbca0b629f7b4fab0038a0d45c15a302c3216763) --- BasiliskII/src/CrossPlatform/video_vosf.h | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index fc26a3472..e72cad193 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -597,8 +597,8 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); const uint32 src_chunk_size = get_chunk_size_for_depth(VIDEO_MODE_DEPTH, n_pixels); const uint32 dst_chunk_size = get_chunk_size_for_depth(DepthModeForPixelDepth(VIDEO_DRV_DEPTH), n_pixels); - assert(src_chunk_size <= src_bytes_per_row); - assert(dst_chunk_size <= dst_bytes_per_row); + assert(src_chunk_size * n_chunks <= src_bytes_per_row); + assert(dst_chunk_size * n_chunks <= dst_bytes_per_row); const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); const uint32 dst_chunk_size_left = dst_bytes_per_row - (n_chunks * dst_chunk_size); @@ -666,8 +666,6 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left); Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size_left); } - i1 += src_chunk_size_left; - i2 += dst_chunk_size_left; #ifdef USE_SDL_VIDEO const int x = n_chunks * n_pixels; if (x < bb[bbi].x) { @@ -681,7 +679,8 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) bb[bbi].w = x + n_pixels_left - bb[bbi].x; #endif } - i2 += scr_bytes_left; + i1 += src_chunk_size_left; + i2 += dst_chunk_size_left + scr_bytes_left; #ifdef USE_SDL_VIDEO bb[bbi].h++; if (bb[bbi].w && (j == y1 || j == y2 - 1 || j == y2)) { From a897561c11406b0f2c758123ce1ba00e4a8b68d5 Mon Sep 17 00:00:00 2001 From: rakslice Date: Sun, 15 Nov 2020 12:53:54 -0800 Subject: [PATCH 437/534] remove duplicated function and fix BII --- BasiliskII/src/CrossPlatform/video_vosf.h | 24 ++--------------------- 1 file changed, 2 insertions(+), 22 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index e72cad193..f1d2f3add 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -541,26 +541,6 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) #ifndef TEST_VOSF_PERFORMANCE #if REAL_ADDRESSING || DIRECT_ADDRESSING -static uint32 get_chunk_size_for_depth(const uint32 mode, const uint32 n_pixels) { - assert(n_pixels % 8 == 0); - switch(mode) { - case APPLE_1_BIT: - return n_pixels / 8; - case APPLE_2_BIT: - return n_pixels / 4; - case APPLE_4_BIT: - return n_pixels / 2; - case APPLE_8_BIT: - return n_pixels; - case APPLE_16_BIT: - return n_pixels * 2; - case APPLE_32_BIT: - return n_pixels * 4; - default: - assert(false); - } -} - static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) { VIDEO_MODE_INIT; @@ -595,8 +575,8 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) const uint32 n_pixels = 64; const uint32 n_chunks = VIDEO_MODE_X / n_pixels; const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); - const uint32 src_chunk_size = get_chunk_size_for_depth(VIDEO_MODE_DEPTH, n_pixels); - const uint32 dst_chunk_size = get_chunk_size_for_depth(DepthModeForPixelDepth(VIDEO_DRV_DEPTH), n_pixels); + const uint32 src_chunk_size = TrivialBytesPerRow(n_pixels, VIDEO_MODE_DEPTH); + const uint32 dst_chunk_size = TrivialBytesPerRow(n_pixels, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); assert(src_chunk_size * n_chunks <= src_bytes_per_row); assert(dst_chunk_size * n_chunks <= dst_bytes_per_row); const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); From af8e91f446fa9e1b9e0f5c91fe556e0191549d3e Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Nov 2020 03:59:40 -0800 Subject: [PATCH 438/534] initialize vpPlaneBytes in GetVideoParameters response (cherry picked from commit bf128df83fee799d1b36f0968bd78980dd2ffdc2) --- SheepShaver/src/video.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index 330a7051f..66fecb8dc 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -879,6 +879,7 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) WriteMacInt16(vpb + vpVersion, 0); // Pixel Map version number WriteMacInt16(vpb + vpPackType, 0); WriteMacInt32(vpb + vpPackSize, 0); + WriteMacInt32(vpb + vpPlaneBytes, 0); WriteMacInt32(vpb + vpHRes, 0x00480000); // horiz res of the device (ppi) WriteMacInt32(vpb + vpVRes, 0x00480000); // vert res of the device (ppi) switch (VModes[i].viAppleMode) { From c8c1a7638198d5de4bee1be8cf0ed0002aa52936 Mon Sep 17 00:00:00 2001 From: rakslice Date: Mon, 16 Nov 2020 21:34:24 -0800 Subject: [PATCH 439/534] prevent truncating unaligned rows in non-vosf mode with 16 colors or less (cherry picked from commit 9d6124871be79f5c3028ebe3f5d1068dbcea0c84) --- BasiliskII/src/SDL/video_sdl2.cpp | 16 +++++++++++----- SheepShaver/src/include/video.h | 6 +++--- 2 files changed, 14 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 1b62dd251..f5132ee10 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2397,6 +2397,7 @@ static void update_display_static(driver_base *drv) const VIDEO_MODE &mode = drv->mode; int bytes_per_row = VIDEO_MODE_ROW_BYTES; uint8 *p, *p2; + uint32 x2_clipped, wide_clipped; // Check for first line from top and first line from bottom that have changed y1 = 0; @@ -2420,9 +2421,11 @@ static void update_display_static(driver_base *drv) if ((int)VIDEO_MODE_DEPTH < (int)VIDEO_DEPTH_8BIT) { const int src_bytes_per_row = bytes_per_row; const int dst_bytes_per_row = drv->s->pitch; - const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; + const int pixels_per_byte = 8/mac_depth_of_video_depth(VIDEO_MODE_DEPTH); - x1 = VIDEO_MODE_X / pixels_per_byte; + const uint32 line_len = TrivialBytesPerRow(VIDEO_MODE_X, VIDEO_MODE_DEPTH); + + x1 = line_len; for (uint32 j = y1; j <= y2; j++) { p = &the_buffer[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; @@ -2440,7 +2443,7 @@ static void update_display_static(driver_base *drv) p2 = &the_buffer_copy[j * bytes_per_row]; p += bytes_per_row; p2 += bytes_per_row; - for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { + for (uint32 i = line_len; i > x2; i--) { p--; p2--; if (*p != *p2) { x2 = i; @@ -2448,9 +2451,12 @@ static void update_display_static(driver_base *drv) } } } + x1 *= pixels_per_byte; x2 *= pixels_per_byte; - wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; + wide = x2 - x1; + x2_clipped = x2 > VIDEO_MODE_X? VIDEO_MODE_X : x2; + wide_clipped = x2_clipped - x1; // Update copy of the_buffer if (high && wide) { @@ -2474,7 +2480,7 @@ static void update_display_static(driver_base *drv) SDL_UnlockSurface(drv->s); // Refresh display - update_sdl_video(drv->s, x1, y1, wide, high); + update_sdl_video(drv->s, x1, y1, wide_clipped, high); } } else { diff --git a/SheepShaver/src/include/video.h b/SheepShaver/src/include/video.h index f3a30f044..53719dcd6 100644 --- a/SheepShaver/src/include/video.h +++ b/SheepShaver/src/include/video.h @@ -70,9 +70,9 @@ inline int DepthModeForPixelDepth(int depth) inline uint32 TrivialBytesPerRow(uint32 width, int mode) { switch (mode) { - case APPLE_1_BIT: return width / 8; - case APPLE_2_BIT: return width / 4; - case APPLE_4_BIT: return width / 2; + case APPLE_1_BIT: return (width + 7)/8; + case APPLE_2_BIT: return (width + 3)/4; + case APPLE_4_BIT: return (width + 1)/2; case APPLE_8_BIT: return width; case APPLE_16_BIT: return width * 2; case APPLE_32_BIT: return width * 4; From 6b4cc38de62d4cf7f63be2401c4cec41bb99574b Mon Sep 17 00:00:00 2001 From: rakslice Date: Mon, 16 Nov 2020 22:21:46 -0800 Subject: [PATCH 440/534] Corresponding header change for BII; cleanup (cherry picked from commit 36ccf8a46a72b6c970df04bd6ecc60efd0363476) --- BasiliskII/src/include/video.h | 8 ++++---- SheepShaver/src/include/video.h | 8 ++++---- 2 files changed, 8 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/include/video.h b/BasiliskII/src/include/video.h index fe4404ef7..23bba5e86 100644 --- a/BasiliskII/src/include/video.h +++ b/BasiliskII/src/include/video.h @@ -79,13 +79,13 @@ inline video_depth DepthModeForPixelDepth(int depth) // Returns the name of a video_depth, or an empty string if the depth is unknown const char * NameOfDepth(video_depth depth); -// Return a bytes-per-row value (assuming no padding) for the specified depth and pixel width +// Return a bytes-per-row value (assuming enough bytes to fit the bits but no further padding) for the specified depth and pixel width inline uint32 TrivialBytesPerRow(uint32 width, video_depth depth) { switch (depth) { - case VDEPTH_1BIT: return width / 8; - case VDEPTH_2BIT: return width / 4; - case VDEPTH_4BIT: return width / 2; + case VDEPTH_1BIT: return (width + 7) / 8; + case VDEPTH_2BIT: return (width + 3) / 4; + case VDEPTH_4BIT: return (width + 1) / 2; case VDEPTH_8BIT: return width; case VDEPTH_16BIT: return width * 2; case VDEPTH_32BIT: return width * 4; diff --git a/SheepShaver/src/include/video.h b/SheepShaver/src/include/video.h index 53719dcd6..790292ad7 100644 --- a/SheepShaver/src/include/video.h +++ b/SheepShaver/src/include/video.h @@ -66,13 +66,13 @@ inline int DepthModeForPixelDepth(int depth) } } -// Return a bytes-per-row value (assuming no padding) for the specified depth and pixel width +// Return a bytes-per-row value (assuming enough bytes to fit the bits but no further padding) for the specified depth and pixel width inline uint32 TrivialBytesPerRow(uint32 width, int mode) { switch (mode) { - case APPLE_1_BIT: return (width + 7)/8; - case APPLE_2_BIT: return (width + 3)/4; - case APPLE_4_BIT: return (width + 1)/2; + case APPLE_1_BIT: return (width + 7) / 8; + case APPLE_2_BIT: return (width + 3) / 4; + case APPLE_4_BIT: return (width + 1) / 2; case APPLE_8_BIT: return width; case APPLE_16_BIT: return width * 2; case APPLE_32_BIT: return width * 4; From c0ceb74931559a075e6925acdb4a26ea5c6086a7 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 10 Nov 2020 22:05:11 -0800 Subject: [PATCH 441/534] fix mouse warp destination coordinates; don't warp mouse cursor when it is not on the mac screen (cherry picked from commit aa92a09475b2a18f51d21f10f2acd4242205db6c) --- BasiliskII/src/SDL/video_sdl2.cpp | 44 ++++++++++++++++++++++++++++--- 1 file changed, 40 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index f5132ee10..68ef2aa29 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -1937,6 +1937,38 @@ int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) } #endif +static bool is_cursor_in_mac_screen() { + + int windowX, windowY; + int cursorX, cursorY; + int deltaX, deltaY; + bool out; + + // TODO figure out a check for full screen mode + if (display_type == DISPLAY_SCREEN) + return true; + + if (display_type == DISPLAY_WINDOW) { + + if (sdl_window == NULL || SDL_GetMouseFocus() != sdl_window) + return false; + + SDL_GetWindowPosition(sdl_window, &windowX, &windowY); + SDL_GetGlobalMouseState(&cursorX, &cursorY); + deltaX = cursorX - windowX; + deltaY = cursorY - windowY; + D(bug("cursor relative {%d,%d}\n", deltaX, deltaY)); + const VIDEO_MODE &mode = drv->mode; + const int m = get_mag_rate(); + out = deltaX >= 0 && deltaX < VIDEO_MODE_X * m && + deltaY >= 0 && deltaY < VIDEO_MODE_Y * m; + D(bug("cursor in window? %s\n", out? "yes" : "no")); + return out; + } + + return false; +} + void SDL_monitor_desc::switch_to_current_mode(void) { // Close and reopen display @@ -1992,10 +2024,14 @@ void video_set_cursor(void) if (move) { int visible = SDL_ShowCursor(-1); if (visible) { - int x, y; - SDL_GetMouseState(&x, &y); - printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); - SDL_WarpMouseGlobal(x, y); + bool cursor_in_window = is_cursor_in_mac_screen(); + + if (cursor_in_window) { + int x, y; + SDL_GetMouseState(&x, &y); + printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); + SDL_WarpMouseInWindow(sdl_window, x, y); + } } } } From 991496a4f4801c77dfb6273d560f76f5282ce0e9 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 12 Nov 2020 16:37:06 -0800 Subject: [PATCH 442/534] Make the video_sdl2 warpmouse output a debug message (cherry picked from commit 69574d53a9511b64092304f0969a31da4789051a) --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 68ef2aa29..ea90b8fe9 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2029,7 +2029,7 @@ void video_set_cursor(void) if (cursor_in_window) { int x, y; SDL_GetMouseState(&x, &y); - printf("WarpMouse to {%d,%d} via video_set_cursor\n", x, y); + D(bug("WarpMouse to {%d,%d} via video_set_cursor\n", x, y)); SDL_WarpMouseInWindow(sdl_window, x, y); } } From 0df082d4e14518c8d466efe7cdadd3c34ce4cefb Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 17 Nov 2020 04:41:32 -0800 Subject: [PATCH 443/534] add sdlrender pref for BII/Windows (cherry picked from commit 6d9018f5f401b13f1dea02a9368f201f49e66dbd) --- BasiliskII/src/Windows/prefs_windows.cpp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/BasiliskII/src/Windows/prefs_windows.cpp b/BasiliskII/src/Windows/prefs_windows.cpp index 40af3e879..d9d28821d 100755 --- a/BasiliskII/src/Windows/prefs_windows.cpp +++ b/BasiliskII/src/Windows/prefs_windows.cpp @@ -49,6 +49,9 @@ prefs_desc platform_prefs_items[] = { {"tcp_port", TYPE_STRING, false, "TCP ports list"}, {"portfile0", TYPE_STRING, false, "output file for serial port 0"}, {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, +#ifdef USE_SDL_VIDEO + {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, +#endif {NULL, TYPE_END, false, NULL} // End of list }; From cff2024c2e6687ec3c36bd410ec05c351db1dbbd Mon Sep 17 00:00:00 2001 From: rakslice Date: Mon, 9 Nov 2020 13:07:11 -0800 Subject: [PATCH 444/534] add sdlrender pref in SS windows (cherry picked from commit bec7de6e8fd4d67993b1e22ad6d3560608671790) --- SheepShaver/src/Windows/prefs_windows.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp index 067b2aaca..037ff248c 100755 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ b/SheepShaver/src/Windows/prefs_windows.cpp @@ -54,7 +54,9 @@ prefs_desc platform_prefs_items[] = { {"tcp_port", TYPE_STRING, false, "TCP ports list"}, {"portfile0", TYPE_STRING, false, "output file for serial port 0"}, {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, - +#ifdef USE_SDL_VIDEO + {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, +#endif {NULL, TYPE_END, false, NULL} // End of list }; From d7215df688a65702b839d13bdbc8649c432e1a0a Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 13:37:45 -0800 Subject: [PATCH 445/534] put back spacing --- SheepShaver/src/Windows/prefs_windows.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp index 037ff248c..0e9379e8e 100755 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ b/SheepShaver/src/Windows/prefs_windows.cpp @@ -57,6 +57,7 @@ prefs_desc platform_prefs_items[] = { #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, #endif + {NULL, TYPE_END, false, NULL} // End of list }; From a453ae105aff6436f3978f375fced0c7399b3030 Mon Sep 17 00:00:00 2001 From: rakslice Date: Sat, 14 Nov 2020 02:16:41 -0800 Subject: [PATCH 446/534] slirp: resolve .local suffix DNS requests using the host's name resolution (cherry picked from commit e2a6a4c1177e252bc38221c87bb99a599e8761a1) --- BasiliskII/src/slirp/socket.c | 286 ++++++++++++++++++++++++++++++++++ 1 file changed, 286 insertions(+) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index f3d10e538..afe72e9ab 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -14,6 +14,26 @@ #include #endif +#define DEBUG_HOST_RESOLVED_DNS 0 + +/** + * DNS requests for these domain suffixes will be + * looked up on the host to allow for host-supported DNS alternatives + * (e.g. MDNS, hosts file, etc.) + **/ +static const char * host_resolved_domain_suffixes[] = { + ".local.", + NULL // list ending +}; + +#define DOT_LOCAL_TTL 60 // In seconds. Keep this short as data is very dynamic and requerying is cheap + +#if DEBUG_HOST_RESOLVED_DNS +#define D(...) printf(__VA_ARGS__); fflush(stdout); +#else +#define D(...) +#endif + void so_init() { @@ -482,6 +502,270 @@ sorecvfrom(so) } /* if ping packet */ } + +struct DNS_HEADER +{ + unsigned short id; // identification number + + unsigned char rd :1; // recursion desired + unsigned char tc :1; // truncated message + unsigned char aa :1; // authoritive answer + unsigned char opcode :4; // purpose of message + unsigned char qr :1; // query/response flag + + unsigned char rcode :4; // response code + unsigned char cd :1; // checking disabled + unsigned char ad :1; // authenticated data + unsigned char z :1; // its z! reserved + unsigned char ra :1; // recursion available + + unsigned short q_count; // number of question entries + unsigned short ans_count; // number of answer entries + unsigned short auth_count; // number of authority entries + unsigned short add_count; // number of resource entries +}; + +struct QUESTION +{ + unsigned short qtype; + unsigned short qclass; +}; + +#pragma pack(push, 1) +struct R_DATA +{ + unsigned short type; + unsigned short _class; + unsigned int ttl; + unsigned short data_len; +}; +#pragma pack(pop) + +#define POP_STRUCT(vartype, varname, data, len) \ + assert(len >= sizeof(vartype)); \ + vartype varname; \ + memcpy(&varname, data, sizeof(vartype)); \ + data += sizeof(vartype); \ + len -= sizeof(vartype) + + +static void inject_udp_packet_to_guest(struct socket * so, struct sockaddr_in addr, caddr_t packet_data, int packet_len) { + struct mbuf *m; + int len; + + if (!(m = m_get())) return; + m->m_data += if_maxlinkhdr; + + len = M_FREEROOM(m); + + if (packet_len > len) { + packet_len = (m->m_data - m->m_dat) + m->m_len + packet_len + 1; + m_inc(m, packet_len); + len = M_FREEROOM(m); + } + + assert(len >= packet_len); + m->m_len = packet_len; + memcpy(m->m_data, packet_data, packet_len); + + udp_output(so, m, &addr); +} + +/* Decode hostname from the format used in DNS + e.g. "\009something\004else\003com" for "something.else.com." */ +static char * decode_dns_name(char * data) { + + int query_str_len = strlen(data); + char * decoded_name_str = malloc(query_str_len + 1); + if (decoded_name_str == NULL) { + D("decode_dns_name(): out of memory\n"); + return NULL; // oom + } + + char * decoded_name_str_pos = decoded_name_str; + while (*data != '\0') { + int part_len = *data++; + query_str_len--; + if (query_str_len < part_len) { + D("decode_dns_name(): part went off the end of the string\n"); + free(decoded_name_str); + return NULL; + } + memcpy(decoded_name_str_pos, data, part_len); + decoded_name_str_pos[part_len] = '.'; + decoded_name_str_pos += part_len + 1; + query_str_len -= part_len; + data += part_len; + } + *decoded_name_str_pos = '\0'; + return decoded_name_str; +} + +/** Take a look at a UDP DNS request the client has made and see if we want to resolve it internally. + * Returns TRUE if the request has been internally and can be dropped, + * FALSE otherwise + **/ +static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, caddr_t data, int len) { + BOOL drop_dns_request = FALSE; + + D("Checking outgoing DNS UDP packet\n"); + + if (len < sizeof(struct DNS_HEADER)) { + D("Packet too short for DNS header\n"); + return FALSE; + } + + const caddr_t packet = data; + const int packet_len = len; + + POP_STRUCT(struct DNS_HEADER, h, data, len); + + if (h.qr != 0) { + D("DNS packet is not a request\n"); + return FALSE; + } + + if (ntohs(h.q_count) == 0) { + D("DNS request has no queries\n"); + return FALSE; + } + + if (ntohs(h.q_count) > 1) { + D("DNS request has multiple queries (not supported)\n"); + return FALSE; + } + + if (ntohs(h.ans_count != 0) || ntohs(h.auth_count != 0) || ntohs(h.add_count != 0)) { + D("DNS request has unsupported extra contents\n"); + return FALSE; + } + + if (len == 0) { + D("Packet too short for DNS query string\n"); + return FALSE; + } + + char * original_query_str = data; + int query_str_len = strnlen(data, len); + if (query_str_len == len) { // went off end of packet + D("Unterminated DNS query string\n"); + return FALSE; + } + + char * decoded_name_str = decode_dns_name(original_query_str); + if (decoded_name_str == NULL) { + D("Error while decoding DNS query string"); + return FALSE; + } + + D("DNS host query for %s\n", decoded_name_str); + + data += query_str_len + 1; + len -= query_str_len + 1; + + POP_STRUCT(struct QUESTION, qinfo, data, len); + + if (ntohs(qinfo.qtype) != 1 || ntohs(qinfo.qclass) != 1) { + D("DNS host query for %s: Request isn't the supported type (INET A query)\n", decoded_name_str); + free(decoded_name_str); + return FALSE; + } + + D("DNS host query for %s: Request is eligible to check for host resolution suffix\n", decoded_name_str); + + const char * matched_suffix = NULL; + + for (const char ** suffix_ptr = host_resolved_domain_suffixes; *suffix_ptr != NULL; suffix_ptr++) { + const char * suffix = *suffix_ptr; + + int suffix_pos = strlen(decoded_name_str) - strlen(suffix); + if (suffix_pos > 0 && strcmp(decoded_name_str + suffix_pos, suffix) == 0) { + matched_suffix = suffix; + break; + } + } + + if (matched_suffix == NULL) { + D("DNS host query for %s: No suffix matched\n", decoded_name_str); + } else { + + D("DNS host query for %s: Suffix matched: %s\n", decoded_name_str, matched_suffix); + + // we are going to take this request and resolve it on the host + drop_dns_request = TRUE; + + D("DNS host query for %s: Doing lookup on host\n", decoded_name_str); + + int results_count = 0; + struct hostent * host_lookup_result = gethostbyname(decoded_name_str); + + if (host_lookup_result && host_lookup_result->h_addrtype == AF_INET) { + + D("DNS host query for %s: Host response has results for AF_INET\n", decoded_name_str); + + for (char ** addr_entry = host_lookup_result->h_addr_list; *addr_entry != NULL; addr_entry++) { + ++results_count; + } + } + + D("DNS host query for %s: result count %d\n", decoded_name_str, results_count); + + int original_query_str_size = strlen(original_query_str) + 1; + int response_size = packet_len + results_count * (original_query_str_size + sizeof(struct R_DATA) + sizeof(struct in_addr)); + + caddr_t response_packet = malloc(response_size); + if (response_packet == NULL) { + D("DNS host query for %s: Out of memory while allocating DNS response packet\n", decoded_name_str); + } else { + D("DNS host query for %s: Preparing DNS response\n", decoded_name_str); + + // use the request DNS header as our starting point for the response + h.qr = 1; + h.ans_count = htons(results_count); + memcpy(response_packet, &h, sizeof(struct DNS_HEADER)); + + // other sections verbatim out of the request + memcpy(response_packet + sizeof(struct DNS_HEADER), packet + sizeof(struct DNS_HEADER), packet_len - sizeof(struct DNS_HEADER)); + + int response_pos = packet_len; + + if (results_count > 0) { + for (char ** addr_entry = host_lookup_result->h_addr_list; *addr_entry != NULL; addr_entry++) { + // answer string is verbatim from question + memcpy(response_packet + response_pos, original_query_str, original_query_str_size); + + response_pos += original_query_str_size; + + struct R_DATA resource; + resource.type = htons(1); + resource._class = htons(1); + resource.ttl = htonl(DOT_LOCAL_TTL); + resource.data_len = htons(sizeof(struct in_addr)); + + memcpy(response_packet + response_pos, &resource, sizeof(struct R_DATA)); + response_pos += sizeof(struct R_DATA); + + struct in_addr * cur_addr = (struct in_addr *)*addr_entry; + memcpy(response_packet + response_pos, cur_addr, sizeof(struct in_addr)); + response_pos += sizeof(struct in_addr); + } + assert(response_pos == response_size); + } + + D("DNS host query for %s: Injecting DNS response directly to guest\n", decoded_name_str); + inject_udp_packet_to_guest(so, addr, response_packet, response_size); + + free(response_packet); + } + + } + + free(decoded_name_str); + + D("DNS host request drop: %s\n", drop_dns_request? "yes" : "no"); + return drop_dns_request; +} + /* * sendto() a socket */ @@ -503,6 +787,8 @@ sosendto(so, m) switch(ntohl(so->so_faddr.s_addr) & 0xff) { case CTL_DNS: addr.sin_addr = dns_addr; + if (resolve_dns_request(so, addr, m->m_data, m->m_len)) + return 0; break; case CTL_ALIAS: default: From a1ef6be18a6686df970fd7765d78d0d819e25476 Mon Sep 17 00:00:00 2001 From: rakslice Date: Sat, 14 Nov 2020 02:23:42 -0800 Subject: [PATCH 447/534] make locally resolved DNS domains configurable through host_domain pref (multi allowed); also match exact domain --- BasiliskII/src/include/prefs.h | 1 + BasiliskII/src/prefs.cpp | 5 ++ BasiliskII/src/prefs_items.cpp | 1 + BasiliskII/src/slirp/slirp.c | 3 + BasiliskII/src/slirp/slirp.h | 3 + BasiliskII/src/slirp/socket.c | 131 ++++++++++++++++++++++++++------ SheepShaver/src/prefs_items.cpp | 1 + 7 files changed, 121 insertions(+), 24 deletions(-) diff --git a/BasiliskII/src/include/prefs.h b/BasiliskII/src/include/prefs.h index 216137f2a..380f5590b 100644 --- a/BasiliskII/src/include/prefs.h +++ b/BasiliskII/src/include/prefs.h @@ -48,6 +48,7 @@ extern void PrefsReplaceBool(const char *name, bool b); extern void PrefsReplaceInt32(const char *name, int32 val); extern const char *PrefsFindString(const char *name, int index = 0); +extern "C" const char *PrefsFindStringC(const char *name, int index = 0); extern bool PrefsFindBool(const char *name); extern int32 PrefsFindInt32(const char *name); diff --git a/BasiliskII/src/prefs.cpp b/BasiliskII/src/prefs.cpp index 434992ce3..d6eb615d5 100644 --- a/BasiliskII/src/prefs.cpp +++ b/BasiliskII/src/prefs.cpp @@ -328,6 +328,11 @@ const char *PrefsFindString(const char *name, int index) return NULL; } +extern "C" const char *PrefsFindStringC(const char *name, int index) +{ + return PrefsFindString(name, index); +} + bool PrefsFindBool(const char *name) { prefs_node *p = find_node(name, TYPE_BOOLEAN, 0); diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index b54be7802..883c7a6e0 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -81,6 +81,7 @@ prefs_desc common_prefs_items[] = { {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, + {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index cd97e299d..4aad7ba45 100755 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -127,12 +127,15 @@ static int get_dns_addr(struct in_addr *pdns_addr) void slirp_cleanup(void) { WSACleanup(); + unload_host_domains(); } #endif int slirp_init(void) { // debug_init("/tmp/slirp.log", DEBUG_DEFAULT); + + load_host_domains(); #ifdef _WIN32 { diff --git a/BasiliskII/src/slirp/slirp.h b/BasiliskII/src/slirp/slirp.h index a677185eb..235c4c0e5 100755 --- a/BasiliskII/src/slirp/slirp.h +++ b/BasiliskII/src/slirp/slirp.h @@ -370,6 +370,9 @@ int tcp_emu _P((struct socket *, struct mbuf *)); int tcp_ctl _P((struct socket *)); struct tcpcb *tcp_drop(struct tcpcb *tp, int err); +void load_host_domains(); +void unload_host_domains(); + #ifdef USE_PPP #define MIN_MRU MINMRU #define MAX_MRU MAXMRU diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index afe72e9ab..37de14e38 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -13,6 +13,8 @@ #ifdef __sun__ #include #endif +#include +#include #define DEBUG_HOST_RESOLVED_DNS 0 @@ -21,12 +23,9 @@ * looked up on the host to allow for host-supported DNS alternatives * (e.g. MDNS, hosts file, etc.) **/ -static const char * host_resolved_domain_suffixes[] = { - ".local.", - NULL // list ending -}; +static const char ** host_resolved_domain_suffixes = NULL; -#define DOT_LOCAL_TTL 60 // In seconds. Keep this short as data is very dynamic and requerying is cheap +#define HOST_DOMAIN_TTL 60 // In seconds. #if DEBUG_HOST_RESOLVED_DNS #define D(...) printf(__VA_ARGS__); fflush(stdout); @@ -34,6 +33,81 @@ static const char * host_resolved_domain_suffixes[] = { #define D(...) #endif +const char *PrefsFindStringC(const char *name, int index); + +int prepare_host_domain_suffixes(char * buf) { + /** + * Set up the list of domain suffixes to match from the host_domain prefs. + * Call first with buf NULL to figure out the size of buffer needed. + **/ + int pos = 0; + const char ** host_resolved_domain_suffixes_pos = NULL; + + if (buf) { + D("Setting up slirp host domain suffixes for matching:\n"); + host_resolved_domain_suffixes_pos = (const char **) buf; + } + + // find out how many values there are + int host_domain_count = 0; + while (PrefsFindStringC("host_domain", host_domain_count) != NULL) { + host_domain_count ++; + } + + // leave space for the top array + pos += (host_domain_count + 1) * sizeof(const char *); + + const char *str; + int host_domain_num = 0; + while ((str = PrefsFindStringC("host_domain", host_domain_num++)) != NULL) { + if (str[0] == '\0') continue; + if (buf) { + const char * cur_entry = (const char *) (buf + pos); + *host_resolved_domain_suffixes_pos = cur_entry; + host_resolved_domain_suffixes_pos++; + } + + // this is a suffix to match so it must have a leading dot + if (str[0] != '.') { + if (buf) buf[pos] = '.'; + pos++; + } + if (buf) strcpy(buf + pos, str); + pos += strlen(str); + // domain to be checked will be FQDN so suffix must have a trailing dot + if (str[strlen(str) - 1] != '.') { + if (buf) buf[pos] = '.'; + pos++; + } + if (buf) { + buf[pos] = '\0'; + D(" %d. %s\n", host_domain_num, *(host_resolved_domain_suffixes_pos-1)); + } + pos++; + } + + // end of list marker + if (buf) *host_resolved_domain_suffixes_pos = NULL; + + return pos; +} + +void load_host_domains() { + const int size = prepare_host_domain_suffixes(NULL); + char * buf = malloc(size); + if (buf) { + prepare_host_domain_suffixes(buf); + host_resolved_domain_suffixes = (const char **) buf; + } +} + +void unload_host_domains() { + if (host_resolved_domain_suffixes) { + free((char *) host_resolved_domain_suffixes); + host_resolved_domain_suffixes = NULL; + } +} + void so_init() { @@ -602,17 +676,17 @@ static char * decode_dns_name(char * data) { } /** Take a look at a UDP DNS request the client has made and see if we want to resolve it internally. - * Returns TRUE if the request has been internally and can be dropped, - * FALSE otherwise + * Returns true if the request has been internally and can be dropped, + * false otherwise **/ -static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, caddr_t data, int len) { - BOOL drop_dns_request = FALSE; +static bool resolve_dns_request(struct socket * so, struct sockaddr_in addr, caddr_t data, int len) { + bool drop_dns_request = false; D("Checking outgoing DNS UDP packet\n"); if (len < sizeof(struct DNS_HEADER)) { D("Packet too short for DNS header\n"); - return FALSE; + return false; } const caddr_t packet = data; @@ -622,40 +696,40 @@ static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad if (h.qr != 0) { D("DNS packet is not a request\n"); - return FALSE; + return false; } if (ntohs(h.q_count) == 0) { D("DNS request has no queries\n"); - return FALSE; + return false; } if (ntohs(h.q_count) > 1) { D("DNS request has multiple queries (not supported)\n"); - return FALSE; + return false; } if (ntohs(h.ans_count != 0) || ntohs(h.auth_count != 0) || ntohs(h.add_count != 0)) { D("DNS request has unsupported extra contents\n"); - return FALSE; + return false; } if (len == 0) { D("Packet too short for DNS query string\n"); - return FALSE; + return false; } char * original_query_str = data; int query_str_len = strnlen(data, len); if (query_str_len == len) { // went off end of packet D("Unterminated DNS query string\n"); - return FALSE; + return false; } char * decoded_name_str = decode_dns_name(original_query_str); if (decoded_name_str == NULL) { D("Error while decoding DNS query string"); - return FALSE; + return false; } D("DNS host query for %s\n", decoded_name_str); @@ -665,10 +739,10 @@ static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad POP_STRUCT(struct QUESTION, qinfo, data, len); - if (ntohs(qinfo.qtype) != 1 || ntohs(qinfo.qclass) != 1) { + if (ntohs(qinfo.qtype) != 1 /* type A */ || ntohs(qinfo.qclass) != 1 /* class IN */ ) { D("DNS host query for %s: Request isn't the supported type (INET A query)\n", decoded_name_str); free(decoded_name_str); - return FALSE; + return false; } D("DNS host query for %s: Request is eligible to check for host resolution suffix\n", decoded_name_str); @@ -678,21 +752,28 @@ static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad for (const char ** suffix_ptr = host_resolved_domain_suffixes; *suffix_ptr != NULL; suffix_ptr++) { const char * suffix = *suffix_ptr; + // ends with suffix? int suffix_pos = strlen(decoded_name_str) - strlen(suffix); if (suffix_pos > 0 && strcmp(decoded_name_str + suffix_pos, suffix) == 0) { matched_suffix = suffix; break; } + + // also check if the domain exactly matched the one the suffix is for + if (strcmp(decoded_name_str, suffix + 1) == 0) { + matched_suffix = suffix; + break; + } } if (matched_suffix == NULL) { D("DNS host query for %s: No suffix matched\n", decoded_name_str); } else { - D("DNS host query for %s: Suffix matched: %s\n", decoded_name_str, matched_suffix); + D("DNS host query for %s: Matched for suffix: %s\n", decoded_name_str, matched_suffix); // we are going to take this request and resolve it on the host - drop_dns_request = TRUE; + drop_dns_request = true; D("DNS host query for %s: Doing lookup on host\n", decoded_name_str); @@ -739,7 +820,7 @@ static BOOL resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad struct R_DATA resource; resource.type = htons(1); resource._class = htons(1); - resource.ttl = htonl(DOT_LOCAL_TTL); + resource.ttl = htonl(HOST_DOMAIN_TTL); resource.data_len = htons(sizeof(struct in_addr)); memcpy(response_packet + response_pos, &resource, sizeof(struct R_DATA)); @@ -787,8 +868,10 @@ sosendto(so, m) switch(ntohl(so->so_faddr.s_addr) & 0xff) { case CTL_DNS: addr.sin_addr = dns_addr; - if (resolve_dns_request(so, addr, m->m_data, m->m_len)) - return 0; + if (host_resolved_domain_suffixes != NULL) { + if (resolve_dns_request(so, addr, m->m_data, m->m_len)) + return 0; + } break; case CTL_ALIAS: default: diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 11581edd2..f98424ec1 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -68,6 +68,7 @@ prefs_desc common_prefs_items[] = { {"mag_rate", TYPE_INT32, 0, "rate of magnification"}, {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, + {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {NULL, TYPE_END, false, NULL} // End of list }; From 5163e17f14f71a935b8822581662d1654597fcfe Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 15:43:10 -0800 Subject: [PATCH 448/534] ignore upper case in pref --- BasiliskII/src/slirp/socket.c | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 37de14e38..699fda6aa 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -72,8 +72,14 @@ int prepare_host_domain_suffixes(char * buf) { if (buf) buf[pos] = '.'; pos++; } - if (buf) strcpy(buf + pos, str); - pos += strlen(str); + if (buf) { + const char * str_pos = str; + while (*str_pos != '\0') { + buf[pos] = tolower(*str_pos); + ++pos; + ++str_pos; + } + }; // domain to be checked will be FQDN so suffix must have a trailing dot if (str[strlen(str) - 1] != '.') { if (buf) buf[pos] = '.'; From 6d74ff5600c4cea4a0961fcb2e51a0e8702ea413 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 15:54:10 -0800 Subject: [PATCH 449/534] fix calculated size --- BasiliskII/src/slirp/socket.c | 17 ++++++++--------- 1 file changed, 8 insertions(+), 9 deletions(-) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 699fda6aa..f6a6b6e8c 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -72,14 +72,12 @@ int prepare_host_domain_suffixes(char * buf) { if (buf) buf[pos] = '.'; pos++; } - if (buf) { - const char * str_pos = str; - while (*str_pos != '\0') { - buf[pos] = tolower(*str_pos); - ++pos; - ++str_pos; - } - }; + const char * str_pos = str; + while (*str_pos != '\0') { + if (buf) buf[pos] = tolower(*str_pos); + ++pos; + ++str_pos; + } // domain to be checked will be FQDN so suffix must have a trailing dot if (str[strlen(str) - 1] != '.') { if (buf) buf[pos] = '.'; @@ -102,7 +100,8 @@ void load_host_domains() { const int size = prepare_host_domain_suffixes(NULL); char * buf = malloc(size); if (buf) { - prepare_host_domain_suffixes(buf); + const int second_size = prepare_host_domain_suffixes(buf); + assert(size == second_size); host_resolved_domain_suffixes = (const char **) buf; } } From ff0a825356dea7cecf5b60787c79ec13291bc633 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 16:38:05 -0800 Subject: [PATCH 450/534] note about the source of the commented structs --- BasiliskII/src/slirp/socket.c | 2 ++ 1 file changed, 2 insertions(+) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index f6a6b6e8c..bf26604e1 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -581,6 +581,8 @@ sorecvfrom(so) } /* if ping packet */ } +// Commented structs from sil3rm00n's example code +// https://www.binarytides.com/dns-query-code-in-c-with-linux-sockets/ struct DNS_HEADER { From faeb5fa2e151840238fcb1805b64266071de3452 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 18:29:06 -0800 Subject: [PATCH 451/534] make sure response size assert applies in the empty response case; cleanup; add more comments --- BasiliskII/src/slirp/socket.c | 45 +++++++++++++++++++++++++---------- 1 file changed, 33 insertions(+), 12 deletions(-) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index bf26604e1..5647f536c 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -621,8 +621,11 @@ struct R_DATA unsigned short data_len; }; #pragma pack(pop) - -#define POP_STRUCT(vartype, varname, data, len) \ + +/** Create local variable varname of type vartype, + * fill it from the buffer data, observing its length len, + * and adjust data and len to reflect the remaining data */ +#define POP_DATA(vartype, varname, data, len) \ assert(len >= sizeof(vartype)); \ vartype varname; \ memcpy(&varname, data, sizeof(vartype)); \ @@ -630,9 +633,29 @@ struct R_DATA len -= sizeof(vartype) +/** Create local const char * varname pointing + * to the C string in the buffer data, observing its length len, + * and adjust data and len to reflect the remaining data */ +#define POP_STR(varname, data, len) \ + const char * varname; \ + { \ + int pop_str_len = strnlen(data, len); \ + if (pop_str_len == len) { \ + varname = NULL; \ + } else { \ + varname = data; \ + } \ + data += pop_str_len + 1; \ + len -= pop_str_len + 1; \ + } + + static void inject_udp_packet_to_guest(struct socket * so, struct sockaddr_in addr, caddr_t packet_data, int packet_len) { struct mbuf *m; int len; + + /** This is like sorecvfrom(), but just adds a packet with the + * supplied data instead of reading the packet to add from the socket */ if (!(m = m_get())) return; m->m_data += if_maxlinkhdr; @@ -654,7 +677,7 @@ static void inject_udp_packet_to_guest(struct socket * so, struct sockaddr_in ad /* Decode hostname from the format used in DNS e.g. "\009something\004else\003com" for "something.else.com." */ -static char * decode_dns_name(char * data) { +static char * decode_dns_name(const char * data) { int query_str_len = strlen(data); char * decoded_name_str = malloc(query_str_len + 1); @@ -699,7 +722,7 @@ static bool resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad const caddr_t packet = data; const int packet_len = len; - POP_STRUCT(struct DNS_HEADER, h, data, len); + POP_DATA(struct DNS_HEADER, h, data, len); if (h.qr != 0) { D("DNS packet is not a request\n"); @@ -726,9 +749,9 @@ static bool resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad return false; } - char * original_query_str = data; - int query_str_len = strnlen(data, len); - if (query_str_len == len) { // went off end of packet + POP_STR(original_query_str, data, len); + if (original_query_str == NULL) { + // went off end of packet D("Unterminated DNS query string\n"); return false; } @@ -741,10 +764,7 @@ static bool resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad D("DNS host query for %s\n", decoded_name_str); - data += query_str_len + 1; - len -= query_str_len + 1; - - POP_STRUCT(struct QUESTION, qinfo, data, len); + POP_DATA(struct QUESTION, qinfo, data, len); if (ntohs(qinfo.qtype) != 1 /* type A */ || ntohs(qinfo.qclass) != 1 /* class IN */ ) { D("DNS host query for %s: Request isn't the supported type (INET A query)\n", decoded_name_str); @@ -837,9 +857,10 @@ static bool resolve_dns_request(struct socket * so, struct sockaddr_in addr, cad memcpy(response_packet + response_pos, cur_addr, sizeof(struct in_addr)); response_pos += sizeof(struct in_addr); } - assert(response_pos == response_size); } + assert(response_pos == response_size); + D("DNS host query for %s: Injecting DNS response directly to guest\n", decoded_name_str); inject_udp_packet_to_guest(so, addr, response_packet, response_size); From 62081d50d1b2da8d2d8c21971e497d453e941ff1 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 19 Nov 2020 21:28:05 -0800 Subject: [PATCH 452/534] fix typo --- BasiliskII/src/slirp/socket.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index 5647f536c..dfa39b00f 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -581,7 +581,7 @@ sorecvfrom(so) } /* if ping packet */ } -// Commented structs from sil3rm00n's example code +// Commented structs from silv3rm00n's example code // https://www.binarytides.com/dns-query-code-in-c-with-linux-sockets/ struct DNS_HEADER From 0d213f9d000979d05922b877075423ad6400c06f Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 20 Nov 2020 18:46:45 +0900 Subject: [PATCH 453/534] avoid compile error in macOS --- BasiliskII/src/slirp/socket.c | 1 + 1 file changed, 1 insertion(+) diff --git a/BasiliskII/src/slirp/socket.c b/BasiliskII/src/slirp/socket.c index dfa39b00f..6968002ed 100755 --- a/BasiliskII/src/slirp/socket.c +++ b/BasiliskII/src/slirp/socket.c @@ -15,6 +15,7 @@ #endif #include #include +#include #define DEBUG_HOST_RESOLVED_DNS 0 From 6f6e9b8d827bb3bf985e544cd5d6551b66acc26e Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 23 Nov 2020 22:43:54 +0900 Subject: [PATCH 454/534] for avoid errors in Xcode12.2, the target arm64 was excluded --- .../MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 30b69bfb9..618917627 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1206,7 +1206,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; }; name = Debug; }; @@ -1245,7 +1245,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; }; name = Release; }; @@ -1332,7 +1332,7 @@ PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; WARNING_LDFLAGS = ""; }; name = Debug; @@ -1398,7 +1398,7 @@ PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; }; name = Release; }; From b6725730f5d44cade3b37755a1c88ce222d7a053 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Mon, 23 Nov 2020 22:47:18 +0900 Subject: [PATCH 455/534] for avoid errors in Xcode12.2, the target arm64 was excluded --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 3194bf897..8f24f6c4a 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1119,7 +1119,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; WARNING_CFLAGS = ""; }; name = Debug; @@ -1183,7 +1183,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = "x86_64 arm64"; + VALID_ARCHS = x86_64; WARNING_CFLAGS = ""; }; name = Release; From e00c6f20919e18b51b9bbbdad0a1eb0f131b0483 Mon Sep 17 00:00:00 2001 From: rakslice Date: Thu, 8 Oct 2020 21:53:41 -0700 Subject: [PATCH 456/534] ix86_instruction_skip: x86_64: handle address size prefix (cherry picked from commit 05b3236afd71886826d6e4784ca4e708f67aaa80) --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index d117366ea..3dabbc452 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -1018,6 +1018,16 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) transfer_size = SIZE_WORD; } +#if defined(__x86_64__) || defined(_M_X64) + bool x86_64_address_32 = false; + if (*eip == 0x67) { + eip++; + len++; + x86_64_address_32 = true; + } + // FIXME do something with this +#endif + // REX prefix #if defined(__x86_64__) || defined(_M_X64) struct rex_t { From 497b5bc5a9ffbf1e8a74ad808423be0223099920 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 20 Oct 2020 19:57:24 -0700 Subject: [PATCH 457/534] cleanup (cherry picked from commit 72a1513a360118b03b7c29be519125f7d5f7cc8e) --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 3dabbc452..2c6491f5c 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -1019,6 +1019,7 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) } #if defined(__x86_64__) || defined(_M_X64) + // Address size override bool x86_64_address_32 = false; if (*eip == 0x67) { eip++; From 85f8971d8d4fe5c8b3c3cd78550ab69e95600323 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 1 Dec 2020 19:55:45 -0800 Subject: [PATCH 458/534] remove x64 instruction skip 32-bit address flag we don't need to save for anything --- SheepShaver/src/CrossPlatform/sigsegv.cpp | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/SheepShaver/src/CrossPlatform/sigsegv.cpp b/SheepShaver/src/CrossPlatform/sigsegv.cpp index 2c6491f5c..70a43be2c 100644 --- a/SheepShaver/src/CrossPlatform/sigsegv.cpp +++ b/SheepShaver/src/CrossPlatform/sigsegv.cpp @@ -1020,13 +1020,11 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) #if defined(__x86_64__) || defined(_M_X64) // Address size override - bool x86_64_address_32 = false; if (*eip == 0x67) { + // 32-bit address eip++; len++; - x86_64_address_32 = true; } - // FIXME do something with this #endif // REX prefix From f198632834b25af86c9f99d7823b2bc683778ec4 Mon Sep 17 00:00:00 2001 From: rakslice Date: Tue, 1 Dec 2020 23:33:38 -0800 Subject: [PATCH 459/534] corresponding change for BII sigsegv.cpp --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index 73ca8330c..10a781713 100755 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -1018,6 +1018,15 @@ static bool ix86_skip_instruction(SIGSEGV_REGISTER_TYPE * regs) transfer_size = SIZE_WORD; } +#if defined(__x86_64__) || defined(_M_X64) + // Address size override + if (*eip == 0x67) { + // 32-bit address + eip++; + len++; + } +#endif + // REX prefix #if defined(__x86_64__) || defined(_M_X64) struct rex_t { From 436c5df15f0fa076c3e862a26b07a53fd0375a51 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 17 Dec 2020 22:25:48 +0900 Subject: [PATCH 460/534] fix CapsLock for linux --- BasiliskII/src/SDL/video_sdl2.cpp | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index ea90b8fe9..158728c17 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2347,13 +2347,13 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { -#ifdef WIN32 +#ifdef __MACOSX__ + ADBKeyDown(code); +#else if (code == 0x39) (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); else ADBKeyDown(code); -#else - ADBKeyDown(code); #endif if (code == 0x36) ctrl_down = true; @@ -2376,11 +2376,11 @@ static void handle_events(void) if (code == CODE_INVALID) code = event2keycode(event.key, false); if (code >= 0) { -#ifdef WIN32 +#ifdef __MACOSX__ + ADBKeyUp(code); +#else if (code != 0x39) ADBKeyUp(code); -#else - ADBKeyUp(code); #endif if (code == 0x36) ctrl_down = false; From eb9142ac14f22c2e3934df5f89658dd328136187 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 16:54:16 -0800 Subject: [PATCH 461/534] Fix crash on linux aarch64 --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 26 +++++++++++++++++++---- BasiliskII/src/CrossPlatform/vm_alloc.h | 2 ++ 2 files changed, 24 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 3aa369dab..e4f07d22c 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -83,6 +83,10 @@ typedef unsigned long vm_uintptr_t; #define MAP_ANONYMOUS 0 #endif +/* NOTE: on linux MAP_32BIT is only implemented on AMD64 + it is a null op on all other architectures + thus the MAP_BASE setting below is the only thing + ensuring low addresses on aarch64 for example */ #define MAP_EXTRA_FLAGS (MAP_32BIT) #ifdef HAVE_MMAP_VM @@ -91,6 +95,16 @@ typedef unsigned long vm_uintptr_t; don't get addresses above when the program is run on AMD64. NOTE: this is empirically determined on Linux/x86. */ #define MAP_BASE 0x10000000 +#elif DIRECT_ADDRESSING +/* linux does not implement any useful fallback behavior + such as allocating the next available address + and the first 4k-64k of address space is marked unavailable + for security reasons (see https://wiki.debian.org/mmap_min_addr) + so we must start requesting after the first page + or we get a high 64bit address that will crash direct addressing + + leaving NULL unmapped is a good idea anyway for debugging reasons */ +#define MAP_BASE 0x00010000 #else #define MAP_BASE 0x00000000 #endif @@ -263,11 +277,15 @@ void * vm_acquire(size_t size, int options) if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) return VM_MAP_FAILED; -#if USE_JIT - // Sanity checks for 64-bit platforms - if (sizeof(void *) == 8 && (options & VM_MAP_32BIT) && !((char *)addr <= (char *)0xffffffff)) - return VM_MAP_FAILED; + +#if DIRECT_ADDRESSING + // If MAP_32BIT and MAP_BASE fail to ensure + // a 32-bit address crash now instead of later. + // FIXME: make everything 64-bit clean and tear this all out. + if(sizeof(void *) > 4 && (options & VM_MAP_32BIT)) + assert((size_t)addr<0xffffffffL); #endif + next_address = (char *)addr + size; #elif defined(HAVE_WIN32_VM) int alloc_type = MEM_RESERVE | MEM_COMMIT; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.h b/BasiliskII/src/CrossPlatform/vm_alloc.h index bc5aba974..41dd949df 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.h +++ b/BasiliskII/src/CrossPlatform/vm_alloc.h @@ -36,6 +36,8 @@ extern "C" { } #endif +#include + /* Return value of `vm_acquire' in case of an error. */ #ifdef HAVE_MACH_VM #define VM_MAP_FAILED ((void *)-1) From cad8df587d074b6a8d09dc255ca8a6cd1c0a8a7b Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 17:26:27 -0800 Subject: [PATCH 462/534] Update config.guess and config.sub --- BasiliskII/src/Unix/config.guess | 1865 +++++++++++++---------- BasiliskII/src/Unix/config.sub | 2391 +++++++++++++++++------------- 2 files changed, 2465 insertions(+), 1791 deletions(-) diff --git a/BasiliskII/src/Unix/config.guess b/BasiliskII/src/Unix/config.guess index 78f6b92cd..699b3a10b 100755 --- a/BasiliskII/src/Unix/config.guess +++ b/BasiliskII/src/Unix/config.guess @@ -1,13 +1,12 @@ #! /bin/sh # Attempt to guess a canonical system name. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. +# Copyright 1992-2020 Free Software Foundation, Inc. -timestamp='2003-01-10' +timestamp='2020-11-19' # This file 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 +# the Free Software Foundation; either version 3 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but @@ -16,33 +15,31 @@ timestamp='2003-01-10' # 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. +# along with this program; if not, see . # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. - -# Originally written by Per Bothner . -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. +# the same distribution terms that you use for the rest of that +# program. This Exception is an additional permission under section 7 +# of the GNU General Public License, version 3 ("GPLv3"). +# +# Originally written by Per Bothner; maintained since 2000 by Ben Elliston. # -# This script attempts to guess a canonical system name similar to -# config.sub. If it succeeds, it prints the system name on stdout, and -# exits with 0. Otherwise, it exits with 1. +# You can get the latest version of this script from: +# https://git.savannah.gnu.org/cgit/config.git/plain/config.guess # -# The plan is that this can be called by configure scripts if you -# don't specify an explicit build system type. +# Please send patches to . + -me=`echo "$0" | sed -e 's,.*/,,'` +me=$(echo "$0" | sed -e 's,.*/,,') usage="\ Usage: $0 [OPTION] Output the configuration name of the system \`$me' is run on. -Operation modes: +Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit @@ -53,8 +50,7 @@ version="\ GNU config.guess ($timestamp) Originally written by Per Bothner. -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. +Copyright 1992-2020 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -66,11 +62,11 @@ Try \`$me --help' for more information." while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; + echo "$timestamp" ; exit ;; --version | -v ) - echo "$version" ; exit 0 ;; + echo "$version" ; exit ;; --help | --h* | -h ) - echo "$usage"; exit 0 ;; + echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. @@ -88,8 +84,6 @@ if test $# != 0; then exit 1 fi -trap 'exit 1' 1 2 15 - # CC_FOR_BUILD -- compiler used by this script. Note that the use of a # compiler to aid in system detection is discouraged as it requires # temporary files to be created and, as you can see below, it is a @@ -100,47 +94,92 @@ trap 'exit 1' 1 2 15 # Portable tmp directory creation inspired by the Autoconf team. -set_cc_for_build=' -trap "exitcode=\$?; (rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null) && exit \$exitcode" 0 ; -trap "rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null; exit 1" 1 2 13 15 ; -: ${TMPDIR=/tmp} ; - { tmp=`(umask 077 && mktemp -d -q "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || - { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir $tmp) ; } || - { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } ; -dummy=$tmp/dummy ; -tmpfiles="$dummy.c $dummy.o $dummy.rel $dummy" ; -case $CC_FOR_BUILD,$HOST_CC,$CC in - ,,) echo "int x;" > $dummy.c ; - for c in cc gcc c89 c99 ; do - if ($c -c -o $dummy.o $dummy.c) >/dev/null 2>&1 ; then - CC_FOR_BUILD="$c"; break ; - fi ; - done ; - if test x"$CC_FOR_BUILD" = x ; then - CC_FOR_BUILD=no_compiler_found ; - fi - ;; - ,,*) CC_FOR_BUILD=$CC ;; - ,*,*) CC_FOR_BUILD=$HOST_CC ;; -esac ;' +tmp= +# shellcheck disable=SC2172 +trap 'test -z "$tmp" || rm -fr "$tmp"' 0 1 2 13 15 + +set_cc_for_build() { + # prevent multiple calls if $tmp is already set + test "$tmp" && return 0 + : "${TMPDIR=/tmp}" + # shellcheck disable=SC2039 + { tmp=$( (umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null) && test -n "$tmp" && test -d "$tmp" ; } || + { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir "$tmp" 2>/dev/null) ; } || + { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir "$tmp" 2>/dev/null) && echo "Warning: creating insecure temp directory" >&2 ; } || + { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } + dummy=$tmp/dummy + case ${CC_FOR_BUILD-},${HOST_CC-},${CC-} in + ,,) echo "int x;" > "$dummy.c" + for driver in cc gcc c89 c99 ; do + if ($driver -c -o "$dummy.o" "$dummy.c") >/dev/null 2>&1 ; then + CC_FOR_BUILD="$driver" + break + fi + done + if test x"$CC_FOR_BUILD" = x ; then + CC_FOR_BUILD=no_compiler_found + fi + ;; + ,,*) CC_FOR_BUILD=$CC ;; + ,*,*) CC_FOR_BUILD=$HOST_CC ;; + esac +} # This is needed to find uname on a Pyramid OSx when run in the BSD universe. # (ghazi@noc.rutgers.edu 1994-08-24) -if (test -f /.attbin/uname) >/dev/null 2>&1 ; then +if test -f /.attbin/uname ; then PATH=$PATH:/.attbin ; export PATH fi -UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown -UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown -UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown -UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown +UNAME_MACHINE=$( (uname -m) 2>/dev/null) || UNAME_MACHINE=unknown +UNAME_RELEASE=$( (uname -r) 2>/dev/null) || UNAME_RELEASE=unknown +UNAME_SYSTEM=$( (uname -s) 2>/dev/null) || UNAME_SYSTEM=unknown +UNAME_VERSION=$( (uname -v) 2>/dev/null) || UNAME_VERSION=unknown + +case "$UNAME_SYSTEM" in +Linux|GNU|GNU/*) + LIBC=unknown + + set_cc_for_build + cat <<-EOF > "$dummy.c" + #include + #if defined(__UCLIBC__) + LIBC=uclibc + #elif defined(__dietlibc__) + LIBC=dietlibc + #elif defined(__GLIBC__) + LIBC=gnu + #else + #include + /* First heuristic to detect musl libc. */ + #ifdef __DEFINED_va_list + LIBC=musl + #endif + #endif + EOF + eval "$($CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g')" + + # Second heuristic to detect musl libc. + if [ "$LIBC" = unknown ] && + command -v ldd >/dev/null && + ldd --version 2>&1 | grep -q ^musl; then + LIBC=musl + fi + + # If the system lacks a compiler, then just pick glibc. + # We could probably try harder. + if [ "$LIBC" = unknown ]; then + LIBC=gnu + fi + ;; +esac # Note: order is significant - the case branches are not exclusive. -case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in +case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in *:NetBSD:*:*) # NetBSD (nbsd) targets should (where applicable) match one or - # more of the tupples: *-*-netbsdelf*, *-*-netbsdaout*, + # more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*, # *-*-netbsdecoff* and *-*-netbsd*. For targets that recently # switched to ELF, *-*-netbsd* would select the old # object file format. This provides both forward @@ -150,22 +189,34 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in # Note: NetBSD doesn't particularly care about the vendor # portion of the name. We always set it to "unknown". sysctl="sysctl -n hw.machine_arch" - UNAME_MACHINE_ARCH=`(/sbin/$sysctl 2>/dev/null || \ - /usr/sbin/$sysctl 2>/dev/null || echo unknown)` - case "${UNAME_MACHINE_ARCH}" in + UNAME_MACHINE_ARCH=$( (uname -p 2>/dev/null || \ + "/sbin/$sysctl" 2>/dev/null || \ + "/usr/sbin/$sysctl" 2>/dev/null || \ + echo unknown)) + case "$UNAME_MACHINE_ARCH" in + aarch64eb) machine=aarch64_be-unknown ;; armeb) machine=armeb-unknown ;; arm*) machine=arm-unknown ;; sh3el) machine=shl-unknown ;; sh3eb) machine=sh-unknown ;; - *) machine=${UNAME_MACHINE_ARCH}-unknown ;; + sh5el) machine=sh5le-unknown ;; + earmv*) + arch=$(echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,') + endian=$(echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p') + machine="${arch}${endian}"-unknown + ;; + *) machine="$UNAME_MACHINE_ARCH"-unknown ;; esac # The Operating System including object format, if it has switched - # to ELF recently, or will in the future. - case "${UNAME_MACHINE_ARCH}" in + # to ELF recently (or will in the future) and ABI. + case "$UNAME_MACHINE_ARCH" in + earm*) + os=netbsdelf + ;; arm*|i386|m68k|ns32k|sh3*|sparc|vax) - eval $set_cc_for_build + set_cc_for_build if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \ - | grep __ELF__ >/dev/null + | grep -q __ELF__ then # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout). # Return netbsd for either. FIX? @@ -175,7 +226,14 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in fi ;; *) - os=netbsd + os=netbsd + ;; + esac + # Determine ABI tags. + case "$UNAME_MACHINE_ARCH" in + earm*) + expr='s/^earmv[0-9]/-eabi/;s/eb$//' + abi=$(echo "$UNAME_MACHINE_ARCH" | sed -e "$expr") ;; esac # The OS release @@ -183,210 +241,223 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in # thus, need a distinct triplet. However, they do not need # kernel version information, so it can be replaced with a # suitable tag, in the style of linux-gnu. - case "${UNAME_VERSION}" in + case "$UNAME_VERSION" in Debian*) release='-gnu' ;; *) - release=`echo ${UNAME_RELEASE}|sed -e 's/[-_].*/\./'` + release=$(echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2) ;; esac # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: # contains redundant information, the shorter form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used. - echo "${machine}-${os}${release}" - exit 0 ;; - amiga:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - arc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - hp300:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mac68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - macppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme88k:OpenBSD:*:*) - echo m88k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvmeppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - pmax:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sgi:OpenBSD:*:*) - echo mipseb-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sun3:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - wgrisc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; + echo "$machine-${os}${release}${abi-}" + exit ;; + *:Bitrig:*:*) + UNAME_MACHINE_ARCH=$(arch | sed 's/Bitrig.//') + echo "$UNAME_MACHINE_ARCH"-unknown-bitrig"$UNAME_RELEASE" + exit ;; *:OpenBSD:*:*) - echo ${UNAME_MACHINE}-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - *:MicroBSD:*:*) - echo ${UNAME_MACHINE}-unknown-microbsd${UNAME_RELEASE} - exit 0 ;; + UNAME_MACHINE_ARCH=$(arch | sed 's/OpenBSD.//') + echo "$UNAME_MACHINE_ARCH"-unknown-openbsd"$UNAME_RELEASE" + exit ;; + *:LibertyBSD:*:*) + UNAME_MACHINE_ARCH=$(arch | sed 's/^.*BSD\.//') + echo "$UNAME_MACHINE_ARCH"-unknown-libertybsd"$UNAME_RELEASE" + exit ;; + *:MidnightBSD:*:*) + echo "$UNAME_MACHINE"-unknown-midnightbsd"$UNAME_RELEASE" + exit ;; + *:ekkoBSD:*:*) + echo "$UNAME_MACHINE"-unknown-ekkobsd"$UNAME_RELEASE" + exit ;; + *:SolidBSD:*:*) + echo "$UNAME_MACHINE"-unknown-solidbsd"$UNAME_RELEASE" + exit ;; + *:OS108:*:*) + echo "$UNAME_MACHINE"-unknown-os108_"$UNAME_RELEASE" + exit ;; + macppc:MirBSD:*:*) + echo powerpc-unknown-mirbsd"$UNAME_RELEASE" + exit ;; + *:MirBSD:*:*) + echo "$UNAME_MACHINE"-unknown-mirbsd"$UNAME_RELEASE" + exit ;; + *:Sortix:*:*) + echo "$UNAME_MACHINE"-unknown-sortix + exit ;; + *:Twizzler:*:*) + echo "$UNAME_MACHINE"-unknown-twizzler + exit ;; + *:Redox:*:*) + echo "$UNAME_MACHINE"-unknown-redox + exit ;; + mips:OSF1:*.*) + echo mips-dec-osf1 + exit ;; alpha:OSF1:*:*) - if test $UNAME_RELEASE = "V4.0"; then - UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` - fi + case $UNAME_RELEASE in + *4.0) + UNAME_RELEASE=$(/usr/sbin/sizer -v | awk '{print $3}') + ;; + *5.*) + UNAME_RELEASE=$(/usr/sbin/sizer -v | awk '{print $4}') + ;; + esac + # According to Compaq, /usr/sbin/psrinfo has been available on + # OSF/1 and Tru64 systems produced since 1995. I hope that + # covers most systems running today. This code pipes the CPU + # types through head -n 1, so we only detect the type of CPU 0. + ALPHA_CPU_TYPE=$(/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1) + case "$ALPHA_CPU_TYPE" in + "EV4 (21064)") + UNAME_MACHINE=alpha ;; + "EV4.5 (21064)") + UNAME_MACHINE=alpha ;; + "LCA4 (21066/21068)") + UNAME_MACHINE=alpha ;; + "EV5 (21164)") + UNAME_MACHINE=alphaev5 ;; + "EV5.6 (21164A)") + UNAME_MACHINE=alphaev56 ;; + "EV5.6 (21164PC)") + UNAME_MACHINE=alphapca56 ;; + "EV5.7 (21164PC)") + UNAME_MACHINE=alphapca57 ;; + "EV6 (21264)") + UNAME_MACHINE=alphaev6 ;; + "EV6.7 (21264A)") + UNAME_MACHINE=alphaev67 ;; + "EV6.8CB (21264C)") + UNAME_MACHINE=alphaev68 ;; + "EV6.8AL (21264B)") + UNAME_MACHINE=alphaev68 ;; + "EV6.8CX (21264D)") + UNAME_MACHINE=alphaev68 ;; + "EV6.9A (21264/EV69A)") + UNAME_MACHINE=alphaev69 ;; + "EV7 (21364)") + UNAME_MACHINE=alphaev7 ;; + "EV7.9 (21364A)") + UNAME_MACHINE=alphaev79 ;; + esac + # A Pn.n version is a patched version. # A Vn.n version is a released version. # A Tn.n version is a released field test version. # A Xn.n version is an unreleased experimental baselevel. # 1.2 uses "1.2" for uname -r. - eval $set_cc_for_build - cat <$dummy.s - .data -\$Lformat: - .byte 37,100,45,37,120,10,0 # "%d-%x\n" - - .text - .globl main - .align 4 - .ent main -main: - .frame \$30,16,\$26,0 - ldgp \$29,0(\$27) - .prologue 1 - .long 0x47e03d80 # implver \$0 - lda \$2,-1 - .long 0x47e20c21 # amask \$2,\$1 - lda \$16,\$Lformat - mov \$0,\$17 - not \$1,\$18 - jsr \$26,printf - ldgp \$29,0(\$26) - mov 0,\$16 - jsr \$26,exit - .end main -EOF - $CC_FOR_BUILD -o $dummy $dummy.s 2>/dev/null - if test "$?" = 0 ; then - case `$dummy` in - 0-0) - UNAME_MACHINE="alpha" - ;; - 1-0) - UNAME_MACHINE="alphaev5" - ;; - 1-1) - UNAME_MACHINE="alphaev56" - ;; - 1-101) - UNAME_MACHINE="alphapca56" - ;; - 2-303) - UNAME_MACHINE="alphaev6" - ;; - 2-307) - UNAME_MACHINE="alphaev67" - ;; - 2-1307) - UNAME_MACHINE="alphaev68" - ;; - 3-1307) - UNAME_MACHINE="alphaev7" - ;; - esac - fi - echo ${UNAME_MACHINE}-dec-osf`echo ${UNAME_RELEASE} | sed -e 's/^[VTX]//' | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - exit 0 ;; - Alpha\ *:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # Should we change UNAME_MACHINE based on the output of uname instead - # of the specific Alpha model? - echo alpha-pc-interix - exit 0 ;; - 21064:Windows_NT:50:3) - echo alpha-dec-winnt3.5 - exit 0 ;; + echo "$UNAME_MACHINE"-dec-osf"$(echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz)" + # Reset EXIT trap before exiting to avoid spurious non-zero exit code. + exitcode=$? + trap '' 0 + exit $exitcode ;; Amiga*:UNIX_System_V:4.0:*) echo m68k-unknown-sysv4 - exit 0;; + exit ;; *:[Aa]miga[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-amigaos - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-amigaos + exit ;; *:[Mm]orph[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-morphos - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-morphos + exit ;; *:OS/390:*:*) echo i370-ibm-openedition - exit 0 ;; + exit ;; + *:z/VM:*:*) + echo s390-ibm-zvmoe + exit ;; + *:OS400:*:*) + echo powerpc-ibm-os400 + exit ;; arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*) - echo arm-acorn-riscix${UNAME_RELEASE} - exit 0;; + echo arm-acorn-riscix"$UNAME_RELEASE" + exit ;; + arm*:riscos:*:*|arm*:RISCOS:*:*) + echo arm-unknown-riscos + exit ;; SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*) echo hppa1.1-hitachi-hiuxmpp - exit 0;; + exit ;; Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. - if test "`(/bin/universe) 2>/dev/null`" = att ; then + if test "$( (/bin/universe) 2>/dev/null)" = att ; then echo pyramid-pyramid-sysv3 else echo pyramid-pyramid-bsd fi - exit 0 ;; + exit ;; NILE*:*:*:dcosx) echo pyramid-pyramid-svr4 - exit 0 ;; - DRS?6000:UNIX_SV:4.2*:7*) - case `/usr/bin/uname -p` in - sparc) echo sparc-icl-nx7 && exit 0 ;; + exit ;; + DRS?6000:unix:4.0:6*) + echo sparc-icl-nx6 + exit ;; + DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*) + case $(/usr/bin/uname -p) in + sparc) echo sparc-icl-nx7; exit ;; esac ;; + s390x:SunOS:*:*) + echo "$UNAME_MACHINE"-ibm-solaris2"$(echo "$UNAME_RELEASE" | sed -e 's/[^.]*//')" + exit ;; sun4H:SunOS:5.*:*) - echo sparc-hal-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-hal-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" + exit ;; sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) - echo sparc-sun-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - i86pc:SunOS:5.*:*) - echo i386-pc-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-sun-solaris2"$(echo "$UNAME_RELEASE" | sed -e 's/[^.]*//')" + exit ;; + i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*) + echo i386-pc-auroraux"$UNAME_RELEASE" + exit ;; + i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*) + set_cc_for_build + SUN_ARCH=i386 + # If there is a compiler, see if it is configured for 64-bit objects. + # Note that the Sun cc does not turn __LP64__ into 1 like gcc does. + # This test works for both compilers. + if test "$CC_FOR_BUILD" != no_compiler_found; then + if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_64BIT_ARCH >/dev/null + then + SUN_ARCH=x86_64 + fi + fi + echo "$SUN_ARCH"-pc-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" + exit ;; sun4*:SunOS:6*:*) # According to config.sub, this is the proper way to canonicalize # SunOS6. Hard to guess exactly what SunOS6 will be like, but # it's likely to be more like Solaris than SunOS4. - echo sparc-sun-solaris3`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-sun-solaris3"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" + exit ;; sun4*:SunOS:*:*) - case "`/usr/bin/arch -k`" in + case "$(/usr/bin/arch -k)" in Series*|S4*) - UNAME_RELEASE=`uname -v` + UNAME_RELEASE=$(uname -v) ;; esac # Japanese Language versions have a version number like `4.1.3-JL'. - echo sparc-sun-sunos`echo ${UNAME_RELEASE}|sed -e 's/-/_/'` - exit 0 ;; + echo sparc-sun-sunos"$(echo "$UNAME_RELEASE"|sed -e 's/-/_/')" + exit ;; sun3*:SunOS:*:*) - echo m68k-sun-sunos${UNAME_RELEASE} - exit 0 ;; + echo m68k-sun-sunos"$UNAME_RELEASE" + exit ;; sun*:*:4.2BSD:*) - UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` - test "x${UNAME_RELEASE}" = "x" && UNAME_RELEASE=3 - case "`/bin/arch`" in + UNAME_RELEASE=$( (sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null) + test "x$UNAME_RELEASE" = x && UNAME_RELEASE=3 + case "$(/bin/arch)" in sun3) - echo m68k-sun-sunos${UNAME_RELEASE} + echo m68k-sun-sunos"$UNAME_RELEASE" ;; sun4) - echo sparc-sun-sunos${UNAME_RELEASE} + echo sparc-sun-sunos"$UNAME_RELEASE" ;; esac - exit 0 ;; + exit ;; aushp:SunOS:*:*) - echo sparc-auspex-sunos${UNAME_RELEASE} - exit 0 ;; + echo sparc-auspex-sunos"$UNAME_RELEASE" + exit ;; # The situation for MiNT is a little confusing. The machine name # can be virtually everything (everything which is not # "atarist" or "atariste" at least should have a processor @@ -396,41 +467,44 @@ EOF # MiNT. But MiNT is downward compatible to TOS, so this should # be no problem. atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*) - echo m68k-milan-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-milan-mint"$UNAME_RELEASE" + exit ;; hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*) - echo m68k-hades-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-hades-mint"$UNAME_RELEASE" + exit ;; *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*) - echo m68k-unknown-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-unknown-mint"$UNAME_RELEASE" + exit ;; + m68k:machten:*:*) + echo m68k-apple-machten"$UNAME_RELEASE" + exit ;; powerpc:machten:*:*) - echo powerpc-apple-machten${UNAME_RELEASE} - exit 0 ;; + echo powerpc-apple-machten"$UNAME_RELEASE" + exit ;; RISC*:Mach:*:*) echo mips-dec-mach_bsd4.3 - exit 0 ;; + exit ;; RISC*:ULTRIX:*:*) - echo mips-dec-ultrix${UNAME_RELEASE} - exit 0 ;; + echo mips-dec-ultrix"$UNAME_RELEASE" + exit ;; VAX*:ULTRIX*:*:*) - echo vax-dec-ultrix${UNAME_RELEASE} - exit 0 ;; + echo vax-dec-ultrix"$UNAME_RELEASE" + exit ;; 2020:CLIX:*:* | 2430:CLIX:*:*) - echo clipper-intergraph-clix${UNAME_RELEASE} - exit 0 ;; + echo clipper-intergraph-clix"$UNAME_RELEASE" + exit ;; mips:*:*:UMIPS | mips:*:*:RISCos) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #ifdef __cplusplus #include /* for printf() prototype */ int main (int argc, char *argv[]) { @@ -439,94 +513,95 @@ EOF #endif #if defined (host_mips) && defined (MIPSEB) #if defined (SYSTYPE_SYSV) - printf ("mips-mips-riscos%ssysv\n", argv[1]); exit (0); + printf ("mips-mips-riscos%ssysv\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_SVR4) - printf ("mips-mips-riscos%ssvr4\n", argv[1]); exit (0); + printf ("mips-mips-riscos%ssvr4\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD) - printf ("mips-mips-riscos%sbsd\n", argv[1]); exit (0); + printf ("mips-mips-riscos%sbsd\\n", argv[1]); exit (0); #endif #endif exit (-1); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c \ - && $dummy `echo "${UNAME_RELEASE}" | sed -n 's/\([0-9]*\).*/\1/p'` \ - && exit 0 - echo mips-mips-riscos${UNAME_RELEASE} - exit 0 ;; + $CC_FOR_BUILD -o "$dummy" "$dummy.c" && + dummyarg=$(echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p') && + SYSTEM_NAME=$("$dummy" "$dummyarg") && + { echo "$SYSTEM_NAME"; exit; } + echo mips-mips-riscos"$UNAME_RELEASE" + exit ;; Motorola:PowerMAX_OS:*:*) echo powerpc-motorola-powermax - exit 0 ;; + exit ;; Motorola:*:4.3:PL8-*) echo powerpc-harris-powermax - exit 0 ;; + exit ;; Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*) echo powerpc-harris-powermax - exit 0 ;; + exit ;; Night_Hawk:Power_UNIX:*:*) echo powerpc-harris-powerunix - exit 0 ;; + exit ;; m88k:CX/UX:7*:*) echo m88k-harris-cxux7 - exit 0 ;; + exit ;; m88k:*:4*:R4*) echo m88k-motorola-sysv4 - exit 0 ;; + exit ;; m88k:*:3*:R3*) echo m88k-motorola-sysv3 - exit 0 ;; + exit ;; AViiON:dgux:*:*) - # DG/UX returns AViiON for all architectures - UNAME_PROCESSOR=`/usr/bin/uname -p` - if [ $UNAME_PROCESSOR = mc88100 ] || [ $UNAME_PROCESSOR = mc88110 ] + # DG/UX returns AViiON for all architectures + UNAME_PROCESSOR=$(/usr/bin/uname -p) + if test "$UNAME_PROCESSOR" = mc88100 || test "$UNAME_PROCESSOR" = mc88110 then - if [ ${TARGET_BINARY_INTERFACE}x = m88kdguxelfx ] || \ - [ ${TARGET_BINARY_INTERFACE}x = x ] + if test "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx || \ + test "$TARGET_BINARY_INTERFACE"x = x then - echo m88k-dg-dgux${UNAME_RELEASE} + echo m88k-dg-dgux"$UNAME_RELEASE" else - echo m88k-dg-dguxbcs${UNAME_RELEASE} + echo m88k-dg-dguxbcs"$UNAME_RELEASE" fi else - echo i586-dg-dgux${UNAME_RELEASE} + echo i586-dg-dgux"$UNAME_RELEASE" fi - exit 0 ;; + exit ;; M88*:DolphinOS:*:*) # DolphinOS (SVR3) echo m88k-dolphin-sysv3 - exit 0 ;; + exit ;; M88*:*:R3*:*) # Delta 88k system running SVR3 echo m88k-motorola-sysv3 - exit 0 ;; + exit ;; XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3) echo m88k-tektronix-sysv3 - exit 0 ;; + exit ;; Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD) echo m68k-tektronix-bsd - exit 0 ;; + exit ;; *:IRIX*:*:*) - echo mips-sgi-irix`echo ${UNAME_RELEASE}|sed -e 's/-/_/g'` - exit 0 ;; + echo mips-sgi-irix"$(echo "$UNAME_RELEASE"|sed -e 's/-/_/g')" + exit ;; ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. - echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id - exit 0 ;; # Note that: echo "'`uname -s`'" gives 'AIX ' + echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id + exit ;; # Note that: echo "'$(uname -s)'" gives 'AIX ' i*86:AIX:*:*) echo i386-ibm-aix - exit 0 ;; + exit ;; ia64:AIX:*:*) - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` + if test -x /usr/bin/oslevel ; then + IBM_REV=$(/usr/bin/oslevel) else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} + IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi - echo ${UNAME_MACHINE}-ibm-aix${IBM_REV} - exit 0 ;; + echo "$UNAME_MACHINE"-ibm-aix"$IBM_REV" + exit ;; *:AIX:2:3) if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #include main() @@ -537,128 +612,143 @@ EOF exit(0); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 - echo rs6000-ibm-aix3.2.5 + if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=$("$dummy") + then + echo "$SYSTEM_NAME" + else + echo rs6000-ibm-aix3.2.5 + fi elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then echo rs6000-ibm-aix3.2.4 else echo rs6000-ibm-aix3.2 fi - exit 0 ;; - *:AIX:*:[45]) - IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` - if /usr/sbin/lsattr -El ${IBM_CPU_ID} | grep ' POWER' >/dev/null 2>&1; then + exit ;; + *:AIX:*:[4567]) + IBM_CPU_ID=$(/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }') + if /usr/sbin/lsattr -El "$IBM_CPU_ID" | grep ' POWER' >/dev/null 2>&1; then IBM_ARCH=rs6000 else IBM_ARCH=powerpc fi - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` + if test -x /usr/bin/lslpp ; then + IBM_REV=$(/usr/bin/lslpp -Lqc bos.rte.libc | + awk -F: '{ print $3 }' | sed s/[0-9]*$/0/) else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} + IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi - echo ${IBM_ARCH}-ibm-aix${IBM_REV} - exit 0 ;; + echo "$IBM_ARCH"-ibm-aix"$IBM_REV" + exit ;; *:AIX:*:*) echo rs6000-ibm-aix - exit 0 ;; - ibmrt:4.4BSD:*|romp-ibm:BSD:*) + exit ;; + ibmrt:4.4BSD:*|romp-ibm:4.4BSD:*) echo romp-ibm-bsd4.4 - exit 0 ;; + exit ;; ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and - echo romp-ibm-bsd${UNAME_RELEASE} # 4.3 with uname added to - exit 0 ;; # report: romp-ibm BSD 4.3 + echo romp-ibm-bsd"$UNAME_RELEASE" # 4.3 with uname added to + exit ;; # report: romp-ibm BSD 4.3 *:BOSX:*:*) echo rs6000-bull-bosx - exit 0 ;; + exit ;; DPX/2?00:B.O.S.:*:*) echo m68k-bull-sysv3 - exit 0 ;; + exit ;; 9000/[34]??:4.3bsd:1.*:*) echo m68k-hp-bsd - exit 0 ;; + exit ;; hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*) echo m68k-hp-bsd4.4 - exit 0 ;; + exit ;; 9000/[34678]??:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - case "${UNAME_MACHINE}" in - 9000/31? ) HP_ARCH=m68000 ;; - 9000/[34]?? ) HP_ARCH=m68k ;; + HPUX_REV=$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//') + case "$UNAME_MACHINE" in + 9000/31?) HP_ARCH=m68000 ;; + 9000/[34]??) HP_ARCH=m68k ;; 9000/[678][0-9][0-9]) - if [ -x /usr/bin/getconf ]; then - sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` - sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` - case "${sc_cpu_version}" in - 523) HP_ARCH="hppa1.0" ;; # CPU_PA_RISC1_0 - 528) HP_ARCH="hppa1.1" ;; # CPU_PA_RISC1_1 - 532) # CPU_PA_RISC2_0 - case "${sc_kernel_bits}" in - 32) HP_ARCH="hppa2.0n" ;; - 64) HP_ARCH="hppa2.0w" ;; - '') HP_ARCH="hppa2.0" ;; # HP-UX 10.20 - esac ;; - esac + if test -x /usr/bin/getconf; then + sc_cpu_version=$(/usr/bin/getconf SC_CPU_VERSION 2>/dev/null) + sc_kernel_bits=$(/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null) + case "$sc_cpu_version" in + 523) HP_ARCH=hppa1.0 ;; # CPU_PA_RISC1_0 + 528) HP_ARCH=hppa1.1 ;; # CPU_PA_RISC1_1 + 532) # CPU_PA_RISC2_0 + case "$sc_kernel_bits" in + 32) HP_ARCH=hppa2.0n ;; + 64) HP_ARCH=hppa2.0w ;; + '') HP_ARCH=hppa2.0 ;; # HP-UX 10.20 + esac ;; + esac fi - if [ "${HP_ARCH}" = "" ]; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + if test "$HP_ARCH" = ""; then + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" - #define _HPUX_SOURCE - #include - #include + #define _HPUX_SOURCE + #include + #include - int main () - { - #if defined(_SC_KERNEL_BITS) - long bits = sysconf(_SC_KERNEL_BITS); - #endif - long cpu = sysconf (_SC_CPU_VERSION); + int main () + { + #if defined(_SC_KERNEL_BITS) + long bits = sysconf(_SC_KERNEL_BITS); + #endif + long cpu = sysconf (_SC_CPU_VERSION); - switch (cpu) - { - case CPU_PA_RISC1_0: puts ("hppa1.0"); break; - case CPU_PA_RISC1_1: puts ("hppa1.1"); break; - case CPU_PA_RISC2_0: - #if defined(_SC_KERNEL_BITS) - switch (bits) - { - case 64: puts ("hppa2.0w"); break; - case 32: puts ("hppa2.0n"); break; - default: puts ("hppa2.0"); break; - } break; - #else /* !defined(_SC_KERNEL_BITS) */ - puts ("hppa2.0"); break; - #endif - default: puts ("hppa1.0"); break; - } - exit (0); - } + switch (cpu) + { + case CPU_PA_RISC1_0: puts ("hppa1.0"); break; + case CPU_PA_RISC1_1: puts ("hppa1.1"); break; + case CPU_PA_RISC2_0: + #if defined(_SC_KERNEL_BITS) + switch (bits) + { + case 64: puts ("hppa2.0w"); break; + case 32: puts ("hppa2.0n"); break; + default: puts ("hppa2.0"); break; + } break; + #else /* !defined(_SC_KERNEL_BITS) */ + puts ("hppa2.0"); break; + #endif + default: puts ("hppa1.0"); break; + } + exit (0); + } EOF - (CCOPTS= $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null) && HP_ARCH=`$dummy` + (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=$("$dummy") test -z "$HP_ARCH" && HP_ARCH=hppa fi ;; esac - if [ ${HP_ARCH} = "hppa2.0w" ] + if test "$HP_ARCH" = hppa2.0w then - # avoid double evaluation of $set_cc_for_build - test -n "$CC_FOR_BUILD" || eval $set_cc_for_build - if echo __LP64__ | (CCOPTS= $CC_FOR_BUILD -E -) | grep __LP64__ >/dev/null + set_cc_for_build + + # hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating + # 32-bit code. hppa64-hp-hpux* has the same kernel and a compiler + # generating 64-bit code. GNU and HP use different nomenclature: + # + # $ CC_FOR_BUILD=cc ./config.guess + # => hppa2.0w-hp-hpux11.23 + # $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess + # => hppa64-hp-hpux11.23 + + if echo __LP64__ | (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | + grep -q __LP64__ then - HP_ARCH="hppa2.0w" + HP_ARCH=hppa2.0w else - HP_ARCH="hppa64" + HP_ARCH=hppa64 fi fi - echo ${HP_ARCH}-hp-hpux${HPUX_REV} - exit 0 ;; + echo "$HP_ARCH"-hp-hpux"$HPUX_REV" + exit ;; ia64:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - echo ia64-hp-hpux${HPUX_REV} - exit 0 ;; + HPUX_REV=$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//') + echo ia64-hp-hpux"$HPUX_REV" + exit ;; 3050*:HI-UX:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #include int main () @@ -683,334 +773,411 @@ EOF exit (0); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 + $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=$("$dummy") && + { echo "$SYSTEM_NAME"; exit; } echo unknown-hitachi-hiuxwe2 - exit 0 ;; - 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:* ) + exit ;; + 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:*) echo hppa1.1-hp-bsd - exit 0 ;; + exit ;; 9000/8??:4.3bsd:*:*) echo hppa1.0-hp-bsd - exit 0 ;; + exit ;; *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*) echo hppa1.0-hp-mpeix - exit 0 ;; - hp7??:OSF1:*:* | hp8?[79]:OSF1:*:* ) + exit ;; + hp7??:OSF1:*:* | hp8?[79]:OSF1:*:*) echo hppa1.1-hp-osf - exit 0 ;; + exit ;; hp8??:OSF1:*:*) echo hppa1.0-hp-osf - exit 0 ;; + exit ;; i*86:OSF1:*:*) - if [ -x /usr/sbin/sysversion ] ; then - echo ${UNAME_MACHINE}-unknown-osf1mk + if test -x /usr/sbin/sysversion ; then + echo "$UNAME_MACHINE"-unknown-osf1mk else - echo ${UNAME_MACHINE}-unknown-osf1 + echo "$UNAME_MACHINE"-unknown-osf1 fi - exit 0 ;; + exit ;; parisc*:Lites*:*:*) echo hppa1.1-hp-lites - exit 0 ;; + exit ;; C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*) echo c1-convex-bsd - exit 0 ;; + exit ;; C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*) if getsysinfo -f scalar_acc then echo c32-convex-bsd else echo c2-convex-bsd fi - exit 0 ;; + exit ;; C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*) echo c34-convex-bsd - exit 0 ;; + exit ;; C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*) echo c38-convex-bsd - exit 0 ;; + exit ;; C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*) echo c4-convex-bsd - exit 0 ;; + exit ;; CRAY*Y-MP:*:*:*) - echo ymp-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo ymp-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*[A-Z]90:*:*:*) - echo ${UNAME_MACHINE}-cray-unicos${UNAME_RELEASE} \ + echo "$UNAME_MACHINE"-cray-unicos"$UNAME_RELEASE" \ | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \ -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \ -e 's/\.[^.]*$/.X/' - exit 0 ;; + exit ;; CRAY*TS:*:*:*) - echo t90-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo t90-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*T3E:*:*:*) - echo alphaev5-cray-unicosmk${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo alphaev5-cray-unicosmk"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*SV1:*:*:*) - echo sv1-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo sv1-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; *:UNICOS/mp:*:*) - echo nv1-cray-unicosmp${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo craynv-cray-unicosmp"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) - FUJITSU_PROC=`uname -m | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'` - FUJITSU_REL=`echo ${UNAME_RELEASE} | sed -e 's/ /_/'` - echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" - exit 0 ;; + FUJITSU_PROC=$(uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz) + FUJITSU_SYS=$(uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///') + FUJITSU_REL=$(echo "$UNAME_RELEASE" | sed -e 's/ /_/') + echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" + exit ;; + 5000:UNIX_System_V:4.*:*) + FUJITSU_SYS=$(uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///') + FUJITSU_REL=$(echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/') + echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" + exit ;; i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) - echo ${UNAME_MACHINE}-pc-bsdi${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-pc-bsdi"$UNAME_RELEASE" + exit ;; sparc*:BSD/OS:*:*) - echo sparc-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; + echo sparc-unknown-bsdi"$UNAME_RELEASE" + exit ;; *:BSD/OS:*:*) - echo ${UNAME_MACHINE}-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-bsdi"$UNAME_RELEASE" + exit ;; + arm:FreeBSD:*:*) + UNAME_PROCESSOR=$(uname -p) + set_cc_for_build + if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_PCS_VFP + then + echo "${UNAME_PROCESSOR}"-unknown-freebsd"$(echo ${UNAME_RELEASE}|sed -e 's/[-(].*//')"-gnueabi + else + echo "${UNAME_PROCESSOR}"-unknown-freebsd"$(echo ${UNAME_RELEASE}|sed -e 's/[-(].*//')"-gnueabihf + fi + exit ;; *:FreeBSD:*:*) - # Determine whether the default compiler uses glibc. - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #if __GLIBC__ >= 2 - LIBC=gnu - #else - LIBC= - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - echo ${UNAME_MACHINE}-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`${LIBC:+-$LIBC} - exit 0 ;; + UNAME_PROCESSOR=$(/usr/bin/uname -p) + case "$UNAME_PROCESSOR" in + amd64) + UNAME_PROCESSOR=x86_64 ;; + i386) + UNAME_PROCESSOR=i586 ;; + esac + echo "$UNAME_PROCESSOR"-unknown-freebsd"$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')" + exit ;; i*:CYGWIN*:*) - echo ${UNAME_MACHINE}-pc-cygwin - exit 0 ;; - i*:MINGW*:*) - echo ${UNAME_MACHINE}-pc-mingw32 - exit 0 ;; + echo "$UNAME_MACHINE"-pc-cygwin + exit ;; + *:MINGW64*:*) + echo "$UNAME_MACHINE"-pc-mingw64 + exit ;; + *:MINGW*:*) + echo "$UNAME_MACHINE"-pc-mingw32 + exit ;; + *:MSYS*:*) + echo "$UNAME_MACHINE"-pc-msys + exit ;; i*:PW*:*) - echo ${UNAME_MACHINE}-pc-pw32 - exit 0 ;; - x86:Interix*:3*) - echo i586-pc-interix3 - exit 0 ;; - [345]86:Windows_95:* | [345]86:Windows_98:* | [345]86:Windows_NT:*) - echo i${UNAME_MACHINE}-pc-mks - exit 0 ;; - i*:Windows_NT*:* | Pentium*:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # It also conflicts with pre-2.0 versions of AT&T UWIN. Should we - # UNAME_MACHINE based on the output of uname instead of i386? - echo i586-pc-interix - exit 0 ;; + echo "$UNAME_MACHINE"-pc-pw32 + exit ;; + *:Interix*:*) + case "$UNAME_MACHINE" in + x86) + echo i586-pc-interix"$UNAME_RELEASE" + exit ;; + authenticamd | genuineintel | EM64T) + echo x86_64-unknown-interix"$UNAME_RELEASE" + exit ;; + IA64) + echo ia64-unknown-interix"$UNAME_RELEASE" + exit ;; + esac ;; i*:UWIN*:*) - echo ${UNAME_MACHINE}-pc-uwin - exit 0 ;; - p*:CYGWIN*:*) - echo powerpcle-unknown-cygwin - exit 0 ;; + echo "$UNAME_MACHINE"-pc-uwin + exit ;; + amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*) + echo x86_64-pc-cygwin + exit ;; prep*:SunOS:5.*:*) - echo powerpcle-unknown-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo powerpcle-unknown-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" + exit ;; *:GNU:*:*) - echo `echo ${UNAME_MACHINE}|sed -e 's,[-/].*$,,'`-unknown-gnu`echo ${UNAME_RELEASE}|sed -e 's,/.*$,,'` - exit 0 ;; - i*86:Minix:*:*) - echo ${UNAME_MACHINE}-pc-minix - exit 0 ;; + # the GNU system + echo "$(echo "$UNAME_MACHINE"|sed -e 's,[-/].*$,,')-unknown-$LIBC$(echo "$UNAME_RELEASE"|sed -e 's,/.*$,,')" + exit ;; + *:GNU/*:*:*) + # other systems with GNU libc and userland + echo "$UNAME_MACHINE-unknown-$(echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]")$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')-$LIBC" + exit ;; + *:Minix:*:*) + echo "$UNAME_MACHINE"-unknown-minix + exit ;; + aarch64:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + aarch64_be:Linux:*:*) + UNAME_MACHINE=aarch64_be + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + alpha:Linux:*:*) + case $(sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' /proc/cpuinfo 2>/dev/null) in + EV5) UNAME_MACHINE=alphaev5 ;; + EV56) UNAME_MACHINE=alphaev56 ;; + PCA56) UNAME_MACHINE=alphapca56 ;; + PCA57) UNAME_MACHINE=alphapca56 ;; + EV6) UNAME_MACHINE=alphaev6 ;; + EV67) UNAME_MACHINE=alphaev67 ;; + EV68*) UNAME_MACHINE=alphaev68 ;; + esac + objdump --private-headers /bin/sh | grep -q ld.so.1 + if test "$?" = 0 ; then LIBC=gnulibc1 ; fi + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + arc:Linux:*:* | arceb:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; arm*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + set_cc_for_build + if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_EABI__ + then + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + else + if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_PCS_VFP + then + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabi + else + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabihf + fi + fi + exit ;; + avr32*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + cris:Linux:*:*) + echo "$UNAME_MACHINE"-axis-linux-"$LIBC" + exit ;; + crisv32:Linux:*:*) + echo "$UNAME_MACHINE"-axis-linux-"$LIBC" + exit ;; + e2k:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + frv:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + hexagon:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + i*86:Linux:*:*) + echo "$UNAME_MACHINE"-pc-linux-"$LIBC" + exit ;; ia64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + k1om:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + m32r*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; m68*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - mips:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + mips:Linux:*:* | mips64:Linux:*:*) + set_cc_for_build + IS_GLIBC=0 + test x"${LIBC}" = xgnu && IS_GLIBC=1 + sed 's/^ //' << EOF > "$dummy.c" #undef CPU #undef mips #undef mipsel - #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mipsel + #undef mips64 + #undef mips64el + #if ${IS_GLIBC} && defined(_ABI64) + LIBCABI=gnuabi64 #else - #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips + #if ${IS_GLIBC} && defined(_ABIN32) + LIBCABI=gnuabin32 #else - CPU= + LIBCABI=${LIBC} #endif #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 - ;; - mips64:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #undef CPU - #undef mips64 - #undef mips64el + + #if ${IS_GLIBC} && defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 + CPU=mipsisa64r6 + #else + #if ${IS_GLIBC} && !defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 + CPU=mipsisa32r6 + #else + #if defined(__mips64) + CPU=mips64 + #else + CPU=mips + #endif + #endif + #endif + #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mips64el + MIPS_ENDIAN=el #else #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips64 + MIPS_ENDIAN= #else - CPU= + MIPS_ENDIAN= #endif #endif EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 + eval "$($CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI')" + test "x$CPU" != x && { echo "$CPU${MIPS_ENDIAN}-unknown-linux-$LIBCABI"; exit; } ;; - ppc:Linux:*:*) - echo powerpc-unknown-linux-gnu - exit 0 ;; - ppc64:Linux:*:*) - echo powerpc64-unknown-linux-gnu - exit 0 ;; - alpha:Linux:*:*) - case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in - EV5) UNAME_MACHINE=alphaev5 ;; - EV56) UNAME_MACHINE=alphaev56 ;; - PCA56) UNAME_MACHINE=alphapca56 ;; - PCA57) UNAME_MACHINE=alphapca56 ;; - EV6) UNAME_MACHINE=alphaev6 ;; - EV67) UNAME_MACHINE=alphaev67 ;; - EV68*) UNAME_MACHINE=alphaev68 ;; - esac - objdump --private-headers /bin/sh | grep ld.so.1 >/dev/null - if test "$?" = 0 ; then LIBC="libc1" ; else LIBC="" ; fi - echo ${UNAME_MACHINE}-unknown-linux-gnu${LIBC} - exit 0 ;; + mips64el:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + openrisc*:Linux:*:*) + echo or1k-unknown-linux-"$LIBC" + exit ;; + or32:Linux:*:* | or1k*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + padre:Linux:*:*) + echo sparc-unknown-linux-"$LIBC" + exit ;; + parisc64:Linux:*:* | hppa64:Linux:*:*) + echo hppa64-unknown-linux-"$LIBC" + exit ;; parisc:Linux:*:* | hppa:Linux:*:*) # Look for CPU level - case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in - PA7*) echo hppa1.1-unknown-linux-gnu ;; - PA8*) echo hppa2.0-unknown-linux-gnu ;; - *) echo hppa-unknown-linux-gnu ;; + case $(grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2) in + PA7*) echo hppa1.1-unknown-linux-"$LIBC" ;; + PA8*) echo hppa2.0-unknown-linux-"$LIBC" ;; + *) echo hppa-unknown-linux-"$LIBC" ;; esac - exit 0 ;; - parisc64:Linux:*:* | hppa64:Linux:*:*) - echo hppa64-unknown-linux-gnu - exit 0 ;; + exit ;; + ppc64:Linux:*:*) + echo powerpc64-unknown-linux-"$LIBC" + exit ;; + ppc:Linux:*:*) + echo powerpc-unknown-linux-"$LIBC" + exit ;; + ppc64le:Linux:*:*) + echo powerpc64le-unknown-linux-"$LIBC" + exit ;; + ppcle:Linux:*:*) + echo powerpcle-unknown-linux-"$LIBC" + exit ;; + riscv32:Linux:*:* | riscv64:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; s390:Linux:*:* | s390x:Linux:*:*) - echo ${UNAME_MACHINE}-ibm-linux - exit 0 ;; + echo "$UNAME_MACHINE"-ibm-linux-"$LIBC" + exit ;; + sh64*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; sh*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; sparc:Linux:*:* | sparc64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + tile*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + vax:Linux:*:*) + echo "$UNAME_MACHINE"-dec-linux-"$LIBC" + exit ;; x86_64:Linux:*:*) - echo x86_64-unknown-linux-gnu - exit 0 ;; - i*86:Linux:*:*) - # The BFD linker knows what the default object file format is, so - # first see if it will tell us. cd to the root directory to prevent - # problems with other programs or directories called `ld' in the path. - # Set LC_ALL=C to ensure ld outputs messages in English. - ld_supported_targets=`cd /; LC_ALL=C ld --help 2>&1 \ - | sed -ne '/supported targets:/!d - s/[ ][ ]*/ /g - s/.*supported targets: *// - s/ .*// - p'` - case "$ld_supported_targets" in - elf32-i386) - TENTATIVE="${UNAME_MACHINE}-pc-linux-gnu" - ;; - a.out-i386-linux) - echo "${UNAME_MACHINE}-pc-linux-gnuaout" - exit 0 ;; - coff-i386) - echo "${UNAME_MACHINE}-pc-linux-gnucoff" - exit 0 ;; - "") - # Either a pre-BFD a.out linker (linux-gnuoldld) or - # one that does not give us useful --help. - echo "${UNAME_MACHINE}-pc-linux-gnuoldld" - exit 0 ;; - esac - # Determine whether the default compiler is a.out or elf - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #ifdef __ELF__ - # ifdef __GLIBC__ - # if __GLIBC__ >= 2 - LIBC=gnu - # else - LIBC=gnulibc1 - # endif - # else - LIBC=gnulibc1 - # endif - #else - #ifdef __INTEL_COMPILER - LIBC=gnu - #else - LIBC=gnuaout - #endif - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - test x"${LIBC}" != x && echo "${UNAME_MACHINE}-pc-linux-${LIBC}" && exit 0 - test x"${TENTATIVE}" != x && echo "${TENTATIVE}" && exit 0 - ;; + set_cc_for_build + LIBCABI=$LIBC + if test "$CC_FOR_BUILD" != no_compiler_found; then + if (echo '#ifdef __ILP32__'; echo IS_X32; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_X32 >/dev/null + then + LIBCABI="$LIBC"x32 + fi + fi + echo "$UNAME_MACHINE"-pc-linux-"$LIBCABI" + exit ;; + xtensa*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; i*86:DYNIX/ptx:4*:*) # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there. # earlier versions are messed up and put the nodename in both # sysname and nodename. echo i386-sequent-sysv4 - exit 0 ;; + exit ;; i*86:UNIX_SV:4.2MP:2.*) - # Unixware is an offshoot of SVR4, but it has its own version - # number series starting with 2... - # I am not positive that other SVR4 systems won't match this, + # Unixware is an offshoot of SVR4, but it has its own version + # number series starting with 2... + # I am not positive that other SVR4 systems won't match this, # I just have to hope. -- rms. - # Use sysv4.2uw... so that sysv4* matches it. - echo ${UNAME_MACHINE}-pc-sysv4.2uw${UNAME_VERSION} - exit 0 ;; + # Use sysv4.2uw... so that sysv4* matches it. + echo "$UNAME_MACHINE"-pc-sysv4.2uw"$UNAME_VERSION" + exit ;; i*86:OS/2:*:*) # If we were able to find `uname', then EMX Unix compatibility # is probably installed. - echo ${UNAME_MACHINE}-pc-os2-emx - exit 0 ;; + echo "$UNAME_MACHINE"-pc-os2-emx + exit ;; i*86:XTS-300:*:STOP) - echo ${UNAME_MACHINE}-unknown-stop - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-stop + exit ;; i*86:atheos:*:*) - echo ${UNAME_MACHINE}-unknown-atheos - exit 0 ;; - i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.0*:*) - echo i386-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-atheos + exit ;; + i*86:syllable:*:*) + echo "$UNAME_MACHINE"-pc-syllable + exit ;; + i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.[02]*:*) + echo i386-unknown-lynxos"$UNAME_RELEASE" + exit ;; i*86:*DOS:*:*) - echo ${UNAME_MACHINE}-pc-msdosdjgpp - exit 0 ;; - i*86:*:4.*:* | i*86:SYSTEM_V:4.*:*) - UNAME_REL=`echo ${UNAME_RELEASE} | sed 's/\/MP$//'` + echo "$UNAME_MACHINE"-pc-msdosdjgpp + exit ;; + i*86:*:4.*:*) + UNAME_REL=$(echo "$UNAME_RELEASE" | sed 's/\/MP$//') if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then - echo ${UNAME_MACHINE}-univel-sysv${UNAME_REL} + echo "$UNAME_MACHINE"-univel-sysv"$UNAME_REL" else - echo ${UNAME_MACHINE}-pc-sysv${UNAME_REL} + echo "$UNAME_MACHINE"-pc-sysv"$UNAME_REL" fi - exit 0 ;; - i*86:*:5:[78]*) - case `/bin/uname -X | grep "^Machine"` in + exit ;; + i*86:*:5:[678]*) + # UnixWare 7.x, OpenUNIX and OpenServer 6. + case $(/bin/uname -X | grep "^Machine") in *486*) UNAME_MACHINE=i486 ;; *Pentium) UNAME_MACHINE=i586 ;; *Pent*|*Celeron) UNAME_MACHINE=i686 ;; esac - echo ${UNAME_MACHINE}-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION} - exit 0 ;; + echo "$UNAME_MACHINE-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION}" + exit ;; i*86:*:3.2:*) if test -f /usr/options/cb.name; then - UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then - UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` + UNAME_REL=$( (/bin/uname -X|grep Release|sed -e 's/.*= //')) (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \ && UNAME_MACHINE=i586 @@ -1018,208 +1185,329 @@ EOF && UNAME_MACHINE=i686 (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \ && UNAME_MACHINE=i686 - echo ${UNAME_MACHINE}-pc-sco$UNAME_REL + echo "$UNAME_MACHINE"-pc-sco"$UNAME_REL" else - echo ${UNAME_MACHINE}-pc-sysv32 + echo "$UNAME_MACHINE"-pc-sysv32 fi - exit 0 ;; + exit ;; pc:*:*:*) # Left here for compatibility: - # uname -m prints for DJGPP always 'pc', but it prints nothing about - # the processor, so we play safe by assuming i386. - echo i386-pc-msdosdjgpp - exit 0 ;; + # uname -m prints for DJGPP always 'pc', but it prints nothing about + # the processor, so we play safe by assuming i586. + # Note: whatever this is, it MUST be the same as what config.sub + # prints for the "djgpp" host, or else GDB configure will decide that + # this is a cross-build. + echo i586-pc-msdosdjgpp + exit ;; Intel:Mach:3*:*) echo i386-pc-mach3 - exit 0 ;; + exit ;; paragon:*:*:*) echo i860-intel-osf1 - exit 0 ;; + exit ;; i860:*:4.*:*) # i860-SVR4 if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then - echo i860-stardent-sysv${UNAME_RELEASE} # Stardent Vistra i860-SVR4 + echo i860-stardent-sysv"$UNAME_RELEASE" # Stardent Vistra i860-SVR4 else # Add other i860-SVR4 vendors below as they are discovered. - echo i860-unknown-sysv${UNAME_RELEASE} # Unknown i860-SVR4 + echo i860-unknown-sysv"$UNAME_RELEASE" # Unknown i860-SVR4 fi - exit 0 ;; + exit ;; mini*:CTIX:SYS*5:*) # "miniframe" echo m68010-convergent-sysv - exit 0 ;; + exit ;; mc68k:UNIX:SYSTEM5:3.51m) echo m68k-convergent-sysv - exit 0 ;; + exit ;; M680?0:D-NIX:5.3:*) echo m68k-diab-dnix - exit 0 ;; - M68*:*:R3V[567]*:*) - test -r /sysV68 && echo 'm68k-motorola-sysv' && exit 0 ;; - 3[34]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0) + exit ;; + M68*:*:R3V[5678]*:*) + test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;; + 3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0) OS_REL='' test -r /etc/.relid \ - && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` + && OS_REL=.$(sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid) /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4.3${OS_REL} && exit 0 + && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ - && echo i586-ncr-sysv4.3${OS_REL} && exit 0 ;; + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; 3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*) - /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4 && exit 0 ;; + /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ + && { echo i486-ncr-sysv4; exit; } ;; + NCR*:*:4.2:* | MPRAS*:*:4.2:*) + OS_REL='.3' + test -r /etc/.relid \ + && OS_REL=.$(sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid) + /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ + && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } + /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } + /bin/uname -p 2>/dev/null | /bin/grep pteron >/dev/null \ + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*) - echo m68k-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo m68k-unknown-lynxos"$UNAME_RELEASE" + exit ;; mc68030:UNIX_System_V:4.*:*) echo m68k-atari-sysv4 - exit 0 ;; + exit ;; TSUNAMI:LynxOS:2.*:*) - echo sparc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo sparc-unknown-lynxos"$UNAME_RELEASE" + exit ;; rs6000:LynxOS:2.*:*) - echo rs6000-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.0*:*) - echo powerpc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo rs6000-unknown-lynxos"$UNAME_RELEASE" + exit ;; + PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.[02]*:*) + echo powerpc-unknown-lynxos"$UNAME_RELEASE" + exit ;; SM[BE]S:UNIX_SV:*:*) - echo mips-dde-sysv${UNAME_RELEASE} - exit 0 ;; + echo mips-dde-sysv"$UNAME_RELEASE" + exit ;; RM*:ReliantUNIX-*:*:*) echo mips-sni-sysv4 - exit 0 ;; + exit ;; RM*:SINIX-*:*:*) echo mips-sni-sysv4 - exit 0 ;; + exit ;; *:SINIX-*:*:*) if uname -p 2>/dev/null >/dev/null ; then - UNAME_MACHINE=`(uname -p) 2>/dev/null` - echo ${UNAME_MACHINE}-sni-sysv4 + UNAME_MACHINE=$( (uname -p) 2>/dev/null) + echo "$UNAME_MACHINE"-sni-sysv4 else echo ns32k-sni-sysv fi - exit 0 ;; - PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort - # says - echo i586-unisys-sysv4 - exit 0 ;; + exit ;; + PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort + # says + echo i586-unisys-sysv4 + exit ;; *:UNIX_System_V:4*:FTX*) # From Gerald Hewes . # How about differentiating between stratus architectures? -djm echo hppa1.1-stratus-sysv4 - exit 0 ;; + exit ;; *:*:*:FTX*) # From seanf@swdc.stratus.com. echo i860-stratus-sysv4 - exit 0 ;; + exit ;; + i*86:VOS:*:*) + # From Paul.Green@stratus.com. + echo "$UNAME_MACHINE"-stratus-vos + exit ;; *:VOS:*:*) # From Paul.Green@stratus.com. echo hppa1.1-stratus-vos - exit 0 ;; + exit ;; mc68*:A/UX:*:*) - echo m68k-apple-aux${UNAME_RELEASE} - exit 0 ;; + echo m68k-apple-aux"$UNAME_RELEASE" + exit ;; news*:NEWS-OS:6*:*) echo mips-sony-newsos6 - exit 0 ;; + exit ;; R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) - if [ -d /usr/nec ]; then - echo mips-nec-sysv${UNAME_RELEASE} + if test -d /usr/nec; then + echo mips-nec-sysv"$UNAME_RELEASE" else - echo mips-unknown-sysv${UNAME_RELEASE} + echo mips-unknown-sysv"$UNAME_RELEASE" fi - exit 0 ;; + exit ;; BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only. echo powerpc-be-beos - exit 0 ;; + exit ;; BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only. echo powerpc-apple-beos - exit 0 ;; + exit ;; BePC:BeOS:*:*) # BeOS running on Intel PC compatible. echo i586-pc-beos - exit 0 ;; + exit ;; + BePC:Haiku:*:*) # Haiku running on Intel PC compatible. + echo i586-pc-haiku + exit ;; + x86_64:Haiku:*:*) + echo x86_64-unknown-haiku + exit ;; SX-4:SUPER-UX:*:*) - echo sx4-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx4-nec-superux"$UNAME_RELEASE" + exit ;; SX-5:SUPER-UX:*:*) - echo sx5-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx5-nec-superux"$UNAME_RELEASE" + exit ;; SX-6:SUPER-UX:*:*) - echo sx6-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx6-nec-superux"$UNAME_RELEASE" + exit ;; + SX-7:SUPER-UX:*:*) + echo sx7-nec-superux"$UNAME_RELEASE" + exit ;; + SX-8:SUPER-UX:*:*) + echo sx8-nec-superux"$UNAME_RELEASE" + exit ;; + SX-8R:SUPER-UX:*:*) + echo sx8r-nec-superux"$UNAME_RELEASE" + exit ;; + SX-ACE:SUPER-UX:*:*) + echo sxace-nec-superux"$UNAME_RELEASE" + exit ;; Power*:Rhapsody:*:*) - echo powerpc-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; + echo powerpc-apple-rhapsody"$UNAME_RELEASE" + exit ;; *:Rhapsody:*:*) - echo ${UNAME_MACHINE}-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-apple-rhapsody"$UNAME_RELEASE" + exit ;; + arm64:Darwin:*:*) + echo aarch64-apple-darwin"$UNAME_RELEASE" + exit ;; *:Darwin:*:*) - case `uname -p` in - *86) UNAME_PROCESSOR=i686 ;; - powerpc) UNAME_PROCESSOR=powerpc ;; + UNAME_PROCESSOR=$(uname -p) + case $UNAME_PROCESSOR in + unknown) UNAME_PROCESSOR=powerpc ;; esac - echo ${UNAME_PROCESSOR}-apple-darwin${UNAME_RELEASE} - exit 0 ;; + if command -v xcode-select > /dev/null 2> /dev/null && \ + ! xcode-select --print-path > /dev/null 2> /dev/null ; then + # Avoid executing cc if there is no toolchain installed as + # cc will be a stub that puts up a graphical alert + # prompting the user to install developer tools. + CC_FOR_BUILD=no_compiler_found + else + set_cc_for_build + fi + if test "$CC_FOR_BUILD" != no_compiler_found; then + if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_64BIT_ARCH >/dev/null + then + case $UNAME_PROCESSOR in + i386) UNAME_PROCESSOR=x86_64 ;; + powerpc) UNAME_PROCESSOR=powerpc64 ;; + esac + fi + # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc + if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_PPC >/dev/null + then + UNAME_PROCESSOR=powerpc + fi + elif test "$UNAME_PROCESSOR" = i386 ; then + # uname -m returns i386 or x86_64 + UNAME_PROCESSOR=$UNAME_MACHINE + fi + echo "$UNAME_PROCESSOR"-apple-darwin"$UNAME_RELEASE" + exit ;; *:procnto*:*:* | *:QNX:[0123456789]*:*) - UNAME_PROCESSOR=`uname -p` - if test "$UNAME_PROCESSOR" = "x86"; then + UNAME_PROCESSOR=$(uname -p) + if test "$UNAME_PROCESSOR" = x86; then UNAME_PROCESSOR=i386 UNAME_MACHINE=pc fi - echo ${UNAME_PROCESSOR}-${UNAME_MACHINE}-nto-qnx${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_PROCESSOR"-"$UNAME_MACHINE"-nto-qnx"$UNAME_RELEASE" + exit ;; *:QNX:*:4*) echo i386-pc-qnx - exit 0 ;; - NSR-[DGKLNPTVW]:NONSTOP_KERNEL:*:*) - echo nsr-tandem-nsk${UNAME_RELEASE} - exit 0 ;; + exit ;; + NEO-*:NONSTOP_KERNEL:*:*) + echo neo-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSE-*:NONSTOP_KERNEL:*:*) + echo nse-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSR-*:NONSTOP_KERNEL:*:*) + echo nsr-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSV-*:NONSTOP_KERNEL:*:*) + echo nsv-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSX-*:NONSTOP_KERNEL:*:*) + echo nsx-tandem-nsk"$UNAME_RELEASE" + exit ;; *:NonStop-UX:*:*) echo mips-compaq-nonstopux - exit 0 ;; + exit ;; BS2000:POSIX*:*:*) echo bs2000-siemens-sysv - exit 0 ;; + exit ;; DS/*:UNIX_System_V:*:*) - echo ${UNAME_MACHINE}-${UNAME_SYSTEM}-${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-"$UNAME_SYSTEM"-"$UNAME_RELEASE" + exit ;; *:Plan9:*:*) # "uname -m" is not consistent, so use $cputype instead. 386 # is converted to i386 for consistency with other x86 # operating systems. - if test "$cputype" = "386"; then + # shellcheck disable=SC2154 + if test "$cputype" = 386; then UNAME_MACHINE=i386 else UNAME_MACHINE="$cputype" fi - echo ${UNAME_MACHINE}-unknown-plan9 - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-plan9 + exit ;; *:TOPS-10:*:*) echo pdp10-unknown-tops10 - exit 0 ;; + exit ;; *:TENEX:*:*) echo pdp10-unknown-tenex - exit 0 ;; + exit ;; KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*) echo pdp10-dec-tops20 - exit 0 ;; + exit ;; XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*) echo pdp10-xkl-tops20 - exit 0 ;; + exit ;; *:TOPS-20:*:*) echo pdp10-unknown-tops20 - exit 0 ;; + exit ;; *:ITS:*:*) echo pdp10-unknown-its - exit 0 ;; + exit ;; + SEI:*:*:SEIUX) + echo mips-sei-seiux"$UNAME_RELEASE" + exit ;; + *:DragonFly:*:*) + echo "$UNAME_MACHINE"-unknown-dragonfly"$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')" + exit ;; + *:*VMS:*:*) + UNAME_MACHINE=$( (uname -p) 2>/dev/null) + case "$UNAME_MACHINE" in + A*) echo alpha-dec-vms ; exit ;; + I*) echo ia64-dec-vms ; exit ;; + V*) echo vax-dec-vms ; exit ;; + esac ;; + *:XENIX:*:SysV) + echo i386-pc-xenix + exit ;; + i*86:skyos:*:*) + echo "$UNAME_MACHINE"-pc-skyos"$(echo "$UNAME_RELEASE" | sed -e 's/ .*$//')" + exit ;; + i*86:rdos:*:*) + echo "$UNAME_MACHINE"-pc-rdos + exit ;; + i*86:AROS:*:*) + echo "$UNAME_MACHINE"-pc-aros + exit ;; + x86_64:VMkernel:*:*) + echo "$UNAME_MACHINE"-unknown-esx + exit ;; + amd64:Isilon\ OneFS:*:*) + echo x86_64-unknown-onefs + exit ;; + *:Unleashed:*:*) + echo "$UNAME_MACHINE"-unknown-unleashed"$UNAME_RELEASE" + exit ;; esac -#echo '(No uname command or uname output not recognized.)' 1>&2 -#echo "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" 1>&2 - -eval $set_cc_for_build -cat >$dummy.c < "$dummy.c" < -# include +#include +#include +#endif +#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) +#if defined (vax) || defined (__vax) || defined (__vax__) || defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) +#include +#if defined(_SIZE_T_) || defined(SIGLOST) +#include +#endif +#endif #endif main () { @@ -1232,20 +1520,12 @@ main () #include printf ("m68k-sony-newsos%s\n", #ifdef NEWSOS4 - "4" + "4" #else - "" -#endif - ); exit (0); + "" #endif + ); exit (0); #endif - -#if defined (__arm) && defined (__acorn) && defined (__unix) - printf ("arm-acorn-riscix"); exit (0); -#endif - -#if defined (hp300) && !defined (hpux) - printf ("m68k-hp-bsd\n"); exit (0); #endif #if defined (NeXT) @@ -1253,7 +1533,7 @@ main () #define __ARCHITECTURE__ "m68k" #endif int version; - version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`; + version=$( (hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null); if (version < 4) printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version); else @@ -1287,39 +1567,54 @@ main () #endif #if defined (_SEQUENT_) - struct utsname un; - - uname(&un); - - if (strncmp(un.version, "V2", 2) == 0) { - printf ("i386-sequent-ptx2\n"); exit (0); - } - if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ - printf ("i386-sequent-ptx1\n"); exit (0); - } - printf ("i386-sequent-ptx\n"); exit (0); + struct utsname un; + uname(&un); + if (strncmp(un.version, "V2", 2) == 0) { + printf ("i386-sequent-ptx2\n"); exit (0); + } + if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ + printf ("i386-sequent-ptx1\n"); exit (0); + } + printf ("i386-sequent-ptx\n"); exit (0); #endif #if defined (vax) -# if !defined (ultrix) -# include -# if defined (BSD) -# if BSD == 43 - printf ("vax-dec-bsd4.3\n"); exit (0); -# else -# if BSD == 199006 - printf ("vax-dec-bsd4.3reno\n"); exit (0); -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# endif -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# else - printf ("vax-dec-ultrix\n"); exit (0); -# endif +#if !defined (ultrix) +#include +#if defined (BSD) +#if BSD == 43 + printf ("vax-dec-bsd4.3\n"); exit (0); +#else +#if BSD == 199006 + printf ("vax-dec-bsd4.3reno\n"); exit (0); +#else + printf ("vax-dec-bsd\n"); exit (0); +#endif +#endif +#else + printf ("vax-dec-bsd\n"); exit (0); +#endif +#else +#if defined(_SIZE_T_) || defined(SIGLOST) + struct utsname un; + uname (&un); + printf ("vax-dec-ultrix%s\n", un.release); exit (0); +#else + printf ("vax-dec-ultrix\n"); exit (0); +#endif +#endif +#endif +#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) +#if defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) +#if defined(_SIZE_T_) || defined(SIGLOST) + struct utsname *un; + uname (&un); + printf ("mips-dec-ultrix%s\n", un.release); exit (0); +#else + printf ("mips-dec-ultrix\n"); exit (0); +#endif +#endif #endif #if defined (alliant) && defined (i860) @@ -1330,79 +1625,73 @@ main () } EOF -$CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null && $dummy && exit 0 +$CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=$($dummy) && + { echo "$SYSTEM_NAME"; exit; } # Apollos put the system type in the environment. +test -d /usr/apollo && { echo "$ISP-apollo-$SYSTYPE"; exit; } -test -d /usr/apollo && { echo ${ISP}-apollo-${SYSTYPE}; exit 0; } +echo "$0: unable to guess system type" >&2 -# Convex versions that predate uname can use getsysinfo(1) +case "$UNAME_MACHINE:$UNAME_SYSTEM" in + mips:Linux | mips64:Linux) + # If we got here on MIPS GNU/Linux, output extra information. + cat >&2 <&2 < in order to provide the needed -information to handle your system. +year=$(echo $timestamp | sed 's,-.*,,') +# shellcheck disable=SC2003 +if test "$(expr "$(date +%Y)" - "$year")" -lt 3 ; then + cat >&2 </dev/null || echo unknown` -uname -r = `(uname -r) 2>/dev/null || echo unknown` -uname -s = `(uname -s) 2>/dev/null || echo unknown` -uname -v = `(uname -v) 2>/dev/null || echo unknown` +uname -m = $( (uname -m) 2>/dev/null || echo unknown) +uname -r = $( (uname -r) 2>/dev/null || echo unknown) +uname -s = $( (uname -s) 2>/dev/null || echo unknown) +uname -v = $( (uname -v) 2>/dev/null || echo unknown) -/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null` -/bin/uname -X = `(/bin/uname -X) 2>/dev/null` +/usr/bin/uname -p = $( (/usr/bin/uname -p) 2>/dev/null) +/bin/uname -X = $( (/bin/uname -X) 2>/dev/null) -hostinfo = `(hostinfo) 2>/dev/null` -/bin/universe = `(/bin/universe) 2>/dev/null` -/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null` -/bin/arch = `(/bin/arch) 2>/dev/null` -/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` -/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` +hostinfo = $( (hostinfo) 2>/dev/null) +/bin/universe = $( (/bin/universe) 2>/dev/null) +/usr/bin/arch -k = $( (/usr/bin/arch -k) 2>/dev/null) +/bin/arch = $( (/bin/arch) 2>/dev/null) +/usr/bin/oslevel = $( (/usr/bin/oslevel) 2>/dev/null) +/usr/convex/getsysinfo = $( (/usr/convex/getsysinfo) 2>/dev/null) -UNAME_MACHINE = ${UNAME_MACHINE} -UNAME_RELEASE = ${UNAME_RELEASE} -UNAME_SYSTEM = ${UNAME_SYSTEM} -UNAME_VERSION = ${UNAME_VERSION} +UNAME_MACHINE = "$UNAME_MACHINE" +UNAME_RELEASE = "$UNAME_RELEASE" +UNAME_SYSTEM = "$UNAME_SYSTEM" +UNAME_VERSION = "$UNAME_VERSION" EOF +fi exit 1 # Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) +# eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" diff --git a/BasiliskII/src/Unix/config.sub b/BasiliskII/src/Unix/config.sub index d6d67c3fd..19c9553b1 100755 --- a/BasiliskII/src/Unix/config.sub +++ b/BasiliskII/src/Unix/config.sub @@ -1,42 +1,40 @@ #! /bin/sh # Configuration validation subroutine script. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. +# Copyright 1992-2020 Free Software Foundation, Inc. -timestamp='2003-01-03' +timestamp='2020-12-02' -# This file is (in principle) common to ALL GNU software. -# The presence of a machine in this file suggests that SOME GNU software -# can handle that machine. It does not imply ALL GNU software can. -# -# This file 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 +# This file 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 3 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. +# 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. - +# along with this program; if not, see . +# # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. +# the same distribution terms that you use for the rest of that +# program. This Exception is an additional permission under section 7 +# of the GNU General Public License, version 3 ("GPLv3"). -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. + +# Please send patches to . # # Configuration subroutine to validate and canonicalize a configuration type. # Supply the specified configuration type as an argument. # If it is invalid, we print an error message on stderr and exit with code 1. # Otherwise, we print the canonical config type on stdout and succeed. +# You can get the latest version of this script from: +# https://git.savannah.gnu.org/cgit/config.git/plain/config.sub + # This file is supposed to be the same for all GNU packages # and recognize all the CPU types, system types and aliases # that are meaningful with *any* GNU software. @@ -52,15 +50,14 @@ timestamp='2003-01-03' # CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM # It is wrong to echo any other type of specification. -me=`echo "$0" | sed -e 's,.*/,,'` +me=$(echo "$0" | sed -e 's,.*/,,') usage="\ -Usage: $0 [OPTION] CPU-MFR-OPSYS - $0 [OPTION] ALIAS +Usage: $0 [OPTION] CPU-MFR-OPSYS or ALIAS Canonicalize a configuration name. -Operation modes: +Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit @@ -70,8 +67,7 @@ Report bugs and patches to ." version="\ GNU config.sub ($timestamp) -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. +Copyright 1992-2020 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -83,23 +79,23 @@ Try \`$me --help' for more information." while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; + echo "$timestamp" ; exit ;; --version | -v ) - echo "$version" ; exit 0 ;; + echo "$version" ; exit ;; --help | --h* | -h ) - echo "$usage"; exit 0 ;; + echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) - echo "$me: invalid option $1$help" + echo "$me: invalid option $1$help" >&2 exit 1 ;; *local*) # First pass through any local machine types. - echo $1 - exit 0;; + echo "$1" + exit ;; * ) break ;; @@ -114,955 +110,1168 @@ case $# in exit 1;; esac -# Separate what the user gave into CPU-COMPANY and OS or KERNEL-OS (if any). -# Here we must recognize all the valid KERNEL-OS combinations. -maybe_os=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\2/'` -case $maybe_os in - nto-qnx* | linux-gnu* | freebsd*-gnu* | netbsd*-gnu* | storm-chaos* | os2-emx* | rtmk-nova*) - os=-$maybe_os - basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'` - ;; - *) - basic_machine=`echo $1 | sed 's/-[^-]*$//'` - if [ $basic_machine != $1 ] - then os=`echo $1 | sed 's/.*-/-/'` - else os=; fi - ;; -esac +# Split fields of configuration type +# shellcheck disable=SC2162 +IFS="-" read field1 field2 field3 field4 <&2 + exit 1 ;; - -sco*) - os=-sco3.2v2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*-*-*) + basic_machine=$field1-$field2 + basic_os=$field3-$field4 ;; - -udk*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*-*) + # Ambiguous whether COMPANY is present, or skipped and KERNEL-OS is two + # parts + maybe_os=$field2-$field3 + case $maybe_os in + nto-qnx* | linux-* | uclinux-uclibc* \ + | uclinux-gnu* | kfreebsd*-gnu* | knetbsd*-gnu* | netbsd*-gnu* \ + | netbsd*-eabi* | kopensolaris*-gnu* | cloudabi*-eabi* \ + | storm-chaos* | os2-emx* | rtmk-nova*) + basic_machine=$field1 + basic_os=$maybe_os + ;; + android-linux) + basic_machine=$field1-unknown + basic_os=linux-android + ;; + *) + basic_machine=$field1-$field2 + basic_os=$field3 + ;; + esac ;; - -isc) - os=-isc2.2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*) + # A lone config we happen to match not fitting any pattern + case $field1-$field2 in + decstation-3100) + basic_machine=mips-dec + basic_os= + ;; + *-*) + # Second component is usually, but not always the OS + case $field2 in + # Prevent following clause from handling this valid os + sun*os*) + basic_machine=$field1 + basic_os=$field2 + ;; + # Manufacturers + dec* | mips* | sequent* | encore* | pc533* | sgi* | sony* \ + | att* | 7300* | 3300* | delta* | motorola* | sun[234]* \ + | unicom* | ibm* | next | hp | isi* | apollo | altos* \ + | convergent* | ncr* | news | 32* | 3600* | 3100* \ + | hitachi* | c[123]* | convex* | sun | crds | omron* | dg \ + | ultra | tti* | harris | dolphin | highlevel | gould \ + | cbm | ns | masscomp | apple | axis | knuth | cray \ + | microblaze* | sim | cisco \ + | oki | wec | wrs | winbond) + basic_machine=$field1-$field2 + basic_os= + ;; + *) + basic_machine=$field1 + basic_os=$field2 + ;; + esac + ;; + esac ;; - -clix*) - basic_machine=clipper-intergraph + *) + # Convert single-component short-hands not valid as part of + # multi-component configurations. + case $field1 in + 386bsd) + basic_machine=i386-pc + basic_os=bsd + ;; + a29khif) + basic_machine=a29k-amd + basic_os=udi + ;; + adobe68k) + basic_machine=m68010-adobe + basic_os=scout + ;; + alliant) + basic_machine=fx80-alliant + basic_os= + ;; + altos | altos3068) + basic_machine=m68k-altos + basic_os= + ;; + am29k) + basic_machine=a29k-none + basic_os=bsd + ;; + amdahl) + basic_machine=580-amdahl + basic_os=sysv + ;; + amiga) + basic_machine=m68k-unknown + basic_os= + ;; + amigaos | amigados) + basic_machine=m68k-unknown + basic_os=amigaos + ;; + amigaunix | amix) + basic_machine=m68k-unknown + basic_os=sysv4 + ;; + apollo68) + basic_machine=m68k-apollo + basic_os=sysv + ;; + apollo68bsd) + basic_machine=m68k-apollo + basic_os=bsd + ;; + aros) + basic_machine=i386-pc + basic_os=aros + ;; + aux) + basic_machine=m68k-apple + basic_os=aux + ;; + balance) + basic_machine=ns32k-sequent + basic_os=dynix + ;; + blackfin) + basic_machine=bfin-unknown + basic_os=linux + ;; + cegcc) + basic_machine=arm-unknown + basic_os=cegcc + ;; + convex-c1) + basic_machine=c1-convex + basic_os=bsd + ;; + convex-c2) + basic_machine=c2-convex + basic_os=bsd + ;; + convex-c32) + basic_machine=c32-convex + basic_os=bsd + ;; + convex-c34) + basic_machine=c34-convex + basic_os=bsd + ;; + convex-c38) + basic_machine=c38-convex + basic_os=bsd + ;; + cray) + basic_machine=j90-cray + basic_os=unicos + ;; + crds | unos) + basic_machine=m68k-crds + basic_os= + ;; + da30) + basic_machine=m68k-da30 + basic_os= + ;; + decstation | pmax | pmin | dec3100 | decstatn) + basic_machine=mips-dec + basic_os= + ;; + delta88) + basic_machine=m88k-motorola + basic_os=sysv3 + ;; + dicos) + basic_machine=i686-pc + basic_os=dicos + ;; + djgpp) + basic_machine=i586-pc + basic_os=msdosdjgpp + ;; + ebmon29k) + basic_machine=a29k-amd + basic_os=ebmon + ;; + es1800 | OSE68k | ose68k | ose | OSE) + basic_machine=m68k-ericsson + basic_os=ose + ;; + gmicro) + basic_machine=tron-gmicro + basic_os=sysv + ;; + go32) + basic_machine=i386-pc + basic_os=go32 + ;; + h8300hms) + basic_machine=h8300-hitachi + basic_os=hms + ;; + h8300xray) + basic_machine=h8300-hitachi + basic_os=xray + ;; + h8500hms) + basic_machine=h8500-hitachi + basic_os=hms + ;; + harris) + basic_machine=m88k-harris + basic_os=sysv3 + ;; + hp300 | hp300hpux) + basic_machine=m68k-hp + basic_os=hpux + ;; + hp300bsd) + basic_machine=m68k-hp + basic_os=bsd + ;; + hppaosf) + basic_machine=hppa1.1-hp + basic_os=osf + ;; + hppro) + basic_machine=hppa1.1-hp + basic_os=proelf + ;; + i386mach) + basic_machine=i386-mach + basic_os=mach + ;; + isi68 | isi) + basic_machine=m68k-isi + basic_os=sysv + ;; + m68knommu) + basic_machine=m68k-unknown + basic_os=linux + ;; + magnum | m3230) + basic_machine=mips-mips + basic_os=sysv + ;; + merlin) + basic_machine=ns32k-utek + basic_os=sysv + ;; + mingw64) + basic_machine=x86_64-pc + basic_os=mingw64 + ;; + mingw32) + basic_machine=i686-pc + basic_os=mingw32 + ;; + mingw32ce) + basic_machine=arm-unknown + basic_os=mingw32ce + ;; + monitor) + basic_machine=m68k-rom68k + basic_os=coff + ;; + morphos) + basic_machine=powerpc-unknown + basic_os=morphos + ;; + moxiebox) + basic_machine=moxie-unknown + basic_os=moxiebox + ;; + msdos) + basic_machine=i386-pc + basic_os=msdos + ;; + msys) + basic_machine=i686-pc + basic_os=msys + ;; + mvs) + basic_machine=i370-ibm + basic_os=mvs + ;; + nacl) + basic_machine=le32-unknown + basic_os=nacl + ;; + ncr3000) + basic_machine=i486-ncr + basic_os=sysv4 + ;; + netbsd386) + basic_machine=i386-pc + basic_os=netbsd + ;; + netwinder) + basic_machine=armv4l-rebel + basic_os=linux + ;; + news | news700 | news800 | news900) + basic_machine=m68k-sony + basic_os=newsos + ;; + news1000) + basic_machine=m68030-sony + basic_os=newsos + ;; + necv70) + basic_machine=v70-nec + basic_os=sysv + ;; + nh3000) + basic_machine=m68k-harris + basic_os=cxux + ;; + nh[45]000) + basic_machine=m88k-harris + basic_os=cxux + ;; + nindy960) + basic_machine=i960-intel + basic_os=nindy + ;; + mon960) + basic_machine=i960-intel + basic_os=mon960 + ;; + nonstopux) + basic_machine=mips-compaq + basic_os=nonstopux + ;; + os400) + basic_machine=powerpc-ibm + basic_os=os400 + ;; + OSE68000 | ose68000) + basic_machine=m68000-ericsson + basic_os=ose + ;; + os68k) + basic_machine=m68k-none + basic_os=os68k + ;; + paragon) + basic_machine=i860-intel + basic_os=osf + ;; + parisc) + basic_machine=hppa-unknown + basic_os=linux + ;; + psp) + basic_machine=mipsallegrexel-sony + basic_os=psp + ;; + pw32) + basic_machine=i586-unknown + basic_os=pw32 + ;; + rdos | rdos64) + basic_machine=x86_64-pc + basic_os=rdos + ;; + rdos32) + basic_machine=i386-pc + basic_os=rdos + ;; + rom68k) + basic_machine=m68k-rom68k + basic_os=coff + ;; + sa29200) + basic_machine=a29k-amd + basic_os=udi + ;; + sei) + basic_machine=mips-sei + basic_os=seiux + ;; + sequent) + basic_machine=i386-sequent + basic_os= + ;; + sps7) + basic_machine=m68k-bull + basic_os=sysv2 + ;; + st2000) + basic_machine=m68k-tandem + basic_os= + ;; + stratus) + basic_machine=i860-stratus + basic_os=sysv4 + ;; + sun2) + basic_machine=m68000-sun + basic_os= + ;; + sun2os3) + basic_machine=m68000-sun + basic_os=sunos3 + ;; + sun2os4) + basic_machine=m68000-sun + basic_os=sunos4 + ;; + sun3) + basic_machine=m68k-sun + basic_os= + ;; + sun3os3) + basic_machine=m68k-sun + basic_os=sunos3 + ;; + sun3os4) + basic_machine=m68k-sun + basic_os=sunos4 + ;; + sun4) + basic_machine=sparc-sun + basic_os= + ;; + sun4os3) + basic_machine=sparc-sun + basic_os=sunos3 + ;; + sun4os4) + basic_machine=sparc-sun + basic_os=sunos4 + ;; + sun4sol2) + basic_machine=sparc-sun + basic_os=solaris2 + ;; + sun386 | sun386i | roadrunner) + basic_machine=i386-sun + basic_os= + ;; + sv1) + basic_machine=sv1-cray + basic_os=unicos + ;; + symmetry) + basic_machine=i386-sequent + basic_os=dynix + ;; + t3e) + basic_machine=alphaev5-cray + basic_os=unicos + ;; + t90) + basic_machine=t90-cray + basic_os=unicos + ;; + toad1) + basic_machine=pdp10-xkl + basic_os=tops20 + ;; + tpf) + basic_machine=s390x-ibm + basic_os=tpf + ;; + udi29k) + basic_machine=a29k-amd + basic_os=udi + ;; + ultra3) + basic_machine=a29k-nyu + basic_os=sym1 + ;; + v810 | necv810) + basic_machine=v810-nec + basic_os=none + ;; + vaxv) + basic_machine=vax-dec + basic_os=sysv + ;; + vms) + basic_machine=vax-dec + basic_os=vms + ;; + vsta) + basic_machine=i386-pc + basic_os=vsta + ;; + vxworks960) + basic_machine=i960-wrs + basic_os=vxworks + ;; + vxworks68) + basic_machine=m68k-wrs + basic_os=vxworks + ;; + vxworks29k) + basic_machine=a29k-wrs + basic_os=vxworks + ;; + xbox) + basic_machine=i686-pc + basic_os=mingw32 + ;; + ymp) + basic_machine=ymp-cray + basic_os=unicos + ;; + *) + basic_machine=$1 + basic_os= + ;; + esac ;; - -isc*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` +esac + +# Decode 1-component or ad-hoc basic machines +case $basic_machine in + # Here we handle the default manufacturer of certain CPU types. It is in + # some cases the only manufacturer, in others, it is the most popular. + w89k) + cpu=hppa1.1 + vendor=winbond ;; - -lynx*) - os=-lynxos + op50n) + cpu=hppa1.1 + vendor=oki ;; - -ptx*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-sequent/'` + op60c) + cpu=hppa1.1 + vendor=oki ;; - -windowsnt*) - os=`echo $os | sed -e 's/windowsnt/winnt/'` + ibm*) + cpu=i370 + vendor=ibm ;; - -psos*) - os=-psos + orion105) + cpu=clipper + vendor=highlevel ;; - -mint | -mint[0-9]*) - basic_machine=m68k-atari - os=-mint + mac | mpw | mac-mpw) + cpu=m68k + vendor=apple ;; -esac - -# Decode aliases for certain CPU-COMPANY combinations. -case $basic_machine in - # Recognize the basic CPU types without company name. - # Some are omitted here because they have special meanings below. - 1750a | 580 \ - | a29k \ - | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] | alphapca5[67] \ - | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] | alpha64pca5[67] \ - | arc | arm | arm[bl]e | arme[lb] | armv[2345] | armv[345][lb] | avr \ - | clipper \ - | d10v | d30v | dlx | dsp16xx \ - | fr30 | frv \ - | h8300 | h8500 | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ - | i370 | i860 | i960 | ia64 \ - | ip2k \ - | m32r | m68000 | m68k | m88k | mcore \ - | mips | mipsbe | mipseb | mipsel | mipsle \ - | mips16 \ - | mips64 | mips64el \ - | mips64vr | mips64vrel \ - | mips64orion | mips64orionel \ - | mips64vr4100 | mips64vr4100el \ - | mips64vr4300 | mips64vr4300el \ - | mips64vr5000 | mips64vr5000el \ - | mipsisa32 | mipsisa32el \ - | mipsisa32r2 | mipsisa32r2el \ - | mipsisa64 | mipsisa64el \ - | mipsisa64sb1 | mipsisa64sb1el \ - | mipsisa64sr71k | mipsisa64sr71kel \ - | mipstx39 | mipstx39el \ - | mn10200 | mn10300 \ - | msp430 \ - | ns16k | ns32k \ - | openrisc | or32 \ - | pdp10 | pdp11 | pj | pjl \ - | powerpc | powerpc64 | powerpc64le | powerpcle | ppcbe \ - | pyramid \ - | s390 | s390x \ - | sh | sh[1234] | sh3e | sh[34]eb | shbe | shle | sh[1234]le | sh3ele \ - | sh64 | sh64le \ - | sparc | sparc64 | sparc86x | sparclet | sparclite | sparcv9 | sparcv9b \ - | strongarm \ - | tahoe | thumb | tic80 | tron \ - | v850 | v850e \ - | we32k \ - | x86 | xscale | xstormy16 | xtensa \ - | z8k) - basic_machine=$basic_machine-unknown - ;; - m6811 | m68hc11 | m6812 | m68hc12) - # Motorola 68HC11/12. - basic_machine=$basic_machine-unknown - os=-none - ;; - m88110 | m680[12346]0 | m683?2 | m68360 | m5200 | v70 | w65 | z8k) + pmac | pmac-mpw) + cpu=powerpc + vendor=apple ;; - # We use `pc' rather than `unknown' - # because (1) that's what they normally are, and - # (2) the word "unknown" tends to confuse beginning users. - i*86 | x86_64) - basic_machine=$basic_machine-pc - ;; - # Object if more than one company name word. - *-*-*) - echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 - exit 1 - ;; - # Recognize the basic CPU types with company name. - 580-* \ - | a29k-* \ - | alpha-* | alphaev[4-8]-* | alphaev56-* | alphaev6[78]-* \ - | alpha64-* | alpha64ev[4-8]-* | alpha64ev56-* | alpha64ev6[78]-* \ - | alphapca5[67]-* | alpha64pca5[67]-* | arc-* \ - | arm-* | armbe-* | armle-* | armeb-* | armv*-* \ - | avr-* \ - | bs2000-* \ - | c[123]* | c30-* | [cjt]90-* | c4x-* | c54x-* \ - | clipper-* | cydra-* \ - | d10v-* | d30v-* | dlx-* \ - | elxsi-* \ - | f30[01]-* | f700-* | fr30-* | frv-* | fx80-* \ - | h8300-* | h8500-* \ - | hppa-* | hppa1.[01]-* | hppa2.0-* | hppa2.0[nw]-* | hppa64-* \ - | i*86-* | i860-* | i960-* | ia64-* \ - | ip2k-* \ - | m32r-* \ - | m68000-* | m680[012346]0-* | m68360-* | m683?2-* | m68k-* \ - | m88110-* | m88k-* | mcore-* \ - | mips-* | mipsbe-* | mipseb-* | mipsel-* | mipsle-* \ - | mips16-* \ - | mips64-* | mips64el-* \ - | mips64vr-* | mips64vrel-* \ - | mips64orion-* | mips64orionel-* \ - | mips64vr4100-* | mips64vr4100el-* \ - | mips64vr4300-* | mips64vr4300el-* \ - | mips64vr5000-* | mips64vr5000el-* \ - | mipsisa32-* | mipsisa32el-* \ - | mipsisa32r2-* | mipsisa32r2el-* \ - | mipsisa64-* | mipsisa64el-* \ - | mipsisa64sb1-* | mipsisa64sb1el-* \ - | mipsisa64sr71k-* | mipsisa64sr71kel-* \ - | mipstx39-* | mipstx39el-* \ - | msp430-* \ - | none-* | np1-* | nv1-* | ns16k-* | ns32k-* \ - | orion-* \ - | pdp10-* | pdp11-* | pj-* | pjl-* | pn-* | power-* \ - | powerpc-* | powerpc64-* | powerpc64le-* | powerpcle-* | ppcbe-* \ - | pyramid-* \ - | romp-* | rs6000-* \ - | s390-* | s390x-* \ - | sh-* | sh[1234]-* | sh3e-* | sh[34]eb-* | shbe-* \ - | shle-* | sh[1234]le-* | sh3ele-* | sh64-* | sh64le-* \ - | sparc-* | sparc64-* | sparc86x-* | sparclet-* | sparclite-* \ - | sparcv9-* | sparcv9b-* | strongarm-* | sv1-* | sx?-* \ - | tahoe-* | thumb-* | tic30-* | tic4x-* | tic54x-* | tic80-* | tron-* \ - | v850-* | v850e-* | vax-* \ - | we32k-* \ - | x86-* | x86_64-* | xps100-* | xscale-* | xstormy16-* \ - | xtensa-* \ - | ymp-* \ - | z8k-*) - ;; # Recognize the various machine names and aliases which stand # for a CPU type and a company and sometimes even an OS. - 386bsd) - basic_machine=i386-unknown - os=-bsd - ;; 3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc) - basic_machine=m68000-att + cpu=m68000 + vendor=att ;; 3b*) - basic_machine=we32k-att - ;; - a29khif) - basic_machine=a29k-amd - os=-udi - ;; - adobe68k) - basic_machine=m68010-adobe - os=-scout - ;; - alliant | fx80) - basic_machine=fx80-alliant - ;; - altos | altos3068) - basic_machine=m68k-altos - ;; - am29k) - basic_machine=a29k-none - os=-bsd - ;; - amdahl) - basic_machine=580-amdahl - os=-sysv - ;; - amiga | amiga-*) - basic_machine=m68k-unknown - ;; - amigaos | amigados) - basic_machine=m68k-unknown - os=-amigaos + cpu=we32k + vendor=att ;; - amigaunix | amix) - basic_machine=m68k-unknown - os=-sysv4 - ;; - apollo68) - basic_machine=m68k-apollo - os=-sysv - ;; - apollo68bsd) - basic_machine=m68k-apollo - os=-bsd - ;; - aux) - basic_machine=m68k-apple - os=-aux - ;; - balance) - basic_machine=ns32k-sequent - os=-dynix - ;; - c90) - basic_machine=c90-cray - os=-unicos - ;; - convex-c1) - basic_machine=c1-convex - os=-bsd - ;; - convex-c2) - basic_machine=c2-convex - os=-bsd - ;; - convex-c32) - basic_machine=c32-convex - os=-bsd - ;; - convex-c34) - basic_machine=c34-convex - os=-bsd - ;; - convex-c38) - basic_machine=c38-convex - os=-bsd - ;; - cray | j90) - basic_machine=j90-cray - os=-unicos - ;; - crds | unos) - basic_machine=m68k-crds - ;; - cris | cris-* | etrax*) - basic_machine=cris-axis - ;; - da30 | da30-*) - basic_machine=m68k-da30 - ;; - decstation | decstation-3100 | pmax | pmax-* | pmin | dec3100 | decstatn) - basic_machine=mips-dec + bluegene*) + cpu=powerpc + vendor=ibm + basic_os=cnk ;; decsystem10* | dec10*) - basic_machine=pdp10-dec - os=-tops10 + cpu=pdp10 + vendor=dec + basic_os=tops10 ;; decsystem20* | dec20*) - basic_machine=pdp10-dec - os=-tops20 + cpu=pdp10 + vendor=dec + basic_os=tops20 ;; delta | 3300 | motorola-3300 | motorola-delta \ | 3300-motorola | delta-motorola) - basic_machine=m68k-motorola - ;; - delta88) - basic_machine=m88k-motorola - os=-sysv3 - ;; - dpx20 | dpx20-*) - basic_machine=rs6000-bull - os=-bosx - ;; - dpx2* | dpx2*-bull) - basic_machine=m68k-bull - os=-sysv3 + cpu=m68k + vendor=motorola ;; - ebmon29k) - basic_machine=a29k-amd - os=-ebmon - ;; - elxsi) - basic_machine=elxsi-elxsi - os=-bsd + dpx2*) + cpu=m68k + vendor=bull + basic_os=sysv3 ;; encore | umax | mmax) - basic_machine=ns32k-encore + cpu=ns32k + vendor=encore ;; - es1800 | OSE68k | ose68k | ose | OSE) - basic_machine=m68k-ericsson - os=-ose + elxsi) + cpu=elxsi + vendor=elxsi + basic_os=${basic_os:-bsd} ;; fx2800) - basic_machine=i860-alliant + cpu=i860 + vendor=alliant ;; genix) - basic_machine=ns32k-ns - ;; - gmicro) - basic_machine=tron-gmicro - os=-sysv - ;; - go32) - basic_machine=i386-pc - os=-go32 + cpu=ns32k + vendor=ns ;; h3050r* | hiux*) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - h8300hms) - basic_machine=h8300-hitachi - os=-hms - ;; - h8300xray) - basic_machine=h8300-hitachi - os=-xray - ;; - h8500hms) - basic_machine=h8500-hitachi - os=-hms - ;; - harris) - basic_machine=m88k-harris - os=-sysv3 - ;; - hp300-*) - basic_machine=m68k-hp - ;; - hp300bsd) - basic_machine=m68k-hp - os=-bsd - ;; - hp300hpux) - basic_machine=m68k-hp - os=-hpux + cpu=hppa1.1 + vendor=hitachi + basic_os=hiuxwe2 ;; hp3k9[0-9][0-9] | hp9[0-9][0-9]) - basic_machine=hppa1.0-hp + cpu=hppa1.0 + vendor=hp ;; hp9k2[0-9][0-9] | hp9k31[0-9]) - basic_machine=m68000-hp + cpu=m68000 + vendor=hp ;; hp9k3[2-9][0-9]) - basic_machine=m68k-hp + cpu=m68k + vendor=hp ;; hp9k6[0-9][0-9] | hp6[0-9][0-9]) - basic_machine=hppa1.0-hp + cpu=hppa1.0 + vendor=hp ;; hp9k7[0-79][0-9] | hp7[0-79][0-9]) - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k78[0-9] | hp78[0-9]) # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893) # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[0-9][13679] | hp8[0-9][13679]) - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[0-9][0-9] | hp8[0-9][0-9]) - basic_machine=hppa1.0-hp - ;; - hppa-next) - os=-nextstep3 - ;; - hppaosf) - basic_machine=hppa1.1-hp - os=-osf + cpu=hppa1.0 + vendor=hp ;; - hppro) - basic_machine=hppa1.1-hp - os=-proelf - ;; - i370-ibm* | ibm*) - basic_machine=i370-ibm - ;; -# I'm not sure what "Sysv32" means. Should this be sysv3.2? i*86v32) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv32 + cpu=$(echo "$1" | sed -e 's/86.*/86/') + vendor=pc + basic_os=sysv32 ;; i*86v4*) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv4 + cpu=$(echo "$1" | sed -e 's/86.*/86/') + vendor=pc + basic_os=sysv4 ;; i*86v) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv + cpu=$(echo "$1" | sed -e 's/86.*/86/') + vendor=pc + basic_os=sysv ;; i*86sol2) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-solaris2 - ;; - i386mach) - basic_machine=i386-mach - os=-mach + cpu=$(echo "$1" | sed -e 's/86.*/86/') + vendor=pc + basic_os=solaris2 ;; - i386-vsta | vsta) - basic_machine=i386-unknown - os=-vsta + j90 | j90-cray) + cpu=j90 + vendor=cray + basic_os=${basic_os:-unicos} ;; iris | iris4d) - basic_machine=mips-sgi - case $os in - -irix*) + cpu=mips + vendor=sgi + case $basic_os in + irix*) ;; *) - os=-irix4 + basic_os=irix4 ;; esac ;; - isi68 | isi) - basic_machine=m68k-isi - os=-sysv - ;; - m88k-omron*) - basic_machine=m88k-omron - ;; - magnum | m3230) - basic_machine=mips-mips - os=-sysv - ;; - merlin) - basic_machine=ns32k-utek - os=-sysv - ;; - mingw32) - basic_machine=i386-pc - os=-mingw32 - ;; miniframe) - basic_machine=m68000-convergent - ;; - *mint | -mint[0-9]* | *MiNT | *MiNT[0-9]*) - basic_machine=m68k-atari - os=-mint - ;; - mips3*-*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'` - ;; - mips3*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`-unknown - ;; - mmix*) - basic_machine=mmix-knuth - os=-mmixware + cpu=m68000 + vendor=convergent ;; - monitor) - basic_machine=m68k-rom68k - os=-coff - ;; - morphos) - basic_machine=powerpc-unknown - os=-morphos - ;; - msdos) - basic_machine=i386-pc - os=-msdos - ;; - mvs) - basic_machine=i370-ibm - os=-mvs - ;; - ncr3000) - basic_machine=i486-ncr - os=-sysv4 - ;; - netbsd386) - basic_machine=i386-unknown - os=-netbsd - ;; - netwinder) - basic_machine=armv4l-rebel - os=-linux - ;; - news | news700 | news800 | news900) - basic_machine=m68k-sony - os=-newsos - ;; - news1000) - basic_machine=m68030-sony - os=-newsos + *mint | mint[0-9]* | *MiNT | *MiNT[0-9]*) + cpu=m68k + vendor=atari + basic_os=mint ;; news-3600 | risc-news) - basic_machine=mips-sony - os=-newsos - ;; - necv70) - basic_machine=v70-nec - os=-sysv - ;; - next | m*-next ) - basic_machine=m68k-next - case $os in - -nextstep* ) + cpu=mips + vendor=sony + basic_os=newsos + ;; + next | m*-next) + cpu=m68k + vendor=next + case $basic_os in + openstep*) + ;; + nextstep*) ;; - -ns2*) - os=-nextstep2 + ns2*) + basic_os=nextstep2 ;; *) - os=-nextstep3 + basic_os=nextstep3 ;; esac ;; - nh3000) - basic_machine=m68k-harris - os=-cxux - ;; - nh[45]000) - basic_machine=m88k-harris - os=-cxux - ;; - nindy960) - basic_machine=i960-intel - os=-nindy - ;; - mon960) - basic_machine=i960-intel - os=-mon960 - ;; - nonstopux) - basic_machine=mips-compaq - os=-nonstopux - ;; np1) - basic_machine=np1-gould - ;; - nv1) - basic_machine=nv1-cray - os=-unicosmp - ;; - nsr-tandem) - basic_machine=nsr-tandem + cpu=np1 + vendor=gould ;; op50n-* | op60c-*) - basic_machine=hppa1.1-oki - os=-proelf - ;; - or32 | or32-*) - basic_machine=or32-unknown - os=-coff - ;; - OSE68000 | ose68000) - basic_machine=m68000-ericsson - os=-ose - ;; - os68k) - basic_machine=m68k-none - os=-os68k + cpu=hppa1.1 + vendor=oki + basic_os=proelf ;; pa-hitachi) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - paragon) - basic_machine=i860-intel - os=-osf + cpu=hppa1.1 + vendor=hitachi + basic_os=hiuxwe2 ;; pbd) - basic_machine=sparc-tti + cpu=sparc + vendor=tti ;; pbb) - basic_machine=m68k-tti - ;; - pc532 | pc532-*) - basic_machine=ns32k-pc532 + cpu=m68k + vendor=tti ;; - pentium | p5 | k5 | k6 | nexgen | viac3) - basic_machine=i586-pc - ;; - pentiumpro | p6 | 6x86 | athlon | athlon_*) - basic_machine=i686-pc - ;; - pentiumii | pentium2) - basic_machine=i686-pc - ;; - pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*) - basic_machine=i586-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pentiumpro-* | p6-* | 6x86-* | athlon-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pentiumii-* | pentium2-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` + pc532) + cpu=ns32k + vendor=pc532 ;; pn) - basic_machine=pn-gould + cpu=pn + vendor=gould ;; - power) basic_machine=power-ibm + power) + cpu=power + vendor=ibm ;; - ppc) basic_machine=powerpc-unknown - ;; - ppc-*) basic_machine=powerpc-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - ppcle | powerpclittle | ppc-le | powerpc-little) - basic_machine=powerpcle-unknown - ;; - ppcle-* | powerpclittle-*) - basic_machine=powerpcle-`echo $basic_machine | sed 's/^[^-]*-//'` + ps2) + cpu=i386 + vendor=ibm ;; - ppc64) basic_machine=powerpc64-unknown + rm[46]00) + cpu=mips + vendor=siemens ;; - ppc64-*) basic_machine=powerpc64-`echo $basic_machine | sed 's/^[^-]*-//'` + rtpc | rtpc-*) + cpu=romp + vendor=ibm ;; - ppc64le | powerpc64little | ppc64-le | powerpc64-little) - basic_machine=powerpc64le-unknown + sde) + cpu=mipsisa32 + vendor=sde + basic_os=${basic_os:-elf} ;; - ppc64le-* | powerpc64little-*) - basic_machine=powerpc64le-`echo $basic_machine | sed 's/^[^-]*-//'` + simso-wrs) + cpu=sparclite + vendor=wrs + basic_os=vxworks ;; - ps2) - basic_machine=i386-ibm + tower | tower-32) + cpu=m68k + vendor=ncr ;; - pw32) - basic_machine=i586-unknown - os=-pw32 + vpp*|vx|vx-*) + cpu=f301 + vendor=fujitsu ;; - rom68k) - basic_machine=m68k-rom68k - os=-coff + w65) + cpu=w65 + vendor=wdc ;; - rm[46]00) - basic_machine=mips-siemens + w89k-*) + cpu=hppa1.1 + vendor=winbond + basic_os=proelf ;; - rtpc | rtpc-*) - basic_machine=romp-ibm + none) + cpu=none + vendor=none ;; - sa29200) - basic_machine=a29k-amd - os=-udi + leon|leon[3-9]) + cpu=sparc + vendor=$basic_machine ;; - sb1) - basic_machine=mipsisa64sb1-unknown + leon-*|leon[3-9]-*) + cpu=sparc + vendor=$(echo "$basic_machine" | sed 's/-.*//') ;; - sb1el) - basic_machine=mipsisa64sb1el-unknown + + *-*) + # shellcheck disable=SC2162 + IFS="-" read cpu vendor <&2 - exit 1 + # Recognize the canonical CPU types that are allowed with any + # company name. + case $cpu in + 1750a | 580 \ + | a29k \ + | aarch64 | aarch64_be \ + | abacus \ + | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] \ + | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] \ + | alphapca5[67] | alpha64pca5[67] \ + | am33_2.0 \ + | amdgcn \ + | arc | arceb \ + | arm | arm[lb]e | arme[lb] | armv* \ + | avr | avr32 \ + | asmjs \ + | ba \ + | be32 | be64 \ + | bfin | bpf | bs2000 \ + | c[123]* | c30 | [cjt]90 | c4x \ + | c8051 | clipper | craynv | csky | cydra \ + | d10v | d30v | dlx | dsp16xx \ + | e2k | elxsi | epiphany \ + | f30[01] | f700 | fido | fr30 | frv | ft32 | fx80 \ + | h8300 | h8500 \ + | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ + | hexagon \ + | i370 | i*86 | i860 | i960 | ia16 | ia64 \ + | ip2k | iq2000 \ + | k1om \ + | le32 | le64 \ + | lm32 \ + | m32c | m32r | m32rle \ + | m5200 | m68000 | m680[012346]0 | m68360 | m683?2 | m68k \ + | m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x \ + | m88110 | m88k | maxq | mb | mcore | mep | metag \ + | microblaze | microblazeel \ + | mips | mipsbe | mipseb | mipsel | mipsle \ + | mips16 \ + | mips64 | mips64eb | mips64el \ + | mips64octeon | mips64octeonel \ + | mips64orion | mips64orionel \ + | mips64r5900 | mips64r5900el \ + | mips64vr | mips64vrel \ + | mips64vr4100 | mips64vr4100el \ + | mips64vr4300 | mips64vr4300el \ + | mips64vr5000 | mips64vr5000el \ + | mips64vr5900 | mips64vr5900el \ + | mipsisa32 | mipsisa32el \ + | mipsisa32r2 | mipsisa32r2el \ + | mipsisa32r6 | mipsisa32r6el \ + | mipsisa64 | mipsisa64el \ + | mipsisa64r2 | mipsisa64r2el \ + | mipsisa64r6 | mipsisa64r6el \ + | mipsisa64sb1 | mipsisa64sb1el \ + | mipsisa64sr71k | mipsisa64sr71kel \ + | mipsr5900 | mipsr5900el \ + | mipstx39 | mipstx39el \ + | mmix \ + | mn10200 | mn10300 \ + | moxie \ + | mt \ + | msp430 \ + | nds32 | nds32le | nds32be \ + | nfp \ + | nios | nios2 | nios2eb | nios2el \ + | none | np1 | ns16k | ns32k | nvptx \ + | open8 \ + | or1k* \ + | or32 \ + | orion \ + | picochip \ + | pdp10 | pdp11 | pj | pjl | pn | power \ + | powerpc | powerpc64 | powerpc64le | powerpcle | powerpcspe \ + | pru \ + | pyramid \ + | riscv | riscv32 | riscv64 \ + | rl78 | romp | rs6000 | rx \ + | s390 | s390x \ + | score \ + | sh | shl \ + | sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \ + | sh[1234]e[lb] | sh[12345][lb]e | sh[23]ele | sh64 | sh64le \ + | sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet \ + | sparclite \ + | sparcv8 | sparcv9 | sparcv9b | sparcv9v | sv1 | sx* \ + | spu \ + | tahoe \ + | thumbv7* \ + | tic30 | tic4x | tic54x | tic55x | tic6x | tic80 \ + | tron \ + | ubicom32 \ + | v70 | v850 | v850e | v850e1 | v850es | v850e2 | v850e2v3 \ + | vax \ + | visium \ + | w65 \ + | wasm32 | wasm64 \ + | we32k \ + | x86 | x86_64 | xc16x | xgate | xps100 \ + | xstormy16 | xtensa* \ + | ymp \ + | z8k | z80) + ;; + + *) + echo Invalid configuration \`"$1"\': machine \`"$cpu-$vendor"\' not recognized 1>&2 + exit 1 + ;; + esac ;; esac # Here we canonicalize certain aliases for manufacturers. -case $basic_machine in - *-digital*) - basic_machine=`echo $basic_machine | sed 's/digital.*/dec/'` +case $vendor in + digital*) + vendor=dec ;; - *-commodore*) - basic_machine=`echo $basic_machine | sed 's/commodore.*/cbm/'` + commodore*) + vendor=cbm ;; *) ;; @@ -1070,168 +1279,213 @@ esac # Decode manufacturer-specific aliases for certain operating systems. -if [ x"$os" != x"" ] +if test x$basic_os != x then + +# First recognize some ad-hoc caes, or perhaps split kernel-os, or else just +# set os. +case $basic_os in + gnu/linux*) + kernel=linux + os=$(echo $basic_os | sed -e 's|gnu/linux|gnu|') + ;; + os2-emx) + kernel=os2 + os=$(echo $basic_os | sed -e 's|os2-emx|emx|') + ;; + nto-qnx*) + kernel=nto + os=$(echo $basic_os | sed -e 's|nto-qnx|qnx|') + ;; + *-*) + # shellcheck disable=SC2162 + IFS="-" read kernel os <&2 - exit 1 + # No normalization, but not necessarily accepted, that comes below. ;; esac + else # Here we handle the default operating systems that come with various machines. @@ -1244,225 +1498,356 @@ else # will signal an error saying that MANUFACTURER isn't an operating # system, and we'll never get to this point. -case $basic_machine in +kernel= +case $cpu-$vendor in + score-*) + os=elf + ;; + spu-*) + os=elf + ;; *-acorn) - os=-riscix1.2 + os=riscix1.2 ;; arm*-rebel) - os=-linux + kernel=linux + os=gnu ;; arm*-semi) - os=-aout + os=aout + ;; + c4x-* | tic4x-*) + os=coff + ;; + c8051-*) + os=elf + ;; + clipper-intergraph) + os=clix + ;; + hexagon-*) + os=elf + ;; + tic54x-*) + os=coff + ;; + tic55x-*) + os=coff + ;; + tic6x-*) + os=coff ;; # This must come before the *-dec entry. pdp10-*) - os=-tops20 + os=tops20 ;; pdp11-*) - os=-none + os=none ;; *-dec | vax-*) - os=-ultrix4.2 + os=ultrix4.2 ;; m68*-apollo) - os=-domain + os=domain ;; i386-sun) - os=-sunos4.0.2 + os=sunos4.0.2 ;; m68000-sun) - os=-sunos3 - # This also exists in the configure program, but was not the - # default. - # os=-sunos4 + os=sunos3 ;; m68*-cisco) - os=-aout + os=aout + ;; + mep-*) + os=elf ;; mips*-cisco) - os=-elf + os=elf ;; mips*-*) - os=-elf + os=elf ;; or32-*) - os=-coff + os=coff ;; *-tti) # must be before sparc entry or we get the wrong os. - os=-sysv3 + os=sysv3 ;; sparc-* | *-sun) - os=-sunos4.1.1 + os=sunos4.1.1 + ;; + pru-*) + os=elf ;; *-be) - os=-beos + os=beos ;; *-ibm) - os=-aix + os=aix + ;; + *-knuth) + os=mmixware ;; *-wec) - os=-proelf + os=proelf ;; *-winbond) - os=-proelf + os=proelf ;; *-oki) - os=-proelf + os=proelf ;; *-hp) - os=-hpux + os=hpux ;; *-hitachi) - os=-hiux + os=hiux ;; i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent) - os=-sysv + os=sysv ;; *-cbm) - os=-amigaos + os=amigaos ;; *-dg) - os=-dgux + os=dgux ;; *-dolphin) - os=-sysv3 + os=sysv3 ;; m68k-ccur) - os=-rtu + os=rtu ;; m88k-omron*) - os=-luna + os=luna ;; - *-next ) - os=-nextstep + *-next) + os=nextstep ;; *-sequent) - os=-ptx + os=ptx ;; *-crds) - os=-unos + os=unos ;; *-ns) - os=-genix + os=genix ;; i370-*) - os=-mvs - ;; - *-next) - os=-nextstep3 + os=mvs ;; *-gould) - os=-sysv + os=sysv ;; *-highlevel) - os=-bsd + os=bsd ;; *-encore) - os=-bsd + os=bsd ;; *-sgi) - os=-irix + os=irix ;; *-siemens) - os=-sysv4 + os=sysv4 ;; *-masscomp) - os=-rtu + os=rtu ;; f30[01]-fujitsu | f700-fujitsu) - os=-uxpv + os=uxpv ;; *-rom68k) - os=-coff + os=coff ;; *-*bug) - os=-coff + os=coff ;; *-apple) - os=-macos + os=macos ;; *-atari*) - os=-mint + os=mint + ;; + *-wrs) + os=vxworks ;; *) - os=-none + os=none ;; esac + fi +# Now, validate our (potentially fixed-up) OS. +case $os in + # Sometimes we do "kernel-abi", so those need to count as OSes. + musl* | newlib* | uclibc*) + ;; + # Likewise for "kernel-libc" + eabi | eabihf | gnueabi | gnueabihf) + ;; + # Now accept the basic system types. + # The portable systems comes first. + # Each alternative MUST end in a * to match a version number. + gnu* | android* | bsd* | mach* | minix* | genix* | ultrix* | irix* \ + | *vms* | esix* | aix* | cnk* | sunos | sunos[34]* \ + | hpux* | unos* | osf* | luna* | dgux* | auroraux* | solaris* \ + | sym* | plan9* | psp* | sim* | xray* | os68k* | v88r* \ + | hiux* | abug | nacl* | netware* | windows* \ + | os9* | macos* | osx* | ios* \ + | mpw* | magic* | mmixware* | mon960* | lnews* \ + | amigaos* | amigados* | msdos* | newsos* | unicos* | aof* \ + | aos* | aros* | cloudabi* | sortix* | twizzler* \ + | nindy* | vxsim* | vxworks* | ebmon* | hms* | mvs* \ + | clix* | riscos* | uniplus* | iris* | isc* | rtu* | xenix* \ + | mirbsd* | netbsd* | dicos* | openedition* | ose* \ + | bitrig* | openbsd* | solidbsd* | libertybsd* | os108* \ + | ekkobsd* | freebsd* | riscix* | lynxos* | os400* \ + | bosx* | nextstep* | cxux* | aout* | elf* | oabi* \ + | ptx* | coff* | ecoff* | winnt* | domain* | vsta* \ + | udi* | lites* | ieee* | go32* | aux* | hcos* \ + | chorusrdb* | cegcc* | glidix* \ + | cygwin* | msys* | pe* | moss* | proelf* | rtems* \ + | midipix* | mingw32* | mingw64* | mint* \ + | uxpv* | beos* | mpeix* | udk* | moxiebox* \ + | interix* | uwin* | mks* | rhapsody* | darwin* \ + | openstep* | oskit* | conix* | pw32* | nonstopux* \ + | storm-chaos* | tops10* | tenex* | tops20* | its* \ + | os2* | vos* | palmos* | uclinux* | nucleus* | morphos* \ + | scout* | superux* | sysv* | rtmk* | tpf* | windiss* \ + | powermax* | dnix* | nx6 | nx7 | sei* | dragonfly* \ + | skyos* | haiku* | rdos* | toppers* | drops* | es* \ + | onefs* | tirtos* | phoenix* | fuchsia* | redox* | bme* \ + | midnightbsd* | amdhsa* | unleashed* | emscripten* | wasi* \ + | nsk* | powerunix* | genode* | zvmoe* | qnx* | emx*) + ;; + # This one is extra strict with allowed versions + sco3.2v2 | sco3.2v[4-9]* | sco5v6*) + # Don't forget version if it is 3.2v4 or newer. + ;; + none) + ;; + *) + echo Invalid configuration \`"$1"\': OS \`"$os"\' not recognized 1>&2 + exit 1 + ;; +esac + +# As a final step for OS-related things, validate the OS-kernel combination +# (given a valid OS), if there is a kernel. +case $kernel-$os in + linux-gnu* | linux-dietlibc* | linux-android* | linux-newlib* | linux-musl* | linux-uclibc* ) + ;; + uclinux-uclibc* ) + ;; + -dietlibc* | -newlib* | -musl* | -uclibc* ) + # These are just libc implementations, not actual OSes, and thus + # require a kernel. + echo "Invalid configuration \`$1': libc \`$os' needs explicit kernel." 1>&2 + exit 1 + ;; + kfreebsd*-gnu* | kopensolaris*-gnu*) + ;; + nto-qnx*) + ;; + os2-emx) + ;; + *-eabi* | *-gnueabi*) + ;; + -*) + # Blank kernel with real OS is always fine. + ;; + *-*) + echo "Invalid configuration \`$1': Kernel \`$kernel' not known to work with OS \`$os'." 1>&2 + exit 1 + ;; +esac + # Here we handle the case where we know the os, and the CPU type, but not the # manufacturer. We pick the logical manufacturer. -vendor=unknown -case $basic_machine in - *-unknown) - case $os in - -riscix*) +case $vendor in + unknown) + case $cpu-$os in + *-riscix*) vendor=acorn ;; - -sunos*) + *-sunos*) vendor=sun ;; - -aix*) + *-cnk* | *-aix*) vendor=ibm ;; - -beos*) + *-beos*) vendor=be ;; - -hpux*) + *-hpux*) vendor=hp ;; - -mpeix*) + *-mpeix*) vendor=hp ;; - -hiux*) + *-hiux*) vendor=hitachi ;; - -unos*) + *-unos*) vendor=crds ;; - -dgux*) + *-dgux*) vendor=dg ;; - -luna*) + *-luna*) vendor=omron ;; - -genix*) + *-genix*) vendor=ns ;; - -mvs* | -opened*) + *-clix*) + vendor=intergraph + ;; + *-mvs* | *-opened*) vendor=ibm ;; - -ptx*) + *-os400*) + vendor=ibm + ;; + s390-* | s390x-*) + vendor=ibm + ;; + *-ptx*) vendor=sequent ;; - -vxsim* | -vxworks* | -windiss*) + *-tpf*) + vendor=ibm + ;; + *-vxsim* | *-vxworks* | *-windiss*) vendor=wrs ;; - -aux*) + *-aux*) vendor=apple ;; - -hms*) + *-hms*) vendor=hitachi ;; - -mpw* | -macos*) + *-mpw* | *-macos*) vendor=apple ;; - -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) + *-*mint | *-mint[0-9]* | *-*MiNT | *-MiNT[0-9]*) vendor=atari ;; - -vos*) + *-vos*) vendor=stratus ;; esac - basic_machine=`echo $basic_machine | sed "s/unknown/$vendor/"` ;; esac -echo $basic_machine$os -exit 0 +echo "$cpu-$vendor-${kernel:+$kernel-}$os" +exit # Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) +# eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" From 6d92f13bcdea6764456580438154de5c08b791b7 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 18:02:12 -0800 Subject: [PATCH 463/534] Don't use linker script on x86_64, there is no need for it and it breaks flatpak builds --- .../BasiliskII.xcodeproj/project.pbxproj | 2 - BasiliskII/src/Unix/configure.ac | 1 - BasiliskII/src/Unix/ldscripts/linux-x86_64.ld | 171 ------------------ 3 files changed, 174 deletions(-) delete mode 100644 BasiliskII/src/Unix/ldscripts/linux-x86_64.ld diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8f24f6c4a..99f599cd6 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -250,7 +250,6 @@ 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "freebsd-i386.ld"; sourceTree = ""; }; 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-i386.ld"; sourceTree = ""; }; 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-ppc.ld"; sourceTree = ""; }; - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-x86_64.ld"; sourceTree = ""; }; 7539E2181F23B32A006B2DF2 /* egrep.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = egrep.m4; sourceTree = ""; }; 7539E2191F23B32A006B2DF2 /* esd.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = esd.m4; sourceTree = ""; }; 7539E21A1F23B32A006B2DF2 /* gettext.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gettext.m4; sourceTree = ""; }; @@ -720,7 +719,6 @@ 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */, 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */, 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */, - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */, ); path = ldscripts; sourceTree = ""; diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 406dff893..90eb96d99 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1391,7 +1391,6 @@ AC_PATH_PROG([BLESS], "true") dnl Check for linker script support case $target_os:$target_cpu in linux*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; -linux*:x86_64) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-x86_64.ld";; linux*:powerpc) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-ppc.ld";; netbsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/linux-i386.ld";; freebsd*:i?86) LINKER_SCRIPT_FLAGS="-Wl,-T,ldscripts/freebsd-i386.ld";; diff --git a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld b/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld deleted file mode 100644 index b824271ab..000000000 --- a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld +++ /dev/null @@ -1,171 +0,0 @@ -/* Default linker script, for normal executables */ -OUTPUT_FORMAT("elf64-x86-64", "elf64-x86-64", "elf64-x86-64") -OUTPUT_ARCH(i386:x86-64) -ENTRY(_start) -SEARCH_DIR("/lib64"); SEARCH_DIR("/usr/lib64"); SEARCH_DIR("/usr/local/lib64"); -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.init : { *(.rel.init) } - .rela.init : { *(.rela.init) } - .rel.text : { *(.rel.text .rel.text.* .rel.gnu.linkonce.t.*) } - .rela.text : { *(.rela.text .rela.text.* .rela.gnu.linkonce.t.*) } - .rel.fini : { *(.rel.fini) } - .rela.fini : { *(.rela.fini) } - .rel.rodata : { *(.rel.rodata .rel.rodata.* .rel.gnu.linkonce.r.*) } - .rela.rodata : { *(.rela.rodata .rela.rodata.* .rela.gnu.linkonce.r.*) } - .rel.data : { *(.rel.data .rel.data.* .rel.gnu.linkonce.d.*) } - .rela.data : { *(.rela.data .rela.data.* .rela.gnu.linkonce.d.*) } - .rel.tdata : { *(.rel.tdata .rel.tdata.* .rel.gnu.linkonce.td.*) } - .rela.tdata : { *(.rela.tdata .rela.tdata.* .rela.gnu.linkonce.td.*) } - .rel.tbss : { *(.rel.tbss .rel.tbss.* .rel.gnu.linkonce.tb.*) } - .rela.tbss : { *(.rela.tbss .rela.tbss.* .rela.gnu.linkonce.tb.*) } - .rel.ctors : { *(.rel.ctors) } - .rela.ctors : { *(.rela.ctors) } - .rel.dtors : { *(.rel.dtors) } - .rela.dtors : { *(.rela.dtors) } - .rel.got : { *(.rel.got) } - .rela.got : { *(.rela.got) } - .rel.bss : { *(.rel.bss .rel.bss.* .rel.gnu.linkonce.b.*) } - .rela.bss : { *(.rela.bss .rela.bss.* .rela.gnu.linkonce.b.*) } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : - { - KEEP (*(.init)) - } =0x90909090 - .plt : { *(.plt) } - .text : - { - *(.text .stub .text.* .gnu.linkonce.t.*) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - } =0x90909090 - .fini : - { - KEEP (*(.fini)) - } =0x90909090 - PROVIDE (__etext = .); - PROVIDE (_etext = .); - PROVIDE (etext = .); - .rodata : { *(.rodata .rodata.* .gnu.linkonce.r.*) } - .rodata1 : { *(.rodata1) } - .eh_frame_hdr : { *(.eh_frame_hdr) } - .eh_frame : ONLY_IF_RO { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RO { *(.gcc_except_table) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN (0x100000) - ((0x100000 - .) & (0x100000 - 1)); . = DATA_SEGMENT_ALIGN (0x100000, 0x1000); - /* Ensure the __preinit_array_start label is properly aligned. We - could instead move the label definition inside the section, but - the linker would then create the section even if it turns out to - be empty, which isn't pretty. */ - . = ALIGN(64 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { *(.preinit_array) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { *(.init_array) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { *(.fini_array) } - PROVIDE (__fini_array_end = .); - .data : - { - *(.data .data.* .gnu.linkonce.d.*) - SORT(CONSTRUCTORS) - } - .data1 : { *(.data1) } - .tdata : { *(.tdata .tdata.* .gnu.linkonce.td.*) } - .tbss : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) } - .eh_frame : ONLY_IF_RW { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RW { *(.gcc_except_table) } - .dynamic : { *(.dynamic) } - .ctors : - { - /* gcc uses crtbegin.o to find the start of - the constructors, so we make sure it is - first. Because this is a wildcard, it - doesn't matter if the user does not - actually link against crtbegin.o; the - linker won't look for a file to match a - wildcard. The wildcard also means that it - doesn't matter which directory crtbegin.o - is in. */ - KEEP (*crtbegin.o(.ctors)) - /* We don't want to include the .ctor section from - from the crtend.o file until after the sorted ctors. - The .ctor section from the crtend file contains the - end of ctors marker and it must be last */ - KEEP (*(EXCLUDE_FILE (*crtend.o ) .ctors)) - KEEP (*(SORT(.ctors.*))) - KEEP (*(.ctors)) - } - .dtors : - { - KEEP (*crtbegin.o(.dtors)) - KEEP (*(EXCLUDE_FILE (*crtend.o ) .dtors)) - KEEP (*(SORT(.dtors.*))) - KEEP (*(.dtors)) - } - .jcr : { KEEP (*(.jcr)) } - .got : { *(.got.plt) *(.got) } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .bss : - { - *(.dynbss) - *(.bss .bss.* .gnu.linkonce.b.*) - *(COMMON) - /* Align here to ensure that the .bss section occupies space up to - _end. Align after .bss to ensure correct alignment even if the - .bss section disappears because there are no input sections. */ - . = ALIGN(64 / 8); - } - . = ALIGN(64 / 8); - _end = .; - PROVIDE (end = .); - . = DATA_SEGMENT_END (.); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } -} From 144b1178869ee0a1f8b4ea6ddba7d2bbce3a65bf Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 30 Dec 2020 07:54:21 -0800 Subject: [PATCH 464/534] Fix JIT enable logic --- BasiliskII/src/Unix/configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 90eb96d99..f102ca949 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1661,7 +1661,7 @@ elif [[ "x$WANT_NATIVE_M68K" = "xyes" ]]; then fi dnl Enable JIT compiler, if possible. -if [[ "x$WANT_JIT" = "xyes" -a "x$CAN_JIT" ]]; then +if [[ "x$WANT_JIT" = "xyes" -a "x$CAN_JIT" = "xyes" ]]; then JITSRCS="$JITSRCS ../uae_cpu/compiler/compemu_support.cpp ../uae_cpu/compiler/compemu_fpp.cpp compstbl.o cpustbl_nf.o" DEFINES="$DEFINES -DUSE_JIT -DUSE_JIT_FPU" From 69bf439fac3349b376be9290acd7906ff13063c1 Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 30 Dec 2020 07:59:53 -0800 Subject: [PATCH 465/534] Merge Travis CI config from emaculation/macemu --- .travis.yml | 61 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 61 insertions(+) create mode 100644 .travis.yml diff --git a/.travis.yml b/.travis.yml new file mode 100644 index 000000000..2529b7120 --- /dev/null +++ b/.travis.yml @@ -0,0 +1,61 @@ +language: cpp + +# Do not build branches of the form "pr/*". By prefixing pull requests coming +# from branches inside the repository with pr/, this avoids building both the +# branch push _and_ the pull request. +# Based on https://github.com/boostorg/hana/blob/master/.travis.yml +branches: + except: /pr\/.*/ + +jobs: + include: + - os: linux + arch: amd64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=amd64-linux-basiliskii + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd BasiliskII/src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make + - os: linux + arch: arm64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=arm64-linux-basiliskii + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd BasiliskII/src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make + - os: linux + arch: amd64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=amd64-linux-sheepshaver + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd SheepShaver + - make links + - cd src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make From 0fd17a98ffe16e8a8f1e4a916dcc13e67f779bb0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 31 Jan 2021 21:20:47 +0900 Subject: [PATCH 466/534] BII: fixed thousands colors mode --- BasiliskII/src/CrossPlatform/video_blit.cpp | 10 ---------- 1 file changed, 10 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index 5f1a0ae3a..ebff0f094 100755 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -528,16 +528,6 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; - -#if __MACOSX__ && !defined(SHEEPSHAVER) - // dludwig@pobox.com, HACK: This works on OSX (64-bit, at least), but not Linux (32-bit?). Why? - // To note, __MACOSX__ is an SDL-declared macro (for platform identification at compile time). - } else if (mac_depth == 16) { - - Screen_blit = Blit_Copy_Raw; - -#endif - } else { // Compute RGB shift values From 3f4eed670fd6ad9292eb72f4cbb6688ff52845c8 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 2 Feb 2021 18:35:57 +0900 Subject: [PATCH 467/534] fix for SDL 2.0.14 --- BasiliskII/src/SDL/video_sdl2.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 158728c17..324aa9883 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2245,6 +2245,7 @@ static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) case SDL_WINDOWEVENT: { switch (event->window.event) { case SDL_WINDOWEVENT_RESIZED: { + if (!redraw_thread_active) break; // Handle changes of fullscreen. This is done here, in // on_sdl_event_generated() and not the main SDL_Event-processing // loop, in order to perform this change on the main thread. From b539de9753a08db61d5eb2e8dcfe8d11bd1244ee Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 3 Feb 2021 10:06:33 +0900 Subject: [PATCH 468/534] SS: fixed minimum system version --- SheepShaver/src/MacOSX/Info.plist.in | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index ada536e38..dfe702403 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -43,11 +43,8 @@ x86_64 - LSMinimumSystemVersionByArchitecture - - x86_64 - 10.7.0 - + LSMinimumSystemVersion + 10.7.0 NSHighResolutionCapable From 5620ef8c43a3f577ee970ae41c430b3c6a953c7c Mon Sep 17 00:00:00 2001 From: Glenn Anderson Date: Wed, 3 Feb 2021 09:16:11 -0800 Subject: [PATCH 469/534] Improved fix for resource forks not being created on APFS volumes --- BasiliskII/src/MacOSX/extfs_macosx.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/MacOSX/extfs_macosx.cpp b/BasiliskII/src/MacOSX/extfs_macosx.cpp index dea61b009..760c378ff 100644 --- a/BasiliskII/src/MacOSX/extfs_macosx.cpp +++ b/BasiliskII/src/MacOSX/extfs_macosx.cpp @@ -252,7 +252,7 @@ static int open_rsrc(const char *path, int flag) make_rsrc_path(path, rsrc_path); int fd = open(rsrc_path, flag); - if (fd < 0 && flag == O_WRONLY) fd = open(rsrc_path, O_WRONLY | O_CREAT); // for APFS + if (fd < 0 && (flag == O_WRONLY || flag == O_RDWR)) fd = open(rsrc_path, flag | O_CREAT); // for APFS return fd; } From 8ebc4c90c30a14ae41af6a0f34174656955d3bb7 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 5 Feb 2021 13:05:43 +0900 Subject: [PATCH 470/534] SS: added pref keyword "redir" --- SheepShaver/src/prefs_items.cpp | 1 + 1 file changed, 1 insertion(+) diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index f98424ec1..5efc1e302 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -69,6 +69,7 @@ prefs_desc common_prefs_items[] = { {"gammaramp", TYPE_STRING, false, "gamma ramp (on, off or fullscreen)"}, {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, + {"redir", TYPE_STRING, true, "port forwarding for slirp"}, {NULL, TYPE_END, false, NULL} // End of list }; From 556ec0cf80ad96758f524a2ea1a40019d08272cc Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 5 Feb 2021 22:13:46 +0900 Subject: [PATCH 471/534] added port forwarding for Windows --- BasiliskII/src/Unix/configure.ac | 4 - BasiliskII/src/Windows/ether_windows.cpp | 95 ++++++++++++++++++++++++ 2 files changed, 95 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 643ce699c..e5fb37b0c 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -471,10 +471,6 @@ if [[ "x$WANT_GTK" = "xgtk" ]]; then AM_PATH_GTK(1.2.0, [ GUI_CFLAGS="$GTK_CFLAGS" GUI_LIBS="$GTK_LIBS" - dnl somehow, would redefine gettext() to nothing if - dnl ENABLE_NLS is not set, thusly conflicting with C++ which - dnl includes - AM_GNU_GETTEXT B2_PATH_GNOMEUI([ AC_DEFINE(HAVE_GNOMEUI, 1, [Define if libgnomeui is available.]) GUI_CFLAGS="$GUI_CFLAGS $GNOMEUI_CFLAGS" diff --git a/BasiliskII/src/Windows/ether_windows.cpp b/BasiliskII/src/Windows/ether_windows.cpp index aa40a8b8d..1f9e245e5 100755 --- a/BasiliskII/src/Windows/ether_windows.cpp +++ b/BasiliskII/src/Windows/ether_windows.cpp @@ -42,6 +42,7 @@ // somehow util_windows undefines min #define min(x,y) ((x) < (y) ? (x) : (y)) #include "libslirp.h" +#include "ctl.h" // Define to let the slirp library determine the right timeout for select() #define USE_SLIRP_TIMEOUT 1 @@ -200,6 +201,8 @@ static int16 ether_do_add_multicast(uint8 *addr); static int16 ether_do_del_multicast(uint8 *addr); static int16 ether_do_write(uint32 arg); static void ether_do_interrupt(void); +static void slirp_add_redirs(); +static int slirp_add_redir(const char *redir_str); /* @@ -263,6 +266,7 @@ bool ether_init(void) WarningAlert(GetString(STR_SLIRP_NO_DNS_FOUND_WARN)); return false; } + slirp_add_redirs(); } // Open ethernet device @@ -1640,6 +1644,97 @@ static void ether_do_interrupt(void) } } +// Helper function for port forwarding +static int get_str_sep(char *buf, int buf_size, const char **pp, int sep) +{ + const char *p, *p1; + int len; + p = *pp; + p1 = strchr(p, sep); + if (!p1) + return -1; + len = p1 - p; + p1++; + if (buf_size > 0) { + if (len > buf_size - 1) + len = buf_size - 1; + memcpy(buf, p, len); + buf[len] = '\0'; + } + *pp = p1; + return 0; +} + +// Set up port forwarding for slirp +static void slirp_add_redirs() +{ + int index = 0; + const char *str; + while ((str = PrefsFindString("redir", index++)) != NULL) { + slirp_add_redir(str); + } +} + +// Add a port forward/redirection for slirp +static int slirp_add_redir(const char *redir_str) +{ + // code adapted from qemu source + struct in_addr guest_addr = {0}; + int host_port, guest_port; + const char *p; + char buf[256]; + int is_udp; + char *end; + char str[256]; + + p = redir_str; + if (!p || get_str_sep(buf, sizeof(buf), &p, ':') < 0) { + goto fail_syntax; + } + if (!strcmp(buf, "tcp") || buf[0] == '\0') { + is_udp = 0; + } else if (!strcmp(buf, "udp")) { + is_udp = 1; + } else { + goto fail_syntax; + } + + if (get_str_sep(buf, sizeof(buf), &p, ':') < 0) { + goto fail_syntax; + } + host_port = strtol(buf, &end, 0); + if (*end != '\0' || host_port < 1 || host_port > 65535) { + goto fail_syntax; + } + + if (get_str_sep(buf, sizeof(buf), &p, ':') < 0) { + goto fail_syntax; + } + // 0.0.0.0 doesn't seem to work, so default to a client address + // if none is specified + if (buf[0] == '\0' ? + !inet_pton(AF_INET, CTL_LOCAL, &guest_addr) : + !inet_pton(AF_INET, buf, &guest_addr)) { + goto fail_syntax; + } + + guest_port = strtol(p, &end, 0); + if (*end != '\0' || guest_port < 1 || guest_port > 65535) { + goto fail_syntax; + } + + if (slirp_redir(is_udp, host_port, guest_addr, guest_port) < 0) { + sprintf(str, "could not set up host forwarding rule '%s'", redir_str); + WarningAlert(str); + return -1; + } + return 0; + + fail_syntax: + sprintf(str, "invalid host forwarding rule '%s'", redir_str); + WarningAlert(str); + return -1; +} #if DEBUG #pragma optimize("",on) #endif From 89e8a05815e6ded082e3ac0afc4270c9a121e94a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 6 Feb 2021 13:06:13 +0900 Subject: [PATCH 472/534] startup sound --- BasiliskII/src/SDL/audio_sdl.cpp | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 452867381..588eb1a7c 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -29,6 +29,7 @@ #include #include #include +#include #define DEBUG 0 #include "debug.h" @@ -54,6 +55,7 @@ static bool audio_mute = false; // Prototypes static void stream_func(void *arg, uint8 *stream, int stream_len); +static int play_startup(void *arg); /* @@ -166,6 +168,8 @@ void AudioInit(void) // Open and initialize audio device open_audio(); + + SDL_CreateThread(play_startup, "", NULL); } @@ -359,3 +363,23 @@ void audio_set_speaker_mute(bool mute) void audio_set_speaker_volume(uint32 vol) { } + +static int play_startup(void *arg) { + SDL_AudioSpec wav_spec; + Uint8 *wav_buffer; + Uint32 wav_length; + if (SDL_LoadWAV("startup.wav", &wav_spec, &wav_buffer, &wav_length)) { + SDL_AudioSpec desired = { .freq = 44100, .format = AUDIO_S16, .channels = 1, .samples= 4096 }, obtained; + SDL_AudioDeviceID deviceId = SDL_OpenAudioDevice(NULL, 0, &desired, &obtained, 0); + if (deviceId) { + SDL_QueueAudio(deviceId, wav_buffer, wav_length); + SDL_PauseAudioDevice(deviceId, 0); + while (SDL_GetQueuedAudioSize(deviceId)) SDL_Delay(10); + SDL_Delay(500); + SDL_CloseAudioDevice(deviceId); + } + else printf("play_startup: Audio driver failed to initialize\n"); + SDL_FreeWAV(wav_buffer); + } + return 0; +} From fbddf063cbde01cfed2061be863cbc88e8693eed Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 7 Feb 2021 09:34:22 +0900 Subject: [PATCH 473/534] fixed swapping opt and cmd key if keycode file is used --- BasiliskII/src/SDL/video_sdl2.cpp | 24 ++++++++++++++++-------- 1 file changed, 16 insertions(+), 8 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 324aa9883..633757924 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -2053,13 +2053,19 @@ static bool is_hotkey_down(SDL_Keysym const & ks) (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); } -static bool swap_opt_cmd() { +static int modify_opt_cmd(int code) { static bool f, c; if (!f) { f = true; c = PrefsFindBool("swap_opt_cmd"); } - return c; + if (c) { + switch (code) { + case 0x37: return 0x3a; + case 0x3a: return 0x37; + } + } + return code; } /* @@ -2136,8 +2142,8 @@ static int kc_decode(SDL_Keysym const & ks, bool key_down) case SDLK_RCTRL: return 0x36; case SDLK_LSHIFT: return 0x38; case SDLK_RSHIFT: return 0x38; - case SDLK_LALT: case SDLK_RALT: return swap_opt_cmd() ? 0x37 : 0x3a; - case SDLK_LGUI: case SDLK_RGUI: return swap_opt_cmd() ? 0x3a : 0x37; + case SDLK_LALT: case SDLK_RALT: return 0x3a; + case SDLK_LGUI: case SDLK_RGUI: return 0x37; case SDLK_MENU: return 0x32; case SDLK_CAPSLOCK: return 0x39; case SDLK_NUMLOCKCLEAR: return 0x47; @@ -2348,6 +2354,7 @@ static void handle_events(void) code = event2keycode(event.key, true); if (code >= 0) { if (!emul_suspended) { + code = modify_opt_cmd(code); #ifdef __MACOSX__ ADBKeyDown(code); #else @@ -2358,9 +2365,9 @@ static void handle_events(void) #endif if (code == 0x36) ctrl_down = true; - if (code == (swap_opt_cmd() ? 0x37 : 0x3a)) + if (code == 0x3a) opt_down = true; - if (code == (swap_opt_cmd() ? 0x3a : 0x37)) + if (code == 0x37) cmd_down = true; } else { @@ -2377,6 +2384,7 @@ static void handle_events(void) if (code == CODE_INVALID) code = event2keycode(event.key, false); if (code >= 0) { + code = modify_opt_cmd(code); #ifdef __MACOSX__ ADBKeyUp(code); #else @@ -2385,9 +2393,9 @@ static void handle_events(void) #endif if (code == 0x36) ctrl_down = false; - if (code == (swap_opt_cmd() ? 0x37 : 0x3a)) + if (code == 0x3a) opt_down = false; - if (code == (swap_opt_cmd() ? 0x3a : 0x37)) + if (code == 0x37) cmd_down = false; } break; From 4cf65a3faf22babd5aa403b02d33ce1c7e5f324c Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 10 Feb 2021 22:12:38 +0900 Subject: [PATCH 474/534] fixed initial window title --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 633757924..c0e4191ed 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -768,7 +768,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags if (!sdl_window) { int m = get_mag_rate(); sdl_window = SDL_CreateWindow( - "Basilisk II", + GetString(STR_WINDOW_TITLE), SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, m * window_width, From 09046e0a2ffc500b7318e75ce51ccf6d0da82520 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 14 Feb 2021 16:25:02 +0900 Subject: [PATCH 475/534] check Metal device --- .../MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ++++ BasiliskII/src/MacOSX/utils_macosx.h | 2 ++ BasiliskII/src/MacOSX/utils_macosx.mm | 14 ++++++++++++++ BasiliskII/src/SDL/video_sdl2.cpp | 13 ++++++++----- .../SheepShaver_Xcode8.xcodeproj/project.pbxproj | 4 ++++ 5 files changed, 32 insertions(+), 5 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 8f24f6c4a..81dfaf8ca 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -94,6 +94,7 @@ E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; + E447066D25D8FCB400EA2C14 /* Metal.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E447066C25D8FCB400EA2C14 /* Metal.framework */; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; @@ -339,6 +340,7 @@ E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; + E447066C25D8FCB400EA2C14 /* Metal.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Metal.framework; path = System/Library/Frameworks/Metal.framework; sourceTree = SDKROOT; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; @@ -357,6 +359,7 @@ E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */, 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */, 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */, + E447066D25D8FCB400EA2C14 /* Metal.framework in Frameworks */, 752F26F91F240E51001032B4 /* Foundation.framework in Frameworks */, ); runOnlyForDeploymentPostprocessing = 0; @@ -416,6 +419,7 @@ 752F26F71F240E51001032B4 /* Frameworks */ = { isa = PBXGroup; children = ( + E447066C25D8FCB400EA2C14 /* Metal.framework */, E416BEE92410AA9800751E6D /* Security.framework */, E413D93520D260DA00E437D8 /* SDL2.framework */, 756C1B381F25306A00620917 /* AppKit.framework */, diff --git a/BasiliskII/src/MacOSX/utils_macosx.h b/BasiliskII/src/MacOSX/utils_macosx.h index fc2c83c69..0b7bb0c8d 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.h +++ b/BasiliskII/src/MacOSX/utils_macosx.h @@ -24,4 +24,6 @@ // Invokes the specified function with an NSAutoReleasePool in place. void NSAutoReleasePool_wrap(void (*fn)(void)); +bool MetalIsAvailable(); + #endif diff --git a/BasiliskII/src/MacOSX/utils_macosx.mm b/BasiliskII/src/MacOSX/utils_macosx.mm index c68d21150..9dbcff693 100644 --- a/BasiliskII/src/MacOSX/utils_macosx.mm +++ b/BasiliskII/src/MacOSX/utils_macosx.mm @@ -27,6 +27,9 @@ #include #endif +#include +#include + // This is used from video_sdl.cpp. void NSAutoReleasePool_wrap(void (*fn)(void)) { @@ -81,3 +84,14 @@ void set_current_directory() [pool release]; } +bool MetalIsAvailable() { + const int EL_CAPITAN = 15; // Darwin major version of El Capitan + char s[16]; + size_t size = sizeof(s); + int v; + if (sysctlbyname("kern.osrelease", s, &size, NULL, 0) || sscanf(s, "%d", &v) != 1 || v < EL_CAPITAN) return false; + id dev = MTLCreateSystemDefaultDevice(); + bool r = dev != nil; + [dev release]; + return r; +} diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index c0e4191ed..ff62e411f 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -50,6 +50,10 @@ #include #include +#ifdef __MACOSX__ +#include "utils_macosx.h" +#endif + #ifdef WIN32 #include /* alloca() */ #endif @@ -760,11 +764,10 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); -/* - // Always use a resize-able window. This helps allow SDL to manage - // transitions involving fullscreen to or from windowed-mode. - window_flags |= SDL_WINDOW_RESIZABLE; -*/ +#ifdef __MACOSX__ + if (MetalIsAvailable()) window_flags |= SDL_WINDOW_METAL; +#endif + if (!sdl_window) { int m = get_mag_rate(); sdl_window = SDL_CreateWindow( diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 618917627..8002534c9 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -90,6 +90,7 @@ E420260B24125442000508DF /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E420260A2412540D000508DF /* etherhelpertool */; }; E420910120D0C4FA0094654F /* SDL2.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E420910020D0C4FA0094654F /* SDL2.framework */; }; E444DC1520C8F06700DD29C9 /* pict.c in Sources */ = {isa = PBXBuildFile; fileRef = E444DC1420C8F06700DD29C9 /* pict.c */; }; + E447067025D904D500EA2C14 /* Metal.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E447066F25D904D500EA2C14 /* Metal.framework */; }; E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; E44C460720D262B0000583AE /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DF20D262AD000583AE /* ip_icmp.c */; }; @@ -348,6 +349,7 @@ E420910020D0C4FA0094654F /* SDL2.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = SDL2.framework; path = /Library/Frameworks/SDL2.framework; sourceTree = ""; }; E4302EE21FBFE7FA00A5B500 /* lowmem.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = lowmem.c; path = Darwin/lowmem.c; sourceTree = ""; }; E444DC1420C8F06700DD29C9 /* pict.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = pict.c; path = ../pict.c; sourceTree = ""; }; + E447066F25D904D500EA2C14 /* Metal.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Metal.framework; path = System/Library/Frameworks/Metal.framework; sourceTree = SDKROOT; }; E44C45DC20D262AD000583AE /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tftp.c; path = ../../../BasiliskII/src/slirp/tftp.c; sourceTree = ""; }; E44C45DD20D262AD000583AE /* mbuf.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = mbuf.c; path = ../../../BasiliskII/src/slirp/mbuf.c; sourceTree = ""; }; E44C45DE20D262AD000583AE /* tftp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tftp.h; path = ../../../BasiliskII/src/slirp/tftp.h; sourceTree = ""; }; @@ -412,6 +414,7 @@ E420260524125182000508DF /* Security.framework in Frameworks */, 0856D21514A9A6C6000B1711 /* IOKit.framework in Frameworks */, 08CD42DC14B7B85B009CA2A2 /* Cocoa.framework in Frameworks */, + E447067025D904D500EA2C14 /* Metal.framework in Frameworks */, 08CD42E814B7B8AA009CA2A2 /* Carbon.framework in Frameworks */, ); runOnlyForDeploymentPostprocessing = 0; @@ -892,6 +895,7 @@ 08CD42DF14B7B865009CA2A2 /* Frameworks */ = { isa = PBXGroup; children = ( + E447066F25D904D500EA2C14 /* Metal.framework */, E420260424125182000508DF /* Security.framework */, E420910020D0C4FA0094654F /* SDL2.framework */, 08CD42E714B7B8AA009CA2A2 /* Carbon.framework */, From e75d2ca5d62a2d7737e5008a7a8baf6ff6f07ab0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 16 Feb 2021 15:11:49 +0900 Subject: [PATCH 476/534] fix for g++ --- BasiliskII/src/SDL/audio_sdl.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index 588eb1a7c..e35764fec 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -369,7 +369,7 @@ static int play_startup(void *arg) { Uint8 *wav_buffer; Uint32 wav_length; if (SDL_LoadWAV("startup.wav", &wav_spec, &wav_buffer, &wav_length)) { - SDL_AudioSpec desired = { .freq = 44100, .format = AUDIO_S16, .channels = 1, .samples= 4096 }, obtained; + SDL_AudioSpec desired = { .freq = 44100, .format = AUDIO_S16, .channels = 1 }, obtained; SDL_AudioDeviceID deviceId = SDL_OpenAudioDevice(NULL, 0, &desired, &obtained, 0); if (deviceId) { SDL_QueueAudio(deviceId, wav_buffer, wav_length); From 39cbc73a9f8f0601c1a3e0a974358378237977ec Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 25 Feb 2021 14:49:54 +0900 Subject: [PATCH 477/534] added SDL version check --- BasiliskII/src/SDL/video_sdl2.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index ff62e411f..72a591b26 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -764,7 +764,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); -#ifdef __MACOSX__ +#if defined(__MACOSX__) && SDL_VERSION_ATLEAST(2,0,14) if (MetalIsAvailable()) window_flags |= SDL_WINDOW_METAL; #endif From 2e5654e583026b95b267b348fadcd4a4a8eabe43 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 26 Feb 2021 12:21:21 +0900 Subject: [PATCH 478/534] SS: can use cxmon --- SheepShaver/src/Unix/configure.ac | 9 +++++---- SheepShaver/src/kpx_cpu/ppc-dis.c | 5 +++++ 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 88a08c965..35f3495e6 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -45,7 +45,7 @@ AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [d *) WANT_GTK="no";; esac], [WANT_GTK="gtk2 gtk"]) -AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=yes]) +AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=yes]], [WANT_MON=$withval], [WANT_MON=no]) AC_ARG_WITH(dgcc, [ --with-dgcc=COMPILER use C++ COMPILER to compile synthetic opcodes or 'precompiled'], [DYNGEN_CC=$withval]) AC_ARG_WITH(bincue, @@ -115,7 +115,7 @@ x/* | x.*) WANT_MON=yes ;; xyes) - mon_srcdir=../../../mon/src + mon_srcdir=../../../cxmon/src ;; esac if [[ "x$WANT_MON" = "xyes" ]]; then @@ -123,7 +123,7 @@ if [[ "x$WANT_MON" = "xyes" ]]; then if grep mon_init $mon_srcdir/mon.h >/dev/null 2>/dev/null; then AC_MSG_RESULT(yes) AC_DEFINE(ENABLE_MON, 1, [Define if using "mon".]) - MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c $mon_srcdir/disass/mips-dis.c $mon_srcdir/disass/mips-opc.c $mon_srcdir/disass/mips16-opc.c" + MONSRCS="$mon_srcdir/mon.cpp $mon_srcdir/mon_6502.cpp $mon_srcdir/mon_z80.cpp $mon_srcdir/mon_cmd.cpp $mon_srcdir/mon_lowmem.cpp $mon_srcdir/mon_disass.cpp $mon_srcdir/mon_ppc.cpp $mon_srcdir/disass/floatformat.c $mon_srcdir/disass/i386-dis.c $mon_srcdir/disass/m68k-dis.c $mon_srcdir/disass/m68k-opc.c" CXXFLAGS="$CXXFLAGS -I$mon_srcdir -I$mon_srcdir/disass" AC_CHECK_LIB(ncurses, tgetent, , [AC_CHECK_LIB(termcap, tgetent, , @@ -625,6 +625,7 @@ AC_CHECK_FRAMEWORK(CoreAudio, [#include ]) AC_CHECK_FRAMEWORK(AudioUnit, [#include ]) AC_CHECK_FRAMEWORK(AudioToolbox, [#include ]) AC_CHECK_FRAMEWORK(AppKit, []) +AC_CHECK_FRAMEWORK(Metal, []) dnl Select system-dependant sources. SERIALSRC=serial_unix.cpp @@ -1447,7 +1448,7 @@ gcc_AC_C_FLOAT_FORMAT dnl Platform specific binary postprocessor AC_PATH_PROG(BLESS, "true") if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then - BLESS=Darwin/lowmem +# BLESS=Darwin/lowmem LDFLAGS="$LDFLAGS -pagezero_size 0x3000" fi diff --git a/SheepShaver/src/kpx_cpu/ppc-dis.c b/SheepShaver/src/kpx_cpu/ppc-dis.c index a2478e633..3c1fc9e39 100644 --- a/SheepShaver/src/kpx_cpu/ppc-dis.c +++ b/SheepShaver/src/kpx_cpu/ppc-dis.c @@ -23,6 +23,7 @@ see . */ #include #include "dis-asm.h" +#include "config.h" #define BFD_DEFAULT_TARGET_SIZE 64 @@ -5263,6 +5264,8 @@ bfd_vma bfd_getb32 (const bfd_byte *addr) return (bfd_vma) v; } +#if !ENABLE_MON + /* Get LENGTH bytes from info's buffer, at target address memaddr. Transfer them to myaddr. */ int @@ -5313,6 +5316,8 @@ generic_symbol_at_address (bfd_vma addr, struct disassemble_info *info) return 1; } +#endif // !ENABLE_MON + /* Print a PowerPC or POWER instruction. */ static int From 623abaa243ef341a7ab3695b8904ffdb4a574a21 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sat, 27 Feb 2021 18:29:57 +0900 Subject: [PATCH 479/534] prefs item "title" --- BasiliskII/src/SDL/video_sdl2.cpp | 47 ++++++++++---------------- BasiliskII/src/include/user_strings.h | 2 -- BasiliskII/src/prefs_items.cpp | 1 + BasiliskII/src/user_strings.cpp | 4 +-- SheepShaver/src/include/user_strings.h | 2 -- SheepShaver/src/prefs_items.cpp | 1 + SheepShaver/src/user_strings.cpp | 4 +-- 7 files changed, 21 insertions(+), 40 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 72a591b26..35e15a1f2 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -546,34 +546,20 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati } // Set window name and class -static void set_window_name(int name) -{ - if (!sdl_window) { - return; - } - const char *str = GetString(name); - SDL_SetWindowTitle(sdl_window, str); -} - -static void set_window_name_grabbed() { +static void set_window_name() { if (!sdl_window) return; - int hotkey = PrefsFindInt32("hotkey"); - if (!hotkey) hotkey = 1; - std::string s = GetString(STR_WINDOW_TITLE_GRABBED0); - if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); - if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); - if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); - s += GetString(STR_WINDOW_TITLE_GRABBED4); - SDL_SetWindowTitle(sdl_window, s.c_str()); -} - -// Set mouse grab mode -static void set_grab_mode(bool grab) -{ - if (!sdl_window) { - return; + const char *title = PrefsFindString("title"); + std::string s = title ? title : GetString(STR_WINDOW_TITLE); + if (mouse_grabbed) { + s += GetString(STR_WINDOW_TITLE_GRABBED0); + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); + if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); + if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); + s += GetString(STR_WINDOW_TITLE_GRABBED4); } - SDL_SetWindowGrab(sdl_window, grab ? SDL_TRUE : SDL_FALSE); + SDL_SetWindowTitle(sdl_window, s.c_str()); } // Migrate preferences items (XXX to be handled in MigratePrefs()) @@ -771,7 +757,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags if (!sdl_window) { int m = get_mag_rate(); sdl_window = SDL_CreateWindow( - GetString(STR_WINDOW_TITLE), + "", SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, m * window_width, @@ -781,6 +767,7 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags shutdown_sdl_video(); return NULL; } + set_window_name(); } if (flags & SDL_WINDOW_FULLSCREEN) SDL_SetWindowGrab(sdl_window, SDL_TRUE); @@ -1109,7 +1096,7 @@ void driver_base::adapt_to_video_mode() { SDL_ShowCursor(hardware_cursor); // Set window name/class - mouse_grabbed ? set_window_name_grabbed() : set_window_name((int)STR_WINDOW_TITLE); + set_window_name(); // Everything went well init_ok = true; @@ -1209,7 +1196,7 @@ void driver_base::grab_mouse(void) if (!mouse_grabbed) { mouse_grabbed = true; update_mouse_grab(); - set_window_name_grabbed(); + set_window_name(); disable_mouse_accel(); ADBSetRelMouseMode(true); } @@ -1221,7 +1208,7 @@ void driver_base::ungrab_mouse(void) if (mouse_grabbed) { mouse_grabbed = false; update_mouse_grab(); - set_window_name(STR_WINDOW_TITLE); + set_window_name(); restore_mouse_accel(); ADBSetRelMouseMode(false); } diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index 1b9a4253a..71e7d80a3 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -212,8 +212,6 @@ enum { // Mac window STR_WINDOW_TITLE = 4000, - STR_WINDOW_TITLE_FROZEN, - STR_WINDOW_TITLE_GRABBED, STR_WINDOW_TITLE_GRABBED0, STR_WINDOW_TITLE_GRABBED1, STR_WINDOW_TITLE_GRABBED2, diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 883c7a6e0..0b30b8c9d 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -82,6 +82,7 @@ prefs_desc common_prefs_items[] = { {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, + {"title", TYPE_STRING, false, "window title"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index 416895520..0ae22b93d 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -225,9 +225,7 @@ user_string_def common_strings[] = { {STR_JIT_FOLLOW_CONST_JUMPS, "Translate through constant jumps (inline blocks)"}, {STR_WINDOW_TITLE, "Basilisk II"}, - {STR_WINDOW_TITLE_FROZEN, "Basilisk II *** FROZEN ***"}, - {STR_WINDOW_TITLE_GRABBED, "Basilisk II (mouse grabbed, press Ctrl-F5 to release)"}, - {STR_WINDOW_TITLE_GRABBED0, "Basilisk II (mouse grabbed, press "}, + {STR_WINDOW_TITLE_GRABBED0, " (mouse grabbed, press "}, {STR_WINDOW_TITLE_GRABBED1, "Ctrl-"}, #ifdef __APPLE__ {STR_WINDOW_TITLE_GRABBED2, "Opt-"}, diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h index 1813954a2..519515205 100644 --- a/SheepShaver/src/include/user_strings.h +++ b/SheepShaver/src/include/user_strings.h @@ -165,8 +165,6 @@ enum { // Mac window STR_WINDOW_TITLE = 4000, - STR_WINDOW_TITLE_FROZEN, - STR_WINDOW_TITLE_GRABBED, STR_WINDOW_TITLE_GRABBED0, STR_WINDOW_TITLE_GRABBED1, STR_WINDOW_TITLE_GRABBED2, diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 5efc1e302..8e1f448de 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -70,6 +70,7 @@ prefs_desc common_prefs_items[] = { {"swap_opt_cmd", TYPE_BOOLEAN, false, "swap option and command key"}, {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {"redir", TYPE_STRING, true, "port forwarding for slirp"}, + {"title", TYPE_STRING, false, "window title"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index 6a52511ab..9a24cb1cf 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -171,9 +171,7 @@ user_string_def common_strings[] = { {STR_JIT_68K_CTRL, "Enable built-in 68k DR Emulator (EXPERIMENTAL)"}, {STR_WINDOW_TITLE, "SheepShaver"}, - {STR_WINDOW_TITLE_FROZEN, "SheepShaver *** FROZEN ***"}, - {STR_WINDOW_TITLE_GRABBED, "SheepShaver (mouse grabbed, press Ctrl-F5 to release)"}, - {STR_WINDOW_TITLE_GRABBED0, "SheepShaver (mouse grabbed, press "}, + {STR_WINDOW_TITLE_GRABBED0, " (mouse grabbed, press "}, {STR_WINDOW_TITLE_GRABBED1, "Ctrl-"}, #ifdef __APPLE__ {STR_WINDOW_TITLE_GRABBED2, "Opt-"}, From 65772919a1f9dc82f6dbe93bb86e01f1fadb2db4 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 28 Feb 2021 18:56:58 +0900 Subject: [PATCH 480/534] specify OpenGL if non-Metal Mac --- BasiliskII/src/SDL/video_sdl2.cpp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 35e15a1f2..0c73d66be 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -785,7 +785,9 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); } else { -#ifdef WIN32 +#ifdef __MACOSX__ + SDL_SetHint(SDL_HINT_RENDER_DRIVER, window_flags & SDL_WINDOW_METAL ? "metal" : "opengl"); +#elif defined(WIN32) SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); #else SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); From ce3e2f3693f7b2e3def2cff169b212659b682e3a Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 3 Mar 2021 14:59:37 +0900 Subject: [PATCH 481/534] prefs item "mousewheellines" accepts negative value --- BasiliskII/src/SDL/video_sdl2.cpp | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 03a3f5cce..ae4d89881 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -108,6 +108,7 @@ const char KEYCODE_FILE_NAME2[] = DATADIR "/BasiliskII_keycodes"; static uint32 frame_skip; // Prefs items static int16 mouse_wheel_mode; static int16 mouse_wheel_lines; +static bool mouse_wheel_reverse; static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) @@ -1378,6 +1379,8 @@ bool VideoInit(bool classic) frame_skip = PrefsFindInt32("frameskip"); mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); mouse_wheel_lines = PrefsFindInt32("mousewheellines"); + mouse_wheel_reverse = mouse_wheel_lines < 0; + if (mouse_wheel_reverse) mouse_wheel_lines = -mouse_wheel_lines; // Get screen mode from preferences migrate_screen_prefs(); @@ -2322,12 +2325,12 @@ static void handle_events(void) case SDL_MOUSEWHEEL: if (!event.wheel.y) break; if (!mouse_wheel_mode) { - int key = event.wheel.y < 0 ? 0x79 : 0x74; // Page up/down + int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x79 : 0x74; // Page up/down ADBKeyDown(key); ADBKeyUp(key); } else { - int key = event.wheel.y < 0 ? 0x3d : 0x3e; // Cursor up/down + int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x3d : 0x3e; // Cursor up/down for (int i = 0; i < mouse_wheel_lines; i++) { ADBKeyDown(key); ADBKeyUp(key); From 7471c357c386395ca9447fbe094ce1f1313df797 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 4 Mar 2021 14:29:02 +0900 Subject: [PATCH 482/534] linux,Windows: fixed fullscreen --- BasiliskII/src/SDL/video_sdl2.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index ae4d89881..90bf8492b 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -730,11 +730,11 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags } #ifdef __MACOSX__ window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; + window_width = desktop_mode.w; + window_height = desktop_mode.h; #else window_flags |= SDL_WINDOW_FULLSCREEN; #endif - window_width = desktop_mode.w; - window_height = desktop_mode.h; } if (sdl_window) { From 80642150819b4bf18faf9ca25aa75209b5094d3b Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 17 Mar 2021 11:42:37 +0900 Subject: [PATCH 483/534] prefs item "sound_buffer" --- BasiliskII/src/SDL/audio_sdl.cpp | 2 +- BasiliskII/src/prefs_items.cpp | 1 + SheepShaver/src/prefs_items.cpp | 1 + 3 files changed, 3 insertions(+), 1 deletion(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index e35764fec..c81e0fd40 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -94,7 +94,7 @@ static bool open_sdl_audio(void) audio_spec.freq = audio_sample_rates[audio_sample_rate_index] >> 16; audio_spec.format = (audio_sample_sizes[audio_sample_size_index] == 8) ? AUDIO_U8 : AUDIO_S16MSB; audio_spec.channels = audio_channel_counts[audio_channel_count_index]; - audio_spec.samples = 4096; + audio_spec.samples = 4096 >> PrefsFindInt32("sound_buffer"); audio_spec.callback = stream_func; audio_spec.userdata = NULL; diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 0b30b8c9d..2c7485c28 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -83,6 +83,7 @@ prefs_desc common_prefs_items[] = { {"ignoresegv", TYPE_BOOLEAN, false, "ignore illegal memory accesses"}, {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {"title", TYPE_STRING, false, "window title"}, + {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 8e1f448de..9aada63cb 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -71,6 +71,7 @@ prefs_desc common_prefs_items[] = { {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {"redir", TYPE_STRING, true, "port forwarding for slirp"}, {"title", TYPE_STRING, false, "window title"}, + {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, {NULL, TYPE_END, false, NULL} // End of list }; From 176da653639c14a7e8965f5bb6c5559641bb38b1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Matthias=20Wei=C3=9F?= Date: Tue, 30 Mar 2021 15:14:14 +0200 Subject: [PATCH 484/534] applyed patches from https://github.com/oaguy1/macemu --- BasiliskII/src/Unix/config.guess | 1736 ++++++++++++---------- BasiliskII/src/Unix/config.sub | 2296 +++++++++++++++++------------- 2 files changed, 2297 insertions(+), 1735 deletions(-) diff --git a/BasiliskII/src/Unix/config.guess b/BasiliskII/src/Unix/config.guess index 78f6b92cd..79d1317f5 100755 --- a/BasiliskII/src/Unix/config.guess +++ b/BasiliskII/src/Unix/config.guess @@ -1,13 +1,12 @@ #! /bin/sh # Attempt to guess a canonical system name. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. +# Copyright 1992-2019 Free Software Foundation, Inc. -timestamp='2003-01-10' +timestamp='2019-03-04' # This file 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 +# the Free Software Foundation; either version 3 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but @@ -16,24 +15,22 @@ timestamp='2003-01-10' # 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. +# along with this program; if not, see . # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. - -# Originally written by Per Bothner . -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. +# the same distribution terms that you use for the rest of that +# program. This Exception is an additional permission under section 7 +# of the GNU General Public License, version 3 ("GPLv3"). +# +# Originally written by Per Bothner; maintained since 2000 by Ben Elliston. # -# This script attempts to guess a canonical system name similar to -# config.sub. If it succeeds, it prints the system name on stdout, and -# exits with 0. Otherwise, it exits with 1. +# You can get the latest version of this script from: +# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.guess # -# The plan is that this can be called by configure scripts if you -# don't specify an explicit build system type. +# Please send patches to . + me=`echo "$0" | sed -e 's,.*/,,'` @@ -42,7 +39,7 @@ Usage: $0 [OPTION] Output the configuration name of the system \`$me' is run on. -Operation modes: +Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit @@ -53,8 +50,7 @@ version="\ GNU config.guess ($timestamp) Originally written by Per Bothner. -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. +Copyright 1992-2019 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -66,11 +62,11 @@ Try \`$me --help' for more information." while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; + echo "$timestamp" ; exit ;; --version | -v ) - echo "$version" ; exit 0 ;; + echo "$version" ; exit ;; --help | --h* | -h ) - echo "$usage"; exit 0 ;; + echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. @@ -88,8 +84,6 @@ if test $# != 0; then exit 1 fi -trap 'exit 1' 1 2 15 - # CC_FOR_BUILD -- compiler used by this script. Note that the use of a # compiler to aid in system detection is discouraged as it requires # temporary files to be created and, as you can see below, it is a @@ -100,33 +94,38 @@ trap 'exit 1' 1 2 15 # Portable tmp directory creation inspired by the Autoconf team. -set_cc_for_build=' -trap "exitcode=\$?; (rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null) && exit \$exitcode" 0 ; -trap "rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null; exit 1" 1 2 13 15 ; -: ${TMPDIR=/tmp} ; - { tmp=`(umask 077 && mktemp -d -q "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || - { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir $tmp) ; } || - { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } ; -dummy=$tmp/dummy ; -tmpfiles="$dummy.c $dummy.o $dummy.rel $dummy" ; -case $CC_FOR_BUILD,$HOST_CC,$CC in - ,,) echo "int x;" > $dummy.c ; - for c in cc gcc c89 c99 ; do - if ($c -c -o $dummy.o $dummy.c) >/dev/null 2>&1 ; then - CC_FOR_BUILD="$c"; break ; - fi ; - done ; - if test x"$CC_FOR_BUILD" = x ; then - CC_FOR_BUILD=no_compiler_found ; - fi - ;; - ,,*) CC_FOR_BUILD=$CC ;; - ,*,*) CC_FOR_BUILD=$HOST_CC ;; -esac ;' +tmp= +# shellcheck disable=SC2172 +trap 'test -z "$tmp" || rm -fr "$tmp"' 0 1 2 13 15 + +set_cc_for_build() { + : "${TMPDIR=/tmp}" + # shellcheck disable=SC2039 + { tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || + { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir "$tmp" 2>/dev/null) ; } || + { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir "$tmp" 2>/dev/null) && echo "Warning: creating insecure temp directory" >&2 ; } || + { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } + dummy=$tmp/dummy + case ${CC_FOR_BUILD-},${HOST_CC-},${CC-} in + ,,) echo "int x;" > "$dummy.c" + for driver in cc gcc c89 c99 ; do + if ($driver -c -o "$dummy.o" "$dummy.c") >/dev/null 2>&1 ; then + CC_FOR_BUILD="$driver" + break + fi + done + if test x"$CC_FOR_BUILD" = x ; then + CC_FOR_BUILD=no_compiler_found + fi + ;; + ,,*) CC_FOR_BUILD=$CC ;; + ,*,*) CC_FOR_BUILD=$HOST_CC ;; + esac +} # This is needed to find uname on a Pyramid OSx when run in the BSD universe. # (ghazi@noc.rutgers.edu 1994-08-24) -if (test -f /.attbin/uname) >/dev/null 2>&1 ; then +if test -f /.attbin/uname ; then PATH=$PATH:/.attbin ; export PATH fi @@ -135,12 +134,40 @@ UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown +case "$UNAME_SYSTEM" in +Linux|GNU|GNU/*) + # If the system lacks a compiler, then just pick glibc. + # We could probably try harder. + LIBC=gnu + + set_cc_for_build + cat <<-EOF > "$dummy.c" + #include + #if defined(__UCLIBC__) + LIBC=uclibc + #elif defined(__dietlibc__) + LIBC=dietlibc + #else + LIBC=gnu + #endif + EOF + eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g'`" + + # If ldd exists, use it to detect musl libc. + if command -v ldd >/dev/null && \ + ldd --version 2>&1 | grep -q ^musl + then + LIBC=musl + fi + ;; +esac + # Note: order is significant - the case branches are not exclusive. -case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in +case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in *:NetBSD:*:*) # NetBSD (nbsd) targets should (where applicable) match one or - # more of the tupples: *-*-netbsdelf*, *-*-netbsdaout*, + # more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*, # *-*-netbsdecoff* and *-*-netbsd*. For targets that recently # switched to ELF, *-*-netbsd* would select the old # object file format. This provides both forward @@ -150,22 +177,33 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in # Note: NetBSD doesn't particularly care about the vendor # portion of the name. We always set it to "unknown". sysctl="sysctl -n hw.machine_arch" - UNAME_MACHINE_ARCH=`(/sbin/$sysctl 2>/dev/null || \ - /usr/sbin/$sysctl 2>/dev/null || echo unknown)` - case "${UNAME_MACHINE_ARCH}" in + UNAME_MACHINE_ARCH=`(uname -p 2>/dev/null || \ + "/sbin/$sysctl" 2>/dev/null || \ + "/usr/sbin/$sysctl" 2>/dev/null || \ + echo unknown)` + case "$UNAME_MACHINE_ARCH" in armeb) machine=armeb-unknown ;; arm*) machine=arm-unknown ;; sh3el) machine=shl-unknown ;; sh3eb) machine=sh-unknown ;; - *) machine=${UNAME_MACHINE_ARCH}-unknown ;; + sh5el) machine=sh5le-unknown ;; + earmv*) + arch=`echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,'` + endian=`echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p'` + machine="${arch}${endian}"-unknown + ;; + *) machine="$UNAME_MACHINE_ARCH"-unknown ;; esac # The Operating System including object format, if it has switched - # to ELF recently, or will in the future. - case "${UNAME_MACHINE_ARCH}" in + # to ELF recently (or will in the future) and ABI. + case "$UNAME_MACHINE_ARCH" in + earm*) + os=netbsdelf + ;; arm*|i386|m68k|ns32k|sh3*|sparc|vax) - eval $set_cc_for_build + set_cc_for_build if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \ - | grep __ELF__ >/dev/null + | grep -q __ELF__ then # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout). # Return netbsd for either. FIX? @@ -175,7 +213,14 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in fi ;; *) - os=netbsd + os=netbsd + ;; + esac + # Determine ABI tags. + case "$UNAME_MACHINE_ARCH" in + earm*) + expr='s/^earmv[0-9]/-eabi/;s/eb$//' + abi=`echo "$UNAME_MACHINE_ARCH" | sed -e "$expr"` ;; esac # The OS release @@ -183,153 +228,138 @@ case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in # thus, need a distinct triplet. However, they do not need # kernel version information, so it can be replaced with a # suitable tag, in the style of linux-gnu. - case "${UNAME_VERSION}" in + case "$UNAME_VERSION" in Debian*) release='-gnu' ;; *) - release=`echo ${UNAME_RELEASE}|sed -e 's/[-_].*/\./'` + release=`echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2` ;; esac # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: # contains redundant information, the shorter form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used. - echo "${machine}-${os}${release}" - exit 0 ;; - amiga:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - arc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - hp300:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mac68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - macppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme68k:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvme88k:OpenBSD:*:*) - echo m88k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - mvmeppc:OpenBSD:*:*) - echo powerpc-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - pmax:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sgi:OpenBSD:*:*) - echo mipseb-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - sun3:OpenBSD:*:*) - echo m68k-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - wgrisc:OpenBSD:*:*) - echo mipsel-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; + echo "$machine-${os}${release}${abi-}" + exit ;; + *:Bitrig:*:*) + UNAME_MACHINE_ARCH=`arch | sed 's/Bitrig.//'` + echo "$UNAME_MACHINE_ARCH"-unknown-bitrig"$UNAME_RELEASE" + exit ;; *:OpenBSD:*:*) - echo ${UNAME_MACHINE}-unknown-openbsd${UNAME_RELEASE} - exit 0 ;; - *:MicroBSD:*:*) - echo ${UNAME_MACHINE}-unknown-microbsd${UNAME_RELEASE} - exit 0 ;; + UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'` + echo "$UNAME_MACHINE_ARCH"-unknown-openbsd"$UNAME_RELEASE" + exit ;; + *:LibertyBSD:*:*) + UNAME_MACHINE_ARCH=`arch | sed 's/^.*BSD\.//'` + echo "$UNAME_MACHINE_ARCH"-unknown-libertybsd"$UNAME_RELEASE" + exit ;; + *:MidnightBSD:*:*) + echo "$UNAME_MACHINE"-unknown-midnightbsd"$UNAME_RELEASE" + exit ;; + *:ekkoBSD:*:*) + echo "$UNAME_MACHINE"-unknown-ekkobsd"$UNAME_RELEASE" + exit ;; + *:SolidBSD:*:*) + echo "$UNAME_MACHINE"-unknown-solidbsd"$UNAME_RELEASE" + exit ;; + macppc:MirBSD:*:*) + echo powerpc-unknown-mirbsd"$UNAME_RELEASE" + exit ;; + *:MirBSD:*:*) + echo "$UNAME_MACHINE"-unknown-mirbsd"$UNAME_RELEASE" + exit ;; + *:Sortix:*:*) + echo "$UNAME_MACHINE"-unknown-sortix + exit ;; + *:Redox:*:*) + echo "$UNAME_MACHINE"-unknown-redox + exit ;; + mips:OSF1:*.*) + echo mips-dec-osf1 + exit ;; alpha:OSF1:*:*) - if test $UNAME_RELEASE = "V4.0"; then + case $UNAME_RELEASE in + *4.0) UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` - fi + ;; + *5.*) + UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'` + ;; + esac + # According to Compaq, /usr/sbin/psrinfo has been available on + # OSF/1 and Tru64 systems produced since 1995. I hope that + # covers most systems running today. This code pipes the CPU + # types through head -n 1, so we only detect the type of CPU 0. + ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1` + case "$ALPHA_CPU_TYPE" in + "EV4 (21064)") + UNAME_MACHINE=alpha ;; + "EV4.5 (21064)") + UNAME_MACHINE=alpha ;; + "LCA4 (21066/21068)") + UNAME_MACHINE=alpha ;; + "EV5 (21164)") + UNAME_MACHINE=alphaev5 ;; + "EV5.6 (21164A)") + UNAME_MACHINE=alphaev56 ;; + "EV5.6 (21164PC)") + UNAME_MACHINE=alphapca56 ;; + "EV5.7 (21164PC)") + UNAME_MACHINE=alphapca57 ;; + "EV6 (21264)") + UNAME_MACHINE=alphaev6 ;; + "EV6.7 (21264A)") + UNAME_MACHINE=alphaev67 ;; + "EV6.8CB (21264C)") + UNAME_MACHINE=alphaev68 ;; + "EV6.8AL (21264B)") + UNAME_MACHINE=alphaev68 ;; + "EV6.8CX (21264D)") + UNAME_MACHINE=alphaev68 ;; + "EV6.9A (21264/EV69A)") + UNAME_MACHINE=alphaev69 ;; + "EV7 (21364)") + UNAME_MACHINE=alphaev7 ;; + "EV7.9 (21364A)") + UNAME_MACHINE=alphaev79 ;; + esac + # A Pn.n version is a patched version. # A Vn.n version is a released version. # A Tn.n version is a released field test version. # A Xn.n version is an unreleased experimental baselevel. # 1.2 uses "1.2" for uname -r. - eval $set_cc_for_build - cat <$dummy.s - .data -\$Lformat: - .byte 37,100,45,37,120,10,0 # "%d-%x\n" - - .text - .globl main - .align 4 - .ent main -main: - .frame \$30,16,\$26,0 - ldgp \$29,0(\$27) - .prologue 1 - .long 0x47e03d80 # implver \$0 - lda \$2,-1 - .long 0x47e20c21 # amask \$2,\$1 - lda \$16,\$Lformat - mov \$0,\$17 - not \$1,\$18 - jsr \$26,printf - ldgp \$29,0(\$26) - mov 0,\$16 - jsr \$26,exit - .end main -EOF - $CC_FOR_BUILD -o $dummy $dummy.s 2>/dev/null - if test "$?" = 0 ; then - case `$dummy` in - 0-0) - UNAME_MACHINE="alpha" - ;; - 1-0) - UNAME_MACHINE="alphaev5" - ;; - 1-1) - UNAME_MACHINE="alphaev56" - ;; - 1-101) - UNAME_MACHINE="alphapca56" - ;; - 2-303) - UNAME_MACHINE="alphaev6" - ;; - 2-307) - UNAME_MACHINE="alphaev67" - ;; - 2-1307) - UNAME_MACHINE="alphaev68" - ;; - 3-1307) - UNAME_MACHINE="alphaev7" - ;; - esac - fi - echo ${UNAME_MACHINE}-dec-osf`echo ${UNAME_RELEASE} | sed -e 's/^[VTX]//' | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - exit 0 ;; - Alpha\ *:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # Should we change UNAME_MACHINE based on the output of uname instead - # of the specific Alpha model? - echo alpha-pc-interix - exit 0 ;; - 21064:Windows_NT:50:3) - echo alpha-dec-winnt3.5 - exit 0 ;; + echo "$UNAME_MACHINE"-dec-osf"`echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz`" + # Reset EXIT trap before exiting to avoid spurious non-zero exit code. + exitcode=$? + trap '' 0 + exit $exitcode ;; Amiga*:UNIX_System_V:4.0:*) echo m68k-unknown-sysv4 - exit 0;; + exit ;; *:[Aa]miga[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-amigaos - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-amigaos + exit ;; *:[Mm]orph[Oo][Ss]:*:*) - echo ${UNAME_MACHINE}-unknown-morphos - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-morphos + exit ;; *:OS/390:*:*) echo i370-ibm-openedition - exit 0 ;; + exit ;; + *:z/VM:*:*) + echo s390-ibm-zvmoe + exit ;; + *:OS400:*:*) + echo powerpc-ibm-os400 + exit ;; arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*) - echo arm-acorn-riscix${UNAME_RELEASE} - exit 0;; + echo arm-acorn-riscix"$UNAME_RELEASE" + exit ;; + arm*:riscos:*:*|arm*:RISCOS:*:*) + echo arm-unknown-riscos + exit ;; SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*) echo hppa1.1-hitachi-hiuxmpp - exit 0;; + exit ;; Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. if test "`(/bin/universe) 2>/dev/null`" = att ; then @@ -337,29 +367,51 @@ EOF else echo pyramid-pyramid-bsd fi - exit 0 ;; + exit ;; NILE*:*:*:dcosx) echo pyramid-pyramid-svr4 - exit 0 ;; - DRS?6000:UNIX_SV:4.2*:7*) + exit ;; + DRS?6000:unix:4.0:6*) + echo sparc-icl-nx6 + exit ;; + DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*) case `/usr/bin/uname -p` in - sparc) echo sparc-icl-nx7 && exit 0 ;; + sparc) echo sparc-icl-nx7; exit ;; esac ;; + s390x:SunOS:*:*) + echo "$UNAME_MACHINE"-ibm-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`" + exit ;; sun4H:SunOS:5.*:*) - echo sparc-hal-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-hal-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + exit ;; sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) - echo sparc-sun-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; - i86pc:SunOS:5.*:*) - echo i386-pc-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-sun-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`" + exit ;; + i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*) + echo i386-pc-auroraux"$UNAME_RELEASE" + exit ;; + i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*) + set_cc_for_build + SUN_ARCH=i386 + # If there is a compiler, see if it is configured for 64-bit objects. + # Note that the Sun cc does not turn __LP64__ into 1 like gcc does. + # This test works for both compilers. + if [ "$CC_FOR_BUILD" != no_compiler_found ]; then + if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_64BIT_ARCH >/dev/null + then + SUN_ARCH=x86_64 + fi + fi + echo "$SUN_ARCH"-pc-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + exit ;; sun4*:SunOS:6*:*) # According to config.sub, this is the proper way to canonicalize # SunOS6. Hard to guess exactly what SunOS6 will be like, but # it's likely to be more like Solaris than SunOS4. - echo sparc-sun-solaris3`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo sparc-sun-solaris3"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + exit ;; sun4*:SunOS:*:*) case "`/usr/bin/arch -k`" in Series*|S4*) @@ -367,26 +419,26 @@ EOF ;; esac # Japanese Language versions have a version number like `4.1.3-JL'. - echo sparc-sun-sunos`echo ${UNAME_RELEASE}|sed -e 's/-/_/'` - exit 0 ;; + echo sparc-sun-sunos"`echo "$UNAME_RELEASE"|sed -e 's/-/_/'`" + exit ;; sun3*:SunOS:*:*) - echo m68k-sun-sunos${UNAME_RELEASE} - exit 0 ;; + echo m68k-sun-sunos"$UNAME_RELEASE" + exit ;; sun*:*:4.2BSD:*) UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` - test "x${UNAME_RELEASE}" = "x" && UNAME_RELEASE=3 + test "x$UNAME_RELEASE" = x && UNAME_RELEASE=3 case "`/bin/arch`" in sun3) - echo m68k-sun-sunos${UNAME_RELEASE} + echo m68k-sun-sunos"$UNAME_RELEASE" ;; sun4) - echo sparc-sun-sunos${UNAME_RELEASE} + echo sparc-sun-sunos"$UNAME_RELEASE" ;; esac - exit 0 ;; + exit ;; aushp:SunOS:*:*) - echo sparc-auspex-sunos${UNAME_RELEASE} - exit 0 ;; + echo sparc-auspex-sunos"$UNAME_RELEASE" + exit ;; # The situation for MiNT is a little confusing. The machine name # can be virtually everything (everything which is not # "atarist" or "atariste" at least should have a processor @@ -396,41 +448,44 @@ EOF # MiNT. But MiNT is downward compatible to TOS, so this should # be no problem. atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*) - echo m68k-atari-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-atari-mint"$UNAME_RELEASE" + exit ;; milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*) - echo m68k-milan-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-milan-mint"$UNAME_RELEASE" + exit ;; hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*) - echo m68k-hades-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-hades-mint"$UNAME_RELEASE" + exit ;; *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*) - echo m68k-unknown-mint${UNAME_RELEASE} - exit 0 ;; + echo m68k-unknown-mint"$UNAME_RELEASE" + exit ;; + m68k:machten:*:*) + echo m68k-apple-machten"$UNAME_RELEASE" + exit ;; powerpc:machten:*:*) - echo powerpc-apple-machten${UNAME_RELEASE} - exit 0 ;; + echo powerpc-apple-machten"$UNAME_RELEASE" + exit ;; RISC*:Mach:*:*) echo mips-dec-mach_bsd4.3 - exit 0 ;; + exit ;; RISC*:ULTRIX:*:*) - echo mips-dec-ultrix${UNAME_RELEASE} - exit 0 ;; + echo mips-dec-ultrix"$UNAME_RELEASE" + exit ;; VAX*:ULTRIX*:*:*) - echo vax-dec-ultrix${UNAME_RELEASE} - exit 0 ;; + echo vax-dec-ultrix"$UNAME_RELEASE" + exit ;; 2020:CLIX:*:* | 2430:CLIX:*:*) - echo clipper-intergraph-clix${UNAME_RELEASE} - exit 0 ;; + echo clipper-intergraph-clix"$UNAME_RELEASE" + exit ;; mips:*:*:UMIPS | mips:*:*:RISCos) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #ifdef __cplusplus #include /* for printf() prototype */ int main (int argc, char *argv[]) { @@ -439,94 +494,95 @@ EOF #endif #if defined (host_mips) && defined (MIPSEB) #if defined (SYSTYPE_SYSV) - printf ("mips-mips-riscos%ssysv\n", argv[1]); exit (0); + printf ("mips-mips-riscos%ssysv\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_SVR4) - printf ("mips-mips-riscos%ssvr4\n", argv[1]); exit (0); + printf ("mips-mips-riscos%ssvr4\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD) - printf ("mips-mips-riscos%sbsd\n", argv[1]); exit (0); + printf ("mips-mips-riscos%sbsd\\n", argv[1]); exit (0); #endif #endif exit (-1); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c \ - && $dummy `echo "${UNAME_RELEASE}" | sed -n 's/\([0-9]*\).*/\1/p'` \ - && exit 0 - echo mips-mips-riscos${UNAME_RELEASE} - exit 0 ;; + $CC_FOR_BUILD -o "$dummy" "$dummy.c" && + dummyarg=`echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p'` && + SYSTEM_NAME=`"$dummy" "$dummyarg"` && + { echo "$SYSTEM_NAME"; exit; } + echo mips-mips-riscos"$UNAME_RELEASE" + exit ;; Motorola:PowerMAX_OS:*:*) echo powerpc-motorola-powermax - exit 0 ;; + exit ;; Motorola:*:4.3:PL8-*) echo powerpc-harris-powermax - exit 0 ;; + exit ;; Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*) echo powerpc-harris-powermax - exit 0 ;; + exit ;; Night_Hawk:Power_UNIX:*:*) echo powerpc-harris-powerunix - exit 0 ;; + exit ;; m88k:CX/UX:7*:*) echo m88k-harris-cxux7 - exit 0 ;; + exit ;; m88k:*:4*:R4*) echo m88k-motorola-sysv4 - exit 0 ;; + exit ;; m88k:*:3*:R3*) echo m88k-motorola-sysv3 - exit 0 ;; + exit ;; AViiON:dgux:*:*) - # DG/UX returns AViiON for all architectures - UNAME_PROCESSOR=`/usr/bin/uname -p` - if [ $UNAME_PROCESSOR = mc88100 ] || [ $UNAME_PROCESSOR = mc88110 ] + # DG/UX returns AViiON for all architectures + UNAME_PROCESSOR=`/usr/bin/uname -p` + if [ "$UNAME_PROCESSOR" = mc88100 ] || [ "$UNAME_PROCESSOR" = mc88110 ] then - if [ ${TARGET_BINARY_INTERFACE}x = m88kdguxelfx ] || \ - [ ${TARGET_BINARY_INTERFACE}x = x ] + if [ "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx ] || \ + [ "$TARGET_BINARY_INTERFACE"x = x ] then - echo m88k-dg-dgux${UNAME_RELEASE} + echo m88k-dg-dgux"$UNAME_RELEASE" else - echo m88k-dg-dguxbcs${UNAME_RELEASE} + echo m88k-dg-dguxbcs"$UNAME_RELEASE" fi else - echo i586-dg-dgux${UNAME_RELEASE} + echo i586-dg-dgux"$UNAME_RELEASE" fi - exit 0 ;; + exit ;; M88*:DolphinOS:*:*) # DolphinOS (SVR3) echo m88k-dolphin-sysv3 - exit 0 ;; + exit ;; M88*:*:R3*:*) # Delta 88k system running SVR3 echo m88k-motorola-sysv3 - exit 0 ;; + exit ;; XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3) echo m88k-tektronix-sysv3 - exit 0 ;; + exit ;; Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD) echo m68k-tektronix-bsd - exit 0 ;; + exit ;; *:IRIX*:*:*) - echo mips-sgi-irix`echo ${UNAME_RELEASE}|sed -e 's/-/_/g'` - exit 0 ;; + echo mips-sgi-irix"`echo "$UNAME_RELEASE"|sed -e 's/-/_/g'`" + exit ;; ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. - echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id - exit 0 ;; # Note that: echo "'`uname -s`'" gives 'AIX ' + echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id + exit ;; # Note that: echo "'`uname -s`'" gives 'AIX ' i*86:AIX:*:*) echo i386-ibm-aix - exit 0 ;; + exit ;; ia64:AIX:*:*) if [ -x /usr/bin/oslevel ] ; then IBM_REV=`/usr/bin/oslevel` else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} + IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi - echo ${UNAME_MACHINE}-ibm-aix${IBM_REV} - exit 0 ;; + echo "$UNAME_MACHINE"-ibm-aix"$IBM_REV" + exit ;; *:AIX:2:3) if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #include main() @@ -537,128 +593,143 @@ EOF exit(0); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 - echo rs6000-ibm-aix3.2.5 + if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` + then + echo "$SYSTEM_NAME" + else + echo rs6000-ibm-aix3.2.5 + fi elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then echo rs6000-ibm-aix3.2.4 else echo rs6000-ibm-aix3.2 fi - exit 0 ;; - *:AIX:*:[45]) + exit ;; + *:AIX:*:[4567]) IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` - if /usr/sbin/lsattr -El ${IBM_CPU_ID} | grep ' POWER' >/dev/null 2>&1; then + if /usr/sbin/lsattr -El "$IBM_CPU_ID" | grep ' POWER' >/dev/null 2>&1; then IBM_ARCH=rs6000 else IBM_ARCH=powerpc fi - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` + if [ -x /usr/bin/lslpp ] ; then + IBM_REV=`/usr/bin/lslpp -Lqc bos.rte.libc | + awk -F: '{ print $3 }' | sed s/[0-9]*$/0/` else - IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} + IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi - echo ${IBM_ARCH}-ibm-aix${IBM_REV} - exit 0 ;; + echo "$IBM_ARCH"-ibm-aix"$IBM_REV" + exit ;; *:AIX:*:*) echo rs6000-ibm-aix - exit 0 ;; - ibmrt:4.4BSD:*|romp-ibm:BSD:*) + exit ;; + ibmrt:4.4BSD:*|romp-ibm:4.4BSD:*) echo romp-ibm-bsd4.4 - exit 0 ;; + exit ;; ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and - echo romp-ibm-bsd${UNAME_RELEASE} # 4.3 with uname added to - exit 0 ;; # report: romp-ibm BSD 4.3 + echo romp-ibm-bsd"$UNAME_RELEASE" # 4.3 with uname added to + exit ;; # report: romp-ibm BSD 4.3 *:BOSX:*:*) echo rs6000-bull-bosx - exit 0 ;; + exit ;; DPX/2?00:B.O.S.:*:*) echo m68k-bull-sysv3 - exit 0 ;; + exit ;; 9000/[34]??:4.3bsd:1.*:*) echo m68k-hp-bsd - exit 0 ;; + exit ;; hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*) echo m68k-hp-bsd4.4 - exit 0 ;; + exit ;; 9000/[34678]??:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - case "${UNAME_MACHINE}" in - 9000/31? ) HP_ARCH=m68000 ;; - 9000/[34]?? ) HP_ARCH=m68k ;; + HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'` + case "$UNAME_MACHINE" in + 9000/31?) HP_ARCH=m68000 ;; + 9000/[34]??) HP_ARCH=m68k ;; 9000/[678][0-9][0-9]) if [ -x /usr/bin/getconf ]; then sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` - sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` - case "${sc_cpu_version}" in - 523) HP_ARCH="hppa1.0" ;; # CPU_PA_RISC1_0 - 528) HP_ARCH="hppa1.1" ;; # CPU_PA_RISC1_1 - 532) # CPU_PA_RISC2_0 - case "${sc_kernel_bits}" in - 32) HP_ARCH="hppa2.0n" ;; - 64) HP_ARCH="hppa2.0w" ;; - '') HP_ARCH="hppa2.0" ;; # HP-UX 10.20 - esac ;; - esac + sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` + case "$sc_cpu_version" in + 523) HP_ARCH=hppa1.0 ;; # CPU_PA_RISC1_0 + 528) HP_ARCH=hppa1.1 ;; # CPU_PA_RISC1_1 + 532) # CPU_PA_RISC2_0 + case "$sc_kernel_bits" in + 32) HP_ARCH=hppa2.0n ;; + 64) HP_ARCH=hppa2.0w ;; + '') HP_ARCH=hppa2.0 ;; # HP-UX 10.20 + esac ;; + esac fi - if [ "${HP_ARCH}" = "" ]; then - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + if [ "$HP_ARCH" = "" ]; then + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" - #define _HPUX_SOURCE - #include - #include + #define _HPUX_SOURCE + #include + #include - int main () - { - #if defined(_SC_KERNEL_BITS) - long bits = sysconf(_SC_KERNEL_BITS); - #endif - long cpu = sysconf (_SC_CPU_VERSION); + int main () + { + #if defined(_SC_KERNEL_BITS) + long bits = sysconf(_SC_KERNEL_BITS); + #endif + long cpu = sysconf (_SC_CPU_VERSION); - switch (cpu) - { - case CPU_PA_RISC1_0: puts ("hppa1.0"); break; - case CPU_PA_RISC1_1: puts ("hppa1.1"); break; - case CPU_PA_RISC2_0: - #if defined(_SC_KERNEL_BITS) - switch (bits) - { - case 64: puts ("hppa2.0w"); break; - case 32: puts ("hppa2.0n"); break; - default: puts ("hppa2.0"); break; - } break; - #else /* !defined(_SC_KERNEL_BITS) */ - puts ("hppa2.0"); break; - #endif - default: puts ("hppa1.0"); break; - } - exit (0); - } + switch (cpu) + { + case CPU_PA_RISC1_0: puts ("hppa1.0"); break; + case CPU_PA_RISC1_1: puts ("hppa1.1"); break; + case CPU_PA_RISC2_0: + #if defined(_SC_KERNEL_BITS) + switch (bits) + { + case 64: puts ("hppa2.0w"); break; + case 32: puts ("hppa2.0n"); break; + default: puts ("hppa2.0"); break; + } break; + #else /* !defined(_SC_KERNEL_BITS) */ + puts ("hppa2.0"); break; + #endif + default: puts ("hppa1.0"); break; + } + exit (0); + } EOF - (CCOPTS= $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null) && HP_ARCH=`$dummy` + (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=`"$dummy"` test -z "$HP_ARCH" && HP_ARCH=hppa fi ;; esac - if [ ${HP_ARCH} = "hppa2.0w" ] + if [ "$HP_ARCH" = hppa2.0w ] then - # avoid double evaluation of $set_cc_for_build - test -n "$CC_FOR_BUILD" || eval $set_cc_for_build - if echo __LP64__ | (CCOPTS= $CC_FOR_BUILD -E -) | grep __LP64__ >/dev/null + set_cc_for_build + + # hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating + # 32-bit code. hppa64-hp-hpux* has the same kernel and a compiler + # generating 64-bit code. GNU and HP use different nomenclature: + # + # $ CC_FOR_BUILD=cc ./config.guess + # => hppa2.0w-hp-hpux11.23 + # $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess + # => hppa64-hp-hpux11.23 + + if echo __LP64__ | (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | + grep -q __LP64__ then - HP_ARCH="hppa2.0w" + HP_ARCH=hppa2.0w else - HP_ARCH="hppa64" + HP_ARCH=hppa64 fi fi - echo ${HP_ARCH}-hp-hpux${HPUX_REV} - exit 0 ;; + echo "$HP_ARCH"-hp-hpux"$HPUX_REV" + exit ;; ia64:HP-UX:*:*) - HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` - echo ia64-hp-hpux${HPUX_REV} - exit 0 ;; + HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'` + echo ia64-hp-hpux"$HPUX_REV" + exit ;; 3050*:HI-UX:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + set_cc_for_build + sed 's/^ //' << EOF > "$dummy.c" #include int main () @@ -683,332 +754,399 @@ EOF exit (0); } EOF - $CC_FOR_BUILD -o $dummy $dummy.c && $dummy && exit 0 + $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` && + { echo "$SYSTEM_NAME"; exit; } echo unknown-hitachi-hiuxwe2 - exit 0 ;; - 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:* ) + exit ;; + 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:*) echo hppa1.1-hp-bsd - exit 0 ;; + exit ;; 9000/8??:4.3bsd:*:*) echo hppa1.0-hp-bsd - exit 0 ;; + exit ;; *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*) echo hppa1.0-hp-mpeix - exit 0 ;; - hp7??:OSF1:*:* | hp8?[79]:OSF1:*:* ) + exit ;; + hp7??:OSF1:*:* | hp8?[79]:OSF1:*:*) echo hppa1.1-hp-osf - exit 0 ;; + exit ;; hp8??:OSF1:*:*) echo hppa1.0-hp-osf - exit 0 ;; + exit ;; i*86:OSF1:*:*) if [ -x /usr/sbin/sysversion ] ; then - echo ${UNAME_MACHINE}-unknown-osf1mk + echo "$UNAME_MACHINE"-unknown-osf1mk else - echo ${UNAME_MACHINE}-unknown-osf1 + echo "$UNAME_MACHINE"-unknown-osf1 fi - exit 0 ;; + exit ;; parisc*:Lites*:*:*) echo hppa1.1-hp-lites - exit 0 ;; + exit ;; C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*) echo c1-convex-bsd - exit 0 ;; + exit ;; C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*) if getsysinfo -f scalar_acc then echo c32-convex-bsd else echo c2-convex-bsd fi - exit 0 ;; + exit ;; C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*) echo c34-convex-bsd - exit 0 ;; + exit ;; C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*) echo c38-convex-bsd - exit 0 ;; + exit ;; C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*) echo c4-convex-bsd - exit 0 ;; + exit ;; CRAY*Y-MP:*:*:*) - echo ymp-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo ymp-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*[A-Z]90:*:*:*) - echo ${UNAME_MACHINE}-cray-unicos${UNAME_RELEASE} \ + echo "$UNAME_MACHINE"-cray-unicos"$UNAME_RELEASE" \ | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \ -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \ -e 's/\.[^.]*$/.X/' - exit 0 ;; + exit ;; CRAY*TS:*:*:*) - echo t90-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo t90-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*T3E:*:*:*) - echo alphaev5-cray-unicosmk${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo alphaev5-cray-unicosmk"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; CRAY*SV1:*:*:*) - echo sv1-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo sv1-cray-unicos"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; *:UNICOS/mp:*:*) - echo nv1-cray-unicosmp${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' - exit 0 ;; + echo craynv-cray-unicosmp"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' + exit ;; F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) - FUJITSU_PROC=`uname -m | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` - FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'` - FUJITSU_REL=`echo ${UNAME_RELEASE} | sed -e 's/ /_/'` - echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" - exit 0 ;; + FUJITSU_PROC=`uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz` + FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` + FUJITSU_REL=`echo "$UNAME_RELEASE" | sed -e 's/ /_/'` + echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" + exit ;; + 5000:UNIX_System_V:4.*:*) + FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` + FUJITSU_REL=`echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/'` + echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" + exit ;; i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) - echo ${UNAME_MACHINE}-pc-bsdi${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-pc-bsdi"$UNAME_RELEASE" + exit ;; sparc*:BSD/OS:*:*) - echo sparc-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; + echo sparc-unknown-bsdi"$UNAME_RELEASE" + exit ;; *:BSD/OS:*:*) - echo ${UNAME_MACHINE}-unknown-bsdi${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-bsdi"$UNAME_RELEASE" + exit ;; + arm:FreeBSD:*:*) + UNAME_PROCESSOR=`uname -p` + set_cc_for_build + if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_PCS_VFP + then + echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabi + else + echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabihf + fi + exit ;; *:FreeBSD:*:*) - # Determine whether the default compiler uses glibc. - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #if __GLIBC__ >= 2 - LIBC=gnu - #else - LIBC= - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - echo ${UNAME_MACHINE}-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`${LIBC:+-$LIBC} - exit 0 ;; + UNAME_PROCESSOR=`/usr/bin/uname -p` + case "$UNAME_PROCESSOR" in + amd64) + UNAME_PROCESSOR=x86_64 ;; + i386) + UNAME_PROCESSOR=i586 ;; + esac + echo "$UNAME_PROCESSOR"-unknown-freebsd"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`" + exit ;; i*:CYGWIN*:*) - echo ${UNAME_MACHINE}-pc-cygwin - exit 0 ;; - i*:MINGW*:*) - echo ${UNAME_MACHINE}-pc-mingw32 - exit 0 ;; + echo "$UNAME_MACHINE"-pc-cygwin + exit ;; + *:MINGW64*:*) + echo "$UNAME_MACHINE"-pc-mingw64 + exit ;; + *:MINGW*:*) + echo "$UNAME_MACHINE"-pc-mingw32 + exit ;; + *:MSYS*:*) + echo "$UNAME_MACHINE"-pc-msys + exit ;; i*:PW*:*) - echo ${UNAME_MACHINE}-pc-pw32 - exit 0 ;; - x86:Interix*:3*) - echo i586-pc-interix3 - exit 0 ;; - [345]86:Windows_95:* | [345]86:Windows_98:* | [345]86:Windows_NT:*) - echo i${UNAME_MACHINE}-pc-mks - exit 0 ;; - i*:Windows_NT*:* | Pentium*:Windows_NT*:*) - # How do we know it's Interix rather than the generic POSIX subsystem? - # It also conflicts with pre-2.0 versions of AT&T UWIN. Should we - # UNAME_MACHINE based on the output of uname instead of i386? - echo i586-pc-interix - exit 0 ;; + echo "$UNAME_MACHINE"-pc-pw32 + exit ;; + *:Interix*:*) + case "$UNAME_MACHINE" in + x86) + echo i586-pc-interix"$UNAME_RELEASE" + exit ;; + authenticamd | genuineintel | EM64T) + echo x86_64-unknown-interix"$UNAME_RELEASE" + exit ;; + IA64) + echo ia64-unknown-interix"$UNAME_RELEASE" + exit ;; + esac ;; i*:UWIN*:*) - echo ${UNAME_MACHINE}-pc-uwin - exit 0 ;; - p*:CYGWIN*:*) - echo powerpcle-unknown-cygwin - exit 0 ;; + echo "$UNAME_MACHINE"-pc-uwin + exit ;; + amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*) + echo x86_64-pc-cygwin + exit ;; prep*:SunOS:5.*:*) - echo powerpcle-unknown-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` - exit 0 ;; + echo powerpcle-unknown-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + exit ;; *:GNU:*:*) - echo `echo ${UNAME_MACHINE}|sed -e 's,[-/].*$,,'`-unknown-gnu`echo ${UNAME_RELEASE}|sed -e 's,/.*$,,'` - exit 0 ;; - i*86:Minix:*:*) - echo ${UNAME_MACHINE}-pc-minix - exit 0 ;; + # the GNU system + echo "`echo "$UNAME_MACHINE"|sed -e 's,[-/].*$,,'`-unknown-$LIBC`echo "$UNAME_RELEASE"|sed -e 's,/.*$,,'`" + exit ;; + *:GNU/*:*:*) + # other systems with GNU libc and userland + echo "$UNAME_MACHINE-unknown-`echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]"``echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`-$LIBC" + exit ;; + *:Minix:*:*) + echo "$UNAME_MACHINE"-unknown-minix + exit ;; + aarch64:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + aarch64_be:Linux:*:*) + UNAME_MACHINE=aarch64_be + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + alpha:Linux:*:*) + case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in + EV5) UNAME_MACHINE=alphaev5 ;; + EV56) UNAME_MACHINE=alphaev56 ;; + PCA56) UNAME_MACHINE=alphapca56 ;; + PCA57) UNAME_MACHINE=alphapca56 ;; + EV6) UNAME_MACHINE=alphaev6 ;; + EV67) UNAME_MACHINE=alphaev67 ;; + EV68*) UNAME_MACHINE=alphaev68 ;; + esac + objdump --private-headers /bin/sh | grep -q ld.so.1 + if test "$?" = 0 ; then LIBC=gnulibc1 ; fi + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + arc:Linux:*:* | arceb:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; arm*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + set_cc_for_build + if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_EABI__ + then + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + else + if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ + | grep -q __ARM_PCS_VFP + then + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabi + else + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC"eabihf + fi + fi + exit ;; + avr32*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + cris:Linux:*:*) + echo "$UNAME_MACHINE"-axis-linux-"$LIBC" + exit ;; + crisv32:Linux:*:*) + echo "$UNAME_MACHINE"-axis-linux-"$LIBC" + exit ;; + e2k:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + frv:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + hexagon:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + i*86:Linux:*:*) + echo "$UNAME_MACHINE"-pc-linux-"$LIBC" + exit ;; ia64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + k1om:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + m32r*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; m68*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; - mips:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + mips:Linux:*:* | mips64:Linux:*:*) + set_cc_for_build + IS_GLIBC=0 + test x"${LIBC}" = xgnu && IS_GLIBC=1 + sed 's/^ //' << EOF > "$dummy.c" #undef CPU #undef mips #undef mipsel - #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mipsel + #undef mips64 + #undef mips64el + #if ${IS_GLIBC} && defined(_ABI64) + LIBCABI=gnuabi64 #else - #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips + #if ${IS_GLIBC} && defined(_ABIN32) + LIBCABI=gnuabin32 #else - CPU= + LIBCABI=${LIBC} #endif #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 - ;; - mips64:Linux:*:*) - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #undef CPU - #undef mips64 - #undef mips64el + + #if ${IS_GLIBC} && defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 + CPU=mipsisa64r6 + #else + #if ${IS_GLIBC} && !defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 + CPU=mipsisa32r6 + #else + #if defined(__mips64) + CPU=mips64 + #else + CPU=mips + #endif + #endif + #endif + #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) - CPU=mips64el + MIPS_ENDIAN=el #else #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) - CPU=mips64 + MIPS_ENDIAN= #else - CPU= + MIPS_ENDIAN= #endif #endif EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^CPU=` - test x"${CPU}" != x && echo "${CPU}-unknown-linux-gnu" && exit 0 + eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI'`" + test "x$CPU" != x && { echo "$CPU${MIPS_ENDIAN}-unknown-linux-$LIBCABI"; exit; } ;; - ppc:Linux:*:*) - echo powerpc-unknown-linux-gnu - exit 0 ;; - ppc64:Linux:*:*) - echo powerpc64-unknown-linux-gnu - exit 0 ;; - alpha:Linux:*:*) - case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in - EV5) UNAME_MACHINE=alphaev5 ;; - EV56) UNAME_MACHINE=alphaev56 ;; - PCA56) UNAME_MACHINE=alphapca56 ;; - PCA57) UNAME_MACHINE=alphapca56 ;; - EV6) UNAME_MACHINE=alphaev6 ;; - EV67) UNAME_MACHINE=alphaev67 ;; - EV68*) UNAME_MACHINE=alphaev68 ;; - esac - objdump --private-headers /bin/sh | grep ld.so.1 >/dev/null - if test "$?" = 0 ; then LIBC="libc1" ; else LIBC="" ; fi - echo ${UNAME_MACHINE}-unknown-linux-gnu${LIBC} - exit 0 ;; + mips64el:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + openrisc*:Linux:*:*) + echo or1k-unknown-linux-"$LIBC" + exit ;; + or32:Linux:*:* | or1k*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + padre:Linux:*:*) + echo sparc-unknown-linux-"$LIBC" + exit ;; + parisc64:Linux:*:* | hppa64:Linux:*:*) + echo hppa64-unknown-linux-"$LIBC" + exit ;; parisc:Linux:*:* | hppa:Linux:*:*) # Look for CPU level case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in - PA7*) echo hppa1.1-unknown-linux-gnu ;; - PA8*) echo hppa2.0-unknown-linux-gnu ;; - *) echo hppa-unknown-linux-gnu ;; + PA7*) echo hppa1.1-unknown-linux-"$LIBC" ;; + PA8*) echo hppa2.0-unknown-linux-"$LIBC" ;; + *) echo hppa-unknown-linux-"$LIBC" ;; esac - exit 0 ;; - parisc64:Linux:*:* | hppa64:Linux:*:*) - echo hppa64-unknown-linux-gnu - exit 0 ;; + exit ;; + ppc64:Linux:*:*) + echo powerpc64-unknown-linux-"$LIBC" + exit ;; + ppc:Linux:*:*) + echo powerpc-unknown-linux-"$LIBC" + exit ;; + ppc64le:Linux:*:*) + echo powerpc64le-unknown-linux-"$LIBC" + exit ;; + ppcle:Linux:*:*) + echo powerpcle-unknown-linux-"$LIBC" + exit ;; + riscv32:Linux:*:* | riscv64:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; s390:Linux:*:* | s390x:Linux:*:*) - echo ${UNAME_MACHINE}-ibm-linux - exit 0 ;; + echo "$UNAME_MACHINE"-ibm-linux-"$LIBC" + exit ;; + sh64*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; sh*:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; sparc:Linux:*:* | sparc64:Linux:*:*) - echo ${UNAME_MACHINE}-unknown-linux-gnu - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + tile*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; + vax:Linux:*:*) + echo "$UNAME_MACHINE"-dec-linux-"$LIBC" + exit ;; x86_64:Linux:*:*) - echo x86_64-unknown-linux-gnu - exit 0 ;; - i*86:Linux:*:*) - # The BFD linker knows what the default object file format is, so - # first see if it will tell us. cd to the root directory to prevent - # problems with other programs or directories called `ld' in the path. - # Set LC_ALL=C to ensure ld outputs messages in English. - ld_supported_targets=`cd /; LC_ALL=C ld --help 2>&1 \ - | sed -ne '/supported targets:/!d - s/[ ][ ]*/ /g - s/.*supported targets: *// - s/ .*// - p'` - case "$ld_supported_targets" in - elf32-i386) - TENTATIVE="${UNAME_MACHINE}-pc-linux-gnu" - ;; - a.out-i386-linux) - echo "${UNAME_MACHINE}-pc-linux-gnuaout" - exit 0 ;; - coff-i386) - echo "${UNAME_MACHINE}-pc-linux-gnucoff" - exit 0 ;; - "") - # Either a pre-BFD a.out linker (linux-gnuoldld) or - # one that does not give us useful --help. - echo "${UNAME_MACHINE}-pc-linux-gnuoldld" - exit 0 ;; - esac - # Determine whether the default compiler is a.out or elf - eval $set_cc_for_build - sed 's/^ //' << EOF >$dummy.c - #include - #ifdef __ELF__ - # ifdef __GLIBC__ - # if __GLIBC__ >= 2 - LIBC=gnu - # else - LIBC=gnulibc1 - # endif - # else - LIBC=gnulibc1 - # endif - #else - #ifdef __INTEL_COMPILER - LIBC=gnu - #else - LIBC=gnuaout - #endif - #endif -EOF - eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep ^LIBC=` - test x"${LIBC}" != x && echo "${UNAME_MACHINE}-pc-linux-${LIBC}" && exit 0 - test x"${TENTATIVE}" != x && echo "${TENTATIVE}" && exit 0 - ;; + echo "$UNAME_MACHINE"-pc-linux-"$LIBC" + exit ;; + xtensa*:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; i*86:DYNIX/ptx:4*:*) # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there. # earlier versions are messed up and put the nodename in both # sysname and nodename. echo i386-sequent-sysv4 - exit 0 ;; + exit ;; i*86:UNIX_SV:4.2MP:2.*) - # Unixware is an offshoot of SVR4, but it has its own version - # number series starting with 2... - # I am not positive that other SVR4 systems won't match this, + # Unixware is an offshoot of SVR4, but it has its own version + # number series starting with 2... + # I am not positive that other SVR4 systems won't match this, # I just have to hope. -- rms. - # Use sysv4.2uw... so that sysv4* matches it. - echo ${UNAME_MACHINE}-pc-sysv4.2uw${UNAME_VERSION} - exit 0 ;; + # Use sysv4.2uw... so that sysv4* matches it. + echo "$UNAME_MACHINE"-pc-sysv4.2uw"$UNAME_VERSION" + exit ;; i*86:OS/2:*:*) # If we were able to find `uname', then EMX Unix compatibility # is probably installed. - echo ${UNAME_MACHINE}-pc-os2-emx - exit 0 ;; + echo "$UNAME_MACHINE"-pc-os2-emx + exit ;; i*86:XTS-300:*:STOP) - echo ${UNAME_MACHINE}-unknown-stop - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-stop + exit ;; i*86:atheos:*:*) - echo ${UNAME_MACHINE}-unknown-atheos - exit 0 ;; - i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.0*:*) - echo i386-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-atheos + exit ;; + i*86:syllable:*:*) + echo "$UNAME_MACHINE"-pc-syllable + exit ;; + i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.[02]*:*) + echo i386-unknown-lynxos"$UNAME_RELEASE" + exit ;; i*86:*DOS:*:*) - echo ${UNAME_MACHINE}-pc-msdosdjgpp - exit 0 ;; - i*86:*:4.*:* | i*86:SYSTEM_V:4.*:*) - UNAME_REL=`echo ${UNAME_RELEASE} | sed 's/\/MP$//'` + echo "$UNAME_MACHINE"-pc-msdosdjgpp + exit ;; + i*86:*:4.*:*) + UNAME_REL=`echo "$UNAME_RELEASE" | sed 's/\/MP$//'` if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then - echo ${UNAME_MACHINE}-univel-sysv${UNAME_REL} + echo "$UNAME_MACHINE"-univel-sysv"$UNAME_REL" else - echo ${UNAME_MACHINE}-pc-sysv${UNAME_REL} + echo "$UNAME_MACHINE"-pc-sysv"$UNAME_REL" fi - exit 0 ;; - i*86:*:5:[78]*) + exit ;; + i*86:*:5:[678]*) + # UnixWare 7.x, OpenUNIX and OpenServer 6. case `/bin/uname -X | grep "^Machine"` in *486*) UNAME_MACHINE=i486 ;; *Pentium) UNAME_MACHINE=i586 ;; *Pent*|*Celeron) UNAME_MACHINE=i686 ;; esac - echo ${UNAME_MACHINE}-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION} - exit 0 ;; + echo "$UNAME_MACHINE-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION}" + exit ;; i*86:*:3.2:*) if test -f /usr/options/cb.name; then UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 @@ -1018,208 +1156,317 @@ EOF && UNAME_MACHINE=i686 (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \ && UNAME_MACHINE=i686 - echo ${UNAME_MACHINE}-pc-sco$UNAME_REL + echo "$UNAME_MACHINE"-pc-sco"$UNAME_REL" else - echo ${UNAME_MACHINE}-pc-sysv32 + echo "$UNAME_MACHINE"-pc-sysv32 fi - exit 0 ;; + exit ;; pc:*:*:*) # Left here for compatibility: - # uname -m prints for DJGPP always 'pc', but it prints nothing about - # the processor, so we play safe by assuming i386. - echo i386-pc-msdosdjgpp - exit 0 ;; + # uname -m prints for DJGPP always 'pc', but it prints nothing about + # the processor, so we play safe by assuming i586. + # Note: whatever this is, it MUST be the same as what config.sub + # prints for the "djgpp" host, or else GDB configure will decide that + # this is a cross-build. + echo i586-pc-msdosdjgpp + exit ;; Intel:Mach:3*:*) echo i386-pc-mach3 - exit 0 ;; + exit ;; paragon:*:*:*) echo i860-intel-osf1 - exit 0 ;; + exit ;; i860:*:4.*:*) # i860-SVR4 if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then - echo i860-stardent-sysv${UNAME_RELEASE} # Stardent Vistra i860-SVR4 + echo i860-stardent-sysv"$UNAME_RELEASE" # Stardent Vistra i860-SVR4 else # Add other i860-SVR4 vendors below as they are discovered. - echo i860-unknown-sysv${UNAME_RELEASE} # Unknown i860-SVR4 + echo i860-unknown-sysv"$UNAME_RELEASE" # Unknown i860-SVR4 fi - exit 0 ;; + exit ;; mini*:CTIX:SYS*5:*) # "miniframe" echo m68010-convergent-sysv - exit 0 ;; + exit ;; mc68k:UNIX:SYSTEM5:3.51m) echo m68k-convergent-sysv - exit 0 ;; + exit ;; M680?0:D-NIX:5.3:*) echo m68k-diab-dnix - exit 0 ;; - M68*:*:R3V[567]*:*) - test -r /sysV68 && echo 'm68k-motorola-sysv' && exit 0 ;; - 3[34]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0) + exit ;; + M68*:*:R3V[5678]*:*) + test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;; + 3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0) OS_REL='' test -r /etc/.relid \ && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4.3${OS_REL} && exit 0 + && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ - && echo i586-ncr-sysv4.3${OS_REL} && exit 0 ;; + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; 3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*) - /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ - && echo i486-ncr-sysv4 && exit 0 ;; + /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ + && { echo i486-ncr-sysv4; exit; } ;; + NCR*:*:4.2:* | MPRAS*:*:4.2:*) + OS_REL='.3' + test -r /etc/.relid \ + && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` + /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ + && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } + /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } + /bin/uname -p 2>/dev/null | /bin/grep pteron >/dev/null \ + && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*) - echo m68k-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo m68k-unknown-lynxos"$UNAME_RELEASE" + exit ;; mc68030:UNIX_System_V:4.*:*) echo m68k-atari-sysv4 - exit 0 ;; + exit ;; TSUNAMI:LynxOS:2.*:*) - echo sparc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo sparc-unknown-lynxos"$UNAME_RELEASE" + exit ;; rs6000:LynxOS:2.*:*) - echo rs6000-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; - PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.0*:*) - echo powerpc-unknown-lynxos${UNAME_RELEASE} - exit 0 ;; + echo rs6000-unknown-lynxos"$UNAME_RELEASE" + exit ;; + PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.[02]*:*) + echo powerpc-unknown-lynxos"$UNAME_RELEASE" + exit ;; SM[BE]S:UNIX_SV:*:*) - echo mips-dde-sysv${UNAME_RELEASE} - exit 0 ;; + echo mips-dde-sysv"$UNAME_RELEASE" + exit ;; RM*:ReliantUNIX-*:*:*) echo mips-sni-sysv4 - exit 0 ;; + exit ;; RM*:SINIX-*:*:*) echo mips-sni-sysv4 - exit 0 ;; + exit ;; *:SINIX-*:*:*) if uname -p 2>/dev/null >/dev/null ; then UNAME_MACHINE=`(uname -p) 2>/dev/null` - echo ${UNAME_MACHINE}-sni-sysv4 + echo "$UNAME_MACHINE"-sni-sysv4 else echo ns32k-sni-sysv fi - exit 0 ;; - PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort - # says - echo i586-unisys-sysv4 - exit 0 ;; + exit ;; + PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort + # says + echo i586-unisys-sysv4 + exit ;; *:UNIX_System_V:4*:FTX*) # From Gerald Hewes . # How about differentiating between stratus architectures? -djm echo hppa1.1-stratus-sysv4 - exit 0 ;; + exit ;; *:*:*:FTX*) # From seanf@swdc.stratus.com. echo i860-stratus-sysv4 - exit 0 ;; + exit ;; + i*86:VOS:*:*) + # From Paul.Green@stratus.com. + echo "$UNAME_MACHINE"-stratus-vos + exit ;; *:VOS:*:*) # From Paul.Green@stratus.com. echo hppa1.1-stratus-vos - exit 0 ;; + exit ;; mc68*:A/UX:*:*) - echo m68k-apple-aux${UNAME_RELEASE} - exit 0 ;; + echo m68k-apple-aux"$UNAME_RELEASE" + exit ;; news*:NEWS-OS:6*:*) echo mips-sony-newsos6 - exit 0 ;; + exit ;; R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) if [ -d /usr/nec ]; then - echo mips-nec-sysv${UNAME_RELEASE} + echo mips-nec-sysv"$UNAME_RELEASE" else - echo mips-unknown-sysv${UNAME_RELEASE} + echo mips-unknown-sysv"$UNAME_RELEASE" fi - exit 0 ;; + exit ;; BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only. echo powerpc-be-beos - exit 0 ;; + exit ;; BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only. echo powerpc-apple-beos - exit 0 ;; + exit ;; BePC:BeOS:*:*) # BeOS running on Intel PC compatible. echo i586-pc-beos - exit 0 ;; + exit ;; + BePC:Haiku:*:*) # Haiku running on Intel PC compatible. + echo i586-pc-haiku + exit ;; + x86_64:Haiku:*:*) + echo x86_64-unknown-haiku + exit ;; SX-4:SUPER-UX:*:*) - echo sx4-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx4-nec-superux"$UNAME_RELEASE" + exit ;; SX-5:SUPER-UX:*:*) - echo sx5-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx5-nec-superux"$UNAME_RELEASE" + exit ;; SX-6:SUPER-UX:*:*) - echo sx6-nec-superux${UNAME_RELEASE} - exit 0 ;; + echo sx6-nec-superux"$UNAME_RELEASE" + exit ;; + SX-7:SUPER-UX:*:*) + echo sx7-nec-superux"$UNAME_RELEASE" + exit ;; + SX-8:SUPER-UX:*:*) + echo sx8-nec-superux"$UNAME_RELEASE" + exit ;; + SX-8R:SUPER-UX:*:*) + echo sx8r-nec-superux"$UNAME_RELEASE" + exit ;; + SX-ACE:SUPER-UX:*:*) + echo sxace-nec-superux"$UNAME_RELEASE" + exit ;; Power*:Rhapsody:*:*) - echo powerpc-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; + echo powerpc-apple-rhapsody"$UNAME_RELEASE" + exit ;; *:Rhapsody:*:*) - echo ${UNAME_MACHINE}-apple-rhapsody${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-apple-rhapsody"$UNAME_RELEASE" + exit ;; *:Darwin:*:*) - case `uname -p` in - *86) UNAME_PROCESSOR=i686 ;; - powerpc) UNAME_PROCESSOR=powerpc ;; - esac - echo ${UNAME_PROCESSOR}-apple-darwin${UNAME_RELEASE} - exit 0 ;; + UNAME_PROCESSOR=`uname -p` || UNAME_PROCESSOR=unknown + set_cc_for_build + if test "$UNAME_PROCESSOR" = unknown ; then + UNAME_PROCESSOR=powerpc + fi + if test "`echo "$UNAME_RELEASE" | sed -e 's/\..*//'`" -le 10 ; then + if [ "$CC_FOR_BUILD" != no_compiler_found ]; then + if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_64BIT_ARCH >/dev/null + then + case $UNAME_PROCESSOR in + i386) UNAME_PROCESSOR=x86_64 ;; + powerpc) UNAME_PROCESSOR=powerpc64 ;; + esac + fi + # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc + if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_PPC >/dev/null + then + UNAME_PROCESSOR=powerpc + fi + fi + elif test "$UNAME_PROCESSOR" = i386 ; then + # Avoid executing cc on OS X 10.9, as it ships with a stub + # that puts up a graphical alert prompting to install + # developer tools. Any system running Mac OS X 10.7 or + # later (Darwin 11 and later) is required to have a 64-bit + # processor. This is not true of the ARM version of Darwin + # that Apple uses in portable devices. + UNAME_PROCESSOR=x86_64 + fi + echo "$UNAME_PROCESSOR"-apple-darwin"$UNAME_RELEASE" + exit ;; *:procnto*:*:* | *:QNX:[0123456789]*:*) UNAME_PROCESSOR=`uname -p` - if test "$UNAME_PROCESSOR" = "x86"; then + if test "$UNAME_PROCESSOR" = x86; then UNAME_PROCESSOR=i386 UNAME_MACHINE=pc fi - echo ${UNAME_PROCESSOR}-${UNAME_MACHINE}-nto-qnx${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_PROCESSOR"-"$UNAME_MACHINE"-nto-qnx"$UNAME_RELEASE" + exit ;; *:QNX:*:4*) echo i386-pc-qnx - exit 0 ;; - NSR-[DGKLNPTVW]:NONSTOP_KERNEL:*:*) - echo nsr-tandem-nsk${UNAME_RELEASE} - exit 0 ;; + exit ;; + NEO-*:NONSTOP_KERNEL:*:*) + echo neo-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSE-*:NONSTOP_KERNEL:*:*) + echo nse-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSR-*:NONSTOP_KERNEL:*:*) + echo nsr-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSV-*:NONSTOP_KERNEL:*:*) + echo nsv-tandem-nsk"$UNAME_RELEASE" + exit ;; + NSX-*:NONSTOP_KERNEL:*:*) + echo nsx-tandem-nsk"$UNAME_RELEASE" + exit ;; *:NonStop-UX:*:*) echo mips-compaq-nonstopux - exit 0 ;; + exit ;; BS2000:POSIX*:*:*) echo bs2000-siemens-sysv - exit 0 ;; + exit ;; DS/*:UNIX_System_V:*:*) - echo ${UNAME_MACHINE}-${UNAME_SYSTEM}-${UNAME_RELEASE} - exit 0 ;; + echo "$UNAME_MACHINE"-"$UNAME_SYSTEM"-"$UNAME_RELEASE" + exit ;; *:Plan9:*:*) # "uname -m" is not consistent, so use $cputype instead. 386 # is converted to i386 for consistency with other x86 # operating systems. - if test "$cputype" = "386"; then + # shellcheck disable=SC2154 + if test "$cputype" = 386; then UNAME_MACHINE=i386 else UNAME_MACHINE="$cputype" fi - echo ${UNAME_MACHINE}-unknown-plan9 - exit 0 ;; + echo "$UNAME_MACHINE"-unknown-plan9 + exit ;; *:TOPS-10:*:*) echo pdp10-unknown-tops10 - exit 0 ;; + exit ;; *:TENEX:*:*) echo pdp10-unknown-tenex - exit 0 ;; + exit ;; KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*) echo pdp10-dec-tops20 - exit 0 ;; + exit ;; XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*) echo pdp10-xkl-tops20 - exit 0 ;; + exit ;; *:TOPS-20:*:*) echo pdp10-unknown-tops20 - exit 0 ;; + exit ;; *:ITS:*:*) echo pdp10-unknown-its - exit 0 ;; + exit ;; + SEI:*:*:SEIUX) + echo mips-sei-seiux"$UNAME_RELEASE" + exit ;; + *:DragonFly:*:*) + echo "$UNAME_MACHINE"-unknown-dragonfly"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`" + exit ;; + *:*VMS:*:*) + UNAME_MACHINE=`(uname -p) 2>/dev/null` + case "$UNAME_MACHINE" in + A*) echo alpha-dec-vms ; exit ;; + I*) echo ia64-dec-vms ; exit ;; + V*) echo vax-dec-vms ; exit ;; + esac ;; + *:XENIX:*:SysV) + echo i386-pc-xenix + exit ;; + i*86:skyos:*:*) + echo "$UNAME_MACHINE"-pc-skyos"`echo "$UNAME_RELEASE" | sed -e 's/ .*$//'`" + exit ;; + i*86:rdos:*:*) + echo "$UNAME_MACHINE"-pc-rdos + exit ;; + i*86:AROS:*:*) + echo "$UNAME_MACHINE"-pc-aros + exit ;; + x86_64:VMkernel:*:*) + echo "$UNAME_MACHINE"-unknown-esx + exit ;; + amd64:Isilon\ OneFS:*:*) + echo x86_64-unknown-onefs + exit ;; + *:Unleashed:*:*) + echo "$UNAME_MACHINE"-unknown-unleashed"$UNAME_RELEASE" + exit ;; esac -#echo '(No uname command or uname output not recognized.)' 1>&2 -#echo "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" 1>&2 - -eval $set_cc_for_build -cat >$dummy.c < "$dummy.c" < -# include +#include +#include #endif main () { @@ -1232,22 +1479,14 @@ main () #include printf ("m68k-sony-newsos%s\n", #ifdef NEWSOS4 - "4" + "4" #else - "" + "" #endif - ); exit (0); + ); exit (0); #endif #endif -#if defined (__arm) && defined (__acorn) && defined (__unix) - printf ("arm-acorn-riscix"); exit (0); -#endif - -#if defined (hp300) && !defined (hpux) - printf ("m68k-hp-bsd\n"); exit (0); -#endif - #if defined (NeXT) #if !defined (__ARCHITECTURE__) #define __ARCHITECTURE__ "m68k" @@ -1287,39 +1526,49 @@ main () #endif #if defined (_SEQUENT_) - struct utsname un; - - uname(&un); - - if (strncmp(un.version, "V2", 2) == 0) { - printf ("i386-sequent-ptx2\n"); exit (0); - } - if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ - printf ("i386-sequent-ptx1\n"); exit (0); - } - printf ("i386-sequent-ptx\n"); exit (0); + struct utsname un; + uname(&un); + if (strncmp(un.version, "V2", 2) == 0) { + printf ("i386-sequent-ptx2\n"); exit (0); + } + if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ + printf ("i386-sequent-ptx1\n"); exit (0); + } + printf ("i386-sequent-ptx\n"); exit (0); #endif #if defined (vax) -# if !defined (ultrix) -# include -# if defined (BSD) -# if BSD == 43 - printf ("vax-dec-bsd4.3\n"); exit (0); -# else -# if BSD == 199006 - printf ("vax-dec-bsd4.3reno\n"); exit (0); -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# endif -# else - printf ("vax-dec-bsd\n"); exit (0); -# endif -# else - printf ("vax-dec-ultrix\n"); exit (0); -# endif +#if !defined (ultrix) +#include +#if defined (BSD) +#if BSD == 43 + printf ("vax-dec-bsd4.3\n"); exit (0); +#else +#if BSD == 199006 + printf ("vax-dec-bsd4.3reno\n"); exit (0); +#else + printf ("vax-dec-bsd\n"); exit (0); +#endif +#endif +#else + printf ("vax-dec-bsd\n"); exit (0); +#endif +#else + printf ("vax-dec-ultrix\n"); exit (0); +#endif +#endif +#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) +#if defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) +#include +#if defined(_SIZE_T_) /* >= ULTRIX4 */ + printf ("mips-dec-ultrix4\n"); exit (0); +#else +#if defined(ULTRIX3) || defined(ultrix3) || defined(SIGLOST) + printf ("mips-dec-ultrix3\n"); exit (0); +#endif +#endif +#endif #endif #if defined (alliant) && defined (i860) @@ -1330,51 +1579,38 @@ main () } EOF -$CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null && $dummy && exit 0 +$CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=`$dummy` && + { echo "$SYSTEM_NAME"; exit; } # Apollos put the system type in the environment. +test -d /usr/apollo && { echo "$ISP-apollo-$SYSTYPE"; exit; } -test -d /usr/apollo && { echo ${ISP}-apollo-${SYSTYPE}; exit 0; } +echo "$0: unable to guess system type" >&2 -# Convex versions that predate uname can use getsysinfo(1) +case "$UNAME_MACHINE:$UNAME_SYSTEM" in + mips:Linux | mips64:Linux) + # If we got here on MIPS GNU/Linux, output extra information. + cat >&2 <&2 < in order to provide the needed -information to handle your system. +If $0 has already been updated, send the following data and any +information you think might be pertinent to config-patches@gnu.org to +provide the necessary information to handle your system. config.guess timestamp = $timestamp @@ -1393,16 +1629,16 @@ hostinfo = `(hostinfo) 2>/dev/null` /usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` /usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` -UNAME_MACHINE = ${UNAME_MACHINE} -UNAME_RELEASE = ${UNAME_RELEASE} -UNAME_SYSTEM = ${UNAME_SYSTEM} -UNAME_VERSION = ${UNAME_VERSION} +UNAME_MACHINE = "$UNAME_MACHINE" +UNAME_RELEASE = "$UNAME_RELEASE" +UNAME_SYSTEM = "$UNAME_SYSTEM" +UNAME_VERSION = "$UNAME_VERSION" EOF exit 1 # Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) +# eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" diff --git a/BasiliskII/src/Unix/config.sub b/BasiliskII/src/Unix/config.sub index d6d67c3fd..3b4c7624b 100755 --- a/BasiliskII/src/Unix/config.sub +++ b/BasiliskII/src/Unix/config.sub @@ -1,42 +1,40 @@ #! /bin/sh # Configuration validation subroutine script. -# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, -# 2000, 2001, 2002, 2003 Free Software Foundation, Inc. +# Copyright 1992-2019 Free Software Foundation, Inc. -timestamp='2003-01-03' +timestamp='2019-01-05' -# This file is (in principle) common to ALL GNU software. -# The presence of a machine in this file suggests that SOME GNU software -# can handle that machine. It does not imply ALL GNU software can. -# -# This file 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 +# This file 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 3 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. +# 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. - +# along with this program; if not, see . +# # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. +# the same distribution terms that you use for the rest of that +# program. This Exception is an additional permission under section 7 +# of the GNU General Public License, version 3 ("GPLv3"). -# Please send patches to . Submit a context -# diff and a properly formatted ChangeLog entry. + +# Please send patches to . # # Configuration subroutine to validate and canonicalize a configuration type. # Supply the specified configuration type as an argument. # If it is invalid, we print an error message on stderr and exit with code 1. # Otherwise, we print the canonical config type on stdout and succeed. +# You can get the latest version of this script from: +# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub + # This file is supposed to be the same for all GNU packages # and recognize all the CPU types, system types and aliases # that are meaningful with *any* GNU software. @@ -55,12 +53,11 @@ timestamp='2003-01-03' me=`echo "$0" | sed -e 's,.*/,,'` usage="\ -Usage: $0 [OPTION] CPU-MFR-OPSYS - $0 [OPTION] ALIAS +Usage: $0 [OPTION] CPU-MFR-OPSYS or ALIAS Canonicalize a configuration name. -Operation modes: +Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit @@ -70,8 +67,7 @@ Report bugs and patches to ." version="\ GNU config.sub ($timestamp) -Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 -Free Software Foundation, Inc. +Copyright 1992-2019 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -83,23 +79,23 @@ Try \`$me --help' for more information." while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) - echo "$timestamp" ; exit 0 ;; + echo "$timestamp" ; exit ;; --version | -v ) - echo "$version" ; exit 0 ;; + echo "$version" ; exit ;; --help | --h* | -h ) - echo "$usage"; exit 0 ;; + echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) - echo "$me: invalid option $1$help" + echo "$me: invalid option $1$help" >&2 exit 1 ;; *local*) # First pass through any local machine types. - echo $1 - exit 0;; + echo "$1" + exit ;; * ) break ;; @@ -114,955 +110,1164 @@ case $# in exit 1;; esac -# Separate what the user gave into CPU-COMPANY and OS or KERNEL-OS (if any). -# Here we must recognize all the valid KERNEL-OS combinations. -maybe_os=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\2/'` -case $maybe_os in - nto-qnx* | linux-gnu* | freebsd*-gnu* | netbsd*-gnu* | storm-chaos* | os2-emx* | rtmk-nova*) - os=-$maybe_os - basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'` - ;; - *) - basic_machine=`echo $1 | sed 's/-[^-]*$//'` - if [ $basic_machine != $1 ] - then os=`echo $1 | sed 's/.*-/-/'` - else os=; fi - ;; -esac +# Split fields of configuration type +# shellcheck disable=SC2162 +IFS="-" read field1 field2 field3 field4 <&2 + exit 1 ;; - -sco*) - os=-sco3.2v2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*-*-*) + basic_machine=$field1-$field2 + os=$field3-$field4 ;; - -udk*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*-*) + # Ambiguous whether COMPANY is present, or skipped and KERNEL-OS is two + # parts + maybe_os=$field2-$field3 + case $maybe_os in + nto-qnx* | linux-gnu* | linux-android* | linux-dietlibc \ + | linux-newlib* | linux-musl* | linux-uclibc* | uclinux-uclibc* \ + | uclinux-gnu* | kfreebsd*-gnu* | knetbsd*-gnu* | netbsd*-gnu* \ + | netbsd*-eabi* | kopensolaris*-gnu* | cloudabi*-eabi* \ + | storm-chaos* | os2-emx* | rtmk-nova*) + basic_machine=$field1 + os=$maybe_os + ;; + android-linux) + basic_machine=$field1-unknown + os=linux-android + ;; + *) + basic_machine=$field1-$field2 + os=$field3 + ;; + esac ;; - -isc) - os=-isc2.2 - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` + *-*) + # A lone config we happen to match not fitting any pattern + case $field1-$field2 in + decstation-3100) + basic_machine=mips-dec + os= + ;; + *-*) + # Second component is usually, but not always the OS + case $field2 in + # Prevent following clause from handling this valid os + sun*os*) + basic_machine=$field1 + os=$field2 + ;; + # Manufacturers + dec* | mips* | sequent* | encore* | pc533* | sgi* | sony* \ + | att* | 7300* | 3300* | delta* | motorola* | sun[234]* \ + | unicom* | ibm* | next | hp | isi* | apollo | altos* \ + | convergent* | ncr* | news | 32* | 3600* | 3100* \ + | hitachi* | c[123]* | convex* | sun | crds | omron* | dg \ + | ultra | tti* | harris | dolphin | highlevel | gould \ + | cbm | ns | masscomp | apple | axis | knuth | cray \ + | microblaze* | sim | cisco \ + | oki | wec | wrs | winbond) + basic_machine=$field1-$field2 + os= + ;; + *) + basic_machine=$field1 + os=$field2 + ;; + esac + ;; + esac ;; - -clix*) - basic_machine=clipper-intergraph + *) + # Convert single-component short-hands not valid as part of + # multi-component configurations. + case $field1 in + 386bsd) + basic_machine=i386-pc + os=bsd + ;; + a29khif) + basic_machine=a29k-amd + os=udi + ;; + adobe68k) + basic_machine=m68010-adobe + os=scout + ;; + alliant) + basic_machine=fx80-alliant + os= + ;; + altos | altos3068) + basic_machine=m68k-altos + os= + ;; + am29k) + basic_machine=a29k-none + os=bsd + ;; + amdahl) + basic_machine=580-amdahl + os=sysv + ;; + amiga) + basic_machine=m68k-unknown + os= + ;; + amigaos | amigados) + basic_machine=m68k-unknown + os=amigaos + ;; + amigaunix | amix) + basic_machine=m68k-unknown + os=sysv4 + ;; + apollo68) + basic_machine=m68k-apollo + os=sysv + ;; + apollo68bsd) + basic_machine=m68k-apollo + os=bsd + ;; + aros) + basic_machine=i386-pc + os=aros + ;; + aux) + basic_machine=m68k-apple + os=aux + ;; + balance) + basic_machine=ns32k-sequent + os=dynix + ;; + blackfin) + basic_machine=bfin-unknown + os=linux + ;; + cegcc) + basic_machine=arm-unknown + os=cegcc + ;; + convex-c1) + basic_machine=c1-convex + os=bsd + ;; + convex-c2) + basic_machine=c2-convex + os=bsd + ;; + convex-c32) + basic_machine=c32-convex + os=bsd + ;; + convex-c34) + basic_machine=c34-convex + os=bsd + ;; + convex-c38) + basic_machine=c38-convex + os=bsd + ;; + cray) + basic_machine=j90-cray + os=unicos + ;; + crds | unos) + basic_machine=m68k-crds + os= + ;; + da30) + basic_machine=m68k-da30 + os= + ;; + decstation | pmax | pmin | dec3100 | decstatn) + basic_machine=mips-dec + os= + ;; + delta88) + basic_machine=m88k-motorola + os=sysv3 + ;; + dicos) + basic_machine=i686-pc + os=dicos + ;; + djgpp) + basic_machine=i586-pc + os=msdosdjgpp + ;; + ebmon29k) + basic_machine=a29k-amd + os=ebmon + ;; + es1800 | OSE68k | ose68k | ose | OSE) + basic_machine=m68k-ericsson + os=ose + ;; + gmicro) + basic_machine=tron-gmicro + os=sysv + ;; + go32) + basic_machine=i386-pc + os=go32 + ;; + h8300hms) + basic_machine=h8300-hitachi + os=hms + ;; + h8300xray) + basic_machine=h8300-hitachi + os=xray + ;; + h8500hms) + basic_machine=h8500-hitachi + os=hms + ;; + harris) + basic_machine=m88k-harris + os=sysv3 + ;; + hp300) + basic_machine=m68k-hp + ;; + hp300bsd) + basic_machine=m68k-hp + os=bsd + ;; + hp300hpux) + basic_machine=m68k-hp + os=hpux + ;; + hppaosf) + basic_machine=hppa1.1-hp + os=osf + ;; + hppro) + basic_machine=hppa1.1-hp + os=proelf + ;; + i386mach) + basic_machine=i386-mach + os=mach + ;; + vsta) + basic_machine=i386-pc + os=vsta + ;; + isi68 | isi) + basic_machine=m68k-isi + os=sysv + ;; + m68knommu) + basic_machine=m68k-unknown + os=linux + ;; + magnum | m3230) + basic_machine=mips-mips + os=sysv + ;; + merlin) + basic_machine=ns32k-utek + os=sysv + ;; + mingw64) + basic_machine=x86_64-pc + os=mingw64 + ;; + mingw32) + basic_machine=i686-pc + os=mingw32 + ;; + mingw32ce) + basic_machine=arm-unknown + os=mingw32ce + ;; + monitor) + basic_machine=m68k-rom68k + os=coff + ;; + morphos) + basic_machine=powerpc-unknown + os=morphos + ;; + moxiebox) + basic_machine=moxie-unknown + os=moxiebox + ;; + msdos) + basic_machine=i386-pc + os=msdos + ;; + msys) + basic_machine=i686-pc + os=msys + ;; + mvs) + basic_machine=i370-ibm + os=mvs + ;; + nacl) + basic_machine=le32-unknown + os=nacl + ;; + ncr3000) + basic_machine=i486-ncr + os=sysv4 + ;; + netbsd386) + basic_machine=i386-pc + os=netbsd + ;; + netwinder) + basic_machine=armv4l-rebel + os=linux + ;; + news | news700 | news800 | news900) + basic_machine=m68k-sony + os=newsos + ;; + news1000) + basic_machine=m68030-sony + os=newsos + ;; + necv70) + basic_machine=v70-nec + os=sysv + ;; + nh3000) + basic_machine=m68k-harris + os=cxux + ;; + nh[45]000) + basic_machine=m88k-harris + os=cxux + ;; + nindy960) + basic_machine=i960-intel + os=nindy + ;; + mon960) + basic_machine=i960-intel + os=mon960 + ;; + nonstopux) + basic_machine=mips-compaq + os=nonstopux + ;; + os400) + basic_machine=powerpc-ibm + os=os400 + ;; + OSE68000 | ose68000) + basic_machine=m68000-ericsson + os=ose + ;; + os68k) + basic_machine=m68k-none + os=os68k + ;; + paragon) + basic_machine=i860-intel + os=osf + ;; + parisc) + basic_machine=hppa-unknown + os=linux + ;; + pw32) + basic_machine=i586-unknown + os=pw32 + ;; + rdos | rdos64) + basic_machine=x86_64-pc + os=rdos + ;; + rdos32) + basic_machine=i386-pc + os=rdos + ;; + rom68k) + basic_machine=m68k-rom68k + os=coff + ;; + sa29200) + basic_machine=a29k-amd + os=udi + ;; + sei) + basic_machine=mips-sei + os=seiux + ;; + sequent) + basic_machine=i386-sequent + os= + ;; + sps7) + basic_machine=m68k-bull + os=sysv2 + ;; + st2000) + basic_machine=m68k-tandem + os= + ;; + stratus) + basic_machine=i860-stratus + os=sysv4 + ;; + sun2) + basic_machine=m68000-sun + os= + ;; + sun2os3) + basic_machine=m68000-sun + os=sunos3 + ;; + sun2os4) + basic_machine=m68000-sun + os=sunos4 + ;; + sun3) + basic_machine=m68k-sun + os= + ;; + sun3os3) + basic_machine=m68k-sun + os=sunos3 + ;; + sun3os4) + basic_machine=m68k-sun + os=sunos4 + ;; + sun4) + basic_machine=sparc-sun + os= + ;; + sun4os3) + basic_machine=sparc-sun + os=sunos3 + ;; + sun4os4) + basic_machine=sparc-sun + os=sunos4 + ;; + sun4sol2) + basic_machine=sparc-sun + os=solaris2 + ;; + sun386 | sun386i | roadrunner) + basic_machine=i386-sun + os= + ;; + sv1) + basic_machine=sv1-cray + os=unicos + ;; + symmetry) + basic_machine=i386-sequent + os=dynix + ;; + t3e) + basic_machine=alphaev5-cray + os=unicos + ;; + t90) + basic_machine=t90-cray + os=unicos + ;; + toad1) + basic_machine=pdp10-xkl + os=tops20 + ;; + tpf) + basic_machine=s390x-ibm + os=tpf + ;; + udi29k) + basic_machine=a29k-amd + os=udi + ;; + ultra3) + basic_machine=a29k-nyu + os=sym1 + ;; + v810 | necv810) + basic_machine=v810-nec + os=none + ;; + vaxv) + basic_machine=vax-dec + os=sysv + ;; + vms) + basic_machine=vax-dec + os=vms + ;; + vxworks960) + basic_machine=i960-wrs + os=vxworks + ;; + vxworks68) + basic_machine=m68k-wrs + os=vxworks + ;; + vxworks29k) + basic_machine=a29k-wrs + os=vxworks + ;; + xbox) + basic_machine=i686-pc + os=mingw32 + ;; + ymp) + basic_machine=ymp-cray + os=unicos + ;; + *) + basic_machine=$1 + os= + ;; + esac ;; - -isc*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` +esac + +# Decode 1-component or ad-hoc basic machines +case $basic_machine in + # Here we handle the default manufacturer of certain CPU types. It is in + # some cases the only manufacturer, in others, it is the most popular. + w89k) + cpu=hppa1.1 + vendor=winbond ;; - -lynx*) - os=-lynxos + op50n) + cpu=hppa1.1 + vendor=oki ;; - -ptx*) - basic_machine=`echo $1 | sed -e 's/86-.*/86-sequent/'` + op60c) + cpu=hppa1.1 + vendor=oki ;; - -windowsnt*) - os=`echo $os | sed -e 's/windowsnt/winnt/'` + ibm*) + cpu=i370 + vendor=ibm ;; - -psos*) - os=-psos + orion105) + cpu=clipper + vendor=highlevel ;; - -mint | -mint[0-9]*) - basic_machine=m68k-atari - os=-mint + mac | mpw | mac-mpw) + cpu=m68k + vendor=apple ;; -esac - -# Decode aliases for certain CPU-COMPANY combinations. -case $basic_machine in - # Recognize the basic CPU types without company name. - # Some are omitted here because they have special meanings below. - 1750a | 580 \ - | a29k \ - | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] | alphapca5[67] \ - | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] | alpha64pca5[67] \ - | arc | arm | arm[bl]e | arme[lb] | armv[2345] | armv[345][lb] | avr \ - | clipper \ - | d10v | d30v | dlx | dsp16xx \ - | fr30 | frv \ - | h8300 | h8500 | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ - | i370 | i860 | i960 | ia64 \ - | ip2k \ - | m32r | m68000 | m68k | m88k | mcore \ - | mips | mipsbe | mipseb | mipsel | mipsle \ - | mips16 \ - | mips64 | mips64el \ - | mips64vr | mips64vrel \ - | mips64orion | mips64orionel \ - | mips64vr4100 | mips64vr4100el \ - | mips64vr4300 | mips64vr4300el \ - | mips64vr5000 | mips64vr5000el \ - | mipsisa32 | mipsisa32el \ - | mipsisa32r2 | mipsisa32r2el \ - | mipsisa64 | mipsisa64el \ - | mipsisa64sb1 | mipsisa64sb1el \ - | mipsisa64sr71k | mipsisa64sr71kel \ - | mipstx39 | mipstx39el \ - | mn10200 | mn10300 \ - | msp430 \ - | ns16k | ns32k \ - | openrisc | or32 \ - | pdp10 | pdp11 | pj | pjl \ - | powerpc | powerpc64 | powerpc64le | powerpcle | ppcbe \ - | pyramid \ - | s390 | s390x \ - | sh | sh[1234] | sh3e | sh[34]eb | shbe | shle | sh[1234]le | sh3ele \ - | sh64 | sh64le \ - | sparc | sparc64 | sparc86x | sparclet | sparclite | sparcv9 | sparcv9b \ - | strongarm \ - | tahoe | thumb | tic80 | tron \ - | v850 | v850e \ - | we32k \ - | x86 | xscale | xstormy16 | xtensa \ - | z8k) - basic_machine=$basic_machine-unknown - ;; - m6811 | m68hc11 | m6812 | m68hc12) - # Motorola 68HC11/12. - basic_machine=$basic_machine-unknown - os=-none - ;; - m88110 | m680[12346]0 | m683?2 | m68360 | m5200 | v70 | w65 | z8k) + pmac | pmac-mpw) + cpu=powerpc + vendor=apple ;; - # We use `pc' rather than `unknown' - # because (1) that's what they normally are, and - # (2) the word "unknown" tends to confuse beginning users. - i*86 | x86_64) - basic_machine=$basic_machine-pc - ;; - # Object if more than one company name word. - *-*-*) - echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 - exit 1 - ;; - # Recognize the basic CPU types with company name. - 580-* \ - | a29k-* \ - | alpha-* | alphaev[4-8]-* | alphaev56-* | alphaev6[78]-* \ - | alpha64-* | alpha64ev[4-8]-* | alpha64ev56-* | alpha64ev6[78]-* \ - | alphapca5[67]-* | alpha64pca5[67]-* | arc-* \ - | arm-* | armbe-* | armle-* | armeb-* | armv*-* \ - | avr-* \ - | bs2000-* \ - | c[123]* | c30-* | [cjt]90-* | c4x-* | c54x-* \ - | clipper-* | cydra-* \ - | d10v-* | d30v-* | dlx-* \ - | elxsi-* \ - | f30[01]-* | f700-* | fr30-* | frv-* | fx80-* \ - | h8300-* | h8500-* \ - | hppa-* | hppa1.[01]-* | hppa2.0-* | hppa2.0[nw]-* | hppa64-* \ - | i*86-* | i860-* | i960-* | ia64-* \ - | ip2k-* \ - | m32r-* \ - | m68000-* | m680[012346]0-* | m68360-* | m683?2-* | m68k-* \ - | m88110-* | m88k-* | mcore-* \ - | mips-* | mipsbe-* | mipseb-* | mipsel-* | mipsle-* \ - | mips16-* \ - | mips64-* | mips64el-* \ - | mips64vr-* | mips64vrel-* \ - | mips64orion-* | mips64orionel-* \ - | mips64vr4100-* | mips64vr4100el-* \ - | mips64vr4300-* | mips64vr4300el-* \ - | mips64vr5000-* | mips64vr5000el-* \ - | mipsisa32-* | mipsisa32el-* \ - | mipsisa32r2-* | mipsisa32r2el-* \ - | mipsisa64-* | mipsisa64el-* \ - | mipsisa64sb1-* | mipsisa64sb1el-* \ - | mipsisa64sr71k-* | mipsisa64sr71kel-* \ - | mipstx39-* | mipstx39el-* \ - | msp430-* \ - | none-* | np1-* | nv1-* | ns16k-* | ns32k-* \ - | orion-* \ - | pdp10-* | pdp11-* | pj-* | pjl-* | pn-* | power-* \ - | powerpc-* | powerpc64-* | powerpc64le-* | powerpcle-* | ppcbe-* \ - | pyramid-* \ - | romp-* | rs6000-* \ - | s390-* | s390x-* \ - | sh-* | sh[1234]-* | sh3e-* | sh[34]eb-* | shbe-* \ - | shle-* | sh[1234]le-* | sh3ele-* | sh64-* | sh64le-* \ - | sparc-* | sparc64-* | sparc86x-* | sparclet-* | sparclite-* \ - | sparcv9-* | sparcv9b-* | strongarm-* | sv1-* | sx?-* \ - | tahoe-* | thumb-* | tic30-* | tic4x-* | tic54x-* | tic80-* | tron-* \ - | v850-* | v850e-* | vax-* \ - | we32k-* \ - | x86-* | x86_64-* | xps100-* | xscale-* | xstormy16-* \ - | xtensa-* \ - | ymp-* \ - | z8k-*) - ;; # Recognize the various machine names and aliases which stand # for a CPU type and a company and sometimes even an OS. - 386bsd) - basic_machine=i386-unknown - os=-bsd - ;; 3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc) - basic_machine=m68000-att + cpu=m68000 + vendor=att ;; 3b*) - basic_machine=we32k-att - ;; - a29khif) - basic_machine=a29k-amd - os=-udi - ;; - adobe68k) - basic_machine=m68010-adobe - os=-scout - ;; - alliant | fx80) - basic_machine=fx80-alliant - ;; - altos | altos3068) - basic_machine=m68k-altos - ;; - am29k) - basic_machine=a29k-none - os=-bsd - ;; - amdahl) - basic_machine=580-amdahl - os=-sysv - ;; - amiga | amiga-*) - basic_machine=m68k-unknown - ;; - amigaos | amigados) - basic_machine=m68k-unknown - os=-amigaos - ;; - amigaunix | amix) - basic_machine=m68k-unknown - os=-sysv4 - ;; - apollo68) - basic_machine=m68k-apollo - os=-sysv - ;; - apollo68bsd) - basic_machine=m68k-apollo - os=-bsd - ;; - aux) - basic_machine=m68k-apple - os=-aux - ;; - balance) - basic_machine=ns32k-sequent - os=-dynix - ;; - c90) - basic_machine=c90-cray - os=-unicos - ;; - convex-c1) - basic_machine=c1-convex - os=-bsd - ;; - convex-c2) - basic_machine=c2-convex - os=-bsd + cpu=we32k + vendor=att ;; - convex-c32) - basic_machine=c32-convex - os=-bsd - ;; - convex-c34) - basic_machine=c34-convex - os=-bsd - ;; - convex-c38) - basic_machine=c38-convex - os=-bsd - ;; - cray | j90) - basic_machine=j90-cray - os=-unicos - ;; - crds | unos) - basic_machine=m68k-crds - ;; - cris | cris-* | etrax*) - basic_machine=cris-axis - ;; - da30 | da30-*) - basic_machine=m68k-da30 - ;; - decstation | decstation-3100 | pmax | pmax-* | pmin | dec3100 | decstatn) - basic_machine=mips-dec + bluegene*) + cpu=powerpc + vendor=ibm + os=cnk ;; decsystem10* | dec10*) - basic_machine=pdp10-dec - os=-tops10 + cpu=pdp10 + vendor=dec + os=tops10 ;; decsystem20* | dec20*) - basic_machine=pdp10-dec - os=-tops20 + cpu=pdp10 + vendor=dec + os=tops20 ;; delta | 3300 | motorola-3300 | motorola-delta \ | 3300-motorola | delta-motorola) - basic_machine=m68k-motorola - ;; - delta88) - basic_machine=m88k-motorola - os=-sysv3 - ;; - dpx20 | dpx20-*) - basic_machine=rs6000-bull - os=-bosx - ;; - dpx2* | dpx2*-bull) - basic_machine=m68k-bull - os=-sysv3 - ;; - ebmon29k) - basic_machine=a29k-amd - os=-ebmon + cpu=m68k + vendor=motorola ;; - elxsi) - basic_machine=elxsi-elxsi - os=-bsd + dpx2*) + cpu=m68k + vendor=bull + os=sysv3 ;; encore | umax | mmax) - basic_machine=ns32k-encore + cpu=ns32k + vendor=encore ;; - es1800 | OSE68k | ose68k | ose | OSE) - basic_machine=m68k-ericsson - os=-ose + elxsi) + cpu=elxsi + vendor=elxsi + os=${os:-bsd} ;; fx2800) - basic_machine=i860-alliant + cpu=i860 + vendor=alliant ;; genix) - basic_machine=ns32k-ns - ;; - gmicro) - basic_machine=tron-gmicro - os=-sysv - ;; - go32) - basic_machine=i386-pc - os=-go32 + cpu=ns32k + vendor=ns ;; h3050r* | hiux*) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - h8300hms) - basic_machine=h8300-hitachi - os=-hms - ;; - h8300xray) - basic_machine=h8300-hitachi - os=-xray - ;; - h8500hms) - basic_machine=h8500-hitachi - os=-hms - ;; - harris) - basic_machine=m88k-harris - os=-sysv3 - ;; - hp300-*) - basic_machine=m68k-hp - ;; - hp300bsd) - basic_machine=m68k-hp - os=-bsd - ;; - hp300hpux) - basic_machine=m68k-hp - os=-hpux + cpu=hppa1.1 + vendor=hitachi + os=hiuxwe2 ;; hp3k9[0-9][0-9] | hp9[0-9][0-9]) - basic_machine=hppa1.0-hp + cpu=hppa1.0 + vendor=hp ;; hp9k2[0-9][0-9] | hp9k31[0-9]) - basic_machine=m68000-hp + cpu=m68000 + vendor=hp ;; hp9k3[2-9][0-9]) - basic_machine=m68k-hp + cpu=m68k + vendor=hp ;; hp9k6[0-9][0-9] | hp6[0-9][0-9]) - basic_machine=hppa1.0-hp + cpu=hppa1.0 + vendor=hp ;; hp9k7[0-79][0-9] | hp7[0-79][0-9]) - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k78[0-9] | hp78[0-9]) # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893) # FIXME: really hppa2.0-hp - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[0-9][13679] | hp8[0-9][13679]) - basic_machine=hppa1.1-hp + cpu=hppa1.1 + vendor=hp ;; hp9k8[0-9][0-9] | hp8[0-9][0-9]) - basic_machine=hppa1.0-hp + cpu=hppa1.0 + vendor=hp ;; - hppa-next) - os=-nextstep3 - ;; - hppaosf) - basic_machine=hppa1.1-hp - os=-osf - ;; - hppro) - basic_machine=hppa1.1-hp - os=-proelf - ;; - i370-ibm* | ibm*) - basic_machine=i370-ibm - ;; -# I'm not sure what "Sysv32" means. Should this be sysv3.2? i*86v32) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv32 + cpu=`echo "$1" | sed -e 's/86.*/86/'` + vendor=pc + os=sysv32 ;; i*86v4*) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv4 + cpu=`echo "$1" | sed -e 's/86.*/86/'` + vendor=pc + os=sysv4 ;; i*86v) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-sysv + cpu=`echo "$1" | sed -e 's/86.*/86/'` + vendor=pc + os=sysv ;; i*86sol2) - basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` - os=-solaris2 - ;; - i386mach) - basic_machine=i386-mach - os=-mach + cpu=`echo "$1" | sed -e 's/86.*/86/'` + vendor=pc + os=solaris2 ;; - i386-vsta | vsta) - basic_machine=i386-unknown - os=-vsta + j90 | j90-cray) + cpu=j90 + vendor=cray + os=${os:-unicos} ;; iris | iris4d) - basic_machine=mips-sgi + cpu=mips + vendor=sgi case $os in - -irix*) + irix*) ;; *) - os=-irix4 + os=irix4 ;; esac ;; - isi68 | isi) - basic_machine=m68k-isi - os=-sysv - ;; - m88k-omron*) - basic_machine=m88k-omron - ;; - magnum | m3230) - basic_machine=mips-mips - os=-sysv - ;; - merlin) - basic_machine=ns32k-utek - os=-sysv - ;; - mingw32) - basic_machine=i386-pc - os=-mingw32 - ;; miniframe) - basic_machine=m68000-convergent - ;; - *mint | -mint[0-9]* | *MiNT | *MiNT[0-9]*) - basic_machine=m68k-atari - os=-mint - ;; - mips3*-*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'` - ;; - mips3*) - basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`-unknown - ;; - mmix*) - basic_machine=mmix-knuth - os=-mmixware - ;; - monitor) - basic_machine=m68k-rom68k - os=-coff - ;; - morphos) - basic_machine=powerpc-unknown - os=-morphos - ;; - msdos) - basic_machine=i386-pc - os=-msdos - ;; - mvs) - basic_machine=i370-ibm - os=-mvs - ;; - ncr3000) - basic_machine=i486-ncr - os=-sysv4 + cpu=m68000 + vendor=convergent ;; - netbsd386) - basic_machine=i386-unknown - os=-netbsd - ;; - netwinder) - basic_machine=armv4l-rebel - os=-linux - ;; - news | news700 | news800 | news900) - basic_machine=m68k-sony - os=-newsos - ;; - news1000) - basic_machine=m68030-sony - os=-newsos + *mint | mint[0-9]* | *MiNT | *MiNT[0-9]*) + cpu=m68k + vendor=atari + os=mint ;; news-3600 | risc-news) - basic_machine=mips-sony - os=-newsos + cpu=mips + vendor=sony + os=newsos ;; - necv70) - basic_machine=v70-nec - os=-sysv - ;; - next | m*-next ) - basic_machine=m68k-next + next | m*-next) + cpu=m68k + vendor=next case $os in - -nextstep* ) + nextstep* ) ;; - -ns2*) - os=-nextstep2 + ns2*) + os=nextstep2 ;; *) - os=-nextstep3 + os=nextstep3 ;; esac ;; - nh3000) - basic_machine=m68k-harris - os=-cxux - ;; - nh[45]000) - basic_machine=m88k-harris - os=-cxux - ;; - nindy960) - basic_machine=i960-intel - os=-nindy - ;; - mon960) - basic_machine=i960-intel - os=-mon960 - ;; - nonstopux) - basic_machine=mips-compaq - os=-nonstopux - ;; np1) - basic_machine=np1-gould - ;; - nv1) - basic_machine=nv1-cray - os=-unicosmp - ;; - nsr-tandem) - basic_machine=nsr-tandem + cpu=np1 + vendor=gould ;; op50n-* | op60c-*) - basic_machine=hppa1.1-oki - os=-proelf - ;; - or32 | or32-*) - basic_machine=or32-unknown - os=-coff - ;; - OSE68000 | ose68000) - basic_machine=m68000-ericsson - os=-ose - ;; - os68k) - basic_machine=m68k-none - os=-os68k + cpu=hppa1.1 + vendor=oki + os=proelf ;; pa-hitachi) - basic_machine=hppa1.1-hitachi - os=-hiuxwe2 - ;; - paragon) - basic_machine=i860-intel - os=-osf + cpu=hppa1.1 + vendor=hitachi + os=hiuxwe2 ;; pbd) - basic_machine=sparc-tti + cpu=sparc + vendor=tti ;; pbb) - basic_machine=m68k-tti - ;; - pc532 | pc532-*) - basic_machine=ns32k-pc532 - ;; - pentium | p5 | k5 | k6 | nexgen | viac3) - basic_machine=i586-pc - ;; - pentiumpro | p6 | 6x86 | athlon | athlon_*) - basic_machine=i686-pc - ;; - pentiumii | pentium2) - basic_machine=i686-pc - ;; - pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*) - basic_machine=i586-`echo $basic_machine | sed 's/^[^-]*-//'` + cpu=m68k + vendor=tti ;; - pentiumpro-* | p6-* | 6x86-* | athlon-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` - ;; - pentiumii-* | pentium2-*) - basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` + pc532) + cpu=ns32k + vendor=pc532 ;; pn) - basic_machine=pn-gould - ;; - power) basic_machine=power-ibm - ;; - ppc) basic_machine=powerpc-unknown + cpu=pn + vendor=gould ;; - ppc-*) basic_machine=powerpc-`echo $basic_machine | sed 's/^[^-]*-//'` + power) + cpu=power + vendor=ibm ;; - ppcle | powerpclittle | ppc-le | powerpc-little) - basic_machine=powerpcle-unknown - ;; - ppcle-* | powerpclittle-*) - basic_machine=powerpcle-`echo $basic_machine | sed 's/^[^-]*-//'` + ps2) + cpu=i386 + vendor=ibm ;; - ppc64) basic_machine=powerpc64-unknown + rm[46]00) + cpu=mips + vendor=siemens ;; - ppc64-*) basic_machine=powerpc64-`echo $basic_machine | sed 's/^[^-]*-//'` + rtpc | rtpc-*) + cpu=romp + vendor=ibm ;; - ppc64le | powerpc64little | ppc64-le | powerpc64-little) - basic_machine=powerpc64le-unknown + sde) + cpu=mipsisa32 + vendor=sde + os=${os:-elf} ;; - ppc64le-* | powerpc64little-*) - basic_machine=powerpc64le-`echo $basic_machine | sed 's/^[^-]*-//'` + simso-wrs) + cpu=sparclite + vendor=wrs + os=vxworks ;; - ps2) - basic_machine=i386-ibm + tower | tower-32) + cpu=m68k + vendor=ncr ;; - pw32) - basic_machine=i586-unknown - os=-pw32 + vpp*|vx|vx-*) + cpu=f301 + vendor=fujitsu ;; - rom68k) - basic_machine=m68k-rom68k - os=-coff + w65) + cpu=w65 + vendor=wdc ;; - rm[46]00) - basic_machine=mips-siemens + w89k-*) + cpu=hppa1.1 + vendor=winbond + os=proelf ;; - rtpc | rtpc-*) - basic_machine=romp-ibm + none) + cpu=none + vendor=none ;; - sa29200) - basic_machine=a29k-amd - os=-udi + leon|leon[3-9]) + cpu=sparc + vendor=$basic_machine ;; - sb1) - basic_machine=mipsisa64sb1-unknown + leon-*|leon[3-9]-*) + cpu=sparc + vendor=`echo "$basic_machine" | sed 's/-.*//'` ;; - sb1el) - basic_machine=mipsisa64sb1el-unknown + + *-*) + # shellcheck disable=SC2162 + IFS="-" read cpu vendor <&2 - exit 1 + # Recognize the canonical CPU types that are allowed with any + # company name. + case $cpu in + 1750a | 580 \ + | a29k \ + | aarch64 | aarch64_be \ + | abacus \ + | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] \ + | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] \ + | alphapca5[67] | alpha64pca5[67] \ + | am33_2.0 \ + | amdgcn \ + | arc | arceb \ + | arm | arm[lb]e | arme[lb] | armv* \ + | avr | avr32 \ + | asmjs \ + | ba \ + | be32 | be64 \ + | bfin | bs2000 \ + | c[123]* | c30 | [cjt]90 | c4x \ + | c8051 | clipper | craynv | csky | cydra \ + | d10v | d30v | dlx | dsp16xx \ + | e2k | elxsi | epiphany \ + | f30[01] | f700 | fido | fr30 | frv | ft32 | fx80 \ + | h8300 | h8500 \ + | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ + | hexagon \ + | i370 | i*86 | i860 | i960 | ia16 | ia64 \ + | ip2k | iq2000 \ + | k1om \ + | le32 | le64 \ + | lm32 \ + | m32c | m32r | m32rle \ + | m5200 | m68000 | m680[012346]0 | m68360 | m683?2 | m68k \ + | m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x \ + | m88110 | m88k | maxq | mb | mcore | mep | metag \ + | microblaze | microblazeel \ + | mips | mipsbe | mipseb | mipsel | mipsle \ + | mips16 \ + | mips64 | mips64eb | mips64el \ + | mips64octeon | mips64octeonel \ + | mips64orion | mips64orionel \ + | mips64r5900 | mips64r5900el \ + | mips64vr | mips64vrel \ + | mips64vr4100 | mips64vr4100el \ + | mips64vr4300 | mips64vr4300el \ + | mips64vr5000 | mips64vr5000el \ + | mips64vr5900 | mips64vr5900el \ + | mipsisa32 | mipsisa32el \ + | mipsisa32r2 | mipsisa32r2el \ + | mipsisa32r6 | mipsisa32r6el \ + | mipsisa64 | mipsisa64el \ + | mipsisa64r2 | mipsisa64r2el \ + | mipsisa64r6 | mipsisa64r6el \ + | mipsisa64sb1 | mipsisa64sb1el \ + | mipsisa64sr71k | mipsisa64sr71kel \ + | mipsr5900 | mipsr5900el \ + | mipstx39 | mipstx39el \ + | mmix \ + | mn10200 | mn10300 \ + | moxie \ + | mt \ + | msp430 \ + | nds32 | nds32le | nds32be \ + | nfp \ + | nios | nios2 | nios2eb | nios2el \ + | none | np1 | ns16k | ns32k | nvptx \ + | open8 \ + | or1k* \ + | or32 \ + | orion \ + | picochip \ + | pdp10 | pdp11 | pj | pjl | pn | power \ + | powerpc | powerpc64 | powerpc64le | powerpcle | powerpcspe \ + | pru \ + | pyramid \ + | riscv | riscv32 | riscv64 \ + | rl78 | romp | rs6000 | rx \ + | score \ + | sh | shl \ + | sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \ + | sh[1234]e[lb] | sh[12345][lb]e | sh[23]ele | sh64 | sh64le \ + | sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet \ + | sparclite \ + | sparcv8 | sparcv9 | sparcv9b | sparcv9v | sv1 | sx* \ + | spu \ + | tahoe \ + | tic30 | tic4x | tic54x | tic55x | tic6x | tic80 \ + | tron \ + | ubicom32 \ + | v70 | v850 | v850e | v850e1 | v850es | v850e2 | v850e2v3 \ + | vax \ + | visium \ + | w65 | wasm32 \ + | we32k \ + | x86 | x86_64 | xc16x | xgate | xps100 \ + | xstormy16 | xtensa* \ + | ymp \ + | z8k | z80) + ;; + + *) + echo Invalid configuration \`"$1"\': machine \`"$cpu-$vendor"\' not recognized 1>&2 + exit 1 + ;; + esac ;; esac # Here we canonicalize certain aliases for manufacturers. -case $basic_machine in - *-digital*) - basic_machine=`echo $basic_machine | sed 's/digital.*/dec/'` +case $vendor in + digital*) + vendor=dec ;; - *-commodore*) - basic_machine=`echo $basic_machine | sed 's/commodore.*/cbm/'` + commodore*) + vendor=cbm ;; *) ;; @@ -1070,165 +1275,246 @@ esac # Decode manufacturer-specific aliases for certain operating systems. -if [ x"$os" != x"" ] +if [ x$os != x ] then case $os in - # First match some system type aliases - # that might get confused with valid system types. - # -solaris* is a basic system type, with this one exception. - -solaris1 | -solaris1.*) - os=`echo $os | sed -e 's|solaris1|sunos4|'` + # First match some system type aliases that might get confused + # with valid system types. + # solaris* is a basic system type, with this one exception. + auroraux) + os=auroraux ;; - -solaris) - os=-solaris2 + bluegene*) + os=cnk ;; - -svr4*) - os=-sysv4 + solaris1 | solaris1.*) + os=`echo $os | sed -e 's|solaris1|sunos4|'` ;; - -unixware*) - os=-sysv4.2uw + solaris) + os=solaris2 ;; - -gnu/linux*) + unixware*) + os=sysv4.2uw + ;; + gnu/linux*) os=`echo $os | sed -e 's|gnu/linux|linux-gnu|'` ;; - # First accept the basic system types. + # es1800 is here to avoid being matched by es* (a different OS) + es1800*) + os=ose + ;; + # Some version numbers need modification + chorusos*) + os=chorusos + ;; + isc) + os=isc2.2 + ;; + sco6) + os=sco5v6 + ;; + sco5) + os=sco3.2v5 + ;; + sco4) + os=sco3.2v4 + ;; + sco3.2.[4-9]*) + os=`echo $os | sed -e 's/sco3.2./sco3.2v/'` + ;; + sco3.2v[4-9]* | sco5v6*) + # Don't forget version if it is 3.2v4 or newer. + ;; + scout) + # Don't match below + ;; + sco*) + os=sco3.2v2 + ;; + psos*) + os=psos + ;; + # Now accept the basic system types. # The portable systems comes first. - # Each alternative MUST END IN A *, to match a version number. - # -sysv* is not here because it comes later, after sysvr4. - -gnu* | -bsd* | -mach* | -minix* | -genix* | -ultrix* | -irix* \ - | -*vms* | -sco* | -esix* | -isc* | -aix* | -sunos | -sunos[34]*\ - | -hpux* | -unos* | -osf* | -luna* | -dgux* | -solaris* | -sym* \ - | -amigaos* | -amigados* | -msdos* | -newsos* | -unicos* | -aof* \ - | -aos* \ - | -nindy* | -vxsim* | -vxworks* | -ebmon* | -hms* | -mvs* \ - | -clix* | -riscos* | -uniplus* | -iris* | -rtu* | -xenix* \ - | -hiux* | -386bsd* | -netbsd* | -openbsd* | -freebsd* | -riscix* \ - | -lynxos* | -bosx* | -nextstep* | -cxux* | -aout* | -elf* | -oabi* \ - | -ptx* | -coff* | -ecoff* | -winnt* | -domain* | -vsta* \ - | -udi* | -eabi* | -lites* | -ieee* | -go32* | -aux* \ - | -chorusos* | -chorusrdb* \ - | -cygwin* | -pe* | -psos* | -moss* | -proelf* | -rtems* \ - | -mingw32* | -linux-gnu* | -uxpv* | -beos* | -mpeix* | -udk* \ - | -interix* | -uwin* | -mks* | -rhapsody* | -darwin* | -opened* \ - | -openstep* | -oskit* | -conix* | -pw32* | -nonstopux* \ - | -storm-chaos* | -tops10* | -tenex* | -tops20* | -its* \ - | -os2* | -vos* | -palmos* | -uclinux* | -nucleus* \ - | -morphos* | -superux* | -rtmk* | -rtmk-nova* | -windiss* \ - | -powermax* | -dnix* | -microbsd*) + # Each alternative MUST end in a * to match a version number. + # sysv* is not here because it comes later, after sysvr4. + gnu* | bsd* | mach* | minix* | genix* | ultrix* | irix* \ + | *vms* | esix* | aix* | cnk* | sunos | sunos[34]*\ + | hpux* | unos* | osf* | luna* | dgux* | auroraux* | solaris* \ + | sym* | kopensolaris* | plan9* \ + | amigaos* | amigados* | msdos* | newsos* | unicos* | aof* \ + | aos* | aros* | cloudabi* | sortix* \ + | nindy* | vxsim* | vxworks* | ebmon* | hms* | mvs* \ + | clix* | riscos* | uniplus* | iris* | isc* | rtu* | xenix* \ + | knetbsd* | mirbsd* | netbsd* \ + | bitrig* | openbsd* | solidbsd* | libertybsd* \ + | ekkobsd* | kfreebsd* | freebsd* | riscix* | lynxos* \ + | bosx* | nextstep* | cxux* | aout* | elf* | oabi* \ + | ptx* | coff* | ecoff* | winnt* | domain* | vsta* \ + | udi* | eabi* | lites* | ieee* | go32* | aux* | hcos* \ + | chorusrdb* | cegcc* | glidix* \ + | cygwin* | msys* | pe* | moss* | proelf* | rtems* \ + | midipix* | mingw32* | mingw64* | linux-gnu* | linux-android* \ + | linux-newlib* | linux-musl* | linux-uclibc* \ + | uxpv* | beos* | mpeix* | udk* | moxiebox* \ + | interix* | uwin* | mks* | rhapsody* | darwin* \ + | openstep* | oskit* | conix* | pw32* | nonstopux* \ + | storm-chaos* | tops10* | tenex* | tops20* | its* \ + | os2* | vos* | palmos* | uclinux* | nucleus* \ + | morphos* | superux* | rtmk* | windiss* \ + | powermax* | dnix* | nx6 | nx7 | sei* | dragonfly* \ + | skyos* | haiku* | rdos* | toppers* | drops* | es* \ + | onefs* | tirtos* | phoenix* | fuchsia* | redox* | bme* \ + | midnightbsd* | amdhsa* | unleashed* | emscripten*) # Remember, each alternative MUST END IN *, to match a version number. ;; - -qnx*) - case $basic_machine in - x86-* | i*86-*) + qnx*) + case $cpu in + x86 | i*86) ;; *) - os=-nto$os + os=nto-$os ;; esac ;; - -nto-qnx*) + hiux*) + os=hiuxwe2 + ;; + nto-qnx*) ;; - -nto*) + nto*) os=`echo $os | sed -e 's|nto|nto-qnx|'` ;; - -sim | -es1800* | -hms* | -xray | -os68k* | -none* | -v88r* \ - | -windows* | -osx | -abug | -netware* | -os9* | -beos* \ - | -macos* | -mpw* | -magic* | -mmixware* | -mon960* | -lnews*) + sim | xray | os68k* | v88r* \ + | windows* | osx | abug | netware* | os9* \ + | macos* | mpw* | magic* | mmixware* | mon960* | lnews*) ;; - -mac*) - os=`echo $os | sed -e 's|mac|macos|'` + linux-dietlibc) + os=linux-dietlibc ;; - -linux*) + linux*) os=`echo $os | sed -e 's|linux|linux-gnu|'` ;; - -sunos5*) - os=`echo $os | sed -e 's|sunos5|solaris2|'` + lynx*178) + os=lynxos178 ;; - -sunos6*) - os=`echo $os | sed -e 's|sunos6|solaris3|'` + lynx*5) + os=lynxos5 ;; - -opened*) - os=-openedition + lynx*) + os=lynxos ;; - -wince*) - os=-wince + mac*) + os=`echo "$os" | sed -e 's|mac|macos|'` ;; - -osfrose*) - os=-osfrose + opened*) + os=openedition ;; - -osf*) - os=-osf + os400*) + os=os400 ;; - -utek*) - os=-bsd + sunos5*) + os=`echo "$os" | sed -e 's|sunos5|solaris2|'` ;; - -dynix*) - os=-bsd + sunos6*) + os=`echo "$os" | sed -e 's|sunos6|solaris3|'` ;; - -acis*) - os=-aos + wince*) + os=wince ;; - -atheos*) - os=-atheos + utek*) + os=bsd ;; - -386bsd) - os=-bsd + dynix*) + os=bsd ;; - -ctix* | -uts*) - os=-sysv + acis*) + os=aos ;; - -nova*) - os=-rtmk-nova + atheos*) + os=atheos ;; - -ns2 ) - os=-nextstep2 + syllable*) + os=syllable ;; - -nsk*) - os=-nsk + 386bsd) + os=bsd + ;; + ctix* | uts*) + os=sysv + ;; + nova*) + os=rtmk-nova + ;; + ns2) + os=nextstep2 + ;; + nsk*) + os=nsk ;; # Preserve the version number of sinix5. - -sinix5.*) + sinix5.*) os=`echo $os | sed -e 's|sinix|sysv|'` ;; - -sinix*) - os=-sysv4 + sinix*) + os=sysv4 + ;; + tpf*) + os=tpf ;; - -triton*) - os=-sysv3 + triton*) + os=sysv3 ;; - -oss*) - os=-sysv3 + oss*) + os=sysv3 ;; - -svr4) - os=-sysv4 + svr4*) + os=sysv4 ;; - -svr3) - os=-sysv3 + svr3) + os=sysv3 ;; - -sysvr4) - os=-sysv4 + sysvr4) + os=sysv4 ;; - # This must come after -sysvr4. - -sysv*) + # This must come after sysvr4. + sysv*) ;; - -ose*) - os=-ose + ose*) + os=ose ;; - -es1800*) - os=-ose + *mint | mint[0-9]* | *MiNT | MiNT[0-9]*) + os=mint ;; - -xenix) - os=-xenix + zvmoe) + os=zvmoe ;; - -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) - os=-mint + dicos*) + os=dicos ;; - -none) + pikeos*) + # Until real need of OS specific support for + # particular features comes up, bare metal + # configurations are quite functional. + case $cpu in + arm*) + os=eabi + ;; + *) + os=elf + ;; + esac + ;; + nacl*) + ;; + ios) + ;; + none) + ;; + *-eabi) ;; *) - # Get rid of the `-' at the beginning of $os. - os=`echo $os | sed 's/[^-]*-//'` - echo Invalid configuration \`$1\': system \`$os\' not recognized 1>&2 + echo Invalid configuration \`"$1"\': system \`"$os"\' not recognized 1>&2 exit 1 ;; esac @@ -1244,225 +1530,265 @@ else # will signal an error saying that MANUFACTURER isn't an operating # system, and we'll never get to this point. -case $basic_machine in +case $cpu-$vendor in + score-*) + os=elf + ;; + spu-*) + os=elf + ;; *-acorn) - os=-riscix1.2 + os=riscix1.2 ;; arm*-rebel) - os=-linux + os=linux ;; arm*-semi) - os=-aout + os=aout + ;; + c4x-* | tic4x-*) + os=coff + ;; + c8051-*) + os=elf + ;; + clipper-intergraph) + os=clix + ;; + hexagon-*) + os=elf + ;; + tic54x-*) + os=coff + ;; + tic55x-*) + os=coff + ;; + tic6x-*) + os=coff ;; # This must come before the *-dec entry. pdp10-*) - os=-tops20 + os=tops20 ;; pdp11-*) - os=-none + os=none ;; *-dec | vax-*) - os=-ultrix4.2 + os=ultrix4.2 ;; m68*-apollo) - os=-domain + os=domain ;; i386-sun) - os=-sunos4.0.2 + os=sunos4.0.2 ;; m68000-sun) - os=-sunos3 - # This also exists in the configure program, but was not the - # default. - # os=-sunos4 + os=sunos3 ;; m68*-cisco) - os=-aout + os=aout + ;; + mep-*) + os=elf ;; mips*-cisco) - os=-elf + os=elf ;; mips*-*) - os=-elf + os=elf ;; or32-*) - os=-coff + os=coff ;; *-tti) # must be before sparc entry or we get the wrong os. - os=-sysv3 + os=sysv3 ;; sparc-* | *-sun) - os=-sunos4.1.1 + os=sunos4.1.1 + ;; + pru-*) + os=elf ;; *-be) - os=-beos + os=beos ;; *-ibm) - os=-aix + os=aix + ;; + *-knuth) + os=mmixware ;; *-wec) - os=-proelf + os=proelf ;; *-winbond) - os=-proelf + os=proelf ;; *-oki) - os=-proelf + os=proelf ;; *-hp) - os=-hpux + os=hpux ;; *-hitachi) - os=-hiux + os=hiux ;; i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent) - os=-sysv + os=sysv ;; *-cbm) - os=-amigaos + os=amigaos ;; *-dg) - os=-dgux + os=dgux ;; *-dolphin) - os=-sysv3 + os=sysv3 ;; m68k-ccur) - os=-rtu + os=rtu ;; m88k-omron*) - os=-luna + os=luna ;; - *-next ) - os=-nextstep + *-next) + os=nextstep ;; *-sequent) - os=-ptx + os=ptx ;; *-crds) - os=-unos + os=unos ;; *-ns) - os=-genix + os=genix ;; i370-*) - os=-mvs - ;; - *-next) - os=-nextstep3 + os=mvs ;; *-gould) - os=-sysv + os=sysv ;; *-highlevel) - os=-bsd + os=bsd ;; *-encore) - os=-bsd + os=bsd ;; *-sgi) - os=-irix + os=irix ;; *-siemens) - os=-sysv4 + os=sysv4 ;; *-masscomp) - os=-rtu + os=rtu ;; f30[01]-fujitsu | f700-fujitsu) - os=-uxpv + os=uxpv ;; *-rom68k) - os=-coff + os=coff ;; *-*bug) - os=-coff + os=coff ;; *-apple) - os=-macos + os=macos ;; *-atari*) - os=-mint + os=mint + ;; + *-wrs) + os=vxworks ;; *) - os=-none + os=none ;; esac fi # Here we handle the case where we know the os, and the CPU type, but not the # manufacturer. We pick the logical manufacturer. -vendor=unknown -case $basic_machine in - *-unknown) +case $vendor in + unknown) case $os in - -riscix*) + riscix*) vendor=acorn ;; - -sunos*) + sunos*) vendor=sun ;; - -aix*) + cnk*|-aix*) vendor=ibm ;; - -beos*) + beos*) vendor=be ;; - -hpux*) + hpux*) vendor=hp ;; - -mpeix*) + mpeix*) vendor=hp ;; - -hiux*) + hiux*) vendor=hitachi ;; - -unos*) + unos*) vendor=crds ;; - -dgux*) + dgux*) vendor=dg ;; - -luna*) + luna*) vendor=omron ;; - -genix*) + genix*) vendor=ns ;; - -mvs* | -opened*) + clix*) + vendor=intergraph + ;; + mvs* | opened*) + vendor=ibm + ;; + os400*) vendor=ibm ;; - -ptx*) + ptx*) vendor=sequent ;; - -vxsim* | -vxworks* | -windiss*) + tpf*) + vendor=ibm + ;; + vxsim* | vxworks* | windiss*) vendor=wrs ;; - -aux*) + aux*) vendor=apple ;; - -hms*) + hms*) vendor=hitachi ;; - -mpw* | -macos*) + mpw* | macos*) vendor=apple ;; - -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) + *mint | mint[0-9]* | *MiNT | MiNT[0-9]*) vendor=atari ;; - -vos*) + vos*) vendor=stratus ;; esac - basic_machine=`echo $basic_machine | sed "s/unknown/$vendor/"` ;; esac -echo $basic_machine$os -exit 0 +echo "$cpu-$vendor-$os" +exit # Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) +# eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" From e750aecafeccdc8dc186f3c414d101337f9a7229 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 16 Apr 2021 10:54:04 +0900 Subject: [PATCH 485/534] macOS: prefs item "name_encoding" --- .../BasiliskII.xcodeproj/project.pbxproj | 2 + BasiliskII/src/MacOSX/extfs_macosx.cpp | 37 +++++++++++-------- BasiliskII/src/prefs_items.cpp | 1 + .../project.pbxproj | 2 + SheepShaver/src/prefs_items.cpp | 1 + 5 files changed, 28 insertions(+), 15 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 81dfaf8ca..30203e55b 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1118,6 +1118,7 @@ "-Wl,-no_pie", "-pagezero_size", 0x1000, + "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; @@ -1182,6 +1183,7 @@ "-Wl,-no_pie", "-pagezero_size", 0x1000, + "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; diff --git a/BasiliskII/src/MacOSX/extfs_macosx.cpp b/BasiliskII/src/MacOSX/extfs_macosx.cpp index 760c378ff..66fdc92b7 100644 --- a/BasiliskII/src/MacOSX/extfs_macosx.cpp +++ b/BasiliskII/src/MacOSX/extfs_macosx.cpp @@ -27,6 +27,8 @@ #include #include #include +#include +#include #include "sysdeps.h" #include "prefs.h" @@ -609,28 +611,33 @@ bool extfs_rename(const char *old_path, const char *new_path) */ // Convert string in the specified source and target encodings -const char *convert_string(const char *str, CFStringEncoding from, CFStringEncoding to) -{ - const char *ostr = str; - CFStringRef cfstr = CFStringCreateWithCString(NULL, str, from); - if (cfstr) { - static char buffer[MAX_PATH_LENGTH]; - memset(buffer, 0, sizeof(buffer)); - if (CFStringGetCString(cfstr, buffer, sizeof(buffer), to)) - ostr = buffer; - CFRelease(cfstr); - } +const char *convert_string(const char *str, bool dir) +{ + const char *s = PrefsFindString("name_encoding", 0); + if (s == NULL) s = "MACROMAN"; + char encoding[strlen(s) + 1]; + char *ip = (char *)s, *op = encoding; + while (*ip) *op++ = toupper(*ip++); + *op = 0; + static char ostr[MAX_PATH_LENGTH]; + size_t isize = strlen(str), osize = MAX_PATH_LENGTH; + ip = (char *)str; + op = ostr; + iconv_t ic = dir ? iconv_open(encoding, "UTF-8") : iconv_open("UTF-8", encoding); + iconv(ic, &ip, &isize, &op, &osize); + iconv_close(ic); + *op = 0; return ostr; } -// Convert from the host OS filename encoding to MacRoman +// Convert from the host to the guest const char *host_encoding_to_macroman(const char *filename) { - return convert_string(filename, kCFStringEncodingUTF8, kCFStringEncodingMacRoman); + return convert_string(filename, true); } -// Convert from MacRoman to host OS filename encoding +// Convert from guest to the host const char *macroman_to_host_encoding(const char *filename) { - return convert_string(filename, kCFStringEncodingMacRoman, kCFStringEncodingUTF8); + return convert_string(filename, false); } diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 2c7485c28..75ed3ffc8 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -84,6 +84,7 @@ prefs_desc common_prefs_items[] = { {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {"title", TYPE_STRING, false, "window title"}, {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, + {"name_encoding", TYPE_STRING, false, "file name encoding"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 8002534c9..bf81f1398 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1332,6 +1332,7 @@ "-pagezero_size", 0x3000, "-lkpx_cpu", + "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; @@ -1398,6 +1399,7 @@ "-pagezero_size", 0x3000, "-lkpx_cpu", + "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 9aada63cb..1ff626308 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -72,6 +72,7 @@ prefs_desc common_prefs_items[] = { {"redir", TYPE_STRING, true, "port forwarding for slirp"}, {"title", TYPE_STRING, false, "window title"}, {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, + {"name_encoding", TYPE_STRING, false, "file name encoding"}, {NULL, TYPE_END, false, NULL} // End of list }; From a39eff553c95eb6c47c1b64221429e21164d50da Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 21 Apr 2021 21:29:05 +0900 Subject: [PATCH 486/534] changed implementation of "name_encoding" --- .../BasiliskII.xcodeproj/project.pbxproj | 4 +- BasiliskII/src/MacOSX/extfs_macosx.cpp | 37 ++++++++----------- BasiliskII/src/prefs_items.cpp | 2 +- .../project.pbxproj | 2 - SheepShaver/src/prefs_items.cpp | 2 +- 5 files changed, 19 insertions(+), 28 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 30203e55b..15918213d 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1077,6 +1077,7 @@ CLANG_WARN_OBJC_ROOT_CLASS = YES; CLANG_WARN_SUSPICIOUS_MOVE = NO; CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + CODE_SIGN_IDENTITY = ""; COMBINE_HIDPI_IMAGES = NO; ENABLE_NS_ASSERTIONS = YES; ENABLE_TESTABILITY = NO; @@ -1118,7 +1119,6 @@ "-Wl,-no_pie", "-pagezero_size", 0x1000, - "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; @@ -1141,6 +1141,7 @@ CLANG_WARN_OBJC_ROOT_CLASS = YES; CLANG_WARN_SUSPICIOUS_MOVE = NO; CLANG_WARN__DUPLICATE_METHOD_MATCH = NO; + CODE_SIGN_IDENTITY = ""; COMBINE_HIDPI_IMAGES = NO; DEBUG_INFORMATION_FORMAT = dwarf; ENABLE_NS_ASSERTIONS = YES; @@ -1183,7 +1184,6 @@ "-Wl,-no_pie", "-pagezero_size", 0x1000, - "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; diff --git a/BasiliskII/src/MacOSX/extfs_macosx.cpp b/BasiliskII/src/MacOSX/extfs_macosx.cpp index 66fdc92b7..0521c07fb 100644 --- a/BasiliskII/src/MacOSX/extfs_macosx.cpp +++ b/BasiliskII/src/MacOSX/extfs_macosx.cpp @@ -27,8 +27,6 @@ #include #include #include -#include -#include #include "sysdeps.h" #include "prefs.h" @@ -611,33 +609,28 @@ bool extfs_rename(const char *old_path, const char *new_path) */ // Convert string in the specified source and target encodings -const char *convert_string(const char *str, bool dir) -{ - const char *s = PrefsFindString("name_encoding", 0); - if (s == NULL) s = "MACROMAN"; - char encoding[strlen(s) + 1]; - char *ip = (char *)s, *op = encoding; - while (*ip) *op++ = toupper(*ip++); - *op = 0; - static char ostr[MAX_PATH_LENGTH]; - size_t isize = strlen(str), osize = MAX_PATH_LENGTH; - ip = (char *)str; - op = ostr; - iconv_t ic = dir ? iconv_open(encoding, "UTF-8") : iconv_open("UTF-8", encoding); - iconv(ic, &ip, &isize, &op, &osize); - iconv_close(ic); - *op = 0; +const char *convert_string(const char *str, CFStringEncoding from, CFStringEncoding to) +{ + const char *ostr = str; + CFStringRef cfstr = CFStringCreateWithCString(NULL, str, from); + if (cfstr) { + static char buffer[MAX_PATH_LENGTH]; + memset(buffer, 0, sizeof(buffer)); + if (CFStringGetCString(cfstr, buffer, sizeof(buffer), to)) + ostr = buffer; + CFRelease(cfstr); + } return ostr; } -// Convert from the host to the guest +// Convert from the host OS filename encoding to MacRoman const char *host_encoding_to_macroman(const char *filename) { - return convert_string(filename, true); + return convert_string(filename, kCFStringEncodingUTF8, PrefsFindInt32("name_encoding")); } -// Convert from guest to the host +// Convert from MacRoman to host OS filename encoding const char *macroman_to_host_encoding(const char *filename) { - return convert_string(filename, false); + return convert_string(filename, PrefsFindInt32("name_encoding"), kCFStringEncodingUTF8); } diff --git a/BasiliskII/src/prefs_items.cpp b/BasiliskII/src/prefs_items.cpp index 75ed3ffc8..33f3254a3 100644 --- a/BasiliskII/src/prefs_items.cpp +++ b/BasiliskII/src/prefs_items.cpp @@ -84,7 +84,7 @@ prefs_desc common_prefs_items[] = { {"host_domain", TYPE_STRING, true, "handle DNS requests for this domain on the host (slirp only)"}, {"title", TYPE_STRING, false, "window title"}, {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, - {"name_encoding", TYPE_STRING, false, "file name encoding"}, + {"name_encoding", TYPE_INT32, false, "file name encoding"}, {NULL, TYPE_END, false, NULL} // End of list }; diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index bf81f1398..8002534c9 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1332,7 +1332,6 @@ "-pagezero_size", 0x3000, "-lkpx_cpu", - "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; @@ -1399,7 +1398,6 @@ "-pagezero_size", 0x3000, "-lkpx_cpu", - "-liconv", ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; diff --git a/SheepShaver/src/prefs_items.cpp b/SheepShaver/src/prefs_items.cpp index 1ff626308..b5ea6763c 100644 --- a/SheepShaver/src/prefs_items.cpp +++ b/SheepShaver/src/prefs_items.cpp @@ -72,7 +72,7 @@ prefs_desc common_prefs_items[] = { {"redir", TYPE_STRING, true, "port forwarding for slirp"}, {"title", TYPE_STRING, false, "window title"}, {"sound_buffer", TYPE_INT32, false, "sound buffer length"}, - {"name_encoding", TYPE_STRING, false, "file name encoding"}, + {"name_encoding", TYPE_INT32, false, "file name encoding"}, {NULL, TYPE_END, false, NULL} // End of list }; From 20d2de95cec645c80082b457bbec37035d1aaf96 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 23 Apr 2021 10:19:48 +0900 Subject: [PATCH 487/534] marged Jagmn's patch https://emaculation.com/forum/viewtopic.php?p=70121#p70121 --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 7 +++++++ BasiliskII/src/slirp/slirp.c | 2 +- SheepShaver/src/MacOSX/Info.plist.in | 4 ---- .../project.pbxproj | 20 ++++++------------- .../src/MacOSX/config/config-macosx-aarch64.h | 6 +++--- SheepShaver/src/Unix/configure.ac | 4 ++-- SheepShaver/src/Unix/main_unix.cpp | 9 +++++++++ SheepShaver/src/gfxaccel.cpp | 4 ++-- SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c | 1 + SheepShaver/src/kpx_cpu/src/cpu/vm.hpp | 4 ++-- 10 files changed, 33 insertions(+), 28 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 3aa369dab..19d109e92 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -229,6 +229,13 @@ void *vm_acquire_reserved(size_t size) { return reserved_buf && size <= RESERVED_SIZE ? reserved_buf : VM_MAP_FAILED; } +int vm_init_reserved(void *hostAddress) { + int result = vm_acquire_fixed(hostAddress, RESERVED_SIZE); + if (result >= 0) + reserved_buf = hostAddress; + return result; +} + /* Allocate zero-filled memory of SIZE bytes. The mapping is private and default protection bits are read / write. The return value is the actual mapping address chosen or VM_MAP_FAILED for errors. */ diff --git a/BasiliskII/src/slirp/slirp.c b/BasiliskII/src/slirp/slirp.c index 4aad7ba45..45c97612c 100755 --- a/BasiliskII/src/slirp/slirp.c +++ b/BasiliskII/src/slirp/slirp.c @@ -87,7 +87,7 @@ static int get_dns_addr(struct in_addr *pdns_addr) static int get_dns_addr(struct in_addr *pdns_addr) { char buff[512]; - char buff2[256]; + char buff2[257]; FILE *f; int found = 0; struct in_addr tmp_addr; diff --git a/SheepShaver/src/MacOSX/Info.plist.in b/SheepShaver/src/MacOSX/Info.plist.in index dfe702403..a70e1ec95 100644 --- a/SheepShaver/src/MacOSX/Info.plist.in +++ b/SheepShaver/src/MacOSX/Info.plist.in @@ -39,10 +39,6 @@ @PACKAGE_VERSION@ CSResourcesFileMapped - LSArchitecturePriority - - x86_64 - LSMinimumSystemVersion 10.7.0 NSHighResolutionCapable diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 8002534c9..79681aa25 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1210,7 +1210,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Debug; }; @@ -1249,7 +1249,7 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; PRODUCT_NAME = kpx_cpu; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Release; }; @@ -1328,15 +1328,11 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-lkpx_cpu", - ); + OTHER_LDFLAGS = "-lkpx_cpu"; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_LDFLAGS = ""; }; name = Debug; @@ -1394,15 +1390,11 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = ( - "-pagezero_size", - 0x3000, - "-lkpx_cpu", - ); + OTHER_LDFLAGS = "-lkpx_cpu"; PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; }; name = Release; }; diff --git a/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h b/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h index aa04b6a95..c904f6718 100644 --- a/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h +++ b/SheepShaver/src/MacOSX/config/config-macosx-aarch64.h @@ -405,8 +405,8 @@ ordering is the same as for multi-word integers. */ /* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ -/* Define constant offset for Mac address translation */ -/* #undef NATMEM_OFFSET */ +/* Define constant offset for Mac address translation: macosx-aarch64 is always 64bit */ +#define NATMEM_OFFSET 0x400000000000 /* Define to the address where bug reports for this package should be sent. */ #define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" @@ -428,7 +428,7 @@ /* Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this system. */ -#define PAGEZERO_HACK 1 +/* #define PAGEZERO_HACK 1 */ /* Define as the return type of signal handlers (`int' or `void'). */ #define RETSIGTYPE void diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 35f3495e6..3b3480ca4 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -1640,13 +1640,13 @@ if [[ "x$EMULATED_PPC" = "xyes" ]]; then esac fi if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-align-functions" + DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-align-functions -fno-stack-protector" else DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -malign-functions=0" fi DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -finline-functions -finline-limit=10000 -fno-exceptions -g0" if [[ "x$have_dyngen_gcc3" = "xyes" ]]; then - DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls" + DYNGEN_OP_FLAGS="$DYNGEN_OP_FLAGS -fno-reorder-blocks -fno-optimize-sibling-calls -fno-reorder-blocks-and-partition" fi if [[ "x$DYNGEN_CC" != "x$CXX" ]]; then DYNGEN_CFLAGS="-O2 $CFLAGS" diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 0c5b76a1e..5a470e6cb 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -2210,6 +2210,7 @@ rti:; } #endif +extern int vm_init_reserved(void *hostAddress); /* * Helpers to share 32-bit addressable data with MacOS @@ -2221,7 +2222,15 @@ bool SheepMem::Init(void) page_size = getpagesize(); // Allocate SheepShaver globals +#ifdef NATMEM_OFFSET + if (vm_mac_acquire_fixed(ROM_BASE + ROM_AREA_SIZE + SIG_STACK_SIZE, size) < 0) + return false; + uint8 *adr = Mac2HostAddr(ROM_BASE + ROM_AREA_SIZE + SIG_STACK_SIZE); + if (vm_init_reserved(adr + size) < 0) + return false; +#else uint8 *adr = vm_mac_acquire(size); +#endif if (adr == VM_MAP_FAILED) return false; proc = base = Host2MacAddr(adr); diff --git a/SheepShaver/src/gfxaccel.cpp b/SheepShaver/src/gfxaccel.cpp index ed65e5d83..ec1e96a32 100644 --- a/SheepShaver/src/gfxaccel.cpp +++ b/SheepShaver/src/gfxaccel.cpp @@ -85,7 +85,7 @@ static inline void do_invrect(uint8 *dest, uint32 length) } // Align on 32-bit boundaries - if (bpp < 32 && (((uintptr)dest) & 2)) { + if (bpp < 32 && (((uintptr)dest) & 2) && length >= 2) { INVERT_2(dest, 0); dest += 2; length -= 2; } @@ -198,7 +198,7 @@ static inline void do_fillrect(uint8 *dest, uint32 color, uint32 length) } // Align on 32-bit boundaries - if (bpp < 32 && (((uintptr)dest) & 2)) { + if (bpp < 32 && (((uintptr)dest) & 2) && length >= 2) { FILL_2(dest, 0, color); dest += 2; length -= 2; } diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c index b6ead7922..2fdeebd12 100644 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c +++ b/SheepShaver/src/kpx_cpu/src/cpu/jit/dyngen.c @@ -2396,6 +2396,7 @@ void patch_relocations(FILE *outfile, const char *name, host_ulong size, host_ul fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = (int32_t)%s + %d;\n", slide, final_sym_name, addend); break; case R_X86_64_PC32: + case R_X86_64_PLT32: fprintf(outfile, " *(uint32_t *)(code_ptr() + %d) = %s - (long)(code_ptr() + %d) + %d;\n", slide, final_sym_name, slide, addend); break; diff --git a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp b/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp index 5c0b73307..c01dc6ac8 100755 --- a/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp +++ b/SheepShaver/src/kpx_cpu/src/cpu/vm.hpp @@ -205,13 +205,13 @@ const uintptr VMBaseDiff = NATMEM_OFFSET; #if REAL_ADDRESSING || DIRECT_ADDRESSING static inline uint8 * vm_do_get_real_address(vm_addr_t addr) { - uintptr a = vm_wrap_address(VMBaseDiff + addr); + uintptr a = vm_wrap_address(addr); #if defined(__APPLE__) && defined(__x86_64__) extern uint8 gZeroPage[0x3000], gKernelData[0x2000]; if (a < 0x3000) return &gZeroPage[a]; else if ((a & ~0x1fff) == 0x68ffe000 || (a & ~0x1fff) == 0x5fffe000) return &gKernelData[a & 0x1fff]; #endif - return (uint8 *)a; + return (uint8 *)(VMBaseDiff + a); } static inline vm_addr_t vm_do_get_virtual_address(uint8 *addr) { From 49eee2959741c47472c9dbac9699f55feb1bd664 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 23 Apr 2021 20:47:17 +0900 Subject: [PATCH 488/534] Xcode: modified for building both x86_64 and arm64 --- BasiliskII/src/CrossPlatform/video_blit.cpp | 8 +++++++ .../BasiliskII.xcodeproj/project.pbxproj | 24 +++++++++++-------- BasiliskII/src/MacOSX/config.h | 3 +++ .../project.pbxproj | 20 +++++++++++----- .../src/MacOSX/config/config-macosx-x86_64.h | 2 ++ 5 files changed, 41 insertions(+), 16 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index ebff0f094..2d7e534d9 100755 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -528,6 +528,14 @@ bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_or // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines Screen_blit = Blit_Copy_Raw; + +#if !DIRECT_ADDRESSING + } else if (mac_depth == 16) { + + Screen_blit = Blit_Copy_Raw; + +#endif + } else { // Compute RGB shift values diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 15918213d..21823c98c 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1090,10 +1090,10 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 0; - GCC_PREPROCESSOR_DEFINITIONS = ( + GCC_PREPROCESSOR_DEFINITIONS = "$(inherited)"; + "GCC_PREPROCESSOR_DEFINITIONS[arch=arm64]" = "$(inherited)"; + "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", - ENABLE_MACOSX_ETHERHELPER, - "BINCUE=1", "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1115,7 +1115,9 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; - OTHER_LDFLAGS = ( + OTHER_LDFLAGS = ""; + "OTHER_LDFLAGS[arch=arm64]" = ""; + "OTHER_LDFLAGS[arch=x86_64]" = ( "-Wl,-no_pie", "-pagezero_size", 0x1000, @@ -1124,7 +1126,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_CFLAGS = ""; }; name = Debug; @@ -1156,10 +1158,10 @@ GCC_ENABLE_PASCAL_STRINGS = NO; GCC_INLINES_ARE_PRIVATE_EXTERN = NO; GCC_OPTIMIZATION_LEVEL = 3; - GCC_PREPROCESSOR_DEFINITIONS = ( + GCC_PREPROCESSOR_DEFINITIONS = "$(inherited)"; + "GCC_PREPROCESSOR_DEFINITIONS[arch=arm64]" = "$(inherited)"; + "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", - ENABLE_MACOSX_ETHERHELPER, - "BINCUE=1", "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1180,7 +1182,9 @@ LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; - OTHER_LDFLAGS = ( + OTHER_LDFLAGS = ""; + "OTHER_LDFLAGS[arch=arm64]" = ""; + "OTHER_LDFLAGS[arch=x86_64]" = ( "-Wl,-no_pie", "-pagezero_size", 0x1000, @@ -1189,7 +1193,7 @@ PRODUCT_BUNDLE_IDENTIFIER = net.cebix.basilisk; PRODUCT_NAME = "$(TARGET_NAME)"; USE_HEADERMAP = YES; - VALID_ARCHS = x86_64; + VALID_ARCHS = "x86_64 arm64"; WARNING_CFLAGS = ""; }; name = Release; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index 896af06c2..d7a32d2d0 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -824,4 +824,7 @@ #define OPTIMIZED_FLAGS #endif +#define ENABLE_MACOSX_ETHERHELPER +#define BINCUE 1 + #endif diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index 79681aa25..ca93f68d8 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -1190,7 +1190,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "DATADIR=", HAVE_CONFIG_H, - USE_JIT, "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, @@ -1229,7 +1228,6 @@ GCC_PREPROCESSOR_DEFINITIONS = ( "DATADIR=", HAVE_CONFIG_H, - USE_JIT, "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, @@ -1299,7 +1297,6 @@ ENABLE_MACOSX_ETHERHELPER, "DATADIR=", HAVE_CONFIG_H, - USE_JIT, "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, @@ -1328,7 +1325,13 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = "-lkpx_cpu"; + OTHER_LDFLAGS = ""; + "OTHER_LDFLAGS[arch=arm64]" = "-lkpx_cpu"; + "OTHER_LDFLAGS[arch=x86_64]" = ( + "-lkpx_cpu", + "-pagezero_size", + 0x3000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; @@ -1360,7 +1363,6 @@ ENABLE_MACOSX_ETHERHELPER, "DATADIR=", HAVE_CONFIG_H, - USE_JIT, "_GNU_SOURCE=1", _THREAD_SAFE, _REENTRANT, @@ -1390,7 +1392,13 @@ MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_CPLUSPLUSFLAGS = "$(OTHER_CFLAGS)"; - OTHER_LDFLAGS = "-lkpx_cpu"; + OTHER_LDFLAGS = ""; + "OTHER_LDFLAGS[arch=arm64]" = "-lkpx_cpu"; + "OTHER_LDFLAGS[arch=x86_64]" = ( + "-lkpx_cpu", + "-pagezero_size", + 0x3000, + ); PRECOMPS_INCLUDE_HEADERS_FROM_BUILT_PRODUCTS_DIR = NO; PRODUCT_BUNDLE_IDENTIFIER = net.cebix.sheepshaver; PRODUCT_NAME = SheepShaver; diff --git a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h b/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h index baf932f1c..600466b5e 100644 --- a/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h +++ b/SheepShaver/src/MacOSX/config/config-macosx-x86_64.h @@ -523,5 +523,7 @@ /* Define to 'int' if doesn't define. */ /* #undef socklen_t */ +#define USE_JIT 1 + #endif /* CONFIG_H */ From 4f0743562efb64cc3a9525e87317ac27d83e44c0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Fri, 23 Apr 2021 20:55:06 +0900 Subject: [PATCH 489/534] Update README.md --- README.md | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/README.md b/README.md index 097db1c63..c63f5c667 100644 --- a/README.md +++ b/README.md @@ -1,14 +1,14 @@ #### BasiliskII ``` -macOS 64-bit JIT -Linux 32-bit JIT -MinGW 32-bit JIT +macOS x86_64 JIT / arm64 non-JIT +Linux x86 x86_64 JIT +MinGW x86 JIT ``` #### SheepShaver ``` -macOS 64-bit JIT -Linux 32-bit JIT -MinGW 32-bit JIT +macOS x86_64 JIT / arm64 non-JIT +Linux x86 x86_64 JIT +MinGW x86 JIT ``` ### How To Build These builds need to be installed SDL2.0.10+ framework/library. @@ -18,9 +18,9 @@ These builds need to be installed SDL2.0.10+ framework/library. 1. Set Build Configuration to Release 1. Build -(or same as Linux) +or same as Linux (x86_64 only) -##### Linux(x86) +##### Linux(x86/x86_64) ``` $ cd macemu/BasiliskII/src/Unix $ ./autogen.sh @@ -38,9 +38,9 @@ $ make 1. Set Build Configuration to Release 1. Build -(or same as Linux) +or same as Linux (x86_64 only) -##### Linux(x86) +##### Linux(x86/x86_64) ``` $ cd macemu/SheepShaver/src/Unix $ ./autogen.sh From 8a28ad6e39e42c78083ecf5ea13add0817f16bee Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 30 Apr 2021 10:07:28 +0900 Subject: [PATCH 490/534] A workaround for Xcode 12.5 --- BasiliskII/src/slirp/{VERSION => VERSION_} | 0 .../MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj | 8 ++++---- 2 files changed, 4 insertions(+), 4 deletions(-) rename BasiliskII/src/slirp/{VERSION => VERSION_} (100%) diff --git a/BasiliskII/src/slirp/VERSION b/BasiliskII/src/slirp/VERSION_ similarity index 100% rename from BasiliskII/src/slirp/VERSION rename to BasiliskII/src/slirp/VERSION_ diff --git a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj index ca93f68d8..2e90ac44d 100755 --- a/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj +++ b/SheepShaver/src/MacOSX/SheepShaver_Xcode8.xcodeproj/project.pbxproj @@ -94,7 +94,7 @@ E44C460520D262B0000583AE /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DC20D262AD000583AE /* tftp.c */; }; E44C460620D262B0000583AE /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DD20D262AD000583AE /* mbuf.c */; }; E44C460720D262B0000583AE /* ip_icmp.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45DF20D262AD000583AE /* ip_icmp.c */; }; - E44C460820D262B0000583AE /* VERSION in Resources */ = {isa = PBXBuildFile; fileRef = E44C45E220D262AE000583AE /* VERSION */; }; + E44C460820D262B0000583AE /* VERSION_ in Resources */ = {isa = PBXBuildFile; fileRef = E44C45E220D262AE000583AE /* VERSION_ */; }; E44C460920D262B0000583AE /* tcp_input.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E520D262AE000583AE /* tcp_input.c */; }; E44C460A20D262B0000583AE /* misc.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E620D262AE000583AE /* misc.c */; }; E44C460B20D262B0000583AE /* debug.c in Sources */ = {isa = PBXBuildFile; fileRef = E44C45E920D262AE000583AE /* debug.c */; }; @@ -356,7 +356,7 @@ E44C45DF20D262AD000583AE /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = ip_icmp.c; path = ../../../BasiliskII/src/slirp/ip_icmp.c; sourceTree = ""; }; E44C45E020D262AE000583AE /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = bootp.h; path = ../../../BasiliskII/src/slirp/bootp.h; sourceTree = ""; }; E44C45E120D262AE000583AE /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = tcpip.h; path = ../../../BasiliskII/src/slirp/tcpip.h; sourceTree = ""; }; - E44C45E220D262AE000583AE /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = VERSION; path = ../../../BasiliskII/src/slirp/VERSION; sourceTree = ""; }; + E44C45E220D262AE000583AE /* VERSION_ */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = VERSION_; path = ../../../BasiliskII/src/slirp/VERSION_; sourceTree = ""; }; E44C45E320D262AE000583AE /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = ip_icmp.h; path = ../../../BasiliskII/src/slirp/ip_icmp.h; sourceTree = ""; }; E44C45E420D262AE000583AE /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = slirp_config.h; path = ../../../BasiliskII/src/slirp/slirp_config.h; sourceTree = ""; }; E44C45E520D262AE000583AE /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = tcp_input.c; path = ../../../BasiliskII/src/slirp/tcp_input.c; sourceTree = ""; }; @@ -813,7 +813,7 @@ E44C45DE20D262AD000583AE /* tftp.h */, E44C45EB20D262AE000583AE /* udp.c */, E44C45E720D262AE000583AE /* udp.h */, - E44C45E220D262AE000583AE /* VERSION */, + E44C45E220D262AE000583AE /* VERSION_ */, ); name = slirp; path = ../slirp; @@ -1007,7 +1007,7 @@ buildActionMask = 2147483647; files = ( E420260B24125442000508DF /* etherhelpertool in Resources */, - E44C460820D262B0000583AE /* VERSION in Resources */, + E44C460820D262B0000583AE /* VERSION_ in Resources */, 0856D05914A99EF1000B1711 /* SheepShaver.icns in Resources */, E44C460F20D262B0000583AE /* COPYRIGHT in Resources */, 3D2C25B5221092BA00B635DE /* SheepVM.icns in Resources */, From 1aaeaf05c407611507e5498d79e335d92b2aa8d0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Tue, 4 May 2021 18:33:50 +0900 Subject: [PATCH 491/534] fixed merge error and deleted unnecessary files --- .../BasiliskII.xcodeproj/project.pbxproj | 75 +- BasiliskII/src/MacOSX/config.h | 18 + BasiliskII/src/Unix/main_unix.cpp | 19 + BasiliskII/src/Unix/sysdeps.h | 8 + BasiliskII/src/include/main.h | 7 + BasiliskII/src/uae_cpu/Makefile.am | 80 - BasiliskII/src/uae_cpu/aranym_glue.cpp | 326 -- .../src/uae_cpu/compiler/codegen_arm.cpp | 2730 --------- BasiliskII/src/uae_cpu/compiler/codegen_arm.h | 1292 ---- BasiliskII/src/uae_cpu/compiler/compemu1.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu2.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu3.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu4.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu5.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu6.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu7.cpp | 2 - BasiliskII/src/uae_cpu/compiler/compemu8.cpp | 2 - .../src/uae_cpu/compiler/compemu_fpp.cpp | 4 + .../uae_cpu/compiler/compemu_midfunc_arm.cpp | 1967 ------- .../uae_cpu/compiler/compemu_midfunc_arm.h | 186 - .../uae_cpu/compiler/compemu_midfunc_arm2.cpp | 5195 ----------------- .../uae_cpu/compiler/compemu_midfunc_arm2.h | 348 -- .../src/uae_cpu/compiler/compemu_support.cpp | 18 +- BasiliskII/src/uae_cpu/compiler/compstbla.cpp | 5 - BasiliskII/src/uae_cpu/compiler/flags_arm.h | 52 - BasiliskII/src/uae_cpu/compiler/gencomp_arm.c | 5082 ---------------- .../src/uae_cpu/compiler/test_codegen_arm.c | 264 - .../src/uae_cpu/compiler/test_codegen_x86.cpp | 1008 ---- BasiliskII/src/uae_cpu/cpudefsa.cpp | 5 - BasiliskII/src/uae_cpu/cpuemu1.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu1_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu2.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu2_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu3.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu3_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu4.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu4_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu5.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu5_nf.cpp | 4 - BasiliskII/src/uae_cpu/cpuemu6.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu6_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu7.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu7_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpuemu8.cpp | 2 - BasiliskII/src/uae_cpu/cpuemu8_nf.cpp | 3 - BasiliskII/src/uae_cpu/cpufunctbla.cpp | 5 - BasiliskII/src/uae_cpu/cpummu.cpp | 1096 ---- BasiliskII/src/uae_cpu/cpuopti.c | 312 - BasiliskII/src/uae_cpu/cpustbl_nf.cpp | 2 - BasiliskII/src/uae_cpu/cpustbla.cpp | 5 - BasiliskII/src/uae_cpu/debug.cpp | 82 - BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 5 + BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp | 5 + BasiliskII/src/uae_cpu/memory-uae.h | 606 -- BasiliskII/src/uae_cpu/memory.cpp | 59 - BasiliskII/src/uae_cpu/noflags.h | 142 - BasiliskII/src/uae_cpu/readcpua.cpp | 5 - 57 files changed, 120 insertions(+), 20950 deletions(-) delete mode 100644 BasiliskII/src/uae_cpu/Makefile.am delete mode 100644 BasiliskII/src/uae_cpu/aranym_glue.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_arm.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu1.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu2.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu3.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu4.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu5.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu6.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu7.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu8.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/compstbla.cpp delete mode 100644 BasiliskII/src/uae_cpu/compiler/flags_arm.h delete mode 100644 BasiliskII/src/uae_cpu/compiler/gencomp_arm.c delete mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c delete mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpudefsa.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu1.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu1_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu2.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu2_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu3.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu3_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu4.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu4_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu5.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu5_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu6.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu6_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu7.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu7_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu8.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuemu8_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpufunctbla.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpummu.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpuopti.c delete mode 100644 BasiliskII/src/uae_cpu/cpustbl_nf.cpp delete mode 100644 BasiliskII/src/uae_cpu/cpustbla.cpp delete mode 100644 BasiliskII/src/uae_cpu/debug.cpp delete mode 100644 BasiliskII/src/uae_cpu/memory-uae.h delete mode 100644 BasiliskII/src/uae_cpu/memory.cpp delete mode 100644 BasiliskII/src/uae_cpu/noflags.h delete mode 100644 BasiliskII/src/uae_cpu/readcpua.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 21823c98c..f7f75265c 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -12,9 +12,7 @@ 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532C1F5368370024025B /* cpuemu_nf.cpp */; }; 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532E1F5368370024025B /* cpustbl_nf.cpp */; }; 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; @@ -46,7 +44,6 @@ 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B71F23B25A006B2DF2 /* flags.cpp */; }; 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; - 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C91F23B25A006B2DF2 /* memory.cpp */; }; 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; @@ -68,6 +65,7 @@ 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; + E40A4005263C306A00B76E31 /* fpu_mpfr.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */; }; E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; @@ -94,14 +92,15 @@ E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; + E4257923264116F70061C1F1 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4257922264116F70061C1F1 /* fpu_ieee.cpp */; }; + E4257924264119500061C1F1 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE024E39BC400843219 /* compemu.cpp */; }; + E4257925264119BF0061C1F1 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */; }; E447066D25D8FCB400EA2C14 /* Metal.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E447066C25D8FCB400EA2C14 /* Metal.framework */; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; - E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4D8245223543D9700849B78 /* fpu_ieee.cpp */; }; + E4CF025826395EBB006FDAEA /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE124E39BC400843219 /* compstbl.cpp */; }; + E4CF025A26396211006FDAEA /* cpufunctbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4CF025926396211006FDAEA /* cpufunctbl.cpp */; }; E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */; }; - E4ED8EE224E39BC400843219 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE024E39BC400843219 /* compemu.cpp */; }; - E4ED8EE324E39BC400843219 /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE124E39BC400843219 /* compstbl.cpp */; }; - E4ED8EE524E39C0D00843219 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */; }; E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; /* End PBXBuildFile section */ @@ -135,9 +134,7 @@ 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; - 7532532C1F5368370024025B /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 7532532E1F5368370024025B /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl_nf.cpp; path = gencpu_output/cpustbl_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; @@ -229,10 +226,7 @@ 7539E0C51F23B25A006B2DF2 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rounding.h; sourceTree = ""; }; 7539E0C61F23B25A006B2DF2 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = types.h; sourceTree = ""; }; 7539E0C81F23B25A006B2DF2 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = m68k.h; sourceTree = ""; }; - 7539E0C91F23B25A006B2DF2 /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = memory.cpp; sourceTree = ""; }; - 7539E0CA1F23B25A006B2DF2 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; 7539E0CC1F23B25A006B2DF2 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = newcpu.h; sourceTree = ""; }; - 7539E0CD1F23B25A006B2DF2 /* noflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = noflags.h; sourceTree = ""; }; 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = readcpu.cpp; sourceTree = ""; }; 7539E0CF1F23B25A006B2DF2 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = readcpu.h; sourceTree = ""; }; 7539E0D01F23B25A006B2DF2 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = spcflags.h; sourceTree = ""; }; @@ -288,6 +282,7 @@ 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; + E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_mpfr.cpp; sourceTree = ""; }; E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; @@ -296,7 +291,7 @@ E413D8FB20D260B900E437D8 /* ip_icmp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = ip_icmp.c; sourceTree = ""; }; E413D8FC20D260B900E437D8 /* bootp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = bootp.h; sourceTree = ""; }; E413D8FD20D260B900E437D8 /* tcpip.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = tcpip.h; sourceTree = ""; }; - E413D8FE20D260B900E437D8 /* VERSION */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION; sourceTree = ""; }; + E413D8FE20D260B900E437D8 /* VERSION_ */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = VERSION_; sourceTree = ""; }; E413D8FF20D260B900E437D8 /* ip_icmp.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = ip_icmp.h; sourceTree = ""; }; E413D90020D260B900E437D8 /* slirp_config.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = slirp_config.h; sourceTree = ""; }; E413D90120D260B900E437D8 /* tcp_input.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tcp_input.c; sourceTree = ""; }; @@ -340,9 +335,13 @@ E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; + E4257922264116F70061C1F1 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; + E43D1D9D2638F6E0008957D9 /* registers.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = registers.h; sourceTree = ""; }; + E43D1D9E2638FA73008957D9 /* memory.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; E447066C25D8FCB400EA2C14 /* Metal.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Metal.framework; path = System/Library/Frameworks/Metal.framework; sourceTree = SDKROOT; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; - E4D8245223543D9700849B78 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; + E4A24F1A263922B30041924E /* cpummu.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = cpummu.h; sourceTree = ""; }; + E4CF025926396211006FDAEA /* cpufunctbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpufunctbl.cpp; path = gencpu_output/cpufunctbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; E4ED8EDF24E39B2A00843219 /* comptbl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencpu_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; E4ED8EE024E39BC400843219 /* compemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencpu_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; @@ -410,7 +409,7 @@ E413D8FA20D260B900E437D8 /* tftp.h */, E413D90720D260BA00E437D8 /* udp.c */, E413D90320D260BA00E437D8 /* udp.h */, - E413D8FE20D260B900E437D8 /* VERSION */, + E413D8FE20D260B900E437D8 /* VERSION_ */, ); name = slirp; path = ../slirp; @@ -444,12 +443,11 @@ E4ED8EE024E39BC400843219 /* compemu.cpp */, E4ED8EE124E39BC400843219 /* compstbl.cpp */, E4ED8EDF24E39B2A00843219 /* comptbl.h */, - 7532532C1F5368370024025B /* cpuemu_nf.cpp */, 7532532D1F5368370024025B /* cpuemu.cpp */, - 7532532E1F5368370024025B /* cpustbl_nf.cpp */, 7532532F1F5368370024025B /* cpustbl.cpp */, 753253301F5368370024025B /* cputbl.h */, E417913123D7D67C0009AD63 /* defs68k.c */, + E4CF025926396211006FDAEA /* cpufunctbl.cpp */, ); name = "gencpu output"; sourceTree = ""; @@ -583,16 +581,16 @@ 753252E51F5359040024025B /* build68k.c */, 7539E0A81F23B25A006B2DF2 /* compiler */, 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, + E4A24F1A263922B30041924E /* cpummu.h */, 7539E0B31F23B25A006B2DF2 /* fpu */, 753253011F535F210024025B /* gencpu.c */, 7539E0C81F23B25A006B2DF2 /* m68k.h */, - 7539E0C91F23B25A006B2DF2 /* memory.cpp */, - 7539E0CA1F23B25A006B2DF2 /* memory.h */, + E43D1D9E2638FA73008957D9 /* memory.h */, 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */, 7539E0CC1F23B25A006B2DF2 /* newcpu.h */, - 7539E0CD1F23B25A006B2DF2 /* noflags.h */, 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */, 7539E0CF1F23B25A006B2DF2 /* readcpu.h */, + E43D1D9D2638F6E0008957D9 /* registers.h */, 7539E0D01F23B25A006B2DF2 /* spcflags.h */, 7539E0D11F23B25A006B2DF2 /* table68k */, ); @@ -614,7 +612,8 @@ 7539E0B31F23B25A006B2DF2 /* fpu */ = { isa = PBXGroup; children = ( - E4D8245223543D9700849B78 /* fpu_ieee.cpp */, + E4257922264116F70061C1F1 /* fpu_ieee.cpp */, + E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */, 7539E0B41F23B25A006B2DF2 /* core.h */, 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, 7539E0B61F23B25A006B2DF2 /* exceptions.h */, @@ -832,12 +831,11 @@ name = "Run Script"; outputPaths = ( $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu_nf.cpp, $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, $BUILT_PRODUCTS_DIR/gencpu_output/compemu.cpp, $BUILT_PRODUCTS_DIR/gencpu_output/compstbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpufunctbl.cpp, ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; @@ -851,26 +849,24 @@ buildActionMask = 2147483647; files = ( E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, - E4ED8EE524E39C0D00843219 /* compemu_fpp.cpp in Sources */, + E4257925264119BF0061C1F1 /* compemu_fpp.cpp in Sources */, 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, E413D93320D260BC00E437D8 /* cksum.c in Sources */, E413D92920D260BC00E437D8 /* udp.c in Sources */, - E4D8245323543D9800849B78 /* fpu_ieee.cpp in Sources */, - 7539E1A01F23B25A006B2DF2 /* memory.cpp in Sources */, E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, 753253351F53688D0024025B /* readcpu.cpp in Sources */, E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */, - E4ED8EE324E39BC400843219 /* compstbl.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, + E4257924264119500061C1F1 /* compemu.cpp in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, + E4CF025826395EBB006FDAEA /* compstbl.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, 753253341F5368370024025B /* cpustbl.cpp in Sources */, - E4ED8EE224E39BC400843219 /* compemu.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, 753253321F5368370024025B /* cpuemu.cpp in Sources */, @@ -888,14 +884,12 @@ 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, E413D93220D260BC00E437D8 /* if.c in Sources */, - 753253331F5368370024025B /* cpustbl_nf.cpp in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, 7539E26D1F23B32A006B2DF2 /* strlcpy.c in Sources */, E413D93420D260BC00E437D8 /* tcp_output.c in Sources */, 7539E26E1F23B32A006B2DF2 /* sys_unix.cpp in Sources */, 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */, E413D92A20D260BC00E437D8 /* sbuf.c in Sources */, - 753253311F5368370024025B /* cpuemu_nf.cpp in Sources */, 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */, E413D93820D2613500E437D8 /* ether_unix.cpp in Sources */, 7539E1701F23B25A006B2DF2 /* prefs.cpp in Sources */, @@ -906,6 +900,7 @@ 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, + E4257923264116F70061C1F1 /* fpu_ieee.cpp in Sources */, 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */, @@ -931,9 +926,11 @@ E413D92120D260BC00E437D8 /* tftp.c in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, + E40A4005263C306A00B76E31 /* fpu_mpfr.cpp in Sources */, E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, + E4CF025A26396211006FDAEA /* cpufunctbl.cpp in Sources */, E413D92F20D260BC00E437D8 /* bootp.c in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, ); @@ -1094,6 +1091,8 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=arm64]" = "$(inherited)"; "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", + CPU_x86_64, + JIT, "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1102,6 +1101,7 @@ GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( + /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1112,11 +1112,15 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + LIBRARY_SEARCH_PATHS = /opt/homebrew/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; OTHER_LDFLAGS = ""; - "OTHER_LDFLAGS[arch=arm64]" = ""; + "OTHER_LDFLAGS[arch=arm64]" = ( + "-lgmp", + "-lmpfr", + ); "OTHER_LDFLAGS[arch=x86_64]" = ( "-Wl,-no_pie", "-pagezero_size", @@ -1162,6 +1166,8 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=arm64]" = "$(inherited)"; "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", + CPU_x86_64, + JIT, "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; @@ -1170,6 +1176,7 @@ GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; GCC_WARN_UNUSED_VARIABLE = NO; HEADER_SEARCH_PATHS = ( + /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1180,10 +1187,14 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; + LIBRARY_SEARCH_PATHS = /opt/homebrew/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_LDFLAGS = ""; - "OTHER_LDFLAGS[arch=arm64]" = ""; + "OTHER_LDFLAGS[arch=arm64]" = ( + "-lgmp", + "-lmpfr", + ); "OTHER_LDFLAGS[arch=x86_64]" = ( "-Wl,-no_pie", "-pagezero_size", diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index d7a32d2d0..c209a7125 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -681,7 +681,11 @@ #define SIZEOF_LONG 8 /* The size of `long double', as computed by sizeof. */ +#ifdef CPU_x86_64 #define SIZEOF_LONG_DOUBLE 16 +#else +#define SIZEOF_LONG_DOUBLE 8 +#endif /* The size of `long long', as computed by sizeof. */ #define SIZEOF_LONG_LONG 8 @@ -815,7 +819,21 @@ don't define. */ /* #undef uintmax_t */ +#define UPDATE_UAE + +#ifdef UPDATE_UAE +#define CPU_64_BIT +#define USE_INLINING +#ifdef CPU_x86_64 #define FPU_IEEE +#define WINUAE_ARANYM +#else +#define FPU_MPFR +#define DIRECT_ADDRESSING 1 +#endif +#else +#define FPU_IEEE +#endif #if USE_JIT #define DIRECT_ADDRESSING 1 diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 70ae13eb2..b0a9c2c14 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -94,8 +94,13 @@ using std::string; #include "rpc.h" #if USE_JIT +#ifdef UPDATE_UAE +extern void (*flush_icache)(void); // from compemu_support.cpp +extern bool UseJIT; +#else extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp #endif +#endif #ifdef ENABLE_MON # include "mon.h" @@ -289,9 +294,14 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) fprintf(stderr, "\n"); #if EMULATED_68K uaecptr nextpc; +#ifdef UPDATE_UAE + extern void m68k_dumpstate(FILE *, uaecptr *nextpc); + m68k_dumpstate(stderr, &nextpc); +#else extern void m68k_dumpstate(uaecptr *nextpc); m68k_dumpstate(&nextpc); #endif +#endif #if USE_JIT && JIT_DEBUG extern void compiler_dumpstate(void); compiler_dumpstate(); @@ -990,8 +1000,12 @@ void FlushCodeCache(void *start, uint32 size) { #if USE_JIT if (UseJIT) +#ifdef UPDATE_UAE + flush_icache(); +#else flush_icache_range((uint8 *)start, size); #endif +#endif #if !EMULATED_68K && defined(__NetBSD__) m68k_sync_icache(start, size); #endif @@ -1007,8 +1021,13 @@ static void sigint_handler(...) { #if EMULATED_68K uaecptr nextpc; +#ifdef UPDATE_UAE + extern void m68k_dumpstate(FILE *, uaecptr *nextpc); + m68k_dumpstate(stderr, &nextpc); +#else extern void m68k_dumpstate(uaecptr *nextpc); m68k_dumpstate(&nextpc); +#endif #endif VideoQuitFullScreen(); const char *arg[4] = {"mon", "-m", "-r", NULL}; diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 51a53c783..bb6ab00d5 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -490,4 +490,12 @@ static inline uae_u32 do_byteswap_16(uae_u32 v) #endif #define REGPARAM2 +#ifndef UNUSED +#define UNUSED(x) ((void)x) +#endif + +#define unlikely(x) __builtin_expect(!!(x), 0) +#define ALWAYS_INLINE inline __attribute__((always_inline)) +#define memptr uint32 + #endif diff --git a/BasiliskII/src/include/main.h b/BasiliskII/src/include/main.h index cfe9730fb..cc3017477 100644 --- a/BasiliskII/src/include/main.h +++ b/BasiliskII/src/include/main.h @@ -34,8 +34,15 @@ extern bool TwentyFourBitAddressing; // 68k register structure (for Execute68k()) struct M68kRegisters { uint32 d[8]; +#ifdef UPDATE_UAE + memptr a[8]; + uint16 sr; + memptr usp, isp, msp; + memptr pc; +#else uint32 a[8]; uint16 sr; +#endif }; // General functions diff --git a/BasiliskII/src/uae_cpu/Makefile.am b/BasiliskII/src/uae_cpu/Makefile.am deleted file mode 100644 index fa42287da..000000000 --- a/BasiliskII/src/uae_cpu/Makefile.am +++ /dev/null @@ -1,80 +0,0 @@ -# -# Note: this Makefile only contains rules for the source -# generator tools. -# - -# -# suppress warnings about overriding LDFLAGS and CPPFLAGS -# -AUTOMAKE_OPTIONS = -Wno-gnu - -AM_CPPFLAGS = $(DEFINES) \ - "-I$(srcdir)/../include" \ - "-I$(srcdir)/../Unix" \ - "-I$(builddir)/.." \ - "-I$(builddir)" \ - "-I$(srcdir)" - -CC = $(CC_FOR_BUILD) -CXX = $(CXX_FOR_BUILD) - -LDFLAGS = $(LDFLAGS_FOR_BUILD) -CPPFLAGS = $(CPPFLAGS_FOR_BUILD) -CFLAGS = $(CFLAGS_FOR_BUILD) -CXXFLAGS = $(CXXFLAGS_FOR_BUILD) -LIBS=-lm - -CFLAGS_NOWARN = $(DBGSP) -AM_CFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) -AM_CXXFLAGS = $(CFLAGS_NOWARN) $(WFLAGS) - -noinst_PROGRAMS = build68k gencpu -if USE_JIT -noinst_PROGRAMS += gencomp -endif - -BUILT_SOURCES = \ - cpudefs.cpp \ - cpuemu.cpp \ - cpustbl.cpp \ - cpufunctbl.cpp \ - cputbl.h \ - $(empty) - -build68k_SOURCES = build68k.c -gencpu_SOURCES = gencpu.c m68k.h readcpu.cpp readcpu.h cpudefs.cpp -gencomp_SOURCES = -if GENCOMP_ARCH_X86 -gencomp_SOURCES += compiler/gencomp.c -endif -if GENCOMP_ARCH_ARM -gencomp_SOURCES += compiler/gencomp_arm.c -endif -gencomp_SOURCES += readcpu.cpp cpudefs.cpp - -if USE_JIT -BUILT_SOURCES += compemu.cpp compstbl.cpp comptbl.h -endif - - -cpudefs.cpp: build68k$(EXEEXT) $(srcdir)/table68k - $(AM_V_GEN)./build68k <$(srcdir)/table68k > $@ -cpuemu.cpp: gencpu$(EXEEXT) - $(AM_V_GEN)./gencpu$(EXEEXT) -cpustbl.cpp cpufunctbl.cpp cputbl.h: cpuemu.cpp -compemu.cpp: gencomp$(EXEEXT) - $(AM_V_GEN)./gencomp$(EXEEXT) -compstbl.cpp comptbl.h: compemu.cpp - -CLEANFILES = $(BUILT_SOURCES) - -EXTRA_DIST = \ - table68k \ - compiler/codegen_arm.cpp compiler/codegen_arm.h \ - compiler/compemu_midfunc_arm.cpp compiler/compemu_midfunc_arm.h \ - compiler/compemu_midfunc_arm2.cpp compiler/compemu_midfunc_arm2.h \ - compiler/test_codegen_arm.c \ - compiler/codegen_x86.cpp compiler/codegen_x86.h \ - compiler/compemu_midfunc_x86.cpp compiler/compemu_midfunc_x86.h \ - compiler/test_codegen_x86.cpp \ - $(empty) diff --git a/BasiliskII/src/uae_cpu/aranym_glue.cpp b/BasiliskII/src/uae_cpu/aranym_glue.cpp deleted file mode 100644 index 02f7b149b..000000000 --- a/BasiliskII/src/uae_cpu/aranym_glue.cpp +++ /dev/null @@ -1,326 +0,0 @@ -/* - * aranym_glue.cpp - CPU interface - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#include "sysdeps.h" - -#include "cpu_emulation.h" -#include "newcpu.h" -#include "hardware.h" -#include "scc.h" -#include "input.h" -#ifdef USE_JIT -# include "compiler/compemu.h" -#endif -#include "nf_objs.h" - -#include "debug.h" - -// RAM and ROM pointers -memptr RAMBase = 0; // RAM base (Atari address space) gb-- init is important -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize = 0x00e00000; // Size of RAM - -memptr ROMBase = 0x00e00000; // ROM base (Atari address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize = 0x00100000; // Size of ROM - -uint32 RealROMSize; // Real size of ROM - -memptr HWBase = 0x00f00000; // HW base (Atari address space) -uint8 *HWBaseHost; // HW base (host address space) -uint32 HWSize = 0x00100000; // Size of HW space - -memptr FastRAMBase = 0x01000000; // Fast-RAM base (Atari address space) -uint8 *FastRAMBaseHost; // Fast-RAM base (host address space) - -#ifdef HW_SIGSEGV -uint8 *FakeIOBaseHost; -#endif - -#ifdef FIXED_VIDEORAM -memptr VideoRAMBase = ARANYMVRAMSTART; // VideoRAM base (Atari address space) -#else -memptr VideoRAMBase; // VideoRAM base (Atari address space) -#endif -uint8 *VideoRAMBaseHost;// VideoRAM base (host address space) -//uint32 VideoRAMSize; // Size of VideoRAM - -#ifndef NOT_MALLOC -uintptr MEMBaseDiff; // Global offset between a Atari address and its Host equivalent -uintptr ROMBaseDiff; -uintptr FastRAMBaseDiff; -#endif - -uintptr VMEMBaseDiff; // Global offset between a Atari VideoRAM address and /dev/fb0 mmap - - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) -SDL_mutex *spcflags_lock; -#endif -#if defined(ENABLE_REALSTOP) -SDL_cond *stop_condition; -#endif - - -/* - * Initialize 680x0 emulation - */ - -bool InitMEM() { - InitMEMBaseDiff(RAMBaseHost, RAMBase); - InitROMBaseDiff(ROMBaseHost, ROMBase); - InitFastRAMBaseDiff(FastRAMBaseHost, FastRAMBase); - InitVMEMBaseDiff(VideoRAMBaseHost, VideoRAMBase); - return true; -} - -bool Init680x0(void) -{ - init_m68k(); - -#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) - if ((spcflags_lock = SDL_CreateMutex()) == NULL) { - panicbug("Error by SDL_CreateMutex()"); - exit(EXIT_FAILURE); - } -#endif - -#if ENABLE_REALSTOP - if ((stop_condition = SDL_CreateCond()) == NULL) { - panicbug("Error by SDL_CreateCond()"); - exit(EXIT_FAILURE); - } -#endif - -#ifdef USE_JIT - if (bx_options.jit.jit) compiler_init(); -#endif - return true; -} - -/* - * Instr. RESET - */ - -void AtariReset(void) -{ - // reset Atari hardware here - HWReset(); - // reset NatFeats here - NFReset(); - // reset the input devices (input.cpp) - InputReset(); - -} - -/* - * Reset CPU - */ - -void Reset680x0(void) -{ - m68k_reset(); -} - -/* - * Deinitialize 680x0 emulation - */ - -void Exit680x0(void) -{ -#ifdef USE_JIT - if (bx_options.jit.jit) compiler_exit(); -#endif - exit_m68k(); -} - - -/* - * Reset and start 680x0 emulation - */ - -void Start680x0(void) -{ - m68k_reset(); -#ifdef USE_JIT - if (bx_options.jit.jit) { - m68k_compile_execute(); - } - else -#endif - m68k_execute(); -} - -/* - * Restart running 680x0 emulation safely from different thread - */ -void Restart680x0(void) -{ - quit_program = 2; - TriggerNMI(); -} - -/* - * Quit 680x0 emulation safely from different thread - */ -void Quit680x0(void) -{ - quit_program = 1; - TriggerNMI(); -} - - -int MFPdoInterrupt(void) -{ - return getMFP()->doInterrupt(); -} - -int SCCdoInterrupt(void) -{ - return getSCC()->doInterrupt(); -} - -/* - * Trigger interrupts - */ -void TriggerInternalIRQ(void) -{ - SPCFLAGS_SET( SPCFLAG_INTERNAL_IRQ ); -} - -void TriggerInt3(void) -{ - SPCFLAGS_SET( SPCFLAG_INT3 ); -} - -void TriggerVBL(void) -{ - SPCFLAGS_SET( SPCFLAG_VBL ); -} - -void TriggerInt5(void) -{ - SPCFLAGS_SET( SPCFLAG_INT5 ); -} - -void TriggerSCC(bool enable) -{ - if (enable) - SPCFLAGS_SET( SPCFLAG_SCC ); - else - SPCFLAGS_CLEAR( SPCFLAG_SCC ); -} - -void TriggerMFP(bool enable) -{ - if (enable) - SPCFLAGS_SET( SPCFLAG_MFP ); - else - SPCFLAGS_CLEAR( SPCFLAG_MFP ); -} - -void TriggerNMI(void) -{ - SPCFLAGS_SET( SPCFLAG_BRK ); // use _BRK for NMI -} - -#ifndef REBOOT_OR_HALT -#define REBOOT_OR_HALT 0 // halt by default -#endif - -#if REBOOT_OR_HALT == 1 -# define CPU_MSG "CPU: Rebooting" -# define CPU_ACTION Restart680x0() -#else -# define CPU_MSG "CPU: Halting" -# define CPU_ACTION Quit680x0() -#endif - -#ifdef ENABLE_EPSLIMITER - -#ifndef EPS_LIMIT -# define EPS_LIMIT 10000 /* this might be too high if ARAnyM is slowed down by printing the bus errors on console */ -#endif - -void check_eps_limit(uaecptr pc) -{ - static long last_exception_time=-1; - static long exception_per_sec=0; - static long exception_per_sec_pc=0; - static uaecptr prevpc = 0; - - if (bx_options.cpu.eps_enabled) { - if (last_exception_time == -1) { - last_exception_time = SDL_GetTicks(); - } - - exception_per_sec++; - - if (pc == prevpc) { - /* BUS ERRORs occur at the same PC - watch out! */ - exception_per_sec_pc++; - } - else { - exception_per_sec_pc = 0; - prevpc = pc; - } - - if (SDL_GetTicks() - last_exception_time > 1000) { - last_exception_time = SDL_GetTicks(); - if (exception_per_sec_pc > bx_options.cpu.eps_max || - exception_per_sec > EPS_LIMIT /* make it configurable */) { - panicbug("CPU: Exception per second limit reached: %ld/%ld", - exception_per_sec_pc, exception_per_sec); - /* would be cool to open SDL dialog here: */ - /* [Exception per seconds limit reached. XXXXX exception - occured in the last second. The limit is set to YYYYY - in your config file. Do you want to continue emulation, - reset ARAnyM or quit ?][Continue] [Reset] [Quit] - */ - panicbug(CPU_MSG); - CPU_ACTION; - } - exception_per_sec = 0; - exception_per_sec_pc = 0; - } - } -} -#endif - -void report_double_bus_error() -{ - panicbug("CPU: Double bus fault detected !"); - /* would be cool to open SDL dialog here: */ - /* [Double bus fault detected. The emulated system crashed badly. - Do you want to reset ARAnyM or quit ?] [Reset] [Quit]" - */ - panicbug(CPU_MSG); - CPU_ACTION; -} - -#ifdef FLIGHT_RECORDER -extern bool cpu_flight_recorder_active; -void cpu_flight_recorder(int activate) { cpu_flight_recorder_active = activate; } -#endif diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp deleted file mode 100644 index 334ae7533..000000000 --- a/BasiliskII/src/uae_cpu/compiler/codegen_arm.cpp +++ /dev/null @@ -1,2730 +0,0 @@ -/* - * compiler/codegen_arm.cpp - ARM code generator - * - * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * JIT compiler m68k -> ARM - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne - * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c - * - * 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 - * - * Current state: - * - Experimental - * - Still optimizable - * - Not clock cycle optimized - * - as a first step this compiler emulates x86 instruction to be compatible - * with gencomp. Better would be a specialized version of gencomp compiling - * 68k instructions to ARM compatible instructions. This is a step for the - * future - * - */ - -#include "flags_arm.h" - -// Declare the built-in __clear_cache function. -extern void __clear_cache (char*, char*); - -/************************************************************************* - * Some basic information about the the target CPU * - *************************************************************************/ - -#define R0_INDEX 0 -#define R1_INDEX 1 -#define R2_INDEX 2 -#define R3_INDEX 3 -#define R4_INDEX 4 -#define R5_INDEX 5 -#define R6_INDEX 6 -#define R7_INDEX 7 -#define R8_INDEX 8 -#define R9_INDEX 9 -#define R10_INDEX 10 -#define R11_INDEX 11 -#define R12_INDEX 12 -#define R13_INDEX 13 -#define R14_INDEX 14 -#define R15_INDEX 15 - -#define RSP_INDEX 13 -#define RLR_INDEX 14 -#define RPC_INDEX 15 - -/* The register in which subroutines return an integer return value */ -#define REG_RESULT R0_INDEX - -/* The registers subroutines take their first and second argument in */ -#define REG_PAR1 R0_INDEX -#define REG_PAR2 R1_INDEX - -#define REG_WORK1 R2_INDEX -#define REG_WORK2 R3_INDEX - -//#define REG_DATAPTR R10_INDEX - -#define REG_PC_PRE R0_INDEX /* The register we use for preloading regs.pc_p */ -#define REG_PC_TMP R1_INDEX /* Another register that is not the above */ - -#define SHIFTCOUNT_NREG R1_INDEX /* Register that can be used for shiftcount. - -1 if any reg will do. Normally this can be set to -1 but compemu_support is tied to 1 */ -#define MUL_NREG1 R0_INDEX /* %r4 will hold the low 32 bits after a 32x32 mul */ -#define MUL_NREG2 R1_INDEX /* %r5 will hold the high 32 bits */ - -#define STACK_ALIGN 4 -#define STACK_OFFSET sizeof(void *) -#define STACK_SHADOW_SPACE 0 - -uae_s8 always_used[]={2,3,-1}; -uae_s8 can_byte[]={0,1,4,5,6,7,8,9,10,11,12,-1}; -uae_s8 can_word[]={0,1,4,5,6,7,8,9,10,11,12,-1}; - -uae_u8 call_saved[]={0,0,0,0,1,1,1,1,1,1,1,1,0,1,1,1}; - -/* This *should* be the same as call_saved. But: - - We might not really know which registers are saved, and which aren't, - so we need to preserve some, but don't want to rely on everyone else - also saving those registers - - Special registers (such like the stack pointer) should not be "preserved" - by pushing, even though they are "saved" across function calls -*/ -static const uae_u8 need_to_preserve[]={0,0,0,0,1,1,1,1,1,1,1,1,1,0,0,0}; -static const uae_u32 PRESERVE_MASK = ((1<=-128 && x<=127); -} - -static inline int is8bit(uae_s32 x) -{ - return (x>=-255 && x<=255); -} - -static inline int isword(uae_s32 x) -{ - return (x>=-32768 && x<=32767); -} - -#define jit_unimplemented(fmt, ...) do{ panicbug("**** Unimplemented ****"); panicbug(fmt, ## __VA_ARGS__); abort(); }while (0) - -#if 0 /* currently unused */ -static void jit_fail(const char *msg, const char *file, int line, const char *function) -{ - panicbug("JIT failure in function %s from file %s at line %d: %s", - function, file, line, msg); - abort(); -} -#endif - -LOWFUNC(NONE,WRITE,1,raw_push_l_r,(RR4 r)) -{ - PUSH(r); -} - -LOWFUNC(NONE,READ,1,raw_pop_l_r,(RR4 r)) -{ - POP(r); -} - -LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, RR1 s)) -{ - MVN_ri(REG_WORK1, 0); // mvn r2,#0 - LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 - ORR_rrrLSRi(REG_WORK2, REG_WORK2, REG_WORK1, 8); // orr r3, r3, r2, lsr #8 - LSL_rri(REG_WORK1, s, 24); // lsl r2, %[s], #24 - - ADCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adcs r3, r3, r2 - - BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], R3 LSR #24 -} - -LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, RR2 s)) -{ - MVN_ri(REG_WORK1, 0); // mvn r2,#0 - LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 - ORR_rrrLSRi(REG_WORK2, REG_WORK2, REG_WORK1, 16); // orr r3, r3, r2, lsr #16 - LSL_rri(REG_WORK1, s, 16); // lsl r2, %[s], #16 - - ADCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 -#ifdef ARMV6_ASSEMBLY - PKHTB_rrrASRi(d,d,REG_WORK2,16); -#else - BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff - BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr %[d], %[d], r3, lsr #16 -#endif -} - -LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, RR4 s)) -{ - ADCS_rrr(d, d, s); // adcs %[d],%[d],%[s] -} - -LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, RR1 s)) -{ - LSL_rri(REG_WORK1, s, 24); // lsl r2, %[s], #24 - LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 - - ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 - - BIC_rri(d, d, 0xFF); // bic %[d],%[d],#0xFF - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3 LSR #24 -} - -LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, RR2 s)) -{ - LSL_rri(REG_WORK1, s, 16); // lsl r2, %[s], #16 - LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 - - ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 - -#ifdef ARMV6_ASSEMBLY - PKHTB_rrrASRi(d,d,REG_WORK2,16); -#else - BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff - BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3, LSR #16 -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, RR4 s)) -{ - ADDS_rrr(d, d, s); // adds %[d], %[d], %[s] -} - -LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_word_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldrh r2, [pc, #offs] -#else -# ifdef ARMV6_ASSEMBLY - LDRH_rRI(REG_WORK1, RPC_INDEX, 24); // ldrh r2, [pc, #24] ; -# else - LDRH_rRI(REG_WORK1, RPC_INDEX, 16); // ldrh r2, [pc, #16] ; -# endif -#endif - LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #16 - LSL_rri(REG_WORK1, REG_WORK1, 16); // lsl r2, r2, #16 - - ADDS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 - -#ifdef ARMV6_ASSEMBLY - PKHTB_rrrASRi(d,d,REG_WORK2,16); -#else - BIC_rri(d, d, 0xff); // bic %[d],%[d],#0xff - BIC_rri(d, d, 0xff00); // bic %[d],%[d],#0xff00 - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr %[d],%[d], r3, LSR #16 -#endif - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_word(i); - skip_word(0); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) -{ - LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 - - ADDS_rri(REG_WORK2, REG_WORK2, i << 24); // adds r3, r3, #0x12000000 - - BIC_rri(d, d, 0xFF); // bic %[d],%[d], #0xFF - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr %[d],%[d], r3, lsr #24 -} - -LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - ADDS_rrr(d, d, REG_WORK1); // adds %[d], %[d], r2 -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - ADDS_rrr(d, d, REG_WORK1); // adds %[d], %[d], r2 - B_i(0); // b - - //: - emit_long(i); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, RR1 s)) -{ - MVN_rrLSLi(REG_WORK1, s, 24); // mvn r2, %[s], lsl #24 - MVN_rrLSRi(REG_WORK1, REG_WORK1, 24); // mvn r2, %[s], lsr #24 - AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 - - LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, RR2 s)) -{ - MVN_rrLSLi(REG_WORK1, s, 16); // mvn r2, %[s], lsl #16 - MVN_rrLSRi(REG_WORK1, REG_WORK1, 16); // mvn r2, %[s], lsr #16 - AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 - - LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, RR4 s)) -{ - ANDS_rrr(d, d, s); // ands r7, r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; -#endif - ANDS_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(i); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, RR4 s)) -{ - MOV_rr(REG_WORK1, s); // mov r2,%[s] - RSB_rri(REG_WORK2, REG_WORK1, 0); // rsb r3,r2,#0 - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // and r2,r2,r3 - CLZ_rr(REG_WORK2, REG_WORK1); // clz r3,r2 - MOV_ri(d, 32); // mov %[d],#32 - SUB_rrr(d, d, REG_WORK2); // sub %[d],%[d],r3 - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TEQ_ri(d, 0); // teq %[d],#0 - CC_SUBS_rri(NATIVE_CC_NE, d,d,1); // sub %[d],%[d],#1 - CC_BIC_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_Z_FLAG); // bic r3,r3,#0x40000000 - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_Z_FLAG); // orr r3,r3,#0x40000000 - MSR_CPSR_r(REG_WORK2); // msr cpsr,r3 -} - -LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) -{ -#if defined(ARMV6_ASSEMBLY) - REVSH_rr(REG_WORK1,r); // revsh r2,%[r] - UXTH_rr(REG_WORK1, REG_WORK1); // utxh r2,r2 - LSR_rri(r, r, 16); - ORR_rrrLSLi(r, REG_WORK1, r, 16); // orr %[r], %[r], r2 -#else - MOV_rr(REG_WORK1, r); // mov r2, r6 - BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 - BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // bic r2, r2, #0xff000000 - - EOR_rrr(r, r, REG_WORK1); // eor r6, r6, r2 - - ORR_rrrLSRi(r, r, REG_WORK1, 8); // orr r6, r6, r2, lsr #8 - BIC_rri(REG_WORK1, REG_WORK1, 0xff00); // bic r2, r2, #0xff00 - ORR_rrrLSLi(r,r,REG_WORK1, 8); // orr r6, r6, r2, lsl #8 -#endif -} - -LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) -{ -#if defined(ARMV6_ASSEMBLY) - REV_rr(r,r); // rev %[r],%[r] -#else - EOR_rrrRORi(REG_WORK1, r, r, 16); // eor r2, r6, r6, ror #16 - BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 - ROR_rri(r, r, 8); // ror r6, r6, #8 - EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(RR4 r, IMM i)) -{ - int imm = (1 << (i & 0x1f)); - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_ri(r, imm); // tst r6, #0x1000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(RR4 r, RR4 b)) -{ - AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f - LSR_rrr(REG_WORK1, r, REG_WORK2); // lsr r2, r6, r3 - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_ri(REG_WORK1, 1); // tst r2, #1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, RR4 b)) -{ - MOV_ri(REG_WORK1, 1); // mov r2, #1 - AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f - LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_rr(r, REG_WORK1); // tst r6, r2 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - EOR_rrr(r, r, REG_WORK1); // eor r6, r6, r2 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, RR4 b)) -{ - MOV_ri(REG_WORK1, 1); // mov r2, #1 - AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f - LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_rr(r, REG_WORK1); // tst r6, r2 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - BIC_rrr(r, r, REG_WORK1); // bic r6, r6, r2 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, RR4 b)) -{ - MOV_ri(REG_WORK1, 1); // mov r2, #1 - AND_rri(REG_WORK2, b, 0x1f); // and r3, r7, #0x1f - LSL_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // lsl r2, r2, r3 - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_rr(r, REG_WORK1); // tst r6, r2 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - ORR_rrr(r, r, REG_WORK1); // orr r6, r6, r2 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, RR4 s, IMM cc)) -{ - switch (cc) { - case 9: // LS - BEQ_i(0); // beq Z != 0 - BCC_i(0); // bcc C == 0 - - //: - MOV_rr(d, s); // mov r7,r6 - break; - - case 8: // HI - BEQ_i(1); // beq Z != 0 - BCS_i(0); // bcs C != 0 - MOV_rr(d, s); // mov r7,#0 - break; - - default: - CC_MOV_rr(cc, d, s); // MOVcc R7,#1 - break; - } - //: -} - -LOWFUNC(WRITE,NONE,2,raw_cmp_b,(RR1 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - SXTB_rr(REG_WORK1, d); // sxtb r2,%[d] - SXTB_rr(REG_WORK2, s); // sxtb r3,%[s] -#else - LSL_rri(REG_WORK1, d, 24); // lsl r2,r6,#24 - LSL_rri(REG_WORK2, s, 24); // lsl r3,r7,#24 -#endif - CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_cmp_w,(RR2 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - SXTH_rr(REG_WORK1, d); // sxtb r2,%[d] - SXTH_rr(REG_WORK2, s); // sxtb r3,%[s] -#else - LSL_rri(REG_WORK1, d, 16); // lsl r6, r1, #16 - LSL_rri(REG_WORK2, s, 16); // lsl r7, r2, #16 -#endif - - CMP_rr(REG_WORK1, REG_WORK2); // cmp r7, r6, asr #16 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_cmp_l,(RR4 d, RR4 s)) -{ - CMP_rr(d, s); // cmp r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, RR4 s)) -{ - SMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // smull r2,r3,r7,r6 - MOV_rr(d, REG_WORK1); // mov r7,r2 -} - -LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) -{ - SMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // smull r2,r3,r7,r6 - MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 - MOV_rr(MUL_NREG2, REG_WORK2); -} - -LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) -{ - int shft; - switch(factor) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // LDR R2,[PC, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // LDR R2,[PC, #8] -#endif - ADD_rrr(REG_WORK1, s, REG_WORK1); // ADD R7,R6,R2 - ADD_rrrLSLi(d, REG_WORK1, index, shft); // ADD R7,R7,R5,LSL #2 -#if !defined(USE_DATA_BUFFER) - B_i(0); // B jp - - emit_long(offset); - //; -#endif -} - -LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) -{ - int shft; - switch(factor) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - - ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 -} - -LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; -#endif - LDRB_rRR(REG_WORK1, REG_WORK1, s); // ldrb r2, [r2, r6] - - BIC_rri(d, d, 0xff); // bic r7, r7, #0xff - ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(RR4 d, RR1 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] - STRB_rRR(s, d, REG_WORK1); // strb r6,[r7, r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] - STRB_rRR(s, d, REG_WORK1); // strb r6,[r7, r2] - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; -#endif - MOV_ri(REG_WORK2, s & 0xFF); // mov r3, #0x34 - STRB_rR(REG_WORK2, REG_WORK1); // strb r3, [r2] -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //d: - emit_long(d); - - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, RR1 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - STRB_rR(s, REG_WORK1); // strb r6, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STRB_rR(s, REG_WORK1); // strb r6, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) -{ - BIC_rri(d, d, 0xff); // bic %[d], %[d], #0xff - ORR_rri(d, d, (s & 0xff)); // orr %[d], %[d], #%[s] -} - -LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; -#endif - LDRB_rR(REG_WORK2, REG_WORK1); // ldrb r2, [r2] - BIC_rri(d, d, 0xff); // bic r7, r7, #0xff - ORR_rrr(d, REG_WORK2, d); // orr r7, r2, r7 -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, RR1 s)) -{ - AND_rri(REG_WORK1, s, 0xff); // and r2,r2, #0xff - BIC_rri(d, d, 0x0ff); // bic %[d], %[d], #0xff - ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 -} - -LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - LDR_rRR(d, REG_WORK1, s); // ldr r7, [r2, r6] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - LDR_rRR(d, REG_WORK1, s); // ldr r7, [r2, r6] - - B_i(0); // b - - emit_long(offset); //: - //: -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(RR4 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] - STR_rRR(s, d, REG_WORK1); // str R6,[R7, r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] ; - STR_rRR(s, d, REG_WORK1); // str R6,[R7, r2] - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) -{ - // TODO: optimize imm - -#if defined(USE_DATA_BUFFER) - data_check_end(8, 12); - long offs = data_long_offs(d); - - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - - offs = data_long_offs(s); - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s - - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; - LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] - B_i(1); // b - - emit_long(d); //: - emit_long(s); //: - - //: -#endif -} - -LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else -# ifdef ARMV6_ASSEMBLY - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #16] ; -# else - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; -# endif -#endif - LDRH_rRR(REG_WORK1, REG_WORK1, s); // ldrh r2, [r2, r6] - -#ifdef ARMV6_ASSEMBLY - PKHBT_rrr(d,REG_WORK1,d); -#else - BIC_rri(d, d, 0xff); // bic r7, r7, #0xff - BIC_rri(d, d, 0xff00); // bic r7, r7, #0xff00 - ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 -#endif - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - emit_long(offset); //: - //: -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(RR4 d, RR2 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2,[pc, #offs] - STRH_rRR(s, d, REG_WORK1); // strh r6,[r7, r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2,[pc,#4] - STRH_rRR(s, d, REG_WORK1); // strh r6,[r7, r2] - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, RR2 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc,#offs] - STRH_rR(s, REG_WORK1); // strh r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STRH_rR(s, REG_WORK1); // strh r3, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_word_offs(s); - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldrh r3, [pc, #offs] -#else -# ifdef ARMV6_ASSEMBLY - LDRH_rRI(REG_WORK2, RPC_INDEX, 12); // ldrh r3, [pc, #12] ; -# else - LDRH_rRI(REG_WORK2, RPC_INDEX, 4); // ldrh r3, [pc, #12] ; -# endif -#endif - -#ifdef ARMV6_ASSEMBLY - PKHBT_rrr(d,REG_WORK2,d); -#else - BIC_rri(REG_WORK1, d, 0xff); // bic r2, r7, #0xff - BIC_rri(REG_WORK1, REG_WORK1, 0xff00); // bic r2, r2, #0xff00 - ORR_rrr(d, REG_WORK2, REG_WORK1); // orr r7, r3, r2 -#endif - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_word(s); - skip_word(0); - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) -{ - // TODO: optimize imm - -#if defined(USE_DATA_BUFFER) - data_check_end(8, 12); - long offs = data_long_offs(d); - - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; - - offs = data_word_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - - STRH_rR(REG_WORK1, REG_WORK2); // strh r2, [r3] -#else - LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; - LDRH_rRI(REG_WORK1, RPC_INDEX, 8); // ldrh r2, [pc, #8] ; - STRH_rR(REG_WORK1, REG_WORK2); // strh r2, [r3] - B_i(1); // b - - //mem: - emit_long(d); - //imm: - emit_word(s); - skip_word(0); // Alignment - - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, RR4 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - STR_rR(s, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STR_rR(s, REG_WORK1); // str r3, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(RR4 d, IMM i, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - -#if defined(USE_DATA_BUFFER) - long offs = data_word_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDRH_rRI(REG_WORK1, RPC_INDEX, 4); // ldrh r2, [pc, #4] ; -#endif - if (offset >= 0) - STRH_rRI(REG_WORK1, d, offset); // strh r2, [r7, #0x54] - else - STRH_rRi(REG_WORK1, d, -offset);// strh r2, [r7, #-0x54] -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_word(i); - skip_word(0); - //: -#endif -} - -LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; -#endif - LDRH_rR(REG_WORK1, REG_WORK1); // ldrh r2, [r2] - LSR_rri(d, d, 16); // lsr r7, r7, #16 - ORR_rrrLSLi(d, REG_WORK1, d, 16); // orr r7, r2, r7, lsl #16 -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, RR2 s)) -{ - LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 - ORR_rrrLSRi(d, REG_WORK1, d, 16); // orr r7, r2, r7, lsr #16 - ROR_rri(d, d, 16); // ror r7, r7, #16 -} - -LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, RR4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - - if (offset >= 0) - LDRH_rRI(REG_WORK1, s, offset); // ldrh r2, [r6, #12] - else - LDRH_rRi(REG_WORK1, s, -offset); // ldrh r2, [r6, #-12] - -#ifdef ARMV6_ASSEMBLY - PKHBT_rrr(d,REG_WORK1,d); -#else - BIC_rri(d, d, 0xff); // bic r7, r7, #0xff - BIC_rri(d, d, 0xff00); // bic r7, r7, #0xff00 - ORR_rrr(d, d, REG_WORK1); // orr r7, r7, r2 -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(RR4 d, RR2 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - - if (offset >= 0) - STRH_rRI(s, d, offset); // strh r6, [r7, #0x7f] - else - STRH_rRi(s, d, -offset);// strh r6, [r7, #-0x7f] -} - -LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [r10, #offs] - LDR_rR(d, REG_WORK1); // ldr r7, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - LDR_rR(d, REG_WORK1); // ldr r7, [r2] - B_i(0); // b - - emit_long(s); //: - - //: -#endif -} - -LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, MEMR base, RR4 index, IMM factor)) -{ - int shft; - switch(factor) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(base); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] - LDR_rRR_LSLi(d, REG_WORK1, index, shft); // ldr %[d], [r2, %[index], lsl #[shift]] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - LDR_rRR_LSLi(d, REG_WORK1, index, shft); // ldr %[d], [r2, %[index], lsl #[shift]] - - B_i(0); // b - emit_long(base); //: - //: -#endif -} - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(RR4 d, IMM i, IMM offset8)) -{ - Dif(!isbyte(offset8)) abort(); - -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; -#endif - if (offset8 >= 0) - STR_rRI(REG_WORK1, d, offset8); // str r2, [r7, #0x54] - else - STR_rRi(REG_WORK1, d, -offset8); // str r2, [r7, #-0x54] -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(i); - //: -#endif -} - -LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, RR4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - - if (offset >= 0) { - LDR_rRI(d, s, offset); // ldr r2, [r1, #-12] - } else - LDR_rRi(d, s, -offset); // ldr r2, [r1, #12] -} - -LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, RR4 s)) -{ - MOV_rr(d, s); // mov %[d], %[s] -} - -LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(RR4 d, RR4 s, IMM offset)) -{ - Dif(!isbyte(offset)) abort(); - - if (offset >= 0) - STR_rRI(s, d, offset); // str r6, [r7, #12] - else - STR_rRi(s, d, -offset); // str r6, [r7, #-12] -} - -LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) -{ - UMULL_rrrr(REG_WORK1, REG_WORK2, d, s); // umull r2,r3,r7,r6 - MOV_rr(MUL_NREG1, REG_WORK1); // mov r7,r2 - MOV_rr(MUL_NREG2, REG_WORK2); -} - -LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, RR1 s)) -{ - AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF - ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 - LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] -#else - BIC_rri(REG_WORK1, s, 0xff000000); // bic r2, %[s], #0xff000000 - BIC_rri(REG_WORK1, REG_WORK1, 0x00ff0000); // bic r2, r2, #0x00ff0000 -#endif - ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 - LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, RR4 s)) -{ - ORRS_rrr(d, d, s); // orrs r7, r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // LDR r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // LDR r2, [pc,#16] ; -#endif - ORRS_rrr(d, d, REG_WORK1); // ORRS r7,r7,r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - // value: - emit_long(i); - //jp: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - int imm = 32 - (i & 0x1f); - - MOV_rrLSLi(REG_WORK1, r, 24); // mov r2,r7,lsl #24 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 - - RORS_rri(REG_WORK1, REG_WORK1, imm); // rors r2,r2,#(32 - (i & 0x1f)) - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(REG_WORK1, 1); // tst r2,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(r, r, 0xff); // bic r7,r7,#0xff - ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, RR1 r)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - - MOV_ri(REG_WORK2, 32); // mov r3,#32 - AND_rri(REG_WORK1, r, 0x1f); // and r2,r6,#0x1f - SUB_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // sub r3,r3,r2 - - MOV_rrLSLi(REG_WORK1, d, 24); // mov r2,r7,lsl #24 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 - - RORS_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // rors r2,r2,r3 - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(REG_WORK1, 1); // tst r2,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(d, d, 0xff); // bic r7,r7,#0xff - - ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - int imm = 32 - (i & 0x1f); - - MOV_rrLSLi(REG_WORK1, r, 16); // mov r2,r7,lsl #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - - RORS_rri(REG_WORK1, REG_WORK1, imm); // rors r2,r2,#(32 - (i & 0x1f)) - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(REG_WORK1, 1); // tst r2,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); - - BIC_rri(r, r, 0xff00); // bic r2,r2,#0xff00 - BIC_rri(r, r, 0xff); // bic r2,r2,#0xff - - ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 -} - -LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, RR1 r)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - - MOV_ri(REG_WORK2, 32); // mov r3,#32 - AND_rri(REG_WORK1, r, 0x1f); // and r2,r6,#0x1f - SUB_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // sub r3,r3,r2 - - MOV_rrLSLi(REG_WORK1, d, 16); // mov r2,r7,lsl #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - - RORS_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // rors r2,r2,r3 - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(REG_WORK1, 1); // tst r2,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); - - BIC_rri(d, d, 0xff00); // bic r2,r2,#0xff00 - BIC_rri(d, d, 0xff); // bic r2,r2,#0xff - - ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r2,r2,r7,lsr #16 -} - -LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - int imm = 32 - (i & 0x1f); - - RORS_rri(r, r, imm); // rors r7,r7,#(32 - (i & 0x1f)) - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(r, 1); // tst r7,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); -} - -LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) -{ - RORS_rri(r, r, i & 0x1F); // RORS r7,r7,#12 -} - -LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, RR1 r)) -{ - // TODO: Check if the Bittest is necessary. compemu.c seems to do it itself, but meanwhile make sure, that carry is set correctly - - MOV_ri(REG_WORK1, 32); // mov r2,#32 - AND_rri(REG_WORK2, r, 0x1f); // and r3,r6,#0x1f - SUB_rrr(REG_WORK1, REG_WORK1, REG_WORK2); // sub r2,r2,r3 - - RORS_rrr(d, d, REG_WORK1); // rors r7,r7,r2 - - MRS_CPSR(REG_WORK2); // mrs r3,cpsr - TST_ri(d, 1); // tst r7,#1 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3,r3,#0x20000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3,r3,#0x20000000 - MSR_CPSR_r(REG_WORK2); -} - -LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, RR1 r)) -{ - RORS_rrr(d, d, r); // RORS r7,r7,r6 -} - -LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) -{ - MOV_rrLSLi(REG_WORK1, r, 24); // mov r2,r7,lsl #24 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 - - RORS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // rors r2,r2,#12 - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(r, r, 0xff); // bic r7,r7,#0xff - ORR_rrr(r, r, REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, RR1 r)) -{ - MOV_rrLSLi(REG_WORK1, d, 24); // mov r2,r7,lsl #24 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 8); // orr r2,r2,r2,lsr #8 - - RORS_rrr(REG_WORK1, REG_WORK1, r); // rors r2,r2,r6 - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(d, d, 0xff); // bic r7,r7,#0xff - ORR_rrr(d, d, REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) -{ - MOV_rrLSLi(REG_WORK1, r, 16); // mov r2,r7,lsl #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - - RORS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // RORS r2,r2,#12 - - BIC_rri(r, r, 0xff00); // bic r7,r7,#0xff00 - BIC_rri(r, r, 0xff); // bic r7,r7,#0xff - - ORR_rrrLSRi(r, r, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 -} - -LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, RR1 r)) -{ - MOV_rrLSLi(REG_WORK1, d, 16); // mov r2,r7,lsl #16 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, REG_WORK1, 16); // orr r2,r2,r2,lsr #16 - - RORS_rrr(REG_WORK1, REG_WORK1, r); // RORS r2,r2,r6 - - BIC_rri(d, d, 0xff00); // bic r7,r7,#0xff00 - BIC_rri(d, d, 0xff); // bic r7,r7,#0xff - - ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr r7,r7,r2,lsr #16 -} - -LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, RR1 s)) -{ - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - - LSL_rri(REG_WORK2, d, 24); // lsl r3, %[d], #24 - LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 - - SBCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - BIC_rri(d, d, 0xFF); - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, RR4 s)) -{ - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - - SBCS_rrr(d, d, s); // sbcs r7, r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, RR2 s)) -{ - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - - LSL_rri(REG_WORK2, d, 16); // lsl r3, %[d], #24 - LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 - - SBCS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - BIC_rri(d,d, 0xff); - BIC_rri(d,d, 0xff00); - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) -{ - switch (cc) { - case 9: // LS - BEQ_i(0); // beq - BCC_i(1); // bcs - - MOV_ri(d, 1); // mov r7,#0 - B_i(0); // b - - //: - MOV_ri(d, 0); // mov r7,#1 - break; - - case 8: // HI - BEQ_i(2); // beq Z != 0 - BCS_i(1); // bcc C = 0 - - //: - MOV_ri(d, 1); // mov r7,#0 - B_i(0); // b - - //: - MOV_ri(d, 0); // mov r7,#1 - break; - - default: - CC_MOV_ri(cc, d, 1); // MOVcc R7,#1 - CC_MOV_ri(cc^1, d, 0); // MOVcc^1 R7,#0 - break; - } - //: -} - -LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) -{ - switch (cc) { - case 9: // LS - BEQ_i(0); // beq - BCC_i(1); // bcs - - MOV_ri(REG_WORK1, 1); // mov r2,#0 - B_i(0); // b - - //: - MOV_ri(REG_WORK1, 0); // mov r2,#1 - break; - - case 8: // HI - BEQ_i(2); // beq Z != 0 - BCS_i(1); // bcc C = 0 - - MOV_ri(REG_WORK1, 1); // mov r2,#0 - B_i(0); // b - - //: - MOV_ri(REG_WORK1, 0); // mov r2,#1 - break; - - default: - CC_MOV_ri(cc, REG_WORK1, 1); // MOVcc R2,#1 - CC_MOV_ri(cc^1, REG_WORK1, 0); // MOVcc^1 R2,#0 - break; - } - //: -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // LDR R3,[PC, #offs] -#else - LDR_rRI(REG_WORK2, RPC_INDEX, 4); // LDR R3,[PC, #4] -#endif - STRB_rR(REG_WORK1, REG_WORK2); // STRB R2,[R3] -#if !defined(USE_DATA_BUFFER) - B_i(0); // B - - emit_long(d); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) -{ - LSL_rri(REG_WORK1, r, 24); // LSL r2,r7,#24 - - LSLS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSLS r2,r2,#12 - - BIC_rri(r, r, 0xff); // BIC r7,r7,0xff - ORR_rrrLSRi(r, r, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 -} - -LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, RR1 r)) -{ - LSL_rri(REG_WORK1, d, 24); // LSL r2,r7,#24 - LSLS_rrr(REG_WORK1, REG_WORK1, r); // LSLS r2,r2,r6 - BIC_rri(d, d, 0xff); // BIC r7,r7,#0xff - ORR_rrrLSRi(d, d, REG_WORK1, 24); // ORR r7,r7,r2,lsr #24 -} - -LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) -{ - LSLS_rri(r,r, i & 0x1f); // lsls r7,r7,#12 -} - -LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, RR1 r)) -{ - LSLS_rrr(d, d, r); -} - -LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) -{ - LSL_rri(REG_WORK1, r, 16); // LSL r2,r7,#16 - LSLS_rri(REG_WORK1, REG_WORK1, i&0x1f); // LSLS r2,r2,#12 - - ORR_rrrLSRi(REG_WORK1, REG_WORK1, r, 16); // ORR r2,r2,r7,lsr #16 - - ROR_rri(r, REG_WORK1, 16); // ROR r7,r2,#16 -} - -LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, RR1 r)) -{ - LSL_rri(REG_WORK1, d, 16); // LSL r2,r7,#16 - LSLS_rrr(REG_WORK1, REG_WORK1, r); // LSLS r2,r2,r6 - ORR_rrrLSRi(REG_WORK1, REG_WORK1, d, 16); // ORR r2,r2,r7,lsr #16 - ROR_rri(d, REG_WORK1, 16); // ROR r7,r2,#16 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) -{ - LSL_rri(REG_WORK1, r, 24); // lsl r2,r7,#24 - ASR_rri(REG_WORK1, REG_WORK1, 24); // asr r2,r2,#24 - - ASRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // asrs r2,r2,#12 - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(r,r, 0xff); // bic r7,r7,#0xff - ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, RR1 r)) -{ - LSL_rri(REG_WORK1, d, 24); // lsl r2,r7,#24 - ASR_rri(REG_WORK1, REG_WORK1, 24); // asr r2,r2,#24 - - ASRS_rrr(REG_WORK1, REG_WORK1, r); // asrs r2,r2,r6 - - AND_rri(REG_WORK1, REG_WORK1, 0xff); // and r2,r2,#0xff - BIC_rri(d,d, 0xff); // bic r7,r7,#0xff - - ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) -{ - LSL_rri(REG_WORK1, r, 16); // lsl r2,r7,#16 - ASR_rri(REG_WORK1, REG_WORK1, 16); // asr r2,r2,#16 - - ASRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // asrs r2,r2,#12 - -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, REG_WORK1); -#else - BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); - BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); -#endif - - BIC_rri(r,r,0xff00); // bic r7,r7,#0xff00 - BIC_rri(r,r,0xff); // bic r7,r7,#0xff - - ORR_rrr(r,r,REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, RR1 r)) -{ - LSL_rri(REG_WORK1, d, 16); // lsl r2,r7,#16 - ASR_rri(REG_WORK1, REG_WORK1, 16); // asr r2,r2,#16 - - ASRS_rrr(REG_WORK1, REG_WORK1, r); // asrs r2,r2,r6 - -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, REG_WORK1); -#else - BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // bic r2,r2,#0xff000000 - BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2,r2,#0xff0000 -#endif - - BIC_rri(d,d, 0xff00); // bic r7,r7,#0xff00 - BIC_rri(d,d, 0xff); // bic r7,r7,#0xff - - ORR_rrr(d,d,REG_WORK1); // orr r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) -{ - ASRS_rri(r, r, i & 0x1f); // ASRS r7,r7,#12 -} - -LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, RR1 r)) -{ - ASRS_rrr(d, d, r); // ASRS r7,r7,r6 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) -{ - AND_rri(REG_WORK1, r, 0xff); // AND r2,r7,#0xFF - - LSRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSRS r2,r2,r6 - - BIC_rri(r, r, 0xFF); // BIC r7,r7,#0xff - ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, RR1 r)) -{ - AND_rri(REG_WORK1, d, 0xff); // AND r2,r7,#0xFF - - LSRS_rrr(REG_WORK1, REG_WORK1, r); // LSRS r2,r2,r6 - - BIC_rri(d, d, 0xFF); // BIC r7,r7,#0xff - ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) -{ - LSRS_rri(r, r, i & 0x1f); // LSRS r7,r7,#12 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, r); -#else - BIC_rri(REG_WORK1, r, 0xff0000); // BIC r2,r7,#0xff0000 - BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // BIC r2,r2,#0xff000000 -#endif - - LSRS_rri(REG_WORK1, REG_WORK1, i & 0x1f); // LSRS r2,r2,#12 - - BIC_rri(r, r, 0xFF); // BIC r7,r7,#0xff - BIC_rri(r, r, 0xFF00); // BIC r7,r7,#0xff00 - ORR_rrr(r, r, REG_WORK1); // ORR r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, RR1 r)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, d); -#else - BIC_rri(REG_WORK1, d, 0xff0000); // BIC r2,r7,#0xff0000 - BIC_rri(REG_WORK1, REG_WORK1, 0xff000000); // BIC r2,r2,#0xff000000 -#endif - - LSRS_rrr(REG_WORK1, REG_WORK1, r); // LSRS r2,r2,r6 - - BIC_rri(d, d, 0xFF); // BIC r7,r7,#0xff - BIC_rri(d, d, 0xFF00); // BIC r7,r7,#0xff00 - ORR_rrr(d, d, REG_WORK1); // ORR r7,r7,r2 -} - -LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, RR1 r)) -{ - LSRS_rrr(d, d, r); -} - -LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, RR1 s)) -{ - LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 - LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 - - SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - BIC_rri(d, d, 0xFF); - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) -{ - LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 - - SUBS_rri(REG_WORK2, REG_WORK2, i << 24); // subs r3, r3, #0x12000000 - BIC_rri(d, d, 0xFF); // bic r7, r7, #0xFF - ORR_rrrLSRi(d, d, REG_WORK2, 24); // orr r7, r7, r3, lsr #24 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, RR4 s)) -{ - SUBS_rrr(d, d, s); // subs r7, r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; -#endif - SUBS_rrr(d, d, REG_WORK1); // subs r7, r7, r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(i); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, RR2 s)) -{ - LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 - LSL_rri(REG_WORK2, d, 16); // lsl r3, r7, #16 - - SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - BIC_rri(d, d, 0xff); - BIC_rri(d, d, 0xff00); - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r7, r7, r3 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) -{ - // TODO: optimize_imm - -#if defined(USE_DATA_BUFFER) - long offs = data_word_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; -#else - LDRH_rRI(REG_WORK1, RPC_INDEX, 36); // ldrh r2, [pc, #36] ; -#endif - LSL_rri(REG_WORK1, REG_WORK1, 16); // lsl r2, r2, #16 - LSL_rri(REG_WORK2, d, 16); // lsl r3, r6, #16 - - SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - BIC_rri(d, d, 0xff); - BIC_rri(d, d, 0xff00); - ORR_rrrLSRi(d, d, REG_WORK2, 16); // orr r6, r3, r6, lsr #16 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); // eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - emit_word(i); - skip_word(0); //: - - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(RR1 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - SXTB_rr(REG_WORK1, s); - SXTB_rr(REG_WORK2, d); -#else - LSL_rri(REG_WORK1, s, 24); // lsl r2, r6, #24 - LSL_rri(REG_WORK2, d, 24); // lsl r3, r7, #24 -#endif - - TST_rr(REG_WORK2, REG_WORK1); // tst r3, r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(RR4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; -#endif - TST_rr(d, REG_WORK1); // tst r7, r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(i); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(RR4 d, RR4 s)) -{ - TST_rr(d, s); // tst r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(RR2 d, RR2 s)) -{ -#ifdef ARMV6_ASSEMBLY - SXTH_rr(REG_WORK1, s); - SXTH_rr(REG_WORK2, d); -#else - LSL_rri(REG_WORK1, s, 16); // lsl r2, r6, #16 - LSL_rri(REG_WORK2, d, 16); // lsl r3, r7, #16 -#endif - - TST_rr(REG_WORK2, REG_WORK1); // tst r3, r2 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, RR1 s)) -{ - AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF - EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 - LSLS_rri(REG_WORK1, d, 24); // lsls r2, %[d], #24 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] -#else - BIC_rri(REG_WORK1, s, 0xff000000); // bic r2, %[s], #0xff000000 - BIC_rri(REG_WORK1, REG_WORK1, 0x00ff0000); // bic r2, r2, #0x00ff0000 -#endif - EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 - LSLS_rri(REG_WORK1, d, 16); // lsls r2, %[d], #16 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, RR4 s)) -{ - EORS_rrr(d, d, s); // eors r7, r7, r6 - - MRS_CPSR(REG_WORK1); // mrs r2, CPSR - BIC_rri(REG_WORK1, REG_WORK1, ARM_CV_FLAGS); // bic r2, r2, #0x30000000 - MSR_CPSR_r(REG_WORK1); // msr CPSR_fc, r2 -} - -LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - SXTH_rr(d, s); // sxth %[d],%[s] -#else - LSL_rri(d, s, 16); // lsl r6, r7, #16 - ASR_rri(d, d, 16); // asr r6, r6, #16 -#endif -} - -LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - SXTB_rr(d, s); // SXTB %[d],%[s] -#else - ROR_rri(d, s, 8); // ror r6, r7, #8 - ASR_rri(d, d, 24); // asr r6, r6, #24 -#endif -} - -LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(d, s); // UXTB %[d], %[s] -#else - ROR_rri(d, s, 8); // ror r2, r1, #8 - LSR_rri(d, d, 24); // lsr r2, r2, #24 -#endif -} - -LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(d, s); // UXTH %[d], %[s] -#else - BIC_rri(d, s, 0xff000000); // bic %[d], %[s], #0xff000000 - BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 -#endif -} - -static inline void raw_dec_sp(int off) -{ - if (off) { - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - SUB_rrr(RSP_INDEX, RSP_INDEX, REG_WORK1); // sub r7, r7, r2 - B_i(0); // b - //: - emit_long(off); - } -} - -static inline void raw_inc_sp(int off) -{ - if (off) { - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - ADD_rrr(RSP_INDEX, RSP_INDEX, REG_WORK1); // sub r7, r7, r2 - B_i(0); // b - //: - emit_long(off); - } -} - -static inline void raw_push_regs_to_preserve(void) { - PUSH_REGS(PRESERVE_MASK); -} - -static inline void raw_pop_preserved_regs(void) { - POP_REGS(PRESERVE_MASK); -} - -// Verify!!! -/* FLAGX is byte sized, and we *do* write it at that size */ -static inline void raw_load_flagx(uae_u32 t) -{ - raw_mov_l_rm(t,(uintptr)live.state[FLAGX].mem); -} - -static inline void raw_flags_evicted(int r) -{ - //live.state[FLAGTMP].status=CLEAN; - live.state[FLAGTMP].status=INMEM; - live.state[FLAGTMP].realreg=-1; - /* We just "evicted" FLAGTMP. */ - if (live.nat[r].nholds!=1) { - /* Huh? */ - abort(); - } - live.nat[r].nholds=0; -} - -static inline void raw_flags_init(void) { -} - -static __inline__ void raw_flags_set_zero(int s, int tmp) -{ - raw_mov_l_rr(tmp,s); - MRS_CPSR(s); - BIC_rri(s,s,ARM_Z_FLAG); - AND_rri(tmp,tmp,ARM_Z_FLAG); - EOR_rri(tmp,tmp,ARM_Z_FLAG); - ORR_rrr(s,s,tmp); - MSR_CPSR_r(s); -} - -static inline void raw_flags_to_reg(int r) -{ - MRS_CPSR(r); - raw_mov_l_mr((uintptr)live.state[FLAGTMP].mem,r); - raw_flags_evicted(r); -} - -static inline void raw_reg_to_flags(int r) -{ - MSR_CPSR_r(r); // msr CPSR_fc, %r -} - -/* Apparently, there are enough instructions between flag store and - flag reload to avoid the partial memory stall */ -static inline void raw_load_flagreg(uae_u32 t) -{ - raw_mov_l_rm(t,(uintptr)live.state[FLAGTMP].mem); -} - -/* %eax register is clobbered if target processor doesn't support fucomi */ -#define FFLAG_NREG_CLOBBER_CONDITION !have_cmov -#define FFLAG_NREG R0_INDEX -#define FLAG_NREG2 -1 -#define FLAG_NREG1 -1 -#define FLAG_NREG3 -1 - -static inline void raw_fflags_into_flags(int r) -{ - jit_unimplemented("raw_fflags_into_flags %x", r); -} - -static inline void raw_fp_init(void) -{ - int i; - - for (i=0;i=1) { -// emit_byte(0xde); -// emit_byte(0xd9); - live.tos-=2; - } - while (live.tos>=0) { -// emit_byte(0xdd); -// emit_byte(0xd8); - live.tos--; - } - raw_fp_init(); -} - -LOWFUNC(NONE,WRITE,2,raw_fmov_mr_drop,(MEMPTRW m, FR r)) -{ - jit_unimplemented("raw_fmov_mr_drop %x %x", m, r); -} - -LOWFUNC(NONE,WRITE,2,raw_fmov_mr,(MEMPTRW m, FR r)) -{ - jit_unimplemented("raw_fmov_mr %x %x", m, r); -} - -LOWFUNC(NONE,READ,2,raw_fmov_rm,(FW r, MEMPTRR m)) -{ - jit_unimplemented("raw_fmov_rm %x %x", r, m); -} - -LOWFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) -{ - jit_unimplemented("raw_fmov_rr %x %x", d, s); -} - -static inline void raw_emit_nop_filler(int nbytes) -{ - nbytes >>= 2; - while(nbytes--) { NOP(); } -} - -static inline void raw_emit_nop(void) -{ - NOP(); -} - -#ifdef UAE -static -#endif -void compiler_status() { - jit_log("compiled code starts at %p, current at %p (size 0x%x)", compiled_code, current_compile_p, (unsigned int)(current_compile_p - compiled_code)); -} - -// -// ARM doesn't have bsf, but clz is a good alternative instruction for it -// -static bool target_check_bsf(void) -{ - return false; -} - -static void raw_init_cpu(void) -{ - /* Have CMOV support, because ARM support conditions for all instructions */ - have_cmov = true; - - align_loops = 0; - align_jumps = 0; - - raw_flags_init(); -} - -// -// Arm instructions -// -LOWFUNC(WRITE,NONE,2,raw_ADD_l_rr,(RW4 d, RR4 s)) -{ - ADD_rrr(d, d, s); -} - -LOWFUNC(WRITE,NONE,2,raw_ADD_l_rri,(RW4 d, RR4 s, IMM i)) -{ - ADD_rri(d, s, i); -} - -LOWFUNC(WRITE,NONE,2,raw_SUB_l_rri,(RW4 d, RR4 s, IMM i)) -{ - SUB_rri(d, s, i); -} - -LOWFUNC(WRITE,NONE,2,raw_AND_b_rr,(RW1 d, RR1 s)) -{ - MVN_rrLSLi(REG_WORK1, s, 24); // mvn r2, %[s], lsl #24 - MVN_rrLSRi(REG_WORK1, REG_WORK1, 24); // mvn r2, %[s], lsr #24 - AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 -} - -LOWFUNC(WRITE,NONE,2,raw_AND_l_rr,(RW4 d, RR4 s)) -{ - AND_rrr(d, d, s); -} - -LOWFUNC(WRITE,NONE,2,raw_AND_l_ri,(RW4 d, IMM i)) -{ - AND_rri(d, d, i); -} - -LOWFUNC(WRITE,NONE,2,raw_AND_w_rr,(RW2 d, RR2 s)) -{ - MVN_rrLSLi(REG_WORK1, s, 16); // mvn r2, %[s], lsl #16 - MVN_rrLSRi(REG_WORK1, REG_WORK1, 16); // mvn r2, %[s], lsr #16 - AND_rrr(d, d, REG_WORK1); // and %[d], %[d], r2 -} - -LOWFUNC(WRITE,NONE,2,raw_EOR_b_rr,(RW1 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(REG_WORK1, s); // UXTH r2, %[s] -#else - AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF -#endif - EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 -} - -LOWFUNC(WRITE,NONE,2,raw_EOR_l_rr,(RW4 d, RR4 s)) -{ - EOR_rrr(d, d, s); // eors r7, r7, r6 -} - -LOWFUNC(WRITE,NONE,2,raw_EOR_w_rr,(RW2 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] - EOR_rrr(d, d, REG_WORK1); // eor %[d], %[d], r2 -#else - LSL_rri(REG_WORK1, s, 16); // bic r2, %[s], #0xff000000 - EOR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_LDR_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(d, RPC_INDEX, offs); // ldr r2, [pc, #offs] -#else - LDR_rR(d, RPC_INDEX); - B_i(0); - emit_long(i); -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_MOV_l_ri8,(RW4 d, IMM i)) -{ - MOV_ri(d, i); -} - -LOWFUNC(WRITE,NONE,2,raw_ORR_b_rr,(RW1 d, RR1 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(REG_WORK1, s); // UXTH r2, %[s] -#else - AND_rri(REG_WORK1, s, 0xFF); // and r2, %[s], 0xFF -#endif - ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 -} - -LOWFUNC(WRITE,NONE,2,raw_ORR_l_rr,(RW4 d, RR4 s)) -{ - ORR_rrr(d, d, s); -} - -LOWFUNC(WRITE,NONE,2,raw_ORR_w_rr,(RW2 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK1, s); // UXTH r2, %[s] - ORR_rrr(d, d, REG_WORK1); // orr %[d], %[d], r2 -#else - LSL_rri(REG_WORK1, s, 16); // bic r2, %[s], #0xff000000 - ORR_rrrLSRi(d, d, REG_WORK1, 16); // orr %[d], %[d], r2 -#endif -} - -LOWFUNC(WRITE,NONE,2,raw_ROR_l_ri,(RW4 r, IMM i)) -{ - ROR_rri(r, r, i); -} - -// -// compuemu_support used raw calls -// -LOWFUNC(WRITE,RMW,2,compemu_raw_add_l_mi,(IMM d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - data_check_end(8, 24); - long target = data_long(d, 24); - long offs = get_data_offset(target); - - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] - - offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; s - - ADD_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 - - offs = get_data_offset(target); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 20); // ldr r2, [pc, #20] ; - LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] - - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #16] ; - - ADD_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // adds r3, r3, r2 - - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] - - B_i(1); // b - - //: - emit_long(d); - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,compemu_raw_and_l_ri,(RW4 d, IMM i)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(i); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - AND_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #16] ; - AND_rrr(d, d, REG_WORK1); // ands %[d], %[d], r2 - B_i(0); - emit_long(i); -#endif -} - -LOWFUNC(NONE,NONE,1,compemu_raw_bswap_32,(RW4 r)) -{ -#if defined(ARMV6_ASSEMBLY) - REV_rr(r,r); // rev %[r],%[r] -#else - EOR_rrrRORi(REG_WORK1, r, r, 16); // eor r2, r6, r6, ror #16 - BIC_rri(REG_WORK1, REG_WORK1, 0xff0000); // bic r2, r2, #0xff0000 - ROR_rri(r, r, 8); // ror r6, r6, #8 - EOR_rrrLSRi(r, r, REG_WORK1, 8); // eor r6, r6, r2, lsr #8 -#endif -} - -LOWFUNC(WRITE,NONE,2,compemu_raw_bt_l_ri,(RR4 r, IMM i)) -{ - int imm = (1 << (i & 0x1f)); - - MRS_CPSR(REG_WORK2); // mrs r3, CPSR - TST_ri(r, imm); // tst r6, #0x1000000 - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); // bic r3, r3, #0x20000000 - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); // orr r3, r3, #0x20000000 - MSR_CPSR_r(REG_WORK2); // msr CPSR_fc, r3 -} - -LOWFUNC(NONE,READ,5,compemu_raw_cmov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor, IMM cond)) -{ - int shft; - switch(factor) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - - switch (cond) { - case 9: // LS - jit_unimplemented("cmov LS not implemented"); - abort(); - case 8: // HI - jit_unimplemented("cmov HI not implemented"); - abort(); - default: -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(base); - CC_LDR_rRI(cond, REG_WORK1, RPC_INDEX, offs); // ldrcc r2, [pc, #offs] ; - CC_LDR_rRR_LSLi(cond, d, REG_WORK1, index, shft); // ldrcc %[d], [r2, %[index], lsl #[shift]] -#else - CC_LDR_rRI(cond, REG_WORK1, RPC_INDEX, 4); // ldrcc r2, [pc, #4] ; - CC_LDR_rRR_LSLi(cond, d, REG_WORK1, index, shft); // ldrcc %[d], [r2, %[index], lsl #[shift]] - B_i(0); // b -#endif - break; - } -#if !defined(USE_DATA_BUFFER) - emit_long(base); // : - //: -#endif -} - -LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi,(MEMR d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - data_check_end(8, 16); - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] - - offs = data_long_offs(s); - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s - - CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 - -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #24] ; - LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] - - LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #20] ; - - CMP_rr(REG_WORK1, REG_WORK2); // cmp r2, r3 - - B_i(1); // b - - //: - emit_long(d); - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(WRITE,READ,2,compemu_raw_cmp_l_mi8,(MEMR d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; -#endif - LDR_rR(REG_WORK1, REG_WORK1); // ldr r2, [r2] - - CMP_ri(REG_WORK1, s); // cmp r2, r3 - -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,NONE,3,compemu_raw_lea_l_brr,(W4 d, RR4 s, IMM offset)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(offset); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - ADD_rrr(d, s, REG_WORK1); // add r7, r6, r2 - B_i(0); // b - - //: - emit_long(offset); - //: -#endif -} - -LOWFUNC(NONE,NONE,4,compemu_raw_lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) -{ - int shft; - switch(factor) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - - ADD_rrrLSLi(d, s, index, shft); // ADD R7,R6,R5,LSL #2 -} - -LOWFUNC(NONE,WRITE,2,compemu_raw_mov_b_mr,(IMM d, RR1 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - STRB_rR(s, REG_WORK1); // strb r6, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STRB_rR(s, REG_WORK1); // strb r6, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mi,(MEMW d, IMM s)) -{ - // TODO: optimize imm - -#if defined(USE_DATA_BUFFER) - data_check_end(8, 12); - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - offs = data_long_offs(s); - LDR_rRI(REG_WORK2, RPC_INDEX, offs); // ldr r3, [pc, #offs] ; s - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 8); // ldr r2, [pc, #8] ; - LDR_rRI(REG_WORK2, RPC_INDEX, 8); // ldr r3, [pc, #8] ; - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] - B_i(1); // b - - emit_long(d); //: - emit_long(s); //: - - //: -#endif -} - -LOWFUNC(NONE,WRITE,2,compemu_raw_mov_l_mr,(IMM d, RR4 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - STR_rR(s, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STR_rR(s, REG_WORK1); // str r3, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_ri,(W4 d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(s); - LDR_rRI(d, RPC_INDEX, offs); // ldr %[d], [pc, #offs] ; -#else - LDR_rR(d, RPC_INDEX); // ldr %[d], [pc] ; - B_i(0); // b - - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(NONE,READ,2,compemu_raw_mov_l_rm,(W4 d, MEMR s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - LDR_rR(d, REG_WORK1); // ldr r7, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - LDR_rR(d, REG_WORK1); // ldr r7, [r2] - B_i(0); // b - - emit_long(s); //: - //: -#endif -} - -LOWFUNC(NONE,NONE,2,compemu_raw_mov_l_rr,(W4 d, RR4 s)) -{ - MOV_rr(d, s); // mov %[d], %[s] -} - -LOWFUNC(NONE,WRITE,2,compemu_raw_mov_w_mr,(IMM d, RR2 s)) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(d); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; - STRH_rR(s, REG_WORK1); // strh r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #4] ; - STRH_rR(s, REG_WORK1); // strh r3, [r2] - B_i(0); // b - - //: - emit_long(d); - //: -#endif -} - -LOWFUNC(WRITE,RMW,2,compemu_raw_sub_l_mi,(MEMRW d, IMM s)) -{ -#if defined(USE_DATA_BUFFER) - data_check_end(8, 24); - long target = data_long(d, 24); - long offs = get_data_offset(target); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] - - offs = data_long_offs(s); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; s - - SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - - offs = get_data_offset(target); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; d - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 20); // ldr r2, [pc, #32] ; - LDR_rR(REG_WORK2, REG_WORK1); // ldr r3, [r2] - - LDR_rRI(REG_WORK1, RPC_INDEX, 16); // ldr r2, [pc, #28] ; - - SUBS_rrr(REG_WORK2, REG_WORK2, REG_WORK1); // subs r3, r3, r2 - - LDR_rRI(REG_WORK1, RPC_INDEX, 4); // ldr r2, [pc, #16] ; - STR_rR(REG_WORK2, REG_WORK1); // str r3, [r2] - - B_i(1); // b - - //: - emit_long(d); - //: - emit_long(s); - //: -#endif -} - -LOWFUNC(WRITE,NONE,2,compemu_raw_test_l_rr,(RR4 d, RR4 s)) -{ - TST_rr(d, s); // tst r7, r6 -} - -LOWFUNC(NONE,NONE,2,compemu_raw_zero_extend_16_rr,(W4 d, RR2 s)) -{ -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(d, s); // UXTH %[d], %[s] -#else - BIC_rri(d, s, 0xff000000); // bic %[d], %[s], #0xff000000 - BIC_rri(d, d, 0x00ff0000); // bic %[d], %[d], #0x00ff0000 -#endif -} - -static inline void compemu_raw_call(uae_u32 t) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(t); - LDR_rRI(REG_WORK1, RPC_INDEX, offs); // ldr r2, [pc, #offs] ; -#else - LDR_rRI(REG_WORK1, RPC_INDEX, 12); // ldr r2, [pc, #12] ; -#endif - PUSH(RLR_INDEX); // push {lr} - BLX_r(REG_WORK1); // blx r2 - POP(RLR_INDEX); // pop {lr} -#if !defined(USE_DATA_BUFFER) - B_i(0); // b - - //: - emit_long(t); - //: -#endif -} - -#if defined(UAE) -static inline void compemu_raw_call_r(RR4 r) -{ - PUSH(RLR_INDEX); // push {lr} - BLX_r(r); // blx r0 - POP(RLR_INDEX); // pop {lr} -} -#endif - -static inline void compemu_raw_jcc_l_oponly(int cc) -{ - switch (cc) { - case 9: // LS - BEQ_i(0); // beq - BCC_i(2); // bcc - - //: - LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; - BX_r(REG_WORK1); // bx r2 - break; - - case 8: // HI - BEQ_i(3); // beq - BCS_i(2); // bcs - - //: - LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; - BX_r(REG_WORK1); // bx r2 - break; - - default: - CC_LDR_rRI(cc, REG_WORK1, RPC_INDEX, 4); // ldrlt r2, [pc, #4] ; - CC_BX_r(cc, REG_WORK1); // bxlt r2 - B_i(0); // b - break; - } - // emit of target will be done by caller -} - -static inline void compemu_raw_jl(uae_u32 t) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(t); - CC_LDR_rRI(NATIVE_CC_LT, RPC_INDEX, RPC_INDEX, offs); // ldrlt pc, [pc, offs] -#else - CC_LDR_rR(NATIVE_CC_LT, RPC_INDEX, RPC_INDEX); // ldrlt pc, [pc] - B_i(0); // b - - //: - emit_long(t); - //: -#endif -} - -static inline void compemu_raw_jmp(uae_u32 t) -{ - LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] - BX_r(REG_WORK1); // bx r2 - emit_long(t); -} - -static inline void compemu_raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) -{ - int shft; - switch(m) { - case 1: shft=0; break; - case 2: shft=1; break; - case 4: shft=2; break; - case 8: shft=3; break; - default: abort(); - } - - LDR_rR(REG_WORK1, RPC_INDEX); // ldr r2, [pc] ; - LDR_rRR_LSLi(RPC_INDEX, REG_WORK1, r, shft); // ldr pc, [r2, r6, lsl #3] - emit_long(base); -} - -static inline void compemu_raw_jmp_r(RR4 r) -{ - BX_r(r); -} - -static inline void compemu_raw_jnz(uae_u32 t) -{ -#if defined(USE_DATA_BUFFER) - long offs = data_long_offs(t); - CC_LDR_rRI(NATIVE_CC_NE, RPC_INDEX, RPC_INDEX, offs); // ldrne pc, [pc, offs] -#else - CC_LDR_rR(NATIVE_CC_NE, RPC_INDEX, RPC_INDEX); // ldrne pc, [pc] - B_i(0); // b - - emit_long(t); - //: -#endif -} - -static inline void compemu_raw_jz_b_oponly(void) -{ - BNE_i(2); // bne jp - LDRSB_rRI(REG_WORK1, RPC_INDEX, 3); // ldrsb r2,[pc,#3] - ADD_rrr(RPC_INDEX, RPC_INDEX, REG_WORK1); // add pc,pc,r2 - - skip_n_bytes(3); /* additionally 1 byte skipped by generic code */ - - // -} - -static inline void compemu_raw_jnz_b_oponly(void) -{ - BEQ_i(2); // beq jp - LDRSB_rRI(REG_WORK1, RPC_INDEX, 3); // ldrsb r2,[pc,#3] - ADD_rrr(RPC_INDEX, RPC_INDEX, REG_WORK1); // add pc,pc,r2 - - skip_n_bytes(3); /* additionally 1 byte skipped by generic code */ - - // -} - -static inline void compemu_raw_branch(IMM d) -{ - B_i((d >> 2) - 1); -} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_arm.h b/BasiliskII/src/uae_cpu/compiler/codegen_arm.h deleted file mode 100644 index e04ab9b82..000000000 --- a/BasiliskII/src/uae_cpu/compiler/codegen_arm.h +++ /dev/null @@ -1,1292 +0,0 @@ -/* - * compiler/codegen_arm.h - IA-32 and AMD64 code generator - * - * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * JIT compiler m68k -> ARM - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * This file is derived from CCG, copyright 1999-2003 Ian Piumarta - * Adaptation for Basilisk II and improvements, copyright 2000-2004 Gwenole Beauchesne - * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c - * - * 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 ARM_RTASM_H -#define ARM_RTASM_H - -/* NOTES - * - */ - -/* --- Configuration ------------------------------------------------------- */ - -/* CPSR flags */ - -#define ARM_N_FLAG 0x80000000 -#define ARM_Z_FLAG 0x40000000 -#define ARM_C_FLAG 0x20000000 -#define ARM_V_FLAG 0x10000000 -#define ARM_Q_FLAG 0x08000000 -#define ARM_CV_FLAGS (ARM_C_FLAG|ARM_V_FLAG) - -#define ARM_GE3 0x00080000 -#define ARM_GE2 0x00040000 -#define ARM_GE1 0x00020000 -#define ARM_GE0 0x00010000 - -/* --- Macros -------------------------------------------------------------- */ - -/* ========================================================================= */ -/* --- UTILITY ------------------------------------------------------------- */ -/* ========================================================================= */ - -#define _W(c) emit_long(c) -#define _LS2_ADDR(a) (((a) & 0x01f0000f) | (((a) & 0xf0) << 4)) - -/* ========================================================================= */ -/* --- ENCODINGS ----------------------------------------------------------- */ -/* ========================================================================= */ - -#define IMM32(c) (((c) & 0xffffff00) == 0 ? (c) : \ - ((c) & 0x3fffffc0) == 0 ? (0x100 | (((c) >> 30) & 0x3) | ((((c) & 0x0000003f) << 2))) : \ - ((c) & 0x0ffffff0) == 0 ? (0x200 | (((c) >> 28) & 0xf) | ((((c) & 0x0000000f) << 4))) : \ - ((c) & 0x03fffffc) == 0 ? (0x300 | (((c) >> 26) & 0x3f) | ((((c) & 0x00000003) << 6)) ) : \ - ((c) & 0x00ffffff) == 0 ? (0x400 | (((c) >> 24) & 0xff)) : \ - ((c) & 0xc03fffff) == 0 ? (0x500 | ((c) >> 22)) : \ - ((c) & 0xf00fffff) == 0 ? (0x600 | ((c) >> 20)) : \ - ((c) & 0xfc03ffff) == 0 ? (0x700 | ((c) >> 18)) : \ - ((c) & 0xff00ffff) == 0 ? (0x800 | ((c) >> 16)) : \ - ((c) & 0xffc03fff) == 0 ? (0x900 | ((c) >> 14)) : \ - ((c) & 0xfff00fff) == 0 ? (0xa00 | ((c) >> 12)) : \ - ((c) & 0xfffc03ff) == 0 ? (0xb00 | ((c) >> 10)) : \ - ((c) & 0xffff00ff) == 0 ? (0xc00 | ((c) >> 8)) : \ - ((c) & 0xffffc03f) == 0 ? (0xd00 | ((c) >> 6)) : \ - ((c) & 0xfffff00f) == 0 ? (0xe00 | ((c) >> 4)) : \ - ((c) & 0xfffffc03) == 0 ? (0xf00 | ((c) >> 2)) : \ - 0\ - ) - -#define SHIFT_IMM(c) (0x02000000 | (IMM32((c)))) - -#define UNSHIFTED_IMM8(c) (0x02000000 | (c)) -#define SHIFT_IMM8_ROR(c,r) (0x02000000 | (c) | ((r >> 1) << 8)) - -#define SHIFT_REG(Rm) (Rm) -#define SHIFT_LSL_i(Rm,s) ((Rm) | ((s) << 7)) -#define SHIFT_LSL_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x10) -#define SHIFT_LSR_i(Rm,s) ((Rm) | ((s) << 7) | 0x20) -#define SHIFT_LSR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x30) -#define SHIFT_ASR_i(Rm,s) ((Rm) | ((s) << 7) | 0x40) -#define SHIFT_ASR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x50) -#define SHIFT_ROR_i(Rm,s) ((Rm) | ((s) << 7) | 0x60) -#define SHIFT_ROR_r(Rm,Rs) ((Rm) | ((Rs) << 8) | 0x70) -#define SHIFT_RRX(Rm) ((Rm) | 0x60) -#define SHIFT_PK(Rm,s) ((Rm) | ((s) << 7)) - -/* Load/Store addressings */ -#define ADR_ADD(v) ((1 << 23) | (v)) -#define ADR_SUB(v) (v) - -#define ADR_IMM(v) ((v) | (1 << 24)) -#define ADR_IMMPOST(v) (v) -#define ADR_REG(Rm) ((1 << 25) | (1 << 24) | (Rm)) -#define ADR_REGPOST(Rm) ((1 << 25) | (Rm)) - -#define ADD_IMM(i) ADR_ADD(ADR_IMM(i)) -#define SUB_IMM(i) ADR_SUB(ADR_IMM(i)) - -#define ADD_REG(Rm) ADR_ADD(ADR_REG(Rm)) -#define SUB_REG(Rm) ADR_SUB(ADR_REG(Rm)) - -#define ADD_LSL(Rm,i) ADR_ADD(ADR_REG(Rm) | ((i) << 7)) -#define SUB_LSL(Rm,i) ADR_SUB(ADR_REG(Rm) | ((i) << 7)) - -#define ADD_LSR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (1 << 5)) -#define SUB_LSR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (1 << 5)) - -#define ADD_ASR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (2 << 5)) -#define SUB_ASR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (2 << 5)) - -#define ADD_ROR(Rm,i) ADR_ADD(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (3 << 5)) -#define SUB_ROR(Rm,i) ADR_SUB(ADR_REG(Rm) | (((i) & 0x1f) << 7) | (3 << 5)) - -#define ADD_RRX(Rm) ADR_ADD(ADR_REG(Rm) | (3 << 5)) -#define SUB_RRX(Rm) ADR_SUB(ADR_REG(Rm) | (3 << 5)) - -#define ADD2_IMM(i) ADR_ADD(i | (1 << 22)) -#define SUB2_IMM(i) ADR_SUB(i | (1 << 22)) - -#define ADD2_REG(Rm) ADR_ADD(Rm) -#define SUB2_REG(Rm) ADR_SUB(Rm) - -/* MOV, MVN */ -#define _OP1(cc,op,s,Rd,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rd) << 12) | (shift)) - -/* CMP, CMN, TST, TEQ */ -#define _OP2(cc,op,Rn,shift) _W(((cc) << 28) | ((op) << 21) | (1 << 20) | ((Rn) << 16) | (shift)) - -/* ADD, SUB, RSB, ADC, SBC, RSC, AND, BIC, EOR, ORR */ -#define _OP3(cc,op,s,Rd,Rn,shift) _W(((cc) << 28) | ((op) << 21) | ((s) << 20) | ((Rn) << 16) | ((Rd) << 12) | (shift)) - -/* LDR, STR */ -#define _LS1(cc,l,b,Rd,Rn,a) _W(((cc) << 28) | (0x01 << 26) | ((l) << 20) | ((b) << 22) | ((Rn) << 16) | ((Rd) << 12) | (a)) -#define _LS2(cc,p,l,s,h,Rd,Rn,a) _W(((cc) << 28) | ((p) << 24) | ((l) << 20) | ((Rn) << 16) | ((Rd) << 12) | ((s) << 6) | ((h) << 5) | 0x90 | _LS2_ADDR((a))) - -/* ========================================================================= */ -/* --- OPCODES ------------------------------------------------------------- */ -/* ========================================================================= */ - -/* Branch instructions */ -#ifndef __ANDROID__ -enum { - _B, _BL, _BLX, _BX, _BXJ -}; -#endif - -/* Data processing instructions */ -enum { - _AND = 0, - _EOR, - _SUB, - _RSB, - _ADD, - _ADC, - _SBC, - _RSC, - _TST, - _TEQ, - _CMP, - _CMN, - _ORR, - _MOV, - _BIC, - _MVN -}; - -/* Single instruction Multiple Data (SIMD) instructions */ - -/* Multiply instructions */ - -/* Parallel instructions */ - -/* Extend instructions */ - -/* Miscellaneous arithmetic instrations */ - -/* Status register transfer instructions */ - -/* Load and Store instructions */ - -/* Coprocessor instructions */ - -/* Exception generation instructions */ - -/* ========================================================================= */ -/* --- ASSEMBLER ----------------------------------------------------------- */ -/* ========================================================================= */ - -#define NOP() _W(0xe1a00000) -#define SETEND_BE() _W(0xf1010200) -#define SETEND_LE() _W(0xf1010000) - -/* Data processing instructions */ - -/* Opcodes Type 1 */ -/* MOVcc rd,#i */ -#define CC_MOV_ri8(cc,Rd,i) _OP1(cc,_MOV,0,Rd,UNSHIFTED_IMM8(i)) -/* MOVcc Rd,#i ROR #s */ -#define CC_MOV_ri8RORi(cc,Rd,i,s) _OP1(cc,_MOV,0,Rd,SHIFT_IMM8_ROR(i,s)) -#define CC_MOV_ri(cc,Rd,i) _OP1(cc,_MOV,0,Rd,SHIFT_IMM(i)) -#define CC_MOV_rr(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_REG(Rm)) -#define CC_MOV_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_LSL_i(Rm,i)) -#define CC_MOV_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_LSL_r(Rm,Rs)) -#define CC_MOV_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_LSR_i(Rm,i)) -#define CC_MOV_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_LSR_r(Rm,Rs)) -#define CC_MOV_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_ASR_i(Rm,i)) -#define CC_MOV_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_ASR_r(Rm,Rs)) -#define CC_MOV_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MOV,0,Rd,SHIFT_ROR_i(Rm,i)) -#define CC_MOV_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,0,Rd,SHIFT_ROR_r(Rm,Rs)) -#define CC_MOV_rrRRX(cc,Rd,Rm) _OP1(cc,_MOV,0,Rd,SHIFT_RRX(Rm)) - -/* MOV rd,#i */ -#define MOV_ri8(Rd,i) CC_MOV_ri8(NATIVE_CC_AL,Rd,i) -/* MOV Rd,#i ROR #s */ -#define MOV_ri8RORi(Rd,i,s) CC_MOV_ri8RORi(NATIVE_CC_AL,Rd,i,s) -#define MOV_ri(Rd,i) CC_MOV_ri(NATIVE_CC_AL,Rd,i) -#define MOV_rr(Rd,Rm) CC_MOV_rr(NATIVE_CC_AL,Rd,Rm) -#define MOV_rrLSLi(Rd,Rm,i) CC_MOV_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) -#define MOV_rrLSLr(Rd,Rm,Rs) CC_MOV_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOV_rrLSRi(Rd,Rm,i) CC_MOV_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) -#define MOV_rrLSRr(Rd,Rm,Rs) CC_MOV_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOV_rrASRi(Rd,Rm,i) CC_MOV_rrASRi(NATIVE_CC_AL,Rd,Rm,i) -#define MOV_rrASRr(Rd,Rm,Rs) CC_MOV_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOV_rrRORi(Rd,Rm,i) CC_MOV_rrRORi(NATIVE_CC_AL,Rd,Rm,i) -#define MOV_rrRORr(Rd,Rm,Rs) CC_MOV_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOV_rrRRX(Rd,Rm) CC_MOV_rrRRX(NATIVE_CC_AL,Rd,Rm) - -#define CC_MOVS_ri(cc,Rd,i) _OP1(cc,_MOV,1,Rd,SHIFT_IMM(i)) -#define CC_MOVS_rr(cc,Rd,Rm) _OP1(cc,_MOV,1,Rd,SHIFT_REG(Rm)) -#define CC_MOVS_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_LSL_i(Rm,i)) -#define CC_MOVS_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_LSL_r(Rm,Rs)) -#define CC_MOVS_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_LSR_i(Rm,i)) -#define CC_MOVS_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_LSR_r(Rm,Rs)) -#define CC_MOVS_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_ASR_i(Rm,i)) -#define CC_MOVS_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_ASR_r(Rm,Rs)) -#define CC_MOVS_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MOV,1,Rd,SHIFT_ROR_i(Rm,i)) -#define CC_MOVS_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MOV,1,Rd,SHIFT_ROR_r(Rm,Rs)) -#define CC_MOVS_rrRRX(cc,Rd,Rm) _OP1(cc,_MOV,1,Rd,SHIFT_RRX(Rm)) - -#define MOVS_ri(Rd,i) CC_MOVS_ri(NATIVE_CC_AL,Rd,i) -#define MOVS_rr(Rd,Rm) CC_MOVS_rr(NATIVE_CC_AL,Rd,Rm) -#define MOVS_rrLSLi(Rd,Rm,i) CC_MOVS_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) -#define MOVS_rrLSLr(Rd,Rm,Rs) CC_MOVS_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOVS_rrLSRi(Rd,Rm,i) CC_MOVS_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) -#define MOVS_rrLSRr(Rd,Rm,Rs) CC_MOVS_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOVS_rrASRi(Rd,Rm,i) CC_MOVS_rrASRi(NATIVE_CC_AL,Rd,Rm,i) -#define MOVS_rrASRr(Rd,Rm,Rs) CC_MOVS_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOVS_rrRORi(Rd,Rm,i) CC_MOVS_rrRORi(NATIVE_CC_AL,Rd,Rm,i) -#define MOVS_rrRORr(Rd,Rm,Rs) CC_MOVS_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MOVS_rrRRX(Rd,Rm) CC_MOVS_rrRRX(NATIVE_CC_AL,Rd,Rm) - -/* MVNcc rd,#i */ -#define CC_MVN_ri8(cc,Rd,i) _OP1(cc,_MVN,0,Rd,UNSHIFTED_IMM8(i)) -/* MVNcc Rd,#i ROR #s */ -#define CC_MVN_ri8RORi(cc,Rd,i,s) _OP1(cc,_MVN,0,Rd,SHIFT_IMM8_ROR(i,s)) -#define CC_MVN_ri(cc,Rd,i) _OP1(cc,_MVN,0,Rd,SHIFT_IMM(i)) -#define CC_MVN_rr(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_REG(Rm)) -#define CC_MVN_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_LSL_i(Rm,i)) -#define CC_MVN_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_LSL_r(Rm,Rs)) -#define CC_MVN_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_LSR_i(Rm,i)) -#define CC_MVN_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_LSR_r(Rm,Rs)) -#define CC_MVN_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_ASR_i(Rm,i)) -#define CC_MVN_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_ASR_r(Rm,Rs)) -#define CC_MVN_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MVN,0,Rd,SHIFT_ROR_i(Rm,i)) -#define CC_MVN_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,0,Rd,SHIFT_ROR_r(Rm,Rs)) -#define CC_MVN_rrRRX(cc,Rd,Rm) _OP1(cc,_MVN,0,Rd,SHIFT_RRX(Rm)) - -/* MVN rd,#i */ -#define MVN_ri8(Rd,i) CC_MVN_ri8(NATIVE_CC_AL,Rd,i) -/* MVN Rd,#i ROR #s */ -#define MVN_ri8RORi(Rd,i,s) CC_MVN_ri8RORi(NATIVE_CC_AL,Rd,i,s) -#define MVN_ri(Rd,i) CC_MVN_ri(NATIVE_CC_AL,Rd,i) -#define MVN_rr(Rd,Rm) CC_MVN_rr(NATIVE_CC_AL,Rd,Rm) -#define MVN_rrLSLi(Rd,Rm,i) CC_MVN_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) -#define MVN_rrLSLr(Rd,Rm,Rs) CC_MVN_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVN_rrLSRi(Rd,Rm,i) CC_MVN_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) -#define MVN_rrLSRr(Rd,Rm,Rs) CC_MVN_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVN_rrASRi(Rd,Rm,i) CC_MVN_rrASRi(NATIVE_CC_AL,Rd,Rm,i) -#define MVN_rrASRr(Rd,Rm,Rs) CC_MVN_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVN_rrRORi(Rd,Rm,i) CC_MVN_rrRORi(NATIVE_CC_AL,Rd,Rm,i) -#define MVN_rrRORr(Rd,Rm,Rs) CC_MVN_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVN_rrRRX(Rd,Rm) CC_MVN_rrRRX(NATIVE_CC_AL,Rd,Rm) - -#define CC_MVNS_ri(cc,Rd,i) _OP1(cc,_MVN,1,Rd,SHIFT_IMM(i)) -#define CC_MVNS_rr(cc,Rd,Rm) _OP1(cc,_MVN,1,Rd,SHIFT_REG(Rm)) -#define CC_MVNS_rrLSLi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_LSL_i(Rm,i)) -#define CC_MVNS_rrLSLr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_LSL_r(Rm,Rs)) -#define CC_MVNS_rrLSRi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_LSR_i(Rm,i)) -#define CC_MVNS_rrLSRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_LSR_r(Rm,Rs)) -#define CC_MVNS_rrASRi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_ASR_i(Rm,i)) -#define CC_MVNS_rrASRr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_ASR_r(Rm,Rs)) -#define CC_MVNS_rrRORi(cc,Rd,Rm,i) _OP1(cc,_MVN,1,Rd,SHIFT_ROR_i(Rm,i)) -#define CC_MVNS_rrRORr(cc,Rd,Rm,Rs) _OP1(cc,_MVN,1,Rd,SHIFT_ROR_r(Rm,Rs)) -#define CC_MVNS_rrRRX(cc,Rd,Rm) _OP1(cc,_MVN,1,Rd,SHIFT_RRX(Rm)) - -#define MVNS_ri(Rd,i) CC_MVNS_ri(NATIVE_CC_AL,Rd,i) -#define MVNS_rr(Rd,Rm) CC_MVNS_rr(NATIVE_CC_AL,Rd,Rm) -#define MVNS_rrLSLi(Rd,Rm,i) CC_MVNS_rrLSLi(NATIVE_CC_AL,Rd,Rm,i) -#define MVNS_rrLSLr(Rd,Rm,Rs) CC_MVNS_rrLSLr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVNS_rrLSRi(Rd,Rm,i) CC_MVNS_rrLSRi(NATIVE_CC_AL,Rd,Rm,i) -#define MVNS_rrLSRr(Rd,Rm,Rs) CC_MVNS_rrLSRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVNS_rrASRi(Rd,Rm,i) CC_MVNS_rrASRi(NATIVE_CC_AL,Rd,Rm,i) -#define MVNS_rrASRr(Rd,Rm,Rs) CC_MVNS_rrASRr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVNS_rrRORi(Rd,Rm,i) CC_MVNS_rrRORi(NATIVE_CC_AL,Rd,Rm,i) -#define MVNS_rrRORr(Rd,Rm,Rs) CC_MVNS_rrRORr(NATIVE_CC_AL,Rd,Rm,Rs) -#define MVNS_rrRRX(Rd,Rm) CC_MVNS_rrRRX(NATIVE_CC_AL,Rd,Rm) - -/* Opcodes Type 2 */ -#define CC_CMP_ri(cc,Rn,i) _OP2(cc,_CMP,Rn,SHIFT_IMM(i)) -#define CC_CMP_rr(cc,Rn,Rm) _OP2(cc,_CMP,Rn,SHIFT_REG(Rm)) -#define CC_CMP_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_CMP_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_CMP_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_CMP_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_CMP_rrASRi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_CMP_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_CMP_rrRORi(cc,Rn,Rm,i) _OP2(cc,_CMP,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_CMP_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_CMP,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_CMP_rrRRX(cc,Rn,Rm) _OP2(cc,_CMP,Rn,SHIFT_RRX(Rm)) - -#define CMP_ri(Rn,i) CC_CMP_ri(NATIVE_CC_AL,Rn,i) -#define CMP_rr(Rn,Rm) CC_CMP_rr(NATIVE_CC_AL,Rn,Rm) -#define CMP_rrLSLi(Rn,Rm,i) CC_CMP_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) -#define CMP_rrLSLr(Rn,Rm,Rs) CC_CMP_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMP_rrLSRi(Rn,Rm,i) CC_CMP_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) -#define CMP_rrLSRr(Rn,Rm,Rs) CC_CMP_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMP_rrASRi(Rn,Rm,i) CC_CMP_rrASRi(NATIVE_CC_AL,Rn,Rm,i) -#define CMP_rrASRr(Rn,Rm,Rs) CC_CMP_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMP_rrRORi(Rn,Rm,i) CC_CMP_rrRORi(NATIVE_CC_AL,Rn,Rm,i) -#define CMP_rrRORr(Rn,Rm,Rs) CC_CMP_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMP_rrRRX(Rn,Rm) CC_CMP_rrRRX(NATIVE_CC_AL,Rn,Rm) - -#define CC_CMN_ri(cc,Rn,i) _OP2(cc,_CMN,Rn,SHIFT_IMM(i)) -#define CC_CMN_rr(cc,Rn,r) _OP2(cc,_CMN,Rn,SHIFT_REG(r)) -#define CC_CMN_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_CMN_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_CMN_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_CMN_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_CMN_rrASRi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_CMN_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_CMN_rrRORi(cc,Rn,Rm,i) _OP2(cc,_CMN,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_CMN_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_CMN,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_CMN_rrRRX(cc,Rn,Rm) _OP2(cc,_CMN,Rn,SHIFT_RRX(Rm)) - -#define CMN_ri(Rn,i) CC_CMN_ri(NATIVE_CC_AL,Rn,i) -#define CMN_rr(Rn,r) CC_CMN_rr(NATIVE_CC_AL,Rn,r) -#define CMN_rrLSLi(Rn,Rm,i) CC_CMN_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) -#define CMN_rrLSLr(Rn,Rm,Rs) CC_CMN_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMN_rrLSRi(Rn,Rm,i) CC_CMN_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) -#define CMN_rrLSRr(Rn,Rm,Rs) CC_CMN_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMN_rrASRi(Rn,Rm,i) CC_CMN_rrASRi(NATIVE_CC_AL,Rn,Rm,i) -#define CMN_rrASRr(Rn,Rm,Rs) CC_CMN_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMN_rrRORi(Rn,Rm,i) CC_CMN_rrRORi(NATIVE_CC_AL,Rn,Rm,i) -#define CMN_rrRORr(Rn,Rm,Rs) CC_CMN_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) -#define CMN_rrRRX(Rn,Rm) CC_CMN_rrRRX(NATIVE_CC_AL,Rn,Rm) - -#define CC_TST_ri(cc,Rn,i) _OP2(cc,_TST,Rn,SHIFT_IMM(i)) -#define CC_TST_rr(cc,Rn,r) _OP2(cc,_TST,Rn,SHIFT_REG(r)) -#define CC_TST_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_TST_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_TST_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_TST_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_TST_rrASRi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_TST_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_TST_rrRORi(cc,Rn,Rm,i) _OP2(cc,_TST,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_TST_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_TST,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_TST_rrRRX(cc,Rn,Rm) _OP2(cc,_TST,Rn,SHIFT_RRX(Rm)) - -#define TST_ri(Rn,i) CC_TST_ri(NATIVE_CC_AL,Rn,i) -#define TST_rr(Rn,r) CC_TST_rr(NATIVE_CC_AL,Rn,r) -#define TST_rrLSLi(Rn,Rm,i) CC_TST_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) -#define TST_rrLSLr(Rn,Rm,Rs) CC_TST_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TST_rrLSRi(Rn,Rm,i) CC_TST_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) -#define TST_rrLSRr(Rn,Rm,Rs) CC_TST_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TST_rrASRi(Rn,Rm,i) CC_TST_rrASRi(NATIVE_CC_AL,Rn,Rm,i) -#define TST_rrASRr(Rn,Rm,Rs) CC_TST_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TST_rrRORi(Rn,Rm,i) CC_TST_rrRORi(NATIVE_CC_AL,Rn,Rm,i) -#define TST_rrRORr(Rn,Rm,Rs) CC_TST_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TST_rrRRX(Rn,Rm) CC_TST_rrRRX(NATIVE_CC_AL,Rn,Rm) - -#define CC_TEQ_ri(cc,Rn,i) _OP2(cc,_TEQ,Rn,SHIFT_IMM(i)) -#define CC_TEQ_rr(cc,Rn,r) _OP2(cc,_TEQ,Rn,SHIFT_REG(r)) -#define CC_TEQ_rrLSLi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_TEQ_rrLSLr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_TEQ_rrLSRi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_TEQ_rrLSRr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_TEQ_rrASRi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_TEQ_rrASRr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_TEQ_rrRORi(cc,Rn,Rm,i) _OP2(cc,_TEQ,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_TEQ_rrRORr(cc,Rn,Rm,Rs) _OP2(cc,_TEQ,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_TEQ_rrRRX(cc,Rn,Rm) _OP2(cc,_TEQ,Rn,SHIFT_RRX(Rm)) - -#define TEQ_ri(Rn,i) CC_TEQ_ri(NATIVE_CC_AL,Rn,i) -#define TEQ_rr(Rn,r) CC_TEQ_rr(NATIVE_CC_AL,Rn,r) -#define TEQ_rrLSLi(Rn,Rm,i) CC_TEQ_rrLSLi(NATIVE_CC_AL,Rn,Rm,i) -#define TEQ_rrLSLr(Rn,Rm,Rs) CC_TEQ_rrLSLr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TEQ_rrLSRi(Rn,Rm,i) CC_TEQ_rrLSRi(NATIVE_CC_AL,Rn,Rm,i) -#define TEQ_rrLSRr(Rn,Rm,Rs) CC_TEQ_rrLSRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TEQ_rrASRi(Rn,Rm,i) CC_TEQ_rrASRi(NATIVE_CC_AL,Rn,Rm,i) -#define TEQ_rrASRr(Rn,Rm,Rs) CC_TEQ_rrASRr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TEQ_rrRORi(Rn,Rm,i) CC_TEQ_rrRORi(NATIVE_CC_AL,Rn,Rm,i) -#define TEQ_rrRORr(Rn,Rm,Rs) CC_TEQ_rrRORr(NATIVE_CC_AL,Rn,Rm,Rs) -#define TEQ_rrRRX(Rn,Rm) CC_TEQ_rrRRX(NATIVE_CC_AL,Rn,Rm) - -/* Opcodes Type 3 */ -#define CC_AND_rri(cc,Rd,Rn,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_AND_rrr(cc,Rd,Rn,Rm) _OP3(cc,_AND,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_AND_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_AND_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_AND_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_AND_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_AND_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_AND_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_AND_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_AND_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_AND_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_AND,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define AND_rri(Rd,Rn,i) CC_AND_rri(NATIVE_CC_AL,Rd,Rn,i) -#define AND_rrr(Rd,Rn,Rm) CC_AND_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define AND_rrrLSLi(Rd,Rn,Rm,i) CC_AND_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define AND_rrrLSLr(Rd,Rn,Rm,Rs) CC_AND_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define AND_rrrLSRi(Rd,Rn,Rm,i) CC_AND_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define AND_rrrLSRr(Rd,Rn,Rm,Rs) CC_AND_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define AND_rrrASRi(Rd,Rn,Rm,i) CC_AND_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define AND_rrrASRr(Rd,Rn,Rm,Rs) CC_AND_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define AND_rrrRORi(Rd,Rn,Rm,i) CC_AND_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define AND_rrrRORr(Rd,Rn,Rm,Rs) CC_AND_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define AND_rrrRRX(Rd,Rn,Rm) CC_AND_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ANDS_rri(cc,Rd,Rn,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_ANDS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_AND,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ANDS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ANDS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ANDS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ANDS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ANDS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ANDS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ANDS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ANDS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_AND,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ANDS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_AND,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define ANDS_rri(Rd,Rn,i) CC_ANDS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ANDS_rrr(Rd,Rn,Rm) CC_ANDS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ANDS_rrrLSLi(Rd,Rn,Rm,i) CC_ANDS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ANDS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ANDS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ANDS_rrrLSRi(Rd,Rn,Rm,i) CC_ANDS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ANDS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ANDS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ANDS_rrrASRi(Rd,Rn,Rm,i) CC_ANDS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ANDS_rrrASRr(Rd,Rn,Rm,Rs) CC_ANDS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ANDS_rrrRORi(Rd,Rn,Rm,i) CC_ANDS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ANDS_rrrRORr(Rd,Rn,Rm,Rs) CC_ANDS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ANDS_rrrRRX(Rd,Rn,Rm) CC_ANDS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_EOR_rri(cc,Rd,Rn,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_EOR_rrr(cc,Rd,Rn,Rm) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_EOR_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_EOR_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_EOR_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_EOR_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_EOR_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_EOR_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_EOR_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_EOR_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_EOR_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_EOR,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define EOR_rri(Rd,Rn,i) CC_EOR_rri(NATIVE_CC_AL,Rd,Rn,i) -#define EOR_rrr(Rd,Rn,Rm) CC_EOR_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define EOR_rrrLSLi(Rd,Rn,Rm,i) CC_EOR_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EOR_rrrLSLr(Rd,Rn,Rm,Rs) CC_EOR_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EOR_rrrLSRi(Rd,Rn,Rm,i) CC_EOR_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EOR_rrrLSRr(Rd,Rn,Rm,Rs) CC_EOR_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EOR_rrrASRi(Rd,Rn,Rm,i) CC_EOR_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EOR_rrrASRr(Rd,Rn,Rm,Rs) CC_EOR_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EOR_rrrRORi(Rd,Rn,Rm,i) CC_EOR_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EOR_rrrRORr(Rd,Rn,Rm,Rs) CC_EOR_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EOR_rrrRRX(Rd,Rn,Rm) CC_EOR_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_EORS_rri(cc,Rd,Rn,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_EORS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_EORS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_EORS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_EORS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_EORS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_EORS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_EORS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_EORS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_EORS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_EORS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_EOR,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define EORS_rri(Rd,Rn,i) CC_EORS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define EORS_rrr(Rd,Rn,Rm) CC_EORS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define EORS_rrrLSLi(Rd,Rn,Rm,i) CC_EORS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EORS_rrrLSLr(Rd,Rn,Rm,Rs) CC_EORS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EORS_rrrLSRi(Rd,Rn,Rm,i) CC_EORS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EORS_rrrLSRr(Rd,Rn,Rm,Rs) CC_EORS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EORS_rrrASRi(Rd,Rn,Rm,i) CC_EORS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EORS_rrrASRr(Rd,Rn,Rm,Rs) CC_EORS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EORS_rrrRORi(Rd,Rn,Rm,i) CC_EORS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define EORS_rrrRORr(Rd,Rn,Rm,Rs) CC_EORS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define EORS_rrrRRX(Rd,Rn,Rm) CC_EORS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_SUB_rri(cc,Rd,Rn,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_SUB_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_SUB_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_SUB_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_SUB_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_SUB_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_SUB_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_SUB_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_SUB_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_SUB_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_SUB_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SUB,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define SUB_rri(Rd,Rn,i) CC_SUB_rri(NATIVE_CC_AL,Rd,Rn,i) -#define SUB_rrr(Rd,Rn,Rm) CC_SUB_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define SUB_rrrLSLi(Rd,Rn,Rm,i) CC_SUB_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUB_rrrLSLr(Rd,Rn,Rm,Rs) CC_SUB_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUB_rrrLSRi(Rd,Rn,Rm,i) CC_SUB_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUB_rrrLSRr(Rd,Rn,Rm,Rs) CC_SUB_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUB_rrrASRi(Rd,Rn,Rm,i) CC_SUB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUB_rrrASRr(Rd,Rn,Rm,Rs) CC_SUB_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUB_rrrRORi(Rd,Rn,Rm,i) CC_SUB_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUB_rrrRORr(Rd,Rn,Rm,Rs) CC_SUB_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUB_rrrRRX(Rd,Rn,Rm) CC_SUB_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_SUBS_rri(cc,Rd,Rn,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_SUBS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_SUBS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_SUBS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_SUBS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_SUBS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_SUBS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_SUBS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_SUBS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_SUBS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_SUBS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SUB,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define SUBS_rri(Rd,Rn,i) CC_SUBS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define SUBS_rrr(Rd,Rn,Rm) CC_SUBS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define SUBS_rrrLSLi(Rd,Rn,Rm,i) CC_SUBS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUBS_rrrLSLr(Rd,Rn,Rm,Rs) CC_SUBS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUBS_rrrLSRi(Rd,Rn,Rm,i) CC_SUBS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUBS_rrrLSRr(Rd,Rn,Rm,Rs) CC_SUBS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUBS_rrrASRi(Rd,Rn,Rm,i) CC_SUBS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUBS_rrrASRr(Rd,Rn,Rm,Rs) CC_SUBS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUBS_rrrRORi(Rd,Rn,Rm,i) CC_SUBS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SUBS_rrrRORr(Rd,Rn,Rm,Rs) CC_SUBS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SUBS_rrrRRX(Rd,Rn,Rm) CC_SUBS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_RSB_rri(cc,Rd,Rn,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_RSB_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_RSB_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_RSB_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_RSB_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_RSB_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_RSB_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_RSB_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_RSB_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_RSB_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_RSB_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSB,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define RSB_rri(Rd,Rn,i) CC_RSB_rri(NATIVE_CC_AL,Rd,Rn,i) -#define RSB_rrr(Rd,Rn,Rm) CC_RSB_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define RSB_rrrLSLi(Rd,Rn,Rm,i) CC_RSB_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSB_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSB_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSB_rrrLSRi(Rd,Rn,Rm,i) CC_RSB_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSB_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSB_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSB_rrrASRi(Rd,Rn,Rm,i) CC_RSB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSB_rrrASRr(Rd,Rn,Rm,Rs) CC_RSB_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSB_rrrRORi(Rd,Rn,Rm,i) CC_RSB_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSB_rrrRORr(Rd,Rn,Rm,Rs) CC_RSB_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSB_rrrRRX(Rd,Rn,Rm) CC_RSB_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_RSBS_rri(cc,Rd,Rn,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_RSBS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_RSBS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_RSBS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_RSBS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_RSBS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_RSBS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_RSBS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_RSBS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_RSBS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_RSBS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSB,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define RSBS_rri(Rd,Rn,i) CC_RSBS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define RSBS_rrr(Rd,Rn,Rm) CC_RSBS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define RSBS_rrrLSLi(Rd,Rn,Rm,i) CC_RSBS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSBS_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSBS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSBS_rrrLSRi(Rd,Rn,Rm,i) CC_RSBS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSBS_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSBS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSBS_rrrASRi(Rd,Rn,Rm,i) CC_RSBS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSBS_rrrASRr(Rd,Rn,Rm,Rs) CC_RSBS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSBS_rrrRORi(Rd,Rn,Rm,i) CC_RSBS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSBS_rrrRORr(Rd,Rn,Rm,Rs) CC_RSBS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSBS_rrrRRX(Rd,Rn,Rm) CC_RSBS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ADD_rri8(cc,Rd,Rn,i) _OP3(cc,_ADD,0,Rd,Rn,UNSHIFT_IMM8(i)) -#define CC_ADD_rri8RORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_IMM8_ROR(Rm,i)) - -#define CC_ADD_rri(cc,Rd,Rn,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_ADD_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ADD_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ADD_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ADD_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ADD_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ADD_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ADD_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ADD_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ADD_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ADD_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADD,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define ADD_rri8(cc,Rd,Rn,i) CC_ADD_rri8(NATIVE_CC_AL,Rd,Rn,i) -#define ADD_rri8RORi(cc,Rd,Rn,Rm,i) CC_ADD_rri8RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) - -#define ADD_rri(Rd,Rn,i) CC_ADD_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ADD_rrr(Rd,Rn,Rm) CC_ADD_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ADD_rrrLSLi(Rd,Rn,Rm,i) CC_ADD_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADD_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADD_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADD_rrrLSRi(Rd,Rn,Rm,i) CC_ADD_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADD_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADD_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADD_rrrASRi(Rd,Rn,Rm,i) CC_ADD_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADD_rrrASRr(Rd,Rn,Rm,Rs) CC_ADD_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADD_rrrRORi(Rd,Rn,Rm,i) CC_ADD_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADD_rrrRORr(Rd,Rn,Rm,Rs) CC_ADD_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADD_rrrRRX(Rd,Rn,Rm) CC_ADD_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ADDS_rri(cc,Rd,Rn,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_ADDS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ADDS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ADDS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ADDS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ADDS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ADDS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ADDS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ADDS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ADDS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ADDS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADD,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define ADDS_rri(Rd,Rn,i) CC_ADDS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ADDS_rrr(Rd,Rn,Rm) CC_ADDS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ADDS_rrrLSLi(Rd,Rn,Rm,i) CC_ADDS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADDS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADDS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADDS_rrrLSRi(Rd,Rn,Rm,i) CC_ADDS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADDS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADDS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADDS_rrrASRi(Rd,Rn,Rm,i) CC_ADDS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADDS_rrrASRr(Rd,Rn,Rm,Rs) CC_ADDS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADDS_rrrRORi(Rd,Rn,Rm,i) CC_ADDS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADDS_rrrRORr(Rd,Rn,Rm,Rs) CC_ADDS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADDS_rrrRRX(Rd,Rn,Rm) CC_ADDS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ADC_rri(cc,Rd,Rn,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_ADC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ADC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ADC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ADC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ADC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ADC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ADC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ADC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ADC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ADC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADC,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define ADC_rri(Rd,Rn,i) CC_ADC_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ADC_rrr(Rd,Rn,Rm) CC_ADC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ADC_rrrLSLi(Rd,Rn,Rm,i) CC_ADC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADC_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADC_rrrLSRi(Rd,Rn,Rm,i) CC_ADC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADC_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADC_rrrASRi(Rd,Rn,Rm,i) CC_ADC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADC_rrrASRr(Rd,Rn,Rm,Rs) CC_ADC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADC_rrrRORi(Rd,Rn,Rm,i) CC_ADC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADC_rrrRORr(Rd,Rn,Rm,Rs) CC_ADC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADC_rrrRRX(Rd,Rn,Rm) CC_ADC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ADCS_rri(cc,Rd,Rn,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_ADCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ADCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ADCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ADCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ADCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ADCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ADCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ADCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ADCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ADCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ADC,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define ADCS_rri(Rd,Rn,i) CC_ADCS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ADCS_rrr(Rd,Rn,Rm) CC_ADCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ADCS_rrrLSLi(Rd,Rn,Rm,i) CC_ADCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ADCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADCS_rrrLSRi(Rd,Rn,Rm,i) CC_ADCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ADCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADCS_rrrASRi(Rd,Rn,Rm,i) CC_ADCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADCS_rrrASRr(Rd,Rn,Rm,Rs) CC_ADCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADCS_rrrRORi(Rd,Rn,Rm,i) CC_ADCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ADCS_rrrRORr(Rd,Rn,Rm,Rs) CC_ADCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ADCS_rrrRRX(Rd,Rn,Rm) CC_ADCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_SBC_rri(cc,Rd,Rn,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_SBC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_SBC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_SBC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_SBC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_SBC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_SBC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_SBC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_SBC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_SBC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_SBC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SBC,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define SBC_rri(Rd,Rn,i) CC_SBC_rri(NATIVE_CC_AL,Rd,Rn,i) -#define SBC_rrr(Rd,Rn,Rm) CC_SBC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define SBC_rrrLSLi(Rd,Rn,Rm,i) CC_SBC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBC_rrrLSLr(Rd,Rn,Rm,Rs) CC_SBC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBC_rrrLSRi(Rd,Rn,Rm,i) CC_SBC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBC_rrrLSRr(Rd,Rn,Rm,Rs) CC_SBC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBC_rrrASRi(Rd,Rn,Rm,i) CC_SBC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBC_rrrASRr(Rd,Rn,Rm,Rs) CC_SBC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBC_rrrRORi(Rd,Rn,Rm,i) CC_SBC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBC_rrrRORr(Rd,Rn,Rm,Rs) CC_SBC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBC_rrrRRX(Rd,Rn,Rm) CC_SBC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_SBCS_rri(cc,Rd,Rn,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_SBCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_SBCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_SBCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_SBCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_SBCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_SBCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_SBCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_SBCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_SBCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_SBCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_SBC,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define SBCS_rri(Rd,Rn,i) CC_SBCS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define SBCS_rrr(Rd,Rn,Rm) CC_SBCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define SBCS_rrrLSLi(Rd,Rn,Rm,i) CC_SBCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_SBCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBCS_rrrLSRi(Rd,Rn,Rm,i) CC_SBCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_SBCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBCS_rrrASRi(Rd,Rn,Rm,i) CC_SBCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBCS_rrrASRr(Rd,Rn,Rm,Rs) CC_SBCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBCS_rrrRORi(Rd,Rn,Rm,i) CC_SBCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define SBCS_rrrRORr(Rd,Rn,Rm,Rs) CC_SBCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define SBCS_rrrRRX(Rd,Rn,Rm) CC_SBCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_RSC_rri(cc,Rd,Rn,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_RSC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_RSC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_RSC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_RSC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_RSC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_RSC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_RSC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_RSC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_RSC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_RSC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSC,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define RSC_rri(Rd,Rn,i) CC_RSC_rri(NATIVE_CC_AL,Rd,Rn,i) -#define RSC_rrr(Rd,Rn,Rm) CC_RSC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define RSC_rrrLSLi(Rd,Rn,Rm,i) CC_RSC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSC_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSC_rrrLSRi(Rd,Rn,Rm,i) CC_RSC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSC_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSC_rrrASRi(Rd,Rn,Rm,i) CC_RSC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSC_rrrASRr(Rd,Rn,Rm,Rs) CC_RSC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSC_rrrRORi(Rd,Rn,Rm,i) CC_RSC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSC_rrrRORr(Rd,Rn,Rm,Rs) CC_RSC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSC_rrrRRX(Rd,Rn,Rm) CC_RSC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_RSCS_rri(cc,Rd,Rn,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_RSCS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_RSCS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_RSCS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_RSCS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_RSCS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_RSCS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_RSCS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_RSCS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_RSCS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_RSCS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_RSC,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define RSCS_rri(Rd,Rn,i) CC_RSCS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define RSCS_rrr(Rd,Rn,Rm) CC_RSCS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define RSCS_rrrLSLi(Rd,Rn,Rm,i) CC_RSCS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSCS_rrrLSLr(Rd,Rn,Rm,Rs) CC_RSCS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSCS_rrrLSRi(Rd,Rn,Rm,i) CC_RSCS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSCS_rrrLSRr(Rd,Rn,Rm,Rs) CC_RSCS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSCS_rrrASRi(Rd,Rn,Rm,i) CC_RSCS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSCS_rrrASRr(Rd,Rn,Rm,Rs) CC_RSCS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSCS_rrrRORi(Rd,Rn,Rm,i) CC_RSCS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define RSCS_rrrRORr(Rd,Rn,Rm,Rs) CC_RSCS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define RSCS_rrrRRX(Rd,Rn,Rm) CC_RSCS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -/* ORRcc Rd,Rn,#i */ -#define CC_ORR_rri8(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,UNSHIFTED_IMM8(i)) -/* ORRcc Rd,Rn,#i ROR #s */ -#define CC_ORR_rri8RORi(cc,Rd,Rn,i,s) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM8_ROR(i,s)) - -#define CC_ORR_rri(cc,Rd,Rn,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_ORR_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ORR_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ORR_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ORR_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ORR_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ORR_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ORR_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ORR_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ORR_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ORR_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ORR,0,Rd,Rn,SHIFT_RRX(Rm)) - -/* ORR Rd,Rn,#i */ -#define ORR_rri8(Rd,Rn,i) CC_ORR_rri8(NATIVE_CC_AL,Rd,Rn,i) -/* ORR Rd,Rn,#i ROR #s */ -#define ORR_rri8RORi(Rd,Rn,i,s) CC_ORR_rri8RORi(NATIVE_CC_AL,Rd,Rn,i,s) - -#define ORR_rri(Rd,Rn,i) CC_ORR_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ORR_rrr(Rd,Rn,Rm) CC_ORR_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ORR_rrrLSLi(Rd,Rn,Rm,i) CC_ORR_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORR_rrrLSLr(Rd,Rn,Rm,Rs) CC_ORR_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORR_rrrLSRi(Rd,Rn,Rm,i) CC_ORR_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORR_rrrLSRr(Rd,Rn,Rm,Rs) CC_ORR_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORR_rrrASRi(Rd,Rn,Rm,i) CC_ORR_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORR_rrrASRr(Rd,Rn,Rm,Rs) CC_ORR_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORR_rrrRORi(Rd,Rn,Rm,i) CC_ORR_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORR_rrrRORr(Rd,Rn,Rm,Rs) CC_ORR_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORR_rrrRRX(Rd,Rn,Rm) CC_ORR_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_ORRS_rri(cc,Rd,Rn,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_ORRS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_ORRS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_ORRS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_ORRS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_ORRS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_ORRS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_ORRS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_ORRS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_ORRS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_ORRS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_ORR,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define ORRS_rri(Rd,Rn,i) CC_ORRS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define ORRS_rrr(Rd,Rn,Rm) CC_ORRS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define ORRS_rrrLSLi(Rd,Rn,Rm,i) CC_ORRS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORRS_rrrLSLr(Rd,Rn,Rm,Rs) CC_ORRS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORRS_rrrLSRi(Rd,Rn,Rm,i) CC_ORRS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORRS_rrrLSRr(Rd,Rn,Rm,Rs) CC_ORRS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORRS_rrrASRi(Rd,Rn,Rm,i) CC_ORRS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORRS_rrrASRr(Rd,Rn,Rm,Rs) CC_ORRS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORRS_rrrRORi(Rd,Rn,Rm,i) CC_ORRS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define ORRS_rrrRORr(Rd,Rn,Rm,Rs) CC_ORRS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define ORRS_rrrRRX(Rd,Rn,Rm) CC_ORRS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_BIC_rri(cc,Rd,Rn,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_IMM(i)) -#define CC_BIC_rrr(cc,Rd,Rn,Rm) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_REG(Rm)) -#define CC_BIC_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_BIC_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_BIC_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_BIC_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_BIC_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_BIC_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_BIC_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_BIC_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_BIC_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_BIC,0,Rd,Rn,SHIFT_RRX(Rm)) - -#define BIC_rri(Rd,Rn,i) CC_BIC_rri(NATIVE_CC_AL,Rd,Rn,i) -#define BIC_rrr(Rd,Rn,Rm) CC_BIC_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define BIC_rrrLSLi(Rd,Rn,Rm,i) CC_BIC_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BIC_rrrLSLr(Rd,Rn,Rm,Rs) CC_BIC_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BIC_rrrLSRi(Rd,Rn,Rm,i) CC_BIC_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BIC_rrrLSRr(Rd,Rn,Rm,Rs) CC_BIC_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BIC_rrrASRi(Rd,Rn,Rm,i) CC_BIC_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BIC_rrrASRr(Rd,Rn,Rm,Rs) CC_BIC_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BIC_rrrRORi(Rd,Rn,Rm,i) CC_BIC_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BIC_rrrRORr(Rd,Rn,Rm,Rs) CC_BIC_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BIC_rrrRRX(Rd,Rn,Rm) CC_BIC_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_BICS_rri(cc,Rd,Rn,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_IMM(i)) -#define CC_BICS_rrr(cc,Rd,Rn,Rm) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_REG(Rm)) -#define CC_BICS_rrrLSLi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSL_i(Rm,i)) -#define CC_BICS_rrrLSLr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSL_r(Rm,Rs)) -#define CC_BICS_rrrLSRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSR_i(Rm,i)) -#define CC_BICS_rrrLSRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_LSR_r(Rm,Rs)) -#define CC_BICS_rrrASRi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ASR_i(Rm,i)) -#define CC_BICS_rrrASRr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ASR_r(Rm,Rs)) -#define CC_BICS_rrrRORi(cc,Rd,Rn,Rm,i) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ROR_i(Rm,i)) -#define CC_BICS_rrrRORr(cc,Rd,Rn,Rm,Rs) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_ROR_r(Rm,Rs)) -#define CC_BICS_rrrRRX(cc,Rd,Rn,Rm) _OP3(cc,_BIC,1,Rd,Rn,SHIFT_RRX(Rm)) - -#define BICS_rri(Rd,Rn,i) CC_BICS_rri(NATIVE_CC_AL,Rd,Rn,i) -#define BICS_rrr(Rd,Rn,Rm) CC_BICS_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define BICS_rrrLSLi(Rd,Rn,Rm,i) CC_BICS_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BICS_rrrLSLr(Rd,Rn,Rm,Rs) CC_BICS_rrrLSLr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BICS_rrrLSRi(Rd,Rn,Rm,i) CC_BICS_rrrLSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BICS_rrrLSRr(Rd,Rn,Rm,Rs) CC_BICS_rrrLSRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BICS_rrrASRi(Rd,Rn,Rm,i) CC_BICS_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BICS_rrrASRr(Rd,Rn,Rm,Rs) CC_BICS_rrrASRr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BICS_rrrRORi(Rd,Rn,Rm,i) CC_BICS_rrrRORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define BICS_rrrRORr(Rd,Rn,Rm,Rs) CC_BICS_rrrRORr(NATIVE_CC_AL,Rd,Rn,Rm,Rs) -#define BICS_rrrRRX(Rd,Rn,Rm) CC_BICS_rrrRRX(NATIVE_CC_AL,Rd,Rn,Rm) - -/* Branch instructions */ -#define CC_B_i(cc,i) _W(((cc) << 28) | (10 << 24) | (i)) -#define CC_BL_i(cc,i) _W(((cc) << 28) | (11 << 24) | (i)) -#define CC_BLX_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (3 << 4) | (0xfff << 8) | (r)) -#define CC_BX_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (1 << 4) | (0xfff << 8) | (r)) -#define CC_BXJ_r(cc,r) _W(((cc) << 28) | (0x12 << 20) | (2 << 4) | (0xfff << 8) | (r)) - -#define BEQ_i(i) CC_B_i(NATIVE_CC_EQ,i) -#define BNE_i(i) CC_B_i(NATIVE_CC_NE,i) -#define BCS_i(i) CC_B_i(NATIVE_CC_CS,i) -#define BCC_i(i) CC_B_i(NATIVE_CC_CC,i) -#define BMI_i(i) CC_B_i(NATIVE_CC_MI,i) -#define BPL_i(i) CC_B_i(NATIVE_CC_PL,i) -#define BVS_i(i) CC_B_i(NATIVE_CC_VS,i) -#define BVC_i(i) CC_B_i(NATIVE_CC_VC,i) -#define BHI_i(i) CC_B_i(NATIVE_CC_HI,i) -#define BLS_i(i) CC_B_i(NATIVE_CC_LS,i) -#define BGE_i(i) CC_B_i(NATIVE_CC_GE,i) -#define BLT_i(i) CC_B_i(NATIVE_CC_LT,i) -#define BGT_i(i) CC_B_i(NATIVE_CC_GT,i) -#define BLE_i(i) CC_B_i(NATIVE_CC_LE,i) -#define B_i(i) CC_B_i(NATIVE_CC_AL,i) - -#define BL_i(i) CC_BL_i(NATIVE_CC_AL,i) -#define BLX_i(i) _W((NATIVE_CC_AL << 28) | (10 << 24) | (i)) -#define BLX_r(r) CC_BLX_r(NATIVE_CC_AL,r) -#define BX_r(r) CC_BX_r(NATIVE_CC_AL,r) -#define BXJ_r(r) CC_BXJ_r(NATIVE_CC_AL,r) - -/* Status register instructions */ -#define CC_MRS_CPSR(cc,Rd) _W(((cc) << 28) | (0x10 << 20) | ((Rd) << 12) | (0xf << 16)) -#define MRS_CPSR(Rd) CC_MRS_CPSR(NATIVE_CC_AL,Rd) -#define CC_MRS_SPSR(cc,Rd) _W(((cc) << 28) | (0x14 << 20) | ((Rd) << 12) | (0xf << 16)) -#define MRS_SPSR(Rd) CC_MRS_SPSR(NATIVE_CC_AL,Rd) - -#define CC_MSR_CPSR_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x9 << 16) | (0xf << 12) | SHIFT_IMM(i)) -#define CC_MSR_CPSR_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x9 << 16) | (0xf << 12) | (Rm)) - -#define MSR_CPSR_i(i) CC_MSR_CPSR_i(NATIVE_CC_AL,(i)) -#define MSR_CPSR_r(Rm) CC_MSR_CPSR_r(NATIVE_CC_AL,(Rm)) - -#define CC_MSR_CPSRf_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x8 << 16) | (0xf << 12) | SHIFT_IMM(i)) -#define CC_MSR_CPSRf_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x8 << 16) | (0xf << 12) | (Rm)) - -#define MSR_CPSRf_i(i) CC_MSR_CPSRf_i(NATIVE_CC_AL,(i)) -#define MSR_CPSRf_r(Rm) CC_MSR_CPSRf_r(NATIVE_CC_AL,(Rm)) - -#define CC_MSR_CPSRc_i(cc,i) _W(((cc) << 28) | (0x32 << 20) | (0x1 << 16) | (0xf << 12) | SHIFT_IMM(i)) -#define CC_MSR_CPSRc_r(cc,Rm) _W(((cc) << 28) | (0x12 << 20) | (0x1 << 16) | (0xf << 12) | (Rm)) - -#define MSR_CPSRc_i(i) CC_MSR_CPSRc_i(NATIVE_CC_AL,(i)) -#define MSR_CPSRc_r(Rm) CC_MSR_CPSRc_r(NATIVE_CC_AL,(Rm)) - -/* Load Store instructions */ - -#define CC_PUSH(cc,r) _W(((cc) << 28) | (0x92d << 16) | (1 << (r))) -#define PUSH(r) CC_PUSH(NATIVE_CC_AL, r) - -#define CC_PUSH_REGS(cc,r) _W(((cc) << 28) | (0x92d << 16) | (r)) -#define PUSH_REGS(r) CC_PUSH_REGS(NATIVE_CC_AL, r) - -#define CC_POP(cc,r) _W(((cc) << 28) | (0x8bd << 16) | (1 << (r))) -#define POP(r) CC_POP(NATIVE_CC_AL, r) - -#define CC_POP_REGS(cc,r) _W(((cc) << 28) | (0x8bd << 16) | (r)) -#define POP_REGS(r) CC_POP_REGS(NATIVE_CC_AL, r) - -#define CC_LDR_rR(cc,Rd,Rn) _LS1(cc,1,0,Rd,Rn,ADD_IMM(0)) -#define CC_LDR_rRI(cc,Rd,Rn,i) _LS1(cc,1,0,Rd,Rn,(i) >= 0 ? ADD_IMM(i) : SUB_IMM(-(i))) -#define CC_LDR_rRi(cc,Rd,Rn,i) _LS1(cc,1,0,Rd,Rn,SUB_IMM(i)) -#define CC_LDR_rRR(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,ADD_REG(Rm)) -#define CC_LDR_rRr(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,SUB_REG(Rm)) -#define CC_LDR_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_LSL(Rm,i)) -#define CC_LDR_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_LSL(Rm,i)) -#define CC_LDR_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_LSR(Rm,i)) -#define CC_LDR_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_LSR(Rm,i)) -#define CC_LDR_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_ASR(Rm,i)) -#define CC_LDR_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_ASR(Rm,i)) -#define CC_LDR_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,ADD_ROR(Rm,i)) -#define CC_LDR_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,0,Rd,Rn,SUB_ROR(Rm,i)) -#define CC_LDR_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,ADD_RRX(Rm)) -#define CC_LDR_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,0,Rd,Rn,SUB_RRX(Rm)) - -#define LDR_rR(Rd,Rn) CC_LDR_rR(NATIVE_CC_AL,Rd,Rn) -#define LDR_rRI(Rd,Rn,i) CC_LDR_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDR_rRi(Rd,Rn,i) CC_LDR_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDR_rRR(Rd,Rn,Rm) CC_LDR_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDR_rRr(Rd,Rn,Rm) CC_LDR_rRr(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDR_rRR_LSLi(Rd,Rn,Rm,i) CC_LDR_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRr_LSLi(Rd,Rn,Rm,i) CC_LDR_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRR_LSRi(Rd,Rn,Rm,i) CC_LDR_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRr_LSRi(Rd,Rn,Rm,i) CC_LDR_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRR_ASRi(Rd,Rn,Rm,i) CC_LDR_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRr_ASRi(Rd,Rn,Rm,i) CC_LDR_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRR_RORi(Rd,Rn,Rm,i) CC_LDR_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRr_RORi(Rd,Rn,Rm,i) CC_LDR_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDR_rRR_RRX(Rd,Rn,Rm) CC_LDR_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDR_rRr_RRX(Rd,Rn,Rm) CC_LDR_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_STR_rR(cc,Rd,Rn) _LS1(cc,0,0,Rd,Rn,ADD_IMM(0)) -#define CC_STR_rRI(cc,Rd,Rn,i) _LS1(cc,0,0,Rd,Rn,ADD_IMM(i)) -#define CC_STR_rRi(cc,Rd,Rn,i) _LS1(cc,0,0,Rd,Rn,SUB_IMM(i)) -#define CC_STR_rRR(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,ADD_REG(Rm)) -#define CC_STR_rRr(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,SUB_REG(Rm)) -#define CC_STR_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_LSL(Rm,i)) -#define CC_STR_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_LSL(Rm,i)) -#define CC_STR_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_LSR(Rm,i)) -#define CC_STR_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_LSR(Rm,i)) -#define CC_STR_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_ASR(Rm,i)) -#define CC_STR_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_ASR(Rm,i)) -#define CC_STR_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,ADD_ROR(Rm,i)) -#define CC_STR_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,0,Rd,Rn,SUB_ROR(Rm,i)) -#define CC_STR_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,ADD_RRX(Rm)) -#define CC_STR_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,0,Rd,Rn,SUB_RRX(Rm)) - -#define STR_rR(Rd,Rn) CC_STR_rR(NATIVE_CC_AL,Rd,Rn) -#define STR_rRI(Rd,Rn,i) CC_STR_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define STR_rRi(Rd,Rn,i) CC_STR_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define STR_rRR(Rd,Rn,Rm) CC_STR_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define STR_rRr(Rd,Rn,Rm) CC_STR_rRr(NATIVE_CC_AL,Rd,Rn,Rm) -#define STR_rRR_LSLi(Rd,Rn,Rm,i) CC_STR_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRr_LSLi(Rd,Rn,Rm,i) CC_STR_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRR_LSRi(Rd,Rn,Rm,i) CC_STR_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRr_LSRi(Rd,Rn,Rm,i) CC_STR_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRR_ASRi(Rd,Rn,Rm,i) CC_STR_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRr_ASRi(Rd,Rn,Rm,i) CC_STR_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRR_RORi(Rd,Rn,Rm,i) CC_STR_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRr_RORi(Rd,Rn,Rm,i) CC_STR_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STR_rRR_RRX(Rd,Rn,Rm) CC_STR_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) -#define STR_rRr_RRX(Rd,Rn,Rm) CC_STR_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_LDRB_rR(cc,Rd,Rn) _LS1(cc,1,1,Rd,Rn,ADD_IMM(0)) -#define CC_LDRB_rRI(cc,Rd,Rn,i) _LS1(cc,1,1,Rd,Rn,ADD_IMM(i)) -#define CC_LDRB_rRi(cc,Rd,Rn,i) _LS1(cc,1,1,Rd,Rn,SUB_IMM(i)) -#define CC_LDRB_rRR(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,ADD_REG(Rm)) -#define CC_LDRB_rRr(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,SUB_REG(Rm)) -#define CC_LDRB_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_LSL(Rm,i)) -#define CC_LDRB_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_LSL(Rm,i)) -#define CC_LDRB_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_LSR(Rm,i)) -#define CC_LDRB_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_LSR(Rm,i)) -#define CC_LDRB_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_ASR(Rm,i)) -#define CC_LDRB_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_ASR(Rm,i)) -#define CC_LDRB_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,ADD_ROR(Rm,i)) -#define CC_LDRB_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,1,1,Rd,Rn,SUB_ROR(Rm,i)) -#define CC_LDRB_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,ADD_RRX(Rm)) -#define CC_LDRB_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,1,1,Rd,Rn,SUB_RRX(Rm)) - -#define LDRB_rR(Rd,Rn) CC_LDRB_rR(NATIVE_CC_AL,Rd,Rn) -#define LDRB_rRI(Rd,Rn,i) CC_LDRB_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDRB_rRi(Rd,Rn,i) CC_LDRB_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDRB_rRR(Rd,Rn,Rm) CC_LDRB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRB_rRr(Rd,Rn,Rm) CC_LDRB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRB_rRR_LSLi(Rd,Rn,Rm,i) CC_LDRB_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRr_LSLi(Rd,Rn,Rm,i) CC_LDRB_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRR_LSRi(Rd,Rn,Rm,i) CC_LDRB_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRr_LSRi(Rd,Rn,Rm,i) CC_LDRB_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRR_ASRi(Rd,Rn,Rm,i) CC_LDRB_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRr_ASRi(Rd,Rn,Rm,i) CC_LDRB_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRR_RORi(Rd,Rn,Rm,i) CC_LDRB_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRr_RORi(Rd,Rn,Rm,i) CC_LDRB_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define LDRB_rRR_RRX(Rd,Rn,Rm) CC_LDRB_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRB_rRr_RRX(Rd,Rn,Rm) CC_LDRB_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_STRB_rR(cc,Rd,Rn) _LS1(cc,0,1,Rd,Rn,ADD_IMM(0)) -#define CC_STRB_rRI(cc,Rd,Rn,i) _LS1(cc,0,1,Rd,Rn,ADD_IMM(i)) -#define CC_STRB_rRi(cc,Rd,Rn,i) _LS1(cc,0,1,Rd,Rn,SUB_IMM(i)) -#define CC_STRB_rRR(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,ADD_REG(Rm)) -#define CC_STRB_rRr(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,SUB_REG(Rm)) -#define CC_STRB_rRR_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_LSL(Rm,i)) -#define CC_STRB_rRr_LSLi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_LSL(Rm,i)) -#define CC_STRB_rRR_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_LSR(Rm,i)) -#define CC_STRB_rRr_LSRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_LSR(Rm,i)) -#define CC_STRB_rRR_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_ASR(Rm,i)) -#define CC_STRB_rRr_ASRi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_ASR(Rm,i)) -#define CC_STRB_rRR_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,ADD_ROR(Rm,i)) -#define CC_STRB_rRr_RORi(cc,Rd,Rn,Rm,i) _LS1(cc,0,1,Rd,Rn,SUB_ROR(Rm,i)) -#define CC_STRB_rRR_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,ADD_RRX(Rm)) -#define CC_STRB_rRr_RRX(cc,Rd,Rn,Rm) _LS1(cc,0,1,Rd,Rn,SUB_RRX(Rm)) - -#define STRB_rR(Rd,Rn) CC_STRB_rR(NATIVE_CC_AL,Rd,Rn) -#define STRB_rRI(Rd,Rn,i) CC_STRB_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define STRB_rRi(Rd,Rn,i) CC_STRB_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define STRB_rRR(Rd,Rn,Rm) CC_STRB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define STRB_rRr(Rd,Rn,Rm) CC_STRB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) -#define STRB_rRR_LSLi(Rd,Rn,Rm,i) CC_STRB_rRR_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRr_LSLi(Rd,Rn,Rm,i) CC_STRB_rRr_LSLi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRR_LSRi(Rd,Rn,Rm,i) CC_STRB_rRR_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRr_LSRi(Rd,Rn,Rm,i) CC_STRB_rRr_LSRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRR_ASRi(Rd,Rn,Rm,i) CC_STRB_rRR_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRr_ASRi(Rd,Rn,Rm,i) CC_STRB_rRr_ASRi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRR_RORi(Rd,Rn,Rm,i) CC_STRB_rRR_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRr_RORi(Rd,Rn,Rm,i) CC_STRB_rRr_RORi(NATIVE_CC_AL,Rd,Rn,Rm,i) -#define STRB_rRR_RRX(Rd,Rn,Rm) CC_STRB_rRR_RRX(NATIVE_CC_AL,Rd,Rn,Rm) -#define STRB_rRr_RRX(Rd,Rn,Rm) CC_STRB_rRr_RRX(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_LDRSH_rR(cc,Rd,Rn) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_IMM(0)) -#define CC_LDRSH_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_IMM(i)) -#define CC_LDRSH_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,1,1,Rd,Rn,SUB2_IMM(i)) -#define CC_LDRSH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,1,Rd,Rn,ADD2_REG(Rm)) -#define CC_LDRSH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,1,Rd,Rn,SUB2_REG(Rm)) - -#define LDRSH_rR(Rd,Rn) CC_LDRSH_rR(NATIVE_CC_AL,Rd,Rn) -#define LDRSH_rRI(Rd,Rn,i) CC_LDRSH_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDRSH_rRi(Rd,Rn,i) CC_LDRSH_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDRSH_rRR(Rd,Rn,Rm) CC_LDRSH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRSH_rRr(Rd,Rn,Rm) CC_LDRSH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_LDRH_rR(cc,Rd,Rn) _LS2(cc,1,1,0,1,Rd,Rn,ADD2_IMM(0)) -#define CC_LDRH_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,0,1,Rd,Rn,(i) >= 0 ? ADD2_IMM(i) : SUB2_IMM(-(i))) -#define CC_LDRH_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,0,1,Rd,Rn,SUB2_IMM(i)) -#define CC_LDRH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,0,1,Rd,Rn,ADD2_REG(Rm)) -#define CC_LDRH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,0,1,Rd,Rn,SUB2_REG(Rm)) - -#define LDRH_rR(Rd,Rn) CC_LDRH_rR(NATIVE_CC_AL,Rd,Rn) -#define LDRH_rRI(Rd,Rn,i) CC_LDRH_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDRH_rRi(Rd,Rn,i) CC_LDRH_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDRH_rRR(Rd,Rn,Rm) CC_LDRH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRH_rRr(Rd,Rn,Rm) CC_LDRH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_STRD_rR(cc,Rd,Rn) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_IMM(0)) -#define CC_STRD_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_IMM(i)) -#define CC_STRD_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,1,1,Rd,Rn,SUB2_IMM(i)) -#define CC_STRD_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,1,Rd,Rn,ADD2_REG(Rm)) -#define CC_STRD_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,1,Rd,Rn,SUB2_REG(Rm)) - -#define STRD_rR(Rd,Rn) CC_STRD_rR(NATIVE_CC_AL,Rd,Rn) -#define STRD_rRI(Rd,Rn,i) CC_STRD_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define STRD_rRi(Rd,Rn,i) CC_STRD_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define STRD_rRR(Rd,Rn,Rm) CC_STRD_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define STRD_rRr(Rd,Rn,Rm) CC_STRD_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_STRH_rR(cc,Rd,Rn) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_IMM(0)) -#define CC_STRH_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_IMM(i)) -#define CC_STRH_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,0,1,Rd,Rn,SUB2_IMM(i)) -#define CC_STRH_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,0,1,Rd,Rn,ADD2_REG(Rm)) -#define CC_STRH_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,0,1,Rd,Rn,SUB2_REG(Rm)) - -#define STRH_rR(Rd,Rn) CC_STRH_rR(NATIVE_CC_AL,Rd,Rn) -#define STRH_rRI(Rd,Rn,i) CC_STRH_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define STRH_rRi(Rd,Rn,i) CC_STRH_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define STRH_rRR(Rd,Rn,Rm) CC_STRH_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define STRH_rRr(Rd,Rn,Rm) CC_STRH_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_LDRSB_rR(cc,Rd,Rn) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_IMM(0)) -#define CC_LDRSB_rRI(cc,Rd,Rn,i) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_IMM(i)) -#define CC_LDRSB_rRi(cc,Rd,Rn,i) _LS2(cc,1,1,1,0,Rd,Rn,SUB2_IMM(i)) -#define CC_LDRSB_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,0,Rd,Rn,ADD2_REG(Rm)) -#define CC_LDRSB_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,1,1,0,Rd,Rn,SUB2_REG(Rm)) - -#define LDRSB_rR(Rd,Rn) CC_LDRSB_rR(NATIVE_CC_AL,Rd,Rn) -#define LDRSB_rRI(Rd,Rn,i) CC_LDRSB_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDRSB_rRi(Rd,Rn,i) CC_LDRSB_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDRSB_rRR(Rd,Rn,Rm) CC_LDRSB_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRSB_rRr(Rd,Rn,Rm) CC_LDRSB_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -#define CC_LDRD_rR(cc,Rd,Rn) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_IMM(0)) -#define CC_LDRD_rRI(cc,Rd,Rn,i) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_IMM(i)) -#define CC_LDRD_rRi(cc,Rd,Rn,i) _LS2(cc,1,0,1,0,Rd,Rn,SUB2_IMM(i)) -#define CC_LDRD_rRR(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,0,Rd,Rn,ADD2_REG(Rm)) -#define CC_LDRD_rRr(cc,Rd,Rn,Rm) _LS2(cc,1,0,1,0,Rd,Rn,SUB2_REG(Rm)) - -#define LDRD_rR(Rd,Rn) CC_LDRD_rR(NATIVE_CC_AL,Rd,Rn) -#define LDRD_rRI(Rd,Rn,i) CC_LDRD_rRI(NATIVE_CC_AL,Rd,Rn,i) -#define LDRD_rRi(Rd,Rn,i) CC_LDRD_rRi(NATIVE_CC_AL,Rd,Rn,i) -#define LDRD_rRR(Rd,Rn,Rm) CC_LDRD_rRR(NATIVE_CC_AL,Rd,Rn,Rm) -#define LDRD_rRr(Rd,Rn,Rm) CC_LDRD_rRr(NATIVE_CC_AL,Rd,Rn,Rm) - -/* Multiply */ -#define CC_SMULL_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x0C << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define SMULL_rrrr(RdLo,RdHi,Rm,Rs) CC_SMULL_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) -#define CC_SMULLS_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x0D << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define SMULLS_rrrr(RdLo,RdHi,Rm,Rs) CC_SMULLS_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) -#define CC_MUL_rrr(cc, Rd, Rm, Rs) _W(((cc) << 28) | (0x00 << 20) | ((Rd) << 16) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define MUL_rrr(Rd, Rm, Rs) CC_MUL_rrr(NATIVE_CC_AL, Rd, Rm, Rs) -#define CC_MULS_rrr(cc, Rd, Rm, Rs) _W(((cc) << 28) | (0x01 << 20) | ((Rd) << 16) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define MULS_rrr(Rd, Rm, Rs) CC_MULS_rrr(NATIVE_CC_AL, Rd, Rm, Rs) - -#define CC_UMULL_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x08 << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define UMULL_rrrr(RdLo,RdHi,Rm,Rs) CC_UMULL_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) -#define CC_UMULLS_rrrr(cc, RdLo, RdHi, Rm, Rs) _W(((cc) << 28) | (0x09 << 20) | ((RdHi) << 16) | ((RdLo) << 12) | ((Rs) << 8) | (0x9 << 4) | (Rm)) -#define UMULLS_rrrr(RdLo,RdHi,Rm,Rs) CC_UMULLS_rrrr(NATIVE_CC_AL,RdLo,RdHi,Rm,Rs) - -/* Others */ -#define CC_CLZ_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x16 << 20) | (0xf << 16) | ((Rd) << 12) | (0xf << 8) | (0x1 << 4) | SHIFT_REG(Rm)) -#define CLZ_rr(Rd,Rm) CC_CLZ_rr(NATIVE_CC_AL,Rd,Rm) - -/* Alias */ -#define LSL_rri(Rd,Rm,i) MOV_rrLSLi(Rd,Rm,i) -#define LSL_rrr(Rd,Rm,Rs) MOV_rrLSLr(Rd,Rm,Rs) -#define LSR_rri(Rd,Rm,i) MOV_rrLSRi(Rd,Rm,i) -#define LSR_rrr(Rd,Rm,Rs) MOV_rrLSRr(Rd,Rm,Rs) -#define ASR_rri(Rd,Rm,i) MOV_rrASRi(Rd,Rm,i) -#define ASR_rrr(Rd,Rm,Rs) MOV_rrASRr(Rd,Rm,Rs) -#define ROR_rri(Rd,Rm,i) MOV_rrRORi(Rd,Rm,i) -#define ROR_rrr(Rd,Rm,Rs) MOV_rrRORr(Rd,Rm,Rs) -#define RRX_rr(Rd,Rm) MOV_rrRRX(Rd,Rm) -#define LSLS_rri(Rd,Rm,i) MOVS_rrLSLi(Rd,Rm,i) -#define LSLS_rrr(Rd,Rm,Rs) MOVS_rrLSLr(Rd,Rm,Rs) -#define LSRS_rri(Rd,Rm,i) MOVS_rrLSRi(Rd,Rm,i) -#define LSRS_rrr(Rd,Rm,Rs) MOVS_rrLSRr(Rd,Rm,Rs) -#define ASRS_rri(Rd,Rm,i) MOVS_rrASRi(Rd,Rm,i) -#define ASRS_rrr(Rd,Rm,Rs) MOVS_rrASRr(Rd,Rm,Rs) -#define RORS_rri(Rd,Rm,i) MOVS_rrRORi(Rd,Rm,i) -#define RORS_rrr(Rd,Rm,Rs) MOVS_rrRORr(Rd,Rm,Rs) -#define RRXS_rr(Rd,Rm) MOVS_rrRRX(Rd,Rm) - -/* ARMV6 ops */ -#define CC_SXTB_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTB_rr(Rd,Rm) CC_SXTB_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTB_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTB_rr_ROR8(Rd,Rm) CC_SXTB_rr_ROR8(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTB_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTB_rr_ROR16(Rd,Rm) CC_SXTB_rr_ROR16(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTB_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6a << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTB_rr_ROR24(Rd,Rm) CC_SXTB_rr_ROR24(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTH_rr(Rd,Rm) CC_SXTH_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTH_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTH_rr_ROR8(Rd,Rm) CC_SXTH_rr_ROR8(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTH_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTH_rr_ROR16(Rd,Rm) CC_SXTH_rr_ROR16(NATIVE_CC_AL,Rd,Rm) - -#define CC_SXTH_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define SXTH_rr_ROR24(Rd,Rm) CC_SXTH_rr_ROR24(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTB_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTB_rr(Rd,Rm) CC_UXTB_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTB_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTB_rr_ROR8(Rd,Rm) CC_UXTB_rr_ROR8(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTB_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTB_rr_ROR16(Rd,Rm) CC_UXTB_rr_ROR16(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTB_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6e << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTB_rr_ROR24(Rd,Rm) CC_UXTB_rr_ROR24(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTH_rr(Rd,Rm) CC_UXTH_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTH_rr_ROR8(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (1 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTH_rr_ROR8(Rd,Rm) CC_UXTH_rr_ROR8(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTH_rr_ROR16(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (2 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTH_rr_ROR16(Rd,Rm) CC_UXTH_rr_ROR16(NATIVE_CC_AL,Rd,Rm) - -#define CC_UXTH_rr_ROR24(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | ((Rd) << 12) | (3 << 10) | (0x7 << 4) | SHIFT_REG(Rm)) -#define UXTH_rr_ROR24(Rd,Rm) CC_UXTH_rr_ROR24(NATIVE_CC_AL,Rd,Rm) - -#define CC_REV_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0x3 << 4) | SHIFT_REG(Rm)) -#define REV_rr(Rd,Rm) CC_REV_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_REV16_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6b << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0xB << 4) | SHIFT_REG(Rm)) -#define REV16_rr(Rd,Rm) CC_REV16_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_REVSH_rr(cc,Rd,Rm) _W(((cc) << 28) | (0x6f << 20) | (0xf << 16) | (0xf << 8) | ((Rd) << 12) | (0xB << 4) | SHIFT_REG(Rm)) -#define REVSH_rr(Rd,Rm) CC_REVSH_rr(NATIVE_CC_AL,Rd,Rm) - -#define CC_PKHBT_rrr(cc,Rd,Rn,Rm) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x1 << 4) | (Rm)) -#define CC_PKHBT_rrrLSLi(cc,Rd,Rn,Rm,s) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x1 << 4) | SHIFT_PK(Rm, s)) -#define PKHBT_rrr(Rd,Rn,Rm) CC_PKHBT_rrr(NATIVE_CC_AL,Rd,Rn,Rm) -#define PKHBT_rrrLSLi(Rd,Rn,Rm,s) CC_PKHBT_rrrLSLi(NATIVE_CC_AL,Rd,Rn,Rm,s) - -#define CC_PKHTB_rrrASRi(cc,Rd,Rn,Rm,s) _W(((cc) << 28) | (0x68 << 20) | (Rn << 16) | (Rd << 12) | (0x5 << 4) | SHIFT_PK(Rm, s)) -#define PKHTB_rrrASRi(Rd,Rn,Rm,s) CC_PKHTB_rrrASRi(NATIVE_CC_AL,Rd,Rn,Rm,s) - -#endif /* ARM_RTASM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu1.cpp b/BasiliskII/src/uae_cpu/compiler/compemu1.cpp deleted file mode 100644 index 297c62505..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu1.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_1 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu2.cpp b/BasiliskII/src/uae_cpu/compiler/compemu2.cpp deleted file mode 100644 index 8c0ddeacd..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu2.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_2 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu3.cpp b/BasiliskII/src/uae_cpu/compiler/compemu3.cpp deleted file mode 100644 index 975e0669d..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu3.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_3 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu4.cpp b/BasiliskII/src/uae_cpu/compiler/compemu4.cpp deleted file mode 100644 index a49b5444e..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu4.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_4 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu5.cpp b/BasiliskII/src/uae_cpu/compiler/compemu5.cpp deleted file mode 100644 index 41e872f68..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu5.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_5 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu6.cpp b/BasiliskII/src/uae_cpu/compiler/compemu6.cpp deleted file mode 100644 index 9156e5974..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu6.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_6 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu7.cpp b/BasiliskII/src/uae_cpu/compiler/compemu7.cpp deleted file mode 100644 index 63108e047..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu7.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_7 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu8.cpp b/BasiliskII/src/uae_cpu/compiler/compemu8.cpp deleted file mode 100644 index 543f9dfd7..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu8.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_8 -#include "compemu.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp index 4ffcca0d0..d9a1e4921 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -37,6 +37,8 @@ * Adapted for JIT compilation (c) Bernd Meyer, 2000 */ +#ifdef USE_JIT + #include "sysdeps.h" #include @@ -2083,3 +2085,5 @@ void comp_fpp_opp(uae_u32 opcode, uae_u16 extra) } FAIL(1); } + +#endif diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp deleted file mode 100644 index aa9a71813..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.cpp +++ /dev/null @@ -1,1967 +0,0 @@ -/* - * compiler/compemu_midfunc_arm.cpp - Native MIDFUNCS for ARM - * - * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2002 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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: - * File is included by compemu_support.cpp - * - */ - -/******************************************************************** - * CPU functions exposed to gencomp. Both CREATE and EMIT time * - ********************************************************************/ - -/* - * RULES FOR HANDLING REGISTERS: - * - * * In the function headers, order the parameters - * - 1st registers written to - * - 2nd read/modify/write registers - * - 3rd registers read from - * * Before calling raw_*, you must call readreg, writereg or rmw for - * each register - * * The order for this is - * - 1st call remove_offset for all registers written to with size<4 - * - 2nd call readreg for all registers read without offset - * - 3rd call rmw for all rmw registers - * - 4th call readreg_offset for all registers that can handle offsets - * - 5th call get_offset for all the registers from the previous step - * - 6th call writereg for all written-to registers - * - 7th call raw_* - * - 8th unlock2 all registers that were locked - */ - -MIDFUNC(0,live_flags,(void)) -{ - live.flags_on_stack=TRASH; - live.flags_in_flags=VALID; - live.flags_are_important=1; -} - -MIDFUNC(0,dont_care_flags,(void)) -{ - live.flags_are_important=0; -} - -MIDFUNC(0,duplicate_carry,(void)) -{ - evict(FLAGX); - make_flags_live_internal(); - COMPCALL(setcc_m)((uintptr)live.state[FLAGX].mem,NATIVE_CC_CS); - log_vwrite(FLAGX); -} - -MIDFUNC(0,restore_carry,(void)) -{ -#if defined(USE_JIT2) - RR4 r=readreg(FLAGX,4); - MRS_CPSR(REG_WORK1); - TEQ_ri(r,1); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_C_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSRf_r(REG_WORK1); - unlock2(r); -#else - if (!have_rat_stall) { /* Not a P6 core, i.e. no partial stalls */ - bt_l_ri_noclobber(FLAGX,0); - } - else { /* Avoid the stall the above creates. - This is slow on non-P6, though. - */ - COMPCALL(rol_b_ri(FLAGX,8)); - isclean(FLAGX); - } -#endif -} - -MIDFUNC(0,start_needflags,(void)) -{ - needflags=1; -} - -MIDFUNC(0,end_needflags,(void)) -{ - needflags=0; -} - -MIDFUNC(0,make_flags_live,(void)) -{ - make_flags_live_internal(); -} - -MIDFUNC(2,bt_l_ri,(RR4 r, IMM i)) /* This is defined as only affecting C */ -{ - int size=4; - if (i<16) - size=2; - CLOBBER_BT; - r=readreg(r,size); - raw_bt_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,bt_l_rr,(RR4 r, RR4 b)) /* This is defined as only affecting C */ -{ - CLOBBER_BT; - r=readreg(r,4); - b=readreg(b,4); - raw_bt_l_rr(r,b); - unlock2(r); - unlock2(b); -} - -MIDFUNC(2,btc_l_rr,(RW4 r, RR4 b)) -{ - CLOBBER_BT; - b=readreg(b,4); - r=rmw(r,4,4); - raw_btc_l_rr(r,b); - unlock2(r); - unlock2(b); -} - -MIDFUNC(2,btr_l_rr,(RW4 r, RR4 b)) -{ - CLOBBER_BT; - b=readreg(b,4); - r=rmw(r,4,4); - raw_btr_l_rr(r,b); - unlock2(r); - unlock2(b); -} - -MIDFUNC(2,bts_l_rr,(RW4 r, RR4 b)) -{ - CLOBBER_BT; - b=readreg(b,4); - r=rmw(r,4,4); - raw_bts_l_rr(r,b); - unlock2(r); - unlock2(b); -} - -MIDFUNC(2,mov_l_rm,(W4 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,4); - raw_mov_l_rm(d,s); - unlock2(d); -} - -MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, RR4 index, IMM factor)) -{ - CLOBBER_MOV; - index=readreg(index,4); - d=writereg(d,4); - raw_mov_l_rm_indexed(d,base,index,factor); - unlock2(index); - unlock2(d); -} - -MIDFUNC(2,mov_l_mi,(IMM d, IMM s)) -{ - CLOBBER_MOV; - raw_mov_l_mi(d,s); -} - -MIDFUNC(2,mov_w_mi,(IMM d, IMM s)) -{ - CLOBBER_MOV; - raw_mov_w_mi(d,s); -} - -MIDFUNC(2,mov_b_mi,(IMM d, IMM s)) -{ - CLOBBER_MOV; - raw_mov_b_mi(d,s); -} - -MIDFUNC(2,rol_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROL; - r=rmw(r,1,1); - raw_rol_b_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,rol_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROL; - r=rmw(r,2,2); - raw_rol_w_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,rol_l_ri,(RW4 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROL; - r=rmw(r,4,4); - raw_rol_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,rol_l_rr,(RW4 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(rol_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_ROL; - r=readreg(r,1); - d=rmw(d,4,4); - raw_rol_l_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,rol_w_rr,(RW2 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(rol_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_ROL; - r=readreg(r,1); - d=rmw(d,2,2); - raw_rol_w_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,rol_b_rr,(RW1 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(rol_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_ROL; - r=readreg(r,1); - d=rmw(d,1,1); - raw_rol_b_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shll_l_rr,(RW4 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(shll_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHLL; - r=readreg(r,1); - d=rmw(d,4,4); - raw_shll_l_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shll_w_rr,(RW2 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shll_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHLL; - r=readreg(r,1); - d=rmw(d,2,2); - raw_shll_w_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shll_b_rr,(RW1 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shll_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHLL; - r=readreg(r,1); - d=rmw(d,1,1); - raw_shll_b_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,ror_b_ri,(RR1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROR; - r=rmw(r,1,1); - raw_ror_b_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,ror_w_ri,(RR2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROR; - r=rmw(r,2,2); - raw_ror_w_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,ror_l_ri,(RR4 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_ROR; - r=rmw(r,4,4); - raw_ror_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,ror_l_rr,(RR4 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(ror_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_ROR; - r=readreg(r,1); - d=rmw(d,4,4); - raw_ror_l_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,ror_w_rr,(RR2 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(ror_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_ROR; - r=readreg(r,1); - d=rmw(d,2,2); - raw_ror_w_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,ror_b_rr,(RR1 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(ror_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - - CLOBBER_ROR; - r=readreg(r,1); - d=rmw(d,1,1); - raw_ror_b_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shrl_l_rr,(RW4 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(shrl_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRL; - r=readreg(r,1); - d=rmw(d,4,4); - raw_shrl_l_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shrl_w_rr,(RW2 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shrl_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRL; - r=readreg(r,1); - d=rmw(d,2,2); - raw_shrl_w_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shrl_b_rr,(RW1 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shrl_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - - CLOBBER_SHRL; - r=readreg(r,1); - d=rmw(d,1,1); - raw_shrl_b_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shll_l_ri,(RW4 r, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(r) && !needflags) { - live.state[r].val<<=i; - return; - } - CLOBBER_SHLL; - r=rmw(r,4,4); - raw_shll_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shll_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHLL; - r=rmw(r,2,2); - raw_shll_w_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shll_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHLL; - r=rmw(r,1,1); - raw_shll_b_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(r) && !needflags) { - live.state[r].val>>=i; - return; - } - CLOBBER_SHRL; - r=rmw(r,4,4); - raw_shrl_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRL; - r=rmw(r,2,2); - raw_shrl_w_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRL; - r=rmw(r,1,1); - raw_shrl_b_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,4,4); - raw_shra_l_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,2,2); - raw_shra_w_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) -{ - if (!i && !needflags) - return; - CLOBBER_SHRA; - r=rmw(r,1,1); - raw_shra_b_ri(r,i); - unlock2(r); -} - -MIDFUNC(2,shra_l_rr,(RW4 d, RR1 r)) -{ - if (isconst(r)) { - COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRA; - r=readreg(r,1); - d=rmw(d,4,4); - raw_shra_l_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shra_w_rr,(RW2 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); - return; - } - CLOBBER_SHRA; - r=readreg(r,1); - d=rmw(d,2,2); - raw_shra_w_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,shra_b_rr,(RW1 d, RR1 r)) -{ /* Can only do this with r==1, i.e. cl */ - - if (isconst(r)) { - COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); - return; - } - - CLOBBER_SHRA; - r=readreg(r,1); - d=rmw(d,1,1); - raw_shra_b_rr(d,r); - unlock2(r); - unlock2(d); -} - -MIDFUNC(2,setcc,(W1 d, IMM cc)) -{ - CLOBBER_SETCC; - d=writereg(d,1); - raw_setcc(d,cc); - unlock2(d); -} - -MIDFUNC(2,setcc_m,(IMM d, IMM cc)) -{ - CLOBBER_SETCC; - raw_setcc_m(d,cc); -} - -MIDFUNC(3,cmov_l_rr,(RW4 d, RR4 s, IMM cc)) -{ - if (d==s) - return; - CLOBBER_CMOV; - s=readreg(s,4); - d=rmw(d,4,4); - raw_cmov_l_rr(d,s,cc); - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) -{ - CLOBBER_BSF; - s = readreg(s, 4); - d = writereg(d, 4); - raw_bsf_l_rr(d, s); - unlock2(s); - unlock2(d); -} - -/* Set the Z flag depending on the value in s. Note that the - value has to be 0 or -1 (or, more precisely, for non-zero - values, bit 14 must be set)! */ -MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) -{ - CLOBBER_BSF; - s=rmw_specific(s,4,4,FLAG_NREG3); - tmp=writereg(tmp,4); - raw_flags_set_zero(s, tmp); - unlock2(tmp); - unlock2(s); -} - -MIDFUNC(2,imul_32_32,(RW4 d, RR4 s)) -{ - CLOBBER_MUL; - s=readreg(s,4); - d=rmw(d,4,4); - raw_imul_32_32(d,s); - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) -{ - CLOBBER_MUL; - s=rmw_specific(s,4,4,MUL_NREG2); - d=rmw_specific(d,4,4,MUL_NREG1); - raw_imul_64_32(d,s); - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) -{ - CLOBBER_MUL; - s=rmw_specific(s,4,4,MUL_NREG2); - d=rmw_specific(d,4,4,MUL_NREG1); - raw_mul_64_32(d,s); - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,sign_extend_16_rr,(W4 d, RR2 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s16)live.state[s].val); - return; - } - - CLOBBER_SE16; - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,2); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,2); - } - raw_sign_extend_16_rr(d,s); - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(2,sign_extend_8_rr,(W4 d, RR1 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s8)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_SE8; - if (!isrmw) { - s=readreg(s,1); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,1); - } - - raw_sign_extend_8_rr(d,s); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(2,zero_extend_16_rr,(W4 d, RR2 s)) -{ - int isrmw; - - if (isconst(s)) { - set_const(d,(uae_u32)(uae_u16)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_ZE16; - if (!isrmw) { - s=readreg(s,2); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,2); - } - raw_zero_extend_16_rr(d,s); - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(2,zero_extend_8_rr,(W4 d, RR1 s)) -{ - int isrmw; - if (isconst(s)) { - set_const(d,(uae_u32)(uae_u8)live.state[s].val); - return; - } - - isrmw=(s==d); - CLOBBER_ZE8; - if (!isrmw) { - s=readreg(s,1); - d=writereg(d,4); - } - else { /* If we try to lock this twice, with different sizes, we - are int trouble! */ - s=d=rmw(s,4,1); - } - - raw_zero_extend_8_rr(d,s); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(2,mov_b_rr,(W1 d, RR1 s)) -{ - if (d==s) - return; - if (isconst(s)) { - COMPCALL(mov_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - d=writereg(d,1); - raw_mov_b_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,mov_w_rr,(W2 d, RR2 s)) -{ - if (d==s) - return; - if (isconst(s)) { - COMPCALL(mov_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=writereg(d,2); - raw_mov_w_rr(d,s); - unlock2(d); - unlock2(s); -} - -/* read the long at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_l_rR,(W4 d, RR4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_l_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - d=writereg(d,4); - - raw_mov_l_rR(d,s,offset); - unlock2(d); - unlock2(s); -} - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_rR,(W2 d, RR4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_w_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - d=writereg(d,2); - - raw_mov_w_rR(d,s,offset); - unlock2(d); - unlock2(s); -} - -/* read the long at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_l_brR,(W4 d, RR4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_l_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,4); - - raw_mov_l_brR(d,s,offset); - unlock2(d); - unlock2(s); -} - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_brR,(W2 d, RR4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_w_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - remove_offset(d,-1); - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,2); - - raw_mov_w_brR(d,s,offset); - unlock2(d); - unlock2(s); -} - -/* read the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_b_brR,(W1 d, RR4 s, IMM offset)) -{ - int sreg=s; - if (isconst(s)) { - COMPCALL(mov_b_rm)(d,live.state[s].val+offset); - return; - } - CLOBBER_MOV; - remove_offset(d,-1); - s=readreg_offset(s,4); - offset+=get_offset(sreg); - d=writereg(d,1); - - raw_mov_b_brR(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,mov_l_Ri,(RR4 d, IMM i, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_l_mi)(live.state[d].val+offset,i); - return; - } - - CLOBBER_MOV; - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_l_Ri(d,i,offset); - unlock2(d); -} - -MIDFUNC(3,mov_w_Ri,(RR4 d, IMM i, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_w_mi)(live.state[d].val+offset,i); - return; - } - - CLOBBER_MOV; - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_w_Ri(d,i,offset); - unlock2(d); -} - -/* Warning! OFFSET is byte sized only! */ -MIDFUNC(3,mov_l_Rr,(RR4 d, RR4 s, IMM offset)) -{ - if (isconst(d)) { - COMPCALL(mov_l_mr)(live.state[d].val+offset,s); - return; - } - if (isconst(s)) { - COMPCALL(mov_l_Ri)(d,live.state[s].val,offset); - return; - } - - CLOBBER_MOV; - s=readreg(s,4); - d=readreg(d,4); - - raw_mov_l_Rr(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,mov_w_Rr,(RR4 d, RR2 s, IMM offset)) -{ - if (isconst(d)) { - COMPCALL(mov_w_mr)(live.state[d].val+offset,s); - return; - } - if (isconst(s)) { - COMPCALL(mov_w_Ri)(d,(uae_u16)live.state[s].val,offset); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=readreg(d,4); - raw_mov_w_Rr(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,lea_l_brr,(W4 d, RR4 s, IMM offset)) -{ - if (isconst(s)) { - COMPCALL(mov_l_ri)(d,live.state[s].val+offset); - return; - } -#if USE_OFFSET - if (d==s) { - add_offset(d,offset); - return; - } -#endif - CLOBBER_LEA; - s=readreg(s,4); - d=writereg(d,4); - raw_lea_l_brr(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(5,lea_l_brr_indexed,(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)) -{ - if (!offset) { - COMPCALL(lea_l_rr_indexed)(d,s,index,factor); - return; - } - CLOBBER_LEA; - s=readreg(s,4); - index=readreg(index,4); - d=writereg(d,4); - - raw_lea_l_brr_indexed(d,s,index,factor,offset); - unlock2(d); - unlock2(index); - unlock2(s); -} - -MIDFUNC(4,lea_l_rr_indexed,(W4 d, RR4 s, RR4 index, IMM factor)) -{ - CLOBBER_LEA; - s=readreg(s,4); - index=readreg(index,4); - d=writereg(d,4); - - raw_lea_l_rr_indexed(d,s,index,factor); - unlock2(d); - unlock2(index); - unlock2(s); -} - -/* write d to the long at the address contained in s+offset */ -MIDFUNC(3,mov_l_bRr,(RR4 d, RR4 s, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_l_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,4); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - - raw_mov_l_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} - -/* write the word at the address contained in s+offset and store in d */ -MIDFUNC(3,mov_w_bRr,(RR4 d, RR2 s, IMM offset)) -{ - int dreg=d; - - if (isconst(d)) { - COMPCALL(mov_w_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,2); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_w_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,mov_b_bRr,(RR4 d, RR1 s, IMM offset)) -{ - int dreg=d; - if (isconst(d)) { - COMPCALL(mov_b_mr)(live.state[d].val+offset,s); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - d=readreg_offset(d,4); - offset+=get_offset(dreg); - raw_mov_b_bRr(d,s,offset); - unlock2(d); - unlock2(s); -} - -MIDFUNC(1,mid_bswap_32,(RW4 r)) -{ - - if (isconst(r)) { - uae_u32 oldv=live.state[r].val; - live.state[r].val=reverse32(oldv); - return; - } - - CLOBBER_SW32; - r=rmw(r,4,4); - raw_bswap_32(r); - unlock2(r); -} - -MIDFUNC(1,mid_bswap_16,(RW2 r)) -{ - if (isconst(r)) { - uae_u32 oldv=live.state[r].val; - live.state[r].val=((oldv>>8)&0xff) | ((oldv<<8)&0xff00) | - (oldv&0xffff0000); - return; - } - - CLOBBER_SW16; - r=rmw(r,2,2); - - raw_bswap_16(r); - unlock2(r); -} - -MIDFUNC(2,mov_l_rr,(W4 d, RR4 s)) -{ - int olds; - - if (d==s) { /* How pointless! */ - return; - } - if (isconst(s)) { - COMPCALL(mov_l_ri)(d,live.state[s].val); - return; - } - olds=s; - disassociate(d); - s=readreg_offset(s,4); - live.state[d].realreg=s; - live.state[d].realind=live.nat[s].nholds; - live.state[d].val=live.state[olds].val; - live.state[d].validsize=4; - live.state[d].dirtysize=4; - set_status(d,DIRTY); - - live.nat[s].holds[live.nat[s].nholds]=d; - live.nat[s].nholds++; - log_clobberreg(d); - D2(panicbug("Added %d to nreg %d(%d), now holds %d regs", d,s,live.state[d].realind,live.nat[s].nholds)); - unlock2(s); -} - -MIDFUNC(2,mov_l_mr,(IMM d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(mov_l_mi)(d,live.state[s].val); - return; - } - CLOBBER_MOV; - s=readreg(s,4); - - raw_mov_l_mr(d,s); - unlock2(s); -} - -MIDFUNC(2,mov_w_mr,(IMM d, RR2 s)) -{ - if (isconst(s)) { - COMPCALL(mov_w_mi)(d,(uae_u16)live.state[s].val); - return; - } - CLOBBER_MOV; - s=readreg(s,2); - - raw_mov_w_mr(d,s); - unlock2(s); -} - -MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,2); - - raw_mov_w_rm(d,s); - unlock2(d); -} - -MIDFUNC(2,mov_b_mr,(IMM d, RR1 s)) -{ - if (isconst(s)) { - COMPCALL(mov_b_mi)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_MOV; - s=readreg(s,1); - - raw_mov_b_mr(d,s); - unlock2(s); -} - -MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,1); - - raw_mov_b_rm(d,s); - unlock2(d); -} - -MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) -{ - set_const(d,s); - return; -} - -MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,2); - - raw_mov_w_ri(d,s); - unlock2(d); -} - -MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) -{ - CLOBBER_MOV; - d=writereg(d,1); - - raw_mov_b_ri(d,s); - unlock2(d); -} - -MIDFUNC(2,test_l_ri,(RR4 d, IMM i)) -{ - CLOBBER_TEST; - d=readreg(d,4); - - raw_test_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,test_l_rr,(RR4 d, RR4 s)) -{ - CLOBBER_TEST; - d=readreg(d,4); - s=readreg(s,4); - - raw_test_l_rr(d,s);; - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,test_w_rr,(RR2 d, RR2 s)) -{ - CLOBBER_TEST; - d=readreg(d,2); - s=readreg(s,2); - - raw_test_w_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,test_b_rr,(RR1 d, RR1 s)) -{ - CLOBBER_TEST; - d=readreg(d,1); - s=readreg(s,1); - - raw_test_b_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) -{ - if (isconst(d) && !needflags) { - live.state[d].val &= i; - return; - } - - CLOBBER_AND; - d=rmw(d,4,4); - - raw_and_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,and_l,(RW4 d, RR4 s)) -{ - CLOBBER_AND; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_and_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,and_w,(RW2 d, RR2 s)) -{ - CLOBBER_AND; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_and_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,and_b,(RW1 d, RR1 s)) -{ - CLOBBER_AND; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_and_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) -{ - if (isconst(d) && !needflags) { - live.state[d].val|=i; - return; - } - CLOBBER_OR; - d=rmw(d,4,4); - - raw_or_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,or_l,(RW4 d, RR4 s)) -{ - if (isconst(d) && isconst(s) && !needflags) { - live.state[d].val|=live.state[s].val; - return; - } - CLOBBER_OR; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_or_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,or_w,(RW2 d, RR2 s)) -{ - CLOBBER_OR; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_or_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,or_b,(RW1 d, RR1 s)) -{ - CLOBBER_OR; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_or_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,adc_l,(RW4 d, RR4 s)) -{ - CLOBBER_ADC; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_adc_l(d,s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,adc_w,(RW2 d, RR2 s)) -{ - CLOBBER_ADC; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_adc_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,adc_b,(RW1 d, RR1 s)) -{ - CLOBBER_ADC; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_adc_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,add_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(add_l_ri)(d,live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_add_l(d,s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,add_w,(RW2 d, RR2 s)) -{ - if (isconst(s)) { - COMPCALL(add_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_add_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,add_b,(RW1 d, RR1 s)) -{ - if (isconst(s)) { - COMPCALL(add_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_ADD; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_add_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(d) && !needflags) { - live.state[d].val-=i; - return; - } -#if USE_OFFSET - if (!needflags) { - add_offset(d,-i); - return; - } -#endif - - CLOBBER_SUB; - d=rmw(d,4,4); - - raw_sub_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_SUB; - d=rmw(d,2,2); - - raw_sub_w_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_SUB; - d=rmw(d,1,1); - - raw_sub_b_ri(d,i); - - unlock2(d); -} - -MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) -{ - if (!i && !needflags) - return; - if (isconst(d) && !needflags) { - live.state[d].val+=i; - return; - } -#if USE_OFFSET - if (!needflags) { - add_offset(d,i); - return; - } -#endif - CLOBBER_ADD; - d=rmw(d,4,4); - raw_add_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_ADD; - d=rmw(d,2,2); - - raw_add_w_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) -{ - if (!i && !needflags) - return; - - CLOBBER_ADD; - d=rmw(d,1,1); - - raw_add_b_ri(d,i); - - unlock2(d); -} - -MIDFUNC(2,sbb_l,(RW4 d, RR4 s)) -{ - CLOBBER_SBB; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_sbb_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sbb_w,(RW2 d, RR2 s)) -{ - CLOBBER_SBB; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_sbb_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sbb_b,(RW1 d, RR1 s)) -{ - CLOBBER_SBB; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_sbb_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sub_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(sub_l_ri)(d,live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_sub_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sub_w,(RW2 d, RR2 s)) -{ - if (isconst(s)) { - COMPCALL(sub_w_ri)(d,(uae_u16)live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_sub_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,sub_b,(RW1 d, RR1 s)) -{ - if (isconst(s)) { - COMPCALL(sub_b_ri)(d,(uae_u8)live.state[s].val); - return; - } - - CLOBBER_SUB; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_sub_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,cmp_l,(RR4 d, RR4 s)) -{ - CLOBBER_CMP; - s=readreg(s,4); - d=readreg(d,4); - - raw_cmp_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,cmp_w,(RR2 d, RR2 s)) -{ - CLOBBER_CMP; - s=readreg(s,2); - d=readreg(d,2); - - raw_cmp_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,cmp_b,(RR1 d, RR1 s)) -{ - CLOBBER_CMP; - s=readreg(s,1); - d=readreg(d,1); - - raw_cmp_b(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,xor_l,(RW4 d, RR4 s)) -{ - CLOBBER_XOR; - s=readreg(s,4); - d=rmw(d,4,4); - - raw_xor_l(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,xor_w,(RW2 d, RR2 s)) -{ - CLOBBER_XOR; - s=readreg(s,2); - d=rmw(d,2,2); - - raw_xor_w(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,xor_b,(RW1 d, RR1 s)) -{ - CLOBBER_XOR; - s=readreg(s,1); - d=rmw(d,1,1); - - raw_xor_b(d,s); - unlock2(d); - unlock2(s); -} - -#if defined(UAE) -MIDFUNC(5,call_r_02,(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)) -{ - clobber_flags(); - in1=readreg_specific(in1,isize1,REG_PAR1); - in2=readreg_specific(in2,isize2,REG_PAR2); - r=readreg(r,4); - prepare_for_call_1(); - unlock2(r); - unlock2(in1); - unlock2(in2); - prepare_for_call_2(); - compemu_raw_call_r(r); -} -#endif - -#if defined(UAE) -MIDFUNC(5,call_r_11,(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)) -{ - clobber_flags(); - - if (osize==4) { - if (out1!=in1 && out1!=r) { - COMPCALL(forget_about)(out1); - } - } - else { - tomem_c(out1); - } - - in1=readreg_specific(in1,isize,REG_PAR1); - r=readreg(r,4); - - prepare_for_call_1(); - unlock2(in1); - unlock2(r); - - prepare_for_call_2(); - - compemu_raw_call_r(r); - - live.nat[REG_RESULT].holds[0]=out1; - live.nat[REG_RESULT].nholds=1; - live.nat[REG_RESULT].touched=touchcnt++; - - live.state[out1].realreg=REG_RESULT; - live.state[out1].realind=0; - live.state[out1].val=0; - live.state[out1].validsize=osize; - live.state[out1].dirtysize=osize; - set_status(out1,DIRTY); -} -#endif - -MIDFUNC(0,nop,(void)) -{ - raw_emit_nop(); -} - -/* forget_about() takes a mid-layer register */ -MIDFUNC(1,forget_about,(W4 r)) -{ - if (isinreg(r)) - disassociate(r); - live.state[r].val=0; - set_status(r,UNDEF); -} - -MIDFUNC(1,f_forget_about,(FW r)) -{ - if (f_isinreg(r)) - f_disassociate(r); - live.fate[r].status=UNDEF; -} - -// ARM optimized functions - -MIDFUNC(2,arm_ADD_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(arm_ADD_l_ri)(d,live.state[s].val); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - raw_ADD_l_rr(d,s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_ADD_l_ri,(RW4 d, IMM i)) -{ - if (!i) return; - if (isconst(d)) { - live.state[d].val+=i; - return; - } -#if USE_OFFSET - add_offset(d,i); - return; -#endif - d=rmw(d,4,4); - - raw_LDR_l_ri(REG_WORK1, i); - raw_ADD_l_rr(d,REG_WORK1); - unlock2(d); -} - -MIDFUNC(2,arm_ADD_l_ri8,(RW4 d, IMM i)) -{ - if (!i) return; - if (isconst(d)) { - live.state[d].val+=i; - return; - } -#if USE_OFFSET - add_offset(d,i); - return; -#endif - d=rmw(d,4,4); - - raw_ADD_l_rri(d,d,i); - unlock2(d); -} - -MIDFUNC(2,arm_SUB_l_ri8,(RW4 d, IMM i)) -{ - if (!i) return; - if (isconst(d)) { - live.state[d].val-=i; - return; - } -#if USE_OFFSET - add_offset(d,-i); - return; -#endif - d=rmw(d,4,4); - - raw_SUB_l_rri(d,d,i); - unlock2(d); -} - -MIDFUNC(2,arm_AND_l,(RW4 d, RR4 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - raw_AND_l_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_AND_w,(RW2 d, RR2 s)) -{ - s=readreg(s,2); - d=rmw(d,2,2); - - raw_AND_w_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_AND_b,(RW1 d, RR1 s)) -{ - s=readreg(s,1); - d=rmw(d,1,1); - - raw_AND_b_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_AND_l_ri8,(RW4 d, IMM i)) -{ - if (isconst(d)) { - live.state[d].val &= i; - return; - } - - d=rmw(d,4,4); - - raw_AND_l_ri(d,i); - unlock2(d); -} - -MIDFUNC(2,arm_EOR_b,(RW1 d, RR1 s)) -{ - s=readreg(s,1); - d=rmw(d,1,1); - - raw_EOR_b_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_EOR_l,(RW4 d, RR4 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - raw_EOR_l_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_EOR_w,(RW2 d, RR2 s)) -{ - s=readreg(s,2); - d=rmw(d,2,2); - - raw_EOR_w_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_ORR_b,(RW1 d, RR1 s)) -{ - s=readreg(s,1); - d=rmw(d,1,1); - - raw_ORR_b_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_ORR_l,(RW4 d, RR4 s)) -{ - if (isconst(d) && isconst(s)) { - live.state[d].val|=live.state[s].val; - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - raw_ORR_l_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_ORR_w,(RW2 d, RR2 s)) -{ - s=readreg(s,2); - d=rmw(d,2,2); - - raw_ORR_w_rr(d,s); - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,arm_ROR_l_ri8,(RW4 r, IMM i)) -{ - if (!i) - return; - - r=rmw(r,4,4); - raw_ROR_l_ri(r,i); - unlock2(r); -} - -// Other -static inline void flush_cpu_icache(void *start, void *stop) -{ - - register void *_beg __asm ("a1") = start; - register void *_end __asm ("a2") = stop; - register void *_flg __asm ("a3") = 0; -#ifdef __ARM_EABI__ - register unsigned long _scno __asm ("r7") = 0xf0002; - __asm __volatile ("swi 0x0 @ sys_cacheflush" - : "=r" (_beg) - : "0" (_beg), "r" (_end), "r" (_flg), "r" (_scno)); -#else - __asm __volatile ("swi 0x9f0002 @ sys_cacheflush" - : "=r" (_beg) - : "0" (_beg), "r" (_end), "r" (_flg)); -#endif -} - -static inline void write_jmp_target(uae_u32* jmpaddr, cpuop_func* a) { - *(jmpaddr) = (uae_u32) a; - flush_cpu_icache((void *) jmpaddr, (void *) &jmpaddr[1]); -} - -static inline void emit_jmp_target(uae_u32 a) { - emit_long((uae_u32) a); -} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h deleted file mode 100644 index baedb153c..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm.h +++ /dev/null @@ -1,186 +0,0 @@ -/* - * compiler/compemu_midfunc_arm.h - Native MIDFUNCS for ARM - * - * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2002 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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: - * File is included by compemu.h - * - */ - -// Arm optimized midfunc -DECLARE_MIDFUNC(arm_ADD_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(arm_ADD_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(arm_ADD_l_ri8(RW4 d, IMM i)); -DECLARE_MIDFUNC(arm_SUB_l_ri8(RW4 d, IMM i)); -DECLARE_MIDFUNC(arm_AND_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(arm_AND_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(arm_AND_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(arm_AND_l_ri8(RW4 d, IMM i)); -DECLARE_MIDFUNC(arm_EOR_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(arm_EOR_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(arm_EOR_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(arm_ORR_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(arm_ORR_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(arm_ORR_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(arm_ROR_l_ri8(RW4 r, IMM i)); - -// Emulated midfunc -DECLARE_MIDFUNC(bt_l_ri(RR4 r, IMM i)); -DECLARE_MIDFUNC(bt_l_rr(RR4 r, RR4 b)); -DECLARE_MIDFUNC(btc_l_rr(RW4 r, RR4 b)); -DECLARE_MIDFUNC(bts_l_rr(RW4 r, RR4 b)); -DECLARE_MIDFUNC(btr_l_rr(RW4 r, RR4 b)); -DECLARE_MIDFUNC(mov_l_rm(W4 d, IMM s)); -DECLARE_MIDFUNC(mov_l_rm_indexed(W4 d, IMM base, RR4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(mov_w_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(mov_b_mi(IMM d, IMM s)); -DECLARE_MIDFUNC(rol_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(rol_l_rr(RW4 d, RR1 r)); -DECLARE_MIDFUNC(rol_w_rr(RW2 d, RR1 r)); -DECLARE_MIDFUNC(rol_b_rr(RW1 d, RR1 r)); -DECLARE_MIDFUNC(rol_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shll_l_rr(RW4 d, RR1 r)); -DECLARE_MIDFUNC(shll_w_rr(RW2 d, RR1 r)); -DECLARE_MIDFUNC(shll_b_rr(RW1 d, RR1 r)); -DECLARE_MIDFUNC(ror_b_ri(RR1 r, IMM i)); -DECLARE_MIDFUNC(ror_w_ri(RR2 r, IMM i)); -DECLARE_MIDFUNC(ror_l_ri(RR4 r, IMM i)); -DECLARE_MIDFUNC(ror_l_rr(RR4 d, RR1 r)); -DECLARE_MIDFUNC(ror_w_rr(RR2 d, RR1 r)); -DECLARE_MIDFUNC(ror_b_rr(RR1 d, RR1 r)); -DECLARE_MIDFUNC(shrl_l_rr(RW4 d, RR1 r)); -DECLARE_MIDFUNC(shrl_w_rr(RW2 d, RR1 r)); -DECLARE_MIDFUNC(shrl_b_rr(RW1 d, RR1 r)); -DECLARE_MIDFUNC(shra_l_rr(RW4 d, RR1 r)); -DECLARE_MIDFUNC(shra_w_rr(RW2 d, RR1 r)); -DECLARE_MIDFUNC(shra_b_rr(RW1 d, RR1 r)); -DECLARE_MIDFUNC(shll_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shll_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shll_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(shrl_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shrl_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shrl_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(shra_l_ri(RW4 r, IMM i)); -DECLARE_MIDFUNC(shra_w_ri(RW2 r, IMM i)); -DECLARE_MIDFUNC(shra_b_ri(RW1 r, IMM i)); -DECLARE_MIDFUNC(setcc(W1 d, IMM cc)); -DECLARE_MIDFUNC(setcc_m(IMM d, IMM cc)); -DECLARE_MIDFUNC(cmov_l_rr(RW4 d, RR4 s, IMM cc)); -DECLARE_MIDFUNC(bsf_l_rr(W4 d, RR4 s)); -DECLARE_MIDFUNC(pop_l(W4 d)); -DECLARE_MIDFUNC(push_l(RR4 s)); -DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, RR2 s)); -DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, RR1 s)); -DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, RR2 s)); -DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, RR1 s)); -DECLARE_MIDFUNC(simulate_bsf(W4 tmp, RW4 s)); -DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); -DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); -DECLARE_MIDFUNC(imul_32_32(RW4 d, RR4 s)); -DECLARE_MIDFUNC(mov_b_rr(W1 d, RR1 s)); -DECLARE_MIDFUNC(mov_w_rr(W2 d, RR2 s)); -DECLARE_MIDFUNC(mov_l_rR(W4 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_rR(W2 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_l_brR(W4 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_brR(W2 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_brR(W1 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_l_Ri(RR4 d, IMM i, IMM offset)); -DECLARE_MIDFUNC(mov_w_Ri(RR4 d, IMM i, IMM offset)); -DECLARE_MIDFUNC(mov_l_Rr(RR4 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_Rr(RR4 d, RR2 s, IMM offset)); -DECLARE_MIDFUNC(lea_l_brr(W4 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(lea_l_brr_indexed(W4 d, RR4 s, RR4 index, IMM factor, IMM offset)); -DECLARE_MIDFUNC(lea_l_rr_indexed(W4 d, RR4 s, RR4 index, IMM factor)); -DECLARE_MIDFUNC(mov_l_bRr(RR4 d, RR4 s, IMM offset)); -DECLARE_MIDFUNC(mov_w_bRr(RR4 d, RR2 s, IMM offset)); -DECLARE_MIDFUNC(mov_b_bRr(RR4 d, RR1 s, IMM offset)); -DECLARE_MIDFUNC(mid_bswap_32(RW4 r)); -DECLARE_MIDFUNC(mid_bswap_16(RW2 r)); -DECLARE_MIDFUNC(mov_l_rr(W4 d, RR4 s)); -DECLARE_MIDFUNC(mov_l_mr(IMM d, RR4 s)); -DECLARE_MIDFUNC(mov_w_mr(IMM d, RR2 s)); -DECLARE_MIDFUNC(mov_w_rm(W2 d, IMM s)); -DECLARE_MIDFUNC(mov_b_mr(IMM d, RR1 s)); -DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); -DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); -DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); -DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); -DECLARE_MIDFUNC(test_l_ri(RR4 d, IMM i)); -DECLARE_MIDFUNC(test_l_rr(RR4 d, RR4 s)); -DECLARE_MIDFUNC(test_w_rr(RR2 d, RR2 s)); -DECLARE_MIDFUNC(test_b_rr(RR1 d, RR1 s)); -DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(and_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(and_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(and_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(or_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(or_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(or_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(or_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(adc_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(adc_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(adc_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(add_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(add_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(add_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(sub_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(sub_w_ri(RW2 d, IMM i)); -DECLARE_MIDFUNC(sub_b_ri(RW1 d, IMM i)); -DECLARE_MIDFUNC(add_l_ri(RW4 d, IMM i)); -DECLARE_MIDFUNC(add_w_ri(RW2 d, IMM i)); -DECLARE_MIDFUNC(add_b_ri(RW1 d, IMM i)); -DECLARE_MIDFUNC(sbb_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(sbb_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(sbb_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(sub_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(sub_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(sub_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(cmp_l(RR4 d, RR4 s)); -DECLARE_MIDFUNC(cmp_w(RR2 d, RR2 s)); -DECLARE_MIDFUNC(cmp_b(RR1 d, RR1 s)); -DECLARE_MIDFUNC(xor_l(RW4 d, RR4 s)); -DECLARE_MIDFUNC(xor_w(RW2 d, RR2 s)); -DECLARE_MIDFUNC(xor_b(RW1 d, RR1 s)); -DECLARE_MIDFUNC(call_r_02(RR4 r, RR4 in1, RR4 in2, IMM isize1, IMM isize2)); -DECLARE_MIDFUNC(call_r_11(W4 out1, RR4 r, RR4 in1, IMM osize, IMM isize)); -DECLARE_MIDFUNC(live_flags(void)); -DECLARE_MIDFUNC(dont_care_flags(void)); -DECLARE_MIDFUNC(duplicate_carry(void)); -DECLARE_MIDFUNC(restore_carry(void)); -DECLARE_MIDFUNC(start_needflags(void)); -DECLARE_MIDFUNC(end_needflags(void)); -DECLARE_MIDFUNC(make_flags_live(void)); -DECLARE_MIDFUNC(forget_about(W4 r)); -DECLARE_MIDFUNC(nop(void)); - -DECLARE_MIDFUNC(f_forget_about(FW r)); - - - - diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp deleted file mode 100644 index 5f55d1bf9..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.cpp +++ /dev/null @@ -1,5195 +0,0 @@ -/* - * compiler/compemu_midfunc_arm.cpp - Native MIDFUNCS for ARM (JIT v2) - * - * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2002 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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: - * File is included by compemu_support.cpp - * - */ - -const uae_u32 ARM_CCR_MAP[] = { 0, ARM_C_FLAG, // 1 C - ARM_V_FLAG, // 2 V - ARM_C_FLAG | ARM_V_FLAG, // 3 VC - ARM_Z_FLAG, // 4 Z - ARM_Z_FLAG | ARM_C_FLAG, // 5 ZC - ARM_Z_FLAG | ARM_V_FLAG, // 6 ZV - ARM_Z_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 7 ZVC - ARM_N_FLAG, // 8 N - ARM_N_FLAG | ARM_C_FLAG, // 9 NC - ARM_N_FLAG | ARM_V_FLAG, // 10 NV - ARM_N_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 11 NVC - ARM_N_FLAG | ARM_Z_FLAG, // 12 NZ - ARM_N_FLAG | ARM_Z_FLAG | ARM_C_FLAG, // 13 NZC - ARM_N_FLAG | ARM_Z_FLAG | ARM_V_FLAG, // 14 NZV - ARM_N_FLAG | ARM_Z_FLAG | ARM_C_FLAG | ARM_V_FLAG, // 15 NZVC - }; - -// First we start with some helper functions (may be moved to codegen_arm) -static inline void UNSIGNED8_IMM_2_REG(W4 r, IMM v) { - MOV_ri8(r, (uint8) v); -} - -static inline void SIGNED8_IMM_2_REG(W4 r, IMM v) { - if (v & 0x80) { - MVN_ri8(r, (uint8) ~v); - } else { - MOV_ri8(r, (uint8) v); - } -} - -static inline void UNSIGNED16_IMM_2_REG(W4 r, IMM v) { - MOV_ri8(r, (uint8) v); - ORR_rri8RORi(r, r, (uint8)(v >> 8), 24); -} - -static inline void SIGNED16_IMM_2_REG(W4 r, IMM v) { -#if defined(ARMV6_ASSEMBLY) - MOV_ri8(r, (uint8) v); - ORR_rri8RORi(r, r, (uint8)(v >> 8), 24); - SXTH_rr(r, r); -#else - MOV_ri8(r, (uint8)(v << 16)); - ORR_rri8RORi(r, r, (uint8)(v >> 8), 8); - ASR_rri(r, r, 16); -#endif -} - -static inline void UNSIGNED8_REG_2_REG(W4 d, RR4 s) { -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(d, s); -#else - ROR_rri(d, s, 8); - LSR_rri(d, d, 24); -#endif -} - -static inline void SIGNED8_REG_2_REG(W4 d, RR4 s) { -#if defined(ARMV6_ASSEMBLY) - SXTB_rr(d, s); -#else - ROR_rri(d, s, 8); - ASR_rri(d, d, 24); -#endif -} - -static inline void UNSIGNED16_REG_2_REG(W4 d, RR4 s) { -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(d, s); -#else - LSL_rri(d, s, 16); - LSR_rri(d, d, 16); -#endif -} - -static inline void SIGNED16_REG_2_REG(W4 d, RR4 s) { -#if defined(ARMV6_ASSEMBLY) - SXTH_rr(d, s); -#else - LSL_rri(d, s, 16); - ASR_rri(d, d, 16); -#endif -} - -#define ZERO_EXTEND_8_REG_2_REG(d,s) UNSIGNED8_REG_2_REG(d,s) -#define ZERO_EXTEND_16_REG_2_REG(d,s) UNSIGNED16_REG_2_REG(d,s) -#define SIGN_EXTEND_8_REG_2_REG(d,s) SIGNED8_REG_2_REG(d,s) -#define SIGN_EXTEND_16_REG_2_REG(d,s) SIGNED16_REG_2_REG(d,s) - -MIDFUNC(0,restore_inverted_carry,(void)) -{ - RR4 r=readreg(FLAGX,4); - MRS_CPSR(REG_WORK1); - TEQ_ri(r,1); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_C_FLAG); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSRf_r(REG_WORK1); - unlock2(r); -} - -/* - * ADD - * Operand Syntax: , Dn - * Dn, - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if an overflow is generated. Cleared otherwise. - * C Set if a carry is generated. Cleared otherwise. - * - */ -MIDFUNC(3,jnf_ADD_imm,(W4 d, RR4 s, IMM v)) -{ - if (isconst(s)) { - set_const(d,live.state[s].val+v); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - compemu_raw_mov_l_ri(REG_WORK1, v); - ADD_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ADD,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jnf_ADD_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - ADD_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADD_b_imm,(W4 d, RR1 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_IMM_2_REG(REG_WORK2, (uint8)v); - SIGNED8_REG_2_REG(REG_WORK1, s); - ADDS_rrr(d,REG_WORK1,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ADD_b,(W4 d, RR1 s, RR1 v)) -{ - if (isconst(v)) { - COMPCALL(jff_ADD_b_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - ADDS_rrr(d,REG_WORK1,REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADD_w_imm,(W4 d, RR2 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_IMM_2_REG(REG_WORK2, (uint16)v); - SIGNED16_REG_2_REG(REG_WORK1, s); - ADDS_rrr(d,REG_WORK1,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ADD_w,(W4 d, RR2 s, RR2 v)) -{ - if (isconst(v)) { - COMPCALL(jff_ADD_w_imm)(d,s,live.state[v].val); - return; - } - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - ADDS_rrr(d,REG_WORK1,REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADD_l_imm,(W4 d, RR4 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - compemu_raw_mov_l_ri(REG_WORK2, v); - ADDS_rrr(d,s,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ADD_l,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jff_ADD_l_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - ADDS_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -/* - * ADDA - * Operand Syntax: , An - * - * Operand Size: 16,32 - * - * Flags: Not affected. - * - */ -MIDFUNC(2,jnf_ADDA_b,(W4 d, RR1 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - SIGNED8_REG_2_REG(REG_WORK1,s); - ADD_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_ADDA_w,(W4 d, RR2 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - SIGNED16_REG_2_REG(REG_WORK1,s); - ADD_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_ADDA_l,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - ADD_rrr(d,d,s); - - unlock2(d); - unlock2(s); -} - -/* - * ADDX - * Operand Syntax: Dy, Dx - * -(Ay), -(Ax) - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Cleared if the result is nonzero; unchanged otherwise. - * V Set if an overflow is generated. Cleared otherwise. - * C Set if a carry is generated. Cleared otherwise. - * - * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise - * - */ -MIDFUNC(3,jnf_ADDX,(W4 d, RR4 s, RR4 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - ADC_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADDX_b,(W4 d, RR1 s, RR1 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - PUSH(REG_WORK2); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - ADCS_rrr(d,REG_WORK1,REG_WORK2); - - POP(REG_WORK2); - MRS_CPSR(REG_WORK1); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADDX_w,(W4 d, RR2 s, RR2 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - PUSH(REG_WORK2); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - ADCS_rrr(d,REG_WORK1,REG_WORK2); - - POP(REG_WORK2); - MRS_CPSR(REG_WORK1); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_ADDX_l,(W4 d, RR4 s, RR4 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - PUSH(REG_WORK2); - - ADCS_rrr(d,s,v); - - POP(REG_WORK2); - MRS_CPSR(REG_WORK1); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -/* - * ANDI - * Operand Syntax: #, CCR - * - * Operand Size: 8 - * - * X Cleared if bit 4 of immediate operand is zero. Unchanged otherwise. - * N Cleared if bit 3 of immediate operand is zero. Unchanged otherwise. - * Z Cleared if bit 2 of immediate operand is zero. Unchanged otherwise. - * V Cleared if bit 1 of immediate operand is zero. Unchanged otherwise. - * C Cleared if bit 0 of immediate operand is zero. Unchanged otherwise. - * - */ -MIDFUNC(1,jff_ANDSR,(IMM s, IMM x)) -{ - MRS_CPSR(REG_WORK1); - AND_rri(REG_WORK1, REG_WORK1, s); - MSR_CPSRf_r(REG_WORK1); - - if (!x) { - compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); - MOV_ri(REG_WORK2, 0); - STRB_rR(REG_WORK2, REG_WORK1); - } -} - -/* - * AND - * Operand Syntax: , Dn - * Dn, - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the most significant bit of the result is set. - * Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(3,jnf_AND,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(s) && isconst(v)) { - set_const(d, - live.state[s].val&live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - AND_rrr(d, s, v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_AND_b,(W4 d, RR1 s, RR1 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - ANDS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_AND_w,(W4 d, RR2 s, RR2 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - ANDS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_AND_l,(W4 d, RR4 s, RR4 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - ANDS_rrr(d, s,v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -/* - * ASL - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. - * C Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * - */ -MIDFUNC(3,jff_ASL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d, s, 24); - if (i) { - MRS_CPSR(REG_WORK1); // store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except N & Z - PUSH(REG_WORK1); - - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rri(REG_WORK2, REG_WORK2, (i+1)); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, d, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// restore flags - - LSLS_rri(d,d,i); - } else { - MSR_CPSRf_i(0); - TST_rr(d,d); - } - REV_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d, s, 16); - if (i) { - MRS_CPSR(REG_WORK1); // store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except N & Z - PUSH(REG_WORK1); - - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rri(REG_WORK2, REG_WORK2, (i+1)); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, d, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// retore flags - - LSLS_rri(d,d,i); - } else { - MSR_CPSRf_i(0); - TST_rr(d,d); - } - ASR_rri(d,d, 16); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i) { - MRS_CPSR(REG_WORK1); // store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C - PUSH(REG_WORK1); - - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rri(REG_WORK2, REG_WORK2, (i+1)); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, s, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// retore flags - - LSLS_rri(d,s,i); - } else { - MSR_CPSRf_i(0); - MOVS_rr(d, s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASL_b_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - // Calculate V Flag - MRS_CPSR(REG_WORK1);// store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C - PUSH(REG_WORK1); - - LSL_rri(d, s, 24); - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rrr(REG_WORK2, REG_WORK2, i); - LSR_rri(REG_WORK2, REG_WORK2, 1); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, d, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// retore flags - - AND_rri(REG_WORK2, i, 63); - LSLS_rrr(d,d,REG_WORK2); - ASR_rri(d,d, 24); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ASL_w_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - // Calculate V Flag - MRS_CPSR(REG_WORK1);// store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except c - PUSH(REG_WORK1); - - LSL_rri(d, s, 16); - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rrr(REG_WORK2, REG_WORK2, i); - LSR_rri(REG_WORK2, REG_WORK2, 1); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, d, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// retore flags - - AND_rri(REG_WORK2, i, 63); - LSLS_rrr(d,d,REG_WORK2); - ASR_rri(d,d, 16); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ASL_l_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - // Calculate V Flag - MRS_CPSR(REG_WORK1);// store flags - BIC_rri(REG_WORK1, REG_WORK1, ARM_N_FLAG|ARM_Z_FLAG|ARM_V_FLAG);// Clear everything except C - PUSH(REG_WORK1); - - // Calculate V Flag - MVN_ri(REG_WORK2, 0); - LSR_rrr(REG_WORK2, REG_WORK2, i); - LSR_rri(REG_WORK2, REG_WORK2, 1); - MVN_rr(REG_WORK2, REG_WORK2); - AND_rrr(REG_WORK1, s, REG_WORK2); - TST_rr(REG_WORK1, REG_WORK1); - CC_TEQ_rr(NATIVE_CC_NE, REG_WORK1, REG_WORK2); - POP(REG_WORK1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - - MSR_CPSRf_r(REG_WORK1);// retore flags - - AND_rri(REG_WORK2, i, 63); - LSLS_rrr(d,s,REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ASLW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Set according to the last bit shifted out of the operand. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. - * C Set according to the last bit shifted out of the operand. - * - */ -MIDFUNC(2,jnf_ASLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_ASLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - LSLS_rri(d,s,17); - - MRS_CPSR(REG_WORK1); - CC_ORR_rri(NATIVE_CC_MI, REG_WORK1, REG_WORK1, ARM_V_FLAG); - CC_EOR_rri(NATIVE_CC_CS, REG_WORK1, REG_WORK1, ARM_V_FLAG); - MSR_CPSRf_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -/* - * ASR - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. - * C Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * - */ -MIDFUNC(3,jnf_ASR_b_imm,(W4 d, RR4 s, IMM i)) -{ - if (!i) return; - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - ASR_rri(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ASR_w_imm,(W4 d, RR4 s, IMM i)) -{ - if (!i) return; - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - ASR_rri(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ASR_l_imm,(W4 d, RR4 s, IMM i)) -{ - if (!i) return; - - s=readreg(s,4); - d=writereg(d,4); - - ASR_rri(d,s,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASR_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - if (i) { - MSR_CPSRf_i(0); - ASRS_rri(d,d,i); - } else { - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - TST_rr(d,d); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASR_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - if (i) { - MSR_CPSRf_i(0); - ASRS_rri(d,d,i); - } else { - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - TST_rr(d,d); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ASR_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i) { - MSR_CPSRf_i(0); - ASRS_rri(d,s,i); - } else { - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - TST_rr(s,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ASR_b_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - AND_rri(REG_WORK1, i, 63); - ASR_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ASR_w_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - AND_rri(REG_WORK1, i, 63); - ASR_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ASR_l_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 63); - ASR_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ASR_b_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - ASRS_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ASR_w_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - ASRS_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ASR_l_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - ASRS_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ASRW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Set according to the last bit shifted out of the operand. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if the most significant bit is changed at any time during the shift operation. Cleared otherwise. - * C Set according to the last bit shifted out of the operand. - * - */ -MIDFUNC(2,jnf_ASRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - ASR_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_ASRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - MSR_CPSRf_i(0); - ASR_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -/* - * BCHG - * Operand Syntax: Dn, - * #, - * - * Operand Size: 8,32 - * - * X Not affected. - * N Not affected. - * Z Set if the bit tested is zero. Cleared otherwise. - * V Not affected. - * C Not affected. - * - */ -MIDFUNC(2,jnf_BCHG_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - EOR_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BCHG_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - EOR_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BCHG_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BCHG_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - EOR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_BCHG_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BCHG_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - EOR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BCHG_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - EOR_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BCHG_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - EOR_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BCHG_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BCHG_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - EOR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BCHG_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BCHG_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - EOR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -/* - * BCLR - * Operand Syntax: Dn, - * #, - * - * Operand Size: 8,32 - * - * X Not affected. - * N Not affected. - * Z Set if the bit tested is zero. Cleared otherwise. - * V Not affected. - * C Not affected. - * - */ -MIDFUNC(2,jnf_BCLR_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - BIC_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BCLR_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - BIC_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BCLR_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BCLR_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - BIC_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_BCLR_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BCLR_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - BIC_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BCLR_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - BIC_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BCLR_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - BIC_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BCLR_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BCLR_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - BIC_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BCLR_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BCLR_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - BIC_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -/* - * BSET - * Operand Syntax: Dn, - * #, - * - * Operand Size: 8,32 - * - * X Not affected. - * N Not affected. - * Z Set if the bit tested is zero. Cleared otherwise. - * V Not affected. - * C Not affected. - * - */ -MIDFUNC(2,jnf_BSET_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - ORR_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BSET_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - ORR_rri(d,d,(1 << s)); - unlock2(d); -} - -MIDFUNC(2,jnf_BSET_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BSET_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - ORR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_BSET_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jnf_BSET_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - ORR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BSET_b_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - ORR_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BSET_l_imm,(RW4 d, IMM s)) -{ - d=rmw(d,4,4); - - uae_u32 v = (1 << s); - MRS_CPSR(REG_WORK1); - TST_ri(d,v); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - ORR_rri(d,d,v); - - unlock2(d); -} - -MIDFUNC(2,jff_BSET_b,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BSET_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - ORR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BSET_l,(RW4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BSET_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=rmw(d,4,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - ORR_rrr(d,d,REG_WORK2); - - unlock2(d); - unlock2(s); -} - -/* - * BTST - * Operand Syntax: Dn, - * #, - * - * Operand Size: 8,32 - * - * X Not affected - * N Not affected - * Z Set if the bit tested is zero. Cleared otherwise - * V Not affected - * C Not affected - * - */ -MIDFUNC(2,jff_BTST_b_imm,(RR4 d, IMM s)) -{ - d=readreg(d,4); - - MRS_CPSR(REG_WORK1); - TST_ri(d,(1 << s)); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); -} - -MIDFUNC(2,jff_BTST_l_imm,(RR4 d, IMM s)) -{ - d=readreg(d,4); - - MRS_CPSR(REG_WORK1); - TST_ri(d,(1 << s)); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); -} - -MIDFUNC(2,jff_BTST_b,(RR4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BTST_b_imm)(d,live.state[s].val&7); - return; - } - s=readreg(s,4); - d=readreg(d,4); - - AND_rri(REG_WORK1, s, 7); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_BTST_l,(RR4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_BTST_l_imm)(d,live.state[s].val&31); - return; - } - - s=readreg(s,4); - d=readreg(d,4); - - AND_rri(REG_WORK1, s, 31); - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - MRS_CPSR(REG_WORK1); - TST_rr(d,REG_WORK2); - CC_BIC_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - CC_ORR_rri(NATIVE_CC_EQ, REG_WORK1, REG_WORK1, ARM_Z_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -/* - * CLR - * Operand Syntax: - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Always cleared. - * Z Always set. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(1,jnf_CLR,(W4 d)) -{ - d=writereg(d,4); - MOV_ri(d,0); - unlock2(d); -} - -MIDFUNC(1,jff_CLR,(W4 d)) -{ - d=writereg(d,4); - MOV_ri(d,0); - MSR_CPSR_i(ARM_Z_FLAG); - unlock2(d); -} - -/* - * CMP - * Operand Syntax: , Dn - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if an overflow occurs. Cleared otherwise. - * C Set if a borrow occurs. Cleared otherwise. - * - */ -MIDFUNC(2,jff_CMP_b,(RR1 d, RR1 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - SIGNED8_REG_2_REG(REG_WORK1, d); - SIGNED8_REG_2_REG(REG_WORK2, s); - CMP_rr(REG_WORK1,REG_WORK2); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // inverted_carry = true; - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_CMP_w,(RR2 d, RR2 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - SIGNED16_REG_2_REG(REG_WORK1, d); - SIGNED16_REG_2_REG(REG_WORK2, s); - CMP_rr(REG_WORK1,REG_WORK2); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // inverted_carry = true; - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_CMP_l,(RR4 d, RR4 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - CMP_rr(d,s); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // inverted_carry = true; - - unlock2(s); - unlock2(d); -} - -/* - * CMPA - * Operand Syntax: , An - * - * Operand Size: 16,32 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if an overflow occurs. Cleared otherwise. - * C Set if a borrow occurs. Cleared otherwise. - * - */ -MIDFUNC(2,jff_CMPA_b,(RR1 d, RR1 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - SIGNED8_REG_2_REG(REG_WORK2, s); - CMP_rr(d,REG_WORK2); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // invertedcarry = true; - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_CMPA_w,(RR2 d, RR2 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - SIGNED16_REG_2_REG(REG_WORK2, s); - CMP_rr(d,REG_WORK2); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // invertedcarry = true; - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_CMPA_l,(RR4 d, RR4 s)) -{ - d=readreg(d,4); - s=readreg(s,4); - - CMP_rr(d,s); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - // invertedcarry = true; - - unlock2(s); - unlock2(d); -} - -/* - * EOR - * Operand Syntax: Dn, - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the most significant bit of the result is set. - * Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(3,jnf_EOR,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(s) && isconst(v)) { - set_const(d, - live.state[s].val^live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - EOR_rrr(d, s, v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_EOR_b,(W4 d, RR1 s, RR1 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - EORS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_EOR_w,(W4 d, RR2 s, RR2 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - EORS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_EOR_l,(W4 d, RR4 s, RR4 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - EORS_rrr(d, s,v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -/* - * EORI - * Operand Syntax: #, CCR - * - * Operand Size: 8 - * - * X — Changed if bit 4 of immediate operand is one; unchanged otherwise. - * N — Changed if bit 3 of immediate operand is one; unchanged otherwise. - * Z — Changed if bit 2 of immediate operand is one; unchanged otherwise. - * V — Changed if bit 1 of immediate operand is one; unchanged otherwise. - * C — Changed if bit 0 of immediate operand is one; unchanged otherwise. - * - */ -MIDFUNC(1,jff_EORSR,(IMM s, IMM x)) -{ - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, s); - MSR_CPSRf_r(REG_WORK1); - - if (x) { - compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); - LDRB_rR(REG_WORK2, REG_WORK1); - EOR_rri(REG_WORK2, REG_WORK2, 1); - STRB_rR(REG_WORK2, REG_WORK1); - } -} - -/* - * EXT - * Operand Syntax: - * - * Operand Size: 16,32 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(2,jnf_EXT_b,(W4 d, RR4 s)) -{ - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s8)live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_EXT_w,(W4 d, RR4 s)) -{ - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s8)live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_EXT_l,(W4 d, RR4 s)) -{ - if (isconst(s)) { - set_const(d,(uae_s32)(uae_s16)live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_EXT_b,(W4 d, RR4 s)) -{ - if (isconst(s)) { - d=writereg(d,4); - SIGNED8_IMM_2_REG(d, (uint8)live.state[s].val); - } else { - s=readreg(s,4); - d=writereg(d,4); - SIGNED8_REG_2_REG(d, s); - unlock2(s); - } - - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -MIDFUNC(2,jff_EXT_w,(W4 d, RR4 s)) -{ - if (isconst(s)) { - d=writereg(d,4); - SIGNED8_IMM_2_REG(d, (uint8)live.state[s].val); - } else { - s=readreg(s,4); - d=writereg(d,4); - SIGNED8_REG_2_REG(d, s); - unlock2(s); - } - - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -MIDFUNC(2,jff_EXT_l,(W4 d, RR4 s)) -{ - if (isconst(s)) { - d=writereg(d,4); - SIGNED16_IMM_2_REG(d, (uint16)live.state[s].val); - } else { - s=readreg(s,4); - d=writereg(d,4); - SIGNED16_REG_2_REG(d, s); - unlock2(s); - } - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -/* - * LSL - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. - * - */ -MIDFUNC(3,jnf_LSL_imm,(W4 d, RR4 s, IMM i)) -{ - if (!i) return; - - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_LSL_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 63); - LSL_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_LSL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED8_REG_2_REG(d, s); - MSR_CPSRf_i(0); - - REV_rr(d,d); - if (i) { - LSLS_rri(d,d,i); - } else { - TST_rr(d,d); - } - REV_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_LSL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - - LSL_rri(d,s,16); - if (i) { - LSLS_rri(d,d,i); - } else { - TST_rr(d,d); - } - LSR_rri(d,d,16); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_LSL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - if (i) { - LSLS_rri(d,s,i); - } else { - MOV_rr(d,s); - TST_rr(d,d); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_LSL_b_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED8_REG_2_REG(d,s); - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - REV_rr(d,d); - AND_rri(REG_WORK1, i, 63); - LSLS_rrr(d,d,REG_WORK1); - REV_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_LSL_w_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - LSL_rri(d, s, 16); - AND_rri(REG_WORK1, i, 63); - LSLS_rrr(d,d,REG_WORK1); - LSR_rri(d, d, 16); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_LSL_l_reg,(W4 d, RR4 s, RR4 i)) -{ - i=readreg(i,4); - s=readreg(s,4); - d=writereg(d,4); - - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - LSLS_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * LSLW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. - * - */ -MIDFUNC(2,jnf_LSLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_LSLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - LSLS_rri(d,s,17); - LSR_rri(d,d,16); - - unlock2(d); - unlock2(s); -} - -/* - * LSR - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit shifted out of the operand. - * Unaffected for a shift count of zero. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit shifted out of the operand. - * Cleared for a shift count of zero. - * - */ -MIDFUNC(3,jnf_LSR_b_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - if (!i) - return; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED8_REG_2_REG(d, s); - LSR_rri(d,d,i); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jnf_LSR_w_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - if (!i) - return; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED16_REG_2_REG(d, s); - LSR_rri(d,d,i); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jnf_LSR_l_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - if (!i) - return; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - LSR_rri(d,s,i); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jff_LSR_b_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED8_REG_2_REG(d, s); - MSR_CPSRf_i(0); - if (i) { - LSRS_rri(d,d,i); - } else { - TST_rr(d,d); - } - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jff_LSR_w_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED16_REG_2_REG(d, s); - MSR_CPSRf_i(0); - if (i) { - LSRS_rri(d,d,i); - } else { - TST_rr(d,d); - } - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jff_LSR_l_imm,(W4 d, RR4 s, IMM i)) -{ - int isrmw; - - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - MSR_CPSRf_i(0); - if (i) { - LSRS_rri(d,s,i); - } else { - TST_rr(s,s); - } - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } -} - -MIDFUNC(3,jnf_LSR_b_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED8_REG_2_REG(d, s); - AND_rri(REG_WORK1, i, 63); - LSR_rrr(d,d,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -MIDFUNC(3,jnf_LSR_w_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED16_REG_2_REG(d, s); - AND_rri(REG_WORK1, i, 63); - LSR_rrr(d,d,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -MIDFUNC(3,jnf_LSR_l_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - AND_rri(REG_WORK1, i, 63); - LSR_rrr(d,s,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -MIDFUNC(3,jff_LSR_b_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED8_REG_2_REG(d, s); - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - LSRS_rrr(d,d,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -MIDFUNC(3,jff_LSR_w_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - UNSIGNED16_REG_2_REG(d, s); - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - LSRS_rrr(d,d,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -MIDFUNC(3,jff_LSR_l_reg,(W4 d, RR4 s, RR4 i)) -{ - int isrmw; - - i=readreg(i,4); - isrmw=(s==d); - if (!isrmw) { - s=readreg(s,4); - d=writereg(d,4); - } - else { - s=d=rmw(s,4,4); - } - - CC_MSR_CPSRf_r(NATIVE_CC_CC, 0); // Clear everything except C - CC_MSR_CPSRf_r(NATIVE_CC_CS, ARM_C_FLAG);// Clear everything except C - AND_rri(REG_WORK1, i, 63); - LSRS_rrr(d,s,REG_WORK1); - - if (!isrmw) { - unlock2(d); - unlock2(s); - } - else { - unlock2(s); - } - unlock2(i); -} - -/* - * LSRW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Set according to the last bit shifted out of the operand. Unaffected for a shift count of zero. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit shifted out of the operand. Cleared for a shift count of zero. - * - */ -MIDFUNC(2,jnf_LSRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d, s); - LSR_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_LSRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d, s); - MSR_CPSRf_i(0); - LSR_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -/* - * MOVE - * Operand Syntax: , - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(2,jnf_MOVE,(W4 d, RR4 s)) -{ - if (isconst(s)) { - set_const(d,live.state[s].val); - return; - } - s=readreg(s,4); - d=writereg(d,4); - - MOV_rr(d, s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_MOVE_b_imm,(W4 d, IMM s)) -{ - d=writereg(d,4); - - SIGNED8_IMM_2_REG(d, (uint8)s); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -MIDFUNC(2,jff_MOVE_w_imm,(W4 d, IMM s)) -{ - d=writereg(d,4); - - SIGNED16_IMM_2_REG(d, (uint16)s); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -MIDFUNC(2,jff_MOVE_l_imm,(W4 d, IMM s)) -{ - d=writereg(d,4); - - compemu_raw_mov_l_ri(d, s); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -MIDFUNC(2,jff_MOVE_b,(W4 d, RR1 s)) -{ - if (isconst(s)) { - COMPCALL(jff_MOVE_b_imm)(d,live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(d, s); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_MOVE_w,(W4 d, RR2 s)) -{ - if (isconst(s)) { - COMPCALL(jff_MOVE_w_imm)(d,live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d, s); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_MOVE_l,(W4 d, RR4 s)) -{ - if (isconst(s)) { - COMPCALL(jff_MOVE_l_imm)(d,live.state[s].val); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - MOVS_rr(d,s); - - unlock2(d); - unlock2(s); -} - -/* - * MOVE16 - * - * Flags: Not affected. - * - */ -MIDFUNC(2,jnf_MOVE16,(RR4 d, RR4 s)) -{ - s=readreg(s,4); - d=readreg(d,4); - - BIC_rri(s, s, 0x000000FF); - BIC_rri(d, d, 0x000000FF); - - compemu_raw_mov_l_ri(REG_WORK1, (IMM)MEMBaseDiff); - ADD_rrr(s, s, REG_WORK1); - ADD_rrr(d, d, REG_WORK1); - - LDR_rRI(REG_WORK1, s, 8); - LDR_rRI(REG_WORK2, s, 12); - - PUSH_REGS((1<, An - * - * Operand Size: 16,32 - * - * Flags: Not affected. - * - */ -MIDFUNC(2,jnf_MOVEA_w,(W4 d, RR2 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(d,s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_MOVEA_l,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MOV_rr(d,s); - - unlock2(d); - unlock2(s); -} - -/* - * MULS - * Operand Syntax: , Dn - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if overflow. Cleared otherwise. (32 Bit multiply only) - * C Always cleared. - * - */ -MIDFUNC(2,jnf_MULS,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - SIGN_EXTEND_16_REG_2_REG(d,d); - SIGN_EXTEND_16_REG_2_REG(REG_WORK1,s); - MUL_rrr(d, d, REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULS,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - SIGN_EXTEND_16_REG_2_REG(d,d); - SIGN_EXTEND_16_REG_2_REG(REG_WORK1,s); - - MSR_CPSRf_i(0); - MULS_rrr(d, d, REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_MULS32,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - MUL_rrr(d, d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULS32,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - MSR_CPSRf_i(0); - // L, H, - SMULLS_rrrr(d, REG_WORK2, d, s); - MRS_CPSR(REG_WORK1); - TEQ_rrASRi(REG_WORK2,d,31); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - MSR_CPSRf_r(REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_MULS64,(RW4 d, RW4 s)) -{ - s = rmw(s, 4, 4); - d = rmw(d, 4, 4); - - // L, H, - SMULL_rrrr(d, s, d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULS64,(RW4 d, RW4 s)) -{ - s = rmw(s, 4, 4); - d = rmw(d, 4, 4); - - MSR_CPSRf_i(0); - // L, H, - SMULLS_rrrr(d, s, d, s); - MRS_CPSR(REG_WORK1); - TEQ_rrASRi(s,d,31); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - MSR_CPSRf_r(REG_WORK1); - - unlock2(s); - unlock2(d); -} - -/* - * MULU - * Operand Syntax: , Dn - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if overflow. Cleared otherwise. (32 Bit multiply only) - * C Always cleared. - * - */ -MIDFUNC(2,jnf_MULU,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - ZERO_EXTEND_16_REG_2_REG(d,d); - ZERO_EXTEND_16_REG_2_REG(REG_WORK1,s); - - MUL_rrr(d, d, REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULU,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - ZERO_EXTEND_16_REG_2_REG(d,d); - ZERO_EXTEND_16_REG_2_REG(REG_WORK1, s); - - MSR_CPSRf_i(0); - MULS_rrr(d, d, REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_MULU32,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - MUL_rrr(d, d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULU32,(RW4 d, RR4 s)) -{ - s = readreg(s, 4); - d = rmw(d, 4, 4); - - // L, H, - MSR_CPSRf_i(0); - UMULLS_rrrr(d, REG_WORK2, d, s); - MRS_CPSR(REG_WORK1); - TST_rr(REG_WORK2,REG_WORK2); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - MSR_CPSRf_r(REG_WORK1); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jnf_MULU64,(RW4 d, RW4 s)) -{ - s = rmw(s, 4, 4); - d = rmw(d, 4, 4); - - // L, H, - UMULL_rrrr(d, s, d, s); - - unlock2(s); - unlock2(d); -} - -MIDFUNC(2,jff_MULU64,(RW4 d, RW4 s)) -{ - s = rmw(s, 4, 4); - d = rmw(d, 4, 4); - - // L, H, - MSR_CPSRf_i(0); - UMULLS_rrrr(d, s, d, s); - MRS_CPSR(REG_WORK1); - TST_rr(s,s); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK1, REG_WORK1, ARM_V_FLAG); - MSR_CPSRf_r(REG_WORK1); - - unlock2(s); - unlock2(d); -} - -/* - * NEG - * Operand Syntax: - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if an overflow occurs. Cleared otherwise. - * C Cleared if the result is zero. Set otherwise. - * - */ -MIDFUNC(2,jnf_NEG,(W4 d, RR4 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - RSB_rri(d,s,0); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEG_b,(W4 d, RR1 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - RSBS_rri(d,REG_WORK1,0); - - // inverted_carry = true; - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEG_w,(W4 d, RR2 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - RSBS_rri(d,REG_WORK1,0); - - // inverted_carry = true; - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEG_l,(W4 d, RR4 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - RSBS_rri(d,s,0); - - // inverted_carry = true; - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -/* - * NEGX - * Operand Syntax: - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Cleared if the result is nonzero; unchanged otherwise. - * V Set if an overflow occurs. Cleared otherwise. - * C Cleared if the result is zero. Set otherwise. - * - * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise - * - */ -MIDFUNC(2,jnf_NEGX,(W4 d, RR4 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - RSC_rri(d,s,0); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEGX_b,(W4 d, RR1 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - MRS_CPSR(REG_WORK2); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - - SIGNED8_REG_2_REG(REG_WORK1, s); - RSCS_rri(d,REG_WORK1,0); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEGX_w,(W4 d, RR2 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - MRS_CPSR(REG_WORK2); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - - SIGNED16_REG_2_REG(REG_WORK1, s); - RSCS_rri(d,REG_WORK1,0); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NEGX_l,(W4 d, RR4 s)) -{ - d=writereg(d,4); - s=readreg(s,4); - - MRS_CPSR(REG_WORK2); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - - RSCS_rri(d,s,0); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); -} - -/* - * NOT - * Operand Syntax: - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(2,jnf_NOT,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MVN_rr(d,s); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NOT_b,(W4 d, RR1 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED8_REG_2_REG(d,s); - MSR_CPSRf_i(0); // Clear flags - MVNS_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NOT_w,(W4 d, RR2 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d,s); - MSR_CPSRf_i(0); // Clear flags - MVNS_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_NOT_l,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); // Clear flags - MVNS_rr(d,s); - - unlock2(d); - unlock2(s); -} - -/* - * OR - * Operand Syntax: , Dn - * Dn, - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(3,jnf_OR,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(s) && isconst(v)) { - set_const(d, - live.state[s].val|live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - ORR_rrr(d, s, v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_OR_b,(W4 d, RR1 s, RR1 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - ORRS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_OR_w,(W4 d, RR2 s, RR2 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - MSR_CPSRf_i(0); - ORRS_rrr(d, REG_WORK1, REG_WORK2); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_OR_l,(W4 d, RR4 s, RR4 v)) -{ - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - ORRS_rrr(d, s,v); - - unlock2(v); - unlock2(d); - unlock2(s); -} - -/* - * ORI - * Operand Syntax: #, CCR - * - * Operand Size: 8 - * - * X — Set if bit 4 of immediate operand is one; unchanged otherwise. - * N — Set if bit 3 of immediate operand is one; unchanged otherwise. - * Z — Set if bit 2 of immediate operand is one; unchanged otherwise. - * V — Set if bit 1 of immediate operand is one; unchanged otherwise. - * C — Set if bit 0 of immediate operand is one; unchanged otherwise. - * - */ -MIDFUNC(1,jff_ORSR,(IMM s, IMM x)) -{ - MRS_CPSR(REG_WORK1); - ORR_rri(REG_WORK1, REG_WORK1, s); - MSR_CPSRf_r(REG_WORK1); - - if (x) { - compemu_raw_mov_l_ri(REG_WORK1, (uintptr)live.state[FLAGX].mem); - MOV_ri(REG_WORK2, 1); - STRB_rR(REG_WORK2, REG_WORK1); - } -} - -/* - * ROL - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * - */ -MIDFUNC(3,jnf_ROL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,(32-(i&0x1f))); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,(32-(i&0x1f))); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - ROR_rri(d,s,(32-(i&0x1f))); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - if (i) { - RORS_rri(d,d,(32-(i&0x1f))); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - } else { - TST_rr(d,d); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - if (i) { - RORS_rri(d,d,(32-(i&0x1f))); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - } else { - TST_rr(d,d); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - if (i) { - RORS_rri(d,s,(32-(i&0x1f))); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - } else { - MOVS_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROL_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROL_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - ROR_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROL_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROL_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROL_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROL_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - ROR_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROL_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROL_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rrr(d,d,REG_WORK1); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROL_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROL_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rrr(d,d,REG_WORK1); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROL_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROL_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - AND_rri(REG_WORK1, i, 0x1f); - RSB_rri(REG_WORK1, REG_WORK1, 32); - - MSR_CPSRf_i(0); - RORS_rrr(d,s,REG_WORK1); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ROLW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * - */ -MIDFUNC(2,jnf_ROLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,(32-1)); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_ROLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rri(d,d,(32-1)); - - MRS_CPSR(REG_WORK2); - TST_ri(d, 1); - CC_ORR_rri(NATIVE_CC_NE, REG_WORK2, REG_WORK2, ARM_C_FLAG); - CC_BIC_rri(NATIVE_CC_EQ, REG_WORK2, REG_WORK2, ARM_C_FLAG); - MSR_CPSR_r(REG_WORK2); - - unlock2(d); - unlock2(s); -} - -/* - * RORW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. - * - */ -MIDFUNC(2,jnf_RORW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_RORW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rri(d,d,1); - - unlock2(d); - unlock2(s); -} - -/* - * ROXL - * Operand Syntax: Dx, Dy - * #, Dy - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * - */ -MIDFUNC(3,jnf_ROXL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED8_REG_2_REG(d,s); - LSL_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,d,9); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED16_REG_2_REG(d,s); - LSL_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,d,17); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSL_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,s,(32-i)); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXL_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED8_REG_2_REG(d,s); - LSL_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,d,9); - TST_ri(s, (1<<(8-i))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - SIGNED8_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXL_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED16_REG_2_REG(d,s); - LSL_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,d,17); - TST_ri(s, (1<<(16-i))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - SIGNED16_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXL_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSL_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (1 << (i - 1))); - if (i > 1) ORR_rrrLSRi(d,d,s,(32-i)); - TST_ri(s, (1<<(32-i))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXL_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXL_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 36); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); - CMP_ri(REG_WORK1, 18); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); - CMP_ri(REG_WORK1, 9); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); - CMP_ri(REG_WORK1, 0); -#if defined(ARMV6_ASSEMBLY) - BLE_i(8-1); -#else - BLE_i(9-1); -#endif - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 8); -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(REG_WORK2, s); -#else - ROR_rri(REG_WORK2, s, 8); - LSR_rri(REG_WORK2, REG_WORK2, 24); -#endif - ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROXL_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXL_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d,s); - MRS_CPSR(REG_WORK2); - - CMP_ri(REG_WORK1, 34); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); - CMP_ri(REG_WORK1, 17); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); - CMP_ri(REG_WORK1, 0); -#if defined(ARMV6_ASSEMBLY) - BLE_i(8-1); -#else - BLE_i(9-1); -#endif - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 16); -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK2, s); -#else - LSL_rri(REG_WORK2, s, 16); - LSR_rri(REG_WORK2, REG_WORK2, 16); -#endif - ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROXL_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXL_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - CMP_ri(REG_WORK1, 33); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); - CMP_ri(REG_WORK1, 0); - BLE_i(7-1); - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 32); - ORR_rrrLSRr(d,d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXL_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXL_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 36); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); - CMP_ri(REG_WORK1, 18); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); - CMP_ri(REG_WORK1, 9); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); - CMP_ri(REG_WORK1, 0); -#if defined(ARMV6_ASSEMBLY) - BLE_i(16-1); // label -#else - BLE_i(17-1); // label -#endif - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 0x80); - LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - PUSH(REG_WORK2); - - RSB_rri(REG_WORK1, REG_WORK1, 8); -#if defined(ARMV6_ASSEMBLY) - UXTB_rr(REG_WORK2, s); -#else - ROR_rri(REG_WORK2, s, 8); - LSR_rri(REG_WORK2, REG_WORK2, 24); -#endif - ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); - - POP(REG_WORK2); - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0); // label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - raw_sign_extend_8_rr(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXL_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXL_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 34); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); - CMP_ri(REG_WORK1, 17); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); - CMP_ri(REG_WORK1, 0); -#if defined(ARMV6_ASSEMBLY) - BLE_i(16-1); // label -#else - BLE_i(17-1); // label -#endif - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 0x8000); - LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - PUSH(REG_WORK2); - -#if defined(ARMV6_ASSEMBLY) - UXTH_rr(REG_WORK2, s); -#else - LSL_rri(REG_WORK2, s, 16); - LSR_rri(REG_WORK2, REG_WORK2, 16); -#endif - - RSB_rri(REG_WORK1, REG_WORK1, 16); - ORR_rrrLSRr(d,d,REG_WORK2,REG_WORK1); - - POP(REG_WORK2); - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0); // label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - SIGNED16_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXL_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXL_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 33); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); - CMP_ri(REG_WORK1, 0); - BLE_i(13-1); // label - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSL_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,1); - LSL_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 0x80000000); - LSR_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - RSB_rri(REG_WORK1, REG_WORK1, 32); - ORR_rrrLSRr(d,d,s,REG_WORK1); - - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0);// label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ROXLW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. - * - */ -MIDFUNC(2,jnf_ROXLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,1); - ADC_rri(d,d,0); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_ROXLW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,1); - ADC_rri(d,d,0); - MSR_CPSRf_i(0); - LSLS_rri(d,d,15); - LSR_rri(d,d,16); - - unlock2(d); - unlock2(s); -} - -/* - * ROR - * Operand Syntax: Dx, Dy - * #, Dy - * - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * - */ -MIDFUNC(3,jnf_ROR_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROR_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rri(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROR_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - ROR_rri(d,s,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROR_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rri(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROR_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - RORS_rrr(d,d,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROR_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - RORS_rrr(d,s,i); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROR_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROR_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - ROR_rrr(d,d,i); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROR_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROR_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - ROR_rrr(d,d,i); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROR_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROR_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - ROR_rrr(d,s,i); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROR_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROR_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - LSL_rri(d,s,24); - ORR_rrrLSRi(d,d,d,8); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - AND_rri(REG_WORK1, i, 63); - RORS_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROR_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROR_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - ORR_rrrLSRi(d,d,d,16); - MSR_CPSRf_i(0); - AND_rri(REG_WORK1, i, 63); - RORS_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROR_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROR_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MSR_CPSRf_i(0); - AND_rri(REG_WORK1, i, 63); - RORS_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ROXR - * Operand Syntax: Dx, Dy - * #, Dy - * - * Operand Size: 8,16,32 - * - * X Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. Cleared when the rotate count is zero. - * - */ -MIDFUNC(3,jnf_ROXR_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSR_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(9-i)); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXR_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSR_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x8000 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(17-i)); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXR_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSR_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80000000 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(33-i)); - } else { - MOV_rr(d,s); - } - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXR_b_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED8_REG_2_REG(d,s); - LSR_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(9-i)); - TST_ri(s, (1<<(i-1))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - SIGNED8_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXR_w_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - UNSIGNED16_REG_2_REG(d,s); - LSR_rri(d,d,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x8000 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(17-i)); - TST_ri(s, (1<<(i-1))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - SIGNED16_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_ROXR_l_imm,(W4 d, RR4 s, IMM i)) -{ - s=readreg(s,4); - d=writereg(d,4); - - if (i > 0) { - LSR_rri(d,s,i); - CC_ORR_rri(NATIVE_CC_CS, d,d, (0x80000000 >> (i - 1))); - if (i > 1) ORR_rrrLSLi(d,d,s,(33-i)); - TST_ri(s, (1<<(i-1))); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - } else { - MOV_rr(d,s); - MSR_CPSRf_i(0); - } - - TST_rr(d,d); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_ROXR_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXR_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - UNSIGNED8_REG_2_REG(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 36); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); - CMP_ri(REG_WORK1, 18); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); - CMP_ri(REG_WORK1, 9); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); - CMP_ri(REG_WORK1, 0); - BLE_i(7-1); - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x80); - LSR_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 8); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROXR_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXR_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d,s); - MRS_CPSR(REG_WORK2); - - CMP_ri(REG_WORK1, 34); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); - CMP_ri(REG_WORK1, 17); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); - CMP_ri(REG_WORK1, 0); - BLE_i(7-1); - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x8000); - LSR_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 16); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jnf_ROXR_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jnf_ROXR_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - CMP_ri(REG_WORK1, 33); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); - CMP_ri(REG_WORK1, 0); - BLE_i(7-1); - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x80000000); - LSR_rrr(d, d, REG_WORK1); - RSB_rri(REG_WORK1, REG_WORK1, 32); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXR_b,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXR_b_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - UNSIGNED8_REG_2_REG(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 36); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 36); - CMP_ri(REG_WORK1, 18); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 18); - CMP_ri(REG_WORK1, 9); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 9); - CMP_ri(REG_WORK1, 0); - BLE_i(13-1); // label - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x80); - LSR_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - RSB_rri(REG_WORK1, REG_WORK1, 8); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0);// label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - SIGNED8_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXR_w,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXR_w_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - UNSIGNED16_REG_2_REG(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 34); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 34); - CMP_ri(REG_WORK1, 17); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 17); - CMP_ri(REG_WORK1, 0); - BLE_i(13-1); // label - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x8000); - LSR_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - RSB_rri(REG_WORK1, REG_WORK1, 16); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0);// label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - SIGNED16_REG_2_REG(d,d); - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -MIDFUNC(3,jff_ROXR_l,(W4 d, RR4 s, RR4 i)) -{ - if (isconst(i)) { - COMPCALL(jff_ROXR_l_imm)(d,s,(uae_u8)live.state[i].val); - return; - } - - s=readreg(s,4); - i=readreg(i,4); - d=writereg(d,4); - - MOV_rr(d,s); - MRS_CPSR(REG_WORK2); - - AND_rri(REG_WORK1, i, 0x3f); - CMP_ri(REG_WORK1, 33); - CC_SUB_rri(NATIVE_CC_GE, REG_WORK1, REG_WORK1, 33); - CMP_ri(REG_WORK1, 0); - BLE_i(13-1); // label - - SUB_rri(REG_WORK1, REG_WORK1, 1); - LSR_rri(d, d, 1); - MSR_CPSRf_r(REG_WORK2); - CC_ORR_rri(NATIVE_CC_CS, d,d,0x80000000); - LSR_rrr(d, d, REG_WORK1); - - MOV_ri(REG_WORK2, 1); - LSL_rrr(REG_WORK2, REG_WORK2, REG_WORK1); - - RSB_rri(REG_WORK1, REG_WORK1, 32); - ORR_rrrLSLr(d,d,s,REG_WORK1); - - TST_rr(s, REG_WORK2); - CC_MSR_CPSRf_i(NATIVE_CC_NE, ARM_C_FLAG); - CC_MSR_CPSRf_i(NATIVE_CC_EQ, 0); - B_i(0);// label2 - -// label: - MSR_CPSRf_i(0); - -// label2: - TST_rr(d,d); - - unlock2(d); - unlock2(s); - unlock2(i); -} - -/* - * ROXRW - * Operand Syntax: - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the most significant bit of the result is set. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Always cleared. - * C Set according to the last bit rotated out of the operand. - * - */ -MIDFUNC(2,jnf_ROXRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - RRX_rr(d,d); - LSR_rri(d,d,16); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jff_ROXRW,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=writereg(d,4); - - LSL_rri(d,s,16); - MSR_CPSRf_i(0); - RRXS_rr(d,d); - LSR_rri(d,d,16); - - unlock2(d); - unlock2(s); -} - -/* - * SUB - * Operand Syntax: , Dn - * Dn, - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Set if the result is zero. Cleared otherwise. - * V Set if an overflow is generated. Cleared otherwise. - * C Set if a carry is generated. Cleared otherwise. - * - */ -MIDFUNC(3,jnf_SUB_b_imm,(W4 d, RR4 s, IMM v)) -{ - if (isconst(s)) { - set_const(d,live.state[s].val-v); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED8_IMM_2_REG(REG_WORK1, (uint8)v); - SUB_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_SUB_b,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jnf_SUB_b_imm)(d,s,live.state[v].val); - return; - } - - // d has to be different to s and v - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SUB_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jnf_SUB_w_imm,(W4 d, RR4 s, IMM v)) -{ - if (isconst(s)) { - set_const(d,live.state[s].val-v); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - UNSIGNED16_IMM_2_REG(REG_WORK1, (uint16)v); - SUB_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_SUB_w,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jnf_SUB_w_imm)(d,s,live.state[v].val); - return; - } - - // d has to be different to s and v - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SUB_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jnf_SUB_l_imm,(W4 d, RR4 s, IMM v)) -{ - if (isconst(s)) { - set_const(d,live.state[s].val-v); - return; - } - - s=readreg(s,4); - d=writereg(d,4); - - compemu_raw_mov_l_ri(REG_WORK1, v); - SUB_rrr(d,s,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jnf_SUB_l,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jnf_SUB_l_imm)(d,s,live.state[v].val); - return; - } - - // d has to be different to s and v - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SUB_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUB_b_imm,(W4 d, RR1 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_IMM_2_REG(REG_WORK2, (uint8)v); - SIGNED8_REG_2_REG(REG_WORK1, s); - SUBS_rrr(d,REG_WORK1,REG_WORK2); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_SUB_b,(W4 d, RR1 s, RR1 v)) -{ - if (isconst(v)) { - COMPCALL(jff_SUB_b_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - SUBS_rrr(d,REG_WORK1,REG_WORK2); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUB_w_imm,(W4 d, RR2 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_IMM_2_REG(REG_WORK2, (uint16)v); - SIGNED16_REG_2_REG(REG_WORK1, s); - SUBS_rrr(d,REG_WORK1,REG_WORK2); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_SUB_w,(W4 d, RR2 s, RR2 v)) -{ - if (isconst(v)) { - COMPCALL(jff_SUB_w_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - SUBS_rrr(d,REG_WORK1,REG_WORK2); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUB_l_imm,(W4 d, RR4 s, IMM v)) -{ - s=readreg(s,4); - d=writereg(d,4); - - compemu_raw_mov_l_ri(REG_WORK2, v); - SUBS_rrr(d,s,REG_WORK2); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); -} - -MIDFUNC(3,jff_SUB_l,(W4 d, RR4 s, RR4 v)) -{ - if (isconst(v)) { - COMPCALL(jff_SUB_l_imm)(d,s,live.state[v].val); - return; - } - - v=readreg(v,4); - s=readreg(s,4); - d=writereg(d,4); - - SUBS_rrr(d,s,v); - - // Todo: Handle this with inverted carry - MRS_CPSR(REG_WORK1);// mrs r2, CPSR - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG);// eor r2, r2, #0x20000000 - MSR_CPSR_r(REG_WORK1);// msr CPSR_fc, r2 - // inverted_carry = true; - - unlock2(d); - unlock2(s); - unlock2(v); -} - -/* - * SUBA - * - * Operand Syntax: , Dn - * - * Operand Size: 16,32 - * - * Flags: Not affected. - * - */ -MIDFUNC(2,jnf_SUBA_b,(W4 d, RR1 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - SIGNED8_REG_2_REG(REG_WORK1,s); - SUB_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_SUBA_w,(W4 d, RR2 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - SIGNED16_REG_2_REG(REG_WORK1,s); - SUB_rrr(d,d,REG_WORK1); - - unlock2(d); - unlock2(s); -} - -MIDFUNC(2,jnf_SUBA_l,(W4 d, RR4 s)) -{ - s=readreg(s,4); - d=rmw(d,4,4); - - SUB_rrr(d,d,s); - - unlock2(d); - unlock2(s); -} - -/* - * SUBX - * Operand Syntax: Dy, Dx - * -(Ay), -(Ax) - * - * Operand Size: 8,16,32 - * - * X Set the same as the carry bit. - * N Set if the result is negative. Cleared otherwise. - * Z Cleared if the result is nonzero. Unchanged otherwise. - * V Set if an overflow is generated. Cleared otherwise. - * C Set if a carry is generated. Cleared otherwise. - * - * Attention: Z is cleared only if the result is nonzero. Unchanged otherwise - * - */ -MIDFUNC(3,jnf_SUBX,(W4 d, RR4 s, RR4 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - SBC_rrr(d,s,v); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUBX_b,(W4 d, RR1 s, RR1 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - MRS_CPSR(REG_WORK1); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK1, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK1, ARM_Z_FLAG); - PUSH(REG_WORK1); - - SIGNED8_REG_2_REG(REG_WORK1, s); - SIGNED8_REG_2_REG(REG_WORK2, v); - SBCS_rrr(d,REG_WORK1,REG_WORK2); - - POP(REG_WORK2); - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUBX_w,(W4 d, RR2 s, RR2 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - MRS_CPSR(REG_WORK1); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK1, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK1, ARM_Z_FLAG); - PUSH(REG_WORK1); - - SIGNED16_REG_2_REG(REG_WORK1, s); - SIGNED16_REG_2_REG(REG_WORK2, v); - SBCS_rrr(d,REG_WORK1,REG_WORK2); - - POP(REG_WORK2); - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -MIDFUNC(3,jff_SUBX_l,(W4 d, RR4 s, RR4 v)) -{ - s=readreg(s,4); - v=readreg(v,4); - d=writereg(d,4); - - MRS_CPSR(REG_WORK2); - CC_MVN_ri(NATIVE_CC_EQ, REG_WORK2, 0); - CC_MVN_ri(NATIVE_CC_NE, REG_WORK2, ARM_Z_FLAG); - - SBCS_rrr(d,s,v); - - MRS_CPSR(REG_WORK1); - EOR_rri(REG_WORK1, REG_WORK1, ARM_C_FLAG); - AND_rrr(REG_WORK1, REG_WORK1, REG_WORK2); - MSR_CPSR_r(REG_WORK1); - - unlock2(d); - unlock2(s); - unlock2(v); -} - -/* - * SWAP - * Operand Syntax: Dn - * - * Operand Size: 16 - * - * X Not affected. - * N Set if the most significant bit of the 32-bit result is set. Cleared otherwise. - * Z Set if the 32-bit result is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(1,jnf_SWAP,(RW4 d)) -{ - d=rmw(d,4,4); - - ROR_rri(d,d,16); - - unlock2(d); -} - -MIDFUNC(1,jff_SWAP,(RW4 d)) -{ - d=rmw(d,4,4); - - ROR_rri(d,d,16); - MSR_CPSRf_i(0); - TST_rr(d,d); - - unlock2(d); -} - -/* - * TST - * Operand Syntax: - * - * Operand Size: 8,16,32 - * - * X Not affected. - * N Set if the operand is negative. Cleared otherwise. - * Z Set if the operand is zero. Cleared otherwise. - * V Always cleared. - * C Always cleared. - * - */ -MIDFUNC(1,jff_TST_b,(RR1 s)) -{ - if (isconst(s)) { - SIGNED8_IMM_2_REG(REG_WORK1, (uint8)live.state[s].val); - } else { - s=readreg(s,4); - SIGNED8_REG_2_REG(REG_WORK1, s); - unlock2(s); - } - MSR_CPSRf_i(0); - TST_rr(REG_WORK1,REG_WORK1); -} - -MIDFUNC(1,jff_TST_w,(RR2 s)) -{ - if (isconst(s)) { - SIGNED16_IMM_2_REG(REG_WORK1, (uint16)live.state[s].val); - } else { - s=readreg(s,4); - SIGNED16_REG_2_REG(REG_WORK1, s); - unlock2(s); - } - MSR_CPSRf_i(0); - TST_rr(REG_WORK1,REG_WORK1); -} - -MIDFUNC(1,jff_TST_l,(RR4 s)) -{ - MSR_CPSRf_i(0); - - if (isconst(s)) { - compemu_raw_mov_l_ri(REG_WORK1, live.state[s].val); - TST_rr(REG_WORK1,REG_WORK1); - } - else { - s=readreg(s,4); - TST_rr(s,s); - unlock2(s); - } -} diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h b/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h deleted file mode 100644 index ecbc2fdfe..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_arm2.h +++ /dev/null @@ -1,348 +0,0 @@ -/* - * compiler/compemu_midfunc_arm2.h - Native MIDFUNCS for ARM (JIT v2) - * - * Copyright (c) 2014 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2002 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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: - * File is included by compemu.h - * - */ - -// Arm optimized midfunc -extern const uae_u32 ARM_CCR_MAP[]; - -DECLARE_MIDFUNC(restore_inverted_carry(void)); - -// ADD -DECLARE_MIDFUNC(jnf_ADD(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jnf_ADD_imm(W4 d, RR4 s, IMM v)); -DECLARE_MIDFUNC(jff_ADD_b(W4 d, RR1 s, RR1 v)); -DECLARE_MIDFUNC(jff_ADD_w(W4 d, RR2 s, RR2 v)); -DECLARE_MIDFUNC(jff_ADD_l(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_ADD_b_imm(W4 d, RR1 s, IMM v)); -DECLARE_MIDFUNC(jff_ADD_w_imm(W4 d, RR2 s, IMM v)); -DECLARE_MIDFUNC(jff_ADD_l_imm(W4 d, RR4 s, IMM v)); - -// ADDA -DECLARE_MIDFUNC(jnf_ADDA_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jnf_ADDA_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jnf_ADDA_l(W4 d, RR4 s)); - -// ADDX -DECLARE_MIDFUNC(jnf_ADDX(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_ADDX_b(W4 d, RR1 s, RR4 v)); -DECLARE_MIDFUNC(jff_ADDX_w(W4 d, RR2 s, RR4 v)); -DECLARE_MIDFUNC(jff_ADDX_l(W4 d, RR4 s, RR4 v)); - -// AND -DECLARE_MIDFUNC(jnf_AND(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_AND_b(W4 d, RR1 s, RR1 v)); -DECLARE_MIDFUNC(jff_AND_w(W4 d, RR2 s, RR2 v)); -DECLARE_MIDFUNC(jff_AND_l(W4 d, RR4 s, RR4 v)); - -// ANDSR -DECLARE_MIDFUNC(jff_ANDSR(IMM s, IMM x)); - -// ASL -DECLARE_MIDFUNC(jff_ASL_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASL_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASL_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASL_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ASL_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ASL_l_reg(W4 d, RR4 s, RR4 i)); - -// ASLW -DECLARE_MIDFUNC(jff_ASLW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_ASLW(W4 d, RR4 s)); - -// ASR -DECLARE_MIDFUNC(jnf_ASR_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_ASR_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_ASR_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASR_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASR_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_ASR_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_ASR_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ASR_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ASR_l_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ASR_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ASR_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ASR_l_reg(W4 d, RR4 s, RR4 i)); - -// ASRW -DECLARE_MIDFUNC(jff_ASRW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_ASRW(W4 d, RR4 s)); - -// BCHG -DECLARE_MIDFUNC(jnf_BCHG_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jnf_BCHG_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jff_BCHG_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jff_BCHG_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jnf_BCHG_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_BCHG_l(RW4 d, RR4 s)); - -DECLARE_MIDFUNC(jff_BCHG_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jff_BCHG_l(RW4 d, RR4 s)); - -// BCLR -DECLARE_MIDFUNC(jnf_BCLR_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jnf_BCLR_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jnf_BCLR_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_BCLR_l(RW4 d, RR4 s)); - -DECLARE_MIDFUNC(jff_BCLR_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jff_BCLR_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jff_BCLR_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jff_BCLR_l(RW4 d, RR4 s)); - -// BSET -DECLARE_MIDFUNC(jnf_BSET_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jnf_BSET_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jnf_BSET_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_BSET_l(RW4 d, RR4 s)); - -DECLARE_MIDFUNC(jff_BSET_b_imm(RW4 d, IMM s)); -DECLARE_MIDFUNC(jff_BSET_l_imm(RW4 d, IMM s)); - -DECLARE_MIDFUNC(jff_BSET_b(RW4 d, RR4 s)); -DECLARE_MIDFUNC(jff_BSET_l(RW4 d, RR4 s)); - -// BTST -DECLARE_MIDFUNC(jff_BTST_b_imm(RR4 d, IMM s)); -DECLARE_MIDFUNC(jff_BTST_l_imm(RR4 d, IMM s)); - -DECLARE_MIDFUNC(jff_BTST_b(RR4 d, RR4 s)); -DECLARE_MIDFUNC(jff_BTST_l(RR4 d, RR4 s)); - -// CLR -DECLARE_MIDFUNC (jnf_CLR(W4 d)); -DECLARE_MIDFUNC (jff_CLR(W4 d)); - -// CMP -DECLARE_MIDFUNC(jff_CMP_b(RR1 d, RR1 s)); -DECLARE_MIDFUNC(jff_CMP_w(RR2 d, RR2 s)); -DECLARE_MIDFUNC(jff_CMP_l(RR4 d, RR4 s)); - -// CMPA -DECLARE_MIDFUNC(jff_CMPA_b(RR1 d, RR1 s)); -DECLARE_MIDFUNC(jff_CMPA_w(RR2 d, RR2 s)); -DECLARE_MIDFUNC(jff_CMPA_l(RR4 d, RR4 s)); - -// EOR -DECLARE_MIDFUNC(jnf_EOR(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_EOR_b(W4 d, RR1 s, RR1 v)); -DECLARE_MIDFUNC(jff_EOR_w(W4 d, RR2 s, RR2 v)); -DECLARE_MIDFUNC(jff_EOR_l(W4 d, RR4 s, RR4 v)); - -// EORSR -DECLARE_MIDFUNC(jff_EORSR(IMM s, IMM x)); - -// EXT -DECLARE_MIDFUNC(jnf_EXT_b(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_EXT_w(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_EXT_l(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_EXT_b(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_EXT_w(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_EXT_l(W4 d, RR4 s)); - -// LSL -DECLARE_MIDFUNC(jnf_LSL_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_LSL_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSL_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSL_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSL_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSL_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSL_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSL_l_reg(W4 d, RR4 s, RR4 i)); - -// LSLW -DECLARE_MIDFUNC(jff_LSLW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_LSLW(W4 d, RR4 s)); - -// LSR -DECLARE_MIDFUNC(jnf_LSR_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_LSR_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_LSR_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSR_b_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSR_w_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jff_LSR_l_imm(W4 d, RR4 s, IMM i)); -DECLARE_MIDFUNC(jnf_LSR_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_LSR_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_LSR_l_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSR_b_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSR_w_reg(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_LSR_l_reg(W4 d, RR4 s, RR4 i)); - -// LSRW -DECLARE_MIDFUNC(jff_LSRW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_LSRW(W4 d, RR4 s)); - -// MOVE -DECLARE_MIDFUNC(jnf_MOVE(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_MOVE_b_imm(W4 d, IMM i)); -DECLARE_MIDFUNC(jff_MOVE_w_imm(W4 d, IMM i)); -DECLARE_MIDFUNC(jff_MOVE_l_imm(W4 d, IMM i)); -DECLARE_MIDFUNC(jff_MOVE_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jff_MOVE_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jff_MOVE_l(W4 d, RR4 s)); - -// MOVE16 -DECLARE_MIDFUNC(jnf_MOVE16(RR4 d, RR4 s)); - -// MOVEA -DECLARE_MIDFUNC(jnf_MOVEA_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jnf_MOVEA_l(W4 d, RR4 s)); - -// MULS -DECLARE_MIDFUNC (jnf_MULS(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jff_MULS(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jnf_MULS32(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jff_MULS32(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jnf_MULS64(RW4 d, RW4 s)); -DECLARE_MIDFUNC (jff_MULS64(RW4 d, RW4 s)); - -// MULU -DECLARE_MIDFUNC (jnf_MULU(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jff_MULU(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jnf_MULU32(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jff_MULU32(RW4 d, RR4 s)); -DECLARE_MIDFUNC (jnf_MULU64(RW4 d, RW4 s)); -DECLARE_MIDFUNC (jff_MULU64(RW4 d, RW4 s)); - -// NEG -DECLARE_MIDFUNC(jnf_NEG(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_NEG_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jff_NEG_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jff_NEG_l(W4 d, RR4 s)); - -// NEGX -DECLARE_MIDFUNC(jnf_NEGX(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_NEGX_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jff_NEGX_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jff_NEGX_l(W4 d, RR4 s)); - -// NOT -DECLARE_MIDFUNC(jnf_NOT(W4 d, RR4 s)); -DECLARE_MIDFUNC(jff_NOT_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jff_NOT_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jff_NOT_l(W4 d, RR4 s)); - -// OR -DECLARE_MIDFUNC(jnf_OR(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_OR_b(W4 d, RR1 s, RR1 v)); -DECLARE_MIDFUNC(jff_OR_w(W4 d, RR2 s, RR2 v)); -DECLARE_MIDFUNC(jff_OR_l(W4 d, RR4 s, RR4 v)); - -// ORSR -DECLARE_MIDFUNC(jff_ORSR(IMM s, IMM x)); - -// ROL -DECLARE_MIDFUNC(jnf_ROL_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROL_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROL_l(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROL_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROL_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROL_l(W4 d, RR4 s, RR4 i)); - -// ROLW -DECLARE_MIDFUNC(jff_ROLW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_ROLW(W4 d, RR4 s)); - -// RORW -DECLARE_MIDFUNC(jff_RORW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_RORW(W4 d, RR4 s)); - -// ROXL -DECLARE_MIDFUNC(jnf_ROXL_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROXL_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROXL_l(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXL_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXL_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXL_l(W4 d, RR4 s, RR4 i)); - -// ROXLW -DECLARE_MIDFUNC(jff_ROXLW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_ROXLW(W4 d, RR4 s)); - -// ROR -DECLARE_MIDFUNC(jnf_ROR_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROR_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROR_l(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROR_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROR_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROR_l(W4 d, RR4 s, RR4 i)); - -// ROXR -DECLARE_MIDFUNC(jnf_ROXR_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROXR_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jnf_ROXR_l(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXR_b(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXR_w(W4 d, RR4 s, RR4 i)); -DECLARE_MIDFUNC(jff_ROXR_l(W4 d, RR4 s, RR4 i)); - -// ROXRW -DECLARE_MIDFUNC(jff_ROXRW(W4 d, RR4 s)); -DECLARE_MIDFUNC(jnf_ROXRW(W4 d, RR4 s)); - -// SUB -DECLARE_MIDFUNC(jnf_SUB_b_imm(W4 d, RR4 s, IMM v)); -DECLARE_MIDFUNC(jnf_SUB_b(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jnf_SUB_w_imm(W4 d, RR4 s, IMM v)); -DECLARE_MIDFUNC(jnf_SUB_w(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jnf_SUB_l_imm(W4 d, RR4 s, IMM v)); -DECLARE_MIDFUNC(jnf_SUB_l(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_SUB_b(W4 d, RR1 s, RR1 v)); -DECLARE_MIDFUNC(jff_SUB_w(W4 d, RR2 s, RR2 v)); -DECLARE_MIDFUNC(jff_SUB_l(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_SUB_b_imm(W4 d, RR1 s, IMM v)); -DECLARE_MIDFUNC(jff_SUB_w_imm(W4 d, RR2 s, IMM v)); -DECLARE_MIDFUNC(jff_SUB_l_imm(W4 d, RR4 s, IMM v)); - -// SUBA -DECLARE_MIDFUNC(jnf_SUBA_b(W4 d, RR1 s)); -DECLARE_MIDFUNC(jnf_SUBA_w(W4 d, RR2 s)); -DECLARE_MIDFUNC(jnf_SUBA_l(W4 d, RR4 s)); - -// SUBX -DECLARE_MIDFUNC(jnf_SUBX(W4 d, RR4 s, RR4 v)); -DECLARE_MIDFUNC(jff_SUBX_b(W4 d, RR1 s, RR4 v)); -DECLARE_MIDFUNC(jff_SUBX_w(W4 d, RR2 s, RR4 v)); -DECLARE_MIDFUNC(jff_SUBX_l(W4 d, RR4 s, RR4 v)); - -// SWAP -DECLARE_MIDFUNC (jnf_SWAP(RW4 d)); -DECLARE_MIDFUNC (jff_SWAP(RW4 d)); - -// TST -DECLARE_MIDFUNC (jff_TST_b(RR1 s)); -DECLARE_MIDFUNC (jff_TST_w(RR2 s)); -DECLARE_MIDFUNC (jff_TST_l(RR4 s)); - diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index d21f1c36e..c44fd730c 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -29,15 +29,17 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ +#ifdef USE_JIT + #ifdef UAE #define writemem_special writemem #define readmem_special readmem #else -#if !FIXED_ADDRESSING -#error "Only Fixed Addressing is supported with the JIT Compiler" -#endif +//#if !FIXED_ADDRESSING +//#error "Only Fixed Addressing is supported with the JIT Compiler" +//#endif #if defined(X86_ASSEMBLY) && !SAHF_SETO_PROFITABLE #error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" @@ -3557,11 +3559,11 @@ void get_n_addr(int address, int dest, int tmp) #ifdef NATMEM_OFFSET if (canbang) { -#if FIXED_ADDRESSING +//#if FIXED_ADDRESSING lea_l_brr(dest,address,MEMBaseDiff); -#else -# error "Only fixed adressing mode supported" -#endif +//#else +//# error "Only fixed adressing mode supported" +//#endif forget_about(tmp); (void) f; (void) a; @@ -5486,3 +5488,5 @@ void m68k_compile_execute (void) #endif #endif /* JIT */ + +#endif diff --git a/BasiliskII/src/uae_cpu/compiler/compstbla.cpp b/BasiliskII/src/uae_cpu/compiler/compstbla.cpp deleted file mode 100644 index e2f36d1e6..000000000 --- a/BasiliskII/src/uae_cpu/compiler/compstbla.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * compstbl.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "compstbl.cpp" diff --git a/BasiliskII/src/uae_cpu/compiler/flags_arm.h b/BasiliskII/src/uae_cpu/compiler/flags_arm.h deleted file mode 100644 index c9a604901..000000000 --- a/BasiliskII/src/uae_cpu/compiler/flags_arm.h +++ /dev/null @@ -1,52 +0,0 @@ -/* - * compiler/flags_arm.h - Native flags definitions for ARM - * - * Copyright (c) 2013 Jens Heitmann of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer - * - * Adaptation for Basilisk II and improvements, copyright 2000-2002 - * Gwenole Beauchesne - * - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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 NATIVE_FLAGS_ARM_H -#define NATIVE_FLAGS_ARM_H - -/* Native integer code conditions */ -enum { - NATIVE_CC_EQ = 0, - NATIVE_CC_NE = 1, - NATIVE_CC_CS = 2, - NATIVE_CC_CC = 3, - NATIVE_CC_MI = 4, - NATIVE_CC_PL = 5, - NATIVE_CC_VS = 6, - NATIVE_CC_VC = 7, - NATIVE_CC_HI = 8, - NATIVE_CC_LS = 9, - NATIVE_CC_GE = 10, - NATIVE_CC_LT = 11, - NATIVE_CC_GT = 12, - NATIVE_CC_LE = 13, - NATIVE_CC_AL = 14 -}; - -#endif /* NATIVE_FLAGS_ARM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c b/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c deleted file mode 100644 index 913361ab0..000000000 --- a/BasiliskII/src/uae_cpu/compiler/gencomp_arm.c +++ /dev/null @@ -1,5082 +0,0 @@ -/* - * compiler/gencomp_arm2.c - MC680x0 compilation generator (ARM Adaption JIT v1 & JIT v2) - * - * Based on work Copyright 1995, 1996 Bernd Schmidt - * Changes for UAE-JIT Copyright 2000 Bernd Meyer - * - * Adaptation for ARAnyM/ARM, copyright 2001-2015 - * Milan Jurik, Jens Heitmann - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 - * - * Notes - * ===== - * - * Advantages of JIT v2 - * - Processor independent style - * - Reduced overhead - * - Easier to understand / read - * - Easier to optimize - * - More precise flag handling - * - Better optimization for different CPU version ARM, ARMv6 etc.. - * - * Disadvantages of JIT v2 - * - Less generated - * - Requires more code implementation by hand (MidFunc) - * - MIDFUNCS are more CPU minded (closer to raw) - * - Separate code for each instruction (but this could be also an advantage, because you can concentrate on it) - * - * Additional note: - * - current using jnf_xxx calls for non-flag operations and - * jff_xxx for flag operations - * - * Still todo: - * - Optimize genamode, genastore, gen_writeXXX, gen_readXXX, genmovemXXX - * - */ - -#define CC_FOR_BUILD 1 -// #include "sysconfig.h" - -#include "sysdeps.h" -#include "readcpu.h" - -#include -#include -#include -#include -#include -#include -#undef abort - -#define BOOL_TYPE "int" -#define failure global_failure=1 -#define FAILURE global_failure=1 -#define isjump global_isjump=1 -#define is_const_jump global_iscjump=1 -#define isaddx global_isaddx=1 -#define uses_cmov global_cmov=1 -#define mayfail global_mayfail=1 -#define uses_fpu global_fpu=1 - -int hack_opcode; - -static int global_failure; -static int global_isjump; -static int global_iscjump; -static int global_isaddx; -static int global_cmov; -static int long_opcode; -static int global_mayfail; -static int global_fpu; - -static char endstr[1000]; -static char lines[100000]; -static int comp_index = 0; - -#include "flags_arm.h" - -#ifndef __attribute__ -# ifndef __GNUC__ -# define __attribute__(x) -# endif -#endif - - -static int cond_codes[] = { // - NATIVE_CC_AL, -1, // - NATIVE_CC_HI, NATIVE_CC_LS, // - NATIVE_CC_CC, NATIVE_CC_CS, // - NATIVE_CC_NE, NATIVE_CC_EQ, // - NATIVE_CC_VC, NATIVE_CC_VS, // - NATIVE_CC_PL, NATIVE_CC_MI, // - NATIVE_CC_GE, NATIVE_CC_LT, // - NATIVE_CC_GT, NATIVE_CC_LE // - }; - -__attribute__((format(printf, 1, 2))) -static void comprintf(const char *format, ...) -{ - va_list args; - - va_start(args, format); - comp_index += vsprintf(lines + comp_index, format, args); - va_end(args); -} - -static void com_discard(void) -{ - comp_index = 0; -} - -static void com_flush(void) -{ - int i; - for (i = 0; i < comp_index; i++) - putchar(lines[i]); - com_discard(); -} - - -static FILE *headerfile; -static FILE *stblfile; - -static int using_prefetch; -static int using_exception_3; -static int cpu_level; -static int noflags; - -/* For the current opcode, the next lower level that will have different code. - * Initialized to -1 for each opcode. If it remains unchanged, indicates we - * are done with that opcode. */ -static int next_cpu_level; - -static int *opcode_map; -static int *opcode_next_clev; -static int *opcode_last_postfix; -static unsigned long *counts; - -static void read_counts(void) -{ - FILE *file; - unsigned long opcode, count, total; - char name[20]; - int nr = 0; - memset(counts, 0, 65536 * sizeof *counts); - - file = fopen("frequent.68k", "r"); - if (file) { - if (fscanf(file, "Total: %lu\n", &total) != 1) - { - assert(0); - } - while (fscanf(file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { - opcode_next_clev[nr] = 4; - opcode_last_postfix[nr] = -1; - opcode_map[nr++] = opcode; - counts[opcode] = count; - } - fclose(file); - } - if (nr == nr_cpuop_funcs) - return; - for (opcode = 0; opcode < 0x10000; opcode++) { - if (table68k[opcode].handler == -1 && table68k[opcode].mnemo != i_ILLG - && counts[opcode] == 0) { - opcode_next_clev[nr] = 4; - opcode_last_postfix[nr] = -1; - opcode_map[nr++] = opcode; - counts[opcode] = count; - } - } - assert (nr == nr_cpuop_funcs); -} - -static int n_braces = 0; -static int insn_n_cycles; - -static void start_brace(void) { - n_braces++; - comprintf("{"); -} - -static void close_brace(void) { - assert(n_braces > 0); - n_braces--; - comprintf("}"); -} - -static void finish_braces(void) { - while (n_braces > 0) - close_brace(); -} - -static inline void gen_update_next_handler(void) { - return; /* Can anything clever be done here? */ -} - -static void gen_writebyte(const char *address, const char *source) -{ - comprintf("\twritebyte(%s, %s, scratchie);\n", address, source); -} - -static void gen_writeword(const char *address, const char *source) -{ - comprintf("\twriteword(%s, %s, scratchie);\n", address, source); -} - -static void gen_writelong(const char *address, const char *source) -{ - comprintf("\twritelong(%s, %s, scratchie);\n", address, source); -} - -static void gen_readbyte(const char *address, const char* dest) -{ - comprintf("\treadbyte(%s, %s, scratchie);\n", address, dest); -} - -static void gen_readword(const char *address, const char *dest) -{ - comprintf("\treadword(%s,%s,scratchie);\n", address, dest); -} - -static void gen_readlong(const char *address, const char *dest) -{ - comprintf("\treadlong(%s, %s, scratchie);\n", address, dest); -} - -static const char * -gen_nextilong(void) { - static char buffer[80]; - - sprintf(buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)"); - insn_n_cycles += 4; - - long_opcode = 1; - return buffer; -} - -static const char * -gen_nextiword(void) { - static char buffer[80]; - - sprintf(buffer, "comp_get_iword((m68k_pc_offset+=2)-2)"); - insn_n_cycles += 2; - - long_opcode = 1; - return buffer; -} - -static const char * -gen_nextibyte(void) { - static char buffer[80]; - - sprintf(buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)"); - insn_n_cycles += 2; - - long_opcode = 1; - return buffer; -} - -#if defined(USE_JIT_FPU) -// Only used by FPU (future), get rid of unused warning -static void -swap_opcode (void) -{ - comprintf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); - comprintf("\topcode = do_byteswap_16(opcode);\n"); - comprintf("#endif\n"); -} -#endif - -static void sync_m68k_pc(void) { - comprintf("\t if (m68k_pc_offset>SYNC_PC_OFFSET) sync_m68k_pc();\n"); -} - -/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, - * the calling routine handles Apdi and Aipi modes. - * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ -static void genamode(amodes mode, const char *reg, wordsizes size, const char *name, int getv, int movem) -{ - start_brace(); - switch (mode) - { - case Dreg: /* Do we need to check dodgy here? */ - assert (!movem); - if (getv == 1 || getv == 2) - { - /* We generate the variable even for getv==2, so we can use - it as a destination for MOVE */ - comprintf("\tint %s = %s;\n", name, reg); - } - return; - - case Areg: - assert (!movem); - if (getv == 1 || getv == 2) - { - /* see above */ - comprintf("\tint %s = dodgy ? scratchie++ : %s + 8;\n", name, reg); - if (getv == 1) - { - comprintf("\tif (dodgy) \n"); - comprintf("\t\tmov_l_rr(%s, %s + 8);\n", name, reg); - } - } - return; - - case Aind: - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, %s + 8);\n", name, reg); - break; - case Aipi: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tmov_l_rr(%sa, %s + 8);\n", name, reg); - break; - case Apdi: - switch (size) - { - case sz_byte: - if (movem) - { - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - } else - { - start_brace(); - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tlea_l_brr(%s + 8, %s + 8, (uae_s32)-areg_byteinc[%s]);\n", reg, reg, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - } - break; - case sz_word: - if (movem) - { - comprintf("\tint %sa=dodgy?scratchie++:%s+8;\n", name, reg); - comprintf("\tif (dodgy) \n"); - comprintf("\tmov_l_rr(%sa,8+%s);\n", name, reg); - } else - { - start_brace(); - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tlea_l_brr(%s + 8, %s + 8, -2);\n", reg, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - } - break; - case sz_long: - if (movem) - { - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - } else - { - start_brace(); - comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg); - comprintf("\tlea_l_brr(%s + 8, %s + 8, -4);\n", reg, reg); - comprintf("\tif (dodgy)\n"); - comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - } - break; - default: - assert(0); - break; - } - break; - case Ad16: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tmov_l_rr(%sa, 8 + %s);\n", name, reg); - comprintf("\tlea_l_brr(%sa, %sa, (uae_s32)(uae_s16)%s);\n", name, name, gen_nextiword()); - break; - case Ad8r: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tcalc_disp_ea_020(%s + 8, %s, %sa, scratchie);\n", reg, gen_nextiword(), name); - break; - - case PC16: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); - comprintf("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword()); - comprintf("\tmov_l_ri(%sa, address + PC16off);\n", name); - break; - - case PC8r: - comprintf("\tint pctmp = scratchie++;\n"); - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n"); - start_brace(); - comprintf("\tmov_l_ri(pctmp,address);\n"); - - comprintf("\tcalc_disp_ea_020(pctmp, %s, %sa, scratchie);\n", gen_nextiword(), name); - break; - case absw: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tmov_l_ri(%sa, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); - break; - case absl: - comprintf("\tint %sa = scratchie++;\n", name); - comprintf("\tmov_l_ri(%sa, %s); /* absl */\n", name, gen_nextilong()); - break; - case imm: - assert (getv == 1); - switch (size) - { - case sz_byte: - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); - break; - case sz_word: - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); - break; - case sz_long: - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); - break; - default: - assert(0); - break; - } - return; - case imm0: - assert (getv == 1); - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte()); - return; - case imm1: - assert (getv == 1); - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword()); - return; - case imm2: - assert (getv == 1); - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong()); - return; - case immi: - assert (getv == 1); - comprintf("\tint %s = scratchie++;\n", name); - comprintf("\tmov_l_ri(%s, %s);\n", name, reg); - return; - default: - assert(0); - break; - } - - /* We get here for all non-reg non-immediate addressing modes to - * actually fetch the value. */ - if (getv == 1) - { - char astring[80]; - sprintf(astring, "%sa", name); - switch (size) - { - case sz_byte: - insn_n_cycles += 2; - break; - case sz_word: - insn_n_cycles += 2; - break; - case sz_long: - insn_n_cycles += 4; - break; - default: - assert(0); - break; - } - start_brace(); - comprintf("\tint %s = scratchie++;\n", name); - switch (size) - { - case sz_byte: - gen_readbyte(astring, name); - break; - case sz_word: - gen_readword(astring, name); - break; - case sz_long: - gen_readlong(astring, name); - break; - default: - assert(0); - break; - } - } - - /* We now might have to fix up the register for pre-dec or post-inc - * addressing modes. */ - if (!movem) - { - switch (mode) - { - case Aipi: - switch (size) - { - case sz_byte: - comprintf("\tlea_l_brr(%s + 8,%s + 8, areg_byteinc[%s]);\n", reg, reg, reg); - break; - case sz_word: - comprintf("\tlea_l_brr(%s + 8, %s + 8, 2);\n", reg, reg); - break; - case sz_long: - comprintf("\tlea_l_brr(%s + 8, %s + 8, 4);\n", reg, reg); - break; - default: - assert(0); - break; - } - break; - case Apdi: - break; - default: - break; - } - } -} - -static void genastore(const char *from, amodes mode, const char *reg, wordsizes size, const char *to) -{ - switch (mode) - { - case Dreg: - switch (size) - { - case sz_byte: - comprintf("\tif(%s != %s)\n", reg, from); - comprintf("\t\tmov_b_rr(%s, %s);\n", reg, from); - break; - case sz_word: - comprintf("\tif(%s != %s)\n", reg, from); - comprintf("\t\tmov_w_rr(%s, %s);\n", reg, from); - break; - case sz_long: - comprintf("\tif(%s != %s)\n", reg, from); - comprintf("\t\tmov_l_rr(%s, %s);\n", reg, from); - break; - default: - assert(0); - break; - } - break; - case Areg: - switch (size) - { - case sz_word: - comprintf("\tif(%s + 8 != %s)\n", reg, from); - comprintf("\t\tmov_w_rr(%s + 8, %s);\n", reg, from); - break; - case sz_long: - comprintf("\tif(%s + 8 != %s)\n", reg, from); - comprintf("\t\tmov_l_rr(%s + 8, %s);\n", reg, from); - break; - default: - assert(0); - break; - } - break; - - case Apdi: - case absw: - case PC16: - case PC8r: - case Ad16: - case Ad8r: - case Aipi: - case Aind: - case absl: - { - char astring[80]; - sprintf(astring, "%sa", to); - - switch (size) - { - case sz_byte: - insn_n_cycles += 2; - gen_writebyte(astring, from); - break; - case sz_word: - insn_n_cycles += 2; - gen_writeword(astring, from); - break; - case sz_long: - insn_n_cycles += 4; - gen_writelong(astring, from); - break; - default: - assert(0); - break; - } - } - break; - case imm: - case imm0: - case imm1: - case imm2: - case immi: - assert(0); - break; - default: - assert(0); - break; - } -} - -static void gen_move16(uae_u32 opcode, struct instr *curi) { -#if defined(USE_JIT2) - comprintf("\tint src=scratchie++;\n"); - comprintf("\tint dst=scratchie++;\n"); - - uae_u32 masked_op = (opcode & 0xfff8); - if (masked_op == 0xf620) { - // POSTINCREMENT SOURCE AND DESTINATION version - comprintf("\t uae_u16 dstreg = ((%s)>>12) & 0x07;\n", gen_nextiword()); - comprintf("\t jnf_MOVE(src, srcreg + 8);"); - comprintf("\t jnf_MOVE(dst, dstreg + 8);"); - comprintf("\t if (srcreg != dstreg)\n"); - comprintf("\t jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);"); - comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);"); - } else { - /* Other variants */ - genamode(curi->smode, "srcreg", curi->size, "src", 0, 2); - genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2); - switch (masked_op) { - case 0xf600: - comprintf("\t jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);"); - break; - case 0xf608: - comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);"); - break; - } - } - comprintf("\t jnf_MOVE16(dst, src);"); -#else - comprintf("\tint src=scratchie++;\n"); - comprintf("\tint dst=scratchie++;\n"); - - if ((opcode & 0xfff8) == 0xf620) { - /* MOVE16 (Ax)+,(Ay)+ */ - comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword()); - comprintf("\tmov_l_rr(src,8+srcreg);\n"); - comprintf("\tmov_l_rr(dst,8+dstreg);\n"); - } else { - /* Other variants */ - genamode(curi->smode, "srcreg", curi->size, "src", 0, 2); - genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2); - comprintf("\tmov_l_rr(src,srca);\n"); - comprintf("\tmov_l_rr(dst,dsta);\n"); - } - - /* Align on 16-byte boundaries */ - comprintf("\tand_l_ri(src,~15);\n"); - comprintf("\tand_l_ri(dst,~15);\n"); - - if ((opcode & 0xfff8) == 0xf620) { - comprintf("\tif (srcreg != dstreg)\n"); - comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n"); - comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n"); - } else if ((opcode & 0xfff8) == 0xf600) - comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n"); - else if ((opcode & 0xfff8) == 0xf608) - comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n"); - - start_brace(); - comprintf("\tint tmp=scratchie;\n"); - comprintf("\tscratchie+=4;\n"); - - comprintf("\tget_n_addr(src,src,scratchie);\n" - "\tget_n_addr(dst,dst,scratchie);\n" - "\tmov_l_rR(tmp+0,src,0);\n" - "\tmov_l_rR(tmp+1,src,4);\n" - "\tmov_l_rR(tmp+2,src,8);\n" - "\tmov_l_rR(tmp+3,src,12);\n" - "\tmov_l_Rr(dst,tmp+0,0);\n" - "\tforget_about(tmp+0);\n" - "\tmov_l_Rr(dst,tmp+1,4);\n" - "\tforget_about(tmp+1);\n" - "\tmov_l_Rr(dst,tmp+2,8);\n" - "\tforget_about(tmp+2);\n" - "\tmov_l_Rr(dst,tmp+3,12);\n"); - close_brace(); -#endif -} - -static void genmovemel(uae_u16 opcode) { - comprintf("\tuae_u16 mask = %s;\n", gen_nextiword()); - comprintf("\tint native=scratchie++;\n"); - comprintf("\tint i;\n"); - comprintf("\tsigned char offset=0;\n"); - genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, - 1); - comprintf("\tget_n_addr(srca,native,scratchie);\n"); - - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch (table68k[opcode].size) { - case sz_long: - comprintf("\t\t\tmov_l_rR(i,native,offset);\n" - "\t\t\tmid_bswap_32(i);\n" - "\t\t\toffset+=4;\n"); - break; - case sz_word: - comprintf("\t\t\tmov_w_rR(i,native,offset);\n" - "\t\t\tmid_bswap_16(i);\n" - "\t\t\tsign_extend_16_rr(i,i);\n" - "\t\t\toffset+=2;\n"); - break; - default: - assert(0); - break; - } - comprintf("\t\t}\n" - "\t}"); - if (table68k[opcode].dmode == Aipi) { - comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n"); - } -} - -static void genmovemle(uae_u16 opcode) { - comprintf("\tuae_u16 mask = %s;\n", gen_nextiword()); - comprintf("\tint native=scratchie++;\n"); - comprintf("\tint i;\n"); - comprintf("\tint tmp=scratchie++;\n"); - comprintf("\tsigned char offset=0;\n"); - genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, - 1); - - comprintf("\tget_n_addr(srca,native,scratchie);\n"); - - if (table68k[opcode].dmode != Apdi) { - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch (table68k[opcode].size) { - case sz_long: - comprintf("\t\t\tmov_l_rr(tmp,i);\n" - "\t\t\tmid_bswap_32(tmp);\n" - "\t\t\tmov_l_Rr(native,tmp,offset);\n" - "\t\t\toffset+=4;\n"); - break; - case sz_word: - comprintf("\t\t\tmov_l_rr(tmp,i);\n" - "\t\t\tmid_bswap_16(tmp);\n" - "\t\t\tmov_w_Rr(native,tmp,offset);\n" - "\t\t\toffset+=2;\n"); - break; - default: - assert(0); - break; - } - } else { /* Pre-decrement */ - comprintf("\tfor (i=0;i<16;i++) {\n" - "\t\tif ((mask>>i)&1) {\n"); - switch (table68k[opcode].size) { - case sz_long: - comprintf("\t\t\toffset-=4;\n" - "\t\t\tmov_l_rr(tmp,15-i);\n" - "\t\t\tmid_bswap_32(tmp);\n" - "\t\t\tmov_l_Rr(native,tmp,offset);\n"); - break; - case sz_word: - comprintf("\t\t\toffset-=2;\n" - "\t\t\tmov_l_rr(tmp,15-i);\n" - "\t\t\tmid_bswap_16(tmp);\n" - "\t\t\tmov_w_Rr(native,tmp,offset);\n"); - break; - default: - assert(0); - break; - } - } - - comprintf("\t\t}\n" - "\t}"); - if (table68k[opcode].dmode == Apdi) { - comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n"); - } -} - -static void duplicate_carry(void) { - comprintf("\tif (needed_flags&FLAG_X) duplicate_carry();\n"); -} - -typedef enum { - flag_logical_noclobber, - flag_logical, - flag_add, - flag_sub, - flag_cmp, - flag_addx, - flag_subx, - flag_zn, - flag_av, - flag_sv, - flag_and, - flag_or, - flag_eor, - flag_mov -} flagtypes; - -#if !defined(USE_JIT2) -static void genflags(flagtypes type, wordsizes size, const char *value, const char *src, const char *dst) -{ - if (noflags) { - switch (type) { - case flag_cmp: - comprintf("\tdont_care_flags();\n"); - comprintf("/* Weird --- CMP with noflags ;-) */\n"); - return; - case flag_add: - case flag_sub: - comprintf("\tdont_care_flags();\n"); - { - const char* op; - switch (type) { - case flag_add: - op = "add"; - break; // nf - case flag_sub: - op = "sub"; - break; // nf - default: - assert(0); - break; - } - switch (size) { - case sz_byte: - comprintf("\t%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("\t%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\t%s_l(%s,%s);\n", op, dst, src); - break; - } - return; - } - break; - - case flag_and: - comprintf("\tdont_care_flags();\n"); - switch (size) { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); - comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); // nf - comprintf("\tarm_AND_l(%s,scratchie);\n", dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tarm_AND_b(%s,%s);\n", dst, src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); - comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); // nf - comprintf("\tarm_AND_l(%s,scratchie);\n", dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tarm_AND_w(%s,%s);\n", dst, src); - break; - case sz_long: - comprintf("\tarm_AND_l(%s,%s);\n", dst, src); - break; - } - return; - - case flag_mov: - comprintf("\tdont_care_flags();\n"); - switch (size) { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); - comprintf("\tand_l_ri(%s,0xffffff00);\n", dst); // nf - comprintf("\tarm_ORR_l(%s,scratchie);\n", dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tmov_b_rr(%s,%s);\n", dst, src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); - comprintf("\tand_l_ri(%s,0xffff0000);\n", dst); // nf - comprintf("\tarm_ORR_l(%s,scratchie);\n", dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tmov_w_rr(%s,%s);\n", dst, src); - break; - case sz_long: - comprintf("\tmov_l_rr(%s,%s);\n", dst, src); - break; - } - return; - - case flag_or: - case flag_eor: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - const char* op; - switch (type) { - case flag_or: - op = "ORR"; - break; // nf - case flag_eor: - op = "EOR"; - break; // nf - default: - assert(0); - break; - } - switch (size) { - case sz_byte: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src); - comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tarm_%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("if (kill_rodent(dst)) {\n"); - comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src); - comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst); - comprintf("\tforget_about(scratchie);\n"); - comprintf("\t} else \n" - "\tarm_%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\tarm_%s_l(%s,%s);\n", op, dst, src); - break; - } - close_brace(); - return; - } - - case flag_addx: - case flag_subx: - comprintf("\tdont_care_flags();\n"); - { - const char* op; - switch (type) { - case flag_addx: - op = "adc"; - break; - case flag_subx: - op = "sbb"; - break; - default: - assert(0); - break; - } - comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ - switch (size) { - case sz_byte: - comprintf("\t%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("\t%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\t%s_l(%s,%s);\n", op, dst, src); - break; - } - return; - } - break; - default: - return; - } - } - - /* Need the flags, but possibly not all of them */ - switch (type) { - case flag_logical_noclobber: - failure; - /* fall through */ - - case flag_and: - case flag_or: - case flag_eor: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - const char* op; - switch (type) { - case flag_and: - op = "and"; - break; - case flag_or: - op = "or"; - break; - case flag_eor: - op = "xor"; - break; - default: - assert(0); - break; - } - switch (size) { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n", op, dst, src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - } - - case flag_mov: - comprintf("\tdont_care_flags();\n"); - start_brace(); - { - switch (size) { - case sz_byte: - comprintf("\tif (%s!=%s) {\n", src, dst); - comprintf("\tmov_b_ri(%s,0);\n" - "\tstart_needflags();\n", dst); - comprintf("\tor_b(%s,%s);\n", dst, src); - comprintf("\t} else {\n"); - comprintf("\tmov_b_rr(%s,%s);\n", dst, src); - comprintf("\ttest_b_rr(%s,%s);\n", dst, dst); - comprintf("\t}\n"); - break; - case sz_word: - comprintf("\tif (%s!=%s) {\n", src, dst); - comprintf("\tmov_w_ri(%s,0);\n" - "\tstart_needflags();\n", dst); - comprintf("\tor_w(%s,%s);\n", dst, src); - comprintf("\t} else {\n"); - comprintf("\tmov_w_rr(%s,%s);\n", dst, src); - comprintf("\ttest_w_rr(%s,%s);\n", dst, dst); - comprintf("\t}\n"); - break; - case sz_long: - comprintf("\tif (%s!=%s) {\n", src, dst); - comprintf("\tmov_l_ri(%s,0);\n" - "\tstart_needflags();\n", dst); - comprintf("\tor_l(%s,%s);\n", dst, src); - comprintf("\t} else {\n"); - comprintf("\tmov_l_rr(%s,%s);\n", dst, src); - comprintf("\ttest_l_rr(%s,%s);\n", dst, dst); - comprintf("\t}\n"); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - } - - case flag_logical: - comprintf("\tdont_care_flags();\n"); - start_brace(); - switch (size) { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\ttest_b_rr(%s,%s);\n", value, value); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\ttest_w_rr(%s,%s);\n", value, value); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\ttest_l_rr(%s,%s);\n", value, value); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - close_brace(); - return; - - case flag_add: - case flag_sub: - case flag_cmp: - comprintf("\tdont_care_flags();\n"); - { - const char* op; - switch (type) { - case flag_add: - op = "add"; - break; - case flag_sub: - op = "sub"; - break; - case flag_cmp: - op = "cmp"; - break; - default: - assert(0); - break; - } - switch (size) { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n", op, dst, src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tend_needflags();\n"); - if (type != flag_cmp) { - duplicate_carry(); - } - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - - return; - } - - case flag_addx: - case flag_subx: - uses_cmov; - comprintf("\tdont_care_flags();\n"); - { - const char* op; - switch (type) { - case flag_addx: - op = "adc"; - break; - case flag_subx: - op = "sbb"; - break; - default: - assert(0); - break; - } - start_brace(); - comprintf("\tint zero=scratchie++;\n" - "\tint one=scratchie++;\n" - "\tif (needed_flags&FLAG_Z) {\n" - "\tmov_l_ri(zero,0);\n" - "\tmov_l_ri(one,-1);\n" - "\tmake_flags_live();\n" - "\tcmov_l_rr(zero,one,%d);\n" - "\t}\n", NATIVE_CC_NE); - comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ - switch (size) { - case sz_byte: - comprintf("\tstart_needflags();\n" - "\t%s_b(%s,%s);\n", op, dst, src); - break; - case sz_word: - comprintf("\tstart_needflags();\n" - "\t%s_w(%s,%s);\n", op, dst, src); - break; - case sz_long: - comprintf("\tstart_needflags();\n" - "\t%s_l(%s,%s);\n", op, dst, src); - break; - } - comprintf("\tlive_flags();\n"); - comprintf("\tif (needed_flags&FLAG_Z) {\n" - "\tcmov_l_rr(zero,one,%d);\n" - "\tset_zero(zero, one);\n" /* No longer need one */ - "\tlive_flags();\n" - "\t}\n", NATIVE_CC_NE); - comprintf("\tend_needflags();\n"); - duplicate_carry(); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - return; - } - default: - failure; - break; - } -} -#endif - -static void gen_abcd(uae_u32 opcode, struct instr *curi, const char* ssize) { -#if 0 -#else - (void) opcode; - (void) curi; - (void) ssize; - failure; - /* No BCD maths for me.... */ -#endif -} - -static void gen_add(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - // Use tmp register to avoid destroying upper part in .B., .W cases - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ADD_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_ADD(tmp,dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_add, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_adda(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\t jnf_ADDA_%s(dst, src);\n", ssize); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tsign_extend_8_rr(tmp,src);\n"); - break; - case sz_word: - comprintf("\tsign_extend_16_rr(tmp,src);\n"); - break; - case sz_long: - comprintf("\ttmp=src;\n"); - break; - default: - assert(0); - break; - } - comprintf("\tarm_ADD_l(dst,tmp);\n"); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#endif -} - -static void gen_addx(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - - // Use tmp register to avoid destroying upper part in .B., .W cases - comprintf("\t dont_care_flags();\n"); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ADDX_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_ADDX(tmp,dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - genflags(flag_addx, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_and(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - - comprintf("\t dont_care_flags();\n"); - comprintf("\t int tmp=scratchie++;\n"); - start_brace(); - if (!noflags) { - comprintf("\t jff_AND_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_AND(tmp,dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_and, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_andsr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ANDSR(ARM_CCR_MAP[src & 0xF], (src & 0x10));\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } -#else - (void) curi; - failure; - isjump; -#endif -} - -static void gen_asl(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\t dont_care_flags();\n"); - comprintf("\t int tmp=scratchie++;\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - - if (curi->smode != immi) { - if (!noflags) { - start_brace(); - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ASL_%s_reg(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - start_brace(); - comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n"); - } - } else { - start_brace(); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ASL_%s_imm(tmp,data,srcreg);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n"); - } - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) ssize; - - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - /* Except for the handling of the V flag, this is identical to - LSL. The handling of V is, uhm, unpleasant, so if it's needed, - let the normal emulation handle it. Shoulders of giants kinda - thing ;-) */ - comprintf("if (needed_flags & FLAG_V) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode != immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,7);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,15);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,31);\n"); - break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } - } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); - break; - case sz_word: - comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); - break; - case sz_long: - comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); - break; - default: - assert(0); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } -#endif -} - -static void gen_aslw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ASLW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_ASLW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_asr(uae_u32 opcode, struct instr *curi, const char* ssize) { -#if defined(USE_JIT2) - (void)opcode; - - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\t dont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (curi->smode != immi) { - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ASR_%s_reg(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_ASR_%s_reg(tmp,data,cnt);\n", ssize); - } - } else { - char *op; - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - op = "ff"; - } else - op = "nf"; - - comprintf("\t j%s_ASR_%s_imm(tmp,data,srcreg);\n", op, ssize); - if (!noflags) { - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) opcode; - (void) ssize; - - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode != immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint width;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n" - "\tint highshift=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,cnt);\n" - "\thighmask=0x38;\n" - "\twidth=8;\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,cnt);\n" - "\thighmask=0x30;\n" - "\twidth=16;\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,cnt);\n" - "\thighmask=0x20;\n" - "\twidth=32;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(highshift,0);\n" - "mov_l_ri(scratchie,width/2);\n" - "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); - /* The x86 masks out bits, so we now make sure that things - really get shifted as much as planned */ - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,highshift);\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,highshift);\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,highshift);\n"); - break; - default: - assert(0); - break; - } - /* And again */ - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,highshift);\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,highshift);\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,highshift);\n"); - break; - default: - assert(0); - break; - } - - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(cdata,tmpcnt);\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(cdata,tmpcnt);\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(cdata,tmpcnt);\n"); - break; - default: - assert(0); - break; - } - /* If the shift count was higher than the width, we need - to pick up the sign from data */ - comprintf("test_l_ri(tmpcnt,highmask);\n" - "cmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint width;\n" - "\tint highshift=scratchie++;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,cnt);\n" - "\thighmask=0x38;\n" - "\twidth=8;\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,cnt);\n" - "\thighmask=0x30;\n" - "\twidth=16;\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,cnt);\n" - "\thighmask=0x20;\n" - "\twidth=32;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(highshift,0);\n" - "mov_l_ri(scratchie,width/2);\n" - "cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE); - /* The x86 masks out bits, so we now make sure that things - really get shifted as much as planned */ - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,highshift);\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,highshift);\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,highshift);\n"); - break; - default: - assert(0); - break; - } - /* And again */ - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_rr(data,highshift);\n"); - break; - case sz_word: - comprintf("\tshra_w_rr(data,highshift);\n"); - break; - case sz_long: - comprintf("\tshra_l_rr(data,highshift);\n"); - break; - default: - assert(0); - break; - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } - } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshra_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - case sz_word: - comprintf("\tshra_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - case sz_long: - comprintf("\tshra_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - default: - assert(0); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } -#endif -} - -static void gen_asrw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ASRW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_ASRW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_bchg(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_BCHG_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_BCHG_%s(dst,src);\n", ssize); - comprintf("\t dont_care_flags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint s=scratchie++;\n" - "\tint tmp=scratchie++;\n" - "\tmov_l_rr(s,src);\n"); - if (curi->size == sz_byte) - comprintf("\tand_l_ri(s,7);\n"); - else - comprintf("\tand_l_ri(s,31);\n"); - - comprintf("\tbtc_l_rr(dst,s);\n" /* Answer now in C */ - "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ - "\tmake_flags_live();\n" /* Get the flags back */ - "\tdont_care_flags();\n"); - if (!noflags) { - comprintf("\tstart_needflags();\n" - "\tset_zero(s,tmp);\n" - "\tlive_flags();\n" - "\tend_needflags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_bclr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_BCLR_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_BCLR_%s(dst,src);\n", ssize); - comprintf("\t dont_care_flags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint s=scratchie++;\n" - "\tint tmp=scratchie++;\n" - "\tmov_l_rr(s,src);\n"); - if (curi->size == sz_byte) - comprintf("\tand_l_ri(s,7);\n"); - else - comprintf("\tand_l_ri(s,31);\n"); - - comprintf("\tbtr_l_rr(dst,s);\n" /* Answer now in C */ - "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ - "\tmake_flags_live();\n" /* Get the flags back */ - "\tdont_care_flags();\n"); - if (!noflags) { - comprintf("\tstart_needflags();\n" - "\tset_zero(s,tmp);\n" - "\tlive_flags();\n" - "\tend_needflags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_bset(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_BSET_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_BSET_%s(dst,src);\n", ssize); - comprintf("\t dont_care_flags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint s=scratchie++;\n" - "\tint tmp=scratchie++;\n" - "\tmov_l_rr(s,src);\n"); - if (curi->size == sz_byte) - comprintf("\tand_l_ri(s,7);\n"); - else - comprintf("\tand_l_ri(s,31);\n"); - - comprintf("\tbts_l_rr(dst,s);\n" /* Answer now in C */ - "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ - "\tmake_flags_live();\n" /* Get the flags back */ - "\tdont_care_flags();\n"); - if (!noflags) { - comprintf("\tstart_needflags();\n" - "\tset_zero(s,tmp);\n" - "\tlive_flags();\n" - "\tend_needflags();\n"); - } - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_btst(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - - // If we are not interested in flags it is not necessary to do - // anything with the data - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_BTST_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t dont_care_flags();\n"); - } -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint s=scratchie++;\n" - "\tint tmp=scratchie++;\n" - "\tmov_l_rr(s,src);\n"); - if (curi->size == sz_byte) - comprintf("\tand_l_ri(s,7);\n"); - else - comprintf("\tand_l_ri(s,31);\n"); - - comprintf("\tbt_l_rr(dst,s);\n" /* Answer now in C */ - "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ - "\tmake_flags_live();\n" /* Get the flags back */ - "\tdont_care_flags();\n"); - if (!noflags) { - comprintf("\tstart_needflags();\n" - "\tset_zero(s,tmp);\n" - "\tlive_flags();\n" - "\tend_needflags();\n"); - } -#endif -} - -static void gen_clr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_CLR(tmp);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_CLR(tmp);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); - start_brace(); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags(flag_logical, curi->size, "dst", "", ""); - genastore("dst", curi->smode, "srcreg", curi->size, "src"); -#endif -} - -static void gen_cmp(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\t dont_care_flags();\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_CMP_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("/* Weird --- CMP with noflags ;-) */\n"); - } -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - genflags(flag_cmp, curi->size, "", "src", "dst"); -#endif -} - -static void gen_cmpa(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - if (!noflags) { - comprintf("\t dont_care_flags();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_CMPA_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\tdont_care_flags();\n"); - comprintf("/* Weird --- CMP with noflags ;-) */\n"); - } -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmps=scratchie++;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tsign_extend_8_rr(tmps,src);\n"); - break; - case sz_word: - comprintf("\tsign_extend_16_rr(tmps,src);\n"); - break; - case sz_long: - comprintf("tmps=src;\n"); - break; - default: - assert(0); - break; - } - genflags(flag_cmp, sz_long, "", "tmps", "dst"); -#endif -} - -static void gen_dbcc(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if 0 - isjump; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); - - comprintf("uae_u32 voffs;\n"); - comprintf("voffs = get_const(offs);\n"); - /* That offs is an immediate, so we can clobber it with abandon */ - switch (curi->size) { - case sz_word: - comprintf("\t voffs = (uae_s32)((uae_s16)voffs);\n"); - break; - default: - assert(0); /* Seems this only comes in word flavour */ - break; - } - comprintf("\t voffs -= m68k_pc_offset - m68k_pc_offset_thisinst - 2;\n"); - comprintf("\t voffs += (uintptr)comp_pc_p + m68k_pc_offset;\n"); - - comprintf("\t add_const_v(PC_P, m68k_pc_offset);\n"); - comprintf("\t m68k_pc_offset = 0;\n"); - - start_brace(); - - if (curi->cc >= 2) { - comprintf("\t make_flags_live();\n"); /* Load the flags */ - } - - assert(curi->size == sz_word); - - switch (curi->cc) { - case 0: /* This is an elaborate nop? */ - break; - case 1: - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 8: - case 9: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\t start_needflags();\n"); - comprintf("\t jnf_DBcc(src,voffs,%d);\n", curi->cc); - comprintf("\t end_needflags();\n"); - break; - default: - assert(0); - break; - } - genastore("src", curi->smode, "srcreg", curi->size, "src"); - gen_update_next_handler(); -#else - isjump; - uses_cmov; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); - - /* That offs is an immediate, so we can clobber it with abandon */ - switch (curi->size) { - case sz_word: - comprintf("\tsign_extend_16_rr(offs,offs);\n"); - break; - default: - assert(0); /* Seems this only comes in word flavour */ - break; - } - comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); - comprintf("\tarm_ADD_l_ri(offs,(uintptr)comp_pc_p);\n"); - /* New PC, - once the - offset_68k is - * also added */ - /* Let's fold in the m68k_pc_offset at this point */ - comprintf("\tarm_ADD_l_ri(offs,m68k_pc_offset);\n"); - comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - - start_brace(); - comprintf("\tint nsrc=scratchie++;\n"); - - if (curi->cc >= 2) { - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - } - - assert (curi->size == sz_word); - - switch (curi->cc) { - case 0: /* This is an elaborate nop? */ - break; - case 1: - comprintf("\tstart_needflags();\n"); - comprintf("\tsub_w_ri(src,1);\n"); - comprintf("\t end_needflags();\n"); - start_brace(); - comprintf("\tuae_u32 v2,v;\n" - "\tuae_u32 v1=get_const(PC_P);\n"); - comprintf("\tv2=get_const(offs);\n" - "\tregister_branch(v1,v2,%d);\n", NATIVE_CC_CC); - break; - - case 8: - failure; - break; /* Work out details! FIXME */ - case 9: - failure; - break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\tmov_l_rr(nsrc,src);\n"); - comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n" - "\tmov_w_rr(src,scratchie);\n"); - comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", cond_codes[curi->cc]); - comprintf("\tcmov_l_rr(src,nsrc,%d);\n", cond_codes[curi->cc]); - /* OK, now for cc=true, we have src==nsrc and offs==PC_P, - so whether we move them around doesn't matter. However, - if cc=false, we have offs==jump_pc, and src==nsrc-1 */ - - comprintf("\t start_needflags();\n"); - comprintf("\ttest_w_rr(nsrc,nsrc);\n"); - comprintf("\t end_needflags();\n"); - comprintf("\tcmov_l_rr(PC_P,offs,%d);\n", NATIVE_CC_NE); - break; - default: - assert(0); - break; - } - genastore("src", curi->smode, "srcreg", curi->size, "src"); - gen_update_next_handler(); -#endif -} - -static void gen_eor(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t jff_EOR_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_EOR(tmp,dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_eor, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_eorsr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_EORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } -#else - (void) curi; - failure; - isjump; -#endif -} - -static void gen_exg(uae_u32 opcode, struct instr *curi, const char* ssize) { -#if 0 -#else - (void) opcode; - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tmov_l_rr(tmp,src);\n"); - genastore("dst", curi->smode, "srcreg", curi->size, "src"); - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_ext(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_EXT_%s(tmp,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_EXT_%s(tmp,src);\n", ssize); - } - genastore("tmp", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\tdont_care_flags();\n"); - start_brace(); - switch (curi->size) { - case sz_byte: - comprintf("\tint dst = src;\n" - "\tsign_extend_8_rr(src,src);\n"); - break; - case sz_word: - comprintf("\tint dst = scratchie++;\n" - "\tsign_extend_8_rr(dst,src);\n"); - break; - case sz_long: - comprintf("\tint dst = src;\n" - "\tsign_extend_16_rr(src,src);\n"); - break; - default: - assert(0); - break; - } - genflags(flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "", - ""); - genastore("dst", curi->smode, "srcreg", - curi->size == sz_word ? sz_word : sz_long, "src"); -#endif -} - -static void gen_lsl(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - comprintf("\t int tmp=scratchie++;\n"); - if (curi->smode != immi) { - if (!noflags) { - start_brace(); - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_LSL_%s_reg(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - start_brace(); - comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n"); - } - } else { - start_brace(); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_LSL_%s_imm(tmp,data,srcreg);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n"); - } - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode != immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(cdata,tmpcnt);\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(cdata,tmpcnt);\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,7);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,15);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - comprintf("\t bt_l_ri(cdata,31);\n"); - break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshll_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshll_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } - } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshll_b_ri(data,srcreg);\n" - "\tbp=8-srcreg;\n"); - break; - case sz_word: - comprintf("\tshll_w_ri(data,srcreg);\n" - "\tbp=16-srcreg;\n"); - break; - case sz_long: - comprintf("\tshll_l_ri(data,srcreg);\n" - "\tbp=32-srcreg;\n"); - break; - default: - assert(0); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } -#endif -} - -static void gen_lslw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_LSLW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_LSLW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_lsr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\t dont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - comprintf("\t int tmp=scratchie++;\n"); - if (curi->smode != immi) { - if (!noflags) { - start_brace(); - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_LSR_%s_reg(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - start_brace(); - comprintf("\t jnf_LSR_%s_reg(tmp,data,cnt);\n", ssize); - } - } else { - start_brace(); - char *op; - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - op = "ff"; - } else - op = "nf"; - - comprintf("\t j%s_LSR_%s_imm(tmp,data,srcreg);\n", op, ssize); - - if (!noflags) { - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) ssize; - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - if (curi->smode != immi) { - if (!noflags) { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n" - "\tint cdata=scratchie++;\n" - "\tint tmpcnt=scratchie++;\n"); - comprintf("\tmov_l_rr(tmpcnt,cnt);\n" - "\tand_l_ri(tmpcnt,63);\n" - "\tmov_l_ri(cdata,0);\n" - "\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE); - /* cdata is now either data (for shift count!=0) or - 0 (for shift count==0) */ - switch (curi->size) { - case sz_byte: - comprintf("\tshrl_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshrl_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshrl_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - /* Result of shift is now in data. Now we need to determine - the carry by shifting cdata one less */ - comprintf("\tsub_l_ri(tmpcnt,1);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshrl_b_rr(cdata,tmpcnt);\n"); - break; - case sz_word: - comprintf("\tshrl_w_rr(cdata,tmpcnt);\n"); - break; - case sz_long: - comprintf("\tshrl_l_rr(cdata,tmpcnt);\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(tmpcnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE); - /* And create the flags */ - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } else { - uses_cmov; - start_brace(); - comprintf("\tint highmask;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshrl_b_rr(data,cnt);\n" - "\thighmask=0x38;\n"); - break; - case sz_word: - comprintf("\tshrl_w_rr(data,cnt);\n" - "\thighmask=0x30;\n"); - break; - case sz_long: - comprintf("\tshrl_l_rr(data,cnt);\n" - "\thighmask=0x20;\n"); - break; - default: - assert(0); - break; - } - comprintf("test_l_ri(cnt,highmask);\n" - "mov_l_ri(scratchie,0);\n" - "cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ); - switch (curi->size) { - case sz_byte: - comprintf("\tmov_b_rr(data,scratchie);\n"); - break; - case sz_word: - comprintf("\tmov_w_rr(data,scratchie);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(data,scratchie);\n"); - break; - default: - assert(0); - break; - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } - } else { - start_brace(); - comprintf("\tint tmp=scratchie++;\n" - "\tint bp;\n" - "\tmov_l_rr(tmp,data);\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tshrl_b_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - case sz_word: - comprintf("\tshrl_w_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - case sz_long: - comprintf("\tshrl_l_ri(data,srcreg);\n" - "\tbp=srcreg-1;\n"); - break; - default: - assert(0); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("\t duplicate_carry();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); - } -#endif -} - -static void gen_lsrw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_LSRW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_LSRW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_move(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - switch (curi->dmode) { - case Dreg: - case Areg: - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags && curi->dmode == Dreg) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_MOVE_%s(tmp, src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t tmp = src;\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); - break; - - default: /* It goes to memory, not a register */ - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_TST_%s(src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } - genastore("src", curi->dmode, "dstreg", curi->size, "dst"); - break; - } -#else - (void) ssize; - - switch (curi->dmode) { - case Dreg: - case Areg: - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genflags(flag_mov, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); - break; - default: /* It goes to memory, not a register */ - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genflags(flag_logical, curi->size, "src", "", ""); - genastore("src", curi->dmode, "dstreg", curi->size, "dst"); - break; - } -#endif -} - -static void gen_movea(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - - start_brace(); - comprintf("\t jnf_MOVEA_%s(dst, src);\n", ssize); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#else - (void) ssize; - - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - - start_brace(); - comprintf("\tint tmps=scratchie++;\n"); - switch (curi->size) { - case sz_word: - comprintf("\tsign_extend_16_rr(dst,src);\n"); - break; - case sz_long: - comprintf("\tmov_l_rr(dst,src);\n"); - break; - default: - assert(0); - break; - } - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#endif -} - -static void gen_mull(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t uae_u16 extra=%s;\n", gen_nextiword()); - comprintf("\t int r2=(extra>>12)&7;\n" - "\t int tmp=scratchie++;\n"); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - /* The two operands are in dst and r2 */ - if (!noflags) { - comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */ - comprintf("\t int r3=(extra & 7);\n"); - comprintf("\t mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ - comprintf("\t if (extra & 0x0800) { \n"); /* signed */ - comprintf("\t\t jff_MULS64(r2,r3);\n"); - comprintf("\t } else { \n"); - comprintf("\t\t jff_MULU64(r2,r3);\n"); - comprintf("\t } \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */ - comprintf("\t } else {\n"); /* Only want 32 bit result */ - /* operands in dst and r2, result goes into r2 */ - /* shouldn't matter whether it's signed or unsigned?!? */ - comprintf("\t if (extra & 0x0800) { \n"); /* signed */ - comprintf("\t jff_MULS32(r2,dst);\n"); - comprintf("\t } else { \n"); - comprintf("\t\t jff_MULU32(r2,dst);\n"); - comprintf("\t } \n"); /* The result is in r2, with r2 holding the lower 32 bits */ - comprintf("\t }\n"); - } else { - comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */ - comprintf("\t int r3=(extra & 7);\n"); - comprintf("\t mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ - comprintf("\t if (extra & 0x0800) { \n"); /* signed */ - comprintf("\t\t jnf_MULS64(r2,r3);\n"); - comprintf("\t } else { \n"); - comprintf("\t\t jnf_MULU64(r2,r3);\n"); - comprintf("\t } \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */ - comprintf("\t } else {\n"); /* Only want 32 bit result */ - /* operands in dst and r2, result foes into r2 */ - /* shouldn't matter whether it's signed or unsigned?!? */ - comprintf("\t if (extra & 0x0800) { \n"); /* signed */ - comprintf("\t jnf_MULS32(r2,dst);\n"); - comprintf("\t } else { \n"); - comprintf("\t\t jnf_MULU32(r2,dst);\n"); - comprintf("\t } \n"); /* The result is in r2, with r2 holding the lower 32 bits */ - comprintf("\t }\n"); - } -#else - if (!noflags) { - failure; - return; - } - comprintf("\tuae_u16 extra=%s;\n", gen_nextiword()); - comprintf("\tint r2=(extra>>12)&7;\n" - "\tint tmp=scratchie++;\n"); - - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - /* The two operands are in dst and r2 */ - comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ - "\tint r3=(extra&7);\n" - "\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ - comprintf("\tif (extra&0x0800) { \n" /* signed */ - "\t\timul_64_32(r2,r3);\n" - "\t} else { \n" - "\t\tmul_64_32(r2,r3);\n" - "\t} \n"); - /* The result is in r2/tmp, with r2 holding the lower 32 bits */ - comprintf("\t} else {\n"); /* Only want 32 bit result */ - /* operands in dst and r2, result foes into r2 */ - /* shouldn't matter whether it's signed or unsigned?!? */ - comprintf("\timul_32_32(r2,dst);\n" - "\t}\n"); -#endif -} - -static void gen_muls(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); - start_brace(); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_MULS(dst,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_MULS(dst,src);\n"); - } - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#else - comprintf("\tdont_care_flags();\n"); - genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); - comprintf("\tsign_extend_16_rr(scratchie,src);\n" - "\tsign_extend_16_rr(dst,dst);\n" - "\timul_32_32(dst,scratchie);\n"); - genflags(flag_logical, sz_long, "dst", "", ""); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#endif -} - -static void gen_mulu(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); - start_brace(); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_MULU(dst,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_MULU(dst,src);\n"); - } - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#else - comprintf("\tdont_care_flags();\n"); - genamode(curi->smode, "srcreg", sz_word, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0); - /* To do 16x16 unsigned multiplication, we actually use - 32x32 signed, and zero-extend the registers first. - That solves the problem of MUL needing dedicated registers - on the x86 */ - comprintf("\tzero_extend_16_rr(scratchie,src);\n" - "\tzero_extend_16_rr(dst,dst);\n" - "\timul_32_32(dst,scratchie);\n"); - genflags(flag_logical, sz_long, "dst", "", ""); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); - -#endif -} - -static void gen_nbcd(uae_u32 opcode, struct instr *curi, const char* ssize) { -#if 0 -#else - (void) opcode; - (void) curi; - (void) ssize; - failure; - /* Nope! */ -#endif -} - -static void gen_neg(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_NEG_%s(tmp,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_NEG(tmp,src);\n"); - } - - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags(flag_sub, curi->size, "", "src", "dst"); - genastore("dst", curi->smode, "srcreg", curi->size, "src"); -#endif -} - -static void gen_negx(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int dst=scratchie++;\n"); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_NEGX_%s(dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_NEGX(dst,src);\n"); - } - - genastore("dst", curi->smode, "srcreg", curi->size, "src"); -#else - (void) ssize; - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0);\n"); - genflags(flag_subx, curi->size, "", "src", "dst"); - genastore("dst", curi->smode, "srcreg", curi->size, "src"); -#endif -} - -static void gen_not(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_NOT_%s(tmp,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_NOT(tmp,src);\n", ssize); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\tint dst=scratchie++;\n"); - comprintf("\tmov_l_ri(dst,0xffffffff);\n"); - genflags(flag_eor, curi->size, "", "src", "dst"); - genastore("dst", curi->smode, "srcreg", curi->size, "src"); -#endif -} - -static void gen_or(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - - comprintf("\t dont_care_flags();\n"); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t jff_OR_%s(tmp, dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_OR(tmp, dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_or, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_orsr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } -#else - (void) curi; - failure; - isjump; -#endif -} - -static void gen_rol(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROL_%s(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_ROL_%s(tmp,data,cnt);\n", ssize); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) ssize; - - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - - switch (curi->size) { - case sz_long: - comprintf("\t rol_l_rr(data,cnt);\n"); - break; - case sz_word: - comprintf("\t rol_w_rr(data,cnt);\n"); - break; - case sz_byte: - comprintf("\t rol_b_rr(data,cnt);\n"); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); -#endif -} - -static void gen_rolw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROLW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_ROLW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_ror(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROR_%s(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_ROR_%s(tmp,data,cnt);\n", ssize); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) ssize; - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - comprintf("\tdont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - - switch (curi->size) { - case sz_long: - comprintf("\t ror_l_rr(data,cnt);\n"); - break; - case sz_word: - comprintf("\t ror_w_rr(data,cnt);\n"); - break; - case sz_byte: - comprintf("\t ror_b_rr(data,cnt);\n"); - break; - } - - if (!noflags) { - comprintf("\tstart_needflags();\n"); - comprintf("\tif (needed_flags & FLAG_ZNV)\n"); - switch (curi->size) { - case sz_byte: - comprintf("\t test_b_rr(data,data);\n"); - break; - case sz_word: - comprintf("\t test_w_rr(data,data);\n"); - break; - case sz_long: - comprintf("\t test_l_rr(data,data);\n"); - break; - } - switch (curi->size) { - case sz_byte: - comprintf("\t bt_l_ri(data,0x07);\n"); - break; - case sz_word: - comprintf("\t bt_l_ri(data,0x0f);\n"); - break; - case sz_long: - comprintf("\t bt_l_ri(data,0x1f);\n"); - break; - } - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } - genastore("data", curi->dmode, "dstreg", curi->size, "data"); -#endif -} - -static void gen_rorw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_RORW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } else { - comprintf("\t jnf_RORW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_roxl(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - isaddx; - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROXL_%s(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - } else { - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_ROXL_%s(tmp,data,cnt);\n", ssize); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) curi; - (void) ssize; - failure; -#endif -} - -static void gen_roxlw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - isaddx; - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROXLW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - } else { - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_ROXLW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_roxr(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - mayfail; - if (curi->smode == Dreg) { - comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" - " FAIL(1);\n" - " return;\n" - "} \n"); - start_brace(); - } - isaddx; - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0); - start_brace(); - comprintf("\t int tmp=scratchie++;\n"); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROXR_%s(tmp,data,cnt);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - } else { - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_ROXR_%s(tmp,data,cnt);\n", ssize); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "data"); -#else - (void) curi; - failure; -#endif -} - -static void gen_roxrw(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - isaddx; - comprintf("\t dont_care_flags();\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf("\t int tmp = scratchie++;\n"); - - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_ROXRW(tmp,src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - } else { - comprintf("\t restore_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_ROXRW(tmp,src);\n"); - } - genastore("tmp", curi->smode, "srcreg", curi->size, "src"); -#else - (void) curi; - failure; -#endif -} - -static void gen_sbcd(uae_u32 opcode, struct instr *curi, const char* ssize) { -#if 0 -#else - (void) opcode; - (void) curi; - (void) ssize; - failure; - /* I don't think so! */ -#endif -} - -static void gen_scc(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if 0 - genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); - start_brace(); - comprintf("\t int val = scratchie++;\n"); - switch (curi->cc) { - case 0: /* Unconditional set */ - case 1: - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 8: - case 9: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\t make_flags_live();\n"); /* Load the flags */ - comprintf("\t jnf_Scc_ri(val,%d);\n", curi->cc); - break; - default: - assert(0); - break; - } - genastore("val", curi->smode, "srcreg", curi->size, "src"); -#else - genamode(curi->smode, "srcreg", curi->size, "src", 2, 0); - start_brace(); - comprintf("\tint val = scratchie++;\n"); - - /* We set val to 0 if we really should use 255, and to 1 for real 0 */ - switch (curi->cc) { - case 0: /* Unconditional set */ - comprintf("\tmov_l_ri(val,0);\n"); - break; - case 1: - /* Unconditional not-set */ - comprintf("\tmov_l_ri(val,1);\n"); - break; - case 8: - failure; - break; /* Work out details! FIXME */ - case 9: - failure; - break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - /* All condition codes can be inverted by changing the LSB */ - comprintf("\tsetcc(val,%d);\n", cond_codes[curi->cc] ^ 1); - break; - default: - assert(0); - break; - } - comprintf("\tsub_b_ri(val,1);\n"); - genastore("val", curi->smode, "srcreg", curi->size, "src"); -#endif -} - -static void gen_sub(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - - comprintf("\t dont_care_flags();\n"); - start_brace(); - // Use tmp register to avoid destroying upper part in .B., .W cases - comprintf("\t int tmp=scratchie++;\n"); - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_SUB_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf( - "\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_SUB_%s(tmp,dst,src);\n", ssize); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_sub, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_suba(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\t jnf_SUBA_%s(dst, src);\n", ssize); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#else - (void) ssize; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n"); - switch (curi->size) { - case sz_byte: - comprintf("\tsign_extend_8_rr(tmp,src);\n"); - break; - case sz_word: - comprintf("\tsign_extend_16_rr(tmp,src);\n"); - break; - case sz_long: - comprintf("\ttmp=src;\n"); - break; - default: - assert(0); - break; - } - comprintf("\tsub_l(dst,tmp);\n"); - genastore("dst", curi->dmode, "dstreg", sz_long, "dst"); -#endif -} - -static void gen_subx(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; -#if defined(USE_JIT2) - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - start_brace(); - comprintf("\tint tmp=scratchie++;\n"); - comprintf("\tdont_care_flags();\n"); - if (!noflags) { - comprintf("\t make_flags_live();\n"); - comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ - comprintf("\t start_needflags();\n"); - comprintf("\t jff_SUBX_%s(tmp,dst,src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - duplicate_carry(); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */ - comprintf("\t jnf_SUBX(tmp,dst,src);\n"); - } - genastore("tmp", curi->dmode, "dstreg", curi->size, "dst"); -#else - (void) ssize; - isaddx; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0); - genflags(flag_subx, curi->size, "", "src", "dst"); - genastore("dst", curi->dmode, "dstreg", curi->size, "dst"); -#endif -} - -static void gen_swap(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\t dont_care_flags();\n"); - start_brace(); - - if (!noflags) { - comprintf("\t start_needflags();\n"); - comprintf("\t jff_SWAP(src);\n"); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); - } else { - comprintf("\t jnf_SWAP(src);\n"); - } - genastore("src", curi->smode, "srcreg", sz_long, "src"); -#else - genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); - comprintf("\tdont_care_flags();\n"); - comprintf("\tarm_ROR_l_ri8(src,16);\n"); - genflags(flag_logical, sz_long, "src", "", ""); - genastore("src", curi->smode, "srcreg", sz_long, "src"); -#endif -} - -static void gen_tst(uae_u32 opcode, struct instr *curi, const char* ssize) { - (void) opcode; - (void) ssize; -#if defined(USE_JIT2) - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - comprintf("\t dont_care_flags();\n"); - if (!noflags) { - start_brace(); - comprintf("\t start_needflags();\n"); - comprintf("\t jff_TST_%s(src);\n", ssize); - comprintf("\t live_flags();\n"); - comprintf("\t end_needflags();\n"); - } -#else - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - genflags(flag_logical, curi->size, "src", "", ""); -#endif -} - -static int /* returns zero for success, non-zero for failure */ -gen_opcode(unsigned long int opcode) { - struct instr *curi = table68k + opcode; - const char* ssize = NULL; - - insn_n_cycles = 2; - global_failure = 0; - long_opcode = 0; - global_isjump = 0; - global_iscjump = 0; - global_isaddx = 0; - global_cmov = 0; - global_fpu = 0; - global_mayfail = 0; - hack_opcode = opcode; - endstr[0] = 0; - - start_brace(); - comprintf("\tuae_u8 scratchie=S1;\n"); - switch (curi->plev) { - case 0: /* not privileged */ - break; - case 1: /* unprivileged only on 68000 */ - if (cpu_level == 0) - break; - if (next_cpu_level < 0) - next_cpu_level = 0; - - /* fall through */ - case 2: /* priviledged */ - failure; /* Easy ones first */ - break; - case 3: /* privileged if size == word */ - if (curi->size == sz_byte) - break; - failure; - break; - } - switch (curi->size) { - case sz_byte: - ssize = "b"; - break; - case sz_word: - ssize = "w"; - break; - case sz_long: - ssize = "l"; - break; - default: - assert(0); - break; - } - (void) ssize; - - switch (curi->mnemo) { - case i_AND: - gen_and(opcode, curi, ssize); - break; - - case i_OR: - gen_or(opcode, curi, ssize); - break; - - case i_EOR: - gen_eor(opcode, curi, ssize); - break; - - case i_ORSR: - gen_orsr(opcode, curi, ssize); - break; - - case i_EORSR: - gen_eorsr(opcode, curi, ssize); - break; - - case i_ANDSR: - gen_andsr(opcode, curi, ssize); - break; - - case i_SUB: - gen_sub(opcode, curi, ssize); - break; - - case i_SUBA: - gen_suba(opcode, curi, ssize); - break; - - case i_SUBX: - gen_subx(opcode, curi, ssize); - break; - - case i_SBCD: - gen_sbcd(opcode, curi, ssize); - break; - - case i_ADD: - gen_add(opcode, curi, ssize); - break; - - case i_ADDA: - gen_adda(opcode, curi, ssize); - break; - - case i_ADDX: - gen_addx(opcode, curi, ssize); - break; - - case i_ABCD: - gen_abcd(opcode, curi, ssize); - break; - - case i_NEG: - gen_neg(opcode, curi, ssize); - break; - - case i_NEGX: - gen_negx(opcode, curi, ssize); - break; - - case i_NBCD: - gen_nbcd(opcode, curi, ssize); - break; - - case i_CLR: - gen_clr(opcode, curi, ssize); - break; - - case i_NOT: - gen_not(opcode, curi, ssize); - break; - - case i_TST: - gen_tst(opcode, curi, ssize); - break; - - case i_BCHG: - gen_bchg(opcode, curi, ssize); - break; - - case i_BCLR: - gen_bclr(opcode, curi, ssize); - break; - - case i_BSET: - gen_bset(opcode, curi, ssize); - break; - - case i_BTST: - gen_btst(opcode, curi, ssize); - break; - - case i_CMPM: - case i_CMP: - gen_cmp(opcode, curi, ssize); - break; - - case i_CMPA: - gen_cmpa(opcode, curi, ssize); - break; - - /* The next two are coded a little unconventional, but they are doing - * weird things... */ - case i_MVPRM: - isjump; - failure; - break; - - case i_MVPMR: - isjump; - failure; - break; - - case i_MOVE: - gen_move(opcode, curi, ssize); - break; - - case i_MOVEA: - gen_movea(opcode, curi, ssize); - break; - - case i_MVSR2: - isjump; - failure; - break; - - case i_MV2SR: - isjump; - failure; - break; - - case i_SWAP: - gen_swap(opcode, curi, ssize); - break; - - case i_EXG: - gen_exg(opcode, curi, ssize); - break; - - case i_EXT: - gen_ext(opcode, curi, ssize); - break; - - case i_MVMEL: - genmovemel(opcode); - break; - - case i_MVMLE: - genmovemle(opcode); - break; - - case i_TRAP: - isjump; - failure; - break; - - case i_MVR2USP: - isjump; - failure; - break; - - case i_MVUSP2R: - isjump; - failure; - break; - - case i_RESET: - isjump; - failure; - break; - - case i_NOP: - break; - - case i_STOP: - isjump; - failure; - break; - - case i_RTE: - isjump; - failure; - break; - - case i_RTD: - genamode(curi->smode, "srcreg", curi->size, "offs", 1, 0); - /* offs is constant */ - comprintf("\tarm_ADD_l_ri8(offs,4);\n"); - start_brace(); - comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc,newad);\n" - "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n" - "\tarm_ADD_l(15,offs);\n"); - gen_update_next_handler(); - isjump; - break; - - case i_LINK: - genamode(curi->smode, "srcreg", sz_long, "src", 1, 0); - genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0); - comprintf("\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,src,scratchie);\n" - "\tmov_l_rr(src,15);\n"); - if (curi->size == sz_word) - comprintf("\tsign_extend_16_rr(offs,offs);\n"); - comprintf("\tarm_ADD_l(15,offs);\n"); - genastore("src", curi->smode, "srcreg", sz_long, "src"); - break; - - case i_UNLK: - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - comprintf("\tmov_l_rr(15,src);\n" - "\treadlong(15,src,scratchie);\n" - "\tarm_ADD_l_ri8(15,4);\n"); - genastore("src", curi->smode, "srcreg", curi->size, "src"); - break; - - case i_RTS: - comprintf("\tint newad=scratchie++;\n" - "\treadlong(15,newad,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc,newad);\n" - "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n" - "\tlea_l_brr(15,15,4);\n"); - gen_update_next_handler(); - isjump; - break; - - case i_TRAPV: - isjump; - failure; - break; - - case i_RTR: - isjump; - failure; - break; - - case i_JSR: - isjump; - genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); - start_brace(); - comprintf( - "\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - comprintf("\tint ret=scratchie++;\n" - "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); - comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" - "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n"); - gen_update_next_handler(); - break; - - case i_JMP: - isjump; - genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); - comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" - "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" - "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" - "\tm68k_pc_offset=0;\n"); - gen_update_next_handler(); - break; - - case i_BSR: - is_const_jump; - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - start_brace(); - comprintf( - "\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); - comprintf("\tint ret=scratchie++;\n" - "\tmov_l_ri(ret,retadd);\n" - "\tsub_l_ri(15,4);\n" - "\twritelong_clobber(15,ret,scratchie);\n"); - comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset_thisinst+2);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - comprintf("\tarm_ADD_l(PC_P,src);\n"); - comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); - break; - - case i_Bcc: - comprintf("\tuae_u32 v,v1,v2;\n"); - genamode(curi->smode, "srcreg", curi->size, "src", 1, 0); - /* That source is an immediate, so we can clobber it with abandon */ - switch (curi->size) { - case sz_byte: - comprintf("\tsign_extend_8_rr(src,src);\n"); - break; - case sz_word: - comprintf("\tsign_extend_16_rr(src,src);\n"); - break; - case sz_long: - break; - } - comprintf( - "\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); - /* Leave the following as "add" --- it will allow it to be optimized - away due to src being a constant ;-) */ - comprintf("\tarm_ADD_l_ri(src,(uintptr)comp_pc_p);\n"); - comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n"); - /* Now they are both constant. Might as well fold in m68k_pc_offset */ - comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset);\n"); - comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n"); - comprintf("\tm68k_pc_offset=0;\n"); - - if (curi->cc >= 2) { - comprintf("\tv1=get_const(PC_P);\n" - "\tv2=get_const(src);\n" - "\tregister_branch(v1,v2,%d);\n", cond_codes[curi->cc]); - comprintf("\tmake_flags_live();\n"); /* Load the flags */ - isjump; - } else { - is_const_jump; - } - - switch (curi->cc) { - case 0: /* Unconditional jump */ - comprintf("\tmov_l_rr(PC_P,src);\n"); - comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); - break; - case 1: - break; /* This is silly! */ - case 8: - failure; - break; /* Work out details! FIXME */ - case 9: - failure; - break; /* Not critical, though! */ - - case 2: - case 3: - case 4: - case 5: - case 6: - case 7: - case 10: - case 11: - case 12: - case 13: - case 14: - case 15: - break; - default: - assert(0); - break; - } - break; - - case i_LEA: - genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0); - genastore("srca", curi->dmode, "dstreg", curi->size, "dst"); - break; - - case i_PEA: - if (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind - || table68k[opcode].smode == Aipi - || table68k[opcode].smode == Apdi - || table68k[opcode].smode == Ad16 - || table68k[opcode].smode == Ad8r) - comprintf("if (srcreg==7) dodgy=1;\n"); - - genamode(curi->smode, "srcreg", curi->size, "src", 0, 0); - genamode(Apdi, "7", sz_long, "dst", 2, 0); - genastore("srca", Apdi, "7", sz_long, "dst"); - break; - - case i_DBcc: - gen_dbcc(opcode, curi, ssize); - break; - - case i_Scc: - gen_scc(opcode, curi, ssize); - break; - - case i_DIVU: - isjump; - failure; - break; - - case i_DIVS: - isjump; - failure; - break; - - case i_MULU: - gen_mulu(opcode, curi, ssize); - break; - - case i_MULS: - gen_muls(opcode, curi, ssize); - break; - - case i_CHK: - isjump; - failure; - break; - - case i_CHK2: - isjump; - failure; - break; - - case i_ASR: - gen_asr(opcode, curi, ssize); - break; - - case i_ASL: - gen_asl(opcode, curi, ssize); - break; - - case i_LSR: - gen_lsr(opcode, curi, ssize); - break; - - case i_LSL: - gen_lsl(opcode, curi, ssize); - break; - - case i_ROL: - gen_rol(opcode, curi, ssize); - break; - - case i_ROR: - gen_ror(opcode, curi, ssize); - break; - - case i_ROXL: - gen_roxl(opcode, curi, ssize); - break; - - case i_ROXR: - gen_roxr(opcode, curi, ssize); - break; - - case i_ASRW: - gen_asrw(opcode, curi, ssize); - break; - - case i_ASLW: - gen_aslw(opcode, curi, ssize); - break; - - case i_LSRW: - gen_lsrw(opcode, curi, ssize); - break; - - case i_LSLW: - gen_lslw(opcode, curi, ssize); - break; - - case i_ROLW: - gen_rolw(opcode, curi, ssize); - break; - - case i_RORW: - gen_rorw(opcode, curi, ssize); - break; - - case i_ROXLW: - gen_roxlw(opcode, curi, ssize); - break; - - case i_ROXRW: - gen_roxrw(opcode, curi, ssize); - break; - - case i_MOVEC2: - isjump; - failure; - break; - - case i_MOVE2C: - isjump; - failure; - break; - - case i_CAS: - failure; - break; - - case i_CAS2: - failure; - break; - - case i_MOVES: - /* ignore DFC and SFC because we have no MMU */ - isjump; - failure; - break; - - case i_BKPT: - /* only needed for hardware emulators */ - isjump; - failure; - break; - - case i_CALLM: - /* not present in 68030 */ - isjump; - failure; - break; - - case i_RTM: - /* not present in 68030 */ - isjump; - failure; - break; - - case i_TRAPcc: - isjump; - failure; - break; - - case i_DIVL: - isjump; - failure; - break; - - case i_MULL: - gen_mull(opcode, curi, ssize); - break; - - case i_BFTST: - case i_BFEXTU: - case i_BFCHG: - case i_BFEXTS: - case i_BFCLR: - case i_BFFFO: - case i_BFSET: - case i_BFINS: - failure; - break; - case i_PACK: - failure; - break; - case i_UNPK: - failure; - break; - case i_TAS: - failure; - break; - case i_FPP: - uses_fpu; -#ifdef USE_JIT_FPU - mayfail; - comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); - swap_opcode(); - comprintf("\tcomp_fpp_opp(opcode,extra);\n"); -#else - failure; -#endif - break; - case i_FBcc: - uses_fpu; -#ifdef USE_JIT_FPU - isjump; - uses_cmov; - mayfail; - swap_opcode(); - comprintf("\tcomp_fbcc_opp(opcode);\n"); -#else - isjump; - failure; -#endif - break; - case i_FDBcc: - uses_fpu; - isjump; - failure; - break; - case i_FScc: - uses_fpu; -#ifdef USE_JIT_FPU - mayfail; - uses_cmov; - comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); - swap_opcode(); - comprintf("\tcomp_fscc_opp(opcode,extra);\n"); -#else - failure; -#endif - break; - case i_FTRAPcc: - uses_fpu; - isjump; - failure; - break; - case i_FSAVE: - uses_fpu; - failure; - break; - case i_FRESTORE: - uses_fpu; - failure; - break; - - case i_CINVL: - case i_CINVP: - case i_CINVA: - isjump; /* Not really, but it's probably a good idea to stop - translating at this point */ - failure; - comprintf("\tflush_icache();\n"); /* Differentiate a bit more? */ - break; - case i_CPUSHL: - case i_CPUSHP: - case i_CPUSHA: - isjump; /* Not really, but it's probably a good idea to stop - translating at this point */ - failure; - break; - - case i_MOVE16: - gen_move16(opcode, curi); - break; - - case i_EMULOP_RETURN: - isjump; - failure; - break; - - case i_EMULOP: - failure; - break; - - // case i_NATFEAT_ID: - // case i_NATFEAT_CALL: - // failure; - // break; - - case i_MMUOP: - isjump; - failure; - break; - default: - assert(0); - break; - } - comprintf("%s", endstr); - finish_braces(); - sync_m68k_pc(); - if (global_mayfail) - comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); - return global_failure; -} - -static void generate_includes(FILE * f) { - fprintf(f, "#include \"sysdeps.h\"\n"); - fprintf(f, "#include \"m68k.h\"\n"); - fprintf(f, "#include \"memory.h\"\n"); - fprintf(f, "#include \"readcpu.h\"\n"); - fprintf(f, "#include \"newcpu.h\"\n"); - fprintf(f, "#include \"comptbl.h\"\n"); - fprintf(f, "#include \"debug.h\"\n"); -} - -static int postfix; - -static char *decodeEA (amodes mode, wordsizes size) -{ - static char buffer[80]; - - buffer[0] = 0; - switch (mode){ - case Dreg: - strcpy (buffer,"Dn"); - break; - case Areg: - strcpy (buffer,"An"); - break; - case Aind: - strcpy (buffer,"(An)"); - break; - case Aipi: - strcpy (buffer,"(An)+"); - break; - case Apdi: - strcpy (buffer,"-(An)"); - break; - case Ad16: - strcpy (buffer,"(d16,An)"); - break; - case Ad8r: - strcpy (buffer,"(d8,An,Xn)"); - break; - case PC16: - strcpy (buffer,"(d16,PC)"); - break; - case PC8r: - strcpy (buffer,"(d8,PC,Xn)"); - break; - case absw: - strcpy (buffer,"(xxx).W"); - break; - case absl: - strcpy (buffer,"(xxx).L"); - break; - case imm: - switch (size){ - case sz_byte: - strcpy (buffer,"#.B"); - break; - case sz_word: - strcpy (buffer,"#.W"); - break; - case sz_long: - strcpy (buffer,"#.L"); - break; - default: - break; - } - break; - case imm0: - strcpy (buffer,"#.B"); - break; - case imm1: - strcpy (buffer,"#.W"); - break; - case imm2: - strcpy (buffer,"#.L"); - break; - case immi: - strcpy (buffer,"#"); - break; - - default: - break; - } - return buffer; -} - -static char *outopcode (const char *name, int opcode) -{ - static char out[100]; - struct instr *ins; - - ins = &table68k[opcode]; - strcpy (out, name); - if (ins->smode == immi) - strcat (out, "Q"); - if (ins->size == sz_byte) - strcat (out,".B"); - if (ins->size == sz_word) - strcat (out,".W"); - if (ins->size == sz_long) - strcat (out,".L"); - strcat (out," "); - if (ins->suse) - strcat (out, decodeEA (ins->smode, ins->size)); - if (ins->duse) { - if (ins->suse) strcat (out,","); - strcat (out, decodeEA (ins->dmode, ins->size)); - } - return out; -} - - -static void generate_one_opcode(int rp, int noflags) { - int i; - uae_u16 smsk, dmsk; - int opcode = opcode_map[rp]; - int aborted = 0; - int have_srcreg = 0; - int have_dstreg = 0; - const char *name; - - if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) - return; - - for (i = 0; lookuptab[i].name[0]; i++) { - if (table68k[opcode].mnemo == lookuptab[i].mnemo) - break; - } - - if (table68k[opcode].handler != -1) - return; - - switch (table68k[opcode].stype) { - case 0: - smsk = 7; - break; - case 1: - smsk = 255; - break; - case 2: - smsk = 15; - break; - case 3: - smsk = 7; - break; - case 4: - smsk = 7; - break; - case 5: - smsk = 63; - break; - case 6: - smsk = 255; - break; - case 7: - smsk = 3; - break; - default: - assert(0); - break; - } - dmsk = 7; - - next_cpu_level = -1; - if (table68k[opcode].suse && table68k[opcode].smode != imm - && table68k[opcode].smode != imm0 && table68k[opcode].smode != imm1 - && table68k[opcode].smode != imm2 && table68k[opcode].smode != absw - && table68k[opcode].smode != absl && table68k[opcode].smode != PC8r - && table68k[opcode].smode != PC16) { - have_srcreg = 1; - if (table68k[opcode].spos == -1) { - if (((int) table68k[opcode].sreg) >= 128) - comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n", - (int) table68k[opcode].sreg); - else - comprintf("\tuae_s32 srcreg = %d;\n", - (int) table68k[opcode].sreg); - } else { - char source[100]; - int pos = table68k[opcode].spos; - - comprintf( - "#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); - - if (pos < 8 && (smsk >> (8 - pos)) != 0) - sprintf(source, "(((opcode >> %d) | (opcode << %d)) & %d)", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - sprintf(source, "((opcode >> %d) & %d)", pos ^ 8, smsk); - else - sprintf(source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - comprintf("\tuae_u32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - comprintf("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - comprintf("\tuae_u32 srcreg = %s;\n", source); - - comprintf("#else\n"); - - if (pos) - sprintf(source, "((opcode >> %d) & %d)", pos, smsk); - else - sprintf(source, "(opcode & %d)", smsk); - - if (table68k[opcode].stype == 3) - comprintf("\tuae_s32 srcreg = imm8_table[%s];\n", source); - else if (table68k[opcode].stype == 1) - comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source); - else - comprintf("\tuae_s32 srcreg = %s;\n", source); - - comprintf("#endif\n"); - } - } - if (table68k[opcode].duse - /* Yes, the dmode can be imm, in case of LINK or DBcc */ - && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 - && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 - && table68k[opcode].dmode != absw - && table68k[opcode].dmode != absl) { - have_dstreg = 1; - if (table68k[opcode].dpos == -1) { - if (((int) table68k[opcode].dreg) >= 128) - comprintf("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n", - (int) table68k[opcode].dreg); - else - comprintf("\tuae_s32 dstreg = %d;\n", - (int) table68k[opcode].dreg); - } else { - int pos = table68k[opcode].dpos; - - comprintf( - "#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n"); - - if (pos < 8 && (dmsk >> (8 - pos)) != 0) - comprintf( - "\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", - pos ^ 8, 8 - pos, dmsk); - else if (pos != 8) - comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos ^ 8, - dmsk); - else - comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - comprintf("#else\n"); - - if (pos) - comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos, - dmsk); - else - comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk); - - comprintf("#endif\n"); - } - } - - if (have_srcreg && have_dstreg - && (table68k[opcode].dmode == Areg || table68k[opcode].dmode == Aind - || table68k[opcode].dmode == Aipi - || table68k[opcode].dmode == Apdi - || table68k[opcode].dmode == Ad16 - || table68k[opcode].dmode == Ad8r) - && (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind - || table68k[opcode].smode == Aipi - || table68k[opcode].smode == Apdi - || table68k[opcode].smode == Ad16 - || table68k[opcode].smode == Ad8r)) { - comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n"); - } else { - comprintf("\tuae_u32 dodgy=0;\n"); - } - comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n"); - comprintf("\tm68k_pc_offset+=2;\n"); - - aborted = gen_opcode(opcode); - { - int flags = 0; - if (global_isjump) - flags |= 1; - if (long_opcode) - flags |= 2; - if (global_cmov) - flags |= 4; - if (global_isaddx) - flags |= 8; - if (global_iscjump) - flags |= 16; - if (global_fpu) - flags |= 32; - - comprintf("}\n"); - - name = lookuptab[i].name; - if (aborted) { - fprintf(stblfile, "{ NULL, 0x%08x, %d }, /* %s */\n", opcode, flags, name); - com_discard(); - } else { - const char *tbl = noflags ? "nf" : "ff"; - fprintf(stblfile, - "{ op_%x_%d_comp_%s, %d, 0x%08x }, /* %s */\n", - opcode, postfix, tbl, opcode, flags, name); - fprintf(headerfile, "extern compop_func op_%x_%d_comp_%s;\n", - opcode, postfix, tbl); - printf ("/* %s */\n", outopcode (name, opcode)); - printf( - "void REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode) /* %s */\n{\n", - opcode, postfix, tbl, name); - com_flush(); - } - } - opcode_next_clev[rp] = next_cpu_level; - opcode_last_postfix[rp] = postfix; -} - -static void generate_func(int noflags) { - int i, j, rp; - const char *tbl = noflags ? "nf" : "ff"; - - using_prefetch = 0; - using_exception_3 = 0; - for (i = 0; i < 1; i++) /* We only do one level! */ - { - cpu_level = 4 - i; - postfix = i; - - fprintf(stblfile, "const struct comptbl op_smalltbl_%d_comp_%s[] = {\n", - postfix, tbl); - - /* sam: this is for people with low memory (eg. me :)) */ - printf("\n" - "#if !defined(PART_1) && !defined(PART_2) && " - "!defined(PART_3) && !defined(PART_4) && " - "!defined(PART_5) && !defined(PART_6) && " - "!defined(PART_7) && !defined(PART_8)" - "\n" - "#define PART_1 1\n" - "#define PART_2 1\n" - "#define PART_3 1\n" - "#define PART_4 1\n" - "#define PART_5 1\n" - "#define PART_6 1\n" - "#define PART_7 1\n" - "#define PART_8 1\n" - "#endif\n\n"); - - rp = 0; - for (j = 1; j <= 8; ++j) { - int k = (j * nr_cpuop_funcs) / 8; - printf("#ifdef PART_%d\n", j); - for (; rp < k; rp++) - generate_one_opcode(rp, noflags); - printf("#endif\n\n"); - } - - fprintf(stblfile, "{ 0, 65536, 0 }};\n"); - } - -} - -#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV) -void cygwin_mingw_abort() -{ -#undef abort - abort(); -} -#endif - -int main(void) -{ - init_table68k (); - - opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - counts = (unsigned long *) malloc(65536 * sizeof(unsigned long)); - read_counts(); - - /* It would be a lot nicer to put all in one file (we'd also get rid of - * cputbl.h that way), but cpuopti can't cope. That could be fixed, but - * I don't dare to touch the 68k version. */ - - headerfile = fopen("comptbl.h", "wb"); - fprintf (headerfile, "" - "extern const struct comptbl op_smalltbl_0_comp_nf[];\n" - "extern const struct comptbl op_smalltbl_0_comp_ff[];\n" - ""); - - stblfile = fopen("compstbl.cpp", "wb"); - if (freopen("compemu.cpp", "wb", stdout) == NULL) - { - assert(0); - } - - generate_includes(stdout); - generate_includes(stblfile); - - printf("#include \"compiler/compemu.h\"\n"); - - noflags = 0; - generate_func(noflags); - - free(opcode_map); - free(opcode_last_postfix); - free(opcode_next_clev); - free(counts); - - opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs); - counts = (unsigned long *) malloc(65536 * sizeof(unsigned long)); - read_counts(); - noflags = 1; - generate_func(noflags); - - free(opcode_map); - free(opcode_last_postfix); - free(opcode_next_clev); - free(counts); - - free(table68k); - fclose(stblfile); - fclose(headerfile); - return 0; -} diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c b/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c deleted file mode 100644 index 227a99d30..000000000 --- a/BasiliskII/src/uae_cpu/compiler/test_codegen_arm.c +++ /dev/null @@ -1,264 +0,0 @@ -/* Example of using sigaction() to setup a signal handler with 3 arguments - * including siginfo_t. - */ -#include -#include -#include -#include - -#include "flags_arm.h" -#include "codegen_arm.h" - -#define TEST(c,ex,s) { c; if (opcode != ex) printf("(%s) Invalid opcode %x expected %x\n", s, opcode, ex); } - -int opcode; - -void emit_long(v) { - opcode = v; -} - -int main (int argc, char *argv[]) -{ -TEST(MOV_ri(8, 15), 0xe3a0800f, "mov r8,#15"); -TEST(MOV_rr(8,9), 0xe1a08009, "mov r8, r9"); -TEST(MOV_rrLSLi(8,9,5), 0xe1a08289, "lsl r8, r9, #5"); -TEST(MOV_rrLSLr(8,9,7), 0xe1a08719, "lsl r8, r9, r7"); -TEST(MOV_rrLSRi(8,9,5), 0xe1a082a9, "lsr r8, r9, #5"); -TEST(MOV_rrLSRr(8,9,7), 0xe1a08739, "lsr r8, r9, r7"); -TEST(MOV_rrASRi(8,9,5), 0xe1a082c9, "asr r8, r9, #5"); -TEST(MOV_rrASRr(8,9,7), 0xe1a08759, "asr r8, r9, r7"); -TEST(MOV_rrRORi(8,9,5), 0xe1a082e9, "ror r8, r9, #5"); -TEST(MOV_rrRORr(8,9,7), 0xe1a08779, "ror r8, r9, r7"); -TEST(MOV_rrRRX(8,9), 0xe1a08069, "rrx r8, r9"); - -TEST(MOVS_ri(8, 15), 0xe3b0800f, "movs r8,#15"); -TEST(MOVS_rr(8,9), 0xe1b08009, "movs r8, r9"); -TEST(MOVS_rrLSLi(8,9,5), 0xe1b08289, "lsls r8, r9, #5"); -TEST(MOVS_rrLSLr(8,9,7), 0xe1b08719, "lsls r8, r9, r7"); -TEST(MOVS_rrLSRi(8,9,5), 0xe1b082a9, "lsrs r8, r9, #5"); -TEST(MOVS_rrLSRr(8,9,7), 0xe1b08739, "lsrs r8, r9, r7"); -TEST(MOVS_rrASRi(8,9,5), 0xe1b082c9, "asrs r8, r9, #5"); -TEST(MOVS_rrASRr(8,9,7), 0xe1b08759, "asrs r8, r9, r7"); -TEST(MOVS_rrRORi(8,9,5), 0xe1b082e9, "rors r8, r9, #5"); -TEST(MOVS_rrRORr(8,9,7), 0xe1b08779, "rors r8, r9, r7"); -TEST(MOVS_rrRRX(8,9), 0xe1b08069, "rrxs r8, r9"); - -TEST(MVN_ri(8, 15), 0xe3e0800f, "mvn r8,#15"); -TEST(MVN_rr(8,9), 0xe1e08009, "mvn r8, r9"); -TEST(MVN_rrLSLi(8,9,5), 0xe1e08289, "mvn r8, r9, lsl #5"); -TEST(MVN_rrLSLr(8,9,7), 0xe1e08719, "mvn r8, r9, lsl r7"); -TEST(MVN_rrLSRi(8,9,5), 0xe1e082a9, "mvn r8, r9, lsr #5"); -TEST(MVN_rrLSRr(8,9,7), 0xe1e08739, "mvn r8, r9, lsr r7"); -TEST(MVN_rrASRi(8,9,5), 0xe1e082c9, "mvn r8, r9, asr #5"); -TEST(MVN_rrASRr(8,9,7), 0xe1e08759, "mvn r8, r9, asr r7"); -TEST(MVN_rrRORi(8,9,5), 0xe1e082e9, "mvn r8, r9, ror #5"); -TEST(MVN_rrRORr(8,9,7), 0xe1e08779, "mvn r8, r9, ror r7"); -TEST(MVN_rrRRX(8,9), 0xe1e08069, "mvn r8, r9, rrx"); - -TEST(CMP_ri(8, 15), 0xe358000f, "cmp r8,#15"); -TEST(CMP_rr(8,9), 0xe1580009, "cmp r8, r9"); -TEST(CMP_rrLSLi(8,9,5), 0xe1580289, "cmp r8, r9, #5"); -TEST(CMP_rrLSLr(8,9,7), 0xe1580719, "cmp r8, r9, r7"); -TEST(CMP_rrLSRi(8,9,5), 0xe15802a9, "cmp r8, r9, #5"); -TEST(CMP_rrLSRr(8,9,7), 0xe1580739, "cmp r8, r9, r7"); -TEST(CMP_rrASRi(8,9,5), 0xe15802c9, "cmp r8, r9, #5"); -TEST(CMP_rrASRr(8,9,7), 0xe1580759, "cmp r8, r9, r7"); -TEST(CMP_rrRORi(8,9,5), 0xe15802e9, "cmp r8, r9, #5"); -TEST(CMP_rrRORr(8,9,7), 0xe1580779, "cmp r8, r9, r7"); -TEST(CMP_rrRRX(8,9), 0xe1580069, "cmp r8, r9"); - -TEST(CMP_ri(8, 0x81), 0xe3580081, "cmp r8,#0x81"); -TEST(CMP_ri(8, 0x204), 0xe3580f81, "cmp r8,#0x204"); -TEST(CMP_ri(8, 0x810), 0xe3580e81, "cmp r8,#0x8100"); -TEST(CMP_ri(8, 0x2040), 0xe3580d81, "cmp r8,#0x2040"); -TEST(CMP_ri(8, 0x8100), 0xe3580c81, "cmp r8,#0x8100"); -TEST(CMP_ri(8, 0x20400), 0xe3580b81, "cmp r8,#0x20400"); -TEST(CMP_ri(8, 0x81000), 0xe3580a81, "cmp r8,#0x81000"); -TEST(CMP_ri(8, 0x204000), 0xe3580981, "cmp r8,#0x204000"); -TEST(CMP_ri(8, 0x810000), 0xe3580881, "cmp r8,#0x810000"); -TEST(CMP_ri(8, 0x2040000), 0xe3580781, "cmp r8,#0x2040000"); -TEST(CMP_ri(8, 0x8100000), 0xe3580681, "cmp r8,#0x8100000"); -TEST(CMP_ri(8, 0x20400000), 0xe3580581, "cmp r8,#0x20400000"); -TEST(CMP_ri(8, 0x81000000), 0xe3580481, "cmp r8,#0x81000000"); -TEST(CMP_ri(8, 0x04000002), 0xe3580381, "cmp r8,#0x04000002"); -TEST(CMP_ri(8, 0x10000008), 0xe3580281, "cmp r8,#0x10000008"); -TEST(CMP_ri(8, 0x40000020), 0xe3580181, "cmp r8,#0x40000020"); - -TEST(CMP_ri(8, 0x1200), 0xe3580c12, "cmp r8,#0x1200"); -TEST(CMP_ri(8, 0x120000), 0xe3580812, "cmp r8,#0x120000"); -TEST(CMP_ri(8, 0x12000000), 0xe3580412, "cmp r8,#0x12000000"); - -TEST(BEQ_i(5), 0x0a000005, "beq #5"); -TEST(BNE_i(5), 0x1a000005, "bne #5"); -TEST(BCS_i(5), 0x2a000005, "bcs #5"); -TEST(BCC_i(5), 0x3a000005, "bcc #5"); -TEST(BMI_i(5), 0x4a000005, "bmi #5"); -TEST(BPL_i(5), 0x5a000005, "bpl #5"); -TEST(BVS_i(5), 0x6a000005, "bvs #5"); -TEST(BVC_i(5), 0x7a000005, "bvc #5"); -TEST(BHI_i(5), 0x8a000005, "bhi #5"); -TEST(BLS_i(5), 0x9a000005, "bls #5"); -TEST(BGE_i(5), 0xaa000005, "bge #5"); -TEST(BLT_i(5), 0xba000005, "blt #5"); -TEST(BGT_i(5), 0xca000005, "bgt #5"); -TEST(BLE_i(5), 0xda000005, "ble #5"); -TEST(B_i(5), 0xea000005, "b #5"); - -TEST(BL_i(5), 0xeb000005, "bl #5"); -TEST(BLX_r(8), 0xe12fff38, "blx r8"); -TEST(BX_r(8), 0xe12fff18, "bx r8"); - -TEST(EOR_rri(6, 8, 15), 0xe228600f, "eor r6, r8,#15"); -TEST(EOR_rrr(6, 8,9), 0xe0286009, "eor r6, r8, r9"); -TEST(EOR_rrrLSLi(6,8,9,5), 0xe0286289, "eor r6, r8, r9, lsl #5"); -TEST(EOR_rrrLSLr(6,8,9,7), 0xe0286719, "eor r6, r8, r9, lsl r7"); -TEST(EOR_rrrLSRi(6,8,9,5), 0xe02862a9, "eor r6, r8, r9, lsr #5"); -TEST(EOR_rrrLSRr(6,8,9,7), 0xe0286739, "eor r6, r8, r9, lsr r7"); -TEST(EOR_rrrASRi(6,8,9,5), 0xe02862c9, "eor r6, r8, r9, asr #5"); -TEST(EOR_rrrASRr(6,8,9,7), 0xe0286759, "eor r6, r8, r9, asr r7"); -TEST(EOR_rrrRORi(6,8,9,5), 0xe02862e9, "eor r6, r8, r9, ror #5"); -TEST(EOR_rrrRORr(6,8,9,7), 0xe0286779, "eor r6, r8, r9, ror r7"); -TEST(EOR_rrrRRX(6,8,9), 0xe0286069, "eor r6, r8, r9, rrx"); - -TEST(EORS_rri(6, 8, 15), 0xe238600f, "eors r6, r8,#15"); -TEST(EORS_rrr(6, 8,9), 0xe0386009, "eors r6, r8, r9"); -TEST(EORS_rrrLSLi(6,8,9,5), 0xe0386289, "eors r6, r8, r9, lsl #5"); -TEST(EORS_rrrLSLr(6,8,9,7), 0xe0386719, "eors r6, r8, r9, lsr r7"); -TEST(EORS_rrrLSRi(6,8,9,5), 0xe03862a9, "eors r6, r8, r9, lsr #5"); -TEST(EORS_rrrLSRr(6,8,9,7), 0xe0386739, "eors r6, r8, r9, lsr r7"); -TEST(EORS_rrrASRi(6,8,9,5), 0xe03862c9, "eors r6, r8, r9, asr #5"); -TEST(EORS_rrrASRr(6,8,9,7), 0xe0386759, "eors r6, r8, r9, asr r7"); -TEST(EORS_rrrRORi(6,8,9,5), 0xe03862e9, "eors r6, r8, r9, ror #5"); -TEST(EORS_rrrRORr(6,8,9,7), 0xe0386779, "eors r6, r8, r9, ror r7"); -TEST(EORS_rrrRRX(6,8,9), 0xe0386069, "eors r6, r8, r9, rrx"); - -TEST(MRS_CPSR(6), 0xe10f6000, "mrs r6, CPSR"); -TEST(MRS_SPSR(6), 0xe14f6000, "mrs r6, SPSR"); - -TEST(MSR_CPSR_i(5), 0xe329f005, "msr CPSR_fc, #5"); -TEST(MSR_CPSR_r(5), 0xe129f005, "msr CPSR_fc, r5"); - -TEST(MSR_CPSRf_i(5), 0xe328f005, "msr CPSR_f, #5"); -TEST(MSR_CPSRf_r(5), 0xe128f005, "msr CPSR_f, r5"); - -TEST(MSR_CPSRc_i(5), 0xe321f005, "msr CPSR_c, #5"); -TEST(MSR_CPSRc_r(5), 0xe121f005, "msr CPSR_c, r5"); - -TEST(PUSH(6), 0xe92d0040, "push {r6}"); -TEST(POP(6), 0xe8bd0040, "pop {r6}"); - -TEST(BIC_rri(0, 0, 0x9f000000), 0xe3c0049f, "bic r0, r0, #0x9f000000"); -TEST(BIC_rri(2, 3, 0xff00), 0xe3c32cff, "bic r2, r3, #0xff00"); -TEST(BIC_rri(3, 4, 0xff), 0xe3c430ff, "bic r3, r4, #0xff"); - -TEST(ORR_rrrLSRi(0, 1, 2, 16), 0xe1810822, "orr r0, r1, r2, lsr #16"); -TEST(ORR_rrrLSRi(0, 1, 2, 24), 0xe1810c22, "orr r0, r1, r2, lsr #24"); - -TEST(LDR_rR(8, 9), 0xe5998000, "ldr r8, [r9]"); -TEST(LDR_rRI(8, 9, 4), 0xe5998004, "ldr r8, [r9, #4]"); -TEST(LDR_rRi(8, 9, 4), 0xe5198004, "ldr r8, [r9, #-4]"); -TEST(LDR_rRR(8, 9, 7), 0xe7998007, "ldr r8, [r9, r7]"); -TEST(LDR_rRr(8, 9, 7), 0xe7198007, "ldr r8, [r9, -r7]"); -TEST(LDR_rRR_LSLi(8, 9, 7, 5), 0xe7998287, "ldr r8, [r9, r7, lsl #5]"); -TEST(LDR_rRr_LSLi(8, 9, 7, 5), 0xe7198287, "ldr r8, [r9, -r7, lsl #5]"); -TEST(LDR_rRR_LSRi(8, 9, 7, 5), 0xe79982a7, "ldr r8, [r9, r7, lsr #5]"); -TEST(LDR_rRr_LSRi(8, 9, 7, 5), 0xe71982a7, "ldr r8, [r9, -r7, lsr #5]"); -TEST(LDR_rRR_ASRi(8, 9, 7, 5), 0xe79982c7, "ldr r8, [r9, r7, asr #5]"); -TEST(LDR_rRr_ASRi(8, 9, 7, 5), 0xe71982c7, "ldr r8, [r9, -r7, asr #5]"); -TEST(LDR_rRR_RORi(8, 9, 7, 5), 0xe79982e7, "ldr r8, [r9, r7, ror #5]"); -TEST(LDR_rRr_RORi(8, 9, 7, 5), 0xe71982e7, "ldr r8, [r9, -r7, ror #5]"); -TEST(LDR_rRR_RRX(8, 9, 7), 0xe7998067, "ldr r8, [r9, r7, rrx]"); -TEST(LDR_rRr_RRX(8, 9, 7), 0xe7198067, "ldr r8, [r9, -r7, rrx]"); - -TEST(LDRB_rR(8, 9), 0xe5d98000, "ldrb r8, [r9]"); -TEST(LDRB_rRI(8, 9, 4), 0xe5d98004, "ldrb r8, [r9, #4]"); -TEST(LDRB_rRi(8, 9, 4), 0xe5598004, "ldrb r8, [r9, #-4]"); -TEST(LDRB_rRR(8, 9, 7), 0xe7d98007, "ldrb r8, [r9, r7]"); -TEST(LDRB_rRr(8, 9, 7), 0xe7598007, "ldrb r8, [r9, -r7]"); -TEST(LDRB_rRR_LSLi(8, 9, 7, 5), 0xe7d98287, "ldrb r8, [r9, r7, lsl #5]"); -TEST(LDRB_rRr_LSLi(8, 9, 7, 5), 0xe7598287, "ldrb r8, [r9, -r7, lsl #5]"); -TEST(LDRB_rRR_LSRi(8, 9, 7, 5), 0xe7d982a7, "ldrb r8, [r9, r7, lsr #5]"); -TEST(LDRB_rRr_LSRi(8, 9, 7, 5), 0xe75982a7, "ldrb r8, [r9, -r7, lsr #5]"); -TEST(LDRB_rRR_ASRi(8, 9, 7, 5), 0xe7d982c7, "ldrb r8, [r9, r7, asr #5]"); -TEST(LDRB_rRr_ASRi(8, 9, 7, 5), 0xe75982c7, "ldrb r8, [r9, -r7, asr #5]"); -TEST(LDRB_rRR_RORi(8, 9, 7, 5), 0xe7d982e7, "ldrb r8, [r9, r7, ror #5]"); -TEST(LDRB_rRr_RORi(8, 9, 7, 5), 0xe75982e7, "ldrb r8, [r9, -r7, ror #5]"); -TEST(LDRB_rRR_RRX(8, 9, 7), 0xe7d98067, "ldrb r8, [r9, r7, rrx]"); -TEST(LDRB_rRr_RRX(8, 9, 7), 0xe7598067, "ldrb r8, [r9, -r7, rrx]"); - -TEST(LDRSB_rR(8, 9), 0xe1d980d0, "ldrsb r8, [r9]"); -TEST(LDRSB_rRI(8, 9, 4), 0xe1d980d4, "ldrsb r8, [r9, #4]"); -TEST(LDRSB_rRi(8, 9, 4), 0xe15980d4, "ldrsb r8, [r9, #-4]"); -TEST(LDRSB_rRR(8, 9, 7), 0xe19980d7, "ldrsb r8, [r9, r7]"); -TEST(LDRSB_rRr(8, 9, 7), 0xe11980d7, "ldrsb r8, [r9, -r7]"); - -TEST(LDRSH_rR(8, 9), 0xe1d980f0, "ldrsh r8, [r9]"); -TEST(LDRSH_rRI(8, 9, 4), 0xe1d980f4, "ldrsh r8, [r9, #4]"); -TEST(LDRSH_rRi(8, 9, 4), 0xe15980f4, "ldrsh r8, [r9, #-4]"); -TEST(LDRSH_rRR(8, 9, 7), 0xe19980f7, "ldrsh r8, [r9, r7]"); -TEST(LDRSH_rRr(8, 9, 7), 0xe11980f7, "ldrsh r8, [r9, -r7]"); - -TEST(LDRH_rR(8, 9), 0xe1d980b0, "ldrh r8, [r9]"); -TEST(LDRH_rRI(8, 9, 4), 0xe1d980b4, "ldrh r8, [r9, #4]"); -TEST(LDRH_rRi(8, 9, 4), 0xe15980b4, "ldrh r8, [r9, #-4]"); -TEST(LDRH_rRR(8, 9, 7), 0xe19980b7, "ldrh r8, [r9, r7]"); -TEST(LDRH_rRr(8, 9, 7), 0xe11980b7, "ldrh r8, [r9, -r7]"); - -TEST(STR_rRR(8,9,7), 0xe7898007, "str r8, [r9, r7]"); -TEST(STR_rRr(8,9,7), 0xe7098007, "str r8, [r9, -r7]"); - -TEST(STRB_rR(5, 6), 0xe5c65000, "strb r5,[r6]"); - -TEST(STRH_rR(8, 9), 0xe1c980b0, "strh r8, [r9]"); -TEST(STRH_rRI(8, 9, 4), 0xe1c980b4, "strh r8, [r9, #4]"); -TEST(STRH_rRi(8, 9, 4), 0xe14980b4, "strh r8, [r9, #-4]"); -TEST(STRH_rRR(8, 9, 7), 0xe18980b7, "strh r8, [r9, r7]"); -TEST(STRH_rRr(8, 9, 7), 0xe10980b7, "strh r8, [r9, -r7]"); - -TEST(CLZ_rr(2, 3), 0xe16f2f13, "clz r2,r3"); -TEST(REV_rr(2, 3), 0xe6bf2f33, "rev r2, r3"); -TEST(REV16_rr(2, 3), 0xe6bf2fb3, "rev16 r2, r3"); -TEST(REVSH_rr(2, 3), 0xe6ff2fb3, "revsh r2, r3"); - -TEST(SXTB_rr(2,3), 0xe6af2073, "sxtb r2,r3"); -TEST(SXTB_rr(3,4), 0xe6af3074, "sxtb r3,r4"); - -TEST(SXTB_rr_ROR8(2,3), 0xe6af2473, "sxtb r2, r3, ror #8"); -TEST(SXTB_rr_ROR16(2,3), 0xe6af2873, "sxtb r2, r3, ror #16"); -TEST(SXTB_rr_ROR24(2,3), 0xe6af2c73, "sxtb r2, r3, ror #24"); -TEST(SXTH_rr(2,3), 0xe6bf2073, "sxth r2, r3"); -TEST(SXTH_rr_ROR8(2,3), 0xe6bf2473, "sxth r2, r3, ror #8"); -TEST(SXTH_rr_ROR16(2,3), 0xe6bf2873, "sxth r2, r3, ror #16"); -TEST(SXTH_rr_ROR24(2,3), 0xe6bf2c73, "sxth r2, r3, ror #24"); -TEST(UXTB_rr(2,3), 0xe6ef2073, "uxtb r2, r3"); -TEST(UXTB_rr_ROR8(2,3), 0xe6ef2473, "uxtb r2, r3, ror #8"); -TEST(UXTB_rr_ROR16(2,3), 0xe6ef2873, "uxtb r2, r3, ror #16"); -TEST(UXTB_rr_ROR24(2,3), 0xe6ef2c73, "uxtb r2, r3, ror #24"); -TEST(UXTH_rr(2,3), 0xe6ff2073, "uxth r2, r3"); -TEST(UXTH_rr_ROR8(2,3), 0xe6ff2473, "uxth r2, r3, ror #8"); -TEST(UXTH_rr_ROR16(2,3), 0xe6ff2873, "uxth r2, r3, ror #16"); -TEST(UXTH_rr_ROR24(2,3), 0xe6ff2c73, "uxth r2, r3, ror #24"); - -TEST(REV_rr(2,3), 0xe6bf2f33, "rev r2, r3"); -TEST(REV16_rr(2,3), 0xe6bf2fb3, "rev16 r2, r3"); -TEST(REVSH_rr(2,3), 0xe6ff2fb3, "revsh r2, r3"); - -TEST(CC_MOV_ri(NATIVE_CC_CS, 4,1), 0x23a04001, "movcs r4, #1"); -TEST(CC_MOV_ri(NATIVE_CC_CC, 4,1), 0x33a04001, "movcc r4, #1"); - -int imm = 0x9f; -TEST(ADDS_rri(0, 0, imm << 24), 0xe290049f, "adds r0, r0, 0x9f000000"); - -TEST(PKHBT_rrr(1, 2, 3), 0xe6821013, "pkhbt r1,r2,r3"); -TEST(MVN_ri8(1,2), 0xe3e01002, "mvn r1,#2"); - -TEST(ORR_rri8RORi(1,2,0x12,24), 0xe3821c12, "orr r1, r2, #0x1200"); -TEST(PKHTB_rrrASRi(1, 2, 3, 4), 0xe6821253, "pkhtb r1,r2,r3,ASR #4"); -TEST(PKHBT_rrrLSLi(1, 2, 3, 4), 0xe6821213, "pkhbt r1,r2,r3,LSL #4"); - -TEST(MUL_rrr(1,2,3), 0xe0010392, "mul r1, r2, r3"); -TEST(MULS_rrr(1,2,3), 0xe0110392, "muls r1, r2, r3"); - - -} - diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp deleted file mode 100644 index 216effe59..000000000 --- a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp +++ /dev/null @@ -1,1008 +0,0 @@ -/******************** -*- mode: C; tab-width: 8 -*- ******************** - * - * Dumb and Brute Force Run-time assembler verifier for IA-32 and AMD64 - * - ***********************************************************************/ - - -/*********************************************************************** - * - * Copyright 2004 Gwenole Beauchesne - * - * 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 - * - ***********************************************************************/ - -/* - * STATUS: 5.5M variations covering unary register based operations, - * reg/reg operations, imm/reg operations. - * - * TODO: - * - Rewrite to use internal BFD/opcodes format instead of string compares - * - Add reg/mem, imm/mem variations - */ - -#define _BSD_SOURCE 1 -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" - -#undef abort -#define abort() do { \ - fprintf(stderr, "ABORT: %s, line %d\n", __FILE__, __LINE__); \ - (abort)(); \ -} while (0) - -#define X86_TARGET_64BIT 1 -#define X86_FLAT_REGISTERS 0 -#define X86_OPTIMIZE_ALU 1 -#define X86_OPTIMIZE_ROTSHI 1 -#include "compiler/codegen_x86.h" - -#define x86_emit_byte(B) emit_byte(B) -#define x86_emit_word(W) emit_word(W) -#define x86_emit_long(L) emit_long(L) -#define x86_emit_quad(Q) emit_quad(Q) -#define x86_get_target() get_target() -#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) - -static void jit_fail(const char *msg, const char *file, int line, const char *function) -{ - fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", - function, file, line, msg); - abort(); -} - -static uint8 *target; - -static inline void emit_byte(uint8 x) -{ - *target++ = x; -} - -static inline void emit_word(uint16 x) -{ - *((uint16 *)target) = x; - target += 2; -} - -static inline void emit_long(uint32 x) -{ - *((uint32 *)target) = x; - target += 4; -} - -static inline void emit_quad(uint64 x) -{ - *((uint64 *)target) = x; - target += 8; -} - -static inline void set_target(uint8 *t) -{ - target = t; -} - -static inline uint8 *get_target(void) -{ - return target; -} - -static uint32 mon_read_byte(uintptr addr) -{ - uint8 *m = (uint8 *)addr; - return (uint32)(*m); -} - -extern "C" { -#include "disass/dis-asm.h" - -int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) -{ - while (length--) - *to++ = mon_read_byte(from++); - return 0; -} - -void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) -{ - info->fprintf_func(info->stream, "Unknown error %d\n", status); -} - -void generic_print_address(bfd_vma addr, struct disassemble_info *info) -{ - if (addr >= UVAL64(0x100000000)) - info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); - else - info->fprintf_func(info->stream, "$%08x", (uint32)addr); -} - -int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) -{ - return 0; -} -} - -struct SFILE { - char *buffer; - char *current; -}; - -static int mon_sprintf(SFILE *f, const char *format, ...) -{ - int n; - va_list args; - va_start(args, format); - vsprintf(f->current, format, args); - f->current += n = strlen(f->current); - va_end(args); - return n; -} - -static int disass_x86(char *buf, uintptr adr) -{ - disassemble_info info; - SFILE sfile; - sfile.buffer = buf; - sfile.current = buf; - INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); - info.mach = bfd_mach_x86_64; - info.disassembler_options = "suffix"; - return print_insn_i386(adr, &info); -} - -enum { - op_disp, - op_reg, - op_base, - op_index, - op_scale, - op_imm, -}; -struct operand_t { - int32 disp; - int8 reg; - int8 base; - int8 index; - int8 scale; - int64 imm; - - void clear() { - disp = imm = 0; - reg = base = index = -1; - scale = 1; - } - - void fill(int optype, int value) { - switch (optype) { - case op_disp: disp = value; break; - case op_reg: reg = value; break; - case op_base: base = value; break; - case op_index: index = value; break; - case op_scale: scale = value; break; - case op_imm: imm = value; break; - default: abort(); - } - } -}; - -struct insn_t { - char name[16]; - int n_operands; -#define MAX_OPERANDS 3 - operand_t operands[MAX_OPERANDS]; - - void clear() { - memset(name, 0, sizeof(name)); - n_operands = 0; - for (int i = 0; i < MAX_OPERANDS; i++) - operands[i].clear(); - } - - void pretty_print() { - printf("%s, %d operands\n", name, n_operands); - for (int i = 0; i < n_operands; i++) { - operand_t *op = &operands[i]; - if (op->reg != -1) - printf(" reg r%d\n", op->reg); - else { - printf(" mem 0x%08x(", op->disp); - if (op->base != -1) - printf("r%d", op->base); - printf(","); - if (op->index != -1) - printf("r%d", op->index); - printf(","); - if (op->base != -1 || op->index != -1) - printf("%d", op->scale); - printf(")\n"); - } - } - } -}; - -static const struct { - const char *name; - int reg; -} -regnames[] = { -#define _(REG) { #REG, X86_##REG } - - _(AL), _(CL), _(DL), _(BL), - _(AH), _(CH), _(DH), _(BH), - _(SPL), _(BPL), _(SIL), _(DIL), - _(R8B), _(R9B), _(R10B), _(R11B), _(R12B), _(R13B), _(R14B), _(R15B), - - _(AX), _(CX), _(DX), _(BX), _(SP), _(BP), _(SI), _(DI), - _(R8W), _(R9W), _(R10W), _(R11W), _(R12W), _(R13W), _(R14W), _(R15W), - - _(EAX), _(ECX), _(EDX), _(EBX), _(ESP), _(EBP), _(ESI), _(EDI), - _(R8D), _(R9D), _(R10D), _(R11D), _(R12D), _(R13D), _(R14D), _(R15D), - - _(RAX), _(RCX), _(RDX), _(RBX), _(RSP), _(RBP), _(RSI), _(RDI), - _(R8), _(R9), _(R10), _(R11), _(R12), _(R13), _(R14), _(R15), - - { NULL, -1 } -#undef _ -}; - -static int parse_reg(operand_t *op, int optype, char *buf) -{ - for (int i = 0; regnames[i].name; i++) { - int len = strlen(regnames[i].name); - if (strncasecmp(regnames[i].name, buf, len) == 0) { - op->fill(optype, regnames[i].reg); - return len; - } - } - return 0; -} - -static int parse_mem(operand_t *op, char *buf) -{ - char *p = buf; - - if (strncmp(buf, "0x", 2) == 0) { - unsigned long val = strtoul(buf, &p, 16); - if (val == 0 && errno == EINVAL) - abort(); - op->disp = val; - } - - if (*p == '(') { - p++; - - if (*p == '%') { - p++; - - int n = parse_reg(op, op_base, p); - if (n <= 0) - return -3; - p += n; - } - - if (*p == ',') { - p++; - - if (*p == '%') { - int n = parse_reg(op, op_index, ++p); - if (n <= 0) - return -4; - p += n; - - if (*p != ',') - return -5; - p++; - - goto do_parse_scale; - } - else if (isdigit(*p)) { - do_parse_scale: - long val = strtol(p, &p, 10); - if (val == 0 && errno == EINVAL) - abort(); - op->scale = val; - } - } - - if (*p != ')') - return -6; - p++; - } - - return p - buf; -} - -static void parse_insn(insn_t *ii, char *buf) -{ - char *p = buf; - ii->clear(); - - for (int i = 0; !isspace(*p); i++) - ii->name[i] = *p++; - - while (*p && isspace(*p)) - p++; - if (*p == '\0') - return; - - int n_operands = 0; - int optype = op_reg; - bool done = false; - while (!done) { - int n; - switch (*p) { - case '%': - n = parse_reg(&ii->operands[n_operands], optype, ++p); - if (n <= 0) { - fprintf(stderr, "parse_reg(%s) error %d\n", p, n); - abort(); - } - p += n; - break; - case '0': case '(': - n = parse_mem(&ii->operands[n_operands], p); - if (n <= 0) { - fprintf(stderr, "parse_mem(%s) error %d\n", p, n); - abort(); - } - p += n; - break; - case '$': { - unsigned long val = strtoul(++p, &p, 16); - if (val == 0 && errno == EINVAL) - abort(); - ii->operands[n_operands].imm = val; - break; - } - case '*': - p++; - break; - case ',': - n_operands++; - p++; - break; - case ' ': case '\t': - p++; - break; - case '\0': - done = true; - break; - default: - fprintf(stderr, "parse error> %s\n", p); - abort(); - } - } - ii->n_operands = n_operands + 1; -} - -static long n_tests, n_failures; -static long n_all_tests, n_all_failures; - -static bool check_reg(insn_t *ii, const char *name, int r) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 1) { - fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); - return false; - } - - int reg = ii->operands[0].reg; - - if (reg != r) { - fprintf(stderr, "ERROR: instruction expected r%d as source, got ", r); - if (reg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "%d\n", reg); - return false; - } - - return true; -} - -static bool check_reg_reg(insn_t *ii, const char *name, int s, int d) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - int srcreg = ii->operands[0].reg; - int dstreg = ii->operands[1].reg; - - if (srcreg != s) { - fprintf(stderr, "ERROR: instruction expected r%d as source, got ", s); - if (srcreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "%d\n", srcreg); - return false; - } - - if (dstreg != d) { - fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); - if (dstreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "%d\n", dstreg); - return false; - } - - return true; -} - -static bool check_imm_reg(insn_t *ii, const char *name, uint32 v, int d, int mode = -1) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - uint32 imm = ii->operands[0].imm; - int dstreg = ii->operands[1].reg; - - if (mode == -1) { - char suffix = name[strlen(name) - 1]; - switch (suffix) { - case 'b': mode = 1; break; - case 'w': mode = 2; break; - case 'l': mode = 4; break; - case 'q': mode = 8; break; - } - } - switch (mode) { - case 1: v &= 0xff; break; - case 2: v &= 0xffff; break; - } - - if (imm != v) { - fprintf(stderr, "ERROR: instruction expected 0x%08x as immediate, got ", v); - if (imm == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "0x%08x\n", imm); - return false; - } - - if (dstreg != d) { - fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); - if (dstreg == -1) - fprintf(stderr, "nothing\n"); - else - fprintf(stderr, "%d\n", dstreg); - return false; - } - - return true; -} - -static bool check_mem_reg(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R) -{ - if (strcasecmp(ii->name, name) != 0) { - fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); - return false; - } - - if (ii->n_operands != 2) { - fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); - return false; - } - - operand_t *mem = &ii->operands[0]; - operand_t *reg = &ii->operands[1]; - - uint32 d = mem->disp; - int b = mem->base; - int i = mem->index; - int s = mem->scale; - int r = reg->reg; - - if (d != D) { - fprintf(stderr, "ERROR: instruction expected 0x%08x as displacement, got 0x%08x\n", D, d); - return false; - } - - if (b != B) { - fprintf(stderr, "ERROR: instruction expected r%d as base, got r%d\n", B, b); - return false; - } - - if (i != I) { - fprintf(stderr, "ERROR: instruction expected r%d as index, got r%d\n", I, i); - return false; - } - - if (s != S) { - fprintf(stderr, "ERROR: instruction expected %d as scale factor, got %d\n", S, s); - return false; - } - - if (r != R) { - fprintf(stderr, "ERROR: instruction expected r%d as reg operand, got r%d\n", R, r); - return false; - } - - return true; -} - -static int verbose = 2; - -int main(void) -{ - static char buffer[1024]; -#define MAX_INSN_LENGTH 16 -#define MAX_INSNS 1024 - static uint8 block[MAX_INSNS * MAX_INSN_LENGTH]; - static char *insns[MAX_INSNS]; - static int modes[MAX_INSNS]; - n_all_tests = n_all_failures = 0; - - printf("Testing reg forms\n"); - n_tests = n_failures = 0; - for (int r = 0; r < 16; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##r(r); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN(INSN "q", GENOP##Q); \ -} while (0) - GENA("not", NOT); - GENA("neg", NEG); - GENA("mul", MUL); - GENA("imul", IMUL); - GENA("div", DIV); - GENA("idiv", IDIV); - GENA("dec", DEC); - GENA("inc", INC); - GEN("callq", CALLs); - GEN("jmpq", JMPs); - GEN("pushl", PUSHQ); // FIXME: disass bug? wrong suffix - GEN("popl", POPQ); // FIXME: disass bug? wrong suffix - GEN("bswap", BSWAPL); // FIXME: disass bug? no suffix - GEN("bswap", BSWAPQ); // FIXME: disass bug? no suffix - GEN("seto", SETO); - GEN("setno", SETNO); - GEN("setb", SETB); - GEN("setae", SETAE); - GEN("sete", SETE); - GEN("setne", SETNE); - GEN("setbe", SETBE); - GEN("seta", SETA); - GEN("sets", SETS); - GEN("setns", SETNS); - GEN("setp", SETP); - GEN("setnp", SETNP); - GEN("setl", SETL); - GEN("setge", SETGE); - GEN("setle", SETLE); - GEN("setg", SETG); -#undef GENA -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg(&ii, insns[i], r)) { - if (verbose > 1) - fprintf(stderr, "%s\n", buffer); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; - - printf("Testing reg,reg forms\n"); - n_tests = n_failures = 0; - for (int s = 0; s < 16; s++) { - for (int d = 0; d < 16; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##rr(s, d); \ -} while (0) -#define GEN1(INSN, GENOP, OP) do { \ - insns[i++] = INSN; \ - GENOP##rr(OP, s, d); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN(INSN "q", GENOP##Q); \ -} while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GEN("btw", BTW); - GEN("btl", BTL); - GEN("btq", BTQ); - GEN("btcw", BTCW); - GEN("btcl", BTCL); - GEN("btcq", BTCQ); - GEN("btrw", BTRW); - GEN("btrl", BTRL); - GEN("btrq", BTRQ); - GEN("btsw", BTSW); - GEN("btsl", BTSL); - GEN("btsq", BTSQ); - GEN("imulw", IMULW); - GEN("imull", IMULL); - GEN("imulq", IMULQ); - GEN1("cmove", CMOVW, X86_CC_Z); - GEN1("cmove", CMOVL, X86_CC_Z); - GEN1("cmove", CMOVQ, X86_CC_Z); - GENA("test", TEST); - GENA("cmpxchg", CMPXCHG); - GENA("xadd", XADD); - GENA("xchg", XCHG); - GEN("bsfw", BSFW); - GEN("bsfl", BSFL); - GEN("bsfq", BSFQ); - GEN("bsrw", BSRW); - GEN("bsrl", BSRL); - GEN("bsrq", BSRQ); - GEN("movsbw", MOVSBW); - GEN("movsbl", MOVSBL); - GEN("movsbq", MOVSBQ); - GEN("movzbw", MOVZBW); - GEN("movzbl", MOVZBL); - GEN("movzbq", MOVZBQ); - GEN("movswl", MOVSWL); - GEN("movswq", MOVSWQ); - GEN("movzwl", MOVZWL); - GEN("movzwq", MOVZWQ); - GEN("movslq", MOVSLQ); -#undef GENA -#undef GEN1 -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], s, d)) { - if (verbose > 1) - fprintf(stderr, "%s\n", buffer); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; - - printf("Testing cl,reg forms\n"); - n_tests = n_failures = 0; - for (int d = 0; d < 16; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##rr(X86_CL, d); \ -} while (0) -#define GENA(INSN, GENOP) do { \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN(INSN "q", GENOP##Q); \ -} while (0) - GENA("rol", ROL); - GENA("ror", ROR); - GENA("rcl", RCL); - GENA("rcr", RCR); - GENA("shl", SHL); - GENA("shr", SHR); - GENA("sar", SAR); -#undef GENA -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_reg_reg(&ii, insns[i], X86_CL, d)) { - if (verbose > 1) - fprintf(stderr, "%s\n", buffer); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; - - printf("Testing imm,reg forms\n"); - static const uint32 imm_table[] = { - 0x00000000, 0x00000001, 0x00000002, 0x00000004, - 0x00000008, 0x00000010, 0x00000020, 0x00000040, - 0x00000080, 0x000000fe, 0x000000ff, 0x00000100, - 0x00000101, 0x00000102, 0xfffffffe, 0xffffffff, - 0x00000000, 0x10000000, 0x20000000, 0x30000000, - 0x40000000, 0x50000000, 0x60000000, 0x70000000, - 0x80000000, 0x90000000, 0xa0000000, 0xb0000000, - 0xc0000000, 0xd0000000, 0xe0000000, 0xf0000000, - 0xfffffffd, 0xfffffffe, 0xffffffff, 0x00000001, - 0x00000002, 0x00000003, 0x11111111, 0x22222222, - 0x33333333, 0x44444444, 0x55555555, 0x66666666, - 0x77777777, 0x88888888, 0x99999999, 0xaaaaaaaa, - 0xbbbbbbbb, 0xcccccccc, 0xdddddddd, 0xeeeeeeee, - }; - const int n_imm_tab_count = sizeof(imm_table)/sizeof(imm_table[0]); - n_tests = n_failures = 0; - for (int j = 0; j < n_imm_tab_count; j++) { - const uint32 value = imm_table[j]; - for (int d = 0; d < 16; d++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i] = INSN; \ - modes[i] = -1; \ - i++; GENOP##ir(value, d); \ - } while (0) -#define GENM(INSN, GENOP, MODE) do { \ - insns[i] = INSN; \ - modes[i] = MODE; \ - i++; GENOP##ir(value, d); \ - } while (0) -#define GENA(INSN, GENOP) do { \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN(INSN "q", GENOP##Q); \ - } while (0) -#define GENAM(INSN, GENOP, MODE) do { \ - GENM(INSN "b", GENOP##B, MODE); \ - GENM(INSN "w", GENOP##W, MODE); \ - GENM(INSN "l", GENOP##L, MODE); \ - GENM(INSN "q", GENOP##Q, MODE); \ - } while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GENM("btw", BTW, 1); - GENM("btl", BTL, 1); - GENM("btq", BTQ, 1); - GENM("btcw", BTCW, 1); - GENM("btcl", BTCL, 1); - GENM("btcq", BTCQ, 1); - GENM("btrw", BTRW, 1); - GENM("btrl", BTRL, 1); - GENM("btrq", BTRQ, 1); - GENM("btsw", BTSW, 1); - GENM("btsl", BTSL, 1); - GENM("btsq", BTSQ, 1); - if (value != 1) { - GENAM("rol", ROL, 1); - GENAM("ror", ROR, 1); - GENAM("rcl", RCL, 1); - GENAM("rcr", RCR, 1); - GENAM("shl", SHL, 1); - GENAM("shr", SHR, 1); - GENAM("sar", SAR, 1); - } - GENA("test", TEST); -#undef GENAM -#undef GENA -#undef GENM -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { - if (verbose > 1) - fprintf(stderr, "%s\n", buffer); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; - - printf("Testing mem,reg forms\n"); - n_tests = n_failures = 0; - static const uint32 off_table[] = { - 0x00000000, - 0x00000001, - 0x00000040, - 0x00000080, - 0x000000ff, - 0x00000100, - 0xfffffffe, - 0xffffffff, - }; - const int off_table_count = sizeof(off_table) / sizeof(off_table[0]); - for (int d = 0; d < off_table_count; d++) { - const uint32 D = off_table[d]; - for (int B = -1; B < 16; B++) { - for (int I = -1; I < 16; I++) { - if (I == X86_RSP) - continue; - for (int S = 1; S < 8; S *= 2) { - if (I == -1) - continue; - for (int r = 0; r < 16; r++) { - set_target(block); - uint8 *b = get_target(); - int i = 0; -#define GEN(INSN, GENOP) do { \ - insns[i++] = INSN; \ - GENOP##mr(D, B, I, S, r); \ - } while (0) -#define GENA(INSN, GENOP) do { \ - GEN(INSN "b", GENOP##B); \ - GEN(INSN "w", GENOP##W); \ - GEN(INSN "l", GENOP##L); \ - GEN(INSN "q", GENOP##Q); \ - } while (0) - GENA("adc", ADC); - GENA("add", ADD); - GENA("and", AND); - GENA("cmp", CMP); - GENA("or", OR); - GENA("sbb", SBB); - GENA("sub", SUB); - GENA("xor", XOR); - GENA("mov", MOV); - GEN("imulw", IMULW); - GEN("imull", IMULL); - GEN("imulq", IMULQ); - GEN("bsfw", BSFW); - GEN("bsfl", BSFL); - GEN("bsfq", BSFQ); - GEN("bsrw", BSRW); - GEN("bsrl", BSRL); - GEN("bsrq", BSRQ); - GEN("movsbw", MOVSBW); - GEN("movsbl", MOVSBL); - GEN("movsbq", MOVSBQ); - GEN("movzbw", MOVZBW); - GEN("movzbl", MOVZBL); - GEN("movzbq", MOVZBQ); - GEN("movswl", MOVSWL); - GEN("movswq", MOVSWQ); - GEN("movzwl", MOVZWL); - GEN("movzwq", MOVZWQ); - GEN("movslq", MOVSLQ); -#undef GENA -#undef GEN - int last_insn = i; - uint8 *e = get_target(); - - uint8 *p = b; - i = 0; - while (p < e) { - int n = disass_x86(buffer, (uintptr)p); - insn_t ii; - parse_insn(&ii, buffer); - - if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { - if (verbose > 1) - fprintf(stderr, "%s\n", buffer); - n_failures++; - } - - p += n; - i += 1; - n_tests++; - } - if (i != last_insn) - abort(); - } - } - } - } - } - printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); - n_all_tests += n_tests; - n_all_failures += n_failures; - - printf("\n"); - printf("All %ld tests run, %ld failures\n", n_all_tests, n_all_failures); -} diff --git a/BasiliskII/src/uae_cpu/cpudefsa.cpp b/BasiliskII/src/uae_cpu/cpudefsa.cpp deleted file mode 100644 index ad7d69795..000000000 --- a/BasiliskII/src/uae_cpu/cpudefsa.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpudefs.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpudefs.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1.cpp b/BasiliskII/src/uae_cpu/cpuemu1.cpp deleted file mode 100644 index 089eefd47..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu1.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_1 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp deleted file mode 100644 index 58acf4442..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu1_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_1 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2.cpp b/BasiliskII/src/uae_cpu/cpuemu2.cpp deleted file mode 100644 index 1e18b587b..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu2.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_2 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp deleted file mode 100644 index 8e5136c4a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu2_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_2 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3.cpp b/BasiliskII/src/uae_cpu/cpuemu3.cpp deleted file mode 100644 index 0385e2f03..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu3.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_3 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp deleted file mode 100644 index 6565dc8c3..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu3_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_3 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4.cpp b/BasiliskII/src/uae_cpu/cpuemu4.cpp deleted file mode 100644 index 13d27e7a5..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu4.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_4 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp deleted file mode 100644 index a16c36cb7..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu4_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_4 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5.cpp b/BasiliskII/src/uae_cpu/cpuemu5.cpp deleted file mode 100644 index 9b33a6543..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu5.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_5 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp deleted file mode 100644 index 5bf24360a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu5_nf.cpp +++ /dev/null @@ -1,4 +0,0 @@ -#define NOFLAGS 1 -#define PART_5 -#include "cpuemu.cpp" - diff --git a/BasiliskII/src/uae_cpu/cpuemu6.cpp b/BasiliskII/src/uae_cpu/cpuemu6.cpp deleted file mode 100644 index e4b1efb0c..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu6.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_6 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp deleted file mode 100644 index 7afe15d4a..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu6_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_6 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7.cpp b/BasiliskII/src/uae_cpu/cpuemu7.cpp deleted file mode 100644 index faec7ef88..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu7.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_7 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp deleted file mode 100644 index 1e404dea8..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu7_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_7 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8.cpp b/BasiliskII/src/uae_cpu/cpuemu8.cpp deleted file mode 100644 index c4efcfa39..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu8.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define PART_8 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp b/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp deleted file mode 100644 index 7c7f8f6e6..000000000 --- a/BasiliskII/src/uae_cpu/cpuemu8_nf.cpp +++ /dev/null @@ -1,3 +0,0 @@ -#define NOFLAGS 1 -#define PART_8 -#include "cpuemu.cpp" diff --git a/BasiliskII/src/uae_cpu/cpufunctbla.cpp b/BasiliskII/src/uae_cpu/cpufunctbla.cpp deleted file mode 100644 index 17dd0d3f4..000000000 --- a/BasiliskII/src/uae_cpu/cpufunctbla.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpufunctbl.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpufunctbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpummu.cpp b/BasiliskII/src/uae_cpu/cpummu.cpp deleted file mode 100644 index 1a3bd91a8..000000000 --- a/BasiliskII/src/uae_cpu/cpummu.cpp +++ /dev/null @@ -1,1096 +0,0 @@ -/* - * cpummu.cpp - MMU emulation - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by UAE MMU patch - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - -#define DEBUG 0 -#include "sysdeps.h" - -#include "cpummu.h" -#include "memory.h" -#include "newcpu.h" -#include "debug.h" -#ifdef USE_JIT -# include "compiler/compemu.h" -#endif - -#define DBG_MMU_VERBOSE 1 -#define DBG_MMU_SANITY 1 - -#ifdef FULLMMU - -mmu_atc_l1_array atc_l1[2]; -mmu_atc_l1_array *current_atc; -struct mmu_atc_line atc_l2[2][ATC_L2_SIZE]; - -# ifdef ATC_STATS -static unsigned int mmu_atc_hits[ATC_L2_SIZE]; -# endif - - -static void mmu_dump_ttr(const char * label, uae_u32 ttr) -{ - DUNUSED(label); -#if DEBUG - uae_u32 from_addr, to_addr; - - from_addr = ttr & MMU_TTR_LOGICAL_BASE; - to_addr = (ttr & MMU_TTR_LOGICAL_MASK) << 8; - - D(bug("%s: [%08x] %08x - %08x enabled=%d supervisor=%d wp=%d cm=%02d", - label, ttr, - from_addr, to_addr, - ttr & MMU_TTR_BIT_ENABLED ? 1 : 0, - (ttr & (MMU_TTR_BIT_SFIELD_ENABLED | MMU_TTR_BIT_SFIELD_SUPER)) >> MMU_TTR_SFIELD_SHIFT, - ttr & MMU_TTR_BIT_WRITE_PROTECT ? 1 : 0, - (ttr & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT - )); -#else - DUNUSED(ttr); -#endif -} - -void mmu_make_transparent_region(uaecptr baseaddr, uae_u32 size, int datamode) -{ - uae_u32 * ttr; - uae_u32 * ttr0 = datamode ? ®s.dtt0 : ®s.itt0; - uae_u32 * ttr1 = datamode ? ®s.dtt1 : ®s.itt1; - - if ((*ttr1 & MMU_TTR_BIT_ENABLED) == 0) - ttr = ttr1; - else if ((*ttr0 & MMU_TTR_BIT_ENABLED) == 0) - ttr = ttr0; - else - return; - - *ttr = baseaddr & MMU_TTR_LOGICAL_BASE; - *ttr |= ((baseaddr + size - 1) & MMU_TTR_LOGICAL_BASE) >> 8; - *ttr |= MMU_TTR_BIT_ENABLED; - - D(bug("MMU: map transparent mapping of %08x", *ttr)); -} - -/* check if an address matches a ttr */ -static int mmu_do_match_ttr(uae_u32 ttr, uaecptr addr, int super) -{ - if (ttr & MMU_TTR_BIT_ENABLED) { /* TTR enabled */ - uae_u8 msb, mask; - - msb = ((addr ^ ttr) & MMU_TTR_LOGICAL_BASE) >> 24; - mask = (ttr & MMU_TTR_LOGICAL_MASK) >> 16; - - if (!(msb & ~mask)) { - - if ((ttr & MMU_TTR_BIT_SFIELD_ENABLED) == 0) { - if (((ttr & MMU_TTR_BIT_SFIELD_SUPER) == 0) != (super == 0)) { - return TTR_NO_MATCH; - } - } - - return (ttr & MMU_TTR_BIT_WRITE_PROTECT) ? TTR_NO_WRITE : TTR_OK_MATCH; - } - } - return TTR_NO_MATCH; -} - -static inline int mmu_match_ttr(uaecptr addr, int super, int data) -{ - int res; - - if (data) { - res = mmu_do_match_ttr(regs.dtt0, addr, super); - if (res == TTR_NO_MATCH) - res = mmu_do_match_ttr(regs.dtt1, addr, super); - } else { - res = mmu_do_match_ttr(regs.itt0, addr, super); - if (res == TTR_NO_MATCH) - res = mmu_do_match_ttr(regs.itt1, addr, super); - } - return res; -} - -#if DEBUG -/* {{{ mmu_dump_table */ -static void mmu_dump_table(const char * label, uaecptr root_ptr) -{ - DUNUSED(label); - const int ROOT_TABLE_SIZE = 128, - PTR_TABLE_SIZE = 128, - PAGE_TABLE_SIZE = regs.mmu_pagesize_8k ? 32 : 64, - ROOT_INDEX_SHIFT = 25, - PTR_INDEX_SHIFT = 18; - const uae_u32 ptr_addr_mask = (regs.mmu_pagesize_8k ? MMU_PTR_PAGE_ADDR_MASK_8 : MMU_PTR_PAGE_ADDR_MASK_4); - const uae_u32 page_addr_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_ADDR_MASK_8 : MMU_PAGE_ADDR_MASK_4); - const uae_u32 page_ur_mask = (regs.mmu_pagesize_8k ? MMU_PAGE_UR_MASK_8 : MMU_PAGE_UR_MASK_4); - const uae_u32 page_size = (regs.mmu_pagesize_8k ? (1 << 13) : (1 << 12)); - int root_idx, ptr_idx, page_idx; - uae_u32 root_des, ptr_des, page_des; - uaecptr ptr_des_addr, page_addr, - root_log, ptr_log, page_log; - - D(bug("%s: root=%x", label, root_ptr)); - - for (root_idx = 0; root_idx < ROOT_TABLE_SIZE; root_idx++) { - root_des = phys_get_long(root_ptr + (root_idx << 2)); - - if ((root_des & 2) == 0) - continue; /* invalid */ - - D(bug("ROOT: %03d U=%d W=%d UDT=%02d", root_idx, - root_des & 8 ? 1 : 0, - root_des & 4 ? 1 : 0, - root_des & 3 - )); - - root_log = root_idx << ROOT_INDEX_SHIFT; - - ptr_des_addr = root_des & MMU_ROOT_PTR_ADDR_MASK; - - for (ptr_idx = 0; ptr_idx < PTR_TABLE_SIZE; ptr_idx++) { - struct { - uaecptr log, phys; - int start_idx, n_pages; /* number of pages covered by this entry */ - uae_u32 match; - } page_info[PAGE_TABLE_SIZE]; - int n_pages_used; - - ptr_des = phys_get_long(ptr_des_addr + (ptr_idx << 2)); - ptr_log = root_log | (ptr_idx << PTR_INDEX_SHIFT); - - if ((ptr_des & 2) == 0) - continue; /* invalid */ - - page_addr = ptr_des & ptr_addr_mask; - - n_pages_used = -1; - for (page_idx = 0; page_idx < PAGE_TABLE_SIZE; page_idx++) { - - page_des = phys_get_long(page_addr + (page_idx << 2)); - page_log = ptr_log | (page_idx * page_size); - - switch (page_des & 3) { - case 0: /* invalid */ - continue; - case 1: case 3: /* resident */ - case 2: /* indirect */ - if (n_pages_used == -1 || - (page_info[n_pages_used].match & ~page_addr_mask) != (page_des & ~page_addr_mask) || - page_info[n_pages_used].phys + (page_info[n_pages_used].n_pages * page_size) != (page_des & page_addr_mask)) - { - /* use the next entry */ - n_pages_used++; - - page_info[n_pages_used].match = page_des; - page_info[n_pages_used].n_pages = 1; - page_info[n_pages_used].start_idx = page_idx; - page_info[n_pages_used].log = page_log; - page_info[n_pages_used].phys = page_des & page_addr_mask; - } else { - page_info[n_pages_used].n_pages++; - } - break; - } - } - - if (n_pages_used == -1) - continue; - - D(bug(" PTR: %03d U=%d W=%d UDT=%02d", ptr_idx, - ptr_des & 8 ? 1 : 0, - ptr_des & 4 ? 1 : 0, - ptr_des & 3 - )); - - - for (page_idx = 0; page_idx <= n_pages_used; page_idx++) { - page_des = page_info[page_idx].match; - - if ((page_des & MMU_PDT_MASK) == 2) { - D(bug(" PAGE: %03d-%03d log=%08x INDIRECT --> addr=%08x", - page_info[page_idx].start_idx, - page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, - page_info[page_idx].log, - page_des & MMU_PAGE_INDIRECT_MASK - )); - - } else { - D(bug(" PAGE: %03d-%03d log=%08x addr=%08x UR=%02d G=%d U1/0=%d S=%d CM=%d M=%d U=%d W=%d", - page_info[page_idx].start_idx, - page_info[page_idx].start_idx + page_info[page_idx].n_pages - 1, - page_info[page_idx].log, - page_info[page_idx].phys, - (page_des & page_ur_mask) >> MMU_PAGE_UR_SHIFT, - page_des & MMU_DES_GLOBAL ? 1 : 0, - (page_des & MMU_TTR_UX_MASK) >> MMU_TTR_UX_SHIFT, - page_des & MMU_DES_SUPER ? 1 : 0, - (page_des & MMU_TTR_CACHE_MASK) >> MMU_TTR_CACHE_SHIFT, - page_des & MMU_DES_MODIFIED ? 1 : 0, - page_des & MMU_DES_USED ? 1 : 0, - page_des & MMU_DES_WP ? 1 : 0 - )); - } - } - } - - } -} -/* }}} */ -#endif - -/* {{{ mmu_dump_atc */ -void mmu_dump_atc(void) -{ - int i, j; - for (i = 0; i < 2; i++) { - for (j = 0; j < ATC_L2_SIZE; j++) { - if (atc_l2[i][j].tag == 0x8000) - continue; - D(bug("ATC[%02d] G=%d TT=%d M=%d WP=%d VD=%d VI=%d tag=%08x --> phys=%08x", - j, atc_l2[i][j].global, atc_l2[i][j].tt, atc_l2[i][j].modified, - atc_l2[i][j].write_protect, atc_l2[i][j].valid_data, atc_l2[i][j].valid_inst, - atc_l2[i][j].tag, atc_l2[i][j].phys)); - } - } -} -/* }}} */ - -/* {{{ mmu_dump_tables */ -void mmu_dump_tables(void) -{ - D(bug("URP: %08x SRP: %08x MMUSR: %x TC: %x", regs.urp, regs.srp, regs.mmusr, regs.tc)); - mmu_dump_ttr("DTT0", regs.dtt0); - mmu_dump_ttr("DTT1", regs.dtt1); - mmu_dump_ttr("ITT0", regs.itt0); - mmu_dump_ttr("ITT1", regs.itt1); - mmu_dump_atc(); - //mmu_dump_table("SRP", regs.srp); -} -/* }}} */ - -static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write); - -static ALWAYS_INLINE int mmu_get_fc(bool super, bool data) -{ - return (super ? 4 : 0) | (data ? 1 : 2); -} - -static void mmu_bus_error(uaecptr addr, int fc, int write, int size) -{ - uae_u16 ssw = 0; - - ssw |= fc & MMU_SSW_TM; /* Copy TM */ - switch (size) { - case sz_byte: - ssw |= MMU_SSW_SIZE_B; - break; - case sz_word: - ssw |= MMU_SSW_SIZE_W; - break; - case sz_long: - ssw |= MMU_SSW_SIZE_L; - break; - } - - regs.wb3_status = write ? 0x80 | ssw : 0; - if (!write) - ssw |= MMU_SSW_RW; - - regs.mmu_fault_addr = addr; - regs.mmu_ssw = ssw | MMU_SSW_ATC; - - D(bug("BUS ERROR: fc=%d w=%d log=%08x ssw=%04x", fc, write, addr, ssw)); - - breakpt(); - THROW(2); -} - -/* - * Update the atc line for a given address by doing a mmu lookup. - */ -static uaecptr mmu_fill_atc_l2(uaecptr addr, int super, int data, int write, - struct mmu_atc_line *l) -{ - int res; - uae_u32 desc; - - l->tag = ATC_TAG(addr); - l->hw = l->bus_fault = 0; - - /* check ttr0 */ - res = mmu_match_ttr(addr, super, data); - if (res != TTR_NO_MATCH) { - l->tt = 1; - if (data) { - l->valid_data = 1; - l->valid_inst = mmu_match_ttr(addr, super, 0) == res; - } else { - l->valid_inst = 1; - l->valid_data = mmu_match_ttr(addr, super, 1) == res; - } - l->global = 1; - l->modified = 1; - l->write_protect = (res == TTR_NO_WRITE); - l->phys = 0; - - return 0; - } - - l->tt = 0; - if (!regs.mmu_enabled) { - l->valid_data = l->valid_inst = 1; - l->global = 1; - l->modified = 1; - l->write_protect = 0; - l->phys = 0; - return 0; - } - - SAVE_EXCEPTION; - TRY(prb) { - desc = mmu_lookup_pagetable(addr, super, write); - D(bug("translate: %x,%u,%u,%u -> %x", addr, super, write, data, desc)); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - /* bus error during table search */ - desc = 0; - goto fail; - } - - if ((desc & 1) == 0 || (!super && desc & MMU_MMUSR_S)) { - fail: - l->valid_data = l->valid_inst = 0; - l->global = 0; - } else { - l->valid_data = l->valid_inst = 1; - if (regs.mmu_pagesize_8k) - l->phys = (desc & ~0x1fff) - (addr & ~0x1fff); - else - l->phys = (desc & ~0xfff) - (addr & ~0xfff); - l->global = (desc & MMU_MMUSR_G) != 0; - l->modified = (desc & MMU_MMUSR_M) != 0; - l->write_protect = (desc & MMU_MMUSR_W) != 0; - } - - return desc; -} - -static ALWAYS_INLINE bool -mmu_fill_atc_l1(uaecptr addr, int super, int data, int write, - struct mmu_atc_line *l1) -{ - int idx = ATC_L2_INDEX(addr); - int tag = ATC_TAG(addr); - struct mmu_atc_line *l = &atc_l2[super][idx]; - uaecptr phys_addr; - - if (l->tag != tag) { - restart: - mmu_fill_atc_l2(addr, super, data, write, l); - } - if (!(data ? l->valid_data : l->valid_inst)) { - D(bug("MMU: non-resident page (%x,%x,%x)!", addr, regs.pc, regs.fault_pc)); - goto fail; - } - if (write) { - if (l->write_protect) { - D(bug("MMU: write protected (via %s) %x", l->tt ? "ttr" : "atc", addr)); - goto fail; - } - if (!l->modified) - goto restart; - } - *l1 = *l; - - phys_addr = addr + l1->phys; - if ((phys_addr & 0xfff00000) == 0x00f00000) { - l1->hw = 1; - goto fail; - } - if ((phys_addr & 0xfff00000) == 0xfff00000) { - l1->hw = 1; - l1->phys -= 0xff000000; - goto fail; - } - - if (!test_ram_boundary(phys_addr, 1, super, write)) { - l1->bus_fault = 1; - goto fail; - } - - return true; - -fail: - l1->tag = ~l1->tag; - return false; -} - -uaecptr mmu_translate(uaecptr addr, int super, int data, int write) -{ - struct mmu_atc_line *l; - - l = &atc_l2[super][ATC_L2_INDEX(addr)]; - mmu_fill_atc_l2(addr, super, data, write, l); - if (!(data ? l->valid_data : l->valid_inst)) - { - breakpt(); - THROW(2); - } - - return addr + l->phys; -} - -/* - * Lookup the address by walking the page table and updating - * the page descriptors accordingly. Returns the found descriptor - * or produces a bus error. - */ -static uaecptr REGPARAM2 mmu_lookup_pagetable(uaecptr addr, int super, int write) -{ - uae_u32 desc, desc_addr, wp; - int i; - - wp = 0; - desc = super ? regs.srp : regs.urp; - - /* fetch root table descriptor */ - i = (addr >> 23) & 0x1fc; - desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; - desc = phys_get_long(desc_addr); - if ((desc & 2) == 0) { - D(bug("MMU: invalid root descriptor for %x", addr)); - return 0; - } - - wp |= desc; - if ((desc & MMU_DES_USED) == 0) - phys_put_long(desc_addr, desc | MMU_DES_USED); - - /* fetch pointer table descriptor */ - i = (addr >> 16) & 0x1fc; - desc_addr = (desc & MMU_ROOT_PTR_ADDR_MASK) | i; - desc = phys_get_long(desc_addr); - if ((desc & 2) == 0) { - D(bug("MMU: invalid ptr descriptor for %x", addr)); - return 0; - } - wp |= desc; - if ((desc & MMU_DES_USED) == 0) - phys_put_long(desc_addr, desc | MMU_DES_USED); - - /* fetch page table descriptor */ - if (regs.mmu_pagesize_8k) { - i = (addr >> 11) & 0x7c; - desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_8) | i; - } else { - i = (addr >> 10) & 0xfc; - desc_addr = (desc & MMU_PTR_PAGE_ADDR_MASK_4) | i; - } - - desc = phys_get_long(desc_addr); - if ((desc & 3) == 2) { - /* indirect */ - desc_addr = desc & MMU_PAGE_INDIRECT_MASK; - desc = phys_get_long(desc_addr); - } - if ((desc & 1) == 0) { - D(bug("MMU: invalid page descriptor log=%08x desc=%08x @%08x", addr, desc, desc_addr)); - return desc; - } - - desc |= wp & MMU_DES_WP; - if (write) { - if (desc & MMU_DES_WP) { - if ((desc & MMU_DES_USED) == 0) { - desc |= MMU_DES_USED; - phys_put_long(desc_addr, desc); - } - } else if ((desc & (MMU_DES_USED|MMU_DES_MODIFIED)) != - (MMU_DES_USED|MMU_DES_MODIFIED)) { - desc |= MMU_DES_USED|MMU_DES_MODIFIED; - phys_put_long(desc_addr, desc); - } - } else { - if ((desc & MMU_DES_USED) == 0) { - desc |= MMU_DES_USED; - phys_put_long(desc_addr, desc); - } - } - return desc; -} - -uae_u16 mmu_get_word_unaligned(uaecptr addr, int data) -{ - uae_u16 res; - - res = (uae_u16)mmu_get_byte(addr, data, sz_word) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_byte(addr + 1, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - return res; -} - -uae_u32 mmu_get_long_unaligned(uaecptr addr, int data) -{ - uae_u32 res; - - if (likely(!(addr & 1))) { - res = (uae_u32)mmu_get_word(addr, data, sz_long) << 16; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_word(addr + 2, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } else { - res = (uae_u32)mmu_get_byte(addr, data, sz_long) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res = (res | mmu_get_byte(addr + 1, data, sz_long)) << 8; - res = (res | mmu_get_byte(addr + 2, data, sz_long)) << 8; - res |= mmu_get_byte(addr + 3, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } - return res; -} - -uae_u8 mmu_get_byte_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_b(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); -} - -uae_u16 mmu_get_word_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_w(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); -} - -uae_u32 mmu_get_long_slow(uaecptr addr, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) - return HWget_l(cl->phys + addr); - mmu_bus_error(addr, mmu_get_fc(super, data), 0, size); - return 0; - } - - if (!mmu_fill_atc_l1(addr, super, data, 0, cl)) - goto redo; - - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); -} - - -uae_u64 mmu_get_quad_slow(uaecptr addr, int super, int data, - struct mmu_atc_line *cl) -{ - uae_u64 h = mmu_get_long_slow(addr, super, data, sz_long, cl); - uae_u64 l = mmu_get_long_slow(addr + 4, super, data, sz_long, cl); - return (h << 32) | l; -} - -REGPARAM2 void mmu_put_long_unaligned(uaecptr addr, uae_u32 val, int data) -{ - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!(addr & 1))) { - mmu_put_word(addr, val >> 16, data, sz_long); - mmu_put_word(addr + 2, val, data, sz_long); - } else { - mmu_put_byte(addr, val >> 24, data, sz_long); - mmu_put_byte(addr + 1, val >> 16, data, sz_long); - mmu_put_byte(addr + 2, val >> 8, data, sz_long); - mmu_put_byte(addr + 3, val, data, sz_long); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -REGPARAM2 void mmu_put_word_unaligned(uaecptr addr, uae_u16 val, int data) -{ - SAVE_EXCEPTION; - TRY(prb) { - mmu_put_byte(addr, val >> 8, data, sz_word); - mmu_put_byte(addr + 1, val, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -REGPARAM2 void mmu_put_byte_slow(uaecptr addr, uae_u8 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_b(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_word_slow(uaecptr addr, uae_u16 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_w(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_long_slow(uaecptr addr, uae_u32 val, int super, int data, - int size, struct mmu_atc_line *cl) -{ - uae_u32 tag = ATC_TAG(addr); - - if (cl->tag == (uae_u16)~tag) { - redo: - if (cl->hw) { - HWput_l(cl->phys + addr, val); - return; - } - regs.wb3_data = val; - mmu_bus_error(addr, mmu_get_fc(super, data), 1, size); - return; - } - - if (!mmu_fill_atc_l1(addr, super, data, 1, cl)) - goto redo; - - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); -} - -REGPARAM2 void mmu_put_quad_slow(uaecptr addr, uae_u64 val, int super, int data, - struct mmu_atc_line *cl) -{ - mmu_put_long_slow(addr, (uae_u32)(val >> 32), super, data, sz_long, cl); - mmu_put_long_slow(addr + 4, (uae_u32)(val), super, data, sz_long, cl); -} - -uae_u32 sfc_get_long(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - uae_u32 res; - - if (likely(!is_unaligned(addr, 4))) - return mmu_get_user_long(addr, super, data, sz_long); - - if (likely(!(addr & 1))) { - res = (uae_u32)mmu_get_user_word(addr, super, data, sz_long) << 16; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_user_word(addr + 2, super, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } else { - res = (uae_u32)mmu_get_user_byte(addr, super, data, sz_long) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res = (res | mmu_get_user_byte(addr + 1, super, data, sz_long)) << 8; - res = (res | mmu_get_user_byte(addr + 2, super, data, sz_long)) << 8; - res |= mmu_get_user_byte(addr + 3, super, data, sz_long); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - } - return res; -} - -uae_u16 sfc_get_word(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - uae_u16 res; - - if (likely(!is_unaligned(addr, 2))) - return mmu_get_user_word(addr, super, data, sz_word); - - res = (uae_u16)mmu_get_user_byte(addr, super, data, sz_word) << 8; - SAVE_EXCEPTION; - TRY(prb) { - res |= mmu_get_user_byte(addr + 1, super, data, sz_word); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - breakpt(); - THROW_AGAIN(prb); - } - return res; -} - -uae_u8 sfc_get_byte(uaecptr addr) -{ - int super = (regs.sfc & 4) != 0; - int data = (regs.sfc & 3) != 2; - - return mmu_get_user_byte(addr, super, data, sz_byte); -} - -void dfc_put_long(uaecptr addr, uae_u32 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!is_unaligned(addr, 4))) - mmu_put_user_long(addr, val, super, data, sz_long); - else if (likely(!(addr & 1))) { - mmu_put_user_word(addr, val >> 16, super, data, sz_long); - mmu_put_user_word(addr + 2, val, super, data, sz_long); - } else { - mmu_put_user_byte(addr, val >> 24, super, data, sz_long); - mmu_put_user_byte(addr + 1, val >> 16, super, data, sz_long); - mmu_put_user_byte(addr + 2, val >> 8, super, data, sz_long); - mmu_put_user_byte(addr + 3, val, super, data, sz_long); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -void dfc_put_word(uaecptr addr, uae_u16 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - if (likely(!is_unaligned(addr, 2))) - mmu_put_user_word(addr, val, super, data, sz_word); - else { - mmu_put_user_byte(addr, val >> 8, super, data, sz_word); - mmu_put_user_byte(addr + 1, val, super, data, sz_word); - } - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - if (regs.mmu_fault_addr != addr) { - regs.mmu_fault_addr = addr; - regs.mmu_ssw |= MMU_SSW_MA; - } - breakpt(); - THROW_AGAIN(prb); - } -} - -void dfc_put_byte(uaecptr addr, uae_u8 val) -{ - int super = (regs.dfc & 4) != 0; - int data = (regs.dfc & 3) != 2; - - SAVE_EXCEPTION; - TRY(prb) { - mmu_put_user_byte(addr, val, super, data, sz_byte); - RESTORE_EXCEPTION; - } - CATCH(prb) { - RESTORE_EXCEPTION; - regs.wb3_data = val; - breakpt(); - THROW_AGAIN(prb); - } -} - -void mmu_op(uae_u32 opcode, uae_u16 extra) -{ - int super = (regs.dfc & 4) != 0; - DUNUSED(extra); - if ((opcode & 0xFE0) == 0x0500) { - int regno, glob; - //D(didflush = 0); - uae_u32 addr; - /* PFLUSH */ - regno = opcode & 7; - glob = (opcode & 8) != 0; - - if (opcode & 16) { - D(bug("pflusha(%u,%u)", glob, regs.dfc)); - mmu_flush_atc_all(glob); - } else { - addr = m68k_areg(regs, regno); - D(bug("pflush(%u,%u,%x)", glob, regs.dfc, addr)); - mmu_flush_atc(addr, super, glob); - } - flush_internals(); -#ifdef USE_JIT - flush_icache(); -#endif - } else if ((opcode & 0x0FD8) == 0x548) { - int write, regno; - uae_u32 addr; - - regno = opcode & 7; - write = (opcode & 32) == 0; - addr = m68k_areg(regs, regno); - //bug("ptest(%u,%u,%x)", write, regs.dfc, addr); - D(bug("PTEST%c (A%d) %08x DFC=%d", write ? 'W' : 'R', regno, addr, regs.dfc)); - mmu_flush_atc(addr, super, true); - SAVE_EXCEPTION; - TRY(prb) { - struct mmu_atc_line *l; - uae_u32 desc; - bool data = (regs.dfc & 3) != 2; - - l = &atc_l2[super][ATC_L2_INDEX(addr)]; - desc = mmu_fill_atc_l2(addr, super, data, write, l); - if (!(data ? l->valid_data : l->valid_inst)) - regs.mmusr = MMU_MMUSR_B; - else if (l->tt) - regs.mmusr = MMU_MMUSR_T | MMU_MMUSR_R; - else { - regs.mmusr = desc & (~0xfff|MMU_MMUSR_G|MMU_MMUSR_Ux|MMU_MMUSR_S| - MMU_MMUSR_CM|MMU_MMUSR_M|MMU_MMUSR_W); - regs.mmusr |= MMU_MMUSR_R; - } - } - CATCH(prb) { - regs.mmusr = MMU_MMUSR_B; - } - RESTORE_EXCEPTION; - D(bug("PTEST result: mmusr %08x", regs.mmusr)); - } else - op_illg (opcode); -} - -void mmu_flush_atc(uaecptr addr, bool super, bool global) -{ - struct mmu_atc_line *l; - int i, j; - - l = atc_l1[super][0][0]; - i = ATC_L1_INDEX(addr); - for (j = 0; j < 4; j++) { - if (global || !l[i].global) - l[i].tag = 0x8000; - l += ATC_L1_SIZE; - } - if (regs.mmu_pagesize_8k) { - i = ATC_L1_INDEX(addr) ^ 1; - for (j = 0; j < 4; j++) { - if (global || !l[i].global) - l[i].tag = 0x8000; - l += ATC_L1_SIZE; - } - } - l = atc_l2[super]; - i = ATC_L2_INDEX(addr); - if (global || !l[i].global) - l[i].tag = 0x8000; - if (regs.mmu_pagesize_8k) { - i ^= 1; - if (global || !l[i].global) - l[i].tag = 0x8000; - } -} - -void mmu_flush_atc_all(bool global) -{ - struct mmu_atc_line *l; - unsigned int i; - - l = atc_l1[0][0][0]; - for (i = 0; i < sizeof(atc_l1) / sizeof(*l); l++, i++) { - if (global || !l->global) - l->tag = 0x8000; - } - - l = atc_l2[0]; - for (i = 0; i < sizeof(atc_l2) / sizeof(*l); l++, i++) { - if (global || !l->global) - l->tag = 0x8000; - } -} - -void mmu_reset(void) -{ - mmu_flush_atc_all(true); - - regs.urp = regs.srp = 0; - regs.itt0 = regs.itt1 = 0; - regs.dtt0 = regs.dtt1 = 0; - regs.mmusr = 0; -} - - -void mmu_set_tc(uae_u16 tc) -{ - if (regs.tc == tc) - return; - - regs.tc = tc; - regs.mmu_enabled = tc & 0x8000 ? 1 : 0; - regs.mmu_pagesize_8k = tc & 0x4000 ? 1 : 0; - mmu_flush_atc_all(true); - - D(bug("MMU: enabled=%d page8k=%d\n", regs.mmu_enabled, regs.mmu_pagesize_8k)); -} - -void mmu_set_super(bool super) -{ - current_atc = &atc_l1[super]; -} - -#else - -void mmu_op(uae_u32 opcode, uae_u16 /*extra*/) -{ - if ((opcode & 0xFE0) == 0x0500) { - /* PFLUSH instruction */ - flush_internals(); - } else if ((opcode & 0x0FD8) == 0x548) { - /* PTEST instruction */ - } else - op_illg(opcode); -} - -#endif - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/cpuopti.c b/BasiliskII/src/uae_cpu/cpuopti.c deleted file mode 100644 index 28ba7c226..000000000 --- a/BasiliskII/src/uae_cpu/cpuopti.c +++ /dev/null @@ -1,312 +0,0 @@ -/* - * UAE - The Un*x Amiga Emulator - * - * cpuopti.c - Small optimizer for cpu*.s files - * Based on work by Tauno Taipaleenmaki - * - * Copyright 1996 Bernd Schmidt - * - * 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 -#include -#include - -#include "sysdeps.h" - -struct line { - struct line *next, *prev; - int delet; - char *data; -}; - -struct func { - struct line *first_line, *last_line; - int initial_offset; -}; - -static void oops(void) -{ - fprintf(stderr, "Don't know how to optimize this file.\n"); - exit(1); -} - -static char * match(struct line *l, const char *m) -{ - char *str = l->data; - int len = strlen(m); - while (isspace(*str)) - str++; - - if (strncmp(str, m, len) != 0) - return NULL; - return str + len; -} - -static int insn_references_reg (struct line *l, char *reg) -{ - if (reg[0] != 'e') { - fprintf(stderr, "Unknown register?!?\n"); - exit(1); - } - if (strstr (l->data, reg) != 0) - return 1; - if (strstr (l->data, reg+1) != 0) - return 1; - if (strcmp (reg, "eax") == 0 - && (strstr (l->data, "%al") != 0 || strstr (l->data, "%ah") != 0)) - return 1; - if (strcmp (reg, "ebx") == 0 - && (strstr (l->data, "%bl") != 0 || strstr (l->data, "%bh") != 0)) - return 1; - if (strcmp (reg, "ecx") == 0 - && (strstr (l->data, "%cl") != 0 || strstr (l->data, "%ch") != 0)) - return 1; - if (strcmp (reg, "edx") == 0 - && (strstr (l->data, "%dl") != 0 || strstr (l->data, "%dh") != 0)) - return 1; - return 0; -} - -static void do_function(struct func *f) -{ - int v; - int pops_at_end = 0; - struct line *l, *l1, *fl, *l2; - char *s, *s2; - int in_pop_area = 1; - - f->initial_offset = 0; - - l = f->last_line; - fl = f->first_line; - - if (match(l,".LFE")) - l = l->prev; - if (!match(l,"ret")) - oops(); - - while (!match(fl, "op_")) - fl = fl->next; - fl = fl->next; - - /* Try reordering the insns at the end of the function so that the - * pops are all at the end. */ - l2 = l->prev; - /* Tolerate one stack adjustment */ - if (match (l2, "addl $") && strstr(l2->data, "esp") != 0) - l2 = l2->prev; - for (;;) { - char *forbidden_reg; - struct line *l3, *l4; - - while (match (l2, "popl %")) - l2 = l2->prev; - - l3 = l2; - for (;;) { - forbidden_reg = match (l3, "popl %"); - if (forbidden_reg) - break; - if (l3 == fl) - goto reordered; - /* Jumps and labels put an end to our attempts... */ - if (strstr (l3->data, ".L") != 0) - goto reordered; - /* Likewise accesses to the stack pointer... */ - if (strstr (l3->data, "esp") != 0) - goto reordered; - /* Function calls... */ - if (strstr (l3->data, "call") != 0) - goto reordered; - l3 = l3->prev; - } - if (l3 == l2) - exit(1); - for (l4 = l2; l4 != l3; l4 = l4->prev) { - /* The register may not be referenced by any of the insns that we - * move the popl past */ - if (insn_references_reg (l4, forbidden_reg)) - goto reordered; - } - l3->prev->next = l3->next; - l3->next->prev = l3->prev; - l2->next->prev = l3; - l3->next = l2->next; - l2->next = l3; - l3->prev = l2; - } -reordered: - - l = l->prev; - - s = match (l, "addl $"); - s2 = match (fl, "subl $"); - - l1 = l; - if (s == 0) { - char *t = match (l, "popl %"); - if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { - s = "4,%esp"; - l = l->prev; - t = match (l, "popl %"); - if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { - s = "8,%esp"; - l = l->prev; - } - } - } else { - l = l->prev; - } - - if (s && s2) { - int v = 0; - if (strcmp (s, s2) != 0) { - fprintf (stderr, "Stack adjustment not matching.\n"); - return; - } - - while (isdigit(*s)) { - v = v * 10 + (*s) - '0'; - s++; - } - - if (strcmp (s, ",%esp") != 0) { - fprintf (stderr, "Not adjusting the stack pointer.\n"); - return; - } - f->initial_offset = v; - fl->delet = 3; - fl = fl->next; - l1->delet = 2; - l1 = l1->prev; - while (l1 != l) { - l1->delet = 1; - l1 = l1->prev; - } - } - - while (in_pop_area) { - char *popm, *pushm; - popm = match (l, "popl %"); - pushm = match (fl, "pushl %"); - if (popm && pushm && strcmp(pushm, popm) == 0) { - pops_at_end++; - fl->delet = l->delet = 1; - } else - in_pop_area = 0; - l = l->prev; - fl = fl->next; - } - if (f->initial_offset) - f->initial_offset += 4 * pops_at_end; -} - -static void output_function(struct func *f) -{ - struct line *l = f->first_line; - - while (l) { - switch (l->delet) { - case 1: - break; - case 0: - printf("%s\n", l->data); - break; - case 2: - if (f->initial_offset) - printf("\taddl $%d,%%esp\n", f->initial_offset); - break; - case 3: - if (f->initial_offset) - printf("\tsubl $%d,%%esp\n", f->initial_offset); - break; - } - l = l->next; - } -} - -int main(int argc, char **argv) -{ - FILE *infile = stdin; - char tmp[4096]; - -#ifdef __mc68000__ - if(system("perl machdep/cpuopti")==-1) { - perror("perl machdep/cpuopti"); - return 10; - } else return 0; -#endif - - /* For debugging... */ - if (argc == 2) - infile = fopen (argv[1], "r"); - - for(;;) { - char *s; - - if ((fgets(tmp, 4095, infile)) == NULL) - break; - - s = strchr (tmp, '\n'); - if (s != NULL) - *s = 0; - - if (strncmp(tmp, ".globl op_", 10) == 0) { - struct line *first_line = NULL, *prev = NULL; - struct line **nextp = &first_line; - struct func f; - int nr_rets = 0; - int can_opt = 1; - - do { - struct line *current; - - if (strcmp (tmp, "#APP") != 0 && strcmp (tmp, "#NO_APP") != 0) { - current = *nextp = (struct line *)malloc(sizeof (struct line)); - nextp = ¤t->next; - current->prev = prev; prev = current; - current->next = NULL; - current->delet = 0; - current->data = strdup (tmp); - if (match (current, "movl %esp,%ebp") || match (current, "enter")) { - fprintf (stderr, "GCC failed to eliminate fp: %s\n", first_line->data); - can_opt = 0; - } - - if (match (current, "ret")) - nr_rets++; - } - if ((fgets(tmp, 4095, infile)) == NULL) - oops(); - s = strchr (tmp, '\n'); - if (s != NULL) - *s = 0; - } while (strncmp (tmp,".Lfe", 4) != 0); - - f.first_line = first_line; - f.last_line = prev; - - if (nr_rets == 1 && can_opt) - do_function(&f); - /*else - fprintf(stderr, "Too many RET instructions: %s\n", first_line->data);*/ - output_function(&f); - } - printf("%s\n", tmp); - } - return 0; -} diff --git a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp b/BasiliskII/src/uae_cpu/cpustbl_nf.cpp deleted file mode 100644 index 0ea660105..000000000 --- a/BasiliskII/src/uae_cpu/cpustbl_nf.cpp +++ /dev/null @@ -1,2 +0,0 @@ -#define NOFLAGS 1 -#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/cpustbla.cpp b/BasiliskII/src/uae_cpu/cpustbla.cpp deleted file mode 100644 index f3f8e320c..000000000 --- a/BasiliskII/src/uae_cpu/cpustbla.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * cpustbl.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "cpustbl.cpp" diff --git a/BasiliskII/src/uae_cpu/debug.cpp b/BasiliskII/src/uae_cpu/debug.cpp deleted file mode 100644 index 8b2f14e00..000000000 --- a/BasiliskII/src/uae_cpu/debug.cpp +++ /dev/null @@ -1,82 +0,0 @@ -/* - * debug.cpp - CPU debugger - * - * Copyright (c) 2001-2010 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Bernd Schmidt's UAE - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ -/* - * UAE - The Un*x Amiga Emulator - * - * Debugger - * - * (c) 1995 Bernd Schmidt - * - */ - -#include "sysdeps.h" - -#include "memory.h" -#include "newcpu.h" -#include "debug.h" - -#include "input.h" -#include "cpu_emulation.h" - -#include "main.h" - -static int debugger_active = 0; -int debugging = 0; -int irqindebug = 0; - -int ignore_irq = 0; - - -void activate_debugger (void) -{ -#ifdef DEBUGGER - ndebug::do_skip = false; -#endif - debugger_active = 1; - SPCFLAGS_SET( SPCFLAG_BRK ); - debugging = 1; - /* use_debugger = 1; */ -} - -void deactivate_debugger(void) -{ - debugging = 0; - debugger_active = 0; -} - -void debug (void) -{ - if (ignore_irq && regs.s && !regs.m ) { - SPCFLAGS_SET( SPCFLAG_BRK ); - return; - } -#ifdef DEBUGGER - ndebug::run(); -#endif -} - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp index ce18967e2..e70f76791 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -98,6 +98,9 @@ */ #include "sysdeps.h" + +#ifdef FPU_IEEE + #include #include "memory.h" #include "readcpu.h" @@ -2471,3 +2474,5 @@ PUBLIC void FFPU fpu_reset (void) fpu_exit(); fpu_init(FPU is_integral); } + +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp index 4eda14ca3..60352bc19 100644 --- a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp +++ b/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp @@ -19,6 +19,9 @@ */ #include "sysdeps.h" + +#ifdef FPU_MPFR + #include #include "memory.h" #include "readcpu.h" @@ -2108,3 +2111,5 @@ uae_u32 fpu_get_fpcr(void) { return get_fpcr(); } + +#endif diff --git a/BasiliskII/src/uae_cpu/memory-uae.h b/BasiliskII/src/uae_cpu/memory-uae.h deleted file mode 100644 index cbae60b03..000000000 --- a/BasiliskII/src/uae_cpu/memory-uae.h +++ /dev/null @@ -1,606 +0,0 @@ -/* - * memory.h - memory management - * - * Copyright (c) 2001-2006 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - /* - * UAE - The Un*x Amiga Emulator - * - * memory management - * - * Copyright 1995 Bernd Schmidt - */ - -#ifndef UAE_MEMORY_H -#define UAE_MEMORY_H - -#include "sysdeps.h" -#include "string.h" -#include "hardware.h" -#include "parameters.h" -#include "registers.h" -#include "cpummu.h" -#include "readcpu.h" - -# include - -// newcpu.h -extern void Exception (int, uaecptr); -#ifdef EXCEPTIONS_VIA_LONGJMP - extern JMP_BUF excep_env; - #define SAVE_EXCEPTION \ - JMP_BUF excep_env_old; \ - memcpy(excep_env_old, excep_env, sizeof(JMP_BUF)) - #define RESTORE_EXCEPTION \ - memcpy(excep_env, excep_env_old, sizeof(JMP_BUF)) - #define TRY(var) int var = SETJMP(excep_env); if (!var) - #define CATCH(var) else - #define THROW(n) LONGJMP(excep_env, n) - #define THROW_AGAIN(var) LONGJMP(excep_env, var) - #define VOLATILE volatile -#else - struct m68k_exception { - int prb; - m68k_exception (int exc) : prb (exc) {} - operator int() { return prb; } - }; - #define SAVE_EXCEPTION - #define RESTORE_EXCEPTION - #define TRY(var) try - #define CATCH(var) catch(m68k_exception var) - #define THROW(n) throw m68k_exception(n) - #define THROW_AGAIN(var) throw - #define VOLATILE -#endif /* EXCEPTIONS_VIA_LONGJMP */ -extern int in_exception_2; - -#define STRAM_END 0x0e00000UL // should be replaced by global ROMBase as soon as ROMBase will be a constant -#define ROM_END 0x0e80000UL // should be replaced by ROMBase + RealROMSize if we are going to work with larger TOS ROMs than 512 kilobytes -#define FastRAM_BEGIN 0x1000000UL // should be replaced by global FastRAMBase as soon as FastRAMBase will be a constant -#ifdef FixedSizeFastRAM -#define FastRAM_SIZE (FixedSizeFastRAM * 1024 * 1024) -#else -#define FastRAM_SIZE FastRAMSize -#endif - -#ifdef FIXED_VIDEORAM -#define ARANYMVRAMSTART 0xf0000000UL -#endif - -#define ARANYMVRAMSIZE 0x00100000 // should be a variable to protect VGA card offscreen memory - -#ifdef FIXED_VIDEORAM -extern uintptr VMEMBaseDiff; -#else -extern uae_u32 VideoRAMBase; -#endif - -#ifdef ARAM_PAGE_CHECK -extern uaecptr pc_page, read_page, write_page; -extern uintptr pc_offset, read_offset, write_offset; -# ifdef PROTECT2K -# define ARAM_PAGE_MASK 0x7ff -# else -# ifdef FULLMMU -# define ARAM_PAGE_MASK 0xfff -# else -# define ARAM_PAGE_MASK 0xfffff -# endif -# endif -#endif - -extern uintptr MEMBaseDiff; -extern uintptr ROMBaseDiff; -extern uintptr FastRAMBaseDiff; -# define InitMEMBaseDiff(va, ra) (MEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -# define InitROMBaseDiff(va, ra) (ROMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -# define InitFastRAMBaseDiff(va, ra) (FastRAMBaseDiff = (uintptr)(va) - (uintptr)(ra)) - -#ifdef FIXED_VIDEORAM -#define InitVMEMBaseDiff(va, ra) (VMEMBaseDiff = (uintptr)(va) - (uintptr)(ra)) -#else -#define InitVMEMBaseDiff(va, ra) (ra = (uintptr)(va) + MEMBaseDiff) -#endif - -extern "C" void breakpt(void); - - -static inline uae_u64 do_get_mem_quad(uae_u64 *a) {return SDL_SwapBE64(*a);} -static inline void do_put_mem_quad(uae_u64 *a, uae_u64 v) {*a = SDL_SwapBE64(v);} - - -#ifndef NOCHECKBOUNDARY -static ALWAYS_INLINE bool test_ram_boundary(uaecptr addr, int size, bool super, bool write) -{ - if (addr <= (FastRAM_BEGIN + FastRAM_SIZE - size)) { -#ifdef PROTECT2K - // protect first 2kB of RAM - access in supervisor mode only - if (!super && addr < 0x00000800UL) - return false; -#endif - // check for write access to protected areas: - // - first two longwords of ST-RAM are non-writable (ROM shadow) - // - non-writable area between end of ST-RAM and begin of FastRAM - if (!write || addr >= FastRAM_BEGIN || (addr >= 8 && addr <= (STRAM_END - size))) - return true; - } -#ifdef FIXED_VIDEORAM - return addr >= ARANYMVRAMSTART && addr <= (ARANYMVRAMSTART + ARANYMVRAMSIZE - size); -#else - return addr >= VideoRAMBase && addr <= (VideoRAMBase + ARANYMVRAMSIZE - size); -#endif -} -/* - * "size" is the size of the memory access (byte = 1, word = 2, long = 4) - */ -static ALWAYS_INLINE void check_ram_boundary(uaecptr addr, int size, bool write) -{ - if (test_ram_boundary(addr, size, regs.s, write)) - return; - - // D(bug("BUS ERROR %s at $%x\n", (write ? "writing" : "reading"), addr)); - regs.mmu_fault_addr = addr; - regs.mmu_ssw = ((size & 3) << 5) | (write ? 0 : (1 << 8)); /* MMU_SW_RW */ - breakpt(); - THROW(2); -} - -#else -static inline bool test_ram_boundary(uaecptr, int, bool, bool) { return 1; } -static inline void check_ram_boundary(uaecptr, int, bool) { } -#endif - -#ifdef FIXED_VIDEORAM -# define do_get_real_address(a) ((uae_u8 *)(((uaecptr)(a) < ARANYMVRAMSTART) ? ((uaecptr)(a) + MEMBaseDiff) : ((uaecptr)(a) + VMEMBaseDiff))) -#else -# define do_get_real_address(a) ((uae_u8 *)((uintptr)(a) + MEMBaseDiff)) -#endif - -static inline uae_u8 *phys_get_real_address(uaecptr addr) -{ - return do_get_real_address(addr); -} - -#ifndef NOCHECKBOUNDARY -static inline bool phys_valid_address(uaecptr addr, bool write, int sz) -{ - return test_ram_boundary(addr, sz, regs.s, write); -} -#else -static inline bool phys_valid_address(uaecptr, bool, int) { return true; } -#endif - -static inline uae_u64 phys_get_quad(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_quad((uae_u64*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); /* TODO: must be HWget_q */ -#endif - check_ram_boundary(addr, 8, false); - uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_quad(m); -} - -static inline uae_u32 phys_get_long(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_long((uae_u32*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_l(addr); -#endif - check_ram_boundary(addr, 4, false); - uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_long(m); -} - -static inline uae_u32 phys_get_word(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_word((uae_u16*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_w(addr); -#endif - check_ram_boundary(addr, 2, false); - uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_word(m); -} - -static inline uae_u32 phys_get_byte(uaecptr addr) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ read_page) <= ARAM_PAGE_MASK)) - return do_get_mem_byte((uae_u8*)(addr + read_offset)); -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) return HWget_b(addr); -#endif - check_ram_boundary(addr, 1, false); - uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - read_page = addr; - read_offset = (uintptr)m - (uintptr)addr; -#endif - return do_get_mem_byte(m); -} - -static inline void phys_put_quad(uaecptr addr, uae_u64 l) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_quad((uae_u64*)(addr + write_offset), l); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_l(addr, l); /* TODO: must be HWput_q */ - return; - } -#endif - check_ram_boundary(addr, 8, true); - uae_u64 * const m = (uae_u64 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_quad(m, l); -} - -static inline void phys_put_long(uaecptr addr, uae_u32 l) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_long((uae_u32*)(addr + write_offset), l); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_l(addr, l); - return; - } -#endif - check_ram_boundary(addr, 4, true); - uae_u32 * const m = (uae_u32 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_long(m, l); -} - -static inline void phys_put_word(uaecptr addr, uae_u32 w) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_word((uae_u16*)(addr + write_offset), w); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_w(addr, w); - return; - } -#endif - check_ram_boundary(addr, 2, true); - uae_u16 * const m = (uae_u16 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_word(m, w); -} - -static inline void phys_put_byte(uaecptr addr, uae_u32 b) -{ -#ifdef ARAM_PAGE_CHECK - if (((addr ^ write_page) <= ARAM_PAGE_MASK)) { - do_put_mem_byte((uae_u8*)(addr + write_offset), b); - return; - } -#endif -#ifndef HW_SIGSEGV - addr = addr < 0xff000000 ? addr : addr & 0x00ffffff; - if ((addr & 0xfff00000) == 0x00f00000) { - HWput_b(addr, b); - return; - } -#endif - check_ram_boundary(addr, 1, true); - uae_u8 * const m = (uae_u8 *)phys_get_real_address(addr); -#ifdef ARAM_PAGE_CHECK - write_page = addr; - write_offset = (uintptr)m - (uintptr)addr; -#endif - do_put_mem_byte(m, b); -} - -#ifdef FULLMMU -static ALWAYS_INLINE bool is_unaligned(uaecptr addr, int size) -{ - return unlikely((addr & (size - 1)) && (addr ^ (addr + size - 1)) & 0x1000); -} - -static ALWAYS_INLINE uae_u8 *mmu_get_real_address(uaecptr addr, struct mmu_atc_line *cl) -{ - return do_get_real_address(cl->phys + addr); -} - -static ALWAYS_INLINE uae_u32 mmu_get_quad(uaecptr addr, int data) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl)); - return mmu_get_quad_slow(addr, regs.s, data, cl); -} - -static ALWAYS_INLINE uae_u64 get_quad(uaecptr addr) -{ - return mmu_get_quad(addr, 1); -} - -static ALWAYS_INLINE uae_u32 mmu_get_long(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); - return mmu_get_long_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u32 get_long(uaecptr addr) -{ - if (unlikely(is_unaligned(addr, 4))) - return mmu_get_long_unaligned(addr, 1); - return mmu_get_long(addr, 1, sz_long); -} - -static ALWAYS_INLINE uae_u16 mmu_get_word(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); - return mmu_get_word_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u16 get_word(uaecptr addr) -{ - if (unlikely(is_unaligned(addr, 2))) - return mmu_get_word_unaligned(addr, 1); - return mmu_get_word(addr, 1, sz_word); -} - -static ALWAYS_INLINE uae_u8 mmu_get_byte(uaecptr addr, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 0, &cl))) - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); - return mmu_get_byte_slow(addr, regs.s, data, size, cl); -} - -static ALWAYS_INLINE uae_u8 get_byte(uaecptr addr) -{ - return mmu_get_byte(addr, 1, sz_byte); -} - -static ALWAYS_INLINE void mmu_put_quad(uaecptr addr, uae_u64 val, int data) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_quad((uae_u64 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_quad_slow(addr, val, regs.s, data, cl); -} - -static ALWAYS_INLINE void put_quad(uaecptr addr, uae_u32 val) -{ - mmu_put_quad(addr, val, 1); -} - -static ALWAYS_INLINE void mmu_put_long(uaecptr addr, uae_u32 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_long_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_long(uaecptr addr, uae_u32 val) -{ - if (unlikely(is_unaligned(addr, 4))) - mmu_put_long_unaligned(addr, val, 1); - else - mmu_put_long(addr, val, 1, sz_long); -} - -static ALWAYS_INLINE void mmu_put_word(uaecptr addr, uae_u16 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_word_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_word(uaecptr addr, uae_u16 val) -{ - if (unlikely(is_unaligned(addr, 2))) - mmu_put_word_unaligned(addr, val, 1); - else - mmu_put_word(addr, val, 1, sz_word); -} - -static ALWAYS_INLINE void mmu_put_byte(uaecptr addr, uae_u8 val, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_lookup(addr, data, 1, &cl))) - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_byte_slow(addr, val, regs.s, data, size, cl); -} - -static ALWAYS_INLINE void put_byte(uaecptr addr, uae_u8 val) -{ - mmu_put_byte(addr, val, 1, sz_byte); -} - -static inline uae_u8 *get_real_address(uaecptr addr, int write, int sz) -{ - (void)sz; - return phys_get_real_address(mmu_translate(addr, regs.s, 1, write)); -} - -static ALWAYS_INLINE uae_u32 mmu_get_user_long(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_long((uae_u32 *)mmu_get_real_address(addr, cl)); - return mmu_get_long_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE uae_u16 mmu_get_user_word(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_word((uae_u16 *)mmu_get_real_address(addr, cl)); - return mmu_get_word_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE uae_u8 mmu_get_user_byte(uaecptr addr, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 0, &cl))) - return do_get_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl)); - return mmu_get_byte_slow(addr, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_long(uaecptr addr, uae_u32 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_long((uae_u32 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_long_slow(addr, val, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_word(uaecptr addr, uae_u16 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_word((uae_u16 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_word_slow(addr, val, super, data, size, cl); -} - -static ALWAYS_INLINE void mmu_put_user_byte(uaecptr addr, uae_u8 val, int super, int data, int size) -{ - struct mmu_atc_line *cl; - - if (likely(mmu_user_lookup(addr, super, data, 1, &cl))) - do_put_mem_byte((uae_u8 *)mmu_get_real_address(addr, cl), val); - else - mmu_put_byte_slow(addr, val, super, data, size, cl); -} - -static inline bool valid_address(uaecptr addr, bool write, int sz) -{ - SAVE_EXCEPTION; - TRY(prb) { - (void)sz; - check_ram_boundary(mmu_translate(addr, regs.s, 1, (write ? 1 : 0)), sz, write); - RESTORE_EXCEPTION; - return true; - } - CATCH(prb) { - RESTORE_EXCEPTION; - return false; - } -} - -#else - -# define get_quad(a) phys_get_quad(a) -# define get_long(a) phys_get_long(a) -# define get_word(a) phys_get_word(a) -# define get_byte(a) phys_get_byte(a) -# define put_quad(a,b) phys_put_quad(a,b) -# define put_long(a,b) phys_put_long(a,b) -# define put_word(a,b) phys_put_word(a,b) -# define put_byte(a,b) phys_put_byte(a,b) -# define get_real_address(a,w,s) phys_get_real_address(a) - -#define valid_address(a,w,s) phys_valid_address(a,w,s) -#endif - -static inline void flush_internals() { -#ifdef ARAM_PAGE_CHECK - pc_page = 0xeeeeeeee; - read_page = 0xeeeeeeee; - write_page = 0xeeeeeeee; -#endif -} - -#endif /* MEMORY_H */ - -/* -vim:ts=4:sw=4: -*/ diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp deleted file mode 100644 index e56f993d6..000000000 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ /dev/null @@ -1,59 +0,0 @@ -/* - * memory.cpp - memory management - * - * Copyright (c) 2001-2004 Milan Jurik of ARAnyM dev team (see AUTHORS) - * - * Inspired by Christian Bauer's Basilisk II - * - * This file is part of the ARAnyM project which builds a new and powerful - * TOS/FreeMiNT compatible virtual machine running on almost any hardware. - * - * ARAnyM 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. - * - * ARAnyM 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 ARAnyM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - */ - /* - * UAE - The Un*x Amiga Emulator - * - * Memory management - * - * (c) 1995 Bernd Schmidt - */ - -#include "sysdeps.h" - -#include "memory.h" -#define DEBUG 0 -#include "debug.h" - -#ifdef ARAM_PAGE_CHECK -uaecptr pc_page = 0xeeeeeeee; -uintptr pc_offset = 0; -uaecptr read_page = 0xeeeeeeee; -uintptr read_offset = 0; -uaecptr write_page = 0xeeeeeeee; -uintptr write_offset = 0; -#endif - -extern "C" void breakpt(void) -{ - // bug("bus err: pc=%08x, sp=%08x, addr=%08x", m68k_getpc(), regs.regs[15], regs.mmu_fault_addr); -} - -#if !KNOWN_ALLOC && !NORMAL_ADDRESSING -// This part need rewrite for ARAnyM !! -// It can be taken from hatari. - -#error Not prepared for your platform, maybe you need memory banks from hatari - -#endif /* !KNOWN_ALLOC && !NORMAL_ADDRESSING */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h deleted file mode 100644 index e3b7a3a5b..000000000 --- a/BasiliskII/src/uae_cpu/noflags.h +++ /dev/null @@ -1,142 +0,0 @@ -#ifndef NOFLAGS_H -#define NOFLAGS_H - -/* Undefine everything that will *set* flags. Note: Leave *reading* - flags alone ;-). We assume that nobody does something like - SET_ZFLG(a=b+c), i.e. expect side effects of the macros. That would - be a stupid thing to do when using macros. -*/ - -/* Gwenole Beauchesne pointed out that CAS and CAS2 use flag_cmp to set - flags that are then used internally, and that thus the noflags versions - of those instructions were broken. Oops! - Easy fix: Leave flag_cmp alone. It is only used by CMP* and CAS* - instructions. For CAS*, noflags is a bad idea. For CMP*, which has - setting flags as its only function, the noflags version is kinda pointless, - anyway. - Note that this will only work while using the optflag_* routines --- - as we do on all (one ;-) platforms that will ever use the noflags - versions, anyway. - However, if you try to compile without optimized flags, the "SET_ZFLAG" - macro will be left unchanged, to make CAS and CAS2 work right. Of course, - this is contrary to the whole idea of noflags, but better be right than - be fast. - - Another problem exists with one of the bitfield operations. Once again, - one of the operations sets a flag, and looks at it later. And the CHK2 - instruction does so as well. For those, a different solution is possible. - the *_ALWAYS versions of the SET_?FLG macros shall remain untouched by - the redefinitions in this file. - Unfortunately, they are defined in terms of the macros we *do* redefine. - So here comes a bit of trickery.... -*/ -#define NOFLAGS_CMP 0 - -#undef SET_NFLG_ALWAYS -static inline void SET_NFLG_ALWAYS(uae_u32 x) -{ - SET_NFLG(x); /* This has not yet been redefined */ -} - -#undef SET_CFLG_ALWAYS -static inline void SET_CFLG_ALWAYS(uae_u32 x) -{ - SET_CFLG(x); /* This has not yet been redefined */ -} - -#undef CPUFUNC -#define CPUFUNC(x) x##_nf - -#ifndef OPTIMIZED_FLAGS -#undef SET_ZFLG -#define SET_ZFLG(y) do {uae_u32 dummy=(y); } while (0) -#endif - -#undef SET_CFLG -#define SET_CFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_VFLG -#define SET_VFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_NFLG -#define SET_NFLG(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_XFLG -#define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) - -#undef CLEAR_CZNV -#define CLEAR_CZNV() -#undef IOR_CZNV -#define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) -#undef SET_CZNV -#define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) -#undef COPY_CARRY -#define COPY_CARRY() - -#ifdef optflag_testl -#undef optflag_testl -#endif - -#ifdef optflag_testw -#undef optflag_testw -#endif - -#ifdef optflag_testb -#undef optflag_testb -#endif - -#ifdef optflag_addl -#undef optflag_addl -#endif - -#ifdef optflag_addw -#undef optflag_addw -#endif - -#ifdef optflag_addb -#undef optflag_addb -#endif - -#ifdef optflag_subl -#undef optflag_subl -#endif - -#ifdef optflag_subw -#undef optflag_subw -#endif - -#ifdef optflag_subb -#undef optflag_subb -#endif - -#if NOFLAGS_CMP -#ifdef optflag_cmpl -#undef optflag_cmpl -#endif - -#ifdef optflag_cmpw -#undef optflag_cmpw -#endif - -#ifdef optflag_cmpb -#undef optflag_cmpb -#endif -#endif - -#define optflag_testl(v) do { } while (0) -#define optflag_testw(v) do { } while (0) -#define optflag_testb(v) do { } while (0) - -#define optflag_addl(v, s, d) (v = (uae_s32)(d) + (uae_s32)(s)) -#define optflag_addw(v, s, d) (v = (uae_s16)(d) + (uae_s16)(s)) -#define optflag_addb(v, s, d) (v = (uae_s8)(d) + (uae_s8)(s)) - -#define optflag_subl(v, s, d) (v = (uae_s32)(d) - (uae_s32)(s)) -#define optflag_subw(v, s, d) (v = (uae_s16)(d) - (uae_s16)(s)) -#define optflag_subb(v, s, d) (v = (uae_s8)(d) - (uae_s8)(s)) - -#if NOFLAGS_CMP -/* These are just for completeness sake */ -#define optflag_cmpl(s, d) do { } while (0) -#define optflag_cmpw(s, d) do { } while (0) -#define optflag_cmpb(s, d) do { } while (0) -#endif - -#endif diff --git a/BasiliskII/src/uae_cpu/readcpua.cpp b/BasiliskII/src/uae_cpu/readcpua.cpp deleted file mode 100644 index 521c241f2..000000000 --- a/BasiliskII/src/uae_cpu/readcpua.cpp +++ /dev/null @@ -1,5 +0,0 @@ -/* - * readcpu.cpp must be compiled twice, once for the generator program - * and once for the actual executable - */ -#include "readcpu.cpp" From 1d710a0cad51a19407e7f9b2a1b86820d2c5cc8d Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 5 May 2021 22:15:43 +0900 Subject: [PATCH 492/534] BII: disable JIT compiler --- BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj | 4 ---- BasiliskII/src/MacOSX/config.h | 2 +- 2 files changed, 1 insertion(+), 5 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index f7f75265c..5234e02da 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1092,8 +1092,6 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", CPU_x86_64, - JIT, - "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1167,8 +1165,6 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", CPU_x86_64, - JIT, - "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index c209a7125..a2dcd1d18 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -822,6 +822,7 @@ #define UPDATE_UAE #ifdef UPDATE_UAE +#define DIRECT_ADDRESSING 1 #define CPU_64_BIT #define USE_INLINING #ifdef CPU_x86_64 @@ -829,7 +830,6 @@ #define WINUAE_ARANYM #else #define FPU_MPFR -#define DIRECT_ADDRESSING 1 #endif #else #define FPU_IEEE From 9cf0c98dd6e165ff530c8674b09d653126d37bfe Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 5 May 2021 23:16:29 +0900 Subject: [PATCH 493/534] delete simlink --- SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h | 1 - 1 file changed, 1 deletion(-) delete mode 120000 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h deleted file mode 120000 index 110f4bd0d..000000000 --- a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h +++ /dev/null @@ -1 +0,0 @@ -../../../../../../../BasiliskII/src/uae_cpu/compiler/codegen_x86.h \ No newline at end of file From 164aa8c3fe3ab9039dfa28bd6246cd736dc9dcf0 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Wed, 5 May 2021 23:18:15 +0900 Subject: [PATCH 494/534] copy codegen_x86.h from BasiliskII --- .../src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h | 2565 +++++++++++++++++ 1 file changed, 2565 insertions(+) create mode 100644 SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h diff --git a/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h new file mode 100644 index 000000000..08538b7af --- /dev/null +++ b/SheepShaver/src/kpx_cpu/src/cpu/jit/x86/codegen_x86.h @@ -0,0 +1,2565 @@ +/******************** -*- mode: C; tab-width: 8 -*- ******************** + * + * Run-time assembler for IA-32 and AMD64 + * + ***********************************************************************/ + + +/*********************************************************************** + * + * This file is derived from CCG. + * + * Copyright 1999, 2000, 2001, 2002, 2003 Ian Piumarta + * + * Adaptations and enhancements for AMD64 support, Copyright 2003-2008 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 X86_RTASM_H +#define X86_RTASM_H + +/* NOTES + * + * o Best viewed on a 1024x768 screen with fixed-6x10 font ;-) + * + * TODO + * + * o Fix FIXMEs + * o SSE instructions + * o Optimize for cases where register numbers are not integral constants + */ + +/* --- Configuration ------------------------------------------------------- */ + +/* Define to settle a "flat" register set, i.e. different regno for + each size variant. */ +#ifndef X86_FLAT_REGISTERS +#define X86_FLAT_REGISTERS 1 +#endif + +/* Define to generate x86-64 code. */ +#ifndef X86_TARGET_64BIT +#define X86_TARGET_64BIT 0 +#endif + +/* Define to optimize ALU instructions. */ +#ifndef X86_OPTIMIZE_ALU +#define X86_OPTIMIZE_ALU 1 +#endif + +/* Define to optimize rotate/shift instructions. */ +#ifndef X86_OPTIMIZE_ROTSHI +#define X86_OPTIMIZE_ROTSHI 1 +#endif + +/* Define to optimize absolute addresses for RIP relative addressing. */ +#ifndef X86_RIP_RELATIVE_ADDR +#define X86_RIP_RELATIVE_ADDR 1 +#endif + + +/* --- Macros -------------------------------------------------------------- */ + +/* Functions used to emit code. + * + * x86_emit_byte(B) + * x86_emit_word(W) + * x86_emit_long(L) + */ + +/* Get pointer to current code + * + * x86_get_target() + */ + +/* Abort assembler, fatal failure. + * + * x86_emit_failure(MSG) + */ + +#define x86_emit_failure0(MSG) (x86_emit_failure(MSG),0) + + +/* --- Register set -------------------------------------------------------- */ + +enum { + X86_RIP = -2, +#if X86_FLAT_REGISTERS + X86_NOREG = 0, + X86_Reg8L_Base = 0x10, + X86_Reg8H_Base = 0x20, + X86_Reg16_Base = 0x30, + X86_Reg32_Base = 0x40, + X86_Reg64_Base = 0x50, + X86_RegMMX_Base = 0x60, + X86_RegXMM_Base = 0x70, + X86_RegFPU_Base = 0x80 +#else + X86_NOREG = -1, + X86_Reg8L_Base = 0, + X86_Reg8H_Base = 16, + X86_Reg16_Base = 0, + X86_Reg32_Base = 0, + X86_Reg64_Base = 0, + X86_RegMMX_Base = 0, + X86_RegXMM_Base = 0, + X86_RegFPU_Base = 0 +#endif +}; + +enum { + X86_AL = X86_Reg8L_Base, + X86_CL, X86_DL, X86_BL, + X86_SPL, X86_BPL, X86_SIL, X86_DIL, + X86_R8B, X86_R9B, X86_R10B, X86_R11B, + X86_R12B, X86_R13B, X86_R14B, X86_R15B, + X86_AH = X86_Reg8H_Base + 4, + X86_CH, X86_DH, X86_BH +}; + +enum { + X86_AX = X86_Reg16_Base, + X86_CX, X86_DX, X86_BX, + X86_SP, X86_BP, X86_SI, X86_DI, + X86_R8W, X86_R9W, X86_R10W, X86_R11W, + X86_R12W, X86_R13W, X86_R14W, X86_R15W +}; + +enum { + X86_EAX = X86_Reg32_Base, + X86_ECX, X86_EDX, X86_EBX, + X86_ESP, X86_EBP, X86_ESI, X86_EDI, + X86_R8D, X86_R9D, X86_R10D, X86_R11D, + X86_R12D, X86_R13D, X86_R14D, X86_R15D +}; + +enum { + X86_RAX = X86_Reg64_Base, + X86_RCX, X86_RDX, X86_RBX, + X86_RSP, X86_RBP, X86_RSI, X86_RDI, + X86_R8, X86_R9, X86_R10, X86_R11, + X86_R12, X86_R13, X86_R14, X86_R15 +}; + +enum { + X86_MM0 = X86_RegMMX_Base, + X86_MM1, X86_MM2, X86_MM3, + X86_MM4, X86_MM5, X86_MM6, X86_MM7, +}; + +enum { + X86_XMM0 = X86_RegXMM_Base, + X86_XMM1, X86_XMM2, X86_XMM3, + X86_XMM4, X86_XMM5, X86_XMM6, X86_XMM7, + X86_XMM8, X86_XMM9, X86_XMM10, X86_XMM11, + X86_XMM12, X86_XMM13, X86_XMM14, X86_XMM15 +}; + +enum { + X86_ST0 = X86_RegFPU_Base, + X86_ST1, X86_ST2, X86_ST3, + X86_ST4, X86_ST5, X86_ST6, X86_ST7 +}; + +/* Register control and access + * + * _r0P(R) Null register? + * _rIP(R) RIP register? + * _rXP(R) Extended register? + * + * _rC(R) Class of register (only valid if X86_FLAT_REGISTERS) + * _rR(R) Full register number + * _rN(R) Short register number for encoding + * + * _r1(R) 8-bit register ID + * _r2(R) 16-bit register ID + * _r4(R) 32-bit register ID + * _r8(R) 64-bit register ID + * _rM(R) MMX register ID + * _rX(R) XMM register ID + * _rF(R) FPU register ID + * _rA(R) Address register ID used for EA calculation + */ + +#define _rST0P(R) ((int)(R) == (int)X86_ST0) +#define _r0P(R) ((int)(R) == (int)X86_NOREG) +#define _rIP(R) (X86_TARGET_64BIT ? ((int)(R) == (int)X86_RIP) : 0) + +#if X86_FLAT_REGISTERS +#define _rC(R) ((R) & 0xf0) +#define _rR(R) ((R) & 0x0f) +#define _rN(R) ((R) & 0x07) +#define _rXP(R) (((R) > 0 && _rR(R) > 7) ? 1 : 0) +#else +#define _rN(R) ((R) & 0x07) +#define _rR(R) (int(R)) +#define _rXP(R) ((_rR(R) > 7 && _rR(R) < 16) ? 1 : 0) +#endif + +#if !defined(_ASM_SAFETY) || ! X86_FLAT_REGISTERS +#define _r1(R) _rN(R) +#define _r2(R) _rN(R) +#define _r4(R) _rN(R) +#define _r8(R) _rN(R) +#define _rA(R) _rN(R) +#define _rM(R) _rN(R) +#define _rX(R) _rN(R) +#define _rF(R) _rN(R) +#else +#define _r1(R) ( ((_rC(R) & (X86_Reg8L_Base | X86_Reg8H_Base)) != 0) ? _rN(R) : x86_emit_failure0( "8-bit register required")) +#define _r2(R) ( (_rC(R) == X86_Reg16_Base) ? _rN(R) : x86_emit_failure0("16-bit register required")) +#define _r4(R) ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("32-bit register required")) +#define _r8(R) ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("64-bit register required")) +#define _rA(R) ( X86_TARGET_64BIT ? \ + ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("not a valid 64-bit base/index expression")) : \ + ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("not a valid 32-bit base/index expression")) ) +#define _rM(R) ( (_rC(R) == X86_RegMMX_Base) ? _rN(R) : x86_emit_failure0("MMX register required")) +#define _rX(R) ( (_rC(R) == X86_RegXMM_Base) ? _rN(R) : x86_emit_failure0("SSE register required")) +#define _rF(R) ( (_rC(R) == X86_RegFPU_Base) ? _rN(R) : x86_emit_failure0("FPU register required")) +#endif + +#define _rSP() (X86_TARGET_64BIT ? (int)X86_RSP : (int)X86_ESP) +#define _r1e8lP(R) (int(R) >= X86_SPL && int(R) <= X86_DIL) +#define _rbpP(R) (_rR(R) == _rR(X86_RBP)) +#define _rspP(R) (_rR(R) == _rR(X86_RSP)) +#define _rbp13P(R) (_rN(R) == _rN(X86_RBP)) +#define _rsp12P(R) (_rN(R) == _rN(X86_RSP)) + + +/* ========================================================================= */ +/* --- UTILITY ------------------------------------------------------------- */ +/* ========================================================================= */ + +typedef signed char _sc; +typedef unsigned char _uc; +typedef signed short _ss; +typedef unsigned short _us; +typedef signed int _sl; +typedef unsigned int _ul; + +#define _UC(X) ((_uc )(unsigned long)(X)) +#define _US(X) ((_us )(unsigned long)(X)) +#define _SL(X) ((_sl )(unsigned long)(X)) +#define _UL(X) ((_ul )(unsigned long)(X)) + +#define _PUC(X) ((_uc *)(X)) +#define _PUS(X) ((_us *)(X)) +#define _PSL(X) ((_sl *)(X)) +#define _PUL(X) ((_ul *)(X)) + +#define _B(B) x86_emit_byte((B)) +#define _W(W) x86_emit_word((W)) +#define _L(L) x86_emit_long((L)) +#define _Q(Q) x86_emit_quad((Q)) + +#define _MASK(N) ((unsigned)((1<<(N)))-1) +#define _siP(N,I) (!((((unsigned)(I))^(((unsigned)(I))<<1))&~_MASK(N))) +#define _uiP(N,I) (!(((unsigned)(I))&~_MASK(N))) +#define _suiP(N,I) (_siP(N,I) | _uiP(N,I)) + +#ifndef _ASM_SAFETY +#define _ck_s(W,I) (_UL(I) & _MASK(W)) +#define _ck_u(W,I) (_UL(I) & _MASK(W)) +#define _ck_su(W,I) (_UL(I) & _MASK(W)) +#define _ck_d(W,I) (_UL(I) & _MASK(W)) +#else +#define _ck_s(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "signed integer `"#I"' too large for "#W"-bit field")) +#define _ck_u(W,I) (_uiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0("unsigned integer `"#I"' too large for "#W"-bit field")) +#define _ck_su(W,I) (_suiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "integer `"#I"' too large for "#W"-bit field")) +#define _ck_d(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "displacement `"#I"' too large for "#W"-bit field")) +#endif + +#define _s0P(I) ((I)==0) +#define _s8P(I) _siP(8,I) +#define _s16P(I) _siP(16,I) +#define _u8P(I) _uiP(8,I) +#define _u16P(I) _uiP(16,I) + +#define _su8(I) _ck_su(8,I) +#define _su16(I) _ck_su(16,I) + +#define _s1(I) _ck_s( 1,I) +#define _s2(I) _ck_s( 2,I) +#define _s3(I) _ck_s( 3,I) +#define _s4(I) _ck_s( 4,I) +#define _s5(I) _ck_s( 5,I) +#define _s6(I) _ck_s( 6,I) +#define _s7(I) _ck_s( 7,I) +#define _s8(I) _ck_s( 8,I) +#define _s9(I) _ck_s( 9,I) +#define _s10(I) _ck_s(10,I) +#define _s11(I) _ck_s(11,I) +#define _s12(I) _ck_s(12,I) +#define _s13(I) _ck_s(13,I) +#define _s14(I) _ck_s(14,I) +#define _s15(I) _ck_s(15,I) +#define _s16(I) _ck_s(16,I) +#define _s17(I) _ck_s(17,I) +#define _s18(I) _ck_s(18,I) +#define _s19(I) _ck_s(19,I) +#define _s20(I) _ck_s(20,I) +#define _s21(I) _ck_s(21,I) +#define _s22(I) _ck_s(22,I) +#define _s23(I) _ck_s(23,I) +#define _s24(I) _ck_s(24,I) +#define _s25(I) _ck_s(25,I) +#define _s26(I) _ck_s(26,I) +#define _s27(I) _ck_s(27,I) +#define _s28(I) _ck_s(28,I) +#define _s29(I) _ck_s(29,I) +#define _s30(I) _ck_s(30,I) +#define _s31(I) _ck_s(31,I) +#define _u1(I) _ck_u( 1,I) +#define _u2(I) _ck_u( 2,I) +#define _u3(I) _ck_u( 3,I) +#define _u4(I) _ck_u( 4,I) +#define _u5(I) _ck_u( 5,I) +#define _u6(I) _ck_u( 6,I) +#define _u7(I) _ck_u( 7,I) +#define _u8(I) _ck_u( 8,I) +#define _u9(I) _ck_u( 9,I) +#define _u10(I) _ck_u(10,I) +#define _u11(I) _ck_u(11,I) +#define _u12(I) _ck_u(12,I) +#define _u13(I) _ck_u(13,I) +#define _u14(I) _ck_u(14,I) +#define _u15(I) _ck_u(15,I) +#define _u16(I) _ck_u(16,I) +#define _u17(I) _ck_u(17,I) +#define _u18(I) _ck_u(18,I) +#define _u19(I) _ck_u(19,I) +#define _u20(I) _ck_u(20,I) +#define _u21(I) _ck_u(21,I) +#define _u22(I) _ck_u(22,I) +#define _u23(I) _ck_u(23,I) +#define _u24(I) _ck_u(24,I) +#define _u25(I) _ck_u(25,I) +#define _u26(I) _ck_u(26,I) +#define _u27(I) _ck_u(27,I) +#define _u28(I) _ck_u(28,I) +#define _u29(I) _ck_u(29,I) +#define _u30(I) _ck_u(30,I) +#define _u31(I) _ck_u(31,I) + +/* ========================================================================= */ +/* --- ASSEMBLER ----------------------------------------------------------- */ +/* ========================================================================= */ + +#define _b00 0 +#define _b01 1 +#define _b10 2 +#define _b11 3 + +#define _b000 0 +#define _b001 1 +#define _b010 2 +#define _b011 3 +#define _b100 4 +#define _b101 5 +#define _b110 6 +#define _b111 7 + +#define _OFF4(D) (_UL(D) - _UL(x86_get_target())) +#define _CKD8(D) _ck_d(8, ((_uc) _OFF4(D)) ) + +#define _D8(D) (_B(0), ((*(_PUC(x86_get_target())-1))= _CKD8(D))) +#define _D32(D) (_L(0), ((*(_PUL(x86_get_target())-1))= _OFF4(D))) + +#ifndef _ASM_SAFETY +# define _M(M) (M) +# define _r(R) (R) +# define _m(M) (M) +# define _s(S) (S) +# define _i(I) (I) +# define _b(B) (B) +#else +# define _M(M) (((M)>3) ? x86_emit_failure0("internal error: mod = " #M) : (M)) +# define _r(R) (((R)>7) ? x86_emit_failure0("internal error: reg = " #R) : (R)) +# define _m(M) (((M)>7) ? x86_emit_failure0("internal error: r/m = " #M) : (M)) +# define _s(S) (((S)>3) ? x86_emit_failure0("internal error: memory scale = " #S) : (S)) +# define _i(I) (((I)>7) ? x86_emit_failure0("internal error: memory index = " #I) : (I)) +# define _b(B) (((B)>7) ? x86_emit_failure0("internal error: memory base = " #B) : (B)) +#endif + +#define _Mrm(Md,R,M) _B((_M(Md)<<6)|(_r(R)<<3)|_m(M)) +#define _SIB(Sc,I, B) _B((_s(Sc)<<6)|(_i(I)<<3)|_b(B)) + +#define _SCL(S) ((((S)==1) ? _b00 : \ + (((S)==2) ? _b01 : \ + (((S)==4) ? _b10 : \ + (((S)==8) ? _b11 : x86_emit_failure0("illegal scale: " #S)))))) + + +/* --- Memory subformats - urgh! ------------------------------------------- */ + +/* _r_D() is RIP addressing mode if X86_TARGET_64BIT, use _r_DSIB() instead */ +#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((_sl)(D))) +#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((_sl)(D))) +#define _r_0B( R, B ) (_Mrm(_b00,_rN(R),_rA(B)) ) +#define _r_0BIS(R, B,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)) ) +#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((_sc)(D))) +#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((_sc)(D))) +#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((_sl)(D))) +#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((_sl)(D))) +#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((_sl)(D))) + +#define _r_DB( R, D,B ) ((_s0P(D) && (!_rbp13P(B)) ? _r_0B (R, B ) : (_s8P(D) ? _r_1B( R,D,B ) : _r_4B( R,D,B )))) +#define _r_DBIS(R, D,B,I,S) ((_s0P(D) && (!_rbp13P(B)) ? _r_0BIS(R, B,I,S) : (_s8P(D) ? _r_1BIS(R,D,B,I,S) : _r_4BIS(R,D,B,I,S)))) + +/* Use RIP-addressing in 64-bit mode, if possible */ +#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && \ + ((uintptr)x86_get_target() + 4 + (O) - (D) <= 0xffffffff)) + +#define _r_X( R, D,B,I,S,O) (_r0P(I) ? (_r0P(B) ? (!X86_TARGET_64BIT ? _r_D(R,D) : \ + (_x86_RIP_addressing_possible(D, O) ? \ + _r_D(R, (D) - ((uintptr)x86_get_target() + 4 + (O))) : \ + _r_DSIB(R,D))) : \ + (_rIP(B) ? _r_D (R,D ) : \ + (_rsp12P(B) ? _r_DBIS(R,D,_rSP(),_rSP(),1) : \ + _r_DB (R,D, B )))) : \ + (_r0P(B) ? _r_4IS (R,D, I,S) : \ + (!_rspP(I) ? _r_DBIS(R,D, B, I,S) : \ + x86_emit_failure("illegal index register: %esp")))) + + +/* --- Instruction formats ------------------------------------------------- */ + +#define _m32only(X) (! X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 64-bit mode")) +#define _m64only(X) ( X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 32-bit mode")) +#define _m64(X) ( X86_TARGET_64BIT ? X : ((void)0) ) + +/* _format Opcd ModR/M dN(rB,rI,Sc) imm... */ + +#define _d16() ( _B(0x66 ) ) +#define _O( OP ) ( _B( OP ) ) +#define _Or( OP,R ) ( _B( (OP)|_r(R)) ) +#define _OO( OP ) ( _B((OP)>>8), _B(( (OP) )&0xff) ) +#define _OOr( OP,R ) ( _B((OP)>>8), _B(( (OP)|_r(R))&0xff) ) +#define _Os( OP,B ) ( _s8P(B) ? _B(((OP)|_b10)) : _B(OP) ) +#define _sW( W ) ( _s8P(W) ? _B(W):_W(W) ) +#define _sL( L ) ( _s8P(L) ? _B(L):_L(L) ) +#define _sWO( W ) ( _s8P(W) ? 1 : 2 ) +#define _sLO( L ) ( _s8P(L) ? 1 : 4 ) +#define _O_B( OP ,B ) ( _O ( OP ) ,_B(B) ) +#define _O_W( OP ,W ) ( _O ( OP ) ,_W(W) ) +#define _O_L( OP ,L ) ( _O ( OP ) ,_L(L) ) +#define _OO_L( OP ,L ) ( _OO ( OP ) ,_L(L) ) +#define _O_D8( OP ,D ) ( _O ( OP ) ,_D8(D) ) +#define _O_D32( OP ,D ) ( _O ( OP ) ,_D32(D) ) +#define _OO_D32( OP ,D ) ( _OO ( OP ) ,_D32(D) ) +#define _Os_sW( OP ,W ) ( _Os ( OP,W) ,_sW(W) ) +#define _Os_sL( OP ,L ) ( _Os ( OP,L) ,_sL(L) ) +#define _O_W_B( OP ,W,B) ( _O ( OP ) ,_W(W),_B(B)) +#define _Or_B( OP,R ,B ) ( _Or ( OP,R) ,_B(B) ) +#define _Or_W( OP,R ,W ) ( _Or ( OP,R) ,_W(W) ) +#define _Or_L( OP,R ,L ) ( _Or ( OP,R) ,_L(L) ) +#define _Or_Q( OP,R ,Q ) ( _Or ( OP,R) ,_Q(Q) ) +#define _O_Mrm( OP ,MO,R,M ) ( _O ( OP ),_Mrm(MO,R,M ) ) +#define _OO_Mrm( OP ,MO,R,M ) ( _OO ( OP ),_Mrm(MO,R,M ) ) +#define _O_Mrm_B( OP ,MO,R,M ,B ) ( _O ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _O_Mrm_W( OP ,MO,R,M ,W ) ( _O ( OP ),_Mrm(MO,R,M ) ,_W(W) ) +#define _O_Mrm_L( OP ,MO,R,M ,L ) ( _O ( OP ),_Mrm(MO,R,M ) ,_L(L) ) +#define _OO_Mrm_B( OP ,MO,R,M ,B ) ( _OO ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _Os_Mrm_sW(OP ,MO,R,M ,W ) ( _Os ( OP,W),_Mrm(MO,R,M ),_sW(W) ) +#define _Os_Mrm_sL(OP ,MO,R,M ,L ) ( _Os ( OP,L),_Mrm(MO,R,M ),_sL(L) ) +#define _O_r_X( OP ,R ,MD,MB,MI,MS ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _OO_r_X( OP ,R ,MD,MB,MI,MS ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _O_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _O_r_X_W( OP ,R ,MD,MB,MI,MS,W ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,2) ,_W(W) ) +#define _O_r_X_L( OP ,R ,MD,MB,MI,MS,L ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,4) ,_L(L) ) +#define _OO_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _Os_r_X_sW(OP ,R ,MD,MB,MI,MS,W ) ( _Os ( OP,W),_r_X( R ,MD,MB,MI,MS,_sWO(W)),_sW(W)) +#define _Os_r_X_sL(OP ,R ,MD,MB,MI,MS,L ) ( _Os ( OP,L),_r_X( R ,MD,MB,MI,MS,_sLO(L)),_sL(L)) +#define _O_X_B( OP ,MD,MB,MI,MS,B ) ( _O_r_X_B( OP ,0 ,MD,MB,MI,MS ,B) ) +#define _O_X_W( OP ,MD,MB,MI,MS,W ) ( _O_r_X_W( OP ,0 ,MD,MB,MI,MS ,W) ) +#define _O_X_L( OP ,MD,MB,MI,MS,L ) ( _O_r_X_L( OP ,0 ,MD,MB,MI,MS ,L) ) + + +/* --- REX prefixes -------------------------------------------------------- */ + +#define _VOID() ((void)0) +#define _BIT(X) ((X) ? 1 : 0) +#define _d64(W,R,X,B) (_B(0x40|(W)<<3|(R)<<2|(X)<<1|(B))) + +#define __REXwrxb(L,W,R,X,B) ((W|R|X|B) || (L) ? _d64(W,R,X,B) : _VOID()) +#define __REXwrx_(L,W,R,X,MR) (__REXwrxb(L,W,R,X,_BIT(_rIP(MR)?0:_rXP(MR)))) +#define __REXw_x_(L,W,R,X,MR) (__REXwrx_(L,W,_BIT(_rXP(R)),X,MR)) +#define __REX_reg(RR) (__REXwrxb(0,0,0,00,_BIT(_rXP(RR)))) +#define __REX_mem(MB,MI) (__REXwrxb(0,0,0,_BIT(_rXP(MI)),_BIT(_rXP(MB)))) + +// FIXME: can't mix new (SPL,BPL,SIL,DIL) with (AH,BH,CH,DH) +#define _REXBrr(RR,MR) _m64(__REXw_x_(_r1e8lP(RR)||_r1e8lP(MR),0,RR,0,MR)) +#define _REXBmr(MB,MI,RD) _m64(__REXw_x_(_r1e8lP(RD)||_r1e8lP(MB),0,RD,_BIT(_rXP(MI)),MB)) +#define _REXBrm(RS,MB,MI) _REXBmr(MB,MI,RS) + +#define _REXBLrr(RR,MR) _m64(__REXw_x_(_r1e8lP(MR),0,RR,0,MR)) +#define _REXLrr(RR,MR) _m64(__REXw_x_(0,0,RR,0,MR)) +#define _REXLmr(MB,MI,RD) _m64(__REXw_x_(0,0,RD,_BIT(_rXP(MI)),MB)) +#define _REXLrm(RS,MB,MI) _REXLmr(MB,MI,RS) +#define _REXLr(RR) _m64(__REX_reg(RR)) +#define _REXLm(MB,MI) _m64(__REX_mem(MB,MI)) + +#define _REXQrr(RR,MR) _m64only(__REXw_x_(0,1,RR,0,MR)) +#define _REXQmr(MB,MI,RD) _m64only(__REXw_x_(0,1,RD,_BIT(_rXP(MI)),MB)) +#define _REXQrm(RS,MB,MI) _REXQmr(MB,MI,RS) +#define _REXQr(RR) _m64only(__REX_reg(RR)) +#define _REXQm(MB,MI) _m64only(__REX_mem(MB,MI)) + + +/* ========================================================================= */ +/* --- Fully-qualified intrinsic instructions ------------------------------ */ +/* ========================================================================= */ + +/* OPCODE + i = immediate operand + * + r = register operand + * + m = memory operand (disp,base,index,scale) + * + sr/sm = a star preceding a register or memory + * + 0 = top of stack register (for FPU instructions) + * + * NOTE in x86-64 mode: a memory operand with only a valid + * displacement value will lead to the expect absolute mode. If + * RIP addressing is necessary, X86_RIP shall be used as the base + * register argument. + */ + +/* --- ALU instructions ---------------------------------------------------- */ + +enum { + X86_ADD = 0, + X86_OR = 1, + X86_ADC = 2, + X86_SBB = 3, + X86_AND = 4, + X86_SUB = 5, + X86_XOR = 6, + X86_CMP = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ALUBrr(OP,RS, RD) (_REXBrr(RS, RD), _O_Mrm (((OP) << 3) ,_b11,_r1(RS),_r1(RD) )) +#define _ALUBmr(OP, MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (((OP) << 3) + 2 ,_r1(RD) ,MD,MB,MI,MS )) +#define _ALUBrm(OP, RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (((OP) << 3) ,_r1(RS) ,MD,MB,MI,MS )) +#define _ALUBir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (((OP) << 3) + 4 ,_su8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0x80 ,_b11,OP ,_r1(RD) ,_su8(IM))) ) +#define _ALUBim(OP, IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0x80 ,OP ,MD,MB,MI,MS ,_su8(IM))) + +#define _ALUWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r2(RS),_r2(RD) )) +#define _ALUWmr(OP, MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r2(RD) ,MD,MB,MI,MS )) +#define _ALUWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r2(RS) ,MD,MB,MI,MS )) +#define _ALUWir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (((OP) << 3) + 5 ,_su16(IM))) : \ + (_d16(), _REXLrr(0, RD), _Os_Mrm_sW (0x81 ,_b11,OP ,_r2(RD) ,_su16(IM))) ) +#define _ALUWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _Os_r_X_sW (0x81 ,OP ,MD,MB,MI,MS ,_su16(IM))) + +#define _ALULrr(OP, RS, RD) (_REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r4(RS),_r4(RD) )) +#define _ALULmr(OP, MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r4(RD) ,MD,MB,MI,MS )) +#define _ALULrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r4(RS) ,MD,MB,MI,MS )) +#define _ALULir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXLrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r4(RD) ,IM )) ) +#define _ALULim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define _ALUQrr(OP, RS, RD) (_REXQrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r8(RS),_r8(RD) )) +#define _ALUQmr(OP, MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r8(RD) ,MD,MB,MI,MS )) +#define _ALUQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r8(RS) ,MD,MB,MI,MS )) +#define _ALUQir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXQrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r8(RD) ,IM )) ) +#define _ALUQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define ADCBrr(RS, RD) _ALUBrr(X86_ADC, RS, RD) +#define ADCBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCBir(IM, RD) _ALUBir(X86_ADC, IM, RD) +#define ADCBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCWrr(RS, RD) _ALUWrr(X86_ADC, RS, RD) +#define ADCWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCWir(IM, RD) _ALUWir(X86_ADC, IM, RD) +#define ADCWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCLrr(RS, RD) _ALULrr(X86_ADC, RS, RD) +#define ADCLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCLir(IM, RD) _ALULir(X86_ADC, IM, RD) +#define ADCLim(IM, MD, MB, MI, MS) _ALULim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCQrr(RS, RD) _ALUQrr(X86_ADC, RS, RD) +#define ADCQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCQir(IM, RD) _ALUQir(X86_ADC, IM, RD) +#define ADCQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADDBrr(RS, RD) _ALUBrr(X86_ADD, RS, RD) +#define ADDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDBir(IM, RD) _ALUBir(X86_ADD, IM, RD) +#define ADDBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDWrr(RS, RD) _ALUWrr(X86_ADD, RS, RD) +#define ADDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDWir(IM, RD) _ALUWir(X86_ADD, IM, RD) +#define ADDWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDLrr(RS, RD) _ALULrr(X86_ADD, RS, RD) +#define ADDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDLir(IM, RD) _ALULir(X86_ADD, IM, RD) +#define ADDLim(IM, MD, MB, MI, MS) _ALULim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDQrr(RS, RD) _ALUQrr(X86_ADD, RS, RD) +#define ADDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDQir(IM, RD) _ALUQir(X86_ADD, IM, RD) +#define ADDQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADD, IM, MD, MB, MI, MS) + +#define ANDBrr(RS, RD) _ALUBrr(X86_AND, RS, RD) +#define ANDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDBir(IM, RD) _ALUBir(X86_AND, IM, RD) +#define ANDBim(IM, MD, MB, MI, MS) _ALUBim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDWrr(RS, RD) _ALUWrr(X86_AND, RS, RD) +#define ANDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDWir(IM, RD) _ALUWir(X86_AND, IM, RD) +#define ANDWim(IM, MD, MB, MI, MS) _ALUWim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDLrr(RS, RD) _ALULrr(X86_AND, RS, RD) +#define ANDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDLir(IM, RD) _ALULir(X86_AND, IM, RD) +#define ANDLim(IM, MD, MB, MI, MS) _ALULim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDQrr(RS, RD) _ALUQrr(X86_AND, RS, RD) +#define ANDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDQir(IM, RD) _ALUQir(X86_AND, IM, RD) +#define ANDQim(IM, MD, MB, MI, MS) _ALUQim(X86_AND, IM, MD, MB, MI, MS) + +#define CMPBrr(RS, RD) _ALUBrr(X86_CMP, RS, RD) +#define CMPBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPBir(IM, RD) _ALUBir(X86_CMP, IM, RD) +#define CMPBim(IM, MD, MB, MI, MS) _ALUBim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPWrr(RS, RD) _ALUWrr(X86_CMP, RS, RD) +#define CMPWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPWir(IM, RD) _ALUWir(X86_CMP, IM, RD) +#define CMPWim(IM, MD, MB, MI, MS) _ALUWim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPLrr(RS, RD) _ALULrr(X86_CMP, RS, RD) +#define CMPLmr(MD, MB, MI, MS, RD) _ALULmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPLrm(RS, MD, MB, MI, MS) _ALULrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPLir(IM, RD) _ALULir(X86_CMP, IM, RD) +#define CMPLim(IM, MD, MB, MI, MS) _ALULim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPQrr(RS, RD) _ALUQrr(X86_CMP, RS, RD) +#define CMPQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPQir(IM, RD) _ALUQir(X86_CMP, IM, RD) +#define CMPQim(IM, MD, MB, MI, MS) _ALUQim(X86_CMP, IM, MD, MB, MI, MS) + +#define ORBrr(RS, RD) _ALUBrr(X86_OR, RS, RD) +#define ORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_OR, MD, MB, MI, MS, RD) +#define ORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_OR, RS, MD, MB, MI, MS) +#define ORBir(IM, RD) _ALUBir(X86_OR, IM, RD) +#define ORBim(IM, MD, MB, MI, MS) _ALUBim(X86_OR, IM, MD, MB, MI, MS) + +#define ORWrr(RS, RD) _ALUWrr(X86_OR, RS, RD) +#define ORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_OR, MD, MB, MI, MS, RD) +#define ORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_OR, RS, MD, MB, MI, MS) +#define ORWir(IM, RD) _ALUWir(X86_OR, IM, RD) +#define ORWim(IM, MD, MB, MI, MS) _ALUWim(X86_OR, IM, MD, MB, MI, MS) + +#define ORLrr(RS, RD) _ALULrr(X86_OR, RS, RD) +#define ORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_OR, MD, MB, MI, MS, RD) +#define ORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_OR, RS, MD, MB, MI, MS) +#define ORLir(IM, RD) _ALULir(X86_OR, IM, RD) +#define ORLim(IM, MD, MB, MI, MS) _ALULim(X86_OR, IM, MD, MB, MI, MS) + +#define ORQrr(RS, RD) _ALUQrr(X86_OR, RS, RD) +#define ORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_OR, MD, MB, MI, MS, RD) +#define ORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_OR, RS, MD, MB, MI, MS) +#define ORQir(IM, RD) _ALUQir(X86_OR, IM, RD) +#define ORQim(IM, MD, MB, MI, MS) _ALUQim(X86_OR, IM, MD, MB, MI, MS) + +#define SBBBrr(RS, RD) _ALUBrr(X86_SBB, RS, RD) +#define SBBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBBir(IM, RD) _ALUBir(X86_SBB, IM, RD) +#define SBBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBWrr(RS, RD) _ALUWrr(X86_SBB, RS, RD) +#define SBBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBWir(IM, RD) _ALUWir(X86_SBB, IM, RD) +#define SBBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBLrr(RS, RD) _ALULrr(X86_SBB, RS, RD) +#define SBBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBLir(IM, RD) _ALULir(X86_SBB, IM, RD) +#define SBBLim(IM, MD, MB, MI, MS) _ALULim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBQrr(RS, RD) _ALUQrr(X86_SBB, RS, RD) +#define SBBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBQir(IM, RD) _ALUQir(X86_SBB, IM, RD) +#define SBBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SBB, IM, MD, MB, MI, MS) + +#define SUBBrr(RS, RD) _ALUBrr(X86_SUB, RS, RD) +#define SUBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBBir(IM, RD) _ALUBir(X86_SUB, IM, RD) +#define SUBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBWrr(RS, RD) _ALUWrr(X86_SUB, RS, RD) +#define SUBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBWir(IM, RD) _ALUWir(X86_SUB, IM, RD) +#define SUBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBLrr(RS, RD) _ALULrr(X86_SUB, RS, RD) +#define SUBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBLir(IM, RD) _ALULir(X86_SUB, IM, RD) +#define SUBLim(IM, MD, MB, MI, MS) _ALULim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBQrr(RS, RD) _ALUQrr(X86_SUB, RS, RD) +#define SUBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBQir(IM, RD) _ALUQir(X86_SUB, IM, RD) +#define SUBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SUB, IM, MD, MB, MI, MS) + +#define XORBrr(RS, RD) _ALUBrr(X86_XOR, RS, RD) +#define XORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORBir(IM, RD) _ALUBir(X86_XOR, IM, RD) +#define XORBim(IM, MD, MB, MI, MS) _ALUBim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORWrr(RS, RD) _ALUWrr(X86_XOR, RS, RD) +#define XORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORWir(IM, RD) _ALUWir(X86_XOR, IM, RD) +#define XORWim(IM, MD, MB, MI, MS) _ALUWim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORLrr(RS, RD) _ALULrr(X86_XOR, RS, RD) +#define XORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORLir(IM, RD) _ALULir(X86_XOR, IM, RD) +#define XORLim(IM, MD, MB, MI, MS) _ALULim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORQrr(RS, RD) _ALUQrr(X86_XOR, RS, RD) +#define XORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORQir(IM, RD) _ALUQir(X86_XOR, IM, RD) +#define XORQim(IM, MD, MB, MI, MS) _ALUQim(X86_XOR, IM, MD, MB, MI, MS) + + +/* --- Shift/Rotate instructions ------------------------------------------- */ + +enum { + X86_ROL = 0, + X86_ROR = 1, + X86_RCL = 2, + X86_RCR = 3, + X86_SHL = 4, + X86_SHR = 5, + X86_SAR = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ROTSHIBir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrr(0, RD), _O_Mrm (0xd0 ,_b11,OP,_r1(RD) )) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xc0 ,_b11,OP,_r1(RD) ,_u8(IM))) ) +#define _ROTSHIBim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrm(0, MB, MI), _O_r_X (0xd0 ,OP ,MD,MB,MI,MS )) : \ + (_REXBrm(0, MB, MI), _O_r_X_B (0xc0 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIBrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXBrr(RS, RD), _O_Mrm (0xd2 ,_b11,OP,_r1(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIBrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXBrm(RS, MB, MI), _O_r_X (0xd2 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIWir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r2(RD) ,_u8(IM))) ) +#define _ROTSHIWim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIWrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_d16(), _REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r2(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIWrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHILir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r4(RD) )) : \ + (_REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r4(RD) ,_u8(IM))) ) +#define _ROTSHILim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHILrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r4(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHILrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIQir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r8(RD) )) : \ + (_REXQrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r8(RD) ,_u8(IM))) ) +#define _ROTSHIQim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXQrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIQrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXQrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r8(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIQrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXQrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define ROLBir(IM, RD) _ROTSHIBir(X86_ROL, IM, RD) +#define ROLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLBrr(RS, RD) _ROTSHIBrr(X86_ROL, RS, RD) +#define ROLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLWir(IM, RD) _ROTSHIWir(X86_ROL, IM, RD) +#define ROLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLWrr(RS, RD) _ROTSHIWrr(X86_ROL, RS, RD) +#define ROLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLLir(IM, RD) _ROTSHILir(X86_ROL, IM, RD) +#define ROLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLLrr(RS, RD) _ROTSHILrr(X86_ROL, RS, RD) +#define ROLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLQir(IM, RD) _ROTSHIQir(X86_ROL, IM, RD) +#define ROLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLQrr(RS, RD) _ROTSHIQrr(X86_ROL, RS, RD) +#define ROLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROL, RS, MD, MB, MI, MS) + +#define RORBir(IM, RD) _ROTSHIBir(X86_ROR, IM, RD) +#define RORBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROR, IM, MD, MB, MI, MS) +#define RORBrr(RS, RD) _ROTSHIBrr(X86_ROR, RS, RD) +#define RORBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORWir(IM, RD) _ROTSHIWir(X86_ROR, IM, RD) +#define RORWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROR, IM, MD, MB, MI, MS) +#define RORWrr(RS, RD) _ROTSHIWrr(X86_ROR, RS, RD) +#define RORWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORLir(IM, RD) _ROTSHILir(X86_ROR, IM, RD) +#define RORLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROR, IM, MD, MB, MI, MS) +#define RORLrr(RS, RD) _ROTSHILrr(X86_ROR, RS, RD) +#define RORLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORQir(IM, RD) _ROTSHIQir(X86_ROR, IM, RD) +#define RORQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROR, IM, MD, MB, MI, MS) +#define RORQrr(RS, RD) _ROTSHIQrr(X86_ROR, RS, RD) +#define RORQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RCLBir(IM, RD) _ROTSHIBir(X86_RCL, IM, RD) +#define RCLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLBrr(RS, RD) _ROTSHIBrr(X86_RCL, RS, RD) +#define RCLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLWir(IM, RD) _ROTSHIWir(X86_RCL, IM, RD) +#define RCLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLWrr(RS, RD) _ROTSHIWrr(X86_RCL, RS, RD) +#define RCLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLLir(IM, RD) _ROTSHILir(X86_RCL, IM, RD) +#define RCLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLLrr(RS, RD) _ROTSHILrr(X86_RCL, RS, RD) +#define RCLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLQir(IM, RD) _ROTSHIQir(X86_RCL, IM, RD) +#define RCLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLQrr(RS, RD) _ROTSHIQrr(X86_RCL, RS, RD) +#define RCLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCRBir(IM, RD) _ROTSHIBir(X86_RCR, IM, RD) +#define RCRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRBrr(RS, RD) _ROTSHIBrr(X86_RCR, RS, RD) +#define RCRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRWir(IM, RD) _ROTSHIWir(X86_RCR, IM, RD) +#define RCRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRWrr(RS, RD) _ROTSHIWrr(X86_RCR, RS, RD) +#define RCRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRLir(IM, RD) _ROTSHILir(X86_RCR, IM, RD) +#define RCRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRLrr(RS, RD) _ROTSHILrr(X86_RCR, RS, RD) +#define RCRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRQir(IM, RD) _ROTSHIQir(X86_RCR, IM, RD) +#define RCRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRQrr(RS, RD) _ROTSHIQrr(X86_RCR, RS, RD) +#define RCRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCR, RS, MD, MB, MI, MS) + +#define SHLBir(IM, RD) _ROTSHIBir(X86_SHL, IM, RD) +#define SHLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLBrr(RS, RD) _ROTSHIBrr(X86_SHL, RS, RD) +#define SHLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLWir(IM, RD) _ROTSHIWir(X86_SHL, IM, RD) +#define SHLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLWrr(RS, RD) _ROTSHIWrr(X86_SHL, RS, RD) +#define SHLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLLir(IM, RD) _ROTSHILir(X86_SHL, IM, RD) +#define SHLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLLrr(RS, RD) _ROTSHILrr(X86_SHL, RS, RD) +#define SHLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLQir(IM, RD) _ROTSHIQir(X86_SHL, IM, RD) +#define SHLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLQrr(RS, RD) _ROTSHIQrr(X86_SHL, RS, RD) +#define SHLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHRBir(IM, RD) _ROTSHIBir(X86_SHR, IM, RD) +#define SHRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRBrr(RS, RD) _ROTSHIBrr(X86_SHR, RS, RD) +#define SHRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRWir(IM, RD) _ROTSHIWir(X86_SHR, IM, RD) +#define SHRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRWrr(RS, RD) _ROTSHIWrr(X86_SHR, RS, RD) +#define SHRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRLir(IM, RD) _ROTSHILir(X86_SHR, IM, RD) +#define SHRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRLrr(RS, RD) _ROTSHILrr(X86_SHR, RS, RD) +#define SHRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRQir(IM, RD) _ROTSHIQir(X86_SHR, IM, RD) +#define SHRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRQrr(RS, RD) _ROTSHIQrr(X86_SHR, RS, RD) +#define SHRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SALBir SHLBir +#define SALBim SHLBim +#define SALBrr SHLBrr +#define SALBrm SHLBrm + +#define SALWir SHLWir +#define SALWim SHLWim +#define SALWrr SHLWrr +#define SALWrm SHLWrm + +#define SALLir SHLLir +#define SALLim SHLLim +#define SALLrr SHLLrr +#define SALLrm SHLLrm + +#define SALQir SHLQir +#define SALQim SHLQim +#define SALQrr SHLQrr +#define SALQrm SHLQrm + +#define SARBir(IM, RD) _ROTSHIBir(X86_SAR, IM, RD) +#define SARBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SAR, IM, MD, MB, MI, MS) +#define SARBrr(RS, RD) _ROTSHIBrr(X86_SAR, RS, RD) +#define SARBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARWir(IM, RD) _ROTSHIWir(X86_SAR, IM, RD) +#define SARWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SAR, IM, MD, MB, MI, MS) +#define SARWrr(RS, RD) _ROTSHIWrr(X86_SAR, RS, RD) +#define SARWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARLir(IM, RD) _ROTSHILir(X86_SAR, IM, RD) +#define SARLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SAR, IM, MD, MB, MI, MS) +#define SARLrr(RS, RD) _ROTSHILrr(X86_SAR, RS, RD) +#define SARLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARQir(IM, RD) _ROTSHIQir(X86_SAR, IM, RD) +#define SARQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SAR, IM, MD, MB, MI, MS) +#define SARQrr(RS, RD) _ROTSHIQrr(X86_SAR, RS, RD) +#define SARQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SAR, RS, MD, MB, MI, MS) + + +/* --- Bit test instructions ----------------------------------------------- */ + +enum { + X86_BT = 4, + X86_BTS = 5, + X86_BTR = 6, + X86_BTC = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _BTWir(OP, IM, RD) (_d16(), _REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r2(RD) ,_u8(IM))) +#define _BTWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r2(RS),_r2(RD) )) +#define _BTWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r2(RS) ,MD,MB,MI,MS )) + +#define _BTLir(OP, IM, RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r4(RD) ,_u8(IM))) +#define _BTLim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTLrr(OP, RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r4(RS),_r4(RD) )) +#define _BTLrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r4(RS) ,MD,MB,MI,MS )) + +#define _BTQir(OP, IM, RD) (_REXQrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r8(RD) ,_u8(IM))) +#define _BTQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTQrr(OP, RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r8(RS),_r8(RD) )) +#define _BTQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r8(RS) ,MD,MB,MI,MS )) + +#define BTWir(IM, RD) _BTWir(X86_BT, IM, RD) +#define BTWim(IM, MD, MB, MI, MS) _BTWim(X86_BT, IM, MD, MB, MI, MS) +#define BTWrr(RS, RD) _BTWrr(X86_BT, RS, RD) +#define BTWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTLir(IM, RD) _BTLir(X86_BT, IM, RD) +#define BTLim(IM, MD, MB, MI, MS) _BTLim(X86_BT, IM, MD, MB, MI, MS) +#define BTLrr(RS, RD) _BTLrr(X86_BT, RS, RD) +#define BTLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTQir(IM, RD) _BTQir(X86_BT, IM, RD) +#define BTQim(IM, MD, MB, MI, MS) _BTQim(X86_BT, IM, MD, MB, MI, MS) +#define BTQrr(RS, RD) _BTQrr(X86_BT, RS, RD) +#define BTQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTCWir(IM, RD) _BTWir(X86_BTC, IM, RD) +#define BTCWim(IM, MD, MB, MI, MS) _BTWim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCWrr(RS, RD) _BTWrr(X86_BTC, RS, RD) +#define BTCWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCLir(IM, RD) _BTLir(X86_BTC, IM, RD) +#define BTCLim(IM, MD, MB, MI, MS) _BTLim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCLrr(RS, RD) _BTLrr(X86_BTC, RS, RD) +#define BTCLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCQir(IM, RD) _BTQir(X86_BTC, IM, RD) +#define BTCQim(IM, MD, MB, MI, MS) _BTQim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCQrr(RS, RD) _BTQrr(X86_BTC, RS, RD) +#define BTCQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTRWir(IM, RD) _BTWir(X86_BTR, IM, RD) +#define BTRWim(IM, MD, MB, MI, MS) _BTWim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRWrr(RS, RD) _BTWrr(X86_BTR, RS, RD) +#define BTRWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRLir(IM, RD) _BTLir(X86_BTR, IM, RD) +#define BTRLim(IM, MD, MB, MI, MS) _BTLim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRLrr(RS, RD) _BTLrr(X86_BTR, RS, RD) +#define BTRLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRQir(IM, RD) _BTQir(X86_BTR, IM, RD) +#define BTRQim(IM, MD, MB, MI, MS) _BTQim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRQrr(RS, RD) _BTQrr(X86_BTR, RS, RD) +#define BTRQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTSWir(IM, RD) _BTWir(X86_BTS, IM, RD) +#define BTSWim(IM, MD, MB, MI, MS) _BTWim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSWrr(RS, RD) _BTWrr(X86_BTS, RS, RD) +#define BTSWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSLir(IM, RD) _BTLir(X86_BTS, IM, RD) +#define BTSLim(IM, MD, MB, MI, MS) _BTLim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSLrr(RS, RD) _BTLrr(X86_BTS, RS, RD) +#define BTSLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSQir(IM, RD) _BTQir(X86_BTS, IM, RD) +#define BTSQim(IM, MD, MB, MI, MS) _BTQim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSQrr(RS, RD) _BTQrr(X86_BTS, RS, RD) +#define BTSQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTS, RS, MD, MB, MI, MS) + + +/* --- Move instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x88 ,_b11,_r1(RS),_r1(RD) )) +#define MOVBmr(MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (0x8a ,_r1(RD) ,MD,MB,MI,MS )) +#define MOVBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x88 ,_r1(RS) ,MD,MB,MI,MS )) +#define MOVBir(IM, R) (_REXBrr(0, R), _Or_B (0xb0,_r1(R) ,_su8(IM))) +#define MOVBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_X_B (0xc6 ,MD,MB,MI,MS ,_su8(IM))) + +#define MOVWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r2(RS),_r2(RD) )) +#define MOVWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r2(RS) ,MD,MB,MI,MS )) +#define MOVWir(IM, R) (_d16(), _REXLrr(0, R), _Or_W (0xb8,_r2(R) ,_su16(IM))) +#define MOVWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_X_W (0xc7 ,MD,MB,MI,MS ,_su16(IM))) + +#define MOVLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r4(RS),_r4(RD) )) +#define MOVLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r4(RS) ,MD,MB,MI,MS )) +#define MOVLir(IM, R) (_REXLrr(0, R), _Or_L (0xb8,_r4(R) ,IM )) +#define MOVLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + +#define MOVQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x89 ,_b11,_r8(RS),_r8(RD) )) +#define MOVQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8b ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x89 ,_r8(RS) ,MD,MB,MI,MS )) +#define MOVQir(IM, R) (_REXQrr(0, R), _Or_Q (0xb8,_r8(R) ,IM )) +#define MOVQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + + +/* --- Unary and Multiply/Divide instructions ------------------------------ */ + +enum { + X86_NOT = 2, + X86_NEG = 3, + X86_MUL = 4, + X86_IMUL = 5, + X86_DIV = 6, + X86_IDIV = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _UNARYBr(OP, RS) (_REXBrr(0, RS), _O_Mrm (0xf6 ,_b11,OP ,_r1(RS) )) +#define _UNARYBm(OP, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xf6 ,OP ,MD,MB,MI,MS )) +#define _UNARYWr(OP, RS) (_d16(), _REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r2(RS) )) +#define _UNARYWm(OP, MD, MB, MI, MS) (_d16(), _REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYLr(OP, RS) (_REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r4(RS) )) +#define _UNARYLm(OP, MD, MB, MI, MS) (_REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYQr(OP, RS) (_REXQrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r8(RS) )) +#define _UNARYQm(OP, MD, MB, MI, MS) (_REXQmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) + +#define NOTBr(RS) _UNARYBr(X86_NOT, RS) +#define NOTBm(MD, MB, MI, MS) _UNARYBm(X86_NOT, MD, MB, MI, MS) +#define NOTWr(RS) _UNARYWr(X86_NOT, RS) +#define NOTWm(MD, MB, MI, MS) _UNARYWm(X86_NOT, MD, MB, MI, MS) +#define NOTLr(RS) _UNARYLr(X86_NOT, RS) +#define NOTLm(MD, MB, MI, MS) _UNARYLm(X86_NOT, MD, MB, MI, MS) +#define NOTQr(RS) _UNARYQr(X86_NOT, RS) +#define NOTQm(MD, MB, MI, MS) _UNARYQm(X86_NOT, MD, MB, MI, MS) + +#define NEGBr(RS) _UNARYBr(X86_NEG, RS) +#define NEGBm(MD, MB, MI, MS) _UNARYBm(X86_NEG, MD, MB, MI, MS) +#define NEGWr(RS) _UNARYWr(X86_NEG, RS) +#define NEGWm(MD, MB, MI, MS) _UNARYWm(X86_NEG, MD, MB, MI, MS) +#define NEGLr(RS) _UNARYLr(X86_NEG, RS) +#define NEGLm(MD, MB, MI, MS) _UNARYLm(X86_NEG, MD, MB, MI, MS) +#define NEGQr(RS) _UNARYQr(X86_NEG, RS) +#define NEGQm(MD, MB, MI, MS) _UNARYQm(X86_NEG, MD, MB, MI, MS) + +#define MULBr(RS) _UNARYBr(X86_MUL, RS) +#define MULBm(MD, MB, MI, MS) _UNARYBm(X86_MUL, MD, MB, MI, MS) +#define MULWr(RS) _UNARYWr(X86_MUL, RS) +#define MULWm(MD, MB, MI, MS) _UNARYWm(X86_MUL, MD, MB, MI, MS) +#define MULLr(RS) _UNARYLr(X86_MUL, RS) +#define MULLm(MD, MB, MI, MS) _UNARYLm(X86_MUL, MD, MB, MI, MS) +#define MULQr(RS) _UNARYQr(X86_MUL, RS) +#define MULQm(MD, MB, MI, MS) _UNARYQm(X86_MUL, MD, MB, MI, MS) + +#define IMULBr(RS) _UNARYBr(X86_IMUL, RS) +#define IMULBm(MD, MB, MI, MS) _UNARYBm(X86_IMUL, MD, MB, MI, MS) +#define IMULWr(RS) _UNARYWr(X86_IMUL, RS) +#define IMULWm(MD, MB, MI, MS) _UNARYWm(X86_IMUL, MD, MB, MI, MS) +#define IMULLr(RS) _UNARYLr(X86_IMUL, RS) +#define IMULLm(MD, MB, MI, MS) _UNARYLm(X86_IMUL, MD, MB, MI, MS) +#define IMULQr(RS) _UNARYQr(X86_IMUL, RS) +#define IMULQm(MD, MB, MI, MS) _UNARYQm(X86_IMUL, MD, MB, MI, MS) + +#define DIVBr(RS) _UNARYBr(X86_DIV, RS) +#define DIVBm(MD, MB, MI, MS) _UNARYBm(X86_DIV, MD, MB, MI, MS) +#define DIVWr(RS) _UNARYWr(X86_DIV, RS) +#define DIVWm(MD, MB, MI, MS) _UNARYWm(X86_DIV, MD, MB, MI, MS) +#define DIVLr(RS) _UNARYLr(X86_DIV, RS) +#define DIVLm(MD, MB, MI, MS) _UNARYLm(X86_DIV, MD, MB, MI, MS) +#define DIVQr(RS) _UNARYQr(X86_DIV, RS) +#define DIVQm(MD, MB, MI, MS) _UNARYQm(X86_DIV, MD, MB, MI, MS) + +#define IDIVBr(RS) _UNARYBr(X86_IDIV, RS) +#define IDIVBm(MD, MB, MI, MS) _UNARYBm(X86_IDIV, MD, MB, MI, MS) +#define IDIVWr(RS) _UNARYWr(X86_IDIV, RS) +#define IDIVWm(MD, MB, MI, MS) _UNARYWm(X86_IDIV, MD, MB, MI, MS) +#define IDIVLr(RS) _UNARYLr(X86_IDIV, RS) +#define IDIVLm(MD, MB, MI, MS) _UNARYLm(X86_IDIV, MD, MB, MI, MS) +#define IDIVQr(RS) _UNARYQr(X86_IDIV, RS) +#define IDIVQm(MD, MB, MI, MS) _UNARYQm(X86_IDIV, MD, MB, MI, MS) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define IMULWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r2(RD),_r2(RS) )) +#define IMULWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r2(RD) ,MD,MB,MI,MS )) + +#define IMULWirr(IM,RS,RD) (_d16(), _REXLrr(RS, RD), _Os_Mrm_sW (0x69 ,_b11,_r2(RS),_r2(RD) ,_su16(IM) )) +#define IMULWimr(IM,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _Os_r_X_sW (0x69 ,_r2(RD) ,MD,MB,MI,MS ,_su16(IM) )) + +#define IMULLir(IM, RD) (_REXLrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RD),_r4(RD) ,IM )) +#define IMULLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r4(RD),_r4(RS) )) +#define IMULLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r4(RD) ,MD,MB,MI,MS )) + +#define IMULQir(IM, RD) (_REXQrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RD),_r8(RD) ,IM )) +#define IMULQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r8(RD),_r8(RS) )) +#define IMULQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0faf ,_r8(RD) ,MD,MB,MI,MS )) + +#define IMULLirr(IM,RS,RD) (_REXLrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RS),_r4(RD) ,IM )) +#define IMULLimr(IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r4(RD) ,MD,MB,MI,MS ,IM )) + +#define IMULQirr(IM,RS,RD) (_REXQrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RS),_r8(RD) ,IM )) +#define IMULQimr(IM,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r8(RD) ,MD,MB,MI,MS ,IM )) + + +/* --- Control Flow related instructions ----------------------------------- */ + +enum { + X86_CC_O = 0x0, + X86_CC_NO = 0x1, + X86_CC_NAE = 0x2, + X86_CC_B = 0x2, + X86_CC_C = 0x2, + X86_CC_AE = 0x3, + X86_CC_NB = 0x3, + X86_CC_NC = 0x3, + X86_CC_E = 0x4, + X86_CC_Z = 0x4, + X86_CC_NE = 0x5, + X86_CC_NZ = 0x5, + X86_CC_BE = 0x6, + X86_CC_NA = 0x6, + X86_CC_A = 0x7, + X86_CC_NBE = 0x7, + X86_CC_S = 0x8, + X86_CC_NS = 0x9, + X86_CC_P = 0xa, + X86_CC_PE = 0xa, + X86_CC_NP = 0xb, + X86_CC_PO = 0xb, + X86_CC_L = 0xc, + X86_CC_NGE = 0xc, + X86_CC_GE = 0xd, + X86_CC_NL = 0xd, + X86_CC_LE = 0xe, + X86_CC_NG = 0xe, + X86_CC_G = 0xf, + X86_CC_NLE = 0xf, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define CALLm(M) _O_D32 (0xe8 ,(int)(M) ) +#define _CALLLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r4(R) )) +#define _CALLQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r8(R) )) +#define CALLsr(R) ( X86_TARGET_64BIT ? _CALLQsr(R) : _CALLLsr(R)) +#define CALLsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b010 ,(int)(D),B,I,S )) + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define JMPSm(M) _O_D8 (0xeb ,(int)(M) ) +#define JMPm(M) _O_D32 (0xe9 ,(int)(M) ) +#define _JMPLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r4(R) )) +#define _JMPQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r8(R) )) +#define JMPsr(R) ( X86_TARGET_64BIT ? _JMPQsr(R) : _JMPLsr(R)) +#define JMPsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b100 ,(int)(D),B,I,S )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCSii(CC, D) _O_B (0x70|(CC) ,(_sc)(int)(D) ) +#define JCCSim(CC, D) _O_D8 (0x70|(CC) ,(int)(D) ) +#define JOSm(D) JCCSim(X86_CC_O, D) +#define JNOSm(D) JCCSim(X86_CC_NO, D) +#define JBSm(D) JCCSim(X86_CC_B, D) +#define JNAESm(D) JCCSim(X86_CC_NAE, D) +#define JNBSm(D) JCCSim(X86_CC_NB, D) +#define JAESm(D) JCCSim(X86_CC_AE, D) +#define JESm(D) JCCSim(X86_CC_E, D) +#define JZSm(D) JCCSim(X86_CC_Z, D) +#define JNESm(D) JCCSim(X86_CC_NE, D) +#define JNZSm(D) JCCSim(X86_CC_NZ, D) +#define JBESm(D) JCCSim(X86_CC_BE, D) +#define JNASm(D) JCCSim(X86_CC_NA, D) +#define JNBESm(D) JCCSim(X86_CC_NBE, D) +#define JASm(D) JCCSim(X86_CC_A, D) +#define JSSm(D) JCCSim(X86_CC_S, D) +#define JNSSm(D) JCCSim(X86_CC_NS, D) +#define JPSm(D) JCCSim(X86_CC_P, D) +#define JPESm(D) JCCSim(X86_CC_PE, D) +#define JNPSm(D) JCCSim(X86_CC_NP, D) +#define JPOSm(D) JCCSim(X86_CC_PO, D) +#define JLSm(D) JCCSim(X86_CC_L, D) +#define JNGESm(D) JCCSim(X86_CC_NGE, D) +#define JNLSm(D) JCCSim(X86_CC_NL, D) +#define JGESm(D) JCCSim(X86_CC_GE, D) +#define JLESm(D) JCCSim(X86_CC_LE, D) +#define JNGSm(D) JCCSim(X86_CC_NG, D) +#define JNLESm(D) JCCSim(X86_CC_NLE, D) +#define JGSm(D) JCCSim(X86_CC_G, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCii(CC, D) _OO_L (0x0f80|(CC) ,(int)(D) ) +#define JCCim(CC, D) _OO_D32 (0x0f80|(CC) ,(int)(D) ) +#define JOm(D) JCCim(X86_CC_O, D) +#define JNOm(D) JCCim(X86_CC_NO, D) +#define JBm(D) JCCim(X86_CC_B, D) +#define JNAEm(D) JCCim(X86_CC_NAE, D) +#define JNBm(D) JCCim(X86_CC_NB, D) +#define JAEm(D) JCCim(X86_CC_AE, D) +#define JEm(D) JCCim(X86_CC_E, D) +#define JZm(D) JCCim(X86_CC_Z, D) +#define JNEm(D) JCCim(X86_CC_NE, D) +#define JNZm(D) JCCim(X86_CC_NZ, D) +#define JBEm(D) JCCim(X86_CC_BE, D) +#define JNAm(D) JCCim(X86_CC_NA, D) +#define JNBEm(D) JCCim(X86_CC_NBE, D) +#define JAm(D) JCCim(X86_CC_A, D) +#define JSm(D) JCCim(X86_CC_S, D) +#define JNSm(D) JCCim(X86_CC_NS, D) +#define JPm(D) JCCim(X86_CC_P, D) +#define JPEm(D) JCCim(X86_CC_PE, D) +#define JNPm(D) JCCim(X86_CC_NP, D) +#define JPOm(D) JCCim(X86_CC_PO, D) +#define JLm(D) JCCim(X86_CC_L, D) +#define JNGEm(D) JCCim(X86_CC_NGE, D) +#define JNLm(D) JCCim(X86_CC_NL, D) +#define JGEm(D) JCCim(X86_CC_GE, D) +#define JLEm(D) JCCim(X86_CC_LE, D) +#define JNGm(D) JCCim(X86_CC_NG, D) +#define JNLEm(D) JCCim(X86_CC_NLE, D) +#define JGm(D) JCCim(X86_CC_G, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCir(CC, RD) (_REXBrr(0, RD), _OO_Mrm (0x0f90|(CC) ,_b11,_b000,_r1(RD) )) +#define SETOr(RD) SETCCir(X86_CC_O, RD) +#define SETNOr(RD) SETCCir(X86_CC_NO, RD) +#define SETBr(RD) SETCCir(X86_CC_B, RD) +#define SETNAEr(RD) SETCCir(X86_CC_NAE, RD) +#define SETNBr(RD) SETCCir(X86_CC_NB, RD) +#define SETAEr(RD) SETCCir(X86_CC_AE, RD) +#define SETEr(RD) SETCCir(X86_CC_E, RD) +#define SETZr(RD) SETCCir(X86_CC_Z, RD) +#define SETNEr(RD) SETCCir(X86_CC_NE, RD) +#define SETNZr(RD) SETCCir(X86_CC_NZ, RD) +#define SETBEr(RD) SETCCir(X86_CC_BE, RD) +#define SETNAr(RD) SETCCir(X86_CC_NA, RD) +#define SETNBEr(RD) SETCCir(X86_CC_NBE, RD) +#define SETAr(RD) SETCCir(X86_CC_A, RD) +#define SETSr(RD) SETCCir(X86_CC_S, RD) +#define SETNSr(RD) SETCCir(X86_CC_NS, RD) +#define SETPr(RD) SETCCir(X86_CC_P, RD) +#define SETPEr(RD) SETCCir(X86_CC_PE, RD) +#define SETNPr(RD) SETCCir(X86_CC_NP, RD) +#define SETPOr(RD) SETCCir(X86_CC_PO, RD) +#define SETLr(RD) SETCCir(X86_CC_L, RD) +#define SETNGEr(RD) SETCCir(X86_CC_NGE, RD) +#define SETNLr(RD) SETCCir(X86_CC_NL, RD) +#define SETGEr(RD) SETCCir(X86_CC_GE, RD) +#define SETLEr(RD) SETCCir(X86_CC_LE, RD) +#define SETNGr(RD) SETCCir(X86_CC_NG, RD) +#define SETNLEr(RD) SETCCir(X86_CC_NLE, RD) +#define SETGr(RD) SETCCir(X86_CC_G, RD) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCim(CC,MD,MB,MI,MS) (_REXBrm(0, MB, MI), _OO_r_X (0x0f90|(CC) ,_b000 ,MD,MB,MI,MS )) +#define SETOm(D, B, I, S) SETCCim(X86_CC_O, D, B, I, S) +#define SETNOm(D, B, I, S) SETCCim(X86_CC_NO, D, B, I, S) +#define SETBm(D, B, I, S) SETCCim(X86_CC_B, D, B, I, S) +#define SETNAEm(D, B, I, S) SETCCim(X86_CC_NAE, D, B, I, S) +#define SETNBm(D, B, I, S) SETCCim(X86_CC_NB, D, B, I, S) +#define SETAEm(D, B, I, S) SETCCim(X86_CC_AE, D, B, I, S) +#define SETEm(D, B, I, S) SETCCim(X86_CC_E, D, B, I, S) +#define SETZm(D, B, I, S) SETCCim(X86_CC_Z, D, B, I, S) +#define SETNEm(D, B, I, S) SETCCim(X86_CC_NE, D, B, I, S) +#define SETNZm(D, B, I, S) SETCCim(X86_CC_NZ, D, B, I, S) +#define SETBEm(D, B, I, S) SETCCim(X86_CC_BE, D, B, I, S) +#define SETNAm(D, B, I, S) SETCCim(X86_CC_NA, D, B, I, S) +#define SETNBEm(D, B, I, S) SETCCim(X86_CC_NBE, D, B, I, S) +#define SETAm(D, B, I, S) SETCCim(X86_CC_A, D, B, I, S) +#define SETSm(D, B, I, S) SETCCim(X86_CC_S, D, B, I, S) +#define SETNSm(D, B, I, S) SETCCim(X86_CC_NS, D, B, I, S) +#define SETPm(D, B, I, S) SETCCim(X86_CC_P, D, B, I, S) +#define SETPEm(D, B, I, S) SETCCim(X86_CC_PE, D, B, I, S) +#define SETNPm(D, B, I, S) SETCCim(X86_CC_NP, D, B, I, S) +#define SETPOm(D, B, I, S) SETCCim(X86_CC_PO, D, B, I, S) +#define SETLm(D, B, I, S) SETCCim(X86_CC_L, D, B, I, S) +#define SETNGEm(D, B, I, S) SETCCim(X86_CC_NGE, D, B, I, S) +#define SETNLm(D, B, I, S) SETCCim(X86_CC_NL, D, B, I, S) +#define SETGEm(D, B, I, S) SETCCim(X86_CC_GE, D, B, I, S) +#define SETLEm(D, B, I, S) SETCCim(X86_CC_LE, D, B, I, S) +#define SETNGm(D, B, I, S) SETCCim(X86_CC_NG, D, B, I, S) +#define SETNLEm(D, B, I, S) SETCCim(X86_CC_NLE, D, B, I, S) +#define SETGm(D, B, I, S) SETCCim(X86_CC_G, D, B, I, S) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define CMOVWrr(CC,RS,RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r2(RD),_r2(RS) )) +#define CMOVWmr(CC,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r2(RD) ,MD,MB,MI,MS )) +#define CMOVLrr(CC,RS,RD) (_REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r4(RD),_r4(RS) )) +#define CMOVLmr(CC,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r4(RD) ,MD,MB,MI,MS )) +#define CMOVQrr(CC,RS,RD) (_REXQrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r8(RD),_r8(RS) )) +#define CMOVQmr(CC,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r8(RD) ,MD,MB,MI,MS )) + + +/* --- Push/Pop instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define POPWr(RD) _m32only((_d16(), _Or (0x58,_r2(RD) ))) +#define POPWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define POPLr(RD) _m32only( _Or (0x58,_r4(RD) )) +#define POPLm(MD, MB, MI, MS) _m32only( _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS )) + +#define POPQr(RD) _m64only((_REXQr(RD), _Or (0x58,_r8(RD) ))) +#define POPQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define PUSHWr(RS) _m32only((_d16(), _Or (0x50,_r2(RS) ))) +#define PUSHWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0xff, ,_b110 ,MD,MB,MI,MS ))) +#define PUSHWi(IM) _m32only((_d16(), _Os_sW (0x68 ,IM ))) + +#define PUSHLr(RS) _m32only( _Or (0x50,_r4(RS) )) +#define PUSHLm(MD, MB, MI, MS) _m32only( _O_r_X (0xff ,_b110 ,MD,MB,MI,MS )) +#define PUSHLi(IM) _m32only( _Os_sL (0x68 ,IM )) + +#define PUSHQr(RS) _m64only((_REXQr(RS), _Or (0x50,_r8(RS) ))) +#define PUSHQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0xff ,_b110 ,MD,MB,MI,MS ))) +#define PUSHQi(IM) _m64only( _Os_sL (0x68 ,IM )) + +#define POPA() (_d16(), _O (0x61 )) +#define POPAD() _O (0x61 ) + +#define PUSHA() (_d16(), _O (0x60 )) +#define PUSHAD() _O (0x60 ) + +#define POPF() _O (0x9d ) +#define PUSHF() _O (0x9c ) + + +/* --- Test instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define TESTBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x84 ,_b11,_r1(RS),_r1(RD) )) +#define TESTBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x84 ,_r1(RS) ,MD,MB,MI,MS )) +#define TESTBir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (0xa8 ,_u8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xf6 ,_b11,_b000 ,_r1(RD) ,_u8(IM))) ) +#define TESTBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0xf6 ,_b000 ,MD,MB,MI,MS ,_u8(IM))) + +#define TESTWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r2(RS),_r2(RD) )) +#define TESTWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r2(RS) ,MD,MB,MI,MS )) +#define TESTWir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (0xa9 ,_u16(IM))) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_W (0xf7 ,_b11,_b000 ,_r2(RD) ,_u16(IM))) ) +#define TESTWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X_W (0xf7 ,_b000 ,MD,MB,MI,MS ,_u16(IM))) + +#define TESTLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r4(RS),_r4(RD) )) +#define TESTLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r4(RS) ,MD,MB,MI,MS )) +#define TESTLir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXLrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r4(RD) ,IM )) ) +#define TESTLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + +#define TESTQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x85 ,_b11,_r8(RS),_r8(RD) )) +#define TESTQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x85 ,_r8(RS) ,MD,MB,MI,MS )) +#define TESTQir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXQrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r8(RD) ,IM )) ) +#define TESTQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + + +/* --- Exchange instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CMPXCHGBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fb0 ,_b11,_r1(RS),_r1(RD) )) +#define CMPXCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fb0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r2(RS),_r2(RD) )) +#define CMPXCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r4(RS),_r4(RD) )) +#define CMPXCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r8(RS),_r8(RD) )) +#define CMPXCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XADDBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fc0 ,_b11,_r1(RS),_r1(RD) )) +#define XADDBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fc0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XADDWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r2(RS),_r2(RD) )) +#define XADDWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XADDLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r4(RS),_r4(RD) )) +#define XADDLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XADDQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r8(RS),_r8(RD) )) +#define XADDQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XCHGBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x86 ,_b11,_r1(RS),_r1(RD) )) +#define XCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x86 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r2(RS),_r2(RD) )) +#define XCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XCHGLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r4(RS),_r4(RD) )) +#define XCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XCHGQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x87 ,_b11,_r8(RS),_r8(RD) )) +#define XCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x87 ,_r8(RS) ,MD,MB,MI,MS )) + + +/* --- Increment/Decrement instructions ------------------------------------ */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define DECBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b001 ,MD,MB,MI,MS )) +#define DECBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b001 ,_r1(RD) )) + +#define DECWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x48,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r2(RD) ))) + +#define DECLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECLr(RD) (! X86_TARGET_64BIT ? _Or (0x48,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r4(RD) ))) + +#define DECQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r8(RD) )) + +#define INCBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b000 ,MD,MB,MI,MS )) +#define INCBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b000 ,_r1(RD) )) + +#define INCWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x40,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r2(RD) )) ) + +#define INCLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCLr(RD) (! X86_TARGET_64BIT ? _Or (0x40,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r4(RD) ))) + +#define INCQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r8(RD) )) + + +/* --- Misc instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define BSFWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r2(RD),_r2(RS) )) +#define BSFWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r2(RD) ,MD,MB,MI,MS )) +#define BSRWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r2(RD),_r2(RS) )) +#define BSRWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r2(RD) ,MD,MB,MI,MS )) + +#define BSFLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r4(RD),_r4(RS) )) +#define BSFLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r4(RD) ,MD,MB,MI,MS )) +#define BSRLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r4(RD),_r4(RS) )) +#define BSRLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSFQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r8(RD),_r8(RS) )) +#define BSFQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r8(RD) ,MD,MB,MI,MS )) +#define BSRQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r8(RD),_r8(RS) )) +#define BSRQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r8(RD) ,MD,MB,MI,MS )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVSBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r2(RD),_r1(RS) )) +#define MOVSBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVZBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r2(RD),_r1(RS) )) +#define MOVZBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r2(RD) ,MD,MB,MI,MS )) + +#define MOVSBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r4(RD),_r1(RS) )) +#define MOVSBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r4(RD),_r1(RS) )) +#define MOVZBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r8(RD),_r1(RS) )) +#define MOVSBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVZBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r8(RD),_r1(RS) )) +#define MOVZBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r8(RD) ,MD,MB,MI,MS )) + +#define MOVSWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r4(RD),_r2(RS) )) +#define MOVSWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r4(RD),_r2(RS) )) +#define MOVZWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r8(RD),_r2(RS) ))) +#define MOVSWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r8(RD) ,MD,MB,MI,MS ))) +#define MOVZWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r8(RD),_r2(RS) ))) +#define MOVZWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r8(RD) ,MD,MB,MI,MS ))) + +#define MOVSLQrr(RS, RD) _m64only((_REXQrr(RD, RS), _O_Mrm (0x63 ,_b11,_r8(RD),_r4(RS) ))) +#define MOVSLQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _O_r_X (0x63 ,_r8(RD) ,MD,MB,MI,MS ))) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define LEALmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) +#define LEAQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSWAPLr(R) (_REXLrr(0, R), _OOr (0x0fc8,_r4(R) )) +#define BSWAPQr(R) (_REXQrr(0, R), _OOr (0x0fc8,_r8(R) )) + +#define CLC() _O (0xf8 ) +#define STC() _O (0xf9 ) +#define CMC() _O (0xf5 ) + +#define CLD() _O (0xfc ) +#define STD() _O (0xfd ) + +#define CBTW() (_d16(), _O (0x98 )) +#define CWTL() _O (0x98 ) +#define CLTQ() _m64only(_REXQrr(0, 0), _O (0x98 )) + +#define CBW CBTW +#define CWDE CWTL +#define CDQE CLTQ + +#define CWTD() (_d16(), _O (0x99 )) +#define CLTD() _O (0x99 ) +#define CQTO() _m64only(_REXQrr(0, 0), _O (0x99 )) + +#define CWD CWTD +#define CDQ CLTD +#define CQO CQTO + +#define LAHF() _O (0x9f ) +#define SAHF() _O (0x9e ) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CPUID() _OO (0x0fa2 ) +#define RDTSC() _OO (0xff31 ) + +#define ENTERii(W, B) _O_W_B (0xc8 ,_su16(W),_su8(B)) + +#define LEAVE() _O (0xc9 ) +#define RET() _O (0xc3 ) +#define RETi(IM) _O_W (0xc2 ,_su16(IM)) + +#define NOP() _O (0x90 ) + + +/* --- Media 64-bit instructions ------------------------------------------- */ + +enum { + X86_MMX_PABSB = 0x1c, // 2P + X86_MMX_PABSW = 0x1d, // 2P + X86_MMX_PABSD = 0x1e, // 2P + X86_MMX_PACKSSWB = 0x63, + X86_MMX_PACKSSDW = 0x6b, + X86_MMX_PACKUSWB = 0x67, + X86_MMX_PADDB = 0xfc, + X86_MMX_PADDW = 0xfd, + X86_MMX_PADDD = 0xfe, + X86_MMX_PADDQ = 0xd4, + X86_MMX_PADDSB = 0xec, + X86_MMX_PADDSW = 0xed, + X86_MMX_PADDUSB = 0xdc, + X86_MMX_PADDUSW = 0xdd, + X86_MMX_PAND = 0xdb, + X86_MMX_PANDN = 0xdf, + X86_MMX_PAVGB = 0xe0, + X86_MMX_PAVGW = 0xe3, + X86_MMX_PCMPEQB = 0x74, + X86_MMX_PCMPEQW = 0x75, + X86_MMX_PCMPEQD = 0x76, + X86_MMX_PCMPGTB = 0x64, + X86_MMX_PCMPGTW = 0x65, + X86_MMX_PCMPGTD = 0x66, + X86_MMX_PEXTRW = 0xc5, // 64, /r ib + X86_MMX_PHADDW = 0x01, // 2P + X86_MMX_PHADDD = 0x02, // 2P + X86_MMX_PHADDSW = 0x03, // 2P + X86_MMX_PHSUBW = 0x05, // 2P + X86_MMX_PHSUBD = 0x06, // 2P + X86_MMX_PHSUBSW = 0x07, // 2P + X86_MMX_PINSRW = 0xc4, // 64, /r ib + X86_MMX_PMADDUBSW = 0x04, // 2P + X86_MMX_PMADDWD = 0xf5, + X86_MMX_PMAXSW = 0xee, + X86_MMX_PMAXUB = 0xde, + X86_MMX_PMINSW = 0xea, + X86_MMX_PMINUB = 0xda, + X86_MMX_PMOVMSKB = 0xd7, // 64 + X86_MMX_PMULHRSW = 0x0b, // 2P + X86_MMX_PMULHUW = 0xe4, + X86_MMX_PMULHW = 0xe5, + X86_MMX_PMULLW = 0xd5, + X86_MMX_PMULUDQ = 0xf4, + X86_MMX_POR = 0xeb, + X86_MMX_PSADBW = 0xf6, + X86_MMX_PSHUFB = 0x00, // 2P + X86_MMX_PSHUFW = 0x70, // /r ib + X86_MMX_PSIGNB = 0x08, // 2P + X86_MMX_PSIGNW = 0x09, // 2P + X86_MMX_PSIGND = 0x0a, // 2P + X86_MMX_PSLLW = 0xf1, + X86_MMX_PSLLWi = 0x71, // /6 ib + X86_MMX_PSLLD = 0xf2, + X86_MMX_PSLLDi = 0x72, // /6 ib + X86_MMX_PSLLQ = 0xf3, + X86_MMX_PSLLQi = 0x73, // /6 ib + X86_MMX_PSRAW = 0xe1, + X86_MMX_PSRAWi = 0x71, // /4 ib + X86_MMX_PSRAD = 0xe2, + X86_MMX_PSRADi = 0x72, // /4 ib + X86_MMX_PSRLW = 0xd1, + X86_MMX_PSRLWi = 0x71, // /2 ib + X86_MMX_PSRLD = 0xd2, + X86_MMX_PSRLDi = 0x72, // /2 ib + X86_MMX_PSRLQ = 0xd3, + X86_MMX_PSRLQi = 0x73, // /2 ib + X86_MMX_PSUBB = 0xf8, + X86_MMX_PSUBW = 0xf9, + X86_MMX_PSUBD = 0xfa, + X86_MMX_PSUBQ = 0xfb, + X86_MMX_PSUBSB = 0xe8, + X86_MMX_PSUBSW = 0xe9, + X86_MMX_PSUBUSB = 0xd8, + X86_MMX_PSUBUSW = 0xd9, + X86_MMX_PUNPCKHBW = 0x68, + X86_MMX_PUNPCKHWD = 0x69, + X86_MMX_PUNPCKHDQ = 0x6a, + X86_MMX_PUNPCKLBW = 0x60, + X86_MMX_PUNPCKLWD = 0x61, + X86_MMX_PUNPCKLDQ = 0x62, + X86_MMX_PXOR = 0xef, +}; + +#define __MMXLrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMXLmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMXLrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __MMXLirr(OP,IM,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) +#define __MMXLimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) +#define __MMXQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMXQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMXQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __MMXQirr(OP,IM,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) +#define __MMXQimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) +#define __MMX1Lrr(PX,OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _B(0x0f),_OO_Mrm(((PX)<<8)|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMX1Lmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMX1Lrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define _MMXLrr(OP,RS,RD) __MMXLrr(OP,RS,_rM,RD,_rM) +#define _MMXLmr(OP,MD,MB,MI,MS,RD) __MMXLmr(OP,MD,MB,MI,MS,RD,_rM) +#define _MMXLrm(OP,RS,MD,MB,MI,MS) __MMXLrm(OP,RS,_rM,MD,MB,MI,MS) +#define _MMXQrr(OP,RS,RD) __MMXQrr(OP,RS,_rM,RD,_rM) +#define _MMXQmr(OP,MD,MB,MI,MS,RD) __MMXQmr(OP,MD,MB,MI,MS,RD,_rM) +#define _MMXQrm(OP,RS,MD,MB,MI,MS) __MMXQrm(OP,RS,_rM,MD,MB,MI,MS) +#define _2P_MMXLrr(OP,RS,RD) __MMX1Lrr(0x38, OP,RS,_rM,RD,_rM) +#define _2P_MMXLmr(OP,MD,MB,MI,MS,RD) __MMX1Lmr(0x38, OP,MD,MB,MI,MS,RD,_rM) +#define _2P_MMXLrm(OP,RS,MD,MB,MI,MS) __MMX1Lrm(0x38, OP,RS,_rM,MD,MB,MI,MS) + +#define MMX_MOVDMDrr(RS, RD) __MMXLrr(0x6e, RS,_r4, RD,_rM) +#define MMX_MOVQMDrr(RS, RD) __MMXQrr(0x6e, RS,_r8, RD,_rM) +#define MMX_MOVDMSrr(RS, RD) __MMXLrr(0x7e, RD,_r4, RS,_rM) +#define MMX_MOVQMSrr(RS, RD) __MMXQrr(0x7e, RD,_r8, RS,_rM) + +#define MMX_MOVDmr(MD, MB, MI, MS, RD) _MMXLmr(0x6e, MD, MB, MI, MS, RD) +#define MMX_MOVDrm(RS, MD, MB, MI, MS) _MMXLrm(0x7e, RS, MD, MB, MI, MS) +#define MMX_MOVQrr(RS, RD) _MMXLrr(0x6f, RS, RD) +#define MMX_MOVQmr(MD, MB, MI, MS, RD) _MMXLmr(0x6f, MD, MB, MI, MS, RD) +#define MMX_MOVQrm(RS, MD, MB, MI, MS) _MMXLrm(0x7f, RS, MD, MB, MI, MS) + +// Original MMX instructions +#define MMX_PACKSSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKSSWB,RS,RD) +#define MMX_PACKSSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSWB, MD, MB, MI, MS, RD) +#define MMX_PACKSSDWrr(RS, RD) _MMXLrr(X86_MMX_PACKSSDW,RS,RD) +#define MMX_PACKSSDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSDW, MD, MB, MI, MS, RD) +#define MMX_PACKUSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKUSWB,RS,RD) +#define MMX_PACKUSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKUSWB, MD, MB, MI, MS, RD) +#define MMX_PADDBrr(RS, RD) _MMXLrr(X86_MMX_PADDB,RS,RD) +#define MMX_PADDBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDB, MD, MB, MI, MS, RD) +#define MMX_PADDWrr(RS, RD) _MMXLrr(X86_MMX_PADDW,RS,RD) +#define MMX_PADDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDW, MD, MB, MI, MS, RD) +#define MMX_PADDDrr(RS, RD) _MMXLrr(X86_MMX_PADDD,RS,RD) +#define MMX_PADDDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDD, MD, MB, MI, MS, RD) +#define MMX_PADDQrr(RS, RD) _MMXLrr(X86_MMX_PADDQ,RS,RD) +#define MMX_PADDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDQ, MD, MB, MI, MS, RD) +#define MMX_PADDSBrr(RS, RD) _MMXLrr(X86_MMX_PADDSB,RS,RD) +#define MMX_PADDSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSB, MD, MB, MI, MS, RD) +#define MMX_PADDSWrr(RS, RD) _MMXLrr(X86_MMX_PADDSW,RS,RD) +#define MMX_PADDSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSW, MD, MB, MI, MS, RD) +#define MMX_PADDUSBrr(RS, RD) _MMXLrr(X86_MMX_PADDUSB,RS,RD) +#define MMX_PADDUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSB, MD, MB, MI, MS, RD) +#define MMX_PADDUSWrr(RS, RD) _MMXLrr(X86_MMX_PADDUSW,RS,RD) +#define MMX_PADDUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSW, MD, MB, MI, MS, RD) +#define MMX_PANDrr(RS, RD) _MMXLrr(X86_MMX_PAND,RS,RD) +#define MMX_PANDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAND, MD, MB, MI, MS, RD) +#define MMX_PANDNrr(RS, RD) _MMXLrr(X86_MMX_PANDN,RS,RD) +#define MMX_PANDNmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PANDN, MD, MB, MI, MS, RD) +#define MMX_PAVGBrr(RS, RD) _MMXLrr(X86_MMX_PAVGB,RS,RD) +#define MMX_PAVGBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGB, MD, MB, MI, MS, RD) +#define MMX_PAVGWrr(RS, RD) _MMXLrr(X86_MMX_PAVGW,RS,RD) +#define MMX_PAVGWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGW, MD, MB, MI, MS, RD) +#define MMX_PCMPEQBrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQB,RS,RD) +#define MMX_PCMPEQBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQB, MD, MB, MI, MS, RD) +#define MMX_PCMPEQWrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQW,RS,RD) +#define MMX_PCMPEQWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQW, MD, MB, MI, MS, RD) +#define MMX_PCMPEQDrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQD,RS,RD) +#define MMX_PCMPEQDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQD, MD, MB, MI, MS, RD) +#define MMX_PCMPGTBrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTB,RS,RD) +#define MMX_PCMPGTBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTB, MD, MB, MI, MS, RD) +#define MMX_PCMPGTWrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTW,RS,RD) +#define MMX_PCMPGTWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTW, MD, MB, MI, MS, RD) +#define MMX_PCMPGTDrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTD,RS,RD) +#define MMX_PCMPGTDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTD, MD, MB, MI, MS, RD) +#define MMX_PMADDWDrr(RS, RD) _MMXLrr(X86_MMX_PMADDWD,RS,RD) +#define MMX_PMADDWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMADDWD, MD, MB, MI, MS, RD) +#define MMX_PMAXSWrr(RS, RD) _MMXLrr(X86_MMX_PMAXSW,RS,RD) +#define MMX_PMAXSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXSW, MD, MB, MI, MS, RD) +#define MMX_PMAXUBrr(RS, RD) _MMXLrr(X86_MMX_PMAXUB,RS,RD) +#define MMX_PMAXUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXUB, MD, MB, MI, MS, RD) +#define MMX_PMINSWrr(RS, RD) _MMXLrr(X86_MMX_PMINSW,RS,RD) +#define MMX_PMINSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINSW, MD, MB, MI, MS, RD) +#define MMX_PMINUBrr(RS, RD) _MMXLrr(X86_MMX_PMINUB,RS,RD) +#define MMX_PMINUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINUB, MD, MB, MI, MS, RD) +#define MMX_PMULHUWrr(RS, RD) _MMXLrr(X86_MMX_PMULHUW,RS,RD) +#define MMX_PMULHUWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHUW, MD, MB, MI, MS, RD) +#define MMX_PMULHWrr(RS, RD) _MMXLrr(X86_MMX_PMULHW,RS,RD) +#define MMX_PMULHWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHW, MD, MB, MI, MS, RD) +#define MMX_PMULLWrr(RS, RD) _MMXLrr(X86_MMX_PMULLW,RS,RD) +#define MMX_PMULLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULLW, MD, MB, MI, MS, RD) +#define MMX_PMULUDQrr(RS, RD) _MMXLrr(X86_MMX_PMULUDQ,RS,RD) +#define MMX_PMULUDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULUDQ, MD, MB, MI, MS, RD) +#define MMX_PORrr(RS, RD) _MMXLrr(X86_MMX_POR,RS,RD) +#define MMX_PORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_POR, MD, MB, MI, MS, RD) +#define MMX_PSADBWrr(RS, RD) _MMXLrr(X86_MMX_PSADBW,RS,RD) +#define MMX_PSADBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSADBW, MD, MB, MI, MS, RD) +#define MMX_PSLLWir(IM, RD) __MMXLirr(X86_MMX_PSLLWi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLWrr(RS, RD) _MMXLrr(X86_MMX_PSLLW,RS,RD) +#define MMX_PSLLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLW, MD, MB, MI, MS, RD) +#define MMX_PSLLDir(IM, RD) __MMXLirr(X86_MMX_PSLLDi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLDrr(RS, RD) _MMXLrr(X86_MMX_PSLLD,RS,RD) +#define MMX_PSLLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLD, MD, MB, MI, MS, RD) +#define MMX_PSLLQir(IM, RD) __MMXLirr(X86_MMX_PSLLQi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLQrr(RS, RD) _MMXLrr(X86_MMX_PSLLQ,RS,RD) +#define MMX_PSLLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLQ, MD, MB, MI, MS, RD) +#define MMX_PSRAWir(IM, RD) __MMXLirr(X86_MMX_PSRAWi, IM, RD,_rM, _b100,_rN) +#define MMX_PSRAWrr(RS, RD) _MMXLrr(X86_MMX_PSRAW,RS,RD) +#define MMX_PSRAWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAW, MD, MB, MI, MS, RD) +#define MMX_PSRADir(IM, RD) __MMXLirr(X86_MMX_PSRADi, IM, RD,_rM, _b100,_rN) +#define MMX_PSRADrr(RS, RD) _MMXLrr(X86_MMX_PSRAD,RS,RD) +#define MMX_PSRADmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAD, MD, MB, MI, MS, RD) +#define MMX_PSRLWir(IM, RD) __MMXLirr(X86_MMX_PSRLWi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLWrr(RS, RD) _MMXLrr(X86_MMX_PSRLW,RS,RD) +#define MMX_PSRLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLW, MD, MB, MI, MS, RD) +#define MMX_PSRLDir(IM, RD) __MMXLirr(X86_MMX_PSRLDi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLDrr(RS, RD) _MMXLrr(X86_MMX_PSRLD,RS,RD) +#define MMX_PSRLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLD, MD, MB, MI, MS, RD) +#define MMX_PSRLQir(IM, RD) __MMXLirr(X86_MMX_PSRLQi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLQrr(RS, RD) _MMXLrr(X86_MMX_PSRLQ,RS,RD) +#define MMX_PSRLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLQ, MD, MB, MI, MS, RD) +#define MMX_PSUBBrr(RS, RD) _MMXLrr(X86_MMX_PSUBB,RS,RD) +#define MMX_PSUBBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBB, MD, MB, MI, MS, RD) +#define MMX_PSUBWrr(RS, RD) _MMXLrr(X86_MMX_PSUBW,RS,RD) +#define MMX_PSUBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBW, MD, MB, MI, MS, RD) +#define MMX_PSUBDrr(RS, RD) _MMXLrr(X86_MMX_PSUBD,RS,RD) +#define MMX_PSUBDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBD, MD, MB, MI, MS, RD) +#define MMX_PSUBQrr(RS, RD) _MMXLrr(X86_MMX_PSUBQ,RS,RD) +#define MMX_PSUBQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBQ, MD, MB, MI, MS, RD) +#define MMX_PSUBSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBSB,RS,RD) +#define MMX_PSUBSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSB, MD, MB, MI, MS, RD) +#define MMX_PSUBSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBSW,RS,RD) +#define MMX_PSUBSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSW, MD, MB, MI, MS, RD) +#define MMX_PSUBUSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSB,RS,RD) +#define MMX_PSUBUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSB, MD, MB, MI, MS, RD) +#define MMX_PSUBUSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSW,RS,RD) +#define MMX_PSUBUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHBW,RS,RD) +#define MMX_PUNPCKHBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHBW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHWD,RS,RD) +#define MMX_PUNPCKHWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHWD, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHDQ,RS,RD) +#define MMX_PUNPCKHDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHDQ, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLBW,RS,RD) +#define MMX_PUNPCKLBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLBW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLWD,RS,RD) +#define MMX_PUNPCKLWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLWD, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLDQ,RS,RD) +#define MMX_PUNPCKLDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLDQ, MD, MB, MI, MS, RD) +#define MMX_PXORrr(RS, RD) _MMXLrr(X86_MMX_PXOR,RS,RD) +#define MMX_PXORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PXOR, MD, MB, MI, MS, RD) + +#define MMX_PSHUFWirr(IM, RS, RD) __MMXLirr(X86_MMX_PSHUFW, IM, RS,_rM, RD,_rM) +#define MMX_PSHUFWimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PSHUFW, IM, MD, MB, MI, MS, RD,_rM) +#define MMX_PEXTRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r4) +#define MMX_PEXTRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r8) +#define MMX_PINSRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) +#define MMX_PINSRWLimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r4) +#define MMX_PINSRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) +#define MMX_PINSRWQimr(IM, MD, MB, MI, MS, RD) __MMXQimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r8) + +// Additionnal MMX instructions, brought by SSSE3 ISA +#define MMX_PABSBrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSB,RS,RD) +#define MMX_PABSBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSB, MD, MB, MI, MS, RD) +#define MMX_PABSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSW,RS,RD) +#define MMX_PABSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSW, MD, MB, MI, MS, RD) +#define MMX_PABSDrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSD,RS,RD) +#define MMX_PABSDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSD, MD, MB, MI, MS, RD) +#define MMX_PHADDWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDW,RS,RD) +#define MMX_PHADDWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDW, MD, MB, MI, MS, RD) +#define MMX_PHADDDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDD,RS,RD) +#define MMX_PHADDDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDD, MD, MB, MI, MS, RD) +#define MMX_PHADDSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDSW,RS,RD) +#define MMX_PHADDSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDSW, MD, MB, MI, MS, RD) +#define MMX_PHSUBWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBW,RS,RD) +#define MMX_PHSUBWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBW, MD, MB, MI, MS, RD) +#define MMX_PHSUBDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBD,RS,RD) +#define MMX_PHSUBDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBD, MD, MB, MI, MS, RD) +#define MMX_PHSUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBSW,RS,RD) +#define MMX_PHSUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBSW, MD, MB, MI, MS, RD) +#define MMX_PMADDUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMADDUBSW,RS,RD) +#define MMX_PMADDUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMADDUBSW, MD, MB, MI, MS, RD) +#define MMX_PMULHRSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMULHRSW,RS,RD) +#define MMX_PMULHRSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMULHRSW, MD, MB, MI, MS, RD) +#define MMX_PSHUFBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSHUFB,RS,RD) +#define MMX_PSHUFBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSHUFB, MD, MB, MI, MS, RD) +#define MMX_PSIGNBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNB,RS,RD) +#define MMX_PSIGNBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNB, MD, MB, MI, MS, RD) +#define MMX_PSIGNWrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNW,RS,RD) +#define MMX_PSIGNWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNW, MD, MB, MI, MS, RD) +#define MMX_PSIGNDrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGND,RS,RD) +#define MMX_PSIGNDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGND, MD, MB, MI, MS, RD) + +#define EMMS() _OO (0x0f77 ) + + +/* --- Media 128-bit instructions ------------------------------------------ */ + +enum { + X86_SSE_CC_EQ = 0, + X86_SSE_CC_LT = 1, + X86_SSE_CC_GT = 1, + X86_SSE_CC_LE = 2, + X86_SSE_CC_GE = 2, + X86_SSE_CC_U = 3, + X86_SSE_CC_NEQ = 4, + X86_SSE_CC_NLT = 5, + X86_SSE_CC_NGT = 5, + X86_SSE_CC_NLE = 6, + X86_SSE_CC_NGE = 6, + X86_SSE_CC_O = 7 +}; + +enum { + X86_SSE_UCOMI = 0x2e, + X86_SSE_COMI = 0x2f, + X86_SSE_CMP = 0xc2, + X86_SSE_SQRT = 0x51, + X86_SSE_RSQRT = 0x52, + X86_SSE_RCP = 0x53, + X86_SSE_AND = 0x54, + X86_SSE_ANDN = 0x55, + X86_SSE_OR = 0x56, + X86_SSE_XOR = 0x57, + X86_SSE_ADD = 0x58, + X86_SSE_MUL = 0x59, + X86_SSE_SUB = 0x5c, + X86_SSE_MIN = 0x5d, + X86_SSE_DIV = 0x5e, + X86_SSE_MAX = 0x5f, + X86_SSE_CVTDQ2PD = 0xe6, + X86_SSE_CVTDQ2PS = 0x5b, + X86_SSE_CVTPD2DQ = 0xe6, + X86_SSE_CVTPD2PI = 0x2d, + X86_SSE_CVTPD2PS = 0x5a, + X86_SSE_CVTPI2PD = 0x2a, + X86_SSE_CVTPI2PS = 0x2a, + X86_SSE_CVTPS2DQ = 0x5b, + X86_SSE_CVTPS2PD = 0x5a, + X86_SSE_CVTPS2PI = 0x2d, + X86_SSE_CVTSD2SI = 0x2d, + X86_SSE_CVTSD2SS = 0x5a, + X86_SSE_CVTSI2SD = 0x2a, + X86_SSE_CVTSI2SS = 0x2a, + X86_SSE_CVTSS2SD = 0x5a, + X86_SSE_CVTSS2SI = 0x2d, + X86_SSE_CVTTPD2PI = 0x2c, + X86_SSE_CVTTPD2DQ = 0xe6, + X86_SSE_CVTTPS2DQ = 0x5b, + X86_SSE_CVTTPS2PI = 0x2c, + X86_SSE_CVTTSD2SI = 0x2c, + X86_SSE_CVTTSS2SI = 0x2c, + X86_SSE_MOVMSK = 0x50, + X86_SSE_PACKSSDW = 0x6b, + X86_SSE_PACKSSWB = 0x63, + X86_SSE_PACKUSWB = 0x67, + X86_SSE_PADDB = 0xfc, + X86_SSE_PADDD = 0xfe, + X86_SSE_PADDQ = 0xd4, + X86_SSE_PADDSB = 0xec, + X86_SSE_PADDSW = 0xed, + X86_SSE_PADDUSB = 0xdc, + X86_SSE_PADDUSW = 0xdd, + X86_SSE_PADDW = 0xfd, + X86_SSE_PAND = 0xdb, + X86_SSE_PANDN = 0xdf, + X86_SSE_PAVGB = 0xe0, + X86_SSE_PAVGW = 0xe3, + X86_SSE_PCMPEQB = 0x74, + X86_SSE_PCMPEQD = 0x76, + X86_SSE_PCMPEQW = 0x75, + X86_SSE_PCMPGTB = 0x64, + X86_SSE_PCMPGTD = 0x66, + X86_SSE_PCMPGTW = 0x65, + X86_SSE_PMADDWD = 0xf5, + X86_SSE_PMAXSW = 0xee, + X86_SSE_PMAXUB = 0xde, + X86_SSE_PMINSW = 0xea, + X86_SSE_PMINUB = 0xda, + X86_SSE_PMOVMSKB = 0xd7, + X86_SSE_PMULHUW = 0xe4, + X86_SSE_PMULHW = 0xe5, + X86_SSE_PMULLW = 0xd5, + X86_SSE_PMULUDQ = 0xf4, + X86_SSE_POR = 0xeb, + X86_SSE_PSADBW = 0xf6, + X86_SSE_PSLLD = 0xf2, + X86_SSE_PSLLQ = 0xf3, + X86_SSE_PSLLW = 0xf1, + X86_SSE_PSRAD = 0xe2, + X86_SSE_PSRAW = 0xe1, + X86_SSE_PSRLD = 0xd2, + X86_SSE_PSRLQ = 0xd3, + X86_SSE_PSRLW = 0xd1, + X86_SSE_PSUBB = 0xf8, + X86_SSE_PSUBD = 0xfa, + X86_SSE_PSUBQ = 0xfb, + X86_SSE_PSUBSB = 0xe8, + X86_SSE_PSUBSW = 0xe9, + X86_SSE_PSUBUSB = 0xd8, + X86_SSE_PSUBUSW = 0xd9, + X86_SSE_PSUBW = 0xf9, + X86_SSE_PUNPCKHBW = 0x68, + X86_SSE_PUNPCKHDQ = 0x6a, + X86_SSE_PUNPCKHQDQ = 0x6d, + X86_SSE_PUNPCKHWD = 0x69, + X86_SSE_PUNPCKLBW = 0x60, + X86_SSE_PUNPCKLDQ = 0x62, + X86_SSE_PUNPCKLQDQ = 0x6c, + X86_SSE_PUNPCKLWD = 0x61, + X86_SSE_PXOR = 0xef, + X86_SSSE3_PSHUFB = 0x00, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _SSSE3Lrr(OP1,OP2,RS,RSA,RD,RDA) (_B(0x66), _REXLrr(RD,RD), _B(0x0f), _OO_Mrm (((OP1)<<8)|(OP2) ,_b11,RDA(RD),RSA(RS) )) +#define _SSSE3Lmr(OP1,OP2,MD,MB,MI,MS,RD,RDA) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X (((OP1)<<8)|(OP2) ,RDA(RD) ,MD,MB,MI,MS )) +#define _SSSE3Lirr(OP1,OP2,IM,RS,RD) (_B(0x66), _REXLrr(RD, RS), _B(0x0f), _OO_Mrm_B (((OP1)<<8)|(OP2) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) +#define _SSSE3Limr(OP1,OP2,IM,MD,MB,MI,MS,RD) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X_B (((OP1)<<8)|(OP2) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) + +#define __SSELir(OP,MO,IM,RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0f00|(OP) ,_b11,MO ,_rX(RD) ,_u8(IM))) +#define __SSELim(OP,MO,IM,MD,MB,MI,MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0f00|(OP) ,MO ,MD,MB,MI,MS ,_u8(IM))) +#define __SSELrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSELmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSELrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __SSELirr(OP,IM,RS,RD) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) +#define __SSELimr(OP,IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X_B (0x0f00|(OP) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) + +#define __SSEQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSEQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSEQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define _SSELrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSELrr(OP, RS, RSA, RD, RDA)) +#define _SSELmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSELmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSELrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSELrm(OP, RS, RSA, MD, MB, MI, MS)) +#define _SSELir(PX,OP,MO,IM,RD) (_B(PX), __SSELir(OP, MO, IM, RD)) +#define _SSELim(PX,OP,MO,IM,MD,MB,MI,MS) (_B(PX), __SSELim(OP, MO, IM, MD, MB, MI, MS)) +#define _SSELirr(PX,OP,IM,RS,RD) (_B(PX), __SSELirr(OP, IM, RS, RD)) +#define _SSELimr(PX,OP,IM,MD,MB,MI,MS,RD) (_B(PX), __SSELimr(OP, IM, MD, MB, MI, MS, RD)) + +#define _SSEQrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSEQrr(OP, RS, RSA, RD, RDA)) +#define _SSEQmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSEQmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSEQrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSEQrm(OP, RS, RSA, MD, MB, MI, MS)) + +#define _SSEPSrr(OP,RS,RD) __SSELrr( OP, RS,_rX, RD,_rX) +#define _SSEPSmr(OP,MD,MB,MI,MS,RD) __SSELmr( OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPSrm(OP,RS,MD,MB,MI,MS) __SSELrm( OP, RS,_rX, MD, MB, MI, MS) +#define _SSEPSirr(OP,IM,RS,RD) __SSELirr( OP, IM, RS, RD) +#define _SSEPSimr(OP,IM,MD,MB,MI,MS,RD) __SSELimr( OP, IM, MD, MB, MI, MS, RD) + +#define _SSEPDrr(OP,RS,RD) _SSELrr(0x66, OP, RS,_rX, RD,_rX) +#define _SSEPDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0x66, OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0x66, OP, RS,_rX, MD, MB, MI, MS) +#define _SSEPDirr(OP,IM,RS,RD) _SSELirr(0x66, OP, IM, RS, RD) +#define _SSEPDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0x66, OP, IM, MD, MB, MI, MS, RD) + +#define _SSESSrr(OP,RS,RD) _SSELrr(0xf3, OP, RS,_rX, RD,_rX) +#define _SSESSmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf3, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESSrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf3, OP, RS,_rX, MD, MB, MI, MS) +#define _SSESSirr(OP,IM,RS,RD) _SSELirr(0xf3, OP, IM, RS, RD) +#define _SSESSimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf3, OP, IM, MD, MB, MI, MS, RD) + +#define _SSESDrr(OP,RS,RD) _SSELrr(0xf2, OP, RS,_rX, RD,_rX) +#define _SSESDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf2, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf2, OP, RS,_rX, MD, MB, MI, MS) +#define _SSESDirr(OP,IM,RS,RD) _SSELirr(0xf2, OP, IM, RS, RD) +#define _SSESDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf2, OP, IM, MD, MB, MI, MS, RD) + +#define ADDPSrr(RS, RD) _SSEPSrr(X86_SSE_ADD, RS, RD) +#define ADDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDPDrr(RS, RD) _SSEPDrr(X86_SSE_ADD, RS, RD) +#define ADDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ADDSSrr(RS, RD) _SSESSrr(X86_SSE_ADD, RS, RD) +#define ADDSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDSDrr(RS, RD) _SSESDrr(X86_SSE_ADD, RS, RD) +#define ADDSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ANDNPSrr(RS, RD) _SSEPSrr(X86_SSE_ANDN, RS, RD) +#define ANDNPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) +#define ANDNPDrr(RS, RD) _SSEPDrr(X86_SSE_ANDN, RS, RD) +#define ANDNPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) + +#define ANDPSrr(RS, RD) _SSEPSrr(X86_SSE_AND, RS, RD) +#define ANDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_AND, MD, MB, MI, MS, RD) +#define ANDPDrr(RS, RD) _SSEPDrr(X86_SSE_AND, RS, RD) +#define ANDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_AND, MD, MB, MI, MS, RD) + +#define CMPPSrr(IM, RS, RD) _SSEPSirr(X86_SSE_CMP, IM, RS, RD) +#define CMPPSmr(IM, MD, MB, MI, MS, RD) _SSEPSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) +#define CMPPDrr(IM, RS, RD) _SSEPDirr(X86_SSE_CMP, IM, RS, RD) +#define CMPPDmr(IM, MD, MB, MI, MS, RD) _SSEPDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) + +#define CMPSSrr(IM, RS, RD) _SSESSirr(X86_SSE_CMP, IM, RS, RD) +#define CMPSSmr(IM, MD, MB, MI, MS, RD) _SSESSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) +#define CMPSDrr(IM, RS, RD) _SSESDirr(X86_SSE_CMP, IM, RS, RD) +#define CMPSDmr(IM, MD, MB, MI, MS, RD) _SSESDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) + +#define DIVPSrr(RS, RD) _SSEPSrr(X86_SSE_DIV, RS, RD) +#define DIVPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVPDrr(RS, RD) _SSEPDrr(X86_SSE_DIV, RS, RD) +#define DIVPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define DIVSSrr(RS, RD) _SSESSrr(X86_SSE_DIV, RS, RD) +#define DIVSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVSDrr(RS, RD) _SSESDrr(X86_SSE_DIV, RS, RD) +#define DIVSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define MAXPSrr(RS, RD) _SSEPSrr(X86_SSE_MAX, RS, RD) +#define MAXPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXPDrr(RS, RD) _SSEPDrr(X86_SSE_MAX, RS, RD) +#define MAXPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MAXSSrr(RS, RD) _SSESSrr(X86_SSE_MAX, RS, RD) +#define MAXSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXSDrr(RS, RD) _SSESDrr(X86_SSE_MAX, RS, RD) +#define MAXSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MINPSrr(RS, RD) _SSEPSrr(X86_SSE_MIN, RS, RD) +#define MINPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINPDrr(RS, RD) _SSEPDrr(X86_SSE_MIN, RS, RD) +#define MINPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MINSSrr(RS, RD) _SSESSrr(X86_SSE_MIN, RS, RD) +#define MINSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINSDrr(RS, RD) _SSESDrr(X86_SSE_MIN, RS, RD) +#define MINSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MULPSrr(RS, RD) _SSEPSrr(X86_SSE_MUL, RS, RD) +#define MULPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULPDrr(RS, RD) _SSEPDrr(X86_SSE_MUL, RS, RD) +#define MULPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define MULSSrr(RS, RD) _SSESSrr(X86_SSE_MUL, RS, RD) +#define MULSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULSDrr(RS, RD) _SSESDrr(X86_SSE_MUL, RS, RD) +#define MULSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define ORPSrr(RS, RD) _SSEPSrr(X86_SSE_OR, RS, RD) +#define ORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_OR, MD, MB, MI, MS, RD) +#define ORPDrr(RS, RD) _SSEPDrr(X86_SSE_OR, RS, RD) +#define ORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_OR, MD, MB, MI, MS, RD) + +#define RCPPSrr(RS, RD) _SSEPSrr(X86_SSE_RCP, RS, RD) +#define RCPPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) +#define RCPSSrr(RS, RD) _SSESSrr(X86_SSE_RCP, RS, RD) +#define RCPSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) + +#define RSQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) +#define RSQRTSSrr(RS, RD) _SSESSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) + +#define SQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_SQRT, RS, RD) +#define SQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTPDrr(RS, RD) _SSEPDrr(X86_SSE_SQRT, RS, RD) +#define SQRTPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SQRTSSrr(RS, RD) _SSESSrr(X86_SSE_SQRT, RS, RD) +#define SQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTSDrr(RS, RD) _SSESDrr(X86_SSE_SQRT, RS, RD) +#define SQRTSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SUBPSrr(RS, RD) _SSEPSrr(X86_SSE_SUB, RS, RD) +#define SUBPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBPDrr(RS, RD) _SSEPDrr(X86_SSE_SUB, RS, RD) +#define SUBPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define SUBSSrr(RS, RD) _SSESSrr(X86_SSE_SUB, RS, RD) +#define SUBSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBSDrr(RS, RD) _SSESDrr(X86_SSE_SUB, RS, RD) +#define SUBSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define XORPSrr(RS, RD) _SSEPSrr(X86_SSE_XOR, RS, RD) +#define XORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_XOR, MD, MB, MI, MS, RD) +#define XORPDrr(RS, RD) _SSEPDrr(X86_SSE_XOR, RS, RD) +#define XORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_XOR, MD, MB, MI, MS, RD) + +#define COMISSrr(RS, RD) _SSEPSrr(X86_SSE_COMI, RS, RD) +#define COMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_COMI, MD, MB, MI, MS, RD) +#define COMISDrr(RS, RD) _SSEPDrr(X86_SSE_COMI, RS, RD) +#define COMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_COMI, MD, MB, MI, MS, RD) + +#define UCOMISSrr(RS, RD) _SSEPSrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) +#define UCOMISDrr(RS, RD) _SSEPDrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) + +#define MOVAPSrr(RS, RD) _SSEPSrr(0x28, RS, RD) +#define MOVAPSmr(MD, MB, MI, MS, RD) _SSEPSmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPSrm(RS, MD, MB, MI, MS) _SSEPSrm(0x29, RS, MD, MB, MI, MS) + +#define MOVAPDrr(RS, RD) _SSEPDrr(0x28, RS, RD) +#define MOVAPDmr(MD, MB, MI, MS, RD) _SSEPDmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPDrm(RS, MD, MB, MI, MS) _SSEPDrm(0x29, RS, MD, MB, MI, MS) + +#define CVTDQ2PDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTDQ2PD, RS,_rX, RD,_rX) +#define CVTDQ2PDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTDQ2PD, MD, MB, MI, MS, RD,_rX) +#define CVTDQ2PSrr(RS, RD) __SSELrr( X86_SSE_CVTDQ2PS, RS,_rX, RD,_rX) +#define CVTDQ2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTDQ2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPD2DQrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTPD2DQ, RS,_rX, RD,_rX) +#define CVTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTPD2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PI, RS,_rX, RD,_rM) +#define CVTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PI, MD, MB, MI, MS, RD,_rM) +#define CVTPD2PSrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PS, RS,_rX, RD,_rX) +#define CVTPD2PSmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPI2PDrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPI2PD, RS,_rM, RD,_rX) +#define CVTPI2PDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPI2PD, MD, MB, MI, MS, RD,_rX) +#define CVTPI2PSrr(RS, RD) __SSELrr( X86_SSE_CVTPI2PS, RS,_rM, RD,_rX) +#define CVTPI2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPI2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPS2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPS2DQ, RS,_rX, RD,_rX) +#define CVTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPS2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTPS2PDrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PD, RS,_rX, RD,_rX) +#define CVTPS2PDmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PD, MD, MB, MI, MS, RD,_rX) +#define CVTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PI, RS,_rX, RD,_rM) +#define CVTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PI, MD, MB, MI, MS, RD,_rM) +#define CVTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r4) +#define CVTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r4) +#define CVTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r8) +#define CVTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r8) +#define CVTSD2SSrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SS, RS,_rX, RD,_rX) +#define CVTSD2SSmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDLrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSI2SD, RS,_r4, RD,_rX) +#define CVTSI2SDLmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSI2SD, RS,_r8, RD,_rX) +#define CVTSI2SDQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SSLrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSI2SS, RS,_r4, RD,_rX) +#define CVTSI2SSLmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SSQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSI2SS, RS,_r8, RD,_rX) +#define CVTSI2SSQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSS2SDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SD, RS,_rX, RD,_rX) +#define CVTSS2SDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r4) +#define CVTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r4) +#define CVTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r8) +#define CVTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r8) +#define CVTTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2PI, RS,_rX, RD,_rM) +#define CVTTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2PI, MD, MB, MI, MS, RD,_rM) +#define CVTTPD2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2DQ, RS,_rX, RD,_rX) +#define CVTTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTTPS2DQrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTPS2DQ, RS,_rX, RD,_rX) +#define CVTTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTPS2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTTPS2PI, RS,_rX, RD,_rM) +#define CVTTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTTPS2PI, MD, MB, MI, MS, RD,_rM) +#define CVTTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r4) +#define CVTTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r4) +#define CVTTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r8) +#define CVTTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r8) +#define CVTTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r4) +#define CVTTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r4) +#define CVTTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r8) +#define CVTTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r8) + +#define MOVDXDrr(RS, RD) _SSELrr(0x66, 0x6e, RS,_r4, RD,_rX) +#define MOVDXDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) +#define MOVQXDrr(RS, RD) _SSEQrr(0x66, 0x6e, RS,_r8, RD,_rX) +#define MOVQXDmr(MD, MB, MI, MS, RD) _SSEQmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) + +#define MOVDXSrr(RS, RD) _SSELrr(0x66, 0x7e, RD,_r4, RS,_rX) +#define MOVDXSrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) +#define MOVQXSrr(RS, RD) _SSEQrr(0x66, 0x7e, RD,_r8, RS,_rX) +#define MOVQXSrm(RS, MD, MB, MI, MS) _SSEQrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) + +#define MOVDLMrr(RS, RD) __SSELrr( 0x6e, RS,_r4, RD,_rM) +#define MOVDLMmr(MD, MB, MI, MS, RD) __SSELmr( 0x6e, MD, MB, MI, MS, RD,_rM) +#define MOVDQMrr(RS, RD) __SSEQrr( 0x6e, RS,_r8, RD,_rM) +#define MOVDQMmr(MD, MB, MI, MS, RD) __SSEQmr( 0x6e, MD, MB, MI, MS, RD,_rM) + +#define MOVDMLrr(RS, RD) __SSELrr( 0x7e, RS,_rM, RD,_r4) +#define MOVDMLrm(RS, MD, MB, MI, MS) __SSELrm( 0x7e, RS,_rM, MD, MB, MI, MS) +#define MOVDMQrr(RS, RD) __SSEQrr( 0x7e, RS,_rM, RD,_r8) +#define MOVDMQrm(RS, MD, MB, MI, MS) __SSEQrm( 0x7e, RS,_rM, MD, MB, MI, MS) + +#define MOVDQ2Qrr(RS, RD) _SSELrr(0xf2, 0xd6, RS,_rX, RD,_rM) +#define MOVMSKPSrr(RS, RD) __SSELrr( 0x50, RS,_rX, RD,_r4) +#define MOVMSKPDrr(RS, RD) _SSELrr(0x66, 0x50, RS,_rX, RD,_r4) + +#define MOVHLPSrr(RS, RD) __SSELrr( 0x12, RS,_rX, RD,_rX) +#define MOVLHPSrr(RS, RD) __SSELrr( 0x16, RS,_rX, RD,_rX) + +#define MOVDQArr(RS, RD) _SSELrr(0x66, 0x6f, RS,_rX, RD,_rX) +#define MOVDQAmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQArm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVDQUrr(RS, RD) _SSELrr(0xf3, 0x6f, RS,_rX, RD,_rX) +#define MOVDQUmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQUrm(RS, MD, MB, MI, MS) _SSELrm(0xf3, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVHPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x17, RS,_rX, MD, MB, MI, MS) +#define MOVHPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x17, RS,_rX, MD, MB, MI, MS) + +#define MOVLPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x13, RS,_rX, MD, MB, MI, MS) +#define MOVLPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x13, RS,_rX, MD, MB, MI, MS) + + +/* --- Floating-Point instructions ----------------------------------------- */ + +enum { + X86_F2XM1 = 0xd9f0, + X86_FABS = 0xd9e1, + X86_FADD = 0xd8c0, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIADD = 0xda00, // m32int, m16int + X86_FBLD = 0xdf04, // mem + X86_FBSTP = 0xdf06, // mem + X86_FCHS = 0xd9e0, + X86_FCMOVB = 0xdac0, // sti0 + X86_FCMOVE = 0xdac8, // sti0 + X86_FCMOVBE = 0xdad0, // sti0 + X86_FCMOVU = 0xdad8, // sti0 + X86_FCMOVNB = 0xdbc0, // sti0 + X86_FCMOVNE = 0xdbc8, // sti0 + X86_FCMOVNBE = 0xdbd0, // sti0 + X86_FCMOVNU = 0xdbd8, // sti0 + X86_FCOM = 0xd8d2, // m32fp, m64fp, sti + X86_FCOMP = 0xd8db, // m32fp, m64fp, sti + X86_FCOMPP = 0xded9, + X86_FCOMI = 0xdbf0, // sti0 + X86_FCOMIP = 0xdff0, // sti0 + X86_FUCOMI = 0xdbe8, // sti0 + X86_FUCOMIP = 0xdfe8, // sti0 + X86_FCOS = 0xd9ff, + X86_FDECSTP = 0xd9f6, + X86_FDIV = 0xd8f6, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIDIV = 0xda06, // m32int, m16int + X86_FDIVR = 0xd8ff, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIDIVR = 0xda07, // m32int, m16int + X86_FFREE = 0xddc0, // sti + X86_FICOM = 0xda02, // m32int, m16int + X86_FICOMP = 0xda03, // m32int, m16int + X86_FILD = 0xdb00, // m32int, m16int + X86_FILDQ = 0xdf05, // mem + X86_FINCSTP = 0xd9f7, + X86_FIST = 0xdb02, // m32int, m16int + X86_FISTP = 0xdb03, // m32int, m16int + X86_FISTPQ = 0xdf07, // mem + X86_FISTTP = 0xdb01, // m32int, m16int + X86_FISTTPQ = 0xdd01, // mem + X86_FLD = 0xd900, // m32fp, m64fp + X86_FLDT = 0xdb05, // mem + X86_FLD1 = 0xd9e8, + X86_FLDL2T = 0xd9e9, + X86_FLDL2E = 0xd9ea, + X86_FLDPI = 0xd9eb, + X86_FLDLG2 = 0xd9ec, + X86_FLDLN2 = 0xd9ed, + X86_FLDZ = 0xd9ee, + X86_FMUL = 0xd8c9, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIMUL = 0xda01, // m32int, m16int + X86_FNOP = 0xd9d0, + X86_FPATAN = 0xd9f3, + X86_FPREM = 0xd9f8, + X86_FPREM1 = 0xd9f5, + X86_FPTAN = 0xd9f2, + X86_FRNDINT = 0xd9fc, + X86_FSCALE = 0xd9fd, + X86_FSIN = 0xd9fe, + X86_FSINCOS = 0xd9fb, + X86_FSQRT = 0xd9fa, + X86_FSTS = 0xd902, // mem + X86_FSTD = 0xdd02, // mem + X86_FST = 0xddd0, // sti + X86_FSTPS = 0xd903, // mem + X86_FSTPD = 0xdd03, // mem + X86_FSTPT = 0xdb07, // mem + X86_FSTP = 0xddd8, // sti + X86_FSUB = 0xd8e4, // m32fp, m64fp, sti0, st0i, pst0i + X86_FISUB = 0xda04, // m32int, m16int + X86_FSUBR = 0xd8ed, // m32fp, m64fp, sti0, st0i, pst0i + X86_FISUBR = 0xda05, // m32int, m16int + X86_FTST = 0xd9e4, + X86_FUCOM = 0xdde0, // sti + X86_FUCOMP = 0xdde8, // sti + X86_FUCOMPP = 0xdae9, + X86_FXAM = 0xd9e5, + X86_FXCH = 0xd9c8, // sti + X86_FXTRACT = 0xd9f4, + X86_FYL2X = 0xd9f1, + X86_FYL2XP1 = 0xd9f9, +}; + +#define _FPU(OP) _OO(OP) +#define _FPUm(OP, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X((OP)>>8, (OP)&7, MD, MB, MI, MS)) +#define _FPUSm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) +#define _FPUDm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) +#define _FPULm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) +#define _FPUWm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) +#define _FPUr(OP, RR) _OOr((OP)&0xfff8, _rF(RR)) +#define _FPU0r(OP, RD) _FPUr((OP)|0x400, RD) +#define _FPUr0(OP, RS) _FPUr((OP) , RS) +#define _FPUrr(OP, RS, RD) (_rST0P(RS) ? _FPU0r(OP, RD) : (_rST0P(RD) ? _FPUr0(OP, RS) : x86_emit_failure("FPU instruction without st0"))) +#define _FPUP0r(OP, RD) _FPU0r((OP)|0x200, RD) + +#define F2XM1() _FPU(X86_F2XM1) +#define FABS() _FPU(X86_FABS) +#define FADDSm(MD, MB, MI, MS) _FPUSm(X86_FADD, MD, MB, MI, MS) +#define FADDDm(MD, MB, MI, MS) _FPUDm(X86_FADD, MD, MB, MI, MS) +#define FADDP0r(RD) _FPUP0r(X86_FADD, RD) +#define FADDrr(RS, RD) _FPUrr(X86_FADD, RS, RD) +#define FADD0r(RD) _FPU0r(X86_FADD, RD) +#define FADDr0(RS) _FPUr0(X86_FADD, RS) +#define FIADDWm(MD, MB, MI, MS) _FPUWm(X86_FIADD, MD, MB, MI, MS) +#define FIADDLm(MD, MB, MI, MS) _FPULm(X86_FIADD, MD, MB, MI, MS) +#define FBLDm(MD, MB, MI, MS) _FPUm(X86_FBLD, MD, MB, MI, MS) +#define FBSTPm(MD, MB, MI, MS) _FPUm(X86_FBSTP, MD, MB, MI, MS) +#define FCHS() _FPU(X86_FCHS) +#define FCMOVBr0(RS) _FPUr0(X86_FCMOVB, RS) +#define FCMOVEr0(RS) _FPUr0(X86_FCMOVE, RS) +#define FCMOVBEr0(RS) _FPUr0(X86_FCMOVBE, RS) +#define FCMOVUr0(RS) _FPUr0(X86_FCMOVU, RS) +#define FCMOVNBr0(RS) _FPUr0(X86_FCMOVNB, RS) +#define FCMOVNEr0(RS) _FPUr0(X86_FCMOVNE, RS) +#define FCMOVNBEr0(RS) _FPUr0(X86_FCMOVNBE, RS) +#define FCMOVNUr0(RS) _FPUr0(X86_FCMOVNU, RS) +#define FCOMSm(MD, MB, MI, MS) _FPUSm(X86_FCOM, MD, MB, MI, MS) +#define FCOMDm(MD, MB, MI, MS) _FPUDm(X86_FCOM, MD, MB, MI, MS) +#define FCOMr(RD) _FPUr(X86_FCOM, RD) +#define FCOMPSm(MD, MB, MI, MS) _FPUSm(X86_FCOMP, MD, MB, MI, MS) +#define FCOMPDm(MD, MB, MI, MS) _FPUDm(X86_FCOMP, MD, MB, MI, MS) +#define FCOMPr(RD) _FPUr(X86_FCOMP, RD) +#define FCOMPP() _FPU(X86_FCOMPP) +#define FCOMIr0(RS) _FPUr0(X86_FCOMI, RS) +#define FCOMIPr0(RS) _FPUr0(X86_FCOMIP, RS) +#define FUCOMIr0(RS) _FPUr0(X86_FUCOMI, RS) +#define FUCOMIPr0(RS) _FPUr0(X86_FUCOMIP, RS) +#define FCOS() _FPU(X86_FCOS) +#define FDECSTP() _FPU(X86_FDECSTP) +#define FDIVSm(MD, MB, MI, MS) _FPUSm(X86_FDIV, MD, MB, MI, MS) +#define FDIVDm(MD, MB, MI, MS) _FPUDm(X86_FDIV, MD, MB, MI, MS) +#define FDIVP0r(RD) _FPUP0r(X86_FDIV, RD) +#define FDIVrr(RS, RD) _FPUrr(X86_FDIV, RS, RD) +#define FDIV0r(RD) _FPU0r(X86_FDIV, RD) +#define FDIVr0(RS) _FPUr0(X86_FDIV, RS) +#define FIDIVWm(MD, MB, MI, MS) _FPUWm(X86_FIDIV, MD, MB, MI, MS) +#define FIDIVLm(MD, MB, MI, MS) _FPULm(X86_FIDIV, MD, MB, MI, MS) +#define FDIVRSm(MD, MB, MI, MS) _FPUSm(X86_FDIVR, MD, MB, MI, MS) +#define FDIVRDm(MD, MB, MI, MS) _FPUDm(X86_FDIVR, MD, MB, MI, MS) +#define FDIVRP0r(RD) _FPUP0r(X86_FDIVR, RD) +#define FDIVRrr(RS, RD) _FPUrr(X86_FDIVR, RS, RD) +#define FDIVR0r(RD) _FPU0r(X86_FDIVR, RD) +#define FDIVRr0(RS) _FPUr0(X86_FDIVR, RS) +#define FIDIVRWm(MD, MB, MI, MS) _FPUWm(X86_FIDIVR, MD, MB, MI, MS) +#define FIDIVRLm(MD, MB, MI, MS) _FPULm(X86_FIDIVR, MD, MB, MI, MS) +#define FFREEr(RD) _FPUr(X86_FFREE, RD) +#define FICOMWm(MD, MB, MI, MS) _FPUWm(X86_FICOM, MD, MB, MI, MS) +#define FICOMLm(MD, MB, MI, MS) _FPULm(X86_FICOM, MD, MB, MI, MS) +#define FICOMPWm(MD, MB, MI, MS) _FPUWm(X86_FICOMP, MD, MB, MI, MS) +#define FICOMPLm(MD, MB, MI, MS) _FPULm(X86_FICOMP, MD, MB, MI, MS) +#define FILDWm(MD, MB, MI, MS) _FPUWm(X86_FILD, MD, MB, MI, MS) +#define FILDLm(MD, MB, MI, MS) _FPULm(X86_FILD, MD, MB, MI, MS) +#define FILDQm(MD, MB, MI, MS) _FPUm(X86_FILDQ, MD, MB, MI, MS) +#define FINCSTP() _FPU(X86_FINCSTP) +#define FISTWm(MD, MB, MI, MS) _FPUWm(X86_FIST, MD, MB, MI, MS) +#define FISTLm(MD, MB, MI, MS) _FPULm(X86_FIST, MD, MB, MI, MS) +#define FISTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTP, MD, MB, MI, MS) +#define FISTPLm(MD, MB, MI, MS) _FPULm(X86_FISTP, MD, MB, MI, MS) +#define FISTPQm(MD, MB, MI, MS) _FPUm(X86_FISTPQ, MD, MB, MI, MS) +#define FISTTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTTP, MD, MB, MI, MS) +#define FISTTPLm(MD, MB, MI, MS) _FPULm(X86_FISTTP, MD, MB, MI, MS) +#define FISTTPQm(MD, MB, MI, MS) _FPUm(X86_FISTTPQ, MD, MB, MI, MS) +#define FLDSm(MD, MB, MI, MS) _FPUSm(X86_FLD, MD, MB, MI, MS) +#define FLDDm(MD, MB, MI, MS) _FPUDm(X86_FLD, MD, MB, MI, MS) +#define FLDTm(MD, MB, MI, MS) _FPUm(X86_FLDT, MD, MB, MI, MS) +#define FLD1() _FPU(X86_FLD1) +#define FLDL2T() _FPU(X86_FLDL2T) +#define FLDL2E() _FPU(X86_FLDL2E) +#define FLDPI() _FPU(X86_FLDPI) +#define FLDLG2() _FPU(X86_FLDLG2) +#define FLDLN2() _FPU(X86_FLDLN2) +#define FLDZ() _FPU(X86_FLDZ) +#define FMULSm(MD, MB, MI, MS) _FPUSm(X86_FMUL, MD, MB, MI, MS) +#define FMULDm(MD, MB, MI, MS) _FPUDm(X86_FMUL, MD, MB, MI, MS) +#define FMULP0r(RD) _FPUP0r(X86_FMUL, RD) +#define FMULrr(RS, RD) _FPUrr(X86_FMUL, RS, RD) +#define FMUL0r(RD) _FPU0r(X86_FMUL, RD) +#define FMULr0(RS) _FPUr0(X86_FMUL, RS) +#define FIMULWm(MD, MB, MI, MS) _FPUWm(X86_FIMUL, MD, MB, MI, MS) +#define FIMULLm(MD, MB, MI, MS) _FPULm(X86_FIMUL, MD, MB, MI, MS) +#define FNOP() _FPU(X86_FNOP) +#define FPATAN() _FPU(X86_FPATAN) +#define FPREM() _FPU(X86_FPREM) +#define FPREM1() _FPU(X86_FPREM1) +#define FPTAN() _FPU(X86_FPTAN) +#define FRNDINT() _FPU(X86_FRNDINT) +#define FSCALE() _FPU(X86_FSCALE) +#define FSIN() _FPU(X86_FSIN) +#define FSINCOS() _FPU(X86_FSINCOS) +#define FSQRT() _FPU(X86_FSQRT) +#define FSTSm(MD, MB, MI, MS) _FPUm(X86_FSTS, MD, MB, MI, MS) +#define FSTDm(MD, MB, MI, MS) _FPUm(X86_FSTD, MD, MB, MI, MS) +#define FSTr(RD) _FPUr(X86_FST, RD) +#define FSTPSm(MD, MB, MI, MS) _FPUm(X86_FSTPS, MD, MB, MI, MS) +#define FSTPDm(MD, MB, MI, MS) _FPUm(X86_FSTPD, MD, MB, MI, MS) +#define FSTPTm(MD, MB, MI, MS) _FPUm(X86_FSTPT, MD, MB, MI, MS) +#define FSTPr(RD) _FPUr(X86_FSTP, RD) +#define FSUBSm(MD, MB, MI, MS) _FPUSm(X86_FSUB, MD, MB, MI, MS) +#define FSUBDm(MD, MB, MI, MS) _FPUDm(X86_FSUB, MD, MB, MI, MS) +#define FSUBP0r(RD) _FPUP0r(X86_FSUB, RD) +#define FSUBrr(RS, RD) _FPUrr(X86_FSUB, RS, RD) +#define FSUB0r(RD) _FPU0r(X86_FSUB, RD) +#define FSUBr0(RS) _FPUr0(X86_FSUB, RS) +#define FISUBWm(MD, MB, MI, MS) _FPUWm(X86_FISUB, MD, MB, MI, MS) +#define FISUBLm(MD, MB, MI, MS) _FPULm(X86_FISUB, MD, MB, MI, MS) +#define FSUBRSm(MD, MB, MI, MS) _FPUSm(X86_FSUBR, MD, MB, MI, MS) +#define FSUBRDm(MD, MB, MI, MS) _FPUDm(X86_FSUBR, MD, MB, MI, MS) +#define FSUBRP0r(RD) _FPUP0r(X86_FSUBR, RD) +#define FSUBRrr(RS, RD) _FPUrr(X86_FSUBR, RS, RD) +#define FSUBR0r(RD) _FPU0r(X86_FSUBR, RD) +#define FSUBRr0(RS) _FPUr0(X86_FSUBR, RS) +#define FISUBRWm(MD, MB, MI, MS) _FPUWm(X86_FISUBR, MD, MB, MI, MS) +#define FISUBRLm(MD, MB, MI, MS) _FPULm(X86_FISUBR, MD, MB, MI, MS) +#define FTST() _FPU(X86_FTST) +#define FUCOMr(RD) _FPUr(X86_FUCOM, RD) +#define FUCOMPr(RD) _FPUr(X86_FUCOMP, RD) +#define FUCOMPP() _FPU(X86_FUCOMPP) +#define FXAM() _FPU(X86_FXAM) +#define FXCHr(RD) _FPUr(X86_FXCH, RD) +#define FXTRACT() _FPU(X86_FXTRACT) +#define FYL2X() _FPU(X86_FYL2X) +#define FYL2XP1() _FPU(X86_FYL2XP1) + +#endif /* X86_RTASM_H */ From ce00063701a4248e68949d0fcf34ac88c869766d Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Thu, 6 May 2021 10:50:26 +0900 Subject: [PATCH 495/534] Update README.md --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index c63f5c667..381433177 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS x86_64 JIT / arm64 non-JIT +macOS x86_64 non-JIT / arm64 non-JIT Linux x86 x86_64 JIT MinGW x86 JIT ``` From e42b8f6076a1f12c5598f29eee90ec24a34376da Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 6 May 2021 11:38:37 +0900 Subject: [PATCH 496/534] rename new uae_cpu --- BasiliskII/src/{uae_cpu => uae_cpu_2021}/basilisk_glue.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/build68k.c | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/codegen_x86.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/codegen_x86.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu_fpp.cpp | 0 .../{uae_cpu => uae_cpu_2021}/compiler/compemu_midfunc_x86.cpp | 0 .../src/{uae_cpu => uae_cpu_2021}/compiler/compemu_midfunc_x86.h | 0 .../src/{uae_cpu => uae_cpu_2021}/compiler/compemu_support.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/flags_x86.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/gencomp.c | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/cpu_emulation.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/cpummu.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/core.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/exceptions.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/exceptions.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/flags.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/flags.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_ieee.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_ieee.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_mpfr.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_uae.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_uae.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86_asm.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/impl.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/mathlib.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/mathlib.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/rounding.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/rounding.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/types.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/gencpu.c | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/m68k.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/memory.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/newcpu.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/newcpu.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/readcpu.cpp | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/readcpu.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/registers.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/spcflags.h | 0 BasiliskII/src/{uae_cpu => uae_cpu_2021}/table68k | 0 43 files changed, 0 insertions(+), 0 deletions(-) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/basilisk_glue.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/build68k.c (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/codegen_x86.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/codegen_x86.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu_fpp.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu_midfunc_x86.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu_midfunc_x86.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/compemu_support.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/flags_x86.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/compiler/gencomp.c (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/cpu_emulation.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/cpummu.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/core.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/exceptions.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/exceptions.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/flags.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/flags.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_ieee.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_ieee.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_mpfr.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_uae.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_uae.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/fpu_x86_asm.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/impl.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/mathlib.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/mathlib.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/rounding.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/rounding.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/fpu/types.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/gencpu.c (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/m68k.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/memory.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/newcpu.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/newcpu.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/readcpu.cpp (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/readcpu.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/registers.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/spcflags.h (100%) rename BasiliskII/src/{uae_cpu => uae_cpu_2021}/table68k (100%) diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu_2021/basilisk_glue.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/basilisk_glue.cpp rename to BasiliskII/src/uae_cpu_2021/basilisk_glue.cpp diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu_2021/build68k.c similarity index 100% rename from BasiliskII/src/uae_cpu/build68k.c rename to BasiliskII/src/uae_cpu_2021/build68k.c diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu_2021/compiler/codegen_x86.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp rename to BasiliskII/src/uae_cpu_2021/compiler/codegen_x86.cpp diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h b/BasiliskII/src/uae_cpu_2021/compiler/codegen_x86.h similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/codegen_x86.h rename to BasiliskII/src/uae_cpu_2021/compiler/codegen_x86.h diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu_2021/compiler/compemu.h similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/compemu.h rename to BasiliskII/src/uae_cpu_2021/compiler/compemu.h diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu_2021/compiler/compemu_fpp.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp rename to BasiliskII/src/uae_cpu_2021/compiler/compemu_fpp.cpp diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp b/BasiliskII/src/uae_cpu_2021/compiler/compemu_midfunc_x86.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.cpp rename to BasiliskII/src/uae_cpu_2021/compiler/compemu_midfunc_x86.cpp diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h b/BasiliskII/src/uae_cpu_2021/compiler/compemu_midfunc_x86.h similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/compemu_midfunc_x86.h rename to BasiliskII/src/uae_cpu_2021/compiler/compemu_midfunc_x86.h diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu_2021/compiler/compemu_support.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/compemu_support.cpp rename to BasiliskII/src/uae_cpu_2021/compiler/compemu_support.cpp diff --git a/BasiliskII/src/uae_cpu/compiler/flags_x86.h b/BasiliskII/src/uae_cpu_2021/compiler/flags_x86.h similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/flags_x86.h rename to BasiliskII/src/uae_cpu_2021/compiler/flags_x86.h diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu_2021/compiler/gencomp.c similarity index 100% rename from BasiliskII/src/uae_cpu/compiler/gencomp.c rename to BasiliskII/src/uae_cpu_2021/compiler/gencomp.c diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu_2021/cpu_emulation.h similarity index 100% rename from BasiliskII/src/uae_cpu/cpu_emulation.h rename to BasiliskII/src/uae_cpu_2021/cpu_emulation.h diff --git a/BasiliskII/src/uae_cpu/cpummu.h b/BasiliskII/src/uae_cpu_2021/cpummu.h similarity index 100% rename from BasiliskII/src/uae_cpu/cpummu.h rename to BasiliskII/src/uae_cpu_2021/cpummu.h diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu_2021/fpu/core.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/core.h rename to BasiliskII/src/uae_cpu_2021/fpu/core.h diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu_2021/fpu/exceptions.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/exceptions.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/exceptions.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu_2021/fpu/exceptions.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/exceptions.h rename to BasiliskII/src/uae_cpu_2021/fpu/exceptions.h diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu_2021/fpu/flags.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/flags.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/flags.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu_2021/fpu/flags.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/flags.h rename to BasiliskII/src/uae_cpu_2021/fpu/flags.h diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu_2021/fpu/fpu.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu.h rename to BasiliskII/src/uae_cpu_2021/fpu/fpu.h diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu_2021/fpu/fpu_ieee.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_ieee.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu_2021/fpu/fpu_ieee.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_ieee.h rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_ieee.h diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp b/BasiliskII/src/uae_cpu_2021/fpu/fpu_mpfr.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_mpfr.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_mpfr.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu_2021/fpu/fpu_uae.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_uae.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu_2021/fpu/fpu_uae.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_uae.h rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_uae.h diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu_2021/fpu/fpu_x86.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_x86.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu_2021/fpu/fpu_x86.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_x86.h rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_x86.h diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu_2021/fpu/fpu_x86_asm.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h rename to BasiliskII/src/uae_cpu_2021/fpu/fpu_x86_asm.h diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu_2021/fpu/impl.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/impl.h rename to BasiliskII/src/uae_cpu_2021/fpu/impl.h diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu_2021/fpu/mathlib.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/mathlib.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/mathlib.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu_2021/fpu/mathlib.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/mathlib.h rename to BasiliskII/src/uae_cpu_2021/fpu/mathlib.h diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu_2021/fpu/rounding.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/rounding.cpp rename to BasiliskII/src/uae_cpu_2021/fpu/rounding.cpp diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu_2021/fpu/rounding.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/rounding.h rename to BasiliskII/src/uae_cpu_2021/fpu/rounding.h diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu_2021/fpu/types.h similarity index 100% rename from BasiliskII/src/uae_cpu/fpu/types.h rename to BasiliskII/src/uae_cpu_2021/fpu/types.h diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu_2021/gencpu.c similarity index 100% rename from BasiliskII/src/uae_cpu/gencpu.c rename to BasiliskII/src/uae_cpu_2021/gencpu.c diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu_2021/m68k.h similarity index 100% rename from BasiliskII/src/uae_cpu/m68k.h rename to BasiliskII/src/uae_cpu_2021/m68k.h diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu_2021/memory.h similarity index 100% rename from BasiliskII/src/uae_cpu/memory.h rename to BasiliskII/src/uae_cpu_2021/memory.h diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu_2021/newcpu.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/newcpu.cpp rename to BasiliskII/src/uae_cpu_2021/newcpu.cpp diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu_2021/newcpu.h similarity index 100% rename from BasiliskII/src/uae_cpu/newcpu.h rename to BasiliskII/src/uae_cpu_2021/newcpu.h diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu_2021/readcpu.cpp similarity index 100% rename from BasiliskII/src/uae_cpu/readcpu.cpp rename to BasiliskII/src/uae_cpu_2021/readcpu.cpp diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu_2021/readcpu.h similarity index 100% rename from BasiliskII/src/uae_cpu/readcpu.h rename to BasiliskII/src/uae_cpu_2021/readcpu.h diff --git a/BasiliskII/src/uae_cpu/registers.h b/BasiliskII/src/uae_cpu_2021/registers.h similarity index 100% rename from BasiliskII/src/uae_cpu/registers.h rename to BasiliskII/src/uae_cpu_2021/registers.h diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu_2021/spcflags.h similarity index 100% rename from BasiliskII/src/uae_cpu/spcflags.h rename to BasiliskII/src/uae_cpu_2021/spcflags.h diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu_2021/table68k similarity index 100% rename from BasiliskII/src/uae_cpu/table68k rename to BasiliskII/src/uae_cpu_2021/table68k From 5862662bc9f685b0737963027aa258d5d2555785 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 6 May 2021 12:16:03 +0900 Subject: [PATCH 497/534] fix for Linux and Windows --- .../BasiliskII.xcodeproj/project.pbxproj | 12 +- BasiliskII/src/MacOSX/Makefile.gencpu | 4 +- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 266 + BasiliskII/src/uae_cpu/build68k.c | 276 + .../src/uae_cpu/compiler/codegen_x86.cpp | 4758 +++++++++++ BasiliskII/src/uae_cpu/compiler/codegen_x86.h | 2565 ++++++ BasiliskII/src/uae_cpu/compiler/compemu.h | 609 ++ .../src/uae_cpu/compiler/compemu_fpp.cpp | 1641 ++++ .../src/uae_cpu/compiler/compemu_support.cpp | 7131 +++++++++++++++++ BasiliskII/src/uae_cpu/compiler/flags_x86.h | 47 + BasiliskII/src/uae_cpu/compiler/gencomp.c | 3078 +++++++ .../src/uae_cpu/compiler/test_codegen_x86.cpp | 2254 ++++++ BasiliskII/src/uae_cpu/cpu_emulation.h | 102 + BasiliskII/src/uae_cpu/cpuopti.c | 312 + BasiliskII/src/uae_cpu/fpu/core.h | 259 + BasiliskII/src/uae_cpu/fpu/exceptions.cpp | 188 + BasiliskII/src/uae_cpu/fpu/exceptions.h | 149 + BasiliskII/src/uae_cpu/fpu/flags.cpp | 169 + BasiliskII/src/uae_cpu/fpu/flags.h | 223 + BasiliskII/src/uae_cpu/fpu/fpu.h | 49 + BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp | 2152 +++++ BasiliskII/src/uae_cpu/fpu/fpu_ieee.h | 149 + BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp | 2369 ++++++ BasiliskII/src/uae_cpu/fpu/fpu_uae.h | 212 + BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp | 6126 ++++++++++++++ BasiliskII/src/uae_cpu/fpu/fpu_x86.h | 361 + BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h | 72 + BasiliskII/src/uae_cpu/fpu/impl.h | 147 + BasiliskII/src/uae_cpu/fpu/mathlib.cpp | 100 + BasiliskII/src/uae_cpu/fpu/mathlib.h | 1135 +++ BasiliskII/src/uae_cpu/fpu/rounding.cpp | 64 + BasiliskII/src/uae_cpu/fpu/rounding.h | 154 + BasiliskII/src/uae_cpu/fpu/types.h | 159 + BasiliskII/src/uae_cpu/gencpu.c | 2558 ++++++ BasiliskII/src/uae_cpu/m68k.h | 1073 +++ BasiliskII/src/uae_cpu/memory.cpp | 642 ++ BasiliskII/src/uae_cpu/memory.h | 207 + BasiliskII/src/uae_cpu/newcpu.cpp | 1513 ++++ BasiliskII/src/uae_cpu/newcpu.h | 355 + BasiliskII/src/uae_cpu/noflags.h | 142 + BasiliskII/src/uae_cpu/readcpu.cpp | 1033 +++ BasiliskII/src/uae_cpu/readcpu.h | 130 + BasiliskII/src/uae_cpu/spcflags.h | 107 + BasiliskII/src/uae_cpu/table68k | 274 + 44 files changed, 45318 insertions(+), 8 deletions(-) create mode 100644 BasiliskII/src/uae_cpu/basilisk_glue.cpp create mode 100644 BasiliskII/src/uae_cpu/build68k.c create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/codegen_x86.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu.h create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/compemu_support.cpp create mode 100644 BasiliskII/src/uae_cpu/compiler/flags_x86.h create mode 100644 BasiliskII/src/uae_cpu/compiler/gencomp.c create mode 100644 BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/cpu_emulation.h create mode 100644 BasiliskII/src/uae_cpu/cpuopti.c create mode 100644 BasiliskII/src/uae_cpu/fpu/core.h create mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/exceptions.h create mode 100644 BasiliskII/src/uae_cpu/fpu/flags.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/flags.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_ieee.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_uae.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86.h create mode 100644 BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h create mode 100644 BasiliskII/src/uae_cpu/fpu/impl.h create mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/mathlib.h create mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.cpp create mode 100644 BasiliskII/src/uae_cpu/fpu/rounding.h create mode 100644 BasiliskII/src/uae_cpu/fpu/types.h create mode 100644 BasiliskII/src/uae_cpu/gencpu.c create mode 100644 BasiliskII/src/uae_cpu/m68k.h create mode 100644 BasiliskII/src/uae_cpu/memory.cpp create mode 100644 BasiliskII/src/uae_cpu/memory.h create mode 100644 BasiliskII/src/uae_cpu/newcpu.cpp create mode 100644 BasiliskII/src/uae_cpu/newcpu.h create mode 100644 BasiliskII/src/uae_cpu/noflags.h create mode 100644 BasiliskII/src/uae_cpu/readcpu.cpp create mode 100644 BasiliskII/src/uae_cpu/readcpu.h create mode 100644 BasiliskII/src/uae_cpu/spcflags.h create mode 100644 BasiliskII/src/uae_cpu/table68k diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 5234e02da..d5b13d67b 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -574,7 +574,7 @@ path = ../SDL; sourceTree = ""; }; - 7539E0A51F23B25A006B2DF2 /* uae_cpu */ = { + 7539E0A51F23B25A006B2DF2 /* uae_cpu_2021 */ = { isa = PBXGroup; children = ( 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, @@ -594,8 +594,8 @@ 7539E0D01F23B25A006B2DF2 /* spcflags.h */, 7539E0D11F23B25A006B2DF2 /* table68k */, ); - name = uae_cpu; - path = ../uae_cpu; + name = uae_cpu_2021; + path = ../uae_cpu_2021; sourceTree = ""; }; 7539E0A81F23B25A006B2DF2 /* compiler */ = { @@ -663,7 +663,7 @@ 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, 7539E0A31F23B25A006B2DF2 /* sony.cpp */, 7539E0A41F23B25A006B2DF2 /* timer.cpp */, - 7539E0A51F23B25A006B2DF2 /* uae_cpu */, + 7539E0A51F23B25A006B2DF2 /* uae_cpu_2021 */, 7539E1E91F23B329006B2DF2 /* Unix */, 7539E1221F23B25A006B2DF2 /* user_strings.cpp */, 7539E1231F23B25A006B2DF2 /* video.cpp */, @@ -1103,7 +1103,7 @@ /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, - ../uae_cpu, + ../uae_cpu_2021, ../Unix, ../slirp, ); @@ -1176,7 +1176,7 @@ /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, - ../uae_cpu, + ../uae_cpu_2021, ../Unix, ../slirp, ); diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu index 3762cb5d1..6364597e2 100644 --- a/BasiliskII/src/MacOSX/Makefile.gencpu +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -1,7 +1,7 @@ -SRC = $(PROJECT_DIR)/../uae_cpu +SRC = $(PROJECT_DIR)/../uae_cpu_2021 DST = $(BUILT_PRODUCTS_DIR)/gencpu_output VPATH = $(SRC) $(SRC)/compiler -CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu -I../UNIX +CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu_2021 -I../UNIX CXXFLAGS = -stdlib=libc++ $(CFLAGS) all: $(DST)/gencpu $(DST)/gencomp diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp new file mode 100644 index 000000000..b29c77026 --- /dev/null +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -0,0 +1,266 @@ +/* + * basilisk_glue.cpp - Glue UAE CPU to Basilisk II CPU engine interface + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" + +#include "cpu_emulation.h" +#include "main.h" +#include "prefs.h" +#include "emul_op.h" +#include "rom_patches.h" +#include "timer.h" +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "compiler/compemu.h" + + +// RAM and ROM pointers +uint32 RAMBaseMac = 0; // RAM base (Mac address space) gb-- initializer is important +uint8 *RAMBaseHost; // RAM base (host address space) +uint32 RAMSize; // Size of RAM +uint32 ROMBaseMac; // ROM base (Mac address space) +uint8 *ROMBaseHost; // ROM base (host address space) +uint32 ROMSize; // Size of ROM + +#if !REAL_ADDRESSING +// Mac frame buffer +uint8 *MacFrameBaseHost; // Frame buffer base (host address space) +uint32 MacFrameSize; // Size of frame buffer +int MacFrameLayout; // Frame buffer layout +#endif + +#if DIRECT_ADDRESSING +uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent +#endif + +#if USE_JIT +bool UseJIT = false; +#endif + +// From newcpu.cpp +extern bool quit_program; + + +/* + * Initialize 680x0 emulation, CheckROM() must have been called first + */ + +bool Init680x0(void) +{ +#if REAL_ADDRESSING + // Mac address space = host address space + RAMBaseMac = (uintptr)RAMBaseHost; + ROMBaseMac = (uintptr)ROMBaseHost; +#elif DIRECT_ADDRESSING + // Mac address space = host address space minus constant offset (MEMBaseDiff) + // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() + RAMBaseMac = 0; + ROMBaseMac = Host2MacAddr(ROMBaseHost); +#else + // Initialize UAE memory banks + RAMBaseMac = 0; + switch (ROMVersion) { + case ROM_VERSION_64K: + case ROM_VERSION_PLUS: + case ROM_VERSION_CLASSIC: + ROMBaseMac = 0x00400000; + break; + case ROM_VERSION_II: + ROMBaseMac = 0x00a00000; + break; + case ROM_VERSION_32: + ROMBaseMac = 0x40800000; + break; + default: + return false; + } + memory_init(); +#endif + + init_m68k(); +#if USE_JIT + UseJIT = compiler_use_jit(); + if (UseJIT) + compiler_init(); +#endif + return true; +} + + +/* + * Deinitialize 680x0 emulation + */ + +void Exit680x0(void) +{ +#if USE_JIT + if (UseJIT) + compiler_exit(); +#endif + exit_m68k(); +} + + +/* + * Initialize memory mapping of frame buffer (called upon video mode change) + */ + +void InitFrameBufferMapping(void) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + memory_init(); +#endif +} + +/* + * Reset and start 680x0 emulation (doesn't return) + */ + +void Start680x0(void) +{ + m68k_reset(); +#if USE_JIT + if (UseJIT) + m68k_compile_execute(); + else +#endif + m68k_execute(); +} + + +/* + * Trigger interrupt + */ + +void TriggerInterrupt(void) +{ + idle_resume(); + SPCFLAGS_SET( SPCFLAG_INT ); +} + +void TriggerNMI(void) +{ + //!! not implemented yet +} + + +/* + * Get 68k interrupt level + */ + +int intlev(void) +{ + return InterruptFlags ? 1 : 0; +} + + +/* + * Execute MacOS 68k trap + * r->a[7] and r->sr are unused! + */ + +void Execute68kTrap(uint16 trap, struct M68kRegisters *r) +{ + int i; + + // Save old PC + uaecptr oldpc = m68k_getpc(); + + // Set registers + for (i=0; i<8; i++) + m68k_dreg(regs, i) = r->d[i]; + for (i=0; i<7; i++) + m68k_areg(regs, i) = r->a[i]; + + // Push trap and EXEC_RETURN on stack + m68k_areg(regs, 7) -= 2; + put_word(m68k_areg(regs, 7), M68K_EXEC_RETURN); + m68k_areg(regs, 7) -= 2; + put_word(m68k_areg(regs, 7), trap); + + // Execute trap + m68k_setpc(m68k_areg(regs, 7)); + fill_prefetch_0(); + quit_program = false; + m68k_execute(); + + // Clean up stack + m68k_areg(regs, 7) += 4; + + // Restore old PC + m68k_setpc(oldpc); + fill_prefetch_0(); + + // Get registers + for (i=0; i<8; i++) + r->d[i] = m68k_dreg(regs, i); + for (i=0; i<7; i++) + r->a[i] = m68k_areg(regs, i); + quit_program = false; +} + + +/* + * Execute 68k subroutine + * The executed routine must reside in UAE memory! + * r->a[7] and r->sr are unused! + */ + +void Execute68k(uint32 addr, struct M68kRegisters *r) +{ + int i; + + // Save old PC + uaecptr oldpc = m68k_getpc(); + + // Set registers + for (i=0; i<8; i++) + m68k_dreg(regs, i) = r->d[i]; + for (i=0; i<7; i++) + m68k_areg(regs, i) = r->a[i]; + + // Push EXEC_RETURN and faked return address (points to EXEC_RETURN) on stack + m68k_areg(regs, 7) -= 2; + put_word(m68k_areg(regs, 7), M68K_EXEC_RETURN); + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), m68k_areg(regs, 7) + 4); + + // Execute routine + m68k_setpc(addr); + fill_prefetch_0(); + quit_program = false; + m68k_execute(); + + // Clean up stack + m68k_areg(regs, 7) += 2; + + // Restore old PC + m68k_setpc(oldpc); + fill_prefetch_0(); + + // Get registers + for (i=0; i<8; i++) + r->d[i] = m68k_dreg(regs, i); + for (i=0; i<7; i++) + r->a[i] = m68k_areg(regs, i); + quit_program = false; +} diff --git a/BasiliskII/src/uae_cpu/build68k.c b/BasiliskII/src/uae_cpu/build68k.c new file mode 100644 index 000000000..8ec3ab552 --- /dev/null +++ b/BasiliskII/src/uae_cpu/build68k.c @@ -0,0 +1,276 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * Read 68000 CPU specs from file "table68k" and build table68k.c + * + * Copyright 1995,1996 Bernd Schmidt + * + * 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 +#include +#include + +#include "sysdeps.h" +#include "readcpu.h" + +static FILE *tablef; +static int nextch = 0; + +static void getnextch(void) +{ + do { + nextch = fgetc(tablef); + if (nextch == '%') { + do { + nextch = fgetc(tablef); + } while (nextch != EOF && nextch != '\n'); + } + } while (nextch != EOF && isspace(nextch)); +} + +static int nextchtohex(void) +{ + switch (isupper (nextch) ? tolower (nextch) : nextch) { + case '0': return 0; + case '1': return 1; + case '2': return 2; + case '3': return 3; + case '4': return 4; + case '5': return 5; + case '6': return 6; + case '7': return 7; + case '8': return 8; + case '9': return 9; + case 'a': return 10; + case 'b': return 11; + case 'c': return 12; + case 'd': return 13; + case 'e': return 14; + case 'f': return 15; + default: abort(); + } +} + +int main(int argc, char **argv) +{ + int no_insns = 0; + + printf ("#include \"sysdeps.h\"\n"); + printf ("#include \"readcpu.h\"\n"); + printf ("struct instr_def defs68k[] = {\n"); +#ifdef WIN32 + tablef = fopen(argc > 1 ? argv[1] : "table68k","r"); + if (tablef == NULL) { + fprintf(stderr, "table68k not found\n"); + exit(1); + } +#else + tablef = stdin; +#endif + getnextch(); + while (nextch != EOF) { + int cpulevel, plevel, sduse; + int i; + + char patbits[16]; + char opcstr[256]; + int bitpos[16]; + int flagset[5], flaguse[5]; + char cflow; + + unsigned int bitmask,bitpattern; + int n_variable; + + n_variable = 0; + bitmask = bitpattern = 0; + memset (bitpos, 0, sizeof(bitpos)); + for(i=0; i<16; i++) { + int currbit; + bitmask <<= 1; + bitpattern <<= 1; + + switch (nextch) { + case '0': currbit = bit0; bitmask |= 1; break; + case '1': currbit = bit1; bitmask |= 1; bitpattern |= 1; break; + case 'c': currbit = bitc; break; + case 'C': currbit = bitC; break; + case 'f': currbit = bitf; break; + case 'i': currbit = biti; break; + case 'I': currbit = bitI; break; + case 'j': currbit = bitj; break; + case 'J': currbit = bitJ; break; + case 'k': currbit = bitk; break; + case 'K': currbit = bitK; break; + case 's': currbit = bits; break; + case 'S': currbit = bitS; break; + case 'd': currbit = bitd; break; + case 'D': currbit = bitD; break; + case 'r': currbit = bitr; break; + case 'R': currbit = bitR; break; + case 'z': currbit = bitz; break; + case 'E': currbit = bitE; break; + case 'p': currbit = bitp; break; + default: abort(); + } + if (!(bitmask & 1)) { + bitpos[n_variable] = currbit; + n_variable++; + } + + if (nextch == '0' || nextch == '1') + bitmask |= 1; + if (nextch == '1') + bitpattern |= 1; + patbits[i] = nextch; + getnextch(); + } + + while (isspace(nextch) || nextch == ':') /* Get CPU and privilege level */ + getnextch(); + + switch (nextch) { + case '0': cpulevel = 0; break; + case '1': cpulevel = 1; break; + case '2': cpulevel = 2; break; + case '3': cpulevel = 3; break; + case '4': cpulevel = 4; break; + case '5': cpulevel = 5; break; + default: abort(); + } + getnextch(); + + switch (nextch) { + case '0': plevel = 0; break; + case '1': plevel = 1; break; + case '2': plevel = 2; break; + case '3': plevel = 3; break; + default: abort(); + } + getnextch(); + + while (isspace(nextch)) /* Get flag set information */ + getnextch(); + + if (nextch != ':') + abort(); + + for(i = 0; i < 5; i++) { + getnextch(); + switch(nextch){ + case '-': flagset[i] = fa_unset; break; + case '0': flagset[i] = fa_zero; break; + case '1': flagset[i] = fa_one; break; + case 'x': flagset[i] = fa_dontcare; break; + case '?': flagset[i] = fa_unknown; break; + default: flagset[i] = fa_set; break; + } + } + + getnextch(); + while (isspace(nextch)) + getnextch(); + + if (nextch != ':') /* Get flag used information */ + abort(); + + for(i = 0; i < 5; i++) { + getnextch(); + switch(nextch){ + case '-': flaguse[i] = fu_unused; break; + case '?': flaguse[i] = fu_unknown; break; + default: flaguse[i] = fu_used; break; + } + } + + getnextch(); + while (isspace(nextch)) + getnextch(); + + if (nextch != ':') /* Get control flow information */ + abort(); + + cflow = 0; + for(i = 0; i < 2; i++) { + getnextch(); + switch(nextch){ + case '-': break; + case 'R': cflow |= fl_return; break; + case 'B': cflow |= fl_branch; break; + case 'J': cflow |= fl_jump; break; + case 'T': cflow |= fl_trap; break; + default: abort(); + } + } + + getnextch(); + while (isspace(nextch)) + getnextch(); + + if (nextch != ':') /* Get source/dest usage information */ + abort(); + + getnextch(); + sduse = nextchtohex() << 4; + getnextch(); + sduse |= nextchtohex(); + + getnextch(); + while (isspace(nextch)) + getnextch(); + + if (nextch != ':') + abort(); + + fgets(opcstr, 250, tablef); + getnextch(); + { + int j; + /* Remove superfluous spaces from the string */ + char *opstrp = opcstr, *osendp; + int slen = 0; + + while (isspace(*opstrp)) + opstrp++; + + osendp = opstrp; + while (*osendp) { + if (!isspace (*osendp)) + slen = osendp - opstrp + 1; + osendp++; + } + opstrp[slen] = 0; + + if (no_insns > 0) + printf(",\n"); + no_insns++; + printf("{ %d, %d, {", bitpattern, n_variable); + for (j = 0; j < 16; j++) { + printf("%d", bitpos[j]); + if (j < 15) + printf(","); + } + printf ("}, %d, %d, %d, { ", bitmask, cpulevel, plevel); + for(i = 0; i < 5; i++) { + printf("{ %d, %d }%c ", flaguse[i], flagset[i], i == 4 ? ' ' : ','); + } + printf("}, %d, %d, \"%s\"}", cflow, sduse, opstrp); + } + } + printf("};\nint n_defs68k = %d;\n", no_insns); + fflush(stdout); + return 0; +} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp new file mode 100644 index 000000000..f03c4f3cf --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -0,0 +1,4758 @@ +/* + * compiler/codegen_x86.cpp - IA-32 code generator + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * Portions related to CPU detection come from linux/arch/i386/kernel/setup.c + * + * 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 + */ + +/* This should eventually end up in machdep/, but for now, x86 is the + only target, and it's easier this way... */ + +#include "flags_x86.h" + +/************************************************************************* + * Some basic information about the the target CPU * + *************************************************************************/ + +#define EAX_INDEX 0 +#define ECX_INDEX 1 +#define EDX_INDEX 2 +#define EBX_INDEX 3 +#define ESP_INDEX 4 +#define EBP_INDEX 5 +#define ESI_INDEX 6 +#define EDI_INDEX 7 +#if defined(__x86_64__) +#define R8_INDEX 8 +#define R9_INDEX 9 +#define R10_INDEX 10 +#define R11_INDEX 11 +#define R12_INDEX 12 +#define R13_INDEX 13 +#define R14_INDEX 14 +#define R15_INDEX 15 +#endif +/* XXX this has to match X86_Reg8H_Base + 4 */ +#define AH_INDEX (0x10+4+EAX_INDEX) +#define CH_INDEX (0x10+4+ECX_INDEX) +#define DH_INDEX (0x10+4+EDX_INDEX) +#define BH_INDEX (0x10+4+EBX_INDEX) + +/* The register in which subroutines return an integer return value */ +#define REG_RESULT EAX_INDEX + +/* The registers subroutines take their first and second argument in */ +#if defined( _MSC_VER ) && !USE_NORMAL_CALLING_CONVENTION +/* Handle the _fastcall parameters of ECX and EDX */ +#define REG_PAR1 ECX_INDEX +#define REG_PAR2 EDX_INDEX +#elif defined(__x86_64__) +#define REG_PAR1 EDI_INDEX +#define REG_PAR2 ESI_INDEX +#else +#define REG_PAR1 EAX_INDEX +#define REG_PAR2 EDX_INDEX +#endif + +#define REG_PC_PRE EAX_INDEX /* The register we use for preloading regs.pc_p */ +#if defined( _MSC_VER ) && !USE_NORMAL_CALLING_CONVENTION +#define REG_PC_TMP EAX_INDEX +#else +#define REG_PC_TMP ECX_INDEX /* Another register that is not the above */ +#endif + +#define SHIFTCOUNT_NREG ECX_INDEX /* Register that can be used for shiftcount. + -1 if any reg will do */ +#define MUL_NREG1 EAX_INDEX /* %eax will hold the low 32 bits after a 32x32 mul */ +#define MUL_NREG2 EDX_INDEX /* %edx will hold the high 32 bits */ + +#define STACK_ALIGN 16 +#define STACK_OFFSET sizeof(void *) + +uae_s8 always_used[]={4,-1}; +#if defined(__x86_64__) +uae_s8 can_byte[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; +uae_s8 can_word[]={0,1,2,3,5,6,7,8,9,10,11,12,13,14,15,-1}; +#else +uae_s8 can_byte[]={0,1,2,3,-1}; +uae_s8 can_word[]={0,1,2,3,5,6,7,-1}; +#endif + +#if USE_OPTIMIZED_CALLS +/* Make sure interpretive core does not use cpuopti */ +uae_u8 call_saved[]={0,0,0,1,1,1,1,1}; +#error FIXME: code not ready +#else +/* cpuopti mutate instruction handlers to assume registers are saved + by the caller */ +uae_u8 call_saved[]={0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0}; +#endif + +/* This *should* be the same as call_saved. But: + - We might not really know which registers are saved, and which aren't, + so we need to preserve some, but don't want to rely on everyone else + also saving those registers + - Special registers (such like the stack pointer) should not be "preserved" + by pushing, even though they are "saved" across function calls +*/ +#if defined(__x86_64__) +/* callee-saved registers as defined by Linux AMD64 ABI: rbx, rbp, rsp, r12 - r15 */ +/* preserve r11 because it's generally used to hold pointers to functions */ +static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,0,0,0,0,0,1,1,1,1,1}; +#else +/* callee-saved registers as defined by System V IA-32 ABI: edi, esi, ebx, ebp */ +static const uae_u8 need_to_preserve[]={0,0,0,1,0,1,1,1}; +#endif + +/* Whether classes of instructions do or don't clobber the native flags */ +#define CLOBBER_MOV +#define CLOBBER_LEA +#define CLOBBER_CMOV +#define CLOBBER_POP +#define CLOBBER_PUSH +#define CLOBBER_SUB clobber_flags() +#define CLOBBER_SBB clobber_flags() +#define CLOBBER_CMP clobber_flags() +#define CLOBBER_ADD clobber_flags() +#define CLOBBER_ADC clobber_flags() +#define CLOBBER_AND clobber_flags() +#define CLOBBER_OR clobber_flags() +#define CLOBBER_XOR clobber_flags() + +#define CLOBBER_ROL clobber_flags() +#define CLOBBER_ROR clobber_flags() +#define CLOBBER_SHLL clobber_flags() +#define CLOBBER_SHRL clobber_flags() +#define CLOBBER_SHRA clobber_flags() +#define CLOBBER_TEST clobber_flags() +#define CLOBBER_CL16 +#define CLOBBER_CL8 +#define CLOBBER_SE32 +#define CLOBBER_SE16 +#define CLOBBER_SE8 +#define CLOBBER_ZE32 +#define CLOBBER_ZE16 +#define CLOBBER_ZE8 +#define CLOBBER_SW16 clobber_flags() +#define CLOBBER_SW32 +#define CLOBBER_SETCC +#define CLOBBER_MUL clobber_flags() +#define CLOBBER_BT clobber_flags() +#define CLOBBER_BSF clobber_flags() + +/* The older code generator is now deprecated. */ +#define USE_NEW_RTASM 1 + +#if USE_NEW_RTASM + +#if defined(__x86_64__) +#define X86_TARGET_64BIT 1 +/* The address override prefix causes a 5 cycles penalty on Intel Core + processors. Another solution would be to decompose the load in an LEA, + MOV (to zero-extend), MOV (from memory): is it better? */ +#define ADDR32 x86_emit_byte(0x67), +#else +#define ADDR32 /**/ +#endif +#define X86_FLAT_REGISTERS 0 +#define X86_OPTIMIZE_ALU 1 +#define X86_OPTIMIZE_ROTSHI 1 +#include "codegen_x86.h" + +#define x86_emit_byte(B) emit_byte(B) +#define x86_emit_word(W) emit_word(W) +#define x86_emit_long(L) emit_long(L) +#define x86_emit_quad(Q) emit_quad(Q) +#define x86_get_target() get_target() +#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) + +static void jit_fail(const char *msg, const char *file, int line, const char *function) +{ + fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", + function, file, line, msg); + abort(); +} + +LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) +{ +#if defined(__x86_64__) + PUSHQr(r); +#else + PUSHLr(r); +#endif +} +LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) +{ +#if defined(__x86_64__) + POPQr(r); +#else + POPLr(r); +#endif +} +LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) +{ +#if defined(__x86_64__) + POPQm(d, X86_NOREG, X86_NOREG, 1); +#else + POPLm(d, X86_NOREG, X86_NOREG, 1); +#endif +} +LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) +{ + BTLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) +{ + BTLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) +{ + BTCLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) +{ + BTCLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) +{ + BTRLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) +{ + BTRLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) +{ + BTSLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) +{ + BTSLrr(b, r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) +{ + SUBWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) + +LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) +{ + MOVLmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) +{ + MOVLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) +{ + MOVWim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) +{ + MOVBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) +{ + ROLBim(i, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) +{ + ROLBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) +{ + ROLWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) +{ + ROLLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) +{ + ROLLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) +{ + ROLWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) +{ + ROLBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) +{ + SHLLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) +{ + SHLWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) +{ + SHLBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) +{ + RORBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) +{ + RORWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) +{ + ORLmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) +{ + RORLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) +{ + RORLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) +{ + RORWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) +{ + RORBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) +{ + SHRLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) +{ + SHRWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) +{ + SHRBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) +{ + SARLrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) +{ + SARWrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) +{ + SARBrr(r, d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) +{ + SHLLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) +{ + SHLWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) +{ + SHLBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) +{ + SHRLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) +{ + SHRWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) +{ + SHRBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) +{ + SARLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) +{ + SARWir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) +{ + SARBir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) +{ + SAHF(); +} +LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) + +LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) +{ + CPUID(); +} +LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) + +LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) +{ + LAHF(); +} +LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) + +LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) +{ + SETCCir(cc, d); +} +LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) + +LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) +{ + SETCCim(cc, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) +{ + /* replacement using branch and mov */ + int8 *target_p = (int8 *)x86_get_target() + 1; + JCCSii(cc^1, 0); + MOVBrr(s, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); +} +LENDFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) +{ + if (have_cmov) + CMOVWrr(cc, s, d); + else { /* replacement using branch and mov */ + int8 *target_p = (int8 *)x86_get_target() + 1; + JCCSii(cc^1, 0); + MOVWrr(s, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) +{ + if (have_cmov) + CMOVLrr(cc, s, d); + else { /* replacement using branch and mov */ + int8 *target_p = (int8 *)x86_get_target() + 1; + JCCSii(cc^1, 0); + MOVLrr(s, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) +{ + BSFLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) +{ + MOVSLQrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_32_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) +{ + MOVSWLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) +{ + MOVSBLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) +{ + MOVZWLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) +{ + MOVZBLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) +{ + IMULLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + write_log("Bad register in IMUL: d=%d, s=%d\n",d,s); + abort(); + } + IMULLr(s); +} +LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + write_log("Bad register in MUL: d=%d, s=%d\n",d,s); + abort(); + } + MULLr(s); +} +LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) +{ + abort(); /* %^$&%^$%#^ x86! */ +} +LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) +{ + MOVBrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) +{ + MOVWrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVWmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVBmr(0, baser, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) +{ + ADDR32 MOVLrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) +{ + ADDR32 MOVWrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) +{ + ADDR32 MOVBrm(s, 0, baser, index, factor); +} +LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) +{ + ADDR32 MOVLrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) +{ + ADDR32 MOVWrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) +{ + ADDR32 MOVBrm(s, base, baser, index, factor); +} +LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVWmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + ADDR32 MOVBmr(base, baser, index, factor, d); +} +LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) +{ + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) +{ + if (have_cmov) + ADDR32 CMOVLmr(cond, base, X86_NOREG, index, factor, d); + else { /* replacement using branch and mov */ + int8 *target_p = (int8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + ADDR32 MOVLmr(base, X86_NOREG, index, factor, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) +{ + if (have_cmov) + CMOVLmr(cond, mem, X86_NOREG, X86_NOREG, 1, d); + else { /* replacement using branch and mov */ + int8 *target_p = (int8 *)x86_get_target() + 1; + JCCSii(cond^1, 0); + MOVLmr(mem, X86_NOREG, X86_NOREG, 1, d); + *target_p = (uintptr)x86_get_target() - ((uintptr)target_p + 1); + } +} +LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) +{ + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) +{ + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) +{ + ADDR32 MOVWmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) +{ + ADDR32 MOVBmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVLim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVWim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) +{ + ADDR32 MOVBim(i, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) +{ + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) +{ + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) +{ + LEALmr(offset, s, X86_NOREG, 1, d); +} +LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) +{ + LEALmr(offset, s, index, factor, d); +} +LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) +{ + LEALmr(0, s, index, factor, d); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) +{ + LEALmr(0, X86_NOREG, index, factor, d); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_r_scaled,(W4 d, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) +{ + ADDR32 MOVLrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) +{ + ADDR32 MOVWrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) +{ + ADDR32 MOVBrm(s, offset, d, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) +{ + BSWAPLr(r); +} +LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) +{ + ROLWir(8, r); +} +LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) +{ + MOVLrr(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) +{ + MOVLrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) +{ + MOVWrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) + +LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) +{ + MOVWmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) +{ + MOVBrm(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) + +LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) +{ + MOVBmr(s, X86_NOREG, X86_NOREG, 1, d); +} +LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) +{ + MOVLir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) +{ + MOVWir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) +{ + MOVBir(s, d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) + +LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) +{ + ADCLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) +{ + ADDLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) +{ + ADDWim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) +{ + ADDBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) +{ + TESTLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) +{ + TESTLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) +{ + TESTWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) +{ + TESTBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) +{ + XORLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) +{ + ANDLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) +{ + ANDWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) +{ + ANDLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) +{ + ANDWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) +{ + ANDBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) +{ + ORLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) +{ + ORLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) +{ + ORWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) +{ + ORBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) +{ + ADCLrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) +{ + ADCWrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) +{ + ADCBrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) +{ + ADDLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) +{ + ADDWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) +{ + ADDBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) +{ + SUBLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) +{ + SUBBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) +{ + ADDLir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) +{ + ADDWir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) +{ + ADDBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) + +LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) +{ + SBBLrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) +{ + SBBWrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) +{ + SBBBrr(s, d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) +{ + SUBLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) +{ + SUBWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) +{ + SUBBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) +{ + CMPLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) +{ + CMPLir(i, r); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) +{ + CMPWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) +{ + CMPBim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) +{ + CMPBir(i, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) +{ + CMPBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) + +LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) +{ + ADDR32 CMPLmr(offset, X86_NOREG, index, factor, d); +} +LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) +{ + XORLrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) +{ + XORWrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) +{ + XORBrr(s, d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) +{ + SUBLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) +{ + CMPLim(s, d, X86_NOREG, X86_NOREG, 1); +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) +{ + XCHGLrr(r2, r1); +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) +{ + XCHGBrr(r2, r1); +} +LENDFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) +{ + PUSHF(); +} +LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) + +LOWFUNC(WRITE,READ,0,raw_popfl,(void)) +{ + POPF(); +} +LENDFUNC(WRITE,READ,0,raw_popfl,(void)) + +/* Generate floating-point instructions */ +static inline void x86_fadd_m(MEMR s) +{ + FADDDm(s,X86_NOREG,X86_NOREG,1); +} + +#else + +const bool optimize_accum = true; +const bool optimize_imm8 = true; +const bool optimize_shift_once = true; + +/************************************************************************* + * Actual encoding of the instructions on the target CPU * + *************************************************************************/ + +static __inline__ int isaccum(int r) +{ + return (r == EAX_INDEX); +} + +static __inline__ int isbyte(uae_s32 x) +{ + return (x>=-128 && x<=127); +} + +static __inline__ int isword(uae_s32 x) +{ + return (x>=-32768 && x<=32767); +} + +LOWFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) +{ + emit_byte(0x50+r); +} +LENDFUNC(NONE,WRITE,1,raw_push_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) +{ + emit_byte(0x58+r); +} +LENDFUNC(NONE,READ,1,raw_pop_l_r,(R4 r)) + +LOWFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) +{ + emit_byte(0x8f); + emit_byte(0x05); + emit_long(d); +} +LENDFUNC(NONE,READ,1,raw_pop_l_m,(MEMW d)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xe0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xa3); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_bt_l_rr,(R4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xf8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xbb); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_btc_l_rr,(RW4 r, R4 b)) + + +LOWFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xf0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xb3); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_btr_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) +{ + emit_byte(0x0f); + emit_byte(0xba); + emit_byte(0xe8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) +{ + emit_byte(0x0f); + emit_byte(0xab); + emit_byte(0xc0+8*b+r); +} +LENDFUNC(WRITE,NONE,2,raw_bts_l_rr,(RW4 r, R4 b)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x2d); + else { + emit_byte(0x81); + emit_byte(0xe8+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_sub_w_ri,(RW2 d, IMM i)) + + +LOWFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) +{ + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_l_rm,(W4 d, MEMR s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) +{ + emit_byte(0xc7); + emit_byte(0x05); + emit_long(d); + emit_long(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0xc7); + emit_byte(0x05); + emit_long(d); + emit_word(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mi,(MEMW d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) +{ + emit_byte(0xc6); + emit_byte(0x05); + emit_long(d); + emit_byte(s); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mi,(MEMW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0x05); + emit_long(d); + } + else { + emit_byte(0xc0); + emit_byte(0x05); + emit_long(d); + emit_byte(i); + } +} +LENDFUNC(WRITE,RMW,2,raw_rol_b_mi,(MEMRW d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xc0+r); + } + else { + emit_byte(0xc0); + emit_byte(0xc0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xc0+r); + } + else { + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xc0+d); +} +LENDFUNC(WRITE,NONE,2,raw_rol_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xe0+d); +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xc8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xc8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_ri,(RW2 r, IMM i)) + +// gb-- used for making an fpcr value in compemu_fpp.cpp +LOWFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) +{ + emit_byte(0x0b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(WRITE,READ,2,raw_or_l_rm,(RW4 d, MEMR s)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xc8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xc8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xc8+d); +} +LENDFUNC(WRITE,NONE,2,raw_ror_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xe8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) +{ + emit_byte(0xd3); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_rr,(RW4 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) +{ + emit_byte(0x66); + emit_byte(0xd3); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_rr,(RW2 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) +{ + emit_byte(0xd2); + emit_byte(0xf8+d); +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_rr,(RW1 d, R1 r)) + +LOWFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xe0+r); + } + else { + emit_byte(0xc1); + emit_byte(0xe0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shll_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xe0+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shll_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xe0+r); + } + else { + emit_byte(0xc0); + emit_byte(0xe0+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shll_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xe8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xe8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shrl_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xe8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shrl_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xe8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xe8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shrl_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd1); + emit_byte(0xf8+r); + } + else { + emit_byte(0xc1); + emit_byte(0xf8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shra_l_ri,(RW4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xf8+r); + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_shra_w_ri,(RW2 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) +{ + if (optimize_shift_once && (i == 1)) { + emit_byte(0xd0); + emit_byte(0xf8+r); + } + else { + emit_byte(0xc0); + emit_byte(0xf8+r); + emit_byte(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_shra_b_ri,(RW1 r, IMM i)) + +LOWFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) +{ + emit_byte(0x9e); +} +LENDFUNC(WRITE,NONE,1,raw_sahf,(R2 dummy_ah)) + +LOWFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) +{ + emit_byte(0x0f); + emit_byte(0xa2); +} +LENDFUNC(NONE,NONE,1,raw_cpuid,(R4 dummy_eax)) + +LOWFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) +{ + emit_byte(0x9f); +} +LENDFUNC(READ,NONE,1,raw_lahf,(W2 dummy_ah)) + +LOWFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) +{ + emit_byte(0x0f); + emit_byte(0x90+cc); + emit_byte(0xc0+d); +} +LENDFUNC(READ,NONE,2,raw_setcc,(W1 d, IMM cc)) + +LOWFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) +{ + emit_byte(0x0f); + emit_byte(0x90+cc); + emit_byte(0x05); + emit_long(d); +} +LENDFUNC(READ,WRITE,2,raw_setcc_m,(MEMW d, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) +{ + /* replacement using branch and mov */ + int uncc=(cc^1); + emit_byte(0x70+uncc); + emit_byte(3); /* skip next 2 bytes if not cc=true */ + emit_byte(0x88); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(READ,NONE,3,raw_cmov_b_rr,(RW1 d, R1 s, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) +{ + if (have_cmov) { + emit_byte(0x66); + emit_byte(0x0f); + emit_byte(0x40+cc); + emit_byte(0xc0+8*d+s); + } + else { /* replacement using branch and mov */ + int uncc=(cc^1); + emit_byte(0x70+uncc); + emit_byte(3); /* skip next 3 bytes if not cc=true */ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0xc0+8*s+d); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_w_rr,(RW2 d, R2 s, IMM cc)) + +LOWFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) +{ + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cc); + emit_byte(0xc0+8*d+s); + } + else { /* replacement using branch and mov */ + int uncc=(cc^1); + emit_byte(0x70+uncc); + emit_byte(2); /* skip next 2 bytes if not cc=true */ + emit_byte(0x89); + emit_byte(0xc0+8*s+d); + } +} +LENDFUNC(READ,NONE,3,raw_cmov_l_rr,(RW4 d, R4 s, IMM cc)) + +LOWFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) +{ + emit_byte(0x0f); + emit_byte(0xbc); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(WRITE,NONE,2,raw_bsf_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) +{ + emit_byte(0x0f); + emit_byte(0xbf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) +{ + emit_byte(0x0f); + emit_byte(0xbe); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_sign_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) +{ + emit_byte(0x0f); + emit_byte(0xb7); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_16_rr,(W4 d, R2 s)) + +LOWFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) +{ + emit_byte(0x0f); + emit_byte(0xb6); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_zero_extend_8_rr,(W4 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) +{ + emit_byte(0x0f); + emit_byte(0xaf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_imul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) + abort(); + emit_byte(0xf7); + emit_byte(0xea); +} +LENDFUNC(NONE,NONE,2,raw_imul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) +{ + if (d!=MUL_NREG1 || s!=MUL_NREG2) { + printf("Bad register in MUL: d=%d, s=%d\n",d,s); + abort(); + } + emit_byte(0xf7); + emit_byte(0xe2); +} +LENDFUNC(NONE,NONE,2,raw_mul_64_32,(RW4 d, RW4 s)) + +LOWFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) +{ + abort(); /* %^$&%^$%#^ x86! */ + emit_byte(0x0f); + emit_byte(0xaf); + emit_byte(0xc0+8*d+s); +} +LENDFUNC(NONE,NONE,2,raw_mul_32_32,(RW4 d, R4 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) +{ + emit_byte(0x88); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_rr,(W1 d, R1 s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_rr,(W2 d, R2 s)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) +{ + int isebp=(baser==5)?0x40:0; + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + + emit_byte(0x8b); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x8a); + emit_byte(0x04+8*d+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,READ,4,raw_mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + + isebp=(baser==5)?0x40:0; + + emit_byte(0x89); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) +{ + int fi; + int isebp; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + isebp=(baser==5)?0x40:0; + + emit_byte(0x88); + emit_byte(0x04+8*s+isebp); + emit_byte(baser+8*index+0x40*fi); + if (isebp) + emit_byte(0x00); +} +LENDFUNC(NONE,WRITE,4,raw_mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x89); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) + +LOWFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x88); + emit_byte(0x84+8*s); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,WRITE,5,raw_mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) + +LOWFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8b); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8a); + emit_byte(0x84+8*d); + emit_byte(baser+8*index+0x40*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,5,raw_mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) +{ + int fi; + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: + fprintf(stderr,"Bad factor %d in mov_l_rm_indexed!\n",factor); + abort(); + } + emit_byte(0x8b); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); +} +LENDFUNC(NONE,READ,4,raw_mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) + +LOWFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) +{ + int fi; + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: + fprintf(stderr,"Bad factor %d in mov_l_rm_indexed!\n",factor); + abort(); + } + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cond); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); + } + else { /* replacement using branch and mov */ + int uncc=(cond^1); + emit_byte(0x70+uncc); + emit_byte(7); /* skip next 7 bytes if not cc=true */ + emit_byte(0x8b); + emit_byte(0x04+8*d); + emit_byte(0x05+8*index+64*fi); + emit_long(base); + } +} +LENDFUNC(NONE,READ,5,raw_cmov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) +{ + if (have_cmov) { + emit_byte(0x0f); + emit_byte(0x40+cond); + emit_byte(0x05+8*d); + emit_long(mem); + } + else { /* replacement using branch and mov */ + int uncc=(cond^1); + emit_byte(0x70+uncc); + emit_byte(6); /* skip next 6 bytes if not cc=true */ + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(mem); + } +} +LENDFUNC(NONE,READ,3,raw_cmov_l_rm,(W4 d, IMM mem, IMM cond)) + +LOWFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x8b); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_l_rR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_w_rR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x8a); + emit_byte(0x40+8*d+s); + emit_byte(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_b_rR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) +{ + emit_byte(0x8b); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_l_brR,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) +{ + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_w_brR,(W2 d, R4 s, IMM offset)) + +LOWFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) +{ + emit_byte(0x8a); + emit_byte(0x80+8*d+s); + emit_long(offset); +} +LENDFUNC(NONE,READ,3,raw_mov_b_brR,(W1 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0xc7); + emit_byte(0x40+d); + emit_byte(offset); + emit_long(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0xc7); + emit_byte(0x40+d); + emit_byte(offset); + emit_word(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0xc6); + emit_byte(0x40+d); + emit_byte(offset); + emit_byte(i); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Ri,(R4 d, IMM i, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_Rr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_Rr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) +{ + Dif(!isbyte(offset)) abort(); + emit_byte(0x88); + emit_byte(0x40+8*s+d); + emit_byte(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_Rr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x8d); + emit_byte(0x40+8*d+s); + emit_byte(offset); + } + else { + emit_byte(0x8d); + emit_byte(0x80+8*d+s); + emit_long(offset); + } +} +LENDFUNC(NONE,NONE,3,raw_lea_l_brr,(W4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x8d); + emit_byte(0x44+8*d); + emit_byte(0x40*fi+8*index+s); + emit_byte(offset); + } + else { + emit_byte(0x8d); + emit_byte(0x84+8*d); + emit_byte(0x40*fi+8*index+s); + emit_long(offset); + } +} +LENDFUNC(NONE,NONE,5,raw_lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) + +LOWFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) +{ + int isebp=(s==5)?0x40:0; + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + + emit_byte(0x8d); + emit_byte(0x04+8*d+isebp); + emit_byte(0x40*fi+8*index+s); + if (isebp) + emit_byte(0); +} +LENDFUNC(NONE,NONE,4,raw_lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) + +LOWFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x89); + emit_byte(0x40+8*s+d); + emit_byte(offset); + } + else { + emit_byte(0x89); + emit_byte(0x80+8*s+d); + emit_long(offset); + } +} +LENDFUNC(NONE,WRITE,3,raw_mov_l_bRr,(R4 d, R4 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x80+8*s+d); + emit_long(offset); +} +LENDFUNC(NONE,WRITE,3,raw_mov_w_bRr,(R4 d, R2 s, IMM offset)) + +LOWFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) +{ + if (optimize_imm8 && isbyte(offset)) { + emit_byte(0x88); + emit_byte(0x40+8*s+d); + emit_byte(offset); + } + else { + emit_byte(0x88); + emit_byte(0x80+8*s+d); + emit_long(offset); + } +} +LENDFUNC(NONE,WRITE,3,raw_mov_b_bRr,(R4 d, R1 s, IMM offset)) + +LOWFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) +{ + emit_byte(0x0f); + emit_byte(0xc8+r); +} +LENDFUNC(NONE,NONE,1,raw_bswap_32,(RW4 r)) + +LOWFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) +{ + emit_byte(0x66); + emit_byte(0xc1); + emit_byte(0xc0+r); + emit_byte(0x08); +} +LENDFUNC(WRITE,NONE,1,raw_bswap_16,(RW2 r)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) +{ + emit_byte(0x89); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_rr,(W4 d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) +{ + emit_byte(0x89); + emit_byte(0x05+8*s); + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_l_mr,(IMM d, R4 s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x89); + emit_byte(0x05+8*s); + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_w_mr,(IMM d, R2 s)) + +LOWFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0x8b); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_w_rm,(W2 d, IMM s)) + +LOWFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) +{ + emit_byte(0x88); + emit_byte(0x05+8*(s&0xf)); /* XXX this handles %ah case (defined as 0x10+4) and others */ + emit_long(d); +} +LENDFUNC(NONE,WRITE,2,raw_mov_b_mr,(IMM d, R1 s)) + +LOWFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) +{ + emit_byte(0x8a); + emit_byte(0x05+8*d); + emit_long(s); +} +LENDFUNC(NONE,READ,2,raw_mov_b_rm,(W1 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) +{ + emit_byte(0xb8+d); + emit_long(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_l_ri,(W4 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0xb8+d); + emit_word(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_w_ri,(W2 d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) +{ + emit_byte(0xb0+d); + emit_byte(s); +} +LENDFUNC(NONE,NONE,2,raw_mov_b_ri,(W1 d, IMM s)) + +LOWFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) +{ + emit_byte(0x81); + emit_byte(0x15); + emit_long(d); + emit_long(s); +} +LENDFUNC(RMW,RMW,2,raw_adc_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x05); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x05); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,RMW,2,raw_add_l_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) +{ + emit_byte(0x66); + emit_byte(0x81); + emit_byte(0x05); + emit_long(d); + emit_word(s); +} +LENDFUNC(WRITE,RMW,2,raw_add_w_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) +{ + emit_byte(0x80); + emit_byte(0x05); + emit_long(d); + emit_byte(s); +} +LENDFUNC(WRITE,RMW,2,raw_add_b_mi,(IMM d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0xa9); + else { + emit_byte(0xf7); + emit_byte(0xc0+d); + } + emit_long(i); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_ri,(R4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) +{ + emit_byte(0x85); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_l_rr,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x85); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_w_rr,(R2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) +{ + emit_byte(0x84); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_test_b_rr,(R1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) +{ + emit_byte(0x81); + emit_byte(0xf0+d); + emit_long(i); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x25); + else { + emit_byte(0x81); + emit_byte(0xe0+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_and_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x25); + else { + emit_byte(0x81); + emit_byte(0xe0+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_and_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) +{ + emit_byte(0x21); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x21); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) +{ + emit_byte(0x20); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_and_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x0d); + else { + emit_byte(0x81); + emit_byte(0xc8+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_or_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) +{ + emit_byte(0x09); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x09); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) +{ + emit_byte(0x08); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_or_b,(RW1 d, R1 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) +{ + emit_byte(0x11); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x11); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) +{ + emit_byte(0x10); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_adc_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) +{ + emit_byte(0x01); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x01); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) +{ + emit_byte(0x00); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_add_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) +{ + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xe8+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x2d); + else { + emit_byte(0x81); + emit_byte(0xe8+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_sub_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x2c); + else { + emit_byte(0x80); + emit_byte(0xe8+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b_ri,(RW1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) +{ + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x05); + else { + emit_byte(0x81); + emit_byte(0xc0+d); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_add_l_ri,(RW4 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) +{ + emit_byte(0x66); + if (isbyte(i)) { + emit_byte(0x83); + emit_byte(0xc0+d); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(d)) + emit_byte(0x05); + else { + emit_byte(0x81); + emit_byte(0xc0+d); + } + emit_word(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_add_w_ri,(RW2 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x04); + else { + emit_byte(0x80); + emit_byte(0xc0+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_add_b_ri,(RW1 d, IMM i)) + +LOWFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) +{ + emit_byte(0x19); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_l,(RW4 d, R4 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x19); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_w,(RW2 d, R2 s)) + +LOWFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) +{ + emit_byte(0x18); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(RMW,NONE,2,raw_sbb_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) +{ + emit_byte(0x29); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x29); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) +{ + emit_byte(0x28); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_sub_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) +{ + emit_byte(0x39); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l,(R4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) +{ + if (optimize_imm8 && isbyte(i)) { + emit_byte(0x83); + emit_byte(0xf8+r); + emit_byte(i); + } + else { + if (optimize_accum && isaccum(r)) + emit_byte(0x3d); + else { + emit_byte(0x81); + emit_byte(0xf8+r); + } + emit_long(i); + } +} +LENDFUNC(WRITE,NONE,2,raw_cmp_l_ri,(R4 r, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x39); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_w,(R2 d, R2 s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_b_mi,(MEMR d, IMM s)) +{ + emit_byte(0x80); + emit_byte(0x3d); + emit_long(d); + emit_byte(s); +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) +{ + if (optimize_accum && isaccum(d)) + emit_byte(0x3c); + else { + emit_byte(0x80); + emit_byte(0xf8+d); + } + emit_byte(i); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b_ri,(R1 d, IMM i)) + +LOWFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) +{ + emit_byte(0x38); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_cmp_b,(R1 d, R1 s)) + +LOWFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) +{ + int fi; + + switch(factor) { + case 1: fi=0; break; + case 2: fi=1; break; + case 4: fi=2; break; + case 8: fi=3; break; + default: abort(); + } + emit_byte(0x39); + emit_byte(0x04+8*d); + emit_byte(5+8*index+0x40*fi); + emit_long(offset); +} +LENDFUNC(WRITE,READ,4,raw_cmp_l_rm_indexed,(R4 d, IMM offset, R4 index, IMM factor)) + +LOWFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) +{ + emit_byte(0x31); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_l,(RW4 d, R4 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) +{ + emit_byte(0x66); + emit_byte(0x31); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_w,(RW2 d, R2 s)) + +LOWFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) +{ + emit_byte(0x30); + emit_byte(0xc0+8*s+d); +} +LENDFUNC(WRITE,NONE,2,raw_xor_b,(RW1 d, R1 s)) + +LOWFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x2d); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x2d); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,RMW,2,raw_sub_l_mi,(MEMRW d, IMM s)) + +LOWFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) +{ + if (optimize_imm8 && isbyte(s)) { + emit_byte(0x83); + emit_byte(0x3d); + emit_long(d); + emit_byte(s); + } + else { + emit_byte(0x81); + emit_byte(0x3d); + emit_long(d); + emit_long(s); + } +} +LENDFUNC(WRITE,READ,2,raw_cmp_l_mi,(MEMR d, IMM s)) + +LOWFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) +{ + emit_byte(0x87); + emit_byte(0xc0+8*r1+r2); +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +LOWFUNC(NONE,NONE,2,raw_xchg_b_rr,(RW4 r1, RW4 r2)) +{ + emit_byte(0x86); + emit_byte(0xc0+8*(r1&0xf)+(r2&0xf)); /* XXX this handles upper-halves registers (e.g. %ah defined as 0x10+4) */ +} +LENDFUNC(NONE,NONE,2,raw_xchg_l_rr,(RW4 r1, RW4 r2)) + +/************************************************************************* + * FIXME: mem access modes probably wrong * + *************************************************************************/ + +LOWFUNC(READ,WRITE,0,raw_pushfl,(void)) +{ + emit_byte(0x9c); +} +LENDFUNC(READ,WRITE,0,raw_pushfl,(void)) + +LOWFUNC(WRITE,READ,0,raw_popfl,(void)) +{ + emit_byte(0x9d); +} +LENDFUNC(WRITE,READ,0,raw_popfl,(void)) + +/* Generate floating-point instructions */ +static inline void x86_fadd_m(MEMR s) +{ + emit_byte(0xdc); + emit_byte(0x05); + emit_long(s); +} + +#endif + +/************************************************************************* + * Unoptimizable stuff --- jump * + *************************************************************************/ + +static __inline__ void raw_call_r(R4 r) +{ +#if USE_NEW_RTASM + CALLsr(r); +#else + emit_byte(0xff); + emit_byte(0xd0+r); +#endif +} + +static __inline__ void raw_call_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) +{ +#if USE_NEW_RTASM + CALLsm(base, X86_NOREG, r, m); +#else + int mu; + switch(m) { + case 1: mu=0; break; + case 2: mu=1; break; + case 4: mu=2; break; + case 8: mu=3; break; + default: abort(); + } + emit_byte(0xff); + emit_byte(0x14); + emit_byte(0x05+8*r+0x40*mu); + emit_long(base); +#endif +} + +static __inline__ void raw_jmp_r(R4 r) +{ +#if USE_NEW_RTASM + JMPsr(r); +#else + emit_byte(0xff); + emit_byte(0xe0+r); +#endif +} + +static __inline__ void raw_jmp_m_indexed(uae_u32 base, uae_u32 r, uae_u32 m) +{ +#if USE_NEW_RTASM + JMPsm(base, X86_NOREG, r, m); +#else + int mu; + switch(m) { + case 1: mu=0; break; + case 2: mu=1; break; + case 4: mu=2; break; + case 8: mu=3; break; + default: abort(); + } + emit_byte(0xff); + emit_byte(0x24); + emit_byte(0x05+8*r+0x40*mu); + emit_long(base); +#endif +} + +static __inline__ void raw_jmp_m(uae_u32 base) +{ + emit_byte(0xff); + emit_byte(0x25); + emit_long(base); +} + + +static __inline__ void raw_call(uae_u32 t) +{ +#if USE_NEW_RTASM + CALLm(t); +#else + emit_byte(0xe8); + emit_long(t-(uae_u32)target-4); +#endif +} + +static __inline__ void raw_jmp(uae_u32 t) +{ +#if USE_NEW_RTASM + JMPm(t); +#else + emit_byte(0xe9); + emit_long(t-(uae_u32)target-4); +#endif +} + +static __inline__ void raw_jl(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x8c); + emit_long(t-(uintptr)target-4); +} + +static __inline__ void raw_jz(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x84); + emit_long(t-(uintptr)target-4); +} + +static __inline__ void raw_jnz(uae_u32 t) +{ + emit_byte(0x0f); + emit_byte(0x85); + emit_long(t-(uintptr)target-4); +} + +static __inline__ void raw_jnz_l_oponly(void) +{ + emit_byte(0x0f); + emit_byte(0x85); +} + +static __inline__ void raw_jcc_l_oponly(int cc) +{ + emit_byte(0x0f); + emit_byte(0x80+cc); +} + +static __inline__ void raw_jnz_b_oponly(void) +{ + emit_byte(0x75); +} + +static __inline__ void raw_jz_b_oponly(void) +{ + emit_byte(0x74); +} + +static __inline__ void raw_jcc_b_oponly(int cc) +{ + emit_byte(0x70+cc); +} + +static __inline__ void raw_jmp_l_oponly(void) +{ + emit_byte(0xe9); +} + +static __inline__ void raw_jmp_b_oponly(void) +{ + emit_byte(0xeb); +} + +static __inline__ void raw_ret(void) +{ + emit_byte(0xc3); +} + +static __inline__ void raw_nop(void) +{ + emit_byte(0x90); +} + +static __inline__ void raw_emit_nop_filler(int nbytes) +{ + /* Source: GNU Binutils 2.12.90.0.15 */ + /* Various efficient no-op patterns for aligning code labels. + Note: Don't try to assemble the instructions in the comments. + 0L and 0w are not legal. */ + static const uae_u8 f32_1[] = + {0x90}; /* nop */ + static const uae_u8 f32_2[] = + {0x89,0xf6}; /* movl %esi,%esi */ + static const uae_u8 f32_3[] = + {0x8d,0x76,0x00}; /* leal 0(%esi),%esi */ + static const uae_u8 f32_4[] = + {0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ + static const uae_u8 f32_5[] = + {0x90, /* nop */ + 0x8d,0x74,0x26,0x00}; /* leal 0(%esi,1),%esi */ + static const uae_u8 f32_6[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00}; /* leal 0L(%esi),%esi */ + static const uae_u8 f32_7[] = + {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ + static const uae_u8 f32_8[] = + {0x90, /* nop */ + 0x8d,0xb4,0x26,0x00,0x00,0x00,0x00}; /* leal 0L(%esi,1),%esi */ + static const uae_u8 f32_9[] = + {0x89,0xf6, /* movl %esi,%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_10[] = + {0x8d,0x76,0x00, /* leal 0(%esi),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_11[] = + {0x8d,0x74,0x26,0x00, /* leal 0(%esi,1),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_12[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ + 0x8d,0xbf,0x00,0x00,0x00,0x00}; /* leal 0L(%edi),%edi */ + static const uae_u8 f32_13[] = + {0x8d,0xb6,0x00,0x00,0x00,0x00, /* leal 0L(%esi),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_14[] = + {0x8d,0xb4,0x26,0x00,0x00,0x00,0x00, /* leal 0L(%esi,1),%esi */ + 0x8d,0xbc,0x27,0x00,0x00,0x00,0x00}; /* leal 0L(%edi,1),%edi */ + static const uae_u8 f32_15[] = + {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ + 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; + static const uae_u8 f32_16[] = + {0xeb,0x0d,0x90,0x90,0x90,0x90,0x90, /* jmp .+15; lotsa nops */ + 0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90,0x90}; + static const uae_u8 *const f32_patt[] = { + f32_1, f32_2, f32_3, f32_4, f32_5, f32_6, f32_7, f32_8, + f32_9, f32_10, f32_11, f32_12, f32_13, f32_14, f32_15 + }; + static const uae_u8 prefixes[4] = { 0x66, 0x66, 0x66, 0x66 }; + +#if defined(__x86_64__) + /* The recommended way to pad 64bit code is to use NOPs preceded by + maximally four 0x66 prefixes. Balance the size of nops. */ + if (nbytes == 0) + return; + + int i; + int nnops = (nbytes + 3) / 4; + int len = nbytes / nnops; + int remains = nbytes - nnops * len; + + for (i = 0; i < remains; i++) { + emit_block(prefixes, len); + raw_nop(); + } + for (; i < nnops; i++) { + emit_block(prefixes, len - 1); + raw_nop(); + } +#else + int nloops = nbytes / 16; + while (nloops-- > 0) + emit_block(f32_16, sizeof(f32_16)); + + nbytes %= 16; + if (nbytes) + emit_block(f32_patt[nbytes - 1], nbytes); +#endif +} + + +/************************************************************************* + * Flag handling, to and fro UAE flag register * + *************************************************************************/ + +static __inline__ void raw_flags_evicted(int r) +{ + //live.state[FLAGTMP].status=CLEAN; + live.state[FLAGTMP].status=INMEM; + live.state[FLAGTMP].realreg=-1; + /* We just "evicted" FLAGTMP. */ + if (live.nat[r].nholds!=1) { + /* Huh? */ + abort(); + } + live.nat[r].nholds=0; +} + +#define FLAG_NREG1_FLAGREG 0 /* Set to -1 if any register will do */ +static __inline__ void raw_flags_to_reg_FLAGREG(int r) +{ + raw_lahf(0); /* Most flags in AH */ + //raw_setcc(r,0); /* V flag in AL */ + raw_setcc_m((uintptr)live.state[FLAGTMP].mem,0); + +#if 1 /* Let's avoid those nasty partial register stalls */ + //raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,r); + raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,AH_INDEX); + raw_flags_evicted(r); +#endif +} + +#define FLAG_NREG2_FLAGREG 0 /* Set to -1 if any register will do */ +static __inline__ void raw_reg_to_flags_FLAGREG(int r) +{ + raw_cmp_b_ri(r,-127); /* set V */ + raw_sahf(0); +} + +#define FLAG_NREG3_FLAGREG 0 /* Set to -1 if any register will do */ +static __inline__ void raw_flags_set_zero_FLAGREG(int s, int tmp) +{ + raw_mov_l_rr(tmp,s); + raw_lahf(s); /* flags into ah */ + raw_and_l_ri(s,0xffffbfff); + raw_and_l_ri(tmp,0x00004000); + raw_xor_l_ri(tmp,0x00004000); + raw_or_l(s,tmp); + raw_sahf(s); +} + +static __inline__ void raw_flags_init_FLAGREG(void) { } + +#define FLAG_NREG1_FLAGSTK -1 /* Set to -1 if any register will do */ +static __inline__ void raw_flags_to_reg_FLAGSTK(int r) +{ + raw_pushfl(); + raw_pop_l_r(r); + raw_mov_l_mr((uintptr)live.state[FLAGTMP].mem,r); + raw_flags_evicted(r); +} + +#define FLAG_NREG2_FLAGSTK -1 /* Set to -1 if any register will do */ +static __inline__ void raw_reg_to_flags_FLAGSTK(int r) +{ + raw_push_l_r(r); + raw_popfl(); +} + +#define FLAG_NREG3_FLAGSTK -1 /* Set to -1 if any register will do */ +static __inline__ void raw_flags_set_zero_FLAGSTK(int s, int tmp) +{ + raw_mov_l_rr(tmp,s); + raw_pushfl(); + raw_pop_l_r(s); + raw_and_l_ri(s,0xffffffbf); + raw_and_l_ri(tmp,0x00000040); + raw_xor_l_ri(tmp,0x00000040); + raw_or_l(s,tmp); + raw_push_l_r(s); + raw_popfl(); +} + +static __inline__ void raw_flags_init_FLAGSTK(void) { } + +#if defined(__x86_64__) +/* Try to use the LAHF/SETO method on x86_64 since it is faster. + This can't be the default because some older CPUs don't support + LAHF/SAHF in long mode. */ +static int FLAG_NREG1_FLAGGEN = 0; +static __inline__ void raw_flags_to_reg_FLAGGEN(int r) +{ + if (have_lahf_lm) { + // NOTE: the interpreter uses the normal EFLAGS layout + // pushf/popf CF(0) ZF( 6) SF( 7) OF(11) + // sahf/lahf CF(8) ZF(14) SF(15) OF( 0) + assert(r == 0); + raw_setcc(r,0); /* V flag in AL */ + raw_lea_l_r_scaled(0,0,8); /* move it to its EFLAGS location */ + raw_mov_b_mr(((uintptr)live.state[FLAGTMP].mem)+1,0); + raw_lahf(0); /* most flags in AH */ + raw_mov_b_mr((uintptr)live.state[FLAGTMP].mem,AH_INDEX); + raw_flags_evicted(r); + } + else + raw_flags_to_reg_FLAGSTK(r); +} + +static int FLAG_NREG2_FLAGGEN = 0; +static __inline__ void raw_reg_to_flags_FLAGGEN(int r) +{ + if (have_lahf_lm) { + raw_xchg_b_rr(0,AH_INDEX); + raw_cmp_b_ri(r,-120); /* set V */ + raw_sahf(0); + } + else + raw_reg_to_flags_FLAGSTK(r); +} + +static int FLAG_NREG3_FLAGGEN = 0; +static __inline__ void raw_flags_set_zero_FLAGGEN(int s, int tmp) +{ + if (have_lahf_lm) + raw_flags_set_zero_FLAGREG(s, tmp); + else + raw_flags_set_zero_FLAGSTK(s, tmp); +} + +static __inline__ void raw_flags_init_FLAGGEN(void) +{ + if (have_lahf_lm) { + FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGREG; + FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGREG; + FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGREG; + } + else { + FLAG_NREG1_FLAGGEN = FLAG_NREG1_FLAGSTK; + FLAG_NREG2_FLAGGEN = FLAG_NREG2_FLAGSTK; + FLAG_NREG1_FLAGGEN = FLAG_NREG3_FLAGSTK; + } +} +#endif + +#ifdef SAHF_SETO_PROFITABLE +#define FLAG_SUFFIX FLAGREG +#elif defined __x86_64__ +#define FLAG_SUFFIX FLAGGEN +#else +#define FLAG_SUFFIX FLAGSTK +#endif + +#define FLAG_GLUE_2(x, y) x ## _ ## y +#define FLAG_GLUE_1(x, y) FLAG_GLUE_2(x, y) +#define FLAG_GLUE(x) FLAG_GLUE_1(x, FLAG_SUFFIX) + +#define raw_flags_init FLAG_GLUE(raw_flags_init) +#define FLAG_NREG1 FLAG_GLUE(FLAG_NREG1) +#define raw_flags_to_reg FLAG_GLUE(raw_flags_to_reg) +#define FLAG_NREG2 FLAG_GLUE(FLAG_NREG2) +#define raw_reg_to_flags FLAG_GLUE(raw_reg_to_flags) +#define FLAG_NREG3 FLAG_GLUE(FLAG_NREG3) +#define raw_flags_set_zero FLAG_GLUE(raw_flags_set_zero) + +/* Apparently, there are enough instructions between flag store and + flag reload to avoid the partial memory stall */ +static __inline__ void raw_load_flagreg(uae_u32 target, uae_u32 r) +{ +#if 1 + raw_mov_l_rm(target,(uintptr)live.state[r].mem); +#else + raw_mov_b_rm(target,(uintptr)live.state[r].mem); + raw_mov_b_rm(target+4,((uintptr)live.state[r].mem)+1); +#endif +} + +/* FLAGX is byte sized, and we *do* write it at that size */ +static __inline__ void raw_load_flagx(uae_u32 target, uae_u32 r) +{ + if (live.nat[target].canbyte) + raw_mov_b_rm(target,(uintptr)live.state[r].mem); + else if (live.nat[target].canword) + raw_mov_w_rm(target,(uintptr)live.state[r].mem); + else + raw_mov_l_rm(target,(uintptr)live.state[r].mem); +} + +static __inline__ void raw_dec_sp(int off) +{ + if (off) raw_sub_l_ri(ESP_INDEX,off); +} + +static __inline__ void raw_inc_sp(int off) +{ + if (off) raw_add_l_ri(ESP_INDEX,off); +} + +/************************************************************************* + * Handling mistaken direct memory access * + *************************************************************************/ + +// gb-- I don't need that part for JIT Basilisk II +#if defined(NATMEM_OFFSET) && 0 +#include +#include + +#define SIG_READ 1 +#define SIG_WRITE 2 + +static int in_handler=0; +static uae_u8 veccode[256]; + +static void vec(int x, struct sigcontext sc) +{ + uae_u8* i=(uae_u8*)sc.eip; + uae_u32 addr=sc.cr2; + int r=-1; + int size=4; + int dir=-1; + int len=0; + int j; + + write_log("fault address is %08x at %08x\n",sc.cr2,sc.eip); + if (!canbang) + write_log("Not happy! Canbang is 0 in SIGSEGV handler!\n"); + if (in_handler) + write_log("Argh --- Am already in a handler. Shouldn't happen!\n"); + + if (canbang && i>=compiled_code && i<=current_compile_p) { + if (*i==0x66) { + i++; + size=2; + len++; + } + + switch(i[0]) { + case 0x8a: + if ((i[1]&0xc0)==0x80) { + r=(i[1]>>3)&7; + dir=SIG_READ; + size=1; + len+=6; + break; + } + break; + case 0x88: + if ((i[1]&0xc0)==0x80) { + r=(i[1]>>3)&7; + dir=SIG_WRITE; + size=1; + len+=6; + break; + } + break; + case 0x8b: + if ((i[1]&0xc0)==0x80) { + r=(i[1]>>3)&7; + dir=SIG_READ; + len+=6; + break; + } + if ((i[1]&0xc0)==0x40) { + r=(i[1]>>3)&7; + dir=SIG_READ; + len+=3; + break; + } + break; + case 0x89: + if ((i[1]&0xc0)==0x80) { + r=(i[1]>>3)&7; + dir=SIG_WRITE; + len+=6; + break; + } + if ((i[1]&0xc0)==0x40) { + r=(i[1]>>3)&7; + dir=SIG_WRITE; + len+=3; + break; + } + break; + } + } + + if (r!=-1) { + void* pr=NULL; + write_log("register was %d, direction was %d, size was %d\n",r,dir,size); + + switch(r) { + case 0: pr=&(sc.eax); break; + case 1: pr=&(sc.ecx); break; + case 2: pr=&(sc.edx); break; + case 3: pr=&(sc.ebx); break; + case 4: pr=(size>1)?NULL:(((uae_u8*)&(sc.eax))+1); break; + case 5: pr=(size>1)? + (void*)(&(sc.ebp)): + (void*)(((uae_u8*)&(sc.ecx))+1); break; + case 6: pr=(size>1)? + (void*)(&(sc.esi)): + (void*)(((uae_u8*)&(sc.edx))+1); break; + case 7: pr=(size>1)? + (void*)(&(sc.edi)): + (void*)(((uae_u8*)&(sc.ebx))+1); break; + default: abort(); + } + if (pr) { + blockinfo* bi; + + if (currprefs.comp_oldsegv) { + addr-=NATMEM_OFFSET; + + if ((addr>=0x10000000 && addr<0x40000000) || + (addr>=0x50000000)) { + write_log("Suspicious address in %x SEGV handler.\n",addr); + } + if (dir==SIG_READ) { + switch(size) { + case 1: *((uae_u8*)pr)=get_byte(addr); break; + case 2: *((uae_u16*)pr)=get_word(addr); break; + case 4: *((uae_u32*)pr)=get_long(addr); break; + default: abort(); + } + } + else { /* write */ + switch(size) { + case 1: put_byte(addr,*((uae_u8*)pr)); break; + case 2: put_word(addr,*((uae_u16*)pr)); break; + case 4: put_long(addr,*((uae_u32*)pr)); break; + default: abort(); + } + } + write_log("Handled one access!\n"); + fflush(stdout); + segvcount++; + sc.eip+=len; + } + else { + void* tmp=target; + int i; + uae_u8 vecbuf[5]; + + addr-=NATMEM_OFFSET; + + if ((addr>=0x10000000 && addr<0x40000000) || + (addr>=0x50000000)) { + write_log("Suspicious address in %x SEGV handler.\n",addr); + } + + target=(uae_u8*)sc.eip; + for (i=0;i<5;i++) + vecbuf[i]=target[i]; + emit_byte(0xe9); + emit_long((uintptr)veccode-(uintptr)target-4); + write_log("Create jump to %p\n",veccode); + + write_log("Handled one access!\n"); + fflush(stdout); + segvcount++; + + target=veccode; + + if (dir==SIG_READ) { + switch(size) { + case 1: raw_mov_b_ri(r,get_byte(addr)); break; + case 2: raw_mov_w_ri(r,get_byte(addr)); break; + case 4: raw_mov_l_ri(r,get_byte(addr)); break; + default: abort(); + } + } + else { /* write */ + switch(size) { + case 1: put_byte(addr,*((uae_u8*)pr)); break; + case 2: put_word(addr,*((uae_u16*)pr)); break; + case 4: put_long(addr,*((uae_u32*)pr)); break; + default: abort(); + } + } + for (i=0;i<5;i++) + raw_mov_b_mi(sc.eip+i,vecbuf[i]); + raw_mov_l_mi((uintptr)&in_handler,0); + emit_byte(0xe9); + emit_long(sc.eip+len-(uintptr)target-4); + in_handler=1; + target=tmp; + } + bi=active; + while (bi) { + if (bi->handler && + (uae_u8*)bi->direct_handler<=i && + (uae_u8*)bi->nexthandler>i) { + write_log("deleted trigger (%p<%p<%p) %p\n", + bi->handler, + i, + bi->nexthandler, + bi->pc_p); + invalidate_block(bi); + raise_in_cl_list(bi); + set_special(0); + return; + } + bi=bi->next; + } + /* Not found in the active list. Might be a rom routine that + is in the dormant list */ + bi=dormant; + while (bi) { + if (bi->handler && + (uae_u8*)bi->direct_handler<=i && + (uae_u8*)bi->nexthandler>i) { + write_log("deleted trigger (%p<%p<%p) %p\n", + bi->handler, + i, + bi->nexthandler, + bi->pc_p); + invalidate_block(bi); + raise_in_cl_list(bi); + set_special(0); + return; + } + bi=bi->next; + } + write_log("Huh? Could not find trigger!\n"); + return; + } + } + write_log("Can't handle access!\n"); + for (j=0;j<10;j++) { + write_log("instruction byte %2d is %02x\n",j,i[j]); + } + write_log("Please send the above info (starting at \"fault address\") to\n" + "bmeyer@csse.monash.edu.au\n" + "This shouldn't happen ;-)\n"); + fflush(stdout); + signal(SIGSEGV,SIG_DFL); /* returning here will cause a "real" SEGV */ +} +#endif + + +/************************************************************************* + * Checking for CPU features * + *************************************************************************/ + +struct cpuinfo_x86 { + uae_u8 x86; // CPU family + uae_u8 x86_vendor; // CPU vendor + uae_u8 x86_processor; // CPU canonical processor type + uae_u8 x86_brand_id; // CPU BrandID if supported, yield 0 otherwise + uae_u32 x86_hwcap; + uae_u8 x86_model; + uae_u8 x86_mask; + int cpuid_level; // Maximum supported CPUID level, -1=no CPUID + char x86_vendor_id[16]; +}; +struct cpuinfo_x86 cpuinfo; + +enum { + X86_VENDOR_INTEL = 0, + X86_VENDOR_CYRIX = 1, + X86_VENDOR_AMD = 2, + X86_VENDOR_UMC = 3, + X86_VENDOR_NEXGEN = 4, + X86_VENDOR_CENTAUR = 5, + X86_VENDOR_RISE = 6, + X86_VENDOR_TRANSMETA = 7, + X86_VENDOR_NSC = 8, + X86_VENDOR_UNKNOWN = 0xff +}; + +enum { + X86_PROCESSOR_I386, /* 80386 */ + X86_PROCESSOR_I486, /* 80486DX, 80486SX, 80486DX[24] */ + X86_PROCESSOR_PENTIUM, + X86_PROCESSOR_PENTIUMPRO, + X86_PROCESSOR_K6, + X86_PROCESSOR_ATHLON, + X86_PROCESSOR_PENTIUM4, + X86_PROCESSOR_X86_64, + X86_PROCESSOR_max +}; + +static const char * x86_processor_string_table[X86_PROCESSOR_max] = { + "80386", + "80486", + "Pentium", + "PentiumPro", + "K6", + "Athlon", + "Pentium4", + "x86-64" +}; + +static struct ptt { + const int align_loop; + const int align_loop_max_skip; + const int align_jump; + const int align_jump_max_skip; + const int align_func; +} +x86_alignments[X86_PROCESSOR_max] = { + { 4, 3, 4, 3, 4 }, + { 16, 15, 16, 15, 16 }, + { 16, 7, 16, 7, 16 }, + { 16, 15, 16, 7, 16 }, + { 32, 7, 32, 7, 32 }, + { 16, 7, 16, 7, 16 }, + { 0, 0, 0, 0, 0 }, + { 16, 7, 16, 7, 16 } +}; + +static void +x86_get_cpu_vendor(struct cpuinfo_x86 *c) +{ + char *v = c->x86_vendor_id; + + if (!strcmp(v, "GenuineIntel")) + c->x86_vendor = X86_VENDOR_INTEL; + else if (!strcmp(v, "AuthenticAMD")) + c->x86_vendor = X86_VENDOR_AMD; + else if (!strcmp(v, "CyrixInstead")) + c->x86_vendor = X86_VENDOR_CYRIX; + else if (!strcmp(v, "Geode by NSC")) + c->x86_vendor = X86_VENDOR_NSC; + else if (!strcmp(v, "UMC UMC UMC ")) + c->x86_vendor = X86_VENDOR_UMC; + else if (!strcmp(v, "CentaurHauls")) + c->x86_vendor = X86_VENDOR_CENTAUR; + else if (!strcmp(v, "NexGenDriven")) + c->x86_vendor = X86_VENDOR_NEXGEN; + else if (!strcmp(v, "RiseRiseRise")) + c->x86_vendor = X86_VENDOR_RISE; + else if (!strcmp(v, "GenuineTMx86") || + !strcmp(v, "TransmetaCPU")) + c->x86_vendor = X86_VENDOR_TRANSMETA; + else + c->x86_vendor = X86_VENDOR_UNKNOWN; +} + +static void +cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) +{ + const int CPUID_SPACE = 4096; + uae_u8* cpuid_space = (uae_u8 *)vm_acquire(CPUID_SPACE); + if (cpuid_space == VM_MAP_FAILED) + abort(); + vm_protect(cpuid_space, CPUID_SPACE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); + + static uae_u32 s_op, s_eax, s_ebx, s_ecx, s_edx; + uae_u8* tmp=get_target(); + + s_op = op; + set_target(cpuid_space); + raw_push_l_r(0); /* eax */ + raw_push_l_r(1); /* ecx */ + raw_push_l_r(2); /* edx */ + raw_push_l_r(3); /* ebx */ + raw_mov_l_rm(0,(uintptr)&s_op); + raw_cpuid(0); + raw_mov_l_mr((uintptr)&s_eax,0); + raw_mov_l_mr((uintptr)&s_ebx,3); + raw_mov_l_mr((uintptr)&s_ecx,1); + raw_mov_l_mr((uintptr)&s_edx,2); + raw_pop_l_r(3); + raw_pop_l_r(2); + raw_pop_l_r(1); + raw_pop_l_r(0); + raw_ret(); + set_target(tmp); + + ((cpuop_func*)cpuid_space)(0); + if (eax != NULL) *eax = s_eax; + if (ebx != NULL) *ebx = s_ebx; + if (ecx != NULL) *ecx = s_ecx; + if (edx != NULL) *edx = s_edx; + + vm_release(cpuid_space, CPUID_SPACE); +} + +static void +raw_init_cpu(void) +{ + struct cpuinfo_x86 *c = &cpuinfo; + + /* Defaults */ + c->x86_processor = X86_PROCESSOR_max; + c->x86_vendor = X86_VENDOR_UNKNOWN; + c->cpuid_level = -1; /* CPUID not detected */ + c->x86_model = c->x86_mask = 0; /* So far unknown... */ + c->x86_vendor_id[0] = '\0'; /* Unset */ + c->x86_hwcap = 0; + + /* Get vendor name */ + c->x86_vendor_id[12] = '\0'; + cpuid(0x00000000, + (uae_u32 *)&c->cpuid_level, + (uae_u32 *)&c->x86_vendor_id[0], + (uae_u32 *)&c->x86_vendor_id[8], + (uae_u32 *)&c->x86_vendor_id[4]); + x86_get_cpu_vendor(c); + + /* Intel-defined flags: level 0x00000001 */ + c->x86_brand_id = 0; + if ( c->cpuid_level >= 0x00000001 ) { + uae_u32 tfms, brand_id; + cpuid(0x00000001, &tfms, &brand_id, NULL, &c->x86_hwcap); + c->x86 = (tfms >> 8) & 15; + if (c->x86 == 0xf) + c->x86 += (tfms >> 20) & 0xff; /* extended family */ + c->x86_model = (tfms >> 4) & 15; + if (c->x86_model == 0xf) + c->x86_model |= (tfms >> 12) & 0xf0; /* extended model */ + c->x86_brand_id = brand_id & 0xff; + c->x86_mask = tfms & 15; + } else { + /* Have CPUID level 0 only - unheard of */ + c->x86 = 4; + } + + /* AMD-defined flags: level 0x80000001 */ + uae_u32 xlvl; + cpuid(0x80000000, &xlvl, NULL, NULL, NULL); + if ( (xlvl & 0xffff0000) == 0x80000000 ) { + if ( xlvl >= 0x80000001 ) { + uae_u32 features, extra_features; + cpuid(0x80000001, NULL, NULL, &extra_features, &features); + if (features & (1 << 29)) { + /* Assume x86-64 if long mode is supported */ + c->x86_processor = X86_PROCESSOR_X86_64; + } + if (extra_features & (1 << 0)) + have_lahf_lm = true; + } + } + + /* Canonicalize processor ID */ + switch (c->x86) { + case 3: + c->x86_processor = X86_PROCESSOR_I386; + break; + case 4: + c->x86_processor = X86_PROCESSOR_I486; + break; + case 5: + if (c->x86_vendor == X86_VENDOR_AMD) + c->x86_processor = X86_PROCESSOR_K6; + else + c->x86_processor = X86_PROCESSOR_PENTIUM; + break; + case 6: + if (c->x86_vendor == X86_VENDOR_AMD) + c->x86_processor = X86_PROCESSOR_ATHLON; + else + c->x86_processor = X86_PROCESSOR_PENTIUMPRO; + break; + case 15: + if (c->x86_processor == X86_PROCESSOR_max) { + switch (c->x86_vendor) { + case X86_VENDOR_INTEL: + c->x86_processor = X86_PROCESSOR_PENTIUM4; + break; + case X86_VENDOR_AMD: + /* Assume a 32-bit Athlon processor if not in long mode */ + c->x86_processor = X86_PROCESSOR_ATHLON; + break; + } + } + break; + } + if (c->x86_processor == X86_PROCESSOR_max) { + c->x86_processor = X86_PROCESSOR_I386; + fprintf(stderr, "Error: unknown processor type, assuming i386\n"); + fprintf(stderr, " Family : %d\n", c->x86); + fprintf(stderr, " Model : %d\n", c->x86_model); + fprintf(stderr, " Mask : %d\n", c->x86_mask); + fprintf(stderr, " Vendor : %s [%d]\n", c->x86_vendor_id, c->x86_vendor); + if (c->x86_brand_id) + fprintf(stderr, " BrandID : %02x\n", c->x86_brand_id); + } + + /* Have CMOV support? */ + have_cmov = (c->x86_hwcap & (1 << 15)) != 0; +#if defined(__x86_64__) + if (!have_cmov) { + write_log("x86-64 implementations are bound to have CMOV!\n"); + abort(); + } +#endif + + /* Can the host CPU suffer from partial register stalls? */ + have_rat_stall = (c->x86_vendor == X86_VENDOR_INTEL); +#if 1 + /* It appears that partial register writes are a bad idea even on + AMD K7 cores, even though they are not supposed to have the + dreaded rat stall. Why? Anyway, that's why we lie about it ;-) */ + if (c->x86_processor == X86_PROCESSOR_ATHLON) + have_rat_stall = true; +#endif + + /* Alignments */ + if (tune_alignment) { + align_loops = x86_alignments[c->x86_processor].align_loop; + align_jumps = x86_alignments[c->x86_processor].align_jump; + } + + write_log("Max CPUID level=%d Processor is %s [%s]\n", + c->cpuid_level, c->x86_vendor_id, + x86_processor_string_table[c->x86_processor]); + + raw_flags_init(); +} + +static bool target_check_bsf(void) +{ + bool mismatch = false; + for (int g_ZF = 0; g_ZF <= 1; g_ZF++) { + for (int g_CF = 0; g_CF <= 1; g_CF++) { + for (int g_OF = 0; g_OF <= 1; g_OF++) { + for (int g_SF = 0; g_SF <= 1; g_SF++) { + for (int value = -1; value <= 1; value++) { + unsigned long flags = (g_SF << 7) | (g_OF << 11) | (g_ZF << 6) | g_CF; + unsigned long tmp = value; +#ifdef _MSC_VER + __writeeflags(flags); + _BitScanForward(&tmp, value); + flags = __readeflags(); +#else + __asm__ __volatile__ ("push %0; popf; bsf %1,%1; pushf; pop %0" + : "+r" (flags), "+r" (tmp) : : "cc"); +#endif + int OF = (flags >> 11) & 1; + int SF = (flags >> 7) & 1; + int ZF = (flags >> 6) & 1; + int CF = flags & 1; + tmp = (value == 0); + if (ZF != tmp || SF != g_SF || OF != g_OF || CF != g_CF) + mismatch = true; + } + }}}} + if (mismatch) + write_log("Target CPU defines all flags on BSF instruction\n"); + return !mismatch; +} + + +/************************************************************************* + * FPU stuff * + *************************************************************************/ + + +static __inline__ void raw_fp_init(void) +{ + int i; + + for (i=0;i1) { + emit_byte(0x9b); + emit_byte(0xdb); + emit_byte(0xe3); + live.tos=-1; + } +#endif + while (live.tos>=1) { + emit_byte(0xde); + emit_byte(0xd9); + live.tos-=2; + } + while (live.tos>=0) { + emit_byte(0xdd); + emit_byte(0xd8); + live.tos--; + } + raw_fp_init(); +} + +static __inline__ void make_tos(int r) +{ + int p,q; + + if (live.spos[r]<0) { /* Register not yet on stack */ + emit_byte(0xd9); + emit_byte(0xe8); /* Push '1' on the stack, just to grow it */ + live.tos++; + live.spos[r]=live.tos; + live.onstack[live.tos]=r; + return; + } + /* Register is on stack */ + if (live.tos==live.spos[r]) + return; + p=live.spos[r]; + q=live.onstack[live.tos]; + + emit_byte(0xd9); + emit_byte(0xc8+live.tos-live.spos[r]); /* exchange it with top of stack */ + live.onstack[live.tos]=r; + live.spos[r]=live.tos; + live.onstack[p]=q; + live.spos[q]=p; +} + +static __inline__ void make_tos2(int r, int r2) +{ + int q; + + make_tos(r2); /* Put the reg that's supposed to end up in position2 + on top */ + + if (live.spos[r]<0) { /* Register not yet on stack */ + make_tos(r); /* This will extend the stack */ + return; + } + /* Register is on stack */ + emit_byte(0xd9); + emit_byte(0xc9); /* Move r2 into position 2 */ + + q=live.onstack[live.tos-1]; + live.onstack[live.tos]=q; + live.spos[q]=live.tos; + live.onstack[live.tos-1]=r2; + live.spos[r2]=live.tos-1; + + make_tos(r); /* And r into 1 */ +} + +static __inline__ int stackpos(int r) +{ + if (live.spos[r]<0) + abort(); + if (live.tos=0) { + /* source is on top of stack, and we already have the dest */ + int dd=stackpos(d); + emit_byte(0xdd); + emit_byte(0xd0+dd); + } + else { + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source on tos */ + tos_make(d); /* store to destination, pop if necessary */ + } +} +LENDFUNC(NONE,NONE,2,raw_fmov_rr,(FW d, FR s)) + +LOWFUNC(NONE,READ,4,raw_fldcw_m_indexed,(R4 index, IMM base)) +{ + emit_byte(0xd9); + emit_byte(0xa8+index); + emit_long(base); +} +LENDFUNC(NONE,READ,4,raw_fldcw_m_indexed,(R4 index, IMM base)) + + +LOWFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xfa); /* take square root */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfa); /* take square root */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsqrt_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe1); /* take fabs */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xe1); /* take fabs */ + } +} +LENDFUNC(NONE,NONE,2,raw_fabs_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xfc); /* take frndint */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfc); /* take frndint */ + } +} +LENDFUNC(NONE,NONE,2,raw_frndint_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xff); /* take cos */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xff); /* take cos */ + } +} +LENDFUNC(NONE,NONE,2,raw_fcos_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xfe); /* take sin */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xfe); /* take sin */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsin_rr,(FW d, FR s)) + +static const double one=1; +LOWFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + + emit_byte(0xd9); + emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ + emit_byte(0xd9); + emit_byte(0xfc); /* rndint */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* subtract rounded from original */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 */ + x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ + emit_byte(0xd9); + emit_byte(0xfd); /* and scale it */ + emit_byte(0xdd); + emit_byte(0xd9); /* take he rounded value off */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_ftwotox_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xea); /* fldl2e */ + emit_byte(0xde); + emit_byte(0xc9); /* fmulp --- multiply source by log2(e) */ + + emit_byte(0xd9); + emit_byte(0xc0); /* duplicate top of stack. Now up to 8 high */ + emit_byte(0xd9); + emit_byte(0xfc); /* rndint */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two elements */ + emit_byte(0xd8); + emit_byte(0xe1); /* subtract rounded from original */ + emit_byte(0xd9); + emit_byte(0xf0); /* f2xm1 */ + x86_fadd_m((uintptr)&one); /* Add '1' without using extra stack space */ + emit_byte(0xd9); + emit_byte(0xfd); /* and scale it */ + emit_byte(0xdd); + emit_byte(0xd9); /* take he rounded value off */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_fetox_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) +{ + int ds; + + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe8); /* push '1' */ + emit_byte(0xd9); + emit_byte(0xc9); /* swap top two */ + emit_byte(0xd9); + emit_byte(0xf1); /* take 1*log2(x) */ + tos_make(d); /* store to destination */ +} +LENDFUNC(NONE,NONE,2,raw_flog2_rr,(FW d, FR s)) + + +LOWFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) +{ + int ds; + + if (d!=s) { + usereg(s); + ds=stackpos(s); + emit_byte(0xd9); + emit_byte(0xc0+ds); /* duplicate source */ + emit_byte(0xd9); + emit_byte(0xe0); /* take fchs */ + tos_make(d); /* store to destination */ + } + else { + make_tos(d); + emit_byte(0xd9); + emit_byte(0xe0); /* take fchs */ + } +} +LENDFUNC(NONE,NONE,2,raw_fneg_rr,(FW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xc0+ds); /* add source to dest*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xc0+ds); /* add source to dest*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fadd_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xe8+ds); /* sub source from dest*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xe0+ds); /* sub src from dest */ + } +} +LENDFUNC(NONE,NONE,2,raw_fsub_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos(d); + ds=stackpos(s); + + emit_byte(0xdd); + emit_byte(0xe0+ds); /* cmp dest with source*/ +} +LENDFUNC(NONE,NONE,2,raw_fcmp_rr,(FR d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xc8+ds); /* mul dest by source*/ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xc8+ds); /* mul dest by source*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fmul_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + if (live.spos[s]==live.tos) { + /* Source is on top of stack */ + ds=stackpos(d); + emit_byte(0xdc); + emit_byte(0xf8+ds); /* div dest by source */ + } + else { + make_tos(d); + ds=stackpos(s); + + emit_byte(0xd8); + emit_byte(0xf0+ds); /* div dest by source*/ + } +} +LENDFUNC(NONE,NONE,2,raw_fdiv_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos2(d,s); + ds=stackpos(s); + + if (ds!=1) { + printf("Failed horribly in raw_frem_rr! ds is %d\n",ds); + abort(); + } + emit_byte(0xd9); + emit_byte(0xf8); /* take rem from dest by source */ +} +LENDFUNC(NONE,NONE,2,raw_frem_rr,(FRW d, FR s)) + +LOWFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) +{ + int ds; + + usereg(s); + usereg(d); + + make_tos2(d,s); + ds=stackpos(s); + + if (ds!=1) { + printf("Failed horribly in raw_frem1_rr! ds is %d\n",ds); + abort(); + } + emit_byte(0xd9); + emit_byte(0xf5); /* take rem1 from dest by source */ +} +LENDFUNC(NONE,NONE,2,raw_frem1_rr,(FRW d, FR s)) + + +LOWFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) +{ + make_tos(r); + emit_byte(0xd9); /* ftst */ + emit_byte(0xe4); +} +LENDFUNC(NONE,NONE,1,raw_ftst_r,(FR r)) + +/* %eax register is clobbered if target processor doesn't support fucomi */ +#define FFLAG_NREG_CLOBBER_CONDITION !have_cmov +#define FFLAG_NREG EAX_INDEX + +static __inline__ void raw_fflags_into_flags(int r) +{ + int p; + + usereg(r); + p=stackpos(r); + + emit_byte(0xd9); + emit_byte(0xee); /* Push 0 */ + emit_byte(0xd9); + emit_byte(0xc9+p); /* swap top two around */ + if (have_cmov) { + // gb-- fucomi is for P6 cores only, not K6-2 then... + emit_byte(0xdb); + emit_byte(0xe9+p); /* fucomi them */ + } + else { + emit_byte(0xdd); + emit_byte(0xe1+p); /* fucom them */ + emit_byte(0x9b); + emit_byte(0xdf); + emit_byte(0xe0); /* fstsw ax */ + raw_sahf(0); /* sahf */ + } + emit_byte(0xdd); + emit_byte(0xd9+p); /* store value back, and get rid of 0 */ +} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.h b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h new file mode 100644 index 000000000..08538b7af --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.h @@ -0,0 +1,2565 @@ +/******************** -*- mode: C; tab-width: 8 -*- ******************** + * + * Run-time assembler for IA-32 and AMD64 + * + ***********************************************************************/ + + +/*********************************************************************** + * + * This file is derived from CCG. + * + * Copyright 1999, 2000, 2001, 2002, 2003 Ian Piumarta + * + * Adaptations and enhancements for AMD64 support, Copyright 2003-2008 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 X86_RTASM_H +#define X86_RTASM_H + +/* NOTES + * + * o Best viewed on a 1024x768 screen with fixed-6x10 font ;-) + * + * TODO + * + * o Fix FIXMEs + * o SSE instructions + * o Optimize for cases where register numbers are not integral constants + */ + +/* --- Configuration ------------------------------------------------------- */ + +/* Define to settle a "flat" register set, i.e. different regno for + each size variant. */ +#ifndef X86_FLAT_REGISTERS +#define X86_FLAT_REGISTERS 1 +#endif + +/* Define to generate x86-64 code. */ +#ifndef X86_TARGET_64BIT +#define X86_TARGET_64BIT 0 +#endif + +/* Define to optimize ALU instructions. */ +#ifndef X86_OPTIMIZE_ALU +#define X86_OPTIMIZE_ALU 1 +#endif + +/* Define to optimize rotate/shift instructions. */ +#ifndef X86_OPTIMIZE_ROTSHI +#define X86_OPTIMIZE_ROTSHI 1 +#endif + +/* Define to optimize absolute addresses for RIP relative addressing. */ +#ifndef X86_RIP_RELATIVE_ADDR +#define X86_RIP_RELATIVE_ADDR 1 +#endif + + +/* --- Macros -------------------------------------------------------------- */ + +/* Functions used to emit code. + * + * x86_emit_byte(B) + * x86_emit_word(W) + * x86_emit_long(L) + */ + +/* Get pointer to current code + * + * x86_get_target() + */ + +/* Abort assembler, fatal failure. + * + * x86_emit_failure(MSG) + */ + +#define x86_emit_failure0(MSG) (x86_emit_failure(MSG),0) + + +/* --- Register set -------------------------------------------------------- */ + +enum { + X86_RIP = -2, +#if X86_FLAT_REGISTERS + X86_NOREG = 0, + X86_Reg8L_Base = 0x10, + X86_Reg8H_Base = 0x20, + X86_Reg16_Base = 0x30, + X86_Reg32_Base = 0x40, + X86_Reg64_Base = 0x50, + X86_RegMMX_Base = 0x60, + X86_RegXMM_Base = 0x70, + X86_RegFPU_Base = 0x80 +#else + X86_NOREG = -1, + X86_Reg8L_Base = 0, + X86_Reg8H_Base = 16, + X86_Reg16_Base = 0, + X86_Reg32_Base = 0, + X86_Reg64_Base = 0, + X86_RegMMX_Base = 0, + X86_RegXMM_Base = 0, + X86_RegFPU_Base = 0 +#endif +}; + +enum { + X86_AL = X86_Reg8L_Base, + X86_CL, X86_DL, X86_BL, + X86_SPL, X86_BPL, X86_SIL, X86_DIL, + X86_R8B, X86_R9B, X86_R10B, X86_R11B, + X86_R12B, X86_R13B, X86_R14B, X86_R15B, + X86_AH = X86_Reg8H_Base + 4, + X86_CH, X86_DH, X86_BH +}; + +enum { + X86_AX = X86_Reg16_Base, + X86_CX, X86_DX, X86_BX, + X86_SP, X86_BP, X86_SI, X86_DI, + X86_R8W, X86_R9W, X86_R10W, X86_R11W, + X86_R12W, X86_R13W, X86_R14W, X86_R15W +}; + +enum { + X86_EAX = X86_Reg32_Base, + X86_ECX, X86_EDX, X86_EBX, + X86_ESP, X86_EBP, X86_ESI, X86_EDI, + X86_R8D, X86_R9D, X86_R10D, X86_R11D, + X86_R12D, X86_R13D, X86_R14D, X86_R15D +}; + +enum { + X86_RAX = X86_Reg64_Base, + X86_RCX, X86_RDX, X86_RBX, + X86_RSP, X86_RBP, X86_RSI, X86_RDI, + X86_R8, X86_R9, X86_R10, X86_R11, + X86_R12, X86_R13, X86_R14, X86_R15 +}; + +enum { + X86_MM0 = X86_RegMMX_Base, + X86_MM1, X86_MM2, X86_MM3, + X86_MM4, X86_MM5, X86_MM6, X86_MM7, +}; + +enum { + X86_XMM0 = X86_RegXMM_Base, + X86_XMM1, X86_XMM2, X86_XMM3, + X86_XMM4, X86_XMM5, X86_XMM6, X86_XMM7, + X86_XMM8, X86_XMM9, X86_XMM10, X86_XMM11, + X86_XMM12, X86_XMM13, X86_XMM14, X86_XMM15 +}; + +enum { + X86_ST0 = X86_RegFPU_Base, + X86_ST1, X86_ST2, X86_ST3, + X86_ST4, X86_ST5, X86_ST6, X86_ST7 +}; + +/* Register control and access + * + * _r0P(R) Null register? + * _rIP(R) RIP register? + * _rXP(R) Extended register? + * + * _rC(R) Class of register (only valid if X86_FLAT_REGISTERS) + * _rR(R) Full register number + * _rN(R) Short register number for encoding + * + * _r1(R) 8-bit register ID + * _r2(R) 16-bit register ID + * _r4(R) 32-bit register ID + * _r8(R) 64-bit register ID + * _rM(R) MMX register ID + * _rX(R) XMM register ID + * _rF(R) FPU register ID + * _rA(R) Address register ID used for EA calculation + */ + +#define _rST0P(R) ((int)(R) == (int)X86_ST0) +#define _r0P(R) ((int)(R) == (int)X86_NOREG) +#define _rIP(R) (X86_TARGET_64BIT ? ((int)(R) == (int)X86_RIP) : 0) + +#if X86_FLAT_REGISTERS +#define _rC(R) ((R) & 0xf0) +#define _rR(R) ((R) & 0x0f) +#define _rN(R) ((R) & 0x07) +#define _rXP(R) (((R) > 0 && _rR(R) > 7) ? 1 : 0) +#else +#define _rN(R) ((R) & 0x07) +#define _rR(R) (int(R)) +#define _rXP(R) ((_rR(R) > 7 && _rR(R) < 16) ? 1 : 0) +#endif + +#if !defined(_ASM_SAFETY) || ! X86_FLAT_REGISTERS +#define _r1(R) _rN(R) +#define _r2(R) _rN(R) +#define _r4(R) _rN(R) +#define _r8(R) _rN(R) +#define _rA(R) _rN(R) +#define _rM(R) _rN(R) +#define _rX(R) _rN(R) +#define _rF(R) _rN(R) +#else +#define _r1(R) ( ((_rC(R) & (X86_Reg8L_Base | X86_Reg8H_Base)) != 0) ? _rN(R) : x86_emit_failure0( "8-bit register required")) +#define _r2(R) ( (_rC(R) == X86_Reg16_Base) ? _rN(R) : x86_emit_failure0("16-bit register required")) +#define _r4(R) ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("32-bit register required")) +#define _r8(R) ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("64-bit register required")) +#define _rA(R) ( X86_TARGET_64BIT ? \ + ( (_rC(R) == X86_Reg64_Base) ? _rN(R) : x86_emit_failure0("not a valid 64-bit base/index expression")) : \ + ( (_rC(R) == X86_Reg32_Base) ? _rN(R) : x86_emit_failure0("not a valid 32-bit base/index expression")) ) +#define _rM(R) ( (_rC(R) == X86_RegMMX_Base) ? _rN(R) : x86_emit_failure0("MMX register required")) +#define _rX(R) ( (_rC(R) == X86_RegXMM_Base) ? _rN(R) : x86_emit_failure0("SSE register required")) +#define _rF(R) ( (_rC(R) == X86_RegFPU_Base) ? _rN(R) : x86_emit_failure0("FPU register required")) +#endif + +#define _rSP() (X86_TARGET_64BIT ? (int)X86_RSP : (int)X86_ESP) +#define _r1e8lP(R) (int(R) >= X86_SPL && int(R) <= X86_DIL) +#define _rbpP(R) (_rR(R) == _rR(X86_RBP)) +#define _rspP(R) (_rR(R) == _rR(X86_RSP)) +#define _rbp13P(R) (_rN(R) == _rN(X86_RBP)) +#define _rsp12P(R) (_rN(R) == _rN(X86_RSP)) + + +/* ========================================================================= */ +/* --- UTILITY ------------------------------------------------------------- */ +/* ========================================================================= */ + +typedef signed char _sc; +typedef unsigned char _uc; +typedef signed short _ss; +typedef unsigned short _us; +typedef signed int _sl; +typedef unsigned int _ul; + +#define _UC(X) ((_uc )(unsigned long)(X)) +#define _US(X) ((_us )(unsigned long)(X)) +#define _SL(X) ((_sl )(unsigned long)(X)) +#define _UL(X) ((_ul )(unsigned long)(X)) + +#define _PUC(X) ((_uc *)(X)) +#define _PUS(X) ((_us *)(X)) +#define _PSL(X) ((_sl *)(X)) +#define _PUL(X) ((_ul *)(X)) + +#define _B(B) x86_emit_byte((B)) +#define _W(W) x86_emit_word((W)) +#define _L(L) x86_emit_long((L)) +#define _Q(Q) x86_emit_quad((Q)) + +#define _MASK(N) ((unsigned)((1<<(N)))-1) +#define _siP(N,I) (!((((unsigned)(I))^(((unsigned)(I))<<1))&~_MASK(N))) +#define _uiP(N,I) (!(((unsigned)(I))&~_MASK(N))) +#define _suiP(N,I) (_siP(N,I) | _uiP(N,I)) + +#ifndef _ASM_SAFETY +#define _ck_s(W,I) (_UL(I) & _MASK(W)) +#define _ck_u(W,I) (_UL(I) & _MASK(W)) +#define _ck_su(W,I) (_UL(I) & _MASK(W)) +#define _ck_d(W,I) (_UL(I) & _MASK(W)) +#else +#define _ck_s(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "signed integer `"#I"' too large for "#W"-bit field")) +#define _ck_u(W,I) (_uiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0("unsigned integer `"#I"' too large for "#W"-bit field")) +#define _ck_su(W,I) (_suiP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "integer `"#I"' too large for "#W"-bit field")) +#define _ck_d(W,I) (_siP(W,I) ? (_UL(I) & _MASK(W)) : x86_emit_failure0( "displacement `"#I"' too large for "#W"-bit field")) +#endif + +#define _s0P(I) ((I)==0) +#define _s8P(I) _siP(8,I) +#define _s16P(I) _siP(16,I) +#define _u8P(I) _uiP(8,I) +#define _u16P(I) _uiP(16,I) + +#define _su8(I) _ck_su(8,I) +#define _su16(I) _ck_su(16,I) + +#define _s1(I) _ck_s( 1,I) +#define _s2(I) _ck_s( 2,I) +#define _s3(I) _ck_s( 3,I) +#define _s4(I) _ck_s( 4,I) +#define _s5(I) _ck_s( 5,I) +#define _s6(I) _ck_s( 6,I) +#define _s7(I) _ck_s( 7,I) +#define _s8(I) _ck_s( 8,I) +#define _s9(I) _ck_s( 9,I) +#define _s10(I) _ck_s(10,I) +#define _s11(I) _ck_s(11,I) +#define _s12(I) _ck_s(12,I) +#define _s13(I) _ck_s(13,I) +#define _s14(I) _ck_s(14,I) +#define _s15(I) _ck_s(15,I) +#define _s16(I) _ck_s(16,I) +#define _s17(I) _ck_s(17,I) +#define _s18(I) _ck_s(18,I) +#define _s19(I) _ck_s(19,I) +#define _s20(I) _ck_s(20,I) +#define _s21(I) _ck_s(21,I) +#define _s22(I) _ck_s(22,I) +#define _s23(I) _ck_s(23,I) +#define _s24(I) _ck_s(24,I) +#define _s25(I) _ck_s(25,I) +#define _s26(I) _ck_s(26,I) +#define _s27(I) _ck_s(27,I) +#define _s28(I) _ck_s(28,I) +#define _s29(I) _ck_s(29,I) +#define _s30(I) _ck_s(30,I) +#define _s31(I) _ck_s(31,I) +#define _u1(I) _ck_u( 1,I) +#define _u2(I) _ck_u( 2,I) +#define _u3(I) _ck_u( 3,I) +#define _u4(I) _ck_u( 4,I) +#define _u5(I) _ck_u( 5,I) +#define _u6(I) _ck_u( 6,I) +#define _u7(I) _ck_u( 7,I) +#define _u8(I) _ck_u( 8,I) +#define _u9(I) _ck_u( 9,I) +#define _u10(I) _ck_u(10,I) +#define _u11(I) _ck_u(11,I) +#define _u12(I) _ck_u(12,I) +#define _u13(I) _ck_u(13,I) +#define _u14(I) _ck_u(14,I) +#define _u15(I) _ck_u(15,I) +#define _u16(I) _ck_u(16,I) +#define _u17(I) _ck_u(17,I) +#define _u18(I) _ck_u(18,I) +#define _u19(I) _ck_u(19,I) +#define _u20(I) _ck_u(20,I) +#define _u21(I) _ck_u(21,I) +#define _u22(I) _ck_u(22,I) +#define _u23(I) _ck_u(23,I) +#define _u24(I) _ck_u(24,I) +#define _u25(I) _ck_u(25,I) +#define _u26(I) _ck_u(26,I) +#define _u27(I) _ck_u(27,I) +#define _u28(I) _ck_u(28,I) +#define _u29(I) _ck_u(29,I) +#define _u30(I) _ck_u(30,I) +#define _u31(I) _ck_u(31,I) + +/* ========================================================================= */ +/* --- ASSEMBLER ----------------------------------------------------------- */ +/* ========================================================================= */ + +#define _b00 0 +#define _b01 1 +#define _b10 2 +#define _b11 3 + +#define _b000 0 +#define _b001 1 +#define _b010 2 +#define _b011 3 +#define _b100 4 +#define _b101 5 +#define _b110 6 +#define _b111 7 + +#define _OFF4(D) (_UL(D) - _UL(x86_get_target())) +#define _CKD8(D) _ck_d(8, ((_uc) _OFF4(D)) ) + +#define _D8(D) (_B(0), ((*(_PUC(x86_get_target())-1))= _CKD8(D))) +#define _D32(D) (_L(0), ((*(_PUL(x86_get_target())-1))= _OFF4(D))) + +#ifndef _ASM_SAFETY +# define _M(M) (M) +# define _r(R) (R) +# define _m(M) (M) +# define _s(S) (S) +# define _i(I) (I) +# define _b(B) (B) +#else +# define _M(M) (((M)>3) ? x86_emit_failure0("internal error: mod = " #M) : (M)) +# define _r(R) (((R)>7) ? x86_emit_failure0("internal error: reg = " #R) : (R)) +# define _m(M) (((M)>7) ? x86_emit_failure0("internal error: r/m = " #M) : (M)) +# define _s(S) (((S)>3) ? x86_emit_failure0("internal error: memory scale = " #S) : (S)) +# define _i(I) (((I)>7) ? x86_emit_failure0("internal error: memory index = " #I) : (I)) +# define _b(B) (((B)>7) ? x86_emit_failure0("internal error: memory base = " #B) : (B)) +#endif + +#define _Mrm(Md,R,M) _B((_M(Md)<<6)|(_r(R)<<3)|_m(M)) +#define _SIB(Sc,I, B) _B((_s(Sc)<<6)|(_i(I)<<3)|_b(B)) + +#define _SCL(S) ((((S)==1) ? _b00 : \ + (((S)==2) ? _b01 : \ + (((S)==4) ? _b10 : \ + (((S)==8) ? _b11 : x86_emit_failure0("illegal scale: " #S)))))) + + +/* --- Memory subformats - urgh! ------------------------------------------- */ + +/* _r_D() is RIP addressing mode if X86_TARGET_64BIT, use _r_DSIB() instead */ +#define _r_D( R, D ) (_Mrm(_b00,_rN(R),_b101 ) ,_L((_sl)(D))) +#define _r_DSIB(R, D ) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(1),_b100 ,_b101 ),_L((_sl)(D))) +#define _r_0B( R, B ) (_Mrm(_b00,_rN(R),_rA(B)) ) +#define _r_0BIS(R, B,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)) ) +#define _r_1B( R, D,B ) (_Mrm(_b01,_rN(R),_rA(B)) ,_B((_sc)(D))) +#define _r_1BIS(R, D,B,I,S) (_Mrm(_b01,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_B((_sc)(D))) +#define _r_4B( R, D,B ) (_Mrm(_b10,_rN(R),_rA(B)) ,_L((_sl)(D))) +#define _r_4IS( R, D,I,S) (_Mrm(_b00,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_b101 ),_L((_sl)(D))) +#define _r_4BIS(R, D,B,I,S) (_Mrm(_b10,_rN(R),_b100 ),_SIB(_SCL(S),_rA(I),_rA(B)),_L((_sl)(D))) + +#define _r_DB( R, D,B ) ((_s0P(D) && (!_rbp13P(B)) ? _r_0B (R, B ) : (_s8P(D) ? _r_1B( R,D,B ) : _r_4B( R,D,B )))) +#define _r_DBIS(R, D,B,I,S) ((_s0P(D) && (!_rbp13P(B)) ? _r_0BIS(R, B,I,S) : (_s8P(D) ? _r_1BIS(R,D,B,I,S) : _r_4BIS(R,D,B,I,S)))) + +/* Use RIP-addressing in 64-bit mode, if possible */ +#define _x86_RIP_addressing_possible(D,O) (X86_RIP_RELATIVE_ADDR && \ + ((uintptr)x86_get_target() + 4 + (O) - (D) <= 0xffffffff)) + +#define _r_X( R, D,B,I,S,O) (_r0P(I) ? (_r0P(B) ? (!X86_TARGET_64BIT ? _r_D(R,D) : \ + (_x86_RIP_addressing_possible(D, O) ? \ + _r_D(R, (D) - ((uintptr)x86_get_target() + 4 + (O))) : \ + _r_DSIB(R,D))) : \ + (_rIP(B) ? _r_D (R,D ) : \ + (_rsp12P(B) ? _r_DBIS(R,D,_rSP(),_rSP(),1) : \ + _r_DB (R,D, B )))) : \ + (_r0P(B) ? _r_4IS (R,D, I,S) : \ + (!_rspP(I) ? _r_DBIS(R,D, B, I,S) : \ + x86_emit_failure("illegal index register: %esp")))) + + +/* --- Instruction formats ------------------------------------------------- */ + +#define _m32only(X) (! X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 64-bit mode")) +#define _m64only(X) ( X86_TARGET_64BIT ? X : x86_emit_failure("invalid instruction in 32-bit mode")) +#define _m64(X) ( X86_TARGET_64BIT ? X : ((void)0) ) + +/* _format Opcd ModR/M dN(rB,rI,Sc) imm... */ + +#define _d16() ( _B(0x66 ) ) +#define _O( OP ) ( _B( OP ) ) +#define _Or( OP,R ) ( _B( (OP)|_r(R)) ) +#define _OO( OP ) ( _B((OP)>>8), _B(( (OP) )&0xff) ) +#define _OOr( OP,R ) ( _B((OP)>>8), _B(( (OP)|_r(R))&0xff) ) +#define _Os( OP,B ) ( _s8P(B) ? _B(((OP)|_b10)) : _B(OP) ) +#define _sW( W ) ( _s8P(W) ? _B(W):_W(W) ) +#define _sL( L ) ( _s8P(L) ? _B(L):_L(L) ) +#define _sWO( W ) ( _s8P(W) ? 1 : 2 ) +#define _sLO( L ) ( _s8P(L) ? 1 : 4 ) +#define _O_B( OP ,B ) ( _O ( OP ) ,_B(B) ) +#define _O_W( OP ,W ) ( _O ( OP ) ,_W(W) ) +#define _O_L( OP ,L ) ( _O ( OP ) ,_L(L) ) +#define _OO_L( OP ,L ) ( _OO ( OP ) ,_L(L) ) +#define _O_D8( OP ,D ) ( _O ( OP ) ,_D8(D) ) +#define _O_D32( OP ,D ) ( _O ( OP ) ,_D32(D) ) +#define _OO_D32( OP ,D ) ( _OO ( OP ) ,_D32(D) ) +#define _Os_sW( OP ,W ) ( _Os ( OP,W) ,_sW(W) ) +#define _Os_sL( OP ,L ) ( _Os ( OP,L) ,_sL(L) ) +#define _O_W_B( OP ,W,B) ( _O ( OP ) ,_W(W),_B(B)) +#define _Or_B( OP,R ,B ) ( _Or ( OP,R) ,_B(B) ) +#define _Or_W( OP,R ,W ) ( _Or ( OP,R) ,_W(W) ) +#define _Or_L( OP,R ,L ) ( _Or ( OP,R) ,_L(L) ) +#define _Or_Q( OP,R ,Q ) ( _Or ( OP,R) ,_Q(Q) ) +#define _O_Mrm( OP ,MO,R,M ) ( _O ( OP ),_Mrm(MO,R,M ) ) +#define _OO_Mrm( OP ,MO,R,M ) ( _OO ( OP ),_Mrm(MO,R,M ) ) +#define _O_Mrm_B( OP ,MO,R,M ,B ) ( _O ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _O_Mrm_W( OP ,MO,R,M ,W ) ( _O ( OP ),_Mrm(MO,R,M ) ,_W(W) ) +#define _O_Mrm_L( OP ,MO,R,M ,L ) ( _O ( OP ),_Mrm(MO,R,M ) ,_L(L) ) +#define _OO_Mrm_B( OP ,MO,R,M ,B ) ( _OO ( OP ),_Mrm(MO,R,M ) ,_B(B) ) +#define _Os_Mrm_sW(OP ,MO,R,M ,W ) ( _Os ( OP,W),_Mrm(MO,R,M ),_sW(W) ) +#define _Os_Mrm_sL(OP ,MO,R,M ,L ) ( _Os ( OP,L),_Mrm(MO,R,M ),_sL(L) ) +#define _O_r_X( OP ,R ,MD,MB,MI,MS ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _OO_r_X( OP ,R ,MD,MB,MI,MS ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,0) ) +#define _O_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _O_r_X_W( OP ,R ,MD,MB,MI,MS,W ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,2) ,_W(W) ) +#define _O_r_X_L( OP ,R ,MD,MB,MI,MS,L ) ( _O ( OP ),_r_X( R ,MD,MB,MI,MS,4) ,_L(L) ) +#define _OO_r_X_B( OP ,R ,MD,MB,MI,MS,B ) ( _OO ( OP ),_r_X( R ,MD,MB,MI,MS,1) ,_B(B) ) +#define _Os_r_X_sW(OP ,R ,MD,MB,MI,MS,W ) ( _Os ( OP,W),_r_X( R ,MD,MB,MI,MS,_sWO(W)),_sW(W)) +#define _Os_r_X_sL(OP ,R ,MD,MB,MI,MS,L ) ( _Os ( OP,L),_r_X( R ,MD,MB,MI,MS,_sLO(L)),_sL(L)) +#define _O_X_B( OP ,MD,MB,MI,MS,B ) ( _O_r_X_B( OP ,0 ,MD,MB,MI,MS ,B) ) +#define _O_X_W( OP ,MD,MB,MI,MS,W ) ( _O_r_X_W( OP ,0 ,MD,MB,MI,MS ,W) ) +#define _O_X_L( OP ,MD,MB,MI,MS,L ) ( _O_r_X_L( OP ,0 ,MD,MB,MI,MS ,L) ) + + +/* --- REX prefixes -------------------------------------------------------- */ + +#define _VOID() ((void)0) +#define _BIT(X) ((X) ? 1 : 0) +#define _d64(W,R,X,B) (_B(0x40|(W)<<3|(R)<<2|(X)<<1|(B))) + +#define __REXwrxb(L,W,R,X,B) ((W|R|X|B) || (L) ? _d64(W,R,X,B) : _VOID()) +#define __REXwrx_(L,W,R,X,MR) (__REXwrxb(L,W,R,X,_BIT(_rIP(MR)?0:_rXP(MR)))) +#define __REXw_x_(L,W,R,X,MR) (__REXwrx_(L,W,_BIT(_rXP(R)),X,MR)) +#define __REX_reg(RR) (__REXwrxb(0,0,0,00,_BIT(_rXP(RR)))) +#define __REX_mem(MB,MI) (__REXwrxb(0,0,0,_BIT(_rXP(MI)),_BIT(_rXP(MB)))) + +// FIXME: can't mix new (SPL,BPL,SIL,DIL) with (AH,BH,CH,DH) +#define _REXBrr(RR,MR) _m64(__REXw_x_(_r1e8lP(RR)||_r1e8lP(MR),0,RR,0,MR)) +#define _REXBmr(MB,MI,RD) _m64(__REXw_x_(_r1e8lP(RD)||_r1e8lP(MB),0,RD,_BIT(_rXP(MI)),MB)) +#define _REXBrm(RS,MB,MI) _REXBmr(MB,MI,RS) + +#define _REXBLrr(RR,MR) _m64(__REXw_x_(_r1e8lP(MR),0,RR,0,MR)) +#define _REXLrr(RR,MR) _m64(__REXw_x_(0,0,RR,0,MR)) +#define _REXLmr(MB,MI,RD) _m64(__REXw_x_(0,0,RD,_BIT(_rXP(MI)),MB)) +#define _REXLrm(RS,MB,MI) _REXLmr(MB,MI,RS) +#define _REXLr(RR) _m64(__REX_reg(RR)) +#define _REXLm(MB,MI) _m64(__REX_mem(MB,MI)) + +#define _REXQrr(RR,MR) _m64only(__REXw_x_(0,1,RR,0,MR)) +#define _REXQmr(MB,MI,RD) _m64only(__REXw_x_(0,1,RD,_BIT(_rXP(MI)),MB)) +#define _REXQrm(RS,MB,MI) _REXQmr(MB,MI,RS) +#define _REXQr(RR) _m64only(__REX_reg(RR)) +#define _REXQm(MB,MI) _m64only(__REX_mem(MB,MI)) + + +/* ========================================================================= */ +/* --- Fully-qualified intrinsic instructions ------------------------------ */ +/* ========================================================================= */ + +/* OPCODE + i = immediate operand + * + r = register operand + * + m = memory operand (disp,base,index,scale) + * + sr/sm = a star preceding a register or memory + * + 0 = top of stack register (for FPU instructions) + * + * NOTE in x86-64 mode: a memory operand with only a valid + * displacement value will lead to the expect absolute mode. If + * RIP addressing is necessary, X86_RIP shall be used as the base + * register argument. + */ + +/* --- ALU instructions ---------------------------------------------------- */ + +enum { + X86_ADD = 0, + X86_OR = 1, + X86_ADC = 2, + X86_SBB = 3, + X86_AND = 4, + X86_SUB = 5, + X86_XOR = 6, + X86_CMP = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ALUBrr(OP,RS, RD) (_REXBrr(RS, RD), _O_Mrm (((OP) << 3) ,_b11,_r1(RS),_r1(RD) )) +#define _ALUBmr(OP, MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (((OP) << 3) + 2 ,_r1(RD) ,MD,MB,MI,MS )) +#define _ALUBrm(OP, RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (((OP) << 3) ,_r1(RS) ,MD,MB,MI,MS )) +#define _ALUBir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (((OP) << 3) + 4 ,_su8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0x80 ,_b11,OP ,_r1(RD) ,_su8(IM))) ) +#define _ALUBim(OP, IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0x80 ,OP ,MD,MB,MI,MS ,_su8(IM))) + +#define _ALUWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r2(RS),_r2(RD) )) +#define _ALUWmr(OP, MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r2(RD) ,MD,MB,MI,MS )) +#define _ALUWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r2(RS) ,MD,MB,MI,MS )) +#define _ALUWir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (((OP) << 3) + 5 ,_su16(IM))) : \ + (_d16(), _REXLrr(0, RD), _Os_Mrm_sW (0x81 ,_b11,OP ,_r2(RD) ,_su16(IM))) ) +#define _ALUWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _Os_r_X_sW (0x81 ,OP ,MD,MB,MI,MS ,_su16(IM))) + +#define _ALULrr(OP, RS, RD) (_REXLrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r4(RS),_r4(RD) )) +#define _ALULmr(OP, MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r4(RD) ,MD,MB,MI,MS )) +#define _ALULrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r4(RS) ,MD,MB,MI,MS )) +#define _ALULir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXLrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r4(RD) ,IM )) ) +#define _ALULim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define _ALUQrr(OP, RS, RD) (_REXQrr(RS, RD), _O_Mrm (((OP) << 3) + 1,_b11,_r8(RS),_r8(RD) )) +#define _ALUQmr(OP, MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (((OP) << 3) + 3 ,_r8(RD) ,MD,MB,MI,MS )) +#define _ALUQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (((OP) << 3) + 1 ,_r8(RS) ,MD,MB,MI,MS )) +#define _ALUQir(OP, IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (((OP) << 3) + 5 ,IM )) : \ + (_REXQrr(0, RD), _Os_Mrm_sL (0x81 ,_b11,OP ,_r8(RD) ,IM )) ) +#define _ALUQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _Os_r_X_sL (0x81 ,OP ,MD,MB,MI,MS ,IM )) + +#define ADCBrr(RS, RD) _ALUBrr(X86_ADC, RS, RD) +#define ADCBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCBir(IM, RD) _ALUBir(X86_ADC, IM, RD) +#define ADCBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCWrr(RS, RD) _ALUWrr(X86_ADC, RS, RD) +#define ADCWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCWir(IM, RD) _ALUWir(X86_ADC, IM, RD) +#define ADCWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCLrr(RS, RD) _ALULrr(X86_ADC, RS, RD) +#define ADCLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCLir(IM, RD) _ALULir(X86_ADC, IM, RD) +#define ADCLim(IM, MD, MB, MI, MS) _ALULim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADCQrr(RS, RD) _ALUQrr(X86_ADC, RS, RD) +#define ADCQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADC, MD, MB, MI, MS, RD) +#define ADCQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADC, RS, MD, MB, MI, MS) +#define ADCQir(IM, RD) _ALUQir(X86_ADC, IM, RD) +#define ADCQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADC, IM, MD, MB, MI, MS) + +#define ADDBrr(RS, RD) _ALUBrr(X86_ADD, RS, RD) +#define ADDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDBir(IM, RD) _ALUBir(X86_ADD, IM, RD) +#define ADDBim(IM, MD, MB, MI, MS) _ALUBim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDWrr(RS, RD) _ALUWrr(X86_ADD, RS, RD) +#define ADDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDWir(IM, RD) _ALUWir(X86_ADD, IM, RD) +#define ADDWim(IM, MD, MB, MI, MS) _ALUWim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDLrr(RS, RD) _ALULrr(X86_ADD, RS, RD) +#define ADDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDLir(IM, RD) _ALULir(X86_ADD, IM, RD) +#define ADDLim(IM, MD, MB, MI, MS) _ALULim(X86_ADD, IM, MD, MB, MI, MS) + +#define ADDQrr(RS, RD) _ALUQrr(X86_ADD, RS, RD) +#define ADDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_ADD, MD, MB, MI, MS, RD) +#define ADDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_ADD, RS, MD, MB, MI, MS) +#define ADDQir(IM, RD) _ALUQir(X86_ADD, IM, RD) +#define ADDQim(IM, MD, MB, MI, MS) _ALUQim(X86_ADD, IM, MD, MB, MI, MS) + +#define ANDBrr(RS, RD) _ALUBrr(X86_AND, RS, RD) +#define ANDBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDBir(IM, RD) _ALUBir(X86_AND, IM, RD) +#define ANDBim(IM, MD, MB, MI, MS) _ALUBim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDWrr(RS, RD) _ALUWrr(X86_AND, RS, RD) +#define ANDWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDWir(IM, RD) _ALUWir(X86_AND, IM, RD) +#define ANDWim(IM, MD, MB, MI, MS) _ALUWim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDLrr(RS, RD) _ALULrr(X86_AND, RS, RD) +#define ANDLmr(MD, MB, MI, MS, RD) _ALULmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDLrm(RS, MD, MB, MI, MS) _ALULrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDLir(IM, RD) _ALULir(X86_AND, IM, RD) +#define ANDLim(IM, MD, MB, MI, MS) _ALULim(X86_AND, IM, MD, MB, MI, MS) + +#define ANDQrr(RS, RD) _ALUQrr(X86_AND, RS, RD) +#define ANDQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_AND, MD, MB, MI, MS, RD) +#define ANDQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_AND, RS, MD, MB, MI, MS) +#define ANDQir(IM, RD) _ALUQir(X86_AND, IM, RD) +#define ANDQim(IM, MD, MB, MI, MS) _ALUQim(X86_AND, IM, MD, MB, MI, MS) + +#define CMPBrr(RS, RD) _ALUBrr(X86_CMP, RS, RD) +#define CMPBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPBir(IM, RD) _ALUBir(X86_CMP, IM, RD) +#define CMPBim(IM, MD, MB, MI, MS) _ALUBim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPWrr(RS, RD) _ALUWrr(X86_CMP, RS, RD) +#define CMPWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPWir(IM, RD) _ALUWir(X86_CMP, IM, RD) +#define CMPWim(IM, MD, MB, MI, MS) _ALUWim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPLrr(RS, RD) _ALULrr(X86_CMP, RS, RD) +#define CMPLmr(MD, MB, MI, MS, RD) _ALULmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPLrm(RS, MD, MB, MI, MS) _ALULrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPLir(IM, RD) _ALULir(X86_CMP, IM, RD) +#define CMPLim(IM, MD, MB, MI, MS) _ALULim(X86_CMP, IM, MD, MB, MI, MS) + +#define CMPQrr(RS, RD) _ALUQrr(X86_CMP, RS, RD) +#define CMPQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_CMP, MD, MB, MI, MS, RD) +#define CMPQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_CMP, RS, MD, MB, MI, MS) +#define CMPQir(IM, RD) _ALUQir(X86_CMP, IM, RD) +#define CMPQim(IM, MD, MB, MI, MS) _ALUQim(X86_CMP, IM, MD, MB, MI, MS) + +#define ORBrr(RS, RD) _ALUBrr(X86_OR, RS, RD) +#define ORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_OR, MD, MB, MI, MS, RD) +#define ORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_OR, RS, MD, MB, MI, MS) +#define ORBir(IM, RD) _ALUBir(X86_OR, IM, RD) +#define ORBim(IM, MD, MB, MI, MS) _ALUBim(X86_OR, IM, MD, MB, MI, MS) + +#define ORWrr(RS, RD) _ALUWrr(X86_OR, RS, RD) +#define ORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_OR, MD, MB, MI, MS, RD) +#define ORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_OR, RS, MD, MB, MI, MS) +#define ORWir(IM, RD) _ALUWir(X86_OR, IM, RD) +#define ORWim(IM, MD, MB, MI, MS) _ALUWim(X86_OR, IM, MD, MB, MI, MS) + +#define ORLrr(RS, RD) _ALULrr(X86_OR, RS, RD) +#define ORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_OR, MD, MB, MI, MS, RD) +#define ORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_OR, RS, MD, MB, MI, MS) +#define ORLir(IM, RD) _ALULir(X86_OR, IM, RD) +#define ORLim(IM, MD, MB, MI, MS) _ALULim(X86_OR, IM, MD, MB, MI, MS) + +#define ORQrr(RS, RD) _ALUQrr(X86_OR, RS, RD) +#define ORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_OR, MD, MB, MI, MS, RD) +#define ORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_OR, RS, MD, MB, MI, MS) +#define ORQir(IM, RD) _ALUQir(X86_OR, IM, RD) +#define ORQim(IM, MD, MB, MI, MS) _ALUQim(X86_OR, IM, MD, MB, MI, MS) + +#define SBBBrr(RS, RD) _ALUBrr(X86_SBB, RS, RD) +#define SBBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBBir(IM, RD) _ALUBir(X86_SBB, IM, RD) +#define SBBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBWrr(RS, RD) _ALUWrr(X86_SBB, RS, RD) +#define SBBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBWir(IM, RD) _ALUWir(X86_SBB, IM, RD) +#define SBBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBLrr(RS, RD) _ALULrr(X86_SBB, RS, RD) +#define SBBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBLir(IM, RD) _ALULir(X86_SBB, IM, RD) +#define SBBLim(IM, MD, MB, MI, MS) _ALULim(X86_SBB, IM, MD, MB, MI, MS) + +#define SBBQrr(RS, RD) _ALUQrr(X86_SBB, RS, RD) +#define SBBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SBB, MD, MB, MI, MS, RD) +#define SBBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SBB, RS, MD, MB, MI, MS) +#define SBBQir(IM, RD) _ALUQir(X86_SBB, IM, RD) +#define SBBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SBB, IM, MD, MB, MI, MS) + +#define SUBBrr(RS, RD) _ALUBrr(X86_SUB, RS, RD) +#define SUBBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBBir(IM, RD) _ALUBir(X86_SUB, IM, RD) +#define SUBBim(IM, MD, MB, MI, MS) _ALUBim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBWrr(RS, RD) _ALUWrr(X86_SUB, RS, RD) +#define SUBWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBWir(IM, RD) _ALUWir(X86_SUB, IM, RD) +#define SUBWim(IM, MD, MB, MI, MS) _ALUWim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBLrr(RS, RD) _ALULrr(X86_SUB, RS, RD) +#define SUBLmr(MD, MB, MI, MS, RD) _ALULmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBLrm(RS, MD, MB, MI, MS) _ALULrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBLir(IM, RD) _ALULir(X86_SUB, IM, RD) +#define SUBLim(IM, MD, MB, MI, MS) _ALULim(X86_SUB, IM, MD, MB, MI, MS) + +#define SUBQrr(RS, RD) _ALUQrr(X86_SUB, RS, RD) +#define SUBQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_SUB, MD, MB, MI, MS, RD) +#define SUBQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_SUB, RS, MD, MB, MI, MS) +#define SUBQir(IM, RD) _ALUQir(X86_SUB, IM, RD) +#define SUBQim(IM, MD, MB, MI, MS) _ALUQim(X86_SUB, IM, MD, MB, MI, MS) + +#define XORBrr(RS, RD) _ALUBrr(X86_XOR, RS, RD) +#define XORBmr(MD, MB, MI, MS, RD) _ALUBmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORBrm(RS, MD, MB, MI, MS) _ALUBrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORBir(IM, RD) _ALUBir(X86_XOR, IM, RD) +#define XORBim(IM, MD, MB, MI, MS) _ALUBim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORWrr(RS, RD) _ALUWrr(X86_XOR, RS, RD) +#define XORWmr(MD, MB, MI, MS, RD) _ALUWmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORWrm(RS, MD, MB, MI, MS) _ALUWrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORWir(IM, RD) _ALUWir(X86_XOR, IM, RD) +#define XORWim(IM, MD, MB, MI, MS) _ALUWim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORLrr(RS, RD) _ALULrr(X86_XOR, RS, RD) +#define XORLmr(MD, MB, MI, MS, RD) _ALULmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORLrm(RS, MD, MB, MI, MS) _ALULrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORLir(IM, RD) _ALULir(X86_XOR, IM, RD) +#define XORLim(IM, MD, MB, MI, MS) _ALULim(X86_XOR, IM, MD, MB, MI, MS) + +#define XORQrr(RS, RD) _ALUQrr(X86_XOR, RS, RD) +#define XORQmr(MD, MB, MI, MS, RD) _ALUQmr(X86_XOR, MD, MB, MI, MS, RD) +#define XORQrm(RS, MD, MB, MI, MS) _ALUQrm(X86_XOR, RS, MD, MB, MI, MS) +#define XORQir(IM, RD) _ALUQir(X86_XOR, IM, RD) +#define XORQim(IM, MD, MB, MI, MS) _ALUQim(X86_XOR, IM, MD, MB, MI, MS) + + +/* --- Shift/Rotate instructions ------------------------------------------- */ + +enum { + X86_ROL = 0, + X86_ROR = 1, + X86_RCL = 2, + X86_RCR = 3, + X86_SHL = 4, + X86_SHR = 5, + X86_SAR = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _ROTSHIBir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrr(0, RD), _O_Mrm (0xd0 ,_b11,OP,_r1(RD) )) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xc0 ,_b11,OP,_r1(RD) ,_u8(IM))) ) +#define _ROTSHIBim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXBrm(0, MB, MI), _O_r_X (0xd0 ,OP ,MD,MB,MI,MS )) : \ + (_REXBrm(0, MB, MI), _O_r_X_B (0xc0 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIBrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXBrr(RS, RD), _O_Mrm (0xd2 ,_b11,OP,_r1(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIBrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXBrm(RS, MB, MI), _O_r_X (0xd2 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIWir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r2(RD) ,_u8(IM))) ) +#define _ROTSHIWim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_d16(), _REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIWrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_d16(), _REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r2(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIWrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHILir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r4(RD) )) : \ + (_REXLrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r4(RD) ,_u8(IM))) ) +#define _ROTSHILim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXLrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXLrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHILrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXLrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r4(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHILrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXLrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define _ROTSHIQir(OP,IM,RD) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrr(0, RD), _O_Mrm (0xd1 ,_b11,OP,_r8(RD) )) : \ + (_REXQrr(0, RD), _O_Mrm_B (0xc1 ,_b11,OP,_r8(RD) ,_u8(IM))) ) +#define _ROTSHIQim(OP,IM,MD,MB,MI,MS) (X86_OPTIMIZE_ROTSHI && ((IM) == 1) ? \ + (_REXQrm(0, MB, MI), _O_r_X (0xd1 ,OP ,MD,MB,MI,MS )) : \ + (_REXQrm(0, MB, MI), _O_r_X_B (0xc1 ,OP ,MD,MB,MI,MS ,_u8(IM))) ) +#define _ROTSHIQrr(OP,RS,RD) (((RS) == X86_CL) ? \ + (_REXQrr(RS, RD), _O_Mrm (0xd3 ,_b11,OP,_r8(RD) )) : \ + x86_emit_failure("source register must be CL" ) ) +#define _ROTSHIQrm(OP,RS,MD,MB,MI,MS) (((RS) == X86_CL) ? \ + (_REXQrm(RS, MB, MI), _O_r_X (0xd3 ,OP ,MD,MB,MI,MS )) : \ + x86_emit_failure("source register must be CL" ) ) + +#define ROLBir(IM, RD) _ROTSHIBir(X86_ROL, IM, RD) +#define ROLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLBrr(RS, RD) _ROTSHIBrr(X86_ROL, RS, RD) +#define ROLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLWir(IM, RD) _ROTSHIWir(X86_ROL, IM, RD) +#define ROLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLWrr(RS, RD) _ROTSHIWrr(X86_ROL, RS, RD) +#define ROLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLLir(IM, RD) _ROTSHILir(X86_ROL, IM, RD) +#define ROLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLLrr(RS, RD) _ROTSHILrr(X86_ROL, RS, RD) +#define ROLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROL, RS, MD, MB, MI, MS) + +#define ROLQir(IM, RD) _ROTSHIQir(X86_ROL, IM, RD) +#define ROLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROL, IM, MD, MB, MI, MS) +#define ROLQrr(RS, RD) _ROTSHIQrr(X86_ROL, RS, RD) +#define ROLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROL, RS, MD, MB, MI, MS) + +#define RORBir(IM, RD) _ROTSHIBir(X86_ROR, IM, RD) +#define RORBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_ROR, IM, MD, MB, MI, MS) +#define RORBrr(RS, RD) _ROTSHIBrr(X86_ROR, RS, RD) +#define RORBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORWir(IM, RD) _ROTSHIWir(X86_ROR, IM, RD) +#define RORWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_ROR, IM, MD, MB, MI, MS) +#define RORWrr(RS, RD) _ROTSHIWrr(X86_ROR, RS, RD) +#define RORWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORLir(IM, RD) _ROTSHILir(X86_ROR, IM, RD) +#define RORLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_ROR, IM, MD, MB, MI, MS) +#define RORLrr(RS, RD) _ROTSHILrr(X86_ROR, RS, RD) +#define RORLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RORQir(IM, RD) _ROTSHIQir(X86_ROR, IM, RD) +#define RORQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_ROR, IM, MD, MB, MI, MS) +#define RORQrr(RS, RD) _ROTSHIQrr(X86_ROR, RS, RD) +#define RORQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_ROR, RS, MD, MB, MI, MS) + +#define RCLBir(IM, RD) _ROTSHIBir(X86_RCL, IM, RD) +#define RCLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLBrr(RS, RD) _ROTSHIBrr(X86_RCL, RS, RD) +#define RCLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLWir(IM, RD) _ROTSHIWir(X86_RCL, IM, RD) +#define RCLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLWrr(RS, RD) _ROTSHIWrr(X86_RCL, RS, RD) +#define RCLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLLir(IM, RD) _ROTSHILir(X86_RCL, IM, RD) +#define RCLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLLrr(RS, RD) _ROTSHILrr(X86_RCL, RS, RD) +#define RCLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCLQir(IM, RD) _ROTSHIQir(X86_RCL, IM, RD) +#define RCLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCL, IM, MD, MB, MI, MS) +#define RCLQrr(RS, RD) _ROTSHIQrr(X86_RCL, RS, RD) +#define RCLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCL, RS, MD, MB, MI, MS) + +#define RCRBir(IM, RD) _ROTSHIBir(X86_RCR, IM, RD) +#define RCRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRBrr(RS, RD) _ROTSHIBrr(X86_RCR, RS, RD) +#define RCRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRWir(IM, RD) _ROTSHIWir(X86_RCR, IM, RD) +#define RCRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRWrr(RS, RD) _ROTSHIWrr(X86_RCR, RS, RD) +#define RCRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRLir(IM, RD) _ROTSHILir(X86_RCR, IM, RD) +#define RCRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRLrr(RS, RD) _ROTSHILrr(X86_RCR, RS, RD) +#define RCRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_RCR, RS, MD, MB, MI, MS) + +#define RCRQir(IM, RD) _ROTSHIQir(X86_RCR, IM, RD) +#define RCRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_RCR, IM, MD, MB, MI, MS) +#define RCRQrr(RS, RD) _ROTSHIQrr(X86_RCR, RS, RD) +#define RCRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_RCR, RS, MD, MB, MI, MS) + +#define SHLBir(IM, RD) _ROTSHIBir(X86_SHL, IM, RD) +#define SHLBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLBrr(RS, RD) _ROTSHIBrr(X86_SHL, RS, RD) +#define SHLBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLWir(IM, RD) _ROTSHIWir(X86_SHL, IM, RD) +#define SHLWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLWrr(RS, RD) _ROTSHIWrr(X86_SHL, RS, RD) +#define SHLWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLLir(IM, RD) _ROTSHILir(X86_SHL, IM, RD) +#define SHLLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLLrr(RS, RD) _ROTSHILrr(X86_SHL, RS, RD) +#define SHLLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHLQir(IM, RD) _ROTSHIQir(X86_SHL, IM, RD) +#define SHLQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHL, IM, MD, MB, MI, MS) +#define SHLQrr(RS, RD) _ROTSHIQrr(X86_SHL, RS, RD) +#define SHLQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHL, RS, MD, MB, MI, MS) + +#define SHRBir(IM, RD) _ROTSHIBir(X86_SHR, IM, RD) +#define SHRBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRBrr(RS, RD) _ROTSHIBrr(X86_SHR, RS, RD) +#define SHRBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRWir(IM, RD) _ROTSHIWir(X86_SHR, IM, RD) +#define SHRWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRWrr(RS, RD) _ROTSHIWrr(X86_SHR, RS, RD) +#define SHRWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRLir(IM, RD) _ROTSHILir(X86_SHR, IM, RD) +#define SHRLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRLrr(RS, RD) _ROTSHILrr(X86_SHR, RS, RD) +#define SHRLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SHRQir(IM, RD) _ROTSHIQir(X86_SHR, IM, RD) +#define SHRQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SHR, IM, MD, MB, MI, MS) +#define SHRQrr(RS, RD) _ROTSHIQrr(X86_SHR, RS, RD) +#define SHRQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SHR, RS, MD, MB, MI, MS) + +#define SALBir SHLBir +#define SALBim SHLBim +#define SALBrr SHLBrr +#define SALBrm SHLBrm + +#define SALWir SHLWir +#define SALWim SHLWim +#define SALWrr SHLWrr +#define SALWrm SHLWrm + +#define SALLir SHLLir +#define SALLim SHLLim +#define SALLrr SHLLrr +#define SALLrm SHLLrm + +#define SALQir SHLQir +#define SALQim SHLQim +#define SALQrr SHLQrr +#define SALQrm SHLQrm + +#define SARBir(IM, RD) _ROTSHIBir(X86_SAR, IM, RD) +#define SARBim(IM, MD, MB, MI, MS) _ROTSHIBim(X86_SAR, IM, MD, MB, MI, MS) +#define SARBrr(RS, RD) _ROTSHIBrr(X86_SAR, RS, RD) +#define SARBrm(RS, MD, MB, MI, MS) _ROTSHIBrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARWir(IM, RD) _ROTSHIWir(X86_SAR, IM, RD) +#define SARWim(IM, MD, MB, MI, MS) _ROTSHIWim(X86_SAR, IM, MD, MB, MI, MS) +#define SARWrr(RS, RD) _ROTSHIWrr(X86_SAR, RS, RD) +#define SARWrm(RS, MD, MB, MI, MS) _ROTSHIWrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARLir(IM, RD) _ROTSHILir(X86_SAR, IM, RD) +#define SARLim(IM, MD, MB, MI, MS) _ROTSHILim(X86_SAR, IM, MD, MB, MI, MS) +#define SARLrr(RS, RD) _ROTSHILrr(X86_SAR, RS, RD) +#define SARLrm(RS, MD, MB, MI, MS) _ROTSHILrm(X86_SAR, RS, MD, MB, MI, MS) + +#define SARQir(IM, RD) _ROTSHIQir(X86_SAR, IM, RD) +#define SARQim(IM, MD, MB, MI, MS) _ROTSHIQim(X86_SAR, IM, MD, MB, MI, MS) +#define SARQrr(RS, RD) _ROTSHIQrr(X86_SAR, RS, RD) +#define SARQrm(RS, MD, MB, MI, MS) _ROTSHIQrm(X86_SAR, RS, MD, MB, MI, MS) + + +/* --- Bit test instructions ----------------------------------------------- */ + +enum { + X86_BT = 4, + X86_BTS = 5, + X86_BTR = 6, + X86_BTC = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _BTWir(OP, IM, RD) (_d16(), _REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r2(RD) ,_u8(IM))) +#define _BTWim(OP, IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTWrr(OP, RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r2(RS),_r2(RD) )) +#define _BTWrm(OP, RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r2(RS) ,MD,MB,MI,MS )) + +#define _BTLir(OP, IM, RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r4(RD) ,_u8(IM))) +#define _BTLim(OP, IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTLrr(OP, RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r4(RS),_r4(RD) )) +#define _BTLrm(OP, RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r4(RS) ,MD,MB,MI,MS )) + +#define _BTQir(OP, IM, RD) (_REXQrr(0, RD), _OO_Mrm_B (0x0fba ,_b11,OP ,_r8(RD) ,_u8(IM))) +#define _BTQim(OP, IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _OO_r_X_B (0x0fba ,OP ,MD,MB,MI,MS ,_u8(IM))) +#define _BTQrr(OP, RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0f83|((OP)<<3),_b11,_r8(RS),_r8(RD) )) +#define _BTQrm(OP, RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f83|((OP)<<3) ,_r8(RS) ,MD,MB,MI,MS )) + +#define BTWir(IM, RD) _BTWir(X86_BT, IM, RD) +#define BTWim(IM, MD, MB, MI, MS) _BTWim(X86_BT, IM, MD, MB, MI, MS) +#define BTWrr(RS, RD) _BTWrr(X86_BT, RS, RD) +#define BTWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTLir(IM, RD) _BTLir(X86_BT, IM, RD) +#define BTLim(IM, MD, MB, MI, MS) _BTLim(X86_BT, IM, MD, MB, MI, MS) +#define BTLrr(RS, RD) _BTLrr(X86_BT, RS, RD) +#define BTLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTQir(IM, RD) _BTQir(X86_BT, IM, RD) +#define BTQim(IM, MD, MB, MI, MS) _BTQim(X86_BT, IM, MD, MB, MI, MS) +#define BTQrr(RS, RD) _BTQrr(X86_BT, RS, RD) +#define BTQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BT, RS, MD, MB, MI, MS) + +#define BTCWir(IM, RD) _BTWir(X86_BTC, IM, RD) +#define BTCWim(IM, MD, MB, MI, MS) _BTWim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCWrr(RS, RD) _BTWrr(X86_BTC, RS, RD) +#define BTCWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCLir(IM, RD) _BTLir(X86_BTC, IM, RD) +#define BTCLim(IM, MD, MB, MI, MS) _BTLim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCLrr(RS, RD) _BTLrr(X86_BTC, RS, RD) +#define BTCLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTCQir(IM, RD) _BTQir(X86_BTC, IM, RD) +#define BTCQim(IM, MD, MB, MI, MS) _BTQim(X86_BTC, IM, MD, MB, MI, MS) +#define BTCQrr(RS, RD) _BTQrr(X86_BTC, RS, RD) +#define BTCQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTC, RS, MD, MB, MI, MS) + +#define BTRWir(IM, RD) _BTWir(X86_BTR, IM, RD) +#define BTRWim(IM, MD, MB, MI, MS) _BTWim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRWrr(RS, RD) _BTWrr(X86_BTR, RS, RD) +#define BTRWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRLir(IM, RD) _BTLir(X86_BTR, IM, RD) +#define BTRLim(IM, MD, MB, MI, MS) _BTLim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRLrr(RS, RD) _BTLrr(X86_BTR, RS, RD) +#define BTRLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTRQir(IM, RD) _BTQir(X86_BTR, IM, RD) +#define BTRQim(IM, MD, MB, MI, MS) _BTQim(X86_BTR, IM, MD, MB, MI, MS) +#define BTRQrr(RS, RD) _BTQrr(X86_BTR, RS, RD) +#define BTRQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTR, RS, MD, MB, MI, MS) + +#define BTSWir(IM, RD) _BTWir(X86_BTS, IM, RD) +#define BTSWim(IM, MD, MB, MI, MS) _BTWim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSWrr(RS, RD) _BTWrr(X86_BTS, RS, RD) +#define BTSWrm(RS, MD, MB, MI, MS) _BTWrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSLir(IM, RD) _BTLir(X86_BTS, IM, RD) +#define BTSLim(IM, MD, MB, MI, MS) _BTLim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSLrr(RS, RD) _BTLrr(X86_BTS, RS, RD) +#define BTSLrm(RS, MD, MB, MI, MS) _BTLrm(X86_BTS, RS, MD, MB, MI, MS) + +#define BTSQir(IM, RD) _BTQir(X86_BTS, IM, RD) +#define BTSQim(IM, MD, MB, MI, MS) _BTQim(X86_BTS, IM, MD, MB, MI, MS) +#define BTSQrr(RS, RD) _BTQrr(X86_BTS, RS, RD) +#define BTSQrm(RS, MD, MB, MI, MS) _BTQrm(X86_BTS, RS, MD, MB, MI, MS) + + +/* --- Move instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x88 ,_b11,_r1(RS),_r1(RD) )) +#define MOVBmr(MD, MB, MI, MS, RD) (_REXBmr(MB, MI, RD), _O_r_X (0x8a ,_r1(RD) ,MD,MB,MI,MS )) +#define MOVBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x88 ,_r1(RS) ,MD,MB,MI,MS )) +#define MOVBir(IM, R) (_REXBrr(0, R), _Or_B (0xb0,_r1(R) ,_su8(IM))) +#define MOVBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_X_B (0xc6 ,MD,MB,MI,MS ,_su8(IM))) + +#define MOVWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r2(RS),_r2(RD) )) +#define MOVWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r2(RS) ,MD,MB,MI,MS )) +#define MOVWir(IM, R) (_d16(), _REXLrr(0, R), _Or_W (0xb8,_r2(R) ,_su16(IM))) +#define MOVWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_X_W (0xc7 ,MD,MB,MI,MS ,_su16(IM))) + +#define MOVLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x89 ,_b11,_r4(RS),_r4(RD) )) +#define MOVLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8b ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x89 ,_r4(RS) ,MD,MB,MI,MS )) +#define MOVLir(IM, R) (_REXLrr(0, R), _Or_L (0xb8,_r4(R) ,IM )) +#define MOVLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + +#define MOVQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x89 ,_b11,_r8(RS),_r8(RD) )) +#define MOVQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8b ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x89 ,_r8(RS) ,MD,MB,MI,MS )) +#define MOVQir(IM, R) (_REXQrr(0, R), _Or_Q (0xb8,_r8(R) ,IM )) +#define MOVQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_X_L (0xc7 ,MD,MB,MI,MS ,IM )) + + +/* --- Unary and Multiply/Divide instructions ------------------------------ */ + +enum { + X86_NOT = 2, + X86_NEG = 3, + X86_MUL = 4, + X86_IMUL = 5, + X86_DIV = 6, + X86_IDIV = 7, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _UNARYBr(OP, RS) (_REXBrr(0, RS), _O_Mrm (0xf6 ,_b11,OP ,_r1(RS) )) +#define _UNARYBm(OP, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xf6 ,OP ,MD,MB,MI,MS )) +#define _UNARYWr(OP, RS) (_d16(), _REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r2(RS) )) +#define _UNARYWm(OP, MD, MB, MI, MS) (_d16(), _REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYLr(OP, RS) (_REXLrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r4(RS) )) +#define _UNARYLm(OP, MD, MB, MI, MS) (_REXLmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) +#define _UNARYQr(OP, RS) (_REXQrr(0, RS), _O_Mrm (0xf7 ,_b11,OP ,_r8(RS) )) +#define _UNARYQm(OP, MD, MB, MI, MS) (_REXQmr(MB, MI, 0), _O_r_X (0xf7 ,OP ,MD,MB,MI,MS )) + +#define NOTBr(RS) _UNARYBr(X86_NOT, RS) +#define NOTBm(MD, MB, MI, MS) _UNARYBm(X86_NOT, MD, MB, MI, MS) +#define NOTWr(RS) _UNARYWr(X86_NOT, RS) +#define NOTWm(MD, MB, MI, MS) _UNARYWm(X86_NOT, MD, MB, MI, MS) +#define NOTLr(RS) _UNARYLr(X86_NOT, RS) +#define NOTLm(MD, MB, MI, MS) _UNARYLm(X86_NOT, MD, MB, MI, MS) +#define NOTQr(RS) _UNARYQr(X86_NOT, RS) +#define NOTQm(MD, MB, MI, MS) _UNARYQm(X86_NOT, MD, MB, MI, MS) + +#define NEGBr(RS) _UNARYBr(X86_NEG, RS) +#define NEGBm(MD, MB, MI, MS) _UNARYBm(X86_NEG, MD, MB, MI, MS) +#define NEGWr(RS) _UNARYWr(X86_NEG, RS) +#define NEGWm(MD, MB, MI, MS) _UNARYWm(X86_NEG, MD, MB, MI, MS) +#define NEGLr(RS) _UNARYLr(X86_NEG, RS) +#define NEGLm(MD, MB, MI, MS) _UNARYLm(X86_NEG, MD, MB, MI, MS) +#define NEGQr(RS) _UNARYQr(X86_NEG, RS) +#define NEGQm(MD, MB, MI, MS) _UNARYQm(X86_NEG, MD, MB, MI, MS) + +#define MULBr(RS) _UNARYBr(X86_MUL, RS) +#define MULBm(MD, MB, MI, MS) _UNARYBm(X86_MUL, MD, MB, MI, MS) +#define MULWr(RS) _UNARYWr(X86_MUL, RS) +#define MULWm(MD, MB, MI, MS) _UNARYWm(X86_MUL, MD, MB, MI, MS) +#define MULLr(RS) _UNARYLr(X86_MUL, RS) +#define MULLm(MD, MB, MI, MS) _UNARYLm(X86_MUL, MD, MB, MI, MS) +#define MULQr(RS) _UNARYQr(X86_MUL, RS) +#define MULQm(MD, MB, MI, MS) _UNARYQm(X86_MUL, MD, MB, MI, MS) + +#define IMULBr(RS) _UNARYBr(X86_IMUL, RS) +#define IMULBm(MD, MB, MI, MS) _UNARYBm(X86_IMUL, MD, MB, MI, MS) +#define IMULWr(RS) _UNARYWr(X86_IMUL, RS) +#define IMULWm(MD, MB, MI, MS) _UNARYWm(X86_IMUL, MD, MB, MI, MS) +#define IMULLr(RS) _UNARYLr(X86_IMUL, RS) +#define IMULLm(MD, MB, MI, MS) _UNARYLm(X86_IMUL, MD, MB, MI, MS) +#define IMULQr(RS) _UNARYQr(X86_IMUL, RS) +#define IMULQm(MD, MB, MI, MS) _UNARYQm(X86_IMUL, MD, MB, MI, MS) + +#define DIVBr(RS) _UNARYBr(X86_DIV, RS) +#define DIVBm(MD, MB, MI, MS) _UNARYBm(X86_DIV, MD, MB, MI, MS) +#define DIVWr(RS) _UNARYWr(X86_DIV, RS) +#define DIVWm(MD, MB, MI, MS) _UNARYWm(X86_DIV, MD, MB, MI, MS) +#define DIVLr(RS) _UNARYLr(X86_DIV, RS) +#define DIVLm(MD, MB, MI, MS) _UNARYLm(X86_DIV, MD, MB, MI, MS) +#define DIVQr(RS) _UNARYQr(X86_DIV, RS) +#define DIVQm(MD, MB, MI, MS) _UNARYQm(X86_DIV, MD, MB, MI, MS) + +#define IDIVBr(RS) _UNARYBr(X86_IDIV, RS) +#define IDIVBm(MD, MB, MI, MS) _UNARYBm(X86_IDIV, MD, MB, MI, MS) +#define IDIVWr(RS) _UNARYWr(X86_IDIV, RS) +#define IDIVWm(MD, MB, MI, MS) _UNARYWm(X86_IDIV, MD, MB, MI, MS) +#define IDIVLr(RS) _UNARYLr(X86_IDIV, RS) +#define IDIVLm(MD, MB, MI, MS) _UNARYLm(X86_IDIV, MD, MB, MI, MS) +#define IDIVQr(RS) _UNARYQr(X86_IDIV, RS) +#define IDIVQm(MD, MB, MI, MS) _UNARYQm(X86_IDIV, MD, MB, MI, MS) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define IMULWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r2(RD),_r2(RS) )) +#define IMULWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r2(RD) ,MD,MB,MI,MS )) + +#define IMULWirr(IM,RS,RD) (_d16(), _REXLrr(RS, RD), _Os_Mrm_sW (0x69 ,_b11,_r2(RS),_r2(RD) ,_su16(IM) )) +#define IMULWimr(IM,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _Os_r_X_sW (0x69 ,_r2(RD) ,MD,MB,MI,MS ,_su16(IM) )) + +#define IMULLir(IM, RD) (_REXLrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RD),_r4(RD) ,IM )) +#define IMULLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r4(RD),_r4(RS) )) +#define IMULLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0faf ,_r4(RD) ,MD,MB,MI,MS )) + +#define IMULQir(IM, RD) (_REXQrr(0, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RD),_r8(RD) ,IM )) +#define IMULQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0faf ,_b11,_r8(RD),_r8(RS) )) +#define IMULQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0faf ,_r8(RD) ,MD,MB,MI,MS )) + +#define IMULLirr(IM,RS,RD) (_REXLrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r4(RS),_r4(RD) ,IM )) +#define IMULLimr(IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r4(RD) ,MD,MB,MI,MS ,IM )) + +#define IMULQirr(IM,RS,RD) (_REXQrr(RS, RD), _Os_Mrm_sL (0x69 ,_b11,_r8(RS),_r8(RD) ,IM )) +#define IMULQimr(IM,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _Os_r_X_sL (0x69 ,_r8(RD) ,MD,MB,MI,MS ,IM )) + + +/* --- Control Flow related instructions ----------------------------------- */ + +enum { + X86_CC_O = 0x0, + X86_CC_NO = 0x1, + X86_CC_NAE = 0x2, + X86_CC_B = 0x2, + X86_CC_C = 0x2, + X86_CC_AE = 0x3, + X86_CC_NB = 0x3, + X86_CC_NC = 0x3, + X86_CC_E = 0x4, + X86_CC_Z = 0x4, + X86_CC_NE = 0x5, + X86_CC_NZ = 0x5, + X86_CC_BE = 0x6, + X86_CC_NA = 0x6, + X86_CC_A = 0x7, + X86_CC_NBE = 0x7, + X86_CC_S = 0x8, + X86_CC_NS = 0x9, + X86_CC_P = 0xa, + X86_CC_PE = 0xa, + X86_CC_NP = 0xb, + X86_CC_PO = 0xb, + X86_CC_L = 0xc, + X86_CC_NGE = 0xc, + X86_CC_GE = 0xd, + X86_CC_NL = 0xd, + X86_CC_LE = 0xe, + X86_CC_NG = 0xe, + X86_CC_G = 0xf, + X86_CC_NLE = 0xf, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define CALLm(M) _O_D32 (0xe8 ,(int)(M) ) +#define _CALLLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r4(R) )) +#define _CALLQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b010,_r8(R) )) +#define CALLsr(R) ( X86_TARGET_64BIT ? _CALLQsr(R) : _CALLLsr(R)) +#define CALLsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b010 ,(int)(D),B,I,S )) + +// FIXME: no prefix is availble to encode a 32-bit operand size in 64-bit mode +#define JMPSm(M) _O_D8 (0xeb ,(int)(M) ) +#define JMPm(M) _O_D32 (0xe9 ,(int)(M) ) +#define _JMPLsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r4(R) )) +#define _JMPQsr(R) (_REXLrr(0, R), _O_Mrm (0xff ,_b11,_b100,_r8(R) )) +#define JMPsr(R) ( X86_TARGET_64BIT ? _JMPQsr(R) : _JMPLsr(R)) +#define JMPsm(D,B,I,S) (_REXLrm(0, B, I), _O_r_X (0xff ,_b100 ,(int)(D),B,I,S )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCSii(CC, D) _O_B (0x70|(CC) ,(_sc)(int)(D) ) +#define JCCSim(CC, D) _O_D8 (0x70|(CC) ,(int)(D) ) +#define JOSm(D) JCCSim(X86_CC_O, D) +#define JNOSm(D) JCCSim(X86_CC_NO, D) +#define JBSm(D) JCCSim(X86_CC_B, D) +#define JNAESm(D) JCCSim(X86_CC_NAE, D) +#define JNBSm(D) JCCSim(X86_CC_NB, D) +#define JAESm(D) JCCSim(X86_CC_AE, D) +#define JESm(D) JCCSim(X86_CC_E, D) +#define JZSm(D) JCCSim(X86_CC_Z, D) +#define JNESm(D) JCCSim(X86_CC_NE, D) +#define JNZSm(D) JCCSim(X86_CC_NZ, D) +#define JBESm(D) JCCSim(X86_CC_BE, D) +#define JNASm(D) JCCSim(X86_CC_NA, D) +#define JNBESm(D) JCCSim(X86_CC_NBE, D) +#define JASm(D) JCCSim(X86_CC_A, D) +#define JSSm(D) JCCSim(X86_CC_S, D) +#define JNSSm(D) JCCSim(X86_CC_NS, D) +#define JPSm(D) JCCSim(X86_CC_P, D) +#define JPESm(D) JCCSim(X86_CC_PE, D) +#define JNPSm(D) JCCSim(X86_CC_NP, D) +#define JPOSm(D) JCCSim(X86_CC_PO, D) +#define JLSm(D) JCCSim(X86_CC_L, D) +#define JNGESm(D) JCCSim(X86_CC_NGE, D) +#define JNLSm(D) JCCSim(X86_CC_NL, D) +#define JGESm(D) JCCSim(X86_CC_GE, D) +#define JLESm(D) JCCSim(X86_CC_LE, D) +#define JNGSm(D) JCCSim(X86_CC_NG, D) +#define JNLESm(D) JCCSim(X86_CC_NLE, D) +#define JGSm(D) JCCSim(X86_CC_G, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define JCCii(CC, D) _OO_L (0x0f80|(CC) ,(int)(D) ) +#define JCCim(CC, D) _OO_D32 (0x0f80|(CC) ,(int)(D) ) +#define JOm(D) JCCim(X86_CC_O, D) +#define JNOm(D) JCCim(X86_CC_NO, D) +#define JBm(D) JCCim(X86_CC_B, D) +#define JNAEm(D) JCCim(X86_CC_NAE, D) +#define JNBm(D) JCCim(X86_CC_NB, D) +#define JAEm(D) JCCim(X86_CC_AE, D) +#define JEm(D) JCCim(X86_CC_E, D) +#define JZm(D) JCCim(X86_CC_Z, D) +#define JNEm(D) JCCim(X86_CC_NE, D) +#define JNZm(D) JCCim(X86_CC_NZ, D) +#define JBEm(D) JCCim(X86_CC_BE, D) +#define JNAm(D) JCCim(X86_CC_NA, D) +#define JNBEm(D) JCCim(X86_CC_NBE, D) +#define JAm(D) JCCim(X86_CC_A, D) +#define JSm(D) JCCim(X86_CC_S, D) +#define JNSm(D) JCCim(X86_CC_NS, D) +#define JPm(D) JCCim(X86_CC_P, D) +#define JPEm(D) JCCim(X86_CC_PE, D) +#define JNPm(D) JCCim(X86_CC_NP, D) +#define JPOm(D) JCCim(X86_CC_PO, D) +#define JLm(D) JCCim(X86_CC_L, D) +#define JNGEm(D) JCCim(X86_CC_NGE, D) +#define JNLm(D) JCCim(X86_CC_NL, D) +#define JGEm(D) JCCim(X86_CC_GE, D) +#define JLEm(D) JCCim(X86_CC_LE, D) +#define JNGm(D) JCCim(X86_CC_NG, D) +#define JNLEm(D) JCCim(X86_CC_NLE, D) +#define JGm(D) JCCim(X86_CC_G, D) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCir(CC, RD) (_REXBrr(0, RD), _OO_Mrm (0x0f90|(CC) ,_b11,_b000,_r1(RD) )) +#define SETOr(RD) SETCCir(X86_CC_O, RD) +#define SETNOr(RD) SETCCir(X86_CC_NO, RD) +#define SETBr(RD) SETCCir(X86_CC_B, RD) +#define SETNAEr(RD) SETCCir(X86_CC_NAE, RD) +#define SETNBr(RD) SETCCir(X86_CC_NB, RD) +#define SETAEr(RD) SETCCir(X86_CC_AE, RD) +#define SETEr(RD) SETCCir(X86_CC_E, RD) +#define SETZr(RD) SETCCir(X86_CC_Z, RD) +#define SETNEr(RD) SETCCir(X86_CC_NE, RD) +#define SETNZr(RD) SETCCir(X86_CC_NZ, RD) +#define SETBEr(RD) SETCCir(X86_CC_BE, RD) +#define SETNAr(RD) SETCCir(X86_CC_NA, RD) +#define SETNBEr(RD) SETCCir(X86_CC_NBE, RD) +#define SETAr(RD) SETCCir(X86_CC_A, RD) +#define SETSr(RD) SETCCir(X86_CC_S, RD) +#define SETNSr(RD) SETCCir(X86_CC_NS, RD) +#define SETPr(RD) SETCCir(X86_CC_P, RD) +#define SETPEr(RD) SETCCir(X86_CC_PE, RD) +#define SETNPr(RD) SETCCir(X86_CC_NP, RD) +#define SETPOr(RD) SETCCir(X86_CC_PO, RD) +#define SETLr(RD) SETCCir(X86_CC_L, RD) +#define SETNGEr(RD) SETCCir(X86_CC_NGE, RD) +#define SETNLr(RD) SETCCir(X86_CC_NL, RD) +#define SETGEr(RD) SETCCir(X86_CC_GE, RD) +#define SETLEr(RD) SETCCir(X86_CC_LE, RD) +#define SETNGr(RD) SETCCir(X86_CC_NG, RD) +#define SETNLEr(RD) SETCCir(X86_CC_NLE, RD) +#define SETGr(RD) SETCCir(X86_CC_G, RD) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define SETCCim(CC,MD,MB,MI,MS) (_REXBrm(0, MB, MI), _OO_r_X (0x0f90|(CC) ,_b000 ,MD,MB,MI,MS )) +#define SETOm(D, B, I, S) SETCCim(X86_CC_O, D, B, I, S) +#define SETNOm(D, B, I, S) SETCCim(X86_CC_NO, D, B, I, S) +#define SETBm(D, B, I, S) SETCCim(X86_CC_B, D, B, I, S) +#define SETNAEm(D, B, I, S) SETCCim(X86_CC_NAE, D, B, I, S) +#define SETNBm(D, B, I, S) SETCCim(X86_CC_NB, D, B, I, S) +#define SETAEm(D, B, I, S) SETCCim(X86_CC_AE, D, B, I, S) +#define SETEm(D, B, I, S) SETCCim(X86_CC_E, D, B, I, S) +#define SETZm(D, B, I, S) SETCCim(X86_CC_Z, D, B, I, S) +#define SETNEm(D, B, I, S) SETCCim(X86_CC_NE, D, B, I, S) +#define SETNZm(D, B, I, S) SETCCim(X86_CC_NZ, D, B, I, S) +#define SETBEm(D, B, I, S) SETCCim(X86_CC_BE, D, B, I, S) +#define SETNAm(D, B, I, S) SETCCim(X86_CC_NA, D, B, I, S) +#define SETNBEm(D, B, I, S) SETCCim(X86_CC_NBE, D, B, I, S) +#define SETAm(D, B, I, S) SETCCim(X86_CC_A, D, B, I, S) +#define SETSm(D, B, I, S) SETCCim(X86_CC_S, D, B, I, S) +#define SETNSm(D, B, I, S) SETCCim(X86_CC_NS, D, B, I, S) +#define SETPm(D, B, I, S) SETCCim(X86_CC_P, D, B, I, S) +#define SETPEm(D, B, I, S) SETCCim(X86_CC_PE, D, B, I, S) +#define SETNPm(D, B, I, S) SETCCim(X86_CC_NP, D, B, I, S) +#define SETPOm(D, B, I, S) SETCCim(X86_CC_PO, D, B, I, S) +#define SETLm(D, B, I, S) SETCCim(X86_CC_L, D, B, I, S) +#define SETNGEm(D, B, I, S) SETCCim(X86_CC_NGE, D, B, I, S) +#define SETNLm(D, B, I, S) SETCCim(X86_CC_NL, D, B, I, S) +#define SETGEm(D, B, I, S) SETCCim(X86_CC_GE, D, B, I, S) +#define SETLEm(D, B, I, S) SETCCim(X86_CC_LE, D, B, I, S) +#define SETNGm(D, B, I, S) SETCCim(X86_CC_NG, D, B, I, S) +#define SETNLEm(D, B, I, S) SETCCim(X86_CC_NLE, D, B, I, S) +#define SETGm(D, B, I, S) SETCCim(X86_CC_G, D, B, I, S) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ +#define CMOVWrr(CC,RS,RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r2(RD),_r2(RS) )) +#define CMOVWmr(CC,MD,MB,MI,MS,RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r2(RD) ,MD,MB,MI,MS )) +#define CMOVLrr(CC,RS,RD) (_REXLrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r4(RD),_r4(RS) )) +#define CMOVLmr(CC,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r4(RD) ,MD,MB,MI,MS )) +#define CMOVQrr(CC,RS,RD) (_REXQrr(RD, RS), _OO_Mrm (0x0f40|(CC) ,_b11,_r8(RD),_r8(RS) )) +#define CMOVQmr(CC,MD,MB,MI,MS,RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f40|(CC) ,_r8(RD) ,MD,MB,MI,MS )) + + +/* --- Push/Pop instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define POPWr(RD) _m32only((_d16(), _Or (0x58,_r2(RD) ))) +#define POPWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define POPLr(RD) _m32only( _Or (0x58,_r4(RD) )) +#define POPLm(MD, MB, MI, MS) _m32only( _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS )) + +#define POPQr(RD) _m64only((_REXQr(RD), _Or (0x58,_r8(RD) ))) +#define POPQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0x8f ,_b000 ,MD,MB,MI,MS ))) + +#define PUSHWr(RS) _m32only((_d16(), _Or (0x50,_r2(RS) ))) +#define PUSHWm(MD, MB, MI, MS) _m32only((_d16(), _O_r_X (0xff, ,_b110 ,MD,MB,MI,MS ))) +#define PUSHWi(IM) _m32only((_d16(), _Os_sW (0x68 ,IM ))) + +#define PUSHLr(RS) _m32only( _Or (0x50,_r4(RS) )) +#define PUSHLm(MD, MB, MI, MS) _m32only( _O_r_X (0xff ,_b110 ,MD,MB,MI,MS )) +#define PUSHLi(IM) _m32only( _Os_sL (0x68 ,IM )) + +#define PUSHQr(RS) _m64only((_REXQr(RS), _Or (0x50,_r8(RS) ))) +#define PUSHQm(MD, MB, MI, MS) _m64only((_REXQm(MB, MI), _O_r_X (0xff ,_b110 ,MD,MB,MI,MS ))) +#define PUSHQi(IM) _m64only( _Os_sL (0x68 ,IM )) + +#define POPA() (_d16(), _O (0x61 )) +#define POPAD() _O (0x61 ) + +#define PUSHA() (_d16(), _O (0x60 )) +#define PUSHAD() _O (0x60 ) + +#define POPF() _O (0x9d ) +#define PUSHF() _O (0x9c ) + + +/* --- Test instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define TESTBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x84 ,_b11,_r1(RS),_r1(RD) )) +#define TESTBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x84 ,_r1(RS) ,MD,MB,MI,MS )) +#define TESTBir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AL) ? \ + (_REXBrr(0, RD), _O_B (0xa8 ,_u8(IM))) : \ + (_REXBrr(0, RD), _O_Mrm_B (0xf6 ,_b11,_b000 ,_r1(RD) ,_u8(IM))) ) +#define TESTBim(IM, MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X_B (0xf6 ,_b000 ,MD,MB,MI,MS ,_u8(IM))) + +#define TESTWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r2(RS),_r2(RD) )) +#define TESTWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r2(RS) ,MD,MB,MI,MS )) +#define TESTWir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_AX) ? \ + (_d16(), _REXLrr(0, RD), _O_W (0xa9 ,_u16(IM))) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm_W (0xf7 ,_b11,_b000 ,_r2(RD) ,_u16(IM))) ) +#define TESTWim(IM, MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X_W (0xf7 ,_b000 ,MD,MB,MI,MS ,_u16(IM))) + +#define TESTLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x85 ,_b11,_r4(RS),_r4(RD) )) +#define TESTLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x85 ,_r4(RS) ,MD,MB,MI,MS )) +#define TESTLir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_EAX) ? \ + (_REXLrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXLrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r4(RD) ,IM )) ) +#define TESTLim(IM, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + +#define TESTQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x85 ,_b11,_r8(RS),_r8(RD) )) +#define TESTQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x85 ,_r8(RS) ,MD,MB,MI,MS )) +#define TESTQir(IM, RD) (X86_OPTIMIZE_ALU && ((RD) == X86_RAX) ? \ + (_REXQrr(0, RD), _O_L (0xa9 ,IM )) : \ + (_REXQrr(0, RD), _O_Mrm_L (0xf7 ,_b11,_b000 ,_r8(RD) ,IM )) ) +#define TESTQim(IM, MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X_L (0xf7 ,_b000 ,MD,MB,MI,MS ,IM )) + + +/* --- Exchange instructions ----------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CMPXCHGBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fb0 ,_b11,_r1(RS),_r1(RD) )) +#define CMPXCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fb0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r2(RS),_r2(RD) )) +#define CMPXCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r4(RS),_r4(RD) )) +#define CMPXCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define CMPXCHGQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fb1 ,_b11,_r8(RS),_r8(RD) )) +#define CMPXCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fb1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XADDBrr(RS, RD) (_REXBrr(RS, RD), _OO_Mrm (0x0fc0 ,_b11,_r1(RS),_r1(RD) )) +#define XADDBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _OO_r_X (0x0fc0 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XADDWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r2(RS),_r2(RD) )) +#define XADDWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XADDLrr(RS, RD) (_REXLrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r4(RS),_r4(RD) )) +#define XADDLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XADDQrr(RS, RD) (_REXQrr(RS, RD), _OO_Mrm (0x0fc1 ,_b11,_r8(RS),_r8(RD) )) +#define XADDQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0fc1 ,_r8(RS) ,MD,MB,MI,MS )) + +#define XCHGBrr(RS, RD) (_REXBrr(RS, RD), _O_Mrm (0x86 ,_b11,_r1(RS),_r1(RD) )) +#define XCHGBrm(RS, MD, MB, MI, MS) (_REXBrm(RS, MB, MI), _O_r_X (0x86 ,_r1(RS) ,MD,MB,MI,MS )) + +#define XCHGWrr(RS, RD) (_d16(), _REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r2(RS),_r2(RD) )) +#define XCHGWrm(RS, MD, MB, MI, MS) (_d16(), _REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r2(RS) ,MD,MB,MI,MS )) + +#define XCHGLrr(RS, RD) (_REXLrr(RS, RD), _O_Mrm (0x87 ,_b11,_r4(RS),_r4(RD) )) +#define XCHGLrm(RS, MD, MB, MI, MS) (_REXLrm(RS, MB, MI), _O_r_X (0x87 ,_r4(RS) ,MD,MB,MI,MS )) + +#define XCHGQrr(RS, RD) (_REXQrr(RS, RD), _O_Mrm (0x87 ,_b11,_r8(RS),_r8(RD) )) +#define XCHGQrm(RS, MD, MB, MI, MS) (_REXQrm(RS, MB, MI), _O_r_X (0x87 ,_r8(RS) ,MD,MB,MI,MS )) + + +/* --- Increment/Decrement instructions ------------------------------------ */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define DECBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b001 ,MD,MB,MI,MS )) +#define DECBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b001 ,_r1(RD) )) + +#define DECWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x48,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r2(RD) ))) + +#define DECLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECLr(RD) (! X86_TARGET_64BIT ? _Or (0x48,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r4(RD) ))) + +#define DECQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b001 ,MD,MB,MI,MS )) +#define DECQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b001 ,_r8(RD) )) + +#define INCBm(MD, MB, MI, MS) (_REXBrm(0, MB, MI), _O_r_X (0xfe ,_b000 ,MD,MB,MI,MS )) +#define INCBr(RD) (_REXBrr(0, RD), _O_Mrm (0xfe ,_b11,_b000 ,_r1(RD) )) + +#define INCWm(MD, MB, MI, MS) (_d16(), _REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCWr(RD) (! X86_TARGET_64BIT ? (_d16(), _Or (0x40,_r2(RD) )) : \ + (_d16(), _REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r2(RD) )) ) + +#define INCLm(MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCLr(RD) (! X86_TARGET_64BIT ? _Or (0x40,_r4(RD) ) : \ + (_REXLrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r4(RD) ))) + +#define INCQm(MD, MB, MI, MS) (_REXQrm(0, MB, MI), _O_r_X (0xff ,_b000 ,MD,MB,MI,MS )) +#define INCQr(RD) (_REXQrr(0, RD), _O_Mrm (0xff ,_b11,_b000 ,_r8(RD) )) + + +/* --- Misc instructions --------------------------------------------------- */ + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define BSFWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r2(RD),_r2(RS) )) +#define BSFWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r2(RD) ,MD,MB,MI,MS )) +#define BSRWrr(RS, RD) (_d16(), _REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r2(RD),_r2(RS) )) +#define BSRWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r2(RD) ,MD,MB,MI,MS )) + +#define BSFLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r4(RD),_r4(RS) )) +#define BSFLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r4(RD) ,MD,MB,MI,MS )) +#define BSRLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r4(RD),_r4(RS) )) +#define BSRLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSFQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbc ,_b11,_r8(RD),_r8(RS) )) +#define BSFQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbc ,_r8(RD) ,MD,MB,MI,MS )) +#define BSRQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbd ,_b11,_r8(RD),_r8(RS) )) +#define BSRQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbd ,_r8(RD) ,MD,MB,MI,MS )) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define MOVSBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r2(RD),_r1(RS) )) +#define MOVSBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r2(RD) ,MD,MB,MI,MS )) +#define MOVZBWrr(RS, RD) (_d16(), _REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r2(RD),_r1(RS) )) +#define MOVZBWmr(MD, MB, MI, MS, RD) (_d16(), _REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r2(RD) ,MD,MB,MI,MS )) + +#define MOVSBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r4(RD),_r1(RS) )) +#define MOVSBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZBLrr(RS, RD) (_REXBLrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r4(RD),_r1(RS) )) +#define MOVZBLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fbe ,_b11,_r8(RD),_r1(RS) )) +#define MOVSBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fbe ,_r8(RD) ,MD,MB,MI,MS )) +#define MOVZBQrr(RS, RD) (_REXQrr(RD, RS), _OO_Mrm (0x0fb6 ,_b11,_r8(RD),_r1(RS) )) +#define MOVZBQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _OO_r_X (0x0fb6 ,_r8(RD) ,MD,MB,MI,MS )) + +#define MOVSWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r4(RD),_r2(RS) )) +#define MOVSWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r4(RD) ,MD,MB,MI,MS )) +#define MOVZWLrr(RS, RD) (_REXLrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r4(RD),_r2(RS) )) +#define MOVZWLmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r4(RD) ,MD,MB,MI,MS )) + +#define MOVSWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fbf ,_b11,_r8(RD),_r2(RS) ))) +#define MOVSWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fbf ,_r8(RD) ,MD,MB,MI,MS ))) +#define MOVZWQrr(RS, RD) _m64only((_REXQrr(RD, RS), _OO_Mrm (0x0fb7 ,_b11,_r8(RD),_r2(RS) ))) +#define MOVZWQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _OO_r_X (0x0fb7 ,_r8(RD) ,MD,MB,MI,MS ))) + +#define MOVSLQrr(RS, RD) _m64only((_REXQrr(RD, RS), _O_Mrm (0x63 ,_b11,_r8(RD),_r4(RS) ))) +#define MOVSLQmr(MD, MB, MI, MS, RD) _m64only((_REXQmr(MB, MI, RD), _O_r_X (0x63 ,_r8(RD) ,MD,MB,MI,MS ))) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define LEALmr(MD, MB, MI, MS, RD) (_REXLmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) +#define LEAQmr(MD, MB, MI, MS, RD) (_REXQmr(MB, MI, RD), _O_r_X (0x8d ,_r4(RD) ,MD,MB,MI,MS )) + +#define BSWAPLr(R) (_REXLrr(0, R), _OOr (0x0fc8,_r4(R) )) +#define BSWAPQr(R) (_REXQrr(0, R), _OOr (0x0fc8,_r8(R) )) + +#define CLC() _O (0xf8 ) +#define STC() _O (0xf9 ) +#define CMC() _O (0xf5 ) + +#define CLD() _O (0xfc ) +#define STD() _O (0xfd ) + +#define CBTW() (_d16(), _O (0x98 )) +#define CWTL() _O (0x98 ) +#define CLTQ() _m64only(_REXQrr(0, 0), _O (0x98 )) + +#define CBW CBTW +#define CWDE CWTL +#define CDQE CLTQ + +#define CWTD() (_d16(), _O (0x99 )) +#define CLTD() _O (0x99 ) +#define CQTO() _m64only(_REXQrr(0, 0), _O (0x99 )) + +#define CWD CWTD +#define CDQ CLTD +#define CQO CQTO + +#define LAHF() _O (0x9f ) +#define SAHF() _O (0x9e ) + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define CPUID() _OO (0x0fa2 ) +#define RDTSC() _OO (0xff31 ) + +#define ENTERii(W, B) _O_W_B (0xc8 ,_su16(W),_su8(B)) + +#define LEAVE() _O (0xc9 ) +#define RET() _O (0xc3 ) +#define RETi(IM) _O_W (0xc2 ,_su16(IM)) + +#define NOP() _O (0x90 ) + + +/* --- Media 64-bit instructions ------------------------------------------- */ + +enum { + X86_MMX_PABSB = 0x1c, // 2P + X86_MMX_PABSW = 0x1d, // 2P + X86_MMX_PABSD = 0x1e, // 2P + X86_MMX_PACKSSWB = 0x63, + X86_MMX_PACKSSDW = 0x6b, + X86_MMX_PACKUSWB = 0x67, + X86_MMX_PADDB = 0xfc, + X86_MMX_PADDW = 0xfd, + X86_MMX_PADDD = 0xfe, + X86_MMX_PADDQ = 0xd4, + X86_MMX_PADDSB = 0xec, + X86_MMX_PADDSW = 0xed, + X86_MMX_PADDUSB = 0xdc, + X86_MMX_PADDUSW = 0xdd, + X86_MMX_PAND = 0xdb, + X86_MMX_PANDN = 0xdf, + X86_MMX_PAVGB = 0xe0, + X86_MMX_PAVGW = 0xe3, + X86_MMX_PCMPEQB = 0x74, + X86_MMX_PCMPEQW = 0x75, + X86_MMX_PCMPEQD = 0x76, + X86_MMX_PCMPGTB = 0x64, + X86_MMX_PCMPGTW = 0x65, + X86_MMX_PCMPGTD = 0x66, + X86_MMX_PEXTRW = 0xc5, // 64, /r ib + X86_MMX_PHADDW = 0x01, // 2P + X86_MMX_PHADDD = 0x02, // 2P + X86_MMX_PHADDSW = 0x03, // 2P + X86_MMX_PHSUBW = 0x05, // 2P + X86_MMX_PHSUBD = 0x06, // 2P + X86_MMX_PHSUBSW = 0x07, // 2P + X86_MMX_PINSRW = 0xc4, // 64, /r ib + X86_MMX_PMADDUBSW = 0x04, // 2P + X86_MMX_PMADDWD = 0xf5, + X86_MMX_PMAXSW = 0xee, + X86_MMX_PMAXUB = 0xde, + X86_MMX_PMINSW = 0xea, + X86_MMX_PMINUB = 0xda, + X86_MMX_PMOVMSKB = 0xd7, // 64 + X86_MMX_PMULHRSW = 0x0b, // 2P + X86_MMX_PMULHUW = 0xe4, + X86_MMX_PMULHW = 0xe5, + X86_MMX_PMULLW = 0xd5, + X86_MMX_PMULUDQ = 0xf4, + X86_MMX_POR = 0xeb, + X86_MMX_PSADBW = 0xf6, + X86_MMX_PSHUFB = 0x00, // 2P + X86_MMX_PSHUFW = 0x70, // /r ib + X86_MMX_PSIGNB = 0x08, // 2P + X86_MMX_PSIGNW = 0x09, // 2P + X86_MMX_PSIGND = 0x0a, // 2P + X86_MMX_PSLLW = 0xf1, + X86_MMX_PSLLWi = 0x71, // /6 ib + X86_MMX_PSLLD = 0xf2, + X86_MMX_PSLLDi = 0x72, // /6 ib + X86_MMX_PSLLQ = 0xf3, + X86_MMX_PSLLQi = 0x73, // /6 ib + X86_MMX_PSRAW = 0xe1, + X86_MMX_PSRAWi = 0x71, // /4 ib + X86_MMX_PSRAD = 0xe2, + X86_MMX_PSRADi = 0x72, // /4 ib + X86_MMX_PSRLW = 0xd1, + X86_MMX_PSRLWi = 0x71, // /2 ib + X86_MMX_PSRLD = 0xd2, + X86_MMX_PSRLDi = 0x72, // /2 ib + X86_MMX_PSRLQ = 0xd3, + X86_MMX_PSRLQi = 0x73, // /2 ib + X86_MMX_PSUBB = 0xf8, + X86_MMX_PSUBW = 0xf9, + X86_MMX_PSUBD = 0xfa, + X86_MMX_PSUBQ = 0xfb, + X86_MMX_PSUBSB = 0xe8, + X86_MMX_PSUBSW = 0xe9, + X86_MMX_PSUBUSB = 0xd8, + X86_MMX_PSUBUSW = 0xd9, + X86_MMX_PUNPCKHBW = 0x68, + X86_MMX_PUNPCKHWD = 0x69, + X86_MMX_PUNPCKHDQ = 0x6a, + X86_MMX_PUNPCKLBW = 0x60, + X86_MMX_PUNPCKLWD = 0x61, + X86_MMX_PUNPCKLDQ = 0x62, + X86_MMX_PXOR = 0xef, +}; + +#define __MMXLrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMXLmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMXLrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __MMXLirr(OP,IM,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) +#define __MMXLimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) +#define __MMXQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMXQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMXQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __MMXQirr(OP,IM,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) ,_u8(IM))) +#define __MMXQimr(OP,IM,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RS), _OO_r_X_B (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS ,_u8(IM))) +#define __MMX1Lrr(PX,OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _B(0x0f),_OO_Mrm(((PX)<<8)|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __MMX1Lmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __MMX1Lrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _B(0x0f),_OO_r_X(((PX)<<8)|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define _MMXLrr(OP,RS,RD) __MMXLrr(OP,RS,_rM,RD,_rM) +#define _MMXLmr(OP,MD,MB,MI,MS,RD) __MMXLmr(OP,MD,MB,MI,MS,RD,_rM) +#define _MMXLrm(OP,RS,MD,MB,MI,MS) __MMXLrm(OP,RS,_rM,MD,MB,MI,MS) +#define _MMXQrr(OP,RS,RD) __MMXQrr(OP,RS,_rM,RD,_rM) +#define _MMXQmr(OP,MD,MB,MI,MS,RD) __MMXQmr(OP,MD,MB,MI,MS,RD,_rM) +#define _MMXQrm(OP,RS,MD,MB,MI,MS) __MMXQrm(OP,RS,_rM,MD,MB,MI,MS) +#define _2P_MMXLrr(OP,RS,RD) __MMX1Lrr(0x38, OP,RS,_rM,RD,_rM) +#define _2P_MMXLmr(OP,MD,MB,MI,MS,RD) __MMX1Lmr(0x38, OP,MD,MB,MI,MS,RD,_rM) +#define _2P_MMXLrm(OP,RS,MD,MB,MI,MS) __MMX1Lrm(0x38, OP,RS,_rM,MD,MB,MI,MS) + +#define MMX_MOVDMDrr(RS, RD) __MMXLrr(0x6e, RS,_r4, RD,_rM) +#define MMX_MOVQMDrr(RS, RD) __MMXQrr(0x6e, RS,_r8, RD,_rM) +#define MMX_MOVDMSrr(RS, RD) __MMXLrr(0x7e, RD,_r4, RS,_rM) +#define MMX_MOVQMSrr(RS, RD) __MMXQrr(0x7e, RD,_r8, RS,_rM) + +#define MMX_MOVDmr(MD, MB, MI, MS, RD) _MMXLmr(0x6e, MD, MB, MI, MS, RD) +#define MMX_MOVDrm(RS, MD, MB, MI, MS) _MMXLrm(0x7e, RS, MD, MB, MI, MS) +#define MMX_MOVQrr(RS, RD) _MMXLrr(0x6f, RS, RD) +#define MMX_MOVQmr(MD, MB, MI, MS, RD) _MMXLmr(0x6f, MD, MB, MI, MS, RD) +#define MMX_MOVQrm(RS, MD, MB, MI, MS) _MMXLrm(0x7f, RS, MD, MB, MI, MS) + +// Original MMX instructions +#define MMX_PACKSSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKSSWB,RS,RD) +#define MMX_PACKSSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSWB, MD, MB, MI, MS, RD) +#define MMX_PACKSSDWrr(RS, RD) _MMXLrr(X86_MMX_PACKSSDW,RS,RD) +#define MMX_PACKSSDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKSSDW, MD, MB, MI, MS, RD) +#define MMX_PACKUSWBrr(RS, RD) _MMXLrr(X86_MMX_PACKUSWB,RS,RD) +#define MMX_PACKUSWBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PACKUSWB, MD, MB, MI, MS, RD) +#define MMX_PADDBrr(RS, RD) _MMXLrr(X86_MMX_PADDB,RS,RD) +#define MMX_PADDBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDB, MD, MB, MI, MS, RD) +#define MMX_PADDWrr(RS, RD) _MMXLrr(X86_MMX_PADDW,RS,RD) +#define MMX_PADDWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDW, MD, MB, MI, MS, RD) +#define MMX_PADDDrr(RS, RD) _MMXLrr(X86_MMX_PADDD,RS,RD) +#define MMX_PADDDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDD, MD, MB, MI, MS, RD) +#define MMX_PADDQrr(RS, RD) _MMXLrr(X86_MMX_PADDQ,RS,RD) +#define MMX_PADDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDQ, MD, MB, MI, MS, RD) +#define MMX_PADDSBrr(RS, RD) _MMXLrr(X86_MMX_PADDSB,RS,RD) +#define MMX_PADDSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSB, MD, MB, MI, MS, RD) +#define MMX_PADDSWrr(RS, RD) _MMXLrr(X86_MMX_PADDSW,RS,RD) +#define MMX_PADDSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDSW, MD, MB, MI, MS, RD) +#define MMX_PADDUSBrr(RS, RD) _MMXLrr(X86_MMX_PADDUSB,RS,RD) +#define MMX_PADDUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSB, MD, MB, MI, MS, RD) +#define MMX_PADDUSWrr(RS, RD) _MMXLrr(X86_MMX_PADDUSW,RS,RD) +#define MMX_PADDUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PADDUSW, MD, MB, MI, MS, RD) +#define MMX_PANDrr(RS, RD) _MMXLrr(X86_MMX_PAND,RS,RD) +#define MMX_PANDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAND, MD, MB, MI, MS, RD) +#define MMX_PANDNrr(RS, RD) _MMXLrr(X86_MMX_PANDN,RS,RD) +#define MMX_PANDNmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PANDN, MD, MB, MI, MS, RD) +#define MMX_PAVGBrr(RS, RD) _MMXLrr(X86_MMX_PAVGB,RS,RD) +#define MMX_PAVGBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGB, MD, MB, MI, MS, RD) +#define MMX_PAVGWrr(RS, RD) _MMXLrr(X86_MMX_PAVGW,RS,RD) +#define MMX_PAVGWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PAVGW, MD, MB, MI, MS, RD) +#define MMX_PCMPEQBrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQB,RS,RD) +#define MMX_PCMPEQBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQB, MD, MB, MI, MS, RD) +#define MMX_PCMPEQWrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQW,RS,RD) +#define MMX_PCMPEQWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQW, MD, MB, MI, MS, RD) +#define MMX_PCMPEQDrr(RS, RD) _MMXLrr(X86_MMX_PCMPEQD,RS,RD) +#define MMX_PCMPEQDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPEQD, MD, MB, MI, MS, RD) +#define MMX_PCMPGTBrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTB,RS,RD) +#define MMX_PCMPGTBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTB, MD, MB, MI, MS, RD) +#define MMX_PCMPGTWrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTW,RS,RD) +#define MMX_PCMPGTWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTW, MD, MB, MI, MS, RD) +#define MMX_PCMPGTDrr(RS, RD) _MMXLrr(X86_MMX_PCMPGTD,RS,RD) +#define MMX_PCMPGTDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PCMPGTD, MD, MB, MI, MS, RD) +#define MMX_PMADDWDrr(RS, RD) _MMXLrr(X86_MMX_PMADDWD,RS,RD) +#define MMX_PMADDWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMADDWD, MD, MB, MI, MS, RD) +#define MMX_PMAXSWrr(RS, RD) _MMXLrr(X86_MMX_PMAXSW,RS,RD) +#define MMX_PMAXSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXSW, MD, MB, MI, MS, RD) +#define MMX_PMAXUBrr(RS, RD) _MMXLrr(X86_MMX_PMAXUB,RS,RD) +#define MMX_PMAXUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMAXUB, MD, MB, MI, MS, RD) +#define MMX_PMINSWrr(RS, RD) _MMXLrr(X86_MMX_PMINSW,RS,RD) +#define MMX_PMINSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINSW, MD, MB, MI, MS, RD) +#define MMX_PMINUBrr(RS, RD) _MMXLrr(X86_MMX_PMINUB,RS,RD) +#define MMX_PMINUBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMINUB, MD, MB, MI, MS, RD) +#define MMX_PMULHUWrr(RS, RD) _MMXLrr(X86_MMX_PMULHUW,RS,RD) +#define MMX_PMULHUWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHUW, MD, MB, MI, MS, RD) +#define MMX_PMULHWrr(RS, RD) _MMXLrr(X86_MMX_PMULHW,RS,RD) +#define MMX_PMULHWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULHW, MD, MB, MI, MS, RD) +#define MMX_PMULLWrr(RS, RD) _MMXLrr(X86_MMX_PMULLW,RS,RD) +#define MMX_PMULLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULLW, MD, MB, MI, MS, RD) +#define MMX_PMULUDQrr(RS, RD) _MMXLrr(X86_MMX_PMULUDQ,RS,RD) +#define MMX_PMULUDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PMULUDQ, MD, MB, MI, MS, RD) +#define MMX_PORrr(RS, RD) _MMXLrr(X86_MMX_POR,RS,RD) +#define MMX_PORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_POR, MD, MB, MI, MS, RD) +#define MMX_PSADBWrr(RS, RD) _MMXLrr(X86_MMX_PSADBW,RS,RD) +#define MMX_PSADBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSADBW, MD, MB, MI, MS, RD) +#define MMX_PSLLWir(IM, RD) __MMXLirr(X86_MMX_PSLLWi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLWrr(RS, RD) _MMXLrr(X86_MMX_PSLLW,RS,RD) +#define MMX_PSLLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLW, MD, MB, MI, MS, RD) +#define MMX_PSLLDir(IM, RD) __MMXLirr(X86_MMX_PSLLDi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLDrr(RS, RD) _MMXLrr(X86_MMX_PSLLD,RS,RD) +#define MMX_PSLLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLD, MD, MB, MI, MS, RD) +#define MMX_PSLLQir(IM, RD) __MMXLirr(X86_MMX_PSLLQi, IM, RD,_rM, _b110,_rN) +#define MMX_PSLLQrr(RS, RD) _MMXLrr(X86_MMX_PSLLQ,RS,RD) +#define MMX_PSLLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSLLQ, MD, MB, MI, MS, RD) +#define MMX_PSRAWir(IM, RD) __MMXLirr(X86_MMX_PSRAWi, IM, RD,_rM, _b100,_rN) +#define MMX_PSRAWrr(RS, RD) _MMXLrr(X86_MMX_PSRAW,RS,RD) +#define MMX_PSRAWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAW, MD, MB, MI, MS, RD) +#define MMX_PSRADir(IM, RD) __MMXLirr(X86_MMX_PSRADi, IM, RD,_rM, _b100,_rN) +#define MMX_PSRADrr(RS, RD) _MMXLrr(X86_MMX_PSRAD,RS,RD) +#define MMX_PSRADmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRAD, MD, MB, MI, MS, RD) +#define MMX_PSRLWir(IM, RD) __MMXLirr(X86_MMX_PSRLWi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLWrr(RS, RD) _MMXLrr(X86_MMX_PSRLW,RS,RD) +#define MMX_PSRLWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLW, MD, MB, MI, MS, RD) +#define MMX_PSRLDir(IM, RD) __MMXLirr(X86_MMX_PSRLDi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLDrr(RS, RD) _MMXLrr(X86_MMX_PSRLD,RS,RD) +#define MMX_PSRLDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLD, MD, MB, MI, MS, RD) +#define MMX_PSRLQir(IM, RD) __MMXLirr(X86_MMX_PSRLQi, IM, RD,_rM, _b010,_rN) +#define MMX_PSRLQrr(RS, RD) _MMXLrr(X86_MMX_PSRLQ,RS,RD) +#define MMX_PSRLQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSRLQ, MD, MB, MI, MS, RD) +#define MMX_PSUBBrr(RS, RD) _MMXLrr(X86_MMX_PSUBB,RS,RD) +#define MMX_PSUBBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBB, MD, MB, MI, MS, RD) +#define MMX_PSUBWrr(RS, RD) _MMXLrr(X86_MMX_PSUBW,RS,RD) +#define MMX_PSUBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBW, MD, MB, MI, MS, RD) +#define MMX_PSUBDrr(RS, RD) _MMXLrr(X86_MMX_PSUBD,RS,RD) +#define MMX_PSUBDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBD, MD, MB, MI, MS, RD) +#define MMX_PSUBQrr(RS, RD) _MMXLrr(X86_MMX_PSUBQ,RS,RD) +#define MMX_PSUBQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBQ, MD, MB, MI, MS, RD) +#define MMX_PSUBSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBSB,RS,RD) +#define MMX_PSUBSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSB, MD, MB, MI, MS, RD) +#define MMX_PSUBSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBSW,RS,RD) +#define MMX_PSUBSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBSW, MD, MB, MI, MS, RD) +#define MMX_PSUBUSBrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSB,RS,RD) +#define MMX_PSUBUSBmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSB, MD, MB, MI, MS, RD) +#define MMX_PSUBUSWrr(RS, RD) _MMXLrr(X86_MMX_PSUBUSW,RS,RD) +#define MMX_PSUBUSWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PSUBUSW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHBW,RS,RD) +#define MMX_PUNPCKHBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHBW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHWD,RS,RD) +#define MMX_PUNPCKHWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHWD, MD, MB, MI, MS, RD) +#define MMX_PUNPCKHDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKHDQ,RS,RD) +#define MMX_PUNPCKHDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKHDQ, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLBWrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLBW,RS,RD) +#define MMX_PUNPCKLBWmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLBW, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLWDrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLWD,RS,RD) +#define MMX_PUNPCKLWDmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLWD, MD, MB, MI, MS, RD) +#define MMX_PUNPCKLDQrr(RS, RD) _MMXLrr(X86_MMX_PUNPCKLDQ,RS,RD) +#define MMX_PUNPCKLDQmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PUNPCKLDQ, MD, MB, MI, MS, RD) +#define MMX_PXORrr(RS, RD) _MMXLrr(X86_MMX_PXOR,RS,RD) +#define MMX_PXORmr(MD,MB,MI,MS,RD) _MMXLmr(X86_MMX_PXOR, MD, MB, MI, MS, RD) + +#define MMX_PSHUFWirr(IM, RS, RD) __MMXLirr(X86_MMX_PSHUFW, IM, RS,_rM, RD,_rM) +#define MMX_PSHUFWimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PSHUFW, IM, MD, MB, MI, MS, RD,_rM) +#define MMX_PEXTRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r4) +#define MMX_PEXTRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PEXTRW, IM, RS,_rM, RD,_r8) +#define MMX_PINSRWLirr(IM, RS, RD) __MMXLirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) +#define MMX_PINSRWLimr(IM, MD, MB, MI, MS, RD) __MMXLimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r4) +#define MMX_PINSRWQirr(IM, RS, RD) __MMXQirr(X86_MMX_PINSRW, IM, RS,_r4, RD,_rM) +#define MMX_PINSRWQimr(IM, MD, MB, MI, MS, RD) __MMXQimr(X86_MMX_PINSRW, IM, MD, MB, MI, MS, RD,_r8) + +// Additionnal MMX instructions, brought by SSSE3 ISA +#define MMX_PABSBrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSB,RS,RD) +#define MMX_PABSBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSB, MD, MB, MI, MS, RD) +#define MMX_PABSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSW,RS,RD) +#define MMX_PABSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSW, MD, MB, MI, MS, RD) +#define MMX_PABSDrr(RS, RD) _2P_MMXLrr(X86_MMX_PABSD,RS,RD) +#define MMX_PABSDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PABSD, MD, MB, MI, MS, RD) +#define MMX_PHADDWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDW,RS,RD) +#define MMX_PHADDWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDW, MD, MB, MI, MS, RD) +#define MMX_PHADDDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDD,RS,RD) +#define MMX_PHADDDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDD, MD, MB, MI, MS, RD) +#define MMX_PHADDSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHADDSW,RS,RD) +#define MMX_PHADDSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHADDSW, MD, MB, MI, MS, RD) +#define MMX_PHSUBWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBW,RS,RD) +#define MMX_PHSUBWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBW, MD, MB, MI, MS, RD) +#define MMX_PHSUBDrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBD,RS,RD) +#define MMX_PHSUBDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBD, MD, MB, MI, MS, RD) +#define MMX_PHSUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PHSUBSW,RS,RD) +#define MMX_PHSUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PHSUBSW, MD, MB, MI, MS, RD) +#define MMX_PMADDUBSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMADDUBSW,RS,RD) +#define MMX_PMADDUBSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMADDUBSW, MD, MB, MI, MS, RD) +#define MMX_PMULHRSWrr(RS, RD) _2P_MMXLrr(X86_MMX_PMULHRSW,RS,RD) +#define MMX_PMULHRSWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PMULHRSW, MD, MB, MI, MS, RD) +#define MMX_PSHUFBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSHUFB,RS,RD) +#define MMX_PSHUFBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSHUFB, MD, MB, MI, MS, RD) +#define MMX_PSIGNBrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNB,RS,RD) +#define MMX_PSIGNBmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNB, MD, MB, MI, MS, RD) +#define MMX_PSIGNWrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGNW,RS,RD) +#define MMX_PSIGNWmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGNW, MD, MB, MI, MS, RD) +#define MMX_PSIGNDrr(RS, RD) _2P_MMXLrr(X86_MMX_PSIGND,RS,RD) +#define MMX_PSIGNDmr(MD,MB,MI,MS,RD) _2P_MMXLmr(X86_MMX_PSIGND, MD, MB, MI, MS, RD) + +#define EMMS() _OO (0x0f77 ) + + +/* --- Media 128-bit instructions ------------------------------------------ */ + +enum { + X86_SSE_CC_EQ = 0, + X86_SSE_CC_LT = 1, + X86_SSE_CC_GT = 1, + X86_SSE_CC_LE = 2, + X86_SSE_CC_GE = 2, + X86_SSE_CC_U = 3, + X86_SSE_CC_NEQ = 4, + X86_SSE_CC_NLT = 5, + X86_SSE_CC_NGT = 5, + X86_SSE_CC_NLE = 6, + X86_SSE_CC_NGE = 6, + X86_SSE_CC_O = 7 +}; + +enum { + X86_SSE_UCOMI = 0x2e, + X86_SSE_COMI = 0x2f, + X86_SSE_CMP = 0xc2, + X86_SSE_SQRT = 0x51, + X86_SSE_RSQRT = 0x52, + X86_SSE_RCP = 0x53, + X86_SSE_AND = 0x54, + X86_SSE_ANDN = 0x55, + X86_SSE_OR = 0x56, + X86_SSE_XOR = 0x57, + X86_SSE_ADD = 0x58, + X86_SSE_MUL = 0x59, + X86_SSE_SUB = 0x5c, + X86_SSE_MIN = 0x5d, + X86_SSE_DIV = 0x5e, + X86_SSE_MAX = 0x5f, + X86_SSE_CVTDQ2PD = 0xe6, + X86_SSE_CVTDQ2PS = 0x5b, + X86_SSE_CVTPD2DQ = 0xe6, + X86_SSE_CVTPD2PI = 0x2d, + X86_SSE_CVTPD2PS = 0x5a, + X86_SSE_CVTPI2PD = 0x2a, + X86_SSE_CVTPI2PS = 0x2a, + X86_SSE_CVTPS2DQ = 0x5b, + X86_SSE_CVTPS2PD = 0x5a, + X86_SSE_CVTPS2PI = 0x2d, + X86_SSE_CVTSD2SI = 0x2d, + X86_SSE_CVTSD2SS = 0x5a, + X86_SSE_CVTSI2SD = 0x2a, + X86_SSE_CVTSI2SS = 0x2a, + X86_SSE_CVTSS2SD = 0x5a, + X86_SSE_CVTSS2SI = 0x2d, + X86_SSE_CVTTPD2PI = 0x2c, + X86_SSE_CVTTPD2DQ = 0xe6, + X86_SSE_CVTTPS2DQ = 0x5b, + X86_SSE_CVTTPS2PI = 0x2c, + X86_SSE_CVTTSD2SI = 0x2c, + X86_SSE_CVTTSS2SI = 0x2c, + X86_SSE_MOVMSK = 0x50, + X86_SSE_PACKSSDW = 0x6b, + X86_SSE_PACKSSWB = 0x63, + X86_SSE_PACKUSWB = 0x67, + X86_SSE_PADDB = 0xfc, + X86_SSE_PADDD = 0xfe, + X86_SSE_PADDQ = 0xd4, + X86_SSE_PADDSB = 0xec, + X86_SSE_PADDSW = 0xed, + X86_SSE_PADDUSB = 0xdc, + X86_SSE_PADDUSW = 0xdd, + X86_SSE_PADDW = 0xfd, + X86_SSE_PAND = 0xdb, + X86_SSE_PANDN = 0xdf, + X86_SSE_PAVGB = 0xe0, + X86_SSE_PAVGW = 0xe3, + X86_SSE_PCMPEQB = 0x74, + X86_SSE_PCMPEQD = 0x76, + X86_SSE_PCMPEQW = 0x75, + X86_SSE_PCMPGTB = 0x64, + X86_SSE_PCMPGTD = 0x66, + X86_SSE_PCMPGTW = 0x65, + X86_SSE_PMADDWD = 0xf5, + X86_SSE_PMAXSW = 0xee, + X86_SSE_PMAXUB = 0xde, + X86_SSE_PMINSW = 0xea, + X86_SSE_PMINUB = 0xda, + X86_SSE_PMOVMSKB = 0xd7, + X86_SSE_PMULHUW = 0xe4, + X86_SSE_PMULHW = 0xe5, + X86_SSE_PMULLW = 0xd5, + X86_SSE_PMULUDQ = 0xf4, + X86_SSE_POR = 0xeb, + X86_SSE_PSADBW = 0xf6, + X86_SSE_PSLLD = 0xf2, + X86_SSE_PSLLQ = 0xf3, + X86_SSE_PSLLW = 0xf1, + X86_SSE_PSRAD = 0xe2, + X86_SSE_PSRAW = 0xe1, + X86_SSE_PSRLD = 0xd2, + X86_SSE_PSRLQ = 0xd3, + X86_SSE_PSRLW = 0xd1, + X86_SSE_PSUBB = 0xf8, + X86_SSE_PSUBD = 0xfa, + X86_SSE_PSUBQ = 0xfb, + X86_SSE_PSUBSB = 0xe8, + X86_SSE_PSUBSW = 0xe9, + X86_SSE_PSUBUSB = 0xd8, + X86_SSE_PSUBUSW = 0xd9, + X86_SSE_PSUBW = 0xf9, + X86_SSE_PUNPCKHBW = 0x68, + X86_SSE_PUNPCKHDQ = 0x6a, + X86_SSE_PUNPCKHQDQ = 0x6d, + X86_SSE_PUNPCKHWD = 0x69, + X86_SSE_PUNPCKLBW = 0x60, + X86_SSE_PUNPCKLDQ = 0x62, + X86_SSE_PUNPCKLQDQ = 0x6c, + X86_SSE_PUNPCKLWD = 0x61, + X86_SSE_PXOR = 0xef, + X86_SSSE3_PSHUFB = 0x00, +}; + +/* _format Opcd ,Mod ,r ,m ,mem=dsp+sib ,imm... */ + +#define _SSSE3Lrr(OP1,OP2,RS,RSA,RD,RDA) (_B(0x66), _REXLrr(RD,RD), _B(0x0f), _OO_Mrm (((OP1)<<8)|(OP2) ,_b11,RDA(RD),RSA(RS) )) +#define _SSSE3Lmr(OP1,OP2,MD,MB,MI,MS,RD,RDA) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X (((OP1)<<8)|(OP2) ,RDA(RD) ,MD,MB,MI,MS )) +#define _SSSE3Lirr(OP1,OP2,IM,RS,RD) (_B(0x66), _REXLrr(RD, RS), _B(0x0f), _OO_Mrm_B (((OP1)<<8)|(OP2) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) +#define _SSSE3Limr(OP1,OP2,IM,MD,MB,MI,MS,RD) (_B(0x66), _REXLmr(MB, MI, RD), _B(0x0f), _OO_r_X_B (((OP1)<<8)|(OP2) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) + +#define __SSELir(OP,MO,IM,RD) (_REXLrr(0, RD), _OO_Mrm_B (0x0f00|(OP) ,_b11,MO ,_rX(RD) ,_u8(IM))) +#define __SSELim(OP,MO,IM,MD,MB,MI,MS) (_REXLrm(0, MB, MI), _OO_r_X_B (0x0f00|(OP) ,MO ,MD,MB,MI,MS ,_u8(IM))) +#define __SSELrr(OP,RS,RSA,RD,RDA) (_REXLrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSELmr(OP,MD,MB,MI,MS,RD,RDA) (_REXLmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSELrm(OP,RS,RSA,MD,MB,MI,MS) (_REXLrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) +#define __SSELirr(OP,IM,RS,RD) (_REXLrr(RD, RS), _OO_Mrm_B (0x0f00|(OP) ,_b11,_rX(RD),_rX(RS) ,_u8(IM))) +#define __SSELimr(OP,IM,MD,MB,MI,MS,RD) (_REXLmr(MB, MI, RD), _OO_r_X_B (0x0f00|(OP) ,_rX(RD) ,MD,MB,MI,MS ,_u8(IM))) + +#define __SSEQrr(OP,RS,RSA,RD,RDA) (_REXQrr(RD, RS), _OO_Mrm (0x0f00|(OP) ,_b11,RDA(RD),RSA(RS) )) +#define __SSEQmr(OP,MD,MB,MI,MS,RD,RDA) (_REXQmr(MB, MI, RD), _OO_r_X (0x0f00|(OP) ,RDA(RD) ,MD,MB,MI,MS )) +#define __SSEQrm(OP,RS,RSA,MD,MB,MI,MS) (_REXQrm(RS, MB, MI), _OO_r_X (0x0f00|(OP) ,RSA(RS) ,MD,MB,MI,MS )) + +#define _SSELrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSELrr(OP, RS, RSA, RD, RDA)) +#define _SSELmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSELmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSELrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSELrm(OP, RS, RSA, MD, MB, MI, MS)) +#define _SSELir(PX,OP,MO,IM,RD) (_B(PX), __SSELir(OP, MO, IM, RD)) +#define _SSELim(PX,OP,MO,IM,MD,MB,MI,MS) (_B(PX), __SSELim(OP, MO, IM, MD, MB, MI, MS)) +#define _SSELirr(PX,OP,IM,RS,RD) (_B(PX), __SSELirr(OP, IM, RS, RD)) +#define _SSELimr(PX,OP,IM,MD,MB,MI,MS,RD) (_B(PX), __SSELimr(OP, IM, MD, MB, MI, MS, RD)) + +#define _SSEQrr(PX,OP,RS,RSA,RD,RDA) (_B(PX), __SSEQrr(OP, RS, RSA, RD, RDA)) +#define _SSEQmr(PX,OP,MD,MB,MI,MS,RD,RDA) (_B(PX), __SSEQmr(OP, MD, MB, MI, MS, RD, RDA)) +#define _SSEQrm(PX,OP,RS,RSA,MD,MB,MI,MS) (_B(PX), __SSEQrm(OP, RS, RSA, MD, MB, MI, MS)) + +#define _SSEPSrr(OP,RS,RD) __SSELrr( OP, RS,_rX, RD,_rX) +#define _SSEPSmr(OP,MD,MB,MI,MS,RD) __SSELmr( OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPSrm(OP,RS,MD,MB,MI,MS) __SSELrm( OP, RS,_rX, MD, MB, MI, MS) +#define _SSEPSirr(OP,IM,RS,RD) __SSELirr( OP, IM, RS, RD) +#define _SSEPSimr(OP,IM,MD,MB,MI,MS,RD) __SSELimr( OP, IM, MD, MB, MI, MS, RD) + +#define _SSEPDrr(OP,RS,RD) _SSELrr(0x66, OP, RS,_rX, RD,_rX) +#define _SSEPDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0x66, OP, MD, MB, MI, MS, RD,_rX) +#define _SSEPDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0x66, OP, RS,_rX, MD, MB, MI, MS) +#define _SSEPDirr(OP,IM,RS,RD) _SSELirr(0x66, OP, IM, RS, RD) +#define _SSEPDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0x66, OP, IM, MD, MB, MI, MS, RD) + +#define _SSESSrr(OP,RS,RD) _SSELrr(0xf3, OP, RS,_rX, RD,_rX) +#define _SSESSmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf3, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESSrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf3, OP, RS,_rX, MD, MB, MI, MS) +#define _SSESSirr(OP,IM,RS,RD) _SSELirr(0xf3, OP, IM, RS, RD) +#define _SSESSimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf3, OP, IM, MD, MB, MI, MS, RD) + +#define _SSESDrr(OP,RS,RD) _SSELrr(0xf2, OP, RS,_rX, RD,_rX) +#define _SSESDmr(OP,MD,MB,MI,MS,RD) _SSELmr(0xf2, OP, MD, MB, MI, MS, RD,_rX) +#define _SSESDrm(OP,RS,MD,MB,MI,MS) _SSELrm(0xf2, OP, RS,_rX, MD, MB, MI, MS) +#define _SSESDirr(OP,IM,RS,RD) _SSELirr(0xf2, OP, IM, RS, RD) +#define _SSESDimr(OP,IM,MD,MB,MI,MS,RD) _SSELimr(0xf2, OP, IM, MD, MB, MI, MS, RD) + +#define ADDPSrr(RS, RD) _SSEPSrr(X86_SSE_ADD, RS, RD) +#define ADDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDPDrr(RS, RD) _SSEPDrr(X86_SSE_ADD, RS, RD) +#define ADDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ADDSSrr(RS, RD) _SSESSrr(X86_SSE_ADD, RS, RD) +#define ADDSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_ADD, MD, MB, MI, MS, RD) +#define ADDSDrr(RS, RD) _SSESDrr(X86_SSE_ADD, RS, RD) +#define ADDSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_ADD, MD, MB, MI, MS, RD) + +#define ANDNPSrr(RS, RD) _SSEPSrr(X86_SSE_ANDN, RS, RD) +#define ANDNPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) +#define ANDNPDrr(RS, RD) _SSEPDrr(X86_SSE_ANDN, RS, RD) +#define ANDNPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_ANDN, MD, MB, MI, MS, RD) + +#define ANDPSrr(RS, RD) _SSEPSrr(X86_SSE_AND, RS, RD) +#define ANDPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_AND, MD, MB, MI, MS, RD) +#define ANDPDrr(RS, RD) _SSEPDrr(X86_SSE_AND, RS, RD) +#define ANDPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_AND, MD, MB, MI, MS, RD) + +#define CMPPSrr(IM, RS, RD) _SSEPSirr(X86_SSE_CMP, IM, RS, RD) +#define CMPPSmr(IM, MD, MB, MI, MS, RD) _SSEPSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) +#define CMPPDrr(IM, RS, RD) _SSEPDirr(X86_SSE_CMP, IM, RS, RD) +#define CMPPDmr(IM, MD, MB, MI, MS, RD) _SSEPDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) + +#define CMPSSrr(IM, RS, RD) _SSESSirr(X86_SSE_CMP, IM, RS, RD) +#define CMPSSmr(IM, MD, MB, MI, MS, RD) _SSESSimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) +#define CMPSDrr(IM, RS, RD) _SSESDirr(X86_SSE_CMP, IM, RS, RD) +#define CMPSDmr(IM, MD, MB, MI, MS, RD) _SSESDimr(X86_SSE_CMP, IM, MD, MB, MI, MS, RD) + +#define DIVPSrr(RS, RD) _SSEPSrr(X86_SSE_DIV, RS, RD) +#define DIVPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVPDrr(RS, RD) _SSEPDrr(X86_SSE_DIV, RS, RD) +#define DIVPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define DIVSSrr(RS, RD) _SSESSrr(X86_SSE_DIV, RS, RD) +#define DIVSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_DIV, MD, MB, MI, MS, RD) +#define DIVSDrr(RS, RD) _SSESDrr(X86_SSE_DIV, RS, RD) +#define DIVSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_DIV, MD, MB, MI, MS, RD) + +#define MAXPSrr(RS, RD) _SSEPSrr(X86_SSE_MAX, RS, RD) +#define MAXPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXPDrr(RS, RD) _SSEPDrr(X86_SSE_MAX, RS, RD) +#define MAXPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MAXSSrr(RS, RD) _SSESSrr(X86_SSE_MAX, RS, RD) +#define MAXSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MAX, MD, MB, MI, MS, RD) +#define MAXSDrr(RS, RD) _SSESDrr(X86_SSE_MAX, RS, RD) +#define MAXSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MAX, MD, MB, MI, MS, RD) + +#define MINPSrr(RS, RD) _SSEPSrr(X86_SSE_MIN, RS, RD) +#define MINPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINPDrr(RS, RD) _SSEPDrr(X86_SSE_MIN, RS, RD) +#define MINPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MINSSrr(RS, RD) _SSESSrr(X86_SSE_MIN, RS, RD) +#define MINSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MIN, MD, MB, MI, MS, RD) +#define MINSDrr(RS, RD) _SSESDrr(X86_SSE_MIN, RS, RD) +#define MINSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MIN, MD, MB, MI, MS, RD) + +#define MULPSrr(RS, RD) _SSEPSrr(X86_SSE_MUL, RS, RD) +#define MULPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULPDrr(RS, RD) _SSEPDrr(X86_SSE_MUL, RS, RD) +#define MULPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define MULSSrr(RS, RD) _SSESSrr(X86_SSE_MUL, RS, RD) +#define MULSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_MUL, MD, MB, MI, MS, RD) +#define MULSDrr(RS, RD) _SSESDrr(X86_SSE_MUL, RS, RD) +#define MULSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_MUL, MD, MB, MI, MS, RD) + +#define ORPSrr(RS, RD) _SSEPSrr(X86_SSE_OR, RS, RD) +#define ORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_OR, MD, MB, MI, MS, RD) +#define ORPDrr(RS, RD) _SSEPDrr(X86_SSE_OR, RS, RD) +#define ORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_OR, MD, MB, MI, MS, RD) + +#define RCPPSrr(RS, RD) _SSEPSrr(X86_SSE_RCP, RS, RD) +#define RCPPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) +#define RCPSSrr(RS, RD) _SSESSrr(X86_SSE_RCP, RS, RD) +#define RCPSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RCP, MD, MB, MI, MS, RD) + +#define RSQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) +#define RSQRTSSrr(RS, RD) _SSESSrr(X86_SSE_RSQRT, RS, RD) +#define RSQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_RSQRT, MD, MB, MI, MS, RD) + +#define SQRTPSrr(RS, RD) _SSEPSrr(X86_SSE_SQRT, RS, RD) +#define SQRTPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTPDrr(RS, RD) _SSEPDrr(X86_SSE_SQRT, RS, RD) +#define SQRTPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SQRTSSrr(RS, RD) _SSESSrr(X86_SSE_SQRT, RS, RD) +#define SQRTSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) +#define SQRTSDrr(RS, RD) _SSESDrr(X86_SSE_SQRT, RS, RD) +#define SQRTSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SQRT, MD, MB, MI, MS, RD) + +#define SUBPSrr(RS, RD) _SSEPSrr(X86_SSE_SUB, RS, RD) +#define SUBPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBPDrr(RS, RD) _SSEPDrr(X86_SSE_SUB, RS, RD) +#define SUBPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define SUBSSrr(RS, RD) _SSESSrr(X86_SSE_SUB, RS, RD) +#define SUBSSmr(MD, MB, MI, MS, RD) _SSESSmr(X86_SSE_SUB, MD, MB, MI, MS, RD) +#define SUBSDrr(RS, RD) _SSESDrr(X86_SSE_SUB, RS, RD) +#define SUBSDmr(MD, MB, MI, MS, RD) _SSESDmr(X86_SSE_SUB, MD, MB, MI, MS, RD) + +#define XORPSrr(RS, RD) _SSEPSrr(X86_SSE_XOR, RS, RD) +#define XORPSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_XOR, MD, MB, MI, MS, RD) +#define XORPDrr(RS, RD) _SSEPDrr(X86_SSE_XOR, RS, RD) +#define XORPDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_XOR, MD, MB, MI, MS, RD) + +#define COMISSrr(RS, RD) _SSEPSrr(X86_SSE_COMI, RS, RD) +#define COMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_COMI, MD, MB, MI, MS, RD) +#define COMISDrr(RS, RD) _SSEPDrr(X86_SSE_COMI, RS, RD) +#define COMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_COMI, MD, MB, MI, MS, RD) + +#define UCOMISSrr(RS, RD) _SSEPSrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISSmr(MD, MB, MI, MS, RD) _SSEPSmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) +#define UCOMISDrr(RS, RD) _SSEPDrr(X86_SSE_UCOMI, RS, RD) +#define UCOMISDmr(MD, MB, MI, MS, RD) _SSEPDmr(X86_SSE_UCOMI, MD, MB, MI, MS, RD) + +#define MOVAPSrr(RS, RD) _SSEPSrr(0x28, RS, RD) +#define MOVAPSmr(MD, MB, MI, MS, RD) _SSEPSmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPSrm(RS, MD, MB, MI, MS) _SSEPSrm(0x29, RS, MD, MB, MI, MS) + +#define MOVAPDrr(RS, RD) _SSEPDrr(0x28, RS, RD) +#define MOVAPDmr(MD, MB, MI, MS, RD) _SSEPDmr(0x28, MD, MB, MI, MS, RD) +#define MOVAPDrm(RS, MD, MB, MI, MS) _SSEPDrm(0x29, RS, MD, MB, MI, MS) + +#define CVTDQ2PDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTDQ2PD, RS,_rX, RD,_rX) +#define CVTDQ2PDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTDQ2PD, MD, MB, MI, MS, RD,_rX) +#define CVTDQ2PSrr(RS, RD) __SSELrr( X86_SSE_CVTDQ2PS, RS,_rX, RD,_rX) +#define CVTDQ2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTDQ2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPD2DQrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTPD2DQ, RS,_rX, RD,_rX) +#define CVTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTPD2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PI, RS,_rX, RD,_rM) +#define CVTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PI, MD, MB, MI, MS, RD,_rM) +#define CVTPD2PSrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPD2PS, RS,_rX, RD,_rX) +#define CVTPD2PSmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPD2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPI2PDrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPI2PD, RS,_rM, RD,_rX) +#define CVTPI2PDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPI2PD, MD, MB, MI, MS, RD,_rX) +#define CVTPI2PSrr(RS, RD) __SSELrr( X86_SSE_CVTPI2PS, RS,_rM, RD,_rX) +#define CVTPI2PSmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPI2PS, MD, MB, MI, MS, RD,_rX) +#define CVTPS2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTPS2DQ, RS,_rX, RD,_rX) +#define CVTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTPS2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTPS2PDrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PD, RS,_rX, RD,_rX) +#define CVTPS2PDmr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PD, MD, MB, MI, MS, RD,_rX) +#define CVTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTPS2PI, RS,_rX, RD,_rM) +#define CVTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTPS2PI, MD, MB, MI, MS, RD,_rM) +#define CVTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r4) +#define CVTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r4) +#define CVTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSD2SI, RS,_rX, RD,_r8) +#define CVTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSD2SI, MD, MB, MI, MS, RD,_r8) +#define CVTSD2SSrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSD2SS, RS,_rX, RD,_rX) +#define CVTSD2SSmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSD2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDLrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTSI2SD, RS,_r4, RD,_rX) +#define CVTSI2SDLmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SDQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTSI2SD, RS,_r8, RD,_rX) +#define CVTSI2SDQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTSI2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SSLrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSI2SS, RS,_r4, RD,_rX) +#define CVTSI2SSLmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSI2SSQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSI2SS, RS,_r8, RD,_rX) +#define CVTSI2SSQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSI2SS, MD, MB, MI, MS, RD,_rX) +#define CVTSS2SDrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SD, RS,_rX, RD,_rX) +#define CVTSS2SDmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SD, MD, MB, MI, MS, RD,_rX) +#define CVTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r4) +#define CVTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r4) +#define CVTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTSS2SI, RS,_rX, RD,_r8) +#define CVTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTSS2SI, MD, MB, MI, MS, RD,_r8) +#define CVTTPD2PIrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2PI, RS,_rX, RD,_rM) +#define CVTTPD2PImr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2PI, MD, MB, MI, MS, RD,_rM) +#define CVTTPD2DQrr(RS, RD) _SSELrr(0x66, X86_SSE_CVTTPD2DQ, RS,_rX, RD,_rX) +#define CVTTPD2DQmr(MD, MB, MI, MS, RD) _SSELmr(0x66, X86_SSE_CVTTPD2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTTPS2DQrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTPS2DQ, RS,_rX, RD,_rX) +#define CVTTPS2DQmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTPS2DQ, MD, MB, MI, MS, RD,_rX) +#define CVTTPS2PIrr(RS, RD) __SSELrr( X86_SSE_CVTTPS2PI, RS,_rX, RD,_rM) +#define CVTTPS2PImr(MD, MB, MI, MS, RD) __SSELmr( X86_SSE_CVTTPS2PI, MD, MB, MI, MS, RD,_rM) +#define CVTTSD2SILrr(RS, RD) _SSELrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r4) +#define CVTTSD2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r4) +#define CVTTSD2SIQrr(RS, RD) _SSEQrr(0xf2, X86_SSE_CVTTSD2SI, RS,_rX, RD,_r8) +#define CVTTSD2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf2, X86_SSE_CVTTSD2SI, MD, MB, MI, MS, RD,_r8) +#define CVTTSS2SILrr(RS, RD) _SSELrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r4) +#define CVTTSS2SILmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r4) +#define CVTTSS2SIQrr(RS, RD) _SSEQrr(0xf3, X86_SSE_CVTTSS2SI, RS,_rX, RD,_r8) +#define CVTTSS2SIQmr(MD, MB, MI, MS, RD) _SSEQmr(0xf3, X86_SSE_CVTTSS2SI, MD, MB, MI, MS, RD,_r8) + +#define MOVDXDrr(RS, RD) _SSELrr(0x66, 0x6e, RS,_r4, RD,_rX) +#define MOVDXDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) +#define MOVQXDrr(RS, RD) _SSEQrr(0x66, 0x6e, RS,_r8, RD,_rX) +#define MOVQXDmr(MD, MB, MI, MS, RD) _SSEQmr(0x66, 0x6e, MD, MB, MI, MS, RD,_rX) + +#define MOVDXSrr(RS, RD) _SSELrr(0x66, 0x7e, RD,_r4, RS,_rX) +#define MOVDXSrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) +#define MOVQXSrr(RS, RD) _SSEQrr(0x66, 0x7e, RD,_r8, RS,_rX) +#define MOVQXSrm(RS, MD, MB, MI, MS) _SSEQrm(0x66, 0x7e, RS,_rX, MD, MB, MI, MS) + +#define MOVDLMrr(RS, RD) __SSELrr( 0x6e, RS,_r4, RD,_rM) +#define MOVDLMmr(MD, MB, MI, MS, RD) __SSELmr( 0x6e, MD, MB, MI, MS, RD,_rM) +#define MOVDQMrr(RS, RD) __SSEQrr( 0x6e, RS,_r8, RD,_rM) +#define MOVDQMmr(MD, MB, MI, MS, RD) __SSEQmr( 0x6e, MD, MB, MI, MS, RD,_rM) + +#define MOVDMLrr(RS, RD) __SSELrr( 0x7e, RS,_rM, RD,_r4) +#define MOVDMLrm(RS, MD, MB, MI, MS) __SSELrm( 0x7e, RS,_rM, MD, MB, MI, MS) +#define MOVDMQrr(RS, RD) __SSEQrr( 0x7e, RS,_rM, RD,_r8) +#define MOVDMQrm(RS, MD, MB, MI, MS) __SSEQrm( 0x7e, RS,_rM, MD, MB, MI, MS) + +#define MOVDQ2Qrr(RS, RD) _SSELrr(0xf2, 0xd6, RS,_rX, RD,_rM) +#define MOVMSKPSrr(RS, RD) __SSELrr( 0x50, RS,_rX, RD,_r4) +#define MOVMSKPDrr(RS, RD) _SSELrr(0x66, 0x50, RS,_rX, RD,_r4) + +#define MOVHLPSrr(RS, RD) __SSELrr( 0x12, RS,_rX, RD,_rX) +#define MOVLHPSrr(RS, RD) __SSELrr( 0x16, RS,_rX, RD,_rX) + +#define MOVDQArr(RS, RD) _SSELrr(0x66, 0x6f, RS,_rX, RD,_rX) +#define MOVDQAmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQArm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVDQUrr(RS, RD) _SSELrr(0xf3, 0x6f, RS,_rX, RD,_rX) +#define MOVDQUmr(MD, MB, MI, MS, RD) _SSELmr(0xf3, 0x6f, MD, MB, MI, MS, RD,_rX) +#define MOVDQUrm(RS, MD, MB, MI, MS) _SSELrm(0xf3, 0x7f, RS,_rX, MD, MB, MI, MS) + +#define MOVHPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x17, RS,_rX, MD, MB, MI, MS) +#define MOVHPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x16, MD, MB, MI, MS, RD,_rX) +#define MOVHPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x17, RS,_rX, MD, MB, MI, MS) + +#define MOVLPDmr(MD, MB, MI, MS, RD) _SSELmr(0x66, 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPDrm(RS, MD, MB, MI, MS) _SSELrm(0x66, 0x13, RS,_rX, MD, MB, MI, MS) +#define MOVLPSmr(MD, MB, MI, MS, RD) __SSELmr( 0x12, MD, MB, MI, MS, RD,_rX) +#define MOVLPSrm(RS, MD, MB, MI, MS) __SSELrm( 0x13, RS,_rX, MD, MB, MI, MS) + + +/* --- Floating-Point instructions ----------------------------------------- */ + +enum { + X86_F2XM1 = 0xd9f0, + X86_FABS = 0xd9e1, + X86_FADD = 0xd8c0, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIADD = 0xda00, // m32int, m16int + X86_FBLD = 0xdf04, // mem + X86_FBSTP = 0xdf06, // mem + X86_FCHS = 0xd9e0, + X86_FCMOVB = 0xdac0, // sti0 + X86_FCMOVE = 0xdac8, // sti0 + X86_FCMOVBE = 0xdad0, // sti0 + X86_FCMOVU = 0xdad8, // sti0 + X86_FCMOVNB = 0xdbc0, // sti0 + X86_FCMOVNE = 0xdbc8, // sti0 + X86_FCMOVNBE = 0xdbd0, // sti0 + X86_FCMOVNU = 0xdbd8, // sti0 + X86_FCOM = 0xd8d2, // m32fp, m64fp, sti + X86_FCOMP = 0xd8db, // m32fp, m64fp, sti + X86_FCOMPP = 0xded9, + X86_FCOMI = 0xdbf0, // sti0 + X86_FCOMIP = 0xdff0, // sti0 + X86_FUCOMI = 0xdbe8, // sti0 + X86_FUCOMIP = 0xdfe8, // sti0 + X86_FCOS = 0xd9ff, + X86_FDECSTP = 0xd9f6, + X86_FDIV = 0xd8f6, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIDIV = 0xda06, // m32int, m16int + X86_FDIVR = 0xd8ff, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIDIVR = 0xda07, // m32int, m16int + X86_FFREE = 0xddc0, // sti + X86_FICOM = 0xda02, // m32int, m16int + X86_FICOMP = 0xda03, // m32int, m16int + X86_FILD = 0xdb00, // m32int, m16int + X86_FILDQ = 0xdf05, // mem + X86_FINCSTP = 0xd9f7, + X86_FIST = 0xdb02, // m32int, m16int + X86_FISTP = 0xdb03, // m32int, m16int + X86_FISTPQ = 0xdf07, // mem + X86_FISTTP = 0xdb01, // m32int, m16int + X86_FISTTPQ = 0xdd01, // mem + X86_FLD = 0xd900, // m32fp, m64fp + X86_FLDT = 0xdb05, // mem + X86_FLD1 = 0xd9e8, + X86_FLDL2T = 0xd9e9, + X86_FLDL2E = 0xd9ea, + X86_FLDPI = 0xd9eb, + X86_FLDLG2 = 0xd9ec, + X86_FLDLN2 = 0xd9ed, + X86_FLDZ = 0xd9ee, + X86_FMUL = 0xd8c9, // m32fp, m64fp, sti0, st0i, pst0i + X86_FIMUL = 0xda01, // m32int, m16int + X86_FNOP = 0xd9d0, + X86_FPATAN = 0xd9f3, + X86_FPREM = 0xd9f8, + X86_FPREM1 = 0xd9f5, + X86_FPTAN = 0xd9f2, + X86_FRNDINT = 0xd9fc, + X86_FSCALE = 0xd9fd, + X86_FSIN = 0xd9fe, + X86_FSINCOS = 0xd9fb, + X86_FSQRT = 0xd9fa, + X86_FSTS = 0xd902, // mem + X86_FSTD = 0xdd02, // mem + X86_FST = 0xddd0, // sti + X86_FSTPS = 0xd903, // mem + X86_FSTPD = 0xdd03, // mem + X86_FSTPT = 0xdb07, // mem + X86_FSTP = 0xddd8, // sti + X86_FSUB = 0xd8e4, // m32fp, m64fp, sti0, st0i, pst0i + X86_FISUB = 0xda04, // m32int, m16int + X86_FSUBR = 0xd8ed, // m32fp, m64fp, sti0, st0i, pst0i + X86_FISUBR = 0xda05, // m32int, m16int + X86_FTST = 0xd9e4, + X86_FUCOM = 0xdde0, // sti + X86_FUCOMP = 0xdde8, // sti + X86_FUCOMPP = 0xdae9, + X86_FXAM = 0xd9e5, + X86_FXCH = 0xd9c8, // sti + X86_FXTRACT = 0xd9f4, + X86_FYL2X = 0xd9f1, + X86_FYL2XP1 = 0xd9f9, +}; + +#define _FPU(OP) _OO(OP) +#define _FPUm(OP, MD, MB, MI, MS) (_REXLrm(0, MB, MI), _O_r_X((OP)>>8, (OP)&7, MD, MB, MI, MS)) +#define _FPUSm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) +#define _FPUDm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) +#define _FPULm(OP, MD, MB, MI, MS) _FPUm(OP, MD, MB, MI, MS) +#define _FPUWm(OP, MD, MB, MI, MS) _FPUm((OP)|0x400, MD, MB, MI, MS) +#define _FPUr(OP, RR) _OOr((OP)&0xfff8, _rF(RR)) +#define _FPU0r(OP, RD) _FPUr((OP)|0x400, RD) +#define _FPUr0(OP, RS) _FPUr((OP) , RS) +#define _FPUrr(OP, RS, RD) (_rST0P(RS) ? _FPU0r(OP, RD) : (_rST0P(RD) ? _FPUr0(OP, RS) : x86_emit_failure("FPU instruction without st0"))) +#define _FPUP0r(OP, RD) _FPU0r((OP)|0x200, RD) + +#define F2XM1() _FPU(X86_F2XM1) +#define FABS() _FPU(X86_FABS) +#define FADDSm(MD, MB, MI, MS) _FPUSm(X86_FADD, MD, MB, MI, MS) +#define FADDDm(MD, MB, MI, MS) _FPUDm(X86_FADD, MD, MB, MI, MS) +#define FADDP0r(RD) _FPUP0r(X86_FADD, RD) +#define FADDrr(RS, RD) _FPUrr(X86_FADD, RS, RD) +#define FADD0r(RD) _FPU0r(X86_FADD, RD) +#define FADDr0(RS) _FPUr0(X86_FADD, RS) +#define FIADDWm(MD, MB, MI, MS) _FPUWm(X86_FIADD, MD, MB, MI, MS) +#define FIADDLm(MD, MB, MI, MS) _FPULm(X86_FIADD, MD, MB, MI, MS) +#define FBLDm(MD, MB, MI, MS) _FPUm(X86_FBLD, MD, MB, MI, MS) +#define FBSTPm(MD, MB, MI, MS) _FPUm(X86_FBSTP, MD, MB, MI, MS) +#define FCHS() _FPU(X86_FCHS) +#define FCMOVBr0(RS) _FPUr0(X86_FCMOVB, RS) +#define FCMOVEr0(RS) _FPUr0(X86_FCMOVE, RS) +#define FCMOVBEr0(RS) _FPUr0(X86_FCMOVBE, RS) +#define FCMOVUr0(RS) _FPUr0(X86_FCMOVU, RS) +#define FCMOVNBr0(RS) _FPUr0(X86_FCMOVNB, RS) +#define FCMOVNEr0(RS) _FPUr0(X86_FCMOVNE, RS) +#define FCMOVNBEr0(RS) _FPUr0(X86_FCMOVNBE, RS) +#define FCMOVNUr0(RS) _FPUr0(X86_FCMOVNU, RS) +#define FCOMSm(MD, MB, MI, MS) _FPUSm(X86_FCOM, MD, MB, MI, MS) +#define FCOMDm(MD, MB, MI, MS) _FPUDm(X86_FCOM, MD, MB, MI, MS) +#define FCOMr(RD) _FPUr(X86_FCOM, RD) +#define FCOMPSm(MD, MB, MI, MS) _FPUSm(X86_FCOMP, MD, MB, MI, MS) +#define FCOMPDm(MD, MB, MI, MS) _FPUDm(X86_FCOMP, MD, MB, MI, MS) +#define FCOMPr(RD) _FPUr(X86_FCOMP, RD) +#define FCOMPP() _FPU(X86_FCOMPP) +#define FCOMIr0(RS) _FPUr0(X86_FCOMI, RS) +#define FCOMIPr0(RS) _FPUr0(X86_FCOMIP, RS) +#define FUCOMIr0(RS) _FPUr0(X86_FUCOMI, RS) +#define FUCOMIPr0(RS) _FPUr0(X86_FUCOMIP, RS) +#define FCOS() _FPU(X86_FCOS) +#define FDECSTP() _FPU(X86_FDECSTP) +#define FDIVSm(MD, MB, MI, MS) _FPUSm(X86_FDIV, MD, MB, MI, MS) +#define FDIVDm(MD, MB, MI, MS) _FPUDm(X86_FDIV, MD, MB, MI, MS) +#define FDIVP0r(RD) _FPUP0r(X86_FDIV, RD) +#define FDIVrr(RS, RD) _FPUrr(X86_FDIV, RS, RD) +#define FDIV0r(RD) _FPU0r(X86_FDIV, RD) +#define FDIVr0(RS) _FPUr0(X86_FDIV, RS) +#define FIDIVWm(MD, MB, MI, MS) _FPUWm(X86_FIDIV, MD, MB, MI, MS) +#define FIDIVLm(MD, MB, MI, MS) _FPULm(X86_FIDIV, MD, MB, MI, MS) +#define FDIVRSm(MD, MB, MI, MS) _FPUSm(X86_FDIVR, MD, MB, MI, MS) +#define FDIVRDm(MD, MB, MI, MS) _FPUDm(X86_FDIVR, MD, MB, MI, MS) +#define FDIVRP0r(RD) _FPUP0r(X86_FDIVR, RD) +#define FDIVRrr(RS, RD) _FPUrr(X86_FDIVR, RS, RD) +#define FDIVR0r(RD) _FPU0r(X86_FDIVR, RD) +#define FDIVRr0(RS) _FPUr0(X86_FDIVR, RS) +#define FIDIVRWm(MD, MB, MI, MS) _FPUWm(X86_FIDIVR, MD, MB, MI, MS) +#define FIDIVRLm(MD, MB, MI, MS) _FPULm(X86_FIDIVR, MD, MB, MI, MS) +#define FFREEr(RD) _FPUr(X86_FFREE, RD) +#define FICOMWm(MD, MB, MI, MS) _FPUWm(X86_FICOM, MD, MB, MI, MS) +#define FICOMLm(MD, MB, MI, MS) _FPULm(X86_FICOM, MD, MB, MI, MS) +#define FICOMPWm(MD, MB, MI, MS) _FPUWm(X86_FICOMP, MD, MB, MI, MS) +#define FICOMPLm(MD, MB, MI, MS) _FPULm(X86_FICOMP, MD, MB, MI, MS) +#define FILDWm(MD, MB, MI, MS) _FPUWm(X86_FILD, MD, MB, MI, MS) +#define FILDLm(MD, MB, MI, MS) _FPULm(X86_FILD, MD, MB, MI, MS) +#define FILDQm(MD, MB, MI, MS) _FPUm(X86_FILDQ, MD, MB, MI, MS) +#define FINCSTP() _FPU(X86_FINCSTP) +#define FISTWm(MD, MB, MI, MS) _FPUWm(X86_FIST, MD, MB, MI, MS) +#define FISTLm(MD, MB, MI, MS) _FPULm(X86_FIST, MD, MB, MI, MS) +#define FISTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTP, MD, MB, MI, MS) +#define FISTPLm(MD, MB, MI, MS) _FPULm(X86_FISTP, MD, MB, MI, MS) +#define FISTPQm(MD, MB, MI, MS) _FPUm(X86_FISTPQ, MD, MB, MI, MS) +#define FISTTPWm(MD, MB, MI, MS) _FPUWm(X86_FISTTP, MD, MB, MI, MS) +#define FISTTPLm(MD, MB, MI, MS) _FPULm(X86_FISTTP, MD, MB, MI, MS) +#define FISTTPQm(MD, MB, MI, MS) _FPUm(X86_FISTTPQ, MD, MB, MI, MS) +#define FLDSm(MD, MB, MI, MS) _FPUSm(X86_FLD, MD, MB, MI, MS) +#define FLDDm(MD, MB, MI, MS) _FPUDm(X86_FLD, MD, MB, MI, MS) +#define FLDTm(MD, MB, MI, MS) _FPUm(X86_FLDT, MD, MB, MI, MS) +#define FLD1() _FPU(X86_FLD1) +#define FLDL2T() _FPU(X86_FLDL2T) +#define FLDL2E() _FPU(X86_FLDL2E) +#define FLDPI() _FPU(X86_FLDPI) +#define FLDLG2() _FPU(X86_FLDLG2) +#define FLDLN2() _FPU(X86_FLDLN2) +#define FLDZ() _FPU(X86_FLDZ) +#define FMULSm(MD, MB, MI, MS) _FPUSm(X86_FMUL, MD, MB, MI, MS) +#define FMULDm(MD, MB, MI, MS) _FPUDm(X86_FMUL, MD, MB, MI, MS) +#define FMULP0r(RD) _FPUP0r(X86_FMUL, RD) +#define FMULrr(RS, RD) _FPUrr(X86_FMUL, RS, RD) +#define FMUL0r(RD) _FPU0r(X86_FMUL, RD) +#define FMULr0(RS) _FPUr0(X86_FMUL, RS) +#define FIMULWm(MD, MB, MI, MS) _FPUWm(X86_FIMUL, MD, MB, MI, MS) +#define FIMULLm(MD, MB, MI, MS) _FPULm(X86_FIMUL, MD, MB, MI, MS) +#define FNOP() _FPU(X86_FNOP) +#define FPATAN() _FPU(X86_FPATAN) +#define FPREM() _FPU(X86_FPREM) +#define FPREM1() _FPU(X86_FPREM1) +#define FPTAN() _FPU(X86_FPTAN) +#define FRNDINT() _FPU(X86_FRNDINT) +#define FSCALE() _FPU(X86_FSCALE) +#define FSIN() _FPU(X86_FSIN) +#define FSINCOS() _FPU(X86_FSINCOS) +#define FSQRT() _FPU(X86_FSQRT) +#define FSTSm(MD, MB, MI, MS) _FPUm(X86_FSTS, MD, MB, MI, MS) +#define FSTDm(MD, MB, MI, MS) _FPUm(X86_FSTD, MD, MB, MI, MS) +#define FSTr(RD) _FPUr(X86_FST, RD) +#define FSTPSm(MD, MB, MI, MS) _FPUm(X86_FSTPS, MD, MB, MI, MS) +#define FSTPDm(MD, MB, MI, MS) _FPUm(X86_FSTPD, MD, MB, MI, MS) +#define FSTPTm(MD, MB, MI, MS) _FPUm(X86_FSTPT, MD, MB, MI, MS) +#define FSTPr(RD) _FPUr(X86_FSTP, RD) +#define FSUBSm(MD, MB, MI, MS) _FPUSm(X86_FSUB, MD, MB, MI, MS) +#define FSUBDm(MD, MB, MI, MS) _FPUDm(X86_FSUB, MD, MB, MI, MS) +#define FSUBP0r(RD) _FPUP0r(X86_FSUB, RD) +#define FSUBrr(RS, RD) _FPUrr(X86_FSUB, RS, RD) +#define FSUB0r(RD) _FPU0r(X86_FSUB, RD) +#define FSUBr0(RS) _FPUr0(X86_FSUB, RS) +#define FISUBWm(MD, MB, MI, MS) _FPUWm(X86_FISUB, MD, MB, MI, MS) +#define FISUBLm(MD, MB, MI, MS) _FPULm(X86_FISUB, MD, MB, MI, MS) +#define FSUBRSm(MD, MB, MI, MS) _FPUSm(X86_FSUBR, MD, MB, MI, MS) +#define FSUBRDm(MD, MB, MI, MS) _FPUDm(X86_FSUBR, MD, MB, MI, MS) +#define FSUBRP0r(RD) _FPUP0r(X86_FSUBR, RD) +#define FSUBRrr(RS, RD) _FPUrr(X86_FSUBR, RS, RD) +#define FSUBR0r(RD) _FPU0r(X86_FSUBR, RD) +#define FSUBRr0(RS) _FPUr0(X86_FSUBR, RS) +#define FISUBRWm(MD, MB, MI, MS) _FPUWm(X86_FISUBR, MD, MB, MI, MS) +#define FISUBRLm(MD, MB, MI, MS) _FPULm(X86_FISUBR, MD, MB, MI, MS) +#define FTST() _FPU(X86_FTST) +#define FUCOMr(RD) _FPUr(X86_FUCOM, RD) +#define FUCOMPr(RD) _FPUr(X86_FUCOMP, RD) +#define FUCOMPP() _FPU(X86_FUCOMPP) +#define FXAM() _FPU(X86_FXAM) +#define FXCHr(RD) _FPUr(X86_FXCH, RD) +#define FXTRACT() _FPU(X86_FXTRACT) +#define FYL2X() _FPU(X86_FYL2X) +#define FYL2XP1() _FPU(X86_FYL2XP1) + +#endif /* X86_RTASM_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h new file mode 100644 index 000000000..9a612fb21 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -0,0 +1,609 @@ +/* + * compiler/compemu.h - Public interface and definitions + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 COMPEMU_H +#define COMPEMU_H + +#include "newcpu.h" + +#if USE_JIT + +#if defined __i386__ || defined __x86_64__ +#include "flags_x86.h" +#else +#error "Unsupported JIT compiler for this architecture" +#endif + +#if JIT_DEBUG +/* dump some information (m68k block, x86 block addresses) about the compiler state */ +extern void compiler_dumpstate(void); +#endif + +/* Now that we do block chaining, and also have linked lists on each tag, + TAGMASK can be much smaller and still do its job. Saves several megs + of memory! */ +#define TAGMASK 0x0000ffff +#define TAGSIZE (TAGMASK+1) +#define MAXRUN 1024 +#define cacheline(x) (((uintptr)x)&TAGMASK) + +extern uae_u8* start_pc_p; +extern uae_u32 start_pc; + +struct blockinfo_t; + +struct cpu_history { + uae_u16 * location; +}; + +union cacheline { + cpuop_func * handler; + blockinfo_t * bi; +}; + +/* Use new spill/reload strategy when calling external functions */ +#define USE_OPTIMIZED_CALLS 0 +#if USE_OPTIMIZED_CALLS +#error implementation in progress +#endif + +/* (gb) When on, this option can save save up to 30% compilation time + * when many lazy flushes occur (e.g. apps in MacOS 8.x). + */ +#define USE_SEPARATE_BIA 1 + +/* Use chain of checksum_info_t to compute the block checksum */ +#define USE_CHECKSUM_INFO 1 + +/* Use code inlining, aka follow-up of constant jumps */ +#define USE_INLINING 1 + +/* Inlining requires the chained checksuming information */ +#if USE_INLINING +#undef USE_CHECKSUM_INFO +#define USE_CHECKSUM_INFO 1 +#endif + +/* Does flush_icache_range() only check for blocks falling in the requested range? */ +#define LAZY_FLUSH_ICACHE_RANGE 0 + +#define USE_F_ALIAS 1 +#define USE_OFFSET 1 +#define COMP_DEBUG 1 + +#if COMP_DEBUG +#define Dif(x) if (x) +#else +#define Dif(x) if (0) +#endif + +#define SCALE 2 + +#define BYTES_PER_INST 10240 /* paranoid ;-) */ +#define LONGEST_68K_INST 16 /* The number of bytes the longest possible + 68k instruction takes */ +#define MAX_CHECKSUM_LEN 2048 /* The maximum size we calculate checksums + for. Anything larger will be flushed + unconditionally even with SOFT_FLUSH */ +#define MAX_HOLD_BI 3 /* One for the current block, and up to two + for jump targets */ + +#define INDIVIDUAL_INST 0 +#if 1 +// gb-- my format from readcpu.cpp is not the same +#define FLAG_X 0x0010 +#define FLAG_N 0x0008 +#define FLAG_Z 0x0004 +#define FLAG_V 0x0002 +#define FLAG_C 0x0001 +#else +#define FLAG_C 0x0010 +#define FLAG_V 0x0008 +#define FLAG_Z 0x0004 +#define FLAG_N 0x0002 +#define FLAG_X 0x0001 +#endif +#define FLAG_CZNV (FLAG_C | FLAG_Z | FLAG_N | FLAG_V) +#define FLAG_ZNV (FLAG_Z | FLAG_N | FLAG_V) + +#define KILLTHERAT 1 /* Set to 1 to avoid some partial_rat_stalls */ + +#if defined(__x86_64__) +#define N_REGS 16 /* really only 15, but they are numbered 0-3,5-15 */ +#else +#define N_REGS 8 /* really only 7, but they are numbered 0,1,2,3,5,6,7 */ +#endif +#define N_FREGS 6 /* That leaves us two positions on the stack to play with */ + +/* Functions exposed to newcpu, or to what was moved from newcpu.c to + * compemu_support.c */ +extern void compiler_init(void); +extern void compiler_exit(void); +extern bool compiler_use_jit(void); +extern void init_comp(void); +extern void flush(int save_regs); +extern void small_flush(int save_regs); +extern void set_target(uae_u8* t); +extern uae_u8* get_target(void); +extern void freescratch(void); +extern void build_comp(void); +extern void set_cache_state(int enabled); +extern int get_cache_state(void); +extern uae_u32 get_jitted_size(void); +extern void (*flush_icache)(int n); +extern void alloc_cache(void); +extern int check_for_cache_miss(void); + +/* JIT FPU compilation */ +extern void comp_fpp_opp (uae_u32 opcode, uae_u16 extra); +extern void comp_fbcc_opp (uae_u32 opcode); +extern void comp_fscc_opp (uae_u32 opcode, uae_u16 extra); + +extern uae_u32 needed_flags; +extern cacheline cache_tags[]; +extern uae_u8* comp_pc_p; +extern void* pushall_call_handler; + +#define VREGS 32 +#define VFREGS 16 + +#define INMEM 1 +#define CLEAN 2 +#define DIRTY 3 +#define UNDEF 4 +#define ISCONST 5 + +typedef struct { + uae_u32* mem; + uae_u32 val; + uae_u8 is_swapped; + uae_u8 status; + uae_s8 realreg; /* gb-- realreg can hold -1 */ + uae_u8 realind; /* The index in the holds[] array */ + uae_u8 needflush; + uae_u8 validsize; + uae_u8 dirtysize; + uae_u8 dummy; +} reg_status; + +typedef struct { + uae_u32* mem; + double val; + uae_u8 status; + uae_s8 realreg; /* gb-- realreg can hold -1 */ + uae_u8 realind; + uae_u8 needflush; +} freg_status; + +#define PC_P 16 +#define FLAGX 17 +#define FLAGTMP 18 +#define NEXT_HANDLER 19 +#define S1 20 +#define S2 21 +#define S3 22 +#define S4 23 +#define S5 24 +#define S6 25 +#define S7 26 +#define S8 27 +#define S9 28 +#define S10 29 +#define S11 30 +#define S12 31 + +#define FP_RESULT 8 +#define FS1 9 +#define FS2 10 +#define FS3 11 + +typedef struct { + uae_u32 touched; + uae_s8 holds[VREGS]; + uae_u8 nholds; + uae_u8 canbyte; + uae_u8 canword; + uae_u8 locked; +} n_status; + +typedef struct { + uae_u32 touched; + uae_s8 holds[VFREGS]; + uae_u8 nholds; + uae_u8 locked; +} fn_status; + +/* For flag handling */ +#define NADA 1 +#define TRASH 2 +#define VALID 3 + +/* needflush values */ +#define NF_SCRATCH 0 +#define NF_TOMEM 1 +#define NF_HANDLER 2 + +typedef struct { + /* Integer part */ + reg_status state[VREGS]; + n_status nat[N_REGS]; + uae_u32 flags_on_stack; + uae_u32 flags_in_flags; + uae_u32 flags_are_important; + /* FPU part */ + freg_status fate[VFREGS]; + fn_status fat[N_FREGS]; + + /* x86 FPU part */ + uae_s8 spos[N_FREGS]; + uae_s8 onstack[6]; + uae_s8 tos; +} bigstate; + +typedef struct { + /* Integer part */ + char virt[VREGS]; + char nat[N_REGS]; +} smallstate; + +extern bigstate live; +extern int touchcnt; + + +#define IMM uae_s32 +#define R1 uae_u32 +#define R2 uae_u32 +#define R4 uae_u32 +#define W1 uae_u32 +#define W2 uae_u32 +#define W4 uae_u32 +#define RW1 uae_u32 +#define RW2 uae_u32 +#define RW4 uae_u32 +#define MEMR uae_u32 +#define MEMW uae_u32 +#define MEMRW uae_u32 + +#define FW uae_u32 +#define FR uae_u32 +#define FRW uae_u32 + +#define MIDFUNC(nargs,func,args) void func args +#define MENDFUNC(nargs,func,args) +#define COMPCALL(func) func + +#define LOWFUNC(flags,mem,nargs,func,args) static __inline__ void func args +#define LENDFUNC(flags,mem,nargs,func,args) + +/* What we expose to the outside */ +#define DECLARE_MIDFUNC(func) extern void func +DECLARE_MIDFUNC(bt_l_ri(R4 r, IMM i)); +DECLARE_MIDFUNC(bt_l_rr(R4 r, R4 b)); +DECLARE_MIDFUNC(btc_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(btc_l_rr(RW4 r, R4 b)); +DECLARE_MIDFUNC(bts_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(bts_l_rr(RW4 r, R4 b)); +DECLARE_MIDFUNC(btr_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(btr_l_rr(RW4 r, R4 b)); +DECLARE_MIDFUNC(mov_l_rm(W4 d, IMM s)); +DECLARE_MIDFUNC(call_r(R4 r)); +DECLARE_MIDFUNC(sub_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_l_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_w_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(mov_b_mi(IMM d, IMM s)); +DECLARE_MIDFUNC(rol_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(rol_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(rol_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(rol_l_rr(RW4 d, R1 r)); +DECLARE_MIDFUNC(rol_w_rr(RW2 d, R1 r)); +DECLARE_MIDFUNC(rol_b_rr(RW1 d, R1 r)); +DECLARE_MIDFUNC(shll_l_rr(RW4 d, R1 r)); +DECLARE_MIDFUNC(shll_w_rr(RW2 d, R1 r)); +DECLARE_MIDFUNC(shll_b_rr(RW1 d, R1 r)); +DECLARE_MIDFUNC(ror_b_ri(R1 r, IMM i)); +DECLARE_MIDFUNC(ror_w_ri(R2 r, IMM i)); +DECLARE_MIDFUNC(ror_l_ri(R4 r, IMM i)); +DECLARE_MIDFUNC(ror_l_rr(R4 d, R1 r)); +DECLARE_MIDFUNC(ror_w_rr(R2 d, R1 r)); +DECLARE_MIDFUNC(ror_b_rr(R1 d, R1 r)); +DECLARE_MIDFUNC(shrl_l_rr(RW4 d, R1 r)); +DECLARE_MIDFUNC(shrl_w_rr(RW2 d, R1 r)); +DECLARE_MIDFUNC(shrl_b_rr(RW1 d, R1 r)); +DECLARE_MIDFUNC(shra_l_rr(RW4 d, R1 r)); +DECLARE_MIDFUNC(shra_w_rr(RW2 d, R1 r)); +DECLARE_MIDFUNC(shra_b_rr(RW1 d, R1 r)); +DECLARE_MIDFUNC(shll_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shll_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shll_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shrl_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shrl_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shrl_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(shra_l_ri(RW4 r, IMM i)); +DECLARE_MIDFUNC(shra_w_ri(RW2 r, IMM i)); +DECLARE_MIDFUNC(shra_b_ri(RW1 r, IMM i)); +DECLARE_MIDFUNC(setcc(W1 d, IMM cc)); +DECLARE_MIDFUNC(setcc_m(IMM d, IMM cc)); +DECLARE_MIDFUNC(cmov_b_rr(RW1 d, R1 s, IMM cc)); +DECLARE_MIDFUNC(cmov_w_rr(RW2 d, R2 s, IMM cc)); +DECLARE_MIDFUNC(cmov_l_rr(RW4 d, R4 s, IMM cc)); +DECLARE_MIDFUNC(cmov_l_rm(RW4 d, IMM s, IMM cc)); +DECLARE_MIDFUNC(bsf_l_rr(W4 d, R4 s)); +DECLARE_MIDFUNC(pop_m(IMM d)); +DECLARE_MIDFUNC(push_m(IMM d)); +DECLARE_MIDFUNC(pop_l(W4 d)); +DECLARE_MIDFUNC(push_l_i(IMM i)); +DECLARE_MIDFUNC(push_l(R4 s)); +DECLARE_MIDFUNC(clear_16(RW4 r)); +DECLARE_MIDFUNC(clear_8(RW4 r)); +DECLARE_MIDFUNC(sign_extend_16_rr(W4 d, R2 s)); +DECLARE_MIDFUNC(sign_extend_8_rr(W4 d, R1 s)); +DECLARE_MIDFUNC(zero_extend_16_rr(W4 d, R2 s)); +DECLARE_MIDFUNC(zero_extend_8_rr(W4 d, R1 s)); +DECLARE_MIDFUNC(imul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(mul_64_32(RW4 d, RW4 s)); +DECLARE_MIDFUNC(imul_32_32(RW4 d, R4 s)); +DECLARE_MIDFUNC(mul_32_32(RW4 d, R4 s)); +DECLARE_MIDFUNC(mov_b_rr(W1 d, R1 s)); +DECLARE_MIDFUNC(mov_w_rr(W2 d, R2 s)); +DECLARE_MIDFUNC(mov_l_rrm_indexed(W4 d,R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_w_rrm_indexed(W2 d, R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_b_rrm_indexed(W1 d, R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_mrr_indexed(R4 baser, R4 index, IMM factor, R4 s)); +DECLARE_MIDFUNC(mov_w_mrr_indexed(R4 baser, R4 index, IMM factor, R2 s)); +DECLARE_MIDFUNC(mov_b_mrr_indexed(R4 baser, R4 index, IMM factor, R1 s)); +DECLARE_MIDFUNC(mov_l_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R4 s)); +DECLARE_MIDFUNC(mov_w_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R2 s)); +DECLARE_MIDFUNC(mov_b_bmrr_indexed(IMM base, R4 baser, R4 index, IMM factor, R1 s)); +DECLARE_MIDFUNC(mov_l_brrm_indexed(W4 d, IMM base, R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_w_brrm_indexed(W2 d, IMM base, R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_b_brrm_indexed(W1 d, IMM base, R4 baser, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_rm_indexed(W4 d, IMM base, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_rR(W4 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_rR(W2 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_rR(W1 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_brR(W4 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_brR(W2 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_brR(W1 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_l_Ri(R4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_w_Ri(R4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_b_Ri(R4 d, IMM i, IMM offset)); +DECLARE_MIDFUNC(mov_l_Rr(R4 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_Rr(R4 d, R2 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_Rr(R4 d, R1 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr(W4 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(lea_l_brr_indexed(W4 d, R4 s, R4 index, IMM factor, IMM offset)); +DECLARE_MIDFUNC(lea_l_rr_indexed(W4 d, R4 s, R4 index, IMM factor)); +DECLARE_MIDFUNC(mov_l_bRr(R4 d, R4 s, IMM offset)); +DECLARE_MIDFUNC(mov_w_bRr(R4 d, R2 s, IMM offset)); +DECLARE_MIDFUNC(mov_b_bRr(R4 d, R1 s, IMM offset)); +DECLARE_MIDFUNC(bswap_32(RW4 r)); +DECLARE_MIDFUNC(bswap_16(RW2 r)); +DECLARE_MIDFUNC(mov_l_rr(W4 d, R4 s)); +DECLARE_MIDFUNC(mov_l_mr(IMM d, R4 s)); +DECLARE_MIDFUNC(mov_w_mr(IMM d, R2 s)); +DECLARE_MIDFUNC(mov_w_rm(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_mr(IMM d, R1 s)); +DECLARE_MIDFUNC(mov_b_rm(W1 d, IMM s)); +DECLARE_MIDFUNC(mov_l_ri(W4 d, IMM s)); +DECLARE_MIDFUNC(mov_w_ri(W2 d, IMM s)); +DECLARE_MIDFUNC(mov_b_ri(W1 d, IMM s)); +DECLARE_MIDFUNC(add_l_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(add_w_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(add_b_mi(IMM d, IMM s) ); +DECLARE_MIDFUNC(test_l_ri(R4 d, IMM i)); +DECLARE_MIDFUNC(test_l_rr(R4 d, R4 s)); +DECLARE_MIDFUNC(test_w_rr(R2 d, R2 s)); +DECLARE_MIDFUNC(test_b_rr(R1 d, R1 s)); +DECLARE_MIDFUNC(and_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(and_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(and_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(and_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(or_l_rm(RW4 d, IMM s)); +DECLARE_MIDFUNC(or_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(or_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(or_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(or_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(adc_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(adc_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(adc_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(add_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(add_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(add_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(sub_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(sub_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(sub_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(add_l_ri(RW4 d, IMM i)); +DECLARE_MIDFUNC(add_w_ri(RW2 d, IMM i)); +DECLARE_MIDFUNC(add_b_ri(RW1 d, IMM i)); +DECLARE_MIDFUNC(sbb_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(sbb_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(sbb_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(sub_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(sub_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(sub_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(cmp_l(R4 d, R4 s)); +DECLARE_MIDFUNC(cmp_l_ri(R4 r, IMM i)); +DECLARE_MIDFUNC(cmp_w(R2 d, R2 s)); +DECLARE_MIDFUNC(cmp_b(R1 d, R1 s)); +DECLARE_MIDFUNC(xor_l(RW4 d, R4 s)); +DECLARE_MIDFUNC(xor_w(RW2 d, R2 s)); +DECLARE_MIDFUNC(xor_b(RW1 d, R1 s)); +DECLARE_MIDFUNC(live_flags(void)); +DECLARE_MIDFUNC(dont_care_flags(void)); +DECLARE_MIDFUNC(duplicate_carry(void)); +DECLARE_MIDFUNC(restore_carry(void)); +DECLARE_MIDFUNC(start_needflags(void)); +DECLARE_MIDFUNC(end_needflags(void)); +DECLARE_MIDFUNC(make_flags_live(void)); +DECLARE_MIDFUNC(call_r_11(R4 r, W4 out1, R4 in1, IMM osize, IMM isize)); +DECLARE_MIDFUNC(call_r_02(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)); +DECLARE_MIDFUNC(forget_about(W4 r)); +DECLARE_MIDFUNC(nop(void)); + +DECLARE_MIDFUNC(f_forget_about(FW r)); +DECLARE_MIDFUNC(fmov_pi(FW r)); +DECLARE_MIDFUNC(fmov_log10_2(FW r)); +DECLARE_MIDFUNC(fmov_log2_e(FW r)); +DECLARE_MIDFUNC(fmov_loge_2(FW r)); +DECLARE_MIDFUNC(fmov_1(FW r)); +DECLARE_MIDFUNC(fmov_0(FW r)); +DECLARE_MIDFUNC(fmov_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmovi_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmovi_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmovs_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmovs_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmov_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmov_ext_mr(MEMW m, FR r)); +DECLARE_MIDFUNC(fmov_ext_rm(FW r, MEMR m)); +DECLARE_MIDFUNC(fmov_rr(FW d, FR s)); +DECLARE_MIDFUNC(fldcw_m_indexed(R4 index, IMM base)); +DECLARE_MIDFUNC(ftst_r(FR r)); +DECLARE_MIDFUNC(dont_care_fflags(void)); +DECLARE_MIDFUNC(fsqrt_rr(FW d, FR s)); +DECLARE_MIDFUNC(fabs_rr(FW d, FR s)); +DECLARE_MIDFUNC(frndint_rr(FW d, FR s)); +DECLARE_MIDFUNC(fsin_rr(FW d, FR s)); +DECLARE_MIDFUNC(fcos_rr(FW d, FR s)); +DECLARE_MIDFUNC(ftwotox_rr(FW d, FR s)); +DECLARE_MIDFUNC(fetox_rr(FW d, FR s)); +DECLARE_MIDFUNC(flog2_rr(FW d, FR s)); +DECLARE_MIDFUNC(fneg_rr(FW d, FR s)); +DECLARE_MIDFUNC(fadd_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fsub_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fmul_rr(FRW d, FR s)); +DECLARE_MIDFUNC(frem_rr(FRW d, FR s)); +DECLARE_MIDFUNC(frem1_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fdiv_rr(FRW d, FR s)); +DECLARE_MIDFUNC(fcmp_rr(FR d, FR s)); +DECLARE_MIDFUNC(fflags_into_flags(W2 tmp)); +#undef DECLARE_MIDFUNC + +extern int failure; +#define FAIL(x) do { failure|=x; } while (0) + +/* Convenience functions exposed to gencomp */ +extern uae_u32 m68k_pc_offset; +extern void readbyte(int address, int dest, int tmp); +extern void readword(int address, int dest, int tmp); +extern void readlong(int address, int dest, int tmp); +extern void writebyte(int address, int source, int tmp); +extern void writeword(int address, int source, int tmp); +extern void writelong(int address, int source, int tmp); +extern void writeword_clobber(int address, int source, int tmp); +extern void writelong_clobber(int address, int source, int tmp); +extern void get_n_addr(int address, int dest, int tmp); +extern void get_n_addr_jmp(int address, int dest, int tmp); +extern void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp); +/* Set native Z flag only if register is zero */ +extern void set_zero(int r, int tmp); +extern int kill_rodent(int r); +extern void sync_m68k_pc(void); +extern uae_u32 get_const(int r); +extern int is_const(int r); +extern void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond); + +#define comp_get_ibyte(o) do_get_mem_byte((uae_u8 *)(comp_pc_p + (o) + 1)) +#define comp_get_iword(o) do_get_mem_word((uae_u16 *)(comp_pc_p + (o))) +#define comp_get_ilong(o) do_get_mem_long((uae_u32 *)(comp_pc_p + (o))) + +struct blockinfo_t; + +typedef struct dep_t { + uae_u32* jmp_off; + struct blockinfo_t* target; + struct blockinfo_t* source; + struct dep_t** prev_p; + struct dep_t* next; +} dependency; + +typedef struct checksum_info_t { + uae_u8 *start_p; + uae_u32 length; + struct checksum_info_t *next; +} checksum_info; + +typedef struct blockinfo_t { + uae_s32 count; + cpuop_func* direct_handler_to_use; + cpuop_func* handler_to_use; + /* The direct handler does not check for the correct address */ + + cpuop_func* handler; + cpuop_func* direct_handler; + + cpuop_func* direct_pen; + cpuop_func* direct_pcc; + + uae_u8* pc_p; + + uae_u32 c1; + uae_u32 c2; +#if USE_CHECKSUM_INFO + checksum_info *csi; +#else + uae_u32 len; + uae_u32 min_pcp; +#endif + + struct blockinfo_t* next_same_cl; + struct blockinfo_t** prev_same_cl_p; + struct blockinfo_t* next; + struct blockinfo_t** prev_p; + + uae_u8 optlevel; + uae_u8 needed_flags; + uae_u8 status; + uae_u8 havestate; + + dependency dep[2]; /* Holds things we depend on */ + dependency* deplist; /* List of things that depend on this */ + smallstate env; + +#if JIT_DEBUG + /* (gb) size of the compiled block (direct handler) */ + uae_u32 direct_handler_size; +#endif +} blockinfo; + +#define BI_INVALID 0 +#define BI_ACTIVE 1 +#define BI_NEED_RECOMP 2 +#define BI_NEED_CHECK 3 +#define BI_CHECKING 4 +#define BI_COMPILING 5 +#define BI_FINALIZING 6 + +void execute_normal(void); +void exec_nostats(void); +void do_nothing(void); + +#else + +static __inline__ void flush_icache(int) { } +static __inline__ void build_comp() { } + +#endif /* !USE_JIT */ + +#endif /* COMPEMU_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp new file mode 100644 index 000000000..cadecf98e --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_fpp.cpp @@ -0,0 +1,1641 @@ +/* + * compiler/compemu_fpp.cpp - Dynamic translation of FPU instructions + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +/* + * UAE - The Un*x Amiga Emulator + * + * MC68881 emulation + * + * Copyright 1996 Herman ten Brugge + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + */ + +#include "sysdeps.h" + +#if USE_JIT + +#include +#include + +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" + +#define DEBUG 0 +#include "debug.h" + +// gb-- WARNING: get_fpcr() and set_fpcr() support is experimental +#define HANDLE_FPCR 0 + +// - IEEE-based fpu core must be used +#if defined(FPU_IEEE) +# define CAN_HANDLE_FPCR +#endif + +// - Generic rounding mode and precision modes are supported if set together +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) +# define CAN_HANDLE_FPCR +#endif + +// - X86 rounding mode and precision modes are *not* supported but might work (?!) +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +# define CAN_HANDLE_FPCR +#endif + +#if HANDLE_FPCR && !defined(CAN_HANDLE_FPCR) +# warning "Can't handle FPCR, will FAIL(1) at runtime" +# undef HANDLE_FPCR +# define HANDLE_FPCR 0 +#endif + +#define STATIC_INLINE static inline +#define MAKE_FPSR(r) do { fmov_rr(FP_RESULT,r); } while (0) + +#define delay nop() ;nop() +#define delay2 nop() ;nop() + +#define UNKNOWN_EXTRA 0xFFFFFFFF +static void fpuop_illg(uae_u32 opcode, uae_u32 extra) +{ +/* + if (extra == UNKNOWN_EXTRA) + printf("FPU opcode %x, extra UNKNOWN_EXTRA\n",opcode & 0xFFFF); + else + printf("FPU opcode %x, extra %x\n",opcode & 0xFFFF,extra & 0xFFFF); +*/ + op_illg(opcode); +} + +static uae_s32 temp_fp[4]; /* To convert between FP/integer */ + +/* return register number, or -1 for failure */ +STATIC_INLINE int get_fp_value (uae_u32 opcode, uae_u16 extra) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + double* src; + uae_u32 ad = 0; + static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) { + return ((extra >> 10) & 7); + } + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + switch (mode) { + case 0: + switch (size) { + case 6: + sign_extend_8_rr(S1,reg); + mov_l_mr((uintptr)temp_fp,S1); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 4: + sign_extend_16_rr(S1,reg); + mov_l_mr((uintptr)temp_fp,S1); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 0: + mov_l_mr((uintptr)temp_fp,reg); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + return FS1; + case 1: + mov_l_mr((uintptr)temp_fp,reg); + delay2; + fmovs_rm(FS1,(uintptr)temp_fp); + return FS1; + default: + return -1; + } + return -1; /* Should be unreachable */ + case 1: + return -1; /* Genuine invalid instruction */ + default: + break; + } + /* OK, we *will* have to load something from an address. Let's make + sure we know how to handle that, or quit early --- i.e. *before* + we do any postincrement/predecrement that we may regret */ + + switch (size) { + case 3: + return -1; + case 0: + case 1: + case 2: + case 4: + case 5: + case 6: + break; + default: + return -1; + } + + switch (mode) { + case 2: + ad=S1; /* We will change it, anyway ;-) */ + mov_l_rr(ad,reg+8); + break; + case 3: + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); + break; + case 4: + ad=S1; + + lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); + mov_l_rr(ad,reg+8); + break; + case 5: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(ad,ad,off); + break; + } + case 6: + { + uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + calc_disp_ea_020(reg+8,dp,ad,S2); + break; + } + case 7: + switch (reg) { + case 0: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 1: + { + uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 2: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2) +-2); + ad=S1; + mov_l_ri(ad,address+PC16off); + break; + } + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ m68k_pc_offset; + ad=S1; + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if (size == 6) address++; + mov_l_ri(ad,address); + m68k_pc_offset+=sz2[size]; + break; + } + default: + return -1; + } + } + + switch (size) { + case 0: + readlong(ad,S2,S3); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + case 1: + readlong(ad,S2,S3); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovs_rm(FS1,(uintptr)temp_fp); + break; + case 2: + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + delay2; + fmov_ext_rm(FS1,(uintptr)(temp_fp)); + break; + case 3: + return -1; /* Some silly "packed" stuff */ + case 4: + readword(ad,S2,S3); + sign_extend_16_rr(S2,S2); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + case 5: + readlong(ad,S2,S3); + mov_l_mr(((uintptr)temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + delay2; + fmov_rm(FS1,(uintptr)(temp_fp)); + break; + case 6: + readbyte(ad,S2,S3); + sign_extend_8_rr(S2,S2); + mov_l_mr((uintptr)temp_fp,S2); + delay2; + fmovi_rm(FS1,(uintptr)temp_fp); + break; + default: + return -1; + } + return FS1; +} + +/* return of -1 means failure, >=0 means OK */ +STATIC_INLINE int put_fp_value (int val, uae_u32 opcode, uae_u16 extra) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = { 4, 4, 12, 12, 2, 8, 1, 0 }; + static int sz2[8] = { 4, 4, 12, 12, 2, 8, 2, 0 }; + + if ((extra & 0x4000) == 0) { + const int dest_reg = (extra >> 10) & 7; + fmov_rr(dest_reg, val); + // gb-- status register is affected + MAKE_FPSR(dest_reg); + return 0; + } + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = (uae_u32)-1; + switch (mode) { + case 0: + switch (size) { + case 6: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_b_rm(reg,(uintptr)temp_fp); + return 0; + case 4: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_w_rm(reg,(uintptr)temp_fp); + return 0; + case 0: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(reg,(uintptr)temp_fp); + return 0; + case 1: + fmovs_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(reg,(uintptr)temp_fp); + return 0; + default: + return -1; + } + case 1: + return -1; /* genuine invalid instruction */ + default: break; + } + + /* Let's make sure we get out *before* doing something silly if + we can't handle the size */ + switch (size) { + case 0: + case 4: + case 5: + case 6: + case 2: + case 1: + break; + case 3: + default: + return -1; + } + + switch (mode) { + case 2: + ad=S1; + mov_l_rr(ad,reg+8); + break; + case 3: + ad=S1; + mov_l_rr(ad,reg+8); + lea_l_brr(reg+8,reg+8,(reg == 7?sz2[size]:sz1[size])); + break; + case 4: + ad=S1; + lea_l_brr(reg+8,reg+8,-(reg == 7?sz2[size]:sz1[size])); + mov_l_rr(ad,reg+8); + break; + case 5: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_rr(ad,reg+8); + add_l_ri(ad,off); + break; + } + case 6: + { + uae_u32 dp=comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + calc_disp_ea_020(reg+8,dp,ad,S2); + break; + } + case 7: + switch (reg) { + case 0: + { + uae_u32 off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 1: + { + uae_u32 off=comp_get_ilong((m68k_pc_offset+=4)-4); + ad=S1; + mov_l_ri(ad,off); + break; + } + case 2: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + uae_s32 PC16off =(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + ad=S1; + mov_l_ri(ad,address+PC16off); + break; + } + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + { + uae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+ + m68k_pc_offset; + ad=S1; + mov_l_ri(ad,address); + m68k_pc_offset+=sz2[size]; + break; + } + default: + return -1; + } + } + switch (size) { + case 0: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 1: + fmovs_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 2: + fmov_ext_mr((uintptr)temp_fp,val); + delay; + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 3: return -1; /* Packed */ + + case 4: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writeword_clobber(ad,S2,S3); + break; + case 5: + fmov_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + break; + case 6: + fmovi_mr((uintptr)temp_fp,val); + delay; + mov_l_rm(S2,(uintptr)temp_fp); + writebyte(ad,S2,S3); + break; + default: + return -1; + } + return 0; +} + +/* return -1 for failure, or register number for success */ +STATIC_INLINE int get_fp_ad (uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + uae_s32 off; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return -1; + case 2: + case 3: + case 4: + mov_l_rr(S1,8+reg); + return S1; + *ad = m68k_areg (regs, reg); + break; + case 5: + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + + mov_l_rr(S1,8+reg); + add_l_ri(S1,off); + return S1; + case 6: + return -1; + break; + case 7: + switch (reg) { + case 0: + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + mov_l_ri(S1,off); + return S1; + case 1: + off=comp_get_ilong((m68k_pc_offset+=4)-4); + mov_l_ri(S1,off); + return S1; + case 2: + return -1; +// *ad = m68k_getpc (); +// *ad += (uae_s32) (uae_s16) next_iword (); + off=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset; + off+=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + mov_l_ri(S1,off); + return S1; + case 3: + return -1; + tmppc = m68k_getpc (); + tmp = next_iword (); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return -1; + } + } + abort(); +} + +void comp_fdbcc_opp (uae_u32 opcode, uae_u16 extra) +{ + FAIL(1); + return; +} + +void comp_fscc_opp (uae_u32 opcode, uae_u16 extra) +{ + uae_u32 ad; + int cc; + int reg; + +#if DEBUG_FPP + printf ("fscc_opp at %08lx\n", m68k_getpc ()); + fflush (stdout); +#endif + + + if (extra&0x20) { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode & 0x38) != 0) { /* We can only do to integer register */ + FAIL(1); + return; + } + + fflags_into_flags(S2); + reg=(opcode&7); + + mov_l_ri(S1,255); + mov_l_ri(S4,0); + switch(extra&0x0f) { /* according to fpp.c, the 0x10 bit is ignored + */ + case 0: break; /* set never */ + case 1: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,4); + cmov_l_rr(S4,S2,10); break; + case 2: cmov_l_rr(S4,S1,7); break; + case 3: cmov_l_rr(S4,S1,3); break; + case 4: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,2); + cmov_l_rr(S4,S2,10); break; + case 5: mov_l_rr(S2,S4); + cmov_l_rr(S4,S1,6); + cmov_l_rr(S4,S2,10); break; + case 6: cmov_l_rr(S4,S1,5); break; + case 7: cmov_l_rr(S4,S1,11); break; + case 8: cmov_l_rr(S4,S1,10); break; + case 9: cmov_l_rr(S4,S1,4); break; + case 10: cmov_l_rr(S4,S1,10); cmov_l_rr(S4,S1,7); break; + case 11: cmov_l_rr(S4,S1,4); cmov_l_rr(S4,S1,3); break; + case 12: cmov_l_rr(S4,S1,2); break; + case 13: cmov_l_rr(S4,S1,6); break; + case 14: cmov_l_rr(S4,S1,5); cmov_l_rr(S4,S1,10); break; + case 15: mov_l_rr(S4,S1); break; + } + + if ((opcode & 0x38) == 0) { + mov_b_rr(reg,S4); + } else { + abort(); + if (get_fp_ad (opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); + } else + put_byte (ad, cc ? 0xff : 0x00); + } +} + +void comp_ftrapcc_opp (uae_u32 opcode, uaecptr oldpc) +{ + int cc; + + FAIL(1); + return; +} + +void comp_fbcc_opp (uae_u32 opcode) +{ + uae_u32 start_68k_offset=m68k_pc_offset; + uae_u32 off; + uae_u32 v1; + uae_u32 v2; + uae_u32 nh; + int cc; + + // comp_pc_p is expected to be bound to 32-bit addresses + assert((uintptr)comp_pc_p <= 0xffffffffUL); + + if (opcode&0x20) { /* only cc from 00 to 1f are defined */ + FAIL(1); + return; + } + if ((opcode&0x40)==0) { + off=(uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + } + else { + off=comp_get_ilong((m68k_pc_offset+=4)-4); + } + mov_l_ri(S1,(uintptr) + (comp_pc_p+off-(m68k_pc_offset-start_68k_offset))); + mov_l_ri(PC_P,(uintptr)comp_pc_p); + + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + add_l_ri(S1,m68k_pc_offset); + add_l_ri(PC_P,m68k_pc_offset); + m68k_pc_offset=0; + + /* according to fpp.c, the 0x10 bit is ignored + (it handles exception handling, which we don't + do, anyway ;-) */ + cc=opcode&0x0f; + v1=get_const(PC_P); + v2=get_const(S1); + fflags_into_flags(S2); + + switch(cc) { + case 0: break; /* jump never */ + case 1: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,4); + cmov_l_rr(PC_P,S2,10); break; + case 2: register_branch(v1,v2,7); break; + case 3: register_branch(v1,v2,3); break; + case 4: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,2); + cmov_l_rr(PC_P,S2,10); break; + case 5: + mov_l_rr(S2,PC_P); + cmov_l_rr(PC_P,S1,6); + cmov_l_rr(PC_P,S2,10); break; + case 6: register_branch(v1,v2,5); break; + case 7: register_branch(v1,v2,11); break; + case 8: register_branch(v1,v2,10); break; + case 9: register_branch(v1,v2,4); break; + case 10: + cmov_l_rr(PC_P,S1,10); + cmov_l_rr(PC_P,S1,7); break; + case 11: + cmov_l_rr(PC_P,S1,4); + cmov_l_rr(PC_P,S1,3); break; + case 12: register_branch(v1,v2,2); break; + case 13: register_branch(v1,v2,6); break; + case 14: + cmov_l_rr(PC_P,S1,5); + cmov_l_rr(PC_P,S1,10); break; + case 15: mov_l_rr(PC_P,S1); break; + } +} + + /* Floating point conditions + The "NotANumber" part could be problematic; Howver, when NaN is + encountered, the ftst instruction sets bot N and Z to 1 on the x87, + so quite often things just fall into place. This is probably not + accurate wrt the 68k FPU, but it is *as* accurate as this was before. + However, some more thought should go into fixing this stuff up so + it accurately emulates the 68k FPU. +>==> 13) & 0x7) { + case 3: /* 2nd most common */ + if (put_fp_value ((extra >> 7)&7 , opcode, extra) < 0) { + FAIL(1); + return; + + } + return; + case 6: + case 7: + { + uae_u32 ad, list = 0; + int incr = 0; + if (extra & 0x2000) { + uae_u32 ad; + + /* FMOVEM FPP->memory */ + switch ((extra >> 11) & 3) { /* Get out early if failure */ + case 0: + case 2: + break; + case 1: + case 3: + default: + FAIL(1); return; + } + ad=get_fp_ad (opcode, &ad); + if (ad<0) { + abort(); + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); + } + if (incr < 0) { /* Predecrement */ + for (reg = 7; reg >= 0; reg--) { + if (list & 0x80) { + fmov_ext_mr((uintptr)temp_fp,reg); + delay; + sub_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + sub_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + sub_l_ri(ad,4); + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + } + list <<= 1; + } + } + else { /* Postincrement */ + for (reg = 0; reg < 8; reg++) { + if (list & 0x80) { + fmov_ext_mr((uintptr)temp_fp,reg); + delay; + mov_w_rm(S2,(uintptr)temp_fp+8); + writeword_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp+4); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + mov_l_rm(S2,(uintptr)temp_fp); + writelong_clobber(ad,S2,S3); + add_l_ri(ad,4); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7)+8,ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7)+8,ad); + } else { + /* FMOVEM memory->FPP */ + + uae_u32 ad; + switch ((extra >> 11) & 3) { /* Get out early if failure */ + case 0: + case 2: + break; + case 1: + case 3: + default: + FAIL(1); return; + } + ad=get_fp_ad (opcode, &ad); + if (ad<0) { + abort(); + m68k_setpc (m68k_getpc () - 4); + write_log("no ad\n"); + fpuop_illg (opcode,extra); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 1: /* dynamic pred */ + case 3: /* dynamic postinc */ + abort(); + } + + if (incr < 0) { + // not reached + for (reg = 7; reg >= 0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if (list & 0x80) { + sub_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + sub_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + sub_l_ri(ad,4); + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + delay2; + fmov_ext_rm(reg,(uintptr)(temp_fp)); + } + list <<= 1; + } + } + else { + for (reg = 0; reg < 8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if (list & 0x80) { + readword(ad,S2,S3); + mov_w_mr(((uintptr)temp_fp)+8,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp)+4,S2); + add_l_ri(ad,4); + readlong(ad,S2,S3); + mov_l_mr((uintptr)(temp_fp),S2); + add_l_ri(ad,4); + delay2; + fmov_ext_rm(reg,(uintptr)(temp_fp)); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) + mov_l_rr((opcode & 7)+8,ad); + if ((opcode & 0x38) == 0x20) + mov_l_rr((opcode & 7)+8,ad); + } + } + return; + + case 4: + case 5: /* rare */ + if ((opcode & 0x30) == 0) { + if (extra & 0x2000) { + if (extra & 0x1000) { +#if HANDLE_FPCR + mov_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_mode); + or_l_rm(opcode & 15, (uintptr)&fpu.fpcr.rounding_precision); +#else + FAIL(1); + return; +#endif + } + if (extra & 0x0800) { + FAIL(1); + return; + } + if (extra & 0x0400) { + mov_l_rm(opcode & 15,(uintptr)&fpu.instruction_address); + return; + } + } else { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) { + // set_fpsr(m68k_dreg (regs, opcode & 15)); + FAIL(1); + return; + } + if (extra & 0x1000) { +#if HANDLE_FPCR +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) + FAIL(1); + return; +#endif + mov_l_rr(S1,opcode & 15); + mov_l_rr(S2,opcode & 15); + and_l_ri(S1,FPCR_ROUNDING_PRECISION); + and_l_ri(S2,FPCR_ROUNDING_MODE); + mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); + mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); +#else + FAIL(1); + return; +#endif +// return; gb-- FMOVEM could also operate on fpiar + } + if (extra & 0x0400) { + mov_l_mr((uintptr)&fpu.instruction_address,opcode & 15); +// return; gb-- we have to process all FMOVEM bits before returning + } + return; + } + } else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + // gb-- moved here so that we may FAIL() without generating any code + if (extra & 0x0800) { + FAIL(1); + return; + } + if (extra & 0x1000) { + uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); +#if HANDLE_FPCR +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) + FAIL(1); + return; +#endif +// mov_l_mi((uintptr)®s.fpcr,val); + mov_l_ri(S1,val); + mov_l_ri(S2,val); + and_l_ri(S1,FPCR_ROUNDING_PRECISION); + and_l_ri(S2,FPCR_ROUNDING_MODE); + mov_l_mr((uintptr)&fpu.fpcr.rounding_precision,S1); + mov_l_mr((uintptr)&fpu.fpcr.rounding_mode,S2); +#else + FAIL(1); + return; +#endif +// return; gb-- FMOVEM could also operate on fpiar + } + if (extra & 0x0400) { + uae_u32 val=comp_get_ilong((m68k_pc_offset+=4)-4); + mov_l_mi((uintptr)&fpu.instruction_address,val); +// return; gb-- we have to process all FMOVEM bits before returning + } + return; + } + FAIL(1); + return; + } else if (extra & 0x2000) { + FAIL(1); + return; + } else { + FAIL(1); + return; + } + FAIL(1); + return; + + case 0: + case 2: /* Extremely common */ + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + switch (extra & 0x7f) { + case 0x00: + fmov_pi(reg); + break; + case 0x0b: + fmov_log10_2(reg); + break; + case 0x0c: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_e); +#else + fmov_rm(reg,(uintptr)&const_e); +#endif + break; + case 0x0d: + fmov_log2_e(reg); + break; + case 0x0e: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_log10_e); +#else + fmov_rm(reg,(uintptr)&const_log10_e); +#endif + break; + case 0x0f: + fmov_0(reg); + break; + case 0x30: + fmov_loge_2(reg); + break; + case 0x31: +#if USE_LONG_DOUBLE + fmov_ext_rm(reg,(uintptr)&const_loge_10); +#else + fmov_rm(reg,(uintptr)&const_loge_10); +#endif + break; + case 0x32: + fmov_1(reg); + break; + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + case 0x38: + case 0x39: + case 0x3a: + case 0x3b: +#if USE_LONG_DOUBLE + case 0x3c: + case 0x3d: + case 0x3e: + case 0x3f: + fmov_ext_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); +#else + fmov_rm(reg,(uintptr)(power10+(extra & 0x7f)-0x32)); +#endif + break; + default: + /* This is not valid, so we fail */ + FAIL(1); + return; + } + return; + } + + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + case 0x40: /* Explicit rounding. This is just a quick fix. Same + * for all other cases that have three choices */ + case 0x44: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(reg,src); + MAKE_FPSR (src); + break; + case 0x01: /* FINT */ + FAIL(1); + return; + dont_care_fflags(); + case 0x02: /* FSINH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x03: /* FINTRZ */ +#if USE_X86_FPUCW + /* If we have control over the CW, we can do this */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + mov_l_ri(S1,16); /* Switch to "round to zero" mode */ + fldcw_m_indexed(S1,(uae_u32)x86_fpucw); + + frndint_rr(reg,src); + + /* restore control word */ + mov_l_rm(S1,(uintptr)®s.fpcr); + and_l_ri(S1,0x000000f0); + fldcw_m_indexed(S1,(uintptr)x86_fpucw); + + MAKE_FPSR (reg); + break; +#endif + FAIL(1); + return; + break; + case 0x04: /* FSQRT */ + case 0x41: + case 0x45: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsqrt_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x06: /* FLOGNP1 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x08: /* FETOXM1 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x09: /* FTANH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0a: /* FATAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0c: /* FASIN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0d: /* FATANH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x0e: /* FSIN */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsin_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x0f: /* FTAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x10: /* FETOX */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fetox_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x11: /* FTWOTOX */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + ftwotox_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x12: /* FTENTOX */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x14: /* FLOGN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x15: /* FLOG10 */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x16: /* FLOG2 */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + flog2_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x18: /* FABS */ + case 0x58: + case 0x5c: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fabs_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x19: /* FCOSH */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1a: /* FNEG */ + case 0x5a: + case 0x5e: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fneg_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x1c: /* FACOS */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1d: /* FCOS */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fcos_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x1e: /* FGETEXP */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x1f: /* FGETMAN */ + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x20: /* FDIV */ + case 0x60: + case 0x64: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fdiv_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x21: /* FMOD */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + frem_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x22: /* FADD */ + case 0x62: + case 0x66: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fadd_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x23: /* FMUL */ + case 0x63: + case 0x67: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmul_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x24: /* FSGLDIV */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fdiv_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x25: /* FREM */ + // gb-- disabled because the quotient byte must be computed + // otherwise, free rotation in ClarisWorks doesn't work. + FAIL(1); + return; + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + frem1_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x26: /* FSCALE */ + dont_care_fflags(); + FAIL(1); + return; + break; + case 0x27: /* FSGLMUL */ + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmul_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x28: /* FSUB */ + case 0x68: + case 0x6c: + dont_care_fflags(); + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fsub_rr(reg,src); + MAKE_FPSR (reg); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + FAIL(1); + return; + dont_care_fflags(); + break; + case 0x38: /* FCMP */ + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT,reg); + fsub_rr(FP_RESULT,src); /* Right way? */ + break; + case 0x3a: /* FTST */ + src=get_fp_value (opcode, extra); + if (src < 0) { + FAIL(1); /* Illegal instruction */ + return; + } + fmov_rr(FP_RESULT,src); + break; + default: + FAIL(1); + return; + break; + } + return; + } + m68k_setpc (m68k_getpc () - 4); + fpuop_illg (opcode,extra); +} + +#endif //USE_JIT diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp new file mode 100644 index 000000000..608f4e55b --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -0,0 +1,7131 @@ +/* + * compiler/compemu_support.cpp - Core dynamic translation engine + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 "sysdeps.h" + +#if USE_JIT + +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +#error "Only Real or Direct Addressing is supported with the JIT Compiler" +#endif + +#if X86_ASSEMBLY && !SAHF_SETO_PROFITABLE +#error "Only [LS]AHF scheme to [gs]et flags is supported with the JIT Compiler" +#endif + +/* NOTE: support for AMD64 assumes translation cache and other code + * buffers are allocated into a 32-bit address space because (i) B2/JIT + * code is not 64-bit clean and (ii) it's faster to resolve branches + * that way. + */ +#if !defined(__i386__) && !defined(__x86_64__) +#error "Only IA-32 and X86-64 targets are supported with the JIT Compiler" +#endif + +#define USE_MATCH 0 + +/* kludge for Brian, so he can compile under MSVC++ */ +#define USE_NORMAL_CALLING_CONVENTION 1 && defined(_MSC_VER) + +#ifndef WIN32 +#include +#include +#include +#endif + +#include +#include +#include + +#include "cpu_emulation.h" +#include "main.h" +#include "prefs.h" +#include "user_strings.h" +#include "vm_alloc.h" + +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "comptbl.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" +#include "fpu/flags.h" + +#define DEBUG 0 +#include "debug.h" + +#ifdef ENABLE_MON +#include "mon.h" +#endif + +#define PROFILE_COMPILE_TIME 0 +#define PROFILE_UNTRANSLATED_INSNS 0 + +#if defined(__x86_64__) && 0 +#define RECORD_REGISTER_USAGE 1 +#endif + +//#ifdef WIN32 +#undef write_log +#define write_log dummy_write_log +static void dummy_write_log(const char *, ...) { } +//#endif + +#if JIT_DEBUG +#undef abort +#define abort() do { \ + fprintf(stderr, "Abort in file %s at line %d\n", __FILE__, __LINE__); \ + exit(EXIT_FAILURE); \ +} while (0) +#endif + +#if RECORD_REGISTER_USAGE +static uint64 reg_count[16]; +static int reg_count_local[16]; + +static int reg_count_compare(const void *ap, const void *bp) +{ + const int a = *((int *)ap); + const int b = *((int *)bp); + return reg_count[b] - reg_count[a]; +} +#endif + +#if PROFILE_COMPILE_TIME +#include +static uae_u32 compile_count = 0; +static clock_t compile_time = 0; +static clock_t emul_start_time = 0; +static clock_t emul_end_time = 0; +#endif + +#if PROFILE_UNTRANSLATED_INSNS +const int untranslated_top_ten = 20; +static uae_u32 raw_cputbl_count[65536] = { 0, }; +static uae_u16 opcode_nums[65536]; + +static int untranslated_compfn(const void *e1, const void *e2) +{ + return raw_cputbl_count[*(const uae_u16 *)e1] < raw_cputbl_count[*(const uae_u16 *)e2]; +} +#endif + +static compop_func *compfunctbl[65536]; +static compop_func *nfcompfunctbl[65536]; +static cpuop_func *nfcpufunctbl[65536]; +uae_u8* comp_pc_p; + +// From newcpu.cpp +extern bool quit_program; + +// gb-- Extra data for Basilisk II/JIT +#if JIT_DEBUG +static bool JITDebug = false; // Enable runtime disassemblers through mon? +#else +const bool JITDebug = false; // Don't use JIT debug mode at all +#endif +#if USE_INLINING +static bool follow_const_jumps = true; // Flag: translation through constant jumps +#else +const bool follow_const_jumps = false; +#endif + +const uae_u32 MIN_CACHE_SIZE = 1024; // Minimal translation cache size (1 MB) +static uae_u32 cache_size = 0; // Size of total cache allocated for compiled blocks +static uae_u32 current_cache_size = 0; // Cache grows upwards: how much has been consumed already +static bool lazy_flush = true; // Flag: lazy translation cache invalidation +static bool avoid_fpu = true; // Flag: compile FPU instructions ? +static bool have_cmov = false; // target has CMOV instructions ? +static bool have_lahf_lm = true; // target has LAHF supported in long mode ? +static bool have_rat_stall = true; // target has partial register stalls ? +const bool tune_alignment = true; // Tune code alignments for running CPU ? +const bool tune_nop_fillers = true; // Tune no-op fillers for architecture +static bool setzflg_uses_bsf = false; // setzflg virtual instruction can use native BSF instruction correctly? +static int align_loops = 32; // Align the start of loops +static int align_jumps = 32; // Align the start of jumps +static int optcount[10] = { + 10, // How often a block has to be executed before it is translated + 0, // How often to use naive translation + 0, 0, 0, 0, + -1, -1, -1, -1 +}; + +struct op_properties { + uae_u8 use_flags; + uae_u8 set_flags; + uae_u8 is_addx; + uae_u8 cflow; +}; +static op_properties prop[65536]; + +static inline int end_block(uae_u32 opcode) +{ + return (prop[opcode].cflow & fl_end_block); +} + +static inline bool is_const_jump(uae_u32 opcode) +{ + return (prop[opcode].cflow == fl_const_jump); +} + +static inline bool may_trap(uae_u32 opcode) +{ + return (prop[opcode].cflow & fl_trap) != 0; +} + +static inline unsigned int cft_map (unsigned int f) +{ +#ifndef HAVE_GET_WORD_UNSWAPPED + return f; +#else + return ((f >> 8) & 255) | ((f & 255) << 8); +#endif +} + +uae_u8* start_pc_p; +uae_u32 start_pc; +uae_u32 current_block_pc_p; +static uintptr current_block_start_target; +uae_u32 needed_flags; +static uintptr next_pc_p; +static uintptr taken_pc_p; +static int branch_cc; +static int redo_current_block; + +int segvcount=0; +int soft_flush_count=0; +int hard_flush_count=0; +int checksum_count=0; +static uae_u8* current_compile_p=NULL; +static uae_u8* max_compile_start; +static uae_u8* compiled_code=NULL; +static uae_s32 reg_alloc_run; +const int POPALLSPACE_SIZE = 1024; /* That should be enough space */ +static uae_u8* popallspace=NULL; + +void* pushall_call_handler=NULL; +static void* popall_do_nothing=NULL; +static void* popall_exec_nostats=NULL; +static void* popall_execute_normal=NULL; +static void* popall_cache_miss=NULL; +static void* popall_recompile_block=NULL; +static void* popall_check_checksum=NULL; + +/* The 68k only ever executes from even addresses. So right now, we + * waste half the entries in this array + * UPDATE: We now use those entries to store the start of the linked + * lists that we maintain for each hash result. + */ +cacheline cache_tags[TAGSIZE]; +int letit=0; +blockinfo* hold_bi[MAX_HOLD_BI]; +blockinfo* active; +blockinfo* dormant; + +/* 68040 */ +extern struct cputbl op_smalltbl_0_nf[]; +extern struct comptbl op_smalltbl_0_comp_nf[]; +extern struct comptbl op_smalltbl_0_comp_ff[]; + +/* 68020 + 68881 */ +extern struct cputbl op_smalltbl_1_nf[]; + +/* 68020 */ +extern struct cputbl op_smalltbl_2_nf[]; + +/* 68010 */ +extern struct cputbl op_smalltbl_3_nf[]; + +/* 68000 */ +extern struct cputbl op_smalltbl_4_nf[]; + +/* 68000 slow but compatible. */ +extern struct cputbl op_smalltbl_5_nf[]; + +static void flush_icache_hard(int n); +static void flush_icache_lazy(int n); +static void flush_icache_none(int n); +void (*flush_icache)(int n) = flush_icache_none; + + + +bigstate live; +smallstate empty_ss; +smallstate default_ss; +static int optlev; + +static int writereg(int r, int size); +static void unlock2(int r); +static void setlock(int r); +static int readreg_specific(int r, int size, int spec); +static int writereg_specific(int r, int size, int spec); +static void prepare_for_call_1(void); +static void prepare_for_call_2(void); +static void align_target(uae_u32 a); + +static uae_s32 nextused[VREGS]; + +uae_u32 m68k_pc_offset; + +/* Some arithmetic ooperations can be optimized away if the operands + * are known to be constant. But that's only a good idea when the + * side effects they would have on the flags are not important. This + * variable indicates whether we need the side effects or not + */ +uae_u32 needflags=0; + +/* Flag handling is complicated. + * + * x86 instructions create flags, which quite often are exactly what we + * want. So at times, the "68k" flags are actually in the x86 flags. + * + * Then again, sometimes we do x86 instructions that clobber the x86 + * flags, but don't represent a corresponding m68k instruction. In that + * case, we have to save them. + * + * We used to save them to the stack, but now store them back directly + * into the regflags.cznv of the traditional emulation. Thus some odd + * names. + * + * So flags can be in either of two places (used to be three; boy were + * things complicated back then!); And either place can contain either + * valid flags or invalid trash (and on the stack, there was also the + * option of "nothing at all", now gone). A couple of variables keep + * track of the respective states. + * + * To make things worse, we might or might not be interested in the flags. + * by default, we are, but a call to dont_care_flags can change that + * until the next call to live_flags. If we are not, pretty much whatever + * is in the register and/or the native flags is seen as valid. + */ + +static __inline__ blockinfo* get_blockinfo(uae_u32 cl) +{ + return cache_tags[cl+1].bi; +} + +static __inline__ blockinfo* get_blockinfo_addr(void* addr) +{ + blockinfo* bi=get_blockinfo(cacheline(addr)); + + while (bi) { + if (bi->pc_p==addr) + return bi; + bi=bi->next_same_cl; + } + return NULL; +} + + +/******************************************************************* + * All sorts of list related functions for all of the lists * + *******************************************************************/ + +static __inline__ void remove_from_cl_list(blockinfo* bi) +{ + uae_u32 cl=cacheline(bi->pc_p); + + if (bi->prev_same_cl_p) + *(bi->prev_same_cl_p)=bi->next_same_cl; + if (bi->next_same_cl) + bi->next_same_cl->prev_same_cl_p=bi->prev_same_cl_p; + if (cache_tags[cl+1].bi) + cache_tags[cl].handler=cache_tags[cl+1].bi->handler_to_use; + else + cache_tags[cl].handler=(cpuop_func *)popall_execute_normal; +} + +static __inline__ void remove_from_list(blockinfo* bi) +{ + if (bi->prev_p) + *(bi->prev_p)=bi->next; + if (bi->next) + bi->next->prev_p=bi->prev_p; +} + +static __inline__ void remove_from_lists(blockinfo* bi) +{ + remove_from_list(bi); + remove_from_cl_list(bi); +} + +static __inline__ void add_to_cl_list(blockinfo* bi) +{ + uae_u32 cl=cacheline(bi->pc_p); + + if (cache_tags[cl+1].bi) + cache_tags[cl+1].bi->prev_same_cl_p=&(bi->next_same_cl); + bi->next_same_cl=cache_tags[cl+1].bi; + + cache_tags[cl+1].bi=bi; + bi->prev_same_cl_p=&(cache_tags[cl+1].bi); + + cache_tags[cl].handler=bi->handler_to_use; +} + +static __inline__ void raise_in_cl_list(blockinfo* bi) +{ + remove_from_cl_list(bi); + add_to_cl_list(bi); +} + +static __inline__ void add_to_active(blockinfo* bi) +{ + if (active) + active->prev_p=&(bi->next); + bi->next=active; + + active=bi; + bi->prev_p=&active; +} + +static __inline__ void add_to_dormant(blockinfo* bi) +{ + if (dormant) + dormant->prev_p=&(bi->next); + bi->next=dormant; + + dormant=bi; + bi->prev_p=&dormant; +} + +static __inline__ void remove_dep(dependency* d) +{ + if (d->prev_p) + *(d->prev_p)=d->next; + if (d->next) + d->next->prev_p=d->prev_p; + d->prev_p=NULL; + d->next=NULL; +} + +/* This block's code is about to be thrown away, so it no longer + depends on anything else */ +static __inline__ void remove_deps(blockinfo* bi) +{ + remove_dep(&(bi->dep[0])); + remove_dep(&(bi->dep[1])); +} + +static __inline__ void adjust_jmpdep(dependency* d, cpuop_func* a) +{ + *(d->jmp_off)=(uintptr)a-((uintptr)d->jmp_off+4); +} + +/******************************************************************** + * Soft flush handling support functions * + ********************************************************************/ + +static __inline__ void set_dhtu(blockinfo* bi, cpuop_func* dh) +{ + //write_log("bi is %p\n",bi); + if (dh!=bi->direct_handler_to_use) { + dependency* x=bi->deplist; + //write_log("bi->deplist=%p\n",bi->deplist); + while (x) { + //write_log("x is %p\n",x); + //write_log("x->next is %p\n",x->next); + //write_log("x->prev_p is %p\n",x->prev_p); + + if (x->jmp_off) { + adjust_jmpdep(x,dh); + } + x=x->next; + } + bi->direct_handler_to_use=dh; + } +} + +static __inline__ void invalidate_block(blockinfo* bi) +{ + int i; + + bi->optlevel=0; + bi->count=optcount[0]-1; + bi->handler=NULL; + bi->handler_to_use=(cpuop_func *)popall_execute_normal; + bi->direct_handler=NULL; + set_dhtu(bi,bi->direct_pen); + bi->needed_flags=0xff; + bi->status=BI_INVALID; + for (i=0;i<2;i++) { + bi->dep[i].jmp_off=NULL; + bi->dep[i].target=NULL; + } + remove_deps(bi); +} + +static __inline__ void create_jmpdep(blockinfo* bi, int i, uae_u32* jmpaddr, uae_u32 target) +{ + blockinfo* tbi=get_blockinfo_addr((void*)(uintptr)target); + + Dif(!tbi) { + write_log("Could not create jmpdep!\n"); + abort(); + } + bi->dep[i].jmp_off=jmpaddr; + bi->dep[i].source=bi; + bi->dep[i].target=tbi; + bi->dep[i].next=tbi->deplist; + if (bi->dep[i].next) + bi->dep[i].next->prev_p=&(bi->dep[i].next); + bi->dep[i].prev_p=&(tbi->deplist); + tbi->deplist=&(bi->dep[i]); +} + +static __inline__ void block_need_recompile(blockinfo * bi) +{ + uae_u32 cl = cacheline(bi->pc_p); + + set_dhtu(bi, bi->direct_pen); + bi->direct_handler = bi->direct_pen; + + bi->handler_to_use = (cpuop_func *)popall_execute_normal; + bi->handler = (cpuop_func *)popall_execute_normal; + if (bi == cache_tags[cl + 1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; + bi->status = BI_NEED_RECOMP; +} + +static __inline__ void mark_callers_recompile(blockinfo * bi) +{ + dependency *x = bi->deplist; + + while (x) { + dependency *next = x->next; /* This disappears when we mark for + * recompilation and thus remove the + * blocks from the lists */ + if (x->jmp_off) { + blockinfo *cbi = x->source; + + Dif(cbi->status == BI_INVALID) { + // write_log("invalid block in dependency list\n"); // FIXME? + // abort(); + } + if (cbi->status == BI_ACTIVE || cbi->status == BI_NEED_CHECK) { + block_need_recompile(cbi); + mark_callers_recompile(cbi); + } + else if (cbi->status == BI_COMPILING) { + redo_current_block = 1; + } + else if (cbi->status == BI_NEED_RECOMP) { + /* nothing */ + } + else { + //write_log("Status %d in mark_callers\n",cbi->status); // FIXME? + } + } + x = next; + } +} + +static __inline__ blockinfo* get_blockinfo_addr_new(void* addr, int setstate) +{ + blockinfo* bi=get_blockinfo_addr(addr); + int i; + + if (!bi) { + for (i=0;ipc_p=(uae_u8 *)addr; + invalidate_block(bi); + add_to_active(bi); + add_to_cl_list(bi); + + } + } + } + if (!bi) { + write_log("Looking for blockinfo, can't find free one\n"); + abort(); + } + return bi; +} + +static void prepare_block(blockinfo* bi); + +/* Managment of blockinfos. + + A blockinfo struct is allocated whenever a new block has to be + compiled. If the list of free blockinfos is empty, we allocate a new + pool of blockinfos and link the newly created blockinfos altogether + into the list of free blockinfos. Otherwise, we simply pop a structure + off the free list. + + Blockinfo are lazily deallocated, i.e. chained altogether in the + list of free blockinfos whenvever a translation cache flush (hard or + soft) request occurs. +*/ + +template< class T > +class LazyBlockAllocator +{ + enum { + kPoolSize = 1 + 4096 / sizeof(T) + }; + struct Pool { + T chunk[kPoolSize]; + Pool * next; + }; + Pool * mPools; + T * mChunks; +public: + LazyBlockAllocator() : mPools(0), mChunks(0) { } + ~LazyBlockAllocator(); + T * acquire(); + void release(T * const); +}; + +template< class T > +LazyBlockAllocator::~LazyBlockAllocator() +{ + Pool * currentPool = mPools; + while (currentPool) { + Pool * deadPool = currentPool; + currentPool = currentPool->next; + free(deadPool); + } +} + +template< class T > +T * LazyBlockAllocator::acquire() +{ + if (!mChunks) { + // There is no chunk left, allocate a new pool and link the + // chunks into the free list + Pool * newPool = (Pool *)malloc(sizeof(Pool)); + for (T * chunk = &newPool->chunk[0]; chunk < &newPool->chunk[kPoolSize]; chunk++) { + chunk->next = mChunks; + mChunks = chunk; + } + newPool->next = mPools; + mPools = newPool; + } + T * chunk = mChunks; + mChunks = chunk->next; + return chunk; +} + +template< class T > +void LazyBlockAllocator::release(T * const chunk) +{ + chunk->next = mChunks; + mChunks = chunk; +} + +template< class T > +class HardBlockAllocator +{ +public: + T * acquire() { + T * data = (T *)current_compile_p; + current_compile_p += sizeof(T); + return data; + } + + void release(T * const chunk) { + // Deallocated on invalidation + } +}; + +#if USE_SEPARATE_BIA +static LazyBlockAllocator BlockInfoAllocator; +static LazyBlockAllocator ChecksumInfoAllocator; +#else +static HardBlockAllocator BlockInfoAllocator; +static HardBlockAllocator ChecksumInfoAllocator; +#endif + +static __inline__ checksum_info *alloc_checksum_info(void) +{ + checksum_info *csi = ChecksumInfoAllocator.acquire(); + csi->next = NULL; + return csi; +} + +static __inline__ void free_checksum_info(checksum_info *csi) +{ + csi->next = NULL; + ChecksumInfoAllocator.release(csi); +} + +static __inline__ void free_checksum_info_chain(checksum_info *csi) +{ + while (csi != NULL) { + checksum_info *csi2 = csi->next; + free_checksum_info(csi); + csi = csi2; + } +} + +static __inline__ blockinfo *alloc_blockinfo(void) +{ + blockinfo *bi = BlockInfoAllocator.acquire(); +#if USE_CHECKSUM_INFO + bi->csi = NULL; +#endif + return bi; +} + +static __inline__ void free_blockinfo(blockinfo *bi) +{ +#if USE_CHECKSUM_INFO + free_checksum_info_chain(bi->csi); + bi->csi = NULL; +#endif + BlockInfoAllocator.release(bi); +} + +static __inline__ void alloc_blockinfos(void) +{ + int i; + blockinfo* bi; + + for (i=0;i>24)&0xff) | ((v>>8)&0xff00) | ((v<<8)&0xff0000) | ((v<<24)&0xff000000); +#endif +} + +/******************************************************************** + * Getting the information about the target CPU * + ********************************************************************/ + +#include "codegen_x86.cpp" + +void set_target(uae_u8* t) +{ + target=t; +} + +static __inline__ uae_u8* get_target_noopt(void) +{ + return target; +} + +__inline__ uae_u8* get_target(void) +{ + return get_target_noopt(); +} + + +/******************************************************************** + * Flags status handling. EMIT TIME! * + ********************************************************************/ + +static void bt_l_ri_noclobber(R4 r, IMM i); + +static void make_flags_live_internal(void) +{ + if (live.flags_in_flags==VALID) + return; + Dif (live.flags_on_stack==TRASH) { + write_log("Want flags, got something on stack, but it is TRASH\n"); + abort(); + } + if (live.flags_on_stack==VALID) { + int tmp; + tmp=readreg_specific(FLAGTMP,4,FLAG_NREG2); + raw_reg_to_flags(tmp); + unlock2(tmp); + + live.flags_in_flags=VALID; + return; + } + write_log("Huh? live.flags_in_flags=%d, live.flags_on_stack=%d, but need to make live\n", + live.flags_in_flags,live.flags_on_stack); + abort(); +} + +static void flags_to_stack(void) +{ + if (live.flags_on_stack==VALID) + return; + if (!live.flags_are_important) { + live.flags_on_stack=VALID; + return; + } + Dif (live.flags_in_flags!=VALID) + abort(); + else { + int tmp; + tmp=writereg_specific(FLAGTMP,4,FLAG_NREG1); + raw_flags_to_reg(tmp); + unlock2(tmp); + } + live.flags_on_stack=VALID; +} + +static __inline__ void clobber_flags(void) +{ + if (live.flags_in_flags==VALID && live.flags_on_stack!=VALID) + flags_to_stack(); + live.flags_in_flags=TRASH; +} + +/* Prepare for leaving the compiled stuff */ +static __inline__ void flush_flags(void) +{ + flags_to_stack(); + return; +} + +int touchcnt; + +/******************************************************************** + * Partial register flushing for optimized calls * + ********************************************************************/ + +struct regusage { + uae_u16 rmask; + uae_u16 wmask; +}; + +static inline void ru_set(uae_u16 *mask, int reg) +{ +#if USE_OPTIMIZED_CALLS + *mask |= 1 << reg; +#endif +} + +static inline bool ru_get(const uae_u16 *mask, int reg) +{ +#if USE_OPTIMIZED_CALLS + return (*mask & (1 << reg)); +#else + /* Default: instruction reads & write to register */ + return true; +#endif +} + +static inline void ru_set_read(regusage *ru, int reg) +{ + ru_set(&ru->rmask, reg); +} + +static inline void ru_set_write(regusage *ru, int reg) +{ + ru_set(&ru->wmask, reg); +} + +static inline bool ru_read_p(const regusage *ru, int reg) +{ + return ru_get(&ru->rmask, reg); +} + +static inline bool ru_write_p(const regusage *ru, int reg) +{ + return ru_get(&ru->wmask, reg); +} + +static void ru_fill_ea(regusage *ru, int reg, amodes mode, + wordsizes size, int write_mode) +{ + switch (mode) { + case Areg: + reg += 8; + /* fall through */ + case Dreg: + ru_set(write_mode ? &ru->wmask : &ru->rmask, reg); + break; + case Ad16: + /* skip displacment */ + m68k_pc_offset += 2; + case Aind: + case Aipi: + case Apdi: + ru_set_read(ru, reg+8); + break; + case Ad8r: + ru_set_read(ru, reg+8); + /* fall through */ + case PC8r: { + uae_u16 dp = comp_get_iword((m68k_pc_offset+=2)-2); + reg = (dp >> 12) & 15; + ru_set_read(ru, reg); + if (dp & 0x100) + m68k_pc_offset += (((dp & 0x30) >> 3) & 7) + ((dp & 3) * 2); + break; + } + case PC16: + case absw: + case imm0: + case imm1: + m68k_pc_offset += 2; + break; + case absl: + case imm2: + m68k_pc_offset += 4; + break; + case immi: + m68k_pc_offset += (size == sz_long) ? 4 : 2; + break; + } +} + +/* TODO: split into a static initialization part and a dynamic one + (instructions depending on extension words) */ +static void ru_fill(regusage *ru, uae_u32 opcode) +{ + m68k_pc_offset += 2; + + /* Default: no register is used or written to */ + ru->rmask = 0; + ru->wmask = 0; + + uae_u32 real_opcode = cft_map(opcode); + struct instr *dp = &table68k[real_opcode]; + + bool rw_dest = true; + bool handled = false; + + /* Handle some instructions specifically */ + uae_u16 ext; + switch (dp->mnemo) { + case i_BFCHG: + case i_BFCLR: + case i_BFEXTS: + case i_BFEXTU: + case i_BFFFO: + case i_BFINS: + case i_BFSET: + case i_BFTST: + ext = comp_get_iword((m68k_pc_offset+=2)-2); + if (ext & 0x800) ru_set_read(ru, (ext >> 6) & 7); + if (ext & 0x020) ru_set_read(ru, ext & 7); + ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); + if (dp->dmode == Dreg) + ru_set_read(ru, dp->dreg); + switch (dp->mnemo) { + case i_BFEXTS: + case i_BFEXTU: + case i_BFFFO: + ru_set_write(ru, (ext >> 12) & 7); + break; + case i_BFINS: + ru_set_read(ru, (ext >> 12) & 7); + /* fall through */ + case i_BFCHG: + case i_BFCLR: + case i_BSET: + if (dp->dmode == Dreg) + ru_set_write(ru, dp->dreg); + break; + } + handled = true; + rw_dest = false; + break; + + case i_BTST: + rw_dest = false; + break; + + case i_CAS: + { + ext = comp_get_iword((m68k_pc_offset+=2)-2); + int Du = ext & 7; + ru_set_read(ru, Du); + int Dc = (ext >> 6) & 7; + ru_set_read(ru, Dc); + ru_set_write(ru, Dc); + break; + } + case i_CAS2: + { + int Dc1, Dc2, Du1, Du2, Rn1, Rn2; + ext = comp_get_iword((m68k_pc_offset+=2)-2); + Rn1 = (ext >> 12) & 15; + Du1 = (ext >> 6) & 7; + Dc1 = ext & 7; + ru_set_read(ru, Rn1); + ru_set_read(ru, Du1); + ru_set_read(ru, Dc1); + ru_set_write(ru, Dc1); + ext = comp_get_iword((m68k_pc_offset+=2)-2); + Rn2 = (ext >> 12) & 15; + Du2 = (ext >> 6) & 7; + Dc2 = ext & 7; + ru_set_read(ru, Rn2); + ru_set_read(ru, Du2); + ru_set_write(ru, Dc2); + break; + } + case i_DIVL: case i_MULL: + m68k_pc_offset += 2; + break; + case i_LEA: + case i_MOVE: case i_MOVEA: case i_MOVE16: + rw_dest = false; + break; + case i_PACK: case i_UNPK: + rw_dest = false; + m68k_pc_offset += 2; + break; + case i_TRAPcc: + m68k_pc_offset += (dp->size == sz_long) ? 4 : 2; + break; + case i_RTR: + /* do nothing, just for coverage debugging */ + break; + /* TODO: handle EXG instruction */ + } + + /* Handle A-Traps better */ + if ((real_opcode & 0xf000) == 0xa000) { + handled = true; + } + + /* Handle EmulOps better */ + if ((real_opcode & 0xff00) == 0x7100) { + handled = true; + ru->rmask = 0xffff; + ru->wmask = 0; + } + + if (dp->suse && !handled) + ru_fill_ea(ru, dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); + + if (dp->duse && !handled) + ru_fill_ea(ru, dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 1); + + if (rw_dest) + ru->rmask |= ru->wmask; + + handled = handled || dp->suse || dp->duse; + + /* Mark all registers as used/written if the instruction may trap */ + if (may_trap(opcode)) { + handled = true; + ru->rmask = 0xffff; + ru->wmask = 0xffff; + } + + if (!handled) { + write_log("ru_fill: %04x = { %04x, %04x }\n", + real_opcode, ru->rmask, ru->wmask); + abort(); + } +} + +/******************************************************************** + * register allocation per block logging * + ********************************************************************/ + +static uae_s8 vstate[VREGS]; +static uae_s8 vwritten[VREGS]; +static uae_s8 nstate[N_REGS]; + +#define L_UNKNOWN -127 +#define L_UNAVAIL -1 +#define L_NEEDED -2 +#define L_UNNEEDED -3 + +static __inline__ void big_to_small_state(bigstate * b, smallstate * s) +{ + int i; + + for (i = 0; i < VREGS; i++) + s->virt[i] = vstate[i]; + for (i = 0; i < N_REGS; i++) + s->nat[i] = nstate[i]; +} + +static __inline__ int callers_need_recompile(bigstate * b, smallstate * s) +{ + int i; + int reverse = 0; + + for (i = 0; i < VREGS; i++) { + if (vstate[i] != L_UNNEEDED && s->virt[i] == L_UNNEEDED) + return 1; + if (vstate[i] == L_UNNEEDED && s->virt[i] != L_UNNEEDED) + reverse++; + } + for (i = 0; i < N_REGS; i++) { + if (nstate[i] >= 0 && nstate[i] != s->nat[i]) + return 1; + if (nstate[i] < 0 && s->nat[i] >= 0) + reverse++; + } + if (reverse >= 2 && USE_MATCH) + return 1; /* In this case, it might be worth recompiling the + * callers */ + return 0; +} + +static __inline__ void log_startblock(void) +{ + int i; + + for (i = 0; i < VREGS; i++) { + vstate[i] = L_UNKNOWN; + vwritten[i] = 0; + } + for (i = 0; i < N_REGS; i++) + nstate[i] = L_UNKNOWN; +} + +/* Using an n-reg for a temp variable */ +static __inline__ void log_isused(int n) +{ + if (nstate[n] == L_UNKNOWN) + nstate[n] = L_UNAVAIL; +} + +static __inline__ void log_visused(int r) +{ + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_NEEDED; +} + +static __inline__ void do_load_reg(int n, int r) +{ + if (r == FLAGTMP) + raw_load_flagreg(n, r); + else if (r == FLAGX) + raw_load_flagx(n, r); + else + raw_mov_l_rm(n, (uintptr) live.state[r].mem); +} + +static __inline__ void check_load_reg(int n, int r) +{ + raw_mov_l_rm(n, (uintptr) live.state[r].mem); +} + +static __inline__ void log_vwrite(int r) +{ + vwritten[r] = 1; +} + +/* Using an n-reg to hold a v-reg */ +static __inline__ void log_isreg(int n, int r) +{ + static int count = 0; + + if (nstate[n] == L_UNKNOWN && r < 16 && !vwritten[r] && USE_MATCH) + nstate[n] = r; + else { + do_load_reg(n, r); + if (nstate[n] == L_UNKNOWN) + nstate[n] = L_UNAVAIL; + } + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_NEEDED; +} + +static __inline__ void log_clobberreg(int r) +{ + if (vstate[r] == L_UNKNOWN) + vstate[r] = L_UNNEEDED; +} + +/* This ends all possibility of clever register allocation */ + +static __inline__ void log_flush(void) +{ + int i; + + for (i = 0; i < VREGS; i++) + if (vstate[i] == L_UNKNOWN) + vstate[i] = L_NEEDED; + for (i = 0; i < N_REGS; i++) + if (nstate[i] == L_UNKNOWN) + nstate[i] = L_UNAVAIL; +} + +static __inline__ void log_dump(void) +{ + int i; + + return; + + write_log("----------------------\n"); + for (i = 0; i < N_REGS; i++) { + switch (nstate[i]) { + case L_UNKNOWN: + write_log("Nat %d : UNKNOWN\n", i); + break; + case L_UNAVAIL: + write_log("Nat %d : UNAVAIL\n", i); + break; + default: + write_log("Nat %d : %d\n", i, nstate[i]); + break; + } + } + for (i = 0; i < VREGS; i++) { + if (vstate[i] == L_UNNEEDED) + write_log("Virt %d: UNNEEDED\n", i); + } +} + +/******************************************************************** + * register status handling. EMIT TIME! * + ********************************************************************/ + +static __inline__ void set_status(int r, int status) +{ + if (status == ISCONST) + log_clobberreg(r); + live.state[r].status=status; +} + +static __inline__ int isinreg(int r) +{ + return live.state[r].status==CLEAN || live.state[r].status==DIRTY; +} + +static __inline__ void adjust_nreg(int r, uae_u32 val) +{ + if (!val) + return; + raw_lea_l_brr(r,r,val); +} + +static void tomem(int r) +{ + int rr=live.state[r].realreg; + + if (isinreg(r)) { + if (live.state[r].val && live.nat[rr].nholds==1 + && !live.nat[rr].locked) { + // write_log("RemovingA offset %x from reg %d (%d) at %p\n", + // live.state[r].val,r,rr,target); + adjust_nreg(rr,live.state[r].val); + live.state[r].val=0; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + } + } + + if (live.state[r].status==DIRTY) { + switch (live.state[r].dirtysize) { + case 1: raw_mov_b_mr((uintptr)live.state[r].mem,rr); break; + case 2: raw_mov_w_mr((uintptr)live.state[r].mem,rr); break; + case 4: raw_mov_l_mr((uintptr)live.state[r].mem,rr); break; + default: abort(); + } + log_vwrite(r); + set_status(r,CLEAN); + live.state[r].dirtysize=0; + } +} + +static __inline__ int isconst(int r) +{ + return live.state[r].status==ISCONST; +} + +int is_const(int r) +{ + return isconst(r); +} + +static __inline__ void writeback_const(int r) +{ + if (!isconst(r)) + return; + Dif (live.state[r].needflush==NF_HANDLER) { + write_log("Trying to write back constant NF_HANDLER!\n"); + abort(); + } + + raw_mov_l_mi((uintptr)live.state[r].mem,live.state[r].val); + log_vwrite(r); + live.state[r].val=0; + set_status(r,INMEM); +} + +static __inline__ void tomem_c(int r) +{ + if (isconst(r)) { + writeback_const(r); + } + else + tomem(r); +} + +static void evict(int r) +{ + int rr; + + if (!isinreg(r)) + return; + tomem(r); + rr=live.state[r].realreg; + + Dif (live.nat[rr].locked && + live.nat[rr].nholds==1) { + write_log("register %d in nreg %d is locked!\n",r,live.state[r].realreg); + abort(); + } + + live.nat[rr].nholds--; + if (live.nat[rr].nholds!=live.state[r].realind) { /* Was not last */ + int topreg=live.nat[rr].holds[live.nat[rr].nholds]; + int thisind=live.state[r].realind; + + live.nat[rr].holds[thisind]=topreg; + live.state[topreg].realind=thisind; + } + live.state[r].realreg=-1; + set_status(r,INMEM); +} + +static __inline__ void free_nreg(int r) +{ + int i=live.nat[r].nholds; + + while (i) { + int vr; + + --i; + vr=live.nat[r].holds[i]; + evict(vr); + } + Dif (live.nat[r].nholds!=0) { + write_log("Failed to free nreg %d, nholds is %d\n",r,live.nat[r].nholds); + abort(); + } +} + +/* Use with care! */ +static __inline__ void isclean(int r) +{ + if (!isinreg(r)) + return; + live.state[r].validsize=4; + live.state[r].dirtysize=0; + live.state[r].val=0; + set_status(r,CLEAN); +} + +static __inline__ void disassociate(int r) +{ + isclean(r); + evict(r); +} + +static __inline__ void set_const(int r, uae_u32 val) +{ + disassociate(r); + live.state[r].val=val; + set_status(r,ISCONST); +} + +static __inline__ uae_u32 get_offset(int r) +{ + return live.state[r].val; +} + +static int alloc_reg_hinted(int r, int size, int willclobber, int hint) +{ + int bestreg; + uae_s32 when; + int i; + uae_s32 badness=0; /* to shut up gcc */ + bestreg=-1; + when=2000000000; + + /* XXX use a regalloc_order table? */ + for (i=0;i0) { + free_nreg(bestreg); + } + if (isinreg(r)) { + int rr=live.state[r].realreg; + /* This will happen if we read a partially dirty register at a + bigger size */ + Dif (willclobber || live.state[r].validsize>=size) + abort(); + Dif (live.nat[rr].nholds!=1) + abort(); + if (size==4 && live.state[r].validsize==2) { + log_isused(bestreg); + log_visused(r); + raw_mov_l_rm(bestreg,(uintptr)live.state[r].mem); + raw_bswap_32(bestreg); + raw_zero_extend_16_rr(rr,rr); + raw_zero_extend_16_rr(bestreg,bestreg); + raw_bswap_32(bestreg); + raw_lea_l_brr_indexed(rr,rr,bestreg,1,0); + live.state[r].validsize=4; + live.nat[rr].touched=touchcnt++; + return rr; + } + if (live.state[r].validsize==1) { + /* Nothing yet */ + } + evict(r); + } + + if (!willclobber) { + if (live.state[r].status!=UNDEF) { + if (isconst(r)) { + raw_mov_l_ri(bestreg,live.state[r].val); + live.state[r].val=0; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + log_isused(bestreg); + } + else { + log_isreg(bestreg, r); /* This will also load it! */ + live.state[r].dirtysize=0; + set_status(r,CLEAN); + } + } + else { + live.state[r].val=0; + live.state[r].dirtysize=0; + set_status(r,CLEAN); + log_isused(bestreg); + } + live.state[r].validsize=4; + } + else { /* this is the easiest way, but not optimal. FIXME! */ + /* Now it's trickier, but hopefully still OK */ + if (!isconst(r) || size==4) { + live.state[r].validsize=size; + live.state[r].dirtysize=size; + live.state[r].val=0; + set_status(r,DIRTY); + if (size == 4) { + log_clobberreg(r); + log_isused(bestreg); + } + else { + log_visused(r); + log_isused(bestreg); + } + } + else { + if (live.state[r].status!=UNDEF) + raw_mov_l_ri(bestreg,live.state[r].val); + live.state[r].val=0; + live.state[r].validsize=4; + live.state[r].dirtysize=4; + set_status(r,DIRTY); + log_isused(bestreg); + } + } + live.state[r].realreg=bestreg; + live.state[r].realind=live.nat[bestreg].nholds; + live.nat[bestreg].touched=touchcnt++; + live.nat[bestreg].holds[live.nat[bestreg].nholds]=r; + live.nat[bestreg].nholds++; + + return bestreg; +} + +static int alloc_reg(int r, int size, int willclobber) +{ + return alloc_reg_hinted(r,size,willclobber,-1); +} + +static void unlock2(int r) +{ + Dif (!live.nat[r].locked) + abort(); + live.nat[r].locked--; +} + +static void setlock(int r) +{ + live.nat[r].locked++; +} + + +static void mov_nregs(int d, int s) +{ + int ns=live.nat[s].nholds; + int nd=live.nat[d].nholds; + int i; + + if (s==d) + return; + + if (nd>0) + free_nreg(d); + + log_isused(d); + raw_mov_l_rr(d,s); + + for (i=0;i=size) { + n=live.state[r].realreg; + switch(size) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + answer=n; + } + break; + case 4: + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,spec>=0?4:size,0,spec); + } + + if (spec>=0 && spec!=answer) { + /* Too bad */ + mov_nregs(spec,answer); + answer=spec; + } + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + return answer; +} + + + +static int readreg(int r, int size) +{ + return readreg_general(r,size,-1,0); +} + +static int readreg_specific(int r, int size, int spec) +{ + return readreg_general(r,size,spec,0); +} + +static int readreg_offset(int r, int size) +{ + return readreg_general(r,size,-1,1); +} + +/* writereg_general(r, size, spec) + * + * INPUT + * - r : mid-layer register + * - size : requested size (1/2/4) + * - spec : -1 if find or make a register free, otherwise specifies + * the physical register to use in any case + * + * OUTPUT + * - hard (physical, x86 here) register allocated to virtual register r + */ +static __inline__ int writereg_general(int r, int size, int spec) +{ + int n; + int answer=-1; + + record_register(r); + if (size<4) { + remove_offset(r,spec); + } + + make_exclusive(r,size,spec); + if (isinreg(r)) { + int nvsize=size>live.state[r].validsize?size:live.state[r].validsize; + int ndsize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; + n=live.state[r].realreg; + + Dif (live.nat[n].nholds!=1) + abort(); + switch(size) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + } + break; + case 4: + live.state[r].dirtysize=ndsize; + live.state[r].validsize=nvsize; + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,size,1,spec); + } + if (spec>=0 && spec!=answer) { + mov_nregs(spec,answer); + answer=spec; + } + if (live.state[r].status==UNDEF) + live.state[r].validsize=4; + live.state[r].dirtysize=size>live.state[r].dirtysize?size:live.state[r].dirtysize; + live.state[r].validsize=size>live.state[r].validsize?size:live.state[r].validsize; + + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + if (size==4) { + live.state[r].val=0; + } + else { + Dif (live.state[r].val) { + write_log("Problem with val\n"); + abort(); + } + } + set_status(r,DIRTY); + return answer; +} + +static int writereg(int r, int size) +{ + return writereg_general(r,size,-1); +} + +static int writereg_specific(int r, int size, int spec) +{ + return writereg_general(r,size,spec); +} + +static __inline__ int rmw_general(int r, int wsize, int rsize, int spec) +{ + int n; + int answer=-1; + + record_register(r); + if (live.state[r].status==UNDEF) { + write_log("WARNING: Unexpected read of undefined register %d\n",r); + } + remove_offset(r,spec); + make_exclusive(r,0,spec); + + Dif (wsize=rsize) { + n=live.state[r].realreg; + Dif (live.nat[n].nholds!=1) + abort(); + + switch(rsize) { + case 1: + if (live.nat[n].canbyte || spec>=0) { + answer=n; + } + break; + case 2: + if (live.nat[n].canword || spec>=0) { + answer=n; + } + break; + case 4: + answer=n; + break; + default: abort(); + } + if (answer<0) + evict(r); + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) { + answer=alloc_reg_hinted(r,spec>=0?4:rsize,0,spec); + } + + if (spec>=0 && spec!=answer) { + /* Too bad */ + mov_nregs(spec,answer); + answer=spec; + } + if (wsize>live.state[r].dirtysize) + live.state[r].dirtysize=wsize; + if (wsize>live.state[r].validsize) + live.state[r].validsize=wsize; + set_status(r,DIRTY); + + live.nat[answer].locked++; + live.nat[answer].touched=touchcnt++; + + Dif (live.state[r].val) { + write_log("Problem with val(rmw)\n"); + abort(); + } + return answer; +} + +static int rmw(int r, int wsize, int rsize) +{ + return rmw_general(r,wsize,rsize,-1); +} + +static int rmw_specific(int r, int wsize, int rsize, int spec) +{ + return rmw_general(r,wsize,rsize,spec); +} + + +/* needed for restoring the carry flag on non-P6 cores */ +static void bt_l_ri_noclobber(R4 r, IMM i) +{ + int size=4; + if (i<16) + size=2; + r=readreg(r,size); + raw_bt_l_ri(r,i); + unlock2(r); +} + +/******************************************************************** + * FPU register status handling. EMIT TIME! * + ********************************************************************/ + +static void f_tomem(int r) +{ + if (live.fate[r].status==DIRTY) { +#if USE_LONG_DOUBLE + raw_fmov_ext_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); +#else + raw_fmov_mr((uintptr)live.fate[r].mem,live.fate[r].realreg); +#endif + live.fate[r].status=CLEAN; + } +} + +static void f_tomem_drop(int r) +{ + if (live.fate[r].status==DIRTY) { +#if USE_LONG_DOUBLE + raw_fmov_ext_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); +#else + raw_fmov_mr_drop((uintptr)live.fate[r].mem,live.fate[r].realreg); +#endif + live.fate[r].status=INMEM; + } +} + + +static __inline__ int f_isinreg(int r) +{ + return live.fate[r].status==CLEAN || live.fate[r].status==DIRTY; +} + +static void f_evict(int r) +{ + int rr; + + if (!f_isinreg(r)) + return; + rr=live.fate[r].realreg; + if (live.fat[rr].nholds==1) + f_tomem_drop(r); + else + f_tomem(r); + + Dif (live.fat[rr].locked && + live.fat[rr].nholds==1) { + write_log("FPU register %d in nreg %d is locked!\n",r,live.fate[r].realreg); + abort(); + } + + live.fat[rr].nholds--; + if (live.fat[rr].nholds!=live.fate[r].realind) { /* Was not last */ + int topreg=live.fat[rr].holds[live.fat[rr].nholds]; + int thisind=live.fate[r].realind; + live.fat[rr].holds[thisind]=topreg; + live.fate[topreg].realind=thisind; + } + live.fate[r].status=INMEM; + live.fate[r].realreg=-1; +} + +static __inline__ void f_free_nreg(int r) +{ + int i=live.fat[r].nholds; + + while (i) { + int vr; + + --i; + vr=live.fat[r].holds[i]; + f_evict(vr); + } + Dif (live.fat[r].nholds!=0) { + write_log("Failed to free nreg %d, nholds is %d\n",r,live.fat[r].nholds); + abort(); + } +} + + +/* Use with care! */ +static __inline__ void f_isclean(int r) +{ + if (!f_isinreg(r)) + return; + live.fate[r].status=CLEAN; +} + +static __inline__ void f_disassociate(int r) +{ + f_isclean(r); + f_evict(r); +} + + + +static int f_alloc_reg(int r, int willclobber) +{ + int bestreg; + uae_s32 when; + int i; + uae_s32 badness; + bestreg=-1; + when=2000000000; + for (i=N_FREGS;i--;) { + badness=live.fat[i].touched; + if (live.fat[i].nholds==0) + badness=0; + + if (!live.fat[i].locked && badness0) { + f_free_nreg(bestreg); + } + if (f_isinreg(r)) { + f_evict(r); + } + + if (!willclobber) { + if (live.fate[r].status!=UNDEF) { +#if USE_LONG_DOUBLE + raw_fmov_ext_rm(bestreg,(uintptr)live.fate[r].mem); +#else + raw_fmov_rm(bestreg,(uintptr)live.fate[r].mem); +#endif + } + live.fate[r].status=CLEAN; + } + else { + live.fate[r].status=DIRTY; + } + live.fate[r].realreg=bestreg; + live.fate[r].realind=live.fat[bestreg].nholds; + live.fat[bestreg].touched=touchcnt++; + live.fat[bestreg].holds[live.fat[bestreg].nholds]=r; + live.fat[bestreg].nholds++; + + return bestreg; +} + +static void f_unlock(int r) +{ + Dif (!live.fat[r].locked) + abort(); + live.fat[r].locked--; +} + +static void f_setlock(int r) +{ + live.fat[r].locked++; +} + +static __inline__ int f_readreg(int r) +{ + int n; + int answer=-1; + + if (f_isinreg(r)) { + n=live.fate[r].realreg; + answer=n; + } + /* either the value was in memory to start with, or it was evicted and + is in memory now */ + if (answer<0) + answer=f_alloc_reg(r,0); + + live.fat[answer].locked++; + live.fat[answer].touched=touchcnt++; + return answer; +} + +static __inline__ void f_make_exclusive(int r, int clobber) +{ + freg_status oldstate; + int rr=live.fate[r].realreg; + int nr; + int nind; + int ndirt=0; + int i; + + if (!f_isinreg(r)) + return; + if (live.fat[rr].nholds==1) + return; + for (i=0;i>=i; + return; + } + CLOBBER_SHRL; + r=rmw(r,4,4); + raw_shrl_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,2,2); + raw_shrl_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRL; + r=rmw(r,1,1); + raw_shrl_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shrl_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_ri,(RW4 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,4,4); + raw_shra_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_l_ri,(RW4 r, IMM i)) + +MIDFUNC(2,shra_w_ri,(RW2 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,2,2); + raw_shra_w_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_w_ri,(RW2 r, IMM i)) + +MIDFUNC(2,shra_b_ri,(RW1 r, IMM i)) +{ + if (!i && !needflags) + return; + CLOBBER_SHRA; + r=rmw(r,1,1); + raw_shra_b_ri(r,i); + unlock2(r); +} +MENDFUNC(2,shra_b_ri,(RW1 r, IMM i)) + +MIDFUNC(2,shra_l_rr,(RW4 d, R1 r)) +{ + if (isconst(r)) { + COMPCALL(shra_l_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,4,4); + Dif (r!=1) { + write_log("Illegal register %d in raw_rol_b\n",r); + abort(); + } + raw_shra_l_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_l_rr,(RW4 d, R1 r)) + +MIDFUNC(2,shra_w_rr,(RW2 d, R1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_w_ri)(d,(uae_u8)live.state[r].val); + return; + } + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,2,2); + Dif (r!=1) { + write_log("Illegal register %d in raw_shra_b\n",r); + abort(); + } + raw_shra_w_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_w_rr,(RW2 d, R1 r)) + +MIDFUNC(2,shra_b_rr,(RW1 d, R1 r)) +{ /* Can only do this with r==1, i.e. cl */ + + if (isconst(r)) { + COMPCALL(shra_b_ri)(d,(uae_u8)live.state[r].val); + return; + } + + CLOBBER_SHRA; + r=readreg_specific(r,1,SHIFTCOUNT_NREG); + d=rmw(d,1,1); + Dif (r!=1) { + write_log("Illegal register %d in raw_shra_b\n",r); + abort(); + } + raw_shra_b_rr(d,r) ; + unlock2(r); + unlock2(d); +} +MENDFUNC(2,shra_b_rr,(RW1 d, R1 r)) + + +MIDFUNC(2,setcc,(W1 d, IMM cc)) +{ + CLOBBER_SETCC; + d=writereg(d,1); + raw_setcc(d,cc); + unlock2(d); +} +MENDFUNC(2,setcc,(W1 d, IMM cc)) + +MIDFUNC(2,setcc_m,(IMM d, IMM cc)) +{ + CLOBBER_SETCC; + raw_setcc_m(d,cc); +} +MENDFUNC(2,setcc_m,(IMM d, IMM cc)) + +MIDFUNC(3,cmov_b_rr,(RW1 d, R1 s, IMM cc)) +{ + if (d==s) + return; + CLOBBER_CMOV; + s=readreg(s,1); + d=rmw(d,1,1); + raw_cmov_b_rr(d,s,cc); + unlock2(s); + unlock2(d); +} +MENDFUNC(3,cmov_b_rr,(RW1 d, R1 s, IMM cc)) + +MIDFUNC(3,cmov_w_rr,(RW2 d, R2 s, IMM cc)) +{ + if (d==s) + return; + CLOBBER_CMOV; + s=readreg(s,2); + d=rmw(d,2,2); + raw_cmov_w_rr(d,s,cc); + unlock2(s); + unlock2(d); +} +MENDFUNC(3,cmov_w_rr,(RW2 d, R2 s, IMM cc)) + +MIDFUNC(3,cmov_l_rr,(RW4 d, R4 s, IMM cc)) +{ + if (d==s) + return; + CLOBBER_CMOV; + s=readreg(s,4); + d=rmw(d,4,4); + raw_cmov_l_rr(d,s,cc); + unlock2(s); + unlock2(d); +} +MENDFUNC(3,cmov_l_rr,(RW4 d, R4 s, IMM cc)) + +MIDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) +{ + CLOBBER_CMOV; + d=rmw(d,4,4); + raw_cmov_l_rm(d,s,cc); + unlock2(d); +} +MENDFUNC(3,cmov_l_rm,(RW4 d, IMM s, IMM cc)) + +MIDFUNC(2,bsf_l_rr,(W4 d, W4 s)) +{ + CLOBBER_BSF; + s = readreg(s, 4); + d = writereg(d, 4); + raw_bsf_l_rr(d, s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,bsf_l_rr,(W4 d, W4 s)) + +/* Set the Z flag depending on the value in s. Note that the + value has to be 0 or -1 (or, more precisely, for non-zero + values, bit 14 must be set)! */ +MIDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) +{ + CLOBBER_BSF; + s=rmw_specific(s,4,4,FLAG_NREG3); + tmp=writereg(tmp,4); + raw_flags_set_zero(s, tmp); + unlock2(tmp); + unlock2(s); +} +MENDFUNC(2,simulate_bsf,(W4 tmp, RW4 s)) + +MIDFUNC(2,imul_32_32,(RW4 d, R4 s)) +{ + CLOBBER_MUL; + s=readreg(s,4); + d=rmw(d,4,4); + raw_imul_32_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_32_32,(RW4 d, R4 s)) + +MIDFUNC(2,imul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_imul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,imul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,mul_64_32,(RW4 d, RW4 s)) +{ + CLOBBER_MUL; + s=rmw_specific(s,4,4,MUL_NREG2); + d=rmw_specific(d,4,4,MUL_NREG1); + raw_mul_64_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,mul_64_32,(RW4 d, RW4 s)) + +MIDFUNC(2,mul_32_32,(RW4 d, R4 s)) +{ + CLOBBER_MUL; + s=readreg(s,4); + d=rmw(d,4,4); + raw_mul_32_32(d,s); + unlock2(s); + unlock2(d); +} +MENDFUNC(2,mul_32_32,(RW4 d, R4 s)) + +#if SIZEOF_VOID_P == 8 +MIDFUNC(2,sign_extend_32_rr,(W4 d, R2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)live.state[s].val); + return; + } + + CLOBBER_SE32; + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,4); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,4); + } + raw_sign_extend_32_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_32_rr,(W4 d, R2 s)) +#endif + +MIDFUNC(2,sign_extend_16_rr,(W4 d, R2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s16)live.state[s].val); + return; + } + + CLOBBER_SE16; + isrmw=(s==d); + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_sign_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_16_rr,(W4 d, R2 s)) + +MIDFUNC(2,sign_extend_8_rr,(W4 d, R1 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_s32)(uae_s8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_SE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_sign_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,sign_extend_8_rr,(W4 d, R1 s)) + + +MIDFUNC(2,zero_extend_16_rr,(W4 d, R2 s)) +{ + int isrmw; + + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u16)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE16; + if (!isrmw) { + s=readreg(s,2); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,2); + } + raw_zero_extend_16_rr(d,s); + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_16_rr,(W4 d, R2 s)) + +MIDFUNC(2,zero_extend_8_rr,(W4 d, R1 s)) +{ + int isrmw; + if (isconst(s)) { + set_const(d,(uae_u32)(uae_u8)live.state[s].val); + return; + } + + isrmw=(s==d); + CLOBBER_ZE8; + if (!isrmw) { + s=readreg(s,1); + d=writereg(d,4); + } + else { /* If we try to lock this twice, with different sizes, we + are int trouble! */ + s=d=rmw(s,4,1); + } + + raw_zero_extend_8_rr(d,s); + + if (!isrmw) { + unlock2(d); + unlock2(s); + } + else { + unlock2(s); + } +} +MENDFUNC(2,zero_extend_8_rr,(W4 d, R1 s)) + +MIDFUNC(2,mov_b_rr,(W1 d, R1 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=writereg(d,1); + raw_mov_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_b_rr,(W1 d, R1 s)) + +MIDFUNC(2,mov_w_rr,(W2 d, R2 s)) +{ + if (d==s) + return; + if (isconst(s)) { + COMPCALL(mov_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=writereg(d,2); + raw_mov_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,mov_w_rr,(W2 d, R2 s)) + + +MIDFUNC(4,mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_mov_l_rrm_indexed(d,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_l_rrm_indexed,(W4 d,R4 baser, R4 index, IMM factor)) + +MIDFUNC(4,mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,2); + + raw_mov_w_rrm_indexed(d,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_w_rrm_indexed,(W2 d, R4 baser, R4 index, IMM factor)) + +MIDFUNC(4,mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + d=writereg(d,1); + + raw_mov_b_rrm_indexed(d,baser,index,factor); + + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_b_rrm_indexed,(W1 d, R4 baser, R4 index, IMM factor)) + + +MIDFUNC(4,mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + s=readreg(s,4); + + Dif (baser==s || index==s) + abort(); + + + raw_mov_l_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_l_mrr_indexed,(R4 baser, R4 index, IMM factor, R4 s)) + +MIDFUNC(4,mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) +{ + CLOBBER_MOV; + baser=readreg(baser,4); + index=readreg(index,4); + s=readreg(s,2); + + raw_mov_w_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_w_mrr_indexed,(R4 baser, R4 index, IMM factor, R2 s)) + +MIDFUNC(4,mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) +{ + CLOBBER_MOV; + s=readreg(s,1); + baser=readreg(baser,4); + index=readreg(index,4); + + raw_mov_b_mrr_indexed(baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(4,mov_b_mrr_indexed,(R4 baser, R4 index, IMM factor, R1 s)) + + +MIDFUNC(5,mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,4); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_l_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_l_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R4 s)) + +MIDFUNC(5,mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,2); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_w_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_w_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R2 s)) + +MIDFUNC(5,mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + s=readreg(s,1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + + raw_mov_b_bmrr_indexed(base,baser,index,factor,s); + unlock2(s); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_b_bmrr_indexed,(IMM base, R4 baser, R4 index, IMM factor, R1 s)) + + + +/* Read a long from base+baser+factor*index */ +MIDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,4); + raw_mov_l_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_l_brrm_indexed,(W4 d, IMM base, R4 baser, R4 index, IMM factor)) + + +MIDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + remove_offset(d,-1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,2); + raw_mov_w_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_w_brrm_indexed,(W2 d, IMM base, R4 baser, R4 index, IMM factor)) + + +MIDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) +{ + int basereg=baser; + int indexreg=index; + + CLOBBER_MOV; + remove_offset(d,-1); + baser=readreg_offset(baser,4); + index=readreg_offset(index,4); + base+=get_offset(basereg); + base+=factor*get_offset(indexreg); + d=writereg(d,1); + raw_mov_b_brrm_indexed(d,base,baser,index,factor); + unlock2(d); + unlock2(baser); + unlock2(index); +} +MENDFUNC(5,mov_b_brrm_indexed,(W1 d, IMM base, R4 baser, R4 index, IMM factor)) + +/* Read a long from base+factor*index */ +MIDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) +{ + int indexreg=index; + + if (isconst(index)) { + COMPCALL(mov_l_rm)(d,base+factor*live.state[index].val); + return; + } + + CLOBBER_MOV; + index=readreg_offset(index,4); + base+=get_offset(indexreg)*factor; + d=writereg(d,4); + + raw_mov_l_rm_indexed(d,base,index,factor); + unlock2(index); + unlock2(d); +} +MENDFUNC(4,mov_l_rm_indexed,(W4 d, IMM base, R4 index, IMM factor)) + + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_rR,(W4 d, R4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,4); + + raw_mov_l_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_rR,(W4 d, R4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_rR,(W2 d, R4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,2); + + raw_mov_w_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_rR,(W2 d, R4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_b_rR,(W1 d, R4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_b_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + d=writereg(d,1); + + raw_mov_b_rR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_rR,(W1 d, R4 s, IMM offset)) + +/* read the long at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_l_brR,(W4 d, R4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_l_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,4); + + raw_mov_l_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_brR,(W4 d, R4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_brR,(W2 d, R4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_w_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,2); + + raw_mov_w_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_brR,(W2 d, R4 s, IMM offset)) + +/* read the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_b_brR,(W1 d, R4 s, IMM offset)) +{ + int sreg=s; + if (isconst(s)) { + COMPCALL(mov_b_rm)(d,live.state[s].val+offset); + return; + } + CLOBBER_MOV; + remove_offset(d,-1); + s=readreg_offset(s,4); + offset+=get_offset(sreg); + d=writereg(d,1); + + raw_mov_b_brR(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_brR,(W1 d, R4 s, IMM offset)) + +MIDFUNC(3,mov_l_Ri,(R4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_l_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_l_Ri,(R4 d, IMM i, IMM offset)) + +MIDFUNC(3,mov_w_Ri,(R4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_w_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_w_Ri,(R4 d, IMM i, IMM offset)) + +MIDFUNC(3,mov_b_Ri,(R4 d, IMM i, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_b_mi)(live.state[d].val+offset,i); + return; + } + + CLOBBER_MOV; + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_b_Ri(d,i,offset); + unlock2(d); +} +MENDFUNC(3,mov_b_Ri,(R4 d, IMM i, IMM offset)) + + /* Warning! OFFSET is byte sized only! */ +MIDFUNC(3,mov_l_Rr,(R4 d, R4 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_l_Ri)(d,live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg(d,4); + + raw_mov_l_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_Rr,(R4 d, R4 s, IMM offset)) + +MIDFUNC(3,mov_w_Rr,(R4 d, R2 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_w_Ri)(d,(uae_u16)live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg(d,4); + raw_mov_w_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_Rr,(R4 d, R2 s, IMM offset)) + +MIDFUNC(3,mov_b_Rr,(R4 d, R1 s, IMM offset)) +{ + if (isconst(d)) { + COMPCALL(mov_b_mr)(live.state[d].val+offset,s); + return; + } + if (isconst(s)) { + COMPCALL(mov_b_Ri)(d,(uae_u8)live.state[s].val,offset); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=readreg(d,4); + raw_mov_b_Rr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_Rr,(R4 d, R1 s, IMM offset)) + +MIDFUNC(3,lea_l_brr,(W4 d, R4 s, IMM offset)) +{ + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val+offset); + return; + } +#if USE_OFFSET + if (d==s) { + add_offset(d,offset); + return; + } +#endif + CLOBBER_LEA; + s=readreg(s,4); + d=writereg(d,4); + raw_lea_l_brr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,lea_l_brr,(W4 d, R4 s, IMM offset)) + +MIDFUNC(5,lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) +{ + if (!offset) { + COMPCALL(lea_l_rr_indexed)(d,s,index,factor); + return; + } + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_brr_indexed(d,s,index,factor,offset); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(5,lea_l_brr_indexed,(W4 d, R4 s, R4 index, IMM factor, IMM offset)) + +MIDFUNC(4,lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) +{ + CLOBBER_LEA; + s=readreg(s,4); + index=readreg(index,4); + d=writereg(d,4); + + raw_lea_l_rr_indexed(d,s,index,factor); + unlock2(d); + unlock2(index); + unlock2(s); +} +MENDFUNC(4,lea_l_rr_indexed,(W4 d, R4 s, R4 index, IMM factor)) + +/* write d to the long at the address contained in s+offset */ +MIDFUNC(3,mov_l_bRr,(R4 d, R4 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_l_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,4); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + + raw_mov_l_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_l_bRr,(R4 d, R4 s, IMM offset)) + +/* write the word at the address contained in s+offset and store in d */ +MIDFUNC(3,mov_w_bRr,(R4 d, R2 s, IMM offset)) +{ + int dreg=d; + + if (isconst(d)) { + COMPCALL(mov_w_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,2); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_w_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_w_bRr,(R4 d, R2 s, IMM offset)) + +MIDFUNC(3,mov_b_bRr,(R4 d, R1 s, IMM offset)) +{ + int dreg=d; + if (isconst(d)) { + COMPCALL(mov_b_mr)(live.state[d].val+offset,s); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + d=readreg_offset(d,4); + offset+=get_offset(dreg); + raw_mov_b_bRr(d,s,offset); + unlock2(d); + unlock2(s); +} +MENDFUNC(3,mov_b_bRr,(R4 d, R1 s, IMM offset)) + +MIDFUNC(1,bswap_32,(RW4 r)) +{ + int reg=r; + + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=reverse32(oldv); + return; + } + + CLOBBER_SW32; + r=rmw(r,4,4); + raw_bswap_32(r); + unlock2(r); +} +MENDFUNC(1,bswap_32,(RW4 r)) + +MIDFUNC(1,bswap_16,(RW2 r)) +{ + if (isconst(r)) { + uae_u32 oldv=live.state[r].val; + live.state[r].val=((oldv>>8)&0xff) | ((oldv<<8)&0xff00) | + (oldv&0xffff0000); + return; + } + + CLOBBER_SW16; + r=rmw(r,2,2); + + raw_bswap_16(r); + unlock2(r); +} +MENDFUNC(1,bswap_16,(RW2 r)) + + + +MIDFUNC(2,mov_l_rr,(W4 d, R4 s)) +{ + int olds; + + if (d==s) { /* How pointless! */ + return; + } + if (isconst(s)) { + COMPCALL(mov_l_ri)(d,live.state[s].val); + return; + } + olds=s; + disassociate(d); + s=readreg_offset(s,4); + live.state[d].realreg=s; + live.state[d].realind=live.nat[s].nholds; + live.state[d].val=live.state[olds].val; + live.state[d].validsize=4; + live.state[d].dirtysize=4; + set_status(d,DIRTY); + + live.nat[s].holds[live.nat[s].nholds]=d; + live.nat[s].nholds++; + log_clobberreg(d); + /* write_log("Added %d to nreg %d(%d), now holds %d regs\n", + d,s,live.state[d].realind,live.nat[s].nholds); */ + unlock2(s); +} +MENDFUNC(2,mov_l_rr,(W4 d, R4 s)) + +MIDFUNC(2,mov_l_mr,(IMM d, R4 s)) +{ + if (isconst(s)) { + COMPCALL(mov_l_mi)(d,live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,4); + + raw_mov_l_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_l_mr,(IMM d, R4 s)) + + +MIDFUNC(2,mov_w_mr,(IMM d, R2 s)) +{ + if (isconst(s)) { + COMPCALL(mov_w_mi)(d,(uae_u16)live.state[s].val); + return; + } + CLOBBER_MOV; + s=readreg(s,2); + + raw_mov_w_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_w_mr,(IMM d, R2 s)) + +MIDFUNC(2,mov_w_rm,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_rm,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_mr,(IMM d, R1 s)) +{ + if (isconst(s)) { + COMPCALL(mov_b_mi)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_MOV; + s=readreg(s,1); + + raw_mov_b_mr(d,s); + unlock2(s); +} +MENDFUNC(2,mov_b_mr,(IMM d, R1 s)) + +MIDFUNC(2,mov_b_rm,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_rm(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_rm,(W1 d, IMM s)) + +MIDFUNC(2,mov_l_ri,(W4 d, IMM s)) +{ + set_const(d,s); + return; +} +MENDFUNC(2,mov_l_ri,(W4 d, IMM s)) + +MIDFUNC(2,mov_w_ri,(W2 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,2); + + raw_mov_w_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_w_ri,(W2 d, IMM s)) + +MIDFUNC(2,mov_b_ri,(W1 d, IMM s)) +{ + CLOBBER_MOV; + d=writereg(d,1); + + raw_mov_b_ri(d,s); + unlock2(d); +} +MENDFUNC(2,mov_b_ri,(W1 d, IMM s)) + + +MIDFUNC(2,add_l_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_l_mi(d,s) ; +} +MENDFUNC(2,add_l_mi,(IMM d, IMM s)) + +MIDFUNC(2,add_w_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_w_mi(d,s) ; +} +MENDFUNC(2,add_w_mi,(IMM d, IMM s)) + +MIDFUNC(2,add_b_mi,(IMM d, IMM s)) +{ + CLOBBER_ADD; + raw_add_b_mi(d,s) ; +} +MENDFUNC(2,add_b_mi,(IMM d, IMM s)) + + +MIDFUNC(2,test_l_ri,(R4 d, IMM i)) +{ + CLOBBER_TEST; + d=readreg(d,4); + + raw_test_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,test_l_ri,(R4 d, IMM i)) + +MIDFUNC(2,test_l_rr,(R4 d, R4 s)) +{ + CLOBBER_TEST; + d=readreg(d,4); + s=readreg(s,4); + + raw_test_l_rr(d,s);; + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_l_rr,(R4 d, R4 s)) + +MIDFUNC(2,test_w_rr,(R2 d, R2 s)) +{ + CLOBBER_TEST; + d=readreg(d,2); + s=readreg(s,2); + + raw_test_w_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_w_rr,(R2 d, R2 s)) + +MIDFUNC(2,test_b_rr,(R1 d, R1 s)) +{ + CLOBBER_TEST; + d=readreg(d,1); + s=readreg(s,1); + + raw_test_b_rr(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,test_b_rr,(R1 d, R1 s)) + + +MIDFUNC(2,and_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val &= i; + return; + } + + CLOBBER_AND; + d=rmw(d,4,4); + + raw_and_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,and_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,and_l,(RW4 d, R4 s)) +{ + CLOBBER_AND; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_and_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_l,(RW4 d, R4 s)) + +MIDFUNC(2,and_w,(RW2 d, R2 s)) +{ + CLOBBER_AND; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_and_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_w,(RW2 d, R2 s)) + +MIDFUNC(2,and_b,(RW1 d, R1 s)) +{ + CLOBBER_AND; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_and_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,and_b,(RW1 d, R1 s)) + +// gb-- used for making an fpcr value in compemu_fpp.cpp +MIDFUNC(2,or_l_rm,(RW4 d, IMM s)) +{ + CLOBBER_OR; + d=rmw(d,4,4); + + raw_or_l_rm(d,s); + unlock2(d); +} +MENDFUNC(2,or_l_rm,(RW4 d, IMM s)) + +MIDFUNC(2,or_l_ri,(RW4 d, IMM i)) +{ + if (isconst(d) && !needflags) { + live.state[d].val|=i; + return; + } + CLOBBER_OR; + d=rmw(d,4,4); + + raw_or_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,or_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,or_l,(RW4 d, R4 s)) +{ + if (isconst(d) && isconst(s) && !needflags) { + live.state[d].val|=live.state[s].val; + return; + } + CLOBBER_OR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_or_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_l,(RW4 d, R4 s)) + +MIDFUNC(2,or_w,(RW2 d, R2 s)) +{ + CLOBBER_OR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_or_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_w,(RW2 d, R2 s)) + +MIDFUNC(2,or_b,(RW1 d, R1 s)) +{ + CLOBBER_OR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_or_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,or_b,(RW1 d, R1 s)) + +MIDFUNC(2,adc_l,(RW4 d, R4 s)) +{ + CLOBBER_ADC; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_adc_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_l,(RW4 d, R4 s)) + +MIDFUNC(2,adc_w,(RW2 d, R2 s)) +{ + CLOBBER_ADC; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_adc_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_w,(RW2 d, R2 s)) + +MIDFUNC(2,adc_b,(RW1 d, R1 s)) +{ + CLOBBER_ADC; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_adc_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,adc_b,(RW1 d, R1 s)) + +MIDFUNC(2,add_l,(RW4 d, R4 s)) +{ + if (isconst(s)) { + COMPCALL(add_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_add_l(d,s); + + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_l,(RW4 d, R4 s)) + +MIDFUNC(2,add_w,(RW2 d, R2 s)) +{ + if (isconst(s)) { + COMPCALL(add_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_add_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_w,(RW2 d, R2 s)) + +MIDFUNC(2,add_b,(RW1 d, R1 s)) +{ + if (isconst(s)) { + COMPCALL(add_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_ADD; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_add_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,add_b,(RW1 d, R1 s)) + +MIDFUNC(2,sub_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val-=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,-i); + return; + } +#endif + + CLOBBER_SUB; + d=rmw(d,4,4); + + raw_sub_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,sub_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,2,2); + + raw_sub_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,sub_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,sub_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_SUB; + d=rmw(d,1,1); + + raw_sub_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,sub_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,add_l_ri,(RW4 d, IMM i)) +{ + if (!i && !needflags) + return; + if (isconst(d) && !needflags) { + live.state[d].val+=i; + return; + } +#if USE_OFFSET + if (!needflags) { + add_offset(d,i); + return; + } +#endif + CLOBBER_ADD; + d=rmw(d,4,4); + raw_add_l_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_l_ri,(RW4 d, IMM i)) + +MIDFUNC(2,add_w_ri,(RW2 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,2,2); + + raw_add_w_ri(d,i); + unlock2(d); +} +MENDFUNC(2,add_w_ri,(RW2 d, IMM i)) + +MIDFUNC(2,add_b_ri,(RW1 d, IMM i)) +{ + if (!i && !needflags) + return; + + CLOBBER_ADD; + d=rmw(d,1,1); + + raw_add_b_ri(d,i); + + unlock2(d); +} +MENDFUNC(2,add_b_ri,(RW1 d, IMM i)) + +MIDFUNC(2,sbb_l,(RW4 d, R4 s)) +{ + CLOBBER_SBB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sbb_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_l,(RW4 d, R4 s)) + +MIDFUNC(2,sbb_w,(RW2 d, R2 s)) +{ + CLOBBER_SBB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sbb_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_w,(RW2 d, R2 s)) + +MIDFUNC(2,sbb_b,(RW1 d, R1 s)) +{ + CLOBBER_SBB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sbb_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sbb_b,(RW1 d, R1 s)) + +MIDFUNC(2,sub_l,(RW4 d, R4 s)) +{ + if (isconst(s)) { + COMPCALL(sub_l_ri)(d,live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_sub_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_l,(RW4 d, R4 s)) + +MIDFUNC(2,sub_w,(RW2 d, R2 s)) +{ + if (isconst(s)) { + COMPCALL(sub_w_ri)(d,(uae_u16)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_sub_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_w,(RW2 d, R2 s)) + +MIDFUNC(2,sub_b,(RW1 d, R1 s)) +{ + if (isconst(s)) { + COMPCALL(sub_b_ri)(d,(uae_u8)live.state[s].val); + return; + } + + CLOBBER_SUB; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_sub_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,sub_b,(RW1 d, R1 s)) + +MIDFUNC(2,cmp_l,(R4 d, R4 s)) +{ + CLOBBER_CMP; + s=readreg(s,4); + d=readreg(d,4); + + raw_cmp_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_l,(R4 d, R4 s)) + +MIDFUNC(2,cmp_l_ri,(R4 r, IMM i)) +{ + CLOBBER_CMP; + r=readreg(r,4); + + raw_cmp_l_ri(r,i); + unlock2(r); +} +MENDFUNC(2,cmp_l_ri,(R4 r, IMM i)) + +MIDFUNC(2,cmp_w,(R2 d, R2 s)) +{ + CLOBBER_CMP; + s=readreg(s,2); + d=readreg(d,2); + + raw_cmp_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_w,(R2 d, R2 s)) + +MIDFUNC(2,cmp_b,(R1 d, R1 s)) +{ + CLOBBER_CMP; + s=readreg(s,1); + d=readreg(d,1); + + raw_cmp_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,cmp_b,(R1 d, R1 s)) + + +MIDFUNC(2,xor_l,(RW4 d, R4 s)) +{ + CLOBBER_XOR; + s=readreg(s,4); + d=rmw(d,4,4); + + raw_xor_l(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_l,(RW4 d, R4 s)) + +MIDFUNC(2,xor_w,(RW2 d, R2 s)) +{ + CLOBBER_XOR; + s=readreg(s,2); + d=rmw(d,2,2); + + raw_xor_w(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_w,(RW2 d, R2 s)) + +MIDFUNC(2,xor_b,(RW1 d, R1 s)) +{ + CLOBBER_XOR; + s=readreg(s,1); + d=rmw(d,1,1); + + raw_xor_b(d,s); + unlock2(d); + unlock2(s); +} +MENDFUNC(2,xor_b,(RW1 d, R1 s)) + +MIDFUNC(5,call_r_11,(W4 out1, R4 r, R4 in1, IMM osize, IMM isize)) +{ + clobber_flags(); + remove_all_offsets(); + if (osize==4) { + if (out1!=in1 && out1!=r) { + COMPCALL(forget_about)(out1); + } + } + else { + tomem_c(out1); + } + + in1=readreg_specific(in1,isize,REG_PAR1); + r=readreg(r,4); + prepare_for_call_1(); /* This should ensure that there won't be + any need for swapping nregs in prepare_for_call_2 + */ +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(in1); +#endif + unlock2(in1); + unlock2(r); + + prepare_for_call_2(); + raw_call_r(r); + +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(4); +#endif + + + live.nat[REG_RESULT].holds[0]=out1; + live.nat[REG_RESULT].nholds=1; + live.nat[REG_RESULT].touched=touchcnt++; + + live.state[out1].realreg=REG_RESULT; + live.state[out1].realind=0; + live.state[out1].val=0; + live.state[out1].validsize=osize; + live.state[out1].dirtysize=osize; + set_status(out1,DIRTY); +} +MENDFUNC(5,call_r_11,(W4 out1, R4 r, R4 in1, IMM osize, IMM isize)) + +MIDFUNC(5,call_r_02,(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)) +{ + clobber_flags(); + remove_all_offsets(); + in1=readreg_specific(in1,isize1,REG_PAR1); + in2=readreg_specific(in2,isize2,REG_PAR2); + r=readreg(r,4); + prepare_for_call_1(); /* This should ensure that there won't be + any need for swapping nregs in prepare_for_call_2 + */ +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(in2); + raw_push_l_r(in1); +#endif + unlock2(r); + unlock2(in1); + unlock2(in2); + prepare_for_call_2(); + raw_call_r(r); +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(8); +#endif +} +MENDFUNC(5,call_r_02,(R4 r, R4 in1, R4 in2, IMM isize1, IMM isize2)) + +/* forget_about() takes a mid-layer register */ +MIDFUNC(1,forget_about,(W4 r)) +{ + if (isinreg(r)) + disassociate(r); + live.state[r].val=0; + set_status(r,UNDEF); +} +MENDFUNC(1,forget_about,(W4 r)) + +MIDFUNC(0,nop,(void)) +{ + raw_nop(); +} +MENDFUNC(0,nop,(void)) + + +MIDFUNC(1,f_forget_about,(FW r)) +{ + if (f_isinreg(r)) + f_disassociate(r); + live.fate[r].status=UNDEF; +} +MENDFUNC(1,f_forget_about,(FW r)) + +MIDFUNC(1,fmov_pi,(FW r)) +{ + r=f_writereg(r); + raw_fmov_pi(r); + f_unlock(r); +} +MENDFUNC(1,fmov_pi,(FW r)) + +MIDFUNC(1,fmov_log10_2,(FW r)) +{ + r=f_writereg(r); + raw_fmov_log10_2(r); + f_unlock(r); +} +MENDFUNC(1,fmov_log10_2,(FW r)) + +MIDFUNC(1,fmov_log2_e,(FW r)) +{ + r=f_writereg(r); + raw_fmov_log2_e(r); + f_unlock(r); +} +MENDFUNC(1,fmov_log2_e,(FW r)) + +MIDFUNC(1,fmov_loge_2,(FW r)) +{ + r=f_writereg(r); + raw_fmov_loge_2(r); + f_unlock(r); +} +MENDFUNC(1,fmov_loge_2,(FW r)) + +MIDFUNC(1,fmov_1,(FW r)) +{ + r=f_writereg(r); + raw_fmov_1(r); + f_unlock(r); +} +MENDFUNC(1,fmov_1,(FW r)) + +MIDFUNC(1,fmov_0,(FW r)) +{ + r=f_writereg(r); + raw_fmov_0(r); + f_unlock(r); +} +MENDFUNC(1,fmov_0,(FW r)) + +MIDFUNC(2,fmov_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmov_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmov_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovi_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmovi_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmovi_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovi_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmovi_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmovi_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmovs_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmovs_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmovs_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmovs_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmovs_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmovs_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmov_ext_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmov_ext_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmov_mr,(MEMW m, FR r)) +{ + r=f_readreg(r); + raw_fmov_mr(m,r); + f_unlock(r); +} +MENDFUNC(2,fmov_mr,(MEMW m, FR r)) + +MIDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) +{ + r=f_writereg(r); + raw_fmov_ext_rm(r,m); + f_unlock(r); +} +MENDFUNC(2,fmov_ext_rm,(FW r, MEMR m)) + +MIDFUNC(2,fmov_rr,(FW d, FR s)) +{ + if (d==s) { /* How pointless! */ + return; + } +#if USE_F_ALIAS + f_disassociate(d); + s=f_readreg(s); + live.fate[d].realreg=s; + live.fate[d].realind=live.fat[s].nholds; + live.fate[d].status=DIRTY; + live.fat[s].holds[live.fat[s].nholds]=d; + live.fat[s].nholds++; + f_unlock(s); +#else + s=f_readreg(s); + d=f_writereg(d); + raw_fmov_rr(d,s); + f_unlock(s); + f_unlock(d); +#endif +} +MENDFUNC(2,fmov_rr,(FW d, FR s)) + +MIDFUNC(2,fldcw_m_indexed,(R4 index, IMM base)) +{ + index=readreg(index,4); + + raw_fldcw_m_indexed(index,base); + unlock2(index); +} +MENDFUNC(2,fldcw_m_indexed,(R4 index, IMM base)) + +MIDFUNC(1,ftst_r,(FR r)) +{ + r=f_readreg(r); + raw_ftst_r(r); + f_unlock(r); +} +MENDFUNC(1,ftst_r,(FR r)) + +MIDFUNC(0,dont_care_fflags,(void)) +{ + f_disassociate(FP_RESULT); +} +MENDFUNC(0,dont_care_fflags,(void)) + +MIDFUNC(2,fsqrt_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fsqrt_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsqrt_rr,(FW d, FR s)) + +MIDFUNC(2,fabs_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fabs_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fabs_rr,(FW d, FR s)) + +MIDFUNC(2,fsin_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fsin_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsin_rr,(FW d, FR s)) + +MIDFUNC(2,fcos_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fcos_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fcos_rr,(FW d, FR s)) + +MIDFUNC(2,ftwotox_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_ftwotox_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,ftwotox_rr,(FW d, FR s)) + +MIDFUNC(2,fetox_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fetox_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fetox_rr,(FW d, FR s)) + +MIDFUNC(2,frndint_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_frndint_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frndint_rr,(FW d, FR s)) + +MIDFUNC(2,flog2_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_flog2_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,flog2_rr,(FW d, FR s)) + +MIDFUNC(2,fneg_rr,(FW d, FR s)) +{ + s=f_readreg(s); + d=f_writereg(d); + raw_fneg_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fneg_rr,(FW d, FR s)) + +MIDFUNC(2,fadd_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fadd_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fadd_rr,(FRW d, FR s)) + +MIDFUNC(2,fsub_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fsub_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fsub_rr,(FRW d, FR s)) + +MIDFUNC(2,fcmp_rr,(FR d, FR s)) +{ + d=f_readreg(d); + s=f_readreg(s); + raw_fcmp_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fcmp_rr,(FR d, FR s)) + +MIDFUNC(2,fdiv_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fdiv_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fdiv_rr,(FRW d, FR s)) + +MIDFUNC(2,frem_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_frem_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frem_rr,(FRW d, FR s)) + +MIDFUNC(2,frem1_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_frem1_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,frem1_rr,(FRW d, FR s)) + +MIDFUNC(2,fmul_rr,(FRW d, FR s)) +{ + s=f_readreg(s); + d=f_rmw(d); + raw_fmul_rr(d,s); + f_unlock(s); + f_unlock(d); +} +MENDFUNC(2,fmul_rr,(FRW d, FR s)) + +/******************************************************************** + * Support functions exposed to gencomp. CREATE time * + ********************************************************************/ + +void set_zero(int r, int tmp) +{ + if (setzflg_uses_bsf) + bsf_l_rr(r,r); + else + simulate_bsf(tmp,r); +} + +int kill_rodent(int r) +{ + return KILLTHERAT && + have_rat_stall && + (live.state[r].status==INMEM || + live.state[r].status==CLEAN || + live.state[r].status==ISCONST || + live.state[r].dirtysize==4); +} + +uae_u32 get_const(int r) +{ + Dif (!isconst(r)) { + write_log("Register %d should be constant, but isn't\n",r); + abort(); + } + return live.state[r].val; +} + +void sync_m68k_pc(void) +{ + if (m68k_pc_offset) { + add_l_ri(PC_P,m68k_pc_offset); + comp_pc_p+=m68k_pc_offset; + m68k_pc_offset=0; + } +} + +/******************************************************************** + * Scratch registers management * + ********************************************************************/ + +struct scratch_t { + uae_u32 regs[VREGS]; + fpu_register fregs[VFREGS]; +}; + +static scratch_t scratch; + +/******************************************************************** + * Support functions exposed to newcpu * + ********************************************************************/ + +static inline const char *str_on_off(bool b) +{ + return b ? "on" : "off"; +} + +void compiler_init(void) +{ + static bool initialized = false; + if (initialized) + return; + +#if JIT_DEBUG + // JIT debug mode ? + JITDebug = PrefsFindBool("jitdebug"); +#endif + write_log(" : enable runtime disassemblers : %s\n", JITDebug ? "yes" : "no"); + +#ifdef USE_JIT_FPU + // Use JIT compiler for FPU instructions ? + avoid_fpu = !PrefsFindBool("jitfpu"); +#else + // JIT FPU is always disabled + avoid_fpu = true; +#endif + write_log(" : compile FPU instructions : %s\n", !avoid_fpu ? "yes" : "no"); + + // Get size of the translation cache (in KB) + cache_size = PrefsFindInt32("jitcachesize"); + write_log(" : requested translation cache size : %d KB\n", cache_size); + + // Initialize target CPU (check for features, e.g. CMOV, rat stalls) + raw_init_cpu(); + setzflg_uses_bsf = target_check_bsf(); + write_log(" : target processor has CMOV instructions : %s\n", have_cmov ? "yes" : "no"); + write_log(" : target processor can suffer from partial register stalls : %s\n", have_rat_stall ? "yes" : "no"); + write_log(" : alignment for loops, jumps are %d, %d\n", align_loops, align_jumps); + + // Translation cache flush mechanism + lazy_flush = PrefsFindBool("jitlazyflush"); + write_log(" : lazy translation cache invalidation : %s\n", str_on_off(lazy_flush)); + flush_icache = lazy_flush ? flush_icache_lazy : flush_icache_hard; + + // Compiler features + write_log(" : register aliasing : %s\n", str_on_off(1)); + write_log(" : FP register aliasing : %s\n", str_on_off(USE_F_ALIAS)); + write_log(" : lazy constant offsetting : %s\n", str_on_off(USE_OFFSET)); +#if USE_INLINING + follow_const_jumps = PrefsFindBool("jitinline"); +#endif + write_log(" : translate through constant jumps : %s\n", str_on_off(follow_const_jumps)); + write_log(" : separate blockinfo allocation : %s\n", str_on_off(USE_SEPARATE_BIA)); + + // Build compiler tables + build_comp(); + + initialized = true; + +#if PROFILE_UNTRANSLATED_INSNS + write_log(" : gather statistics on untranslated insns count\n"); +#endif + +#if PROFILE_COMPILE_TIME + write_log(" : gather statistics on translation time\n"); + emul_start_time = clock(); +#endif +} + +void compiler_exit(void) +{ +#if PROFILE_COMPILE_TIME + emul_end_time = clock(); +#endif + + // Deallocate translation cache + if (compiled_code) { + vm_release(compiled_code, cache_size * 1024); + compiled_code = 0; + } + + // Deallocate popallspace + if (popallspace) { + vm_release(popallspace, POPALLSPACE_SIZE); + popallspace = 0; + } + +#if PROFILE_COMPILE_TIME + write_log("### Compile Block statistics\n"); + write_log("Number of calls to compile_block : %d\n", compile_count); + uae_u32 emul_time = emul_end_time - emul_start_time; + write_log("Total emulation time : %.1f sec\n", double(emul_time)/double(CLOCKS_PER_SEC)); + write_log("Total compilation time : %.1f sec (%.1f%%)\n", double(compile_time)/double(CLOCKS_PER_SEC), + 100.0*double(compile_time)/double(emul_time)); + write_log("\n"); +#endif + +#if PROFILE_UNTRANSLATED_INSNS + uae_u64 untranslated_count = 0; + for (int i = 0; i < 65536; i++) { + opcode_nums[i] = i; + untranslated_count += raw_cputbl_count[i]; + } + write_log("Sorting out untranslated instructions count...\n"); + qsort(opcode_nums, 65536, sizeof(uae_u16), untranslated_compfn); + write_log("\nRank Opc Count Name\n"); + for (int i = 0; i < untranslated_top_ten; i++) { + uae_u32 count = raw_cputbl_count[opcode_nums[i]]; + struct instr *dp; + struct mnemolookup *lookup; + if (!count) + break; + dp = table68k + opcode_nums[i]; + for (lookup = lookuptab; lookup->mnemo != dp->mnemo; lookup++) + ; + write_log("%03d: %04x %10lu %s\n", i, opcode_nums[i], count, lookup->name); + } +#endif + +#if RECORD_REGISTER_USAGE + int reg_count_ids[16]; + uint64 tot_reg_count = 0; + for (int i = 0; i < 16; i++) { + reg_count_ids[i] = i; + tot_reg_count += reg_count[i]; + } + qsort(reg_count_ids, 16, sizeof(int), reg_count_compare); + uint64 cum_reg_count = 0; + for (int i = 0; i < 16; i++) { + int r = reg_count_ids[i]; + cum_reg_count += reg_count[r]; + printf("%c%d : %16ld %2.1f%% [%2.1f]\n", r < 8 ? 'D' : 'A', r % 8, + reg_count[r], + 100.0*double(reg_count[r])/double(tot_reg_count), + 100.0*double(cum_reg_count)/double(tot_reg_count)); + } +#endif +} + +bool compiler_use_jit(void) +{ + // Check for the "jit" prefs item + if (!PrefsFindBool("jit")) + return false; + + // Don't use JIT if translation cache size is less then MIN_CACHE_SIZE KB + if (PrefsFindInt32("jitcachesize") < MIN_CACHE_SIZE) { + write_log(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); + return false; + } + + // Enable JIT for 68020+ emulation only + if (CPUType < 2) { + write_log(" : JIT is not supported in 680%d0 emulation mode, disabling.\n", CPUType); + return false; + } + + return true; +} + +void init_comp(void) +{ + int i; + uae_s8* cb=can_byte; + uae_s8* cw=can_word; + uae_s8* au=always_used; + +#if RECORD_REGISTER_USAGE + for (i=0;i<16;i++) + reg_count_local[i] = 0; +#endif + + for (i=0;i= (uintptr)ROMBaseHost) && (addr < (uintptr)ROMBaseHost + ROMSize)); +} + +static void flush_all(void) +{ + int i; + + log_flush(); + for (i=0;i0) + free_nreg(i); + + for (i=0;i0) + f_free_nreg(i); + + live.flags_in_flags=TRASH; /* Note: We assume we already rescued the + flags at the very start of the call_r + functions! */ +} + +/******************************************************************** + * Memory access and related functions, CREATE time * + ********************************************************************/ + +void register_branch(uae_u32 not_taken, uae_u32 taken, uae_u8 cond) +{ + next_pc_p=not_taken; + taken_pc_p=taken; + branch_cc=cond; +} + + +static uae_u32 get_handler_address(uae_u32 addr) +{ + uae_u32 cl=cacheline(addr); + blockinfo* bi=get_blockinfo_addr_new((void*)(uintptr)addr,0); + return (uintptr)&(bi->direct_handler_to_use); +} + +static uae_u32 get_handler(uae_u32 addr) +{ + uae_u32 cl=cacheline(addr); + blockinfo* bi=get_blockinfo_addr_new((void*)(uintptr)addr,0); + return (uintptr)bi->direct_handler_to_use; +} + +static void load_handler(int reg, uae_u32 addr) +{ + mov_l_rm(reg,get_handler_address(addr)); +} + +/* This version assumes that it is writing *real* memory, and *will* fail + * if that assumption is wrong! No branches, no second chances, just + * straight go-for-it attitude */ + +static void writemem_real(int address, int source, int size, int tmp, int clobber) +{ + int f=tmp; + + if (clobber) + f=source; + + switch(size) { + case 1: mov_b_bRr(address,source,MEMBaseDiff); break; + case 2: mov_w_rr(f,source); bswap_16(f); mov_w_bRr(address,f,MEMBaseDiff); break; + case 4: mov_l_rr(f,source); bswap_32(f); mov_l_bRr(address,f,MEMBaseDiff); break; + } + forget_about(tmp); + forget_about(f); +} + +void writebyte(int address, int source, int tmp) +{ + writemem_real(address,source,1,tmp,0); +} + +static __inline__ void writeword_general(int address, int source, int tmp, + int clobber) +{ + writemem_real(address,source,2,tmp,clobber); +} + +void writeword_clobber(int address, int source, int tmp) +{ + writeword_general(address,source,tmp,1); +} + +void writeword(int address, int source, int tmp) +{ + writeword_general(address,source,tmp,0); +} + +static __inline__ void writelong_general(int address, int source, int tmp, + int clobber) +{ + writemem_real(address,source,4,tmp,clobber); +} + +void writelong_clobber(int address, int source, int tmp) +{ + writelong_general(address,source,tmp,1); +} + +void writelong(int address, int source, int tmp) +{ + writelong_general(address,source,tmp,0); +} + + + +/* This version assumes that it is reading *real* memory, and *will* fail + * if that assumption is wrong! No branches, no second chances, just + * straight go-for-it attitude */ + +static void readmem_real(int address, int dest, int size, int tmp) +{ + int f=tmp; + + if (size==4 && address!=dest) + f=dest; + + switch(size) { + case 1: mov_b_brR(dest,address,MEMBaseDiff); break; + case 2: mov_w_brR(dest,address,MEMBaseDiff); bswap_16(dest); break; + case 4: mov_l_brR(dest,address,MEMBaseDiff); bswap_32(dest); break; + } + forget_about(tmp); +} + +void readbyte(int address, int dest, int tmp) +{ + readmem_real(address,dest,1,tmp); +} + +void readword(int address, int dest, int tmp) +{ + readmem_real(address,dest,2,tmp); +} + +void readlong(int address, int dest, int tmp) +{ + readmem_real(address,dest,4,tmp); +} + +void get_n_addr(int address, int dest, int tmp) +{ + // a is the register containing the virtual address + // after the offset had been fetched + int a=tmp; + + // f is the register that will contain the offset + int f=tmp; + + // a == f == tmp if (address == dest) + if (address!=dest) { + a=address; + f=dest; + } + +#if REAL_ADDRESSING + mov_l_rr(dest, address); +#elif DIRECT_ADDRESSING + lea_l_brr(dest,address,MEMBaseDiff); +#endif + forget_about(tmp); +} + +void get_n_addr_jmp(int address, int dest, int tmp) +{ + /* For this, we need to get the same address as the rest of UAE + would --- otherwise we end up translating everything twice */ + get_n_addr(address,dest,tmp); +} + + +/* base is a register, but dp is an actual value. + target is a register, as is tmp */ +void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp) +{ + int reg = (dp >> 12) & 15; + int regd_shift=(dp >> 9) & 3; + + if (dp & 0x100) { + int ignorebase=(dp&0x80); + int ignorereg=(dp&0x40); + int addbase=0; + int outer=0; + + if ((dp & 0x30) == 0x20) addbase = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + if ((dp & 0x30) == 0x30) addbase = comp_get_ilong((m68k_pc_offset+=4)-4); + + if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)comp_get_iword((m68k_pc_offset+=2)-2); + if ((dp & 0x3) == 0x3) outer = comp_get_ilong((m68k_pc_offset+=4)-4); + + if ((dp & 0x4) == 0) { /* add regd *before* the get_long */ + if (!ignorereg) { + if ((dp & 0x800) == 0) + sign_extend_16_rr(target,reg); + else + mov_l_rr(target,reg); + shll_l_ri(target,regd_shift); + } + else + mov_l_ri(target,0); + + /* target is now regd */ + if (!ignorebase) + add_l(target,base); + add_l_ri(target,addbase); + if (dp&0x03) readlong(target,target,tmp); + } else { /* do the getlong first, then add regd */ + if (!ignorebase) { + mov_l_rr(target,base); + add_l_ri(target,addbase); + } + else + mov_l_ri(target,addbase); + if (dp&0x03) readlong(target,target,tmp); + + if (!ignorereg) { + if ((dp & 0x800) == 0) + sign_extend_16_rr(tmp,reg); + else + mov_l_rr(tmp,reg); + shll_l_ri(tmp,regd_shift); + /* tmp is now regd */ + add_l(target,tmp); + } + } + add_l_ri(target,outer); + } + else { /* 68000 version */ + if ((dp & 0x800) == 0) { /* Sign extend */ + sign_extend_16_rr(target,reg); + lea_l_brr_indexed(target,base,target,1<= CODE_ALLOC_MAX_ATTEMPTS) + return NULL; + + return do_alloc_code(size, depth + 1); +#else + uint8 *code = (uint8 *)vm_acquire(size); + return code == VM_MAP_FAILED ? NULL : code; +#endif +} + +static inline uint8 *alloc_code(uint32 size) +{ + uint8 *ptr = do_alloc_code(size, 0); + /* allocated code must fit in 32-bit boundaries */ + assert((uintptr)ptr <= 0xffffffff); + return ptr; +} + +void alloc_cache(void) +{ + if (compiled_code) { + flush_icache_hard(6); + vm_release(compiled_code, cache_size * 1024); + compiled_code = 0; + } + + if (cache_size == 0) + return; + + while (!compiled_code && cache_size) { + if ((compiled_code = alloc_code(cache_size * 1024)) == NULL) { + compiled_code = 0; + cache_size /= 2; + } + } + vm_protect(compiled_code, cache_size * 1024, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); + + if (compiled_code) { + write_log(" : actual translation cache size : %d KB at 0x%08X\n", cache_size, compiled_code); + max_compile_start = compiled_code + cache_size*1024 - BYTES_PER_INST; + current_compile_p = compiled_code; + current_cache_size = 0; + } +} + + + +extern void op_illg_1 (uae_u32 opcode) REGPARAM; + +static void calc_checksum(blockinfo* bi, uae_u32* c1, uae_u32* c2) +{ + uae_u32 k1 = 0; + uae_u32 k2 = 0; + +#if USE_CHECKSUM_INFO + checksum_info *csi = bi->csi; + Dif(!csi) abort(); + while (csi) { + uae_s32 len = csi->length; + uintptr tmp = (uintptr)csi->start_p; +#else + uae_s32 len = bi->len; + uintptr tmp = (uintptr)bi->min_pcp; +#endif + uae_u32*pos; + + len += (tmp & 3); + tmp &= ~((uintptr)3); + pos = (uae_u32 *)tmp; + + if (len >= 0 && len <= MAX_CHECKSUM_LEN) { + while (len > 0) { + k1 += *pos; + k2 ^= *pos; + pos++; + len -= 4; + } + } + +#if USE_CHECKSUM_INFO + csi = csi->next; + } +#endif + + *c1 = k1; + *c2 = k2; +} + +#if 0 +static void show_checksum(CSI_TYPE* csi) +{ + uae_u32 k1=0; + uae_u32 k2=0; + uae_s32 len=CSI_LENGTH(csi); + uae_u32 tmp=(uintptr)CSI_STARTcsi + uae_u32* pos; + + len+=(tmp&3); + tmp&=(~3); + pos=(uae_u32*)tmp; + + if (len<0 || len>MAX_CHECKSUM_LEN) { + return; + } + else { + while (len>0) { + write_log("%08x ",*pos); + pos++; + len-=4; + } + write_log(" bla\n"); + } +} +#endif + + +int check_for_cache_miss(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + + if (bi) { + int cl=cacheline(regs.pc_p); + if (bi!=cache_tags[cl+1].bi) { + raise_in_cl_list(bi); + return 1; + } + } + return 0; +} + + +static void recompile_block(void) +{ + /* An existing block's countdown code has expired. We need to make + sure that execute_normal doesn't refuse to recompile due to a + perceived cache miss... */ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + + Dif (!bi) + abort(); + raise_in_cl_list(bi); + execute_normal(); + return; +} +static void cache_miss(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + uae_u32 cl=cacheline(regs.pc_p); + blockinfo* bi2=get_blockinfo(cl); + + if (!bi) { + execute_normal(); /* Compile this block now */ + return; + } + Dif (!bi2 || bi==bi2) { + write_log("Unexplained cache miss %p %p\n",bi,bi2); + abort(); + } + raise_in_cl_list(bi); + return; +} + +static int called_check_checksum(blockinfo* bi); + +static inline int block_check_checksum(blockinfo* bi) +{ + uae_u32 c1,c2; + bool isgood; + + if (bi->status!=BI_NEED_CHECK) + return 1; /* This block is in a checked state */ + + checksum_count++; + + if (bi->c1 || bi->c2) + calc_checksum(bi,&c1,&c2); + else { + c1=c2=1; /* Make sure it doesn't match */ + } + + isgood=(c1==bi->c1 && c2==bi->c2); + + if (isgood) { + /* This block is still OK. So we reactivate. Of course, that + means we have to move it into the needs-to-be-flushed list */ + bi->handler_to_use=bi->handler; + set_dhtu(bi,bi->direct_handler); + bi->status=BI_CHECKING; + isgood=called_check_checksum(bi) != 0; + } + if (isgood) { + /* write_log("reactivate %p/%p (%x %x/%x %x)\n",bi,bi->pc_p, + c1,c2,bi->c1,bi->c2);*/ + remove_from_list(bi); + add_to_active(bi); + raise_in_cl_list(bi); + bi->status=BI_ACTIVE; + } + else { + /* This block actually changed. We need to invalidate it, + and set it up to be recompiled */ + /* write_log("discard %p/%p (%x %x/%x %x)\n",bi,bi->pc_p, + c1,c2,bi->c1,bi->c2); */ + invalidate_block(bi); + raise_in_cl_list(bi); + } + return isgood; +} + +static int called_check_checksum(blockinfo* bi) +{ + dependency* x=bi->deplist; + int isgood=1; + int i; + + for (i=0;i<2 && isgood;i++) { + if (bi->dep[i].jmp_off) { + isgood=block_check_checksum(bi->dep[i].target); + } + } + return isgood; +} + +static void check_checksum(void) +{ + blockinfo* bi=get_blockinfo_addr(regs.pc_p); + uae_u32 cl=cacheline(regs.pc_p); + blockinfo* bi2=get_blockinfo(cl); + + /* These are not the droids you are looking for... */ + if (!bi) { + /* Whoever is the primary target is in a dormant state, but + calling it was accidental, and we should just compile this + new block */ + execute_normal(); + return; + } + if (bi!=bi2) { + /* The block was hit accidentally, but it does exist. Cache miss */ + cache_miss(); + return; + } + + if (!block_check_checksum(bi)) + execute_normal(); +} + +static __inline__ void match_states(blockinfo* bi) +{ + int i; + smallstate* s=&(bi->env); + + if (bi->status==BI_NEED_CHECK) { + block_check_checksum(bi); + } + if (bi->status==BI_ACTIVE || + bi->status==BI_FINALIZING) { /* Deal with the *promises* the + block makes (about not using + certain vregs) */ + for (i=0;i<16;i++) { + if (s->virt[i]==L_UNNEEDED) { + // write_log("unneeded reg %d at %p\n",i,target); + COMPCALL(forget_about)(i); // FIXME + } + } + } + flush(1); + + /* And now deal with the *demands* the block makes */ + for (i=0;inat[i]; + if (v>=0) { + // printf("Loading reg %d into %d at %p\n",v,i,target); + readreg_specific(v,4,i); + // do_load_reg(i,v); + // setlock(i); + } + } + for (i=0;inat[i]; + if (v>=0) { + unlock2(i); + } + } +} + +static __inline__ void create_popalls(void) +{ + int i,r; + + if ((popallspace = alloc_code(POPALLSPACE_SIZE)) == NULL) { + write_log("FATAL: Could not allocate popallspace!\n"); + abort(); + } + vm_protect(popallspace, POPALLSPACE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE); + + int stack_space = STACK_OFFSET; + for (i=0;idirect_pen=(cpuop_func *)get_target(); + raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); + raw_mov_l_mr((uintptr)®s.pc_p,0); + raw_jmp((uintptr)popall_execute_normal); + + align_target(align_jumps); + bi->direct_pcc=(cpuop_func *)get_target(); + raw_mov_l_rm(0,(uintptr)&(bi->pc_p)); + raw_mov_l_mr((uintptr)®s.pc_p,0); + raw_jmp((uintptr)popall_check_checksum); + current_compile_p=get_target(); + + bi->deplist=NULL; + for (i=0;i<2;i++) { + bi->dep[i].prev_p=NULL; + bi->dep[i].next=NULL; + } + bi->env=default_ss; + bi->status=BI_INVALID; + bi->havestate=0; + //bi->env=empty_ss; +} + +// OPCODE is in big endian format, use cft_map() beforehand, if needed. +static inline void reset_compop(int opcode) +{ + compfunctbl[opcode] = NULL; + nfcompfunctbl[opcode] = NULL; +} + +static int read_opcode(const char *p) +{ + int opcode = 0; + for (int i = 0; i < 4; i++) { + int op = p[i]; + switch (op) { + case '0': case '1': case '2': case '3': case '4': + case '5': case '6': case '7': case '8': case '9': + opcode = (opcode << 4) | (op - '0'); + break; + case 'a': case 'b': case 'c': case 'd': case 'e': case 'f': + opcode = (opcode << 4) | ((op - 'a') + 10); + break; + case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': + opcode = (opcode << 4) | ((op - 'A') + 10); + break; + default: + return -1; + } + } + return opcode; +} + +static bool merge_blacklist() +{ + const char *blacklist = PrefsFindString("jitblacklist"); + if (blacklist) { + const char *p = blacklist; + for (;;) { + if (*p == 0) + return true; + + int opcode1 = read_opcode(p); + if (opcode1 < 0) + return false; + p += 4; + + int opcode2 = opcode1; + if (*p == '-') { + p++; + opcode2 = read_opcode(p); + if (opcode2 < 0) + return false; + p += 4; + } + + if (*p == 0 || *p == ',' || *p == ';') { + write_log(" : blacklist opcodes : %04x-%04x\n", opcode1, opcode2); + for (int opcode = opcode1; opcode <= opcode2; opcode++) + reset_compop(cft_map(opcode)); + + if (*p == ',' || *p++ == ';') + continue; + + return true; + } + + return false; + } + } + return true; +} + +void build_comp(void) +{ + int i; + int jumpcount=0; + unsigned long opcode; + struct comptbl* tbl=op_smalltbl_0_comp_ff; + struct comptbl* nftbl=op_smalltbl_0_comp_nf; + int count; + unsigned int cpu_level = 0; // 68000 (default) + if (CPUType == 4) + cpu_level = 4; // 68040 with FPU + else { + if (FPUType) + cpu_level = 3; // 68020 with FPU + else if (CPUType >= 2) + cpu_level = 2; // 68020 + else if (CPUType == 1) + cpu_level = 1; + } + struct cputbl *nfctbl = ( + cpu_level == 4 ? op_smalltbl_0_nf + : cpu_level == 3 ? op_smalltbl_1_nf + : cpu_level == 2 ? op_smalltbl_2_nf + : cpu_level == 1 ? op_smalltbl_3_nf + : op_smalltbl_4_nf); + + write_log (" : building compiler function tables\n"); + + for (opcode = 0; opcode < 65536; opcode++) { + reset_compop(opcode); + nfcpufunctbl[opcode] = op_illg_1; + prop[opcode].use_flags = 0x1f; + prop[opcode].set_flags = 0x1f; + prop[opcode].cflow = fl_trap; // ILLEGAL instructions do trap + } + + for (i = 0; tbl[i].opcode < 65536; i++) { + int cflow = table68k[tbl[i].opcode].cflow; + if (follow_const_jumps && (tbl[i].specific & 16)) + cflow = fl_const_jump; + else + cflow &= ~fl_const_jump; + prop[cft_map(tbl[i].opcode)].cflow = cflow; + + int uses_fpu = tbl[i].specific & 32; + if (uses_fpu && avoid_fpu) + compfunctbl[cft_map(tbl[i].opcode)] = NULL; + else + compfunctbl[cft_map(tbl[i].opcode)] = tbl[i].handler; + } + + for (i = 0; nftbl[i].opcode < 65536; i++) { + int uses_fpu = tbl[i].specific & 32; + if (uses_fpu && avoid_fpu) + nfcompfunctbl[cft_map(nftbl[i].opcode)] = NULL; + else + nfcompfunctbl[cft_map(nftbl[i].opcode)] = nftbl[i].handler; + + nfcpufunctbl[cft_map(nftbl[i].opcode)] = nfctbl[i].handler; + } + + for (i = 0; nfctbl[i].handler; i++) { + nfcpufunctbl[cft_map(nfctbl[i].opcode)] = nfctbl[i].handler; + } + + for (opcode = 0; opcode < 65536; opcode++) { + compop_func *f; + compop_func *nff; + cpuop_func *nfcf; + int isaddx,cflow; + + if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) + continue; + + if (table68k[opcode].handler != -1) { + f = compfunctbl[cft_map(table68k[opcode].handler)]; + nff = nfcompfunctbl[cft_map(table68k[opcode].handler)]; + nfcf = nfcpufunctbl[cft_map(table68k[opcode].handler)]; + cflow = prop[cft_map(table68k[opcode].handler)].cflow; + isaddx = prop[cft_map(table68k[opcode].handler)].is_addx; + prop[cft_map(opcode)].cflow = cflow; + prop[cft_map(opcode)].is_addx = isaddx; + compfunctbl[cft_map(opcode)] = f; + nfcompfunctbl[cft_map(opcode)] = nff; + Dif (nfcf == op_illg_1) + abort(); + nfcpufunctbl[cft_map(opcode)] = nfcf; + } + prop[cft_map(opcode)].set_flags = table68k[opcode].flagdead; + prop[cft_map(opcode)].use_flags = table68k[opcode].flaglive; + /* Unconditional jumps don't evaluate condition codes, so they + * don't actually use any flags themselves */ + if (prop[cft_map(opcode)].cflow & fl_const_jump) + prop[cft_map(opcode)].use_flags = 0; + } + for (i = 0; nfctbl[i].handler != NULL; i++) { + if (nfctbl[i].specific) + nfcpufunctbl[cft_map(tbl[i].opcode)] = nfctbl[i].handler; + } + + /* Merge in blacklist */ + if (!merge_blacklist()) + write_log(" : blacklist merge failure!\n"); + + count=0; + for (opcode = 0; opcode < 65536; opcode++) { + if (compfunctbl[cft_map(opcode)]) + count++; + } + write_log(" : supposedly %d compileable opcodes!\n",count); + + /* Initialise state */ + create_popalls(); + alloc_cache(); + reset_lists(); + + for (i=0;ipc_p)].handler=(cpuop_func *)popall_execute_normal; + cache_tags[cacheline(bi->pc_p)+1].bi=NULL; + dbi=bi; bi=bi->next; + free_blockinfo(dbi); + } + bi=dormant; + while(bi) { + cache_tags[cacheline(bi->pc_p)].handler=(cpuop_func *)popall_execute_normal; + cache_tags[cacheline(bi->pc_p)+1].bi=NULL; + dbi=bi; bi=bi->next; + free_blockinfo(dbi); + } + + reset_lists(); + if (!compiled_code) + return; + current_compile_p=compiled_code; + SPCFLAGS_SET( SPCFLAG_JIT_EXEC_RETURN ); /* To get out of compiled code */ +} + + +/* "Soft flushing" --- instead of actually throwing everything away, + we simply mark everything as "needs to be checked". +*/ + +static inline void flush_icache_lazy(int n) +{ + blockinfo* bi; + blockinfo* bi2; + + soft_flush_count++; + if (!active) + return; + + bi=active; + while (bi) { + uae_u32 cl=cacheline(bi->pc_p); + if (bi->status==BI_INVALID || + bi->status==BI_NEED_RECOMP) { + if (bi==cache_tags[cl+1].bi) + cache_tags[cl].handler=(cpuop_func *)popall_execute_normal; + bi->handler_to_use=(cpuop_func *)popall_execute_normal; + set_dhtu(bi,bi->direct_pen); + bi->status=BI_INVALID; + } + else { + if (bi==cache_tags[cl+1].bi) + cache_tags[cl].handler=(cpuop_func *)popall_check_checksum; + bi->handler_to_use=(cpuop_func *)popall_check_checksum; + set_dhtu(bi,bi->direct_pcc); + bi->status=BI_NEED_CHECK; + } + bi2=bi; + bi=bi->next; + } + /* bi2 is now the last entry in the active list */ + bi2->next=dormant; + if (dormant) + dormant->prev_p=&(bi2->next); + + dormant=active; + active->prev_p=&dormant; + active=NULL; +} + +void flush_icache_range(uae_u8 *start_p, uae_u32 length) +{ + if (!active) + return; + +#if LAZY_FLUSH_ICACHE_RANGE + blockinfo *bi = active; + while (bi) { +#if USE_CHECKSUM_INFO + bool candidate = false; + for (checksum_info *csi = bi->csi; csi; csi = csi->next) { + if (((start_p - csi->start_p) < csi->length) || + ((csi->start_p - start_p) < length)) { + candidate = true; + break; + } + } +#else + // Assume system is consistent and would invalidate the right range + const bool candidate = (bi->pc_p - start_p) < length; +#endif + blockinfo *dbi = bi; + bi = bi->next; + if (candidate) { + uae_u32 cl = cacheline(dbi->pc_p); + if (dbi->status == BI_INVALID || dbi->status == BI_NEED_RECOMP) { + if (dbi == cache_tags[cl+1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_execute_normal; + dbi->handler_to_use = (cpuop_func *)popall_execute_normal; + set_dhtu(dbi, dbi->direct_pen); + dbi->status = BI_INVALID; + } + else { + if (dbi == cache_tags[cl+1].bi) + cache_tags[cl].handler = (cpuop_func *)popall_check_checksum; + dbi->handler_to_use = (cpuop_func *)popall_check_checksum; + set_dhtu(dbi, dbi->direct_pcc); + dbi->status = BI_NEED_CHECK; + } + remove_from_list(dbi); + add_to_dormant(dbi); + } + } + return; +#endif + flush_icache(-1); +} + +static void catastrophe(void) +{ + abort(); +} + +int failure; + +#define TARGET_M68K 0 +#define TARGET_POWERPC 1 +#define TARGET_X86 2 +#define TARGET_X86_64 3 +#if defined(i386) || defined(__i386__) +#define TARGET_NATIVE TARGET_X86 +#endif +#if defined(powerpc) || defined(__powerpc__) +#define TARGET_NATIVE TARGET_POWERPC +#endif +#if defined(x86_64) || defined(__x86_64__) +#define TARGET_NATIVE TARGET_X86_64 +#endif + +#ifdef ENABLE_MON +static uae_u32 mon_read_byte_jit(uintptr addr) +{ + uae_u8 *m = (uae_u8 *)addr; + return (uintptr)(*m); +} + +static void mon_write_byte_jit(uintptr addr, uae_u32 b) +{ + uae_u8 *m = (uae_u8 *)addr; + *m = b; +} +#endif + +void disasm_block(int target, uint8 * start, size_t length) +{ + if (!JITDebug) + return; + +#if defined(JIT_DEBUG) && defined(ENABLE_MON) + char disasm_str[200]; + sprintf(disasm_str, "%s $%x $%x", + target == TARGET_M68K ? "d68" : + target == TARGET_X86 ? "d86" : + target == TARGET_X86_64 ? "d8664" : + target == TARGET_POWERPC ? "d" : "x", + start, start + length - 1); + + uae_u32 (*old_mon_read_byte)(uintptr) = mon_read_byte; + void (*old_mon_write_byte)(uintptr, uae_u32) = mon_write_byte; + + mon_read_byte = mon_read_byte_jit; + mon_write_byte = mon_write_byte_jit; + + const char *arg[5] = {"mon", "-m", "-r", disasm_str, NULL}; + mon(4, arg); + + mon_read_byte = old_mon_read_byte; + mon_write_byte = old_mon_write_byte; +#endif +} + +static void disasm_native_block(uint8 *start, size_t length) +{ + disasm_block(TARGET_NATIVE, start, length); +} + +static void disasm_m68k_block(uint8 *start, size_t length) +{ + disasm_block(TARGET_M68K, start, length); +} + +#ifdef HAVE_GET_WORD_UNSWAPPED +# define DO_GET_OPCODE(a) (do_get_mem_word_unswapped((uae_u16 *)(a))) +#else +# define DO_GET_OPCODE(a) (do_get_mem_word((uae_u16 *)(a))) +#endif + +#if JIT_DEBUG +static uae_u8 *last_regs_pc_p = 0; +static uae_u8 *last_compiled_block_addr = 0; + +void compiler_dumpstate(void) +{ + if (!JITDebug) + return; + + write_log("### Host addresses\n"); + write_log("MEM_BASE : %x\n", MEMBaseDiff); + write_log("PC_P : %p\n", ®s.pc_p); + write_log("SPCFLAGS : %p\n", ®s.spcflags); + write_log("D0-D7 : %p-%p\n", ®s.regs[0], ®s.regs[7]); + write_log("A0-A7 : %p-%p\n", ®s.regs[8], ®s.regs[15]); + write_log("\n"); + + write_log("### M68k processor state\n"); + m68k_dumpstate(0); + write_log("\n"); + + write_log("### Block in Mac address space\n"); + write_log("M68K block : %p\n", + (void *)(uintptr)get_virtual_address(last_regs_pc_p)); + write_log("Native block : %p (%d bytes)\n", + (void *)(uintptr)get_virtual_address(last_compiled_block_addr), + get_blockinfo_addr(last_regs_pc_p)->direct_handler_size); + write_log("\n"); +} +#endif + +static void compile_block(cpu_history* pc_hist, int blocklen) +{ + if (letit && compiled_code) { +#if PROFILE_COMPILE_TIME + compile_count++; + clock_t start_time = clock(); +#endif +#if JIT_DEBUG + bool disasm_block = false; +#endif + + /* OK, here we need to 'compile' a block */ + int i; + int r; + int was_comp=0; + uae_u8 liveflags[MAXRUN+1]; +#if USE_CHECKSUM_INFO + bool trace_in_rom = isinrom((uintptr)pc_hist[0].location); + uintptr max_pcp=(uintptr)pc_hist[blocklen - 1].location; + uintptr min_pcp=max_pcp; +#else + uintptr max_pcp=(uintptr)pc_hist[0].location; + uintptr min_pcp=max_pcp; +#endif + uae_u32 cl=cacheline(pc_hist[0].location); + void* specflags=(void*)®s.spcflags; + blockinfo* bi=NULL; + blockinfo* bi2; + int extra_len=0; + + redo_current_block=0; + if (current_compile_p>=max_compile_start) + flush_icache_hard(7); + + alloc_blockinfos(); + + bi=get_blockinfo_addr_new(pc_hist[0].location,0); + bi2=get_blockinfo(cl); + + optlev=bi->optlevel; + if (bi->status!=BI_INVALID) { + Dif (bi!=bi2) { + /* I don't think it can happen anymore. Shouldn't, in + any case. So let's make sure... */ + write_log("WOOOWOO count=%d, ol=%d %p %p\n", + bi->count,bi->optlevel,bi->handler_to_use, + cache_tags[cl].handler); + abort(); + } + + Dif (bi->count!=-1 && bi->status!=BI_NEED_RECOMP) { + write_log("bi->count=%d, bi->status=%d\n",bi->count,bi->status); + /* What the heck? We are not supposed to be here! */ + abort(); + } + } + if (bi->count==-1) { + optlev++; + while (!optcount[optlev]) + optlev++; + bi->count=optcount[optlev]-1; + } + current_block_pc_p=(uintptr)pc_hist[0].location; + + remove_deps(bi); /* We are about to create new code */ + bi->optlevel=optlev; + bi->pc_p=(uae_u8*)pc_hist[0].location; +#if USE_CHECKSUM_INFO + free_checksum_info_chain(bi->csi); + bi->csi = NULL; +#endif + + liveflags[blocklen]=0x1f; /* All flags needed afterwards */ + i=blocklen; + while (i--) { + uae_u16* currpcp=pc_hist[i].location; + uae_u32 op=DO_GET_OPCODE(currpcp); + +#if USE_CHECKSUM_INFO + trace_in_rom = trace_in_rom && isinrom((uintptr)currpcp); + if (follow_const_jumps && is_const_jump(op)) { + checksum_info *csi = alloc_checksum_info(); + csi->start_p = (uae_u8 *)min_pcp; + csi->length = max_pcp - min_pcp + LONGEST_68K_INST; + csi->next = bi->csi; + bi->csi = csi; + max_pcp = (uintptr)currpcp; + } + min_pcp = (uintptr)currpcp; +#else + if ((uintptr)currpcpmax_pcp) + max_pcp=(uintptr)currpcp; +#endif + + liveflags[i]=((liveflags[i+1]& + (~prop[op].set_flags))| + prop[op].use_flags); + if (prop[op].is_addx && (liveflags[i+1]&FLAG_Z)==0) + liveflags[i]&= ~FLAG_Z; + } + +#if USE_CHECKSUM_INFO + checksum_info *csi = alloc_checksum_info(); + csi->start_p = (uae_u8 *)min_pcp; + csi->length = max_pcp - min_pcp + LONGEST_68K_INST; + csi->next = bi->csi; + bi->csi = csi; +#endif + + bi->needed_flags=liveflags[0]; + + align_target(align_loops); + was_comp=0; + + bi->direct_handler=(cpuop_func *)get_target(); + set_dhtu(bi,bi->direct_handler); + bi->status=BI_COMPILING; + current_block_start_target=(uintptr)get_target(); + + log_startblock(); + + if (bi->count>=0) { /* Need to generate countdown code */ + raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + raw_sub_l_mi((uintptr)&(bi->count),1); + raw_jl((uintptr)popall_recompile_block); + } + if (optlev==0) { /* No need to actually translate */ + /* Execute normally without keeping stats */ + raw_mov_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + raw_jmp((uintptr)popall_exec_nostats); + } + else { + reg_alloc_run=0; + next_pc_p=0; + taken_pc_p=0; + branch_cc=0; + + comp_pc_p=(uae_u8*)pc_hist[0].location; + init_comp(); + was_comp=1; + +#ifdef USE_CPU_EMUL_SERVICES + raw_sub_l_mi((uintptr)&emulated_ticks,blocklen); + raw_jcc_b_oponly(NATIVE_CC_GT); + uae_s8 *branchadd=(uae_s8*)get_target(); + emit_byte(0); + raw_call((uintptr)cpu_do_check_ticks); + *branchadd=(uintptr)get_target()-((uintptr)branchadd+1); +#endif + +#if JIT_DEBUG + if (JITDebug) { + raw_mov_l_mi((uintptr)&last_regs_pc_p,(uintptr)pc_hist[0].location); + raw_mov_l_mi((uintptr)&last_compiled_block_addr,current_block_start_target); + } +#endif + + for (i=0;i1) { + failure=0; + if (!was_comp) { + comp_pc_p=(uae_u8*)pc_hist[i].location; + init_comp(); + } + was_comp=1; + + comptbl[opcode](opcode); + freescratch(); + if (!(liveflags[i+1] & FLAG_CZNV)) { + /* We can forget about flags */ + dont_care_flags(); + } +#if INDIVIDUAL_INST + flush(1); + nop(); + flush(1); + was_comp=0; +#endif + } + + if (failure) { + if (was_comp) { + flush(1); + was_comp=0; + } + raw_mov_l_ri(REG_PAR1,(uae_u32)opcode); +#if USE_NORMAL_CALLING_CONVENTION + raw_push_l_r(REG_PAR1); +#endif + raw_mov_l_mi((uintptr)®s.pc_p, + (uintptr)pc_hist[i].location); + raw_call((uintptr)cputbl[opcode]); +#if PROFILE_UNTRANSLATED_INSNS + // raw_cputbl_count[] is indexed with plain opcode (in m68k order) + raw_add_l_mi((uintptr)&raw_cputbl_count[cft_map(opcode)],1); +#endif +#if USE_NORMAL_CALLING_CONVENTION + raw_inc_sp(4); +#endif + + if (i < blocklen - 1) { + uae_s8* branchadd; + + raw_mov_l_rm(0,(uintptr)specflags); + raw_test_l_rr(0,0); + raw_jz_b_oponly(); + branchadd=(uae_s8 *)get_target(); + emit_byte(0); + raw_jmp((uintptr)popall_do_nothing); + *branchadd=(uintptr)get_target()-(uintptr)branchadd-1; + } + } + } +#if 1 /* This isn't completely kosher yet; It really needs to be + be integrated into a general inter-block-dependency scheme */ + if (next_pc_p && taken_pc_p && + was_comp && taken_pc_p==current_block_pc_p) { + blockinfo* bi1=get_blockinfo_addr_new((void*)next_pc_p,0); + blockinfo* bi2=get_blockinfo_addr_new((void*)taken_pc_p,0); + uae_u8 x=bi1->needed_flags; + + if (x==0xff || 1) { /* To be on the safe side */ + uae_u16* next=(uae_u16*)next_pc_p; + uae_u32 op=DO_GET_OPCODE(next); + + x=0x1f; + x&=(~prop[op].set_flags); + x|=prop[op].use_flags; + } + + x|=bi2->needed_flags; + if (!(x & FLAG_CZNV)) { + /* We can forget about flags */ + dont_care_flags(); + extra_len+=2; /* The next instruction now is part of this + block */ + } + + } +#endif + log_flush(); + + if (next_pc_p) { /* A branch was registered */ + uintptr t1=next_pc_p; + uintptr t2=taken_pc_p; + int cc=branch_cc; + + uae_u32* branchadd; + uae_u32* tba; + bigstate tmp; + blockinfo* tbi; + + if (taken_pc_penv))) { + mark_callers_recompile(bi); + } + + big_to_small_state(&live,&(bi->env)); +#endif + +#if USE_CHECKSUM_INFO + remove_from_list(bi); + if (trace_in_rom) { + // No need to checksum that block trace on cache invalidation + free_checksum_info_chain(bi->csi); + bi->csi = NULL; + add_to_dormant(bi); + } + else { + calc_checksum(bi,&(bi->c1),&(bi->c2)); + add_to_active(bi); + } +#else + if (next_pc_p+extra_len>=max_pcp && + next_pc_p+extra_lenlen=max_pcp-min_pcp; + bi->min_pcp=min_pcp; + + remove_from_list(bi); + if (isinrom(min_pcp) && isinrom(max_pcp)) { + add_to_dormant(bi); /* No need to checksum it on cache flush. + Please don't start changing ROMs in + flight! */ + } + else { + calc_checksum(bi,&(bi->c1),&(bi->c2)); + add_to_active(bi); + } +#endif + + current_cache_size += get_target() - (uae_u8 *)current_compile_p; + +#if JIT_DEBUG + if (JITDebug) + bi->direct_handler_size = get_target() - (uae_u8 *)current_block_start_target; + + if (JITDebug && disasm_block) { + uaecptr block_addr = start_pc + ((char *)pc_hist[0].location - (char *)start_pc_p); + D(bug("M68K block @ 0x%08x (%d insns)\n", block_addr, blocklen)); + uae_u32 block_size = ((uae_u8 *)pc_hist[blocklen - 1].location - (uae_u8 *)pc_hist[0].location) + 1; + disasm_m68k_block((uae_u8 *)pc_hist[0].location, block_size); + D(bug("Compiled block @ 0x%08x\n", pc_hist[0].location)); + disasm_native_block((uae_u8 *)current_block_start_target, bi->direct_handler_size); + getchar(); + } +#endif + + log_dump(); + align_target(align_jumps); + + /* This is the non-direct handler */ + bi->handler= + bi->handler_to_use=(cpuop_func *)get_target(); + raw_cmp_l_mi((uintptr)®s.pc_p,(uintptr)pc_hist[0].location); + raw_jnz((uintptr)popall_cache_miss); + comp_pc_p=(uae_u8*)pc_hist[0].location; + + bi->status=BI_FINALIZING; + init_comp(); + match_states(bi); + flush(1); + + raw_jmp((uintptr)bi->direct_handler); + + current_compile_p=get_target(); + raise_in_cl_list(bi); + + /* We will flush soon, anyway, so let's do it now */ + if (current_compile_p>=max_compile_start) + flush_icache_hard(7); + + bi->status=BI_ACTIVE; + if (redo_current_block) + block_need_recompile(bi); + +#if PROFILE_COMPILE_TIME + compile_time += (clock() - start_time); +#endif + } + + /* Account for compilation time */ + cpu_do_check_ticks(); +} + +void do_nothing(void) +{ + /* What did you expect this to do? */ +} + +void exec_nostats(void) +{ + for (;;) { + uae_u32 opcode = GET_OPCODE; +#if FLIGHT_RECORDER + m68k_record_step(m68k_getpc()); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL)) { + return; /* We will deal with the spcflags in the caller */ + } + } +} + +void execute_normal(void) +{ + if (!check_for_cache_miss()) { + cpu_history pc_hist[MAXRUN]; + int blocklen = 0; +#if REAL_ADDRESSING || DIRECT_ADDRESSING + start_pc_p = regs.pc_p; + start_pc = get_virtual_address(regs.pc_p); +#else + start_pc_p = regs.pc_oldp; + start_pc = regs.pc; +#endif + for (;;) { /* Take note: This is the do-it-normal loop */ + pc_hist[blocklen++].location = (uae_u16 *)regs.pc_p; + uae_u32 opcode = GET_OPCODE; +#if FLIGHT_RECORDER + m68k_record_step(m68k_getpc()); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (end_block(opcode) || SPCFLAGS_TEST(SPCFLAG_ALL) || blocklen>=MAXRUN) { + compile_block(pc_hist, blocklen); + return; /* We will deal with the spcflags in the caller */ + } + /* No need to check regs.spcflags, because if they were set, + we'd have ended up inside that "if" */ + } + } +} + +typedef void (*compiled_handler)(void); + +static void m68k_do_compile_execute(void) +{ + for (;;) { + ((compiled_handler)(pushall_call_handler))(); + /* Whenever we return from that, we should check spcflags */ + if (SPCFLAGS_TEST(SPCFLAG_ALL)) { + if (m68k_do_specialties ()) + return; + } + } +} + +void m68k_compile_execute (void) +{ + for (;;) { + if (quit_program) + break; + m68k_do_compile_execute(); + } +} + +#endif //USE_JIT diff --git a/BasiliskII/src/uae_cpu/compiler/flags_x86.h b/BasiliskII/src/uae_cpu/compiler/flags_x86.h new file mode 100644 index 000000000..4247f10a8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/flags_x86.h @@ -0,0 +1,47 @@ +/* + * compiler/flags_x86.h - Native flags definitions for IA-32 + * + * Original 68040 JIT compiler for UAE, copyright 2000-2002 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 NATIVE_FLAGS_X86_H +#define NATIVE_FLAGS_X86_H + +/* Native integer code conditions */ +enum { + NATIVE_CC_HI = 7, + NATIVE_CC_LS = 6, + NATIVE_CC_CC = 3, + NATIVE_CC_CS = 2, + NATIVE_CC_NE = 5, + NATIVE_CC_EQ = 4, + NATIVE_CC_VC = 11, + NATIVE_CC_VS = 10, + NATIVE_CC_PL = 9, + NATIVE_CC_MI = 8, + NATIVE_CC_GE = 13, + NATIVE_CC_LT = 12, + NATIVE_CC_GT = 15, + NATIVE_CC_LE = 14 +}; + +#endif /* NATIVE_FLAGS_X86_H */ diff --git a/BasiliskII/src/uae_cpu/compiler/gencomp.c b/BasiliskII/src/uae_cpu/compiler/gencomp.c new file mode 100644 index 000000000..7055e5818 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/gencomp.c @@ -0,0 +1,3078 @@ +/* + * compiler/gencomp.c - MC680x0 compilation generator + * + * Based on work Copyright 1995, 1996 Bernd Schmidt + * Changes for UAE-JIT Copyright 2000 Bernd Meyer + * + * Adaptation for Basilisk II and improvements, copyright 2000-2005 + * Gwenole Beauchesne + * + * Basilisk II (C) 1997-2005 Christian Bauer + * + * 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 +#include +#include +#include +#include +#include "sysdeps.h" +#include "../readcpu.h" + +#define BOOL_TYPE "int" +#define failure global_failure=1 +#define FAILURE global_failure=1 +#define isjump global_isjump=1 +#define is_const_jump global_iscjump=1; +#define isaddx global_isaddx=1 +#define uses_cmov global_cmov=1 +#define mayfail global_mayfail=1 +#define uses_fpu global_fpu=1 + +int hack_opcode; + +static int global_failure; +static int global_isjump; +static int global_iscjump; +static int global_isaddx; +static int global_cmov; +static int long_opcode; +static int global_mayfail; +static int global_fpu; + +static char endstr[1000]; +static char lines[100000]; +static int comp_index=0; + +static int cond_codes_x86[]={-1,-1,7,6,3,2,5,4,-1,-1,9,8,13,12,15,14}; + +static void comprintf(const char* format, ...) +{ + va_list args; + + va_start(args,format); + comp_index+=vsprintf(lines+comp_index,format,args); +} + +static void com_discard(void) +{ + comp_index=0; +} + +static void com_flush(void) +{ + int i; + for (i=0;i 0); + n_braces--; + comprintf ("}"); +} + +static void +finish_braces (void) +{ + while (n_braces > 0) + close_brace (); +} + +static void +pop_braces (int to) +{ + while (n_braces > to) + close_brace (); +} + +static int +bit_size (int size) +{ + switch (size) + { + case sz_byte: + return 8; + case sz_word: + return 16; + case sz_long: + return 32; + default: + abort (); + } + return 0; +} + +static const char * +bit_mask (int size) +{ + switch (size) + { + case sz_byte: + return "0xff"; + case sz_word: + return "0xffff"; + case sz_long: + return "0xffffffff"; + default: + abort (); + } + return 0; +} + +static __inline__ void gen_update_next_handler(void) +{ + return; /* Can anything clever be done here? */ +} + +static void gen_writebyte(char* address, char* source) +{ + comprintf("\twritebyte(%s,%s,scratchie);\n",address,source); +} + +static void gen_writeword(char* address, char* source) +{ + comprintf("\twriteword(%s,%s,scratchie);\n",address,source); +} + +static void gen_writelong(char* address, char* source) +{ + comprintf("\twritelong(%s,%s,scratchie);\n",address,source); +} + +static void gen_readbyte(char* address, char* dest) +{ + comprintf("\treadbyte(%s,%s,scratchie);\n",address,dest); +} + +static void gen_readword(char* address, char* dest) +{ + comprintf("\treadword(%s,%s,scratchie);\n",address,dest); +} + +static void gen_readlong(char* address, char* dest) +{ + comprintf("\treadlong(%s,%s,scratchie);\n",address,dest); +} + + + +static const char * +gen_nextilong (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)"); + insn_n_cycles += 4; + + long_opcode=1; + return buffer; +} + +static const char * +gen_nextiword (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_iword((m68k_pc_offset+=2)-2)"); + insn_n_cycles+=2; + + long_opcode=1; + return buffer; +} + +static const char * +gen_nextibyte (void) +{ + static char buffer[80]; + + sprintf (buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)"); + insn_n_cycles += 2; + + long_opcode=1; + return buffer; +} + +static void +swap_opcode (void) +{ + comprintf("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + comprintf("\topcode = do_byteswap_16(opcode);\n"); + comprintf("#endif\n"); +} + +static void +sync_m68k_pc (void) +{ + comprintf("\t if (m68k_pc_offset>100) sync_m68k_pc();\n"); +} + + +/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, + * the calling routine handles Apdi and Aipi modes. + * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ +static void +genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) +{ + start_brace (); + switch (mode) + { + case Dreg: /* Do we need to check dodgy here? */ + if (movem) + abort (); + if (getv == 1 || getv==2) { + /* We generate the variable even for getv==2, so we can use + it as a destination for MOVE */ + comprintf ("\tint %s=%s;\n",name,reg); + } + return; + + case Areg: + if (movem) + abort (); + if (getv == 1 || getv==2) { + /* see above */ + comprintf ("\tint %s=dodgy?scratchie++:%s+8;\n",name,reg); + if (getv==1) { + comprintf ("\tif (dodgy) \n"); + comprintf ("\t\tmov_l_rr(%s,%s+8);\n",name, reg); + } + } + return; + + case Aind: + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf ("\tif (dodgy) \n"); + comprintf ("\t\tmov_l_rr(%sa,%s+8);\n",name, reg); + break; + case Aipi: + comprintf ("\tint %sa=scratchie++;\n",name,reg); + comprintf ("\tmov_l_rr(%sa,%s+8);\n",name, reg); + break; + case Apdi: + switch (size) + { + case sz_byte: + if (movem) { + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + else { + start_brace(); + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf("\tlea_l_brr(%s+8,%s+8,(uae_s32)-areg_byteinc[%s]);\n",reg,reg,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + break; + case sz_word: + if (movem) { + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + else { + start_brace(); + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf("\tlea_l_brr(%s+8,%s+8,-2);\n",reg,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + break; + case sz_long: + if (movem) { + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + else { + start_brace(); + comprintf ("\tint %sa=dodgy?scratchie++:%s+8;\n",name,reg); + comprintf("\tlea_l_brr(%s+8,%s+8,-4);\n",reg,reg); + comprintf ("\tif (dodgy) \n"); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + } + break; + default: + abort (); + } + break; + case Ad16: + comprintf("\tint %sa=scratchie++;\n",name); + comprintf("\tmov_l_rr(%sa,8+%s);\n",name,reg); + comprintf("\tlea_l_brr(%sa,%sa,(uae_s32)(uae_s16)%s);\n",name,name,gen_nextiword()); + break; + case Ad8r: + comprintf("\tint %sa=scratchie++;\n",name); + comprintf("\tcalc_disp_ea_020(%s+8,%s,%sa,scratchie);\n", + reg,gen_nextiword(),name); + break; + + case PC16: + comprintf("\tint %sa=scratchie++;\n",name); + comprintf("\tuae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf ("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); + comprintf("\tmov_l_ri(%sa,address+PC16off);\n",name); + break; + + case PC8r: + comprintf("\tint pctmp=scratchie++;\n"); + comprintf("\tint %sa=scratchie++;\n",name); + comprintf("\tuae_u32 address=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + start_brace(); + comprintf("\tmov_l_ri(pctmp,address);\n"); + + comprintf("\tcalc_disp_ea_020(pctmp,%s,%sa,scratchie);\n", + gen_nextiword(),name); + break; + case absw: + comprintf ("\tint %sa = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%sa,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); + break; + case absl: + comprintf ("\tint %sa = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%sa,%s); /* absl */\n", name, gen_nextilong ()); + break; + case imm: + if (getv != 1) + abort (); + switch (size) + { + case sz_byte: + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s8)%s);\n", name, gen_nextibyte ()); + break; + case sz_word: + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); + break; + case sz_long: + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,%s);\n", name, gen_nextilong ()); + break; + default: + abort (); + } + return; + case imm0: + if (getv != 1) + abort (); + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s8)%s);\n", name, gen_nextibyte ()); + return; + case imm1: + if (getv != 1) + abort (); + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,(uae_s32)(uae_s16)%s);\n", name, gen_nextiword ()); + return; + case imm2: + if (getv != 1) + abort (); + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,%s);\n", name, gen_nextilong ()); + return; + case immi: + if (getv != 1) + abort (); + comprintf ("\tint %s = scratchie++;\n",name); + comprintf ("\tmov_l_ri(%s,%s);\n", name, reg); + return; + default: + abort (); + } + + /* We get here for all non-reg non-immediate addressing modes to + * actually fetch the value. */ + if (getv == 1) + { + char astring[80]; + sprintf(astring,"%sa",name); + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + break; + case sz_word: + insn_n_cycles += 2; + break; + case sz_long: + insn_n_cycles += 4; + break; + default: + abort (); + } + start_brace (); + comprintf("\tint %s=scratchie++;\n",name); + switch (size) + { + case sz_byte: + gen_readbyte(astring,name); + break; + case sz_word: + gen_readword(astring,name); + break; + case sz_long: + gen_readlong(astring,name); + break; + default: + abort (); + } + } + + /* We now might have to fix up the register for pre-dec or post-inc + * addressing modes. */ + if (!movem) { + switch (mode) + { + case Aipi: + switch (size) + { + case sz_byte: + comprintf("\tlea_l_brr(%s+8,%s+8,areg_byteinc[%s]);\n",reg,reg,reg); + break; + case sz_word: + comprintf("\tlea_l_brr(%s+8,%s+8,2);\n",reg,reg,reg); + break; + case sz_long: + comprintf("\tlea_l_brr(%s+8,%s+8,4);\n",reg,reg); + break; + default: + abort (); + } + break; + case Apdi: + break; + default: + break; + } + } +} + +static void +genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) +{ + switch (mode) + { + case Dreg: + switch (size) + { + case sz_byte: + comprintf("\tif(%s!=%s)\n",reg,from); + comprintf ("\t\tmov_b_rr(%s,%s);\n", reg, from); + break; + case sz_word: + comprintf("\tif(%s!=%s)\n",reg,from); + comprintf ("\t\tmov_w_rr(%s,%s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s!=%s)\n",reg,from); + comprintf ("\t\tmov_l_rr(%s,%s);\n", reg, from); + break; + default: + abort (); + } + break; + case Areg: + switch (size) + { + case sz_word: + comprintf("\tif(%s+8!=%s)\n",reg,from); + comprintf ("\t\tmov_w_rr(%s+8,%s);\n", reg, from); + break; + case sz_long: + comprintf("\tif(%s+8!=%s)\n",reg,from); + comprintf ("\t\tmov_l_rr(%s+8,%s);\n", reg, from); + break; + default: + abort (); + } + break; + + case Apdi: + case absw: + case PC16: + case PC8r: + case Ad16: + case Ad8r: + case Aipi: + case Aind: + case absl: + { + char astring[80]; + sprintf(astring,"%sa",to); + + switch (size) + { + case sz_byte: + insn_n_cycles += 2; + gen_writebyte(astring,from); + break; + case sz_word: + insn_n_cycles += 2; + gen_writeword(astring,from); + break; + case sz_long: + insn_n_cycles += 4; + gen_writelong(astring,from); + break; + default: + abort (); + } + } + break; + case imm: + case imm0: + case imm1: + case imm2: + case immi: + abort (); + break; + default: + abort (); + } +} + +static void genmov16(uae_u32 opcode, struct instr *curi) +{ + comprintf("\tint src=scratchie++;\n"); + comprintf("\tint dst=scratchie++;\n"); + + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword()); + comprintf("\tmov_l_rr(src,8+srcreg);\n"); + comprintf("\tmov_l_rr(dst,8+dstreg);\n"); + } + else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "src", 0, 2); + genamode (curi->dmode, "dstreg", curi->size, "dst", 0, 2); + comprintf("\tmov_l_rr(src,srca);\n"); + comprintf("\tmov_l_rr(dst,dsta);\n"); + } + + /* Align on 16-byte boundaries */ + comprintf("\tand_l_ri(src,~15);\n"); + comprintf("\tand_l_ri(dst,~15);\n"); + + if ((opcode & 0xfff8) == 0xf620) { + comprintf("\tif (srcreg != dstreg)\n"); + comprintf("\tadd_l_ri(srcreg+8,16);\n"); + comprintf("\tadd_l_ri(dstreg+8,16);\n"); + } + else if ((opcode & 0xfff8) == 0xf600) + comprintf("\tadd_l_ri(srcreg+8,16);\n"); + else if ((opcode & 0xfff8) == 0xf608) + comprintf("\tadd_l_ri(dstreg+8,16);\n"); + + comprintf("\tint tmp=scratchie;\n"); + comprintf("\tscratchie+=4;\n"); + + comprintf("\tget_n_addr(src,src,scratchie);\n" + "\tget_n_addr(dst,dst,scratchie);\n" + "\tmov_l_rR(tmp+0,src,0);\n" + "\tmov_l_rR(tmp+1,src,4);\n" + "\tmov_l_rR(tmp+2,src,8);\n" + "\tmov_l_rR(tmp+3,src,12);\n" + "\tmov_l_Rr(dst,tmp+0,0);\n" + "\tforget_about(tmp+0);\n" + "\tmov_l_Rr(dst,tmp+1,4);\n" + "\tforget_about(tmp+1);\n" + "\tmov_l_Rr(dst,tmp+2,8);\n" + "\tforget_about(tmp+2);\n" + "\tmov_l_Rr(dst,tmp+3,12);\n"); +} + +static void +genmovemel (uae_u16 opcode) +{ + comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + comprintf ("\tint native=scratchie++;\n"); + comprintf ("\tint i;\n"); + comprintf ("\tsigned char offset=0;\n"); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rR(i,native,offset);\n" + "\t\t\tbswap_32(i);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_w_rR(i,native,offset);\n" + "\t\t\tbswap_16(i);\n" + "\t\t\tsign_extend_16_rr(i,i);\n" + "\t\t\toffset+=2;\n"); + break; + default: abort(); + } + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Aipi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n"); + } +} + + +static void +genmovemle (uae_u16 opcode) +{ + comprintf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + comprintf ("\tint native=scratchie++;\n"); + comprintf ("\tint i;\n"); + comprintf ("\tint tmp=scratchie++;\n"); + comprintf ("\tsigned char offset=0;\n"); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + + comprintf("\tget_n_addr(srca,native,scratchie);\n"); + + if (table68k[opcode].dmode!=Apdi) { + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tbswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n" + "\t\t\toffset+=4;\n"); + break; + case sz_word: + comprintf("\t\t\tmov_l_rr(tmp,i);\n" + "\t\t\tbswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n" + "\t\t\toffset+=2;\n"); + break; + default: abort(); + } + } + else { /* Pre-decrement */ + comprintf("\tfor (i=0;i<16;i++) {\n" + "\t\tif ((mask>>i)&1) {\n"); + switch(table68k[opcode].size) { + case sz_long: + comprintf("\t\t\toffset-=4;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tbswap_32(tmp);\n" + "\t\t\tmov_l_Rr(native,tmp,offset);\n" + ); + break; + case sz_word: + comprintf("\t\t\toffset-=2;\n" + "\t\t\tmov_l_rr(tmp,15-i);\n" + "\t\t\tbswap_16(tmp);\n" + "\t\t\tmov_w_Rr(native,tmp,offset);\n" + ); + break; + default: abort(); + } + } + + + comprintf("\t\t}\n" + "\t}"); + if (table68k[opcode].dmode == Apdi) { + comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n"); + } +} + + +static void +duplicate_carry (void) +{ + comprintf ("\tif (needed_flags&FLAG_X) duplicate_carry();\n"); +} + +typedef enum +{ + flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, + flag_addx, flag_subx, flag_zn, flag_av, flag_sv, flag_and, flag_or, + flag_eor, flag_mov +} +flagtypes; + + +static void +genflags (flagtypes type, wordsizes size, char *value, char *src, char *dst) +{ + if (noflags) { + switch(type) { + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + comprintf("/* Weird --- CMP with noflags ;-) */\n"); + return; + case flag_add: + case flag_sub: + comprintf("\tdont_care_flags();\n"); + { + char* op; + switch(type) { + case flag_add: op="add"; break; + case flag_sub: op="sub"; break; + default: abort(); + } + switch (size) + { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + return; + } + break; + + case flag_and: + comprintf("\tdont_care_flags();\n"); + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); + comprintf("\tand_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tand_b(%s,%s);\n",dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); + comprintf("\tand_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tand_w(%s,%s);\n",dst,src); + break; + case sz_long: + comprintf("\tand_l(%s,%s);\n",dst,src); + break; + } + return; + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\tand_l_ri(%s,0xffffff00);\n",dst); + comprintf("\tor_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_b_rr(%s,%s);\n",dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\tand_l_ri(%s,0xffff0000);\n",dst); + comprintf("\tor_l(%s,scratchie);\n",dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\tmov_w_rr(%s,%s);\n",dst,src); + break; + case sz_long: + comprintf("\tmov_l_rr(%s,%s);\n",dst,src); + break; + } + return; + + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + char* op; + switch(type) { + case flag_or: op="or"; break; + case flag_eor: op="xor"; break; + default: abort(); + } + switch (size) + { + case sz_byte: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_8_rr(scratchie,%s);\n",src); + comprintf("\t%s_l(%s,scratchie);\n",op,dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("if (kill_rodent(dst)) {\n"); + comprintf("\tzero_extend_16_rr(scratchie,%s);\n",src); + comprintf("\t%s_l(%s,scratchie);\n",op,dst); + comprintf("\tforget_about(scratchie);\n"); + comprintf("\t} else \n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + close_brace(); + return; + } + + + case flag_addx: + case flag_subx: + comprintf("\tdont_care_flags();\n"); + { + char* op; + switch(type) { + case flag_addx: op="adc"; break; + case flag_subx: op="sbb"; break; + default: abort(); + } + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) + { + case sz_byte: + comprintf("\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\t%s_l(%s,%s);\n",op,dst,src); + break; + } + return; + } + break; + default: return; + } + } + + /* Need the flags, but possibly not all of them */ + switch (type) + { + case flag_logical_noclobber: + failure; + + case flag_and: + case flag_or: + case flag_eor: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + char* op; + switch(type) { + case flag_and: op="and"; break; + case flag_or: op="or"; break; + case flag_eor: op="xor"; break; + default: abort(); + } + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_mov: + comprintf("\tdont_care_flags();\n"); + start_brace(); + { + switch (size) + { + case sz_byte: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_b_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_b(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_b_rr(%s,%s);\n",dst,src); + comprintf("\ttest_b_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + case sz_word: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_w_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_w(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_w_rr(%s,%s);\n",dst,src); + comprintf("\ttest_w_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + case sz_long: + comprintf("\tif (%s!=%s) {\n",src,dst); + comprintf("\tmov_l_ri(%s,0);\n" + "\tstart_needflags();\n",dst); + comprintf("\tor_l(%s,%s);\n",dst,src); + comprintf("\t} else {\n"); + comprintf("\tmov_l_rr(%s,%s);\n",dst,src); + comprintf("\ttest_l_rr(%s,%s);\n",dst,dst); + comprintf("\t}\n"); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + } + + case flag_logical: + comprintf("\tdont_care_flags();\n"); + start_brace(); + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\ttest_b_rr(%s,%s);\n",value,value); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\ttest_w_rr(%s,%s);\n",value,value); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\ttest_l_rr(%s,%s);\n",value,value); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + close_brace(); + return; + + + case flag_add: + case flag_sub: + case flag_cmp: + comprintf("\tdont_care_flags();\n"); + { + char* op; + switch(type) { + case flag_add: op="add"; break; + case flag_sub: op="sub"; break; + case flag_cmp: op="cmp"; break; + default: abort(); + } + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tend_needflags();\n"); + if (type!=flag_cmp) { + duplicate_carry(); + } + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + + return; + } + + case flag_addx: + case flag_subx: + uses_cmov; + comprintf("\tdont_care_flags();\n"); + { + char* op; + switch(type) { + case flag_addx: op="adc"; break; + case flag_subx: op="sbb"; break; + default: abort(); + } + start_brace(); + comprintf("\tint zero=scratchie++;\n" + "\tint one=scratchie++;\n" + "\tif (needed_flags&FLAG_Z) {\n" + "\tmov_l_ri(zero,0);\n" + "\tmov_l_ri(one,-1);\n" + "\tmake_flags_live();\n" + "\tcmov_l_rr(zero,one,5);\n" + "\t}\n"); + comprintf("\trestore_carry();\n"); /* Reload the X flag into C */ + switch (size) + { + case sz_byte: + comprintf("\tstart_needflags();\n" + "\t%s_b(%s,%s);\n",op,dst,src); + break; + case sz_word: + comprintf("\tstart_needflags();\n" + "\t%s_w(%s,%s);\n",op,dst,src); + break; + case sz_long: + comprintf("\tstart_needflags();\n" + "\t%s_l(%s,%s);\n",op,dst,src); + break; + } + comprintf("\tlive_flags();\n"); + comprintf("\tif (needed_flags&FLAG_Z) {\n" + "\tcmov_l_rr(zero,one,5);\n" + "\tset_zero(zero, one);\n" /* No longer need one */ + "\tlive_flags();\n" + "\t}\n"); + comprintf("\tend_needflags();\n"); + duplicate_carry(); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + return; + } + default: + failure; + break; + } +} + +static void +force_range_for_rox (const char *var, wordsizes size) +{ + /* Could do a modulo operation here... which one is faster? */ + switch (size) + { + case sz_long: + comprintf ("\tif (%s >= 33) %s -= 33;\n", var, var); + break; + case sz_word: + comprintf ("\tif (%s >= 34) %s -= 34;\n", var, var); + comprintf ("\tif (%s >= 17) %s -= 17;\n", var, var); + break; + case sz_byte: + comprintf ("\tif (%s >= 36) %s -= 36;\n", var, var); + comprintf ("\tif (%s >= 18) %s -= 18;\n", var, var); + comprintf ("\tif (%s >= 9) %s -= 9;\n", var, var); + break; + } +} + +static const char * +cmask (wordsizes size) +{ + switch (size) + { + case sz_byte: + return "0x80"; + case sz_word: + return "0x8000"; + case sz_long: + return "0x80000000"; + default: + abort (); + } +} + +static int +source_is_imm1_8 (struct instr *i) +{ + return i->stype == 3; +} + +static int /* returns zero for success, non-zero for failure */ +gen_opcode (unsigned long int opcode) +{ + struct instr *curi = table68k + opcode; + char* ssize=NULL; + + insn_n_cycles = 2; + global_failure=0; + long_opcode=0; + global_isjump=0; + global_iscjump=0; + global_isaddx=0; + global_cmov=0; + global_fpu=0; + global_mayfail=0; + hack_opcode=opcode; + endstr[0]=0; + + start_brace (); + comprintf("\tuae_u8 scratchie=S1;\n"); + switch (curi->plev) + { + case 0: /* not privileged */ + break; + case 1: /* unprivileged only on 68000 */ + if (cpu_level == 0) + break; + if (next_cpu_level < 0) + next_cpu_level = 0; + + /* fall through */ + case 2: /* priviledged */ + failure; /* Easy ones first */ + break; + case 3: /* privileged if size == word */ + if (curi->size == sz_byte) + break; + failure; + break; + } + switch (curi->size) { + case sz_byte: ssize="b"; break; + case sz_word: ssize="w"; break; + case sz_long: ssize="l"; break; + default: abort(); + } + + switch (curi->mnemo) + { + case i_OR: + case i_AND: + case i_EOR: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + switch(curi->mnemo) { + case i_OR: genflags (flag_or, curi->size, "", "src", "dst"); break; + case i_AND: genflags (flag_and, curi->size, "", "src", "dst"); break; + case i_EOR: genflags (flag_eor, curi->size, "", "src", "dst"); break; + } + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + + case i_ORSR: + case i_EORSR: + failure; + isjump; + break; + case i_ANDSR: + failure; + isjump; + break; + case i_SUB: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_sub, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_SUBA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; + case sz_long: comprintf("\ttmp=src;\n"); break; + default: abort(); + } + comprintf("\tsub_l(dst,tmp);\n"); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_SUBX: + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_subx, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_SBCD: + failure; + /* I don't think so! */ + break; + case i_ADD: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genflags (flag_add, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ADDA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmp,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmp,src);\n"); break; + case sz_long: comprintf("\ttmp=src;\n"); break; + default: abort(); + } + comprintf("\tadd_l(dst,tmp);\n"); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_ADDX: + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + genflags (flag_addx, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ABCD: + failure; + /* No BCD maths for me.... */ + break; + case i_NEG: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_sub, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + case i_NEGX: + isaddx; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_subx, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + + case i_NBCD: + failure; + /* Nope! */ + break; + case i_CLR: + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace(); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0);\n"); + genflags (flag_logical, curi->size, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + case i_NOT: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + comprintf("\tint dst=scratchie++;\n"); + comprintf("\tmov_l_ri(dst,0xffffffff);\n"); + genflags (flag_eor, curi->size, "", "src", "dst"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + case i_TST: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genflags (flag_logical, curi->size, "src", "", ""); + break; + case i_BCHG: + case i_BCLR: + case i_BSET: + case i_BTST: +/* failure; NEW: from "Ipswitch Town" release */ + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint s=scratchie++;\n" + "\tint tmp=scratchie++;\n" + "\tmov_l_rr(s,src);\n"); + if (curi->size == sz_byte) + comprintf("\tand_l_ri(s,7);\n"); + else + comprintf("\tand_l_ri(s,31);\n"); + + { + char* op; + int need_write=1; + + switch(curi->mnemo) { + case i_BCHG: op="btc"; break; + case i_BCLR: op="btr"; break; + case i_BSET: op="bts"; break; + case i_BTST: op="bt"; need_write=0; break; + default: abort(); + } + comprintf("\t%s_l_rr(dst,s);\n" /* Answer now in C */ + "\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ + "\tmake_flags_live();\n" /* Get the flags back */ + "\tdont_care_flags();\n",op); + if (!noflags) { + comprintf("\tstart_needflags();\n" + "\tset_zero(s,tmp);\n" + "\tlive_flags();\n" + "\tend_needflags();\n"); + } + if (need_write) + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + } + break; + + case i_CMPM: + case i_CMP: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + genflags (flag_cmp, curi->size, "", "src", "dst"); + break; + case i_CMPA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(tmps,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(tmps,src);\n"); break; + case sz_long: comprintf("tmps=src;\n"); break; + default: abort(); + } + genflags (flag_cmp, sz_long, "", "tmps", "dst"); + break; + /* The next two are coded a little unconventional, but they are doing + * weird things... */ + case i_MVPRM: + isjump; + failure; + break; + case i_MVPMR: + isjump; + failure; + break; + case i_MOVE: + switch(curi->dmode) { + case Dreg: + case Areg: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags (flag_mov, curi->size, "", "src", "dst"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + default: /* It goes to memory, not a register */ + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags (flag_logical, curi->size, "src", "", ""); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + } + break; + case i_MOVEA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + + start_brace(); + comprintf("\tint tmps=scratchie++;\n"); + switch(curi->size) { + case sz_word: comprintf("\tsign_extend_16_rr(dst,src);\n"); break; + case sz_long: comprintf("\tmov_l_rr(dst,src);\n"); break; + default: abort(); + } + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + + case i_MVSR2: + isjump; + failure; + break; + case i_MV2SR: + isjump; + failure; + break; + case i_SWAP: + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + comprintf("\trol_l_ri(src,16);\n"); + genflags (flag_logical, sz_long, "src", "", ""); + genastore ("src", curi->smode, "srcreg", sz_long, "src"); + break; + case i_EXG: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tmov_l_rr(tmp,src);\n"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("tmp", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_EXT: + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + comprintf("\tdont_care_flags();\n"); + start_brace (); + switch (curi->size) + { + case sz_byte: + comprintf ("\tint dst = src;\n" + "\tsign_extend_8_rr(src,src);\n"); + break; + case sz_word: + comprintf ("\tint dst = scratchie++;\n" + "\tsign_extend_8_rr(dst,src);\n"); + break; + case sz_long: + comprintf ("\tint dst = src;\n" + "\tsign_extend_16_rr(src,src);\n"); + break; + default: + abort (); + } + genflags (flag_logical, + curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", + curi->size == sz_word ? sz_word : sz_long, "src"); + break; + case i_MVMEL: + genmovemel ((uae_u16)opcode); + break; + case i_MVMLE: + genmovemle ((uae_u16)opcode); + break; + case i_TRAP: + isjump; + failure; + break; + case i_MVR2USP: + isjump; + failure; + break; + case i_MVUSP2R: + isjump; + failure; + break; + case i_RESET: + isjump; + failure; + break; + case i_NOP: + break; + case i_STOP: + isjump; + failure; + break; + case i_RTE: + isjump; + failure; + break; + case i_RTD: +/* failure; NEW: from "Ipswitch Town" release */ + genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + /* offs is constant */ + comprintf("\tadd_l_ri(offs,4);\n"); + start_brace(); + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tadd_l(15,offs);\n"); + gen_update_next_handler(); + isjump; + break; + case i_LINK: +/* failure; NEW: from "Ipswitch Town" release */ + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + comprintf("\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,src,scratchie);\n" + "\tmov_l_rr(src,15);\n"); + if (curi->size==sz_word) + comprintf("\tsign_extend_16_rr(offs,offs);\n"); + comprintf("\tadd_l(15,offs);\n"); + genastore ("src", curi->smode, "srcreg", sz_long, "src"); + break; + case i_UNLK: +/* failure; NEW: from "Ipswitch Town" release */ + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + comprintf("\tmov_l_rr(15,src);\n" + "\treadlong(15,src,scratchie);\n" + "\tadd_l_ri(15,4);\n"); + genastore ("src", curi->smode, "srcreg", curi->size, "src"); + break; + case i_RTS: + comprintf("\tint newad=scratchie++;\n" + "\treadlong(15,newad,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc,newad);\n" + "\tget_n_addr_jmp(newad,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n" + "\tlea_l_brr(15,15,4);\n"); + gen_update_next_handler(); + isjump; + break; + case i_TRAPV: + isjump; + failure; + break; + case i_RTR: + isjump; + failure; + break; + case i_JSR: + isjump; + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + start_brace(); + comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + case i_JMP: + isjump; + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + comprintf("\tmov_l_mr((uintptr)®s.pc,srca);\n" + "\tget_n_addr_jmp(srca,PC_P,scratchie);\n" + "\tmov_l_mr((uintptr)®s.pc_oldp,PC_P);\n" + "\tm68k_pc_offset=0;\n"); + gen_update_next_handler(); + break; + case i_BSR: + is_const_jump; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace(); + comprintf("\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n"); + comprintf("\tint ret=scratchie++;\n" + "\tmov_l_ri(ret,retadd);\n" + "\tsub_l_ri(15,4);\n" + "\twritelong_clobber(15,ret,scratchie);\n"); + comprintf("\tadd_l_ri(src,m68k_pc_offset_thisinst+2);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + comprintf("\tadd_l(PC_P,src);\n"); + + comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); + break; + case i_Bcc: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + /* That source is an immediate, so we can clobber it with abandon */ + switch(curi->size) { + case sz_byte: comprintf("\tsign_extend_8_rr(src,src);\n"); break; + case sz_word: comprintf("\tsign_extend_16_rr(src,src);\n"); break; + case sz_long: break; + } + comprintf("\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + /* Leave the following as "add" --- it will allow it to be optimized + away due to src being a constant ;-) */ + comprintf("\tadd_l_ri(src,(uintptr)comp_pc_p);\n"); + comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n"); + /* Now they are both constant. Might as well fold in m68k_pc_offset */ + comprintf("\tadd_l_ri(src,m68k_pc_offset);\n"); + comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + if (curi->cc>=2) { + comprintf("\tuae_u32 v1=get_const(PC_P);\n" + "\tuae_u32 v2=get_const(src);\n" + "\tregister_branch(v1,v2,%d);\n", + cond_codes_x86[curi->cc]); + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + isjump; + } + else { + is_const_jump; + } + + switch(curi->cc) { + case 0: /* Unconditional jump */ + comprintf("\tmov_l_rr(PC_P,src);\n"); + comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n"); + break; + case 1: break; /* This is silly! */ + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + break; + default: abort(); + } + break; + case i_LEA: + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_PEA: + if (table68k[opcode].smode==Areg || + table68k[opcode].smode==Aind || + table68k[opcode].smode==Aipi || + table68k[opcode].smode==Apdi || + table68k[opcode].smode==Ad16 || + table68k[opcode].smode==Ad8r) + comprintf("if (srcreg==7) dodgy=1;\n"); + + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (Apdi, "7", sz_long, "dst", 2, 0); + genastore ("srca", Apdi, "7", sz_long, "dst"); + break; + case i_DBcc: + isjump; + uses_cmov; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + + /* That offs is an immediate, so we can clobber it with abandon */ + switch(curi->size) { + case sz_word: comprintf("\tsign_extend_16_rr(offs,offs);\n"); break; + default: abort(); /* Seems this only comes in word flavour */ + } + comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n"); + comprintf("\tadd_l_ri(offs,(uintptr)comp_pc_p);\n"); /* New PC, + once the + offset_68k is + * also added */ + /* Let's fold in the m68k_pc_offset at this point */ + comprintf("\tadd_l_ri(offs,m68k_pc_offset);\n"); + comprintf("\tadd_l_ri(PC_P,m68k_pc_offset);\n"); + comprintf("\tm68k_pc_offset=0;\n"); + + start_brace(); + comprintf("\tint nsrc=scratchie++;\n"); + + if (curi->cc>=2) { + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + } + + if (curi->size!=sz_word) + abort(); + + + switch(curi->cc) { + case 0: /* This is an elaborate nop? */ + break; + case 1: + comprintf("\tstart_needflags();\n"); + comprintf("\tsub_w_ri(src,1);\n"); + comprintf("\t end_needflags();\n"); + start_brace(); + comprintf("\tuae_u32 v1=get_const(PC_P);\n"); + comprintf("\tuae_u32 v2=get_const(offs);\n" + "\tregister_branch(v1,v2,3);\n"); + break; + + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmov_l_rr(nsrc,src);\n"); + comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n" + "\tmov_w_rr(src,scratchie);\n"); + comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", + cond_codes_x86[curi->cc]); + comprintf("\tcmov_l_rr(src,nsrc,%d);\n", + cond_codes_x86[curi->cc]); + /* OK, now for cc=true, we have src==nsrc and offs==PC_P, + so whether we move them around doesn't matter. However, + if cc=false, we have offs==jump_pc, and src==nsrc-1 */ + + comprintf("\t start_needflags();\n"); + comprintf("\ttest_w_rr(nsrc,nsrc);\n"); + comprintf("\t end_needflags();\n"); + comprintf("\tcmov_l_rr(PC_P,offs,5);\n"); + break; + default: abort(); + } + genastore ("src", curi->smode, "srcreg", curi->size, "src"); + gen_update_next_handler(); + break; + + case i_Scc: +/* failure; NEW: from "Ipswitch Town" release */ + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace (); + comprintf ("\tint val = scratchie++;\n"); + + /* We set val to 0 if we really should use 255, and to 1 for real 0 */ + switch(curi->cc) { + case 0: /* Unconditional set */ + comprintf("\tmov_l_ri(val,0);\n"); + break; + case 1: + /* Unconditional not-set */ + comprintf("\tmov_l_ri(val,1);\n"); + break; + case 8: failure; break; /* Work out details! FIXME */ + case 9: failure; break; /* Not critical, though! */ + + case 2: + case 3: + case 4: + case 5: + case 6: + case 7: + case 10: + case 11: + case 12: + case 13: + case 14: + case 15: + comprintf("\tmake_flags_live();\n"); /* Load the flags */ + /* All condition codes can be inverted by changing the LSB */ + comprintf("\tsetcc(val,%d);\n", + cond_codes_x86[curi->cc]^1); break; + default: abort(); + } + comprintf("\tsub_b_ri(val,1);\n"); + genastore ("val", curi->smode, "srcreg", curi->size, "src"); + break; + case i_DIVU: + isjump; + failure; + break; + case i_DIVS: + isjump; + failure; + break; + case i_MULU: +/* failure; NEW: from "Ipswitch Town" release */ + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + /* To do 16x16 unsigned multiplication, we actually use + 32x32 signed, and zero-extend the registers first. + That solves the problem of MUL needing dedicated registers + on the x86 */ + comprintf("\tzero_extend_16_rr(scratchie,src);\n" + "\tzero_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags (flag_logical, sz_long, "dst", "", ""); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_MULS: +/* failure; NEW: from "Ipswitch Town" release */ + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + comprintf("\tsign_extend_16_rr(scratchie,src);\n" + "\tsign_extend_16_rr(dst,dst);\n" + "\timul_32_32(dst,scratchie);\n"); + genflags (flag_logical, sz_long, "dst", "", ""); + genastore ("dst", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_CHK: + isjump; + failure; + break; + + case i_CHK2: + isjump; + failure; + break; + + case i_ASR: + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { +/* failure; UNTESTED: NEW: from "Ipswitch Town" release */ + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint sdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(sdata,data);\n" + "\tmov_l_rr(cdata,data);\n" + "\tmov_l_rr(tmpcnt,cnt);\n"); + switch (curi->size) { + case sz_byte: comprintf("\tshra_b_ri(sdata,7);\n"); break; + case sz_word: comprintf("\tshra_w_ri(sdata,15);\n"); break; + case sz_long: comprintf("\tshra_l_ri(sdata,31);\n"); break; + default: abort(); + } + /* sdata is now the MSB propagated to all bits for the + register of specified size */ + comprintf("\tand_l_ri(tmpcnt,63);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,tmpcnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshra_w_rr(data,tmpcnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshra_l_rr(data,tmpcnt);\n" + "\thighmask=0x20;\n"); + break; + } + comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); + switch (curi->size) { + case sz_byte: comprintf("\tcmov_b_rr(data,sdata,NATIVE_CC_NE);\n"); break; + case sz_word: comprintf("\tcmov_w_rr(data,sdata,NATIVE_CC_NE);\n"); break; + case sz_long: comprintf("\tcmov_l_rr(data,sdata,NATIVE_CC_NE);\n"); break; + } + + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + /* NOTE: carry bit is cleared if shift count is zero */ + comprintf("\tmov_l_ri(scratchie,0);\n" + "\ttest_l_rr(tmpcnt,tmpcnt);\n" + "\tcmov_l_rr(sdata,scratchie,NATIVE_CC_EQ);\n" + "\tforget_about(scratchie);\n"); + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshra_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshra_l_rr(cdata,tmpcnt);\n");break; + default: abort(); + } + /* If the shift count was higher than the width, we need + to pick up the sign from original data (sdata) */ + /* NOTE: for shift count of zero, the following holds + true and cdata contains 0 so that carry bit is cleared */ + comprintf("\ttest_l_ri(tmpcnt,highmask);\n" + "\tforget_about(tmpcnt);\n" + "\tcmov_l_rr(cdata,sdata,NATIVE_CC_NE);\n"); + + /* And create the flags (preserve X flag if shift count is zero) */ + comprintf("\ttest_l_ri(cnt,63);\n" + "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint width;\n" + "\tint highshift=scratchie++;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,cnt);\n" + "\thighmask=0x38;\n" + "\twidth=8;\n"); + break; + case sz_word: comprintf("\tshra_w_rr(data,cnt);\n" + "\thighmask=0x30;\n" + "\twidth=16;\n"); + break; + case sz_long: comprintf("\tshra_l_rr(data,cnt);\n" + "\thighmask=0x20;\n" + "\twidth=32;\n"); + break; + default: abort(); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(highshift,0);\n" + "mov_l_ri(scratchie,width/2);\n" + "cmov_l_rr(highshift,scratchie,5);\n"); + /* The x86 masks out bits, so we now make sure that things + really get shifted as much as planned */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: abort(); + } + /* And again */ + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_rr(data,highshift);\n");break; + case sz_word: comprintf("\tshra_w_rr(data,highshift);\n");break; + case sz_long: comprintf("\tshra_l_rr(data,highshift);\n");break; + default: abort(); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshra_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_word: comprintf("\tshra_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_long: comprintf("\tshra_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + default: abort(); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_ASL: +/* failure; NEW: from "Ipswitch Town" release */ + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + /* Except for the handling of the V flag, this is identical to + LSL. The handling of V is, uhm, unpleasant, so if it's needed, + let the normal emulation handle it. Shoulders of giants kinda + thing ;-) */ + comprintf("if (needed_flags & FLAG_V) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,5);\n"); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,4);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: abort(); + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(cdata,tmpcnt);\n");break; + case sz_word: comprintf("\tshll_w_rr(cdata,tmpcnt);\n");break; + case sz_long: comprintf("\tshll_l_rr(cdata,tmpcnt);\n");break; + default: abort(); + } + comprintf("test_l_ri(tmpcnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(cdata,scratchie,5);\n"); + /* And create the flags */ + comprintf("\tstart_needflags();\n"); + + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,7);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,15);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); + comprintf("\t bt_l_ri(cdata,31);\n"); break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,4);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: abort(); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); break; + default: abort(); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_LSR: +/* failure; NEW: from "Ipswitch Town" release */ + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,NATIVE_CC_NE);\n"); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_rr(data,tmpcnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshrl_w_rr(data,tmpcnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshrl_l_rr(data,tmpcnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("\ttest_l_ri(tmpcnt,highmask);\n" + "\rmov_l_ri(scratchie,0);\n"); + if (curi->size == sz_long) + comprintf("\tcmov_l_rr(data,scratchie,NATIVE_CC_NE);\n"); + else { + comprintf("\tcmov_l_rr(scratchie,data,NATIVE_CC_EQ);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + default: abort(); + } + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + comprintf("\tshrl_l_rr(cdata,tmpcnt);\n"); + comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); + comprintf("\tforget_about(tmpcnt);\n"); + if (curi->size != sz_long) /* scratchie is still live for LSR.L */ + comprintf("\tmov_l_ri(scratchie,0);\n"); + comprintf("\tcmov_l_rr(cdata,scratchie,NATIVE_CC_NE);\n"); + comprintf("\tforget_about(scratchie);\n"); + /* And create the flags (preserve X flag if shift count is zero) */ + comprintf("\ttest_l_ri(cnt,63);\n" + "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshrl_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshrl_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,4);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: abort(); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshrl_b_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_word: comprintf("\tshrl_w_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + case sz_long: comprintf("\tshrl_l_ri(data,srcreg);\n" + "\tbp=srcreg-1;\n"); break; + default: abort(); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_LSL: + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + if (curi->smode!=immi) { +/* failure; UNTESTED: NEW: from "Ipswitch Town" release */ + if (!noflags) { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n" + "\tint cdata=scratchie++;\n" + "\tint tmpcnt=scratchie++;\n"); + comprintf("\tmov_l_rr(tmpcnt,cnt);\n" + "\tand_l_ri(tmpcnt,63);\n" + "\tmov_l_ri(cdata,0);\n" + "\tcmov_l_rr(cdata,data,NATIVE_CC_NE);\n"); + /* cdata is now either data (for shift count!=0) or + 0 (for shift count==0) */ + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,tmpcnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,tmpcnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,tmpcnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("\ttest_l_ri(tmpcnt,highmask);\n" + "\tmov_l_ri(scratchie,0);\n"); + if (curi->size == sz_long) + comprintf("\tcmov_l_rr(data,scratchie,NATIVE_CC_NE);\n"); + else { + comprintf("\tcmov_l_rr(scratchie,data,NATIVE_CC_EQ);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + default: abort(); + } + } + /* Result of shift is now in data. Now we need to determine + the carry by shifting cdata one less */ + comprintf("\tsub_l_ri(tmpcnt,1);\n"); + comprintf("\tshll_l_rr(cdata,tmpcnt);\n"); + comprintf("\ttest_l_ri(tmpcnt,highmask);\n"); + comprintf("\tforget_about(tmpcnt);\n"); + if (curi->size != sz_long) /* scratchie is still live for LSL.L */ + comprintf("\tmov_l_ri(scratchie,0);\n"); + comprintf("\tcmov_l_rr(cdata,scratchie,NATIVE_CC_NE);\n"); + comprintf("\tforget_about(scratchie);\n"); + /* And create the flags (preserve X flag if shift count is zero) */ + switch (curi->size) { + case sz_byte: comprintf("\tshrl_l_ri(cdata,7);\n"); break; + case sz_word: comprintf("\tshrl_l_ri(cdata,15);\n"); break; + case sz_long: comprintf("\tshrl_l_ri(cdata,31);\n"); break; + } + comprintf("\ttest_l_ri(cnt,63);\n" + "\tcmov_l_rr(FLAGX,cdata,NATIVE_CC_NE);\n"); + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(cdata,0);\n"); + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + else { + uses_cmov; + start_brace(); + comprintf("\tint highmask;\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_rr(data,cnt);\n" + "\thighmask=0x38;\n"); + break; + case sz_word: comprintf("\tshll_w_rr(data,cnt);\n" + "\thighmask=0x30;\n"); + break; + case sz_long: comprintf("\tshll_l_rr(data,cnt);\n" + "\thighmask=0x20;\n"); + break; + default: abort(); + } + comprintf("test_l_ri(cnt,highmask);\n" + "mov_l_ri(scratchie,0);\n" + "cmov_l_rr(scratchie,data,4);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tmov_b_rr(data,scratchie);\n");break; + case sz_word: comprintf("\tmov_w_rr(data,scratchie);\n");break; + case sz_long: comprintf("\tmov_l_rr(data,scratchie);\n");break; + default: abort(); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + } + else { + start_brace(); + comprintf("\tint tmp=scratchie++;\n" + "\tint bp;\n" + "\tmov_l_rr(tmp,data);\n"); + switch(curi->size) { + case sz_byte: comprintf("\tshll_b_ri(data,srcreg);\n" + "\tbp=8-srcreg;\n"); break; + case sz_word: comprintf("\tshll_w_ri(data,srcreg);\n" + "\tbp=16-srcreg;\n"); break; + case sz_long: comprintf("\tshll_l_ri(data,srcreg);\n" + "\tbp=32-srcreg;\n"); break; + default: abort(); + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + comprintf("\t duplicate_carry();\n"); + comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + } + break; + + case i_ROL: + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + + switch(curi->size) { + case sz_long: comprintf("\t rol_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\t rol_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\t rol_b_rr(data,cnt);\n"); break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */ + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + break; + + case i_ROR: + mayfail; + if (curi->smode==Dreg) { + comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n" + " FAIL(1);\n" + " return;\n" + "} \n"); + start_brace(); + } + comprintf("\tdont_care_flags();\n"); + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + + switch(curi->size) { + case sz_long: comprintf("\t ror_l_rr(data,cnt);\n"); break; + case sz_word: comprintf("\t ror_w_rr(data,cnt);\n"); break; + case sz_byte: comprintf("\t ror_b_rr(data,cnt);\n"); break; + } + + if (!noflags) { + comprintf("\tstart_needflags();\n"); + comprintf("\tif (needed_flags & FLAG_ZNV)\n"); + switch(curi->size) { + case sz_byte: comprintf("\t test_b_rr(data,data);\n"); break; + case sz_word: comprintf("\t test_w_rr(data,data);\n"); break; + case sz_long: comprintf("\t test_l_rr(data,data);\n"); break; + } + switch(curi->size) { + case sz_byte: comprintf("\t bt_l_ri(data,0x07);\n"); break; + case sz_word: comprintf("\t bt_l_ri(data,0x0f);\n"); break; + case sz_long: comprintf("\t bt_l_ri(data,0x1f);\n"); break; + } + comprintf("\t live_flags();\n"); + comprintf("\t end_needflags();\n"); + } + genastore ("data", curi->dmode, "dstreg", curi->size, "data"); + break; + + case i_ROXL: + failure; + break; + case i_ROXR: + failure; + break; + case i_ASRW: + failure; + break; + case i_ASLW: + failure; + break; + case i_LSRW: + failure; + break; + case i_LSLW: + failure; + break; + case i_ROLW: + failure; + break; + case i_RORW: + failure; + break; + case i_ROXLW: + failure; + break; + case i_ROXRW: + failure; + break; + case i_MOVEC2: + isjump; + failure; + break; + case i_MOVE2C: + isjump; + failure; + break; + case i_CAS: + failure; + break; + case i_CAS2: + failure; + break; + case i_MOVES: /* ignore DFC and SFC because we have no MMU */ + isjump; + failure; + break; + case i_BKPT: /* only needed for hardware emulators */ + isjump; + failure; + break; + case i_CALLM: /* not present in 68030 */ + isjump; + failure; + break; + case i_RTM: /* not present in 68030 */ + isjump; + failure; + break; + case i_TRAPcc: + isjump; + failure; + break; + case i_DIVL: + isjump; + failure; + break; + case i_MULL: +/* failure; NEW: from "Ipswitch Town" release */ + if (!noflags) { + failure; + break; + } + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + comprintf("\tint r2=(extra>>12)&7;\n" + "\tint tmp=scratchie++;\n"); + + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + /* The two operands are in dst and r2 */ + comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */ + "\tint r3=(extra&7);\n" + "\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */ + comprintf("\tif (extra&0x0800) { \n" /* signed */ + "\t\timul_64_32(r2,r3);\n" + "\t} else { \n" + "\t\tmul_64_32(r2,r3);\n" + "\t} \n"); + /* The result is in r2/tmp, with r2 holding the lower 32 bits */ + comprintf("\t} else {\n"); /* Only want 32 bit result */ + /* operands in dst and r2, result foes into r2 */ + /* shouldn't matter whether it's signed or unsigned?!? */ + comprintf("\timul_32_32(r2,dst);\n" + "\t}\n"); + break; + + case i_BFTST: + case i_BFEXTU: + case i_BFCHG: + case i_BFEXTS: + case i_BFCLR: + case i_BFFFO: + case i_BFSET: + case i_BFINS: + failure; + break; + case i_PACK: + failure; + break; + case i_UNPK: + failure; + break; + case i_TAS: + failure; + break; + case i_FPP: + uses_fpu; +#ifdef USE_JIT_FPU + mayfail; + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fpp_opp(opcode,extra);\n"); +#else + failure; +#endif + break; + case i_FBcc: + uses_fpu; +#ifdef USE_JIT_FPU + isjump; + uses_cmov; + mayfail; + swap_opcode(); + comprintf("\tcomp_fbcc_opp(opcode);\n"); +#else + isjump; + failure; +#endif + break; + case i_FDBcc: + uses_fpu; + isjump; + failure; + break; + case i_FScc: + uses_fpu; +#ifdef USE_JIT_FPU + mayfail; + uses_cmov; + comprintf("\tuae_u16 extra=%s;\n",gen_nextiword()); + swap_opcode(); + comprintf("\tcomp_fscc_opp(opcode,extra);\n"); +#else + failure; +#endif + break; + case i_FTRAPcc: + uses_fpu; + isjump; + failure; + break; + case i_FSAVE: + uses_fpu; + failure; + break; + case i_FRESTORE: + uses_fpu; + failure; + break; + + case i_CINVL: + case i_CINVP: + case i_CINVA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + comprintf ("\tflush_icache();\n"); /* Differentiate a bit more? */ + break; + case i_CPUSHL: + case i_CPUSHP: + case i_CPUSHA: + isjump; /* Not really, but it's probably a good idea to stop + translating at this point */ + failure; + break; + case i_MOVE16: + genmov16(opcode, curi); + break; + + case i_EMULOP_RETURN: + isjump; + failure; + break; + + case i_EMULOP: + failure; + break; + + case i_MMUOP: + isjump; + failure; + break; + default: + abort (); + break; + } + comprintf("%s",endstr); + finish_braces (); + sync_m68k_pc (); + if (global_mayfail) + comprintf("\tif (failure) m68k_pc_offset=m68k_pc_offset_thisinst;\n"); + return global_failure; +} + +static void +generate_includes (FILE * f) +{ + fprintf (f, "#include \"sysdeps.h\"\n"); + fprintf (f, "#include \"m68k.h\"\n"); + fprintf (f, "#include \"memory.h\"\n"); + fprintf (f, "#include \"readcpu.h\"\n"); + fprintf (f, "#include \"newcpu.h\"\n"); + fprintf (f, "#include \"comptbl.h\"\n"); +} + +static int postfix; + +static void +generate_one_opcode (int rp, int noflags) +{ + uae_u16 smsk, dmsk; + const long int opcode = opcode_map[rp]; + const char *opcode_str; + int aborted=0; + int have_srcreg=0; + int have_dstreg=0; + + if (table68k[opcode].mnemo == i_ILLG + || table68k[opcode].clev > cpu_level) + return; + + if (table68k[opcode].handler != -1) + return; + + switch (table68k[opcode].stype) + { + case 0: + smsk = 7; + break; + case 1: + smsk = 255; + break; + case 2: + smsk = 15; + break; + case 3: + smsk = 7; + break; + case 4: + smsk = 7; + break; + case 5: + smsk = 63; + break; + case 6: + smsk = 255; + break; + case 7: + smsk = 3; + break; + default: + abort (); + } + dmsk = 7; + + next_cpu_level = -1; + if (table68k[opcode].suse + && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 + && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 + && table68k[opcode].smode != absw && table68k[opcode].smode != absl + && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16) + { + have_srcreg=1; + if (table68k[opcode].spos == -1) + { + if (((int) table68k[opcode].sreg) >= 128) + comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].sreg); + else + comprintf ("\tuae_s32 srcreg = %d;\n", (int) table68k[opcode].sreg); + } + else + { + char source[100]; + int pos = table68k[opcode].spos; + + comprintf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (smsk >> (8 - pos)) != 0) + sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf ("\tuae_u32 srcreg = %s;\n", source); + + comprintf ("#else\n"); + + if (pos) + sprintf (source, "((opcode >> %d) & %d)", pos, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + comprintf ("\tuae_s32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + comprintf ("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + comprintf ("\tuae_s32 srcreg = %s;\n", source); + + comprintf ("#endif\n"); + } + } + if (table68k[opcode].duse + /* Yes, the dmode can be imm, in case of LINK or DBcc */ + && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 + && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 + && table68k[opcode].dmode != absw && table68k[opcode].dmode != absl) + { + have_dstreg=1; + if (table68k[opcode].dpos == -1) + { + if (((int) table68k[opcode].dreg) >= 128) + comprintf ("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].dreg); + else + comprintf ("\tuae_s32 dstreg = %d;\n", (int) table68k[opcode].dreg); + } + else + { + int pos = table68k[opcode].dpos; + + comprintf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + comprintf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos ^ 8, dmsk); + else + comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + comprintf ("#else\n"); + + if (pos) + comprintf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos, dmsk); + else + comprintf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + comprintf ("#endif\n"); + } + } + + if (have_srcreg && have_dstreg && + (table68k[opcode].dmode==Areg || + table68k[opcode].dmode==Aind || + table68k[opcode].dmode==Aipi || + table68k[opcode].dmode==Apdi || + table68k[opcode].dmode==Ad16 || + table68k[opcode].dmode==Ad8r) && + (table68k[opcode].smode==Areg || + table68k[opcode].smode==Aind || + table68k[opcode].smode==Aipi || + table68k[opcode].smode==Apdi || + table68k[opcode].smode==Ad16 || + table68k[opcode].smode==Ad8r) + ) { + comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n"); + } + else { + comprintf("\tuae_u32 dodgy=0;\n"); + } + comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n"); + comprintf("\tm68k_pc_offset+=2;\n"); + + opcode_str = get_instruction_string (opcode); + + aborted=gen_opcode (opcode); + { + int flags=0; + if (global_isjump) flags|=1; + if (long_opcode) flags|=2; + if (global_cmov) flags|=4; + if (global_isaddx) flags|=8; + if (global_iscjump) flags|=16; + if (global_fpu) flags|=32; + + comprintf ("}\n"); + + if (aborted) { + fprintf (stblfile, "{ NULL, 0x%08x, %ld }, /* %s */\n", flags, opcode, opcode_str); + com_discard(); + } + else { + if (noflags) { + fprintf (stblfile, "{ op_%lx_%d_comp_nf, 0x%08x, %ld }, /* %s */\n", opcode, postfix, flags, opcode, opcode_str); + fprintf (headerfile, "extern compop_func op_%lx_%d_comp_nf;\n", opcode, postfix); + printf ("void REGPARAM2 op_%lx_%d_comp_nf(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); + } + else { + fprintf (stblfile, "{ op_%lx_%d_comp_ff, 0x%08x, %ld }, /* %s */\n", opcode, postfix, flags, opcode, opcode_str); + fprintf (headerfile, "extern compop_func op_%lx_%d_comp_ff;\n", opcode, postfix); + printf ("void REGPARAM2 op_%lx_%d_comp_ff(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); + } + com_flush(); + } + } + opcode_next_clev[rp] = next_cpu_level; + opcode_last_postfix[rp] = postfix; +} + +static void +generate_func (int noflags) +{ + int i, j, rp; + + using_prefetch = 0; + using_exception_3 = 0; + for (i = 0; i < 1; i++) /* We only do one level! */ + { + cpu_level = 4 - i; + postfix = i; + + if (noflags) + fprintf (stblfile, "struct comptbl op_smalltbl_%d_comp_nf[] = {\n", postfix); + else + fprintf (stblfile, "struct comptbl op_smalltbl_%d_comp_ff[] = {\n", postfix); + + + /* sam: this is for people with low memory (eg. me :)) */ + printf ("\n" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" + "\n" + "#define PART_1 1\n" + "#define PART_2 1\n" + "#define PART_3 1\n" + "#define PART_4 1\n" + "#define PART_5 1\n" + "#define PART_6 1\n" + "#define PART_7 1\n" + "#define PART_8 1\n" + "#endif\n\n"); + + rp = 0; + for (j = 1; j <= 8; ++j) + { + int k = (j * nr_cpuop_funcs) / 8; + printf ("#ifdef PART_%d\n", j); + for (; rp < k; rp++) + generate_one_opcode (rp,noflags); + printf ("#endif\n\n"); + } + + fprintf (stblfile, "{ 0, 0,65536 }};\n"); + } + +} + +int +main (int argc, char **argv) +{ + read_table68k (); + do_merges (); + + opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); + read_counts (); + + /* It would be a lot nicer to put all in one file (we'd also get rid of + * cputbl.h that way), but cpuopti can't cope. That could be fixed, but + * I don't dare to touch the 68k version. */ + + headerfile = fopen ("comptbl.h", "wb"); + stblfile = fopen ("compstbl.cpp", "wb"); + freopen ("compemu.cpp", "wb", stdout); + + fprintf(stblfile, "#if USE_JIT\n"); + printf("#if USE_JIT\n"); + + generate_includes (stdout); + generate_includes (stblfile); + + printf("#include \"compiler/compemu.h\"\n"); + + noflags=0; + generate_func (noflags); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); + read_counts (); + noflags=1; + generate_func (noflags); + + fprintf(stblfile, "#endif //USE_JIT\n"); + printf("#endif //USE_JIT\n"); + + free(opcode_map); + free(opcode_last_postfix); + free(opcode_next_clev); + free(counts); + + free (table68k); + fclose (stblfile); + fclose (headerfile); + fflush (stdout); + return 0; +} diff --git a/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp new file mode 100644 index 000000000..236a2d5e7 --- /dev/null +++ b/BasiliskII/src/uae_cpu/compiler/test_codegen_x86.cpp @@ -0,0 +1,2254 @@ +/******************** -*- mode: C; tab-width: 8 -*- ******************** + * + * Dumb and Brute Force Run-time assembler verifier for IA-32 and AMD64 + * + ***********************************************************************/ + + +/*********************************************************************** + * + * Copyright 2004-2008 Gwenole Beauchesne + * + * 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 + * + ***********************************************************************/ + +/* + * STATUS: 26M variations covering unary register based operations, + * reg/reg operations, imm/reg operations. + * + * TODO: + * - Rewrite to use internal BFD/opcodes format instead of string compares + * - Add reg/mem, imm/mem variations + */ + +#define _BSD_SOURCE 1 +#include +#include +#include +#include +#include +#include + +#include "sysdeps.h" + +static int verbose = 2; + +#define TEST_INST_ALU 1 +#define TEST_INST_FPU 1 +#define TEST_INST_MMX 1 +#define TEST_INST_SSE 1 +#if TEST_INST_ALU +#define TEST_INST_ALU_REG 1 +#define TEST_INST_ALU_REG_REG 1 +#define TEST_INST_ALU_CNT_REG 1 +#define TEST_INST_ALU_IMM_REG 1 +#define TEST_INST_ALU_MEM_REG 1 +#endif +#if TEST_INST_FPU +#define TEST_INST_FPU_UNARY 1 +#define TEST_INST_FPU_REG 1 +#define TEST_INST_FPU_MEM 1 +#endif +#if TEST_INST_MMX +#define TEST_INST_MMX_REG_REG 1 +#define TEST_INST_MMX_IMM_REG 1 +#define TEST_INST_MMX_MEM_REG 1 +#endif +#if TEST_INST_SSE +#define TEST_INST_SSE_REG 1 +#define TEST_INST_SSE_REG_REG 1 +#define TEST_INST_SSE_MEM_REG 1 +#endif + +#undef abort +#define abort() do { \ + fprintf(stderr, "ABORT: %s, line %d\n", __FILE__, __LINE__); \ + (abort)(); \ +} while (0) + +#define X86_TARGET_64BIT 1 +#define X86_FLAT_REGISTERS 0 +#define X86_OPTIMIZE_ALU 1 +#define X86_OPTIMIZE_ROTSHI 1 +#define X86_RIP_RELATIVE_ADDR 0 +#include "compiler/codegen_x86.h" + +#if X86_TARGET_64BIT +#define X86_MAX_ALU_REGS 16 +#define X86_MAX_SSE_REGS 16 +#else +#define X86_MAX_ALU_REGS 8 +#define X86_MAX_SSE_REGS 8 +#endif +#define X86_MAX_FPU_REGS 8 +#define X86_MAX_MMX_REGS 8 + +#define VALID_REG(r, b, n) (((unsigned)((r) - X86_##b)) < (n)) +#if X86_TARGET_64BIT +#define VALID_REG8(r) (VALID_REG(r, AL, 16) || VALID_REG(r, AH, 4)) +#define VALID_REG64(r) VALID_REG(r, RAX, X86_MAX_ALU_REGS) +#else +#define VALID_REG8(r) (VALID_REG(r, AL, 4) || VALID_REG(r, AH, 4)) +#define VALID_REG64(r) (0) +#endif +#define VALID_REG16(r) VALID_REG(r, AX, X86_MAX_ALU_REGS) +#define VALID_REG32(r) VALID_REG(r, EAX, X86_MAX_ALU_REGS) + +#define x86_emit_byte(B) emit_byte(B) +#define x86_emit_word(W) emit_word(W) +#define x86_emit_long(L) emit_long(L) +#define x86_emit_quad(Q) emit_quad(Q) +#define x86_get_target() get_target() +#define x86_emit_failure(MSG) jit_fail(MSG, __FILE__, __LINE__, __FUNCTION__) + +static void jit_fail(const char *msg, const char *file, int line, const char *function) +{ + fprintf(stderr, "JIT failure in function %s from file %s at line %d: %s\n", + function, file, line, msg); + abort(); +} + +static uint8 *target; + +static inline void emit_byte(uint8 x) +{ + *target++ = x; +} + +static inline void emit_word(uint16 x) +{ + *((uint16 *)target) = x; + target += 2; +} + +static inline void emit_long(uint32 x) +{ + *((uint32 *)target) = x; + target += 4; +} + +static inline void emit_quad(uint64 x) +{ + *((uint64 *)target) = x; + target += 8; +} + +static inline void set_target(uint8 *t) +{ + target = t; +} + +static inline uint8 *get_target(void) +{ + return target; +} + +static uint32 mon_read_byte(uintptr addr) +{ + uint8 *m = (uint8 *)addr; + return (uint32)(*m); +} + +extern "C" { +#include "disass/dis-asm.h" + +int buffer_read_memory(bfd_vma from, bfd_byte *to, unsigned int length, struct disassemble_info *info) +{ + while (length--) + *to++ = mon_read_byte(from++); + return 0; +} + +void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info) +{ + info->fprintf_func(info->stream, "Unknown error %d\n", status); +} + +void generic_print_address(bfd_vma addr, struct disassemble_info *info) +{ + if (addr >= UVAL64(0x100000000)) + info->fprintf_func(info->stream, "$%08x%08x", (uint32)(addr >> 32), (uint32)addr); + else + info->fprintf_func(info->stream, "$%08x", (uint32)addr); +} + +int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info) +{ + return 0; +} +} + +struct SFILE { + char *buffer; + char *current; +}; + +static int mon_sprintf(SFILE *f, const char *format, ...) +{ + int n; + va_list args; + va_start(args, format); + vsprintf(f->current, format, args); + f->current += n = strlen(f->current); + va_end(args); + return n; +} + +static int disass_x86(char *buf, uintptr adr) +{ + disassemble_info info; + SFILE sfile; + sfile.buffer = buf; + sfile.current = buf; + INIT_DISASSEMBLE_INFO(info, (FILE *)&sfile, (fprintf_ftype)mon_sprintf); + info.mach = X86_TARGET_64BIT ? bfd_mach_x86_64 : bfd_mach_i386_i386; + info.disassembler_options = "suffix"; + return print_insn_i386(adr, &info); +} + +enum { + op_disp, + op_reg, + op_base, + op_index, + op_scale, + op_imm, +}; +struct operand_t { + int32 disp; + int8 reg; + int8 base; + int8 index; + int8 scale; + int64 imm; + + void clear() { + disp = imm = 0; + reg = base = index = -1; + scale = 1; + } + + void fill(int optype, int value) { + switch (optype) { + case op_disp: disp = value; break; + case op_reg: reg = value; break; + case op_base: base = value; break; + case op_index: index = value; break; + case op_scale: scale = value; break; + case op_imm: imm = value; break; + default: abort(); + } + } +}; + +#define MAX_INSNS 1024 +#define MAX_INSN_LENGTH 16 +#define MAX_INSN_OPERANDS 3 + +struct insn_t { + char name[16]; + int n_operands; + operand_t operands[MAX_INSN_OPERANDS]; + + void clear() { + memset(name, 0, sizeof(name)); + n_operands = 0; + for (int i = 0; i < MAX_INSN_OPERANDS; i++) + operands[i].clear(); + } + + void pretty_print() { + printf("%s, %d operands\n", name, n_operands); + for (int i = 0; i < n_operands; i++) { + operand_t *op = &operands[i]; + if (op->reg != -1) + printf(" reg r%d\n", op->reg); + else { + printf(" mem 0x%08x(", op->disp); + if (op->base != -1) + printf("r%d", op->base); + printf(","); + if (op->index != -1) + printf("r%d", op->index); + printf(","); + if (op->base != -1 || op->index != -1) + printf("%d", op->scale); + printf(")\n"); + } + } + } +}; + +static inline char *find_blanks(char *p) +{ + while (*p && !isspace(*p)) + ++p; + return p; +} + +static inline char *skip_blanks(char *p) +{ + while (*p && isspace(*p)) + ++p; + return p; +} + +static int parse_reg(operand_t *op, int optype, char *buf) +{ + int reg = X86_NOREG; + int len = 0; + char *p = buf; + switch (p[0]) { + case 'a': case 'A': + len = 2; + switch (p[1]) { + case 'l': case 'L': reg = X86_AL; break; + case 'h': case 'H': reg = X86_AH; break; + case 'x': case 'X': reg = X86_AX; break; + } + break; + case 'b': case 'B': + len = 2; + switch (p[1]) { + case 'l': case 'L': reg = X86_BL; break; + case 'h': case 'H': reg = X86_BH; break; + case 'x': case 'X': reg = X86_BX; break; + case 'p': case 'P': + switch (p[2]) { +#if X86_TARGET_64BIT + case 'l': case 'L': reg = X86_BPL, ++len; break; +#endif + default: reg = X86_BP; break; + } + break; + } + break; + case 'c': case 'C': + len = 2; + switch (p[1]) { + case 'l': case 'L': reg = X86_CL; break; + case 'h': case 'H': reg = X86_CH; break; + case 'x': case 'X': reg = X86_CX; break; + } + break; + case 'd': case 'D': + len = 2; + switch (p[1]) { + case 'l': case 'L': reg = X86_DL; break; + case 'h': case 'H': reg = X86_DH; break; + case 'x': case 'X': reg = X86_DX; break; + case 'i': case 'I': + switch (p[2]) { +#if X86_TARGET_64BIT + case 'l': case 'L': reg = X86_DIL; ++len; break; +#endif + default: reg = X86_DI; break; + } + break; + } + break; + case 's': case 'S': + len = 2; + switch (p[2]) { +#if X86_TARGET_64BIT + case 'l': case 'L': + ++len; + switch (p[1]) { + case 'p': case 'P': reg = X86_SPL; break; + case 'i': case 'I': reg = X86_SIL; break; + } + break; +#endif + case '(': + if ((p[1] == 't' || p[1] == 'T') && isdigit(p[3]) && p[4] == ')') + len += 3, reg = X86_ST0 + (p[3] - '0'); + break; + default: + switch (p[1]) { + case 't': case 'T': reg = X86_ST0; break; + case 'p': case 'P': reg = X86_SP; break; + case 'i': case 'I': reg = X86_SI; break; + } + break; + } + break; + case 'e': case 'E': + len = 3; + switch (p[2]) { + case 'x': case 'X': + switch (p[1]) { + case 'a': case 'A': reg = X86_EAX; break; + case 'b': case 'B': reg = X86_EBX; break; + case 'c': case 'C': reg = X86_ECX; break; + case 'd': case 'D': reg = X86_EDX; break; + } + break; + case 'i': case 'I': + switch (p[1]) { + case 's': case 'S': reg = X86_ESI; break; + case 'd': case 'D': reg = X86_EDI; break; + } + break; + case 'p': case 'P': + switch (p[1]) { + case 'b': case 'B': reg = X86_EBP; break; + case 's': case 'S': reg = X86_ESP; break; + } + break; + } + break; +#if X86_TARGET_64BIT + case 'r': case 'R': + len = 3; + switch (p[2]) { + case 'x': case 'X': + switch (p[1]) { + case 'a': case 'A': reg = X86_RAX; break; + case 'b': case 'B': reg = X86_RBX; break; + case 'c': case 'C': reg = X86_RCX; break; + case 'd': case 'D': reg = X86_RDX; break; + } + break; + case 'i': case 'I': + switch (p[1]) { + case 's': case 'S': reg = X86_RSI; break; + case 'd': case 'D': reg = X86_RDI; break; + } + break; + case 'p': case 'P': + switch (p[1]) { + case 'b': case 'B': reg = X86_RBP; break; + case 's': case 'S': reg = X86_RSP; break; + } + break; + case 'b': case 'B': + switch (p[1]) { + case '8': reg = X86_R8B; break; + case '9': reg = X86_R9B; break; + } + break; + case 'w': case 'W': + switch (p[1]) { + case '8': reg = X86_R8W; break; + case '9': reg = X86_R9W; break; + } + break; + case 'd': case 'D': + switch (p[1]) { + case '8': reg = X86_R8D; break; + case '9': reg = X86_R9D; break; + } + break; + case '0': case '1': case '2': case '3': case '4': case '5': + if (p[1] == '1') { + const int r = p[2] - '0'; + switch (p[3]) { + case 'b': case 'B': reg = X86_R10B + r, ++len; break; + case 'w': case 'W': reg = X86_R10W + r, ++len; break; + case 'd': case 'D': reg = X86_R10D + r, ++len; break; + default: reg = X86_R10 + r; break; + } + } + break; + default: + switch (p[1]) { + case '8': reg = X86_R8, len = 2; break; + case '9': reg = X86_R9, len = 2; break; + } + break; + } + break; +#endif + case 'm': case 'M': + if ((p[1] == 'm' || p[1] == 'M') && isdigit(p[2])) + reg = X86_MM0 + (p[2] - '0'), len = 3; + break; + case 'x': case 'X': + if ((p[1] == 'm' || p[1] == 'M') && (p[2] == 'm' || p[2] == 'M')) { +#if X86_TARGET_64BIT + if (p[3] == '1' && isdigit(p[4])) + reg = X86_XMM10 + (p[4] - '0'), len = 5; + else +#endif + if (isdigit(p[3])) + reg = X86_XMM0 + (p[3] - '0'), len = 4; + } + break; + } + + if (len > 0 && reg != X86_NOREG) { + op->fill(optype, reg); + return len; + } + + return X86_NOREG; +} + +static unsigned long parse_imm(char *nptr, char **endptr, int base = 0) +{ + errno = 0; +#if X86_TARGET_64BIT + if (sizeof(unsigned long) != 8) { + unsigned long long val = strtoull(nptr, endptr, 0); + if (errno == 0) + return val; + abort(); + } +#endif + unsigned long val = strtoul(nptr, endptr, 0); + if (errno == 0) + return val; + abort(); + return 0; +} + +static int parse_mem(operand_t *op, char *buf) +{ + char *p = buf; + + if (strncmp(buf, "0x", 2) == 0) + op->disp = parse_imm(buf, &p, 16); + + if (*p == '(') { + p++; + + if (*p == '%') { + p++; + + int n = parse_reg(op, op_base, p); + if (n <= 0) + return -3; + p += n; + } + + if (*p == ',') { + p++; + + if (*p == '%') { + int n = parse_reg(op, op_index, ++p); + if (n <= 0) + return -4; + p += n; + + if (*p != ',') + return -5; + p++; + + goto do_parse_scale; + } + else if (isdigit(*p)) { + do_parse_scale: + long val = strtol(p, &p, 10); + if (val == 0 && errno == EINVAL) + abort(); + op->scale = val; + } + } + + if (*p != ')') + return -6; + p++; + } + + return p - buf; +} + +static void parse_insn(insn_t *ii, char *buf) +{ + char *p = buf; + ii->clear(); + +#if 0 + printf("BUF: %s\n", buf); +#endif + + if (strncmp(p, "rex64", 5) == 0) { + char *q = find_blanks(p); + if (verbose > 1) { + char prefix[16]; + memset(prefix, 0, sizeof(prefix)); + memcpy(prefix, p, q - p); + fprintf(stderr, "Instruction '%s', skip REX prefix '%s'\n", buf, prefix); + } + p = skip_blanks(q); + } + + if (strncmp(p, "rep", 3) == 0) { + char *q = find_blanks(p); + if (verbose > 1) { + char prefix[16]; + memset(prefix, 0, sizeof(prefix)); + memcpy(prefix, p, q - p); + fprintf(stderr, "Instruction '%s', skip REP prefix '%s'\n", buf, prefix); + } + p = skip_blanks(q); + } + + for (int i = 0; !isspace(*p); i++) + ii->name[i] = *p++; + + while (*p && isspace(*p)) + p++; + if (*p == '\0') + return; + + int n_operands = 0; + int optype = op_reg; + bool done = false; + while (!done) { + int n; + switch (*p) { + case '%': + n = parse_reg(&ii->operands[n_operands], optype, ++p); + if (n <= 0) { + fprintf(stderr, "parse_reg(%s) error %d\n", p, n); + abort(); + } + p += n; + break; + case '0': case '(': + n = parse_mem(&ii->operands[n_operands], p); + if (n <= 0) { + fprintf(stderr, "parse_mem(%s) error %d\n", p, n); + abort(); + } + p += n; + break; + case '$': { + ii->operands[n_operands].imm = parse_imm(++p, &p, 0); + break; + } + case '*': + p++; + break; + case ',': + n_operands++; + p++; + break; + case ' ': case '\t': + p++; + break; + case '\0': + done = true; + break; + default: + fprintf(stderr, "parse error> %s\n", p); + abort(); + } + } + ii->n_operands = n_operands + 1; +} + +static unsigned long n_tests, n_failures; +static unsigned long n_all_tests, n_all_failures; + +static bool check_unary(insn_t *ii, const char *name) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 0) { + fprintf(stderr, "ERROR: instruction expected 0 operand, got %d\n", ii->n_operands); + return false; + } + + return true; +} + +static bool check_reg(insn_t *ii, const char *name, int r) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 1) { + fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); + return false; + } + + int reg = ii->operands[0].reg; + + if (reg != r) { + fprintf(stderr, "ERROR: instruction expected r%d as source, got ", r); + if (reg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "r%d\n", reg); + return false; + } + + return true; +} + +static bool check_reg_reg(insn_t *ii, const char *name, int s, int d) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + int srcreg = ii->operands[0].reg; + int dstreg = ii->operands[1].reg; + + if (srcreg != s) { + fprintf(stderr, "ERROR: instruction expected r%d as source, got ", s); + if (srcreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "r%d\n", srcreg); + return false; + } + + if (dstreg != d) { + fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); + if (dstreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "r%d\n", dstreg); + return false; + } + + return true; +} + +static bool check_imm_reg(insn_t *ii, const char *name, uint32 v, int d, int mode = -1) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + uint32 imm = ii->operands[0].imm; + int dstreg = ii->operands[1].reg; + + if (mode == -1) { + char suffix = name[strlen(name) - 1]; + switch (suffix) { + case 'b': mode = 1; break; + case 'w': mode = 2; break; + case 'l': mode = 4; break; + case 'q': mode = 8; break; + } + } + switch (mode) { + case 1: v &= 0xff; break; + case 2: v &= 0xffff; break; + } + + if (imm != v) { + fprintf(stderr, "ERROR: instruction expected 0x%08x as immediate, got ", v); + if (imm == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "0x%08x\n", imm); + return false; + } + + if (dstreg != d) { + fprintf(stderr, "ERROR: instruction expected r%d as destination, got ", d); + if (dstreg == -1) + fprintf(stderr, "nothing\n"); + else + fprintf(stderr, "%d\n", dstreg); + return false; + } + + return true; +} + +static bool do_check_mem(insn_t *ii, uint32 D, int B, int I, int S, int Mpos) +{ + operand_t *mem = &ii->operands[Mpos]; + uint32 d = mem->disp; + int b = mem->base; + int i = mem->index; + int s = mem->scale; + + if (d != D) { + fprintf(stderr, "ERROR: instruction expected 0x%08x as displacement, got 0x%08x\n", D, d); + return false; + } + + if (b != B) { + fprintf(stderr, "ERROR: instruction expected r%d as base, got r%d\n", B, b); + return false; + } + + if (i != I) { + fprintf(stderr, "ERROR: instruction expected r%d as index, got r%d\n", I, i); + return false; + } + + if (s != S) { + fprintf(stderr, "ERROR: instruction expected %d as scale factor, got %d\n", S, s); + return false; + } + + return true; +} + +static bool check_mem(insn_t *ii, const char *name, uint32 D, int B, int I, int S) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 1) { + fprintf(stderr, "ERROR: instruction expected 1 operand, got %d\n", ii->n_operands); + return false; + } + + return do_check_mem(ii, D, B, I, S, 0); +} + +static bool check_mem_reg(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R, int Rpos = 1) +{ + if (strcasecmp(ii->name, name) != 0) { + fprintf(stderr, "ERROR: instruction mismatch, expected %s, got %s\n", name, ii->name); + return false; + } + + if (ii->n_operands != 2) { + fprintf(stderr, "ERROR: instruction expected 2 operands, got %d\n", ii->n_operands); + return false; + } + + if (!do_check_mem(ii, D, B, I, S, Rpos ^ 1)) + return false; + + int r = ii->operands[Rpos].reg; + + if (r != R) { + fprintf(stderr, "ERROR: instruction expected r%d as reg operand, got r%d\n", R, r); + return false; + } + + return true; +} + +static inline bool check_reg_mem(insn_t *ii, const char *name, uint32 D, int B, int I, int S, int R) +{ + return check_mem_reg(ii, name, D, B, I, S, R, 0); +} + +static void show_instruction(const char *buffer, const uint8 *bytes) +{ + if (verbose > 1) { + if (1) { + for (int j = 0; j < MAX_INSN_LENGTH; j++) + fprintf(stderr, "%02x ", bytes[j]); + fprintf(stderr, "| "); + } + fprintf(stderr, "%s\n", buffer); + } +} + +static void show_status(unsigned long n_tests) +{ +#if 1 + const unsigned long N_STEPS = 100000; + static const char cursors[] = { '-', '\\', '|', '/' }; + if ((n_tests % N_STEPS) == 0) { + printf(" %c (%d)\r", cursors[(n_tests/N_STEPS)%sizeof(cursors)], n_tests); + fflush(stdout); + } +#else + const unsigned long N_STEPS = 1000000; + if ((n_tests % N_STEPS) == 0) + printf(" ... %d\n", n_tests); +#endif +} + +int main(void) +{ + static char buffer[1024]; + static uint8 block[MAX_INSNS * MAX_INSN_LENGTH]; + static char *insns[MAX_INSNS]; + static int modes[MAX_INSNS]; + n_all_tests = n_all_failures = 0; + +#if TEST_INST_ALU_REG + printf("Testing reg forms\n"); + n_tests = n_failures = 0; + for (int r = 0; r < X86_MAX_ALU_REGS; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##r(r); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + if (VALID_REG8(r)) \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN64(INSN "q", GENOP##Q); \ +} while (0) + GENA("not", NOT); + GENA("neg", NEG); + GENA("mul", MUL); + GENA("imul", IMUL); + GENA("div", DIV); + GENA("idiv", IDIV); + GENA("dec", DEC); + GENA("inc", INC); + if (X86_TARGET_64BIT) { + GEN("callq", CALLs); + GEN("jmpq", JMPs); + GEN("pushq", PUSHQ); + GEN("popq", POPQ); + } + else { + GEN("calll", CALLs); + GEN("jmpl", JMPs); + GEN("pushl", PUSHL); + GEN("popl", POPL); + } + GEN("bswap", BSWAPL); // FIXME: disass bug? no suffix + GEN64("bswap", BSWAPQ); // FIXME: disass bug? no suffix + if (VALID_REG8(r)) { + GEN("seto", SETO); + GEN("setno", SETNO); + GEN("setb", SETB); + GEN("setae", SETAE); + GEN("sete", SETE); + GEN("setne", SETNE); + GEN("setbe", SETBE); + GEN("seta", SETA); + GEN("sets", SETS); + GEN("setns", SETNS); + GEN("setp", SETP); + GEN("setnp", SETNP); + GEN("setl", SETL); + GEN("setge", SETGE); + GEN("setle", SETLE); + GEN("setg", SETG); + } +#undef GENA +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg(&ii, insns[i], r)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_ALU_REG_REG + printf("Testing reg,reg forms\n"); + n_tests = n_failures = 0; + for (int s = 0; s < X86_MAX_ALU_REGS; s++) { + for (int d = 0; d < X86_MAX_ALU_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##rr(s, d); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) +#define GEN1(INSN, GENOP, OP) do { \ + insns[i++] = INSN; \ + GENOP##rr(OP, s, d); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + if (VALID_REG8(s) && VALID_REG8(d)) \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN64(INSN "q", GENOP##Q); \ +} while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GEN("btw", BTW); + GEN("btl", BTL); + GEN64("btq", BTQ); + GEN("btcw", BTCW); + GEN("btcl", BTCL); + GEN64("btcq", BTCQ); + GEN("btrw", BTRW); + GEN("btrl", BTRL); + GEN64("btrq", BTRQ); + GEN("btsw", BTSW); + GEN("btsl", BTSL); + GEN64("btsq", BTSQ); + GEN("imulw", IMULW); + GEN("imull", IMULL); + GEN64("imulq", IMULQ); + GEN1("cmove", CMOVW, X86_CC_Z); + GEN1("cmove", CMOVL, X86_CC_Z); + if (X86_TARGET_64BIT) + GEN1("cmove", CMOVQ, X86_CC_Z); + GENA("test", TEST); + GENA("cmpxchg", CMPXCHG); + GENA("xadd", XADD); + GENA("xchg", XCHG); + GEN("bsfw", BSFW); + GEN("bsfl", BSFL); + GEN64("bsfq", BSFQ); + GEN("bsrw", BSRW); + GEN("bsrl", BSRL); + GEN64("bsrq", BSRQ); + if (VALID_REG8(s)) { + GEN("movsbw", MOVSBW); + GEN("movsbl", MOVSBL); + GEN64("movsbq", MOVSBQ); + GEN("movzbw", MOVZBW); + GEN("movzbl", MOVZBL); + GEN64("movzbq", MOVZBQ); + } + GEN("movswl", MOVSWL); + GEN64("movswq", MOVSWQ); + GEN("movzwl", MOVZWL); + GEN64("movzwq", MOVZWQ); + GEN64("movslq", MOVSLQ); +#undef GENA +#undef GEN1 +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], s, d)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_ALU_CNT_REG + printf("Testing cl,reg forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < X86_MAX_ALU_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##rr(X86_CL, d); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + if (VALID_REG8(d)) \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN64(INSN "q", GENOP##Q); \ +} while (0) + GENA("rol", ROL); + GENA("ror", ROR); + GENA("rcl", RCL); + GENA("rcr", RCR); + GENA("shl", SHL); + GENA("shr", SHR); + GENA("sar", SAR); +#undef GENA +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], X86_CL, d)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + + static const uint32 imm_table[] = { + 0x00000000, 0x00000001, 0x00000002, 0x00000004, + 0x00000008, 0x00000010, 0x00000020, 0x00000040, + 0x00000080, 0x000000fe, 0x000000ff, 0x00000100, + 0x00000101, 0x00000102, 0xfffffffe, 0xffffffff, + 0x00000000, 0x10000000, 0x20000000, 0x30000000, + 0x40000000, 0x50000000, 0x60000000, 0x70000000, + 0x80000000, 0x90000000, 0xa0000000, 0xb0000000, + 0xc0000000, 0xd0000000, 0xe0000000, 0xf0000000, + 0xfffffffd, 0xfffffffe, 0xffffffff, 0x00000001, + 0x00000002, 0x00000003, 0x11111111, 0x22222222, + 0x33333333, 0x44444444, 0x55555555, 0x66666666, + 0x77777777, 0x88888888, 0x99999999, 0xaaaaaaaa, + 0xbbbbbbbb, 0xcccccccc, 0xdddddddd, 0xeeeeeeee, + }; + const int n_imm_tab_count = sizeof(imm_table)/sizeof(imm_table[0]); + +#if TEST_INST_ALU_IMM_REG + printf("Testing imm,reg forms\n"); + n_tests = n_failures = 0; + for (int j = 0; j < n_imm_tab_count; j++) { + const uint32 value = imm_table[j]; + for (int d = 0; d < X86_MAX_ALU_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = -1; \ + i++; GENOP##ir(value, d); \ + } while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ + } while (0) +#define GENM(INSN, GENOP, MODE) do { \ + insns[i] = INSN; \ + modes[i] = MODE; \ + i++; GENOP##ir(value, d); \ + } while (0) +#define GENM64(INSN, GENOP, MODE) do { \ + if (X86_TARGET_64BIT) \ + GENM(INSN, GENOP, MODE); \ + } while (0) +#define GENA(INSN, GENOP) do { \ + if (VALID_REG8(d)) \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN64(INSN "q", GENOP##Q); \ + } while (0) +#define GENAM(INSN, GENOP, MODE) do { \ + if (VALID_REG8(d)) \ + GENM(INSN "b", GENOP##B, MODE); \ + GENM(INSN "w", GENOP##W, MODE); \ + GENM(INSN "l", GENOP##L, MODE); \ + GENM64(INSN "q", GENOP##Q, MODE); \ + } while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GENM("btw", BTW, 1); + GENM("btl", BTL, 1); + GENM64("btq", BTQ, 1); + GENM("btcw", BTCW, 1); + GENM("btcl", BTCL, 1); + GENM64("btcq", BTCQ, 1); + GENM("btrw", BTRW, 1); + GENM("btrl", BTRL, 1); + GENM64("btrq", BTRQ, 1); + GENM("btsw", BTSW, 1); + GENM("btsl", BTSL, 1); + GENM64("btsq", BTSQ, 1); + if (value != 1) { + GENAM("rol", ROL, 1); + GENAM("ror", ROR, 1); + GENAM("rcl", RCL, 1); + GENAM("rcr", RCR, 1); + GENAM("shl", SHL, 1); + GENAM("shr", SHR, 1); + GENAM("sar", SAR, 1); + } + GENA("test", TEST); +#undef GENAM +#undef GENA +#undef GENM64 +#undef GENM +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + + static const uint32 off_table[] = { + 0x00000000, + 0x00000001, + 0x00000040, + 0x00000080, + 0x000000ff, + 0x00000100, + 0xfffffffe, + 0xffffffff, + }; + const int off_table_count = sizeof(off_table) / sizeof(off_table[0]); + +#if TEST_INST_ALU_MEM_REG + printf("Testing mem,reg forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < off_table_count; d++) { + const uint32 D = off_table[d]; + for (int B = -1; B < X86_MAX_ALU_REGS; B++) { + for (int I = -1; I < X86_MAX_ALU_REGS; I++) { + if (I == X86_RSP) + continue; + for (int S = 1; S < 16; S *= 2) { + if (I == -1 && S > 1) + continue; + for (int r = 0; r < X86_MAX_ALU_REGS; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##mr(D, B, I, S, r); \ + } while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ + } while (0) +#define GENA(INSN, GENOP) do { \ + if (VALID_REG8(r)) \ + GEN(INSN "b", GENOP##B); \ + GEN(INSN "w", GENOP##W); \ + GEN(INSN "l", GENOP##L); \ + GEN64(INSN "q", GENOP##Q); \ + } while (0) + GENA("adc", ADC); + GENA("add", ADD); + GENA("and", AND); + GENA("cmp", CMP); + GENA("or", OR); + GENA("sbb", SBB); + GENA("sub", SUB); + GENA("xor", XOR); + GENA("mov", MOV); + GEN("imulw", IMULW); + GEN("imull", IMULL); + GEN64("imulq", IMULQ); + GEN("bsfw", BSFW); + GEN("bsfl", BSFL); + GEN64("bsfq", BSFQ); + GEN("bsrw", BSRW); + GEN("bsrl", BSRL); + GEN64("bsrq", BSRQ); + GEN("movsbw", MOVSBW); + GEN("movsbl", MOVSBL); + GEN64("movsbq", MOVSBQ); + GEN("movzbw", MOVZBW); + GEN("movzbl", MOVZBL); + GEN64("movzbq", MOVZBQ); + GEN("movswl", MOVSWL); + GEN64("movswq", MOVSWQ); + GEN("movzwl", MOVZWL); + GEN64("movzwq", MOVZWQ); + GEN64("movslq", MOVSLQ); +#undef GENA +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + show_status(n_tests); + } + if (i != last_insn) + abort(); + } + } + } + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_FPU_UNARY + printf("Testing FPU unary forms\n"); + n_tests = n_failures = 0; + { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP(); \ +} while (0) + GEN("f2xm1", F2XM1); + GEN("fabs", FABS); + GEN("fchs", FCHS); + GEN("fcompp", FCOMPP); + GEN("fcos", FCOS); + GEN("fdecstp", FDECSTP); + GEN("fincstp", FINCSTP); + GEN("fld1", FLD1); + GEN("fldl2t", FLDL2T); + GEN("fldl2e", FLDL2E); + GEN("fldpi", FLDPI); + GEN("fldlg2", FLDLG2); + GEN("fldln2", FLDLN2); + GEN("fldz", FLDZ); + GEN("fnop", FNOP); + GEN("fpatan", FPATAN); + GEN("fprem", FPREM); + GEN("fprem1", FPREM1); + GEN("fptan", FPTAN); + GEN("frndint", FRNDINT); + GEN("fscale", FSCALE); + GEN("fsin", FSIN); + GEN("fsincos", FSINCOS); + GEN("fsqrt", FSQRT); + GEN("ftst", FTST); + GEN("fucompp", FUCOMPP); + GEN("fxam", FXAM); + GEN("fxtract", FXTRACT); + GEN("fyl2x", FYL2X); + GEN("fyl2xp1", FYL2XP1); +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_unary(&ii, insns[i])) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_FPU_REG + printf("Testing FPU reg forms\n"); + n_tests = n_failures = 0; + for (int r = 0; r < X86_MAX_FPU_REGS; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GENr(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 0; \ + i++, GENOP##r(r); \ +} while (0) +#define GENr0(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 1; \ + i++, GENOP##r0(r); \ +} while (0) +#define GEN0r(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 2; \ + i++, GENOP##0r(r); \ +} while (0) + GENr("fcom", FCOM); + GENr("fcomp", FCOMP); + GENr("ffree", FFREE); + GENr("fxch", FXCH); + GENr("fst", FST); + GENr("fstp", FSTP); + GENr("fucom", FUCOM); + GENr("fucomp", FUCOMP); + GENr0("fadd", FADD); + GENr0("fcmovb", FCMOVB); + GENr0("fcmove", FCMOVE); + GENr0("fcmovbe", FCMOVBE); + GENr0("fcmovu", FCMOVU); + GENr0("fcmovnb", FCMOVNB); + GENr0("fcmovne", FCMOVNE); + GENr0("fcmovnbe", FCMOVNBE); + GENr0("fcmovnu", FCMOVNU); + GENr0("fcomi", FCOMI); + GENr0("fcomip", FCOMIP); + GENr0("fucomi", FUCOMI); + GENr0("fucomip", FUCOMIP); + GENr0("fdiv", FDIV); + GENr0("fdivr", FDIVR); + GENr0("fmul", FMUL); + GENr0("fsub", FSUB); + GENr0("fsubr", FSUBR); +#undef GEN0r +#undef GENr0 +#undef GENr + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + switch (modes[i]) { + case 0: + if (!check_reg(&ii, insns[i], r)) { + show_instruction(buffer, p); + n_failures++; + } + break; + case 1: + if (!check_reg_reg(&ii, insns[i], r, 0)) { + show_instruction(buffer, p); + n_failures++; + } + break; + case 2: + if (!check_reg_reg(&ii, insns[i], 0, r)) { + show_instruction(buffer, p); + n_failures++; + } + break; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_FPU_MEM + printf("Testing FPU mem forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < off_table_count; d++) { + const uint32 D = off_table[d]; + for (int B = -1; B < X86_MAX_ALU_REGS; B++) { + for (int I = -1; I < X86_MAX_ALU_REGS; I++) { + if (I == X86_RSP) + continue; + for (int S = 1; S < 16; S *= 2) { + if (I == -1 && S > 1) + continue; + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##m(D, B, I, S); \ +} while (0) + GEN("fadds", FADDS); + GEN("faddl", FADDD); + GEN("fiadd", FIADDW); + GEN("fiaddl", FIADDL); + GEN("fbld", FBLD); + GEN("fbstp", FBSTP); + GEN("fcoms", FCOMS); + GEN("fcoml", FCOMD); + GEN("fcomps", FCOMPS); + GEN("fcompl", FCOMPD); + GEN("fdivs", FDIVS); + GEN("fdivl", FDIVD); + GEN("fidiv", FIDIVW); + GEN("fidivl", FIDIVL); + GEN("fdivrs", FDIVRS); + GEN("fdivrl", FDIVRD); + GEN("fidivr", FIDIVRW); + GEN("fidivrl", FIDIVRL); + GEN("ficom", FICOMW); + GEN("ficoml", FICOML); + GEN("ficomp", FICOMPW); + GEN("ficompl", FICOMPL); + GEN("fild", FILDW); + GEN("fildl", FILDL); + GEN("fildll", FILDQ); + GEN("fist", FISTW); + GEN("fistl", FISTL); + GEN("fistp", FISTPW); + GEN("fistpl", FISTPL); + GEN("fistpll", FISTPQ); + GEN("fisttp", FISTTPW); + GEN("fisttpl", FISTTPL); + GEN("fisttpll", FISTTPQ); + GEN("flds", FLDS); + GEN("fldl", FLDD); + GEN("fldt", FLDT); + GEN("fmuls", FMULS); + GEN("fmull", FMULD); + GEN("fimul", FIMULW); + GEN("fimull", FIMULL); + GEN("fsts", FSTS); + GEN("fstl", FSTD); + GEN("fstps", FSTPS); + GEN("fstpl", FSTPD); + GEN("fstpt", FSTPT); + GEN("fsubs", FSUBS); + GEN("fsubl", FSUBD); + GEN("fisub", FISUBW); + GEN("fisubl", FISUBL); + GEN("fsubrs", FSUBRS); + GEN("fsubrl", FSUBRD); + GEN("fisubr", FISUBRW); + GEN("fisubrl", FISUBRL); +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_mem(&ii, insns[i], D, B, I, S)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + show_status(n_tests); + } + if (i != last_insn) + abort(); + } + } + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_MMX_REG_REG + printf("Testing MMX reg,reg forms\n"); + n_tests = n_failures = 0; + for (int s = 0; s < X86_MAX_MMX_REGS; s++) { + for (int d = 0; d < X86_MAX_MMX_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + MMX_##GENOP##rr(s, d); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) + GEN("movq", MOVQ); + GEN("packsswb", PACKSSWB); + GEN("packssdw", PACKSSDW); + GEN("packuswb", PACKUSWB); + GEN("paddb", PADDB); + GEN("paddw", PADDW); + GEN("paddd", PADDD); + GEN("paddq", PADDQ); + GEN("paddsb", PADDSB); + GEN("paddsw", PADDSW); + GEN("paddusb", PADDUSB); + GEN("paddusw", PADDUSW); + GEN("pand", PAND); + GEN("pandn", PANDN); + GEN("pavgb", PAVGB); + GEN("pavgw", PAVGW); + GEN("pcmpeqb", PCMPEQB); + GEN("pcmpeqw", PCMPEQW); + GEN("pcmpeqd", PCMPEQD); + GEN("pcmpgtb", PCMPGTB); + GEN("pcmpgtw", PCMPGTW); + GEN("pcmpgtd", PCMPGTD); + GEN("pmaddwd", PMADDWD); + GEN("pmaxsw", PMAXSW); + GEN("pmaxub", PMAXUB); + GEN("pminsw", PMINSW); + GEN("pminub", PMINUB); + GEN("pmulhuw", PMULHUW); + GEN("pmulhw", PMULHW); + GEN("pmullw", PMULLW); + GEN("pmuludq", PMULUDQ); + GEN("por", POR); + GEN("psadbw", PSADBW); + GEN("psllw", PSLLW); + GEN("pslld", PSLLD); + GEN("psllq", PSLLQ); + GEN("psraw", PSRAW); + GEN("psrad", PSRAD); + GEN("psrlw", PSRLW); + GEN("psrld", PSRLD); + GEN("psrlq", PSRLQ); + GEN("psubb", PSUBB); + GEN("psubw", PSUBW); + GEN("psubd", PSUBD); + GEN("psubq", PSUBQ); + GEN("psubsb", PSUBSB); + GEN("psubsw", PSUBSW); + GEN("psubusb", PSUBUSB); + GEN("psubusw", PSUBUSW); + GEN("punpckhbw", PUNPCKHBW); + GEN("punpckhwd", PUNPCKHWD); + GEN("punpckhdq", PUNPCKHDQ); + GEN("punpcklbw", PUNPCKLBW); + GEN("punpcklwd", PUNPCKLWD); + GEN("punpckldq", PUNPCKLDQ); + GEN("pxor", PXOR); + GEN("pabsb", PABSB); + GEN("pabsw", PABSW); + GEN("pabsd", PABSD); + GEN("phaddw", PHADDW); + GEN("phaddd", PHADDD); + GEN("phaddsw", PHADDSW); + GEN("phsubw", PHSUBW); + GEN("phsubd", PHSUBD); + GEN("phsubsw", PHSUBSW); + GEN("pmaddubsw", PMADDUBSW); + GEN("pmulhrsw", PMULHRSW); + GEN("pshufb", PSHUFB); + GEN("psignb", PSIGNB); + GEN("psignw", PSIGNW); + GEN("psignd", PSIGND); +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], s, d)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + + static const uint8 imm8_table[] = { + 0x00, 0x01, 0x02, 0x03, + 0x06, 0x07, 0x08, 0x09, + 0x0e, 0x0f, 0x10, 0x11, + 0x1e, 0x1f, 0x20, 0x21, + 0xfc, 0xfd, 0xfe, 0xff, + }; + const int n_imm8_tab_count = sizeof(imm8_table)/sizeof(imm8_table[0]); + +#if TEST_INST_MMX_IMM_REG + printf("Testing imm,reg forms\n"); + n_tests = n_failures = 0; + for (int j = 0; j < n_imm8_tab_count; j++) { + const uint8 value = imm8_table[j]; + for (int d = 0; d < X86_MAX_MMX_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 1; \ + i++; MMX_##GENOP##ir(value, d); \ +} while (0) + GEN("psllw", PSLLW); + GEN("pslld", PSLLD); + GEN("psllq", PSLLQ); + GEN("psraw", PSRAW); + GEN("psrad", PSRAD); + GEN("psrlw", PSRLW); + GEN("psrld", PSRLD); + GEN("psrlq", PSRLQ); +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_imm_reg(&ii, insns[i], value, d, modes[i])) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_MMX_MEM_REG + printf("Testing MMX mem,reg forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < off_table_count; d++) { + const uint32 D = off_table[d]; + for (int B = -1; B < X86_MAX_ALU_REGS; B++) { + for (int I = -1; I < X86_MAX_ALU_REGS; I++) { + if (I == X86_RSP) + continue; + for (int S = 1; S < 16; S *= 2) { + if (I == -1 && S > 1) + continue; + for (int r = 0; r < X86_MAX_MMX_REGS; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define _GENrm(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 0; \ + i++; MMX_##GENOP##rm(r, D, B, I, S); \ +} while (0) +#define _GENmr(INSN, GENOP) do { \ + insns[i] = INSN; \ + modes[i] = 1; \ + i++; MMX_##GENOP##mr(D, B, I, S, r); \ +} while (0) +#define GEN(INSN, GENOP) do { \ + _GENmr(INSN, GENOP); \ +} while (0) + _GENmr("movd", MOVD); + _GENrm("movd", MOVD); + _GENmr("movq", MOVQ); + _GENrm("movq", MOVQ); + GEN("packsswb", PACKSSWB); + GEN("packssdw", PACKSSDW); + GEN("packuswb", PACKUSWB); + GEN("paddb", PADDB); + GEN("paddw", PADDW); + GEN("paddd", PADDD); + GEN("paddq", PADDQ); + GEN("paddsb", PADDSB); + GEN("paddsw", PADDSW); + GEN("paddusb", PADDUSB); + GEN("paddusw", PADDUSW); + GEN("pand", PAND); + GEN("pandn", PANDN); + GEN("pavgb", PAVGB); + GEN("pavgw", PAVGW); + GEN("pcmpeqb", PCMPEQB); + GEN("pcmpeqw", PCMPEQW); + GEN("pcmpeqd", PCMPEQD); + GEN("pcmpgtb", PCMPGTB); + GEN("pcmpgtw", PCMPGTW); + GEN("pcmpgtd", PCMPGTD); + GEN("pmaddwd", PMADDWD); + GEN("pmaxsw", PMAXSW); + GEN("pmaxub", PMAXUB); + GEN("pminsw", PMINSW); + GEN("pminub", PMINUB); + GEN("pmulhuw", PMULHUW); + GEN("pmulhw", PMULHW); + GEN("pmullw", PMULLW); + GEN("pmuludq", PMULUDQ); + GEN("por", POR); + GEN("psadbw", PSADBW); + GEN("psllw", PSLLW); + GEN("pslld", PSLLD); + GEN("psllq", PSLLQ); + GEN("psraw", PSRAW); + GEN("psrad", PSRAD); + GEN("psrlw", PSRLW); + GEN("psrld", PSRLD); + GEN("psrlq", PSRLQ); + GEN("psubb", PSUBB); + GEN("psubw", PSUBW); + GEN("psubd", PSUBD); + GEN("psubq", PSUBQ); + GEN("psubsb", PSUBSB); + GEN("psubsw", PSUBSW); + GEN("psubusb", PSUBUSB); + GEN("psubusw", PSUBUSW); + GEN("punpckhbw", PUNPCKHBW); + GEN("punpckhwd", PUNPCKHWD); + GEN("punpckhdq", PUNPCKHDQ); + GEN("punpcklbw", PUNPCKLBW); + GEN("punpcklwd", PUNPCKLWD); + GEN("punpckldq", PUNPCKLDQ); + GEN("pxor", PXOR); + GEN("pabsb", PABSB); + GEN("pabsw", PABSW); + GEN("pabsd", PABSD); + GEN("phaddw", PHADDW); + GEN("phaddd", PHADDD); + GEN("phaddsw", PHADDSW); + GEN("phsubw", PHSUBW); + GEN("phsubd", PHSUBD); + GEN("phsubsw", PHSUBSW); + GEN("pmaddubsw", PMADDUBSW); + GEN("pmulhrsw", PMULHRSW); + GEN("pshufb", PSHUFB); + GEN("psignb", PSIGNB); + GEN("psignw", PSIGNW); + GEN("psignd", PSIGND); +#undef GEN +#undef _GENmr +#undef _GENrm + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_mem_reg(&ii, insns[i], D, B, I, S, r, modes[i])) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + show_status(n_tests); + } + if (i != last_insn) + abort(); + } + } + } + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_SSE_REG_REG + printf("Testing SSE reg,reg forms\n"); + n_tests = n_failures = 0; + for (int s = 0; s < X86_MAX_SSE_REGS; s++) { + for (int d = 0; d < X86_MAX_SSE_REGS; d++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##rr(s, d); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) +#define GEN1(INSN, GENOP) do { \ + GEN(INSN "s", GENOP##S); \ + GEN(INSN "d", GENOP##D); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + GEN1(INSN "s", GENOP##S); \ + GEN1(INSN "p", GENOP##P); \ +} while (0) +#define GENI(INSN, GENOP, IMM) do { \ + insns[i++] = INSN; \ + GENOP##rr(IMM, s, d); \ +} while (0) +#define GENI1(INSN, GENOP, IMM) do { \ + GENI(INSN "s", GENOP##S, IMM); \ + GENI(INSN "d", GENOP##D, IMM); \ +} while (0) +#define GENIA(INSN, GENOP, IMM) do { \ + GENI1(INSN "s", GENOP##S, IMM); \ + GENI1(INSN "p", GENOP##P, IMM); \ +} while (0) + GEN1("andp", ANDP); + GEN1("andnp", ANDNP); + GEN1("orp", ORP); + GEN1("xorp", XORP); + GENA("add", ADD); + GENA("sub", SUB); + GENA("mul", MUL); + GENA("div", DIV); + GEN1("comis", COMIS); + GEN1("ucomis", UCOMIS); + GENA("min", MIN); + GENA("max", MAX); + GEN("rcpss", RCPSS); + GEN("rcpps", RCPPS); + GEN("rsqrtss", RSQRTSS); + GEN("rsqrtps", RSQRTPS); + GENA("sqrt", SQRT); + GENIA("cmpeq", CMP, X86_SSE_CC_EQ); + GENIA("cmplt", CMP, X86_SSE_CC_LT); + GENIA("cmple", CMP, X86_SSE_CC_LE); + GENIA("cmpunord", CMP, X86_SSE_CC_U); + GENIA("cmpneq", CMP, X86_SSE_CC_NEQ); + GENIA("cmpnlt", CMP, X86_SSE_CC_NLT); + GENIA("cmpnle", CMP, X86_SSE_CC_NLE); + GENIA("cmpord", CMP, X86_SSE_CC_O); + GEN1("movap", MOVAP); + GEN("movdqa", MOVDQA); + GEN("movdqu", MOVDQU); + GEN("movd", MOVDXD); + GEN64("movd", MOVQXD); // FIXME: disass bug? "movq" expected + GEN("movd", MOVDXS); + GEN64("movd", MOVQXS); // FIXME: disass bug? "movq" expected + GEN("cvtdq2pd", CVTDQ2PD); + GEN("cvtdq2ps", CVTDQ2PS); + GEN("cvtpd2dq", CVTPD2DQ); + GEN("cvtpd2ps", CVTPD2PS); + GEN("cvtps2dq", CVTPS2DQ); + GEN("cvtps2pd", CVTPS2PD); + GEN("cvtsd2si", CVTSD2SIL); + GEN64("cvtsd2siq", CVTSD2SIQ); + GEN("cvtsd2ss", CVTSD2SS); + GEN("cvtsi2sd", CVTSI2SDL); + GEN64("cvtsi2sdq", CVTSI2SDQ); + GEN("cvtsi2ss", CVTSI2SSL); + GEN64("cvtsi2ssq", CVTSI2SSQ); + GEN("cvtss2sd", CVTSS2SD); + GEN("cvtss2si", CVTSS2SIL); + GEN64("cvtss2siq", CVTSS2SIQ); + GEN("cvttpd2dq", CVTTPD2DQ); + GEN("cvttps2dq", CVTTPS2DQ); + GEN("cvttsd2si", CVTTSD2SIL); + GEN64("cvttsd2siq", CVTTSD2SIQ); + GEN("cvttss2si", CVTTSS2SIL); + GEN64("cvttss2siq", CVTTSS2SIQ); + if (s < 8) { + // MMX source register + GEN("cvtpi2pd", CVTPI2PD); + GEN("cvtpi2ps", CVTPI2PS); + } + if (d < 8) { + // MMX dest register + GEN("cvtpd2pi", CVTPD2PI); + GEN("cvtps2pi", CVTPS2PI); + GEN("cvttpd2pi", CVTTPD2PI); + GEN("cvttps2pi", CVTTPS2PI); + } +#undef GENIA +#undef GENI1 +#undef GENI +#undef GENA +#undef GEN1 +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_reg_reg(&ii, insns[i], s, d)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + } + if (i != last_insn) + abort(); + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + +#if TEST_INST_SSE_MEM_REG + printf("Testing SSE mem,reg forms\n"); + n_tests = n_failures = 0; + for (int d = 0; d < off_table_count; d++) { + const uint32 D = off_table[d]; + for (int B = -1; B < X86_MAX_ALU_REGS; B++) { + for (int I = -1; I < X86_MAX_ALU_REGS; I++) { + if (I == X86_RSP) + continue; + for (int S = 1; S < 16; S *= 2) { + if (I == -1 && S > 1) + continue; + for (int r = 0; r < X86_MAX_SSE_REGS; r++) { + set_target(block); + uint8 *b = get_target(); + int i = 0; +#define GEN(INSN, GENOP) do { \ + insns[i++] = INSN; \ + GENOP##mr(D, B, I, S, r); \ +} while (0) +#define GEN64(INSN, GENOP) do { \ + if (X86_TARGET_64BIT) \ + GEN(INSN, GENOP); \ +} while (0) +#define GEN1(INSN, GENOP) do { \ + GEN(INSN "s", GENOP##S); \ + GEN(INSN "d", GENOP##D); \ +} while (0) +#define GENA(INSN, GENOP) do { \ + GEN1(INSN "s", GENOP##S); \ + GEN1(INSN "p", GENOP##P); \ +} while (0) +#define GENI(INSN, GENOP, IMM) do { \ + insns[i++] = INSN; \ + GENOP##mr(IMM, D, B, I, S, r); \ +} while (0) +#define GENI1(INSN, GENOP, IMM) do { \ + GENI(INSN "s", GENOP##S, IMM); \ + GENI(INSN "d", GENOP##D, IMM); \ +} while (0) +#define GENIA(INSN, GENOP, IMM) do { \ + GENI1(INSN "s", GENOP##S, IMM); \ + GENI1(INSN "p", GENOP##P, IMM); \ +} while (0) + GEN1("andp", ANDP); + GEN1("andnp", ANDNP); + GEN1("orp", ORP); + GEN1("xorp", XORP); + GENA("add", ADD); + GENA("sub", SUB); + GENA("mul", MUL); + GENA("div", DIV); + GEN1("comis", COMIS); + GEN1("ucomis", UCOMIS); + GENA("min", MIN); + GENA("max", MAX); + GEN("rcpss", RCPSS); + GEN("rcpps", RCPPS); + GEN("rsqrtss", RSQRTSS); + GEN("rsqrtps", RSQRTPS); + GENA("sqrt", SQRT); + GENIA("cmpeq", CMP, X86_SSE_CC_EQ); + GENIA("cmplt", CMP, X86_SSE_CC_LT); + GENIA("cmple", CMP, X86_SSE_CC_LE); + GENIA("cmpunord", CMP, X86_SSE_CC_U); + GENIA("cmpneq", CMP, X86_SSE_CC_NEQ); + GENIA("cmpnlt", CMP, X86_SSE_CC_NLT); + GENIA("cmpnle", CMP, X86_SSE_CC_NLE); + GENIA("cmpord", CMP, X86_SSE_CC_O); + GEN1("movap", MOVAP); + GEN("movdqa", MOVDQA); + GEN("movdqu", MOVDQU); +#if 0 + // FIXME: extraneous REX bits generated + GEN("movd", MOVDXD); + GEN64("movd", MOVQXD); // FIXME: disass bug? "movq" expected +#endif + GEN("cvtdq2pd", CVTDQ2PD); + GEN("cvtdq2ps", CVTDQ2PS); + GEN("cvtpd2dq", CVTPD2DQ); + GEN("cvtpd2ps", CVTPD2PS); + GEN("cvtps2dq", CVTPS2DQ); + GEN("cvtps2pd", CVTPS2PD); + GEN("cvtsd2si", CVTSD2SIL); + GEN64("cvtsd2siq", CVTSD2SIQ); + GEN("cvtsd2ss", CVTSD2SS); + GEN("cvtsi2sd", CVTSI2SDL); + GEN64("cvtsi2sdq", CVTSI2SDQ); + GEN("cvtsi2ss", CVTSI2SSL); + GEN64("cvtsi2ssq", CVTSI2SSQ); + GEN("cvtss2sd", CVTSS2SD); + GEN("cvtss2si", CVTSS2SIL); + GEN64("cvtss2siq", CVTSS2SIQ); + GEN("cvttpd2dq", CVTTPD2DQ); + GEN("cvttps2dq", CVTTPS2DQ); + GEN("cvttsd2si", CVTTSD2SIL); + GEN64("cvttsd2siq", CVTTSD2SIQ); + GEN("cvttss2si", CVTTSS2SIL); + GEN64("cvttss2siq", CVTTSS2SIQ); + if (r < 8) { + // MMX dest register + GEN("cvtpd2pi", CVTPD2PI); + GEN("cvtps2pi", CVTPS2PI); + GEN("cvttpd2pi", CVTTPD2PI); + GEN("cvttps2pi", CVTTPS2PI); + } +#undef GENIA +#undef GENI1 +#undef GENI +#undef GENA +#undef GEN1 +#undef GEN64 +#undef GEN + int last_insn = i; + uint8 *e = get_target(); + + uint8 *p = b; + i = 0; + while (p < e) { + int n = disass_x86(buffer, (uintptr)p); + insn_t ii; + parse_insn(&ii, buffer); + + if (!check_mem_reg(&ii, insns[i], D, B, I, S, r)) { + show_instruction(buffer, p); + n_failures++; + } + + p += n; + i += 1; + n_tests++; + show_status(n_tests); + } + if (i != last_insn) + abort(); + } + } + } + } + } + printf(" done %ld/%ld\n", n_tests - n_failures, n_tests); + n_all_tests += n_tests; + n_all_failures += n_failures; +#endif + + printf("\n"); + printf("All %ld tests run, %ld failures\n", n_all_tests, n_all_failures); +} diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h new file mode 100644 index 000000000..cd588ec10 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -0,0 +1,102 @@ +/* + * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (UAE 0.8.10 version) + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 CPU_EMULATION_H +#define CPU_EMULATION_H + +#include + + +/* + * Memory system + */ + +// RAM and ROM pointers (allocated and set by main_*.cpp) +extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 +extern uint8 *RAMBaseHost; // RAM base (host address space) +extern uint32 RAMSize; // Size of RAM + +extern uint32 ROMBaseMac; // ROM base (Mac address space) +extern uint8 *ROMBaseHost; // ROM base (host address space) +extern uint32 ROMSize; // Size of ROM + +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +// If we are not using real or direct addressing, the Mac frame buffer gets +// mapped to this location. The memory must be allocated by VideoInit(). +// If multiple monitors are used, they must share the frame buffer +const uint32 MacFrameBaseMac = 0xa0000000; +extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) +extern uint32 MacFrameSize; // Size of frame buffer +#endif +extern int MacFrameLayout; // Frame buffer layout (see defines below) + +// Possible frame buffer layouts +enum { + FLAYOUT_NONE, // No frame buffer + FLAYOUT_DIRECT, // Frame buffer is in MacOS layout, no conversion needed + FLAYOUT_HOST_555, // 16 bit, RGB 555, host byte order + FLAYOUT_HOST_565, // 16 bit, RGB 565, host byte order + FLAYOUT_HOST_888 // 32 bit, RGB 888, host byte order +}; + +// Mac memory access functions +#include "memory.h" +static inline uint32 ReadMacInt32(uint32 addr) {return get_long(addr);} +static inline uint32 ReadMacInt16(uint32 addr) {return get_word(addr);} +static inline uint32 ReadMacInt8(uint32 addr) {return get_byte(addr);} +static inline void WriteMacInt32(uint32 addr, uint32 l) {put_long(addr, l);} +static inline void WriteMacInt16(uint32 addr, uint32 w) {put_word(addr, w);} +static inline void WriteMacInt8(uint32 addr, uint32 b) {put_byte(addr, b);} +static inline uint8 *Mac2HostAddr(uint32 addr) {return get_real_address(addr);} +static inline uint32 Host2MacAddr(uint8 *addr) {return get_virtual_address(addr);} + +static inline void *Mac_memset(uint32 addr, int c, size_t n) {return memset(Mac2HostAddr(addr), c, n);} +static inline void *Mac2Host_memcpy(void *dest, uint32 src, size_t n) {return memcpy(dest, Mac2HostAddr(src), n);} +static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {return memcpy(Mac2HostAddr(dest), src, n);} +static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return memcpy(Mac2HostAddr(dest), Mac2HostAddr(src), n);} + + +/* + * 680x0 emulation + */ + +// Initialization +extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation +extern void Exit680x0(void); +extern void InitFrameBufferMapping(void); + +// 680x0 dynamic recompilation activation flag +#if USE_JIT +extern bool UseJIT; +#else +const bool UseJIT = false; +#endif + +// 680x0 emulation functions +struct M68kRegisters; +extern void Start680x0(void); // Reset and start 680x0 +extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine +extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine + +// Interrupt functions +extern void TriggerInterrupt(void); // Trigger interrupt level 1 (InterruptFlag must be set first) +extern void TriggerNMI(void); // Trigger interrupt level 7 + +#endif diff --git a/BasiliskII/src/uae_cpu/cpuopti.c b/BasiliskII/src/uae_cpu/cpuopti.c new file mode 100644 index 000000000..28ba7c226 --- /dev/null +++ b/BasiliskII/src/uae_cpu/cpuopti.c @@ -0,0 +1,312 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * cpuopti.c - Small optimizer for cpu*.s files + * Based on work by Tauno Taipaleenmaki + * + * Copyright 1996 Bernd Schmidt + * + * 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 +#include +#include + +#include "sysdeps.h" + +struct line { + struct line *next, *prev; + int delet; + char *data; +}; + +struct func { + struct line *first_line, *last_line; + int initial_offset; +}; + +static void oops(void) +{ + fprintf(stderr, "Don't know how to optimize this file.\n"); + exit(1); +} + +static char * match(struct line *l, const char *m) +{ + char *str = l->data; + int len = strlen(m); + while (isspace(*str)) + str++; + + if (strncmp(str, m, len) != 0) + return NULL; + return str + len; +} + +static int insn_references_reg (struct line *l, char *reg) +{ + if (reg[0] != 'e') { + fprintf(stderr, "Unknown register?!?\n"); + exit(1); + } + if (strstr (l->data, reg) != 0) + return 1; + if (strstr (l->data, reg+1) != 0) + return 1; + if (strcmp (reg, "eax") == 0 + && (strstr (l->data, "%al") != 0 || strstr (l->data, "%ah") != 0)) + return 1; + if (strcmp (reg, "ebx") == 0 + && (strstr (l->data, "%bl") != 0 || strstr (l->data, "%bh") != 0)) + return 1; + if (strcmp (reg, "ecx") == 0 + && (strstr (l->data, "%cl") != 0 || strstr (l->data, "%ch") != 0)) + return 1; + if (strcmp (reg, "edx") == 0 + && (strstr (l->data, "%dl") != 0 || strstr (l->data, "%dh") != 0)) + return 1; + return 0; +} + +static void do_function(struct func *f) +{ + int v; + int pops_at_end = 0; + struct line *l, *l1, *fl, *l2; + char *s, *s2; + int in_pop_area = 1; + + f->initial_offset = 0; + + l = f->last_line; + fl = f->first_line; + + if (match(l,".LFE")) + l = l->prev; + if (!match(l,"ret")) + oops(); + + while (!match(fl, "op_")) + fl = fl->next; + fl = fl->next; + + /* Try reordering the insns at the end of the function so that the + * pops are all at the end. */ + l2 = l->prev; + /* Tolerate one stack adjustment */ + if (match (l2, "addl $") && strstr(l2->data, "esp") != 0) + l2 = l2->prev; + for (;;) { + char *forbidden_reg; + struct line *l3, *l4; + + while (match (l2, "popl %")) + l2 = l2->prev; + + l3 = l2; + for (;;) { + forbidden_reg = match (l3, "popl %"); + if (forbidden_reg) + break; + if (l3 == fl) + goto reordered; + /* Jumps and labels put an end to our attempts... */ + if (strstr (l3->data, ".L") != 0) + goto reordered; + /* Likewise accesses to the stack pointer... */ + if (strstr (l3->data, "esp") != 0) + goto reordered; + /* Function calls... */ + if (strstr (l3->data, "call") != 0) + goto reordered; + l3 = l3->prev; + } + if (l3 == l2) + exit(1); + for (l4 = l2; l4 != l3; l4 = l4->prev) { + /* The register may not be referenced by any of the insns that we + * move the popl past */ + if (insn_references_reg (l4, forbidden_reg)) + goto reordered; + } + l3->prev->next = l3->next; + l3->next->prev = l3->prev; + l2->next->prev = l3; + l3->next = l2->next; + l2->next = l3; + l3->prev = l2; + } +reordered: + + l = l->prev; + + s = match (l, "addl $"); + s2 = match (fl, "subl $"); + + l1 = l; + if (s == 0) { + char *t = match (l, "popl %"); + if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { + s = "4,%esp"; + l = l->prev; + t = match (l, "popl %"); + if (t != 0 && (strcmp (t, "ecx") == 0 || strcmp (t, "edx") == 0)) { + s = "8,%esp"; + l = l->prev; + } + } + } else { + l = l->prev; + } + + if (s && s2) { + int v = 0; + if (strcmp (s, s2) != 0) { + fprintf (stderr, "Stack adjustment not matching.\n"); + return; + } + + while (isdigit(*s)) { + v = v * 10 + (*s) - '0'; + s++; + } + + if (strcmp (s, ",%esp") != 0) { + fprintf (stderr, "Not adjusting the stack pointer.\n"); + return; + } + f->initial_offset = v; + fl->delet = 3; + fl = fl->next; + l1->delet = 2; + l1 = l1->prev; + while (l1 != l) { + l1->delet = 1; + l1 = l1->prev; + } + } + + while (in_pop_area) { + char *popm, *pushm; + popm = match (l, "popl %"); + pushm = match (fl, "pushl %"); + if (popm && pushm && strcmp(pushm, popm) == 0) { + pops_at_end++; + fl->delet = l->delet = 1; + } else + in_pop_area = 0; + l = l->prev; + fl = fl->next; + } + if (f->initial_offset) + f->initial_offset += 4 * pops_at_end; +} + +static void output_function(struct func *f) +{ + struct line *l = f->first_line; + + while (l) { + switch (l->delet) { + case 1: + break; + case 0: + printf("%s\n", l->data); + break; + case 2: + if (f->initial_offset) + printf("\taddl $%d,%%esp\n", f->initial_offset); + break; + case 3: + if (f->initial_offset) + printf("\tsubl $%d,%%esp\n", f->initial_offset); + break; + } + l = l->next; + } +} + +int main(int argc, char **argv) +{ + FILE *infile = stdin; + char tmp[4096]; + +#ifdef __mc68000__ + if(system("perl machdep/cpuopti")==-1) { + perror("perl machdep/cpuopti"); + return 10; + } else return 0; +#endif + + /* For debugging... */ + if (argc == 2) + infile = fopen (argv[1], "r"); + + for(;;) { + char *s; + + if ((fgets(tmp, 4095, infile)) == NULL) + break; + + s = strchr (tmp, '\n'); + if (s != NULL) + *s = 0; + + if (strncmp(tmp, ".globl op_", 10) == 0) { + struct line *first_line = NULL, *prev = NULL; + struct line **nextp = &first_line; + struct func f; + int nr_rets = 0; + int can_opt = 1; + + do { + struct line *current; + + if (strcmp (tmp, "#APP") != 0 && strcmp (tmp, "#NO_APP") != 0) { + current = *nextp = (struct line *)malloc(sizeof (struct line)); + nextp = ¤t->next; + current->prev = prev; prev = current; + current->next = NULL; + current->delet = 0; + current->data = strdup (tmp); + if (match (current, "movl %esp,%ebp") || match (current, "enter")) { + fprintf (stderr, "GCC failed to eliminate fp: %s\n", first_line->data); + can_opt = 0; + } + + if (match (current, "ret")) + nr_rets++; + } + if ((fgets(tmp, 4095, infile)) == NULL) + oops(); + s = strchr (tmp, '\n'); + if (s != NULL) + *s = 0; + } while (strncmp (tmp,".Lfe", 4) != 0); + + f.first_line = first_line; + f.last_line = prev; + + if (nr_rets == 1 && can_opt) + do_function(&f); + /*else + fprintf(stderr, "Too many RET instructions: %s\n", first_line->data);*/ + output_function(&f); + } + printf("%s\n", tmp); + } + return 0; +} diff --git a/BasiliskII/src/uae_cpu/fpu/core.h b/BasiliskII/src/uae_cpu/fpu/core.h new file mode 100644 index 000000000..66358a2d8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/core.h @@ -0,0 +1,259 @@ +/* + * fpu/core.h - base fpu context definition + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_CORE_H +#define FPU_CORE_H + +#include "sysdeps.h" +#include "fpu/types.h" + +/* Always use x87 FPU stack on IA-32. */ +#if defined(X86_ASSEMBLY) +#define USE_X87_ASSEMBLY 1 +#endif + +/* Only use x87 FPU on x86-64 if long double precision is requested. */ +#if defined(X86_64_ASSEMBLY) && USE_LONG_DOUBLE +#define USE_X87_ASSEMBLY 1 +#endif + +/* ========================================================================== */ +/* ========================= FPU CONTEXT DEFINITION ========================= */ +/* ========================================================================== */ + +/* We don't use all features of the C++ language so that we may still + * easily backport that code to C. + */ + +struct fpu_t { + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Data Registers --- */ + /* ---------------------------------------------------------------------- */ + + /* The eight %fp0 .. %fp7 registers */ + fpu_register registers[8]; + + /* Used for lazy evalualation of FPU flags */ + fpu_register result; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Control Register --- */ + /* ---------------------------------------------------------------------- */ + + struct { + + /* Exception Enable Byte */ + uae_u32 exception_enable; + #define FPCR_EXCEPTION_ENABLE 0x0000ff00 + #define FPCR_EXCEPTION_BSUN 0x00008000 + #define FPCR_EXCEPTION_SNAN 0x00004000 + #define FPCR_EXCEPTION_OPERR 0x00002000 + #define FPCR_EXCEPTION_OVFL 0x00001000 + #define FPCR_EXCEPTION_UNFL 0x00000800 + #define FPCR_EXCEPTION_DZ 0x00000400 + #define FPCR_EXCEPTION_INEX2 0x00000200 + #define FPCR_EXCEPTION_INEX1 0x00000100 + + /* Mode Control Byte Mask */ + #define FPCR_MODE_CONTROL 0x000000ff + + /* Rounding precision */ + uae_u32 rounding_precision; + #define FPCR_ROUNDING_PRECISION 0x000000c0 + #define FPCR_PRECISION_SINGLE 0x00000040 + #define FPCR_PRECISION_DOUBLE 0x00000080 + #define FPCR_PRECISION_EXTENDED 0x00000000 + + /* Rounding mode */ + uae_u32 rounding_mode; + #define FPCR_ROUNDING_MODE 0x00000030 + #define FPCR_ROUND_NEAR 0x00000000 + #define FPCR_ROUND_ZERO 0x00000010 + #define FPCR_ROUND_MINF 0x00000020 + #define FPCR_ROUND_PINF 0x00000030 + + } fpcr; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Status Register --- */ + /* ---------------------------------------------------------------------- */ + + struct { + + /* Floating-Point Condition Code Byte */ + uae_u32 condition_codes; + #define FPSR_CCB 0xff000000 + #define FPSR_CCB_NEGATIVE 0x08000000 + #define FPSR_CCB_ZERO 0x04000000 + #define FPSR_CCB_INFINITY 0x02000000 + #define FPSR_CCB_NAN 0x01000000 + + /* Quotient Byte */ + uae_u32 quotient; + #define FPSR_QUOTIENT 0x00ff0000 + #define FPSR_QUOTIENT_SIGN 0x00800000 + #define FPSR_QUOTIENT_VALUE 0x007f0000 + + /* Exception Status Byte */ + uae_u32 exception_status; + #define FPSR_EXCEPTION_STATUS FPCR_EXCEPTION_ENABLE + #define FPSR_EXCEPTION_BSUN FPCR_EXCEPTION_BSUN + #define FPSR_EXCEPTION_SNAN FPCR_EXCEPTION_SNAN + #define FPSR_EXCEPTION_OPERR FPCR_EXCEPTION_OPERR + #define FPSR_EXCEPTION_OVFL FPCR_EXCEPTION_OVFL + #define FPSR_EXCEPTION_UNFL FPCR_EXCEPTION_UNFL + #define FPSR_EXCEPTION_DZ FPCR_EXCEPTION_DZ + #define FPSR_EXCEPTION_INEX2 FPCR_EXCEPTION_INEX2 + #define FPSR_EXCEPTION_INEX1 FPCR_EXCEPTION_INEX1 + + /* Accrued Exception Byte */ + uae_u32 accrued_exception; + #define FPSR_ACCRUED_EXCEPTION 0x000000ff + #define FPSR_ACCR_IOP 0x00000080 + #define FPSR_ACCR_OVFL 0x00000040 + #define FPSR_ACCR_UNFL 0x00000020 + #define FPSR_ACCR_DZ 0x00000010 + #define FPSR_ACCR_INEX 0x00000008 + + } fpsr; + + /* ---------------------------------------------------------------------- */ + /* --- Floating-Point Instruction Address Register --- */ + /* ---------------------------------------------------------------------- */ + + uae_u32 instruction_address; + + /* ---------------------------------------------------------------------- */ + /* --- Initialization / Finalization --- */ + /* ---------------------------------------------------------------------- */ + + /* Flag set if we emulate an integral 68040 FPU */ + bool is_integral; + + /* ---------------------------------------------------------------------- */ + /* --- Extra FPE-dependant defines --- */ + /* ---------------------------------------------------------------------- */ + + #if defined(FPU_X86) \ + || (defined(FPU_UAE) && defined(USE_X87_ASSEMBLY)) \ + || (defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY)) + + #define CW_RESET 0x0040 // initial CW value after RESET + #define CW_FINIT 0x037F // initial CW value after FINIT + #define SW_RESET 0x0000 // initial SW value after RESET + #define SW_FINIT 0x0000 // initial SW value after FINIT + #define TW_RESET 0x5555 // initial TW value after RESET + #define TW_FINIT 0x0FFF // initial TW value after FINIT + + #define CW_X 0x1000 // infinity control + #define CW_RC_ZERO 0x0C00 // rounding control toward zero + #define CW_RC_UP 0x0800 // rounding control toward + + #define CW_RC_DOWN 0x0400 // rounding control toward - + #define CW_RC_NEAR 0x0000 // rounding control toward even + #define CW_PC_EXTENDED 0x0300 // precision control 64bit + #define CW_PC_DOUBLE 0x0200 // precision control 53bit + #define CW_PC_RESERVED 0x0100 // precision control reserved + #define CW_PC_SINGLE 0x0000 // precision control 24bit + #define CW_PM 0x0020 // precision exception mask + #define CW_UM 0x0010 // underflow exception mask + #define CW_OM 0x0008 // overflow exception mask + #define CW_ZM 0x0004 // zero divide exception mask + #define CW_DM 0x0002 // denormalized operand exception mask + #define CW_IM 0x0001 // invalid operation exception mask + + #define SW_B 0x8000 // busy flag + #define SW_C3 0x4000 // condition code flag 3 + #define SW_TOP_7 0x3800 // top of stack = ST(7) + #define SW_TOP_6 0x3000 // top of stack = ST(6) + #define SW_TOP_5 0x2800 // top of stack = ST(5) + #define SW_TOP_4 0x2000 // top of stack = ST(4) + #define SW_TOP_3 0x1800 // top of stack = ST(3) + #define SW_TOP_2 0x1000 // top of stack = ST(2) + #define SW_TOP_1 0x0800 // top of stack = ST(1) + #define SW_TOP_0 0x0000 // top of stack = ST(0) + #define SW_C2 0x0400 // condition code flag 2 + #define SW_C1 0x0200 // condition code flag 1 + #define SW_C0 0x0100 // condition code flag 0 + #define SW_ES 0x0080 // error summary status flag + #define SW_SF 0x0040 // stack fault flag + #define SW_PE 0x0020 // precision exception flag + #define SW_UE 0x0010 // underflow exception flag + #define SW_OE 0x0008 // overflow exception flag + #define SW_ZE 0x0004 // zero divide exception flag + #define SW_DE 0x0002 // denormalized operand exception flag + #define SW_IE 0x0001 // invalid operation exception flag + + #define X86_ROUNDING_MODE 0x0C00 + #define X86_ROUNDING_PRECISION 0x0300 + + #endif /* FPU_X86 */ + +}; + +/* We handle only one global fpu */ +extern fpu_t fpu; + +/* Return the address of a particular register */ +inline fpu_register * const fpu_register_address(int i) + { return &fpu.registers[i]; } + +/* Dump functions for m68k_dumpstate */ +extern void fpu_dump_registers(void); +extern void fpu_dump_flags(void); + +/* Accessors to FPU Control Register */ +static inline uae_u32 get_fpcr(void); +static inline void set_fpcr(uae_u32 new_fpcr); + +/* Accessors to FPU Status Register */ +static inline uae_u32 get_fpsr(void); +static inline void set_fpsr(uae_u32 new_fpsr); + +/* Accessors to FPU Instruction Address Register */ +static inline uae_u32 get_fpiar(); +static inline void set_fpiar(uae_u32 new_fpiar); + +/* Initialization / Finalization */ +extern void fpu_init(bool integral_68040); +extern void fpu_exit(void); +extern void fpu_reset(void); + +/* Floating-point arithmetic instructions */ +void fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) REGPARAM; + +/* Floating-point program control operations */ +void fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) REGPARAM; +void fpuop_dbcc(uae_u32 opcode, uae_u32 extra) REGPARAM; +void fpuop_scc(uae_u32 opcode, uae_u32 extra) REGPARAM; + +/* Floating-point system control operations */ +void fpuop_save(uae_u32 opcode) REGPARAM; +void fpuop_restore(uae_u32 opcode) REGPARAM; +void fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) REGPARAM; + +#endif /* FPU_CORE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.cpp b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp new file mode 100644 index 000000000..6aa6431aa --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.cpp @@ -0,0 +1,188 @@ +/* + * fpu/exceptions.cpp - system-dependant FPU exceptions management + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 + */ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 exceptions --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_EXCEPTIONS +void FFPU fpu_init_native_exceptions(void) +{ + // Mapping for "sw" -> fpsr exception byte + for (uae_u32 i = 0; i < 0x80; i++) { + exception_host2mac[i] = 0; + + if(i & SW_FAKE_BSUN) { + exception_host2mac[i] |= FPSR_EXCEPTION_BSUN; + } + // precision exception + if(i & SW_PE) { + exception_host2mac[i] |= FPSR_EXCEPTION_INEX2; + } + // underflow exception + if(i & SW_UE) { + exception_host2mac[i] |= FPSR_EXCEPTION_UNFL; + } + // overflow exception + if(i & SW_OE) { + exception_host2mac[i] |= FPSR_EXCEPTION_OVFL; + } + // zero divide exception + if(i & SW_ZE) { + exception_host2mac[i] |= FPSR_EXCEPTION_DZ; + } + // denormalized operand exception. + // wrong, but should not get here, normalization is done in elsewhere + if(i & SW_DE) { + exception_host2mac[i] |= FPSR_EXCEPTION_SNAN; + } + // invalid operation exception + if(i & SW_IE) { + exception_host2mac[i] |= FPSR_EXCEPTION_OPERR; + } + } + + // Mapping for fpsr exception byte -> "sw" + for (uae_u32 i = 0; i < 0x100; i++) { + uae_u32 fpsr = (i << 8); + exception_mac2host[i] = 0; + + // BSUN; make sure that you don't generate FPU stack faults. + if(fpsr & FPSR_EXCEPTION_BSUN) { + exception_mac2host[i] |= SW_FAKE_BSUN; + } + // precision exception + if(fpsr & FPSR_EXCEPTION_INEX2) { + exception_mac2host[i] |= SW_PE; + } + // underflow exception + if(fpsr & FPSR_EXCEPTION_UNFL) { + exception_mac2host[i] |= SW_UE; + } + // overflow exception + if(fpsr & FPSR_EXCEPTION_OVFL) { + exception_mac2host[i] |= SW_OE; + } + // zero divide exception + if(fpsr & FPSR_EXCEPTION_DZ) { + exception_mac2host[i] |= SW_ZE; + } + // denormalized operand exception + if(fpsr & FPSR_EXCEPTION_SNAN) { + exception_mac2host[i] |= SW_DE; //Wrong + } + // invalid operation exception + if(fpsr & FPSR_EXCEPTION_OPERR) { + exception_mac2host[i] |= SW_IE; + } + } +} +#endif + +#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS +void FFPU fpu_init_native_accrued_exceptions(void) +{ + /* + 68881/68040 accrued exceptions accumulate as follows: + Accrued.IOP |= (Exception.SNAN | Exception.OPERR) + Accrued.OVFL |= (Exception.OVFL) + Accrued.UNFL |= (Exception.UNFL | Exception.INEX2) + Accrued.DZ |= (Exception.DZ) + Accrued.INEX |= (Exception.INEX1 | Exception.INEX2 | Exception.OVFL) + */ + + // Mapping for "fpsr.accrued_exception" -> fpsr accrued exception byte + for (uae_u32 i = 0; i < 0x40; i++ ) { + accrued_exception_host2mac[i] = 0; + + // precision exception + if(i & SW_PE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_INEX; + } + // underflow exception + if(i & SW_UE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_UNFL; + } + // overflow exception + if(i & SW_OE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_OVFL; + } + // zero divide exception + if(i & SW_ZE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_DZ; + } + // denormalized operand exception + if(i & SW_DE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; //?????? + } + // invalid operation exception + if(i & SW_IE) { + accrued_exception_host2mac[i] |= FPSR_ACCR_IOP; + } + } + + // Mapping for fpsr accrued exception byte -> "fpsr.accrued_exception" + for (uae_u32 i = 0; i < 0x20; i++) { + int fpsr = (i << 3); + accrued_exception_mac2host[i] = 0; + + // precision exception + if(fpsr & FPSR_ACCR_INEX) { + accrued_exception_mac2host[i] |= SW_PE; + } + // underflow exception + if(fpsr & FPSR_ACCR_UNFL) { + accrued_exception_mac2host[i] |= SW_UE; + } + // overflow exception + if(fpsr & FPSR_ACCR_OVFL) { + accrued_exception_mac2host[i] |= SW_OE; + } + // zero divide exception + if(fpsr & FPSR_ACCR_DZ) { + accrued_exception_mac2host[i] |= SW_ZE; + } + // What about SW_DE; //?????? + // invalid operation exception + if(fpsr & FPSR_ACCR_IOP) { + accrued_exception_mac2host[i] |= SW_IE; + } + } +} +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/exceptions.h b/BasiliskII/src/uae_cpu/fpu/exceptions.h new file mode 100644 index 000000000..8c69a69d4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/exceptions.h @@ -0,0 +1,149 @@ +/* + * fpu/exceptions.h - system-dependant FPU exceptions management + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_EXCEPTIONS_H +#define FPU_EXCEPTIONS_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic exceptions */ +#define FPU_USE_GENERIC_EXCEPTIONS +#define FPU_USE_GENERIC_ACCRUED_EXCEPTIONS + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point exceptions handling mode --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native exceptions */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_EXCEPTIONS +# define FPU_USE_X86_EXCEPTIONS +#endif + +/* Optimized i386 fpu core must use native accrued exceptions */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS +# define FPU_USE_X86_ACCRUED_EXCEPTIONS +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Exceptions --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_EXCEPTIONS + +/* Extend the SW_* codes */ +#define SW_FAKE_BSUN SW_SF + +/* Shorthand */ +#define SW_EXCEPTION_MASK (SW_ES|SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) +// #define SW_EXCEPTION_MASK (SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE) + +/* Lookup tables */ +PRIVATE uae_u32 exception_host2mac[ 0x80 ]; +PRIVATE uae_u32 exception_mac2host[ 0x100 ]; + +/* Initialize native exception management */ +PUBLIC void FFPU fpu_init_native_exceptions(void); + +/* Return m68k floating-point exception status */ +PRIVATE inline uae_u32 FFPU get_exception_status(void) + { return exception_host2mac[FPU fpsr.exception_status & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } + +/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ +PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) + { FPU fpsr.exception_status = exception_mac2host[new_status >> 8]; } + +#endif /* FPU_USE_X86_EXCEPTIONS */ + +#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS + +/* Lookup tables */ +PRIVATE uae_u32 accrued_exception_host2mac[ 0x40 ]; +PRIVATE uae_u32 accrued_exception_mac2host[ 0x20 ]; + +/* Initialize native accrued exception management */ +PUBLIC void FFPU fpu_init_native_accrued_exceptions(void); + +/* Return m68k accrued exception byte */ +PRIVATE inline uae_u32 FFPU get_accrued_exception(void) + { return accrued_exception_host2mac[FPU fpsr.accrued_exception & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; } + +/* Set new accrued exception byte */ +PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) + { FPU fpsr.accrued_exception = accrued_exception_mac2host[(new_status & 0xF8) >> 3]; } + +#endif /* FPU_USE_X86_ACCRUED_EXCEPTIONS */ + +/* -------------------------------------------------------------------------- */ +/* --- Default Exceptions Handling --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_GENERIC_EXCEPTIONS + +/* Initialize native exception management */ +static inline void FFPU fpu_init_native_exceptions(void) + { } + +/* Return m68k floating-point exception status */ +PRIVATE inline uae_u32 FFPU get_exception_status(void) + { return FPU fpsr.exception_status; } + +/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */ +PRIVATE inline void FFPU set_exception_status(uae_u32 new_status) + { FPU fpsr.exception_status = new_status; } + +#endif /* FPU_USE_GENERIC_EXCEPTIONS */ + +#ifdef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS + +/* Initialize native accrued exception management */ +PRIVATE inline void FFPU fpu_init_native_accrued_exceptions(void) + { } + +/* Return m68k accrued exception byte */ +PRIVATE inline uae_u32 FFPU get_accrued_exception(void) + { return FPU fpsr.accrued_exception; } + +/* Set new accrued exception byte */ +PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status) + { FPU fpsr.accrued_exception = new_status; } + +#endif /* FPU_USE_GENERIC_ACCRUED_EXCEPTIONS */ + +#endif /* FPU_EXCEPTIONS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/flags.cpp b/BasiliskII/src/uae_cpu/fpu/flags.cpp new file mode 100644 index 000000000..2eabef859 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/flags.cpp @@ -0,0 +1,169 @@ +/* + * fpu/flags.cpp - Floating-point flags + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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: this file shall be included only from fpu/fpu_*.cpp */ +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 floating-point flags --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_FLAGS + +/* Initialization */ +void FFPU fpu_init_native_fflags(void) +{ + // Adapted from fpu_x86.cpp + #define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) + #define SW_Z (SW_C3) + #define SW_I (SW_C0|SW_C2) + #define SW_NAN (SW_C0) + #define SW_FINITE (SW_C2) + #define SW_EMPTY_REGISTER (SW_C0|SW_C3) + #define SW_DENORMAL (SW_C2|SW_C3) + #define SW_UNSUPPORTED (0) + #define SW_N (SW_C1) + + // Sanity checks + #if (SW_Z != NATIVE_FFLAG_ZERO) + #error "Incorrect X86 Z fflag" + #endif + #if (SW_I != NATIVE_FFLAG_INFINITY) + #error "Incorrect X86 I fflag" + #endif + #if (SW_N != NATIVE_FFLAG_NEGATIVE) + #error "Incorrect X86 N fflag" + #endif + #if (SW_NAN != NATIVE_FFLAG_NAN) + #error "Incorrect X86 NAN fflag" + #endif + + // Native status word to m68k mappings + for (uae_u32 i = 0; i < 0x48; i++) { + to_m68k_fpcond[i] = 0; + const uae_u32 native_fpcond = i << 8; + switch (native_fpcond & SW_Z_I_NAN_MASK) { +#ifndef FPU_UAE +// gb-- enabling it would lead to incorrect drawing of digits +// in Speedometer Performance Test + case SW_UNSUPPORTED: +#endif + case SW_NAN: + case SW_EMPTY_REGISTER: + to_m68k_fpcond[i] |= FPSR_CCB_NAN; + break; + case SW_FINITE: + case SW_DENORMAL: + break; + case SW_I: + to_m68k_fpcond[i] |= FPSR_CCB_INFINITY; + break; + case SW_Z: + to_m68k_fpcond[i] |= FPSR_CCB_ZERO; + break; + } + if (native_fpcond & SW_N) + to_m68k_fpcond[i] |= FPSR_CCB_NEGATIVE; + } + + // m68k to native status word mappings + for (uae_u32 i = 0; i < 0x10; i++) { + const uae_u32 m68k_fpcond = i << 24; + if (m68k_fpcond & FPSR_CCB_NAN) + to_host_fpcond[i] = SW_NAN; + else if (m68k_fpcond & FPSR_CCB_ZERO) + to_host_fpcond[i] = SW_Z; + else if (m68k_fpcond & FPSR_CCB_INFINITY) + to_host_fpcond[i] = SW_I; + else + to_host_fpcond[i] = SW_FINITE; + if (m68k_fpcond & FPSR_CCB_NEGATIVE) + to_host_fpcond[i] |= SW_N; + } + + // truth-table for FPU conditions + for (uae_u32 host_fpcond = 0; host_fpcond < 0x08; host_fpcond++) { + // host_fpcond: C3 on bit 2, C1 and C0 are respectively on bits 1 and 0 + const uae_u32 real_host_fpcond = ((host_fpcond & 4) << 12) | ((host_fpcond & 3) << 8); + const bool N = ((real_host_fpcond & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE); + const bool Z = ((real_host_fpcond & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO); + const bool NaN = ((real_host_fpcond & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN); + + int value; + for (uae_u32 m68k_fpcond = 0; m68k_fpcond < 0x20; m68k_fpcond++) { + switch (m68k_fpcond) { + case 0x00: value = 0; break; // False + case 0x01: value = Z; break; // Equal + case 0x02: value = !(NaN || Z || N); break; // Ordered Greater Than + case 0x03: value = Z || !(NaN || N); break; // Ordered Greater Than or Equal + case 0x04: value = N && !(NaN || Z); break; // Ordered Less Than + case 0x05: value = Z || (N && !NaN); break; // Ordered Less Than or Equal + case 0x06: value = !(NaN || Z); break; // Ordered Greater or Less Than + case 0x07: value = !NaN; break; // Ordered + case 0x08: value = NaN; break; // Unordered + case 0x09: value = NaN || Z; break; // Unordered or Equal + case 0x0a: value = NaN || !(N || Z); break; // Unordered or Greater Than + case 0x0b: value = NaN || Z || !N; break; // Unordered or Greater or Equal + case 0x0c: value = NaN || (N && !Z); break; // Unordered or Less Than + case 0x0d: value = NaN || Z || N; break; // Unordered or Less or Equal + case 0x0e: value = !Z; break; // Not Equal + case 0x0f: value = 1; break; // True + case 0x10: value = 0; break; // Signaling False + case 0x11: value = Z; break; // Signaling Equal + case 0x12: value = !(NaN || Z || N); break; // Greater Than + case 0x13: value = Z || !(NaN || N); break; // Greater Than or Equal + case 0x14: value = N && !(NaN || Z); break; // Less Than + case 0x15: value = Z || (N && !NaN); break; // Less Than or Equal + case 0x16: value = !(NaN || Z); break; // Greater or Less Than + case 0x17: value = !NaN; break; // Greater, Less or Equal + case 0x18: value = NaN; break; // Not Greater, Less or Equal + case 0x19: value = NaN || Z; break; // Not Greater or Less Than + case 0x1a: value = NaN || !(N || Z); break; // Not Less Than or Equal + case 0x1b: value = NaN || Z || !N; break; // Not Less Than + case 0x1c: value = NaN || (N && !Z); break; // Not Greater Than or Equal +// case 0x1c: value = !Z && (NaN || N); break; // Not Greater Than or Equal + case 0x1d: value = NaN || Z || N; break; // Not Greater Than + case 0x1e: value = !Z; break; // Signaling Not Equal + case 0x1f: value = 1; break; // Signaling True + default: value = -1; + } + fpcond_truth_table[m68k_fpcond][host_fpcond] = value; + } + } +} + +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/flags.h b/BasiliskII/src/uae_cpu/fpu/flags.h new file mode 100644 index 000000000..7c0c5b748 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/flags.h @@ -0,0 +1,223 @@ +/* + * fpu/flags.h - Floating-point flags + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_FLAGS_H +#define FPU_FLAGS_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic flags */ +#define FPU_USE_GENERIC_FLAGS + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point flags handling mode --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native flags */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_X86_FLAGS +#endif + +/* Old UAE FPU core can use native flags */ +#if defined(FPU_UAE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_X86_FLAGS +#endif + +/* IEEE-based implementation must use lazy flag evaluation */ +#if defined(FPU_IEEE) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_LAZY_FLAGS +#endif + +/* JIT Compilation for FPU only works with lazy evaluation of FPU flags */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) && defined(USE_JIT_FPU) +# undef FPU_USE_GENERIC_FLAGS +# define FPU_USE_LAZY_FLAGS +#endif + +#ifdef FPU_IMPLEMENTATION + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Floating-Point Flags --- */ +/* -------------------------------------------------------------------------- */ + +/* FPU_X86 has its own set of lookup functions */ + +#ifdef FPU_USE_X86_FLAGS + +#define FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x0200 +#define NATIVE_FFLAG_ZERO 0x4000 +#define NATIVE_FFLAG_INFINITY 0x0500 +#define NATIVE_FFLAG_NAN 0x0100 + +/* Translation tables between native and m68k floating-point flags */ +PRIVATE uae_u32 to_m68k_fpcond[0x48]; +PRIVATE uae_u32 to_host_fpcond[0x10]; + +/* Truth table for floating-point condition codes */ +PRIVATE uae_u32 fpcond_truth_table[32][8]; // 32 m68k conditions x 8 host condition codes + +/* Initialization */ +PUBLIC void FFPU fpu_init_native_fflags(void); + +#ifdef FPU_UAE + +/* Native to m68k floating-point condition codes */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) + { return to_m68k_fpcond[(FPU fpsr.condition_codes >> 8) & 0x47]; } + +/* M68k to native floating-point condition codes */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) + /* Precondition: new_fpcond is only valid for floating-point condition codes */ + { FPU fpsr.condition_codes = to_host_fpcond[new_fpcond >> 24]; } + +/* Make FPSR according to the value passed in argument */ +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) + { uae_u16 sw; __asm__ __volatile__ ("fxam\n\tfnstsw %0" : "=r" (sw) : "f" (r)); FPU fpsr.condition_codes = sw; } + +/* Return the corresponding ID of the current floating-point condition codes */ +/* NOTE: only valid for evaluation of a condition */ +PRIVATE inline int FFPU host_fpcond_id(void) + { return ((FPU fpsr.condition_codes >> 12) & 4) | ((FPU fpsr.condition_codes >> 8) & 3); } + +/* Return true if the floating-point condition is satisfied */ +PRIVATE inline bool FFPU fpcctrue(int condition) + { return fpcond_truth_table[condition][host_fpcond_id()]; } + +#endif /* FPU_UAE */ + +/* Return the address of the floating-point condition codes truth table */ +static inline uae_u8 * const FFPU address_of_fpcond_truth_table(void) + { return ((uae_u8*)&fpcond_truth_table[0][0]); } + +#endif /* FPU_X86_USE_NATIVE_FLAGS */ + +/* -------------------------------------------------------------------------- */ +/* --- Use Original M68K FPU Mappings --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_GENERIC_FLAGS + +#undef FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x08000000 +#define NATIVE_FFLAG_ZERO 0x04000000 +#define NATIVE_FFLAG_INFINITY 0x02000000 +#define NATIVE_FFLAG_NAN 0x01000000 + +/* Initialization - NONE */ +PRIVATE inline void FFPU fpu_init_native_fflags(void) + { } + +/* Native to m68k floating-point condition codes - SELF */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) + { return FPU fpsr.condition_codes; } + +/* M68k to native floating-point condition codes - SELF */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) + { FPU fpsr.condition_codes = new_fpcond; } + +#endif /* FPU_USE_GENERIC_FLAGS */ + +/* -------------------------------------------------------------------------- */ +/* --- Use Lazy Flags Evaluation --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_LAZY_FLAGS + +#undef FPU_USE_NATIVE_FLAGS + +#define NATIVE_FFLAG_NEGATIVE 0x08000000 +#define NATIVE_FFLAG_ZERO 0x04000000 +#define NATIVE_FFLAG_INFINITY 0x02000000 +#define NATIVE_FFLAG_NAN 0x01000000 + +/* Initialization - NONE */ +PRIVATE inline void FFPU fpu_init_native_fflags(void) + { } + +/* Native to m68k floating-point condition codes - SELF */ +PRIVATE inline uae_u32 FFPU get_fpccr(void) +{ + uae_u32 fpccr = 0; + if (isnan(FPU result)) + fpccr |= FPSR_CCB_NAN; + else if (FPU result == 0.0) + fpccr |= FPSR_CCB_ZERO; + else if (FPU result < 0.0) + fpccr |= FPSR_CCB_NEGATIVE; + if (isinf(FPU result)) + fpccr |= FPSR_CCB_INFINITY; + return fpccr; +} + +/* M68k to native floating-point condition codes - SELF */ +PRIVATE inline void FFPU set_fpccr(uae_u32 new_fpcond) +{ + if (new_fpcond & FPSR_CCB_NAN) + make_nan(FPU result); + else if (new_fpcond & FPSR_CCB_ZERO) + FPU result = 0.0; + else if (new_fpcond & FPSR_CCB_NEGATIVE) + FPU result = -1.0; + else + FPU result = +1.0; + /* gb-- where is Infinity ? */ +} + +/* Make FPSR according to the value passed in argument */ +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) + { FPU result = r; } + +#endif /* FPU_USE_LAZY_FLAGS */ + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common methods --- */ +/* -------------------------------------------------------------------------- */ + +/* Return the address of the floating-point condition codes register */ +static inline uae_u32 * const FFPU address_of_fpccr(void) + { return ((uae_u32 *)& FPU fpsr.condition_codes); } + +#endif /* FPU_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu.h b/BasiliskII/src/uae_cpu/fpu/fpu.h new file mode 100644 index 000000000..3940a75b8 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu.h @@ -0,0 +1,49 @@ +/* + * fpu/fpu.h - public header + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_PUBLIC_HEADER_H +#define FPU_PUBLIC_HEADER_H + +#ifndef FPU_DEBUG +#define FPU_DEBUG 0 +#endif + +#if FPU_DEBUG +#define fpu_debug(args) printf args; +#define FPU_DUMP_REGISTERS 0 +#define FPU_DUMP_FIRST_BYTES 0 +#else +#define fpu_debug(args) ; +#undef FPU_DUMP_REGISTERS +#undef FPU_DUMP_FIRST_BYTES +#endif + +#include "sysdeps.h" +#include "fpu/types.h" +#include "fpu/core.h" + +#endif /* FPU_PUBLIC_HEADER_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp new file mode 100644 index 000000000..f5a1aeb49 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.cpp @@ -0,0 +1,2152 @@ +/* + * fpu/fpu_ieee.cpp + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 + */ + +/* + * Following fixes by Lauri Pesonen, July 1999: + * + * FMOVEM list handling: + * The lookup tables did not work correctly, rewritten. + * FINT: + * (int) cast does not work, fixed. + * Further, now honors the FPU fpcr rounding modes. + * FINTRZ: + * (int) cast cannot be used, fixed. + * FGETEXP: + * Input argument value 0 returned erroneous value. + * FMOD: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FREM: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FSCALE: + * Input argument value 0 was not handled correctly. + * FMOVEM Control Registers to/from address FPU registers An: + * A bug caused the code never been called. + * FMOVEM Control Registers pre-decrement: + * Moving of control regs from memory to FPP was not handled properly, + * if not all of the three FPU registers were moved. + * Condition code "Not Greater Than or Equal": + * Returned erroneous value. + * FSINCOS: + * Cosine must be loaded first if same register. + * FMOVECR: + * Status register was not updated (yes, this affects it). + * FMOVE -> reg: + * Status register was not updated (yes, this affects it). + * FMOVE reg -> reg: + * Status register was not updated. + * FDBcc: + * The loop termination condition was wrong. + * Possible leak from int16 to int32 fixed. + * get_fp_value: + * Immediate addressing mode && Operation Length == Byte -> + * Use the low-order byte of the extension word. + * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was + * written to them. + * + * Other: + * - Optimized single/double/extended to/from conversion functions. + * Huge speed boost, but not (necessarily) portable to other systems. + * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 + * - Optimized versions of FSCALE, FGETEXP, FGETMAN + * - Conversion routines now handle NaN and infinity better. + * - Some constants precalculated. Not all compilers can optimize the + * expressions previously used. + * + * TODO: + * - Floating point exceptions. + * - More Infinity/NaN/overflow/underflow checking. + * - FPU instruction_address (only needed when exceptions are implemented) + * - Should be written in assembly to support long doubles. + * - Precision rounding single/double + */ + +#include "sysdeps.h" +#include +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_ieee.h" + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/mathlib.h" +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/mathlib.cpp" +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" +#include "fpu/rounding.cpp" + +/* -------------------------------------------------------------------------- */ +/* --- Debugging --- */ +/* -------------------------------------------------------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +PRIVATE void FFPU dump_registers(const char * str) +{ +#if FPU_DEBUG && FPU_DUMP_REGISTERS + char temp_str[512]; + + sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", + str, + fpu_get_register(0), fpu_get_register(1), fpu_get_register(2), + fpu_get_register(3), fpu_get_register(4), fpu_get_register(5), + fpu_get_register(6), fpu_get_register(7) ); + + fpu_debug((temp_str)); +#endif +} + +PRIVATE void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) +{ +#if FPU_DEBUG && FPU_DUMP_FIRST_BYTES + char temp_buf1[256], temp_buf2[10]; + int bytes = sizeof(temp_buf1)/3-1-3; + if (actual < bytes) + bytes = actual; + + temp_buf1[0] = 0; + for (int i = 0; i < bytes; i++) { + sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); + strcat(temp_buf1, temp_buf2); + } + + strcat(temp_buf1, "\n"); + fpu_debug((temp_buf1)); +#endif +} + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) +{ + uae_u32 lsb = (uae_u32)fp_fabs(quotient) & 0x7f; + FPU fpsr.quotient = sign | (lsb << 16); +} + +// to_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ +#if 1 + // Use a single, otherwise some checks for NaN, Inf, Zero would have to + // be performed + fpu_single result = 0; // = 0 to workaround a compiler bug on SPARC + fp_declare_init_shape(srp, result, single); + srp->ieee.negative = (value >> 31) & 1; + srp->ieee.exponent = (value >> 23) & FP_SINGLE_EXP_MAX; + srp->ieee.mantissa = value & 0x007fffff; + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + return result; +#elif 0 /* Original code */ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register result; + uae_u32 * p = (uae_u32 *)&result; + + uae_u32 sign = (value & 0x80000000); + uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; + + p[FLO] = value << 29; + p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return(result); +#endif +} + +// from_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ +#if 1 + fpu_single input = (fpu_single) src; + fp_declare_init_shape(sip, input, single); + uae_u32 result = (sip->ieee.negative << 31) + | (sip->ieee.exponent << 23) + | sip->ieee.mantissa; + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + return result; +#elif 0 /* Original code */ + if (src == 0.0) + return 0; + + uae_u32 result; + uae_u32 *p = (uae_u32 *)&src; + + uae_u32 sign = (p[FHI] & 0x80000000); + uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; + + if(exp + 127 < 1023) { + exp = 0; + } else if(exp > 1023 + 127) { + exp = 255; + } else { + exp = exp + 127 - 1023; + } + + result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); + + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + + return (result); +#endif +} + +// to_exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + // is it zero? + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return 0.0; + + fpu_register result; +#if USE_QUAD_DOUBLE + // is it NaN? + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { + make_nan(result); + return result; + } + // is it inf? + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { + if ((wrd1 & 0x80000000) == 0) + make_inf_positive(result); + else + make_inf_negative(result); + return result; + } + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp->ieee.mantissa3 = 0; +#elif USE_LONG_DOUBLE + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = wrd2; + srp->ieee.mantissa1 = wrd3; +#else + uae_u32 sgn = (wrd1 >> 31) & 1; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // the explicit integer bit is not set, must normalize + if ((wrd2 & 0x80000000) == 0) { + fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); + if (wrd2 | wrd3) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while (exp > 0 && (man & UVAL64(0x8000000000000000)) == 0) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)(man >> 32); + wrd3 = (uae_u32)(man & 0xFFFFFFFF); + } + else if (exp != 0x7fff) // zero + exp = FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; + } + + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + + fp_declare_init_shape(srp, result, double); + srp->ieee.negative = sgn; + srp->ieee.exponent = exp; + // drop the explicit integer bit + srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); +#endif + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + return result; +} + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// make_extended_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +) +{ + // is it zero? + if ((wrd1 && 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + make_zero_positive(result); + return; + } + // is it NaN? + if ((wrd1 & 0x7fff0000) == 0x7fff0000 && wrd2 != 0 && wrd3 != 0) { + make_nan(result); + return; + } +#if USE_QUAD_DOUBLE + // is it inf? + if ((wrd1 & 0x7ffff000) == 0x7fff0000 && wrd2 == 0 && wrd3 == 0) { + if ((wrd1 & 0x80000000) == 0) + make_inf_positive(result); + else + make_inf_negative(result); + return; + } + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = (wrd2 >> 16) & 0xffff; + srp->ieee.mantissa1 = ((wrd2 & 0xffff) << 16) | ((wrd3 >> 16) & 0xffff); + srp->ieee.mantissa2 = (wrd3 & 0xffff) << 16; + srp->ieee.mantissa3 = 0; +#elif USE_LONG_DOUBLE + fp_declare_init_shape(srp, result, extended); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = (wrd1 >> 16) & FP_EXTENDED_EXP_MAX; + srp->ieee.mantissa0 = wrd2; + srp->ieee.mantissa1 = wrd3; +#else + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + + fp_declare_init_shape(srp, result, double); + srp->ieee.negative = (wrd1 >> 31) & 1; + srp->ieee.exponent = exp; + // drop the explicit integer bit + srp->ieee.mantissa0 = (wrd2 & 0x7fffffff) >> 11; + srp->ieee.mantissa1 = (wrd2 << 21) | (wrd3 >> 11); +#endif + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); +} + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +) +{ + if (src == 0.0) { + *wrd1 = *wrd2 = *wrd3 = 0; + return; + } +#if USE_QUAD_DOUBLE + // FIXME: deal with denormals? + fp_declare_init_shape(srp, src, extended); + *wrd1 = (srp->ieee.negative << 31) | (srp->ieee.exponent << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 15) | ((srp->ieee.mantissa1 & 0xfffe0000) >> 17); + *wrd3 = (srp->ieee.mantissa1 << 15) | ((srp->ieee.mantissa2 & 0xfffe0000) >> 17); +#elif USE_LONG_DOUBLE + uae_u32 *p = (uae_u32 *)&src; +#ifdef WORDS_BIGENDIAN + *wrd1 = p[0]; + *wrd2 = p[1]; + *wrd3 = p[2]; +#else + *wrd3 = p[0]; + *wrd2 = p[1]; + *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; +#endif +#else + fp_declare_init_shape(srp, src, double); + fpu_debug(("extract_extended (%d,%d,%X,%X)\n", + srp->ieee.negative , srp->ieee.exponent, + srp->ieee.mantissa0, srp->ieee.mantissa1)); + + uae_u32 exp = srp->ieee.exponent; + + if (exp == FP_DOUBLE_EXP_MAX) + exp = FP_EXTENDED_EXP_MAX; + else + exp += FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS; + + *wrd1 = (srp->ieee.negative << 31) | (exp << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | (srp->ieee.mantissa0 << 11) | ((srp->ieee.mantissa1 & 0xffe00000) >> 21); + *wrd3 = srp->ieee.mantissa1 << 11; +#endif + fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +// to_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + union { + fpu_double value; + uae_u32 parts[2]; + } dest; +#ifdef WORDS_BIGENDIAN + dest.parts[0] = wrd1; + dest.parts[1] = wrd2; +#else + dest.parts[0] = wrd2; + dest.parts[1] = wrd1; +#endif + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,dest.value)); + return (fpu_register)(dest.value); +} + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +) +{ + union { + fpu_double value; + uae_u32 parts[2]; + } dest; + dest.value = (fpu_double)src; +#ifdef WORDS_BIGENDIAN + *wrd1 = dest.parts[0]; + *wrd2 = dest.parts[1]; +#else + *wrd2 = dest.parts[0]; + *wrd1 = dest.parts[1]; +#endif + fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); +} + +// to_pack +PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + fpu_debug(("make_packed str = %s\n",str)); + + fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); + return d; +} + +// from_pack +PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + int i; + int t; + char *cp; + char str[100]; + + sprintf(str, "%.16e", src); + + fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; + } + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; + } + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; + } + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') + t = (t << 4) | (*cp++ - '0'); + } + *wrd1 |= t << 16; + } + + fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + src = FPU registers[(extra >> 10) & 7]; + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + + fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); + + switch (mode) { + case 0: + switch (size) { + case 6: + src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); + break; + case 4: + src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); + break; + case 0: + src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); + break; + case 1: + src = make_single(m68k_dreg (regs, reg)); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if(size == 6) ad++; + break; + default: + return 0; + } + } + + fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + fpu_debug(("get_fp_value ad=%X\n",ad)); + fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); + dump_first_bytes( get_real_address(ad)-64, 64 ); + dump_first_bytes( get_real_address(ad), 64 ); + + switch (size) { + case 0: + src = (fpu_register) (uae_s32) get_long (ad); + break; + case 1: + src = make_single(get_long (ad)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_extended(wrd1, wrd2, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_packed(wrd1, wrd2, wrd3); + break; + } + case 4: + src = (fpu_register) (uae_s16) get_word(ad); + break; + case 5: { + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + src = make_double(wrd1, wrd2); + break; + } + case 6: + src = (fpu_register) (uae_s8) get_byte(ad); + break; + default: + return 0; + } + + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); + return 1; +} + +/* Convert the FP value to integer according to the current m68k rounding mode */ +PRIVATE inline uae_s32 FFPU toint(fpu_register const & src) +{ + fpu_register result; + switch (get_fpcr() & 0x30) { + case FPCR_ROUND_ZERO: + result = fp_round_to_zero(src); + break; + case FPCR_ROUND_MINF: + result = fp_round_to_minus_infinity(src); + break; + case FPCR_ROUND_NEAR: + result = fp_round_to_nearest(src); + break; + case FPCR_ROUND_PINF: + result = fp_round_to_plus_infinity(src); + break; + default: + result = src; /* should never be reached */ + break; + } + return (uae_s32)result; +} + +PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + FPU registers[dest_reg] = value; + make_fpsr(FPU registers[dest_reg]); + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = 0xffffffff; + switch (mode) { + case 0: + switch (size) { + case 6: + m68k_dreg (regs, reg) = ((toint(value) & 0xff) + | (m68k_dreg (regs, reg) & ~0xff)); + break; + case 4: + m68k_dreg (regs, reg) = ((toint(value) & 0xffff) + | (m68k_dreg (regs, reg) & ~0xffff)); + break; + case 0: + m68k_dreg (regs, reg) = toint(value); + break; + case 1: + m68k_dreg (regs, reg) = extract_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch (size) { + case 0: + put_long (ad, toint(value)); + break; + case 1: + put_long (ad, extract_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + extract_extended(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + extract_packed(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 4: + put_word(ad, (uae_s16) toint(value)); + break; + case 5: { + uae_u32 wrd1, wrd2; + extract_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + break; + } + case 6: + put_byte(ad, (uae_s8) toint(value)); + break; + default: + return 0; + } + return 1; +} + +PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) +#else +# define CONDRET(s,x) return (x) +#endif + +PRIVATE inline int FFPU fpp_cond(int condition) +{ + int N = (FPU result < 0.0); + int Z = (FPU result == 0.0); + int NaN = isnan(FPU result); + + if (NaN) + N = Z = 0; + + switch (condition) { + case 0x00: CONDRET("False",0); + case 0x01: CONDRET("Equal",Z); + case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); + case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); + case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); + case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); + case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); + case 0x07: CONDRET("Ordered",!NaN); + case 0x08: CONDRET("Unordered",NaN); + case 0x09: CONDRET("Unordered or Equal",NaN || Z); + case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); + case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); + case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); + case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); + case 0x0e: CONDRET("Not Equal",!Z); + case 0x0f: CONDRET("True",1); + case 0x10: CONDRET("Signaling False",0); + case 0x11: CONDRET("Signaling Equal",Z); + case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); + case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); + case 0x14: CONDRET("Less Than",N && !(NaN || Z)); + case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); + case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); + case 0x17: CONDRET("Greater, Less or Equal",!NaN); + case 0x18: CONDRET("Not Greater, Less or Equal",NaN); + case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); + case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); + case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); + case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); + case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); + case 0x1e: CONDRET("Signaling Not Equal",!Z); + case 0x1f: CONDRET("Signaling True",1); + default: CONDRET("",-1); + } +} + +void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // this may have leaked. + /* + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) + | ((m68k_dreg (regs, reg) - 1) & 0xffff)); + */ + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) + | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); + + + // condition reversed. + // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) + if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) + m68k_setpc (pc + disp); + } +} + +void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uae_u32 ad; + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else if ((opcode & 0x38) == 0) { + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } + else if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + put_byte(ad, cc ? 0xff : 0x00); +} + +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +{ + fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (oldpc); + op_illg (opcode); + } + if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (pc); + op_illg (opcode); + } + else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +void FFPU fpuop_save(uae_u32 opcode) +{ + fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } + else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + fpu_debug(("fsave_opp pre-decrement\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } + else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: fsave_opp post-increment\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); + } +} + +// FRESTORE has no pre-decrement +void FFPU fpuop_restore(uae_u32 opcode) +{ + fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // 68040 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad -= 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad -= 92; + } + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad += 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 92; + } + } + } + } + else { + // 68881 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { + if ((d & 0x00ff0000) == 0x00180000) + ad -= 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad -= 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad -= 45 * 4; + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0x00180000) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + ad += 6 * 4; + } + else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 45 * 4; + } + } + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); + } +} + +void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + int reg; + fpu_register src; + + fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, + m68k_getpc () - 4)); + + dump_registers( "START"); + + switch ((extra >> 13) & 0x7) { + case 3: + fpu_debug(("FMOVE -> \n")); + if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + dump_registers( "END "); + return; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_dreg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); + } + } + else { + if (extra & 0x1000) { + set_fpcr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_dreg (regs, opcode & 7); + fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } +// } else if ((opcode & 0x38) == 1) { + } + else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_areg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_areg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); + } + } else { + if (extra & 0x1000) { + set_fpcr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_areg (regs, opcode & 7); + fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } + } + else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + if (extra & 0x1000) { + set_fpcr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = next_ilong(); + fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); + } + } + } + else if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + uae_u32 ad; + int incr = 0; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + if ((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + } + ad -= incr; + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + put_long (ad, get_fpcr() & 0xFFFF); + fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); + ad += 4; + } + if (extra & 0x0800) { + put_long (ad, get_fpsr()); + fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); + ad += 4; + } + if (extra & 0x0400) { + put_long (ad, FPU instruction_address); + fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); + ad += 4; + } + ad -= incr; + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + uae_u32 ad; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + + // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; + int incr = 0; + if((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + ad = ad - incr; + } + + if (extra & 0x1000) { + set_fpcr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); + ad += 4; + } + if (extra & 0x0800) { + set_fpsr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); + ad += 4; + } + if (extra & 0x0400) { + FPU instruction_address = get_long (ad); + fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); + ad += 4; + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? +// m68k_areg (regs, opcode & 7) = ad - 12; + m68k_areg (regs, opcode & 7) = ad - incr; + } + dump_registers( "END "); + return; + case 6: + case 7: { + uae_u32 ad, list = 0; + int incr = 0; + if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + fpu_debug(("FMOVEM FPP->memory\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + if (incr < 0) { + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + fpu_debug(("FMOVEM memory->FPP\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + /**/ + if (incr < 0) { + // not reached + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + dump_registers( "END "); + return; + } + case 0: + case 2: + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + fpu_debug(("FMOVECR memory->FPP\n")); + switch (extra & 0x7f) { + case 0x00: + // FPU registers[reg] = 4.0 * atan(1.0); + FPU registers[reg] = 3.1415926535897932384626433832795; + fpu_debug(("FP const: Pi\n")); + break; + case 0x0b: + // FPU registers[reg] = log10 (2.0); + FPU registers[reg] = 0.30102999566398119521373889472449; + fpu_debug(("FP const: Log 10 (2)\n")); + break; + case 0x0c: + // FPU registers[reg] = exp (1.0); + FPU registers[reg] = 2.7182818284590452353602874713527; + fpu_debug(("FP const: e\n")); + break; + case 0x0d: + // FPU registers[reg] = log (exp (1.0)) / log (2.0); + FPU registers[reg] = 1.4426950408889634073599246810019; + fpu_debug(("FP const: Log 2 (e)\n")); + break; + case 0x0e: + // FPU registers[reg] = log (exp (1.0)) / log (10.0); + FPU registers[reg] = 0.43429448190325182765112891891661; + fpu_debug(("FP const: Log 10 (e)\n")); + break; + case 0x0f: + FPU registers[reg] = 0.0; + fpu_debug(("FP const: zero\n")); + break; + case 0x30: + // FPU registers[reg] = log (2.0); + FPU registers[reg] = 0.69314718055994530941723212145818; + fpu_debug(("FP const: ln(2)\n")); + break; + case 0x31: + // FPU registers[reg] = log (10.0); + FPU registers[reg] = 2.3025850929940456840179914546844; + fpu_debug(("FP const: ln(10)\n")); + break; + case 0x32: + // ?? + FPU registers[reg] = 1.0e0; + fpu_debug(("FP const: 1.0e0\n")); + break; + case 0x33: + FPU registers[reg] = 1.0e1; + fpu_debug(("FP const: 1.0e1\n")); + break; + case 0x34: + FPU registers[reg] = 1.0e2; + fpu_debug(("FP const: 1.0e2\n")); + break; + case 0x35: + FPU registers[reg] = 1.0e4; + fpu_debug(("FP const: 1.0e4\n")); + break; + case 0x36: + FPU registers[reg] = 1.0e8; + fpu_debug(("FP const: 1.0e8\n")); + break; + case 0x37: + FPU registers[reg] = 1.0e16; + fpu_debug(("FP const: 1.0e16\n")); + break; + case 0x38: + FPU registers[reg] = 1.0e32; + fpu_debug(("FP const: 1.0e32\n")); + break; + case 0x39: + FPU registers[reg] = 1.0e64; + fpu_debug(("FP const: 1.0e64\n")); + break; + case 0x3a: + FPU registers[reg] = 1.0e128; + fpu_debug(("FP const: 1.0e128\n")); + break; + case 0x3b: + FPU registers[reg] = 1.0e256; + fpu_debug(("FP const: 1.0e256\n")); + break; +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + case 0x3c: + FPU registers[reg] = 1.0e512L; + fpu_debug(("FP const: 1.0e512\n")); + break; + case 0x3d: + FPU registers[reg] = 1.0e1024L; + fpu_debug(("FP const: 1.0e1024\n")); + break; + case 0x3e: + FPU registers[reg] = 1.0e2048L; + fpu_debug(("FP const: 1.0e2048\n")); + break; + case 0x3f: + FPU registers[reg] = 1.0e4096L; + fpu_debug(("FP const: 1.0e4096\n")); +#endif + break; + default: + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + // these *do* affect the status reg + make_fpsr(FPU registers[reg]); + dump_registers( "END "); + return; + } + + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + + if (FPU is_integral) { + // 68040-specific operations + switch (extra & 0x7f) { + case 0x40: /* FSMOVE */ + fpu_debug(("FSMOVE %.04f\n",(double)src)); + FPU registers[reg] = (float)src; + make_fpsr(FPU registers[reg]); + break; + case 0x44: /* FDMOVE */ + fpu_debug(("FDMOVE %.04f\n",(double)src)); + FPU registers[reg] = (double)src; + make_fpsr(FPU registers[reg]); + break; + case 0x41: /* FSSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (float)fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x45: /* FDSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = (double)fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x58: /* FSABS */ + fpu_debug(("FSABS %.04f\n",(double)src)); + FPU registers[reg] = (float)fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5c: /* FDABS */ + fpu_debug(("FDABS %.04f\n",(double)src)); + FPU registers[reg] = (double)fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x5a: /* FSNEG */ + fpu_debug(("FSNEG %.04f\n",(double)src)); + FPU registers[reg] = (float)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x5e: /* FDNEG */ + fpu_debug(("FDNEG %.04f\n",(double)src)); + FPU registers[reg] = (double)-src; + make_fpsr(FPU registers[reg]); + break; + case 0x60: /* FSDIV */ + fpu_debug(("FSDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x64: /* FDDIV */ + fpu_debug(("FDDIV %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x62: /* FSADD */ + fpu_debug(("FSADD %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x66: /* FDADD */ + fpu_debug(("FDADD %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] + src); + make_fpsr(FPU registers[reg]); + break; + case 0x68: /* FSSUB */ + fpu_debug(("FSSUB %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x6c: /* FDSUB */ + fpu_debug(("FDSUB %.04f\n",(double)src)); + FPU registers[reg] = (double)(FPU registers[reg] - src); + make_fpsr(FPU registers[reg]); + break; + case 0x63: /* FSMUL */ + case 0x67: /* FDMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + if ((extra & 0x7f) == 0x63) + FPU registers[reg] = (float)(FPU registers[reg] * src); + else + FPU registers[reg] = (double)(FPU registers[reg] * src); + } + else if (fl_dest.nan || fl_source.nan || + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } + make_fpsr(FPU registers[reg]); + break; + default: + // Continue decode-execute 6888x instructions below + goto process_6888x_instructions; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + process_6888x_instructions: + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + fpu_debug(("FMOVE %.04f\n",(double)src)); + FPU registers[reg] = src; + make_fpsr(FPU registers[reg]); + break; + case 0x01: /* FINT */ + fpu_debug(("FINT %.04f\n",(double)src)); + FPU registers[reg] = toint(src); + make_fpsr(FPU registers[reg]); + break; + case 0x02: /* FSINH */ + fpu_debug(("FSINH %.04f\n",(double)src)); + FPU registers[reg] = fp_sinh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x03: /* FINTRZ */ + fpu_debug(("FINTRZ %.04f\n",(double)src)); + FPU registers[reg] = fp_round_to_zero(src); + make_fpsr(FPU registers[reg]); + break; + case 0x04: /* FSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = fp_sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x06: /* FLOGNP1 */ + fpu_debug(("FLOGNP1 %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src + 1.0); + make_fpsr(FPU registers[reg]); + break; + case 0x08: /* FETOXM1 */ + fpu_debug(("FETOXM1 %.04f\n",(double)src)); + FPU registers[reg] = fp_exp (src) - 1.0; + make_fpsr(FPU registers[reg]); + break; + case 0x09: /* FTANH */ + fpu_debug(("FTANH %.04f\n",(double)src)); + FPU registers[reg] = fp_tanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0a: /* FATAN */ + fpu_debug(("FATAN %.04f\n",(double)src)); + FPU registers[reg] = fp_atan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0c: /* FASIN */ + fpu_debug(("FASIN %.04f\n",(double)src)); + FPU registers[reg] = fp_asin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0d: /* FATANH */ + fpu_debug(("FATANH %.04f\n",(double)src)); + FPU registers[reg] = fp_atanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0e: /* FSIN */ + fpu_debug(("FSIN %.04f\n",(double)src)); + FPU registers[reg] = fp_sin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0f: /* FTAN */ + fpu_debug(("FTAN %.04f\n",(double)src)); + FPU registers[reg] = fp_tan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x10: /* FETOX */ + fpu_debug(("FETOX %.04f\n",(double)src)); + FPU registers[reg] = fp_exp (src); + make_fpsr(FPU registers[reg]); + break; + case 0x11: /* FTWOTOX */ + fpu_debug(("FTWOTOX %.04f\n",(double)src)); + FPU registers[reg] = fp_pow(2.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x12: /* FTENTOX */ + fpu_debug(("FTENTOX %.04f\n",(double)src)); + FPU registers[reg] = fp_pow(10.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x14: /* FLOGN */ + fpu_debug(("FLOGN %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src); + make_fpsr(FPU registers[reg]); + break; + case 0x15: /* FLOG10 */ + fpu_debug(("FLOG10 %.04f\n",(double)src)); + FPU registers[reg] = fp_log10 (src); + make_fpsr(FPU registers[reg]); + break; + case 0x16: /* FLOG2 */ + fpu_debug(("FLOG2 %.04f\n",(double)src)); + FPU registers[reg] = fp_log (src) / fp_log (2.0); + make_fpsr(FPU registers[reg]); + break; + case 0x18: /* FABS */ + fpu_debug(("FABS %.04f\n",(double)src)); + FPU registers[reg] = fp_fabs(src); + make_fpsr(FPU registers[reg]); + break; + case 0x19: /* FCOSH */ + fpu_debug(("FCOSH %.04f\n",(double)src)); + FPU registers[reg] = fp_cosh(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1a: /* FNEG */ + fpu_debug(("FNEG %.04f\n",(double)src)); + FPU registers[reg] = -src; + make_fpsr(FPU registers[reg]); + break; + case 0x1c: /* FACOS */ + fpu_debug(("FACOS %.04f\n",(double)src)); + FPU registers[reg] = fp_acos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1d: /* FCOS */ + fpu_debug(("FCOS %.04f\n",(double)src)); + FPU registers[reg] = fp_cos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1e: /* FGETEXP */ + fpu_debug(("FGETEXP %.04f\n",(double)src)); + if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = fast_fgetexp( src ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x1f: /* FGETMAN */ + fpu_debug(("FGETMAN %.04f\n",(double)src)); + if( src == 0 ) { + FPU registers[reg] = 0; + } + else if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = src; + fast_remove_exponent( FPU registers[reg] ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x20: /* FDIV */ + fpu_debug(("FDIV %.04f\n",(double)src)); + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x21: /* FMOD */ + fpu_debug(("FMOD %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; + { + fpu_register quot = fp_round_to_zero(FPU registers[reg] / src); + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); + make_quotient(quot, sign); + } + break; + case 0x23: /* FMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + FPU registers[reg] *= src; + } + else if (fl_dest.nan || fl_source.nan || + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } + make_fpsr(FPU registers[reg]); + break; + case 0x24: /* FSGLDIV */ + fpu_debug(("FSGLDIV %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] / src); + make_fpsr(FPU registers[reg]); + break; + case 0x25: /* FREM */ + fpu_debug(("FREM %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; + { + fpu_register quot = fp_round_to_nearest(FPU registers[reg] / src); + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); + make_quotient(quot,sign); + } + break; + + case 0x26: /* FSCALE */ + fpu_debug(("FSCALE %.04f\n",(double)src)); + // TODO: overflow flags + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if (fl_source.in_range && fl_dest.in_range) { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + // Here (int) cast is okay. + int scale_factor = (int)fp_round_to_zero(src); +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, FPU registers[reg], extended); + sxp->ieee.exponent += scale_factor; +#else + fp_declare_init_shape(sxp, FPU registers[reg], double); + uae_u32 exp = sxp->ieee.exponent + scale_factor; + if (exp < FP_EXTENDED_EXP_BIAS - FP_DOUBLE_EXP_BIAS) + exp = 0; + else if (exp > FP_EXTENDED_EXP_BIAS + FP_DOUBLE_EXP_BIAS) + exp = FP_DOUBLE_EXP_MAX; + else + exp += FP_DOUBLE_EXP_BIAS - FP_EXTENDED_EXP_BIAS; + sxp->ieee.exponent = exp; +#endif + } + else if (fl_source.infinity) { + // Returns NaN for any Infinity source + make_nan( FPU registers[reg] ); + } + make_fpsr(FPU registers[reg]); + break; + case 0x27: /* FSGLMUL */ + fpu_debug(("FSGLMUL %.04f\n",(double)src)); + FPU registers[reg] = (float)(FPU registers[reg] * src); + make_fpsr(FPU registers[reg]); + break; + case 0x28: /* FSUB */ + fpu_debug(("FSUB %.04f\n",(double)src)); + FPU registers[reg] -= src; + make_fpsr(FPU registers[reg]); + break; + case 0x22: /* FADD */ + fpu_debug(("FADD %.04f\n",(double)src)); + FPU registers[reg] += src; + make_fpsr(FPU registers[reg]); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpu_debug(("FSINCOS %.04f\n",(double)src)); + // Cosine must be calculated first if same register + FPU registers[extra & 7] = fp_cos(src); + FPU registers[reg] = fp_sin (src); + // Set FPU fpsr according to the sine result + make_fpsr(FPU registers[reg]); + break; + case 0x38: /* FCMP */ + fpu_debug(("FCMP %.04f\n",(double)src)); + set_fpsr(0); + make_fpsr(FPU registers[reg] - src); + break; + case 0x3a: /* FTST */ + fpu_debug(("FTST %.04f\n",(double)src)); + set_fpsr(0); + make_fpsr(src); + break; + default: + fpu_debug(("ILLEGAL F OP %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + +/* -------------------------- Initialization -------------------------- */ + +PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 + +PUBLIC void FFPU fpu_init (bool integral_68040) +{ + fpu_debug(("fpu_init\n")); + + static bool initialized_lookup_tables = false; + if (!initialized_lookup_tables) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); + initialized_lookup_tables = true; + } + + FPU is_integral = integral_68040; + FPU instruction_address = 0; + FPU fpsr.quotient = 0; + set_fpcr(0); + set_fpsr(0); + +#if defined(FPU_USE_X86_ROUNDING) + // Initial state after boot, reset and frestore(null frame) + x86_control_word = CW_INITIAL; +#elif defined(USE_X87_ASSEMBLY) + volatile unsigned short int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + cw &= ~0x0300; cw |= 0x0300; // CW_PC_EXTENDED + cw &= ~0x0C00; cw |= 0x0000; // CW_RC_NEAR + __asm__ __volatile__("fldcw %0" : : "m" (cw)); +#endif + + FPU result = 1; + + for (int i = 0; i < 8; i++) + make_nan(FPU registers[i]); +} + +PUBLIC void FFPU fpu_exit (void) +{ + fpu_debug(("fpu_exit\n")); +} + +PUBLIC void FFPU fpu_reset (void) +{ + fpu_debug(("fpu_reset\n")); + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h new file mode 100644 index 000000000..895019569 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_ieee.h @@ -0,0 +1,149 @@ +/* + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_IEEE_H +#define FPU_IEEE_H + +/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Lauri-- full words to avoid partial register stalls. +struct double_flags { + uae_u32 in_range; + uae_u32 zero; + uae_u32 infinity; + uae_u32 nan; + uae_u32 negative; +}; +PRIVATE double_flags fl_source; +PRIVATE double_flags fl_dest; +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); +PRIVATE inline void FFPU get_source_flags(fpu_register const & r); + +PRIVATE inline void FFPU make_nan(fpu_register & r); +PRIVATE inline void FFPU make_zero_positive(fpu_register & r); +PRIVATE inline void FFPU make_zero_negative(fpu_register & r); +PRIVATE inline void FFPU make_inf_positive(fpu_register & r); +PRIVATE inline void FFPU make_inf_negative(fpu_register & r); + +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign( + fpu_register const & ra, fpu_register const & rb +); + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient( + fpu_register const & quotient, uae_u32 sign +); + +// to_single +PRIVATE inline fpu_register FFPU make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to_exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// to_exten_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +); + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +); + +PRIVATE inline fpu_register FFPU make_packed( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +PRIVATE inline void FFPU extract_packed( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +PRIVATE inline int FFPU get_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register & src +); + +PRIVATE inline int FFPU put_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register const & value +); + +PRIVATE inline int FFPU get_fp_ad( + uae_u32 opcode, uae_u32 * ad +); + +PRIVATE inline int FFPU fpp_cond( + int condition +); + +#endif /* FPU_IEEE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp new file mode 100644 index 000000000..ffc784a5b --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.cpp @@ -0,0 +1,2369 @@ +/* + * fpu/fpu_uae.cpp + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 + */ + +/* + * Following fixes by Lauri Pesonen, July 1999: + * + * FMOVEM list handling: + * The lookup tables did not work correctly, rewritten. + * FINT: + * (int) cast does not work, fixed. + * Further, now honors the FPU fpcr rounding modes. + * FINTRZ: + * (int) cast cannot be used, fixed. + * FGETEXP: + * Input argument value 0 returned erroneous value. + * FMOD: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FREM: + * (int) cast cannot be used. Replaced by proper rounding. + * Quotient byte handling was missing. + * FSCALE: + * Input argument value 0 was not handled correctly. + * FMOVEM Control Registers to/from address FPU registers An: + * A bug caused the code never been called. + * FMOVEM Control Registers pre-decrement: + * Moving of control regs from memory to FPP was not handled properly, + * if not all of the three FPU registers were moved. + * Condition code "Not Greater Than or Equal": + * Returned erroneous value. + * FSINCOS: + * Cosine must be loaded first if same register. + * FMOVECR: + * Status register was not updated (yes, this affects it). + * FMOVE -> reg: + * Status register was not updated (yes, this affects it). + * FMOVE reg -> reg: + * Status register was not updated. + * FDBcc: + * The loop termination condition was wrong. + * Possible leak from int16 to int32 fixed. + * get_fp_value: + * Immediate addressing mode && Operation Length == Byte -> + * Use the low-order byte of the extension word. + * Now FPU fpcr high 16 bits are always read as zeroes, no matter what was + * written to them. + * + * Other: + * - Optimized single/double/extended to/from conversion functions. + * Huge speed boost, but not (necessarily) portable to other systems. + * Enabled/disabled by #define FPU_HAVE_IEEE_DOUBLE 1 + * - Optimized versions of FSCALE, FGETEXP, FGETMAN + * - Conversion routines now handle NaN and infinity better. + * - Some constants precalculated. Not all compilers can optimize the + * expressions previously used. + * + * TODO: + * - Floating point exceptions. + * - More Infinity/NaN/overflow/underflow checking. + * - FPU instruction_address (only needed when exceptions are implemented) + * - Should be written in assembly to support long doubles. + * - Precision rounding single/double + */ + +#include "sysdeps.h" +#include +#include +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "main.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_uae.h" + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Debugging --- */ +/* -------------------------------------------------------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +/* single : S 8*E 23*F */ +/* double : S 11*E 52*F */ +/* extended : S 15*E 64*F */ +/* E = 0 & F = 0 -> 0 */ +/* E = MAX & F = 0 -> Infin */ +/* E = MAX & F # 0 -> NotANumber */ +/* E = biased by 127 (single) ,1023 (double) ,16383 (extended) */ + +#if FPU_DEBUG + +PUBLIC void FFPU dump_registers(const char * str) +{ + char temp_str[512]; + + sprintf(temp_str, "%s: %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f, %.04f\n", + str, + get_register(0), get_register(1), get_register(2), get_register(3), + get_register(4), get_register(5), get_register(6), get_register(7) ); + + fpu_debug((temp_str)); +} + +PUBLIC void FFPU dump_first_bytes(uae_u8 * buffer, uae_s32 actual) +{ + char temp_buf1[256], temp_buf2[10]; + int bytes = sizeof(temp_buf1)/3-1-3; + if (actual < bytes) + bytes = actual; + + temp_buf1[0] = 0; + for (int i = 0; i < bytes; i++) { + sprintf(temp_buf2, "%02x ", (uae_u32)buffer[i]); + strcat(temp_buf1, temp_buf2); + } + + strcat(temp_buf1, "\n"); + fpu_debug((temp_buf1)); +} + +#else + +PUBLIC void FFPU dump_registers(const char *) +{ +} + +PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ +} + +#endif + +PRIVATE inline fpu_register FFPU round_to_zero(fpu_register const & x) +{ + return (x < 0.0 ? ceil(x) : floor(x)); +} + +PRIVATE inline fpu_register FFPU round_to_nearest(fpu_register const & x) +{ + return floor(x + 0.5); +} + +#if FPU_HAVE_IEEE_DOUBLE + +#ifndef HAVE_ISNAN +#define isnan(x) do_isnan((x)) +#endif + +PRIVATE inline bool FFPU do_isnan(fpu_register const & r) +{ + uae_u32 * p = (uae_u32 *)&r; + if ((p[FHI] & 0x7FF00000) == 0x7FF00000) { + // logical or is faster here. + if ((p[FHI] & 0x000FFFFF) || p[FLO]) { + return true; + } + } + return false; +} + +#ifndef HAVE_ISINF +#define isinf(x) do_isinf((x)) +#endif + +PRIVATE inline bool FFPU do_isinf(fpu_register const & r) +{ + uae_u32 * p = (uae_u32 *)&r; + if (((p[FHI] & 0x7FF00000) == 0x7FF00000) && p[FLO] == 0) { + return true; + } + return false; +} + +#ifndef HAVE_ISNEG +#define isneg(x) do_isneg((x)) +#endif + +PRIVATE inline bool FFPU do_isneg(fpu_register const & r) +{ + uae_u32 * p = (uae_u32 *)&r; + return ((p[FHI] & 0x80000000) != 0); +} + +#ifndef HAVE_ISZERO +#define iszero(x) do_iszero((x)) +#endif + +PRIVATE inline bool FFPU do_iszero(fpu_register const & r) +{ + uae_u32 * p = (uae_u32 *)&r; + return (((p[FHI] & 0x7FF00000) == 0) && p[FLO] == 0); +} + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) +{ + FPU fpsr.condition_codes + = (iszero(r) ? NATIVE_FFLAG_ZERO : 0) + | (isneg(r) ? NATIVE_FFLAG_NEGATIVE : 0) + | (isnan(r) ? NATIVE_FFLAG_NAN : 0) + | (isinf(r) ? NATIVE_FFLAG_INFINITY : 0) + ; +} +#endif + +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) +{ + fl_dest.negative = isneg(r); + fl_dest.zero = iszero(r); + fl_dest.infinity = isinf(r); + fl_dest.nan = isnan(r); + fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; +} + +PRIVATE inline void FFPU get_source_flags(fpu_register const & r) +{ + fl_source.negative = isneg(r); + fl_source.zero = iszero(r); + fl_source.infinity = isinf(r); + fl_source.nan = isnan(r); + fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; +} + +PRIVATE inline void FFPU make_nan(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0xffffffff; + p[FHI] = 0x7fffffff; +} + +PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = p[FHI] = 0; +} + +PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0x80000000; +} + +PRIVATE inline void FFPU make_inf_positive(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0x7FF00000; +} + +PRIVATE inline void FFPU make_inf_negative(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FLO] = 0; + p[FHI] = 0xFFF00000; +} + +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add) +{ + uae_u32 * const p = (uae_u32 *)&r; + int exp = (p[FHI] & 0x7FF00000) >> 20; + // TODO: overflow flags + exp += add; + if(exp >= 2047) { + make_inf_positive(r); + } else if(exp < 0) { + // keep sign (+/- 0) + p[FHI] &= 0x80000000; + } else { + p[FHI] = (p[FHI] & 0x800FFFFF) | ((uae_u32)exp << 20); + } +} + +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + int exp = (p[FHI] & 0x7FF00000) >> 20; + return( exp - 1023 ); +} + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) +{ + uae_u32 * const p = (uae_u32 *)&r; + p[FHI] = (p[FHI] & 0x800FFFFF) | 0x3FF00000; +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) +{ + uae_u32 * const a = (uae_u32 *)&ra; + uae_u32 * const b = (uae_u32 *)&rb; + return (((a[FHI] ^ b[FHI]) & 0x80000000) ? FPSR_QUOTIENT_SIGN : 0); +} + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient(fpu_register const & quotient, uae_u32 sign) +{ + uae_u32 lsb = (uae_u32)fabs(quotient) & 0x7f; + FPU fpsr.quotient = sign | (lsb << 16); +} + +// to_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register result; + uae_u32 * p = (uae_u32 *)&result; + + uae_u32 sign = (value & 0x80000000); + uae_u32 exp = ((value & 0x7F800000) >> 23) + 1023 - 127; + + p[FLO] = value << 29; + p[FHI] = sign | (exp << 20) | ((value & 0x007FFFFF) >> 3); + + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return(result); +} + +// from_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ + if (src == 0.0) + return 0; + + uae_u32 result; + uae_u32 *p = (uae_u32 *)&src; + + uae_u32 sign = (p[FHI] & 0x80000000); + uae_u32 exp = (p[FHI] & 0x7FF00000) >> 20; + + if(exp + 127 < 1023) { + exp = 0; + } else if(exp > 1023 + 127) { + exp = 255; + } else { + exp = exp + 127 - 1023; + } + + result = sign | (exp << 23) | ((p[FHI] & 0x000FFFFF) << 3) | (p[FLO] >> 29); + + fpu_debug(("extract_single (%.04f) = %X\n",(double)src,result)); + + return (result); +} + +// to_exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return 0.0; + + fpu_register result; + uae_u32 *p = (uae_u32 *)&result; + + uae_u32 sign = wrd1 & 0x80000000; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // The explicit integer bit is not set, must normalize. + if((wrd2 & 0x80000000) == 0) { + fpu_debug(("make_extended denormalized mantissa (%X,%X,%X)\n",wrd1,wrd2,wrd3)); + if( wrd2 | wrd3 ) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)( man >> 32 ); + wrd3 = (uae_u32)( man & 0xFFFFFFFF ); + } else { + if(exp == 0x7FFF) { + // Infinity. + } else { + // Zero + exp = 16383 - 1023; + } + } + } + + if(exp < 16383 - 1023) { + // should set underflow. + exp = 0; + } else if(exp > 16383 + 1023) { + // should set overflow. + exp = 2047; + } else { + exp = exp + 1023 - 16383; + } + + // drop the explicit integer bit. + p[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + + return(result); +} + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// make_extended_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +) +{ + // Is it zero? + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) { + make_zero_positive(result); + return; + } + + // Is it NaN? + if( (wrd1 & 0x7FFF0000) == 0x7FFF0000 ) { + if( (wrd1 & 0x0000FFFF) || wrd2 || wrd3 ) { + make_nan(result); + return; + } + } + + uae_u32 sign = wrd1 & 0x80000000; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + if(exp < 16383 - 1023) { + // should set underflow. + exp = 0; + } else if(exp > 16383 + 1023) { + // should set overflow. + exp = 2047; + } else { + exp = exp + 1023 - 16383; + } + + // drop the explicit integer bit. + uae_u32 *p = (uae_u32 *)&result; + p[FLO] = (wrd2 << 21) | (wrd3 >> 11); + p[FHI] = sign | (exp << 20) | ((wrd2 & 0x7FFFFFFF) >> 11); + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(float)(*(double *)p))); +} + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +) +{ + if (src == 0.0) { + *wrd1 = *wrd2 = *wrd3 = 0; + return; + } + + uae_u32 *p = (uae_u32 *)&src; + + fpu_debug(("extract_extended (%X,%X)\n",p[FLO],p[FHI])); + + uae_u32 sign = p[FHI] & 0x80000000; + + uae_u32 exp = ((p[FHI] >> 20) & 0x7ff); + // Check for maximum + if(exp == 0x7FF) { + exp = 0x7FFF; + } else { + exp += 16383 - 1023; + } + + *wrd1 = sign | (exp << 16); + // always set the explicit integer bit. + *wrd2 = 0x80000000 | ((p[FHI] & 0x000FFFFF) << 11) | ((p[FLO] & 0xFFE00000) >> 21); + *wrd3 = p[FLO] << 11; + + fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +// to_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) + return 0.0; + + fpu_register result; + uae_u32 *p = (uae_u32 *)&result; + p[FLO] = wrd2; + p[FHI] = wrd1; + + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); + + return(result); +} + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +) +{ +/* + if (src == 0.0) { + *wrd1 = *wrd2 = 0; + return; + } +*/ + uae_u32 *p = (uae_u32 *)&src; + *wrd2 = p[FLO]; + *wrd1 = p[FHI]; + + fpu_debug(("extract_double (%.04f) = %X,%X\n",(double)src,*wrd1,*wrd2)); +} + +#else // !FPU_HAVE_IEEE_DOUBLE + +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r) +{ + FPU fpsr.condition_codes + = ((r == 0.0) ? NATIVE_FFLAG_ZERO : 0) + | ((r < 0.0) ? NATIVE_FFLAG_NEGATIVE : 0) + ; +} +#endif + +// make_single +PRIVATE inline fpu_register FFPU make_single(uae_u32 value) +{ + if ((value & 0x7fffffff) == 0) + return (0.0); + + fpu_register frac = (fpu_register) ((value & 0x7fffff) | 0x800000) / 8388608.0; + if (value & 0x80000000) + frac = -frac; + + fpu_register result = ldexp (frac, (int)((value >> 23) & 0xff) - 127); + fpu_debug(("make_single (%X) = %.04f\n",value,(double)result)); + + return (result); +} + +// extract_single +PRIVATE inline uae_u32 FFPU extract_single(fpu_register const & src) +{ + int expon; + uae_u32 tmp, result; + fpu_register frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) + return 0; + if (src < 0) { + tmp = 0x80000000; + src = -src; + } else { + tmp = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 16777216.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + result = tmp | (((expon + 127 - 1) & 0xff) << 23) | (((int) (frac * 16777216.0)) & 0x7fffff); + + // fpu_debug(("extract_single (%.04f) = %X\n",(float)src0,result)); + + return (result); +} + +// to exten +PRIVATE inline fpu_register FFPU make_extended(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_register frac, result; + + if ((wrd1 & 0x7fff0000) == 0 && wrd2 == 0 && wrd3 == 0) + return 0.0; + frac = (fpu_register) wrd2 / 2147483648.0 + + (fpu_register) wrd3 / 9223372036854775808.0; + if (wrd1 & 0x80000000) + frac = -frac; + result = ldexp (frac, (int)((wrd1 >> 16) & 0x7fff) - 16383); + + fpu_debug(("make_extended (%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)result)); + + return result; +} + +// extract_extended +PRIVATE inline void FFPU extract_extended(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + int expon; + fpu_register frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) { + *wrd1 = 0; + *wrd2 = 0; + *wrd3 = 0; + return; + } + if (src < 0) { + *wrd1 = 0x80000000; + src = -src; + } else { + *wrd1 = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 18446744073709551616.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + *wrd1 |= (((expon + 16383 - 1) & 0x7fff) << 16); + *wrd2 = (uae_u32) (frac * 4294967296.0); + *wrd3 = (uae_u32) (frac * 18446744073709551616.0 - *wrd2 * 4294967296.0); + + // fpu_debug(("extract_extended (%.04f) = %X,%X,%X\n",(float)src0,*wrd1,*wrd2,*wrd3)); +} + +// make_double +PRIVATE inline fpu_register FFPU make_double(uae_u32 wrd1, uae_u32 wrd2) +{ + if ((wrd1 & 0x7fffffff) == 0 && wrd2 == 0) + return 0.0; + + fpu_register frac = + (fpu_register) ((wrd1 & 0xfffff) | 0x100000) / 1048576.0 + + (fpu_register) wrd2 / 4503599627370496.0; + + if (wrd1 & 0x80000000) + frac = -frac; + + fpu_register result = ldexp (frac, (int)((wrd1 >> 20) & 0x7ff) - 1023); + fpu_debug(("make_double (%X,%X) = %.04f\n",wrd1,wrd2,(double)result)); + + return result; +} + +// extract_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2) +{ + int expon; + int tmp; + fpu_register frac frac; +#if FPU_DEBUG + fpu_register src0 = src; +#endif + + if (src == 0.0) { + *wrd1 = 0; + *wrd2 = 0; + return; + } + if (src < 0) { + *wrd1 = 0x80000000; + src = -src; + } else { + *wrd1 = 0; + } + frac = frexp (src, &expon); + frac += 0.5 / 9007199254740992.0; + if (frac >= 1.0) { + frac /= 2.0; + expon++; + } + tmp = (uae_u32) (frac * 2097152.0); + *wrd1 |= (((expon + 1023 - 1) & 0x7ff) << 20) | (tmp & 0xfffff); + *wrd2 = (uae_u32) (frac * 9007199254740992.0 - tmp * 4294967296.0); + + // fpu_debug(("extract_double (%.04f) = %X,%X\n",(float)src0,*wrd1,*wrd2)); +} + +#endif + +// to_pack +PRIVATE inline fpu_register FFPU make_packed(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + fpu_double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + fpu_debug(("make_packed str = %s\n",str)); + + fpu_debug(("make_packed(%X,%X,%X) = %.04f\n",wrd1,wrd2,wrd3,(double)d)); + return d; +} + +// from_pack +PRIVATE inline void FFPU extract_packed(fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + int i; + int t; + char *cp; + char str[100]; + + sprintf(str, "%.16e", src); + + fpu_debug(("extract_packed(%.04f,%s)\n",(double)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; + } + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; + } + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; + } + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') + t = (t << 4) | (*cp++ - '0'); + } + *wrd1 |= t << 16; + } + + fpu_debug(("extract_packed(%.04f) = %X,%X,%X\n",(double)src,*wrd1,*wrd2,*wrd3)); +} + +PRIVATE inline int FFPU get_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register & src) +{ + uaecptr tmppc; + uae_u16 tmp; + int size; + int mode; + int reg; + uae_u32 ad = 0; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("get_fp_value(%X,%X)\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + src = FPU registers[(extra >> 10) & 7]; + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + + fpu_debug(("get_fp_value mode=%d, reg=%d, size=%d\n",(int)mode,(int)reg,(int)size)); + + switch (mode) { + case 0: + switch (size) { + case 6: + src = (fpu_register) (uae_s8) m68k_dreg (regs, reg); + break; + case 4: + src = (fpu_register) (uae_s16) m68k_dreg (regs, reg); + break; + case 0: + src = (fpu_register) (uae_s32) m68k_dreg (regs, reg); + break; + case 1: + src = make_single(m68k_dreg (regs, reg)); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + fpu_debug(("get_fp_value next_iword()=%X\n",ad-m68k_getpc()-2)); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + if(size == 6) ad++; + break; + default: + return 0; + } + } + + fpu_debug(("get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + fpu_debug(("get_fp_value ad=%X\n",ad)); + fpu_debug(("get_fp_value get_long (ad)=%X\n",get_long (ad))); + dump_first_bytes( get_real_address(ad)-64, 64 ); + dump_first_bytes( get_real_address(ad), 64 ); + + switch (size) { + case 0: + src = (fpu_register) (uae_s32) get_long (ad); + break; + case 1: + src = make_single(get_long (ad)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_extended(wrd1, wrd2, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + src = make_packed(wrd1, wrd2, wrd3); + break; + } + case 4: + src = (fpu_register) (uae_s16) get_word(ad); + break; + case 5: { + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + src = make_double(wrd1, wrd2); + break; + } + case 6: + src = (fpu_register) (uae_s8) get_byte(ad); + break; + default: + return 0; + } + + // fpu_debug(("get_fp_value result = %.04f\n",(float)src)); + return 1; +} + +PRIVATE inline int FFPU put_fp_value (uae_u32 opcode, uae_u16 extra, fpu_register const & value) +{ + uae_u16 tmp; + uaecptr tmppc; + int size; + int mode; + int reg; + uae_u32 ad; + static int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // fpu_debug(("put_fp_value(%.04f,%X,%X)\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + FPU registers[dest_reg] = value; + make_fpsr(FPU registers[dest_reg]); + return 1; + } + mode = (opcode >> 3) & 7; + reg = opcode & 7; + size = (extra >> 10) & 7; + ad = 0xffffffff; + switch (mode) { + case 0: + switch (size) { + case 6: + m68k_dreg (regs, reg) + = (((uae_s32) value & 0xff) + | (m68k_dreg (regs, reg) & ~0xff)); + break; + case 4: + m68k_dreg (regs, reg) + = (((uae_s32) value & 0xffff) + | (m68k_dreg (regs, reg) & ~0xffff)); + break; + case 0: + m68k_dreg (regs, reg) = (uae_s32) value; + break; + case 1: + m68k_dreg (regs, reg) = extract_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch (size) { + case 0: + put_long (ad, (uae_s32) value); + break; + case 1: + put_long (ad, extract_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + extract_extended(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 3: { + uae_u32 wrd1, wrd2, wrd3; + extract_packed(value, &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + break; + } + case 4: + put_word(ad, (uae_s16) value); + break; + case 5: { + uae_u32 wrd1, wrd2; + extract_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + break; + } + case 6: + put_byte(ad, (uae_s8) value); + break; + default: + return 0; + } + return 1; +} + +PRIVATE inline int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + uae_u16 tmp; + uaecptr tmppc; + int mode; + int reg; + + mode = (opcode >> 3) & 7; + reg = opcode & 7; + switch (mode) { + case 0: + case 1: + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch (reg) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: + tmppc = m68k_getpc (); + tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + break; + default: + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +# define CONDRET(s,x) fpu_debug(("fpp_cond %s = %d\n",s,(uint32)(x))); return (x) +#else +# define CONDRET(s,x) return (x) +#endif + +PRIVATE inline int FFPU fpp_cond(int condition) +{ +#if 1 +# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) == NATIVE_FFLAG_NEGATIVE) +# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) == NATIVE_FFLAG_ZERO) +# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) == NATIVE_FFLAG_INFINITY) +# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) == NATIVE_FFLAG_NAN) +#else +# define N ((FPU fpsr.condition_codes & NATIVE_FFLAG_NEGATIVE) != 0) +# define Z ((FPU fpsr.condition_codes & NATIVE_FFLAG_ZERO) != 0) +# define I ((FPU fpsr.condition_codes & NATIVE_FFLAG_INFINITY) != 0) +# define NaN ((FPU fpsr.condition_codes & NATIVE_FFLAG_NAN) != 0) +#endif + +#if 0 + return fpcctrue(condition); +#else + switch (condition) { + case 0x00: CONDRET("False",0); + case 0x01: CONDRET("Equal",Z); + case 0x02: CONDRET("Ordered Greater Than",!(NaN || Z || N)); + case 0x03: CONDRET("Ordered Greater Than or Equal",Z || !(NaN || N)); + case 0x04: CONDRET("Ordered Less Than",N && !(NaN || Z)); + case 0x05: CONDRET("Ordered Less Than or Equal",Z || (N && !NaN)); + case 0x06: CONDRET("Ordered Greater or Less Than",!(NaN || Z)); + case 0x07: CONDRET("Ordered",!NaN); + case 0x08: CONDRET("Unordered",NaN); + case 0x09: CONDRET("Unordered or Equal",NaN || Z); + case 0x0a: CONDRET("Unordered or Greater Than",NaN || !(N || Z)); + case 0x0b: CONDRET("Unordered or Greater or Equal",NaN || Z || !N); + case 0x0c: CONDRET("Unordered or Less Than",NaN || (N && !Z)); + case 0x0d: CONDRET("Unordered or Less or Equal",NaN || Z || N); + case 0x0e: CONDRET("Not Equal",!Z); + case 0x0f: CONDRET("True",1); + case 0x10: CONDRET("Signaling False",0); + case 0x11: CONDRET("Signaling Equal",Z); + case 0x12: CONDRET("Greater Than",!(NaN || Z || N)); + case 0x13: CONDRET("Greater Than or Equal",Z || !(NaN || N)); + case 0x14: CONDRET("Less Than",N && !(NaN || Z)); + case 0x15: CONDRET("Less Than or Equal",Z || (N && !NaN)); + case 0x16: CONDRET("Greater or Less Than",!(NaN || Z)); + case 0x17: CONDRET("Greater, Less or Equal",!NaN); + case 0x18: CONDRET("Not Greater, Less or Equal",NaN); + case 0x19: CONDRET("Not Greater or Less Than",NaN || Z); + case 0x1a: CONDRET("Not Less Than or Equal",NaN || !(N || Z)); + case 0x1b: CONDRET("Not Less Than",NaN || Z || !N); + case 0x1c: CONDRET("Not Greater Than or Equal", NaN || (N && !Z)); +// case 0x1c: CONDRET("Not Greater Than or Equal",!Z && (NaN || N)); + case 0x1d: CONDRET("Not Greater Than",NaN || Z || N); + case 0x1e: CONDRET("Signaling Not Equal",!Z); + case 0x1f: CONDRET("Signaling True",1); + default: CONDRET("",-1); + } +#endif + +# undef N +# undef Z +# undef I +# undef NaN +} + +void FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fdbcc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // this may have leaked. + /* + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & ~0xffff) + | ((m68k_dreg (regs, reg) - 1) & 0xffff)); + */ + m68k_dreg (regs, reg) = ((m68k_dreg (regs, reg) & 0xffff0000) + | (((m68k_dreg (regs, reg) & 0xffff) - 1) & 0xffff)); + + + // condition reversed. + // if ((m68k_dreg (regs, reg) & 0xffff) == 0xffff) + if ((m68k_dreg (regs, reg) & 0xffff) != 0xffff) + m68k_setpc (pc + disp); + } +} + +void FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + fpu_debug(("fscc_opp %X, %X at %08lx\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + uae_u32 ad; + int cc = fpp_cond(extra & 0x3f); + if (cc == -1) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else if ((opcode & 0x38) == 0) { + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } + else if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + else + put_byte(ad, cc ? 0xff : 0x00); +} + +void FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +{ + fpu_debug(("ftrapcc_opp %X at %08lx\n", (uae_u32)opcode, m68k_getpc ())); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (oldpc); + op_illg (opcode); + } + if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +void FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + fpu_debug(("fbcc_opp %X, %X at %08lx, jumpto=%X\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + int cc = fpp_cond(opcode & 0x3f); + if (cc == -1) { + m68k_setpc (pc); + op_illg (opcode); + } + else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +void FFPU fpuop_save(uae_u32 opcode) +{ + fpu_debug(("fsave_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } + else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + fpu_debug(("fsave_opp pre-decrement\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } + else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: fsave_opp post-increment\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("fsave_opp pre-decrement %X -> A%d\n",ad,opcode & 7)); + } +} + +// FRESTORE has no pre-decrement +void FFPU fpuop_restore(uae_u32 opcode) +{ + fpu_debug(("frestore_opp at %08lx\n", m68k_getpc ())); + + uae_u32 ad; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 2); + op_illg (opcode); + return; + } + + if (CPUType == 4) { + // 68040 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad -= 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad -= 92; + } + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + fpu_debug(("PROBLEM: frestore_opp found UNIMP frame at %X\n",ad-4)); + ad += 44; + } + else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 92; + } + } + } + } + else { + // 68881 + if (incr < 0) { + fpu_debug(("PROBLEM: frestore_opp incr < 0\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) != 0) { + if ((d & 0x00ff0000) == 0x00180000) + ad -= 6 * 4; + else if ((d & 0x00ff0000) == 0x00380000) + ad -= 14 * 4; + else if ((d & 0x00ff0000) == 0x00b40000) + ad -= 45 * 4; + } + } + else { + d = get_long (ad); + fpu_debug(("frestore_opp frame at %X = %X\n",ad,d)); + ad += 4; + if ((d & 0xff000000) != 0) { // Not a NULL frame? + if ((d & 0x00ff0000) == 0x00180000) { // IDLE + fpu_debug(("frestore_opp found IDLE frame at %X\n",ad-4)); + ad += 6 * 4; + } + else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + fpu_debug(("PROBLEM: frestore_opp found UNIMP? frame at %X\n",ad-4)); + } + else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + fpu_debug(("PROBLEM: frestore_opp found BUSY frame at %X\n",ad-4)); + ad += 45 * 4; + } + } + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + fpu_debug(("frestore_opp post-increment %X -> A%d\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + fpu_debug(("PROBLEM: frestore_opp pre-decrement\n")); + } +} + +void FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + int reg; + fpu_register src; + + fpu_debug(("FPP %04lx %04x at %08lx\n", opcode & 0xffff, extra & 0xffff, + m68k_getpc () - 4)); + + dump_registers( "START"); + + switch ((extra >> 13) & 0x7) { + case 3: + fpu_debug(("FMOVE -> \n")); + if (put_fp_value (opcode, extra, FPU registers[(extra >> 7) & 7]) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + dump_registers( "END "); + return; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_dreg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> D%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_dreg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> D%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> D%d\n", FPU instruction_address, opcode & 7)); + } + } + else { + if (extra & 0x1000) { + set_fpcr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_dreg (regs, opcode & 7) ); + fpu_debug(("FMOVEM D%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_dreg (regs, opcode & 7); + fpu_debug(("FMOVEM D%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } +// } else if ((opcode & 0x38) == 1) { + } + else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + m68k_areg (regs, opcode & 7) = get_fpcr() & 0xFFFF; + fpu_debug(("FMOVEM FPU fpcr (%X) -> A%d\n", get_fpcr(), opcode & 7)); + } + if (extra & 0x0800) { + m68k_areg (regs, opcode & 7) = get_fpsr(); + fpu_debug(("FMOVEM FPU fpsr (%X) -> A%d\n", get_fpsr(), opcode & 7)); + } + if (extra & 0x0400) { + m68k_areg (regs, opcode & 7) = FPU instruction_address; + fpu_debug(("FMOVEM FPU instruction_address (%X) -> A%d\n", FPU instruction_address, opcode & 7)); + } + } else { + if (extra & 0x1000) { + set_fpcr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpcr\n", opcode & 7, get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( m68k_areg (regs, opcode & 7) ); + fpu_debug(("FMOVEM A%d (%X) -> FPU fpsr\n", opcode & 7, get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = m68k_areg (regs, opcode & 7); + fpu_debug(("FMOVEM A%d (%X) -> FPU instruction_address\n", opcode & 7, FPU instruction_address)); + } + } + } + else if ((opcode & 0x3f) == 0x3c) { + if ((extra & 0x2000) == 0) { + if (extra & 0x1000) { + set_fpcr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpcr\n", get_fpcr())); + } + if (extra & 0x0800) { + set_fpsr( next_ilong() ); + fpu_debug(("FMOVEM #<%X> -> FPU fpsr\n", get_fpsr())); + } + if (extra & 0x0400) { + FPU instruction_address = next_ilong(); + fpu_debug(("FMOVEM #<%X> -> FPU instruction_address\n", FPU instruction_address)); + } + } + } + else if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + uae_u32 ad; + int incr = 0; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + if ((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + } + ad -= incr; + if (extra & 0x1000) { + // according to the manual, the msb bits are always zero. + put_long (ad, get_fpcr() & 0xFFFF); + fpu_debug(("FMOVEM FPU fpcr (%X) -> mem %X\n", get_fpcr(), ad )); + ad += 4; + } + if (extra & 0x0800) { + put_long (ad, get_fpsr()); + fpu_debug(("FMOVEM FPU fpsr (%X) -> mem %X\n", get_fpsr(), ad )); + ad += 4; + } + if (extra & 0x0400) { + put_long (ad, FPU instruction_address); + fpu_debug(("FMOVEM FPU instruction_address (%X) -> mem %X\n", FPU instruction_address, ad )); + ad += 4; + } + ad -= incr; + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + uae_u32 ad; + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + + // ad = (opcode & 0x38) == 0x20 ? ad - 12 : ad; + int incr = 0; + if((opcode & 0x38) == 0x20) { + if (extra & 0x1000) + incr += 4; + if (extra & 0x0800) + incr += 4; + if (extra & 0x0400) + incr += 4; + ad = ad - incr; + } + + if (extra & 0x1000) { + set_fpcr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpcr\n", ad, get_fpcr() )); + ad += 4; + } + if (extra & 0x0800) { + set_fpsr( get_long (ad) ); + fpu_debug(("FMOVEM mem %X (%X) -> FPU fpsr\n", ad, get_fpsr() )); + ad += 4; + } + if (extra & 0x0400) { + FPU instruction_address = get_long (ad); + fpu_debug(("FMOVEM mem %X (%X) -> FPU instruction_address\n", ad, FPU instruction_address )); + ad += 4; + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? +// m68k_areg (regs, opcode & 7) = ad - 12; + m68k_areg (regs, opcode & 7) = ad - incr; + } + dump_registers( "END "); + return; + case 6: + case 7: { + uae_u32 ad, list = 0; + int incr = 0; + if (extra & 0x2000) { + /* FMOVEM FPP->memory */ + fpu_debug(("FMOVEM FPP->memory\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + if (incr < 0) { + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + extract_extended(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + else { + /* FMOVEM memory->FPP */ + fpu_debug(("FMOVEM memory->FPP\n")); + + if (get_fp_ad(opcode, &ad) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = extra & 0xff; + incr = -1; + break; + case 1: /* dynamic pred */ + fpu_debug(("memory->FMOVEM FPP not legal mode.\n")); + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = -1; + break; + case 2: /* static postinc */ + list = extra & 0xff; + incr = 1; + break; + case 3: /* dynamic postinc */ + list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + incr = 1; + break; + } + + /**/ + if (incr < 0) { + // not reached + for(reg=7; reg>=0; reg--) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + else { + for(reg=0; reg<8; reg++) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + // FPU registers[reg] = make_extended(wrd1, wrd2, wrd3); + make_extended_no_normalize (wrd1, wrd2, wrd3, FPU registers[reg]); + } + list <<= 1; + } + } + if ((opcode & 0x38) == 0x18) // post-increment? + m68k_areg (regs, opcode & 7) = ad; + if ((opcode & 0x38) == 0x20) // pre-decrement? + m68k_areg (regs, opcode & 7) = ad; + } + dump_registers( "END "); + return; + } + case 0: + case 2: + reg = (extra >> 7) & 7; + if ((extra & 0xfc00) == 0x5c00) { + fpu_debug(("FMOVECR memory->FPP\n")); + switch (extra & 0x7f) { + case 0x00: + // FPU registers[reg] = 4.0 * atan(1.0); + FPU registers[reg] = 3.1415926535897932384626433832795; + fpu_debug(("FP const: Pi\n")); + break; + case 0x0b: + // FPU registers[reg] = log10 (2.0); + FPU registers[reg] = 0.30102999566398119521373889472449; + fpu_debug(("FP const: Log 10 (2)\n")); + break; + case 0x0c: + // FPU registers[reg] = exp (1.0); + FPU registers[reg] = 2.7182818284590452353602874713527; + fpu_debug(("FP const: e\n")); + break; + case 0x0d: + // FPU registers[reg] = log (exp (1.0)) / log (2.0); + FPU registers[reg] = 1.4426950408889634073599246810019; + fpu_debug(("FP const: Log 2 (e)\n")); + break; + case 0x0e: + // FPU registers[reg] = log (exp (1.0)) / log (10.0); + FPU registers[reg] = 0.43429448190325182765112891891661; + fpu_debug(("FP const: Log 10 (e)\n")); + break; + case 0x0f: + FPU registers[reg] = 0.0; + fpu_debug(("FP const: zero\n")); + break; + case 0x30: + // FPU registers[reg] = log (2.0); + FPU registers[reg] = 0.69314718055994530941723212145818; + fpu_debug(("FP const: ln(2)\n")); + break; + case 0x31: + // FPU registers[reg] = log (10.0); + FPU registers[reg] = 2.3025850929940456840179914546844; + fpu_debug(("FP const: ln(10)\n")); + break; + case 0x32: + // ?? + FPU registers[reg] = 1.0e0; + fpu_debug(("FP const: 1.0e0\n")); + break; + case 0x33: + FPU registers[reg] = 1.0e1; + fpu_debug(("FP const: 1.0e1\n")); + break; + case 0x34: + FPU registers[reg] = 1.0e2; + fpu_debug(("FP const: 1.0e2\n")); + break; + case 0x35: + FPU registers[reg] = 1.0e4; + fpu_debug(("FP const: 1.0e4\n")); + break; + case 0x36: + FPU registers[reg] = 1.0e8; + fpu_debug(("FP const: 1.0e8\n")); + break; + case 0x37: + FPU registers[reg] = 1.0e16; + fpu_debug(("FP const: 1.0e16\n")); + break; + case 0x38: + FPU registers[reg] = 1.0e32; + fpu_debug(("FP const: 1.0e32\n")); + break; + case 0x39: + FPU registers[reg] = 1.0e64; + fpu_debug(("FP const: 1.0e64\n")); + break; + case 0x3a: + FPU registers[reg] = 1.0e128; + fpu_debug(("FP const: 1.0e128\n")); + break; + case 0x3b: + FPU registers[reg] = 1.0e256; + fpu_debug(("FP const: 1.0e256\n")); + break; +#if 0 + case 0x3c: + FPU registers[reg] = 1.0e512; + fpu_debug(("FP const: 1.0e512\n")); + break; + case 0x3d: + FPU registers[reg] = 1.0e1024; + fpu_debug(("FP const: 1.0e1024\n")); + break; + case 0x3e: + FPU registers[reg] = 1.0e2048; + fpu_debug(("FP const: 1.0e2048\n")); + break; + case 0x3f: + FPU registers[reg] = 1.0e4096; + fpu_debug(("FP const: 1.0e4096\n")); + break; +#endif + default: + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + // these *do* affect the status reg + make_fpsr(FPU registers[reg]); + dump_registers( "END "); + return; + } + + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + fpu_debug(("returned from get_fp_value m68k_getpc()=%X\n",m68k_getpc())); + + switch (extra & 0x7f) { + case 0x00: /* FMOVE */ + fpu_debug(("FMOVE %.04f\n",(double)src)); + FPU registers[reg] = src; + // -> reg DOES affect the status reg + make_fpsr(FPU registers[reg]); + break; + case 0x01: /* FINT */ + fpu_debug(("FINT %.04f\n",(double)src)); + // FPU registers[reg] = (int) (src + 0.5); + // FIXME: use native rounding mode flags + switch (get_fpcr() & 0x30) { + case FPCR_ROUND_ZERO: + FPU registers[reg] = round_to_zero(src); + break; + case FPCR_ROUND_MINF: + FPU registers[reg] = floor(src); + break; + case FPCR_ROUND_NEAR: + FPU registers[reg] = round_to_nearest(src); + break; + case FPCR_ROUND_PINF: + FPU registers[reg] = ceil(src); + break; + } + make_fpsr(FPU registers[reg]); + break; + case 0x02: /* FSINH */ + fpu_debug(("FSINH %.04f\n",(double)src)); + FPU registers[reg] = sinh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x03: /* FINTRZ */ + fpu_debug(("FINTRZ %.04f\n",(double)src)); + // FPU registers[reg] = (int) src; + FPU registers[reg] = round_to_zero(src); + make_fpsr(FPU registers[reg]); + break; + case 0x04: /* FSQRT */ + fpu_debug(("FSQRT %.04f\n",(double)src)); + FPU registers[reg] = sqrt (src); + make_fpsr(FPU registers[reg]); + break; + case 0x06: /* FLOGNP1 */ + fpu_debug(("FLOGNP1 %.04f\n",(double)src)); + FPU registers[reg] = log (src + 1.0); + make_fpsr(FPU registers[reg]); + break; + case 0x08: /* FETOXM1 */ + fpu_debug(("FETOXM1 %.04f\n",(double)src)); + FPU registers[reg] = exp (src) - 1.0; + make_fpsr(FPU registers[reg]); + break; + case 0x09: /* FTANH */ + fpu_debug(("FTANH %.04f\n",(double)src)); + FPU registers[reg] = tanh (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0a: /* FATAN */ + fpu_debug(("FATAN %.04f\n",(double)src)); + FPU registers[reg] = atan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0c: /* FASIN */ + fpu_debug(("FASIN %.04f\n",(double)src)); + FPU registers[reg] = asin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0d: /* FATANH */ + fpu_debug(("FATANH %.04f\n",(double)src)); +#if HAVE_ATANH + FPU registers[reg] = atanh (src); +#else + /* The BeBox doesn't have atanh, and it isn't in the HPUX libm either */ + FPU registers[reg] = log ((1 + src) / (1 - src)) / 2; +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x0e: /* FSIN */ + fpu_debug(("FSIN %.04f\n",(double)src)); + FPU registers[reg] = sin (src); + make_fpsr(FPU registers[reg]); + break; + case 0x0f: /* FTAN */ + fpu_debug(("FTAN %.04f\n",(double)src)); + FPU registers[reg] = tan (src); + make_fpsr(FPU registers[reg]); + break; + case 0x10: /* FETOX */ + fpu_debug(("FETOX %.04f\n",(double)src)); + FPU registers[reg] = exp (src); + make_fpsr(FPU registers[reg]); + break; + case 0x11: /* FTWOTOX */ + fpu_debug(("FTWOTOX %.04f\n",(double)src)); + FPU registers[reg] = pow(2.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x12: /* FTENTOX */ + fpu_debug(("FTENTOX %.04f\n",(double)src)); + FPU registers[reg] = pow(10.0, src); + make_fpsr(FPU registers[reg]); + break; + case 0x14: /* FLOGN */ + fpu_debug(("FLOGN %.04f\n",(double)src)); + FPU registers[reg] = log (src); + make_fpsr(FPU registers[reg]); + break; + case 0x15: /* FLOG10 */ + fpu_debug(("FLOG10 %.04f\n",(double)src)); + FPU registers[reg] = log10 (src); + make_fpsr(FPU registers[reg]); + break; + case 0x16: /* FLOG2 */ + fpu_debug(("FLOG2 %.04f\n",(double)src)); + FPU registers[reg] = log (src) / log (2.0); + make_fpsr(FPU registers[reg]); + break; + case 0x18: /* FABS */ + case 0x58: /* single precision rounding */ + case 0x5C: /* double precision rounding */ + fpu_debug(("FABS %.04f\n",(double)src)); + FPU registers[reg] = src < 0 ? -src : src; + make_fpsr(FPU registers[reg]); + break; + case 0x19: /* FCOSH */ + fpu_debug(("FCOSH %.04f\n",(double)src)); + FPU registers[reg] = cosh(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1a: /* FNEG */ + fpu_debug(("FNEG %.04f\n",(double)src)); + FPU registers[reg] = -src; + make_fpsr(FPU registers[reg]); + break; + case 0x1c: /* FACOS */ + fpu_debug(("FACOS %.04f\n",(double)src)); + FPU registers[reg] = acos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1d: /* FCOS */ + fpu_debug(("FCOS %.04f\n",(double)src)); + FPU registers[reg] = cos(src); + make_fpsr(FPU registers[reg]); + break; + case 0x1e: /* FGETEXP */ + fpu_debug(("FGETEXP %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = fast_fgetexp( src ); + } +#else + if(src == 0) { + FPU registers[reg] = (fpu_register)0; + } + else { + int expon; + frexp (src, &expon); + FPU registers[reg] = (fpu_register) (expon - 1); + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x1f: /* FGETMAN */ + fpu_debug(("FGETMAN %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + if( src == 0 ) { + FPU registers[reg] = 0; + } + else if( isinf(src) ) { + make_nan( FPU registers[reg] ); + } + else { + FPU registers[reg] = src; + fast_remove_exponent( FPU registers[reg] ); + } +#else + { + int expon; + FPU registers[reg] = frexp (src, &expon) * 2.0; + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x20: /* FDIV */ + fpu_debug(("FDIV %.04f\n",(double)src)); + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x21: /* FMOD */ + fpu_debug(("FMOD %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (fpu_register) ((int) (FPU registers[reg] / src)) * src; + { + fpu_register quot = round_to_zero(FPU registers[reg] / src); +#if FPU_HAVE_IEEE_DOUBLE + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); +#endif + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); +#if FPU_HAVE_IEEE_DOUBLE + make_quotient(quot, sign); +#endif + } + break; + case 0x22: /* FADD */ + case 0x62: /* single */ + case 0x66: /* double */ + fpu_debug(("FADD %.04f\n",(double)src)); + FPU registers[reg] += src; + make_fpsr(FPU registers[reg]); + break; + case 0x23: /* FMUL */ + fpu_debug(("FMUL %.04f\n",(double)src)); +#if FPU_HAVE_IEEE_DOUBLE + get_dest_flags(FPU registers[reg]); + get_source_flags(src); + if(fl_dest.in_range && fl_source.in_range) { + FPU registers[reg] *= src; + } + else if (fl_dest.nan || fl_source.nan || + fl_dest.zero && fl_source.infinity || + fl_dest.infinity && fl_source.zero ) { + make_nan( FPU registers[reg] ); + } + else if (fl_dest.zero || fl_source.zero ) { + if (fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_zero_negative(FPU registers[reg]); + } + else { + make_zero_positive(FPU registers[reg]); + } + } + else { + if( fl_dest.negative && !fl_source.negative || + !fl_dest.negative && fl_source.negative) { + make_inf_negative(FPU registers[reg]); + } + else { + make_inf_positive(FPU registers[reg]); + } + } +#else + fpu_debug(("FMUL %.04f\n",(double)src)); + FPU registers[reg] *= src; +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x24: /* FSGLDIV */ + fpu_debug(("FSGLDIV %.04f\n",(double)src)); + // TODO: round to float. + FPU registers[reg] /= src; + make_fpsr(FPU registers[reg]); + break; + case 0x25: /* FREM */ + fpu_debug(("FREM %.04f\n",(double)src)); + // FPU registers[reg] = FPU registers[reg] - (double) ((int) (FPU registers[reg] / src + 0.5)) * src; + { + fpu_register quot = round_to_nearest(FPU registers[reg] / src); +#if FPU_HAVE_IEEE_DOUBLE + uae_u32 sign = get_quotient_sign(FPU registers[reg],src); +#endif + FPU registers[reg] = FPU registers[reg] - quot * src; + make_fpsr(FPU registers[reg]); +#if FPU_HAVE_IEEE_DOUBLE + make_quotient(quot,sign); +#endif + } + break; + + case 0x26: /* FSCALE */ + fpu_debug(("FSCALE %.04f\n",(double)src)); + + // TODO: + // Overflow, underflow + +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(FPU registers[reg]) ) { + make_nan( FPU registers[reg] ); + } + else { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + // Here (int) cast is okay. + fast_scale( FPU registers[reg], (int)round_to_zero(src) ); + } +#else + if (src != 0) { // Manual says: src==0 -> FPn + FPU registers[reg] *= exp (log (2.0) * src); + } +#endif + make_fpsr(FPU registers[reg]); + break; + case 0x27: /* FSGLMUL */ + fpu_debug(("FSGLMUL %.04f\n",(double)src)); + FPU registers[reg] *= src; + make_fpsr(FPU registers[reg]); + break; + case 0x28: /* FSUB */ + fpu_debug(("FSUB %.04f\n",(double)src)); + FPU registers[reg] -= src; + make_fpsr(FPU registers[reg]); + break; + case 0x30: /* FSINCOS */ + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpu_debug(("FSINCOS %.04f\n",(double)src)); + // Cosine must be calculated first if same register + FPU registers[extra & 7] = cos(src); + FPU registers[reg] = sin (src); + // Set FPU fpsr according to the sine result + make_fpsr(FPU registers[reg]); + break; + case 0x38: /* FCMP */ + fpu_debug(("FCMP %.04f\n",(double)src)); + + // The infinity bit is always cleared by the FCMP + // instruction since it is not used by any of the + // conditional predicate equations. + +#if FPU_HAVE_IEEE_DOUBLE + if( isinf(src) ) { + if( isneg(src) ) { + // negative infinity + if( isinf(FPU registers[reg]) && isneg(FPU registers[reg]) ) { + // Zero, Negative + FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO | NATIVE_FFLAG_NEGATIVE; + fpu_debug(("-INF cmp -INF -> NZ\n")); + } + else { + // None + FPU fpsr.condition_codes = 0; + fpu_debug(("x cmp -INF -> None\n")); + } + } + else { + // positive infinity + if( isinf(FPU registers[reg]) && !isneg(FPU registers[reg]) ) { + // Zero + FPU fpsr.condition_codes = NATIVE_FFLAG_ZERO; + fpu_debug(("+INF cmp +INF -> Z\n")); + } + else { + // Negative + FPU fpsr.condition_codes = NATIVE_FFLAG_NEGATIVE; + fpu_debug(("X cmp +INF -> N\n")); + } + } + } + else { + fpu_register tmp = FPU registers[reg] - src; + FPU fpsr.condition_codes + = (iszero(tmp) ? NATIVE_FFLAG_ZERO : 0) + | (isneg(tmp) ? NATIVE_FFLAG_NEGATIVE : 0) + ; + } +#else + { + fpu_register tmp = FPU registers[reg] - src; + make_fpsr(tmp); + } +#endif + break; + case 0x3a: /* FTST */ + fpu_debug(("FTST %.04f\n",(double)src)); + // make_fpsr(FPU registers[reg]); + make_fpsr(src); + break; + default: + fpu_debug(("ILLEGAL F OP %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + break; + } + fpu_debug(("END m68k_getpc()=%X\n",m68k_getpc())); + dump_registers( "END "); + return; + } + + fpu_debug(("ILLEGAL F OP 2 %X\n",opcode)); + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + +/* -------------------------- Initialization -------------------------- */ + +void FFPU fpu_init (bool integral_68040) +{ + fpu_debug(("fpu_init\n")); + + static bool initialized_lookup_tables = false; + if (!initialized_lookup_tables) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); + initialized_lookup_tables = true; + } + + FPU is_integral = integral_68040; + set_fpcr(0); + set_fpsr(0); + FPU instruction_address = 0; +} + +void FFPU fpu_exit (void) +{ + fpu_debug(("fpu_exit\n")); +} + +void FFPU fpu_reset (void) +{ + fpu_debug(("fpu_reset\n")); + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_uae.h b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h new file mode 100644 index 000000000..7fc4ebbd9 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_uae.h @@ -0,0 +1,212 @@ +/* + * fpu/fpu_uae.h - Extra Definitions for the old UAE FPU core + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_UAE_H +#define FPU_UAE_H + +// Only define if you have IEEE 64 bit doubles. +#define FPU_HAVE_IEEE_DOUBLE 1 + +/* NOTE: this file shall be included from fpu/fpu_uae.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +enum { +#ifdef WORDS_BIGENDIAN + FHI = 0, + FLO = 1 +#else + FHI = 1, + FLO = 0 +#endif +}; + +// Floating-point rounding support +PRIVATE inline fpu_register round_to_zero(fpu_register const & x); +PRIVATE inline fpu_register round_to_nearest(fpu_register const & x); + +#if FPU_HAVE_IEEE_DOUBLE + +// Lauri-- full words to avoid partial register stalls. +struct double_flags { + uae_u32 in_range; + uae_u32 zero; + uae_u32 infinity; + uae_u32 nan; + uae_u32 negative; +}; +PRIVATE double_flags fl_source; +PRIVATE double_flags fl_dest; +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r); +PRIVATE inline void FFPU get_source_flags(fpu_register const & r); + +PRIVATE inline bool FFPU do_isnan(fpu_register const & r); +PRIVATE inline bool FFPU do_isinf(fpu_register const & r); +PRIVATE inline bool FFPU do_isneg(fpu_register const & r); +PRIVATE inline bool FFPU do_iszero(fpu_register const & r); + +PRIVATE inline void FFPU make_nan(fpu_register & r); +PRIVATE inline void FFPU make_zero_positive(fpu_register & r); +PRIVATE inline void FFPU make_zero_negative(fpu_register & r); +PRIVATE inline void FFPU make_inf_positive(fpu_register & r); +PRIVATE inline void FFPU make_inf_negative(fpu_register & r); + +PRIVATE inline void FFPU fast_scale(fpu_register & r, int add); +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r); + +// May be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r); + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign( + fpu_register const & ra, fpu_register const & rb +); + +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. +PRIVATE inline void FFPU make_quotient( + fpu_register const & quotient, uae_u32 sign +); + +// to_single +PRIVATE inline fpu_register FFPU make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to_exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +/* + Would be so much easier with full size floats :( + ... this is so vague. +*/ +// to_exten_no_normalize +PRIVATE inline void FFPU make_extended_no_normalize( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & result +); + +// from_exten +PRIVATE inline void FFPU extract_extended(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double(fpu_register const & src, + uae_u32 * wrd1, uae_u32 * wrd2 +); + +#else /* !FPU_HAVE_IEEE_DOUBLE */ + +// FIXME: may be optimized for particular processors +#ifndef FPU_USE_NATIVE_FLAGS +PRIVATE inline void FFPU make_fpsr(fpu_register const & r); +#endif + +// to_single +PRIVATE inline fpu_register make_single( + uae_u32 value +); + +// from_single +PRIVATE inline uae_u32 FFPU extract_single( + fpu_register const & src +); + +// to exten +PRIVATE inline fpu_register FFPU make_extended( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +// from_exten +PRIVATE inline void FFPU extract_extended( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +// to_double +PRIVATE inline fpu_register FFPU make_double( + uae_u32 wrd1, uae_u32 wrd2 +); + +// from_double +PRIVATE inline void FFPU extract_double( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2 +); + +#endif /* FPU_HAVE_IEEE_DOUBLE */ + +PRIVATE inline fpu_register FFPU make_packed( + uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3 +); + +PRIVATE inline void FFPU extract_packed( + fpu_register const & src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3 +); + +PRIVATE inline int FFPU get_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register & src +); + +PRIVATE inline int FFPU put_fp_value( + uae_u32 opcode, uae_u16 extra, fpu_register const & value +); + +PRIVATE inline int FFPU get_fp_ad( + uae_u32 opcode, uae_u32 * ad +); + +PRIVATE inline int FFPU fpp_cond( + int condition +); + +#endif /* FPU_UAE_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp new file mode 100644 index 000000000..70e590860 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.cpp @@ -0,0 +1,6126 @@ +/* + * fpu_x86.cpp - 68881/68040 fpu code for x86/Windows an Linux/x86. + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Based on UAE FPU, original copyright 1996 Herman ten Brugge, + * rewritten for x86 by Lauri Pesonen 1999-2000, + * accomodated to GCC's Extended Asm syntax by Gwenole Beauchesne 2000. + * + * 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 + * + * + * Interface + * Almost the same as original. Please see the comments in "fpu.h". + * + * + * Why assembly? + * The reason is not really speed, but to get infinities, + * NANs and flags finally working. + * + * + * How to maintain Mac and x86 FPU flags -- plan B + * + * regs.piar is not updated. + * + * regs.FPU fpcr always contains the real 68881/68040 control word. + * + * regs.FPU fpsr is not kept up-to-date, for efficiency reasons. + * Most of the FPU commands update this in a way or another, but it is not + * read nearly that often. Therefore, three host-specific words hold the + * status byte and exception byte ("x86_status_word"), accrued exception + * byte ("x86_status_word_accrued") and the quotient byte ("FPU fpsr.quotient"), + * as explained below. + * + * CONDITION CODE - QUOTIENT - EXCEPTION STATUS - ACCRUED EXCEPTION + * CONDITION CODE (N,Z,I,NAN) + * - updated after each opcode, if needed. + * - x86 assembly opcodes call FXAM and store the status word to + * "x86_status_word". + * - When regs.FPU fpsr is actually used, the value of "x86_status_word" + * is translated. + * QUOTIENT BYTE + * - Updated by frem, fmod, frestore(null frame) + * - Stored in "FPU fpsr.quotient" in correct bit position, combined when + * regs.FPU fpsr is actually used. + * EXCEPTION STATUS (BSUN,SNAN,OPERR,OVFL,UNFL,DZ,INEX2,INEX1) + * - updated after each opcode, if needed. + * - Saved in x86 form in "x86_status_word". + * - When regs.FPU fpsr is actually used, the value of "x86_status_word" + * is translated. + * - Only fcc_op can set BSUN + * ACCRUED EXCEPTION (ACCR_IOP,ACCR_OVFL,ACCR_UNFL,ACCR_DZ,ACCR_INEX) + * - updated after each opcode, if needed. + * - Logically OR'ed in x86 form to "x86_status_word_accrued". + * - When regs.FPU fpsr is actually used, the value of + * "x86_status_word_accrued" is translated. + * + * When "x86_status_word" and "x86_status_word_accrued" are stored, + * all pending x86 FPU exceptions are cleared, if there are any. + * + * Writing to "regs.FPU fpsr" reverse-maps to x86 status/exception values and + * stores the values in "x86_status_word", "x86_status_word_accrued" + * and "FPU fpsr.quotient". + * + * So, "x86_status_word" and "x86_status_word_accrued" are not in + * correct bit positions and have x86 values, but "FPU fpsr.quotient" is at + * correct position. + * + * Note that it does not matter that the reverse-mapping is not exact + * (both SW_IE and SW_DE are mapped to ACCR_IOP, but ACCR_IOP maps to + * SW_IE only), the MacOS always sees the correct exception bits. + * + * Also note the usage of the fake BSUN flag SW_FAKE_BSUN. If you change + * the x86 FPU code, you must make sure that you don't generate any FPU + * stack faults. + * + * + * x86 co-processor initialization: + * + * Bit Code Use + * 0 IM Invalid operation exception mask 1 Disabled + * 1 DM Denormalized operand exception mask 1 Disabled + * 2 ZM Zerodivide exception mask 1 Disabled + * 3 OM Overflow exception mask 1 Disabled + * 4 UM Underflow exception mask 1 Disabled + * 5 PM Precision exception mask 1 Disabled + * 6 - - - - + * 7 IEM Interrupt enable mask 0 Enabled + * 8 PC Precision control\ 1 - 64 bits + * 9 PC Precision control/ 1 / + * 10 RC Rounding control\ 0 - Nearest even + * 11 RC Rounding control/ 0 / + * 12 IC Infinity control 1 Affine + * 13 - - - - + * 14 - - - - + * 15 - - - - + * + * + * TODO: + * - Exceptions are not implemented. + * - All tbyte variables should be aligned to 16-byte boundaries. + * (for best efficiency). + * - FTRAPcc code looks like broken. + * - If USE_3_BIT_QUOTIENT is 0, exceptions should be checked after + * float -> int rounding (frem,fmod). + * - The speed can be greatly improved. Do this only after you are sure + * that there are no major bugs. + * - Support for big-endian byte order (but all assembly code needs to + * be rewritten anyway) + * I have some non-portable code like *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; + * Sorry about that, you need to change these. I could do it myself, but better + * not, I would have no way to test them out. + * I tried to mark all spots with a comment TODO_BIGENDIAN. + * - to_double() may need renormalization code. Or then again, maybe not. + * - Signaling NANs should be handled better. The current mapping of + * signaling nan exception to denormalized operand exception is only + * based on the idea that the (possible) handler sees that "something + * seriously wrong" and takes the same action. Should not really get (m)any + * of those since normalization is handled on to_exten() + * + */ + +#include +#include +#include +#include + +#include "sysdeps.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#define FPU_IMPLEMENTATION +#include "fpu/fpu.h" +#include "fpu/fpu_x86.h" +#include "fpu/fpu_x86_asm.h" + +/* Global FPU context */ +fpu_t fpu; + +/* -------------------------------------------------------------------------- */ +/* --- Native Support --- */ +/* -------------------------------------------------------------------------- */ + +#include "fpu/flags.h" +#include "fpu/exceptions.h" +#include "fpu/rounding.h" +#include "fpu/impl.h" + +#include "fpu/flags.cpp" +#include "fpu/exceptions.cpp" +#include "fpu/rounding.cpp" + +/* -------------------------------------------------------------------------- */ +/* --- Scopes Definition --- */ +/* -------------------------------------------------------------------------- */ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* ---------------------------- Compatibility ---------------------------- */ + +#define BYTE uint8 +#define WORD uint16 +#define DWORD uint32 +#define min(a, b) (((a) < (b)) ? (a) : (b)) + +/* ---------------------------- Configuration ---------------------------- */ + +/* +If USE_3_BIT_QUOTIENT is set to 1, FREM and FMOD use a faster version +with only 3 quotient bits (those provided by the x86 FPU). If set to 0, +they calculate the same 7 bits that m68k does. It seems (as for now) that +3 bits suffice for all Mac programs I have tried. + +If you decide that you need all 7 bits (USE_3_BIT_QUOTIENT is 0), +consider checking the host exception flags after FISTP (search for +"TODO:Quotient". The result may be too large to fit into a dword. +*/ +/* +gb-- I only tested the following configurations: + USE_3_BIT_QUOTIENT 1 -- still changes to apply if no 3-bit quotient + FPU_DEBUG 1 or 0 + USE_CONSISTENCY_CHECKING 0 + I3_ON_ILLEGAL_FPU_OP 0 -- and this won't change + I3_ON_FTRAPCC 0 -- and this won't change +*/ +#define USE_3_BIT_QUOTIENT 1 + +//#define FPU_DEBUG 0 -- now defined in "fpu/fpu.h" +#define USE_CONSISTENCY_CHECKING 0 + +#define I3_ON_ILLEGAL_FPU_OP 0 +#define I3_ON_FTRAPCC 0 + +/* ---------------------------- Debugging ---------------------------- */ + +PUBLIC void FFPU fpu_dump_registers(void) +{ + for (int i = 0; i < 8; i++){ + printf ("FP%d: %g ", i, fpu_get_register(i)); + if ((i & 3) == 3) + printf ("\n"); + } +} + +PUBLIC void FFPU fpu_dump_flags(void) +{ + printf ("N=%d Z=%d I=%d NAN=%d\n", + (get_fpsr() & FPSR_CCB_NEGATIVE) != 0, + (get_fpsr() & FPSR_CCB_ZERO)!= 0, + (get_fpsr() & FPSR_CCB_INFINITY) != 0, + (get_fpsr() & FPSR_CCB_NAN) != 0); +} + +#include "debug.h" + +#if FPU_DEBUG +#undef __inline__ +#define __inline__ + +PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual) +{ + char bb[10]; + int32 i, bytes = min(actual,100); + + *b = 0; + for (i=0; i= 10) _ix = 0; + + sprintf( _s[_ix], "%.04f", (float)f ); + return( _s[_ix] ); +} + +PUBLIC void FFPU dump_registers(const char *s) +{ + char b[512]; + + sprintf( + b, + "%s: %s, %s, %s, %s, %s, %s, %s, %s\r\n", + s, + etos(FPU registers[0]), + etos(FPU registers[1]), + etos(FPU registers[2]), + etos(FPU registers[3]), + etos(FPU registers[4]), + etos(FPU registers[5]), + etos(FPU registers[6]), + etos(FPU registers[7]) + ); + D(bug((char*)b)); +} + +#else + +PUBLIC void FFPU dump_registers(const char *) +{ +} + +PUBLIC void FFPU dump_first_bytes(uae_u8 *, uae_s32) +{ +} + +#endif + + +/* ---------------------------- FPU consistency ---------------------------- */ + +#if USE_CONSISTENCY_CHECKING +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) +{ +/* _asm { + FNSTSW checked_sw_atstart + } */ + __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_atstart)); +} + +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name) +{ + uae_u16 checked_sw_atend; +// _asm FNSTSW checked_sw_atend + __asm__ __volatile__("fnstsw %0" : "=m" (checked_sw_attend)); + char msg[256]; + + // Check for FPU stack overflows/underflows. + if( (checked_sw_atend & 0x3800) != (checked_sw_atstart & 0x3800) ) { + wsprintf( + msg, + "FPU stack leak at %s, %X, %X\r\n", + name, + (int)(checked_sw_atstart & 0x3800) >> 11, + (int)(checked_sw_atend & 0x3800) >> 11 + ); + OutputDebugString(msg); + } + + // Observe status mapping. + /* + if(checked_sw_atstart != 0x400 || checked_sw_atend != 0x400) { + wsprintf( + msg, "Op %s, x86_status_word before=%X, x86_status_word after=%X\r\n", + name, (int)checked_sw_atstart, (int)checked_sw_atend + ); + OutputDebugString(msg); + } + */ +} +#else +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void) +{ +} + +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *) +{ +} +#endif + + +/* ---------------------------- Status byte ---------------------------- */ + +// Map x86 FXAM codes -> m68k fpu status byte +#define SW_Z_I_NAN_MASK (SW_C0|SW_C2|SW_C3) +#define SW_Z (SW_C3) +#define SW_I (SW_C0|SW_C2) +#define SW_NAN (SW_C0) +#define SW_FINITE (SW_C2) +#define SW_EMPTY_REGISTER (SW_C0|SW_C3) +#define SW_DENORMAL (SW_C2|SW_C3) +#define SW_UNSUPPORTED (0) +#define SW_N (SW_C1) + +// Initial state after boot, reset and frestore(null frame) +#define SW_INITIAL SW_FINITE + + +/* ---------------------------- Status functions ---------------------------- */ + +PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN () +{ + if( (x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN ) { + x86_status_word |= SW_FAKE_BSUN; + x86_status_word_accrued |= SW_IE; + } +} + +PRIVATE void __inline__ FFPU build_ex_status () +{ + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } +} + +// TODO_BIGENDIAN; all of these. +/* ---------------------------- Type functions ---------------------------- */ + +/* +When the FPU creates a NAN, the NAN always contains the same bit pattern +in the mantissa. All bits of the mantissa are ones for any precision. +When the user creates a NAN, any nonzero bit pattern can be stored in the mantissa. +*/ +PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f) +{ + // Make it non-signaling. + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0xFF, sizeof(fpu_register) - 1 ); + p[9] = 0x7F; +} + +/* +For single- and double-precision infinities the fraction is a zero. +For extended-precision infinities, the mantissa’s MSB, the explicit +integer bit, can be either one or zero. +*/ +PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { + if ((*((uae_u32 *)&p[0]) == 0) && + ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) == 0)) + return(1); + } + return(0); +} + +PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + if( ((p[9] & 0x7F) == 0x7F) && p[8] == 0xFF ) { + if ((*((uae_u32 *)&p[0]) == 0) && + ((*((uae_u32 *)&p[4]) & 0x7FFFFFFF) != 0)) + return(1); + } + return(0); +} + +PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + return *((uae_u32 *)p) == 0 && + *((uae_u32 *)&p[4]) == 0 && + ( *((uae_u16 *)&p[8]) & 0x7FFF ) == 0; +} + +PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f) +{ + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0, sizeof(fpu_register)-2 ); + *((uae_u16 *)&p[8]) = 0x7FFF; +} + +PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f) +{ + uae_u8 * p = (uae_u8 *) &f; + memset( p, 0, sizeof(fpu_register)-2 ); + *((uae_u16 *)&p[8]) = 0xFFFF; +} + +PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f) +{ + uae_u32 * const p = (uae_u32 *) &f; + memset( p, 0, sizeof(fpu_register) ); +} + +PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f) +{ + uae_u32 * const p = (uae_u32 *) &f; + memset( p, 0, sizeof(fpu_register) ); + *((uae_u32 *)&p[4]) = 0x80000000; +} + +PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f) +{ + uae_u8 * p = (uae_u8 *) &f; + return( (p[9] & 0x80) != 0 ); +} + + +/* ---------------------------- Conversions ---------------------------- */ + +PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + +/* _asm { + MOV ESI, [f] + FILD DWORD PTR [x] + FSTP TBYTE PTR [ESI] + } */ + + __asm__ __volatile__("fildl %1\n\tfstpt %0" : "=m" (f) : "m" (x)); + D(bug("signed_to_extended (%X) = %s\r\n",(int)x,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("signed_to_extended"); +} + +PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s32 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP DWORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistpl %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + // Setting the value to zero might not be the right way to go, + // but I'll leave it like this for now. + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + D(bug("extended_to_signed_32 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_32"); + return tmp; +} + +PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s16 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP WORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistp %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + D(bug("extended_to_signed_16 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_16"); + return tmp; +} + +PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_s16 tmp; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FISTP WORD PTR tmp + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fistp %0\n" + "fnstsw %1\n" + : "=m" (tmp), "=m" (sw_temp) + : "m" (f) + ); + + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & (SW_OE|SW_UE|SW_DE|SW_IE)) { // Map SW_OE to OPERR. + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + tmp = 0; + } + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + if(tmp > 127 || tmp < -128) { // OPERR + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + } + + D(bug("extended_to_signed_8 (%s) = %X\r\n",etos(f),(int)tmp)); + FPU_CONSISTENCY_CHECK_STOP("extended_to_signed_8"); + return (uae_s8)tmp; +} + +PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + +/* _asm { + MOV EDI, [f] + FLD QWORD PTR [x] + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (x) + ); + + FPU_CONSISTENCY_CHECK_STOP("double_to_extended"); +} + +PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + double result; + +/* _asm { + MOV ESI, [f] + FLD TBYTE PTR [ESI] + FSTP QWORD PTR result + } */ + + __asm__ __volatile__( + "fldt %1\n" + "fstpl %0\n" + : "=m" (result) + : "m" (f) + ); + + FPU_CONSISTENCY_CHECK_STOP("extended_to_double"); + return result; +} + +PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [f] + FLD DWORD PTR src + FSTP TBYTE PTR [ESI] + } */ + + __asm__ __volatile__( + "flds %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (src) + ); + + D(bug("to_single (%X) = %s\r\n",src,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_single"); +} + +// TODO_BIGENDIAN +PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + + uae_u32 sign = (wrd1 & 0x80000000) >> 16; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + p[0] = wrd3; + p[1] = wrd2; + *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); + + D(bug("to_exten_no_normalize (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_exten_no_normalize"); +} + +PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + + uae_u32 sign = (wrd1 & 0x80000000) >> 16; + uae_u32 exp = (wrd1 >> 16) & 0x7fff; + + // The explicit integer bit is not set, must normalize. + // Don't do it for zeroes, infinities or nans. + if( (wrd2 & 0x80000000) == 0 && exp != 0 && exp != 0x7FFF ) { + D(bug("to_exten denormalized mantissa (%X,%X,%X)\r\n",wrd1,wrd2,wrd3)); + if( wrd2 | wrd3 ) { + // mantissa, not fraction. + uae_u64 man = ((uae_u64)wrd2 << 32) | wrd3; + while( exp > 0 && (man & UVAL64(0x8000000000000000)) == 0 ) { + man <<= 1; + exp--; + } + wrd2 = (uae_u32)( man >> 32 ); + wrd3 = (uae_u32)( man & 0xFFFFFFFF ); + if( exp == 0 || (wrd2 & 0x80000000) == 0 ) { + // underflow + wrd2 = wrd3 = exp = 0; + sign = 0; + } + } else { + if(exp != 0x7FFF && exp != 0) { + // Make a non-signaling nan. + exp = 0x7FFF; + sign = 0; + wrd2 = 0x80000000; + } + } + } + + p[0] = wrd3; + p[1] = wrd2; + *((uae_u16 *)&p[2]) = (uae_u16)(sign | exp); + + D(bug("to_exten (%X,%X,%X) = %s\r\n",wrd1,wrd2,wrd3,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_exten"); +} + +PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + + // gb-- make GCC happy + union { + uae_u64 q; + uae_u32 l[2]; + } src; + + // Should renormalize if needed. I'm not sure that x86 and m68k FPU's + // do it the sama way. This should be extremely rare however. + // to_exten() is often called with denormalized values. + + src.l[0] = wrd2; + src.l[1] = wrd1; + +/* _asm { + FLD QWORD PTR src + MOV EDI, [f] + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (src.q) + ); + + D(bug("to_double (%X,%X) = %s\r\n",wrd1,wrd2,etos(f))); + FPU_CONSISTENCY_CHECK_STOP("to_double"); +} + +PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_u32 dest; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FSTP DWORD PTR dest + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fstps %0\n" + "fnstsw %1\n" + : "=m" (dest), "=m" (sw_temp) + : "m" (f) + ); + + sw_temp &= SW_EXCEPTION_MASK; + if(sw_temp) { +// _asm FNCLEX + asm("fnclex"); + x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; + x86_status_word_accrued |= sw_temp; + } + + D(bug("from_single (%s) = %X\r\n",etos(f),dest)); + FPU_CONSISTENCY_CHECK_STOP("from_single"); + return dest; +} + +// TODO_BIGENDIAN +PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) +{ + FPU_CONSISTENCY_CHECK_START(); + uae_u32 *p = (uae_u32 *)&f; + *wrd3 = p[0]; + *wrd2 = p[1]; + *wrd1 = ( (uae_u32)*((uae_u16 *)&p[2]) ) << 16; + + D(bug("from_exten (%s) = %X,%X,%X\r\n",etos(f),*wrd1,*wrd2,*wrd3)); + FPU_CONSISTENCY_CHECK_STOP("from_exten"); +} + +PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) +{ + FPU_CONSISTENCY_CHECK_START(); + volatile uae_u32 dest[2]; + volatile WORD sw_temp; + +/* _asm { + MOV EDI, [f] + FLD TBYTE PTR [EDI] + FSTP QWORD PTR dest + FNSTSW sw_temp + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fstpl %0\n" + "fnstsw %1\n" + : "=m" (dest), "=m" (sw_temp) + : "m" (f) + ); + + sw_temp &= SW_EXCEPTION_MASK; + if(sw_temp) { +// _asm FNCLEX + asm("fnclex"); + x86_status_word = (x86_status_word & ~SW_EXCEPTION_MASK) | sw_temp; + x86_status_word_accrued |= sw_temp; + } + + // TODO: There is a partial memory stall, nothing happens until FSTP retires. + // On PIII, could use MMX move w/o any penalty. + *wrd2 = dest[0]; + *wrd1 = dest[1]; + + D(bug("from_double (%s) = %X,%X\r\n",etos(f),dest[1],dest[0])); + FPU_CONSISTENCY_CHECK_STOP("from_double"); +} + +PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fmove"); +} + +/* +PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSTP TBYTE PTR [EDI] + } + FPU_CONSISTENCY_CHECK_STOP("do_fmove_no_status"); +} +*/ + + +/* ---------------------------- Operations ---------------------------- */ + +PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FRNDINT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "frndint\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fint"); +} + +PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_MODE + or cw_temp, CW_RC_ZERO + FLDCW cw_temp + FLD TBYTE PTR [ESI] + FRNDINT + FXAM + FNSTSW x86_status_word + FLDCW x86_control_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_MODE), %0\n" + "orl $CW_RC_ZERO, %0\n" + "fldcw %0\n" + "fldt %3\n" + "frndint\n" + "fxam \n" + "fnstsw %1\n" + "fldcw %4\n" + "fstpt %2\n" + : "+m" (cw_temp), "=m" (x86_status_word), "=m" (dest) + : "m" (src), "m" (x86_control_word) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fintrz"); +} + +PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSQRT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + + __asm__ __volatile__( + "fldt %2\n" + "fsqrt \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsqrt"); +} + +PRIVATE void FFPU do_ftst ( fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + FLD TBYTE PTR [ESI] + FXAM + FNSTSW x86_status_word + FSTP ST(0) + } */ + + __asm__ __volatile__( + "fldt %1\n" + "fxam \n" + "fnstsw %0\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word) + : "m" (src) + ); + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_ftst"); +} + +// These functions are calculated in 53 bits accuracy only. +// Exception checking is not complete. +PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = sinh(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fsinh"); +} + +PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x + 1.0); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flognp1"); +} + +PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = exp (x) - 1.0; + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fetoxm1"); +} + +PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = tanh (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftanh"); +} + +PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = atan (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fatan"); +} + +PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = asin (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fasin"); +} + +PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log ((1 + x) / (1 - x)) / 2; + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fatanh"); +} + +PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = exp (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fetox"); +} + +PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = pow(2.0, x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftwotox"); +} + +PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = pow(10.0, x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_ftentox"); +} + +PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flogn"); +} + +PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log10 (x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flog10"); +} + +PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = log (x) / log (2.0); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_flog2"); +} + +PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = acos(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_facos"); +} + +PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + double x, y; + x = extended_to_double( src ); + y = cosh(x); + double_to_extended( y, dest ); + do_ftst( dest ); + FPU_CONSISTENCY_CHECK_STOP("do_fcosh"); +} + +PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FSIN + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fsin \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsin"); +} + +// TODO: Should check for out-of-range condition (partial tangent) +PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FPTAN + FSTP ST(0) ; pop 1.0 (the 8087/287 compatibility thing) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fptan \n" + "fstp %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_ftan"); +} + +PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FABS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fabs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fabs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fabs"); +} + +PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FCHS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fchs \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + // x86 fchs should not rise any exceptions (except stack underflow) + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fneg"); +} + +PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FCOS + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fcos \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fcos"); +} + +PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXTRACT + FSTP ST(0) ; pop mantissa + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fxtract\n" + "fstp %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fgetexp"); +} + +PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FXTRACT + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) ; pop exponent + } */ + __asm__ __volatile__( + "fldt %2\n" + "fxtract\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "=m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fgetman"); +} + +PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fdiv"); +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +// Quotient Byte is loaded with the sign and least significant +// seven bits of the quotient. + +PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; +#if !USE_3_BIT_QUOTIENT + WORD cw_temp; +#endif + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + +#if !USE_3_BIT_QUOTIENT + MOV CX, x86_control_word + AND CX, ~X86_ROUNDING_MODE + OR CX, CW_RC_ZERO + MOV cw_temp, CX + FLDCW cw_temp + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + FLDCW x86_control_word + // TODO:Quotient + // Should clear any possible exceptions here +#endif + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + + FXAM + FNSTSW x86_status_word + + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + +#if !USE_3_BIT_QUOTIENT + + __asm__ __volatile__( + "movl %6, %%ecx\n" // %6: x86_control_word (read) + "andl $(~X86_ROUNDING_MODE), %%ecx\n" + "orl $CW_RC_ZERO, %%ecx\n" + "movl %%ecx, %0\n" // %0: cw_temp (read/write) + "fldcw %0\n" + "fldt %5\n" + "fldt %4\n" + "fdiv %%st(1), %%st(0)\n" + "fabs \n" + "fistpl %1\n" // %1: quot (read/write) + "fstp %%st(0)\n" + "fldcw %6\n" + "fldt %5\n" + "fldt %4\n" + "0:\n" // partial_loop + "fprem \n" + "fnstsw %2\n" // %2: status (read/write) + "testl $SW_C2, %2\n" + "jne 0b\n" + "fxam \n" + "fnstsw %3\n" // %3: x86_status_word (write) + "fstpt %4\n" + "fstp %%st(0)\n" + : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + : "ecx" + ); + +#else + + __asm__ __volatile__( + "fldt %3\n" + "fldt %2\n" + "0:\n" // partial_loop + "fprem \n" + "fnstsw %0\n" // %0: status (read/write) + "testl $SW_C2, %0\n" + "jne 0b\n" + "fxam \n" + "fnstsw %1\n" // %1: x86_status_word (write) + "fstpt %2\n" + "fstp %%st(0)\n" + : "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + +#endif + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + +#if USE_3_BIT_QUOTIENT + // SW_C1 Set to least significant bit of quotient (Q0). + // SW_C3 Set to bit 1 (Q1) of the quotient. + // SW_C0 Set to bit 2 (Q2) of the quotient. + quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); + FPU fpsr.quotient = (sign | quot) << 16; +#else + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; +#endif + + FPU_CONSISTENCY_CHECK_STOP("do_fmod"); +} + +PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; +#if !USE_3_BIT_QUOTIENT + WORD cw_temp; +#endif + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + +#if !USE_3_BIT_QUOTIENT + MOV CX, x86_control_word + AND CX, ~X86_ROUNDING_MODE + OR CX, CW_RC_NEAR + MOV cw_temp, CX + FLDCW cw_temp + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + FLDCW x86_control_word + // TODO:Quotient + // Should clear any possible exceptions here +#endif + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM1 + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + +#if !USE_3_BIT_QUOTIENT + + __asm__ __volatile__( + "movl %6, %%ecx\n" // %6: x86_control_word (read) + "andl $(~X86_ROUNDING_MODE), %%ecx\n" + "orl $CW_RC_NEAR, %%ecx\n" + "movl %%ecx, %0\n" // %0: cw_temp (read/write) + "fldcw %0\n" + "fldt %5\n" + "fldt %4\n" + "fdiv %%st(1), %%st(0)\n" + "fabs \n" + "fistpl %1\n" // %1: quot (read/write) + "fstp %%st(0)\n" + "fldcw %6\n" + "fldt %5\n" + "fldt %4\n" + "0:\n" // partial_loop + "fprem1 \n" + "fnstsw %2\n" // %2: status (read/write) + "testl $SW_C2, %2\n" + "jne 0b\n" + "fxam \n" + "fnstsw %3\n" // %3: x86_status_word (write) + "fstpt %4\n" + "fstp %%st(0)\n" + : "+m" (cw_temp), "+m" (quot), "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + : "ecx" + ); + +#else + + __asm__ __volatile__( + "fldt %3\n" + "fldt %2\n" + "0:\n" // partial_loop + "fprem1 \n" + "fnstsw %0\n" // %0: status (read/write) + "testl $SW_C2, %0\n" + "jne 0b\n" + "fxam \n" + "fnstsw %1\n" // %1: x86_status_word (write) + "fstpt %2\n" + "fstp %%st(0)\n" + : "+m" (status), "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + +#endif + + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + +#if USE_3_BIT_QUOTIENT + // SW_C1 Set to least significant bit of quotient (Q0). + // SW_C3 Set to bit 1 (Q1) of the quotient. + // SW_C0 Set to bit 2 (Q2) of the quotient. + quot = ((status & SW_C0) >> 6) | ((status & SW_C3) >> 13) | ((status & SW_C1) >> 9); + FPU fpsr.quotient = (sign | quot) << 16; +#else + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; +#endif + + FPU_CONSISTENCY_CHECK_STOP("do_frem"); +} + +// Faster versions. The current rounding mode is already correct. +#if !USE_3_BIT_QUOTIENT +PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + + _asm { + MOV ESI, [src] + MOV EDI, [dest] + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + // TODO:Quotient + // Should clear any possible exceptions here + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } + if(x86_status_word & SW_EXCEPTION_MASK) { + _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; + FPU_CONSISTENCY_CHECK_STOP("do_fmod_dont_set_cw"); +} + +PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + + volatile uint16 status; + uae_u32 quot; + + uae_u8 * dest_p = (uae_u8 *)&dest; + uae_u8 * src_p = (uae_u8 *)&src; + uae_u32 sign = (dest_p[9] ^ src_p[9]) & 0x80; + + _asm { + MOV ESI, [src] + MOV EDI, [dest] + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FABS + FISTP DWORD PTR quot + FSTP ST(0) + // TODO:Quotient + // Should clear any possible exceptions here + + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + +// loop until the remainder is not partial any more. +partial_loop: + FPREM1 + FNSTSW status + TEST status, SW_C2 + JNE partial_loop + + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } + if(x86_status_word & SW_EXCEPTION_MASK) { + _asm FNCLEX + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE); + x86_status_word_accrued |= x86_status_word; + } + FPU fpsr.quotient = (sign | (quot&0x7F)) << 16; + FPU_CONSISTENCY_CHECK_STOP("do_frem_dont_set_cw"); +} +#endif //USE_3_BIT_QUOTIENT + +PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FADD + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fadd \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fadd"); +} + +PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FMUL + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fmul \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fmul"); +} + +PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; +/* _asm { + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_PRECISION + or cw_temp, PRECISION_CONTROL_SINGLE + FLDCW cw_temp + + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FDIV ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + FLDCW x86_control_word + } */ + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_PRECISION), %0\n" + "orl $PRECISION_CONTROL_SINGLE, %0\n" + "fldcw %0\n" + "fldt %3\n" + "fldt %2\n" + "fdiv %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %1\n" + "fstpt %2\n" + "fstp %%st(0)\n" + "fldcw %4\n" + : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_control_word) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsgldiv"); +} + +PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSCALE + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fscale \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_UE - SW_OE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fscale"); +} + +PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); + WORD cw_temp; + +/* _asm { + FSTCW cw_temp + and cw_temp, ~X86_ROUNDING_PRECISION + or cw_temp, PRECISION_CONTROL_SINGLE + FLDCW cw_temp + + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FMUL + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + + FLDCW x86_control_word + } */ + __asm__ __volatile__( + "fstcw %0\n" + "andl $(~X86_ROUNDING_PRECISION), %0\n" + "orl $PRECISION_CONTROL_SINGLE, %0\n" + "fldcw %0\n" + "fldt %3\n" + "fldt %2\n" + "fmul \n" + "fxam \n" + "fnstsw %1\n" + "fstpt %2\n" + "fldcw %4\n" + : "+m" (cw_temp), "=m" (x86_status_word), "+m" (dest) + : "m" (src), "m" (x86_status_word) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsglmul"); +} + +PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSUB ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "+m" (dest) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_OE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsub"); +} + +PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest_cos] + FLD TBYTE PTR [ESI] + FSINCOS + FSTP TBYTE PTR [EDI] + FXAM + MOV EDI, [dest_sin] + FNSTSW x86_status_word + FSTP TBYTE PTR [EDI] + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %3\n" + "fsincos\n" + "fstpt %1\n" + "fxam \n" + "fnstsw %0\n" + "fstpt %2\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word), "=m" (dest_cos), "=m" (dest_sin) + : "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~(SW_EXCEPTION_MASK - SW_IE - SW_UE - SW_PE); + x86_status_word_accrued |= x86_status_word; + } + FPU_CONSISTENCY_CHECK_STOP("do_fsincos"); +} + +PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + MOV ESI, [src] + MOV EDI, [dest] + FLD TBYTE PTR [ESI] + FLD TBYTE PTR [EDI] + FSUB ST(0),ST(1) + FXAM + FNSTSW x86_status_word + FSTP ST(0) + FSTP ST(0) + } */ + __asm__ __volatile__( + "fldt %2\n" + "fldt %1\n" + "fsub %%st(1), %%st(0)\n" + "fxam \n" + "fnstsw %0\n" + "fstp %%st(0)\n" + "fstp %%st(0)\n" + : "=m" (x86_status_word) + : "m" (dest), "m" (src) + ); + if(x86_status_word & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + x86_status_word &= ~SW_EXCEPTION_MASK; + } + FPU_CONSISTENCY_CHECK_STOP("do_fcmp"); +} + +// More or less original. Should be reviewed. +PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) +{ + FPU_CONSISTENCY_CHECK_START(); + + double d; + char *cp; + char str[100]; + + cp = str; + if (wrd1 & 0x80000000) + *cp++ = '-'; + *cp++ = (char)((wrd1 & 0xf) + '0'); + *cp++ = '.'; + *cp++ = (char)(((wrd2 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd2 >> 0) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 28) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 16) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 12) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 8) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 4) & 0xf) + '0'); + *cp++ = (char)(((wrd3 >> 0) & 0xf) + '0'); + *cp++ = 'E'; + if (wrd1 & 0x40000000) + *cp++ = '-'; + *cp++ = (char)(((wrd1 >> 24) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 20) & 0xf) + '0'); + *cp++ = (char)(((wrd1 >> 16) & 0xf) + '0'); + *cp = 0; + sscanf(str, "%le", &d); + + D(bug("to_pack str = %s\r\n",str)); + + D(bug("to_pack(%X,%X,%X) = %.04f\r\n",wrd1,wrd2,wrd3,(float)d)); + + FPU_CONSISTENCY_CHECK_STOP("to_pack"); + + return d; +} + +// More or less original. Should be reviewed. +PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) +{ + FPU_CONSISTENCY_CHECK_START(); + + int i; + int t; + char *cp; + char str[100]; + int exponent_digit_count = 0; + + sprintf(str, "%.16e", src); + + D(bug("from_pack(%.04f,%s)\r\n",(float)src,str)); + + cp = str; + *wrd1 = *wrd2 = *wrd3 = 0; + if (*cp == '-') { + cp++; + *wrd1 = 0x80000000; + } + if (*cp == '+') + cp++; + *wrd1 |= (*cp++ - '0'); + if (*cp == '.') + cp++; + for (i = 0; i < 8; i++) { + *wrd2 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd2 |= *cp++ - '0'; + } + for (i = 0; i < 8; i++) { + *wrd3 <<= 4; + if (*cp >= '0' && *cp <= '9') + *wrd3 |= *cp++ - '0'; + } + if (*cp == 'e' || *cp == 'E') { + cp++; + if (*cp == '-') { + cp++; + *wrd1 |= 0x40000000; + } + if (*cp == '+') + cp++; + t = 0; + for (i = 0; i < 3; i++) { + if (*cp >= '0' && *cp <= '9') { + t = (t << 4) | (*cp++ - '0'); + exponent_digit_count++; + } + } + *wrd1 |= t << 16; + } + + D(bug("from_pack(%.04f) = %X,%X,%X\r\n",(float)src,*wrd1,*wrd2,*wrd3)); + + WORD sw_temp; +// _asm FNSTSW sw_temp + __asm__ __volatile__("fnstsw %0" : "=m" (sw_temp)); + if(sw_temp & SW_EXCEPTION_MASK) { +// _asm FNCLEX + __asm__ __volatile__("fnclex"); + if(sw_temp & SW_PE) { + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + } + + /* + OPERR is set if the k-factor > + 17 or the magnitude of + the decimal exponent exceeds three digits; + cleared otherwise. + */ + if(exponent_digit_count > 3) { + x86_status_word |= SW_IE; + x86_status_word_accrued |= SW_IE; + } + + FPU_CONSISTENCY_CHECK_STOP("from_pack"); +} + +PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) +{ + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // D(bug("get_fp_value(%X,%X)\r\n",(int)opcode,(int)extra)); + // dump_first_bytes( regs.pc_p-4, 16 ); + + if ((extra & 0x4000) == 0) { + memcpy( &src, &FPU registers[(extra >> 10) & 7], sizeof(fpu_register) ); +// do_fmove_no_status( src, FPU registers[(extra >> 10) & 7] ); + return 1; + } + + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + int size = (extra >> 10) & 7; + uae_u32 ad = 0; + + // D(bug("get_fp_value mode=%d, reg=%d, size=%d\r\n",(int)mode,(int)reg,(int)size)); + + switch ((uae_u8)mode) { + case 0: + switch ((uae_u8)size) { + case 6: + signed_to_extended( (uae_s32)(uae_s8) m68k_dreg (regs, reg), src ); + break; + case 4: + signed_to_extended( (uae_s32)(uae_s16) m68k_dreg (regs, reg), src ); + break; + case 0: + signed_to_extended( (uae_s32) m68k_dreg (regs, reg), src ); + break; + case 1: + to_single( m68k_dreg (regs, reg), src ); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ((uae_u8)reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + } + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + + /* + +0000 000004 FSCALE.B #$01,FP2 | F23C 5926 0001 + F23C 1111001000111100 + 5926 0101100100100110 + 0001 0000000000000001 + mode = 7 + reg = 4 + size = 6 + */ + // Immediate addressing mode && Operation Length == Byte -> + // Use the low-order byte of the extension word. + + if(size == 6) ad++; + + // May be faster on a PII(I), sz2[size] is already in register + // ad += sz2[size] - sz1[size]; + + break; + default: + return 0; + } + } + + switch ((uae_u8)size) { + case 0: + signed_to_extended( (uae_s32) get_long (ad), src ); + break; + case 1: + to_single( get_long (ad), src ); + break; + + case 2:{ + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + to_exten( wrd1, wrd2, wrd3, src ); + } + break; + case 3:{ + uae_u32 wrd1, wrd2, wrd3; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + double_to_extended( to_pack(wrd1, wrd2, wrd3), src ); + } + break; + case 4: + signed_to_extended( (uae_s32)(uae_s16) get_word(ad), src ); + break; + case 5:{ + uae_u32 wrd1, wrd2; + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + to_double(wrd1, wrd2, src); + } + break; + case 6: + signed_to_extended( (uae_s32)(uae_s8) get_byte(ad), src ); + break; + default: + return 0; + } + + // D(bug("get_fp_value result = %.04f\r\n",(float)src)); + + return 1; +} + +PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) +{ + static const int sz1[8] = {4, 4, 12, 12, 2, 8, 1, 0}; + static const int sz2[8] = {4, 4, 12, 12, 2, 8, 2, 0}; + + // D(bug("put_fp_value(%.04f,%X,%X)\r\n",(float)value,(int)opcode,(int)extra)); + + if ((extra & 0x4000) == 0) { + int dest_reg = (extra >> 10) & 7; + do_fmove( FPU registers[dest_reg], value ); + build_ex_status(); + return 1; + } + + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + int size = (extra >> 10) & 7; + uae_u32 ad = 0xffffffff; + + // Clear exception status + x86_status_word &= ~SW_EXCEPTION_MASK; + + switch ((uae_u8)mode) { + case 0: + switch ((uae_u8)size) { + case 6: + *((uae_u8 *)&m68k_dreg(regs, reg)) = extended_to_signed_8(value); + break; + case 4: + // TODO_BIGENDIAN + *((uae_u16 *)&m68k_dreg(regs, reg)) = extended_to_signed_16(value); + break; + case 0: + m68k_dreg (regs, reg) = extended_to_signed_32(value); + break; + case 1: + m68k_dreg (regs, reg) = from_single(value); + break; + default: + return 0; + } + return 1; + case 1: + return 0; + case 2: + ad = m68k_areg (regs, reg); + break; + case 3: + ad = m68k_areg (regs, reg); + m68k_areg (regs, reg) += reg == 7 ? sz2[size] : sz1[size]; + break; + case 4: + m68k_areg (regs, reg) -= reg == 7 ? sz2[size] : sz1[size]; + ad = m68k_areg (regs, reg); + break; + case 5: + ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ((uae_u8)reg) { + case 0: + ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + ad = next_ilong(); + break; + case 2: + ad = m68k_getpc (); + ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + ad = get_disp_ea_020 (tmppc, tmp); + } + break; + case 4: + ad = m68k_getpc (); + m68k_setpc (ad + sz2[size]); + break; + default: + return 0; + } + } + switch ((uae_u8)size) { + case 0: + put_long (ad, (uae_s32) extended_to_signed_32(value)); + break; + case 1: + put_long (ad, from_single(value)); + break; + case 2: { + uae_u32 wrd1, wrd2, wrd3; + from_exten(value, &wrd1, &wrd2, &wrd3); + + x86_status_word &= ~SW_EXCEPTION_MASK; + if(wrd3) { // TODO: not correct! Just a "smart" guess. + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } + break; + case 3: { + uae_u32 wrd1, wrd2, wrd3; + from_pack(extended_to_double(value), &wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + } + break; + case 4: + put_word(ad, extended_to_signed_16(value)); + break; + case 5:{ + uae_u32 wrd1, wrd2; + from_double(value, &wrd1, &wrd2); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + } + break; + case 6: + put_byte(ad, extended_to_signed_8(value)); + + break; + default: + return 0; + } + return 1; +} + +PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) +{ + int mode = (opcode >> 3) & 7; + int reg = opcode & 7; + switch ( (uae_u8)mode ) { + case 0: + case 1: + if( (opcode & 0xFF00) == 0xF300 ) { + // fsave, frestore + m68k_setpc (m68k_getpc () - 2); + } else { + m68k_setpc (m68k_getpc () - 4); + } + op_illg (opcode); + dump_registers( "END "); + return 0; + case 2: + *ad = m68k_areg (regs, reg); + break; + case 3: + *ad = m68k_areg (regs, reg); + break; + case 4: + *ad = m68k_areg (regs, reg); + break; + case 5: + *ad = m68k_areg (regs, reg) + (uae_s32) (uae_s16) next_iword(); + break; + case 6: + *ad = get_disp_ea_020 (m68k_areg (regs, reg), next_iword()); + break; + case 7: + switch ( (uae_u8)reg ) { + case 0: + *ad = (uae_s32) (uae_s16) next_iword(); + break; + case 1: + *ad = next_ilong(); + break; + case 2: + *ad = m68k_getpc (); + *ad += (uae_s32) (uae_s16) next_iword(); + break; + case 3: { + uaecptr tmppc = m68k_getpc (); + uae_u16 tmp = (uae_u16)next_iword(); + *ad = get_disp_ea_020 (tmppc, tmp); + } + break; + default: + if( (opcode & 0xFF00) == 0xF300 ) { + // fsave, frestore + m68k_setpc (m68k_getpc () - 2); + } else { + m68k_setpc (m68k_getpc () - 4); + } + op_illg (opcode); + dump_registers( "END "); + return 0; + } + } + return 1; +} + +#if FPU_DEBUG +#define CONDRET(s,x) D(bug("fpp_cond %s = %d\r\n",s,(uint32)(x))); return (x) +#else +#define CONDRET(s,x) return (x) +#endif + +PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) +{ + +#define N (x86_status_word & SW_N) +#define Z ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_Z) +#define I ((x86_status_word & (SW_Z_I_NAN_MASK)) == (SW_I)) +#define NotANumber ((x86_status_word & (SW_Z_I_NAN_MASK)) == SW_NAN) + + switch (condition) { + // Common Tests, no BSUN + case 0x01: + CONDRET("Equal",Z); + case 0x0e: + CONDRET("Not Equal",!Z); + + // IEEE Nonaware Tests, BSUN + case 0x12: + SET_BSUN_ON_NAN(); + CONDRET("Greater Than",!(NotANumber || Z || N)); + case 0x1d: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater Than",NotANumber || Z || N); + case 0x13: + SET_BSUN_ON_NAN(); + CONDRET("Greater Than or Equal",Z || !(NotANumber || N)); + case 0x1c: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater Than or Equal",!Z && (NotANumber || N)); + case 0x14: + SET_BSUN_ON_NAN(); + CONDRET("Less Than",N && !(NotANumber || Z)); + case 0x1b: + SET_BSUN_ON_NAN(); + CONDRET("Not Less Than",NotANumber || Z || !N); + case 0x15: + SET_BSUN_ON_NAN(); + CONDRET("Less Than or Equal",Z || (N && !NotANumber)); + case 0x1a: + SET_BSUN_ON_NAN(); + CONDRET("Not Less Than or Equal",NotANumber || !(N || Z)); + case 0x16: + SET_BSUN_ON_NAN(); + CONDRET("Greater or Less Than",!(NotANumber || Z)); + case 0x19: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater or Less Than",NotANumber || Z); + case 0x17: + CONDRET("Greater, Less or Equal",!NotANumber); + case 0x18: + SET_BSUN_ON_NAN(); + CONDRET("Not Greater, Less or Equal",NotANumber); + + // IEEE Aware Tests, no BSUN + case 0x02: + CONDRET("Ordered Greater Than",!(NotANumber || Z || N)); + case 0x0d: + CONDRET("Unordered or Less or Equal",NotANumber || Z || N); + case 0x03: + CONDRET("Ordered Greater Than or Equal",Z || !(NotANumber || N)); + case 0x0c: + CONDRET("Unordered or Less Than",NotANumber || (N && !Z)); + case 0x04: + CONDRET("Ordered Less Than",N && !(NotANumber || Z)); + case 0x0b: + CONDRET("Unordered or Greater or Equal",NotANumber || Z || !N); + case 0x05: + CONDRET("Ordered Less Than or Equal",Z || (N && !NotANumber)); + case 0x0a: + CONDRET("Unordered or Greater Than",NotANumber || !(N || Z)); + case 0x06: + CONDRET("Ordered Greater or Less Than",!(NotANumber || Z)); + case 0x09: + CONDRET("Unordered or Equal",NotANumber || Z); + case 0x07: + CONDRET("Ordered",!NotANumber); + case 0x08: + CONDRET("Unordered",NotANumber); + + // Miscellaneous Tests, no BSUN + case 0x00: + CONDRET("False",0); + case 0x0f: + CONDRET("True",1); + + // Miscellaneous Tests, BSUN + case 0x10: + SET_BSUN_ON_NAN(); + CONDRET("Signaling False",0); + case 0x1f: + SET_BSUN_ON_NAN(); + CONDRET("Signaling True",1); + case 0x11: + SET_BSUN_ON_NAN(); + CONDRET("Signaling Equal",Z); + case 0x1e: + SET_BSUN_ON_NAN(); + CONDRET("Signaling Not Equal",!Z); + } + CONDRET("",-1); + +#undef N +#undef Z +#undef I +#undef NotANumber + +} + +PUBLIC void REGPARAM2 FFPU fpuop_dbcc(uae_u32 opcode, uae_u32 extra) +{ + uaecptr pc = (uae_u32) m68k_getpc (); + uae_s32 disp = (uae_s32) (uae_s16) next_iword(); + int cc; + + D(bug("fdbcc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + cc = fpp_cond(opcode, extra & 0x3f); + if (cc < 0) { + m68k_setpc (pc - 4); + op_illg (opcode); + } else if (!cc) { + int reg = opcode & 0x7; + + // TODO_BIGENDIAN + uae_u16 newv = (uae_u16)(m68k_dreg (regs, reg) & 0xffff) - 1; + *((uae_u16 *)&m68k_dreg(regs, reg)) = newv; + + if (newv != 0xffff) + m68k_setpc (pc + disp); + } +} + +PUBLIC void REGPARAM2 FFPU fpuop_scc(uae_u32 opcode, uae_u32 extra) +{ + uae_u32 ad; + int cc; + + D(bug("fscc_opp %X, %X at %08lx\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc ())); + + cc = fpp_cond(opcode, extra & 0x3f); + if (cc < 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } else if ((opcode & 0x38) == 0) { + // TODO_BIGENDIAN + m68k_dreg (regs, opcode & 7) = (m68k_dreg (regs, opcode & 7) & ~0xff) | + (cc ? 0xff : 0x00); + } else { + if (get_fp_ad(opcode, &ad)) { + put_byte(ad, cc ? 0xff : 0x00); + } + } +} + +PUBLIC void REGPARAM2 FFPU fpuop_trapcc(uae_u32 opcode, uaecptr oldpc) +{ + int cc; + + D(bug("ftrapcc_opp %X at %08lx\r\n", (uae_u32)opcode, m68k_getpc ())); + +#if I3_ON_FTRAPCC +#error "FIXME: _asm int 3" + _asm int 3 +#endif + + // This must be broken. + cc = fpp_cond(opcode, opcode & 0x3f); + + if (cc < 0) { + m68k_setpc (oldpc); + op_illg (opcode); + } else if (cc) + Exception(7, oldpc - 2); +} + +// NOTE that we get here also when there is a FNOP (nontrapping false, displ 0) +PUBLIC void REGPARAM2 FFPU fpuop_bcc(uae_u32 opcode, uaecptr pc, uae_u32 extra) +{ + int cc; + + D(bug("fbcc_opp %X, %X at %08lx, jumpto=%X\r\n", (uae_u32)opcode, (uae_u32)extra, m68k_getpc (), extra )); + + cc = fpp_cond(opcode, opcode & 0x3f); + if (cc < 0) { + m68k_setpc (pc); + op_illg (opcode); + } else if (cc) { + if ((opcode & 0x40) == 0) + extra = (uae_s32) (uae_s16) extra; + m68k_setpc (pc + extra); + } +} + +// FSAVE has no post-increment +// 0x1f180000 == IDLE state frame, coprocessor version number 1F +PUBLIC void REGPARAM2 FFPU fpuop_save(uae_u32 opcode) +{ + uae_u32 ad; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + int i; + + D(bug("fsave_opp at %08lx\r\n", m68k_getpc ())); + + if (get_fp_ad(opcode, &ad)) { + if (FPU is_integral) { + // Put 4 byte 68040 IDLE frame. + if (incr < 0) { + ad -= 4; + put_long (ad, 0x41000000); + } else { + put_long (ad, 0x41000000); + ad += 4; + } + } else { + // Put 28 byte 68881 IDLE frame. + if (incr < 0) { + D(bug("fsave_opp pre-decrement\r\n")); + ad -= 4; + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + for (i = 0; i < 5; i++) { + ad -= 4; + put_long (ad, 0x00000000); + } + ad -= 4; + put_long (ad, 0x1f180000); // IDLE, vers 1f + } else { + put_long (ad, 0x1f180000); // IDLE, vers 1f + ad += 4; + for (i = 0; i < 5; i++) { + put_long (ad, 0x00000000); + ad += 4; + } + // What's this? Some BIU flags, or (incorrectly placed) command/condition? + put_long (ad, 0x70000000); + ad += 4; + } + } + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + D(bug("PROBLEM: fsave_opp post-increment\r\n")); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; + D(bug("fsave_opp pre-decrement %X -> A%d\r\n",ad,opcode & 7)); + } + } +} + +PRIVATE void FFPU do_null_frestore () +{ + // A null-restore operation sets FP7-FP0 positive, nonsignaling NANs. + for( int i=0; i<8; i++ ) { + MAKE_NAN( FPU registers[i] ); + } + + FPU instruction_address = 0; + set_fpcr(0); + set_fpsr(0); + + x86_status_word = SW_INITIAL; + x86_status_word_accrued = 0; + FPU fpsr.quotient = 0; + + x86_control_word = CW_INITIAL; +/* _asm FLDCW x86_control_word + _asm FNCLEX */ + __asm__ __volatile__("fldcw %0\n\tfnclex" : : "m" (x86_control_word)); +} + +// FSAVE has no pre-decrement +PUBLIC void REGPARAM2 FFPU fpuop_restore(uae_u32 opcode) +{ + uae_u32 ad; + uae_u32 d; + int incr = (opcode & 0x38) == 0x20 ? -1 : 1; + + D(bug("frestore_opp at %08lx\r\n", m68k_getpc ())); + + if (get_fp_ad(opcode, &ad)) { + if (FPU is_integral) { + // 68040 + if (incr < 0) { + D(bug("PROBLEM: frestore_opp incr < 0\r\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); + ad -= 44; + } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad -= 92; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } else { + d = get_long (ad); + D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); + ad += 4; + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00300000) { // UNIMP + D(bug("PROBLEM: frestore_opp found UNIMP frame at %X\r\n",ad-4)); + ad += 44; + } else if ((d & 0x00ff0000) == 0x00600000) { // BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad += 92; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } + } else { + // 68881 + if (incr < 0) { + D(bug("PROBLEM: frestore_opp incr < 0\r\n")); + // this may be wrong, but it's never called. + ad -= 4; + d = get_long (ad); + if ((d & 0xff000000) == 0) { // NULL + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0x00180000) { + ad -= 6 * 4; + } else if ((d & 0x00ff0000) == 0x00380000) { + ad -= 14 * 4; + } else if ((d & 0x00ff0000) == 0x00b40000) { + ad -= 45 * 4; + } + } else { + d = get_long (ad); + D(bug("frestore_opp frame at %X = %X\r\n",ad,d)); + ad += 4; + if ((d & 0xff000000) == 0) { // NULL + D(bug("frestore_opp found NULL frame at %X\r\n",ad-4)); + do_null_frestore(); + } else if ((d & 0x00ff0000) == 0x00180000) { // IDLE + D(bug("frestore_opp found IDLE frame at %X\r\n",ad-4)); + ad += 6 * 4; + } else if ((d & 0x00ff0000) == 0x00380000) {// UNIMP? shouldn't it be 3C? + ad += 14 * 4; + D(bug("PROBLEM: frestore_opp found UNIMP? frame at %X\r\n",ad-4)); + } else if ((d & 0x00ff0000) == 0x00b40000) {// BUSY + D(bug("PROBLEM: frestore_opp found BUSY frame at %X\r\n",ad-4)); + ad += 45 * 4; + } else { + D(bug("PROBLEM: frestore_opp did not find a frame at %X, d=%X\r\n",ad-4,d)); + } + } + } + + if ((opcode & 0x38) == 0x18) { + m68k_areg (regs, opcode & 7) = ad; + D(bug("frestore_opp post-increment %X -> A%d\r\n",ad,opcode & 7)); + } + if ((opcode & 0x38) == 0x20) { + m68k_areg (regs, opcode & 7) = ad; // Never executed on a 68881 + D(bug("PROBLEM: frestore_opp pre-decrement\r\n")); + } + } +} + + +/* ---------------------------- Old-style interface ---------------------------- */ + +// #ifndef OPTIMIZED_8BIT_MEMORY_ACCESS +PUBLIC void REGPARAM2 FFPU fpuop_arithmetic(uae_u32 opcode, uae_u32 extra) +{ + uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); + (*fpufunctbl[mask])(opcode,extra); +} +// #endif + + +/* ---------------------------- Illegal ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("ILLEGAL F OP 2 %X\r\n",opcode)); + +#if I3_ON_ILLEGAL_FPU_OP +#error "FIXME: asm int 3" + _asm int 3 +#endif + + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); +} + + +/* ---------------------------- FPP -> ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVE -> \r\n")); + + if (put_fp_value (FPU registers[(extra >> 7) & 7], opcode, extra) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + } + + /* + Needed (among other things) by some Pack5/Elems68k transcendental + functions, they require the ACCR_INEX flag after a "MOVE.D, Dreg". + However, now put_fp_value() is responsible of clearing the exceptions + and merging statuses. + */ + + /* + WORD sw_temp; + _asm FNSTSW sw_temp + if(sw_temp & SW_PE) { + _asm FNCLEX + x86_status_word |= SW_PE; + x86_status_word_accrued |= SW_PE; + } + */ + + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> Dreg ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM control(none) -> D%d\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> D%d\r\n", get_fpcr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> D%d\r\n", get_fpsr(), opcode & 7)); + m68k_dreg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> D%d\r\n", FPU instruction_address, opcode & 7)); + m68k_dreg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + + +/* ---------------------------- Dreg -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM D%d -> control(none)\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_dreg (regs, opcode & 7) ); + D(bug("FMOVEM D%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_dreg (regs, opcode & 7); + D(bug("FMOVEM D%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> Areg ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM control(none) -> A%d\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM regs.FPU fpcr (%X) -> A%d\r\n", get_fpcr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpcr(); + D(bug("FMOVEM regs.FPU fpsr (%X) -> A%d\r\n", get_fpsr(), opcode & 7)); + m68k_areg (regs, opcode & 7) = get_fpsr(); + D(bug("FMOVEM FPU instruction_address (%X) -> A%d\r\n", FPU instruction_address, opcode & 7)); + m68k_areg (regs, opcode & 7) = FPU instruction_address; + dump_registers( "END "); +} + + +/* ---------------------------- Areg -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM A%d -> control(none)\r\n", opcode & 7)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ) +{ + set_fpcr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpcr\r\n", opcode & 7, get_fpcr())); + set_fpsr( m68k_areg (regs, opcode & 7) ); + D(bug("FMOVEM A%d (%X) -> regs.FPU fpsr\r\n", opcode & 7, get_fpsr())); + FPU instruction_address = m68k_areg (regs, opcode & 7); + D(bug("FMOVEM A%d (%X) -> FPU instruction_address\r\n", opcode & 7, FPU instruction_address)); + dump_registers( "END "); +} + + +/* ---------------------------- CONTROL REGS -> --MEMORY---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 12; + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + dump_registers( "END "); + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + m68k_areg (regs, opcode & 7) = ad+8; + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + m68k_areg (regs, opcode & 7) = ad+12; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Control regs (none) -> mem\r\n" )); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + put_long (ad, get_fpcr()); + D(bug("FMOVEM regs.FPU fpcr (%X) -> mem %X\r\n", get_fpcr(), ad )); + put_long (ad+4, get_fpsr()); + D(bug("FMOVEM regs.FPU fpsr (%X) -> mem %X\r\n", get_fpsr(), ad+4 )); + put_long (ad+8, FPU instruction_address); + D(bug("FMOVEM FPU instruction_address (%X) -> mem %X\r\n", FPU instruction_address, ad+8 )); + dump_registers( "END "); + } +} + + +/* ---------------------------- --MEMORY -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM --Mem -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 4; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 8; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + ad -= 12; + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + + +/* ---------------------------- CONTROL REGS -> MEMORY++ ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Mem++ -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + m68k_areg (regs, opcode & 7) = ad+4; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + m68k_areg (regs, opcode & 7) = ad+8; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + m68k_areg (regs, opcode & 7) = ad+12; + dump_registers( "END "); + } +} + + +/* ---------------------------- MEMORY -> CONTROL REGS ---------------------------- */ +/* ---------------------------- and ---------------------------- */ +/* ---------------------------- IMMEDIATE -> CONTROL REGS ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVEM Mem -> control(none)\r\n")); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + FPU instruction_address = get_long (ad); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpsr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad, get_fpsr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + FPU instruction_address = get_long (ad+4); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+4, FPU instruction_address )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + } + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ) +{ + if ((opcode & 0x3f) == 0x3c) { + set_fpcr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpcr\r\n", get_fpcr())); + set_fpsr( next_ilong() ); + D(bug("FMOVEM #<%X> -> regs.FPU fpsr\r\n", get_fpsr())); + FPU instruction_address = next_ilong(); + D(bug("FMOVEM #<%X> -> FPU instruction_address\r\n", FPU instruction_address)); + } else { + uae_u32 ad; + if (get_fp_ad(opcode, &ad)) { + set_fpcr( get_long (ad) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpcr\r\n", ad, get_fpcr() )); + set_fpsr( get_long (ad+4) ); + D(bug("FMOVEM mem %X (%X) -> regs.FPU fpsr\r\n", ad+4, get_fpsr() )); + FPU instruction_address = get_long (ad+8); + D(bug("FMOVEM mem %X (%X) -> FPU instruction_address\r\n", ad+8, FPU instruction_address )); + } + } + dump_registers( "END "); +} + + +/* ---------------------------- FMOVEM MEMORY -> FPP ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + ad -= 4; + wrd3 = get_long (ad); + ad -= 4; + wrd2 = get_long (ad); + ad -= 4; + wrd1 = get_long (ad); + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM memory->FPP\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + wrd1 = get_long (ad); + ad += 4; + wrd2 = get_long (ad); + ad += 4; + wrd3 = get_long (ad); + ad += 4; + to_exten_no_normalize (wrd1, wrd2, wrd3,FPU registers[reg]); + } + list <<= 1; + } + dump_registers( "END "); + } +} + + +/* ---------------------------- FPP -> FMOVEM MEMORY ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=7; reg>=0; reg-- ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + ad -= 4; + put_long (ad, wrd3); + ad -= 4; + put_long (ad, wrd2); + ad -= 4; + put_long (ad, wrd1); + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = extra & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + m68k_areg (regs, opcode & 7) = ad; + dump_registers( "END "); + } +} +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ) +{ + uae_u32 ad, list = m68k_dreg (regs, (extra >> 4) & 3) & 0xff; + D(bug("FMOVEM FPP->memory\r\n")); + if (get_fp_ad(opcode, &ad)) { + for( int reg=0; reg<8; reg++ ) { + uae_u32 wrd1, wrd2, wrd3; + if( list & 0x80 ) { + from_exten(FPU registers[reg],&wrd1, &wrd2, &wrd3); + put_long (ad, wrd1); + ad += 4; + put_long (ad, wrd2); + ad += 4; + put_long (ad, wrd3); + ad += 4; + } + list <<= 1; + } + dump_registers( "END "); + } +} + + +/* ---------------------------- FMOVEM CONSTANT ROM -> FPP ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Pi\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_pi, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 10 (2)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_lg2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: e\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 2 (e)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_l2e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: Log 10 (e)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_log_10_e, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: zero\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_z, sizeof(fpu_register) ); + x86_status_word = SW_Z; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: ln(2)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_ln2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: ln(10)\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_ln_10, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e0\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e1\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e1, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e2\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e2, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e4\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e4, sizeof(fpu_register) ); + x86_status_word = SW_FINITE; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e8\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e8, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; // Is it really FPSR_EXCEPTION_INEX2? + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e16\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e16, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e32\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e32, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e64\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e64, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e128\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e128, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e256\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e256, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e512\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e512, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e1024\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e1024, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e2048\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e2048, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ) +{ + D(bug("FMOVECR memory->FPP FP const: 1.0e4096\r\n")); + memcpy( &FPU registers[(extra>>7) & 7], &const_1e4096, sizeof(fpu_register) ); + x86_status_word = SW_FINITE | FPSR_EXCEPTION_INEX2; + dump_registers( "END "); +} + + +/* ---------------------------- ALU ---------------------------- */ + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMOVE %s\r\n",etos(src))); + do_fmove( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FINT %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); + do_fint( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSINH %s\r\n",etos(src))); + do_fsinh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FINTRZ %s\r\n",etos(src))); + do_fintrz( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSQRT %s\r\n",etos(src))); + do_fsqrt( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOGNP1 %s\r\n",etos(src))); + do_flognp1( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FETOXM1 %s\r\n",etos(src))); + do_fetoxm1( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTANH %s\r\n",etos(src))); + do_ftanh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FATAN %s\r\n",etos(src))); + do_fatan( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FASIN %s\r\n",etos(src))); + do_fasin( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FATANH %s\r\n",etos(src))); + do_fatanh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSIN %s\r\n",etos(src))); + do_fsin( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTAN %s\r\n",etos(src))); + do_ftan( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FETOX %s\r\n",etos(src))); + do_fetox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTWOTOX %s\r\n",etos(src))); + do_ftwotox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTENTOX %s\r\n",etos(src))); + do_ftentox( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOGN %s\r\n",etos(src))); + do_flogn( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOG10 %s\r\n",etos(src))); + do_flog10( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FLOG2 %s\r\n",etos(src))); + do_flog2( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FABS %s\r\n",etos(src))); + do_fabs( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCOSH %s\r\n",etos(src))); + do_fcosh( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FNEG %s\r\n",etos(src))); + do_fneg( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FACOS %s\r\n",etos(src))); + do_facos( FPU registers[reg], src ); + build_ex_status(); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCOS %s\r\n",etos(src))); + do_fcos( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FGETEXP %s\r\n",etos(src))); + + if( IS_INFINITY(src) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + do_fgetexp( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FGETMAN %s\r\n",etos(src))); + if( IS_INFINITY(src) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + do_fgetman( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FDIV %s\r\n",etos(src))); + do_fdiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMOD %s\r\n",etos(src))); + +#if USE_3_BIT_QUOTIENT + do_fmod( FPU registers[reg], src ); +#else + if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_ZERO ) { + do_fmod_dont_set_cw( FPU registers[reg], src ); + } else { + do_fmod( FPU registers[reg], src ); + } +#endif + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FREM %s\r\n",etos(src))); +#if USE_3_BIT_QUOTIENT + do_frem( FPU registers[reg], src ); +#else + if( (x86_control_word & X86_ROUNDING_MODE) == CW_RC_NEAR ) { + do_frem_dont_set_cw( FPU registers[reg], src ); + } else { + do_frem( FPU registers[reg], src ); + } +#endif + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FADD %s\r\n",etos(src))); + do_fadd( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FMUL %s\r\n",etos(src))); + do_fmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSGLDIV %s\r\n",etos(src))); + do_fsgldiv( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSCALE %s, opcode=%X, extra=%X, ta %X\r\n",etos(src),opcode,extra,m68k_getpc())); + if( IS_INFINITY(FPU registers[reg]) ) { + MAKE_NAN( FPU registers[reg] ); + do_ftst( FPU registers[reg] ); + x86_status_word |= SW_IE; + } else { + // When the absolute value of the source operand is >= 2^14, + // an overflow or underflow always results. + do_fscale( FPU registers[reg], src ); + } + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSGLMUL %s\r\n",etos(src))); + do_fsglmul( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSUB %s\r\n",etos(src))); + do_fsub( FPU registers[reg], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FSINCOS %s\r\n",etos(src))); + do_fsincos( FPU registers[reg], FPU registers[extra & 7], src ); + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FCMP %s\r\n",etos(src))); + + if( IS_INFINITY(src) ) { + if( IS_NEGATIVE(src) ) { + if( IS_INFINITY(FPU registers[reg]) && IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_Z | SW_N; + D(bug("-INF FCMP -INF -> NZ\r\n")); + } else { + x86_status_word = SW_FINITE; + D(bug("X FCMP -INF -> None\r\n")); + } + } else { + if( IS_INFINITY(FPU registers[reg]) && !IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_Z; + D(bug("+INF FCMP +INF -> Z\r\n")); + } else { + x86_status_word = SW_N; + D(bug("X FCMP +INF -> N\r\n")); + } + } + } else if( IS_INFINITY(FPU registers[reg]) ) { + if( IS_NEGATIVE(FPU registers[reg]) ) { + x86_status_word = SW_N; + D(bug("-INF FCMP X -> Negative\r\n")); + } else { + x86_status_word = SW_FINITE; + D(bug("+INF FCMP X -> None\r\n")); + } + } else { + do_fcmp( FPU registers[reg], src ); + } + + dump_registers( "END "); +} + +PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ) +{ + int reg = (extra >> 7) & 7; + fpu_register src; + if (get_fp_value (opcode, extra, src) == 0) { + m68k_setpc (m68k_getpc () - 4); + op_illg (opcode); + dump_registers( "END "); + return; + } + D(bug("FTST %s\r\n",etos(src))); + do_ftst( src ); + build_ex_status(); + dump_registers( "END "); +} + + + +/* ---------------------------- SETUP TABLES ---------------------------- */ + +PRIVATE void FFPU build_fpp_opp_lookup_table () +{ + for( uae_u32 opcode=0; opcode<=0x38; opcode+=8 ) { + for( uae_u32 extra=0; extra<65536; extra++ ) { + uae_u32 mask = (extra & 0xFC7F) | ((opcode & 0x0038) << 4); + fpufunctbl[mask] = & FFPU fpuop_illg; + + switch ((extra >> 13) & 0x7) { + case 3: + fpufunctbl[mask] = & FFPU fpuop_fmove_2_ea; + break; + case 4: + case 5: + if ((opcode & 0x38) == 0) { + if (extra & 0x2000) { // dr bit + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Dreg; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Dreg; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Dreg; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Dreg; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_none; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpiar; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar; + break; + } + } + } else if ((opcode & 0x38) == 8) { + if (extra & 0x2000) { // dr bit + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Areg; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Areg; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Areg; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Areg; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Areg; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Areg; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Areg; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_none; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpiar; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpsr_fpiar; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpiar; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar; + break; + } + } + } else if (extra & 0x2000) { + if ((opcode & 0x38) == 0x20) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_predecrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_predecrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_predecrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_predecrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement; + break; + } + } else if ((opcode & 0x38) == 0x18) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem_postincrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem_postincrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem_postincrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem_postincrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_none_2_Mem; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpiar_2_Mem; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_2_Mem; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpsr_fpiar_2_Mem; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_2_Mem; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpiar_2_Mem; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_2_Mem; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem; + break; + } + } + } else { + if ((opcode & 0x38) == 0x20) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_predecrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_predecrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_predecrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_predecrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement; + break; + } + } else if ((opcode & 0x38) == 0x18) { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_postincrement; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_postincrement; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_postincrement; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_postincrement; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement; + break; + } + } else { + switch( extra & 0x1C00 ) { + case 0x0000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_none_2_Mem; + break; + case 0x0400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem; + break; + case 0x0800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem; + break; + case 0x0C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem; + break; + case 0x1000: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem; + break; + case 0x1400: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem; + break; + case 0x1800: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem; + break; + case 0x1C00: + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem; + break; + } + } + break; + case 6: + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_pred; + break; + case 1: /* dynamic pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred; + break; + case 2: /* static postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_static_postinc; + break; + case 3: /* dynamic postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc; + break; + } + break; + case 7: + switch ((extra >> 11) & 3) { + case 0: /* static pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_pred; + break; + case 1: /* dynamic pred */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred; + break; + case 2: /* static postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_static_postinc; + break; + case 3: /* dynamic postinc */ + if ((opcode & 0x38) == 0x18) // post-increment? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement; + else if ((opcode & 0x38) == 0x20) // pre-decrement? + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement; + else + fpufunctbl[mask] = & FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc; + break; + } + break; + case 0: + case 2: + if ((extra & 0xfc00) == 0x5c00) { + switch (extra & 0x7f) { + case 0x00: + fpufunctbl[mask] = & FFPU fpuop_do_fldpi; + break; + case 0x0b: + fpufunctbl[mask] = & FFPU fpuop_do_fldlg2; + break; + case 0x0c: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_e; + break; + case 0x0d: + fpufunctbl[mask] = & FFPU fpuop_do_fldl2e; + break; + case 0x0e: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_log_10_e; + break; + case 0x0f: + fpufunctbl[mask] = & FFPU fpuop_do_fldz; + break; + case 0x30: + fpufunctbl[mask] = & FFPU fpuop_do_fldln2; + break; + case 0x31: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_ln_10; + break; + case 0x32: + fpufunctbl[mask] = & FFPU fpuop_do_fld1; + break; + case 0x33: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1; + break; + case 0x34: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2; + break; + case 0x35: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4; + break; + case 0x36: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e8; + break; + case 0x37: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e16; + break; + case 0x38: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e32; + break; + case 0x39: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e64; + break; + case 0x3a: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e128; + break; + case 0x3b: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e256; + break; + case 0x3c: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e512; + break; + case 0x3d: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e1024; + break; + case 0x3e: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e2048; + break; + case 0x3f: + fpufunctbl[mask] = & FFPU fpuop_do_load_const_1e4096; + break; + } + break; + } + + switch (extra & 0x7f) { + case 0x00: + fpufunctbl[mask] = & FFPU fpuop_do_fmove; + break; + case 0x01: + fpufunctbl[mask] = & FFPU fpuop_do_fint; + break; + case 0x02: + fpufunctbl[mask] = & FFPU fpuop_do_fsinh; + break; + case 0x03: + fpufunctbl[mask] = & FFPU fpuop_do_fintrz; + break; + case 0x04: + fpufunctbl[mask] = & FFPU fpuop_do_fsqrt; + break; + case 0x06: + fpufunctbl[mask] = & FFPU fpuop_do_flognp1; + break; + case 0x08: + fpufunctbl[mask] = & FFPU fpuop_do_fetoxm1; + break; + case 0x09: + fpufunctbl[mask] = & FFPU fpuop_do_ftanh; + break; + case 0x0a: + fpufunctbl[mask] = & FFPU fpuop_do_fatan; + break; + case 0x0c: + fpufunctbl[mask] = & FFPU fpuop_do_fasin; + break; + case 0x0d: + fpufunctbl[mask] = & FFPU fpuop_do_fatanh; + break; + case 0x0e: + fpufunctbl[mask] = & FFPU fpuop_do_fsin; + break; + case 0x0f: + fpufunctbl[mask] = & FFPU fpuop_do_ftan; + break; + case 0x10: + fpufunctbl[mask] = & FFPU fpuop_do_fetox; + break; + case 0x11: + fpufunctbl[mask] = & FFPU fpuop_do_ftwotox; + break; + case 0x12: + fpufunctbl[mask] = & FFPU fpuop_do_ftentox; + break; + case 0x14: + fpufunctbl[mask] = & FFPU fpuop_do_flogn; + break; + case 0x15: + fpufunctbl[mask] = & FFPU fpuop_do_flog10; + break; + case 0x16: + fpufunctbl[mask] = & FFPU fpuop_do_flog2; + break; + case 0x18: + fpufunctbl[mask] = & FFPU fpuop_do_fabs; + break; + case 0x19: + fpufunctbl[mask] = & FFPU fpuop_do_fcosh; + break; + case 0x1a: + fpufunctbl[mask] = & FFPU fpuop_do_fneg; + break; + case 0x1c: + fpufunctbl[mask] = & FFPU fpuop_do_facos; + break; + case 0x1d: + fpufunctbl[mask] = & FFPU fpuop_do_fcos; + break; + case 0x1e: + fpufunctbl[mask] = & FFPU fpuop_do_fgetexp; + break; + case 0x1f: + fpufunctbl[mask] = & FFPU fpuop_do_fgetman; + break; + case 0x20: + fpufunctbl[mask] = & FFPU fpuop_do_fdiv; + break; + case 0x21: + fpufunctbl[mask] = & FFPU fpuop_do_fmod; + break; + case 0x22: + fpufunctbl[mask] = & FFPU fpuop_do_fadd; + break; + case 0x23: + fpufunctbl[mask] = & FFPU fpuop_do_fmul; + break; + case 0x24: + fpufunctbl[mask] = & FFPU fpuop_do_fsgldiv; + break; + case 0x25: + fpufunctbl[mask] = & FFPU fpuop_do_frem; + break; + case 0x26: + fpufunctbl[mask] = & FFPU fpuop_do_fscale; + break; + case 0x27: + fpufunctbl[mask] = & FFPU fpuop_do_fsglmul; + break; + case 0x28: + fpufunctbl[mask] = & FFPU fpuop_do_fsub; + break; + case 0x30: + case 0x31: + case 0x32: + case 0x33: + case 0x34: + case 0x35: + case 0x36: + case 0x37: + fpufunctbl[mask] = & FFPU fpuop_do_fsincos; + break; + case 0x38: + fpufunctbl[mask] = & FFPU fpuop_do_fcmp; + break; + case 0x3a: + fpufunctbl[mask] = & FFPU fpuop_do_ftst; + break; + } + } + } + } + } +} + +/* ---------------------------- CONSTANTS ---------------------------- */ + +PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ) +{ + FPU_CONSISTENCY_CHECK_START(); + if(mult == 1) { +/* _asm { + MOV ESI, [f] + FLD QWORD PTR [value] + FSTP TBYTE PTR [ESI] + } */ + __asm__ __volatile__( + "fldl %1\n" + "fstpt %0\n" + : "=m" (f) + : "m" (value) + ); + } else { +/* _asm { + MOV ESI, [f] + FILD DWORD PTR [mult] + FLD QWORD PTR [value] + FMUL + FSTP TBYTE PTR [ESI] + } */ + __asm__ __volatile__( + "fildl %2\n" + "fldl %1\n" + "fmul \n" + "fstpt %0\n" + : "=m" (f) + : "m" (value), "m" (mult) + ); + } + D(bug("set_constant (%s,%.04f) = %s\r\n",name,(float)value,etos(f))); + FPU_CONSISTENCY_CHECK_STOP( mult==1 ? "set_constant(mult==1)" : "set_constant(mult>1)" ); +} + +PRIVATE void FFPU do_fldpi ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDPI + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldpi \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldpi"); +} + +PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDLG2 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldlg2 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldlg2"); +} + +PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDL2E + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldl2e \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldl2e"); +} + +PRIVATE void FFPU do_fldz ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDZ + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldz \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldz"); +} + +PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLDLN2 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fldln2 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fldln2"); +} + +PRIVATE void FFPU do_fld1 ( fpu_register & dest ) +{ + FPU_CONSISTENCY_CHECK_START(); +/* _asm { + FLD1 + FXAM + FNSTSW x86_status_word + MOV EDI, [dest] + FSTP TBYTE PTR [EDI] + } */ + __asm__ __volatile__( + "fld1 \n" + "fxam \n" + "fnstsw %0\n" + "fstpt %1\n" + : "=m" (x86_status_word), "=m" (dest) + ); + FPU_CONSISTENCY_CHECK_STOP("do_fld1"); +} + + +/* ---------------------------- MAIN INIT ---------------------------- */ + +#ifdef HAVE_SIGACTION +// Mega hackaround-that-happens-to-work: the following way to handle +// SIGFPE just happens to make the "fsave" below in fpu_init() *NOT* +// to abort with a floating point exception. However, we never +// actually reach sigfpe_handler(). +static void sigfpe_handler(int code, siginfo_t *sip, void *) +{ + if (code == SIGFPE && sip->si_code == FPE_FLTINV) { + fprintf(stderr, "Invalid floating point operation\n"); + abort(); + } +} +#endif + +PUBLIC void FFPU fpu_init( bool integral_68040 ) +{ + static bool done_first_time_initialization = false; + if (!done_first_time_initialization) { + fpu_init_native_fflags(); + fpu_init_native_exceptions(); + fpu_init_native_accrued_exceptions(); +#ifdef HAVE_SIGACTION + struct sigaction fpe_sa; + sigemptyset(&fpe_sa.sa_mask); + fpe_sa.sa_sigaction = sigfpe_handler; + fpe_sa.sa_flags = SA_SIGINFO; + sigaction(SIGFPE, &fpe_sa, 0); +#endif + done_first_time_initialization = true; + } + + __asm__ __volatile__("fsave %0" : "=m" (m_fpu_state_original)); + + FPU is_integral = integral_68040; + FPU instruction_address = 0; + set_fpcr(0); + set_fpsr(0); + + x86_control_word = CW_INITIAL; + x86_status_word = SW_INITIAL; + x86_status_word_accrued = 0; + FPU fpsr.quotient = 0; + + for( int i=0; i<8; i++ ) { + MAKE_NAN( FPU registers[i] ); + } + + build_fpp_opp_lookup_table(); + + __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); + + do_fldpi( const_pi ); + do_fldlg2( const_lg2 ); + do_fldl2e( const_l2e ); + do_fldz( const_z ); + do_fldln2( const_ln2 ); + do_fld1( const_1 ); + + set_constant( const_e, "e", exp (1.0), 1 ); + set_constant( const_log_10_e, "Log 10 (e)", log (exp (1.0)) / log (10.0), 1 ); + set_constant( const_ln_10, "ln(10)", log (10.0), 1 ); + set_constant( const_1e1, "1.0e1", 1.0e1, 1 ); + set_constant( const_1e2, "1.0e2", 1.0e2, 1 ); + set_constant( const_1e4, "1.0e4", 1.0e4, 1 ); + set_constant( const_1e8, "1.0e8", 1.0e8, 1 ); + set_constant( const_1e16, "1.0e16", 1.0e16, 1 ); + set_constant( const_1e32, "1.0e32", 1.0e32, 1 ); + set_constant( const_1e64, "1.0e64", 1.0e64, 1 ) ; + set_constant( const_1e128, "1.0e128", 1.0e128, 1 ); + set_constant( const_1e256, "1.0e256", 1.0e256, 1 ); + set_constant( const_1e512, "1.0e512", 1.0e256, 10 ); + set_constant( const_1e1024, "1.0e1024", 1.0e256, 100 ); + set_constant( const_1e2048, "1.0e2048", 1.0e256, 1000 ); + set_constant( const_1e4096, "1.0e4096", 1.0e256, 10000 ); + + // Just in case. + __asm__ __volatile__("fninit\nfldcw %0" : : "m" (x86_control_word)); +} + +PUBLIC void FFPU fpu_exit( void ) +{ + __asm__ __volatile__("frstor %0" : : "m" (m_fpu_state_original)); +} + +PUBLIC void FFPU fpu_reset( void ) +{ + fpu_exit(); + fpu_init(FPU is_integral); +} diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h new file mode 100644 index 000000000..96f1d9598 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86.h @@ -0,0 +1,361 @@ +/* + * fpu/fpu_x86.h - Extra Definitions for the X86 assembly FPU core + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_X86_H +#define FPU_X86_H + +/* NOTE: this file shall be included from fpu/fpu_x86.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Status word +PRIVATE uae_u32 x86_status_word; +PRIVATE uae_u32 x86_status_word_accrued; + +// FPU jump table +typedef void REGPARAM2 ( *fpuop_func )( uae_u32, uae_u32 ); +PRIVATE fpuop_func fpufunctbl[65536]; + +// FPU consistency +PRIVATE uae_u32 checked_sw_atstart; + +// FMOVECR constants supported byt x86 FPU +PRIVATE fpu_register const_pi; +PRIVATE fpu_register const_lg2; +PRIVATE fpu_register const_l2e; +PRIVATE fpu_register const_z; +PRIVATE fpu_register const_ln2; +PRIVATE fpu_register const_1; + +// FMOVECR constants not not suported by x86 FPU +PRIVATE fpu_register const_e; +PRIVATE fpu_register const_log_10_e; +PRIVATE fpu_register const_ln_10; +PRIVATE fpu_register const_1e1; +PRIVATE fpu_register const_1e2; +PRIVATE fpu_register const_1e4; +PRIVATE fpu_register const_1e8; +PRIVATE fpu_register const_1e16; +PRIVATE fpu_register const_1e32; +PRIVATE fpu_register const_1e64; +PRIVATE fpu_register const_1e128; +PRIVATE fpu_register const_1e256; +PRIVATE fpu_register const_1e512; +PRIVATE fpu_register const_1e1024; +PRIVATE fpu_register const_1e2048; +PRIVATE fpu_register const_1e4096; + +// Saved host FPU state +PRIVATE uae_u8 m_fpu_state_original[108]; // 90/94/108 + +/* -------------------------------------------------------------------------- */ +/* --- Methods --- */ +/* -------------------------------------------------------------------------- */ + +// Debug support functions +PRIVATE void FFPU dump_first_bytes_buf(char *b, uae_u8* buf, uae_s32 actual); +PRIVATE char * FFPU etos(fpu_register const & e) REGPARAM; + +// FPU consistency +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_START(void); +PRIVATE void FFPU FPU_CONSISTENCY_CHECK_STOP(const char *name); + +// Get special floating-point value class +PRIVATE __inline__ uae_u32 FFPU IS_INFINITY (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_NAN (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_ZERO (fpu_register const & f); +PRIVATE __inline__ uae_u32 FFPU IS_NEGATIVE (fpu_register const & f); + +// Make a special floating-point value +PRIVATE __inline__ void FFPU MAKE_NAN (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_INF_POSITIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_INF_NEGATIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_ZERO_POSITIVE (fpu_register & f); +PRIVATE __inline__ void FFPU MAKE_ZERO_NEGATIVE (fpu_register & f); + +// Conversion from extended floating-point values +PRIVATE uae_s32 FFPU extended_to_signed_32 ( fpu_register const & f ) REGPARAM; +PRIVATE uae_s16 FFPU extended_to_signed_16 ( fpu_register const & f ) REGPARAM; +PRIVATE uae_s8 FFPU extended_to_signed_8 ( fpu_register const & f ) REGPARAM; +PRIVATE fpu_double FFPU extended_to_double( fpu_register const & f ) REGPARAM; +PRIVATE uae_u32 FFPU from_single ( fpu_register const & f ) REGPARAM; +PRIVATE void FFPU from_exten ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2, uae_u32 *wrd3 ) REGPARAM; +PRIVATE void FFPU from_double ( fpu_register const & f, uae_u32 *wrd1, uae_u32 *wrd2 ) REGPARAM; +PRIVATE void FFPU from_pack (fpu_double src, uae_u32 * wrd1, uae_u32 * wrd2, uae_u32 * wrd3) REGPARAM; + +// Conversion to extended floating-point values +PRIVATE void FFPU signed_to_extended ( uae_s32 x, fpu_register & f ) REGPARAM; +PRIVATE void FFPU double_to_extended ( double x, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_single ( uae_u32 src, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_exten_no_normalize ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_exten ( uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3, fpu_register & f ) REGPARAM; +PRIVATE void FFPU to_double ( uae_u32 wrd1, uae_u32 wrd2, fpu_register & f ) REGPARAM; +PRIVATE fpu_double FFPU to_pack(uae_u32 wrd1, uae_u32 wrd2, uae_u32 wrd3) REGPARAM; + +// Atomic floating-point arithmetic operations +PRIVATE void FFPU do_fmove ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmove_no_status ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fint ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fintrz ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsqrt ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftst ( fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsinh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flognp1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fetoxm1 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fatan ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fasin ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fatanh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fetox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftwotox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftentox ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flogn ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flog10 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_flog2 ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_facos ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcosh ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsin ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_ftan ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fabs ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fneg ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcos ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fgetexp ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fgetman ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fdiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmod ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_frem ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmod_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_frem_dont_set_cw ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fadd ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsgldiv ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fscale ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsglmul ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsub ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fsincos ( fpu_register & dest_sin, fpu_register & dest_cos, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fcmp ( fpu_register & dest, fpu_register const & src ) REGPARAM; +PRIVATE void FFPU do_fldpi ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldlg2 ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldl2e ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldz ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fldln2 ( fpu_register & dest ) REGPARAM; +PRIVATE void FFPU do_fld1 ( fpu_register & dest ) REGPARAM; + +// Instructions handlers +PRIVATE void REGPARAM2 FFPU fpuop_illg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmove_2_ea( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Dreg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_none( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Dreg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Areg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_none( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Areg_2_fpcr_fpsr_fpiar( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_none_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_none_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpcr_fpsr_fpiar_2_Mem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_static_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_Mem_2_fpp_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_pred( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_static_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_postincrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc_predecrement( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_fmovem_fpp_2_Mem_dynamic_postinc( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldpi( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldlg2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldl2e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_log_10_e( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldz( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fldln2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_ln_10( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fld1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e8( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e16( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e32( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e64( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e128( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e256( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e512( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e1024( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e2048( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_load_const_1e4096( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmove( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fint( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsinh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fintrz( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsqrt( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flognp1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fetoxm1( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftanh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fatan( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fasin( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fatanh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsin( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftan( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fetox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftwotox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftentox( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flogn( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flog10( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_flog2( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fabs( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcosh( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fneg( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_facos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetexp( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fgetman( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fdiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmod( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_frem( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fadd( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsgldiv( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fscale( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsglmul( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsub( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fsincos( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_fcmp( uae_u32 opcode, uae_u32 extra ); +PRIVATE void REGPARAM2 FFPU fpuop_do_ftst( uae_u32 opcode, uae_u32 extra ); + +// Get & Put floating-point values +PRIVATE int FFPU get_fp_value (uae_u32 opcode, uae_u32 extra, fpu_register & src) REGPARAM; +PRIVATE int FFPU put_fp_value (fpu_register const & value, uae_u32 opcode, uae_u32 extra) REGPARAM; +PRIVATE int FFPU get_fp_ad(uae_u32 opcode, uae_u32 * ad) REGPARAM; + +// Floating-point condition-based instruction handlers +PRIVATE int FFPU fpp_cond(uae_u32 opcode, int condition) REGPARAM; + +// Misc functions +PRIVATE void __inline__ FFPU set_host_fpu_control_word (); +PRIVATE void __inline__ FFPU SET_BSUN_ON_NAN (); +PRIVATE void __inline__ FFPU build_ex_status (); +PRIVATE void FFPU do_null_frestore (); +PRIVATE void FFPU build_fpp_opp_lookup_table (); +PRIVATE void FFPU set_constant ( fpu_register & f, char *name, double value, uae_s32 mult ); + +#endif /* FPU_X86_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h new file mode 100644 index 000000000..ecdecfbc9 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/fpu_x86_asm.h @@ -0,0 +1,72 @@ +#define DEFINE_X86_MACRO(name, value) \ + asm(".local " #name "\n\t" #name " = " #value) + +DEFINE_X86_MACRO(BSUN, 0x00008000); +DEFINE_X86_MACRO(SNAN, 0x00004000); +DEFINE_X86_MACRO(OPERR, 0x00002000); +DEFINE_X86_MACRO(OVFL, 0x00001000); +DEFINE_X86_MACRO(UNFL, 0x00000800); +DEFINE_X86_MACRO(DZ, 0x00000400); +DEFINE_X86_MACRO(INEX2, 0x00000200); +DEFINE_X86_MACRO(INEX1, 0x00000100); +DEFINE_X86_MACRO(ACCR_IOP, 0x80); +DEFINE_X86_MACRO(ACCR_OVFL, 0x40); +DEFINE_X86_MACRO(ACCR_UNFL, 0x20); +DEFINE_X86_MACRO(ACCR_DZ, 0x10); +DEFINE_X86_MACRO(ACCR_INEX, 0x08); +DEFINE_X86_MACRO(ROUND_CONTROL_MASK, 0x30); +DEFINE_X86_MACRO(ROUND_TO_NEAREST, 0); +DEFINE_X86_MACRO(ROUND_TO_ZERO, 0x10); +DEFINE_X86_MACRO(ROUND_TO_NEGATIVE_INFINITY, 0x20); +DEFINE_X86_MACRO(ROUND_TO_POSITIVE_INFINITY, 0x30); +DEFINE_X86_MACRO(PRECISION_CONTROL_MASK, 0xC0); +DEFINE_X86_MACRO(PRECISION_CONTROL_EXTENDED, 0); +DEFINE_X86_MACRO(PRECISION_CONTROL_DOUBLE, 0x80); +DEFINE_X86_MACRO(PRECISION_CONTROL_SINGLE, 0x40); +DEFINE_X86_MACRO(PRECISION_CONTROL_UNDEFINED, 0xC0); +DEFINE_X86_MACRO(CW_RESET, 0x0040); +DEFINE_X86_MACRO(CW_FINIT, 0x037F); +DEFINE_X86_MACRO(SW_RESET, 0x0000); +DEFINE_X86_MACRO(SW_FINIT, 0x0000); +DEFINE_X86_MACRO(TW_RESET, 0x5555); +DEFINE_X86_MACRO(TW_FINIT, 0x0FFF); +DEFINE_X86_MACRO(CW_X, 0x1000); +DEFINE_X86_MACRO(CW_RC_ZERO, 0x0C00); +DEFINE_X86_MACRO(CW_RC_UP, 0x0800); +DEFINE_X86_MACRO(CW_RC_DOWN, 0x0400); +DEFINE_X86_MACRO(CW_RC_NEAR, 0x0000); +DEFINE_X86_MACRO(CW_PC_EXTENDED, 0x0300); +DEFINE_X86_MACRO(CW_PC_DOUBLE, 0x0200); +DEFINE_X86_MACRO(CW_PC_RESERVED, 0x0100); +DEFINE_X86_MACRO(CW_PC_SINGLE, 0x0000); +DEFINE_X86_MACRO(CW_PM, 0x0020); +DEFINE_X86_MACRO(CW_UM, 0x0010); +DEFINE_X86_MACRO(CW_OM, 0x0008); +DEFINE_X86_MACRO(CW_ZM, 0x0004); +DEFINE_X86_MACRO(CW_DM, 0x0002); +DEFINE_X86_MACRO(CW_IM, 0x0001); +DEFINE_X86_MACRO(SW_B, 0x8000); +DEFINE_X86_MACRO(SW_C3, 0x4000); +DEFINE_X86_MACRO(SW_TOP_7, 0x3800); +DEFINE_X86_MACRO(SW_TOP_6, 0x3000); +DEFINE_X86_MACRO(SW_TOP_5, 0x2800); +DEFINE_X86_MACRO(SW_TOP_4, 0x2000); +DEFINE_X86_MACRO(SW_TOP_3, 0x1800); +DEFINE_X86_MACRO(SW_TOP_2, 0x1000); +DEFINE_X86_MACRO(SW_TOP_1, 0x0800); +DEFINE_X86_MACRO(SW_TOP_0, 0x0000); +DEFINE_X86_MACRO(SW_C2, 0x0400); +DEFINE_X86_MACRO(SW_C1, 0x0200); +DEFINE_X86_MACRO(SW_C0, 0x0100); +DEFINE_X86_MACRO(SW_ES, 0x0080); +DEFINE_X86_MACRO(SW_SF, 0x0040); +DEFINE_X86_MACRO(SW_PE, 0x0020); +DEFINE_X86_MACRO(SW_UE, 0x0010); +DEFINE_X86_MACRO(SW_OE, 0x0008); +DEFINE_X86_MACRO(SW_ZE, 0x0004); +DEFINE_X86_MACRO(SW_DE, 0x0002); +DEFINE_X86_MACRO(SW_IE, 0x0001); +DEFINE_X86_MACRO(X86_ROUNDING_MODE, 0x0C00); +DEFINE_X86_MACRO(X86_ROUNDING_PRECISION, 0x0300); + +#undef DEFINE_X86_MACRO diff --git a/BasiliskII/src/uae_cpu/fpu/impl.h b/BasiliskII/src/uae_cpu/fpu/impl.h new file mode 100644 index 000000000..c79d1f3f5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/impl.h @@ -0,0 +1,147 @@ +/* + * fpu/impl.h - extra functions and inline implementations + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_IMPL_H +#define FPU_IMPL_H + +/* NOTE: this file shall be included from fpu/core.h */ +#undef PUBLIC +#define PUBLIC /**/ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- X86 assembly fpu specific methods --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_X86 + +/* Return the floating-point status register in m68k format */ +static inline uae_u32 FFPU get_fpsr(void) +{ + return to_m68k_fpcond[(x86_status_word & 0x4700) >> 8] + | FPU fpsr.quotient + | exception_host2mac[x86_status_word & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] + | accrued_exception_host2mac[x86_status_word_accrued & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)] + ; +} + +/* Set the floating-point status register from an m68k format */ +static inline void FFPU set_fpsr(uae_u32 new_fpsr) +{ + x86_status_word = to_host_fpcond[(new_fpsr & FPSR_CCB) >> 24 ] + | exception_mac2host[(new_fpsr & FPSR_EXCEPTION_STATUS) >> 8]; + x86_status_word_accrued = accrued_exception_mac2host[(new_fpsr & FPSR_ACCRUED_EXCEPTION) >> 3]; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Original UAE and IEEE FPU core methods --- */ +/* -------------------------------------------------------------------------- */ + +#ifndef FPU_X86 + +/* Return the floating-point status register in m68k format */ +static inline uae_u32 FFPU get_fpsr(void) +{ + uae_u32 condition_codes = get_fpccr(); + uae_u32 exception_status = get_exception_status(); + uae_u32 accrued_exception = get_accrued_exception(); + uae_u32 quotient = FPU fpsr.quotient; + return (condition_codes | quotient | exception_status | accrued_exception); +} + +/* Set the floating-point status register from an m68k format */ +static inline void FFPU set_fpsr(uae_u32 new_fpsr) +{ + set_fpccr ( new_fpsr & FPSR_CCB ); + set_exception_status ( new_fpsr & FPSR_EXCEPTION_STATUS ); + set_accrued_exception ( new_fpsr & FPSR_ACCRUED_EXCEPTION ); + FPU fpsr.quotient = new_fpsr & FPSR_QUOTIENT; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common routines for control word --- */ +/* -------------------------------------------------------------------------- */ + +/* Return the floating-point control register in m68k format */ +static inline uae_u32 FFPU get_fpcr(void) +{ + uae_u32 rounding_precision = get_rounding_precision(); + uae_u32 rounding_mode = get_rounding_mode(); + return (rounding_precision | rounding_mode); +} + +/* Set the floating-point control register from an m68k format */ +static inline void FFPU set_fpcr(uae_u32 new_fpcr) +{ + set_rounding_precision ( new_fpcr & FPCR_ROUNDING_PRECISION); + set_rounding_mode ( new_fpcr & FPCR_ROUNDING_MODE ); + set_host_control_word(); +} + +/* -------------------------------------------------------------------------- */ +/* --- Specific part to X86 assembly FPU --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_X86 + +/* Retrieve a floating-point register value and convert it to double precision */ +static inline double FFPU fpu_get_register(int r) +{ + double f; + __asm__ __volatile__("fldt %1\n\tfstpl %0" : "=m" (f) : "m" (FPU registers[r])); + return f; +} + +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Specific to original UAE or new IEEE-based FPU core --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_UAE) || defined(FPU_IEEE) + +/* Retrieve a floating-point register value and convert it to double precision */ +static inline double FFPU fpu_get_register(int r) +{ + return FPU registers[r]; +} + +#endif + +#endif /* FPU_IMPL_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.cpp b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp new file mode 100644 index 000000000..eabb376e5 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.cpp @@ -0,0 +1,100 @@ +/* + * fpu/mathlib.cpp - Floating-point math support library + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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: this file shall be included only from fpu/fpu_*.cpp */ +#undef PRIVATE +#define PRIVATE static + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) + +PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y) +{ + fpu_extended value, exponent; + uae_s64 p = (uae_s64)y; + + if (x == 0.0) { + if (y > 0.0) + return (y == (double) p && (p & 1) != 0 ? x : 0.0); + else if (y < 0.0) + return (y == (double) p && (-p & 1) != 0 ? 1.0 / x : 1.0 / fp_fabs (x)); + } + + if (y == (double) p) { + fpu_extended r = 1.0; + if (p == 0) + return 1.0; + if (p < 0) { + p = -p; + x = 1.0 / x; + } + while (1) { + if (p & 1) + r *= x; + p >>= 1; + if (p == 0) + return r; + x *= x; + } + } + + __asm__ __volatile__("fyl2x" : "=t" (value) : "0" (x), "u" (1.0) : "st(1)"); + __asm__ __volatile__("fmul %%st(1) # y * log2(x)\n\t" + "fst %%st(1)\n\t" + "frndint # int(y * log2(x))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(y * log2(x))\n\t" + "f2xm1 # 2^(fract(y * log2(x))) - 1\n\t" + : "=t" (value), "=u" (exponent) : "0" (y), "1" (value)); + value += 1.0; + __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); + return value; +} + +PRIVATE fpu_extended fp_do_log1p(fpu_extended x) +{ + // TODO: handle NaN and +inf/-inf + fpu_extended value; + // The fyl2xp1 can only be used for values in + // -1 + sqrt(2) / 2 <= x <= 1 - sqrt(2) / 2 + // 0.29 is a safe value. + if (fp_fabs(x) <= 0.29) + __asm__ __volatile__("fldln2; fxch; fyl2xp1" : "=t" (value) : "0" (x)); + else + __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x + 1.0)); + return value; +} + +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/mathlib.h b/BasiliskII/src/uae_cpu/fpu/mathlib.h new file mode 100644 index 000000000..2363af56d --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/mathlib.h @@ -0,0 +1,1135 @@ +/* + * fpu/mathlib.h - Floating-point math support library + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2001 Lauri Pesonen + * New framework, copyright 2000-2001 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000-2001 + * + * 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 FPU_MATHLIB_H +#define FPU_MATHLIB_H + +/* NOTE: this file shall be included only from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +// Define the following macro if branches are expensive. If so, +// integer-based isnan() and isinf() functions are implemented. +// TODO: move to Makefile.in +#define BRANCHES_ARE_EXPENSIVE 1 + +// Use ISO C99 extended-precision math functions (glibc 2.1+) +#define FPU_USE_ISO_C99 1 + +// NOTE: this is irrelevant on Win32 platforms since the MS libraries +// don't support extended-precision floating-point computations +#if defined(WIN32) && USE_LONG_DOUBLE +#undef FPU_USE_ISO_C99 +#endif + +// Use faster implementation of math functions, but this could cause +// some incorrect results (?) +#ifdef _MSC_VER +// MSVC uses intrinsics for all of the math functions, so it should still be fast +#define FPU_FAST_MATH 0 +#else +#define FPU_FAST_MATH 1 +#endif + +#if FPU_USE_ISO_C99 +// NOTE: no prior shall be included at this point +#define __USE_ISOC99 1 // for glibc 2.2.X and newer +#define __USE_ISOC9X 1 // for glibc 2.1.X +#include +#else +#include +using namespace std; +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Floating-point register types --- */ +/* -------------------------------------------------------------------------- */ + +// Single : S 8*E 23*F +#define FP_SINGLE_EXP_MAX 0xff +#define FP_SINGLE_EXP_BIAS 0x7f + +// Double : S 11*E 52*F +#define FP_DOUBLE_EXP_MAX 0x7ff +#define FP_DOUBLE_EXP_BIAS 0x3ff + +// Extended : S 15*E 64*F +#define FP_EXTENDED_EXP_MAX 0x7fff +#define FP_EXTENDED_EXP_BIAS 0x3fff + +// Zeroes : E = 0 & F = 0 +// Infinities : E = MAX & F = 0 +// Not-A-Number : E = MAX & F # 0 + +/* -------------------------------------------------------------------------- */ +/* --- Floating-point type shapes (IEEE-compliant) --- */ +/* -------------------------------------------------------------------------- */ + +// Taken from glibc 2.2.x: ieee754.h + +// IEEE-754 float format +union fpu_single_shape { + + fpu_single value; + + /* This is the IEEE 754 single-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:8; + unsigned int mantissa:23; +#else + unsigned int mantissa:23; + unsigned int exponent:8; + unsigned int negative:1; +#endif + } ieee; + + /* This format makes it easier to see if a NaN is a signalling NaN. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:8; + unsigned int quiet_nan:1; + unsigned int mantissa:22; +#else + unsigned int mantissa:22; + unsigned int quiet_nan:1; + unsigned int exponent:8; + unsigned int negative:1; +#endif + } ieee_nan; +}; + +// IEEE-754 double format +union fpu_double_shape { + fpu_double value; + + /* This is the IEEE 754 double-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:11; + /* Together these comprise the mantissa. */ + unsigned int mantissa0:20; + unsigned int mantissa1:32; +#else +# if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int mantissa0:20; + unsigned int exponent:11; + unsigned int negative:1; + unsigned int mantissa1:32; +# else + /* Together these comprise the mantissa. */ + unsigned int mantissa1:32; + unsigned int mantissa0:20; + unsigned int exponent:11; + unsigned int negative:1; +# endif +#endif + } ieee; + + /* This format makes it easier to see if a NaN is a signalling NaN. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:11; + unsigned int quiet_nan:1; + /* Together these comprise the mantissa. */ + unsigned int mantissa0:19; + unsigned int mantissa1:32; +#else +# if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int mantissa0:19; + unsigned int quiet_nan:1; + unsigned int exponent:11; + unsigned int negative:1; + unsigned int mantissa1:32; +# else + /* Together these comprise the mantissa. */ + unsigned int mantissa1:32; + unsigned int mantissa0:19; + unsigned int quiet_nan:1; + unsigned int exponent:11; + unsigned int negative:1; +# endif +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ + struct { +#if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int msw:32; + unsigned int lsw:32; +#else + unsigned int lsw:32; + unsigned int msw:32; +#endif + } parts; +}; + +#ifdef USE_LONG_DOUBLE +// IEEE-854 long double format +union fpu_extended_shape { + fpu_extended value; + + /* This is the IEEE 854 double-extended-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int empty:16; + unsigned int mantissa0:32; + unsigned int mantissa1:32; +#else +# if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; + unsigned int mantissa0:32; + unsigned int mantissa1:32; +# else + unsigned int mantissa1:32; + unsigned int mantissa0:32; + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; +# endif +#endif + } ieee; + + /* This is for NaNs in the IEEE 854 double-extended-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int empty:16; + unsigned int one:1; + unsigned int quiet_nan:1; + unsigned int mantissa0:30; + unsigned int mantissa1:32; +#else +# if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; + unsigned int mantissa0:30; + unsigned int quiet_nan:1; + unsigned int one:1; + unsigned int mantissa1:32; +# else + unsigned int mantissa1:32; + unsigned int mantissa0:30; + unsigned int quiet_nan:1; + unsigned int one:1; + unsigned int exponent:15; + unsigned int negative:1; + unsigned int empty:16; +# endif +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ + struct { +#if HOST_FLOAT_WORDS_BIG_ENDIAN + unsigned int sign_exponent:16; + unsigned int empty:16; + unsigned int msw:32; + unsigned int lsw:32; +#else + unsigned int lsw:32; + unsigned int msw:32; + unsigned int sign_exponent:16; + unsigned int empty:16; +#endif + } parts; +}; +#endif + +#ifdef USE_QUAD_DOUBLE +// IEEE-854 quad double format +union fpu_extended_shape { + fpu_extended value; + + /* This is the IEEE 854 quad-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int mantissa0:16; + unsigned int mantissa1:32; + unsigned int mantissa2:32; + unsigned int mantissa3:32; +#else + unsigned int mantissa3:32; + unsigned int mantissa2:32; + unsigned int mantissa1:32; + unsigned int mantissa0:16; + unsigned int exponent:15; + unsigned int negative:1; +#endif + } ieee; + + /* This is for NaNs in the IEEE 854 quad-precision format. */ + struct { +#ifdef WORDS_BIGENDIAN + unsigned int negative:1; + unsigned int exponent:15; + unsigned int quiet_nan:1; + unsigned int mantissa0:15; + unsigned int mantissa1:30; + unsigned int mantissa2:32; + unsigned int mantissa3:32; +#else + unsigned int mantissa3:32; + unsigned int mantissa2:32; + unsigned int mantissa1:32; + unsigned int mantissa0:15; + unsigned int quiet_nan:1; + unsigned int exponent:15; + unsigned int negative:1; +#endif + } ieee_nan; + + /* This format is used to extract the sign_exponent and mantissa parts only */ +#if HOST_FLOAT_WORDS_BIG_ENDIAN + struct { + uae_u64 msw; + uae_u64 lsw; + } parts64; + struct { + uae_u32 w0; + uae_u32 w1; + uae_u32 w2; + uae_u32 w3; + } parts32; +#else + struct { + uae_u64 lsw; + uae_u64 msw; + } parts64; + struct { + uae_u32 w3; + uae_u32 w2; + uae_u32 w1; + uae_u32 w0; + } parts32; +#endif +}; +#endif + +// Declare and initialize a pointer to a shape of the requested FP type +#define fp_declare_init_shape(psvar, rfvar, ftype) \ + fpu_ ## ftype ## _shape * psvar = (fpu_ ## ftype ## _shape *)( &rfvar ) + +/* -------------------------------------------------------------------------- */ +/* --- Extra Math Functions --- */ +/* --- (most of them had to be defined before including ) --- */ +/* -------------------------------------------------------------------------- */ + +#undef isnan +#if 0 && defined(HAVE_ISNANL) +# define isnan(x) isnanl((x)) +#else +# define isnan(x) fp_do_isnan((x)) +#endif + +PRIVATE inline bool FFPU fp_do_isnan(fpu_register const & r) +{ +#ifdef BRANCHES_ARE_EXPENSIVE +#ifndef USE_LONG_DOUBLE + fp_declare_init_shape(sxp, r, double); + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; + hx &= 0x7fffffff; + hx |= (uae_u32)(lx | (-lx)) >> 31; + hx = 0x7ff00000 - hx; + return (((uae_u32)hx) >> 31) != 0; +#elif USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + uae_s64 hx = sxp->parts64.msw; + uae_s64 lx = sxp->parts64.lsw; + hx &= 0x7fffffffffffffffLL; + hx |= (uae_u64)(lx | (-lx)) >> 63; + hx = 0x7fff000000000000LL - hx; + return ((uae_u64)hx >> 63) != 0; +#else + fp_declare_init_shape(sxp, r, extended); + uae_s32 se = sxp->parts.sign_exponent; + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; + se = (se & 0x7fff) << 1; + lx |= hx & 0x7fffffff; + se |= (uae_u32)(lx | (-lx)) >> 31; + se = 0xfffe - se; + // TODO: check whether rshift count is 16 or 31 + return (((uae_u32)(se)) >> 16) != 0; +#endif +#else +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#else + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) +#endif + && (sxp->ieee_nan.mantissa0 != 0) + && (sxp->ieee_nan.mantissa1 != 0) +#ifdef USE_QUAD_DOUBLE + && (sxp->ieee_nan.mantissa2 != 0) + && (sxp->ieee_nan.mantissa3 != 0) +#endif + ; +#endif +} + +#undef isinf +#if 0 && defined(HAVE_ISINFL) +# define isinf(x) isinfl((x)) +#else +# define isinf(x) fp_do_isinf((x)) +#endif + +PRIVATE inline bool FFPU fp_do_isinf(fpu_register const & r) +{ +#ifdef BRANCHES_ARE_EXPENSIVE +#ifndef USE_LONG_DOUBLE + fp_declare_init_shape(sxp, r, double); + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; + lx |= (hx & 0x7fffffff) ^ 0x7ff00000; + lx |= -lx; + return (~(lx >> 31) & (hx >> 30)) != 0; +#elif USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + uae_s64 hx = sxp->parts64.msw; + uae_s64 lx = sxp->parts64.lsw; + lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; + lx |= -lx; + return (~(lx >> 63) & (hx >> 62)) != 0; +#else + fp_declare_init_shape(sxp, r, extended); + uae_s32 se = sxp->parts.sign_exponent; + uae_s32 hx = sxp->parts.msw; + uae_s32 lx = sxp->parts.lsw; + /* This additional ^ 0x80000000 is necessary because in Intel's + internal representation of the implicit one is explicit. + NOTE: anyway, this is equivalent to & 0x7fffffff in that case. */ +#ifdef __i386__ + lx |= (hx ^ 0x80000000) | ((se & 0x7fff) ^ 0x7fff); +#else + lx |= (hx & 0x7fffffff) | ((se & 0x7fff) ^ 0x7fff); +#endif + lx |= -lx; + se &= 0x8000; + return (~(lx >> 31) & (1 - (se >> 14))) != 0; +#endif +#else +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee_nan.exponent == FP_EXTENDED_EXP_MAX) +#else + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee_nan.exponent == FP_DOUBLE_EXP_MAX) +#endif + && (sxp->ieee_nan.mantissa0 == 0) + && (sxp->ieee_nan.mantissa1 == 0) +#ifdef USE_QUAD_DOUBLE + && (sxp->ieee_nan.mantissa2 == 0) + && (sxp->ieee_nan.mantissa3 == 0) +#endif + ; +#endif +} + +#undef isneg +#define isneg(x) fp_do_isneg((x)) + +PRIVATE inline bool FFPU fp_do_isneg(fpu_register const & r) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); +#else + fp_declare_init_shape(sxp, r, double); +#endif + return sxp->ieee.negative; +} + +#undef iszero +#define iszero(x) fp_do_iszero((x)) + +PRIVATE inline bool FFPU fp_do_iszero(fpu_register const & r) +{ + // TODO: BRANCHES_ARE_EXPENSIVE +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); +#else + fp_declare_init_shape(sxp, r, double); +#endif + return (sxp->ieee.exponent == 0) + && (sxp->ieee.mantissa0 == 0) + && (sxp->ieee.mantissa1 == 0) +#ifdef USE_QUAD_DOUBLE + && (sxp->ieee.mantissa2 == 0) + && (sxp->ieee.mantissa3 == 0) +#endif + ; +} + +PRIVATE inline void FFPU get_dest_flags(fpu_register const & r) +{ + fl_dest.negative = isneg(r); + fl_dest.zero = iszero(r); + fl_dest.infinity = isinf(r); + fl_dest.nan = isnan(r); + fl_dest.in_range = !fl_dest.zero && !fl_dest.infinity && !fl_dest.nan; +} + +PRIVATE inline void FFPU get_source_flags(fpu_register const & r) +{ + fl_source.negative = isneg(r); + fl_source.zero = iszero(r); + fl_source.infinity = isinf(r); + fl_source.nan = isnan(r); + fl_source.in_range = !fl_source.zero && !fl_source.infinity && !fl_source.nan; +} + +PRIVATE inline void FFPU make_nan(fpu_register & r) +{ + // FIXME: is that correct ? +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee.exponent = FP_EXTENDED_EXP_MAX; + sxp->ieee.mantissa0 = 0xffffffff; +#else + fp_declare_init_shape(sxp, r, double); + sxp->ieee.exponent = FP_DOUBLE_EXP_MAX; + sxp->ieee.mantissa0 = 0xfffff; +#endif + sxp->ieee.mantissa1 = 0xffffffff; +#ifdef USE_QUAD_DOUBLE + sxp->ieee.mantissa2 = 0xffffffff; + sxp->ieee.mantissa3 = 0xffffffff; +#endif +} + +PRIVATE inline void FFPU make_zero_positive(fpu_register & r) +{ +#if 1 + r = +0.0; +#else +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); +#else + fp_declare_init_shape(sxp, r, double); +#endif + sxp->ieee.negative = 0; + sxp->ieee.exponent = 0; + sxp->ieee.mantissa0 = 0; + sxp->ieee.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp->ieee.mantissa2 = 0; + sxp->ieee.mantissa3 = 0; +#endif +#endif +} + +PRIVATE inline void FFPU make_zero_negative(fpu_register & r) +{ +#if 1 + r = -0.0; +#else +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); +#else + fp_declare_init_shape(sxp, r, double); +#endif + sxp->ieee.negative = 1; + sxp->ieee.exponent = 0; + sxp->ieee.mantissa0 = 0; + sxp->ieee.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp->ieee.mantissa2 = 0; + sxp->ieee.mantissa3 = 0; +#endif +#endif +} + +PRIVATE inline void FFPU make_inf_positive(fpu_register & r) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#else + fp_declare_init_shape(sxp, r, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp->ieee_nan.negative = 0; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp->ieee_nan.mantissa2 = 0; + sxp->ieee_nan.mantissa3 = 0; +#endif +} + +PRIVATE inline void FFPU make_inf_negative(fpu_register & r) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; +#else + fp_declare_init_shape(sxp, r, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp->ieee_nan.negative = 1; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; +#ifdef USE_QUAD_DOUBLE + sxp->ieee_nan.mantissa2 = 0; + sxp->ieee_nan.mantissa3 = 0; +#endif +} + +PRIVATE inline fpu_register FFPU fast_fgetexp(fpu_register const & r) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + return (sxp->ieee.exponent - FP_EXTENDED_EXP_BIAS); +#else + fp_declare_init_shape(sxp, r, double); + return (sxp->ieee.exponent - FP_DOUBLE_EXP_BIAS); +#endif +} + +// Normalize to range 1..2 +PRIVATE inline void FFPU fast_remove_exponent(fpu_register & r) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, r, extended); + sxp->ieee.exponent = FP_EXTENDED_EXP_BIAS; +#else + fp_declare_init_shape(sxp, r, double); + sxp->ieee.exponent = FP_DOUBLE_EXP_BIAS; +#endif +} + +// The sign of the quotient is the exclusive-OR of the sign bits +// of the source and destination operands. +PRIVATE inline uae_u32 FFPU get_quotient_sign(fpu_register const & ra, fpu_register const & rb) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sap, ra, extended); + fp_declare_init_shape(sbp, rb, extended); +#else + fp_declare_init_shape(sap, ra, double); + fp_declare_init_shape(sbp, rb, double); +#endif + return ((sap->ieee.negative ^ sbp->ieee.negative) ? FPSR_QUOTIENT_SIGN : 0); +} + +/* -------------------------------------------------------------------------- */ +/* --- Math functions --- */ +/* -------------------------------------------------------------------------- */ + +#if FPU_USE_ISO_C99 +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE +# ifdef HAVE_LOGL +# define fp_log logl +# endif +# ifdef HAVE_LOG10L +# define fp_log10 log10l +# endif +# ifdef HAVE_EXPL +# define fp_exp expl +# endif +# ifdef HAVE_POWL +# define fp_pow powl +# endif +# ifdef HAVE_FABSL +# define fp_fabs fabsl +# endif +# ifdef HAVE_SQRTL +# define fp_sqrt sqrtl +# endif +# ifdef HAVE_SINL +# define fp_sin sinl +# endif +# ifdef HAVE_COSL +# define fp_cos cosl +# endif +# ifdef HAVE_TANL +# define fp_tan tanl +# endif +# ifdef HAVE_SINHL +# define fp_sinh sinhl +# endif +# ifdef HAVE_COSHL +# define fp_cosh coshl +# endif +# ifdef HAVE_TANHL +# define fp_tanh tanhl +# endif +# ifdef HAVE_ASINL +# define fp_asin asinl +# endif +# ifdef HAVE_ACOSL +# define fp_acos acosl +# endif +# ifdef HAVE_ATANL +# define fp_atan atanl +# endif +# ifdef HAVE_ASINHL +# define fp_asinh asinhl +# endif +# ifdef HAVE_ACOSHL +# define fp_acosh acoshl +# endif +# ifdef HAVE_ATANHL +# define fp_atanh atanhl +# endif +# ifdef HAVE_FLOORL +# define fp_floor floorl +# endif +# ifdef HAVE_CEILL +# define fp_ceil ceill +# endif +#endif + +#ifndef fp_log +# define fp_log log +#endif +#ifndef fp_log10 +# define fp_log10 log10 +#endif +#ifndef fp_exp +# define fp_exp exp +#endif +#ifndef fp_pow +# define fp_pow pow +#endif +#ifndef fp_fabs +# define fp_fabs fabs +#endif +#ifndef fp_sqrt +# define fp_sqrt sqrt +#endif +#ifndef fp_sin +# define fp_sin sin +#endif +#ifndef fp_cos +# define fp_cos cos +#endif +#ifndef fp_tan +# define fp_tan tan +#endif +#ifndef fp_sinh +# define fp_sinh sinh +#endif +#ifndef fp_cosh +# define fp_cosh cosh +#endif +#ifndef fp_tanh +# define fp_tanh tanh +#endif +#ifndef fp_asin +# define fp_asin asin +#endif +#ifndef fp_acos +# define fp_acos acos +#endif +#ifndef fp_atan +# define fp_atan atan +#endif +#ifndef fp_asinh +# define fp_asinh asinh +#endif +#ifndef fp_acosh +# define fp_acosh acosh +#endif +#ifndef fp_atanh +# define fp_atanh atanh +#endif +#ifndef fp_floor +# define fp_floor floor +#endif +#ifndef fp_ceil +# define fp_ceil ceil +#endif + +#elif defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +// Assembly optimized support functions. Taken from glibc 2.2.2 + +#undef fp_log +#define fp_log fp_do_log + +#if !FPU_FAST_MATH +PRIVATE fpu_extended fp_do_log(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_log(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fldln2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} +#endif + +#undef fp_log10 +#define fp_log10 fp_do_log10 + +#if !FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_log10(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_log10(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fldlg2; fxch; fyl2x" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} +#endif + +#undef fp_exp +#define fp_exp fp_do_exp + +#if !FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_exp(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_exp(fpu_extended x) +{ + fpu_extended value, exponent; + __asm__ __volatile__("fldl2e # e^x = 2^(x * log2(e))\n\t" + "fmul %%st(1) # x * log2(e)\n\t" + "fst %%st(1)\n\t" + "frndint # int(x * log2(e))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(x * log2(e))\n\t" + "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" + : "=t" (value), "=u" (exponent) : "0" (x)); + value += 1.0; + __asm__ __volatile__("fscale" : "=t" (value) : "0" (value), "u" (exponent)); + return value; +} +#endif + +#undef fp_pow +#define fp_pow fp_do_pow + +PRIVATE fpu_extended fp_do_pow(fpu_extended x, fpu_extended y); + +#undef fp_fabs +#define fp_fabs fp_do_fabs + +PRIVATE inline fpu_extended fp_do_fabs(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fabs" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_sqrt +#define fp_sqrt fp_do_sqrt + +PRIVATE inline fpu_extended fp_do_sqrt(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fsqrt" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_sin +#define fp_sin fp_do_sin + +PRIVATE inline fpu_extended fp_do_sin(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fsin" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_cos +#define fp_cos fp_do_cos + +PRIVATE inline fpu_extended fp_do_cos(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fcos" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_tan +#define fp_tan fp_do_tan + +PRIVATE inline fpu_extended fp_do_tan(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fptan" : "=t" (value) : "0" (x)); + return value; +} + +#undef fp_expm1 +#define fp_expm1 fp_do_expm1 + +// Returns: exp(X) - 1.0 +PRIVATE inline fpu_extended fp_do_expm1(fpu_extended x) +{ + fpu_extended value, exponent, temp; + __asm__ __volatile__("fldl2e # e^x - 1 = 2^(x * log2(e)) - 1\n\t" + "fmul %%st(1) # x * log2(e)\n\t" + "fst %%st(1)\n\t" + "frndint # int(x * log2(e))\n\t" + "fxch\n\t" + "fsub %%st(1) # fract(x * log2(e))\n\t" + "f2xm1 # 2^(fract(x * log2(e))) - 1\n\t" + "fscale # 2^(x * log2(e)) - 2^(int(x * log2(e)))\n\t" + : "=t" (value), "=u" (exponent) : "0" (x)); + __asm__ __volatile__("fscale" : "=t" (temp) : "0" (1.0), "u" (exponent)); + temp -= 1.0; + return temp + value ? temp + value : x; +} + +#undef fp_sgn1 +#define fp_sgn1 fp_do_sgn1 + +PRIVATE inline fpu_extended fp_do_sgn1(fpu_extended x) +{ +#if USE_LONG_DOUBLE || USE_QUAD_DOUBLE + fp_declare_init_shape(sxp, x, extended); + sxp->ieee_nan.exponent = FP_EXTENDED_EXP_MAX; + sxp->ieee_nan.one = 1; +#else + fp_declare_init_shape(sxp, x, double); + sxp->ieee_nan.exponent = FP_DOUBLE_EXP_MAX; +#endif + sxp->ieee_nan.quiet_nan = 0; + sxp->ieee_nan.mantissa0 = 0; + sxp->ieee_nan.mantissa1 = 0; + return x; +} + +#undef fp_sinh +#define fp_sinh fp_do_sinh + +#if !FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_sinh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_sinh(fpu_extended x) +{ + fpu_extended exm1 = fp_expm1(fp_fabs(x)); + return 0.5 * (exm1 / (exm1 + 1.0) + exm1) * fp_sgn1(x); +} +#endif + +#undef fp_cosh +#define fp_cosh fp_do_cosh + +#if !FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_cosh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_cosh(fpu_extended x) +{ + fpu_extended ex = fp_exp(x); + return 0.5 * (ex + 1.0 / ex); +} +#endif + +#undef fp_tanh +#define fp_tanh fp_do_tanh + +#if !FPU_FAST_MATH +// FIXME: unimplemented +PRIVATE fpu_extended fp_do_tanh(fpu_extended x); +#else +PRIVATE inline fpu_extended fp_do_tanh(fpu_extended x) +{ + fpu_extended exm1 = fp_expm1(-fp_fabs(x + x)); + return exm1 / (exm1 + 2.0) * fp_sgn1(-x); +} +#endif + +#undef fp_atan2 +#define fp_atan2 fp_do_atan2 + +PRIVATE inline fpu_extended fp_do_atan2(fpu_extended y, fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fpatan" : "=t" (value) : "0" (x), "u" (y) : "st(1)"); + return value; +} + +#undef fp_asin +#define fp_asin fp_do_asin + +PRIVATE inline fpu_extended fp_do_asin(fpu_extended x) +{ + return fp_atan2(x, fp_sqrt(1.0 - x * x)); +} + +#undef fp_acos +#define fp_acos fp_do_acos + +PRIVATE inline fpu_extended fp_do_acos(fpu_extended x) +{ + return fp_atan2(fp_sqrt(1.0 - x * x), x); +} + +#undef fp_atan +#define fp_atan fp_do_atan + +PRIVATE inline fpu_extended fp_do_atan(fpu_extended x) +{ + fpu_extended value; + __asm__ __volatile__("fld1; fpatan" : "=t" (value) : "0" (x) : "st(1)"); + return value; +} + +#undef fp_log1p +#define fp_log1p fp_do_log1p + +// Returns: ln(1.0 + X) +PRIVATE fpu_extended fp_do_log1p(fpu_extended x); + +#undef fp_asinh +#define fp_asinh fp_do_asinh + +PRIVATE inline fpu_extended fp_do_asinh(fpu_extended x) +{ + fpu_extended y = fp_fabs(x); + return (fp_log1p(y * y / (fp_sqrt(y * y + 1.0) + 1.0) + y) * fp_sgn1(x)); +} + +#undef fp_acosh +#define fp_acosh fp_do_acosh + +PRIVATE inline fpu_extended fp_do_acosh(fpu_extended x) +{ + return fp_log(x + fp_sqrt(x - 1.0) * fp_sqrt(x + 1.0)); +} + +#undef fp_atanh +#define fp_atanh fp_do_atanh + +PRIVATE inline fpu_extended fp_do_atanh(fpu_extended x) +{ + fpu_extended y = fp_fabs(x); + return -0.5 * fp_log1p(-(y + y) / (1.0 + y)) * fp_sgn1(x); +} + +#undef fp_floor +#define fp_floor fp_do_floor + +PRIVATE inline fpu_extended fp_do_floor(fpu_extended x) +{ + volatile unsigned int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0400; // rounding down + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); + fpu_extended value; + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); + __asm__ __volatile__("fldcw %0" : : "m" (cw)); + return value; +} + +#undef fp_ceil +#define fp_ceil fp_do_ceil + +PRIVATE inline fpu_extended fp_do_ceil(fpu_extended x) +{ + volatile unsigned int cw; + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); + volatile unsigned int cw_temp = (cw & 0xf3ff) | 0x0800; // rounding up + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); + fpu_extended value; + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); + __asm__ __volatile__("fldcw %0" : : "m" (cw)); + return value; +} + +#define DEFINE_ROUND_FUNC(rounding_mode_str, rounding_mode) \ +PRIVATE inline fpu_extended fp_do_round_to_ ## rounding_mode_str(fpu_extended x) \ +{ \ + volatile unsigned int cw; \ + __asm__ __volatile__("fnstcw %0" : "=m" (cw)); \ + volatile unsigned int cw_temp = (cw & 0xf3ff) | (rounding_mode); \ + __asm__ __volatile__("fldcw %0" : : "m" (cw_temp)); \ + fpu_extended value; \ + __asm__ __volatile__("frndint" : "=t" (value) : "0" (x)); \ + __asm__ __volatile__("fldcw %0" : : "m" (cw)); \ + return value; \ +} + +#undef fp_round_to_minus_infinity +#define fp_round_to_minus_infinity fp_do_round_to_minus_infinity + +DEFINE_ROUND_FUNC(minus_infinity, 0x400) + +#undef fp_round_to_plus_infinity +#define fp_round_to_plus_infinity fp_do_round_to_plus_infinity + +DEFINE_ROUND_FUNC(plus_infinity, 0x800) + +#undef fp_round_to_zero +#define fp_round_to_zero fp_do_round_to_zero + +DEFINE_ROUND_FUNC(zero, 0xc00) + +#undef fp_round_to_nearest +#define fp_round_to_nearest fp_do_round_to_nearest + +DEFINE_ROUND_FUNC(nearest, 0x000) + +#endif /* USE_X87_ASSEMBLY */ + +#ifndef fp_round_to_minus_infinity +#define fp_round_to_minus_infinity(x) fp_floor(x) +#endif + +#ifndef fp_round_to_plus_infinity +#define fp_round_to_plus_infinity(x) fp_ceil(x) +#endif + +#ifndef fp_round_to_zero +#define fp_round_to_zero(x) ((int)(x)) +#endif + +#ifndef fp_round_to_nearest +#define fp_round_to_nearest(x) ((int)((x) + 0.5)) +#endif + +#endif /* FPU_MATHLIB_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.cpp b/BasiliskII/src/uae_cpu/fpu/rounding.cpp new file mode 100644 index 000000000..1f8b36183 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/rounding.cpp @@ -0,0 +1,64 @@ +/* + * fpu/rounding.cpp - system-dependant FPU rounding mode and precision + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 + */ + +#undef PRIVATE +#define PRIVATE /**/ + +#undef PUBLIC +#define PUBLIC /**/ + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Rounding Mode --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_ROUNDING_MODE +const uae_u32 FFPU x86_control_word_rm_mac2host[] = { + CW_RC_NEAR, + CW_RC_ZERO, + CW_RC_DOWN, + CW_RC_UP +}; +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Native X86 Rounding Precision --- */ +/* -------------------------------------------------------------------------- */ + +#ifdef FPU_USE_X86_ROUNDING_PRECISION +const uae_u32 FFPU x86_control_word_rp_mac2host[] = { + CW_PC_EXTENDED, + CW_PC_SINGLE, + CW_PC_DOUBLE, + CW_PC_RESERVED +}; +#endif diff --git a/BasiliskII/src/uae_cpu/fpu/rounding.h b/BasiliskII/src/uae_cpu/fpu/rounding.h new file mode 100644 index 000000000..67db55190 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/rounding.h @@ -0,0 +1,154 @@ +/* + * fpu/rounding.h - system-dependant FPU rounding mode and precision + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_ROUNDING_H +#define FPU_ROUNDING_H + +/* NOTE: this file shall be included from fpu/fpu_*.cpp */ +#undef PUBLIC +#define PUBLIC extern + +#undef PRIVATE +#define PRIVATE static + +#undef FFPU +#define FFPU /**/ + +#undef FPU +#define FPU fpu. + +/* Defaults to generic rounding mode and precision handling */ +#define FPU_USE_GENERIC_ROUNDING_MODE +#define FPU_USE_GENERIC_ROUNDING_PRECISION + +/* -------------------------------------------------------------------------- */ +/* --- Selection of floating-point rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +/* Optimized i386 fpu core must use native rounding mode */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_MODE +# define FPU_USE_X86_ROUNDING_MODE +#endif + +/* Optimized i386 fpu core must use native rounding precision */ +#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_PRECISION +# define FPU_USE_X86_ROUNDING_PRECISION +#endif + +#if 0 // gb-- FIXME: that doesn't work +/* IEEE-based fpu core can have native rounding mode on i386 */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_MODE +# define FPU_USE_X86_ROUNDING_MODE +#endif + +/* IEEE-based fpu core can have native rounding precision on i386 */ +#if defined(FPU_IEEE) && defined(USE_X87_ASSEMBLY) +# undef FPU_USE_GENERIC_ROUNDING_PRECISION +# define FPU_USE_X86_ROUNDING_PRECISION +#endif +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Sanity checks --- */ +/* -------------------------------------------------------------------------- */ + +/* X86 rounding mode and precision work together */ +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +# define FPU_USE_X86_ROUNDING +# define CW_INITIAL (CW_RESET|CW_X|CW_PC_EXTENDED|CW_RC_NEAR|CW_PM|CW_UM|CW_OM|CW_ZM|CW_DM|CW_IM) + PRIVATE uae_u32 x86_control_word; +#endif + +/* Control word -- rounding mode */ +#ifdef FPU_USE_X86_ROUNDING_MODE +PUBLIC const uae_u32 x86_control_word_rm_mac2host[]; +#endif + +/* Control word -- rounding precision */ +#ifdef FPU_USE_X86_ROUNDING_PRECISION +PUBLIC const uae_u32 x86_control_word_rp_mac2host[]; +#endif + +#if defined(FPU_USE_X86_ROUNDING_MODE) && defined(FPU_USE_X86_ROUNDING_PRECISION) +/* Set host control word for rounding mode and rounding precision */ +PRIVATE inline void set_host_control_word(void) +{ + /* + Exception enable byte is ignored, but the same value is returned + that was previously set. + */ + x86_control_word + = (x86_control_word & ~(X86_ROUNDING_MODE|X86_ROUNDING_PRECISION)) + | x86_control_word_rm_mac2host[(FPU fpcr.rounding_mode & FPCR_ROUNDING_MODE) >> 4] + | x86_control_word_rp_mac2host[(FPU fpcr.rounding_precision & FPCR_ROUNDING_PRECISION) >> 6] + ; + __asm__ __volatile__("fldcw %0" : : "m" (x86_control_word)); +} +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Generic rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) && defined(FPU_USE_GENERIC_ROUNDING_PRECISION) +/* Set host control word for rounding mode and rounding precision */ +PRIVATE inline void set_host_control_word(void) + { } +#endif + +/* -------------------------------------------------------------------------- */ +/* --- Common rounding mode and precision --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_USE_GENERIC_ROUNDING_MODE) || defined(FPU_USE_X86_ROUNDING_MODE) + +/* Return the current rounding mode in m68k format */ +static inline uae_u32 FFPU get_rounding_mode(void) + { return FPU fpcr.rounding_mode; } + +/* Convert and set to native rounding mode */ +static inline void FFPU set_rounding_mode(uae_u32 new_rounding_mode) + { FPU fpcr.rounding_mode = new_rounding_mode; } + +#endif + +#if defined(FPU_USE_GENERIC_ROUNDING_PRECISION) || defined(FPU_USE_X86_ROUNDING_PRECISION) + +/* Return the current rounding precision in m68k format */ +static inline uae_u32 FFPU get_rounding_precision(void) + { return FPU fpcr.rounding_precision; } + +/* Convert and set to native rounding precision */ +static inline void FFPU set_rounding_precision(uae_u32 new_rounding_precision) + { FPU fpcr.rounding_precision = new_rounding_precision; } + +#endif + +#endif /* FPU_ROUNDING_H */ diff --git a/BasiliskII/src/uae_cpu/fpu/types.h b/BasiliskII/src/uae_cpu/fpu/types.h new file mode 100644 index 000000000..c0a641925 --- /dev/null +++ b/BasiliskII/src/uae_cpu/fpu/types.h @@ -0,0 +1,159 @@ +/* + * types.h - basic types for fpu registers + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * MC68881/68040 fpu emulation + * + * Original UAE FPU, copyright 1996 Herman ten Brugge + * Rewrite for x86, copyright 1999-2000 Lauri Pesonen + * New framework, copyright 2000 Gwenole Beauchesne + * Adapted for JIT compilation (c) Bernd Meyer, 2000 + * + * 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 FPU_TYPES_H +#define FPU_TYPES_H + +#include "sysdeps.h" + +/* Default behavior is *not* to use long doubles */ +#undef USE_LONG_DOUBLE +#undef USE_QUAD_DOUBLE + +/* -------------------------------------------------------------------------- */ +/* --- Original UAE fpu core --- */ +/* -------------------------------------------------------------------------- */ + +#if defined(FPU_UAE) + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef double uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef long double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* Original UAE FPU registers are only 8 bytes long */ +typedef uae_f64 fpu_register; +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +/* -------------------------------------------------------------------------- */ +/* --- Optimized core for x86 --- */ +/* -------------------------------------------------------------------------- */ + +#elif defined(FPU_X86) + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef float uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* At least 10-byte floats are required */ +#if SIZEOF_LONG_DOUBLE >= 10 +typedef long double fpu_register; +#else +#error "No float type at least 10 bytes long, you lose." +#endif + +/* X86 FPU has a custom register type that maps to a native X86 register */ +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +/* -------------------------------------------------------------------------- */ +/* --- C99 implementation --- */ +/* -------------------------------------------------------------------------- */ + +#elif defined(FPU_IEEE) + +#if HOST_FLOAT_FORMAT != IEEE_FLOAT_FORMAT +#error "No IEEE float format, you lose." +#endif + +/* 4-byte floats */ +#if SIZEOF_FLOAT == 4 +typedef float uae_f32; +#elif SIZEOF_DOUBLE == 4 +typedef double uae_f32; +#else +#error "No 4 byte float type, you lose." +#endif + +/* 8-byte floats */ +#if SIZEOF_DOUBLE == 8 +typedef double uae_f64; +#elif SIZEOF_LONG_DOUBLE == 8 +typedef long double uae_f64; +#else +#error "No 8 byte float type, you lose." +#endif + +/* 12-byte or 16-byte floats */ +#if SIZEOF_LONG_DOUBLE == 12 +typedef long double uae_f96; +typedef uae_f96 fpu_register; +#define USE_LONG_DOUBLE 1 +#elif SIZEOF_LONG_DOUBLE == 16 && (defined(__i386__) || defined(__x86_64__)) +/* Long doubles on x86-64 are really held in old x87 FPU stack. */ +typedef long double uae_f128; +typedef uae_f128 fpu_register; +#define USE_LONG_DOUBLE 1 +#elif 0 +/* Disable for now and probably for good as (i) the emulator + implementation is not correct, (ii) I don't know of any CPU which + handles this kind of format *natively* with conformance to IEEE. */ +typedef long double uae_f128; +typedef uae_f128 fpu_register; +#define USE_QUAD_DOUBLE 1 +#else +typedef uae_f64 fpu_register; +#endif + +/* We need all those floating-point types */ +typedef fpu_register fpu_extended; +typedef uae_f64 fpu_double; +typedef uae_f32 fpu_single; + +#endif + +#endif /* FPU_TYPES_H */ diff --git a/BasiliskII/src/uae_cpu/gencpu.c b/BasiliskII/src/uae_cpu/gencpu.c new file mode 100644 index 000000000..5045dffd4 --- /dev/null +++ b/BasiliskII/src/uae_cpu/gencpu.c @@ -0,0 +1,2558 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation generator + * + * This is a fairly stupid program that generates a lot of case labels that + * can be #included in a switch statement. + * As an alternative, it can generate functions that handle specific + * MC68000 instructions, plus a prototype header file and a function pointer + * array to look up the function for an opcode. + * Error checking is bad, an illegal table68k file will cause the program to + * call abort(). + * The generated code is sometimes sub-optimal, an optimizing compiler should + * take care of this. + * + * Copyright 1995, 1996 Bernd Schmidt + * + * 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 +#include +#include +#include + +#include "sysdeps.h" +#include "readcpu.h" + +#if defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) +#define SPARC_ASSEMBLY 0 +#endif + +#define BOOL_TYPE "int" + +/* Define the minimal 680x0 where NV flags are not affected by xBCD instructions. */ +#define xBCD_KEEPS_NV_FLAGS 4 + +static FILE *headerfile; +static FILE *stblfile; + +static int using_prefetch; +static int using_exception_3; +static int cpu_level; + +/* For the current opcode, the next lower level that will have different code. + * Initialized to -1 for each opcode. If it remains unchanged, indicates we + * are done with that opcode. */ +static int next_cpu_level; + +static int *opcode_map; +static int *opcode_next_clev; +static int *opcode_last_postfix; +static unsigned long *counts; + +static void read_counts (void) +{ + FILE *file; + unsigned long opcode, count, total; + char name[20]; + int nr = 0; + memset (counts, 0, 65536 * sizeof *counts); + + file = fopen ("frequent.68k", "r"); + if (file) { + fscanf (file, "Total: %lu\n", &total); + while (fscanf (file, "%lx: %lu %s\n", &opcode, &count, name) == 3) { + opcode_next_clev[nr] = 4; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + fclose (file); + } + if (nr == nr_cpuop_funcs) + return; + for (opcode = 0; opcode < 0x10000; opcode++) { + if (table68k[opcode].handler == -1 && table68k[opcode].mnemo != i_ILLG + && counts[opcode] == 0) + { + opcode_next_clev[nr] = 4; + opcode_last_postfix[nr] = -1; + opcode_map[nr++] = opcode; + counts[opcode] = count; + } + } + if (nr != nr_cpuop_funcs) + abort (); +} + +static char endlabelstr[80]; +static int endlabelno = 0; +static int need_endlabel; + +static int n_braces = 0; +static int m68k_pc_offset = 0; +static int insn_n_cycles; + +static void start_brace (void) +{ + n_braces++; + printf ("{"); +} + +static void close_brace (void) +{ + assert (n_braces > 0); + n_braces--; + printf ("}"); +} + +static void finish_braces (void) +{ + while (n_braces > 0) + close_brace (); +} + +static void pop_braces (int to) +{ + while (n_braces > to) + close_brace (); +} + +static int bit_size (int size) +{ + switch (size) { + case sz_byte: return 8; + case sz_word: return 16; + case sz_long: return 32; + default: abort (); + } + return 0; +} + +static const char *bit_mask (int size) +{ + switch (size) { + case sz_byte: return "0xff"; + case sz_word: return "0xffff"; + case sz_long: return "0xffffffff"; + default: abort (); + } + return 0; +} + +static const char *gen_nextilong (void) +{ + static char buffer[80]; + int r = m68k_pc_offset; + m68k_pc_offset += 4; + + insn_n_cycles += 4; + + if (using_prefetch) + sprintf (buffer, "get_ilong_prefetch(%d)", r); + else + sprintf (buffer, "get_ilong(%d)", r); + return buffer; +} + +static const char *gen_nextiword (void) +{ + static char buffer[80]; + int r = m68k_pc_offset; + m68k_pc_offset += 2; + + insn_n_cycles += 2; + + if (using_prefetch) + sprintf (buffer, "get_iword_prefetch(%d)", r); + else + sprintf (buffer, "get_iword(%d)", r); + return buffer; +} + +static const char *gen_nextibyte (void) +{ + static char buffer[80]; + int r = m68k_pc_offset; + m68k_pc_offset += 2; + + insn_n_cycles += 2; + + if (using_prefetch) + sprintf (buffer, "get_ibyte_prefetch(%d)", r); + else + sprintf (buffer, "get_ibyte(%d)", r); + return buffer; +} + +static void fill_prefetch_0 (void) +{ + if (using_prefetch) + printf ("fill_prefetch_0 ();\n"); +} + +static void fill_prefetch_2 (void) +{ + if (using_prefetch) + printf ("fill_prefetch_2 ();\n"); +} + +static void swap_opcode (void) +{ + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + printf ("\topcode = ((opcode << 8) & 0xFF00) | ((opcode >> 8) & 0xFF);\n"); + printf ("#endif\n"); +} + +static void sync_m68k_pc (void) +{ + if (m68k_pc_offset == 0) + return; + printf ("m68k_incpc(%d);\n", m68k_pc_offset); + switch (m68k_pc_offset) { + case 0: + /*fprintf (stderr, "refilling prefetch at 0\n"); */ + break; + case 2: + fill_prefetch_2 (); + break; + default: + fill_prefetch_0 (); + break; + } + m68k_pc_offset = 0; +} + +/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0, + * the calling routine handles Apdi and Aipi modes. + * gb-- movem == 2 means the same thing but for a MOVE16 instruction */ +static void genamode (amodes mode, char *reg, wordsizes size, char *name, int getv, int movem) +{ + start_brace (); + switch (mode) { + case Dreg: + if (movem) + abort (); + if (getv == 1) + switch (size) { + case sz_byte: +#if defined(AMIGA) && !defined(WARPUP) + /* sam: I don't know why gcc.2.7.2.1 produces a code worse */ + /* if it is not done like that: */ + printf ("\tuae_s8 %s = ((uae_u8*)&m68k_dreg(regs, %s))[3];\n", name, reg); +#else + printf ("\tuae_s8 %s = m68k_dreg(regs, %s);\n", name, reg); +#endif + break; + case sz_word: +#if defined(AMIGA) && !defined(WARPUP) + printf ("\tuae_s16 %s = ((uae_s16*)&m68k_dreg(regs, %s))[1];\n", name, reg); +#else + printf ("\tuae_s16 %s = m68k_dreg(regs, %s);\n", name, reg); +#endif + break; + case sz_long: + printf ("\tuae_s32 %s = m68k_dreg(regs, %s);\n", name, reg); + break; + default: + abort (); + } + return; + case Areg: + if (movem) + abort (); + if (getv == 1) + switch (size) { + case sz_word: + printf ("\tuae_s16 %s = m68k_areg(regs, %s);\n", name, reg); + break; + case sz_long: + printf ("\tuae_s32 %s = m68k_areg(regs, %s);\n", name, reg); + break; + default: + abort (); + } + return; + case Aind: + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + break; + case Aipi: + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + break; + case Apdi: + switch (size) { + case sz_byte: + if (movem) + printf ("\tuaecptr %sa = m68k_areg(regs, %s);\n", name, reg); + else + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - areg_byteinc[%s];\n", name, reg, reg); + break; + case sz_word: + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 2); + break; + case sz_long: + printf ("\tuaecptr %sa = m68k_areg(regs, %s) - %d;\n", name, reg, movem ? 0 : 4); + break; + default: + abort (); + } + break; + case Ad16: + printf ("\tuaecptr %sa = m68k_areg(regs, %s) + (uae_s32)(uae_s16)%s;\n", name, reg, gen_nextiword ()); + break; + case Ad8r: + if (cpu_level > 1) { + if (next_cpu_level < 1) + next_cpu_level = 1; + sync_m68k_pc (); + start_brace (); + printf ("\tuaecptr %sa = get_disp_ea_020(m68k_areg(regs, %s), next_iword());\n", name, reg); + } else + printf ("\tuaecptr %sa = get_disp_ea_000(m68k_areg(regs, %s), %s);\n", name, reg, gen_nextiword ()); + + break; + case PC16: + printf ("\tuaecptr %sa = m68k_getpc () + %d;\n", name, m68k_pc_offset); + printf ("\t%sa += (uae_s32)(uae_s16)%s;\n", name, gen_nextiword ()); + break; + case PC8r: + if (cpu_level > 1) { + if (next_cpu_level < 1) + next_cpu_level = 1; + sync_m68k_pc (); + start_brace (); + printf ("\tuaecptr tmppc = m68k_getpc();\n"); + printf ("\tuaecptr %sa = get_disp_ea_020(tmppc, next_iword());\n", name); + } else { + printf ("\tuaecptr tmppc = m68k_getpc() + %d;\n", m68k_pc_offset); + printf ("\tuaecptr %sa = get_disp_ea_000(tmppc, %s);\n", name, gen_nextiword ()); + } + + break; + case absw: + printf ("\tuaecptr %sa = (uae_s32)(uae_s16)%s;\n", name, gen_nextiword ()); + break; + case absl: + printf ("\tuaecptr %sa = %s;\n", name, gen_nextilong ()); + break; + case imm: + if (getv != 1) + abort (); + switch (size) { + case sz_byte: + printf ("\tuae_s8 %s = %s;\n", name, gen_nextibyte ()); + break; + case sz_word: + printf ("\tuae_s16 %s = %s;\n", name, gen_nextiword ()); + break; + case sz_long: + printf ("\tuae_s32 %s = %s;\n", name, gen_nextilong ()); + break; + default: + abort (); + } + return; + case imm0: + if (getv != 1) + abort (); + printf ("\tuae_s8 %s = %s;\n", name, gen_nextibyte ()); + return; + case imm1: + if (getv != 1) + abort (); + printf ("\tuae_s16 %s = %s;\n", name, gen_nextiword ()); + return; + case imm2: + if (getv != 1) + abort (); + printf ("\tuae_s32 %s = %s;\n", name, gen_nextilong ()); + return; + case immi: + if (getv != 1) + abort (); + printf ("\tuae_u32 %s = %s;\n", name, reg); + return; + default: + abort (); + } + + /* We get here for all non-reg non-immediate addressing modes to + * actually fetch the value. */ + + if (using_exception_3 && getv != 0 && size != sz_byte) { + printf ("\tif ((%sa & 1) != 0) {\n", name); + printf ("\t\tlast_fault_for_exception_3 = %sa;\n", name); + printf ("\t\tlast_op_for_exception_3 = opcode;\n"); + printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + %d;\n", m68k_pc_offset); + printf ("\t\tException(3, 0);\n"); + printf ("\t\tgoto %s;\n", endlabelstr); + printf ("\t}\n"); + need_endlabel = 1; + start_brace (); + } + + if (getv == 1) { + switch (size) { + case sz_byte: insn_n_cycles += 2; break; + case sz_word: insn_n_cycles += 2; break; + case sz_long: insn_n_cycles += 4; break; + default: abort (); + } + start_brace (); + switch (size) { + case sz_byte: printf ("\tuae_s8 %s = get_byte(%sa);\n", name, name); break; + case sz_word: printf ("\tuae_s16 %s = get_word(%sa);\n", name, name); break; + case sz_long: printf ("\tuae_s32 %s = get_long(%sa);\n", name, name); break; + default: abort (); + } + } + + /* We now might have to fix up the register for pre-dec or post-inc + * addressing modes. */ + if (!movem) + switch (mode) { + case Aipi: + switch (size) { + case sz_byte: + printf ("\tm68k_areg(regs, %s) += areg_byteinc[%s];\n", reg, reg); + break; + case sz_word: + printf ("\tm68k_areg(regs, %s) += 2;\n", reg); + break; + case sz_long: + printf ("\tm68k_areg(regs, %s) += 4;\n", reg); + break; + default: + abort (); + } + break; + case Apdi: + printf ("\tm68k_areg (regs, %s) = %sa;\n", reg, name); + break; + default: + break; + } +} + +static void genastore (char *from, amodes mode, char *reg, wordsizes size, char *to) +{ + switch (mode) { + case Dreg: + switch (size) { + case sz_byte: + printf ("\tm68k_dreg(regs, %s) = (m68k_dreg(regs, %s) & ~0xff) | ((%s) & 0xff);\n", reg, reg, from); + break; + case sz_word: + printf ("\tm68k_dreg(regs, %s) = (m68k_dreg(regs, %s) & ~0xffff) | ((%s) & 0xffff);\n", reg, reg, from); + break; + case sz_long: + printf ("\tm68k_dreg(regs, %s) = (%s);\n", reg, from); + break; + default: + abort (); + } + break; + case Areg: + switch (size) { + case sz_word: + fprintf (stderr, "Foo\n"); + printf ("\tm68k_areg(regs, %s) = (uae_s32)(uae_s16)(%s);\n", reg, from); + break; + case sz_long: + printf ("\tm68k_areg(regs, %s) = (%s);\n", reg, from); + break; + default: + abort (); + } + break; + case Aind: + case Aipi: + case Apdi: + case Ad16: + case Ad8r: + case absw: + case absl: + case PC16: + case PC8r: + if (using_prefetch) + sync_m68k_pc (); + switch (size) { + case sz_byte: + insn_n_cycles += 2; + printf ("\tput_byte(%sa,%s);\n", to, from); + break; + case sz_word: + insn_n_cycles += 2; + if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) + abort (); + printf ("\tput_word(%sa,%s);\n", to, from); + break; + case sz_long: + insn_n_cycles += 4; + if (cpu_level < 2 && (mode == PC16 || mode == PC8r)) + abort (); + printf ("\tput_long(%sa,%s);\n", to, from); + break; + default: + abort (); + } + break; + case imm: + case imm0: + case imm1: + case imm2: + case immi: + abort (); + break; + default: + abort (); + } +} + +static void genmovemel (uae_u16 opcode) +{ + char getcode[100]; + int size = table68k[opcode].size == sz_long ? 4 : 2; + + if (table68k[opcode].size == sz_long) { + strcpy (getcode, "get_long(srca)"); + } else { + strcpy (getcode, "(uae_s32)(uae_s16)get_word(srca)"); + } + + printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + printf ("\tunsigned int dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + start_brace (); + printf ("\twhile (dmask) { m68k_dreg(regs, movem_index1[dmask]) = %s; srca += %d; dmask = movem_next[dmask]; }\n", + getcode, size); + printf ("\twhile (amask) { m68k_areg(regs, movem_index1[amask]) = %s; srca += %d; amask = movem_next[amask]; }\n", + getcode, size); + + if (table68k[opcode].dmode == Aipi) + printf ("\tm68k_areg(regs, dstreg) = srca;\n"); +} + +static void genmovemle (uae_u16 opcode) +{ + char putcode[100]; + int size = table68k[opcode].size == sz_long ? 4 : 2; + if (table68k[opcode].size == sz_long) { + strcpy (putcode, "put_long(srca,"); + } else { + strcpy (putcode, "put_word(srca,"); + } + + printf ("\tuae_u16 mask = %s;\n", gen_nextiword ()); + genamode (table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2, 1); + if (using_prefetch) + sync_m68k_pc (); + + start_brace (); + if (table68k[opcode].dmode == Apdi) { + printf ("\tuae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;\n"); + printf ("\twhile (amask) { srca -= %d; %s m68k_areg(regs, movem_index2[amask])); amask = movem_next[amask]; }\n", + size, putcode); + printf ("\twhile (dmask) { srca -= %d; %s m68k_dreg(regs, movem_index2[dmask])); dmask = movem_next[dmask]; }\n", + size, putcode); + printf ("\tm68k_areg(regs, dstreg) = srca;\n"); + } else { + printf ("\tuae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;\n"); + printf ("\twhile (dmask) { %s m68k_dreg(regs, movem_index1[dmask])); srca += %d; dmask = movem_next[dmask]; }\n", + putcode, size); + printf ("\twhile (amask) { %s m68k_areg(regs, movem_index1[amask])); srca += %d; amask = movem_next[amask]; }\n", + putcode, size); + } +} + +static void duplicate_carry (void) +{ + printf ("\tCOPY_CARRY;\n"); +} + +typedef enum { + flag_logical_noclobber, flag_logical, flag_add, flag_sub, flag_cmp, flag_addx, flag_subx, flag_z, flag_zn, + flag_av, flag_sv +} flagtypes; + +static void genflags_normal (flagtypes type, wordsizes size, char *value, char *src, char *dst) +{ + char vstr[100], sstr[100], dstr[100]; + char usstr[100], udstr[100]; + char unsstr[100], undstr[100]; + + switch (size) { + case sz_byte: + strcpy (vstr, "((uae_s8)("); + strcpy (usstr, "((uae_u8)("); + break; + case sz_word: + strcpy (vstr, "((uae_s16)("); + strcpy (usstr, "((uae_u16)("); + break; + case sz_long: + strcpy (vstr, "((uae_s32)("); + strcpy (usstr, "((uae_u32)("); + break; + default: + abort (); + } + strcpy (unsstr, usstr); + + strcpy (sstr, vstr); + strcpy (dstr, vstr); + strcat (vstr, value); + strcat (vstr, "))"); + strcat (dstr, dst); + strcat (dstr, "))"); + strcat (sstr, src); + strcat (sstr, "))"); + + strcpy (udstr, usstr); + strcat (udstr, dst); + strcat (udstr, "))"); + strcat (usstr, src); + strcat (usstr, "))"); + + strcpy (undstr, unsstr); + strcat (unsstr, "-"); + strcat (undstr, "~"); + strcat (undstr, dst); + strcat (undstr, "))"); + strcat (unsstr, src); + strcat (unsstr, "))"); + + switch (type) { + case flag_logical_noclobber: + case flag_logical: + case flag_z: + case flag_zn: + case flag_av: + case flag_sv: + case flag_addx: + case flag_subx: + break; + + case flag_add: + start_brace (); + printf ("uae_u32 %s = %s + %s;\n", value, dstr, sstr); + break; + case flag_sub: + case flag_cmp: + start_brace (); + printf ("uae_u32 %s = %s - %s;\n", value, dstr, sstr); + break; + } + + switch (type) { + case flag_logical_noclobber: + case flag_logical: + case flag_z: + case flag_zn: + break; + + case flag_add: + case flag_sub: + case flag_addx: + case flag_subx: + case flag_cmp: + case flag_av: + case flag_sv: + start_brace (); + printf ("\t" BOOL_TYPE " flgs = %s < 0;\n", sstr); + printf ("\t" BOOL_TYPE " flgo = %s < 0;\n", dstr); + printf ("\t" BOOL_TYPE " flgn = %s < 0;\n", vstr); + break; + } + + switch (type) { + case flag_logical: + printf ("\tCLEAR_CZNV;\n"); + printf ("\tSET_ZFLG (%s == 0);\n", vstr); + printf ("\tSET_NFLG (%s < 0);\n", vstr); + break; + case flag_logical_noclobber: + printf ("\tSET_ZFLG (%s == 0);\n", vstr); + printf ("\tSET_NFLG (%s < 0);\n", vstr); + break; + case flag_av: + printf ("\tSET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));\n"); + break; + case flag_sv: + printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); + break; + case flag_z: + printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); + break; + case flag_zn: + printf ("\tSET_ZFLG (GET_ZFLG & (%s == 0));\n", vstr); + printf ("\tSET_NFLG (%s < 0);\n", vstr); + break; + case flag_add: + printf ("\tSET_ZFLG (%s == 0);\n", vstr); + printf ("\tSET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));\n"); + printf ("\tSET_CFLG (%s < %s);\n", undstr, usstr); + duplicate_carry (); + printf ("\tSET_NFLG (flgn != 0);\n"); + break; + case flag_sub: + printf ("\tSET_ZFLG (%s == 0);\n", vstr); + printf ("\tSET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));\n"); + printf ("\tSET_CFLG (%s > %s);\n", usstr, udstr); + duplicate_carry (); + printf ("\tSET_NFLG (flgn != 0);\n"); + break; + case flag_addx: + printf ("\tSET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));\n"); /* minterm SON: 0x42 */ + printf ("\tSET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));\n"); /* minterm SON: 0xD4 */ + duplicate_carry (); + break; + case flag_subx: + printf ("\tSET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));\n"); /* minterm SON: 0x24 */ + printf ("\tSET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));\n"); /* minterm SON: 0xB2 */ + duplicate_carry (); + break; + case flag_cmp: + printf ("\tSET_ZFLG (%s == 0);\n", vstr); + printf ("\tSET_VFLG ((flgs != flgo) && (flgn != flgo));\n"); + printf ("\tSET_CFLG (%s > %s);\n", usstr, udstr); + printf ("\tSET_NFLG (flgn != 0);\n"); + break; + } +} + +static void genflags (flagtypes type, wordsizes size, char *value, char *src, char *dst) +{ + /* Temporarily deleted 68k/ARM flag optimizations. I'd prefer to have + them in the appropriate m68k.h files and use just one copy of this + code here. The API can be changed if necessary. */ +#ifdef OPTIMIZED_FLAGS + switch (type) { + case flag_add: + case flag_sub: + start_brace (); + printf ("\tuae_u32 %s;\n", value); + break; + default: + break; + } + + /* At least some of those casts are fairly important! */ + switch (type) { + case flag_logical_noclobber: + printf ("\t{uae_u32 oldcznv = GET_CZNV & ~(FLAGVAL_Z | FLAGVAL_N);\n"); + if (strcmp (value, "0") == 0) { + printf ("\tSET_CZNV (olcznv | FLAGVAL_Z);\n"); + } else { + switch (size) { + case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; + } + printf ("\tIOR_CZNV (oldcznv);\n"); + } + printf ("\t}\n"); + return; + + case flag_logical: + if (strcmp (value, "0") == 0) { + printf ("\tSET_CZNV (FLAGVAL_Z);\n"); + } else { + switch (size) { + case sz_byte: printf ("\toptflag_testb ((uae_s8)(%s));\n", value); break; + case sz_word: printf ("\toptflag_testw ((uae_s16)(%s));\n", value); break; + case sz_long: printf ("\toptflag_testl ((uae_s32)(%s));\n", value); break; + } + } + return; + + case flag_add: + switch (size) { + case sz_byte: printf ("\toptflag_addb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\toptflag_addw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\toptflag_addl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + } + return; + + case flag_sub: + switch (size) { + case sz_byte: printf ("\toptflag_subb (%s, (uae_s8)(%s), (uae_s8)(%s));\n", value, src, dst); break; + case sz_word: printf ("\toptflag_subw (%s, (uae_s16)(%s), (uae_s16)(%s));\n", value, src, dst); break; + case sz_long: printf ("\toptflag_subl (%s, (uae_s32)(%s), (uae_s32)(%s));\n", value, src, dst); break; + } + return; + + case flag_cmp: + switch (size) { + case sz_byte: printf ("\toptflag_cmpb ((uae_s8)(%s), (uae_s8)(%s));\n", src, dst); break; + case sz_word: printf ("\toptflag_cmpw ((uae_s16)(%s), (uae_s16)(%s));\n", src, dst); break; + case sz_long: printf ("\toptflag_cmpl ((uae_s32)(%s), (uae_s32)(%s));\n", src, dst); break; + } + return; + + default: + break; + } +#endif + genflags_normal (type, size, value, src, dst); +} + +static void force_range_for_rox (const char *var, wordsizes size) +{ + /* Could do a modulo operation here... which one is faster? */ + switch (size) { + case sz_long: + printf ("\tif (%s >= 33) %s -= 33;\n", var, var); + break; + case sz_word: + printf ("\tif (%s >= 34) %s -= 34;\n", var, var); + printf ("\tif (%s >= 17) %s -= 17;\n", var, var); + break; + case sz_byte: + printf ("\tif (%s >= 36) %s -= 36;\n", var, var); + printf ("\tif (%s >= 18) %s -= 18;\n", var, var); + printf ("\tif (%s >= 9) %s -= 9;\n", var, var); + break; + } +} + +static const char *cmask (wordsizes size) +{ + switch (size) { + case sz_byte: return "0x80"; + case sz_word: return "0x8000"; + case sz_long: return "0x80000000"; + default: abort (); + } +} + +static int source_is_imm1_8 (struct instr *i) +{ + return i->stype == 3; +} + +static void gen_opcode (unsigned long int opcode) +{ + struct instr *curi = table68k + opcode; + insn_n_cycles = 2; + + start_brace (); +#if 0 + printf ("uae_u8 *m68k_pc = regs.pc_p;\n"); +#endif + m68k_pc_offset = 2; + switch (curi->plev) { + case 0: /* not privileged */ + break; + case 1: /* unprivileged only on 68000 */ + if (cpu_level == 0) + break; + if (next_cpu_level < 0) + next_cpu_level = 0; + + /* fall through */ + case 2: /* priviledged */ + printf ("if (!regs.s) { Exception(8,0); goto %s; }\n", endlabelstr); + need_endlabel = 1; + start_brace (); + break; + case 3: /* privileged if size == word */ + if (curi->size == sz_byte) + break; + printf ("if (!regs.s) { Exception(8,0); goto %s; }\n", endlabelstr); + need_endlabel = 1; + start_brace (); + break; + } + switch (curi->mnemo) { + case i_OR: + case i_AND: + case i_EOR: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + printf ("\tsrc %c= dst;\n", curi->mnemo == i_OR ? '|' : curi->mnemo == i_AND ? '&' : '^'); + genflags (flag_logical, curi->size, "src", "", ""); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ORSR: + case i_EORSR: + printf ("\tMakeSR();\n"); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + if (curi->size == sz_byte) { + printf ("\tsrc &= 0xFF;\n"); + } + printf ("\tregs.sr %c= src;\n", curi->mnemo == i_EORSR ? '^' : '|'); + printf ("\tMakeFromSR();\n"); + break; + case i_ANDSR: + printf ("\tMakeSR();\n"); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + if (curi->size == sz_byte) { + printf ("\tsrc |= 0xFF00;\n"); + } + printf ("\tregs.sr &= src;\n"); + printf ("\tMakeFromSR();\n"); + break; + case i_SUB: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + genflags (flag_sub, curi->size, "newv", "src", "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_SUBA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = dst - src;\n"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_SUBX: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = dst - src - (GET_XFLG ? 1 : 0);\n"); + genflags (flag_subx, curi->size, "newv", "src", "dst"); + genflags (flag_zn, curi->size, "newv", "", ""); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_SBCD: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + printf ("\tuae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);\n"); + printf ("\tuae_u16 newv, tmp_newv;\n"); + printf ("\tint bcd = 0;\n"); + printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); + printf ("\tif (newv_lo & 0xF0) { newv -= 6; bcd = 6; };\n"); + printf ("\tif ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }\n"); + printf ("\tSET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG ? 1 : 0)) & 0x300) > 0xFF);\n"); + duplicate_carry (); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } + else { + genflags (flag_zn, curi->size, "newv", "", ""); + printf ("\tSET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);\n"); + } + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ADD: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + genflags (flag_add, curi->size, "newv", "src", "dst"); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ADDA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = dst + src;\n"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_ADDX: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = dst + src + (GET_XFLG ? 1 : 0);\n"); + genflags (flag_addx, curi->size, "newv", "src", "dst"); + genflags (flag_zn, curi->size, "newv", "", ""); + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_ABCD: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + printf ("\tuae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);\n"); + printf ("\tuae_u16 newv, tmp_newv;\n"); + printf ("\tint cflg;\n"); + printf ("\tnewv = tmp_newv = newv_hi + newv_lo;\n"); + printf ("\tif (newv_lo > 9) { newv += 6; }\n"); + printf ("\tcflg = (newv & 0x3F0) > 0x90;\n"); + printf ("\tif (cflg) newv += 0x60;\n"); + printf ("\tSET_CFLG (cflg);\n"); + duplicate_carry (); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } + else { + genflags (flag_zn, curi->size, "newv", "", ""); + printf ("\tSET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);\n"); + } + genastore ("newv", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_NEG: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + genflags (flag_sub, curi->size, "dst", "src", "0"); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + case i_NEGX: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = 0 - src - (GET_XFLG ? 1 : 0);\n"); + genflags (flag_subx, curi->size, "newv", "src", "0"); + genflags (flag_zn, curi->size, "newv", "", ""); + genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + break; + case i_NBCD: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + printf ("\tuae_u16 newv_lo = - (src & 0xF) - (GET_XFLG ? 1 : 0);\n"); + printf ("\tuae_u16 newv_hi = - (src & 0xF0);\n"); + printf ("\tuae_u16 newv;\n"); + printf ("\tint cflg;\n"); + printf ("\tif (newv_lo > 9) { newv_lo -= 6; }\n"); + printf ("\tnewv = newv_hi + newv_lo;\n"); + printf ("\tcflg = (newv & 0x1F0) > 0x90;\n"); + printf ("\tif (cflg) newv -= 0x60;\n"); + printf ("\tSET_CFLG (cflg);\n"); + duplicate_carry(); + /* Manual says bits NV are undefined though a real 68040 don't change them */ + if (cpu_level >= xBCD_KEEPS_NV_FLAGS) { + if (next_cpu_level < xBCD_KEEPS_NV_FLAGS) + next_cpu_level = xBCD_KEEPS_NV_FLAGS - 1; + genflags (flag_z, curi->size, "newv", "", ""); + } + else { + genflags (flag_zn, curi->size, "newv", "", ""); + } + genastore ("newv", curi->smode, "srcreg", curi->size, "src"); + break; + case i_CLR: + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genflags (flag_logical, curi->size, "0", "", ""); + genastore ("0", curi->smode, "srcreg", curi->size, "src"); + break; + case i_NOT: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + printf ("\tuae_u32 dst = ~src;\n"); + genflags (flag_logical, curi->size, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + break; + case i_TST: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genflags (flag_logical, curi->size, "src", "", ""); + break; + case i_BTST: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + if (curi->size == sz_byte) + printf ("\tsrc &= 7;\n"); + else + printf ("\tsrc &= 31;\n"); + printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); + break; + case i_BCHG: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + if (curi->size == sz_byte) + printf ("\tsrc &= 7;\n"); + else + printf ("\tsrc &= 31;\n"); + printf ("\tdst ^= (1 << src);\n"); + printf ("\tSET_ZFLG (((uae_u32)dst & (1 << src)) >> src);\n"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_BCLR: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + if (curi->size == sz_byte) + printf ("\tsrc &= 7;\n"); + else + printf ("\tsrc &= 31;\n"); + printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); + printf ("\tdst &= ~(1 << src);\n"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_BSET: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + if (curi->size == sz_byte) + printf ("\tsrc &= 7;\n"); + else + printf ("\tsrc &= 31;\n"); + printf ("\tSET_ZFLG (1 ^ ((dst >> src) & 1));\n"); + printf ("\tdst |= (1 << src);\n"); + genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_CMPM: + case i_CMP: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + genflags (flag_cmp, curi->size, "newv", "src", "dst"); + break; + case i_CMPA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + start_brace (); + genflags (flag_cmp, sz_long, "newv", "src", "dst"); + break; + /* The next two are coded a little unconventional, but they are doing + * weird things... */ + case i_MVPRM: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + + printf ("\tuaecptr memp = m68k_areg(regs, dstreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); + if (curi->size == sz_word) { + printf ("\tput_byte(memp, src >> 8); put_byte(memp + 2, src);\n"); + } else { + printf ("\tput_byte(memp, src >> 24); put_byte(memp + 2, src >> 16);\n"); + printf ("\tput_byte(memp + 4, src >> 8); put_byte(memp + 6, src);\n"); + } + break; + case i_MVPMR: + printf ("\tuaecptr memp = m68k_areg(regs, srcreg) + (uae_s32)(uae_s16)%s;\n", gen_nextiword ()); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + if (curi->size == sz_word) { + printf ("\tuae_u16 val = (get_byte(memp) << 8) + get_byte(memp + 2);\n"); + } else { + printf ("\tuae_u32 val = (get_byte(memp) << 24) + (get_byte(memp + 2) << 16)\n"); + printf (" + (get_byte(memp + 4) << 8) + get_byte(memp + 6);\n"); + } + genastore ("val", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_MOVE: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genflags (flag_logical, curi->size, "src", "", ""); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_MOVEA: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + if (curi->size == sz_word) { + printf ("\tuae_u32 val = (uae_s32)(uae_s16)src;\n"); + } else { + printf ("\tuae_u32 val = src;\n"); + } + genastore ("val", curi->dmode, "dstreg", sz_long, "dst"); + break; + case i_MVSR2: + genamode (curi->smode, "srcreg", sz_word, "src", 2, 0); + printf ("\tMakeSR();\n"); + if (curi->size == sz_byte) + genastore ("regs.sr & 0xff", curi->smode, "srcreg", sz_word, "src"); + else + genastore ("regs.sr", curi->smode, "srcreg", sz_word, "src"); + break; + case i_MV2SR: + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + if (curi->size == sz_byte) + printf ("\tMakeSR();\n\tregs.sr &= 0xFF00;\n\tregs.sr |= src & 0xFF;\n"); + else { + printf ("\tregs.sr = src;\n"); + } + printf ("\tMakeFromSR();\n"); + break; + case i_SWAP: + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + start_brace (); + printf ("\tuae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16);\n"); + genflags (flag_logical, sz_long, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", sz_long, "src"); + break; + case i_EXG: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + genastore ("dst", curi->smode, "srcreg", curi->size, "src"); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_EXT: + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 dst = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tuae_u16 dst = (uae_s16)(uae_s8)src;\n"); break; + case sz_long: printf ("\tuae_u32 dst = (uae_s32)(uae_s16)src;\n"); break; + default: abort (); + } + genflags (flag_logical, + curi->size == sz_word ? sz_word : sz_long, "dst", "", ""); + genastore ("dst", curi->smode, "srcreg", + curi->size == sz_word ? sz_word : sz_long, "src"); + break; + case i_MVMEL: + genmovemel ((uae_u16)opcode); + break; + case i_MVMLE: + genmovemle ((uae_u16)opcode); + break; + case i_TRAP: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + sync_m68k_pc (); + printf ("\tException(src+32,0);\n"); + m68k_pc_offset = 0; + break; + case i_MVR2USP: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tregs.usp = src;\n"); + break; + case i_MVUSP2R: + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + genastore ("regs.usp", curi->smode, "srcreg", curi->size, "src"); + break; + case i_RESET: + break; + case i_NOP: + break; + case i_STOP: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tregs.sr = src;\n"); + printf ("\tMakeFromSR();\n"); + printf ("\tm68k_setstopped(1);\n"); + break; + case i_RTE: + if (cpu_level == 0) { + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); + printf ("\tregs.sr = sr; m68k_setpc_rte(pc);\n"); + fill_prefetch_0 (); + printf ("\tMakeFromSR();\n"); + } else { + int old_brace_level = n_braces; + if (next_cpu_level < 0) + next_cpu_level = 0; + printf ("\tuae_u16 newsr; uae_u32 newpc; for (;;) {\n"); + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (Aipi, "7", sz_word, "format", 1, 0); + printf ("\tnewsr = sr; newpc = pc;\n"); + printf ("\tif ((format & 0xF000) == 0x0000) { break; }\n"); + printf ("\telse if ((format & 0xF000) == 0x1000) { ; }\n"); + printf ("\telse if ((format & 0xF000) == 0x2000) { m68k_areg(regs, 7) += 4; break; }\n"); + /* gb-- the next two lines are deleted in Bernie's gencpu.c */ + printf ("\telse if ((format & 0xF000) == 0x3000) { m68k_areg(regs, 7) += 4; break; }\n"); + printf ("\telse if ((format & 0xF000) == 0x7000) { m68k_areg(regs, 7) += 52; break; }\n"); + printf ("\telse if ((format & 0xF000) == 0x8000) { m68k_areg(regs, 7) += 50; break; }\n"); + printf ("\telse if ((format & 0xF000) == 0x9000) { m68k_areg(regs, 7) += 12; break; }\n"); + printf ("\telse if ((format & 0xF000) == 0xa000) { m68k_areg(regs, 7) += 24; break; }\n"); + printf ("\telse if ((format & 0xF000) == 0xb000) { m68k_areg(regs, 7) += 84; break; }\n"); + printf ("\telse { Exception(14,0); goto %s; }\n", endlabelstr); + printf ("\tregs.sr = newsr; MakeFromSR();\n}\n"); + pop_braces (old_brace_level); + printf ("\tregs.sr = newsr; MakeFromSR();\n"); + printf ("\tm68k_setpc_rte(newpc);\n"); + fill_prefetch_0 (); + need_endlabel = 1; + } + /* PC is set and prefetch filled. */ + m68k_pc_offset = 0; + break; + case i_RTD: + genamode (Aipi, "7", sz_long, "pc", 1, 0); + genamode (curi->smode, "srcreg", curi->size, "offs", 1, 0); + printf ("\tm68k_areg(regs, 7) += offs;\n"); + printf ("\tm68k_setpc_rte(pc);\n"); + fill_prefetch_0 (); + /* PC is set and prefetch filled. */ + m68k_pc_offset = 0; + break; + case i_LINK: + genamode (Apdi, "7", sz_long, "old", 2, 0); + genamode (curi->smode, "srcreg", sz_long, "src", 1, 0); + genastore ("src", Apdi, "7", sz_long, "old"); + genastore ("m68k_areg(regs, 7)", curi->smode, "srcreg", sz_long, "src"); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + printf ("\tm68k_areg(regs, 7) += offs;\n"); + break; + case i_UNLK: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tm68k_areg(regs, 7) = src;\n"); + genamode (Aipi, "7", sz_long, "old", 1, 0); + genastore ("old", curi->smode, "srcreg", curi->size, "src"); + break; + case i_RTS: + printf ("\tm68k_do_rts();\n"); + fill_prefetch_0 (); + m68k_pc_offset = 0; + break; + case i_TRAPV: + sync_m68k_pc (); + printf ("\tif (GET_VFLG) { Exception(7,m68k_getpc()); goto %s; }\n", endlabelstr); + need_endlabel = 1; + break; + case i_RTR: + printf ("\tMakeSR();\n"); + genamode (Aipi, "7", sz_word, "sr", 1, 0); + genamode (Aipi, "7", sz_long, "pc", 1, 0); + printf ("\tregs.sr &= 0xFF00; sr &= 0xFF;\n"); + printf ("\tregs.sr |= sr; m68k_setpc(pc);\n"); + fill_prefetch_0 (); + printf ("\tMakeFromSR();\n"); + m68k_pc_offset = 0; + break; + case i_JSR: + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + printf ("\tm68k_do_jsr(m68k_getpc() + %d, srca);\n", m68k_pc_offset); + fill_prefetch_0 (); + m68k_pc_offset = 0; + break; + case i_JMP: + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + printf ("\tm68k_setpc(srca);\n"); + fill_prefetch_0 (); + m68k_pc_offset = 0; + break; + case i_BSR: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tuae_s32 s = (uae_s32)src + 2;\n"); + if (using_exception_3) { + printf ("\tif (src & 1) {\n"); + printf ("\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); + printf ("\t\tlast_fault_for_exception_3 = m68k_getpc() + s;\n"); + printf ("\t\tlast_op_for_exception_3 = opcode; Exception(3,0); goto %s;\n", endlabelstr); + printf ("\t}\n"); + need_endlabel = 1; + } + printf ("\tm68k_do_bsr(m68k_getpc() + %d, s);\n", m68k_pc_offset); + fill_prefetch_0 (); + m68k_pc_offset = 0; + break; + case i_Bcc: + if (0 && !using_prefetch && !using_exception_3 && (cpu_level >= 2)) { + /* gb-- variant probably more favorable to compiler optimizations + also assumes no prefetch buffer is used + Hmm, that would make sense with processors capable of conditional moves */ + if (curi->size == sz_long && next_cpu_level < 1) + next_cpu_level = 1; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tm68k_incpc (cctrue(%d) ? ((uae_s32)src + 2) : %d);\n", curi->cc, m68k_pc_offset); + m68k_pc_offset = 0; + } + else { + /* original code for branch instructions */ + if (curi->size == sz_long) { + if (cpu_level < 2) { + printf ("\tm68k_incpc(2);\n"); + printf ("\tif (!cctrue(%d)) goto %s;\n", curi->cc, endlabelstr); + printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); + printf ("\t\tlast_fault_for_exception_3 = m68k_getpc() + 1;\n"); + printf ("\t\tlast_op_for_exception_3 = opcode; Exception(3,0); goto %s;\n", endlabelstr); + need_endlabel = 1; + } else { + if (next_cpu_level < 1) + next_cpu_level = 1; + } + } + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + printf ("\tif (!cctrue(%d)) goto didnt_jump;\n", curi->cc); + if (using_exception_3) { + printf ("\tif (src & 1) {\n"); + printf ("\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); + printf ("\t\tlast_fault_for_exception_3 = m68k_getpc() + 2 + (uae_s32)src;\n"); + printf ("\t\tlast_op_for_exception_3 = opcode; Exception(3,0); goto %s;\n", endlabelstr); + printf ("\t}\n"); + need_endlabel = 1; + } + printf ("\tm68k_incpc ((uae_s32)src + 2);\n"); + fill_prefetch_0 (); + printf ("return;\n"); + printf ("didnt_jump:;\n"); + need_endlabel = 1; + } + break; + case i_LEA: + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("srca", curi->dmode, "dstreg", curi->size, "dst"); + break; + case i_PEA: + genamode (curi->smode, "srcreg", curi->size, "src", 0, 0); + genamode (Apdi, "7", sz_long, "dst", 2, 0); + genastore ("srca", Apdi, "7", sz_long, "dst"); + break; + case i_DBcc: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "offs", 1, 0); + + printf ("\tif (!cctrue(%d)) {\n", curi->cc); + genastore ("(src-1)", curi->smode, "srcreg", curi->size, "src"); + + printf ("\t\tif (src) {\n"); + if (using_exception_3) { + printf ("\t\t\tif (offs & 1) {\n"); + printf ("\t\t\tlast_addr_for_exception_3 = m68k_getpc() + 2;\n"); + printf ("\t\t\tlast_fault_for_exception_3 = m68k_getpc() + 2 + (uae_s32)offs + 2;\n"); + printf ("\t\t\tlast_op_for_exception_3 = opcode; Exception(3,0); goto %s;\n", endlabelstr); + printf ("\t\t}\n"); + need_endlabel = 1; + } + printf ("\t\t\tm68k_incpc((uae_s32)offs + 2);\n"); + fill_prefetch_0 (); + printf ("return;\n"); + printf ("\t\t}\n"); + printf ("\t}\n"); + need_endlabel = 1; + break; + case i_Scc: + genamode (curi->smode, "srcreg", curi->size, "src", 2, 0); + start_brace (); + printf ("\tint val = cctrue(%d) ? 0xff : 0;\n", curi->cc); + genastore ("val", curi->smode, "srcreg", curi->size, "src"); + break; + case i_DIVU: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + sync_m68k_pc (); + /* Clear V flag when dividing by zero - Alcatraz Odyssey demo depends + * on this (actually, it's doing a DIVS). */ + printf ("\tif (src == 0) { SET_VFLG (0); Exception (5, oldpc); goto %s; } else {\n", endlabelstr); + printf ("\tuae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;\n"); + printf ("\tuae_u32 rem = (uae_u32)dst %% (uae_u32)(uae_u16)src;\n"); + /* The N flag appears to be set each time there is an overflow. + * Weird. */ + printf ("\tif (newv > 0xffff) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); + genflags (flag_logical, sz_word, "newv", "", ""); + printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + printf ("\t}\n"); + printf ("\t}\n"); + insn_n_cycles += 68; + need_endlabel = 1; + break; + case i_DIVS: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 1, 0); + sync_m68k_pc (); + printf ("\tif (src == 0) { SET_VFLG (0); Exception(5,oldpc); goto %s; } else {\n", endlabelstr); + printf ("\tuae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;\n"); + printf ("\tuae_u16 rem = (uae_s32)dst %% (uae_s32)(uae_s16)src;\n"); + printf ("\tif ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) { SET_VFLG (1); SET_NFLG (1); SET_CFLG (0); } else\n\t{\n"); + printf ("\tif (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;\n"); + genflags (flag_logical, sz_word, "newv", "", ""); + printf ("\tnewv = (newv & 0xffff) | ((uae_u32)rem << 16);\n"); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + printf ("\t}\n"); + printf ("\t}\n"); + insn_n_cycles += 72; + need_endlabel = 1; + break; + case i_MULU: + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;\n"); + genflags (flag_logical, sz_long, "newv", "", ""); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + insn_n_cycles += 32; + break; + case i_MULS: + genamode (curi->smode, "srcreg", sz_word, "src", 1, 0); + genamode (curi->dmode, "dstreg", sz_word, "dst", 1, 0); + start_brace (); + printf ("\tuae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;\n"); + genflags (flag_logical, sz_long, "newv", "", ""); + genastore ("newv", curi->dmode, "dstreg", sz_long, "dst"); + insn_n_cycles += 32; + break; + case i_CHK: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + printf ("\tif ((uae_s32)dst < 0) { SET_NFLG (1); Exception(6,oldpc); goto %s; }\n", endlabelstr); + printf ("\telse if (dst > src) { SET_NFLG (0); Exception(6,oldpc); goto %s; }\n", endlabelstr); + need_endlabel = 1; + break; + + case i_CHK2: + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + printf ("\t{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];\n"); + switch (curi->size) { + case sz_byte: + printf ("\tlower=(uae_s32)(uae_s8)get_byte(dsta); upper = (uae_s32)(uae_s8)get_byte(dsta+1);\n"); + printf ("\tif ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;\n"); + break; + case sz_word: + printf ("\tlower=(uae_s32)(uae_s16)get_word(dsta); upper = (uae_s32)(uae_s16)get_word(dsta+2);\n"); + printf ("\tif ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;\n"); + break; + case sz_long: + printf ("\tlower=get_long(dsta); upper = get_long(dsta+4);\n"); + break; + default: + abort (); + } + printf ("\tSET_ZFLG (upper == reg || lower == reg);\n"); + printf ("\tSET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);\n"); + printf ("\tif ((extra & 0x800) && GET_CFLG) { Exception(6,oldpc); goto %s; }\n}\n", endlabelstr); + need_endlabel = 1; + break; + + case i_ASR: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 sign = (%s & val) >> %d;\n", cmask (curi->size), bit_size (curi->size) - 1); + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); + printf ("\t\tval = %s & (uae_u32)-(uae_s32)sign;\n", bit_mask (curi->size)); + printf ("\t\tSET_CFLG (sign);\n"); + duplicate_carry (); + if (source_is_imm1_8 (curi)) + printf ("\t} else {\n"); + else + printf ("\t} else if (cnt > 0) {\n"); + printf ("\t\tval >>= cnt - 1;\n"); + printf ("\t\tSET_CFLG (val & 1);\n"); + duplicate_carry (); + printf ("\t\tval >>= 1;\n"); + printf ("\t\tval |= (%s << (%d - cnt)) & (uae_u32)-(uae_s32)sign;\n", + bit_mask (curi->size), + bit_size (curi->size)); + printf ("\t\tval &= %s;\n", bit_mask (curi->size)); + printf ("\t}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ASL: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); + printf ("\t\tSET_VFLG (val != 0);\n"); + printf ("\t\tSET_CFLG (cnt == %d ? val & 1 : 0);\n", + bit_size (curi->size)); + duplicate_carry (); + printf ("\t\tval = 0;\n"); + if (source_is_imm1_8 (curi)) + printf ("\t} else {\n"); + else + printf ("\t} else if (cnt > 0) {\n"); + printf ("\t\tuae_u32 mask = (%s << (%d - cnt)) & %s;\n", + bit_mask (curi->size), + bit_size (curi->size) - 1, + bit_mask (curi->size)); + printf ("\t\tSET_VFLG ((val & mask) != mask && (val & mask) != 0);\n"); + printf ("\t\tval <<= cnt - 1;\n"); + printf ("\t\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); + duplicate_carry (); + printf ("\t\tval <<= 1;\n"); + printf ("\t\tval &= %s;\n", bit_mask (curi->size)); + printf ("\t}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_LSR: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); + printf ("\t\tSET_CFLG ((cnt == %d) & (val >> %d));\n", + bit_size (curi->size), bit_size (curi->size) - 1); + duplicate_carry (); + printf ("\t\tval = 0;\n"); + if (source_is_imm1_8 (curi)) + printf ("\t} else {\n"); + else + printf ("\t} else if (cnt > 0) {\n"); + printf ("\t\tval >>= cnt - 1;\n"); + printf ("\t\tSET_CFLG (val & 1);\n"); + duplicate_carry (); + printf ("\t\tval >>= 1;\n"); + printf ("\t}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_LSL: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + printf ("\tif (cnt >= %d) {\n", bit_size (curi->size)); + printf ("\t\tSET_CFLG (cnt == %d ? val & 1 : 0);\n", + bit_size (curi->size)); + duplicate_carry (); + printf ("\t\tval = 0;\n"); + if (source_is_imm1_8 (curi)) + printf ("\t} else {\n"); + else + printf ("\t} else if (cnt > 0) {\n"); + printf ("\t\tval <<= (cnt - 1);\n"); + printf ("\t\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); + duplicate_carry (); + printf ("\t\tval <<= 1;\n"); + printf ("\tval &= %s;\n", bit_mask (curi->size)); + printf ("\t}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ROL: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + if (source_is_imm1_8 (curi)) + printf ("{"); + else + printf ("\tif (cnt > 0) {\n"); + printf ("\tuae_u32 loval;\n"); + printf ("\tcnt &= %d;\n", bit_size (curi->size) - 1); + printf ("\tloval = val >> (%d - cnt);\n", bit_size (curi->size)); + printf ("\tval <<= cnt;\n"); + printf ("\tval |= loval;\n"); + printf ("\tval &= %s;\n", bit_mask (curi->size)); + printf ("\tSET_CFLG (val & 1);\n"); + printf ("}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ROR: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + if (source_is_imm1_8 (curi)) + printf ("{"); + else + printf ("\tif (cnt > 0) {"); + printf ("\tuae_u32 hival;\n"); + printf ("\tcnt &= %d;\n", bit_size (curi->size) - 1); + printf ("\thival = val << (%d - cnt);\n", bit_size (curi->size)); + printf ("\tval >>= cnt;\n"); + printf ("\tval |= hival;\n"); + printf ("\tval &= %s;\n", bit_mask (curi->size)); + printf ("\tSET_CFLG ((val & %s) >> %d);\n", cmask (curi->size), bit_size (curi->size) - 1); + printf ("\t}\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ROXL: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + if (source_is_imm1_8 (curi)) + printf ("{"); + else { + force_range_for_rox ("cnt", curi->size); + printf ("\tif (cnt > 0) {\n"); + } + printf ("\tcnt--;\n"); + printf ("\t{\n\tuae_u32 carry;\n"); + printf ("\tuae_u32 loval = val >> (%d - cnt);\n", bit_size (curi->size) - 1); + printf ("\tcarry = loval & 1;\n"); + printf ("\tval = (((val << 1) | GET_XFLG) << cnt) | (loval >> 1);\n"); + printf ("\tSET_XFLG (carry);\n"); + printf ("\tval &= %s;\n", bit_mask (curi->size)); + printf ("\t} }\n"); + printf ("\tSET_CFLG (GET_XFLG);\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ROXR: + genamode (curi->smode, "srcreg", curi->size, "cnt", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tcnt &= 63;\n"); + printf ("\tCLEAR_CZNV;\n"); + if (source_is_imm1_8 (curi)) + printf ("{"); + else { + force_range_for_rox ("cnt", curi->size); + printf ("\tif (cnt > 0) {\n"); + } + printf ("\tcnt--;\n"); + printf ("\t{\n\tuae_u32 carry;\n"); + printf ("\tuae_u32 hival = (val << 1) | GET_XFLG;\n"); + printf ("\thival <<= (%d - cnt);\n", bit_size (curi->size) - 1); + printf ("\tval >>= cnt;\n"); + printf ("\tcarry = val & 1;\n"); + printf ("\tval >>= 1;\n"); + printf ("\tval |= hival;\n"); + printf ("\tSET_XFLG (carry);\n"); + printf ("\tval &= %s;\n", bit_mask (curi->size)); + printf ("\t} }\n"); + printf ("\tSET_CFLG (GET_XFLG);\n"); + genflags (flag_logical_noclobber, curi->size, "val", "", ""); + genastore ("val", curi->dmode, "dstreg", curi->size, "data"); + break; + case i_ASRW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 sign = %s & val;\n", cmask (curi->size)); + printf ("\tuae_u32 cflg = val & 1;\n"); + printf ("\tval = (val >> 1) | sign;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("\tSET_CFLG (cflg);\n"); + duplicate_carry (); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_ASLW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 sign = %s & val;\n", cmask (curi->size)); + printf ("\tuae_u32 sign2;\n"); + printf ("\tval <<= 1;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("\tsign2 = %s & val;\n", cmask (curi->size)); + printf ("\tSET_CFLG (sign != 0);\n"); + duplicate_carry (); + + printf ("\tSET_VFLG (GET_VFLG | (sign2 != sign));\n"); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_LSRW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u32 val = (uae_u8)data;\n"); break; + case sz_word: printf ("\tuae_u32 val = (uae_u16)data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & 1;\n"); + printf ("\tval >>= 1;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry);\n"); + duplicate_carry (); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_LSLW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u8 val = data;\n"); break; + case sz_word: printf ("\tuae_u16 val = data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & %s;\n", cmask (curi->size)); + printf ("\tval <<= 1;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); + duplicate_carry (); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_ROLW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u8 val = data;\n"); break; + case sz_word: printf ("\tuae_u16 val = data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & %s;\n", cmask (curi->size)); + printf ("\tval <<= 1;\n"); + printf ("\tif (carry) val |= 1;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_RORW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u8 val = data;\n"); break; + case sz_word: printf ("\tuae_u16 val = data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & 1;\n"); + printf ("\tval >>= 1;\n"); + printf ("\tif (carry) val |= %s;\n", cmask (curi->size)); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry);\n"); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_ROXLW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u8 val = data;\n"); break; + case sz_word: printf ("\tuae_u16 val = data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & %s;\n", cmask (curi->size)); + printf ("\tval <<= 1;\n"); + printf ("\tif (GET_XFLG) val |= 1;\n"); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry >> %d);\n", bit_size (curi->size) - 1); + duplicate_carry (); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_ROXRW: + genamode (curi->smode, "srcreg", curi->size, "data", 1, 0); + start_brace (); + switch (curi->size) { + case sz_byte: printf ("\tuae_u8 val = data;\n"); break; + case sz_word: printf ("\tuae_u16 val = data;\n"); break; + case sz_long: printf ("\tuae_u32 val = data;\n"); break; + default: abort (); + } + printf ("\tuae_u32 carry = val & 1;\n"); + printf ("\tval >>= 1;\n"); + printf ("\tif (GET_XFLG) val |= %s;\n", cmask (curi->size)); + genflags (flag_logical, curi->size, "val", "", ""); + printf ("SET_CFLG (carry);\n"); + duplicate_carry (); + genastore ("val", curi->smode, "srcreg", curi->size, "data"); + break; + case i_MOVEC2: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + printf ("\tint regno = (src >> 12) & 15;\n"); + printf ("\tuae_u32 *regp = regs.regs + regno;\n"); + printf ("\tif (! m68k_movec2(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + break; + case i_MOVE2C: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + start_brace (); + printf ("\tint regno = (src >> 12) & 15;\n"); + printf ("\tuae_u32 *regp = regs.regs + regno;\n"); + printf ("\tif (! m68k_move2c(src & 0xFFF, regp)) goto %s;\n", endlabelstr); + break; + case i_CAS: + { + int old_brace_level; + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + start_brace (); + printf ("\tint ru = (src >> 6) & 7;\n"); + printf ("\tint rc = src & 7;\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, rc)", "dst"); + printf ("\tif (GET_ZFLG)"); + old_brace_level = n_braces; + start_brace (); + genastore ("(m68k_dreg(regs, ru))", curi->dmode, "dstreg", curi->size, "dst"); + pop_braces (old_brace_level); + printf ("else"); + start_brace (); + printf ("m68k_dreg(regs, rc) = dst;\n"); + pop_braces (old_brace_level); + } + break; + case i_CAS2: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + printf ("\tuae_u32 rn1 = regs.regs[(extra >> 28) & 15];\n"); + printf ("\tuae_u32 rn2 = regs.regs[(extra >> 12) & 15];\n"); + if (curi->size == sz_word) { + int old_brace_level = n_braces; + printf ("\tuae_u16 dst1 = get_word(rn1), dst2 = get_word(rn2);\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); + printf ("\tif (GET_ZFLG) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); + printf ("\tif (GET_ZFLG) {\n"); + printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); + printf ("\tput_word(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\t}}\n"); + pop_braces (old_brace_level); + printf ("\tif (! GET_ZFLG) {\n"); + printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = (m68k_dreg(regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);\n"); + printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = (m68k_dreg(regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);\n"); + printf ("\t}\n"); + } else { + int old_brace_level = n_braces; + printf ("\tuae_u32 dst1 = get_long(rn1), dst2 = get_long(rn2);\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, (extra >> 16) & 7)", "dst1"); + printf ("\tif (GET_ZFLG) {\n"); + genflags (flag_cmp, curi->size, "newv", "m68k_dreg(regs, extra & 7)", "dst2"); + printf ("\tif (GET_ZFLG) {\n"); + printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 22) & 7));\n"); + printf ("\tput_long(rn1, m68k_dreg(regs, (extra >> 6) & 7));\n"); + printf ("\t}}\n"); + pop_braces (old_brace_level); + printf ("\tif (! GET_ZFLG) {\n"); + printf ("\tm68k_dreg(regs, (extra >> 22) & 7) = dst1;\n"); + printf ("\tm68k_dreg(regs, (extra >> 6) & 7) = dst2;\n"); + printf ("\t}\n"); + } + break; + case i_MOVES: /* ignore DFC and SFC because we have no MMU */ + { + int old_brace_level; + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + printf ("\tif (extra & 0x800)\n"); + old_brace_level = n_braces; + start_brace (); + printf ("\tuae_u32 src = regs.regs[(extra >> 12) & 15];\n"); + genamode (curi->dmode, "dstreg", curi->size, "dst", 2, 0); + genastore ("src", curi->dmode, "dstreg", curi->size, "dst"); + pop_braces (old_brace_level); + printf ("else"); + start_brace (); + genamode (curi->dmode, "dstreg", curi->size, "src", 1, 0); + printf ("\tif (extra & 0x8000) {\n"); + switch (curi->size) { + case sz_byte: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;\n"); break; + case sz_word: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;\n"); break; + case sz_long: printf ("\tm68k_areg(regs, (extra >> 12) & 7) = src;\n"); break; + default: abort (); + } + printf ("\t} else {\n"); + genastore ("src", Dreg, "(extra >> 12) & 7", curi->size, ""); + printf ("\t}\n"); + pop_braces (old_brace_level); + } + break; + case i_BKPT: /* only needed for hardware emulators */ + sync_m68k_pc (); + printf ("\top_illg(opcode);\n"); + break; + case i_CALLM: /* not present in 68030 */ + sync_m68k_pc (); + printf ("\top_illg(opcode);\n"); + break; + case i_RTM: /* not present in 68030 */ + sync_m68k_pc (); + printf ("\top_illg(opcode);\n"); + break; + case i_TRAPcc: + if (curi->smode != am_unknown && curi->smode != am_illg) + genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); + printf ("\tif (cctrue(%d)) { Exception(7,m68k_getpc()); goto %s; }\n", curi->cc, endlabelstr); + need_endlabel = 1; + break; + case i_DIVL: + sync_m68k_pc (); + start_brace (); + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + sync_m68k_pc (); + printf ("\tm68k_divl(opcode, dst, extra, oldpc);\n"); + break; + case i_MULL: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", curi->size, "dst", 1, 0); + sync_m68k_pc (); + printf ("\tm68k_mull(opcode, dst, extra);\n"); + break; + case i_BFTST: + case i_BFEXTU: + case i_BFCHG: + case i_BFEXTS: + case i_BFCLR: + case i_BFFFO: + case i_BFSET: + case i_BFINS: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + genamode (curi->dmode, "dstreg", sz_long, "dst", 2, 0); + start_brace (); + printf ("\tuae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;\n"); + printf ("\tint width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;\n"); + if (curi->dmode == Dreg) { + printf ("\tuae_u32 tmp = m68k_dreg(regs, dstreg) << (offset & 0x1f);\n"); + } else { + printf ("\tuae_u32 tmp,bf0,bf1;\n"); + printf ("\tdsta += (offset >> 3) | (offset & 0x80000000 ? ~0x1fffffff : 0);\n"); + printf ("\tbf0 = get_long(dsta);bf1 = get_byte(dsta+4) & 0xff;\n"); + printf ("\ttmp = (bf0 << (offset & 7)) | (bf1 >> (8 - (offset & 7)));\n"); + } + printf ("\ttmp >>= (32 - width);\n"); + printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width-1)) ? 1 : 0);\n"); + printf ("\tSET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);\n"); + switch (curi->mnemo) { + case i_BFTST: + break; + case i_BFEXTU: + printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); + break; + case i_BFCHG: + printf ("\ttmp = ~tmp;\n"); + break; + case i_BFEXTS: + printf ("\tif (GET_NFLG) tmp |= width == 32 ? 0 : (-1 << width);\n"); + printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = tmp;\n"); + break; + case i_BFCLR: + printf ("\ttmp = 0;\n"); + break; + case i_BFFFO: + printf ("\t{ uae_u32 mask = 1 << (width-1);\n"); + printf ("\twhile (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}\n"); + printf ("\tm68k_dreg(regs, (extra >> 12) & 7) = offset;\n"); + break; + case i_BFSET: + printf ("\ttmp = 0xffffffff;\n"); + break; + case i_BFINS: + printf ("\ttmp = m68k_dreg(regs, (extra >> 12) & 7);\n"); + printf ("\tSET_NFLG_ALWAYS (tmp & (1 << (width - 1)) ? 1 : 0);\n"); + printf ("\tSET_ZFLG (tmp == 0);\n"); + break; + default: + break; + } + if (curi->mnemo == i_BFCHG + || curi->mnemo == i_BFCLR + || curi->mnemo == i_BFSET + || curi->mnemo == i_BFINS) + { + printf ("\ttmp <<= (32 - width);\n"); + if (curi->dmode == Dreg) { + printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & ((offset & 0x1f) == 0 ? 0 :\n"); + printf ("\t\t(0xffffffff << (32 - (offset & 0x1f))))) |\n"); + printf ("\t\t(tmp >> (offset & 0x1f)) |\n"); + printf ("\t\t(((offset & 0x1f) + width) >= 32 ? 0 :\n"); + printf (" (m68k_dreg(regs, dstreg) & ((uae_u32)0xffffffff >> ((offset & 0x1f) + width))));\n"); + } else { + printf ("\tbf0 = (bf0 & (0xff000000 << (8 - (offset & 7)))) |\n"); + printf ("\t\t(tmp >> (offset & 7)) |\n"); + printf ("\t\t(((offset & 7) + width) >= 32 ? 0 :\n"); + printf ("\t\t (bf0 & ((uae_u32)0xffffffff >> ((offset & 7) + width))));\n"); + printf ("\tput_long(dsta,bf0 );\n"); + printf ("\tif (((offset & 7) + width) > 32) {\n"); + printf ("\t\tbf1 = (bf1 & (0xff >> (width - 32 + (offset & 7)))) |\n"); + printf ("\t\t\t(tmp << (8 - (offset & 7)));\n"); + printf ("\t\tput_byte(dsta+4,bf1);\n"); + printf ("\t}\n"); + } + } + break; + case i_PACK: + if (curi->smode == Dreg) { + printf ("\tuae_u16 val = m68k_dreg(regs, srcreg) + %s;\n", gen_nextiword ()); + printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf);\n"); + } else { + printf ("\tuae_u16 val;\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tval = (val | ((uae_u16)get_byte(m68k_areg(regs, srcreg)) << 8)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + printf ("\tput_byte(m68k_areg(regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf));\n"); + } + break; + case i_UNPK: + if (curi->smode == Dreg) { + printf ("\tuae_u16 val = m68k_dreg(regs, srcreg);\n"); + printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_dreg(regs, dstreg) = (m68k_dreg(regs, dstreg) & 0xffff0000) | (val & 0xffff);\n"); + } else { + printf ("\tuae_u16 val;\n"); + printf ("\tm68k_areg(regs, srcreg) -= areg_byteinc[srcreg];\n"); + printf ("\tval = (uae_u16)get_byte(m68k_areg(regs, srcreg));\n"); + printf ("\tval = (((val << 4) & 0xf00) | (val & 0xf)) + %s;\n", gen_nextiword ()); + printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + printf ("\tput_byte(m68k_areg(regs, dstreg),val);\n"); + printf ("\tm68k_areg(regs, dstreg) -= areg_byteinc[dstreg];\n"); + printf ("\tput_byte(m68k_areg(regs, dstreg),val >> 8);\n"); + } + break; + case i_TAS: + genamode (curi->smode, "srcreg", curi->size, "src", 1, 0); + genflags (flag_logical, curi->size, "src", "", ""); + printf ("\tsrc |= 0x80;\n"); + genastore ("src", curi->smode, "srcreg", curi->size, "src"); + break; + case i_FPP: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_arithmetic(opcode, extra);\n"); + break; + case i_FDBcc: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_dbcc(opcode, extra);\n"); + break; + case i_FScc: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_scc(opcode,extra);\n"); + break; + case i_FTRAPcc: + sync_m68k_pc (); + start_brace (); + printf ("\tuaecptr oldpc = m68k_getpc();\n"); + if (curi->smode != am_unknown && curi->smode != am_illg) + genamode (curi->smode, "srcreg", curi->size, "dummy", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_trapcc(opcode,oldpc);\n"); + break; + case i_FBcc: + sync_m68k_pc (); + start_brace (); + printf ("\tuaecptr pc = m68k_getpc();\n"); + genamode (curi->dmode, "srcreg", curi->size, "extra", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_bcc(opcode,pc,extra);\n"); + break; + case i_FSAVE: + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_save(opcode);\n"); + break; + case i_FRESTORE: + sync_m68k_pc (); + swap_opcode (); + printf ("\tfpuop_restore(opcode);\n"); + break; + case i_CINVL: + case i_CINVP: + case i_CINVA: + /* gb-- srcreg now contains the cache field */ + printf ("\tif (srcreg&0x2)\n"); + printf ("\t\tflush_icache(%d);\n", (int)(30 + ((opcode >> 3) & 3))); + break; + case i_CPUSHL: + case i_CPUSHP: + case i_CPUSHA: + /* gb-- srcreg now contains the cache field */ + printf ("\tif (srcreg&0x2)\n"); + printf ("\t\tflush_icache(%d);\n", (int)(40 + ((opcode >> 3) & 3))); + break; + case i_MOVE16: + if ((opcode & 0xfff8) == 0xf620) { + /* MOVE16 (Ax)+,(Ay)+ */ + printf ("\tuaecptr mems = m68k_areg(regs, srcreg) & ~15, memd;\n"); + printf ("\tdstreg = (%s >> 12) & 7;\n", gen_nextiword()); + printf ("\tmemd = m68k_areg(regs, dstreg) & ~15;\n"); + printf ("\tput_long(memd, get_long(mems));\n"); + printf ("\tput_long(memd+4, get_long(mems+4));\n"); + printf ("\tput_long(memd+8, get_long(mems+8));\n"); + printf ("\tput_long(memd+12, get_long(mems+12));\n"); + printf ("\tif (srcreg != dstreg)\n"); + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + else { + /* Other variants */ + genamode (curi->smode, "srcreg", curi->size, "mems", 0, 2); + genamode (curi->dmode, "dstreg", curi->size, "memd", 0, 2); + printf ("\tmemsa &= ~15;\n"); + printf ("\tmemda &= ~15;\n"); + printf ("\tput_long(memda, get_long(memsa));\n"); + printf ("\tput_long(memda+4, get_long(memsa+4));\n"); + printf ("\tput_long(memda+8, get_long(memsa+8));\n"); + printf ("\tput_long(memda+12, get_long(memsa+12));\n"); + if ((opcode & 0xfff8) == 0xf600) + printf ("\tm68k_areg(regs, srcreg) += 16;\n"); + else if ((opcode & 0xfff8) == 0xf608) + printf ("\tm68k_areg(regs, dstreg) += 16;\n"); + } + break; + case i_MMUOP: + genamode (curi->smode, "srcreg", curi->size, "extra", 1, 0); + sync_m68k_pc (); + swap_opcode (); + printf ("\tmmu_op(opcode,extra);\n"); + break; + + case i_EMULOP_RETURN: + printf ("\tm68k_emulop_return();\n"); + m68k_pc_offset = 0; + break; + + case i_EMULOP: + printf ("\n"); + swap_opcode (); + printf ("\tm68k_emulop(opcode);\n"); + break; + + default: + abort (); + break; + } + finish_braces (); + sync_m68k_pc (); +} + +static void generate_includes (FILE * f) +{ + fprintf (f, "#include \"sysdeps.h\"\n"); + + fprintf (f, "#include \"m68k.h\"\n"); + fprintf (f, "#include \"memory.h\"\n"); + fprintf (f, "#include \"readcpu.h\"\n"); + fprintf (f, "#include \"newcpu.h\"\n"); + fprintf (f, "#include \"compiler/compemu.h\"\n"); + fprintf (f, "#include \"fpu/fpu.h\"\n"); + fprintf (f, "#include \"cputbl.h\"\n"); + + fprintf (f, "#define SET_CFLG_ALWAYS(x) SET_CFLG(x)\n"); + fprintf (f, "#define SET_NFLG_ALWAYS(x) SET_NFLG(x)\n"); + fprintf (f, "#define CPUFUNC_FF(x) x##_ff\n"); + fprintf (f, "#define CPUFUNC_NF(x) x##_nf\n"); + fprintf (f, "#define CPUFUNC(x) CPUFUNC_FF(x)\n"); + + fprintf (f, "#ifdef NOFLAGS\n"); + fprintf (f, "# include \"noflags.h\"\n"); + fprintf (f, "#endif\n"); +} + +static int postfix; + +static void generate_one_opcode (int rp) +{ + uae_u16 smsk, dmsk; + long int opcode = opcode_map[rp]; + const char *opcode_str; + + if (table68k[opcode].mnemo == i_ILLG + || table68k[opcode].clev > (unsigned)cpu_level) + return; + + if (table68k[opcode].handler != -1) + return; + + opcode_str = get_instruction_string (opcode); + + if (opcode_next_clev[rp] != cpu_level) { + if (table68k[opcode].flagdead == 0) + /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ + fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], + opcode, opcode_str); + else + fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, opcode_last_postfix[rp], + opcode, opcode_str); + return; + } + + if (table68k[opcode].flagdead == 0) + /* force to the "ff" variant since the instruction doesn't set at all the condition codes */ + fprintf (stblfile, "{ CPUFUNC_FF(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); + else + fprintf (stblfile, "{ CPUFUNC(op_%lx_%d), 0, %ld }, /* %s */\n", opcode, postfix, opcode, opcode_str); + + fprintf (headerfile, "extern cpuop_func op_%lx_%d_nf;\n", opcode, postfix); + fprintf (headerfile, "extern cpuop_func op_%lx_%d_ff;\n", opcode, postfix); + + /* gb-- The "nf" variant for an instruction that doesn't set the condition + codes at all is the same as the "ff" variant, so we don't need the "nf" + variant to be compiled since it is mapped to the "ff" variant in the + smalltbl. */ + if (table68k[opcode].flagdead == 0) + printf ("#ifndef NOFLAGS\n"); + + printf ("void REGPARAM2 CPUFUNC(op_%lx_%d)(uae_u32 opcode) /* %s */\n{\n", opcode, postfix, opcode_str); + printf ("\tcpuop_begin();\n"); + + switch (table68k[opcode].stype) { + case 0: smsk = 7; break; + case 1: smsk = 255; break; + case 2: smsk = 15; break; + case 3: smsk = 7; break; + case 4: smsk = 7; break; + case 5: smsk = 63; break; + case 6: smsk = 255; break; + case 7: smsk = 3; break; + default: abort (); + } + dmsk = 7; + + next_cpu_level = -1; + if (table68k[opcode].suse + && table68k[opcode].smode != imm && table68k[opcode].smode != imm0 + && table68k[opcode].smode != imm1 && table68k[opcode].smode != imm2 + && table68k[opcode].smode != absw && table68k[opcode].smode != absl + && table68k[opcode].smode != PC8r && table68k[opcode].smode != PC16 + /* gb-- We don't want to fetch the EmulOp code since the EmulOp() + routine uses the whole opcode value. Maybe all the EmulOps + could be expanded out but I don't think it is an improvement */ + && table68k[opcode].stype != 6 + ) + { + if (table68k[opcode].spos == -1) { + if (((int) table68k[opcode].sreg) >= 128) + printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].sreg); + else + printf ("\tuae_u32 srcreg = %d;\n", (int) table68k[opcode].sreg); + } else { + char source[100]; + int pos = table68k[opcode].spos; + +#if 0 + /* Check that we can do the little endian optimization safely. */ + if (pos < 8 && (smsk >> (8 - pos)) != 0) + abort (); +#endif + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (smsk >> (8 - pos)) != 0) + sprintf (source, "(((opcode >> %d) | (opcode << %d)) & %d)", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + sprintf (source, "((opcode >> %d) & %d)", pos ^ 8, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + printf ("\tuae_u32 srcreg = %s;\n", source); + + printf ("#else\n"); + + if (pos) + sprintf (source, "((opcode >> %d) & %d)", pos, smsk); + else + sprintf (source, "(opcode & %d)", smsk); + + if (table68k[opcode].stype == 3) + printf ("\tuae_u32 srcreg = imm8_table[%s];\n", source); + else if (table68k[opcode].stype == 1) + printf ("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source); + else + printf ("\tuae_u32 srcreg = %s;\n", source); + + printf ("#endif\n"); + } + } + if (table68k[opcode].duse + /* Yes, the dmode can be imm, in case of LINK or DBcc */ + && table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0 + && table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2 + && table68k[opcode].dmode != absw && table68k[opcode].dmode != absl) + { + if (table68k[opcode].dpos == -1) { + if (((int) table68k[opcode].dreg) >= 128) + printf ("\tuae_u32 dstreg = (uae_s32)(uae_s8)%d;\n", (int) table68k[opcode].dreg); + else + printf ("\tuae_u32 dstreg = %d;\n", (int) table68k[opcode].dreg); + } else { + int pos = table68k[opcode].dpos; +#if 0 + /* Check that we can do the little endian optimization safely. */ + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + abort (); +#endif + printf ("#ifdef HAVE_GET_WORD_UNSWAPPED\n"); + + if (pos < 8 && (dmsk >> (8 - pos)) != 0) + printf ("\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n", + pos ^ 8, 8 - pos, dmsk); + else if (pos != 8) + printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos ^ 8, dmsk); + else + printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + printf ("#else\n"); + + if (pos) + printf ("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", + pos, dmsk); + else + printf ("\tuae_u32 dstreg = opcode & %d;\n", dmsk); + + printf ("#endif\n"); + } + } + need_endlabel = 0; + endlabelno++; + sprintf (endlabelstr, "endlabel%d", endlabelno); + gen_opcode (opcode); + if (need_endlabel) + printf ("%s: ;\n", endlabelstr); + printf ("\tcpuop_end();\n"); + printf ("}\n"); + if (table68k[opcode].flagdead == 0) + printf ("\n#endif\n"); + opcode_next_clev[rp] = next_cpu_level; + opcode_last_postfix[rp] = postfix; +} + +static void generate_func (void) +{ + int i, j, rp; + + using_prefetch = 0; + using_exception_3 = 0; +#if !USE_PREFETCH_BUFFER + /* gb-- No need for a prefetch buffer, nor exception 3 handling */ + /* Anyway, Basilisk2 does not use the op_smalltbl_5 table... */ + for (i = 0; i <= 4; i++) { +#else + for (i = 0; i < 6; i++) { +#endif + cpu_level = 4 - i; + if (i == 5) { + cpu_level = 0; + using_prefetch = 1; + using_exception_3 = 1; + for (rp = 0; rp < nr_cpuop_funcs; rp++) + opcode_next_clev[rp] = 0; + } + postfix = i; + fprintf (stblfile, "struct cputbl CPUFUNC(op_smalltbl_%d)[] = {\n", postfix); + + /* Disable spurious warnings. */ + printf ("\n" + "#ifdef _MSC_VER\n" + "#pragma warning(disable:4102) /* unreferenced label */\n" + "#endif\n"); + + /* sam: this is for people with low memory (eg. me :)) */ + printf ("\n" + "#if !defined(PART_1) && !defined(PART_2) && " + "!defined(PART_3) && !defined(PART_4) && " + "!defined(PART_5) && !defined(PART_6) && " + "!defined(PART_7) && !defined(PART_8)" + "\n" + "#define PART_1 1\n" + "#define PART_2 1\n" + "#define PART_3 1\n" + "#define PART_4 1\n" + "#define PART_5 1\n" + "#define PART_6 1\n" + "#define PART_7 1\n" + "#define PART_8 1\n" + "#endif\n\n"); + + rp = 0; + for(j=1;j<=8;++j) { + int k = (j*nr_cpuop_funcs)/8; + printf ("#ifdef PART_%d\n",j); + for (; rp < k; rp++) + generate_one_opcode (rp); + printf ("#endif\n\n"); + } + + fprintf (stblfile, "{ 0, 0, 0 }};\n"); + } +} + +int main (int argc, char **argv) +{ + FILE *out; + read_table68k (); + do_merges (); + + opcode_map = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_last_postfix = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + opcode_next_clev = (int *) malloc (sizeof (int) * nr_cpuop_funcs); + counts = (unsigned long *) malloc (65536 * sizeof (unsigned long)); + read_counts (); + + /* It would be a lot nicer to put all in one file (we'd also get rid of + * cputbl.h that way), but cpuopti can't cope. That could be fixed, but + * I don't dare to touch the 68k version. */ + + headerfile = fopen ("cputbl.h", "w"); + stblfile = fopen ("cpustbl.cpp", "w"); + out = freopen ("cpuemu.cpp", "w", stdout); + + generate_includes (stdout); + generate_includes (stblfile); + + generate_func (); + + free (table68k); + fclose (headerfile); + fclose (stblfile); + fflush (out); + + /* For build systems (IDEs mainly) that don't make it easy to compile the + * same file twice with different settings. */ + stblfile = fopen ("cpustbl_nf.cpp", "w"); + out = freopen ("cpuemu_nf.cpp", "w", stdout); + + fprintf (stblfile, "#define NOFLAGS\n"); + fprintf (stblfile, "#include \"cpustbl.cpp\"\n"); + fclose (stblfile); + + printf ("#define NOFLAGS\n"); + printf ("#include \"cpuemu.cpp\"\n"); + fflush (out); + + return 0; +} diff --git a/BasiliskII/src/uae_cpu/m68k.h b/BasiliskII/src/uae_cpu/m68k.h new file mode 100644 index 000000000..f329cb3ed --- /dev/null +++ b/BasiliskII/src/uae_cpu/m68k.h @@ -0,0 +1,1073 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation - machine dependent bits + * + * Copyright 1996 Bernd Schmidt + * + * 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 M68K_FLAGS_H +#define M68K_FLAGS_H + +#ifdef OPTIMIZED_FLAGS + +#if defined(X86_ASSEMBLY) || defined(X86_64_ASSEMBLY) || defined(MSVC_INTRINSICS) + +#ifndef SAHF_SETO_PROFITABLE + +/* PUSH/POP instructions are naturally 64-bit sized on x86-64, thus + unsigned long hereunder is either 64-bit or 32-bit wide depending + on the target. */ +struct flag_struct { + unsigned long cznv; + unsigned long x; +}; + +#define FLAGVAL_Z 0x40 +#define FLAGVAL_N 0x80 + +#define SET_ZFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x40) | (((y) & 1) << 6)) +#define SET_CFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x800) | (((y) & 1) << 11)) +#define SET_NFLG(y) (regflags.cznv = (((uae_u32)regflags.cznv) & ~0x80) | (((y) & 1) << 7)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_ZFLG ((regflags.cznv >> 6) & 1) +#define GET_CFLG (regflags.cznv & 1) +#define GET_VFLG ((regflags.cznv >> 11) & 1) +#define GET_NFLG ((regflags.cznv >> 7) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.cznv = 0) +#define GET_CZNV (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) + +#define COPY_CARRY (regflags.x = regflags.cznv) + +extern struct flag_struct regflags ASM_SYM ("regflags"); + +static __inline__ int cctrue(int cc) +{ + uae_u32 cznv = regflags.cznv; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & 0x41) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (cznv & 0x41) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (cznv & 1) == 0; /* !GET_CFLG; CC */ + case 5: return (cznv & 1) != 0; /* GET_CFLG; CS */ + case 6: return (cznv & 0x40) == 0; /* !GET_ZFLG; NE */ + case 7: return (cznv & 0x40) != 0; /* GET_ZFLG; EQ */ + case 8: return (cznv & 0x800) == 0;/* !GET_VFLG; VC */ + case 9: return (cznv & 0x800) != 0;/* GET_VFLG; VS */ + case 10:return (cznv & 0x80) == 0; /* !GET_NFLG; PL */ + case 11:return (cznv & 0x80) != 0; /* GET_NFLG; MI */ + case 12:return (((cznv << 4) ^ cznv) & 0x800) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((cznv << 4) ^ cznv) & 0x800) != 0;/* GET_NFLG != GET_VFLG; LT */ + case 14: + cznv &= 0x8c0; + return (((cznv << 4) ^ cznv) & 0x840) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: + cznv &= 0x8c0; + return (((cznv << 4) ^ cznv) & 0x840) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + return 0; +} + +#define optflag_testl(v) \ + __asm__ __volatile__ ("andl %1,%1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "r" (v) : "cc") + +#define optflag_testw(v) \ + __asm__ __volatile__ ("andw %w1,%w1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "r" (v) : "cc") + +#define optflag_testb(v) \ + __asm__ __volatile__ ("andb %b1,%b1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "q" (v) : "cc") + +#define optflag_addl(v, s, d) do { \ + __asm__ __volatile__ ("addl %k2,%k1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("addw %w2,%w1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("addb %b2,%b1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subl(v, s, d) do { \ + __asm__ __volatile__ ("subl %k2,%k1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("subw %w2,%w1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("subb %b2,%b1\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_cmpl(s, d) \ + __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + +#define optflag_cmpw(s, d) \ + __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc") + +#define optflag_cmpb(s, d) \ + __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \ + "pushf\n\t" \ + "pop %0\n\t" \ + : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc") + +#else + +struct flag_struct { + uae_u32 cznv; + uae_u32 x; +}; + +#define FLAGVAL_Z 0x4000 +#define FLAGVAL_N 0x8000 + +#define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x4000) | (((y) & 1) << 14)) +#define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~0x100) | (((y) & 1) << 8)) +#define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x1) | (((y) & 1))) +#define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x8000) | (((y) & 1) << 15)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_ZFLG ((regflags.cznv >> 14) & 1) +#define GET_CFLG ((regflags.cznv >> 8) & 1) +#define GET_VFLG ((regflags.cznv >> 0) & 1) +#define GET_NFLG ((regflags.cznv >> 15) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.cznv = 0) +#define GET_CZNV (regflags.cznv) +#define IOR_CZNV(X) (regflags.cznv |= (X)) +#define SET_CZNV(X) (regflags.cznv = (X)) + +#define COPY_CARRY (regflags.x = (regflags.cznv)>>8) + +extern struct flag_struct regflags ASM_SYM("regflags"); + +static __inline__ int cctrue(int cc) +{ + uae_u32 cznv = regflags.cznv; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (cznv & 0x4100) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (cznv & 0x4100) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (cznv & 0x100) == 0; /* !GET_CFLG; CC */ + case 5: return (cznv & 0x100) != 0; /* GET_CFLG; CS */ + case 6: return (cznv & 0x4000) == 0; /* !GET_ZFLG; NE */ + case 7: return (cznv & 0x4000) != 0; /* GET_ZFLG; EQ */ + case 8: return (cznv & 0x01) == 0; /* !GET_VFLG; VC */ + case 9: return (cznv & 0x01) != 0; /* GET_VFLG; VS */ + case 10:return (cznv & 0x8000) == 0; /* !GET_NFLG; PL */ + case 11:return (cznv & 0x8000) != 0; /* GET_NFLG; MI */ + case 12:return (((cznv << 15) ^ cznv) & 0x8000) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((cznv << 15) ^ cznv) & 0x8000) != 0;/* GET_NFLG != GET_VFLG; LT */ + case 14: + cznv &= 0xc001; + return (((cznv << 15) ^ cznv) & 0xc000) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: + cznv &= 0xc001; + return (((cznv << 15) ^ cznv) & 0xc000) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + abort(); + return 0; +} + +/* Manually emit LAHF instruction so that 64-bit assemblers can grok it */ +#if defined __x86_64__ && defined __GNUC__ +#define ASM_LAHF ".byte 0x9f" +#else +#define ASM_LAHF "lahf" +#endif + +/* Is there any way to do this without declaring *all* memory clobbered? + I.e. any way to tell gcc that some byte-sized value is in %al? */ +#define optflag_testl(v) \ + __asm__ __volatile__ ("andl %0,%0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "r" (v) : "%eax","cc","memory") + +#define optflag_testw(v) \ + __asm__ __volatile__ ("andw %w0,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "r" (v) : "%eax","cc","memory") + +#define optflag_testb(v) \ + __asm__ __volatile__ ("andb %b0,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "q" (v) : "%eax","cc","memory") + +#define optflag_addl(v, s, d) do { \ + __asm__ __volatile__ ("addl %k1,%k0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addw(v, s, d) do { \ + __asm__ __volatile__ ("addw %w1,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_addb(v, s, d) do { \ + __asm__ __volatile__ ("addb %b1,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subl(v, s, d) do { \ + __asm__ __volatile__ ("subl %k1,%k0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subw(v, s, d) do { \ + __asm__ __volatile__ ("subw %w1,%w0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=r" (v) : "rmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_subb(v, s, d) do { \ + __asm__ __volatile__ ("subb %b1,%b0\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : "=q" (v) : "qmi" (s), "0" (d) : "%eax","cc","memory"); \ + COPY_CARRY; \ + } while (0) + +#define optflag_cmpl(s, d) \ + __asm__ __volatile__ ("cmpl %k0,%k1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "rmi" (s), "r" (d) : "%eax","cc","memory") + +#define optflag_cmpw(s, d) \ + __asm__ __volatile__ ("cmpw %w0,%w1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "rmi" (s), "r" (d) : "%eax","cc","memory"); + +#define optflag_cmpb(s, d) \ + __asm__ __volatile__ ("cmpb %b0,%b1\n\t" \ + ASM_LAHF "\n\t" \ + "seto %%al\n\t" \ + "movb %%al,regflags\n\t" \ + "movb %%ah,regflags+1\n\t" \ + : : "qmi" (s), "q" (d) : "%eax","cc","memory") + +#endif + +#elif defined(SPARC_V8_ASSEMBLY) || defined(SPARC_V9_ASSEMBLY) + +struct flag_struct { + unsigned char nzvc; + unsigned char x; +}; + +extern struct flag_struct regflags; + +#define FLAGVAL_Z 0x04 +#define FLAGVAL_N 0x08 + +#define SET_ZFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x04) | (((y) & 1) << 2)) +#define SET_CFLG(y) (regflags.nzvc = (regflags.nzvc & ~1) | ((y) & 1)) +#define SET_VFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x02) | (((y) & 1) << 1)) +#define SET_NFLG(y) (regflags.nzvc = (regflags.nzvc & ~0x08) | (((y) & 1) << 3)) +#define SET_XFLG(y) (regflags.x = (y)) + +#define GET_ZFLG ((regflags.nzvc >> 2) & 1) +#define GET_CFLG (regflags.nzvc & 1) +#define GET_VFLG ((regflags.nzvc >> 1) & 1) +#define GET_NFLG ((regflags.nzvc >> 3) & 1) +#define GET_XFLG (regflags.x & 1) + +#define CLEAR_CZNV (regflags.nzvc = 0) +#define GET_CZNV (reflags.nzvc) +#define IOR_CZNV(X) (refglags.nzvc |= (X)) +#define SET_CZNV(X) (regflags.nzvc = (X)) + +#define COPY_CARRY (regflags.x = regflags.nzvc) + +static __inline__ int cctrue(int cc) +{ + uae_u32 nzvc = regflags.nzvc; + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return (nzvc & 0x05) == 0; /* !GET_CFLG && !GET_ZFLG; HI */ + case 3: return (nzvc & 0x05) != 0; /* GET_CFLG || GET_ZFLG; LS */ + case 4: return (nzvc & 1) == 0; /* !GET_CFLG; CC */ + case 5: return (nzvc & 1) != 0; /* GET_CFLG; CS */ + case 6: return (nzvc & 0x04) == 0; /* !GET_ZFLG; NE */ + case 7: return (nzvc & 0x04) != 0; /* GET_ZFLG; EQ */ + case 8: return (nzvc & 0x02) == 0;/* !GET_VFLG; VC */ + case 9: return (nzvc & 0x02) != 0;/* GET_VFLG; VS */ + case 10:return (nzvc & 0x08) == 0; /* !GET_NFLG; PL */ + case 11:return (nzvc & 0x08) != 0; /* GET_NFLG; MI */ + case 12:return (((nzvc << 2) ^ nzvc) & 0x08) == 0; /* GET_NFLG == GET_VFLG; GE */ + case 13:return (((nzvc << 2) ^ nzvc) & 0x08) != 0;/* GET_NFLG != GET_VFLG; LT */ + case 14: + nzvc &= 0x0e; + return (((nzvc << 2) ^ nzvc) & 0x0c) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */ + case 15: + nzvc &= 0x0e; + return (((nzvc << 2) ^ nzvc) & 0x0c) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */ + } + return 0; +} + +#ifdef SPARC_V8_ASSEMBLY + +static inline uae_u32 sparc_v8_flag_add_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 24, %%o0\n" + " sll %3, 24, %%o1\n" + " addcc %%o0, %%o1, %%o0\n" + " addx %%g0, %%g0, %%o1 ! X,C flags\n" + " srl %%o0, 24, %0\n" + " stb %%o1, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o1, 0x08, %%o1 ! N flag\n" + " bz,a .+8\n" + " or %%o1, 0x04, %%o1 ! Z flag\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! V flag\n" + " stb %%o1, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v8_flag_add_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 16, %%o0\n" + " sll %3, 16, %%o1\n" + " addcc %%o0, %%o1, %%o0\n" + " addx %%g0, %%g0, %%o1 ! X,C flags\n" + " srl %%o0, 16, %0\n" + " stb %%o1, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o1, 0x08, %%o1 ! N flag\n" + " bz,a .+8\n" + " or %%o1, 0x04, %%o1 ! Z flag\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! V flag\n" + " stb %%o1, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v8_flag_add_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " addcc %2, %3, %0\n" + " addx %%g0, %%g0, %%o0 ! X,C flags\n" + " stb %%o0, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bz,a .+8\n" + " or %%o0, 0x04, %%o0 ! Z flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " stb %%o0, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +static inline uae_u32 sparc_v8_flag_sub_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 24, %%o0\n" + " sll %3, 24, %%o1\n" + " subcc %%o0, %%o1, %%o0\n" + " addx %%g0, %%g0, %%o1 ! X,C flags\n" + " srl %%o0, 24, %0\n" + " stb %%o1, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o1, 0x08, %%o1 ! N flag\n" + " bz,a .+8\n" + " or %%o1, 0x04, %%o1 ! Z flag\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! V flag\n" + " stb %%o1, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v8_flag_sub_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 16, %%o0\n" + " sll %3, 16, %%o1\n" + " subcc %%o0, %%o1, %%o0\n" + " addx %%g0, %%g0, %%o1 ! X,C flags\n" + " srl %%o0, 16, %0\n" + " stb %%o1, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o1, 0x08, %%o1 ! N flag\n" + " bz,a .+8\n" + " or %%o1, 0x04, %%o1 ! Z flag\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! V flag\n" + " stb %%o1, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v8_flag_sub_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " subcc %2, %3, %0\n" + " addx %%g0, %%g0, %%o0 ! X,C flags\n" + " stb %%o0, [%1 + 1]\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bz,a .+8\n" + " or %%o0, 0x04, %%o0 ! Z flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " stb %%o0, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +static inline void sparc_v8_flag_cmp_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " sll %1, 24, %%o0\n" + " sll %2, 24, %%o1\n" + " subcc %%o0, %%o1, %%g0\n" + " addx %%g0, %%g0, %%o0 ! C flag\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bz,a .+8\n" + " or %%o0, 0x04, %%o0 ! Z flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v8_flag_cmp_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " sll %1, 16, %%o0\n" + " sll %2, 16, %%o1\n" + " subcc %%o0, %%o1, %%g0\n" + " addx %%g0, %%g0, %%o0 ! C flag\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bz,a .+8\n" + " or %%o0, 0x04, %%o0 ! Z flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v8_flag_cmp_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " subcc %1, %2, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +static inline uae_u32 sparc_v8_flag_addx_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " ldub [%1 + 1], %%o1 ! Get the X Flag\n" + " subcc %%g0, %%o1, %%g0 ! Set the SPARC carry flag, if X set\n" + " addxcc %2, %3, %0\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +#if 0 +VERY SLOW... +static inline uae_u32 sparc_v8_flag_addx_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 24, %%o0\n" + " sll %3, 24, %%o1\n" + " addcc %%o0, %%o1, %%o0\n" + " addx %%g0, %%g0, %%o1 ! X,C flags\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! V flag\n" + " ldub [%1 + 1], %%o2\n" + " subcc %%g0, %%o2, %%g0\n" + " addx %%g0, %%g0, %%o2\n" + " sll %%o2, 24, %%o2\n" + " addcc %%o0, %%o2, %%o0\n" + " srl %%o0, 24, %0\n" + " addx %%g0, %%g0, %%o2\n" + " or %%o1, %%o2, %%o1 ! update X,C flags\n" + " bl,a .+8\n" + " or %%o1, 0x08, %%o1 ! N flag\n" + " ldub [%1], %%o0 ! retreive the old NZVC flags (XXX)\n" + " bvs,a .+8\n" + " or %%o1, 0x02, %%o1 ! update V flag\n" + " and %%o0, 0x04, %%o0 ! (XXX) but keep only Z flag\n" + " and %%o1, 1, %%o2 ! keep C flag in %%o2\n" + " bnz,a .+8\n" + " or %%g0, %%g0, %%o0 ! Z flag cleared if non-zero result\n" + " stb %%o2, [%1 + 1] ! store the X flag\n" + " or %%o1, %%o0, %%o1\n" + " stb %%o1, [%1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1", "o2" + ); + return value; +} +#endif + +static inline uae_u32 sparc_v8_flag_addx_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " ldub [%1 + 1], %%o0 ! Get the X Flag\n" + " subcc %%g0, %%o0, %%g0 ! Set the SPARC carry flag, if X set\n" + " addxcc %2, %3, %0\n" + " ldub [%1], %%o0 ! retreive the old NZVC flags\n" + " and %%o0, 0x04, %%o0 ! but keep only Z flag\n" + " addx %%o0, %%g0, %%o0 ! X,C flags\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " bnz,a .+8\n" + " and %%o0, 0x0B, %%o0 ! Z flag cleared if result is non-zero\n" + " stb %%o0, [%1]\n" + " stb %%o0, [%1 + 1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +#endif /* SPARC_V8_ASSEMBLY */ + +#ifdef SPARC_V9_ASSEMBLY + +static inline uae_u32 sparc_v9_flag_add_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 24, %%o0\n" + " sll %3, 24, %%o1\n" + " addcc %%o0, %%o1, %%o0\n" + " rd %%ccr, %%o1\n" + " srl %%o0, 24, %0\n" + " stb %%o1, [%1]\n" + " stb %%o1, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_add_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 16, %%o0\n" + " sll %3, 16, %%o1\n" + " addcc %%o0, %%o1, %%o0\n" + " rd %%ccr, %%o1\n" + " srl %%o0, 16, %0\n" + " stb %%o1, [%1]\n" + " stb %%o1, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_add_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " addcc %2, %3, %0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%1]\n" + " stb %%o0, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_sub_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 24, %%o0\n" + " sll %3, 24, %%o1\n" + " subcc %%o0, %%o1, %%o0\n" + " rd %%ccr, %%o1\n" + " srl %%o0, 24, %0\n" + " stb %%o1, [%1]\n" + " stb %%o1, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_sub_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " sll %2, 16, %%o0\n" + " sll %3, 16, %%o1\n" + " subcc %%o0, %%o1, %%o0\n" + " rd %%ccr, %%o1\n" + " srl %%o0, 16, %0\n" + " stb %%o1, [%1]\n" + " stb %%o1, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_sub_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " subcc %2, %3, %0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%1]\n" + " stb %%o0, [%1+1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +static inline void sparc_v9_flag_cmp_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " sll %1, 24, %%o0\n" + " sll %2, 24, %%o1\n" + " subcc %%o0, %%o1, %%g0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v9_flag_cmp_16(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " sll %1, 16, %%o0\n" + " sll %2, 16, %%o1\n" + " subcc %%o0, %%o1, %%g0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v9_flag_cmp_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + __asm__ ("\n" + " subcc %1, %2, %%g0\n" +#if 0 + " subcc %1, %2, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" +#endif +#if 0 + " subcc %1, %2, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,pt,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" + " stb %%o0, [%0]\n" +#endif + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); +} + +#if 1 +static inline void sparc_v9_flag_test_8(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " sll %1, 24, %%o0\n" + " subcc %%o0, %%g0, %%g0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0" + ); +} + +static inline void sparc_v9_flag_test_16(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " sll %1, 16, %%o0\n" + " subcc %%o0, %%g0, %%g0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0" + ); +} + +static inline void sparc_v9_flag_test_32(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " subcc %1, %%g0, %%g0\n" + " rd %%ccr, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0" + ); +} +#else +static inline void sparc_v9_flag_test_8(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " sll %1, 24, %%o0\n" + " subcc %%o0, %%g0, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v9_flag_test_16(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " sll %1, 16, %%o0\n" + " subcc %%o0, %%g0, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0", "o1" + ); +} + +static inline void sparc_v9_flag_test_32(flag_struct *flags, uae_u32 val) +{ + __asm__ ("\n" + " subcc %1, %%g0, %%o1\n" + " srl %%o1, 31, %%o0\n" + " sll %%o0, 3, %%o0\n" + " addx %%o0, %%g0, %%o0\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0\n" + " subcc %%g0, %%o1, %%g0\n" + " addx %%g0, 7, %%o1\n" + " and %%o1, 0x04, %%o1\n" + " or %%o0, %%o1, %%o0\n" + " stb %%o0, [%0]\n" + : /* no outputs */ + : "r" (flags), "r" (val) + : "cc", "o0", "o1" + ); +} +#endif + +static inline uae_u32 sparc_v9_flag_addx_8(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " ldub [%1 + 1], %%o1 ! Get the X Flag\n" + " subcc %%g0, %%o1, %%g0 ! Set the SPARC carry flag, if X set\n" + " addxcc %2, %3, %0\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0", "o1" + ); + return value; +} + +static inline uae_u32 sparc_v9_flag_addx_32(flag_struct *flags, uae_u32 src, uae_u32 dst) +{ + uae_u32 value; + __asm__ ("\n" + " ldub [%1 + 1], %%o0 ! Get the X Flag\n" + " subcc %%g0, %%o0, %%g0 ! Set the SPARC carry flag, if X set\n" + " addxcc %2, %3, %0\n" + " ldub [%1], %%o0 ! retreive the old NZVC flags\n" + " and %%o0, 0x04, %%o0 ! but keep only Z flag\n" + " addx %%o0, %%g0, %%o0 ! X,C flags\n" + " bl,a .+8\n" + " or %%o0, 0x08, %%o0 ! N flag\n" + " bvs,a .+8\n" + " or %%o0, 0x02, %%o0 ! V flag\n" + " bnz,a .+8\n" + " and %%o0, 0x0B, %%o0 ! Z flag cleared if result is non-zero\n" + " stb %%o0, [%1]\n" + " stb %%o0, [%1 + 1]\n" + : "=&r" (value) + : "r" (flags), "r" (dst), "r" (src) + : "cc", "o0" + ); + return value; +} + +#endif /* SPARC_V9_ASSEMBLY */ + +#endif + +#else + +struct flag_struct { + unsigned int c; + unsigned int z; + unsigned int n; + unsigned int v; + unsigned int x; +}; + +extern struct flag_struct regflags; + +#define ZFLG (regflags.z) +#define NFLG (regflags.n) +#define CFLG (regflags.c) +#define VFLG (regflags.v) +#define XFLG (regflags.x) + +#define SET_CFLG(x) (CFLG = (x)) +#define SET_NFLG(x) (NFLG = (x)) +#define SET_VFLG(x) (VFLG = (x)) +#define SET_ZFLG(x) (ZFLG = (x)) +#define SET_XFLG(x) (XFLG = (x)) + +#define GET_CFLG CFLG +#define GET_NFLG NFLG +#define GET_VFLG VFLG +#define GET_ZFLG ZFLG +#define GET_XFLG XFLG + +#define CLEAR_CZNV do { \ + SET_CFLG (0); \ + SET_ZFLG (0); \ + SET_NFLG (0); \ + SET_VFLG (0); \ +} while (0) + +#define COPY_CARRY (SET_XFLG (GET_CFLG)) + +static __inline__ int cctrue(const int cc) +{ + switch(cc){ + case 0: return 1; /* T */ + case 1: return 0; /* F */ + case 2: return !CFLG && !ZFLG; /* HI */ + case 3: return CFLG || ZFLG; /* LS */ + case 4: return !CFLG; /* CC */ + case 5: return CFLG; /* CS */ + case 6: return !ZFLG; /* NE */ + case 7: return ZFLG; /* EQ */ + case 8: return !VFLG; /* VC */ + case 9: return VFLG; /* VS */ + case 10:return !NFLG; /* PL */ + case 11:return NFLG; /* MI */ + case 12:return NFLG == VFLG; /* GE */ + case 13:return NFLG != VFLG; /* LT */ + case 14:return !ZFLG && (NFLG == VFLG); /* GT */ + case 15:return ZFLG || (NFLG != VFLG); /* LE */ + } + return 0; +} + +#endif /* OPTIMIZED_FLAGS */ + +#endif /* M68K_FLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp new file mode 100644 index 000000000..7483f5064 --- /dev/null +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -0,0 +1,642 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * Memory management + * + * (c) 1995 Bernd Schmidt + * + * 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 +#include + +#include "sysdeps.h" + +#include "cpu_emulation.h" +#include "main.h" +#include "video.h" + +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" + +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + +static bool illegal_mem = false; + +#ifdef SAVE_MEMORY_BANKS +addrbank *mem_banks[65536]; +#else +addrbank mem_banks[65536]; +#endif + +#ifdef WORDS_BIGENDIAN +# define swap_words(X) (X) +#else +# define swap_words(X) (((X) >> 16) | ((X) << 16)) +#endif + +#ifdef NO_INLINE_MEMORY_ACCESS +uae_u32 longget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).lget, addr); +} +uae_u32 wordget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).wget, addr); +} +uae_u32 byteget (uaecptr addr) +{ + return call_mem_get_func (get_mem_bank (addr).bget, addr); +} +void longput (uaecptr addr, uae_u32 l) +{ + call_mem_put_func (get_mem_bank (addr).lput, addr, l); +} +void wordput (uaecptr addr, uae_u32 w) +{ + call_mem_put_func (get_mem_bank (addr).wput, addr, w); +} +void byteput (uaecptr addr, uae_u32 b) +{ + call_mem_put_func (get_mem_bank (addr).bput, addr, b); +} +#endif + +/* A dummy bank that only contains zeros */ + +static uae_u32 REGPARAM2 dummy_lget (uaecptr) REGPARAM; +static uae_u32 REGPARAM2 dummy_wget (uaecptr) REGPARAM; +static uae_u32 REGPARAM2 dummy_bget (uaecptr) REGPARAM; +static void REGPARAM2 dummy_lput (uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 dummy_wput (uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 dummy_bput (uaecptr, uae_u32) REGPARAM; + +uae_u32 REGPARAM2 dummy_lget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal lget at %08x\n", addr); + + return 0; +} + +uae_u32 REGPARAM2 dummy_wget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal wget at %08x\n", addr); + + return 0; +} + +uae_u32 REGPARAM2 dummy_bget (uaecptr addr) +{ + if (illegal_mem) + write_log ("Illegal bget at %08x\n", addr); + + return 0; +} + +void REGPARAM2 dummy_lput (uaecptr addr, uae_u32 l) +{ + if (illegal_mem) + write_log ("Illegal lput at %08x\n", addr); +} +void REGPARAM2 dummy_wput (uaecptr addr, uae_u32 w) +{ + if (illegal_mem) + write_log ("Illegal wput at %08x\n", addr); +} +void REGPARAM2 dummy_bput (uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal bput at %08x\n", addr); +} + +/* Mac RAM (32 bit addressing) */ + +static uae_u32 REGPARAM2 ram_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram_bget(uaecptr) REGPARAM; +static void REGPARAM2 ram_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) REGPARAM; + +static uintptr RAMBaseDiff; // RAMBaseHost - RAMBaseMac + +uae_u32 REGPARAM2 ram_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 ram_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 ram_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(RAMBaseDiff + addr); +} + +void REGPARAM2 ram_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + addr); + do_put_mem_long(m, l); +} + +void REGPARAM2 ram_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + addr); + do_put_mem_word(m, w); +} + +void REGPARAM2 ram_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(RAMBaseDiff + addr) = b; +} + +uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) +{ + return (uae_u8 *)(RAMBaseDiff + addr); +} + +/* Mac RAM (24 bit addressing) */ + +static uae_u32 REGPARAM2 ram24_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram24_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 ram24_bget(uaecptr) REGPARAM; +static void REGPARAM2 ram24_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram24_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 ram24_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) REGPARAM; + +uae_u32 REGPARAM2 ram24_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 ram24_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 ram24_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); +} + +void REGPARAM2 ram24_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_long(m, l); +} + +void REGPARAM2 ram24_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_word(m, w); +} + +void REGPARAM2 ram24_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; +} + +uae_u8 *REGPARAM2 ram24_xlate(uaecptr addr) +{ + return (uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)); +} + +/* Mac ROM (32 bit addressing) */ + +static uae_u32 REGPARAM2 rom_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom_bget(uaecptr) REGPARAM; +static void REGPARAM2 rom_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 rom_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 rom_bput(uaecptr, uae_u32) REGPARAM; +static uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) REGPARAM; + +static uintptr ROMBaseDiff; // ROMBaseHost - ROMBaseMac + +uae_u32 REGPARAM2 rom_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(ROMBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 rom_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(ROMBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 rom_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(ROMBaseDiff + addr); +} + +void REGPARAM2 rom_lput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM lput at %08x\n", addr); +} + +void REGPARAM2 rom_wput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM wput at %08x\n", addr); +} + +void REGPARAM2 rom_bput(uaecptr addr, uae_u32 b) +{ + if (illegal_mem) + write_log ("Illegal ROM bput at %08x\n", addr); +} + +uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) +{ + return (uae_u8 *)(ROMBaseDiff + addr); +} + +/* Mac ROM (24 bit addressing) */ + +static uae_u32 REGPARAM2 rom24_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom24_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 rom24_bget(uaecptr) REGPARAM; +static uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) REGPARAM; + +uae_u32 REGPARAM2 rom24_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(ROMBaseDiff + (addr & 0xffffff)); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 rom24_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(ROMBaseDiff + (addr & 0xffffff)); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 rom24_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); +} + +uae_u8 *REGPARAM2 rom24_xlate(uaecptr addr) +{ + return (uae_u8 *)(ROMBaseDiff + (addr & 0xffffff)); +} + +/* Frame buffer */ + +static uae_u32 REGPARAM2 frame_direct_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_direct_wget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_direct_bget(uaecptr) REGPARAM; +static void REGPARAM2 frame_direct_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_direct_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_direct_bput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_555_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_host_555_wget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_555_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_host_555_wput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_565_lget(uaecptr) REGPARAM; +static uae_u32 REGPARAM2 frame_host_565_wget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_565_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 frame_host_565_wput(uaecptr, uae_u32) REGPARAM; + +static uae_u32 REGPARAM2 frame_host_888_lget(uaecptr) REGPARAM; +static void REGPARAM2 frame_host_888_lput(uaecptr, uae_u32) REGPARAM; + +static uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) REGPARAM; + +static uintptr FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac + +uae_u32 REGPARAM2 frame_direct_lget(uaecptr addr) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + return do_get_mem_long(m); +} + +uae_u32 REGPARAM2 frame_direct_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + return do_get_mem_word(m); +} + +uae_u32 REGPARAM2 frame_direct_bget(uaecptr addr) +{ + return (uae_u32)*(uae_u8 *)(FrameBaseDiff + addr); +} + +void REGPARAM2 frame_direct_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + do_put_mem_long(m, l); +} + +void REGPARAM2 frame_direct_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + do_put_mem_word(m, w); +} + +void REGPARAM2 frame_direct_bput(uaecptr addr, uae_u32 b) +{ + *(uae_u8 *)(FrameBaseDiff + addr) = b; +} + +uae_u32 REGPARAM2 frame_host_555_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = *m; + return swap_words(l); +} + +uae_u32 REGPARAM2 frame_host_555_wget(uaecptr addr) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + return *m; +} + +void REGPARAM2 frame_host_555_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + *m = swap_words(l); +} + +void REGPARAM2 frame_host_555_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + *m = w; +} + +uae_u32 REGPARAM2 frame_host_565_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = *m; + l = (l & 0x001f001f) | ((l >> 1) & 0x7fe07fe0); + return swap_words(l); +} + +uae_u32 REGPARAM2 frame_host_565_wget(uaecptr addr) +{ + uae_u16 *m, w; + m = (uae_u16 *)(FrameBaseDiff + addr); + w = *m; + return (w & 0x1f) | ((w >> 1) & 0x7fe0); +} + +void REGPARAM2 frame_host_565_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(FrameBaseDiff + addr); + l = (l & 0x001f001f) | ((l << 1) & 0xffc0ffc0); + *m = swap_words(l); +} + +void REGPARAM2 frame_host_565_wput(uaecptr addr, uae_u32 w) +{ + uae_u16 *m; + m = (uae_u16 *)(FrameBaseDiff + addr); + *m = (w & 0x1f) | ((w << 1) & 0xffc0); +} + +uae_u32 REGPARAM2 frame_host_888_lget(uaecptr addr) +{ + uae_u32 *m, l; + m = (uae_u32 *)(FrameBaseDiff + addr); + return *m; +} + +void REGPARAM2 frame_host_888_lput(uaecptr addr, uae_u32 l) +{ + uae_u32 *m; + m = (uae_u32 *)(MacFrameBaseHost + addr - MacFrameBaseMac); + *m = l; +} + +uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) +{ + return (uae_u8 *)(FrameBaseDiff + addr); +} + +/* Mac framebuffer RAM (24 bit addressing) + * + * This works by duplicating appropriate writes to the 32-bit + * address-space framebuffer. + */ + +static void REGPARAM2 fram24_lput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 fram24_wput(uaecptr, uae_u32) REGPARAM; +static void REGPARAM2 fram24_bput(uaecptr, uae_u32) REGPARAM; + +void REGPARAM2 fram24_lput(uaecptr addr, uae_u32 l) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + uae_u32 *fm; + fm = (uae_u32 *)(MacFrameBaseHost + page_off - 0xa700); + do_put_mem_long(fm, l); + } + + uae_u32 *m; + m = (uae_u32 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_long(m, l); +} + +void REGPARAM2 fram24_wput(uaecptr addr, uae_u32 w) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + uae_u16 *fm; + fm = (uae_u16 *)(MacFrameBaseHost + page_off - 0xa700); + do_put_mem_word(fm, w); + } + + uae_u16 *m; + m = (uae_u16 *)(RAMBaseDiff + (addr & 0xffffff)); + do_put_mem_word(m, w); +} + +void REGPARAM2 fram24_bput(uaecptr addr, uae_u32 b) +{ + uaecptr page_off = addr & 0xffff; + if (0xa700 <= page_off && page_off < 0xfc80) { + *(uae_u8 *)(MacFrameBaseHost + page_off - 0xa700) = b; + } + + *(uae_u8 *)(RAMBaseDiff + (addr & 0xffffff)) = b; +} + +/* Default memory access functions */ + +uae_u8 *REGPARAM2 default_xlate (uaecptr a) +{ + write_log("Your Mac program just did something terribly stupid\n"); + return NULL; +} + +/* Address banks */ + +addrbank dummy_bank = { + dummy_lget, dummy_wget, dummy_bget, + dummy_lput, dummy_wput, dummy_bput, + default_xlate +}; + +addrbank ram_bank = { + ram_lget, ram_wget, ram_bget, + ram_lput, ram_wput, ram_bput, + ram_xlate +}; + +addrbank ram24_bank = { + ram24_lget, ram24_wget, ram24_bget, + ram24_lput, ram24_wput, ram24_bput, + ram24_xlate +}; + +addrbank rom_bank = { + rom_lget, rom_wget, rom_bget, + rom_lput, rom_wput, rom_bput, + rom_xlate +}; + +addrbank rom24_bank = { + rom24_lget, rom24_wget, rom24_bget, + rom_lput, rom_wput, rom_bput, + rom24_xlate +}; + +addrbank frame_direct_bank = { + frame_direct_lget, frame_direct_wget, frame_direct_bget, + frame_direct_lput, frame_direct_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_555_bank = { + frame_host_555_lget, frame_host_555_wget, frame_direct_bget, + frame_host_555_lput, frame_host_555_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_565_bank = { + frame_host_565_lget, frame_host_565_wget, frame_direct_bget, + frame_host_565_lput, frame_host_565_wput, frame_direct_bput, + frame_xlate +}; + +addrbank frame_host_888_bank = { + frame_host_888_lget, frame_direct_wget, frame_direct_bget, + frame_host_888_lput, frame_direct_wput, frame_direct_bput, + frame_xlate +}; + +addrbank fram24_bank = { + ram24_lget, ram24_wget, ram24_bget, + fram24_lput, fram24_wput, fram24_bput, + ram24_xlate +}; + +void memory_init(void) +{ + for(long i=0; i<65536; i++) + put_mem_bank(i<<16, &dummy_bank); + + // Limit RAM size to not overlap ROM + uint32 ram_size = RAMSize > ROMBaseMac ? ROMBaseMac : RAMSize; + + RAMBaseDiff = (uintptr)RAMBaseHost - (uintptr)RAMBaseMac; + ROMBaseDiff = (uintptr)ROMBaseHost - (uintptr)ROMBaseMac; + FrameBaseDiff = (uintptr)MacFrameBaseHost - (uintptr)MacFrameBaseMac; + + // Map RAM, ROM and display + if (TwentyFourBitAddressing) { + map_banks(&ram24_bank, RAMBaseMac >> 16, ram_size >> 16); + map_banks(&rom24_bank, ROMBaseMac >> 16, ROMSize >> 16); + + // Map frame buffer at end of RAM. + map_banks(&fram24_bank, ((RAMBaseMac + ram_size) >> 16) - 1, 1); + } else { + map_banks(&ram_bank, RAMBaseMac >> 16, ram_size >> 16); + map_banks(&rom_bank, ROMBaseMac >> 16, ROMSize >> 16); + + // Map frame buffer + switch (MacFrameLayout) { + case FLAYOUT_DIRECT: + map_banks(&frame_direct_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_555: + map_banks(&frame_host_555_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_565: + map_banks(&frame_host_565_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + case FLAYOUT_HOST_888: + map_banks(&frame_host_888_bank, MacFrameBaseMac >> 16, (MacFrameSize >> 16) + 1); + break; + } + } +} + +void map_banks(addrbank *bank, int start, int size) +{ + int bnr; + unsigned long int hioffs = 0, endhioffs = 0x100; + + if (start >= 0x100) { + for (bnr = start; bnr < start + size; bnr++) + put_mem_bank (bnr << 16, bank); + return; + } + if (TwentyFourBitAddressing) endhioffs = 0x10000; + for (hioffs = 0; hioffs < endhioffs; hioffs += 0x100) + for (bnr = start; bnr < start+size; bnr++) + put_mem_bank((bnr + hioffs) << 16, bank); +} + +#endif /* !REAL_ADDRESSING && !DIRECT_ADDRESSING */ + diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h new file mode 100644 index 000000000..75a6303ba --- /dev/null +++ b/BasiliskII/src/uae_cpu/memory.h @@ -0,0 +1,207 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * memory management + * + * Copyright 1995 Bernd Schmidt + * + * 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 UAE_MEMORY_H +#define UAE_MEMORY_H + +#if !DIRECT_ADDRESSING && !REAL_ADDRESSING + +/* Enabling this adds one additional native memory reference per 68k memory + * access, but saves one shift (on the x86). Enabling this is probably + * better for the cache. My favourite benchmark (PP2) doesn't show a + * difference, so I leave this enabled. */ + +#if 1 || defined SAVE_MEMORY +#define SAVE_MEMORY_BANKS +#endif + +typedef uae_u32 (REGPARAM2 *mem_get_func)(uaecptr) REGPARAM; +typedef void (REGPARAM2 *mem_put_func)(uaecptr, uae_u32) REGPARAM; +typedef uae_u8 *(REGPARAM2 *xlate_func)(uaecptr) REGPARAM; + +#undef DIRECT_MEMFUNCS_SUCCESSFUL + +#ifndef CAN_MAP_MEMORY +#undef USE_COMPILER +#endif + +#if defined(USE_COMPILER) && !defined(USE_MAPPED_MEMORY) +#define USE_MAPPED_MEMORY +#endif + +typedef struct { + /* These ones should be self-explanatory... */ + mem_get_func lget, wget, bget; + mem_put_func lput, wput, bput; + /* Use xlateaddr to translate an Amiga address to a uae_u8 * that can + * be used to address memory without calling the wget/wput functions. + * This doesn't work for all memory banks, so this function may call + * abort(). */ + xlate_func xlateaddr; +} addrbank; + +extern uae_u8 filesysory[65536]; + +extern addrbank ram_bank; // Mac RAM +extern addrbank rom_bank; // Mac ROM +extern addrbank frame_bank; // Frame buffer + +/* Default memory access functions */ + +extern uae_u8 *REGPARAM2 default_xlate(uaecptr addr) REGPARAM; + +#define bankindex(addr) (((uaecptr)(addr)) >> 16) + +#ifdef SAVE_MEMORY_BANKS +extern addrbank *mem_banks[65536]; +#define get_mem_bank(addr) (*mem_banks[bankindex(addr)]) +#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = (b)) +#else +extern addrbank mem_banks[65536]; +#define get_mem_bank(addr) (mem_banks[bankindex(addr)]) +#define put_mem_bank(addr, b) (mem_banks[bankindex(addr)] = *(b)) +#endif + +extern void memory_init(void); +extern void map_banks(addrbank *bank, int first, int count); + +#ifndef NO_INLINE_MEMORY_ACCESS + +#define longget(addr) (call_mem_get_func(get_mem_bank(addr).lget, addr)) +#define wordget(addr) (call_mem_get_func(get_mem_bank(addr).wget, addr)) +#define byteget(addr) (call_mem_get_func(get_mem_bank(addr).bget, addr)) +#define longput(addr,l) (call_mem_put_func(get_mem_bank(addr).lput, addr, l)) +#define wordput(addr,w) (call_mem_put_func(get_mem_bank(addr).wput, addr, w)) +#define byteput(addr,b) (call_mem_put_func(get_mem_bank(addr).bput, addr, b)) + +#else + +extern uae_u32 longget(uaecptr addr); +extern uae_u32 wordget(uaecptr addr); +extern uae_u32 byteget(uaecptr addr); +extern void longput(uaecptr addr, uae_u32 l); +extern void wordput(uaecptr addr, uae_u32 w); +extern void byteput(uaecptr addr, uae_u32 b); + +#endif + +#ifndef MD_HAVE_MEM_1_FUNCS + +#define longget_1 longget +#define wordget_1 wordget +#define byteget_1 byteget +#define longput_1 longput +#define wordput_1 wordput +#define byteput_1 byteput + +#endif + +#endif /* !DIRECT_ADDRESSING && !REAL_ADDRESSING */ + +#if REAL_ADDRESSING +const uintptr MEMBaseDiff = 0; +#elif DIRECT_ADDRESSING +extern uintptr MEMBaseDiff; +#endif + +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static __inline__ uae_u8 *do_get_real_address(uaecptr addr) +{ + return (uae_u8 *)MEMBaseDiff + addr; +} +static __inline__ uae_u32 do_get_virtual_address(uae_u8 *addr) +{ + return (uintptr)addr - MEMBaseDiff; +} +static __inline__ uae_u32 get_long(uaecptr addr) +{ + uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); + return do_get_mem_long(m); +} +static __inline__ uae_u32 get_word(uaecptr addr) +{ + uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); + return do_get_mem_word(m); +} +static __inline__ uae_u32 get_byte(uaecptr addr) +{ + uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); + return do_get_mem_byte(m); +} +static __inline__ void put_long(uaecptr addr, uae_u32 l) +{ + uae_u32 * const m = (uae_u32 *)do_get_real_address(addr); + do_put_mem_long(m, l); +} +static __inline__ void put_word(uaecptr addr, uae_u32 w) +{ + uae_u16 * const m = (uae_u16 *)do_get_real_address(addr); + do_put_mem_word(m, w); +} +static __inline__ void put_byte(uaecptr addr, uae_u32 b) +{ + uae_u8 * const m = (uae_u8 *)do_get_real_address(addr); + do_put_mem_byte(m, b); +} +static __inline__ uae_u8 *get_real_address(uaecptr addr) +{ + return do_get_real_address(addr); +} +static __inline__ uae_u32 get_virtual_address(uae_u8 *addr) +{ + return do_get_virtual_address(addr); +} +#else +static __inline__ uae_u32 get_long(uaecptr addr) +{ + return longget_1(addr); +} +static __inline__ uae_u32 get_word(uaecptr addr) +{ + return wordget_1(addr); +} +static __inline__ uae_u32 get_byte(uaecptr addr) +{ + return byteget_1(addr); +} +static __inline__ void put_long(uaecptr addr, uae_u32 l) +{ + longput_1(addr, l); +} +static __inline__ void put_word(uaecptr addr, uae_u32 w) +{ + wordput_1(addr, w); +} +static __inline__ void put_byte(uaecptr addr, uae_u32 b) +{ + byteput_1(addr, b); +} +static __inline__ uae_u8 *get_real_address(uaecptr addr) +{ + return get_mem_bank(addr).xlateaddr(addr); +} +/* gb-- deliberately not implemented since it shall not be used... */ +extern uae_u32 get_virtual_address(uae_u8 *addr); +#endif /* DIRECT_ADDRESSING || REAL_ADDRESSING */ + +#endif /* MEMORY_H */ + diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp new file mode 100644 index 000000000..d13a60785 --- /dev/null +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -0,0 +1,1513 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * (c) 1995 Bernd Schmidt + * + * 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 +#include +#include + +#include "sysdeps.h" + +#include "cpu_emulation.h" +#include "main.h" +#include "emul_op.h" + +extern int intlev(void); // From baisilisk_glue.cpp + +#include "m68k.h" +#include "memory.h" +#include "readcpu.h" +#include "newcpu.h" +#include "compiler/compemu.h" +#include "fpu/fpu.h" + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) +B2_mutex *spcflags_lock = NULL; +#endif + +bool quit_program = false; +struct flag_struct regflags; + +/* Opcode of faulting instruction */ +uae_u16 last_op_for_exception_3; +/* PC at fault time */ +uaecptr last_addr_for_exception_3; +/* Address that generated the exception */ +uaecptr last_fault_for_exception_3; + +int areg_byteinc[] = { 1,1,1,1,1,1,1,2 }; +int imm8_table[] = { 8,1,2,3,4,5,6,7 }; + +int movem_index1[256]; +int movem_index2[256]; +int movem_next[256]; + +cpuop_func *cpufunctbl[65536]; + +#if FLIGHT_RECORDER +struct rec_step { + uae_u32 pc; +#if FLIGHT_RECORDER >= 2 + uae_u32 d[8]; + uae_u32 a[8]; +#endif +}; + +const int LOG_SIZE = 32768; +static rec_step log[LOG_SIZE]; +static int log_ptr = -1; // First time initialization + +static const char *log_filename(void) +{ + const char *name = getenv("M68K_LOG_FILE"); + return name ? name : "log.68k"; +} + +void m68k_record_step(uaecptr pc) +{ +#if FLIGHT_RECORDER >= 2 + /* XXX: if LSB is set, we are recording from generated code and we + don't support registers recording yet. */ + if ((pc & 1) == 0) { + for (int i = 0; i < 8; i++) { + log[log_ptr].d[i] = m68k_dreg(regs, i); + log[log_ptr].a[i] = m68k_areg(regs, i); + } + } +#endif + log[log_ptr].pc = pc; + log_ptr = (log_ptr + 1) % LOG_SIZE; +} + +static void dump_log(void) +{ + FILE *f = fopen(log_filename(), "w"); + if (f == NULL) + return; + for (int i = 0; i < LOG_SIZE; i++) { + int j = (i + log_ptr) % LOG_SIZE; + uae_u32 pc = log[j].pc & ~1; + fprintf(f, "pc %08x", pc); +#if FLIGHT_RECORDER >= 2 + fprintf(f, "\n"); + if ((log[j].pc & 1) == 0) { + fprintf(f, "d0 %08x d1 %08x d2 %08x d3 %08x\n", log[j].d[0], log[j].d[1], log[j].d[2], log[j].d[3]); + fprintf(f, "d4 %08x d5 %08x d6 %08x d7 %08x\n", log[j].d[4], log[j].d[5], log[j].d[6], log[j].d[7]); + fprintf(f, "a0 %08x a1 %08x a2 %08x a3 %08x\n", log[j].a[0], log[j].a[1], log[j].a[2], log[j].a[3]); + fprintf(f, "a4 %08x a5 %08x a6 %08x a7 %08x\n", log[j].a[4], log[j].a[5], log[j].a[6], log[j].a[7]); + } +#else + fprintf(f, " | "); +#endif +#if ENABLE_MON + disass_68k(f, pc); +#endif + } + fclose(f); +} +#endif + +#if ENABLE_MON +static void dump_regs(void) +{ + m68k_dumpstate(NULL); +} +#endif + +#define COUNT_INSTRS 0 + +#if COUNT_INSTRS +static unsigned long int instrcount[65536]; +static uae_u16 opcodenums[65536]; + +static int compfn (const void *el1, const void *el2) +{ + return instrcount[*(const uae_u16 *)el1] < instrcount[*(const uae_u16 *)el2]; +} + +static char *icountfilename (void) +{ + char *name = getenv ("INSNCOUNT"); + if (name) + return name; + return COUNT_INSTRS == 2 ? "frequent.68k" : "insncount"; +} + +void dump_counts (void) +{ + FILE *f = fopen (icountfilename (), "w"); + unsigned long int total; + int i; + + write_log ("Writing instruction count file...\n"); + for (i = 0; i < 65536; i++) { + opcodenums[i] = i; + total += instrcount[i]; + } + qsort (opcodenums, 65536, sizeof(uae_u16), compfn); + + fprintf (f, "Total: %lu\n", total); + for (i=0; i < 65536; i++) { + unsigned long int cnt = instrcount[opcodenums[i]]; + struct instr *dp; + struct mnemolookup *lookup; + if (!cnt) + break; + dp = table68k + opcodenums[i]; + for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) + ; + fprintf (f, "%04x: %lu %s\n", opcodenums[i], cnt, lookup->name); + } + fclose (f); +} +#else +void dump_counts (void) +{ +} +#endif + +int broken_in; + +static __inline__ unsigned int cft_map (unsigned int f) +{ +#ifndef HAVE_GET_WORD_UNSWAPPED + return f; +#else + return ((f >> 8) & 255) | ((f & 255) << 8); +#endif +} + +void REGPARAM2 op_illg_1 (uae_u32 opcode) REGPARAM; + +void REGPARAM2 op_illg_1 (uae_u32 opcode) +{ + op_illg (cft_map (opcode)); +} + +static void build_cpufunctbl (void) +{ + int i; + unsigned long opcode; + unsigned int cpu_level = 0; // 68000 (default) + if (CPUType == 4) + cpu_level = 4; // 68040 with FPU + else { + if (FPUType) + cpu_level = 3; // 68020 with FPU + else if (CPUType >= 2) + cpu_level = 2; // 68020 + else if (CPUType == 1) + cpu_level = 1; + } + struct cputbl *tbl = ( + cpu_level == 4 ? op_smalltbl_0_ff + : cpu_level == 3 ? op_smalltbl_1_ff + : cpu_level == 2 ? op_smalltbl_2_ff + : cpu_level == 1 ? op_smalltbl_3_ff + : op_smalltbl_4_ff); + + for (opcode = 0; opcode < 65536; opcode++) + cpufunctbl[cft_map (opcode)] = op_illg_1; + for (i = 0; tbl[i].handler != NULL; i++) { + if (! tbl[i].specific) + cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; + } + for (opcode = 0; opcode < 65536; opcode++) { + cpuop_func *f; + + if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level) + continue; + + if (table68k[opcode].handler != -1) { + f = cpufunctbl[cft_map (table68k[opcode].handler)]; + if (f == op_illg_1) + abort(); + cpufunctbl[cft_map (opcode)] = f; + } + } + for (i = 0; tbl[i].handler != NULL; i++) { + if (tbl[i].specific) + cpufunctbl[cft_map (tbl[i].opcode)] = tbl[i].handler; + } +} + +void init_m68k (void) +{ + int i; + + for (i = 0 ; i < 256 ; i++) { + int j; + for (j = 0 ; j < 8 ; j++) { + if (i & (1 << j)) break; + } + movem_index1[i] = j; + movem_index2[i] = 7-j; + movem_next[i] = i & (~(1 << j)); + } +#if COUNT_INSTRS + { + FILE *f = fopen (icountfilename (), "r"); + memset (instrcount, 0, sizeof instrcount); + if (f) { + uae_u32 opcode, count, total; + char name[20]; + write_log ("Reading instruction count file...\n"); + fscanf (f, "Total: %lu\n", &total); + while (fscanf (f, "%lx: %lu %s\n", &opcode, &count, name) == 3) { + instrcount[opcode] = count; + } + fclose(f); + } + } +#endif + read_table68k (); + do_merges (); + + build_cpufunctbl (); + +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + spcflags_lock = B2_create_mutex(); +#endif + fpu_init(CPUType == 4); +} + +void exit_m68k (void) +{ + fpu_exit (); +#if defined(ENABLE_EXCLUSIVE_SPCFLAGS) && !defined(HAVE_HARDWARE_LOCKS) + B2_delete_mutex(spcflags_lock); +#endif +} + +struct regstruct regs, lastint_regs; +static struct regstruct regs_backup[16]; +static int backup_pointer = 0; +static long int m68kpc_offset; +int lastint_no; + +#if REAL_ADDRESSING || DIRECT_ADDRESSING +#define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) +#define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) +#define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) +#else +#define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1) +#define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) +#define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o)) +#endif + +uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf) +{ + uae_u16 dp; + uae_s8 disp8; + uae_s16 disp16; + int r; + uae_u32 dispreg; + uaecptr addr; + uae_s32 offset = 0; + char buffer[80]; + + switch (mode){ + case Dreg: + sprintf (buffer,"D%d", reg); + break; + case Areg: + sprintf (buffer,"A%d", reg); + break; + case Aind: + sprintf (buffer,"(A%d)", reg); + break; + case Aipi: + sprintf (buffer,"(A%d)+", reg); + break; + case Apdi: + sprintf (buffer,"-(A%d)", reg); + break; + case Ad16: + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr = m68k_areg(regs,reg) + (uae_s16)disp16; + sprintf (buffer,"(A%d,$%04x) == $%08lx", reg, disp16 & 0xffff, + (unsigned long)addr); + break; + case Ad8r: + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0, disp = 0; + uae_s32 base = m68k_areg(regs,reg); + char name[10]; + sprintf (name,"A%d, ",reg); + if (dp & 0x80) { base = 0; name[0] = 0; } + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), + disp,outer, + (unsigned long)addr); + } else { + addr = m68k_areg(regs,reg) + (uae_s32)((uae_s8)disp8) + dispreg; + sprintf (buffer,"(A%d, %c%d.%c*%d, $%02x) == $%08lx", reg, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), disp8, + (unsigned long)addr); + } + break; + case PC16: + addr = m68k_getpc () + m68kpc_offset; + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr += (uae_s16)disp16; + sprintf (buffer,"(PC,$%04x) == $%08lx", disp16 & 0xffff,(unsigned long)addr); + break; + case PC8r: + addr = m68k_getpc () + m68kpc_offset; + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0,disp = 0; + uae_s32 base = addr; + char name[10]; + sprintf (name,"PC, "); + if (dp & 0x80) { base = 0; name[0] = 0; } + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + sprintf (buffer,"(%s%c%d.%c*%d+%d)+%d == $%08lx", name, + dp & 0x8000 ? 'A' : 'D', (int)r, dp & 0x800 ? 'L' : 'W', + 1 << ((dp >> 9) & 3), + disp,outer, + (unsigned long)addr); + } else { + addr += (uae_s32)((uae_s8)disp8) + dispreg; + sprintf (buffer,"(PC, %c%d.%c*%d, $%02x) == $%08lx", dp & 0x8000 ? 'A' : 'D', + (int)r, dp & 0x800 ? 'L' : 'W', 1 << ((dp >> 9) & 3), + disp8, (unsigned long)addr); + } + break; + case absw: + sprintf (buffer,"$%08lx", (unsigned long)(uae_s32)(uae_s16)get_iword_1 (m68kpc_offset)); + m68kpc_offset += 2; + break; + case absl: + sprintf (buffer,"$%08lx", (unsigned long)get_ilong_1 (m68kpc_offset)); + m68kpc_offset += 4; + break; + case imm: + switch (size){ + case sz_byte: + sprintf (buffer,"#$%02x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xff)); + m68kpc_offset += 2; + break; + case sz_word: + sprintf (buffer,"#$%04x", (unsigned int)(get_iword_1 (m68kpc_offset) & 0xffff)); + m68kpc_offset += 2; + break; + case sz_long: + sprintf (buffer,"#$%08lx", (unsigned long)(get_ilong_1 (m68kpc_offset))); + m68kpc_offset += 4; + break; + default: + break; + } + break; + case imm0: + offset = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + sprintf (buffer,"#$%02x", (unsigned int)(offset & 0xff)); + break; + case imm1: + offset = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + sprintf (buffer,"#$%04x", (unsigned int)(offset & 0xffff)); + break; + case imm2: + offset = (uae_s32)get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + sprintf (buffer,"#$%08lx", (unsigned long)offset); + break; + case immi: + offset = (uae_s32)(uae_s8)(reg & 0xff); + sprintf (buffer,"#$%08lx", (unsigned long)offset); + break; + default: + break; + } + if (buf == 0) + printf ("%s", buffer); + else + strcat (buf, buffer); + return offset; +} + +/* The plan is that this will take over the job of exception 3 handling - + * the CPU emulation functions will just do a longjmp to m68k_go whenever + * they hit an odd address. */ +static int verify_ea (int reg, amodes mode, wordsizes size, uae_u32 *val) +{ + uae_u16 dp; + uae_s8 disp8; + uae_s16 disp16; + int r; + uae_u32 dispreg; + uaecptr addr; + uae_s32 offset = 0; + + switch (mode){ + case Dreg: + *val = m68k_dreg (regs, reg); + return 1; + case Areg: + *val = m68k_areg (regs, reg); + return 1; + + case Aind: + case Aipi: + addr = m68k_areg (regs, reg); + break; + case Apdi: + addr = m68k_areg (regs, reg); + break; + case Ad16: + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr = m68k_areg(regs,reg) + (uae_s16)disp16; + break; + case Ad8r: + addr = m68k_areg (regs, reg); +d8r_common: + dp = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + disp8 = dp & 0xFF; + r = (dp & 0x7000) >> 12; + dispreg = dp & 0x8000 ? m68k_areg(regs,r) : m68k_dreg(regs,r); + if (!(dp & 0x800)) dispreg = (uae_s32)(uae_s16)(dispreg); + dispreg <<= (dp >> 9) & 3; + + if (dp & 0x100) { + uae_s32 outer = 0, disp = 0; + uae_s32 base = addr; + if (dp & 0x80) base = 0; + if (dp & 0x40) dispreg = 0; + if ((dp & 0x30) == 0x20) { disp = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x30) == 0x30) { disp = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + base += disp; + + if ((dp & 0x3) == 0x2) { outer = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); m68kpc_offset += 2; } + if ((dp & 0x3) == 0x3) { outer = get_ilong_1 (m68kpc_offset); m68kpc_offset += 4; } + + if (!(dp & 4)) base += dispreg; + if (dp & 3) base = get_long (base); + if (dp & 4) base += dispreg; + + addr = base + outer; + } else { + addr += (uae_s32)((uae_s8)disp8) + dispreg; + } + break; + case PC16: + addr = m68k_getpc () + m68kpc_offset; + disp16 = get_iword_1 (m68kpc_offset); m68kpc_offset += 2; + addr += (uae_s16)disp16; + break; + case PC8r: + addr = m68k_getpc () + m68kpc_offset; + goto d8r_common; + case absw: + addr = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + break; + case absl: + addr = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + break; + case imm: + switch (size){ + case sz_byte: + *val = get_iword_1 (m68kpc_offset) & 0xff; + m68kpc_offset += 2; + break; + case sz_word: + *val = get_iword_1 (m68kpc_offset) & 0xffff; + m68kpc_offset += 2; + break; + case sz_long: + *val = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + break; + default: + break; + } + return 1; + case imm0: + *val = (uae_s32)(uae_s8)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + return 1; + case imm1: + *val = (uae_s32)(uae_s16)get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + return 1; + case imm2: + *val = get_ilong_1 (m68kpc_offset); + m68kpc_offset += 4; + return 1; + case immi: + *val = (uae_s32)(uae_s8)(reg & 0xff); + return 1; + default: + addr = 0; + break; + } + if ((addr & 1) == 0) + return 1; + + last_addr_for_exception_3 = m68k_getpc () + m68kpc_offset; + last_fault_for_exception_3 = addr; + return 0; +} + +uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp) +{ + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + regd <<= (dp >> 9) & 3; + if (dp & 0x100) { + uae_s32 outer = 0; + if (dp & 0x80) base = 0; + if (dp & 0x40) regd = 0; + + if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x30) == 0x30) base += next_ilong(); + + if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)next_iword(); + if ((dp & 0x3) == 0x3) outer = next_ilong(); + + if ((dp & 0x4) == 0) base += regd; + if (dp & 0x3) base = get_long (base); + if (dp & 0x4) base += regd; + + return base + outer; + } else { + return base + (uae_s32)((uae_s8)dp) + regd; + } +} + +uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp) +{ + int reg = (dp >> 12) & 15; + uae_s32 regd = regs.regs[reg]; +#if 1 + if ((dp & 0x800) == 0) + regd = (uae_s32)(uae_s16)regd; + return base + (uae_s8)dp + regd; +#else + /* Branch-free code... benchmark this again now that + * things are no longer inline. */ + uae_s32 regd16; + uae_u32 mask; + mask = ((dp & 0x800) >> 11) - 1; + regd16 = (uae_s32)(uae_s16)regd; + regd16 &= mask; + mask = ~mask; + base += (uae_s8)dp; + regd &= mask; + regd |= regd16; + return base + regd; +#endif +} + +void MakeSR (void) +{ +#if 0 + assert((regs.t1 & 1) == regs.t1); + assert((regs.t0 & 1) == regs.t0); + assert((regs.s & 1) == regs.s); + assert((regs.m & 1) == regs.m); + assert((XFLG & 1) == XFLG); + assert((NFLG & 1) == NFLG); + assert((ZFLG & 1) == ZFLG); + assert((VFLG & 1) == VFLG); + assert((CFLG & 1) == CFLG); +#endif + regs.sr = ((regs.t1 << 15) | (regs.t0 << 14) + | (regs.s << 13) | (regs.m << 12) | (regs.intmask << 8) + | (GET_XFLG << 4) | (GET_NFLG << 3) | (GET_ZFLG << 2) | (GET_VFLG << 1) + | GET_CFLG); +} + +void MakeFromSR (void) +{ + int oldm = regs.m; + int olds = regs.s; + + regs.t1 = (regs.sr >> 15) & 1; + regs.t0 = (regs.sr >> 14) & 1; + regs.s = (regs.sr >> 13) & 1; + regs.m = (regs.sr >> 12) & 1; + regs.intmask = (regs.sr >> 8) & 7; + SET_XFLG ((regs.sr >> 4) & 1); + SET_NFLG ((regs.sr >> 3) & 1); + SET_ZFLG ((regs.sr >> 2) & 1); + SET_VFLG ((regs.sr >> 1) & 1); + SET_CFLG (regs.sr & 1); + if (CPUType >= 2) { + if (olds != regs.s) { + if (olds) { + if (oldm) + regs.msp = m68k_areg(regs, 7); + else + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.usp; + } else { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + } + } else if (olds && oldm != regs.m) { + if (oldm) { + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + } else { + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.msp; + } + } + } else { + if (olds != regs.s) { + if (olds) { + regs.isp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.usp; + } else { + regs.usp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + } + } + } + + SPCFLAGS_SET( SPCFLAG_INT ); + if (regs.t1 || regs.t0) + SPCFLAGS_SET( SPCFLAG_TRACE ); + else + /* Keep SPCFLAG_DOTRACE, we still want a trace exception for + SR-modifying instructions (including STOP). */ + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); +} + +void Exception(int nr, uaecptr oldpc) +{ + uae_u32 currpc = m68k_getpc (); + MakeSR(); + if (!regs.s) { + regs.usp = m68k_areg(regs, 7); + if (CPUType >= 2) + m68k_areg(regs, 7) = regs.m ? regs.msp : regs.isp; + else + m68k_areg(regs, 7) = regs.isp; + regs.s = 1; + } + if (CPUType > 0) { + if (nr == 2 || nr == 3) { + int i; + /* @@@ this is probably wrong (?) */ + for (i = 0 ; i < 12 ; i++) { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0); + } + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0xa000 + nr * 4); + } else if (nr ==5 || nr == 6 || nr == 7 || nr == 9) { + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), oldpc); + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0x2000 + nr * 4); + } else if (regs.m && nr >= 24 && nr < 32) { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), nr * 4); + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), currpc); + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), regs.sr); + regs.sr |= (1 << 13); + regs.msp = m68k_areg(regs, 7); + m68k_areg(regs, 7) = regs.isp; + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), 0x1000 + nr * 4); + } else { + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), nr * 4); + } + } else { + if (nr == 2 || nr == 3) { + m68k_areg(regs, 7) -= 12; + /* ??????? */ + if (nr == 3) { + put_long (m68k_areg(regs, 7), last_fault_for_exception_3); + put_word (m68k_areg(regs, 7)+4, last_op_for_exception_3); + put_long (m68k_areg(regs, 7)+8, last_addr_for_exception_3); + } + write_log ("Exception!\n"); + goto kludge_me_do; + } + } + m68k_areg(regs, 7) -= 4; + put_long (m68k_areg(regs, 7), currpc); +kludge_me_do: + m68k_areg(regs, 7) -= 2; + put_word (m68k_areg(regs, 7), regs.sr); + m68k_setpc (get_long (regs.vbr + 4*nr)); + SPCFLAGS_SET( SPCFLAG_JIT_END_COMPILE ); + fill_prefetch_0 (); + regs.t1 = regs.t0 = regs.m = 0; + SPCFLAGS_CLEAR( SPCFLAG_TRACE | SPCFLAG_DOTRACE ); +} + +static void Interrupt(int nr) +{ + assert(nr < 8 && nr >= 0); + lastint_regs = regs; + lastint_no = nr; + Exception(nr+24, 0); + + regs.intmask = nr; + SPCFLAGS_SET( SPCFLAG_INT ); +} + +static int caar, cacr, tc, itt0, itt1, dtt0, dtt1, mmusr, urp, srp; + +static int movec_illg (int regno) +{ + switch (CPUType) { + case 1: + if ((regno & 0x7ff) <= 1) + return 0; + break; + case 2: + case 3: + if ((regno & 0x7ff) <= 2) + return 0; + if (regno == 3 || regno == 4) + return 0; + break; + case 4: + if ((regno & 0x7ff) <= 7) { + if (regno != 0x802) + return 0; + } + break; + } + return 1; +} + +int m68k_move2c (int regno, uae_u32 *regp) +{ + if (movec_illg (regno)) { + op_illg (0x4E7B); + return 0; + } else { + switch (regno) { + case 0: regs.sfc = *regp & 7; break; + case 1: regs.dfc = *regp & 7; break; + case 2: + cacr = *regp & (CPUType < 4 ? 0x3 : 0x80008000); +#if USE_JIT + if (CPUType < 4) { + set_cache_state(cacr&1); + if (*regp & 0x08) + flush_icache(1); + } + else { + set_cache_state(cacr&0x8000); + } +#endif + break; + case 3: tc = *regp & 0xc000; break; + case 4: itt0 = *regp & 0xffffe364; break; + case 5: itt1 = *regp & 0xffffe364; break; + case 6: dtt0 = *regp & 0xffffe364; break; + case 7: dtt1 = *regp & 0xffffe364; break; + case 0x800: regs.usp = *regp; break; + case 0x801: regs.vbr = *regp; break; + case 0x802: caar = *regp &0xfc; break; + case 0x803: regs.msp = *regp; if (regs.m == 1) m68k_areg(regs, 7) = regs.msp; break; + case 0x804: regs.isp = *regp; if (regs.m == 0) m68k_areg(regs, 7) = regs.isp; break; + case 0x805: mmusr = *regp; break; + case 0x806: urp = *regp; break; + case 0x807: srp = *regp; break; + default: + op_illg (0x4E7B); + return 0; + } + } + return 1; +} + +int m68k_movec2 (int regno, uae_u32 *regp) +{ + if (movec_illg (regno)) + { + op_illg (0x4E7A); + return 0; + } else { + switch (regno) { + case 0: *regp = regs.sfc; break; + case 1: *regp = regs.dfc; break; + case 2: *regp = cacr; break; + case 3: *regp = tc; break; + case 4: *regp = itt0; break; + case 5: *regp = itt1; break; + case 6: *regp = dtt0; break; + case 7: *regp = dtt1; break; + case 0x800: *regp = regs.usp; break; + case 0x801: *regp = regs.vbr; break; + case 0x802: *regp = caar; break; + case 0x803: *regp = regs.m == 1 ? m68k_areg(regs, 7) : regs.msp; break; + case 0x804: *regp = regs.m == 0 ? m68k_areg(regs, 7) : regs.isp; break; + case 0x805: *regp = mmusr; break; + case 0x806: *regp = urp; break; + case 0x807: *regp = srp; break; + default: + op_illg (0x4E7A); + return 0; + } + } + return 1; +} + +static __inline__ int +div_unsigned(uae_u32 src_hi, uae_u32 src_lo, uae_u32 div, uae_u32 *quot, uae_u32 *rem) +{ + uae_u32 q = 0, cbit = 0; + int i; + + if (div <= src_hi) { + return 1; + } + for (i = 0 ; i < 32 ; i++) { + cbit = src_hi & 0x80000000ul; + src_hi <<= 1; + if (src_lo & 0x80000000ul) src_hi++; + src_lo <<= 1; + q = q << 1; + if (cbit || div <= src_hi) { + q |= 1; + src_hi -= div; + } + } + *quot = q; + *rem = src_hi; + return 0; +} + +void m68k_divl (uae_u32 opcode, uae_u32 src, uae_u16 extra, uaecptr oldpc) +{ +#if defined(uae_s64) + if (src == 0) { + Exception (5, oldpc); + return; + } + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_s64)m68k_dreg(regs, extra & 7) << 32; + } + rem = a % (uae_s64)(uae_s32)src; + quot = a / (uae_s64)(uae_s32)src; + if ((quot & UVAL64(0xffffffff80000000)) != 0 + && (quot & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + if (((uae_s32)rem < 0) != ((uae_s64)a < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = (uae_u32)rem; + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + } + } else { + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u64 quot, rem; + + if (extra & 0x400) { + a &= 0xffffffffu; + a |= (uae_u64)m68k_dreg(regs, extra & 7) << 32; + } + rem = a % (uae_u64)src; + quot = a / (uae_u64)src; + if (quot > 0xffffffffu) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = (uae_u32)rem; + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)quot; + } + } +#else + if (src == 0) { + Exception (5, oldpc); + return; + } + if (extra & 0x800) { + /* signed variant */ + uae_s32 lo = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + uae_s32 hi = lo < 0 ? -1 : 0; + uae_s32 save_high; + uae_u32 quot, rem; + uae_u32 sign; + + if (extra & 0x400) { + hi = (uae_s32)m68k_dreg(regs, extra & 7); + } + save_high = hi; + sign = (hi ^ src); + if (hi < 0) { + hi = ~hi; + lo = -lo; + if (lo == 0) hi++; + } + if ((uae_s32)src < 0) src = -src; + if (div_unsigned(hi, lo, src, ", &rem) || + (sign & 0x80000000) ? quot > 0x80000000 : quot > 0x7fffffff) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + if (sign & 0x80000000) quot = -quot; + if (((uae_s32)rem < 0) != (save_high < 0)) rem = -rem; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } + } else { + /* unsigned */ + uae_u32 lo = (uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + uae_u32 hi = 0; + uae_u32 quot, rem; + + if (extra & 0x400) { + hi = (uae_u32)m68k_dreg(regs, extra & 7); + } + if (div_unsigned(hi, lo, src, ", &rem)) { + SET_VFLG (1); + SET_NFLG (1); + SET_CFLG (0); + } else { + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (((uae_s32)quot) == 0); + SET_NFLG (((uae_s32)quot) < 0); + m68k_dreg(regs, extra & 7) = rem; + m68k_dreg(regs, (extra >> 12) & 7) = quot; + } + } +#endif +} + +static __inline__ void +mul_unsigned(uae_u32 src1, uae_u32 src2, uae_u32 *dst_hi, uae_u32 *dst_lo) +{ + uae_u32 r0 = (src1 & 0xffff) * (src2 & 0xffff); + uae_u32 r1 = ((src1 >> 16) & 0xffff) * (src2 & 0xffff); + uae_u32 r2 = (src1 & 0xffff) * ((src2 >> 16) & 0xffff); + uae_u32 r3 = ((src1 >> 16) & 0xffff) * ((src2 >> 16) & 0xffff); + uae_u32 lo; + + lo = r0 + ((r1 << 16) & 0xffff0000ul); + if (lo < r0) r3++; + r0 = lo; + lo = r0 + ((r2 << 16) & 0xffff0000ul); + if (lo < r0) r3++; + r3 += ((r1 >> 16) & 0xffff) + ((r2 >> 16) & 0xffff); + *dst_lo = lo; + *dst_hi = r3; +} + +void m68k_mull (uae_u32 opcode, uae_u32 src, uae_u16 extra) +{ +#if defined(uae_s64) + if (extra & 0x800) { + /* signed variant */ + uae_s64 a = (uae_s64)(uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_s64)(uae_s32)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (a < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff80000000)) != 0 + && (a & UVAL64(0xffffffff80000000)) != UVAL64(0xffffffff80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + } else { + /* unsigned */ + uae_u64 a = (uae_u64)(uae_u32)m68k_dreg(regs, (extra >> 12) & 7); + + a *= (uae_u64)src; + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (a == 0); + SET_NFLG (((uae_s64)a) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = a >> 32; + else if ((a & UVAL64(0xffffffff00000000)) != 0) { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = (uae_u32)a; + } +#else + if (extra & 0x800) { + /* signed variant */ + uae_s32 src1,src2; + uae_u32 dst_lo,dst_hi; + uae_u32 sign; + + src1 = (uae_s32)src; + src2 = (uae_s32)m68k_dreg(regs, (extra >> 12) & 7); + sign = (src1 ^ src2); + if (src1 < 0) src1 = -src1; + if (src2 < 0) src2 = -src2; + mul_unsigned((uae_u32)src1,(uae_u32)src2,&dst_hi,&dst_lo); + if (sign & 0x80000000) { + dst_hi = ~dst_hi; + dst_lo = -dst_lo; + if (dst_lo == 0) dst_hi++; + } + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if ((dst_hi != 0 || (dst_lo & 0x80000000) != 0) + && ((dst_hi & 0xffffffff) != 0xffffffff + || (dst_lo & 0x80000000) != 0x80000000)) + { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + } else { + /* unsigned */ + uae_u32 dst_lo,dst_hi; + + mul_unsigned(src,(uae_u32)m68k_dreg(regs, (extra >> 12) & 7),&dst_hi,&dst_lo); + + SET_VFLG (0); + SET_CFLG (0); + SET_ZFLG (dst_hi == 0 && dst_lo == 0); + SET_NFLG (((uae_s32)dst_hi) < 0); + if (extra & 0x400) + m68k_dreg(regs, extra & 7) = dst_hi; + else if (dst_hi != 0) { + SET_VFLG (1); + } + m68k_dreg(regs, (extra >> 12) & 7) = dst_lo; + } +#endif +} +static const char* ccnames[] = +{ "T ","F ","HI","LS","CC","CS","NE","EQ", + "VC","VS","PL","MI","GE","LT","GT","LE" }; + +// If value is greater than zero, this means we are still processing an EmulOp +// because the counter is incremented only in m68k_execute(), i.e. interpretive +// execution only +static int m68k_execute_depth = 0; + +void m68k_reset (void) +{ + m68k_areg (regs, 7) = 0x2000; + m68k_setpc (ROMBaseMac + 0x2a); + fill_prefetch_0 (); + regs.s = 1; + regs.m = 0; + regs.stopped = 0; + regs.t1 = 0; + regs.t0 = 0; + SET_ZFLG (0); + SET_XFLG (0); + SET_CFLG (0); + SET_VFLG (0); + SET_NFLG (0); + SPCFLAGS_INIT( 0 ); + regs.intmask = 7; + regs.vbr = regs.sfc = regs.dfc = 0; + fpu_reset(); + +#if FLIGHT_RECORDER + log_ptr = 0; + memset(log, 0, sizeof(log)); +#endif + +#if ENABLE_MON + static bool first_time = true; + if (first_time) { + first_time = false; + mon_add_command("regs", dump_regs, "regs Dump m68k emulator registers\n"); +#if FLIGHT_RECORDER + // Install "log" command in mon + mon_add_command("log", dump_log, "log Dump m68k emulation log\n"); +#endif + } +#endif +} + +void m68k_emulop_return(void) +{ + SPCFLAGS_SET( SPCFLAG_BRK ); + quit_program = true; +} + +void m68k_emulop(uae_u32 opcode) +{ + struct M68kRegisters r; + int i; + + for (i=0; i<8; i++) { + r.d[i] = m68k_dreg(regs, i); + r.a[i] = m68k_areg(regs, i); + } + MakeSR(); + r.sr = regs.sr; + EmulOp(opcode, &r); + for (i=0; i<8; i++) { + m68k_dreg(regs, i) = r.d[i]; + m68k_areg(regs, i) = r.a[i]; + } + regs.sr = r.sr; + MakeFromSR(); +} + +void REGPARAM2 op_illg (uae_u32 opcode) +{ + uaecptr pc = m68k_getpc (); + + if ((opcode & 0xF000) == 0xA000) { + Exception(0xA,0); + return; + } + + if ((opcode & 0xF000) == 0xF000) { + Exception(0xB,0); + return; + } + + write_log ("Illegal instruction: %04x at %08x\n", opcode, pc); +#if USE_JIT && JIT_DEBUG + compiler_dumpstate(); +#endif + + Exception (4,0); + return; +} + +void mmu_op(uae_u32 opcode, uae_u16 extra) +{ + if ((opcode & 0xFE0) == 0x0500) { + /* PFLUSH */ + mmusr = 0; + } else if ((opcode & 0x0FD8) == 0x548) { + /* PTEST */ + } else + op_illg (opcode); +} + +static int n_insns = 0, n_spcinsns = 0; + +static uaecptr last_trace_ad = 0; + +static void do_trace (void) +{ + if (regs.t0 && CPUType >= 2) { + uae_u16 opcode; + /* should also include TRAP, CHK, SR modification FPcc */ + /* probably never used so why bother */ + /* We can afford this to be inefficient... */ + m68k_setpc (m68k_getpc ()); + fill_prefetch_0 (); + opcode = get_word(m68k_getpc()); + if (opcode == 0x4e72 /* RTE */ + || opcode == 0x4e74 /* RTD */ + || opcode == 0x4e75 /* RTS */ + || opcode == 0x4e77 /* RTR */ + || opcode == 0x4e76 /* TRAPV */ + || (opcode & 0xffc0) == 0x4e80 /* JSR */ + || (opcode & 0xffc0) == 0x4ec0 /* JMP */ + || (opcode & 0xff00) == 0x6100 /* BSR */ + || ((opcode & 0xf000) == 0x6000 /* Bcc */ + && cctrue((opcode >> 8) & 0xf)) + || ((opcode & 0xf0f0) == 0x5050 /* DBcc */ + && !cctrue((opcode >> 8) & 0xf) + && (uae_s16)m68k_dreg(regs, opcode & 7) != 0)) + { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); + } + } else if (regs.t1) { + last_trace_ad = m68k_getpc (); + SPCFLAGS_CLEAR( SPCFLAG_TRACE ); + SPCFLAGS_SET( SPCFLAG_DOTRACE ); + } +} + +int m68k_do_specialties (void) +{ +#if USE_JIT + // Block was compiled + SPCFLAGS_CLEAR( SPCFLAG_JIT_END_COMPILE ); + + // Retain the request to get out of compiled code until + // we reached the toplevel execution, i.e. the one that + // can compile then run compiled code. This also means + // we processed all (nested) EmulOps + if ((m68k_execute_depth == 0) && SPCFLAGS_TEST( SPCFLAG_JIT_EXEC_RETURN )) + SPCFLAGS_CLEAR( SPCFLAG_JIT_EXEC_RETURN ); +#endif + + if (SPCFLAGS_TEST( SPCFLAG_DOTRACE )) { + Exception (9,last_trace_ad); + } + while (SPCFLAGS_TEST( SPCFLAG_STOP )) { + if (SPCFLAGS_TEST( SPCFLAG_INT | SPCFLAG_DOINT )){ + SPCFLAGS_CLEAR( SPCFLAG_INT | SPCFLAG_DOINT ); + int intr = intlev (); + if (intr != -1 && intr > regs.intmask) { + Interrupt (intr); + regs.stopped = 0; + SPCFLAGS_CLEAR( SPCFLAG_STOP ); + } + } + } + if (SPCFLAGS_TEST( SPCFLAG_TRACE )) + do_trace (); + + if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { + SPCFLAGS_CLEAR( SPCFLAG_DOINT ); + int intr = intlev (); + if (intr != -1 && intr > regs.intmask) { + Interrupt (intr); + regs.stopped = 0; + } + } + if (SPCFLAGS_TEST( SPCFLAG_INT )) { + SPCFLAGS_CLEAR( SPCFLAG_INT ); + SPCFLAGS_SET( SPCFLAG_DOINT ); + } + if (SPCFLAGS_TEST( SPCFLAG_BRK )) { + SPCFLAGS_CLEAR( SPCFLAG_BRK ); + return 1; + } + return 0; +} + +void m68k_do_execute (void) +{ + for (;;) { + uae_u32 opcode = GET_OPCODE; +#if FLIGHT_RECORDER + m68k_record_step(m68k_getpc()); +#endif + (*cpufunctbl[opcode])(opcode); + cpu_check_ticks(); + if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { + if (m68k_do_specialties()) + return; + } + } +} + +void m68k_execute (void) +{ +#if USE_JIT + ++m68k_execute_depth; +#endif + for (;;) { + if (quit_program) + break; + m68k_do_execute(); + } +#if USE_JIT + --m68k_execute_depth; +#endif +} + +static void m68k_verify (uaecptr addr, uaecptr *nextpc) +{ + uae_u32 opcode, val; + struct instr *dp; + + opcode = get_iword_1(0); + last_op_for_exception_3 = opcode; + m68kpc_offset = 2; + + if (cpufunctbl[cft_map (opcode)] == op_illg_1) { + opcode = 0x4AFC; + } + dp = table68k + opcode; + + if (dp->suse) { + if (!verify_ea (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, &val)) { + Exception (3, 0); + return; + } + } + if (dp->duse) { + if (!verify_ea (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, &val)) { + Exception (3, 0); + return; + } + } +} + +void m68k_disasm (uaecptr addr, uaecptr *nextpc, int cnt) +{ + uaecptr newpc = 0; + m68kpc_offset = addr - m68k_getpc (); + while (cnt-- > 0) { + char instrname[20],*ccpt; + int opwords; + uae_u32 opcode; + struct mnemolookup *lookup; + struct instr *dp; + printf ("%08lx: ", m68k_getpc () + m68kpc_offset); + for (opwords = 0; opwords < 5; opwords++){ + printf ("%04x ", get_iword_1 (m68kpc_offset + opwords*2)); + } + opcode = get_iword_1 (m68kpc_offset); + m68kpc_offset += 2; + if (cpufunctbl[cft_map (opcode)] == op_illg_1) { + opcode = 0x4AFC; + } + dp = table68k + opcode; + for (lookup = lookuptab;lookup->mnemo != dp->mnemo; lookup++) + ; + + strcpy (instrname, lookup->name); + ccpt = strstr (instrname, "cc"); + if (ccpt != 0) { + strncpy (ccpt, ccnames[dp->cc], 2); + } + printf ("%s", instrname); + switch (dp->size){ + case sz_byte: printf (".B "); break; + case sz_word: printf (".W "); break; + case sz_long: printf (".L "); break; + default: printf (" "); break; + } + + if (dp->suse) { + newpc = m68k_getpc () + m68kpc_offset; + newpc += ShowEA (dp->sreg, (amodes)dp->smode, (wordsizes)dp->size, 0); + } + if (dp->suse && dp->duse) + printf (","); + if (dp->duse) { + newpc = m68k_getpc () + m68kpc_offset; + newpc += ShowEA (dp->dreg, (amodes)dp->dmode, (wordsizes)dp->size, 0); + } + if (ccpt != 0) { + if (cctrue(dp->cc)) + printf (" == %08x (TRUE)", newpc); + else + printf (" == %08x (FALSE)", newpc); + } else if ((opcode & 0xff00) == 0x6100) /* BSR */ + printf (" == %08x", newpc); + printf ("\n"); + } + if (nextpc) + *nextpc = m68k_getpc () + m68kpc_offset; +} + +void m68k_dumpstate (uaecptr *nextpc) +{ + int i; + for (i = 0; i < 8; i++){ + printf ("D%d: %08x ", i, m68k_dreg(regs, i)); + if ((i & 3) == 3) printf ("\n"); + } + for (i = 0; i < 8; i++){ + printf ("A%d: %08x ", i, m68k_areg(regs, i)); + if ((i & 3) == 3) printf ("\n"); + } + if (regs.s == 0) regs.usp = m68k_areg(regs, 7); + if (regs.s && regs.m) regs.msp = m68k_areg(regs, 7); + if (regs.s && regs.m == 0) regs.isp = m68k_areg(regs, 7); + printf ("USP=%08x ISP=%08x MSP=%08x VBR=%08x\n", + regs.usp,regs.isp,regs.msp,regs.vbr); + printf ("T=%d%d S=%d M=%d X=%ld N=%ld Z=%ld V=%ld C=%ld IMASK=%d\n", + regs.t1, regs.t0, regs.s, regs.m, + GET_XFLG, GET_NFLG, GET_ZFLG, GET_VFLG, GET_CFLG, regs.intmask); + + fpu_dump_registers(); + fpu_dump_flags(); + + m68k_disasm(m68k_getpc (), nextpc, 1); + if (nextpc) + printf ("next PC: %08x\n", *nextpc); +} diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h new file mode 100644 index 000000000..e2d5b5ed3 --- /dev/null +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -0,0 +1,355 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + * + * 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 NEWCPU_H +#define NEWCPU_H + +#ifndef FLIGHT_RECORDER +#define FLIGHT_RECORDER 0 +#endif + +#include "m68k.h" +#include "readcpu.h" +#include "spcflags.h" + +#if ENABLE_MON +#include "mon.h" +#include "mon_disass.h" +#endif + + +extern int areg_byteinc[]; +extern int imm8_table[]; + +extern int movem_index1[256]; +extern int movem_index2[256]; +extern int movem_next[256]; + +extern int broken_in; + +#ifdef X86_ASSEMBLY +/* This hack seems to force all register saves (pushl %reg) to be moved to the + begining of the function, thus making it possible to cpuopti to remove them + since m68k_run_1 will save those registers before calling the instruction + handler */ +# define cpuop_tag(tag) __asm__ __volatile__ ( "#cpuop_" tag ) +#else +# define cpuop_tag(tag) ; +#endif + +#define cpuop_begin() do { cpuop_tag("begin"); } while (0) +#define cpuop_end() do { cpuop_tag("end"); } while (0) + +typedef void REGPARAM2 cpuop_func (uae_u32) REGPARAM; + +struct cputbl { + cpuop_func *handler; + uae_u16 specific; + uae_u16 opcode; +}; + +extern cpuop_func *cpufunctbl[65536] ASM_SYM("cpufunctbl"); + +#if USE_JIT +typedef void compop_func (uae_u32) REGPARAM; + +struct comptbl { + compop_func *handler; + uae_u32 specific; + uae_u32 opcode; +}; +#endif + +extern void REGPARAM2 op_illg (uae_u32) REGPARAM; +extern void m68k_dumpstate(uaecptr *nextpc); + +typedef char flagtype; + +struct regstruct { + uae_u32 regs[16]; + + uae_u32 pc; + uae_u8 * pc_p; + uae_u8 * pc_oldp; + + spcflags_t spcflags; + int intmask; + + uae_u32 vbr, sfc, dfc; + uaecptr usp, isp, msp; + uae_u16 sr; + flagtype t1; + flagtype t0; + flagtype s; + flagtype m; + flagtype x; + flagtype stopped; + +#if USE_PREFETCH_BUFFER + /* Fellow sources say this is 4 longwords. That's impossible. It needs + * to be at least a longword. The HRM has some cryptic comment about two + * instructions being on the same longword boundary. + * The way this is implemented now seems like a good compromise. + */ + uae_u32 prefetch; +#endif +}; + +extern regstruct regs, lastint_regs; + +#define m68k_dreg(r,num) ((r).regs[(num)]) +#define m68k_areg(r,num) (((r).regs + 8)[(num)]) + +#define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1)) +#define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o))) +#define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o))) + +#ifdef HAVE_GET_WORD_UNSWAPPED +#define GET_OPCODE (do_get_mem_word_unswapped (regs.pc_p)) +#else +#define GET_OPCODE (get_iword (0)) +#endif + +#if USE_PREFETCH_BUFFER +static __inline__ uae_u32 get_ibyte_prefetch (uae_s32 o) +{ + if (o > 3 || o < 0) + return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1)); + + return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1)); +} +static __inline__ uae_u32 get_iword_prefetch (uae_s32 o) +{ + if (o > 3 || o < 0) + return do_get_mem_word((uae_u16 *)(regs.pc_p + o)); + + return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o)); +} +static __inline__ uae_u32 get_ilong_prefetch (uae_s32 o) +{ + if (o > 3 || o < 0) + return do_get_mem_long((uae_u32 *)(regs.pc_p + o)); + if (o == 0) + return do_get_mem_long(®s.prefetch); + return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4)); +} +#endif + +static __inline__ void fill_prefetch_0 (void) +{ +#if USE_PREFETCH_BUFFER + uae_u32 r; +#ifdef UNALIGNED_PROFITABLE + r = *(uae_u32 *)regs.pc_p; + regs.prefetch = r; +#else + r = do_get_mem_long ((uae_u32 *)regs.pc_p); + do_put_mem_long (®s.prefetch, r); +#endif +#endif +} + +#if 0 +static __inline__ void fill_prefetch_2 (void) +{ + uae_u32 r = do_get_mem_long (®s.prefetch) << 16; + uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1); + r |= r2; + do_put_mem_long (®s.prefetch, r); +} +#else +#define fill_prefetch_2 fill_prefetch_0 +#endif + +static __inline__ uaecptr m68k_getpc (void) +{ +#if REAL_ADDRESSING || DIRECT_ADDRESSING + return get_virtual_address(regs.pc_p); +#else + return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); +#endif +} + +static __inline__ void m68k_setpc (uaecptr newpc) +{ +#if ENABLE_MON + uae_u32 previous_pc = m68k_getpc(); +#endif + +#if REAL_ADDRESSING || DIRECT_ADDRESSING + regs.pc_p = get_real_address(newpc); +#else + regs.pc_p = regs.pc_oldp = get_real_address(newpc); + regs.pc = newpc; +#endif + +#if ENABLE_MON + if (IS_BREAK_POINT(newpc)) { + printf("Stopped at break point address: %08x. Last PC: %08x\n", newpc, previous_pc); + m68k_dumpstate(NULL); + const char *arg[4] = {"mon", "-m", "-r", NULL}; + mon(3, arg); + } +#endif // end of #if ENABLE_MON +} + +static __inline__ void m68k_incpc (uae_s32 delta) +{ +#if ENABLE_MON + uae_u32 previous_pc = m68k_getpc(); +#endif + regs.pc_p += (delta); +#if ENABLE_MON + uaecptr next_pc = m68k_getpc(); + if (IS_BREAK_POINT(next_pc)) { + printf("Stopped at break point address: %08x. Last PC: %08x\n", next_pc, previous_pc); + m68k_dumpstate(NULL); + const char *arg[4] = {"mon", "-m", "-r", NULL}; + mon(3, arg); + } +#endif // end of #if ENABLE_MON +} + +/* These are only used by the 68020/68881 code, and therefore don't + * need to handle prefetch. */ +static __inline__ uae_u32 next_ibyte (void) +{ + uae_u32 r = get_ibyte (0); + m68k_incpc (2); + return r; +} + +static __inline__ uae_u32 next_iword (void) +{ + uae_u32 r = get_iword (0); + m68k_incpc (2); + return r; +} + +static __inline__ uae_u32 next_ilong (void) +{ + uae_u32 r = get_ilong (0); + m68k_incpc (4); + return r; +} + +#define m68k_setpc_fast m68k_setpc +#define m68k_setpc_bcc m68k_setpc +#define m68k_setpc_rte m68k_setpc + +static __inline__ void m68k_do_rts(void) +{ + m68k_setpc(get_long(m68k_areg(regs, 7))); + m68k_areg(regs, 7) += 4; +} + +static __inline__ void m68k_do_bsr(uaecptr oldpc, uae_s32 offset) +{ + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_incpc(offset); +} + +static __inline__ void m68k_do_jsr(uaecptr oldpc, uaecptr dest) +{ + m68k_areg(regs, 7) -= 4; + put_long(m68k_areg(regs, 7), oldpc); + m68k_setpc(dest); +} + +static __inline__ void m68k_setstopped (int stop) +{ + regs.stopped = stop; + /* A traced STOP instruction drops through immediately without + actually stopping. */ + if (stop && (regs.spcflags & SPCFLAG_DOTRACE) == 0) + SPCFLAGS_SET( SPCFLAG_STOP ); +} + +extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp); +extern uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp); + +extern uae_s32 ShowEA (int reg, amodes mode, wordsizes size, char *buf); + +extern void MakeSR (void); +extern void MakeFromSR (void); +extern void Exception (int, uaecptr); +extern void dump_counts (void); +extern int m68k_move2c (int, uae_u32 *); +extern int m68k_movec2 (int, uae_u32 *); +extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr); +extern void m68k_mull (uae_u32, uae_u32, uae_u16); +extern void m68k_emulop (uae_u32); +extern void m68k_emulop_return (void); +extern void init_m68k (void); +extern void exit_m68k (void); +extern void m68k_dumpstate (uaecptr *); +extern void m68k_disasm (uaecptr, uaecptr *, int); +extern void m68k_reset (void); +extern void m68k_enter_debugger(void); +extern int m68k_do_specialties(void); + +extern void mmu_op (uae_u32, uae_u16); + +/* Opcode of faulting instruction */ +extern uae_u16 last_op_for_exception_3; +/* PC at fault time */ +extern uaecptr last_addr_for_exception_3; +/* Address that generated the exception */ +extern uaecptr last_fault_for_exception_3; + +#define CPU_OP_NAME(a) op ## a + +/* 68020 + 68881 */ +extern struct cputbl op_smalltbl_0_ff[]; +/* 68020 */ +extern struct cputbl op_smalltbl_1_ff[]; +/* 68010 */ +extern struct cputbl op_smalltbl_2_ff[]; +/* 68000 */ +extern struct cputbl op_smalltbl_3_ff[]; +/* 68000 slow but compatible. */ +extern struct cputbl op_smalltbl_4_ff[]; + +#if FLIGHT_RECORDER +extern void m68k_record_step(uaecptr) REGPARAM; +#endif +extern void m68k_do_execute(void); +extern void m68k_execute(void); +#if USE_JIT +extern void m68k_compile_execute(void); +#endif +#ifdef USE_CPU_EMUL_SERVICES +extern int32 emulated_ticks; +extern void cpu_do_check_ticks(void); + +static inline void cpu_check_ticks(void) +{ + if (--emulated_ticks <= 0) + cpu_do_check_ticks(); +} +#else +#define cpu_check_ticks() +#define cpu_do_check_ticks() +#endif + +#endif /* NEWCPU_H */ diff --git a/BasiliskII/src/uae_cpu/noflags.h b/BasiliskII/src/uae_cpu/noflags.h new file mode 100644 index 000000000..eacbc2148 --- /dev/null +++ b/BasiliskII/src/uae_cpu/noflags.h @@ -0,0 +1,142 @@ +#ifndef NOFLAGS_H +#define NOFLAGS_H + +/* Undefine everything that will *set* flags. Note: Leave *reading* + flags alone ;-). We assume that nobody does something like + SET_ZFLG(a=b+c), i.e. expect side effects of the macros. That would + be a stupid thing to do when using macros. +*/ + +/* Gwenole Beauchesne pointed out that CAS and CAS2 use flag_cmp to set + flags that are then used internally, and that thus the noflags versions + of those instructions were broken. Oops! + Easy fix: Leave flag_cmp alone. It is only used by CMP* and CAS* + instructions. For CAS*, noflags is a bad idea. For CMP*, which has + setting flags as its only function, the noflags version is kinda pointless, + anyway. + Note that this will only work while using the optflag_* routines --- + as we do on all (one ;-) platforms that will ever use the noflags + versions, anyway. + However, if you try to compile without optimized flags, the "SET_ZFLAG" + macro will be left unchanged, to make CAS and CAS2 work right. Of course, + this is contrary to the whole idea of noflags, but better be right than + be fast. + + Another problem exists with one of the bitfield operations. Once again, + one of the operations sets a flag, and looks at it later. And the CHK2 + instruction does so as well. For those, a different solution is possible. + the *_ALWAYS versions of the SET_?FLG macros shall remain untouched by + the redefinitions in this file. + Unfortunately, they are defined in terms of the macros we *do* redefine. + So here comes a bit of trickery.... +*/ +#define NOFLAGS_CMP 0 + +#undef SET_NFLG_ALWAYS +static __inline__ void SET_NFLG_ALWAYS(uae_u32 x) +{ + SET_NFLG(x); /* This has not yet been redefined */ +} + +#undef SET_CFLG_ALWAYS +static __inline__ void SET_CFLG_ALWAYS(uae_u32 x) +{ + SET_CFLG(x); /* This has not yet been redefined */ +} + +#undef CPUFUNC +#define CPUFUNC(x) x##_nf + +#ifndef OPTIMIZED_FLAGS +#undef SET_ZFLG +#define SET_ZFLG(y) do {uae_u32 dummy=(y); } while (0) +#endif + +#undef SET_CFLG +#define SET_CFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_VFLG +#define SET_VFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_NFLG +#define SET_NFLG(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_XFLG +#define SET_XFLG(y) do {uae_u32 dummy=(y); } while (0) + +#undef CLEAR_CZNV +#define CLEAR_CZNV +#undef IOR_CZNV +#define IOR_CZNV(y) do {uae_u32 dummy=(y); } while (0) +#undef SET_CZNV +#define SET_CZNV(y) do {uae_u32 dummy=(y); } while (0) +#undef COPY_CARRY +#define COPY_CARRY + +#ifdef optflag_testl +#undef optflag_testl +#endif + +#ifdef optflag_testw +#undef optflag_testw +#endif + +#ifdef optflag_testb +#undef optflag_testb +#endif + +#ifdef optflag_addl +#undef optflag_addl +#endif + +#ifdef optflag_addw +#undef optflag_addw +#endif + +#ifdef optflag_addb +#undef optflag_addb +#endif + +#ifdef optflag_subl +#undef optflag_subl +#endif + +#ifdef optflag_subw +#undef optflag_subw +#endif + +#ifdef optflag_subb +#undef optflag_subb +#endif + +#if NOFLAGS_CMP +#ifdef optflag_cmpl +#undef optflag_cmpl +#endif + +#ifdef optflag_cmpw +#undef optflag_cmpw +#endif + +#ifdef optflag_cmpb +#undef optflag_cmpb +#endif +#endif + +#define optflag_testl(v) do { } while (0) +#define optflag_testw(v) do { } while (0) +#define optflag_testb(v) do { } while (0) + +#define optflag_addl(v, s, d) (v = (uae_s32)(d) + (uae_s32)(s)) +#define optflag_addw(v, s, d) (v = (uae_s16)(d) + (uae_s16)(s)) +#define optflag_addb(v, s, d) (v = (uae_s8)(d) + (uae_s8)(s)) + +#define optflag_subl(v, s, d) (v = (uae_s32)(d) - (uae_s32)(s)) +#define optflag_subw(v, s, d) (v = (uae_s16)(d) - (uae_s16)(s)) +#define optflag_subb(v, s, d) (v = (uae_s8)(d) - (uae_s8)(s)) + +#if NOFLAGS_CMP +/* These are just for completeness sake */ +#define optflag_cmpl(s, d) do { } while (0) +#define optflag_cmpw(s, d) do { } while (0) +#define optflag_cmpb(s, d) do { } while (0) +#endif + +#endif diff --git a/BasiliskII/src/uae_cpu/readcpu.cpp b/BasiliskII/src/uae_cpu/readcpu.cpp new file mode 100644 index 000000000..3fccdfb73 --- /dev/null +++ b/BasiliskII/src/uae_cpu/readcpu.cpp @@ -0,0 +1,1033 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * Read 68000 CPU specs from file "table68k" + * + * Copyright 1995,1996 Bernd Schmidt + * + * 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 +#include +#include +#include + +#include "sysdeps.h" +#include "readcpu.h" + +int nr_cpuop_funcs; + +struct mnemolookup lookuptab[] = { + { i_ILLG, "ILLEGAL" }, + { i_OR, "OR" }, + { i_CHK, "CHK" }, + { i_CHK2, "CHK2" }, + { i_AND, "AND" }, + { i_EOR, "EOR" }, + { i_ORSR, "ORSR" }, + { i_ANDSR, "ANDSR" }, + { i_EORSR, "EORSR" }, + { i_SUB, "SUB" }, + { i_SUBA, "SUBA" }, + { i_SUBX, "SUBX" }, + { i_SBCD, "SBCD" }, + { i_ADD, "ADD" }, + { i_ADDA, "ADDA" }, + { i_ADDX, "ADDX" }, + { i_ABCD, "ABCD" }, + { i_NEG, "NEG" }, + { i_NEGX, "NEGX" }, + { i_NBCD, "NBCD" }, + { i_CLR, "CLR" }, + { i_NOT, "NOT" }, + { i_TST, "TST" }, + { i_BTST, "BTST" }, + { i_BCHG, "BCHG" }, + { i_BCLR, "BCLR" }, + { i_BSET, "BSET" }, + { i_CMP, "CMP" }, + { i_CMPM, "CMPM" }, + { i_CMPA, "CMPA" }, + { i_MVPRM, "MVPRM" }, + { i_MVPMR, "MVPMR" }, + { i_MOVE, "MOVE" }, + { i_MOVEA, "MOVEA" }, + { i_MVSR2, "MVSR2" }, + { i_MV2SR, "MV2SR" }, + { i_SWAP, "SWAP" }, + { i_EXG, "EXG" }, + { i_EXT, "EXT" }, + { i_MVMEL, "MVMEL" }, + { i_MVMLE, "MVMLE" }, + { i_TRAP, "TRAP" }, + { i_MVR2USP, "MVR2USP" }, + { i_MVUSP2R, "MVUSP2R" }, + { i_NOP, "NOP" }, + { i_RESET, "RESET" }, + { i_RTE, "RTE" }, + { i_RTD, "RTD" }, + { i_LINK, "LINK" }, + { i_UNLK, "UNLK" }, + { i_RTS, "RTS" }, + { i_STOP, "STOP" }, + { i_TRAPV, "TRAPV" }, + { i_RTR, "RTR" }, + { i_JSR, "JSR" }, + { i_JMP, "JMP" }, + { i_BSR, "BSR" }, + { i_Bcc, "Bcc" }, + { i_LEA, "LEA" }, + { i_PEA, "PEA" }, + { i_DBcc, "DBcc" }, + { i_Scc, "Scc" }, + { i_DIVU, "DIVU" }, + { i_DIVS, "DIVS" }, + { i_MULU, "MULU" }, + { i_MULS, "MULS" }, + { i_ASR, "ASR" }, + { i_ASL, "ASL" }, + { i_LSR, "LSR" }, + { i_LSL, "LSL" }, + { i_ROL, "ROL" }, + { i_ROR, "ROR" }, + { i_ROXL, "ROXL" }, + { i_ROXR, "ROXR" }, + { i_ASRW, "ASRW" }, + { i_ASLW, "ASLW" }, + { i_LSRW, "LSRW" }, + { i_LSLW, "LSLW" }, + { i_ROLW, "ROLW" }, + { i_RORW, "RORW" }, + { i_ROXLW, "ROXLW" }, + { i_ROXRW, "ROXRW" }, + + { i_MOVE2C, "MOVE2C" }, + { i_MOVEC2, "MOVEC2" }, + { i_CAS, "CAS" }, + { i_CAS2, "CAS2" }, + { i_MULL, "MULL" }, + { i_DIVL, "DIVL" }, + { i_BFTST, "BFTST" }, + { i_BFEXTU, "BFEXTU" }, + { i_BFCHG, "BFCHG" }, + { i_BFEXTS, "BFEXTS" }, + { i_BFCLR, "BFCLR" }, + { i_BFFFO, "BFFFO" }, + { i_BFSET, "BFSET" }, + { i_BFINS, "BFINS" }, + { i_PACK, "PACK" }, + { i_UNPK, "UNPK" }, + { i_TAS, "TAS" }, + { i_BKPT, "BKPT" }, + { i_CALLM, "CALLM" }, + { i_RTM, "RTM" }, + { i_TRAPcc, "TRAPcc" }, + { i_MOVES, "MOVES" }, + { i_FPP, "FPP" }, + { i_FDBcc, "FDBcc" }, + { i_FScc, "FScc" }, + { i_FTRAPcc, "FTRAPcc" }, + { i_FBcc, "FBcc" }, + { i_FBcc, "FBcc" }, + { i_FSAVE, "FSAVE" }, + { i_FRESTORE, "FRESTORE" }, + + { i_CINVL, "CINVL" }, + { i_CINVP, "CINVP" }, + { i_CINVA, "CINVA" }, + { i_CPUSHL, "CPUSHL" }, + { i_CPUSHP, "CPUSHP" }, + { i_CPUSHA, "CPUSHA" }, + { i_MOVE16, "MOVE16" }, + + { i_EMULOP_RETURN, "EMULOP_RETURN" }, + { i_EMULOP, "EMULOP" }, + + { i_MMUOP, "MMUOP" }, + { i_ILLG, "" }, +}; + +struct instr *table68k; + +static __inline__ amodes mode_from_str (const char *str) +{ + if (strncmp (str, "Dreg", 4) == 0) return Dreg; + if (strncmp (str, "Areg", 4) == 0) return Areg; + if (strncmp (str, "Aind", 4) == 0) return Aind; + if (strncmp (str, "Apdi", 4) == 0) return Apdi; + if (strncmp (str, "Aipi", 4) == 0) return Aipi; + if (strncmp (str, "Ad16", 4) == 0) return Ad16; + if (strncmp (str, "Ad8r", 4) == 0) return Ad8r; + if (strncmp (str, "absw", 4) == 0) return absw; + if (strncmp (str, "absl", 4) == 0) return absl; + if (strncmp (str, "PC16", 4) == 0) return PC16; + if (strncmp (str, "PC8r", 4) == 0) return PC8r; + if (strncmp (str, "Immd", 4) == 0) return imm; + abort (); + return (amodes)0; +} + +static __inline__ amodes mode_from_mr (int mode, int reg) +{ + switch (mode) { + case 0: return Dreg; + case 1: return Areg; + case 2: return Aind; + case 3: return Aipi; + case 4: return Apdi; + case 5: return Ad16; + case 6: return Ad8r; + case 7: + switch (reg) { + case 0: return absw; + case 1: return absl; + case 2: return PC16; + case 3: return PC8r; + case 4: return imm; + case 5: + case 6: + case 7: return am_illg; + } + } + abort (); + return (amodes)0; +} + +static void build_insn (int insn) +{ + int find = -1; + int variants; + struct instr_def id; + const char *opcstr; + int i, n; + + int flaglive = 0, flagdead = 0; + int cflow = 0; + + id = defs68k[insn]; + + // Control flow information + cflow = id.cflow; + + // Mask of flags set/used + unsigned char flags_set(0), flags_used(0); + + for (i = 0, n = 4; i < 5; i++, n--) { + switch (id.flaginfo[i].flagset) { + case fa_unset: case fa_isjmp: break; + default: flags_set |= (1 << n); + } + + switch (id.flaginfo[i].flaguse) { + case fu_unused: case fu_isjmp: break; + default: flags_used |= (1 << n); + } + } + + for (i = 0; i < 5; i++) { + switch (id.flaginfo[i].flagset){ + case fa_unset: break; + case fa_zero: flagdead |= 1 << i; break; + case fa_one: flagdead |= 1 << i; break; + case fa_dontcare: flagdead |= 1 << i; break; + case fa_unknown: flagdead = -1; goto out1; + case fa_set: flagdead |= 1 << i; break; + } + } + + out1: + for (i = 0; i < 5; i++) { + switch (id.flaginfo[i].flaguse) { + case fu_unused: break; + case fu_unknown: flaglive = -1; goto out2; + case fu_used: flaglive |= 1 << i; break; + } + } + out2: + + opcstr = id.opcstr; + for (variants = 0; variants < (1 << id.n_variable); variants++) { + int bitcnt[lastbit]; + int bitval[lastbit]; + int bitpos[lastbit]; + int i; + uae_u16 opc = id.bits; + uae_u16 msk, vmsk; + int pos = 0; + int mnp = 0; + int bitno = 0; + char mnemonic[64]; + + wordsizes sz = sz_long; + int srcgather = 0, dstgather = 0; + int usesrc = 0, usedst = 0; + int srctype = 0; + int srcpos = -1, dstpos = -1; + + amodes srcmode = am_unknown, destmode = am_unknown; + int srcreg = -1, destreg = -1; + + for (i = 0; i < lastbit; i++) + bitcnt[i] = bitval[i] = 0; + + vmsk = 1 << id.n_variable; + + for (i = 0, msk = 0x8000; i < 16; i++, msk >>= 1) { + if (!(msk & id.mask)) { + int currbit = id.bitpos[bitno++]; + int bit_set; + vmsk >>= 1; + bit_set = variants & vmsk ? 1 : 0; + if (bit_set) + opc |= msk; + bitpos[currbit] = 15 - i; + bitcnt[currbit]++; + bitval[currbit] <<= 1; + bitval[currbit] |= bit_set; + } + } + + if (bitval[bitj] == 0) bitval[bitj] = 8; + /* first check whether this one does not match after all */ + if (bitval[bitz] == 3 || bitval[bitC] == 1) + continue; + if (bitcnt[bitI] && (bitval[bitI] == 0x00 || bitval[bitI] == 0xff)) + continue; + if (bitcnt[bitE] && (bitval[bitE] == 0x00)) + continue; + + /* bitI and bitC get copied to biti and bitc */ + if (bitcnt[bitI]) { + bitval[biti] = bitval[bitI]; bitpos[biti] = bitpos[bitI]; + } + if (bitcnt[bitC]) + bitval[bitc] = bitval[bitC]; + + pos = 0; + while (opcstr[pos] && !isspace(opcstr[pos])) { + if (opcstr[pos] == '.') { + pos++; + switch (opcstr[pos]) { + + case 'B': sz = sz_byte; break; + case 'W': sz = sz_word; break; + case 'L': sz = sz_long; break; + case 'z': + switch (bitval[bitz]) { + case 0: sz = sz_byte; break; + case 1: sz = sz_word; break; + case 2: sz = sz_long; break; + default: abort(); + } + break; + default: abort(); + } + } else { + mnemonic[mnp] = opcstr[pos]; + if (mnemonic[mnp] == 'f') { + find = -1; + switch (bitval[bitf]) { + case 0: mnemonic[mnp] = 'R'; break; + case 1: mnemonic[mnp] = 'L'; break; + default: abort(); + } + } + mnp++; + if ((unsigned)mnp >= sizeof(mnemonic) - 1) { + mnemonic[sizeof(mnemonic) - 1] = 0; + fprintf(stderr, "Instruction %s overflow\n", mnemonic); + abort(); + } + } + pos++; + } + mnemonic[mnp] = 0; + + /* now, we have read the mnemonic and the size */ + while (opcstr[pos] && isspace(opcstr[pos])) + pos++; + + /* A goto a day keeps the D******a away. */ + if (opcstr[pos] == 0) + goto endofline; + + /* parse the source address */ + usesrc = 1; + switch (opcstr[pos++]) { + case 'D': + srcmode = Dreg; + switch (opcstr[pos++]) { + case 'r': srcreg = bitval[bitr]; srcgather = 1; srcpos = bitpos[bitr]; break; + case 'R': srcreg = bitval[bitR]; srcgather = 1; srcpos = bitpos[bitR]; break; + default: abort(); + } + + break; + case 'A': + srcmode = Areg; + switch (opcstr[pos++]) { + case 'r': srcreg = bitval[bitr]; srcgather = 1; srcpos = bitpos[bitr]; break; + case 'R': srcreg = bitval[bitR]; srcgather = 1; srcpos = bitpos[bitR]; break; + default: abort(); + } + switch (opcstr[pos]) { + case 'p': srcmode = Apdi; pos++; break; + case 'P': srcmode = Aipi; pos++; break; + } + break; + case 'L': + srcmode = absl; + break; + case '#': + switch (opcstr[pos++]) { + case 'z': srcmode = imm; break; + case '0': srcmode = imm0; break; + case '1': srcmode = imm1; break; + case '2': srcmode = imm2; break; + case 'i': srcmode = immi; srcreg = (uae_s32)(uae_s8)bitval[biti]; + if (CPU_EMU_SIZE < 4) { + /* Used for branch instructions */ + srctype = 1; + srcgather = 1; + srcpos = bitpos[biti]; + } + break; + case 'j': srcmode = immi; srcreg = bitval[bitj]; + if (CPU_EMU_SIZE < 3) { + /* 1..8 for ADDQ/SUBQ and rotshi insns */ + srcgather = 1; + srctype = 3; + srcpos = bitpos[bitj]; + } + break; + case 'J': srcmode = immi; srcreg = bitval[bitJ]; + if (CPU_EMU_SIZE < 5) { + /* 0..15 */ + srcgather = 1; + srctype = 2; + srcpos = bitpos[bitJ]; + } + break; + case 'k': srcmode = immi; srcreg = bitval[bitk]; + if (CPU_EMU_SIZE < 3) { + srcgather = 1; + srctype = 4; + srcpos = bitpos[bitk]; + } + break; + case 'K': srcmode = immi; srcreg = bitval[bitK]; + if (CPU_EMU_SIZE < 5) { + /* 0..15 */ + srcgather = 1; + srctype = 5; + srcpos = bitpos[bitK]; + } + break; + case 'E': srcmode = immi; srcreg = bitval[bitE]; + if (CPU_EMU_SIZE < 5) { // gb-- what is CPU_EMU_SIZE used for ?? + /* 1..255 */ + srcgather = 1; + srctype = 6; + srcpos = bitpos[bitE]; + } + break; + case 'p': srcmode = immi; srcreg = bitval[bitp]; + if (CPU_EMU_SIZE < 5) { + /* 0..3 */ + srcgather = 1; + srctype = 7; + srcpos = bitpos[bitp]; + } + break; + default: abort(); + } + break; + case 'd': + srcreg = bitval[bitD]; + srcmode = mode_from_mr(bitval[bitd],bitval[bitD]); + if (srcmode == am_illg) + continue; + if (CPU_EMU_SIZE < 2 && + (srcmode == Areg || srcmode == Dreg || srcmode == Aind + || srcmode == Ad16 || srcmode == Ad8r || srcmode == Aipi + || srcmode == Apdi)) + { + srcgather = 1; srcpos = bitpos[bitD]; + } + if (opcstr[pos] == '[') { + pos++; + if (opcstr[pos] == '!') { + /* exclusion */ + do { + pos++; + if (mode_from_str(opcstr+pos) == srcmode) + goto nomatch; + pos += 4; + } while (opcstr[pos] == ','); + pos++; + } else { + if (opcstr[pos+4] == '-') { + /* replacement */ + if (mode_from_str(opcstr+pos) == srcmode) + srcmode = mode_from_str(opcstr+pos+5); + else + goto nomatch; + pos += 10; + } else { + /* normal */ + while(mode_from_str(opcstr+pos) != srcmode) { + pos += 4; + if (opcstr[pos] == ']') + goto nomatch; + pos++; + } + while(opcstr[pos] != ']') pos++; + pos++; + break; + } + } + } + /* Some addressing modes are invalid as destination */ + if (srcmode == imm || srcmode == PC16 || srcmode == PC8r) + goto nomatch; + break; + case 's': + srcreg = bitval[bitS]; + srcmode = mode_from_mr(bitval[bits],bitval[bitS]); + + if (srcmode == am_illg) + continue; + if (CPU_EMU_SIZE < 2 && + (srcmode == Areg || srcmode == Dreg || srcmode == Aind + || srcmode == Ad16 || srcmode == Ad8r || srcmode == Aipi + || srcmode == Apdi)) + { + srcgather = 1; srcpos = bitpos[bitS]; + } + if (opcstr[pos] == '[') { + pos++; + if (opcstr[pos] == '!') { + /* exclusion */ + do { + pos++; + if (mode_from_str(opcstr+pos) == srcmode) + goto nomatch; + pos += 4; + } while (opcstr[pos] == ','); + pos++; + } else { + if (opcstr[pos+4] == '-') { + /* replacement */ + if (mode_from_str(opcstr+pos) == srcmode) + srcmode = mode_from_str(opcstr+pos+5); + else + goto nomatch; + pos += 10; + } else { + /* normal */ + while(mode_from_str(opcstr+pos) != srcmode) { + pos += 4; + if (opcstr[pos] == ']') + goto nomatch; + pos++; + } + while(opcstr[pos] != ']') pos++; + pos++; + } + } + } + break; + default: abort(); + } + /* safety check - might have changed */ + if (srcmode != Areg && srcmode != Dreg && srcmode != Aind + && srcmode != Ad16 && srcmode != Ad8r && srcmode != Aipi + && srcmode != Apdi && srcmode != immi) + { + srcgather = 0; + } + if (srcmode == Areg && sz == sz_byte) + goto nomatch; + + if (opcstr[pos] != ',') + goto endofline; + pos++; + + /* parse the destination address */ + usedst = 1; + switch (opcstr[pos++]) { + case 'D': + destmode = Dreg; + switch (opcstr[pos++]) { + case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; + case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; + default: abort(); + } + if (dstpos < 0 || dstpos >= 32) + abort(); + break; + case 'A': + destmode = Areg; + switch (opcstr[pos++]) { + case 'r': destreg = bitval[bitr]; dstgather = 1; dstpos = bitpos[bitr]; break; + case 'R': destreg = bitval[bitR]; dstgather = 1; dstpos = bitpos[bitR]; break; + case 'x': destreg = 0; dstgather = 0; dstpos = 0; break; + default: abort(); + } + if (dstpos < 0 || dstpos >= 32) + abort(); + switch (opcstr[pos]) { + case 'p': destmode = Apdi; pos++; break; + case 'P': destmode = Aipi; pos++; break; + } + break; + case 'L': + destmode = absl; + break; + case '#': + switch (opcstr[pos++]) { + case 'z': destmode = imm; break; + case '0': destmode = imm0; break; + case '1': destmode = imm1; break; + case '2': destmode = imm2; break; + case 'i': destmode = immi; destreg = (uae_s32)(uae_s8)bitval[biti]; break; + case 'j': destmode = immi; destreg = bitval[bitj]; break; + case 'J': destmode = immi; destreg = bitval[bitJ]; break; + case 'k': destmode = immi; destreg = bitval[bitk]; break; + case 'K': destmode = immi; destreg = bitval[bitK]; break; + default: abort(); + } + break; + case 'd': + destreg = bitval[bitD]; + destmode = mode_from_mr(bitval[bitd],bitval[bitD]); + if (destmode == am_illg) + continue; + if (CPU_EMU_SIZE < 1 && + (destmode == Areg || destmode == Dreg || destmode == Aind + || destmode == Ad16 || destmode == Ad8r || destmode == Aipi + || destmode == Apdi)) + { + dstgather = 1; dstpos = bitpos[bitD]; + } + + if (opcstr[pos] == '[') { + pos++; + if (opcstr[pos] == '!') { + /* exclusion */ + do { + pos++; + if (mode_from_str(opcstr+pos) == destmode) + goto nomatch; + pos += 4; + } while (opcstr[pos] == ','); + pos++; + } else { + if (opcstr[pos+4] == '-') { + /* replacement */ + if (mode_from_str(opcstr+pos) == destmode) + destmode = mode_from_str(opcstr+pos+5); + else + goto nomatch; + pos += 10; + } else { + /* normal */ + while(mode_from_str(opcstr+pos) != destmode) { + pos += 4; + if (opcstr[pos] == ']') + goto nomatch; + pos++; + } + while(opcstr[pos] != ']') pos++; + pos++; + break; + } + } + } + /* Some addressing modes are invalid as destination */ + if (destmode == imm || destmode == PC16 || destmode == PC8r) + goto nomatch; + break; + case 's': + destreg = bitval[bitS]; + destmode = mode_from_mr(bitval[bits],bitval[bitS]); + + if (destmode == am_illg) + continue; + if (CPU_EMU_SIZE < 1 && + (destmode == Areg || destmode == Dreg || destmode == Aind + || destmode == Ad16 || destmode == Ad8r || destmode == Aipi + || destmode == Apdi)) + { + dstgather = 1; dstpos = bitpos[bitS]; + } + + if (opcstr[pos] == '[') { + pos++; + if (opcstr[pos] == '!') { + /* exclusion */ + do { + pos++; + if (mode_from_str(opcstr+pos) == destmode) + goto nomatch; + pos += 4; + } while (opcstr[pos] == ','); + pos++; + } else { + if (opcstr[pos+4] == '-') { + /* replacement */ + if (mode_from_str(opcstr+pos) == destmode) + destmode = mode_from_str(opcstr+pos+5); + else + goto nomatch; + pos += 10; + } else { + /* normal */ + while(mode_from_str(opcstr+pos) != destmode) { + pos += 4; + if (opcstr[pos] == ']') + goto nomatch; + pos++; + } + while(opcstr[pos] != ']') pos++; + pos++; + } + } + } + break; + default: abort(); + } + /* safety check - might have changed */ + if (destmode != Areg && destmode != Dreg && destmode != Aind + && destmode != Ad16 && destmode != Ad8r && destmode != Aipi + && destmode != Apdi) + { + dstgather = 0; + } + + if (destmode == Areg && sz == sz_byte) + goto nomatch; +#if 0 + if (sz == sz_byte && (destmode == Aipi || destmode == Apdi)) { + dstgather = 0; + } +#endif + endofline: + /* now, we have a match */ + if (table68k[opc].mnemo != i_ILLG) + fprintf(stderr, "Double match: %x: %s\n", opc, opcstr); + if (find == -1) { + for (find = 0;; find++) { + if (strcmp(mnemonic, lookuptab[find].name) == 0) { + table68k[opc].mnemo = lookuptab[find].mnemo; + break; + } + if (strlen(lookuptab[find].name) == 0) abort(); + } + } + else { + table68k[opc].mnemo = lookuptab[find].mnemo; + } + table68k[opc].cc = bitval[bitc]; + if (table68k[opc].mnemo == i_BTST + || table68k[opc].mnemo == i_BSET + || table68k[opc].mnemo == i_BCLR + || table68k[opc].mnemo == i_BCHG) + { + sz = destmode == Dreg ? sz_long : sz_byte; + } + table68k[opc].size = sz; + table68k[opc].sreg = srcreg; + table68k[opc].dreg = destreg; + table68k[opc].smode = srcmode; + table68k[opc].dmode = destmode; + table68k[opc].spos = srcgather ? srcpos : -1; + table68k[opc].dpos = dstgather ? dstpos : -1; + table68k[opc].suse = usesrc; + table68k[opc].duse = usedst; + table68k[opc].stype = srctype; + table68k[opc].plev = id.plevel; + table68k[opc].clev = id.cpulevel; +#if 0 + for (i = 0; i < 5; i++) { + table68k[opc].flaginfo[i].flagset = id.flaginfo[i].flagset; + table68k[opc].flaginfo[i].flaguse = id.flaginfo[i].flaguse; + } +#endif + + // Fix flags used information for Scc, Bcc, TRAPcc, DBcc instructions + if ( table68k[opc].mnemo == i_Scc + || table68k[opc].mnemo == i_Bcc + || table68k[opc].mnemo == i_DBcc + || table68k[opc].mnemo == i_TRAPcc + ) { + switch (table68k[opc].cc) { + // CC mask: XNZVC + // 8421 + case 0: flags_used = 0x00; break; /* T */ + case 1: flags_used = 0x00; break; /* F */ + case 2: flags_used = 0x05; break; /* HI */ + case 3: flags_used = 0x05; break; /* LS */ + case 4: flags_used = 0x01; break; /* CC */ + case 5: flags_used = 0x01; break; /* CS */ + case 6: flags_used = 0x04; break; /* NE */ + case 7: flags_used = 0x04; break; /* EQ */ + case 8: flags_used = 0x02; break; /* VC */ + case 9: flags_used = 0x02; break; /* VS */ + case 10:flags_used = 0x08; break; /* PL */ + case 11:flags_used = 0x08; break; /* MI */ + case 12:flags_used = 0x0A; break; /* GE */ + case 13:flags_used = 0x0A; break; /* LT */ + case 14:flags_used = 0x0E; break; /* GT */ + case 15:flags_used = 0x0E; break; /* LE */ + } + } + +#if 1 + /* gb-- flagdead and flaglive would not have correct information */ + table68k[opc].flagdead = flags_set; + table68k[opc].flaglive = flags_used; +#else + table68k[opc].flagdead = flagdead; + table68k[opc].flaglive = flaglive; +#endif + table68k[opc].cflow = cflow; + nomatch: + /* FOO! */; + } +} + + +void read_table68k (void) +{ + int i; + + table68k = (struct instr *)malloc (65536 * sizeof (struct instr)); + for (i = 0; i < 65536; i++) { + table68k[i].mnemo = i_ILLG; + table68k[i].handler = -1; + } + for (i = 0; i < n_defs68k; i++) { + build_insn (i); + } +} + +static int mismatch; + +static void handle_merges (long int opcode) +{ + uae_u16 smsk; + uae_u16 dmsk; + int sbitdst, dstend; + int srcreg, dstreg; + + if (table68k[opcode].spos == -1) { + sbitdst = 1; smsk = 0; + } else { + switch (table68k[opcode].stype) { + case 0: + smsk = 7; sbitdst = 8; break; + case 1: + smsk = 255; sbitdst = 256; break; + case 2: + smsk = 15; sbitdst = 16; break; + case 3: + smsk = 7; sbitdst = 8; break; + case 4: + smsk = 7; sbitdst = 8; break; + case 5: + smsk = 63; sbitdst = 64; break; + case 6: + smsk = 255; sbitdst = 256; break; + case 7: + smsk = 3; sbitdst = 4; break; + default: + smsk = 0; sbitdst = 0; + abort(); + break; + } + smsk <<= table68k[opcode].spos; + } + if (table68k[opcode].dpos == -1) { + dstend = 1; dmsk = 0; + } else { + dmsk = 7 << table68k[opcode].dpos; + dstend = 8; + } + for (srcreg=0; srcreg < sbitdst; srcreg++) { + for (dstreg=0; dstreg < dstend; dstreg++) { + uae_u16 code = uae_u16(opcode); + + code = (code & ~smsk) | (srcreg << table68k[opcode].spos); + code = (code & ~dmsk) | (dstreg << table68k[opcode].dpos); + + /* Check whether this is in fact the same instruction. + * The instructions should never differ, except for the + * Bcc.(BW) case. */ + if (table68k[code].mnemo != table68k[opcode].mnemo + || table68k[code].size != table68k[opcode].size + || table68k[code].suse != table68k[opcode].suse + || table68k[code].duse != table68k[opcode].duse) + { + mismatch++; continue; + } + if (table68k[opcode].suse + && (table68k[opcode].spos != table68k[code].spos + || table68k[opcode].smode != table68k[code].smode + || table68k[opcode].stype != table68k[code].stype)) + { + mismatch++; continue; + } + if (table68k[opcode].duse + && (table68k[opcode].dpos != table68k[code].dpos + || table68k[opcode].dmode != table68k[code].dmode)) + { + mismatch++; continue; + } + + if (code != opcode) + table68k[code].handler = opcode; + } + } +} + +void do_merges (void) +{ + long int opcode; + int nr = 0; + mismatch = 0; + for (opcode = 0; opcode < 65536; opcode++) { + if (table68k[opcode].handler != -1 || table68k[opcode].mnemo == i_ILLG) + continue; + nr++; + handle_merges (opcode); + } + nr_cpuop_funcs = nr; +} + +int get_no_mismatches (void) +{ + return mismatch; +} + +const char *get_instruction_name (unsigned int opcode) +{ + struct instr *ins = &table68k[opcode]; + for (int i = 0; lookuptab[i].name[0]; i++) { + if (ins->mnemo == lookuptab[i].mnemo) + return lookuptab[i].name; + } + abort(); + return NULL; +} + +static char *get_ea_string (amodes mode, wordsizes size) +{ + static char buffer[80]; + + buffer[0] = 0; + switch (mode){ + case Dreg: + strcpy (buffer,"Dn"); + break; + case Areg: + strcpy (buffer,"An"); + break; + case Aind: + strcpy (buffer,"(An)"); + break; + case Aipi: + strcpy (buffer,"(An)+"); + break; + case Apdi: + strcpy (buffer,"-(An)"); + break; + case Ad16: + strcpy (buffer,"(d16,An)"); + break; + case Ad8r: + strcpy (buffer,"(d8,An,Xn)"); + break; + case PC16: + strcpy (buffer,"(d16,PC)"); + break; + case PC8r: + strcpy (buffer,"(d8,PC,Xn)"); + break; + case absw: + strcpy (buffer,"(xxx).W"); + break; + case absl: + strcpy (buffer,"(xxx).L"); + break; + case imm: + switch (size){ + case sz_byte: + strcpy (buffer,"#.B"); + break; + case sz_word: + strcpy (buffer,"#.W"); + break; + case sz_long: + strcpy (buffer,"#.L"); + break; + default: + break; + } + break; + case imm0: + strcpy (buffer,"#.B"); + break; + case imm1: + strcpy (buffer,"#.W"); + break; + case imm2: + strcpy (buffer,"#.L"); + break; + case immi: + strcpy (buffer,"#"); + break; + + default: + break; + } + return buffer; +} + +const char *get_instruction_string (unsigned int opcode) +{ + static char out[100]; + struct instr *ins; + + strcpy (out, get_instruction_name (opcode)); + + ins = &table68k[opcode]; + if (ins->size == sz_byte) + strcat (out,".B"); + if (ins->size == sz_word) + strcat (out,".W"); + if (ins->size == sz_long) + strcat (out,".L"); + strcat (out," "); + if (ins->suse) + strcat (out, get_ea_string (amodes(ins->smode), wordsizes(ins->size))); + if (ins->duse) { + if (ins->suse) + strcat (out,","); + strcat (out, get_ea_string (amodes(ins->dmode), wordsizes(ins->size))); + } + return out; +} diff --git a/BasiliskII/src/uae_cpu/readcpu.h b/BasiliskII/src/uae_cpu/readcpu.h new file mode 100644 index 000000000..6fba3c393 --- /dev/null +++ b/BasiliskII/src/uae_cpu/readcpu.h @@ -0,0 +1,130 @@ +#ifndef READCPU_H +#define READCPU_H + +#ifdef __cplusplus +extern "C" { +#endif + +ENUMDECL { + Dreg, Areg, Aind, Aipi, Apdi, Ad16, Ad8r, + absw, absl, PC16, PC8r, imm, imm0, imm1, imm2, immi, am_unknown, am_illg +} ENUMNAME (amodes); + +ENUMDECL { + i_ILLG, + + i_OR, i_AND, i_EOR, i_ORSR, i_ANDSR, i_EORSR, + i_SUB, i_SUBA, i_SUBX, i_SBCD, + i_ADD, i_ADDA, i_ADDX, i_ABCD, + i_NEG, i_NEGX, i_NBCD, i_CLR, i_NOT, i_TST, + i_BTST, i_BCHG, i_BCLR, i_BSET, + i_CMP, i_CMPM, i_CMPA, + i_MVPRM, i_MVPMR, i_MOVE, i_MOVEA, i_MVSR2, i_MV2SR, + i_SWAP, i_EXG, i_EXT, i_MVMEL, i_MVMLE, + i_TRAP, i_MVR2USP, i_MVUSP2R, i_RESET, i_NOP, i_STOP, i_RTE, i_RTD, + i_LINK, i_UNLK, + i_RTS, i_TRAPV, i_RTR, + i_JSR, i_JMP, i_BSR, i_Bcc, + i_LEA, i_PEA, i_DBcc, i_Scc, + i_DIVU, i_DIVS, i_MULU, i_MULS, + i_ASR, i_ASL, i_LSR, i_LSL, i_ROL, i_ROR, i_ROXL, i_ROXR, + i_ASRW, i_ASLW, i_LSRW, i_LSLW, i_ROLW, i_RORW, i_ROXLW, i_ROXRW, + i_CHK,i_CHK2, + i_MOVEC2, i_MOVE2C, i_CAS, i_CAS2, i_DIVL, i_MULL, + i_BFTST,i_BFEXTU,i_BFCHG,i_BFEXTS,i_BFCLR,i_BFFFO,i_BFSET,i_BFINS, + i_PACK, i_UNPK, i_TAS, i_BKPT, i_CALLM, i_RTM, i_TRAPcc, i_MOVES, + i_FPP, i_FDBcc, i_FScc, i_FTRAPcc, i_FBcc, i_FSAVE, i_FRESTORE, + i_CINVL, i_CINVP, i_CINVA, i_CPUSHL, i_CPUSHP, i_CPUSHA, i_MOVE16, + i_MMUOP, + i_EMULOP_RETURN, i_EMULOP +} ENUMNAME (instrmnem); + +extern struct mnemolookup { + instrmnem mnemo; + const char *name; +} lookuptab[]; + +ENUMDECL { + sz_byte, sz_word, sz_long +} ENUMNAME (wordsizes); + +ENUMDECL { + fa_set, fa_unset, fa_zero, fa_one, fa_dontcare, fa_unknown, fa_isjmp +} ENUMNAME (flagaffect); + +ENUMDECL { + fu_used, fu_unused, fu_maybecc, fu_unknown, fu_isjmp +} ENUMNAME (flaguse); + +ENUMDECL { + fl_normal = 0, + fl_branch = 1, + fl_jump = 2, + fl_return = 3, + fl_trap = 4, + fl_const_jump = 8, + + /* Instructions that can trap don't mark the end of a block */ + fl_end_block = 3 +} ENUMNAME (cflow_t); + +ENUMDECL { + bit0, bit1, bitc, bitC, bitf, biti, bitI, bitj, bitJ, bitk, bitK, + bits, bitS, bitd, bitD, bitr, bitR, bitz, bitE, bitp, lastbit +} ENUMNAME (bitvals); + +struct instr_def { + unsigned int bits; + int n_variable; + char bitpos[16]; + unsigned int mask; + int cpulevel; + int plevel; + struct { + unsigned int flaguse:3; + unsigned int flagset:3; + } flaginfo[5]; + unsigned char cflow; + unsigned char sduse; + const char *opcstr; +}; + +extern struct instr_def defs68k[]; +extern int n_defs68k; + +extern struct instr { + long int handler; + unsigned char dreg; + unsigned char sreg; + signed char dpos; + signed char spos; + unsigned char sduse; + int flagdead:8, flaglive:8; + unsigned int mnemo:8; + unsigned int cc:4; + unsigned int plev:2; + unsigned int size:2; + unsigned int smode:5; + unsigned int stype:3; + unsigned int dmode:5; + unsigned int suse:1; + unsigned int duse:1; + unsigned int unused1:1; + unsigned int clev:3; + unsigned int cflow:3; + unsigned int unused2:2; +} *table68k; + +extern void read_table68k (void); +extern void do_merges (void); +extern int get_no_mismatches (void); +extern int nr_cpuop_funcs; + +extern const char *get_instruction_name (unsigned int opcode); +extern const char *get_instruction_string (unsigned int opcode); + +#ifdef __cplusplus +} +#endif + +#endif /* READCPU_H */ diff --git a/BasiliskII/src/uae_cpu/spcflags.h b/BasiliskII/src/uae_cpu/spcflags.h new file mode 100644 index 000000000..3c3fc0322 --- /dev/null +++ b/BasiliskII/src/uae_cpu/spcflags.h @@ -0,0 +1,107 @@ +/* + * UAE - The Un*x Amiga Emulator + * + * MC68000 emulation + * + * Copyright 1995 Bernd Schmidt + * + * 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 SPCFLAGS_H +#define SPCFLAGS_H + +typedef uae_u32 spcflags_t; + +enum { + SPCFLAG_STOP = 0x01, + SPCFLAG_INT = 0x02, + SPCFLAG_BRK = 0x04, + SPCFLAG_TRACE = 0x08, + SPCFLAG_DOTRACE = 0x10, + SPCFLAG_DOINT = 0x20, +#if USE_JIT + SPCFLAG_JIT_END_COMPILE = 0x40, + SPCFLAG_JIT_EXEC_RETURN = 0x80, +#else + SPCFLAG_JIT_END_COMPILE = 0, + SPCFLAG_JIT_EXEC_RETURN = 0, +#endif + + SPCFLAG_ALL = SPCFLAG_STOP + | SPCFLAG_INT + | SPCFLAG_BRK + | SPCFLAG_TRACE + | SPCFLAG_DOTRACE + | SPCFLAG_DOINT + | SPCFLAG_JIT_END_COMPILE + | SPCFLAG_JIT_EXEC_RETURN + , + + SPCFLAG_ALL_BUT_EXEC_RETURN = SPCFLAG_ALL & ~SPCFLAG_JIT_EXEC_RETURN +}; + +#define SPCFLAGS_TEST(m) \ + ((regs.spcflags & (m)) != 0) + +/* Macro only used in m68k_reset() */ +#define SPCFLAGS_INIT(m) do { \ + regs.spcflags = (m); \ +} while (0) + +#if !(ENABLE_EXCLUSIVE_SPCFLAGS) + +#define SPCFLAGS_SET(m) do { \ + regs.spcflags |= (m); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + regs.spcflags &= ~(m); \ +} while (0) + +#elif defined(X86_ASSEMBLY) + +#define HAVE_HARDWARE_LOCKS + +#define SPCFLAGS_SET(m) do { \ + __asm__ __volatile__("lock\n\torl %1,%0" : "=m" (regs.spcflags) : "i" ((m))); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + __asm__ __volatile__("lock\n\tandl %1,%0" : "=m" (regs.spcflags) : "i" (~(m))); \ +} while (0) + +#else + +#undef HAVE_HARDWARE_LOCKS + +#include "main.h" +extern B2_mutex *spcflags_lock; + +#define SPCFLAGS_SET(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags |= (m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#define SPCFLAGS_CLEAR(m) do { \ + B2_lock_mutex(spcflags_lock); \ + regs.spcflags &= ~(m); \ + B2_unlock_mutex(spcflags_lock); \ +} while (0) + +#endif + +#endif /* SPCFLAGS_H */ diff --git a/BasiliskII/src/uae_cpu/table68k b/BasiliskII/src/uae_cpu/table68k new file mode 100644 index 000000000..ab9eabe18 --- /dev/null +++ b/BasiliskII/src/uae_cpu/table68k @@ -0,0 +1,274 @@ +% 0: bit 0 +% 1: bit 1 +% c: condition code +% C: condition codes, except F +% f: direction +% i: immediate +% E: immediate, except 00 (for EmulOp instructions) +% I: immediate, except 00 and ff +% j: immediate 1..8 +% J: immediate 0..15 +% k: immediate 0..7 +% K: immediate 0..63 +% p: immediate 0..3 (CINV and CPUSH instructions: Cache Field) +% s: source mode +% S: source reg +% d: dest mode +% D: dest reg +% r: reg +% z: size +% +% Actually, a sssSSS may appear as a destination, and +% vice versa. The only difference between sssSSS and +% dddDDD are the valid addressing modes. There is +% no match for immediate and pc-rel. addressing modes +% in case of dddDDD. +% +% Arp: --> -(Ar) +% ArP: --> (Ar)+ +% L: --> (xxx.L) +% +% Fields on a line: +% 16 chars bitpattern : +% CPU level / privilege level : +% CPU level 0: 68000 +% 1: 68010 +% 2: 68020 +% 3: 68020/68881 +% 4: 68040 +% privilege level 0: not privileged +% 1: unprivileged only on 68000 (check regs.s) +% 2: privileged (check regs.s) +% 3: privileged if size == word (check regs.s) +% Flags set by instruction: XNZVC : +% Flags used by instruction: XNZVC : +% - means flag unaffected / unused +% 0 means flag reset +% 1 means flag set +% ? means programmer was too lazy to check or instruction may trap +% everything else means flag set/used +% x means flag is unknown and well-behaved programs shouldn't check it +% +% Control flow +% two letters, combination of +% - nothing +% T the instruction may trap or cause an exception +% B branch instruction +% J jump instruction +% R return instruction +% +% srcaddr status destaddr status : +% bitmasks of +% 1 means fetched +% 2 means stored +% 4 means jump offset +% 8 means jump address +% instruction +% + +0000 0000 0011 1100:00:XNZVC:XNZVC:--:10: ORSR.B #1 +0000 0000 0111 1100:02:XNZVC:XNZVC:T-:10: ORSR.W #1 +0000 0zz0 11ss sSSS:20:-?Z?C:-----:T-:11: CHK2.z #1,s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0000 zzdd dDDD:00:-NZ00:-----:--:13: OR.z #z,d[!Areg] +0000 0010 0011 1100:00:XNZVC:XNZVC:--:10: ANDSR.B #1 +0000 0010 0111 1100:02:XNZVC:XNZVC:T-:10: ANDSR.W #1 +0000 0010 zzdd dDDD:00:-NZ00:-----:--:13: AND.z #z,d[!Areg] +0000 0100 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #z,d[!Areg] +0000 0110 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #z,d[!Areg] +0000 0110 11ss sSSS:20:-----:XNZVC:--:10: CALLM s[!Dreg,Areg,Aipi,Apdi,Immd] +0000 0110 11ss sSSS:20:XNZVC:-----:-R:10: RTM s[Dreg,Areg] +0000 1000 00ss sSSS:00:--Z--:-----:--:11: BTST #1,s[!Areg] +0000 1000 01ss sSSS:00:--Z--:-----:--:13: BCHG #1,s[!Areg,Immd] +0000 1000 10ss sSSS:00:--Z--:-----:--:13: BCLR #1,s[!Areg,Immd] +0000 1000 11ss sSSS:00:--Z--:-----:--:13: BSET #1,s[!Areg,Immd] +0000 1010 0011 1100:00:XNZVC:XNZVC:--:10: EORSR.B #1 +0000 1010 0111 1100:02:XNZVC:XNZVC:T-:10: EORSR.W #1 +0000 1010 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z #z,d[!Areg] +0000 1100 zzss sSSS:00:-NZVC:-----:--:11: CMP.z #z,s[!Areg,Immd] + +0000 1010 11ss sSSS:20:-NZVC:-----:--:13: CAS.B #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 11ss sSSS:20:-NZVC:-----:--:13: CAS.W #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1100 1111 1100:20:-NZVC:-----:--:10: CAS2.W #2 +0000 1110 zzss sSSS:22:-----:-----:T-:13: MOVES.z #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 11ss sSSS:20:-NZVC:-----:--:13: CAS.L #1,s[!Dreg,Areg,Immd,PC8r,PC16] +0000 1110 1111 1100:20:-NZVC:-----:--:10: CAS2.L #2 + +0000 rrr1 00dd dDDD:00:-----:-----:--:12: MVPMR.W d[Areg-Ad16],Dr +0000 rrr1 01dd dDDD:00:-----:-----:--:12: MVPMR.L d[Areg-Ad16],Dr +0000 rrr1 10dd dDDD:00:-----:-----:--:12: MVPRM.W Dr,d[Areg-Ad16] +0000 rrr1 11dd dDDD:00:-----:-----:--:12: MVPRM.L Dr,d[Areg-Ad16] +0000 rrr1 00ss sSSS:00:--Z--:-----:--:11: BTST Dr,s[!Areg] +0000 rrr1 01ss sSSS:00:--Z--:-----:--:13: BCHG Dr,s[!Areg,Immd] +0000 rrr1 10ss sSSS:00:--Z--:-----:--:13: BCLR Dr,s[!Areg,Immd] +0000 rrr1 11ss sSSS:00:--Z--:-----:--:13: BSET Dr,s[!Areg,Immd] + +0001 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.B s,d[!Areg] +0010 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.L s,d[Areg] +0010 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.L s,d[!Areg] +0011 DDDd ddss sSSS:00:-----:-----:--:12: MOVEA.W s,d[Areg] +0011 DDDd ddss sSSS:00:-NZ00:-----:--:12: MOVE.W s,d[!Areg] + +0100 0000 zzdd dDDD:00:XxZxC:X-Z--:--:30: NEGX.z d[!Areg] +0100 0000 11dd dDDD:01:-----:XNZVC:T-:10: MVSR2.W d[!Areg] +0100 0010 zzdd dDDD:00:-0100:-----:--:20: CLR.z d[!Areg] +0100 0010 11dd dDDD:10:-----:XNZVC:--:10: MVSR2.B d[!Areg] +0100 0100 zzdd dDDD:00:XNZVC:-----:--:30: NEG.z d[!Areg] +0100 0100 11ss sSSS:00:XNZVC:-----:--:10: MV2SR.B s[!Areg] +0100 0110 zzdd dDDD:00:-NZ00:-----:--:30: NOT.z d[!Areg] +0100 0110 11ss sSSS:02:XNZVC:XNZVC:T-:10: MV2SR.W s[!Areg] +0100 1000 0000 1rrr:20:-----:-----:--:31: LINK.L Ar,#2 +0100 1000 00dd dDDD:00:X?Z?C:X-Z--:--:30: NBCD.B d[!Areg] +0100 1000 0100 1kkk:20:-----:-----:T-:10: BKPT #k +0100 1000 01ss sSSS:00:-NZ00:-----:--:30: SWAP.W s[Dreg] +0100 1000 01ss sSSS:00:-----:-----:--:00: PEA.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 1000 10dd dDDD:00:-NZ00:-----:--:30: EXT.W d[Dreg] +0100 1000 10dd dDDD:00:-----:-----:--:02: MVMLE.W #1,d[!Dreg,Areg,Aipi] +0100 1000 11dd dDDD:00:-NZ00:-----:--:30: EXT.L d[Dreg] +0100 1000 11dd dDDD:00:-----:-----:--:02: MVMLE.L #1,d[!Dreg,Areg,Aipi] +0100 1001 11dd dDDD:00:-NZ00:-----:--:30: EXT.B d[Dreg] +0100 1010 zzss sSSS:00:-NZ00:-----:--:10: TST.z s +0100 1010 11dd dDDD:00:-NZ00:-----:--:30: TAS.B d[!Areg] +0100 1010 1111 1100:00:-----:-----:T-:00: ILLEGAL +0100 1100 00ss sSSS:20:-NZVC:-----:--:13: MULL.L #1,s[!Areg] +0100 1100 01ss sSSS:20:-NZV0:-----:T-:13: DIVL.L #1,s[!Areg] +0100 1100 10ss sSSS:00:-----:-----:--:01: MVMEL.W #1,s[!Dreg,Areg,Apdi,Immd] +0100 1100 11ss sSSS:00:-----:-----:--:01: MVMEL.L #1,s[!Dreg,Areg,Apdi,Immd] +0100 1110 0100 JJJJ:00:-----:XNZVC:--:10: TRAP #J +0100 1110 0101 0rrr:00:-----:-----:--:31: LINK.W Ar,#1 +0100 1110 0101 1rrr:00:-----:-----:--:30: UNLK.L Ar +0100 1110 0110 0rrr:02:-----:-----:T-:10: MVR2USP.L Ar +0100 1110 0110 1rrr:02:-----:-----:T-:20: MVUSP2R.L Ar +0100 1110 0111 0000:02:-----:-----:T-:00: RESET +0100 1110 0111 0001:00:-----:-----:--:00: NOP +0100 1110 0111 0010:02:XNZVC:-----:T-:10: STOP #1 +0100 1110 0111 0011:02:XNZVC:-----:TR:00: RTE +0100 1110 0111 0100:00:-----:-----:-R:10: RTD #1 +0100 1110 0111 0101:00:-----:-----:-R:00: RTS +0100 1110 0111 0110:00:-----:XNZVC:T-:00: TRAPV +0100 1110 0111 0111:00:XNZVC:-----:-R:00: RTR +0100 1110 0111 1010:12:-----:-----:T-:10: MOVEC2 #1 +0100 1110 0111 1011:12:-----:-----:T-:10: MOVE2C #1 +0100 1110 10ss sSSS:00:-----:-----:-J:80: JSR.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 00ss sSSS:00:-N???:-----:T-:11: CHK.L s[!Areg],Dr +0100 rrr1 10ss sSSS:00:-N???:-----:T-:11: CHK.W s[!Areg],Dr +0100 1110 11ss sSSS:00:-----:-----:-J:80: JMP.L s[!Dreg,Areg,Aipi,Apdi,Immd] +0100 rrr1 11ss sSSS:00:-----:-----:--:02: LEA.L s[!Dreg,Areg,Aipi,Apdi,Immd],Ar + +0101 jjj0 01dd dDDD:00:-----:-----:--:13: ADDA.W #j,d[Areg] +0101 jjj0 10dd dDDD:00:-----:-----:--:13: ADDA.L #j,d[Areg] +0101 jjj0 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z #j,d[!Areg] +0101 jjj1 01dd dDDD:00:-----:-----:--:13: SUBA.W #j,d[Areg] +0101 jjj1 10dd dDDD:00:-----:-----:--:13: SUBA.L #j,d[Areg] +0101 jjj1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z #j,d[!Areg] + +0101 cccc 1100 1rrr:00:-----:-????:-B:31: DBcc.W Dr,#1 +0101 cccc 11dd dDDD:00:-----:-????:--:20: Scc.B d[!Areg] +0101 cccc 1111 1010:20:-----:-????:T-:10: TRAPcc #1 +0101 cccc 1111 1011:20:-----:-????:T-:10: TRAPcc #2 +0101 cccc 1111 1100:20:-----:-????:T-:00: TRAPcc + +% Bxx.L is 68020 only, but setting the CPU level to 2 would give illegal +% instruction exceptions when compiling a 68000 only emulation, which isn't +% what we want either. +0110 0001 0000 0000:00:-----:-----:-B:40: BSR.W #1 +0110 0001 IIII IIII:00:-----:-----:-B:40: BSR.B #i +0110 0001 1111 1111:00:-----:-----:-B:40: BSR.L #2 +0110 CCCC 0000 0000:00:-----:-????:-B:40: Bcc.W #1 +0110 CCCC IIII IIII:00:-----:-????:-B:40: Bcc.B #i +0110 CCCC 1111 1111:00:-----:-????:-B:40: Bcc.L #2 + +0111 rrr0 iiii iiii:00:-NZ00:-----:--:12: MOVE.L #i,Dr + +1000 rrr0 zzss sSSS:00:-NZ00:-----:--:13: OR.z s[!Areg],Dr +1000 rrr0 11ss sSSS:00:-NZV0:-----:T-:13: DIVU.W s[!Areg],Dr +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Dreg],Dr +1000 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: SBCD.B d[Areg-Apdi],Arp +1000 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: OR.z Dr,d[!Areg,Dreg] +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Dreg],Dr +1000 rrr1 01dd dDDD:20:-----:-----:--:12: PACK d[Areg-Apdi],Arp +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Dreg],Dr +1000 rrr1 10dd dDDD:20:-----:-----:--:12: UNPK d[Areg-Apdi],Arp +1000 rrr1 11ss sSSS:00:-NZV0:-----:T-:13: DIVS.W s[!Areg],Dr + +1001 rrr0 zzss sSSS:00:XNZVC:-----:--:13: SUB.z s,Dr +1001 rrr0 11ss sSSS:00:-----:-----:--:13: SUBA.W s,Ar +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Dreg],Dr +1001 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: SUBX.z d[Areg-Apdi],Arp +1001 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: SUB.z Dr,d[!Areg,Dreg] +1001 rrr1 11ss sSSS:00:-----:-----:--:13: SUBA.L s,Ar + +1011 rrr0 zzss sSSS:00:-NZVC:-----:--:11: CMP.z s,Dr +1011 rrr0 11ss sSSS:00:-NZVC:-----:--:11: CMPA.W s,Ar +1011 rrr1 11ss sSSS:00:-NZVC:-----:--:11: CMPA.L s,Ar +1011 rrr1 zzdd dDDD:00:-NZVC:-----:--:11: CMPM.z d[Areg-Aipi],ArP +1011 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: EOR.z Dr,d[!Areg] + +1100 rrr0 zzss sSSS:00:-NZ00:-----:--:13: AND.z s[!Areg],Dr +1100 rrr0 11ss sSSS:00:-NZ00:-----:--:13: MULU.W s[!Areg],Dr +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Dreg],Dr +1100 rrr1 00dd dDDD:00:XxZxC:X-Z--:--:13: ABCD.B d[Areg-Apdi],Arp +1100 rrr1 zzdd dDDD:00:-NZ00:-----:--:13: AND.z Dr,d[!Areg,Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Dreg] +1100 rrr1 01dd dDDD:00:-----:-----:--:33: EXG.L Ar,d[Areg] +1100 rrr1 10dd dDDD:00:-----:-----:--:33: EXG.L Dr,d[Areg] +1100 rrr1 11ss sSSS:00:-NZ00:-----:--:13: MULS.W s[!Areg],Dr + +1101 rrr0 zzss sSSS:00:XNZVC:-----:--:13: ADD.z s,Dr +1101 rrr0 11ss sSSS:00:-----:-----:--:13: ADDA.W s,Ar +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Dreg],Dr +1101 rrr1 zzdd dDDD:00:XNZVC:X-Z--:--:13: ADDX.z d[Areg-Apdi],Arp +1101 rrr1 zzdd dDDD:00:XNZVC:-----:--:13: ADD.z Dr,d[!Areg,Dreg] +1101 rrr1 11ss sSSS:00:-----:-----:--:13: ADDA.L s,Ar + +1110 jjjf zz00 0RRR:00:XNZVC:-----:--:13: ASf.z #j,DR +1110 jjjf zz00 1RRR:00:XNZ0C:-----:--:13: LSf.z #j,DR +1110 jjjf zz01 0RRR:00:XNZ0C:X----:--:13: ROXf.z #j,DR +1110 jjjf zz01 1RRR:00:-NZ0C:-----:--:13: ROf.z #j,DR +1110 rrrf zz10 0RRR:00:XNZVC:-----:--:13: ASf.z Dr,DR +1110 rrrf zz10 1RRR:00:XNZ0C:-----:--:13: LSf.z Dr,DR +1110 rrrf zz11 0RRR:00:XNZ0C:X----:--:13: ROXf.z Dr,DR +1110 rrrf zz11 1RRR:00:-NZ0C:-----:--:13: ROf.z Dr,DR +1110 000f 11dd dDDD:00:XNZVC:-----:--:13: ASfW.W d[!Dreg,Areg] +1110 001f 11dd dDDD:00:XNZ0C:-----:--:13: LSfW.W d[!Dreg,Areg] +1110 010f 11dd dDDD:00:XNZ0C:X----:--:13: ROXfW.W d[!Dreg,Areg] +1110 011f 11dd dDDD:00:-NZ0C:-----:--:13: ROfW.W d[!Dreg,Areg] + +1110 1000 11ss sSSS:20:-NZ00:-----:--:11: BFTST #1,s[!Areg,Apdi,Aipi,Immd] +1110 1001 11ss sSSS:20:-NZ00:-----:--:11: BFEXTU #1,s[!Areg,Apdi,Aipi,Immd] +1110 1010 11ss sSSS:20:-NZ00:-----:--:13: BFCHG #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1011 11ss sSSS:20:-NZ00:-----:--:11: BFEXTS #1,s[!Areg,Apdi,Aipi,Immd] +1110 1100 11ss sSSS:20:-NZ00:-----:--:13: BFCLR #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1101 11ss sSSS:20:-NZ00:-----:--:11: BFFFO #1,s[!Areg,Apdi,Aipi,Immd] +1110 1110 11ss sSSS:20:-NZ00:-----:--:13: BFSET #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] +1110 1111 11ss sSSS:20:-NZ00:-----:--:13: BFINS #1,s[!Areg,Apdi,Aipi,Immd,PC8r,PC16] + +% floating point co processor +1111 0010 00ss sSSS:30:-----:-----:--:11: FPP #1,s +1111 0010 01ss sSSS:30:-----:-----:-B:11: FDBcc #1,s[Areg-Dreg] +1111 0010 01ss sSSS:30:-----:-----:--:11: FScc #1,s[!Areg,Immd,PC8r,PC16] +1111 0010 0111 1010:30:-----:-----:T-:10: FTRAPcc #1 +1111 0010 0111 1011:30:-----:-----:T-:10: FTRAPcc #2 +1111 0010 0111 1100:30:-----:-----:T-:00: FTRAPcc +1111 0010 10KK KKKK:30:-----:-----:-B:11: FBcc #K,#1 +1111 0010 11KK KKKK:30:-----:-----:-B:11: FBcc #K,#2 +1111 0011 00ss sSSS:32:-----:-----:--:20: FSAVE s[!Dreg,Areg,Aipi,Immd,PC8r,PC16] +1111 0011 01ss sSSS:32:-----:-----:--:10: FRESTORE s[!Dreg,Areg,Apdi,Immd] + +% 68040 instructions +1111 0101 iiii iSSS:40:-----:-----:T-:11: MMUOP #i,s +1111 0100 pp00 1rrr:42:-----:-----:T-:02: CINVL #p,Ar +1111 0100 pp01 0rrr:42:-----:-----:T-:02: CINVP #p,Ar +1111 0100 pp01 1rrr:42:-----:-----:T-:00: CINVA #p +1111 0100 pp10 1rrr:42:-----:-----:T-:02: CPUSHL #p,Ar +1111 0100 pp11 0rrr:42:-----:-----:T-:02: CPUSHP #p,Ar +1111 0100 pp11 1rrr:42:-----:-----:T-:00: CPUSHA #p +% destination register number is encoded in the following word +1111 0110 0010 0rrr:40:-----:-----:--:12: MOVE16 ArP,AxP +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Dreg-Aipi],L +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Areg-Aipi] +1111 0110 00ss sSSS:40:-----:-----:--:12: MOVE16 s[Aind],L +1111 0110 00dd dDDD:40:-----:-----:--:12: MOVE16 L,d[Aipi-Aind] + +% EmulOp instructions +0111 0001 0000 0000:00:-----:-----:-R:00: EMULOP_RETURN +0111 0001 EEEE EEEE:00:-----:-----:-J:10: EMULOP #E From caf10f12230ac4bb793000e9db7aa64886461317 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Thu, 6 May 2021 14:24:31 +0900 Subject: [PATCH 498/534] BII(x86_64): re-enabled JIT compiler --- .../BasiliskII.xcodeproj/project.pbxproj | 300 +++++------ BasiliskII/src/MacOSX/Makefile.gencpu | 4 +- BasiliskII/src/MacOSX/Makefile.gencpu_2021 | 29 + BasiliskII/src/MacOSX/config.h | 2 + .../MacOSX/uae_cpu.xcodeproj/project.pbxproj | 505 ++++++++++++++++++ .../uae_cpu_2021.xcodeproj/project.pbxproj | 435 +++++++++++++++ README.md | 2 +- 7 files changed, 1112 insertions(+), 165 deletions(-) create mode 100644 BasiliskII/src/MacOSX/Makefile.gencpu_2021 create mode 100644 BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj create mode 100644 BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index d5b13d67b..d79860980 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -12,9 +12,6 @@ 752F26FB1F240E69001032B4 /* IOKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 752F26FA1F240E69001032B4 /* IOKit.framework */; }; 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27001F242BAF001032B4 /* prefs_sdl.cpp */; }; 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 752F27021F242F51001032B4 /* xpram_sdl.cpp */; }; - 753253321F5368370024025B /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532D1F5368370024025B /* cpuemu.cpp */; }; - 753253341F5368370024025B /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7532532F1F5368370024025B /* cpustbl.cpp */; }; - 753253351F53688D0024025B /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */; }; 7539E1251F23B25A006B2DF2 /* adb.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFC91F23B25A006B2DF2 /* adb.cpp */; }; 7539E1261F23B25A006B2DF2 /* audio.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCA1F23B25A006B2DF2 /* audio.cpp */; }; 7539E1271F23B25A006B2DF2 /* cdrom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539DFCB1F23B25A006B2DF2 /* cdrom.cpp */; }; @@ -39,11 +36,6 @@ 7539E18D1F23B25A006B2DF2 /* slot_rom.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */; }; 7539E18E1F23B25A006B2DF2 /* sony.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A31F23B25A006B2DF2 /* sony.cpp */; }; 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A41F23B25A006B2DF2 /* timer.cpp */; }; - 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */; }; - 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */; }; - 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0B71F23B25A006B2DF2 /* flags.cpp */; }; - 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */; }; - 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E0C41F23B25A006B2DF2 /* rounding.cpp */; }; 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1221F23B25A006B2DF2 /* user_strings.cpp */; }; 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1231F23B25A006B2DF2 /* video.cpp */; }; 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E1241F23B25A006B2DF2 /* xpram.cpp */; }; @@ -58,14 +50,12 @@ 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */; }; 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */; }; 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */; }; - 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */; }; 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */; }; 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */ = {isa = PBXBuildFile; fileRef = 756C1B331F252FC100620917 /* utils_macosx.mm */; }; 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; - E40A4005263C306A00B76E31 /* fpu_mpfr.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */; }; E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; @@ -92,18 +82,42 @@ E416BEE82410AA4E00751E6D /* runtool.c in Sources */ = {isa = PBXBuildFile; fileRef = E416BEE72410AA4E00751E6D /* runtool.c */; }; E416BEEA2410AA9800751E6D /* Security.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E416BEE92410AA9800751E6D /* Security.framework */; }; E416BEED2410AE0900751E6D /* etherhelpertool in Resources */ = {isa = PBXBuildFile; fileRef = E416BEEC2410AE0000751E6D /* etherhelpertool */; }; - E4257923264116F70061C1F1 /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4257922264116F70061C1F1 /* fpu_ieee.cpp */; }; - E4257924264119500061C1F1 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE024E39BC400843219 /* compemu.cpp */; }; - E4257925264119BF0061C1F1 /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */; }; E447066D25D8FCB400EA2C14 /* Metal.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = E447066C25D8FCB400EA2C14 /* Metal.framework */; }; E4555EED2354434B00139FCE /* Credits.html in Resources */ = {isa = PBXBuildFile; fileRef = 7539E00A1F23B25A006B2DF2 /* Credits.html */; }; E490334E20D3A5890012DD5F /* clip_macosx64.mm in Sources */ = {isa = PBXBuildFile; fileRef = E490334D20D3A5890012DD5F /* clip_macosx64.mm */; }; - E4CF025826395EBB006FDAEA /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EE124E39BC400843219 /* compstbl.cpp */; }; - E4CF025A26396211006FDAEA /* cpufunctbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4CF025926396211006FDAEA /* cpufunctbl.cpp */; }; - E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */; }; - E4EE777523D7D71400BAE63A /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E417913123D7D67C0009AD63 /* defs68k.c */; }; /* End PBXBuildFile section */ +/* Begin PBXContainerItemProxy section */ + E45769AC2643A65B0063BAF1 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = E45769A82643A65B0063BAF1 /* uae_cpu.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = E4F537C02642A86D008B27DF; + remoteInfo = uae_cpu_x86_64; + }; + E45769B92643A6740063BAF1 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = E45769B52643A6740063BAF1 /* uae_cpu_2021.xcodeproj */; + proxyType = 2; + remoteGlobalIDString = E41D7AA12642C004005E8093; + remoteInfo = uae_cpu_arm64; + }; + E45769BC2643A6870063BAF1 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = E45769A82643A65B0063BAF1 /* uae_cpu.xcodeproj */; + proxyType = 1; + remoteGlobalIDString = E4F537BF2642A86D008B27DF; + remoteInfo = uae_cpu_x86_64; + }; + E45769BE2643A68B0063BAF1 /* PBXContainerItemProxy */ = { + isa = PBXContainerItemProxy; + containerPortal = E45769B52643A6740063BAF1 /* uae_cpu_2021.xcodeproj */; + proxyType = 1; + remoteGlobalIDString = E41D7AA02642C004005E8093; + remoteInfo = uae_cpu_arm64; + }; +/* End PBXContainerItemProxy section */ + /* Begin PBXCopyFilesBuildPhase section */ 752F26F31F240140001032B4 /* Embed Frameworks */ = { isa = PBXCopyFilesBuildPhase; @@ -132,11 +146,6 @@ 752F26FA1F240E69001032B4 /* IOKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = IOKit.framework; path = System/Library/Frameworks/IOKit.framework; sourceTree = SDKROOT; }; 752F27001F242BAF001032B4 /* prefs_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_sdl.cpp; sourceTree = ""; }; 752F27021F242F51001032B4 /* xpram_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = xpram_sdl.cpp; sourceTree = ""; }; - 753252E51F5359040024025B /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = build68k.c; sourceTree = ""; }; - 753253011F535F210024025B /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = gencpu.c; sourceTree = ""; }; - 7532532D1F5368370024025B /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 7532532F1F5368370024025B /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - 753253301F5368370024025B /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFB21F23B17E006B2DF2 /* BasiliskII.app */ = {isa = PBXFileReference; explicitFileType = wrapper.application; includeInIndex = 0; path = BasiliskII.app; sourceTree = BUILT_PRODUCTS_DIR; }; 7539DFC91F23B25A006B2DF2 /* adb.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = adb.cpp; path = ../adb.cpp; sourceTree = ""; }; 7539DFCA1F23B25A006B2DF2 /* audio.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = audio.cpp; path = ../audio.cpp; sourceTree = ""; }; @@ -205,32 +214,6 @@ 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = slot_rom.cpp; path = ../slot_rom.cpp; sourceTree = ""; }; 7539E0A31F23B25A006B2DF2 /* sony.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = sony.cpp; path = ../sony.cpp; sourceTree = ""; }; 7539E0A41F23B25A006B2DF2 /* timer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = timer.cpp; path = ../timer.cpp; sourceTree = ""; }; - 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = basilisk_glue.cpp; sourceTree = ""; }; - 7539E0AB1F23B25A006B2DF2 /* compemu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = compemu.h; sourceTree = ""; }; - 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags_x86.h; sourceTree = ""; }; - 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = cpu_emulation.h; sourceTree = ""; }; - 7539E0B41F23B25A006B2DF2 /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = core.h; sourceTree = ""; }; - 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = exceptions.cpp; sourceTree = ""; }; - 7539E0B61F23B25A006B2DF2 /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = exceptions.h; sourceTree = ""; }; - 7539E0B71F23B25A006B2DF2 /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = flags.cpp; sourceTree = ""; }; - 7539E0B81F23B25A006B2DF2 /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = flags.h; sourceTree = ""; }; - 7539E0B91F23B25A006B2DF2 /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu.h; sourceTree = ""; }; - 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_ieee.h; sourceTree = ""; }; - 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_uae.h; sourceTree = ""; }; - 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86.h; sourceTree = ""; }; - 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = fpu_x86_asm.h; sourceTree = ""; }; - 7539E0C11F23B25A006B2DF2 /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = impl.h; sourceTree = ""; }; - 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = mathlib.cpp; sourceTree = ""; }; - 7539E0C31F23B25A006B2DF2 /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = mathlib.h; sourceTree = ""; }; - 7539E0C41F23B25A006B2DF2 /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = rounding.cpp; sourceTree = ""; }; - 7539E0C51F23B25A006B2DF2 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = rounding.h; sourceTree = ""; }; - 7539E0C61F23B25A006B2DF2 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = types.h; sourceTree = ""; }; - 7539E0C81F23B25A006B2DF2 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = m68k.h; sourceTree = ""; }; - 7539E0CC1F23B25A006B2DF2 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = newcpu.h; sourceTree = ""; }; - 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = readcpu.cpp; sourceTree = ""; }; - 7539E0CF1F23B25A006B2DF2 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = readcpu.h; sourceTree = ""; }; - 7539E0D01F23B25A006B2DF2 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = spcflags.h; sourceTree = ""; }; - 7539E0D11F23B25A006B2DF2 /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = table68k; sourceTree = ""; }; 7539E1221F23B25A006B2DF2 /* user_strings.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = user_strings.cpp; path = ../user_strings.cpp; sourceTree = ""; }; 7539E1231F23B25A006B2DF2 /* video.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = video.cpp; path = ../video.cpp; sourceTree = ""; }; 7539E1241F23B25A006B2DF2 /* xpram.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = xpram.cpp; path = ../xpram.cpp; sourceTree = ""; }; @@ -273,7 +256,6 @@ 7539E2881F23C56F006B2DF2 /* prefs_editor_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = prefs_editor_dummy.cpp; sourceTree = ""; }; 7539E2891F23C56F006B2DF2 /* scsi_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = scsi_dummy.cpp; sourceTree = ""; }; 7539E28A1F23C56F006B2DF2 /* serial_dummy.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = serial_dummy.cpp; sourceTree = ""; }; - 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = newcpu.cpp; sourceTree = ""; }; 7539E29C1F23C83F006B2DF2 /* sys_darwin.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = sys_darwin.cpp; sourceTree = ""; }; 7539E2AA1F23CDB7006B2DF2 /* Info.plist */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.plist.xml; path = Info.plist; sourceTree = ""; }; 756C1B321F252FC100620917 /* utils_macosx.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = utils_macosx.h; sourceTree = ""; }; @@ -282,7 +264,6 @@ 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; - E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_mpfr.cpp; sourceTree = ""; }; E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; @@ -334,19 +315,10 @@ E416BEE92410AA9800751E6D /* Security.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Security.framework; path = System/Library/Frameworks/Security.framework; sourceTree = SDKROOT; }; E416BEEB2410AB0E00751E6D /* etherhelpertool.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; path = etherhelpertool.c; sourceTree = ""; }; E416BEEC2410AE0000751E6D /* etherhelpertool */ = {isa = PBXFileReference; lastKnownFileType = text; path = etherhelpertool; sourceTree = BUILT_PRODUCTS_DIR; }; - E417913123D7D67C0009AD63 /* defs68k.c */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; - E4257922264116F70061C1F1 /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = fpu_ieee.cpp; sourceTree = ""; }; - E43D1D9D2638F6E0008957D9 /* registers.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = registers.h; sourceTree = ""; }; - E43D1D9E2638FA73008957D9 /* memory.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = memory.h; sourceTree = ""; }; E447066C25D8FCB400EA2C14 /* Metal.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = Metal.framework; path = System/Library/Frameworks/Metal.framework; sourceTree = SDKROOT; }; + E45769A82643A65B0063BAF1 /* uae_cpu.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; path = uae_cpu.xcodeproj; sourceTree = ""; }; + E45769B52643A6740063BAF1 /* uae_cpu_2021.xcodeproj */ = {isa = PBXFileReference; lastKnownFileType = "wrapper.pb-project"; path = uae_cpu_2021.xcodeproj; sourceTree = ""; }; E490334D20D3A5890012DD5F /* clip_macosx64.mm */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.objcpp; path = clip_macosx64.mm; sourceTree = ""; }; - E4A24F1A263922B30041924E /* cpummu.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = cpummu.h; sourceTree = ""; }; - E4CF025926396211006FDAEA /* cpufunctbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpufunctbl.cpp; path = gencpu_output/cpufunctbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_support.cpp; sourceTree = ""; }; - E4ED8EDF24E39B2A00843219 /* comptbl.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencpu_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; - E4ED8EE024E39BC400843219 /* compemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencpu_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - E4ED8EE124E39BC400843219 /* compstbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compstbl.cpp; path = gencpu_output/compstbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; - E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = compemu_fpp.cpp; sourceTree = ""; }; /* End PBXFileReference section */ /* Begin PBXFrameworksBuildPhase section */ @@ -432,29 +404,15 @@ isa = PBXGroup; children = ( E416BEEC2410AE0000751E6D /* etherhelpertool */, - 7532532B1F53675E0024025B /* gencpu output */, ); name = "generated src"; sourceTree = ""; }; - 7532532B1F53675E0024025B /* gencpu output */ = { - isa = PBXGroup; - children = ( - E4ED8EE024E39BC400843219 /* compemu.cpp */, - E4ED8EE124E39BC400843219 /* compstbl.cpp */, - E4ED8EDF24E39B2A00843219 /* comptbl.h */, - 7532532D1F5368370024025B /* cpuemu.cpp */, - 7532532F1F5368370024025B /* cpustbl.cpp */, - 753253301F5368370024025B /* cputbl.h */, - E417913123D7D67C0009AD63 /* defs68k.c */, - E4CF025926396211006FDAEA /* cpufunctbl.cpp */, - ); - name = "gencpu output"; - sourceTree = ""; - }; 7539DFA91F23B17E006B2DF2 = { isa = PBXGroup; children = ( + E45769A82643A65B0063BAF1 /* uae_cpu.xcodeproj */, + E45769B52643A6740063BAF1 /* uae_cpu_2021.xcodeproj */, E4150D1320D559800077C51A /* SDL2.framework */, 7539E1E41F23B25E006B2DF2 /* src */, 753252FF1F535E5D0024025B /* generated src */, @@ -574,66 +532,6 @@ path = ../SDL; sourceTree = ""; }; - 7539E0A51F23B25A006B2DF2 /* uae_cpu_2021 */ = { - isa = PBXGroup; - children = ( - 7539E0A61F23B25A006B2DF2 /* basilisk_glue.cpp */, - 753252E51F5359040024025B /* build68k.c */, - 7539E0A81F23B25A006B2DF2 /* compiler */, - 7539E0B11F23B25A006B2DF2 /* cpu_emulation.h */, - E4A24F1A263922B30041924E /* cpummu.h */, - 7539E0B31F23B25A006B2DF2 /* fpu */, - 753253011F535F210024025B /* gencpu.c */, - 7539E0C81F23B25A006B2DF2 /* m68k.h */, - E43D1D9E2638FA73008957D9 /* memory.h */, - 7539E2961F23C5FD006B2DF2 /* newcpu.cpp */, - 7539E0CC1F23B25A006B2DF2 /* newcpu.h */, - 7539E0CE1F23B25A006B2DF2 /* readcpu.cpp */, - 7539E0CF1F23B25A006B2DF2 /* readcpu.h */, - E43D1D9D2638F6E0008957D9 /* registers.h */, - 7539E0D01F23B25A006B2DF2 /* spcflags.h */, - 7539E0D11F23B25A006B2DF2 /* table68k */, - ); - name = uae_cpu_2021; - path = ../uae_cpu_2021; - sourceTree = ""; - }; - 7539E0A81F23B25A006B2DF2 /* compiler */ = { - isa = PBXGroup; - children = ( - 7539E0AB1F23B25A006B2DF2 /* compemu.h */, - E4ED8EE424E39C0D00843219 /* compemu_fpp.cpp */, - E4ED8EDD24E39AFE00843219 /* compemu_support.cpp */, - 7539E0AE1F23B25A006B2DF2 /* flags_x86.h */, - ); - path = compiler; - sourceTree = ""; - }; - 7539E0B31F23B25A006B2DF2 /* fpu */ = { - isa = PBXGroup; - children = ( - E4257922264116F70061C1F1 /* fpu_ieee.cpp */, - E40A4004263C306A00B76E31 /* fpu_mpfr.cpp */, - 7539E0B41F23B25A006B2DF2 /* core.h */, - 7539E0B51F23B25A006B2DF2 /* exceptions.cpp */, - 7539E0B61F23B25A006B2DF2 /* exceptions.h */, - 7539E0B71F23B25A006B2DF2 /* flags.cpp */, - 7539E0B81F23B25A006B2DF2 /* flags.h */, - 7539E0B91F23B25A006B2DF2 /* fpu.h */, - 7539E0BB1F23B25A006B2DF2 /* fpu_ieee.h */, - 7539E0BD1F23B25A006B2DF2 /* fpu_uae.h */, - 7539E0BF1F23B25A006B2DF2 /* fpu_x86.h */, - 7539E0C01F23B25A006B2DF2 /* fpu_x86_asm.h */, - 7539E0C11F23B25A006B2DF2 /* impl.h */, - 7539E0C21F23B25A006B2DF2 /* mathlib.cpp */, - 7539E0C31F23B25A006B2DF2 /* mathlib.h */, - 7539E0C41F23B25A006B2DF2 /* rounding.cpp */, - 7539E0C51F23B25A006B2DF2 /* rounding.h */, - 7539E0C61F23B25A006B2DF2 /* types.h */, - ); - path = fpu; - sourceTree = ""; - }; 7539E1E41F23B25E006B2DF2 /* src */ = { isa = PBXGroup; children = ( @@ -663,7 +561,6 @@ 7539E0A21F23B25A006B2DF2 /* slot_rom.cpp */, 7539E0A31F23B25A006B2DF2 /* sony.cpp */, 7539E0A41F23B25A006B2DF2 /* timer.cpp */, - 7539E0A51F23B25A006B2DF2 /* uae_cpu_2021 */, 7539E1E91F23B329006B2DF2 /* Unix */, 7539E1221F23B25A006B2DF2 /* user_strings.cpp */, 7539E1231F23B25A006B2DF2 /* video.cpp */, @@ -752,6 +649,22 @@ path = ../dummy; sourceTree = ""; }; + E45769A92643A65B0063BAF1 /* Products */ = { + isa = PBXGroup; + children = ( + E45769AD2643A65B0063BAF1 /* libuae_cpu_x86_64.a */, + ); + name = Products; + sourceTree = ""; + }; + E45769B62643A6740063BAF1 /* Products */ = { + isa = PBXGroup; + children = ( + E45769BA2643A6740063BAF1 /* libuae_cpu_arm64.a */, + ); + name = Products; + sourceTree = ""; + }; /* End PBXGroup section */ /* Begin PBXNativeTarget section */ @@ -768,6 +681,8 @@ buildRules = ( ); dependencies = ( + E45769BF2643A68B0063BAF1 /* PBXTargetDependency */, + E45769BD2643A6870063BAF1 /* PBXTargetDependency */, ); name = BasiliskII; productName = BasiliskII; @@ -800,6 +715,16 @@ mainGroup = 7539DFA91F23B17E006B2DF2; productRefGroup = 7539DFB31F23B17E006B2DF2 /* Products */; projectDirPath = ""; + projectReferences = ( + { + ProductGroup = E45769A92643A65B0063BAF1 /* Products */; + ProjectRef = E45769A82643A65B0063BAF1 /* uae_cpu.xcodeproj */; + }, + { + ProductGroup = E45769B62643A6740063BAF1 /* Products */; + ProjectRef = E45769B52643A6740063BAF1 /* uae_cpu_2021.xcodeproj */; + }, + ); projectRoot = ""; targets = ( 7539DFB11F23B17E006B2DF2 /* BasiliskII */, @@ -807,6 +732,23 @@ }; /* End PBXProject section */ +/* Begin PBXReferenceProxy section */ + E45769AD2643A65B0063BAF1 /* libuae_cpu_x86_64.a */ = { + isa = PBXReferenceProxy; + fileType = archive.ar; + path = libuae_cpu_x86_64.a; + remoteRef = E45769AC2643A65B0063BAF1 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; + E45769BA2643A6740063BAF1 /* libuae_cpu_arm64.a */ = { + isa = PBXReferenceProxy; + fileType = archive.ar; + path = libuae_cpu_arm64.a; + remoteRef = E45769B92643A6740063BAF1 /* PBXContainerItemProxy */; + sourceTree = BUILT_PRODUCTS_DIR; + }; +/* End PBXReferenceProxy section */ + /* Begin PBXResourcesBuildPhase section */ 7539DFB01F23B17E006B2DF2 /* Resources */ = { isa = PBXResourcesBuildPhase; @@ -830,16 +772,10 @@ ); name = "Run Script"; outputPaths = ( - $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, - $BUILT_PRODUCTS_DIR/gencpu_output/compemu.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/compstbl.cpp, - $BUILT_PRODUCTS_DIR/gencpu_output/cpufunctbl.cpp, ); runOnlyForDeploymentPostprocessing = 0; shellPath = /bin/sh; - shellScript = "make -f Makefile.gencpu\ncc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; + shellScript = "cc etherhelpertool.c -framework Security -o $BUILT_PRODUCTS_DIR/etherhelpertool\n"; }; /* End PBXShellScriptBuildPhase section */ @@ -848,40 +784,28 @@ isa = PBXSourcesBuildPhase; buildActionMask = 2147483647; files = ( - E4EE777523D7D71400BAE63A /* defs68k.c in Sources */, - E4257925264119BF0061C1F1 /* compemu_fpp.cpp in Sources */, - 7539E19E1F23B25A006B2DF2 /* rounding.cpp in Sources */, 7539E29D1F23C83F006B2DF2 /* sys_darwin.cpp in Sources */, 7539E1291F23B25A006B2DF2 /* video_blit.cpp in Sources */, E413D93320D260BC00E437D8 /* cksum.c in Sources */, E413D92920D260BC00E437D8 /* udp.c in Sources */, E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */, - 753253351F53688D0024025B /* readcpu.cpp in Sources */, - E4ED8EDE24E39AFE00843219 /* compemu_support.cpp in Sources */, 7539E1741F23B25A006B2DF2 /* audio_sdl.cpp in Sources */, - E4257924264119500061C1F1 /* compemu.cpp in Sources */, E413D93120D260BC00E437D8 /* ip_output.c in Sources */, 7539E1E21F23B25A006B2DF2 /* video.cpp in Sources */, 7539E18F1F23B25A006B2DF2 /* timer.cpp in Sources */, 7539E1711F23B25A006B2DF2 /* rom_patches.cpp in Sources */, - E4CF025826395EBB006FDAEA /* compstbl.cpp in Sources */, 7539E1281F23B25A006B2DF2 /* sigsegv.cpp in Sources */, - 753253341F5368370024025B /* cpustbl.cpp in Sources */, 756C1B341F252FC100620917 /* utils_macosx.mm in Sources */, E413D92620D260BC00E437D8 /* misc.c in Sources */, - 753253321F5368370024025B /* cpuemu.cpp in Sources */, 7539E2701F23B32A006B2DF2 /* tinyxml2.cpp in Sources */, 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, - 7539E1981F23B25A006B2DF2 /* exceptions.cpp in Sources */, 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, - 7539E1901F23B25A006B2DF2 /* basilisk_glue.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, 752F27011F242BAF001032B4 /* prefs_sdl.cpp in Sources */, - 7539E2971F23C5FD006B2DF2 /* newcpu.cpp in Sources */, 7539E12A1F23B25A006B2DF2 /* vm_alloc.cpp in Sources */, E413D93220D260BC00E437D8 /* if.c in Sources */, 7539E16C1F23B25A006B2DF2 /* main.cpp in Sources */, @@ -900,8 +824,6 @@ 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */, E413D92D20D260BC00E437D8 /* tcp_timer.c in Sources */, E413D92820D260BC00E437D8 /* tcp_subr.c in Sources */, - E4257923264116F70061C1F1 /* fpu_ieee.cpp in Sources */, - 7539E1991F23B25A006B2DF2 /* flags.cpp in Sources */, 7539E2921F23C56F006B2DF2 /* scsi_dummy.cpp in Sources */, E413D93A20D2614E00E437D8 /* extfs_macosx.cpp in Sources */, 7539E16F1F23B25A006B2DF2 /* prefs_items.cpp in Sources */, @@ -911,7 +833,6 @@ 7539E12C1F23B25A006B2DF2 /* emul_op.cpp in Sources */, E413D92720D260BC00E437D8 /* debug.c in Sources */, E413D92220D260BC00E437D8 /* mbuf.c in Sources */, - 7539E19D1F23B25A006B2DF2 /* mathlib.cpp in Sources */, E416BEE82410AA4E00751E6D /* runtool.c in Sources */, E413D93020D260BC00E437D8 /* ip_input.c in Sources */, 752F27031F242F51001032B4 /* xpram_sdl.cpp in Sources */, @@ -926,11 +847,9 @@ E413D92120D260BC00E437D8 /* tftp.c in Sources */, 7539E1731F23B25A006B2DF2 /* scsi.cpp in Sources */, 7539E12B1F23B25A006B2DF2 /* disk.cpp in Sources */, - E40A4005263C306A00B76E31 /* fpu_mpfr.cpp in Sources */, E413D92320D260BC00E437D8 /* ip_icmp.c in Sources */, 7539E1E31F23B25A006B2DF2 /* xpram.cpp in Sources */, 7539E2681F23B32A006B2DF2 /* rpc_unix.cpp in Sources */, - E4CF025A26396211006FDAEA /* cpufunctbl.cpp in Sources */, E413D92F20D260BC00E437D8 /* bootp.c in Sources */, 7539E2911F23C56F006B2DF2 /* prefs_editor_dummy.cpp in Sources */, ); @@ -938,6 +857,19 @@ }; /* End PBXSourcesBuildPhase section */ +/* Begin PBXTargetDependency section */ + E45769BD2643A6870063BAF1 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + name = uae_cpu_x86_64; + targetProxy = E45769BC2643A6870063BAF1 /* PBXContainerItemProxy */; + }; + E45769BF2643A68B0063BAF1 /* PBXTargetDependency */ = { + isa = PBXTargetDependency; + name = uae_cpu_arm64; + targetProxy = E45769BE2643A68B0063BAF1 /* PBXContainerItemProxy */; + }; +/* End PBXTargetDependency section */ + /* Begin PBXVariantGroup section */ 7539E00F1F23B25A006B2DF2 /* InfoPlist.strings */ = { isa = PBXVariantGroup; @@ -1092,6 +1024,8 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", CPU_x86_64, + JIT, + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1107,6 +1041,24 @@ ../Unix, ../slirp, ); + "HEADER_SEARCH_PATHS[arch=arm64]" = ( + /opt/homebrew/include, + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu_2021, + ../Unix, + ../slirp, + ); + "HEADER_SEARCH_PATHS[arch=x86_64]" = ( + /opt/homebrew/include, + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu, + ../Unix, + ../slirp, + ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; @@ -1116,10 +1068,12 @@ OTHER_CFLAGS = ""; OTHER_LDFLAGS = ""; "OTHER_LDFLAGS[arch=arm64]" = ( + "-luae_cpu_arm64", "-lgmp", "-lmpfr", ); "OTHER_LDFLAGS[arch=x86_64]" = ( + "-luae_cpu_x86_64", "-Wl,-no_pie", "-pagezero_size", 0x1000, @@ -1165,6 +1119,8 @@ "GCC_PREPROCESSOR_DEFINITIONS[arch=x86_64]" = ( "$(inherited)", CPU_x86_64, + JIT, + "USE_JIT=1", ); GCC_SYMBOLS_PRIVATE_EXTERN = NO; GCC_USE_STANDARD_INCLUDE_SEARCHING = YES; @@ -1180,6 +1136,24 @@ ../Unix, ../slirp, ); + "HEADER_SEARCH_PATHS[arch=arm64]" = ( + /opt/homebrew/include, + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu_2021, + ../Unix, + ../slirp, + ); + "HEADER_SEARCH_PATHS[arch=x86_64]" = ( + /opt/homebrew/include, + /Library/Frameworks/SDL2.framework/Headers, + ../MacOSX, + ../include, + ../uae_cpu, + ../Unix, + ../slirp, + ); INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; @@ -1188,10 +1162,12 @@ OTHER_CFLAGS = ""; OTHER_LDFLAGS = ""; "OTHER_LDFLAGS[arch=arm64]" = ( + "-luae_cpu_arm64", "-lgmp", "-lmpfr", ); "OTHER_LDFLAGS[arch=x86_64]" = ( + "-luae_cpu_x86_64", "-Wl,-no_pie", "-pagezero_size", 0x1000, diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu b/BasiliskII/src/MacOSX/Makefile.gencpu index 6364597e2..3762cb5d1 100644 --- a/BasiliskII/src/MacOSX/Makefile.gencpu +++ b/BasiliskII/src/MacOSX/Makefile.gencpu @@ -1,7 +1,7 @@ -SRC = $(PROJECT_DIR)/../uae_cpu_2021 +SRC = $(PROJECT_DIR)/../uae_cpu DST = $(BUILT_PRODUCTS_DIR)/gencpu_output VPATH = $(SRC) $(SRC)/compiler -CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu_2021 -I../UNIX +CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu -I../UNIX CXXFLAGS = -stdlib=libc++ $(CFLAGS) all: $(DST)/gencpu $(DST)/gencomp diff --git a/BasiliskII/src/MacOSX/Makefile.gencpu_2021 b/BasiliskII/src/MacOSX/Makefile.gencpu_2021 new file mode 100644 index 000000000..e5d495fcb --- /dev/null +++ b/BasiliskII/src/MacOSX/Makefile.gencpu_2021 @@ -0,0 +1,29 @@ +SRC = $(PROJECT_DIR)/../uae_cpu_2021 +DST = $(BUILT_PRODUCTS_DIR)/gencpu_output_2021 +VPATH = $(SRC) $(SRC)/compiler +CFLAGS = -DUSE_XCODE=1 -DUSE_JIT_FPU -I. -I../uae_cpu_2021 -I../UNIX +CXXFLAGS = -stdlib=libc++ $(CFLAGS) + +all: $(DST)/gencpu $(DST)/gencomp + cd $(DST); ./gencpu; ./gencomp + +$(DST)/gencpu: $(addprefix $(DST)/, defs68k.o readcpu.o gencpu.o) + $(CXX) $(CXXFLAGS) -o $@ $^ + +$(DST)/gencomp: $(addprefix $(DST)/, defs68k.o readcpu.o gencomp.o) + $(CXX) $(CXXFLAGS) -o $@ $^ + +$(DST)/%.o: %.c + $(CC) $(CFLAGS) -o $@ -c $< + +$(DST)/%.o: %.cpp + $(CXX) $(CXXFLAGS) -o $@ -c $< + +$(DST)/defs68k.c: $(DST)/build68k + $< < $(SRC)/table68k > $@ + +$(DST)/build68k: $(SRC)/build68k.c + mkdir -p $(DST) + $(CC) $(CFLAGS) -o $@ $< + +clean:; rm -fr $(DST) diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index a2dcd1d18..e0b4671a1 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -819,7 +819,9 @@ don't define. */ /* #undef uintmax_t */ +#ifndef CPU_x86_64 #define UPDATE_UAE +#endif #ifdef UPDATE_UAE #define DIRECT_ADDRESSING 1 diff --git a/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj new file mode 100644 index 000000000..73689da77 --- /dev/null +++ b/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj @@ -0,0 +1,505 @@ +// !$*UTF8*$! +{ + archiveVersion = 1; + classes = { + }; + objectVersion = 46; + objects = { + +/* Begin PBXBuildFile section */ + E4C1B4A32642B05A00EB55A0 /* compemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B49A2642B05A00EB55A0 /* compemu.cpp */; }; + E4C1B4A42642B05A00EB55A0 /* compstbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B49B2642B05A00EB55A0 /* compstbl.cpp */; }; + E4C1B4A52642B05A00EB55A0 /* comptbl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4C1B49C2642B05A00EB55A0 /* comptbl.h */; }; + E4C1B4A62642B05A00EB55A0 /* cpuemu_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B49D2642B05A00EB55A0 /* cpuemu_nf.cpp */; }; + E4C1B4A72642B05A00EB55A0 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B49E2642B05A00EB55A0 /* cpuemu.cpp */; }; + E4C1B4A82642B05A00EB55A0 /* cpustbl_nf.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B49F2642B05A00EB55A0 /* cpustbl_nf.cpp */; }; + E4C1B4A92642B05A00EB55A0 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B4A02642B05A00EB55A0 /* cpustbl.cpp */; }; + E4C1B4AA2642B05A00EB55A0 /* cputbl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4C1B4A12642B05A00EB55A0 /* cputbl.h */; }; + E4C1B4AB2642B05A00EB55A0 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B4A22642B05A00EB55A0 /* defs68k.c */; }; + E4F537C92642A8BA008B27DF /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */; }; + E4F537CA2642A8BA008B27DF /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537C82642A8BA008B27DF /* build68k.c */; }; + E4F537CD2642A8C2008B27DF /* cpu_emulation.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537CB2642A8C2008B27DF /* cpu_emulation.h */; }; + E4F537CE2642A8C2008B27DF /* cpuopti.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537CC2642A8C2008B27DF /* cpuopti.c */; }; + E4F537DA2642A8CC008B27DF /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537CF2642A8CC008B27DF /* gencpu.c */; }; + E4F537DB2642A8CC008B27DF /* m68k.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D02642A8CC008B27DF /* m68k.h */; }; + E4F537DC2642A8CC008B27DF /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537D12642A8CC008B27DF /* memory.cpp */; }; + E4F537DD2642A8CC008B27DF /* memory.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D22642A8CC008B27DF /* memory.h */; }; + E4F537DE2642A8CC008B27DF /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537D32642A8CC008B27DF /* newcpu.cpp */; }; + E4F537DF2642A8CC008B27DF /* newcpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D42642A8CC008B27DF /* newcpu.h */; }; + E4F537E02642A8CC008B27DF /* noflags.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D52642A8CC008B27DF /* noflags.h */; }; + E4F537E12642A8CC008B27DF /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537D62642A8CC008B27DF /* readcpu.cpp */; }; + E4F537E22642A8CC008B27DF /* readcpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D72642A8CC008B27DF /* readcpu.h */; }; + E4F537E32642A8CC008B27DF /* spcflags.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D82642A8CC008B27DF /* spcflags.h */; }; + E4F537EE2642A8E8008B27DF /* codegen_x86.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537E62642A8E8008B27DF /* codegen_x86.h */; }; + E4F537EF2642A8E8008B27DF /* compemu_fpp.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537E72642A8E8008B27DF /* compemu_fpp.cpp */; }; + E4F537F02642A8E8008B27DF /* compemu_support.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537E82642A8E8008B27DF /* compemu_support.cpp */; }; + E4F537F12642A8E8008B27DF /* compemu.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537E92642A8E8008B27DF /* compemu.h */; }; + E4F537F22642A8E8008B27DF /* flags_x86.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537EA2642A8E8008B27DF /* flags_x86.h */; }; + E4F537F32642A8E8008B27DF /* gencomp.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537EB2642A8E8008B27DF /* gencomp.c */; }; + E4F538092642A904008B27DF /* core.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537F62642A904008B27DF /* core.h */; }; + E4F5380A2642A904008B27DF /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537F72642A904008B27DF /* exceptions.cpp */; }; + E4F5380B2642A904008B27DF /* exceptions.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537F82642A904008B27DF /* exceptions.h */; }; + E4F5380C2642A904008B27DF /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537F92642A904008B27DF /* flags.cpp */; }; + E4F5380D2642A904008B27DF /* flags.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FA2642A904008B27DF /* flags.h */; }; + E4F5380E2642A904008B27DF /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537FB2642A904008B27DF /* fpu_ieee.cpp */; }; + E4F5380F2642A904008B27DF /* fpu_ieee.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FC2642A904008B27DF /* fpu_ieee.h */; }; + E4F538112642A904008B27DF /* fpu_uae.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FE2642A904008B27DF /* fpu_uae.h */; }; + E4F538122642A904008B27DF /* fpu_x86_asm.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FF2642A904008B27DF /* fpu_x86_asm.h */; }; + E4F538142642A904008B27DF /* fpu_x86.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538012642A904008B27DF /* fpu_x86.h */; }; + E4F538152642A904008B27DF /* fpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538022642A904008B27DF /* fpu.h */; }; + E4F538162642A904008B27DF /* impl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538032642A904008B27DF /* impl.h */; }; + E4F538172642A904008B27DF /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F538042642A904008B27DF /* mathlib.cpp */; }; + E4F538182642A904008B27DF /* mathlib.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538052642A904008B27DF /* mathlib.h */; }; + E4F538192642A904008B27DF /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F538062642A904008B27DF /* rounding.cpp */; }; + E4F5381A2642A904008B27DF /* rounding.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538072642A904008B27DF /* rounding.h */; }; + E4F5381B2642A904008B27DF /* types.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538082642A904008B27DF /* types.h */; }; +/* End PBXBuildFile section */ + +/* Begin PBXFileReference section */ + E4C1B49A2642B05A00EB55A0 /* compemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu.cpp; path = gencpu_output/compemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B49B2642B05A00EB55A0 /* compstbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compstbl.cpp; path = gencpu_output/compstbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B49C2642B05A00EB55A0 /* comptbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = comptbl.h; path = gencpu_output/comptbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B49D2642B05A00EB55A0 /* cpuemu_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu_nf.cpp; path = gencpu_output/cpuemu_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B49E2642B05A00EB55A0 /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B49F2642B05A00EB55A0 /* cpustbl_nf.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl_nf.cpp; path = gencpu_output/cpustbl_nf.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B4A02642B05A00EB55A0 /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B4A12642B05A00EB55A0 /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + E4C1B4A22642B05A00EB55A0 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; + E4F537C02642A86D008B27DF /* libuae_cpu_x86_64.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libuae_cpu_x86_64.a; sourceTree = BUILT_PRODUCTS_DIR; }; + E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = basilisk_glue.cpp; path = ../uae_cpu/basilisk_glue.cpp; sourceTree = ""; }; + E4F537C82642A8BA008B27DF /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = build68k.c; path = ../uae_cpu/build68k.c; sourceTree = ""; }; + E4F537CB2642A8C2008B27DF /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpu_emulation.h; path = ../uae_cpu/cpu_emulation.h; sourceTree = ""; }; + E4F537CC2642A8C2008B27DF /* cpuopti.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cpuopti.c; path = ../uae_cpu/cpuopti.c; sourceTree = ""; }; + E4F537CF2642A8CC008B27DF /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencpu.c; path = ../uae_cpu/gencpu.c; sourceTree = ""; }; + E4F537D02642A8CC008B27DF /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = m68k.h; path = ../uae_cpu/m68k.h; sourceTree = ""; }; + E4F537D12642A8CC008B27DF /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = memory.cpp; path = ../uae_cpu/memory.cpp; sourceTree = ""; }; + E4F537D22642A8CC008B27DF /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = memory.h; path = ../uae_cpu/memory.h; sourceTree = ""; }; + E4F537D32642A8CC008B27DF /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = newcpu.cpp; path = ../uae_cpu/newcpu.cpp; sourceTree = ""; }; + E4F537D42642A8CC008B27DF /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = newcpu.h; path = ../uae_cpu/newcpu.h; sourceTree = ""; }; + E4F537D52642A8CC008B27DF /* noflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = noflags.h; path = ../uae_cpu/noflags.h; sourceTree = ""; }; + E4F537D62642A8CC008B27DF /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = readcpu.cpp; path = ../uae_cpu/readcpu.cpp; sourceTree = ""; }; + E4F537D72642A8CC008B27DF /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = readcpu.h; path = ../uae_cpu/readcpu.h; sourceTree = ""; }; + E4F537D82642A8CC008B27DF /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = spcflags.h; path = ../uae_cpu/spcflags.h; sourceTree = ""; }; + E4F537D92642A8CC008B27DF /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = table68k; path = ../uae_cpu/table68k; sourceTree = ""; }; + E4F537E62642A8E8008B27DF /* codegen_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = codegen_x86.h; path = ../uae_cpu/compiler/codegen_x86.h; sourceTree = ""; }; + E4F537E72642A8E8008B27DF /* compemu_fpp.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu_fpp.cpp; path = ../uae_cpu/compiler/compemu_fpp.cpp; sourceTree = ""; }; + E4F537E82642A8E8008B27DF /* compemu_support.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = compemu_support.cpp; path = ../uae_cpu/compiler/compemu_support.cpp; sourceTree = ""; }; + E4F537E92642A8E8008B27DF /* compemu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = compemu.h; path = ../uae_cpu/compiler/compemu.h; sourceTree = ""; }; + E4F537EA2642A8E8008B27DF /* flags_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = flags_x86.h; path = ../uae_cpu/compiler/flags_x86.h; sourceTree = ""; }; + E4F537EB2642A8E8008B27DF /* gencomp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencomp.c; path = ../uae_cpu/compiler/gencomp.c; sourceTree = ""; }; + E4F537F62642A904008B27DF /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = core.h; path = ../uae_cpu/fpu/core.h; sourceTree = ""; }; + E4F537F72642A904008B27DF /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = exceptions.cpp; path = ../uae_cpu/fpu/exceptions.cpp; sourceTree = ""; }; + E4F537F82642A904008B27DF /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = exceptions.h; path = ../uae_cpu/fpu/exceptions.h; sourceTree = ""; }; + E4F537F92642A904008B27DF /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = flags.cpp; path = ../uae_cpu/fpu/flags.cpp; sourceTree = ""; }; + E4F537FA2642A904008B27DF /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = flags.h; path = ../uae_cpu/fpu/flags.h; sourceTree = ""; }; + E4F537FB2642A904008B27DF /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = fpu_ieee.cpp; path = ../uae_cpu/fpu/fpu_ieee.cpp; sourceTree = ""; }; + E4F537FC2642A904008B27DF /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_ieee.h; path = ../uae_cpu/fpu/fpu_ieee.h; sourceTree = ""; }; + E4F537FE2642A904008B27DF /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_uae.h; path = ../uae_cpu/fpu/fpu_uae.h; sourceTree = ""; }; + E4F537FF2642A904008B27DF /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_x86_asm.h; path = ../uae_cpu/fpu/fpu_x86_asm.h; sourceTree = ""; }; + E4F538012642A904008B27DF /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_x86.h; path = ../uae_cpu/fpu/fpu_x86.h; sourceTree = ""; }; + E4F538022642A904008B27DF /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu.h; path = ../uae_cpu/fpu/fpu.h; sourceTree = ""; }; + E4F538032642A904008B27DF /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = impl.h; path = ../uae_cpu/fpu/impl.h; sourceTree = ""; }; + E4F538042642A904008B27DF /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = mathlib.cpp; path = ../uae_cpu/fpu/mathlib.cpp; sourceTree = ""; }; + E4F538052642A904008B27DF /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = mathlib.h; path = ../uae_cpu/fpu/mathlib.h; sourceTree = ""; }; + E4F538062642A904008B27DF /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rounding.cpp; path = ../uae_cpu/fpu/rounding.cpp; sourceTree = ""; }; + E4F538072642A904008B27DF /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = rounding.h; path = ../uae_cpu/fpu/rounding.h; sourceTree = ""; }; + E4F538082642A904008B27DF /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = types.h; path = ../uae_cpu/fpu/types.h; sourceTree = ""; }; +/* End PBXFileReference section */ + +/* Begin PBXFrameworksBuildPhase section */ + E4F537BD2642A86D008B27DF /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXFrameworksBuildPhase section */ + +/* Begin PBXGroup section */ + E4C1B4982642AF3400EB55A0 /* generated */ = { + isa = PBXGroup; + children = ( + E4C1B49A2642B05A00EB55A0 /* compemu.cpp */, + E4C1B49B2642B05A00EB55A0 /* compstbl.cpp */, + E4C1B49C2642B05A00EB55A0 /* comptbl.h */, + E4C1B49D2642B05A00EB55A0 /* cpuemu_nf.cpp */, + E4C1B49E2642B05A00EB55A0 /* cpuemu.cpp */, + E4C1B49F2642B05A00EB55A0 /* cpustbl_nf.cpp */, + E4C1B4A02642B05A00EB55A0 /* cpustbl.cpp */, + E4C1B4A12642B05A00EB55A0 /* cputbl.h */, + E4C1B4A22642B05A00EB55A0 /* defs68k.c */, + ); + name = generated; + sourceTree = ""; + }; + E4F537B72642A86D008B27DF = { + isa = PBXGroup; + children = ( + E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */, + E4F537C82642A8BA008B27DF /* build68k.c */, + E4F537E42642A8D2008B27DF /* compiler */, + E4F537CB2642A8C2008B27DF /* cpu_emulation.h */, + E4F537CC2642A8C2008B27DF /* cpuopti.c */, + E4F537F52642A8ED008B27DF /* fpu */, + E4F537CF2642A8CC008B27DF /* gencpu.c */, + E4F537D02642A8CC008B27DF /* m68k.h */, + E4F537D12642A8CC008B27DF /* memory.cpp */, + E4F537D22642A8CC008B27DF /* memory.h */, + E4F537D32642A8CC008B27DF /* newcpu.cpp */, + E4F537D42642A8CC008B27DF /* newcpu.h */, + E4F537D52642A8CC008B27DF /* noflags.h */, + E4F537D62642A8CC008B27DF /* readcpu.cpp */, + E4F537D72642A8CC008B27DF /* readcpu.h */, + E4F537D82642A8CC008B27DF /* spcflags.h */, + E4F537D92642A8CC008B27DF /* table68k */, + E4C1B4982642AF3400EB55A0 /* generated */, + E4F537C12642A86D008B27DF /* Products */, + ); + sourceTree = ""; + }; + E4F537C12642A86D008B27DF /* Products */ = { + isa = PBXGroup; + children = ( + E4F537C02642A86D008B27DF /* libuae_cpu_x86_64.a */, + ); + name = Products; + sourceTree = ""; + }; + E4F537E42642A8D2008B27DF /* compiler */ = { + isa = PBXGroup; + children = ( + E4F537E62642A8E8008B27DF /* codegen_x86.h */, + E4F537E72642A8E8008B27DF /* compemu_fpp.cpp */, + E4F537E82642A8E8008B27DF /* compemu_support.cpp */, + E4F537E92642A8E8008B27DF /* compemu.h */, + E4F537EA2642A8E8008B27DF /* flags_x86.h */, + E4F537EB2642A8E8008B27DF /* gencomp.c */, + ); + name = compiler; + sourceTree = ""; + }; + E4F537F52642A8ED008B27DF /* fpu */ = { + isa = PBXGroup; + children = ( + E4F537F62642A904008B27DF /* core.h */, + E4F537F72642A904008B27DF /* exceptions.cpp */, + E4F537F82642A904008B27DF /* exceptions.h */, + E4F537F92642A904008B27DF /* flags.cpp */, + E4F537FA2642A904008B27DF /* flags.h */, + E4F537FB2642A904008B27DF /* fpu_ieee.cpp */, + E4F537FC2642A904008B27DF /* fpu_ieee.h */, + E4F537FE2642A904008B27DF /* fpu_uae.h */, + E4F537FF2642A904008B27DF /* fpu_x86_asm.h */, + E4F538012642A904008B27DF /* fpu_x86.h */, + E4F538022642A904008B27DF /* fpu.h */, + E4F538032642A904008B27DF /* impl.h */, + E4F538042642A904008B27DF /* mathlib.cpp */, + E4F538052642A904008B27DF /* mathlib.h */, + E4F538062642A904008B27DF /* rounding.cpp */, + E4F538072642A904008B27DF /* rounding.h */, + E4F538082642A904008B27DF /* types.h */, + ); + name = fpu; + sourceTree = ""; + }; +/* End PBXGroup section */ + +/* Begin PBXHeadersBuildPhase section */ + E4F537BE2642A86D008B27DF /* Headers */ = { + isa = PBXHeadersBuildPhase; + buildActionMask = 2147483647; + files = ( + E4F538182642A904008B27DF /* mathlib.h in Headers */, + E4F538152642A904008B27DF /* fpu.h in Headers */, + E4F5380F2642A904008B27DF /* fpu_ieee.h in Headers */, + E4F537F12642A8E8008B27DF /* compemu.h in Headers */, + E4F538112642A904008B27DF /* fpu_uae.h in Headers */, + E4F538122642A904008B27DF /* fpu_x86_asm.h in Headers */, + E4F538142642A904008B27DF /* fpu_x86.h in Headers */, + E4F538092642A904008B27DF /* core.h in Headers */, + E4C1B4AA2642B05A00EB55A0 /* cputbl.h in Headers */, + E4F5381B2642A904008B27DF /* types.h in Headers */, + E4F537DF2642A8CC008B27DF /* newcpu.h in Headers */, + E4F5380D2642A904008B27DF /* flags.h in Headers */, + E4F537E22642A8CC008B27DF /* readcpu.h in Headers */, + E4F5381A2642A904008B27DF /* rounding.h in Headers */, + E4C1B4A52642B05A00EB55A0 /* comptbl.h in Headers */, + E4F5380B2642A904008B27DF /* exceptions.h in Headers */, + E4F537E32642A8CC008B27DF /* spcflags.h in Headers */, + E4F537DB2642A8CC008B27DF /* m68k.h in Headers */, + E4F537F22642A8E8008B27DF /* flags_x86.h in Headers */, + E4F538162642A904008B27DF /* impl.h in Headers */, + E4F537CD2642A8C2008B27DF /* cpu_emulation.h in Headers */, + E4F537EE2642A8E8008B27DF /* codegen_x86.h in Headers */, + E4F537DD2642A8CC008B27DF /* memory.h in Headers */, + E4F537E02642A8CC008B27DF /* noflags.h in Headers */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXHeadersBuildPhase section */ + +/* Begin PBXNativeTarget section */ + E4F537BF2642A86D008B27DF /* uae_cpu_x86_64 */ = { + isa = PBXNativeTarget; + buildConfigurationList = E4F537C42642A86D008B27DF /* Build configuration list for PBXNativeTarget "uae_cpu_x86_64" */; + buildPhases = ( + E4C1B4992642AF5100EB55A0 /* ShellScript */, + E4F537BC2642A86D008B27DF /* Sources */, + E4F537BD2642A86D008B27DF /* Frameworks */, + E4F537BE2642A86D008B27DF /* Headers */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = uae_cpu_x86_64; + productName = uae_cpu; + productReference = E4F537C02642A86D008B27DF /* libuae_cpu_x86_64.a */; + productType = "com.apple.product-type.library.static"; + }; +/* End PBXNativeTarget section */ + +/* Begin PBXProject section */ + E4F537B82642A86D008B27DF /* Project object */ = { + isa = PBXProject; + attributes = { + LastUpgradeCheck = 0820; + TargetAttributes = { + E4F537BF2642A86D008B27DF = { + CreatedOnToolsVersion = 8.2.1; + ProvisioningStyle = Automatic; + }; + }; + }; + buildConfigurationList = E4F537BB2642A86D008B27DF /* Build configuration list for PBXProject "uae_cpu" */; + compatibilityVersion = "Xcode 3.2"; + developmentRegion = English; + hasScannedForEncodings = 0; + knownRegions = ( + English, + en, + ); + mainGroup = E4F537B72642A86D008B27DF; + productRefGroup = E4F537C12642A86D008B27DF /* Products */; + projectDirPath = ""; + projectRoot = ""; + targets = ( + E4F537BF2642A86D008B27DF /* uae_cpu_x86_64 */, + ); + }; +/* End PBXProject section */ + +/* Begin PBXShellScriptBuildPhase section */ + E4C1B4992642AF5100EB55A0 /* ShellScript */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputPaths = ( + ); + outputPaths = ( + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpuemu_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/cpustbl_nf.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/defs68k.c, + $BUILT_PRODUCTS_DIR/gencpu_output/compemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output/compstbl.cpp, + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "make -f Makefile.gencpu\n"; + }; +/* End PBXShellScriptBuildPhase section */ + +/* Begin PBXSourcesBuildPhase section */ + E4F537BC2642A86D008B27DF /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E4C1B4A62642B05A00EB55A0 /* cpuemu_nf.cpp in Sources */, + E4C1B4A32642B05A00EB55A0 /* compemu.cpp in Sources */, + E4F538192642A904008B27DF /* rounding.cpp in Sources */, + E4F537E12642A8CC008B27DF /* readcpu.cpp in Sources */, + E4F5380C2642A904008B27DF /* flags.cpp in Sources */, + E4F537EF2642A8E8008B27DF /* compemu_fpp.cpp in Sources */, + E4F538172642A904008B27DF /* mathlib.cpp in Sources */, + E4F537F02642A8E8008B27DF /* compemu_support.cpp in Sources */, + E4F537DC2642A8CC008B27DF /* memory.cpp in Sources */, + E4C1B4A42642B05A00EB55A0 /* compstbl.cpp in Sources */, + E4F537CE2642A8C2008B27DF /* cpuopti.c in Sources */, + E4C1B4AB2642B05A00EB55A0 /* defs68k.c in Sources */, + E4F537CA2642A8BA008B27DF /* build68k.c in Sources */, + E4C1B4A92642B05A00EB55A0 /* cpustbl.cpp in Sources */, + E4F537C92642A8BA008B27DF /* basilisk_glue.cpp in Sources */, + E4F537F32642A8E8008B27DF /* gencomp.c in Sources */, + E4F537DA2642A8CC008B27DF /* gencpu.c in Sources */, + E4F5380E2642A904008B27DF /* fpu_ieee.cpp in Sources */, + E4C1B4A72642B05A00EB55A0 /* cpuemu.cpp in Sources */, + E4C1B4A82642B05A00EB55A0 /* cpustbl_nf.cpp in Sources */, + E4F537DE2642A8CC008B27DF /* newcpu.cpp in Sources */, + E4F5380A2642A904008B27DF /* exceptions.cpp in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXSourcesBuildPhase section */ + +/* Begin XCBuildConfiguration section */ + E4F537C22642A86D008B27DF /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_DYNAMIC_NO_PIC = NO; + GCC_NO_COMMON_BLOCKS = YES; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "DEBUG=1", + "$(inherited)", + ); + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.11; + MTL_ENABLE_DEBUG_INFO = YES; + ONLY_ACTIVE_ARCH = YES; + SDKROOT = macosx; + }; + name = Debug; + }; + E4F537C32642A86D008B27DF /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + ENABLE_NS_ASSERTIONS = NO; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.11; + MTL_ENABLE_DEBUG_INFO = NO; + SDKROOT = macosx; + }; + name = Release; + }; + E4F537C52642A86D008B27DF /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = x86_64; + EXECUTABLE_PREFIX = lib; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + "USE_XCODE=1", + CPU_x86_64, + JIT, + "USE_JIT=1", + ); + HEADER_SEARCH_PATHS = ( + ../CrossPlatform, + ../include, + ../MacOSX, + ../uae_cpu, + ../Unix, + ); + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Debug; + }; + E4F537C62642A86D008B27DF /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = x86_64; + EXECUTABLE_PREFIX = lib; + GCC_PREPROCESSOR_DEFINITIONS = ( + "USE_XCODE=1", + CPU_x86_64, + JIT, + "USE_JIT=1", + ); + HEADER_SEARCH_PATHS = ( + ../CrossPlatform, + ../include, + ../MacOSX, + ../uae_cpu, + ../Unix, + ); + PRODUCT_NAME = "$(TARGET_NAME)"; + }; + name = Release; + }; +/* End XCBuildConfiguration section */ + +/* Begin XCConfigurationList section */ + E4F537BB2642A86D008B27DF /* Build configuration list for PBXProject "uae_cpu" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E4F537C22642A86D008B27DF /* Debug */, + E4F537C32642A86D008B27DF /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + E4F537C42642A86D008B27DF /* Build configuration list for PBXNativeTarget "uae_cpu_x86_64" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E4F537C52642A86D008B27DF /* Debug */, + E4F537C62642A86D008B27DF /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; +/* End XCConfigurationList section */ + }; + rootObject = E4F537B82642A86D008B27DF /* Project object */; +} diff --git a/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj new file mode 100644 index 000000000..7cd4f6a48 --- /dev/null +++ b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj @@ -0,0 +1,435 @@ +// !$*UTF8*$! +{ + archiveVersion = 1; + classes = { + }; + objectVersion = 46; + objects = { + +/* Begin PBXBuildFile section */ + E41D7AAA2642C070005E8093 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AA82642C070005E8093 /* basilisk_glue.cpp */; }; + E41D7AAB2642C070005E8093 /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AA92642C070005E8093 /* build68k.c */; }; + E41D7AAE2642C07C005E8093 /* cpu_emulation.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AAC2642C07C005E8093 /* cpu_emulation.h */; }; + E41D7AAF2642C07C005E8093 /* cpummu.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AAD2642C07C005E8093 /* cpummu.h */; }; + E41D7ABA2642C087005E8093 /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AB02642C087005E8093 /* gencpu.c */; }; + E41D7ABB2642C087005E8093 /* m68k.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB12642C087005E8093 /* m68k.h */; }; + E41D7ABC2642C087005E8093 /* memory.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB22642C087005E8093 /* memory.h */; }; + E41D7ABD2642C087005E8093 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AB32642C087005E8093 /* newcpu.cpp */; }; + E41D7ABE2642C087005E8093 /* newcpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB42642C087005E8093 /* newcpu.h */; }; + E41D7ABF2642C087005E8093 /* readcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AB52642C087005E8093 /* readcpu.cpp */; }; + E41D7AC02642C087005E8093 /* readcpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB62642C087005E8093 /* readcpu.h */; }; + E41D7AC12642C087005E8093 /* registers.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB72642C087005E8093 /* registers.h */; }; + E41D7AC22642C087005E8093 /* spcflags.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB82642C087005E8093 /* spcflags.h */; }; + E41D7AD82642C0A4005E8093 /* core.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AC42642C0A4005E8093 /* core.h */; }; + E41D7AD92642C0A4005E8093 /* exceptions.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AC52642C0A4005E8093 /* exceptions.cpp */; }; + E41D7ADA2642C0A4005E8093 /* exceptions.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AC62642C0A4005E8093 /* exceptions.h */; }; + E41D7ADB2642C0A4005E8093 /* flags.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AC72642C0A4005E8093 /* flags.cpp */; }; + E41D7ADC2642C0A4005E8093 /* flags.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AC82642C0A4005E8093 /* flags.h */; }; + E41D7ADF2642C0A4005E8093 /* fpu_mpfr.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7ACB2642C0A4005E8093 /* fpu_mpfr.cpp */; }; + E41D7AE52642C0A4005E8093 /* fpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AD12642C0A4005E8093 /* fpu.h */; }; + E41D7AE62642C0A4005E8093 /* impl.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AD22642C0A4005E8093 /* impl.h */; }; + E41D7AE72642C0A4005E8093 /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AD32642C0A4005E8093 /* mathlib.cpp */; }; + E41D7AE82642C0A4005E8093 /* mathlib.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AD42642C0A4005E8093 /* mathlib.h */; }; + E41D7AE92642C0A4005E8093 /* rounding.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AD52642C0A4005E8093 /* rounding.cpp */; }; + E41D7AEA2642C0A4005E8093 /* rounding.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AD62642C0A4005E8093 /* rounding.h */; }; + E41D7AEB2642C0A4005E8093 /* types.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AD72642C0A4005E8093 /* types.h */; }; + E4FC27512642C45E00C64E21 /* cpufunctbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4FC274C2642C45E00C64E21 /* cpufunctbl.cpp */; }; + E4FC27522642C45E00C64E21 /* cpuemu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4FC274D2642C45E00C64E21 /* cpuemu.cpp */; }; + E4FC27532642C45E00C64E21 /* cpustbl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4FC274E2642C45E00C64E21 /* cpustbl.cpp */; }; + E4FC27542642C45E00C64E21 /* cputbl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4FC274F2642C45E00C64E21 /* cputbl.h */; }; + E4FC27552642C45E00C64E21 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E4FC27502642C45E00C64E21 /* defs68k.c */; }; +/* End PBXBuildFile section */ + +/* Begin PBXFileReference section */ + E41D7AA12642C004005E8093 /* libuae_cpu_arm64.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libuae_cpu_arm64.a; sourceTree = BUILT_PRODUCTS_DIR; }; + E41D7AA82642C070005E8093 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = basilisk_glue.cpp; path = ../uae_cpu_2021/basilisk_glue.cpp; sourceTree = ""; }; + E41D7AA92642C070005E8093 /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = build68k.c; path = ../uae_cpu_2021/build68k.c; sourceTree = ""; }; + E41D7AAC2642C07C005E8093 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpu_emulation.h; path = ../uae_cpu_2021/cpu_emulation.h; sourceTree = ""; }; + E41D7AAD2642C07C005E8093 /* cpummu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpummu.h; path = ../uae_cpu_2021/cpummu.h; sourceTree = ""; }; + E41D7AB02642C087005E8093 /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencpu.c; path = ../uae_cpu_2021/gencpu.c; sourceTree = ""; }; + E41D7AB12642C087005E8093 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = m68k.h; path = ../uae_cpu_2021/m68k.h; sourceTree = ""; }; + E41D7AB22642C087005E8093 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = memory.h; path = ../uae_cpu_2021/memory.h; sourceTree = ""; }; + E41D7AB32642C087005E8093 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = newcpu.cpp; path = ../uae_cpu_2021/newcpu.cpp; sourceTree = ""; }; + E41D7AB42642C087005E8093 /* newcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = newcpu.h; path = ../uae_cpu_2021/newcpu.h; sourceTree = ""; }; + E41D7AB52642C087005E8093 /* readcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = readcpu.cpp; path = ../uae_cpu_2021/readcpu.cpp; sourceTree = ""; }; + E41D7AB62642C087005E8093 /* readcpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = readcpu.h; path = ../uae_cpu_2021/readcpu.h; sourceTree = ""; }; + E41D7AB72642C087005E8093 /* registers.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = registers.h; path = ../uae_cpu_2021/registers.h; sourceTree = ""; }; + E41D7AB82642C087005E8093 /* spcflags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = spcflags.h; path = ../uae_cpu_2021/spcflags.h; sourceTree = ""; }; + E41D7AB92642C087005E8093 /* table68k */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; name = table68k; path = ../uae_cpu_2021/table68k; sourceTree = ""; }; + E41D7AC42642C0A4005E8093 /* core.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = core.h; path = ../uae_cpu_2021/fpu/core.h; sourceTree = ""; }; + E41D7AC52642C0A4005E8093 /* exceptions.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = exceptions.cpp; path = ../uae_cpu_2021/fpu/exceptions.cpp; sourceTree = ""; }; + E41D7AC62642C0A4005E8093 /* exceptions.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = exceptions.h; path = ../uae_cpu_2021/fpu/exceptions.h; sourceTree = ""; }; + E41D7AC72642C0A4005E8093 /* flags.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = flags.cpp; path = ../uae_cpu_2021/fpu/flags.cpp; sourceTree = ""; }; + E41D7AC82642C0A4005E8093 /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = flags.h; path = ../uae_cpu_2021/fpu/flags.h; sourceTree = ""; }; + E41D7ACB2642C0A4005E8093 /* fpu_mpfr.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = fpu_mpfr.cpp; path = ../uae_cpu_2021/fpu/fpu_mpfr.cpp; sourceTree = ""; }; + E41D7AD12642C0A4005E8093 /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu.h; path = ../uae_cpu_2021/fpu/fpu.h; sourceTree = ""; }; + E41D7AD22642C0A4005E8093 /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = impl.h; path = ../uae_cpu_2021/fpu/impl.h; sourceTree = ""; }; + E41D7AD32642C0A4005E8093 /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = mathlib.cpp; path = ../uae_cpu_2021/fpu/mathlib.cpp; sourceTree = ""; }; + E41D7AD42642C0A4005E8093 /* mathlib.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = mathlib.h; path = ../uae_cpu_2021/fpu/mathlib.h; sourceTree = ""; }; + E41D7AD52642C0A4005E8093 /* rounding.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = rounding.cpp; path = ../uae_cpu_2021/fpu/rounding.cpp; sourceTree = ""; }; + E41D7AD62642C0A4005E8093 /* rounding.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = rounding.h; path = ../uae_cpu_2021/fpu/rounding.h; sourceTree = ""; }; + E41D7AD72642C0A4005E8093 /* types.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = types.h; path = ../uae_cpu_2021/fpu/types.h; sourceTree = ""; }; + E4FC274C2642C45E00C64E21 /* cpufunctbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpufunctbl.cpp; path = gencpu_output_2021/cpufunctbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4FC274D2642C45E00C64E21 /* cpuemu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpuemu.cpp; path = gencpu_output_2021/cpuemu.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4FC274E2642C45E00C64E21 /* cpustbl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = cpustbl.cpp; path = gencpu_output_2021/cpustbl.cpp; sourceTree = BUILT_PRODUCTS_DIR; }; + E4FC274F2642C45E00C64E21 /* cputbl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cputbl.h; path = gencpu_output_2021/cputbl.h; sourceTree = BUILT_PRODUCTS_DIR; }; + E4FC27502642C45E00C64E21 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output_2021/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; +/* End PBXFileReference section */ + +/* Begin PBXFrameworksBuildPhase section */ + E41D7A9E2642C004005E8093 /* Frameworks */ = { + isa = PBXFrameworksBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXFrameworksBuildPhase section */ + +/* Begin PBXGroup section */ + E41D7A982642C004005E8093 = { + isa = PBXGroup; + children = ( + E41D7AA82642C070005E8093 /* basilisk_glue.cpp */, + E41D7AA92642C070005E8093 /* build68k.c */, + E41D7AC32642C08E005E8093 /* fpu */, + E41D7AAC2642C07C005E8093 /* cpu_emulation.h */, + E41D7AAD2642C07C005E8093 /* cpummu.h */, + E41D7AB02642C087005E8093 /* gencpu.c */, + E41D7AB12642C087005E8093 /* m68k.h */, + E41D7AB22642C087005E8093 /* memory.h */, + E41D7AB32642C087005E8093 /* newcpu.cpp */, + E41D7AB42642C087005E8093 /* newcpu.h */, + E41D7AB52642C087005E8093 /* readcpu.cpp */, + E41D7AB62642C087005E8093 /* readcpu.h */, + E41D7AB72642C087005E8093 /* registers.h */, + E41D7AB82642C087005E8093 /* spcflags.h */, + E41D7AB92642C087005E8093 /* table68k */, + E4FC274B2642C44A00C64E21 /* generated */, + E41D7AA22642C004005E8093 /* Products */, + ); + sourceTree = ""; + }; + E41D7AA22642C004005E8093 /* Products */ = { + isa = PBXGroup; + children = ( + E41D7AA12642C004005E8093 /* libuae_cpu_arm64.a */, + ); + name = Products; + sourceTree = ""; + }; + E41D7AC32642C08E005E8093 /* fpu */ = { + isa = PBXGroup; + children = ( + E41D7AC42642C0A4005E8093 /* core.h */, + E41D7AC52642C0A4005E8093 /* exceptions.cpp */, + E41D7AC62642C0A4005E8093 /* exceptions.h */, + E41D7AC72642C0A4005E8093 /* flags.cpp */, + E41D7AC82642C0A4005E8093 /* flags.h */, + E41D7ACB2642C0A4005E8093 /* fpu_mpfr.cpp */, + E41D7AD12642C0A4005E8093 /* fpu.h */, + E41D7AD22642C0A4005E8093 /* impl.h */, + E41D7AD32642C0A4005E8093 /* mathlib.cpp */, + E41D7AD42642C0A4005E8093 /* mathlib.h */, + E41D7AD52642C0A4005E8093 /* rounding.cpp */, + E41D7AD62642C0A4005E8093 /* rounding.h */, + E41D7AD72642C0A4005E8093 /* types.h */, + ); + name = fpu; + sourceTree = ""; + }; + E4FC274B2642C44A00C64E21 /* generated */ = { + isa = PBXGroup; + children = ( + E4FC274D2642C45E00C64E21 /* cpuemu.cpp */, + E4FC274C2642C45E00C64E21 /* cpufunctbl.cpp */, + E4FC274E2642C45E00C64E21 /* cpustbl.cpp */, + E4FC274F2642C45E00C64E21 /* cputbl.h */, + E4FC27502642C45E00C64E21 /* defs68k.c */, + ); + path = generated; + sourceTree = ""; + }; +/* End PBXGroup section */ + +/* Begin PBXHeadersBuildPhase section */ + E41D7A9F2642C004005E8093 /* Headers */ = { + isa = PBXHeadersBuildPhase; + buildActionMask = 2147483647; + files = ( + E41D7AE82642C0A4005E8093 /* mathlib.h in Headers */, + E41D7ADA2642C0A4005E8093 /* exceptions.h in Headers */, + E41D7ABB2642C087005E8093 /* m68k.h in Headers */, + E41D7AC02642C087005E8093 /* readcpu.h in Headers */, + E41D7AEA2642C0A4005E8093 /* rounding.h in Headers */, + E41D7AAE2642C07C005E8093 /* cpu_emulation.h in Headers */, + E41D7AC22642C087005E8093 /* spcflags.h in Headers */, + E41D7AE52642C0A4005E8093 /* fpu.h in Headers */, + E41D7AAF2642C07C005E8093 /* cpummu.h in Headers */, + E41D7AC12642C087005E8093 /* registers.h in Headers */, + E41D7AD82642C0A4005E8093 /* core.h in Headers */, + E4FC27542642C45E00C64E21 /* cputbl.h in Headers */, + E41D7ABE2642C087005E8093 /* newcpu.h in Headers */, + E41D7AE62642C0A4005E8093 /* impl.h in Headers */, + E41D7ABC2642C087005E8093 /* memory.h in Headers */, + E41D7AEB2642C0A4005E8093 /* types.h in Headers */, + E41D7ADC2642C0A4005E8093 /* flags.h in Headers */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXHeadersBuildPhase section */ + +/* Begin PBXNativeTarget section */ + E41D7AA02642C004005E8093 /* uae_cpu_arm64 */ = { + isa = PBXNativeTarget; + buildConfigurationList = E41D7AA52642C004005E8093 /* Build configuration list for PBXNativeTarget "uae_cpu_arm64" */; + buildPhases = ( + E4FC27492642C2E600C64E21 /* ShellScript */, + E41D7A9D2642C004005E8093 /* Sources */, + E41D7A9E2642C004005E8093 /* Frameworks */, + E41D7A9F2642C004005E8093 /* Headers */, + ); + buildRules = ( + ); + dependencies = ( + ); + name = uae_cpu_arm64; + productName = uae_cpu_2021; + productReference = E41D7AA12642C004005E8093 /* libuae_cpu_arm64.a */; + productType = "com.apple.product-type.library.static"; + }; +/* End PBXNativeTarget section */ + +/* Begin PBXProject section */ + E41D7A992642C004005E8093 /* Project object */ = { + isa = PBXProject; + attributes = { + LastUpgradeCheck = 0820; + TargetAttributes = { + E41D7AA02642C004005E8093 = { + CreatedOnToolsVersion = 8.2.1; + ProvisioningStyle = Automatic; + }; + }; + }; + buildConfigurationList = E41D7A9C2642C004005E8093 /* Build configuration list for PBXProject "uae_cpu_2021" */; + compatibilityVersion = "Xcode 3.2"; + developmentRegion = English; + hasScannedForEncodings = 0; + knownRegions = ( + English, + en, + ); + mainGroup = E41D7A982642C004005E8093; + productRefGroup = E41D7AA22642C004005E8093 /* Products */; + projectDirPath = ""; + projectRoot = ""; + targets = ( + E41D7AA02642C004005E8093 /* uae_cpu_arm64 */, + ); + }; +/* End PBXProject section */ + +/* Begin PBXShellScriptBuildPhase section */ + E4FC27492642C2E600C64E21 /* ShellScript */ = { + isa = PBXShellScriptBuildPhase; + buildActionMask = 2147483647; + files = ( + ); + inputFileListPaths = ( + ); + inputPaths = ( + ); + outputFileListPaths = ( + ); + outputPaths = ( + $BUILT_PRODUCTS_DIR/gencpu_output_2021/cpuemu.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output_2021/cpufunctbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output_2021/cpustbl.cpp, + $BUILT_PRODUCTS_DIR/gencpu_output_2021/cputbl.h, + $BUILT_PRODUCTS_DIR/gencpu_output_2021/defs68k.c, + ); + runOnlyForDeploymentPostprocessing = 0; + shellPath = /bin/sh; + shellScript = "make -f Makefile.gencpu_2021\n"; + }; +/* End PBXShellScriptBuildPhase section */ + +/* Begin PBXSourcesBuildPhase section */ + E41D7A9D2642C004005E8093 /* Sources */ = { + isa = PBXSourcesBuildPhase; + buildActionMask = 2147483647; + files = ( + E4FC27512642C45E00C64E21 /* cpufunctbl.cpp in Sources */, + E41D7ABA2642C087005E8093 /* gencpu.c in Sources */, + E41D7ADB2642C0A4005E8093 /* flags.cpp in Sources */, + E41D7ADF2642C0A4005E8093 /* fpu_mpfr.cpp in Sources */, + E41D7ABD2642C087005E8093 /* newcpu.cpp in Sources */, + E4FC27552642C45E00C64E21 /* defs68k.c in Sources */, + E41D7AE72642C0A4005E8093 /* mathlib.cpp in Sources */, + E4FC27522642C45E00C64E21 /* cpuemu.cpp in Sources */, + E41D7AAB2642C070005E8093 /* build68k.c in Sources */, + E4FC27532642C45E00C64E21 /* cpustbl.cpp in Sources */, + E41D7AD92642C0A4005E8093 /* exceptions.cpp in Sources */, + E41D7AAA2642C070005E8093 /* basilisk_glue.cpp in Sources */, + E41D7ABF2642C087005E8093 /* readcpu.cpp in Sources */, + E41D7AE92642C0A4005E8093 /* rounding.cpp in Sources */, + ); + runOnlyForDeploymentPostprocessing = 0; + }; +/* End PBXSourcesBuildPhase section */ + +/* Begin XCBuildConfiguration section */ + E41D7AA32642C004005E8093 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = dwarf; + ENABLE_STRICT_OBJC_MSGSEND = YES; + ENABLE_TESTABILITY = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_DYNAMIC_NO_PIC = NO; + GCC_NO_COMMON_BLOCKS = YES; + GCC_OPTIMIZATION_LEVEL = 0; + GCC_PREPROCESSOR_DEFINITIONS = ( + "DEBUG=1", + "$(inherited)", + ); + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.11; + MTL_ENABLE_DEBUG_INFO = YES; + ONLY_ACTIVE_ARCH = YES; + SDKROOT = macosx; + }; + name = Debug; + }; + E41D7AA42642C004005E8093 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ALWAYS_SEARCH_USER_PATHS = NO; + CLANG_ANALYZER_NONNULL = YES; + CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x"; + CLANG_CXX_LIBRARY = "libc++"; + CLANG_ENABLE_MODULES = YES; + CLANG_ENABLE_OBJC_ARC = YES; + CLANG_WARN_BOOL_CONVERSION = YES; + CLANG_WARN_CONSTANT_CONVERSION = YES; + CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES_ERROR; + CLANG_WARN_DOCUMENTATION_COMMENTS = YES; + CLANG_WARN_EMPTY_BODY = YES; + CLANG_WARN_ENUM_CONVERSION = YES; + CLANG_WARN_INFINITE_RECURSION = YES; + CLANG_WARN_INT_CONVERSION = YES; + CLANG_WARN_OBJC_ROOT_CLASS = YES_ERROR; + CLANG_WARN_SUSPICIOUS_MOVE = YES; + CLANG_WARN_UNREACHABLE_CODE = YES; + CLANG_WARN__DUPLICATE_METHOD_MATCH = YES; + CODE_SIGN_IDENTITY = "-"; + COPY_PHASE_STRIP = NO; + DEBUG_INFORMATION_FORMAT = "dwarf-with-dsym"; + ENABLE_NS_ASSERTIONS = NO; + ENABLE_STRICT_OBJC_MSGSEND = YES; + GCC_C_LANGUAGE_STANDARD = gnu99; + GCC_NO_COMMON_BLOCKS = YES; + GCC_WARN_64_TO_32_BIT_CONVERSION = YES; + GCC_WARN_ABOUT_RETURN_TYPE = YES_ERROR; + GCC_WARN_UNDECLARED_SELECTOR = YES; + GCC_WARN_UNINITIALIZED_AUTOS = YES_AGGRESSIVE; + GCC_WARN_UNUSED_FUNCTION = YES; + GCC_WARN_UNUSED_VARIABLE = YES; + MACOSX_DEPLOYMENT_TARGET = 10.11; + MTL_ENABLE_DEBUG_INFO = NO; + SDKROOT = macosx; + }; + name = Release; + }; + E41D7AA62642C004005E8093 /* Debug */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = "$(ARCHS_STANDARD)"; + EXECUTABLE_PREFIX = lib; + GCC_PREPROCESSOR_DEFINITIONS = ( + "$(inherited)", + "USE_XCODE=1", + ); + HEADER_SEARCH_PATHS = ( + /opt/homebrew/include, + ../CrossPlatform, + ../include, + ../MacOSX, + ../uae_cpu_2021, + ../Unix, + ); + PRODUCT_NAME = "$(TARGET_NAME)"; + VALID_ARCHS = arm64; + }; + name = Debug; + }; + E41D7AA72642C004005E8093 /* Release */ = { + isa = XCBuildConfiguration; + buildSettings = { + ARCHS = "$(ARCHS_STANDARD)"; + EXECUTABLE_PREFIX = lib; + GCC_PREPROCESSOR_DEFINITIONS = "USE_XCODE=1"; + HEADER_SEARCH_PATHS = ( + /opt/homebrew/include, + ../CrossPlatform, + ../include, + ../MacOSX, + ../uae_cpu_2021, + ../Unix, + ); + PRODUCT_NAME = "$(TARGET_NAME)"; + VALID_ARCHS = arm64; + }; + name = Release; + }; +/* End XCBuildConfiguration section */ + +/* Begin XCConfigurationList section */ + E41D7A9C2642C004005E8093 /* Build configuration list for PBXProject "uae_cpu_2021" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E41D7AA32642C004005E8093 /* Debug */, + E41D7AA42642C004005E8093 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; + E41D7AA52642C004005E8093 /* Build configuration list for PBXNativeTarget "uae_cpu_arm64" */ = { + isa = XCConfigurationList; + buildConfigurations = ( + E41D7AA62642C004005E8093 /* Debug */, + E41D7AA72642C004005E8093 /* Release */, + ); + defaultConfigurationIsVisible = 0; + defaultConfigurationName = Release; + }; +/* End XCConfigurationList section */ + }; + rootObject = E41D7A992642C004005E8093 /* Project object */; +} diff --git a/README.md b/README.md index 381433177..c63f5c667 100644 --- a/README.md +++ b/README.md @@ -1,6 +1,6 @@ #### BasiliskII ``` -macOS x86_64 non-JIT / arm64 non-JIT +macOS x86_64 JIT / arm64 non-JIT Linux x86 x86_64 JIT MinGW x86 JIT ``` From bc9c7675f98b8a6d459731e44cc389360c384144 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Fri, 7 May 2021 14:29:27 +0900 Subject: [PATCH 499/534] removed unnecessary files from the uae_cpu libraries --- .../MacOSX/uae_cpu.xcodeproj/project.pbxproj | 24 ------------------- .../uae_cpu_2021.xcodeproj/project.pbxproj | 8 ------- 2 files changed, 32 deletions(-) diff --git a/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj index 73689da77..fde86798a 100644 --- a/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/uae_cpu.xcodeproj/project.pbxproj @@ -17,10 +17,7 @@ E4C1B4AA2642B05A00EB55A0 /* cputbl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4C1B4A12642B05A00EB55A0 /* cputbl.h */; }; E4C1B4AB2642B05A00EB55A0 /* defs68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E4C1B4A22642B05A00EB55A0 /* defs68k.c */; }; E4F537C92642A8BA008B27DF /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */; }; - E4F537CA2642A8BA008B27DF /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537C82642A8BA008B27DF /* build68k.c */; }; E4F537CD2642A8C2008B27DF /* cpu_emulation.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537CB2642A8C2008B27DF /* cpu_emulation.h */; }; - E4F537CE2642A8C2008B27DF /* cpuopti.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537CC2642A8C2008B27DF /* cpuopti.c */; }; - E4F537DA2642A8CC008B27DF /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = E4F537CF2642A8CC008B27DF /* gencpu.c */; }; E4F537DB2642A8CC008B27DF /* m68k.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D02642A8CC008B27DF /* m68k.h */; }; E4F537DC2642A8CC008B27DF /* memory.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537D12642A8CC008B27DF /* memory.cpp */; }; E4F537DD2642A8CC008B27DF /* memory.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537D22642A8CC008B27DF /* memory.h */; }; @@ -43,9 +40,6 @@ E4F5380D2642A904008B27DF /* flags.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FA2642A904008B27DF /* flags.h */; }; E4F5380E2642A904008B27DF /* fpu_ieee.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F537FB2642A904008B27DF /* fpu_ieee.cpp */; }; E4F5380F2642A904008B27DF /* fpu_ieee.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FC2642A904008B27DF /* fpu_ieee.h */; }; - E4F538112642A904008B27DF /* fpu_uae.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FE2642A904008B27DF /* fpu_uae.h */; }; - E4F538122642A904008B27DF /* fpu_x86_asm.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F537FF2642A904008B27DF /* fpu_x86_asm.h */; }; - E4F538142642A904008B27DF /* fpu_x86.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538012642A904008B27DF /* fpu_x86.h */; }; E4F538152642A904008B27DF /* fpu.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538022642A904008B27DF /* fpu.h */; }; E4F538162642A904008B27DF /* impl.h in Headers */ = {isa = PBXBuildFile; fileRef = E4F538032642A904008B27DF /* impl.h */; }; E4F538172642A904008B27DF /* mathlib.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E4F538042642A904008B27DF /* mathlib.cpp */; }; @@ -67,10 +61,7 @@ E4C1B4A22642B05A00EB55A0 /* defs68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = defs68k.c; path = gencpu_output/defs68k.c; sourceTree = BUILT_PRODUCTS_DIR; }; E4F537C02642A86D008B27DF /* libuae_cpu_x86_64.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libuae_cpu_x86_64.a; sourceTree = BUILT_PRODUCTS_DIR; }; E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = basilisk_glue.cpp; path = ../uae_cpu/basilisk_glue.cpp; sourceTree = ""; }; - E4F537C82642A8BA008B27DF /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = build68k.c; path = ../uae_cpu/build68k.c; sourceTree = ""; }; E4F537CB2642A8C2008B27DF /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpu_emulation.h; path = ../uae_cpu/cpu_emulation.h; sourceTree = ""; }; - E4F537CC2642A8C2008B27DF /* cpuopti.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = cpuopti.c; path = ../uae_cpu/cpuopti.c; sourceTree = ""; }; - E4F537CF2642A8CC008B27DF /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencpu.c; path = ../uae_cpu/gencpu.c; sourceTree = ""; }; E4F537D02642A8CC008B27DF /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = m68k.h; path = ../uae_cpu/m68k.h; sourceTree = ""; }; E4F537D12642A8CC008B27DF /* memory.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = memory.cpp; path = ../uae_cpu/memory.cpp; sourceTree = ""; }; E4F537D22642A8CC008B27DF /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = memory.h; path = ../uae_cpu/memory.h; sourceTree = ""; }; @@ -94,9 +85,6 @@ E4F537FA2642A904008B27DF /* flags.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = flags.h; path = ../uae_cpu/fpu/flags.h; sourceTree = ""; }; E4F537FB2642A904008B27DF /* fpu_ieee.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = fpu_ieee.cpp; path = ../uae_cpu/fpu/fpu_ieee.cpp; sourceTree = ""; }; E4F537FC2642A904008B27DF /* fpu_ieee.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_ieee.h; path = ../uae_cpu/fpu/fpu_ieee.h; sourceTree = ""; }; - E4F537FE2642A904008B27DF /* fpu_uae.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_uae.h; path = ../uae_cpu/fpu/fpu_uae.h; sourceTree = ""; }; - E4F537FF2642A904008B27DF /* fpu_x86_asm.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_x86_asm.h; path = ../uae_cpu/fpu/fpu_x86_asm.h; sourceTree = ""; }; - E4F538012642A904008B27DF /* fpu_x86.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu_x86.h; path = ../uae_cpu/fpu/fpu_x86.h; sourceTree = ""; }; E4F538022642A904008B27DF /* fpu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = fpu.h; path = ../uae_cpu/fpu/fpu.h; sourceTree = ""; }; E4F538032642A904008B27DF /* impl.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = impl.h; path = ../uae_cpu/fpu/impl.h; sourceTree = ""; }; E4F538042642A904008B27DF /* mathlib.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = mathlib.cpp; path = ../uae_cpu/fpu/mathlib.cpp; sourceTree = ""; }; @@ -137,12 +125,9 @@ isa = PBXGroup; children = ( E4F537C72642A8BA008B27DF /* basilisk_glue.cpp */, - E4F537C82642A8BA008B27DF /* build68k.c */, E4F537E42642A8D2008B27DF /* compiler */, E4F537CB2642A8C2008B27DF /* cpu_emulation.h */, - E4F537CC2642A8C2008B27DF /* cpuopti.c */, E4F537F52642A8ED008B27DF /* fpu */, - E4F537CF2642A8CC008B27DF /* gencpu.c */, E4F537D02642A8CC008B27DF /* m68k.h */, E4F537D12642A8CC008B27DF /* memory.cpp */, E4F537D22642A8CC008B27DF /* memory.h */, @@ -189,9 +174,6 @@ E4F537FA2642A904008B27DF /* flags.h */, E4F537FB2642A904008B27DF /* fpu_ieee.cpp */, E4F537FC2642A904008B27DF /* fpu_ieee.h */, - E4F537FE2642A904008B27DF /* fpu_uae.h */, - E4F537FF2642A904008B27DF /* fpu_x86_asm.h */, - E4F538012642A904008B27DF /* fpu_x86.h */, E4F538022642A904008B27DF /* fpu.h */, E4F538032642A904008B27DF /* impl.h */, E4F538042642A904008B27DF /* mathlib.cpp */, @@ -214,9 +196,6 @@ E4F538152642A904008B27DF /* fpu.h in Headers */, E4F5380F2642A904008B27DF /* fpu_ieee.h in Headers */, E4F537F12642A8E8008B27DF /* compemu.h in Headers */, - E4F538112642A904008B27DF /* fpu_uae.h in Headers */, - E4F538122642A904008B27DF /* fpu_x86_asm.h in Headers */, - E4F538142642A904008B27DF /* fpu_x86.h in Headers */, E4F538092642A904008B27DF /* core.h in Headers */, E4C1B4AA2642B05A00EB55A0 /* cputbl.h in Headers */, E4F5381B2642A904008B27DF /* types.h in Headers */, @@ -328,13 +307,10 @@ E4F537F02642A8E8008B27DF /* compemu_support.cpp in Sources */, E4F537DC2642A8CC008B27DF /* memory.cpp in Sources */, E4C1B4A42642B05A00EB55A0 /* compstbl.cpp in Sources */, - E4F537CE2642A8C2008B27DF /* cpuopti.c in Sources */, E4C1B4AB2642B05A00EB55A0 /* defs68k.c in Sources */, - E4F537CA2642A8BA008B27DF /* build68k.c in Sources */, E4C1B4A92642B05A00EB55A0 /* cpustbl.cpp in Sources */, E4F537C92642A8BA008B27DF /* basilisk_glue.cpp in Sources */, E4F537F32642A8E8008B27DF /* gencomp.c in Sources */, - E4F537DA2642A8CC008B27DF /* gencpu.c in Sources */, E4F5380E2642A904008B27DF /* fpu_ieee.cpp in Sources */, E4C1B4A72642B05A00EB55A0 /* cpuemu.cpp in Sources */, E4C1B4A82642B05A00EB55A0 /* cpustbl_nf.cpp in Sources */, diff --git a/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj index 7cd4f6a48..4df1615c4 100644 --- a/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj @@ -8,10 +8,8 @@ /* Begin PBXBuildFile section */ E41D7AAA2642C070005E8093 /* basilisk_glue.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AA82642C070005E8093 /* basilisk_glue.cpp */; }; - E41D7AAB2642C070005E8093 /* build68k.c in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AA92642C070005E8093 /* build68k.c */; }; E41D7AAE2642C07C005E8093 /* cpu_emulation.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AAC2642C07C005E8093 /* cpu_emulation.h */; }; E41D7AAF2642C07C005E8093 /* cpummu.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AAD2642C07C005E8093 /* cpummu.h */; }; - E41D7ABA2642C087005E8093 /* gencpu.c in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AB02642C087005E8093 /* gencpu.c */; }; E41D7ABB2642C087005E8093 /* m68k.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB12642C087005E8093 /* m68k.h */; }; E41D7ABC2642C087005E8093 /* memory.h in Headers */ = {isa = PBXBuildFile; fileRef = E41D7AB22642C087005E8093 /* memory.h */; }; E41D7ABD2642C087005E8093 /* newcpu.cpp in Sources */ = {isa = PBXBuildFile; fileRef = E41D7AB32642C087005E8093 /* newcpu.cpp */; }; @@ -43,10 +41,8 @@ /* Begin PBXFileReference section */ E41D7AA12642C004005E8093 /* libuae_cpu_arm64.a */ = {isa = PBXFileReference; explicitFileType = archive.ar; includeInIndex = 0; path = libuae_cpu_arm64.a; sourceTree = BUILT_PRODUCTS_DIR; }; E41D7AA82642C070005E8093 /* basilisk_glue.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = basilisk_glue.cpp; path = ../uae_cpu_2021/basilisk_glue.cpp; sourceTree = ""; }; - E41D7AA92642C070005E8093 /* build68k.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = build68k.c; path = ../uae_cpu_2021/build68k.c; sourceTree = ""; }; E41D7AAC2642C07C005E8093 /* cpu_emulation.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpu_emulation.h; path = ../uae_cpu_2021/cpu_emulation.h; sourceTree = ""; }; E41D7AAD2642C07C005E8093 /* cpummu.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = cpummu.h; path = ../uae_cpu_2021/cpummu.h; sourceTree = ""; }; - E41D7AB02642C087005E8093 /* gencpu.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; name = gencpu.c; path = ../uae_cpu_2021/gencpu.c; sourceTree = ""; }; E41D7AB12642C087005E8093 /* m68k.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = m68k.h; path = ../uae_cpu_2021/m68k.h; sourceTree = ""; }; E41D7AB22642C087005E8093 /* memory.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; name = memory.h; path = ../uae_cpu_2021/memory.h; sourceTree = ""; }; E41D7AB32642C087005E8093 /* newcpu.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = newcpu.cpp; path = ../uae_cpu_2021/newcpu.cpp; sourceTree = ""; }; @@ -91,11 +87,9 @@ isa = PBXGroup; children = ( E41D7AA82642C070005E8093 /* basilisk_glue.cpp */, - E41D7AA92642C070005E8093 /* build68k.c */, E41D7AC32642C08E005E8093 /* fpu */, E41D7AAC2642C07C005E8093 /* cpu_emulation.h */, E41D7AAD2642C07C005E8093 /* cpummu.h */, - E41D7AB02642C087005E8093 /* gencpu.c */, E41D7AB12642C087005E8093 /* m68k.h */, E41D7AB22642C087005E8093 /* memory.h */, E41D7AB32642C087005E8093 /* newcpu.cpp */, @@ -261,14 +255,12 @@ buildActionMask = 2147483647; files = ( E4FC27512642C45E00C64E21 /* cpufunctbl.cpp in Sources */, - E41D7ABA2642C087005E8093 /* gencpu.c in Sources */, E41D7ADB2642C0A4005E8093 /* flags.cpp in Sources */, E41D7ADF2642C0A4005E8093 /* fpu_mpfr.cpp in Sources */, E41D7ABD2642C087005E8093 /* newcpu.cpp in Sources */, E4FC27552642C45E00C64E21 /* defs68k.c in Sources */, E41D7AE72642C0A4005E8093 /* mathlib.cpp in Sources */, E4FC27522642C45E00C64E21 /* cpuemu.cpp in Sources */, - E41D7AAB2642C070005E8093 /* build68k.c in Sources */, E4FC27532642C45E00C64E21 /* cpustbl.cpp in Sources */, E41D7AD92642C0A4005E8093 /* exceptions.cpp in Sources */, E41D7AAA2642C070005E8093 /* basilisk_glue.cpp in Sources */, From 78fdb44d0277e0c16570b500746e2df993a781ef Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Fri, 7 May 2021 14:44:40 +0900 Subject: [PATCH 500/534] Update README.md --- README.md | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/README.md b/README.md index c63f5c667..83b419024 100644 --- a/README.md +++ b/README.md @@ -14,6 +14,11 @@ MinGW x86 JIT These builds need to be installed SDL2.0.10+ framework/library. #### BasiliskII ##### macOS +preparation: +``` +$ brew install mpfr +``` +(for Intel Mac, install GMP / MPFR library for arm64 manually) 1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj 1. Set Build Configuration to Release 1. Build From ba89fc7a722468d34b9c9bd38980b99718edb574 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Tue, 11 May 2021 10:18:06 +0900 Subject: [PATCH 501/534] Update README.md --- README.md | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/README.md b/README.md index 83b419024..2ebac05f6 100644 --- a/README.md +++ b/README.md @@ -14,11 +14,14 @@ MinGW x86 JIT These builds need to be installed SDL2.0.10+ framework/library. #### BasiliskII ##### macOS +BasiliskII for macOS can be built with Apple Silicon Mac. + preparation: ``` $ brew install mpfr ``` -(for Intel Mac, install GMP / MPFR library for arm64 manually) +For Intel Mac, checkout `has_fpu_bug` branch. But it has FPU issue if the binary runs on Apple Silicon Mac. + 1. Open BasiliskII/src/MacOSX/BasiliskII.xcodeproj 1. Set Build Configuration to Release 1. Build From 420dc1d5044c9be4cd921bd13298cdc2cde055fe Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 16 May 2021 14:46:58 +0900 Subject: [PATCH 502/534] fixed startup sound --- BasiliskII/src/SDL/audio_sdl.cpp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/audio_sdl.cpp b/BasiliskII/src/SDL/audio_sdl.cpp index c81e0fd40..42406c2bb 100644 --- a/BasiliskII/src/SDL/audio_sdl.cpp +++ b/BasiliskII/src/SDL/audio_sdl.cpp @@ -369,8 +369,8 @@ static int play_startup(void *arg) { Uint8 *wav_buffer; Uint32 wav_length; if (SDL_LoadWAV("startup.wav", &wav_spec, &wav_buffer, &wav_length)) { - SDL_AudioSpec desired = { .freq = 44100, .format = AUDIO_S16, .channels = 1 }, obtained; - SDL_AudioDeviceID deviceId = SDL_OpenAudioDevice(NULL, 0, &desired, &obtained, 0); + SDL_AudioSpec obtained; + SDL_AudioDeviceID deviceId = SDL_OpenAudioDevice(NULL, 0, &wav_spec, &obtained, 0); if (deviceId) { SDL_QueueAudio(deviceId, wav_buffer, wav_length); SDL_PauseAudioDevice(deviceId, 0); From c28a00f58a8452d8d8a64bdabf118686cc16bd86 Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 06:30:31 +0300 Subject: [PATCH 503/534] Add sdl_vsync option (vertical sync with SDL_Renderer) --- BasiliskII/src/SDL/video_sdl2.cpp | 7 +++++++ SheepShaver/src/Windows/prefs_windows.cpp | 1 + 2 files changed, 8 insertions(+) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 90bf8492b..77f53fa96 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -793,8 +793,15 @@ static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags #else SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); #endif + } + + bool sdl_vsync = PrefsFindBool("sdl_vsync"); + if (sdl_vsync) { + SDL_SetHint(SDL_HINT_RENDER_VSYNC, "1"); } + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); + if (!sdl_renderer) { shutdown_sdl_video(); return NULL; diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp index 0e9379e8e..da7cc3be5 100755 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ b/SheepShaver/src/Windows/prefs_windows.cpp @@ -56,6 +56,7 @@ prefs_desc platform_prefs_items[] = { {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, + {"sdl_vsync", TYPE_BOOLEAN, false, "Make SDL_Renderer vertical sync frames to host (eg. with software renderer)"}, #endif {NULL, TYPE_END, false, NULL} // End of list From e9a9573a201d6124746b0f24f1533615670f35be Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 06:33:46 +0300 Subject: [PATCH 504/534] Make sdlrender & sdl_vsync defaults visible in config --- SheepShaver/src/Windows/prefs_windows.cpp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/SheepShaver/src/Windows/prefs_windows.cpp b/SheepShaver/src/Windows/prefs_windows.cpp index da7cc3be5..9c3865bf5 100755 --- a/SheepShaver/src/Windows/prefs_windows.cpp +++ b/SheepShaver/src/Windows/prefs_windows.cpp @@ -141,4 +141,8 @@ void AddPlatformPrefsDefaults(void) PrefsReplaceString("serialb", "COM2"); PrefsReplaceString("portfile0", "C:\\B2TEMP0.OUT"); PrefsReplaceString("portfile1", "C:\\B2TEMP1.OUT"); +#ifdef USE_SDL_VIDEO + PrefsReplaceString("sdlrender", "software"); + PrefsReplaceBool("sdl_vsync", false); +#endif } From ac68d68920be9632eb043e7ee91ba67d7b4583fa Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 13:28:33 +0300 Subject: [PATCH 505/534] Add sdl_vsync to pref items --- BasiliskII/src/Windows/prefs_windows.cpp | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/BasiliskII/src/Windows/prefs_windows.cpp b/BasiliskII/src/Windows/prefs_windows.cpp index d9d28821d..527dcbfc2 100755 --- a/BasiliskII/src/Windows/prefs_windows.cpp +++ b/BasiliskII/src/Windows/prefs_windows.cpp @@ -51,6 +51,7 @@ prefs_desc platform_prefs_items[] = { {"portfile1", TYPE_STRING, false, "output file for serial port 1"}, #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, + {"sdl_vsync", TYPE_BOOLEAN, false, "Make SDL_Renderer vertical sync frames to host (eg. with software renderer)"}, #endif {NULL, TYPE_END, false, NULL} // End of list @@ -131,4 +132,8 @@ void AddPlatformPrefsDefaults(void) PrefsReplaceString("serialb", "COM2"); PrefsReplaceString("portfile0", "C:\\B2TEMP0.OUT"); PrefsReplaceString("portfile1", "C:\\B2TEMP1.OUT"); +#ifdef USE_SDL_VIDEO + PrefsReplaceString("sdlrender", "software"); + PrefsReplaceBool("sdl_vsync", false); +#endif } From bdcc9d2da45d8c121971e8b3d1f81d056ebcf7b6 Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 15:15:52 +0300 Subject: [PATCH 506/534] Keep refresh rate settings when dtype = fullscreen --- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 12 +----------- 1 file changed, 1 insertion(+), 11 deletions(-) diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index 7e04ba801..4dbff393e 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -975,29 +975,19 @@ static int dis_width, dis_height; // Hide/show graphics widgets static void hide_show_graphics_widgets(void) { - switch (display_type) { - case DISPLAY_WINDOW: - gtk_widget_show(w_frameskip); gtk_widget_show(l_frameskip); - break; - case DISPLAY_SCREEN: - gtk_widget_hide(w_frameskip); gtk_widget_hide(l_frameskip); - break; - } + } // "Window" video type selected static void mn_window(...) { display_type = DISPLAY_WINDOW; - hide_show_graphics_widgets(); } // "Fullscreen" video type selected static void mn_fullscreen(...) { display_type = DISPLAY_SCREEN; - hide_show_graphics_widgets(); - PrefsReplaceInt32("frameskip", 1); } // "5 Hz".."60Hz" selected From 42e70e85c6dad132ddb080cba50bff9a73ed0cb6 Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 17:16:35 +0300 Subject: [PATCH 507/534] Add sdl_vsync setting to GUI --- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 24 +++++++++++++++++++++ BasiliskII/src/include/user_strings.h | 2 ++ BasiliskII/src/user_strings.cpp | 2 ++ SheepShaver/src/include/user_strings.h | 2 ++ SheepShaver/src/user_strings.cpp | 2 ++ 5 files changed, 32 insertions(+) diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index 4dbff393e..ad43aa5b3 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -1020,6 +1020,25 @@ static void tb_nosound(GtkWidget *widget) set_graphics_sensitive(); } +// SDL Graphics +#ifdef USE_SDL_VIDEO + +// SDL render driver +enum { + RENDER_SOFTWARE, + RENDER_OPENGL, + RENDER_DIRECT3D +}; +// SDL Graphics settings +static int render_driver; +static int sdl_vsync; + +static void tb_sdl_vsync(GtkWidget *widget) +{ + PrefsReplaceBool("sdl_vsync", GTK_TOGGLE_BUTTON(widget)->active); +} +#endif + // Read graphics preferences static void parse_graphics_prefs(void) { @@ -1174,6 +1193,11 @@ static void create_graphics_pane(GtkWidget *top) make_checkbox(box, STR_GFXACCEL_CTRL, "gfxaccel", GTK_SIGNAL_FUNC(tb_gfxaccel)); #endif +#ifdef USE_SDL_VIDEO + make_separator(box); + make_checkbox(box, STR_GRAPHICS_SDL_VSYNC_CTRL, "sdl_vsync", GTK_SIGNAL_FUNC(tb_sdl_vsync)); +#endif + make_separator(box); make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index 71e7d80a3..e3f1e72f7 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -162,6 +162,8 @@ enum { STR_24_BIT_1600x1200_LAB, STR_SOUND_CTRL, STR_NOSOUND_CTRL, + STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, + STR_GRAPHICS_SDL_VSYNC_CTRL, STR_SERIAL_NETWORK_PANE_TITLE = 3500, // Serial/Networking pane STR_SERIALA_CTRL, diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index 0ae22b93d..747be8b1e 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -177,6 +177,8 @@ user_string_def common_strings[] = { {STR_24_BIT_1600x1200_LAB, "1600x1200, 24 Bit"}, {STR_SOUND_CTRL, "Sound"}, {STR_NOSOUND_CTRL, "Disable Sound Output"}, + {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Renderer"}, + {STR_GRAPHICS_SDL_VSYNC_CTRL, "Vertical Sync (Software)"}, {STR_SERIAL_NETWORK_PANE_TITLE, "Serial/Network"}, {STR_SERIALA_CTRL, "Modem Port"}, diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h index 519515205..01c8c13f8 100644 --- a/SheepShaver/src/include/user_strings.h +++ b/SheepShaver/src/include/user_strings.h @@ -132,6 +132,8 @@ enum { STR_SIZE_1024_LAB, STR_SIZE_MAX_LAB, STR_NOSOUND_CTRL, + STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, + STR_GRAPHICS_SDL_VSYNC_CTRL, // Serial/Network pane STR_SERIAL_NETWORK_PANE_TITLE = 3400, diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index 9a24cb1cf..b3c04b61e 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -142,6 +142,8 @@ user_string_def common_strings[] = { {STR_SIZE_1024_LAB, "1024"}, {STR_SIZE_MAX_LAB, "Maximum"}, {STR_NOSOUND_CTRL, "Disable Sound Output"}, + {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Renderer"}, + {STR_GRAPHICS_SDL_VSYNC_CTRL, "Vertical Sync (Software)"}, {STR_SERIAL_NETWORK_PANE_TITLE, "Serial/Network"}, {STR_SERPORTA_CTRL, "Modem Port"}, From 96218507355a8d84d7b9f917273b3700c7d076a2 Mon Sep 17 00:00:00 2001 From: aarojun Date: Thu, 27 May 2021 23:40:24 +0300 Subject: [PATCH 508/534] Add Render Driver setting to GUI --- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 99 +++++++++++++++++---- BasiliskII/src/include/user_strings.h | 4 + BasiliskII/src/user_strings.cpp | 6 +- SheepShaver/src/include/user_strings.h | 4 + SheepShaver/src/user_strings.cpp | 6 +- 5 files changed, 102 insertions(+), 17 deletions(-) diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index ad43aa5b3..1be31b047 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -979,16 +979,10 @@ static void hide_show_graphics_widgets(void) } // "Window" video type selected -static void mn_window(...) -{ - display_type = DISPLAY_WINDOW; -} +static void mn_window(...) {display_type = DISPLAY_WINDOW;} // "Fullscreen" video type selected -static void mn_fullscreen(...) -{ - display_type = DISPLAY_SCREEN; -} +static void mn_fullscreen(...) {display_type = DISPLAY_SCREEN;} // "5 Hz".."60Hz" selected static void mn_5hz(...) {PrefsReplaceInt32("frameskip", 12);} @@ -1022,23 +1016,31 @@ static void tb_nosound(GtkWidget *widget) // SDL Graphics #ifdef USE_SDL_VIDEO - -// SDL render driver +// SDL Renderer Render Driver enum { - RENDER_SOFTWARE, - RENDER_OPENGL, - RENDER_DIRECT3D + RENDER_SOFTWARE = 0, + RENDER_OPENGL = 1, + RENDER_DIRECT3D = 2 }; -// SDL Graphics settings + +GtkWidget *w_render_driver; +GtkWidget *l_render_driver; static int render_driver; static int sdl_vsync; +// Render Driver selected +static void mn_sdl_software(...) {render_driver = RENDER_SOFTWARE;} +static void mn_sdl_opengl(...) {render_driver = RENDER_OPENGL;} +static void mn_sdl_direct3d(...) {render_driver = RENDER_DIRECT3D;} + +// SDL Renderer Vertical Sync static void tb_sdl_vsync(GtkWidget *widget) { PrefsReplaceBool("sdl_vsync", GTK_TOGGLE_BUTTON(widget)->active); } #endif + // Read graphics preferences static void parse_graphics_prefs(void) { @@ -1058,6 +1060,40 @@ static void parse_graphics_prefs(void) else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) display_type = DISPLAY_SCREEN; } + + #ifdef USE_SDL_VIDEO + render_driver = RENDER_SOFTWARE; + + str = PrefsFindString("sdlrender"); + if (str) { + if (str == "software") + render_driver = RENDER_SOFTWARE; + else if (str == "opengl") + render_driver = RENDER_OPENGL; + else if (str == "direct3d") + render_driver = RENDER_DIRECT3D; + } + #endif +} + +static void read_SDL_graphics_settings(void) +{ + const char *rpref; + switch (render_driver) { + case RENDER_SOFTWARE: + rpref = "software"; + break; + case RENDER_OPENGL: + rpref = "opengl"; + break; + case RENDER_DIRECT3D: + rpref = "direct3d"; + break; + default: + PrefsRemoveItem("sdlrender"); + return; + } + PrefsReplaceString("sdlrender", rpref); } // Read settings from widgets and set preferences @@ -1084,6 +1120,10 @@ static void read_graphics_settings(void) return; } PrefsReplaceString("screen", pref); + + #ifdef USE_SDL_VIDEO + read_SDL_graphics_settings(); + #endif } // Create "Graphics/Sound" pane @@ -1195,7 +1235,36 @@ static void create_graphics_pane(GtkWidget *top) #ifdef USE_SDL_VIDEO make_separator(box); - make_checkbox(box, STR_GRAPHICS_SDL_VSYNC_CTRL, "sdl_vsync", GTK_SIGNAL_FUNC(tb_sdl_vsync)); + + table = make_table(box, 2, 5); + + l_render_driver = gtk_label_new(GetString(STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL)); + gtk_widget_show(l_render_driver); + gtk_table_attach(GTK_TABLE(table), l_render_driver, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); + + w_render_driver = gtk_option_menu_new(); + gtk_widget_show(w_render_driver); + menu = gtk_menu_new(); + + add_menu_item(menu, STR_SOFTWARE_LAB, GTK_SIGNAL_FUNC(mn_sdl_software)); + add_menu_item(menu, STR_OPENGL_LAB, GTK_SIGNAL_FUNC(mn_sdl_opengl)); + add_menu_item(menu, STR_DIRECT3D_LAB, GTK_SIGNAL_FUNC(mn_sdl_direct3d)); + switch (render_driver) { + case RENDER_SOFTWARE: + gtk_menu_set_active(GTK_MENU(menu), 0); + break; + case RENDER_OPENGL: + gtk_menu_set_active(GTK_MENU(menu), 1); + break; + case RENDER_DIRECT3D: + gtk_menu_set_active(GTK_MENU(menu), 2); + break; + } + gtk_option_menu_set_menu(GTK_OPTION_MENU(w_render_driver), menu); + gtk_table_attach(GTK_TABLE(table), w_render_driver, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); + + opt = make_checkbox(box, STR_GRAPHICS_SDL_VSYNC_CTRL, "sdl_vsync", GTK_SIGNAL_FUNC(tb_sdl_vsync)); + #endif make_separator(box); diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index e3f1e72f7..f75a738ed 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -163,7 +163,11 @@ enum { STR_SOUND_CTRL, STR_NOSOUND_CTRL, STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, + STR_SOFTWARE_LAB, + STR_OPENGL_LAB, + STR_DIRECT3D_LAB, STR_GRAPHICS_SDL_VSYNC_CTRL, + STR_DEFAULT_LAB, STR_SERIAL_NETWORK_PANE_TITLE = 3500, // Serial/Networking pane STR_SERIALA_CTRL, diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index 747be8b1e..1e608b27d 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -177,8 +177,12 @@ user_string_def common_strings[] = { {STR_24_BIT_1600x1200_LAB, "1600x1200, 24 Bit"}, {STR_SOUND_CTRL, "Sound"}, {STR_NOSOUND_CTRL, "Disable Sound Output"}, - {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Renderer"}, + {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Render Driver"}, + {STR_SOFTWARE_LAB, "Software"}, + {STR_OPENGL_LAB, "OpenGL"}, + {STR_DIRECT3D_LAB, "Direct3D"}, {STR_GRAPHICS_SDL_VSYNC_CTRL, "Vertical Sync (Software)"}, + {STR_DEFAULT_LAB, "Default"}, {STR_SERIAL_NETWORK_PANE_TITLE, "Serial/Network"}, {STR_SERIALA_CTRL, "Modem Port"}, diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h index 01c8c13f8..5a4f4048c 100644 --- a/SheepShaver/src/include/user_strings.h +++ b/SheepShaver/src/include/user_strings.h @@ -133,7 +133,11 @@ enum { STR_SIZE_MAX_LAB, STR_NOSOUND_CTRL, STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, + STR_SOFTWARE_LAB, + STR_OPENGL_LAB, + STR_DIRECT3D_LAB, STR_GRAPHICS_SDL_VSYNC_CTRL, + STR_DEFAULT_LAB, // Serial/Network pane STR_SERIAL_NETWORK_PANE_TITLE = 3400, diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index b3c04b61e..c29f7cffd 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -142,8 +142,12 @@ user_string_def common_strings[] = { {STR_SIZE_1024_LAB, "1024"}, {STR_SIZE_MAX_LAB, "Maximum"}, {STR_NOSOUND_CTRL, "Disable Sound Output"}, - {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Renderer"}, + {STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL, "Render Driver"}, + {STR_SOFTWARE_LAB, "Software"}, + {STR_OPENGL_LAB, "OpenGL"}, + {STR_DIRECT3D_LAB, "Direct3D"}, {STR_GRAPHICS_SDL_VSYNC_CTRL, "Vertical Sync (Software)"}, + {STR_DEFAULT_LAB, "Default"}, {STR_SERIAL_NETWORK_PANE_TITLE, "Serial/Network"}, {STR_SERPORTA_CTRL, "Modem Port"}, From d346521b923851d96760a1524a4305852f672880 Mon Sep 17 00:00:00 2001 From: aarojun Date: Fri, 28 May 2021 01:36:28 +0300 Subject: [PATCH 509/534] Fixed file read of sdlrender pref --- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index 1be31b047..50e8d9f83 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -1064,13 +1064,13 @@ static void parse_graphics_prefs(void) #ifdef USE_SDL_VIDEO render_driver = RENDER_SOFTWARE; - str = PrefsFindString("sdlrender"); - if (str) { - if (str == "software") + const char *drv = PrefsFindString("sdlrender"); + if (drv && drv[0]) { + if (strcmp(drv, "software") == 0) render_driver = RENDER_SOFTWARE; - else if (str == "opengl") + else if (strcmp(drv, "opengl") == 0) render_driver = RENDER_OPENGL; - else if (str == "direct3d") + else if (strcmp(drv, "direct3d") == 0) render_driver = RENDER_DIRECT3D; } #endif @@ -1264,7 +1264,6 @@ static void create_graphics_pane(GtkWidget *top) gtk_table_attach(GTK_TABLE(table), w_render_driver, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); opt = make_checkbox(box, STR_GRAPHICS_SDL_VSYNC_CTRL, "sdl_vsync", GTK_SIGNAL_FUNC(tb_sdl_vsync)); - #endif make_separator(box); From 15f56749bad1a6a7e2b1f9935b5484169eaa9123 Mon Sep 17 00:00:00 2001 From: kanjitalk755 Date: Sun, 13 Jun 2021 23:50:16 +0900 Subject: [PATCH 510/534] changed to use GMP/MPFR static libraries --- .../BasiliskII.xcodeproj/project.pbxproj | 28 +++---------------- .../uae_cpu_2021.xcodeproj/project.pbxproj | 4 +-- 2 files changed, 6 insertions(+), 26 deletions(-) diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index d79860980..9d6d46bc0 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -1032,17 +1032,8 @@ GCC_WARN_64_TO_32_BIT_CONVERSION = NO; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; GCC_WARN_UNUSED_VARIABLE = NO; - HEADER_SEARCH_PATHS = ( - /opt/homebrew/include, - /Library/Frameworks/SDL2.framework/Headers, - ../MacOSX, - ../include, - ../uae_cpu_2021, - ../Unix, - ../slirp, - ); + HEADER_SEARCH_PATHS = ""; "HEADER_SEARCH_PATHS[arch=arm64]" = ( - /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1051,7 +1042,6 @@ ../slirp, ); "HEADER_SEARCH_PATHS[arch=x86_64]" = ( - /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1062,7 +1052,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - LIBRARY_SEARCH_PATHS = /opt/homebrew/lib; + LIBRARY_SEARCH_PATHS = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; ONLY_ACTIVE_ARCH = NO; OTHER_CFLAGS = ""; @@ -1127,17 +1117,8 @@ GCC_WARN_64_TO_32_BIT_CONVERSION = NO; GCC_WARN_CHECK_SWITCH_STATEMENTS = NO; GCC_WARN_UNUSED_VARIABLE = NO; - HEADER_SEARCH_PATHS = ( - /opt/homebrew/include, - /Library/Frameworks/SDL2.framework/Headers, - ../MacOSX, - ../include, - ../uae_cpu_2021, - ../Unix, - ../slirp, - ); + HEADER_SEARCH_PATHS = ""; "HEADER_SEARCH_PATHS[arch=arm64]" = ( - /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1146,7 +1127,6 @@ ../slirp, ); "HEADER_SEARCH_PATHS[arch=x86_64]" = ( - /opt/homebrew/include, /Library/Frameworks/SDL2.framework/Headers, ../MacOSX, ../include, @@ -1157,7 +1137,7 @@ INFOPLIST_FILE = "$(SRCROOT)/Info.plist"; INSTALL_PATH = "$(HOME)/Applications"; LD_RUNPATH_SEARCH_PATHS = "$(inherited) @executable_path/../Frameworks"; - LIBRARY_SEARCH_PATHS = /opt/homebrew/lib; + LIBRARY_SEARCH_PATHS = /usr/local/lib; MACOSX_DEPLOYMENT_TARGET = 10.7; OTHER_CFLAGS = ""; OTHER_LDFLAGS = ""; diff --git a/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj index 4df1615c4..6a46b4523 100644 --- a/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/uae_cpu_2021.xcodeproj/project.pbxproj @@ -369,7 +369,7 @@ "USE_XCODE=1", ); HEADER_SEARCH_PATHS = ( - /opt/homebrew/include, + /usr/local/include, ../CrossPlatform, ../include, ../MacOSX, @@ -388,7 +388,7 @@ EXECUTABLE_PREFIX = lib; GCC_PREPROCESSOR_DEFINITIONS = "USE_XCODE=1"; HEADER_SEARCH_PATHS = ( - /opt/homebrew/include, + /usr/local/include, ../CrossPlatform, ../include, ../MacOSX, From ef2f8724fe9609c831abc20be98434aae22947b9 Mon Sep 17 00:00:00 2001 From: kanjitalk755 <33744007+kanjitalk755@users.noreply.github.com> Date: Sun, 13 Jun 2021 23:57:02 +0900 Subject: [PATCH 511/534] Update README.md --- README.md | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) diff --git a/README.md b/README.md index 2ebac05f6..6156fd01c 100644 --- a/README.md +++ b/README.md @@ -17,8 +17,26 @@ These builds need to be installed SDL2.0.10+ framework/library. BasiliskII for macOS can be built with Apple Silicon Mac. preparation: + +Download gmp-6.2.1.tar.xz from https://gmplib.org. +``` +$ cd ~/Downloads +$ tar xf gmp-6.2.1.tar.xz +$ cd gmp-6.2.1 +$ ./configure --disable-shared +$ make +$ make check +$ sudo make install ``` -$ brew install mpfr +Download mpfr-4.1.0.tar.xz from https://www.mpfr.org. +``` +$ cd ~/Downloads +$ tar xf mpfr-4.1.0.tar.xz +$ cd mpfr-4.1.0 +$ ./configure --disable-shared +$ make +$ make check +$ sudo make install ``` For Intel Mac, checkout `has_fpu_bug` branch. But it has FPU issue if the binary runs on Apple Silicon Mac. From cc0cdfaa10f5fa6212c85794261c09847456d460 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 16:54:16 -0800 Subject: [PATCH 512/534] Fix crash on linux aarch64 --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 26 +++++++++++++++++++---- BasiliskII/src/CrossPlatform/vm_alloc.h | 2 ++ 2 files changed, 24 insertions(+), 4 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 19d109e92..176060c07 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -83,6 +83,10 @@ typedef unsigned long vm_uintptr_t; #define MAP_ANONYMOUS 0 #endif +/* NOTE: on linux MAP_32BIT is only implemented on AMD64 + it is a null op on all other architectures + thus the MAP_BASE setting below is the only thing + ensuring low addresses on aarch64 for example */ #define MAP_EXTRA_FLAGS (MAP_32BIT) #ifdef HAVE_MMAP_VM @@ -91,6 +95,16 @@ typedef unsigned long vm_uintptr_t; don't get addresses above when the program is run on AMD64. NOTE: this is empirically determined on Linux/x86. */ #define MAP_BASE 0x10000000 +#elif DIRECT_ADDRESSING +/* linux does not implement any useful fallback behavior + such as allocating the next available address + and the first 4k-64k of address space is marked unavailable + for security reasons (see https://wiki.debian.org/mmap_min_addr) + so we must start requesting after the first page + or we get a high 64bit address that will crash direct addressing + + leaving NULL unmapped is a good idea anyway for debugging reasons */ +#define MAP_BASE 0x00010000 #else #define MAP_BASE 0x00000000 #endif @@ -270,11 +284,15 @@ void * vm_acquire(size_t size, int options) if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) return VM_MAP_FAILED; -#if USE_JIT - // Sanity checks for 64-bit platforms - if (sizeof(void *) == 8 && (options & VM_MAP_32BIT) && !((char *)addr <= (char *)0xffffffff)) - return VM_MAP_FAILED; + +#if DIRECT_ADDRESSING + // If MAP_32BIT and MAP_BASE fail to ensure + // a 32-bit address crash now instead of later. + // FIXME: make everything 64-bit clean and tear this all out. + if(sizeof(void *) > 4 && (options & VM_MAP_32BIT)) + assert((size_t)addr<0xffffffffL); #endif + next_address = (char *)addr + size; #elif defined(HAVE_WIN32_VM) int alloc_type = MEM_RESERVE | MEM_COMMIT; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.h b/BasiliskII/src/CrossPlatform/vm_alloc.h index bc5aba974..41dd949df 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.h +++ b/BasiliskII/src/CrossPlatform/vm_alloc.h @@ -36,6 +36,8 @@ extern "C" { } #endif +#include + /* Return value of `vm_acquire' in case of an error. */ #ifdef HAVE_MACH_VM #define VM_MAP_FAILED ((void *)-1) From c3c8e8d34253677e40fdb8ce35f557f608b9ed88 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 17:26:27 -0800 Subject: [PATCH 513/534] Update config.guess and config.sub --- BasiliskII/src/Unix/config.guess | 419 ++++++++++--------- BasiliskII/src/Unix/config.sub | 671 +++++++++++++++++-------------- 2 files changed, 608 insertions(+), 482 deletions(-) diff --git a/BasiliskII/src/Unix/config.guess b/BasiliskII/src/Unix/config.guess index 79d1317f5..dc0a6b299 100755 --- a/BasiliskII/src/Unix/config.guess +++ b/BasiliskII/src/Unix/config.guess @@ -1,8 +1,8 @@ #! /bin/sh # Attempt to guess a canonical system name. -# Copyright 1992-2019 Free Software Foundation, Inc. +# Copyright 1992-2021 Free Software Foundation, Inc. -timestamp='2019-03-04' +timestamp='2021-05-24' # This file is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by @@ -27,12 +27,12 @@ timestamp='2019-03-04' # Originally written by Per Bothner; maintained since 2000 by Ben Elliston. # # You can get the latest version of this script from: -# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.guess +# https://git.savannah.gnu.org/cgit/config.git/plain/config.guess # # Please send patches to . -me=`echo "$0" | sed -e 's,.*/,,'` +me=$(echo "$0" | sed -e 's,.*/,,') usage="\ Usage: $0 [OPTION] @@ -50,7 +50,7 @@ version="\ GNU config.guess ($timestamp) Originally written by Per Bothner. -Copyright 1992-2019 Free Software Foundation, Inc. +Copyright 1992-2021 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -99,9 +99,11 @@ tmp= trap 'test -z "$tmp" || rm -fr "$tmp"' 0 1 2 13 15 set_cc_for_build() { + # prevent multiple calls if $tmp is already set + test "$tmp" && return 0 : "${TMPDIR=/tmp}" # shellcheck disable=SC2039 - { tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || + { tmp=$( (umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null) && test -n "$tmp" && test -d "$tmp" ; } || { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir "$tmp" 2>/dev/null) ; } || { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir "$tmp" 2>/dev/null) && echo "Warning: creating insecure temp directory" >&2 ; } || { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } @@ -129,16 +131,14 @@ if test -f /.attbin/uname ; then PATH=$PATH:/.attbin ; export PATH fi -UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown -UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown -UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown -UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown +UNAME_MACHINE=$( (uname -m) 2>/dev/null) || UNAME_MACHINE=unknown +UNAME_RELEASE=$( (uname -r) 2>/dev/null) || UNAME_RELEASE=unknown +UNAME_SYSTEM=$( (uname -s) 2>/dev/null) || UNAME_SYSTEM=unknown +UNAME_VERSION=$( (uname -v) 2>/dev/null) || UNAME_VERSION=unknown -case "$UNAME_SYSTEM" in +case $UNAME_SYSTEM in Linux|GNU|GNU/*) - # If the system lacks a compiler, then just pick glibc. - # We could probably try harder. - LIBC=gnu + LIBC=unknown set_cc_for_build cat <<-EOF > "$dummy.c" @@ -147,24 +147,36 @@ Linux|GNU|GNU/*) LIBC=uclibc #elif defined(__dietlibc__) LIBC=dietlibc - #else + #elif defined(__GLIBC__) LIBC=gnu + #else + #include + /* First heuristic to detect musl libc. */ + #ifdef __DEFINED_va_list + LIBC=musl + #endif #endif EOF - eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g'`" + eval "$($CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g')" - # If ldd exists, use it to detect musl libc. - if command -v ldd >/dev/null && \ - ldd --version 2>&1 | grep -q ^musl - then - LIBC=musl + # Second heuristic to detect musl libc. + if [ "$LIBC" = unknown ] && + command -v ldd >/dev/null && + ldd --version 2>&1 | grep -q ^musl; then + LIBC=musl + fi + + # If the system lacks a compiler, then just pick glibc. + # We could probably try harder. + if [ "$LIBC" = unknown ]; then + LIBC=gnu fi ;; esac # Note: order is significant - the case branches are not exclusive. -case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in +case $UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION in *:NetBSD:*:*) # NetBSD (nbsd) targets should (where applicable) match one or # more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*, @@ -176,27 +188,27 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in # # Note: NetBSD doesn't particularly care about the vendor # portion of the name. We always set it to "unknown". - sysctl="sysctl -n hw.machine_arch" - UNAME_MACHINE_ARCH=`(uname -p 2>/dev/null || \ - "/sbin/$sysctl" 2>/dev/null || \ - "/usr/sbin/$sysctl" 2>/dev/null || \ - echo unknown)` - case "$UNAME_MACHINE_ARCH" in + UNAME_MACHINE_ARCH=$( (uname -p 2>/dev/null || \ + /sbin/sysctl -n hw.machine_arch 2>/dev/null || \ + /usr/sbin/sysctl -n hw.machine_arch 2>/dev/null || \ + echo unknown)) + case $UNAME_MACHINE_ARCH in + aarch64eb) machine=aarch64_be-unknown ;; armeb) machine=armeb-unknown ;; arm*) machine=arm-unknown ;; sh3el) machine=shl-unknown ;; sh3eb) machine=sh-unknown ;; sh5el) machine=sh5le-unknown ;; earmv*) - arch=`echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,'` - endian=`echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p'` + arch=$(echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,') + endian=$(echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p') machine="${arch}${endian}"-unknown ;; *) machine="$UNAME_MACHINE_ARCH"-unknown ;; esac # The Operating System including object format, if it has switched # to ELF recently (or will in the future) and ABI. - case "$UNAME_MACHINE_ARCH" in + case $UNAME_MACHINE_ARCH in earm*) os=netbsdelf ;; @@ -217,10 +229,10 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in ;; esac # Determine ABI tags. - case "$UNAME_MACHINE_ARCH" in + case $UNAME_MACHINE_ARCH in earm*) expr='s/^earmv[0-9]/-eabi/;s/eb$//' - abi=`echo "$UNAME_MACHINE_ARCH" | sed -e "$expr"` + abi=$(echo "$UNAME_MACHINE_ARCH" | sed -e "$expr") ;; esac # The OS release @@ -228,12 +240,12 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in # thus, need a distinct triplet. However, they do not need # kernel version information, so it can be replaced with a # suitable tag, in the style of linux-gnu. - case "$UNAME_VERSION" in + case $UNAME_VERSION in Debian*) release='-gnu' ;; *) - release=`echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2` + release=$(echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2) ;; esac # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: @@ -242,15 +254,19 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in echo "$machine-${os}${release}${abi-}" exit ;; *:Bitrig:*:*) - UNAME_MACHINE_ARCH=`arch | sed 's/Bitrig.//'` + UNAME_MACHINE_ARCH=$(arch | sed 's/Bitrig.//') echo "$UNAME_MACHINE_ARCH"-unknown-bitrig"$UNAME_RELEASE" exit ;; *:OpenBSD:*:*) - UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'` + UNAME_MACHINE_ARCH=$(arch | sed 's/OpenBSD.//') echo "$UNAME_MACHINE_ARCH"-unknown-openbsd"$UNAME_RELEASE" exit ;; + *:SecBSD:*:*) + UNAME_MACHINE_ARCH=$(arch | sed 's/SecBSD.//') + echo "$UNAME_MACHINE_ARCH"-unknown-secbsd"$UNAME_RELEASE" + exit ;; *:LibertyBSD:*:*) - UNAME_MACHINE_ARCH=`arch | sed 's/^.*BSD\.//'` + UNAME_MACHINE_ARCH=$(arch | sed 's/^.*BSD\.//') echo "$UNAME_MACHINE_ARCH"-unknown-libertybsd"$UNAME_RELEASE" exit ;; *:MidnightBSD:*:*) @@ -262,6 +278,9 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in *:SolidBSD:*:*) echo "$UNAME_MACHINE"-unknown-solidbsd"$UNAME_RELEASE" exit ;; + *:OS108:*:*) + echo "$UNAME_MACHINE"-unknown-os108_"$UNAME_RELEASE" + exit ;; macppc:MirBSD:*:*) echo powerpc-unknown-mirbsd"$UNAME_RELEASE" exit ;; @@ -271,27 +290,32 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in *:Sortix:*:*) echo "$UNAME_MACHINE"-unknown-sortix exit ;; + *:Twizzler:*:*) + echo "$UNAME_MACHINE"-unknown-twizzler + exit ;; *:Redox:*:*) echo "$UNAME_MACHINE"-unknown-redox exit ;; mips:OSF1:*.*) - echo mips-dec-osf1 - exit ;; + echo mips-dec-osf1 + exit ;; alpha:OSF1:*:*) + # Reset EXIT trap before exiting to avoid spurious non-zero exit code. + trap '' 0 case $UNAME_RELEASE in *4.0) - UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` + UNAME_RELEASE=$(/usr/sbin/sizer -v | awk '{print $3}') ;; *5.*) - UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'` + UNAME_RELEASE=$(/usr/sbin/sizer -v | awk '{print $4}') ;; esac # According to Compaq, /usr/sbin/psrinfo has been available on # OSF/1 and Tru64 systems produced since 1995. I hope that # covers most systems running today. This code pipes the CPU # types through head -n 1, so we only detect the type of CPU 0. - ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1` - case "$ALPHA_CPU_TYPE" in + ALPHA_CPU_TYPE=$(/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1) + case $ALPHA_CPU_TYPE in "EV4 (21064)") UNAME_MACHINE=alpha ;; "EV4.5 (21064)") @@ -328,11 +352,8 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in # A Tn.n version is a released field test version. # A Xn.n version is an unreleased experimental baselevel. # 1.2 uses "1.2" for uname -r. - echo "$UNAME_MACHINE"-dec-osf"`echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz`" - # Reset EXIT trap before exiting to avoid spurious non-zero exit code. - exitcode=$? - trap '' 0 - exit $exitcode ;; + echo "$UNAME_MACHINE"-dec-osf"$(echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz)" + exit ;; Amiga*:UNIX_System_V:4.0:*) echo m68k-unknown-sysv4 exit ;; @@ -362,7 +383,7 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in exit ;; Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. - if test "`(/bin/universe) 2>/dev/null`" = att ; then + if test "$( (/bin/universe) 2>/dev/null)" = att ; then echo pyramid-pyramid-sysv3 else echo pyramid-pyramid-bsd @@ -375,17 +396,17 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in echo sparc-icl-nx6 exit ;; DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*) - case `/usr/bin/uname -p` in + case $(/usr/bin/uname -p) in sparc) echo sparc-icl-nx7; exit ;; esac ;; s390x:SunOS:*:*) - echo "$UNAME_MACHINE"-ibm-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`" + echo "$UNAME_MACHINE"-ibm-solaris2"$(echo "$UNAME_RELEASE" | sed -e 's/[^.]*//')" exit ;; sun4H:SunOS:5.*:*) - echo sparc-hal-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + echo sparc-hal-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" exit ;; sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) - echo sparc-sun-solaris2"`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'`" + echo sparc-sun-solaris2"$(echo "$UNAME_RELEASE" | sed -e 's/[^.]*//')" exit ;; i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*) echo i386-pc-auroraux"$UNAME_RELEASE" @@ -396,7 +417,7 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in # If there is a compiler, see if it is configured for 64-bit objects. # Note that the Sun cc does not turn __LP64__ into 1 like gcc does. # This test works for both compilers. - if [ "$CC_FOR_BUILD" != no_compiler_found ]; then + if test "$CC_FOR_BUILD" != no_compiler_found; then if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \ (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ grep IS_64BIT_ARCH >/dev/null @@ -404,30 +425,30 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in SUN_ARCH=x86_64 fi fi - echo "$SUN_ARCH"-pc-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + echo "$SUN_ARCH"-pc-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" exit ;; sun4*:SunOS:6*:*) # According to config.sub, this is the proper way to canonicalize # SunOS6. Hard to guess exactly what SunOS6 will be like, but # it's likely to be more like Solaris than SunOS4. - echo sparc-sun-solaris3"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + echo sparc-sun-solaris3"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" exit ;; sun4*:SunOS:*:*) - case "`/usr/bin/arch -k`" in + case $(/usr/bin/arch -k) in Series*|S4*) - UNAME_RELEASE=`uname -v` + UNAME_RELEASE=$(uname -v) ;; esac # Japanese Language versions have a version number like `4.1.3-JL'. - echo sparc-sun-sunos"`echo "$UNAME_RELEASE"|sed -e 's/-/_/'`" + echo sparc-sun-sunos"$(echo "$UNAME_RELEASE"|sed -e 's/-/_/')" exit ;; sun3*:SunOS:*:*) echo m68k-sun-sunos"$UNAME_RELEASE" exit ;; sun*:*:4.2BSD:*) - UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` + UNAME_RELEASE=$( (sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null) test "x$UNAME_RELEASE" = x && UNAME_RELEASE=3 - case "`/bin/arch`" in + case $(/bin/arch) in sun3) echo m68k-sun-sunos"$UNAME_RELEASE" ;; @@ -507,8 +528,8 @@ case "$UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION" in } EOF $CC_FOR_BUILD -o "$dummy" "$dummy.c" && - dummyarg=`echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p'` && - SYSTEM_NAME=`"$dummy" "$dummyarg"` && + dummyarg=$(echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p') && + SYSTEM_NAME=$("$dummy" "$dummyarg") && { echo "$SYSTEM_NAME"; exit; } echo mips-mips-riscos"$UNAME_RELEASE" exit ;; @@ -535,11 +556,11 @@ EOF exit ;; AViiON:dgux:*:*) # DG/UX returns AViiON for all architectures - UNAME_PROCESSOR=`/usr/bin/uname -p` - if [ "$UNAME_PROCESSOR" = mc88100 ] || [ "$UNAME_PROCESSOR" = mc88110 ] + UNAME_PROCESSOR=$(/usr/bin/uname -p) + if test "$UNAME_PROCESSOR" = mc88100 || test "$UNAME_PROCESSOR" = mc88110 then - if [ "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx ] || \ - [ "$TARGET_BINARY_INTERFACE"x = x ] + if test "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx || \ + test "$TARGET_BINARY_INTERFACE"x = x then echo m88k-dg-dgux"$UNAME_RELEASE" else @@ -563,17 +584,17 @@ EOF echo m68k-tektronix-bsd exit ;; *:IRIX*:*:*) - echo mips-sgi-irix"`echo "$UNAME_RELEASE"|sed -e 's/-/_/g'`" + echo mips-sgi-irix"$(echo "$UNAME_RELEASE"|sed -e 's/-/_/g')" exit ;; ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id - exit ;; # Note that: echo "'`uname -s`'" gives 'AIX ' + exit ;; # Note that: echo "'$(uname -s)'" gives 'AIX ' i*86:AIX:*:*) echo i386-ibm-aix exit ;; ia64:AIX:*:*) - if [ -x /usr/bin/oslevel ] ; then - IBM_REV=`/usr/bin/oslevel` + if test -x /usr/bin/oslevel ; then + IBM_REV=$(/usr/bin/oslevel) else IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi @@ -593,7 +614,7 @@ EOF exit(0); } EOF - if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` + if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=$("$dummy") then echo "$SYSTEM_NAME" else @@ -606,15 +627,15 @@ EOF fi exit ;; *:AIX:*:[4567]) - IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` + IBM_CPU_ID=$(/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }') if /usr/sbin/lsattr -El "$IBM_CPU_ID" | grep ' POWER' >/dev/null 2>&1; then IBM_ARCH=rs6000 else IBM_ARCH=powerpc fi - if [ -x /usr/bin/lslpp ] ; then - IBM_REV=`/usr/bin/lslpp -Lqc bos.rte.libc | - awk -F: '{ print $3 }' | sed s/[0-9]*$/0/` + if test -x /usr/bin/lslpp ; then + IBM_REV=$(/usr/bin/lslpp -Lqc bos.rte.libc | + awk -F: '{ print $3 }' | sed s/[0-9]*$/0/) else IBM_REV="$UNAME_VERSION.$UNAME_RELEASE" fi @@ -642,26 +663,26 @@ EOF echo m68k-hp-bsd4.4 exit ;; 9000/[34678]??:HP-UX:*:*) - HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'` - case "$UNAME_MACHINE" in + HPUX_REV=$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//') + case $UNAME_MACHINE in 9000/31?) HP_ARCH=m68000 ;; 9000/[34]??) HP_ARCH=m68k ;; 9000/[678][0-9][0-9]) - if [ -x /usr/bin/getconf ]; then - sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` - sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` - case "$sc_cpu_version" in + if test -x /usr/bin/getconf; then + sc_cpu_version=$(/usr/bin/getconf SC_CPU_VERSION 2>/dev/null) + sc_kernel_bits=$(/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null) + case $sc_cpu_version in 523) HP_ARCH=hppa1.0 ;; # CPU_PA_RISC1_0 528) HP_ARCH=hppa1.1 ;; # CPU_PA_RISC1_1 532) # CPU_PA_RISC2_0 - case "$sc_kernel_bits" in + case $sc_kernel_bits in 32) HP_ARCH=hppa2.0n ;; 64) HP_ARCH=hppa2.0w ;; '') HP_ARCH=hppa2.0 ;; # HP-UX 10.20 esac ;; esac fi - if [ "$HP_ARCH" = "" ]; then + if test "$HP_ARCH" = ""; then set_cc_for_build sed 's/^ //' << EOF > "$dummy.c" @@ -696,11 +717,11 @@ EOF exit (0); } EOF - (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=`"$dummy"` + (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=$("$dummy") test -z "$HP_ARCH" && HP_ARCH=hppa fi ;; esac - if [ "$HP_ARCH" = hppa2.0w ] + if test "$HP_ARCH" = hppa2.0w then set_cc_for_build @@ -724,7 +745,7 @@ EOF echo "$HP_ARCH"-hp-hpux"$HPUX_REV" exit ;; ia64:HP-UX:*:*) - HPUX_REV=`echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//'` + HPUX_REV=$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*.[0B]*//') echo ia64-hp-hpux"$HPUX_REV" exit ;; 3050*:HI-UX:*:*) @@ -754,7 +775,7 @@ EOF exit (0); } EOF - $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` && + $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=$("$dummy") && { echo "$SYSTEM_NAME"; exit; } echo unknown-hitachi-hiuxwe2 exit ;; @@ -774,7 +795,7 @@ EOF echo hppa1.0-hp-osf exit ;; i*86:OSF1:*:*) - if [ -x /usr/sbin/sysversion ] ; then + if test -x /usr/sbin/sysversion ; then echo "$UNAME_MACHINE"-unknown-osf1mk else echo "$UNAME_MACHINE"-unknown-osf1 @@ -823,14 +844,14 @@ EOF echo craynv-cray-unicosmp"$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/' exit ;; F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) - FUJITSU_PROC=`uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz` - FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` - FUJITSU_REL=`echo "$UNAME_RELEASE" | sed -e 's/ /_/'` + FUJITSU_PROC=$(uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz) + FUJITSU_SYS=$(uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///') + FUJITSU_REL=$(echo "$UNAME_RELEASE" | sed -e 's/ /_/') echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" exit ;; 5000:UNIX_System_V:4.*:*) - FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` - FUJITSU_REL=`echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/'` + FUJITSU_SYS=$(uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///') + FUJITSU_REL=$(echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/') echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" exit ;; i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) @@ -843,25 +864,25 @@ EOF echo "$UNAME_MACHINE"-unknown-bsdi"$UNAME_RELEASE" exit ;; arm:FreeBSD:*:*) - UNAME_PROCESSOR=`uname -p` + UNAME_PROCESSOR=$(uname -p) set_cc_for_build if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ARM_PCS_VFP then - echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabi + echo "${UNAME_PROCESSOR}"-unknown-freebsd"$(echo ${UNAME_RELEASE}|sed -e 's/[-(].*//')"-gnueabi else - echo "${UNAME_PROCESSOR}"-unknown-freebsd"`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`"-gnueabihf + echo "${UNAME_PROCESSOR}"-unknown-freebsd"$(echo ${UNAME_RELEASE}|sed -e 's/[-(].*//')"-gnueabihf fi exit ;; *:FreeBSD:*:*) - UNAME_PROCESSOR=`/usr/bin/uname -p` - case "$UNAME_PROCESSOR" in + UNAME_PROCESSOR=$(/usr/bin/uname -p) + case $UNAME_PROCESSOR in amd64) UNAME_PROCESSOR=x86_64 ;; i386) UNAME_PROCESSOR=i586 ;; esac - echo "$UNAME_PROCESSOR"-unknown-freebsd"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`" + echo "$UNAME_PROCESSOR"-unknown-freebsd"$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')" exit ;; i*:CYGWIN*:*) echo "$UNAME_MACHINE"-pc-cygwin @@ -879,7 +900,7 @@ EOF echo "$UNAME_MACHINE"-pc-pw32 exit ;; *:Interix*:*) - case "$UNAME_MACHINE" in + case $UNAME_MACHINE in x86) echo i586-pc-interix"$UNAME_RELEASE" exit ;; @@ -897,15 +918,15 @@ EOF echo x86_64-pc-cygwin exit ;; prep*:SunOS:5.*:*) - echo powerpcle-unknown-solaris2"`echo "$UNAME_RELEASE"|sed -e 's/[^.]*//'`" + echo powerpcle-unknown-solaris2"$(echo "$UNAME_RELEASE"|sed -e 's/[^.]*//')" exit ;; *:GNU:*:*) # the GNU system - echo "`echo "$UNAME_MACHINE"|sed -e 's,[-/].*$,,'`-unknown-$LIBC`echo "$UNAME_RELEASE"|sed -e 's,/.*$,,'`" + echo "$(echo "$UNAME_MACHINE"|sed -e 's,[-/].*$,,')-unknown-$LIBC$(echo "$UNAME_RELEASE"|sed -e 's,/.*$,,')" exit ;; *:GNU/*:*:*) # other systems with GNU libc and userland - echo "$UNAME_MACHINE-unknown-`echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]"``echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`-$LIBC" + echo "$UNAME_MACHINE-unknown-$(echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]")$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')-$LIBC" exit ;; *:Minix:*:*) echo "$UNAME_MACHINE"-unknown-minix @@ -918,7 +939,7 @@ EOF echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; alpha:Linux:*:*) - case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in + case $(sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' /proc/cpuinfo 2>/dev/null) in EV5) UNAME_MACHINE=alphaev5 ;; EV56) UNAME_MACHINE=alphaev56 ;; PCA56) UNAME_MACHINE=alphapca56 ;; @@ -931,7 +952,7 @@ EOF if test "$?" = 0 ; then LIBC=gnulibc1 ; fi echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; - arc:Linux:*:* | arceb:Linux:*:*) + arc:Linux:*:* | arceb:Linux:*:* | arc64:Linux:*:*) echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; arm*:Linux:*:*) @@ -977,6 +998,9 @@ EOF k1om:Linux:*:*) echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; + loongarch32:Linux:*:* | loongarch64:Linux:*:* | loongarchx32:Linux:*:*) + echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" + exit ;; m32r*:Linux:*:*) echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; @@ -1027,7 +1051,7 @@ EOF #endif #endif EOF - eval "`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI'`" + eval "$($CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI')" test "x$CPU" != x && { echo "$CPU${MIPS_ENDIAN}-unknown-linux-$LIBCABI"; exit; } ;; mips64el:Linux:*:*) @@ -1047,7 +1071,7 @@ EOF exit ;; parisc:Linux:*:* | hppa:Linux:*:*) # Look for CPU level - case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in + case $(grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2) in PA7*) echo hppa1.1-unknown-linux-"$LIBC" ;; PA8*) echo hppa2.0-unknown-linux-"$LIBC" ;; *) echo hppa-unknown-linux-"$LIBC" ;; @@ -1065,7 +1089,7 @@ EOF ppcle:Linux:*:*) echo powerpcle-unknown-linux-"$LIBC" exit ;; - riscv32:Linux:*:* | riscv64:Linux:*:*) + riscv32:Linux:*:* | riscv32be:Linux:*:* | riscv64:Linux:*:* | riscv64be:Linux:*:*) echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" exit ;; s390:Linux:*:* | s390x:Linux:*:*) @@ -1087,7 +1111,17 @@ EOF echo "$UNAME_MACHINE"-dec-linux-"$LIBC" exit ;; x86_64:Linux:*:*) - echo "$UNAME_MACHINE"-pc-linux-"$LIBC" + set_cc_for_build + LIBCABI=$LIBC + if test "$CC_FOR_BUILD" != no_compiler_found; then + if (echo '#ifdef __ILP32__'; echo IS_X32; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_X32 >/dev/null + then + LIBCABI="$LIBC"x32 + fi + fi + echo "$UNAME_MACHINE"-pc-linux-"$LIBCABI" exit ;; xtensa*:Linux:*:*) echo "$UNAME_MACHINE"-unknown-linux-"$LIBC" @@ -1127,7 +1161,7 @@ EOF echo "$UNAME_MACHINE"-pc-msdosdjgpp exit ;; i*86:*:4.*:*) - UNAME_REL=`echo "$UNAME_RELEASE" | sed 's/\/MP$//'` + UNAME_REL=$(echo "$UNAME_RELEASE" | sed 's/\/MP$//') if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then echo "$UNAME_MACHINE"-univel-sysv"$UNAME_REL" else @@ -1136,7 +1170,7 @@ EOF exit ;; i*86:*:5:[678]*) # UnixWare 7.x, OpenUNIX and OpenServer 6. - case `/bin/uname -X | grep "^Machine"` in + case $(/bin/uname -X | grep "^Machine") in *486*) UNAME_MACHINE=i486 ;; *Pentium) UNAME_MACHINE=i586 ;; *Pent*|*Celeron) UNAME_MACHINE=i686 ;; @@ -1145,10 +1179,10 @@ EOF exit ;; i*86:*:3.2:*) if test -f /usr/options/cb.name; then - UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then - UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` + UNAME_REL=$( (/bin/uname -X|grep Release|sed -e 's/.*= //')) (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \ && UNAME_MACHINE=i586 @@ -1198,7 +1232,7 @@ EOF 3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0) OS_REL='' test -r /etc/.relid \ - && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` + && OS_REL=.$(sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid) /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ @@ -1209,7 +1243,7 @@ EOF NCR*:*:4.2:* | MPRAS*:*:4.2:*) OS_REL='.3' test -r /etc/.relid \ - && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` + && OS_REL=.$(sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid) /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ @@ -1242,7 +1276,7 @@ EOF exit ;; *:SINIX-*:*:*) if uname -p 2>/dev/null >/dev/null ; then - UNAME_MACHINE=`(uname -p) 2>/dev/null` + UNAME_MACHINE=$( (uname -p) 2>/dev/null) echo "$UNAME_MACHINE"-sni-sysv4 else echo ns32k-sni-sysv @@ -1276,7 +1310,7 @@ EOF echo mips-sony-newsos6 exit ;; R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) - if [ -d /usr/nec ]; then + if test -d /usr/nec; then echo mips-nec-sysv"$UNAME_RELEASE" else echo mips-unknown-sysv"$UNAME_RELEASE" @@ -1324,44 +1358,48 @@ EOF *:Rhapsody:*:*) echo "$UNAME_MACHINE"-apple-rhapsody"$UNAME_RELEASE" exit ;; + arm64:Darwin:*:*) + echo aarch64-apple-darwin"$UNAME_RELEASE" + exit ;; *:Darwin:*:*) - UNAME_PROCESSOR=`uname -p` || UNAME_PROCESSOR=unknown - set_cc_for_build - if test "$UNAME_PROCESSOR" = unknown ; then - UNAME_PROCESSOR=powerpc + UNAME_PROCESSOR=$(uname -p) + case $UNAME_PROCESSOR in + unknown) UNAME_PROCESSOR=powerpc ;; + esac + if command -v xcode-select > /dev/null 2> /dev/null && \ + ! xcode-select --print-path > /dev/null 2> /dev/null ; then + # Avoid executing cc if there is no toolchain installed as + # cc will be a stub that puts up a graphical alert + # prompting the user to install developer tools. + CC_FOR_BUILD=no_compiler_found + else + set_cc_for_build fi - if test "`echo "$UNAME_RELEASE" | sed -e 's/\..*//'`" -le 10 ; then - if [ "$CC_FOR_BUILD" != no_compiler_found ]; then - if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \ - (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ - grep IS_64BIT_ARCH >/dev/null - then - case $UNAME_PROCESSOR in - i386) UNAME_PROCESSOR=x86_64 ;; - powerpc) UNAME_PROCESSOR=powerpc64 ;; - esac - fi - # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc - if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \ - (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ - grep IS_PPC >/dev/null - then - UNAME_PROCESSOR=powerpc - fi + if test "$CC_FOR_BUILD" != no_compiler_found; then + if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_64BIT_ARCH >/dev/null + then + case $UNAME_PROCESSOR in + i386) UNAME_PROCESSOR=x86_64 ;; + powerpc) UNAME_PROCESSOR=powerpc64 ;; + esac + fi + # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc + if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \ + (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ + grep IS_PPC >/dev/null + then + UNAME_PROCESSOR=powerpc fi elif test "$UNAME_PROCESSOR" = i386 ; then - # Avoid executing cc on OS X 10.9, as it ships with a stub - # that puts up a graphical alert prompting to install - # developer tools. Any system running Mac OS X 10.7 or - # later (Darwin 11 and later) is required to have a 64-bit - # processor. This is not true of the ARM version of Darwin - # that Apple uses in portable devices. - UNAME_PROCESSOR=x86_64 + # uname -m returns i386 or x86_64 + UNAME_PROCESSOR=$UNAME_MACHINE fi echo "$UNAME_PROCESSOR"-apple-darwin"$UNAME_RELEASE" exit ;; *:procnto*:*:* | *:QNX:[0123456789]*:*) - UNAME_PROCESSOR=`uname -p` + UNAME_PROCESSOR=$(uname -p) if test "$UNAME_PROCESSOR" = x86; then UNAME_PROCESSOR=i386 UNAME_MACHINE=pc @@ -1399,10 +1437,9 @@ EOF # "uname -m" is not consistent, so use $cputype instead. 386 # is converted to i386 for consistency with other x86 # operating systems. - # shellcheck disable=SC2154 - if test "$cputype" = 386; then + if test "${cputype-}" = 386; then UNAME_MACHINE=i386 - else + elif test "x${cputype-}" != x; then UNAME_MACHINE="$cputype" fi echo "$UNAME_MACHINE"-unknown-plan9 @@ -1429,11 +1466,11 @@ EOF echo mips-sei-seiux"$UNAME_RELEASE" exit ;; *:DragonFly:*:*) - echo "$UNAME_MACHINE"-unknown-dragonfly"`echo "$UNAME_RELEASE"|sed -e 's/[-(].*//'`" + echo "$UNAME_MACHINE"-unknown-dragonfly"$(echo "$UNAME_RELEASE"|sed -e 's/[-(].*//')" exit ;; *:*VMS:*:*) - UNAME_MACHINE=`(uname -p) 2>/dev/null` - case "$UNAME_MACHINE" in + UNAME_MACHINE=$( (uname -p) 2>/dev/null) + case $UNAME_MACHINE in A*) echo alpha-dec-vms ; exit ;; I*) echo ia64-dec-vms ; exit ;; V*) echo vax-dec-vms ; exit ;; @@ -1442,13 +1479,13 @@ EOF echo i386-pc-xenix exit ;; i*86:skyos:*:*) - echo "$UNAME_MACHINE"-pc-skyos"`echo "$UNAME_RELEASE" | sed -e 's/ .*$//'`" + echo "$UNAME_MACHINE"-pc-skyos"$(echo "$UNAME_RELEASE" | sed -e 's/ .*$//')" exit ;; i*86:rdos:*:*) echo "$UNAME_MACHINE"-pc-rdos exit ;; - i*86:AROS:*:*) - echo "$UNAME_MACHINE"-pc-aros + *:AROS:*:*) + echo "$UNAME_MACHINE"-unknown-aros exit ;; x86_64:VMkernel:*:*) echo "$UNAME_MACHINE"-unknown-esx @@ -1468,6 +1505,14 @@ cat > "$dummy.c" < #include #endif +#if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) +#if defined (vax) || defined (__vax) || defined (__vax__) || defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) +#include +#if defined(_SIZE_T_) || defined(SIGLOST) +#include +#endif +#endif +#endif main () { #if defined (sony) @@ -1492,7 +1537,7 @@ main () #define __ARCHITECTURE__ "m68k" #endif int version; - version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`; + version=$( (hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null); if (version < 4) printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version); else @@ -1554,19 +1599,24 @@ main () #else printf ("vax-dec-bsd\n"); exit (0); #endif +#else +#if defined(_SIZE_T_) || defined(SIGLOST) + struct utsname un; + uname (&un); + printf ("vax-dec-ultrix%s\n", un.release); exit (0); #else printf ("vax-dec-ultrix\n"); exit (0); #endif #endif +#endif #if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) #if defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) -#include -#if defined(_SIZE_T_) /* >= ULTRIX4 */ - printf ("mips-dec-ultrix4\n"); exit (0); +#if defined(_SIZE_T_) || defined(SIGLOST) + struct utsname *un; + uname (&un); + printf ("mips-dec-ultrix%s\n", un.release); exit (0); #else -#if defined(ULTRIX3) || defined(ultrix3) || defined(SIGLOST) - printf ("mips-dec-ultrix3\n"); exit (0); -#endif + printf ("mips-dec-ultrix\n"); exit (0); #endif #endif #endif @@ -1579,7 +1629,7 @@ main () } EOF -$CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=`$dummy` && +$CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=$($dummy) && { echo "$SYSTEM_NAME"; exit; } # Apollos put the system type in the environment. @@ -1587,7 +1637,7 @@ test -d /usr/apollo && { echo "$ISP-apollo-$SYSTYPE"; exit; } echo "$0: unable to guess system type" >&2 -case "$UNAME_MACHINE:$UNAME_SYSTEM" in +case $UNAME_MACHINE:$UNAME_SYSTEM in mips:Linux | mips64:Linux) # If we got here on MIPS GNU/Linux, output extra information. cat >&2 <&2 </dev/null || echo unknown` -uname -r = `(uname -r) 2>/dev/null || echo unknown` -uname -s = `(uname -s) 2>/dev/null || echo unknown` -uname -v = `(uname -v) 2>/dev/null || echo unknown` +uname -m = $( (uname -m) 2>/dev/null || echo unknown) +uname -r = $( (uname -r) 2>/dev/null || echo unknown) +uname -s = $( (uname -s) 2>/dev/null || echo unknown) +uname -v = $( (uname -v) 2>/dev/null || echo unknown) -/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null` -/bin/uname -X = `(/bin/uname -X) 2>/dev/null` +/usr/bin/uname -p = $( (/usr/bin/uname -p) 2>/dev/null) +/bin/uname -X = $( (/bin/uname -X) 2>/dev/null) -hostinfo = `(hostinfo) 2>/dev/null` -/bin/universe = `(/bin/universe) 2>/dev/null` -/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null` -/bin/arch = `(/bin/arch) 2>/dev/null` -/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` -/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` +hostinfo = $( (hostinfo) 2>/dev/null) +/bin/universe = $( (/bin/universe) 2>/dev/null) +/usr/bin/arch -k = $( (/usr/bin/arch -k) 2>/dev/null) +/bin/arch = $( (/bin/arch) 2>/dev/null) +/usr/bin/oslevel = $( (/usr/bin/oslevel) 2>/dev/null) +/usr/convex/getsysinfo = $( (/usr/convex/getsysinfo) 2>/dev/null) UNAME_MACHINE = "$UNAME_MACHINE" UNAME_RELEASE = "$UNAME_RELEASE" UNAME_SYSTEM = "$UNAME_SYSTEM" UNAME_VERSION = "$UNAME_VERSION" EOF +fi exit 1 diff --git a/BasiliskII/src/Unix/config.sub b/BasiliskII/src/Unix/config.sub index 3b4c7624b..7384e9198 100755 --- a/BasiliskII/src/Unix/config.sub +++ b/BasiliskII/src/Unix/config.sub @@ -1,8 +1,8 @@ #! /bin/sh # Configuration validation subroutine script. -# Copyright 1992-2019 Free Software Foundation, Inc. +# Copyright 1992-2021 Free Software Foundation, Inc. -timestamp='2019-01-05' +timestamp='2021-04-30' # This file is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by @@ -33,7 +33,7 @@ timestamp='2019-01-05' # Otherwise, we print the canonical config type on stdout and succeed. # You can get the latest version of this script from: -# https://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub +# https://git.savannah.gnu.org/cgit/config.git/plain/config.sub # This file is supposed to be the same for all GNU packages # and recognize all the CPU types, system types and aliases @@ -50,7 +50,7 @@ timestamp='2019-01-05' # CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM # It is wrong to echo any other type of specification. -me=`echo "$0" | sed -e 's,.*/,,'` +me=$(echo "$0" | sed -e 's,.*/,,') usage="\ Usage: $0 [OPTION] CPU-MFR-OPSYS or ALIAS @@ -67,7 +67,7 @@ Report bugs and patches to ." version="\ GNU config.sub ($timestamp) -Copyright 1992-2019 Free Software Foundation, Inc. +Copyright 1992-2021 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -124,28 +124,27 @@ case $1 in ;; *-*-*-*) basic_machine=$field1-$field2 - os=$field3-$field4 + basic_os=$field3-$field4 ;; *-*-*) # Ambiguous whether COMPANY is present, or skipped and KERNEL-OS is two # parts maybe_os=$field2-$field3 case $maybe_os in - nto-qnx* | linux-gnu* | linux-android* | linux-dietlibc \ - | linux-newlib* | linux-musl* | linux-uclibc* | uclinux-uclibc* \ + nto-qnx* | linux-* | uclinux-uclibc* \ | uclinux-gnu* | kfreebsd*-gnu* | knetbsd*-gnu* | netbsd*-gnu* \ | netbsd*-eabi* | kopensolaris*-gnu* | cloudabi*-eabi* \ | storm-chaos* | os2-emx* | rtmk-nova*) basic_machine=$field1 - os=$maybe_os + basic_os=$maybe_os ;; android-linux) basic_machine=$field1-unknown - os=linux-android + basic_os=linux-android ;; *) basic_machine=$field1-$field2 - os=$field3 + basic_os=$field3 ;; esac ;; @@ -154,7 +153,7 @@ case $1 in case $field1-$field2 in decstation-3100) basic_machine=mips-dec - os= + basic_os= ;; *-*) # Second component is usually, but not always the OS @@ -162,7 +161,7 @@ case $1 in # Prevent following clause from handling this valid os sun*os*) basic_machine=$field1 - os=$field2 + basic_os=$field2 ;; # Manufacturers dec* | mips* | sequent* | encore* | pc533* | sgi* | sony* \ @@ -175,11 +174,11 @@ case $1 in | microblaze* | sim | cisco \ | oki | wec | wrs | winbond) basic_machine=$field1-$field2 - os= + basic_os= ;; *) basic_machine=$field1 - os=$field2 + basic_os=$field2 ;; esac ;; @@ -191,450 +190,451 @@ case $1 in case $field1 in 386bsd) basic_machine=i386-pc - os=bsd + basic_os=bsd ;; a29khif) basic_machine=a29k-amd - os=udi + basic_os=udi ;; adobe68k) basic_machine=m68010-adobe - os=scout + basic_os=scout ;; alliant) basic_machine=fx80-alliant - os= + basic_os= ;; altos | altos3068) basic_machine=m68k-altos - os= + basic_os= ;; am29k) basic_machine=a29k-none - os=bsd + basic_os=bsd ;; amdahl) basic_machine=580-amdahl - os=sysv + basic_os=sysv ;; amiga) basic_machine=m68k-unknown - os= + basic_os= ;; amigaos | amigados) basic_machine=m68k-unknown - os=amigaos + basic_os=amigaos ;; amigaunix | amix) basic_machine=m68k-unknown - os=sysv4 + basic_os=sysv4 ;; apollo68) basic_machine=m68k-apollo - os=sysv + basic_os=sysv ;; apollo68bsd) basic_machine=m68k-apollo - os=bsd + basic_os=bsd ;; aros) basic_machine=i386-pc - os=aros + basic_os=aros ;; aux) basic_machine=m68k-apple - os=aux + basic_os=aux ;; balance) basic_machine=ns32k-sequent - os=dynix + basic_os=dynix ;; blackfin) basic_machine=bfin-unknown - os=linux + basic_os=linux ;; cegcc) basic_machine=arm-unknown - os=cegcc + basic_os=cegcc ;; convex-c1) basic_machine=c1-convex - os=bsd + basic_os=bsd ;; convex-c2) basic_machine=c2-convex - os=bsd + basic_os=bsd ;; convex-c32) basic_machine=c32-convex - os=bsd + basic_os=bsd ;; convex-c34) basic_machine=c34-convex - os=bsd + basic_os=bsd ;; convex-c38) basic_machine=c38-convex - os=bsd + basic_os=bsd ;; cray) basic_machine=j90-cray - os=unicos + basic_os=unicos ;; crds | unos) basic_machine=m68k-crds - os= + basic_os= ;; da30) basic_machine=m68k-da30 - os= + basic_os= ;; decstation | pmax | pmin | dec3100 | decstatn) basic_machine=mips-dec - os= + basic_os= ;; delta88) basic_machine=m88k-motorola - os=sysv3 + basic_os=sysv3 ;; dicos) basic_machine=i686-pc - os=dicos + basic_os=dicos ;; djgpp) basic_machine=i586-pc - os=msdosdjgpp + basic_os=msdosdjgpp ;; ebmon29k) basic_machine=a29k-amd - os=ebmon + basic_os=ebmon ;; es1800 | OSE68k | ose68k | ose | OSE) basic_machine=m68k-ericsson - os=ose + basic_os=ose ;; gmicro) basic_machine=tron-gmicro - os=sysv + basic_os=sysv ;; go32) basic_machine=i386-pc - os=go32 + basic_os=go32 ;; h8300hms) basic_machine=h8300-hitachi - os=hms + basic_os=hms ;; h8300xray) basic_machine=h8300-hitachi - os=xray + basic_os=xray ;; h8500hms) basic_machine=h8500-hitachi - os=hms + basic_os=hms ;; harris) basic_machine=m88k-harris - os=sysv3 + basic_os=sysv3 ;; - hp300) + hp300 | hp300hpux) basic_machine=m68k-hp + basic_os=hpux ;; hp300bsd) basic_machine=m68k-hp - os=bsd - ;; - hp300hpux) - basic_machine=m68k-hp - os=hpux + basic_os=bsd ;; hppaosf) basic_machine=hppa1.1-hp - os=osf + basic_os=osf ;; hppro) basic_machine=hppa1.1-hp - os=proelf + basic_os=proelf ;; i386mach) basic_machine=i386-mach - os=mach - ;; - vsta) - basic_machine=i386-pc - os=vsta + basic_os=mach ;; isi68 | isi) basic_machine=m68k-isi - os=sysv + basic_os=sysv ;; m68knommu) basic_machine=m68k-unknown - os=linux + basic_os=linux ;; magnum | m3230) basic_machine=mips-mips - os=sysv + basic_os=sysv ;; merlin) basic_machine=ns32k-utek - os=sysv + basic_os=sysv ;; mingw64) basic_machine=x86_64-pc - os=mingw64 + basic_os=mingw64 ;; mingw32) basic_machine=i686-pc - os=mingw32 + basic_os=mingw32 ;; mingw32ce) basic_machine=arm-unknown - os=mingw32ce + basic_os=mingw32ce ;; monitor) basic_machine=m68k-rom68k - os=coff + basic_os=coff ;; morphos) basic_machine=powerpc-unknown - os=morphos + basic_os=morphos ;; moxiebox) basic_machine=moxie-unknown - os=moxiebox + basic_os=moxiebox ;; msdos) basic_machine=i386-pc - os=msdos + basic_os=msdos ;; msys) basic_machine=i686-pc - os=msys + basic_os=msys ;; mvs) basic_machine=i370-ibm - os=mvs + basic_os=mvs ;; nacl) basic_machine=le32-unknown - os=nacl + basic_os=nacl ;; ncr3000) basic_machine=i486-ncr - os=sysv4 + basic_os=sysv4 ;; netbsd386) basic_machine=i386-pc - os=netbsd + basic_os=netbsd ;; netwinder) basic_machine=armv4l-rebel - os=linux + basic_os=linux ;; news | news700 | news800 | news900) basic_machine=m68k-sony - os=newsos + basic_os=newsos ;; news1000) basic_machine=m68030-sony - os=newsos + basic_os=newsos ;; necv70) basic_machine=v70-nec - os=sysv + basic_os=sysv ;; nh3000) basic_machine=m68k-harris - os=cxux + basic_os=cxux ;; nh[45]000) basic_machine=m88k-harris - os=cxux + basic_os=cxux ;; nindy960) basic_machine=i960-intel - os=nindy + basic_os=nindy ;; mon960) basic_machine=i960-intel - os=mon960 + basic_os=mon960 ;; nonstopux) basic_machine=mips-compaq - os=nonstopux + basic_os=nonstopux ;; os400) basic_machine=powerpc-ibm - os=os400 + basic_os=os400 ;; OSE68000 | ose68000) basic_machine=m68000-ericsson - os=ose + basic_os=ose ;; os68k) basic_machine=m68k-none - os=os68k + basic_os=os68k ;; paragon) basic_machine=i860-intel - os=osf + basic_os=osf ;; parisc) basic_machine=hppa-unknown - os=linux + basic_os=linux + ;; + psp) + basic_machine=mipsallegrexel-sony + basic_os=psp ;; pw32) basic_machine=i586-unknown - os=pw32 + basic_os=pw32 ;; rdos | rdos64) basic_machine=x86_64-pc - os=rdos + basic_os=rdos ;; rdos32) basic_machine=i386-pc - os=rdos + basic_os=rdos ;; rom68k) basic_machine=m68k-rom68k - os=coff + basic_os=coff ;; sa29200) basic_machine=a29k-amd - os=udi + basic_os=udi ;; sei) basic_machine=mips-sei - os=seiux + basic_os=seiux ;; sequent) basic_machine=i386-sequent - os= + basic_os= ;; sps7) basic_machine=m68k-bull - os=sysv2 + basic_os=sysv2 ;; st2000) basic_machine=m68k-tandem - os= + basic_os= ;; stratus) basic_machine=i860-stratus - os=sysv4 + basic_os=sysv4 ;; sun2) basic_machine=m68000-sun - os= + basic_os= ;; sun2os3) basic_machine=m68000-sun - os=sunos3 + basic_os=sunos3 ;; sun2os4) basic_machine=m68000-sun - os=sunos4 + basic_os=sunos4 ;; sun3) basic_machine=m68k-sun - os= + basic_os= ;; sun3os3) basic_machine=m68k-sun - os=sunos3 + basic_os=sunos3 ;; sun3os4) basic_machine=m68k-sun - os=sunos4 + basic_os=sunos4 ;; sun4) basic_machine=sparc-sun - os= + basic_os= ;; sun4os3) basic_machine=sparc-sun - os=sunos3 + basic_os=sunos3 ;; sun4os4) basic_machine=sparc-sun - os=sunos4 + basic_os=sunos4 ;; sun4sol2) basic_machine=sparc-sun - os=solaris2 + basic_os=solaris2 ;; sun386 | sun386i | roadrunner) basic_machine=i386-sun - os= + basic_os= ;; sv1) basic_machine=sv1-cray - os=unicos + basic_os=unicos ;; symmetry) basic_machine=i386-sequent - os=dynix + basic_os=dynix ;; t3e) basic_machine=alphaev5-cray - os=unicos + basic_os=unicos ;; t90) basic_machine=t90-cray - os=unicos + basic_os=unicos ;; toad1) basic_machine=pdp10-xkl - os=tops20 + basic_os=tops20 ;; tpf) basic_machine=s390x-ibm - os=tpf + basic_os=tpf ;; udi29k) basic_machine=a29k-amd - os=udi + basic_os=udi ;; ultra3) basic_machine=a29k-nyu - os=sym1 + basic_os=sym1 ;; v810 | necv810) basic_machine=v810-nec - os=none + basic_os=none ;; vaxv) basic_machine=vax-dec - os=sysv + basic_os=sysv ;; vms) basic_machine=vax-dec - os=vms + basic_os=vms + ;; + vsta) + basic_machine=i386-pc + basic_os=vsta ;; vxworks960) basic_machine=i960-wrs - os=vxworks + basic_os=vxworks ;; vxworks68) basic_machine=m68k-wrs - os=vxworks + basic_os=vxworks ;; vxworks29k) basic_machine=a29k-wrs - os=vxworks + basic_os=vxworks ;; xbox) basic_machine=i686-pc - os=mingw32 + basic_os=mingw32 ;; ymp) basic_machine=ymp-cray - os=unicos + basic_os=unicos ;; *) basic_machine=$1 - os= + basic_os= ;; esac ;; @@ -686,17 +686,17 @@ case $basic_machine in bluegene*) cpu=powerpc vendor=ibm - os=cnk + basic_os=cnk ;; decsystem10* | dec10*) cpu=pdp10 vendor=dec - os=tops10 + basic_os=tops10 ;; decsystem20* | dec20*) cpu=pdp10 vendor=dec - os=tops20 + basic_os=tops20 ;; delta | 3300 | motorola-3300 | motorola-delta \ | 3300-motorola | delta-motorola) @@ -706,7 +706,7 @@ case $basic_machine in dpx2*) cpu=m68k vendor=bull - os=sysv3 + basic_os=sysv3 ;; encore | umax | mmax) cpu=ns32k @@ -715,7 +715,7 @@ case $basic_machine in elxsi) cpu=elxsi vendor=elxsi - os=${os:-bsd} + basic_os=${basic_os:-bsd} ;; fx2800) cpu=i860 @@ -728,7 +728,7 @@ case $basic_machine in h3050r* | hiux*) cpu=hppa1.1 vendor=hitachi - os=hiuxwe2 + basic_os=hiuxwe2 ;; hp3k9[0-9][0-9] | hp9[0-9][0-9]) cpu=hppa1.0 @@ -769,38 +769,38 @@ case $basic_machine in vendor=hp ;; i*86v32) - cpu=`echo "$1" | sed -e 's/86.*/86/'` + cpu=$(echo "$1" | sed -e 's/86.*/86/') vendor=pc - os=sysv32 + basic_os=sysv32 ;; i*86v4*) - cpu=`echo "$1" | sed -e 's/86.*/86/'` + cpu=$(echo "$1" | sed -e 's/86.*/86/') vendor=pc - os=sysv4 + basic_os=sysv4 ;; i*86v) - cpu=`echo "$1" | sed -e 's/86.*/86/'` + cpu=$(echo "$1" | sed -e 's/86.*/86/') vendor=pc - os=sysv + basic_os=sysv ;; i*86sol2) - cpu=`echo "$1" | sed -e 's/86.*/86/'` + cpu=$(echo "$1" | sed -e 's/86.*/86/') vendor=pc - os=solaris2 + basic_os=solaris2 ;; j90 | j90-cray) cpu=j90 vendor=cray - os=${os:-unicos} + basic_os=${basic_os:-unicos} ;; iris | iris4d) cpu=mips vendor=sgi - case $os in + case $basic_os in irix*) ;; *) - os=irix4 + basic_os=irix4 ;; esac ;; @@ -811,24 +811,26 @@ case $basic_machine in *mint | mint[0-9]* | *MiNT | *MiNT[0-9]*) cpu=m68k vendor=atari - os=mint + basic_os=mint ;; news-3600 | risc-news) cpu=mips vendor=sony - os=newsos + basic_os=newsos ;; next | m*-next) cpu=m68k vendor=next - case $os in - nextstep* ) + case $basic_os in + openstep*) + ;; + nextstep*) ;; ns2*) - os=nextstep2 + basic_os=nextstep2 ;; *) - os=nextstep3 + basic_os=nextstep3 ;; esac ;; @@ -839,12 +841,12 @@ case $basic_machine in op50n-* | op60c-*) cpu=hppa1.1 vendor=oki - os=proelf + basic_os=proelf ;; pa-hitachi) cpu=hppa1.1 vendor=hitachi - os=hiuxwe2 + basic_os=hiuxwe2 ;; pbd) cpu=sparc @@ -881,12 +883,12 @@ case $basic_machine in sde) cpu=mipsisa32 vendor=sde - os=${os:-elf} + basic_os=${basic_os:-elf} ;; simso-wrs) cpu=sparclite vendor=wrs - os=vxworks + basic_os=vxworks ;; tower | tower-32) cpu=m68k @@ -903,7 +905,7 @@ case $basic_machine in w89k-*) cpu=hppa1.1 vendor=winbond - os=proelf + basic_os=proelf ;; none) cpu=none @@ -915,7 +917,7 @@ case $basic_machine in ;; leon-*|leon[3-9]-*) cpu=sparc - vendor=`echo "$basic_machine" | sed 's/-.*//'` + vendor=$(echo "$basic_machine" | sed 's/-.*//') ;; *-*) @@ -956,11 +958,11 @@ case $cpu-$vendor in # some cases the only manufacturer, in others, it is the most popular. craynv-unknown) vendor=cray - os=${os:-unicosmp} + basic_os=${basic_os:-unicosmp} ;; c90-unknown | c90-cray) vendor=cray - os=${os:-unicos} + basic_os=${Basic_os:-unicos} ;; fx80-unknown) vendor=alliant @@ -1004,7 +1006,7 @@ case $cpu-$vendor in dpx20-unknown | dpx20-bull) cpu=rs6000 vendor=bull - os=${os:-bosx} + basic_os=${basic_os:-bosx} ;; # Here we normalize CPU types irrespective of the vendor @@ -1013,7 +1015,7 @@ case $cpu-$vendor in ;; blackfin-*) cpu=bfin - os=linux + basic_os=linux ;; c54x-*) cpu=tic54x @@ -1026,7 +1028,7 @@ case $cpu-$vendor in ;; e500v[12]-*) cpu=powerpc - os=$os"spe" + basic_os=${basic_os}"spe" ;; mips3*-*) cpu=mips64 @@ -1036,7 +1038,7 @@ case $cpu-$vendor in ;; m68knommu-*) cpu=m68k - os=linux + basic_os=linux ;; m9s12z-* | m68hcs12z-* | hcs12z-* | s12z-*) cpu=s12z @@ -1046,7 +1048,7 @@ case $cpu-$vendor in ;; parisc-*) cpu=hppa - os=linux + basic_os=linux ;; pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*) cpu=i586 @@ -1082,7 +1084,7 @@ case $cpu-$vendor in cpu=mipsisa64sb1el ;; sh5e[lb]-*) - cpu=`echo "$cpu" | sed 's/^\(sh.\)e\(.\)$/\1\2e/'` + cpu=$(echo "$cpu" | sed 's/^\(sh.\)e\(.\)$/\1\2e/') ;; spur-*) cpu=spur @@ -1100,13 +1102,16 @@ case $cpu-$vendor in cpu=x86_64 ;; xscale-* | xscalee[bl]-*) - cpu=`echo "$cpu" | sed 's/^xscale/arm/'` + cpu=$(echo "$cpu" | sed 's/^xscale/arm/') + ;; + arm64-*) + cpu=aarch64 ;; # Recognize the canonical CPU Types that limit and/or modify the # company names they are paired with. cr16-*) - os=${os:-elf} + basic_os=${basic_os:-elf} ;; crisv32-* | etraxfs*-*) cpu=crisv32 @@ -1117,7 +1122,7 @@ case $cpu-$vendor in vendor=axis ;; crx-*) - os=${os:-elf} + basic_os=${basic_os:-elf} ;; neo-tandem) cpu=neo @@ -1139,16 +1144,12 @@ case $cpu-$vendor in cpu=nsx vendor=tandem ;; - s390-*) - cpu=s390 - vendor=ibm - ;; - s390x-*) - cpu=s390x - vendor=ibm + mipsallegrexel-sony) + cpu=mipsallegrexel + vendor=sony ;; tile*-*) - os=${os:-linux-gnu} + basic_os=${basic_os:-linux-gnu} ;; *) @@ -1164,13 +1165,13 @@ case $cpu-$vendor in | alphapca5[67] | alpha64pca5[67] \ | am33_2.0 \ | amdgcn \ - | arc | arceb \ - | arm | arm[lb]e | arme[lb] | armv* \ + | arc | arceb | arc64 \ + | arm | arm[lb]e | arme[lb] | armv* \ | avr | avr32 \ | asmjs \ | ba \ | be32 | be64 \ - | bfin | bs2000 \ + | bfin | bpf | bs2000 \ | c[123]* | c30 | [cjt]90 | c4x \ | c8051 | clipper | craynv | csky | cydra \ | d10v | d30v | dlx | dsp16xx \ @@ -1184,6 +1185,7 @@ case $cpu-$vendor in | k1om \ | le32 | le64 \ | lm32 \ + | loongarch32 | loongarch64 | loongarchx32 \ | m32c | m32r | m32rle \ | m5200 | m68000 | m680[012346]0 | m68360 | m683?2 | m68k \ | m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x \ @@ -1202,9 +1204,13 @@ case $cpu-$vendor in | mips64vr5900 | mips64vr5900el \ | mipsisa32 | mipsisa32el \ | mipsisa32r2 | mipsisa32r2el \ + | mipsisa32r3 | mipsisa32r3el \ + | mipsisa32r5 | mipsisa32r5el \ | mipsisa32r6 | mipsisa32r6el \ | mipsisa64 | mipsisa64el \ | mipsisa64r2 | mipsisa64r2el \ + | mipsisa64r3 | mipsisa64r3el \ + | mipsisa64r5 | mipsisa64r5el \ | mipsisa64r6 | mipsisa64r6el \ | mipsisa64sb1 | mipsisa64sb1el \ | mipsisa64sr71k | mipsisa64sr71kel \ @@ -1228,8 +1234,9 @@ case $cpu-$vendor in | powerpc | powerpc64 | powerpc64le | powerpcle | powerpcspe \ | pru \ | pyramid \ - | riscv | riscv32 | riscv64 \ + | riscv | riscv32 | riscv32be | riscv64 | riscv64be \ | rl78 | romp | rs6000 | rx \ + | s390 | s390x \ | score \ | sh | shl \ | sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \ @@ -1239,13 +1246,15 @@ case $cpu-$vendor in | sparcv8 | sparcv9 | sparcv9b | sparcv9v | sv1 | sx* \ | spu \ | tahoe \ + | thumbv7* \ | tic30 | tic4x | tic54x | tic55x | tic6x | tic80 \ | tron \ | ubicom32 \ | v70 | v850 | v850e | v850e1 | v850es | v850e2 | v850e2v3 \ | vax \ | visium \ - | w65 | wasm32 \ + | w65 \ + | wasm32 | wasm64 \ | we32k \ | x86 | x86_64 | xc16x | xgate | xps100 \ | xstormy16 | xtensa* \ @@ -1275,8 +1284,47 @@ esac # Decode manufacturer-specific aliases for certain operating systems. -if [ x$os != x ] +if test x$basic_os != x then + +# First recognize some ad-hoc caes, or perhaps split kernel-os, or else just +# set os. +case $basic_os in + gnu/linux*) + kernel=linux + os=$(echo $basic_os | sed -e 's|gnu/linux|gnu|') + ;; + os2-emx) + kernel=os2 + os=$(echo $basic_os | sed -e 's|os2-emx|emx|') + ;; + nto-qnx*) + kernel=nto + os=$(echo $basic_os | sed -e 's|nto-qnx|qnx|') + ;; + *-*) + # shellcheck disable=SC2162 + IFS="-" read kernel os <&2 - exit 1 + # No normalization, but not necessarily accepted, that comes below. ;; esac + else # Here we handle the default operating systems that come with various machines. @@ -1530,6 +1503,7 @@ else # will signal an error saying that MANUFACTURER isn't an operating # system, and we'll never get to this point. +kernel= case $cpu-$vendor in score-*) os=elf @@ -1541,7 +1515,8 @@ case $cpu-$vendor in os=riscix1.2 ;; arm*-rebel) - os=linux + kernel=linux + os=gnu ;; arm*-semi) os=aout @@ -1707,84 +1682,178 @@ case $cpu-$vendor in os=none ;; esac + fi +# Now, validate our (potentially fixed-up) OS. +case $os in + # Sometimes we do "kernel-libc", so those need to count as OSes. + musl* | newlib* | uclibc*) + ;; + # Likewise for "kernel-abi" + eabi* | gnueabi*) + ;; + # VxWorks passes extra cpu info in the 4th filed. + simlinux | simwindows | spe) + ;; + # Now accept the basic system types. + # The portable systems comes first. + # Each alternative MUST end in a * to match a version number. + gnu* | android* | bsd* | mach* | minix* | genix* | ultrix* | irix* \ + | *vms* | esix* | aix* | cnk* | sunos | sunos[34]* \ + | hpux* | unos* | osf* | luna* | dgux* | auroraux* | solaris* \ + | sym* | plan9* | psp* | sim* | xray* | os68k* | v88r* \ + | hiux* | abug | nacl* | netware* | windows* \ + | os9* | macos* | osx* | ios* \ + | mpw* | magic* | mmixware* | mon960* | lnews* \ + | amigaos* | amigados* | msdos* | newsos* | unicos* | aof* \ + | aos* | aros* | cloudabi* | sortix* | twizzler* \ + | nindy* | vxsim* | vxworks* | ebmon* | hms* | mvs* \ + | clix* | riscos* | uniplus* | iris* | isc* | rtu* | xenix* \ + | mirbsd* | netbsd* | dicos* | openedition* | ose* \ + | bitrig* | openbsd* | secbsd* | solidbsd* | libertybsd* | os108* \ + | ekkobsd* | freebsd* | riscix* | lynxos* | os400* \ + | bosx* | nextstep* | cxux* | aout* | elf* | oabi* \ + | ptx* | coff* | ecoff* | winnt* | domain* | vsta* \ + | udi* | lites* | ieee* | go32* | aux* | hcos* \ + | chorusrdb* | cegcc* | glidix* | serenity* \ + | cygwin* | msys* | pe* | moss* | proelf* | rtems* \ + | midipix* | mingw32* | mingw64* | mint* \ + | uxpv* | beos* | mpeix* | udk* | moxiebox* \ + | interix* | uwin* | mks* | rhapsody* | darwin* \ + | openstep* | oskit* | conix* | pw32* | nonstopux* \ + | storm-chaos* | tops10* | tenex* | tops20* | its* \ + | os2* | vos* | palmos* | uclinux* | nucleus* | morphos* \ + | scout* | superux* | sysv* | rtmk* | tpf* | windiss* \ + | powermax* | dnix* | nx6 | nx7 | sei* | dragonfly* \ + | skyos* | haiku* | rdos* | toppers* | drops* | es* \ + | onefs* | tirtos* | phoenix* | fuchsia* | redox* | bme* \ + | midnightbsd* | amdhsa* | unleashed* | emscripten* | wasi* \ + | nsk* | powerunix* | genode* | zvmoe* | qnx* | emx*) + ;; + # This one is extra strict with allowed versions + sco3.2v2 | sco3.2v[4-9]* | sco5v6*) + # Don't forget version if it is 3.2v4 or newer. + ;; + none) + ;; + *) + echo Invalid configuration \`"$1"\': OS \`"$os"\' not recognized 1>&2 + exit 1 + ;; +esac + +# As a final step for OS-related things, validate the OS-kernel combination +# (given a valid OS), if there is a kernel. +case $kernel-$os in + linux-gnu* | linux-dietlibc* | linux-android* | linux-newlib* | linux-musl* | linux-uclibc* ) + ;; + uclinux-uclibc* ) + ;; + -dietlibc* | -newlib* | -musl* | -uclibc* ) + # These are just libc implementations, not actual OSes, and thus + # require a kernel. + echo "Invalid configuration \`$1': libc \`$os' needs explicit kernel." 1>&2 + exit 1 + ;; + kfreebsd*-gnu* | kopensolaris*-gnu*) + ;; + vxworks-simlinux | vxworks-simwindows | vxworks-spe) + ;; + nto-qnx*) + ;; + os2-emx) + ;; + *-eabi* | *-gnueabi*) + ;; + -*) + # Blank kernel with real OS is always fine. + ;; + *-*) + echo "Invalid configuration \`$1': Kernel \`$kernel' not known to work with OS \`$os'." 1>&2 + exit 1 + ;; +esac + # Here we handle the case where we know the os, and the CPU type, but not the # manufacturer. We pick the logical manufacturer. case $vendor in unknown) - case $os in - riscix*) + case $cpu-$os in + *-riscix*) vendor=acorn ;; - sunos*) + *-sunos*) vendor=sun ;; - cnk*|-aix*) + *-cnk* | *-aix*) vendor=ibm ;; - beos*) + *-beos*) vendor=be ;; - hpux*) + *-hpux*) vendor=hp ;; - mpeix*) + *-mpeix*) vendor=hp ;; - hiux*) + *-hiux*) vendor=hitachi ;; - unos*) + *-unos*) vendor=crds ;; - dgux*) + *-dgux*) vendor=dg ;; - luna*) + *-luna*) vendor=omron ;; - genix*) + *-genix*) vendor=ns ;; - clix*) + *-clix*) vendor=intergraph ;; - mvs* | opened*) + *-mvs* | *-opened*) + vendor=ibm + ;; + *-os400*) vendor=ibm ;; - os400*) + s390-* | s390x-*) vendor=ibm ;; - ptx*) + *-ptx*) vendor=sequent ;; - tpf*) + *-tpf*) vendor=ibm ;; - vxsim* | vxworks* | windiss*) + *-vxsim* | *-vxworks* | *-windiss*) vendor=wrs ;; - aux*) + *-aux*) vendor=apple ;; - hms*) + *-hms*) vendor=hitachi ;; - mpw* | macos*) + *-mpw* | *-macos*) vendor=apple ;; - *mint | mint[0-9]* | *MiNT | MiNT[0-9]*) + *-*mint | *-mint[0-9]* | *-*MiNT | *-MiNT[0-9]*) vendor=atari ;; - vos*) + *-vos*) vendor=stratus ;; esac ;; esac -echo "$cpu-$vendor-$os" +echo "$cpu-$vendor-${kernel:+$kernel-}$os" exit # Local variables: From c86fa4cb54c8cd283111a0e913b07d865aade151 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 11 Dec 2020 18:02:12 -0800 Subject: [PATCH 514/534] Don't use linker script on x86_64, there is no need for it and it breaks flatpak builds --- .../BasiliskII.xcodeproj/project.pbxproj | 2 - BasiliskII/src/Unix/ldscripts/linux-x86_64.ld | 171 ------------------ 2 files changed, 173 deletions(-) delete mode 100644 BasiliskII/src/Unix/ldscripts/linux-x86_64.ld diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 9d6d46bc0..6c450db11 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -228,7 +228,6 @@ 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "freebsd-i386.ld"; sourceTree = ""; }; 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-i386.ld"; sourceTree = ""; }; 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-ppc.ld"; sourceTree = ""; }; - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = "linux-x86_64.ld"; sourceTree = ""; }; 7539E2181F23B32A006B2DF2 /* egrep.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = egrep.m4; sourceTree = ""; }; 7539E2191F23B32A006B2DF2 /* esd.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = esd.m4; sourceTree = ""; }; 7539E21A1F23B32A006B2DF2 /* gettext.m4 */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text; path = gettext.m4; sourceTree = ""; }; @@ -620,7 +619,6 @@ 7539E20C1F23B32A006B2DF2 /* freebsd-i386.ld */, 7539E20D1F23B32A006B2DF2 /* linux-i386.ld */, 7539E20E1F23B32A006B2DF2 /* linux-ppc.ld */, - 7539E20F1F23B32A006B2DF2 /* linux-x86_64.ld */, ); path = ldscripts; sourceTree = ""; diff --git a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld b/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld deleted file mode 100644 index b824271ab..000000000 --- a/BasiliskII/src/Unix/ldscripts/linux-x86_64.ld +++ /dev/null @@ -1,171 +0,0 @@ -/* Default linker script, for normal executables */ -OUTPUT_FORMAT("elf64-x86-64", "elf64-x86-64", "elf64-x86-64") -OUTPUT_ARCH(i386:x86-64) -ENTRY(_start) -SEARCH_DIR("/lib64"); SEARCH_DIR("/usr/lib64"); SEARCH_DIR("/usr/local/lib64"); -SECTIONS -{ - /* Read-only sections, merged into text segment: */ - . = 0x78048000 + SIZEOF_HEADERS; - .interp : { *(.interp) } - .hash : { *(.hash) } - .dynsym : { *(.dynsym) } - .dynstr : { *(.dynstr) } - .gnu.version : { *(.gnu.version) } - .gnu.version_d : { *(.gnu.version_d) } - .gnu.version_r : { *(.gnu.version_r) } - .rel.init : { *(.rel.init) } - .rela.init : { *(.rela.init) } - .rel.text : { *(.rel.text .rel.text.* .rel.gnu.linkonce.t.*) } - .rela.text : { *(.rela.text .rela.text.* .rela.gnu.linkonce.t.*) } - .rel.fini : { *(.rel.fini) } - .rela.fini : { *(.rela.fini) } - .rel.rodata : { *(.rel.rodata .rel.rodata.* .rel.gnu.linkonce.r.*) } - .rela.rodata : { *(.rela.rodata .rela.rodata.* .rela.gnu.linkonce.r.*) } - .rel.data : { *(.rel.data .rel.data.* .rel.gnu.linkonce.d.*) } - .rela.data : { *(.rela.data .rela.data.* .rela.gnu.linkonce.d.*) } - .rel.tdata : { *(.rel.tdata .rel.tdata.* .rel.gnu.linkonce.td.*) } - .rela.tdata : { *(.rela.tdata .rela.tdata.* .rela.gnu.linkonce.td.*) } - .rel.tbss : { *(.rel.tbss .rel.tbss.* .rel.gnu.linkonce.tb.*) } - .rela.tbss : { *(.rela.tbss .rela.tbss.* .rela.gnu.linkonce.tb.*) } - .rel.ctors : { *(.rel.ctors) } - .rela.ctors : { *(.rela.ctors) } - .rel.dtors : { *(.rel.dtors) } - .rela.dtors : { *(.rela.dtors) } - .rel.got : { *(.rel.got) } - .rela.got : { *(.rela.got) } - .rel.bss : { *(.rel.bss .rel.bss.* .rel.gnu.linkonce.b.*) } - .rela.bss : { *(.rela.bss .rela.bss.* .rela.gnu.linkonce.b.*) } - .rel.plt : { *(.rel.plt) } - .rela.plt : { *(.rela.plt) } - .init : - { - KEEP (*(.init)) - } =0x90909090 - .plt : { *(.plt) } - .text : - { - *(.text .stub .text.* .gnu.linkonce.t.*) - /* .gnu.warning sections are handled specially by elf32.em. */ - *(.gnu.warning) - } =0x90909090 - .fini : - { - KEEP (*(.fini)) - } =0x90909090 - PROVIDE (__etext = .); - PROVIDE (_etext = .); - PROVIDE (etext = .); - .rodata : { *(.rodata .rodata.* .gnu.linkonce.r.*) } - .rodata1 : { *(.rodata1) } - .eh_frame_hdr : { *(.eh_frame_hdr) } - .eh_frame : ONLY_IF_RO { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RO { *(.gcc_except_table) } - /* Adjust the address for the data segment. We want to adjust up to - the same address within the page on the next page up. */ - . = ALIGN (0x100000) - ((0x100000 - .) & (0x100000 - 1)); . = DATA_SEGMENT_ALIGN (0x100000, 0x1000); - /* Ensure the __preinit_array_start label is properly aligned. We - could instead move the label definition inside the section, but - the linker would then create the section even if it turns out to - be empty, which isn't pretty. */ - . = ALIGN(64 / 8); - PROVIDE (__preinit_array_start = .); - .preinit_array : { *(.preinit_array) } - PROVIDE (__preinit_array_end = .); - PROVIDE (__init_array_start = .); - .init_array : { *(.init_array) } - PROVIDE (__init_array_end = .); - PROVIDE (__fini_array_start = .); - .fini_array : { *(.fini_array) } - PROVIDE (__fini_array_end = .); - .data : - { - *(.data .data.* .gnu.linkonce.d.*) - SORT(CONSTRUCTORS) - } - .data1 : { *(.data1) } - .tdata : { *(.tdata .tdata.* .gnu.linkonce.td.*) } - .tbss : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) } - .eh_frame : ONLY_IF_RW { KEEP (*(.eh_frame)) } - .gcc_except_table : ONLY_IF_RW { *(.gcc_except_table) } - .dynamic : { *(.dynamic) } - .ctors : - { - /* gcc uses crtbegin.o to find the start of - the constructors, so we make sure it is - first. Because this is a wildcard, it - doesn't matter if the user does not - actually link against crtbegin.o; the - linker won't look for a file to match a - wildcard. The wildcard also means that it - doesn't matter which directory crtbegin.o - is in. */ - KEEP (*crtbegin.o(.ctors)) - /* We don't want to include the .ctor section from - from the crtend.o file until after the sorted ctors. - The .ctor section from the crtend file contains the - end of ctors marker and it must be last */ - KEEP (*(EXCLUDE_FILE (*crtend.o ) .ctors)) - KEEP (*(SORT(.ctors.*))) - KEEP (*(.ctors)) - } - .dtors : - { - KEEP (*crtbegin.o(.dtors)) - KEEP (*(EXCLUDE_FILE (*crtend.o ) .dtors)) - KEEP (*(SORT(.dtors.*))) - KEEP (*(.dtors)) - } - .jcr : { KEEP (*(.jcr)) } - .got : { *(.got.plt) *(.got) } - _edata = .; - PROVIDE (edata = .); - __bss_start = .; - .bss : - { - *(.dynbss) - *(.bss .bss.* .gnu.linkonce.b.*) - *(COMMON) - /* Align here to ensure that the .bss section occupies space up to - _end. Align after .bss to ensure correct alignment even if the - .bss section disappears because there are no input sections. */ - . = ALIGN(64 / 8); - } - . = ALIGN(64 / 8); - _end = .; - PROVIDE (end = .); - . = DATA_SEGMENT_END (.); - /* Stabs debugging sections. */ - .stab 0 : { *(.stab) } - .stabstr 0 : { *(.stabstr) } - .stab.excl 0 : { *(.stab.excl) } - .stab.exclstr 0 : { *(.stab.exclstr) } - .stab.index 0 : { *(.stab.index) } - .stab.indexstr 0 : { *(.stab.indexstr) } - .comment 0 : { *(.comment) } - /* DWARF debug sections. - Symbols in the DWARF debugging sections are relative to the beginning - of the section so we begin them at 0. */ - /* DWARF 1 */ - .debug 0 : { *(.debug) } - .line 0 : { *(.line) } - /* GNU DWARF 1 extensions */ - .debug_srcinfo 0 : { *(.debug_srcinfo) } - .debug_sfnames 0 : { *(.debug_sfnames) } - /* DWARF 1.1 and DWARF 2 */ - .debug_aranges 0 : { *(.debug_aranges) } - .debug_pubnames 0 : { *(.debug_pubnames) } - /* DWARF 2 */ - .debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) } - .debug_abbrev 0 : { *(.debug_abbrev) } - .debug_line 0 : { *(.debug_line) } - .debug_frame 0 : { *(.debug_frame) } - .debug_str 0 : { *(.debug_str) } - .debug_loc 0 : { *(.debug_loc) } - .debug_macinfo 0 : { *(.debug_macinfo) } - /* SGI/MIPS DWARF 2 extensions */ - .debug_weaknames 0 : { *(.debug_weaknames) } - .debug_funcnames 0 : { *(.debug_funcnames) } - .debug_typenames 0 : { *(.debug_typenames) } - .debug_varnames 0 : { *(.debug_varnames) } -} From 046189db97ecf5de30794f74e027636cdb1f80f9 Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 30 Dec 2020 07:59:53 -0800 Subject: [PATCH 515/534] Merge Travis CI config from emaculation/macemu --- .travis.yml | 61 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 61 insertions(+) create mode 100644 .travis.yml diff --git a/.travis.yml b/.travis.yml new file mode 100644 index 000000000..2529b7120 --- /dev/null +++ b/.travis.yml @@ -0,0 +1,61 @@ +language: cpp + +# Do not build branches of the form "pr/*". By prefixing pull requests coming +# from branches inside the repository with pr/, this avoids building both the +# branch push _and_ the pull request. +# Based on https://github.com/boostorg/hana/blob/master/.travis.yml +branches: + except: /pr\/.*/ + +jobs: + include: + - os: linux + arch: amd64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=amd64-linux-basiliskii + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd BasiliskII/src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make + - os: linux + arch: arm64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=arm64-linux-basiliskii + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd BasiliskII/src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make + - os: linux + arch: amd64 + dist: bionic + sudo: required + compiler: gcc + env: BADGE=amd64-linux-sheepshaver + addons: + apt: + packages: + - libgtk2.0-dev + - libsdl2-dev + script: + - cd SheepShaver + - make links + - cd src/Unix + - NO_CONFIGURE=1 ./autogen.sh + - ./configure --with-mon + - make From 19b636bd0dcf1f06e43e9fc97d03bb1926e56a19 Mon Sep 17 00:00:00 2001 From: Seg Date: Thu, 17 Jun 2021 17:10:10 -0700 Subject: [PATCH 516/534] Remove obsolete AC_HEADER_STDC check --- BasiliskII/src/Unix/configure.ac | 1 - BasiliskII/src/Unix/sysdeps.h | 4 - BasiliskII/src/Windows/config.h | 260 ------------------------------ BasiliskII/src/Windows/sysdeps.h | 4 - SheepShaver/src/Unix/configure.ac | 1 - SheepShaver/src/Unix/sysdeps.h | 4 - SheepShaver/src/Windows/sysdeps.h | 4 - 7 files changed, 278 deletions(-) delete mode 100644 BasiliskII/src/Windows/config.h diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 6ece0de22..1e8b2c2f8 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -519,7 +519,6 @@ dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE dnl Checks for header files. -AC_HEADER_STDC AC_CHECK_HEADERS(stdlib.h stdint.h) AC_CHECK_HEADERS(unistd.h fcntl.h sys/types.h sys/time.h sys/mman.h mach/mach.h) AC_CHECK_HEADERS(readline.h history.h readline/readline.h readline/history.h) diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index bb6ab00d5..6f91115ea 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -28,10 +28,6 @@ #include #include "user_strings_unix.h" -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - #ifdef HAVE_UNISTD_H # include # include diff --git a/BasiliskII/src/Windows/config.h b/BasiliskII/src/Windows/config.h deleted file mode 100644 index 88bd09040..000000000 --- a/BasiliskII/src/Windows/config.h +++ /dev/null @@ -1,260 +0,0 @@ -/* config.h. Generated from config.h.in by configure. */ -/* config.h.in. Generated from configure.ac by autoheader. */ - -/* Define if building universal (internal helper macro) */ -/* #undef AC_APPLE_UNIVERSAL_BUILD */ - -/* Define if using video enabled on SEGV signals. */ -#ifndef _DEBUG -#define ENABLE_VOSF 1 -#endif - -/* Define to 1 if you have the `acoshl' function. */ -#define HAVE_ACOSHL 1 - -/* Define to 1 if you have the `acosl' function. */ -#define HAVE_ACOSL 1 - -/* Define to 1 if you have the `asinhl' function. */ -#define HAVE_ASINHL 1 - -/* Define to 1 if you have the `asinl' function. */ -#define HAVE_ASINL 1 - -/* Define to 1 if you have the `atanh' function. */ -#define HAVE_ATANH 1 - -/* Define to 1 if you have the `atanhl' function. */ -#define HAVE_ATANHL 1 - -/* Define to 1 if you have the `atanl' function. */ -#define HAVE_ATANL 1 - -/* Define to 1 if the system has the type `caddr_t'. */ -/* #undef HAVE_CADDR_T */ - -/* Define to 1 if you have the `ceill' function. */ -#define HAVE_CEILL 1 - -/* Define to 1 if you have the `coshl' function. */ -#define HAVE_COSHL 1 - -/* Define to 1 if you have the `cosl' function. */ -#define HAVE_COSL 1 - -/* Define to 1 if you have the `expl' function. */ -/* #undef HAVE_EXPL */ - -/* Define to 1 if you have the `fabsl' function. */ -/* #undef HAVE_FABSL */ - -/* Define to 1 if you have the `finite' function. */ -#define HAVE_FINITE 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_FLOATINGPOINT_H */ - -/* Define to 1 if you have the `floorl' function. */ -#define HAVE_FLOORL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEE754_H */ - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_IEEEFP_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_INTTYPES_H 1 - -/* Define to 1 if you have the `isinf' function. */ -/* #undef HAVE_ISINF */ - -/* Define to 1 if you have the `isinfl' function. */ -/* #undef HAVE_ISINFL */ - -/* Define to 1 if you have the `isnan' function. */ -#define HAVE_ISNAN 1 - -/* Define to 1 if you have the `isnanl' function. */ -/* #undef HAVE_ISNANL */ - -/* Define to 1 if you have the `isnormal' function. */ -/* #undef HAVE_ISNORMAL */ - -/* Define to 1 if the system has the type `loff_t'. */ -/* #undef HAVE_LOFF_T */ - -/* Define to 1 if you have the `log10l' function. */ -/* #undef HAVE_LOG10L */ - -/* Define to 1 if you have the `logl' function. */ -/* #undef HAVE_LOGL */ - -/* Define to 1 if you have the header file. */ -#define HAVE_MEMORY_H 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_NAN_H */ - -/* Define to 1 if you have the `powl' function. */ -#define HAVE_POWL 1 - -/* Define to 1 if you have the `signbit' function. */ -/* #undef HAVE_SIGNBIT */ - -/* Define if we can ignore the fault (instruction skipping in SIGSEGV - handler). */ -#define HAVE_SIGSEGV_SKIP_INSTRUCTION 1 - -/* Define to 1 if you have the `sinhl' function. */ -#define HAVE_SINHL 1 - -/* Define to 1 if you have the `sinl' function. */ -#define HAVE_SINL 1 - -/* Define to 1 if you have the `sqrtl' function. */ -#define HAVE_SQRTL 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDINT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_STDLIB_H 1 - -/* Define to 1 if you have the `strdup' function. */ -#define HAVE_STRDUP 1 - -/* Define to 1 if you have the `strerror' function. */ -#define HAVE_STRERROR 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_STRINGS_H */ - -/* Define to 1 if you have the header file. */ -#define HAVE_STRING_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_STAT_H 1 - -/* Define to 1 if you have the header file. */ -#define HAVE_SYS_TYPES_H 1 - -/* Define to 1 if you have the `tanhl' function. */ -#define HAVE_TANHL 1 - -/* Define to 1 if you have the `tanl' function. */ -#define HAVE_TANL 1 - -/* Define to 1 if you have the header file. */ -/* #undef HAVE_UNISTD_H */ - -/* Define if your system supports Windows exceptions. */ -#define HAVE_WIN32_EXCEPTIONS 1 - -/* Define if your system has a working Win32-based memory allocator. */ -#define HAVE_WIN32_VM 1 - -/* Define to the floating point format of the host machine. */ -#define HOST_FLOAT_FORMAT IEEE_FLOAT_FORMAT - -/* Define to 1 if the host machine stores floating point numbers in memory - with the word containing the sign bit at the lowest address, or to 0 if it - does it the other way around. This macro should not be defined if the - ordering is the same as for multi-word integers. */ -/* #undef HOST_FLOAT_WORDS_BIG_ENDIAN */ - -/* Define to 1 if your C compiler doesn't accept -c and -o together. */ -/* #undef NO_MINUS_C_MINUS_O */ - -/* Define this program name. */ -#define PACKAGE "Basilisk II" - -/* Define to the address where bug reports for this package should be sent. */ -#define PACKAGE_BUGREPORT "Christian.Bauer@uni-mainz.de" - -/* Define to the full name of this package. */ -#define PACKAGE_NAME "Basilisk II" - -/* Define to the full name and version of this package. */ -#define PACKAGE_STRING "Basilisk II 1.0" - -/* Define to the one symbol short name of this package. */ -#define PACKAGE_TARNAME "BasiliskII" - -/* Define to the home page for this package. */ -#define PACKAGE_URL "" - -/* Define to the version of this package. */ -#define PACKAGE_VERSION "1.0" - -/* The size of `double', as computed by sizeof. */ -#define SIZEOF_DOUBLE 8 - -/* The size of `float', as computed by sizeof. */ -#define SIZEOF_FLOAT 4 - -/* The size of `int', as computed by sizeof. */ -#define SIZEOF_INT 4 - -/* The size of `long', as computed by sizeof. */ -#define SIZEOF_LONG 4 - -/* The size of `long double', as computed by sizeof. */ -#define SIZEOF_LONG_DOUBLE 8 - -/* The size of `long long', as computed by sizeof. */ -#define SIZEOF_LONG_LONG 8 - -/* The size of `short', as computed by sizeof. */ -#define SIZEOF_SHORT 2 - -/* The size of `void *', as computed by sizeof. */ -#define SIZEOF_VOID_P 4 - -/* Define to 1 if you have the ANSI C header files. */ -#define STDC_HEADERS 1 - -/* Define to enble SDL support */ -#define USE_SDL 1 - -/* Define to enable SDL audio support */ -#define USE_SDL_AUDIO 1 - -/* Define to enable SDL video graphics support */ -#define USE_SDL_VIDEO 1 - -/* Define this program version. */ -#define VERSION "1.0" - -/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most - significant byte first (like Motorola and SPARC, unlike Intel). */ -#if defined AC_APPLE_UNIVERSAL_BUILD -# if defined __BIG_ENDIAN__ -# define WORDS_BIGENDIAN 1 -# endif -#else -# ifndef WORDS_BIGENDIAN -/* # undef WORDS_BIGENDIAN */ -# endif -#endif - -/* Number of bits in a file offset, on hosts where this is settable. */ -/* #undef _FILE_OFFSET_BITS */ - -/* Define for large files, on AIX-style hosts. */ -/* #undef _LARGE_FILES */ - -/* Define to empty if `const' does not conform to ANSI C. */ -/* #undef const */ - -/* Define to `__inline__' or `__inline' if that's what the C compiler - calls it, or to nothing if 'inline' is not supported under any name. */ -#ifndef __cplusplus -/* #undef inline */ -#endif - -/* Define to `long int' if does not define. */ -/* #undef off_t */ - -/* Define to `unsigned int' if does not define. */ -/* #undef size_t */ diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h index ac040a43e..b729451c0 100755 --- a/BasiliskII/src/Windows/sysdeps.h +++ b/BasiliskII/src/Windows/sysdeps.h @@ -28,10 +28,6 @@ #include "config.h" #include "user_strings_windows.h" -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - #ifndef WIN32 #define WIN32 #endif diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index 3b3480ca4..a8d1a007a 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -401,7 +401,6 @@ dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE dnl Checks for header files. -AC_HEADER_STDC AC_HEADER_SYS_WAIT AC_CHECK_HEADERS(malloc.h stdint.h) AC_CHECK_HEADERS(mach/vm_map.h mach/mach_init.h sys/mman.h) diff --git a/SheepShaver/src/Unix/sysdeps.h b/SheepShaver/src/Unix/sysdeps.h index 3cf79b30a..8722b40b8 100644 --- a/SheepShaver/src/Unix/sysdeps.h +++ b/SheepShaver/src/Unix/sysdeps.h @@ -28,10 +28,6 @@ #include "config.h" #include "user_strings_unix.h" -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - #ifdef HAVE_UNISTD_H # include # include diff --git a/SheepShaver/src/Windows/sysdeps.h b/SheepShaver/src/Windows/sysdeps.h index 0d73d2bd3..3db649c8b 100755 --- a/SheepShaver/src/Windows/sysdeps.h +++ b/SheepShaver/src/Windows/sysdeps.h @@ -28,10 +28,6 @@ #include "config.h" #include "user_strings_windows.h" -#ifndef STDC_HEADERS -#error "You don't have ANSI C header files." -#endif - #include #include #include From 58e367a73d73171a2c8b19a6f02ba10d93ac84f0 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 18 Jun 2021 15:30:28 -0700 Subject: [PATCH 517/534] Add AppVeyor config --- .appveyor.yml | 100 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 100 insertions(+) create mode 100644 .appveyor.yml diff --git a/.appveyor.yml b/.appveyor.yml new file mode 100644 index 000000000..2b1498051 --- /dev/null +++ b/.appveyor.yml @@ -0,0 +1,100 @@ +image: + - Visual Studio 2019 + - macOS + +environment: + matrix: + - MACEMU_PROJECT: BasiliskII + - MACEMU_PROJECT: SheepShaver + +for: +- + matrix: + only: + - image: Visual Studio 2019 + + environment: + MSYS2_DIR: C:\msys64 + MSYS2_BIN: $(MSYS2_DIR)\usr\bin + MSYS2_PLATFORM: MINGW32 + + install: + - '%MSYS2_BIN%\env %MSYS2_BIN%\bash -lc ''/usr/bin/pacman -Sy --noconfirm'' ' + # After installing a package with pacman -S, check that it is actually installed with pacman -Qi + # because pacman -S reports success even if the package install failed when some necessary package downloads timed out + - '%MSYS2_BIN%\env %MSYS2_BIN%\bash -lc ''/usr/bin/pacman -S --noconfirm mingw-w64-i686-gtk2'' ' + - '%MSYS2_BIN%\env %MSYS2_BIN%\bash -lc ''/usr/bin/pacman -Qi mingw-w64-i686-gtk2'' ' + - '%MSYS2_BIN%\env %MSYS2_BIN%\bash -lc ''/usr/bin/pacman -S --noconfirm mingw-w64-i686-SDL2'' ' + - '%MSYS2_BIN%\env %MSYS2_BIN%\bash -lc ''/usr/bin/pacman -Qi mingw-w64-i686-SDL2'' ' + + cache: + - $(MSYS2_DIR)\var\cache\pacman\pkg # downloaded MSYS2 pacman packages + + build_script: + - if %MACEMU_PROJECT%==SheepShaver %MSYS2_BIN%\env MSYSTEM=%MSYS2_PLATFORM% %MSYS2_BIN%\bash -lc 'cd /c/projects/%APPVEYOR_PROJECT_NAME%/%MACEMU_PROJECT%; make links' + - '%MSYS2_BIN%\env MSYSTEM=%MSYS2_PLATFORM% %MSYS2_BIN%\bash -lc ''cd /c/projects/%APPVEYOR_PROJECT_NAME%/%MACEMU_PROJECT%/src/Windows; ../Unix/autogen.sh'' ' + - '%MSYS2_BIN%\env MSYSTEM=%MSYS2_PLATFORM% %MSYS2_BIN%\bash -lc ''cd /c/projects/%APPVEYOR_PROJECT_NAME%/%MACEMU_PROJECT%/src/Windows; make'' ' + + after_build: + - cd %MACEMU_PROJECT%\src\Windows + - 7z a ..\..\..\%MACEMU_PROJECT%.zip %MACEMU_PROJECT%*.exe + + artifacts: + - path: $(MACEMU_PROJECT)\src\Windows\config.log + - path: $(MACEMU_PROJECT).zip + name: $(MACEMU_PROJECT) + +- + matrix: + only: + - image: macOS + MACEMU_PROJECT: BasiliskII + + environment: + SDL_VERSION: 2.0.14 + + install: + - test -e "SDL2-$SDL_VERSION.dmg" || curl -O http://www.libsdl.org/release/SDL2-$SDL_VERSION.dmg + - sudo hdiutil attach SDL2-$SDL_VERSION.dmg + - sudo cp -r /Volumes/SDL2/SDL2.framework /Library/Frameworks/ +# - brew update +# - HOMEBREW_NO_AUTO_UPDATE=1 brew install mpfr + + cache: + - SDL2-$SDL_VERSION.dmg + + build_script: + - cd $MACEMU_PROJECT/src/MacOSX + - xcodebuild -project $MACEMU_PROJECT.xcodeproj -scheme $MACEMU_PROJECT -configuration Release build SYMROOT=. CODE_SIGNING_REQUIRED=NO CODE_SIGN_IDENTITY= ARCHS=x86_64 ONLY_ACTIVE_ARCH=NO + - rm -rf Release/gencpu_output* Release/*.a + - hdiutil create ../../../$MACEMU_PROJECT.dmg -ov -volname $MACEMU_PROJECT -fs HFS+ -srcfolder Release/ + + artifacts: + - path: $MACEMU_PROJECT.dmg + name: $MACEMU_PROJECT + +- + matrix: + only: + - image: macOS + MACEMU_PROJECT: SheepShaver + + install: +# - brew update + - HOMEBREW_NO_AUTO_UPDATE=1 brew install sdl2 gtk+ + - HOMEBREW_NO_AUTO_UPDATE=1 brew link sdl2 gtk+ + + cache: + - /usr/local/Cellar + + build_script: + - cd $MACEMU_PROJECT + - make links + - cd src/Unix + - ./autogen.sh + - make + - tar -cJvf ../../../$MACEMU_PROJECT.tar.xz $MACEMU_PROJECT + + artifacts: + - path: $MACEMU_PROJECT.tar.xz + name: $MACEMU_PROJECT From 06747d4a7b85dbae2342cbc138054243fab03705 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 12 Dec 2020 10:51:56 -0800 Subject: [PATCH 518/534] Remove BeOS and AmigaOS --- BasiliskII/BasiliskII.spec | 3 +- BasiliskII/Makefile | 56 - BasiliskII/src/AmigaOS/BasiliskII.info | Bin 1519 -> 0 bytes BasiliskII/src/AmigaOS/Makefile | 64 - BasiliskII/src/AmigaOS/asm_support.asm | 1393 ------------ BasiliskII/src/AmigaOS/audio_amiga.cpp | 515 ----- BasiliskII/src/AmigaOS/clip_amiga.cpp | 166 -- BasiliskII/src/AmigaOS/ether_amiga.cpp | 705 ------ BasiliskII/src/AmigaOS/extfs_amiga.cpp | 387 ---- BasiliskII/src/AmigaOS/main_amiga.cpp | 743 ------ BasiliskII/src/AmigaOS/prefs_amiga.cpp | 89 - BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp | 1735 -------------- BasiliskII/src/AmigaOS/scsi_amiga.cpp | 289 --- BasiliskII/src/AmigaOS/serial_amiga.cpp | 861 ------- BasiliskII/src/AmigaOS/sys_amiga.cpp | 1122 --------- BasiliskII/src/AmigaOS/sysdeps.h | 76 - BasiliskII/src/AmigaOS/timer_amiga.cpp | 157 -- BasiliskII/src/AmigaOS/user_strings_amiga.cpp | 85 - BasiliskII/src/AmigaOS/user_strings_amiga.h | 51 - BasiliskII/src/AmigaOS/video_amiga.cpp | 1165 ---------- BasiliskII/src/AmigaOS/xpram_amiga.cpp | 80 - BasiliskII/src/BeOS/Makefile | 151 -- BasiliskII/src/BeOS/SheepDriver/Makefile | 117 - .../src/BeOS/SheepDriver/sheep_driver.c | 476 ---- .../src/BeOS/SheepDriver/sheep_driver.h | 33 - BasiliskII/src/BeOS/SheepNet/Makefile | 115 - BasiliskII/src/BeOS/SheepNet/sheep_net.cpp | 294 --- BasiliskII/src/BeOS/SheepNet/sheep_net.h | 65 - BasiliskII/src/BeOS/about_window.cpp | 59 - BasiliskII/src/BeOS/about_window.h | 27 - BasiliskII/src/BeOS/audio_beos.cpp | 342 --- BasiliskII/src/BeOS/clip_beos.cpp | 128 -- BasiliskII/src/BeOS/ether_beos.cpp | 532 ----- BasiliskII/src/BeOS/extfs_beos.cpp | 489 ---- BasiliskII/src/BeOS/main_beos.cpp | 826 ------- BasiliskII/src/BeOS/prefs_beos.cpp | 106 - BasiliskII/src/BeOS/prefs_editor_beos.cpp | 1022 --------- BasiliskII/src/BeOS/scsi_beos.cpp | 237 -- BasiliskII/src/BeOS/serial_beos.cpp | 873 ------- BasiliskII/src/BeOS/sys_beos.cpp | 841 ------- BasiliskII/src/BeOS/sysdeps.h | 144 -- BasiliskII/src/BeOS/timer_beos.cpp | 166 -- BasiliskII/src/BeOS/user_strings_beos.cpp | 69 - BasiliskII/src/BeOS/user_strings_beos.h | 35 - BasiliskII/src/BeOS/video_beos.cpp | 1086 --------- BasiliskII/src/BeOS/xpram_beos.cpp | 84 - BasiliskII/src/MacOSX/video_macosx.mm | 10 +- BasiliskII/src/Unix/BasiliskII.1 | 2 +- BasiliskII/src/Unix/Irix/audio_irix.cpp | 16 +- BasiliskII/src/ether.cpp | 9 - BasiliskII/src/extfs.cpp | 8 +- BasiliskII/src/include/debug.h | 12 - BasiliskII/src/powerrom_cpu/cpu_emulation.h | 66 - BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp | 1367 ----------- BasiliskII/src/rom_patches.cpp | 15 +- BasiliskII/src/sony.cpp | 4 - BasiliskII/src/user_strings.cpp | 4 - SheepShaver/Makefile | 3 - SheepShaver/doc/BeOS/acknowledgements.html | 24 - SheepShaver/doc/BeOS/contact.html | 47 - SheepShaver/doc/BeOS/graphics.gif | Bin 8854 -> 0 bytes SheepShaver/doc/BeOS/history.html | 59 - SheepShaver/doc/BeOS/icon.gif | Bin 2011 -> 0 bytes SheepShaver/doc/BeOS/iconsmall.gif | Bin 1297 -> 0 bytes SheepShaver/doc/BeOS/index.html | 28 - SheepShaver/doc/BeOS/installation.html | 25 - SheepShaver/doc/BeOS/introduction.html | 45 - SheepShaver/doc/BeOS/memory.gif | Bin 5510 -> 0 bytes SheepShaver/doc/BeOS/quickstart.html | 38 - SheepShaver/doc/BeOS/serial.gif | Bin 4844 -> 0 bytes SheepShaver/doc/BeOS/settings.html | 127 -- SheepShaver/doc/BeOS/troubleshooting.html | 79 - SheepShaver/doc/BeOS/using.html | 76 - SheepShaver/doc/BeOS/volumes.gif | Bin 7456 -> 0 bytes .../src/BeOS/CreatePCIDrivers/Ethernet.cpp | 256 --- .../src/BeOS/CreatePCIDrivers/Makefile | 25 - .../src/BeOS/CreatePCIDrivers/Video.cpp | 78 - .../src/BeOS/CreatePCIDrivers/hexconv.cpp | 34 - SheepShaver/src/BeOS/Makefile | 117 - SheepShaver/src/BeOS/NetPeek/Makefile | 110 - SheepShaver/src/BeOS/NetPeek/NetPeek.cpp | 49 - SheepShaver/src/BeOS/SaveROM/Makefile | 110 - SheepShaver/src/BeOS/SaveROM/README | 8 - SheepShaver/src/BeOS/SaveROM/SaveROM.cpp | 128 -- SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc | Bin 4323 -> 0 bytes SheepShaver/src/BeOS/SheepDriver | 1 - SheepShaver/src/BeOS/SheepNet | 1 - SheepShaver/src/BeOS/SheepShaver.rsrc | Bin 4247 -> 0 bytes SheepShaver/src/BeOS/about_window_beos.cpp | 289 --- SheepShaver/src/BeOS/audio_beos.cpp | 1 - SheepShaver/src/BeOS/clip_beos.cpp | 374 --- SheepShaver/src/BeOS/ether_beos.cpp | 400 ---- SheepShaver/src/BeOS/extfs_beos.cpp | 1 - SheepShaver/src/BeOS/main_beos.cpp | 2015 ----------------- SheepShaver/src/BeOS/prefs_beos.cpp | 112 - SheepShaver/src/BeOS/prefs_editor_beos.cpp | 877 ------- SheepShaver/src/BeOS/scsi_beos.cpp | 1 - SheepShaver/src/BeOS/serial_beos.cpp | 1 - SheepShaver/src/BeOS/sys_beos.cpp | 1 - SheepShaver/src/BeOS/sysdeps.h | 74 - SheepShaver/src/BeOS/timer_beos.cpp | 1 - SheepShaver/src/BeOS/user_strings_beos.cpp | 73 - SheepShaver/src/BeOS/user_strings_beos.h | 37 - SheepShaver/src/BeOS/video_beos.cpp | 787 ------- SheepShaver/src/BeOS/video_screen.h | 262 --- SheepShaver/src/BeOS/video_window.h | 523 ----- SheepShaver/src/BeOS/xpram_beos.cpp | 1 - SheepShaver/src/Unix/main_unix.cpp | 32 +- SheepShaver/src/include/main.h | 4 - SheepShaver/src/include/prefs_editor.h | 4 - SheepShaver/src/rsrc_patches.cpp | 285 +-- SheepShaver/src/thunks.cpp | 6 - SheepShaver/src/user_strings.cpp | 4 - SheepShaver/src/video.cpp | 32 +- 114 files changed, 53 insertions(+), 27184 deletions(-) delete mode 100644 BasiliskII/src/AmigaOS/BasiliskII.info delete mode 100644 BasiliskII/src/AmigaOS/Makefile delete mode 100644 BasiliskII/src/AmigaOS/asm_support.asm delete mode 100644 BasiliskII/src/AmigaOS/audio_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/clip_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/ether_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/extfs_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/main_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/prefs_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/scsi_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/serial_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/sys_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/sysdeps.h delete mode 100644 BasiliskII/src/AmigaOS/timer_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/user_strings_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/user_strings_amiga.h delete mode 100644 BasiliskII/src/AmigaOS/video_amiga.cpp delete mode 100644 BasiliskII/src/AmigaOS/xpram_amiga.cpp delete mode 100644 BasiliskII/src/BeOS/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepDriver/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepDriver/sheep_driver.c delete mode 100644 BasiliskII/src/BeOS/SheepDriver/sheep_driver.h delete mode 100644 BasiliskII/src/BeOS/SheepNet/Makefile delete mode 100644 BasiliskII/src/BeOS/SheepNet/sheep_net.cpp delete mode 100644 BasiliskII/src/BeOS/SheepNet/sheep_net.h delete mode 100644 BasiliskII/src/BeOS/about_window.cpp delete mode 100644 BasiliskII/src/BeOS/about_window.h delete mode 100644 BasiliskII/src/BeOS/audio_beos.cpp delete mode 100644 BasiliskII/src/BeOS/clip_beos.cpp delete mode 100644 BasiliskII/src/BeOS/ether_beos.cpp delete mode 100644 BasiliskII/src/BeOS/extfs_beos.cpp delete mode 100644 BasiliskII/src/BeOS/main_beos.cpp delete mode 100644 BasiliskII/src/BeOS/prefs_beos.cpp delete mode 100644 BasiliskII/src/BeOS/prefs_editor_beos.cpp delete mode 100644 BasiliskII/src/BeOS/scsi_beos.cpp delete mode 100644 BasiliskII/src/BeOS/serial_beos.cpp delete mode 100644 BasiliskII/src/BeOS/sys_beos.cpp delete mode 100644 BasiliskII/src/BeOS/sysdeps.h delete mode 100644 BasiliskII/src/BeOS/timer_beos.cpp delete mode 100644 BasiliskII/src/BeOS/user_strings_beos.cpp delete mode 100644 BasiliskII/src/BeOS/user_strings_beos.h delete mode 100644 BasiliskII/src/BeOS/video_beos.cpp delete mode 100644 BasiliskII/src/BeOS/xpram_beos.cpp delete mode 100644 BasiliskII/src/powerrom_cpu/cpu_emulation.h delete mode 100644 BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp delete mode 100644 SheepShaver/doc/BeOS/acknowledgements.html delete mode 100644 SheepShaver/doc/BeOS/contact.html delete mode 100644 SheepShaver/doc/BeOS/graphics.gif delete mode 100644 SheepShaver/doc/BeOS/history.html delete mode 100644 SheepShaver/doc/BeOS/icon.gif delete mode 100644 SheepShaver/doc/BeOS/iconsmall.gif delete mode 100644 SheepShaver/doc/BeOS/index.html delete mode 100644 SheepShaver/doc/BeOS/installation.html delete mode 100644 SheepShaver/doc/BeOS/introduction.html delete mode 100644 SheepShaver/doc/BeOS/memory.gif delete mode 100644 SheepShaver/doc/BeOS/quickstart.html delete mode 100644 SheepShaver/doc/BeOS/serial.gif delete mode 100644 SheepShaver/doc/BeOS/settings.html delete mode 100644 SheepShaver/doc/BeOS/troubleshooting.html delete mode 100644 SheepShaver/doc/BeOS/using.html delete mode 100644 SheepShaver/doc/BeOS/volumes.gif delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Makefile delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp delete mode 100644 SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp delete mode 100644 SheepShaver/src/BeOS/Makefile delete mode 100644 SheepShaver/src/BeOS/NetPeek/Makefile delete mode 100644 SheepShaver/src/BeOS/NetPeek/NetPeek.cpp delete mode 100644 SheepShaver/src/BeOS/SaveROM/Makefile delete mode 100644 SheepShaver/src/BeOS/SaveROM/README delete mode 100644 SheepShaver/src/BeOS/SaveROM/SaveROM.cpp delete mode 100644 SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc delete mode 120000 SheepShaver/src/BeOS/SheepDriver delete mode 120000 SheepShaver/src/BeOS/SheepNet delete mode 100644 SheepShaver/src/BeOS/SheepShaver.rsrc delete mode 100644 SheepShaver/src/BeOS/about_window_beos.cpp delete mode 120000 SheepShaver/src/BeOS/audio_beos.cpp delete mode 100644 SheepShaver/src/BeOS/clip_beos.cpp delete mode 100644 SheepShaver/src/BeOS/ether_beos.cpp delete mode 120000 SheepShaver/src/BeOS/extfs_beos.cpp delete mode 100644 SheepShaver/src/BeOS/main_beos.cpp delete mode 100644 SheepShaver/src/BeOS/prefs_beos.cpp delete mode 100644 SheepShaver/src/BeOS/prefs_editor_beos.cpp delete mode 120000 SheepShaver/src/BeOS/scsi_beos.cpp delete mode 120000 SheepShaver/src/BeOS/serial_beos.cpp delete mode 120000 SheepShaver/src/BeOS/sys_beos.cpp delete mode 100644 SheepShaver/src/BeOS/sysdeps.h delete mode 120000 SheepShaver/src/BeOS/timer_beos.cpp delete mode 100644 SheepShaver/src/BeOS/user_strings_beos.cpp delete mode 100644 SheepShaver/src/BeOS/user_strings_beos.h delete mode 100644 SheepShaver/src/BeOS/video_beos.cpp delete mode 100644 SheepShaver/src/BeOS/video_screen.h delete mode 100644 SheepShaver/src/BeOS/video_window.h delete mode 120000 SheepShaver/src/BeOS/xpram_beos.cpp diff --git a/BasiliskII/BasiliskII.spec b/BasiliskII/BasiliskII.spec index 291de26ce..85626e899 100644 --- a/BasiliskII/BasiliskII.spec +++ b/BasiliskII/BasiliskII.spec @@ -39,8 +39,7 @@ Some features of Basilisk II: - Serial drivers - SCSI Manager (old-style) emulation - Emulates extended ADB keyboard and 3-button mouse - - Uses UAE 68k emulation or (under AmigaOS and NetBSD/m68k) real 68k - processor + - Uses UAE 68k emulation or real 68k processor %prep %setup -q diff --git a/BasiliskII/Makefile b/BasiliskII/Makefile index d13e26f62..617b23f82 100644 --- a/BasiliskII/Makefile +++ b/BasiliskII/Makefile @@ -6,9 +6,6 @@ RELEASE := $(shell sed lL)!H zOgTlVEbpgEJNHUyMe0OD%t*9^f=_yPqPojE`pI61M@}MvT;kWig9(_VbOmslN~ZyASz=ySkK5WItaO2t)t? diff --git a/BasiliskII/src/AmigaOS/Makefile b/BasiliskII/src/AmigaOS/Makefile deleted file mode 100644 index 2ccaeec03..000000000 --- a/BasiliskII/src/AmigaOS/Makefile +++ /dev/null @@ -1,64 +0,0 @@ -# AmigaOS makefile for Basilisk II (GeekGadgets tool chain) - -## System specific configuration -CC = gcc -CXX = c++ -CXXFLAGS = -g -O1 -noixemul -m68020 -msmall-code -Wno-multichar -CPPFLAGS = -I../include -I../native_cpu -I. -DEFS = -LDFLAGS = -noixemul -LIBS = /gg/lib/libnix/swapstack.o -AS = PhxAss -ASFLAGS = OPT ! INCPATH GG:os-include FPU=1 - -## Files -SRCS = ../main.cpp main_amiga.cpp ../prefs.cpp ../prefs_items.cpp \ - prefs_amiga.cpp prefs_editor_amiga.cpp sys_amiga.cpp ../rom_patches.cpp \ - ../slot_rom.cpp ../rsrc_patches.cpp ../emul_op.cpp \ - ../macos_util.cpp ../xpram.cpp xpram_amiga.cpp ../timer.cpp \ - timer_amiga.cpp clip_amiga.cpp ../adb.cpp ../serial.cpp \ - serial_amiga.cpp ../ether.cpp ether_amiga.cpp ../sony.cpp ../disk.cpp \ - ../cdrom.cpp ../scsi.cpp scsi_amiga.cpp ../video.cpp video_amiga.cpp \ - ../audio.cpp audio_amiga.cpp ../extfs.cpp extfs_amiga.cpp \ - ../user_strings.cpp user_strings_amiga.cpp asm_support.asm -APP = BasiliskII - -## Rules -.PHONY: clean distclean -.SUFFIXES: -.SUFFIXES: .c .cpp .asm .o .h - -all: $(APP) - -OBJ_DIR = obj -$(OBJ_DIR):: - @[ -d $(OBJ_DIR) ] || mkdir $(OBJ_DIR) > /dev/null 2>&1 - -define SRCS_LIST_TO_OBJS - $(addprefix $(OBJ_DIR)/, $(addsuffix .o, $(foreach file, $(SRCS), \ - $(basename $(notdir $(file)))))) -endef -OBJS = $(SRCS_LIST_TO_OBJS) - -SRC_PATHS += $(sort $(foreach file, $(SRCS), $(dir $(file)))) -VPATH := -VPATH += $(addprefix :, $(subst ,:, $(filter-out $($(subst, :, ,$(VPATH))), $(SRC_PATHS)))) - -$(APP): $(OBJ_DIR) $(OBJS) - $(CXX) -o $(APP) $(LDFLAGS) $(LIBS) $(OBJS) - -clean: - rm -f $(APP) $(OBJ_DIR)/* *~ *.bak obj.0000.* - -distclean: clean - rm -rf $(OBJ_DIR) - -$(OBJ_DIR)/%.o : %.cpp - $(CXX) $(CPPFLAGS) $(DEFS) $(CXXFLAGS) -c $< -o $@ -$(OBJ_DIR)/%.o : %.asm - $(AS) $(ASFLAGS) $< TO $(OBJ_DIR)/$*.obj - hunk2aout $(OBJ_DIR)/$*.obj >/dev/null - mv obj.0000.* $@ - -#------------------------------------------------------------------------- -# DO NOT DELETE THIS LINE -- make depend depends on it. diff --git a/BasiliskII/src/AmigaOS/asm_support.asm b/BasiliskII/src/AmigaOS/asm_support.asm deleted file mode 100644 index d2a81b076..000000000 --- a/BasiliskII/src/AmigaOS/asm_support.asm +++ /dev/null @@ -1,1393 +0,0 @@ -* -* asm_support.asm - AmigaOS utility functions in assembly language -* -* Basilisk II (C) 1997-2001 Christian Bauer -* -* 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 -* - -DEBUG_DETAIL SET 1 - - INCLUDE "exec/types.i" - INCLUDE "exec/macros.i" - INCLUDE "exec/memory.i" - INCLUDE "exec/tasks.i" - INCLUDE "dos/dos.i" - INCLUDE "devices/timer.i" - -; INCLUDE "asmsupp.i" - - XDEF _AtomicAnd - XDEF _AtomicOr - XDEF _MoveVBR - XDEF _DisableSuperBypass - XDEF _Execute68k - XDEF _Execute68kTrap - XDEF _TrapHandlerAsm - XDEF _ExceptionHandlerAsm - XDEF _AsmTriggerNMI - - XREF _OldTrapHandler - XREF _OldExceptionHandler - XREF _IllInstrHandler - XREF _PrivViolHandler - XREF _EmulatedSR - XREF _IRQSigMask - XREF _InterruptFlags - XREF _MainTask - XREF _SysBase - XREF _quit_emulator - -INFO_LEVEL equ 0 - - SECTION text,CODE - - MACHINE 68020 - - IFGE INFO_LEVEL -subSysName: dc.b '+',0 - ENDIF - -* -* Atomic bit operations (don't trust the compiler) -* - -_AtomicAnd move.l 4(sp),a0 - move.l 8(sp),d0 - and.l d0,(a0) - rts - -_AtomicOr move.l 4(sp),a0 - move.l 8(sp),d0 - or.l d0,(a0) - rts - -* -* Move VBR away from 0 if neccessary -* - -_MoveVBR movem.l d0-d1/a0-a1/a5-a6,-(sp) - move.l _SysBase,a6 - - lea getvbr,a5 ;VBR at 0? - JSRLIB Supervisor - tst.l d0 - bne.s 1$ - - move.l #$400,d0 ;Yes, allocate memory for new table - move.l #MEMF_PUBLIC,d1 - JSRLIB AllocMem - tst.l d0 - beq.s 1$ - - JSRLIB Disable - - move.l d0,a5 ;Copy old table - move.l d0,a1 - sub.l a0,a0 - move.l #$400,d0 - JSRLIB CopyMem - JSRLIB CacheClearU - - move.l a5,d0 ;Set VBR - lea setvbr,a5 - JSRLIB Supervisor - - JSRLIB Enable - -1$ movem.l (sp)+,d0-d1/a0-a1/a5-a6 - rts - -getvbr movec vbr,d0 - rte - -setvbr movec d0,vbr - rte - -* -* Disable 68060 Super Bypass mode -* - -_DisableSuperBypass - movem.l d0-d1/a0-a1/a5-a6,-(sp) - move.l _SysBase,a6 - - lea dissb,a5 - JSRLIB Supervisor - - movem.l (sp)+,d0-d1/a0-a1/a5-a6 - rts - - MACHINE 68060 - -dissb movec pcr,d0 - bset #5,d0 - movec d0,pcr - rte - - MACHINE 68020 - -* -* Execute 68k subroutine (must be ended with rts) -* r->a[7] and r->sr are unused! -* - -; void Execute68k(uint32 addr, M68kRegisters *r); -_Execute68k - move.l 4(sp),d0 ;Get arguments - move.l 8(sp),a0 - - movem.l d2-d7/a2-a6,-(sp) ;Save registers - - move.l a0,-(sp) ;Push pointer to M68kRegisters on stack - pea 1$ ;Push return address on stack - move.l d0,-(sp) ;Push pointer to 68k routine on stack - movem.l (a0),d0-d7/a0-a6 ;Load registers from M68kRegisters - - rts ;Jump into 68k routine - -1$ move.l a6,-(sp) ;Save a6 - move.l 4(sp),a6 ;Get pointer to M68kRegisters - movem.l d0-d7/a0-a5,(a6) ;Save d0-d7/a0-a5 to M68kRegisters - move.l (sp)+,56(a6) ;Save a6 to M68kRegisters - addq.l #4,sp ;Remove pointer from stack - - movem.l (sp)+,d2-d7/a2-a6 ;Restore registers - rts - -* -* Execute MacOS 68k trap -* r->a[7] and r->sr are unused! -* - -; void Execute68kTrap(uint16 trap, M68kRegisters *r); -_Execute68kTrap - move.l 4(sp),d0 ;Get arguments - move.l 8(sp),a0 - - movem.l d2-d7/a2-a6,-(sp) ;Save registers - - move.l a0,-(sp) ;Push pointer to M68kRegisters on stack - move.w d0,-(sp) ;Push trap word on stack - subq.l #8,sp ;Create fake A-Line exception frame - movem.l (a0),d0-d7/a0-a6 ;Load registers from M68kRegisters - - move.l a2,-(sp) ;Save a2 and d2 - move.l d2,-(sp) - lea 1$,a2 ;a2 points to return address - move.w 16(sp),d2 ;Load trap word into d2 - - jmp ([$28.w],10) ;Jump into MacOS A-Line handler - -1$ move.l a6,-(sp) ;Save a6 - move.l 6(sp),a6 ;Get pointer to M68kRegisters - movem.l d0-d7/a0-a5,(a6) ;Save d0-d7/a0-a5 to M68kRegisters - move.l (sp)+,56(a6) ;Save a6 to M68kRegisters - addq.l #6,sp ;Remove pointer and trap word from stack - - movem.l (sp)+,d2-d7/a2-a6 ;Restore registers - rts - -* -* Exception handler of main task (for interrupts) -* - -_ExceptionHandlerAsm - move.l d0,-(sp) ;Save d0 - - and.l #SIGBREAKF_CTRL_C,d0 ;CTRL-C? - bne.s 2$ - - move.w _EmulatedSR,d0 ;Interrupts enabled in emulated SR? - and.w #$0700,d0 - bne 1$ - move.w #$0064,-(sp) ;Yes, fake interrupt stack frame - pea 1$ - move.w _EmulatedSR,d0 - move.w d0,-(sp) - or.w #$2100,d0 ;Set interrupt level in SR, enter (virtual) supervisor mode - move.w d0,_EmulatedSR - move.l $64.w,-(sp) ;Jump to MacOS interrupt handler - rts - -1$ move.l (sp)+,d0 ;Restore d0 - rts - -2$ JSRLIB Forbid ;Waiting for Dos signal? - sub.l a1,a1 - JSRLIB FindTask - move.l d0,a0 - move.l TC_SIGWAIT(a0),d0 - move.l TC_SIGRECVD(a0),d1 - JSRLIB Permit - btst #SIGB_DOS,d0 - beq 3$ - btst #SIGB_DOS,d1 - bne 4$ - -3$ lea TC_SIZE(a0),a0 ;No, remove pending Dos packets - JSRLIB GetMsg - - move.w _EmulatedSR,d0 - or.w #$0700,d0 ;Disable all interrupts - move.w d0,_EmulatedSR - moveq #0,d0 ;Disable all exception signals - moveq #-1,d1 - JSRLIB SetExcept - jsr _quit_emulator ;CTRL-C, quit emulator -4$ move.l (sp)+,d0 - rts - -* -* Trap handler of main task -* - -_TrapHandlerAsm: - IFEQ INFO_LEVEL-1002 - move.w ([6,a0]),-(sp) - move.w #0,-(sp) - move.l (4+6,a0),-(sp) - PUTMSG 0,'%s/TrapHandlerAsm: addr=%08lx opcode=%04lx' - lea (2*4,sp),sp - ENDC - - cmp.l #4,(sp) ;Illegal instruction? - beq.s doillinstr - cmp.l #10,(sp) ;A-Line exception? - beq.s doaline - cmp.l #8,(sp) ;Privilege violation? - beq.s doprivviol - - cmp.l #9,(sp) ;Trace? - beq dotrace - cmp.l #3,(sp) ;Illegal Address? - beq.s doilladdr - cmp.l #11,(sp) ;F-Line exception - beq.s dofline - - cmp.l #32,(sp) - blt 1$ - cmp.l #47,(sp) - ble doTrapXX ; Vector 32-47 : TRAP #0 - 15 Instruction Vectors - -1$: - cmp.l #48,(sp) - blt 2$ - cmp.l #55,(sp) - ble doTrapFPU -2$: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/TrapHandlerAsm: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l _OldTrapHandler,-(sp) ;No, jump to old trap handler - rts - -* -* TRAP #0 - 15 Instruction Vectors -* - -doTrapXX: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/doTrapXX: stack=%08lx %08lx %08lx %08lx' - ENDC - - movem.l a0/d0,-(sp) ;Save a0,d0 - move.l (2*4,sp),d0 ;vector number 32-47 - - move.l usp,a0 ;Get user stack pointer - move.l (4*4,sp),-(a0) ;Copy 4-word stack frame to user stack - move.l (3*4,sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - - lsl.l #2,d0 ;convert vector number to vector offset - move.l d0,a0 - move.l (a0),d0 ;get mac trap vector - - move.l usp,a0 ;Get user stack pointer - move.l d0,-(a0) ;store vector offset as return address - move.l a0,usp ;Update USP - - movem.l (sp)+,a0/d0 ;Restore a0,d0 - addq.l #4*2,sp ;Remove exception frame from supervisor stack - - andi #$d8ff,sr ;Switch to user mode, enable interrupts - rts - - -* -* FPU Exception Instruction Vectors -* - -doTrapFPU: - move.l d0,(sp) - fmove.l fpcr,d0 - and.w #$00ff,d0 ;disable FPU exceptions - fmove.l d0,fpcr - move.l (sp)+,d0 ;Restore d0 - rte - - -* -* trace Vector -* - -dotrace - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/dotrace: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - - IFEQ INFO_LEVEL-1009 - move.l (12,a0),-(sp) - move.l (8,a0),-(sp) - move.l (4,a0),-(sp) - move.l (0,a0),-(sp) - move.l a0,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/dotrace: sp=%08lx usp=%08lx (%08lx %08lx %08lx %08lx)' - lea (6*4,sp),sp - ENDC - - move.l 3*4(sp),-(a0) ;Copy 6-word stack frame to user stack - move.l 2*4(sp),-(a0) - move.l 1*4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - lea 6*2(sp),sp ;Remove exception frame from supervisor stack - andi #$18ff,sr ;Switch to user mode, enable interrupts, disable trace - - move.l $24.w,-(sp) ;Jump to MacOS exception handler - rts - - -* -* A-Line handler: call MacOS A-Line handler -* - -doaline move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - addq.l #8,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - -; and.w #$f8ff,_EmulatedSR ;enable interrupts in EmulatedSR - - move.l $28.w,-(sp) ;Jump to MacOS exception handler - rts - -* -* F-Line handler: call F-Line exception handler -* - -dofline move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - addq.l #8,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - and.w #$f8ff,_EmulatedSR ;enable interrupts in EmulatedSR - - move.l $2c.w,-(sp) ;Jump to MacOS exception handler - rts - -* -* Illegal address handler -* - -doilladdr: - IFEQ INFO_LEVEL-1009 - PUTMSG 0,'%s/doilladdr: stack=%08lx %08lx %08lx %08lx' - ENDC - - move.l a0,(sp) ;Save a0 - - move.l usp,a0 ;Get user stack pointer - move.l 3*4(sp),-(a0) ;Copy 6-word stack frame to user stack - move.l 2*4(sp),-(a0) - move.l 1*4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - lea 6*2(sp),sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l $0c.w,-(sp) ;Jump to MacOS exception handler - rts - - -* -* Illegal instruction handler: call IllInstrHandler() (which calls EmulOp()) -* to execute extended opcodes (see emul_op.h) -* - -doillinstr movem.l a0/d0,-(sp) - move.w ([6+2*4,sp]),d0 - and.w #$ff00,d0 - cmp.w #$7100,d0 - - IFEQ INFO_LEVEL-1009 - move.l d0,-(sp) - PUTMSG 0,'%s/doillinst: d0=%08lx stack=%08lx %08lx %08lx %08lx' - lea (1*4,sp),sp - ENDC - movem.l (sp)+,a0/d0 - beq 1$ - - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l 8(sp),-(a0) ;Copy stack frame to user stack - move.l 4(sp),-(a0) - move.l a0,usp ;Update USP - or.w #$2000,(a0) ;set Supervisor bit in SR - move.l (sp)+,a0 ;Restore a0 - - add.w #3*4,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l $10.w,-(sp) ;Jump to MacOS exception handler - rts - -1$: - move.l a6,(sp) ;Save a6 - move.l usp,a6 ;Get user stack pointer - - move.l a6,-10(a6) ;Push USP (a7) - move.l 6(sp),-(a6) ;Push PC - move.w 4(sp),-(a6) ;Push SR - subq.l #4,a6 ;Skip saved USP - move.l (sp),-(a6) ;Push old a6 - movem.l d0-d7/a0-a5,-(a6) ;Push remaining registers - move.l a6,usp ;Update USP - - add.w #12,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l a6,-(sp) ;Jump to IllInstrHandler() in main.cpp - jsr _IllInstrHandler - addq.l #4,sp - - movem.l (sp)+,d0-d7/a0-a6 ;Restore registers - addq.l #4,sp ;Skip saved USP (!!) - rtr ;Return from exception - -* -* Privilege violation handler: MacOS runs in supervisor mode, -* so we have to emulate certain privileged instructions -* - -doprivviol move.l d0,(sp) ;Save d0 - move.w ([6,sp]),d0 ;Get instruction word - - IFEQ INFO_LEVEL-1001 - move.w ([6,a0]),-(sp) - move.w #0,-(sp) - PUTMSG 0,'%s/doprivviol: opcode=%04lx' - lea (1*4,sp),sp - ENDC - - cmp.w #$40e7,d0 ;move sr,-(sp)? - beq pushsr - cmp.w #$46df,d0 ;move (sp)+,sr? - beq popsr - - cmp.w #$007c,d0 ;ori #xxxx,sr? - beq orisr - cmp.w #$027c,d0 ;andi #xxxx,sr? - beq andisr - - cmp.w #$46fc,d0 ;move #xxxx,sr? - beq movetosrimm - - cmp.w #$46ef,d0 ;move (xxxx,sp),sr? - beq movetosrsprel - cmp.w #$46d8,d0 ;move (a0)+,sr? - beq movetosra0p - cmp.w #$46d9,d0 ;move (a1)+,sr? - beq movetosra1p - - cmp.w #$40f8,d0 ;move sr,xxxx.w? - beq movefromsrabs - cmp.w #$40d0,d0 ;move sr,(a0)? - beq movefromsra0 - cmp.w #$40d7,d0 ;move sr,(sp)? - beq movefromsrsp - - cmp.w #$f327,d0 ;fsave -(sp)? - beq fsavepush - cmp.w #$f35f,d0 ;frestore (sp)+? - beq frestorepop - cmp.w #$f32d,d0 ;fsave xxx(a5) ? - beq fsavea5 - cmp.w #$f36d,d0 ;frestore xxx(a5) ? - beq frestorea5 - - cmp.w #$4e73,d0 ;rte? - beq pvrte - - cmp.w #$40c0,d0 ;move sr,d0? - beq movefromsrd0 - cmp.w #$40c1,d0 ;move sr,d1? - beq movefromsrd1 - cmp.w #$40c2,d0 ;move sr,d2? - beq movefromsrd2 - cmp.w #$40c3,d0 ;move sr,d3? - beq movefromsrd3 - cmp.w #$40c4,d0 ;move sr,d4? - beq movefromsrd4 - cmp.w #$40c5,d0 ;move sr,d5? - beq movefromsrd5 - cmp.w #$40c6,d0 ;move sr,d6? - beq movefromsrd6 - cmp.w #$40c7,d0 ;move sr,d7? - beq movefromsrd7 - - cmp.w #$46c0,d0 ;move d0,sr? - beq movetosrd0 - cmp.w #$46c1,d0 ;move d1,sr? - beq movetosrd1 - cmp.w #$46c2,d0 ;move d2,sr? - beq movetosrd2 - cmp.w #$46c3,d0 ;move d3,sr? - beq movetosrd3 - cmp.w #$46c4,d0 ;move d4,sr? - beq movetosrd4 - cmp.w #$46c5,d0 ;move d5,sr? - beq movetosrd5 - cmp.w #$46c6,d0 ;move d6,sr? - beq movetosrd6 - cmp.w #$46c7,d0 ;move d7,sr? - beq movetosrd7 - - cmp.w #$4e7a,d0 ;movec cr,x? - beq movecfromcr - cmp.w #$4e7b,d0 ;movec x,cr? - beq movectocr - - cmp.w #$f478,d0 ;cpusha dc? - beq cpushadc - cmp.w #$f4f8,d0 ;cpusha dc/ic? - beq cpushadcic - - cmp.w #$4e69,d0 ;move usp,a1 - beq moveuspa1 - cmp.w #$4e68,d0 ;move usp,a0 - beq moveuspa0 - - cmp.w #$4e61,d0 ;move a1,usp - beq moved1usp - -pv_unhandled move.l (sp),d0 ;Unhandled instruction, jump to handler in main.cpp - move.l a6,(sp) ;Save a6 - move.l usp,a6 ;Get user stack pointer - - move.l a6,-10(a6) ;Push USP (a7) - move.l 6(sp),-(a6) ;Push PC - move.w 4(sp),-(a6) ;Push SR - subq.l #4,a6 ;Skip saved USP - move.l (sp),-(a6) ;Push old a6 - movem.l d0-d7/a0-a5,-(a6) ;Push remaining registers - move.l a6,usp ;Update USP - - add.w #12,sp ;Remove exception frame from supervisor stack - andi #$d8ff,sr ;Switch to user mode, enable interrupts - - move.l a6,-(sp) ;Jump to PrivViolHandler() in main.cpp - jsr _PrivViolHandler - addq.l #4,sp - - movem.l (sp)+,d0-d7/a0-a6 ;Restore registers - addq.l #4,sp ;Skip saved USP - rtr ;Return from exception - -; move sr,-(sp) -pushsr move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w 8(sp),d0 ;Get CCR from exception stack frame - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,-(a0) ;Store SR on user stack - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move (sp)+,sr -popsr move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w (a0)+,d0 ;Get SR from user stack - move.w d0,8(sp) ;Store into CCR on exception stack frame - and.w #$00ff,8(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne 1$ - tst.l _InterruptFlags - beq 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; ori #xxxx,sr -orisr move.w 4(sp),d0 ;Get CCR from stack - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - or.w ([6,sp],2),d0 ;Or with immediate value - move.w d0,4(sp) ;Store into CCR on stack - and.w #$00ff,4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; andi #xxxx,sr -andisr move.w 4(sp),d0 ;Get CCR from stack - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - and.w ([6,sp],2),d0 ;And with immediate value -storesr4 move.w d0,4(sp) ;Store into CCR on stack - and.w #$00ff,4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne.s 1$ - tst.l _InterruptFlags - beq.s 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move #xxxx,sr -movetosrimm move.w ([6,sp],2),d0 ;Get immediate value - bra.s storesr4 - -; move (xxxx,sp),sr -movetosrsprel move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w ([10,sp],2),d0 ;Get offset - move.w (a0,d0.w),d0 ;Read word - move.l (sp)+,a0 ;Restore a0 - bra.s storesr4 - -; move (a0)+,sr -movetosra0p move.w (a0)+,d0 ;Read word - bra storesr2 - -; move (a1)+,sr -movetosra1p move.w (a1)+,d0 ;Read word - bra storesr2 - -; move sr,xxxx.w -movefromsrabs move.l a0,-(sp) ;Save a0 - move.w ([10,sp],2),a0 ;Get address - move.w 8(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move sr,(a0) -movefromsra0 move.w 4(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move sr,(sp) -movefromsrsp move.l a0,-(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.w 8(sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - move.w d0,(a0) ;Store SR - move.l (sp)+,a0 ;Restore a0 - move.l (sp)+,d0 ;Restore d0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; fsave -(sp) -fsavepush move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - move.l #$41000000,-(a0) ;Push idle frame - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; fsave xxx(a5) -fsavea5 move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l a5,a0 ;Get base register - add.w ([6,sp],2),a0 ;Add offset to base register - move.l #$41000000,(a0) ;Push idle frame - move.l (sp)+,a0 ;Restore a0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; frestore (sp)+ -frestorepop move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l usp,a0 ;Get user stack pointer - addq.l #4,a0 ;Nothing to do... - move.l a0,usp ;Update USP - move.l (sp)+,a0 ;Restore a0 - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; frestore xxx(a5) -frestorea5 move.l (sp),d0 ;Restore d0 - move.l a0,(sp) ;Save a0 - move.l (sp)+,a0 ;Restore a0 - addq.l #4,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; rte -pvrte movem.l a0/a1,-(sp) ;Save a0 and a1 - move.l usp,a0 ;Get user stack pointer - - move.w (a0)+,d0 ;Get SR from user stack - move.w d0,8+4(sp) ;Store into CCR on exception stack frame - and.w #$c0ff,8+4(sp) - and.w #$e700,d0 ;Extract supervisor bits - move.w d0,_EmulatedSR ;And save them - move.l (a0)+,10+4(sp) ;Store return address in exception stack frame - - move.w (a0)+,d0 ;get format word - lsr.w #7,d0 ;get stack frame Id - lsr.w #4,d0 - and.w #$001e,d0 - move.w (StackFormatTable,pc,d0.w),d0 ; get total stack frame length - subq.w #4,d0 ; count only extra words - lea 16+4(sp),a1 ; destination address (in supervisor stack) - bra 1$ - -2$ move.w (a0)+,(a1)+ ; copy additional stack words back to supervisor stack -1$ dbf d0,2$ - - move.l a0,usp ;Update USP - movem.l (sp)+,a0/a1 ;Restore a0 and a1 - move.l (sp)+,d0 ;Restore d0 - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; sizes of exceptions stack frames -StackFormatTable: - dc.w 4 ; Four-word stack frame, format $0 - dc.w 4 ; Throwaway four-word stack frame, format $1 - dc.w 6 ; Six-word stack frame, format $2 - dc.w 6 ; MC68040 floating-point post-instruction stack frame, format $3 - dc.w 8 ; MC68EC040 and MC68LC040 floating-point unimplemented stack frame, format $4 - dc.w 4 ; Format $5 - dc.w 4 ; Format $6 - dc.w 30 ; MC68040 access error stack frame, Format $7 - dc.w 29 ; MC68010 bus and address error stack frame, format $8 - dc.w 10 ; MC68020 and MC68030 coprocessor mid-instruction stack frame, format $9 - dc.w 16 ; MC68020 and MC68030 short bus cycle stack frame, format $a - dc.w 46 ; MC68020 and MC68030 long bus cycle stack frame, format $b - dc.w 12 ; CPU32 bus error for prefetches and operands stack frame, format $c - dc.w 4 ; Format $d - dc.w 4 ; Format $e - dc.w 4 ; Format $f - -; move sr,dx -movefromsrd0 addq.l #4,sp ;Skip saved d0 - moveq #0,d0 - move.w (sp),d0 ;Get CCR - or.w _EmulatedSR,d0 ;Add emulated supervisor bits - addq.l #2,2(sp) ;Skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd1 move.l (sp)+,d0 - moveq #0,d1 - move.w (sp),d1 - or.w _EmulatedSR,d1 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd2 move.l (sp)+,d0 - moveq #0,d2 - move.w (sp),d2 - or.w _EmulatedSR,d2 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd3 move.l (sp)+,d0 - moveq #0,d3 - move.w (sp),d3 - or.w _EmulatedSR,d3 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd4 move.l (sp)+,d0 - moveq #0,d4 - move.w (sp),d4 - or.w _EmulatedSR,d4 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd5 move.l (sp)+,d0 - moveq #0,d5 - move.w (sp),d5 - or.w _EmulatedSR,d5 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd6 move.l (sp)+,d0 - moveq #0,d6 - move.w (sp),d6 - or.w _EmulatedSR,d6 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movefromsrd7 move.l (sp)+,d0 - moveq #0,d7 - move.w (sp),d7 - or.w _EmulatedSR,d7 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; move dx,sr -movetosrd0 move.l (sp),d0 -storesr2 move.w d0,4(sp) - and.w #$00ff,4(sp) - and.w #$e700,d0 - move.w d0,_EmulatedSR - - and.w #$0700,d0 ;Rethrow exception if interrupts are pending and reenabled - bne.s 1$ - tst.l _InterruptFlags - beq.s 1$ - movem.l d0-d1/a0-a1/a6,-(sp) - move.l _SysBase,a6 - move.l _MainTask,a1 - move.l _IRQSigMask,d0 - JSRLIB Signal - movem.l (sp)+,d0-d1/a0-a1/a6 -1$ move.l (sp)+,d0 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movetosrd1 move.l d1,d0 - bra.s storesr2 - -movetosrd2 move.l d2,d0 - bra.s storesr2 - -movetosrd3 move.l d3,d0 - bra.s storesr2 - -movetosrd4 move.l d4,d0 - bra.s storesr2 - -movetosrd5 move.l d5,d0 - bra.s storesr2 - -movetosrd6 move.l d6,d0 - bra.s storesr2 - -movetosrd7 move.l d7,d0 - bra.s storesr2 - -; movec cr,x -movecfromcr move.w ([6,sp],2),d0 ;Get next instruction word - - cmp.w #$8801,d0 ;movec vbr,a0? - beq.s movecvbra0 - cmp.w #$9801,d0 ;movec vbr,a1? - beq.s movecvbra1 - cmp.w #$A801,d0 ;movec vbr,a2? - beq.s movecvbra2 - cmp.w #$1801,d0 ;movec vbr,d1? - beq movecvbrd1 - cmp.w #$0002,d0 ;movec cacr,d0? - beq.s moveccacrd0 - cmp.w #$1002,d0 ;movec cacr,d1? - beq.s moveccacrd1 - cmp.w #$0003,d0 ;movec tc,d0? - beq.s movectcd0 - cmp.w #$1003,d0 ;movec tc,d1? - beq.s movectcd1 - cmp.w #$1000,d0 ;movec sfc,d1? - beq movecsfcd1 - cmp.w #$1001,d0 ;movec dfc,d1? - beq movecdfcd1 - cmp.w #$0806,d0 ;movec urp,d0? - beq movecurpd0 - cmp.w #$0807,d0 ;movec srp,d0? - beq.s movecsrpd0 - cmp.w #$0004,d0 ;movec itt0,d0 - beq.s movecitt0d0 - cmp.w #$0005,d0 ;movec itt1,d0 - beq.s movecitt1d0 - cmp.w #$0006,d0 ;movec dtt0,d0 - beq.s movecdtt0d0 - cmp.w #$0007,d0 ;movec dtt1,d0 - beq.s movecdtt1d0 - - bra pv_unhandled - -; movec cacr,d0 -moveccacrd0 move.l (sp)+,d0 - move.l #$3111,d0 ;All caches and bursts on - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec cacr,d1 -moveccacrd1 move.l (sp)+,d0 - move.l #$3111,d1 ;All caches and bursts on - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a0 -movecvbra0 move.l (sp)+,d0 - sub.l a0,a0 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a1 -movecvbra1 move.l (sp)+,d0 - sub.l a1,a1 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,a2 -movecvbra2 move.l (sp)+,d0 - sub.l a2,a2 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec vbr,d1 -movecvbrd1 move.l (sp)+,d0 - moveq.l #0,d1 ;VBR always appears to be at 0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec tc,d0 -movectcd0 addq.l #4,sp - moveq #0,d0 ;MMU is always off - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec tc,d1 +jl+ -movectcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 ;MMU is always off - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec sfc,d1 +jl+ -movecsfcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec dfc,d1 +jl+ -movecdfcd1 move.l (sp)+,d0 ;Restore d0 - moveq #0,d1 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -movecurpd0 ; movec urp,d0 +jl+ -movecsrpd0 ; movec srp,d0 -movecitt0d0 ; movec itt0,d0 -movecitt1d0 ; movec itt1,d0 -movecdtt0d0 ; movec dtt0,d0 -movecdtt1d0 ; movec dtt1,d0 - addq.l #4,sp - moveq.l #0,d0 ;MMU is always off - addq.l #4,2(sp) ;skip instruction - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec x,cr -movectocr move.w ([6,sp],2),d0 ;Get next instruction word - - cmp.w #$0801,d0 ;movec d0,vbr? - beq.s movectovbr - cmp.w #$1801,d0 ;movec d1,vbr? - beq.s movectovbr - cmp.w #$A801,d0 ;movec a2,vbr? - beq.s movectovbr - cmp.w #$0002,d0 ;movec d0,cacr? - beq.s movectocacr - cmp.w #$1002,d0 ;movec d1,cacr? - beq.s movectocacr - cmp.w #$1000,d0 ;movec d1,sfc? - beq.s movectoxfc - cmp.w #$1001,d0 ;movec d1,dfc? - beq.s movectoxfc - - bra pv_unhandled - -; movec x,vbr -movectovbr move.l (sp)+,d0 ;Ignore moves to VBR - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec dx,cacr -movectocacr movem.l d1/a0-a1/a6,-(sp) ;Move to CACR, clear caches - move.l _SysBase,a6 - JSRLIB CacheClearU - movem.l (sp)+,d1/a0-a1/a6 - move.l (sp)+,d0 - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; movec x,sfc -; movec x,dfc -movectoxfc move.l (sp)+,d0 ;Ignore moves to SFC, DFC - addq.l #4,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; cpusha -cpushadc -cpushadcic - IFEQ INFO_LEVEL-1003 - move.l (4),-(sp) - move.l d0,-(sp) - PUTMSG 0,'%s/cpushadc: opcode=%04lx Execbase=%08lx' - lea (2*4,sp),sp - ENDC - movem.l d1/a0-a1/a6,-(sp) ;Clear caches - move.l _SysBase,a6 - JSRLIB CacheClearU - movem.l (sp)+,d1/a0-a1/a6 - move.l (sp)+,d0 - addq.l #2,2(sp) - rte - -; move usp,a1 +jl+ -moveuspa1 move.l (sp)+,d0 - move usp,a1 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1009 - move.l a1,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/moveuspa1: a7=%08lx a1=%08lx' - lea (2*4,sp),sp - ENDC - - rte - -; move usp,a0 +jl+ -moveuspa0 move.l (sp)+,d0 - move usp,a0 - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1009 - move.l a0,-(sp) - move.l a7,-(sp) - PUTMSG 0,'%s/moveuspa0: a7=%08lx a0=%08lx' - lea (2*4,sp),sp - ENDC - - rte - -; move a1,usp +jl+ -moved1usp move.l (sp)+,d0 - move a1,usp - addq.l #2,2(sp) - - IFEQ INFO_LEVEL-1001 - move.l (4),-(sp) - PUTMSG 0,'%s/doprivviol END: Execbase=%08lx' - lea (1*4,sp),sp - ENDC - rte - -; -; Trigger NMI (Pop up debugger) -; - -_AsmTriggerNMI move.l d0,-(sp) ;Save d0 - move.w #$007c,-(sp) ;Yes, fake NMI stack frame - pea 1$ - move.w _EmulatedSR,d0 - and.w #$f8ff,d0 ;Set interrupt level in SR - move.w d0,-(sp) - move.w d0,_EmulatedSR - - move.l $7c.w,-(sp) ;Jump to MacOS NMI handler - rts - -1$ move.l (sp)+,d0 ;Restore d0 - rts - - -CopyTrapStack: - movem.l d0/a0/a1,-(sp) - - move.w (5*4+6,sp),d0 ;get format word - lsr.w #7,d0 ;get stack frame Id - lsr.w #4,d0 - and.w #$001e,d0 - move.w (StackFormatTable,pc,d0.w),d0 ; get total stack frame length - - lea (5*4,sp),a0 ;get start of exception stack frame - move.l usp,a1 ;Get user stack pointer - bra 1$ - -2$ move.w (a0)+,(a1)+ ; copy additional stack words back to supervisor stack -1$ dbf d0,2$ - - move.l (3*4,sp),-(a0) ;copy return address to new top of stack - move.l a0,sp - rts - - END diff --git a/BasiliskII/src/AmigaOS/audio_amiga.cpp b/BasiliskII/src/AmigaOS/audio_amiga.cpp deleted file mode 100644 index 5c2643146..000000000 --- a/BasiliskII/src/AmigaOS/audio_amiga.cpp +++ /dev/null @@ -1,515 +0,0 @@ -/* - * audio_amiga.cpp - Audio support, AmigaOS implementation using AHI - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define D1(x) ; - - -// Global variables -static ULONG ahi_id = AHI_DEFAULT_ID; // AHI audio ID -static struct AHIAudioCtrl *ahi_ctrl = NULL; -static struct AHISampleInfo sample[2]; // Two sample infos for double-buffering -static struct Hook sf_hook; -static int play_buf = 0; // Number of currently played buffer -static long sound_buffer_size; // Size of one audio buffer in bytes -static int audio_block_fetched = 0; // Number of audio blocks fetched by interrupt routine - -static bool main_mute = false; -static bool speaker_mute = false; -static ULONG supports_volume_changes = false; -static ULONG supports_stereo_panning = false; -static ULONG current_main_volume; -static ULONG current_speaker_volume; - - -// Prototypes -static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/); -void audio_set_sample_rate_byval(uint32 value); -void audio_set_sample_size_byval(uint32 value); -void audio_set_channels_byval(uint32 value); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(int sample_rate_index) -{ - AudioStatus.sample_rate = audio_sample_rates[sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - sample[0].ahisi_Address = sample[1].ahisi_Address = NULL; - - // Init audio status and feature flags - audio_channel_counts.push_back(2); -// set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // AHI available? - if (AHIBase == NULL) { - WarningAlert(GetString(STR_NO_AHI_WARN)); - return; - } - - // Initialize callback hook - sf_hook.h_Entry = (HOOKFUNC)audio_callback; - - // Read "sound" preferences - const char *str = PrefsFindString("sound"); - if (str) - sscanf(str, "ahi/%08lx", &ahi_id); - - // Open audio control structure - if ((ahi_ctrl = AHI_AllocAudio( - AHIA_AudioID, ahi_id, - AHIA_MixFreq, AudioStatus.sample_rate >> 16, - AHIA_Channels, 1, - AHIA_Sounds, 2, - AHIA_SoundFunc, (ULONG)&sf_hook, - TAG_END)) == NULL) { - WarningAlert(GetString(STR_NO_AHI_CTRL_WARN)); - return; - } - - ULONG max_channels, sample_rate, frequencies, sample_rate_index; - - AHI_GetAudioAttrs(ahi_id, ahi_ctrl, - AHIDB_MaxChannels, (ULONG) &max_channels, - AHIDB_Frequencies, (ULONG) &frequencies, - TAG_END); - - D(bug("AudioInit: max_channels=%ld frequencies=%ld\n", max_channels, frequencies)); - - for (int n=0; n> 3) * AudioStatus.channels * audio_frames_per_block; - - // Prepare SampleInfos and load sounds (two sounds for double buffering) - sample[0].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S; - sample[0].ahisi_Length = audio_frames_per_block; - sample[0].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR); - sample[1].ahisi_Type = AudioStatus.sample_size == 16 ? AHIST_S16S : AHIST_S8S; - sample[1].ahisi_Length = audio_frames_per_block; - sample[1].ahisi_Address = AllocVec(sound_buffer_size, MEMF_PUBLIC | MEMF_CLEAR); - if (sample[0].ahisi_Address == NULL || sample[1].ahisi_Address == NULL) - return; - - AHI_LoadSound(0, AHIST_DYNAMICSAMPLE, &sample[0], ahi_ctrl); - AHI_LoadSound(1, AHIST_DYNAMICSAMPLE, &sample[1], ahi_ctrl); - - // Set parameters - play_buf = 0; - current_main_volume = current_speaker_volume = 0x10000; - AHI_SetVol(0, current_speaker_volume, 0x8000, ahi_ctrl, AHISF_IMM); - - AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, AHISF_IMM); - AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, AHISF_IMM); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Free everything - if (ahi_ctrl != NULL) { - AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END); - AHI_FreeAudio(ahi_ctrl); - } - - FreeVec(sample[0].ahisi_Address); - FreeVec(sample[1].ahisi_Address); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - AHI_ControlAudio(ahi_ctrl, AHIC_Play, TRUE, TAG_END); -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_END); -} - - -/* - * AHI sound callback, request next buffer - */ - -static __saveds __attribute__((regparm(3))) ULONG audio_callback(struct Hook *hook /*a0*/, struct AHISoundMessage *msg /*a1*/, struct AHIAudioCtrl *ahi_ctrl /*a2*/) -{ - play_buf ^= 1; - - // New buffer available? - if (audio_block_fetched) - { - audio_block_fetched--; - - if (main_mute || speaker_mute) - { - memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size); - } - else - { - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int32 sample_count = ReadMacInt32(apple_stream_info + scd_sampleCount); - - uint32 num_channels = ReadMacInt16(apple_stream_info + scd_numChannels); - uint32 sample_size = ReadMacInt16(apple_stream_info + scd_sampleSize); - uint32 sample_rate = ReadMacInt32(apple_stream_info + scd_sampleRate); - - D(bug("stream: sample_count=%ld num_channels=%ld sample_size=%ld sample_rate=%ld\n", sample_count, num_channels, sample_size, sample_rate >> 16)); - - // Yes, this can happen. - if(sample_count != 0) { - if(sample_rate != AudioStatus.sample_rate) { - audio_set_sample_rate_byval(sample_rate); - } - if(num_channels != AudioStatus.channels) { - audio_set_channels_byval(num_channels); - } - if(sample_size != AudioStatus.sample_size) { - audio_set_sample_size_byval(sample_size); - } - } - - if (sample_count < 0) - sample_count = 0; - - int work_size = sample_count * num_channels * (sample_size>>3); - D(bug("stream: work_size=%ld sound_buffer_size=%ld\n", work_size, sound_buffer_size)); - - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - - // Put data into AHI buffer (convert 8-bit data unsigned->signed) - if (AudioStatus.sample_size == 16) - Mac2Host_memcpy(sample[play_buf].ahisi_Address, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - else { - uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - uint32 *q = (uint32 *)sample[play_buf].ahisi_Address; - int r = work_size >> 2; - while (r--) - *q++ = *p++ ^ 0x80808080; - } - if (work_size != sound_buffer_size) - memset((uint8 *)sample[play_buf].ahisi_Address + work_size, 0, sound_buffer_size - work_size); - } - } - - } - else - memset(sample[play_buf].ahisi_Address, 0, sound_buffer_size); - - // Play next buffer - AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, 0); - - // Trigger audio interrupt to get new buffer - if (AudioStatus.num_sources) { - D1(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - } - return 0; -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D1(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D1(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - audio_block_fetched++; - D1(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -void audio_set_sample_rate_byval(uint32 value) -{ - bool changed = (AudioStatus.sample_rate != value); - if(changed) - { - ULONG sample_rate_index; - - // get index of sample rate closest to Hz - AHI_GetAudioAttrs(ahi_id, ahi_ctrl, - AHIDB_IndexArg, value >> 16, - AHIDB_Index, (ULONG) &sample_rate_index, - TAG_END); - - D(bug(" audio_set_sample_rate_byval requested rate=%ld Hz\n", value >> 16)); - - AudioStatus.sample_rate = audio_sample_rates[sample_rate_index]; - - AHI_SetFreq(0, AudioStatus.sample_rate >> 16, ahi_ctrl, 0); - } - - D(bug(" audio_set_sample_rate_byval rate=%ld Hz\n", AudioStatus.sample_rate >> 16)); -} - -void audio_set_sample_size_byval(uint32 value) -{ - bool changed = (AudioStatus.sample_size != value); - if(changed) { -// AudioStatus.sample_size = value; -// update_sound_parameters(); -// WritePrivateProfileInt( "Audio", "SampleSize", AudioStatus.sample_size, ini_file_name ); - } - D(bug(" audio_set_sample_size_byval %d\n", AudioStatus.sample_size)); -} - -void audio_set_channels_byval(uint32 value) -{ - bool changed = (AudioStatus.channels != value); - if(changed) { -// AudioStatus.channels = value; -// update_sound_parameters(); -// WritePrivateProfileInt( "Audio", "Channels", AudioStatus.channels, ini_file_name ); - } - D(bug(" audio_set_channels_byval %d\n", AudioStatus.channels)); -} - -bool audio_set_sample_rate(int index) -{ - if(index >= 0 && index < audio_sample_rates.size() ) { - audio_set_sample_rate_byval( audio_sample_rates[index] ); - D(bug(" audio_set_sample_rate index=%ld rate=%ld\n", index, AudioStatus.sample_rate >> 16)); - } - - return true; -} - -bool audio_set_sample_size(int index) -{ - if(index >= 0 && index < audio_sample_sizes.size() ) { - audio_set_sample_size_byval( audio_sample_sizes[index] ); - D(bug(" audio_set_sample_size %d,%d\n", index,AudioStatus.sample_size)); - } - - return true; -} - -bool audio_set_channels(int index) -{ - if(index >= 0 && index < audio_channel_counts.size() ) { - audio_set_channels_byval( audio_channel_counts[index] ); - D(bug(" audio_set_channels %d,%d\n", index,AudioStatus.channels)); - } - - return true; -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - D(bug("audio_get_main_mute: mute=%ld\n", main_mute)); - - return main_mute; -} - -uint32 audio_get_main_volume(void) -{ - D(bug("audio_get_main_volume\n")); - - ULONG volume = current_main_volume >> 8; // 0x10000 => 0x100 - - D(bug("audio_get_main_volume: volume=%08lx\n", volume)); - - return (volume << 16) + volume; - - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - D(bug("audio_get_speaker_mute: mute=%ld\n", speaker_mute)); - - return speaker_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - D(bug("audio_get_speaker_volume: \n")); - - if (audio_open) - { - ULONG volume = current_speaker_volume >> 8; // 0x10000 => 0x100 - - D(bug("audio_get_speaker_volume: volume=%08lx\n", volume)); - - return (volume << 16) + volume; - } - - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ - D(bug("audio_set_main_mute: mute=%ld\n", mute)); - - if (mute != main_mute) - { - main_mute = mute; - } -} - -void audio_set_main_volume(uint32 vol) -{ - D(bug("audio_set_main_volume: vol=%08lx\n", vol)); - - if (audio_open && supports_volume_changes) - { - ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff)); - - D(bug("audio_set_main_volume: volume=%08lx\n", volume)); - - current_main_volume = volume; - - AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM); - } -} - -void audio_set_speaker_mute(bool mute) -{ - D(bug("audio_set_speaker_mute: mute=%ld\n", mute)); - - if (mute != speaker_mute) - { - speaker_mute = mute; - } -} - -void audio_set_speaker_volume(uint32 vol) -{ - D(bug("audio_set_speaker_volume: vol=%08lx\n", vol)); - - if (audio_open && supports_volume_changes) - { - ULONG volume = 0x80 * ((vol >> 16) + (vol & 0xffff)); - - D(bug("audio_set_speaker_volume: volume=%08lx\n", volume)); - - current_speaker_volume = volume; - - AHI_SetVol(0, volume, 0x8000, ahi_ctrl, AHISF_IMM); - } -} diff --git a/BasiliskII/src/AmigaOS/clip_amiga.cpp b/BasiliskII/src/AmigaOS/clip_amiga.cpp deleted file mode 100644 index 10336bbd2..000000000 --- a/BasiliskII/src/AmigaOS/clip_amiga.cpp +++ /dev/null @@ -1,166 +0,0 @@ -/* - * clip_amiga.cpp - Clipboard handling, AmigaOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "clip.h" -#include "prefs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static struct IFFHandle *iffw = NULL; -static struct ClipboardHandle *ch = NULL; -static bool clipboard_open = false; -static bool no_clip_conversion; - - -// Conversion tables -static const uint8 mac2iso[0x80] = { - 0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1, - 0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8, - 0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3, - 0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc, - 0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf, - 0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8, - 0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53, - 0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8, - 0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab, - 0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f, - 0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20, - 0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66, - 0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1, - 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4, - 0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e, - 0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20 -}; - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); - - // Create clipboard IFF handle - iffw = AllocIFF(); - if (iffw) { - ch = OpenClipboard(PRIMARY_CLIP); - if (ch) { - iffw->iff_Stream = (ULONG)ch; - InitIFFasClip(iffw); - clipboard_open = true; - } - } -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ - if (ch) - CloseClipboard(ch); - if (iffw) - FreeIFF(iffw); -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length)); - if (length <= 0 || !clipboard_open) - return; - - switch (type) { - case 'TEXT': { - D(bug(" clipping TEXT\n")); - - // Open IFF stream - if (OpenIFF(iffw, IFFF_WRITE)) - break; - - // Convert text from Mac charset to ISO-Latin1 - uint8 *buf = new uint8[length]; - uint8 *p = (uint8 *)scrap; - uint8 *q = buf; - for (int i=0; i LF - c = 10; - } else if (!no_clip_conversion) - c = mac2iso[c & 0x7f]; - *q++ = c; - } - - // Write text - if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) { - if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) { - WriteChunkBytes(iffw, scrap, length); - PopChunk(iffw); - } - PopChunk(iffw); - } - - // Close IFF stream - CloseIFF(iffw); - delete[] buf; - break; - } - } -} diff --git a/BasiliskII/src/AmigaOS/ether_amiga.cpp b/BasiliskII/src/AmigaOS/ether_amiga.cpp deleted file mode 100644 index 99121a24f..000000000 --- a/BasiliskII/src/AmigaOS/ether_amiga.cpp +++ /dev/null @@ -1,705 +0,0 @@ -/* - * ether_amiga.cpp - Ethernet device driver, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "macos_util.h" -#include "ether.h" -#include "ether_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// These messages are sent to the network process -const uint32 MSG_CLEANUP = 'clea'; // Remove all protocols -const uint32 MSG_ADD_MULTI = 'addm'; // Add multicast address -const uint32 MSG_DEL_MULTI = 'delm'; // Add multicast address -const uint32 MSG_ATTACH_PH = 'atph'; // Attach protocol handler -const uint32 MSG_DETACH_PH = 'deph'; // Attach protocol handler -const uint32 MSG_WRITE = 'writ'; // Write packet - -struct NetMessage : public Message { - NetMessage(uint32 what_, const struct MsgPort *reply_port) - { - what = what_; - mn_ReplyPort = (struct MsgPort *)reply_port; - mn_Length = sizeof(*this); - } - uint32 what; - uint32 pointer; - uint16 type; - int16 result; -}; - - -// List of attached protocols -static const int NUM_READ_REQUESTS = 32; // Number of read requests that are sent to device in advance - -struct NetProtocol : public Node { - struct IOSana2Req read_io[NUM_READ_REQUESTS]; - uint8 read_buf[NUM_READ_REQUESTS][1518]; // 14 bytes header, 1500 bytes data, 4 bytes CRC - uint16 type; - uint32 handler; -}; - -static struct List prot_list; - - -// Global variables -static struct Process *net_proc = NULL; // Network device handler process -static bool proc_error; // Flag: process didn't initialize -static struct MsgPort *proc_port = NULL; // Message port of process, for communication with main task -static struct MsgPort *reply_port = NULL; // Reply port for communication with process -static struct MsgPort *read_port = NULL; // Reply port for read IORequests (set up and owned by network process) - -static bool write_done = false; // Flag: write request done - -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -// Prototypes -static void net_func(void); - - -/* - * Send message to network process - */ - -static int16 send_to_proc(uint32 what, uint32 pointer = 0, uint16 type = 0) -{ - D(bug("sending %08lx to net_proc\n", what)); - NetMessage msg(what, reply_port); - msg.pointer = pointer; - msg.type = type; - PutMsg(proc_port, &msg); - WaitPort(reply_port); - GetMsg(reply_port); - D(bug(" sent\n")); - return msg.result; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - // Do nothing if no Ethernet device specified - if (PrefsFindString("ether") == NULL) - return false; - - // Initialize protocol list - NewList(&prot_list); - - // Create message port - reply_port = CreateMsgPort(); - if (reply_port == NULL) - goto open_error; - D(bug("signal mask %08lx\n", 1 << reply_port->mp_SigBit)); - - // Start process - proc_error = false; - SetSignal(0, SIGF_SINGLE); - net_proc = CreateNewProcTags( - NP_Entry, (ULONG)net_func, - NP_Name, (ULONG)"Basilisk II Ethernet Task", - NP_Priority, 1, - TAG_END - ); - if (net_proc == NULL) - goto open_error; - - // Wait for signal from process - Wait(SIGF_SINGLE); - - // Initialization error? Then bail out - if (proc_error) - goto open_error; - - // Everything OK - return true; - -open_error: - net_proc = NULL; - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return false; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - // Stop process - if (net_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&net_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - // Delete reply port - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } -} - - -/* - * Reset - */ - -void ether_reset(void) -{ - // Remove all protocols - if (net_proc) - send_to_proc(MSG_CLEANUP); -} - - -/* - * Add multicast address - */ - -int16 ether_add_multicast(uint32 pb) -{ - return send_to_proc(MSG_ADD_MULTI, pb); -} - - -/* - * Delete multicast address - */ - -int16 ether_del_multicast(uint32 pb) -{ - return send_to_proc(MSG_DEL_MULTI, pb); -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - return send_to_proc(MSG_ATTACH_PH, handler, type); -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - return send_to_proc(MSG_DETACH_PH, type); -} - - -/* - * Transmit raw ethernet packet - */ - -int16 ether_write(uint32 wds) -{ - send_to_proc(MSG_WRITE, wds); - return 1; // Command in progress -} - - -/* - * Remove protocol from protocol list - */ - -static void remove_protocol(NetProtocol *p) -{ - // Remove from list - Forbid(); - Remove(p); - Permit(); - - // Cancel read requests - for (int i=0; iread_io + i)); - WaitIO((struct IORequest *)(p->read_io + i)); - } - - // Free protocol struct - FreeMem(p, sizeof(NetProtocol)); -} - - -/* - * Remove all protocols - */ - -static void remove_all_protocols(void) -{ - NetProtocol *n = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)n->ln_Succ) != NULL) { - remove_protocol(n); - n = next; - } -} - - -/* - * Copy received network packet to Mac side - */ - -static __saveds __regargs LONG copy_to_buff(uint8 *to /*a0*/, uint8 *from /*a1*/, uint32 packet_len /*d0*/) -{ - D(bug("CopyToBuff to %08lx, from %08lx, size %08lx\n", to, from, packet_len)); - - // It would be more efficient (and take up less memory) if we - // could invoke the packet handler from here. But we don't know - // in what context we run, so calling Execute68k() would not be - // a good idea, and even worse, we might run inside a hardware - // interrupt, so we can't even trigger a Basilisk interrupt from - // here and wait for its completion. - CopyMem(from, to, packet_len); -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; imp_SigBit; - - // Create message ports for device I/O - read_port = CreateMsgPort(); - if (read_port == NULL) - goto quit; - read_mask = 1 << read_port->mp_SigBit; - write_port = CreateMsgPort(); - if (write_port == NULL) - goto quit; - write_mask = 1 << write_port->mp_SigBit; - control_port = CreateMsgPort(); - if (control_port == NULL) - goto quit; - - // Create control IORequest - control_io = (struct IOSana2Req *)CreateIORequest(control_port, sizeof(struct IOSana2Req)); - if (control_io == NULL) - goto quit; - control_io->ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - - // Parse device name - char dev_name[256]; - ULONG dev_unit; - - str = PrefsFindString("ether"); - if (str) { - const char *FirstSlash = strchr(str, '/'); - const char *LastSlash = strrchr(str, '/'); - - if (FirstSlash && FirstSlash && FirstSlash != LastSlash) { - - // Device name contains path, i.e. "Networks/xyzzy.device" - const char *lp = str; - char *dp = dev_name; - - while (lp != LastSlash) - *dp++ = *lp++; - *dp = '\0'; - - if (strlen(dev_name) < 1) - goto quit; - - if (sscanf(LastSlash, "/%ld", &dev_unit) != 1) - goto quit; - } else { - if (sscanf(str, "%[^/]/%ld", dev_name, &dev_unit) != 2) - goto quit; - } - } else - goto quit; - - // Open device - control_io->ios2_BufferManagement = buffer_tags; - od_error = OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)control_io, 0); - if (od_error != 0 || control_io->ios2_Req.io_Device == 0) { - printf("WARNING: OpenDevice(<%s>, unit=%d) returned error %d)\n", (UBYTE *)dev_name, dev_unit, od_error); - goto quit; - } - opened = true; - - // Is it Ethernet? - control_io->ios2_Req.io_Command = S2_DEVICEQUERY; - control_io->ios2_StatData = (void *)&query_data; - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error) - goto quit; - if (query_data.HardwareType != S2WireType_Ethernet) { - WarningAlert(GetString(STR_NOT_ETHERNET_WARN)); - goto quit; - } - - // Yes, create IORequest for writing - write_io = (struct IOSana2Req *)CreateIORequest(write_port, sizeof(struct IOSana2Req)); - if (write_io == NULL) - goto quit; - memcpy(write_io, control_io, sizeof(struct IOSana2Req)); - write_io->ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - write_io->ios2_Req.io_Message.mn_ReplyPort = write_port; - - // Configure Ethernet - control_io->ios2_Req.io_Command = S2_GETSTATIONADDRESS; - DoIO((struct IORequest *)control_io); - memcpy(ether_addr, control_io->ios2_DstAddr, 6); - memcpy(control_io->ios2_SrcAddr, control_io->ios2_DstAddr, 6); - control_io->ios2_Req.io_Command = S2_CONFIGINTERFACE; - DoIO((struct IORequest *)control_io); - D(bug("Ethernet address %08lx %08lx\n", *(uint32 *)ether_addr, *(uint16 *)(ether_addr + 4))); - - // Initialization went well, inform main task - proc_error = false; - Signal(MainTask, SIGF_SINGLE); - - // Main loop - for (;;) { - - // Wait for I/O and messages (CTRL_C is used for quitting the task) - ULONG sig = Wait(proc_port_mask | read_mask | write_mask | SIGBREAKF_CTRL_C); - - // Main task wants to quit us - if (sig & SIGBREAKF_CTRL_C) - break; - - // Main task sent a command to us - if (sig & proc_port_mask) { - struct NetMessage *msg; - while (msg = (NetMessage *)GetMsg(proc_port)) { - D(bug("net_proc received %08lx\n", msg->what)); - switch (msg->what) { - case MSG_CLEANUP: - remove_all_protocols(); - break; - - case MSG_ADD_MULTI: - control_io->ios2_Req.io_Command = S2_ADDMULTICASTADDRESS; - Mac2Host_memcpy(control_io->ios2_SrcAddr, msg->pointer + eMultiAddr, 6); - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error == S2ERR_NOT_SUPPORTED) { - WarningAlert(GetString(STR_NO_MULTICAST_WARN)); - msg->result = noErr; - } else if (control_io->ios2_Req.io_Error) - msg->result = eMultiErr; - else - msg->result = noErr; - break; - - case MSG_DEL_MULTI: - control_io->ios2_Req.io_Command = S2_DELMULTICASTADDRESS; - Mac2Host_memcpy(control_io->ios2_SrcAddr, msg->pointer + eMultiAddr, 6); - DoIO((struct IORequest *)control_io); - if (control_io->ios2_Req.io_Error) - msg->result = eMultiErr; - else - msg->result = noErr; - break; - - case MSG_ATTACH_PH: { - uint16 type = msg->type; - uint32 handler = msg->pointer; - - // Protocol of that type already installed? - NetProtocol *p = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)p->ln_Succ) != NULL) { - if (p->type == type) { - msg->result = lapProtErr; - goto reply; - } - p = next; - } - - // Allocate NetProtocol, set type and handler - p = (NetProtocol *)AllocMem(sizeof(NetProtocol), MEMF_PUBLIC); - if (p == NULL) { - msg->result = lapProtErr; - goto reply; - } - p->type = type; - p->handler = handler; - - // Set up and submit read requests - for (int i=0; iread_io + i, control_io, sizeof(struct IOSana2Req)); - p->read_io[i].ios2_Req.io_Message.mn_Node.ln_Name = (char *)p; // Hide pointer to NetProtocol in node name - p->read_io[i].ios2_Req.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - p->read_io[i].ios2_Req.io_Message.mn_ReplyPort = read_port; - p->read_io[i].ios2_Req.io_Command = CMD_READ; - p->read_io[i].ios2_PacketType = type; - p->read_io[i].ios2_Data = p->read_buf[i]; - p->read_io[i].ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((struct IORequest *)(p->read_io + i)); - } - - // Add protocol to list - AddTail(&prot_list, p); - - // Everything OK - msg->result = noErr; - break; - } - - case MSG_DETACH_PH: { - uint16 type = msg->type; - msg->result = lapProtErr; - NetProtocol *p = (NetProtocol *)prot_list.lh_Head, *next; - while ((next = (NetProtocol *)p->ln_Succ) != NULL) { - if (p->type == type) { - remove_protocol(p); - msg->result = noErr; - break; - } - p = next; - } - break; - } - - case MSG_WRITE: { - // Get pointer to Write Data Structure - uint32 wds = msg->pointer; - write_io->ios2_Data = (void *)wds; - - // Calculate total packet length - long len = 0; - uint32 tmp = wds; - for (;;) { - int16 w = ReadMacInt16(tmp); - if (w == 0) - break; - len += w; - tmp += 6; - } - write_io->ios2_DataLength = len; - - // Get destination address - uint32 hdr = ReadMacInt32(wds + 2); - Mac2Host_memcpy(write_io->ios2_DstAddr, hdr, 6); - - // Get packet type - uint32 type = ReadMacInt16(hdr + 12); - if (type <= 1500) - type = 0; // 802.3 packet - write_io->ios2_PacketType = type; - - // Multicast/broadcard packet? - if (write_io->ios2_DstAddr[0] & 1) { - if (*(uint32 *)(write_io->ios2_DstAddr) == 0xffffffff && *(uint16 *)(write_io->ios2_DstAddr + 4) == 0xffff) - write_io->ios2_Req.io_Command = S2_BROADCAST; - else - write_io->ios2_Req.io_Command = S2_MULTICAST; - } else - write_io->ios2_Req.io_Command = CMD_WRITE; - - // Send packet - write_done = false; - write_io->ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((IORequest *)write_io); - break; - } - } -reply: D(bug(" net_proc replying\n")); - ReplyMsg(msg); - } - } - - // Packet received - if (sig & read_mask) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - - // Packet write completed - if (sig & write_mask) { - GetMsg(write_port); - WriteMacInt32(ether_data + ed_Result, write_io->ios2_Req.io_Error ? excessCollsns : 0); - write_done = true; - D(bug(" packet write done, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } -quit: - - // Close everything - remove_all_protocols(); - if (opened) { - if (CheckIO((struct IORequest *)write_io) == 0) { - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)write_io); - } - CloseDevice((struct IORequest *)control_io); - } - if (write_io) - DeleteIORequest(write_io); - if (control_io) - DeleteIORequest(control_io); - if (control_port) - DeleteMsgPort(control_port); - if (write_port) - DeleteMsgPort(write_port); - if (read_port) - DeleteMsgPort(read_port); - - // Send signal to main task to confirm termination - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - - // Packet write done, enqueue DT to call IODone - if (write_done) { - EnqueueMac(ether_data + ed_DeferredTask, 0xd92); - write_done = false; - } - - // Call protocol handler for received packets - IOSana2Req *io; - while (io = (struct IOSana2Req *)GetMsg(read_port)) { - - // Get pointer to NetProtocol (hidden in node name) - NetProtocol *p = (NetProtocol *)io->ios2_Req.io_Message.mn_Node.ln_Name; - - // No default handler - if (p->handler == 0) - continue; - - // Copy header to RHA - Host2Mac_memcpy(ether_data + ed_RHA, io->ios2_Data, 14); - D(bug(" header %08lx%04lx %08lx%04lx %04lx\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = *(uint16 *)((uint32)io->ios2_Data + 12); // Packet type - r.d[1] = io->ios2_DataLength - 18; // Remaining packet length (without header, for ReadPacket) (-18 because the CRC is also included) - r.a[0] = (uint32)io->ios2_Data + 14; // Pointer to packet (host address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08lx, type %08lx, length %08lx, data %08lx, rha %08lx, read_packet %08lx\n", p->handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(p->handler, &r); - - // Resend IORequest - io->ios2_Req.io_Flags = SANA2IOF_RAW; - BeginIO((struct IORequest *)io); - } - D(bug(" EtherIRQ done\n")); -} diff --git a/BasiliskII/src/AmigaOS/extfs_amiga.cpp b/BasiliskII/src/AmigaOS/extfs_amiga.cpp deleted file mode 100644 index 9f157e294..000000000 --- a/BasiliskII/src/AmigaOS/extfs_amiga.cpp +++ /dev/null @@ -1,387 +0,0 @@ -/* - * extfs_amiga.cpp - MacOS file system for access native file system access, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#define __USE_SYSBASE -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "extfs.h" -#include "extfs_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - - -/* - * Initialization - */ - -void extfs_init(void) -{ -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - AddPart(path, (char *)component, MAX_PATH_LENGTH); -} - - -/* - * Finder info and resource forks are kept in helper files - * - * Finder info: - * /path/.finf/file - * Resource fork: - * /path/.rsrc/file - * - * The .finf files store a FInfo/DInfo, followed by a FXInfo/DXInfo - * (16+16 bytes) - */ - -static void make_helper_path(const char *src, char *dest, const char *add, bool only_dir = false) -{ - dest[0] = 0; - - // Get pointer to last component of path - const char *last_part = FilePart((char *)src); - - // Copy everything before - strncpy(dest, src, last_part-src); - dest[last_part-src] = 0; - - // Add additional component - AddPart(dest, (char *)add, MAX_PATH_LENGTH); - - // Add last component - if (!only_dir) - AddPart(dest, (char *)last_part, MAX_PATH_LENGTH); -} - -static int create_helper_dir(const char *path, const char *add) -{ - char helper_dir[MAX_PATH_LENGTH]; - make_helper_path(path, helper_dir, add, true); - if (helper_dir[strlen(helper_dir) - 1] == '/') // Remove trailing "/" - helper_dir[strlen(helper_dir) - 1] = 0; - return mkdir(helper_dir, 0777); -} - -static int open_helper(const char *path, const char *add, int flag) -{ - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, add); - - if ((flag & O_ACCMODE) == O_RDWR || (flag & O_ACCMODE) == O_WRONLY) - flag |= O_CREAT; - int fd = open(helper_path, flag, 0666); - if (fd < 0) { - if (errno == ENOENT && (flag & O_CREAT)) { - // One path component was missing, probably the helper - // directory. Try to create it and re-open the file. - int ret = create_helper_dir(path, add); - if (ret < 0) - return ret; - fd = open(helper_path, flag, 0666); - } - } - return fd; -} - -static int open_finf(const char *path, int flag) -{ - return open_helper(path, ".finf/", flag); -} - -static int open_rsrc(const char *path, int flag) -{ - return open_helper(path, ".rsrc/", flag); -} - - -/* - * Get/set finder type/creator for file specified by full path - */ - -struct ext2type { - const char *ext; - uint32 type; - uint32 creator; -}; - -static const ext2type e2t_translation[] = { - {".z", FOURCC('Z','I','V','M'), FOURCC('L','Z','I','V')}, - {".gz", FOURCC('G','z','i','p'), FOURCC('G','z','i','p')}, - {".hqx", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".bin", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".pdf", FOURCC('P','D','F',' '), FOURCC('C','A','R','O')}, - {".ps", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".sit", FOURCC('S','I','T','!'), FOURCC('S','I','T','x')}, - {".tar", FOURCC('T','A','R','F'), FOURCC('T','A','R',' ')}, - {".uu", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".uue", FOURCC('T','E','X','T'), FOURCC('S','I','T','x')}, - {".zip", FOURCC('Z','I','P',' '), FOURCC('Z','I','P',' ')}, - {".8svx", FOURCC('8','S','V','X'), FOURCC('S','N','D','M')}, - {".aifc", FOURCC('A','I','F','C'), FOURCC('T','V','O','D')}, - {".aiff", FOURCC('A','I','F','F'), FOURCC('T','V','O','D')}, - {".au", FOURCC('U','L','A','W'), FOURCC('T','V','O','D')}, - {".mid", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".midi", FOURCC('M','I','D','I'), FOURCC('T','V','O','D')}, - {".mp2", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".mp3", FOURCC('M','P','G',' '), FOURCC('T','V','O','D')}, - {".wav", FOURCC('W','A','V','E'), FOURCC('T','V','O','D')}, - {".bmp", FOURCC('B','M','P','f'), FOURCC('o','g','l','e')}, - {".gif", FOURCC('G','I','F','f'), FOURCC('o','g','l','e')}, - {".lbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".ilbm", FOURCC('I','L','B','M'), FOURCC('G','K','O','N')}, - {".jpg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".jpeg", FOURCC('J','P','E','G'), FOURCC('o','g','l','e')}, - {".pict", FOURCC('P','I','C','T'), FOURCC('o','g','l','e')}, - {".png", FOURCC('P','N','G','f'), FOURCC('o','g','l','e')}, - {".sgi", FOURCC('.','S','G','I'), FOURCC('o','g','l','e')}, - {".tga", FOURCC('T','P','I','C'), FOURCC('o','g','l','e')}, - {".tif", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".tiff", FOURCC('T','I','F','F'), FOURCC('o','g','l','e')}, - {".htm", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".html", FOURCC('T','E','X','T'), FOURCC('M','O','S','S')}, - {".txt", FOURCC('T','E','X','T'), FOURCC('t','t','x','t')}, - {".rtf", FOURCC('T','E','X','T'), FOURCC('M','S','W','D')}, - {".c", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cc", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".cxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".h", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hh", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hpp", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".hxx", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".s", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".i", FOURCC('T','E','X','T'), FOURCC('R','*','c','h')}, - {".mpg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mpeg", FOURCC('M','P','E','G'), FOURCC('T','V','O','D')}, - {".mov", FOURCC('M','o','o','V'), FOURCC('T','V','O','D')}, - {".fli", FOURCC('F','L','I',' '), FOURCC('T','V','O','D')}, - {".avi", FOURCC('V','f','W',' '), FOURCC('T','V','O','D')}, - {".qxd", FOURCC('X','D','O','C'), FOURCC('X','P','R','3')}, - {".hfv", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".dsk", FOURCC('D','D','i','m'), FOURCC('d','d','s','k')}, - {".img", FOURCC('r','o','h','d'), FOURCC('d','d','s','k')}, - {NULL, 0, 0} // End marker -}; - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Read Finder info file - int fd = open_finf(path, O_RDONLY); - if (fd >= 0) { - ssize_t actual = read(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - actual += read(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); - if (actual >= SIZEOF_FInfo) - return; - } - - // No Finder info file, translate file name extension to MacOS type/creator - if (!is_dir) { - int path_len = strlen(path); - for (int i=0; e2t_translation[i].ext; i++) { - int ext_len = strlen(e2t_translation[i].ext); - if (path_len < ext_len) - continue; - if (!strcasecmp(path + path_len - ext_len, e2t_translation[i].ext)) { - WriteMacInt32(finfo + fdType, e2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, e2t_translation[i].creator); - break; - } - } - } -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Open Finder info file - int fd = open_finf(path, O_RDWR); - if (fd < 0) - return; - - // Write file - write(fd, Mac2HostAddr(finfo), SIZEOF_FInfo); - if (fxinfo) - write(fd, Mac2HostAddr(fxinfo), SIZEOF_FXInfo); - close(fd); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open resource file - int fd = open_rsrc(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size - off_t size = lseek(fd, 0, SEEK_END); - - // Close file and return size - close(fd); - return size < 0 ? 0 : size; -} - -int open_rfork(const char *path, int flag) -{ - return open_rsrc(path, flag); -} - -void close_rfork(const char *path, int fd) -{ - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - return read(fd, buffer, length); -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - return write(fd, buffer, length); -} - - -/* - * Remove file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - // Remove helpers first, don't complain if this fails - char helper_path[MAX_PATH_LENGTH]; - make_helper_path(path, helper_path, ".finf/", false); - remove(helper_path); - make_helper_path(path, helper_path, ".rsrc/", false); - remove(helper_path); - - // Now remove file or directory (and helper directories in the directory) - if (remove(path) < 0) { - if (errno == EISDIR || errno == ENOTEMPTY) { - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".finf"); - rmdir(helper_path); - helper_path[0] = 0; - strncpy(helper_path, path, MAX_PATH_LENGTH-1); - add_path_component(helper_path, ".rsrc"); - rmdir(helper_path); - return rmdir(path) == 0; - } else - return false; - } - return true; -} - - -/* - * Rename/move file/directory (and associated helper files), - * returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - // Rename helpers first, don't complain if this fails - char old_helper_path[MAX_PATH_LENGTH], new_helper_path[MAX_PATH_LENGTH]; - make_helper_path(old_path, old_helper_path, ".finf/", false); - make_helper_path(new_path, new_helper_path, ".finf/", false); - create_helper_dir(new_path, ".finf/"); - rename(old_helper_path, new_helper_path); - make_helper_path(old_path, old_helper_path, ".rsrc/", false); - make_helper_path(new_path, new_helper_path, ".rsrc/", false); - create_helper_dir(new_path, ".rsrc/"); - rename(old_helper_path, new_helper_path); - - // Now rename file - return rename(old_path, new_path) == 0; -} - - -/* - * ftruncate() is missing from libnix - */ - -extern unsigned long *__stdfiledes; - -int ftruncate(int fd, off_t size) -{ - if (SetFileSize(__stdfiledes[fd], size, OFFSET_BEGINNING) < 0) - return -1; - else - return 0; -} diff --git a/BasiliskII/src/AmigaOS/main_amiga.cpp b/BasiliskII/src/AmigaOS/main_amiga.cpp deleted file mode 100644 index 90ac6db23..000000000 --- a/BasiliskII/src/AmigaOS/main_amiga.cpp +++ /dev/null @@ -1,743 +0,0 @@ -/* - * main_amiga.cpp - Startup code for AmigaOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "xpram.h" -#include "timer.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "scsi.h" -#include "audio.h" -#include "video.h" -#include "serial.h" -#include "ether.h" -#include "clip.h" -#include "emul_op.h" -#include "rom_patches.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "sys.h" -#include "user_strings.h" -#include "version.h" - -#define DEBUG 0 -#include "debug.h" - - -// Options for libnix -unsigned long __stack = 0x4000; // Stack requirement -int __nocommandline = 1; // Disable command line parsing - - -// Constants -static const char ROM_FILE_NAME[] = "ROM"; -static const char __ver[] = "$VER: " VERSION_STRING " " __DATE__; -static const int SCRATCH_MEM_SIZE = 65536; - - -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables -extern ExecBase *SysBase; -struct Library *GfxBase = NULL; -struct IntuitionBase *IntuitionBase = NULL; -struct Library *GadToolsBase = NULL; -struct Library *IFFParseBase = NULL; -struct Library *AslBase = NULL; -struct Library *P96Base = NULL; -struct Library *CyberGfxBase = NULL; -struct Library *TimerBase = NULL; -struct Library *AHIBase = NULL; -struct Library *DiskBase = NULL; - -struct Task *MainTask; // Our task -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -APTR OldTrapHandler = NULL; // Old trap handler -APTR OldExceptionHandler = NULL; // Old exception handler -BYTE IRQSig = -1; // "Interrupt" signal number -ULONG IRQSigMask = 0; // "Interrupt" signal mask - -static struct timerequest *timereq = NULL; // IORequest for timer - -static struct MsgPort *ahi_port = NULL; // Port for AHI -static struct AHIRequest *ahi_io = NULL; // IORequest for AHI - -static struct Process *xpram_proc = NULL; // XPRAM watchdog -static volatile bool xpram_proc_active = true; // Flag for quitting the XPRAM watchdog - -static struct Process *tick_proc = NULL; // 60Hz process -static volatile bool tick_proc_active = true; // Flag for quitting the 60Hz process - -static bool stack_swapped = false; // Stack swapping -static StackSwapStruct stack_swap; - - -// Assembly functions -struct trap_regs; -extern "C" void AtomicAnd(uint32 *p, uint32 val); -extern "C" void AtomicOr(uint32 *p, uint32 val); -extern "C" void MoveVBR(void); -extern "C" void DisableSuperBypass(void); -extern "C" void TrapHandlerAsm(void); -extern "C" void ExceptionHandlerAsm(void); -extern "C" void IllInstrHandler(trap_regs *regs); -extern "C" void PrivViolHandler(trap_regs *regs); -extern "C" void quit_emulator(void); -extern "C" void AsmTriggerNMI(void); -uint16 EmulatedSR; // Emulated SR (supervisor bit and interrupt mask) - - -// Prototypes -static void jump_to_rom(void); -static void xpram_func(void); -static void tick_func(void); - - -/* - * Main program - */ - -int main(int argc, char **argv) -{ - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - MainTask = FindTask(NULL); - struct DateStamp ds; - DateStamp(&ds); - srand(ds.ds_Tick); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Open libraries - GfxBase = OpenLibrary((UBYTE *) "graphics.library", 39); - if (GfxBase == NULL) { - printf("Cannot open graphics.library V39.\n"); - exit(1); - } - IntuitionBase = (struct IntuitionBase *)OpenLibrary((UBYTE *) "intuition.library", 39); - if (IntuitionBase == NULL) { - printf("Cannot open intuition.library V39.\n"); - CloseLibrary(GfxBase); - exit(1); - } - DiskBase = (struct Library *)OpenResource((UBYTE *) "disk.resource"); - if (DiskBase == NULL) - QuitEmulator(); - GadToolsBase = OpenLibrary((UBYTE *) "gadtools.library", 39); - if (GadToolsBase == NULL) { - ErrorAlert(STR_NO_GADTOOLS_LIB_ERR); - QuitEmulator(); - } - IFFParseBase = OpenLibrary((UBYTE *) "iffparse.library", 39); - if (IFFParseBase == NULL) { - ErrorAlert(STR_NO_IFFPARSE_LIB_ERR); - QuitEmulator(); - } - AslBase = OpenLibrary((UBYTE *) "asl.library", 36); - if (AslBase == NULL) { - ErrorAlert(STR_NO_ASL_LIB_ERR); - QuitEmulator(); - } - - if (FindTask((UBYTE *) "« Enforcer »")) { - ErrorAlert(STR_ENFORCER_RUNNING_ERR); - QuitEmulator(); - } - - // These two can fail (the respective gfx support won't be available, then) - P96Base = OpenLibrary((UBYTE *) "Picasso96API.library", 2); - CyberGfxBase = OpenLibrary((UBYTE *) "cybergraphics.library", 2); - - // Read preferences - PrefsInit(NULL, argc, argv); - - // Open AHI - ahi_port = CreateMsgPort(); - if (ahi_port) { - ahi_io = (struct AHIRequest *)CreateIORequest(ahi_port, sizeof(struct AHIRequest)); - if (ahi_io) { - ahi_io->ahir_Version = 2; - if (OpenDevice((UBYTE *) AHINAME, AHI_NO_UNIT, (struct IORequest *)ahi_io, 0) == 0) { - AHIBase = (struct Library *)ahi_io->ahir_Std.io_Device; - } - } - } - - // Init system routines - SysInit(); - - // Show preferences editor - if (!PrefsFindBool("nogui")) - if (!PrefsEditor()) - QuitEmulator(); - - // Check start of Chip memory (because we need access to 0x0000..0x2000) - if ((uint32)FindName(&SysBase->MemList, (UBYTE *) "chip memory") < 0x2000) { - ErrorAlert(STR_NO_PREPARE_EMUL_ERR); - QuitEmulator(); - } - - // Open timer.device - timereq = (struct timerequest *)AllocVec(sizeof(timerequest), MEMF_PUBLIC | MEMF_CLEAR); - if (timereq == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - if (OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timereq, 0)) { - ErrorAlert(STR_NO_TIMER_DEV_ERR); - QuitEmulator(); - } - TimerBase = (struct Library *)timereq->tr_node.io_Device; - - // Allocate scratch memory - ScratchMem = (uint8 *)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC); - if (ScratchMem == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block - - // Create area for Mac RAM and ROM (ROM must be higher in memory, - // so we allocate one big chunk and put the ROM at the top of it) - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC); - if (RAMBaseHost == NULL) { - uint32 newRAMSize = AvailMem(MEMF_LARGEST) - 0x100000; - char xText[120]; - - sprintf(xText, GetString(STR_NOT_ENOUGH_MEM_WARN), RAMSize, newRAMSize); - - if (ChoiceAlert(xText, "Use", "Quit") != 1) - QuitEmulator(); - - RAMSize = newRAMSize; - RAMBaseHost = (uint8 *)AllocVec(RAMSize - 0x100000, MEMF_PUBLIC); - if (RAMBaseHost == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - } - RAMBaseMac = (uint32)RAMBaseHost; - D(bug("Mac RAM starts at %08lx\n", RAMBaseHost)); - ROMBaseHost = RAMBaseHost + RAMSize; - ROMBaseMac = (uint32)ROMBaseHost; - D(bug("Mac ROM starts at %08lx\n", ROMBaseHost)); - - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Load Mac ROM - BPTR rom_fh = Open(rom_path ? (char *)rom_path : (char *)ROM_FILE_NAME, MODE_OLDFILE); - if (rom_fh == 0) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf(GetString(STR_READING_ROM_FILE)); - Seek(rom_fh, 0, OFFSET_END); - ROMSize = Seek(rom_fh, 0, OFFSET_CURRENT); - if (ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - Close(rom_fh); - QuitEmulator(); - } - Seek(rom_fh, 0, OFFSET_BEGINNING); - if (Read(rom_fh, ROMBaseHost, ROMSize) != ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - Close(rom_fh); - QuitEmulator(); - } - - // Set CPU and FPU type - UWORD attn = SysBase->AttnFlags; - CPUType = attn & AFF_68040 ? 4 : (attn & AFF_68030 ? 3 : 2); - CPUIs68060 = attn & AFF_68060; - FPUType = attn & AFF_68881 ? 1 : 0; - - // Initialize everything - if (!InitAll(NULL)) - QuitEmulator(); - - // Move VBR away from 0 if neccessary - MoveVBR(); - - // On 68060, disable Super Bypass mode because of a CPU bug that is triggered by MacOS 8 - if (CPUIs68060) - DisableSuperBypass(); - - memset((UBYTE *) 8, 0, 0x2000-8); - - // Install trap handler - EmulatedSR = 0x2700; - OldTrapHandler = MainTask->tc_TrapCode; - MainTask->tc_TrapCode = (APTR)TrapHandlerAsm; - - // Allocate signal for interrupt emulation and install exception handler - IRQSig = AllocSignal(-1); - IRQSigMask = 1 << IRQSig; - OldExceptionHandler = MainTask->tc_ExceptCode; - MainTask->tc_ExceptCode = (APTR)ExceptionHandlerAsm; - SetExcept(SIGBREAKF_CTRL_C | IRQSigMask, SIGBREAKF_CTRL_C | IRQSigMask); - - // Start XPRAM watchdog process - xpram_proc = CreateNewProcTags( - NP_Entry, (ULONG)xpram_func, - NP_Name, (ULONG)"Basilisk II XPRAM Watchdog", - NP_Priority, 0, - TAG_END - ); - - // Start 60Hz process - tick_proc = CreateNewProcTags( - NP_Entry, (ULONG)tick_func, - NP_Name, (ULONG)"Basilisk II 60Hz", - NP_Priority, 5, - TAG_END - ); - - // Set task priority to -1 so we don't use all processing time - SetTaskPri(MainTask, -1); - - WriteMacInt32(0xbff, 0); // MacsBugFlags - - // Swap stack to Mac RAM area - stack_swap.stk_Lower = RAMBaseHost; - stack_swap.stk_Upper = (ULONG)RAMBaseHost + RAMSize; - stack_swap.stk_Pointer = RAMBaseHost + 0x8000; - StackSwap(&stack_swap); - stack_swapped = true; - - // Jump to ROM boot routine - Start680x0(); - - QuitEmulator(); - return 0; -} - -void Start680x0(void) -{ - typedef void (*rom_func)(void); - rom_func fp = (rom_func)(ROMBaseHost + 0x2a); - fp(); -} - - -/* - * Quit emulator (__saveds because it might be called from an exception) - */ - -// Assembly entry point -void __saveds quit_emulator(void) -{ - QuitEmulator(); -} - -void QuitEmulator(void) -{ - // Stop 60Hz process - if (tick_proc) { - SetSignal(0, SIGF_SINGLE); - tick_proc_active = false; - Wait(SIGF_SINGLE); - } - - // Stop XPRAM watchdog process - if (xpram_proc) { - SetSignal(0, SIGF_SINGLE); - xpram_proc_active = false; - Wait(SIGF_SINGLE); - } - - // Restore stack - if (stack_swapped) { - stack_swapped = false; - StackSwap(&stack_swap); - } - - // Remove exception handler - if (IRQSig >= 0) { - SetExcept(0, SIGBREAKF_CTRL_C | IRQSigMask); - MainTask->tc_ExceptCode = OldExceptionHandler; - FreeSignal(IRQSig); - } - - // Remove trap handler - MainTask->tc_TrapCode = OldTrapHandler; - - // Deinitialize everything - ExitAll(); - - // Delete RAM/ROM area - if (RAMBaseHost) - FreeVec(RAMBaseHost); - - // Delete scratch memory area - if (ScratchMem) - FreeMem((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - - // Close timer.device - if (TimerBase) - CloseDevice((struct IORequest *)timereq); - if (timereq) - FreeVec(timereq); - - // Exit system routines - SysExit(); - - // Close AHI - if (AHIBase) - CloseDevice((struct IORequest *)ahi_io); - if (ahi_io) - DeleteIORequest((struct IORequest *)ahi_io); - if (ahi_port) - DeleteMsgPort(ahi_port); - - // Exit preferences - PrefsExit(); - - // Close libraries - if (CyberGfxBase) - CloseLibrary(CyberGfxBase); - if (P96Base) - CloseLibrary(P96Base); - if (AslBase) - CloseLibrary(AslBase); - if (IFFParseBase) - CloseLibrary(IFFParseBase); - if (GadToolsBase) - CloseLibrary(GadToolsBase); - if (IntuitionBase) - CloseLibrary((struct Library *)IntuitionBase); - if (GfxBase) - CloseLibrary(GfxBase); - - exit(0); -} - - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ - CacheClearE(start, size, CACRF_ClearI | CACRF_ClearD); -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags; - -void SetInterruptFlag(uint32 flag) -{ - AtomicOr(&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - AtomicAnd(&InterruptFlags, ~flag); -} - -void TriggerInterrupt(void) -{ - Signal(MainTask, IRQSigMask); -} - -void TriggerNMI(void) -{ - AsmTriggerNMI(); -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -static __saveds void tick_func(void) -{ - int tick_counter = 0; - struct MsgPort *timer_port = NULL; - struct timerequest *timer_io = NULL; - ULONG timer_mask = 0; - - // Start 60Hz timer - timer_port = CreateMsgPort(); - if (timer_port) { - timer_io = (struct timerequest *)CreateIORequest(timer_port, sizeof(struct timerequest)); - if (timer_io) { - if (!OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timer_io, 0)) { - timer_mask = 1 << timer_port->mp_SigBit; - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16625; - SendIO((struct IORequest *)timer_io); - } - } - } - - while (tick_proc_active) { - - // Wait for timer tick - Wait(timer_mask); - - // Restart timer - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16625; - SendIO((struct IORequest *)timer_io); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); - } - - // Trigger 60Hz interrupt - SetInterruptFlag(INTFLAG_60HZ); - TriggerInterrupt(); - } - - // Stop timer - if (timer_io) { - if (!CheckIO((struct IORequest *)timer_io)) - AbortIO((struct IORequest *)timer_io); - WaitIO((struct IORequest *)timer_io); - CloseDevice((struct IORequest *)timer_io); - DeleteIORequest(timer_io); - } - if (timer_port) - DeleteMsgPort(timer_port); - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * XPRAM watchdog thread (saves XPRAM every minute) - */ - -static __saveds void xpram_func(void) -{ - uint8 last_xpram[XPRAM_SIZE]; - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - - while (xpram_proc_active) { - for (int i=0; i<60 && xpram_proc_active; i++) - Delay(50); // Only wait 1 second so we quit promptly when xpram_proc_active becomes false - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_ERROR_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_ERROR_PREFIX); - req.es_GadgetFormat = (UBYTE *)GetString(STR_QUIT_BUTTON); - EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX); - req.es_GadgetFormat = (UBYTE *)GetString(STR_OK_BUTTON); - EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, "%s|%s", pos, neg); - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE); - req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX); - req.es_GadgetFormat = (UBYTE *)str; - return EasyRequest(NULL, &req, NULL, (ULONG)text); -} - - -/* - * Illegal Instruction and Privilege Violation trap handlers - */ - -struct trap_regs { // This must match the layout of M68kRegisters - uint32 d[8]; - uint32 a[8]; - uint16 sr; - uint32 pc; -}; - -void __saveds IllInstrHandler(trap_regs *r) -{ -// D(bug("IllInstrHandler/%ld\n", __LINE__)); - - uint16 opcode = *(uint16 *)(r->pc); - if ((opcode & 0xff00) != 0x7100) { - printf("Illegal Instruction %04x at %08lx\n", *(uint16 *)(r->pc), r->pc); - printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" - "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" - "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" - "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" - "sr %04x\n", - r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], - r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], - r->sr); - QuitEmulator(); - } else { - // Disable interrupts - uint16 sr = EmulatedSR; - EmulatedSR |= 0x0700; - - // Call opcode routine - EmulOp(opcode, (M68kRegisters *)r); - r->pc += 2; - - // Restore interrupts - EmulatedSR = sr; - if ((EmulatedSR & 0x0700) == 0 && InterruptFlags) - Signal(MainTask, IRQSigMask); - } -} - -void __saveds PrivViolHandler(trap_regs *r) -{ - printf("Privileged instruction %04x %04x at %08lx\n", *(uint16 *)(r->pc), *(uint16 *)(r->pc + 2), r->pc); - printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" - "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" - "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" - "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" - "sr %04x\n", - r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], - r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], - r->sr); - QuitEmulator(); -} diff --git a/BasiliskII/src/AmigaOS/prefs_amiga.cpp b/BasiliskII/src/AmigaOS/prefs_amiga.cpp deleted file mode 100644 index 3d71c1de7..000000000 --- a/BasiliskII/src/AmigaOS/prefs_amiga.cpp +++ /dev/null @@ -1,89 +0,0 @@ -/* - * prefs_amiga.cpp - Preferences handling, AmigaOS specifix stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - -#include "sysdeps.h" -#include "prefs.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"sound", TYPE_STRING, false, "sound output mode description"}, - {"scsimemtype", TYPE_INT32, false, "SCSI buffer memory type"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Prefs file name -const char PREFS_FILE_NAME[] = "ENV:BasiliskII_prefs"; -const char PREFS_FILE_NAME_ARC[] = "ENVARC:BasiliskII_prefs"; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(void) -{ - // Read preferences from settings file - FILE *f = fopen(PREFS_FILE_NAME, "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(PREFS_FILE_NAME, "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } - if ((f = fopen(PREFS_FILE_NAME_ARC, "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "WORK:"); - PrefsAddInt32("scsimemtype", 0); -} diff --git a/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp b/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp deleted file mode 100644 index f19569061..000000000 --- a/BasiliskII/src/AmigaOS/prefs_editor_amiga.cpp +++ /dev/null @@ -1,1735 +0,0 @@ -/* - * prefs_editor_amiga.cpp - Preferences editor, AmigaOS implementation (using gtlayout.library) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "xpram.h" -#include "cdrom.h" -#include "user_strings.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" - - -// Gadget/menu IDs -const int MSG_OK = 0x0100; // "Start" button -const int MSG_CANCEL = 0x0101; // "Quit" button -const int MSG_ABOUT = 0x0102; // "About..." menu item -const int MSG_ZAP_PRAM = 0x0103; // "Zap PRAM" menu item - -const int GAD_PAGEGROUP = 0x0200; - -const int GAD_DISK_LIST = 0x0300; // "Volumes" pane -const int GAD_ADD_VOLUME = 0x0301; -const int GAD_EDIT_VOLUME = 0x0302; -const int GAD_REMOVE_VOLUME = 0x0303; -const int GAD_CDROM_DEVICE = 0x0304; -const int GAD_CDROM_UNIT = 0x0305; -const int GAD_BOOTDRIVER = 0x0306; -const int GAD_NOCDROM = 0x0307; -const int GAD_EXTFS = 0x0308; - -const int GAD_VOLUME_READONLY = 0x0310; // "Add/Edit Volume" window -const int GAD_VOLUME_TYPE = 0x0311; -const int GAD_VOLUME_FILE = 0x0312; -const int GAD_VOLUME_DEVICE = 0x0313; -const int GAD_VOLUME_UNIT = 0x0314; -const int GAD_VOLUME_OPENFLAGS = 0x0315; -const int GAD_VOLUME_STARTBLOCK = 0x0316; -const int GAD_VOLUME_SIZE = 0x0317; -const int GAD_VOLUME_BLOCKSIZE = 0x0318; -const int GAD_VOLUME_PAGEGROUP = 0x0319; - -const int GAD_SCSI0_DEVICE = 0x0400; // "SCSI" pane -const int GAD_SCSI1_DEVICE = 0x0401; -const int GAD_SCSI2_DEVICE = 0x0402; -const int GAD_SCSI3_DEVICE = 0x0403; -const int GAD_SCSI4_DEVICE = 0x0404; -const int GAD_SCSI5_DEVICE = 0x0405; -const int GAD_SCSI6_DEVICE = 0x0406; -const int GAD_SCSI0_UNIT = 0x0410; -const int GAD_SCSI1_UNIT = 0x0411; -const int GAD_SCSI2_UNIT = 0x0412; -const int GAD_SCSI3_UNIT = 0x0413; -const int GAD_SCSI4_UNIT = 0x0414; -const int GAD_SCSI5_UNIT = 0x0415; -const int GAD_SCSI6_UNIT = 0x0416; -const int GAD_SCSI_MEMTYPE = 0x0420; - -const int GAD_VIDEO_TYPE = 0x0500; // "Graphics/Sound" pane -const int GAD_DISPLAY_X = 0x0501; -const int GAD_DISPLAY_Y = 0x0502; -const int GAD_FRAMESKIP = 0x0503; -const int GAD_SCREEN_MODE = 0x0504; -const int GAD_AHI_MODE = 0x0505; -const int GAD_NOSOUND = 0x0506; - -const int GAD_SERIALA_DEVICE = 0x0600; // "Serial/Network" pane -const int GAD_SERIALA_UNIT = 0x0601; -const int GAD_SERIALA_ISPAR = 0x0602; -const int GAD_SERIALB_DEVICE = 0x0603; -const int GAD_SERIALB_UNIT = 0x0604; -const int GAD_SERIALB_ISPAR = 0x0605; -const int GAD_ETHER_DEVICE = 0x0606; -const int GAD_ETHER_UNIT = 0x00607; - -const int GAD_RAMSIZE = 0x0700; // "Memory/Misc" pane -const int GAD_MODELID = 0x0701; -const int GAD_ROM_FILE = 0x0702; - - -// Global variables -struct Library *GTLayoutBase = NULL; -static struct FileRequester *dev_request = NULL, *file_request = NULL; - -// gtlayout.library macros -#define VGROUP LT_New(h, LA_Type, VERTICAL_KIND, TAG_END) -#define HGROUP LT_New(h, LA_Type, HORIZONTAL_KIND, TAG_END) -#define ENDGROUP LT_EndGroup(h) - -// Prototypes -static void create_volumes_pane(struct LayoutHandle *h); -static void create_scsi_pane(struct LayoutHandle *h); -static void create_graphics_pane(struct LayoutHandle *h); -static void create_serial_pane(struct LayoutHandle *h); -static void create_memory_pane(struct LayoutHandle *h); -static void add_edit_volume(struct LayoutHandle *h, bool adding); -static void remove_volume(struct LayoutHandle *h); -static void ghost_volumes_gadgets(struct LayoutHandle *h); -static void ghost_graphics_gadgets(struct LayoutHandle *h); -static void screen_mode_req(struct Window *win, struct LayoutHandle *h); -static void ahi_mode_req(struct Window *win, struct LayoutHandle *h); -static void read_settings(struct LayoutHandle *h); - - -/* - * Locale hook - returns string for given ID - */ - -static __saveds __attribute__((regparm(3))) const char *locale_hook_func(struct Hook *hook /*a0*/, void *id /*a1*/, struct LayoutHandle *h /*a2*/) -{ - return GetString((uint32)id); -} - -struct Hook locale_hook = {{NULL, NULL}, (HOOKFUNC)locale_hook_func, NULL, NULL}; - - -/* - * Show preferences editor - * Returns true when user clicked on "Start", false otherwise - */ - -bool PrefsEditor(void) -{ - bool retval = true, done = false; - struct LayoutHandle *h = NULL; - struct Window *win = NULL; - struct Menu *menu = NULL; - - // Pane tabs - static const LONG labels[] = { - STR_VOLUMES_PANE_TITLE, - STR_SCSI_PANE_TITLE, - STR_GRAPHICS_SOUND_PANE_TITLE, - STR_SERIAL_NETWORK_PANE_TITLE, - STR_MEMORY_MISC_PANE_TITLE, - -1 - }; - - // Open gtlayout.library - GTLayoutBase = (struct Library *)OpenLibrary("gtlayout.library", 39); - if (GTLayoutBase == NULL) { - WarningAlert(GetString(STR_NO_GTLAYOUT_LIB_WARN)); - return true; - } - - // Create layout handle - h = LT_CreateHandleTags(NULL, - LAHN_AutoActivate, FALSE, - LAHN_LocaleHook, (ULONG)&locale_hook, - TAG_END - ); - if (h == NULL) - goto quit; - - // Create menus - menu = LT_NewMenuTags( - LAMN_LayoutHandle, (ULONG)h, - LAMN_TitleID, STR_PREFS_MENU, - LAMN_ItemID, STR_PREFS_ITEM_ABOUT, - LAMN_UserData, MSG_ABOUT, - LAMN_ItemText, (ULONG)NM_BARLABEL, - LAMN_ItemID, STR_PREFS_ITEM_START, - LAMN_UserData, MSG_OK, - LAMN_ItemID, STR_PREFS_ITEM_ZAP_PRAM, - LAMN_UserData, MSG_ZAP_PRAM, - LAMN_ItemText, (ULONG)NM_BARLABEL, - LAMN_ItemID, STR_PREFS_ITEM_QUIT, - LAMN_UserData, MSG_CANCEL, - LAMN_KeyText, (ULONG)"Q", - TAG_END - ); - - // Create window contents - VGROUP; - VGROUP; - LT_New(h, LA_Type, TAB_KIND, - LATB_LabelTable, (ULONG)labels, - LATB_AutoPageID, GAD_PAGEGROUP, - LATB_FullWidth, TRUE, - TAG_END - ); - ENDGROUP; - - // Panes - LT_New(h, LA_Type, VERTICAL_KIND, - LA_ID, GAD_PAGEGROUP, - LAGR_ActivePage, 0, - TAG_END - ); - create_volumes_pane(h); - create_scsi_pane(h); - create_graphics_pane(h); - create_serial_pane(h); - create_memory_pane(h); - ENDGROUP; - - // Separator between tabs and buttons - VGROUP; - LT_New(h, LA_Type, XBAR_KIND, - LAXB_FullSize, TRUE, - TAG_END - ); - ENDGROUP; - - // "Start" and "Quit" buttons - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_START_BUTTON, - LA_ID, MSG_OK, - LABT_ReturnKey, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_QUIT_BUTTON, - LA_ID, MSG_CANCEL, - LABT_EscKey, TRUE, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Open window - win = LT_Build(h, - LAWN_TitleID, STR_PREFS_TITLE, - LAWN_Menu, (ULONG)menu, - LAWN_IDCMP, IDCMP_CLOSEWINDOW, - LAWN_BelowMouse, TRUE, - LAWN_SmartZoom, TRUE, - WA_SimpleRefresh, TRUE, - WA_Activate, TRUE, - WA_CloseGadget, TRUE, - WA_DepthGadget, TRUE, - WA_DragBar, TRUE, - TAG_END - ); - if (win == NULL) - goto quit; - - // Create file requesters - dev_request = (struct FileRequester *)AllocAslRequestTags(ASL_FileRequest, - ASLFR_DoPatterns, TRUE, - ASLFR_RejectIcons, TRUE, - ASLFR_InitialDrawer, (ULONG)"DEVS:", - ASLFR_InitialPattern, (ULONG)"#?.device", - TAG_END - ); - file_request = (struct FileRequester *)AllocAslRequestTags(ASL_FileRequest, - ASLFR_DoPatterns, TRUE, - ASLFR_RejectIcons, TRUE, - ASLFR_InitialPattern, (ULONG)"#?", - TAG_END - ); - - // Event loop - do { - struct IntuiMessage *msg; - - // Wait for message - WaitPort(win->UserPort); - - // Get pending messages - while (msg = LT_GetIMsg(h)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - struct Gadget *gad = (struct Gadget *)msg->IAddress; - LT_ReplyIMsg(msg); - - // Handle message according to class - switch (cl) { - case IDCMP_CLOSEWINDOW: - retval = false; - done = true; - break; - - case IDCMP_GADGETUP: - switch (gad->GadgetID) { - case MSG_OK: - read_settings(h); - SavePrefs(); - retval = true; - done = true; - break; - - case MSG_CANCEL: - retval = false; - done = true; - break; - - case GAD_DISK_LIST: - ghost_volumes_gadgets(h); - break; - - case GAD_ADD_VOLUME: - LT_LockWindow(win); - add_edit_volume(h, true); - LT_UnlockWindow(win); - break; - - case GAD_EDIT_VOLUME: - LT_LockWindow(win); - add_edit_volume(h, false); - LT_UnlockWindow(win); - break; - - case GAD_REMOVE_VOLUME: - remove_volume(h); - break; - - case GAD_BOOTDRIVER: - switch (code) { - case 0: - PrefsReplaceInt32("bootdriver", 0); - break; - case 1: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - } - break; - - case GAD_SCSI_MEMTYPE: - PrefsReplaceInt32("scsimemtype", code); - break; - - case GAD_VIDEO_TYPE: - ghost_graphics_gadgets(h); - break; - - case GAD_FRAMESKIP: - switch (code) { - case 0: - PrefsReplaceInt32("frameskip", 12); - break; - case 1: - PrefsReplaceInt32("frameskip", 8); - break; - case 2: - PrefsReplaceInt32("frameskip", 6); - break; - case 3: - PrefsReplaceInt32("frameskip", 4); - break; - case 4: - PrefsReplaceInt32("frameskip", 2); - break; - case 5: - PrefsReplaceInt32("frameskip", 1); - break; - } - break; - - case GAD_MODELID: - switch (code) { - case 0: - PrefsReplaceInt32("modelid", 5); - break; - case 1: - PrefsReplaceInt32("modelid", 14); - break; - } - break; - } - break; - - case IDCMP_IDCMPUPDATE: - switch (gad->GadgetID) { - case GAD_DISK_LIST: // Double-click on volumes list = edit volume - LT_LockWindow(win); - add_edit_volume(h, false); - LT_UnlockWindow(win); - break; - - case GAD_SCREEN_MODE: - screen_mode_req(win, h); - break; - - case GAD_AHI_MODE: - ahi_mode_req(win, h); - break; - - case GAD_CDROM_DEVICE: - case GAD_SCSI0_DEVICE: - case GAD_SCSI1_DEVICE: - case GAD_SCSI2_DEVICE: - case GAD_SCSI3_DEVICE: - case GAD_SCSI4_DEVICE: - case GAD_SCSI5_DEVICE: - case GAD_SCSI6_DEVICE: - case GAD_SERIALA_DEVICE: - case GAD_SERIALB_DEVICE: - if (dev_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(dev_request, - ASLFR_Window, (ULONG)win, - ASLFR_InitialDrawer, (ULONG) "Devs:", - TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, dev_request->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - - case GAD_ETHER_DEVICE: - if (dev_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(dev_request, - ASLFR_Window, (ULONG)win, - ASLFR_InitialDrawer, (ULONG) "Devs:Networks", - TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, dev_request->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - - case GAD_ROM_FILE: - if (file_request) { - LT_LockWindow(win); - BOOL result = AslRequestTags(file_request, ASLFR_Window, (ULONG)win, TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - strncpy(str, file_request->rf_Dir, 255); - str[255] = 0; - AddPart(str, file_request->rf_File, 255); - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - } - break; - - case IDCMP_MENUPICK: - while (code != MENUNULL) { - struct MenuItem *item = ItemAddress(menu, code); - if (item == NULL) - break; - switch ((ULONG)GTMENUITEM_USERDATA(item)) { - case MSG_OK: - read_settings(h); - SavePrefs(); - retval = true; - done = true; - break; - - case MSG_CANCEL: - retval = false; - done = true; - break; - - case MSG_ABOUT: { - char str[256]; - sprintf(str, GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - strncat(str, "\n", 255); - strncat(str, GetString(STR_ABOUT_TEXT2), 255); - - EasyStruct req; - req.es_StructSize = sizeof(EasyStruct); - req.es_Flags = 0; - req.es_Title = (UBYTE *)GetString(STR_ABOUT_TITLE); - req.es_TextFormat = (UBYTE *)str; - req.es_GadgetFormat = (UBYTE *)GetString(STR_OK_BUTTON); - LT_LockWindow(win); - EasyRequest(win, &req, NULL); - LT_UnlockWindow(win); - break; - } - - case MSG_ZAP_PRAM: - ZapPRAM(); - break; - } - code = item->NextSelect; - } - break; - } - } - } while (!done); - -quit: - // Free requesters - FreeAslRequest(dev_request); - FreeAslRequest(file_request); - - // Delete Menus - LT_DisposeMenu(menu); - - // Delete handle - LT_DeleteHandle(h); - - // Close gtlayout.library - CloseLibrary(GTLayoutBase); - return retval; -} - - -/* - * "Volumes" pane - */ - -static struct List disk_list; -static char cdrom_name[256], extfs_name[256]; -static ULONG cdrom_unit, cdrom_flags, cdrom_start, cdrom_size, cdrom_bsize; -static BYTE bootdriver_num, nocdrom; - -// Read volumes preferences -static void parse_volumes_prefs(void) -{ - NewList(&disk_list); - const char *str; - for (int i=0; (str = PrefsFindString("disk", i)) != NULL; i++) { - struct Node *item = (struct Node *)AllocMem(sizeof(struct Node), MEMF_CLEAR); - item->ln_Name = (char *)str; - AddTail(&disk_list, item); - } - - cdrom_name[0] = 0; - cdrom_unit = 0; cdrom_flags = 0; cdrom_start = 0; cdrom_size = 0; cdrom_bsize = 2048; - - str = PrefsFindString("cdrom"); - if (str) - sscanf(str, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", cdrom_name, &cdrom_unit, &cdrom_flags, &cdrom_start, &cdrom_size, &cdrom_bsize); - - bootdriver_num = 0; - - int bootdriver = PrefsFindInt32("bootdriver"); - switch (bootdriver) { - case 0: - bootdriver_num = 0; - break; - case CDROMRefNum: - bootdriver_num = 1; - break; - } - - nocdrom = PrefsFindBool("nocdrom"); - - extfs_name[0] = 0; - str = PrefsFindString("extfs"); - if (str) - strncpy(extfs_name, str, sizeof(extfs_name) - 1); -} - -// Ghost/unghost "Edit" and "Remove" buttons -static void ghost_volumes_gadgets(struct LayoutHandle *h) -{ - UWORD sel = LT_GetAttributes(h, GAD_DISK_LIST, TAG_END); - if (sel == 0xffff) { - LT_SetAttributes(h, GAD_EDIT_VOLUME, GA_Disabled, TRUE, TAG_END); - LT_SetAttributes(h, GAD_REMOVE_VOLUME, GA_Disabled, TRUE, TAG_END); - } else { - LT_SetAttributes(h, GAD_EDIT_VOLUME, GA_Disabled, FALSE, TAG_END); - LT_SetAttributes(h, GAD_REMOVE_VOLUME, GA_Disabled, FALSE, TAG_END); - } -} - -// Get device data from partition name -static void analyze_partition(const char *part, char *dev_name, ULONG &dev_unit, ULONG &dev_flags, ULONG &dev_start, ULONG &dev_size, ULONG &dev_bsize) -{ - // Remove everything after and including the ':' - char str[256]; - strncpy(str, part, sizeof(str) - 1); - str[sizeof(str) - 1] = 0; - char *colon = strchr(str, ':'); - if (colon) - *colon = 0; - - // Look for partition - struct DosList *dl = LockDosList(LDF_DEVICES | LDF_READ); - dl = FindDosEntry(dl, str, LDF_DEVICES); - if (dl) { - // Get File System Startup Message - struct FileSysStartupMsg *fssm = (struct FileSysStartupMsg *)(dl->dol_misc.dol_handler.dol_Startup << 2); - if (fssm) { - // Get DOS environment vector - struct DosEnvec *de = (struct DosEnvec *)(fssm->fssm_Environ << 2); - if (de && de->de_TableSize >= DE_UPPERCYL) { - // Read settings from FSSM and Envec - strncpy(dev_name, (char *)(fssm->fssm_Device << 2) + 1, 255); - dev_name[255] = 0; - dev_unit = fssm->fssm_Unit; - dev_flags = fssm->fssm_Flags; - dev_start = de->de_BlocksPerTrack * de->de_Surfaces * de->de_LowCyl; - dev_size = de->de_BlocksPerTrack * de->de_Surfaces * (de->de_HighCyl - de->de_LowCyl + 1); - dev_bsize = de->de_SizeBlock << 2; - } - } - } - UnLockDosList(LDF_DEVICES | LDF_READ); -} - -// Display and handle "Add/Edit Volume" window -static void add_edit_volume(struct LayoutHandle *h2, bool adding) -{ - bool ok_clicked = false; - - UWORD sel = LT_GetAttributes(h2, GAD_DISK_LIST, TAG_END); - if ((sel == 0xffff) && !adding) - return; - - char dev_name[256] = ""; - char file_name[256] = ""; - ULONG dev_unit = 0, dev_flags = 0, dev_start = 0, dev_size = 0, dev_bsize = 512; - BYTE read_only = false, is_device = false; - - if (!adding) { - const char *str = PrefsFindString("disk", sel); - if (str == NULL) - return; - if (str[0] == '*') { - read_only = true; - str++; - } - if (strstr(str, "/dev/") == str) { - is_device = true; - sscanf(str, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", dev_name, &dev_unit, &dev_flags, &dev_start, &dev_size, &dev_bsize); - } else { - strncpy(file_name, str, sizeof(file_name) - 1); - file_name[sizeof(file_name) - 1] = 0; - } - } - - // Create layout handle - struct LayoutHandle *h = NULL; - struct Window *win = NULL; - h = LT_CreateHandleTags(NULL, - LAHN_AutoActivate, FALSE, - LAHN_LocaleHook, (ULONG)&locale_hook, - TAG_END - ); - if (h == NULL) - return; - - // Create window contents - VGROUP; - // Volume gadgets - VGROUP; - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_VOL_READONLY_CTRL, - LA_ID, GAD_VOLUME_READONLY, - LA_BYTE, (ULONG)&read_only, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_VOL_TYPE_CTRL, - LA_ID, GAD_VOLUME_TYPE, - LACY_AutoPageID, GAD_VOLUME_PAGEGROUP, - LACY_FirstLabel, STR_VOL_FILE_LAB, - LACY_LastLabel, STR_VOL_DEVICE_LAB, - LA_BYTE, (ULONG)&is_device, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_ID, GAD_VOLUME_PAGEGROUP, - LAGR_ActivePage, is_device, - TAG_END - ); - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_VOL_FILE_CTRL, - LA_ID, GAD_VOLUME_FILE, - LA_Chars, 20, - LA_STRPTR, (ULONG)file_name, - GTST_MaxChars, sizeof(file_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_VOLUME_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)dev_name, - GTST_MaxChars, sizeof(dev_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_VOLUME_UNIT, - LA_LONG, (ULONG)&dev_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_OPENFLAGS_CTRL, - LA_ID, GAD_VOLUME_OPENFLAGS, - LA_LONG, (ULONG)&dev_flags, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_STARTBLOCK_CTRL, - LA_ID, GAD_VOLUME_STARTBLOCK, - LA_LONG, (ULONG)&dev_start, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_SIZE_CTRL, - LA_ID, GAD_VOLUME_SIZE, - LA_LONG, (ULONG)&dev_size, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_VOL_BLOCKSIZE_CTRL, - LA_ID, GAD_VOLUME_BLOCKSIZE, - LA_LONG, (ULONG)&dev_bsize, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Separator between gadgets and buttons - VGROUP; - LT_New(h, LA_Type, XBAR_KIND, - LAXB_FullSize, TRUE, - TAG_END - ); - ENDGROUP; - - // "OK" and "Cancel" buttons - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_OK_BUTTON, - LA_ID, MSG_OK, - LABT_ReturnKey, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_CANCEL_BUTTON, - LA_ID, MSG_CANCEL, - LABT_EscKey, TRUE, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - // Open window - win = LT_Build(h, - LAWN_TitleID, adding ? STR_ADD_VOLUME_TITLE : STR_EDIT_VOLUME_TITLE, - LAWN_IDCMP, IDCMP_CLOSEWINDOW, - LAWN_BelowMouse, TRUE, - LAWN_SmartZoom, TRUE, - WA_SimpleRefresh, TRUE, - WA_Activate, TRUE, - WA_CloseGadget, TRUE, - WA_DepthGadget, TRUE, - WA_DragBar, TRUE, - TAG_END - ); - if (win == NULL) { - LT_DeleteHandle(h); - return; - } - - // Event loop - bool done = false; - do { - struct IntuiMessage *msg; - - // Wait for message - WaitPort(win->UserPort); - - // Get pending messages - while (msg = LT_GetIMsg(h)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - struct Gadget *gad = (struct Gadget *)msg->IAddress; - LT_ReplyIMsg(msg); - - // Handle message according to class - switch (cl) { - case IDCMP_CLOSEWINDOW: - done = true; - break; - - case IDCMP_GADGETUP: - switch (gad->GadgetID) { - case MSG_OK: - ok_clicked = true; - done = true; - break; - case MSG_CANCEL: - done = true; - break; - } - break; - - case IDCMP_IDCMPUPDATE: { - struct FileRequester *req = NULL; - switch (gad->GadgetID) { - case GAD_VOLUME_FILE: - req = file_request; - goto do_req; - case GAD_VOLUME_DEVICE: - req = dev_request; -do_req: if (req) { - LT_LockWindow(win); - BOOL result = AslRequestTags(req, ASLFR_Window, (ULONG)win, TAG_END); - LT_UnlockWindow(win); - if (result) { - char *str; - GT_GetGadgetAttrs(gad, win, NULL, GTST_String, (ULONG)&str, TAG_END); - if (gad->GadgetID == GAD_VOLUME_FILE) { - strncpy(str, req->rf_Dir, 255); - str[255] = 0; - AddPart(str, req->rf_File, 255); - } else { - if (strlen(req->rf_File)) { - strncpy(str, req->rf_File, 255); // Don't copy the directory part. This is usually "DEVS:" and we don't need that. - str[255] = 0; - } else if (strlen(req->rf_Dir) && req->rf_Dir[strlen(req->rf_Dir) - 1] == ':') { - analyze_partition(req->rf_Dir, str, dev_unit, dev_flags, dev_start, dev_size, dev_bsize); - LT_SetAttributes(h, GAD_VOLUME_UNIT, GTIN_Number, dev_unit, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_OPENFLAGS, GTIN_Number, dev_flags, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_STARTBLOCK, GTIN_Number, dev_start, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_SIZE, GTIN_Number, dev_size, TAG_END); - LT_SetAttributes(h, GAD_VOLUME_BLOCKSIZE, GTIN_Number, dev_bsize, TAG_END); - } - } - LT_SetAttributes(h, gad->GadgetID, GTST_String, (ULONG)str, TAG_END); - } - } - break; - } - break; - } - } - } - } while (!done); - - // Update preferences and list view - if (ok_clicked) { - char str[256]; - LT_UpdateStrings(h); - - if (is_device) - sprintf(str, "%s/dev/%s/%ld/%ld/%ld/%ld/%ld", read_only ? "*" : "", dev_name, dev_unit, dev_flags, dev_start, dev_size, dev_bsize); - else - sprintf(str, "%s%s", read_only ? "*" : "", file_name); - LT_SetAttributes(h2, GAD_DISK_LIST, GTLV_Labels, ~0, TAG_END); - - if (adding) { - - // Add new item - int i; - PrefsAddString("disk", str); - struct Node *item = (struct Node *)AllocMem(sizeof(struct Node), MEMF_CLEAR); - for (i=0; PrefsFindString("disk", i); i++) ; - item->ln_Name = (char *)PrefsFindString("disk", i - 1); - AddTail(&disk_list, item); - - } else { - - // Replace existing item - PrefsReplaceString("disk", str, sel); - struct Node *item = disk_list.lh_Head; - for (int i=0; item->ln_Succ; i++) { - if (i == sel) { - item->ln_Name = (char *)PrefsFindString("disk", sel); - break; - } - item = item->ln_Succ; - } - } - LT_SetAttributes(h2, GAD_DISK_LIST, GTLV_Labels, (ULONG)&disk_list, TAG_END); - ghost_volumes_gadgets(h2); - } - - // Delete handle - LT_DeleteHandle(h); -} - -// Remove volume from list -static void remove_volume(struct LayoutHandle *h) -{ - UWORD sel = LT_GetAttributes(h, GAD_DISK_LIST, TAG_END); - if (sel != 0xffff) { - - // Remove item from preferences and list view - LT_SetAttributes(h, GAD_DISK_LIST, GTLV_Labels, ~0, TAG_END); - PrefsRemoveItem("disk", sel); - struct Node *item = disk_list.lh_Head; - for (int i=0; item->ln_Succ; i++) { - struct Node *next = item->ln_Succ; - if (i == sel) { - Remove(item); - FreeMem(item, sizeof(struct Node)); - break; - } - item = next; - } - LT_SetAttributes(h, GAD_DISK_LIST, GTLV_Labels, (ULONG)&disk_list, GTLV_Selected, 0xffff, TAG_END); - ghost_volumes_gadgets(h); - } -} - -// Read settings from gadgets and set preferences -static void read_volumes_settings(void) -{ - struct Node *item = disk_list.lh_Head; - while (item->ln_Succ) { - struct Node *next = item->ln_Succ; - Remove(item); - FreeMem(item, sizeof(struct Node)); - item = next; - } - - if (strlen(cdrom_name)) { - char str[256]; - sprintf(str, "/dev/%s/%ld/%ld/%ld/%ld/%ld", cdrom_name, cdrom_unit, cdrom_flags, cdrom_start, cdrom_size, cdrom_bsize); - PrefsReplaceString("cdrom", str); - } else - PrefsRemoveItem("cdrom"); - - PrefsReplaceBool("nocdrom", nocdrom); - - if (strlen(extfs_name)) - PrefsReplaceString("extfs", extfs_name); -} - -// Create "Volumes" pane -static void create_volumes_pane(struct LayoutHandle *h) -{ - parse_volumes_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_VOLUMES_CTRL, - TAG_END - ); - VGROUP; - LT_New(h, LA_Type, LISTVIEW_KIND, - LA_ID, GAD_DISK_LIST, - LA_Chars, 20, - GTLV_Labels, (ULONG)&disk_list, - LALV_Lines, 6, - LALV_Link, (ULONG)NIL_LINK, - LALV_ResizeX, TRUE, - LALV_ResizeY, TRUE, - LALV_Selected, 0, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, HORIZONTAL_KIND, - LAGR_SameSize, TRUE, - LAGR_Spread, TRUE, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_ADD_VOLUME_BUTTON, - LA_ID, GAD_ADD_VOLUME, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_EDIT_VOLUME_BUTTON, - LA_ID, GAD_EDIT_VOLUME, - TAG_END - ); - LT_New(h, LA_Type, BUTTON_KIND, - LA_LabelID, STR_REMOVE_VOLUME_BUTTON, - LA_ID, GAD_REMOVE_VOLUME, - TAG_END - ); - ENDGROUP; - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_CDROM_DRIVE_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_CDROM_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)cdrom_name, - GTST_MaxChars, sizeof(cdrom_name) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_CDROM_UNIT, - LA_LONG, (ULONG)&cdrom_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_BOOTDRIVER_CTRL, - LA_ID, GAD_BOOTDRIVER, - LACY_FirstLabel, STR_BOOT_ANY_LAB, - LACY_LastLabel, STR_BOOT_CDROM_LAB, - LA_BYTE, (ULONG)&bootdriver_num, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_NOCDROM_CTRL, - LA_ID, GAD_NOCDROM, - LA_BYTE, (ULONG)&nocdrom, - TAG_END - ); - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_EXTFS_CTRL, - LA_ID, GAD_EXTFS, - LA_Chars, 20, - LA_STRPTR, (ULONG)extfs_name, - GTST_MaxChars, sizeof(extfs_name) - 1, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "SCSI" pane - */ - -static char scsi_dev[6][256]; -static LONG scsi_unit[6]; -static LONG scsi_memtype; - -// Read SCSI preferences -static void parse_scsi_prefs(void) -{ - for (int i=0; i<7; i++) { - scsi_dev[i][0] = 0; - scsi_unit[i] = 0; - - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", i); - const char *str = PrefsFindString(prefs_name); - if (str) - sscanf(str, "%[^/]/%ld", scsi_dev[i], &scsi_unit[i]); - } - - scsi_memtype = PrefsFindInt32("scsimemtype"); -} - -// Read settings from gadgets and set preferences -static void read_scsi_settings(void) -{ - for (int i=0; i<7; i++) { - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", i); - - if (strlen(scsi_dev[i])) { - char str[256]; - sprintf(str, "%s/%ld", scsi_dev[i], scsi_unit[i]); - PrefsReplaceString(prefs_name, str); - } else - PrefsRemoveItem(prefs_name); - } -} - -// Create "SCSI" pane -static void create_scsi_pane(struct LayoutHandle *h) -{ - parse_scsi_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SCSI_DEVICES_CTRL, - TAG_END - ); - for (int i=0; i<7; i++) { - HGROUP; - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_SCSI_ID_0 + i, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SCSI0_DEVICE + i, - LA_Chars, 20, - LA_STRPTR, (ULONG)scsi_dev[i], - GTST_MaxChars, sizeof(scsi_dev[i]) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SCSI0_UNIT + i, - LA_Chars, 4, - LA_LONG, (ULONG)&scsi_unit[i], - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - } - ENDGROUP; - VGROUP; - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_SCSI_MEMTYPE_CTRL, - LA_ID, GAD_SCSI_MEMTYPE, - LACY_FirstLabel, STR_MEMTYPE_CHIP_LAB, - LACY_LastLabel, STR_MEMTYPE_ANY_LAB, - LA_LONG, (ULONG)&scsi_memtype, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "Graphics/Sound" pane - */ - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_PIP, - DISPLAY_SCREEN -}; - -static LONG display_type; -static LONG dis_width, dis_height; -static ULONG mode_id; -static BYTE frameskip_num; -static struct NameInfo mode_name; -static ULONG ahi_id; -static char ahi_mode_name[256]; -static BYTE nosound; - -// Read graphics preferences -static void parse_graphics_prefs(void) -{ - display_type = DISPLAY_WINDOW; - dis_width = 512; - dis_height = 384; - mode_id = 0; - ahi_id = AHI_DEFAULT_ID; - ahi_mode_name[0] = 0; - - frameskip_num = 0; - int frameskip = PrefsFindInt32("frameskip"); - switch (frameskip) { - case 12: - frameskip_num = 0; - break; - case 8: - frameskip_num = 1; - break; - case 6: - frameskip_num = 2; - break; - case 4: - frameskip_num = 3; - break; - case 2: - frameskip_num = 4; - break; - case 1: - frameskip_num = 5; - break; - } - - const char *str = PrefsFindString("screen"); - if (str) { - if (sscanf(str, "win/%ld/%ld", &dis_width, &dis_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(str, "pip/%ld/%ld", &dis_width, &dis_height) == 2) - display_type = DISPLAY_PIP; - else if (sscanf(str, "scr/%08lx", &mode_id) == 1) - display_type = DISPLAY_SCREEN; - } - - GetDisplayInfoData(NULL, (UBYTE *)&mode_name, sizeof(mode_name), DTAG_NAME, mode_id); - - str = PrefsFindString("sound"); - if (str) { - if (sscanf(str, "ahi/%08lx", &ahi_id) == 1 && AHIBase) { - AHI_GetAudioAttrs(ahi_id, NULL, - AHIDB_Name, (ULONG)ahi_mode_name, - AHIDB_BufferLen, sizeof(ahi_mode_name) - 1, - TAG_END - ); - } - } - nosound = PrefsFindBool("nosound"); -} - -// Ghost/unghost graphics gadgets, depending on display type -static void ghost_graphics_gadgets(struct LayoutHandle *h) -{ - bool dis_xy, dis_skip, dis_mode; - switch (display_type) { - case DISPLAY_WINDOW: - dis_xy = false; - dis_skip = false; - dis_mode = true; - break; - case DISPLAY_PIP: - dis_xy = false; - dis_skip = true; - dis_mode = true; - break; - case DISPLAY_SCREEN: - dis_xy = true; - dis_skip = true; - dis_mode = false; - break; - } - LT_SetAttributes(h, GAD_DISPLAY_X, GA_Disabled, dis_xy, TAG_END); - LT_SetAttributes(h, GAD_DISPLAY_Y, GA_Disabled, dis_xy, TAG_END); - LT_SetAttributes(h, GAD_FRAMESKIP, GA_Disabled, dis_skip, TAG_END); - LT_SetAttributes(h, GAD_SCREEN_MODE, GA_Disabled, dis_mode, TAG_END); - LT_SetAttributes(h, GAD_AHI_MODE, GA_Disabled, AHIBase == NULL, TAG_END); -} - -// Show screen mode requester -static void screen_mode_req(struct Window *win, struct LayoutHandle *h) -{ - if (P96Base == NULL && CyberGfxBase == NULL) - return; - - LT_LockWindow(win); - - ULONG id; - - // Try P96 first, because it also provides a (fake) cybergraphics.library - if (P96Base) { - id = p96RequestModeIDTags( - P96MA_MinDepth, 8, - P96MA_FormatsAllowed, RGBFF_CLUT | RGBFF_R5G5B5 | RGBFF_A8R8G8B8, - TAG_END - ); - } else { - UWORD ModelArray[] = { PIXFMT_LUT8, PIXFMT_RGB15, PIXFMT_ARGB32, 0, ~0 }; - id = (ULONG) CModeRequestTags(NULL, - CYBRMREQ_MinDepth, 8, - CYBRMREQ_CModelArray, (ULONG) ModelArray, - TAG_END - ); - } - LT_UnlockWindow(win); - - if (id != INVALID_ID) { - mode_id = id; - GetDisplayInfoData(NULL, (UBYTE *)&mode_name, sizeof(mode_name), DTAG_NAME, mode_id); - LT_SetAttributes(h, GAD_SCREEN_MODE, GTTX_Text, (ULONG)mode_name.Name, TAG_END); - } -} - -// Show AHI mode requester -static void ahi_mode_req(struct Window *win, struct LayoutHandle *h) -{ - if (AHIBase == NULL) - return; - - struct AHIAudioModeRequester *req = AHI_AllocAudioRequest( - AHIR_Window, (ULONG)win, - TAG_END - ); - if (req == NULL) - return; - - LT_LockWindow(win); - BOOL ok = AHI_AudioRequest(req, - AHIR_InitialAudioID, ahi_id, - TAG_END - ); - LT_UnlockWindow(win); - - if (ok) { - ahi_id = req->ahiam_AudioID; - AHI_GetAudioAttrs(ahi_id, NULL, - AHIDB_Name, (ULONG)ahi_mode_name, - AHIDB_BufferLen, sizeof(ahi_mode_name) - 1, - TAG_END - ); - LT_SetAttributes(h, GAD_AHI_MODE, GTTX_Text, (ULONG)ahi_mode_name, TAG_END); - } - AHI_FreeAudioRequest(req); -} - -// Read settings from gadgets and set preferences -static void read_graphics_settings(void) -{ - char str[256]; - switch (display_type) { - case DISPLAY_WINDOW: - sprintf(str, "win/%ld/%ld", dis_width, dis_height); - break; - case DISPLAY_PIP: - sprintf(str, "pip/%ld/%ld", dis_width, dis_height); - break; - case DISPLAY_SCREEN: - sprintf(str, "scr/%08lx", mode_id); - break; - default: - PrefsRemoveItem("screen"); - return; - } - PrefsReplaceString("screen", str); - - sprintf(str, "ahi/%08lx", ahi_id); - PrefsReplaceString("sound", str); - - PrefsReplaceBool("nosound", nosound); -} - -// Create "Graphics/Sound" pane -static void create_graphics_pane(struct LayoutHandle *h) -{ - parse_graphics_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_GRAPHICS_CTRL, - TAG_END - ); - static const LONG labels[] = {STR_WINDOW_LAB, STR_PIP_LAB, STR_FULLSCREEN_LAB, -1}; - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_VIDEO_TYPE_CTRL, - LA_ID, GAD_VIDEO_TYPE, - LACY_LabelTable, (ULONG)labels, - LA_LONG, (ULONG)&display_type, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_DISPLAY_X_CTRL, - LA_ID, GAD_DISPLAY_X, - LA_LONG, (ULONG)&dis_width, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_DISPLAY_Y_CTRL, - LA_ID, GAD_DISPLAY_Y, - LA_LONG, (ULONG)&dis_height, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, POPUP_KIND, - LA_LabelID, STR_FRAMESKIP_CTRL, - LA_ID, GAD_FRAMESKIP, - LAPU_FirstLabel, STR_REF_5HZ_LAB, - LAPU_LastLabel, STR_REF_60HZ_LAB, - LA_BYTE, (ULONG)&frameskip_num, - TAG_END - ); - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_SCREEN_MODE_CTRL, - LA_ID, GAD_SCREEN_MODE, - LA_Chars, DISPLAYNAMELEN, - LATX_Picker, TRUE, - GTTX_Text, (ULONG)mode_name.Name, - GTTX_Border, TRUE, - TAG_END - ); - ENDGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SOUND_CTRL, - TAG_END - ); - LT_New(h, LA_Type, TEXT_KIND, - LA_LabelID, STR_AHI_MODE_CTRL, - LA_ID, GAD_AHI_MODE, - LA_Chars, DISPLAYNAMELEN, - LATX_Picker, TRUE, - GTTX_Text, (ULONG)ahi_mode_name, - GTTX_Border, TRUE, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_NOSOUND_CTRL, - LA_ID, GAD_NOSOUND, - LA_BYTE, (ULONG)&nosound, - TAG_END - ); - ENDGROUP; - ENDGROUP; - - ghost_graphics_gadgets(h); -} - - -/* - * "Serial/Network" pane - */ - -static char seriala_dev[256], serialb_dev[256]; -static LONG seriala_unit, serialb_unit; -static BYTE seriala_ispar, serialb_ispar; - -static char ether_dev[256]; -static ULONG ether_unit; - -// Read serial/network preferences -static void parse_ser_prefs(const char *prefs, char *dev, LONG &unit, BYTE &ispar) -{ - dev[0] = 0; - unit = 0; - ispar = false; - - const char *str = PrefsFindString(prefs); - if (str) { - if (str[0] == '*') { - ispar = true; - str++; - } - sscanf(str, "%[^/]/%ld", dev, &unit); - } -} - -static void parse_serial_prefs(void) -{ - parse_ser_prefs("seriala", seriala_dev, seriala_unit, seriala_ispar); - parse_ser_prefs("serialb", serialb_dev, serialb_unit, serialb_ispar); - - ether_dev[0] = 0; - ether_unit = 0; - - const char *str = PrefsFindString("ether"); - if (str) { - const char *FirstSlash = strchr(str, '/'); - const char *LastSlash = strrchr(str, '/'); - - if (FirstSlash && FirstSlash && FirstSlash != LastSlash) { - // Device name contains path, i.e. "Networks/xyzzy.device" - const char *lp = str; - char *dp = ether_dev; - - while (lp != LastSlash) - *dp++ = *lp++; - *dp = '\0'; - - sscanf(LastSlash, "/%ld", ðer_unit); - -// printf("dev=<%s> unit=%d\n", ether_dev, ether_unit); - } else { - sscanf(str, "%[^/]/%ld", ether_dev, ðer_unit); - } - } -} - -// Set serial preference item -static void make_serial_prefs(const char *prefs, const char *dev, LONG unit, BYTE ispar) -{ - if (strlen(dev)) { - char str[256]; - sprintf(str, "%s%s/%ld", ispar ? "*" : "", dev, unit); - PrefsReplaceString(prefs, str); - } else - PrefsRemoveItem(prefs); -} - -// Read settings from gadgets and set preferences -static void read_serial_settings(void) -{ - make_serial_prefs("seriala", seriala_dev, seriala_unit, seriala_ispar); - make_serial_prefs("serialb", serialb_dev, serialb_unit, serialb_ispar); - - if (strlen(ether_dev)) { - char str[256]; - - sprintf(str, "%s/%ld", ether_dev, ether_unit); - PrefsReplaceString("ether", str); - } else - PrefsRemoveItem("ether"); -} - -// Create "Serial/Network" pane -static void create_serial_pane(struct LayoutHandle *h) -{ - parse_serial_prefs(); - - VGROUP; - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SERIALA_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SERIALA_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)seriala_dev, - GTST_MaxChars, sizeof(seriala_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SERIALA_UNIT, - LA_LONG, (ULONG)&seriala_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_ISPAR_CTRL, - LA_ID, GAD_SERIALA_ISPAR, - LA_BYTE, (ULONG)&seriala_ispar, - TAG_END - ); - ENDGROUP; - - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_SERIALB_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_SERIALB_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)serialb_dev, - GTST_MaxChars, sizeof(serialb_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_SERIALB_UNIT, - LA_LONG, (ULONG)&serialb_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - LT_New(h, LA_Type, CHECKBOX_KIND, - LA_LabelID, STR_ISPAR_CTRL, - LA_ID, GAD_SERIALB_ISPAR, - LA_BYTE, (ULONG)&serialb_ispar, - TAG_END - ); - ENDGROUP; - - LT_New(h, LA_Type, VERTICAL_KIND, - LA_LabelID, STR_ETHERNET_IF_CTRL, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_DEVICE_CTRL, - LA_ID, GAD_ETHER_DEVICE, - LA_Chars, 20, - LA_STRPTR, (ULONG)ether_dev, - GTST_MaxChars, sizeof(ether_dev) - 1, - LAST_Picker, TRUE, - TAG_END - ); - LT_New(h, LA_Type, INTEGER_KIND, - LA_LabelID, STR_UNIT_CTRL, - LA_ID, GAD_ETHER_UNIT, - LA_LONG, (ULONG)ðer_unit, - LAIN_UseIncrementers, TRUE, - GTIN_MaxChars, 8, - TAG_END - ); - ENDGROUP; - ENDGROUP; -} - - -/* - * "Memory/Misc" pane - */ - -static ULONG ramsize_mb; -static BYTE model_num; -static char rom_file[256]; - -// Read memory/misc preferences -static void parse_memory_prefs(void) -{ - ramsize_mb = PrefsFindInt32("ramsize") >> 20; - - model_num = 0; - int id = PrefsFindInt32("modelid"); - switch (id) { - case 5: - model_num = 0; - break; - case 14: - model_num = 1; - break; - } - - rom_file[0] = 0; - const char *str = PrefsFindString("rom"); - if (str) { - strncpy(rom_file, str, sizeof(rom_file) - 1); - rom_file[sizeof(rom_file) - 1] = 0; - } -} - -// Read settings from gadgets and set preferences -static void read_memory_settings(void) -{ - PrefsReplaceInt32("ramsize", ramsize_mb << 20); - - if (strlen(rom_file)) - PrefsReplaceString("rom", rom_file); - else - PrefsRemoveItem("rom"); -} - -// Create "Memory/Misc" pane -static void create_memory_pane(struct LayoutHandle *h) -{ - parse_memory_prefs(); - - VGROUP; - LT_New(h, LA_Type, LEVEL_KIND, - LA_LabelID, STR_RAMSIZE_SLIDER, - LA_ID, GAD_RAMSIZE, - LA_Chars, 20, - LA_LONG, (ULONG)&ramsize_mb, - GTSL_LevelFormat, (ULONG)GetString(STR_RAMSIZE_FMT), - GTSL_Min, 1, - GTSL_Max, AvailMem(MEMF_LARGEST) >> 20, - TAG_END - ); - LT_New(h, LA_Type, CYCLE_KIND, - LA_LabelID, STR_MODELID_CTRL, - LA_ID, GAD_MODELID, - LACY_FirstLabel, STR_MODELID_5_LAB, - LACY_LastLabel, STR_MODELID_14_LAB, - LA_BYTE, (ULONG)&model_num, - TAG_END - ); - LT_New(h, LA_Type, STRING_KIND, - LA_LabelID, STR_ROM_FILE_CTRL, - LA_ID, GAD_ROM_FILE, - LA_Chars, 20, - LA_STRPTR, (ULONG)rom_file, - GTST_MaxChars, sizeof(rom_file) - 1, - LAST_Picker, TRUE, - TAG_END - ); - ENDGROUP; -} - - -/* - * Read settings from gadgets and set preferences - */ - -static void read_settings(struct LayoutHandle *h) -{ - LT_UpdateStrings(h); - read_volumes_settings(); - read_scsi_settings(); - read_graphics_settings(); - read_serial_settings(); - read_memory_settings(); -} diff --git a/BasiliskII/src/AmigaOS/scsi_amiga.cpp b/BasiliskII/src/AmigaOS/scsi_amiga.cpp deleted file mode 100644 index c660eb268..000000000 --- a/BasiliskII/src/AmigaOS/scsi_amiga.cpp +++ /dev/null @@ -1,289 +0,0 @@ -/* - * scsi_amiga.cpp - SCSI Manager, Amiga specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#define __USE_SYSBASE -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static struct SCSICmd scsi; - -static IOStdReq *ios[8*8]; // IORequests for 8 units and 8 LUNs each -static IOStdReq *io; // Active IORequest (selected target) - -static struct MsgPort *the_port = NULL; // Message port for device communication - -static ULONG buffer_size; // Size of data buffer -static UBYTE *buffer = NULL; // Pointer to data buffer -static ULONG buffer_memf; // Buffer memory flags - -static UBYTE cmd_buffer[12]; // Buffer for SCSI command - -const int SENSE_LENGTH = 256; -static UBYTE *sense_buffer = NULL; // Buffer for autosense data - -static bool direct_transfers_supported = false; // Direct data transfers (bypassing the buffer) are supported - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - int id, lun; - - int memtype = PrefsFindInt32("scsimemtype"); - switch (memtype) { - case 1: - buffer_memf = MEMF_24BITDMA | MEMF_PUBLIC; - break; - case 2: - buffer_memf = MEMF_ANY | MEMF_PUBLIC; - direct_transfers_supported = true; - break; - default: - buffer_memf = MEMF_CHIP | MEMF_PUBLIC; - break; - } - - // Create port and buffers - the_port = CreateMsgPort(); - buffer = (UBYTE *)AllocMem(buffer_size = 0x10000, buffer_memf); - sense_buffer = (UBYTE *)AllocMem(SENSE_LENGTH, MEMF_CHIP | MEMF_PUBLIC); - if (the_port == NULL || buffer == NULL || sense_buffer == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - - // Create and open IORequests for all 8 units (and all 8 LUNs) - for (id=0; id<8; id++) { - for (lun=0; lun<8; lun++) - ios[id*8+lun] = NULL; - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", id); - const char *str = PrefsFindString(prefs_name); - if (str) { - char dev_name[256]; - ULONG dev_unit = 0; - if (sscanf(str, "%[^/]/%ld", dev_name, &dev_unit) == 2) { - for (lun=0; lun<8; lun++) { - struct IOStdReq *io = (struct IOStdReq *)CreateIORequest(the_port, sizeof(struct IOStdReq)); - if (io == NULL) - continue; - if (OpenDevice((UBYTE *) dev_name, dev_unit + lun * 10, (struct IORequest *)io, 0)) { - DeleteIORequest(io); - continue; - } - io->io_Data = &scsi; - io->io_Length = sizeof(scsi); - io->io_Command = HD_SCSICMD; - ios[id*8+lun] = io; - } - } - } - } - - // Reset SCSI bus - SCSIReset(); - - // Init SCSICmd - memset(&scsi, 0, sizeof(scsi)); - scsi.scsi_Command = cmd_buffer; - scsi.scsi_SenseData = sense_buffer; - scsi.scsi_SenseLength = SENSE_LENGTH; -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - // Close all devices - for (int i=0; i<8; i++) - for (int j=0; j<8; j++) { - struct IOStdReq *io = ios[i*8+j]; - if (io) { - CloseDevice((struct IORequest *)io); - DeleteIORequest(io); - } - } - - // Delete port and buffers - if (the_port) - DeleteMsgPort(the_port); - if (buffer) - FreeMem(buffer, buffer_size); - if (sense_buffer) - FreeMem(sense_buffer, SENSE_LENGTH); -} - - -/* - * Check if requested data size fits into buffer, allocate new buffer if needed - */ - -static bool try_buffer(int size) -{ - if (size <= buffer_size) - return true; - - UBYTE *new_buffer = (UBYTE *)AllocMem(size, buffer_memf); - if (new_buffer == NULL) - return false; - FreeMem(buffer, buffer_size); - buffer = new_buffer; - buffer_size = size; - return true; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - scsi.scsi_CmdLength = cmd_length; - memcpy(cmd_buffer, cmd, cmd_length); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return ios[id * 8] != NULL; -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - struct IOStdReq *new_io = ios[id * 8 + lun]; - if (new_io == NULL) - return false; - if (new_io != io) - scsi.scsi_SenseActual = 0; // Clear sense data when selecting new target - io = new_io; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error); timeout is in 1/60 sec - */ - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - // Bypass the buffer if there's only one S/G table entry - bool do_direct_transfer = (sg_size == 1 && ((uint32)sg_ptr[0] & 1) == 0 && direct_transfers_supported); - - if (!do_direct_transfer) { - - // Check if buffer is large enough, allocate new buffer if needed - if (!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - // Process S/G table when writing - if (!reading) { - D(bug(" writing to buffer\n")); - uint8 *buffer_ptr = buffer; - for (int i=0; i -#include -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// These messages are sent to the serial process -const uint32 MSG_QUERY = 'qery'; // Query port status, return status in control_io -const uint32 MSG_SET_PARAMS = 'setp'; // Set serial parameters (parameters in control_io) -const uint32 MSG_SET_PAR_PARAMS = 'pstp'; // Set parallel parameters (parameters in control_io) -const uint32 MSG_KILL_IO = 'kill'; // Kill pending I/O requests -const uint32 MSG_BREAK = 'brek'; // Send break -const uint32 MSG_RESET = 'rset'; // Reset channel -const uint32 MSG_PRIME_IN = 'prin'; // Data input -const uint32 MSG_PRIME_OUT = 'pout'; // Data output - -struct SerMessage : public Message { - SerMessage(uint32 what_, const struct MsgPort *reply_port = NULL) - { - what = what_; - mn_ReplyPort = (struct MsgPort *)reply_port; - mn_Length = sizeof(*this); - } - uint32 what; - uint32 pb; -}; - - -// Driver private variables -class ASERDPort : public SERDPort { -public: - ASERDPort(const char *dev) - { - device_name = dev; - if (dev && dev[0] == '*') { - is_parallel = true; - device_name++; - } else - is_parallel = false; - control_io = NULL; - serial_proc = NULL; - reply_port = NULL; - } - - virtual ~ASERDPort() - { - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - void send_to_proc(uint32 what, uint32 pb = 0); - bool query(void); - bool set_params(void); - bool set_par_params(void); - void conv_error(struct IOExtSer *io, uint32 dt); - static void serial_func(void); - - const char *device_name; // Device name - bool is_parallel; // Flag: Port is parallel - IOExtSer *control_io; // IORequest for setting serial port characteristics etc. - - struct Process *serial_proc; // Serial device handler process - bool proc_error; // Flag: process didn't initialize - struct MsgPort *proc_port; // Message port of process, for communication with main task - struct MsgPort *reply_port; // Reply port for communication with process - - uint8 err_mask; // shkErrs -}; - - -// Global variables -static void *proc_arg; // Argument to process -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -/* - * Initialization - */ - -void SerialInit(void) -{ - // Read serial preferences and create structs for both ports - the_serd_port[0] = new ASERDPort(PrefsFindString("seriala")); - the_serd_port[1] = new ASERDPort(PrefsFindString("serialb")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - delete (ASERDPort *)the_serd_port[0]; - delete (ASERDPort *)the_serd_port[1]; -} - - -/* - * Open serial port - */ - -int16 ASERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (device_name == NULL) - return openErr; - - // Init variables - err_mask = 0; - - // Create message port - reply_port = CreateMsgPort(); - if (reply_port == NULL) - goto open_error; - - // Start process - proc_error = false; - proc_arg = this; - SetSignal(0, SIGF_SINGLE); - serial_proc = CreateNewProcTags( - NP_Entry, (ULONG)serial_func, - NP_Name, (ULONG)"Basilisk II Serial Task", - NP_Priority, 1, - TAG_END - ); - if (serial_proc == NULL) - goto open_error; - - // Wait for signal from process - Wait(SIGF_SINGLE); - - // Initialization error? Then bail out - if (proc_error) - goto open_error; - - // Configure port - configure(config); - return noErr; - -open_error: - serial_proc = NULL; - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return openErr; -} - - -/* - * Read data from port - */ - -int16 ASERDPort::prime_in(uint32 pb, uint32 dce) -{ - // Send input command to serial process - D(bug("primein\n")); - read_done = false; - read_pending = true; - WriteMacInt32(input_dt + serdtDCE, dce); - send_to_proc(MSG_PRIME_IN, pb); - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 ASERDPort::prime_out(uint32 pb, uint32 dce) -{ - // Send output command to serial process - D(bug("primeout\n")); - write_done = false; - write_pending = true; - WriteMacInt32(output_dt + serdtDCE, dce); - send_to_proc(MSG_PRIME_OUT, pb); - return 1; // Command in progress -} - - -/* - * Control calls - */ - -int16 ASERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - D(bug("control(%ld)\n", (uint32)code)); - switch (code) { - case 1: // KillIO - send_to_proc(MSG_KILL_IO); - return noErr; - - case kSERDConfiguration: - if (configure(ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: { - if (is_parallel) - return noErr; - int buf = ReadMacInt16(pb + csParam + 4) & 0xffffffc0; - if (buf < 1024) // 1k minimum - buf = 1024; - D(bug(" buffer size is now %08lx\n", buf)); - control_io->io_RBufLen = buf; - return set_params() ? noErr : paramErr; - } - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDSetBreak: - if (!is_parallel) - send_to_proc(MSG_BREAK); - return noErr; - - case kSERDClearBreak: - return noErr; - - case kSERDBaudRate: - if (is_parallel) - return noErr; - control_io->io_Baud = ReadMacInt16(pb + csParam); - D(bug(" baud rate %ld\n", control_io->io_Baud)); - return set_params() ? noErr : paramErr; - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDClockMIDI: - if (is_parallel) - return noErr; - control_io->io_Baud = 31250; - control_io->io_SerFlags = SERF_XDISABLED | SERF_SHARED; - control_io->io_StopBits = 1; - control_io->io_ReadLen = control_io->io_WriteLen = 8; - return set_params() ? noErr : paramErr; - - case kSERDMiscOptions: - case kSERDAssertDTR: - case kSERDNegateDTR: - case kSERDSetPEChar: - case kSERDSetPEAltChar: - case kSERDAssertRTS: - case kSERDNegateRTS: - return noErr; // Not supported under AmigaOS - - case kSERD115KBaud: - if (is_parallel) - return noErr; - control_io->io_Baud = 115200; - return set_params() ? noErr : paramErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (is_parallel) - return noErr; - control_io->io_Baud = 230400; - return set_params() ? noErr : paramErr; - - case kSERDResetChannel: - send_to_proc(MSG_RESET); - return noErr; - - default: - printf("WARNING: SerialControl(): unimplemented control code %d\n", code); - return controlErr; - } -} - - -/* - * Status calls - */ - -int16 ASERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - D(bug("status(%ld)\n", (uint32)code)); - switch (code) { - case kSERDInputCount: - WriteMacInt32(pb + csParam, 0); - if (!is_parallel) { - if (!query()) - return noErr; - D(bug("status(2) successful, returning %08lx\n", control_io->IOSer.io_Actual)); - WriteMacInt32(pb + csParam, control_io->IOSer.io_Actual); - } - return noErr; - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - if (is_parallel) { - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staCtsHold, 0); - WriteMacInt8(p + staDsrHold, 0); - WriteMacInt8(p + staModemStatus, dsrEvent | dcdEvent | ctsEvent); - } else { - query(); - WriteMacInt8(p + staXOffSent, - (control_io->io_Status & IO_STATF_XOFFREAD ? xOffWasSent : 0) - | (control_io->io_Status & (1 << 6) ? dtrNegated : 0)); // RTS - WriteMacInt8(p + staXOffHold, control_io->io_Status & IO_STATF_XOFFWRITE); - WriteMacInt8(p + staCtsHold, control_io->io_Status & (1 << 4)); // CTS - WriteMacInt8(p + staDsrHold, control_io->io_Status & (1 << 3)); // DSR - WriteMacInt8(p + staModemStatus, - (control_io->io_Status & (1 << 3) ? 0 : dsrEvent) - | (control_io->io_Status & (1 << 2) ? riEvent : 0) - | (control_io->io_Status & (1 << 5) ? 0 : dcdEvent) - | (control_io->io_Status & (1 << 4) ? 0 : ctsEvent) - | (control_io->io_Status & IO_STATF_READBREAK ? breakEvent : 0)); - } - return noErr; - } - - default: - printf("WARNING: SerialStatus(): unimplemented status code %d\n", code); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 ASERDPort::close() -{ - // Stop process - if (serial_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&serial_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - // Delete reply port - if (reply_port) { - DeleteMsgPort(reply_port); - reply_port = NULL; - } - return noErr; -} - - -/* - * Configure serial port with MacOS config word - */ - -bool ASERDPort::configure(uint16 config) -{ - D(bug(" configure %04lx\n", (uint32)config)); - if (is_parallel) - return true; - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - control_io->io_StopBits = 1; - break; - case stop20: - control_io->io_StopBits = 2; - break; - default: - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - control_io->io_SerFlags &= ~SERF_PARTY_ON; - break; - case oddParity: - control_io->io_SerFlags |= SERF_PARTY_ON | SERF_PARTY_ODD; - break; - case evenParity: - control_io->io_SerFlags |= SERF_PARTY_ON; - control_io->io_SerFlags &= ~SERF_PARTY_ODD; - break; - default: - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - case data5: - control_io->io_ReadLen = control_io->io_WriteLen = 5; - break; - case data6: - control_io->io_ReadLen = control_io->io_WriteLen = 6; - break; - case data7: - control_io->io_ReadLen = control_io->io_WriteLen = 7; - break; - case data8: - control_io->io_ReadLen = control_io->io_WriteLen = 8; - break; - } - - // Set baud rate - control_io->io_Baud = 115200 / ((config & 0x03ff) + 2); - return set_params(); -} - - -/* - * Set serial handshaking - */ - -void ASERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - - err_mask = ReadMacInt8(s + shkErrs); - - if (is_parallel) { - - // Parallel handshake - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - ((IOExtPar *)control_io)->io_ParFlags |= PARF_ACKMODE; - else - ((IOExtPar *)control_io)->io_ParFlags &= ~PARF_ACKMODE; - } else { - if (ReadMacInt8(s + shkFCTS)) - ((IOExtPar *)control_io)->io_ParFlags |= PARF_ACKMODE; - else - ((IOExtPar *)control_io)->io_ParFlags &= ~PARF_ACKMODE; - } - set_par_params(); - - } else { - - // Serial handshake - if (ReadMacInt8(s + shkFXOn) || ReadMacInt8(s + shkFInX)) - control_io->io_SerFlags &= ~SERF_XDISABLED; - else - control_io->io_SerFlags |= SERF_XDISABLED; - - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - control_io->io_SerFlags |= SERF_7WIRE; - else - control_io->io_SerFlags &= ~SERF_7WIRE; - } else { - if (ReadMacInt8(s + shkFCTS)) - control_io->io_SerFlags |= SERF_7WIRE; - else - control_io->io_SerFlags &= ~SERF_7WIRE; - } - control_io->io_CtlChar = ReadMacInt16(s + shkXOn) << 16; - set_params(); - } -} - - -/* - * Send message to serial process - */ - -void ASERDPort::send_to_proc(uint32 what, uint32 pb) -{ - D(bug("sending %08lx to serial_proc\n", what)); - SerMessage msg(what, reply_port); - msg.pb = pb; - PutMsg(proc_port, &msg); - WaitPort(reply_port); - GetMsg(reply_port); - D(bug(" sent\n")); -} - - -/* - * Query serial port status - */ - -bool ASERDPort::query(void) -{ - send_to_proc(MSG_QUERY); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Set serial parameters - */ - -bool ASERDPort::set_params(void) -{ - // Set/clear RadBoogie - UBYTE flags = control_io->io_SerFlags; - if (!(flags & SERF_PARTY_ON) && (flags & SERF_XDISABLED) && control_io->io_ReadLen == 8) - control_io->io_SerFlags |= SERF_RAD_BOOGIE; - else - control_io->io_SerFlags &= ~SERF_RAD_BOOGIE; - - // Send message to serial process - send_to_proc(MSG_SET_PARAMS); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Set parallel parameters - */ - -bool ASERDPort::set_par_params(void) -{ - send_to_proc(MSG_SET_PAR_PARAMS); - return control_io->IOSer.io_Error == 0; -} - - -/* - * Convert AmigaOS error code to MacOS error code, set serdtResult and cum_errors - */ - -void ASERDPort::conv_error(struct IOExtSer *io, uint32 dt) -{ - int16 oserr; - uint8 cum; - - BYTE err = io->IOSer.io_Error; - if (err == 0 || err == IOERR_NOCMD) { - oserr = 0; - cum = 0; - } else { - if (is_parallel) { - oserr = (err_mask & framingErr) ? rcvrErr : 0; - cum = framingErr; - } else { - switch (io->IOSer.io_Error) { - case SerErr_DetectedBreak: - oserr = breakRecd; - cum = breakErr; - break; - case SerErr_ParityErr: - oserr = (err_mask & parityErr) ? rcvrErr : 0; - cum = parityErr; - break; - case SerErr_BufOverflow: - oserr = (err_mask & swOverrunErr) ? rcvrErr : 0; - cum = swOverrunErr; - break; - case SerErr_LineErr: - oserr = (err_mask & hwOverrunErr) ? rcvrErr : 0; - cum = hwOverrunErr; - break; - default: - oserr = (err_mask & framingErr) ? rcvrErr : 0; - cum = framingErr; - break; - } - } - } - - WriteMacInt32(dt + serdtResult, oserr); - cum_errors |= cum; -} - - -/* - * Process for communication with the serial.device - */ - -__saveds void ASERDPort::serial_func(void) -{ - struct ASERDPort *obj = (ASERDPort *)proc_arg; - struct MsgPort *proc_port = NULL, *io_port = NULL, *control_port = NULL; - struct IOExtSer *read_io = NULL, *write_io = NULL, *control_io = NULL; - uint8 orig_params[sizeof(struct IOExtSer)]; - bool opened = false; - ULONG io_mask = 0, proc_port_mask = 0; - - // Default: error occured - obj->proc_error = true; - - // Create message port for communication with main task - proc_port = CreateMsgPort(); - if (proc_port == NULL) - goto quit; - proc_port_mask = 1 << proc_port->mp_SigBit; - - // Create message ports for serial.device I/O - io_port = CreateMsgPort(); - if (io_port == NULL) - goto quit; - io_mask = 1 << io_port->mp_SigBit; - control_port = CreateMsgPort(); - if (control_port == NULL) - goto quit; - - // Create IORequests - read_io = (struct IOExtSer *)CreateIORequest(io_port, sizeof(struct IOExtSer)); - write_io = (struct IOExtSer *)CreateIORequest(io_port, sizeof(struct IOExtSer)); - control_io = (struct IOExtSer *)CreateIORequest(control_port, sizeof(struct IOExtSer)); - if (read_io == NULL || write_io == NULL || control_io == NULL) - goto quit; - read_io->IOSer.io_Message.mn_Node.ln_Type = 0; // Avoid CheckIO() bug - write_io->IOSer.io_Message.mn_Node.ln_Type = 0; - control_io->IOSer.io_Message.mn_Node.ln_Type = 0; - - // Parse device name - char dev_name[256]; - ULONG dev_unit; - if (sscanf(obj->device_name, "%[^/]/%ld", dev_name, &dev_unit) < 2) - goto quit; - - // Open device - if (obj->is_parallel) - ((IOExtPar *)read_io)->io_ParFlags = PARF_SHARED; - else - read_io->io_SerFlags = SERF_SHARED | SERF_7WIRE; - if (OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)read_io, 0) || read_io->IOSer.io_Device == NULL) - goto quit; - opened = true; - - // Copy IORequests - memcpy(write_io, read_io, sizeof(struct IOExtSer)); - memcpy(control_io, read_io, sizeof(struct IOExtSer)); - - // Attach control_io to control_port and set default values - control_io->IOSer.io_Message.mn_ReplyPort = control_port; - if (!obj->is_parallel) { - control_io->io_CtlChar = SER_DEFAULT_CTLCHAR; - control_io->io_RBufLen = 64; - control_io->io_ExtFlags = 0; - control_io->io_Baud = 9600; - control_io->io_BrkTime = 250000; - control_io->io_ReadLen = control_io->io_WriteLen = 8; - control_io->io_StopBits = 1; - control_io->io_SerFlags = SERF_SHARED; - control_io->IOSer.io_Command = SDCMD_SETPARAMS; - DoIO((struct IORequest *)control_io); - memcpy(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - } - - // Initialization went well, inform main task - obj->proc_port = proc_port; - obj->control_io = control_io; - obj->proc_error = false; - Signal(MainTask, SIGF_SINGLE); - - // Main loop - for (;;) { - - // Wait for I/O and messages (CTRL_C is used for quitting the task) - ULONG sig = Wait(proc_port_mask | io_mask | SIGBREAKF_CTRL_C); - - // Main task wants to quit us - if (sig & SIGBREAKF_CTRL_C) - break; - - // Main task sent a command to us - if (sig & proc_port_mask) { - struct SerMessage *msg; - while (msg = (SerMessage *)GetMsg(proc_port)) { - D(bug("serial_proc received %08lx\n", msg->what)); - switch (msg->what) { - case MSG_QUERY: - control_io->IOSer.io_Command = SDCMD_QUERY; - DoIO((struct IORequest *)control_io); - D(bug(" query returned %08lx, actual %08lx\n", control_io->IOSer.io_Error, control_io->IOSer.io_Actual)); - break; - - case MSG_SET_PARAMS: - // Only send SDCMD_SETPARAMS when configuration has changed - if (memcmp(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar))) { - memcpy(orig_params, &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - memcpy(&(read_io->io_CtlChar), &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - memcpy(&(write_io->io_CtlChar), &(control_io->io_CtlChar), (uint8 *)&(control_io->io_Status) - (uint8 *)&(control_io->io_CtlChar)); - control_io->IOSer.io_Command = SDCMD_SETPARAMS; - D(bug(" params %08lx %08lx %08lx %08lx %08lx %08lx\n", control_io->io_CtlChar, control_io->io_RBufLen, control_io->io_ExtFlags, control_io->io_Baud, control_io->io_BrkTime, *(uint32 *)((uint8 *)control_io + 76))); - DoIO((struct IORequest *)control_io); - D(bug(" set_parms returned %08lx\n", control_io->IOSer.io_Error)); - } - break; - - case MSG_SET_PAR_PARAMS: - control_io->IOSer.io_Command = PDCMD_SETPARAMS; - DoIO((struct IORequest *)control_io); - D(bug(" set_par_parms returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_BREAK: - control_io->IOSer.io_Command = SDCMD_BREAK; - DoIO((struct IORequest *)control_io); - D(bug(" break returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_RESET: - control_io->IOSer.io_Command = CMD_RESET; - DoIO((struct IORequest *)control_io); - D(bug(" reset returned %08lx\n", control_io->IOSer.io_Error)); - break; - - case MSG_KILL_IO: - AbortIO((struct IORequest *)read_io); - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)read_io); - WaitIO((struct IORequest *)write_io); - obj->read_pending = obj->write_pending = false; - obj->read_done = obj->write_done = false; - break; - - case MSG_PRIME_IN: - read_io->IOSer.io_Message.mn_Node.ln_Name = (char *)msg->pb; - read_io->IOSer.io_Data = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - read_io->IOSer.io_Length = ReadMacInt32(msg->pb + ioReqCount); - read_io->IOSer.io_Actual = 0; - read_io->IOSer.io_Command = CMD_READ; - D(bug("serial_proc receiving %ld bytes from %08lx\n", read_io->IOSer.io_Length, read_io->IOSer.io_Data)); - SendIO((struct IORequest *)read_io); - break; - - case MSG_PRIME_OUT: { - write_io->IOSer.io_Message.mn_Node.ln_Name = (char *)msg->pb; - write_io->IOSer.io_Data = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - write_io->IOSer.io_Length = ReadMacInt32(msg->pb + ioReqCount); - write_io->IOSer.io_Actual = 0; - write_io->IOSer.io_Command = CMD_WRITE; - D(bug("serial_proc transmitting %ld bytes from %08lx\n", write_io->IOSer.io_Length, write_io->IOSer.io_Data)); -#if MONITOR - bug("Sending serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - for (int i=0; iIOSer.io_Actual, read_io->IOSer.io_Error)); - uint32 pb = (uint32)read_io->IOSer.io_Message.mn_Node.ln_Name; -#if MONITOR - bug("Receiving serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(msg->pb + ioBuffer)); - for (int i=0; iIOSer.io_Actual; i++) { - bug("%02lx ", adr[i]); - } - bug("\n"); -#endif - WriteMacInt32(pb + ioActCount, read_io->IOSer.io_Actual); - obj->conv_error(read_io, obj->input_dt); - obj->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } else if (io == write_io) { - D(bug("write_io complete, %ld bytes sent, error %ld\n", write_io->IOSer.io_Actual, write_io->IOSer.io_Error)); - uint32 pb = (uint32)write_io->IOSer.io_Message.mn_Node.ln_Name; - WriteMacInt32(pb + ioActCount, write_io->IOSer.io_Actual); - obj->conv_error(write_io, obj->output_dt); - obj->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - } - } -quit: - - // Close everything - if (opened) { - if (CheckIO((struct IORequest *)write_io) == 0) { - AbortIO((struct IORequest *)write_io); - WaitIO((struct IORequest *)write_io); - } - if (CheckIO((struct IORequest *)read_io) == 0) { - AbortIO((struct IORequest *)read_io); - WaitIO((struct IORequest *)read_io); - } - CloseDevice((struct IORequest *)read_io); - } - if (control_io) - DeleteIORequest(control_io); - if (write_io) - DeleteIORequest(write_io); - if (read_io) - DeleteIORequest(read_io); - if (control_port) - DeleteMsgPort(control_port); - if (io_port) - DeleteMsgPort(io_port); - - // Send signal to main task to confirm termination - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} diff --git a/BasiliskII/src/AmigaOS/sys_amiga.cpp b/BasiliskII/src/AmigaOS/sys_amiga.cpp deleted file mode 100644 index 617df7b0a..000000000 --- a/BasiliskII/src/AmigaOS/sys_amiga.cpp +++ /dev/null @@ -1,1122 +0,0 @@ -/* - * sys_amiga.cpp - System dependent routines, Amiga implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "sys.h" - -#define DEBUG 0 -#include "debug.h" - - -// File handles are pointers to these structures -struct file_handle { - bool is_file; // Flag: plain file or /dev/something? - bool read_only; // Copy of Sys_open() flag - loff_t start_byte; // Size of file header (if any) - loff_t size; // Size of file/device (minus header) - - BPTR f; // AmigaDOS file handle (if is_file == true) - - struct IOStdReq *io; // Pointer to IORequest (if is_file == false) - ULONG block_size; // Block size of device (must be a power of two) - bool is_nsd; // New style device? - bool does_64bit; // Supports 64 bit trackdisk commands? - bool is_ejected; // Volume has been (logically) ejected - bool is_2060scsi; // Enable workaround for 2060scsi.device CD-ROM TD_READ bug -}; - - -// FileInfoBlock (must be global because it has to be on a longword boundary) -static struct FileInfoBlock FIB; - -// Message port for device communication -static struct MsgPort *the_port = NULL; - -// Temporary buffer in chip memory -const int TMP_BUF_SIZE = 0x10000; -static UBYTE *tmp_buf = NULL; - - -/* - * Initialization - */ - -void SysInit(void) -{ - // Create port and temporary buffer - the_port = CreateMsgPort(); - tmp_buf = (UBYTE *)AllocMem(TMP_BUF_SIZE, MEMF_CHIP | MEMF_PUBLIC); - if (the_port == NULL || tmp_buf == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } -} - - -/* - * Deinitialization - */ - -void SysExit(void) -{ - // Delete port and temporary buffer - if (the_port) { - DeleteMsgPort(the_port); - the_port = NULL; - } - if (tmp_buf) { - FreeMem(tmp_buf, TMP_BUF_SIZE); - tmp_buf = NULL; - } -} - - -/* - * This gets called when no "floppy" prefs items are found - * It scans for available floppy drives and adds appropriate prefs items - */ - -void SysAddFloppyPrefs(void) -{ - for (int i=0; i<4; i++) { - ULONG id = GetUnitID(i); - if (id == DRT_150RPM) { // We need an HD drive - char str[256]; - sprintf(str, "/dev/mfm.device/%d/0/0/2880/512", i); - PrefsAddString("floppy", str); - } - } -} - - -/* - * This gets called when no "disk" prefs items are found - * It scans for available HFS volumes and adds appropriate prefs items - */ - -void SysAddDiskPrefs(void) -{ - // AmigaOS doesn't support MacOS partitioning, so this probably doesn't make much sense... -} - - -/* - * This gets called when no "cdrom" prefs items are found - * It scans for available CD-ROM drives and adds appropriate prefs items - */ - -void SysAddCDROMPrefs(void) -{ - // Don't scan for drives if nocdrom option given - if (PrefsFindBool("nocdrom")) - return; - - //!! -} - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ - PrefsAddString("seriala", "serial.device/0"); - PrefsAddString("serialb", "*parallel.device/0"); -} - - -/* - * Open file/device, create new file handle (returns NULL on error) - * - * Format for device names: /dev////// - */ - -void *Sys_open(const char *name, bool read_only) -{ - bool is_file = (strstr(name, "/dev/") != name); - - D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write")); - - // File or device? - if (is_file) { - - // File, open it and get stats - BPTR f = Open((char *)name, MODE_OLDFILE); - if (!f) - return NULL; - if (!ExamineFH(f, &FIB)) { - Close(f); - return NULL; - } - - // Check if file is write protected - if (FIB.fib_Protection & FIBF_WRITE) - read_only = true; - - // Create file_handle - file_handle *fh = new file_handle; - fh->f = f; - fh->is_file = true; - fh->read_only = read_only; - - // Detect disk image file layout - loff_t size = FIB.fib_Size; - Seek(fh->f, 0, OFFSET_BEGINNING); - Read(fh->f, tmp_buf, 256); - FileDiskLayout(size, tmp_buf, fh->start_byte, fh->size); - return fh; - - } else { - - // Device, parse string - char dev_name[256]; - ULONG dev_unit = 0, dev_flags = 0, dev_start = 0, dev_size = 16, dev_bsize = 512; - if (sscanf(name, "/dev/%[^/]/%ld/%ld/%ld/%ld/%ld", dev_name, &dev_unit, &dev_flags, &dev_start, &dev_size, &dev_bsize) < 2) - return NULL; - - // Create IORequest - struct IOStdReq *io = (struct IOStdReq *)CreateIORequest(the_port, sizeof(struct IOExtTD)); - if (io == NULL) - return NULL; - - // Open device - if (OpenDevice((UBYTE *) dev_name, dev_unit, (struct IORequest *)io, dev_flags)) { - D(bug(" couldn't open device\n")); - DeleteIORequest(io); - return NULL; - } - - // Check for new style device - bool is_nsd = false, does_64bit = false; - struct NSDeviceQueryResult nsdqr; - nsdqr.DevQueryFormat = 0; - nsdqr.SizeAvailable = 0; - io->io_Command = NSCMD_DEVICEQUERY; - io->io_Length = sizeof(nsdqr); - io->io_Data = (APTR)&nsdqr; - LONG error = DoIO((struct IORequest *)io); - D(bug("DEVICEQUERY returned %ld (length %ld, actual %ld)\n", error, io->io_Length, io->io_Actual)); - if ((!error) && (io->io_Actual >= 16) && (io->io_Actual <= sizeof(nsdqr)) && (nsdqr.SizeAvailable == io->io_Actual)) { - - // Looks like an NSD - is_nsd = true; - D(bug(" new style device, type %ld\n", nsdqr.DeviceType)); - - // We only work with trackdisk-like devices - if (nsdqr.DeviceType != NSDEVTYPE_TRACKDISK) { - CloseDevice((struct IORequest *)io); - DeleteIORequest(io); - return NULL; - } - - // Check whether device is 64 bit capable - UWORD *cmdcheck; - for (cmdcheck = nsdqr.SupportedCommands; *cmdcheck; cmdcheck++) { - if (*cmdcheck == NSCMD_TD_READ64) { - D(bug(" supports 64 bit commands\n")); - does_64bit = true; - } - } - } - - // Create file_handle - file_handle *fh = new file_handle; - fh->io = io; - fh->is_file = false; - fh->read_only = read_only; - fh->start_byte = (loff_t)dev_start * dev_bsize; - fh->size = (loff_t)dev_size * dev_bsize; - fh->block_size = dev_bsize; - fh->is_nsd = is_nsd; - fh->does_64bit = does_64bit; - fh->is_ejected = false; - fh->is_2060scsi = (strcmp(dev_name, "2060scsi.device") == 0); - return fh; - } -} - - -/* - * Close file/device, delete file handle - */ - -void Sys_close(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - D(bug("Sys_close(%08lx)\n", arg)); - - // File or device? - if (fh->is_file) { - - // File, simply close it - Close(fh->f); - - } else { - - // Device, close it and delete IORequest - fh->io->io_Command = CMD_UPDATE; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_MOTOR; - fh->io->io_Length = 0; - DoIO((struct IORequest *)fh->io); - - CloseDevice((struct IORequest *)fh->io); - DeleteIORequest(fh->io); - } - delete fh; -} - - -/* - * Send one I/O request, using 64-bit addressing if the device supports it - */ - -static loff_t send_io_request(file_handle *fh, bool writing, ULONG length, loff_t offset, APTR data) -{ - if (fh->does_64bit) { - fh->io->io_Command = writing ? NSCMD_TD_WRITE64 : NSCMD_TD_READ64; - fh->io->io_Actual = offset >> 32; - } else { - fh->io->io_Command = writing ? CMD_WRITE : CMD_READ; - fh->io->io_Actual = 0; - } - fh->io->io_Length = length; - fh->io->io_Offset = offset; - fh->io->io_Data = data; - - if (fh->is_2060scsi && fh->block_size == 2048) { - - // 2060scsi.device has serious problems reading CD-ROMs via TD_READ - static struct SCSICmd scsi; - const int SENSE_LENGTH = 256; - static UBYTE sense_buffer[SENSE_LENGTH]; // Buffer for autosense data - static UBYTE cmd_buffer[10] = { 0x28, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; - - D(bug("send_io_request length=%lu offset=%lu\n", length, (ULONG) offset)); - - memset(sense_buffer, 0, sizeof(sense_buffer)); - - scsi.scsi_Command = cmd_buffer; - scsi.scsi_CmdLength = sizeof(cmd_buffer); - scsi.scsi_SenseData = sense_buffer; - scsi.scsi_SenseLength = SENSE_LENGTH; - scsi.scsi_Flags = SCSIF_AUTOSENSE | (writing ? SCSIF_WRITE : SCSIF_READ); - scsi.scsi_Data = (UWORD *) data; - scsi.scsi_Length = length; - - ULONG block_offset = (ULONG) offset / fh->block_size; - ULONG block_length = length / fh->block_size; - - cmd_buffer[2] = block_offset >> 24; - cmd_buffer[3] = block_offset >> 16; - cmd_buffer[4] = block_offset >> 8; - cmd_buffer[5] = block_offset & 0xff; - - cmd_buffer[7] = block_length >> 8; - cmd_buffer[8] = block_length & 0xff; - - fh->io->io_Command = HD_SCSICMD; - fh->io->io_Actual = 0; - fh->io->io_Offset = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - - BYTE result = DoIO((struct IORequest *)fh->io); - - if (result) { - D(bug("send_io_request SCSI FAIL result=%lu\n", result)); - - if (result == HFERR_BadStatus) { - D(bug("send_io_request SCSI Status=%lu\n", scsi.scsi_Status)); - if (scsi.scsi_Status == 2) { - D(bug("send_io_request Sense Key=%02lx\n", sense_buffer[2] & 0x0f)); - D(bug("send_io_request ASC=%02lx ASCQ=%02lx\n", sense_buffer[12], sense_buffer[13])); - } - } - return 0; - } - - D(bug("send_io_request SCSI Actual=%lu\n", scsi.scsi_Actual)); - - if (scsi.scsi_Actual != length) - return 0; - - return scsi.scsi_Actual; - - } else { - -// if (DoIO((struct IORequest *)fh->io) || fh->io->io_Actual != length) - if (DoIO((struct IORequest *)fh->io)) - { - D(bug("send_io_request/%ld: Actual=%lu length=%lu Err=%ld\n", __LINE__, fh->io->io_Actual, length, fh->io->io_Error)); - return 0; - } - return fh->io->io_Actual; - } -} - - -/* - * Read "length" bytes from file/device, starting at "offset", to "buffer", - * returns number of bytes read (or 0) - */ - -size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - - D(bug("Sys_read/%ld length=%ld\n", __LINE__, length)); - - // File or device? - if (fh->is_file) { - - // File, seek to position - if (Seek(fh->f, offset + fh->start_byte, OFFSET_BEGINNING) == -1) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - - // Read data - LONG actual = Read(fh->f, buffer, length); - if (actual == -1) - { - D(bug("Sys_read/%ld return 0\n", __LINE__)); - return 0; - } - else - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, actual)); - return actual; - } - - } else { - - // Device, pre-read (partial read of first block) necessary? - loff_t pos = offset + fh->start_byte; - size_t actual = 0; - uint32 pre_offset = pos % fh->block_size; - if (pre_offset) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data to destination buffer - size_t pre_length = fh->block_size - pre_offset; - if (pre_length > length) - pre_length = length; - memcpy(buffer, tmp_buf + pre_offset, pre_length); - - // Adjust data pointers - buffer = (uint8 *)buffer + pre_length; - pos += pre_length; - length -= pre_length; - actual += pre_length; - } - - // Main read (complete reads of middle blocks) possible? - if (length >= fh->block_size) { - - // Yes, read blocks - size_t main_length = length & ~(fh->block_size - 1); - if (send_io_request(fh, false, main_length, pos, buffer) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + main_length; - pos += main_length; - length -= main_length; - actual += main_length; - } - - // Post-read (partial read of last block) necessary? - if (length) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_read/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data to destination buffer - memcpy(buffer, tmp_buf, length); - actual += length; - } - - D(bug("Sys_read/%ld return %ld\n", __LINE__, actual)); - return actual; - } -} - - -/* - * Write "length" bytes from "buffer" to file/device, starting at "offset", - * returns number of bytes written (or 0) - */ - -size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - D(bug("Sys_write/%ld length=%ld\n", __LINE__, length)); - - // File or device? - if (fh->is_file) { - - // File, seek to position if necessary - if (Seek(fh->f, offset + fh->start_byte, OFFSET_BEGINNING) == -1) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Write data - LONG actual = Write(fh->f, buffer, length); - if (actual == -1) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - else - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, actual)); - return actual; - } - - } else { - - // Device, pre-write (partial write of first block) necessary - loff_t pos = offset + fh->start_byte; - size_t actual = 0; - uint32 pre_offset = pos % fh->block_size; - if (pre_offset) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data from source buffer - size_t pre_length = fh->block_size - pre_offset; - if (pre_length > length) - pre_length = length; - memcpy(tmp_buf + pre_offset, buffer, pre_length); - - // Write block back - if (send_io_request(fh, true, fh->block_size, pos - pre_offset, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + pre_length; - pos += pre_length; - length -= pre_length; - actual += pre_length; - } - - // Main write (complete writes of middle blocks) possible? - if (length >= fh->block_size) { - - // Yes, write blocks - size_t main_length = length & ~(fh->block_size - 1); - if (send_io_request(fh, true, main_length, pos, buffer) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Adjust data pointers - buffer = (uint8 *)buffer + main_length; - pos += main_length; - length -= main_length; - actual += main_length; - } - - // Post-write (partial write of last block) necessary? - if (length) { - - // Yes, read one block - if (send_io_request(fh, false, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - - // Copy data from source buffer - memcpy(buffer, tmp_buf, length); - - // Write block back - if (send_io_request(fh, true, fh->block_size, pos, tmp_buf) == 0) - { - D(bug("Sys_write/%ld return %ld\n", __LINE__, 0)); - return 0; - } - actual += length; - } - - D(bug("Sys_write/%ld return %ld\n", __LINE__, actual)); - return actual; - } -} - - -/* - * Return size of file/device (minus header) - */ - -loff_t SysGetFileSize(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - return fh->size; -} - - -/* - * Eject volume (if applicable) - */ - -void SysEject(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Flush buffer, turn off the drive motor and eject volume - fh->io->io_Command = CMD_UPDATE; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_MOTOR; - fh->io->io_Length = 0; - DoIO((struct IORequest *)fh->io); - - fh->io->io_Command = TD_EJECT; - fh->io->io_Length = 1; - DoIO((struct IORequest *)fh->io); - - fh->is_ejected = true; - } -} - - -/* - * Format volume (if applicable) - */ - -bool SysFormat(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - //!! - return true; -} - - -/* - * Check if file/device is read-only (this includes the read-only flag on Sys_open()) - */ - -bool SysIsReadOnly(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) { - - // File, return flag given to Sys_open - return fh->read_only; - - } else { - - // Device, check write protection - fh->io->io_Command = TD_PROTSTATUS; - DoIO((struct IORequest *)fh->io); - if (fh->io->io_Actual) - return true; - else - return fh->read_only; - } -} - - -/* - * Check if the given file handle refers to a fixed or a removable disk - */ - -bool SysIsFixedDisk(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - return true; -} - - -/* - * Check if a disk is inserted in the drive (always true for files) - */ - -bool SysIsDiskInserted(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return true; - else { - - // Check medium status - fh->io->io_Command = TD_CHANGESTATE; - fh->io->io_Actual = 0; - DoIO((struct IORequest *)fh->io); - bool inserted = (fh->io->io_Actual == 0); - - if (!inserted) { - // Disk was ejected and has now been taken out - fh->is_ejected = false; - } - - if (fh->is_ejected) { - // Disk was ejected but has not yet been taken out, report it as - // no longer in the drive - return false; - } else - return inserted; - } -} - - -/* - * Prevent medium removal (if applicable) - */ - -void SysPreventRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send PREVENT ALLOW MEDIUM REMOVAL SCSI command - struct SCSICmd scsi; - static const UBYTE the_cmd[6] = {0x1e, 0, 0, 0, 1, 0}; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)the_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Allow medium removal (if applicable) - */ - -void SysAllowRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send PREVENT ALLOW MEDIUM REMOVAL SCSI command - struct SCSICmd scsi; - static const UBYTE the_cmd[6] = {0x1e, 0, 0, 0, 0, 0}; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)the_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Read CD-ROM TOC (binary MSF format, 804 bytes max.) - */ - -bool SysCDReadTOC(void *arg, uint8 *toc) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send READ TOC MSF SCSI command - struct SCSICmd scsi; - static const UBYTE read_toc_cmd[10] = {0x43, 0x02, 0, 0, 0, 0, 0, 0x03, 0x24, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 804; - scsi.scsi_Command = (UBYTE *)read_toc_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - memcpy(toc, tmp_buf, 804); - return true; - } -} - - -/* - * Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard) - */ - -bool SysCDGetPosition(void *arg, uint8 *pos) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send READ SUB-CHANNEL SCSI command - struct SCSICmd scsi; - static const UBYTE read_subq_cmd[10] = {0x42, 0x02, 0x40, 0x01, 0, 0, 0, 0, 0x10, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 16; - scsi.scsi_Command = (UBYTE *)read_subq_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - memcpy(pos, tmp_buf, 16); - return true; - } -} - - -/* - * Play CD audio - */ - -bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PLAY AUDIO MSF SCSI command - struct SCSICmd scsi; - UBYTE play_cmd[10] = {0x47, 0, 0, start_m, start_s, start_f, end_m, end_s, end_f, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = play_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Pause CD audio - */ - -bool SysCDPause(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PAUSE RESUME SCSI command - struct SCSICmd scsi; - static const UBYTE pause_cmd[10] = {0x4b, 0, 0, 0, 0, 0, 0, 0, 0, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)pause_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Resume paused CD audio - */ - -bool SysCDResume(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - // Send PAUSE RESUME SCSI command - struct SCSICmd scsi; - static const UBYTE resume_cmd[10] = {0x4b, 0, 0, 0, 0, 0, 0, 0, 1, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = (UBYTE *)resume_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Stop CD audio - */ - -bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return false; - else { - - uint8 end_m = lead_out_m; - uint8 end_s = lead_out_s; - uint8 end_f = lead_out_f + 1; - if (end_f >= 75) { - end_f = 0; - end_s++; - if (end_s >= 60) { - end_s = 0; - end_m++; - } - } - - // Send PLAY AUDIO MSF SCSI command (play first frame of lead-out area) - struct SCSICmd scsi; - UBYTE play_cmd[10] = {0x47, 0, 0, lead_out_m, lead_out_s, lead_out_f, end_m, end_s, end_f, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 0; - scsi.scsi_Command = play_cmd; - scsi.scsi_CmdLength = 10; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return false; - return true; - } -} - - -/* - * Perform CD audio fast-forward/fast-reverse operation starting from specified address - */ - -bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - //!! - return false; -} - - -/* - * Set CD audio volume (0..255 each channel) - */ - -void SysCDSetVolume(void *arg, uint8 left, uint8 right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send MODE SENSE (CD-ROM Audio Control Parameters Page) SCSI command - struct SCSICmd scsi; - static const UBYTE mode_sense_cmd[6] = {0x1a, 0x08, 0x0e, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_sense_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return; - - tmp_buf[6] = 0x04; // Immed - tmp_buf[9] = 0; // LBA/sec format - tmp_buf[10] = 0; // LBA/sec - tmp_buf[11] = 0; - tmp_buf[13] = left; // Port 0 volume - tmp_buf[15] = right; // Port 1 volume - - // Send MODE SELECT (CD-ROM Audio Control Parameters Page) SCSI command - static const UBYTE mode_select_cmd[6] = {0x15, 0x10, 0, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_select_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_WRITE; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - DoIO((struct IORequest *)fh->io); - } -} - - -/* - * Get CD audio volume (0..255 each channel) - */ - -void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - - // Send MODE SENSE (CD-ROM Audio Control Parameters Page) SCSI command - struct SCSICmd scsi; - static const UBYTE mode_sense_cmd[6] = {0x1a, 0x08, 0x0e, 0, 20, 0}; - scsi.scsi_Data = (UWORD *)tmp_buf; - scsi.scsi_Length = 20; - scsi.scsi_Command = (UBYTE *)mode_sense_cmd; - scsi.scsi_CmdLength = 6; - scsi.scsi_Flags = SCSIF_READ; - scsi.scsi_Status = 0; - fh->io->io_Data = &scsi; - fh->io->io_Length = sizeof(scsi); - fh->io->io_Command = HD_SCSICMD; - if (DoIO((struct IORequest *)fh->io) || scsi.scsi_Status) - return; - left = tmp_buf[13]; // Port 0 volume - right = tmp_buf[15]; // Port 1 volume - } -} diff --git a/BasiliskII/src/AmigaOS/sysdeps.h b/BasiliskII/src/AmigaOS/sysdeps.h deleted file mode 100644 index 895058301..000000000 --- a/BasiliskII/src/AmigaOS/sysdeps.h +++ /dev/null @@ -1,76 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for AmigaOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#include -#include -#include -#include -#include -#include -#include - -#include "user_strings_amiga.h" - -// Mac and host address space are the same -#define REAL_ADDRESSING 1 - -// Using 68k natively -#define EMULATED_68K 0 - -// Mac ROM is not write protected -#define ROM_IS_WRITE_PROTECTED 0 -#define USE_SCRATCHMEM_SUBTERFUGE 1 - -// ExtFS is supported -#define SUPPORTS_EXTFS 1 - -// mon is not supported -#undef ENABLE_MON - -// Data types -typedef unsigned char uint8; -typedef signed char int8; -typedef unsigned short uint16; -typedef signed short int16; -typedef unsigned long uint32; -typedef signed long int32; -typedef unsigned long long uint64; -typedef signed long long int64; - -typedef unsigned long long loff_t; - -// Time data type for Time Manager emulation -typedef struct timeval tm_time_t; - -// Endianess conversion (not needed) -#define ntohs(x) (x) -#define ntohl(x) (x) -#define htons(x) (x) -#define htonl(x) (x) - -// Some systems don't define this (ExecBase->AttnFlags) -#ifndef AFF_68060 -#define AFF_68060 (1L<<7) -#endif - -#endif diff --git a/BasiliskII/src/AmigaOS/timer_amiga.cpp b/BasiliskII/src/AmigaOS/timer_amiga.cpp deleted file mode 100644 index ce5fd5156..000000000 --- a/BasiliskII/src/AmigaOS/timer_amiga.cpp +++ /dev/null @@ -1,157 +0,0 @@ -/* - * timer_amiga.cpp - Time Manager emulation, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#define __USE_SYSBASE -#include -#include -#include -#include - -#include "sysdeps.h" -#include "timer.h" - -#define DEBUG 0 -#include "debug.h" - - -/* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); - struct timeval tv; - GetSysTime(&tv); - uint64 tl = (uint64)tv.tv_secs * 1000000 + tv.tv_micro; - hi = tl >> 32; - lo = tl; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - ULONG secs, mics; - CurrentTime(&secs, &mics); - return secs + 0x8b31ef80; -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ - GetSysTime(&t); -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a; - AddTime(&res, &b); -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a; - SubTime(&res, &b); -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ - return CmpTime(&b, &a); -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ - if (mactime > 0) { - res.tv_secs = mactime / 1000; // Time in milliseconds - res.tv_micro = (mactime % 1000) * 1000; - } else { - res.tv_secs = -mactime / 1000000; // Time in negative microseconds - res.tv_micro = -mactime % 1000000; - } -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime.tv_secs < 0) - return 0; - else { - uint64 t = (uint64)hosttime.tv_secs * 1000000 + hosttime.tv_micro; - if (t > 0x7fffffff) - return t / 1000; // Time in milliseconds - else - return -t; // Time in negative microseconds - } -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -void idle_wait(void) -{ - // XXX if you implement this make sure to call idle_resume() from TriggerInterrupt() -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ -} diff --git a/BasiliskII/src/AmigaOS/user_strings_amiga.cpp b/BasiliskII/src/AmigaOS/user_strings_amiga.cpp deleted file mode 100644 index 5b41a5879..000000000 --- a/BasiliskII/src/AmigaOS/user_strings_amiga.cpp +++ /dev/null @@ -1,85 +0,0 @@ -/* - * user_strings_amiga.cpp - AmigaOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under AmigaOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "Amiga Root"}, - {STR_EXTFS_NAME, "Amiga Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "Amiga"}, - - // Purely platform-specific strings - {STR_NO_PREPARE_EMUL_ERR, "PrepareEmul is not installed. Run PrepareEmul and then try again to start Basilisk II."}, - {STR_NO_GADTOOLS_LIB_ERR, "Cannot open gadtools.library V39."}, - {STR_NO_IFFPARSE_LIB_ERR, "Cannot open iffparse.library V39."}, - {STR_NO_ASL_LIB_ERR, "Cannot open asl.library V36."}, - {STR_NO_TIMER_DEV_ERR, "Cannot open timer.device."}, - {STR_NO_P96_MODE_ERR, "The selected screen mode is not a Picasso96 or CyberGraphX mode."}, - {STR_NO_VIDEO_MODE_ERR, "Cannot obtain selected video mode."}, - {STR_WRONG_SCREEN_DEPTH_ERR, "Basilisk II only supports 8, 16 or 24 bit screens."}, - {STR_WRONG_SCREEN_FORMAT_ERR, "Basilisk II only supports big-endian chunky ARGB screen modes."}, - {STR_ENFORCER_RUNNING_ERR, "Enforcer/CyberGuard is running. Remove and then try again to start Basilisk II."}, - - {STR_NOT_ETHERNET_WARN, "The selected network device is not an Ethernet device. Networking will be disabled."}, - {STR_NO_MULTICAST_WARN, "Your Ethernet card does not support multicast and is not usable with AppleTalk. Please report this to the manufacturer of the card."}, - {STR_NO_GTLAYOUT_LIB_WARN, "Cannot open gtlayout.library V39. The preferences editor GUI will not be available."}, - {STR_NO_AHI_WARN, "Cannot open ahi.device V2. Audio output will be disabled."}, - {STR_NO_AHI_CTRL_WARN, "Cannot open AHI control structure. Audio output will be disabled."}, - {STR_NOT_ENOUGH_MEM_WARN, "Could not get %lu MBytes of memory.\nShould I use the largest Block (%lu MBytes) instead ?"}, - - {STR_AHI_MODE_CTRL, "AHI Mode"}, - {STR_SCSI_MEMTYPE_CTRL, "Buffer Memory Type"}, - {STR_MEMTYPE_CHIP_LAB, "Chip"}, - {STR_MEMTYPE_24BITDMA_LAB, "24-Bit DMA"}, - {STR_MEMTYPE_ANY_LAB, "Any"}, - {STR_SCSI_DEVICES_CTRL, "Virtual SCSI Devices"}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/BasiliskII/src/AmigaOS/user_strings_amiga.h b/BasiliskII/src/AmigaOS/user_strings_amiga.h deleted file mode 100644 index 8903e5e80..000000000 --- a/BasiliskII/src/AmigaOS/user_strings_amiga.h +++ /dev/null @@ -1,51 +0,0 @@ -/* - * user_strings_amiga.h - AmigaOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 USER_STRINGS_AMIGA_H -#define USER_STRINGS_AMIGA_H - -enum { - STR_NO_PREPARE_EMUL_ERR = 10000, - STR_NO_GADTOOLS_LIB_ERR, - STR_NO_IFFPARSE_LIB_ERR, - STR_NO_ASL_LIB_ERR, - STR_NO_TIMER_DEV_ERR, - STR_NO_P96_MODE_ERR, - STR_NO_VIDEO_MODE_ERR, - STR_WRONG_SCREEN_DEPTH_ERR, - STR_WRONG_SCREEN_FORMAT_ERR, - STR_ENFORCER_RUNNING_ERR, - - STR_NOT_ETHERNET_WARN, - STR_NO_MULTICAST_WARN, - STR_NO_GTLAYOUT_LIB_WARN, - STR_NO_AHI_WARN, - STR_NO_AHI_CTRL_WARN, - STR_NOT_ENOUGH_MEM_WARN, - - STR_AHI_MODE_CTRL, - STR_SCSI_MEMTYPE_CTRL, - STR_MEMTYPE_CHIP_LAB, - STR_MEMTYPE_24BITDMA_LAB, - STR_MEMTYPE_ANY_LAB, - STR_SCSI_DEVICES_CTRL -}; - -#endif diff --git a/BasiliskII/src/AmigaOS/video_amiga.cpp b/BasiliskII/src/AmigaOS/video_amiga.cpp deleted file mode 100644 index 5e870a9c2..000000000 --- a/BasiliskII/src/AmigaOS/video_amiga.cpp +++ /dev/null @@ -1,1165 +0,0 @@ -/* - * video_amiga.cpp - Video/graphics emulation, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#define __USE_SYSBASE -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" - -#define DEBUG 0 -#include "debug.h" - - -// Supported video modes -static vector VideoModes; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_PIP, - DISPLAY_SCREEN_P96, - DISPLAY_SCREEN_CGFX -}; - -// Global variables -static int32 frame_skip; -static UWORD *null_pointer = NULL; // Blank mouse pointer data -static UWORD *current_pointer = (UWORD *)-1; // Currently visible mouse pointer data -static struct Process *periodic_proc = NULL; // Periodic process - -extern struct Task *MainTask; // Pointer to main task (from main_amiga.cpp) - - -// Amiga -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, 0x1a, // ` 1 2 3 4 5 6 7 - 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x2a, 0xff, 0x52, // 8 9 0 - = \ inv 0 - 0x0c, 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, // Q W E R T Y U I - 0x1f, 0x23, 0x21, 0x1e, 0xff, 0x53, 0x54, 0x55, // O P [ ] inv 1 2 3 - 0x00, 0x01, 0x02, 0x03, 0x05, 0x04, 0x26, 0x28, // A S D F G H J K - 0x25, 0x29, 0x27, 0x2a, 0xff, 0x56, 0x57, 0x58, // L ; ' # inv 4 5 6 - 0x32, 0x06, 0x07, 0x08, 0x09, 0x0b, 0x2d, 0x2e, // < Z X C V B N M - 0x2b, 0x2f, 0x2c, 0xff, 0x41, 0x59, 0x5b, 0x5c, // , . / inv . 7 8 9 - 0x31, 0x33, 0x30, 0x4c, 0x24, 0x35, 0x75, 0xff, // SPC BSP TAB ENT RET ESC DEL inv - 0xff, 0xff, 0x4e, 0xff, 0x3e, 0x3d, 0x3c, 0x3b, // inv inv - inv CUP CDN CRT CLF - 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, 0x62, 0x64, // F1 F2 F3 F4 F5 F6 F7 F8 - 0x65, 0x6d, 0x47, 0x51, 0x4b, 0x43, 0x45, 0x72, // F9 F10 ( ) / * + HLP - 0x38, 0x38, 0x39, 0x36, 0x3a, 0x3a, 0x37, 0x37, // SHL SHR CAP CTL ALL ALR AML AMR - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - - -class Amiga_monitor_desc : public monitor_desc { -public: - Amiga_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id, int default_display_type) - : monitor_desc(available_modes, default_depth, default_id), display_type(default_display_type) {}; - ~Amiga_monitor_desc() {}; - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -public: - int display_type; // See enum above -}; - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(Amiga_monitor_desc &m); - virtual ~driver_base(); - - virtual void set_palette(uint8 *pal, int num) {}; - virtual struct BitMap *get_bitmap() { return NULL; }; -public: - Amiga_monitor_desc &monitor; // Associated video monitor - const video_mode &mode; // Video mode handled by the driver - BOOL init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - struct Window *the_win; -}; - - -class driver_window : public driver_base { -public: - driver_window(Amiga_monitor_desc &m, int width, int height); - ~driver_window(); - - struct BitMap *get_bitmap() { return the_bitmap; }; - -private: - LONG black_pen, white_pen; - struct BitMap *the_bitmap; -}; - -class driver_pip : public driver_base { -public: - driver_pip(Amiga_monitor_desc &m, int width, int height); - ~driver_pip(); - - struct BitMap *get_bitmap() { return the_bitmap; }; - -private: - struct BitMap *the_bitmap; -}; - -class driver_screen_p96 : public driver_base { -public: - driver_screen_p96(Amiga_monitor_desc &m, ULONG mode_id); - ~driver_screen_p96(); - - void set_palette(uint8 *pal, int num); - -private: - struct Screen *the_screen; -}; - -class driver_screen_cgfx : public driver_base { -public: - driver_screen_cgfx(Amiga_monitor_desc &m, ULONG mode_id); - ~driver_screen_cgfx(); - - void set_palette(uint8 *pal, int num); - -private: - struct Screen *the_screen; -}; - - -static driver_base *drv = NULL; // Pointer to currently used driver object - - - -// Prototypes -static void periodic_func(void); -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth); -static void add_modes(uint32 width, uint32 height, video_depth depth); -static ULONG find_mode_for_depth(uint32 width, uint32 height, uint32 depth); -static ULONG bits_from_depth(video_depth depth); -static bool is_valid_modeid(int display_type, ULONG mode_id); -static bool check_modeid_p96(ULONG mode_id); -static bool check_modeid_cgfx(ULONG mode_id); - - -/* - * Initialization - */ - - -bool VideoInit(bool classic) -{ - video_depth default_depth = VDEPTH_1BIT; - int default_width, default_height; - int default_display_type = DISPLAY_WINDOW; - int window_width, window_height; // width and height for window display - ULONG screen_mode_id; // mode ID for screen display - - // Allocate blank mouse pointer data - null_pointer = (UWORD *)AllocMem(12, MEMF_PUBLIC | MEMF_CHIP | MEMF_CLEAR); - if (null_pointer == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - return false; - } - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Get screen mode from preferences - const char *mode_str; - if (classic) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - default_width = window_width = 512; - default_height = window_height = 384; - - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &window_width, &window_height) == 2) - default_display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "pip/%d/%d", &window_width, &window_height) == 2 && P96Base) - default_display_type = DISPLAY_PIP; - else if (sscanf(mode_str, "scr/%08lx", &screen_mode_id) == 1 && (CyberGfxBase || P96Base)) { - if (P96Base && p96GetModeIDAttr(screen_mode_id, P96IDA_ISP96)) - default_display_type = DISPLAY_SCREEN_P96; - else if (CyberGfxBase && IsCyberModeID(screen_mode_id)) - default_display_type = DISPLAY_SCREEN_CGFX; - else { - ErrorAlert(STR_NO_P96_MODE_ERR); - return false; - } - } - } - - D(bug("default_display_type %d, window_width %d, window_height %d\n", default_display_type, window_width, window_height)); - - // Construct list of supported modes - switch (default_display_type) { - case DISPLAY_WINDOW: - default_width = window_width; - default_height = window_height; - default_depth = VDEPTH_1BIT; - add_modes(window_width, window_height, VDEPTH_1BIT); - break; - - case DISPLAY_PIP: - default_width = window_width; - default_height = window_height; - default_depth = VDEPTH_16BIT; - add_modes(window_width, window_height, VDEPTH_16BIT); - break; - - case DISPLAY_SCREEN_P96: - case DISPLAY_SCREEN_CGFX: - struct DimensionInfo dimInfo; - DisplayInfoHandle handle = FindDisplayInfo(screen_mode_id); - - if (handle == NULL) - return false; - - if (GetDisplayInfoData(handle, (UBYTE *) &dimInfo, sizeof(dimInfo), DTAG_DIMS, 0) <= 0) - return false; - - default_width = 1 + dimInfo.Nominal.MaxX - dimInfo.Nominal.MinX; - default_height = 1 + dimInfo.Nominal.MaxY - dimInfo.Nominal.MinY; - - switch (dimInfo.MaxDepth) { - case 1: - default_depth = VDEPTH_1BIT; - break; - case 8: - default_depth = VDEPTH_8BIT; - break; - case 15: - case 16: - default_depth = VDEPTH_16BIT; - break; - case 24: - case 32: - default_depth = VDEPTH_32BIT; - break; - } - - for (unsigned d=VDEPTH_8BIT; d<=VDEPTH_32BIT; d++) { - ULONG mode_id = find_mode_for_depth(default_width, default_height, bits_from_depth(video_depth(d))); - - if (is_valid_modeid(default_display_type, mode_id)) - add_modes(default_width, default_height, video_depth(d)); - } - break; - } - -#if DEBUG - bug("Available video modes:\n"); - vector::const_iterator i = VideoModes.begin(), end = VideoModes.end(); - while (i != end) { - bug(" %ld x %ld (ID %02lx), %ld colors\n", i->x, i->y, i->resolution_id, 1 << bits_from_depth(i->depth)); - ++i; - } -#endif - - D(bug("VideoInit/%ld: def_width=%ld def_height=%ld def_depth=%ld\n", \ - __LINE__, default_width, default_height, default_depth)); - - // Find requested default mode and open display - if (VideoModes.size() == 1) { - uint32 default_id ; - - // Create Amiga_monitor_desc for this (the only) display - default_id = VideoModes[0].resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - - } else { - - // Find mode with specified dimensions - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - D(bug("VideoInit/%ld: w=%ld h=%ld d=%ld\n", __LINE__, i->x, i->y, bits_from_depth(i->depth))); - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - // Create Amiga_monitor_desc for this (the only) display - uint32 default_id = i->resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - } - } - - // Create Amiga_monitor_desc for this (the only) display - uint32 default_id = VideoModes[0].resolution_id; - D(bug("VideoInit/%ld: default_id=%ld\n", __LINE__, default_id)); - Amiga_monitor_desc *monitor = new Amiga_monitor_desc(VideoModes, default_depth, default_id, default_display_type); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); - } - - return true; -} - - -bool Amiga_monitor_desc::video_open() -{ - const video_mode &mode = get_current_mode(); - ULONG depth_bits = bits_from_depth(mode.depth); - ULONG ID = find_mode_for_depth(mode.x, mode.y, depth_bits); - - D(bug("video_open/%ld: width=%ld height=%ld depth=%ld ID=%08lx\n", __LINE__, mode.x, mode.y, depth_bits, ID)); - - if (ID == INVALID_ID) { - ErrorAlert(STR_NO_VIDEO_MODE_ERR); - return false; - } - - D(bug("video_open/%ld: display_type=%ld\n", __LINE__, display_type)); - - // Open display - switch (display_type) { - case DISPLAY_WINDOW: - drv = new driver_window(*this, mode.x, mode.y); - break; - - case DISPLAY_PIP: - drv = new driver_pip(*this, mode.x, mode.y); - break; - - case DISPLAY_SCREEN_P96: - drv = new driver_screen_p96(*this, ID); - break; - - case DISPLAY_SCREEN_CGFX: - drv = new driver_screen_cgfx(*this, ID); - break; - } - - D(bug("video_open/%ld: drv=%08lx\n", __LINE__, drv)); - - if (drv == NULL) - return false; - - D(bug("video_open/%ld: init_ok=%ld\n", __LINE__, drv->init_ok)); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - - // Start periodic process - periodic_proc = CreateNewProcTags( - NP_Entry, (ULONG)periodic_func, - NP_Name, (ULONG)"Basilisk II IDCMP Handler", - NP_Priority, 0, - TAG_END - ); - - D(bug("video_open/%ld: periodic_proc=%08lx\n", __LINE__, periodic_proc)); - - if (periodic_proc == NULL) { - ErrorAlert(STR_NO_MEM_ERR); - return false; - } - - return true; -} - - -void Amiga_monitor_desc::video_close() -{ - // Stop periodic process - if (periodic_proc) { - SetSignal(0, SIGF_SINGLE); - Signal(&periodic_proc->pr_Task, SIGBREAKF_CTRL_C); - Wait(SIGF_SINGLE); - } - - delete drv; - drv = NULL; - - // Free mouse pointer - if (null_pointer) { - FreeMem(null_pointer, 12); - null_pointer = NULL; - } -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); -} - - -/* - * Set palette - */ - -void Amiga_monitor_desc::set_palette(uint8 *pal, int num) -{ - drv->set_palette(pal, num); -} - - -/* - * Switch video mode - */ - -void Amiga_monitor_desc::switch_to_current_mode() -{ - // Close and reopen display - video_close(); - if (!video_open()) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ -} - - -/* - * Video message handling (not neccessary under AmigaOS, handled by periodic_func()) - */ - -void VideoInterrupt(void) -{ -} - - -/* - * Process for window refresh and message handling - */ - -static __saveds void periodic_func(void) -{ - struct MsgPort *timer_port = NULL; - struct timerequest *timer_io = NULL; - struct IntuiMessage *msg; - ULONG win_mask = 0, timer_mask = 0; - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Create message port for window and attach it - struct MsgPort *win_port = CreateMsgPort(); - if (win_port) { - win_mask = 1 << win_port->mp_SigBit; - drv->the_win->UserPort = win_port; - ModifyIDCMP(drv->the_win, IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_RAWKEY | - ((drv->monitor.display_type == DISPLAY_SCREEN_P96 || drv->monitor.display_type == DISPLAY_SCREEN_CGFX) ? IDCMP_DELTAMOVE : 0)); - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Start 60Hz timer for window refresh - if (drv->monitor.display_type == DISPLAY_WINDOW) { - timer_port = CreateMsgPort(); - if (timer_port) { - timer_io = (struct timerequest *)CreateIORequest(timer_port, sizeof(struct timerequest)); - if (timer_io) { - if (!OpenDevice((UBYTE *) TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timer_io, 0)) { - timer_mask = 1 << timer_port->mp_SigBit; - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16667 * frame_skip; - SendIO((struct IORequest *)timer_io); - } - } - } - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Main loop - for (;;) { - const video_mode &mode = drv->monitor.get_current_mode(); - - // Wait for timer and/or window (CTRL_C is used for quitting the task) - ULONG sig = Wait(win_mask | timer_mask | SIGBREAKF_CTRL_C); - - if (sig & SIGBREAKF_CTRL_C) - break; - -// D(bug("periodic_func/%ld: display_type=%ld the_win=%08lx\n", __LINE__, drv->monitor.display_type, drv->the_win)); - - if (sig & timer_mask) { - if (drv->get_bitmap()) { - // Timer tick, update display - BltTemplate(drv->get_bitmap()->Planes[0], 0, - drv->get_bitmap()->BytesPerRow, drv->the_win->RPort, - drv->the_win->BorderLeft, drv->the_win->BorderTop, - mode.x, mode.y); - } - - // Restart timer - timer_io->tr_node.io_Command = TR_ADDREQUEST; - timer_io->tr_time.tv_secs = 0; - timer_io->tr_time.tv_micro = 16667 * frame_skip; - SendIO((struct IORequest *)timer_io); - } - - if (sig & win_mask) { - - // Handle window messages - while (msg = (struct IntuiMessage *)GetMsg(win_port)) { - - // Get data from message and reply - ULONG cl = msg->Class; - UWORD code = msg->Code; - UWORD qualifier = msg->Qualifier; - WORD mx = msg->MouseX; - WORD my = msg->MouseY; - ReplyMsg((struct Message *)msg); - - // Handle message according to class - switch (cl) { - case IDCMP_MOUSEMOVE: - switch (drv->monitor.display_type) { - case DISPLAY_SCREEN_P96: - case DISPLAY_SCREEN_CGFX: -// D(bug("periodic_func/%ld: IDCMP_MOUSEMOVE mx=%ld my=%ld\n", __LINE__, mx, my)); - ADBMouseMoved(mx, my); - break; - default: -// D(bug("periodic_func/%ld: IDCMP_MOUSEMOVE mx=%ld my=%ld\n", __LINE__, mx - drv->the_win->BorderLeft, my - drv->the_win->BorderTop)); - ADBMouseMoved(mx - drv->the_win->BorderLeft, my - drv->the_win->BorderTop); - if (mx < drv->the_win->BorderLeft - || my < drv->the_win->BorderTop - || mx >= drv->the_win->BorderLeft + mode.x - || my >= drv->the_win->BorderTop + mode.y) { - if (current_pointer) { - ClearPointer(drv->the_win); - current_pointer = NULL; - } - } else { - if (current_pointer != null_pointer) { - // Hide mouse pointer inside window - SetPointer(drv->the_win, null_pointer, 1, 16, 0, 0); - current_pointer = null_pointer; - } - } - break; - } - break; - - case IDCMP_MOUSEBUTTONS: - if (code == SELECTDOWN) - ADBMouseDown(0); - else if (code == SELECTUP) - ADBMouseUp(0); - else if (code == MENUDOWN) - ADBMouseDown(1); - else if (code == MENUUP) - ADBMouseUp(1); - else if (code == MIDDLEDOWN) - ADBMouseDown(2); - else if (code == MIDDLEUP) - ADBMouseUp(2); - break; - - case IDCMP_RAWKEY: - if (qualifier & IEQUALIFIER_REPEAT) // Keyboard repeat is done by MacOS - break; - if ((qualifier & (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL)) == - (IEQUALIFIER_LALT | IEQUALIFIER_LSHIFT | IEQUALIFIER_CONTROL) && code == 0x5f) { - SetInterruptFlag(INTFLAG_NMI); - TriggerInterrupt(); - break; - } - - if (code & IECODE_UP_PREFIX) - ADBKeyUp(keycode2mac[code & 0x7f]); - else - ADBKeyDown(keycode2mac[code & 0x7f]); - break; - } - } - } - } - - D(bug("periodic_func/%ld: \n", __LINE__)); - - // Stop timer - if (timer_io) { - if (!CheckIO((struct IORequest *)timer_io)) - AbortIO((struct IORequest *)timer_io); - WaitIO((struct IORequest *)timer_io); - CloseDevice((struct IORequest *)timer_io); - DeleteIORequest(timer_io); - } - if (timer_port) - DeleteMsgPort(timer_port); - - // Remove port from window and delete it - Forbid(); - msg = (struct IntuiMessage *)win_port->mp_MsgList.lh_Head; - struct Node *succ; - while (succ = msg->ExecMessage.mn_Node.ln_Succ) { - if (msg->IDCMPWindow == drv->the_win) { - Remove((struct Node *)msg); - ReplyMsg((struct Message *)msg); - } - msg = (struct IntuiMessage *)succ; - } - drv->the_win->UserPort = NULL; - ModifyIDCMP(drv->the_win, 0); - Permit(); - DeleteMsgPort(win_port); - - // Main task asked for termination, send signal - Forbid(); - Signal(MainTask, SIGF_SINGLE); -} - - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - - D(bug("Added video mode: w=%ld h=%ld d=%ld\n", width, height, depth)); - - VideoModes.push_back(mode); -} - -// Add standard list of modes for given color depth -static void add_modes(uint32 width, uint32 height, video_depth depth) -{ - D(bug("add_modes: w=%ld h=%ld d=%ld\n", width, height, depth)); - - if (width >= 512 && height >= 384) - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - if (width >= 640 && height >= 480) - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - if (width >= 800 && height >= 600) - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - if (width >= 1024 && height >= 768) - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - if (width >= 1152 && height >= 870) - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - if (width >= 1280 && height >= 1024) - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - if (width >= 1600 && height >= 1200) - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -} - - -static ULONG find_mode_for_depth(uint32 width, uint32 height, uint32 depth) -{ - ULONG ID = BestModeID(BIDTAG_NominalWidth, width, - BIDTAG_NominalHeight, height, - BIDTAG_Depth, depth, - BIDTAG_DIPFMustNotHave, DIPF_IS_ECS | DIPF_IS_HAM | DIPF_IS_AA, - TAG_END); - - return ID; -} - - -static ULONG bits_from_depth(video_depth depth) -{ - int bits = 1 << depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - - return bits; -} - - -static bool is_valid_modeid(int display_type, ULONG mode_id) -{ - if (INVALID_ID == mode_id) - return false; - - switch (display_type) { - case DISPLAY_SCREEN_P96: - return check_modeid_p96(mode_id); - break; - case DISPLAY_SCREEN_CGFX: - return check_modeid_cgfx(mode_id); - break; - default: - return false; - break; - } -} - - -static bool check_modeid_p96(ULONG mode_id) -{ - // Check if the mode is one we can handle - uint32 depth = p96GetModeIDAttr(mode_id, P96IDA_DEPTH); - uint32 format = p96GetModeIDAttr(mode_id, P96IDA_RGBFORMAT); - - D(bug("check_modeid_p96: mode_id=%08lx depth=%ld format=%ld\n", mode_id, depth, format)); - - if (!p96GetModeIDAttr(mode_id, P96IDA_ISP96)) - return false; - - switch (depth) { - case 8: - break; - case 15: - case 16: - if (format != RGBFB_R5G5B5) - return false; - break; - case 24: - case 32: - if (format != RGBFB_A8R8G8B8) - return false; - break; - default: - return false; - } - - return true; -} - - -static bool check_modeid_cgfx(ULONG mode_id) -{ - uint32 depth = GetCyberIDAttr(CYBRIDATTR_DEPTH, mode_id); - uint32 format = GetCyberIDAttr(CYBRIDATTR_PIXFMT, mode_id); - - D(bug("check_modeid_cgfx: mode_id=%08lx depth=%ld format=%ld\n", mode_id, depth, format)); - - if (!IsCyberModeID(mode_id)) - return false; - - switch (depth) { - case 8: - break; - case 15: - case 16: - if (format != PIXFMT_RGB15) - return false; - break; - case 24: - case 32: - if (format != PIXFMT_ARGB32) - return false; - break; - default: - return false; - } - - return true; -} - - -driver_base::driver_base(Amiga_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false) -{ -} - -driver_base::~driver_base() -{ -} - - -// Open window -driver_window::driver_window(Amiga_monitor_desc &m, int width, int height) - : black_pen(-1), white_pen(-1), driver_base(m) -{ - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_InnerWidth, width, WA_InnerHeight, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_DragBar, true, - WA_DepthGadget, true, - WA_SizeGadget, false, - WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - TAG_END - ); - if (the_win == NULL) { - init_ok = false; - ErrorAlert(STR_OPEN_WINDOW_ERR); - return; - } - - // Create bitmap ("height + 2" for safety) - the_bitmap = AllocBitMap(width, height + 2, 1, BMF_CLEAR, NULL); - if (the_bitmap == NULL) { - init_ok = false; - ErrorAlert(STR_NO_MEM_ERR); - return; - } - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base((uint32)the_bitmap->Planes[0]); - - // Set FgPen and BgPen - black_pen = ObtainBestPenA(the_win->WScreen->ViewPort.ColorMap, 0, 0, 0, NULL); - white_pen = ObtainBestPenA(the_win->WScreen->ViewPort.ColorMap, 0xffffffff, 0xffffffff, 0xffffffff, NULL); - SetAPen(the_win->RPort, black_pen); - SetBPen(the_win->RPort, white_pen); - SetDrMd(the_win->RPort, JAM2); - - init_ok = true; -} - - -driver_window::~driver_window() -{ - // Window mode, free bitmap - if (the_bitmap) { - WaitBlit(); - FreeBitMap(the_bitmap); - } - - // Free pens and close window - if (the_win) { - ReleasePen(the_win->WScreen->ViewPort.ColorMap, black_pen); - ReleasePen(the_win->WScreen->ViewPort.ColorMap, white_pen); - - CloseWindow(the_win); - the_win = NULL; - } -} - - -// Open PIP (requires Picasso96) -driver_pip::driver_pip(Amiga_monitor_desc &m, int width, int height) - : driver_base(m) -{ - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - D(bug("driver_pip(%d,%d)\n", width, height)); - - // Open window - ULONG error = 0; - the_win = p96PIP_OpenTags( - P96PIP_SourceFormat, RGBFB_R5G5B5, - P96PIP_SourceWidth, width, - P96PIP_SourceHeight, height, - P96PIP_ErrorCode, (ULONG)&error, - P96PIP_AllowCropping, true, - WA_Left, 0, WA_Top, 0, - WA_InnerWidth, width, WA_InnerHeight, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_DragBar, true, - WA_DepthGadget, true, - WA_SizeGadget, false, - WA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - WA_PubScreenName, (ULONG)"Workbench", - TAG_END - ); - if (the_win == NULL || error) { - init_ok = false; - ErrorAlert(STR_OPEN_WINDOW_ERR); - return; - } - - // Find bitmap - p96PIP_GetTags(the_win, P96PIP_SourceBitMap, (ULONG)&the_bitmap, TAG_END); - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base(p96GetBitMapAttr(the_bitmap, P96BMA_MEMORY)); - - init_ok = true; -} - -driver_pip::~driver_pip() -{ - // Close PIP - if (the_win) - p96PIP_Close(the_win); -} - - -// Open Picasso96 screen -driver_screen_p96::driver_screen_p96(Amiga_monitor_desc &m, ULONG mode_id) - : driver_base(m) -{ - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Check if the mode is one we can handle - if (!check_modeid_p96(mode_id)) - { - init_ok = false; - ErrorAlert(STR_WRONG_SCREEN_FORMAT_ERR); - return; - } - - // Yes, get width and height - uint32 depth = p96GetModeIDAttr(mode_id, P96IDA_DEPTH); - uint32 width = p96GetModeIDAttr(mode_id, P96IDA_WIDTH); - uint32 height = p96GetModeIDAttr(mode_id, P96IDA_HEIGHT); - - // Open screen - the_screen = p96OpenScreenTags( - P96SA_DisplayID, mode_id, - P96SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - P96SA_Quiet, true, - P96SA_NoMemory, true, - P96SA_NoSprite, true, - P96SA_Exclusive, true, - TAG_END - ); - if (the_screen == NULL) { - ErrorAlert(STR_OPEN_SCREEN_ERR); - init_ok = false; - return; - } - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_Width, width, WA_Height, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Borderless, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_CustomScreen, (ULONG)the_screen, - TAG_END - ); - if (the_win == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - init_ok = false; - return; - } - - ScreenToFront(the_screen); - - // Add resolution and set VideoMonitor - monitor.set_mac_frame_base(p96GetBitMapAttr(the_screen->RastPort.BitMap, P96BMA_MEMORY)); - - init_ok = true; -} - - -driver_screen_p96::~driver_screen_p96() -{ - // Close window - if (the_win) - { - CloseWindow(the_win); - the_win = NULL; - } - - // Close screen - if (the_screen) { - p96CloseScreen(the_screen); - the_screen = NULL; - } -} - - -void driver_screen_p96::set_palette(uint8 *pal, int num) -{ - // Convert palette to 32 bits - ULONG table[2 + 256 * 3]; - table[0] = num << 16; - table[num * 3 + 1] = 0; - for (int i=0; iViewPort, table); -} - - -// Open CyberGraphX screen -driver_screen_cgfx::driver_screen_cgfx(Amiga_monitor_desc &m, ULONG mode_id) - : driver_base(m) -{ - D(bug("driver_screen_cgfx/%ld: mode_id=%08lx\n", __LINE__, mode_id)); - - // Set absolute mouse mode - ADBSetRelMouseMode(true); - - // Check if the mode is one we can handle - if (!check_modeid_cgfx(mode_id)) - { - ErrorAlert(STR_WRONG_SCREEN_FORMAT_ERR); - init_ok = false; - return; - } - - // Yes, get width and height - uint32 depth = GetCyberIDAttr(CYBRIDATTR_DEPTH, mode_id); - uint32 width = GetCyberIDAttr(CYBRIDATTR_WIDTH, mode_id); - uint32 height = GetCyberIDAttr(CYBRIDATTR_HEIGHT, mode_id); - - // Open screen - the_screen = OpenScreenTags(NULL, - SA_DisplayID, mode_id, - SA_Title, (ULONG)GetString(STR_WINDOW_TITLE), - SA_Quiet, true, - SA_Exclusive, true, - TAG_END - ); - if (the_screen == NULL) { - ErrorAlert(STR_OPEN_SCREEN_ERR); - init_ok = false; - return; - } - - // Open window - the_win = OpenWindowTags(NULL, - WA_Left, 0, WA_Top, 0, - WA_Width, width, WA_Height, height, - WA_SimpleRefresh, true, - WA_NoCareRefresh, true, - WA_Borderless, true, - WA_Activate, true, - WA_RMBTrap, true, - WA_ReportMouse, true, - WA_CustomScreen, (ULONG)the_screen, - TAG_END - ); - if (the_win == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - init_ok = false; - return; - } - - ScreenToFront(the_screen); - static UWORD ptr[] = { 0, 0, 0, 0 }; - SetPointer(the_win, ptr, 0, 0, 0, 0); // Hide mouse pointer - - // Set VideoMonitor - ULONG frame_base; - APTR handle = LockBitMapTags(the_screen->RastPort.BitMap, - LBMI_BASEADDRESS, (ULONG)&frame_base, - TAG_END - ); - UnLockBitMap(handle); - - D(bug("driver_screen_cgfx/%ld: frame_base=%08lx\n", __LINE__, frame_base)); - - monitor.set_mac_frame_base(frame_base); - - init_ok = true; -} - - -driver_screen_cgfx::~driver_screen_cgfx() -{ - D(bug("~driver_screen_cgfx/%ld: \n", __LINE__)); - - // Close window - if (the_win) - { - CloseWindow(the_win); - the_win = NULL; - } - - // Close screen - if (the_screen) { - CloseScreen(the_screen); - the_screen = NULL; - } -} - - -void driver_screen_cgfx::set_palette(uint8 *pal, int num) -{ - // Convert palette to 32 bits - ULONG table[2 + 256 * 3]; - table[0] = num << 16; - table[num * 3 + 1] = 0; - for (int i=0; iViewPort, table); -} diff --git a/BasiliskII/src/AmigaOS/xpram_amiga.cpp b/BasiliskII/src/AmigaOS/xpram_amiga.cpp deleted file mode 100644 index 69195d119..000000000 --- a/BasiliskII/src/AmigaOS/xpram_amiga.cpp +++ /dev/null @@ -1,80 +0,0 @@ -/* - * xpram_amiga.cpp - XPRAM handling, AmigaOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#define __USE_SYSBASE -#include -#include - -#include "sysdeps.h" -#include "xpram.h" - - -// XPRAM file name -#if POWERPC_ROM -static char XPRAM_FILE_NAME[] = "ENV:SheepShaver_NVRAM"; -static char XPRAM_FILE_NAME_ARC[] = "ENVARC:SheepShaver_NVRAM"; -#else -static char XPRAM_FILE_NAME[] = "ENV:BasiliskII_XPRAM"; -static char XPRAM_FILE_NAME_ARC[] = "ENVARC:BasiliskII_XPRAM"; -#endif - - -/* - * Load XPRAM from settings file - */ - -void LoadXPRAM(void) -{ - BPTR fh; - if ((fh = Open(XPRAM_FILE_NAME, MODE_OLDFILE)) != NULL) { - Read(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } -} - - -/* - * Save XPRAM to settings file - */ - -void SaveXPRAM(void) -{ - BPTR fh; - if ((fh = Open(XPRAM_FILE_NAME, MODE_NEWFILE)) != NULL) { - Write(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } - if ((fh = Open(XPRAM_FILE_NAME_ARC, MODE_NEWFILE)) != NULL) { - Write(fh, XPRAM, XPRAM_SIZE); - Close(fh); - } -} - - -/* - * Delete PRAM file - */ - -void ZapPRAM(void) -{ - DeleteFile(XPRAM_FILE_NAME); - DeleteFile(XPRAM_FILE_NAME_ARC); -} diff --git a/BasiliskII/src/BeOS/Makefile b/BasiliskII/src/BeOS/Makefile deleted file mode 100644 index e7feb6363..000000000 --- a/BasiliskII/src/BeOS/Makefile +++ /dev/null @@ -1,151 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= BasiliskII - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -MACHINE=$(shell uname -m) -ifeq ($(MACHINE), BePC) - CPUSRCS = ../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp \ - ../uae_cpu/readcpu.cpp ../uae_cpu/fpu/fpu_x86.cpp cpustbl.cpp cpudefs.cpp cpufast.s -else -# CPUSRCS = ../powerrom_cpu/powerrom_cpu.cpp - CPUSRCS = ../uae_cpu/basilisk_glue.cpp ../uae_cpu/newcpu.cpp \ - ../uae_cpu/readcpu.cpp ../uae_cpu/fpu/fpu_uae.cpp cpustbl.cpp cpudefs.cpp cpuemu.cpp -endif -SRCS = ../main.cpp main_beos.cpp ../prefs.cpp ../prefs_items.cpp prefs_beos.cpp \ - prefs_editor_beos.cpp sys_beos.cpp ../rom_patches.cpp ../slot_rom.cpp \ - ../rsrc_patches.cpp ../emul_op.cpp ../macos_util.cpp ../xpram.cpp \ - xpram_beos.cpp ../timer.cpp timer_beos.cpp clip_beos.cpp ../adb.cpp \ - ../serial.cpp serial_beos.cpp ../ether.cpp ether_beos.cpp ../sony.cpp \ - ../disk.cpp ../cdrom.cpp ../scsi.cpp scsi_beos.cpp ../video.cpp \ - video_beos.cpp ../audio.cpp audio_beos.cpp ../extfs.cpp extfs_beos.cpp \ - ../user_strings.cpp user_strings_beos.cpp about_window.cpp \ - $(CPUSRCS) - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS=be game media device textencoding tracker net - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include

    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../include SheepDriver SheepNet - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= FPU_X86 SIZEOF_FLOAT=4 SIZEOF_DOUBLE=8 SIZEOF_LONG_DOUBLE=10 - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from -# a source-level debugger -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = -fomit-frame-pointer -fno-PIC - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/system/develop/etc/makefile-engine - - -# special handling of UAE CPU engine -$(OBJ_DIR)/%.o : %.s - $(CC) $(INCLUDES) $(CFLAGS) -c $< -o $@ -$(OBJ_DIR)/cpuopti: $(OBJ_DIR)/cpuopti.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/cpuopti $(OBJ_DIR)/cpuopti.o -$(OBJ_DIR)/build68k: $(OBJ_DIR)/build68k.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/build68k $(OBJ_DIR)/build68k.o -$(OBJ_DIR)/gencpu: $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o - $(CC) $(LDFLAGS) -o $(OBJ_DIR)/gencpu $(OBJ_DIR)/gencpu.o $(OBJ_DIR)/readcpu.o $(OBJ_DIR)/cpudefs.o -cpudefs.cpp: $(OBJ_DIR)/build68k ../uae_cpu/table68k - $(OBJ_DIR)/build68k <../uae_cpu/table68k >cpudefs.cpp -cpuemu.cpp: $(OBJ_DIR)/gencpu - $(OBJ_DIR)/gencpu -cpustbl.cpp: cpuemu.cpp -cputbl.h: cpuemu.cpp -cpufast.s: cpuemu.cpp $(OBJ_DIR)/cpuopti - $(CXX) $(INCLUDES) -S $(CFLAGS) $< -o cputmp.s - $(OBJ_DIR)/cpuopti $@ || mv cputmp.s $@ - rm -f cputmp.s - -streifenfrei: - -rm -f $(OBJ_DIR)/gencpu $(OBJ_DIR)/build68k $(OBJ_DIR)/cpuopti - -rm -f cpuemu.cpp cpudefs.cpp cputmp.s cpufast*.s cpustbl.cpp cputbl.h diff --git a/BasiliskII/src/BeOS/SheepDriver/Makefile b/BasiliskII/src/BeOS/SheepDriver/Makefile deleted file mode 100644 index 52b2b70ec..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/Makefile +++ /dev/null @@ -1,117 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= sheep - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= DRIVER - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= sheep_driver.c - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - -install: $(TARGET) - cp $(TARGET) /boot/home/config/add-ons/kernel/drivers/bin - ln -sf /boot/home/config/add-ons/kernel/drivers/bin/$(NAME) /boot/home/config/add-ons/kernel/drivers/dev/$(NAME) - -uninstall: - rm /boot/home/config/add-ons/kernel/drivers/bin/$(NAME) - rm /boot/home/config/add-ons/kernel/drivers/dev/$(NAME) diff --git a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c b/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c deleted file mode 100644 index 859d82e22..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.c +++ /dev/null @@ -1,476 +0,0 @@ -/* - * sheep_driver.c - Low memory and ROM access driver for SheepShaver and - * Basilisk II on PowerPC systems - * - * SheepShaver (C) 1997-2002 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2002 Christian Bauer - * - * 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 - */ - -#ifdef __i386__ -#error The sheep driver only runs on PowerPC machines. -#endif - -#include -#include -#include -#include -#include -#include -#include - -#include "sheep_driver.h" - -#define DEBUG 0 - -#if DEBUG==1 -#define bug pprintf -#elif DEBUG==2 -#define bug dprintf -#endif - -#if DEBUG -#define D(x) (x) -#else -#define D(x) ; -#endif - -#define PORT_NAME "sheep_driver installed" - - -/* - * For debugging - */ - -static int pprintf(const char* format, ...) -{ - port_id PortNum; - int len, ret; - char Buffer[1024]; - va_list ap; - - if ((PortNum = find_port("PortLogger")) == B_NAME_NOT_FOUND) - return(PortNum); - for (len=0; len<1024; len++) - Buffer[len]='\0'; - va_start(ap, format); - vsprintf(Buffer, format, ap); - ret = write_port(PortNum, 0, Buffer, strlen(Buffer)); - return ret; -} - - -/* - * Page table functions - */ - -static uint32 *pte_address = 0; -static uint32 vsid; -static uint32 table_size; - -static status_t map_page(uint32 ea, uint32 ra, uint32 **free_pte, uint32 bits) -{ - int i; - int pte_class; - uint32 hash1, hash2, api, *pteg1, *pteg2; - - D(bug("Trying to map EA %p -> RA %p\n", ea, ra)); - - // Find PTEG addresses for given EA - hash1 = (vsid & 0x7ffff) ^ ((ea >> 12) & 0xffff); - hash2 = ~hash1 & 0x7ffff; - api = (ea >> 22) & 0x3f; - pteg1 = (uint32 *)((uint32)pte_address + ((hash1 << 6) & (table_size - 1))); - pteg2 = (uint32 *)((uint32)pte_address + ((hash2 << 6) & (table_size - 1))); - D(bug("PTEG1 at %p, PTEG2 at %p\n", pteg1, pteg2)); - - // Search all 8 PTEs of each PTEG - *free_pte = NULL; - pte_class = 0; - for (i=0; i<8; i++) { - D(bug(" found %08lx %08lx\n", pteg1[i*2], pteg1[i*2+1])); - if (pteg1[i*2] == (0x80000000 | (vsid << 7) | (pte_class << 6) | api)) { - *free_pte = pteg1 + i*2; - D(bug(" existing PTE found (PTEG1)\n")); - break; - } else if (!pteg1[i*2]) { - *free_pte = pteg1 + i*2; - D(bug(" free PTE found (PTEG1)\n")); - break; - } - } - if (*free_pte == NULL) { - pte_class = 1; - for (i=0; i<8; i++) { - D(bug(" found %08lx %08lx\n", pteg2[i*2], pteg2[i*2+1])); - if (pteg2[i*2] == (0x80000000 | (vsid << 7) | (pte_class << 6) | api)) { - *free_pte = pteg2 + i*2; - D(bug(" existing PTE found (PTEG2)\n")); - break; - } else if (!pteg2[i*2]) { - *free_pte = pteg2 + i*2; - D(bug(" free PTE found (PTEG2)\n")); - break; - } - } - } - - // Remap page - if (*free_pte == NULL) { - D(bug(" No free PTE found :-(\m")); - return B_DEVICE_FULL; - } else { - (*free_pte)[0] = 0x80000000 | (vsid << 7) | (pte_class << 6) | api; - (*free_pte)[1] = ra | bits; - D(bug(" written %08lx %08lx to PTE\n", (*free_pte)[0], (*free_pte)[1])); - return B_NO_ERROR; - } -} - -static status_t remap_page(uint32 *free_pte, uint32 ra, uint32 bits) -{ - D(bug("Remapping PTE %p -> RA %p\n", free_pte, ra)); - - // Remap page - if (free_pte == NULL) { - D(bug(" Invalid PTE :-(\n")); - return B_BAD_ADDRESS; - } else { - free_pte[1] = ra | bits; - D(bug(" written %08lx %08lx to PTE\n", free_pte[0], free_pte[1])); - return B_NO_ERROR; - } -} - - -/* - * Foward declarations for hook functions - */ - -static status_t sheep_open(const char *name, uint32 flags, void **cookie); -static status_t sheep_close(void *cookie); -static status_t sheep_free(void *cookie); -static status_t sheep_control(void *cookie, uint32 op, void *data, size_t len); -static status_t sheep_read(void *cookie, off_t pos, void *data, size_t *len); -static status_t sheep_write(void *cookie, off_t pos, const void *data, size_t *len); - - -/* - * Version of our driver - */ - -int32 api_version = B_CUR_DRIVER_API_VERSION; - - -/* - * Device_hooks structure - has function pointers to the - * various entry points for device operations - */ - -static device_hooks my_device_hooks = { - &sheep_open, - &sheep_close, - &sheep_free, - &sheep_control, - &sheep_read, - &sheep_write, - NULL, - NULL, - NULL, - NULL -}; - - -/* - * List of device names to be returned by publish_devices() - */ - -static char *device_name_list[] = { - "sheep", - 0 -}; - - -/* - * Init - do nothing - */ - -status_t init_hardware(void) -{ -#if DEBUG==2 - set_dprintf_enabled(true); -#endif - D(bug("init_hardware()\n")); - return B_NO_ERROR; -} - -status_t init_driver(void) -{ - D(bug("init_driver()\n")); - return B_NO_ERROR; -} - -void uninit_driver(void) -{ - D(bug("uninit_driver()\n")); -} - - -/* - * publish_devices - return list of device names implemented by this driver - */ - -const char **publish_devices(void) -{ - return device_name_list; -} - - -/* - * find_device - return device hooks for a specific device name - */ - -device_hooks *find_device(const char *name) -{ - if (!strcmp(name, device_name_list[0])) - return &my_device_hooks; - - return NULL; -} - - -/* - * sheep_open - hook function for the open call. - */ - -static status_t sheep_open(const char *name, uint32 flags, void **cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_close - hook function for the close call. - */ - -static status_t sheep_close(void *cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_free - hook function to free the cookie returned - * by the open hook. Since the open hook did not return - * a cookie, this is a no-op. - */ - -static status_t sheep_free(void *cookie) -{ - return B_NO_ERROR; -} - - -/* - * sheep_control - hook function for the ioctl call - */ - -static asm void inval_tlb(uint32 ea) -{ - isync - tlbie r3 - sync - blr -} - -static asm void tlbsync(void) -{ - machine 604 - tlbsync - sync - blr -} - -static status_t sheep_control(void *cookie, uint32 op, void *data, size_t len) -{ - static void *block; - static void *block_aligned; - physical_entry pe[2]; - system_info sysinfo; - area_id id; - area_info info; - cpu_status cpu_st; - status_t res; - uint32 ra0, ra1; - uint32 *free_pte_0, *free_pte_1; - int i; - - D(bug("control(%d) data %p, len %08x\n", op, data, len)); - - switch (op) { - case SHEEP_UP: - - // Already messed up? Then do nothing now - if (find_port(PORT_NAME) != B_NAME_NOT_FOUND) - return B_NO_ERROR; - - // Get system info - get_system_info(&sysinfo); - - // Prepare replacement memory - block = malloc(B_PAGE_SIZE * 3); - D(bug("3 pages malloc()ed at %p\n", block)); - block_aligned = (void *)(((uint32)block + B_PAGE_SIZE - 1) & ~(B_PAGE_SIZE-1)); - D(bug("Address aligned to %p\n", block_aligned)); - res = lock_memory(block_aligned, B_PAGE_SIZE * 2, 0); - if (res < 0) - return res; - - // Get memory mapping - D(bug("Memory locked\n")); - res = get_memory_map(block_aligned, B_PAGE_SIZE * 2, pe, 2); - D(bug("get_memory_map returned %d\n", res)); - if (res != B_NO_ERROR) - return res; - - // Find PTE table area - id = find_area("pte_table"); - get_area_info(id, &info); - pte_address = (uint32 *)info.address; - D(bug("PTE table seems to be at %p\n", pte_address)); - table_size = info.size; - D(bug("PTE table size: %dKB\n", table_size / 1024)); - - // Disable interrupts - cpu_st = disable_interrupts(); - - // Find vsid and real addresses of replacement memory - for (i=0; i> 31),((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6),(pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12),((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7),((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - vsid = (pte_address[i*2]&0x7fffff80) >> 7; - ra0 = (uint32)pe[0].address & 0xfffff000; - } - if ((uint32)pe[0].size == B_PAGE_SIZE) { - if (((uint32)pe[1].address & 0xfffff000)==(pte_address[i*2+1]&0xfffff000)) { - D(bug("Found page 1f PtePos %04x V%x VSID %03x H%x API %02x RPN %03x R%1x C%1x WIMG%1x PP%1x \n", - i << 2, - ((pte_address[i*2]&0x80000000) >> 31), ((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6), (pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12), ((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7), ((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - ra1 = (uint32)pe[1].address & 0xfffff000; - } - } else { - if ((((uint32)pe[0].address + B_PAGE_SIZE) & 0xfffff000)==(pte_address[i*2+1]&0xfffff000)) { - D(bug("Found page 1d PtePos %04x V%x VSID %03x H%x API %02x RPN %03x R%1x C%1x WIMG%1x PP%1x \n", - i << 2, - ((pte_address[i*2]&0x80000000) >> 31), ((pte_address[i*2]&0x7fffff80) >> 7), - ((pte_address[i*2]&0x00000040) >> 6), (pte_address[i*2] & 0x3f), - ((pte_address[i*2+1]&0xfffff000) >> 12), ((pte_address[i*2+1]&0x00000100) >> 8), - ((pte_address[i*2+1]&0x00000080) >> 7), ((pte_address[i*2+1]&0x00000078) >> 3), - (pte_address[i*2+1]&0x00000003))); - ra1 = ((uint32)pe[0].address + B_PAGE_SIZE) & 0xfffff000; - } - } - } - - // Map low memory for emulator - free_pte_0 = NULL; - free_pte_1 = NULL; - __sync(); - __isync(); - inval_tlb(0); - inval_tlb(B_PAGE_SIZE); - if (sysinfo.cpu_type != B_CPU_PPC_603 && sysinfo.cpu_type != B_CPU_PPC_603e) - tlbsync(); - res = map_page(0, ra0, &free_pte_0, 0x12); - if (res == B_NO_ERROR) - res = map_page(B_PAGE_SIZE, ra1, &free_pte_1, 0x12); - inval_tlb(0); - inval_tlb(B_PAGE_SIZE); - if (sysinfo.cpu_type != B_CPU_PPC_603 && sysinfo.cpu_type != B_CPU_PPC_603e) - tlbsync(); - __sync(); - __isync(); - - // Restore interrupts - restore_interrupts(cpu_st); - - // Create port so we know that messing was successful - set_port_owner(create_port(1, PORT_NAME), B_SYSTEM_TEAM); - return B_NO_ERROR; - - case SHEEP_DOWN: - return B_NO_ERROR; - - default: - return B_BAD_VALUE; - } -} - - -/* - * sheep_read - hook function for the read call - */ - -static status_t sheep_read(void *cookie, off_t pos, void *data, size_t *len) -{ - void *rom_adr; - area_id area; - system_info info; - - D(bug("read() pos %Lx, data %p, len %08x\n", pos, data, *len)); - - get_system_info(&info); - if (info.platform_type == B_BEBOX_PLATFORM) { - *len = 0; - return B_ERROR; - } - if (*len != 0x400000 && pos != 0) { - *len = 0; - return B_BAD_VALUE; - } - area = map_physical_memory("mac_rom", (void *)0xff000000, 0x00400000, B_ANY_KERNEL_ADDRESS, B_READ_AREA, &rom_adr); - D(bug("Mapped ROM to %p, area id %d\n", rom_adr, area)); - if (area < 0) { - *len = 0; - return area; - } - D(bug("Copying ROM\n")); - memcpy(data, rom_adr, *len); - D(bug("Deleting area\n")); - delete_area(area); - return B_NO_ERROR; -} - - -/* - * sheep_write - hook function for the write call - */ - -static status_t sheep_write(void *cookie, off_t pos, const void *data, size_t *len) -{ - D(bug("write() pos %Lx, data %p, len %08x\n", pos, data, *len)); - return B_READ_ONLY_DEVICE; -} diff --git a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h b/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h deleted file mode 100644 index 8486a0213..000000000 --- a/BasiliskII/src/BeOS/SheepDriver/sheep_driver.h +++ /dev/null @@ -1,33 +0,0 @@ -/* - * sheep_driver.h - Low memory and ROM access driver for SheepShaver and - * Basilisk II on PowerPC systems - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SHEEP_DRIVER_H -#define SHEEP_DRIVER_H - -#include - -enum { - SHEEP_UP = B_DEVICE_OP_CODES_END + 1, - SHEEP_DOWN -}; - -#endif diff --git a/BasiliskII/src/BeOS/SheepNet/Makefile b/BasiliskII/src/BeOS/SheepNet/Makefile deleted file mode 100644 index 36b882fc1..000000000 --- a/BasiliskII/src/BeOS/SheepNet/Makefile +++ /dev/null @@ -1,115 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= sheep_net - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= SHARED - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= sheep_net.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= netdev - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - -install: $(TARGET) - cp $(TARGET) /boot/beos/system/add-ons/net_server/$(NAME) - -uninstall: - rm /boot/beos/system/add-ons/net_server/$(NAME) diff --git a/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp b/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp deleted file mode 100644 index c026293c9..000000000 --- a/BasiliskII/src/BeOS/SheepNet/sheep_net.cpp +++ /dev/null @@ -1,294 +0,0 @@ -/* - * sheep_net.cpp - Net server add-on for SheepShaver and Basilisk II - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sheep_net.h" - -#define DEBUG 0 - -#if DEBUG==1 -#define bug pprintf -#elif DEBUG==2 -#define bug kprintf -#endif - -#if DEBUG -#define D(x) (x) -#else -#define D(x) ; -#endif - -static int pprintf(const char* format, ...) -{ - port_id PortNum; - int len,Ret; - char Buffer[1024]; - va_list ap; - - if ((PortNum = find_port("PortLogger")) == B_NAME_NOT_FOUND) - return(PortNum); - for (len=0; len<1024; len++) - Buffer[len]='\0'; - va_start(ap, format); - vsprintf(Buffer, format, ap); - Ret = write_port(PortNum, 0, Buffer, strlen(Buffer)); - return(Ret); -} - - -// Constants -#define NETDUMP_PRIO 1 // Default is 0 - -const uint32 buffer_size = (sizeof(net_buffer) / B_PAGE_SIZE + 1) * B_PAGE_SIZE; - - -// SheepNet add-on object -class SheepNetAddOn : public BNetProtocol, BPacketHandler { -public: - void AddDevice(BNetDevice *dev, const char *name); - bool PacketReceived(BNetPacket *buf, BNetDevice *dev); -}; - - -// Global variables -static bool shutdown_now = false; -static bool active = false; - -static thread_id write_thread; // Packet writer -static sem_id write_sem; // Semaphore to trigger packet writing -static BNetDevice *EtherCard = NULL; // The Ethernet card we are attached to -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer - -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer - - -/* - * Clear packet buffer - */ - -static void clear(void) -{ - int i; - for (i=0;iread[i].cmd = 0; - net_buffer_ptr->read[i].length = 0; - net_buffer_ptr->read[i].card = 0; - net_buffer_ptr->read[i].reserved = 0; - } - for (i=0;iwrite[i].cmd = 0; - net_buffer_ptr->write[i].length = 0; - net_buffer_ptr->write[i].card = 0; - net_buffer_ptr->write[i].reserved = 0; - } - rd_pos = wr_pos = 0; -} - - -/* - * Packet writer thread - */ - -static status_t write_packet_func(void *arg) -{ - while (!shutdown_now) { - - // Read and execute command - net_packet *p = &net_buffer_ptr->write[wr_pos]; - while (p->cmd & IN_USE) { - D(bug("wp: %d\n", wr_pos)); - switch (p->cmd >> 8) { - - case ACTIVATE_SHEEP_NET: - D(bug("activate sheep-net\n")); - active = false; - clear(); - active = true; - goto next; - - case DEACTIVATE_SHEEP_NET: - D(bug("deactivate sheep-net\n")); - active = false; - clear(); - goto next; - - case SHUTDOWN_SHEEP_NET: - D(bug("shutdown sheep-net\n")); - active = false; - clear(); - shutdown_now = true; - goto next; - - case ADD_MULTICAST: { - const char *data = (const char *)p->data; - D(bug("add multicast %02x %02x %02x %02x %02x %02x\n", data[0], data[1], data[2], data[3], data[4], data[5])); - if (active) { - status_t result; - if ((result = EtherCard->AddMulticastAddress(data)) != B_OK) { - // !! handle error !! error while creating multicast address - D(bug("error while creating multicast address %d\n", result)); - } - } - break; - } - - case REMOVE_MULTICAST: { - const char *data = (const char *)p->data; - D(bug("remove multicast %02x %02x %02x %02x %02x %02x\n", data[0], data[1], data[2], data[3], data[4], data[5])); - if (active) { - status_t result; - if ((result = EtherCard->RemoveMulticastAddress(data)) != B_OK) { - // !! handle error !! error while removing multicast address - D(bug("error while removing multicast address %d\n", result)); - } - } - break; - } - - case SHEEP_PACKET: { - uint32 length = p->length; - // D(bug("sheep packet %d\n", length)); - if (active) { - BStandardPacket *packet = new BStandardPacket(length); - packet->Write(0, (const char *)p->data, length); - EtherCard->SendPacket(packet); - } - break; - } - - default: - D(bug("error: unknown port packet type\n")); - break; - } - p->cmd = 0; // Free packet - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - p = &net_buffer_ptr->write[wr_pos]; - } - - // Wait for next packet -next: acquire_sem_etc(write_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Init the net add-on - */ - -static void init_addon() -{ - int i; - D(bug("init sheep-net\n")); - - // Create packet buffer - if ((buffer_area = create_area("packet buffer", (void **)&net_buffer_ptr, B_ANY_ADDRESS, buffer_size, B_FULL_LOCK, B_READ_AREA | B_WRITE_AREA)) < B_NO_ERROR) { - D(bug("FATAL ERROR: can't create shared area\n")); - return; - } - - // Init packet buffer - clear(); - EtherCard->Address((char *)net_buffer_ptr->ether_addr); - net_buffer_ptr->read_sem = -1; - net_buffer_ptr->read_ofs = (uint32)(net_buffer_ptr->read) - (uint32)net_buffer_ptr; - net_buffer_ptr->read_packet_size = sizeof(net_packet); - net_buffer_ptr->read_packet_count = READ_PACKET_COUNT; - if ((write_sem = create_sem(0, "ether write")) < B_NO_ERROR) { - D(bug("FATAL ERROR: can't create semaphore\n")); - return; - } - net_buffer_ptr->write_sem = write_sem; - net_buffer_ptr->write_ofs = (uint32)(net_buffer_ptr->write) - (uint32)net_buffer_ptr; - net_buffer_ptr->write_packet_size = sizeof(net_packet); - net_buffer_ptr->write_packet_count = WRITE_PACKET_COUNT; - - // Start packet writer thread - write_thread = spawn_thread(write_packet_func, "sheep_net ether write", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(write_thread); -} - - -/* - * Add-on attached to Ethernet card - */ - -void SheepNetAddOn::AddDevice(BNetDevice *dev, const char *name) -{ - if (dev->Type() != B_ETHER_NET_DEVICE) - return; - if (EtherCard != NULL) { - // !! handle error !! support for multiple ethernet cards ... - D(bug("error: SheepShaver doesn't support multiple Ethernetcards !\n")); - return; - } - EtherCard = dev; - init_addon(); - register_packet_handler(this, dev, NETDUMP_PRIO); -} - - -/* - * Ethernet packet received - */ - -bool SheepNetAddOn::PacketReceived(BNetPacket *pkt, BNetDevice *dev) -{ - if (shutdown_now) { - unregister_packet_handler(this, dev); - return false; - } -// D(bug("read_packet_func %d\n", pkt->Size())); - if (active) { - D(bug("rp: %d\n", rd_pos)); - net_packet *p = &net_buffer_ptr->read[rd_pos]; - if (p->cmd & IN_USE) { - D(bug("error: full read buffer ... lost packet\n")); - } else { - memcpy(p->data, pkt->Data(), pkt->Size()); - p->length = pkt->Size(); - p->cmd = IN_USE | (SHEEP_PACKET << 8); - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - release_sem(net_buffer_ptr->read_sem); - } - } - //D(bug("%02x %02x %02x %02x %02x %02x", (uchar) (pkt->Data())[0],(uchar) (pkt->Data())[1],(uchar) (pkt->Data())[2],(uchar) (pkt->Data())[3],(uchar) (pkt->Data())[4],(uchar) (pkt->Data())[5])); - return false; -} - -#pragma export on -extern "C" BNetProtocol *open_protocol(const char *device) -{ - SheepNetAddOn *dev = new SheepNetAddOn; - return dev; -} -#pragma export off diff --git a/BasiliskII/src/BeOS/SheepNet/sheep_net.h b/BasiliskII/src/BeOS/SheepNet/sheep_net.h deleted file mode 100644 index d4585b4dd..000000000 --- a/BasiliskII/src/BeOS/SheepNet/sheep_net.h +++ /dev/null @@ -1,65 +0,0 @@ -/* - * sheep_net.h - Net server add-on for SheepShaver and Basilisk II - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SHEEP_NET_H -#define SHEEP_NET_H - -// Net buffer dimensions -#define READ_PACKET_COUNT 10 -#define WRITE_PACKET_COUNT 10 - -// Net packet -struct net_packet { - uint32 cmd; // Command - uint32 length; // Data length - uint32 card; // Network card ID - uint32 reserved; - uint8 data[1584]; -}; - -// Net buffer (shared area) -struct net_buffer { - uint8 ether_addr[6]; // Ethernet address - uint8 filler1[2]; - sem_id read_sem; // Semaphore for read packets - uint32 read_ofs; - uint32 read_packet_size; - uint32 read_packet_count; - sem_id write_sem; // Semaphore for write packets - uint32 write_ofs; - uint32 write_packet_size; - uint32 write_packet_count; - uint8 filler[24]; - net_packet read[READ_PACKET_COUNT]; - net_packet write[WRITE_PACKET_COUNT]; -}; - -// Packet commands -#define SHEEP_PACKET 0 -#define ADD_MULTICAST 1 -#define REMOVE_MULTICAST 2 -#define ACTIVATE_SHEEP_NET 8 -#define DEACTIVATE_SHEEP_NET 9 -#define SHUTDOWN_SHEEP_NET 10 - -#define IN_USE 1 - -#endif diff --git a/BasiliskII/src/BeOS/about_window.cpp b/BasiliskII/src/BeOS/about_window.cpp deleted file mode 100644 index 94f9944e0..000000000 --- a/BasiliskII/src/BeOS/about_window.cpp +++ /dev/null @@ -1,59 +0,0 @@ -/* - * about_window.cpp - "About" window - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include - -#include "sysdeps.h" -#include "version.h" -#include "user_strings.h" - -/* - * Display "About" window - */ - -void ShowAboutWindow(void) -{ - char str[512]; - sprintf(str, - "Basilisk II\nVersion %d.%d\n\n" - "Copyright " B_UTF8_COPYRIGHT " 1997-2008 Christian Bauer et al.\n" - "E-mail: Christian.Bauer@uni-mainz.de\n" - "http://www.uni-mainz.de/~bauec002/B2Main.html\n\n" - "Basilisk II comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - BAlert *about = new BAlert("", str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_FROM_LABEL); - BTextView *theText = about->TextView(); - if (theText) { - theText->SetStylable(true); - theText->Select(0, 11); - BFont ourFont; - theText->SetFontAndColor(be_bold_font); - theText->GetFontAndColor(2, &ourFont, NULL); - ourFont.SetSize(24); - theText->SetFontAndColor(&ourFont); - } - about->Go(); -} diff --git a/BasiliskII/src/BeOS/about_window.h b/BasiliskII/src/BeOS/about_window.h deleted file mode 100644 index 1960c9766..000000000 --- a/BasiliskII/src/BeOS/about_window.h +++ /dev/null @@ -1,27 +0,0 @@ -/* - * about_window.h - "About" window - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 ABOUT_WINDOW_H -#define ABOUT_WINDOW_H - -// Display "About" window -extern void ShowAboutWindow(void); - -#endif diff --git a/BasiliskII/src/BeOS/audio_beos.cpp b/BasiliskII/src/BeOS/audio_beos.cpp deleted file mode 100644 index 026545870..000000000 --- a/BasiliskII/src/BeOS/audio_beos.cpp +++ /dev/null @@ -1,342 +0,0 @@ -/* - * audio_beos.cpp - Audio support, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int audio_irq_done_sem = -1; // Signal from interrupt to streaming thread: data block read -static BSoundPlayer *the_player; - -// Prototypes -static void playbuffer_func(void *arg, void *buf, size_t size, const media_raw_audio_format &format); - - -/* - * Audio manager thread (for calling media kit functions; - * this is not safe under R4 when running on the MacOS stack in kernel space) - */ - -// Message constants -const uint32 MSG_QUIT_AUDIO_MANAGER = 'quit'; -const uint32 MSG_ENTER_STREAM = 'entr'; -const uint32 MSG_EXIT_STREAM = 'exit'; -const uint32 MSG_GET_VOLUME = 'getv'; -const uint32 MSG_SET_VOLUME = 'setv'; - -static thread_id am_thread = -1; -static sem_id am_done_sem = -1; - -static volatile float am_volume; - -static status_t audio_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Audio manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_AUDIO_MANAGER: - return 0; - - case MSG_ENTER_STREAM: - the_player->Start(); - break; - - case MSG_EXIT_STREAM: - the_player->Stop(); - break; - - case MSG_GET_VOLUME: - am_volume = the_player->Volume(); - break; - - case MSG_SET_VOLUME: - the_player->SetVolume(am_volume); - break; - } - - // Acknowledge - release_sem(am_done_sem); - } -} - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[0]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - // Init audio status and feature flags - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(2); - set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphores - audio_irq_done_sem = create_sem(0, "Audio IRQ Done"); - am_done_sem = create_sem(0, "Audio Manager Done"); - - // Start audio manager thread - am_thread = spawn_thread(audio_manager, "Audio Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(am_thread); - - // Start stream - media_raw_audio_format format; - format.frame_rate = AudioStatus.sample_rate >> 16; - format.channel_count = AudioStatus.channels; - format.format = media_raw_audio_format::B_AUDIO_SHORT; - format.byte_order = B_MEDIA_BIG_ENDIAN; - audio_frames_per_block = 4096; - size_t block_size = (AudioStatus.sample_size >> 3) * AudioStatus.channels * audio_frames_per_block; - D(bug("AudioInit: block size %d\n", block_size)); - format.buffer_size = block_size; - the_player = new BSoundPlayer(&format, "MacOS Audio", playbuffer_func, NULL, NULL); - if (the_player->InitCheck() != B_NO_ERROR) { - printf("FATAL: Cannot initialize BSoundPlayer\n"); - delete the_player; - the_player = NULL; - return; - } else - the_player->SetHasData(true); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Stop stream - if (the_player) { - the_player->Stop(); - delete the_player; - the_player = NULL; - } - - // Stop audio manager - if (am_thread > 0) { - status_t l; - send_data(am_thread, MSG_QUIT_AUDIO_MANAGER, NULL, 0); - wait_for_thread(am_thread, &l); - } - - // Delete semaphores - delete_sem(am_done_sem); - delete_sem(audio_irq_done_sem); -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - while (send_data(am_thread, MSG_ENTER_STREAM, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - while (send_data(am_thread, MSG_EXIT_STREAM, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; -} - - -/* - * Streaming function - */ - -static uint32 apple_stream_info; // Mac address of SoundComponentData struct describing next buffer - -static void playbuffer_func(void *arg, void *buf, size_t size, const media_raw_audio_format &format) -{ - // Check if new buffer is available - if (acquire_sem_etc(audio_irq_done_sem, 1, B_TIMEOUT, 0) == B_NO_ERROR) { - - // Get size of audio data - D(bug("stream: new buffer present\n")); - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - size_t work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: size %d, work_size %d\n", size, work_size)); - if (work_size > size) - work_size = size; - - if (format.format != media_raw_audio_format::B_AUDIO_SHORT) { - D(bug("Wrong audio format %04x\n", format.format)); - return; - } - - // Place data into Media Kit buffer - Mac2Host_memcpy(buf, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - if (work_size != size) - memset((uint8 *)buf + work_size, 0, size - work_size); - } - - } else - memset(buf, 0, size); - - // Trigger audio interrupt to get new buffer - if (AudioStatus.num_sources) { - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - } -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - release_sem(audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - return true; -} - -bool audio_set_sample_size(int index) -{ - return true; -} - -bool audio_set_channels(int index) -{ - return true; -} - - -/* - * Get/set audio info - */ - -bool audio_get_main_mute(void) -{ - return false; -} - -uint32 audio_get_main_volume(void) -{ - if (audio_open) { - while (send_data(am_thread, MSG_GET_VOLUME, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; - return int(am_volume * 256.0) * 0x00010001; - } else - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ - if (audio_open) { - am_volume = float((vol >> 16) + (vol & 0xffff)) / 512.0; - while (send_data(am_thread, MSG_SET_VOLUME, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(am_done_sem) == B_INTERRUPTED) ; - } -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ -} diff --git a/BasiliskII/src/BeOS/clip_beos.cpp b/BasiliskII/src/BeOS/clip_beos.cpp deleted file mode 100644 index 10159ec6c..000000000 --- a/BasiliskII/src/BeOS/clip_beos.cpp +++ /dev/null @@ -1,128 +0,0 @@ -/* - * clip_beos.cpp - Clipboard handling, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include - -#include "clip.h" -#include "prefs.h" - -#define DEBUG 1 -#include "debug.h" - - -// Flag: Don't convert clipboard text -static bool no_clip_conversion; - - -/* - * Initialization - */ - -void ClipInit(void) -{ - no_clip_conversion = PrefsFindBool("noclipconversion"); -} - - -/* - * Deinitialization - */ - -void ClipExit(void) -{ -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - D(bug("GetScrap handle %p, type %08x, offset %d\n", handle, type, offset)); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length)); - if (length <= 0) - return; - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - - if (no_clip_conversion) { - - // Only convert CR->LF - char *buf = new char[length]; - for (int i=0; iAddData("text/plain", B_MIME_TYPE, buf, length); - be_clipboard->Commit(); - delete[] buf; - - } else { - - // Convert text from Mac charset to UTF-8 - int32 dest_length = length*3; - int32 state = 0; - char *buf = new char[dest_length]; - if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, (char *)scrap, &length, buf, &dest_length, &state) == B_OK) { - for (int i=0; iAddData("text/plain", B_MIME_TYPE, buf, dest_length); - be_clipboard->Commit(); - } - delete[] buf; - } - be_clipboard->Unlock(); - } - break; - } -} diff --git a/BasiliskII/src/BeOS/ether_beos.cpp b/BasiliskII/src/BeOS/ether_beos.cpp deleted file mode 100644 index ebc85daa6..000000000 --- a/BasiliskII/src/BeOS/ether_beos.cpp +++ /dev/null @@ -1,532 +0,0 @@ -/* - * ether_beos.cpp - Ethernet device driver, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 "sysdeps.h" - -#include -#include -#include -#include - -#include -#include -#include -#include - -#ifdef __HAIKU__ -#include -#include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "macos_util.h" -#include "ether.h" -#include "ether_defs.h" - -#include "sheep_net.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// List of attached protocols -struct NetProtocol { - uint16 type; - uint32 handler; -}; - -static BList prot_list; - - -// Global variables -static thread_id read_thread; // Packet reception thread -static bool ether_thread_active = true; // Flag for quitting the reception thread - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer -static sem_id read_sem, write_sem; // Semaphores to trigger packet reading/writing - -static int fd = -1; // UDP socket fd -static bool udp_tunnel = false; - - -// Prototypes -static status_t receive_proc(void *data); - - -/* - * Find protocol in list - */ - -static NetProtocol *find_protocol(uint16 type) -{ - // All 802.2 types are the same - if (type <= 1500) - type = 0; - - // Search list (we could use hashing here but there are usually only three - // handlers installed: 0x0000 for AppleTalk and 0x0800/0x0806 for TCP/IP) - NetProtocol *p; - for (int i=0; (p = (NetProtocol *)prot_list.ItemAt(i)) != NULL; i++) - if (p->type == type) - return p; - return NULL; -} - - -/* - * Remove all protocols - */ - -static void remove_all_protocols(void) -{ - NetProtocol *p; - while ((p = (NetProtocol *)prot_list.RemoveItem((long)0)) != NULL) - delete p; -} - - -/* - * Initialization - */ - -bool ether_init(void) -{ - // Do nothing if no Ethernet device specified - if (PrefsFindString("ether") == NULL) - return false; - - // Find net_server team -i_wanna_try_that_again: - bool found_add_on = false; - team_info t_info; - int32 t_cookie = 0; - image_info i_info; - int32 i_cookie = 0; - while (get_next_team_info(&t_cookie, &t_info) == B_NO_ERROR) { - if (strstr(t_info.args,"net_server")!=NULL) { - - // Check if sheep_net add-on is loaded - while (get_next_image_info(t_info.team, &i_cookie, &i_info) == B_NO_ERROR) { - if (strstr(i_info.name, "sheep_net") != NULL) { - found_add_on = true; - break; - } - } - } - if (found_add_on) break; - } - if (!found_add_on) { - - // Search for sheep_net in network config file - char str[1024]; - bool sheep_net_found = false; - FILE *fin = fopen("/boot/home/config/settings/network", "r"); - while (!feof(fin)) { - fgets(str, 1024, fin); - if (strstr(str, "PROTOCOLS")) - if (strstr(str, "sheep_net")) - sheep_net_found = true; - } - fclose(fin); - - // It was found, so something else must be wrong - if (sheep_net_found) { - WarningAlert(GetString(STR_NO_NET_ADDON_WARN)); - return false; - } - - // Not found, inform the user - if (!ChoiceAlert(GetString(STR_NET_CONFIG_MODIFY_WARN), GetString(STR_OK_BUTTON), GetString(STR_CANCEL_BUTTON))) - return false; - - // Change the network config file and restart the network - fin = fopen("/boot/home/config/settings/network", "r"); - FILE *fout = fopen("/boot/home/config/settings/network.2", "w"); - bool global_found = false; - bool modified = false; - while (!feof(fin)) { - str[0] = 0; - fgets(str, 1024, fin); - if (!global_found && strstr(str, "GLOBAL:")) { - global_found = true; - } else if (global_found && !modified && strstr(str, "PROTOCOLS")) { - str[strlen(str)-1] = 0; - strcat(str, " sheep_net\n"); - modified = true; - } else if (global_found && !modified && strlen(str) > 2 && str[strlen(str) - 2] == ':') { - fputs("\tPROTOCOLS = sheep_net\n", fout); - modified = true; - } - fputs(str, fout); - } - if (!modified) - fputs("\tPROTOCOLS = sheep_net\n", fout); - fclose(fout); - fclose(fin); - remove("/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network", "/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network.2", "/boot/home/config/settings/network"); - - app_info ai; - if (be_roster->GetAppInfo("application/x-vnd.Be-NETS", &ai) == B_OK) { - BMessenger msg(NULL, ai.team); - if (msg.IsValid()) { - while (be_roster->IsRunning("application/x-vnd.Be-NETS")) { - msg.SendMessage(B_QUIT_REQUESTED); - snooze(500000); - } - } - } - BPath path; - find_directory(B_BEOS_BOOT_DIRECTORY, &path); - path.Append("Netscript"); - const char *argv[3] = {"/bin/sh", path.Path(), NULL}; - thread_id net_server = load_image(2, argv, (const char **)environ); - resume_thread(net_server); - status_t l; - wait_for_thread(net_server, &l); - goto i_wanna_try_that_again; - } - - // Set up communications with add-on - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - WarningAlert(GetString(STR_NET_ADDON_INIT_FAILED)); - return false; - } - if ((buffer_area = clone_area("local packet buffer", (void **)&net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - D(bug("EtherInit: couldn't clone packet area\n")); - WarningAlert(GetString(STR_NET_ADDON_CLONE_FAILED)); - return false; - } - if ((read_sem = create_sem(0, "ether read")) < B_NO_ERROR) { - printf("FATAL: can't create Ethernet semaphore\n"); - return false; - } - net_buffer_ptr->read_sem = read_sem; - write_sem = net_buffer_ptr->write_sem; - read_thread = spawn_thread(receive_proc, "Ethernet Receiver", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - for (int i=0; iwrite[i].cmd = IN_USE | (ACTIVATE_SHEEP_NET << 8); - rd_pos = wr_pos = 0; - release_sem(write_sem); - - // Get Ethernet address - memcpy(ether_addr, net_buffer_ptr->ether_addr, 6); - D(bug("Ethernet address %02x %02x %02x %02x %02x %02x\n", ether_addr[0], ether_addr[1], ether_addr[2], ether_addr[3], ether_addr[4], ether_addr[5])); - - // Everything OK - return true; -} - - -/* - * Deinitialization - */ - -void ether_exit(void) -{ - // Close communications with add-on - for (int i=0; iwrite[i].cmd = IN_USE | (DEACTIVATE_SHEEP_NET << 8); - release_sem(write_sem); - - // Quit reception thread - ether_thread_active = false; - status_t result; - release_sem(read_sem); - wait_for_thread(read_thread, &result); - - delete_sem(read_sem); - delete_area(buffer_area); - - // Remove all protocols - remove_all_protocols(); -} - - -/* - * Reset - */ - -void ether_reset(void) -{ - remove_all_protocols(); -} - - -/* - * Add multicast address - */ - -int16 ether_add_multicast(uint32 pb) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't enable multicast address\n")); - } else { - Mac2Host_memcpy(p->data, pb + eMultiAddr, 6); - p->length = 6; - p->cmd = IN_USE | (ADD_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Delete multicast address - */ - -int16 ether_del_multicast(uint32 pb) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't enable multicast address\n")); - } else { - Mac2Host_memcpy(p->data, pb + eMultiAddr, 6); - p->length = 6; - p->cmd = IN_USE | (REMOVE_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Attach protocol handler - */ - -int16 ether_attach_ph(uint16 type, uint32 handler) -{ - // Already attached? - NetProtocol *p = find_protocol(type); - if (p != NULL) - return lapProtErr; - else { - // No, create and attach - p = new NetProtocol; - p->type = type; - p->handler = handler; - prot_list.AddItem(p); - return noErr; - } -} - - -/* - * Detach protocol handler - */ - -int16 ether_detach_ph(uint16 type) -{ - NetProtocol *p = find_protocol(type); - if (p != NULL) { - prot_list.RemoveItem(p); - delete p; - return noErr; - } else - return lapProtErr; -} - - -/* - * Transmit raw ethernet packet - */ - -int16 ether_write(uint32 wds) -{ - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: Couldn't transmit packet (buffer full)\n")); - } else { - - // Copy packet to buffer - int len = ether_wds_to_buffer(wds, p->data); - -#if MONITOR - bug("Sending Ethernet packet:\n"); - for (int i=0; idata[i]); - } - bug("\n"); -#endif - - // Notify add-on - p->length = len; - p->cmd = IN_USE | (SHEEP_PACKET << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - return noErr; -} - - -/* - * Packet reception thread (non-UDP) - */ - -static status_t receive_proc(void *data) -{ - while (ether_thread_active) { - if (net_buffer_ptr->read[rd_pos].cmd & IN_USE) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - acquire_sem_etc(read_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Packet reception thread (UDP) - */ - -static status_t receive_proc_udp(void *data) -{ - while (ether_thread_active) { - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 1; - timeout.tv_usec = 0; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Start UDP packet reception thread - */ - -bool ether_start_udp_thread(int socket_fd) -{ - fd = socket_fd; - udp_tunnel = true; - ether_thread_active = true; - read_thread = spawn_thread(receive_proc_udp, "UDP Receiver", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - return true; -} - - -/* - * Stop UDP packet reception thread - */ - -void ether_stop_udp_thread(void) -{ - ether_thread_active = false; - status_t result; - wait_for_thread(read_thread, &result); -} - - -/* - * Ethernet interrupt - activate deferred tasks to call IODone or protocol handlers - */ - -void EtherInterrupt(void) -{ - D(bug("EtherIRQ\n")); - EthernetPacket ether_packet; - uint32 packet = ether_packet.addr(); - - if (udp_tunnel) { - - ssize_t length; - - // Read packets from socket and hand to ether_udp_read() for processing - while (true) { - struct sockaddr_in from; - socklen_t from_len = sizeof(from); - length = recvfrom(fd, Mac2HostAddr(packet), 1514, 0, (struct sockaddr *)&from, &from_len); - if (length < 14) - break; - ether_udp_read(packet, length, &from); - } - - } else { - - // Call protocol handler for received packets - net_packet *p = &net_buffer_ptr->read[rd_pos]; - while (p->cmd & IN_USE) { - if ((p->cmd >> 8) == SHEEP_PACKET) { - Host2Mac_memcpy(packet, p->data, p->length); -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; ilength; i++) { - bug("%02x ", ReadMacInt8(packet + i)); - } - bug("\n"); -#endif - // Get packet type - uint16 type = ReadMacInt16(packet + 12); - - // Look for protocol - NetProtocol *prot = find_protocol(type); - if (prot == NULL) - goto next; - - // No default handler - if (prot->handler == 0) - goto next; - - // Copy header to RHA - Mac2Mac_memcpy(ether_data + ed_RHA, packet, 14); - D(bug(" header %08lx%04lx %08lx%04lx %04lx\n", ReadMacInt32(ether_data + ed_RHA), ReadMacInt16(ether_data + ed_RHA + 4), ReadMacInt32(ether_data + ed_RHA + 6), ReadMacInt16(ether_data + ed_RHA + 10), ReadMacInt16(ether_data + ed_RHA + 12))); - - // Call protocol handler - M68kRegisters r; - r.d[0] = type; // Packet type - r.d[1] = p->length - 14; // Remaining packet length (without header, for ReadPacket) - r.a[0] = packet + 14; // Pointer to packet (Mac address, for ReadPacket) - r.a[3] = ether_data + ed_RHA + 14; // Pointer behind header in RHA - r.a[4] = ether_data + ed_ReadPacket; // Pointer to ReadPacket/ReadRest routines - D(bug(" calling protocol handler %08lx, type %08lx, length %08lx, data %08lx, rha %08lx, read_packet %08lx\n", prot->handler, r.d[0], r.d[1], r.a[0], r.a[3], r.a[4])); - Execute68k(prot->handler, &r); - } -next: p->cmd = 0; // Free packet - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - p = &net_buffer_ptr->read[rd_pos]; - } - } - D(bug(" EtherIRQ done\n")); -} diff --git a/BasiliskII/src/BeOS/extfs_beos.cpp b/BasiliskII/src/BeOS/extfs_beos.cpp deleted file mode 100644 index 5b7ab4d62..000000000 --- a/BasiliskII/src/BeOS/extfs_beos.cpp +++ /dev/null @@ -1,489 +0,0 @@ -/* - * extfs_beos.cpp - MacOS file system for access native file system access, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include -#include -#include -#include - -#include "extfs.h" -#include "extfs_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Default Finder flags -const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited; - -// Temporary buffer for transfers from/to kernel space -const int TMP_BUF_SIZE = 0x10000; -static uint8 *tmp_buf = NULL; - - -/* - * Initialization - */ - -void extfs_init(void) -{ - // Allocate temporary buffer - tmp_buf = new uint8[TMP_BUF_SIZE]; -} - - -/* - * Deinitialization - */ - -void extfs_exit(void) -{ - // Delete temporary buffer - delete[] tmp_buf; -} - - -/* - * Add component to path name - */ - -void add_path_component(char *path, const char *component) -{ - int l = strlen(path); - if (l < MAX_PATH_LENGTH-1 && path[l-1] != '/') { - path[l] = '/'; - path[l+1] = 0; - } - strncat(path, component, MAX_PATH_LENGTH-1); -} - - -/* - * Get/set finder info for file/directory specified by full path - */ - -struct mime2type { - const char *mime; - uint32 type; - uint32 creator; - bool reversible; // type -> mime translation possible -}; - -static const mime2type m2t_translation[] = { - {"application/x-compress", 'ZIVM', 'LZIV', true}, - {"application/x-gzip", 'Gzip', 'Gzip', true}, - {"application/x-macbinary", 'BINA', '????', false}, - {"application/mac-binhex40", 'TEXT', 'SITx', false}, - {"application/pdf", 'PDF ', 'CARO', true}, - {"application/postscript", 'TEXT', 'ttxt', false}, - {"application/x-stuffit", 'SIT!', 'SITx', true}, - {"application/x-tar", 'TARF', 'TAR ', true}, - {"application/x-uuencode", 'TEXT', 'SITx', false}, - {"application/zip", 'ZIP ', 'ZIP ', true}, - {"audio/x-8svx", '8SVX', 'SNDM', true}, - {"audio/x-aifc", 'AIFC', 'TVOD', true}, - {"audio/x-aiff", 'AIFF', 'TVOD', true}, - {"audio/basic", 'ULAW', 'TVOD', true}, - {"audio/x-midi", 'MIDI', 'TVOD', true}, - {"audio/x-mpeg", 'MPG ', 'TVOD', true}, - {"audio/x-wav", 'WAVE', 'TVOD', true}, - {"image/x-bmp", 'BMPf', 'ogle', true}, - {"image/gif", 'GIFf', 'ogle', true}, - {"image/x-ilbm", 'ILBM', 'GKON', true}, - {"image/jpeg", 'JPEG', 'ogle', true}, - {"image/jpeg", 'JFIF', 'ogle', true}, - {"image/x-photoshop", '8BPS', '8BIM', true}, - {"image/pict", 'PICT', 'ogle', true}, - {"image/png", 'PNGf', 'ogle', true}, - {"image/x-sgi", '.SGI', 'ogle', true}, - {"image/x-targa", 'TPIC', 'ogle', true}, - {"image/tiff", 'TIFF', 'ogle', true}, - {"text/html", 'TEXT', 'MOSS', false}, - {"text/plain", 'TEXT', 'ttxt', true}, - {"text/rtf", 'TEXT', 'MSWD', false}, - {"text/x-source-code", 'TEXT', 'R*ch', false}, - {"video/mpeg", 'MPEG', 'TVOD', true}, - {"video/quicktime", 'MooV', 'TVOD', true}, - {"video/x-flc", 'FLI ', 'TVOD', true}, - {"video/x-msvideo", 'VfW ', 'TVOD', true}, - {NULL, 0, 0, false} // End marker -}; - -void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Set default finder info - Mac_memset(finfo, 0, SIZEOF_FInfo); - if (fxinfo) - Mac_memset(fxinfo, 0, SIZEOF_FXInfo); - WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS); - WriteMacInt32(finfo + fdLocation, (uint32)-1); - - // Open file - int fd = open(path, O_RDONLY); - if (fd < 0) - return; - - if (!is_dir) { - - // Read BeOS MIME type - ssize_t actual = fs_read_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, tmp_buf, 256); - tmp_buf[255] = 0; - - if (actual > 0) { - - // Translate MIME type to MacOS type/creator - uint8 mactype[4]; - if (sscanf((char *)tmp_buf, "application/x-MacOS-%c%c%c%c", mactype, mactype+1, mactype+2, mactype+3) == 4) { - - // MacOS style type - WriteMacInt32(finfo + fdType, (mactype[0] << 24) | (mactype[1] << 16) | (mactype[2] << 8) | mactype[3]); - - } else { - - // MIME string, look in table - for (int i=0; m2t_translation[i].mime; i++) { - if (!strcmp((char *)tmp_buf, m2t_translation[i].mime)) { - WriteMacInt32(finfo + fdType, m2t_translation[i].type); - WriteMacInt32(finfo + fdCreator, m2t_translation[i].creator); - break; - } - } - } - } - - // Override file type with MACOS:CREATOR attribute - if (fs_read_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4) == 4) - WriteMacInt32(finfo + fdCreator, (tmp_buf[0] << 24) | (tmp_buf[1] << 16) | (tmp_buf[2] << 8) | tmp_buf[3]); - } - - // Read MACOS:HFS_FLAGS attribute - if (fs_read_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2) == 2) - WriteMacInt16(finfo + fdFlags, (tmp_buf[0] << 8) | tmp_buf[1]); - - // Close file - close(fd); -} - -void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir) -{ - // Open file - int fd = open(path, O_WRONLY); - if (fd < 0) - return; - - if (!is_dir) { - - // Set BEOS:TYPE attribute - uint32 type = ReadMacInt32(finfo + fdType); - if (type) { - for (int i=0; m2t_translation[i].mime; i++) { - if (m2t_translation[i].type == type && m2t_translation[i].reversible) { - fs_write_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, m2t_translation[i].mime, strlen(m2t_translation[i].mime) + 1); - break; - } - } - } - - // Set MACOS:CREATOR attribute - uint32 creator = ReadMacInt32(finfo + fdCreator); - if (creator) { - tmp_buf[0] = creator >> 24; - tmp_buf[1] = creator >> 16; - tmp_buf[2] = creator >> 8; - tmp_buf[3] = creator; - fs_write_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4); - } - } - - // Write MACOS:HFS_FLAGS attribute - uint16 flags = ReadMacInt16(finfo + fdFlags); - if (flags != DEFAULT_FINDER_FLAGS) { - tmp_buf[0] = flags >> 8; - tmp_buf[1] = flags; - fs_write_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2); - } else - fs_remove_attr(fd, "MACOS:HFS_FLAGS"); - - // Close file - close(fd); -} - - -/* - * Resource fork emulation functions - */ - -uint32 get_rfork_size(const char *path) -{ - // Open file - int fd = open(path, O_RDONLY); - if (fd < 0) - return 0; - - // Get size of MACOS:RFORK attribute - struct attr_info info; - if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0) - info.size = 0; - - // Close file and return size - close(fd); - return info.size; -} - -int open_rfork(const char *path, int flag) -{ - // Open original file - int fd = open(path, flag); - if (fd < 0) - return -1; - - // Open temporary file for resource fork - char rname[L_tmpnam]; - tmpnam(rname); - int rfd = open(rname, O_RDWR | O_CREAT | O_TRUNC, 0666); - if (rfd < 0) { - close(fd); - return -1; - } - unlink(rname); // File will be deleted when closed - - // Get size of MACOS:RFORK attribute - struct attr_info info; - if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0) - info.size = 0; - - // Copy resource data from attribute to temporary file - if (info.size > 0) { - - // Allocate buffer - void *buf = malloc(info.size); - if (buf == NULL) { - close(rfd); - close(fd); - return -1; - } - - // Copy data - fs_read_attr(fd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, info.size); - write(rfd, buf, info.size); - lseek(rfd, 0, SEEK_SET); - - // Free buffer - if (buf) - free(buf); - } - - // Close original file - close(fd); - return rfd; -} - -void close_rfork(const char *path, int fd) -{ - if (fd < 0) - return; - - // Get size of temporary file - struct stat st; - if (fstat(fd, &st) < 0) - st.st_size = 0; - - // Open original file - int ofd = open(path, O_WRONLY); - if (ofd > 0) { - - // Copy resource data to MACOS:RFORK attribute - if (st.st_size > 0) { - - // Allocate buffer - void *buf = malloc(st.st_size); - if (buf == NULL) { - close(ofd); - close(fd); - return; - } - - // Copy data - lseek(fd, 0, SEEK_SET); - read(fd, buf, st.st_size); - fs_write_attr(ofd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, st.st_size); - - // Free buffer - if (buf) - free(buf); - - } else - fs_remove_attr(ofd, "MACOS:RFORK"); - - // Close original file - close(ofd); - } - - // Close temporary file - close(fd); -} - - -/* - * Read "length" bytes from file to "buffer", - * returns number of bytes read (or -1 on error) - */ - -static inline ssize_t sread(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = read(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -ssize_t extfs_read(int fd, void *buffer, size_t length) -{ - // Buffer in kernel space? - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - ssize_t actual = 0; - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - ssize_t res = sread(fd, tmp_buf, transfer_size); - if (res < 0) - return res; - memcpy(buffer, tmp_buf, res); - buffer = (void *)((uint8 *)buffer + res); - length -= res; - actual += res; - if (res != transfer_size) - return actual; - } - return actual; - - } else { - - // No, transfer directly - return sread(fd, buffer, length); - } -} - - -/* - * Write "length" bytes from "buffer" to file, - * returns number of bytes written (or -1 on error) - */ - -static inline ssize_t swrite(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = write(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -ssize_t extfs_write(int fd, void *buffer, size_t length) -{ - // Buffer in kernel space? - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - ssize_t actual = 0; - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(tmp_buf, buffer, transfer_size); - ssize_t res = swrite(fd, tmp_buf, transfer_size); - if (res < 0) - return res; - buffer = (void *)((uint8 *)buffer + res); - length -= res; - actual += res; - if (res != transfer_size) - return actual; - } - return actual; - - } else { - - // No, transfer directly - return swrite(fd, buffer, length); - } -} - - -/* - * Remove file/directory, returns false on error (and sets errno) - */ - -bool extfs_remove(const char *path) -{ - if (remove(path) < 0) { - if (errno == EISDIR) - return rmdir(path) == 0; - else - return false; - } - return true; -} - - -/* - * Rename/move file/directory, returns false on error (and sets errno) - */ - -bool extfs_rename(const char *old_path, const char *new_path) -{ - return rename(old_path, new_path) == 0; -} - -/* - * Strings (filenames) conversion - */ - -// Convert from the host OS filename encoding to MacRoman -const char *host_encoding_to_macroman(const char *filename) -{ - int32 state = 0; - static char buffer[512]; - int32 size = sizeof(buffer) - 1; - int32 insize = strlen(filename); - convert_from_utf8(B_MAC_ROMAN_CONVERSION, filename, &insize, buffer, &size, &state); - buffer[size] = 0; - return buffer; -} - -// Convert from MacRoman to host OS filename encoding -const char *macroman_to_host_encoding(const char *filename) -{ - int32 state = 0; - static char buffer[512]; - int32 insize = strlen(filename); - int32 size = sizeof(buffer) - 1; - convert_to_utf8(B_MAC_ROMAN_CONVERSION, filename, &insize, buffer, &size, &state); - buffer[size] = 0; - return buffer; -} diff --git a/BasiliskII/src/BeOS/main_beos.cpp b/BasiliskII/src/BeOS/main_beos.cpp deleted file mode 100644 index 507e3bde0..000000000 --- a/BasiliskII/src/BeOS/main_beos.cpp +++ /dev/null @@ -1,826 +0,0 @@ -/* - * main_beos.cpp - Startup code for BeOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include - -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "xpram.h" -#include "timer.h" -#include "video.h" -#include "rom_patches.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "sys.h" -#include "user_strings.h" -#include "version.h" -#include "main.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-BasiliskII"; -const char ROM_FILE_NAME[] = "ROM"; -const char RAM_AREA_NAME[] = "Macintosh RAM"; -const char ROM_AREA_NAME[] = "Macintosh ROM"; -const uint32 MSG_START = 'strt'; // Emulator start message -const uint32 ROM_AREA_SIZE = 0x500000; // Enough to hold PowerMac ROM (for powerrom_cpu) - -// Prototypes -#if __POWERPC__ -static void sigsegv_handler(vregs *r); -#endif - - -// Application object -class BasiliskII : public BApplication { -public: - BasiliskII() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - - // Initialize other variables - rom_area = ram_area = -1; - xpram_thread = tick_thread = -1; - xpram_thread_active = true; - tick_thread_active = true; - AllowQuitting = true; - } - virtual void ReadyToRun(void); - virtual void MessageReceived(BMessage *msg); - void StartEmulator(void); - virtual bool QuitRequested(void); - virtual void Quit(void); - - thread_id xpram_thread; // XPRAM watchdog - thread_id tick_thread; // 60Hz thread - - volatile bool xpram_thread_active; // Flag for quitting the XPRAM thread - volatile bool tick_thread_active; // Flag for quitting the 60Hz thread - - bool AllowQuitting; // Flag: Alt-Q quitting allowed - -private: - static status_t emul_func(void *arg); - static status_t tick_func(void *arg); - static status_t xpram_func(void *arg); - static void sigsegv_invoc(int sig, void *arg, vregs *r); - - void init_rom(void); - void load_rom(void); - - area_id rom_area; // ROM area ID - area_id ram_area; // RAM area ID - - struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) - - // Exceptions - class area_error {}; - class file_open_error {}; - class file_read_error {}; - class rom_size_error {}; - - char* vmdir; -}; - -static BasiliskII *the_app; - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - -// Global variables for PowerROM CPU -thread_id emul_thread = -1; // Emulator thread - -#if __POWERPC__ -int sheep_fd = -1; // fd of sheep driver -#endif - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - the_app = new BasiliskII(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Run application - */ - -void BasiliskII::ReadyToRun(void) -{ - // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; - srand(real_time_clock()); - tzset(); - - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - - // Delete old areas - area_id old_ram_area = find_area(RAM_AREA_NAME); - if (old_ram_area > 0) - delete_area(old_ram_area); - area_id old_rom_area = find_area(ROM_AREA_NAME); - if (old_rom_area > 0) - delete_area(old_rom_area); - - // Read preferences - int argc = 0; - char **argv = NULL; - PrefsInit(vmdir, argc, argv); - - // Init system routines - SysInit(); - - // Show preferences editor (or start emulator directly) - if (!PrefsFindBool("nogui")) - PrefsEditor(); - else - PostMessage(MSG_START); -} - - -/* - * Message received - */ - -void BasiliskII::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_START: - StartEmulator(); - break; - default: - BApplication::MessageReceived(msg); - } -} - - -/* - * Start emulator - */ - -void BasiliskII::StartEmulator(void) -{ - char str[256]; - -#if REAL_ADDRESSING - // Open sheep driver and remap low memory - sheep_fd = open("/dev/sheep", 0); - if (sheep_fd < 0) { - sprintf(str, GetString(STR_NO_SHEEP_DRIVER_ERR), strerror(sheep_fd), sheep_fd); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - status_t res = ioctl(sheep_fd, SHEEP_UP); - if (res < 0) { - sprintf(str, GetString(STR_SHEEP_UP_ERR), strerror(res), res); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } -#endif - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - - RAMBaseHost = (uint8 *)0x10000000; - ram_area = create_area(RAM_AREA_NAME, (void **)&RAMBaseHost, B_BASE_ADDRESS, RAMSize, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (ram_area < 0) { - ErrorAlert(STR_NO_RAM_AREA_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); - - // Create area and load Mac ROM - try { - init_rom(); - } catch (area_error) { - ErrorAlert(STR_NO_ROM_AREA_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_open_error) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_read_error) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (rom_size_error) { - ErrorAlert(STR_ROM_SIZE_ERR); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Initialize everything - if (!InitAll(NULL)) { - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Write protect ROM - set_area_protection(rom_area, B_READ_AREA); - - // Disallow quitting with Alt-Q from now on - AllowQuitting = false; - - // Start XPRAM watchdog thread - xpram_thread = spawn_thread(xpram_func, "XPRAM Watchdog", B_LOW_PRIORITY, this); - resume_thread(xpram_thread); - - // Start 60Hz interrupt - tick_thread = spawn_thread(tick_func, "60Hz", B_REAL_TIME_PRIORITY, this); - resume_thread(tick_thread); - - // Start emulator thread - emul_thread = spawn_thread(emul_func, "MacOS", B_NORMAL_PRIORITY, this); - resume_thread(emul_thread); -} - - -/* - * Quit emulator - */ - -void QuitEmulator(void) -{ - the_app->AllowQuitting = true; - be_app->PostMessage(B_QUIT_REQUESTED); - exit_thread(0); -} - -bool BasiliskII::QuitRequested(void) -{ - if (AllowQuitting) - return BApplication::QuitRequested(); - else - return false; -} - -void BasiliskII::Quit(void) -{ - status_t l; - - // Stop 60Hz interrupt - if (tick_thread > 0) { - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - } - - // Wait for emulator thread to finish - if (emul_thread > 0) - wait_for_thread(emul_thread, &l); - - // Exit 680x0 emulation - Exit680x0(); - - // Stop XPRAM watchdog thread - if (xpram_thread > 0) { - xpram_thread_active = false; - suspend_thread(xpram_thread); // Wake thread up from snooze() - snooze(1000); - resume_thread(xpram_thread); - wait_for_thread(xpram_thread, &l); - } - - // Deinitialize everything - ExitAll(); - - // Delete ROM area - if (rom_area >= 0) - delete_area(rom_area); - - // Delete RAM area - if (ram_area >= 0) - delete_area(ram_area); - -#if REAL_ADDRESSING - // Unmap low memory and close memory mess driver - if (sheep_fd >= 0) { - ioctl(sheep_fd, SHEEP_DOWN); - close(sheep_fd); - } -#endif - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - - BApplication::Quit(); -} - - -/* - * Create area for ROM (sets rom_area) and load ROM file - * - * area_error : Cannot create area - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void BasiliskII::init_rom(void) -{ - // Create area for ROM - ROMBaseHost = (uint8 *)0x40800000; - rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBaseHost, B_BASE_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (rom_area < 0) - throw area_error(); - D(bug("ROM area %ld at %p\n", rom_area, ROMBaseHost)); - - // Load ROM - load_rom(); -} - - -/* - * Load ROM file - * - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void BasiliskII::load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Try to open ROM file - BFile file(rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) - throw file_open_error(); - - printf(GetString(STR_READING_ROM_FILE)); - - // Is the ROM size correct? - off_t rom_size = 0; - file.GetSize(&rom_size); - if (rom_size != 64*1024 && rom_size != 128*1024 && rom_size != 256*1024 && rom_size != 512*1024 && rom_size != 1024*1024) - throw rom_size_error(); - - uint8 *rom = new uint8[rom_size]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, rom_size); - if (actual == rom_size) - memcpy(ROMBaseHost, rom, rom_size); - delete[] rom; - if (actual != rom_size) - throw file_read_error(); - ROMSize = rom_size; -} - - -/* - * Emulator thread function - */ - -status_t BasiliskII::emul_func(void *arg) -{ - BasiliskII *obj = (BasiliskII *)arg; - -#if __POWERPC__ - // Install data access signal handler - sigemptyset(&obj->sigsegv_action.sa_mask); - obj->sigsegv_action.sa_handler = (__signal_func_ptr)(obj->sigsegv_invoc); - obj->sigsegv_action.sa_flags = 0; - obj->sigsegv_action.sa_userdata = arg; - sigaction(SIGSEGV, &obj->sigsegv_action, NULL); -#endif - - // Exceptions will send signals - disable_debugger(true); - - // Start 68k and jump to ROM boot routine - Start680x0(); - - // Quit program - obj->AllowQuitting = true; - be_app->PostMessage(B_QUIT_REQUESTED); - return 0; -} - - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Interrupt flags (must be handled atomically!) - */ - -uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - atomic_or((int32 *)&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - atomic_and((int32 *)&InterruptFlags, ~flag); -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -status_t BasiliskII::tick_func(void *arg) -{ - BasiliskII *obj = (BasiliskII *)arg; - int tick_counter = 0; - bigtime_t current = system_time(); - - while (obj->tick_thread_active) { - - // Wait - current += 16625; - snooze_until(current, B_SYSTEM_TIMEBASE); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - SetInterruptFlag(INTFLAG_1HZ); - TriggerInterrupt(); - } - - // Trigger 60Hz interrupt - SetInterruptFlag(INTFLAG_60HZ); - TriggerInterrupt(); - } - return 0; -} - - -/* - * XPRAM watchdog thread (saves XPRAM every minute) - */ - -status_t BasiliskII::xpram_func(void *arg) -{ - uint8 last_xpram[XPRAM_SIZE]; - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - - while (((BasiliskII *)arg)->xpram_thread_active) { - snooze(60*1000000); - if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - return 0; -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - VideoQuitFullScreen(); - char str[256]; - sprintf(str, GetString(STR_GUI_ERROR_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_ERROR_ALERT_TITLE), str, GetString(STR_QUIT_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, pos, neg, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - return alert->Go() == 0; -} - - -/* - * SEGV handler - */ - -#if __POWERPC__ -static uint32 segv_r[32]; - -asm void BasiliskII::sigsegv_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigsegv_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} - -static void sigsegv_handler(vregs *r) -{ - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Analyze opcode - enum { - TYPE_UNKNOWN, - TYPE_LOAD, - TYPE_STORE - } transfer_type = TYPE_UNKNOWN; - enum { - SIZE_UNKNOWN, - SIZE_BYTE, - SIZE_HALFWORD, - SIZE_WORD - } transfer_size = SIZE_UNKNOWN; - enum { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX - } addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - } - - // Calculate effective address - uint32 addr = 0; - switch (addr_mode) { - case MODE_X: - case MODE_UX: - if (ra == 0) - addr = segv_r[rb]; - else - addr = segv_r[ra] + segv_r[rb]; - break; - case MODE_NORM: - case MODE_U: - if (ra == 0) - addr = (int32)(int16)imm; - else - addr = segv_r[ra] + (int32)(int16)imm; - break; - } - - // Ignore ROM writes - if (transfer_type == TYPE_STORE && addr >= (uint32)ROMBaseHost && addr < (uint32)ROMBaseHost + ROMSize) { -// D(bug("WARNING: %s write access to ROM at %p, 68k pc %p\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc)); - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - r->pc += 4; - goto rti; - } - - // For all other errors, jump into debugger - char str[256]; - sprintf(str, "SIGSEGV\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - disable_debugger(false); - debugger(str); - QuitEmulator(); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} -#endif diff --git a/BasiliskII/src/BeOS/prefs_beos.cpp b/BasiliskII/src/BeOS/prefs_beos.cpp deleted file mode 100644 index 9a74d6431..000000000 --- a/BasiliskII/src/BeOS/prefs_beos.cpp +++ /dev/null @@ -1,106 +0,0 @@ -/* - * prefs_beos.cpp - Preferences handling, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include - -#include "sysdeps.h" -#include "prefs.h" -#include "main.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"powerrom", TYPE_STRING, false, "path of PowerMac ROM"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Preferences file name and path -const char PREFS_FILE_NAME[] = "BasiliskII_prefs"; -static BPath prefs_path; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char* vmdir) -{ -#if 0 - if (vmdir) { - prefs_path.SetTo(vmdir); - prefs_path.Append("prefs"); - FILE *prefs = fopen(prefs_path.Path(), "r"); - if (!prefs) { - printf("No file at %s found.\n", prefs_path.Path()); - exit(1); - } - LoadPrefsFromStream(prefs); - fclose(prefs); - return; - } -#endif - - // Construct prefs path - find_directory(B_USER_SETTINGS_DIRECTORY, &prefs_path, true); - prefs_path.Append(PREFS_FILE_NAME); - - // Read preferences from settings file - FILE *f = fopen(prefs_path.Path(), "r"); - if (f != NULL) { - - // Prefs file found, load settings - LoadPrefsFromStream(f); - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.Path(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "/boot"); -} diff --git a/BasiliskII/src/BeOS/prefs_editor_beos.cpp b/BasiliskII/src/BeOS/prefs_editor_beos.cpp deleted file mode 100644 index a40e4748d..000000000 --- a/BasiliskII/src/BeOS/prefs_editor_beos.cpp +++ /dev/null @@ -1,1022 +0,0 @@ -/* - * prefs_editor_beos.cpp - Preferences editor, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "cdrom.h" -#include "xpram.h" -#include "prefs.h" -#include "about_window.h" -#include "user_strings.h" -#include "prefs_editor.h" - - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; -const rgb_color slider_fill_color = {102, 152, 255, 0}; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -// Window messages -const uint32 MSG_OK = 'okok'; // "Start" clicked -const uint32 MSG_CANCEL = 'cncl'; // "Quit" clicked -const uint32 MSG_ZAP_PRAM = 'zprm'; - -const int NUM_PANES = 4; - -const uint32 MSG_VOLUME_SELECTED = 'volu'; // "Volumes" pane -const uint32 MSG_VOLUME_INVOKED = 'voli'; -const uint32 MSG_ADD_VOLUME = 'addv'; -const uint32 MSG_CREATE_VOLUME = 'crev'; -const uint32 MSG_REMOVE_VOLUME = 'remv'; -const uint32 MSG_ADD_VOLUME_PANEL = 'advp'; -const uint32 MSG_CREATE_VOLUME_PANEL = 'crvp'; -const uint32 MSG_DEVICE_NAME = 'devn'; -const uint32 MSG_BOOT_ANY = 'bany'; -const uint32 MSG_BOOT_CDROM = 'bcdr'; -const uint32 MSG_NOCDROM = 'nocd'; - -const uint32 MSG_REF_5HZ = ' 5Hz'; // "Graphics/Sound" pane -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_VIDEO_WINDOW = 'vtyw'; -const uint32 MSG_VIDEO_SCREEN = 'vtys'; -const uint32 MSG_SCREEN_MODE = 'sm\0\0'; -const uint32 MSG_NOSOUND = 'nosn'; - -const uint32 MSG_SER_A = 'sera'; // "Serial/Network" pane -const uint32 MSG_SER_B = 'serb'; -const uint32 MSG_ETHER = 'ethr'; -const uint32 MSG_UDPTUNNEL = 'udpt'; - -const uint32 MSG_RAMSIZE = 'rmsz'; // "Memory/Misc" pane -const uint32 MSG_MODELID_5 = 'mi05'; -const uint32 MSG_MODELID_14 = 'mi14'; -const uint32 MSG_CPU_68020 = 'cpu2'; -const uint32 MSG_CPU_68020_FPU = 'cpf2'; -const uint32 MSG_CPU_68030 = 'cpu3'; -const uint32 MSG_CPU_68030_FPU = 'cpf3'; -const uint32 MSG_CPU_68040 = 'cpu4'; - - -// RAM size slider class -class RAMSlider : public BSlider { -public: - RAMSlider(BRect frame, const char *name, const char *label, BMessage *message, - int32 minValue, int32 maxValue, thumb_style thumbType = B_BLOCK_THUMB, - uint32 resizingMode = B_FOLLOW_LEFT | - B_FOLLOW_TOP, - uint32 flags = B_NAVIGABLE | B_WILL_DRAW | - B_FRAME_EVENTS) : BSlider(frame, name, label, message, minValue, maxValue, thumbType, resizingMode, flags) - { - update_text = (char *)malloc(256); - } - - virtual ~RAMSlider() - { - if (update_text) - free(update_text); - } - - virtual char *UpdateText(void) const - { - if (update_text) { - sprintf(update_text, GetString(STR_RAMSIZE_FMT), Value()); - } - return update_text; - } - -private: - char *update_text; -}; - - -// Volumes list view class -class VolumeListView : public BListView { -public: - VolumeListView(BRect frame, const char *name, list_view_type type = B_SINGLE_SELECTION_LIST, uint32 resizeMask = B_FOLLOW_LEFT | B_FOLLOW_TOP, uint32 flags = B_WILL_DRAW | B_FRAME_EVENTS | B_NAVIGABLE) - : BListView(frame, name, type, resizeMask, flags) - {} - - // Handle dropped files and volumes - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - BMessage msg2(MSG_ADD_VOLUME_PANEL); - entry_ref ref; - for (int i=0; msg->FindRef("refs", i, &ref) == B_NO_ERROR; i++) - msg2.AddRef("refs", &ref); - Window()->PostMessage(&msg2); - } else - BListView::MessageReceived(msg); - } -}; - - -// Number-entry BTextControl -class NumberControl : public BTextControl { -public: - NumberControl(BRect frame, float divider, const char *name, const char *label, long value, BMessage *message) - : BTextControl(frame, name, label, NULL, message, B_FOLLOW_LEFT | B_FOLLOW_TOP, B_WILL_DRAW | B_NAVIGABLE) - { - SetDivider(divider); - for (int c=0; c<256; c++) - if (!isdigit(c) && c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - SetValue(value); - } - - // Set integer value - void SetValue(long value) - { - char str[32]; - sprintf(str, "%ld", value); - SetText(str); - } - - // Get integer value - long Value(void) - { - return atol(Text()); - } -}; - - -// Path-entry BTextControl -class PathControl : public BTextControl { -public: - PathControl(bool dir_ctrl_, BRect frame, const char *name, const char *label, const char *text, BMessage *message) : BTextControl(frame, name, label, text, message), dir_ctrl(dir_ctrl_) - { - for (int c=0; c<' '; c++) - if (c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - } - - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - entry_ref the_ref; - BEntry the_entry; - - // Look for dropped refs - if (msg->FindRef("refs", &the_ref) == B_NO_ERROR) { - if (the_entry.SetTo(&the_ref) == B_NO_ERROR && (dir_ctrl&& the_entry.IsDirectory() || !dir_ctrl && the_entry.IsFile())) { - BPath the_path; - the_entry.GetPath(&the_path); - SetText(the_path.Path()); - } - } else - BTextControl::MessageReceived(msg); - - MakeFocus(); - } else - BTextControl::MessageReceived(msg); - } - -private: - bool dir_ctrl; -}; - - -// Preferences window class -class PrefsWindow : public BWindow { -public: - PrefsWindow(uint32 msg); - virtual ~PrefsWindow(); - virtual void MessageReceived(BMessage *msg); - -private: - void read_volumes_prefs(void); - void hide_show_graphics_ctrls(void); - void read_graphics_prefs(void); - void hide_show_serial_ctrls(void); - void read_serial_prefs(void); - void add_serial_names(BPopUpMenu *menu, uint32 msg); - void read_memory_prefs(void); - - BView *create_volumes_pane(void); - BView *create_graphics_pane(void); - BView *create_serial_pane(void); - BView *create_memory_pane(void); - - uint32 ok_message; - bool send_quit_on_close; - - system_info sys_info; - BMessenger this_messenger; - BView *top; - BRect top_frame; - BTabView *pane_tabs; - BView *panes[NUM_PANES]; - int current_pane; - - VolumeListView *volume_list; - BCheckBox *nocdrom_checkbox; - BMenuField *frameskip_menu; - NumberControl *display_x_ctrl; - NumberControl *display_y_ctrl; - BMenuField *scr_mode_menu; - BCheckBox *nosound_checkbox; - BCheckBox *ether_checkbox; - BCheckBox *udptunnel_checkbox; - NumberControl *udpport_ctrl; - RAMSlider *ramsize_slider; - PathControl *extfs_control; - PathControl *rom_control; - BCheckBox *fpu_checkbox; - - BFilePanel *add_volume_panel; - BFilePanel *create_volume_panel; - - uint32 max_ramsize; // In MB - int display_type; - int scr_mode_bit; -}; - - -/* - * Show preferences editor (asynchronously) - * Under BeOS, the return value is ignored. Instead, a message is sent to the - * application when the user clicks on "Start" or "Quit" - */ - -bool PrefsEditor(void) -{ - new PrefsWindow('strt'); - return true; -} - - -/* - * Preferences window constructor - */ - -PrefsWindow::PrefsWindow(uint32 msg) : BWindow(BRect(0, 0, 400, 289), GetString(STR_PREFS_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_ASYNCHRONOUS_CONTROLS), this_messenger(this) -{ - int i; - ok_message = msg; - send_quit_on_close = true; - get_system_info(&sys_info); - - // Move window to right position - Lock(); - MoveTo(80, 80); - - // Set up menus - BMenuBar *bar = new BMenuBar(Bounds(), "menu"); - BMenu *menu = new BMenu(GetString(STR_PREFS_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ABOUT), new BMessage(B_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_START), new BMessage(MSG_OK))); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ZAP_PRAM), new BMessage(MSG_ZAP_PRAM))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_QUIT), new BMessage(MSG_CANCEL), 'Q')); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = int(bar->Bounds().bottom) + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Light gray background - BRect b = Bounds(); - top = new BView(BRect(0, mbar_height, b.right, b.bottom), "top", B_FOLLOW_NONE, B_WILL_DRAW); - AddChild(top); - top->SetViewColor(fill_color); - top_frame = top->Bounds(); - - // Create panes - panes[0] = create_volumes_pane(); - panes[1] = create_graphics_pane(); - panes[2] = create_serial_pane(); - panes[3] = create_memory_pane(); - - // Prefs item tab view - pane_tabs = new BTabView(BRect(10, 10, top_frame.right-10, top_frame.bottom-50), "items", B_WIDTH_FROM_LABEL); - for (i=0; iAddTab(panes[i]); - top->AddChild(pane_tabs); - - volume_list->Select(0); - - // Create volume file panels - add_volume_panel = new BFilePanel(B_OPEN_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_ADD_VOLUME_PANEL)); - add_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_ADD_VOLUME_PANEL_BUTTON)); - add_volume_panel->Window()->SetTitle(GetString(STR_ADD_VOLUME_TITLE)); - create_volume_panel = new BFilePanel(B_SAVE_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_CREATE_VOLUME_PANEL)); - create_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_CREATE_VOLUME_PANEL_BUTTON)); - create_volume_panel->Window()->SetTitle(GetString(STR_CREATE_VOLUME_TITLE)); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - background->FindView("PoseView")->ResizeBy(0, -30); - background->FindView("VScrollBar")->ResizeBy(0, -30); - background->FindView("CountVw")->MoveBy(0, -30); - BView *v = background->FindView("HScrollBar"); - if (v) - v->MoveBy(0, -30); - else { - i = 0; - while ((v = background->ChildAt(i++)) != NULL) { - if (v->Name() == NULL || v->Name()[0] == 0) { - v->MoveBy(0, -30); // unnamed horizontal scroll bar - break; - } - } - } - BView *filename = background->FindView("text view"); - BRect fnr(filename->Frame()); - fnr.OffsetBy(0, -30); - NumberControl *nc = new NumberControl(fnr, 80, "hardfile_size", GetString(STR_HARDFILE_SIZE_CTRL), 40, NULL); - background->AddChild(nc); - create_volume_panel->Window()->Unlock(); - - // "Start" button - BButton *button = new BButton(BRect(20, top_frame.bottom-35, 90, top_frame.bottom-10), "start", GetString(STR_START_BUTTON), new BMessage(MSG_OK)); - top->AddChild(button); - SetDefaultButton(button); - - // "Quit" button - top->AddChild(new BButton(BRect(top_frame.right-90, top_frame.bottom-35, top_frame.right-20, top_frame.bottom-10), "cancel", GetString(STR_QUIT_BUTTON), new BMessage(MSG_CANCEL))); - - Unlock(); - Show(); -} - - -/* - * Preferences window destructor - */ - -PrefsWindow::~PrefsWindow() -{ - delete add_volume_panel; - delete create_volume_panel; - if (send_quit_on_close) - be_app->PostMessage(B_QUIT_REQUESTED); -} - - -/* - * Create "Volumes" pane - */ - -void PrefsWindow::read_volumes_prefs(void) -{ - PrefsReplaceString("extfs", extfs_control->Text()); -} - -BView *PrefsWindow::create_volumes_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_VOLUMES_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *str; - int32 index = 0; - volume_list = new VolumeListView(BRect(15, 10, pane->Bounds().right-30, 113), "volumes"); - while ((str = PrefsFindString("disk", index++)) != NULL) - volume_list->AddItem(new BStringItem(str)); - volume_list->SetSelectionMessage(new BMessage(MSG_VOLUME_SELECTED)); - volume_list->SetInvocationMessage(new BMessage(MSG_VOLUME_INVOKED)); - pane->AddChild(new BScrollView("volumes_border", volume_list, B_FOLLOW_LEFT | B_FOLLOW_TOP, 0, false, true)); - - pane->AddChild(new BButton(BRect(10, 118, pane->Bounds().right/3, 138), "add_volume", GetString(STR_ADD_VOLUME_BUTTON), new BMessage(MSG_ADD_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right/3, 118, pane->Bounds().right*2/3, 138), "create_volume", GetString(STR_CREATE_VOLUME_BUTTON), new BMessage(MSG_CREATE_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right*2/3, 118, pane->Bounds().right-11, 138), "remove_volume", GetString(STR_REMOVE_VOLUME_BUTTON), new BMessage(MSG_REMOVE_VOLUME))); - - extfs_control = new PathControl(true, BRect(10, 145, right, 160), "extfs", GetString(STR_EXTFS_CTRL), PrefsFindString("extfs"), NULL); - extfs_control->SetDivider(90); - pane->AddChild(extfs_control); - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 165, right, 180), "bootdriver", GetString(STR_BOOTDRIVER_CTRL), menu); - menu_field->SetDivider(90); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_ANY_LAB), new BMessage(MSG_BOOT_ANY))); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_CDROM_LAB), new BMessage(MSG_BOOT_CDROM))); - pane->AddChild(menu_field); - int32 i32 = PrefsFindInt32("bootdriver"); - BMenuItem *item; - if (i32 == 0) { - if ((item = menu->FindItem(GetString(STR_BOOT_ANY_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == CDROMRefNum) { - if ((item = menu->FindItem(GetString(STR_BOOT_CDROM_LAB))) != NULL) - item->SetMarked(true); - } - - nocdrom_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nocdrom", GetString(STR_NOCDROM_CTRL), new BMessage(MSG_NOCDROM)); - pane->AddChild(nocdrom_checkbox); - nocdrom_checkbox->SetValue(PrefsFindBool("nocdrom") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Graphics/Sound" pane - */ - -// Screen mode list -struct scr_mode_desc { - int mode_mask; - int str; -}; - -static const scr_mode_desc scr_mode[] = { - {B_8_BIT_640x480, STR_8_BIT_640x480_LAB}, - {B_8_BIT_800x600, STR_8_BIT_800x600_LAB}, - {B_8_BIT_1024x768, STR_8_BIT_1024x768_LAB}, - {B_8_BIT_1152x900, STR_8_BIT_1152x900_LAB}, - {B_8_BIT_1280x1024, STR_8_BIT_1280x1024_LAB}, - {B_8_BIT_1600x1200, STR_8_BIT_1600x1200_LAB}, - {B_15_BIT_640x480, STR_15_BIT_640x480_LAB}, - {B_15_BIT_800x600, STR_15_BIT_800x600_LAB}, - {B_15_BIT_1024x768, STR_15_BIT_1024x768_LAB}, - {B_15_BIT_1152x900, STR_15_BIT_1152x900_LAB}, - {B_15_BIT_1280x1024, STR_15_BIT_1280x1024_LAB}, - {B_15_BIT_1600x1200, STR_15_BIT_1600x1200_LAB}, - {B_32_BIT_640x480, STR_24_BIT_640x480_LAB}, - {B_32_BIT_800x600, STR_24_BIT_800x600_LAB}, - {B_32_BIT_1024x768, STR_24_BIT_1024x768_LAB}, - {B_32_BIT_1152x900, STR_24_BIT_1152x900_LAB}, - {B_32_BIT_1280x1024, STR_24_BIT_1280x1024_LAB}, - {B_32_BIT_1600x1200, STR_24_BIT_1600x1200_LAB}, - {0, 0} // End marker -}; - -void PrefsWindow::hide_show_graphics_ctrls(void) -{ - if (display_type == DISPLAY_WINDOW) { - if (!scr_mode_menu->IsHidden()) - scr_mode_menu->Hide(); - if (frameskip_menu->IsHidden()) - frameskip_menu->Show(); - if (display_x_ctrl->IsHidden()) - display_x_ctrl->Show(); - if (display_y_ctrl->IsHidden()) - display_y_ctrl->Show(); - } else { - if (!frameskip_menu->IsHidden()) - frameskip_menu->Hide(); - if (!display_x_ctrl->IsHidden()) - display_x_ctrl->Hide(); - if (!display_y_ctrl->IsHidden()) - display_y_ctrl->Hide(); - if (scr_mode_menu->IsHidden()) - scr_mode_menu->Show(); - } -} - -void PrefsWindow::read_graphics_prefs(void) -{ - char str[64]; - if (display_type == DISPLAY_WINDOW) { - sprintf(str, "win/%d/%d", display_x_ctrl->Value(), display_y_ctrl->Value()); - } else { - sprintf(str, "scr/%d", scr_mode_bit); - } - PrefsReplaceString("screen", str); -} - -BView *PrefsWindow::create_graphics_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_GRAPHICS_SOUND_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *mode_str = PrefsFindString("screen"); - int width = 512, height = 384; - scr_mode_bit = 0; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &width, &height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "scr/%d", &scr_mode_bit) == 1) - display_type = DISPLAY_SCREEN; - } - - BMenuField *menu_field; - BMenuItem *item; - BPopUpMenu *menu; - - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 5, right, 20), "videotype", GetString(STR_VIDEO_TYPE_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_WINDOW_LAB), new BMessage(MSG_VIDEO_WINDOW))); - if (display_type == DISPLAY_WINDOW) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_FULLSCREEN_LAB), new BMessage(MSG_VIDEO_SCREEN))); - if (display_type == DISPLAY_SCREEN) - item->SetMarked(true); - pane->AddChild(menu_field); - - menu = new BPopUpMenu(""); - frameskip_menu = new BMenuField(BRect(10, 26, right, 41), "frameskip", GetString(STR_FRAMESKIP_CTRL), menu); - frameskip_menu->SetDivider(120); - menu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - pane->AddChild(frameskip_menu); - int32 i32 = PrefsFindInt32("frameskip"); - if (i32 == 12) { - if ((item = menu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 8) { - if ((item = menu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 6) { - if ((item = menu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 4) { - if ((item = menu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 2) { - if ((item = menu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } - - display_x_ctrl = new NumberControl(BRect(10, 48, right / 2, 66), 118, "width", GetString(STR_DISPLAY_X_CTRL), width, NULL); - pane->AddChild(display_x_ctrl); - display_y_ctrl = new NumberControl(BRect(10, 69, right / 2, 87), 118, "height", GetString(STR_DISPLAY_Y_CTRL), height, NULL); - pane->AddChild(display_y_ctrl); - - menu = new BPopUpMenu(""); - scr_mode_menu = new BMenuField(BRect(10, 26, right, 41), "screenmode", GetString(STR_SCREEN_MODE_CTRL), menu); - scr_mode_menu->SetDivider(120); - for (int i=0; scr_mode[i].mode_mask; i++) { - menu->AddItem(item = new BMenuItem(GetString(scr_mode[i].str), new BMessage(MSG_SCREEN_MODE + i))); - if (scr_mode[i].mode_mask & (1 << scr_mode_bit)) - item->SetMarked(true); - } - pane->AddChild(scr_mode_menu); - - nosound_checkbox = new BCheckBox(BRect(10, 90, right, 105), "nosound", GetString(STR_NOSOUND_CTRL), new BMessage(MSG_NOSOUND)); - pane->AddChild(nosound_checkbox); - nosound_checkbox->SetValue(PrefsFindBool("nosound") ? B_CONTROL_ON : B_CONTROL_OFF); - - hide_show_graphics_ctrls(); - return pane; -} - - -/* - * Create "Serial/Network" pane - */ - -void PrefsWindow::hide_show_serial_ctrls(void) -{ - if (udptunnel_checkbox->Value() == B_CONTROL_ON) { - ether_checkbox->SetEnabled(false); - udpport_ctrl->SetEnabled(true); - } else { - ether_checkbox->SetEnabled(true); - udpport_ctrl->SetEnabled(false); - } -} - -void PrefsWindow::read_serial_prefs(void) -{ - PrefsReplaceInt32("udpport", udpport_ctrl->Value()); -} - -void PrefsWindow::add_serial_names(BPopUpMenu *menu, uint32 msg) -{ - BSerialPort *port = new BSerialPort; - char name[B_PATH_NAME_LENGTH]; - for (int i=0; iCountDevices(); i++) { - port->GetDeviceName(i, name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - BDirectory dir; - BEntry entry; - dir.SetTo("/dev/parallel"); - if (dir.InitCheck() == B_NO_ERROR) { - dir.Rewind(); - while (dir.GetNextEntry(&entry) >= 0) { - if (!entry.IsDirectory()) { - entry.GetName(name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - } - } - delete port; -} - -static void set_serial_label(BPopUpMenu *menu, const char *prefs_name) -{ - const char *str; - BMenuItem *item; - if ((str = PrefsFindString(prefs_name)) != NULL) - if ((item = menu->FindItem(str)) != NULL) - item->SetMarked(true); -} - -BView *PrefsWindow::create_serial_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_SERIAL_NETWORK_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu_a = new BPopUpMenu(""); - add_serial_names(menu_a, MSG_SER_A); - menu_field = new BMenuField(BRect(10, 5, right, 20), "seriala", GetString(STR_SERIALA_CTRL), menu_a); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_a, "seriala"); - - BPopUpMenu *menu_b = new BPopUpMenu(""); - add_serial_names(menu_b, MSG_SER_B); - menu_field = new BMenuField(BRect(10, 26, right, 41), "serialb", GetString(STR_SERIALB_CTRL), menu_b); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_b, "serialb"); - - ether_checkbox = new BCheckBox(BRect(10, 47, right, 62), "ether", GetString(STR_ETHER_ENABLE_CTRL), new BMessage(MSG_ETHER)); - pane->AddChild(ether_checkbox); - ether_checkbox->SetValue(PrefsFindString("ether") ? B_CONTROL_ON : B_CONTROL_OFF); - - udptunnel_checkbox = new BCheckBox(BRect(10, 67, right, 72), "udptunnel", GetString(STR_UDPTUNNEL_CTRL), new BMessage(MSG_UDPTUNNEL)); - pane->AddChild(udptunnel_checkbox); - udptunnel_checkbox->SetValue(PrefsFindBool("udptunnel") ? B_CONTROL_ON : B_CONTROL_OFF); - - udpport_ctrl = new NumberControl(BRect(10, 87, right / 2, 105), 118, "udpport", GetString(STR_UDPPORT_CTRL), PrefsFindInt32("udpport"), NULL); - pane->AddChild(udpport_ctrl); - - hide_show_serial_ctrls(); - return pane; -} - - -/* - * Create "Memory" pane - */ - -void PrefsWindow::read_memory_prefs(void) -{ - const char *str = rom_control->Text(); - if (strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); -} - -BView *PrefsWindow::create_memory_pane(void) -{ - char str[256], str2[256]; - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_MEMORY_MISC_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BEntry entry("/boot/var/swap"); - off_t swap_space; - if (entry.GetSize(&swap_space) == B_NO_ERROR) - max_ramsize = swap_space / (1024 * 1024) - 8; - else - max_ramsize = sys_info.max_pages * B_PAGE_SIZE / (1024 * 1024) - 8; - - int32 value = PrefsFindInt32("ramsize") / (1024 * 1024); - - ramsize_slider = new RAMSlider(BRect(10, 5, right, 55), "ramsize", GetString(STR_RAMSIZE_SLIDER), new BMessage(MSG_RAMSIZE), 1, max_ramsize, B_TRIANGLE_THUMB); - ramsize_slider->SetValue(value); - ramsize_slider->UseFillColor(true, &slider_fill_color); - sprintf(str, GetString(STR_RAMSIZE_FMT), 1); - sprintf(str2, GetString(STR_RAMSIZE_FMT), max_ramsize); - ramsize_slider->SetLimitLabels(str, str2); - pane->AddChild(ramsize_slider); - - BMenuField *menu_field; - BMenuItem *item; - BPopUpMenu *menu; - - int id = PrefsFindInt32("modelid"); - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 60, right, 75), "modelid", GetString(STR_MODELID_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_MODELID_5_LAB), new BMessage(MSG_MODELID_5))); - if (id == 5) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_MODELID_14_LAB), new BMessage(MSG_MODELID_14))); - if (id == 14) - item->SetMarked(true); - pane->AddChild(menu_field); - - int cpu = PrefsFindInt32("cpu"); - bool fpu = PrefsFindBool("fpu"); - menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 82, right, 97), "cpu", GetString(STR_CPU_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68020_LAB), new BMessage(MSG_CPU_68020))); - if (cpu == 2 && !fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68020_FPU_LAB), new BMessage(MSG_CPU_68020_FPU))); - if (cpu == 2 && fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68030_LAB), new BMessage(MSG_CPU_68030))); - if (cpu == 3 && !fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68030_FPU_LAB), new BMessage(MSG_CPU_68030_FPU))); - if (cpu == 3 && fpu) - item->SetMarked(true); - menu->AddItem(item = new BMenuItem(GetString(STR_CPU_68040_LAB), new BMessage(MSG_CPU_68040))); - if (cpu == 4) - item->SetMarked(true); - pane->AddChild(menu_field); - - rom_control = new PathControl(false, BRect(10, 104, right, 119), "rom", GetString(STR_ROM_FILE_CTRL), PrefsFindString("rom"), NULL); - rom_control->SetDivider(117); - pane->AddChild(rom_control); - - return pane; -} - - -/* - * Message from controls/menus received - */ - -void PrefsWindow::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_OK: { // "Start" button clicked - read_volumes_prefs(); - read_memory_prefs(); - read_graphics_prefs(); - SavePrefs(); - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(ok_message); - break; - } - - case MSG_CANCEL: // "Quit" button clicked - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(B_QUIT_REQUESTED); - break; - - case B_ABOUT_REQUESTED: { // "About" menu item selected - ShowAboutWindow(); - break; - } - - case MSG_ZAP_PRAM: // "Zap PRAM File" menu item selected - ZapPRAM(); - break; - - case MSG_VOLUME_INVOKED: { // Double-clicked on volume name, toggle read-only flag - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - const char *str = PrefsFindString("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - char newstr[256]; - if (str[0] == '*') - strcpy(newstr, str+1); - else { - strcpy(newstr, "*"); - strcat(newstr, str); - } - PrefsReplaceString("disk", newstr, selected); - volume_list->AddItem(new BStringItem(newstr), selected); - volume_list->Select(selected); - } - break; - } - - case MSG_ADD_VOLUME: - add_volume_panel->Show(); - break; - - case MSG_CREATE_VOLUME: - create_volume_panel->Show(); - break; - - case MSG_ADD_VOLUME_PANEL: { - entry_ref ref; - if (msg->FindRef("refs", &ref) == B_NO_ERROR) { - BEntry entry(&ref, true); - BPath path; - entry.GetPath(&path); - if (entry.IsFile()) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else if (entry.IsDirectory()) { - BVolume volume; - if (path.Path()[0] == '/' && strchr(path.Path()+1, '/') == NULL && entry.GetVolume(&volume) == B_NO_ERROR) { - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (volume.Device() == info.dev) { - PrefsAddString("disk", info.device_name); - volume_list->AddItem(new BStringItem(info.device_name)); - } - } - } - } - } - break; - } - - case MSG_CREATE_VOLUME_PANEL: { - entry_ref dir; - if (msg->FindRef("directory", &dir) == B_NO_ERROR) { - BEntry entry(&dir, true); - BPath path; - entry.GetPath(&path); - path.Append(msg->FindString("name")); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - NumberControl *v = (NumberControl *)background->FindView("hardfile_size"); - int size = v->Value(); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", path.Path(), size); - int ret = system(cmd); - if (ret == 0) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else { - sprintf(cmd, GetString(STR_CREATE_VOLUME_WARN), strerror(ret)); - WarningAlert(cmd); - } - } - break; - } - - case MSG_REMOVE_VOLUME: { - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - PrefsRemoveItem("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - volume_list->Select(selected); - } - break; - } - - case MSG_BOOT_ANY: - PrefsReplaceInt32("bootdriver", 0); - break; - - case MSG_BOOT_CDROM: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - - case MSG_NOCDROM: - PrefsReplaceBool("nocdrom", nocdrom_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_VIDEO_WINDOW: - display_type = DISPLAY_WINDOW; - hide_show_graphics_ctrls(); - break; - - case MSG_VIDEO_SCREEN: - display_type = DISPLAY_SCREEN; - hide_show_graphics_ctrls(); - break; - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", 2); - break; - - case MSG_NOSOUND: - PrefsReplaceBool("nosound", nosound_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_SER_A: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - PrefsReplaceString("seriala", source->Label()); - break; - } - - case MSG_SER_B: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - PrefsReplaceString("serialb", source->Label()); - break; - } - - case MSG_ETHER: - if (ether_checkbox->Value() == B_CONTROL_ON) - PrefsReplaceString("ether", "yes"); - else - PrefsRemoveItem("ether"); - break; - - case MSG_UDPTUNNEL: - PrefsReplaceBool("udptunnel", udptunnel_checkbox->Value() == B_CONTROL_ON); - hide_show_serial_ctrls(); - break; - - case MSG_RAMSIZE: - PrefsReplaceInt32("ramsize", ramsize_slider->Value() * 1024 * 1024); - break; - - case MSG_MODELID_5: - PrefsReplaceInt32("modelid", 5); - break; - - case MSG_MODELID_14: - PrefsReplaceInt32("modelid", 14); - break; - - case MSG_CPU_68020: - PrefsReplaceInt32("cpu", 2); - PrefsReplaceBool("fpu", false); - break; - - case MSG_CPU_68020_FPU: - PrefsReplaceInt32("cpu", 2); - PrefsReplaceBool("fpu", true); - break; - - case MSG_CPU_68030: - PrefsReplaceInt32("cpu", 3); - PrefsReplaceBool("fpu", false); - break; - - case MSG_CPU_68030_FPU: - PrefsReplaceInt32("cpu", 3); - PrefsReplaceBool("fpu", true); - break; - - case MSG_CPU_68040: - PrefsReplaceInt32("cpu", 4); - PrefsReplaceBool("fpu", true); - break; - - default: { - // Screen mode messages - if ((msg->what & 0xffff0000) == MSG_SCREEN_MODE) { - int m = msg->what & 0xffff; - uint32 mask = scr_mode[m].mode_mask; - for (int i=0; i<32; i++) - if (mask & (1 << i)) - scr_mode_bit = i; - } else - BWindow::MessageReceived(msg); - } - } -} diff --git a/BasiliskII/src/BeOS/scsi_beos.cpp b/BasiliskII/src/BeOS/scsi_beos.cpp deleted file mode 100644 index 75d1e29ad..000000000 --- a/BasiliskII/src/BeOS/scsi_beos.cpp +++ /dev/null @@ -1,237 +0,0 @@ -/* - * scsi_beos.cpp - SCSI Manager, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include -#ifdef __HAIKU__ -#include -#else -#include -#endif - -#include "sysdeps.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "scsi.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static raw_device_command rdc; - -static int fds[8*8]; // fd's for 8 units and 8 LUNs each -static int fd; // Active fd (selected target) - -static uint32 buffer_size; // Size of data buffer -static uint8 *buffer = NULL; // Pointer to data buffer - -static uint8 sense_data[256]; // Buffer for autosense data - - -/* - * Initialization - */ - -void SCSIInit(void) -{ - int id, lun; - - // Allocate buffer - buffer = (uint8 *)malloc(buffer_size = 0x10000); - - // Open scsi_raw driver for all 8 units (and all 8 LUNs) - char dev_name[256]; - for (id=0; id<8; id++) { - for (lun=0; lun<8; lun++) - fds[id*8+lun] = -1; - char prefs_name[16]; - sprintf(prefs_name, "scsi%d", id); - const char *str = PrefsFindString(prefs_name); - if (str) { - int bus, unit; - if (sscanf(str, "%d/%d", &bus, &unit) == 2) { - for (lun=0; lun<8; lun++) { - sprintf(dev_name, "/dev/bus/scsi/%d/%d/%d/raw", bus, unit, lun); - D(bug("SCSI %d: Opening %s\n", id, dev_name)); - fds[id*8+lun] = open(dev_name, O_RDWR); - } - } - } - } - - // Reset SCSI bus - SCSIReset(); - - // Init rdc - memset(&rdc, 0, sizeof(rdc)); - rdc.data = buffer; - rdc.sense_data = sense_data; -} - - -/* - * Deinitialization - */ - -void SCSIExit(void) -{ - // Close all devices - for (int i=0; i<8; i++) - for (int j=0; j<8; j++) { - int fd = fds[i*8+j]; - if (fd > 0) - close(fd); - } - - // Free buffer - if (buffer) { - free(buffer); - buffer = NULL; - } -} - - -/* - * Check if requested data size fits into buffer, allocate new buffer if needed - */ - -static bool try_buffer(int size) -{ - if (size <= buffer_size) - return true; - - uint8 *new_buffer = (uint8 *)malloc(size); - if (new_buffer == NULL) - return false; - free(buffer); - buffer = new_buffer; - buffer_size = size; - return true; -} - - -/* - * Set SCSI command to be sent by scsi_send_cmd() - */ - -void scsi_set_cmd(int cmd_length, uint8 *cmd) -{ - rdc.command_length = cmd_length; - memcpy(rdc.command, cmd, cmd_length); -} - - -/* - * Check for presence of SCSI target - */ - -bool scsi_is_target_present(int id) -{ - return fds[id * 8] > 0; -} - - -/* - * Set SCSI target (returns false on error) - */ - -bool scsi_set_target(int id, int lun) -{ - int new_fd = fds[id * 8 + lun]; - if (new_fd < 0) - return false; - if (new_fd != fd) - rdc.cam_status &= ~CAM_AUTOSNS_VALID; // Clear sense data when selecting new target - fd = new_fd; - return true; -} - - -/* - * Send SCSI command to active target (scsi_set_command() must have been called), - * read/write data according to S/G table (returns false on error); timeout is in 1/60 sec - */ - -bool scsi_send_cmd(size_t data_length, bool reading, int sg_size, uint8 **sg_ptr, uint32 *sg_len, uint16 *stat, uint32 timeout) -{ - // Check if buffer is large enough, allocate new buffer if needed - if (!try_buffer(data_length)) { - char str[256]; - sprintf(str, GetString(STR_SCSI_BUFFER_ERR), data_length); - ErrorAlert(str); - return false; - } - - // Process S/G table when writing - if (!reading) { - D(bug(" writing to buffer\n")); - uint8 *buffer_ptr = buffer; - for (int i=0; i -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "serial.h" -#include "serial_defs.h" - -#define DEBUG 0 -#include "debug.h" - -#define MONITOR 0 - - -// Buffer size for kernel-space transfers -const int TMP_BUF_SIZE = 2048; - -// These packets are sent to the input/output threads -const uint32 CMD_READ = 'read'; -const uint32 CMD_WRITE = 'writ'; -const uint32 CMD_QUIT = 'quit'; - -struct ThreadPacket { - uint32 pb; -}; - - -// Driver private variables -class BeSERDPort : public SERDPort { -public: - BeSERDPort(const char *dev) - { - device_name = dev; - if (strstr(dev, "parallel")) { - is_parallel = true; - fd = -1; - device = NULL; - } else { - is_parallel = false; - device = new BSerialPort; - } - device_sem = create_sem(1, "serial port"); - input_thread = output_thread = 0; - } - - virtual ~BeSERDPort() - { - status_t l; - if (input_thread > 0) { - send_data(input_thread, CMD_QUIT, NULL, 0); - suspend_thread(input_thread); // Unblock thread - snooze(1000); - resume_thread(input_thread); - while (wait_for_thread(input_thread, &l) == B_INTERRUPTED) ; - } - if (output_thread > 0) { - send_data(output_thread, CMD_QUIT, NULL, 0); - suspend_thread(output_thread); // Unblock thread - snooze(1000); - resume_thread(output_thread); - while (wait_for_thread(output_thread, &l) == B_INTERRUPTED) ; - } - acquire_sem(device_sem); - delete_sem(device_sem); - delete device; - } - - virtual int16 open(uint16 config); - virtual int16 prime_in(uint32 pb, uint32 dce); - virtual int16 prime_out(uint32 pb, uint32 dce); - virtual int16 control(uint32 pb, uint32 dce, uint16 code); - virtual int16 status(uint32 pb, uint32 dce, uint16 code); - virtual int16 close(void); - -private: - bool configure(uint16 config); - void set_handshake(uint32 s, bool with_dtr); - static status_t input_func(void *arg); - static status_t output_func(void *arg); - - const char *device_name; // Name of BeOS port - BSerialPort *device; // BeOS port object - bool is_parallel; // Flag: Port is parallel, use fd - int fd; // FD for parallel ports - sem_id device_sem; // BSerialPort arbitration - - thread_id input_thread; // Data input thread - thread_id output_thread; // Data output thread - - bool io_killed; // Flag: KillIO called, I/O threads must not call deferred tasks - bool drop_dtr_on_close; // Flag: Negate DTR when driver is closed - - uint8 tmp_in_buf[TMP_BUF_SIZE]; // Buffers for copying from/to kernel space - uint8 tmp_out_buf[TMP_BUF_SIZE]; -}; - - -#if DEBUG -static const int baud_rates[] = { - 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400, 4800, 9600, 19200, 38400, 57600, 115200, 230400, 31250 -}; -#endif - - -/* - * Initialization - */ - -void SerialInit(void) -{ - // Read serial preferences and create structs for both ports - the_serd_port[0] = new BeSERDPort(PrefsFindString("seriala")); - the_serd_port[1] = new BeSERDPort(PrefsFindString("serialb")); -} - - -/* - * Deinitialization - */ - -void SerialExit(void) -{ - delete (BeSERDPort *)the_serd_port[0]; - delete (BeSERDPort *)the_serd_port[1]; -} - - -/* - * Open serial port - */ - -int16 BeSERDPort::open(uint16 config) -{ - // Don't open NULL name devices - if (device_name == NULL) - return openErr; - - // Init variables - io_killed = false; - drop_dtr_on_close = true; - - // Open port - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (is_parallel) { - char name[256]; - sprintf(name, "/dev/parallel/%s", device_name); - fd = ::open(name, O_WRONLY); - if (fd < 0) { - release_sem(device_sem); - return openErr; - } - } else { - device->SetFlowControl(B_HARDWARE_CONTROL); // Must be set before port is opened - if (device->Open(device_name) > 0) { - device->SetBlocking(true); - device->SetTimeout(10000000); - device->SetDTR(true); - device->SetRTS(true); - } else { - release_sem(device_sem); - return openErr; - } - } - - // Start input/output threads - release_sem(device_sem); - configure(config); - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - while ((input_thread = spawn_thread(input_func, "Serial Input", B_NORMAL_PRIORITY, this)) == B_INTERRUPTED) ; - resume_thread(input_thread); - while ((output_thread = spawn_thread(output_func, "Serial Output", B_NORMAL_PRIORITY, this)) == B_INTERRUPTED) ; - resume_thread(output_thread); - release_sem(device_sem); - return noErr; -} - - -/* - * Read data from port - */ - -int16 BeSERDPort::prime_in(uint32 pb, uint32 dce) -{ - // Send input command to input_thread - read_done = false; - read_pending = true; - ThreadPacket p; - p.pb = pb; - WriteMacInt32(input_dt + serdtDCE, dce); - while (send_data(input_thread, CMD_READ, &p, sizeof(ThreadPacket)) == B_INTERRUPTED) ; - return 1; // Command in progress -} - - -/* - * Write data to port - */ - -int16 BeSERDPort::prime_out(uint32 pb, uint32 dce) -{ - // Send output command to output_thread - write_done = false; - write_pending = true; - ThreadPacket p; - p.pb = pb; - WriteMacInt32(output_dt + serdtDCE, dce); - while (send_data(output_thread, CMD_WRITE, &p, sizeof(ThreadPacket)) == B_INTERRUPTED) ; - return 1; // Command in progress -} - - -/* - * Control calls - */ - -int16 BeSERDPort::control(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case 1: // KillIO - io_killed = true; - suspend_thread(input_thread); // Unblock threads - suspend_thread(output_thread); - snooze(1000); - resume_thread(input_thread); - resume_thread(output_thread); - while (read_pending || write_pending) - snooze(10000); - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->ClearInput(); - device->ClearOutput(); - release_sem(device_sem); - } - io_killed = false; - return noErr; - - case kSERDConfiguration: - if (configure(ReadMacInt16(pb + csParam))) - return noErr; - else - return paramErr; - - case kSERDInputBuffer: - return noErr; // Not supported under BeOS - - case kSERDSerHShake: - set_handshake(pb + csParam, false); - return noErr; - - case kSERDClearBreak: - case kSERDSetBreak: - return noErr; // Not supported under BeOS - - case kSERDBaudRate: - if (!is_parallel) { - uint16 rate = ReadMacInt16(pb + csParam); - data_rate baud_rate; - if (rate <= 50) { - rate = 50; baud_rate = B_50_BPS; - } else if (rate <= 75) { - rate = 75; baud_rate = B_75_BPS; - } else if (rate <= 110) { - rate = 110; baud_rate = B_110_BPS; - } else if (rate <= 134) { - rate = 134; baud_rate = B_134_BPS; - } else if (rate <= 150) { - rate = 150; baud_rate = B_150_BPS; - } else if (rate <= 200) { - rate = 200; baud_rate = B_200_BPS; - } else if (rate <= 300) { - rate = 300; baud_rate = B_300_BPS; - } else if (rate <= 600) { - rate = 600; baud_rate = B_600_BPS; - } else if (rate <= 1200) { - rate = 1200; baud_rate = B_1200_BPS; - } else if (rate <= 1800) { - rate = 1800; baud_rate = B_1800_BPS; - } else if (rate <= 2400) { - rate = 2400; baud_rate = B_2400_BPS; - } else if (rate <= 4800) { - rate = 4800; baud_rate = B_4800_BPS; - } else if (rate <= 9600) { - rate = 9600; baud_rate = B_9600_BPS; - } else if (rate <= 19200) { - rate = 19200; baud_rate = B_19200_BPS; - } else if (rate <= 31250) { - rate = 31250; baud_rate = B_31250_BPS; - } else if (rate <= 38400) { - rate = 38400; baud_rate = B_38400_BPS; - } else if (rate <= 57600) { - rate = 57600; baud_rate = B_57600_BPS; - } - WriteMacInt16(pb + csParam, rate); - acquire_sem(device_sem); - if (device->SetDataRate(baud_rate) == B_OK) { - release_sem(device_sem); - return noErr; - } else { - release_sem(device_sem); - return paramErr; - } - } else - return noErr; - - case kSERDHandshake: - case kSERDHandshakeRS232: - set_handshake(pb + csParam, true); - return noErr; - - case kSERDClockMIDI: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetParityMode(B_NO_PARITY); - device->SetDataBits(B_DATA_BITS_8); - device->SetStopBits(B_STOP_BITS_1); - if (device->SetDataRate(B_31250_BPS) == B_OK) { - release_sem(device_sem); - return noErr; - } else { - release_sem(device_sem); - return paramErr; - } - } else - return noErr; - - case kSERDMiscOptions: - drop_dtr_on_close = !(ReadMacInt8(pb + csParam) & kOptionPreserveDTR); - return noErr; - - case kSERDAssertDTR: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetDTR(true); - release_sem(device_sem); - } - return noErr; - - case kSERDNegateDTR: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetDTR(false); - release_sem(device_sem); - } - return noErr; - - case kSERDSetPEChar: - case kSERDSetPEAltChar: - return noErr; // Not supported under BeOS - - case kSERDResetChannel: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->ClearInput(); - device->ClearOutput(); - release_sem(device_sem); - } - return noErr; - - case kSERDAssertRTS: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetRTS(true); - release_sem(device_sem); - } - return noErr; - - case kSERDNegateRTS: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->SetRTS(false); - release_sem(device_sem); - } - return noErr; - - case kSERD115KBaud: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->DataRate() != B_115200_BPS) - if (device->SetDataRate(B_115200_BPS) != B_OK) { - release_sem(device_sem); - return paramErr; - } - release_sem(device_sem); - } - return noErr; - - case kSERD230KBaud: - case kSERDSetHighSpeed: - if (!is_parallel) { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->DataRate() != B_230400_BPS) - if (device->SetDataRate(B_230400_BPS) != B_OK) { - release_sem(device_sem); - return paramErr; - } - release_sem(device_sem); - } - return noErr; - - default: - printf("WARNING: SerialControl(): unimplemented control code %d\n", code); - return controlErr; - } -} - - -/* - * Status calls - */ - -int16 BeSERDPort::status(uint32 pb, uint32 dce, uint16 code) -{ - switch (code) { - case kSERDInputCount: - WriteMacInt32(pb + csParam, 0); - if (!is_parallel) { - int32 num = 0; - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - device->NumCharsAvailable(&num); - release_sem(device_sem); - D(bug(" %d bytes in buffer\n", num)); - WriteMacInt32(pb + csParam, num); - } - return noErr; - - case kSERDStatus: { - uint32 p = pb + csParam; - WriteMacInt8(p + staCumErrs, cum_errors); - cum_errors = 0; - WriteMacInt8(p + staXOffSent, 0); - WriteMacInt8(p + staXOffHold, 0); - WriteMacInt8(p + staRdPend, read_pending); - WriteMacInt8(p + staWrPend, write_pending); - if (is_parallel) { - WriteMacInt8(p + staCtsHold, 0); - WriteMacInt8(p + staDsrHold, 0); - WriteMacInt8(p + staModemStatus, dsrEvent | dcdEvent | ctsEvent); - } else { - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - WriteMacInt8(p + staCtsHold, !device->IsCTS()); - WriteMacInt8(p + staDsrHold, !device->IsDSR()); - WriteMacInt8(p + staModemStatus, - (device->IsDSR() ? dsrEvent : 0) - | (device->IsRI() ? riEvent : 0) - | (device->IsDCD() ? dcdEvent : 0) - | (device->IsCTS() ? ctsEvent : 0)); - release_sem(device_sem); - } - return noErr; - } - - default: - printf("WARNING: SerialStatus(): unimplemented status code %d\n", code); - return statusErr; - } -} - - -/* - * Close serial port - */ - -int16 BeSERDPort::close() -{ - // Kill threads - status_t l; - io_killed = true; - if (input_thread > 0) { - while (send_data(input_thread, CMD_QUIT, NULL, 0) == B_INTERRUPTED) ; - if (read_pending) { - suspend_thread(input_thread); // Unblock thread - snooze(1000); - resume_thread(input_thread); - } - while (wait_for_thread(input_thread, &l) == B_INTERRUPTED) ; - } - if (output_thread > 0) { - while (send_data(output_thread, CMD_QUIT, NULL, 0) == B_INTERRUPTED) ; - if (write_pending) { - suspend_thread(output_thread); // Unblock thread - snooze(1000); - resume_thread(output_thread); - } - while (wait_for_thread(output_thread, &l) == B_INTERRUPTED) ; - } - input_thread = output_thread = 0; - - // Close port - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (is_parallel) { - ::close(fd); - fd = -1; - } else { - if (drop_dtr_on_close) - device->SetDTR(false); - device->Close(); - } - release_sem(device_sem); - return noErr; -} - - -/* - * Configure serial port with MacOS config word - */ - -bool BeSERDPort::configure(uint16 config) -{ - D(bug(" configure %04x\n", config)); - if (is_parallel) - return true; - - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - - // Set number of stop bits - switch (config & 0xc000) { - case stop10: - if (device->StopBits() != B_STOP_BITS_1) - device->SetStopBits(B_STOP_BITS_1); - break; - case stop20: - if (device->StopBits() != B_STOP_BITS_2) - device->SetStopBits(B_STOP_BITS_2); - break; - default: - release_sem(device_sem); - return false; - } - - // Set parity mode - switch (config & 0x3000) { - case noParity: - if (device->ParityMode() != B_NO_PARITY) - device->SetParityMode(B_NO_PARITY); - break; - case oddParity: - if (device->ParityMode() != B_ODD_PARITY) - device->SetParityMode(B_ODD_PARITY); - break; - case evenParity: - if (device->ParityMode() != B_EVEN_PARITY) - device->SetParityMode(B_EVEN_PARITY); - break; - default: - release_sem(device_sem); - return false; - } - - // Set number of data bits - switch (config & 0x0c00) { - case data7: - if (device->DataBits() != B_DATA_BITS_7) - device->SetDataBits(B_DATA_BITS_7); - break; - case data8: - if (device->DataBits() != B_DATA_BITS_8) - device->SetDataBits(B_DATA_BITS_8); - break; - default: - release_sem(device_sem); - return false; - } - - // Set baud rate - data_rate baud_rate; - switch (config & 0x03ff) { - case baud150: baud_rate = B_150_BPS; break; - case baud300: baud_rate = B_300_BPS; break; - case baud600: baud_rate = B_600_BPS; break; - case baud1200: baud_rate = B_1200_BPS; break; - case baud1800: baud_rate = B_1800_BPS; break; - case baud2400: baud_rate = B_2400_BPS; break; - case baud4800: baud_rate = B_4800_BPS; break; - case baud9600: baud_rate = B_9600_BPS; break; - case baud19200: baud_rate = B_19200_BPS; break; - case baud38400: baud_rate = B_38400_BPS; break; - case baud57600: baud_rate = B_57600_BPS; break; - default: - release_sem(device_sem); - return false; - } - - D(bug(" baud rate %d, %d stop bits, %s parity, %d data bits\n", baud_rates[baud_rate], device->StopBits() == B_STOP_BITS_1 ? 1 : 2, device->ParityMode() == B_NO_PARITY ? "no" : device->ParityMode() == B_ODD_PARITY ? "odd" : "even", device->DataBits() == B_DATA_BITS_7 ? 7 : 8)); - if (device->DataRate() != baud_rate) { - bool res = device->SetDataRate(baud_rate) == B_OK; - release_sem(device_sem); - return res; - } else { - release_sem(device_sem); - return true; - } -} - - -/* - * Set serial handshaking - */ - -void BeSERDPort::set_handshake(uint32 s, bool with_dtr) -{ - D(bug(" set_handshake %02x %02x %02x %02x %02x %02x %02x %02x\n", - ReadMacInt8(s + 0), ReadMacInt8(s + 1), ReadMacInt8(s + 2), ReadMacInt8(s + 3), - ReadMacInt8(s + 4), ReadMacInt8(s + 5), ReadMacInt8(s + 6), ReadMacInt8(s + 7))); - if (is_parallel) - return; - - uint32 flow; - if (with_dtr) { - if (ReadMacInt8(s + shkFCTS) || ReadMacInt8(s + shkFDTR)) - flow = B_HARDWARE_CONTROL; - else - flow = B_SOFTWARE_CONTROL; - } else { - if (ReadMacInt8(s + shkFCTS)) - flow = B_HARDWARE_CONTROL; - else - flow = B_SOFTWARE_CONTROL; - } - - D(bug(" %sware flow control\n", flow == B_HARDWARE_CONTROL ? "hard" : "soft")); - while (acquire_sem(device_sem) == B_INTERRUPTED) ; - if (device->FlowControl() != flow) { - device->Close(); - device->SetFlowControl(flow); - device->Open(device_name); - } - release_sem(device_sem); -} - - -/* - * Data input thread - */ - -status_t BeSERDPort::input_func(void *arg) -{ - BeSERDPort *s = (BeSERDPort *)arg; - for (;;) { - - // Wait for commands - thread_id sender; - ThreadPacket p; - uint32 code = receive_data(&sender, &p, sizeof(ThreadPacket)); - if (code == CMD_QUIT) - break; - if (code != CMD_READ) - continue; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - uint32 length = ReadMacInt32(p.pb + ioReqCount); - D(bug("input_func waiting for %ld bytes of data...\n", length)); - int32 actual; - - // Buffer in kernel space? - if ((uint32)buf < 0x80000000) { - - // Yes, transfer via buffer - actual = 0; - while (length) { - uint32 transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - int32 transferred; - acquire_sem(s->device_sem); - if (s->is_parallel) { - if ((transferred = read(s->fd, s->tmp_in_buf, transfer_size)) < 0 || s->io_killed) { - // Error - actual = transferred; - release_sem(s->device_sem); - break; - } - } else { - if ((transferred = s->device->Read(s->tmp_in_buf, transfer_size)) < 0 || s->io_killed) { - // Error - actual = transferred; - release_sem(s->device_sem); - break; - } - } - release_sem(s->device_sem); - memcpy(buf, s->tmp_in_buf, transferred); - buf = (void *)((uint8 *)buf + transferred); - length -= transferred; - actual += transferred; - } - - } else { - - // No, transfer directly - acquire_sem(s->device_sem); - if (s->is_parallel) - actual = read(s->fd, buf, length); - else - actual = s->device->Read(buf, length); - release_sem(s->device_sem); - } - - D(bug(" %ld bytes received\n", actual)); - -#if MONITOR - bug("Receiving serial data:\n"); - uint8 *adr = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - for (int i=0; iio_killed) { - - WriteMacInt16(p.pb + ioResult, abortErr); - WriteMacInt32(p.pb + ioActCount, 0); - s->read_pending = s->read_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(p.pb + ioActCount, actual); - WriteMacInt32(s->input_dt + serdtResult, noErr); - } else { - WriteMacInt32(p.pb + ioActCount, 0); - WriteMacInt32(s->input_dt + serdtResult, readErr); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->read_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Data output thread - */ - -status_t BeSERDPort::output_func(void *arg) -{ - BeSERDPort *s = (BeSERDPort *)arg; - for (;;) { - - // Wait for commands - thread_id sender; - ThreadPacket p; - uint32 code = receive_data(&sender, &p, sizeof(ThreadPacket)); - if (code == CMD_QUIT) - break; - if (code != CMD_WRITE) - continue; - - // Execute command - void *buf = Mac2HostAddr(ReadMacInt32(p.pb + ioBuffer)); - uint32 length = ReadMacInt32(p.pb + ioReqCount); - D(bug("output_func transmitting %ld bytes of data...\n", length)); - int32 actual; - -#if MONITOR - bug("Sending serial data:\n"); - uint8 *adr = (uint8 *)buf; - for (int i=0; i TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(s->tmp_out_buf, buf, transfer_size); - int32 transferred; - acquire_sem(s->device_sem); - if (s->is_parallel) { - if ((transferred = write(s->fd, s->tmp_out_buf, transfer_size)) < transfer_size || s->io_killed) { - if (transferred < 0) // Error - actual = transferred; - else - actual += transferred; - release_sem(s->device_sem); - break; - } - } else { - if ((transferred = s->device->Write(s->tmp_out_buf, transfer_size)) < transfer_size || s->io_killed) { - if (transferred < 0) // Error - actual = transferred; - else - actual += transferred; - release_sem(s->device_sem); - break; - } - } - release_sem(s->device_sem); - if (transferred > transfer_size) // R3 parallel port driver bug - transferred = transfer_size; - buf = (void *)((uint8 *)buf + transferred); - length -= transferred; - actual += transferred; - } - - } else { - - // No, transfer directly - acquire_sem(s->device_sem); - if (s->is_parallel) - actual = write(s->fd, buf, length); - else - actual = s->device->Write(buf, length); - release_sem(s->device_sem); - if (actual > length) // R3 parallel port driver bug - actual = length; - } - - D(bug(" %ld bytes transmitted\n", actual)); - - // KillIO called? Then simply return - if (s->io_killed) { - - WriteMacInt16(p.pb + ioResult, abortErr); - WriteMacInt32(p.pb + ioActCount, 0); - s->write_pending = s->write_done = false; - - } else { - - // Set error code - if (actual >= 0) { - WriteMacInt32(p.pb + ioActCount, actual); - WriteMacInt32(s->output_dt + serdtResult, noErr); - } else { - WriteMacInt32(p.pb + ioActCount, 0); - WriteMacInt32(s->output_dt + serdtResult, writErr); - } - - // Trigger serial interrupt - D(bug(" triggering serial interrupt\n")); - s->write_done = true; - SetInterruptFlag(INTFLAG_SERIAL); - TriggerInterrupt(); - } - } - return 0; -} diff --git a/BasiliskII/src/BeOS/sys_beos.cpp b/BasiliskII/src/BeOS/sys_beos.cpp deleted file mode 100644 index ff6fcb830..000000000 --- a/BasiliskII/src/BeOS/sys_beos.cpp +++ /dev/null @@ -1,841 +0,0 @@ -/* - * sys_beos.cpp - System dependent routines, BeOS implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include -#include -#include - -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "sys.h" - -#define DEBUG 0 -#include "debug.h" - -#ifdef __HAIKU__ -#include -#define unmount(x) fs_unmount_volume(x, 0) -#endif - - -// File handles are pointers to these structures -struct file_handle { - file_handle *next; // Pointer to next file handle (must be first in struct!) - const char *name; // File/device name (copied, for mount menu) - int fd; // fd of file/device - bool is_file; // Flag: plain file or /dev/something? - bool read_only; // Copy of Sys_open() flag - loff_t start_byte; // Size of file header (if any) - loff_t file_size; // Size of file data (only valid if is_file is true) -}; - -// Linked list of file handles -static file_handle *first_file_handle; - -// Temporary buffer for transfers from/to kernel space -const int TMP_BUF_SIZE = 0x10000; -static uint8 *tmp_buf; - -// For B_SCSI_PREVENT_ALLOW -static const int32 PREVENT = 1; -static const int32 ALLOW = 0; - - -/* - * Check if device is a mounted HFS volume, get mount name - */ - -static bool is_drive_mounted(const char *dev_name, char *mount_name) -{ - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (strcmp(dev_name, info.device_name) == 0) { - status_t err = -1; - BPath mount; - BDirectory dir; - BEntry entry; - node_ref node; - node.device = info.dev; - node.node = info.root; - err = dir.SetTo(&node); - if (!err) - err = dir.GetEntry(&entry); - if (!err) - err = entry.GetPath(&mount); - if (!err) { - strcpy(mount_name, mount.Path()); - return true; - } - } - } - return false; -} - - -/* - * Initialization - */ - -void SysInit(void) -{ - first_file_handle = NULL; - - // Allocate temporary buffer - tmp_buf = new uint8[TMP_BUF_SIZE]; -} - - -/* - * Deinitialization - */ - -void SysExit(void) -{ - delete[] tmp_buf; -} - - -/* - * Create menu of used volumes (for "mount" menu) - */ - -void SysCreateVolumeMenu(BMenu *menu, uint32 msg) -{ - for (file_handle *fh=first_file_handle; fh; fh=fh->next) - if (!SysIsFixedDisk(fh)) - menu->AddItem(new BMenuItem(fh->name, new BMessage(msg))); -} - - -/* - * Mount volume given name from mount menu - */ - -void SysMountVolume(const char *name) -{ - file_handle *fh; - for (fh=first_file_handle; fh && strcmp(fh->name, name); fh=fh->next) ; - if (fh) - MountVolume(fh); -} - - -/* - * This gets called when no "floppy" prefs items are found - * It scans for available floppy drives and adds appropriate prefs items - */ - -void SysAddFloppyPrefs(void) -{ - // Only one floppy drive under BeOS - PrefsAddString("floppy", "/dev/disk/floppy/raw"); -} - - -/* - * This gets called when no "disk" prefs items are found - * It scans for available HFS volumes and adds appropriate prefs items - */ - -void SysAddDiskPrefs(void) -{ - // Let BeOS scan for HFS drives - D(bug("Looking for Mac volumes...\n")); - system("mountvolume -allhfs"); - - // Add all HFS volumes - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - status_t err = -1; - BPath mount; - if (!strcmp(info.fsh_name, "hfs")) { - BDirectory dir; - BEntry entry; - node_ref node; - node.device = info.dev; - node.node = info.root; - err = dir.SetTo(&node); - if (!err) - err = dir.GetEntry(&entry); - if (!err) - err = entry.GetPath(&mount); - } - if (!err) - err = unmount(mount.Path()); - if (!err) { - char dev_name[B_FILE_NAME_LENGTH]; - if (info.flags & B_FS_IS_READONLY) { - dev_name[0] = '*'; - dev_name[1] = 0; - } else - dev_name[0] = 0; - strcat(dev_name, info.device_name); - PrefsAddString("disk", dev_name); - } - } -} - - -/* - * This gets called when no "cdrom" prefs items are found - * It scans for available CD-ROM drives and adds appropriate prefs items - */ - -// Scan directory for CD-ROM drives, add them to prefs -static void scan_for_cdrom_drives(const char *directory) -{ - // Set directory - BDirectory dir; - dir.SetTo(directory); - if (dir.InitCheck() != B_NO_ERROR) - return; - dir.Rewind(); - - // Scan each entry - BEntry entry; - while (dir.GetNextEntry(&entry) >= 0) { - - // Get path and ref for entry - BPath path; - if (entry.GetPath(&path) != B_NO_ERROR) - continue; - const char *name = path.Path(); - entry_ref e; - if (entry.GetRef(&e) != B_NO_ERROR) - continue; - - // Recursively enter subdirectories (except for floppy) - if (entry.IsDirectory()) { - if (!strcmp(e.name, "floppy")) - continue; - scan_for_cdrom_drives(name); - } else { - - D(bug(" checking '%s'\n", name)); - - // Ignore partitions - if (strcmp(e.name, "raw")) - continue; - - // Open device - int fd = open(name, O_RDONLY); - if (fd < 0) - continue; - - // Get geometry and device type - device_geometry g; - if (ioctl(fd, B_GET_GEOMETRY, &g, sizeof(g)) < 0) { - close(fd); - continue; - } - - // Insert to list if it is a CD drive - if (g.device_type == B_CD) - PrefsAddString("cdrom", name); - close(fd); - } - } -} - -void SysAddCDROMPrefs(void) -{ - // Don't scan for drives if nocdrom option given - if (PrefsFindBool("nocdrom")) - return; - - // Look for CD-ROM drives and add prefs items - D(bug("Looking for CD-ROM drives...\n")); - scan_for_cdrom_drives("/dev/disk"); -} - - -/* - * Add default serial prefs (must be added, even if no ports present) - */ - -void SysAddSerialPrefs(void) -{ -#ifdef __HAIKU__ - PrefsAddString("seriala", "serial1"); - PrefsAddString("serialb", "serial2"); -#else - system_info info; - get_system_info(&info); - switch (info.platform_type) { - case B_BEBOX_PLATFORM: - case B_AT_CLONE_PLATFORM: - PrefsAddString("seriala", "serial1"); - PrefsAddString("serialb", "serial2"); - break; - case B_MAC_PLATFORM: - PrefsAddString("seriala", "modem"); - PrefsAddString("serialb", "printer"); - break; - default: - PrefsAddString("seriala", "none"); - PrefsAddString("serialb", "none"); - break; - } -#endif -} - - -/* - * Open file/device, create new file handle (returns NULL on error) - */ - -void *Sys_open(const char *name, bool read_only) -{ - static bool published_all = false; - bool is_file = (strstr(name, "/dev/") != name); - - D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write")); - - // Print warning message and eventually unmount drive when this is an HFS volume mounted under BeOS (double mounting will corrupt the volume) - char mount_name[B_FILE_NAME_LENGTH]; - if (!is_file && !read_only && is_drive_mounted(name, mount_name)) { - char str[256 + B_FILE_NAME_LENGTH]; - sprintf(str, GetString(STR_VOLUME_IS_MOUNTED_WARN), mount_name); - WarningAlert(str); - if (unmount(mount_name) != 0) { - sprintf(str, GetString(STR_CANNOT_UNMOUNT_WARN), mount_name); - WarningAlert(str); - return NULL; - } - } - - int fd = open(name, read_only ? O_RDONLY : O_RDWR); - if (fd < 0 && !published_all) { - // Open failed, create all device nodes and try again, but only the first time - system("mountvolume -publishall"); - published_all = true; - fd = open(name, read_only ? O_RDONLY : O_RDWR); - } - if (fd >= 0) { - file_handle *fh = new file_handle; - fh->name = strdup(name); - fh->fd = fd; - fh->is_file = is_file; - fh->read_only = read_only; - fh->start_byte = 0; - if (fh->is_file) { - // Detect disk image file layout - loff_t size = lseek(fd, 0, SEEK_END); - uint8 data[256]; - lseek(fd, 0, SEEK_SET); - read(fd, data, 256); - FileDiskLayout(size, data, fh->start_byte, fh->file_size); - } - - // Enqueue file handle - fh->next = NULL; - file_handle *q = first_file_handle; - if (q) { - while (q->next) - q = q->next; - q->next = fh; - } else - first_file_handle = fh; - return fh; - } else - return NULL; -} - - -/* - * Close file/device, delete file handle - */ - -void Sys_close(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - // Free device name and close file/device - free((void *)fh->name); - close(fh->fd); - - // Dequeue file handle - file_handle *q = first_file_handle; - if (q == fh) { - first_file_handle = NULL; - delete fh; - return; - } - while (q) { - if (q->next == fh) { - q->next = fh->next; - delete fh; - return; - } - q = q->next; - } -} - - -/* - * Read "length" bytes from file/device, starting at "offset", to "buffer", - * returns number of bytes read (or 0) - */ - -static inline ssize_t sread(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = read(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - -// D(bug("Sys_read(%08lx, %08lx, %Ld, %d)\n", fh, buffer, offset, length)); - - // Seek to position - if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0) - return 0; - - // Buffer in kernel space? - size_t actual = 0; - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - if (sread(fh->fd, tmp_buf, transfer_size) != transfer_size) - return actual; - memcpy(buffer, tmp_buf, transfer_size); - buffer = (void *)((uint8 *)buffer + transfer_size); - length -= transfer_size; - actual += transfer_size; - } - - } else { - - // No, transfer directly - actual = sread(fh->fd, buffer, length); - if (actual < 0) - actual = 0; - } - return actual; -} - - -/* - * Write "length" bytes from "buffer" to file/device, starting at "offset", - * returns number of bytes written (or 0) - */ - -static inline ssize_t swrite(int fd, void *buf, size_t count) -{ - ssize_t res; - while ((res = write(fd, buf, count)) == B_INTERRUPTED) ; - return res; -} - -size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return 0; - -// D(bug("Sys_write(%08lx, %08lx, %Ld, %d)\n", fh, buffer, offset, length)); - - // Seek to position - if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0) - return 0; - - // Buffer in kernel space? - size_t actual = 0; - if ((uint32)buffer < 0x80000000) { - - // Yes, transfer via buffer - while (length) { - size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length; - memcpy(tmp_buf, buffer, transfer_size); - if (swrite(fh->fd, tmp_buf, transfer_size) != transfer_size) - return actual; - buffer = (void *)((uint8 *)buffer + transfer_size); - length -= transfer_size; - actual += transfer_size; - } - - } else { - - // No, transfer directly - actual = swrite(fh->fd, buffer, length); - if (actual < 0) - actual = 0; - } - return actual; -} - - -/* - * Return size of file/device (minus header) - */ - -loff_t SysGetFileSize(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return fh->file_size; - else { - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return (loff_t)g.bytes_per_sector * g.sectors_per_track * g.cylinder_count * g.head_count; - else - return 0; - } -} - - -/* - * Eject volume (if applicable) - */ - -void SysEject(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_EJECT_DEVICE); -} - - -/* - * Format volume (if applicable) - */ - -bool SysFormat(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_FORMAT_DEVICE) >= 0; - else - return false; -} - - -/* - * Check if file/device is read-only (this includes the read-only flag on Sys_open()) - */ - -bool SysIsReadOnly(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) { - - // File, return flag given to Sys_open - return fh->read_only; - - } else { - - // Device, check write protection - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return g.read_only | fh->read_only; - else - return fh->read_only; // Removable but not inserted - } -} - - -/* - * Check if the given file handle refers to a fixed or a removable disk - */ - -bool SysIsFixedDisk(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (fh->is_file) - return true; - else { - device_geometry g; - if (ioctl(fh->fd, B_GET_GEOMETRY, &g, sizeof(g)) >= 0) - return !g.removable; - else - return false; // Removable but not inserted - } -} - - -/* - * Check if a disk is inserted in the drive (always true for files) - */ - -bool SysIsDiskInserted(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (fh->is_file) - return true; - else { - status_t l; - if (ioctl(fh->fd, B_GET_MEDIA_STATUS, &l, sizeof(l)) >= 0 && l == B_NO_ERROR) - return true; - else - return false; - } -} - - -/* - * Prevent medium removal (if applicable) - */ - -void SysPreventRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_SCSI_PREVENT_ALLOW, &PREVENT, sizeof(PREVENT)); -} - - -/* - * Allow medium removal (if applicable) - */ - -void SysAllowRemoval(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) - ioctl(fh->fd, B_SCSI_PREVENT_ALLOW, &ALLOW, sizeof(ALLOW)); -} - - -/* - * Read CD-ROM TOC (binary MSF format, 804 bytes max.) - */ - -bool SysCDReadTOC(void *arg, uint8 *toc) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - memset(tmp_buf, 0, 804); - if (ioctl(fh->fd, B_SCSI_GET_TOC, tmp_buf, 804) < 0) - return false; - memcpy(toc, tmp_buf, 804); - return true; - } else - return false; -} - - -/* - * Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard) - */ - -bool SysCDGetPosition(void *arg, uint8 *pos) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - if (ioctl(fh->fd, B_SCSI_GET_POSITION, tmp_buf, 16) < 0) - return false; - memcpy(pos, tmp_buf, 16); - return true; - } else - return false; -} - - -/* - * Play CD audio - */ - -bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - scsi_play_position *p = (scsi_play_position *)tmp_buf; - p->start_m = start_m; - p->start_s = start_s; - p->start_f = start_f; - p->end_m = end_m; - p->end_s = end_s; - p->end_f = end_f; - return ioctl(fh->fd, B_SCSI_PLAY_POSITION, p, sizeof(scsi_play_position)) == 0; - } else - return false; -} - - -/* - * Pause CD audio - */ - -bool SysCDPause(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return true; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_PAUSE_AUDIO) == 0; - else - return false; -} - - -/* - * Resume paused CD audio - */ - -bool SysCDResume(void *arg) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_RESUME_AUDIO) == 0; - else - return false; -} - - -/* - * Stop CD audio - */ - -bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) - return ioctl(fh->fd, B_SCSI_STOP_AUDIO) == 0; - else - return false; -} - - -/* - * Perform CD audio fast-forward/fast-reverse operation starting from specified address - */ - -bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return false; - - if (!fh->is_file) { - scsi_scan *p = (scsi_scan *)tmp_buf; - p->speed = 0; - p->direction = reverse ? -1 : 1; - return ioctl(fh->fd, B_SCSI_SCAN, p, sizeof(scsi_scan)) == 0; - } else - return false; -} - - -/* - * Set CD audio volume (0..255 each channel) - */ - -void SysCDSetVolume(void *arg, uint8 left, uint8 right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - if (!fh->is_file) { - scsi_volume *p = (scsi_volume *)tmp_buf; - p->flags = B_SCSI_PORT0_VOLUME | B_SCSI_PORT1_VOLUME; - p->port0_volume = left; - p->port1_volume = right; - ioctl(fh->fd, B_SCSI_SET_VOLUME, p, sizeof(scsi_volume)); - } -} - - -/* - * Get CD audio volume (0..255 each channel) - */ - -void SysCDGetVolume(void *arg, uint8 &left, uint8 &right) -{ - file_handle *fh = (file_handle *)arg; - if (!fh) - return; - - left = right = 0; - if (!fh->is_file) { - scsi_volume *p = (scsi_volume *)tmp_buf; - p->flags = B_SCSI_PORT0_VOLUME | B_SCSI_PORT1_VOLUME; - if (ioctl(fh->fd, B_SCSI_GET_VOLUME, p, sizeof(scsi_volume)) == 0) { - left = p->port0_volume; - right = p->port1_volume; - } - } -} diff --git a/BasiliskII/src/BeOS/sysdeps.h b/BasiliskII/src/BeOS/sysdeps.h deleted file mode 100644 index ed3ba9c33..000000000 --- a/BasiliskII/src/BeOS/sysdeps.h +++ /dev/null @@ -1,144 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for BeOS - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -#ifdef __POWERPC__ -#define NO_STD_NAMESPACE -#endif - -#include -#include -#include - -#include "user_strings_beos.h" - -// Are the Mac and the host address space the same? -#ifdef __i386__ -#define REAL_ADDRESSING 0 -#undef WORDS_BIGENDIAN -#else -#define REAL_ADDRESSING 1 -#define WORDS_BIGENDIAN 1 -#endif - -// Using 68k emulator -#define EMULATED_68K 1 - -// Mac ROM is write protected -#define ROM_IS_WRITE_PROTECTED 1 - -// ExtFS is supported -#define SUPPORTS_EXTFS 1 - -// BSD socket API is supported -#define SUPPORTS_UDP_TUNNEL 1 - -// mon is not supported -#undef ENABLE_MON - -// Time data type for Time Manager emulation -typedef bigtime_t tm_time_t; - -// 64 bit file offsets -typedef off_t loff_t; - -// Networking types -#define PF_INET AF_INET -#ifndef __HAIKU__ -typedef int socklen_t; -#endif - -// UAE CPU data types -#define uae_s8 int8 -#define uae_u8 uint8 -#define uae_s16 int16 -#define uae_u16 uint16 -#define uae_s32 int32 -#define uae_u32 uint32 -#define uae_s64 int64 -#define uae_u64 uint64 -typedef uae_u32 uaecptr; -#define VAL64(a) (a ## LL) -#define UVAL64(a) (a ## uLL) -typedef uint32 uintptr; -typedef int32 intptr; - -/* Timing functions */ -extern void Delay_usec(uint32 usec); - -// UAE CPU defines -#ifdef __i386__ - -// Intel x86 assembler optimizations -#define X86_PPRO_OPT -static inline uae_u32 do_get_mem_long(uae_u32 *a) {uint32 retval; __asm__ ("bswap %0" : "=r" (retval) : "0" (*a) : "cc"); return retval;} -#ifdef X86_PPRO_OPT -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("movzwl %w1,%k0\n\tshll $16,%k0\n\tbswap %k0\n" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#else -static inline uae_u32 do_get_mem_word(uae_u16 *a) {uint32 retval; __asm__ ("xorl %k0,%k0\n\tmovw %w1,%w0\n\trolw $8,%w0" : "=&r" (retval) : "m" (*a) : "cc"); return retval;} -#endif -#define HAVE_GET_WORD_UNSWAPPED -#define do_get_mem_word_unswapped(a) ((uae_u32)*((uae_u16 *)(a))) -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {__asm__ ("bswap %0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#ifdef X86_PPRO_OPT -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("bswap %0" : "=&r" (v) : "0" (v << 16) : "cc"); *a = v;} -#else -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {__asm__ ("rolw $8,%0" : "=r" (v) : "0" (v) : "cc"); *a = v;} -#endif - -#define X86_ASSEMBLY -#define UNALIGNED_PROFITABLE -#define OPTIMIZED_FLAGS -#define ASM_SYM(a) __asm__(a) -#define REGPARAM __attribute__((regparm(3))) - -#else - -// PowerPC (memory.cpp not used, so no optimization neccessary) -static inline uae_u32 do_get_mem_long(uae_u32 *a) {return *a;} -static inline uae_u32 do_get_mem_word(uae_u16 *a) {return *a;} -static inline void do_put_mem_long(uae_u32 *a, uae_u32 v) {*a = v;} -static inline void do_put_mem_word(uae_u16 *a, uae_u32 v) {*a = v;} - -#undef X86_ASSEMBLY -#define UNALIGNED_PROFITABLE -#undef OPTIMIZED_FLAGS -#define ASM_SYM(a) -#define REGPARAM -#endif - -#define do_get_mem_byte(a) ((uae_u32)*((uae_u8 *)(a))) -#define do_put_mem_byte(a, v) (*(uae_u8 *)(a) = (v)) - -#define call_mem_get_func(func, addr) ((*func)(addr)) -#define call_mem_put_func(func, addr, v) ((*func)(addr, v)) -#define __inline__ inline -#define CPU_EMU_SIZE 0 -#undef NO_INLINE_MEMORY_ACCESS -#undef MD_HAVE_MEM_1_FUNCS -#undef USE_COMPILER -#define REGPARAM2 -#define ENUMDECL typedef enum -#define ENUMNAME(name) name -#define write_log printf - -#endif diff --git a/BasiliskII/src/BeOS/timer_beos.cpp b/BasiliskII/src/BeOS/timer_beos.cpp deleted file mode 100644 index f6e71b506..000000000 --- a/BasiliskII/src/BeOS/timer_beos.cpp +++ /dev/null @@ -1,166 +0,0 @@ -/* - * timer_beos.cpp - Time Manager emulation, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - -#include "sysdeps.h" -#include "macos_util.h" -#include "timer.h" - -#define DEBUG 0 -#include "debug.h" - - -// From main_beos.cpp -extern thread_id emul_thread; - - -/* - * Return microseconds since boot (64 bit) - */ - -void Microseconds(uint32 &hi, uint32 &lo) -{ - D(bug("Microseconds\n")); - bigtime_t time = system_time(); - hi = time >> 32; - lo = time; -} - - -/* - * Return local date/time in Mac format (seconds since 1.1.1904) - */ - -uint32 TimerDateTime(void) -{ - return TimeToMacTime(time(NULL)); -} - - -/* - * Get current time - */ - -void timer_current_time(tm_time_t &t) -{ - t = system_time(); -} - - -/* - * Add times - */ - -void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a + b; -} - - -/* - * Subtract times - */ - -void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b) -{ - res = a - b; -} - - -/* - * Compare times (<0: a < b, =0: a = b, >0: a > b) - */ - -int timer_cmp_time(tm_time_t a, tm_time_t b) -{ - tm_time_t r = a - b; - return r < 0 ? -1 : (r > 0 ? 1 : 0); -} - - -/* - * Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t - */ - -void timer_mac2host_time(tm_time_t &res, int32 mactime) -{ - if (mactime > 0) - res = mactime * 1000; // Time in milliseconds - else - res = -mactime; // Time in negative microseconds -} - - -/* - * Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds) - * A negative input value for hosttime results in a zero return value - * As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds! - */ - -int32 timer_host2mac_time(tm_time_t hosttime) -{ - if (hosttime < 0) - return 0; - else if (hosttime > 0x7fffffff) - return hosttime / 1000; // Time in milliseconds - else - return -hosttime; // Time in negative microseconds -} - - -/* - * Delay by specified number of microseconds (<1 second) - */ - -void Delay_usec(uint32 usec) -{ - snooze(usec); -} - - -/* - * Suspend emulator thread, virtual CPU in idle mode - */ - -void idle_wait(void) -{ -#if 0 - /* - FIXME: add a semaphore (counter) to avoid a B_BAD_THREAD_STATE - return if we call idle_resume() when thread is not suspended? - - Sorry, I can't test -- gb. - */ - suspend_thread(emul_thread); -#endif -} - - -/* - * Resume execution of emulator thread, events just arrived - */ - -void idle_resume(void) -{ -#if 0 - resume_thread(emul_thread); -#endif -} diff --git a/BasiliskII/src/BeOS/user_strings_beos.cpp b/BasiliskII/src/BeOS/user_strings_beos.cpp deleted file mode 100644 index c3694578e..000000000 --- a/BasiliskII/src/BeOS/user_strings_beos.cpp +++ /dev/null @@ -1,69 +0,0 @@ -/* - * user_strings_beos.cpp - BeOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under BeOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "BeOS Root"}, - {STR_EXTFS_NAME, "BeOS Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "BeOS"}, - - // Purely platform-specific strings - {STR_NO_SHEEP_DRIVER_ERR, "Cannot open /dev/sheep: %s (%08x). Basilisk II is not properly installed."}, - {STR_SHEEP_UP_ERR, "Cannot allocate Low Memory Globals: %s (%08x)."}, - {STR_NO_KERNEL_DATA_ERR, "Cannot create Kernel Data area: %s (%08x)."}, - {STR_NO_NET_ADDON_WARN, "The SheepShaver net server add-on cannot be found. Ethernet will not be available."}, - {STR_NET_CONFIG_MODIFY_WARN, "To enable Ethernet networking for Basilisk II, your network configuration has to be modified and the network restarted. Do you want this to be done now (selecting \"Cancel\" will disable Ethernet under Basilisk II)?."}, - {STR_NET_ADDON_INIT_FAILED, "SheepShaver net server add-on found\nbut there seems to be no network hardware.\nPlease check your network preferences."}, - {STR_NET_ADDON_CLONE_FAILED, "Cloning of the network transfer area failed."}, - {STR_VIDEO_FAILED, "Failed to set video mode."}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/BasiliskII/src/BeOS/user_strings_beos.h b/BasiliskII/src/BeOS/user_strings_beos.h deleted file mode 100644 index 8de695e93..000000000 --- a/BasiliskII/src/BeOS/user_strings_beos.h +++ /dev/null @@ -1,35 +0,0 @@ -/* - * user_strings_beos.h - BeOS-specific localizable strings - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 USER_STRINGS_BEOS_H -#define USER_STRINGS_BEOS_H - -enum { - STR_NO_SHEEP_DRIVER_ERR = 10000, - STR_SHEEP_UP_ERR, - STR_NO_KERNEL_DATA_ERR, - STR_NO_NET_ADDON_WARN, - STR_NET_CONFIG_MODIFY_WARN, - STR_NET_ADDON_INIT_FAILED, - STR_NET_ADDON_CLONE_FAILED, - STR_VIDEO_FAILED -}; - -#endif diff --git a/BasiliskII/src/BeOS/video_beos.cpp b/BasiliskII/src/BeOS/video_beos.cpp deleted file mode 100644 index d70ad834b..000000000 --- a/BasiliskII/src/BeOS/video_beos.cpp +++ /dev/null @@ -1,1086 +0,0 @@ -/* - * video_beos.cpp - Video/graphics emulation, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * Portions written by Marc Hellwig - * - * 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 -#include -#include - -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "macos_util.h" -#include "prefs.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "video.h" - -#include "m68k.h" -#include "memory.h" -#include "readcpu.h" -#include "newcpu.h" - -#define DEBUG 0 -#include "debug.h" - -#define DEBUGGER_AVAILABLE 0 - - -// Messages -const uint32 MSG_REDRAW = 'draw'; -const uint32 MSG_ABOUT_REQUESTED = B_ABOUT_REQUESTED; -const uint32 MSG_REF_5HZ = ' 5Hz'; -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_REF_60HZ = '60Hz'; -const uint32 MSG_MOUNT = 'moun'; -const uint32 MSG_DEBUGGER = 'dbug'; - -// Display types -enum { - DISPLAY_WINDOW, - DISPLAY_SCREEN -}; - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - -// Global variables -static bool classic_mode = false; // Flag: Classic Mac video mode -static int scr_mode_bit = 0; -static vector VideoModes; // Supported video modes - - /* - * monitor_desc subclass for BeOS display - */ - -class BeOS_monitor_desc : public monitor_desc { -public: - BeOS_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~BeOS_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * A simple view class for blitting a bitmap on the screen - */ - -class BitmapView : public BView { -public: - BitmapView(BRect frame, BBitmap *bitmap) : BView(frame, "bitmap", B_FOLLOW_NONE, B_WILL_DRAW) - { - the_bitmap = bitmap; - } - virtual void Draw(BRect update) - { - DrawBitmap(the_bitmap, update, update); - } - virtual void MouseMoved(BPoint point, uint32 transit, const BMessage *message); - -private: - BBitmap *the_bitmap; -}; - - -/* - * Window class - */ - -class MacWindow : public BDirectWindow { -public: - MacWindow(BRect frame, const BeOS_monitor_desc& monitor); - virtual ~MacWindow(); - virtual void MessageReceived(BMessage *msg); - virtual void DirectConnected(direct_buffer_info *info); - virtual void WindowActivated(bool active); - - int32 frame_skip; - bool mouse_in_view; // Flag: Mouse pointer within bitmap view - uint8 remap_mac_be[256]; // For remapping of Mac colors to Be colors - -private: - static status_t tick_func(void *arg); - - thread_id tick_thread; - bool tick_thread_active; // Flag for quitting the tick thread - - BitmapView *main_view; // Main view for bitmap drawing - BBitmap *the_bitmap; // Mac screen bitmap - - uint32 old_scroll_lock_state; - - bool supports_direct_mode; // Flag: Direct frame buffer access supported - sem_id drawing_sem; - - void *bits; - int32 bytes_per_row; - color_space pixel_format; - bool unclipped; - - BeOS_monitor_desc monitor; -}; - - -/* - * Screen class - */ - -class MacScreen : public BWindowScreen { -public: - MacScreen(const BeOS_monitor_desc& monitor, const char *name, int mode_bit, status_t *error); - virtual ~MacScreen(); - virtual void Quit(void); - virtual void ScreenConnected(bool active); - - rgb_color palette[256]; // Color palette, 256 entries - bool palette_changed; - -private: - static status_t tick_func(void *arg); - - thread_id tick_thread; - bool tick_thread_active; // Flag for quitting the tick thread - - BView *main_view; // Main view for GetMouse() - uint8 *frame_backup; // Frame buffer backup when switching from/to different workspace - bool quitting; // Flag for ScreenConnected: We are quitting, don't pause emulator thread - bool screen_active; - bool first_time; - - BeOS_monitor_desc monitor; -}; - - -// Global variables -static int display_type = DISPLAY_WINDOW; // See enum above -static MacWindow *the_window = NULL; // Pointer to the window -static MacScreen *the_screen = NULL; // Pointer to the screen -static sem_id mac_os_lock = -1; // This is used to stop the MacOS thread when the Basilisk workspace is switched out -static uint8 MacCursor[68] = {16, 1}; // Mac cursor image - - -/* - * Initialization - */ - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - VideoModes.push_back(mode); -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(video_depth depth) -{ -#if 0 - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -#endif -} - - - -bool VideoInit(bool classic) -{ - classic_mode = classic; - - // Get screen mode from preferences - const char *mode_str; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine type and mode - int default_width = 512, default_height = 384; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "scr/%d", &scr_mode_bit) == 1) - display_type = DISPLAY_SCREEN; - } -#if 0 - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); -#endif - - // Mac screen depth follows BeOS depth - video_depth default_depth = VDEPTH_1BIT; - switch (BScreen().ColorSpace()) { - case B_CMAP8: - default_depth = VDEPTH_8BIT; - break; - case B_RGB15: - default_depth = VDEPTH_16BIT; - break; - case B_RGB32: - default_depth = VDEPTH_32BIT; - break; - default: - fprintf(stderr, "Unknown color space!"); - } - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(512, 342, 0x80, 64, VDEPTH_1BIT); - else { - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); -#if 0 - for (unsigned d=VDEPTH_1BIT; d<=VDEPTH_32BIT; d++) { - if (find_visual_for_depth(video_depth(d))) - add_window_modes(video_depth(d)); - } -#endif - } - } else - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); - if (VideoModes.empty()) { - ErrorAlert(STR_VIDEO_FAILED); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - default_id = i->resolution_id; - break; - } - } - if (i == end) { // not found, use first available mode - default_depth = VideoModes[0].depth; - default_id = VideoModes[0].resolution_id; - } - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - int bits = 1 << i->depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", i->x, i->y, i->resolution_id, 1 << bits)); - } -#endif - - // Create X11_monitor_desc for this (the only) display - BeOS_monitor_desc *monitor = new BeOS_monitor_desc(VideoModes, default_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - -bool BeOS_monitor_desc::video_open() { - // Create semaphore - mac_os_lock = create_sem(0, "MacOS Frame Buffer Lock"); - - const video_mode &mode = get_current_mode(); - - // Open display - switch (display_type) { - case DISPLAY_WINDOW: - the_window = new MacWindow(BRect(0, 0, mode.x-1, mode.y-1), *this); - break; - case DISPLAY_SCREEN: { - status_t screen_error; - the_screen = new MacScreen(*this, GetString(STR_WINDOW_TITLE), scr_mode_bit & 0x1f, &screen_error); - if (screen_error != B_NO_ERROR) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - ErrorAlert(STR_OPEN_SCREEN_ERR); - return false; - } else { - the_screen->Show(); - acquire_sem(mac_os_lock); - } - break; - } - } - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Close display - switch (display_type) { - case DISPLAY_WINDOW: - if (the_window != NULL) { - the_window->PostMessage(B_QUIT_REQUESTED); - while (the_window) - snooze(200000); - } - break; - case DISPLAY_SCREEN: - if (the_screen != NULL) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - } - break; - } - - // Delete semaphore - delete_sem(mac_os_lock); -} - - -/* - * Set palette - */ - -void BeOS_monitor_desc::set_palette(uint8 *pal, int num) -{ - switch (display_type) { - case DISPLAY_WINDOW: { - BScreen screen(the_window); - for (int i=0; i<256; i++) - the_window->remap_mac_be[i] = screen.IndexForColor(pal[i*3], pal[i*3+1], pal[i*3+2]); - break; - } - case DISPLAY_SCREEN: - for (int i=0; i<256; i++) { - the_screen->palette[i].red = pal[i*3]; - the_screen->palette[i].green = pal[i*3+1]; - the_screen->palette[i].blue = pal[i*3+2]; - } - the_screen->palette_changed = true; - break; - } -} - - -/* - * Switch video mode - */ - -void BeOS_monitor_desc::switch_to_current_mode() -{ -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DISPLAY_SCREEN) { - if (the_screen != NULL) { - the_screen->PostMessage(B_QUIT_REQUESTED); - while (the_screen) - snooze(200000); - } - } -} - - -/* - * Video event handling (not neccessary under BeOS, handled by filter function) - */ - -void VideoInterrupt(void) -{ - release_sem(mac_os_lock); - while (acquire_sem(mac_os_lock) == B_INTERRUPTED) ; -} - - -/* - * Filter function for receiving mouse and keyboard events - */ - -#define MENU_IS_POWER 0 - -// Be -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0xff, 0x35, 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, // inv Esc F1 F2 F3 F4 F5 F6 - 0x62, 0x64, 0x65, 0x6d, 0x67, 0x6f, 0x69, 0x6b, // F7 F8 F9 F10 F11 F12 F13 F14 - 0x71, 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, // F15 ` 1 2 3 4 5 6 - 0x1a, 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x33, 0x72, // 7 8 9 0 - = BSP INS - 0x73, 0x74, 0x47, 0x4b, 0x43, 0x4e, 0x30, 0x0c, // HOM PUP NUM / * - TAB Q - 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, 0x1f, // W E R T Y U I O - 0x23, 0x21, 0x1e, 0x2a, 0x75, 0x77, 0x79, 0x59, // P [ ] \ DEL END PDN 7 - 0x5b, 0x5c, 0x45, 0x39, 0x00, 0x01, 0x02, 0x03, // 8 9 + CAP A S D F - 0x05, 0x04, 0x26, 0x28, 0x25, 0x29, 0x27, 0x24, // G H J K L ; ' RET - 0x56, 0x57, 0x58, 0x38, 0x06, 0x07, 0x08, 0x09, // 4 5 6 SHL Z X C V - 0x0b, 0x2d, 0x2e, 0x2b, 0x2f, 0x2c, 0x38, 0x3e, // B N M , . / SHR CUP - 0x53, 0x54, 0x55, 0x4c, 0x36, 0x37, 0x31, 0x37, // 1 2 3 ENT CTL ALT SPC ALT - 0x36, 0x3b, 0x3d, 0x3c, 0x52, 0x41, 0x3a, 0x3a, // CTR CLF CDN CRT 0 . CMD CMD -#if MENU_IS_POWER - 0x7f, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#else - 0x32, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static const uint8 modifier2mac[0x20] = { -#if MENU_IS_POWER - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x7f, // SHF CMD inv CAP F14 NUM OPT MNU -#else - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x32, // SHF CMD CTR CAP F14 NUM OPT MNU -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter) -{ - switch (msg->what) { - case B_KEY_DOWN: - case B_KEY_UP: { - uint32 be_code = msg->FindInt32("key") & 0xff; - uint32 mac_code = keycode2mac[be_code]; - - // Intercept Ctrl-F1 (mount floppy disk shortcut) - uint32 mods = msg->FindInt32("modifiers"); - if (be_code == 0x02 && (mods & B_CONTROL_KEY)) - SysMountVolume("/dev/disk/floppy/raw"); - - if (mac_code == 0xff) - return B_DISPATCH_MESSAGE; - if (msg->what == B_KEY_DOWN) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - return B_SKIP_MESSAGE; - } - - case B_MODIFIERS_CHANGED: { - uint32 mods = msg->FindInt32("modifiers"); - uint32 old_mods = msg->FindInt32("be:old_modifiers"); - uint32 changed = mods ^ old_mods; - uint32 mask = 1; - for (int i=0; i<32; i++, mask<<=1) - if (changed & mask) { - uint32 mac_code = modifier2mac[i]; - if (mac_code == 0xff) - continue; - if (mods & mask) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - } - return B_SKIP_MESSAGE; - } - - case B_MOUSE_MOVED: { - BPoint point; - msg->FindPoint("where", &point); - ADBMouseMoved(int(point.x), int(point.y)); - return B_DISPATCH_MESSAGE; // Otherwise BitmapView::MouseMoved() wouldn't be called - } - - case B_MOUSE_DOWN: { - uint32 buttons = msg->FindInt32("buttons"); - if (buttons & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (buttons & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (buttons & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - return B_SKIP_MESSAGE; - } - - case B_MOUSE_UP: // B_MOUSE_UP means "all buttons released" - ADBMouseUp(0); - ADBMouseUp(1); - ADBMouseUp(2); - return B_SKIP_MESSAGE; - - default: - return B_DISPATCH_MESSAGE; - } -} - - -/* - * Window constructor - */ - -MacWindow::MacWindow(BRect frame, const BeOS_monitor_desc& monitor) - : BDirectWindow(frame, GetString(STR_WINDOW_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_CLOSABLE | B_NOT_ZOOMABLE) - , monitor(monitor) -{ - supports_direct_mode = SupportsWindowMode(); - - // Move window to right position - Lock(); - MoveTo(80, 60); - - // Allocate bitmap and Mac frame buffer - uint32 x = frame.IntegerWidth() + 1; - uint32 y = frame.IntegerHeight() + 1; - int fbsize = x * y; - const video_mode &mode = monitor.get_current_mode(); - switch (mode.depth) { - case VDEPTH_1BIT: - fprintf(stderr, "1BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_GRAY1); - fbsize /= 8; - break; - case VDEPTH_8BIT: - fprintf(stderr, "8BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_CMAP8); - break; - case VDEPTH_32BIT: - fprintf(stderr, "32BIT SCREEN CREATED"); - the_bitmap = new BBitmap(frame, B_RGB32_BIG); - fbsize *= 4; - break; - default: - fprintf(stderr, "width: %d", 1 << mode.depth); - debugger("OOPS"); - } - -#if REAL_ADDRESSING - monitor.set_mac_frame_base((uint32)the_bitmap->Bits()); -#else - monitor.set_mac_frame_base(MacFrameBaseMac); -#endif - -#if !REAL_ADDRESSING - // Set variables for UAE memory mapping - MacFrameBaseHost = (uint8*)the_bitmap->Bits(); - MacFrameSize = fbsize; - MacFrameLayout = FLAYOUT_DIRECT; -#endif - - // Create bitmap view - main_view = new BitmapView(frame, the_bitmap); - AddChild(main_view); - main_view->MakeFocus(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Set up menus - BRect bounds = Bounds(); - bounds.OffsetBy(0, bounds.IntegerHeight() + 1); - BMenuItem *item; - BMenuBar *bar = new BMenuBar(bounds, "menu"); - BMenu *menu = new BMenu(GetString(STR_WINDOW_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_WINDOW_ITEM_ABOUT), new BMessage(MSG_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - BMenu *submenu = new BMenu(GetString(STR_WINDOW_ITEM_REFRESH)); - submenu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_60HZ_LAB), new BMessage(MSG_REF_60HZ))); - submenu->SetRadioMode(true); - if (frame_skip == 12) { - if ((item = submenu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 8) { - if ((item = submenu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 6) { - if ((item = submenu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 4) { - if ((item = submenu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 2) { - if ((item = submenu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 1) { - if ((item = submenu->FindItem(GetString(STR_REF_60HZ_LAB))) != NULL) - item->SetMarked(true); - } - menu->AddItem(submenu); - submenu = new BMenu(GetString(STR_WINDOW_ITEM_MOUNT)); - SysCreateVolumeMenu(submenu, MSG_MOUNT); - menu->AddItem(submenu); -#if DEBUGGER_AVAILABLE - menu->AddItem(new BMenuItem("Debugger", new BMessage(MSG_DEBUGGER))); -#endif - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Frame().IntegerHeight() + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Set absolute mouse mode and get scroll lock state - ADBSetRelMouseMode(false); - mouse_in_view = true; - old_scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (old_scroll_lock_state) - SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - SetTitle(GetString(STR_WINDOW_TITLE)); - - // Keep window aligned to 8-byte frame buffer boundaries for faster blitting - SetWindowAlignment(B_BYTE_ALIGNMENT, 8); - - // Create drawing semaphore (for direct mode) - drawing_sem = create_sem(0, "direct frame buffer access"); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Window Redraw", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - main_view->AddFilter(filter); - - // Show window - Unlock(); - Show(); - Sync(); -} - - -/* - * Window destructor - */ - -MacWindow::~MacWindow() -{ - // Restore cursor - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - - // Hide window - Hide(); - Sync(); - - // Stop 60Hz interrupt - status_t l; - tick_thread_active = false; - delete_sem(drawing_sem); - wait_for_thread(tick_thread, &l); - - // Free bitmap and frame buffer - delete the_bitmap; - - // Tell emulator that we're done - the_window = NULL; -} - - -/* - * Window connected/disconnected - */ - -void MacWindow::DirectConnected(direct_buffer_info *info) -{ - switch (info->buffer_state & B_DIRECT_MODE_MASK) { - case B_DIRECT_STOP: - acquire_sem(drawing_sem); - break; - case B_DIRECT_MODIFY: - acquire_sem(drawing_sem); - case B_DIRECT_START: - bits = (void *)((uint8 *)info->bits + info->window_bounds.top * info->bytes_per_row + info->window_bounds.left * info->bits_per_pixel / 8); - bytes_per_row = info->bytes_per_row; - pixel_format = info->pixel_format; - unclipped = false; - if (info->clip_list_count == 1) - if (memcmp(&info->clip_bounds, &info->window_bounds, sizeof(clipping_rect)) == 0) - unclipped = true; - release_sem(drawing_sem); - break; - } -} - - -/* - * Handle redraw and menu messages - */ - -void MacWindow::MessageReceived(BMessage *msg) -{ - BMessage *msg2; - - switch (msg->what) { - case MSG_REDRAW: { - - // Prevent backlog of messages - MessageQueue()->Lock(); - while ((msg2 = MessageQueue()->FindMessage(MSG_REDRAW, 0)) != NULL) { - MessageQueue()->RemoveMessage(msg2); - delete msg2; - } - MessageQueue()->Unlock(); - - // Convert Mac screen buffer to BeOS palette and blit - const video_mode &mode = monitor.get_current_mode(); - BRect update_rect = BRect(0, 0, mode.x-1, mode.y-1); - main_view->DrawBitmapAsync(the_bitmap, update_rect, update_rect); - break; - } - - case MSG_ABOUT_REQUESTED: { - ShowAboutWindow(); - break; - } - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", frame_skip = 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", frame_skip = 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", frame_skip = 2); - break; - - case MSG_REF_60HZ: - PrefsReplaceInt32("frameskip", frame_skip = 1); - break; - - case MSG_MOUNT: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - SysMountVolume(source->Label()); - break; - } - -#if DEBUGGER_AVAILABLE - case MSG_DEBUGGER: - extern int debugging; - debugging = 1; - regs.spcflags |= SPCFLAG_BRK; - break; -#endif - - default: - BDirectWindow::MessageReceived(msg); - } -} - - -/* - * Window activated/deactivated - */ - -void MacWindow::WindowActivated(bool active) -{ - if (active) { - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - } else - frame_skip = 12; // 5Hz in background -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacWindow::tick_func(void *arg) -{ - MacWindow *obj = (MacWindow *)arg; - static int tick_counter = 0; - while (obj->tick_thread_active) { - - tick_counter++; - if (tick_counter >= obj->frame_skip) { - tick_counter = 0; - - // Window title is determined by Scroll Lock state - uint32 scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (scroll_lock_state != obj->old_scroll_lock_state) { - if (scroll_lock_state) - obj->SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - obj->SetTitle(GetString(STR_WINDOW_TITLE)); - obj->old_scroll_lock_state = scroll_lock_state; - } - - // Has the Mac started? - if (HasMacStarted()) { - - // Yes, set new cursor image if it was changed - if (memcmp(MacCursor+4, Mac2HostAddr(0x844), 64)) { - Mac2Host_memcpy(MacCursor+4, 0x844, 64); // Cursor image - MacCursor[2] = ReadMacInt8(0x885); // Hotspot - MacCursor[3] = ReadMacInt8(0x887); - be_app->SetCursor(MacCursor); - } - } - - // Refresh screen unless Scroll Lock is down - if (!scroll_lock_state) { - obj->PostMessage(MSG_REDRAW); - } - } - snooze(16666); - } - return 0; -} - - -/* - * Mouse moved in window - */ - -void BitmapView::MouseMoved(BPoint point, uint32 transit, const BMessage *message) -{ - switch (transit) { - case B_ENTERED_VIEW: - ((MacWindow *)Window())->mouse_in_view = true; - be_app->SetCursor(MacCursor); - break; - case B_EXITED_VIEW: - ((MacWindow *)Window())->mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - break; - } -} - - -/* - * Screen constructor - */ - -MacScreen::MacScreen(const BeOS_monitor_desc& monitor, const char *name, int mode_bit, status_t *error) - : BWindowScreen(name, 1 << mode_bit, error), tick_thread(-1) - , monitor(monitor) -{ - // Set all variables - frame_backup = NULL; - palette_changed = false; - screen_active = false; - first_time = true; - quitting = false; - - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Create view to get mouse events - main_view = new BView(Frame(), NULL, B_FOLLOW_NONE, 0); - AddChild(main_view); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Polling sucks...", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - AddCommonFilter(filter); -} - - -/* - * Screen destructor - */ - -MacScreen::~MacScreen() -{ - // Stop 60Hz interrupt - if (tick_thread > 0) { - status_t l; - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - } - - // Tell emulator that we're done - the_screen = NULL; -} - - -/* - * Screen closed - */ - -void MacScreen::Quit(void) -{ - // Tell ScreenConnected() that we are quitting - quitting = true; - BWindowScreen::Quit(); -} - - -/* - * Screen connected/disconnected - */ - -void MacScreen::ScreenConnected(bool active) -{ - graphics_card_info *info = CardInfo(); - screen_active = active; - const video_mode &mode = monitor.get_current_mode(); - - if (active == true) { - - // Set VideoMonitor -#if REAL_ADDRESSING - monitor.set_mac_frame_base((uint32)info->frame_buffer); -#else - monitor.set_mac_frame_base(MacFrameBaseMac); -#endif - -#if !REAL_ADDRESSING - // Set variables for UAE memory mapping - MacFrameBaseHost = (uint8 *)info->frame_buffer; - MacFrameSize = mode.bytes_per_row * mode.y; - switch (info->bits_per_pixel) { - case 15: - MacFrameLayout = FLAYOUT_HOST_555; - break; - case 16: - MacFrameLayout = FLAYOUT_HOST_565; - break; - case 32: - MacFrameLayout = FLAYOUT_HOST_888; - break; - default: - MacFrameLayout = FLAYOUT_DIRECT; - break; - } -#endif - - // Copy from backup store to frame buffer - if (frame_backup != NULL) { - memcpy(info->frame_buffer, frame_backup, mode.bytes_per_row * mode.y); - delete[] frame_backup; - frame_backup = NULL; - } - - // Restore palette - if (mode.depth == VDEPTH_8BIT) - SetColorList(palette); - - // Restart/signal emulator thread - release_sem(mac_os_lock); - - } else { - - if (!quitting) { - - // Stop emulator thread - acquire_sem(mac_os_lock); - - // Create backup store and save frame buffer - frame_backup = new uint8[mode.bytes_per_row * mode.y]; - memcpy(frame_backup, info->frame_buffer, mode.bytes_per_row * mode.y); - } - } -} - - -/* - * Screen 60Hz interrupt routine - */ - -status_t MacScreen::tick_func(void *arg) -{ - MacScreen *obj = (MacScreen *)arg; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Workspace activated? Then poll the mouse and set the palette if needed - if (!obj->quitting && obj->LockWithTimeout(200000) == B_OK) { - if (obj->screen_active) { - BPoint pt; - uint32 button = 0; - if (obj->palette_changed) { - obj->palette_changed = false; - obj->SetColorList(obj->palette); - } - obj->main_view->GetMouse(&pt, &button); - set_mouse_position(320, 240); - ADBMouseMoved(int(pt.x) - 320, int(pt.y) - 240); - if (button & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (!(button & B_PRIMARY_MOUSE_BUTTON)) - ADBMouseUp(0); - if (button & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (!(button & B_SECONDARY_MOUSE_BUTTON)) - ADBMouseUp(1); - if (button & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - if (!(button & B_TERTIARY_MOUSE_BUTTON)) - ADBMouseUp(2); - } - obj->Unlock(); - } - } - return 0; -} diff --git a/BasiliskII/src/BeOS/xpram_beos.cpp b/BasiliskII/src/BeOS/xpram_beos.cpp deleted file mode 100644 index 8ee250a47..000000000 --- a/BasiliskII/src/BeOS/xpram_beos.cpp +++ /dev/null @@ -1,84 +0,0 @@ -/* - * xpram_beos.cpp - XPRAM handling, BeOS specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include - -#include "sysdeps.h" -#include "xpram.h" - - -// XPRAM file name and path -#if POWERPC_ROM -const char XPRAM_FILE_NAME[] = "SheepShaver_NVRAM"; -#else -const char XPRAM_FILE_NAME[] = "BasiliskII_XPRAM"; -#endif -static BPath xpram_path; - - -/* - * Load XPRAM from settings file - */ - -void LoadXPRAM(const char *vmdir) -{ - // Construct XPRAM path - find_directory(B_USER_SETTINGS_DIRECTORY, &xpram_path, true); - xpram_path.Append(XPRAM_FILE_NAME); - - // Load XPRAM from settings file - int fd; - if ((fd = open(xpram_path.Path(), O_RDONLY)) >= 0) { - read(fd, XPRAM, XPRAM_SIZE); - close(fd); - } -} - - -/* - * Save XPRAM to settings file - */ - -void SaveXPRAM(void) -{ - if (xpram_path.InitCheck() != B_NO_ERROR) - return; - int fd; - if ((fd = open(xpram_path.Path(), O_WRONLY | O_CREAT, 0666)) >= 0) { - write(fd, XPRAM, XPRAM_SIZE); - close(fd); - } -} - - -/* - * Delete PRAM file - */ - -void ZapPRAM(void) -{ - // Construct PRAM path - find_directory(B_USER_SETTINGS_DIRECTORY, &xpram_path, true); - xpram_path.Append(XPRAM_FILE_NAME); - - // Delete file - unlink(xpram_path.Path()); -} diff --git a/BasiliskII/src/MacOSX/video_macosx.mm b/BasiliskII/src/MacOSX/video_macosx.mm index 8323038c3..026ae2c85 100644 --- a/BasiliskII/src/MacOSX/video_macosx.mm +++ b/BasiliskII/src/MacOSX/video_macosx.mm @@ -2,7 +2,7 @@ * $Id$ * * video_macosx.mm - Interface between Basilisk II and Cocoa windowing. - * Based on video_amiga.cpp and video_x.cpp + * Based on video_x.cpp * * Basilisk II (C) 1997-2008 Christian Bauer * @@ -51,7 +51,7 @@ // Global variables uint8 display_type = DISPLAY_WINDOW, // These are used by PrefsEditor - frame_skip; + frame_skip; uint16 init_width = MIN_WIDTH, // as well as this code init_height = MIN_HEIGHT, init_depth = 32; @@ -919,7 +919,7 @@ void VideoExit(void) const char *failure = NULL; D(bug("switch_to_current_mode(): width=%d height=%d depth=%d bytes_per_row=%d\n", mode.x, mode.y, bits_from_depth(mode.depth), mode.bytes_per_row)); - + if ( display_type == DISPLAY_SCREEN && originalMode ) { D(NSLog(@"About to call CGDisplayBestModeForParameters()")); @@ -958,7 +958,7 @@ void VideoExit(void) CGColorSpaceRef oldColourSpace = colourSpace; CGDataProviderRef oldProvider = provider; void *oldBuffer = the_buffer; - + if ( video_open(mode) ) { CGImageRelease(oldImageRef); @@ -979,7 +979,7 @@ void VideoExit(void) // if ( CGDisplayMoveCursorToPoint(theDisplay, CGPointMake(15,15)) // == CGDisplayNoErr ) // { - // + // [output fullscreenMouseMove]; // } // else diff --git a/BasiliskII/src/Unix/BasiliskII.1 b/BasiliskII/src/Unix/BasiliskII.1 index 45e402ac9..d5b44b3b1 100644 --- a/BasiliskII/src/Unix/BasiliskII.1 +++ b/BasiliskII/src/Unix/BasiliskII.1 @@ -41,7 +41,7 @@ and a Macintosh ROM image to use Basilisk II. .TP - Emulates extended ADB keyboard and 3-button mouse .TP -- Uses UAE 68k emulation or (under AmigaOS and NetBSD/m68k) real 68k processor +- Uses UAE 68k emulation or real 68k processor .SH OPTIONS .TP .BI "\-\-display " display-name diff --git a/BasiliskII/src/Unix/Irix/audio_irix.cpp b/BasiliskII/src/Unix/Irix/audio_irix.cpp index ebd8eb69e..8b61a2819 100644 --- a/BasiliskII/src/Unix/Irix/audio_irix.cpp +++ b/BasiliskII/src/Unix/Irix/audio_irix.cpp @@ -139,17 +139,17 @@ bool open_audio(void) } alSetChannels(config, audio_channel_counts[audio_channel_count_index]); alSetDevice(config, AL_DEFAULT_OUTPUT); // Allow selecting via prefs? - + // Try to open the audio library port = alOpenPort("BasiliskII", "w", config); if (port == NULL) { - fprintf(stderr, "ERROR: Cannot open audio port: %s\n", + fprintf(stderr, "ERROR: Cannot open audio port: %s\n", alGetErrorString(oserror())); WarningAlert(GetString(STR_NO_AUDIO_WARN)); return false; } - + // Set the sample rate pv[0].param = AL_RATE; @@ -180,7 +180,7 @@ bool open_audio(void) // Put a limit on the Mac sound buffer size, to decrease delay #define AUDIO_BUFFER_MSEC 50 // milliseconds of sound to buffer - int target_frames_per_block = + int target_frames_per_block = (audio_sample_rates[audio_sample_rate_index] >> 16) * AUDIO_BUFFER_MSEC / 1000; if (audio_frames_per_block > target_frames_per_block) @@ -190,14 +190,14 @@ bool open_audio(void) alZeroFrames(port, audio_frames_per_block); // so we don't underflow // Try to keep the buffer pretty full - sound_buffer_fill_point = alGetQueueSize(config) - + sound_buffer_fill_point = alGetQueueSize(config) - 2 * audio_frames_per_block; if (sound_buffer_fill_point < 0) sound_buffer_fill_point = alGetQueueSize(config) / 3; D(bug("fill point %d\n", sound_buffer_fill_point)); sound_buffer_size = (audio_sample_sizes[audio_sample_size_index] >> 3) * - audio_channel_counts[audio_channel_count_index] * + audio_channel_counts[audio_channel_count_index] * audio_frames_per_block; set_audio_status_format(); @@ -342,7 +342,7 @@ static void *stream_func(void *arg) goto silence; // Send data to audio library. Convert 8-bit data - // unsigned->signed, using same algorithm as audio_amiga.cpp. + // unsigned->signed // It works fine for 8-bit mono, but not stereo. if (AudioStatus.sample_size == 8) { uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); @@ -473,7 +473,7 @@ static void set_volume(uint32 vol) alGetParamInfo(dev, AL_GAIN, &pi); maxgain = alFixedToDouble(pi.max.ll); - mingain = alFixedToDouble(pi.min.ll); + mingain = alFixedToDouble(pi.min.ll); // Set the new gain values diff --git a/BasiliskII/src/ether.cpp b/BasiliskII/src/ether.cpp index d5471029d..8df8c86bd 100644 --- a/BasiliskII/src/ether.cpp +++ b/BasiliskII/src/ether.cpp @@ -56,12 +56,7 @@ using std::map; #define MONITOR 0 - -#ifdef __BEOS__ -#define CLOSESOCKET closesocket -#else #define CLOSESOCKET close -#endif // Global variables @@ -138,12 +133,8 @@ void EtherInit(void) // Set socket options int on = 1; -#ifdef __BEOS__ - setsockopt(udp_socket, SOL_SOCKET, SO_NONBLOCK, &on, sizeof(on)); -#else setsockopt(udp_socket, SOL_SOCKET, SO_BROADCAST, &on, sizeof(on)); ioctl(udp_socket, FIONBIO, &on); -#endif // Start thread for packet reception if (!ether_start_udp_thread(udp_socket)) { diff --git a/BasiliskII/src/extfs.cpp b/BasiliskII/src/extfs.cpp index adc8d4a0d..b3ce3eec0 100644 --- a/BasiliskII/src/extfs.cpp +++ b/BasiliskII/src/extfs.cpp @@ -1053,7 +1053,7 @@ static int16 fs_volume_mount(uint32 pb) // Init VCB WriteMacInt16(vcb + vcbSigWord, 0x4244); -#if defined(__BEOS__) || defined(WIN32) +#if defined(WIN32) WriteMacInt32(vcb + vcbCrDate, TimeToMacTime(root_stat.st_crtime)); #elif defined __APPLE__ && defined __MACH__ WriteMacInt32(vcb + vcbCrDate, get_creation_time(RootPath)); @@ -1118,7 +1118,7 @@ static int16 fs_get_vol_info(uint32 pb, bool hfs) // Fill in struct if (ReadMacInt32(pb + ioNamePtr)) pstrcpy((char *)Mac2HostAddr(ReadMacInt32(pb + ioNamePtr)), VOLUME_NAME); -#if defined(__BEOS__) || defined(WIN32) +#if defined(WIN32) WriteMacInt32(pb + ioVCrDate, TimeToMacTime(root_stat.st_crtime)); #elif defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioVCrDate, get_creation_time(RootPath)); @@ -1312,7 +1312,7 @@ static int16 fs_get_file_info(uint32 pb, bool hfs, uint32 dirID) WriteMacInt8(pb + ioFlAttrib, access(full_path, W_OK) == 0 ? 0 : faLocked); WriteMacInt32(pb + ioDirID, fs_item->id); -#if defined(__BEOS__) || defined(WIN32) +#if defined(WIN32) WriteMacInt32(pb + ioFlCrDat, TimeToMacTime(st.st_crtime)); #elif defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioFlCrDat, get_creation_time(full_path)); @@ -1437,7 +1437,7 @@ static int16 fs_get_cat_info(uint32 pb) WriteMacInt8(pb + ioACUser, 0); WriteMacInt32(pb + ioDirID, fs_item->id); WriteMacInt32(pb + ioFlParID, fs_item->parent_id); -#if defined(__BEOS__) || defined(WIN32) +#if defined(WIN32) WriteMacInt32(pb + ioFlCrDat, TimeToMacTime(st.st_crtime)); #elif defined __APPLE__ && defined __MACH__ WriteMacInt32(pb + ioFlCrDat, get_creation_time(full_path)); diff --git a/BasiliskII/src/include/debug.h b/BasiliskII/src/include/debug.h index 5200ba011..11fa4df78 100644 --- a/BasiliskII/src/include/debug.h +++ b/BasiliskII/src/include/debug.h @@ -89,18 +89,6 @@ static inline void _cdecl winbug(wchar_t *s, ...) #define bug winbug #define wbug wwinbug -#elif defined(AMIGA) - -// Amiga debugging info goes to serial port (or sushi) -#ifdef __cplusplus -extern "C" { -#endif -extern void kprintf(const char *, ...); -#ifdef __cplusplus -} -#endif -#define bug kprintf - #else // Other systems just print it to stdout diff --git a/BasiliskII/src/powerrom_cpu/cpu_emulation.h b/BasiliskII/src/powerrom_cpu/cpu_emulation.h deleted file mode 100644 index dbddfbbc9..000000000 --- a/BasiliskII/src/powerrom_cpu/cpu_emulation.h +++ /dev/null @@ -1,66 +0,0 @@ -/* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (Apple PowerMac ROM 680x0 emulator version (BeOS/PPC)) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 CPU_EMULATION_H -#define CPU_EMULATION_H - - -/* - * Memory system - */ - -// RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) -extern uint32 RAMSize; // Size of RAM - -extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) -extern uint32 ROMSize; // Size of ROM - -// Mac memory access functions -static inline uint32 ReadMacInt32(uint32 addr) {return ntohl(*(uint32 *)addr);} -static inline uint32 ReadMacInt16(uint32 addr) {return ntohs(*(uint16 *)addr);} -static inline uint32 ReadMacInt8(uint32 addr) {return *(uint8 *)addr;} -static inline void WriteMacInt32(uint32 addr, uint32 l) {*(uint32 *)addr = htonl(l);} -static inline void WriteMacInt16(uint32 addr, uint32 w) {*(uint16 *)addr = htons(w);} -static inline void WriteMacInt8(uint32 addr, uint32 b) {*(uint8 *)addr = b;} -static inline uint8 *Mac2HostAddr(uint32 addr) {return (uint8 *)addr;} -static inline uint32 Host2MacAddr(uint8 *addr) {return (uint32)addr;} - - -/* - * 680x0 emulation - */ - -// Initialization -extern bool Init680x0(void); // This routine may want to look at CPUType/FPUType to set up the apropriate emulation -extern void Exit680x0(void); - -// 680x0 emulation functions -struct M68kRegisters; -extern void Start680x0(void); // Reset and start 680x0 -extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine -extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine - -// Interrupt functions -extern void TriggerInterrupt(void); // Trigger interrupt (InterruptFlag must be set first) - -#endif diff --git a/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp b/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp deleted file mode 100644 index d91b9049f..000000000 --- a/BasiliskII/src/powerrom_cpu/powerrom_cpu.cpp +++ /dev/null @@ -1,1367 +0,0 @@ -/* - * powerrom_cpu.cpp - Using the 680x0 emulator in PowerMac ROMs for Basilisk II - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 -#include -#include - -#include -#include -#include - -#include "sysdeps.h" -#include "cpu_emulation.h" -#include "main.h" -#include "emul_op.h" -#include "prefs.h" -#include "timer.h" -#include "user_strings.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - -// Save FP regs in Execute68k()? -#define SAVE_FP_EXEC_68K 0 - - -// Constants -const char ROM_FILE_NAME[] = "PowerROM"; -const char KERNEL_AREA_NAME[] = "Macintosh Kernel Data"; -const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; - -const uint32 ROM_BASE = 0x40800000; // Base address of ROM -const uint32 ROM_SIZE = 0x00400000; // Size of ROM file -const uint32 ROM_AREA_SIZE = 0x00500000; // Size of ROM area - -const uint32 DR_CACHE_BASE = 0x69000000; // Address of DR cache -const uint32 DR_CACHE_SIZE = 0x80000; // Size of DR Cache - -const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack - -// PowerPC opcodes -const uint32 POWERPC_NOP = 0x60000000; -const uint32 POWERPC_ILLEGAL = 0x00000000; -const uint32 POWERPC_BLR = 0x4e800020; -const uint32 POWERPC_BCTR = 0x4e800420; - -// Extra Low Memory Globals -#define MODE_68K 0 // 68k emulator active -#define MODE_EMUL_OP 1 // Within EMUL_OP routine - -#define XLM_RESET_STACK 0x2800 // Reset stack pointer -#define XLM_KERNEL_DATA 0x2804 // Pointer to Kernel Data -#define XLM_TOC 0x2808 // TOC pointer of emulator -#define XLM_RUN_MODE 0x2810 // Current run mode, see enum above -#define XLM_68K_R25 0x2814 // Contents of the 68k emulator's r25 (which contains the interrupt level), saved upon entering EMUL_OP mode, used by Execute68k() and the USR1 signal handler -#define XLM_IRQ_NEST 0x2818 // Interrupt disable nesting counter (>0: disabled) -#define XLM_PVR 0x281c // Theoretical PVR -#define XLM_EMUL_RETURN_PROC 0x2824 // Pointer to EMUL_RETURN routine -#define XLM_EXEC_RETURN_PROC 0x2828 // Pointer to EXEC_RETURN routine -#define XLM_EMUL_OP_PROC 0x282c // Pointer to EMUL_OP routine -#define XLM_EMUL_RETURN_STACK 0x2830 // Stack pointer for EMUL_RETURN - - -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM - - -// Emulator Data -struct EmulatorData { - uint32 v[0x400]; -}; - - -// Kernel Data -struct KernelData { - uint32 v[0x400]; - EmulatorData ed; -}; - - -// Exceptions -class file_open_error {}; -class file_read_error {}; -class rom_size_error {}; - - -// Global variables -static void *TOC; // TOC pointer -static uint32 PVR; // Theoretical PVR -static int64 CPUClockSpeed; // Processor clock speed (Hz) -static int64 BusClockSpeed; // Bus clock speed (Hz) -static system_info SysInfo; // System information - -static area_id kernel_area = -1; // Kernel Data area ID -static KernelData *kernel_data = NULL; // Pointer to Kernel Data -static uint32 KernelDataAddr; // Address of Kernel Data -static EmulatorData *emulator_data = NULL; -static area_id dr_cache_area; // DR Cache area ID -static uint32 DRCacheAddr; // Address of DR Cache - -static struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) -static bool ReadyForSignals = false; // Flag: emul_thread ready to receive signals - - -// Prototypes -static void sigusr1_handler(int sig, void *arg, vregs *r); - -// From main_beos.cpp -extern int sheep_fd; // fd of sheep driver -extern thread_id emul_thread; // Emulator thread - - -/* - * Load ROM file (upper 3MB) - * - * file_open_error: Cannot open ROM file (nor use built-in ROM) - * file_read_error: Cannot read ROM file - */ - -// Decode LZSS data -static void decode_lzss(const uint8 *src, uint8 *dest, int size) -{ - char dict[0x1000]; - int run_mask = 0, dict_idx = 0xfee; - for (;;) { - if (run_mask < 0x100) { - // Start new run - if (--size < 0) - break; - run_mask = *src++ | 0xff00; - } - bool bit = run_mask & 1; - run_mask >>= 1; - if (bit) { - // Verbatim copy - if (--size < 0) - break; - int c = *src++; - dict[dict_idx++] = c; - *dest++ = c; - dict_idx &= 0xfff; - } else { - // Copy from dictionary - if (--size < 0) - break; - int idx = *src++; - if (--size < 0) - break; - int cnt = *src++; - idx |= (cnt << 4) & 0xf00; - cnt = (cnt & 0x0f) + 3; - while (cnt--) { - char c = dict[idx++]; - dict[dict_idx++] = c; - *dest++ = c; - idx &= 0xfff; - dict_idx &= 0xfff; - } - } - } -} - -static void load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("powerrom"); - - // Try to open ROM file - BFile file(rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) { - - // Failed, then ask sheep driver for ROM - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = read(sheep_fd, (void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - // Copy upper 3MB - memcpy((void *)(ROM_BASE + 0x100000), rom + 0x100000, ROM_SIZE - 0x100000); - delete[] rom; - return; - } else - throw file_open_error(); - } - - printf(GetString(STR_READING_ROM_FILE)); - - // Get file size - off_t rom_size = 0; - file.GetSize(&rom_size); - - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - // Plain ROM image, copy upper 3MB - memcpy((void *)(ROM_BASE + 0x100000), rom + 0x100000, ROM_SIZE - 0x100000); - delete[] rom; - } else { - if (strncmp((char *)rom, "", 11) == 0) { - // CHRP compressed ROM image - D(bug("CHRP ROM image\n")); - uint32 lzss_offset, lzss_size; - - char *s = strstr((char *)rom, "constant lzss-offset"); - if (s == NULL) - throw rom_size_error(); - s -= 7; - if (sscanf(s, "%06lx", &lzss_offset) != 1) - throw rom_size_error(); - s = strstr((char *)rom, "constant lzss-size"); - if (s == NULL) - throw rom_size_error(); - s -= 7; - if (sscanf(s, "%06lx", &lzss_size) != 1) - throw rom_size_error(); - D(bug("Offset of compressed data: %08lx\n", lzss_offset)); - D(bug("Size of compressed data: %08lx\n", lzss_size)); - - D(bug("Uncompressing ROM...\n")); - uint8 *decoded = new uint8[ROM_SIZE]; - decode_lzss(rom + lzss_offset, decoded, lzss_size); - memcpy((void *)(ROM_BASE + 0x100000), decoded + 0x100000, ROM_SIZE - 0x100000); - delete[] decoded; - delete[] rom; - } else if (rom_size != 4*1024*1024) - throw rom_size_error(); - else - throw file_read_error(); - } -} - - -/* - * Patch PowerMac ROM - */ - -// ROM type -enum { - ROMTYPE_TNT, - ROMTYPE_ALCHEMY, - ROMTYPE_ZANZIBAR, - ROMTYPE_GAZELLE, - ROMTYPE_NEWWORLD -}; -static int ROMType; - -// Nanokernel boot routine patches -static bool patch_nanokernel_boot(void) -{ - uint32 *lp; - int i; - - // Patch ConfigInfo - lp = (uint32 *)(ROM_BASE + 0x30d000); - lp[0x9c >> 2] = KernelDataAddr; // LA_InfoRecord - lp[0xa0 >> 2] = KernelDataAddr; // LA_KernelData - lp[0xa4 >> 2] = KernelDataAddr + 0x1000;// LA_EmulatorData - lp[0xa8 >> 2] = ROM_BASE + 0x480000; // LA_DispatchTable - lp[0xac >> 2] = ROM_BASE + 0x460000; // LA_EmulatorCode - lp[0x360 >> 2] = 0; // Physical RAM base (? on NewWorld ROM, this contains -1) - lp[0xfd8 >> 2] = ROM_BASE + 0x2a; // 68k reset vector - - // Skip SR/BAT/SDR init - if (ROMType == ROMTYPE_GAZELLE || ROMType == ROMTYPE_NEWWORLD) { - lp = (uint32 *)(ROM_BASE + 0x310000); - *lp++ = POWERPC_NOP; - *lp = 0x38000000; - } - static const uint32 sr_init_loc[] = {0x3101b0, 0x3101b0, 0x3101b0, 0x3101ec, 0x310200}; - lp = (uint32 *)(ROM_BASE + 0x310008); - *lp = 0x48000000 | (sr_init_loc[ROMType] - 8) & 0xffff; // b ROM_BASE+0x3101b0 - lp = (uint32 *)(ROM_BASE + sr_init_loc[ROMType]); - *lp++ = 0x80200000 + XLM_KERNEL_DATA; // lwz r1,(pointer to Kernel Data) - *lp++ = 0x3da0dead; // lis r13,0xdead (start of kernel memory) - *lp++ = 0x3dc00010; // lis r14,0x0010 (size of page table) - *lp = 0x3de00010; // lis r15,0x0010 (size of kernel memory) - - // Don't read PVR - static const uint32 pvr_loc[] = {0x3103b0, 0x3103b4, 0x3103b4, 0x310400, 0x310438}; - lp = (uint32 *)(ROM_BASE + pvr_loc[ROMType]); - *lp = 0x81800000 + XLM_PVR; // lwz r12,(theoretical PVR) - - // Set CPU specific data (even if ROM doesn't have support for that CPU) - lp = (uint32 *)(ROM_BASE + pvr_loc[ROMType]); - if (ntohl(lp[6]) != 0x2c0c0001) - return false; - uint32 ofs = lp[7] & 0xffff; - lp[8] = (lp[8] & 0xffff) | 0x48000000; // beq -> b - uint32 loc = (lp[8] & 0xffff) + (uint32)(lp+8) - ROM_BASE; - lp = (uint32 *)(ROM_BASE + ofs + 0x310000); - switch (PVR >> 16) { - case 1: // 601 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00010040; // Unified caches/Inst cache line size - lp[5] = 0x00400020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x01000002; // TLB total size/TLB assoc - break; - case 3: // 603 - lp[0] = 0x1000; // Page size - lp[1] = 0x2000; // Data cache size - lp[2] = 0x2000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00020002; // Inst cache assoc/Data cache assoc - lp[8] = 0x00400002; // TLB total size/TLB assoc - break; - case 4: // 604 - lp[0] = 0x1000; // Page size - lp[1] = 0x4000; // Data cache size - lp[2] = 0x4000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; -// case 5: // 740? - case 6: // 603e - case 7: // 603ev - lp[0] = 0x1000; // Page size - lp[1] = 0x4000; // Data cache size - lp[2] = 0x4000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00400002; // TLB total size/TLB assoc - break; - case 8: // 750 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; - case 9: // 604e - case 10: // 604ev5 - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00040004; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; -// case 11: // X704? - case 12: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800002; // TLB total size/TLB assoc - break; - case 13: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00000020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x01000004; // TLB total size/TLB assoc - break; -// case 50: // 821 -// case 80: // 860 - case 96: // ??? - lp[0] = 0x1000; // Page size - lp[1] = 0x8000; // Data cache size - lp[2] = 0x8000; // Inst cache size - lp[3] = 0x00200020; // Coherency block size/Reservation granule size - lp[4] = 0x00010020; // Unified caches/Inst cache line size - lp[5] = 0x00200020; // Data cache line size/Data cache block size touch - lp[6] = 0x00200020; // Inst cache block size/Data cache block size - lp[7] = 0x00080008; // Inst cache assoc/Data cache assoc - lp[8] = 0x00800004; // TLB total size/TLB assoc - break; - default: - printf("WARNING: Unknown CPU type\n"); - break; - } - - // Don't set SPRG3, don't test MQ - lp = (uint32 *)(ROM_BASE + loc + 0x20); - *lp++ = POWERPC_NOP; - lp++; - *lp++ = POWERPC_NOP; - lp++; - *lp = POWERPC_NOP; - - // Don't read MSR - lp = (uint32 *)(ROM_BASE + loc + 0x40); - *lp = 0x39c00000; // li r14,0 - - // Don't write to DEC - lp = (uint32 *)(ROM_BASE + loc + 0x70); - *lp++ = POWERPC_NOP; - loc = (lp[0] & 0xffff) + (uint32)lp - ROM_BASE; - - // Don't set SPRG3 - lp = (uint32 *)(ROM_BASE + loc + 0x2c); - *lp = POWERPC_NOP; - - // Don't read PVR - static const uint32 pvr_ofs[] = {0x138, 0x138, 0x138, 0x140, 0x148}; - lp = (uint32 *)(ROM_BASE + loc + pvr_ofs[ROMType]); - *lp = 0x82e00000 + XLM_PVR; // lwz r23,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + loc + 0x170); - if (*lp == 0x7eff42a6) // NewWorld ROM - *lp = 0x82e00000 + XLM_PVR; // lwz r23,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + 0x313134); - if (*lp == 0x7e5f42a6) - *lp = 0x82400000 + XLM_PVR; // lwz r18,(theoretical PVR) - lp = (uint32 *)(ROM_BASE + 0x3131f4); - if (*lp == 0x7e5f42a6) // NewWorld ROM - *lp = 0x82400000 + XLM_PVR; // lwz r18,(theoretical PVR) - - // Don't read SDR1 - static const uint32 sdr1_ofs[] = {0x174, 0x174, 0x174, 0x17c, 0x19c}; - lp = (uint32 *)(ROM_BASE + loc + sdr1_ofs[ROMType]); - *lp++ = 0x3d00dead; // lis r8,0xdead (pointer to page table) - *lp++ = 0x3ec0001f; // lis r22,0x001f (size of page table) - *lp = POWERPC_NOP; - - // Don't clear page table - static const uint32 pgtb_ofs[] = {0x198, 0x198, 0x198, 0x1a0, 0x1c4}; - lp = (uint32 *)(ROM_BASE + loc + pgtb_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't invalidate TLB - static const uint32 tlb_ofs[] = {0x1a0, 0x1a0, 0x1a0, 0x1a8, 0x1cc}; - lp = (uint32 *)(ROM_BASE + loc + tlb_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't create RAM descriptor table - static const uint32 desc_ofs[] = {0x350, 0x350, 0x350, 0x358, 0x37c}; - lp = (uint32 *)(ROM_BASE + loc + desc_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't load SRs and BATs - static const uint32 sr_ofs[] = {0x3d8, 0x3d8, 0x3d8, 0x3e0, 0x404}; - lp = (uint32 *)(ROM_BASE + loc + sr_ofs[ROMType]); - *lp = POWERPC_NOP; - - // Don't mess with SRs - static const uint32 sr2_ofs[] = {0x312118, 0x312118, 0x312118, 0x312118, 0x3121b4}; - lp = (uint32 *)(ROM_BASE + sr2_ofs[ROMType]); - *lp = POWERPC_BLR; - - // Don't check performance monitor - static const uint32 pm_ofs[] = {0x313148, 0x313148, 0x313148, 0x313148, 0x313218}; - lp = (uint32 *)(ROM_BASE + pm_ofs[ROMType]); - while (*lp != 0x7e58eba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e78eaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e59eba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e79eaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5aeba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7aeaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5beba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7beaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5feba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7feaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5ceba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7ceaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5deba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7deaa6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e5eeba6) lp++; - *lp++ = POWERPC_NOP; - while (*lp != 0x7e7eeaa6) lp++; - *lp++ = POWERPC_NOP; - - // Jump to 68k emulator - static const uint32 jump68k_ofs[] = {0x40c, 0x40c, 0x40c, 0x414, 0x438}; - lp = (uint32 *)(ROM_BASE + loc + jump68k_ofs[ROMType]); - *lp++ = 0x80610634; // lwz r3,0x0634(r1) (pointer to Emulator Data) - *lp++ = 0x8081119c; // lwz r4,0x119c(r1) (pointer to opcode table) - *lp++ = 0x80011184; // lwz r0,0x1184(r1) (pointer to emulator entry) - *lp++ = 0x7c0903a6; // mtctr r0 - *lp = POWERPC_BCTR; - return true; -} - -// 68k emulator patches -static bool patch_68k_emul(void) -{ - uint32 *lp; - uint32 base; - - // Overwrite twi instructions - static const uint32 twi_loc[] = {0x36e680, 0x36e6c0, 0x36e6c0, 0x36e6c0, 0x36e740}; - base = twi_loc[ROMType]; - lp = (uint32 *)(ROM_BASE + base); - *lp++ = 0x48000000 + 0x36f900 - base; // b 0x36f900 (Emulator start) - *lp++ = POWERPC_ILLEGAL; - *lp++ = 0x48000000 + 0x36fb00 - base - 8; // b 0x36fb00 (Reset opcode) - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - *lp++ = POWERPC_ILLEGAL; - - // Set reset stack pointer - lp = (uint32 *)(ROM_BASE + base + 0xf0); - *lp++ = 0x80200000 + XLM_RESET_STACK; // lwz r1,XLM_RESET_STACK - - // Install EXEC_RETURN and EMUL_OP opcodes - lp = (uint32 *)(ROM_BASE + 0x380000 + (M68K_EXEC_RETURN << 3)); - *lp++ = 0x80000000 + XLM_EXEC_RETURN_PROC; // lwz r0,XLM_EXEC_RETURN_PROC - *lp++ = 0x4bfb6ffc; // b 0x36f800 - for (int i=0; i> 16); // lis r0,xxx - *lp++ = 0x60000000 + ((ROM_BASE + 0x46d0a4) & 0xffff); // ori r0,r0,xxx - *lp++ = 0x7c0903a6; // mtctr r0 - *lp = POWERPC_BCTR; // bctr - return true; -} - -// Nanokernel patches -static bool patch_nanokernel(void) -{ - uint32 *lp; - - // Patch 68k emulator trap routine - lp = (uint32 *)(ROM_BASE + 0x312994); // Always restore FPU state - while (*lp != 0x39260040) lp++; - lp--; - *lp = 0x48000441; // bl 0x00312dd4 - lp = (uint32 *)(ROM_BASE + 0x312dd8); // Don't modify MSR to turn on FPU - while (*lp != 0x810600e4) lp++; - lp--; - *lp++ = POWERPC_NOP; - lp += 2; - *lp++ = POWERPC_NOP; - lp++; - *lp++ = POWERPC_NOP; - *lp++ = POWERPC_NOP; - *lp = POWERPC_NOP; - - // Patch trap return routine - lp = (uint32 *)(ROM_BASE + 0x312c20); - while (*lp != 0x7d5a03a6) lp++; - *lp++ = 0x7d4903a6; // mtctr r10 - *lp++ = 0x7daff120; // mtcr r13 - *lp++ = 0x48000000 + 0x8000 - ((uint32)lp & 0xffff); // b ROM_BASE+0x318000 - uint32 xlp = (uint32)lp & 0xffff; - - lp = (uint32 *)(ROM_BASE + 0x312c50); // Replace rfi - while (*lp != 0x4c000064) lp++; - *lp = POWERPC_BCTR; - - lp = (uint32 *)(ROM_BASE + 0x318000); - *lp++ = 0x81400000 + XLM_IRQ_NEST; // lwz r10,XLM_IRQ_NEST - *lp++ = 0x394affff; // subi r10,r10,1 - *lp++ = 0x91400000 + XLM_IRQ_NEST; // stw r10,XLM_IRQ_NEST - *lp = 0x48000000 + ((xlp - 0x800c) & 0x03fffffc); // b ROM_BASE+0x312c2c - return true; -} - -static bool patch_rom(void) -{ - // Detect ROM type - if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot TNT", 8)) - ROMType = ROMTYPE_TNT; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Alchemy", 12)) - ROMType = ROMTYPE_ALCHEMY; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Zanzibar", 13)) - ROMType = ROMTYPE_ZANZIBAR; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "Boot Gazelle", 12)) - ROMType = ROMTYPE_GAZELLE; - else if (!memcmp((void *)(ROM_BASE + 0x30d064), "NewWorld", 8)) - ROMType = ROMTYPE_NEWWORLD; - else - return false; - - // Apply patches - if (!patch_nanokernel_boot()) return false; - if (!patch_68k_emul()) return false; - if (!patch_nanokernel()) return false; - - // Copy 68k emulator to 2MB boundary - memcpy((void *)(ROM_BASE + ROM_SIZE), (void *)(ROM_BASE + ROM_SIZE - 0x100000), 0x100000); - return true; -} - - -/* - * Initialize 680x0 emulation - */ - -static asm void *get_toc(void) -{ - mr r3,r2 - blr -} - -bool Init680x0(void) -{ - char str[256]; - - // Mac address space = host address space - RAMBaseMac = (uint32)RAMBaseHost; - ROMBaseMac = (uint32)ROMBaseHost; - - // Get TOC pointer - TOC = get_toc(); - - // Get system info - get_system_info(&SysInfo); - switch (SysInfo.cpu_type) { - case B_CPU_PPC_601: - PVR = 0x00010000; - break; - case B_CPU_PPC_603: - PVR = 0x00030000; - break; - case B_CPU_PPC_603e: - PVR = 0x00060000; - break; - case B_CPU_PPC_604: - PVR = 0x00040000; - break; - case B_CPU_PPC_604e: - PVR = 0x00090000; - break; - default: - PVR = 0x00040000; - break; - } - CPUClockSpeed = SysInfo.cpu_clock_speed; - BusClockSpeed = SysInfo.bus_clock_speed; - - // Delete old areas - area_id old_kernel_area = find_area(KERNEL_AREA_NAME); - if (old_kernel_area > 0) - delete_area(old_kernel_area); - area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); - if (old_dr_cache_area > 0) - delete_area(old_dr_cache_area); - - // Create area for Kernel Data - kernel_data = (KernelData *)0x68ffe000; - kernel_area = create_area(KERNEL_AREA_NAME, &kernel_data, B_EXACT_ADDRESS, 0x2000, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (kernel_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area), kernel_area); - ErrorAlert(str); - return false; - } - emulator_data = &kernel_data->ed; - KernelDataAddr = (uint32)kernel_data; - D(bug("Kernel Data area %ld at %p, Emulator Data at %p\n", kernel_area, kernel_data, emulator_data)); - - // Load PowerMac ROM (upper 3MB) - try { - load_rom(); - } catch (file_open_error) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - return false; - } catch (file_read_error) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - return false; - } catch (rom_size_error) { - ErrorAlert(STR_ROM_SIZE_ERR); - return false; - } - - // Install ROM patches - if (!patch_rom()) { - ErrorAlert("Unsupported PowerMac ROM version"); - return false; - } - - // Create area for DR Cache - DRCacheAddr = DR_CACHE_BASE; - dr_cache_area = create_area(DR_CACHE_AREA_NAME, (void **)&DRCacheAddr, B_EXACT_ADDRESS, DR_CACHE_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_cache_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_cache_area), dr_cache_area); - ErrorAlert(str); - return false; - } - D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); - - // Initialize Kernel Data - memset(kernel_data, 0, sizeof(KernelData)); - if (ROMType == ROMTYPE_NEWWORLD) { - kernel_data->v[0xc20 >> 2] = RAMSize; - kernel_data->v[0xc24 >> 2] = RAMSize; - kernel_data->v[0xc30 >> 2] = RAMSize; - kernel_data->v[0xc34 >> 2] = RAMSize; - kernel_data->v[0xc38 >> 2] = 0x00010020; - kernel_data->v[0xc3c >> 2] = 0x00200001; - kernel_data->v[0xc40 >> 2] = 0x00010000; - kernel_data->v[0xc50 >> 2] = RAMBaseMac; - kernel_data->v[0xc54 >> 2] = RAMSize; - kernel_data->v[0xf60 >> 2] = PVR; - kernel_data->v[0xf64 >> 2] = CPUClockSpeed; - kernel_data->v[0xf68 >> 2] = BusClockSpeed; - kernel_data->v[0xf6c >> 2] = CPUClockSpeed; - } else { - kernel_data->v[0xc80 >> 2] = RAMSize; - kernel_data->v[0xc84 >> 2] = RAMSize; - kernel_data->v[0xc90 >> 2] = RAMSize; - kernel_data->v[0xc94 >> 2] = RAMSize; - kernel_data->v[0xc98 >> 2] = 0x00010020; - kernel_data->v[0xc9c >> 2] = 0x00200001; - kernel_data->v[0xca0 >> 2] = 0x00010000; - kernel_data->v[0xcb0 >> 2] = RAMBaseMac; - kernel_data->v[0xcb4 >> 2] = RAMSize; - kernel_data->v[0xf80 >> 2] = PVR; - kernel_data->v[0xf84 >> 2] = CPUClockSpeed; - kernel_data->v[0xf88 >> 2] = BusClockSpeed; - kernel_data->v[0xf8c >> 2] = CPUClockSpeed; - } - - // Initialize extra low memory - memset((void *)0x2000, 0, 0x1000); - *(uint32 *)XLM_RESET_STACK = 0x2000; // Reset stack pointer - *(KernelData **)XLM_KERNEL_DATA = kernel_data;// For trap replacement routines - *(void **)XLM_TOC = TOC; // TOC pointer of emulator - *(uint32 *)XLM_PVR = PVR; // Theoretical PVR - - // Clear caches (as we loaded and patched code) - clear_caches((void *)ROM_BASE, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); - return true; -} - - -/* - * Deinitialize 680x0 emulation - */ - -void Exit680x0(void) -{ - // Delete DR Cache area - if (dr_cache_area >= 0) - delete_area(dr_cache_area); - - // Delete Kernel Data area - if (kernel_area >= 0) - delete_area(kernel_area); -} - - -/* - * Quit emulator (must only be called from main thread) - */ - -asm void QuitEmulator(void) -{ - lwz r0,XLM_EMUL_RETURN_PROC - mtlr r0 - blr -} - - -/* - * Reset and start 680x0 emulation - */ - -static asm void jump_to_rom(register uint32 entry) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - mfcr r0 - stw r0,4(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) - - // Move entry address to ctr, get pointer to Emulator Data - mtctr r3 - lwz r3,emulator_data(r2) - - // Skip over EMUL_RETURN routine and get its address - bl @1 - - - /* - * EMUL_RETURN: Returned from emulator - */ - - // Restore PowerPC registers - lwz r1,XLM_EMUL_RETURN_STACK - lwz r2,XLM_TOC - lmw r13,56(r1) - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) - - // Exiting from 68k emulator - li r0,1 - stw r0,XLM_IRQ_NEST - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Return to caller of jump_to_rom() - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - lwz r0,56+19*4+18*8+4(r1) - mtcrf 0xff,r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Save address of EMUL_RETURN routine for 68k emulator patch -@1 mflr r0 - stw r0,XLM_EMUL_RETURN_PROC - - // Skip over EXEC_RETURN routine and get its address - bl @2 - - - /* - * EXEC_RETURN: Returned from 68k routine executed with Execute68k() - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Reentering EMUL_OP mode - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Save 68k registers - lwz r4,56+19*4+18*8+12(r1) - stw r8,M68kRegisters.d[0](r4) - stw r9,M68kRegisters.d[1](r4) - stw r10,M68kRegisters.d[2](r4) - stw r11,M68kRegisters.d[3](r4) - stw r12,M68kRegisters.d[4](r4) - stw r13,M68kRegisters.d[5](r4) - stw r14,M68kRegisters.d[6](r4) - stw r15,M68kRegisters.d[7](r4) - stw r16,M68kRegisters.a[0](r4) - stw r17,M68kRegisters.a[1](r4) - stw r18,M68kRegisters.a[2](r4) - stw r19,M68kRegisters.a[3](r4) - stw r20,M68kRegisters.a[4](r4) - stw r21,M68kRegisters.a[5](r4) - stw r22,M68kRegisters.a[6](r4) - - // Restore PowerPC registers - lmw r13,56(r1) -#if SAVE_FP_EXEC_68K - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) -#endif - - // Return to caller - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Stave address of EXEC_RETURN routine for 68k emulator patch -@2 mflr r0 - stw r0,XLM_EXEC_RETURN_PROC - - // Skip over EMUL_OP routine and get its address - bl @3 - - - /* - * EMUL_OP: Execute native routine, selector in r5 (my own private mode switch) - * - * 68k registers are stored in a M68kRegisters struct on the stack - * which the native routine may read and modify - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Entering EMUL_OP mode within 68k emulator - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Create PowerPC stack frame, reserve space for M68kRegisters - mr r3,r1 - subi r1,r1,56 // Fake "caller" frame - rlwinm r1,r1,0,0,29 // Align stack - - mfcr r0 - rlwinm r0,r0,0,11,8 - stw r0,4(r1) - mfxer r0 - stw r0,16(r1) - stw r2,12(r1) - stwu r1,-(56+16*4+15*8)(r1) - lwz r2,XLM_TOC - - // Save 68k registers - stw r8,56+M68kRegisters.d[0](r1) - stw r9,56+M68kRegisters.d[1](r1) - stw r10,56+M68kRegisters.d[2](r1) - stw r11,56+M68kRegisters.d[3](r1) - stw r12,56+M68kRegisters.d[4](r1) - stw r13,56+M68kRegisters.d[5](r1) - stw r14,56+M68kRegisters.d[6](r1) - stw r15,56+M68kRegisters.d[7](r1) - stw r16,56+M68kRegisters.a[0](r1) - stw r17,56+M68kRegisters.a[1](r1) - stw r18,56+M68kRegisters.a[2](r1) - stw r19,56+M68kRegisters.a[3](r1) - stw r20,56+M68kRegisters.a[4](r1) - stw r21,56+M68kRegisters.a[5](r1) - stw r22,56+M68kRegisters.a[6](r1) - stw r3,56+M68kRegisters.a[7](r1) - stfd f0,56+16*4+0*8(r1) - stfd f1,56+16*4+1*8(r1) - stfd f2,56+16*4+2*8(r1) - stfd f3,56+16*4+3*8(r1) - stfd f4,56+16*4+4*8(r1) - stfd f5,56+16*4+5*8(r1) - stfd f6,56+16*4+6*8(r1) - stfd f7,56+16*4+7*8(r1) - mffs f0 - stfd f8,56+16*4+8*8(r1) - stfd f9,56+16*4+9*8(r1) - stfd f10,56+16*4+10*8(r1) - stfd f11,56+16*4+11*8(r1) - stfd f12,56+16*4+12*8(r1) - stfd f13,56+16*4+13*8(r1) - stfd f0,56+16*4+14*8(r1) - - // Execute native routine - mr r3,r5 - addi r4,r1,56 - bl EmulOp - - // Restore 68k registers - lwz r8,56+M68kRegisters.d[0](r1) - lwz r9,56+M68kRegisters.d[1](r1) - lwz r10,56+M68kRegisters.d[2](r1) - lwz r11,56+M68kRegisters.d[3](r1) - lwz r12,56+M68kRegisters.d[4](r1) - lwz r13,56+M68kRegisters.d[5](r1) - lwz r14,56+M68kRegisters.d[6](r1) - lwz r15,56+M68kRegisters.d[7](r1) - lwz r16,56+M68kRegisters.a[0](r1) - lwz r17,56+M68kRegisters.a[1](r1) - lwz r18,56+M68kRegisters.a[2](r1) - lwz r19,56+M68kRegisters.a[3](r1) - lwz r20,56+M68kRegisters.a[4](r1) - lwz r21,56+M68kRegisters.a[5](r1) - lwz r22,56+M68kRegisters.a[6](r1) - lwz r3,56+M68kRegisters.a[7](r1) - lfd f13,56+16*4+14*8(r1) - lfd f0,56+16*4+0*8(r1) - lfd f1,56+16*4+1*8(r1) - lfd f2,56+16*4+2*8(r1) - lfd f3,56+16*4+3*8(r1) - lfd f4,56+16*4+4*8(r1) - lfd f5,56+16*4+5*8(r1) - lfd f6,56+16*4+6*8(r1) - lfd f7,56+16*4+7*8(r1) - mtfsf 0xff,f13 - lfd f8,56+16*4+8*8(r1) - lfd f9,56+16*4+9*8(r1) - lfd f10,56+16*4+10*8(r1) - lfd f11,56+16*4+11*8(r1) - lfd f12,56+16*4+12*8(r1) - lfd f13,56+16*4+13*8(r1) - - // Delete PowerPC stack frame - lwz r2,56+16*4+15*8+12(r1) - lwz r0,56+16*4+15*8+16(r1) - mtxer r0 - lwz r0,56+16*4+15*8+4(r1) - mtcrf 0xff,r0 - mr r1,r3 - - // Reeintering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute next 68k opcode - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - - // Save address of EMUL_OP routine for 68k emulator patch -@3 mflr r0 - stw r0,XLM_EMUL_OP_PROC - - // Save stack pointer for EMUL_RETURN - stw r1,XLM_EMUL_RETURN_STACK - - // Preset registers for ROM boot routine - lis r3,0x40b0 // Pointer to ROM boot structure - ori r3,r3,0xd000 - - // 68k emulator is now active - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Jump to ROM - bctr -} - -void Start680x0(void) -{ - // Install interrupt signal handler - sigemptyset(&sigusr1_action.sa_mask); - sigusr1_action.sa_handler = (__signal_func_ptr)(sigusr1_handler); - sigusr1_action.sa_flags = 0; - sigusr1_action.sa_userdata = NULL; - sigaction(SIGUSR1, &sigusr1_action, NULL); - - // Install signal stack - set_signal_stack(malloc(SIG_STACK_SIZE), SIG_STACK_SIZE); - - // We're now ready to receive signals - ReadyForSignals = true; - - D(bug("Jumping to ROM\n")); - jump_to_rom(ROM_BASE + 0x310000); - D(bug("Returned from ROM\n")); - - // We're no longer ready to receive signals - ReadyForSignals = false; -} - - -/* - * Trigger interrupt - */ - -void TriggerInterrupt(void) -{ - idle_resume(); - if (emul_thread > 0 && ReadyForSignals) - send_signal(emul_thread, SIGUSR1); -} - -void TriggerNMI(void) -{ - //!! not implemented yet -} - - -/* - * Execute 68k subroutine - * r->a[7] and r->sr are unused! - */ - -static asm void execute_68k(register uint32 addr, register M68kRegisters *r) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stw r4,12(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) -#if SAVE_FP_EXEC_68K - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) -#endif - - // Set up registers for 68k emulator - lwz r31,XLM_KERNEL_DATA // Pointer to Kernel Data - addi r31,r31,0x1000 // points to Emulator Data - li r0,0 - mtcrf 0xff,r0 - creqv 11,11,11 // Supervisor mode - lwz r8,M68kRegisters.d[0](r4) - lwz r9,M68kRegisters.d[1](r4) - lwz r10,M68kRegisters.d[2](r4) - lwz r11,M68kRegisters.d[3](r4) - lwz r12,M68kRegisters.d[4](r4) - lwz r13,M68kRegisters.d[5](r4) - lwz r14,M68kRegisters.d[6](r4) - lwz r15,M68kRegisters.d[7](r4) - lwz r16,M68kRegisters.a[0](r4) - lwz r17,M68kRegisters.a[1](r4) - lwz r18,M68kRegisters.a[2](r4) - lwz r19,M68kRegisters.a[3](r4) - lwz r20,M68kRegisters.a[4](r4) - lwz r21,M68kRegisters.a[5](r4) - lwz r22,M68kRegisters.a[6](r4) - li r23,0 - mr r24,r3 - lwz r25,XLM_68K_R25 // MSB of SR - li r26,0 - li r28,0 // VBR - lwz r29,0x74(r31) // Pointer to opcode table - lwz r30,0x78(r31) // Address of emulator - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute 68k opcode - lha r27,0(r24) - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr -} - -void Execute68k(uint32 addr, M68kRegisters *r) -{ - uint16 proc[4] = {M68K_JSR, addr >> 16, addr & 0xffff, M68K_EXEC_RETURN}; - execute_68k((uint32)proc, r); -} - - -/* - * Execute MacOS 68k trap - * r->a[7] and r->sr are unused! - */ - -void Execute68kTrap(uint16 trap, struct M68kRegisters *r) -{ - uint16 proc[2] = {trap, M68K_EXEC_RETURN}; - execute_68k((uint32)proc, r); -} - - -/* - * USR1 handler - */ - -static void sigusr1_handler(int sig, void *arg, vregs *r) -{ - // Do nothing if interrupts are disabled - if ((*(int32 *)XLM_IRQ_NEST) > 0) - return; - - // 68k emulator active? Then trigger 68k interrupt level 1 - if (*(uint32 *)XLM_RUN_MODE == MODE_68K) { - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - r->cr |= kernel_data->v[0x674 >> 2]; - } -} diff --git a/BasiliskII/src/rom_patches.cpp b/BasiliskII/src/rom_patches.cpp index fdedf5e2f..5cfb13e20 100644 --- a/BasiliskII/src/rom_patches.cpp +++ b/BasiliskII/src/rom_patches.cpp @@ -1040,7 +1040,7 @@ static bool patch_rom_32(void) if (PatchHWBases) { extern uint8 *ScratchMem; const uint32 ScratchMemBase = Host2MacAddr(ScratchMem); - + D(bug("LMGlob\tOfs/4\tBase\n")); base = ROMBaseMac + UniversalInfo + ReadMacInt32(ROMBaseMac + UniversalInfo); // decoderInfoPtr wp = (uint16 *)(ROMBaseHost + 0x94a); @@ -1048,7 +1048,7 @@ static bool patch_rom_32(void) int16 ofs = ntohs(*wp++); // offset in decoderInfo (/4) int16 lmg = ntohs(*wp++); // address of LowMem global D(bug("0x%04x\t%d\t0x%08x\n", lmg, ofs, ReadMacInt32(base + ofs*4))); - + // Fake address only if this is not the ASC base if (lmg != 0xcc0) WriteMacInt32(base + ofs*4, ScratchMemBase); @@ -1280,20 +1280,13 @@ static bool patch_rom_32(void) #endif #endif -#if REAL_ADDRESSING && defined(AMIGA) - // Don't overwrite SysBase under AmigaOS - wp = (uint16 *)(ROMBaseHost + 0xccb4); - *wp++ = htons(M68K_NOP); - *wp = htons(M68K_NOP); -#endif - -#if REAL_ADDRESSING && !defined(AMIGA) +#if REAL_ADDRESSING // gb-- Temporary hack to get rid of crashes in Speedometer wp = (uint16 *)(ROMBaseHost + 0xdba2); if (ntohs(*wp) == 0x662c) // bne.b #$2c *wp = htons(0x602c); // bra.b #$2c #endif - + // Don't write to VIA in InitTimeMgr wp = (uint16 *)(ROMBaseHost + 0xb0e2); *wp++ = htons(0x4cdf); // movem.l (sp)+,d0-d5/a0-a4 diff --git a/BasiliskII/src/sony.cpp b/BasiliskII/src/sony.cpp index 804239b78..a8d8220d8 100644 --- a/BasiliskII/src/sony.cpp +++ b/BasiliskII/src/sony.cpp @@ -50,11 +50,7 @@ using std::vector; // Check for inserted disks by polling? -#ifdef AMIGA -#define DISK_INSERT_CHECK 1 -#else #define DISK_INSERT_CHECK 0 -#endif // Floppy disk icon diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index 1e608b27d..d15cf01d9 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -33,11 +33,7 @@ #include "sysdeps.h" #include "user_strings.h" -#ifdef __BEOS__ -#define ELLIPSIS "\xE2\x80\xA6" -#else #define ELLIPSIS "..." -#endif // Common string definitions diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index 0a511ff3a..eaf2cab19 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -59,9 +59,6 @@ links: include/prefs.h include/scsi.h include/serial.h \ include/serial_defs.h include/sony.h include/sys.h \ include/timer.h include/xpram.h \ - BeOS/audio_beos.cpp BeOS/extfs_beos.cpp BeOS/scsi_beos.cpp \ - BeOS/serial_beos.cpp BeOS/sys_beos.cpp BeOS/timer_beos.cpp \ - BeOS/xpram_beos.cpp BeOS/SheepDriver BeOS/SheepNet \ CrossPlatform/sigsegv.h CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ CrossPlatform/video_vosf.h CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ Unix/audio_oss_esd.cpp \ diff --git a/SheepShaver/doc/BeOS/acknowledgements.html b/SheepShaver/doc/BeOS/acknowledgements.html deleted file mode 100644 index 204e8d207..000000000 --- a/SheepShaver/doc/BeOS/acknowledgements.html +++ /dev/null @@ -1,24 +0,0 @@ - - -Acknowledgements - - - -

    Acknowledgements

    - -The following persons/companies deserve special thanks from us as they -made a significant contribution to the development of SheepShaver: - -

    -

     - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/contact.html b/SheepShaver/doc/BeOS/contact.html deleted file mode 100644 index b4c000750..000000000 --- a/SheepShaver/doc/BeOS/contact.html +++ /dev/null @@ -1,47 +0,0 @@ - - -Contact Information - - - -

    Contact Information and Copyright

    - -SheepShaver was brought to you by - - -

    SheepShaver WWW Site:

    -
    -www.sheepshaver.com
    -
    - -

    EMail:

    -
    -Christian.Bauer@uni-mainz.de
    -
    - -

    License

    - -

    SheepShaver is available under the terms of the GNU General Public License. -See the file "COPYING" that is included in the distribution for details. - -

    © Copyright 1997-2004 Christian Bauer and Marc Hellwig - -

    Names of hardware and software items mentioned in this manual and -in program texts are in most cases registered trade marks of the respective -companies and not marked as such. So the lack of such a note may not be -used as an indication that these names are free. - -

    SheepShaver is not designed, intended, or authorized for use as a component -in systems intended for surgical implant within the body, or other applications intended -to support or sustain life, or for any other application in which the failure of SheepShaver -could create a situation where personal injury or death may occur (so-called "killer application"). - -

    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/graphics.gif b/SheepShaver/doc/BeOS/graphics.gif deleted file mode 100644 index 10a33553808ea9b69dd054448f4fe53f5cb227ee..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 8854 zcmV;HB5B=6Nk%w1VVeO{0mJ|R|NsC0|7QRHGymg8|H}aXuM_C#=-AlU%a{Pbz`(e; zxS*h*n3$NDm;jh&0Emc)fPjE_cz9-J0AOHXSXfv41ejEjAQkdcy;k%kSIn3(Lsq@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQhriDRYJ)83GB%B&c~Ab0r215)`6TDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!4V+z2c&8)CuV5jGB*&(JNjyd`I6%q}1JGw#Wx~94 zG-2GT$JDab;C7}lw=k8-g}6&eaU|b97XWQ`7(xwP zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnIG~Vg zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#C@!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJip%Id7N)@tjmxaO+suDtf@>#xA78Y=^uK49#z$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7AxxmmzHbpx#*^=?z-%@>+ZY69x!aN3>aYV zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDGZQ0zfCN z^wLbPEHt@9d#V8gn=+t*s8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(wFY(19l>r_AylFJ$K-FbGmijS6h8R1Q-Z@Q{;lD zjrixFhc34NxGuw8GzL^tmpSL0?=3m&f&Wdx+@jZRd+3Uv&3f6dM~*h^St~$+1`*tD z{PAq(E_LIUPhIuoT1Wpo<_ajVIpL5aul@E)E8pqh*dM*A1zD5td+&eqef8knx9>jB z-e>Ij`}EhZa{RwqP`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ zjRFz%Wjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9J&^1u|OH$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!EI`dq z<&>9dy&T?J`&xo(fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)CIdAq6?wQ$ckI(P6Ls56jp;qe>&K&q!=eiZ$1;EVi=UhgxAT``OxSHnJ%S?P`lo+VT?FsD^FrZfiQ&(+;b* z$9?N#XWM1lCbzmH3GQ>}kd5n(cc9xnF;T)Bj4x!hyn%)7dXMyuTC5ku0Hy$a@7vDw z*7m)tNVba={ND%XSicqCs(_o$Vh@kFr4x?sg;TNN7XBmulrKmpI4&UtUO4Igh>ntfoQt zDs_NjdBLo`70C4_vcuN10heS3uSThrb}m$F11 zGsse|QI;08@6QB#*yX%*vcp_=r1jlj2`u8gVmO(6?cLTW%U#LYb)kMQdfR^va_LPN z^SeC&1`54Xkq=(%g}3+NN5$SD_m;SKRo_3w8{6+{ZMn1UvezxwT*>1;Rh`eK*X4@3 z8BgH&ixm9ngEe;5H{Dc!D_-=8E8@VG6~idj{DYs2S);o)du?YK-y1*t$VDBR$ETa= zmw&P5<6PWF58vEe-#58y-<@xNY1_5z2x8;+6s}g+w_V;(OWntg5e(cA5srPk9bJ`FBpZ=)DMDaN2D~0z13HZB|X{Y zVqGSA9u`_0mUzCii@w-bm)D9a!-v#{g_UTDw75+FMO&LFeArcVxz&3xC3|KAKD}sk zK9yD9cw?bQQG*|yxC3LzDKAx$@ph0aDLAOLg)Z4`Fo|Xg@B=l;emA+3HQAFsS&~2*l;=2< zMA?c)d6asXluF5kOxcu9_>@q2gi<+`L0FalR@s7BsYM*5G+miAUkPa^d4|N6g*Ql( zC1aL0h?XRymNm$h9kZ2Gg?$N@k*ShCv=dHs69J^BmmEnvq^B`qsFHB$F@vcCF*!4b znFEOlGjjQKfpdOY2YhK2JezYlo``b<)K67KPuSF!3dx3RxLta8bGay(p~;Y=8B0R< zdlY$^z!HX+$c~u!J%6cFuNi(wSWMxTn0X~)C8c(OLy{p@Tb{_7firpwcAWiqR#*p` z>==j*S&K7gcjcEcve}N)$#c$`bvI>>s*;`3xth>eRfGdy)>(7ANr=4(YG)@si+2Fl zH(|`wjpAc_9{G53HFUiQp1Lxambj4r+r?jQ*LNHPpw3vEtR+6_SyB$yjI%g~py+*6 z=b-O2mVFp=i8qa~H%{89kLKxJ)rn%%F_+F+WQHk=v-ytAbbIkgkSeF53#p)(^?5G3 zWB!RMhdGNhx=_^gQ#Y!63>b+_hmxc+ebZN5fW?n=`J)J?O#+5s+1ENV7o{hIpb<)) z&lym#i7{AuiDPJs4eE^{sG3cyn zt0qaS4p^8#RB$KgGsxvR5>O^7rGwG_VQ}{FIxUiPHVFNQj=9(C$%ceD~S5ES#npt+}r4VYjSo4i{YMwr|s?q7UgVmj0*HbV{w%W?9Qlq$X z>RO)np_Z4lmWz+`x3rr3oFB8JD@scIIfpNrqpae&Gis^?3ba~x%r4_ohu^GQs zyP$Y0y`*a@U7NrE9@ejg%DflaxX`T6x4syn!~HMC;l!Pb|aj>chOLgtbbRn~JaZs)bv8mO%5E zuKAC^La@MuzGi2qX3Vz{d#`KEux(7m>}kctS}M;}m%So47j>BC?K zpVhglf+)ZLAR4vw+q|hP$b*ZU={dHCteuJ6USPYt>dCl2T%=fBO&_^mAx58+*P)K{ zospM|a4V!WCbt%Rbk%#p?KOM#ySRiKpwf(43|!57%eu&$&9+HZA;!(mY-9%f!s8%3r3>yJfSFBre^A}ip+@jX}|cKsNlS)vzN@}jHWWG&ph{|an;Y2 zY)(pCb+02}e)PV*+mquGf3AD%Eb(e+KU}GjeRy@oM969mj+AJpF*(bd%ksz zn5JFQx_#HZo!5|^q0lRJSG`PC`p0`5Hz4b=$sMCC8_5hz$;Exa&pp+^G<0l@c2G?# zkUZ6rjI(XM-KuiQ+LXykw#oK4RIzJ}mwPp%EY3)6qJV76gDTQoO3P?X-$%xESI5f# z`7NlDYPn%M()dlg!CkS-#M5V6w0Tp^a|^O<>&(2h(Xv~4;@waz9pKa~xYk_K*xb~r zJEk4J(#{*u6*_+@ZJ{1q#ol|sQ>)He!_N5UUET%H?JeKEOQj>)SGks_T@?wYNb|M*B>6z zt-QTMZqlY2z4d$H_LSkbb<{)y`AZknZNEBHBdM-D(Zq+6~r+-l?WK!Jl5|rB~hmogR*& zTk71);vhWbTm8oBYQiU7GjsjLcb-LjE!@ib*9;rjdzR}}RM;w+*u{>**xECij@i$) z?98rg&i?Gg7VXk*M%2DToNY7NZtI}UX~Hh8TAbQmEbeQG>j&Pm+}X``95gF6+d3tg zs;*l}Cd)HR>nfZwx9-Mxz1s2A+N}5QrtYF43z_n$Io#Bmf5qeVj_O@q*4iELl*sTd z+sxTr$Pl0JwmH-eZ}Cv>>Oc(ZSx#P>JXPQA$(XgdoWq>&Ew!+Vwr3#{}g6-dyH9zu}78 z%^nWYjvnHWKH>|%?+Yx>Njok3fG2V@>MdPYSb4RONWQBX#mrpy+xnB>^ zJu3ATj_KTe&?Y{Qt1jd{{@V$z(1WkiKyUVQtUJ78<-9}DC|%xIW~G!0VPD2el^*v~ zul2@#<^&9}YQFVsF1UWLqxK%>S(Ckre)^y`#RXqf;fn z)QJB1G9UW$-ROUNiI3|TW|dpOt^;cWf}~# zjg0*U&iKGS{j%Qc>F?L;U&G%%MZ1pRF#NqV6aVP${z1Rn2}JDwhzSCRIFhA#qN%zn zfcwJkI@7f+wy}QmeLbldfWu=VBr;S(AG7IvLZi|twQ9X$o50ku*iELE*)h3nKBLp> zwP=g#8ix-sO3c3F^ZGr%Pja8YeJS}B8Xh7hDjoou2+Gl&*ey~rDO_S^Vpg7LdR}sx ze0qkCG?qLf5tg#jC``b{%1%s%zRu3pa^B*`>Mov=q|U9XXdEA#XdEn?F*F}MMkGU zTNVKWvm^@}ile0tUI}gl2O>+->|hypJAO%f<`3gBjrh#}c#J`jgvEr%1pX_@>|_>s zBIp%M!EfWtYR4#S(-zR@%b-P(MbJlLpHP9zFeGG#&7jnvRjox-w@z8qfjIJUB$E=x z%B28dF8!Leqr`W$G$g@Fkg8X!b+OotCMS-nFf*tD<+*R>z$DVT(d_9pAXa5*;Z9qc z)Eeb!8ZZn#2`#LYvE|+x2CJ4SXDps&oFjdard(#p#J2sILax)btw&zTi_`Clotg=2 zuz<~XOn}sYE4@q8Af3uA_eCYx*mP`_wM4FVeKawe(_2yO3vG5gVc1&BnnjD4Btf1v zgX|r|+gJ&OgGEC=th_u;j`+p%Ls@&5Kt@%8;bk@d(OX@ymRV`kotIjDwmFDWb!45> z7;_U^8-Hw=lClu_Y;gO(NEp?8&N z9ddUDkP_xMWNZ9oailVFWhUd24?dw=e30bSik6~W_?al$uxHW%7EoD*li(SZ9W`Q- z$yS749(7!pgthr07gzRG$Ci6?`KFdIsBWnx`bH!Wyfrp}v9Vh^5Y&tFF7|!K#S$ zl+Y=!!xCF86TTYysx7AMi>!ZrZ z`PdoKu-NV~;k-cjju63VLFE&M#bV9wW)I|s$78O)> zX%<~=2QVbC4f)PY;aV9_{9S!#B{vO9G>SA?I>ok*&8`dC)nn z9AelFH{($1jV&3*oh2P)l17uJhQ^xFOW19%g)AEiv~l5+Wgvez zM@d{={xMm!flxYk((g};u6o=H@~n4-b|25O*`pON@xEV*up!;iMJ1-i; zb81GNy3;%~DX=(fN}VMh_?$T5267X8kEmLuG6Nnk4|hX{1z9n|L}(9JA-sd5wzrE& z{RxKrBA~y5wL(37>O7kQ)edzy!w#Cug*O}`5qFisl@&3GN`%!BLAb;xLXl5Rv|$vh zXvH7aYE(7U+7-nyEg#w9i_)6^7OetdtE`PcSY7nNwtAt)LbMSVZ)BFZ#)U;QYVm_q zGzRB>kMwxQMA|g*#=8C0%{+~y-p#I;!2tsCaC>xKf6U3a-mynD z%gdiJ0oRz|O%4ppOkOkpOZmCe!4jJoqNI30YRg#m^PkKZraMELJ#eB?1Y4Vs?fwI{ z{Sb$Dkip9Eh9^&Tk)Wpty5~R<@=WLfP^4Z$Q#7G@Qt1`-In_&8U8WQ}n9eSm1sRHB zz(=xo!U#sT1m^qR$3BLf&mU!d7Z{C)Px?7EmHjK_VoC~7xpuCUJB<>DtjfVGdN8Iz zTB9PP8bJ-xsgh3^Autyxf(AB8mNd)YD;cQRA7E98gk3CMD{(?aeD)Byl<8(;nbmg4 z(1fXlWM)-Z+GcWUj(y1CM0!};J38Wwr+qDNdpm{E4%WBA9j+Eyi$vlgH@TQiXaN_h z+~-2q1i+PTbgN7M*y*xBjMm+560xg-IOc-8;vJ%QXVcm7qSuJVbz+~QN{w{t(wieV zED!jB9W)B;vgs{idH<%@uLxGFr6GtkEGdj6Wi7w^6>fh!@n7imQkV$Y&SA4dBY#fj zC19b0etL2i@&t6juWfL9SJ_l}whSoxvFBHg0-&DBB?&4LaEvyh;^paA#499mMIKBf zW(a4iuTdxbMA2b~cFk-Y#&Keptm6@{*SRJ3+ghF>rr$J112;zTQvNqL`*cml`LOad zOhOkM-}KB+hB9-vn9J|#^l+eLwzS>}s_mIPlvfX#8jj{8ew>sz?ui02U zX32STh3G{8D{;~DUG1t6#q*uow*v5Rf&V!|%G%i8_NBDV?Qd_%+u$B|D8x%radp7$E$P49a7 z<02n9$x9A#j(7aIA8$j*4bbnG%Oc_^PdQ#-4s$20oDm_PfXRFAbCL7h05hlg)qZaD zqf1=>;m%IMz#-1_*g`$(Qs)!{faVe*`3{N;U+d8aFW^n>?2S4 zUF)463PfMYX+ZTsT=-qz{sG|o`JDFI0QdP`@g1M|(yV+ zC7=QP-wP_=622b3W(tx{@xqg; z7s4SSq8}hOq8{GhJoKRo{NV~tVhuhbB--5=ZlcI3;tViiD01Q;dg2d&qA6nk+$gR< zDY9b8Nnt96;VQ;r#ku0r8KCB|f(_E5DpD67?BVuZBGV-v10Z8ED&sOTV>3GAGeToD zcH%E$q5(wXHDY5nYU40YU@`7u#MvCo$y_B8VmQ7W&UxdiwA?M~o%vB?2-O}twj(*d zW3;8CbRk?m>f=7TV?8cQ&M|^H3M4)HW2^vVLBiWXA|$&hSWYukw&_n7d${v3gu7|WlIXl4V)iTnGRFJNhEL2mk;8 diff --git a/SheepShaver/doc/BeOS/history.html b/SheepShaver/doc/BeOS/history.html deleted file mode 100644 index 8d016a739..000000000 --- a/SheepShaver/doc/BeOS/history.html +++ /dev/null @@ -1,59 +0,0 @@ - - -Revision History - - - -

    SheepShaver Revision History

    - -

    V2.2 (04-Feb-2002)

    -
      -
    • Integrated code from Basilisk II -
    • Source released under GPL -
    - -

    V2.1 (31-Mar-2001)

    -
      -
    • Support for MacOS 8.5 and 8.6 -
    • Support for G3 ROMs -
    • It's possible to select which video modes are to be used by MacOS -
    • SheepShaver will not use up all CPU time when "nothing" is running -
    • More stable networking -
    • 16 and 32 bit window modes -
    • Small bug fixes -
    - -

    V2.0 (20-Jan-1999)

    -
      -
    • "BeOS" icon on the Mac desktop to access files on BeOS volumes from Mac applications. -
    • Handling of removable media (i.e. automatic detection of disk insertion) -
    • More flexible parallel port selection on BeBox -
    • Greatly improved Time Manager (higher accuracy) -
    • Fixed "audio lags" -
    • Option to ignore illegal memory accesses -
    • Adapted for (and requires) BeOS R4 -
    • MacOS 7.5.5/7.6/7.6.1 run better on some systems -
    • Small bug fixes -
    - -

    V1.1 (13-Jul-1998)

    -
      -
    • Support for more machine types (esp. PowerMac 4400) -
    • Corrected time zone handling -
    • Volume list in preferences handles dropped volumes and files -
    • BeBox: 16/24 bit modes have correct colors with a Millennium II -
    • Video/SetEntries didn't set last palette entry -
    • Mac programs trying to use the (non-existant) SCSI Manager shouldn't crash any longer -
    - -

    V1.0 (18-May-1998)

    -
      -
    • Initial release -
    - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/icon.gif b/SheepShaver/doc/BeOS/icon.gif deleted file mode 100644 index 51368b117dcc38bde6f0ac4457387bad5fd31efa..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2011 zcmaJ=X;@QN8a`ma0F_2r3>syr9YKRdt|&{30R{<-bXXM(#fag`B9wN_V^q{=A+nS) zsfZV0#voXrBBWwjq{C8V8oAmAiW&hU$f^ipfwK6(o$vCizvetio}BZ2@B6*)d+zn~ z-{b0bh=+J+7SW5zWU^Q+Hk)l@V`Fb`@8sm<>gvkl@%VgxP*6}rM1)W%jEjp)NlB4N zBvPp~BO^mDmlFh`R4U8L%2X;|kNQ7=9l#h_~&oxl?|H}kMQ4~pkNRlE*3MVOyq!2+- z1Vs`QK~OkBVFZP6ioz)prwE+FaSFpJ1W1e`F$ySfjKVMq0fy!P5Ol#YfdGbZ5~$%z zk_1V@1|vyCchP%-AaR1k2okzrHk1jR#BmbCNd!8e6(b3Z#4!@XNCXOKfuIN^z)T$Y z2?Xu5R-gku_zws~OQ6|d;RJyZ&_z3eVX((>0s|blg27P32pl6Yj6lOOM7yU8U=ch4 zKZbAwwrSxs9@K#xMEj$)0v+%H0jK~`P=^Cp7>*;FgLVSLV2@!qTm?m;<#g#>FsjN7 ze!wS$NT))p0RVVKba=FL5C?cr2SUIx42Nkz2YiSYNaq4|IDm!d`=PUdxPcZNf(Yn? zXM-Zqa_SH>j2zfQz+Iu`oah9h6MFgwh`9o2M@W?i-#R zic7x%^t*tVP&4B2RmzsHm}XlzOr@cy==DG&aQ87d8f;)d}O`ax5d5+ zmSaSjy0a+YoMZTxj7;aD_B`&vrR?}a!}qTmgztQW&0Ci<*+gX&99V;ZCKXNIro zUx}_mv&SxUWQBW5obpD4+sd(8U5{6`|Pg#`jX8>{Fac7IeC4C*4yGZGV_lkcxjp&WfAFXJ(c~kUE;ak3$_VG zO3O`lB3+u|d+qx%*Ie!he5O7t)uy`WB!^}0OS8Rcp87`3AwK#+C8EbOUzO|(=sZ$< zWv}I(flH!24lPHf%DZ%zk0z&-Twx1?I?fkvA1p~TKQK3tA9_IktwG}5@*B#eb!$fo z4?Z>ul`e|Ph+WO))@6wFdjTFoewti<>^!DY;RHgAey7hB+_vXsW6Yg$F=foLdePM*x!$6%ppr4(*sW=> zV3}7Xc^#Nf+U-1%nC!VRcwSl>65=u0V2EX{_47OH+kQ&+u4rIq zXPVV7DNcp?_~me&o5Xs;NZ;{&Y3vrmeg=B5VaKNGl{-!es~@_(c^&kt>0+<5@57mH zdFQ&7K6>8tmrqu5IL2rAFEHOm{k6M}omu#@a(DRU z|K8nL8u@mGv~i&ZV=f`p`o%-iv)n{A_3DVnUu~{`c-SFOkFvet>R)x%BED}$NN^im7Uc>;BI}E)Gt^X6-P!)J4+j7_sV6a_ti!lzWIs!y(ZnM@L%sW zH~9IOYFR5>D|F9n#JSOr_F4x%@RL0rzMCgBxqu4!KE$Zr<}ItTKFfV!GIPjr>lT## zUY8v@slDlNz9aidJ>m6g-|CtEAUi<`&-@wN*W#D2WB;*9uwm@@&l#^LL!y2(H5sa7 z)%R;WSZ+|`ltE>Hf ze^XOab8~Yb5a{ge4242Mh;TR@iA18&==k_}EEbE$PrG%0~ z38A=9Oeo??aV5DDTyd@#SAw2&Q9n$(VSHJ-e0AK-9 zh~of@aZVaTD?u~t8RHm*Qncc(_Jyg>*Wd>_VWM_Lvq1s0k~U8(2RYP(9f&|Nnxh-w zfJd63_62bqV3D4W_5yYT779TEdAJ)&(u(V_87+S;6POjP_@o^~DpbPG6=jg3D^Ujn zR=8*v00a~e)f)8V^)N7R+#OY@zX1I$kOi>^a?7LPiB{Y@cRV`ers@2`w|z$NdKVSu zRr)zusO5s2V#@MZSOtSoH9>iRo|bV zekHGGdGe0Azx4dlm1MOi-BxxafA6$sXM2nJla!EA*N;l3hOp zJwvy8{hJo|RP=w*ej~c^P*0bq>w3mV-mT87Gsh24Wj%R!WJ_l3Vn*ceO}?LPDYL&! z6wHsf4h*;58aGugpNsnUcMY3%E?qh}ai_JSyZ6nz*LDwG8@<1olCG0irOo93Pf$`zLPS zun~xEtHSRbi8rRR3R1L0OEq;8>8ab8se(l_z z`a$1~Zx6Ow2QJQeDtDw^+HLaJ8^OlWd(|JC;tNliPj4?af)719mRDxoVl;R%il3{! Kyw<#mUj7$_>qdM4 diff --git a/SheepShaver/doc/BeOS/index.html b/SheepShaver/doc/BeOS/index.html deleted file mode 100644 index 523283335..000000000 --- a/SheepShaver/doc/BeOS/index.html +++ /dev/null @@ -1,28 +0,0 @@ - - -The SheepShaver User's Guide - - - -

    SheepShaver V2.2 Installation and User's Guide (BeOS)

    - -

    Contents

    - - - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/installation.html b/SheepShaver/doc/BeOS/installation.html deleted file mode 100644 index 105d9c8f7..000000000 --- a/SheepShaver/doc/BeOS/installation.html +++ /dev/null @@ -1,25 +0,0 @@ - - -Installation - - - -

    Installation

    - -You need BeOS/PowerPC R4. R3 or earlier versions will not work. - -
      -
    1. Unpack the SheepShaver package (if you are reading this, you probably have already done this) -
    2. On a BeBox, you need a copy of a PCI PowerMac ROM (4MB) in a file -called "ROM" in the same folder SheepShaver is in (but you can select a different -location in the settings window). SheepShaver can also use the "Mac OS ROM" file -that comes with MacOS 8.5/8.6 (look in the System Folder on your MacOS CD). In -order to legally use SheepShaver, you have to own the ROM the image file was taken from. -
    - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/introduction.html b/SheepShaver/doc/BeOS/introduction.html deleted file mode 100644 index f33567870..000000000 --- a/SheepShaver/doc/BeOS/introduction.html +++ /dev/null @@ -1,45 +0,0 @@ - - -Introduction - - - -

    Introduction

    - -SheepShaver is a MacOS run-time environment for BeOS that allows you -to run MacOS applications at native speed inside the BeOS multitasking -environment on PowerPC-based BeOS systems. This means that both BeOS -and MacOS applications can run at the same time and data can be exchanged -between them. - -

    SheepShaver is neither a MacOS replacement nor an emulator. It runs an -unmodified PowerPC MacOS under control of the BeOS at full speed without -any kind of emulation. So it also uses the MacOS 68k emulator to run 68k -applications. In this way, SheepShaver is comparable to the "Blue Box" of -Apple's Rhapsody operating system. - -

    Some of SheepShaver's features:

    - -
      -
    • Compatibility: SheepShaver runs MacOS 7.5.2 thru 8.6 with all system - extensions like AppleGuide, AppleScript, QuickTime, QuickTime VR, - QuickDraw 3D, Open Transport, PPP, Language Kits, ColorSync, etc. -
    • Graphics: The MacOS user interface is displayed in a BeOS window or - full-screen (with QuickDraw acceleration) in resolutions up to - 1600x1200 in 24 bit. -
    • Sound: CD-quality stereo sound output -
    • Networking: SheepShaver supports Internet and LAN networking via - Ethernet and PPP with all Open Transport compatible MacOS applications. -
    • Volumes: Any HFS or HFS+ volume can be used with SheepShaver (this - includes Zip/Jaz/SyQuest drives etc.). It also features a built-in - CD-ROM driver and a driver for HD floppy disks. -
    • Data Exchange: You can access BeOS files from the MacOS via a "BeOS" - icon on the Mac desktop and copy and paste text between BeOS and MacOS -
    - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/memory.gif b/SheepShaver/doc/BeOS/memory.gif deleted file mode 100644 index 9867b003e7f6922b967f969903d0154343e986f2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5510 zcmV;16?y7MNk%w1VVeO{0mJ|R|NsC0|7QRHGymg8|H}aXuM_C#=-AlU%a{Pj$jHFJ zz__@$u&}V8prDwTn3$LVm}UTwkdTOoh=72AczAebnEz&G0AOHXSXfv41ejEjAQkdcy;k%kYKn3(L&u@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQ_@mDRagl83GH(EU0-Ib0r5478IgXDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!51egKc&8)CuV5jGB*&(JNjye3KtRfn1JGw#Wx~94 zG-2GT$JDa*;C7}lw=k8-g}6&eaU|b97XWQ`7(x$R zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnK%kIo zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#z8!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJrs%Id7N)@tjmxaO+suDtf@>#xA78mj}EN?`1<$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7Ava+mzHbpx#*^=?z-%@>+ZY69x!aN4j5qX zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDqy90zfCN z^wLbPEHt@9d+LD$n>yfus8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(wFh<2O~ElnA5b^nZ5M9%;k>>r_AylFJ$K-FbGmijS6h7m1sn)|Q{;lD zjrixFhc34NxGuw8GzU~umpSL0?=3m&f&Y!c+@jZRd+3Uv&3f6dM~*h^SucQr2Nc|H z{PAq(E_LIUPhIuoT1Wpo<_j#aIpL5aul@E)E8pqh*dM*A23eEud+&eqef8knx9>jB z-e>Ij`}EhZa{Rw)P`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ z4FeJNWjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9KsH1~OXI$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!G(gQy z<&>9dy&T?J`&xo}fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)X+~bB!3JukjhbVhw%Mr}ZM#xyy2O(vm8&f+YSGR5)u5D@$VT<5 zUT-LLZJNZW(s=7L8k>`1jrARm&20Cfme|dXw)UQ_Y*%?( zzfJD8QG44tWMjG49m#N`8;j~@x4bd!?um&q-t*2ku1ELod$&s808iSv?LE?E2mIhX z8~CpAjWu$f%9y_#vrn-p+sFdb%PL0r`!FhTY$}&=rBXPz8D7nY-VCcT9dUyL`el<# z&YynPIO3dlPo%+jp*Rm{$m_lEf1eGjCGFo#9j;St;uo<%FB>)gW6NcN%G_`@m#fy2 zu5(g}Jl#GY6=@F}Sq^`gr3(f7cS(!!9Up)LU3U7@3kP^l5TSe~X$9fI9?*1bB` z?2+whK4Xq}rqMjXucJKYimYA8_q>p$`Yw)FI#7r=uH)RzJ@k+qc)V$u^rh$7P!GT5 zs1)4DuCF`ngU@`AT^-(bZ@%;|_I!UYfBM)DR`riR?(BPiSKF8T_s8#Mx?}zNLxj!T{}| zi1&hrzSfDpCW3BAf(92lnusrW2!PuIgoB7UikJZZuK0?s2z;nWZ=tw_N7gnJkc+yw zi@7L^v)DAMIEpjpg1?w;fv9||Sd8=+jMk=%|Hq8o=Zxu_bp1sXfW0QUzs^akq2uNPtqq zko%QUte278lQoOiPYYI(<#du3riJlXO(gkwf#-QBiI3SNVC}?AH`$UT7Lji_k)VQm zuSJeIsgu;vQtPNqG=-E9Ns0Yti`|%%`X-S7R*8LBnU&JFm0ZbuUip=!7nWkVc4S$W zGIy3}iEwJUmI2q6Zh4h5DUxvsaBx|d@&=b2gqOyqmlyDtfEk!xz?Wy_mpqV-gh@q) z*#RA31B|IDq~wcthkB-xOb%x;6_=RnH<$7!Oo##1Z3TAkj zxpm(4I(Zjj7FnOYMO^%eWT2N#OF3KrbMsqwvs?n&oSYeip81@i`Iy_Ko$zU%dMBM3 z7FmJCOz7D;KiNA2re80YHUkA*J8F=b}vC>SGz{oH=ld_#~Nq26H9Dq^uc$QaON~`8}u=OAv>V zx{{?ILugTIX9=2&()0sgx@rbOwc*w&_UI!1I_r(blZcxt9_ z+Ki&ImwUQIekquOS(Sn6KS+uLhZ`qLqnRjEa0hDT;nNSbo5sc2ugKH+&pP ze22xH9amdA_o{g%Vl@SY$Mcl~raoQ-)*?fHXv^ zoDu7eX)`z{D^1}upkJ3?yZ5X;HKQ7Pt5iuU3lMBJu&A}lKz=!sLCZsWNv1^`M0%RE zf(o$J$h3Cqv_K2BQ?#`IR9i$=+dz@HwOre^DkPxp{X4Yzo=36!^c8@RX7w^D1UcEI|z)cvqT$AP-%O6r*ac#nr(BrnR~itu(?wzh;d4qfrELNS8?-+ zWrt(BsC&C&pt@mOiBo&5<7klC`m8nURUa~VgWrWqAWmYr);yvJL; zLXf<1!@Hm+ULq!*i@sH(z6h+q5PSm+ELjdrMFJeb);qz= zJ4HR4wD-%obeTj8fWajE!K;gmt$VdqEVKta!&)T6Hhe%hoWuXK z!#r$1KK#S<6U0L7Y&BfOPDI2=oQg-h#7U&YPJBF29L2_X!V;OQR7^xuoW-KE#axVR zAk48}+(2GD#)nhJX3R=WoW?P{#%xT(_?yCS3_xf+$6-^)c1(+5?6`T1sBYZHejLYG z49GqF$Amn@hJ46IEXVsdgM7-y)5)w1Gp_u~Dih1Hj54%b%b}LZQ;W;yX3D(mNxuBccO1;ZtjDR0 ztBqXDYOKqKtIU#2%+73T&>YQ5bIa5$XVZMmKV!|>tbN(s%?bC-;QYzVJkGsb&gKlv z=$y{Oyw2=w%)2|4o%_!FcFa3V&+x3g6^zfoD9-#WOaA=Ne-_XJO>6F4(9e9(2wlkv zz0l#@&<;(`dz`-!y=Men(Hg_e7=0=lz0n{!(Q@q3vwYDa?adHf(j$G+C~eCmz0!u( z(k=~tFdft7r_wb2F&%x=2sP6>-I_ez)8_QkK)ov5NVi6P)JUDwO1;!f-PBI~)KDGO zZY#C_Lk&N?Th%+GT3D@1^1RjEbJbowNnjn;gEZD;&DB(T)>hrsYQ5HJ-PUEs)^Huy zZ_QRxeb<2b&#H9+UMoVY_RD*{01z|S1k=Iz9N2`N*Z^bL^o-c{g4a!bFN|H6kj>P! z;@B6U*qZ&=_A=RSnc17I*ni!?a?MtPZ2*}KC!p=wYnj?#GTIbe+97w^uKg8~wc4<) zjkOIDw@oXUZ2&b8+7ENvot@j(=-R^VFugr1za8Ak%`n7m0IZFc$o6wV-t|2&=dCLL z^j$Ct;0y|2FCGvu1)ebXZQRnR-v-kF&d>n+a^MH9F#Vk>|4lF+FyIbO;08|N?JeC3 z?u-mhFb)pkCEhO+j^N?#+uDs#-0j>LKH&G_3;?VTs>P;{Kehe~>N{u*PIRG z0KVZ~J^?iDSx(toelS6901A)+IbP&o?%`rC+g9h~1~cb5?&Sp@=qZlm1(V?K zZRQ1Y;!oFw=lkU6050J6k^u#-<{qHwY;FLa?&ct#=udty4t@;(8?NSe zp6P~u=#q}!V{YmD&EFr6-{>0W30Kr3vmP*ruH}jz?Eb>*4;SlYUh2kv z?6n@^%J}2Wt}n=bGs=$IxIXRtGVE|(?Ao3$)m|zW{_Xq1?QtpX_;Ue|rj*)|jdJr3vh4g>Sfy7m6pm95m04eik$@JW5y*PiYLW9!}Q*a~0R1Ru(Q z-Pa%#@t&;J1|QXW&E#|KFCpYlwE@+==LEwt}4Kl3zS z^EQ9;k`hWKyz@LC3GepuH8U*WGW0}W^hSU5NT2jdzw}Js^vja*P#^URQa|-nU-edB I^&tQNJBtH3EC2ui diff --git a/SheepShaver/doc/BeOS/quickstart.html b/SheepShaver/doc/BeOS/quickstart.html deleted file mode 100644 index 62f9be15c..000000000 --- a/SheepShaver/doc/BeOS/quickstart.html +++ /dev/null @@ -1,38 +0,0 @@ - - -Quick Start - - - -

    Quick Start

    - -The following is a step-by-step guide that shows you how to get SheepShaver -up and running in the quickest possible way. We assume that you are running -on a PowerMac that already has MacOS installed on a partition of your hard drive -and that you have booted into BeOS. - -

    -

      -
    1. Double-click the SheepShaver icon. The "SheepShaver Settings" window will appear. -
    2. Click on "Start". SheepShaver will try to detect on which partition MacOS is installed and should then start booting MacOS. -
    3. If this is the first time you start SheepShaver you will be asked if you want your -network configuration to be modified to enable Ethernet networking under SheepShaver. -If you want to use Ethernet with SheepShaver you should press "OK" (this will change the -file /boot/home/config/settings/network; a backup of the the original file will -be stored in network.orig). -
    4. To quit SheepShaver, select "Shutdown" from the Finder's "Special" menu. -
    - -

    One word of caution:

    - -Volumes which are used by SheepShaver must not also be mounted under BeOS -while SheepShaver is running. You will lose data and corrupt the -volume if you do this! Don't press the "Mount all disks now" button in the -BeOS "Disk Mount Settings" window while SheepShaver is running! - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/serial.gif b/SheepShaver/doc/BeOS/serial.gif deleted file mode 100644 index b491d769dea310cfd695607bf91ca7b1749fd6cf..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4844 zcmV41ejEjAQkdcy;k%kSIn3(Lpp@9ODr*V65?e%=260B`6DH?E*LJ;x9bK(K5dqJ#?@&VvP!;lwxj zF3MVyEuhDbwZ8o-xaMFUbQhriDRYJ)83GB%B&c~Ab0vlh5)`6TDeqWI0x*5Do4AZ7 z&Xo+=>||q9X3u%fph^|G5a!K!4V+z2c&8)CuV5jGB*&(JNjyd`I6%q}1JGw#Wx~94 zG-2GT$JDaT;C7}lw=k8-g}6&eaU|b97XWQ`7{Ux( zdz+3bF{kc7ew|@P)^z#>iuN{88y?Y^^)hrL)d{5T3#$>vNDg14J zyGPw;kAAwvCQVT5@yCY$LjvaKUmJ~WXWCqo@im)9bY%A4h8rd)4s-O4c1KpnIG~Vg zM$v{>iSpc(lNuxjXC78JT{V+Z z=-ftfI7H=@81;q7l1+9QRw|l=IVF~ESV<<8%fRH+mc)7Kre?adBIlVH?MUZFF}|1x zmv8pzk0EykDyX1*`e`UGfDWqYqS#C@!=sQ!D(R$@R%+>^jskGNrkr-_>8GHED(a}D zmTKy$sHUpws-Yh0DnJip%Id7N)@tjmxaO+suDtf@>#xA78Y=^uK49#z$R?}ovdlK? z?6c5DEA6z@R%`A5wb*8>?Y7)@>+QGR7AxxmmzHbpx#*^=?z-%@>+ZY69x!aN3>aYV zz4+#<@4o!@>+in+2Q2Ww1Q%@Z!3Za;@WKo??C`@2$2+gQ^#*J4#TaL-@x~l?>@lhm zk6ZD_B$sUR$tb6+GOHm=Jo3sg$1L;AG}mlu%k&yx^Ugf??DNmQ;!Ls5pDGZQ0zfCN z^wLbPEHt@9dzt|Qn=+7rs8?^Ab=FOH?e*7Shx+u(opMbo*Jg*U_S$UwJa*KbT8%WP zMmvMFGY8;(bq00M9l>r_AylFJ$K-FbGmijS6h8R1Q-Z@Q{;lD zjrixFhc34NxGuw8GzL^tmpSL0?=3m&f&Wdx+@jZRd+3Uv&3f6dM~*h^St~$61`*tD z{PAq(E_LIUPhIuoT1Wpo<_ajVIpL5aul@E)E8pqh*dM*A1zD5td+&eqef8knx9>jB z-e>Ij`}EhZa{RwqP`uH_+wcGXCc~evtjCxB0q}qb%$NWZ$iN0BZES+8o&+aI!3tXN zf*8!81~@P#mpp$un8!y1}^bo6qd4tEGN z2=efUK$MvegGj_8l5B`ZOrjDkhQuX0@rk%^J6yBy`>B*#l_{>q!2vRdOXhs;$4j&R}J z=BVJQHKgS;Rl(aE;j-DgRdI7u{G^=Z4mzuQqK%>Ztl29&8BC->Zkp%w9pG-Vzhl<_ zjRFz%Wjp&RP~wr4aLy?bK-xUC`i^SNliE&?Syr0b)p^4UX{cuUx}PRfu9J&^1u|OH$QkW! zFg-x?`d7}b)>5yotL#}Hdr!RXt$$-h?D;bLP02pft0)8OWtYjiYZeuHB_(R!EI`dq z<&>9dy&T?J`&xo#fVQUnUS8K~R^D3nmV#?uRCt@d$%S)k4&Ck62j1?_|hf7kc8Wp9x8)tAWOEdM3 z3d4J4>DB(GR-rlrq;IWorxI#fz*RPV=2IVt&xg?%1CON`WpO!IdQ;nOH^t#Q21uuO zj2s&`xPyDC`HV~04+}P!qK$HVp9)#J4fJ=t^)XkMD$#VN3b`huaXo7V(OjwdR&B=E zn|%dlU!gaEX6_};=6tF+pN!9719Yy2C*xk-xnw4unV{9S=&m)|XNNxjVxCWh=8`@7 zYnNVHrgs+UkAbz)X+|EX8GX1;ckI(PGxgd=9X3@1&D9#4D61`Pyji!p)RUZaC12GZ zIHc>n@K)8&;U0sy#KE0yfUA4pC)4=Glcw-=Gu(X`@0iF({(?-drh?3b)k%l z>|_htE3n%gz;m~5S_gk(wXdCLK)<)tM-_JkOV7I+mTN)fyL6D5?z^siyxt-|fzEe+ zr-na#s-gb!x5vD5knJmh6Z~Di>z(qz0=sBce*n7A7kUW&Jm_yO`ck$%>ZUKci-Bz8 zr!G12*{t&TDu1)fXW660*K+H-`MuEhUeTlv`r_M{a*j3q`u@(o;)9QJovYmX;1B=r zOJB*0o8SBBPk+M2&-){5uU;!8Vf^Kfvc%WF+ok4t0yu#G1XzFucz_33fBg3`{`YYg zr*8|Wexvhl+DCp7c!9gpfI^3X9B3;VxP9DHLkHJ^c1C{=SbhXYFa}40^S6E#*nS}Q zaQnxC9rJ+}7=rJIG2cgnHE4nxxINvcgEPp38e@Yn*l;;`F*`_vMd*Vd7)&;YbM6## zQCM`r5`?Ukg{-oKOekkgc!M-|bVzr43&waCgN1NMD_q!x7Gs10S9JH(Q#FM*Q`I|M zr(#}rg_qYij+0r(pi)Fthl4eQY#1zVSZ!38cZTIS_$7ItB{fmlR|dp1Zd67Jrks8T@964AU)R74H zkxYk>5h;>iM3P1GYc@cSC~0jfnRYy|T~R?<%~*_(C|x+|OfQK`1<8z^$dYzMN&(f7 zy*P^6M2YU$lP&j?E-5%dsVPM1Wsap}K1Esod{}nBs5gJeWqo*+Ub$OLsWdTJeKR?g z++|H#BaGICcd`XtxrK>@2WCn+mZ7$f|3@kYca~b%V!+j0j;K*$`CzXFi!`-d-DsDH z=agu+mped{&yza5!%SotJ*r;W0Sw5v0 zjn8M52QX!w$#xUyaX)C5k9m@_=|p8oH>jnXyQxIIxl=z7oY6L%#wl^gnVkK$oXjb2 z&iS0{7M;>bZq!+w-gceX36qSuoh+xF-pOp>8J@;Ap5%E(=6RlDl%DFDlHJ*!(D|P5 zIi2!3pVnEQ_L-gdnV;PGnYYQG%f_Dn018C{I-tC{p9Wf<2%4bixu6WXo(}q;?&+UT zD4}9hpcWcL7@DC!w4ofjLmv8}4iusy%0MJqq6l=NC<;I-x}yHmqAprLFdC!pGov)x zJ~n!z+moX@>T40&qeR4`K#Fa(>301%q)8;CNGdu?x}?Weq`-HiPO70lI;A68rB-U9 zSem6Nx}{voqF(x?FB+y|Dx+jtrZsw|Xo{n1x~4nYrf%w^6bgoM3Z`=^rFHs0O`4}o zv!{H@aZt*B-hh(V#s(Ndn`joBuq{Sp|p&F~kld87bf2^9TeY&f>3aGP6 zfu)+MzsjV(TCA^jtjJ26!D^cox~#0EtkC*&uL_*g`g78Ht$UWO+A1@++O1w#t>B7l z;ySL;TCV2WZs?k>q_(c?N^kD^u09#B^4hEPTCc$RDbI$ln8vOA>M`H?uecJh0_%bP zTCh!cuLvut&1$5ky0Fwrs(A^qBzLeBYls$mv7o518tbhY+p)^{u^>B4B0I7JTe2o= zupFDRy1KF~dzTUmnlI~nG5eo03$qOyr4M_vwC1ur+k-y)vl~OOLQ8!?TeRU?v(JjO zwTQAzODaT*v{75MQ!BLpRr|A7%d=T~vs*i}UHh_M%d%mcvSVwqWjnHG3$kh3v1_Zb zZF{kAOR;eav2(kyb&IffTd;X6uzUNjeao+Zi?0y5kc3;fhI_b(o4AU*xQyGlj{CTf z8@ZA@xdiBxPrEa!b-B7EtVXH1gG8&ITV|Xax(@`pqzg);d%A98x~jXm&f2;*lew_# zF|s?m9Fw_}o4W}qu&Oly0QtKeG=jF;y9$tk#tSej$gjkEyv)ll$&0VcYcIMxz4!9G z&pExiTPx8!0nN+2-20EhJCNVoy(xHb+iL)D^1arZoZOqfv~s>-AzA7hzWLa`U?IQn z%eod;yar&uWV892=0P|a&1yTre3h#7<1a zMoh&?T*JG`!~)~QP>ja?GQ~)2zC4UjK3oF^)5ZAW3w^ z#itU(K>Wr3mka@Re94=9!VkQ}pUlNjoB$QD$D{npZQRJO%T{p=!UQwO2C&DMT*So8 z#)>?{W30mIXvP7f#+8i7tX#|u?8c7l%UT@BlPtvcQUOKG${FCzu519}49kBk%i4S} zPJ9es%*wdj&B?6H*4)db0?E#d!}~(R%p8vQTrlHnyrz6JZwyVpjL$B-%zzBc2K_Gq zT`H)&(Eg&&2@TOX%*Y8m(Dppb6s<23jm`?a(Hw2j6@1P0T+krRFCFd4>3q`o($HLl z(Q*7U2#wA%JjaO_kz8-TfO_t&qO`B+6&VxZ7^hPuF>1n z1M}2z<4U~1d({|p)S8OBNuAWZJJ7a!YG57K8&kVvjWK3@)=V_kYJG-m-PTw5)^PoG zyX4b$eb;!M*LuCzF%U|?_Sb+N*rPy!b4@eD0xpQ1*owW_jNRCd{n(Hl*^<31U0vCh Sec70u*_yrCoISlE0029JP30i~ diff --git a/SheepShaver/doc/BeOS/settings.html b/SheepShaver/doc/BeOS/settings.html deleted file mode 100644 index 7c05c2a91..000000000 --- a/SheepShaver/doc/BeOS/settings.html +++ /dev/null @@ -1,127 +0,0 @@ - - -Setting up SheepShaver - - - -

    Setting up SheepShaver

    - -In the "SheepShaver Settings" window that pops up when you double-click on -the SheepShaver icon, you can configure certain features of SheepShaver. -When you click on "Start", the current settings are saved to disk and will be -available next time you start SheepShaver. - -

    The settings are divided into four groups: Volumes, Graphics/Sound, Serial/Network and Memory/Misc. - -

    Volumes

    - - - -

    The main part of the volumes pane is a list that contains all volumes to be mounted -by SheepShaver. If this list is empty, SheepShaver will try to detect and mount all HFS partitions -it can find. CD-ROM drives are always automatically detected and used. - -

    SheepShaver can use HFS partitions, whole HFS formatted drives, and it can also -emulate hard disks in single BeOS files ("hardfiles"). - -

    To add a Mac volume to the list, mount it on the BeOS side, click on "Add...", go to the "Disks" -level in the topmost popup menu of the file panel, click once on the volume you want and -click on "Add". A line beginning with "/dev/disk/" should then appear in the volume list. -After adding volumes to the list, you should unmount them on the BeOS side again.To remove -a Mac volume, select it in the list and click on "Remove". - -

    You can create a new, empty hardfile by clicking on "Create...". Enter the file -name and the size of the hardfile and click on "Create". The hardfile will be created (this may -take some seconds) and added to the volume list. The so-created hardfile will have to be -formatted under MacOS before you can store something in it. If you start up SheepShaver, -the Finder will display a message about an "unreadable" volume being found and give you the -option to format it. - -

    Double-clicking on an entry in the volume list will add or remove a "*" in front of the -device name. Volumes marked with a "*" are read-only for the MacOS under SheepShaver. - -

    SheepShaver will show a "BeOS" disk icon on the Mac desktop that allows access to BeOS -files from Mac applications. In "BeOS Root" you specify which BeOS directory will -be at the root of this virtual "BeOS" disk. You can enter a path name here or drag and drop a -Tracker folder onto it. The default setting of "/boot" means that the "BeOS" icon in the MacOS -Finder will correspond to your BeOS boot volume. If you want to access files on other BeOS -volumes, you should enter "/" here. The "BeOS" disk will then contain folders for each BeOS -volume (among other things). The MacOS will create files and folders like "Desktop", "Trash", -"OpenFolderListDF" etc. in the directory you specify as "BeOS Root". If they annoy you, you -can delete them. - -

    To boot from CD-ROM, set the "Boot From" setting to "CD-ROM". -The "Disable CD-ROM Driver" box is used to disable SheepShaver's built-in CD-ROM driver. -This is currently of not much use and you should leave the box unselected. - -

    Graphics/Sound

    - - - -

    WIth "Window Refresh Rate" you can set the refresh rate of the MacOS window. -Higher rates mean faster screen updates and less "sluggish" behaviour, but also require more CPU time. - -

    The "QuickDraw Acceleration" box should always be enabled. It allows for faster graphics in -full-screen modes. But if your machine uses the "IXMicro" BeOS video driver, you have to disable the -QuickDraw acceleration or full-screen modes won't work (this is because of BeOS bug #981112-032247). - -

    The main part of the window is occupied by a list of checkboxes that allows you to select -which graphics modes are available for displaying the MacOS desktop. You can, for -example, disable the modes that your monitor or graphics card can't display, or disable the -window modes when you want to run some Mac programs in full-screen mode that would otherwise -erroneously switch to a window mode. The actual mode to be used is selected in the "Monitors" -control panel under MacOS. - -

    The "Disable Sound Output" box allows you to disable all sound output by SheepShaver. -This is useful if the sound takes too much CPU time on your machine or to get rid of warning -messages if SheepShaver can't use your audio hardware. - -

    Serial/Network

    - - - -

    You can select to which ports the MacOS modem and printer ports are redirected. -This doesn't make much sense on a PowerMac, but on a BeBox you can assign the modem -and printer ports to any of the four serial ports (or com3/com4) or even parallel ports of -the BeBox (useful for printing if you have Mac drivers for parallel printers, like the PowerPrint -package from www.gdt.com). - -

    If you don't want SheepShaver's Ethernet support to be enabled for some reason, you -can use the "Disable Ethernet" checkbox to disable it (this will also get rid of the annoying -"no network hardware" messages if your Mac is not equipped with Ethernet). - -

    Memory/Misc

    - - - -

    With "MacOS RAM Size" you select how much RAM will be available to the MacOS -(and all MacOS applications running under it). SheepShaver uses the BeOS virtual memory system, -so you can select more RAM than you physically have in your machine. The MacOS virtual memory -system is not available under SheepShaver (i.e. if you have 32MB of RAM in your computer and -select 64MB to be used for MacOS in the SheepShaver settings, MacOS will behave as if it's running on -a computer that has 64MB of RAM but no virtual memory). - -

    The "Ignore Illegal Memory Accesses" option is there to make some broken Mac -programs work that access addresses where there is no RAM or ROM. With this option unchecked, -SheepShaver will in this case display an error message and quit. When the option is activated, -SheepShaver will try to continue as if the illegal access never happened (writes are ignored, reads -return 0). This may or may not make the program work (when a program performs an illegal access, -it is most likely that something else went wrong). When a Mac program behaves strangely or hangs, -you can quit SheepShaver, uncheck this option and retry. If you get an "illegal access" message, -you will know that something is broken. - -

    If the "Don't Use CPU When Idle" option is enabled, SheepShaver will try to reduce -CPU usage to a minimum when the MacOS is doing "nothing" but waiting for user input. This doesn't -work with all programs and it may confuse the timing of some games but in general you should -leave it enabled. - -

    "ROM File" specifies the path name of the Mac ROM file to be used. If it is left -blank, SheepShaver expects the ROM file to be called "ROM" and be in the same directory as -the SheepShaver application. - -

    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/troubleshooting.html b/SheepShaver/doc/BeOS/troubleshooting.html deleted file mode 100644 index b46aa5855..000000000 --- a/SheepShaver/doc/BeOS/troubleshooting.html +++ /dev/null @@ -1,79 +0,0 @@ - - -Troubleshooting - - - -

    Troubleshooting

    - -

    SheepShaver doesn't boot

    - -SheepShaver should boot all MacOS versions >=7.5.2, except MacOS X. However, -your mileage may vary. If it doesn't boot, try again with extensions disabled -(by pressing the shift key) and then remove some of these extensions: -"MacOS Licensing Extension", Speed Doubler, 68k FPU extensions and MacsBug. - -

    The colors are wrong in 16 or 32 bit graphics modes

    - -If you're running SheepShaver on a BeBox, the only graphics modes that have -the right colors are the 8 bit modes (this is actually a hardware problem -and has to do with frame buffers being little-endian on the BeBox), unless -you are using a Matrox Milennium I/II. -

    You should also be aware that not all graphics cards support 16 bit modes -under BeOS (especially S3 cards don't). Check the BeOS "Screen" preferences -application to see if your card does. - -

    SheepShaver appears to be very slow

    - -
      -
    • Don't use the window modes, the fullscreen modes are much faster. -
    • If you nevertheless want (or have) to use a window mode, you should set the -color depth in MacOS to the same as the BeOS workspace you are running SheepShaver on -(e.g. if you are on a 16-bit workspace, set the color depth in MacOS to "Thousands"). -Also, set the window refresh rate to a low value (high values like 30Hz will make SheepShaver -(and BeOS) slower, not faster!). -
    - -

    Full-screen mode doesn't work

    - -If your machine uses the "IXMicro" BeOS video driver (TwinTurbo cards), you -will have to disable the "QuickDraw Acceleration" in the "Video" pane of the -SheepShaver settings. - -

    Ethernet doesn't work

    - -
      -
    • Is the Ethernet set up under BeOS? Ethernet will not work in SheepShaver if you didn't set it up in the BeOS "Network" preferences. -
    • If you're using TCP/IP on the MacOS side, you have to set up different IP addresses for the BeOS and for the MacOS. -
    • Try disabling AppleTalk in the BeOS Network preferences (there might be conflicts between BeOS AppleTalk and SheepShaver networking). -
    - -

    SheepShaver crashes, but yesterday it worked

    - -Try the "Zap PRAM File" item in the main menu of the SheepShaver preferences editor. -When you are using a ROM file and switching to a different ROM version, you have -to zap the PRAM file or SheepShaver might behave very weird. - -

    Known incompatibilities

    - -
      -
    • MacOS programs or drivers which access Mac hardware directly are not supported by SheepShaver. -
    • Speed Doubler, RAM Doubler, 68k FPU emulators and similar programs don't run under SheepShaver. -
    • MacsBug is not compatible with SheepShaver. -
    • If you want to run RealPC on a BeBox, you have to disable one CPU in the "Pulse" application or it will crash. -
    - -

    Known bugs

    - -
      -
    • The QuickTime 2.5 Cinepak codec crashes the emulator. -
    • Programs that use InputSprockets crash the emulator when in window mode. -
    • The mouse cursor hotspot in window mode is not correct. -
    - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/using.html b/SheepShaver/doc/BeOS/using.html deleted file mode 100644 index 8f9395bcf..000000000 --- a/SheepShaver/doc/BeOS/using.html +++ /dev/null @@ -1,76 +0,0 @@ - - -Using SheepShaver - - - -

    Using SheepShaver

    - -

    Changing the display mode

    - -SheepShaver can display the MacOS user interface in a BeOS window or full-screen -(much faster) in several resolutions and color depths. You select the display mode -as usual under MacOS in the "Monitors" control panel (under System 7.x, click on "Options"). -The "75Hz" modes are full-screen modes, the "60Hz" modes are window modes -(this doesn't mean that the video refresh rate is 75 or 60Hz in the respective modes; -the rate displayed has no meaning; it's simply there to distinguish full screen modes -from window modes). - -

    Window mode

    - -The SheepShaver window has a menu at the bottom that allows you to change the -graphics refresh rate and to mount floppy disks (see below). The window refresh is -disabled as long as the "Scroll Lock" key is pressed (the graphics output is then frozen). - -

    Full-screen mode

    - -The full-screen mode uses a whole BeOS workspace for displaying the MacOS user -interface. You can switch workspaces with Command-F1/F2/F3/etc. Please note that -the MacOS (and all MacOS applications) will be suspended when you switch to a different -workspace. It will only be resumed when you go back to the SheepShaver workspace. - -

    Networking

    - -SheepShaver only supports Ethernet networking (and PPP via the serial -ports). If there are multiple Ethernet cards installed, only the first -card will be used. The Ethernet support is implemented at the data-link -level. This implies that the "Mac" and the "Be" side must have two different -network addresses. - -

    Using floppy disks

    - -Floppy disks are not automatically detected when they are inserted. They have to be -mounted explicitly. After inserting a floppy disk, select the "Mount Floppy" item in the -"SheepShaver" menu (when running in window mode), or press Ctrl-F1 (when running in -full-screen mode). BeBox users should note that floppy disks also have to be unmounted -under MacOS before ejecting them from the drive. - -

    Accessing BeOS files

    - -SheepShaver will display a "BeOS" disk icon on the Mac desktop that allows you -to access any BeOS files/folders which are in the directory specified as "BeOS Root" -in the "Volumes" pane of the SheepShaver settings. You can open and save files on the -"BeOS" disk from Mac applications, copy, move or rename files from the Finder etc. -Putting files/folder to the trash may however not always work. SheepShaver translates -some BeOS file types to MacOS types and vice versa, so e.g. JPEG and PDF files will -show up the correct icons in the Finder. To store Mac resources and other additional -data, SheepShaver uses the following BeOS file attributes: - -
      -
    • MACOS:RFORK contains the complete Mac resource fork of the file -
    • MACOS:HFS_FLAGS contains Finder flags -
    • MACOS:CREATOR contains the MacOS creator application ID -
    - -

    Copying text via the clipboard

    - -SheepShaver tries to keep the BeOS and MacOS clipboards synchronized. That means, -when you copy a piece of text under BeOS, you can paste it into a MacOS application -and vice versa. - -
    -
    -SheepShaver User's Guide -
    - - diff --git a/SheepShaver/doc/BeOS/volumes.gif b/SheepShaver/doc/BeOS/volumes.gif deleted file mode 100644 index 857dd0a21e5144e9ab9a4de2309c827b8c3193ed..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 7456 zcmcJ~1y>Uc!+_yY0)mK03y7eAq;wF(|xF*-&HjM3elgV9Kb z`_B6#zUv3v=iCa4U&O>sGjKFE7Pn{QUg*`1nvN z0EI$zb#*m2H^brZ($do0+}zav0i;?0LPJCS{QNvTJgls&EGz&fCMLSNx@u}_Kp;?7 zR#r?*Oi&QO!NI}I%uGv5OHNJ>_RWF^~wE2D<%fQN=`{lOOJi&8DVmyFS}NPxJ37m&>w9|p zkj9O;gG0kZU1Q@DL>CQj$w0V{z17~_RQFVUayzAu(M?0lA=Fwc+tC+ z5mC^7W6|O~Gtk6UYZu6DiRPRw;-<4RH`BJB3p-vPq(V?&X2K|zp=zFG?Bkt&ro``1 zrGDzl79W*mhcxi#A)ZB_+TBFVw_DMaf@~We<>LKnGm60m3ye$f^w*m187^i25kzS% z`BcjG5-R)R9jvMVIn;3p0$$Gs>E+u*ImaZ-fEil;AP$DR*=puJ+Z9Gq5UaeJEjBLG zw^v6fM4P7&)|Uog@4@hu!UypxhD)&O?Dn*M3;hpgL*t&eJ17Twy~4icFY4bk?|~NH z%cbpjUu)!eWEVg8eHXaH@NH9i7Mo{oX=oJ}yeQAEs!QUG3RPmU*fV9VJhEIit8)^` z0wr!=tw&21vy*#Ml0g)W(8{^-E*9z`;5Z7yq$HOAf-RYibXJ6u{1mlASQC$FTMFZ; zNAR;F%@?$&Kh1&jSz~O|Q%Kb*pX{%K;+y|NXNkE552o8)(di1b;!Ch+N6#yAWF5%v z%w})j?w8sx3bF3ziP`W_nq3isVL@W6E#LKJ>xhNX~cc}Rfx^s5ixYd-%+XSL%~{s=LUbr{-d$Gm;ka@3f0LCNnK2;DezoQf77wEouYhg zaye@NIl7!%{jO3s+bKe>gJ)7wd9`TE$0O2hcK`JgKH`gP0333X4q3IkKDu7>BfP(w zYCl)uUJE9yy4j5MmiAa~UyKr|wm<|nN)nm)iV`QO+INdvu&Rlpqf+ee_LpUNZ^T_K zWjy!N{k|2VTj)dB3Wu+3{hd!FVr~8nrJXPVyPtCM1gxFQ-VSTaka(R2e(A|=I_ys) z3pfqp7)~S7ME#*IwsXvf<&ated*~NWgT;pP$RMa5rn}P+S<-y+5MVD0{aGkbIiDgz zOe|FVEKDsjpRxql$4T$+LFtl5-9#ip>wFerl9*1@14If?*hN|>7tq@UBZXVfqUNnx z8PGt5TvKeEh1+leQ`ozH={x=y=tBYX8ZAnWelqemcd|^78|N2^!8kIE9t&exJ?G6} zd}q(wYM}u!5KC8rEuQ%_8!@+`JP%$*JrgIy{Ofe(c|xT3&NT2Arpy|dy zH=q#-d7E16?5U({^gO9oh*3c4TB&rRR%bwYQ6T20veB0*hY?r(5Beb$R;?${uJqi- zVq$It7z7S}iLR#h82wrH5@-8jX0Mc{g4p*YV`+=2Zgl|WK^>jZct5)fz_k4|{~NHx zu!}M4SAqHt<+Ro6A2^1Ln*WY=#aThanaf4%&4s`lOAPzx3+?7-E;?9RmEQFi*ya1>RBt_#wOZsoMt><=o-OmF)}V9RArLF7_i}-Wc$17N;5-F zH7CxBKsLML3QFyJy^y&~`zqhegYt*Sq#45~zG}8e<6XZ+nO?6L`=f*v zi^LjUeAiZ8tXW%E=SS$QH#?tp5}6;xF~9fn+wUBjjP$FTs1I^*8fU}47*~IWwwnGuoYNK*foXvc zS;o?JyZ+U~(<+C-GWYR1ewTHPBX%~VTyYaJh0U-K1IL*AWisyThP<$2_XE`xikFM< zKS#%2gk-CNFWFd+Mo!i@^jGhXo4Q~;^KMhF>qMQ`P0yI-gCrT|NMf3%b{|i}n~v6A zJ{PM=Mx8}_KWs5SZ$T-5oTF(-w!qUjah0g^WW>YHhmh};>d^{GBrqKQv6fND=--rI z8-N$A)FYQG+&?zj&_LDJ$rO7o0PXs|T1+brE%`+%wZZ0lKChbSQS3#P_v3*Hd&+b_ z=rT<~YVC7-;Y7>_QI`64Vh5T}&?s_9i_-LwV(C5kMfCO4%pZ7E^O6-eqgO;XS@?c5 z4;wFIf=I|^4r5D_rV2Xz20peQvVWB9YUprcy=f**F2u?$8>KRcAZntR=THTK%)y2<$Z?M;Vd z<1gs(5aU08_FsTdD6q@B7vdMM;Q0g&7|?P1Pee*r$7K}af_1(A^XjVe{L(#Jz>D7t{~x5D6X z#Ss$)iv^fk1!#o^I>iNO=m!7bfH(pnb~l0UH~7h-K_tK+GN6@CNRWuA-ngazJ0JuX z7|KHQ`w{JZN#*@}&pi_8C&m%BNP}Y}<{Kv#u-oLtQyReF5%w4DoxA4^91nzegnJUX zdFci{*9DP6EX)G~cKUyjq-$fY3Wpd{ZJ^JB7$(4>DwE#4k&z zkQJn-Gy?7CizJFv3H=pT5*ZreTjUYG+>D=464DRxgq9lrYW6IucP|trDAx5-g-7q} z`jhB>Xa0^bdH5o_xJIc#0h?4{sA2675j08#L>ixNgdyl!WPmSZ@CM>akX^f)kL;p zkc=)*&KA$apfHW#H1`~EMt4glR3I}WEhQ@~lW;C&7@Q>)5K;n8YHx{~UC1Ka%v9IO zJax@fEX`c?%#LMA+Gxpm(U6rJmVHW0xlZi1DegMC;J8bdb9ejV@2%^lVzxgKcV|lu z{$LJ9G3O90dYqO+u$U|7l>09&7hBtqo3x)x?M3?d6M!vCxh9S{PfVbp&+m=RdqtnM z1I}Yf&kw-Kqvy=456kDIFDUBDe;1zqPBCrzeSw4*(OXPDWqN@mePO_O!Gd_k$JX>u z>4pBXh2uX9l)?&t<%JrU=R%kQ{)M~_;(X24BGazIFMEX!X_+4ei_FRij26QeJ&V|% z7Md>>v#1xz4`x`?=ho~MyN454rYD+6qC*zkiE&+W6<^CMI-eHx zV=CJ8U{=XUn^(m;}7Ucj?yY?7Auw|DrU<|n(hi)Br10}3&ySU^Er)snUtBSC$*dDBY^r{L-uQJsuz2}6}V5*-Cl@PsxKSjXtVWrQMN^iuA zU+Cw~)0NFjl-)h8p*ueB*RanDUb;hr9OubXoyz4j8>n)YUSu+|}(vqLfH=0G%8+h0Fer=i= zNHPqI@kncOKr}IhH~JoA3E9*JXB34k)srvQmE6_6K4^#;%8Yo`z_-|x;+?_0AD`}B zNW9e2CElb9Pl&W>^m$cLxRjoD(0KE-2`1TEdC(dMYw&`#hHy1CM6_JfHV1lFws^zq z5cTb^(%rclJ-FI_!w}KlZABU3wp=aMUt7LKG>;FZ+vulHAHZf|^~o9SDPav`ip@1k z%~6~k`HCGshT6~vZTql}Ev5S2wANk(Lf^dg{2-+o+?glYupZHV4@<4K>CoUp++-Nx zMYc8Bbdu?}VK)$6&fuR=>=x?e)Z{!fm=w5$YdY`g9)zN)vIw%Y8-_eWw?F-=&ZYfd;&!b*56?`aXaI1k&{<^1VR| zM<3GSy}rFqntLYFJguLqtz}le-;4oeoY`++KoH=A3Q$J*MWP~y1$-i_%)L89wNZd^ zRC0wtxGgHBZGbmnAZd6YmsB9e03P?yg-{yE%N%6d8Yo{LWbGNOVi+n=t|>a~PH02b z91ddPnL}-v{D|eDT&W@6`)a<(!LH1~PM_hH%;CXh)Stt;-bf^p8-<4Rzm4Ues~8+! z?wjrhuqBMtGT=ZS`kZiZMuz#vq*^8_{&@MINFB*mBS+3FMmCp6e~{w5T^}JQ$6Xs9 zT6z#zco;>u@$Vb7A8_|yF`yP0#!r1lPBO>V83wUFeYcS#xR2vhP+#gTGD5$Jv*Cf4 zD*~h|6UXZ#?-+4s6edr7094S4cPdDNqjo}QJFyCqqE_HnC)3Fr(_f{L{7~c}!}Rya2`nAs z3~*)e&9m_{?r|U^4WTSlePq)9acb+ZZ=qtwK5JT%an74(j^SwLa=AZW(p-fHNu@H$ zy)qRB1xQ5ADpwACj~vso8?}t$Co^1-QJE8t>a#qW@@k*g<(W~;Lis-%=&>1WB3=05 zGtGH4Nxm{;khS1vIQPTHV|RFlQw7)H5V{cQ-!jtIEWKFQzCg)1Lp#!!b2LHyd1mN{ ztcwR}%-Ao)Gm966`f0c_`Y@jpxiV|GSm?9Z$nE-jWX0cSWm{#j9=iJBXr-QXRdh*b zt8z84V&%MYVcKvF%&;QJ&~zQOrfa+UZ>0~ww9Zkmwl=h8d-y3P3TVIl3416#EJ6Z* z#CLtgO<-fN(dfKE`w!o-ZH;`nSDj&#MP^f+bn~t6CI@JfEqjxDbyHfZ&zGS`fVYS6 z--e*?mL%RRQPh@{y`ThWN}6dqnQcXgd;5zF=s%_=g^umn^DX(&ZM6<=P}R1&(N4d> zj){q;hvJ4y*LVeMQao(3a=c0vHz>0Tq~Xx8^&hWDt8>Ck=^P0TGj z+9w^jt0k~&BKSo^Bmuny!Ys?|&)O5j*<)6!2>u+eQgj?nyfa%*>?|oV-Ja2tNI=h# z?bG-j#a10HM4uiTo#;EB{D@x6=>XquW2%m2blg-0k)~s0N7;armSZh={Q;m0=i>NO z8*p}_wA&ZI@1hMU&QvCBN2bP#qwU66aE+qSJF#Iq7=*N%GFM^ma0^2{z zJ6r_#T>zAKoT_ZKnZADSIHz!sV;;W9RlAh>b*YKH)F3;?LddR+9nfaKu5@^>sOmpx z#9T@IxT5^VZ)m$~-}%$}^)<49$6__lO;yMdD;reD~x*W+$vU#Wg5u-#UuZl!>BHapJtv&EchEb1H1Le0Svc(>!`;BGgU zuGbHZyLTR+&$f6^bJbq-oTQJtia(j5W`}nH*#|EEh zwV;Kx#lPx{Tg-EOqK#NxA*Q%~Wr`O#%p7#=LVtV&eq-PAlr7GSkQ?#PZoGLhwwITR z59+LO66bg3D6S*&Xtpz`D%!;-Bqn+G{KZQu8oH#^;(TUUd=)(pAISmfSv);1zuaee z1w|!7Y%Ft8HV0cAr^*jHVM5_MxRjwe#M2vUt{(I4U8Qdn+DgtPCM_c?=aC7lQx=|= zcR*j?)PiX5M0~979~j~fj0y(3MVX911vhul`v*rS3u~9xw*?8)Fm=o|*C)9^!WV4c zN*zr;hwP41;mi*%evY8wx3Hy-8x{JFD;!KI9$&~3{h4i-b#s)c+5Vj=GEwokFgB4Y z&ZCtkW=A>aqknMuLhqJDrh*iXTC3~(fNZ(EFG*Ml%RQCYEP)R*m}wL>1@*bfMj>Iu zZ$7U^KlwUy4g5y1L5m?wzB0WGQlQO4e@azVp_fssyd}RASM%fDRTy&s_iMwzvF1t^ zx+8KPcjB!XA00kQYs%`~2a=nxbz#fV&)7C(vmIo{bt4I-`#H&RVAcC!y|`BpH_M5e;WT>7n4b`>hbc{Y;y2Rp{X=6kYh`5L=WHNp?ch_?OSGk1qX^Ub%4k02@ z7~JmE&CPr6jTw7*ZNs87A>t-9(pyK*RyX~4IGJT`?i);Ueopl(gint|;*YcHUKc_> z{;PDbn0eWIX@ZoBAW$Xg(KLAsP5F3o8)J{t8;9Qjfp5P1;4kCCEU-!wax)Q$vw|=o zID~XRo8-C#5XS?jqDoIz4^`wN;<9k%+5oUL5~|s z^^KV{DHU-A<^8Rzn}_58cH+6_dVF|`LuW4bg?*66CpChF?}?Zo`e&Z^hl@Ae<3ut5 z_g)7#jl365C4JcTGg_w$?7}E_Q{U`mT<8Qdxw9ANG{KRD!ypbqBE9o?xY{xh3GM`^`9cnb0k~>_vwEp=(VwqjzcrIjlBo6HaVd2V=#^{4A%47Ve;{uTsdtKL zR>q$Q1}kT{#t|pzqXhHlRDOb{m;;5_K9I?(*x4s!5UR7O`-U|Hltr4cA=ogeecojL zI?Xpr=F7_-qhIAtvm7Hzq}~v;LXQ%19`XA{&u)uziFvXJ2&`l$gw%p~DSvO6?S1CS zQws%sGa@V6lcy2?&*XbzfzPy+f}HhN_h6yI_xrnw>ggIuRf$DBZu?56^qOg-iN$=v z$qSC@npww*CDNDss`CEy-}1=ZN}zA|)oaL!pK>RaskmV@^XRq8KuP6V4H&JObgfGJ lB$(kPMyH!zyCyoR!rZ)EZX#W~p(?4;&h0>7iy9vw`G5Dj1)~4} diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp deleted file mode 100644 index c6c0fbf47..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Ethernet.cpp +++ /dev/null @@ -1,256 +0,0 @@ -/* - * Ethernet.cpp - SheepShaver ethernet PCI driver stub - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include -#include "xlowmem.h" -#include "ether_defs.h" - - -/* - * Driver Description structure - */ - -struct DriverDescription { - uint32 driverDescSignature; - uint32 driverDescVersion; - char nameInfoStr[32]; - uint32 version; - uint32 driverRuntime; - char driverName[32]; - uint32 driverDescReserved[8]; - uint32 nServices; - uint32 serviceCategory; - uint32 serviceType; - uint32 serviceVersion; -}; - -#pragma export on -DriverDescription TheDriverDescription = { - 'mtej', - 0, - "\pSheepShaver Ethernet", - 0x01008000, // V1.0.0final - 4, // kDriverIsUnderExpertControl - "\penet", - 0, 0, 0, 0, 0, 0, 0, 0, - 1, - 'otan', - 0x000a0b01, // Ethernet, Framing: Ethernet/EthernetIPX/802.2, IsDLPI - 0x01000000, // V1.0.0 -}; -#pragma export off - - -/* - * install_info and related structures - */ - -static int ether_open(queue_t *rdq, void *dev, int flag, int sflag, void *creds); -static int ether_close(queue_t *rdq, int flag, void *creds); -static int ether_wput(queue_t *q, msgb *mp); -static int ether_wsrv(queue_t *q); -static int ether_rput(queue_t *q, msgb *mp); -static int ether_rsrv(queue_t *q); - -struct ot_module_info { - uint16 mi_idnum; - char *mi_idname; - int32 mi_minpsz; // Minimum packet size - int32 mi_maxpsz; // Maximum packet size - uint32 mi_hiwat; // Queue hi-water mark - uint32 mi_lowat; // Queue lo-water mark -}; - -static ot_module_info module_information = { - kEnetModuleID, - "SheepShaver Ethernet", - 0, - kEnetTSDU, - 6000, - 5000 -}; - -typedef int (*putp_t)(queue_t *, msgb *); -typedef int (*srvp_t)(queue_t *); -typedef int (*openp_t)(queue_t *, void *, int, int, void *); -typedef int (*closep_t)(queue_t *, int, void *); - -struct qinit { - putp_t qi_putp; - srvp_t qi_srvp; - openp_t qi_qopen; - closep_t qi_qclose; - void *qi_qadmin; - struct ot_module_info *qi_minfo; - void *qi_mstat; -}; - -static qinit read_side = { - NULL, - ether_rsrv, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -static qinit write_side = { - ether_wput, - NULL, - ether_open, - ether_close, - NULL, - &module_information, - NULL -}; - -struct streamtab { - struct qinit *st_rdinit; - struct qinit *st_wrinit; - struct qinit *st_muxrinit; - struct qinit *st_muxwinit; -}; - -static streamtab the_streamtab = { - &read_side, - &write_side, - NULL, - NULL -}; - -struct install_info { - struct streamtab *install_str; - uint32 install_flags; - uint32 install_sqlvl; - char *install_buddy; - void *ref_load; - uint32 ref_count; -}; - -enum { - kOTModIsDriver = 0x00000001, - kOTModUpperIsDLPI = 0x00002000, - SQLVL_MODULE = 3, -}; - -static install_info the_install_info = { - &the_streamtab, - kOTModIsDriver /*| kOTModUpperIsDLPI */, - SQLVL_MODULE, - NULL, - NULL, - 0 -}; - - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern uint32 ValidateHardware(void *theID); -extern install_info* GetOTInstallInfo(); -extern uint8 InitStreamModule(void *theID); -extern void TerminateStreamModule(void); -#pragma export off -} - - -/* - * Validate that our hardware is available (always available) - */ - -uint32 ValidateHardware(void *theID) -{ - return 0; -} - - -/* - * Return pointer to install_info structure - */ - -install_info *GetOTInstallInfo(void) -{ - return &the_install_info; -} - - -/* - * Init module - */ - -asm uint8 InitStreamModule(register void *theID) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_INIT - mtctr r0 - bctr -} - - -/* - * Terminate module - */ - -asm void TerminateStreamModule(void) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_TERM - mtctr r0 - bctr -} - - -/* - * DLPI functions - */ - -static asm int ether_open(register queue_t *rdq, register void *dev, register int flag, register int sflag, register void *creds) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_OPEN - mtctr r0 - bctr -} - -static asm int ether_close(register queue_t *rdq, register int flag, register void *creds) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_CLOSE - mtctr r0 - bctr -} - -static asm int ether_wput(register queue_t *q, register msgb *mp) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_WPUT - mtctr r0 - bctr -} - -static asm int ether_rsrv(register queue_t *q) -{ - lwz r2,XLM_TOC - lwz r0,XLM_ETHER_RSRV - mtctr r0 - bctr -} diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile b/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile deleted file mode 100644 index f9f12eee4..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Makefile +++ /dev/null @@ -1,25 +0,0 @@ -all: ../../EthernetDriverStub.i ../../VideoDriverStub.i - -clean: - -rm *.o hexconv Ethernet Video - -../../EthernetDriverStub.i: Ethernet hexconv - hexconv $< $@ - -../../VideoDriverStub.i: Video hexconv - hexconv $< $@ - -hexconv: hexconv.cpp - mwcc -o hexconv hexconv.cpp - -Ethernet.o: Ethernet.cpp - mwcc -I.. -I../../include -o $@ -c $< - -Video.o: Video.cpp - mwcc -I.. -I../../include -o $@ -c $< - -Ethernet: Ethernet.o - mwldppc -xms -export pragma -nostdentry -nostdlib -o $@ $< - -Video: Video.o - mwldppc -xms -export pragma -nostdentry -nostdlib -o $@ $< diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp deleted file mode 100644 index 1e1c9b244..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/Video.cpp +++ /dev/null @@ -1,78 +0,0 @@ -/* - * Video.cpp - SheepShaver video PCI driver stub - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "xlowmem.h" - - -/* - * Driver Description structure - */ - -struct DriverDescription { - uint32 driverDescSignature; - uint32 driverDescVersion; - char nameInfoStr[32]; - uint32 version; - uint32 driverRuntime; - char driverName[32]; - uint32 driverDescReserved[8]; - uint32 nServices; - uint32 serviceCategory; - uint32 serviceType; - uint32 serviceVersion; -}; - -#pragma export on -struct DriverDescription TheDriverDescription = { - 'mtej', - 0, - "\pvideo", - 0x01008000, // V1.0.0final - 6, // kDriverIsUnderExpertControl, kDriverIsOpenedUponLoad - "\pDisplay_Video_Apple_Sheep", - 0, 0, 0, 0, 0, 0, 0, 0, - 1, - 'ndrv', - 'vido', - 0x01000000, // V1.0.0 -}; -#pragma export off - - -// Prototypes for exported functions -extern "C" { -#pragma export on -extern int16 DoDriverIO(void *spaceID, void *commandID, void *commandContents, uint32 commandCode, uint32 commandKind); -#pragma export off -} - - -/* - * Do driver IO - */ - -asm int16 DoDriverIO(void *spaceID, void *commandID, void *commandContents, uint32 commandCode, uint32 commandKind) -{ - lwz r2,XLM_TOC - lwz r0,XLM_VIDEO_DOIO - mtctr r0 - bctr -} diff --git a/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp b/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp deleted file mode 100644 index 59a0a3e09..000000000 --- a/SheepShaver/src/BeOS/CreatePCIDrivers/hexconv.cpp +++ /dev/null @@ -1,34 +0,0 @@ -#include - -int main(int argc, char **argv) -{ - if (argc != 3) { - printf("Usage: %s \n", argv[0]); - return 0; - } - - FILE *fin = fopen(argv[1], "rb"); - if (fin == NULL) { - printf("Can't open '%s' for reading\n", argv[1]); - return 0; - } - - FILE *fout = fopen(argv[2], "w"); - if (fout == NULL) { - printf("Can't open '%s' for writing\n", argv[2]); - return 0; - } - - unsigned char buf[16]; - while (!feof(fin)) { - fprintf(fout, "\t"); - int actual = fread(buf, 1, 16, fin); - for (int i=0; i@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= ../main.cpp main_beos.cpp ../prefs.cpp ../prefs_items.cpp prefs_beos.cpp \ - prefs_editor_beos.cpp sys_beos.cpp ../rom_patches.cpp ../rsrc_patches.cpp \ - ../emul_op.cpp ../name_registry.cpp ../macos_util.cpp ../timer.cpp \ - timer_beos.cpp ../xpram.cpp xpram_beos.cpp ../adb.cpp clip_beos.cpp \ - ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp scsi_beos.cpp \ - ../video.cpp video_beos.cpp ../audio.cpp audio_beos.cpp ../ether.cpp \ - ether_beos.cpp ../serial.cpp serial_beos.cpp ../extfs.cpp extfs_beos.cpp \ - about_window_beos.cpp ../user_strings.cpp user_strings_beos.cpp ../thunks.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= SheepShaver.rsrc - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= be tracker game media translation textencoding device GL - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../include SheepDriver SheepNet - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = -prefix BeHeaders - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/NetPeek/Makefile b/SheepShaver/src/BeOS/NetPeek/Makefile deleted file mode 100644 index 233c7e5fd..000000000 --- a/SheepShaver/src/BeOS/NetPeek/Makefile +++ /dev/null @@ -1,110 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= NetPeek - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= NetPeek.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../ ../../include ../NetAddOn - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp b/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp deleted file mode 100644 index ccf5629a9..000000000 --- a/SheepShaver/src/BeOS/NetPeek/NetPeek.cpp +++ /dev/null @@ -1,49 +0,0 @@ -/* - * NetPeek.cpp - Utility program for monitoring SheepNet add-on - */ - -#include "sysdeps.h" -#include "sheep_net.h" - -#include - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer - -int main(void) -{ - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - printf("Can't find packet buffer\n"); - return 10; - } - if ((buffer_area = clone_area("local packet buffer", &net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - printf("Can't clone packet buffer\n"); - return 10; - } - - uint8 *p = net_buffer_ptr->ether_addr; - printf("Ethernet address : %02x %02x %02x %02x %02x %02x\n", p[0], p[1], p[2], p[3], p[4], p[5]); - printf("read_sem : %d\n", net_buffer_ptr->read_sem); - printf("read_ofs : %d\n", net_buffer_ptr->read_ofs); - printf("read_packet_size : %d\n", net_buffer_ptr->read_packet_size); - printf("read_packet_count : %d\n", net_buffer_ptr->read_packet_count); - printf("write_sem : %d\n", net_buffer_ptr->write_sem); - printf("write_ofs : %d\n", net_buffer_ptr->write_ofs); - printf("write_packet_size : %d\n", net_buffer_ptr->write_packet_size); - printf("write_packet_count: %d\n", net_buffer_ptr->write_packet_count); - - printf("\nRead packets:\n"); - for (int i=0; iread[i]; - printf("cmd : %08lx\n", p->cmd); - printf("length: %d\n", p->length); - } - printf("\nWrite packets:\n"); - for (int i=0; iwrite[i]; - printf("cmd : %08lx\n", p->cmd); - printf("length: %d\n", p->length); - } - return 0; -} diff --git a/SheepShaver/src/BeOS/SaveROM/Makefile b/SheepShaver/src/BeOS/SaveROM/Makefile deleted file mode 100644 index cba232e1a..000000000 --- a/SheepShaver/src/BeOS/SaveROM/Makefile +++ /dev/null @@ -1,110 +0,0 @@ -## BeOS Generic Makefile v2.1 ## - -## Fill in this file to specify the project being created, and the referenced -## makefile-engine will do all of the hard work for you. This handles both -## Intel and PowerPC builds of the BeOS. - -## Application Specific Settings --------------------------------------------- - -# specify the name of the binary -NAME= SaveROM - -# specify the type of binary -# APP: Application -# SHARED: Shared library or add-on -# STATIC: Static library archive -# DRIVER: Kernel Driver -TYPE= APP - -# add support for new Pe and Eddie features -# to fill in generic makefile - -#%{ -# @src->@ - -# specify the source files to use -# full paths or paths relative to the makefile can be included -# all files, regardless of directory, will have their object -# files created in the common object directory. -# Note that this means this makefile will not work correctly -# if two source files with the same name (source.c or source.cpp) -# are included from different directories. Also note that spaces -# in folder names do not work well with this makefile. -SRCS= SaveROM.cpp - -# specify the resource files to use -# full path or a relative path to the resource file can be used. -RSRCS= SaveROM.rsrc - -# @<-src@ -#%} - -# end support for Pe and Eddie - -# specify additional libraries to link against -# there are two acceptable forms of library specifications -# - if your library follows the naming pattern of: -# libXXX.so or libXXX.a you can simply specify XXX -# library: libbe.so entry: be -# -# - if your library does not follow the standard library -# naming scheme you need to specify the path to the library -# and it's name -# library: my_lib.a entry: my_lib.a or path/my_lib.a -LIBS= be - -# specify additional paths to directories following the standard -# libXXX.so or libXXX.a naming scheme. You can specify full paths -# or paths relative to the makefile. The paths included may not -# be recursive, so include all of the paths where libraries can -# be found. Directories where source files are found are -# automatically included. -LIBPATHS= - -# additional paths to look for system headers -# thes use the form: #include
    -# source file directories are NOT auto-included here -SYSTEM_INCLUDE_PATHS = - -# additional paths to look for local headers -# thes use the form: #include "header" -# source file directories are automatically included -LOCAL_INCLUDE_PATHS = ../ ../../include ../NetAddOn - -# specify the level of optimization that you desire -# NONE, SOME, FULL -OPTIMIZE= FULL - -# specify any preprocessor symbols to be defined. The symbols will not -# have their values set automatically; you must supply the value (if any) -# to use. For example, setting DEFINES to "DEBUG=1" will cause the -# compiler option "-DDEBUG=1" to be used. Setting DEFINES to "DEBUG" -# would pass "-DDEBUG" on the compiler's command line. -DEFINES= - -# specify special warning levels -# if unspecified default warnings will be used -# NONE = supress all warnings -# ALL = enable all warnings -WARNINGS = - -# specify whether image symbols will be created -# so that stack crawls in the debugger are meaningful -# if TRUE symbols will be created -SYMBOLS = - -# specify debug settings -# if TRUE will allow application to be run from a source-level -# debugger. Note that this will disable all optimzation. -DEBUGGER = - -# specify additional compiler flags for all files -COMPILER_FLAGS = - -# specify additional linker flags -LINKER_FLAGS = - - -## include the makefile-engine -include /boot/develop/etc/makefile-engine - diff --git a/SheepShaver/src/BeOS/SaveROM/README b/SheepShaver/src/BeOS/SaveROM/README deleted file mode 100644 index 37214b340..000000000 --- a/SheepShaver/src/BeOS/SaveROM/README +++ /dev/null @@ -1,8 +0,0 @@ -"SaveROM" is a program that allows you to save the ROM of -a PowerMac running under BeOS to a file. - -1. Copy "sheep_driver" to ~/config/add-ons/kernel/drivers. -2. Double-click the "SaveROM" icon. - -This will create a file called "ROM" which should be 4MB -in size. diff --git a/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp b/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp deleted file mode 100644 index 5796ad5d2..000000000 --- a/SheepShaver/src/BeOS/SaveROM/SaveROM.cpp +++ /dev/null @@ -1,128 +0,0 @@ -/* - * SaveROM - Save Mac ROM to file - * - * Copyright (C) 1998-2004 Christian Bauer - * - * 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 -#include -#include - -#include -#include - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-SaveROM"; -const char ROM_FILE_NAME[] = "ROM"; - -// Global variables -static uint8 buf[0x400000]; - -// Application object -class SaveROM : public BApplication { -public: - SaveROM() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - } - virtual void ReadyToRun(void); -}; - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - SaveROM *the_app = new SaveROM(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Display error alert - */ - -static void ErrorAlert(const char *text) -{ - BAlert *alert = new BAlert("SaveROM Error", text, "Quit", NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display OK alert - */ - -static void InfoAlert(const char *text) -{ - BAlert *alert = new BAlert("SaveROM Message", text, "Quit", NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Main program - */ - -void SaveROM::ReadyToRun(void) -{ - int fd = open("/dev/sheep", 0); - if (fd < 0) { - ErrorAlert("Cannot open '/dev/sheep'."); - goto done; - } - - if (read(fd, buf, 0x400000) != 0x400000) { - ErrorAlert("Cannot read ROM."); - close(fd); - goto done; - } - - FILE *f = fopen(ROM_FILE_NAME, "wb"); - if (f == NULL) { - ErrorAlert("Cannot open ROM file."); - close(fd); - goto done; - } - - if (fwrite(buf, 1, 0x400000, f) != 0x400000) { - ErrorAlert("Cannot write ROM."); - fclose(f); - close(fd); - goto done; - } - - InfoAlert("ROM saved."); - - fclose(f); - close(fd); -done: - PostMessage(B_QUIT_REQUESTED); -} diff --git a/SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc b/SheepShaver/src/BeOS/SaveROM/SaveROM.rsrc deleted file mode 100644 index a61919ba80a170f7ce863bf1ad107b503bfc093d..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4323 zcmeHJzfV(96h6f&rP24E(N+frH8D6QW?ns-6xt+7^FW7WT>UY0}-HVCQy(3rt zn>hVvJNZ83w3D0s5Rv~eBL7oF{%2gJO0i(alx@S-quaErI*MKyc5>5*x50OwMdZJT z$bS`)|E7U|PWonzY{R#%tGi>0;l%5r}tv*2g^iobY&t+cS@Q$4o6e5-HKUno~HUTNK*Di-)c^gjl+ zkMf_H%YE6tEL-~SJyXW`f_E12x1ilD#UTT}sLKuO)+AO1Y`M z86@CTx;2BvkqsELc^4%vVNeW*M!99uSC^+GL@q89kCT8I z#b8wWA|O!VTNdtCqe34Ms|TOy@H}t>kE8IE579&+KRkie$2>#M^^u}CP#Ey0b94FO z;zW=q9LY*6)_5~(XmWBCI{cdRDPZ)XSqM9`-#4?%nOTr}u>bP2 z!|3_Xr}Zy>JZXP}lZ7{<)35&eE|9=ca$>@jrPD)QZDjqh2rcIqF!>jk!NLe_rS(z|5;$w|?bZI$ZLZFFPmG z_?Opj)7(yTJMDpK5BxtpAn(!-i{h)SX=r{E@D*CREsDH{ueYga8LH`Kv)2_Ip9|1* zAu?N{H#BTpWrE4Lp<9534DHHPdfv~VZ4RHPqdmShVbQR1GxcceMx&wmfuTJyGZ$@N zx8Vb+m&g(269g{z@e;u+A*0g&rSbs}#LoL6B~=u~%s|B#aRomPf*>YK#VWp59Hhwa zB4Wb%;L@C+%%PHeo5V8}IlLCH<(n%o;bs1vyY zvc4tkYA+$&!np9y>zxO7wUauD>!39je}|6<=^rQ_%+rp69iDS+`~{anAoY<32vT}W zuDLem)H1kvhy-gXJ4m>+v&=DQg(p4|j~!(|=S&P&l0g4NDD*8YFfqi}Xck_g?wloaMkdy>tbcIubgmNmjvgZtc<(~xJCZOBj z-3(U_Ukq1AgJ+Sfe4L#3Ux|iCgTwvdvuHS4*}ir2+m8!2Wlu9uWT4x*`-rM^WDN`7 zZES|OySKx~>rXm&Hy@QZF*8QankiTh-)D6@-H>sl_phK~Vm -#include -#include -#include - -#include "about_window.h" -#include "video.h" -#include "version.h" -#include "user_strings.h" - - -// About window dimensions -static const BRect about_frame = BRect(0, 0, 383, 99); - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; - -// SheepShaver icon -static const uint8 sheep_icon[] = { - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x00, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0xda, 0x15, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x16, 0xff, 0x00, 0x00, 0x00, 0x16, 0xda, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, - 0x00, 0x1d, 0xda, 0x1e, 0x1e, 0x1e, 0xda, 0x16, 0x00, 0x00, 0x16, 0xda, 0x16, 0xda, 0x08, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x00, 0x0b, 0xff, 0xff, 0x11, 0x00, 0xda, - 0x1d, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0x16, 0x00, 0x00, 0x0c, 0xff, 0xff, 0xff, - 0xff, 0x0b, 0x00, 0x00, 0x16, 0x16, 0x00, 0x12, 0xfd, 0x1d, 0x0b, 0x00, 0x00, 0x1d, 0xfd, 0x1d, - 0xfd, 0x1e, 0xda, 0x1e, 0xda, 0x1e, 0xda, 0x3f, 0xda, 0x3f, 0xda, 0x15, 0x00, 0xff, 0xff, 0xff, - 0x16, 0x00, 0x17, 0x16, 0x00, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x16, 0x0f, 0x0b, 0x1d, - 0x1e, 0xfd, 0x1e, 0xda, 0x1e, 0xda, 0x3f, 0xda, 0x3f, 0xda, 0x1d, 0x5a, 0x15, 0xff, 0xff, 0xff, - 0x05, 0x17, 0x16, 0x00, 0x12, 0x1d, 0x00, 0x1d, 0xfd, 0x00, 0xfd, 0x00, 0x00, 0x16, 0x0b, 0x00, - 0x00, 0x0e, 0x1d, 0x3f, 0xda, 0x3f, 0xda, 0x1d, 0xda, 0x1b, 0x5a, 0x1b, 0x0f, 0x1d, 0xff, 0xff, - 0xff, 0x05, 0x00, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x00, 0x0f, 0x14, 0x14, - 0x16, 0x00, 0x15, 0xfd, 0x1d, 0xda, 0x1b, 0xda, 0x1b, 0x5a, 0x1b, 0x5a, 0x0f, 0x14, 0xff, 0xff, - 0xff, 0xff, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x12, 0x00, 0x16, 0x00, 0x0f, - 0x00, 0x1b, 0xfd, 0x1e, 0xfd, 0x1b, 0xda, 0x1b, 0x5a, 0x1b, 0x5a, 0x1b, 0x5a, 0x14, 0xff, 0xff, - 0xff, 0x00, 0x1d, 0xfd, 0x1d, 0xfd, 0x1d, 0xfd, 0x1a, 0xfd, 0x12, 0x00, 0x16, 0x1b, 0x16, 0x0e, - 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0x5a, 0x18, 0x00, 0x00, 0x5a, 0x1b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0xfd, 0x14, 0xfd, 0x14, 0xfd, 0x1d, 0xfd, 0x12, 0x00, 0x16, 0xfd, 0x1b, 0xfd, 0x1b, - 0xfd, 0x1b, 0xfd, 0x1e, 0xfd, 0x1b, 0x5a, 0x18, 0x5a, 0x00, 0x00, 0x1b, 0x9b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0x0f, 0xfd, 0x1d, 0xfd, 0x0f, 0xfd, 0x12, 0x00, 0x16, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, - 0x1b, 0xfd, 0x18, 0xfd, 0x1b, 0xf9, 0x18, 0x5a, 0x00, 0x12, 0x00, 0x9b, 0x1b, 0x00, 0xff, 0xff, - 0xff, 0x00, 0xfd, 0x0a, 0x0a, 0x0a, 0xfd, 0x10, 0x00, 0x1b, 0xfd, 0x1b, 0xfd, 0x1b, 0xfd, 0x18, - 0xfd, 0x15, 0xfa, 0x15, 0xf9, 0x18, 0x15, 0x00, 0x12, 0x9b, 0x00, 0x1b, 0x9b, 0x00, 0x15, 0x15, - 0xff, 0xff, 0x00, 0xfd, 0x1d, 0xfd, 0x1d, 0x00, 0x16, 0x00, 0x1b, 0xfd, 0x1b, 0xfd, 0x15, 0xfd, - 0x15, 0xfa, 0x15, 0xf9, 0x15, 0x16, 0x00, 0x0f, 0x9b, 0x12, 0x00, 0x9b, 0x1b, 0x00, 0x15, 0x15, - 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0xfa, 0x1d, 0x00, 0xfa, 0x1e, 0x00, 0x1e, 0xfa, 0x15, - 0xfa, 0x15, 0x16, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x9b, 0x00, 0x00, 0x00, 0x12, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x1d, 0xf9, 0x00, 0x3f, 0xfa, 0x00, 0xfa, 0x1b, 0x00, - 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x12, 0x15, 0x15, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0xf9, 0x1d, 0x00, 0xf9, 0x1b, 0x00, 0x1b, 0xf9, 0x00, - 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x1d, 0xf9, 0x00, 0x3f, 0xf9, 0x00, 0xf9, 0x1b, 0x00, - 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x16, 0x1d, 0x00, 0xf9, 0x1b, 0x00, 0x1b, 0xf9, 0x00, - 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x00, 0x16, 0xf9, 0x00, 0x1b, 0x16, 0x00, - 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, 0x00, 0x00, 0x00, 0x00, 0x12, 0xff, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x16, 0x00, 0x00, 0x16, 0x00, 0x16, 0x00, 0x16, - 0x15, 0x15, 0x15, 0x15, 0x00, 0x00, 0x15, 0x00, 0x0a, 0x19, 0x0a, 0x00, 0xff, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x12, 0x00, 0x00, 0x00, 0x16, 0xff, - 0xff, 0xff, 0xff, 0xff, 0x00, 0x0a, 0x00, 0x15, 0x00, 0x19, 0x1c, 0x18, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00, - 0x0f, 0xff, 0xff, 0xff, 0x00, 0x18, 0x11, 0x00, 0x15, 0x00, 0x1c, 0x18, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0x00, 0x00, 0x0b, 0x0b, - 0x00, 0x00, 0x0f, 0xff, 0x12, 0x00, 0x18, 0x19, 0x00, 0x15, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0x00, 0x14, 0x1e, 0xfd, 0x01, 0xfd, 0x14, - 0xfa, 0xf9, 0x00, 0xff, 0xff, 0x00, 0x0a, 0x19, 0x1c, 0x00, 0x18, 0x1c, 0x00, 0x00, 0xff, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0xfd, 0x1e, 0xf9, 0x1e, 0xfa, 0x1e, 0xf9, - 0x14, 0xfa, 0x00, 0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x0a, 0x1c, 0x00, 0x18, 0x00, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0x1e, 0xf9, 0x14, 0xfa, 0x1e, 0xf9, 0x1e, - 0xfd, 0x1e, 0x00, 0x15, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x00, 0x00, 0x18, 0x00, 0x1c, 0x00, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x13, 0x00, 0xfd, 0x1e, 0xfd, 0x14, 0xfd, 0x1e, 0xfd, - 0x1e, 0x01, 0x00, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x1c, 0x00, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00, 0x14, 0xfa, 0x01, 0xf9, 0x1e, 0xf9, 0x14, - 0x14, 0x00, 0x0f, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x00, 0x00, 0x15, 0x15, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x0f, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0xff, - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x15, 0x15, 0x15, 0x15, 0x15, 0x15, - 0x15, 0x15, 0x15, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff -}; - - -// View class -class AboutViewT : public BView { -public: - AboutViewT(BRect r) : BView(r, "", B_FOLLOW_NONE, B_WILL_DRAW) {} - - virtual void Draw(BRect update) - { - char str[256]; - sprintf(str, GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - - SetFont(be_bold_font); - SetDrawingMode(B_OP_OVER); - MovePenTo(20, 20); - DrawString(str); - SetFont(be_plain_font); - MovePenTo(20, 40); - DrawString(GetString(STR_ABOUT_TEXT2)); - MovePenTo(20, 60); - DrawString(B_UTF8_COPYRIGHT "1997-2008 Christian Bauer and Marc Hellwig"); - } - - virtual void MouseDown(BPoint point) - { - Window()->PostMessage(B_QUIT_REQUESTED); - } -}; - - -// 3D view class -class AboutView3D : public BGLView { -public: - AboutView3D(BRect r) : BGLView(r, "", B_FOLLOW_NONE, 0, BGL_RGB | BGL_DOUBLE) - { - rot_x = rot_y = 0; - - if (!VideoSnapshot(64, 64, texture)) { - uint8 *p = texture; - const uint8 *q = sheep_icon; - const color_map *cm = system_colors(); - for (int i=0; i<32*32; i++) { - uint8 red = cm->color_list[*q].red; - uint8 green = cm->color_list[*q].green; - uint8 blue = cm->color_list[*q++].blue; - p[0] = p[3] = p[64*3] = p[65*3] = red; - p[1] = p[4] = p[64*3+1] = p[65*3+1] = green; - p[2] = p[5] = p[64*3+2] = p[65*3+2] = blue; - p += 6; - if ((i & 31) == 31) - p += 64*3; - } - } - } - - virtual void AttachedToWindow(void) - { - BGLView::AttachedToWindow(); - LockGL(); - - glDisable(GL_DEPTH_TEST); - glDepthMask(GL_FALSE); - - glShadeModel(GL_SMOOTH); - - glMatrixMode(GL_PROJECTION); - glLoadIdentity(); - gluPerspective(30, 1, 0.5, 20); - - glMatrixMode(GL_MODELVIEW); - glLoadIdentity(); - - GLfloat light_color[4] = {1, 1, 1, 1}; - GLfloat light_dir[4] = {1, 2, 1.5, 1}; - glLightfv(GL_LIGHT0, GL_DIFFUSE, light_color); - glLightfv(GL_LIGHT0, GL_POSITION, light_dir); - glEnable(GL_LIGHT0); - glEnable(GL_LIGHTING); - - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT); - glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT); - glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); - glTexImage2D(GL_TEXTURE_2D, 0, 4, 64, 64, 0, GL_RGB, GL_UNSIGNED_BYTE, texture); - glEnable(GL_TEXTURE_2D); - - UnlockGL(); - - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "OpenGL Animation", B_NORMAL_PRIORITY, this); - resume_thread(tick_thread); - } - - virtual void DetachedFromWindow(void) - { - status_t l; - tick_thread_active = false; - wait_for_thread(tick_thread, &l); - - BGLView::DetachedFromWindow(); - } - - virtual void Draw(BRect update) - { - LockGL(); - glClear(GL_COLOR_BUFFER_BIT); - glBegin(GL_QUADS); - glNormal3d(0, 0, 1); - glTexCoord2f(0, 0); - glVertex3d(-1, 1, 0); - glTexCoord2f(1, 0); - glVertex3d(1, 1, 0); - glTexCoord2f(1, 1); - glVertex3d(1, -1, 0); - glTexCoord2f(0, 1); - glVertex3d(-1, -1, 0); - glEnd(); - SwapBuffers(); - UnlockGL(); - } - - static status_t tick_func(void *arg) - { - AboutView3D *obj = (AboutView3D *)arg; - while (obj->tick_thread_active) { - obj->rot_x += 2; - obj->rot_y += 2; - obj->LockGL(); - glMatrixMode(GL_MODELVIEW); - glLoadIdentity(); - glTranslatef(0, 0, -5); - glRotatef(obj->rot_x, 1, 0, 0); - glRotatef(obj->rot_y, 0, 1, 0); - obj->UnlockGL(); - if (obj->LockLooperWithTimeout(20000) == B_OK) { - obj->Draw(obj->Bounds()); - obj->UnlockLooper(); - } - snooze(16667); - } - return 0; - } - -private: - thread_id tick_thread; - bool tick_thread_active; - - float rot_x, rot_y; - uint8 texture[64*64*3]; -}; - - -// Window class -class AboutWindowT : public BWindow { -public: - AboutWindowT() : BWindow(about_frame, NULL, B_MODAL_WINDOW_LOOK, B_FLOATING_APP_WINDOW_FEEL, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_WILL_ACCEPT_FIRST_CLICK) - { - Lock(); - MoveTo(100, 100); - BRect r = Bounds(); - r.right = 100; - AboutView3D *view_3d = new AboutView3D(r); - AddChild(view_3d); - r = Bounds(); - r.left = 100; - AboutViewT *view = new AboutViewT(r); - AddChild(view); - view->SetHighColor(0, 0, 0); - view->SetViewColor(fill_color); - view->MakeFocus(); - Unlock(); - Show(); - } -}; - - -/* - * Open "About" window - */ - -void OpenAboutWindow(void) -{ - new AboutWindowT; -} diff --git a/SheepShaver/src/BeOS/audio_beos.cpp b/SheepShaver/src/BeOS/audio_beos.cpp deleted file mode 120000 index ce433abbb..000000000 --- a/SheepShaver/src/BeOS/audio_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/audio_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/clip_beos.cpp b/SheepShaver/src/BeOS/clip_beos.cpp deleted file mode 100644 index 953ed8040..000000000 --- a/SheepShaver/src/BeOS/clip_beos.cpp +++ /dev/null @@ -1,374 +0,0 @@ -/* - * clip_beos.cpp - Clipboard handling, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - -#include "clip.h" -#include "main.h" -#include "cpu_emulation.h" -#include "emul_op.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static bool we_put_this_data = false; // Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Be side -static BTranslatorRoster *roster; -static float input_cap = 0; -static translator_info input_info; -static float output_cap = 0; -static translator_id output_trans = 0; - - -/* - * Clipboard manager thread (for calling clipboard functions; this is not safe - * under R4 when running on the MacOS stack in kernel space) - */ - -// Message constants -const uint32 MSG_QUIT_CLIP_MANAGER = 'quit'; -const uint32 MSG_PUT_TEXT = 'ptxt'; - -static thread_id cm_thread = -1; -static sem_id cm_done_sem = -1; - -// Argument passing -static void *cm_scrap; -static int32 cm_length; - -static status_t clip_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Clipboard manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_CLIP_MANAGER: - return 0; - - case MSG_PUT_TEXT: - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - - // Convert text from Mac charset to UTF-8 - int32 dest_length = cm_length * 3; - int32 state = 0; - char *inbuf = new char[cm_length]; - memcpy(inbuf, cm_scrap, cm_length); // Copy to user space - char *outbuf = new char[dest_length]; - if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, inbuf, &cm_length, outbuf, &dest_length, &state) == B_OK) { - for (int i=0; iAddData("text/plain", B_MIME_TYPE, outbuf, dest_length); - be_clipboard->Commit(); - } else { - D(bug(" text conversion failed\n")); - } - delete[] outbuf; - delete[] inbuf; - be_clipboard->Unlock(); - } - break; - } - - // Acknowledge - release_sem(cm_done_sem); - } -} - - -/* - * Initialize clipboard - */ - -void ClipInit(void) -{ - // check if there is a translator that can handle the pict datatype - roster = BTranslatorRoster::Default(); - int32 num_translators, i,j; - translator_id *translators; - const char *translator_name, *trans_info; - int32 translator_version; - const translation_format *t_formats; - long t_num; - - roster->GetAllTranslators(&translators, &num_translators); - for (i=0;iGetTranslatorInfo(translators[i], &translator_name, - &trans_info, &translator_version); - D(bug("found translator %s: %s (%.2f)\n", translator_name, trans_info, - translator_version/100.)); - // does this translator support the pict datatype ? - roster->GetInputFormats(translators[i], &t_formats,&t_num); - //printf(" supports %d input formats \n",t_num); - for (j=0;jinput_cap) { - input_info.type = t_formats[j].type; - input_info.group = t_formats[j].group; - input_info.quality = t_formats[j].quality; - input_info.capability = t_formats[j].capability; - strcpy(input_info.MIME,t_formats[j].MIME); - strcpy(input_info.name,t_formats[j].name); - input_info.translator=translators[i]; - input_cap = t_formats[j].capability; - } - D(bug("matching input translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n", - t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type, - t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group, - t_formats[j].quality, - t_formats[j].capability,t_formats[j].MIME, - t_formats[j].name)); - } - - } - roster->GetOutputFormats(translators[i], &t_formats,&t_num); - //printf("and %d output formats \n",t_num); - for (j=0;joutput_cap) { - output_trans = translators[i]; - output_cap = t_formats[j].capability; - } - D(bug("matching output translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n", - t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type, - t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group, - t_formats[j].quality, - t_formats[j].capability,t_formats[j].MIME, - t_formats[j].name)); - } - } - } - delete [] translators; // clean up our droppings - - // Start clipboard manager thread - cm_done_sem = create_sem(0, "Clipboard Manager Done"); - cm_thread = spawn_thread(clip_manager, "Clipboard Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(cm_thread); -} - - -/* - * Deinitialize clipboard - */ - -void ClipExit(void) -{ - // Stop clipboard manager - if (cm_thread > 0) { - status_t l; - send_data(cm_thread, MSG_QUIT_CLIP_MANAGER, NULL, 0); - while (wait_for_thread(cm_thread, &l) == B_INTERRUPTED) ; - } - - // Delete semaphores - delete_sem(cm_done_sem); -} - - -/* - * Mac application wrote to clipboard - */ - -void PutScrap(uint32 type, void *scrap, int32 length) -{ - D(bug("PutScrap type %08lx, data %p, length %ld\n", type, scrap, length)); - if (we_put_this_data) { - we_put_this_data = false; - return; - } - if (length <= 0) - return; - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - cm_scrap = scrap; - cm_length = length; - while (send_data(cm_thread, MSG_PUT_TEXT, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(cm_done_sem) == B_INTERRUPTED) ; - break; - - case 'PICT': - D(bug(" clipping PICT\n")); - //!! this has to be converted to use the Clipboard Manager -#if 0 - if (be_clipboard->Lock()) { - be_clipboard->Clear(); - BMessage *clipper = be_clipboard->Data(); - // Waaaah! This crashes! - if (input_cap > 0) { // if there is an converter for PICT datatype convert data to bitmap. - BMemoryIO *in_buffer = new BMemoryIO(scrap, length); - BMallocIO *out_buffer = new BMallocIO(); - status_t result=roster->Translate(in_buffer,&input_info,NULL,out_buffer,B_TRANSLATOR_BITMAP); - clipper->AddData("image/x-be-bitmap", B_MIME_TYPE, out_buffer->Buffer(), out_buffer->BufferLength()); - D(bug("conversion result:%08x buffer_size:%d\n",result,out_buffer->BufferLength())); - delete in_buffer; - delete out_buffer; - } - clipper->AddData("image/pict", B_MIME_TYPE, scrap, length); - be_clipboard->Commit(); - be_clipboard->Unlock(); - } -#endif - break; - } -} - -/* - * Mac application zeroes clipboard - */ - -void ZeroScrap() -{ - -} - -/* - * Mac application reads clipboard - */ - -void GetScrap(void **handle, uint32 type, int32 offset) -{ - M68kRegisters r; - D(bug("GetScrap handle %p, type %08lx, offset %ld\n", handle, type, offset)); - return; //!! GetScrap is currently broken (should use Clipboard Manager) - //!! replace with clipboard notification in BeOS R4.1 - - switch (type) { - case 'TEXT': - D(bug(" clipping TEXT\n")); - if (be_clipboard->Lock()) { - BMessage *clipper = be_clipboard->Data(); - char *clip; - ssize_t length; - - // Check if we already copied this data - if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE)) - return; - bigtime_t cookie = system_time(); - clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); - - // No, is there text in it? - if (clipper->FindData("text/plain", B_MIME_TYPE, &clip, &length) == B_OK) { - D(bug(" text/plain found\n")); - - // Convert text from UTF-8 to Mac charset - int32 src_length = length; - int32 dest_length = length; - int32 state = 0; - char *outbuf = new char[dest_length]; - if (convert_from_utf8(B_MAC_ROMAN_CONVERSION, clip, &src_length, outbuf, &dest_length, &state) == B_OK) { - for (int i=0; iCommit(); - be_clipboard->Unlock(); - } - break; - - case 'PICT': - D(bug(" clipping PICT\n")); - if (be_clipboard->Lock()) { - BMessage *clipper = be_clipboard->Data(); - char *clip; - ssize_t length; - - // Check if we already copied this data - if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE)) - return; - bigtime_t cookie = system_time(); - clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); - - static uint16 proc2[] = { - 0x598f, // subq.l #4,sp - 0xa9fc, // ZeroScrap() - 0x2f3c, 0, 0, // move.l #length,-(sp) - 0x2f3c, 'PI', 'CT', // move.l #'PICT',-(sp) - 0x2f3c, 0, 0, // move.l #buf,-(sp) - 0xa9fe, // PutScrap() - 0x588f, // addq.l #4,sp - M68K_RTS - }; - - // No, is there a pict ? - if (clipper->FindData("image/pict", B_MIME_TYPE, &clip, &length) == B_OK ) { - D(bug(" image/pict found\n")); - - // Add pict to Mac clipboard - *(int32 *)(proc2 + 3) = length; - *(char **)(proc2 + 9) = clip; - we_put_this_data = true; - Execute68k((uint32)proc2, &r); -#if 0 - // No, is there a bitmap ? - } else if (clipper->FindData("image/x-be-bitmap", B_MIME_TYPE, &clip, &length) == B_OK || output_cap > 0) { - D(bug(" image/x-be-bitmap found\nstarting conversion to PICT\n")); - - BMemoryIO *in_buffer = new BMemoryIO(clip, length); - BMallocIO *out_buffer = new BMallocIO(); - status_t result=roster->Translate(output_trans,in_buffer,NULL,out_buffer,'PICT'); - D(bug("result of conversion:%08x buffer_size:%d\n",result,out_buffer->BufferLength())); - - // Add pict to Mac clipboard - *(int32 *)(proc2 + 3) = out_buffer->BufferLength(); - *(char **)(proc2 + 9) = (char *)out_buffer->Buffer(); - we_put_this_data = true; - Execute68k(proc2, &r); - - delete in_buffer; - delete out_buffer; -#endif - } - be_clipboard->Commit(); - be_clipboard->Unlock(); - } - break; - } -} diff --git a/SheepShaver/src/BeOS/ether_beos.cpp b/SheepShaver/src/BeOS/ether_beos.cpp deleted file mode 100644 index 740f9638d..000000000 --- a/SheepShaver/src/BeOS/ether_beos.cpp +++ /dev/null @@ -1,400 +0,0 @@ -/* - * ether_beos.cpp - SheepShaver Ethernet Device Driver (DLPI), BeOS specific stuff - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" -#include "ether.h" -#include "ether_defs.h" -#include "prefs.h" -#include "xlowmem.h" -#include "main.h" -#include "user_strings.h" -#include "sheep_net.h" - -#define DEBUG 0 -#include "debug.h" - -#define STATISTICS 0 -#define MONITOR 0 - - -// Global variables -static thread_id read_thread; // Packet receiver thread -static bool ether_thread_active = true; // Flag for quitting the receiver thread - -static area_id buffer_area; // Packet buffer area -static net_buffer *net_buffer_ptr; // Pointer to packet buffer -static sem_id read_sem, write_sem; // Semaphores to trigger packet reading/writing -static uint32 rd_pos; // Current read position in packet buffer -static uint32 wr_pos; // Current write position in packet buffer - -static bool net_open = false; // Flag: initialization succeeded, network device open - - -// Prototypes -static status_t AO_receive_thread(void *data); - - -/* - * Initialize ethernet - */ - -void EtherInit(void) -{ - // Do nothing if the user disabled the network - if (PrefsFindBool("nonet")) - return; - - // find net-server team -i_wanna_try_that_again: - bool found_add_on = false; - team_info t_info; - int32 t_cookie = 0; - image_info i_info; - int32 i_cookie = 0; - while (get_next_team_info(&t_cookie, &t_info) == B_NO_ERROR) { - if (strstr(t_info.args,"net_server")!=NULL) { - // check if sheep_net add-on is loaded - while (get_next_image_info(t_info.team,&i_cookie,&i_info) == B_NO_ERROR) { - if (strstr(i_info.name,"sheep_net")!=NULL) { - found_add_on = true; - break; - } - } - } - if (found_add_on) break; - } - if (!found_add_on) { - - // Search for sheep_net in network config file - char str[1024]; - bool sheep_net_found = false; - FILE *fin = fopen("/boot/home/config/settings/network", "r"); - while (!feof(fin)) { - fgets(str, 1024, fin); - if (strstr(str, "PROTOCOLS")) - if (strstr(str, "sheep_net")) - sheep_net_found = true; - } - fclose(fin); - - // It was found, so something else must be wrong - if (sheep_net_found) { - WarningAlert(GetString(STR_NO_NET_ADDON_WARN)); - return; - } - - // Not found, inform the user - if (!ChoiceAlert(GetString(STR_NET_CONFIG_MODIFY_WARN), GetString(STR_OK_BUTTON), GetString(STR_CANCEL_BUTTON))) - return; - - // Change the network config file and restart the network - fin = fopen("/boot/home/config/settings/network", "r"); - FILE *fout = fopen("/boot/home/config/settings/network.2", "w"); - bool global_found = false; - bool modified = false; - while (!feof(fin)) { - str[0] = 0; - fgets(str, 1024, fin); - if (!global_found && strstr(str, "GLOBAL:")) { - global_found = true; - } else if (global_found && !modified && strstr(str, "PROTOCOLS")) { - str[strlen(str)-1] = 0; - strcat(str, " sheep_net\n"); - modified = true; - } else if (global_found && !modified && strlen(str) > 2 && str[strlen(str) - 2] == ':') { - fputs("\tPROTOCOLS = sheep_net\n", fout); - modified = true; - } - fputs(str, fout); - } - if (!modified) - fputs("\tPROTOCOLS = sheep_net\n", fout); - fclose(fout); - fclose(fin); - remove("/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network", "/boot/home/config/settings/network.orig"); - rename("/boot/home/config/settings/network.2", "/boot/home/config/settings/network"); - - app_info ai; - if (be_roster->GetAppInfo("application/x-vnd.Be-NETS", &ai) == B_OK) { - BMessenger msg(NULL, ai.team); - if (msg.IsValid()) { - while (be_roster->IsRunning("application/x-vnd.Be-NETS")) { - msg.SendMessage(B_QUIT_REQUESTED); - snooze(500000); - } - } - } - BPath path; - find_directory(B_BEOS_BOOT_DIRECTORY, &path); - path.Append("Netscript"); - char *argv[3] = {"/bin/sh", (char *)path.Path(), NULL}; - thread_id net_server = load_image(2, argv, environ); - resume_thread(net_server); - status_t l; - wait_for_thread(net_server, &l); - goto i_wanna_try_that_again; - } - - // Set up communications with add-on - area_id handler_buffer; - if ((handler_buffer = find_area("packet buffer")) < B_NO_ERROR) { - WarningAlert(GetString(STR_NET_ADDON_INIT_FAILED)); - return; - } - if ((buffer_area = clone_area("local packet buffer", &net_buffer_ptr, B_ANY_ADDRESS, B_READ_AREA | B_WRITE_AREA, handler_buffer)) < B_NO_ERROR) { - D(bug("EtherInit: couldn't clone packet area\n")); - WarningAlert(GetString(STR_NET_ADDON_CLONE_FAILED)); - return; - } - if ((read_sem = create_sem(0, "ether read")) < B_NO_ERROR) { - printf("FATAL: can't create Ethernet semaphore\n"); - return; - } - net_buffer_ptr->read_sem = read_sem; - write_sem = net_buffer_ptr->write_sem; - read_thread = spawn_thread(AO_receive_thread, "ether read", B_URGENT_DISPLAY_PRIORITY, NULL); - resume_thread(read_thread); - for (int i=0; iwrite[i].cmd = IN_USE | (ACTIVATE_SHEEP_NET << 8); - rd_pos = wr_pos = 0; - release_sem(write_sem); - - // Everything OK - net_open = true; -} - - -/* - * Exit ethernet - */ - -void EtherExit(void) -{ - if (net_open) { - - // Close communications with add-on - for (int i=0; iwrite[i].cmd = IN_USE | (DEACTIVATE_SHEEP_NET << 8); - release_sem(write_sem); - - // Quit receiver thread - ether_thread_active = false; - status_t result; - release_sem(read_sem); - while (wait_for_thread(read_thread, &result) == B_INTERRUPTED) ; - - delete_sem(read_sem); - delete_area(buffer_area); - } - -#if STATISTICS - // Show statistics - printf("%ld messages put on write queue\n", num_wput); - printf("%ld error acks\n", num_error_acks); - printf("%ld packets transmitted (%ld raw, %ld normal)\n", num_tx_packets, num_tx_raw_packets, num_tx_normal_packets); - printf("%ld tx packets dropped because buffer full\n", num_tx_buffer_full); - printf("%ld packets received\n", num_rx_packets); - printf("%ld packets passed upstream (%ld Fast Path, %ld normal)\n", num_rx_fastpath + num_unitdata_ind, num_rx_fastpath, num_unitdata_ind); - printf("EtherIRQ called %ld times\n", num_ether_irq); - printf("%ld rx packets dropped due to low memory\n", num_rx_no_mem); - printf("%ld rx packets dropped because no stream found\n", num_rx_dropped); - printf("%ld rx packets dropped because stream not ready\n", num_rx_stream_not_ready); - printf("%ld rx packets dropped because no memory for unitdata_ind\n", num_rx_no_unitdata_mem); -#endif -} - - -/* - * Ask add-on for ethernet hardware address - */ - -void AO_get_ethernet_address(uint32 arg) -{ - uint8 *addr = Mac2HostAddr(arg); - if (net_open) { - OTCopy48BitAddress(net_buffer_ptr->ether_addr, addr); - } else { - addr[0] = 0x12; - addr[1] = 0x34; - addr[2] = 0x56; - addr[3] = 0x78; - addr[4] = 0x9a; - addr[5] = 0xbc; - } - D(bug("AO_get_ethernet_address: got address %02x%02x%02x%02x%02x%02x\n", addr[0], addr[1], addr[2], addr[3], addr[4], addr[5])); -} - - -/* - * Tell add-on to enable multicast address - */ - -void AO_enable_multicast(uint32 addr) -{ - D(bug("AO_enable_multicast\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't enable multicast address\n")); - } else { - Mac2host_memcpy(p->data, addr, 6); - p->length = 6; - p->cmd = IN_USE | (ADD_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - } -} - - -/* - * Tell add-on to disable multicast address - */ - -void AO_disable_multicast(uint32 addr) -{ - D(bug("AO_disable_multicast\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't enable multicast address\n")); - } else { - Mac2host_memcpy(p->data, addr, 6); - p->length = 6; - p->cmd = IN_USE | (REMOVE_MULTICAST << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - D(bug("WARNING: couldn't disable multicast address\n")); - } -} - - -/* - * Tell add-on to transmit one packet - */ - -void AO_transmit_packet(uint32 mp_arg) -{ - D(bug("AO_transmit_packet\n")); - if (net_open) { - net_packet *p = &net_buffer_ptr->write[wr_pos]; - if (p->cmd & IN_USE) { - D(bug("WARNING: couldn't transmit packet (buffer full)\n")); - num_tx_buffer_full++; - } else { - D(bug(" write packet pos %d\n", i)); - num_tx_packets++; - - // Copy packet to buffer - uint8 *start; - uint8 *bp = start = p->data; - mblk_t *mp = Mac2HostAddr(mp_arg); - while (mp) { - uint32 size = mp->b_wptr - mp->b_rptr; - memcpy(bp, mp->b_rptr, size); - bp += size; - mp = mp->b_cont; - } - -#if MONITOR - bug("Sending Ethernet packet:\n"); - for (int i=0; i<(uint32)(bp - start); i++) { - bug("%02lx ", start[i]); - } - bug("\n"); -#endif - - // Notify add-on - p->length = (uint32)(bp - start); - p->cmd = IN_USE | (SHEEP_PACKET << 8); - wr_pos = (wr_pos + 1) % WRITE_PACKET_COUNT; - release_sem(write_sem); - } - } -} - - -/* - * Packet reception thread - */ - -static status_t AO_receive_thread(void *data) -{ - while (ether_thread_active) { - if (net_buffer_ptr->read[rd_pos].cmd & IN_USE) { - if (ether_driver_opened) { - D(bug(" packet received, triggering Ethernet interrupt\n")); - SetInterruptFlag(INTFLAG_ETHER); - TriggerInterrupt(); - } - } - acquire_sem_etc(read_sem, 1, B_TIMEOUT, 25000); - } - return 0; -} - - -/* - * Ethernet interrupt - */ - -void EtherIRQ(void) -{ - D(bug("EtherIRQ\n")); - num_ether_irq++; - OTEnterInterrupt(); - - // Send received packets to OpenTransport - net_packet *p = &net_buffer_ptr->read[rd_pos]; - while (p->cmd & IN_USE) { - if ((p->cmd >> 8) == SHEEP_PACKET) { - num_rx_packets++; - D(bug(" read packet pos %d\n", i)); - uint32 size = p->length; - -#if MONITOR - bug("Receiving Ethernet packet:\n"); - for (int i=0; idata[i]); - } - bug("\n"); -#endif - - // Wrap packet in message block - //!! maybe use esballoc() - mblk_t *mp; - if ((mp = allocb(size, 0)) != NULL) { - D(bug(" packet data at %p\n", (void *)mp->b_rptr)); - memcpy(mp->b_rptr, p->data, size); - mp->b_wptr += size; - ether_packet_received(mp); - } else { - D(bug("WARNING: Cannot allocate mblk for received packet\n")); - num_rx_no_mem++; - } - } - p->cmd = 0; // Free packet - rd_pos = (rd_pos + 1) % READ_PACKET_COUNT; - p = &net_buffer_ptr->read[rd_pos]; - } - OTLeaveInterrupt(); -} diff --git a/SheepShaver/src/BeOS/extfs_beos.cpp b/SheepShaver/src/BeOS/extfs_beos.cpp deleted file mode 120000 index e7cec3dcd..000000000 --- a/SheepShaver/src/BeOS/extfs_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/extfs_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/main_beos.cpp b/SheepShaver/src/BeOS/main_beos.cpp deleted file mode 100644 index 551cd5180..000000000 --- a/SheepShaver/src/BeOS/main_beos.cpp +++ /dev/null @@ -1,2015 +0,0 @@ -/* - * main_beos.cpp - Emulation core, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 - */ - -/* - * NOTES: - * - * SheepShaver uses three run-time environments, reflected by the value of XLM_RUN_MODE. - * The two modes which are also present in the original MacOS, are: - * MODE_68K - 68k emulator is active - * MODE_NATIVE - 68k emulator is inactive - * In the original MacOS, these two modes have different memory mappings and exception - * tables. Under SheepShaver, the only difference is the handling of interrupts (see below). - * SheepShaver extends the 68k emulator with special opcodes (EMUL_OP) to perform faster - * mode switches when patching 68k routines with PowerPC code and adds a third run mode: - * MODE_EMUL_OP - 68k emulator active, but native register usage - * - * Switches between MODE_68K and MODE_NATIVE are only done with the Mixed Mode Manager - * (via nanokernel patches). The switch from MODE_68K to MODE_EMUL_OP occurs when executin - * one of the EMUL_OP 68k opcodes. When the opcode routine is done, it returns to MODE_68K. - * - * The Execute68k() routine allows EMUL_OP routines to execute 68k subroutines. It switches - * from MODE_EMUL_OP back to MODE_68K, so it must not be used by native routines (executing - * in MODE_NATIVE) nor by any other thread than the emul_thread (because the 68k emulator - * is not reentrant). When the 68k subroutine returns, it switches back to MODE_EMUL_OP. - * It is OK for a 68k routine called with Execute68k() to contain an EMUL_OP opcode. - * - * The handling of interrupts depends on the current run mode: - * MODE_68K - The USR1 signal handler sets one bit in the processor's CR. The 68k emulator - * will then execute the 68k interrupt routine when fetching the next instruction. - * MODE_NATIVE - The USR1 signal handler switches back to the original stack (signals run - * on a separate signal stack) and enters the External Interrupt routine in the - * nanokernel. - * MODE_EMUL_OP - The USR1 signal handler directly executes the 68k interrupt routine - * with Execute68k(). Before doing this, it must first check the current 68k interrupt - * level which is stored in XLM_68K_R25. This variable is set to the current level - * when entering EMUL_OP mode. Execute68k() also uses it to restore the level so that - * Execute68k()'d routines will run at the same interrupt level as the EMUL_OP routine - * it was called from. - */ - -#include -#include -#include -#include -#include -#include -#include - -#include "sysdeps.h" -#include "main.h" -#include "version.h" -#include "prefs.h" -#include "prefs_editor.h" -#include "cpu_emulation.h" -#include "emul_op.h" -#include "xlowmem.h" -#include "xpram.h" -#include "timer.h" -#include "adb.h" -#include "video.h" -#include "sys.h" -#include "macos_util.h" -#include "rom_patches.h" -#include "user_strings.h" - -#include "sheep_driver.h" - -#define DEBUG 0 -#include "debug.h" - -// Enable Execute68k() safety checks? -#define SAFE_EXEC_68K 0 - -// Save FP regs in Execute68k()? -#define SAVE_FP_EXEC_68K 0 - -// Interrupts in EMUL_OP mode? -#define INTERRUPTS_IN_EMUL_OP_MODE 1 - -// Interrupts in native mode? -#define INTERRUPTS_IN_NATIVE_MODE 1 - - -// Constants -const char APP_SIGNATURE[] = "application/x-vnd.cebix-SheepShaver"; -const char ROM_FILE_NAME[] = "ROM"; -const char ROM_FILE_NAME2[] = "Mac OS ROM"; -const char KERNEL_AREA_NAME[] = "Macintosh Kernel Data"; -const char KERNEL_AREA2_NAME[] = "Macintosh Kernel Data 2"; -const char RAM_AREA_NAME[] = "Macintosh RAM"; -const char ROM_AREA_NAME[] = "Macintosh ROM"; -const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; -const char DR_EMULATOR_AREA_NAME[] = "Macintosh DR Emulator"; -const char SHEEP_AREA_NAME[] = "SheepShaver Virtual Stack"; - -const uintptr ROM_BASE = 0x40800000; // Base address of ROM - -const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack - -const uint32 MSG_START = 'strt'; // Emulator start message - - -// Application object -class SheepShaver : public BApplication { -public: - SheepShaver() : BApplication(APP_SIGNATURE) - { - // Find application directory and cwd to it - app_info the_info; - GetAppInfo(&the_info); - BEntry the_file(&the_info.ref); - BEntry the_dir; - the_file.GetParent(&the_dir); - BPath the_path; - the_dir.GetPath(&the_path); - chdir(the_path.Path()); - - // Initialize other variables - sheep_fd = -1; - emulator_data = NULL; - kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = dr_emulator_area = -1; - emul_thread = nvram_thread = tick_thread = -1; - ReadyForSignals = false; - AllowQuitting = true; - NVRAMThreadActive = true; - TickThreadActive = true; - memset(last_xpram, 0, XPRAM_SIZE); - } - virtual void ReadyToRun(void); - virtual void MessageReceived(BMessage *msg); - void StartEmulator(void); - virtual bool QuitRequested(void); - virtual void Quit(void); - - thread_id emul_thread; // Emulator thread - thread_id nvram_thread; // NVRAM watchdog thread - thread_id tick_thread; // 60Hz thread - - KernelData *kernel_data; // Pointer to Kernel Data - EmulatorData *emulator_data; - - bool ReadyForSignals; // Flag: emul_thread ready to receive signals - bool AllowQuitting; // Flag: Alt-Q quitting allowed - bool NVRAMThreadActive; // nvram_thread will exit when this is false - bool TickThreadActive; // tick_thread will exit when this is false - - uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes - -private: - static status_t emul_func(void *arg); - static status_t nvram_func(void *arg); - static status_t tick_func(void *arg); - static void sigusr1_invoc(int sig, void *arg, vregs *r); - void sigusr1_handler(vregs *r); - static void sigsegv_invoc(int sig, void *arg, vregs *r); - static void sigill_invoc(int sig, void *arg, vregs *r); - void jump_to_rom(uint32 entry); - - void init_rom(void); - void load_rom(void); - - int sheep_fd; // FD of sheep driver - - area_id kernel_area; // Kernel Data area ID - area_id kernel_area2; // Alternate Kernel Data area ID - area_id rom_area; // ROM area ID - area_id ram_area; // RAM area ID - area_id dr_cache_area; // DR Cache area ID - area_id dr_emulator_area; // DR Emulator area ID - - struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) - struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) - struct sigaction sigill_action; // Illegal instruction exception signal (of emulator thread) - - // Exceptions - class area_error {}; - class file_open_error {}; - class file_read_error {}; - class rom_size_error {}; -}; - - -// Global variables -SheepShaver *the_app; // Pointer to application object -#if !EMULATED_PPC -void *TOC; // TOC pointer -#endif -uint32 RAMBase; // Base address of Mac RAM -uint32 RAMSize; // Size of Mac RAM -uint32 ROMBase; // Base address of Mac ROM -uint32 KernelDataAddr; // Address of Kernel Data -uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM -uint32 DRCacheAddr; // Address of DR Cache -uint32 DREmulatorAddr; // Address of DR Emulator -uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -system_info SysInfo; // System information -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) - -static void *sig_stack = NULL; // Stack for signal handlers -static void *extra_stack = NULL; // Stack for SIGSEGV inside interrupt handler -uint32 SheepMem::page_size; // Size of a native page -uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros -uintptr SheepMem::base; // Address of SheepShaver data -uintptr SheepMem::proc; // Bottom address of SheepShave procedures -uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) -static area_id SheepMemArea; // SheepShaver data area ID - - -// Prototypes -static void sigsegv_handler(vregs *r); -static void sigill_handler(vregs *r); - - -/* - * Create application object and start it - */ - -int main(int argc, char **argv) -{ - tzset(); - the_app = new SheepShaver(); - the_app->Run(); - delete the_app; - return 0; -} - - -/* - * Run application - */ - -#if !EMULATED_PPC -static asm void *get_toc(void) -{ - mr r3,r2 - blr -} -#endif - -void SheepShaver::ReadyToRun(void) -{ - // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); - -#if !EMULATED_PPC - // Get TOC pointer - TOC = get_toc(); -#endif - - // Get system info - get_system_info(&SysInfo); - switch (SysInfo.cpu_type) { - case B_CPU_PPC_601: - PVR = 0x00010000; - break; - case B_CPU_PPC_603: - PVR = 0x00030000; - break; - case B_CPU_PPC_603e: - PVR = 0x00060000; - break; - case B_CPU_PPC_604: - PVR = 0x00040000; - break; - case B_CPU_PPC_604e: - PVR = 0x00090000; - break; - case B_CPU_PPC_750: - PVR = 0x00080000; - break; - default: - PVR = 0x00040000; - break; - } - CPUClockSpeed = SysInfo.cpu_clock_speed; - BusClockSpeed = SysInfo.bus_clock_speed; - TimebaseSpeed = BusClockSpeed / 4; - - // Delete old areas - area_id old_kernel_area = find_area(KERNEL_AREA_NAME); - if (old_kernel_area > 0) - delete_area(old_kernel_area); - area_id old_kernel2_area = find_area(KERNEL_AREA2_NAME); - if (old_kernel2_area > 0) - delete_area(old_kernel2_area); - area_id old_ram_area = find_area(RAM_AREA_NAME); - if (old_ram_area > 0) - delete_area(old_ram_area); - area_id old_rom_area = find_area(ROM_AREA_NAME); - if (old_rom_area > 0) - delete_area(old_rom_area); - area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); - if (old_dr_cache_area > 0) - delete_area(old_dr_cache_area); - area_id old_dr_emulator_area = find_area(DR_EMULATOR_AREA_NAME); - if (old_dr_emulator_area > 0) - delete_area(old_dr_emulator_area); - - // Read preferences - int argc = 0; - char **argv = NULL; - PrefsInit(NULL, argc, argv); - - // Init system routines - SysInit(); - - // Test amount of RAM available for areas - if (SysInfo.max_pages * B_PAGE_SIZE < 16 * 1024 * 1024) { - ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Show preferences editor (or start emulator directly) - if (!PrefsFindBool("nogui")) - PrefsEditor(MSG_START); - else - PostMessage(MSG_START); -} - - -/* - * Message received - */ - -void SheepShaver::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_START: - StartEmulator(); - break; - default: - BApplication::MessageReceived(msg); - } -} - - -/* - * Start emulator - */ - -void SheepShaver::StartEmulator(void) -{ - char str[256]; - - // Open sheep driver and remap low memory - sheep_fd = open("/dev/sheep", 0); - if (sheep_fd < 0) { - sprintf(str, GetString(STR_NO_SHEEP_DRIVER_ERR), strerror(sheep_fd), sheep_fd); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - status_t res = ioctl(sheep_fd, SHEEP_UP); - if (res < 0) { - sprintf(str, GetString(STR_SHEEP_UP_ERR), strerror(res), res); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create areas for Kernel Data - kernel_data = (KernelData *)KERNEL_DATA_BASE; - kernel_area = create_area(KERNEL_AREA_NAME, &kernel_data, B_EXACT_ADDRESS, KERNEL_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (kernel_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area), kernel_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - emulator_data = &kernel_data->ed; - KernelDataAddr = (uint32)kernel_data; - D(bug("Kernel Data area %ld at %p, Emulator Data at %p\n", kernel_area, kernel_data, emulator_data)); - - void *kernel_data2 = (void *)KERNEL_DATA2_BASE; - kernel_area2 = clone_area(KERNEL_AREA2_NAME, &kernel_data2, B_EXACT_ADDRESS, B_READ_AREA | B_WRITE_AREA, kernel_area); - if (kernel_area2 < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(kernel_area2), kernel_area2); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("Kernel Data 2 area %ld at %p\n", kernel_area2, kernel_data2)); - - // Create area for SheepShaver data - if (!SheepMem::Init()) { - sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR), strerror(SheepMemArea), SheepMemArea); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create area for Mac RAM - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 8*1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 8*1024*1024; - } - - RAMBase = 0x10000000; - ram_area = create_area(RAM_AREA_NAME, (void **)&RAMBase, B_BASE_ADDRESS, RAMSize, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (ram_area < 0) { - sprintf(str, GetString(STR_NO_RAM_AREA_ERR), strerror(ram_area), ram_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - RAMBaseHost = (uint8 *)RAMBase; - D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); - - // Create area and load Mac ROM - try { - init_rom(); - } catch (area_error) { - ErrorAlert(GetString(STR_NO_ROM_AREA_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_open_error) { - ErrorAlert(GetString(STR_NO_ROM_FILE_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (file_read_error) { - ErrorAlert(GetString(STR_ROM_FILE_READ_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } catch (rom_size_error) { - ErrorAlert(GetString(STR_ROM_SIZE_ERR)); - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Create area for DR Cache - DRCacheAddr = DR_CACHE_BASE; - dr_cache_area = create_area(DR_CACHE_AREA_NAME, (void **)&DRCacheAddr, B_EXACT_ADDRESS, DR_CACHE_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_cache_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_cache_area), dr_cache_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); - - // Create area for DR Emulator - DREmulatorAddr = DR_EMULATOR_BASE; - dr_emulator_area = create_area(DR_EMULATOR_AREA_NAME, (void **)&DREmulatorAddr, B_EXACT_ADDRESS, DR_EMULATOR_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (dr_emulator_area < 0) { - sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_emulator_area), dr_emulator_area); - ErrorAlert(str); - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("DR Emulator area %ld at %p\n", dr_emulator_area, DREmulatorAddr)); - - // Initialize everything - if (!InitAll(NULL)) { - PostMessage(B_QUIT_REQUESTED); - return; - } - D(bug("Initialization complete\n")); - - // Clear caches (as we loaded and patched code) and write protect ROM -#if !EMULATED_PPC - clear_caches(ROMBaseHost, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); -#endif - set_area_protection(rom_area, B_READ_AREA); - - // Initialize extra low memory - D(bug("Initializing extra Low Memory...\n")); - WriteMacInt32(XLM_SHEEP_OBJ, (uint32)this); // Pointer to SheepShaver object - D(bug("Extra Low Memory initialized\n")); - - // Disallow quitting with Alt-Q from now on - AllowQuitting = false; - - // Start 60Hz interrupt - tick_thread = spawn_thread(tick_func, "60Hz", B_URGENT_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Start NVRAM watchdog thread - memcpy(last_xpram, XPRAM, XPRAM_SIZE); - nvram_thread = spawn_thread(nvram_func, "NVRAM Watchdog", B_LOW_PRIORITY, this); - resume_thread(nvram_thread); - - // Start emulator thread - emul_thread = spawn_thread(emul_func, "MacOS", B_NORMAL_PRIORITY, this); - resume_thread(emul_thread); -} - - -/* - * Quit requested - */ - -bool SheepShaver::QuitRequested(void) -{ - if (AllowQuitting) - return BApplication::QuitRequested(); - else - return false; -} - -void SheepShaver::Quit(void) -{ - status_t l; - - // Stop 60Hz interrupt - if (tick_thread > 0) { - TickThreadActive = false; - wait_for_thread(tick_thread, &l); - } - - // Stop NVRAM watchdog - if (nvram_thread > 0) { - status_t l; - NVRAMThreadActive = false; - suspend_thread(nvram_thread); // Wake thread up from snooze() - snooze(1000); - resume_thread(nvram_thread); - while (wait_for_thread(nvram_thread, &l) == B_INTERRUPTED) ; - } - - // Wait for emulator thread to finish - if (emul_thread > 0) - wait_for_thread(emul_thread, &l); - - // Deinitialize everything - ExitAll(); - - // Delete SheepShaver globals - SheepMem::Exit(); - - // Delete DR Emulator area - if (dr_emulator_area >= 0) - delete_area(dr_emulator_area); - - // Delete DR Cache area - if (dr_cache_area >= 0) - delete_area(dr_cache_area); - - // Delete ROM area - if (rom_area >= 0) - delete_area(rom_area); - - // Delete RAM area - if (ram_area >= 0) - delete_area(ram_area); - - // Delete Kernel Data area2 - if (kernel_area2 >= 0) - delete_area(kernel_area2); - if (kernel_area >= 0) - delete_area(kernel_area); - - // Unmap low memory and close sheep driver - if (sheep_fd >= 0) { - ioctl(sheep_fd, SHEEP_DOWN); - close(sheep_fd); - } - - // Exit system routines - SysExit(); - - // Exit preferences - PrefsExit(); - - BApplication::Quit(); -} - - -/* - * Create area for ROM (sets rom_area) and load ROM file - * - * area_error : Cannot create area - * file_open_error: Cannot open ROM file - * file_read_error: Cannot read ROM file - */ - -void SheepShaver::init_rom(void) -{ - // Size of a native page - page_size = B_PAGE_SIZE; - - // Create area for ROM - ROMBase = ROM_BASE; - rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBase, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (rom_area < 0) - throw area_error(); - ROMBaseHost = (uint8 *)ROMBase; - D(bug("ROM area %ld at %p\n", rom_area, rom_addr)); - - // Load ROM - load_rom(); -} - - -/* - * Load ROM file - * - * file_open_error: Cannot open ROM file (nor use built-in ROM) - * file_read_error: Cannot read ROM file - */ - -void SheepShaver::load_rom(void) -{ - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Try to open ROM file - BFile file(rom_path && *rom_path ? rom_path : ROM_FILE_NAME, B_READ_ONLY); - if (file.InitCheck() != B_NO_ERROR) { - - // Failed, then ask memory_mess driver for ROM - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = read(sheep_fd, (void *)rom, ROM_SIZE); - if (actual == ROM_SIZE) { - memcpy(ROMBaseHost, rom, ROM_SIZE); - delete[] rom; - return; - } else - throw file_open_error(); - } - - printf(GetString(STR_READING_ROM_FILE)); - - // Get file size - off_t rom_size = 0; - file.GetSize(&rom_size); - - uint8 *rom = new uint8[ROM_SIZE]; // Reading directly into the area doesn't work - ssize_t actual = file.Read((void *)rom, ROM_SIZE); - - // Decode Mac ROM - if (!DecodeROM(rom, actual)) { - if (rom_size != 4*1024*1024) - throw rom_size_error(); - else - throw file_read_error(); - } - delete[] rom; -} - - -/* - * Emulator thread function - */ - -status_t SheepShaver::emul_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - - // Install interrupt signal handler - sigemptyset(&obj->sigusr1_action.sa_mask); - obj->sigusr1_action.sa_handler = (__signal_func_ptr)(obj->sigusr1_invoc); - obj->sigusr1_action.sa_flags = 0; - obj->sigusr1_action.sa_userdata = arg; - sigaction(SIGUSR1, &obj->sigusr1_action, NULL); - - // Install data access signal handler - sigemptyset(&obj->sigsegv_action.sa_mask); - obj->sigsegv_action.sa_handler = (__signal_func_ptr)(obj->sigsegv_invoc); - obj->sigsegv_action.sa_flags = 0; - obj->sigsegv_action.sa_userdata = arg; - sigaction(SIGSEGV, &obj->sigsegv_action, NULL); - -#if !EMULATED_PPC - // Install illegal instruction signal handler - sigemptyset(&obj->sigill_action.sa_mask); - obj->sigill_action.sa_handler = (__signal_func_ptr)(obj->sigill_invoc); - obj->sigill_action.sa_flags = 0; - obj->sigill_action.sa_userdata = arg; - sigaction(SIGILL, &obj->sigill_action, NULL); -#endif - - // Exceptions will send signals - disable_debugger(true); - - // Install signal stack - sig_stack = malloc(SIG_STACK_SIZE); - extra_stack = malloc(SIG_STACK_SIZE); - set_signal_stack(sig_stack, SIG_STACK_SIZE); - - // We're now ready to receive signals - obj->ReadyForSignals = true; - - // Jump to ROM boot routine - D(bug("Jumping to ROM\n")); - obj->jump_to_rom(ROMBase + 0x310000); - D(bug("Returned from ROM\n")); - - // We're no longer ready to receive signals - obj->ReadyForSignals = false; - obj->AllowQuitting = true; - - // Quit program - be_app->PostMessage(B_QUIT_REQUESTED); - return 0; -} - - -/* - * Jump into Mac ROM, start 680x0 emulator - * (also contains other EMUL_RETURN and EMUL_OP routines) - */ - -#if EMULATED_PPC -extern void emul_ppc(uint32 start); -extern void init_emul_ppc(void); -void SheepShaver::jump_to_rom(uint32 entry) -{ - init_emul_ppc(); - emul_ppc(entry); -} -#else -asm void SheepShaver::jump_to_rom(register uint32 entry) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - mfcr r0 - stw r0,4(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) - - // Move entry address to ctr, get pointer to Emulator Data - mtctr r4 - lwz r4,SheepShaver.emulator_data(r3) - - // Skip over EMUL_RETURN routine and get its address - bl @1 - - - /* - * EMUL_RETURN: Returned from emulator - */ - - // Restore PowerPC registers - lwz r1,XLM_EMUL_RETURN_STACK - lwz r2,XLM_TOC - lmw r13,56(r1) - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) - - // Exiting from 68k emulator - li r0,1 - stw r0,XLM_IRQ_NEST - li r0,MODE_NATIVE - stw r0,XLM_RUN_MODE - - // Return to caller of jump_to_rom() - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - lwz r0,56+19*4+18*8+4(r1) - mtcrf 0xff,r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Save address of EMUL_RETURN routine for 68k emulator patch -@1 mflr r0 - stw r0,XLM_EMUL_RETURN_PROC - - // Skip over EXEC_RETURN routine and get its address - bl @2 - - - /* - * EXEC_RETURN: Returned from 68k routine executed with Execute68k() - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Reentering EMUL_OP mode - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Save 68k registers - lwz r4,56+19*4+18*8+12(r1) - stw r8,M68kRegisters.d[0](r4) - stw r9,M68kRegisters.d[1](r4) - stw r10,M68kRegisters.d[2](r4) - stw r11,M68kRegisters.d[3](r4) - stw r12,M68kRegisters.d[4](r4) - stw r13,M68kRegisters.d[5](r4) - stw r14,M68kRegisters.d[6](r4) - stw r15,M68kRegisters.d[7](r4) - stw r16,M68kRegisters.a[0](r4) - stw r17,M68kRegisters.a[1](r4) - stw r18,M68kRegisters.a[2](r4) - stw r19,M68kRegisters.a[3](r4) - stw r20,M68kRegisters.a[4](r4) - stw r21,M68kRegisters.a[5](r4) - stw r22,M68kRegisters.a[6](r4) - - // Restore PowerPC registers - lmw r13,56(r1) -#if SAVE_FP_EXEC_68K - lfd f14,56+19*4+0*8(r1) - lfd f15,56+19*4+1*8(r1) - lfd f16,56+19*4+2*8(r1) - lfd f17,56+19*4+3*8(r1) - lfd f18,56+19*4+4*8(r1) - lfd f19,56+19*4+5*8(r1) - lfd f20,56+19*4+6*8(r1) - lfd f21,56+19*4+7*8(r1) - lfd f22,56+19*4+8*8(r1) - lfd f23,56+19*4+9*8(r1) - lfd f24,56+19*4+10*8(r1) - lfd f25,56+19*4+11*8(r1) - lfd f26,56+19*4+12*8(r1) - lfd f27,56+19*4+13*8(r1) - lfd f28,56+19*4+14*8(r1) - lfd f29,56+19*4+15*8(r1) - lfd f30,56+19*4+16*8(r1) - lfd f31,56+19*4+17*8(r1) -#endif - - // Return to caller - lwz r0,56+19*4+18*8+8(r1) - mtlr r0 - addi r1,r1,56+19*4+18*8 - blr - - - // Stave address of EXEC_RETURN routine for 68k emulator patch -@2 mflr r0 - stw r0,XLM_EXEC_RETURN_PROC - - // Skip over EMUL_BREAK/EMUL_OP routine and get its address - bl @3 - - - /* - * EMUL_BREAK/EMUL_OP: Execute native routine, selector in r5 (my own private mode switch) - * - * 68k registers are stored in a M68kRegisters struct on the stack - * which the native routine may read and modify - */ - - // Save r25 (contains current 68k interrupt level) - stw r25,XLM_68K_R25 - - // Entering EMUL_OP mode within 68k emulator - li r0,MODE_EMUL_OP - stw r0,XLM_RUN_MODE - - // Create PowerPC stack frame, reserve space for M68kRegisters - mr r3,r1 - subi r1,r1,56 // Fake "caller" frame - rlwinm r1,r1,0,0,29 // Align stack - - mfcr r0 - rlwinm r0,r0,0,11,8 - stw r0,4(r1) - mfxer r0 - stw r0,16(r1) - stw r2,12(r1) - stwu r1,-(56+16*4+15*8)(r1) - lwz r2,XLM_TOC - - // Save 68k registers - stw r8,56+M68kRegisters.d[0](r1) - stw r9,56+M68kRegisters.d[1](r1) - stw r10,56+M68kRegisters.d[2](r1) - stw r11,56+M68kRegisters.d[3](r1) - stw r12,56+M68kRegisters.d[4](r1) - stw r13,56+M68kRegisters.d[5](r1) - stw r14,56+M68kRegisters.d[6](r1) - stw r15,56+M68kRegisters.d[7](r1) - stw r16,56+M68kRegisters.a[0](r1) - stw r17,56+M68kRegisters.a[1](r1) - stw r18,56+M68kRegisters.a[2](r1) - stw r19,56+M68kRegisters.a[3](r1) - stw r20,56+M68kRegisters.a[4](r1) - stw r21,56+M68kRegisters.a[5](r1) - stw r22,56+M68kRegisters.a[6](r1) - stw r3,56+M68kRegisters.a[7](r1) - stfd f0,56+16*4+0*8(r1) - stfd f1,56+16*4+1*8(r1) - stfd f2,56+16*4+2*8(r1) - stfd f3,56+16*4+3*8(r1) - stfd f4,56+16*4+4*8(r1) - stfd f5,56+16*4+5*8(r1) - stfd f6,56+16*4+6*8(r1) - stfd f7,56+16*4+7*8(r1) - mffs f0 - stfd f8,56+16*4+8*8(r1) - stfd f9,56+16*4+9*8(r1) - stfd f10,56+16*4+10*8(r1) - stfd f11,56+16*4+11*8(r1) - stfd f12,56+16*4+12*8(r1) - stfd f13,56+16*4+13*8(r1) - stfd f0,56+16*4+14*8(r1) - - // Execute native routine - addi r3,r1,56 - mr r4,r24 - bl EmulOp - - // Restore 68k registers - lwz r8,56+M68kRegisters.d[0](r1) - lwz r9,56+M68kRegisters.d[1](r1) - lwz r10,56+M68kRegisters.d[2](r1) - lwz r11,56+M68kRegisters.d[3](r1) - lwz r12,56+M68kRegisters.d[4](r1) - lwz r13,56+M68kRegisters.d[5](r1) - lwz r14,56+M68kRegisters.d[6](r1) - lwz r15,56+M68kRegisters.d[7](r1) - lwz r16,56+M68kRegisters.a[0](r1) - lwz r17,56+M68kRegisters.a[1](r1) - lwz r18,56+M68kRegisters.a[2](r1) - lwz r19,56+M68kRegisters.a[3](r1) - lwz r20,56+M68kRegisters.a[4](r1) - lwz r21,56+M68kRegisters.a[5](r1) - lwz r22,56+M68kRegisters.a[6](r1) - lwz r3,56+M68kRegisters.a[7](r1) - lfd f13,56+16*4+14*8(r1) - lfd f0,56+16*4+0*8(r1) - lfd f1,56+16*4+1*8(r1) - lfd f2,56+16*4+2*8(r1) - lfd f3,56+16*4+3*8(r1) - lfd f4,56+16*4+4*8(r1) - lfd f5,56+16*4+5*8(r1) - lfd f6,56+16*4+6*8(r1) - lfd f7,56+16*4+7*8(r1) - mtfsf 0xff,f13 - lfd f8,56+16*4+8*8(r1) - lfd f9,56+16*4+9*8(r1) - lfd f10,56+16*4+10*8(r1) - lfd f11,56+16*4+11*8(r1) - lfd f12,56+16*4+12*8(r1) - lfd f13,56+16*4+13*8(r1) - - // Delete PowerPC stack frame - lwz r2,56+16*4+15*8+12(r1) - lwz r0,56+16*4+15*8+16(r1) - mtxer r0 - lwz r0,56+16*4+15*8+4(r1) - mtcrf 0xff,r0 - mr r1,r3 - - // Reeintering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute next 68k opcode - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr - - - // Save address of EMUL_BREAK/EMUL_OP routine for 68k emulator patch -@3 mflr r0 - stw r0,XLM_EMUL_OP_PROC - - // Save stack pointer for EMUL_RETURN - stw r1,XLM_EMUL_RETURN_STACK - - // Preset registers for ROM boot routine - lis r3,0x40b0 // Pointer to ROM boot structure - ori r3,r3,0xd000 - - // 68k emulator is now active - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Jump to ROM - bctr -} -#endif - - -#if !EMULATED_PPC -/* - * Execute 68k subroutine (must be ended with RTS) - * This must only be called by the emul_thread when in EMUL_OP mode - * r->a[7] is unused, the routine runs on the caller's stack - */ - -#if SAFE_EXEC_68K -void execute_68k(uint32 pc, M68kRegisters *r); - -void Execute68k(uint32 pc, M68kRegisters *r) -{ - if (*(uint32 *)XLM_RUN_MODE != MODE_EMUL_OP) - printf("FATAL: Execute68k() not called from EMUL_OP mode\n"); - if (find_thread(NULL) != the_app->emul_thread) - printf("FATAL: Execute68k() not called from emul_thread\n"); - execute_68k(pc, r); -} - -asm void execute_68k(register uint32 pc, register M68kRegisters *r) -#else -asm void Execute68k(register uint32 pc, register M68kRegisters *r) -#endif -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stw r4,12(r1) - stwu r1,-(56+19*4+18*8)(r1) - - // Save PowerPC registers - stmw r13,56(r1) -#if SAVE_FP_EXEC_68K - stfd f14,56+19*4+0*8(r1) - stfd f15,56+19*4+1*8(r1) - stfd f16,56+19*4+2*8(r1) - stfd f17,56+19*4+3*8(r1) - stfd f18,56+19*4+4*8(r1) - stfd f19,56+19*4+5*8(r1) - stfd f20,56+19*4+6*8(r1) - stfd f21,56+19*4+7*8(r1) - stfd f22,56+19*4+8*8(r1) - stfd f23,56+19*4+9*8(r1) - stfd f24,56+19*4+10*8(r1) - stfd f25,56+19*4+11*8(r1) - stfd f26,56+19*4+12*8(r1) - stfd f27,56+19*4+13*8(r1) - stfd f28,56+19*4+14*8(r1) - stfd f29,56+19*4+15*8(r1) - stfd f30,56+19*4+16*8(r1) - stfd f31,56+19*4+17*8(r1) -#endif - - // Set up registers for 68k emulator - lwz r31,XLM_KERNEL_DATA // Pointer to Kernel Data - addi r31,r31,0x1000 - li r0,0 - mtcrf 0xff,r0 - creqv 11,11,11 // Supervisor mode - lwz r8,M68kRegisters.d[0](r4) - lwz r9,M68kRegisters.d[1](r4) - lwz r10,M68kRegisters.d[2](r4) - lwz r11,M68kRegisters.d[3](r4) - lwz r12,M68kRegisters.d[4](r4) - lwz r13,M68kRegisters.d[5](r4) - lwz r14,M68kRegisters.d[6](r4) - lwz r15,M68kRegisters.d[7](r4) - lwz r16,M68kRegisters.a[0](r4) - lwz r17,M68kRegisters.a[1](r4) - lwz r18,M68kRegisters.a[2](r4) - lwz r19,M68kRegisters.a[3](r4) - lwz r20,M68kRegisters.a[4](r4) - lwz r21,M68kRegisters.a[5](r4) - lwz r22,M68kRegisters.a[6](r4) - li r23,0 - mr r24,r3 - lwz r25,XLM_68K_R25 // MSB of SR - li r26,0 - li r28,0 // VBR - lwz r29,0x74(r31) // Pointer to opcode table - lwz r30,0x78(r31) // Address of emulator - - // Push return address (points to EXEC_RETURN opcode) on stack - li r0,XLM_EXEC_RETURN_OPCODE - stwu r0,-4(r1) - - // Reentering 68k emulator - li r0,MODE_68K - stw r0,XLM_RUN_MODE - - // Set r0 to 0 for 68k emulator - li r0,0 - - // Execute 68k opcode - lha r27,0(r24) - rlwimi r29,r27,3,13,28 - lhau r27,2(r24) - mtlr r29 - blr -} - - -/* - * Execute 68k A-Trap from EMUL_OP routine - * r->a[7] is unused, the routine runs on the caller's stack - */ - -void Execute68kTrap(uint16 trap, M68kRegisters *r) -{ - uint16 proc[2] = {trap, M68K_RTS}; - Execute68k((uint32)proc, r); -} - - -/* - * Quit emulator (must only be called from main thread) - */ - -asm void QuitEmulator(void) -{ - lwz r0,XLM_EMUL_RETURN_PROC - mtlr r0 - blr -} -#endif - - -/* - * Dump 68k registers - */ - -void Dump68kRegs(M68kRegisters *r) -{ - // Display 68k registers - for (int i=0; i<8; i++) { - printf("d%d: %08lx", i, r->d[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } - for (int i=0; i<8; i++) { - printf("a%d: %08lx", i, r->a[i]); - if (i == 3 || i == 7) - printf("\n"); - else - printf(", "); - } -} - - -/* - * Make code executable - */ - -void MakeExecutable(int dummy, uint32 start, uint32 length) -{ - if ((start >= ROMBase) && (start < (ROMBase + ROM_SIZE))) - return; - clear_caches((void *)start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); -} - - -/* - * NVRAM watchdog thread (saves NVRAM every minute) - */ - -status_t SheepShaver::nvram_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - - while (obj->NVRAMThreadActive) { - snooze(60*1000000); - if (memcmp(obj->last_xpram, XPRAM, XPRAM_SIZE)) { - memcpy(obj->last_xpram, XPRAM, XPRAM_SIZE); - SaveXPRAM(); - } - } - return 0; -} - - -/* - * 60Hz thread (really 60.15Hz) - */ - -status_t SheepShaver::tick_func(void *arg) -{ - SheepShaver *obj = (SheepShaver *)arg; - int tick_counter = 0; - bigtime_t current = system_time(); - - while (obj->TickThreadActive) { - - // Wait - current += 16625; - snooze_until(current, B_SYSTEM_TIMEBASE); - - // Pseudo Mac 1Hz interrupt, update local time - if (++tick_counter > 60) { - tick_counter = 0; - WriteMacInt32(0x20c, TimerDateTime()); - } - - // 60Hz interrupt - if (ReadMacInt32(XLM_IRQ_NEST) == 0) { - SetInterruptFlag(INTFLAG_VIA); - TriggerInterrupt(); - } - } - return 0; -} - - -/* - * Trigger signal USR1 from another thread - */ - -void TriggerInterrupt(void) -{ - idle_resume(); -#if 0 - WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); -#else - if (the_app->emul_thread > 0 && the_app->ReadyForSignals) - send_signal(the_app->emul_thread, SIGUSR1); -#endif -} - - -/* - * Mutexes - */ - -struct B2_mutex { - int dummy; //!! -}; - -B2_mutex *B2_create_mutex(void) -{ - return new B2_mutex; -} - -void B2_lock_mutex(B2_mutex *mutex) -{ -} - -void B2_unlock_mutex(B2_mutex *mutex) -{ -} - -void B2_delete_mutex(B2_mutex *mutex) -{ - delete mutex; -} - - -/* - * Set/clear interrupt flags (must be done atomically!) - */ - -volatile uint32 InterruptFlags = 0; - -void SetInterruptFlag(uint32 flag) -{ - atomic_or((int32 *)&InterruptFlags, flag); -} - -void ClearInterruptFlag(uint32 flag) -{ - atomic_and((int32 *)&InterruptFlags, ~flag); -} - - -/* - * Disable interrupts - */ - -void DisableInterrupt(void) -{ - atomic_add((int32 *)XLM_IRQ_NEST, 1); -} - - -/* - * Enable interrupts - */ - -void EnableInterrupt(void) -{ - atomic_add((int32 *)XLM_IRQ_NEST, -1); -} - - -/* - * USR1 handler - */ - -void SheepShaver::sigusr1_invoc(int sig, void *arg, vregs *r) -{ - ((SheepShaver *)arg)->sigusr1_handler(r); -} - -#if !EMULATED_PPC -static asm void ppc_interrupt(register uint32 entry) -{ - fralloc - - // Get address of return routine - bl @1 - - // Return routine - frfree - blr - -@1 - // Prepare registers for nanokernel interrupt routine - mtctr r1 - lwz r1,XLM_KERNEL_DATA - stw r6,0x018(r1) - mfctr r6 - stw r6,0x004(r1) - lwz r6,0x65c(r1) - stw r7,0x13c(r6) - stw r8,0x144(r6) - stw r9,0x14c(r6) - stw r10,0x154(r6) - stw r11,0x15c(r6) - stw r12,0x164(r6) - stw r13,0x16c(r6) - - mflr r10 - mfcr r13 - lwz r7,0x660(r1) - mflr r12 - rlwimi. r7,r7,8,0,0 - li r11,0 - ori r11,r11,0xf072 // MSR (SRR1) - mtcrf 0x70,r11 - li r8,0 - - // Enter nanokernel - mtlr r3 - blr -} -#endif - -void SheepShaver::sigusr1_handler(vregs *r) -{ - // Do nothing if interrupts are disabled - if ((*(int32 *)XLM_IRQ_NEST) > 0) - return; - - // Interrupt action depends on current run mode - switch (*(uint32 *)XLM_RUN_MODE) { - case MODE_68K: - // 68k emulator active, trigger 68k interrupt level 1 - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - r->cr |= kernel_data->v[0x674 >> 2]; - break; - -#if INTERRUPTS_IN_NATIVE_MODE - case MODE_NATIVE: - // 68k emulator inactive, in nanokernel? - if (r->r1 != KernelDataAddr) { - // No, prepare for 68k interrupt level 1 - *(uint16 *)(kernel_data->v[0x67c >> 2]) = 1; - *(uint32 *)(kernel_data->v[0x658 >> 2] + 0xdc) |= kernel_data->v[0x674 >> 2]; - - // Execute nanokernel interrupt routine (this will activate the 68k emulator) - atomic_add((int32 *)XLM_IRQ_NEST, 1); - if (ROMType == ROMTYPE_NEWWORLD) - ppc_interrupt(ROMBase + 0x312b1c); - else - ppc_interrupt(ROMBase + 0x312a3c); - } - break; -#endif - -#if INTERRUPTS_IN_EMUL_OP_MODE - case MODE_EMUL_OP: - // 68k emulator active, within EMUL_OP routine, execute 68k interrupt routine directly when interrupt level is 0 - if ((*(uint32 *)XLM_68K_R25 & 7) == 0) { - - // Set extra stack for SIGSEGV handler - set_signal_stack(extra_stack, SIG_STACK_SIZE); -#if 1 - // Execute full 68k interrupt routine - M68kRegisters r; - uint32 old_r25 = *(uint32 *)XLM_68K_R25; // Save interrupt level - *(uint32 *)XLM_68K_R25 = 0x21; // Execute with interrupt level 1 - static const uint16 proc[] = { - 0x3f3c, 0x0000, // move.w #$0000,-(sp) (fake format word) - 0x487a, 0x000a, // pea @1(pc) (return address) - 0x40e7, // move sr,-(sp) (saved SR) - 0x2078, 0x0064, // move.l $64,a0 - 0x4ed0, // jmp (a0) - M68K_RTS // @1 - }; - Execute68k((uint32)proc, &r); - *(uint32 *)XLM_68K_R25 = old_r25; // Restore interrupt level -#else - // Only update cursor - if (HasMacStarted()) { - if (InterruptFlags & INTFLAG_VIA) { - ClearInterruptFlag(INTFLAG_VIA); - ADBInterrupt(); - ExecuteNative(NATIVE_VIDEO_VBL); - } - } -#endif - // Reset normal signal stack - set_signal_stack(sig_stack, SIG_STACK_SIZE); - } - break; -#endif - } -} - - -/* - * SIGSEGV handler - */ - -static uint32 segv_r[32]; - -#if !EMULATED_PPC -asm void SheepShaver::sigsegv_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigsegv_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} -#endif - -static void sigsegv_handler(vregs *r) -{ - char str[256]; - - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Fault in Mac ROM or RAM? - bool mac_fault = (r->pc >= ROMBase) && (r->pc < (ROMBase + ROM_AREA_SIZE)) || (r->pc >= RAMBase) && (r->pc < (RAMBase + RAMSize)); - if (mac_fault) { - - // "VM settings" during MacOS 8 installation - if (r->pc == ROMBase + 0x488160 && segv_r[20] == 0xf8000000) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8.5 installation - } else if (r->pc == ROMBase + 0x488140 && segv_r[16] == 0xf8000000) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8 serial drivers on startup - } else if (r->pc == ROMBase + 0x48e080 && (segv_r[8] == 0xf3012002 || segv_r[8] == 0xf3012000)) { - r->pc += 4; - segv_r[8] = 0; - goto rti; - - // MacOS 8.1 serial drivers on startup - } else if (r->pc == ROMBase + 0x48c5e0 && (segv_r[20] == 0xf3012002 || segv_r[20] == 0xf3012000)) { - r->pc += 4; - goto rti; - } else if (r->pc == ROMBase + 0x4a10a0 && (segv_r[20] == 0xf3012002 || segv_r[20] == 0xf3012000)) { - r->pc += 4; - goto rti; - } - } - - // Analyze opcode - enum { - TYPE_UNKNOWN, - TYPE_LOAD, - TYPE_STORE - } transfer_type = TYPE_UNKNOWN; - enum { - SIZE_UNKNOWN, - SIZE_BYTE, - SIZE_HALFWORD, - SIZE_WORD - } transfer_size = SIZE_UNKNOWN; - enum { - MODE_UNKNOWN, - MODE_NORM, - MODE_U, - MODE_X, - MODE_UX - } addr_mode = MODE_UNKNOWN; - switch (primop) { - case 31: - switch (exop) { - case 23: // lwzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 55: // lwzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 87: // lbzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 119: // lbzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 151: // stwx - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_X; break; - case 183: // stwux - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_UX; break; - case 215: // stbx - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_X; break; - case 247: // stbux - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_UX; break; - case 279: // lhzx - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 311: // lhzux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 343: // lhax - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 375: // lhaux - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - case 407: // sthx - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_X; break; - case 439: // sthux - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; - } - break; - - case 32: // lwz - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 33: // lwzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 34: // lbz - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 35: // lbzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 36: // stw - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; - case 37: // stwu - transfer_type = TYPE_STORE; transfer_size = SIZE_WORD; addr_mode = MODE_U; break; - case 38: // stb - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_NORM; break; - case 39: // stbu - transfer_type = TYPE_STORE; transfer_size = SIZE_BYTE; addr_mode = MODE_U; break; - case 40: // lhz - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 41: // lhzu - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 42: // lha - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 43: // lhau - transfer_type = TYPE_LOAD; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - case 44: // sth - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break; - case 45: // sthu - transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break; - } - - // Calculate effective address - uint32 addr = 0; - switch (addr_mode) { - case MODE_X: - case MODE_UX: - if (ra == 0) - addr = segv_r[rb]; - else - addr = segv_r[ra] + segv_r[rb]; - break; - case MODE_NORM: - case MODE_U: - if (ra == 0) - addr = (int32)(int16)imm; - else - addr = segv_r[ra] + (int32)(int16)imm; - break; - default: - break; - } - - // Ignore ROM writes - if (transfer_type == TYPE_STORE && addr >= ROMBase && addr < ROMBase + ROM_SIZE) { - D(bug("WARNING: %s write access to ROM at %p, pc %p\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc)); - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - r->pc += 4; - goto rti; - } - - // Fault in Mac ROM or RAM? - if (mac_fault) { - - // Ignore illegal memory accesses? - if (PrefsFindBool("ignoresegv")) { - if (addr_mode == MODE_U || addr_mode == MODE_UX) - segv_r[ra] = addr; - if (transfer_type == TYPE_LOAD) - segv_r[rd] = 0; - r->pc += 4; - goto rti; - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE) - sprintf(str, GetString(STR_MEM_ACCESS_ERR), transfer_size == SIZE_BYTE ? "byte" : transfer_size == SIZE_HALFWORD ? "halfword" : "word", transfer_type == TYPE_LOAD ? GetString(STR_MEM_ACCESS_READ) : GetString(STR_MEM_ACCESS_WRITE), addr, r->pc, segv_r[24], segv_r[1]); - else - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc, segv_r[24], segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger - sprintf(str, "SIGSEGV\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - VideoQuitFullScreen(); - disable_debugger(false); - debugger(str); - exit(1); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} - - -/* - * SIGILL handler - */ - -#if !EMULATED_PPC -asm void SheepShaver::sigill_invoc(register int sig, register void *arg, register vregs *r) -{ - mflr r0 - stw r0,8(r1) - stwu r1,-56(r1) - - lwz r3,segv_r(r2) - stmw r13,13*4(r3) - - mr r3,r5 - bl sigill_handler - - lwz r3,segv_r(r2) - lmw r13,13*4(r3) - - lwz r0,56+8(r1) - mtlr r0 - addi r1,r1,56 - blr -} -#endif - -static void sigill_handler(vregs *r) -{ - char str[256]; - - // Fetch volatile registers - segv_r[0] = r->r0; - segv_r[1] = r->r1; - segv_r[2] = r->r2; - segv_r[3] = r->r3; - segv_r[4] = r->r4; - segv_r[5] = r->r5; - segv_r[6] = r->r6; - segv_r[7] = r->r7; - segv_r[8] = r->r8; - segv_r[9] = r->r9; - segv_r[10] = r->r10; - segv_r[11] = r->r11; - segv_r[12] = r->r12; - - // Get opcode and divide into fields - uint32 opcode = *(uint32 *)r->pc; - uint32 primop = opcode >> 26; - uint32 exop = (opcode >> 1) & 0x3ff; - uint32 ra = (opcode >> 16) & 0x1f; - uint32 rb = (opcode >> 11) & 0x1f; - uint32 rd = (opcode >> 21) & 0x1f; - uint32 imm = opcode & 0xffff; - - // Fault in Mac ROM or RAM? - bool mac_fault = (r->pc >= ROMBase) && (r->pc < (ROMBase + ROM_AREA_SIZE)) || (r->pc >= RAMBase) && (r->pc < (RAMBase + RAMSize)); - if (mac_fault) { - - switch (primop) { - case 9: // POWER instructions - case 22: -power_inst: sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc, segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - - case 31: - switch (exop) { - case 83: // mfmsr - segv_r[rd] = 0xf072; - r->pc += 4; - goto rti; - - case 210: // mtsr - case 242: // mtsrin - case 306: // tlbie - r->pc += 4; - goto rti; - - case 339: { // mfspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc += 4; - goto rti; - case 25: // SDR1 - segv_r[rd] = 0xdead001f; - r->pc += 4; - goto rti; - case 287: // PVR - segv_r[rd] = PVR; - r->pc += 4; - goto rti; - } - break; - } - - case 467: { // mtspr - int spr = ra | (rb << 5); - switch (spr) { - case 0: // MQ - case 22: // DEC - case 275: // SPRG3 - case 528: // IBAT0U - case 529: // IBAT0L - case 530: // IBAT1U - case 531: // IBAT1L - case 532: // IBAT2U - case 533: // IBAT2L - case 534: // IBAT3U - case 535: // IBAT3L - case 536: // DBAT0U - case 537: // DBAT0L - case 538: // DBAT1U - case 539: // DBAT1L - case 540: // DBAT2U - case 541: // DBAT2L - case 542: // DBAT3U - case 543: // DBAT3L - case 952: // MMCR0 - case 953: // PMC1 - case 954: // PMC2 - case 955: // SIA - case 956: // MMCR1 - case 957: // PMC3 - case 958: // PMC4 - case 959: // SDA - r->pc += 4; - goto rti; - } - break; - } - - case 29: case 107: case 152: case 153: // POWER instructions - case 184: case 216: case 217: case 248: - case 264: case 277: case 331: case 360: - case 363: case 488: case 531: case 537: - case 541: case 664: case 665: case 696: - case 728: case 729: case 760: case 920: - case 921: case 952: - goto power_inst; - } - } - - // In GUI mode, show error alert - if (!PrefsFindBool("nogui")) { - sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc, segv_r[24], segv_r[1], opcode); - ErrorAlert(str); - QuitEmulator(); - return; - } - } - - // For all other errors, jump into debugger - sprintf(str, "SIGILL\n" - " pc %08lx lr %08lx ctr %08lx msr %08lx\n" - " xer %08lx cr %08lx fpscr %08lx\n" - " r0 %08lx r1 %08lx r2 %08lx r3 %08lx\n" - " r4 %08lx r5 %08lx r6 %08lx r7 %08lx\n" - " r8 %08lx r9 %08lx r10 %08lx r11 %08lx\n" - " r12 %08lx r13 %08lx r14 %08lx r15 %08lx\n" - " r16 %08lx r17 %08lx r18 %08lx r19 %08lx\n" - " r20 %08lx r21 %08lx r22 %08lx r23 %08lx\n" - " r24 %08lx r25 %08lx r26 %08lx r27 %08lx\n" - " r28 %08lx r29 %08lx r30 %08lx r31 %08lx\n", - r->pc, r->lr, r->ctr, r->msr, - r->xer, r->cr, r->fpscr, - r->r0, r->r1, r->r2, r->r3, - r->r4, r->r5, r->r6, r->r7, - r->r8, r->r9, r->r10, r->r11, - r->r12, segv_r[13], segv_r[14], segv_r[15], - segv_r[16], segv_r[17], segv_r[18], segv_r[19], - segv_r[20], segv_r[21], segv_r[22], segv_r[23], - segv_r[24], segv_r[25], segv_r[26], segv_r[27], - segv_r[28], segv_r[29], segv_r[30], segv_r[31]); - VideoQuitFullScreen(); - disable_debugger(false); - debugger(str); - exit(1); - return; - -rti: - // Restore volatile registers - r->r0 = segv_r[0]; - r->r1 = segv_r[1]; - r->r2 = segv_r[2]; - r->r3 = segv_r[3]; - r->r4 = segv_r[4]; - r->r5 = segv_r[5]; - r->r6 = segv_r[6]; - r->r7 = segv_r[7]; - r->r8 = segv_r[8]; - r->r9 = segv_r[9]; - r->r10 = segv_r[10]; - r->r11 = segv_r[11]; - r->r12 = segv_r[12]; -} - - -/* - * Helpers to share 32-bit addressable data with MacOS - */ - -bool SheepMem::Init(void) -{ - // Delete old area - area_id old_sheep_area = find_area(SHEEP_AREA_NAME); - if (old_sheep_area > 0) - delete_area(old_sheep_area); - - // Create area for SheepShaver data - proc = base = 0x60000000; - SheepMemArea = create_area(SHEEP_AREA_NAME, (void **)&base, B_BASE_ADDRESS, size, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); - if (SheepMemArea < 0) - return false; - - // Create read-only area with all bits set to 0 - static const uint8 const_zero_page[4096] = {0,}; - zero_page = const_zero_page; - - D(bug("SheepShaver area %ld at %p\n", SheepMemArea, base)); - data = base + size; - return true; -} - -void SheepMem::Exit(void) -{ - if (SheepMemArea >= 0) - delete_area(SheepMemArea); -} - - -/* - * Display error alert - */ - -void ErrorAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_ERROR_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_ERROR_PREFIX), text); - VideoQuitFullScreen(); - BAlert *alert = new BAlert(GetString(STR_ERROR_ALERT_TITLE), str, GetString(STR_QUIT_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_STOP_ALERT); - alert->Go(); -} - - -/* - * Display warning alert - */ - -void WarningAlert(const char *text) -{ - if (PrefsFindBool("nogui")) { - printf(GetString(STR_SHELL_WARNING_PREFIX), text); - return; - } - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - alert->Go(); -} - - -/* - * Display choice alert - */ - -bool ChoiceAlert(const char *text, const char *pos, const char *neg) -{ - char str[256]; - sprintf(str, GetString(STR_GUI_WARNING_PREFIX), text); - BAlert *alert = new BAlert(GetString(STR_WARNING_ALERT_TITLE), str, pos, neg, NULL, B_WIDTH_AS_USUAL, B_INFO_ALERT); - return alert->Go() == 0; -} diff --git a/SheepShaver/src/BeOS/prefs_beos.cpp b/SheepShaver/src/BeOS/prefs_beos.cpp deleted file mode 100644 index cad4a8882..000000000 --- a/SheepShaver/src/BeOS/prefs_beos.cpp +++ /dev/null @@ -1,112 +0,0 @@ -/* - * prefs_beos.cpp - Preferences handling, BeOS specific things - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include -#include -#include - -#include "sysdeps.h" -#include "prefs.h" -#include "main.h" - - -// Platform-specific preferences items -prefs_desc platform_prefs_items[] = { - {"bitbang", TYPE_BOOLEAN, false, "draw Mac desktop directly on screen in window mode"}, - {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, - {NULL, TYPE_END, false, NULL} // End of list -}; - - -// Preferences file name and path -const char PREFS_FILE_NAME[] = "SheepShaver_prefs"; -static BPath prefs_path; - -// Modification date of prefs file -time_t PrefsFileDate = 0; - - -/* - * Load preferences from settings file - */ - -void LoadPrefs(const char *vmdir) -{ - // Construct prefs path - find_directory(B_USER_SETTINGS_DIRECTORY, &prefs_path, true); - prefs_path.Append(PREFS_FILE_NAME); - - // Read preferences from settings file - FILE *f = fopen(prefs_path.Path(), "r"); - if (f == NULL) // Not found in settings directory, look in app directory - f = fopen(PREFS_FILE_NAME, "r"); - if (f != NULL) { - LoadPrefsFromStream(f); - - struct stat s; - fstat(fileno(f), &s); - PrefsFileDate = s.st_ctime; - fclose(f); - - } else { - - // No prefs file, save defaults - SavePrefs(); - PrefsFileDate = real_time_clock(); - } -} - - -/* - * Save preferences to settings file - */ - -void SavePrefs(void) -{ - FILE *f; - if ((f = fopen(prefs_path.Path(), "w")) != NULL) { - SavePrefsToStream(f); - fclose(f); - } -} - - -/* - * Add defaults of platform-specific prefs items - * You may also override the defaults set in PrefsInit() - */ - -void AddPlatformPrefsDefaults(void) -{ - PrefsReplaceString("extfs", "/boot"); - PrefsAddInt32("windowmodes", - B_8_BIT_640x480 | B_15_BIT_640x480 | B_32_BIT_640x480 | - B_8_BIT_800x600 | B_15_BIT_800x600 | B_32_BIT_800x600 - ); - PrefsAddInt32("screenmodes", - B_8_BIT_640x480 | B_15_BIT_640x480 | B_32_BIT_640x480 | - B_8_BIT_800x600 | B_15_BIT_800x600 | B_32_BIT_800x600 | - B_8_BIT_1024x768 | B_15_BIT_1024x768 - ); - PrefsAddBool("bitbang", false); - PrefsAddBool("idlewait", true); -} diff --git a/SheepShaver/src/BeOS/prefs_editor_beos.cpp b/SheepShaver/src/BeOS/prefs_editor_beos.cpp deleted file mode 100644 index 847700c22..000000000 --- a/SheepShaver/src/BeOS/prefs_editor_beos.cpp +++ /dev/null @@ -1,877 +0,0 @@ -/* - * prefs_editor_beos.cpp - Preferences editor, BeOS implementation - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 -#include -#include -#include -#include -#include - -#include "prefs_editor.h" -#include "prefs.h" -#include "main.h" -#include "cdrom.h" -#include "xpram.h" -#include "about_window.h" -#include "user_strings.h" - - -// Special colors -const rgb_color fill_color = {216, 216, 216, 0}; -const rgb_color slider_fill_color = {102, 152, 255, 0}; - - -// Window messages -const uint32 MSG_OK = 'okok'; // "Start" clicked -const uint32 MSG_CANCEL = 'cncl'; // "Quit" clicked -const uint32 MSG_ZAP_PRAM = 'zprm'; - -const int NUM_PANES = 4; - -const uint32 MSG_VOLUME_SELECTED = 'volu'; // "Volumes" pane -const uint32 MSG_VOLUME_INVOKED = 'voli'; -const uint32 MSG_ADD_VOLUME = 'addv'; -const uint32 MSG_CREATE_VOLUME = 'crev'; -const uint32 MSG_REMOVE_VOLUME = 'remv'; -const uint32 MSG_ADD_VOLUME_PANEL = 'advp'; -const uint32 MSG_CREATE_VOLUME_PANEL = 'crvp'; -const uint32 MSG_DEVICE_NAME = 'devn'; -const uint32 MSG_BOOT_ANY = 'bany'; -const uint32 MSG_BOOT_CDROM = 'bcdr'; -const uint32 MSG_NOCDROM = 'nocd'; - -const uint32 MSG_REF_5HZ = ' 5Hz'; // "Graphics" pane -const uint32 MSG_REF_7_5HZ = ' 7Hz'; -const uint32 MSG_REF_10HZ = '10Hz'; -const uint32 MSG_REF_15HZ = '15Hz'; -const uint32 MSG_REF_30HZ = '30Hz'; -const uint32 MSG_GFXACCEL = 'gfac'; -const uint32 MSG_WINDOW_MODE = 'wmod'; -const uint32 MSG_SCREEN_MODE = 'smod'; -const uint32 MSG_NOSOUND = 'nosn'; - -const uint32 MSG_SER_A = 'sera'; // "Serial"/"Network" pane -const uint32 MSG_SER_B = 'serb'; -const uint32 MSG_NONET = 'noet'; - -const uint32 MSG_RAMSIZE = 'rmsz'; // "Memory" pane -const uint32 MSG_IGNORESEGV = 'isgv'; -const uint32 MSG_IDLEWAIT = 'idlw'; - - -// RAM size slider class -class RAMSlider : public BSlider { -public: - RAMSlider(BRect frame, const char *name, const char *label, BMessage *message, - int32 minValue, int32 maxValue, thumb_style thumbType = B_BLOCK_THUMB, - uint32 resizingMode = B_FOLLOW_LEFT | - B_FOLLOW_TOP, - uint32 flags = B_NAVIGABLE | B_WILL_DRAW | - B_FRAME_EVENTS) : BSlider(frame, name, label, message, minValue, maxValue, thumbType, resizingMode, flags) - { - update_text = (char *)malloc(256); - } - - virtual ~RAMSlider() - { - if (update_text) - free(update_text); - } - - virtual char *UpdateText(void) const - { - if (update_text) { - sprintf(update_text, GetString(STR_RAMSIZE_FMT), Value()); - } - return update_text; - } - -private: - char *update_text; -}; - - -// Volumes list view class -class VolumeListView : public BListView { -public: - VolumeListView(BRect frame, const char *name, list_view_type type = B_SINGLE_SELECTION_LIST, uint32 resizeMask = B_FOLLOW_LEFT | B_FOLLOW_TOP, uint32 flags = B_WILL_DRAW | B_FRAME_EVENTS | B_NAVIGABLE) - : BListView(frame, name, type, resizeMask, flags) - {} - - // Handle dropped files and volumes - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - BMessage msg2(MSG_ADD_VOLUME_PANEL); - entry_ref ref; - for (int i=0; msg->FindRef("refs", i, &ref) == B_NO_ERROR; i++) - msg2.AddRef("refs", &ref); - Window()->PostMessage(&msg2); - } else - BListView::MessageReceived(msg); - } -}; - - -// Number-entry BTextControl -class NumberControl : public BTextControl { -public: - NumberControl(BRect frame, float divider, const char *name, const char *label, long value, BMessage *message) - : BTextControl(frame, name, label, NULL, message, B_FOLLOW_LEFT | B_FOLLOW_TOP, B_WILL_DRAW | B_NAVIGABLE) - { - SetDivider(divider); - for (int c=0; c<256; c++) - if (!isdigit(c) && c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - SetValue(value); - } - - // Set integer value - void SetValue(long value) - { - char str[32]; - sprintf(str, "%ld", value); - SetText(str); - } - - // Get integer value - long Value(void) - { - return atol(Text()); - } -}; - - -// Path-entry BTextControl -class PathControl : public BTextControl { -public: - PathControl(bool dir_ctrl_, BRect frame, const char *name, const char *label, const char *text, BMessage *message) : BTextControl(frame, name, label, text, message), dir_ctrl(dir_ctrl_) - { - for (int c=0; c<' '; c++) - if (c != B_BACKSPACE && c != B_LEFT_ARROW && c != B_RIGHT_ARROW) - ((BTextView *)ChildAt(0))->DisallowChar(c); - } - - virtual void MessageReceived(BMessage *msg) - { - if (msg->what == B_SIMPLE_DATA) { - entry_ref the_ref; - BEntry the_entry; - - // Look for dropped refs - if (msg->FindRef("refs", &the_ref) == B_NO_ERROR) { - if (the_entry.SetTo(&the_ref) == B_NO_ERROR && (dir_ctrl&& the_entry.IsDirectory() || !dir_ctrl && the_entry.IsFile())) { - BPath the_path; - the_entry.GetPath(&the_path); - SetText(the_path.Path()); - } - } else - BTextControl::MessageReceived(msg); - - MakeFocus(); - } else - BTextControl::MessageReceived(msg); - } - -private: - bool dir_ctrl; -}; - - -// Preferences window class -class PrefsWindow : public BWindow { -public: - PrefsWindow(uint32 msg); - virtual ~PrefsWindow(); - virtual void MessageReceived(BMessage *msg); - -private: - BView *create_volumes_pane(void); - BView *create_graphics_pane(void); - BView *create_serial_pane(void); - BView *create_memory_pane(void); - - uint32 ok_message; - bool send_quit_on_close; - - BMessenger this_messenger; - BView *top; - BRect top_frame; - BTabView *pane_tabs; - BView *panes[NUM_PANES]; - int current_pane; - - VolumeListView *volume_list; - BCheckBox *nocdrom_checkbox; - BCheckBox *gfxaccel_checkbox; - BCheckBox *nosound_checkbox; - BCheckBox *nonet_checkbox; - BCheckBox *ignoresegv_checkbox; - BCheckBox *idlewait_checkbox; - RAMSlider *ramsize_slider; - PathControl *extfs_control; - PathControl *rom_control; - - BFilePanel *add_volume_panel; - BFilePanel *create_volume_panel; - - uint32 max_ramsize; // In MB -}; - - -/* - * Show preferences editor - * When the user clicks on "OK", the message given as parameter is sent - * to the application; if he clicks on "Quit", B_QUIT_REQUESTED is sent - */ - -void PrefsEditor(uint32 msg) -{ - new PrefsWindow(msg); -} - - -/* - * Preferences window constructor - */ - -PrefsWindow::PrefsWindow(uint32 msg) : BWindow(BRect(0, 0, 400, 289), GetString(STR_PREFS_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_ZOOMABLE | B_ASYNCHRONOUS_CONTROLS), this_messenger(this) -{ - int i; - ok_message = msg; - send_quit_on_close = true; - - // Move window to right position - Lock(); - MoveTo(80, 80); - - // Set up menus - BMenuBar *bar = new BMenuBar(Bounds(), "menu"); - BMenu *menu = new BMenu(GetString(STR_PREFS_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ABOUT), new BMessage(B_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_START), new BMessage(MSG_OK))); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_ZAP_PRAM), new BMessage(MSG_ZAP_PRAM))); - menu->AddItem(new BSeparatorItem); - menu->AddItem(new BMenuItem(GetString(STR_PREFS_ITEM_QUIT), new BMessage(MSG_CANCEL), 'Q')); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Bounds().bottom + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Light gray background - BRect b = Bounds(); - top = new BView(BRect(0, mbar_height, b.right, b.bottom), "top", B_FOLLOW_NONE, B_WILL_DRAW); - AddChild(top); - top->SetViewColor(fill_color); - top_frame = top->Bounds(); - - // Create panes - panes[0] = create_volumes_pane(); - panes[1] = create_graphics_pane(); - panes[2] = create_serial_pane(); - panes[3] = create_memory_pane(); - - // Prefs item tab view - pane_tabs = new BTabView(BRect(10, 10, top_frame.right-10, top_frame.bottom-50), "items", B_WIDTH_FROM_LABEL); - for (i=0; iAddTab(panes[i]); - top->AddChild(pane_tabs); - - volume_list->Select(0); - - // Create volume file panels - add_volume_panel = new BFilePanel(B_OPEN_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_ADD_VOLUME_PANEL)); - add_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_ADD_VOLUME_PANEL_BUTTON)); - add_volume_panel->Window()->SetTitle(GetString(STR_ADD_VOLUME_TITLE)); - create_volume_panel = new BFilePanel(B_SAVE_PANEL, &this_messenger, NULL, B_FILE_NODE | B_DIRECTORY_NODE, false, new BMessage(MSG_CREATE_VOLUME_PANEL)); - create_volume_panel->SetButtonLabel(B_DEFAULT_BUTTON, GetString(STR_CREATE_VOLUME_PANEL_BUTTON)); - create_volume_panel->Window()->SetTitle(GetString(STR_CREATE_VOLUME_TITLE)); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - background->FindView("PoseView")->ResizeBy(0, -30); - background->FindView("VScrollBar")->ResizeBy(0, -30); - background->FindView("CountVw")->MoveBy(0, -30); - BView *v = background->FindView("HScrollBar"); - if (v) - v->MoveBy(0, -30); - else { - i = 0; - while ((v = background->ChildAt(i++)) != NULL) { - if (v->Name() == NULL || v->Name()[0] == 0) { - v->MoveBy(0, -30); // unnamed horizontal scroll bar - break; - } - } - } - BView *filename = background->FindView("text view"); - BRect fnr(filename->Frame()); - fnr.OffsetBy(0, -30); - NumberControl *nc = new NumberControl(fnr, 80, "hardfile_size", GetString(STR_HARDFILE_SIZE_CTRL), 40, NULL); - background->AddChild(nc); - create_volume_panel->Window()->Unlock(); - - // "Start" button - BButton *button = new BButton(BRect(20, top_frame.bottom-35, 90, top_frame.bottom-10), "start", GetString(STR_START_BUTTON), new BMessage(MSG_OK)); - top->AddChild(button); - SetDefaultButton(button); - - // "Quit" button - top->AddChild(new BButton(BRect(top_frame.right-90, top_frame.bottom-35, top_frame.right-20, top_frame.bottom-10), "cancel", GetString(STR_QUIT_BUTTON), new BMessage(MSG_CANCEL))); - - Unlock(); - Show(); -} - - -/* - * Preferences window destructor - */ - -PrefsWindow::~PrefsWindow() -{ - delete add_volume_panel; - if (send_quit_on_close) - be_app->PostMessage(B_QUIT_REQUESTED); -} - - -/* - * Create "Volumes" pane - */ - -BView *PrefsWindow::create_volumes_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_VOLUMES_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - const char *str; - int32 index = 0; - volume_list = new VolumeListView(BRect(15, 10, pane->Bounds().right-30, 108), "volumes"); - while ((str = PrefsFindString("disk", index++)) != NULL) - volume_list->AddItem(new BStringItem(str)); - volume_list->SetSelectionMessage(new BMessage(MSG_VOLUME_SELECTED)); - volume_list->SetInvocationMessage(new BMessage(MSG_VOLUME_INVOKED)); - pane->AddChild(new BScrollView("volumes_border", volume_list, B_FOLLOW_LEFT | B_FOLLOW_TOP, 0, false, true)); - - pane->AddChild(new BButton(BRect(10, 113, pane->Bounds().right/3, 133), "add_volume", GetString(STR_ADD_VOLUME_BUTTON), new BMessage(MSG_ADD_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right/3, 113, pane->Bounds().right*2/3, 133), "create_volume", GetString(STR_CREATE_VOLUME_BUTTON), new BMessage(MSG_CREATE_VOLUME))); - pane->AddChild(new BButton(BRect(pane->Bounds().right*2/3, 113, pane->Bounds().right-11, 133), "remove_volume", GetString(STR_REMOVE_VOLUME_BUTTON), new BMessage(MSG_REMOVE_VOLUME))); - - extfs_control = new PathControl(true, BRect(10, 145, right, 160), "extfs", GetString(STR_EXTFS_CTRL), PrefsFindString("extfs"), NULL); - extfs_control->SetDivider(90); - pane->AddChild(extfs_control); - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 165, right, 180), "bootdriver", GetString(STR_BOOTDRIVER_CTRL), menu); - menu_field->SetDivider(90); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_ANY_LAB), new BMessage(MSG_BOOT_ANY))); - menu->AddItem(new BMenuItem(GetString(STR_BOOT_CDROM_LAB), new BMessage(MSG_BOOT_CDROM))); - pane->AddChild(menu_field); - int16 i16 = PrefsFindInt32("bootdriver"); - BMenuItem *item; - if (i16 == 0) { - if ((item = menu->FindItem(GetString(STR_BOOT_ANY_LAB))) != NULL) - item->SetMarked(true); - } else if (i16 == CDROMRefNum) { - if ((item = menu->FindItem(GetString(STR_BOOT_CDROM_LAB))) != NULL) - item->SetMarked(true); - } - - nocdrom_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nocdrom", GetString(STR_NOCDROM_CTRL), new BMessage(MSG_NOCDROM)); - pane->AddChild(nocdrom_checkbox); - nocdrom_checkbox->SetValue(PrefsFindBool("nocdrom") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Graphics/Sound" pane - */ - -struct video_mode_box { - uint32 mode; - int mode_string_id, bit_string_id; - float left, top; - BCheckBox *box; -}; - -const int NUM_WINDOW_MODES = 6; -const int NUM_SCREEN_MODES = 18; - -static video_mode_box window_mode_boxes[NUM_SCREEN_MODES] = { - {B_8_BIT_640x480, STR_W_640x480_CTRL, STR_8_BIT_CTRL, 140, 48, NULL}, - {B_15_BIT_640x480, STR_W_640x480_CTRL, STR_16_BIT_CTRL, 220, 48, NULL}, - {B_32_BIT_640x480, STR_W_640x480_CTRL, STR_32_BIT_CTRL, 300, 48, NULL}, - {B_8_BIT_800x600, STR_W_800x600_CTRL, STR_8_BIT_CTRL, 140, 65, NULL}, - {B_15_BIT_800x600, STR_W_800x600_CTRL, STR_16_BIT_CTRL, 220, 65, NULL}, - {B_32_BIT_800x600, STR_W_800x600_CTRL, STR_32_BIT_CTRL, 300, 65, NULL}, -}; - -static video_mode_box screen_mode_boxes[NUM_SCREEN_MODES] = { - {B_8_BIT_640x480, STR_640x480_CTRL, STR_8_BIT_CTRL, 140, 82, NULL}, - {B_15_BIT_640x480, STR_640x480_CTRL, STR_16_BIT_CTRL, 220, 82, NULL}, - {B_32_BIT_640x480, STR_640x480_CTRL, STR_32_BIT_CTRL, 300, 82, NULL}, - {B_8_BIT_800x600, STR_800x600_CTRL, STR_8_BIT_CTRL, 140, 99, NULL}, - {B_15_BIT_800x600, STR_800x600_CTRL, STR_16_BIT_CTRL, 220, 99, NULL}, - {B_32_BIT_800x600, STR_800x600_CTRL, STR_32_BIT_CTRL, 300, 99, NULL}, - {B_8_BIT_1024x768, STR_1024x768_CTRL, STR_8_BIT_CTRL, 140, 116, NULL}, - {B_15_BIT_1024x768, STR_1024x768_CTRL, STR_16_BIT_CTRL, 220, 116, NULL}, - {B_32_BIT_1024x768, STR_1024x768_CTRL, STR_32_BIT_CTRL, 300, 116, NULL}, - {B_8_BIT_1152x900, STR_1152x900_CTRL, STR_8_BIT_CTRL, 140, 133, NULL}, - {B_15_BIT_1152x900, STR_1152x900_CTRL, STR_16_BIT_CTRL, 220, 133, NULL}, - {B_32_BIT_1152x900, STR_1152x900_CTRL, STR_32_BIT_CTRL, 300, 133, NULL}, - {B_8_BIT_1280x1024, STR_1280x1024_CTRL, STR_8_BIT_CTRL, 140, 150, NULL}, - {B_15_BIT_1280x1024, STR_1280x1024_CTRL, STR_16_BIT_CTRL, 220, 150, NULL}, - {B_32_BIT_1280x1024, STR_1280x1024_CTRL, STR_32_BIT_CTRL, 300, 150, NULL}, - {B_8_BIT_1600x1200, STR_1600x1200_CTRL, STR_8_BIT_CTRL, 140, 167, NULL}, - {B_15_BIT_1600x1200, STR_1600x1200_CTRL, STR_16_BIT_CTRL, 220, 167, NULL}, - {B_32_BIT_1600x1200, STR_1600x1200_CTRL, STR_32_BIT_CTRL, 300, 167, NULL} -}; - -BView *PrefsWindow::create_graphics_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_GRAPHICS_SOUND_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu = new BPopUpMenu(""); - menu_field = new BMenuField(BRect(10, 5, right, 20), "frameskip", GetString(STR_FRAMESKIP_CTRL), menu); - menu_field->SetDivider(120); - menu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - menu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - pane->AddChild(menu_field); - int32 i32 = PrefsFindInt32("frameskip"); - BMenuItem *item; - if (i32 == 12) { - if ((item = menu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 8) { - if ((item = menu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 6) { - if ((item = menu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 4) { - if ((item = menu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (i32 == 2) { - if ((item = menu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } - - gfxaccel_checkbox = new BCheckBox(BRect(10, 25, right, 40), "gfxaccel", GetString(STR_GFXACCEL_CTRL), new BMessage(MSG_GFXACCEL)); - pane->AddChild(gfxaccel_checkbox); - gfxaccel_checkbox->SetValue(PrefsFindBool("gfxaccel") ? B_CONTROL_ON : B_CONTROL_OFF); - - uint32 window_modes = PrefsFindInt32("windowmodes"); - for (int i=0; ibit_string_id == STR_8_BIT_CTRL) { - BStringView *text = new BStringView(BRect(10, p->top, 120, p->top + 15), "", GetString(p->mode_string_id)); - pane->AddChild(text); - } - p->box = new BCheckBox(BRect(p->left, p->top, p->left + 80, p->top + 15), "", GetString(p->bit_string_id), new BMessage(MSG_WINDOW_MODE)); - pane->AddChild(p->box); - p->box->SetValue(window_modes & p->mode ? B_CONTROL_ON : B_CONTROL_OFF); - } - uint32 screen_modes = PrefsFindInt32("screenmodes"); - for (int i=0; ibit_string_id == STR_8_BIT_CTRL) { - BStringView *text = new BStringView(BRect(10, p->top, 120, p->top + 15), "", GetString(p->mode_string_id)); - pane->AddChild(text); - } - p->box = new BCheckBox(BRect(p->left, p->top, p->left + 80, p->top + 15), "", GetString(p->bit_string_id), new BMessage(MSG_SCREEN_MODE)); - pane->AddChild(p->box); - p->box->SetValue(screen_modes & p->mode ? B_CONTROL_ON : B_CONTROL_OFF); - } - - nosound_checkbox = new BCheckBox(BRect(10, 185, right, 200), "nosound", GetString(STR_NOSOUND_CTRL), new BMessage(MSG_NOSOUND)); - pane->AddChild(nosound_checkbox); - nosound_checkbox->SetValue(PrefsFindBool("nosound") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Serial/Network" pane - */ - -static void add_serial_names(BPopUpMenu *menu, uint32 msg) -{ - BSerialPort *port = new BSerialPort; - char name[B_PATH_NAME_LENGTH]; - for (int i=0; iCountDevices(); i++) { - port->GetDeviceName(i, name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - if (SysInfo.platform_type == B_BEBOX_PLATFORM) { - BDirectory dir; - BEntry entry; - dir.SetTo("/dev/parallel"); - if (dir.InitCheck() == B_NO_ERROR) { - dir.Rewind(); - while (dir.GetNextEntry(&entry) >= 0) { - if (!entry.IsDirectory()) { - entry.GetName(name); - menu->AddItem(new BMenuItem(name, new BMessage(msg))); - } - } - } - } - delete port; -} - -static void set_serial_label(BPopUpMenu *menu, const char *prefs_name) -{ - const char *str; - BMenuItem *item; - if ((str = PrefsFindString(prefs_name)) != NULL) - if ((item = menu->FindItem(str)) != NULL) - item->SetMarked(true); -} - -BView *PrefsWindow::create_serial_pane(void) -{ - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_SERIAL_NETWORK_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BMenuField *menu_field; - BPopUpMenu *menu_a = new BPopUpMenu(""); - add_serial_names(menu_a, MSG_SER_A); - menu_field = new BMenuField(BRect(10, 5, right, 20), "seriala", GetString(STR_SERPORTA_CTRL), menu_a); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_a, "seriala"); - - BPopUpMenu *menu_b = new BPopUpMenu(""); - add_serial_names(menu_b, MSG_SER_B); - menu_field = new BMenuField(BRect(10, 26, right, 41), "serialb", GetString(STR_SERPORTB_CTRL), menu_b); - menu_field->SetDivider(90); - pane->AddChild(menu_field); - set_serial_label(menu_b, "serialb"); - - nonet_checkbox = new BCheckBox(BRect(10, 47, right, 62), "nonet", GetString(STR_NONET_CTRL), new BMessage(MSG_NONET)); - pane->AddChild(nonet_checkbox); - nonet_checkbox->SetValue(PrefsFindBool("nonet") ? B_CONTROL_ON : B_CONTROL_OFF); - - return pane; -} - - -/* - * Create "Memory/Misc" pane - */ - -BView *PrefsWindow::create_memory_pane(void) -{ - char str[256], str2[256]; - BView *pane = new BView(BRect(0, 0, top_frame.right-20, top_frame.bottom-80), GetString(STR_MEMORY_MISC_PANE_TITLE), B_FOLLOW_NONE, B_WILL_DRAW); - pane->SetViewColor(fill_color); - float right = pane->Bounds().right-10; - - BEntry entry("/boot/var/swap"); - off_t swap_space; - if (entry.GetSize(&swap_space) == B_NO_ERROR) - max_ramsize = swap_space / (1024 * 1024) - 8; - else - max_ramsize = SysInfo.max_pages * B_PAGE_SIZE / (1024 * 1024) - 8; - - int32 value = PrefsFindInt32("ramsize") / (1024 * 1024); - - ramsize_slider = new RAMSlider(BRect(10, 5, right, 55), "ramsize", GetString(STR_RAMSIZE_SLIDER), new BMessage(MSG_RAMSIZE), 8, max_ramsize, B_TRIANGLE_THUMB); - ramsize_slider->SetValue(value); - ramsize_slider->UseFillColor(true, &slider_fill_color); - sprintf(str, GetString(STR_RAMSIZE_FMT), 8); - sprintf(str2, GetString(STR_RAMSIZE_FMT), max_ramsize); - ramsize_slider->SetLimitLabels(str, str2); - pane->AddChild(ramsize_slider); - - ignoresegv_checkbox = new BCheckBox(BRect(10, 60, right, 75), "ignoresegv", GetString(STR_IGNORESEGV_CTRL), new BMessage(MSG_IGNORESEGV)); - pane->AddChild(ignoresegv_checkbox); - ignoresegv_checkbox->SetValue(PrefsFindBool("ignoresegv") ? B_CONTROL_ON : B_CONTROL_OFF); - - idlewait_checkbox = new BCheckBox(BRect(10, 80, right, 95), "idlewait", GetString(STR_IDLEWAIT_CTRL), new BMessage(MSG_IDLEWAIT)); - pane->AddChild(idlewait_checkbox); - idlewait_checkbox->SetValue(PrefsFindBool("idlewait") ? B_CONTROL_ON : B_CONTROL_OFF); - - rom_control = new PathControl(false, BRect(10, 100, right, 115), "rom", GetString(STR_ROM_FILE_CTRL), PrefsFindString("rom"), NULL); - rom_control->SetDivider(117); - pane->AddChild(rom_control); - - return pane; -} - - -/* - * Message from controls/menus received - */ - -void PrefsWindow::MessageReceived(BMessage *msg) -{ - switch (msg->what) { - case MSG_OK: // "Start" button clicked - PrefsReplaceString("extfs", extfs_control->Text()); - const char *str = rom_control->Text(); - if (strlen(str)) - PrefsReplaceString("rom", str); - else - PrefsRemoveItem("rom"); - SavePrefs(); - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(ok_message); - break; - - case MSG_CANCEL: // "Quit" button clicked - send_quit_on_close = false; - PostMessage(B_QUIT_REQUESTED); - be_app->PostMessage(B_QUIT_REQUESTED); - break; - - case B_ABOUT_REQUESTED: // "About" menu item selected - OpenAboutWindow(); - break; - - case MSG_ZAP_PRAM: // "Zap PRAM File" menu item selected - ZapPRAM(); - break; - - case MSG_VOLUME_INVOKED: { // Double-clicked on volume name, toggle read-only flag - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - const char *str = PrefsFindString("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - char newstr[256]; - if (str[0] == '*') - strcpy(newstr, str+1); - else { - strcpy(newstr, "*"); - strcat(newstr, str); - } - PrefsReplaceString("disk", newstr, selected); - volume_list->AddItem(new BStringItem(newstr), selected); - volume_list->Select(selected); - } - break; - } - - case MSG_ADD_VOLUME: - add_volume_panel->Show(); - break; - - case MSG_CREATE_VOLUME: - create_volume_panel->Show(); - break; - - case MSG_ADD_VOLUME_PANEL: { - entry_ref ref; - if (msg->FindRef("refs", &ref) == B_NO_ERROR) { - BEntry entry(&ref, true); - BPath path; - entry.GetPath(&path); - if (entry.IsFile()) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else if (entry.IsDirectory()) { - BVolume volume; - if (path.Path()[0] == '/' && strchr(path.Path()+1, '/') == NULL && entry.GetVolume(&volume) == B_NO_ERROR) { - int32 i = 0; - dev_t d; - fs_info info; - while ((d = next_dev(&i)) >= 0) { - fs_stat_dev(d, &info); - if (volume.Device() == info.dev) { - PrefsAddString("disk", info.device_name); - volume_list->AddItem(new BStringItem(info.device_name)); - } - } - } - } - } - break; - } - - case MSG_CREATE_VOLUME_PANEL: { - entry_ref dir; - if (msg->FindRef("directory", &dir) == B_NO_ERROR) { - BEntry entry(&dir, true); - BPath path; - entry.GetPath(&path); - path.Append(msg->FindString("name")); - - create_volume_panel->Window()->Lock(); - BView *background = create_volume_panel->Window()->ChildAt(0); - NumberControl *v = (NumberControl *)background->FindView("hardfile_size"); - int size = v->Value(); - - char cmd[1024]; - sprintf(cmd, "dd if=/dev/zero \"of=%s\" bs=1024k count=%d", path.Path(), size); - int ret = system(cmd); - if (ret == 0) { - PrefsAddString("disk", path.Path()); - volume_list->AddItem(new BStringItem(path.Path())); - } else { - sprintf(cmd, GetString(STR_CREATE_VOLUME_WARN), strerror(ret)); - WarningAlert(cmd); - } - } - break; - } - - case MSG_REMOVE_VOLUME: { - int selected = volume_list->CurrentSelection(); - if (selected >= 0) { - PrefsRemoveItem("disk", selected); - BStringItem *item = (BStringItem *)volume_list->RemoveItem(selected); - delete item; - volume_list->Select(selected); - } - break; - } - - case MSG_BOOT_ANY: - PrefsReplaceInt32("bootdriver", 0); - break; - - case MSG_BOOT_CDROM: - PrefsReplaceInt32("bootdriver", CDROMRefNum); - break; - - case MSG_NOCDROM: - PrefsReplaceBool("nocdrom", nocdrom_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_GFXACCEL: - PrefsReplaceBool("gfxaccel", gfxaccel_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_NOSOUND: - PrefsReplaceBool("nosound", nosound_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_WINDOW_MODE: { - BCheckBox *source = NULL; - msg->FindPointer("source", &source); - if (source == NULL) - break; - for (int i=0; ibox == source) { - if (p->box->Value() == B_CONTROL_ON) - PrefsReplaceInt32("windowmodes", PrefsFindInt32("windowmodes") | p->mode); - else - PrefsReplaceInt32("windowmodes", PrefsFindInt32("windowmodes") & ~(p->mode)); - break; - } - } - break; - } - - case MSG_SCREEN_MODE: { - BCheckBox *source = NULL; - msg->FindPointer("source", &source); - if (source == NULL) - break; - for (int i=0; ibox == source) { - if (p->box->Value() == B_CONTROL_ON) - PrefsReplaceInt32("screenmodes", PrefsFindInt32("screenmodes") | p->mode); - else - PrefsReplaceInt32("screenmodes", PrefsFindInt32("screenmodes") & ~(p->mode)); - break; - } - } - break; - } - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", 2); - break; - - case MSG_SER_A: { - BMenuItem *source = NULL; - msg->FindPointer("source", &source); - if (source) - PrefsReplaceString("seriala", source->Label()); - break; - } - - case MSG_SER_B: { - BMenuItem *source = NULL; - msg->FindPointer("source", &source); - if (source) - PrefsReplaceString("serialb", source->Label()); - break; - } - - case MSG_NONET: - PrefsReplaceBool("nonet", nonet_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_IGNORESEGV: - PrefsReplaceBool("ignoresegv", ignoresegv_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_IDLEWAIT: - PrefsReplaceBool("idlewait", idlewait_checkbox->Value() == B_CONTROL_ON); - break; - - case MSG_RAMSIZE: - PrefsReplaceInt32("ramsize", ramsize_slider->Value() * 1024 * 1024); - break; - - default: - BWindow::MessageReceived(msg); - } -} diff --git a/SheepShaver/src/BeOS/scsi_beos.cpp b/SheepShaver/src/BeOS/scsi_beos.cpp deleted file mode 120000 index c495dce0c..000000000 --- a/SheepShaver/src/BeOS/scsi_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/scsi_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/serial_beos.cpp b/SheepShaver/src/BeOS/serial_beos.cpp deleted file mode 120000 index 2231c6d0a..000000000 --- a/SheepShaver/src/BeOS/serial_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/serial_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/sys_beos.cpp b/SheepShaver/src/BeOS/sys_beos.cpp deleted file mode 120000 index 4e238dac8..000000000 --- a/SheepShaver/src/BeOS/sys_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/sys_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/sysdeps.h b/SheepShaver/src/BeOS/sysdeps.h deleted file mode 100644 index 6a7861a59..000000000 --- a/SheepShaver/src/BeOS/sysdeps.h +++ /dev/null @@ -1,74 +0,0 @@ -/* - * sysdeps.h - System dependent definitions for BeOS - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 SYSDEPS_H -#define SYSDEPS_H - -// Do we have std namespace? -#ifdef __POWERPC__ -#define NO_STD_NAMESPACE -#endif - -#include -#include -#include - -#include "user_strings_beos.h" - -// Are we using a PPC emulator or the real thing? -#ifdef __POWERPC__ -#define EMULATED_PPC 0 -#define WORDS_BIGENDIAN 1 -#define SYSTEM_CLOBBERS_R2 1 -#else -#define EMULATED_PPC 1 -#undef WORDS_BIGENDIAN -#endif - -// High precision timing -#define PRECISE_TIMING 1 -#define PRECISE_TIMING_BEOS 1 - -#define POWERPC_ROM 1 - -// Time data type for Time Manager emulation -typedef bigtime_t tm_time_t; - -// 64 bit file offsets -typedef off_t loff_t; - -// Data types -typedef uint32 uintptr; -typedef int32 intptr; - -// Timing functions -extern void Delay_usec(uint32 usec); - -// Macro for calling MacOS routines -#define CallMacOS(type, proc) (*(type)proc)() -#define CallMacOS1(type, proc, arg1) (*(type)proc)(arg1) -#define CallMacOS2(type, proc, arg1, arg2) (*(type)proc)(arg1, arg2) -#define CallMacOS3(type, proc, arg1, arg2, arg3) (*(type)proc)(arg1, arg2, arg3) -#define CallMacOS4(type, proc, arg1, arg2, arg3, arg4) (*(type)proc)(arg1, arg2, arg3, arg4) -#define CallMacOS5(type, proc, arg1, arg2, arg3, arg4, arg5) (*(type)proc)(arg1, arg2, arg3, arg4, arg5) -#define CallMacOS6(type, proc, arg1, arg2, arg3, arg4, arg5, arg6) (*(type)proc)(arg1, arg2, arg3, arg4, arg5, arg6) -#define CallMacOS7(type, proc, arg1, arg2, arg3, arg4, arg5, arg6, arg7) (*(type)proc)(arg1, arg2, arg3, arg4, arg5, arg6, arg7) - -#endif diff --git a/SheepShaver/src/BeOS/timer_beos.cpp b/SheepShaver/src/BeOS/timer_beos.cpp deleted file mode 120000 index 0d9e80149..000000000 --- a/SheepShaver/src/BeOS/timer_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/timer_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/BeOS/user_strings_beos.cpp b/SheepShaver/src/BeOS/user_strings_beos.cpp deleted file mode 100644 index 0f7b13673..000000000 --- a/SheepShaver/src/BeOS/user_strings_beos.cpp +++ /dev/null @@ -1,73 +0,0 @@ -/* - * user_strings_beos.cpp - Localizable strings, BeOS specific strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 "sysdeps.h" -#include "user_strings.h" - - -// Platform-specific string definitions -user_string_def platform_strings[] = { - // Common strings that have a platform-specific variant - {STR_VOLUME_IS_MOUNTED_WARN, "The volume '%s' is mounted under BeOS. Basilisk II will try to unmount it."}, - {STR_EXTFS_CTRL, "BeOS Root"}, - {STR_EXTFS_NAME, "BeOS Directory Tree"}, - {STR_EXTFS_VOLUME_NAME, "BeOS"}, - - // Purely platform-specific strings - {STR_NO_SHEEP_DRIVER_ERR, "Cannot open /dev/sheep: %s (%08x). SheepShaver is not properly installed."}, - {STR_NO_RAM_AREA_ERR, "Not enough memory to create RAM area: %s (%08x)."}, - {STR_NO_ROM_AREA_ERR, "Not enough memory to create ROM area."}, - {STR_NO_SHEEP_MEM_AREA_ERR, "Not enough memory to create SheepShaver area."}, - {STR_SHEEP_UP_ERR, "Cannot allocate Low Memory Globals: %s (%08x)."}, - {STR_NO_NET_ADDON_WARN, "The SheepShaver net server add-on cannot be found. Ethernet will not be available."}, - {STR_NET_CONFIG_MODIFY_WARN, "To enable Ethernet networking for SheepShaver, your network configuration has to be modified and the network restarted. Do you want this to be done now (selecting \"Cancel\" will disable Ethernet under SheepShaver)?."}, - {STR_NET_ADDON_INIT_FAILED, "SheepShaver net server add-on found\nbut there seems to be no network hardware.\nPlease check your network preferences."}, - {STR_NET_ADDON_CLONE_FAILED, "Cloning of the network transfer area failed."}, - {STR_NO_SHEEP_MEM_AREA_ERR, "Cannot create SheepShaver Globals area: %s (%08x)."}, - {STR_NO_DR_CACHE_AREA_ERR, "Cannot create DR Cache area: %s (%08x)."}, - {STR_NO_DR_EMULATOR_AREA_ERR, "Cannot create DR Emulator area: %s (%08x)."}, - - {-1, NULL} // End marker -}; - - -/* - * Fetch pointer to string, given the string number - */ - -const char *GetString(int num) -{ - // First search for platform-specific string - int i = 0; - while (platform_strings[i].num >= 0) { - if (platform_strings[i].num == num) - return platform_strings[i].str; - i++; - } - - // Not found, search for common string - i = 0; - while (common_strings[i].num >= 0) { - if (common_strings[i].num == num) - return common_strings[i].str; - i++; - } - return NULL; -} diff --git a/SheepShaver/src/BeOS/user_strings_beos.h b/SheepShaver/src/BeOS/user_strings_beos.h deleted file mode 100644 index b82481104..000000000 --- a/SheepShaver/src/BeOS/user_strings_beos.h +++ /dev/null @@ -1,37 +0,0 @@ -/* - * user_strings_beos.h - BeOS-specific localizable strings - * - * SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig - * - * 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 USER_STRINGS_BEOS_H -#define USER_STRINGS_BEOS_H - -enum { - STR_NO_SHEEP_DRIVER_ERR = 10000, - STR_NO_ROM_AREA_ERR, - STR_SHEEP_UP_ERR, - STR_NO_NET_ADDON_WARN, - STR_NET_CONFIG_MODIFY_WARN, - STR_NET_ADDON_INIT_FAILED, - STR_NET_ADDON_CLONE_FAILED, - STR_NO_SHEEP_MEM_AREA_ERR, - STR_NO_DR_CACHE_AREA_ERR, - STR_NO_DR_EMULATOR_AREA_ERR -}; - -#endif diff --git a/SheepShaver/src/BeOS/video_beos.cpp b/SheepShaver/src/BeOS/video_beos.cpp deleted file mode 100644 index aa4f24966..000000000 --- a/SheepShaver/src/BeOS/video_beos.cpp +++ /dev/null @@ -1,787 +0,0 @@ -/* - * video_beos.cpp - Video/graphics emulation, BeOS specific things - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 "sysdeps.h" - -#include "video.h" -#include "video_defs.h" -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "version.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static sem_id video_lock = -1; // Protection during mode changes -static sem_id mac_os_lock = -1; // This is used to stop the MacOS thread when the SheepShaver workspace is switched out - -// Prototypes -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter); - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - - -#include "video_window.h" -#include "video_screen.h" - - -/* - * Display manager thread (for opening and closing windows and screens; - * this is not safe under R4 when running on the MacOS stack in kernel - * space) - */ - -// Message constants -const uint32 MSG_OPEN_WINDOW = 'owin'; -const uint32 MSG_CLOSE_WINDOW = 'cwin'; -const uint32 MSG_OPEN_SCREEN = 'oscr'; -const uint32 MSG_CLOSE_SCREEN = 'cscr'; -const uint32 MSG_QUIT_DISPLAY_MANAGER = 'quit'; - -static thread_id dm_thread = -1; -static sem_id dm_done_sem = -1; - -static status_t display_manager(void *arg) -{ - for (;;) { - - // Receive message - thread_id sender; - uint32 code = receive_data(&sender, NULL, 0); - D(bug("Display manager received %08lx\n", code)); - switch (code) { - case MSG_QUIT_DISPLAY_MANAGER: - return 0; - - case MSG_OPEN_WINDOW: - D(bug("Opening window\n")); - the_window = new MacWindow(BRect(0, 0, VModes[cur_mode].viXsize-1, VModes[cur_mode].viYsize-1)); - D(bug("Opened\n")); - break; - - case MSG_CLOSE_WINDOW: - if (the_window != NULL) { - D(bug("Posting quit to window\n")); - the_window->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_window) - snooze(200000); - D(bug("Window closed\n")); - } - break; - - case MSG_OPEN_SCREEN: { - D(bug("Opening screen\n")); - long scr_mode = 0; - switch (VModes[cur_mode].viAppleMode) { - case APPLE_8_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_8_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_8_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_8_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_8_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_8_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_8_BIT_1600x1200; - break; - } - break; - case APPLE_16_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_15_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_15_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_15_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_15_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_15_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_15_BIT_1600x1200; - break; - } - break; - case APPLE_32_BIT: - switch (VModes[cur_mode].viAppleID) { - case APPLE_640x480: - scr_mode = B_32_BIT_640x480; - break; - case APPLE_800x600: - scr_mode = B_32_BIT_800x600; - break; - case APPLE_1024x768: - scr_mode = B_32_BIT_1024x768; - break; - case APPLE_1152x900: - scr_mode = B_32_BIT_1152x900; - break; - case APPLE_1280x1024: - scr_mode = B_32_BIT_1280x1024; - break; - case APPLE_1600x1200: - scr_mode = B_32_BIT_1600x1200; - break; - } - break; - } - the_screen = new MacScreen(GetString(STR_WINDOW_TITLE), scr_mode); - D(bug("Opened, error %08lx\n", screen_error)); - if (screen_error != B_NO_ERROR) { - D(bug("Error, posting quit to screen\n")); - the_screen->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_screen) - snooze(200000); - D(bug("Screen closed\n")); - break; - } - - // Wait for video mem access - D(bug("Showing screen\n")); - the_screen->Show(); - D(bug("Shown, waiting for frame buffer access\n")); - while (!drawing_enable) - snooze(200000); - D(bug("Access granted\n")); - break; - } - - case MSG_CLOSE_SCREEN: - if (the_screen != NULL) { - D(bug("Posting quit to screen\n")); - the_screen->PostMessage(B_QUIT_REQUESTED); - D(bug("Posted, waiting\n")); - while (the_screen) - snooze(200000); - D(bug("Screen closed\n")); - } - break; - } - - // Acknowledge - release_sem(dm_done_sem); - } -} - - -/* - * Open display (window or screen) - */ - -static void open_display(void) -{ - D(bug("entering open_display()\n")); - display_type = VModes[cur_mode].viType; - if (display_type == DIS_SCREEN) { - while (send_data(dm_thread, MSG_OPEN_SCREEN, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } else if (display_type == DIS_WINDOW) { - while (send_data(dm_thread, MSG_OPEN_WINDOW, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } - D(bug("exiting open_display()\n")); -} - - -/* - * Close display - */ - -static void close_display(void) -{ - D(bug("entering close_display()\n")); - if (display_type == DIS_SCREEN) { - while (send_data(dm_thread, MSG_CLOSE_SCREEN, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } else if (display_type == DIS_WINDOW) { - while (send_data(dm_thread, MSG_CLOSE_WINDOW, NULL, 0) == B_INTERRUPTED) ; - while (acquire_sem(dm_done_sem) == B_INTERRUPTED) ; - } - D(bug("exiting close_display()\n")); -} - - -/* - * Initialization - */ - -static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, long apple_mode, long apple_id, int type) -{ - if (allow & test) { - p->viType = type; - switch (apple_id) { - case APPLE_W_640x480: - case APPLE_640x480: - p->viXsize = 640; - p->viYsize = 480; - break; - case APPLE_W_800x600: - case APPLE_800x600: - p->viXsize = 800; - p->viYsize = 600; - break; - case APPLE_1024x768: - p->viXsize = 1024; - p->viYsize = 768; - break; - case APPLE_1152x900: - p->viXsize = 1152; - p->viYsize = 900; - break; - case APPLE_1280x1024: - p->viXsize = 1280; - p->viYsize = 1024; - break; - case APPLE_1600x1200: - p->viXsize = 1600; - p->viYsize = 1200; - break; - } - switch (apple_mode) { - case APPLE_8_BIT: - p->viRowBytes = p->viXsize; - break; - case APPLE_16_BIT: - p->viRowBytes = p->viXsize * 2; - break; - case APPLE_32_BIT: - p->viRowBytes = p->viXsize * 4; - break; - } - p->viAppleMode = apple_mode; - p->viAppleID = apple_id; - p++; - } -} - -bool VideoInit(void) -{ - // Init variables, create semaphores - private_data = NULL; - cur_mode = 0; // Window 640x480 - video_lock = create_sem(1, "Video Lock"); - mac_os_lock = create_sem(0, "MacOS Frame Buffer Lock"); - dm_done_sem = create_sem(0, "Display Manager Done"); - - // Construct video mode table - VideoInfo *p = VModes; - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - if (window_modes == 0 && screen_modes == 0) - window_modes |= B_8_BIT_640x480 | B_8_BIT_800x600; // Allow at least 640x480 and 800x600 window modes - add_mode(p, window_modes, B_8_BIT_640x480, APPLE_8_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_8_BIT_800x600, APPLE_8_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, window_modes, B_15_BIT_640x480, APPLE_16_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_15_BIT_800x600, APPLE_16_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, window_modes, B_32_BIT_640x480, APPLE_32_BIT, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, B_32_BIT_800x600, APPLE_32_BIT, APPLE_W_800x600, DIS_WINDOW); - add_mode(p, screen_modes, B_8_BIT_640x480, APPLE_8_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_800x600, APPLE_8_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1024x768, APPLE_8_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1152x900, APPLE_8_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1280x1024, APPLE_8_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_8_BIT_1600x1200, APPLE_8_BIT, APPLE_1600x1200, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_640x480, APPLE_16_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_800x600, APPLE_16_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1024x768, APPLE_16_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1152x900, APPLE_16_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1280x1024, APPLE_16_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_15_BIT_1600x1200, APPLE_16_BIT, APPLE_1600x1200, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_640x480, APPLE_32_BIT, APPLE_640x480, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_800x600, APPLE_32_BIT, APPLE_800x600, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1024x768, APPLE_32_BIT, APPLE_1024x768, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1152x900, APPLE_32_BIT, APPLE_1152x900, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1280x1024, APPLE_32_BIT, APPLE_1280x1024, DIS_SCREEN); - add_mode(p, screen_modes, B_32_BIT_1600x1200, APPLE_32_BIT, APPLE_1600x1200, DIS_SCREEN); - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; - - // Start display manager thread - dm_thread = spawn_thread(display_manager, "Display Manager", B_NORMAL_PRIORITY, NULL); - resume_thread(dm_thread); - - // Open window/screen - open_display(); - if (display_type == DIS_SCREEN && the_screen == NULL) { - char str[256]; - sprintf(str, GetString(STR_FULL_SCREEN_ERR), strerror(screen_error), screen_error); - ErrorAlert(str); - return false; - } - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - if (dm_thread >= 0) { - - // Close display - acquire_sem(video_lock); - close_display(); - if (private_data != NULL) { - delete private_data->gammaTable; - delete private_data; - } - - // Stop display manager - status_t l; - send_data(dm_thread, MSG_QUIT_DISPLAY_MANAGER, NULL, 0); - while (wait_for_thread(dm_thread, &l) == B_INTERRUPTED) ; - } - - // Delete semaphores - delete_sem(video_lock); - delete_sem(mac_os_lock); - delete_sem(dm_done_sem); -} - - -/* - * Close screen in full-screen mode - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DIS_SCREEN) { - acquire_sem(video_lock); - close_display(); - release_sem(video_lock); - } -} - - -/* - * Execute video VBL routine - */ - -void VideoVBL(void) -{ - release_sem(mac_os_lock); - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); - while (acquire_sem(mac_os_lock) == B_INTERRUPTED) ; -} - - -/* - * Filter function for receiving mouse and keyboard events - */ - -#define MENU_IS_POWER 0 - -// Be -> Mac raw keycode translation table -static const uint8 keycode2mac[0x80] = { - 0xff, 0x35, 0x7a, 0x78, 0x63, 0x76, 0x60, 0x61, // inv Esc F1 F2 F3 F4 F5 F6 - 0x62, 0x64, 0x65, 0x6d, 0x67, 0x6f, 0x69, 0x6b, // F7 F8 F9 F10 F11 F12 F13 F14 - 0x71, 0x0a, 0x12, 0x13, 0x14, 0x15, 0x17, 0x16, // F15 ` 1 2 3 4 5 6 - 0x1a, 0x1c, 0x19, 0x1d, 0x1b, 0x18, 0x33, 0x72, // 7 8 9 0 - = BSP INS - 0x73, 0x74, 0x47, 0x4b, 0x43, 0x4e, 0x30, 0x0c, // HOM PUP NUM / * - TAB Q - 0x0d, 0x0e, 0x0f, 0x11, 0x10, 0x20, 0x22, 0x1f, // W E R T Y U I O - 0x23, 0x21, 0x1e, 0x2a, 0x75, 0x77, 0x79, 0x59, // P [ ] \ DEL END PDN 7 - 0x5b, 0x5c, 0x45, 0x39, 0x00, 0x01, 0x02, 0x03, // 8 9 + CAP A S D F - 0x05, 0x04, 0x26, 0x28, 0x25, 0x29, 0x27, 0x24, // G H J K L ; ' RET - 0x56, 0x57, 0x58, 0x38, 0x06, 0x07, 0x08, 0x09, // 4 5 6 SHL Z X C V - 0x0b, 0x2d, 0x2e, 0x2b, 0x2f, 0x2c, 0x38, 0x3e, // B N M , . / SHR CUP - 0x53, 0x54, 0x55, 0x4c, 0x36, 0x37, 0x31, 0x37, // 1 2 3 ENT CTL ALT SPC ALT - 0x36, 0x3b, 0x3d, 0x3c, 0x52, 0x41, 0x3a, 0x3a, // CTR CLF CDN CRT 0 . CMD CMD -#if MENU_IS_POWER - 0x7f, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#else - 0x32, 0x32, 0x51, 0x7f, 0xff, 0xff, 0xff, 0xff, // MNU EUR = POW inv inv inv inv -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static const uint8 modifier2mac[0x20] = { -#if MENU_IS_POWER - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x7f, // SHF CMD inv CAP F14 NUM OPT MNU -#else - 0x38, 0x37, 0x36, 0x39, 0x6b, 0x47, 0x3a, 0x32, // SHF CMD CTR CAP F14 NUM OPT MNU -#endif - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, // inv inv inv inv inv inv inv inv - 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff // inv inv inv inv inv inv inv inv -}; - -static filter_result filter_func(BMessage *msg, BHandler **target, BMessageFilter *filter) -{ -// msg->PrintToStream(); - switch (msg->what) { - case B_KEY_DOWN: - case B_KEY_UP: { - uint32 be_code = msg->FindInt32("key") & 0xff; - uint32 mac_code = keycode2mac[be_code]; - - // Intercept Ctrl-F1 (mount floppy disk shortcut) - uint32 mods = msg->FindInt32("modifiers"); - if (be_code == 0x02 && (mods & B_CONTROL_KEY)) - SysMountVolume("/dev/disk/floppy/raw"); - - if (mac_code == 0xff) - return B_DISPATCH_MESSAGE; - if (msg->what == B_KEY_DOWN) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - return B_SKIP_MESSAGE; - } - - case B_MODIFIERS_CHANGED: { - uint32 mods = msg->FindInt32("modifiers"); - uint32 old_mods = msg->FindInt32("be:old_modifiers"); - uint32 changed = mods ^ old_mods; - uint32 mask = 1; - for (int i=0; i<32; i++, mask<<=1) - if (changed & mask) { - uint32 mac_code = modifier2mac[i]; - if (mac_code == 0xff) - continue; - if (mods & mask) - ADBKeyDown(mac_code); - else - ADBKeyUp(mac_code); - } - return B_SKIP_MESSAGE; - } - - case B_MOUSE_MOVED: { - BPoint point; - msg->FindPoint("where", &point); - ADBMouseMoved(int(point.x), int(point.y)); - return B_DISPATCH_MESSAGE; // Otherwise BitmapView::MouseMoved() wouldn't be called - } - - case B_MOUSE_DOWN: { - uint32 buttons = msg->FindInt32("buttons"); - if (buttons & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (buttons & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (buttons & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - return B_SKIP_MESSAGE; - } - - case B_MOUSE_UP: // B_MOUSE_UP means "all buttons released" - ADBMouseUp(0); - ADBMouseUp(1); - ADBMouseUp(2); - return B_SKIP_MESSAGE; - - default: - return B_DISPATCH_MESSAGE; - } -} - - -/* - * Install graphics acceleration - */ - -// Rectangle blitting -static void accl_bitblt(accl_params *p) -{ - D(bug("accl_bitblt\n")); - - // Get blitting parameters - int16 src_X = p->src_rect[1] - p->src_bounds[1]; - int16 src_Y = p->src_rect[0] - p->src_bounds[0]; - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 width = p->dest_rect[3] - p->dest_rect[1] - 1; - int16 height = p->dest_rect[2] - p->dest_rect[0] - 1; - D(bug(" src X %d, src Y %d, dest X %d, dest Y %d\n", src_X, src_Y, dest_X, dest_Y)); - D(bug(" width %d, height %d\n", width, height)); - - // And perform the blit - bitblt_hook(src_X, src_Y, dest_X, dest_Y, width, height); -} - -static bool accl_bitblt_hook(accl_params *p) -{ - D(bug("accl_draw_hook %p\n", p)); - - // Check if we can accelerate this bitblt - if (p->src_base_addr == screen_base && p->dest_base_addr == screen_base && - display_type == DIS_SCREEN && bitblt_hook != NULL && - ((uint32 *)p)[0x18 >> 2] + ((uint32 *)p)[0x128 >> 2] == 0 && - ((uint32 *)p)[0x130 >> 2] == 0 && - p->transfer_mode == 0 && - p->src_row_bytes > 0 && ((uint32 *)p)[0x15c >> 2] > 0) { - - // Yes, set function pointer - p->draw_proc = (uint32)accl_bitblt; - return true; - } - return false; -} - -// Rectangle filling/inversion -static void accl_fillrect8(accl_params *p) -{ - D(bug("accl_fillrect8\n")); - - // Get filling parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - uint8 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - // And perform the fill - fillrect8_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color); -} - -static void accl_fillrect32(accl_params *p) -{ - D(bug("accl_fillrect32\n")); - - // Get filling parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - uint32 color = p->pen_mode == 8 ? p->fore_pen : p->back_pen; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - // And perform the fill - fillrect32_hook(dest_X, dest_Y, dest_X_max, dest_Y_max, color); -} - -static void accl_invrect(accl_params *p) -{ - D(bug("accl_invrect\n")); - - // Get inversion parameters - int16 dest_X = p->dest_rect[1] - p->dest_bounds[1]; - int16 dest_Y = p->dest_rect[0] - p->dest_bounds[0]; - int16 dest_X_max = p->dest_rect[3] - p->dest_bounds[1] - 1; - int16 dest_Y_max = p->dest_rect[2] - p->dest_bounds[0] - 1; - D(bug(" dest X %d, dest Y %d\n", dest_X, dest_Y)); - D(bug(" dest X max %d, dest Y max %d\n", dest_X_max, dest_Y_max)); - - //!!?? pen_mode == 14 - - // And perform the inversion - invrect_hook(dest_X, dest_Y, dest_X_max, dest_Y_max); -} - -static bool accl_fillrect_hook(accl_params *p) -{ - D(bug("accl_fillrect_hook %p\n", p)); - - // Check if we can accelerate this fillrect - if (p->dest_base_addr == screen_base && ((uint32 *)p)[0x284 >> 2] != 0 && display_type == DIS_SCREEN) { - if (p->transfer_mode == 8) { - // Fill - if (p->dest_pixel_size == 8 && fillrect8_hook != NULL) { - p->draw_proc = (uint32)accl_fillrect8; - return true; - } else if (p->dest_pixel_size == 32 && fillrect32_hook != NULL) { - p->draw_proc = (uint32)accl_fillrect32; - return true; - } - } else if (p->transfer_mode == 10 && invrect_hook != NULL) { - // Invert - p->draw_proc = (uint32)accl_invrect; - return true; - } - } - return false; -} - -// Dummy for testing -/* -static void do_nothing(accl_params *p) {} -static bool accl_foobar_hook(accl_params *p) -{ - printf("accl_foobar_hook %p\n", p); - printf(" src_base_addr %p, dest_base_addr %p\n", p->src_base_addr, p->dest_base_addr); - printf(" src_row_bytes %d, dest_row_bytes %d\n", p->src_row_bytes, p->dest_row_bytes); - printf(" src_pixel_size %d, dest_pixel_size %d\n", p->src_pixel_size, p->dest_pixel_size); - printf(" src_bounds (%d,%d,%d,%d), dest_bounds (%d,%d,%d,%d)\n", p->src_bounds[0], p->src_bounds[1], p->src_bounds[2], p->src_bounds[3], p->dest_bounds[0], p->dest_bounds[1], p->dest_bounds[2], p->dest_bounds[3]); - printf(" src_rect (%d,%d,%d,%d), dest_rect (%d,%d,%d,%d)\n", p->src_rect[0], p->src_rect[1], p->src_rect[2], p->src_rect[3], p->dest_rect[0], p->dest_rect[1], p->dest_rect[2], p->dest_rect[3]); - printf(" transfer mode %d\n", p->transfer_mode); - printf(" pen mode %d\n", p->pen_mode); - printf(" fore_pen %08x, back_pen %08x\n", p->fore_pen, p->back_pen); - printf(" val1 %08x, val2 %08x\n", ((uint32 *)p)[0x18 >> 2], ((uint32 *)p)[0x128 >> 2]); - printf(" val3 %08x\n", ((uint32 *)p)[0x130 >> 2]); - printf(" val4 %08x\n", ((uint32 *)p)[0x15c >> 2]); - printf(" val5 %08x\n", ((uint32 *)p)[0x160 >> 2]); - printf(" val6 %08x\n", ((uint32 *)p)[0x1b4 >> 2]); - printf(" val7 %08x\n", ((uint32 *)p)[0x284 >> 2]); - p->draw_proc = (uint32)do_nothing; - return true; -} -static struct accl_hook_info foobar_hook_info = {(uint32)accl_foobar_hook, (uint32)accl_sync_hook, 6}; -*/ - -// Wait for graphics operation to finish -static bool accl_sync_hook(void *arg) -{ - D(bug("accl_sync_hook %p\n", arg)); - if (sync_hook != NULL) - sync_hook(); - return true; -} - -static struct accl_hook_info bitblt_hook_info = {(uint32)accl_bitblt_hook, (uint32)accl_sync_hook, ACCL_BITBLT}; -static struct accl_hook_info fillrect_hook_info = {(uint32)accl_fillrect_hook, (uint32)accl_sync_hook, ACCL_FILLRECT}; - -void VideoInstallAccel(void) -{ - // Install acceleration hooks - if (PrefsFindBool("gfxaccel")) { - D(bug("Video: Installing acceleration hooks\n")); - NQDMisc(6, (uintptr)&bitblt_hook_info); - NQDMisc(6, (uintptr)&fillrect_hook_info); - } -} - - -/* - * Change video mode - */ - -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - while (acquire_sem(video_lock) == B_INTERRUPTED) ; - DisableInterrupt(); - - /* close old display */ - close_display(); - - /* open new display */ - cur_mode = i; - open_display(); - - /* opening the screen failed? Then bail out */ - if (display_type == DIS_SCREEN && the_screen == NULL) { - release_sem(video_lock); - ErrorAlert(GetString(STR_FULL_SCREEN_ERR)); - QuitEmulator(); - } - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - EnableInterrupt(); - release_sem(video_lock); - return noErr; - } - } - return paramErr; -} - - -/* - * Set color palette - */ - -void video_set_palette(void) -{ - if (display_type == DIS_SCREEN && the_screen != NULL) - the_screen->palette_changed = true; - else { // remap colors to BeOS-Palette - BScreen screen; - for (int i=0;i<256;i++) - remap_mac_be[i]=screen.IndexForColor(mac_pal[i].red,mac_pal[i].green,mac_pal[i].blue); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -bool video_can_change_cursor(void) -{ - return (display_type != DIS_SCREEN); -} - - -/* - * Set cursor image for window - */ - -void video_set_cursor(void) -{ - the_window->cursor_changed = true; // Inform window (don't set cursor directly because this may run at interrupt (i.e. signal handler) time) -} - - -/* - * Record dirty area from NQD - */ - -void video_set_dirty_area(int x, int y, int w, int h) -{ -} diff --git a/SheepShaver/src/BeOS/video_screen.h b/SheepShaver/src/BeOS/video_screen.h deleted file mode 100644 index a3b5f2683..000000000 --- a/SheepShaver/src/BeOS/video_screen.h +++ /dev/null @@ -1,262 +0,0 @@ -/* - * video_screen.h - Full screen video modes - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - */ - - -static bool drawing_enable = false; // This flag indicated if the access to the screen is allowed -static int page_num; // Index of the currently displayed buffer - - -// Blitter functions -typedef void (*bitblt_ptr)(int32, int32, int32, int32, int32, int32); -static bitblt_ptr bitblt_hook; -typedef void (*fillrect8_ptr)(int32, int32, int32, int32, uint8); -static fillrect8_ptr fillrect8_hook; -typedef void (*fillrect32_ptr)(int32, int32, int32, int32, uint32); -static fillrect32_ptr fillrect32_hook; -typedef void (*invrect_ptr)(int32, int32, int32, int32); -static invrect_ptr invrect_hook; -typedef void (*sync_ptr)(void); -static sync_ptr sync_hook; - - -class MacScreen : public BWindowScreen { -public: - MacScreen(const char *name, uint32 space); - virtual ~MacScreen(); - virtual void Quit(void); - virtual void ScreenConnected(bool active); - - bool palette_changed; - -private: - static status_t tick_func(void *arg); - - BView *view; // Main view for GetMouse() - - uint8 *frame_backup; // Frame buffer backup when switching from/to different workspace - bool quitting; // Flag for ScreenConnected: We are quitting, don't pause emulator thread - bool first; // Flag for ScreenConnected: This is the first time we become active - - thread_id tick_thread; - bool tick_thread_active; -}; - - -// Pointer to our screen -static MacScreen *the_screen = NULL; - -// Error code from BWindowScreen constructor -static status_t screen_error; - -// to enable debugger mode. -#define SCREEN_DEBUG false - - -/* - * Screen constructor - */ - -MacScreen::MacScreen(const char *name, uint32 space) : BWindowScreen(name, space, &screen_error, SCREEN_DEBUG), tick_thread(-1) -{ - D(bug("Screen constructor\n")); - - // Set all variables - frame_backup = NULL; - palette_changed = false; - quitting = false; - first = true; - drawing_enable = false; - ADBSetRelMouseMode(true); - - // Create view to poll the mouse - view = new BView (BRect(0,0,VModes[cur_mode].viXsize-1,VModes[cur_mode].viYsize-1),NULL,B_FOLLOW_NONE,0); - AddChild(view); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Polling sucks...", B_DISPLAY_PRIORITY, this); - RegisterThread(tick_thread); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - AddCommonFilter(filter); - D(bug("Screen constructor done\n")); -} - - -/* - * Screen destructor - */ - -MacScreen::~MacScreen() -{ - D(bug("Screen destructor, quitting tick thread\n")); - - // Stop 60Hz interrupt - if (tick_thread > 0) { - status_t l; - tick_thread_active = false; - while (wait_for_thread(tick_thread, &l) == B_INTERRUPTED) ; - } - D(bug("tick thread quit\n")); - - // Tell the emulator that we're done - the_screen = NULL; - D(bug("Screen destructor done\n")); -} - - -/* - * Screen closed - */ - -void MacScreen::Quit(void) -{ - // Tell ScreenConnected() that we are quitting - quitting = true; - D(bug("MacScreen::Quit(), disconnecting\n")); - Disconnect(); - D(bug("disconnected\n")); - BWindowScreen::Quit(); -} - - -/* - * Screen connected/disconnected - */ - -void MacScreen::ScreenConnected(bool active) -{ - D(bug("ScreenConnected(%d)\n", active)); - graphics_card_info *info = CardInfo(); - D(bug(" card_info %p\n", info)); - - if (active) { - - // Read graphics parameters - D(bug(" active\n")); - screen_base = (uint32)info->frame_buffer; - D(bug(" screen_base %p\n", screen_base)); - VModes[cur_mode].viRowBytes = info->bytes_per_row; - D(bug(" xmod %d\n", info->bytes_per_row)); - - // Get acceleration functions - if (PrefsFindBool("gfxaccel")) { - bitblt_hook = (bitblt_ptr)CardHookAt(7); - D(bug(" bitblt_hook %p\n", bitblt_hook)); - fillrect8_hook = (fillrect8_ptr)CardHookAt(5); - D(bug(" fillrect8_hook %p\n", fillrect8_hook)); - fillrect32_hook = (fillrect32_ptr)CardHookAt(6); - D(bug(" fillrect32_hook %p\n", fillrect32_hook)); - invrect_hook = (invrect_ptr)CardHookAt(11); - D(bug(" invrect_hook %p\n", invrect_hook)); - sync_hook = (sync_ptr)CardHookAt(10); - D(bug(" sync_hook %p\n", sync_hook)); - } else { - bitblt_hook = NULL; - fillrect8_hook = NULL; - fillrect32_hook = NULL; - invrect_hook = NULL; - sync_hook = NULL; - } - - // The first time we got the screen, we need to init the Window - if (first) { - D(bug(" first time\n")); - first = false; - page_num = 0; // current display : page 0 - } else { // we get our screen back - D(bug(" not first time\n")); - // copy from backup bitmap to framebuffer - memcpy((void *)screen_base, frame_backup, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - // delete backup bitmap - delete[] frame_backup; - frame_backup = NULL; - // restore palette - if (info->bits_per_pixel == 8) - SetColorList(mac_pal); - // restart emul thread - release_sem(mac_os_lock); - } - - // allow the drawing in the frame buffer - D(bug(" enabling frame buffer access\n")); - drawing_enable = true; - video_activated = true; - - } else { - - drawing_enable = false; // stop drawing. - video_activated = false; - if (!quitting) { - // stop emul thread - acquire_sem(mac_os_lock); - // create bitmap and store frame buffer into - frame_backup = new uint8[VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize]; - memcpy(frame_backup, (void *)screen_base, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - } - } - D(bug("ScreenConnected() done\n")); -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacScreen::tick_func(void *arg) -{ - MacScreen *obj = (MacScreen *)arg; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Workspace activated? Then poll the mouse and change the palette if needed - if (video_activated) { - BPoint pt; - uint32 button = 0; - if (obj->LockWithTimeout(200000) == B_OK) { - if (obj->palette_changed) { - obj->palette_changed = false; - obj->SetColorList(mac_pal); - } - obj->view->GetMouse(&pt, &button); - obj->Unlock(); - set_mouse_position(320, 240); - ADBMouseMoved(int(pt.x) - 320, int(pt.y) - 240); - if (button & B_PRIMARY_MOUSE_BUTTON) - ADBMouseDown(0); - if (!(button & B_PRIMARY_MOUSE_BUTTON)) - ADBMouseUp(0); - if (button & B_SECONDARY_MOUSE_BUTTON) - ADBMouseDown(1); - if (!(button & B_SECONDARY_MOUSE_BUTTON)) - ADBMouseUp(1); - if (button & B_TERTIARY_MOUSE_BUTTON) - ADBMouseDown(2); - if (!(button & B_TERTIARY_MOUSE_BUTTON)) - ADBMouseUp(2); - } - } - } - return 0; -} diff --git a/SheepShaver/src/BeOS/video_window.h b/SheepShaver/src/BeOS/video_window.h deleted file mode 100644 index 60c4e1bf6..000000000 --- a/SheepShaver/src/BeOS/video_window.h +++ /dev/null @@ -1,523 +0,0 @@ -/* - * video_window.h - Window video modes - * - * SheepShaver (C) 1997-2008 Marc Hellwig and Christian Bauer - * - * 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 - - -// Messages -static const uint32 MSG_REDRAW = 'draw'; -static const uint32 MSG_ABOUT_REQUESTED = B_ABOUT_REQUESTED; -static const uint32 MSG_REF_5HZ = ' 5Hz'; -static const uint32 MSG_REF_7_5HZ = ' 7Hz'; -static const uint32 MSG_REF_10HZ = '10Hz'; -static const uint32 MSG_REF_15HZ = '15Hz'; -static const uint32 MSG_REF_30HZ = '30Hz'; -static const uint32 MSG_REF_60HZ = '60Hz'; -static const uint32 MSG_MOUNT = 'moun'; - -static bool mouse_in_view; // Flag: Mouse pointer within bitmap view - -// From sys_beos.cpp -extern void SysCreateVolumeMenu(BMenu *menu, uint32 msg); -extern void SysMountVolume(const char *name); - - -/* - * A simple view class for blitting a bitmap on the screen - */ - -class BitmapView : public BView { -public: - BitmapView(BRect frame, BBitmap *bitmap) : BView(frame, "bitmap", B_FOLLOW_NONE, B_WILL_DRAW) - { - the_bitmap = bitmap; - } - virtual void Draw(BRect update) - { - if (the_bitmap) - DrawBitmap(the_bitmap, update, update); - } - virtual void MouseMoved(BPoint point, uint32 transit, const BMessage *message); - -private: - BBitmap *the_bitmap; -}; - - -/* - * Window class - */ - -class MacWindow : public BDirectWindow { -public: - MacWindow(BRect frame); - virtual ~MacWindow(); - virtual void MessageReceived(BMessage *msg); - virtual void DirectConnected(direct_buffer_info *info); - virtual void WindowActivated(bool active); - - int32 frame_skip; - bool cursor_changed; // Flag: set new cursor image in tick function - -private: - static status_t tick_func(void *arg); - - BitmapView *main_view; - BBitmap *the_bitmap; - uint8 *the_buffer; - - uint32 old_scroll_lock_state; - - thread_id tick_thread; - bool tick_thread_active; - - bool supports_direct_mode; - bool bit_bang; - sem_id drawing_sem; - - color_space mode; - void *bits; - int32 bytes_per_row; - color_space pixel_format; - bool unclipped; -}; - - -// Pointer to our window -static MacWindow *the_window = NULL; - - -/* - * Window constructor - */ - -MacWindow::MacWindow(BRect frame) : BDirectWindow(frame, GetString(STR_WINDOW_TITLE), B_TITLED_WINDOW, B_NOT_RESIZABLE | B_NOT_CLOSABLE | B_NOT_ZOOMABLE) -{ - D(bug("Window constructor\n")); - supports_direct_mode = SupportsWindowMode(); - cursor_changed = false; - bit_bang = supports_direct_mode && PrefsFindBool("bitbang"); - - // Move window to right position - Lock(); - MoveTo(80, 60); - - // Allocate bitmap - { - BScreen scr(this); - mode = B_COLOR_8_BIT; - switch (VModes[cur_mode].viAppleMode) { - case APPLE_8_BIT: - mode = B_COLOR_8_BIT; - bit_bang = false; - break; - case APPLE_16_BIT: - mode = B_RGB_16_BIT; - if (scr.ColorSpace() != B_RGB15_BIG && scr.ColorSpace() != B_RGBA15_BIG) - bit_bang = false; - break; - case APPLE_32_BIT: - mode = B_RGB_32_BIT; - if (scr.ColorSpace() != B_RGB32_BIG && scr.ColorSpace() != B_RGBA32_BIG) - bit_bang = false; - break; - } - } - if (bit_bang) { - the_bitmap = NULL; - the_buffer = NULL; - } else { - the_bitmap = new BBitmap(frame, mode); - the_buffer = new uint8[VModes[cur_mode].viRowBytes * (VModes[cur_mode].viYsize + 2)]; // ("height + 2" for safety) - screen_base = (uint32)the_buffer; - } - - // Create bitmap view - main_view = new BitmapView(frame, the_bitmap); - AddChild(main_view); - main_view->MakeFocus(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - - // Set up menus - BRect bounds = Bounds(); - bounds.OffsetBy(0, bounds.IntegerHeight() + 1); - BMenuItem *item; - BMenuBar *bar = new BMenuBar(bounds, "menu"); - BMenu *menu = new BMenu(GetString(STR_WINDOW_MENU)); - menu->AddItem(new BMenuItem(GetString(STR_WINDOW_ITEM_ABOUT), new BMessage(MSG_ABOUT_REQUESTED))); - menu->AddItem(new BSeparatorItem); - BMenu *submenu = new BMenu(GetString(STR_WINDOW_ITEM_REFRESH)); - submenu->AddItem(new BMenuItem(GetString(STR_REF_5HZ_LAB), new BMessage(MSG_REF_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_7_5HZ_LAB), new BMessage(MSG_REF_7_5HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_10HZ_LAB), new BMessage(MSG_REF_10HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_15HZ_LAB), new BMessage(MSG_REF_15HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_30HZ_LAB), new BMessage(MSG_REF_30HZ))); - submenu->AddItem(new BMenuItem(GetString(STR_REF_60HZ_LAB), new BMessage(MSG_REF_60HZ))); - submenu->SetRadioMode(true); - if (frame_skip == 12) { - if ((item = submenu->FindItem(GetString(STR_REF_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 8) { - if ((item = submenu->FindItem(GetString(STR_REF_7_5HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 6) { - if ((item = submenu->FindItem(GetString(STR_REF_10HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 4) { - if ((item = submenu->FindItem(GetString(STR_REF_15HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 2) { - if ((item = submenu->FindItem(GetString(STR_REF_30HZ_LAB))) != NULL) - item->SetMarked(true); - } else if (frame_skip == 1) { - if ((item = submenu->FindItem(GetString(STR_REF_60HZ_LAB))) != NULL) - item->SetMarked(true); - } - menu->AddItem(submenu); - submenu = new BMenu(GetString(STR_WINDOW_ITEM_MOUNT)); - SysCreateVolumeMenu(submenu, MSG_MOUNT); - menu->AddItem(submenu); - bar->AddItem(menu); - AddChild(bar); - SetKeyMenuBar(bar); - int mbar_height = bar->Frame().IntegerHeight() + 1; - - // Resize window to fit menu bar - ResizeBy(0, mbar_height); - - // Set mouse mode and scroll lock state - ADBSetRelMouseMode(false); - mouse_in_view = true; - old_scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (old_scroll_lock_state) - SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - SetTitle(GetString(STR_WINDOW_TITLE)); - - // Clear Mac cursor image - memset(MacCursor + 4, 0, 64); - - // Keep window aligned to 8-byte frame buffer boundaries for faster blitting - SetWindowAlignment(B_BYTE_ALIGNMENT, 8); - - // Create drawing semaphore (for direct mode) - drawing_sem = create_sem(0, "direct frame buffer access"); - - // Start 60Hz interrupt - tick_thread_active = true; - tick_thread = spawn_thread(tick_func, "Window Redraw", B_DISPLAY_PRIORITY, this); - resume_thread(tick_thread); - - // Add filter for keyboard and mouse events - BMessageFilter *filter = new BMessageFilter(B_ANY_DELIVERY, B_ANY_SOURCE, filter_func); - main_view->AddFilter(filter); - - // Show window - Unlock(); - Show(); - Sync(); - D(bug("Window constructor done\n")); -} - - -/* - * Window destructor - */ - -MacWindow::~MacWindow() -{ - // Restore cursor - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - - // Hide window - D(bug("Window destructor, hiding window\n")); - Hide(); - Sync(); - - // Stop 60Hz interrupt - D(bug("Quitting tick thread\n")); - status_t l; - tick_thread_active = false; - delete_sem(drawing_sem); - while (wait_for_thread(tick_thread, &l) == B_INTERRUPTED) ; - D(bug("tick thread quit\n")); - - // dispose allocated memory - delete the_bitmap; - delete[] the_buffer; - - // Tell emulator that we're done - the_window = NULL; - D(bug("Window destructor done\n")); -} - - -/* - * Window connected/disconnected - */ - -void MacWindow::DirectConnected(direct_buffer_info *info) -{ - D(bug("DirectConnected, state %d\n", info->buffer_state)); - switch (info->buffer_state & B_DIRECT_MODE_MASK) { - case B_DIRECT_STOP: - acquire_sem(drawing_sem); - break; - case B_DIRECT_MODIFY: - acquire_sem(drawing_sem); - case B_DIRECT_START: - bits = (void *)((uint8 *)info->bits + info->window_bounds.top * info->bytes_per_row + info->window_bounds.left * info->bits_per_pixel / 8); - bytes_per_row = info->bytes_per_row; - pixel_format = info->pixel_format; - unclipped = false; - if (info->clip_list_count == 1) - if (memcmp(&info->clip_bounds, &info->window_bounds, sizeof(clipping_rect)) == 0) - unclipped = true; - if (bit_bang) { - screen_base = (uint32)bits; - VModes[cur_mode].viRowBytes = bytes_per_row; - } - release_sem(drawing_sem); - break; - } - D(bug("DirectConnected done\n")); -} - - -/* - * Handles redraw messages - */ - -void MacWindow::MessageReceived(BMessage *msg) -{ - BMessage *msg2; - - switch (msg->what) { - case MSG_REDRAW: { - - // Prevent backlog of messages - MessageQueue()->Lock(); - while ((msg2 = MessageQueue()->FindMessage(MSG_REDRAW, 0)) != NULL) { - MessageQueue()->RemoveMessage(msg2); - delete msg2; - } - MessageQueue()->Unlock(); - - // Convert Mac screen buffer to BeOS palette and blit - uint32 length = VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize; - if (mode == B_COLOR_8_BIT) { - // Palette conversion - uint8 *source = the_buffer - 1; - uint8 *dest = (uint8 *)the_bitmap->Bits() - 1; - for (int i=0; iBits() - 1; - for (int i=0; iBits() - 1; - for (int i=0; iDrawBitmapAsync(the_bitmap, update_rect, update_rect); - break; - } - - case MSG_ABOUT_REQUESTED: - OpenAboutWindow(); - break; - - case MSG_REF_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 12); - break; - - case MSG_REF_7_5HZ: - PrefsReplaceInt32("frameskip", frame_skip = 8); - break; - - case MSG_REF_10HZ: - PrefsReplaceInt32("frameskip", frame_skip = 6); - break; - - case MSG_REF_15HZ: - PrefsReplaceInt32("frameskip", frame_skip = 4); - break; - - case MSG_REF_30HZ: - PrefsReplaceInt32("frameskip", frame_skip = 2); - break; - - case MSG_REF_60HZ: - PrefsReplaceInt32("frameskip", frame_skip = 1); - break; - - case MSG_MOUNT: { - BMenuItem *source = NULL; - msg->FindPointer("source", (void **)&source); - if (source) - SysMountVolume(source->Label()); - break; - } - - default: - BDirectWindow::MessageReceived(msg); - } -} - - -/* - * Window activated/deactivated - */ - -void MacWindow::WindowActivated(bool active) -{ - video_activated = active; - if (active) - frame_skip = PrefsFindInt32("frameskip"); - else - frame_skip = 12; // 5Hz in background - BDirectWindow::WindowActivated(active); -} - - -/* - * 60Hz interrupt routine - */ - -status_t MacWindow::tick_func(void *arg) -{ - MacWindow *obj = (MacWindow *)arg; - static int tick_counter = 0; - while (obj->tick_thread_active) { - - // Wait - snooze(16667); - - // Refresh window - if (!obj->bit_bang) - tick_counter++; - if (tick_counter >= obj->frame_skip) { - tick_counter = 0; - - // Window title is determined by Scroll Lock state - uint32 scroll_lock_state = modifiers() & B_SCROLL_LOCK; - if (scroll_lock_state != obj->old_scroll_lock_state) { - if (scroll_lock_state) - obj->SetTitle(GetString(STR_WINDOW_TITLE_FROZEN)); - else - obj->SetTitle(GetString(STR_WINDOW_TITLE)); - obj->old_scroll_lock_state = scroll_lock_state; - } - - // Refresh display unless Scroll Lock is down - if (!scroll_lock_state) { - - // If direct frame buffer access is supported and the content area is completely visible, - // convert the Mac screen buffer directly. Otherwise, send a message to the window to do - // it into a bitmap - if (obj->supports_direct_mode) { - if (acquire_sem_etc(obj->drawing_sem, 1, B_TIMEOUT, 200000) == B_NO_ERROR) { - if (obj->unclipped && obj->mode == B_COLOR_8_BIT && obj->pixel_format == B_CMAP8) { - uint8 *source = obj->the_buffer - 1; - uint8 *dest = (uint8 *)obj->bits; - uint32 bytes_per_row = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yunclipped && obj->mode == B_RGB_16_BIT && (obj->pixel_format == B_RGB15_BIG || obj->pixel_format == B_RGBA15_BIG)) { - uint8 *source = obj->the_buffer; - uint8 *dest = (uint8 *)obj->bits; - uint32 sbpr = VModes[cur_mode].viRowBytes; - uint32 dbpr = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yunclipped && obj->mode == B_RGB_32_BIT && (obj->pixel_format == B_RGB32_BIG || obj->pixel_format == B_RGBA32_BIG)) { - uint8 *source = obj->the_buffer; - uint8 *dest = (uint8 *)obj->bits; - uint32 sbpr = VModes[cur_mode].viRowBytes; - uint32 dbpr = obj->bytes_per_row; - int xsize = VModes[cur_mode].viXsize; - int ysize = VModes[cur_mode].viYsize; - for (int y=0; yPostMessage(MSG_REDRAW); - release_sem(obj->drawing_sem); - } - } else - obj->PostMessage(MSG_REDRAW); - } - } - - // Set new cursor image if desired - if (obj->cursor_changed) { - if (mouse_in_view) - be_app->SetCursor(MacCursor); - obj->cursor_changed = false; - } - } - return 0; -} - - -/* - * Mouse moved - */ - -void BitmapView::MouseMoved(BPoint point, uint32 transit, const BMessage *message) -{ - switch (transit) { - case B_ENTERED_VIEW: - mouse_in_view = true; - be_app->SetCursor(MacCursor); - break; - case B_EXITED_VIEW: - mouse_in_view = false; - be_app->SetCursor(B_HAND_CURSOR); - break; - } -} diff --git a/SheepShaver/src/BeOS/xpram_beos.cpp b/SheepShaver/src/BeOS/xpram_beos.cpp deleted file mode 120000 index e5d7f9658..000000000 --- a/SheepShaver/src/BeOS/xpram_beos.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/BeOS/xpram_beos.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 5a470e6cb..94bb47862 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -21,9 +21,7 @@ /* * NOTES: * - * See main_beos.cpp for a description of the three operating modes. - * - * In addition to that, we have to handle the fact that the MacOS ABI + * We have to handle the fact that the MacOS ABI * is slightly different from the SysV ABI used by Linux: * - Stack frames are different (e.g. LR is stored in 8(r1) under * MacOS, but in 4(r1) under Linux) @@ -41,7 +39,7 @@ * asm_linux.S that create a MacOS stack frame, load the TOC pointer * and put the arguments into the right registers. * - * As on the BeOS, we have to specify an alternate signal stack because + * We have to specify an alternate signal stack because * interrupts (and, under Linux, Low Memory accesses) may occur when r1 * is pointing to the Kernel Data or to Low Memory. There is one * problem, however, due to the alternate signal stack being global to @@ -607,7 +605,7 @@ static bool load_mac_rom(void) rom_tmp = new uint8[ROM_SIZE]; actual = read(rom_fd, (void *)rom_tmp, ROM_SIZE); close(rom_fd); - + // Decode Mac ROM if (!DecodeROM(rom_tmp, actual)) { if (rom_size != 4*1024*1024) { @@ -1015,7 +1013,7 @@ int main(int argc, char **argv) ErrorAlert(GetString(STR_RAM_AREA_TOO_HIGH_ERR)); goto quit; } - + // Create area for Mac ROM if (!ram_rom_areas_contiguous) { if (vm_mac_acquire_fixed(ROM_BASE, ROM_AREA_SIZE + SIG_STACK_SIZE) < 0) { @@ -1508,7 +1506,7 @@ void Set_pthread_attr(pthread_attr_t *attr, int priority) pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED); pthread_attr_setschedpolicy(attr, SCHED_FIFO); struct sched_param fifo_param; - fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) + + fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) + sched_get_priority_max(SCHED_FIFO)) / 2 + priority); pthread_attr_setschedparam(attr, &fifo_param); @@ -1534,7 +1532,7 @@ void Set_pthread_attr(pthread_attr_t *attr, int priority) #ifdef HAVE_PTHREADS struct B2_mutex { - B2_mutex() { + B2_mutex() { pthread_mutexattr_t attr; pthread_mutexattr_init(&attr); // Initialize the mutex for priority inheritance -- @@ -1551,7 +1549,7 @@ struct B2_mutex { pthread_mutex_init(&m, &attr); pthread_mutexattr_destroy(&attr); } - ~B2_mutex() { + ~B2_mutex() { pthread_mutex_trylock(&m); // Make sure it's locked before pthread_mutex_unlock(&m); // unlocking it. pthread_mutex_destroy(&m); @@ -1711,7 +1709,7 @@ void sigusr2_handler(int sig, siginfo_t *sip, void *scp) // Set extra stack for SIGSEGV handler sigaltstack(&extra_stack, NULL); - + // Prepare for 68k interrupt level 1 WriteMacInt16(ReadMacInt32(0x67c), 1); WriteMacInt32(ReadMacInt32(0x658) + 0xdc, ReadMacInt32(ReadMacInt32(0x658) + 0xdc) | ReadMacInt32(0x674)); @@ -1782,7 +1780,7 @@ static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) // Get effective address uint32 addr = r->dar(); - + #ifdef SYSTEM_CLOBBERS_R2 // Restore pointer to Thread Local Storage set_r2(TOC); @@ -1813,19 +1811,19 @@ static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) r->pc() += 4; r->gpr(8) = 0; return; - + // MacOS 8.5 installation } else if (r->pc() == ROMBase + 0x488140 && r->gpr(16) == 0xf8000000) { r->pc() += 4; r->gpr(8) = 0; return; - + // MacOS 8 serial drivers on startup } else if (r->pc() == ROMBase + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) { r->pc() += 4; r->gpr(8) = 0; return; - + // MacOS 8.1 serial drivers on startup } else if (r->pc() == ROMBase + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) { r->pc() += 4; @@ -1833,7 +1831,7 @@ static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) } else if (r->pc() == ROMBase + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) { r->pc() += 4; return; - + // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM) } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) { r->pc() += 4; @@ -1904,7 +1902,7 @@ static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_UX; break; } break; - + case 32: // lwz transfer_type = TYPE_LOAD; transfer_size = SIZE_WORD; addr_mode = MODE_NORM; break; case 33: // lwzu @@ -1960,7 +1958,7 @@ static void sigsegv_handler(int sig, siginfo_t *sip, void *scp) break; #endif } - + // Ignore ROM writes (including to the zero page, which is read-only) if (transfer_type == TYPE_STORE && ((addr >= ROMBase && addr < ROMBase + ROM_SIZE) || diff --git a/SheepShaver/src/include/main.h b/SheepShaver/src/include/main.h index 787832dab..f2b4f2290 100644 --- a/SheepShaver/src/include/main.h +++ b/SheepShaver/src/include/main.h @@ -31,10 +31,6 @@ extern int64 CPUClockSpeed; // Processor clock speed (Hz) extern int64 BusClockSpeed; // Bus clock speed (Hz) extern int64 TimebaseSpeed; // Timebase clock speed (Hz) -#ifdef __BEOS__ -extern system_info SysInfo; // System information -#endif - // 68k register structure (for Execute68k()) struct M68kRegisters { uint32 d[8]; diff --git a/SheepShaver/src/include/prefs_editor.h b/SheepShaver/src/include/prefs_editor.h index 68b0326d8..689451691 100644 --- a/SheepShaver/src/include/prefs_editor.h +++ b/SheepShaver/src/include/prefs_editor.h @@ -21,10 +21,6 @@ #ifndef PREFS_EDITOR_H #define PREFS_EDITOR_H -#ifdef __BEOS__ -extern void PrefsEditor(uint32 msg); -#else extern bool PrefsEditor(void); -#endif #endif diff --git a/SheepShaver/src/rsrc_patches.cpp b/SheepShaver/src/rsrc_patches.cpp index 344b1bad5..ec6fcc2c4 100644 --- a/SheepShaver/src/rsrc_patches.cpp +++ b/SheepShaver/src/rsrc_patches.cpp @@ -626,7 +626,7 @@ void CheckLoad(uint32 type, const char *name, uint8 *p, uint32 size) if (type == FOURCC('D','R','V','R') && strncmp(&name[1], ".AFPTranslator", name[0]) == 0) { D(bug(" DRVR .AFPTranslator found\n")); - + // Don't access ROM85 as it it was a pointer to a ROM version number (8.0, 8.1) static const uint8 dat[] = {0x3a, 0x2e, 0x00, 0x0a, 0x55, 0x4f, 0x3e, 0xb8, 0x02, 0x8e, 0x30, 0x1f, 0x48, 0xc0, 0x24, 0x40, 0x20, 0x40}; base = find_rsrc_data(p, size, dat, sizeof(dat)); @@ -646,11 +646,7 @@ void CheckLoad(uint32 type, const char *name, uint8 *p, uint32 size) * Native Resource Manager patches */ -#ifdef __BEOS__ -static -#else extern "C" -#endif void check_load_invoc(uint32 type, int16 id, uint32 h) { if (h == 0) @@ -663,11 +659,7 @@ void check_load_invoc(uint32 type, int16 id, uint32 h) CheckLoad(type, id, (uint16 *)Mac2HostAddr(p), size); } -#ifdef __BEOS__ -static -#else extern "C" -#endif void named_check_load_invoc(uint32 type, uint32 name, uint32 h) { if (h == 0) @@ -680,238 +672,6 @@ void named_check_load_invoc(uint32 type, uint32 name, uint32 h) CheckLoad(type, (char *)Mac2HostAddr(name), Mac2HostAddr(p), size); } -#ifdef __BEOS__ -static asm void **get_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_ind_resource(register uint32 type, register int16 index) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/index - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_IND_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_ind_resource(register uint32 type, register int16 index) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/index - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_IND_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **r_get_resource(register uint32 type, register int16 id) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_R_GET_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_named_resource(register uint32 type, register uint32 name) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_NAMED_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl named_check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} - -static asm void **get_1_named_resource(register uint32 type, register uint32 name) -{ - // Create stack frame - mflr r0 - stw r0,8(r1) - stwu r1,-(56+12)(r1) - - // Save type/ID - stw r3,56(r1) - stw r4,56+4(r1) - - // Call old routine - lwz r0,XLM_GET_1_NAMED_RESOURCE - lwz r2,XLM_RES_LIB_TOC - mtctr r0 - bctrl - lwz r2,XLM_TOC // Get TOC - stw r3,56+8(r1) // Save handle - - // Call CheckLoad - lwz r3,56(r1) - lwz r4,56+4(r1) - lwz r5,56+8(r1) - bl named_check_load_invoc - lwz r3,56+8(r1) // Restore handle - - // Return to caller - lwz r0,56+12+8(r1) - mtlr r0 - addi r1,r1,56+12 - blr -} -#else // Routines in asm_linux.S extern "C" void get_resource(void); extern "C" void get_1_resource(void); @@ -920,7 +680,6 @@ extern "C" void get_1_ind_resource(void); extern "C" void r_get_resource(void); extern "C" void get_named_resource(void); extern "C" void get_1_named_resource(void); -#endif void PatchNativeResourceManager(void) { @@ -936,14 +695,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_RESOURCE)); -#else -#ifdef __BEOS__ - uint32 *tvec2 = (uint32 *)get_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_resource); -#endif #endif // Patch native Get1Resource() @@ -953,14 +706,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_1_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_1_resource); -#endif #endif // Patch native GetIndResource() @@ -970,14 +717,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_IND_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_IND_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_ind_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_ind_resource); -#endif #endif // Patch native Get1IndResource() @@ -987,14 +728,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_1_IND_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_IND_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_ind_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_1_ind_resource); -#endif #endif // Patch native RGetResource() @@ -1004,14 +739,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_R_GET_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_R_GET_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)r_get_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)r_get_resource); -#endif #endif // Patch native GetNamedResource() @@ -1021,14 +750,8 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_NAMED_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_NAMED_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_named_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_named_resource); -#endif #endif // Patch native Get1NamedResource() @@ -1038,13 +761,7 @@ void PatchNativeResourceManager(void) WriteMacInt32(XLM_GET_1_NAMED_RESOURCE, ReadMacInt32(tvec)); #if EMULATED_PPC WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_NAMED_RESOURCE)); -#else -#ifdef __BEOS__ - tvec2 = (uint32 *)get_1_named_resource; - WriteMacInt32(tvec, tvec2[0]); - WriteMacInt32(tvec + 4, tvec2[1]); #else WriteMacInt32(tvec, (uint32)get_1_named_resource); #endif -#endif } diff --git a/SheepShaver/src/thunks.cpp b/SheepShaver/src/thunks.cpp index f8a1b64a5..9deb7c8bb 100644 --- a/SheepShaver/src/thunks.cpp +++ b/SheepShaver/src/thunks.cpp @@ -289,12 +289,6 @@ bool ThunksInit(void) native_op[ID].tvect = base; \ native_op[ID].func = (uint32)FUNC; \ } while (0) -#elif defined(__BEOS__) -#define DEFINE_NATIVE_OP(ID, FUNC) do { \ - native_op[ID].tvect = FUNC; \ - native_op[ID].func = ((uint32 *)FUNC)[0]; \ - } while (0) -#else #error "FIXME: define NativeOp for your platform" #endif // FIXME: add GetResource() and friends for completeness diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index c29f7cffd..d88025cd0 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -33,11 +33,7 @@ #include "sysdeps.h" #include "user_strings.h" -#ifdef __BEOS__ -#define ELLIPSIS "\xE2\x80\xA6" -#else #define ELLIPSIS "..." -#endif // Common string definitions diff --git a/SheepShaver/src/video.cpp b/SheepShaver/src/video.cpp index 66fecb8dc..bcdeb3601 100644 --- a/SheepShaver/src/video.cpp +++ b/SheepShaver/src/video.cpp @@ -111,10 +111,10 @@ static int16 set_gamma(VidLocals *csSave, uint32 gamma); /* * Tell whether window/screen is activated or not (for mouse/keyboard polling) */ - + bool VideoActivated(void) { - return video_activated; + return video_activated; } @@ -126,7 +126,7 @@ bool VideoSnapshot(int xsize, int ysize, uint8 *p) { if (display_type == DIS_WINDOW) { uint8 *screen = (uint8 *)private_data->saveBaseAddr; - uint32 row_bytes = VModes[cur_mode].viRowBytes; + uint32 row_bytes = VModes[cur_mode].viRowBytes; uint32 y2size = VModes[cur_mode].viYsize; uint32 x2size = VModes[cur_mode].viXsize; for (int j=0;j APPLE_8_BIT) return controlErr; uint32 s_pal = ReadMacInt32(param + csTable); uint16 start = ReadMacInt16(param + csStart); @@ -338,12 +338,8 @@ static int16 VideoControl(uint32 pb, VidLocals *csSave) uint8 *blue_gamma = NULL; int gamma_data_width = 0; if (csSave->gammaTable) { -#ifdef __BEOS__ - // Windows are gamma-corrected by BeOS - const bool can_do_gamma = (display_type == DIS_SCREEN); -#else + // Leave open the possibility of OS-specific provision of gamma correction const bool can_do_gamma = true; -#endif if (can_do_gamma) { uint32 gamma_table = csSave->gammaTable; red_gamma = Mac2HostAddr(gamma_table + gFormulaData + ReadMacInt16(gamma_table + gFormulaSize)); @@ -675,7 +671,7 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) return noErr; case cscGetEntries: { // GetEntries - D(bug("GetEntries\n")); + D(bug("GetEntries\n")); uint32 d_pal = ReadMacInt32(param + csTable); uint16 start = ReadMacInt16(param + csStart); uint16 count = ReadMacInt16(param + csCount); @@ -750,7 +746,7 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) WriteMacInt32(param + csData, csSave->saveData); WriteMacInt16(param + csPage, csSave->savePage); WriteMacInt32(param + csBaseAddr, csSave->saveBaseAddr); - + D(bug("return: mode:%04x ID:%08lx page:%04x ", ReadMacInt16(param + csMode), ReadMacInt32(param + csData), ReadMacInt16(param + csPage))); D(bug("base adress %08lx\n", ReadMacInt32(param + csBaseAddr))); @@ -865,7 +861,7 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) ReadMacInt32(param + csDisplayModeID), ReadMacInt16(param + csDepthMode))); - // find right video mode + // find right video mode for (int i=0; VModes[i].viType!=DIS_INVALID; i++) { if ((ReadMacInt16(param + csDepthMode) == VModes[i].viAppleMode) && (ReadMacInt32(param + csDisplayModeID) == VModes[i].viAppleID)) { @@ -884,42 +880,42 @@ static int16 VideoStatus(uint32 pb, VidLocals *csSave) WriteMacInt32(vpb + vpVRes, 0x00480000); // vert res of the device (ppi) switch (VModes[i].viAppleMode) { case APPLE_1_BIT: - WriteMacInt16(vpb + vpPixelType, 0); + WriteMacInt16(vpb + vpPixelType, 0); WriteMacInt16(vpb + vpPixelSize, 1); WriteMacInt16(vpb + vpCmpCount, 1); WriteMacInt16(vpb + vpCmpSize, 1); WriteMacInt32(param + csDeviceType, 0); // CLUT break; case APPLE_2_BIT: - WriteMacInt16(vpb + vpPixelType, 0); + WriteMacInt16(vpb + vpPixelType, 0); WriteMacInt16(vpb + vpPixelSize, 2); WriteMacInt16(vpb + vpCmpCount, 1); WriteMacInt16(vpb + vpCmpSize, 2); WriteMacInt32(param + csDeviceType, 0); // CLUT break; case APPLE_4_BIT: - WriteMacInt16(vpb + vpPixelType, 0); + WriteMacInt16(vpb + vpPixelType, 0); WriteMacInt16(vpb + vpPixelSize, 4); WriteMacInt16(vpb + vpCmpCount, 1); WriteMacInt16(vpb + vpCmpSize, 4); WriteMacInt32(param + csDeviceType, 0); // CLUT break; case APPLE_8_BIT: - WriteMacInt16(vpb + vpPixelType, 0); + WriteMacInt16(vpb + vpPixelType, 0); WriteMacInt16(vpb + vpPixelSize, 8); WriteMacInt16(vpb + vpCmpCount, 1); WriteMacInt16(vpb + vpCmpSize, 8); WriteMacInt32(param + csDeviceType, 0); // CLUT break; case APPLE_16_BIT: - WriteMacInt16(vpb + vpPixelType, 0x10); + WriteMacInt16(vpb + vpPixelType, 0x10); WriteMacInt16(vpb + vpPixelSize, 16); WriteMacInt16(vpb + vpCmpCount, 3); WriteMacInt16(vpb + vpCmpSize, 5); WriteMacInt32(param + csDeviceType, 2); // DIRECT break; case APPLE_32_BIT: - WriteMacInt16(vpb + vpPixelType, 0x10); + WriteMacInt16(vpb + vpPixelType, 0x10); WriteMacInt16(vpb + vpPixelSize, 32); WriteMacInt16(vpb + vpCmpCount, 3); WriteMacInt16(vpb + vpCmpSize, 8); From 7e845b6ea2569c18800b33c81eccb609087da8c3 Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 16 Dec 2020 18:14:25 -0800 Subject: [PATCH 519/534] Remove real 68k support --- BasiliskII/src/CrossPlatform/sigsegv.cpp | 4 - BasiliskII/src/CrossPlatform/video_blit.cpp | 5 +- BasiliskII/src/CrossPlatform/video_vosf.h | 8 +- BasiliskII/src/MacOSX/PrefsEditor.mm | 2 +- BasiliskII/src/MacOSX/config.h | 3 - BasiliskII/src/MacOSX/main_macosx.mm | 63 +- BasiliskII/src/MacOSX/video_macosx.mm | 2 +- BasiliskII/src/Unix/configure.ac | 92 +-- BasiliskII/src/Unix/main_unix.cpp | 536 +----------------- BasiliskII/src/Unix/prefs_editor_gtk.cpp | 2 - BasiliskII/src/Unix/sysdeps.h | 28 +- BasiliskII/src/Unix/video_x.cpp | 10 +- BasiliskII/src/Windows/main_windows.cpp | 5 - BasiliskII/src/Windows/prefs_editor_gtk.cpp | 2 - BasiliskII/src/Windows/sysdeps.h | 14 +- BasiliskII/src/ether.cpp | 2 - BasiliskII/src/include/ether.h | 8 +- BasiliskII/src/main.cpp | 4 - BasiliskII/src/native_cpu/cpu_emulation.h | 67 --- BasiliskII/src/rom_patches.cpp | 18 +- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 17 +- .../src/uae_cpu/compiler/compemu_support.cpp | 10 +- BasiliskII/src/uae_cpu/cpu_emulation.h | 4 +- BasiliskII/src/uae_cpu/memory.cpp | 4 +- BasiliskII/src/uae_cpu/memory.h | 12 +- BasiliskII/src/uae_cpu/newcpu.cpp | 2 +- BasiliskII/src/uae_cpu/newcpu.h | 4 +- 27 files changed, 47 insertions(+), 881 deletions(-) delete mode 100644 BasiliskII/src/native_cpu/cpu_emulation.h diff --git a/BasiliskII/src/CrossPlatform/sigsegv.cpp b/BasiliskII/src/CrossPlatform/sigsegv.cpp index 10a781713..fd440c85f 100755 --- a/BasiliskII/src/CrossPlatform/sigsegv.cpp +++ b/BasiliskII/src/CrossPlatform/sigsegv.cpp @@ -2924,10 +2924,6 @@ static bool sigsegv_do_install_handler(int sig) sigemptyset(&sigsegv_sa.sa_mask); sigsegv_sa.sa_handler = (signal_handler)sigsegv_handler; sigsegv_sa.sa_flags = 0; -#if !EMULATED_68K && defined(__NetBSD__) - sigaddset(&sigsegv_sa.sa_mask, SIGALRM); - sigsegv_sa.sa_flags |= SA_ONSTACK; -#endif return (sigaction(sig, &sigsegv_sa, 0) == 0); #else return (signal(sig, (signal_handler)sigsegv_handler) != SIG_ERR); diff --git a/BasiliskII/src/CrossPlatform/video_blit.cpp b/BasiliskII/src/CrossPlatform/video_blit.cpp index 2d7e534d9..eab372241 100755 --- a/BasiliskII/src/CrossPlatform/video_blit.cpp +++ b/BasiliskII/src/CrossPlatform/video_blit.cpp @@ -516,14 +516,13 @@ static Screen_blit_func_info Screen_blitters[] = { // Initialize the framebuffer update function // Returns FALSE, if the function was to be reduced to a simple memcpy() // --> In that case, VOSF is not necessary -bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_order, int mac_depth) -{ +bool Screen_blitter_init(VisualFormat const & visual_format, bool native_byte_order, int mac_depth){ #if USE_SDL_VIDEO const bool use_sdl_video = true; #else const bool use_sdl_video = false; #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING || USE_SDL_VIDEO +#if DIRECT_ADDRESSING || USE_SDL_VIDEO if (mac_depth == 1 && !use_sdl_video && !visual_format.fullscreen) { // Windowed 1-bit mode uses a 1-bit X image, so there's no need for special blitting routines diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index f1d2f3add..0c182925c 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -535,14 +535,12 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) /* * Update display for DGA mode and VOSF - * (only in Real or Direct Addressing mode) + * (only in Direct Addressing mode) */ #ifndef TEST_VOSF_PERFORMANCE -#if REAL_ADDRESSING || DIRECT_ADDRESSING - -static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) -{ +#if DIRECT_ADDRESSING +static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT){ VIDEO_MODE_INIT; // Compute number of bytes per row, take care to virtual screens diff --git a/BasiliskII/src/MacOSX/PrefsEditor.mm b/BasiliskII/src/MacOSX/PrefsEditor.mm index 1b9cd13a6..06af5382f 100644 --- a/BasiliskII/src/MacOSX/PrefsEditor.mm +++ b/BasiliskII/src/MacOSX/PrefsEditor.mm @@ -763,7 +763,7 @@ - (IBAction) ShowPrefs: (id)sender cpu = PrefsFindInt32("cpu"); val = PrefsFindInt32("modelid"); -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING puts("Current memory model does not support 24bit addressing"); if ( val == [classic tag] ) { diff --git a/BasiliskII/src/MacOSX/config.h b/BasiliskII/src/MacOSX/config.h index e0b4671a1..a6dde88ce 100644 --- a/BasiliskII/src/MacOSX/config.h +++ b/BasiliskII/src/MacOSX/config.h @@ -31,9 +31,6 @@ /* Define if using "mon". */ /* #undef ENABLE_MON */ -/* Define if using native 68k mode. */ -/* #undef ENABLE_NATIVE_M68K */ - /* Define to 1 if translation of program messages to the user's native language is requested. */ /* #undef ENABLE_NLS */ diff --git a/BasiliskII/src/MacOSX/main_macosx.mm b/BasiliskII/src/MacOSX/main_macosx.mm index b14a2ede4..b226e93bd 100644 --- a/BasiliskII/src/MacOSX/main_macosx.mm +++ b/BasiliskII/src/MacOSX/main_macosx.mm @@ -32,7 +32,7 @@ # include #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # include #endif @@ -107,11 +107,6 @@ static void sigint_handler(...); #endif -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif - - /* * Helpers to map memory that can be accessed from the Mac side */ @@ -334,58 +329,14 @@ bool InitEmulator (void) if (RAMSize > 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) RAMSize = 1023*1024*1024; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING RAMSize = RAMSize & -getpagesize(); // Round down to page boundary #endif // Initialize VM system vm_init(); -#if REAL_ADDRESSING - // Flag: RAM and ROM are contigously allocated from address 0 - bool memory_mapped_from_zero = false; - - // Make sure to map RAM & ROM at address 0 only on platforms that - // supports linker scripts to relocate the Basilisk II executable - // above 0x70000000 -#if HAVE_LINKER_SCRIPT - const bool can_map_all_memory = true; -#else - const bool can_map_all_memory = false; -#endif - - // Try to allocate all memory from 0x0000, if it is not known to crash - if (can_map_all_memory && (vm_acquire_mac_fixed(0, RAMSize + 0x100000) == 0)) { - D(bug("Could allocate RAM and ROM from 0x0000\n")); - memory_mapped_from_zero = true; - } - -#ifndef PAGEZERO_HACK - // Otherwise, just create the Low Memory area (0x0000..0x2000) - else if (vm_acquire_mac_fixed(0, 0x2000) == 0) { - D(bug("Could allocate the Low Memory globals\n")); - lm_area_mapped = true; - } - - // Exit on failure - else { - sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif -#else - *str = 0; // Eliminate unused variable warning -#endif /* REAL_ADDRESSING */ - // Create areas for Mac RAM and ROM -#if REAL_ADDRESSING - if (memory_mapped_from_zero) { - RAMBaseHost = (uint8 *)0; - ROMBaseHost = RAMBaseHost + RAMSize; - } - else -#endif { uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); if (ram_rom_area == VM_MAP_FAILED) { @@ -411,10 +362,6 @@ bool InitEmulator (void) MEMBaseDiff = (uintptr)RAMBaseHost; RAMBaseMac = 0; ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif -#if REAL_ADDRESSING - RAMBaseMac = Host2MacAddr(RAMBaseHost); - ROMBaseMac = Host2MacAddr(ROMBaseHost); #endif D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); @@ -498,12 +445,6 @@ void QuitEmuNoExit() } #endif -#if REAL_ADDRESSING - // Delete Low Memory area - if (lm_area_mapped) - vm_release(0, 0x2000); -#endif - // Exit VM wrappers vm_exit(); diff --git a/BasiliskII/src/MacOSX/video_macosx.mm b/BasiliskII/src/MacOSX/video_macosx.mm index 026ae2c85..991483367 100644 --- a/BasiliskII/src/MacOSX/video_macosx.mm +++ b/BasiliskII/src/MacOSX/video_macosx.mm @@ -409,7 +409,7 @@ static void mask_buffer (void *buffer, size_t width, size_t size) void OSX_monitor::set_mac_frame_buffer(const video_mode mode) { -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +#if !DIRECT_ADDRESSING set_mac_frame_base(MacFrameBaseMac); // Set variables used by UAE memory banking diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 1e8b2c2f8..3b834bb92 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -61,11 +61,10 @@ dnl Addressing modes. AC_ARG_ENABLE(addressing, [ --enable-addressing=AM specify the addressing mode to use [default=fastest]], [ case "$enableval" in - real) ADDRESSING_TEST_ORDER="real";; direct) ADDRESSING_TEST_ORDER="direct";; banks) ADDRESSING_TEST_ORDER="banks";; fastest)ADDRESSING_TEST_ORDER="direct banks";; - *) AC_MSG_ERROR([--enable-addressing takes only one of the following values: fastest, real, direct, banks]);; + *) AC_MSG_ERROR([--enable-addressing takes only one of the following values: fastest, direct, banks]);; esac ], [ ADDRESSING_TEST_ORDER="direct banks" @@ -127,11 +126,6 @@ if [[ "x$BII_CROSS_MPROTECT_WORKS" = "x" ]]; then BII_CROSS_MPROTECT_WORKS="guessing no" fi -AC_ARG_VAR(BII_CROSS_MAP_LOW_AREA, [ Whether the target system can map 0x2000 bytes from 0x0000 [default=guessing no]]) -if [[ "x$BII_CROSS_MAP_LOW_AREA" = "x" ]]; then - BII_CROSS_MAP_LOW_AREA="guessing no" -fi - AC_ARG_VAR(BII_CROSS_SIGNAL_NEED_REINSTALL, [ Whether the target system needs signal handlers to be reinstalled [default=guessing yes]]) if [[ "x$BII_CROSS_SIGNAL_NEED_REINSTALL" = "x" ]]; then BII_CROSS_SIGNAL_NEED_REINSTALL="guessing yes" @@ -189,13 +183,11 @@ DEFINES="$DEFINES -DOS_$OS_TYPE" dnl Target CPU type. HAVE_I386=no -HAVE_M68K=no HAVE_SPARC=no HAVE_POWERPC=no HAVE_X86_64=no case "$target_cpu" in i386* | i486* | i586* | i686* | i786* ) HAVE_I386=yes;; - m68k* ) HAVE_M68K=yes;; sparc* ) HAVE_SPARC=yes;; powerpc* ) HAVE_POWERPC=yes;; x86_64* | amd64* ) HAVE_X86_64=yes;; @@ -735,7 +727,6 @@ SCSISRC=../dummy/scsi_dummy.cpp AUDIOSRC=../dummy/audio_dummy.cpp EXTFSSRC=extfs_unix.cpp EXTRASYSSRCS= -CAN_NATIVE_M68K=no case "$target_os" in linux*) ETHERSRC=ether_unix.cpp @@ -766,7 +757,6 @@ freebsd*) fi ;; netbsd*) - CAN_NATIVE_M68K=yes ETHERSRC=ether_unix.cpp ;; solaris*) @@ -916,14 +906,6 @@ if [[ "x$have_libvhd" = "xyes" ]]; then EXTRASYSSRCS="$EXTRASYSSRCS vhd_unix.cpp" fi - -dnl Use 68k CPU natively? -WANT_NATIVE_M68K=no -if [[ "x$HAVE_M68K" = "xyes" -a "x$CAN_NATIVE_M68K" = "xyes" ]]; then - AC_DEFINE(ENABLE_NATIVE_M68K, 1, [Define if using native 68k mode.]) - WANT_NATIVE_M68K=yes -fi - if [[ "x$HAVE_PTHREADS" = "xno" ]]; then dnl Serial, ethernet and audio support needs pthreads AC_MSG_WARN([You don't have pthreads, disabling serial, ethernet and audio support.]) @@ -1116,42 +1098,6 @@ AC_TRANSLATE_DEFINE(HAVE_MMAP_VM, "$have_mmap_vm", fi dnl HAVE_MMAP_VM -dnl Check if we can modify the __PAGEZERO segment for use as Low Memory -AC_CACHE_CHECK([whether __PAGEZERO can be Low Memory area 0x0000-0x2000], - ac_cv_pagezero_hack, [ - ac_cv_pagezero_hack=no - if AC_TRY_COMMAND([Darwin/testlmem.sh 0x2000]); then - ac_cv_pagezero_hack=yes - dnl might as well skip the test for mmap-able low memory - ac_cv_can_map_lm=no - fi -]) -AC_TRANSLATE_DEFINE(PAGEZERO_HACK, "$ac_cv_pagezero_hack", - [Define if the __PAGEZERO Mach-O Low Memory Globals hack works on this system.]) - -dnl Check if we can mmap 0x2000 bytes from 0x0000 -AC_CACHE_CHECK([whether we can map Low Memory area 0x0000-0x2000], - ac_cv_can_map_lm, [ - AC_LANG_SAVE - AC_LANG_CPLUSPLUS - AC_TRY_RUN([ - #include "../CrossPlatform/vm_alloc.cpp" - int main(void) { /* returns 0 if we could map the lowmem globals */ - volatile char * lm = 0; - if (vm_init() < 0) exit(1); - if (vm_acquire_fixed(0, 0x2000) < 0) exit(1); - lm[0] = 'z'; - if (vm_release((char *)lm, 0x2000) < 0) exit(1); - vm_exit(); exit(0); - } - ], ac_cv_can_map_lm=yes, ac_cv_can_map_lm=no, - dnl When cross-compiling, do not assume anything. - ac_cv_can_map_lm="$BII_CROSS_MAP_LOW_AREA" - ) - AC_LANG_RESTORE - ] -) - dnl Check signal handlers need to be reinstalled AC_CACHE_CHECK([whether signal handlers need to be reinstalled], ac_cv_signal_need_reinstall, [ @@ -1417,32 +1363,10 @@ AC_TRANSLATE_DEFINE(HAVE_LINKER_SCRIPT, "$ac_cv_linker_script_works", [Define if there is a linker script to relocate the executable above 0x70000000.]) dnl Determine the addressing mode to use -if [[ "x$WANT_NATIVE_M68K" = "xyes" ]]; then - ADDRESSING_MODE="real" -else ADDRESSING_MODE="" AC_MSG_CHECKING([for the addressing mode to use]) for am in $ADDRESSING_TEST_ORDER; do case $am in - real) - dnl Requires ability to mmap() Low Memory globals - if [[ "x$ac_cv_can_map_lm$ac_cv_pagezero_hack" = "xnono" ]]; then - continue - fi - dnl Requires VOSF screen updates - if [[ "x$CAN_VOSF" = "xno" ]]; then - continue - fi - dnl Real addressing will probably work. - ADDRESSING_MODE="real" - WANT_VOSF=yes dnl we can use VOSF and we need it actually - DEFINES="$DEFINES -DREAL_ADDRESSING" - if [[ "x$ac_cv_pagezero_hack" = "xyes" ]]; then - BLESS=Darwin/lowmem - LDFLAGS="$LDFLAGS -pagezero_size 0x2000" - fi - break - ;; direct) dnl Requires VOSF screen updates if [[ "x$CAN_VOSF" = "xyes" ]]; then @@ -1466,7 +1390,6 @@ else AC_MSG_WARN([Sorry, no suitable addressing mode in $ADDRESSING_TEST_ORDER]) ADDRESSING_MODE="memory banks" fi -fi dnl Banked Memory Addressing mode is not supported by the JIT compiler if [[ "x$WANT_JIT" = "xyes" -a "x$ADDRESSING_MODE" = "xmemory banks" ]]; then @@ -1645,10 +1568,6 @@ elif [[ "x$HAVE_GCC27" = "xyes" -a "x$HAVE_SPARC" = "xyes" -a "x$HAVE_GAS" = "xy esac ;; esac -elif [[ "x$WANT_NATIVE_M68K" = "xyes" ]]; then - dnl Native m68k, no emulation - CPUINCLUDES="-I../native_cpu" - CPUSRCS="asm_support.s" fi dnl Enable JIT compiler, if possible. @@ -1866,11 +1785,9 @@ dnl Check for certain math functions AC_CHECK_FUNCS(atanh) AC_CHECK_FUNCS(isnan isinf finite isnormal signbit) -dnl UAE CPU sources for all non-m68k-native architectures. -if [[ "x$WANT_NATIVE_M68K" = "xno" ]]; then - CPUINCLUDES="-I../uae_cpu" - CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" -fi +dnl UAE CPU sources for all architectures. +CPUINCLUDES="-I../uae_cpu" +CPUSRCS="../uae_cpu/basilisk_glue.cpp ../uae_cpu/memory.cpp ../uae_cpu/newcpu.cpp ../uae_cpu/readcpu.cpp $FPUSRCS cpustbl.cpp cpudefs.cpp $CPUSRCS $JITSRCS" dnl Or if we have -IPA (MIPSPro compilers) if [[ "x$HAVE_IPA" = "xyes" ]]; then @@ -1908,7 +1825,6 @@ echo Enable video on SEGV signals ........... : $WANT_VOSF echo ESD sound support ...................... : $WANT_ESD echo GTK user interface ..................... : $WANT_GTK echo mon debugger support ................... : $WANT_MON -echo Running m68k code natively ............. : $WANT_NATIVE_M68K echo Use JIT compiler ....................... : $WANT_JIT echo JIT debug mode ......................... : $WANT_JIT_DEBUG echo Floating-Point emulation core .......... : $FPE_CORE diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index b0a9c2c14..a1d9b7964 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -39,24 +39,10 @@ # include #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # include #endif -#if !EMULATED_68K && defined(__NetBSD__) -# include -# include -# include -# include -struct sigstate { - int ss_flags; - struct frame ss_frame; - struct fpframe ss_fpstate; -}; -# define SS_FPSTATE 0x02 -# define SS_USERREGS 0x04 -#endif - #ifdef ENABLE_GTK # include # include @@ -109,26 +95,10 @@ extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_suppo #define DEBUG 0 #include "debug.h" - // Constants const char ROM_FILE_NAME[] = "ROM"; -#if !EMULATED_68K -const int SIG_STACK_SIZE = SIGSTKSZ; // Size of signal stack -#endif const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - -#if !EMULATED_68K -// RAM and ROM pointers -uint32 RAMBaseMac; // RAM base (Mac address space) -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM -#endif - - // CPU and FPU type, addressing mode int CPUType; bool CPUIs68060; @@ -148,10 +118,6 @@ X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes #ifdef HAVE_PTHREADS -#if !EMULATED_68K -static pthread_t emul_thread; // Handle of MacOS emulation thread (main thread) -#endif - static bool xpram_thread_active = false; // Flag: XPRAM watchdog installed static volatile bool xpram_thread_cancel = false; // Flag: Cancel XPRAM thread static pthread_t xpram_thread; // XPRAM watchdog @@ -172,14 +138,6 @@ static pthread_mutex_t intflag_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to pro #endif -#if !EMULATED_68K -#define SIG_IRQ SIGUSR1 -static struct sigaction sigirq_sa; // Virtual 68k interrupt signal -static struct sigaction sigill_sa; // Illegal instruction -static void *sig_stack = NULL; // Stack for signal handlers -uint16 EmulatedSR; // Emulated bits of SR (supervisor bit and interrupt mask) -#endif - #if USE_SCRATCHMEM_SUBTERFUGE uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes #endif @@ -198,10 +156,6 @@ static struct sigaction sigint_sa; // sigaction for SIGINT handler static void sigint_handler(...); #endif -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif - static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI static const char *gui_connection_path = NULL; // GUI connection identifier @@ -210,11 +164,6 @@ static const char *gui_connection_path = NULL; // GUI connection identifier static void *xpram_func(void *arg); static void *tick_func(void *arg); static void one_tick(...); -#if !EMULATED_68K -static void sigirq_handler(int sig, int code, struct sigcontext *scp); -static void sigill_handler(int sig, int code, struct sigcontext *scp); -extern "C" void EmulOpTrampoline(void); -#endif // vde switch variable char* vde_sock; @@ -292,7 +241,6 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) if (fault_instruction != SIGSEGV_INVALID_ADDRESS) fprintf(stderr, " [IP=%p]", fault_instruction); fprintf(stderr, "\n"); -#if EMULATED_68K uaecptr nextpc; #ifdef UPDATE_UAE extern void m68k_dumpstate(FILE *, uaecptr *nextpc); @@ -301,7 +249,6 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) extern void m68k_dumpstate(uaecptr *nextpc); m68k_dumpstate(&nextpc); #endif -#endif #if USE_JIT && JIT_DEBUG extern void compiler_dumpstate(void); compiler_dumpstate(); @@ -606,56 +553,14 @@ int main(int argc, char **argv) if (RAMSize > 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) RAMSize = 1023*1024*1024; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING RAMSize = RAMSize & -getpagesize(); // Round down to page boundary #endif // Initialize VM system vm_init(); -#if REAL_ADDRESSING - // Flag: RAM and ROM are contigously allocated from address 0 - bool memory_mapped_from_zero = false; - - // Make sure to map RAM & ROM at address 0 only on platforms that - // supports linker scripts to relocate the Basilisk II executable - // above 0x70000000 -#if HAVE_LINKER_SCRIPT - const bool can_map_all_memory = true; -#else - const bool can_map_all_memory = false; -#endif - - // Try to allocate all memory from 0x0000, if it is not known to crash - if (can_map_all_memory && (vm_acquire_mac_fixed(0, RAMSize + 0x100000) == 0)) { - D(bug("Could allocate RAM and ROM from 0x0000\n")); - memory_mapped_from_zero = true; - } - -#ifndef PAGEZERO_HACK - // Otherwise, just create the Low Memory area (0x0000..0x2000) - else if (vm_acquire_mac_fixed(0, 0x2000) == 0) { - D(bug("Could allocate the Low Memory globals\n")); - lm_area_mapped = true; - } - - // Exit on failure - else { - sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif -#endif /* REAL_ADDRESSING */ - // Create areas for Mac RAM and ROM -#if REAL_ADDRESSING - if (memory_mapped_from_zero) { - RAMBaseHost = (uint8 *)0; - ROMBaseHost = RAMBaseHost + RAMSize; - } - else -#endif { uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); if (ram_rom_area == VM_MAP_FAILED) { @@ -682,10 +587,6 @@ int main(int argc, char **argv) RAMBaseMac = 0; ROMBaseMac = Host2MacAddr(ROMBaseHost); #endif -#if REAL_ADDRESSING - RAMBaseMac = Host2MacAddr(RAMBaseHost); - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif #if __MACOSX__ extern void set_current_directory(); @@ -715,35 +616,6 @@ int main(int argc, char **argv) QuitEmulator(); } -#if !EMULATED_68K - // Get CPU model - int mib[2] = {CTL_HW, HW_MODEL}; - char *model; - size_t model_len; - sysctl(mib, 2, NULL, &model_len, NULL, 0); - model = (char *)malloc(model_len); - sysctl(mib, 2, model, &model_len, NULL, 0); - D(bug("Model: %s\n", model)); - - // Set CPU and FPU type - CPUIs68060 = false; - if (strstr(model, "020")) - CPUType = 2; - else if (strstr(model, "030")) - CPUType = 3; - else if (strstr(model, "040")) - CPUType = 4; - else if (strstr(model, "060")) { - CPUType = 4; - CPUIs68060 = true; - } else { - printf("WARNING: Cannot detect CPU type, assuming 68020\n"); - CPUType = 2; - } - FPUType = 1; // NetBSD has an FPU emulation, so the FPU ought to be available at all times - TwentyFourBitAddressing = false; -#endif - // Initialize everything if (!InitAll(vmdir)) QuitEmulator(); @@ -752,57 +624,6 @@ int main(int argc, char **argv) D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); -#if !EMULATED_68K - // (Virtual) supervisor mode, disable interrupts - EmulatedSR = 0x2700; - -#ifdef HAVE_PTHREADS - // Get handle of main thread - emul_thread = pthread_self(); -#endif - - // Create and install stack for signal handlers - sig_stack = malloc(SIG_STACK_SIZE); - D(bug("Signal stack at %p\n", sig_stack)); - if (sig_stack == NULL) { - ErrorAlert(STR_NOT_ENOUGH_MEMORY_ERR); - QuitEmulator(); - } - stack_t new_stack; - new_stack.ss_sp = sig_stack; - new_stack.ss_flags = 0; - new_stack.ss_size = SIG_STACK_SIZE; - if (sigaltstack(&new_stack, NULL) < 0) { - sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - - // Install SIGILL handler for emulating privileged instructions and - // executing A-Trap and EMUL_OP opcodes - sigemptyset(&sigill_sa.sa_mask); // Block virtual 68k interrupts during SIGILL handling - sigaddset(&sigill_sa.sa_mask, SIG_IRQ); - sigaddset(&sigill_sa.sa_mask, SIGALRM); - sigill_sa.sa_handler = (void (*)(int))sigill_handler; - sigill_sa.sa_flags = SA_ONSTACK; - if (sigaction(SIGILL, &sigill_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGILL", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } - - // Install virtual 68k interrupt signal handler - sigemptyset(&sigirq_sa.sa_mask); - sigaddset(&sigirq_sa.sa_mask, SIGALRM); - sigirq_sa.sa_handler = (void (*)(int))sigirq_handler; - sigirq_sa.sa_flags = SA_ONSTACK | SA_RESTART; - if (sigaction(SIG_IRQ, &sigirq_sa, NULL) < 0) { - sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIG_IRQ", strerror(errno)); - ErrorAlert(str); - QuitEmulator(); - } -#endif - #ifdef ENABLE_MON // Setup SIGINT handler to enter mon sigemptyset(&sigint_sa.sa_mask); @@ -859,9 +680,6 @@ int main(int argc, char **argv) // Start 60Hz timer sigemptyset(&timer_sa.sa_mask); // Block virtual 68k interrupts during SIGARLM handling -#if !EMULATED_68K - sigaddset(&timer_sa.sa_mask, SIG_IRQ); -#endif timer_sa.sa_handler = one_tick; timer_sa.sa_flags = SA_ONSTACK | SA_RESTART; if (sigaction(SIGALRM, &timer_sa, NULL) < 0) { @@ -901,10 +719,8 @@ void QuitEmulator(void) { D(bug("QuitEmulator\n")); -#if EMULATED_68K // Exit 680x0 emulation Exit680x0(); -#endif #if defined(USE_CPU_EMUL_SERVICES) // Show statistics @@ -960,12 +776,6 @@ void QuitEmulator(void) } #endif -#if REAL_ADDRESSING - // Delete Low Memory area - if (lm_area_mapped) - vm_release(0, 0x2000); -#endif - // Exit VM wrappers vm_exit(); @@ -996,8 +806,7 @@ void QuitEmulator(void) * or a dynamically recompiling emulator) */ -void FlushCodeCache(void *start, uint32 size) -{ +void FlushCodeCache(void *start, uint32 size){ #if USE_JIT if (UseJIT) #ifdef UPDATE_UAE @@ -1006,9 +815,6 @@ void FlushCodeCache(void *start, uint32 size) flush_icache_range((uint8 *)start, size); #endif #endif -#if !EMULATED_68K && defined(__NetBSD__) - m68k_sync_icache(start, size); -#endif } @@ -1017,9 +823,7 @@ void FlushCodeCache(void *start, uint32 size) */ #ifdef ENABLE_MON -static void sigint_handler(...) -{ -#if EMULATED_68K +static void sigint_handler(...){ uaecptr nextpc; #ifdef UPDATE_UAE extern void m68k_dumpstate(FILE *, uaecptr *nextpc); @@ -1027,7 +831,6 @@ static void sigint_handler(...) #else extern void m68k_dumpstate(uaecptr *nextpc); m68k_dumpstate(&nextpc); -#endif #endif VideoQuitFullScreen(); const char *arg[4] = {"mon", "-m", "-r", NULL}; @@ -1155,38 +958,17 @@ void B2_delete_mutex(B2_mutex *mutex) uint32 InterruptFlags = 0; -#if EMULATED_68K -void SetInterruptFlag(uint32 flag) -{ +void SetInterruptFlag(uint32 flag){ LOCK_INTFLAGS; InterruptFlags |= flag; UNLOCK_INTFLAGS; } -void ClearInterruptFlag(uint32 flag) -{ +void ClearInterruptFlag(uint32 flag){ LOCK_INTFLAGS; InterruptFlags &= ~flag; UNLOCK_INTFLAGS; } -#endif - -#if !EMULATED_68K -void TriggerInterrupt(void) -{ -#if defined(HAVE_PTHREADS) - pthread_kill(emul_thread, SIG_IRQ); -#else - raise(SIG_IRQ); -#endif -} - -void TriggerNMI(void) -{ - // not yet supported -} -#endif - /* * XPRAM watchdog thread (saves XPRAM every minute) @@ -1281,312 +1063,6 @@ static void *tick_func(void *arg) } #endif - -#if !EMULATED_68K -/* - * Virtual 68k interrupt handler - */ - -static void sigirq_handler(int sig, int code, struct sigcontext *scp) -{ - // Interrupts disabled? Then do nothing - if (EmulatedSR & 0x0700) - return; - - struct sigstate *state = (struct sigstate *)scp->sc_ap; - M68kRegisters *regs = (M68kRegisters *)&state->ss_frame; - - // Set up interrupt frame on stack - uint32 a7 = regs->a[7]; - a7 -= 2; - WriteMacInt16(a7, 0x64); - a7 -= 4; - WriteMacInt32(a7, scp->sc_pc); - a7 -= 2; - WriteMacInt16(a7, scp->sc_ps | EmulatedSR); - scp->sc_sp = regs->a[7] = a7; - - // Set interrupt level - EmulatedSR |= 0x2100; - - // Jump to MacOS interrupt handler on return - scp->sc_pc = ReadMacInt32(0x64); -} - - -/* - * SIGILL handler, for emulation of privileged instructions and executing - * A-Trap and EMUL_OP opcodes - */ - -static void sigill_handler(int sig, int code, struct sigcontext *scp) -{ - struct sigstate *state = (struct sigstate *)scp->sc_ap; - uint16 *pc = (uint16 *)scp->sc_pc; - uint16 opcode = *pc; - M68kRegisters *regs = (M68kRegisters *)&state->ss_frame; - -#define INC_PC(n) scp->sc_pc += (n) - -#define GET_SR (scp->sc_ps | EmulatedSR) - -#define STORE_SR(v) \ - scp->sc_ps = (v) & 0xff; \ - EmulatedSR = (v) & 0xe700; \ - if (((v) & 0x0700) == 0 && InterruptFlags) \ - TriggerInterrupt(); - -//printf("opcode %04x at %p, sr %04x, emul_sr %04x\n", opcode, pc, scp->sc_ps, EmulatedSR); - - if ((opcode & 0xf000) == 0xa000) { - - // A-Line instruction, set up A-Line trap frame on stack - uint32 a7 = regs->a[7]; - a7 -= 2; - WriteMacInt16(a7, 0x28); - a7 -= 4; - WriteMacInt32(a7, (uint32)pc); - a7 -= 2; - WriteMacInt16(a7, GET_SR); - scp->sc_sp = regs->a[7] = a7; - - // Jump to MacOS A-Line handler on return - scp->sc_pc = ReadMacInt32(0x28); - - } else if ((opcode & 0xff00) == 0x7100) { - - // Extended opcode, push registers on user stack - uint32 a7 = regs->a[7]; - a7 -= 4; - WriteMacInt32(a7, (uint32)pc); - a7 -= 2; - WriteMacInt16(a7, scp->sc_ps); - for (int i=7; i>=0; i--) { - a7 -= 4; - WriteMacInt32(a7, regs->a[i]); - } - for (int i=7; i>=0; i--) { - a7 -= 4; - WriteMacInt32(a7, regs->d[i]); - } - scp->sc_sp = regs->a[7] = a7; - - // Jump to EmulOp trampoline code on return - scp->sc_pc = (uint32)EmulOpTrampoline; - - } else switch (opcode) { // Emulate privileged instructions - - case 0x40e7: // move sr,-(sp) - regs->a[7] -= 2; - WriteMacInt16(regs->a[7], GET_SR); - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0x46df: { // move (sp)+,sr - uint16 sr = ReadMacInt16(regs->a[7]); - STORE_SR(sr); - regs->a[7] += 2; - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - } - - case 0x007c: { // ori #xxxx,sr - uint16 sr = GET_SR | pc[1]; - scp->sc_ps = sr & 0xff; // oring bits into the sr can't enable interrupts, so we don't need to call STORE_SR - EmulatedSR = sr & 0xe700; - INC_PC(4); - break; - } - - case 0x027c: { // andi #xxxx,sr - uint16 sr = GET_SR & pc[1]; - STORE_SR(sr); - INC_PC(4); - break; - } - - case 0x46fc: // move #xxxx,sr - STORE_SR(pc[1]); - INC_PC(4); - break; - - case 0x46ef: { // move (xxxx,sp),sr - uint16 sr = ReadMacInt16(regs->a[7] + (int32)(int16)pc[1]); - STORE_SR(sr); - INC_PC(4); - break; - } - - case 0x46d8: // move (a0)+,sr - case 0x46d9: { // move (a1)+,sr - uint16 sr = ReadMacInt16(regs->a[opcode & 7]); - STORE_SR(sr); - regs->a[opcode & 7] += 2; - INC_PC(2); - break; - } - - case 0x40f8: // move sr,xxxx.w - WriteMacInt16(pc[1], GET_SR); - INC_PC(4); - break; - - case 0x40d0: // move sr,(a0) - case 0x40d1: // move sr,(a1) - case 0x40d2: // move sr,(a2) - case 0x40d3: // move sr,(a3) - case 0x40d4: // move sr,(a4) - case 0x40d5: // move sr,(a5) - case 0x40d6: // move sr,(a6) - case 0x40d7: // move sr,(sp) - WriteMacInt16(regs->a[opcode & 7], GET_SR); - INC_PC(2); - break; - - case 0x40c0: // move sr,d0 - case 0x40c1: // move sr,d1 - case 0x40c2: // move sr,d2 - case 0x40c3: // move sr,d3 - case 0x40c4: // move sr,d4 - case 0x40c5: // move sr,d5 - case 0x40c6: // move sr,d6 - case 0x40c7: // move sr,d7 - regs->d[opcode & 7] = GET_SR; - INC_PC(2); - break; - - case 0x46c0: // move d0,sr - case 0x46c1: // move d1,sr - case 0x46c2: // move d2,sr - case 0x46c3: // move d3,sr - case 0x46c4: // move d4,sr - case 0x46c5: // move d5,sr - case 0x46c6: // move d6,sr - case 0x46c7: { // move d7,sr - uint16 sr = regs->d[opcode & 7]; - STORE_SR(sr); - INC_PC(2); - break; - } - - case 0xf327: // fsave -(sp) - regs->a[7] -= 4; - WriteMacInt32(regs->a[7], 0x41000000); // Idle frame - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0xf35f: // frestore (sp)+ - regs->a[7] += 4; - scp->sc_sp = regs->a[7]; - INC_PC(2); - break; - - case 0x4e73: { // rte - uint32 a7 = regs->a[7]; - uint16 sr = ReadMacInt16(a7); - a7 += 2; - scp->sc_ps = sr & 0xff; - EmulatedSR = sr & 0xe700; - scp->sc_pc = ReadMacInt32(a7); - a7 += 4; - uint16 format = ReadMacInt16(a7) >> 12; - a7 += 2; - static const int frame_adj[16] = { - 0, 0, 4, 4, 8, 0, 0, 52, 50, 12, 24, 84, 16, 0, 0, 0 - }; - scp->sc_sp = regs->a[7] = a7 + frame_adj[format]; - break; - } - - case 0x4e7a: // movec cr,x - switch (pc[1]) { - case 0x0002: // movec cacr,d0 - regs->d[0] = 0x3111; - break; - case 0x1002: // movec cacr,d1 - regs->d[1] = 0x3111; - break; - case 0x0003: // movec tc,d0 - case 0x0004: // movec itt0,d0 - case 0x0005: // movec itt1,d0 - case 0x0006: // movec dtt0,d0 - case 0x0007: // movec dtt1,d0 - case 0x0806: // movec urp,d0 - case 0x0807: // movec srp,d0 - regs->d[0] = 0; - break; - case 0x1000: // movec sfc,d1 - case 0x1001: // movec dfc,d1 - case 0x1003: // movec tc,d1 - case 0x1801: // movec vbr,d1 - regs->d[1] = 0; - break; - case 0x8801: // movec vbr,a0 - regs->a[0] = 0; - break; - case 0x9801: // movec vbr,a1 - regs->a[1] = 0; - break; - default: - goto ill; - } - INC_PC(4); - break; - - case 0x4e7b: // movec x,cr - switch (pc[1]) { - case 0x1000: // movec d1,sfc - case 0x1001: // movec d1,dfc - case 0x0801: // movec d0,vbr - case 0x1801: // movec d1,vbr - break; - case 0x0002: // movec d0,cacr - case 0x1002: // movec d1,cacr - FlushCodeCache(NULL, 0); - break; - default: - goto ill; - } - INC_PC(4); - break; - - case 0xf478: // cpusha dc - case 0xf4f8: // cpusha dc/ic - FlushCodeCache(NULL, 0); - INC_PC(2); - break; - - default: -ill: printf("SIGILL num %d, code %d\n", sig, code); - printf(" context %p:\n", scp); - printf(" onstack %08x\n", scp->sc_onstack); - printf(" sp %08x\n", scp->sc_sp); - printf(" fp %08x\n", scp->sc_fp); - printf(" pc %08x\n", scp->sc_pc); - printf(" opcode %04x\n", opcode); - printf(" sr %08x\n", scp->sc_ps); - printf(" state %p:\n", state); - printf(" flags %d\n", state->ss_flags); - for (int i=0; i<8; i++) - printf(" d%d %08x\n", i, state->ss_frame.f_regs[i]); - for (int i=0; i<8; i++) - printf(" a%d %08x\n", i, state->ss_frame.f_regs[i+8]); - - VideoQuitFullScreen(); -#ifdef ENABLE_MON - const char *arg[4] = {"mon", "-m", "-r", NULL}; - mon(3, arg); -#endif - QuitEmulator(); - break; - } -} -#endif - - /* * Display alert */ diff --git a/BasiliskII/src/Unix/prefs_editor_gtk.cpp b/BasiliskII/src/Unix/prefs_editor_gtk.cpp index 637e1e672..5f994ad8c 100644 --- a/BasiliskII/src/Unix/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Unix/prefs_editor_gtk.cpp @@ -1506,7 +1506,6 @@ static void create_memory_pane(GtkWidget *top) } table_make_option_menu(table, 2, STR_MODELID_CTRL, model_options, active); -#if EMULATED_68K static const opt_desc cpu_options[] = { {STR_CPU_68020_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020)}, {STR_CPU_68020_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020_fpu)}, @@ -1524,7 +1523,6 @@ static void create_memory_pane(GtkWidget *top) case 4: active = 4; } table_make_option_menu(table, 3, STR_CPU_CTRL, cpu_options, active); -#endif w_rom_file = table_make_file_entry(table, 4, STR_ROM_FILE_CTRL, "rom"); diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 6f91115ea..4e330ad53 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -62,41 +62,17 @@ #include #endif -#ifdef ENABLE_NATIVE_M68K - -/* Mac and host address space are the same */ -#define REAL_ADDRESSING 1 - -/* Using 68k natively */ -#define EMULATED_68K 0 - -/* Mac ROM is not write protected */ -#define ROM_IS_WRITE_PROTECTED 0 -#define USE_SCRATCHMEM_SUBTERFUGE 1 - -#else - -/* Mac and host address space are distinct */ -#ifndef REAL_ADDRESSING -#define REAL_ADDRESSING 0 -#endif - -/* Using 68k emulator */ -#define EMULATED_68K 1 - /* The m68k emulator uses a prefetch buffer ? */ #define USE_PREFETCH_BUFFER 0 /* Mac ROM is write protected when banked memory is used */ -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # define ROM_IS_WRITE_PROTECTED 0 # define USE_SCRATCHMEM_SUBTERFUGE 1 #else # define ROM_IS_WRITE_PROTECTED 1 #endif -#endif - /* Direct Addressing requires Video on SEGV signals in plain X11 mode */ #if DIRECT_ADDRESSING && (!ENABLE_VOSF && !USE_SDL_VIDEO) # undef ENABLE_VOSF @@ -113,11 +89,9 @@ #ifdef HAVE_PTHREADS #define USE_PTHREADS_SERVICES #endif -#if EMULATED_68K #if defined(__NetBSD__) #define USE_CPU_EMUL_SERVICES #endif -#endif #ifdef USE_CPU_EMUL_SERVICES #undef USE_PTHREADS_SERVICES #endif diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp index 00e5437d2..df6e55aad 100644 --- a/BasiliskII/src/Unix/video_x.cpp +++ b/BasiliskII/src/Unix/video_x.cpp @@ -406,7 +406,7 @@ static void add_window_modes(video_depth depth) // Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) static void set_mac_frame_buffer(X11_monitor_desc &monitor, video_depth depth, bool native_byte_order) { -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +#if !DIRECT_ADDRESSING int layout = FLAYOUT_DIRECT; if (depth == VDEPTH_16BIT) layout = (xdepth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; @@ -1184,7 +1184,7 @@ driver_fbdev::driver_fbdev(X11_monitor_desc &m) : driver_dga(m) } #if ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING // Screen_blitter_init() returns TRUE if VOSF is mandatory // i.e. the framebuffer update function is not Blit_Copy_Raw use_vosf = Screen_blitter_init(visualFormat, true, mode.depth); @@ -1321,7 +1321,7 @@ driver_xf86dga::driver_xf86dga(X11_monitor_desc &m) // Init blitting routines int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, mode.depth); #if ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING // Screen_blitter_init() returns TRUE if VOSF is mandatory // i.e. the framebuffer update function is not Blit_Copy_Raw use_vosf = Screen_blitter_init(visualFormat, x_native_byte_order, depth_of_video_mode(mode)); @@ -2527,7 +2527,7 @@ static void video_refresh_dga(void) } #ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING static void video_refresh_dga_vosf(void) { // Quit DGA mode if requested @@ -2600,7 +2600,7 @@ static void VideoRefreshInit(void) { // TODO: set up specialised 8bpp VideoRefresh handlers ? if (display_type == DISPLAY_DGA) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) +#if ENABLE_VOSF && DIRECT_ADDRESSING if (use_vosf) video_refresh = video_refresh_dga_vosf; else diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index e8d390950..bceef52b8 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -94,11 +94,6 @@ static SDL_mutex *intflag_lock = NULL; // Mutex to protect InterruptFlags uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes #endif -#if REAL_ADDRESSING -static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped -#endif - - // Prototypes static int xpram_func(void *arg); static int tick_func(void *arg); diff --git a/BasiliskII/src/Windows/prefs_editor_gtk.cpp b/BasiliskII/src/Windows/prefs_editor_gtk.cpp index 50e8d9f83..193c4240e 100644 --- a/BasiliskII/src/Windows/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Windows/prefs_editor_gtk.cpp @@ -1767,9 +1767,7 @@ static void create_memory_pane(GtkWidget *top) case 14: active = 1; break; } table_make_option_menu(table, 2, STR_MODELID_CTRL, model_options, active); -#endif -#if EMULATED_68K static const opt_desc cpu_options[] = { {STR_CPU_68020_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020)}, {STR_CPU_68020_FPU_LAB, GTK_SIGNAL_FUNC(mn_cpu_68020_fpu)}, diff --git a/BasiliskII/src/Windows/sysdeps.h b/BasiliskII/src/Windows/sysdeps.h index b729451c0..d1d8f59b8 100755 --- a/BasiliskII/src/Windows/sysdeps.h +++ b/BasiliskII/src/Windows/sysdeps.h @@ -43,23 +43,11 @@ #include #include - -/* Mac and host address space are distinct */ -#ifndef REAL_ADDRESSING -#define REAL_ADDRESSING 0 -#endif -#if REAL_ADDRESSING -#error "Real Addressing mode can't work without proper kernel support" -#endif - -/* Using 68k emulator */ -#define EMULATED_68K 1 - /* The m68k emulator uses a prefetch buffer ? */ #define USE_PREFETCH_BUFFER 0 /* Mac ROM is write protected when banked memory is used */ -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING # define ROM_IS_WRITE_PROTECTED 0 # define USE_SCRATCHMEM_SUBTERFUGE 1 #else diff --git a/BasiliskII/src/ether.cpp b/BasiliskII/src/ether.cpp index 8df8c86bd..132217890 100644 --- a/BasiliskII/src/ether.cpp +++ b/BasiliskII/src/ether.cpp @@ -444,7 +444,6 @@ void ether_udp_read(uint32 packet, int length, struct sockaddr_in *from) * Ethernet packet allocator */ -#if SIZEOF_VOID_P != 4 || REAL_ADDRESSING == 0 static uint32 ether_packet = 0; // Ethernet packet (cached allocation) static uint32 n_ether_packets = 0; // Number of ethernet packets allocated so far (should be at most 1) @@ -476,4 +475,3 @@ EthernetPacket::~EthernetPacket() bug("WARNING: Nested allocation of ethernet packets!\n"); } } -#endif diff --git a/BasiliskII/src/include/ether.h b/BasiliskII/src/include/ether.h index e1e988d08..a497cb975 100644 --- a/BasiliskII/src/include/ether.h +++ b/BasiliskII/src/include/ether.h @@ -61,19 +61,13 @@ enum { extern uint32 ether_data; // Mac address of driver data in MacOS RAM -// Ethernet packet allocator (optimized for 32-bit platforms in real addressing mode) +// Ethernet packet allocator class EthernetPacket { -#if SIZEOF_VOID_P == 4 && REAL_ADDRESSING - uint8 packet[1516]; - public: - uint32 addr(void) const { return (uint32)packet; } -#else uint32 packet; public: EthernetPacket(); ~EthernetPacket(); uint32 addr(void) const { return packet; } -#endif }; // Copy packet data from WDS to linear buffer (must hold at least 1514 bytes), diff --git a/BasiliskII/src/main.cpp b/BasiliskII/src/main.cpp index e010a19ce..148fb581c 100644 --- a/BasiliskII/src/main.cpp +++ b/BasiliskII/src/main.cpp @@ -69,7 +69,6 @@ bool InitAll(const char *vmdir) return false; } -#if EMULATED_68K // Set CPU and FPU type (UAE emulation) switch (ROMVersion) { case ROM_VERSION_64K: @@ -97,7 +96,6 @@ bool InitAll(const char *vmdir) break; } CPUIs68060 = false; -#endif // Load XPRAM XPRAMInit(vmdir); @@ -180,11 +178,9 @@ bool InitAll(const char *vmdir) XPRAM[0x58] = uint8(main_monitor.depth_to_apple_mode(main_monitor.get_current_mode().depth)); XPRAM[0x59] = 0; -#if EMULATED_68K // Init 680x0 emulation (this also activates the memory system which is needed for PatchROM()) if (!Init680x0()) return false; -#endif // Install ROM patches if (!PatchROM()) { diff --git a/BasiliskII/src/native_cpu/cpu_emulation.h b/BasiliskII/src/native_cpu/cpu_emulation.h deleted file mode 100644 index 822ee0478..000000000 --- a/BasiliskII/src/native_cpu/cpu_emulation.h +++ /dev/null @@ -1,67 +0,0 @@ -/* - * cpu_emulation.h - Definitions for Basilisk II CPU emulation module (native 68k version) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 CPU_EMULATION_H -#define CPU_EMULATION_H - - -/* - * Memory system - */ - -// RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) -extern uint32 RAMSize; // Size of RAM - -extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) -extern uint32 ROMSize; // Size of ROM - -// Mac memory access functions -static inline uint32 ReadMacInt32(uint32 addr) {return *(uint32 *)addr;} -static inline uint32 ReadMacInt16(uint32 addr) {return *(uint16 *)addr;} -static inline uint32 ReadMacInt8(uint32 addr) {return *(uint8 *)addr;} -static inline void WriteMacInt32(uint32 addr, uint32 l) {*(uint32 *)addr = l;} -static inline void WriteMacInt16(uint32 addr, uint32 w) {*(uint16 *)addr = w;} -static inline void WriteMacInt8(uint32 addr, uint32 b) {*(uint8 *)addr = b;} -static inline uint8 *Mac2HostAddr(uint32 addr) {return (uint8 *)addr;} -static inline uint32 Host2MacAddr(uint8 *addr) {return (uint32)addr;} -static inline void *Mac_memset(uint32 addr, int c, size_t n) {return memset(Mac2HostAddr(addr), c, n);} -static inline void *Mac2Host_memcpy(void *dest, uint32 src, size_t n) {return memcpy(dest, Mac2HostAddr(src), n);} -static inline void *Host2Mac_memcpy(uint32 dest, const void *src, size_t n) {return memcpy(Mac2HostAddr(dest), src, n);} -static inline void *Mac2Mac_memcpy(uint32 dest, uint32 src, size_t n) {return memcpy(Mac2HostAddr(dest), Mac2HostAddr(src), n);} - - -/* - * 680x0 emulation - */ - -// 680x0 emulation functions -struct M68kRegisters; -extern void Start680x0(void); // Reset and start 680x0 -extern "C" void Execute68k(uint32 addr, M68kRegisters *r); // Execute 68k code from EMUL_OP routine -extern "C" void Execute68kTrap(uint16 trap, M68kRegisters *r); // Execute MacOS 68k trap from EMUL_OP routine - -// Interrupt functions -extern void TriggerInterrupt(void); // Trigger interrupt (InterruptFlag must be set first) -extern void TriggerNMI(void); // Trigger interrupt level 7 - -#endif diff --git a/BasiliskII/src/rom_patches.cpp b/BasiliskII/src/rom_patches.cpp index 5cfb13e20..1fb85e59b 100644 --- a/BasiliskII/src/rom_patches.cpp +++ b/BasiliskII/src/rom_patches.cpp @@ -832,7 +832,7 @@ bool CheckROM(void) // Read version ROMVersion = ntohs(*(uint16 *)(ROMBaseHost + 8)); -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING // Real and direct addressing modes require a 32-bit clean ROM return ROMVersion == ROM_VERSION_32; #else @@ -1257,15 +1257,6 @@ static bool patch_rom_32(void) *wp++ = htons(0x0cea); *wp = htons(M68K_RTS); -#if REAL_ADDRESSING - // Move system zone to start of Mac RAM - wp = (uint16 *)(ROMBaseHost + 0x50a); - *wp++ = htons(HiWord(RAMBaseMac + 0x2000)); - *wp++ = htons(LoWord(RAMBaseMac + 0x2000)); - *wp++ = htons(HiWord(RAMBaseMac + 0x3800)); - *wp = htons(LoWord(RAMBaseMac + 0x3800)); -#endif - #if !ROM_IS_WRITE_PROTECTED #if defined(USE_SCRATCHMEM_SUBTERFUGE) // Set fake handle at 0x0000 to scratch memory area (so broken Mac programs won't write into Mac ROM) @@ -1280,13 +1271,6 @@ static bool patch_rom_32(void) #endif #endif -#if REAL_ADDRESSING - // gb-- Temporary hack to get rid of crashes in Speedometer - wp = (uint16 *)(ROMBaseHost + 0xdba2); - if (ntohs(*wp) == 0x662c) // bne.b #$2c - *wp = htons(0x602c); // bra.b #$2c -#endif - // Don't write to VIA in InitTimeMgr wp = (uint16 *)(ROMBaseHost + 0xb0e2); *wp++ = htons(0x4cdf); // movem.l (sp)+,d0-d5/a0-a4 diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index b29c77026..d6c6d3b17 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -41,12 +41,10 @@ uint32 ROMBaseMac; // ROM base (Mac address space) uint8 *ROMBaseHost; // ROM base (host address space) uint32 ROMSize; // Size of ROM -#if !REAL_ADDRESSING // Mac frame buffer uint8 *MacFrameBaseHost; // Frame buffer base (host address space) uint32 MacFrameSize; // Size of frame buffer int MacFrameLayout; // Frame buffer layout -#endif #if DIRECT_ADDRESSING uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent @@ -64,13 +62,8 @@ extern bool quit_program; * Initialize 680x0 emulation, CheckROM() must have been called first */ -bool Init680x0(void) -{ -#if REAL_ADDRESSING - // Mac address space = host address space - RAMBaseMac = (uintptr)RAMBaseHost; - ROMBaseMac = (uintptr)ROMBaseHost; -#elif DIRECT_ADDRESSING +bool Init680x0(void){ +#if DIRECT_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() RAMBaseMac = 0; @@ -119,14 +112,12 @@ void Exit680x0(void) exit_m68k(); } - /* * Initialize memory mapping of frame buffer (called upon video mode change) */ -void InitFrameBufferMapping(void) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +void InitFrameBufferMapping(void){ +#if !DIRECT_ADDRESSING memory_init(); #endif } diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 608f4e55b..1186d8dda 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -27,8 +27,8 @@ #if USE_JIT -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING -#error "Only Real or Direct Addressing is supported with the JIT Compiler" +#if !DIRECT_ADDRESSING +#error "Only Direct Addressing is supported with the JIT Compiler" #endif #if X86_ASSEMBLY && !SAHF_SETO_PROFITABLE @@ -5565,9 +5565,7 @@ void get_n_addr(int address, int dest, int tmp) f=dest; } -#if REAL_ADDRESSING - mov_l_rr(dest, address); -#elif DIRECT_ADDRESSING +#if DIRECT_ADDRESSING lea_l_brr(dest,address,MEMBaseDiff); #endif forget_about(tmp); @@ -7080,7 +7078,7 @@ void execute_normal(void) if (!check_for_cache_miss()) { cpu_history pc_hist[MAXRUN]; int blocklen = 0; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING start_pc_p = regs.pc_p; start_pc = get_virtual_address(regs.pc_p); #else diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index cd588ec10..6acf0ab9f 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -37,8 +37,8 @@ extern uint32 ROMBaseMac; // ROM base (Mac address space) extern uint8 *ROMBaseHost; // ROM base (host address space) extern uint32 ROMSize; // Size of ROM -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING -// If we are not using real or direct addressing, the Mac frame buffer gets +#if !DIRECT_ADDRESSING +// If we are not using direct addressing, the Mac frame buffer gets // mapped to this location. The memory must be allocated by VideoInit(). // If multiple monitors are used, they must share the frame buffer const uint32 MacFrameBaseMac = 0xa0000000; diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp index 7483f5064..aa0b22b4b 100644 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -34,7 +34,7 @@ #include "readcpu.h" #include "newcpu.h" -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING +#if !DIRECT_ADDRESSING static bool illegal_mem = false; @@ -638,5 +638,5 @@ void map_banks(addrbank *bank, int start, int size) put_mem_bank((bnr + hioffs) << 16, bank); } -#endif /* !REAL_ADDRESSING && !DIRECT_ADDRESSING */ +#endif /* !DIRECT_ADDRESSING */ diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index 75a6303ba..d78981660 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -23,7 +23,7 @@ #ifndef UAE_MEMORY_H #define UAE_MEMORY_H -#if !DIRECT_ADDRESSING && !REAL_ADDRESSING +#if !DIRECT_ADDRESSING /* Enabling this adds one additional native memory reference per 68k memory * access, but saves one shift (on the x86). Enabling this is probably @@ -115,15 +115,11 @@ extern void byteput(uaecptr addr, uae_u32 b); #endif -#endif /* !DIRECT_ADDRESSING && !REAL_ADDRESSING */ +#endif /* !DIRECT_ADDRESSING */ -#if REAL_ADDRESSING -const uintptr MEMBaseDiff = 0; -#elif DIRECT_ADDRESSING +#if DIRECT_ADDRESSING extern uintptr MEMBaseDiff; -#endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { return (uae_u8 *)MEMBaseDiff + addr; @@ -201,7 +197,7 @@ static __inline__ uae_u8 *get_real_address(uaecptr addr) } /* gb-- deliberately not implemented since it shall not be used... */ extern uae_u32 get_virtual_address(uae_u8 *addr); -#endif /* DIRECT_ADDRESSING || REAL_ADDRESSING */ +#endif /* DIRECT_ADDRESSING */ #endif /* MEMORY_H */ diff --git a/BasiliskII/src/uae_cpu/newcpu.cpp b/BasiliskII/src/uae_cpu/newcpu.cpp index d13a60785..1bdfa1551 100644 --- a/BasiliskII/src/uae_cpu/newcpu.cpp +++ b/BasiliskII/src/uae_cpu/newcpu.cpp @@ -303,7 +303,7 @@ static int backup_pointer = 0; static long int m68kpc_offset; int lastint_no; -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING #define get_ibyte_1(o) get_byte(get_virtual_address(regs.pc_p) + (o) + 1) #define get_iword_1(o) get_word(get_virtual_address(regs.pc_p) + (o)) #define get_ilong_1(o) get_long(get_virtual_address(regs.pc_p) + (o)) diff --git a/BasiliskII/src/uae_cpu/newcpu.h b/BasiliskII/src/uae_cpu/newcpu.h index e2d5b5ed3..ccb36dc5d 100644 --- a/BasiliskII/src/uae_cpu/newcpu.h +++ b/BasiliskII/src/uae_cpu/newcpu.h @@ -182,7 +182,7 @@ static __inline__ void fill_prefetch_2 (void) static __inline__ uaecptr m68k_getpc (void) { -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING return get_virtual_address(regs.pc_p); #else return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp); @@ -195,7 +195,7 @@ static __inline__ void m68k_setpc (uaecptr newpc) uae_u32 previous_pc = m68k_getpc(); #endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING +#if DIRECT_ADDRESSING regs.pc_p = get_real_address(newpc); #else regs.pc_p = regs.pc_oldp = get_real_address(newpc); From 256f93b221f46ffa93d6da08e52f6b2298180075 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 12 Dec 2020 13:32:05 -0800 Subject: [PATCH 520/534] Remove legacy X11/DGA/FBDEV/ESD etc support --- BasiliskII/src/Unix/Irix/README.networking | 110 - BasiliskII/src/Unix/Irix/audio_irix.cpp | 680 ----- BasiliskII/src/Unix/Irix/unaligned.c | 44 - BasiliskII/src/Unix/Solaris/audio_solaris.cpp | 320 -- BasiliskII/src/Unix/audio_oss_esd.cpp | 558 ---- BasiliskII/src/Unix/configure.ac | 71 +- BasiliskII/src/Unix/main_unix.cpp | 47 - BasiliskII/src/Unix/prefs_editor_gtk.cpp | 63 +- BasiliskII/src/Unix/video_x.cpp | 2690 ----------------- 9 files changed, 4 insertions(+), 4579 deletions(-) delete mode 100644 BasiliskII/src/Unix/Irix/README.networking delete mode 100644 BasiliskII/src/Unix/Irix/audio_irix.cpp delete mode 100644 BasiliskII/src/Unix/Irix/unaligned.c delete mode 100644 BasiliskII/src/Unix/Solaris/audio_solaris.cpp delete mode 100644 BasiliskII/src/Unix/audio_oss_esd.cpp delete mode 100644 BasiliskII/src/Unix/video_x.cpp diff --git a/BasiliskII/src/Unix/Irix/README.networking b/BasiliskII/src/Unix/Irix/README.networking deleted file mode 100644 index f6145a71b..000000000 --- a/BasiliskII/src/Unix/Irix/README.networking +++ /dev/null @@ -1,110 +0,0 @@ -README file for networking under IRIX -by Brian J. Johnson 7/23/2002 -version 1.0 -================================================== - -BasiliskII does not currently support networking natively on IRIX. -That is, the emulated Ethernet card does not do anything. There's no -reason one couldn't use raw domain sockets and the snoop(7p) facility -to do networking, but so far no one has written the required glue -code. - -However, it is possible to do TCP/IP networking with BasiliskII on -IRIX via PPP, by connecting an emulated serial port to the IRIX PPP -daemon. Here are the steps to set it up: - - -Set up PPP on IRIX ------------------- - -You need root privileges to do this. - -First, make sure you have eoe.sw.ppp and eoe.sw.uucp installed: - - IRIS# versions eoe.sw.ppp eoe.sw.uucp - I = Installed, R = Removed - - Name Date Description - - I eoe 07/22/2002 IRIX Execution Environment, 6.5.17m - I eoe.sw 07/22/2002 IRIX Execution Environment Software - I eoe.sw.ppp 07/22/2002 Point-to-Point Protocol Software - I eoe.sw.uucp 07/22/2002 UUCP Utilities - -If they aren't installed, install them from your distribution CDs. - -Next, pick IP addresses for the IRIX and MacOS sides of the PPP -connection. You may want to ask your local network administrator -about this, but any two unused addresses on your local subnet should -work. - -Edit /etc/ppp.conf and add these three lines: - -_NET_INCOMING - remotehost= - localhost= - -(Replace the angle brackets and the text in them with the appropriate -IP addresses.) - -Next, make a script to set up the environment properly when invoking -pppd from BasiliskII. You can name this whatever you want; I chose -/usr/etc/ppp-b2: - -IRIS# whoami -root -IRIS# cat < /usr/etc/ppp-b2 -#!/bin/sh -export USER=_NET_INCOMING -exec /usr/etc/ppp "$@" -IRIS# chmod 4775 /usr/etc/ppp-b2 - -Rewrite this in perl or python or C or whatever if you don't like -setuid shell scripts. The alternative is to run BasiliskII as root: -pppd _must_ be run as root. - - -Configure BasiliskII to start the PPP daemon --------------------------------------------- - -Start up BasiliskII, and in the serial devices tab, enter: - - |exec /usr/etc/ppp-b2 - -Supply the name you used for the script you created. Be sure to -include the leading pipe symbol ("|"). - -The "exec" causes your PPP startup script to replace the shell -BasiliskII runs to interpret the command. It's not strictly -necessary, but cuts down on the number of extra processes hanging -about. - - -Install a PPP client on MacOS ------------------------------ - -The details of this step will vary depending on your PPP client -software. Set it up for a "direct" connection, with no modem chatting -or login scripting. For instance, with FreePPP I set the "Connect:" -item on the "Edit..." screen under the "Accounts" tab to "Directly". -Be sure to select the correct serial port. The serial port speed -shouldn't matter (BasiliskII ignores it), but I set it to 115200 bps. - -Next, configure MacOS's TCP/IP stack. If you're using Open Transport, -Open the TCP/IP control panel and select "Using PPP Server" under the -"Configure" item. Copy IRIX's DNS client info. from /etc/resolv.conf -to the control panel: the addresses from the "nameserver" lines go in -the "Name server addr.:" box, and the domains from the "search" lines -go in the "Search domains:" box. The steps should be similar for -MacTCP. - -Now fire up PPP. Your PPP client should establish communication with -the IRIX PPP daemon, and you're off and running. - - -Disclaimer ----------- - -I haven't tried this procedure from scratch on a freshly installed -system, so I might have missed a step somewhere. But it should get -you close.... diff --git a/BasiliskII/src/Unix/Irix/audio_irix.cpp b/BasiliskII/src/Unix/Irix/audio_irix.cpp deleted file mode 100644 index 8b61a2819..000000000 --- a/BasiliskII/src/Unix/Irix/audio_irix.cpp +++ /dev/null @@ -1,680 +0,0 @@ -/* - * audio_irix.cpp - Audio support, SGI Irix implementation - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// The currently selected audio parameters (indices in audio_sample_rates[] -// etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Global variables -static int audio_fd = -1; // fd from audio library -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static bool sem_inited = false; // Flag: audio_irq_done_sem initialized -static int sound_buffer_size; // Size of sound buffer in bytes -static int sound_buffer_fill_point; // Fill buffer when this many frames are empty -static uint8 silence_byte = 0; // Byte value to use to fill sound buffers with silence -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; // Flag: streaming thread installed -static volatile bool stream_thread_cancel = false; // Flag: cancel streaming thread - -static bool current_main_mute = false; // Flag: output muted -static bool current_speaker_mute = false; // Flag: speaker muted -static uint32 current_main_volume = 0; // Output volume -static uint32 current_speaker_volume = 0; // Speaker volume - -// IRIX libaudio control structures -static ALconfig config; -static ALport port; - - -// Prototypes -static void *stream_func(void *arg); -static uint32 read_volume(void); -static bool read_mute(void); -static void set_mute(bool mute); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; -} - -bool open_audio(void) -{ - ALpv pv[2]; - - printf("Using libaudio audio output\n"); - - // Get supported sample formats - - if (audio_sample_sizes.empty()) { - // All sample sizes are supported - audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - - // Assume at least two channels are supported. Some IRIX boxes - // can do 4 or more... MacOS only handles up to 2. - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - if (audio_sample_sizes.empty() || audio_channel_counts.empty()) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - alClosePort(port); - audio_fd = -1; - return false; - } - - audio_sample_rates.push_back( 8000 << 16); - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Set the sample format - - D(bug("Size %d, channels %d, rate %d\n", - audio_sample_sizes[audio_sample_size_index], - audio_channel_counts[audio_channel_count_index], - audio_sample_rates[audio_sample_rate_index] >> 16)); - config = alNewConfig(); - alSetSampFmt(config, AL_SAMPFMT_TWOSCOMP); - if (audio_sample_sizes[audio_sample_size_index] == 8) { - alSetWidth(config, AL_SAMPLE_8); - } - else { - alSetWidth(config, AL_SAMPLE_16); - } - alSetChannels(config, audio_channel_counts[audio_channel_count_index]); - alSetDevice(config, AL_DEFAULT_OUTPUT); // Allow selecting via prefs? - - // Try to open the audio library - - port = alOpenPort("BasiliskII", "w", config); - if (port == NULL) { - fprintf(stderr, "ERROR: Cannot open audio port: %s\n", - alGetErrorString(oserror())); - WarningAlert(GetString(STR_NO_AUDIO_WARN)); - return false; - } - - // Set the sample rate - - pv[0].param = AL_RATE; - pv[0].value.ll = alDoubleToFixed(audio_sample_rates[audio_sample_rate_index] >> 16); - pv[1].param = AL_MASTER_CLOCK; - pv[1].value.i = AL_CRYSTAL_MCLK_TYPE; - if (alSetParams(AL_DEFAULT_OUTPUT, pv, 2) < 0) { - fprintf(stderr, "ERROR: libaudio setparams failed: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - - // Compute sound buffer size and libaudio refill point - - config = alGetConfig(port); - audio_frames_per_block = alGetQueueSize(config); - if (audio_frames_per_block < 0) { - fprintf(stderr, "ERROR: couldn't get queue size: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - D(bug("alGetQueueSize %d, width %d, channels %d\n", - audio_frames_per_block, - alGetWidth(config), - alGetChannels(config))); - - // Put a limit on the Mac sound buffer size, to decrease delay -#define AUDIO_BUFFER_MSEC 50 // milliseconds of sound to buffer - int target_frames_per_block = - (audio_sample_rates[audio_sample_rate_index] >> 16) * - AUDIO_BUFFER_MSEC / 1000; - if (audio_frames_per_block > target_frames_per_block) - audio_frames_per_block = target_frames_per_block; - D(bug("frames per block %d\n", audio_frames_per_block)); - - alZeroFrames(port, audio_frames_per_block); // so we don't underflow - - // Try to keep the buffer pretty full - sound_buffer_fill_point = alGetQueueSize(config) - - 2 * audio_frames_per_block; - if (sound_buffer_fill_point < 0) - sound_buffer_fill_point = alGetQueueSize(config) / 3; - D(bug("fill point %d\n", sound_buffer_fill_point)); - - sound_buffer_size = (audio_sample_sizes[audio_sample_size_index] >> 3) * - audio_channel_counts[audio_channel_count_index] * - audio_frames_per_block; - set_audio_status_format(); - - // Get a file descriptor we can select() on - - audio_fd = alGetFD(port); - if (audio_fd < 0) { - fprintf(stderr, "ERROR: couldn't get libaudio file descriptor: %s\n", - alGetErrorString(oserror())); - alClosePort(port); - return false; - } - - // Initialize volume, mute settings - current_main_volume = current_speaker_volume = read_volume(); - current_main_mute = current_speaker_mute = read_mute(); - - - // Start streaming thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything went fine - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Init audio status (reasonable defaults) and feature flags - AudioStatus.sample_rate = 44100 << 16; - AudioStatus.sample_size = 16; - AudioStatus.channels = 2; - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - sem_inited = true; - - // Open and initialize audio device - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - // Stop stream and delete semaphore - if (stream_thread_active) { - stream_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(stream_thread); -#endif - pthread_join(stream_thread, NULL); - stream_thread_active = false; - stream_thread_cancel = false; - } - - // Close audio library - alClosePort(port); - - audio_open = false; -} - -void AudioExit(void) -{ - // Close audio device - close_audio(); - - // Delete semaphore - if (sem_inited) { - sem_destroy(&audio_irq_done_sem); - sem_inited = false; - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Streaming function - */ - -static void *stream_func(void *arg) -{ - int32 *last_buffer = new int32[sound_buffer_size / 4]; - fd_set audio_fdset; - int numfds, was_error; - - numfds = audio_fd + 1; - FD_ZERO(&audio_fdset); - - while (!stream_thread_cancel) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (!current_main_mute && - !current_speaker_mute && - apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to audio library. Convert 8-bit data - // unsigned->signed - // It works fine for 8-bit mono, but not stereo. - if (AudioStatus.sample_size == 8) { - uint32 *p = (uint32 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - uint32 *q = (uint32 *)last_buffer; - int r = work_size >> 2; - // XXX not quite right.... - while (r--) - *q++ = *p++ ^ 0x80808080; - if (work_size != sound_buffer_size) - memset((uint8 *)last_buffer + work_size, silence_byte, sound_buffer_size - work_size); - alWriteFrames(port, last_buffer, audio_frames_per_block); - } - else if (work_size == sound_buffer_size) - alWriteFrames(port, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), audio_frames_per_block); - else { - // Last buffer - Mac2Host_memcpy(last_buffer, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - memset((uint8 *)last_buffer + work_size, silence_byte, sound_buffer_size - work_size); - alWriteFrames(port, last_buffer, audio_frames_per_block); - } - D(bug("stream: data written\n")); - } else - goto silence; - - } else { - - // Audio not active, play silence - silence: // D(bug("stream: silence\n")); - alZeroFrames(port, audio_frames_per_block); - } - - // Wait for fill point to be reached (may be immediate) - - if (alSetFillPoint(port, sound_buffer_fill_point) < 0) { - fprintf(stderr, "ERROR: alSetFillPoint failed: %s\n", - alGetErrorString(oserror())); - // Should stop the audio here.... - } - - do { - errno = 0; - FD_SET(audio_fd, &audio_fdset); - was_error = select(numfds, NULL, &audio_fdset, NULL, NULL); - } while(was_error < 0 && (errno == EINTR)); - if (was_error < 0) { - fprintf(stderr, "ERROR: select returned %d, errno %d\n", - was_error, errno); - // Should stop audio here.... - } - } - delete[] last_buffer; - return NULL; -} - - -/* - * Read or set the current output volume using the audio library - */ - -static uint32 read_volume(void) -{ - ALpv x[2]; - ALfixed gain[8]; - double maxgain, mingain; - ALparamInfo pi; - uint32 ret = 0x01000100; // default, maximum value - int dev = alGetDevice(config); - - // Fetch the maximum and minimum gain settings - - alGetParamInfo(dev, AL_GAIN, &pi); - maxgain = alFixedToDouble(pi.max.ll); - mingain = alFixedToDouble(pi.min.ll); -// printf("maxgain = %lf dB, mingain = %lf dB\n", maxgain, mingain); - - // Get the current gain values - - x[0].param = AL_GAIN; - x[0].value.ptr = gain; - x[0].sizeIn = sizeof(gain) / sizeof(gain[0]); - x[1].param = AL_CHANNELS; - if (alGetParams(dev, x, 2) < 0) { - printf("alGetParams failed: %s\n", alGetErrorString(oserror())); - } - else { - if (x[0].sizeOut < 0) { - printf("AL_GAIN was an unrecognized parameter\n"); - } - else { - double v; - uint32 left, right; - - // Left - v = alFixedToDouble(gain[0]); - if (v < mingain) - v = mingain; // handle gain == -inf - v = (v - mingain) / (maxgain - mingain); // scale to 0..1 - left = (uint32)(v * (double)256); // convert to 8.8 fixed point - - // Right - if (x[0].sizeOut <= 1) { // handle a mono interface - right = left; - } - else { - v = alFixedToDouble(gain[1]); - if (v < mingain) - v = mingain; // handle gain == -inf - v = (v - mingain) / (maxgain - mingain); // scale to 0..1 - right = (uint32)(v * (double)256); // convert to 8.8 fixed point - } - - ret = (left << 16) | right; - } - } - - return ret; -} - -static void set_volume(uint32 vol) -{ - ALpv x[1]; - ALfixed gain[2]; // left and right - double maxgain, mingain; - ALparamInfo pi; - int dev = alGetDevice(config); - - // Fetch the maximum and minimum gain settings - - alGetParamInfo(dev, AL_GAIN, &pi); - maxgain = alFixedToDouble(pi.max.ll); - mingain = alFixedToDouble(pi.min.ll); - - // Set the new gain values - - x[0].param = AL_GAIN; - x[0].value.ptr = gain; - x[0].sizeIn = sizeof(gain) / sizeof(gain[0]); - - uint32 left = vol >> 16; - uint32 right = vol & 0xffff; - double lv, rv; - - if (left == 0 && pi.specialVals & AL_NEG_INFINITY_BIT) { - lv = AL_NEG_INFINITY; - } - else { - lv = ((double)left / 256) * (maxgain - mingain) + mingain; - } - - if (right == 0 && pi.specialVals & AL_NEG_INFINITY_BIT) { - rv = AL_NEG_INFINITY; - } - else { - rv = ((double)right / 256) * (maxgain - mingain) + mingain; - } - - D(bug("set_volume: left=%lf dB, right=%lf dB\n", lv, rv)); - - gain[0] = alDoubleToFixed(lv); - gain[1] = alDoubleToFixed(rv); - - if (alSetParams(dev, x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - } -} - - -/* - * Read or set the mute setting using the audio library - */ - -static bool read_mute(void) -{ - bool ret; - int dev = alGetDevice(config); - ALpv x; - x.param = AL_MUTE; - - if (alGetParams(dev, &x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - return current_main_mute; // Or just return false? - } - - ret = x.value.i; - - D(bug("read_mute: mute=%d\n", ret)); - return ret; -} - -static void set_mute(bool mute) -{ - D(bug("set_mute: mute=%ld\n", mute)); - - int dev = alGetDevice(config); - ALpv x; - x.param = AL_MUTE; - x.value.i = mute; - - if (alSetParams(dev, &x, 1) < 0) { - printf("alSetParams failed: %s\n", alGetErrorString(oserror())); - } -} - - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - sem_post(&audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. vectors - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - close_audio(); - audio_sample_rate_index = index; - return open_audio(); -} - -bool audio_set_sample_size(int index) -{ - close_audio(); - audio_sample_size_index = index; - return open_audio(); -} - -bool audio_set_channels(int index) -{ - close_audio(); - audio_channel_count_index = index; - return open_audio(); -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - D(bug("audio_get_main_mute: mute=%ld\n", current_main_mute)); - - return current_main_mute; -} - -uint32 audio_get_main_volume(void) -{ - uint32 ret = current_main_volume; - - D(bug("audio_get_main_volume: vol=0x%x\n", ret)); - - return ret; -} - -bool audio_get_speaker_mute(void) -{ - D(bug("audio_get_speaker_mute: mute=%ld\n", current_speaker_mute)); - - return current_speaker_mute; -} - -uint32 audio_get_speaker_volume(void) -{ - uint32 ret = current_speaker_volume; - - D(bug("audio_get_speaker_volume: vol=0x%x\n", ret)); - - return ret; -} - -void audio_set_main_mute(bool mute) -{ - D(bug("audio_set_main_mute: mute=%ld\n", mute)); - - if (mute != current_main_mute) { - current_main_mute = mute; - } - - set_mute(current_main_mute); -} - -void audio_set_main_volume(uint32 vol) -{ - - D(bug("audio_set_main_volume: vol=%x\n", vol)); - - current_main_volume = vol; - - set_volume(vol); -} - -void audio_set_speaker_mute(bool mute) -{ - D(bug("audio_set_speaker_mute: mute=%ld\n", mute)); - - if (mute != current_speaker_mute) { - current_speaker_mute = mute; - } - - set_mute(current_speaker_mute); -} - -void audio_set_speaker_volume(uint32 vol) -{ - D(bug("audio_set_speaker_volume: vol=%x\n", vol)); - - current_speaker_volume = vol; - - set_volume(vol); -} diff --git a/BasiliskII/src/Unix/Irix/unaligned.c b/BasiliskII/src/Unix/Irix/unaligned.c deleted file mode 100644 index 9f4befb8f..000000000 --- a/BasiliskII/src/Unix/Irix/unaligned.c +++ /dev/null @@ -1,44 +0,0 @@ -/* - * Irix/unaligned.c - Optimized unaligned access for Irix - * - * Basilisk II (C) 1997-2005 Christian Bauer - * - * 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 - */ - -#ifdef sgi -#include "sysdeps.h" - -/* Tell the compiler to pack data on 1-byte boundaries - * (i.e. arbitrary alignment). Requires SGI MIPSPro compilers. */ -#pragma pack(1) - -typedef struct _ual32 { - uae_u32 v; -} ual32_t; - -typedef struct _ual16 { - uae_u16 v; -} ual16_t; - -#pragma pack(0) - -/* The compiler is smart enough to inline these when you build with "-ipa" */ -uae_u32 do_get_mem_long(uae_u32 *a) {return ((ual32_t *)a)->v;} -uae_u32 do_get_mem_word(uae_u16 *a) {return ((ual16_t *)a)->v;} -void do_put_mem_long(uae_u32 *a, uae_u32 v) {((ual32_t *)a)->v = v;} -void do_put_mem_word(uae_u16 *a, uae_u32 v) {((ual16_t *)a)->v = v;} - -#endif /* sgi */ diff --git a/BasiliskII/src/Unix/Solaris/audio_solaris.cpp b/BasiliskII/src/Unix/Solaris/audio_solaris.cpp deleted file mode 100644 index d4b7e0dfa..000000000 --- a/BasiliskII/src/Unix/Solaris/audio_solaris.cpp +++ /dev/null @@ -1,320 +0,0 @@ -/* - * audio_solaris.cpp - Audio support, Solaris implementation - * - * Adapted from Frodo's Solaris sound routines by Marc Chabanas - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include -#include - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#define DEBUG 0 -#include "debug.h" - - -// Global variables -static int fd = -1; // fd of /dev/audio -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; -static int sound_buffer_size; // Size of sound buffer in bytes - -// Prototypes -static void *stream_func(void *arg); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[0]; - AudioStatus.sample_size = audio_sample_sizes[0]; - AudioStatus.channels = audio_channel_counts[0]; -} - -void AudioInit(void) -{ - char str[256]; - - // Init audio status and feature flags - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(2); - set_audio_status_format(); - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - - // Open /dev/audio - fd = open("/dev/audio", O_WRONLY | O_NDELAY); - if (fd < 0) { - sprintf(str, GetString(STR_NO_AUDIO_DEV_WARN), "/dev/audio", strerror(errno)); - WarningAlert(str); - sem_destroy(&audio_irq_done_sem); - return; - } - - // Set audio parameters - struct audio_info info; - AUDIO_INITINFO(&info); - info.play.sample_rate = AudioStatus.sample_rate >> 16; - info.play.channels = AudioStatus.channels; - info.play.precision = AudioStatus.sample_size; - info.play.encoding = AUDIO_ENCODING_LINEAR; - info.play.port = AUDIO_SPEAKER; - if (ioctl(fd, AUDIO_SETINFO, &info)) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - close(fd); - fd = -1; - sem_destroy(&audio_irq_done_sem); - return; - } - - // 2048 frames per buffer - audio_frames_per_block = 2048; - sound_buffer_size = (AudioStatus.sample_size>>3) * AudioStatus.channels * audio_frames_per_block; - - // Start audio thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything OK - audio_open = true; -} - - -/* - * Deinitialization - */ - -void AudioExit(void) -{ - // Stop audio thread - if (stream_thread_active) { - pthread_cancel(stream_thread); - pthread_join(stream_thread, NULL); - sem_destroy(&audio_irq_done_sem); - stream_thread_active = false; - } - - // Close /dev/audio - if (fd > 0) { - ioctl(fd, AUDIO_DRAIN); - close(fd); - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ -} - - -/* - * Streaming function - */ - -static uint32 apple_stream_info; // Mac address of SoundComponentData struct describing next buffer - -static void *stream_func(void *arg) -{ - int16 *silent_buffer = new int16[sound_buffer_size / 2]; - int16 *last_buffer = new int16[sound_buffer_size / 2]; - memset(silent_buffer, 0, sound_buffer_size); - - uint_t sent = 0, delta; - struct audio_info status; - - for (;;) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to audio port - if (work_size == sound_buffer_size) - write(fd, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), sound_buffer_size); - else { - // Last buffer - Mac2Host_memcpy(last_buffer, ReadMacInt32(apple_stream_info + scd_buffer), work_size); - memset((uint8 *)last_buffer + work_size, 0, sound_buffer_size - work_size); - write(fd, last_buffer, sound_buffer_size); - } - D(bug("stream: data written\n")); - } else - goto silence; - - } else { - - // Audio not active, play silence -silence: write(fd, silent_buffer, sound_buffer_size); - } - - // We allow a maximum of three buffers to be sent - sent += audio_frames_per_block; - ioctl(fd, AUDIO_GETINFO, &status); - while ((delta = sent - status.play.samples) > (audio_frames_per_block * 3)) { - unsigned int sl = 1000000 * (delta - audio_frames_per_block * 3) / (AudioStatus.sample_rate >> 16); - usleep(sl); - ioctl(fd, AUDIO_GETINFO, &status); - } - } - return NULL; -} - - -/* - * MacOS audio interrupt, read next data block - */ - -void AudioInterrupt(void) -{ - D(bug("AudioInterrupt\n")); - - // Get data from apple mixer - if (AudioStatus.mixer) { - M68kRegisters r; - r.a[0] = audio_data + adatStreamInfo; - r.a[1] = AudioStatus.mixer; - Execute68k(audio_data + adatGetSourceData, &r); - D(bug(" GetSourceData() returns %08lx\n", r.d[0])); - } else - WriteMacInt32(audio_data + adatStreamInfo, 0); - - // Signal stream function - sem_post(&audio_irq_done_sem); - D(bug("AudioInterrupt done\n")); -} - - -/* - * Set sampling parameters - * "index" is an index into the audio_sample_rates[] etc. arrays - * It is guaranteed that AudioStatus.num_sources == 0 - */ - -bool audio_set_sample_rate(int index) -{ - return true; -} - -bool audio_set_sample_size(int index) -{ - return true; -} - -bool audio_set_channels(int index) -{ - return true; -} - - -/* - * Get/set volume controls (volume values received/returned have the left channel - * volume in the upper 16 bits and the right channel volume in the lower 16 bits; - * both volumes are 8.8 fixed point values with 0x0100 meaning "maximum volume")) - */ - -bool audio_get_main_mute(void) -{ - return false; -} - -uint32 audio_get_main_volume(void) -{ - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ -} diff --git a/BasiliskII/src/Unix/audio_oss_esd.cpp b/BasiliskII/src/Unix/audio_oss_esd.cpp deleted file mode 100644 index 203a5ac75..000000000 --- a/BasiliskII/src/Unix/audio_oss_esd.cpp +++ /dev/null @@ -1,558 +0,0 @@ -/* - * audio_oss_esd.cpp - Audio support, implementation for OSS and ESD (Linux and FreeBSD) - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 "sysdeps.h" - -#include -#include -#include -#include -#include - -#ifdef __linux__ -#include -#endif - -#ifdef __FreeBSD__ -#include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "prefs.h" -#include "user_strings.h" -#include "audio.h" -#include "audio_defs.h" - -#ifdef ENABLE_ESD -#include -#endif - -#define DEBUG 0 -#include "debug.h" - - -// The currently selected audio parameters (indices in audio_sample_rates[] etc. vectors) -static int audio_sample_rate_index = 0; -static int audio_sample_size_index = 0; -static int audio_channel_count_index = 0; - -// Global variables -static bool is_dsp_audio = false; // Flag: is DSP audio -static int audio_fd = -1; // fd of dsp or ESD -static int mixer_fd = -1; // fd of mixer -static sem_t audio_irq_done_sem; // Signal from interrupt to streaming thread: data block read -static bool sem_inited = false; // Flag: audio_irq_done_sem initialized -static int sound_buffer_size; // Size of sound buffer in bytes -static bool little_endian = false; // Flag: DSP accepts only little-endian 16-bit sound data -static uint8 silence_byte; // Byte value to use to fill sound buffers with silence -static pthread_t stream_thread; // Audio streaming thread -static pthread_attr_t stream_thread_attr; // Streaming thread attributes -static bool stream_thread_active = false; // Flag: streaming thread installed -static volatile bool stream_thread_cancel = false; // Flag: cancel streaming thread - -// Prototypes -static void *stream_func(void *arg); - - -/* - * Initialization - */ - -// Set AudioStatus to reflect current audio stream format -static void set_audio_status_format(void) -{ - AudioStatus.sample_rate = audio_sample_rates[audio_sample_rate_index]; - AudioStatus.sample_size = audio_sample_sizes[audio_sample_size_index]; - AudioStatus.channels = audio_channel_counts[audio_channel_count_index]; -} - -// Init using the dsp device, returns false on error -static bool open_dsp(void) -{ - // Open the device - const char *dsp = PrefsFindString("dsp"); - audio_fd = open(dsp, O_WRONLY); - if (audio_fd < 0) { - fprintf(stderr, "WARNING: Cannot open %s (%s)\n", dsp, strerror(errno)); - return false; - } - - printf("Using %s audio output\n", dsp); - is_dsp_audio = true; - - // Get supported sample formats - if (audio_sample_sizes.empty()) { - unsigned long format; - ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &format); - if (format & AFMT_U8) - audio_sample_sizes.push_back(8); - if (format & (AFMT_S16_BE | AFMT_S16_LE)) - audio_sample_sizes.push_back(16); - - int stereo = 0; - if (ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo) == 0 && stereo == 0) - audio_channel_counts.push_back(1); - stereo = 1; - if (ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo) == 0 && stereo == 1) - audio_channel_counts.push_back(2); - - if (audio_sample_sizes.empty() || audio_channel_counts.empty()) { - WarningAlert(GetString(STR_AUDIO_FORMAT_WARN)); - close(audio_fd); - audio_fd = -1; - return false; - } - - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - int rate = 44100; - ioctl(audio_fd, SNDCTL_DSP_SPEED, &rate); - if (rate > 22050) - audio_sample_rates.push_back(rate << 16); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Set DSP parameters - unsigned long format; - if (audio_sample_sizes[audio_sample_size_index] == 8) { - format = AFMT_U8; - little_endian = false; - silence_byte = 0x80; - } else { - unsigned long sup_format; - ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &sup_format); - if (sup_format & AFMT_S16_BE) { - little_endian = false; - format = AFMT_S16_BE; - } else { - little_endian = true; - format = AFMT_S16_LE; - } - silence_byte = 0; - } - ioctl(audio_fd, SNDCTL_DSP_SETFMT, &format); - int frag = 0x0004000c; // Block size: 4096 frames - ioctl(audio_fd, SNDCTL_DSP_SETFRAGMENT, &frag); - int stereo = (audio_channel_counts[audio_channel_count_index] == 2); - ioctl(audio_fd, SNDCTL_DSP_STEREO, &stereo); - int rate = audio_sample_rates[audio_sample_rate_index] >> 16; - ioctl(audio_fd, SNDCTL_DSP_SPEED, &rate); - - // Get sound buffer size - ioctl(audio_fd, SNDCTL_DSP_GETBLKSIZE, &audio_frames_per_block); - D(bug("DSP_GETBLKSIZE %d\n", audio_frames_per_block)); - return true; -} - -// Init using ESD, returns false on error -static bool open_esd(void) -{ -#ifdef ENABLE_ESD - int rate; - esd_format_t format = ESD_STREAM | ESD_PLAY; - - if (audio_sample_sizes.empty()) { - - // Default values - rate = 44100; - format |= (ESD_BITS16 | ESD_STEREO); - - } else { - - rate = audio_sample_rates[audio_sample_rate_index] >> 16; - if (audio_sample_sizes[audio_sample_size_index] == 8) - format |= ESD_BITS8; - else - format |= ESD_BITS16; - if (audio_channel_counts[audio_channel_count_index] == 1) - format |= ESD_MONO; - else - format |= ESD_STEREO; - } - -#if WORDS_BIGENDIAN - little_endian = false; -#else - little_endian = true; -#endif - silence_byte = 0; // Is this correct for 8-bit mode? - - // Open connection to ESD server - audio_fd = esd_play_stream(format, rate, NULL, NULL); - if (audio_fd < 0) { - fprintf(stderr, "WARNING: Cannot open ESD connection\n"); - return false; - } - - printf("Using ESD audio output\n"); - - // ESD supports a variety of twisted little audio formats, all different - if (audio_sample_sizes.empty()) { - - // The reason we do this here is that we don't want to add sample - // rates etc. unless the ESD server connection could be opened - // (if ESD fails, dsp might be tried next) - audio_sample_rates.push_back(11025 << 16); - audio_sample_rates.push_back(22050 << 16); - audio_sample_rates.push_back(44100 << 16); - audio_sample_sizes.push_back(8); - audio_sample_sizes.push_back(16); - audio_channel_counts.push_back(1); - audio_channel_counts.push_back(2); - - // Default to highest supported values - audio_sample_rate_index = audio_sample_rates.size() - 1; - audio_sample_size_index = audio_sample_sizes.size() - 1; - audio_channel_count_index = audio_channel_counts.size() - 1; - } - - // Sound buffer size = 4096 frames - audio_frames_per_block = 4096; - return true; -#else - // ESD is not enabled, shut up the compiler - return false; -#endif -} - -static bool open_audio(void) -{ -#ifdef ENABLE_ESD - // If ESPEAKER is set, the user probably wants to use ESD, so try that first - if (getenv("ESPEAKER")) - if (open_esd()) - goto dev_opened; -#endif - - // Try to open dsp - if (open_dsp()) - goto dev_opened; - -#ifdef ENABLE_ESD - // Hm, dsp failed so we try ESD again if ESPEAKER wasn't set - if (!getenv("ESPEAKER")) - if (open_esd()) - goto dev_opened; -#endif - - // No audio device succeeded - WarningAlert(GetString(STR_NO_AUDIO_WARN)); - return false; - - // Device opened, set AudioStatus -dev_opened: - sound_buffer_size = (audio_sample_sizes[audio_sample_size_index] >> 3) * audio_channel_counts[audio_channel_count_index] * audio_frames_per_block; - set_audio_status_format(); - - // Start streaming thread - Set_pthread_attr(&stream_thread_attr, 0); - stream_thread_active = (pthread_create(&stream_thread, &stream_thread_attr, stream_func, NULL) == 0); - - // Everything went fine - audio_open = true; - return true; -} - -void AudioInit(void) -{ - // Init audio status (reasonable defaults) and feature flags - AudioStatus.sample_rate = 44100 << 16; - AudioStatus.sample_size = 16; - AudioStatus.channels = 2; - AudioStatus.mixer = 0; - AudioStatus.num_sources = 0; - audio_component_flags = cmpWantsRegisterMessage | kStereoOut | k16BitOut; - - // Sound disabled in prefs? Then do nothing - if (PrefsFindBool("nosound")) - return; - - // Init semaphore - if (sem_init(&audio_irq_done_sem, 0, 0) < 0) - return; - sem_inited = true; - - // Try to open the mixer device - const char *mixer = PrefsFindString("mixer"); - mixer_fd = open(mixer, O_RDWR); - if (mixer_fd < 0) - printf("WARNING: Cannot open %s (%s)\n", mixer, strerror(errno)); - - // Open and initialize audio device - open_audio(); -} - - -/* - * Deinitialization - */ - -static void close_audio(void) -{ - // Stop stream and delete semaphore - if (stream_thread_active) { - stream_thread_cancel = true; -#ifdef HAVE_PTHREAD_CANCEL - pthread_cancel(stream_thread); -#endif - pthread_join(stream_thread, NULL); - stream_thread_active = false; - } - - // Close dsp or ESD socket - if (audio_fd >= 0) { - close(audio_fd); - audio_fd = -1; - } - - audio_open = false; -} - -void AudioExit(void) -{ - // Stop the device immediately. Otherwise, close() sends - // SNDCTL_DSP_SYNC, which may hang - if (is_dsp_audio) - ioctl(audio_fd, SNDCTL_DSP_RESET, 0); - - // Close audio device - close_audio(); - - // Delete semaphore - if (sem_inited) { - sem_destroy(&audio_irq_done_sem); - sem_inited = false; - } - - // Close mixer device - if (mixer_fd >= 0) { - close(mixer_fd); - mixer_fd = -1; - } -} - - -/* - * First source added, start audio stream - */ - -void audio_enter_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Last source removed, stop audio stream - */ - -void audio_exit_stream() -{ - // Streaming thread is always running to avoid clicking noises -} - - -/* - * Streaming function - */ - -static void *stream_func(void *arg) -{ - int16 *silent_buffer = new int16[sound_buffer_size / 2]; - int16 *last_buffer = new int16[sound_buffer_size / 2]; - memset(silent_buffer, silence_byte, sound_buffer_size); - - while (!stream_thread_cancel) { - if (AudioStatus.num_sources) { - - // Trigger audio interrupt to get new buffer - D(bug("stream: triggering irq\n")); - SetInterruptFlag(INTFLAG_AUDIO); - TriggerInterrupt(); - D(bug("stream: waiting for ack\n")); - sem_wait(&audio_irq_done_sem); - D(bug("stream: ack received\n")); - - // Get size of audio data - uint32 apple_stream_info = ReadMacInt32(audio_data + adatStreamInfo); - if (apple_stream_info) { - int work_size = ReadMacInt32(apple_stream_info + scd_sampleCount) * (AudioStatus.sample_size >> 3) * AudioStatus.channels; - D(bug("stream: work_size %d\n", work_size)); - if (work_size > sound_buffer_size) - work_size = sound_buffer_size; - if (work_size == 0) - goto silence; - - // Send data to DSP - if (work_size == sound_buffer_size && !little_endian) - write(audio_fd, Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)), sound_buffer_size); - else { - // Last buffer or little-endian DSP - if (little_endian) { - int16 *p = (int16 *)Mac2HostAddr(ReadMacInt32(apple_stream_info + scd_buffer)); - for (int i=0; i= 0) { - int vol; - if (ioctl(mixer_fd, SOUND_MIXER_READ_PCM, &vol) == 0) { - int left = vol >> 8; - int right = vol & 0xff; - return ((left * 256 / 100) << 16) | (right * 256 / 100); - } - } - return 0x01000100; -} - -bool audio_get_speaker_mute(void) -{ - return false; -} - -uint32 audio_get_speaker_volume(void) -{ - if (mixer_fd >= 0) { - int vol; - if (ioctl(mixer_fd, SOUND_MIXER_READ_VOLUME, &vol) == 0) { - int left = vol >> 8; - int right = vol & 0xff; - return ((left * 256 / 100) << 16) | (right * 256 / 100); - } - } - return 0x01000100; -} - -void audio_set_main_mute(bool mute) -{ -} - -void audio_set_main_volume(uint32 vol) -{ - if (mixer_fd >= 0) { - int left = vol >> 16; - int right = vol & 0xffff; - int p = ((left * 100 / 256) << 8) | (right * 100 / 256); - ioctl(mixer_fd, SOUND_MIXER_WRITE_PCM, &p); - } -} - -void audio_set_speaker_mute(bool mute) -{ -} - -void audio_set_speaker_volume(uint32 vol) -{ - if (mixer_fd >= 0) { - int left = vol >> 16; - int right = vol & 0xffff; - int p = ((left * 100 / 256) << 8) | (right * 100 / 256); - ioctl(mixer_fd, SOUND_MIXER_WRITE_VOLUME, &p); - } -} diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 3b834bb92..505e6b0de 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -25,9 +25,6 @@ dnl Mac OS X Sound AC_ARG_ENABLE(macosx-sound, [ --enable-macosx-sound enable Mac OS X Sound [default=no]], [WANT_MACOSX_SOUND=$enableval], [WANT_MACOSX_SOUND=no]) dnl Video options. -AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) -AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) -AC_ARG_ENABLE(fbdev-dga, [ --enable-fbdev-dga use direct frame buffer access via /dev/fb [default=yes]], [WANT_FBDEV_DGA=$enableval], [WANT_FBDEV_DGA=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=yes]], [WANT_VOSF=$enableval], [WANT_VOSF=yes]) dnl SDL options. @@ -71,7 +68,6 @@ AC_ARG_ENABLE(addressing, ]) dnl External packages. -AC_ARG_WITH(esd, [ --with-esd support ESD for sound under Linux/FreeBSD [default=yes]], [WANT_ESD=$withval], [WANT_ESD=yes]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [case "$withval" in gtk1) WANT_GTK="gtk";; @@ -280,9 +276,6 @@ dnl Do we need SDL? WANT_SDL=no if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then WANT_SDL=yes - WANT_XF86_DGA=no - WANT_XF86_VIDMODE=no - WANT_FBDEV_DGA=no SDL_SUPPORT="$SDL_SUPPORT video" fi if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then @@ -350,15 +343,10 @@ else SDL_SUPPORT="none" fi -dnl We need X11, if not using SDL or Mac GUI. +dnl We need SDL or Mac GUI. if [[ "x$WANT_SDL_VIDEO" = "xno" -a "x$WANT_MACOSX_GUI" = "xno" ]]; then AC_PATH_XTRA - if [[ "x$no_x" = "xyes" ]]; then - AC_MSG_ERROR([You need X11 to run Basilisk II.]) - fi - CFLAGS="$CFLAGS $X_CFLAGS" - CXXFLAGS="$CXXFLAGS $X_CFLAGS" - LIBS="$LIBS $X_PRE_LIBS $X_LIBS -lX11 -lXext $X_EXTRA_LIBS" + AC_MSG_ERROR([You need SDL or macOS to run Basilisk II.]) fi dnl BINCUE @@ -413,35 +401,6 @@ AC_CHECK_FUNCS(sem_init, , [ fi ]) -dnl We use DGA (XFree86 or fbdev) if possible. -if [[ "x$WANT_XF86_DGA" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86dga, XF86DGAQueryExtension, [ - AC_DEFINE(ENABLE_XF86_DGA, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86dga" - if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_MSG_WARN([Cannot have both --enable-xf86-dga and --enable-fbdev-dga, ignoring --enable-fbdev-dga.]) - WANT_FBDEV_DGA=no - fi - ], [ - AC_MSG_WARN([Could not find XFree86 DGA extension, ignoring --enable-xf86-dga.]) - WANT_XF86_DGA=no - ]) -fi -if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_DEFINE(ENABLE_FBDEV_DGA, 1, [Define if using DGA with framebuffer device.]) -fi - -dnl We use XFree86 VidMode if possible. -if [[ "x$WANT_XF86_VIDMODE" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86vm, XF86VidModeQueryExtension, [ - AC_DEFINE(ENABLE_XF86_VIDMODE, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86vm" - ], [ - AC_MSG_WARN([Could not find XFree86 VidMode extension, ignoring --enable-xf86-vidmode.]) - WANT_XF86_VIDMODE=no - ]) -fi - dnl We use GTK+ if possible. UISRCS=../dummy/prefs_editor_dummy.cpp case "x$WANT_GTK" in @@ -494,19 +453,6 @@ if [[ "$WANT_GTK" = "no" ]]; then fi AC_SUBST(STANDALONE_GUI, [$WANT_STANDALONE_GUI]) -dnl We use ESD if possible. -if [[ "x$WANT_ESD" = "xyes" ]]; then - AM_PATH_ESD(0.2.8, [ - AC_DEFINE(ENABLE_ESD, 1, [Define is using ESD.]) - CFLAGS="$CFLAGS $ESD_CFLAGS" - CXXFLAGS="$CXXFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" - ], [ - AC_MSG_WARN([Could not find ESD, disabling ESD support.]) - WANT_ESD=no - ]) -fi - dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE @@ -730,12 +676,10 @@ EXTRASYSSRCS= case "$target_os" in linux*) ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp SCSISRC=Linux/scsi_linux.cpp ;; freebsd*) ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp DEFINES="$DEFINES -DBSD_COMP" CXXFLAGS="$CXXFLAGS -fpermissive" dnl Check for the CAM library @@ -760,15 +704,9 @@ netbsd*) ETHERSRC=ether_unix.cpp ;; solaris*) - AUDIOSRC=Solaris/audio_solaris.cpp DEFINES="$DEFINES -DBSD_COMP -D_POSIX_PTHREAD_SEMANTICS" ;; irix*) - AUDIOSRC=Irix/audio_irix.cpp - EXTRASYSSRCS=Irix/unaligned.c - LIBS="$LIBS -laudio" - WANT_ESD=no - dnl Check if our compiler supports -IPA (MIPSPro) HAVE_IPA=no ocflags="$CFLAGS" @@ -885,7 +823,6 @@ if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then fi fi elif [[ "x$WANT_MACOSX_GUI" != "xyes" ]]; then - VIDEOSRCS="video_x.cpp" KEYCODES="keycodes" EXTRASYSSRCS="$EXTRASYSSRCS clip_unix.cpp" fi @@ -1818,11 +1755,7 @@ echo SDL major-version ...................... : $WANT_SDL_VERSION_MAJOR echo BINCUE support ......................... : $have_bincue echo LIBVHD support ......................... : $have_libvhd echo VDE support ............................ : $have_vdeplug -echo XFree86 DGA support .................... : $WANT_XF86_DGA -echo XFree86 VidMode support ................ : $WANT_XF86_VIDMODE -echo fbdev DGA support ...................... : $WANT_FBDEV_DGA echo Enable video on SEGV signals ........... : $WANT_VOSF -echo ESD sound support ...................... : $WANT_ESD echo GTK user interface ..................... : $WANT_GTK echo mon debugger support ................... : $WANT_MON echo Use JIT compiler ....................... : $WANT_JIT diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index a1d9b7964..5df70a9d1 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -31,10 +31,6 @@ # include #endif -#ifndef USE_SDL_VIDEO -# include -#endif - #ifdef HAVE_PTHREADS # include #endif @@ -54,11 +50,6 @@ # endif #endif -#ifdef ENABLE_XF86_DGA -# include -# include -#endif - #include using std::string; @@ -105,16 +96,6 @@ bool CPUIs68060; int FPUType; bool TwentyFourBitAddressing; - -// Global variables -#ifndef USE_SDL_VIDEO -extern char *x_display_name; // X11 display name -extern Display *x_display; // X11 display handle -#ifdef X11_LOCK_TYPE -X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock -#endif -#endif - static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes #ifdef HAVE_PTHREADS @@ -367,12 +348,6 @@ int main(int argc, char **argv) for (int i=1; ientry; -#ifdef ENABLE_FBDEV_DGA - l_fbdev_name = gtk_label_new(GetString(STR_FBDEV_NAME_CTRL)); - gtk_widget_show(l_fbdev_name); - gtk_table_attach(GTK_TABLE(table), l_fbdev_name, 0, 1, 4, 5, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_fbdev_name = gtk_entry_new(); - gtk_widget_show(w_fbdev_name); - gtk_entry_set_text(GTK_ENTRY(w_fbdev_name), fbdev_name); - gtk_table_attach(GTK_TABLE(table), w_fbdev_name, 1, 2, 4, 5, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); - - w_fbdevice_file = make_file_entry(box, STR_FBDEVICE_FILE_CTRL, "fbdevicefile"); -#endif - make_separator(box); make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); - w_dspdevice_file = make_file_entry(box, STR_DSPDEVICE_FILE_CTRL, "dsp"); - w_mixerdevice_file = make_file_entry(box, STR_MIXERDEVICE_FILE_CTRL, "mixer"); set_graphics_sensitive(); hide_show_graphics_widgets(); } - /* * "Input" pane */ diff --git a/BasiliskII/src/Unix/video_x.cpp b/BasiliskII/src/Unix/video_x.cpp deleted file mode 100644 index df6e55aad..000000000 --- a/BasiliskII/src/Unix/video_x.cpp +++ /dev/null @@ -1,2690 +0,0 @@ -/* - * video_x.cpp - Video/graphics emulation, X11 specific stuff - * - * Basilisk II (C) Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include - -#include - -#ifdef HAVE_PTHREADS -# include -#endif - -#ifdef ENABLE_XF86_DGA -# include -#endif - -#ifdef ENABLE_XF86_VIDMODE -# include -#endif - -#ifdef ENABLE_FBDEV_DGA -# include -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_blit.h" - -#define DEBUG 0 -#include "debug.h" - - -// Supported video modes -static vector VideoModes; - -// Display types -enum { - DISPLAY_WINDOW, // X11 window, using MIT SHM extensions if possible - DISPLAY_DGA // DGA fullscreen display -}; - -// Constants -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; - -static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask; -static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask; - - -// Global variables -static int32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; - -static int display_type = DISPLAY_WINDOW; // See enum above -static bool local_X11; // Flag: X server running on local machine? -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifdef HAVE_PTHREADS -static pthread_attr_t redraw_thread_attr; // Redraw thread attributes -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static volatile bool redraw_thread_cancel_ack; // Flag: Acknowledge for redraw thread cancellation -static pthread_t redraw_thread; // Redraw thread -#endif - -static bool has_dga = false; // Flag: Video DGA capable -static bool has_vidmode = false; // Flag: VidMode extension available - -#ifdef ENABLE_VOSF -static bool use_vosf = true; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// X11 variables -char *x_display_name = NULL; // X11 display name -Display *x_display = NULL; // X11 display handle -static int screen; // Screen number -static Window rootwin; // Root window and our window -static int num_depths = 0; // Number of available X depths -static int *avail_depths = NULL; // List of available X depths -static XColor black, white; -static unsigned long black_pixel, white_pixel; -static int eventmask; - -static int xdepth; // Depth of X screen -static VisualFormat visualFormat; -static XVisualInfo visualInfo; -static Visual *vis; -static int color_class; - -static bool x_native_byte_order; // XImage has native byte order? -static int rshift, rloss, gshift, gloss, bshift, bloss; // Pixel format of DirectColor/TrueColor modes - -static Colormap cmap[2] = {0, 0}; // Colormaps for indexed modes (DGA needs two of them) - -static XColor x_palette[256]; // Color palette to be used as CLUT and gamma table -static bool x_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors - -#ifdef ENABLE_FBDEV_DGA -static int fbdev_fd = -1; -#endif - -#ifdef ENABLE_XF86_VIDMODE -static XF86VidModeModeInfo **x_video_modes = NULL; // Array of all available modes -static int num_x_video_modes; -#endif - -// Mutex to protect palette -#ifdef HAVE_PTHREADS -static pthread_mutex_t x_palette_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_PALETTE pthread_mutex_lock(&x_palette_lock) -#define UNLOCK_PALETTE pthread_mutex_unlock(&x_palette_lock) -#else -#define LOCK_PALETTE -#define UNLOCK_PALETTE -#endif - -// Mutex to protect frame buffer -#ifdef HAVE_PTHREADS -static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock); -#define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock); -#else -#define LOCK_FRAME_BUFFER -#define UNLOCK_FRAME_BUFFER -#endif - -// Variables for non-VOSF incremental refresh -static const int sm_uptd[] = {4,1,6,3,0,5,2,7}; -static int sm_no_boxes[] = {1,8,32,64,128,300}; -static bool updt_box[17][17]; -static int nr_boxes; - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static void *redraw_func(void *arg); - -// From main_unix.cpp -extern char *x_display_name; -extern Display *x_display; - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - -// From clip_unix.cpp -extern void ClipboardSelectionClear(XSelectionClearEvent *); -extern void ClipboardSelectionRequest(XSelectionRequestEvent *); - - -/* - * monitor_desc subclass for X11 display - */ - -class X11_monitor_desc : public monitor_desc { -public: - X11_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~X11_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Map video_mode depth ID to numerical depth value -static inline int depth_of_video_mode(video_mode const & mode) -{ - int depth = -1; - switch (mode.depth) { - case VDEPTH_1BIT: - depth = 1; - break; - case VDEPTH_2BIT: - depth = 2; - break; - case VDEPTH_4BIT: - depth = 4; - break; - case VDEPTH_8BIT: - depth = 8; - break; - case VDEPTH_16BIT: - depth = 16; - break; - case VDEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map RGB color to pixel value (this only works in TrueColor/DirectColor visuals) -static inline uint32 map_rgb(uint8 red, uint8 green, uint8 blue, bool fix_byte_order = false) -{ - uint32 val = ((red >> rloss) << rshift) | ((green >> gloss) << gshift) | ((blue >> bloss) << bshift); - if (fix_byte_order && !x_native_byte_order) { - // We have to fix byte order in the ExpandMap[] - // NOTE: this is only an optimization since Screen_blitter_init() - // could be arranged to choose an NBO or OBO (with - // byteswapping) Blit_Expand_X_To_Y() function - switch (visualFormat.depth) { - case 15: case 16: - val = do_byteswap_16(val); - break; - case 24: case 32: - val = do_byteswap_32(val); - break; - } - } - return val; -} - -// Do we have a visual for handling the specified Mac depth? If so, set the -// global variables "xdepth", "visualInfo", "vis" and "color_class". -static bool find_visual_for_depth(video_depth depth) -{ - D(bug("have_visual_for_depth(%d)\n", 1 << depth)); - - // 1-bit works always and uses default visual - if (depth == VDEPTH_1BIT) { - vis = DefaultVisual(x_display, screen); - visualInfo.visualid = XVisualIDFromVisual(vis); - int num = 0; - XVisualInfo *vi = XGetVisualInfo(x_display, VisualIDMask, &visualInfo, &num); - visualInfo = vi[0]; - XFree(vi); - xdepth = visualInfo.depth; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d\n", visualInfo.visualid, xdepth)); - return true; - } - - // Calculate minimum and maximum supported X depth - int min_depth = 1, max_depth = 32; - switch (depth) { -#ifdef ENABLE_VOSF - case VDEPTH_2BIT: - case VDEPTH_4BIT: // VOSF blitters can convert 2/4/8-bit -> 8/16/32-bit - case VDEPTH_8BIT: - min_depth = 8; - max_depth = 32; - break; -#else - case VDEPTH_2BIT: - case VDEPTH_4BIT: // 2/4-bit requires VOSF blitters - return false; - case VDEPTH_8BIT: // 8-bit without VOSF requires an 8-bit visual - min_depth = 8; - max_depth = 8; - break; -#endif - case VDEPTH_16BIT: // 16-bit requires a 15/16-bit visual - min_depth = 15; - max_depth = 16; - break; - case VDEPTH_32BIT: // 32-bit requires a 24/32-bit visual - min_depth = 24; - max_depth = 32; - break; - } - D(bug(" minimum required X depth is %d, maximum supported X depth is %d\n", min_depth, max_depth)); - - // Try to find a visual for one of the color depths - bool visual_found = false; - for (int i=0; i max_depth) - continue; - - // Determine best color class for this depth - switch (xdepth) { - case 1: // Try StaticGray or StaticColor - if (XMatchVisualInfo(x_display, screen, xdepth, StaticGray, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, StaticColor, &visualInfo)) - visual_found = true; - break; - case 8: // Need PseudoColor - if (XMatchVisualInfo(x_display, screen, xdepth, PseudoColor, &visualInfo)) - visual_found = true; - break; - case 15: - case 16: - case 24: - case 32: // Try DirectColor first, as this will allow gamma correction - if (XMatchVisualInfo(x_display, screen, xdepth, DirectColor, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo)) - visual_found = true; - break; - default: - D(bug(" not a supported depth\n")); - break; - } - } - if (!visual_found) - return false; - - // Visual was found - vis = visualInfo.visual; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d, class ", visualInfo.visualid, xdepth)); -#if DEBUG - switch (color_class) { - case StaticGray: D(bug("StaticGray\n")); break; - case GrayScale: D(bug("GrayScale\n")); break; - case StaticColor: D(bug("StaticColor\n")); break; - case PseudoColor: D(bug("PseudoColor\n")); break; - case TrueColor: D(bug("TrueColor\n")); break; - case DirectColor: D(bug("DirectColor\n")); break; - } -#endif - return true; -} - -// Add mode to list of supported modes -static void add_mode(uint32 width, uint32 height, uint32 resolution_id, uint32 bytes_per_row, video_depth depth) -{ - video_mode mode; - mode.x = width; - mode.y = height; - mode.resolution_id = resolution_id; - mode.bytes_per_row = bytes_per_row; - mode.depth = depth; - mode.user_data = 0; - VideoModes.push_back(mode); -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(video_depth depth) -{ - add_mode(512, 384, 0x80, TrivialBytesPerRow(512, depth), depth); - add_mode(640, 480, 0x81, TrivialBytesPerRow(640, depth), depth); - add_mode(800, 600, 0x82, TrivialBytesPerRow(800, depth), depth); - add_mode(1024, 768, 0x83, TrivialBytesPerRow(1024, depth), depth); - add_mode(1152, 870, 0x84, TrivialBytesPerRow(1152, depth), depth); - add_mode(1280, 1024, 0x85, TrivialBytesPerRow(1280, depth), depth); - add_mode(1600, 1200, 0x86, TrivialBytesPerRow(1600, depth), depth); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(X11_monitor_desc &monitor, video_depth depth, bool native_byte_order) -{ -#if !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VDEPTH_16BIT) - layout = (xdepth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VDEPTH_32BIT) - layout = (xdepth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const video_mode &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = mode.bytes_per_row * mode.y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name(Window w, int name) -{ - const char *str = GetString(name); - XStoreName(x_display, w, str); - XSetIconName(x_display, w, str); - - XClassHint *hints; - hints = XAllocClassHint(); - if (hints) { - hints->res_name = "BasiliskII"; - hints->res_class = "BasiliskII"; - XSetClassHint(x_display, w, hints); - XFree(hints); - } -} - -// Set window input focus flag -static void set_window_focus(Window w) -{ - XWMHints *hints = XAllocWMHints(); - if (hints) { - hints->input = True; - hints->initial_state = NormalState; - hints->flags = InputHint | StateHint; - XSetWMHints(x_display, w, hints); - XFree(hints); - } -} - -// Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget) -static Atom WM_DELETE_WINDOW = (Atom)0; -static void set_window_delete_protocol(Window w) -{ - WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false); - XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1); -} - -// Wait until window is mapped/unmapped -void wait_mapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != MapNotify) || (e.xmap.event != w)); -} - -void wait_unmapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != UnmapNotify) || (e.xmap.event != w)); -} - -// Trap SHM errors -static bool shm_error = false; -static int (*old_error_handler)(Display *, XErrorEvent *); - -static int error_handler(Display *d, XErrorEvent *e) -{ - if (e->error_code == BadAccess) { - shm_error = true; - return 0; - } else - return old_error_handler(d, e); -} - - -/* - * Framebuffer allocation routines - */ - -#ifdef ENABLE_VOSF -#include "vm_alloc.h" - -static void *vm_acquire_framebuffer(uint32 size) -{ - // always try to allocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) - fb = VM_MAP_FAILED; - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ - vm_release(fb, size); -} -#endif - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(X11_monitor_desc &m); - virtual ~driver_base(); - - virtual void update_palette(void); - virtual void suspend(void) {} - virtual void resume(void) {} - virtual void toggle_mouse_grab(void) {} - virtual void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - virtual void grab_mouse(void) {} - virtual void ungrab_mouse(void) {} - -public: - X11_monitor_desc &monitor; // Associated video monitor - const video_mode &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - Window w; // The window we draw into - - int orig_accel_numer, orig_accel_denom, orig_threshold; // Original mouse acceleration -}; - -class driver_window; -static void update_display_window_vosf(driver_window *drv); -static void update_display_dynamic(int ticker, driver_window *drv); -static void update_display_static(driver_window *drv); - -class driver_window : public driver_base { - friend void update_display_window_vosf(driver_window *drv); - friend void update_display_dynamic(int ticker, driver_window *drv); - friend void update_display_static(driver_window *drv); - -public: - driver_window(X11_monitor_desc &monitor); - ~driver_window(); - - void toggle_mouse_grab(void); - void mouse_moved(int x, int y); - - void grab_mouse(void); - void ungrab_mouse(void); - -private: - GC gc; - XImage *img; - bool have_shm; // Flag: SHM extensions available - XShmSegmentInfo shminfo; - Cursor mac_cursor; - bool mouse_grabbed; // Flag: mouse pointer grabbed, using relative mouse mode - int mouse_last_x, mouse_last_y; // Last mouse position (for relative mode) -}; - -class driver_dga; -static void update_display_dga_vosf(driver_dga *drv); - -class driver_dga : public driver_base { - friend void update_display_dga_vosf(driver_dga *drv); - -public: - driver_dga(X11_monitor_desc &monitor); - ~driver_dga(); - - void suspend(void); - void resume(void); - -protected: - struct FakeXImage { - int width, height; // size of image - int depth; // depth of image - int bytes_per_line; // accelerator to next line - - FakeXImage(int w, int h, int d) - : width(w), height(h), depth(d) - { bytes_per_line = TrivialBytesPerRow(width, DepthModeForPixelDepth(depth)); } - }; - FakeXImage *img; - -private: - Window suspend_win; // "Suspend" information window - void *fb_save; // Saved frame buffer for suspend/resume -}; - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(X11_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), w(0) -{ - the_buffer = NULL; - the_buffer_copy = NULL; - XGetPointerControl(x_display, &orig_accel_numer, &orig_accel_denom, &orig_threshold); -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - if (w) { - XUnmapWindow(x_display, w); - wait_unmapped(w); - XDestroyWindow(x_display, w); - } - - XFlush(x_display); - XSync(x_display, false); - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer) { - free(the_buffer); - the_buffer = NULL; - } - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - // the_buffer shall always be mapped through vm_acquire() so that we can vm_protect() it at will - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - if (the_host_buffer) { - D(bug(" freeing the_host_buffer at %p\n", the_host_buffer)); - free(the_host_buffer); - the_host_buffer = NULL; - } - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#endif -} - -// Palette has changed -void driver_base::update_palette(void) -{ - if (color_class == PseudoColor || color_class == DirectColor) { - int num = vis->map_entries; - if (!IsDirectMode(monitor.get_current_mode()) && color_class == DirectColor) - return; // Indexed mode on true color screen, don't set CLUT - XStoreColors(x_display, cmap[0], x_palette, num); - XStoreColors(x_display, cmap[1], x_palette, num); - } - XSync(x_display, false); -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ - XChangePointerControl(x_display, True, False, 1, 1, 0); -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ - XChangePointerControl(x_display, True, True, orig_accel_numer, orig_accel_denom, orig_threshold); -} - - -/* - * Windowed display driver - */ - -// Open display -driver_window::driver_window(X11_monitor_desc &m) - : driver_base(m), gc(0), img(NULL), have_shm(false), mac_cursor(0), - mouse_grabbed(false), mouse_last_x(0), mouse_last_y(0) -{ - int width = mode.x, height = mode.y; - int aligned_width = (width + 15) & ~15; - int aligned_height = (height + 15) & ~15; - - // Set absolute mouse mode - ADBSetRelMouseMode(mouse_grabbed); - - // Create window (setting background_pixel, border_pixel and colormap is - // mandatory when using a non-default visual; in 1-bit mode we use the - // default visual, so we can also use the default colormap) - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = win_eventmask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.border_pixel = 0; - wattr.colormap = (mode.depth == VDEPTH_1BIT ? DefaultColormap(x_display, screen) : cmap[0]); - w = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWColormap, &wattr); - D(bug(" window created\n")); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Set window icons - set_window_icons(w); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Set delete protocol property - set_window_delete_protocol(w); - - // Make window unresizable - { - XSizeHints *hints = XAllocSizeHints(); - if (hints) { - hints->min_width = width; - hints->max_width = width; - hints->min_height = height; - hints->max_height = height; - hints->flags = PMinSize | PMaxSize; - XSetWMNormalHints(x_display, w, hints); - XFree(hints); - } - } - D(bug(" window attributes set\n")); - - // Show window - XMapWindow(x_display, w); - wait_mapped(w); - D(bug(" window mapped\n")); - - // 1-bit mode is big-endian; if the X server is little-endian, we can't - // use SHM because that doesn't allow changing the image byte order - bool need_msb_image = (mode.depth == VDEPTH_1BIT && XImageByteOrder(x_display) == LSBFirst); - - // Try to create and attach SHM image - if (local_X11 && !need_msb_image && XShmQueryExtension(x_display)) { - - // Create SHM image ("height + 2" for safety) - img = XShmCreateImage(x_display, vis, mode.depth == VDEPTH_1BIT ? 1 : xdepth, mode.depth == VDEPTH_1BIT ? XYBitmap : ZPixmap, 0, &shminfo, width, height); - D(bug(" shm image created\n")); - shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777); - the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0); - shminfo.shmaddr = img->data = (char *)the_buffer_copy; - shminfo.readOnly = False; - - // Try to attach SHM image, catching errors - shm_error = false; - old_error_handler = XSetErrorHandler(error_handler); - XShmAttach(x_display, &shminfo); - XSync(x_display, false); - XSetErrorHandler(old_error_handler); - if (shm_error) { - shmdt(shminfo.shmaddr); - XDestroyImage(img); - img = NULL; - shminfo.shmid = -1; - } else { - have_shm = true; - shmctl(shminfo.shmid, IPC_RMID, 0); - } - D(bug(" shm image attached\n")); - } - - // Create normal X image if SHM doesn't work ("height + 2" for safety) - if (!have_shm) { - int bytes_per_row = (mode.depth == VDEPTH_1BIT ? aligned_width/8 : TrivialBytesPerRow(aligned_width, DepthModeForPixelDepth(xdepth))); - the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row); - img = XCreateImage(x_display, vis, mode.depth == VDEPTH_1BIT ? 1 : xdepth, mode.depth == VDEPTH_1BIT ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row); - D(bug(" X image created\n")); - } - - if (need_msb_image) { - img->byte_order = MSBFirst; - img->bitmap_bit_order = MSBFirst; - } - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer_copy; - the_buffer_size = page_extend((aligned_height + 2) * img->bytes_per_line); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#else - // Allocate memory for frame buffer - the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); -#endif - - // Create GC - gc = XCreateGC(x_display, w, 0, 0); - XSetState(x_display, gc, black_pixel, white_pixel, GXcopy, AllPlanes); - - // Create no_cursor - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, w, 1, 1, 1), - XCreatePixmap(x_display, w, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, w, mac_cursor); - - // Init blitting routines -#ifdef ENABLE_VOSF - Screen_blitter_init(visualFormat, x_native_byte_order, depth_of_video_mode(mode)); -#endif - - // Set frame buffer base - set_mac_frame_buffer(monitor, mode.depth, x_native_byte_order); - - // Everything went well - init_ok = true; -} - -// Close display -driver_window::~driver_window() -{ - if (have_shm) { - XShmDetach(x_display, &shminfo); -#ifdef ENABLE_VOSF - the_host_buffer = NULL; // don't free() in driver_base dtor -#else - the_buffer_copy = NULL; // don't free() in driver_base dtor -#endif - } - if (img) { - if (!have_shm) - img->data = NULL; - XDestroyImage(img); - } - if (have_shm) { - shmdt(shminfo.shmaddr); - shmctl(shminfo.shmid, IPC_RMID, 0); - } - if (gc) - XFreeGC(x_display, gc); -} - -// Toggle mouse grab -void driver_window::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -// Grab mouse, switch to relative mouse mode -void driver_window::grab_mouse(void) -{ - int result; - for (int i=0; i<10; i++) { - result = XGrabPointer(x_display, w, True, 0, - GrabModeAsync, GrabModeAsync, w, None, CurrentTime); - if (result != AlreadyGrabbed) - break; - Delay_usec(100000); - } - if (result == GrabSuccess) { - XStoreName(x_display, w, GetString(STR_WINDOW_TITLE_GRABBED)); - ADBSetRelMouseMode(mouse_grabbed = true); - disable_mouse_accel(); - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_window::ungrab_mouse(void) -{ - if (mouse_grabbed) { - XUngrabPointer(x_display, CurrentTime); - XStoreName(x_display, w, GetString(STR_WINDOW_TITLE)); - ADBSetRelMouseMode(mouse_grabbed = false); - restore_mouse_accel(); - } -} - -// Mouse moved -void driver_window::mouse_moved(int x, int y) -{ - if (!mouse_grabbed) { - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(x, y); - return; - } - - // Warped mouse motion (this code is taken from SDL) - - // Post first mouse event - int width = monitor.get_current_mode().x, height = monitor.get_current_mode().y; - int delta_x = x - mouse_last_x, delta_y = y - mouse_last_y; - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(delta_x, delta_y); - - // Only warp the pointer when it has reached the edge - const int MOUSE_FUDGE_FACTOR = 8; - if (x < MOUSE_FUDGE_FACTOR || x > (width - MOUSE_FUDGE_FACTOR) - || y < MOUSE_FUDGE_FACTOR || y > (height - MOUSE_FUDGE_FACTOR)) { - XEvent event; - while (XCheckTypedEvent(x_display, MotionNotify, &event)) { - delta_x = x - mouse_last_x; delta_y = y - mouse_last_y; - mouse_last_x = x; mouse_last_y = y; - ADBMouseMoved(delta_x, delta_y); - } - mouse_last_x = width/2; - mouse_last_y = height/2; - XWarpPointer(x_display, None, w, 0, 0, 0, 0, mouse_last_x, mouse_last_y); - for (int i=0; i<10; i++) { - XMaskEvent(x_display, PointerMotionMask, &event); - if (event.xmotion.x > (mouse_last_x - MOUSE_FUDGE_FACTOR) - && event.xmotion.x < (mouse_last_x + MOUSE_FUDGE_FACTOR) - && event.xmotion.y > (mouse_last_y - MOUSE_FUDGE_FACTOR) - && event.xmotion.y < (mouse_last_y + MOUSE_FUDGE_FACTOR)) - break; - } - } -} - - -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -/* - * DGA display driver base class - */ - -driver_dga::driver_dga(X11_monitor_desc &m) - : driver_base(m), suspend_win(0), fb_save(NULL), img(NULL) -{ -} - -driver_dga::~driver_dga() -{ - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - - if (img) - delete img; -} - -// Suspend emulation -void driver_dga::suspend(void) -{ - // Release ctrl key - ADBKeyUp(0x36); - ctrl_down = false; - - // Lock frame buffer (this will stop the MacOS thread) - LOCK_FRAME_BUFFER; - - // Save frame buffer - fb_save = malloc(mode.y * mode.bytes_per_row); - if (fb_save) - memcpy(fb_save, the_buffer, mode.y * mode.bytes_per_row); - - // Close full screen display -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - restore_mouse_accel(); - XUnmapWindow(x_display, w); - wait_unmapped(w); - - // Open "suspend" window - XSetWindowAttributes wattr; - wattr.event_mask = KeyPressMask; - wattr.background_pixel = black_pixel; - - suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel, &wattr); - set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE); - set_window_focus(suspend_win); - XMapWindow(x_display, suspend_win); - emul_suspended = true; -} - -// Resume emulation -void driver_dga::resume(void) -{ - // Close "suspend" window - XDestroyWindow(x_display, suspend_win); - XSync(x_display, false); - - // Reopen full screen display - XMapRaised(x_display, w); - wait_mapped(w); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - disable_mouse_accel(); -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); -#endif - XSync(x_display, false); - - // the_buffer already contains the data to restore. i.e. since a temporary - // frame buffer is used when VOSF is actually used, fb_save is therefore - // not necessary. -#ifdef ENABLE_VOSF - if (use_vosf) { - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } -#endif - - // Restore frame buffer - if (fb_save) { -#ifdef ENABLE_VOSF - // Don't copy fb_save to the temporary frame buffer in VOSF mode - if (!use_vosf) -#endif - memcpy(the_buffer, fb_save, mode.y * mode.bytes_per_row); - free(fb_save); - fb_save = NULL; - } - - // Unlock frame buffer (and continue MacOS thread) - UNLOCK_FRAME_BUFFER; - emul_suspended = false; -} -#endif - - -#ifdef ENABLE_FBDEV_DGA -/* - * fbdev DGA display driver - */ - -const char FBDEVICES_FILE_NAME[] = DATADIR "/fbdevices"; -const char FBDEVICE_FILE_NAME[] = "/dev/fb"; - -class driver_fbdev : public driver_dga { -public: - driver_fbdev(X11_monitor_desc &monitor); - ~driver_fbdev(); -}; - -// Open display -driver_fbdev::driver_fbdev(X11_monitor_desc &m) : driver_dga(m) -{ - int width = mode.x, height = mode.y; - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Find the maximum depth available - int ndepths, max_depth(0); - int *depths = XListDepths(x_display, screen, &ndepths); - if (depths == NULL) { - printf("FATAL: Could not determine the maximal depth available\n"); - return; - } else { - while (ndepths-- > 0) { - if (depths[ndepths] > max_depth) - max_depth = depths[ndepths]; - } - } - - // Get fbdevices file path from preferences - const char *fbd_path = PrefsFindString("fbdevicefile"); - - // Open fbdevices file - FILE *fp = fopen(fbd_path ? fbd_path : FBDEVICES_FILE_NAME, "r"); - if (fp == NULL) { - char str[256]; - sprintf(str, GetString(STR_NO_FBDEVICE_FILE_ERR), fbd_path ? fbd_path : FBDEVICES_FILE_NAME, strerror(errno)); - ErrorAlert(str); - return; - } - - int fb_depth; // supported depth - uint32 fb_offset; // offset used for mmap(2) - char fb_name[20]; - char line[256]; - bool device_found = false; - while (fgets(line, 255, fp)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len - 1] = '\0'; - - // Comments begin with "#" or ";" - if ((line[0] == '#') || (line[0] == ';') || (line[0] == '\0')) - continue; - - if ((sscanf(line, "%19s %d %x", fb_name, &fb_depth, &fb_offset) == 3) - && (strcmp(fb_name, fb_name) == 0) && (fb_depth == max_depth)) { - device_found = true; - break; - } - } - - // fbdevices file completely read - fclose(fp); - - // Frame buffer name not found ? Then, display warning - if (!device_found) { - char str[256]; - sprintf(str, GetString(STR_FBDEV_NAME_ERR), fb_name, max_depth); - ErrorAlert(str); - return; - } - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.background_pixel = white_pixel; - wattr.override_redirect = True; - wattr.colormap = cmap[0]; - - w = XCreateWindow(x_display, rootwin, - 0, 0, width, height, - 0, xdepth, InputOutput, vis, - CWEventMask | CWBackPixel | CWOverrideRedirect | (fb_depth <= 8 ? CWColormap : 0), - &wattr); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Show window - XMapRaised(x_display, w); - wait_mapped(w); - - // Grab mouse and keyboard - XGrabKeyboard(x_display, w, True, - GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, w, True, - PointerMotionMask | ButtonPressMask | ButtonReleaseMask, - GrabModeAsync, GrabModeAsync, w, None, CurrentTime); - disable_mouse_accel(); - - // Calculate bytes per row - int bytes_per_row = TrivialBytesPerRow(mode.x, mode.depth); - - // Map frame buffer - the_buffer_size = height * bytes_per_row; - if ((the_buffer = (uint8 *) mmap(NULL, the_buffer_size, PROT_READ | PROT_WRITE, MAP_PRIVATE, fbdev_fd, fb_offset)) == MAP_FAILED) { - if ((the_buffer = (uint8 *) mmap(NULL, the_buffer_size, PROT_READ | PROT_WRITE, MAP_SHARED, fbdev_fd, fb_offset)) == MAP_FAILED) { - char str[256]; - sprintf(str, GetString(STR_FBDEV_MMAP_ERR), strerror(errno)); - ErrorAlert(str); - return; - } - } - -#if ENABLE_VOSF -#if DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, true, mode.depth); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - - // Fake image for DGA/VOSF mode to know about display bounds - img = new FakeXImage(width, height, depth_of_video_mode(mode)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - const_cast(&mode)->bytes_per_row = bytes_per_row; - const_cast(&mode)->depth = DepthModeForPixelDepth(fb_depth); - set_mac_frame_buffer(monitor, mode.depth, true); - - // Everything went well - init_ok = true; -} - -// Close display -driver_fbdev::~driver_fbdev() -{ - if (!use_vosf) { - if (the_buffer != MAP_FAILED) { - // don't free() the screen buffer in driver_base dtor - munmap(the_buffer, the_buffer_size); - the_buffer = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_host_buffer != MAP_FAILED) { - // don't free() the screen buffer in driver_base dtor - munmap(the_host_buffer, the_buffer_size); - the_host_buffer = NULL; - } - } -#endif -} -#endif - - -#ifdef ENABLE_XF86_DGA -/* - * XFree86 DGA display driver - */ - -class driver_xf86dga : public driver_dga { -public: - driver_xf86dga(X11_monitor_desc &monitor); - ~driver_xf86dga(); - - void update_palette(void); - void resume(void); - -private: - int current_dga_cmap; // Number (0 or 1) of currently installed DGA colormap -}; - -// Open display -driver_xf86dga::driver_xf86dga(X11_monitor_desc &m) - : driver_dga(m), current_dga_cmap(0) -{ - int width = mode.x, height = mode.y; - - // Set relative mouse mode - ADBSetRelMouseMode(true); - -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = 0; - for (int i=1; ihdisplay >= width && x_video_modes[i]->vdisplay >= height && - x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) { - best = i; - } - } - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - XSync(x_display, false); - } -#endif - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - wattr.colormap = (mode.depth == VDEPTH_1BIT ? DefaultColormap(x_display, screen) : cmap[0]); - - w = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWOverrideRedirect | - (color_class == DirectColor ? CWColormap : 0), &wattr); - - // Set window name/class - set_window_name(w, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(w); - - // Show window - XMapRaised(x_display, w); - wait_mapped(w); - - // Establish direct screen connection - XMoveResizeWindow(x_display, w, 0, 0, width, height); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - disable_mouse_accel(); - - int v_width, v_bank, v_size; - XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size); - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - XF86DGASetVidPage(x_display, screen, 0); - - // Set colormap - if (!IsDirectMode(mode)) { - XSetWindowColormap(x_display, w, cmap[current_dga_cmap = 0]); - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } - XSync(x_display, false); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, mode.depth); -#if ENABLE_VOSF -#if DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, x_native_byte_order, depth_of_video_mode(mode)); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - - // Fake image for DGA/VOSF mode to know about display bounds - img = new FakeXImage((v_width + 7) & ~7, height, depth_of_video_mode(mode)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - const_cast(&mode)->bytes_per_row = bytes_per_row; - set_mac_frame_buffer(monitor, mode.depth, true); - - // Everything went well - init_ok = true; -} - -// Close display -driver_xf86dga::~driver_xf86dga() -{ - XF86DGADirectVideo(x_display, screen, 0); - if (!use_vosf) { - // don't free() the screen buffer in driver_base dtor - the_buffer = NULL; - } -#ifdef ENABLE_VOSF - else { - // don't free() the screen buffer in driver_base dtor - the_host_buffer = NULL; - } -#endif -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]); -#endif -} - -// Palette has changed -void driver_xf86dga::update_palette(void) -{ - driver_dga::update_palette(); - current_dga_cmap ^= 1; - if (!IsDirectMode(monitor.get_current_mode()) && cmap[current_dga_cmap]) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); -} - -// Resume emulation -void driver_xf86dga::resume(void) -{ - driver_dga::resume(); - if (!IsDirectMode(monitor.get_current_mode())) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); -} -#endif - - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - const char *vendor = ServerVendor(x_display); - // Force use of MacX mappings on MacOS X with Apple's X server - int dummy; - if (XQueryExtension(x_display, "Apple-DRI", &dummy, &dummy, &dummy)) - vendor = "MacX"; - bool vendor_found = false; - char line[256]; - while (fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (vendor_found) { - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code; - else - break; - } else { - // Search for vendor string - if (strstr(vendor, line) == vendor) - vendor_found = true; - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = vendor_found; - - // Vendor not found? Then display warning - if (!vendor_found) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - } -} - -// Open display for current mode -bool X11_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); - const video_mode &mode = get_current_mode(); - - // Find best available X visual - if (!find_visual_for_depth(mode.depth)) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Determine the byte order of an XImage content -#ifdef WORDS_BIGENDIAN - x_native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - x_native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif - - // Build up visualFormat structure - visualFormat.fullscreen = (display_type == DISPLAY_DGA); - visualFormat.depth = visualInfo.depth; - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - - // Create color maps - if (color_class == PseudoColor || color_class == DirectColor) { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll); - } else { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocNone); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocNone); - } - - // Find pixel format of direct modes - if (color_class == DirectColor || color_class == TrueColor) { - rshift = gshift = bshift = 0; - rloss = gloss = bloss = 8; - uint32 mask; - for (mask=vis->red_mask; !(mask&1); mask>>=1) - ++rshift; - for (; mask&1; mask>>=1) - --rloss; - for (mask=vis->green_mask; !(mask&1); mask>>=1) - ++gshift; - for (; mask&1; mask>>=1) - --gloss; - for (mask=vis->blue_mask; !(mask&1); mask>>=1) - ++bshift; - for (; mask&1; mask>>=1) - --bloss; - } - - // Preset palette pixel values for CLUT or gamma table - if (color_class == DirectColor) { - int num = vis->map_entries; - for (int i=0; imap_entries : 256); - for (int i=0; i16/32 expand map - if (!IsDirectMode(mode) && xdepth > 8) - for (int i=0; i<256; i++) - ExpandMap[i] = map_rgb(i, i, i, true); -#endif - - // Create display driver object of requested type - switch (display_type) { - case DISPLAY_WINDOW: - drv = new driver_window(*this); - break; -#ifdef ENABLE_FBDEV_DGA - case DISPLAY_DGA: - drv = new driver_fbdev(*this); - break; -#endif -#ifdef ENABLE_XF86_DGA - case DISPLAY_DGA: - drv = new driver_xf86dga(*this); - break; -#endif - } - if (drv == NULL) - return false; - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Initialize the VOSF system - if (!video_vosf_init(*this)) { - ErrorAlert(STR_VOSF_INIT_ERR); - return false; - } - } -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - XSync(x_display, false); - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifdef USE_PTHREADS_SERVICES - redraw_thread_cancel = false; - Set_pthread_attr(&redraw_thread_attr, 0); - redraw_thread_active = (pthread_create(&redraw_thread, &redraw_thread_attr, redraw_func, NULL) == 0); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - - return true; -} - -bool VideoInit(bool classic) -{ - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Check if X server runs on local machine - local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "/", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0); - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Find screen and root window - screen = XDefaultScreen(x_display); - rootwin = XRootWindow(x_display, screen); - - // Get sorted list of available depths - avail_depths = XListDepths(x_display, screen, &num_depths); - if (avail_depths == NULL) { - ErrorAlert(STR_UNSUPP_DEPTH_ERR); - return false; - } - std::sort(avail_depths, avail_depths + num_depths); - -#ifdef ENABLE_FBDEV_DGA - // Frame buffer name - char fb_name[20]; - - // Could do fbdev DGA? - if ((fbdev_fd = open(FBDEVICE_FILE_NAME, O_RDWR)) != -1) - has_dga = true; - else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_DGA - // DGA available? - int dga_event_base, dga_error_base; - if (local_X11 && XF86DGAQueryExtension(x_display, &dga_event_base, &dga_error_base)) { - int dga_flags = 0; - XF86DGAQueryDirectVideo(x_display, screen, &dga_flags); - has_dga = dga_flags & XF86DGADirectPresent; - } else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_VIDMODE - // VidMode available? - int vm_event_base, vm_error_base; - has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base); - if (has_vidmode) - XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes); -#endif - - // Find black and white colors - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black); - XAllocColor(x_display, DefaultColormap(x_display, screen), &black); - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white); - XAllocColor(x_display, DefaultColormap(x_display, screen), &white); - black_pixel = BlackPixel(x_display, screen); - white_pixel = WhitePixel(x_display, screen); - - // Get screen mode from preferences - const char *mode_str; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width = 512, default_height = 384; - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) { - display_type = DISPLAY_WINDOW; -#ifdef ENABLE_FBDEV_DGA - } else if (has_dga && sscanf(mode_str, "dga/%19s", fb_name) == 1) { - display_type = DISPLAY_DGA; - default_width = -1; default_height = -1; // use entire screen -#endif -#ifdef ENABLE_XF86_DGA - } else if (has_dga && sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) { - display_type = DISPLAY_DGA; -#endif - } - } - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); - - // Mac screen depth follows X depth - video_depth default_depth = VDEPTH_1BIT; - switch (DefaultDepth(x_display, screen)) { - case 8: - default_depth = VDEPTH_8BIT; - break; - case 15: case 16: - default_depth = VDEPTH_16BIT; - break; - case 24: case 32: - default_depth = VDEPTH_32BIT; - break; - } - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(512, 342, 0x80, 64, VDEPTH_1BIT); - else { - for (unsigned d=VDEPTH_1BIT; d<=VDEPTH_32BIT; d++) { - if (find_visual_for_depth(video_depth(d))) - add_window_modes(video_depth(d)); - } - } - } else - add_mode(default_width, default_height, 0x80, TrivialBytesPerRow(default_width, default_depth), default_depth); - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - if (i->x == default_width && i->y == default_height && i->depth == default_depth) { - default_id = i->resolution_id; - break; - } - } - if (i == end) { // not found, use first available mode - default_depth = VideoModes[0].depth; - default_id = VideoModes[0].resolution_id; - } - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - int bits = 1 << i->depth; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", i->x, i->y, i->resolution_id, 1 << bits)); - } -#endif - - // Create X11_monitor_desc for this (the only) display - X11_monitor_desc *monitor = new X11_monitor_desc(VideoModes, default_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void X11_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - - // Stop redraw thread -#ifdef USE_PTHREADS_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - redraw_thread_cancel_ack = false; - pthread_join(redraw_thread, NULL); - while (!redraw_thread_cancel_ack) ; - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - XSync(x_display, false); - D(bug(" frame buffer unlocked\n")); - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Close display - delete drv; - drv = NULL; - - // Free colormaps - if (cmap[0]) { - XFreeColormap(x_display, cmap[0]); - cmap[0] = 0; - } - if (cmap[1]) { - XFreeColormap(x_display, cmap[1]); - cmap[1] = 0; - } -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - -#ifdef ENABLE_XF86_VIDMODE - // Free video mode list - if (x_video_modes) { - XFree(x_video_modes); - x_video_modes = NULL; - } -#endif - -#ifdef ENABLE_FBDEV_DGA - // Close framebuffer device - if (fbdev_fd >= 0) { - close(fbdev_fd); - fbdev_fd = -1; - } -#endif - - // Free depth list - if (avail_depths) { - XFree(avail_depths); - avail_depths = NULL; - } -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - - -/* - * Mac VBL interrupt - */ - -void VideoInterrupt(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} - - -/* - * Set palette - */ - -void X11_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - const video_mode &mode = get_current_mode(); - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - if (IsDirectMode(mode)) { - // If X is in 565 mode we have to stretch the gamma table from 32 to 64 entries - num_out = vis->map_entries; - stretch = true; - } - XColor *p = x_palette; - for (int i=0; ired = pal[c*3 + 0] * 0x0101; - p->green = pal[c*3 + 1] * 0x0101; - p->blue = pal[c*3 + 2] * 0x0101; - p++; - } - -#ifdef ENABLE_VOSF - // Recalculate pixel color expansion map - if (!IsDirectMode(mode) && xdepth > 8) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = map_rgb(pal[c*3+0], pal[c*3+1], pal[c*3+2], true); - } - - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } -#endif - - // Tell redraw thread to change palette - x_palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Switch video mode - */ - -void X11_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - video_close(); - video_open(); - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey - */ - -static int kc_decode(KeySym ks, bool key_down) -{ - switch (ks) { - case XK_A: case XK_a: return 0x00; - case XK_B: case XK_b: return 0x0b; - case XK_C: case XK_c: return 0x08; - case XK_D: case XK_d: return 0x02; - case XK_E: case XK_e: return 0x0e; - case XK_F: case XK_f: return 0x03; - case XK_G: case XK_g: return 0x05; - case XK_H: case XK_h: return 0x04; - case XK_I: case XK_i: return 0x22; - case XK_J: case XK_j: return 0x26; - case XK_K: case XK_k: return 0x28; - case XK_L: case XK_l: return 0x25; - case XK_M: case XK_m: return 0x2e; - case XK_N: case XK_n: return 0x2d; - case XK_O: case XK_o: return 0x1f; - case XK_P: case XK_p: return 0x23; - case XK_Q: case XK_q: return 0x0c; - case XK_R: case XK_r: return 0x0f; - case XK_S: case XK_s: return 0x01; - case XK_T: case XK_t: return 0x11; - case XK_U: case XK_u: return 0x20; - case XK_V: case XK_v: return 0x09; - case XK_W: case XK_w: return 0x0d; - case XK_X: case XK_x: return 0x07; - case XK_Y: case XK_y: return 0x10; - case XK_Z: case XK_z: return 0x06; - - case XK_1: case XK_exclam: return 0x12; - case XK_2: case XK_at: return 0x13; - case XK_3: case XK_numbersign: return 0x14; - case XK_4: case XK_dollar: return 0x15; - case XK_5: case XK_percent: return 0x17; - case XK_6: return 0x16; - case XK_7: return 0x1a; - case XK_8: return 0x1c; - case XK_9: return 0x19; - case XK_0: return 0x1d; - - case XK_grave: case XK_asciitilde: return 0x0a; - case XK_minus: case XK_underscore: return 0x1b; - case XK_equal: case XK_plus: return 0x18; - case XK_bracketleft: case XK_braceleft: return 0x21; - case XK_bracketright: case XK_braceright: return 0x1e; - case XK_backslash: case XK_bar: return 0x2a; - case XK_semicolon: case XK_colon: return 0x29; - case XK_apostrophe: case XK_quotedbl: return 0x27; - case XK_comma: case XK_less: return 0x2b; - case XK_period: case XK_greater: return 0x2f; - case XK_slash: case XK_question: return 0x2c; - - case XK_Tab: if (ctrl_down) {if (key_down) drv->suspend(); return -2;} else return 0x30; - case XK_Return: return 0x24; - case XK_space: return 0x31; - case XK_BackSpace: return 0x33; - - case XK_Delete: return 0x75; - case XK_Insert: return 0x72; - case XK_Home: case XK_Help: return 0x73; - case XK_End: return 0x77; -#ifdef __hpux - case XK_Prior: return 0x74; - case XK_Next: return 0x79; -#else - case XK_Page_Up: return 0x74; - case XK_Page_Down: return 0x79; -#endif - - case XK_Control_L: return 0x36; - case XK_Control_R: return 0x36; - case XK_Shift_L: return 0x38; - case XK_Shift_R: return 0x38; - case XK_Alt_L: return 0x37; - case XK_Alt_R: return 0x37; - case XK_Meta_L: return 0x3a; - case XK_Meta_R: return 0x3a; - case XK_Menu: return 0x32; - case XK_Caps_Lock: return 0x39; - case XK_Num_Lock: return 0x47; - - case XK_Up: return 0x3e; - case XK_Down: return 0x3d; - case XK_Left: return 0x3b; - case XK_Right: return 0x3c; - - case XK_Escape: if (ctrl_down) {if (key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - - case XK_F1: if (ctrl_down) {if (key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; - case XK_F2: return 0x78; - case XK_F3: return 0x63; - case XK_F4: return 0x76; - case XK_F5: if (ctrl_down) {if (key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; - case XK_F6: return 0x61; - case XK_F7: return 0x62; - case XK_F8: return 0x64; - case XK_F9: return 0x65; - case XK_F10: return 0x6d; - case XK_F11: return 0x67; - case XK_F12: return 0x6f; - - case XK_Print: return 0x69; - case XK_Scroll_Lock: return 0x6b; - case XK_Pause: return 0x71; - -#if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End) - case XK_KP_0: case XK_KP_Insert: return 0x52; - case XK_KP_1: case XK_KP_End: return 0x53; - case XK_KP_2: case XK_KP_Down: return 0x54; - case XK_KP_3: case XK_KP_Next: return 0x55; - case XK_KP_4: case XK_KP_Left: return 0x56; - case XK_KP_5: case XK_KP_Begin: return 0x57; - case XK_KP_6: case XK_KP_Right: return 0x58; - case XK_KP_7: case XK_KP_Home: return 0x59; - case XK_KP_8: case XK_KP_Up: return 0x5b; - case XK_KP_9: case XK_KP_Prior: return 0x5c; - case XK_KP_Decimal: case XK_KP_Delete: return 0x41; -#else - case XK_KP_0: return 0x52; - case XK_KP_1: return 0x53; - case XK_KP_2: return 0x54; - case XK_KP_3: return 0x55; - case XK_KP_4: return 0x56; - case XK_KP_5: return 0x57; - case XK_KP_6: return 0x58; - case XK_KP_7: return 0x59; - case XK_KP_8: return 0x5b; - case XK_KP_9: return 0x5c; - case XK_KP_Decimal: return 0x41; -#endif - case XK_KP_Add: return 0x45; - case XK_KP_Subtract: return 0x4e; - case XK_KP_Multiply: return 0x43; - case XK_KP_Divide: return 0x4b; - case XK_KP_Enter: return 0x4c; - case XK_KP_Equal: return 0x51; - } - return -1; -} - -static int event2keycode(XKeyEvent &ev, bool key_down) -{ - KeySym ks; - int i = 0; - - do { - ks = XLookupKeysym(&ev, i++); - int as = kc_decode(ks, key_down); - if (as >= 0) - return as; - if (as == -2) - return as; - } while (ks != NoSymbol); - - return -1; -} - - -/* - * X event handling - */ - -static void handle_events(void) -{ - for (;;) { - XEvent event; - XDisplayLock(); - - if (!XCheckMaskEvent(x_display, eventmask, &event)) { - // Handle clipboard events - if (XCheckTypedEvent(x_display, SelectionRequest, &event)) - ClipboardSelectionRequest(&event.xselectionrequest); - else if (XCheckTypedEvent(x_display, SelectionClear, &event)) - ClipboardSelectionClear(&event.xselectionclear); - - // Window "close" widget clicked - else if (XCheckTypedEvent(x_display, ClientMessage, &event)) { - if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) { - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - } - } - XDisplayUnlock(); - break; - } - - switch (event.type) { - - // Mouse button - case ButtonPress: { - unsigned int button = event.xbutton.button; - if (button < 4) - ADBMouseDown(button - 1); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.xmotion.x, event.xmotion.y); - break; - - // Mouse entered window - case EnterNotify: - if (event.xcrossing.mode != NotifyGrab && event.xcrossing.mode != NotifyUngrab) - drv->mouse_moved(event.xmotion.x, event.xmotion.y); - break; - - // Keyboard - case KeyPress: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case KeyRelease: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, false); - if (code >= 0 && code != 0x39) { // Don't propagate Caps Lock releases - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh of window - case Expose: - if (display_type == DISPLAY_WINDOW) { - const video_mode &mode = VideoMonitors[0]->get_current_mode(); -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } - else -#endif - if (frame_skip == 0) { // Dynamic refresh - int x1, y1; - for (y1=0; y1<16; y1++) - for (x1=0; x1<16; x1++) - updt_box[x1][y1] = true; - nr_boxes = 16 * 16; - } else // Static refresh - memset(the_buffer_copy, 0, mode.bytes_per_row * mode.y); - } - break; - } - - XDisplayUnlock(); - } -} - - -/* - * Window display update - */ - -// Dynamic display update (variable frame rate for each box) -static void update_display_dynamic(int ticker, driver_window *drv) -{ - int y1, y2, y2s, y2a, i, x1, xm, xmo, ymo, yo, yi, yil, xi; - int xil = 0; - int rxm = 0, rxmo = 0; - const video_mode &mode = drv->monitor.get_current_mode(); - int bytes_per_row = mode.bytes_per_row; - int bytes_per_pixel = mode.bytes_per_row / mode.x; - int rx = mode.bytes_per_row / 16; - int ry = mode.y / 16; - int max_box; - - y2s = sm_uptd[ticker % 8]; - y2a = 8; - for (i = 0; i < 6; i++) { - if (ticker % (2 << i)) - break; - } - max_box = sm_no_boxes[i]; - - if (y2a) { - for (y1=0; y1<16; y1++) { - for (y2=y2s; y2 < ry; y2 += y2a) { - i = ((y1 * ry) + y2) * bytes_per_row; - for (x1=0; x1<16; x1++, i += rx) { - if (updt_box[x1][y1] == false) { - if (memcmp(&the_buffer_copy[i], &the_buffer[i], rx)) { - updt_box[x1][y1] = true; - nr_boxes++; - } - } - } - } - } - } - - XDisplayLock(); - if ((nr_boxes <= max_box) && (nr_boxes)) { - for (y1=0; y1<16; y1++) { - for (x1=0; x1<16; x1++) { - if (updt_box[x1][y1] == true) { - if (rxm == 0) - xm = x1; - rxm += rx; - updt_box[x1][y1] = false; - } - if (((updt_box[x1+1][y1] == false) || (x1 == 15)) && (rxm)) { - if ((rxmo != rxm) || (xmo != xm) || (yo != y1 - 1)) { - if (rxmo) { - xi = xmo * rx; - yi = ymo * ry; - xil = rxmo; - yil = (yo - ymo +1) * ry; - } - rxmo = rxm; - xmo = xm; - ymo = y1; - } - rxm = 0; - yo = y1; - } - if (xil) { - i = (yi * bytes_per_row) + xi; - for (y2=0; y2 < yil; y2++, i += bytes_per_row) - memcpy(&the_buffer_copy[i], &the_buffer[i], xil); - if (mode.depth == VDEPTH_1BIT) { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, xi * 8, yi, xi * 8, yi, xil * 8, yil, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, xi * 8, yi, xi * 8, yi, xil * 8, yil); - } else { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, xi / bytes_per_pixel, yi, xi / bytes_per_pixel, yi, xil / bytes_per_pixel, yil); - } - xil = 0; - } - if ((x1 == 15) && (y1 == 15) && (rxmo)) { - x1--; - xi = xmo * rx; - yi = ymo * ry; - xil = rxmo; - yil = (yo - ymo +1) * ry; - rxmo = 0; - } - } - } - nr_boxes = 0; - } - XDisplayUnlock(); -} - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_window *drv) -{ - // Incremental update code - unsigned wide = 0, high = 0, x1, x2, y1, y2, i, j; - const video_mode &mode = drv->monitor.get_current_mode(); - int bytes_per_row = mode.bytes_per_row; - int bytes_per_pixel = mode.bytes_per_row / mode.x; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (j=0; j=y1; j--) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (mode.depth == VDEPTH_1BIT) { - x1 = mode.x - 1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; i<(x1>>3); i++) { - if (*p != *p2) { - x1 = i << 3; - break; - } - p++; p2++; - } - } - x2 = x1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (i=(mode.x>>3); i>(x2>>3); i--) { - p--; p2--; - if (*p != *p2) { - x2 = (i << 3) + 7; - break; - } - } - } - wide = x2 - x1 + 1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + (x1 >> 3); - memcpy(the_buffer_copy + i, the_buffer + i, wide >> 3); - } - } - - } else { - x1 = mode.x; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; ix2*bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - } - } - } - } - - // Refresh display - XDisplayLock(); - if (high && wide) { - if (drv->have_shm) - XShmPutImage(x_display, drv->w, drv->gc, drv->img, x1, y1, x1, y1, wide, high, 0); - else - XPutImage(x_display, drv->w, drv->gc, drv->img, x1, y1, x1, y1, wide, high); - } - XDisplayUnlock(); -} - - -/* - * Screen refresh functions - */ - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (x_palette_changed) { - x_palette_changed = false; - XDisplayLock(); - drv->update_palette(); - XDisplayUnlock(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); -} - -#ifdef ENABLE_VOSF -#if DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(static_cast(drv)); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - XDisplayLock(); - LOCK_VOSF; - update_display_window_vosf(static_cast(drv)); - UNLOCK_VOSF; - XSync(x_display, false); // Let the server catch up - XDisplayUnlock(); - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static int tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - update_display_static(static_cast(drv)); - } -} - -static void video_refresh_window_dynamic(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (dynamic variant) - static int tick_counter = 0; - tick_counter++; - update_display_dynamic(tick_counter, static_cast(drv)); -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_DGA) { -#if ENABLE_VOSF && DIRECT_ADDRESSING - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - if (frame_skip == 0) - video_refresh = video_refresh_window_dynamic; - else - video_refresh = video_refresh_window_static; - } -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Handle X events - handle_events(); - - // Handle palette changes - handle_palette_changes(); - - // Update display - video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifdef USE_PTHREADS_SERVICES -static void *redraw_func(void *arg) -{ - int fd = ConnectionNumber(x_display); - - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - int64 delay = next - GetTicks_usec(); - if (delay < -VIDEO_REFRESH_DELAY) { - - // We are lagging far behind, so we reset the delay mechanism - next = GetTicks_usec(); - - } else if (delay <= 0) { - - // Delay expired, refresh display - handle_events(); - handle_palette_changes(); - video_refresh(); - next += VIDEO_REFRESH_DELAY; - ticks++; - - } else { - - // No display refresh pending, check for X events - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 0; - timeout.tv_usec = delay; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) - handle_events(); - } - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - - redraw_thread_cancel_ack = true; - return NULL; -} -#endif From c756b743d58fadd489576600c8a530df4c285ad2 Mon Sep 17 00:00:00 2001 From: Seg Date: Mon, 14 Jun 2021 13:26:23 -0700 Subject: [PATCH 521/534] Fork SheepShaver vm_alloc/SDL --- SheepShaver/Makefile | 11 +- SheepShaver/src/CrossPlatform/video_vosf.h | 687 ++++- SheepShaver/src/CrossPlatform/vm_alloc.cpp | 620 ++++- SheepShaver/src/CrossPlatform/vm_alloc.h | 139 +- SheepShaver/src/SDL | 1 - SheepShaver/src/SDL/video_sdl.cpp | 2340 ++++++++++++++++ SheepShaver/src/SDL/video_sdl2.cpp | 2869 ++++++++++++++++++++ 7 files changed, 6658 insertions(+), 9 deletions(-) mode change 120000 => 100644 SheepShaver/src/CrossPlatform/video_vosf.h mode change 120000 => 100644 SheepShaver/src/CrossPlatform/vm_alloc.cpp mode change 120000 => 100644 SheepShaver/src/CrossPlatform/vm_alloc.h delete mode 120000 SheepShaver/src/SDL create mode 100644 SheepShaver/src/SDL/video_sdl.cpp create mode 100644 SheepShaver/src/SDL/video_sdl2.cpp diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index eaf2cab19..e5a036de3 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -59,22 +59,23 @@ links: include/prefs.h include/scsi.h include/serial.h \ include/serial_defs.h include/sony.h include/sys.h \ include/timer.h include/xpram.h \ - CrossPlatform/sigsegv.h CrossPlatform/vm_alloc.h CrossPlatform/vm_alloc.cpp \ - CrossPlatform/video_vosf.h CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ - Unix/audio_oss_esd.cpp \ + CrossPlatform/sigsegv.h \ + CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ + SDL/SDLMain.h SDL/SDLMain.m SDL/audio_sdl.cpp SDL/keycodes \ + SDL/prefs_sdl.cpp SDL/xpram_sdl.cpp \ Unix/vhd_unix.cpp \ Unix/extfs_unix.cpp Unix/serial_unix.cpp \ Unix/sshpty.h Unix/sshpty.c Unix/strlcpy.h Unix/strlcpy.c \ Unix/sys_unix.cpp Unix/timer_unix.cpp Unix/xpram_unix.cpp \ Unix/semaphore.h Unix/posix_sem.cpp Unix/config.sub Unix/config.guess Unix/m4 \ - Unix/keycodes Unix/tunconfig Unix/clip_unix.cpp Unix/Irix/audio_irix.cpp \ + Unix/keycodes Unix/tunconfig Unix/clip_unix.cpp \ Unix/Linux/scsi_linux.cpp Unix/Linux/NetDriver Unix/ether_unix.cpp \ Unix/rpc.h Unix/rpc_unix.cpp Unix/ldscripts \ Unix/tinyxml2.h Unix/tinyxml2.cpp Unix/disk_unix.h \ Unix/disk_sparsebundle.cpp Unix/Darwin/mkstandalone \ Unix/Darwin/pagezero.c Unix/Darwin/testlmem.sh \ dummy/audio_dummy.cpp dummy/clip_dummy.cpp dummy/serial_dummy.cpp \ - dummy/prefs_editor_dummy.cpp dummy/scsi_dummy.cpp SDL slirp \ + dummy/prefs_editor_dummy.cpp dummy/scsi_dummy.cpp slirp \ MacOSX/sys_darwin.cpp MacOSX/clip_macosx.cpp MacOSX/clip_macosx64.mm \ MacOSX/macos_util_macosx.h Unix/cpr.sh \ MacOSX/extfs_macosx.cpp Windows/clip_windows.cpp \ diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h deleted file mode 120000 index 4c552311a..000000000 --- a/SheepShaver/src/CrossPlatform/video_vosf.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/video_vosf.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h new file mode 100644 index 000000000..f1d2f3add --- /dev/null +++ b/SheepShaver/src/CrossPlatform/video_vosf.h @@ -0,0 +1,686 @@ +/* + * video_vosf.h - Video/graphics emulation, video on SEGV signals support + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 VIDEO_VOSF_H +#define VIDEO_VOSF_H + +// Note: this file must be #include'd only in video_x.cpp +#ifdef ENABLE_VOSF + +#include "sigsegv.h" +#include "vm_alloc.h" +#ifdef _WIN32 +#include "util_windows.h" +#endif + +// Import SDL-backend-specific functions +#ifdef USE_SDL_VIDEO +extern void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h); +extern void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects); +#endif + +// Glue for SDL and X11 support +#ifdef TEST_VOSF_PERFORMANCE +#define MONITOR_INIT /* nothing */ +#else +#ifdef USE_SDL_VIDEO +#define MONITOR_INIT SDL_monitor_desc &monitor +#define VIDEO_DRV_WIN_INIT driver_base *drv +#define VIDEO_DRV_DGA_INIT driver_base *drv +#define VIDEO_DRV_LOCK_PIXELS SDL_VIDEO_LOCK_SURFACE(drv->s) +#define VIDEO_DRV_UNLOCK_PIXELS SDL_VIDEO_UNLOCK_SURFACE(drv->s) +#define VIDEO_DRV_DEPTH drv->s->format->BitsPerPixel +#define VIDEO_DRV_WIDTH drv->s->w +#define VIDEO_DRV_HEIGHT drv->s->h +#define VIDEO_DRV_ROW_BYTES drv->s->pitch +#else +#ifdef SHEEPSHAVER +#define MONITOR_INIT /* nothing */ +#define VIDEO_DRV_WIN_INIT /* nothing */ +#define VIDEO_DRV_DGA_INIT /* nothing */ +#define VIDEO_DRV_WINDOW the_win +#define VIDEO_DRV_GC the_gc +#define VIDEO_DRV_IMAGE img +#define VIDEO_DRV_HAVE_SHM have_shm +#else +#define MONITOR_INIT X11_monitor_desc &monitor +#define VIDEO_DRV_WIN_INIT driver_window *drv +#define VIDEO_DRV_DGA_INIT driver_dga *drv +#define VIDEO_DRV_WINDOW drv->w +#define VIDEO_DRV_GC drv->gc +#define VIDEO_DRV_IMAGE drv->img +#define VIDEO_DRV_HAVE_SHM drv->have_shm +#endif +#define VIDEO_DRV_LOCK_PIXELS /* nothing */ +#define VIDEO_DRV_UNLOCK_PIXELS /* nothing */ +#define VIDEO_DRV_DEPTH VIDEO_DRV_IMAGE->depth +#define VIDEO_DRV_WIDTH VIDEO_DRV_IMAGE->width +#define VIDEO_DRV_HEIGHT VIDEO_DRV_IMAGE->height +#define VIDEO_DRV_ROW_BYTES VIDEO_DRV_IMAGE->bytes_per_line +#endif +#endif + +// Prototypes +static void vosf_do_set_dirty_area(uintptr first, uintptr last); +static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row); + +// Variables for Video on SEGV support +static uint8 *the_host_buffer; // Host frame buffer in VOSF mode + +struct ScreenPageInfo { + unsigned top, bottom; // Mapping between this virtual page and Mac scanlines +}; + +struct ScreenInfo { + uintptr memStart; // Start address aligned to page boundary + uint32 memLength; // Length of the memory addressed by the screen pages + + uintptr pageSize; // Size of a page + int pageBits; // Shift count to get the page number + uint32 pageCount; // Number of pages allocated to the screen + + bool dirty; // Flag: set if the frame buffer was touched + bool very_dirty; // Flag: set if the frame buffer was completely modified (e.g. colormap changes) + char * dirtyPages; // Table of flags set if page was altered + ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines +}; + +static ScreenInfo mainBuffer; + +#define PFLAG_SET_VALUE 0x00 +#define PFLAG_CLEAR_VALUE 0x01 +#define PFLAG_SET_VALUE_4 0x00000000 +#define PFLAG_CLEAR_VALUE_4 0x01010101 +#define PFLAG_SET(page) mainBuffer.dirtyPages[page] = PFLAG_SET_VALUE +#define PFLAG_CLEAR(page) mainBuffer.dirtyPages[page] = PFLAG_CLEAR_VALUE +#define PFLAG_ISSET(page) (mainBuffer.dirtyPages[page] == PFLAG_SET_VALUE) +#define PFLAG_ISCLEAR(page) (mainBuffer.dirtyPages[page] != PFLAG_SET_VALUE) + +#ifdef UNALIGNED_PROFITABLE +# define PFLAG_ISSET_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_SET_VALUE_4) +# define PFLAG_ISCLEAR_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_CLEAR_VALUE_4) +#else +# define PFLAG_ISSET_4(page) \ + PFLAG_ISSET(page ) && PFLAG_ISSET(page+1) \ + && PFLAG_ISSET(page+2) && PFLAG_ISSET(page+3) +# define PFLAG_ISCLEAR_4(page) \ + PFLAG_ISCLEAR(page ) && PFLAG_ISCLEAR(page+1) \ + && PFLAG_ISCLEAR(page+2) && PFLAG_ISCLEAR(page+3) +#endif + +// Set the selected page range [ first_page, last_page [ into the SET state +#define PFLAG_SET_RANGE(first_page, last_page) \ + memset(mainBuffer.dirtyPages + (first_page), PFLAG_SET_VALUE, \ + (last_page) - (first_page)) + +// Set the selected page range [ first_page, last_page [ into the CLEAR state +#define PFLAG_CLEAR_RANGE(first_page, last_page) \ + memset(mainBuffer.dirtyPages + (first_page), PFLAG_CLEAR_VALUE, \ + (last_page) - (first_page)) + +#define PFLAG_SET_ALL do { \ + PFLAG_SET_RANGE(0, mainBuffer.pageCount); \ + mainBuffer.dirty = true; \ +} while (0) + +#define PFLAG_CLEAR_ALL do { \ + PFLAG_CLEAR_RANGE(0, mainBuffer.pageCount); \ + mainBuffer.dirty = false; \ + mainBuffer.very_dirty = false; \ +} while (0) + +#define PFLAG_SET_VERY_DIRTY do { \ + mainBuffer.very_dirty = true; \ +} while (0) + +// Set the following macro definition to 1 if your system +// provides a really fast strchr() implementation +//#define HAVE_FAST_STRCHR 0 + +static inline unsigned find_next_page_set(unsigned page) +{ +#if HAVE_FAST_STRCHR + char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_SET_VALUE); + return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; +#else + while (PFLAG_ISCLEAR_4(page)) + page += 4; + while (PFLAG_ISCLEAR(page)) + page++; + return page; +#endif +} + +static inline unsigned find_next_page_clear(unsigned page) +{ +#if HAVE_FAST_STRCHR + char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_CLEAR_VALUE); + return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; +#else + while (PFLAG_ISSET_4(page)) + page += 4; + while (PFLAG_ISSET(page)) + page++; + return page; +#endif +} + +#if defined(HAVE_PTHREADS) +static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact) +#define LOCK_VOSF pthread_mutex_lock(&vosf_lock); +#define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock); +#elif defined(_WIN32) +static mutex_t vosf_lock; // Mutex to protect frame buffer (dirtyPages in fact) +#define LOCK_VOSF vosf_lock.lock(); +#define UNLOCK_VOSF vosf_lock.unlock(); +#elif defined(HAVE_SPINLOCKS) +static spinlock_t vosf_lock = SPIN_LOCK_UNLOCKED; // Mutex to protect frame buffer (dirtyPages in fact) +#define LOCK_VOSF spin_lock(&vosf_lock) +#define UNLOCK_VOSF spin_unlock(&vosf_lock) +#else +#define LOCK_VOSF +#define UNLOCK_VOSF +#endif + +static int log_base_2(uint32 x) +{ + uint32 mask = 0x80000000; + int l = 31; + while (l >= 0 && (x & mask) == 0) { + mask >>= 1; + l--; + } + return l; +} + +// Extend size to page boundary +static uint32 page_extend(uint32 size) +{ + const uint32 page_size = vm_get_page_size(); + const uint32 page_mask = page_size - 1; + return (size + page_mask) & ~page_mask; +} + + +/* + * Check if VOSF acceleration is profitable on this platform + */ + +#ifndef VOSF_PROFITABLE_TRIES +#define VOSF_PROFITABLE_TRIES VOSF_PROFITABLE_TRIES_DFL +#endif +const int VOSF_PROFITABLE_TRIES_DFL = 3; // Make 3 attempts for full screen update +const int VOSF_PROFITABLE_THRESHOLD = 16667/2; // 60 Hz (half of the quantum) + +static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faults_p = NULL) +{ + uint32 duration = 0; + uint32 n_tries = VOSF_PROFITABLE_TRIES; + const uint32 n_page_faults = mainBuffer.pageCount * n_tries; + +#ifdef SHEEPSHAVER + const bool accel = PrefsFindBool("gfxaccel"); +#else + const bool accel = false; +#endif + + for (uint32 i = 0; i < n_tries; i++) { + uint64 start = GetTicks_usec(); + for (uint32 p = 0; p < mainBuffer.pageCount; p++) { + uint8 *addr = (uint8 *)(mainBuffer.memStart + (p * mainBuffer.pageSize)); + if (accel) + vosf_do_set_dirty_area((uintptr)addr, (uintptr)addr + mainBuffer.pageSize - 1); + else + addr[0] = 0; // Trigger Screen_fault_handler() + } + duration += uint32(GetTicks_usec() - start); + + PFLAG_CLEAR_ALL; + mainBuffer.dirty = false; + if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) + return false; + } + + if (duration_p) + *duration_p = duration; + if (n_page_faults_p) + *n_page_faults_p = n_page_faults; + + D(bug("Triggered %d page faults in %ld usec (%.1f usec per fault)\n", n_page_faults, duration, double(duration) / double(n_page_faults))); + return ((duration / n_tries) < (VOSF_PROFITABLE_THRESHOLD * (frame_skip ? frame_skip : 1))); +} + + +/* + * Initialize the VOSF system (mainBuffer structure, SIGSEGV handler) + */ + +static bool video_vosf_init(MONITOR_INIT) +{ + VIDEO_MODE_INIT_MONITOR; + + const uintptr page_size = vm_get_page_size(); + const uintptr page_mask = page_size - 1; + + // Round up frame buffer base to page boundary + mainBuffer.memStart = (((uintptr) the_buffer) + page_mask) & ~page_mask; + + // The frame buffer size shall already be aligned to page boundary (use page_extend) + mainBuffer.memLength = the_buffer_size; + + mainBuffer.pageSize = page_size; + mainBuffer.pageBits = log_base_2(mainBuffer.pageSize); + mainBuffer.pageCount = (mainBuffer.memLength + page_mask)/mainBuffer.pageSize; + + // The "2" more bytes requested are a safety net to insure the + // loops in the update routines will terminate. + // See "How can we deal with array overrun conditions ?" hereunder for further details. + mainBuffer.dirtyPages = (char *) malloc(mainBuffer.pageCount + 2); + if (mainBuffer.dirtyPages == NULL) + return false; + + PFLAG_CLEAR_ALL; + PFLAG_CLEAR(mainBuffer.pageCount); + PFLAG_SET(mainBuffer.pageCount+1); + + // Allocate and fill in pageInfo with start and end (inclusive) row in number of bytes + mainBuffer.pageInfo = (ScreenPageInfo *) malloc(mainBuffer.pageCount * sizeof(ScreenPageInfo)); + if (mainBuffer.pageInfo == NULL) + return false; + + uint32 a = 0; + for (unsigned i = 0; i < mainBuffer.pageCount; i++) { + unsigned y1 = a / VIDEO_MODE_ROW_BYTES; + if (y1 >= VIDEO_MODE_Y) + y1 = VIDEO_MODE_Y - 1; + + unsigned y2 = (a + mainBuffer.pageSize) / VIDEO_MODE_ROW_BYTES; + if (y2 >= VIDEO_MODE_Y) + y2 = VIDEO_MODE_Y - 1; + + mainBuffer.pageInfo[i].top = y1; + mainBuffer.pageInfo[i].bottom = y2; + + a += mainBuffer.pageSize; + if (a > mainBuffer.memLength) + a = mainBuffer.memLength; + } + + // We can now write-protect the frame buffer + if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) + return false; + + // The frame buffer is sane, i.e. there is no write to it yet + mainBuffer.dirty = false; + return true; +} + + +/* + * Deinitialize VOSF system + */ + +static void video_vosf_exit(void) +{ + if (mainBuffer.pageInfo) { + free(mainBuffer.pageInfo); + mainBuffer.pageInfo = NULL; + } + if (mainBuffer.dirtyPages) { + free(mainBuffer.dirtyPages); + mainBuffer.dirtyPages = NULL; + } +} + + +/* + * Update VOSF state with specified dirty area + */ + +static void vosf_do_set_dirty_area(uintptr first, uintptr last) +{ + const int first_page = (first - mainBuffer.memStart) >> mainBuffer.pageBits; + const int last_page = (last - mainBuffer.memStart) >> mainBuffer.pageBits; + uint8 *addr = (uint8 *)(first & ~(mainBuffer.pageSize - 1)); + for (int i = first_page; i <= last_page; i++) { + if (PFLAG_ISCLEAR(i)) { + PFLAG_SET(i); + vm_protect(addr, mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); + } + addr += mainBuffer.pageSize; + } +} + +static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row) +{ + if (x < 0) { + w -= -x; + x = 0; + } + if (y < 0) { + h -= -y; + y = 0; + } + if (w <= 0 || h <= 0) + return; + if (unsigned(x + w) > screen_width) + w -= unsigned(x + w) - screen_width; + if (unsigned(y + h) > screen_height) + h -= unsigned(y + h) - screen_height; + LOCK_VOSF; + if (bytes_per_row >= screen_width) { + const int bytes_per_pixel = bytes_per_row / screen_width; + if (bytes_per_row <= mainBuffer.pageSize) { + const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x * bytes_per_pixel; + const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) * bytes_per_pixel; + vosf_do_set_dirty_area(a0, a1); + } else { + for (int j = y; j < y + h; j++) { + const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x * bytes_per_pixel; + const uintptr a1 = a0 + (w - 1) * bytes_per_pixel; + vosf_do_set_dirty_area(a0, a1); + } + } + } else { + const int pixels_per_byte = screen_width / bytes_per_row; + if (bytes_per_row <= mainBuffer.pageSize) { + const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x / pixels_per_byte; + const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) / pixels_per_byte; + vosf_do_set_dirty_area(a0, a1); + } else { + for (int j = y; j < y + h; j++) { + const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x / pixels_per_byte; + const uintptr a1 = mainBuffer.memStart + j * bytes_per_row + (x + w - 1) / pixels_per_byte; + vosf_do_set_dirty_area(a0, a1); + } + } + } + mainBuffer.dirty = true; + UNLOCK_VOSF; +} + + +/* + * Screen fault handler + */ + +bool Screen_fault_handler(sigsegv_info_t *sip) +{ + const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); + + /* Someone attempted to write to the frame buffer. Make it writeable + * now so that the data could actually be written to. It will be made + * read-only back in one of the screen update_*() functions. + */ + if (((uintptr)addr - mainBuffer.memStart) < mainBuffer.memLength) { + const int page = ((uintptr)addr - mainBuffer.memStart) >> mainBuffer.pageBits; + LOCK_VOSF; + if (PFLAG_ISCLEAR(page)) { + PFLAG_SET(page); + vm_protect((char *)(addr & ~(mainBuffer.pageSize - 1)), mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); + } + mainBuffer.dirty = true; + UNLOCK_VOSF; + return true; + } + + /* Otherwise, we don't know how to handle the fault, let it crash */ + return false; +} + + +/* + * Update display for Windowed mode and VOSF + */ + +/* How can we deal with array overrun conditions ? + + The state of the framebuffer pages that have been touched are maintained + in the dirtyPages[] table. That table is (pageCount + 2) bytes long. + +Terminology + + "Last Page" denotes the pageCount-nth page, i.e. dirtyPages[pageCount - 1]. + "CLEAR Page Guard" refers to the page following the Last Page but is always + in the CLEAR state. "SET Page Guard" refers to the page following the CLEAR + Page Guard but is always in the SET state. + +Rough process + + The update routines must determine which pages have to be blitted to the + screen. This job consists in finding the first_page that was touched. + i.e. find the next page that is SET. Then, finding how many pages were + touched starting from first_page. i.e. find the next page that is CLEAR. + +There are two cases to check: + + - Last Page is CLEAR: find_next_page_set() will reach the SET Page Guard + but it is beyond the valid pageCount value. Therefore, we exit from the + update routine. + + - Last Page is SET: first_page equals (pageCount - 1) and + find_next_page_clear() will reach the CLEAR Page Guard. We blit the last + page to the screen. On the next iteration, page equals pageCount and + find_next_page_set() will reach the SET Page Guard. We still safely exit + from the update routine because the SET Page Guard position is greater + than pageCount. +*/ + +#ifndef TEST_VOSF_PERFORMANCE +static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) +{ + VIDEO_MODE_INIT; + + unsigned page = 0; + for (;;) { + const unsigned first_page = find_next_page_set(page); + if (first_page >= mainBuffer.pageCount) + break; + + page = find_next_page_clear(first_page); + PFLAG_CLEAR_RANGE(first_page, page); + + // Make the dirty pages read-only again + const int32 offset = first_page << mainBuffer.pageBits; + const uint32 length = (page - first_page) << mainBuffer.pageBits; + vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); + + // There is at least one line to update + const int y1 = mainBuffer.pageInfo[first_page].top; + const int y2 = mainBuffer.pageInfo[page - 1].bottom; + const int height = y2 - y1 + 1; + + // Update the_host_buffer + VIDEO_DRV_LOCK_PIXELS; + const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; + const int dst_bytes_per_row = VIDEO_DRV_ROW_BYTES; + int i1 = y1 * src_bytes_per_row, i2 = y1 * dst_bytes_per_row, j; + for (j = y1; j <= y2; j++) { + Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); + i1 += src_bytes_per_row; + i2 += dst_bytes_per_row; + } + VIDEO_DRV_UNLOCK_PIXELS; + +#ifdef USE_SDL_VIDEO + update_sdl_video(drv->s, 0, y1, VIDEO_MODE_X, height); +#else + if (VIDEO_DRV_HAVE_SHM) + XShmPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height, 0); + else + XPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height); +#endif + } + mainBuffer.dirty = false; +} +#endif + + +/* + * Update display for DGA mode and VOSF + * (only in Real or Direct Addressing mode) + */ + +#ifndef TEST_VOSF_PERFORMANCE +#if REAL_ADDRESSING || DIRECT_ADDRESSING + +static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) +{ + VIDEO_MODE_INIT; + + // Compute number of bytes per row, take care to virtual screens + const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; + const int dst_bytes_per_row = TrivialBytesPerRow(VIDEO_MODE_X, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); + const int scr_bytes_per_row = VIDEO_DRV_ROW_BYTES; + assert(dst_bytes_per_row <= scr_bytes_per_row); + const int scr_bytes_left = scr_bytes_per_row - dst_bytes_per_row; + + // Full screen update requested? + if (mainBuffer.very_dirty) { + PFLAG_CLEAR_ALL; + vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ); + memcpy(the_buffer_copy, the_buffer, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + VIDEO_DRV_LOCK_PIXELS; + int i1 = 0, i2 = 0; + for (uint32_t j = 0; j < VIDEO_MODE_Y; j++) { + Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); + i1 += src_bytes_per_row; + i2 += scr_bytes_per_row; + } +#ifdef USE_SDL_VIDEO + update_sdl_video(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); +#endif + VIDEO_DRV_UNLOCK_PIXELS; + return; + } + + // Setup partial blitter (use 64-pixel wide chunks) + const uint32 n_pixels = 64; + const uint32 n_chunks = VIDEO_MODE_X / n_pixels; + const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); + const uint32 src_chunk_size = TrivialBytesPerRow(n_pixels, VIDEO_MODE_DEPTH); + const uint32 dst_chunk_size = TrivialBytesPerRow(n_pixels, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); + assert(src_chunk_size * n_chunks <= src_bytes_per_row); + assert(dst_chunk_size * n_chunks <= dst_bytes_per_row); + const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); + const uint32 dst_chunk_size_left = dst_bytes_per_row - (n_chunks * dst_chunk_size); + + unsigned page = 0; + uint32 last_scanline = uint32(-1); + for (;;) { + const unsigned first_page = find_next_page_set(page); + if (first_page >= mainBuffer.pageCount) + break; + + page = find_next_page_clear(first_page); + PFLAG_CLEAR_RANGE(first_page, page); + + // Make the dirty pages read-only again + const int32 offset = first_page << mainBuffer.pageBits; + const uint32 length = (page - first_page) << mainBuffer.pageBits; + vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); + + // Optimized for scanlines, don't process overlapping lines again + uint32 y1 = mainBuffer.pageInfo[first_page].top; + uint32 y2 = mainBuffer.pageInfo[page - 1].bottom; + if (last_scanline != uint32(-1)) { + if (y1 <= last_scanline && ++y1 >= VIDEO_MODE_Y) + continue; + if (y2 <= last_scanline && ++y2 >= VIDEO_MODE_Y) + continue; + } + last_scanline = y2; + + // Update the_host_buffer and copy of the_buffer, one line at a time + uint32 i1 = y1 * src_bytes_per_row; + uint32 i2 = y1 * scr_bytes_per_row; +#ifdef USE_SDL_VIDEO + int bbi = 0; + SDL_Rect bb[3] = { + { Sint16(VIDEO_MODE_X), Sint16(y1), 0, 0 }, + { Sint16(VIDEO_MODE_X), -1, 0, 0 }, + { Sint16(VIDEO_MODE_X), -1, 0, 0 } + }; +#endif + VIDEO_DRV_LOCK_PIXELS; + for (uint32 j = y1; j <= y2; j++) { + for (uint32 i = 0; i < n_chunks; i++) { + if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size) != 0) { + memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size); + Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size); +#ifdef USE_SDL_VIDEO + const int x = i * n_pixels; + if (x < bb[bbi].x) { + if (bb[bbi].w) + bb[bbi].w += bb[bbi].x - x; + else + bb[bbi].w = n_pixels; + bb[bbi].x = x; + } + else if (x >= bb[bbi].x + bb[bbi].w) + bb[bbi].w = x + n_pixels - bb[bbi].x; +#endif + } + i1 += src_chunk_size; + i2 += dst_chunk_size; + } + if (src_chunk_size_left && dst_chunk_size_left) { + if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left) != 0) { + memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left); + Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size_left); + } +#ifdef USE_SDL_VIDEO + const int x = n_chunks * n_pixels; + if (x < bb[bbi].x) { + if (bb[bbi].w) + bb[bbi].w += bb[bbi].x - x; + else + bb[bbi].w = n_pixels_left; + bb[bbi].x = x; + } + else if (x >= bb[bbi].x + bb[bbi].w) + bb[bbi].w = x + n_pixels_left - bb[bbi].x; +#endif + } + i1 += src_chunk_size_left; + i2 += dst_chunk_size_left + scr_bytes_left; +#ifdef USE_SDL_VIDEO + bb[bbi].h++; + if (bb[bbi].w && (j == y1 || j == y2 - 1 || j == y2)) { + bbi++; + assert(bbi <= 3); + if (j != y2) + bb[bbi].y = j + 1; + } +#endif + } +#ifdef USE_SDL_VIDEO + update_sdl_video(drv->s, bbi, bb); +#endif + VIDEO_DRV_UNLOCK_PIXELS; + } + mainBuffer.dirty = false; +} +#endif +#endif + +#endif /* ENABLE_VOSF */ + +#endif /* VIDEO_VOSF_H */ diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.cpp b/SheepShaver/src/CrossPlatform/vm_alloc.cpp deleted file mode 120000 index cc80e1bc2..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.cpp \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.cpp b/SheepShaver/src/CrossPlatform/vm_alloc.cpp new file mode 100644 index 000000000..176060c07 --- /dev/null +++ b/SheepShaver/src/CrossPlatform/vm_alloc.cpp @@ -0,0 +1,619 @@ +/* + * vm_alloc.cpp - Wrapper to various virtual memory allocation schemes + * (supports mmap, vm_allocate or fallbacks to malloc) + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#ifdef HAVE_FCNTL_H +#include +#endif + +#ifdef HAVE_WIN32_VM +#define WIN32_LEAN_AND_MEAN /* avoid including junk */ +#include +#endif + +#include +#include +#include +#include +#include +#include "vm_alloc.h" + +#if defined(__APPLE__) && defined(__MACH__) +#include +#endif + +#ifdef HAVE_MACH_VM +#ifndef HAVE_MACH_TASK_SELF +#ifdef HAVE_TASK_SELF +#define mach_task_self task_self +#else +#error "No task_self(), you lose." +#endif +#endif +#endif + +#ifdef HAVE_WIN32_VM +/* Windows is either ILP32 or LLP64 */ +typedef UINT_PTR vm_uintptr_t; +#else +/* Other systems are sane as they are either ILP32 or LP64 */ +typedef unsigned long vm_uintptr_t; +#endif + +/* We want MAP_32BIT, if available, for SheepShaver and BasiliskII + because the emulated target is 32-bit and this helps to allocate + memory so that branches could be resolved more easily (32-bit + displacement to code in .text), on AMD64 for example. */ +#if defined(__hpux) +#define MAP_32BIT MAP_ADDR32 +#endif +#ifndef MAP_32BIT +#define MAP_32BIT 0 +#endif +#ifdef __FreeBSD__ +#define FORCE_MAP_32BIT MAP_FIXED +#else +#define FORCE_MAP_32BIT MAP_32BIT +#endif +#ifndef MAP_ANON +#define MAP_ANON 0 +#endif +#ifndef MAP_ANONYMOUS +#define MAP_ANONYMOUS 0 +#endif + +/* NOTE: on linux MAP_32BIT is only implemented on AMD64 + it is a null op on all other architectures + thus the MAP_BASE setting below is the only thing + ensuring low addresses on aarch64 for example */ +#define MAP_EXTRA_FLAGS (MAP_32BIT) + +#ifdef HAVE_MMAP_VM +#if (defined(__linux__) && defined(__i386__)) || defined(__FreeBSD__) || HAVE_LINKER_SCRIPT +/* Force a reasonnable address below 0x80000000 on x86 so that we + don't get addresses above when the program is run on AMD64. + NOTE: this is empirically determined on Linux/x86. */ +#define MAP_BASE 0x10000000 +#elif DIRECT_ADDRESSING +/* linux does not implement any useful fallback behavior + such as allocating the next available address + and the first 4k-64k of address space is marked unavailable + for security reasons (see https://wiki.debian.org/mmap_min_addr) + so we must start requesting after the first page + or we get a high 64bit address that will crash direct addressing + + leaving NULL unmapped is a good idea anyway for debugging reasons */ +#define MAP_BASE 0x00010000 +#else +#define MAP_BASE 0x00000000 +#endif +static char * next_address = (char *)MAP_BASE; +#ifdef HAVE_MMAP_ANON +#define map_flags (MAP_ANON | MAP_EXTRA_FLAGS) +#define zero_fd -1 +#else +#ifdef HAVE_MMAP_ANONYMOUS +#define map_flags (MAP_ANONYMOUS | MAP_EXTRA_FLAGS) +#define zero_fd -1 +#else +#define map_flags (MAP_EXTRA_FLAGS) +static int zero_fd = -1; +#endif +#endif +#endif + +/* Translate generic VM map flags to host values. */ + +#ifdef HAVE_MMAP_VM +static int translate_map_flags(int vm_flags) +{ + int flags = 0; + if (vm_flags & VM_MAP_SHARED) + flags |= MAP_SHARED; + if (vm_flags & VM_MAP_PRIVATE) + flags |= MAP_PRIVATE; + if (vm_flags & VM_MAP_FIXED) + flags |= MAP_FIXED; + if (vm_flags & VM_MAP_32BIT) + flags |= FORCE_MAP_32BIT; + return flags; +} +#endif + +/* Align ADDR and SIZE to 64K boundaries. */ + +#ifdef HAVE_WIN32_VM +static inline LPVOID align_addr_segment(LPVOID addr) +{ + return LPVOID(vm_uintptr_t(addr) & ~vm_uintptr_t(0xFFFF)); +} + +static inline DWORD align_size_segment(LPVOID addr, DWORD size) +{ + return size + ((vm_uintptr_t)addr - (vm_uintptr_t)align_addr_segment(addr)); +} +#endif + +/* Translate generic VM prot flags to host values. */ + +#ifdef HAVE_WIN32_VM +static int translate_prot_flags(int prot_flags) +{ + int prot = PAGE_READWRITE; + if (prot_flags == (VM_PAGE_EXECUTE | VM_PAGE_READ | VM_PAGE_WRITE)) + prot = PAGE_EXECUTE_READWRITE; + else if (prot_flags == (VM_PAGE_EXECUTE | VM_PAGE_READ)) + prot = PAGE_EXECUTE_READ; + else if (prot_flags == (VM_PAGE_READ | VM_PAGE_WRITE)) + prot = PAGE_READWRITE; + else if (prot_flags == VM_PAGE_READ) + prot = PAGE_READONLY; + else if (prot_flags == 0) + prot = PAGE_NOACCESS; + return prot; +} +#endif + +/* Translate Mach return codes to POSIX errno values. */ +#ifdef HAVE_MACH_VM +static int vm_error(kern_return_t ret_code) +{ + switch (ret_code) { + case KERN_SUCCESS: + return 0; + case KERN_INVALID_ADDRESS: + case KERN_NO_SPACE: + return ENOMEM; + case KERN_PROTECTION_FAILURE: + return EACCES; + default: + return EINVAL; + } +} +#endif + +/* Initialize the VM system. Returns 0 if successful, -1 for errors. */ + +int vm_init(void) +{ +#ifdef HAVE_MMAP_VM +#ifndef zero_fd + zero_fd = open("/dev/zero", O_RDWR); + if (zero_fd < 0) + return -1; +#endif +#endif + +// On 10.4 and earlier, reset CrashReporter's task signal handler to +// avoid having it show up for signals that get handled. +#if defined(__APPLE__) && defined(__MACH__) + struct utsname info; + + if (!uname(&info) && atoi(info.release) <= 8) { + task_set_exception_ports(mach_task_self(), + EXC_MASK_BAD_ACCESS | EXC_MASK_ARITHMETIC, + MACH_PORT_NULL, + EXCEPTION_STATE_IDENTITY, + MACHINE_THREAD_STATE); + } +#endif + + return 0; +} + +/* Deallocate all internal data used to wrap virtual memory allocators. */ + +void vm_exit(void) +{ +#ifdef HAVE_MMAP_VM +#ifndef zero_fd + if (zero_fd != -1) { + close(zero_fd); + zero_fd = -1; + } +#endif +#endif +} + +static void *reserved_buf; +static const size_t RESERVED_SIZE = 64 * 1024 * 1024; // for 5K Retina + +void *vm_acquire_reserved(size_t size) { + return reserved_buf && size <= RESERVED_SIZE ? reserved_buf : VM_MAP_FAILED; +} + +int vm_init_reserved(void *hostAddress) { + int result = vm_acquire_fixed(hostAddress, RESERVED_SIZE); + if (result >= 0) + reserved_buf = hostAddress; + return result; +} + +/* Allocate zero-filled memory of SIZE bytes. The mapping is private + and default protection bits are read / write. The return value + is the actual mapping address chosen or VM_MAP_FAILED for errors. */ + +void * vm_acquire(size_t size, int options) +{ + void * addr; + + errno = 0; + + // VM_MAP_FIXED are to be used with vm_acquire_fixed() only + if (options & VM_MAP_FIXED) + return VM_MAP_FAILED; + +#ifndef HAVE_VM_WRITE_WATCH + if (options & VM_MAP_WRITE_WATCH) + return VM_MAP_FAILED; +#endif + +#if defined(HAVE_MACH_VM) + // vm_allocate() returns a zero-filled memory region + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, reserved_buf ? size : size + RESERVED_SIZE, TRUE); + if (ret_code != KERN_SUCCESS) { + errno = vm_error(ret_code); + return VM_MAP_FAILED; + } + if (!reserved_buf) + reserved_buf = (char *)addr + size; +#elif defined(HAVE_MMAP_VM) + int fd = zero_fd; + int the_map_flags = translate_map_flags(options) | map_flags; + + if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) + return VM_MAP_FAILED; + +#if DIRECT_ADDRESSING + // If MAP_32BIT and MAP_BASE fail to ensure + // a 32-bit address crash now instead of later. + // FIXME: make everything 64-bit clean and tear this all out. + if(sizeof(void *) > 4 && (options & VM_MAP_32BIT)) + assert((size_t)addr<0xffffffffL); +#endif + + next_address = (char *)addr + size; +#elif defined(HAVE_WIN32_VM) + int alloc_type = MEM_RESERVE | MEM_COMMIT; + if (options & VM_MAP_WRITE_WATCH) + alloc_type |= MEM_WRITE_WATCH; + + if ((addr = VirtualAlloc(NULL, size, alloc_type, PAGE_EXECUTE_READWRITE)) == NULL) + return VM_MAP_FAILED; +#else + if ((addr = calloc(size, 1)) == 0) + return VM_MAP_FAILED; + + // Omit changes for protections because they are not supported in this mode + return addr; +#endif + + // Explicitely protect the newly mapped region here because on some systems, + // say MacOS X, mmap() doesn't honour the requested protection flags. + if (vm_protect(addr, size, VM_PAGE_DEFAULT) != 0) + return VM_MAP_FAILED; + + return addr; +} + +/* Allocate zero-filled memory at exactly ADDR (which must be page-aligned). + Retuns 0 if successful, -1 on errors. */ + +int vm_acquire_fixed(void * addr, size_t size, int options) +{ + errno = 0; + + // Fixed mappings are required to be private + if (options & VM_MAP_SHARED) + return -1; + +#ifndef HAVE_VM_WRITE_WATCH + if (options & VM_MAP_WRITE_WATCH) + return -1; +#endif + +#if defined(HAVE_MACH_VM) + // vm_allocate() returns a zero-filled memory region + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, 0); + if (ret_code != KERN_SUCCESS) { + errno = vm_error(ret_code); + return -1; + } +#elif defined(HAVE_MMAP_VM) + int fd = zero_fd; + int the_map_flags = translate_map_flags(options) | map_flags | MAP_FIXED; + + if (mmap((caddr_t)addr, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0) == (void *)MAP_FAILED) + return -1; +#elif defined(HAVE_WIN32_VM) + // Windows cannot allocate Low Memory + if (addr == NULL) + return -1; + + int alloc_type = MEM_RESERVE | MEM_COMMIT; + if (options & VM_MAP_WRITE_WATCH) + alloc_type |= MEM_WRITE_WATCH; + + // Allocate a possibly offset region to align on 64K boundaries + LPVOID req_addr = align_addr_segment(addr); + DWORD req_size = align_size_segment(addr, size); + LPVOID ret_addr = VirtualAlloc(req_addr, req_size, alloc_type, PAGE_EXECUTE_READWRITE); + if (ret_addr != req_addr) + return -1; +#else + // Unsupported + return -1; +#endif + + // Explicitely protect the newly mapped region here because on some systems, + // say MacOS X, mmap() doesn't honour the requested protection flags. + if (vm_protect(addr, size, VM_PAGE_DEFAULT) != 0) + return -1; + + return 0; +} + +/* Deallocate any mapping for the region starting at ADDR and extending + LEN bytes. Returns 0 if successful, -1 on errors. */ + +int vm_release(void * addr, size_t size) +{ + // Safety check: don't try to release memory that was not allocated + if (addr == VM_MAP_FAILED) + return 0; + +#ifdef HAVE_MACH_VM + if (vm_deallocate(mach_task_self(), (vm_address_t)addr, size) != KERN_SUCCESS) + return -1; +#else +#ifdef HAVE_MMAP_VM + if (munmap((caddr_t)addr, size) != 0) + return -1; +#else +#ifdef HAVE_WIN32_VM + if (VirtualFree(align_addr_segment(addr), 0, MEM_RELEASE) == 0) + return -1; +#else + free(addr); +#endif +#endif +#endif + + return 0; +} + +/* Change the memory protection of the region starting at ADDR and + extending LEN bytes to PROT. Returns 0 if successful, -1 for errors. */ + +int vm_protect(void * addr, size_t size, int prot) +{ +#ifdef HAVE_MACH_VM + int ret_code = vm_protect(mach_task_self(), (vm_address_t)addr, size, 0, prot); + return ret_code == KERN_SUCCESS ? 0 : -1; +#else +#ifdef HAVE_MMAP_VM + int ret_code = mprotect((caddr_t)addr, size, prot); + return ret_code == 0 ? 0 : -1; +#else +#ifdef HAVE_WIN32_VM + DWORD old_prot; + int ret_code = VirtualProtect(addr, size, translate_prot_flags(prot), &old_prot); + return ret_code != 0 ? 0 : -1; +#else + // Unsupported + return -1; +#endif +#endif +#endif +} + +/* Return the addresses of the pages that got modified in the + specified range [ ADDR, ADDR + SIZE [ since the last reset of the watch + bits. Returns 0 if successful, -1 for errors. */ + +int vm_get_write_watch(void * addr, size_t size, + void ** pages, unsigned int * n_pages, + int options) +{ +#ifdef HAVE_VM_WRITE_WATCH +#ifdef HAVE_WIN32_VM + DWORD flags = 0; + if (options & VM_WRITE_WATCH_RESET) + flags |= WRITE_WATCH_FLAG_RESET; + + ULONG page_size; + ULONG_PTR count = *n_pages; + int ret_code = GetWriteWatch(flags, addr, size, pages, &count, &page_size); + if (ret_code != 0) + return -1; + + *n_pages = count; + return 0; +#endif +#endif + // Unsupported + return -1; +} + +/* Reset the write-tracking state for the specified range [ ADDR, ADDR + + SIZE [. Returns 0 if successful, -1 for errors. */ + +int vm_reset_write_watch(void * addr, size_t size) +{ +#ifdef HAVE_VM_WRITE_WATCH +#ifdef HAVE_WIN32_VM + int ret_code = ResetWriteWatch(addr, size); + return ret_code == 0 ? 0 : -1; +#endif +#endif + // Unsupported + return -1; +} + +/* Returns the size of a page. */ + +int vm_get_page_size(void) +{ +#ifdef HAVE_WIN32_VM + static vm_uintptr_t page_size = 0; + if (page_size == 0) { + SYSTEM_INFO si; + GetSystemInfo(&si); + page_size = si.dwAllocationGranularity; + } + return page_size; +#else + return getpagesize(); +#endif +} + +#ifdef CONFIGURE_TEST_VM_WRITE_WATCH +int main(void) +{ + int i, j; + + vm_init(); + + vm_uintptr_t page_size = vm_get_page_size(); + + char *area; + const int n_pages = 7; + const int area_size = n_pages * page_size; + const int map_options = VM_MAP_DEFAULT | VM_MAP_WRITE_WATCH; + if ((area = (char *)vm_acquire(area_size, map_options)) == VM_MAP_FAILED) + return 1; + + unsigned int n_modified_pages_expected = 0; + static const int touch_page[n_pages] = { 0, 1, 1, 0, 1, 0, 1 }; + for (i = 0; i < n_pages; i++) { + if (touch_page[i]) { + area[i * page_size] = 1; + ++n_modified_pages_expected; + } + } + + char *modified_pages[n_pages]; + unsigned int n_modified_pages = n_pages; + if (vm_get_write_watch(area, area_size, (void **)modified_pages, &n_modified_pages) < 0) + return 2; + if (n_modified_pages != n_modified_pages_expected) + return 3; + for (i = 0, j = 0; i < n_pages; i++) { + char v = area[i * page_size]; + if ((touch_page[i] && !v) || (!touch_page[i] && v)) + return 4; + if (!touch_page[i]) + continue; + if (modified_pages[j] != (area + i * page_size)) + return 5; + ++j; + } + + vm_release(area, area_size); + return 0; +} +#endif + +#ifdef CONFIGURE_TEST_VM_MAP +#include +#include + +static void fault_handler(int sig) +{ + exit(1); +} + +/* Tests covered here: + - TEST_VM_PROT_* program slices actually succeeds when a crash occurs + - TEST_VM_MAP_ANON* program slices succeeds when it could be compiled +*/ +int main(void) +{ + vm_init(); + + signal(SIGSEGV, fault_handler); +#ifdef SIGBUS + signal(SIGBUS, fault_handler); +#endif + +#define page_align(address) ((char *)((vm_uintptr_t)(address) & -page_size)) + vm_uintptr_t page_size = vm_get_page_size(); + + const int area_size = 6 * page_size; + volatile char * area = (volatile char *) vm_acquire(area_size); + volatile char * fault_address = area + (page_size * 7) / 2; + +#if defined(TEST_VM_MMAP_ANON) || defined(TEST_VM_MMAP_ANONYMOUS) + if (area == VM_MAP_FAILED) + return 1; + + if (vm_release((char *)area, area_size) < 0) + return 1; + + return 0; +#endif + +#if defined(TEST_VM_PROT_NONE_READ) || defined(TEST_VM_PROT_NONE_WRITE) + if (area == VM_MAP_FAILED) + return 0; + + if (vm_protect(page_align(fault_address), page_size, VM_PAGE_NOACCESS) < 0) + return 0; +#endif + +#if defined(TEST_VM_PROT_RDWR_WRITE) + if (area == VM_MAP_FAILED) + return 1; + + if (vm_protect(page_align(fault_address), page_size, VM_PAGE_READ) < 0) + return 1; + + if (vm_protect(page_align(fault_address), page_size, VM_PAGE_READ | VM_PAGE_WRITE) < 0) + return 1; +#endif + +#if defined(TEST_VM_PROT_READ_WRITE) + if (vm_protect(page_align(fault_address), page_size, VM_PAGE_READ) < 0) + return 0; +#endif + +#if defined(TEST_VM_PROT_NONE_READ) + // this should cause a core dump + char foo = *fault_address; + return 0; +#endif + +#if defined(TEST_VM_PROT_NONE_WRITE) || defined(TEST_VM_PROT_READ_WRITE) + // this should cause a core dump + *fault_address = 'z'; + return 0; +#endif + +#if defined(TEST_VM_PROT_RDWR_WRITE) + // this should not cause a core dump + *fault_address = 'z'; + return 0; +#endif +} +#endif diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.h b/SheepShaver/src/CrossPlatform/vm_alloc.h deleted file mode 120000 index ef65a5618..000000000 --- a/SheepShaver/src/CrossPlatform/vm_alloc.h +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/CrossPlatform/vm_alloc.h \ No newline at end of file diff --git a/SheepShaver/src/CrossPlatform/vm_alloc.h b/SheepShaver/src/CrossPlatform/vm_alloc.h new file mode 100644 index 000000000..41dd949df --- /dev/null +++ b/SheepShaver/src/CrossPlatform/vm_alloc.h @@ -0,0 +1,138 @@ +/* + * vm_alloc.h - Wrapper to various virtual memory allocation schemes + * (supports mmap, vm_allocate or fallbacks to malloc) + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 VM_ALLOC_H +#define VM_ALLOC_H + +#ifdef HAVE_UNISTD_H +#include +#include +#endif +#ifdef HAVE_SYS_MMAN_H +#include +#endif +#ifdef HAVE_MACH_VM +extern "C" { +#include +#include +} +#endif + +#include + +/* Return value of `vm_acquire' in case of an error. */ +#ifdef HAVE_MACH_VM +#define VM_MAP_FAILED ((void *)-1) +#else +#ifdef HAVE_MMAP_VM +#define VM_MAP_FAILED ((void *)-1) +#else +#define VM_MAP_FAILED 0 +#endif +#endif + +/* Option to vm_get_write_watch() to reset the write-tracking state + once it was retrieved. Otherwise, you have to manually call + vm_reset_write_watch() and potentially lose some info. */ +#define VM_WRITE_WATCH_RESET 0x01 + +/* Mapping options. */ +#define VM_MAP_SHARED 0x01 +#define VM_MAP_PRIVATE 0x02 +#define VM_MAP_FIXED 0x04 +#define VM_MAP_32BIT 0x08 +#define VM_MAP_WRITE_WATCH 0x10 + +/* Default mapping options. */ +#define VM_MAP_DEFAULT (VM_MAP_PRIVATE) + +/* Protection bits. */ +#ifdef HAVE_MACH_VM +#define VM_PAGE_NOACCESS VM_PROT_NONE +#define VM_PAGE_READ VM_PROT_READ +#define VM_PAGE_WRITE VM_PROT_WRITE +#define VM_PAGE_EXECUTE VM_PROT_EXECUTE +#else +#ifdef HAVE_MMAP_VM +#define VM_PAGE_NOACCESS PROT_NONE +#define VM_PAGE_READ PROT_READ +#define VM_PAGE_WRITE PROT_WRITE +#define VM_PAGE_EXECUTE PROT_EXEC +#else +#define VM_PAGE_NOACCESS 0x0 +#define VM_PAGE_READ 0x1 +#define VM_PAGE_WRITE 0x2 +#define VM_PAGE_EXECUTE 0x4 +#endif +#endif + +/* Default protection bits. */ +#define VM_PAGE_DEFAULT (VM_PAGE_READ | VM_PAGE_WRITE) + +/* Initialize the VM system. Returns 0 if successful, -1 for errors. */ + +extern int vm_init(void); + +/* Deallocate all internal data used to wrap virtual memory allocators. */ + +extern void vm_exit(void); + +/* Allocate zero-filled memory of SIZE bytes. The mapping is private + and default protection bits are read / write. The return value + is the actual mapping address chosen or VM_MAP_FAILED for errors. */ + +extern void * vm_acquire(size_t size, int options = VM_MAP_DEFAULT); + +extern void * vm_acquire_reserved(size_t size); + +/* Allocate zero-filled memory at exactly ADDR (which must be page-aligned). + Returns 0 if successful, -1 on errors. */ + +extern int vm_acquire_fixed(void * addr, size_t size, int options = VM_MAP_DEFAULT); + +/* Deallocate any mapping for the region starting at ADDR and extending + LEN bytes. Returns 0 if successful, -1 on errors. */ + +extern int vm_release(void * addr, size_t size); + +/* Change the memory protection of the region starting at ADDR and + extending SIZE bytes to PROT. Returns 0 if successful, -1 for errors. */ + +extern int vm_protect(void * addr, size_t size, int prot); + +/* Return the addresses of the pages that got modified since the last + reset of the write-tracking state for the specified range [ ADDR, + ADDR + SIZE [. Returns 0 if successful, -1 for errors. */ + +extern int vm_get_write_watch(void * addr, size_t size, + void ** pages, unsigned int * n_pages, + int options = 0); + +/* Reset the write-tracking state for the specified range [ ADDR, ADDR + + SIZE [. Returns 0 if successful, -1 for errors. */ + +extern int vm_reset_write_watch(void * addr, size_t size); + +/* Returns the size of a page. */ + +extern int vm_get_page_size(void); + +#endif /* VM_ALLOC_H */ diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL deleted file mode 120000 index 48cb61ebe..000000000 --- a/SheepShaver/src/SDL +++ /dev/null @@ -1 +0,0 @@ -../../BasiliskII/src/SDL \ No newline at end of file diff --git a/SheepShaver/src/SDL/video_sdl.cpp b/SheepShaver/src/SDL/video_sdl.cpp new file mode 100644 index 000000000..395778a00 --- /dev/null +++ b/SheepShaver/src/SDL/video_sdl.cpp @@ -0,0 +1,2340 @@ +/* + * video_sdl.cpp - Video/graphics emulation, SDL 1.x specific stuff + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +/* + * NOTES: + * The Ctrl key works like a qualifier for special actions: + * Ctrl-Tab = suspend DGA mode (TODO) + * Ctrl-Esc = emergency quit + * Ctrl-F1 = mount floppy + * Ctrl-F5 = grab mouse (in windowed mode) + * + * FIXMEs and TODOs: + * - Windows requires an extra mouse event to update the actual cursor image? + * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux + * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) + * - Mouse acceleration, there is no API in SDL yet for that + * - Force relative mode in Grab mode even if SDL provides absolute coordinates? + * - Gamma tables support is likely to be broken here + * - Events processing is bound to the general emulation thread as SDL requires + * to PumpEvents() within the same thread as the one that called SetVideoMode(). + * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. + * - Backport hw cursor acceleration to Basilisk II? + * - Factor out code + */ + +#include "sysdeps.h" + +#include +#if (SDL_COMPILEDVERSION < SDL_VERSIONNUM(2, 0, 0)) + +#include +#include +#include +#include + +#ifdef WIN32 +#include /* alloca() */ +#endif + +#include "cpu_emulation.h" +#include "main.h" +#include "adb.h" +#include "macos_util.h" +#include "prefs.h" +#include "user_strings.h" +#include "video.h" +#include "video_defs.h" +#include "video_blit.h" +#include "vm_alloc.h" + +#define DEBUG 0 +#include "debug.h" + +// Supported video modes +using std::vector; +static vector VideoModes; + +// Display types +#ifdef SHEEPSHAVER +enum { + DISPLAY_WINDOW = DIS_WINDOW, // windowed display + DISPLAY_SCREEN = DIS_SCREEN // fullscreen display +}; +extern int display_type; // See enum above +#else +enum { + DISPLAY_WINDOW, // windowed display + DISPLAY_SCREEN // fullscreen display +}; +static int display_type = DISPLAY_WINDOW; // See enum above +#endif + +// Constants +#if defined(WIN32) || __MACOSX__ +const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; +#else +const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +#endif + + +// Global variables +static uint32 frame_skip; // Prefs items +static int16 mouse_wheel_mode; +static int16 mouse_wheel_lines; + +static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) +static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) +static uint32 the_buffer_size; // Size of allocated the_buffer + +static bool redraw_thread_active = false; // Flag: Redraw thread installed +#ifndef USE_CPU_EMUL_SERVICES +static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread +static SDL_Thread *redraw_thread = NULL; // Redraw thread +static volatile bool thread_stop_req = false; +static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req +#endif + +#ifdef ENABLE_VOSF +static bool use_vosf = false; // Flag: VOSF enabled +#else +static const bool use_vosf = false; // VOSF not possible +#endif + +static bool ctrl_down = false; // Flag: Ctrl key pressed +static bool caps_on = false; // Flag: Caps Lock on +static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread +static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread +static bool emul_suspended = false; // Flag: Emulator suspended + +static bool classic_mode = false; // Flag: Classic Mac video mode + +static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms +static int keycode_table[256]; // X keycode -> Mac keycode translation table + +// SDL variables +static int screen_depth; // Depth of current screen +static SDL_Cursor *sdl_cursor; // Copy of Mac cursor +static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table +static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors +static bool toggle_fullscreen = false; +static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; + +static bool mouse_grabbed = false; +static bool mouse_grabbed_window_name_status = false; + +// Mutex to protect SDL events +static SDL_mutex *sdl_events_lock = NULL; +#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) +#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) + +// Mutex to protect palette +static SDL_mutex *sdl_palette_lock = NULL; +#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) +#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) + +// Mutex to protect frame buffer +static SDL_mutex *frame_buffer_lock = NULL; +#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) +#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) + +// Previously set gamma tables +static uint16 last_gamma_red[256]; +static uint16 last_gamma_green[256]; +static uint16 last_gamma_blue[256]; + +// Video refresh function +static void VideoRefreshInit(void); +static void (*video_refresh)(void); + + +// Prototypes +static int redraw_func(void *arg); + +// From sys_unix.cpp +extern void SysMountFirstFloppy(void); + + +/* + * SDL surface locking glue + */ + +#ifdef ENABLE_VOSF +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ + if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ + the_host_buffer = (uint8 *)(SURFACE)->pixels; \ +} while (0) +#else +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) +#endif + +#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) { \ + SDL_LockSurface(SURFACE); \ + SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ + } \ +} while (0) + +#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) \ + SDL_UnlockSurface(SURFACE); \ +} while (0) + + +/* + * Framebuffer allocation routines + */ + +static void *vm_acquire_framebuffer(uint32 size) +{ + // always try to reallocate framebuffer at the same address + static void *fb = VM_MAP_FAILED; + if (fb != VM_MAP_FAILED) { + if (vm_acquire_fixed(fb, size) < 0) { +#ifndef SHEEPSHAVER + printf("FATAL: Could not reallocate framebuffer at previous address\n"); +#endif + fb = VM_MAP_FAILED; + } + } + if (fb == VM_MAP_FAILED) + fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); + return fb; +} + +static inline void vm_release_framebuffer(void *fb, uint32 size) +{ + vm_release(fb, size); +} + +static inline int get_customized_color_depth(int default_depth) +{ + int display_color_depth = PrefsFindInt32("displaycolordepth"); + + D(bug("Get displaycolordepth %d\n", display_color_depth)); + + if(0 == display_color_depth) + return default_depth; + else{ + switch (display_color_depth) { + case 8: + return VIDEO_DEPTH_8BIT; + case 15: case 16: + return VIDEO_DEPTH_16BIT; + case 24: case 32: + return VIDEO_DEPTH_32BIT; + default: + return default_depth; + } + } +} + +/* + * Windows message handler + */ + +#ifdef WIN32 +#include +static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL + +extern void SysMediaArrived(void); +extern void SysMediaRemoved(void); +extern HWND GetMainWindowHandle(void); + +static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) +{ + switch (msg) { + case WM_DEVICECHANGE: + if (wParam == DBT_DEVICEREMOVECOMPLETE) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaRemoved(); + } + else if (wParam == DBT_DEVICEARRIVAL) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaArrived(); + } + return 0; + + default: + if (sdl_window_proc) + return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); + } + + return DefWindowProc(hwnd, msg, wParam, lParam); +} +#endif + + +/* + * SheepShaver glue + */ + +#ifdef SHEEPSHAVER +// Color depth modes type +typedef int video_depth; + +// 1, 2, 4 and 8 bit depths use a color palette +static inline bool IsDirectMode(VIDEO_MODE const & mode) +{ + return IsDirectMode(mode.viAppleMode); +} + +// Abstract base class representing one (possibly virtual) monitor +// ("monitor" = rectangular display with a contiguous frame buffer) +class monitor_desc { +public: + monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} + virtual ~monitor_desc() {} + + // Get current Mac frame buffer base address + uint32 get_mac_frame_base(void) const {return screen_base;} + + // Set Mac frame buffer base address (called from switch_to_mode()) + void set_mac_frame_base(uint32 base) {screen_base = base;} + + // Get current video mode + const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} + + // Called by the video driver to switch the video mode on this display + // (must call set_mac_frame_base()) + virtual void switch_to_current_mode(void) = 0; + + // Called by the video driver to set the color palette (in indexed modes) + // or the gamma table (in direct modes) + virtual void set_palette(uint8 *pal, int num) = 0; +}; + +// Vector of pointers to available monitor descriptions, filled by VideoInit() +static vector VideoMonitors; + +// Find Apple mode matching best specified dimensions +static int find_apple_resolution(int xsize, int ysize) +{ + if (xsize == 640 && ysize == 480) + return APPLE_640x480; + if (xsize == 800 && ysize == 600) + return APPLE_800x600; + if (xsize == 1024 && ysize == 768) + return APPLE_1024x768; + if (xsize == 1152 && ysize == 768) + return APPLE_1152x768; + if (xsize == 1152 && ysize == 900) + return APPLE_1152x900; + if (xsize == 1280 && ysize == 1024) + return APPLE_1280x1024; + if (xsize == 1600 && ysize == 1200) + return APPLE_1600x1200; + return APPLE_CUSTOM; +} + +// Display error alert +static void ErrorAlert(int error) +{ + ErrorAlert(GetString(error)); +} +#endif + + +/* + * monitor_desc subclass for SDL display + */ + +class SDL_monitor_desc : public monitor_desc { +public: + SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} + ~SDL_monitor_desc() {} + + virtual void switch_to_current_mode(void); + virtual void set_palette(uint8 *pal, int num); + + bool video_open(void); + void video_close(void); +}; + + +/* + * Utility functions + */ + +// Find palette size for given color depth +static int palette_size(int mode) +{ + switch (mode) { + case VIDEO_DEPTH_1BIT: return 2; + case VIDEO_DEPTH_2BIT: return 4; + case VIDEO_DEPTH_4BIT: return 16; + case VIDEO_DEPTH_8BIT: return 256; + case VIDEO_DEPTH_16BIT: return 32; + case VIDEO_DEPTH_32BIT: return 256; + default: return 0; + } +} + +// Map video_mode depth ID to numerical depth value +static int mac_depth_of_video_depth(int video_depth) +{ + int depth = -1; + switch (video_depth) { + case VIDEO_DEPTH_1BIT: + depth = 1; + break; + case VIDEO_DEPTH_2BIT: + depth = 2; + break; + case VIDEO_DEPTH_4BIT: + depth = 4; + break; + case VIDEO_DEPTH_8BIT: + depth = 8; + break; + case VIDEO_DEPTH_16BIT: + depth = 16; + break; + case VIDEO_DEPTH_32BIT: + depth = 32; + break; + default: + abort(); + } + return depth; +} + +// Map video_mode depth ID to SDL screen depth +static int sdl_depth_of_video_depth(int video_depth) +{ + return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); +} + +// Get screen dimensions +static void sdl_display_dimensions(int &width, int &height) +{ + static int max_width, max_height; + if (max_width == 0 && max_height == 0) { + max_width = 640 ; max_height = 480; + SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); + if (modes && modes != (SDL_Rect **)-1) { + // It turns out that on some implementations, and contrary to the documentation, + // the returned list is not sorted from largest to smallest (e.g. Windows) + for (int i = 0; modes[i] != NULL; i++) { + const int w = modes[i]->w; + const int h = modes[i]->h; + if (w > max_width && h > max_height) { + max_width = w; + max_height = h; + } + } + } + } + width = max_width; + height = max_height; +} + +static inline int sdl_display_width(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return width; +} + +static inline int sdl_display_height(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return height; +} + +// Check whether specified mode is available +static bool has_mode(int type, int width, int height, int depth) +{ + // Filter out out-of-bounds resolutions + if (width > sdl_display_width() || height > sdl_display_height()) + return false; + + // Rely on SDL capabilities + return SDL_VideoModeOK(width, height, + sdl_depth_of_video_depth(depth), + SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; +} + +// Add mode to list of supported modes +static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) +{ + // Filter out unsupported modes + if (!has_mode(type, width, height, depth)) + return; + + // Fill in VideoMode entry + VIDEO_MODE mode; +#ifdef SHEEPSHAVER + resolution_id = find_apple_resolution(width, height); + mode.viType = type; +#endif + VIDEO_MODE_X = width; + VIDEO_MODE_Y = height; + VIDEO_MODE_RESOLUTION = resolution_id; + VIDEO_MODE_ROW_BYTES = bytes_per_row; + VIDEO_MODE_DEPTH = (video_depth)depth; + VideoModes.push_back(mode); +} + +// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + int layout = FLAYOUT_DIRECT; + if (depth == VIDEO_DEPTH_16BIT) + layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; + else if (depth == VIDEO_DEPTH_32BIT) + layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; + MacFrameLayout = layout; + monitor.set_mac_frame_base(MacFrameBaseMac); + + // Set variables used by UAE memory banking + const VIDEO_MODE &mode = monitor.get_current_mode(); + MacFrameBaseHost = the_buffer; + MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + InitFrameBufferMapping(); +#else + monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); +#endif + D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); +} + +// Set window name and class +static void set_window_name(int name) +{ + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + if (vi && vi->wm_available) { + const char *str = GetString(name); + SDL_WM_SetCaption(str, str); + } +} + +// Set mouse grab mode +static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) +{ + const SDL_VideoInfo *vi = SDL_GetVideoInfo(); + return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); +} + +// Migrate preferences items (XXX to be handled in MigratePrefs()) +static void migrate_screen_prefs(void) +{ +#ifdef SHEEPSHAVER + // Look-up priorities are: "screen", "screenmodes", "windowmodes". + if (PrefsFindString("screen")) + return; + + uint32 window_modes = PrefsFindInt32("windowmodes"); + uint32 screen_modes = PrefsFindInt32("screenmodes"); + int width = 0, height = 0; + if (screen_modes) { + static const struct { + int id; + int width; + int height; + } + modes[] = { + { 1, 640, 480 }, + { 2, 800, 600 }, + { 4, 1024, 768 }, + { 64, 1152, 768 }, + { 8, 1152, 900 }, + { 16, 1280, 1024 }, + { 32, 1600, 1200 }, + { 0, } + }; + for (int i = 0; modes[i].id != 0; i++) { + if (screen_modes & modes[i].id) { + if (width < modes[i].width && height < modes[i].height) { + width = modes[i].width; + height = modes[i].height; + } + } + } + } else { + if (window_modes & 1) + width = 640, height = 480; + if (window_modes & 2) + width = 800, height = 600; + } + if (width && height) { + char str[32]; + sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); + PrefsReplaceString("screen", str); + } +#endif +} + +void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h) +{ + SDL_UpdateRect(screen, x, y, w, h); +} + +void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects) +{ + SDL_UpdateRects(screen, numrects, rects); +} + + +/* + * Display "driver" classes + */ + +class driver_base { +public: + driver_base(SDL_monitor_desc &m); + ~driver_base(); + + void init(); // One-time init + void set_video_mode(int flags); + void adapt_to_video_mode(); + + void update_palette(void); + void suspend(void) {} + void resume(void) {} + void toggle_mouse_grab(void); + void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } + + void disable_mouse_accel(void); + void restore_mouse_accel(void); + + void grab_mouse(void); + void ungrab_mouse(void); + +public: + SDL_monitor_desc &monitor; // Associated video monitor + const VIDEO_MODE &mode; // Video mode handled by the driver + + bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) + SDL_Surface *s; // The surface we draw into +}; + +#ifdef ENABLE_VOSF +static void update_display_window_vosf(driver_base *drv); +#endif +static void update_display_static(driver_base *drv); + +static driver_base *drv = NULL; // Pointer to currently used driver object + +#ifdef ENABLE_VOSF +# include "video_vosf.h" +#endif + +driver_base::driver_base(SDL_monitor_desc &m) + : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) +{ + the_buffer = NULL; + the_buffer_copy = NULL; +} + +void driver_base::set_video_mode(int flags) +{ + int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, + SDL_HWSURFACE | flags)) == NULL) + return; +#ifdef ENABLE_VOSF + the_host_buffer = (uint8 *)s->pixels; +#endif +} + +void driver_base::init() +{ + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + int aligned_height = (VIDEO_MODE_Y + 15) & ~15; + +#ifdef ENABLE_VOSF + use_vosf = true; + // Allocate memory for frame buffer (SIZE is extended to page-boundary) + the_buffer_size = page_extend((aligned_height + 2) * s->pitch); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + the_buffer_copy = (uint8 *)malloc(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + + // Check whether we can initialize the VOSF subsystem and it's profitable + if (!video_vosf_init(monitor)) { + WarningAlert(GetString(STR_VOSF_INIT_ERR)); + use_vosf = false; + } + else if (!video_vosf_profitable()) { + video_vosf_exit(); + printf("VOSF acceleration is not profitable on this platform, disabling it\n"); + use_vosf = false; + } + if (!use_vosf) { + free(the_buffer_copy); + vm_release(the_buffer, the_buffer_size); + the_host_buffer = NULL; + } +#endif + if (!use_vosf) { + // Allocate memory for frame buffer + the_buffer_size = (aligned_height + 2) * s->pitch; + the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); + } + + // Set frame buffer base + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); + + adapt_to_video_mode(); +} + +void driver_base::adapt_to_video_mode() { + ADBSetRelMouseMode(false); + + // Init blitting routines + SDL_PixelFormat *f = s->format; + VisualFormat visualFormat; + visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + visualFormat.Rmask = f->Rmask; + visualFormat.Gmask = f->Gmask; + visualFormat.Bmask = f->Bmask; + Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); + + // Load gray ramp to 8->16/32 expand map + if (!IsDirectMode(mode)) + for (int i=0; i<256; i++) + ExpandMap[i] = SDL_MapRGB(f, i, i, i); + + + bool hardware_cursor = false; +#ifdef SHEEPSHAVER + hardware_cursor = video_can_change_cursor(); + if (hardware_cursor) { + // Create cursor + if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { + SDL_SetCursor(sdl_cursor); + } + } + // Tell the video driver there's a change in cursor type + if (private_data) + private_data->cursorHardware = hardware_cursor; +#endif + // Hide cursor + SDL_ShowCursor(hardware_cursor); + + // Set window name/class + set_window_name(STR_WINDOW_TITLE); + + // Everything went well + init_ok = true; +} + +driver_base::~driver_base() +{ + ungrab_mouse(); + restore_mouse_accel(); + + if (s) + SDL_FreeSurface(s); + + // the_buffer shall always be mapped through vm_acquire_framebuffer() + if (the_buffer != VM_MAP_FAILED) { + D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); + vm_release_framebuffer(the_buffer, the_buffer_size); + the_buffer = NULL; + } + + // Free frame buffer(s) + if (!use_vosf) { + if (the_buffer_copy) { + free(the_buffer_copy); + the_buffer_copy = NULL; + } + } +#ifdef ENABLE_VOSF + else { + if (the_buffer_copy) { + D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); + free(the_buffer_copy); + the_buffer_copy = NULL; + } + + // Deinitialize VOSF + video_vosf_exit(); + } +#endif + + SDL_ShowCursor(1); +} + +// Palette has changed +void driver_base::update_palette(void) +{ + const VIDEO_MODE &mode = monitor.get_current_mode(); + + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) + SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); +} + +// Disable mouse acceleration +void driver_base::disable_mouse_accel(void) +{ +} + +// Restore mouse acceleration to original value +void driver_base::restore_mouse_accel(void) +{ +} + +// Toggle mouse grab +void driver_base::toggle_mouse_grab(void) +{ + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); +} + +// Grab mouse, switch to relative mouse mode +void driver_base::grab_mouse(void) +{ + if (!mouse_grabbed) { + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); + if (new_mode == SDL_GRAB_ON) { + disable_mouse_accel(); + mouse_grabbed = true; + } + } +} + +// Ungrab mouse, switch to absolute mouse mode +void driver_base::ungrab_mouse(void) +{ + if (mouse_grabbed) { + SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); + if (new_mode == SDL_GRAB_OFF) { + restore_mouse_accel(); + mouse_grabbed = false; + } + } +} + +/* + * Initialization + */ + +// Init keycode translation table +static void keycode_init(void) +{ + bool use_kc = PrefsFindBool("keycodes"); + if (use_kc) { + + // Get keycode file path from preferences + const char *kc_path = PrefsFindString("keycodefile"); + + // Open keycode table + FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + if (f == NULL) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); + WarningAlert(str); + return; + } + + // Default translation table + for (int i=0; i<256; i++) + keycode_table[i] = -1; + + // Search for server vendor string, then read keycodes + char video_driver[256]; + SDL_VideoDriverName(video_driver, sizeof(video_driver)); + bool video_driver_found = false; + char line[256]; + int n_keys = 0; + while (fgets(line, sizeof(line) - 1, f)) { + // Read line + int len = strlen(line); + if (len == 0) + continue; + line[len-1] = 0; + + // Comments begin with "#" or ";" + if (line[0] == '#' || line[0] == ';' || line[0] == 0) + continue; + + if (video_driver_found) { + // Skip aliases as long as we have read keycodes yet + // Otherwise, it's another mapping and we have to stop + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) + continue; + + // Read keycode + int x_code, mac_code; + if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) + keycode_table[x_code & 0xff] = mac_code, n_keys++; + else + break; + } else { + // Search for SDL video driver string + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { + char *p = line + sizeof(sdl_str); + if (strstr(video_driver, p) == video_driver) + video_driver_found = true; + } + } + } + + // Keycode file completely read + fclose(f); + use_keycodes = video_driver_found; + + // Vendor not found? Then display warning + if (!video_driver_found) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); + WarningAlert(str); + return; + } + + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); + } +} + +// Open display for current mode +bool SDL_monitor_desc::video_open(void) +{ + D(bug("video_open()\n")); +#if DEBUG + const VIDEO_MODE &mode = get_current_mode(); + D(bug("Current video mode:\n")); + D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); +#endif + + // Create display driver object of requested type + drv = new(std::nothrow) driver_base(*this); + if (drv == NULL) + return false; + drv->init(); + if (!drv->init_ok) { + delete drv; + drv = NULL; + return false; + } + +#ifdef WIN32 + // Chain in a new message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); +#endif + + // Initialize VideoRefresh function + VideoRefreshInit(); + + // Lock down frame buffer + LOCK_FRAME_BUFFER; + + // Start redraw/input thread +#ifndef USE_CPU_EMUL_SERVICES + redraw_thread_cancel = false; + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); + if (!redraw_thread_active) { + printf("FATAL: cannot create redraw thread\n"); + return false; + } +#else + redraw_thread_active = true; +#endif + return true; +} + +#ifdef SHEEPSHAVER +bool VideoInit(void) +{ + const bool classic = false; +#else +bool VideoInit(bool classic) +{ +#endif + classic_mode = classic; + +#ifdef ENABLE_VOSF + // Zero the mainBuffer structure + mainBuffer.dirtyPages = NULL; + mainBuffer.pageInfo = NULL; +#endif + + // Create Mutexes + if ((sdl_events_lock = SDL_CreateMutex()) == NULL) + return false; + if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) + return false; + if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) + return false; + + // Init keycode translation + keycode_init(); + + // Read prefs + frame_skip = PrefsFindInt32("frameskip"); + mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); + mouse_wheel_lines = PrefsFindInt32("mousewheellines"); + + // Get screen mode from preferences + migrate_screen_prefs(); + const char *mode_str = NULL; + if (classic_mode) + mode_str = "win/512/342"; + else + mode_str = PrefsFindString("screen"); + + // Determine display type and default dimensions + int default_width, default_height; + if (classic) { + default_width = 512; + default_height = 384; + } + else { + default_width = 640; + default_height = 480; + } + display_type = DISPLAY_WINDOW; + if (mode_str) { + if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_WINDOW; + else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_SCREEN; + } + if (default_width <= 0) + default_width = sdl_display_width(); + else if (default_width > sdl_display_width()) + default_width = sdl_display_width(); + if (default_height <= 0) + default_height = sdl_display_height(); + else if (default_height > sdl_display_height()) + default_height = sdl_display_height(); + + // Mac screen depth follows X depth + screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; + int default_depth; + switch (screen_depth) { + case 8: + default_depth = VIDEO_DEPTH_8BIT; + break; + case 15: case 16: + default_depth = VIDEO_DEPTH_16BIT; + break; + case 24: case 32: + default_depth = VIDEO_DEPTH_32BIT; + break; + default: + default_depth = VIDEO_DEPTH_1BIT; + break; + } + + // Initialize list of video modes to try + struct { + int w; + int h; + int resolution_id; + } +#ifdef SHEEPSHAVER + // Omit Classic resolutions + video_modes[] = { + { -1, -1, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#else + video_modes[] = { + { -1, -1, 0x80 }, + { 512, 384, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#endif + video_modes[0].w = default_width; + video_modes[0].h = default_height; + + // Construct list of supported modes + if (display_type == DISPLAY_WINDOW) { + if (classic) + add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); + else { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + } else if (display_type == DISPLAY_SCREEN) { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + if (w == 512 && h == 384) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + + if (VideoModes.empty()) { + ErrorAlert(STR_NO_XVISUAL_ERR); + return false; + } + + // Find requested default mode with specified dimensions + uint32 default_id; + std::vector::const_iterator i, end = VideoModes.end(); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + std::vector::const_iterator begin = VideoModes.begin(); + cur_mode = distance(begin, i); +#endif + break; + } + } + if (i == end) { // not found, use first available mode + const VIDEO_MODE & mode = VideoModes[0]; + default_depth = VIDEO_MODE_DEPTH; + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + cur_mode = 0; +#endif + } + +#ifdef SHEEPSHAVER + for (int i = 0; i < VideoModes.size(); i++) + VModes[i] = VideoModes[i]; + VideoInfo *p = &VModes[VideoModes.size()]; + p->viType = DIS_INVALID; // End marker + p->viRowBytes = 0; + p->viXsize = p->viYsize = 0; + p->viAppleMode = 0; + p->viAppleID = 0; +#endif + +#if DEBUG + D(bug("Available video modes:\n")); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + int bits = 1 << VIDEO_MODE_DEPTH; + if (bits == 16) + bits = 15; + else if (bits == 32) + bits = 24; + D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); + } +#endif + + int color_depth = get_customized_color_depth(default_depth); + + D(bug("Return get_customized_color_depth %d\n", color_depth)); + + // Create SDL_monitor_desc for this (the only) display + SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); + VideoMonitors.push_back(monitor); + + // Open display + return monitor->video_open(); +} + + +/* + * Deinitialization + */ + +// Close display +void SDL_monitor_desc::video_close(void) +{ + D(bug("video_close()\n")); + +#ifdef WIN32 + // Remove message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); +#endif + + // Stop redraw thread +#ifndef USE_CPU_EMUL_SERVICES + if (redraw_thread_active) { + redraw_thread_cancel = true; + SDL_WaitThread(redraw_thread, NULL); + } +#endif + redraw_thread_active = false; + + // Unlock frame buffer + UNLOCK_FRAME_BUFFER; + D(bug(" frame buffer unlocked\n")); + + // Close display + delete drv; + drv = NULL; +} + +void VideoExit(void) +{ + // Close displays + vector::iterator i, end = VideoMonitors.end(); + for (i = VideoMonitors.begin(); i != end; ++i) + dynamic_cast(*i)->video_close(); + + // Destroy locks + if (frame_buffer_lock) + SDL_DestroyMutex(frame_buffer_lock); + if (sdl_palette_lock) + SDL_DestroyMutex(sdl_palette_lock); + if (sdl_events_lock) + SDL_DestroyMutex(sdl_events_lock); +} + + +/* + * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) + */ + +void VideoQuitFullScreen(void) +{ + D(bug("VideoQuitFullScreen()\n")); + quit_full_screen = true; +} + +static void do_toggle_fullscreen(void) +{ +#ifndef USE_CPU_EMUL_SERVICES + // pause redraw thread + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; +#endif + + // save the mouse position + int x, y; + SDL_GetMouseState(&x, &y); + + // save the screen contents + SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, + drv->s->flags); + + // switch modes + display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW + : DISPLAY_SCREEN; + drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); + drv->adapt_to_video_mode(); + + // reset the palette +#ifdef SHEEPSHAVER + video_set_palette(); +#endif + drv->update_palette(); + + // restore the screen contents + SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); + SDL_FreeSurface(tmp_surface); + SDL_UpdateRect(drv->s, 0, 0, 0, 0); + + // reset the video refresh handler + VideoRefreshInit(); + + // while SetVideoMode is happening, control key up may be missed + ADBKeyUp(0x36); + + // restore the mouse position + SDL_WarpMouse(x, y); + + // resume redraw thread + toggle_fullscreen = false; +#ifndef USE_CPU_EMUL_SERVICES + thread_stop_req = false; +#endif +} + +/* + * Mac VBL interrupt + */ + +/* + * Execute video VBL routine + */ + +#ifdef SHEEPSHAVER +void VideoVBL(void) +{ + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; + + // Execute video VBL + if (private_data != NULL && private_data->interruptsEnabled) + VSLDoInterruptService(private_data->vslServiceID); +} +#else +void VideoInterrupt(void) +{ + // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() + SDL_PumpEvents(); + + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + // Setting the window name must happen on the main thread, else it doesn't work on + // some platforms - e.g. macOS Sierra. + if (mouse_grabbed_window_name_status != mouse_grabbed) { + set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); + mouse_grabbed_window_name_status = mouse_grabbed; + } + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; +} +#endif + + +/* + * Set palette + */ + +#ifdef SHEEPSHAVER +void video_set_palette(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 pal[256 * 3]; + for (int c = 0; c < n_colors; c++) { + pal[c*3 + 0] = mac_pal[c].red; + pal[c*3 + 1] = mac_pal[c].green; + pal[c*3 + 2] = mac_pal[c].blue; + } + monitor->set_palette(pal, n_colors); +} +#endif + +void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) +{ + const VIDEO_MODE &mode = get_current_mode(); + + if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { + // handle the gamma ramp + + if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey + return; // ignore + + uint16 red[256]; + uint16 green[256]; + uint16 blue[256]; + + int repeats = 256 / num_in; + + for (int i = 0; i < num_in; i++) { + for (int j = 0; j < repeats; j++) { + red[i*repeats + j] = pal[i*3 + 0] << 8; + green[i*repeats + j] = pal[i*3 + 1] << 8; + blue[i*repeats + j] = pal[i*3 + 2] << 8; + } + } + + // fill remaining entries (if any) with last value + for (int i = num_in * repeats; i < 256; i++) { + red[i] = pal[(num_in - 1) * 3] << 8; + green[i] = pal[(num_in - 1) * 3 + 1] << 8; + blue[i] = pal[(num_in - 1) * 3 + 2] << 8; + } + + bool changed = (memcmp(red, last_gamma_red, 512) != 0 || + memcmp(green, last_gamma_green, 512) != 0 || + memcmp(blue, last_gamma_blue, 512) != 0); + + if (changed) { + int result = SDL_SetGammaRamp(red, green, blue); + + if (result < 0) { + fprintf(stderr, "SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + } + + memcpy(last_gamma_red, red, 512); + memcpy(last_gamma_green, green, 512); + memcpy(last_gamma_blue, blue, 512); + } + + return; + } + + LOCK_PALETTE; + + // Convert colors to XColor array + int num_out = 256; + bool stretch = false; + SDL_Color *p = sdl_palette; + for (int i=0; ir = pal[c*3 + 0] * 0x0101; + p->g = pal[c*3 + 1] * 0x0101; + p->b = pal[c*3 + 2] * 0x0101; + p++; + } + + // Recalculate pixel color expansion map + if (!IsDirectMode(mode)) { + for (int i=0; i<256; i++) { + int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) + ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); + } + +#ifdef ENABLE_VOSF + if (use_vosf) { + // We have to redraw everything because the interpretation of pixel values changed + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + } +#endif + } + + // Tell redraw thread to change palette + sdl_palette_changed = true; + + UNLOCK_PALETTE; +} + + +/* + * Switch video mode + */ + +#ifdef SHEEPSHAVER +int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) +{ + /* return if no mode change */ + if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && + (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; + + /* first find video mode in table */ + for (int i=0; VModes[i].viType != DIS_INVALID; i++) { + if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && + (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { + csSave->saveMode = ReadMacInt16(ParamPtr + csMode); + csSave->saveData = ReadMacInt32(ParamPtr + csData); + csSave->savePage = ReadMacInt16(ParamPtr + csPage); + + // Disable interrupts and pause redraw thread + DisableInterrupt(); + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; + + cur_mode = i; + monitor_desc *monitor = VideoMonitors[0]; + monitor->switch_to_current_mode(); + + WriteMacInt32(ParamPtr + csBaseAddr, screen_base); + csSave->saveBaseAddr=screen_base; + csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ + csSave->saveMode=VModes[cur_mode].viAppleMode; + + // Enable interrupts and resume redraw thread + thread_stop_req = false; + EnableInterrupt(); + return noErr; + } + } + return paramErr; +} +#endif + +void SDL_monitor_desc::switch_to_current_mode(void) +{ + // Close and reopen display + LOCK_EVENTS; + video_close(); + video_open(); + UNLOCK_EVENTS; + + if (drv == NULL) { + ErrorAlert(STR_OPEN_WINDOW_ERR); + QuitEmulator(); + } +} + + +/* + * Can we set the MacOS cursor image into the window? + */ + +#ifdef SHEEPSHAVER +bool video_can_change_cursor(void) +{ + if (display_type != DISPLAY_WINDOW) + return false; + +#if defined(__APPLE__) + static char driver[] = "Quartz?"; + static int quartzok = -1; + + if (quartzok < 0) { + if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) + quartzok = true; + else { + // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. + const SDL_version *vp = SDL_Linked_Version(); + int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); + quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); + } + } + + return quartzok; +#else + return true; +#endif +} +#endif + + +/* + * Set cursor image for window + */ + +#ifdef SHEEPSHAVER +void video_set_cursor(void) +{ + // Set new cursor image if it was changed + if (sdl_cursor) { + SDL_FreeCursor(sdl_cursor); + sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); + if (sdl_cursor) { + SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); + SDL_SetCursor(sdl_cursor); + + // XXX Windows apparently needs an extra mouse event to + // make the new cursor image visible. + // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the + // mouse, we have to put it back. + bool move = false; +#ifdef WIN32 + move = true; +#elif defined(__APPLE__) + move = mouse_grabbed; +#endif + if (move) { + int visible = SDL_ShowCursor(-1); + if (visible) { + int x, y; + SDL_GetMouseState(&x, &y); + SDL_WarpMouse(x, y); + } + } + } + } +} +#endif + + +/* + * Keyboard-related utilify functions + */ + +static bool is_modifier_key(SDL_KeyboardEvent const & e) +{ + switch (e.keysym.sym) { + case SDLK_NUMLOCK: + case SDLK_CAPSLOCK: + case SDLK_SCROLLOCK: + case SDLK_RSHIFT: + case SDLK_LSHIFT: + case SDLK_RCTRL: + case SDLK_LCTRL: + case SDLK_RALT: + case SDLK_LALT: + case SDLK_RMETA: + case SDLK_LMETA: + case SDLK_LSUPER: + case SDLK_RSUPER: + case SDLK_MODE: + case SDLK_COMPOSE: + return true; + } + return false; +} + +static bool is_ctrl_down(SDL_keysym const & ks) +{ + return ctrl_down || (ks.mod & KMOD_CTRL); +} + + +/* + * Translate key event to Mac keycode, returns -1 if no keycode was found + * and -2 if the key was recognized as a hotkey + */ + +static int kc_decode(SDL_keysym const & ks, bool key_down) +{ + switch (ks.sym) { + case SDLK_a: return 0x00; + case SDLK_b: return 0x0b; + case SDLK_c: return 0x08; + case SDLK_d: return 0x02; + case SDLK_e: return 0x0e; + case SDLK_f: return 0x03; + case SDLK_g: return 0x05; + case SDLK_h: return 0x04; + case SDLK_i: return 0x22; + case SDLK_j: return 0x26; + case SDLK_k: return 0x28; + case SDLK_l: return 0x25; + case SDLK_m: return 0x2e; + case SDLK_n: return 0x2d; + case SDLK_o: return 0x1f; + case SDLK_p: return 0x23; + case SDLK_q: return 0x0c; + case SDLK_r: return 0x0f; + case SDLK_s: return 0x01; + case SDLK_t: return 0x11; + case SDLK_u: return 0x20; + case SDLK_v: return 0x09; + case SDLK_w: return 0x0d; + case SDLK_x: return 0x07; + case SDLK_y: return 0x10; + case SDLK_z: return 0x06; + + case SDLK_1: case SDLK_EXCLAIM: return 0x12; + case SDLK_2: case SDLK_AT: return 0x13; + case SDLK_3: case SDLK_HASH: return 0x14; + case SDLK_4: case SDLK_DOLLAR: return 0x15; + case SDLK_5: return 0x17; + case SDLK_6: return 0x16; + case SDLK_7: return 0x1a; + case SDLK_8: return 0x1c; + case SDLK_9: return 0x19; + case SDLK_0: return 0x1d; + + case SDLK_BACKQUOTE: return 0x0a; + case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; + case SDLK_EQUALS: case SDLK_PLUS: return 0x18; + case SDLK_LEFTBRACKET: return 0x21; + case SDLK_RIGHTBRACKET: return 0x1e; + case SDLK_BACKSLASH: return 0x2a; + case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; + case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; + case SDLK_COMMA: case SDLK_LESS: return 0x2b; + case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; + case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; + + case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; + case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; + case SDLK_SPACE: return 0x31; + case SDLK_BACKSPACE: return 0x33; + + case SDLK_DELETE: return 0x75; + case SDLK_INSERT: return 0x72; + case SDLK_HOME: case SDLK_HELP: return 0x73; + case SDLK_END: return 0x77; + case SDLK_PAGEUP: return 0x74; + case SDLK_PAGEDOWN: return 0x79; + + case SDLK_LCTRL: return 0x36; + case SDLK_RCTRL: return 0x36; + case SDLK_LSHIFT: return 0x38; + case SDLK_RSHIFT: return 0x38; +#if (defined(__APPLE__) && defined(__MACH__)) + case SDLK_LALT: return 0x3a; + case SDLK_RALT: return 0x3a; + case SDLK_LMETA: return 0x37; + case SDLK_RMETA: return 0x37; +#else + case SDLK_LALT: return 0x37; + case SDLK_RALT: return 0x37; + case SDLK_LMETA: return 0x3a; + case SDLK_RMETA: return 0x3a; +#endif + case SDLK_LSUPER: return 0x3a; // "Windows" key + case SDLK_RSUPER: return 0x3a; + case SDLK_MENU: return 0x32; + case SDLK_CAPSLOCK: return 0x39; + case SDLK_NUMLOCK: return 0x47; + + case SDLK_UP: return 0x3e; + case SDLK_DOWN: return 0x3d; + case SDLK_LEFT: return 0x3b; + case SDLK_RIGHT: return 0x3c; + + case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; + + case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; + case SDLK_F2: return 0x78; + case SDLK_F3: return 0x63; + case SDLK_F4: return 0x76; + case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; + case SDLK_F6: return 0x61; + case SDLK_F7: return 0x62; + case SDLK_F8: return 0x64; + case SDLK_F9: return 0x65; + case SDLK_F10: return 0x6d; + case SDLK_F11: return 0x67; + case SDLK_F12: return 0x6f; + + case SDLK_PRINT: return 0x69; + case SDLK_SCROLLOCK: return 0x6b; + case SDLK_PAUSE: return 0x71; + + case SDLK_KP0: return 0x52; + case SDLK_KP1: return 0x53; + case SDLK_KP2: return 0x54; + case SDLK_KP3: return 0x55; + case SDLK_KP4: return 0x56; + case SDLK_KP5: return 0x57; + case SDLK_KP6: return 0x58; + case SDLK_KP7: return 0x59; + case SDLK_KP8: return 0x5b; + case SDLK_KP9: return 0x5c; + case SDLK_KP_PERIOD: return 0x41; + case SDLK_KP_PLUS: return 0x45; + case SDLK_KP_MINUS: return 0x4e; + case SDLK_KP_MULTIPLY: return 0x43; + case SDLK_KP_DIVIDE: return 0x4b; + case SDLK_KP_ENTER: return 0x4c; + case SDLK_KP_EQUALS: return 0x51; + } + D(bug("Unhandled SDL keysym: %d\n", ks.sym)); + return -1; +} + +static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) +{ + return kc_decode(ev.keysym, key_down); +} + +static void force_complete_window_refresh() +{ + if (display_type == DISPLAY_WINDOW) { +#ifdef ENABLE_VOSF + if (use_vosf) { // VOSF refresh + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + } +#endif + // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. + const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); + const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + for (int i = 0; i < len; i++) + the_buffer_copy[i] = !the_buffer[i]; + } +} + +/* + * SDL event handling + */ + +static void handle_events(void) +{ + SDL_Event events[10]; + const int n_max_events = sizeof(events) / sizeof(events[0]); + int n_events; + + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { + for (int i = 0; i < n_events; i++) { + SDL_Event const & event = events[i]; + switch (event.type) { + + // Mouse button + case SDL_MOUSEBUTTONDOWN: { + unsigned int button = event.button.button; + if (button == SDL_BUTTON_LEFT) + ADBMouseDown(0); + else if (button == SDL_BUTTON_RIGHT) + ADBMouseDown(1); + else if (button == SDL_BUTTON_MIDDLE) + ADBMouseDown(2); + else if (button < 6) { // Wheel mouse + if (mouse_wheel_mode == 0) { + int key = (button == 5) ? 0x79 : 0x74; // Page up/down + ADBKeyDown(key); + ADBKeyUp(key); + } else { + int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down + for(int i=0; imouse_moved(event.motion.x, event.motion.y); + break; + + // Keyboard + case SDL_KEYDOWN: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, true); + if (code >= 0) { + if (!emul_suspended) { + if (code == 0x39) { // Caps Lock pressed + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyDown(code); + if (code == 0x36) + ctrl_down = true; + } else { + if (code == 0x31) + drv->resume(); // Space wakes us up + } + } + break; + } + case SDL_KEYUP: { + int code = -1; + if (use_keycodes && !is_modifier_key(event.key)) { + if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys + code = keycode_table[event.key.keysym.scancode & 0xff]; + } else + code = event2keycode(event.key, false); + if (code >= 0) { + if (code == 0x39) { // Caps Lock released + if (caps_on) { + ADBKeyUp(code); + caps_on = false; + } else { + ADBKeyDown(code); + caps_on = true; + } + } else + ADBKeyUp(code); + if (code == 0x36) + ctrl_down = false; + } + break; + } + + // Hidden parts exposed, force complete refresh of window + case SDL_VIDEOEXPOSE: + force_complete_window_refresh(); + break; + + // Window "close" widget clicked + case SDL_QUIT: + ADBKeyDown(0x7f); // Power key + ADBKeyUp(0x7f); + break; + + // Application activate/deactivate + case SDL_ACTIVEEVENT: + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + if (event.active.gain) + force_complete_window_refresh(); + break; + } + } + } +} + + +/* + * Window display update + */ + +// Static display update (fixed frame rate, but incremental) +static void update_display_static(driver_base *drv) +{ + // Incremental update code + int wide = 0, high = 0; + uint32 x1, x2, y1, y2; + const VIDEO_MODE &mode = drv->mode; + int bytes_per_row = VIDEO_MODE_ROW_BYTES; + uint8 *p, *p2; + + // Check for first line from top and first line from bottom that have changed + y1 = 0; + for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y1 = j; + break; + } + } + y2 = y1 - 1; + for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y2 = j; + break; + } + } + high = y2 - y1 + 1; + + // Check for first column from left and first column from right that have changed + if (high) { + if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { + const int src_bytes_per_row = bytes_per_row; + const int dst_bytes_per_row = drv->s->pitch; + const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; + + x1 = VIDEO_MODE_X / pixels_per_byte; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1; i++) { + if (*p != *p2) { + x1 = i; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { + p--; p2--; + if (*p != *p2) { + x2 = i; + break; + } + } + } + x1 *= pixels_per_byte; + x2 *= pixels_per_byte; + wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); + int di = y1 * dst_bytes_per_row + x1; + for (uint32 j = y1; j <= y2; j++) { + memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); + Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); + si += src_bytes_per_row; + di += dst_bytes_per_row; + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + SDL_UpdateRect(drv->s, x1, y1, wide, high); + } + + } else { + const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; + const int dst_bytes_per_row = drv->s->pitch; + + x1 = VIDEO_MODE_X; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { + if (*p != *p2) { + x1 = i / bytes_per_pixel; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { + p--; + p2--; + if (*p != *p2) { + x2 = i / bytes_per_pixel; + break; + } + } + } + wide = x2 - x1; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + for (uint32 j = y1; j <= y2; j++) { + uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; + int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; + memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); + Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + SDL_UpdateRect(drv->s, x1, y1, wide, high); + } + } + } +} + +// Static display update (fixed frame rate, bounding boxes based) +// XXX use NQD bounding boxes to help detect dirty areas? +static void update_display_static_bbox(driver_base *drv) +{ + const VIDEO_MODE &mode = drv->mode; + + // Allocate bounding boxes for SDL_UpdateRects() + const uint32 N_PIXELS = 64; + const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; + const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; + SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); + uint32 nr_boxes = 0; + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Update the surface from Mac screen + const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; + const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; + const uint32 dst_bytes_per_row = drv->s->pitch; + for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { + uint32 h = N_PIXELS; + if (h > VIDEO_MODE_Y - y) + h = VIDEO_MODE_Y - y; + for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { + uint32 w = N_PIXELS; + if (w > VIDEO_MODE_X - x) + w = VIDEO_MODE_X - x; + const int xs = w * bytes_per_pixel; + const int xb = x * bytes_per_pixel; + bool dirty = false; + for (uint32 j = y; j < (y + h); j++) { + const uint32 yb = j * bytes_per_row; + const uint32 dst_yb = j * dst_bytes_per_row; + if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { + memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); + Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); + dirty = true; + } + } + if (dirty) { + boxes[nr_boxes].x = x; + boxes[nr_boxes].y = y; + boxes[nr_boxes].w = w; + boxes[nr_boxes].h = h; + nr_boxes++; + } + } + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + if (nr_boxes) + SDL_UpdateRects(drv->s, nr_boxes, boxes); +} + + +// We suggest the compiler to inline the next two functions so that it +// may specialise the code according to the current screen depth and +// display type. A clever compiler would do that job by itself though... + +// NOTE: update_display_vosf is inlined too + +static inline void possibly_quit_dga_mode() +{ + // Quit DGA mode if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + delete drv; + drv = NULL; + } +} + +static inline void possibly_ungrab_mouse() +{ + // Ungrab mouse if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + if (drv) + drv->ungrab_mouse(); + } +} + +static inline void handle_palette_changes(void) +{ + LOCK_PALETTE; + + if (sdl_palette_changed) { + sdl_palette_changed = false; + drv->update_palette(); + } + + UNLOCK_PALETTE; +} + +static void video_refresh_window_static(void); + +static void video_refresh_dga(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + video_refresh_window_static(); +} + +#ifdef ENABLE_VOSF +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static void video_refresh_dga_vosf(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_dga_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif + +static void video_refresh_window_vosf(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_window_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif // def ENABLE_VOSF + +static void video_refresh_window_static(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (static variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + const VIDEO_MODE &mode = drv->mode; + if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) + update_display_static_bbox(drv); + else + update_display_static(drv); + } +} + + +/* + * Thread for screen refresh, input handling etc. + */ + +static void VideoRefreshInit(void) +{ + // TODO: set up specialised 8bpp VideoRefresh handlers ? + if (display_type == DISPLAY_SCREEN) { +#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) + if (use_vosf) + video_refresh = video_refresh_dga_vosf; + else +#endif + video_refresh = video_refresh_dga; + } + else { +#ifdef ENABLE_VOSF + if (use_vosf) + video_refresh = video_refresh_window_vosf; + else +#endif + video_refresh = video_refresh_window_static; + } +} + +static inline void do_video_refresh(void) +{ + // Handle SDL events + handle_events(); + + // Update display + video_refresh(); + + + // Set new palette if it was changed + handle_palette_changes(); +} + +// This function is called on non-threaded platforms from a timer interrupt +void VideoRefresh(void) +{ + // We need to check redraw_thread_active to inhibit refreshed during + // mode changes on non-threaded platforms + if (!redraw_thread_active) + return; + + // Process pending events and update display + do_video_refresh(); +} + +const int VIDEO_REFRESH_HZ = 60; +const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; + +#ifndef USE_CPU_EMUL_SERVICES +static int redraw_func(void *arg) +{ + uint64 start = GetTicks_usec(); + int64 ticks = 0; + uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; + + while (!redraw_thread_cancel) { + + // Wait + next += VIDEO_REFRESH_DELAY; + int32 delay = int32(next - GetTicks_usec()); + if (delay > 0) + Delay_usec(delay); + else if (delay < -VIDEO_REFRESH_DELAY) + next = GetTicks_usec(); + ticks++; + + // Pause if requested (during video mode switches) + if (thread_stop_req) { + thread_stop_ack = true; + continue; + } + + // Process pending events and update display + do_video_refresh(); + } + + uint64 end = GetTicks_usec(); + D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); + return 0; +} +#endif + + +/* + * Record dirty area from NQD + */ + +#ifdef SHEEPSHAVER +void video_set_dirty_area(int x, int y, int w, int h) +{ +#ifdef ENABLE_VOSF + const VIDEO_MODE &mode = drv->mode; + const unsigned screen_width = VIDEO_MODE_X; + const unsigned screen_height = VIDEO_MODE_Y; + const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; + + if (use_vosf) { + vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); + return; + } +#endif + + // XXX handle dirty bounding boxes for non-VOSF modes +} +#endif + +#endif // ends: SDL version check diff --git a/SheepShaver/src/SDL/video_sdl2.cpp b/SheepShaver/src/SDL/video_sdl2.cpp new file mode 100644 index 000000000..77f53fa96 --- /dev/null +++ b/SheepShaver/src/SDL/video_sdl2.cpp @@ -0,0 +1,2869 @@ +/* + * video_sdl2.cpp - Video/graphics emulation, SDL 2.x specific stuff + * + * Basilisk II (C) 1997-2008 Christian Bauer + * + * 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 + */ + +/* + * NOTES: + * The Ctrl key works like a qualifier for special actions: + * Ctrl-Tab = suspend DGA mode (TODO) + * Ctrl-Esc = emergency quit + * Ctrl-F1 = mount floppy + * Ctrl-F5 = grab mouse (in windowed mode) + * + * FIXMEs and TODOs: + * - Windows requires an extra mouse event to update the actual cursor image? + * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux + * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) + * - Mouse acceleration, there is no API in SDL yet for that + * - Gamma tables support is likely to be broken here + * - Events processing is bound to the general emulation thread as SDL requires + * to PumpEvents() within the same thread as the one that called SetVideoMode(). + * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. + * - Backport hw cursor acceleration to Basilisk II? + * - Factor out code + */ + +#include "sysdeps.h" + +#include +#if SDL_VERSION_ATLEAST(2,0,0) + +#include +#include +#include +#include +#include + +#ifdef __MACOSX__ +#include "utils_macosx.h" +#endif + +#ifdef WIN32 +#include /* alloca() */ +#endif + +#include +#include "main.h" +#include "adb.h" +#include "macos_util.h" +#include "prefs.h" +#include "user_strings.h" +#include "video.h" +#include "video_defs.h" +#include "video_blit.h" +#include "vm_alloc.h" + +#define DEBUG 0 +#include "debug.h" + +#define CODE_INVALID -1 +#define CODE_HOTKEY -2 + +// Supported video modes +using std::vector; +static vector VideoModes; + +// Display types +#ifdef SHEEPSHAVER +enum { + DISPLAY_WINDOW = DIS_WINDOW, // windowed display + DISPLAY_SCREEN = DIS_SCREEN // fullscreen display +}; +extern int display_type; // See enum above +#else +enum { + DISPLAY_WINDOW, // windowed display + DISPLAY_SCREEN // fullscreen display +}; +static int display_type = DISPLAY_WINDOW; // See enum above +#endif + +// Constants +#if defined(__MACOSX__) || defined(WIN32) +const char KEYCODE_FILE_NAME[] = "keycodes"; +const char KEYCODE_FILE_NAME2[] = "BasiliskII_keycodes"; +#else +const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; +const char KEYCODE_FILE_NAME2[] = DATADIR "/BasiliskII_keycodes"; +#endif + + +// Global variables +static uint32 frame_skip; // Prefs items +static int16 mouse_wheel_mode; +static int16 mouse_wheel_lines; +static bool mouse_wheel_reverse; + +static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) +static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) +static uint32 the_buffer_size; // Size of allocated the_buffer + +static bool redraw_thread_active = false; // Flag: Redraw thread installed +#ifndef USE_CPU_EMUL_SERVICES +static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread +static SDL_Thread *redraw_thread = NULL; // Redraw thread +static volatile bool thread_stop_req = false; +static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req +#endif + +#ifdef ENABLE_VOSF +static bool use_vosf = false; // Flag: VOSF enabled +#else +static const bool use_vosf = false; // VOSF not possible +#endif + +static bool ctrl_down = false; // Flag: Ctrl key pressed +static bool opt_down = false; // Flag: Opt key pressed +static bool cmd_down = false; // Flag: Cmd key pressed +static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread +static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread +static bool emul_suspended = false; // Flag: Emulator suspended + +static bool classic_mode = false; // Flag: Classic Mac video mode + +static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms +static int keycode_table[256]; // X keycode -> Mac keycode translation table + +// SDL variables +SDL_Window * sdl_window = NULL; // Wraps an OS-native window +static SDL_Surface * host_surface = NULL; // Surface in host-OS display format +static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format +static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer +static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) +static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to +static SDL_Rect sdl_update_video_rect = {0,0,0,0}; // Union of all rects to update, when updating sdl_texture +static SDL_mutex * sdl_update_video_mutex = NULL; // Mutex to protect sdl_update_video_rect +static int screen_depth; // Depth of current screen +static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor +static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table +static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors +static bool toggle_fullscreen = false; +static bool did_add_event_watch = false; + +static bool mouse_grabbed = false; + +// Mutex to protect SDL events +static SDL_mutex *sdl_events_lock = NULL; +#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) +#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) + +// Mutex to protect palette +static SDL_mutex *sdl_palette_lock = NULL; +#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) +#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) + +// Mutex to protect frame buffer +static SDL_mutex *frame_buffer_lock = NULL; +#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) +#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) + +// Initially set gamma tables +static uint16 init_gamma_red[256]; +static uint16 init_gamma_green[256]; +static uint16 init_gamma_blue[256]; +static bool init_gamma_valid; + +// Previously set gamma tables +static uint16 last_gamma_red[256]; +static uint16 last_gamma_green[256]; +static uint16 last_gamma_blue[256]; + +// Video refresh function +static void VideoRefreshInit(void); +static void (*video_refresh)(void); + + +// Prototypes +static int redraw_func(void *arg); +static int present_sdl_video(); +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); +static bool is_fullscreen(SDL_Window *); + +// From sys_unix.cpp +extern void SysMountFirstFloppy(void); + + +/* + * SDL surface locking glue + */ + +#ifdef ENABLE_VOSF +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ + if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ + the_host_buffer = (uint8 *)(SURFACE)->pixels; \ +} while (0) +#else +#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) +#endif + +#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) { \ + SDL_LockSurface(SURFACE); \ + SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ + } \ +} while (0) + +#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ + if (SDL_MUSTLOCK(SURFACE)) \ + SDL_UnlockSurface(SURFACE); \ +} while (0) + + +/* + * Framebuffer allocation routines + */ + +static void *vm_acquire_framebuffer(uint32 size) +{ +#ifdef HAVE_MACH_VM + return vm_acquire_reserved(size); +#else + // always try to reallocate framebuffer at the same address + static void *fb = VM_MAP_FAILED; + if (fb != VM_MAP_FAILED) { + if (vm_acquire_fixed(fb, size) < 0) { +#ifndef SHEEPSHAVER + printf("FATAL: Could not reallocate framebuffer at previous address\n"); +#endif + fb = VM_MAP_FAILED; + } + } + if (fb == VM_MAP_FAILED) + fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); + return fb; +#endif +} + +static inline void vm_release_framebuffer(void *fb, uint32 size) +{ +#ifndef HAVE_MACH_VM + vm_release(fb, size); +#endif +} + +static inline int get_customized_color_depth(int default_depth) +{ + int display_color_depth = PrefsFindInt32("displaycolordepth"); + + D(bug("Get displaycolordepth %d\n", display_color_depth)); + + if(0 == display_color_depth) + return default_depth; + else{ + switch (display_color_depth) { + case 8: + return VIDEO_DEPTH_8BIT; + case 15: case 16: + return VIDEO_DEPTH_16BIT; + case 24: case 32: + return VIDEO_DEPTH_32BIT; + default: + return default_depth; + } + } +} + +/* + * Windows message handler + */ + +#ifdef WIN32 +#include +static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL + +extern void SysMediaArrived(void); +extern void SysMediaRemoved(void); +extern HWND GetMainWindowHandle(void); + +static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) +{ + switch (msg) { + case WM_DEVICECHANGE: + if (wParam == DBT_DEVICEREMOVECOMPLETE) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaRemoved(); + } + else if (wParam == DBT_DEVICEARRIVAL) { + DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; + if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) + SysMediaArrived(); + } + return 0; + + default: + if (sdl_window_proc) + return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); + } + + return DefWindowProc(hwnd, msg, wParam, lParam); +} +#endif + + +/* + * SheepShaver glue + */ + +#ifdef SHEEPSHAVER +// Color depth modes type +typedef int video_depth; + +// 1, 2, 4 and 8 bit depths use a color palette +static inline bool IsDirectMode(VIDEO_MODE const & mode) +{ + return IsDirectMode(mode.viAppleMode); +} + +// Abstract base class representing one (possibly virtual) monitor +// ("monitor" = rectangular display with a contiguous frame buffer) +class monitor_desc { +public: + monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} + virtual ~monitor_desc() {} + + // Get current Mac frame buffer base address + uint32 get_mac_frame_base(void) const {return screen_base;} + + // Set Mac frame buffer base address (called from switch_to_mode()) + void set_mac_frame_base(uint32 base) {screen_base = base;} + + // Get current video mode + const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} + + // Called by the video driver to switch the video mode on this display + // (must call set_mac_frame_base()) + virtual void switch_to_current_mode(void) = 0; + + // Called by the video driver to set the color palette (in indexed modes) + virtual void set_palette(uint8 *pal, int num) = 0; + + // Called by the video driver to set the gamma table + virtual void set_gamma(uint8 *gamma, int num) = 0; +}; + +// Vector of pointers to available monitor descriptions, filled by VideoInit() +static vector VideoMonitors; + +// Find Apple mode matching best specified dimensions +static int find_apple_resolution(int xsize, int ysize) +{ + if (xsize == 640 && ysize == 480) + return APPLE_640x480; + if (xsize == 800 && ysize == 600) + return APPLE_800x600; + if (xsize == 1024 && ysize == 768) + return APPLE_1024x768; + if (xsize == 1152 && ysize == 768) + return APPLE_1152x768; + if (xsize == 1152 && ysize == 900) + return APPLE_1152x900; + if (xsize == 1280 && ysize == 1024) + return APPLE_1280x1024; + if (xsize == 1600 && ysize == 1200) + return APPLE_1600x1200; + return APPLE_CUSTOM; +} + +// Display error alert +static void ErrorAlert(int error) +{ + ErrorAlert(GetString(error)); +} +#endif + + +/* + * monitor_desc subclass for SDL display + */ + +class SDL_monitor_desc : public monitor_desc { +public: + SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} + ~SDL_monitor_desc() {} + + virtual void switch_to_current_mode(void); + virtual void set_palette(uint8 *pal, int num); + virtual void set_gamma(uint8 *gamma, int num); + + bool video_open(void); + void video_close(void); +}; + + +/* + * Utility functions + */ + +// Find palette size for given color depth +static int palette_size(int mode) +{ + switch (mode) { + case VIDEO_DEPTH_1BIT: return 2; + case VIDEO_DEPTH_2BIT: return 4; + case VIDEO_DEPTH_4BIT: return 16; + case VIDEO_DEPTH_8BIT: return 256; + case VIDEO_DEPTH_16BIT: return 32; + case VIDEO_DEPTH_32BIT: return 256; + default: return 0; + } +} + +// Map video_mode depth ID to numerical depth value +static int mac_depth_of_video_depth(int video_depth) +{ + int depth = -1; + switch (video_depth) { + case VIDEO_DEPTH_1BIT: + depth = 1; + break; + case VIDEO_DEPTH_2BIT: + depth = 2; + break; + case VIDEO_DEPTH_4BIT: + depth = 4; + break; + case VIDEO_DEPTH_8BIT: + depth = 8; + break; + case VIDEO_DEPTH_16BIT: + depth = 16; + break; + case VIDEO_DEPTH_32BIT: + depth = 32; + break; + default: + abort(); + } + return depth; +} + +// Map video_mode depth ID to SDL screen depth +static int sdl_depth_of_video_depth(int video_depth) +{ + return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); +} + +// Get screen dimensions +static void sdl_display_dimensions(int &width, int &height) +{ + SDL_DisplayMode desktop_mode; + const int display_index = 0; // TODO: try supporting multiple displays + if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { + // TODO: report a warning, here? + width = height = 0; + return; + } + width = desktop_mode.w; + height = desktop_mode.h; +} + +static inline int sdl_display_width(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return width; +} + +static inline int sdl_display_height(void) +{ + int width, height; + sdl_display_dimensions(width, height); + return height; +} + +// Check whether specified mode is available +static bool has_mode(int type, int width, int height, int depth) +{ + // Filter out out-of-bounds resolutions + if (width > sdl_display_width() || height > sdl_display_height()) + return false; + + // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. + return true; +} + +// Add mode to list of supported modes +static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) +{ + // Filter out unsupported modes + if (!has_mode(type, width, height, depth)) + return; + + // Fill in VideoMode entry + VIDEO_MODE mode; +#ifdef SHEEPSHAVER + resolution_id = find_apple_resolution(width, height); + mode.viType = type; +#endif + VIDEO_MODE_X = width; + VIDEO_MODE_Y = height; + VIDEO_MODE_RESOLUTION = resolution_id; + VIDEO_MODE_ROW_BYTES = bytes_per_row; + VIDEO_MODE_DEPTH = (video_depth)depth; + VideoModes.push_back(mode); +} + +// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) +{ +#if !REAL_ADDRESSING && !DIRECT_ADDRESSING + int layout = FLAYOUT_DIRECT; + if (depth == VIDEO_DEPTH_16BIT) + layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; + else if (depth == VIDEO_DEPTH_32BIT) + layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; + if (native_byte_order) + MacFrameLayout = layout; + else + MacFrameLayout = FLAYOUT_DIRECT; + monitor.set_mac_frame_base(MacFrameBaseMac); + + // Set variables used by UAE memory banking + const VIDEO_MODE &mode = monitor.get_current_mode(); + MacFrameBaseHost = the_buffer; + MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + InitFrameBufferMapping(); +#else + monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); +#endif + D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); +} + +// Set window name and class +static void set_window_name() { + if (!sdl_window) return; + const char *title = PrefsFindString("title"); + std::string s = title ? title : GetString(STR_WINDOW_TITLE); + if (mouse_grabbed) { + s += GetString(STR_WINDOW_TITLE_GRABBED0); + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); + if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); + if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); + s += GetString(STR_WINDOW_TITLE_GRABBED4); + } + SDL_SetWindowTitle(sdl_window, s.c_str()); +} + +// Migrate preferences items (XXX to be handled in MigratePrefs()) +static void migrate_screen_prefs(void) +{ +#ifdef SHEEPSHAVER + // Look-up priorities are: "screen", "screenmodes", "windowmodes". + if (PrefsFindString("screen")) + return; + + uint32 window_modes = PrefsFindInt32("windowmodes"); + uint32 screen_modes = PrefsFindInt32("screenmodes"); + int width = 0, height = 0; + if (screen_modes) { + static const struct { + int id; + int width; + int height; + } + modes[] = { + { 1, 640, 480 }, + { 2, 800, 600 }, + { 4, 1024, 768 }, + { 64, 1152, 768 }, + { 8, 1152, 900 }, + { 16, 1280, 1024 }, + { 32, 1600, 1200 }, + { 0, } + }; + for (int i = 0; modes[i].id != 0; i++) { + if (screen_modes & modes[i].id) { + if (width < modes[i].width && height < modes[i].height) { + width = modes[i].width; + height = modes[i].height; + } + } + } + } else { + if (window_modes & 1) + width = 640, height = 480; + if (window_modes & 2) + width = 800, height = 600; + } + if (width && height) { + char str[32]; + sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); + PrefsReplaceString("screen", str); + } +#endif +} + + +/* + * Display "driver" classes + */ + +class driver_base { +public: + driver_base(SDL_monitor_desc &m); + ~driver_base(); + + void init(); // One-time init + void set_video_mode(int flags); + void adapt_to_video_mode(); + + void update_palette(void); + void suspend(void) {} + void resume(void) {} + void toggle_mouse_grab(void); + void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } + + void disable_mouse_accel(void); + void restore_mouse_accel(void); + + void grab_mouse(void); + void ungrab_mouse(void); + +public: + SDL_monitor_desc &monitor; // Associated video monitor + const VIDEO_MODE &mode; // Video mode handled by the driver + + bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) + SDL_Surface *s; // The surface we draw into +}; + +#ifdef ENABLE_VOSF +static void update_display_window_vosf(driver_base *drv); +#endif +static void update_display_static(driver_base *drv); + +static driver_base *drv = NULL; // Pointer to currently used driver object + +#ifdef ENABLE_VOSF +# include "video_vosf.h" +#endif + +driver_base::driver_base(SDL_monitor_desc &m) + : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) +{ + the_buffer = NULL; + the_buffer_copy = NULL; +} + +static void delete_sdl_video_surfaces() +{ + if (sdl_texture) { + SDL_DestroyTexture(sdl_texture); + sdl_texture = NULL; + } + + if (host_surface) { + if (host_surface == guest_surface) { + guest_surface = NULL; + } + + SDL_FreeSurface(host_surface); + host_surface = NULL; + } + + if (guest_surface) { + SDL_FreeSurface(guest_surface); + guest_surface = NULL; + } +} + +static void delete_sdl_video_window() +{ + if (sdl_renderer) { + SDL_DestroyRenderer(sdl_renderer); + sdl_renderer = NULL; + } + + if (sdl_window) { + SDL_DestroyWindow(sdl_window); + sdl_window = NULL; + } +} + +static void shutdown_sdl_video() +{ + delete_sdl_video_surfaces(); + delete_sdl_video_window(); +} + +static int get_mag_rate() +{ + int m = PrefsFindInt32("mag_rate"); + return m < 1 ? 1 : m > 4 ? 4 : m; +} + +static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) +{ + if (guest_surface) { + delete_sdl_video_surfaces(); + } + + int window_width = width; + int window_height = height; + Uint32 window_flags = SDL_WINDOW_ALLOW_HIGHDPI; + const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; + + if (flags & SDL_WINDOW_FULLSCREEN) { + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { + shutdown_sdl_video(); + return NULL; + } +#ifdef __MACOSX__ + window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; + window_width = desktop_mode.w; + window_height = desktop_mode.h; +#else + window_flags |= SDL_WINDOW_FULLSCREEN; +#endif + } + + if (sdl_window) { + int old_window_width, old_window_height, old_window_flags; + SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); + old_window_flags = SDL_GetWindowFlags(sdl_window); + if (old_window_width != window_width || + old_window_height != window_height || + (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) + { + delete_sdl_video_window(); + } + } + + SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); + +#if defined(__MACOSX__) && SDL_VERSION_ATLEAST(2,0,14) + if (MetalIsAvailable()) window_flags |= SDL_WINDOW_METAL; +#endif + + if (!sdl_window) { + int m = get_mag_rate(); + sdl_window = SDL_CreateWindow( + "", + SDL_WINDOWPOS_UNDEFINED, + SDL_WINDOWPOS_UNDEFINED, + m * window_width, + m * window_height, + window_flags); + if (!sdl_window) { + shutdown_sdl_video(); + return NULL; + } + set_window_name(); + } + if (flags & SDL_WINDOW_FULLSCREEN) SDL_SetWindowGrab(sdl_window, SDL_TRUE); + + // Some SDL events (regarding some native-window events), need processing + // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which + // allows events to be processed as they are generated. + if (!did_add_event_watch) { + SDL_AddEventWatch(&on_sdl_event_generated, NULL); + did_add_event_watch = true; + } + + if (!sdl_renderer) { + const char *render_driver = PrefsFindString("sdlrender"); + if (render_driver) { + SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); + } + else { +#ifdef WIN32 + SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); +#elif defined(__MACOSX__) && SDL_VERSION_ATLEAST(2,0,14) + SDL_SetHint(SDL_HINT_RENDER_DRIVER, window_flags & SDL_WINDOW_METAL ? "metal" : "opengl"); +#else + SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); +#endif + } + + bool sdl_vsync = PrefsFindBool("sdl_vsync"); + if (sdl_vsync) { + SDL_SetHint(SDL_HINT_RENDER_VSYNC, "1"); + } + + sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); + + if (!sdl_renderer) { + shutdown_sdl_video(); + return NULL; + } + sdl_renderer_thread_id = SDL_ThreadID(); + + SDL_RendererInfo info; + memset(&info, 0, sizeof(info)); + SDL_GetRendererInfo(sdl_renderer, &info); + printf("Using SDL_Renderer driver: %s\n", (info.name ? info.name : "(null)")); + } + + if (!sdl_update_video_mutex) { + sdl_update_video_mutex = SDL_CreateMutex(); + } + + SDL_assert(sdl_texture == NULL); + sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STREAMING, width, height); + if (!sdl_texture) { + shutdown_sdl_video(); + return NULL; + } + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; + + SDL_assert(guest_surface == NULL); + SDL_assert(host_surface == NULL); + switch (bpp) { + case 8: + guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); + break; + case 16: + guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); + break; + case 32: + guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); + host_surface = guest_surface; + break; + default: + printf("WARNING: An unsupported bpp of %d was used\n", bpp); + break; + } + if (!guest_surface) { + shutdown_sdl_video(); + return NULL; + } + + if (!host_surface) { + Uint32 texture_format; + if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { + printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + int bpp; + Uint32 Rmask, Gmask, Bmask, Amask; + if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { + printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); + if (!host_surface) { + printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + } + + if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { + printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", + width, height, SDL_GetError()); + shutdown_sdl_video(); + return NULL; + } + + SDL_RenderSetIntegerScale(sdl_renderer, PrefsFindBool("scale_integer") ? SDL_TRUE : SDL_FALSE); + + return guest_surface; +} + +static int present_sdl_video() +{ + if (SDL_RectEmpty(&sdl_update_video_rect)) return 0; + + if (!sdl_renderer || !sdl_texture || !guest_surface) { + printf("WARNING: A video mode does not appear to have been set.\n"); + return -1; + } + + // Some systems, such as D3D9, can fail if and when they are used across + // certain operations. To address this, only utilize SDL_Renderer in a + // single thread, preferably the main thread. + // + // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 + // "BasiliskII, Win32: resizing a window does not stretch " + SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); + + // Make sure the display's internal (to SDL, possibly the OS) buffer gets + // cleared. Not doing so can, if and when letterboxing is applied (whereby + // colored bars are drawn on the screen's sides to help with aspect-ratio + // correction), the colored bars can be an unknown color. + SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black + SDL_RenderClear(sdl_renderer); // Clear the display + + // We're about to work with sdl_update_video_rect, so stop other threads from + // modifying it! + LOCK_PALETTE; + SDL_LockMutex(sdl_update_video_mutex); + // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. + if (host_surface != guest_surface && + host_surface != NULL && + guest_surface != NULL) + { + SDL_Rect destRect = sdl_update_video_rect; + int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); + if (result != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); + UNLOCK_PALETTE; + return -1; + } + } + UNLOCK_PALETTE; // passed potential deadlock, can unlock palette + + // Update the host OS' texture + void * srcPixels = (void *)((uint8_t *)host_surface->pixels + + sdl_update_video_rect.y * host_surface->pitch + + sdl_update_video_rect.x * host_surface->format->BytesPerPixel); + + if (SDL_UpdateTexture(sdl_texture, &sdl_update_video_rect, srcPixels, host_surface->pitch) != 0) { + SDL_UnlockMutex(sdl_update_video_mutex); + return -1; + } + + // We are done working with pixels in host_surface. Reset sdl_update_video_rect, then let + // other threads modify it, as-needed. + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = 0; + sdl_update_video_rect.h = 0; + SDL_UnlockMutex(sdl_update_video_mutex); + + // Copy the texture to the display + if (SDL_RenderCopy(sdl_renderer, sdl_texture, NULL, NULL) != 0) { + return -1; + } + + // Update the display + SDL_RenderPresent(sdl_renderer); + + // Indicate success to the caller! + return 0; +} + +void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) +{ + // TODO: make sure SDL_Renderer resources get displayed, if and when + // MacsBug is running (and VideoInterrupt() might not get called) + + SDL_LockMutex(sdl_update_video_mutex); + for (int i = 0; i < numrects; ++i) { + SDL_UnionRect(&sdl_update_video_rect, &rects[i], &sdl_update_video_rect); + } + SDL_UnlockMutex(sdl_update_video_mutex); +} + +void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) +{ + SDL_Rect temp = {x, y, w, h}; + update_sdl_video(s, 1, &temp); +} + +#ifdef SHEEPSHAVER +static void MagBits(Uint8 *dst, Uint8 *src, int mag) { + for (int y = 0; y < 16; y++) + for (int x = 0; x < 16; x++) { + int sa = 16 * y + x; + if (!(src[sa >> 3] & 0x80 >> (sa & 7))) continue; + for (int dy = 0; dy < mag; dy++) + for (int dx = 0; dx < mag; dx++) { + int da = 16 * mag * (mag * y + dy) + mag * x + dx; + dst[da >> 3] |= 0x80 >> (da & 7); + } + } +} +static SDL_Cursor *MagCursor(bool hot) { + int w, h; + SDL_GetWindowSize(sdl_window, &w, &h); + int mag = std::min(w / drv->VIDEO_MODE_X, h / drv->VIDEO_MODE_Y); + Uint8 *data = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); + MagBits(data, &MacCursor[4], mag); + MagBits(mask, &MacCursor[36], mag); + SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] * mag : 0, hot ? MacCursor[3] * mag : 0); + SDL_free(data); + SDL_free(mask); + return cursor; +} +#endif + +void driver_base::set_video_mode(int flags) +{ + int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) + return; +#ifdef ENABLE_VOSF + the_host_buffer = (uint8 *)s->pixels; +#endif +} + +void driver_base::init() +{ + set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); + int aligned_height = (VIDEO_MODE_Y + 15) & ~15; + +#ifdef ENABLE_VOSF + use_vosf = true; + // Allocate memory for frame buffer (SIZE is extended to page-boundary) + the_buffer_size = page_extend((aligned_height + 2) * s->pitch); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + the_buffer_copy = (uint8 *)malloc(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + + // Check whether we can initialize the VOSF subsystem and it's profitable + if (!video_vosf_init(monitor)) { + WarningAlert(GetString(STR_VOSF_INIT_ERR)); + use_vosf = false; + } + else if (!video_vosf_profitable()) { + video_vosf_exit(); + printf("VOSF acceleration is not profitable on this platform, disabling it\n"); + use_vosf = false; + } + if (!use_vosf) { + free(the_buffer_copy); + vm_release(the_buffer, the_buffer_size); + the_host_buffer = NULL; + } +#endif + if (!use_vosf) { + // Allocate memory for frame buffer + the_buffer_size = (aligned_height + 2) * s->pitch; + the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); + the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); + } + + // Set frame buffer base + set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); + + adapt_to_video_mode(); + + // set default B/W palette + sdl_palette = SDL_AllocPalette(256); + sdl_palette->colors[1] = (SDL_Color){ .r = 0, .g = 0, .b = 0, .a = 255 }; + SDL_SetSurfacePalette(s, sdl_palette); +} + +void driver_base::adapt_to_video_mode() { + ADBSetRelMouseMode(mouse_grabbed); + + // Init blitting routines + SDL_PixelFormat *f = s->format; + VisualFormat visualFormat; + visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); + visualFormat.Rmask = f->Rmask; + visualFormat.Gmask = f->Gmask; + visualFormat.Bmask = f->Bmask; + Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); + + // Load gray ramp to 8->16/32 expand map + if (!IsDirectMode(mode)) + for (int i=0; i<256; i++) + ExpandMap[i] = SDL_MapRGB(f, i, i, i); + + + bool hardware_cursor = false; +#ifdef SHEEPSHAVER + hardware_cursor = video_can_change_cursor(); + if (hardware_cursor) { + // Create cursor + if ((sdl_cursor = MagCursor(false)) != NULL) { + SDL_SetCursor(sdl_cursor); + } + } + // Tell the video driver there's a change in cursor type + if (private_data) + private_data->cursorHardware = hardware_cursor; +#endif + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); + + // Hide cursor + SDL_ShowCursor(hardware_cursor); + + // Set window name/class + set_window_name(); + + // Everything went well + init_ok = true; +} + +driver_base::~driver_base() +{ + ungrab_mouse(); + restore_mouse_accel(); + + // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather + // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby + // OSX hosts, when in fullscreen, will, on a guest OS resolution change, + // do a series of switches (using OSX's "Spaces" feature) to and from + // the Basilisk II desktop, + delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture + //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to + // instances of SDL_Surface and SDL_Texture. + + // the_buffer shall always be mapped through vm_acquire_framebuffer() + if (the_buffer != VM_MAP_FAILED) { + D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); + vm_release_framebuffer(the_buffer, the_buffer_size); + the_buffer = NULL; + } + + // Free frame buffer(s) + if (!use_vosf) { + if (the_buffer_copy) { + free(the_buffer_copy); + the_buffer_copy = NULL; + } + } +#ifdef ENABLE_VOSF + else { + if (the_buffer_copy) { + D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); + free(the_buffer_copy); + the_buffer_copy = NULL; + } + + // Deinitialize VOSF + video_vosf_exit(); + } +#endif + + SDL_ShowCursor(1); +} + +// Palette has changed +void driver_base::update_palette(void) +{ + const VIDEO_MODE &mode = monitor.get_current_mode(); + + if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { + SDL_SetSurfacePalette(s, sdl_palette); + SDL_LockMutex(sdl_update_video_mutex); + sdl_update_video_rect.x = 0; + sdl_update_video_rect.y = 0; + sdl_update_video_rect.w = VIDEO_MODE_X; + sdl_update_video_rect.h = VIDEO_MODE_Y; + SDL_UnlockMutex(sdl_update_video_mutex); + } +} + +// Disable mouse acceleration +void driver_base::disable_mouse_accel(void) +{ +} + +// Restore mouse acceleration to original value +void driver_base::restore_mouse_accel(void) +{ +} + +// Toggle mouse grab +void driver_base::toggle_mouse_grab(void) +{ + if (mouse_grabbed) + ungrab_mouse(); + else + grab_mouse(); +} + +static void update_mouse_grab() +{ + if (mouse_grabbed) { + SDL_SetRelativeMouseMode(SDL_TRUE); + } else { + SDL_SetRelativeMouseMode(SDL_FALSE); + } +} + +// Grab mouse, switch to relative mouse mode +void driver_base::grab_mouse(void) +{ + if (!mouse_grabbed) { + mouse_grabbed = true; + update_mouse_grab(); + set_window_name(); + disable_mouse_accel(); + ADBSetRelMouseMode(true); + } +} + +// Ungrab mouse, switch to absolute mouse mode +void driver_base::ungrab_mouse(void) +{ + if (mouse_grabbed) { + mouse_grabbed = false; + update_mouse_grab(); + set_window_name(); + restore_mouse_accel(); + ADBSetRelMouseMode(false); + } +} + +/* + * Initialization + */ + +// Init keycode translation table +static void keycode_init(void) +{ + bool use_kc = PrefsFindBool("keycodes"); + if (use_kc) { + + // Get keycode file path from preferences + const char *kc_path = PrefsFindString("keycodefile"); + + // Open keycode table + FILE *f = fopen(kc_path && *kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); + if (f == NULL) f = fopen(KEYCODE_FILE_NAME2, "r"); + if (f == NULL) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); + WarningAlert(str); + return; + } + + // Default translation table + for (int i=0; i<256; i++) + keycode_table[i] = CODE_INVALID; + + // Search for server vendor string, then read keycodes + const char * video_driver = SDL_GetCurrentVideoDriver(); + bool video_driver_found = false; + char line[256]; + int n_keys = 0; + while (fgets(line, sizeof(line) - 1, f)) { + // Read line + int len = strlen(line); + if (len == 0) + continue; + line[len-1] = 0; + + // Comments begin with "#" or ";" + if (line[0] == '#' || line[0] == ';' || line[0] == 0) + continue; + + if (video_driver_found) { + // Skip aliases as long as we have read keycodes yet + // Otherwise, it's another mapping and we have to stop + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) + continue; + + // Read keycode + int x_code, mac_code; + if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) + keycode_table[x_code & 0xff] = mac_code, n_keys++; + else + break; + } else { + // Search for SDL video driver string + static const char sdl_str[] = "sdl"; + if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { + char *p = line + sizeof(sdl_str); + if (video_driver && strstr(video_driver, p) == video_driver) + video_driver_found = true; + } + } + } + + // Keycode file completely read + fclose(f); + use_keycodes = video_driver_found; + + // Vendor not found? Then display warning + if (!video_driver_found) { + char str[256]; + snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); + WarningAlert(str); + return; + } + + D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); + } +} + +// Open display for current mode +bool SDL_monitor_desc::video_open(void) +{ + D(bug("video_open()\n")); +#if DEBUG + const VIDEO_MODE &mode = get_current_mode(); + D(bug("Current video mode:\n")); + D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); +#endif + + // Create display driver object of requested type + drv = new(std::nothrow) driver_base(*this); + if (drv == NULL) + return false; + drv->init(); + if (!drv->init_ok) { + delete drv; + drv = NULL; + return false; + } + +#ifdef WIN32 + // Chain in a new message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); +#endif + + // Initialize VideoRefresh function + VideoRefreshInit(); + + // Lock down frame buffer + LOCK_FRAME_BUFFER; + + // Start redraw/input thread +#ifndef USE_CPU_EMUL_SERVICES + redraw_thread_cancel = false; + redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); + if (!redraw_thread_active) { + printf("FATAL: cannot create redraw thread\n"); + return false; + } +#else + redraw_thread_active = true; +#endif + return true; +} + +#ifdef SHEEPSHAVER +bool VideoInit(void) +{ + const bool classic = false; +#else +bool VideoInit(bool classic) +{ +#endif + classic_mode = classic; + +#ifdef ENABLE_VOSF + // Zero the mainBuffer structure + mainBuffer.dirtyPages = NULL; + mainBuffer.pageInfo = NULL; +#endif + + // Create Mutexes + if ((sdl_events_lock = SDL_CreateMutex()) == NULL) + return false; + if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) + return false; + if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) + return false; + + // Init keycode translation + keycode_init(); + + // Read prefs + frame_skip = PrefsFindInt32("frameskip"); + mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); + mouse_wheel_lines = PrefsFindInt32("mousewheellines"); + mouse_wheel_reverse = mouse_wheel_lines < 0; + if (mouse_wheel_reverse) mouse_wheel_lines = -mouse_wheel_lines; + + // Get screen mode from preferences + migrate_screen_prefs(); + const char *mode_str = NULL; + if (classic_mode) + mode_str = "win/512/342"; + else + mode_str = PrefsFindString("screen"); + + // Determine display type and default dimensions + int default_width, default_height; + if (classic) { + default_width = 512; + default_height = 384; + } + else { + default_width = 640; + default_height = 480; + } + display_type = DISPLAY_WINDOW; + if (mode_str) { + if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_WINDOW; + else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) + display_type = DISPLAY_SCREEN; + } + if (default_width <= 0) + default_width = sdl_display_width(); + else if (default_width > sdl_display_width()) + default_width = sdl_display_width(); + if (default_height <= 0) + default_height = sdl_display_height(); + else if (default_height > sdl_display_height()) + default_height = sdl_display_height(); + + // Mac screen depth follows X depth + screen_depth = 32; + SDL_DisplayMode desktop_mode; + if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { + screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); + } + int default_depth; + switch (screen_depth) { + case 8: + default_depth = VIDEO_DEPTH_8BIT; + break; + case 15: case 16: + default_depth = VIDEO_DEPTH_16BIT; + break; + case 24: case 32: + default_depth = VIDEO_DEPTH_32BIT; + break; + default: + default_depth = VIDEO_DEPTH_1BIT; + break; + } + + // Initialize list of video modes to try + struct { + int w; + int h; + int resolution_id; + } +#ifdef SHEEPSHAVER + // Omit Classic resolutions + video_modes[] = { + { -1, -1, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#else + video_modes[] = { + { -1, -1, 0x80 }, + { 512, 384, 0x80 }, + { 640, 480, 0x81 }, + { 800, 600, 0x82 }, + { 1024, 768, 0x83 }, + { 1152, 870, 0x84 }, + { 1280, 1024, 0x85 }, + { 1600, 1200, 0x86 }, + { 0, } + }; +#endif + video_modes[0].w = default_width; + video_modes[0].h = default_height; + + // Construct list of supported modes + if (display_type == DISPLAY_WINDOW) { + if (classic) + add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); + else { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + } else if (display_type == DISPLAY_SCREEN) { + for (int i = 0; video_modes[i].w != 0; i++) { + const int w = video_modes[i].w; + const int h = video_modes[i].h; + if (i > 0 && (w >= default_width || h >= default_height)) + continue; + for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) + add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); + } + } + + if (VideoModes.empty()) { + ErrorAlert(STR_NO_XVISUAL_ERR); + return false; + } + + // Find requested default mode with specified dimensions + uint32 default_id; + std::vector::const_iterator i, end = VideoModes.end(); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + std::vector::const_iterator begin = VideoModes.begin(); + cur_mode = distance(begin, i); +#endif + break; + } + } + if (i == end) { // not found, use first available mode + const VIDEO_MODE & mode = VideoModes[0]; + default_depth = VIDEO_MODE_DEPTH; + default_id = VIDEO_MODE_RESOLUTION; +#ifdef SHEEPSHAVER + cur_mode = 0; +#endif + } + +#ifdef SHEEPSHAVER + for (int i = 0; i < VideoModes.size(); i++) + VModes[i] = VideoModes[i]; + VideoInfo *p = &VModes[VideoModes.size()]; + p->viType = DIS_INVALID; // End marker + p->viRowBytes = 0; + p->viXsize = p->viYsize = 0; + p->viAppleMode = 0; + p->viAppleID = 0; +#endif + +#if DEBUG + D(bug("Available video modes:\n")); + for (i = VideoModes.begin(); i != end; ++i) { + const VIDEO_MODE & mode = (*i); + int bits = 1 << VIDEO_MODE_DEPTH; + if (bits == 16) + bits = 15; + else if (bits == 32) + bits = 24; + D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); + } +#endif + + int color_depth = get_customized_color_depth(default_depth); + + D(bug("Return get_customized_color_depth %d\n", color_depth)); + + // Create SDL_monitor_desc for this (the only) display + SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); + VideoMonitors.push_back(monitor); + + // Open display + return monitor->video_open(); +} + + +/* + * Deinitialization + */ + +// Close display +void SDL_monitor_desc::video_close(void) +{ + D(bug("video_close()\n")); + +#ifdef WIN32 + // Remove message handler for WM_DEVICECHANGE + HWND the_window = GetMainWindowHandle(); + SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); +#endif + + // Stop redraw thread +#ifndef USE_CPU_EMUL_SERVICES + if (redraw_thread_active) { + redraw_thread_cancel = true; + SDL_WaitThread(redraw_thread, NULL); + } +#endif + redraw_thread_active = false; + + // Unlock frame buffer + UNLOCK_FRAME_BUFFER; + D(bug(" frame buffer unlocked\n")); + + // Close display + delete drv; + drv = NULL; +} + +void VideoExit(void) +{ + // Close displays + vector::iterator i, end = VideoMonitors.end(); + for (i = VideoMonitors.begin(); i != end; ++i) + dynamic_cast(*i)->video_close(); + + // Destroy locks + if (frame_buffer_lock) + SDL_DestroyMutex(frame_buffer_lock); + if (sdl_palette_lock) + SDL_DestroyMutex(sdl_palette_lock); + if (sdl_events_lock) + SDL_DestroyMutex(sdl_events_lock); +} + + +/* + * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) + */ + +void VideoQuitFullScreen(void) +{ + D(bug("VideoQuitFullScreen()\n")); + quit_full_screen = true; +} + +static void ApplyGammaRamp() { + if (sdl_window) { + int result; + if (!init_gamma_valid) { + result = SDL_GetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); + if (result < 0) + fprintf(stderr, "SDL_GetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + init_gamma_valid = true; + } + const char *s = PrefsFindString("gammaramp"); + if (!s) s = "off"; + if (strcmp(s, "off") && (strcmp(s, "fullscreen") || display_type == DISPLAY_SCREEN)) + result = SDL_SetWindowGammaRamp(sdl_window, last_gamma_red, last_gamma_green, last_gamma_blue); + else + result = SDL_SetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); + if (result < 0) + fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); + } +} + +static void do_toggle_fullscreen(void) +{ +#ifndef USE_CPU_EMUL_SERVICES + // pause redraw thread + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; +#endif + + // Apply fullscreen + if (sdl_window) { + if (display_type == DISPLAY_SCREEN) { + display_type = DISPLAY_WINDOW; + SDL_SetWindowFullscreen(sdl_window, 0); + const VIDEO_MODE &mode = drv->mode; + int m = get_mag_rate(); + SDL_SetWindowSize(sdl_window, m * VIDEO_MODE_X, m * VIDEO_MODE_Y); + SDL_SetWindowGrab(sdl_window, SDL_FALSE); + } else { + display_type = DISPLAY_SCREEN; +#ifdef __MACOSX__ + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); +#else + SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN); +#endif + SDL_SetWindowGrab(sdl_window, SDL_TRUE); + } + } + + // switch modes + drv->adapt_to_video_mode(); + + // reset the palette +#ifdef SHEEPSHAVER + video_set_palette(); +#endif + ApplyGammaRamp(); + drv->update_palette(); + + // reset the video refresh handler + VideoRefreshInit(); + + // while SetVideoMode is happening, control key up may be missed + ADBKeyUp(0x36); + + // resume redraw thread + toggle_fullscreen = false; +#ifndef USE_CPU_EMUL_SERVICES + thread_stop_req = false; +#endif +} + +/* + * Mac VBL interrupt + */ + +/* + * Execute video VBL routine + */ + +static bool is_fullscreen(SDL_Window * window) +{ +#ifdef __MACOSX__ + // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always + // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. + // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which + // involves fullscreen/windowed toggles via window-manager UI controls). + // Until it does, or adds a facility to do so, we'll use a platform-specific + // code path to detect fullscreen changes. + extern bool is_fullscreen_osx(SDL_Window * window); + return is_fullscreen_osx(sdl_window); +#else + if (!window) { + return false; + } + const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); + return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; +#endif +} + +#ifdef SHEEPSHAVER +void VideoVBL(void) +{ + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + present_sdl_video(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; + + // Execute video VBL + if (private_data != NULL && private_data->interruptsEnabled) + VSLDoInterruptService(private_data->vslServiceID); +} +#else +void VideoInterrupt(void) +{ + // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() + SDL_PumpEvents(); + + // Emergency quit requested? Then quit + if (emerg_quit) + QuitEmulator(); + + if (toggle_fullscreen) + do_toggle_fullscreen(); + + present_sdl_video(); + + // Temporarily give up frame buffer lock (this is the point where + // we are suspended when the user presses Ctrl-Tab) + UNLOCK_FRAME_BUFFER; + LOCK_FRAME_BUFFER; +} +#endif + + +/* + * Set palette + */ + +#ifdef SHEEPSHAVER +void video_set_palette(void) +{ + monitor_desc * monitor = VideoMonitors[0]; + int n_colors = palette_size(monitor->get_current_mode().viAppleMode); + uint8 pal[256 * 3]; + for (int c = 0; c < n_colors; c++) { + pal[c*3 + 0] = mac_pal[c].red; + pal[c*3 + 1] = mac_pal[c].green; + pal[c*3 + 2] = mac_pal[c].blue; + } + monitor->set_palette(pal, n_colors); +} + +void video_set_gamma(int n_colors) +{ + monitor_desc * monitor = VideoMonitors[0]; + uint8 gamma[256 * 3]; + for (int c = 0; c < n_colors; c++) { + gamma[c*3 + 0] = mac_gamma[c].red; + gamma[c*3 + 1] = mac_gamma[c].green; + gamma[c*3 + 2] = mac_gamma[c].blue; + } + monitor->set_gamma(gamma, n_colors); +} +#endif + +void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) +{ + + const VIDEO_MODE &mode = get_current_mode(); + + LOCK_PALETTE; + + // Convert colors to XColor array + int num_out = 256; + bool stretch = false; + + if (!sdl_palette) { + sdl_palette = SDL_AllocPalette(num_out); + } + + SDL_Color *p = sdl_palette->colors; + for (int i=0; ir = pal[c*3 + 0] * 0x0101; + p->g = pal[c*3 + 1] * 0x0101; + p->b = pal[c*3 + 2] * 0x0101; + p++; + } + + // Recalculate pixel color expansion map + if (!IsDirectMode(mode)) { + for (int i=0; i<256; i++) { + int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) + ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); + } + +#ifdef ENABLE_VOSF + if (use_vosf) { + // We have to redraw everything because the interpretation of pixel values changed + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + } +#endif + } + + // Tell redraw thread to change palette + sdl_palette_changed = true; + + UNLOCK_PALETTE; +} + +void SDL_monitor_desc::set_gamma(uint8 *gamma, int num_in) +{ + // handle the gamma ramp + + if (gamma[0] == 127 && gamma[num_in*3-1] == 127) // solid grey + return; // ignore + + uint16 red[256]; + uint16 green[256]; + uint16 blue[256]; + + int repeats = 256 / num_in; + + for (int i = 0; i < num_in; i++) { + for (int j = 0; j < repeats; j++) { + red[i*repeats + j] = gamma[i*3 + 0] << 8; + green[i*repeats + j] = gamma[i*3 + 1] << 8; + blue[i*repeats + j] = gamma[i*3 + 2] << 8; + } + } + + // fill remaining entries (if any) with last value + for (int i = num_in * repeats; i < 256; i++) { + red[i] = gamma[(num_in - 1) * 3] << 8; + green[i] = gamma[(num_in - 1) * 3 + 1] << 8; + blue[i] = gamma[(num_in - 1) * 3 + 2] << 8; + } + + bool changed = (memcmp(red, last_gamma_red, 512) != 0 || + memcmp(green, last_gamma_green, 512) != 0 || + memcmp(blue, last_gamma_blue, 512) != 0); + + if (changed) { + memcpy(last_gamma_red, red, 512); + memcpy(last_gamma_green, green, 512); + memcpy(last_gamma_blue, blue, 512); + ApplyGammaRamp(); + } + +} + + + +/* + * Switch video mode + */ + +#ifdef SHEEPSHAVER +int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) +{ + /* return if no mode change */ + if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && + (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; + + /* first find video mode in table */ + for (int i=0; VModes[i].viType != DIS_INVALID; i++) { + if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && + (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { + csSave->saveMode = ReadMacInt16(ParamPtr + csMode); + csSave->saveData = ReadMacInt32(ParamPtr + csData); + csSave->savePage = ReadMacInt16(ParamPtr + csPage); + + // Disable interrupts and pause redraw thread + DisableInterrupt(); + thread_stop_ack = false; + thread_stop_req = true; + while (!thread_stop_ack) ; + + cur_mode = i; + monitor_desc *monitor = VideoMonitors[0]; + monitor->switch_to_current_mode(); + + WriteMacInt32(ParamPtr + csBaseAddr, screen_base); + csSave->saveBaseAddr=screen_base; + csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ + csSave->saveMode=VModes[cur_mode].viAppleMode; + + // Enable interrupts and resume redraw thread + thread_stop_req = false; + EnableInterrupt(); + return noErr; + } + } + return paramErr; +} +#endif + +static bool is_cursor_in_mac_screen() { + + int windowX, windowY; + int cursorX, cursorY; + int deltaX, deltaY; + bool out; + + // TODO figure out a check for full screen mode + if (display_type == DISPLAY_SCREEN) + return true; + + if (display_type == DISPLAY_WINDOW) { + + if (sdl_window == NULL || SDL_GetMouseFocus() != sdl_window) + return false; + + SDL_GetWindowPosition(sdl_window, &windowX, &windowY); + SDL_GetGlobalMouseState(&cursorX, &cursorY); + deltaX = cursorX - windowX; + deltaY = cursorY - windowY; + D(bug("cursor relative {%d,%d}\n", deltaX, deltaY)); + const VIDEO_MODE &mode = drv->mode; + const int m = get_mag_rate(); + out = deltaX >= 0 && deltaX < VIDEO_MODE_X * m && + deltaY >= 0 && deltaY < VIDEO_MODE_Y * m; + D(bug("cursor in window? %s\n", out? "yes" : "no")); + return out; + } + + return false; +} + +void SDL_monitor_desc::switch_to_current_mode(void) +{ + // Close and reopen display + LOCK_EVENTS; + video_close(); + video_open(); + UNLOCK_EVENTS; + + if (drv == NULL) { + ErrorAlert(STR_OPEN_WINDOW_ERR); + QuitEmulator(); + } +} + + +/* + * Can we set the MacOS cursor image into the window? + */ + +#ifdef SHEEPSHAVER +bool video_can_change_cursor(void) +{ + return PrefsFindBool("hardcursor") && (display_type == DISPLAY_WINDOW || PrefsFindBool("scale_integer")); +} +#endif + + +/* + * Set cursor image for window + */ + +#ifdef SHEEPSHAVER +void video_set_cursor(void) +{ + // Set new cursor image if it was changed + if (sdl_cursor) { + SDL_FreeCursor(sdl_cursor); + sdl_cursor = MagCursor(true); + if (sdl_cursor) { + SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); + SDL_SetCursor(sdl_cursor); + + // XXX Windows apparently needs an extra mouse event to + // make the new cursor image visible. + // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the + // mouse, we have to put it back. + bool move = false; +#ifdef WIN32 + move = true; +#elif defined(__APPLE__) + move = mouse_grabbed; +#endif + if (move) { + int visible = SDL_ShowCursor(-1); + if (visible) { + bool cursor_in_window = is_cursor_in_mac_screen(); + + if (cursor_in_window) { + int x, y; + SDL_GetMouseState(&x, &y); + D(bug("WarpMouse to {%d,%d} via video_set_cursor\n", x, y)); + SDL_WarpMouseInWindow(sdl_window, x, y); + } + } + } + } + } +} +#endif + + +/* + * Keyboard-related utilify functions + */ + +static bool is_hotkey_down(SDL_Keysym const & ks) +{ + int hotkey = PrefsFindInt32("hotkey"); + if (!hotkey) hotkey = 1; + return (ctrl_down || (ks.mod & KMOD_CTRL) || !(hotkey & 1)) && + (opt_down || (ks.mod & KMOD_ALT) || !(hotkey & 2)) && + (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); +} + +static int modify_opt_cmd(int code) { + static bool f, c; + if (!f) { + f = true; + c = PrefsFindBool("swap_opt_cmd"); + } + if (c) { + switch (code) { + case 0x37: return 0x3a; + case 0x3a: return 0x37; + } + } + return code; +} + +/* + * Translate key event to Mac keycode, returns CODE_INVALID if no keycode was found + * and CODE_HOTKEY if the key was recognized as a hotkey + */ + +static int kc_decode(SDL_Keysym const & ks, bool key_down) +{ + switch (ks.sym) { + case SDLK_a: return 0x00; + case SDLK_b: return 0x0b; + case SDLK_c: return 0x08; + case SDLK_d: return 0x02; + case SDLK_e: return 0x0e; + case SDLK_f: return 0x03; + case SDLK_g: return 0x05; + case SDLK_h: return 0x04; + case SDLK_i: return 0x22; + case SDLK_j: return 0x26; + case SDLK_k: return 0x28; + case SDLK_l: return 0x25; + case SDLK_m: return 0x2e; + case SDLK_n: return 0x2d; + case SDLK_o: return 0x1f; + case SDLK_p: return 0x23; + case SDLK_q: return 0x0c; + case SDLK_r: return 0x0f; + case SDLK_s: return 0x01; + case SDLK_t: return 0x11; + case SDLK_u: return 0x20; + case SDLK_v: return 0x09; + case SDLK_w: return 0x0d; + case SDLK_x: return 0x07; + case SDLK_y: return 0x10; + case SDLK_z: return 0x06; + + case SDLK_1: case SDLK_EXCLAIM: return 0x12; + case SDLK_2: case SDLK_AT: return 0x13; + case SDLK_3: case SDLK_HASH: return 0x14; + case SDLK_4: case SDLK_DOLLAR: return 0x15; + case SDLK_5: return 0x17; + case SDLK_6: return 0x16; + case SDLK_7: return 0x1a; + case SDLK_8: return 0x1c; + case SDLK_9: return 0x19; + case SDLK_0: return 0x1d; + + case SDLK_BACKQUOTE: case 167: return 0x32; + case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; + case SDLK_EQUALS: case SDLK_PLUS: return 0x18; + case SDLK_LEFTBRACKET: return 0x21; + case SDLK_RIGHTBRACKET: return 0x1e; + case SDLK_BACKSLASH: return 0x2a; + case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; + case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; + case SDLK_COMMA: case SDLK_LESS: return 0x2b; + case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; + case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; + + case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return CODE_HOTKEY;} else return 0x30; + case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return CODE_HOTKEY;} else return 0x24; + case SDLK_SPACE: return 0x31; + case SDLK_BACKSPACE: return 0x33; + + case SDLK_DELETE: return 0x75; + case SDLK_INSERT: return 0x72; + case SDLK_HOME: case SDLK_HELP: return 0x73; + case SDLK_END: return 0x77; + case SDLK_PAGEUP: return 0x74; + case SDLK_PAGEDOWN: return 0x79; + + case SDLK_LCTRL: return 0x36; + case SDLK_RCTRL: return 0x36; + case SDLK_LSHIFT: return 0x38; + case SDLK_RSHIFT: return 0x38; + case SDLK_LALT: case SDLK_RALT: return 0x3a; + case SDLK_LGUI: case SDLK_RGUI: return 0x37; + case SDLK_MENU: return 0x32; + case SDLK_CAPSLOCK: return 0x39; + case SDLK_NUMLOCKCLEAR: return 0x47; + + case SDLK_UP: return 0x3e; + case SDLK_DOWN: return 0x3d; + case SDLK_LEFT: return 0x3b; + case SDLK_RIGHT: return 0x3c; + + case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return CODE_HOTKEY;} else return 0x35; + + case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return CODE_HOTKEY;} else return 0x7a; + case SDLK_F2: return 0x78; + case SDLK_F3: return 0x63; + case SDLK_F4: return 0x76; + case SDLK_F5: return 0x60; + case SDLK_F6: return 0x61; + case SDLK_F7: return 0x62; + case SDLK_F8: return 0x64; + case SDLK_F9: return 0x65; + case SDLK_F10: return 0x6d; + case SDLK_F11: return 0x67; + case SDLK_F12: return 0x6f; + + case SDLK_PRINTSCREEN: return 0x69; + case SDLK_SCROLLLOCK: return 0x6b; + case SDLK_PAUSE: return 0x71; + + case SDLK_KP_0: return 0x52; + case SDLK_KP_1: return 0x53; + case SDLK_KP_2: return 0x54; + case SDLK_KP_3: return 0x55; + case SDLK_KP_4: return 0x56; + case SDLK_KP_5: return 0x57; + case SDLK_KP_6: return 0x58; + case SDLK_KP_7: return 0x59; + case SDLK_KP_8: return 0x5b; + case SDLK_KP_9: return 0x5c; + case SDLK_KP_PERIOD: return 0x41; + case SDLK_KP_PLUS: return 0x45; + case SDLK_KP_MINUS: return 0x4e; + case SDLK_KP_MULTIPLY: return 0x43; + case SDLK_KP_DIVIDE: return 0x4b; + case SDLK_KP_ENTER: return 0x4c; + case SDLK_KP_EQUALS: return 0x51; + } + D(bug("Unhandled SDL keysym: %d\n", ks.sym)); + return CODE_INVALID; +} + +static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) +{ + return kc_decode(ev.keysym, key_down); +} + +static void force_complete_window_refresh() +{ + if (display_type == DISPLAY_WINDOW) { +#ifdef ENABLE_VOSF + if (use_vosf) { // VOSF refresh + LOCK_VOSF; + PFLAG_SET_ALL; + UNLOCK_VOSF; + } +#endif + // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. + const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); + const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; + for (int i = 0; i < len; i++) + the_buffer_copy[i] = !the_buffer[i]; + } +} + +/* + * SDL event handling + */ + +// possible return codes for SDL-registered event watches +enum { + EVENT_DROP_FROM_QUEUE = 0, + EVENT_ADD_TO_QUEUE = 1 +}; + +// Some events need to be processed in the host-app's main thread, due to +// host-OS requirements. +// +// This function is called by SDL, whenever it generates an SDL_Event. It has +// the ability to process events, and optionally, to prevent them from being +// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) +static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) +{ + switch (event->type) { + case SDL_KEYUP: { + SDL_Keysym const & ks = event->key.keysym; + switch (ks.sym) { + case SDLK_F5: { + if (is_hotkey_down(ks) && !PrefsFindBool("hardcursor")) { + drv->toggle_mouse_grab(); + return EVENT_DROP_FROM_QUEUE; + } + } break; + } + } break; + + case SDL_WINDOWEVENT: { + switch (event->window.event) { + case SDL_WINDOWEVENT_RESIZED: { + if (!redraw_thread_active) break; + // Handle changes of fullscreen. This is done here, in + // on_sdl_event_generated() and not the main SDL_Event-processing + // loop, in order to perform this change on the main thread. + // (Some os'es UI APIs, such as OSX's NSWindow, are not + // thread-safe.) + const bool is_full = is_fullscreen(sdl_window); + const bool adjust_fullscreen = \ + (display_type == DISPLAY_WINDOW && is_full) || + (display_type == DISPLAY_SCREEN && !is_full); + if (adjust_fullscreen) { + do_toggle_fullscreen(); + +#if __MACOSX__ + // HACK-FIX: on OSX hosts, make sure that the OSX menu + // bar does not show up in fullscreen mode, when the + // cursor is near the top of the screen, lest the + // guest OS' menu bar be obscured. + if (is_full) { + extern void set_menu_bar_visible_osx(bool); + set_menu_bar_visible_osx(false); + } +#endif + } + } break; + } + } break; + } + + return EVENT_ADD_TO_QUEUE; +} + + +static void handle_events(void) +{ + SDL_Event events[10]; + const int n_max_events = sizeof(events) / sizeof(events[0]); + int n_events; + + while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { + for (int i = 0; i < n_events; i++) { + SDL_Event & event = events[i]; + + switch (event.type) { + + // Mouse button + case SDL_MOUSEBUTTONDOWN: { + unsigned int button = event.button.button; + if (button == SDL_BUTTON_LEFT) + ADBMouseDown(0); + else if (button == SDL_BUTTON_RIGHT) + ADBMouseDown(1); + else if (button == SDL_BUTTON_MIDDLE) + ADBMouseDown(2); + break; + } + case SDL_MOUSEBUTTONUP: { + unsigned int button = event.button.button; + if (button == SDL_BUTTON_LEFT) + ADBMouseUp(0); + else if (button == SDL_BUTTON_RIGHT) + ADBMouseUp(1); + else if (button == SDL_BUTTON_MIDDLE) + ADBMouseUp(2); + break; + } + + // Mouse moved + case SDL_MOUSEMOTION: + if (mouse_grabbed) { + drv->mouse_moved(event.motion.xrel, event.motion.yrel); + } else { + drv->mouse_moved(event.motion.x, event.motion.y); + } + break; + + case SDL_MOUSEWHEEL: + if (!event.wheel.y) break; + if (!mouse_wheel_mode) { + int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x79 : 0x74; // Page up/down + ADBKeyDown(key); + ADBKeyUp(key); + } + else { + int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x3d : 0x3e; // Cursor up/down + for (int i = 0; i < mouse_wheel_lines; i++) { + ADBKeyDown(key); + ADBKeyUp(key); + } + } + break; + + // Keyboard + case SDL_KEYDOWN: { + if (event.key.repeat) + break; + int code = CODE_INVALID; + if (use_keycodes && event2keycode(event.key, true) != CODE_HOTKEY) + code = keycode_table[event.key.keysym.scancode & 0xff]; + if (code == CODE_INVALID) + code = event2keycode(event.key, true); + if (code >= 0) { + if (!emul_suspended) { + code = modify_opt_cmd(code); +#ifdef __MACOSX__ + ADBKeyDown(code); +#else + if (code == 0x39) + (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); + else + ADBKeyDown(code); +#endif + if (code == 0x36) + ctrl_down = true; + if (code == 0x3a) + opt_down = true; + if (code == 0x37) + cmd_down = true; + + } else { + if (code == 0x31) + drv->resume(); // Space wakes us up + } + } + break; + } + case SDL_KEYUP: { + int code = CODE_INVALID; + if (use_keycodes && event2keycode(event.key, false) != CODE_HOTKEY) + code = keycode_table[event.key.keysym.scancode & 0xff]; + if (code == CODE_INVALID) + code = event2keycode(event.key, false); + if (code >= 0) { + code = modify_opt_cmd(code); +#ifdef __MACOSX__ + ADBKeyUp(code); +#else + if (code != 0x39) + ADBKeyUp(code); +#endif + if (code == 0x36) + ctrl_down = false; + if (code == 0x3a) + opt_down = false; + if (code == 0x37) + cmd_down = false; + } + break; + } + + case SDL_WINDOWEVENT: { + switch (event.window.event) { + // Hidden parts exposed, force complete refresh of window + case SDL_WINDOWEVENT_EXPOSED: + force_complete_window_refresh(); + break; + + // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. + case SDL_WINDOWEVENT_RESTORED: + force_complete_window_refresh(); + break; + + } + break; + } + + // Window "close" widget clicked + case SDL_QUIT: + if (SDL_GetModState() & (KMOD_LALT | KMOD_RALT)) break; + ADBKeyDown(0x7f); // Power key + ADBKeyUp(0x7f); + break; + } + } + } +} + + +/* + * Window display update + */ + +// Static display update (fixed frame rate, but incremental) +static void update_display_static(driver_base *drv) +{ + // Incremental update code + int wide = 0, high = 0; + uint32 x1, x2, y1, y2; + const VIDEO_MODE &mode = drv->mode; + int bytes_per_row = VIDEO_MODE_ROW_BYTES; + uint8 *p, *p2; + uint32 x2_clipped, wide_clipped; + + // Check for first line from top and first line from bottom that have changed + y1 = 0; + for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y1 = j; + break; + } + } + y2 = y1 - 1; + for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { + if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + y2 = j; + break; + } + } + high = y2 - y1 + 1; + + // Check for first column from left and first column from right that have changed + if (high) { + if ((int)VIDEO_MODE_DEPTH < (int)VIDEO_DEPTH_8BIT) { + const int src_bytes_per_row = bytes_per_row; + const int dst_bytes_per_row = drv->s->pitch; + const int pixels_per_byte = 8/mac_depth_of_video_depth(VIDEO_MODE_DEPTH); + + const uint32 line_len = TrivialBytesPerRow(VIDEO_MODE_X, VIDEO_MODE_DEPTH); + + x1 = line_len; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1; i++) { + if (*p != *p2) { + x1 = i; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = line_len; i > x2; i--) { + p--; p2--; + if (*p != *p2) { + x2 = i; + break; + } + } + } + + x1 *= pixels_per_byte; + x2 *= pixels_per_byte; + wide = x2 - x1; + x2_clipped = x2 > VIDEO_MODE_X? VIDEO_MODE_X : x2; + wide_clipped = x2_clipped - x1; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); + int di = y1 * dst_bytes_per_row + x1; + for (uint32 j = y1; j <= y2; j++) { + memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); + Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); + si += src_bytes_per_row; + di += dst_bytes_per_row; + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + update_sdl_video(drv->s, x1, y1, wide_clipped, high); + } + + } else { + const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; + const int dst_bytes_per_row = drv->s->pitch; + + x1 = VIDEO_MODE_X; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { + if (*p != *p2) { + x1 = i / bytes_per_pixel; + break; + } + p++; p2++; + } + } + x2 = x1; + for (uint32 j = y1; j <= y2; j++) { + p = &the_buffer[j * bytes_per_row]; + p2 = &the_buffer_copy[j * bytes_per_row]; + p += bytes_per_row; + p2 += bytes_per_row; + for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { + p--; + p2--; + if (*p != *p2) { + x2 = i / bytes_per_pixel; + break; + } + } + } + wide = x2 - x1; + + // Update copy of the_buffer + if (high && wide) { + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Blit to screen surface + for (uint32 j = y1; j <= y2; j++) { + uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; + int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; + memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); + Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + update_sdl_video(drv->s, x1, y1, wide, high); + } + } + } +} + +// Static display update (fixed frame rate, bounding boxes based) +// XXX use NQD bounding boxes to help detect dirty areas? +static void update_display_static_bbox(driver_base *drv) +{ + const VIDEO_MODE &mode = drv->mode; + + // Allocate bounding boxes for SDL_UpdateRects() + const uint32 N_PIXELS = 64; + const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; + const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; + SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); + uint32 nr_boxes = 0; + + // Lock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_LockSurface(drv->s); + + // Update the surface from Mac screen + const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; + const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; + const uint32 dst_bytes_per_row = drv->s->pitch; + for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { + uint32 h = N_PIXELS; + if (h > VIDEO_MODE_Y - y) + h = VIDEO_MODE_Y - y; + for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { + uint32 w = N_PIXELS; + if (w > VIDEO_MODE_X - x) + w = VIDEO_MODE_X - x; + const int xs = w * bytes_per_pixel; + const int xb = x * bytes_per_pixel; + bool dirty = false; + for (uint32 j = y; j < (y + h); j++) { + const uint32 yb = j * bytes_per_row; + const uint32 dst_yb = j * dst_bytes_per_row; + if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { + memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); + Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); + dirty = true; + } + } + if (dirty) { + boxes[nr_boxes].x = x; + boxes[nr_boxes].y = y; + boxes[nr_boxes].w = w; + boxes[nr_boxes].h = h; + nr_boxes++; + } + } + } + + // Unlock surface, if required + if (SDL_MUSTLOCK(drv->s)) + SDL_UnlockSurface(drv->s); + + // Refresh display + if (nr_boxes) + update_sdl_video(drv->s, nr_boxes, boxes); +} + + +// We suggest the compiler to inline the next two functions so that it +// may specialise the code according to the current screen depth and +// display type. A clever compiler would do that job by itself though... + +// NOTE: update_display_vosf is inlined too + +static inline void possibly_quit_dga_mode() +{ + // Quit DGA mode if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + delete drv; + drv = NULL; + } +} + +static inline void possibly_ungrab_mouse() +{ + // Ungrab mouse if requested (something terrible has happened and we + // want to give control back to the user) + if (quit_full_screen) { + quit_full_screen = false; + if (drv) + drv->ungrab_mouse(); + } +} + +static inline void handle_palette_changes(void) +{ + LOCK_PALETTE; + + if (sdl_palette_changed) { + sdl_palette_changed = false; + drv->update_palette(); + } + + UNLOCK_PALETTE; +} + +static void video_refresh_window_static(void); + +static void video_refresh_dga(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + video_refresh_window_static(); +} + +#ifdef ENABLE_VOSF +#if REAL_ADDRESSING || DIRECT_ADDRESSING +static void video_refresh_dga_vosf(void) +{ + // Quit DGA mode if requested + possibly_quit_dga_mode(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_dga_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif + +static void video_refresh_window_vosf(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (VOSF variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + if (mainBuffer.dirty) { + LOCK_VOSF; + update_display_window_vosf(drv); + UNLOCK_VOSF; + } + } +} +#endif // def ENABLE_VOSF + +static void video_refresh_window_static(void) +{ + // Ungrab mouse if requested + possibly_ungrab_mouse(); + + // Update display (static variant) + static uint32 tick_counter = 0; + if (++tick_counter >= frame_skip) { + tick_counter = 0; + const VIDEO_MODE &mode = drv->mode; + if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) + update_display_static_bbox(drv); + else + update_display_static(drv); + } +} + + +/* + * Thread for screen refresh, input handling etc. + */ + +static void VideoRefreshInit(void) +{ + // TODO: set up specialised 8bpp VideoRefresh handlers ? + if (display_type == DISPLAY_SCREEN) { +#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) + if (use_vosf) + video_refresh = video_refresh_dga_vosf; + else +#endif + video_refresh = video_refresh_dga; + } + else { +#ifdef ENABLE_VOSF + if (use_vosf) + video_refresh = video_refresh_window_vosf; + else +#endif + video_refresh = video_refresh_window_static; + } +} + +static inline void do_video_refresh(void) +{ + // Handle SDL events + handle_events(); + + // Update display + video_refresh(); + + + // Set new palette if it was changed + handle_palette_changes(); +} + +// This function is called on non-threaded platforms from a timer interrupt +void VideoRefresh(void) +{ + // We need to check redraw_thread_active to inhibit refreshed during + // mode changes on non-threaded platforms + if (!redraw_thread_active) + return; + + // Process pending events and update display + do_video_refresh(); +} + +const int VIDEO_REFRESH_HZ = 60; +const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; + +#ifndef USE_CPU_EMUL_SERVICES +static int redraw_func(void *arg) +{ + uint64 start = GetTicks_usec(); + int64 ticks = 0; + uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; + + while (!redraw_thread_cancel) { + + // Wait + next += VIDEO_REFRESH_DELAY; + int32 delay = int32(next - GetTicks_usec()); + if (delay > 0) + Delay_usec(delay); + else if (delay < -VIDEO_REFRESH_DELAY) + next = GetTicks_usec(); + ticks++; + + // Pause if requested (during video mode switches) + if (thread_stop_req) { + thread_stop_ack = true; + continue; + } + + // Process pending events and update display + do_video_refresh(); + } + + uint64 end = GetTicks_usec(); + D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); + return 0; +} +#endif + + +/* + * Record dirty area from NQD + */ + +#ifdef SHEEPSHAVER +void video_set_dirty_area(int x, int y, int w, int h) +{ +#ifdef ENABLE_VOSF + const VIDEO_MODE &mode = drv->mode; + const unsigned screen_width = VIDEO_MODE_X; + const unsigned screen_height = VIDEO_MODE_Y; + const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; + + if (use_vosf) { + vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); + return; + } +#endif + + // XXX handle dirty bounding boxes for non-VOSF modes +} +#endif + +#endif // ends: SDL version check From ab2fedcbe4f7454302952076dcd1ad38c2b4f61e Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 12 Jun 2021 15:15:21 -0700 Subject: [PATCH 522/534] Consolidate m68k memory map allocation --- BasiliskII/src/CrossPlatform/video_vosf.h | 48 ++--- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 86 +------- BasiliskII/src/CrossPlatform/vm_alloc.h | 8 - BasiliskII/src/MacOSX/main_macosx.mm | 137 +------------ BasiliskII/src/SDL/video_sdl.cpp | 1 + BasiliskII/src/SDL/video_sdl2.cpp | 107 ++++------ BasiliskII/src/Unix/main_unix.cpp | 137 +------------ BasiliskII/src/Windows/main_windows.cpp | 145 +------------- BasiliskII/src/include/main.h | 1 - BasiliskII/src/main.cpp | 31 +-- BasiliskII/src/rom_patches.cpp | 8 +- BasiliskII/src/rsrc_patches.cpp | 4 +- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 184 +++++++++++++++--- BasiliskII/src/uae_cpu/compiler/compemu.h | 2 +- .../src/uae_cpu/compiler/compemu_support.cpp | 101 ++-------- BasiliskII/src/uae_cpu/cpu_emulation.h | 3 + BasiliskII/src/uae_cpu/memory.cpp | 11 +- 17 files changed, 267 insertions(+), 747 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index 0c182925c..ff5412bec 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -211,13 +211,18 @@ static int log_base_2(uint32 x) } // Extend size to page boundary -static uint32 page_extend(uint32 size) -{ - const uint32 page_size = vm_get_page_size(); - const uint32 page_mask = page_size - 1; +static size_t page_extend(size_t size){ + const size_t page_size = vm_get_page_size(); + const size_t page_mask = page_size - 1; return (size + page_mask) & ~page_mask; } +// For use with assert() +static bool is_page_aligned(size_t size){ + const size_t page_size = vm_get_page_size(); + const size_t page_mask = page_size - 1; + return (size&page_mask)==0; +} /* * Check if VOSF acceleration is profitable on this platform @@ -272,17 +277,16 @@ static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faul * Initialize the VOSF system (mainBuffer structure, SIGSEGV handler) */ -static bool video_vosf_init(MONITOR_INIT) -{ +static bool video_vosf_init(MONITOR_INIT){ VIDEO_MODE_INIT_MONITOR; - const uintptr page_size = vm_get_page_size(); - const uintptr page_mask = page_size - 1; - - // Round up frame buffer base to page boundary - mainBuffer.memStart = (((uintptr) the_buffer) + page_mask) & ~page_mask; + const size_t page_size = vm_get_page_size(); + const size_t page_mask = page_size - 1; - // The frame buffer size shall already be aligned to page boundary (use page_extend) + // Must be page aligned (use page_extend) + assert(is_page_aligned((size_t)MacFrameBaseHost)); + assert(is_page_aligned(the_buffer_size)); + mainBuffer.memStart = (uintptr)MacFrameBaseHost; mainBuffer.memLength = the_buffer_size; mainBuffer.pageSize = page_size; @@ -513,7 +517,7 @@ static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) const int dst_bytes_per_row = VIDEO_DRV_ROW_BYTES; int i1 = y1 * src_bytes_per_row, i2 = y1 * dst_bytes_per_row, j; for (j = y1; j <= y2; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); + Screen_blit(the_host_buffer + i2, MacFrameBaseHost + i1, src_bytes_per_row); i1 += src_bytes_per_row; i2 += dst_bytes_per_row; } @@ -554,11 +558,11 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT){ if (mainBuffer.very_dirty) { PFLAG_CLEAR_ALL; vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ); - memcpy(the_buffer_copy, the_buffer, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); + memcpy(the_buffer_copy, MacFrameBaseHost, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); VIDEO_DRV_LOCK_PIXELS; int i1 = 0, i2 = 0; for (uint32_t j = 0; j < VIDEO_MODE_Y; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); + Screen_blit(the_host_buffer + i2, MacFrameBaseHost + i1, src_bytes_per_row); i1 += src_bytes_per_row; i2 += scr_bytes_per_row; } @@ -606,7 +610,7 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT){ } last_scanline = y2; - // Update the_host_buffer and copy of the_buffer, one line at a time + // Update the_host_buffer and copy of frame buffer, one line at a time uint32 i1 = y1 * src_bytes_per_row; uint32 i2 = y1 * scr_bytes_per_row; #ifdef USE_SDL_VIDEO @@ -620,9 +624,9 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT){ VIDEO_DRV_LOCK_PIXELS; for (uint32 j = y1; j <= y2; j++) { for (uint32 i = 0; i < n_chunks; i++) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size); + if (memcmp(the_buffer_copy + i1, MacFrameBaseHost + i1, src_chunk_size) != 0) { + memcpy(the_buffer_copy + i1, MacFrameBaseHost + i1, src_chunk_size); + Screen_blit(the_host_buffer + i2, MacFrameBaseHost + i1, src_chunk_size); #ifdef USE_SDL_VIDEO const int x = i * n_pixels; if (x < bb[bbi].x) { @@ -640,9 +644,9 @@ static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT){ i2 += dst_chunk_size; } if (src_chunk_size_left && dst_chunk_size_left) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size_left); + if (memcmp(the_buffer_copy + i1, MacFrameBaseHost + i1, src_chunk_size_left) != 0) { + memcpy(the_buffer_copy + i1, MacFrameBaseHost + i1, src_chunk_size_left); + Screen_blit(the_host_buffer + i2, MacFrameBaseHost + i1, src_chunk_size_left); } #ifdef USE_SDL_VIDEO const int x = n_chunks * n_pixels; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 176060c07..cb30a3be9 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -133,8 +133,6 @@ static int translate_map_flags(int vm_flags) flags |= MAP_SHARED; if (vm_flags & VM_MAP_PRIVATE) flags |= MAP_PRIVATE; - if (vm_flags & VM_MAP_FIXED) - flags |= MAP_FIXED; if (vm_flags & VM_MAP_32BIT) flags |= FORCE_MAP_32BIT; return flags; @@ -236,34 +234,14 @@ void vm_exit(void) #endif } -static void *reserved_buf; -static const size_t RESERVED_SIZE = 64 * 1024 * 1024; // for 5K Retina - -void *vm_acquire_reserved(size_t size) { - return reserved_buf && size <= RESERVED_SIZE ? reserved_buf : VM_MAP_FAILED; -} - -int vm_init_reserved(void *hostAddress) { - int result = vm_acquire_fixed(hostAddress, RESERVED_SIZE); - if (result >= 0) - reserved_buf = hostAddress; - return result; -} - /* Allocate zero-filled memory of SIZE bytes. The mapping is private and default protection bits are read / write. The return value is the actual mapping address chosen or VM_MAP_FAILED for errors. */ -void * vm_acquire(size_t size, int options) -{ +void * vm_acquire(size_t size, int options){ void * addr; - errno = 0; - // VM_MAP_FIXED are to be used with vm_acquire_fixed() only - if (options & VM_MAP_FIXED) - return VM_MAP_FAILED; - #ifndef HAVE_VM_WRITE_WATCH if (options & VM_MAP_WRITE_WATCH) return VM_MAP_FAILED; @@ -271,19 +249,18 @@ void * vm_acquire(size_t size, int options) #if defined(HAVE_MACH_VM) // vm_allocate() returns a zero-filled memory region - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, reserved_buf ? size : size + RESERVED_SIZE, TRUE); + kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, TRUE); if (ret_code != KERN_SUCCESS) { errno = vm_error(ret_code); return VM_MAP_FAILED; } - if (!reserved_buf) - reserved_buf = (char *)addr + size; #elif defined(HAVE_MMAP_VM) int fd = zero_fd; int the_map_flags = translate_map_flags(options) | map_flags; if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) return VM_MAP_FAILED; + printf("next=%p got=%p size=%p\n",next_address,addr,size); #if DIRECT_ADDRESSING // If MAP_32BIT and MAP_BASE fail to ensure @@ -317,63 +294,6 @@ void * vm_acquire(size_t size, int options) return addr; } -/* Allocate zero-filled memory at exactly ADDR (which must be page-aligned). - Retuns 0 if successful, -1 on errors. */ - -int vm_acquire_fixed(void * addr, size_t size, int options) -{ - errno = 0; - - // Fixed mappings are required to be private - if (options & VM_MAP_SHARED) - return -1; - -#ifndef HAVE_VM_WRITE_WATCH - if (options & VM_MAP_WRITE_WATCH) - return -1; -#endif - -#if defined(HAVE_MACH_VM) - // vm_allocate() returns a zero-filled memory region - kern_return_t ret_code = vm_allocate(mach_task_self(), (vm_address_t *)&addr, size, 0); - if (ret_code != KERN_SUCCESS) { - errno = vm_error(ret_code); - return -1; - } -#elif defined(HAVE_MMAP_VM) - int fd = zero_fd; - int the_map_flags = translate_map_flags(options) | map_flags | MAP_FIXED; - - if (mmap((caddr_t)addr, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0) == (void *)MAP_FAILED) - return -1; -#elif defined(HAVE_WIN32_VM) - // Windows cannot allocate Low Memory - if (addr == NULL) - return -1; - - int alloc_type = MEM_RESERVE | MEM_COMMIT; - if (options & VM_MAP_WRITE_WATCH) - alloc_type |= MEM_WRITE_WATCH; - - // Allocate a possibly offset region to align on 64K boundaries - LPVOID req_addr = align_addr_segment(addr); - DWORD req_size = align_size_segment(addr, size); - LPVOID ret_addr = VirtualAlloc(req_addr, req_size, alloc_type, PAGE_EXECUTE_READWRITE); - if (ret_addr != req_addr) - return -1; -#else - // Unsupported - return -1; -#endif - - // Explicitely protect the newly mapped region here because on some systems, - // say MacOS X, mmap() doesn't honour the requested protection flags. - if (vm_protect(addr, size, VM_PAGE_DEFAULT) != 0) - return -1; - - return 0; -} - /* Deallocate any mapping for the region starting at ADDR and extending LEN bytes. Returns 0 if successful, -1 on errors. */ diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.h b/BasiliskII/src/CrossPlatform/vm_alloc.h index 41dd949df..ec0b594b0 100644 --- a/BasiliskII/src/CrossPlatform/vm_alloc.h +++ b/BasiliskII/src/CrossPlatform/vm_alloc.h @@ -57,7 +57,6 @@ extern "C" { /* Mapping options. */ #define VM_MAP_SHARED 0x01 #define VM_MAP_PRIVATE 0x02 -#define VM_MAP_FIXED 0x04 #define VM_MAP_32BIT 0x08 #define VM_MAP_WRITE_WATCH 0x10 @@ -101,13 +100,6 @@ extern void vm_exit(void); extern void * vm_acquire(size_t size, int options = VM_MAP_DEFAULT); -extern void * vm_acquire_reserved(size_t size); - -/* Allocate zero-filled memory at exactly ADDR (which must be page-aligned). - Returns 0 if successful, -1 on errors. */ - -extern int vm_acquire_fixed(void * addr, size_t size, int options = VM_MAP_DEFAULT); - /* Deallocate any mapping for the region starting at ADDR and extending LEN bytes. Returns 0 if successful, -1 on errors. */ diff --git a/BasiliskII/src/MacOSX/main_macosx.mm b/BasiliskII/src/MacOSX/main_macosx.mm index b226e93bd..3eadf09f8 100644 --- a/BasiliskII/src/MacOSX/main_macosx.mm +++ b/BasiliskII/src/MacOSX/main_macosx.mm @@ -39,7 +39,6 @@ #include using std::string; -#include "cpu_emulation.h" #include "sys.h" #include "rom_patches.h" #include "xpram.h" @@ -50,7 +49,6 @@ #include "user_strings.h" #include "version.h" #include "main.h" -#include "vm_alloc.h" #include "sigsegv.h" #if USE_JIT @@ -64,25 +62,16 @@ #define DEBUG 0 #include "debug.h" - #include "main_macosx.h" // To bridge between main() and misc. classes - -// Constants -const char ROM_FILE_NAME[] = "ROM"; -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - - static char *bundle = NULL; // If in an OS X application bundle, its path - // CPU and FPU type, addressing mode int CPUType; bool CPUIs68060; int FPUType; bool TwentyFourBitAddressing; - // Global variables #ifdef HAVE_PTHREADS @@ -98,31 +87,11 @@ #endif -#if USE_SCRATCHMEM_SUBTERFUGE -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -#endif - #ifdef ENABLE_MON static struct sigaction sigint_sa; // sigaction for SIGINT handler static void sigint_handler(...); #endif -/* - * Helpers to map memory that can be accessed from the Mac side - */ - -// NOTE: VM_MAP_32BIT is only used when compiling a 64-bit JIT on specific platforms -void *vm_acquire_mac(size_t size) -{ - return vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - -static int vm_acquire_mac_fixed(void *addr, size_t size) -{ - return vm_acquire_fixed(addr, size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - - /* * SIGSEGV handler */ @@ -206,14 +175,11 @@ static void usage(const char *prg_name) exit(0); } -int main(int argc, char **argv) -{ +int main(int argc, char **argv){ const char *vmdir = NULL; char str[256]; // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; srand(time(NULL)); tzset(); @@ -320,87 +286,11 @@ bool InitEmulator (void) // Register dump state function when we got mad after a segfault sigsegv_set_dump_state(sigsegv_dump_state); - // Read RAM size - RAMSize = PrefsFindInt32("ramsize") & 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - if (RAMSize > 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) - RAMSize = 1023*1024*1024; - -#if DIRECT_ADDRESSING - RAMSize = RAMSize & -getpagesize(); // Round down to page boundary -#endif - - // Initialize VM system - vm_init(); - - // Create areas for Mac RAM and ROM - { - uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); - if (ram_rom_area == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - RAMBaseHost = ram_rom_area; - ROMBaseHost = RAMBaseHost + RAMSize; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Allocate scratch memory - ScratchMem = (uint8 *)vm_acquire_mac(SCRATCH_MEM_SIZE); - if (ScratchMem == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block -#endif - -#if DIRECT_ADDRESSING - // RAMBaseMac shall always be zero - MEMBaseDiff = (uintptr)RAMBaseHost; - RAMBaseMac = 0; - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif - D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); - D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); - - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - if ( ! rom_path ) - if ( bundle ) - WarningAlert("No rom pathname set. Trying BasiliskII.app/ROM"); - else - WarningAlert("No rom pathname set. Trying ./ROM"); - - // Load Mac ROM - int rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY); - if (rom_fd < 0) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf(GetString(STR_READING_ROM_FILE)); - ROMSize = lseek(rom_fd, 0, SEEK_END); - if (ROMSize != 64*1024 && ROMSize != 128*1024 && ROMSize != 256*1024 && ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - close(rom_fd); - QuitEmulator(); - } - lseek(rom_fd, 0, SEEK_SET); - if (read(rom_fd, ROMBaseHost, ROMSize) != (ssize_t)ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - close(rom_fd); - QuitEmulator(); - } - - // Initialize everything if (!InitAll(vmdir)) QuitEmulator(); D(bug("Initialization complete\n")); - #ifdef ENABLE_MON // Setup SIGINT handler to enter mon sigemptyset(&sigint_sa.sa_mask); @@ -409,7 +299,6 @@ bool InitEmulator (void) sigaction(SIGINT, &sigint_sa, NULL); #endif - return YES; } @@ -420,8 +309,7 @@ bool InitEmulator (void) * Quit emulator */ -void QuitEmuNoExit() -{ +void QuitEmuNoExit(){ D(bug("QuitEmulator\n")); // Exit 680x0 emulation @@ -430,24 +318,6 @@ void QuitEmuNoExit() // Deinitialize everything ExitAll(); - // Free ROM/RAM areas - if (RAMBaseHost != VM_MAP_FAILED) { - vm_release(RAMBaseHost, RAMSize + 0x100000); - RAMBaseHost = NULL; - ROMBaseHost = NULL; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Delete scratch memory area - if (ScratchMem != (uint8 *)VM_MAP_FAILED) { - vm_release((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - ScratchMem = NULL; - } -#endif - - // Exit VM wrappers - vm_exit(); - // Exit system routines SysExit(); @@ -455,8 +325,7 @@ void QuitEmuNoExit() PrefsExit(); } -void QuitEmulator(void) -{ +void QuitEmulator(void){ QuitEmuNoExit(); // Stop run loop? diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp index 395778a00..3161c6dc1 100644 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ b/BasiliskII/src/SDL/video_sdl.cpp @@ -100,6 +100,7 @@ static uint32 frame_skip; // Prefs items static int16 mouse_wheel_mode; static int16 mouse_wheel_lines; +#error merge changes from SDL2 static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) static uint32 the_buffer_size; // Size of allocated the_buffer diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 77f53fa96..7e3225f6e 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -110,9 +110,9 @@ static int16 mouse_wheel_mode; static int16 mouse_wheel_lines; static bool mouse_wheel_reverse; -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer +extern uint8* MacFrameBaseHost; // Mac frame buffer (where MacOS draws into) +static uint8* the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) +static uint32 the_buffer_size; // Size of active frame buffer static bool redraw_thread_active = false; // Flag: Redraw thread installed #ifndef USE_CPU_EMUL_SERVICES @@ -224,41 +224,7 @@ extern void SysMountFirstFloppy(void); SDL_UnlockSurface(SURFACE); \ } while (0) - -/* - * Framebuffer allocation routines - */ - -static void *vm_acquire_framebuffer(uint32 size) -{ -#ifdef HAVE_MACH_VM - return vm_acquire_reserved(size); -#else - // always try to reallocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) { -#ifndef SHEEPSHAVER - printf("FATAL: Could not reallocate framebuffer at previous address\n"); -#endif - fb = VM_MAP_FAILED; - } - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -#endif -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ -#ifndef HAVE_MACH_VM - vm_release(fb, size); -#endif -} - -static inline int get_customized_color_depth(int default_depth) -{ +static inline int get_customized_color_depth(int default_depth){ int display_color_depth = PrefsFindInt32("displaycolordepth"); D(bug("Get displaycolordepth %d\n", display_color_depth)); @@ -520,9 +486,9 @@ static void add_mode(int type, int width, int height, int resolution_id, int byt VideoModes.push_back(mode); } -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) -{ +// Set Mac frame layout and base address +static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order){ + assert(MacFrameBaseHost); #if !REAL_ADDRESSING && !DIRECT_ADDRESSING int layout = FLAYOUT_DIRECT; if (depth == VIDEO_DEPTH_16BIT) @@ -537,11 +503,11 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati // Set variables used by UAE memory banking const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); + memory_init(); #else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); + assert(Host2MacAddr(0)); + monitor.set_mac_frame_base(Host2MacAddr(MacFrameBaseHost)); #endif D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); } @@ -660,7 +626,6 @@ static driver_base *drv = NULL; // Pointer to currently used driver object driver_base::driver_base(SDL_monitor_desc &m) : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) { - the_buffer = NULL; the_buffer_copy = NULL; } @@ -1025,9 +990,10 @@ void driver_base::init() use_vosf = true; // Allocate memory for frame buffer (SIZE is extended to page-boundary) the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); + assert(the_buffer_size<=VRAMSize); + assert(MacFrameBaseHost); the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); + D(bug("MacFrameBaseHost = %p, the_buffer_copy = %p, the_host_buffer = %p\n", MacFrameBaseHost, the_buffer_copy, the_host_buffer)); // Check whether we can initialize the VOSF subsystem and it's profitable if (!video_vosf_init(monitor)) { @@ -1041,16 +1007,16 @@ void driver_base::init() } if (!use_vosf) { free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); the_host_buffer = NULL; } #endif if (!use_vosf) { // Allocate memory for frame buffer the_buffer_size = (aligned_height + 2) * s->pitch; + assert(the_buffer_size<=VRAMSize); + assert(MacFrameBaseHost); the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); + D(bug("MacFrameBaseHost = %p, the_buffer_copy = %p\n", MacFrameBaseHost, the_buffer_copy)); } // Set frame buffer base @@ -1126,13 +1092,6 @@ driver_base::~driver_base() //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to // instances of SDL_Surface and SDL_Texture. - // the_buffer shall always be mapped through vm_acquire_framebuffer() - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - // Free frame buffer(s) if (!use_vosf) { if (the_buffer_copy) { @@ -2211,11 +2170,11 @@ static void force_complete_window_refresh() UNLOCK_VOSF; } #endif - // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. + // Ensure each byte of the_buffer_copy differs from Mac framebuffer to force a full update. const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; for (int i = 0; i < len; i++) - the_buffer_copy[i] = !the_buffer[i]; + the_buffer_copy[i] = !MacFrameBaseHost[i]; } } @@ -2449,14 +2408,14 @@ static void update_display_static(driver_base *drv) // Check for first line from top and first line from bottom that have changed y1 = 0; for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + if (memcmp(&MacFrameBaseHost[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { y1 = j; break; } } y2 = y1 - 1; for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { + if (memcmp(&MacFrameBaseHost[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { y2 = j; break; } @@ -2474,7 +2433,7 @@ static void update_display_static(driver_base *drv) x1 = line_len; for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; + p = &MacFrameBaseHost[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; for (uint32 i = 0; i < x1; i++) { if (*p != *p2) { @@ -2486,7 +2445,7 @@ static void update_display_static(driver_base *drv) } x2 = x1; for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; + p = &MacFrameBaseHost[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; p += bytes_per_row; p2 += bytes_per_row; @@ -2505,7 +2464,7 @@ static void update_display_static(driver_base *drv) x2_clipped = x2 > VIDEO_MODE_X? VIDEO_MODE_X : x2; wide_clipped = x2_clipped - x1; - // Update copy of the_buffer + // Update copy of frame buffer if (high && wide) { // Lock surface, if required @@ -2516,8 +2475,8 @@ static void update_display_static(driver_base *drv) int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); int di = y1 * dst_bytes_per_row + x1; for (uint32 j = y1; j <= y2; j++) { - memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); - Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); + memcpy(the_buffer_copy + si, MacFrameBaseHost + si, wide / pixels_per_byte); + Screen_blit((uint8 *)drv->s->pixels + di, MacFrameBaseHost + si, wide / pixels_per_byte); si += src_bytes_per_row; di += dst_bytes_per_row; } @@ -2536,7 +2495,7 @@ static void update_display_static(driver_base *drv) x1 = VIDEO_MODE_X; for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; + p = &MacFrameBaseHost[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { if (*p != *p2) { @@ -2548,7 +2507,7 @@ static void update_display_static(driver_base *drv) } x2 = x1; for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; + p = &MacFrameBaseHost[j * bytes_per_row]; p2 = &the_buffer_copy[j * bytes_per_row]; p += bytes_per_row; p2 += bytes_per_row; @@ -2563,7 +2522,7 @@ static void update_display_static(driver_base *drv) } wide = x2 - x1; - // Update copy of the_buffer + // Update copy of frame buffer if (high && wide) { // Lock surface, if required @@ -2574,8 +2533,8 @@ static void update_display_static(driver_base *drv) for (uint32 j = y1; j <= y2; j++) { uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); + memcpy(the_buffer_copy + i, MacFrameBaseHost + i, bytes_per_pixel * wide); + Screen_blit((uint8 *)drv->s->pixels + dst_i, MacFrameBaseHost + i, bytes_per_pixel * wide); } // Unlock surface, if required @@ -2624,9 +2583,9 @@ static void update_display_static_bbox(driver_base *drv) for (uint32 j = y; j < (y + h); j++) { const uint32 yb = j * bytes_per_row; const uint32 dst_yb = j * dst_bytes_per_row; - if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { - memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); - Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); + if (memcmp(&MacFrameBaseHost[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { + memcpy(&the_buffer_copy[yb + xb], &MacFrameBaseHost[yb + xb], xs); + Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, MacFrameBaseHost + yb + xb, xs); dirty = true; } } diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 5df70a9d1..bf829c02f 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -53,7 +53,6 @@ #include using std::string; -#include "cpu_emulation.h" #include "sys.h" #include "rom_patches.h" #include "xpram.h" @@ -66,19 +65,9 @@ using std::string; #include "user_strings.h" #include "version.h" #include "main.h" -#include "vm_alloc.h" #include "sigsegv.h" #include "rpc.h" -#if USE_JIT -#ifdef UPDATE_UAE -extern void (*flush_icache)(void); // from compemu_support.cpp -extern bool UseJIT; -#else -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp -#endif -#endif - #ifdef ENABLE_MON # include "mon.h" #endif @@ -86,16 +75,6 @@ extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_suppo #define DEBUG 0 #include "debug.h" -// Constants -const char ROM_FILE_NAME[] = "ROM"; -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - static uint8 last_xpram[XPRAM_SIZE]; // Buffer for monitoring XPRAM changes #ifdef HAVE_PTHREADS @@ -119,10 +98,6 @@ static pthread_mutex_t intflag_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to pro #endif -#if USE_SCRATCHMEM_SUBTERFUGE -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -#endif - #if !defined(HAVE_PTHREADS) static struct sigaction timer_sa; // sigaction used for timer @@ -140,7 +115,6 @@ static void sigint_handler(...); static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI static const char *gui_connection_path = NULL; // GUI connection identifier - // Prototypes static void *xpram_func(void *arg); static void *tick_func(void *arg); @@ -166,23 +140,6 @@ char *strdup(const char *s) } - -/* - * Helpers to map memory that can be accessed from the Mac side - */ - -// NOTE: VM_MAP_32BIT is only used when compiling a 64-bit JIT on specific platforms -void *vm_acquire_mac(size_t size) -{ - return vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - -static int vm_acquire_mac_fixed(void *addr, size_t size) -{ - return vm_acquire_fixed(addr, size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - - /* * SIGSEGV handler */ @@ -326,8 +283,7 @@ static void usage(const char *prg_name) exit(0); } -int main(int argc, char **argv) -{ +int main(int argc, char **argv){ #if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) XInitThreads(); #endif @@ -335,8 +291,6 @@ int main(int argc, char **argv) char str[256]; // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; srand(time(NULL)); tzset(); @@ -499,82 +453,11 @@ int main(int argc, char **argv) // Register dump state function when we got mad after a segfault sigsegv_set_dump_state(sigsegv_dump_state); - // Read RAM size - RAMSize = PrefsFindInt32("ramsize"); - if (RAMSize <= 1000) { - RAMSize *= 1024 * 1024; - } - RAMSize &= 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - if (RAMSize > 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) - RAMSize = 1023*1024*1024; - -#if DIRECT_ADDRESSING - RAMSize = RAMSize & -getpagesize(); // Round down to page boundary -#endif - - // Initialize VM system - vm_init(); - - // Create areas for Mac RAM and ROM - { - uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); - if (ram_rom_area == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - RAMBaseHost = ram_rom_area; - ROMBaseHost = RAMBaseHost + RAMSize; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Allocate scratch memory - ScratchMem = (uint8 *)vm_acquire_mac(SCRATCH_MEM_SIZE); - if (ScratchMem == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block -#endif - -#if DIRECT_ADDRESSING - // RAMBaseMac shall always be zero - MEMBaseDiff = (uintptr)RAMBaseHost; - RAMBaseMac = 0; - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif - #if __MACOSX__ extern void set_current_directory(); set_current_directory(); #endif - // Get rom file path from preferences - const char *rom_path = PrefsFindString("rom"); - - // Load Mac ROM - int rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY); - if (rom_fd < 0) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf("%s", GetString(STR_READING_ROM_FILE)); - ROMSize = lseek(rom_fd, 0, SEEK_END); - if (ROMSize != 64*1024 && ROMSize != 128*1024 && ROMSize != 256*1024 && ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - close(rom_fd); - QuitEmulator(); - } - lseek(rom_fd, 0, SEEK_SET); - if (read(rom_fd, ROMBaseHost, ROMSize) != (ssize_t)ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - close(rom_fd); - QuitEmulator(); - } - // Initialize everything if (!InitAll(vmdir)) QuitEmulator(); @@ -720,24 +603,6 @@ void QuitEmulator(void) // Deinitialize everything ExitAll(); - // Free ROM/RAM areas - if (RAMBaseHost != VM_MAP_FAILED) { - vm_release(RAMBaseHost, RAMSize + 0x100000); - RAMBaseHost = NULL; - ROMBaseHost = NULL; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Delete scratch memory area - if (ScratchMem != (uint8 *)VM_MAP_FAILED) { - vm_release((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - ScratchMem = NULL; - } -#endif - - // Exit VM wrappers - vm_exit(); - // Exit system routines SysExit(); diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index bceef52b8..ca242d81d 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -32,7 +32,6 @@ #include typedef std::basic_string tstring; -#include "cpu_emulation.h" #include "sys.h" #include "rom_patches.h" #include "xpram.h" @@ -46,7 +45,6 @@ typedef std::basic_string tstring; #include "user_strings.h" #include "version.h" #include "main.h" -#include "vm_alloc.h" #include "sigsegv.h" #include "util_windows.h" @@ -61,19 +59,6 @@ extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_suppo #define DEBUG 0 #include "debug.h" - -// Constants -const TCHAR ROM_FILE_NAME[] = TEXT("ROM"); -const int SCRATCH_MEM_SIZE = 0x10000; // Size of scratch memory area - - -// CPU and FPU type, addressing mode -int CPUType; -bool CPUIs68060; -int FPUType; -bool TwentyFourBitAddressing; - - // Global variables HANDLE emul_thread = NULL; // Handle of MacOS emulation thread (main thread) @@ -90,16 +75,11 @@ static SDL_mutex *intflag_lock = NULL; // Mutex to protect InterruptFlags #define LOCK_INTFLAGS SDL_LockMutex(intflag_lock) #define UNLOCK_INTFLAGS SDL_UnlockMutex(intflag_lock) -#if USE_SCRATCHMEM_SUBTERFUGE -uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes -#endif - // Prototypes static int xpram_func(void *arg); static int tick_func(void *arg); static void one_tick(...); - /* * Ersatz functions */ @@ -117,17 +97,6 @@ char *strdup(const char *s) } - -/* - * Map memory that can be accessed from the Mac side - */ - -void *vm_acquire_mac(size_t size) -{ - return vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); -} - - /* * SIGSEGV handler */ @@ -202,14 +171,11 @@ static void usage(const char *prg_name) exit(0); } -int main(int argc, char **argv) -{ +int main(int argc, char **argv){ char str[256]; bool cd_boot = false; // Initialize variables - RAMBaseHost = NULL; - ROMBaseHost = NULL; srand(unsigned(time(NULL))); tzset(); @@ -313,76 +279,6 @@ int main(int argc, char **argv) // Register dump state function when we got mad after a segfault sigsegv_set_dump_state(sigsegv_dump_state); - // Read RAM size - RAMSize = PrefsFindInt32("ramsize"); - if (RAMSize <= 1000) { - RAMSize *= 1024 * 1024; - } - RAMSize &= 0xfff00000; // Round down to 1MB boundary - if (RAMSize < 1024*1024) { - WarningAlert(GetString(STR_SMALL_RAM_WARN)); - RAMSize = 1024*1024; - } - - // Initialize VM system - vm_init(); - - // Create areas for Mac RAM and ROM - uint8 *ram_rom_area = (uint8 *)vm_acquire_mac(RAMSize + 0x100000); - if (ram_rom_area == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - RAMBaseHost = ram_rom_area; - ROMBaseHost = RAMBaseHost + RAMSize; - -#if USE_SCRATCHMEM_SUBTERFUGE - // Allocate scratch memory - ScratchMem = (uint8 *)vm_acquire(SCRATCH_MEM_SIZE); - if (ScratchMem == VM_MAP_FAILED) { - ErrorAlert(STR_NO_MEM_ERR); - QuitEmulator(); - } - ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block -#endif - -#if DIRECT_ADDRESSING - // RAMBaseMac shall always be zero - MEMBaseDiff = (uintptr)RAMBaseHost; - RAMBaseMac = 0; - ROMBaseMac = Host2MacAddr(ROMBaseHost); -#endif - D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); - D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); - - // Get rom file path from preferences - const char* rom_path = PrefsFindString("rom"); - - // Load Mac ROM - HANDLE rom_fh = CreateFile((rom_path != NULL) ? rom_path : ROM_FILE_NAME, - GENERIC_READ, - FILE_SHARE_READ, NULL, - OPEN_EXISTING, - FILE_ATTRIBUTE_NORMAL, - NULL); - if (rom_fh == INVALID_HANDLE_VALUE) { - ErrorAlert(STR_NO_ROM_FILE_ERR); - QuitEmulator(); - } - printf(GetString(STR_READING_ROM_FILE)); - ROMSize = GetFileSize(rom_fh, NULL); - if (ROMSize != 64*1024 && ROMSize != 128*1024 && ROMSize != 256*1024 && ROMSize != 512*1024 && ROMSize != 1024*1024) { - ErrorAlert(STR_ROM_SIZE_ERR); - CloseHandle(rom_fh); - QuitEmulator(); - } - DWORD bytes_read; - if (ReadFile(rom_fh, ROMBaseHost, ROMSize, &bytes_read, NULL) == 0 || bytes_read != ROMSize) { - ErrorAlert(STR_ROM_FILE_READ_ERR); - CloseHandle(rom_fh); - QuitEmulator(); - } - // Initialize native timers timer_init(); @@ -421,8 +317,7 @@ int main(int argc, char **argv) * Quit emulator */ -void QuitEmulator(void) -{ +void QuitEmulator(void){ D(bug("QuitEmulator\n")); // Exit 680x0 emulation @@ -443,27 +338,6 @@ void QuitEmulator(void) // Deinitialize everything ExitAll(); - // Free ROM/RAM areas - if (RAMBaseHost != VM_MAP_FAILED) { - vm_release(RAMBaseHost, RAMSize); - RAMBaseHost = NULL; - } - if (ROMBaseHost != VM_MAP_FAILED) { - vm_release(ROMBaseHost, 0x100000); - ROMBaseHost = NULL; - } - -#if USE_SCRATCHMEM_SUBTERFUGE - // Delete scratch memory area - if (ScratchMem != (uint8 *)VM_MAP_FAILED) { - vm_release((void *)(ScratchMem - SCRATCH_MEM_SIZE/2), SCRATCH_MEM_SIZE); - ScratchMem = NULL; - } -#endif - - // Exit VM wrappers - vm_exit(); - // Exit system routines SysExit(); @@ -473,21 +347,6 @@ void QuitEmulator(void) exit(0); } - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size) -{ -#if USE_JIT - if (UseJIT) - flush_icache_range((uint8 *)start, size); -#endif -} - - /* * Mutexes */ diff --git a/BasiliskII/src/include/main.h b/BasiliskII/src/include/main.h index cc3017477..945a0d6fc 100644 --- a/BasiliskII/src/include/main.h +++ b/BasiliskII/src/include/main.h @@ -23,7 +23,6 @@ // CPU type (0 = 68000, 1 = 68010, 2 = 68020, 3 = 68030, 4 = 68040/060) extern int CPUType; -extern bool CPUIs68060; // Flag to distinguish 68040 and 68060 // FPU type (0 = no FPU, 1 = 68881, 2 = 68882) extern int FPUType; diff --git a/BasiliskII/src/main.cpp b/BasiliskII/src/main.cpp index 148fb581c..469a3f284 100644 --- a/BasiliskII/src/main.cpp +++ b/BasiliskII/src/main.cpp @@ -42,30 +42,30 @@ #define DEBUG 0 #include "debug.h" +// CPU and FPU type, addressing mode +int CPUType; +int FPUType; +bool TwentyFourBitAddressing; + #if ENABLE_MON #include "mon.h" -static uint32 mon_read_byte_b2(uintptr adr) -{ +static uint32 mon_read_byte_b2(uintptr adr){ return ReadMacInt8(adr); } -static void mon_write_byte_b2(uintptr adr, uint32 b) -{ +static void mon_write_byte_b2(uintptr adr, uint32 b){ WriteMacInt8(adr, b); } #endif - /* * Initialize everything, returns false on error */ -bool InitAll(const char *vmdir) -{ - // Check ROM version - if (!CheckROM()) { - ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR); +bool InitAll(const char *vmdir){ + // Allocate memory map and load ROM + if (!InitMacMem()) { return false; } @@ -95,7 +95,6 @@ bool InitAll(const char *vmdir) TwentyFourBitAddressing = false; break; } - CPUIs68060 = false; // Load XPRAM XPRAMInit(vmdir); @@ -178,16 +177,16 @@ bool InitAll(const char *vmdir) XPRAM[0x58] = uint8(main_monitor.depth_to_apple_mode(main_monitor.get_current_mode().depth)); XPRAM[0x59] = 0; - // Init 680x0 emulation (this also activates the memory system which is needed for PatchROM()) - if (!Init680x0()) - return false; - // Install ROM patches if (!PatchROM()) { ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR); return false; } + // Init 680x0 emulation (this also activates the memory system which is needed for PatchROM()) + if (!Init680x0()) + return false; + #if ENABLE_MON // Initialize mon mon_init(); @@ -246,6 +245,8 @@ void ExitAll(void) CDROMExit(); DiskExit(); SonyExit(); + + MacMemExit(); } diff --git a/BasiliskII/src/rom_patches.cpp b/BasiliskII/src/rom_patches.cpp index 1fb85e59b..763b9db86 100644 --- a/BasiliskII/src/rom_patches.cpp +++ b/BasiliskII/src/rom_patches.cpp @@ -822,26 +822,22 @@ void PatchAfterStartup(void) #endif } - /* * Check ROM version, returns false if ROM version is not supported */ -bool CheckROM(void) -{ +bool CheckROM(void){ // Read version ROMVersion = ntohs(*(uint16 *)(ROMBaseHost + 8)); #if DIRECT_ADDRESSING - // Real and direct addressing modes require a 32-bit clean ROM + // requires a 32-bit clean ROM return ROMVersion == ROM_VERSION_32; #else - // Virtual addressing mode works with 32-bit clean Mac II ROMs and Classic ROMs return (ROMVersion == ROM_VERSION_CLASSIC) || (ROMVersion == ROM_VERSION_32); #endif } - /* * Install ROM patches, returns false if ROM version is not supported */ diff --git a/BasiliskII/src/rsrc_patches.cpp b/BasiliskII/src/rsrc_patches.cpp index cdff157ee..ccb108214 100644 --- a/BasiliskII/src/rsrc_patches.cpp +++ b/BasiliskII/src/rsrc_patches.cpp @@ -109,7 +109,7 @@ void CheckLoad(uint32 type, int16 id, uint8 *p, uint32 size) if (base) { p16 = (uint16 *)(p + base); -#if defined(USE_SCRATCHMEM_SUBTERFUGE) +#if USE_SCRATCHMEM_SUBTERFUGE // Set 0x0000 to scratch memory area extern uint8 *ScratchMem; const uint32 ScratchMemBase = Host2MacAddr(ScratchMem); @@ -134,7 +134,7 @@ void CheckLoad(uint32 type, int16 id, uint8 *p, uint32 size) if (base) { p16 = (uint16 *)(p + base); -#if defined(USE_SCRATCHMEM_SUBTERFUGE) +#if USE_SCRATCHMEM_SUBTERFUGE // Set 0x0000 to scratch memory area extern uint8 *ScratchMem; const uint32 ScratchMemBase = Host2MacAddr(ScratchMem); diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index d6c6d3b17..c815ccb94 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -31,23 +31,39 @@ #include "readcpu.h" #include "newcpu.h" #include "compiler/compemu.h" +#include "vm_alloc.h" +#include "user_strings.h" +#include "debug.h" + +#if DIRECT_ADDRESSING +uintptr MEMBaseDiff = 0; // Global offset between a Mac address and its Host equivalent +#endif // RAM and ROM pointers -uint32 RAMBaseMac = 0; // RAM base (Mac address space) gb-- initializer is important -uint8 *RAMBaseHost; // RAM base (host address space) -uint32 RAMSize; // Size of RAM -uint32 ROMBaseMac; // ROM base (Mac address space) -uint8 *ROMBaseHost; // ROM base (host address space) -uint32 ROMSize; // Size of ROM +uint8* RAMBaseHost = 0; // RAM base (host address space) +uint8* ROMBaseHost = 0; // ROM base (host address space) +uint32 RAMBaseMac = 0; // RAM base (Mac address space) +uint32 ROMBaseMac = 0; // ROM base (Mac address space) +uint32 RAMSize = 0; // Size of RAM +uint32 ROMSize = 0; // Size of ROM // Mac frame buffer -uint8 *MacFrameBaseHost; // Frame buffer base (host address space) -uint32 MacFrameSize; // Size of frame buffer +uint8* MacFrameBaseHost; // Frame buffer base (host address space) +uint32 MacFrameSize; // Size of current frame buffer int MacFrameLayout; // Frame buffer layout +uint32 VRAMSize; // Size of VRAM -#if DIRECT_ADDRESSING -uintptr MEMBaseDiff; // Global offset between a Mac address and its Host equivalent +uint32 JITCacheSize=0; + +const char ROM_FILE_NAME[] = "ROM"; +const int MAX_ROM_SIZE = 1024*1024; // 1mb + +#if USE_SCRATCHMEM_SUBTERFUGE +uint8* ScratchMem = NULL; // Scratch memory for Mac ROM writes +int ScratchMemSize = 64*1024; // 64k +#else +int ScratchMemSize = 0; #endif #if USE_JIT @@ -57,20 +73,122 @@ bool UseJIT = false; // From newcpu.cpp extern bool quit_program; +// Create our virtual Macintosh memory map and load ROM +bool InitMacMem(void){ + assert(RAMBaseHost==0); // don't call us twice -/* - * Initialize 680x0 emulation, CheckROM() must have been called first - */ + // Read RAM size + RAMSize = PrefsFindInt32("ramsize"); + if (RAMSize <= 1000) { + RAMSize *= 1024 * 1024; + } + RAMSize &= 0xfff00000; // Round down to 1MB boundary + if (RAMSize < 1024*1024) { + WarningAlert(GetString(STR_SMALL_RAM_WARN)); + RAMSize = 1024*1024; + } + if (RAMSize > 1023*1024*1024) // Cap to 1023MB (APD crashes at 1GB) + RAMSize = 1023*1024*1024; + + VRAMSize = 16*1024*1024; // 16mb, more than enough for 1920x1440x32 + +#if USE_JIT + JITCacheSize = 1024*PrefsFindInt32("jitcachesize") + 1024; +#endif + + // Initialize VM system + vm_init(); + + // Create our virtual Macintosh memory map + RAMBaseHost = (uint8*)vm_acquire( + RAMSize + ScratchMemSize + MAX_ROM_SIZE + VRAMSize + JITCacheSize, + VM_MAP_DEFAULT | VM_MAP_32BIT); + if (RAMBaseHost == VM_MAP_FAILED) { + ErrorAlert(STR_NO_MEM_ERR); + return false; + } + printf("RAMBaseHost=%p\n",RAMBaseHost); + ROMBaseHost = RAMBaseHost + RAMSize + ScratchMemSize; + printf("ROMBaseHost=%p\n",ROMBaseHost); + MacFrameBaseHost = ROMBaseHost + MAX_ROM_SIZE; + printf("MacFrameBaseHost=%p\n",MacFrameBaseHost); + +#if USE_SCRATCHMEM_SUBTERFUGE + // points to middle of scratch memory + ScratchMem = RAMBaseHost + RAMSize + ScratchMemSize/2; + printf("ScratchMem=%p\n",ScratchMem); +#endif + + // Get rom file path from preferences + const char *rom_path = PrefsFindString("rom"); + + // Load Mac ROM +#ifdef WIN32 + HANDLE rom_fh = CreateFile( + rom_path ? rom_path : ROM_FILE_NAME, + GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, + FILE_ATTRIBUTE_NORMAL, NULL); + + if (rom_fh == INVALID_HANDLE_VALUE) { + ErrorAlert(STR_NO_ROM_FILE_ERR); + return false; + } +#else + int rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY); + if (rom_fd < 0) { + ErrorAlert(STR_NO_ROM_FILE_ERR); + return false; + } +#endif + printf("%s", GetString(STR_READING_ROM_FILE)); +#ifdef WIN32 + ROMSize = GetFileSize(rom_fh, NULL); +#else + ROMSize = lseek(rom_fd, 0, SEEK_END); +#endif + switch(ROMSize){ + case 64*1024: + case 128*1024: + case 256*1024: + case 512*1024: + case MAX_ROM_SIZE: + break; + default: + ErrorAlert(STR_ROM_SIZE_ERR); +#ifdef WIN32 + CloseHandle(rom_fh); +#else + close(rom_fd); +#endif + return false; + } +#ifdef WIN32 + DWORD bytes_read; + if (ReadFile(rom_fh, ROMBaseHost, ROMSize, &bytes_read, NULL) == 0 || bytes_read != ROMSize) { +#else + lseek(rom_fd, 0, SEEK_SET); + if (read(rom_fd, ROMBaseHost, ROMSize) != (ssize_t)ROMSize) { +#endif + ErrorAlert(STR_ROM_FILE_READ_ERR); +#ifdef WIN32 + CloseHandle(rom_fh); +#else + close(rom_fd); +#endif + return false; + } + + if (!CheckROM()) { + ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR); + return false; + } -bool Init680x0(void){ #if DIRECT_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) - // NOTE: MEMBaseDiff is set up in main_unix.cpp/main() - RAMBaseMac = 0; + MEMBaseDiff = (uintptr)RAMBaseHost; ROMBaseMac = Host2MacAddr(ROMBaseHost); #else // Initialize UAE memory banks - RAMBaseMac = 0; switch (ROMVersion) { case ROM_VERSION_64K: case ROM_VERSION_PLUS: @@ -88,12 +206,32 @@ bool Init680x0(void){ } memory_init(); #endif + D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); + D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); + + return true; +} + +void MacMemExit(void){ + assert(RAMBaseHost); + vm_release(RAMBaseHost, + RAMSize + ScratchMemSize + MAX_ROM_SIZE + VRAMSize + JITCacheSize); + RAMBaseHost = NULL; + ROMBaseHost = NULL; + //Exit VM wrappers + vm_exit(); +} + +/* + * Initialize 680x0 emulation, CheckROM() must have been called first + */ +bool Init680x0(void){ init_m68k(); #if USE_JIT UseJIT = compiler_use_jit(); if (UseJIT) - compiler_init(); + compiler_init(MacFrameBaseHost + VRAMSize); #endif return true; } @@ -112,16 +250,6 @@ void Exit680x0(void) exit_m68k(); } -/* - * Initialize memory mapping of frame buffer (called upon video mode change) - */ - -void InitFrameBufferMapping(void){ -#if !DIRECT_ADDRESSING - memory_init(); -#endif -} - /* * Reset and start 680x0 emulation (doesn't return) */ diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index 9a612fb21..daad5b209 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -139,7 +139,7 @@ union cacheline { /* Functions exposed to newcpu, or to what was moved from newcpu.c to * compemu_support.c */ -extern void compiler_init(void); +extern void compiler_init(void*); extern void compiler_exit(void); extern bool compiler_use_jit(void); extern void init_comp(void); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 1186d8dda..04f990ea3 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -5003,12 +5003,13 @@ static inline const char *str_on_off(bool b) return b ? "on" : "off"; } -void compiler_init(void) -{ +void compiler_init(void* buf){ static bool initialized = false; if (initialized) return; + compiled_code=(uint8*)buf; + #if JIT_DEBUG // JIT debug mode ? JITDebug = PrefsFindBool("jitdebug"); @@ -5065,24 +5066,11 @@ void compiler_init(void) #endif } -void compiler_exit(void) -{ +void compiler_exit(void){ #if PROFILE_COMPILE_TIME emul_end_time = clock(); #endif - // Deallocate translation cache - if (compiled_code) { - vm_release(compiled_code, cache_size * 1024); - compiled_code = 0; - } - - // Deallocate popallspace - if (popallspace) { - vm_release(popallspace, POPALLSPACE_SIZE); - popallspace = 0; - } - #if PROFILE_COMPILE_TIME write_log("### Compile Block statistics\n"); write_log("Number of calls to compile_block : %d\n", compile_count); @@ -5673,79 +5661,20 @@ uae_u32 get_jitted_size(void) const int CODE_ALLOC_MAX_ATTEMPTS = 10; const int CODE_ALLOC_BOUNDARIES = 128 * 1024; // 128 KB -static uint8 *do_alloc_code(uint32 size, int depth) -{ -#if defined(__linux__) && 0 - /* - This is a really awful hack that is known to work on Linux at - least. - - The trick here is to make sure the allocated cache is nearby - code segment, and more precisely in the positive half of a - 32-bit address space. i.e. addr < 0x80000000. Actually, it - turned out that a 32-bit binary run on AMD64 yields a cache - allocated around 0xa0000000, thus causing some troubles when - translating addresses from m68k to x86. - */ - static uint8 * code_base = NULL; - if (code_base == NULL) { - uintptr page_size = getpagesize(); - uintptr boundaries = CODE_ALLOC_BOUNDARIES; - if (boundaries < page_size) - boundaries = page_size; - code_base = (uint8 *)sbrk(0); - for (int attempts = 0; attempts < CODE_ALLOC_MAX_ATTEMPTS; attempts++) { - if (vm_acquire_fixed(code_base, size) == 0) { - uint8 *code = code_base; - code_base += size; - return code; - } - code_base += boundaries; - } - return NULL; - } - - if (vm_acquire_fixed(code_base, size) == 0) { - uint8 *code = code_base; - code_base += size; - return code; - } - - if (depth >= CODE_ALLOC_MAX_ATTEMPTS) - return NULL; - - return do_alloc_code(size, depth + 1); -#else - uint8 *code = (uint8 *)vm_acquire(size); - return code == VM_MAP_FAILED ? NULL : code; -#endif -} - -static inline uint8 *alloc_code(uint32 size) -{ - uint8 *ptr = do_alloc_code(size, 0); +static inline uint8 *alloc_code(uint32 size){ + uint8 *ptr = (uint8 *)vm_acquire(size); + ptr == VM_MAP_FAILED ? NULL : ptr; /* allocated code must fit in 32-bit boundaries */ - assert((uintptr)ptr <= 0xffffffff); + assert((size_t)ptr<0xffffffffL); return ptr; } -void alloc_cache(void) -{ - if (compiled_code) { - flush_icache_hard(6); - vm_release(compiled_code, cache_size * 1024); - compiled_code = 0; - } +void alloc_cache(void){ + assert(compiled_code); if (cache_size == 0) return; - while (!compiled_code && cache_size) { - if ((compiled_code = alloc_code(cache_size * 1024)) == NULL) { - compiled_code = 0; - cache_size /= 2; - } - } vm_protect(compiled_code, cache_size * 1024, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); if (compiled_code) { @@ -5997,14 +5926,10 @@ static __inline__ void match_states(blockinfo* bi) } } -static __inline__ void create_popalls(void) -{ +static void create_popalls(void){ int i,r; - if ((popallspace = alloc_code(POPALLSPACE_SIZE)) == NULL) { - write_log("FATAL: Could not allocate popallspace!\n"); - abort(); - } + popallspace = compiled_code + cache_size*1024; vm_protect(popallspace, POPALLSPACE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE); int stack_space = STACK_OFFSET; @@ -6320,8 +6245,8 @@ void build_comp(void) write_log(" : supposedly %d compileable opcodes!\n",count); /* Initialise state */ - create_popalls(); alloc_cache(); + create_popalls(); reset_lists(); for (i=0;i ROMBaseMac ? ROMBaseMac : RAMSize; + // RAM must not overlap ROM + assert(RAMSize> 16, ram_size >> 16); + map_banks(&ram24_bank, RAMBaseMac >> 16, RAMSize >> 16); map_banks(&rom24_bank, ROMBaseMac >> 16, ROMSize >> 16); // Map frame buffer at end of RAM. map_banks(&fram24_bank, ((RAMBaseMac + ram_size) >> 16) - 1, 1); } else { - map_banks(&ram_bank, RAMBaseMac >> 16, ram_size >> 16); + map_banks(&ram_bank, RAMBaseMac >> 16, RAMSize >> 16); map_banks(&rom_bank, ROMBaseMac >> 16, ROMSize >> 16); // Map frame buffer From 2e2f2a6b4672114fda3511e1991f0b460ceff00f Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 12 Jun 2021 15:16:59 -0700 Subject: [PATCH 523/534] Make Basilisk II (mostly) 64bit clean --- BasiliskII/src/CrossPlatform/video_vosf.h | 64 +++++++-------- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 62 ++++----------- BasiliskII/src/Unix/main_unix.cpp | 41 +++------- BasiliskII/src/Unix/sysdeps.h | 2 + BasiliskII/src/main.cpp | 10 +-- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 78 +++++++++++-------- .../src/uae_cpu/compiler/codegen_x86.cpp | 5 +- BasiliskII/src/uae_cpu/compiler/compemu.h | 4 +- .../src/uae_cpu/compiler/compemu_support.cpp | 49 ++++-------- BasiliskII/src/uae_cpu/cpu_emulation.h | 11 ++- BasiliskII/src/uae_cpu/memory.cpp | 16 ++-- BasiliskII/src/uae_cpu/memory.h | 4 +- 12 files changed, 138 insertions(+), 208 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/video_vosf.h b/BasiliskII/src/CrossPlatform/video_vosf.h index ff5412bec..b01725026 100644 --- a/BasiliskII/src/CrossPlatform/video_vosf.h +++ b/BasiliskII/src/CrossPlatform/video_vosf.h @@ -78,7 +78,7 @@ extern void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects) #endif // Prototypes -static void vosf_do_set_dirty_area(uintptr first, uintptr last); +static void vosf_do_set_dirty_area(const size_t, const size_t); static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row); // Variables for Video on SEGV support @@ -89,17 +89,17 @@ struct ScreenPageInfo { }; struct ScreenInfo { - uintptr memStart; // Start address aligned to page boundary - uint32 memLength; // Length of the memory addressed by the screen pages - - uintptr pageSize; // Size of a page - int pageBits; // Shift count to get the page number - uint32 pageCount; // Number of pages allocated to the screen - + uint8* memStart; // Start address aligned to page boundary + int memLength; // Length of the memory addressed by the screen pages + + int pageSize; // Size of a page + int pageBits; // Shift count to get the page number + int pageCount; // Number of pages allocated to the screen + + char* dirtyPages; // Table of flags set if page was altered + ScreenPageInfo* pageInfo; // Table of mappings page -> Mac scanlines bool dirty; // Flag: set if the frame buffer was touched bool very_dirty; // Flag: set if the frame buffer was completely modified (e.g. colormap changes) - char * dirtyPages; // Table of flags set if page was altered - ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines }; static ScreenInfo mainBuffer; @@ -251,7 +251,7 @@ static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faul for (uint32 p = 0; p < mainBuffer.pageCount; p++) { uint8 *addr = (uint8 *)(mainBuffer.memStart + (p * mainBuffer.pageSize)); if (accel) - vosf_do_set_dirty_area((uintptr)addr, (uintptr)addr + mainBuffer.pageSize - 1); + vosf_do_set_dirty_area((size_t)addr, (size_t)addr + mainBuffer.pageSize - 1); else addr[0] = 0; // Trigger Screen_fault_handler() } @@ -268,7 +268,7 @@ static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faul if (n_page_faults_p) *n_page_faults_p = n_page_faults; - D(bug("Triggered %d page faults in %ld usec (%.1f usec per fault)\n", n_page_faults, duration, double(duration) / double(n_page_faults))); + D(bug("Triggered %d page faults in %ld usec (%.1f usec per fault)\n", n_page_faults, (long int)duration, double(duration) / double(n_page_faults))); return ((duration / n_tries) < (VOSF_PROFITABLE_THRESHOLD * (frame_skip ? frame_skip : 1))); } @@ -286,7 +286,7 @@ static bool video_vosf_init(MONITOR_INIT){ // Must be page aligned (use page_extend) assert(is_page_aligned((size_t)MacFrameBaseHost)); assert(is_page_aligned(the_buffer_size)); - mainBuffer.memStart = (uintptr)MacFrameBaseHost; + mainBuffer.memStart = MacFrameBaseHost; mainBuffer.memLength = the_buffer_size; mainBuffer.pageSize = page_size; @@ -353,16 +353,14 @@ static void video_vosf_exit(void) } } - /* * Update VOSF state with specified dirty area */ -static void vosf_do_set_dirty_area(uintptr first, uintptr last) -{ - const int first_page = (first - mainBuffer.memStart) >> mainBuffer.pageBits; - const int last_page = (last - mainBuffer.memStart) >> mainBuffer.pageBits; - uint8 *addr = (uint8 *)(first & ~(mainBuffer.pageSize - 1)); +static void vosf_do_set_dirty_area(const size_t first, const size_t last){ + const int first_page = ((size_t)first - (size_t)mainBuffer.memStart) >> mainBuffer.pageBits; + const int last_page = ((size_t)last - (size_t)mainBuffer.memStart) >> mainBuffer.pageBits; + uint8* addr = (uint8*)((size_t)first & ~((size_t)mainBuffer.pageSize - 1)); for (int i = first_page; i <= last_page; i++) { if (PFLAG_ISCLEAR(i)) { PFLAG_SET(i); @@ -392,26 +390,26 @@ static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_widt if (bytes_per_row >= screen_width) { const int bytes_per_pixel = bytes_per_row / screen_width; if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) * bytes_per_pixel; + const size_t a0 = (size_t)mainBuffer.memStart + y * bytes_per_row + x * bytes_per_pixel; + const size_t a1 = (size_t)mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) * bytes_per_pixel; vosf_do_set_dirty_area(a0, a1); } else { for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = a0 + (w - 1) * bytes_per_pixel; + const size_t a0 = (size_t)mainBuffer.memStart + j * bytes_per_row + x * bytes_per_pixel; + const size_t a1 = a0 + (w - 1) * bytes_per_pixel; vosf_do_set_dirty_area(a0, a1); } } } else { const int pixels_per_byte = screen_width / bytes_per_row; if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) / pixels_per_byte; + const size_t a0 = (size_t)mainBuffer.memStart + y * bytes_per_row + x / pixels_per_byte; + const size_t a1 = (size_t)mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) / pixels_per_byte; vosf_do_set_dirty_area(a0, a1); } else { for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + j * bytes_per_row + (x + w - 1) / pixels_per_byte; + const size_t a0 = (size_t)mainBuffer.memStart + j * bytes_per_row + x / pixels_per_byte; + const size_t a1 = (size_t)mainBuffer.memStart + j * bytes_per_row + (x + w - 1) / pixels_per_byte; vosf_do_set_dirty_area(a0, a1); } } @@ -420,25 +418,23 @@ static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_widt UNLOCK_VOSF; } - /* * Screen fault handler */ -bool Screen_fault_handler(sigsegv_info_t *sip) -{ - const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); +bool Screen_fault_handler(sigsegv_info_t* sip){ + const size_t addr = (size_t)sigsegv_get_fault_address(sip); /* Someone attempted to write to the frame buffer. Make it writeable * now so that the data could actually be written to. It will be made * read-only back in one of the screen update_*() functions. */ - if (((uintptr)addr - mainBuffer.memStart) < mainBuffer.memLength) { - const int page = ((uintptr)addr - mainBuffer.memStart) >> mainBuffer.pageBits; + if ((addr - (size_t)mainBuffer.memStart) < mainBuffer.memLength) { + const int page = (addr - (size_t)mainBuffer.memStart) >> mainBuffer.pageBits; LOCK_VOSF; if (PFLAG_ISCLEAR(page)) { PFLAG_SET(page); - vm_protect((char *)(addr & ~(mainBuffer.pageSize - 1)), mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); + vm_protect((char*)(addr & ~(mainBuffer.pageSize - 1)), mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); } mainBuffer.dirty = true; UNLOCK_VOSF; diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index cb30a3be9..7beb229b2 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -61,21 +61,14 @@ typedef UINT_PTR vm_uintptr_t; typedef unsigned long vm_uintptr_t; #endif -/* We want MAP_32BIT, if available, for SheepShaver and BasiliskII - because the emulated target is 32-bit and this helps to allocate - memory so that branches could be resolved more easily (32-bit - displacement to code in .text), on AMD64 for example. */ +/* FIXME: make JIT 64bit clean */ #if defined(__hpux) #define MAP_32BIT MAP_ADDR32 #endif #ifndef MAP_32BIT #define MAP_32BIT 0 #endif -#ifdef __FreeBSD__ -#define FORCE_MAP_32BIT MAP_FIXED -#else #define FORCE_MAP_32BIT MAP_32BIT -#endif #ifndef MAP_ANON #define MAP_ANON 0 #endif @@ -83,41 +76,16 @@ typedef unsigned long vm_uintptr_t; #define MAP_ANONYMOUS 0 #endif -/* NOTE: on linux MAP_32BIT is only implemented on AMD64 - it is a null op on all other architectures - thus the MAP_BASE setting below is the only thing - ensuring low addresses on aarch64 for example */ -#define MAP_EXTRA_FLAGS (MAP_32BIT) - #ifdef HAVE_MMAP_VM -#if (defined(__linux__) && defined(__i386__)) || defined(__FreeBSD__) || HAVE_LINKER_SCRIPT -/* Force a reasonnable address below 0x80000000 on x86 so that we - don't get addresses above when the program is run on AMD64. - NOTE: this is empirically determined on Linux/x86. */ -#define MAP_BASE 0x10000000 -#elif DIRECT_ADDRESSING -/* linux does not implement any useful fallback behavior - such as allocating the next available address - and the first 4k-64k of address space is marked unavailable - for security reasons (see https://wiki.debian.org/mmap_min_addr) - so we must start requesting after the first page - or we get a high 64bit address that will crash direct addressing - - leaving NULL unmapped is a good idea anyway for debugging reasons */ -#define MAP_BASE 0x00010000 -#else -#define MAP_BASE 0x00000000 -#endif -static char * next_address = (char *)MAP_BASE; #ifdef HAVE_MMAP_ANON -#define map_flags (MAP_ANON | MAP_EXTRA_FLAGS) +#define map_flags (MAP_ANON) #define zero_fd -1 #else #ifdef HAVE_MMAP_ANONYMOUS -#define map_flags (MAP_ANONYMOUS | MAP_EXTRA_FLAGS) +#define map_flags (MAP_ANONYMOUS) #define zero_fd -1 #else -#define map_flags (MAP_EXTRA_FLAGS) +#define map_flags (0) static int zero_fd = -1; #endif #endif @@ -126,8 +94,7 @@ static int zero_fd = -1; /* Translate generic VM map flags to host values. */ #ifdef HAVE_MMAP_VM -static int translate_map_flags(int vm_flags) -{ +static int translate_map_flags(int vm_flags){ int flags = 0; if (vm_flags & VM_MAP_SHARED) flags |= MAP_SHARED; @@ -238,8 +205,8 @@ void vm_exit(void) and default protection bits are read / write. The return value is the actual mapping address chosen or VM_MAP_FAILED for errors. */ -void * vm_acquire(size_t size, int options){ - void * addr; +void* vm_acquire(size_t size, int options){ + void* addr=NULL; errno = 0; #ifndef HAVE_VM_WRITE_WATCH @@ -258,19 +225,16 @@ void * vm_acquire(size_t size, int options){ int fd = zero_fd; int the_map_flags = translate_map_flags(options) | map_flags; - if ((addr = mmap((caddr_t)next_address, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0)) == (void *)MAP_FAILED) + printf("mmap addr=%p size=%p flags=%p\n",addr,size,the_map_flags); + if ((addr = mmap(addr, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0))==(void*)MAP_FAILED) return VM_MAP_FAILED; - printf("next=%p got=%p size=%p\n",next_address,addr,size); - -#if DIRECT_ADDRESSING - // If MAP_32BIT and MAP_BASE fail to ensure - // a 32-bit address crash now instead of later. - // FIXME: make everything 64-bit clean and tear this all out. + printf("mmap got=%p\n",addr); + + // If MAP_32BIT fails to ensure a 32bit address, crash now instead of later. + // FIXME: Make JIT 64bit clean and tear all this VM_MAP_32BIT hackery out. if(sizeof(void *) > 4 && (options & VM_MAP_32BIT)) assert((size_t)addr<0xffffffffL); -#endif - next_address = (char *)addr + size; #elif defined(HAVE_WIN32_VM) int alloc_type = MEM_RESERVE | MEM_COMMIT; if (options & VM_MAP_WRITE_WATCH) diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index bf829c02f..0b2cbcad2 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -171,8 +171,7 @@ static sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) * Dump state when everything went wrong after a SEGV */ -static void sigsegv_dump_state(sigsegv_info_t *sip) -{ +static void sigsegv_dump_state(sigsegv_info_t *sip){ const sigsegv_address_t fault_address = sigsegv_get_fault_address(sip); const sigsegv_address_t fault_instruction = sigsegv_get_fault_instruction_address(sip); fprintf(stderr, "Caught SIGSEGV at address %p", fault_address); @@ -199,7 +198,6 @@ static void sigsegv_dump_state(sigsegv_info_t *sip) QuitEmulator(); } - /* * Update virtual clock and trigger interrupts if necessary */ @@ -404,6 +402,14 @@ int main(int argc, char **argv){ } } + // Init system routines + SysInit(); + + // Show preferences editor + if (!gui_connection && !PrefsFindBool("nogui")) + if (!PrefsEditor()) + QuitEmulator(); + #ifdef USE_SDL // Initialize SDL system int sdl_flags = 0; @@ -435,14 +441,6 @@ int main(int argc, char **argv){ #endif - // Init system routines - SysInit(); - - // Show preferences editor - if (!gui_connection && !PrefsFindBool("nogui")) - if (!PrefsEditor()) - QuitEmulator(); - // Install the handler for SIGSEGV if (!sigsegv_install_handler(sigsegv_handler)) { sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno)); @@ -463,9 +461,6 @@ int main(int argc, char **argv){ QuitEmulator(); D(bug("Initialization complete\n")); - D(bug("Mac RAM starts at %p (%08x)\n", RAMBaseHost, RAMBaseMac)); - D(bug("Mac ROM starts at %p (%08x)\n", ROMBaseHost, ROMBaseMac)); - #ifdef ENABLE_MON // Setup SIGINT handler to enter mon sigemptyset(&sigint_sa.sa_mask); @@ -618,24 +613,6 @@ void QuitEmulator(void) exit(0); } - -/* - * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 - * or a dynamically recompiling emulator) - */ - -void FlushCodeCache(void *start, uint32 size){ -#if USE_JIT - if (UseJIT) -#ifdef UPDATE_UAE - flush_icache(); -#else - flush_icache_range((uint8 *)start, size); -#endif -#endif -} - - /* * SIGINT handler, enters mon */ diff --git a/BasiliskII/src/Unix/sysdeps.h b/BasiliskII/src/Unix/sysdeps.h index 4e330ad53..4f0481d9a 100644 --- a/BasiliskII/src/Unix/sysdeps.h +++ b/BasiliskII/src/Unix/sysdeps.h @@ -33,6 +33,8 @@ # include #endif +#include + #include #include #include diff --git a/BasiliskII/src/main.cpp b/BasiliskII/src/main.cpp index 469a3f284..37484db6a 100644 --- a/BasiliskII/src/main.cpp +++ b/BasiliskII/src/main.cpp @@ -42,11 +42,6 @@ #define DEBUG 0 #include "debug.h" -// CPU and FPU type, addressing mode -int CPUType; -int FPUType; -bool TwentyFourBitAddressing; - #if ENABLE_MON #include "mon.h" @@ -59,6 +54,11 @@ static void mon_write_byte_b2(uintptr adr, uint32 b){ } #endif +// CPU and FPU type, addressing mode +int CPUType; +int FPUType; +bool TwentyFourBitAddressing; + /* * Initialize everything, returns false on error */ diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index c815ccb94..700d5d43e 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -37,22 +37,22 @@ #include "debug.h" #if DIRECT_ADDRESSING -uintptr MEMBaseDiff = 0; // Global offset between a Mac address and its Host equivalent +size_t MEMBaseDiff = 0; // Global offset between a Mac address and its Host equivalent #endif // RAM and ROM pointers -uint8* RAMBaseHost = 0; // RAM base (host address space) -uint8* ROMBaseHost = 0; // ROM base (host address space) -uint32 RAMBaseMac = 0; // RAM base (Mac address space) -uint32 ROMBaseMac = 0; // ROM base (Mac address space) -uint32 RAMSize = 0; // Size of RAM -uint32 ROMSize = 0; // Size of ROM +uint8* RAMBaseHost = 0; // RAM base (host address space) +uint8* ROMBaseHost = 0; // ROM base (host address space) +const uint32 RAMBaseMac = 0; // RAM base (Mac address space) +uint32 ROMBaseMac = 0; // ROM base (Mac address space) +uint32 RAMSize = 0; // Size of RAM +uint32 ROMSize = 0; // Size of ROM // Mac frame buffer -uint8* MacFrameBaseHost; // Frame buffer base (host address space) -uint32 MacFrameSize; // Size of current frame buffer -int MacFrameLayout; // Frame buffer layout -uint32 VRAMSize; // Size of VRAM +uint8* MacFrameBaseHost = 0; // Frame buffer base (host address space) +uint32 MacFrameSize = 0; // Size of current frame buffer +int MacFrameLayout = 0; // Frame buffer layout +uint32 VRAMSize = 0; // Size of VRAM uint32 JITCacheSize=0; @@ -66,10 +66,6 @@ int ScratchMemSize = 64*1024; // 64k int ScratchMemSize = 0; #endif -#if USE_JIT -bool UseJIT = false; -#endif - // From newcpu.cpp extern bool quit_program; @@ -93,7 +89,8 @@ bool InitMacMem(void){ VRAMSize = 16*1024*1024; // 16mb, more than enough for 1920x1440x32 #if USE_JIT - JITCacheSize = 1024*PrefsFindInt32("jitcachesize") + 1024; + JITCacheSize = compiler_get_jit_cache_size(); + printf("JITCacheSize=%p\n",JITCacheSize); #endif // Initialize VM system @@ -102,7 +99,11 @@ bool InitMacMem(void){ // Create our virtual Macintosh memory map RAMBaseHost = (uint8*)vm_acquire( RAMSize + ScratchMemSize + MAX_ROM_SIZE + VRAMSize + JITCacheSize, - VM_MAP_DEFAULT | VM_MAP_32BIT); +#if USE_JIT + // FIXME: JIT is not 64bit clean + ((JITCacheSize>0)?VM_MAP_32BIT:0)| +#endif + VM_MAP_DEFAULT); if (RAMBaseHost == VM_MAP_FAILED) { ErrorAlert(STR_NO_MEM_ERR); return false; @@ -167,7 +168,7 @@ bool InitMacMem(void){ if (ReadFile(rom_fh, ROMBaseHost, ROMSize, &bytes_read, NULL) == 0 || bytes_read != ROMSize) { #else lseek(rom_fd, 0, SEEK_SET); - if (read(rom_fd, ROMBaseHost, ROMSize) != (ssize_t)ROMSize) { + if (read(rom_fd, ROMBaseHost, ROMSize) != ROMSize) { #endif ErrorAlert(STR_ROM_FILE_READ_ERR); #ifdef WIN32 @@ -185,7 +186,7 @@ bool InitMacMem(void){ #if DIRECT_ADDRESSING // Mac address space = host address space minus constant offset (MEMBaseDiff) - MEMBaseDiff = (uintptr)RAMBaseHost; + MEMBaseDiff = (size_t)RAMBaseHost; ROMBaseMac = Host2MacAddr(ROMBaseHost); #else // Initialize UAE memory banks @@ -229,23 +230,20 @@ void MacMemExit(void){ bool Init680x0(void){ init_m68k(); #if USE_JIT - UseJIT = compiler_use_jit(); - if (UseJIT) - compiler_init(MacFrameBaseHost + VRAMSize); + if(JITCacheSize>0) + compiler_init(MacFrameBaseHost + VRAMSize, JITCacheSize); // put JIT cache after VRAM #endif return true; } - /* * Deinitialize 680x0 emulation */ -void Exit680x0(void) -{ +void Exit680x0(void){ #if USE_JIT - if (UseJIT) - compiler_exit(); + if(JITCacheSize>0) + compiler_exit(); #endif exit_m68k(); } @@ -254,18 +252,16 @@ void Exit680x0(void) * Reset and start 680x0 emulation (doesn't return) */ -void Start680x0(void) -{ +void Start680x0(void){ m68k_reset(); #if USE_JIT - if (UseJIT) - m68k_compile_execute(); - else + if (JITCacheSize>0) + m68k_compile_execute(); + else #endif m68k_execute(); } - /* * Trigger interrupt */ @@ -383,3 +379,19 @@ void Execute68k(uint32 addr, struct M68kRegisters *r) r->a[i] = m68k_areg(regs, i); quit_program = false; } + +#if USE_JIT +extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp +#endif + +/* + * Code was patched, flush caches if neccessary (i.e. when using a real 680x0 + * or a dynamically recompiling emulator) + */ + +void FlushCodeCache(void *start, uint32 size){ +#if USE_JIT + if (JITCacheSize>0) + flush_icache_range((uint8 *)start, size); +#endif +} diff --git a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp index f03c4f3cf..e78212c94 100644 --- a/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp +++ b/BasiliskII/src/uae_cpu/compiler/codegen_x86.cpp @@ -3841,10 +3841,9 @@ x86_get_cpu_vendor(struct cpuinfo_x86 *c) } static void -cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx) -{ +cpuid(uae_u32 op, uae_u32 *eax, uae_u32 *ebx, uae_u32 *ecx, uae_u32 *edx){ const int CPUID_SPACE = 4096; - uae_u8* cpuid_space = (uae_u8 *)vm_acquire(CPUID_SPACE); + uae_u8* cpuid_space = (uae_u8 *)vm_acquire(CPUID_SPACE,VM_MAP_DEFAULT|VM_MAP_32BIT); if (cpuid_space == VM_MAP_FAILED) abort(); vm_protect(cpuid_space, CPUID_SPACE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu.h b/BasiliskII/src/uae_cpu/compiler/compemu.h index daad5b209..ce1014a65 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu.h +++ b/BasiliskII/src/uae_cpu/compiler/compemu.h @@ -139,9 +139,9 @@ union cacheline { /* Functions exposed to newcpu, or to what was moved from newcpu.c to * compemu_support.c */ -extern void compiler_init(void*); +extern void compiler_init(void*,int); extern void compiler_exit(void); -extern bool compiler_use_jit(void); +extern uint32 compiler_get_jit_cache_size(void); extern void init_comp(void); extern void flush(int save_regs); extern void small_flush(int save_regs); diff --git a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp index 04f990ea3..ae8f7ab47 100644 --- a/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp +++ b/BasiliskII/src/uae_cpu/compiler/compemu_support.cpp @@ -5003,12 +5003,13 @@ static inline const char *str_on_off(bool b) return b ? "on" : "off"; } -void compiler_init(void* buf){ +void compiler_init(void* buf, int JITCacheSize){ static bool initialized = false; if (initialized) return; compiled_code=(uint8*)buf; + cache_size=JITCacheSize; #if JIT_DEBUG // JIT debug mode ? @@ -5025,10 +5026,6 @@ void compiler_init(void* buf){ #endif write_log(" : compile FPU instructions : %s\n", !avoid_fpu ? "yes" : "no"); - // Get size of the translation cache (in KB) - cache_size = PrefsFindInt32("jitcachesize"); - write_log(" : requested translation cache size : %d KB\n", cache_size); - // Initialize target CPU (check for features, e.g. CMOV, rat stalls) raw_init_cpu(); setzflg_uses_bsf = target_check_bsf(); @@ -5123,25 +5120,29 @@ void compiler_exit(void){ #endif } -bool compiler_use_jit(void) -{ +// Return bytes needed for JIT cache +uint32 compiler_get_jit_cache_size(void){ // Check for the "jit" prefs item if (!PrefsFindBool("jit")) - return false; + return 0; // Don't use JIT if translation cache size is less then MIN_CACHE_SIZE KB - if (PrefsFindInt32("jitcachesize") < MIN_CACHE_SIZE) { + uint32 JITCacheSize=PrefsFindInt32("jitcachesize"); + if (JITCacheSize < MIN_CACHE_SIZE) { write_log(" : translation cache size is less than %d KB. Disabling JIT.\n", MIN_CACHE_SIZE); - return false; + return 0; } - + +#if 0 // Enable JIT for 68020+ emulation only if (CPUType < 2) { write_log(" : JIT is not supported in 680%d0 emulation mode, disabling.\n", CPUType); - return false; + return 0; } +#endif - return true; + write_log(" : translation cache size : %d KB\n", JITCacheSize); + return (1024*JITCacheSize) + POPALLSPACE_SIZE; } void init_comp(void) @@ -5635,10 +5636,6 @@ void calc_disp_ea_020(int base, uae_u32 dp, int target, int tmp) forget_about(tmp); } - - - - void set_cache_state(int enabled) { if (enabled!=letit) @@ -5658,35 +5655,19 @@ uae_u32 get_jitted_size(void) return 0; } -const int CODE_ALLOC_MAX_ATTEMPTS = 10; -const int CODE_ALLOC_BOUNDARIES = 128 * 1024; // 128 KB - -static inline uint8 *alloc_code(uint32 size){ - uint8 *ptr = (uint8 *)vm_acquire(size); - ptr == VM_MAP_FAILED ? NULL : ptr; - /* allocated code must fit in 32-bit boundaries */ - assert((size_t)ptr<0xffffffffL); - return ptr; -} - void alloc_cache(void){ assert(compiled_code); - - if (cache_size == 0) - return; + assert(cache_size); vm_protect(compiled_code, cache_size * 1024, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE); if (compiled_code) { - write_log(" : actual translation cache size : %d KB at 0x%08X\n", cache_size, compiled_code); max_compile_start = compiled_code + cache_size*1024 - BYTES_PER_INST; current_compile_p = compiled_code; current_cache_size = 0; } } - - extern void op_illg_1 (uae_u32 opcode) REGPARAM; static void calc_checksum(blockinfo* bi, uae_u32* c1, uae_u32* c2) diff --git a/BasiliskII/src/uae_cpu/cpu_emulation.h b/BasiliskII/src/uae_cpu/cpu_emulation.h index af17ad2cc..b1713d45c 100644 --- a/BasiliskII/src/uae_cpu/cpu_emulation.h +++ b/BasiliskII/src/uae_cpu/cpu_emulation.h @@ -23,18 +23,17 @@ #include - /* * Memory system */ // RAM and ROM pointers (allocated and set by main_*.cpp) -extern uint32 RAMBaseMac; // RAM base (Mac address space), does not include Low Mem when != 0 -extern uint8 *RAMBaseHost; // RAM base (host address space) +extern const uint32 RAMBaseMac; // RAM base (Mac address space) +extern uint8* RAMBaseHost; // RAM base (host address space) extern uint32 RAMSize; // Size of RAM extern uint32 ROMBaseMac; // ROM base (Mac address space) -extern uint8 *ROMBaseHost; // ROM base (host address space) +extern uint8* ROMBaseHost; // ROM base (host address space) extern uint32 ROMSize; // Size of ROM extern uint32 VRAMSize; // Size of VRAM @@ -42,8 +41,8 @@ extern uint32 VRAMSize; // Size of VRAM // If we are not using direct addressing, the Mac frame buffer gets // mapped to this location. The memory must be allocated by VideoInit(). // If multiple monitors are used, they must share the frame buffer -const uint32 MacFrameBaseMac = 0xa0000000; -extern uint8 *MacFrameBaseHost; // Frame buffer base (host address space) +const uint32 MacFrameBaseMac = 0xa0000000; +extern uint8* MacFrameBaseHost; // Frame buffer base (host address space) extern uint32 MacFrameSize; // Size of frame buffer #endif extern int MacFrameLayout; // Frame buffer layout (see defines below) diff --git a/BasiliskII/src/uae_cpu/memory.cpp b/BasiliskII/src/uae_cpu/memory.cpp index 955e0a607..5863ab4da 100644 --- a/BasiliskII/src/uae_cpu/memory.cpp +++ b/BasiliskII/src/uae_cpu/memory.cpp @@ -136,7 +136,7 @@ static void REGPARAM2 ram_wput(uaecptr, uae_u32) REGPARAM; static void REGPARAM2 ram_bput(uaecptr, uae_u32) REGPARAM; static uae_u8 *REGPARAM2 ram_xlate(uaecptr addr) REGPARAM; -static uintptr RAMBaseDiff; // RAMBaseHost - RAMBaseMac +static size_t RAMBaseDiff; // RAMBaseHost - RAMBaseMac uae_u32 REGPARAM2 ram_lget(uaecptr addr) { @@ -244,7 +244,7 @@ static void REGPARAM2 rom_wput(uaecptr, uae_u32) REGPARAM; static void REGPARAM2 rom_bput(uaecptr, uae_u32) REGPARAM; static uae_u8 *REGPARAM2 rom_xlate(uaecptr addr) REGPARAM; -static uintptr ROMBaseDiff; // ROMBaseHost - ROMBaseMac +static size_t ROMBaseDiff; // ROMBaseHost - ROMBaseMac uae_u32 REGPARAM2 rom_lget(uaecptr addr) { @@ -343,7 +343,7 @@ static void REGPARAM2 frame_host_888_lput(uaecptr, uae_u32) REGPARAM; static uae_u8 *REGPARAM2 frame_xlate(uaecptr addr) REGPARAM; -static uintptr FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac +static size_t FrameBaseDiff; // MacFrameBaseHost - MacFrameBaseMac uae_u32 REGPARAM2 frame_direct_lget(uaecptr addr) { @@ -585,12 +585,12 @@ void memory_init(void){ for(long i=0; i<65536; i++) put_mem_bank(i<<16, &dummy_bank); - // RAM must not overlap ROM - assert(RAMSize ROMBaseMac ? ROMBaseMac : RAMSize; - RAMBaseDiff = (uintptr)RAMBaseHost - (uintptr)RAMBaseMac; - ROMBaseDiff = (uintptr)ROMBaseHost - (uintptr)ROMBaseMac; - FrameBaseDiff = (uintptr)MacFrameBaseHost - (uintptr)MacFrameBaseMac; + RAMBaseDiff = (size_t)RAMBaseHost - RAMBaseMac; + ROMBaseDiff = (size_t)ROMBaseHost - ROMBaseMac; + FrameBaseDiff = (size_t)MacFrameBaseHost - MacFrameBaseMac; // Map RAM, ROM and display if (TwentyFourBitAddressing) { diff --git a/BasiliskII/src/uae_cpu/memory.h b/BasiliskII/src/uae_cpu/memory.h index d78981660..8a3da5f32 100644 --- a/BasiliskII/src/uae_cpu/memory.h +++ b/BasiliskII/src/uae_cpu/memory.h @@ -118,7 +118,7 @@ extern void byteput(uaecptr addr, uae_u32 b); #endif /* !DIRECT_ADDRESSING */ #if DIRECT_ADDRESSING -extern uintptr MEMBaseDiff; +extern size_t MEMBaseDiff; static __inline__ uae_u8 *do_get_real_address(uaecptr addr) { @@ -126,7 +126,7 @@ static __inline__ uae_u8 *do_get_real_address(uaecptr addr) } static __inline__ uae_u32 do_get_virtual_address(uae_u8 *addr) { - return (uintptr)addr - MEMBaseDiff; + return (size_t)addr - MEMBaseDiff; } static __inline__ uae_u32 get_long(uaecptr addr) { From 856a58ef61392173fa95f0dfcb26637ef8617ba7 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 12 Jun 2021 18:09:24 -0700 Subject: [PATCH 524/534] Remove debug --- BasiliskII/src/CrossPlatform/vm_alloc.cpp | 2 -- BasiliskII/src/uae_cpu/basilisk_glue.cpp | 5 ----- 2 files changed, 7 deletions(-) diff --git a/BasiliskII/src/CrossPlatform/vm_alloc.cpp b/BasiliskII/src/CrossPlatform/vm_alloc.cpp index 7beb229b2..c85835905 100755 --- a/BasiliskII/src/CrossPlatform/vm_alloc.cpp +++ b/BasiliskII/src/CrossPlatform/vm_alloc.cpp @@ -225,10 +225,8 @@ void* vm_acquire(size_t size, int options){ int fd = zero_fd; int the_map_flags = translate_map_flags(options) | map_flags; - printf("mmap addr=%p size=%p flags=%p\n",addr,size,the_map_flags); if ((addr = mmap(addr, size, VM_PAGE_DEFAULT, the_map_flags, fd, 0))==(void*)MAP_FAILED) return VM_MAP_FAILED; - printf("mmap got=%p\n",addr); // If MAP_32BIT fails to ensure a 32bit address, crash now instead of later. // FIXME: Make JIT 64bit clean and tear all this VM_MAP_32BIT hackery out. diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 700d5d43e..680f15359 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -90,7 +90,6 @@ bool InitMacMem(void){ #if USE_JIT JITCacheSize = compiler_get_jit_cache_size(); - printf("JITCacheSize=%p\n",JITCacheSize); #endif // Initialize VM system @@ -108,16 +107,12 @@ bool InitMacMem(void){ ErrorAlert(STR_NO_MEM_ERR); return false; } - printf("RAMBaseHost=%p\n",RAMBaseHost); ROMBaseHost = RAMBaseHost + RAMSize + ScratchMemSize; - printf("ROMBaseHost=%p\n",ROMBaseHost); MacFrameBaseHost = ROMBaseHost + MAX_ROM_SIZE; - printf("MacFrameBaseHost=%p\n",MacFrameBaseHost); #if USE_SCRATCHMEM_SUBTERFUGE // points to middle of scratch memory ScratchMem = RAMBaseHost + RAMSize + ScratchMemSize/2; - printf("ScratchMem=%p\n",ScratchMem); #endif // Get rom file path from preferences From b0ef509c082db29dc0e689e4ad45d26699427fad Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 16 Jun 2021 21:58:14 -0700 Subject: [PATCH 525/534] Remove legacy APIs from SheepShaver --- SheepShaver/src/Unix/Irix/audio_irix.cpp | 1 - SheepShaver/src/Unix/audio_oss_esd.cpp | 1 - SheepShaver/src/Unix/configure.ac | 89 +- SheepShaver/src/Unix/main_unix.cpp | 71 +- SheepShaver/src/Unix/prefs_editor_gtk.cpp | 10 +- SheepShaver/src/Unix/video_x.cpp | 2584 --------------------- 6 files changed, 8 insertions(+), 2748 deletions(-) delete mode 120000 SheepShaver/src/Unix/Irix/audio_irix.cpp delete mode 120000 SheepShaver/src/Unix/audio_oss_esd.cpp delete mode 100644 SheepShaver/src/Unix/video_x.cpp diff --git a/SheepShaver/src/Unix/Irix/audio_irix.cpp b/SheepShaver/src/Unix/Irix/audio_irix.cpp deleted file mode 120000 index 2e7ef88f4..000000000 --- a/SheepShaver/src/Unix/Irix/audio_irix.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../../BasiliskII/src/Unix/Irix/audio_irix.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/audio_oss_esd.cpp b/SheepShaver/src/Unix/audio_oss_esd.cpp deleted file mode 120000 index acf070c11..000000000 --- a/SheepShaver/src/Unix/audio_oss_esd.cpp +++ /dev/null @@ -1 +0,0 @@ -../../../BasiliskII/src/Unix/audio_oss_esd.cpp \ No newline at end of file diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index a8d1a007a..c65217eb5 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -31,12 +31,8 @@ esac dnl Options. AC_ARG_ENABLE(jit, [ --enable-jit enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) AC_ARG_ENABLE(ppc-emulator, [ --enable-ppc-emulator use the selected PowerPC emulator [default=auto]], [WANT_EMULATED_PPC=$enableval], [WANT_EMULATED_PPC=auto]) -AC_ARG_ENABLE(fbdev-dga, [ --enable-fbdev-dga use direct frame buffer access via /dev/fb0 [default=yes]], [WANT_FBDEV_DGA=$enableval], [WANT_FBDEV_DGA=yes]) -AC_ARG_ENABLE(xf86-dga, [ --enable-xf86-dga use the XFree86 DGA extension [default=yes]], [WANT_XF86_DGA=$enableval], [WANT_XF86_DGA=yes]) -AC_ARG_ENABLE(xf86-vidmode, [ --enable-xf86-vidmode use the XFree86 VidMode extension [default=yes]], [WANT_XF86_VIDMODE=$enableval], [WANT_XF86_VIDMODE=yes]) AC_ARG_ENABLE(vosf, [ --enable-vosf enable video on SEGV signals [default=no]], [WANT_VOSF=$enableval], [WANT_VOSF=no]) AC_ARG_ENABLE(standalone-gui,[ --enable-standalone-gui enable a standalone GUI prefs editor [default=no]], [WANT_STANDALONE_GUI=$enableval], [WANT_STANDALONE_GUI=no]) -AC_ARG_WITH(esd, [ --with-esd support ESD for sound under Linux/FreeBSD [default=yes]], [WANT_ESD=$withval], [WANT_ESD=yes]) AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [case "$withval" in gtk1) WANT_GTK="gtk";; @@ -177,9 +173,6 @@ dnl Do we need SDL? WANT_SDL=no if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then WANT_SDL=yes - WANT_XF86_DGA=no - WANT_XF86_VIDMODE=no - WANT_FBDEV_DGA=no SDL_SUPPORT="$SDL_SUPPORT video" fi if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then @@ -254,19 +247,6 @@ else SDL_SUPPORT="none" fi -dnl We need X11, if not using SDL. -if [[ "x$WANT_SDL_VIDEO" != "xyes" ]]; then - AC_PATH_XTRA - if [[ "x$no_x" = "xyes" ]]; then - AC_MSG_ERROR([You need X11 to run SheepShaver.]) - fi - CFLAGS="$CFLAGS $X_CFLAGS" - CXXFLAGS="$CXXFLAGS $X_CFLAGS" - LIBS="$LIBS $X_PRE_LIBS $X_LIBS -lX11 -lXext $X_EXTRA_LIBS" -fi - - - dnl We need pthreads on non-PowerPC systems. Try libpthread first, then libc_r (FreeBSD), then PTL. HAVE_PTHREADS=yes case $EMULATED_PPC:$target_os in @@ -302,38 +282,6 @@ if [[ "x$HAVE_PTHREADS" = "xyes" ]]; then AC_DEFINE(HAVE_PTHREADS, 1, [Define if pthreads are available.]) fi -dnl We use FBDev DGA if possible. -if [[ "x$WANT_FBDEV_DGA" = "xyes" ]]; then - AC_CHECK_HEADER(linux/fb.h, [ - AC_DEFINE(ENABLE_FBDEV_DGA, 1, [Define if using Linux fbdev extension.]) - ], [ - AC_MSG_WARN([Could not find Linux FBDev extension, ignoring --enable-fbdev-dga.]) - WANT_FBDEV_DGA=no - ]) -fi - -dnl We use XFree86 DGA if possible. -if [[ "x$WANT_XF86_DGA" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86dga, XF86DGAQueryExtension, [ - AC_DEFINE(ENABLE_XF86_DGA, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86dga" - ], [ - AC_MSG_WARN([Could not find XFree86 DGA extension, ignoring --enable-xf86-dga.]) - WANT_XF86_DGA=no - ]) -fi - -dnl We use XFree86 VidMode if possible. -if [[ "x$WANT_XF86_VIDMODE" = "xyes" ]]; then - AC_CHECK_LIB(Xxf86vm, XF86VidModeQueryExtension, [ - AC_DEFINE(ENABLE_XF86_VIDMODE, 1, [Define if using XFree86 DGA extension.]) - LIBS="$LIBS -lXxf86vm" - ], [ - AC_MSG_WARN([Could not find XFree86 VidMode extension, ignoring --enable-xf86-vidmode.]) - WANT_XF86_VIDMODE=no - ]) -fi - dnl We use GTK+ if possible. UISRCS=../dummy/prefs_editor_dummy.cpp case "x$WANT_GTK" in @@ -383,20 +331,6 @@ if [[ "$WANT_GTK" = "no" ]]; then fi AC_SUBST(STANDALONE_GUI, [$WANT_STANDALONE_GUI]) -dnl We use ESD if possible. -if [[ "x$WANT_ESD" = "xyes" ]]; then - WANT_ESD=no - AM_PATH_ESD(0.2.8, [ - AC_DEFINE(ENABLE_ESD, 1, [Define is using ESD.]) - CFLAGS="$CFLAGS $ESD_CFLAGS" - CXXFLAGS="$CXXFLAGS $ESD_CFLAGS" - LIBS="$LIBS $ESD_LIBS" - WANT_ESD=yes - ], [ - AC_MSG_WARN([Could not find ESD, disabling ESD support.]) - ]) -fi - dnl We use 64-bit file size support if possible. AC_SYS_LARGEFILE @@ -637,7 +571,6 @@ EXTRASYSSRCS= case "$target_os" in linux*) ETHERSRC=ether_unix.cpp - AUDIOSRC=audio_oss_esd.cpp SCSISRC=Linux/scsi_linux.cpp if [[ "x$EMULATED_PPC" = "xno" ]]; then EXTRASYSSRCS="paranoia.cpp Linux/sheepthreads.c ppc_asm.S" @@ -667,27 +600,11 @@ darwin*) CPPFLAGS="$CPPFLAGS -I../MacOSX/Launcher" fi fi - if [[ "x$WANT_ESD" = "xno" -a "x$ac_cv_framework_CoreAudio" = "xyes" -a "x$WANT_SDL_AUDIO" = "xno" ]]; then + if [[ "x$ac_cv_framework_CoreAudio" = "xyes" -a "x$WANT_SDL_AUDIO" = "xno" ]]; then AUDIOSRC="../MacOSX/audio_macosx.cpp ../MacOSX/AudioBackEnd.cpp ../MacOSX/AudioDevice.cpp ../MacOSX/MacOSX_sound_if.cpp" OSX_CORE_AUDIO="-DOSX_CORE_AUDIO" fi ;; -irix*) - AUDIOSRC=Irix/audio_irix.cpp - LIBS="$LIBS -laudio" - WANT_ESD=no - - dnl Check if our compiler supports -IPA (MIPSPro) - HAVE_IPA=no - ocflags="$CFLAGS" - CFLAGS=`echo " $CFLAGS -IPA" | sed -e "s/ -g //g"` - AC_MSG_CHECKING(if "-IPA" works) - dnl Do a test compile of an empty function - AC_TRY_COMPILE([#if defined __GNUC__ - # error GCC does not support IPA yet - #endif],, [AC_MSG_RESULT(yes); HAVE_IPA=yes], AC_MSG_RESULT(no)) - CFLAGS="$ocflags" - ;; esac dnl BINCUE @@ -1744,13 +1661,9 @@ echo SDL support ...................... : $SDL_SUPPORT echo SDL major-version ................ : $WANT_SDL_VERSION_MAJOR echo BINCUE support ................... : $have_bincue echo LIBVHD support ................... : $have_libvhd -echo FBDev DGA support ................ : $WANT_FBDEV_DGA -echo XFree86 DGA support .............. : $WANT_XF86_DGA -echo XFree86 VidMode support .......... : $WANT_XF86_VIDMODE echo Using PowerPC emulator ........... : $EMULATED_PPC echo Enable JIT compiler .............. : $WANT_JIT echo Enable video on SEGV signals ..... : $WANT_VOSF -echo ESD sound support ................ : $WANT_ESD echo GTK user interface ............... : $WANT_GTK echo mon debugger support ............. : $WANT_MON echo Addressing mode .................. : $WANT_ADDRESSING_MODE diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 94bb47862..0771f5671 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -125,21 +125,8 @@ #include #endif -#ifndef USE_SDL_VIDEO -#include -#endif - #ifdef ENABLE_GTK #include -#if !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) -#include -#endif -#endif - -#ifdef ENABLE_XF86_DGA -#include -#include -#include #endif #ifdef ENABLE_MON @@ -199,14 +186,6 @@ uint8 gZeroPage[0x3000], gKernelData[0x2000]; #endif // Global variables -#ifndef USE_SDL_VIDEO -char *x_display_name = NULL; // X11 display name -Display *x_display = NULL; // X11 display handle -#ifdef X11_LOCK_TYPE -X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock -#endif -#endif - static int zero_fd = 0; // FD of /dev/zero static bool lm_area_mapped = false; // Flag: Low Memory area mmap()ped static bool rom_area_mapped = false; // Flag: Mac ROM mmap()ped @@ -680,8 +659,7 @@ static bool install_signal_handlers(void) static std::string sdl_vmdir; -static bool init_sdl() -{ +static bool init_sdl(){ int sdl_flags = 0; #ifdef USE_SDL_VIDEO sdl_flags |= SDL_INIT_VIDEO; @@ -727,11 +705,7 @@ static bool init_sdl() } #endif -int main(int argc, char **argv) -{ -#if defined(ENABLE_GTK) && !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) - XInitThreads(); -#endif +int main(int argc, char **argv){ char str[256]; bool memory_mapped_from_zero, ram_rom_areas_contiguous; const char *vmdir = NULL; @@ -782,12 +756,6 @@ int main(int argc, char **argv) argv[i] = NULL; } else if (strcmp(argv[i], "--help") == 0) { usage(argv[0]); -#ifndef USE_SDL_VIDEO - } else if (strcmp(argv[i], "--display") == 0) { - i++; - if (i < argc) - x_display_name = strdup(argv[i]); -#endif } else if (strcmp(argv[i], "--gui-connection") == 0) { argv[i++] = NULL; if (i < argc) { @@ -858,22 +826,6 @@ int main(int argc, char **argv) } } -#ifndef USE_SDL_VIDEO - // Open display - x_display = XOpenDisplay(x_display_name); - if (x_display == NULL) { - char str[256]; - sprintf(str, GetString(STR_NO_XSERVER_ERR), XDisplayName(x_display_name)); - ErrorAlert(str); - goto quit; - } - -#if defined(ENABLE_XF86_DGA) && !defined(ENABLE_MON) - // Fork out, so we can return from fullscreen mode when things get ugly - XF86DGAForkApp(DefaultScreen(x_display)); -#endif -#endif - #ifdef ENABLE_MON // Initialize mon mon_init(); @@ -1200,12 +1152,6 @@ static void Quit(void) mon_exit(); #endif - // Close X11 server connection -#ifndef USE_SDL_VIDEO - if (x_display) - XCloseDisplay(x_display); -#endif - // Notify GUI we are about to leave if (gui_connection) { if (rpc_method_invoke(gui_connection, RPC_METHOD_EXIT, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) @@ -2303,20 +2249,18 @@ void display_alert(int title_id, int prefix_id, int button_id, const char *text) } #endif - /* * Display error alert */ -void ErrorAlert(const char *text) -{ +void ErrorAlert(const char *text){ if (gui_connection) { if (rpc_method_invoke(gui_connection, RPC_METHOD_ERROR_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR && rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) return; } #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { + if (PrefsFindBool("nogui")) { printf(GetString(STR_SHELL_ERROR_PREFIX), text); return; } @@ -2327,20 +2271,18 @@ void ErrorAlert(const char *text) #endif } - /* * Display warning alert */ -void WarningAlert(const char *text) -{ +void WarningAlert(const char *text){ if (gui_connection) { if (rpc_method_invoke(gui_connection, RPC_METHOD_WARNING_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR && rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR) return; } #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO) - if (PrefsFindBool("nogui") || x_display == NULL) { + if (PrefsFindBool("nogui")) { printf(GetString(STR_SHELL_WARNING_PREFIX), text); return; } @@ -2350,7 +2292,6 @@ void WarningAlert(const char *text) #endif } - /* * Display choice alert */ diff --git a/SheepShaver/src/Unix/prefs_editor_gtk.cpp b/SheepShaver/src/Unix/prefs_editor_gtk.cpp index b092e8241..81b16f14b 100644 --- a/SheepShaver/src/Unix/prefs_editor_gtk.cpp +++ b/SheepShaver/src/Unix/prefs_editor_gtk.cpp @@ -711,7 +711,6 @@ static GtkWidget *w_frameskip, *w_display_x, *w_display_y; static GtkWidget *l_frameskip, *l_display_x, *l_display_y; static int display_type; static int dis_width, dis_height; -static bool is_fbdev_dga_mode = false; static GtkWidget *w_dspdevice_file, *w_mixerdevice_file; @@ -772,8 +771,7 @@ static void tb_nosound(GtkWidget *widget) } // Read and convert graphics preferences -static void parse_graphics_prefs(void) -{ +static void parse_graphics_prefs(void){ display_type = DISPLAY_WINDOW; dis_width = 640; dis_height = 480; @@ -784,12 +782,6 @@ static void parse_graphics_prefs(void) display_type = DISPLAY_WINDOW; else if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) display_type = DISPLAY_SCREEN; -#ifdef ENABLE_FBDEV_DGA - else if (sscanf(str, "fbdev/%d/%d", &dis_width, &dis_height) == 2) { - is_fbdev_dga_mode = true; - display_type = DISPLAY_SCREEN; - } -#endif } else { uint32 window_modes = PrefsFindInt32("windowmodes"); diff --git a/SheepShaver/src/Unix/video_x.cpp b/SheepShaver/src/Unix/video_x.cpp deleted file mode 100644 index f73747402..000000000 --- a/SheepShaver/src/Unix/video_x.cpp +++ /dev/null @@ -1,2584 +0,0 @@ -/* - * video_x.cpp - Video/graphics emulation, X11 specific stuff - * - * SheepShaver (C) Marc Hellwig and Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - */ - -#include "sysdeps.h" - -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include - -#ifdef ENABLE_FBDEV_DGA -# include -# include -#endif - -#ifdef ENABLE_XF86_DGA -# include -#endif - -#ifdef ENABLE_XF86_VIDMODE -# include -#endif - -#ifdef ENABLE_FBDEV_DGA -# include -#endif - -#include "main.h" -#include "adb.h" -#include "prefs.h" -#include "user_strings.h" -#include "about_window.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" - -#define DEBUG 0 -#include "debug.h" - -#ifndef NO_STD_NAMESPACE -using std::sort; -#endif - - -// Constants -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -static const bool hw_mac_cursor_accl = true; // Flag: Enable MacOS to X11 copy of cursor? - -// Global variables -static int32 frame_skip; -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; -static bool redraw_thread_active = false; // Flag: Redraw thread installed -static pthread_attr_t redraw_thread_attr; // Redraw thread attributes -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static pthread_t redraw_thread; // Redraw thread - -static volatile bool thread_stop_req = false; -static sem_t thread_stop_ack; -static sem_t thread_resume_req; - -static bool local_X11; // Flag: X server running on local machine? -static bool has_dga = false; // Flag: Video DGA capable -static bool has_vidmode = false; // Flag: VidMode extension available - -#ifdef ENABLE_VOSF -static bool use_vosf = true; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool palette_changed = false; // Flag: Palette changed, redraw thread must update palette -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static volatile bool quit_full_screen_ack = false; // Acknowledge for quit_full_screen -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread - -static bool emul_suspended = false; // Flag: emulator suspended -static Window suspend_win; // "Suspend" window -static void *fb_save = NULL; // Saved frame buffer for suspend -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// X11 variables -static int screen; // Screen number -static int xdepth; // Depth of X screen -static int depth; // Depth of Mac frame buffer -static Window rootwin, the_win; // Root window and our window -static int num_depths = 0; // Number of available X depths -static int *avail_depths = NULL; // List of available X depths -static VisualFormat visualFormat; -static XVisualInfo visualInfo; -static Visual *vis; -static int color_class; -static int rshift, rloss, gshift, gloss, bshift, bloss; // Pixel format of DirectColor/TrueColor modes -static Colormap cmap[2]; // Two colormaps (DGA) for 8-bit mode -static XColor x_palette[256]; // Color palette to be used as CLUT and gamma table -static int orig_accel_numer, orig_accel_denom, orig_threshold; // Original mouse acceleration - -static XColor black, white; -static unsigned long black_pixel, white_pixel; -static int eventmask; -static const int win_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | EnterWindowMask | ExposureMask | StructureNotifyMask; -static const int dga_eventmask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask; - -// Variables for window mode -static GC the_gc; -static XImage *img = NULL; -static XShmSegmentInfo shminfo; -static XImage *cursor_image, *cursor_mask_image; -static Pixmap cursor_map, cursor_mask_map; -static Cursor mac_cursor; -static GC cursor_gc, cursor_mask_gc; -static bool cursor_changed = false; // Flag: Cursor changed, window_func must update cursor -static bool have_shm = false; // Flag: SHM present and usable -static uint8 *the_buffer = NULL; // Pointer to Mac frame buffer -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer -static uint32 the_buffer_size; // Size of allocated the_buffer - -// Variables for DGA mode -static bool is_fbdev_dga_mode = false; // Flag: Use FBDev DGA mode? -static int current_dga_cmap; - -#ifdef ENABLE_FBDEV_DGA -static int fb_dev_fd = -1; // Handle to fb device name -static struct fb_fix_screeninfo fb_finfo; // Fixed info -static struct fb_var_screeninfo fb_vinfo; // Variable info -static struct fb_var_screeninfo fb_orig_vinfo; // Variable info to restore later -static struct fb_cmap fb_oldcmap; // Colormap to restore later -#endif - -#ifdef ENABLE_XF86_VIDMODE -// Variables for XF86 VidMode support -static XF86VidModeModeInfo **x_video_modes; // Array of all available modes -static int num_x_video_modes; -#endif - -// Mutex to protect palette -#if defined(HAVE_PTHREADS) -static pthread_mutex_t x_palette_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_PALETTE pthread_mutex_lock(&x_palette_lock) -#define UNLOCK_PALETTE pthread_mutex_unlock(&x_palette_lock) -#elif defined(HAVE_SPINLOCKS) -static spinlock_t x_palette_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_PALETTE spin_lock(&x_palette_lock) -#define UNLOCK_PALETTE spin_unlock(&x_palette_lock) -#else -#define LOCK_PALETTE -#define UNLOCK_PALETTE -#endif - -// Mutex to protect frame buffer -#if defined(HAVE_PTHREADS) -static pthread_mutex_t frame_buffer_lock = PTHREAD_MUTEX_INITIALIZER; -#define LOCK_FRAME_BUFFER pthread_mutex_lock(&frame_buffer_lock); -#define UNLOCK_FRAME_BUFFER pthread_mutex_unlock(&frame_buffer_lock); -#elif defined(HAVE_SPINLOCKS) -static spinlock_t frame_buffer_lock = SPIN_LOCK_UNLOCKED; -#define LOCK_FRAME_BUFFER spin_lock(&frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER spin_unlock(&frame_buffer_lock) -#else -#define LOCK_FRAME_BUFFER -#define UNLOCK_FRAME_BUFFER -#endif - - -// Prototypes -static void *redraw_func(void *arg); - - -// From main_unix.cpp -extern char *x_display_name; -extern Display *x_display; - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - -// From clip_unix.cpp -extern void ClipboardSelectionClear(XSelectionClearEvent *); -extern void ClipboardSelectionRequest(XSelectionRequestEvent *); - - -// Video acceleration through SIGSEGV -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - - -/* - * Utility functions - */ - -// Get current video mode -static inline int get_current_mode(void) -{ - return VModes[cur_mode].viAppleMode; -} - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case APPLE_1_BIT: return 2; - case APPLE_2_BIT: return 4; - case APPLE_4_BIT: return 16; - case APPLE_8_BIT: return 256; - case APPLE_16_BIT: return 32; - case APPLE_32_BIT: return 256; - default: return 0; - } -} - -// Return bits per pixel for requested depth -static inline int bytes_per_pixel(int depth) -{ - int bpp; - switch (depth) { - case 8: - bpp = 1; - break; - case 15: case 16: - bpp = 2; - break; - case 24: case 32: - bpp = 4; - break; - default: - abort(); - } - return bpp; -} - -// Map video_mode depth ID to numerical depth value -static inline int depth_of_video_mode(int mode) -{ - int depth; - switch (mode) { - case APPLE_1_BIT: - depth = 1; - break; - case APPLE_2_BIT: - depth = 2; - break; - case APPLE_4_BIT: - depth = 4; - break; - case APPLE_8_BIT: - depth = 8; - break; - case APPLE_16_BIT: - depth = 16; - break; - case APPLE_32_BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map RGB color to pixel value (this only works in TrueColor/DirectColor visuals) -static inline uint32 map_rgb(uint8 red, uint8 green, uint8 blue) -{ - return ((red >> rloss) << rshift) | ((green >> gloss) << gshift) | ((blue >> bloss) << bshift); -} - - -// Do we have a visual for handling the specified Mac depth? If so, set the -// global variables "xdepth", "visualInfo", "vis" and "color_class". -static bool find_visual_for_depth(int depth) -{ - D(bug("have_visual_for_depth(%d)\n", depth_of_video_mode(depth))); - - // 1-bit works always and uses default visual - if (depth == APPLE_1_BIT) { - vis = DefaultVisual(x_display, screen); - visualInfo.visualid = XVisualIDFromVisual(vis); - int num = 0; - XVisualInfo *vi = XGetVisualInfo(x_display, VisualIDMask, &visualInfo, &num); - visualInfo = vi[0]; - XFree(vi); - xdepth = visualInfo.depth; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d\n", visualInfo.visualid, xdepth)); - return true; - } - - // Calculate minimum and maximum supported X depth - int min_depth = 1, max_depth = 32; - switch (depth) { -#ifdef ENABLE_VOSF - case APPLE_2_BIT: - case APPLE_4_BIT: // VOSF blitters can convert 2/4/8-bit -> 8/16/32-bit - case APPLE_8_BIT: - min_depth = 8; - max_depth = 32; - break; -#else - case APPLE_2_BIT: - case APPLE_4_BIT: // 2/4-bit requires VOSF blitters - return false; - case APPLE_8_BIT: // 8-bit without VOSF requires an 8-bit visual - min_depth = 8; - max_depth = 8; - break; -#endif - case APPLE_16_BIT: // 16-bit requires a 15/16-bit visual - min_depth = 15; - max_depth = 16; - break; - case APPLE_32_BIT: // 32-bit requires a 24/32-bit visual - min_depth = 24; - max_depth = 32; - break; - } - D(bug(" minimum required X depth is %d, maximum supported X depth is %d\n", min_depth, max_depth)); - - // Try to find a visual for one of the color depths - bool visual_found = false; - for (int i=0; i max_depth) - continue; - - // Determine best color class for this depth - switch (xdepth) { - case 1: // Try StaticGray or StaticColor - if (XMatchVisualInfo(x_display, screen, xdepth, StaticGray, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, StaticColor, &visualInfo)) - visual_found = true; - break; - case 8: // Need PseudoColor - if (XMatchVisualInfo(x_display, screen, xdepth, PseudoColor, &visualInfo)) - visual_found = true; - break; - case 15: - case 16: - case 24: - case 32: // Try DirectColor first, as this will allow gamma correction - if (XMatchVisualInfo(x_display, screen, xdepth, DirectColor, &visualInfo) - || XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo)) - visual_found = true; - break; - default: - D(bug(" not a supported depth\n")); - break; - } - } - if (!visual_found) - return false; - - // Visual was found - vis = visualInfo.visual; - color_class = visualInfo.c_class; - D(bug(" found visual ID 0x%02x, depth %d, class ", visualInfo.visualid, xdepth)); -#if DEBUG - switch (color_class) { - case StaticGray: D(bug("StaticGray\n")); break; - case GrayScale: D(bug("GrayScale\n")); break; - case StaticColor: D(bug("StaticColor\n")); break; - case PseudoColor: D(bug("PseudoColor\n")); break; - case TrueColor: D(bug("TrueColor\n")); break; - case DirectColor: D(bug("DirectColor\n")); break; - } -#endif - return true; -} - - -/* - * Open display (window or fullscreen) - */ - -// Set window name and class -static void set_window_name(Window w, int name) -{ - const char *str = GetString(name); - XStoreName(x_display, w, str); - XSetIconName(x_display, w, str); - - XClassHint *hints; - hints = XAllocClassHint(); - if (hints) { - hints->res_name = "SheepShaver"; - hints->res_class = "SheepShaver"; - XSetClassHint(x_display, w, hints); - XFree(hints); - } -} - -// Set window input focus flag -static void set_window_focus(Window w) -{ - XWMHints *hints = XAllocWMHints(); - if (hints) { - hints->input = True; - hints->initial_state = NormalState; - hints->flags = InputHint | StateHint; - XSetWMHints(x_display, w, hints); - XFree(hints); - } -} - -// Set WM_DELETE_WINDOW protocol on window (preventing it from being destroyed by the WM when clicking on the "close" widget) -static Atom WM_DELETE_WINDOW = (Atom)0; -static void set_window_delete_protocol(Window w) -{ - WM_DELETE_WINDOW = XInternAtom(x_display, "WM_DELETE_WINDOW", false); - XSetWMProtocols(x_display, w, &WM_DELETE_WINDOW, 1); -} - -// Wait until window is mapped/unmapped -static void wait_mapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != MapNotify) || (e.xmap.event != w)); -} - -static void wait_unmapped(Window w) -{ - XEvent e; - do { - XMaskEvent(x_display, StructureNotifyMask, &e); - } while ((e.type != UnmapNotify) || (e.xmap.event != w)); -} - -// Disable mouse acceleration -static void disable_mouse_accel(void) -{ - XChangePointerControl(x_display, True, False, 1, 1, 0); -} - -// Restore mouse acceleration to original value -static void restore_mouse_accel(void) -{ - XChangePointerControl(x_display, True, True, orig_accel_numer, orig_accel_denom, orig_threshold); -} - -// Trap SHM errors -static bool shm_error = false; -static int (*old_error_handler)(Display *, XErrorEvent *); - -static int error_handler(Display *d, XErrorEvent *e) -{ - if (e->error_code == BadAccess) { - shm_error = true; - return 0; - } else - return old_error_handler(d, e); -} - -// Open window -static bool open_window(int width, int height) -{ - int aligned_width = (width + 15) & ~15; - int aligned_height = (height + 15) & ~15; - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = win_eventmask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.border_pixel = 0; - wattr.backing_store = NotUseful; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBorderPixel | CWBackingStore | CWColormap, &wattr); - - // Set window name/class - set_window_name(the_win, STR_WINDOW_TITLE); - - // Indicate that we want keyboard input - set_window_focus(the_win); - - // Set delete protocol property - set_window_delete_protocol(the_win); - - // Make window unresizable - XSizeHints *hints; - if ((hints = XAllocSizeHints()) != NULL) { - hints->min_width = width; - hints->max_width = width; - hints->min_height = height; - hints->max_height = height; - hints->flags = PMinSize | PMaxSize; - XSetWMNormalHints(x_display, the_win, hints); - XFree((char *)hints); - } - - // Show window - XMapWindow(x_display, the_win); - wait_mapped(the_win); - - // 1-bit mode is big-endian; if the X server is little-endian, we can't - // use SHM because that doesn't allow changing the image byte order - bool need_msb_image = (depth == 1 && XImageByteOrder(x_display) == LSBFirst); - - // Try to create and attach SHM image - have_shm = false; - if (local_X11 && !need_msb_image && XShmQueryExtension(x_display)) { - - // Create SHM image ("height + 2" for safety) - img = XShmCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, &shminfo, width, height); - shminfo.shmid = shmget(IPC_PRIVATE, (aligned_height + 2) * img->bytes_per_line, IPC_CREAT | 0777); - D(bug(" shm image created\n")); - the_buffer_copy = (uint8 *)shmat(shminfo.shmid, 0, 0); - shminfo.shmaddr = img->data = (char *)the_buffer_copy; - shminfo.readOnly = False; - - // Try to attach SHM image, catching errors - shm_error = false; - old_error_handler = XSetErrorHandler(error_handler); - XShmAttach(x_display, &shminfo); - XSync(x_display, false); - XSetErrorHandler(old_error_handler); - if (shm_error) { - shmdt(shminfo.shmaddr); - XDestroyImage(img); - shminfo.shmid = -1; - } else { - have_shm = true; - shmctl(shminfo.shmid, IPC_RMID, 0); - } - D(bug(" shm image attached\n")); - } - - // Create normal X image if SHM doesn't work ("height + 2" for safety) - if (!have_shm) { - int bytes_per_row = depth == 1 ? aligned_width/8 : TrivialBytesPerRow(aligned_width, DepthModeForPixelDepth(xdepth)); - the_buffer_copy = (uint8 *)malloc((aligned_height + 2) * bytes_per_row); - img = XCreateImage(x_display, vis, depth == 1 ? 1 : xdepth, depth == 1 ? XYBitmap : ZPixmap, 0, (char *)the_buffer_copy, aligned_width, aligned_height, 32, bytes_per_row); - D(bug(" X image created\n")); - } - - // 1-Bit mode is big-endian - if (need_msb_image) { - img->byte_order = MSBFirst; - img->bitmap_bit_order = MSBFirst; - } - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer_copy; - the_buffer_size = page_extend((aligned_height + 2) * img->bytes_per_line); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#else - // Allocate memory for frame buffer - the_buffer = (uint8 *)malloc((aligned_height + 2) * img->bytes_per_line); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); -#endif - screen_base = Host2MacAddr(the_buffer); - - // Create GC - the_gc = XCreateGC(x_display, the_win, 0, 0); - XSetState(x_display, the_gc, black_pixel, white_pixel, GXcopy, AllPlanes); - - // Create cursor - if (hw_mac_cursor_accl) { - cursor_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 4, 16, 16, 16, 2); - cursor_image->byte_order = MSBFirst; - cursor_image->bitmap_bit_order = MSBFirst; - cursor_mask_image = XCreateImage(x_display, vis, 1, XYPixmap, 0, (char *)MacCursor + 36, 16, 16, 16, 2); - cursor_mask_image->byte_order = MSBFirst; - cursor_mask_image->bitmap_bit_order = MSBFirst; - cursor_map = XCreatePixmap(x_display, the_win, 16, 16, 1); - cursor_mask_map = XCreatePixmap(x_display, the_win, 16, 16, 1); - cursor_gc = XCreateGC(x_display, cursor_map, 0, 0); - cursor_mask_gc = XCreateGC(x_display, cursor_mask_map, 0, 0); - mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, 0, 0); - cursor_changed = false; - } - - // Create no_cursor - else { - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, the_win, 1, 1, 1), - XCreatePixmap(x_display, the_win, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, the_win, mac_cursor); - } - - // Init blitting routines - bool native_byte_order; -#ifdef WORDS_BIGENDIAN - native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif -#ifdef ENABLE_VOSF - Screen_blitter_init(visualFormat, native_byte_order, depth); -#endif - - // Set bytes per row - XSync(x_display, false); - return true; -} - -// Open FBDev DGA display -static bool open_fbdev_dga(int width, int height) -{ -#ifdef ENABLE_FBDEV_DGA -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = -1; - for (int i = 0; i < num_x_video_modes; i++) { - if (x_video_modes[i]->hdisplay == width && x_video_modes[i]->vdisplay == height) { - best = i; - break; - } - }; - assert(best != -1); - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - D(bug("[fbdev] VideoMode %d: %d x %d @ %d\n", best, - x_video_modes[best]->hdisplay, x_video_modes[best]->vdisplay, - 1000 * x_video_modes[best]->dotclock / (x_video_modes[best]->htotal * x_video_modes[best]->vtotal))); - } -#endif - - if (ioctl(fb_dev_fd, FBIOGET_FSCREENINFO, &fb_finfo) != 0) { - D(bug("[fbdev] Can't get FSCREENINFO: %s\n", strerror(errno))); - return false; - } - D(bug("[fbdev] Device ID: %s\n", fb_finfo.id)); - D(bug("[fbdev] smem_start: %p [%d bytes]\n", fb_finfo.smem_start, fb_finfo.smem_len)); - - int fb_type = fb_finfo.type; - const char *fb_type_str = NULL; - switch (fb_type) { - case FB_TYPE_PACKED_PIXELS: fb_type_str = "Packed Pixels"; break; - case FB_TYPE_PLANES: fb_type_str = "Non interleaved planes"; break; - case FB_TYPE_INTERLEAVED_PLANES: fb_type_str = "Interleaved planes"; break; - case FB_TYPE_TEXT: fb_type_str = "Text/attributes"; break; - case FB_TYPE_VGA_PLANES: fb_type_str = "EGA/VGA planes"; break; - default: fb_type_str = ""; break; - } - D(bug("[fbdev] type: %s\n", fb_type_str)); - - if (fb_type != FB_TYPE_PACKED_PIXELS) { - D(bug("[fbdev] type '%s' not supported\n", fb_type_str)); - return false; - } - - int fb_visual = fb_finfo.visual; - const char *fb_visual_str; - switch (fb_visual) { - case FB_VISUAL_MONO01: fb_visual_str = "Monochrome 1=Black 0=White"; break; - case FB_VISUAL_MONO10: fb_visual_str = "Monochrome 1=While 0=Black"; break; - case FB_VISUAL_TRUECOLOR: fb_visual_str = "True color"; break; - case FB_VISUAL_PSEUDOCOLOR: fb_visual_str = "Pseudo color (like atari)"; break; - case FB_VISUAL_DIRECTCOLOR: fb_visual_str = "Direct color"; break; - case FB_VISUAL_STATIC_PSEUDOCOLOR: fb_visual_str = "Pseudo color readonly"; break; - default: fb_visual_str = ""; break; - } - D(bug("[fbdev] visual: %s\n", fb_visual_str)); - - if (fb_visual != FB_VISUAL_TRUECOLOR && fb_visual != FB_VISUAL_DIRECTCOLOR) { - D(bug("[fbdev] visual '%s' not supported\n", fb_visual_str)); - return false; - } - - // Map frame buffer - the_buffer = (uint8 *)mmap(NULL, fb_finfo.smem_len, PROT_READ | PROT_WRITE, MAP_SHARED, fb_dev_fd, 0); - if (the_buffer == MAP_FAILED) { - D(bug("[fbdev] Can't mmap /dev/fb0: %s\n", strerror(errno))); - return false; - } - - // Set absolute mouse mode - ADBSetRelMouseMode(false); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, DefaultVisual(x_display, screen), - CWEventMask | CWOverrideRedirect, &wattr); - - // Show window - XMapRaised(x_display, the_win); - wait_mapped(the_win); - - // Grab mouse and keyboard - XGrabKeyboard(x_display, the_win, True, - GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, the_win, True, - PointerMotionMask | ButtonPressMask | ButtonReleaseMask, - GrabModeAsync, GrabModeAsync, the_win, None, CurrentTime); - disable_mouse_accel(); - - // Create no_cursor - mac_cursor = XCreatePixmapCursor(x_display, - XCreatePixmap(x_display, the_win, 1, 1, 1), - XCreatePixmap(x_display, the_win, 1, 1, 1), - &black, &white, 0, 0); - XDefineCursor(x_display, the_win, mac_cursor); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((width + 7) & ~7, DepthModeForPixelDepth(depth)); -#if ENABLE_VOSF - // Extract current screen color masks (we are in True Color mode) - VisualFormat visualFormat; - visualFormat.depth = xdepth = DefaultDepth(x_display, screen); - XMatchVisualInfo(x_display, screen, xdepth, TrueColor, &visualInfo); - assert(visualFormat.depth == visualInfo.depth); - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - D(bug("[fbdev] %d bpp, (%08x,%08x,%08x)\n", - visualFormat.depth, - visualFormat.Rmask, visualFormat.Gmask, visualFormat.Bmask)); - D(bug("[fbdev] Mac depth %d bpp\n", depth)); - - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw -#ifdef WORDS_BIGENDIAN - const bool native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - const bool native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif - Screen_blitter_init(visualFormat, native_byte_order, depth); - - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - use_vosf = true; - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); -#endif - - // Set frame buffer base - D(bug("the_buffer = %p, use_vosf = %d\n", the_buffer, use_vosf)); - screen_base = Host2MacAddr(the_buffer); - VModes[cur_mode].viRowBytes = bytes_per_row; - return true; -#else - ErrorAlert("SheepShaver has been compiled with DGA support disabled."); - return false; -#endif -} - -// Open XF86 DGA display (!! should use X11 VidMode extensions to set mode) -static bool open_xf86_dga(int width, int height) -{ - if (is_fbdev_dga_mode) - return false; - -#ifdef ENABLE_XF86_DGA - // Set relative mouse mode - ADBSetRelMouseMode(true); - - // Create window - XSetWindowAttributes wattr; - wattr.event_mask = eventmask = dga_eventmask; - wattr.override_redirect = True; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - the_win = XCreateWindow(x_display, rootwin, 0, 0, width, height, 0, xdepth, - InputOutput, vis, CWEventMask | CWOverrideRedirect | - (color_class == DirectColor ? CWColormap : 0), &wattr); - - // Show window - XMapRaised(x_display, the_win); - wait_mapped(the_win); - -#ifdef ENABLE_XF86_VIDMODE - // Switch to best mode - if (has_vidmode) { - int best = 0; - for (int i=1; ihdisplay >= width && x_video_modes[i]->vdisplay >= height && - x_video_modes[i]->hdisplay <= x_video_modes[best]->hdisplay && x_video_modes[i]->vdisplay <= x_video_modes[best]->vdisplay) { - best = i; - } - } - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[best]); - XF86VidModeSetViewPort(x_display, screen, 0, 0); - } -#endif - - // Establish direct screen connection - XMoveResizeWindow(x_display, the_win, 0, 0, width, height); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - XGrabKeyboard(x_display, rootwin, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, rootwin, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime); - - int v_width, v_bank, v_size; - XF86DGAGetVideo(x_display, screen, (char **)&the_buffer, &v_width, &v_bank, &v_size); - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - XF86DGASetVidPage(x_display, screen, 0); - - // Set colormap - if (!IsDirectMode(get_current_mode())) { - XSetWindowColormap(x_display, the_win, cmap[current_dga_cmap = 0]); - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } - XSync(x_display, false); - - // Init blitting routines - int bytes_per_row = TrivialBytesPerRow((v_width + 7) & ~7, DepthModeForPixelDepth(depth)); -#if ENABLE_VOSF - bool native_byte_order; -#ifdef WORDS_BIGENDIAN - native_byte_order = (XImageByteOrder(x_display) == MSBFirst); -#else - native_byte_order = (XImageByteOrder(x_display) == LSBFirst); -#endif -#if REAL_ADDRESSING || DIRECT_ADDRESSING - // Screen_blitter_init() returns TRUE if VOSF is mandatory - // i.e. the framebuffer update function is not Blit_Copy_Raw - use_vosf = Screen_blitter_init(visualFormat, native_byte_order, depth); - - if (use_vosf) { - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_host_buffer = the_buffer; - the_buffer_size = page_extend((height + 2) * bytes_per_row); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - the_buffer = (uint8 *)vm_acquire(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - } -#else - use_vosf = false; -#endif -#endif - - // Set frame buffer base - D(bug("the_buffer = %p, use_vosf = %d\n", the_buffer, use_vosf)); - screen_base = Host2MacAddr(the_buffer); - VModes[cur_mode].viRowBytes = bytes_per_row; - return true; -#else - ErrorAlert("SheepShaver has been compiled with DGA support disabled."); - return false; -#endif -} - -// Open DGA display -static bool open_dga(int width, int height) -{ - bool display_open; - - display_open = open_xf86_dga(width, height); -#ifdef ENABLE_FBDEV_DGA - // Try to fallback to FBDev DGA mode - if (!display_open) { - is_fbdev_dga_mode = true; - display_open = open_fbdev_dga(width, height); - } -#endif - - // Common DGA display initialization - if (display_open) { - - // Fake image to get display bounds in the refresh function - if ((img = (XImage *)malloc(sizeof(*img))) == NULL) - return false; - img->width = DisplayWidth(x_display, screen); - img->height = DisplayHeight(x_display, screen); - img->depth = is_fbdev_dga_mode ? xdepth : depth; - img->bytes_per_line = TrivialBytesPerRow(img->width, DepthModeForPixelDepth(img->depth)); - } - - return display_open; -} - -static bool open_display(void) -{ - D(bug("open_display()\n")); - const VideoInfo &mode = VModes[cur_mode]; - - // Get original mouse acceleration - XGetPointerControl(x_display, &orig_accel_numer, &orig_accel_denom, &orig_threshold); - - // Find best available X visual - if (!find_visual_for_depth(mode.viAppleMode)) { - ErrorAlert(GetString(STR_NO_XVISUAL_ERR)); - return false; - } - - // Build up visualFormat structure - visualFormat.fullscreen = (display_type == DIS_SCREEN); - visualFormat.depth = visualInfo.depth; - visualFormat.Rmask = visualInfo.red_mask; - visualFormat.Gmask = visualInfo.green_mask; - visualFormat.Bmask = visualInfo.blue_mask; - - // Create color maps - if (color_class == PseudoColor || color_class == DirectColor) { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocAll); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocAll); - } else { - cmap[0] = XCreateColormap(x_display, rootwin, vis, AllocNone); - cmap[1] = XCreateColormap(x_display, rootwin, vis, AllocNone); - } - - // Find pixel format of direct modes - if (color_class == DirectColor || color_class == TrueColor) { - rshift = gshift = bshift = 0; - rloss = gloss = bloss = 8; - uint32 mask; - for (mask=vis->red_mask; !(mask&1); mask>>=1) - ++rshift; - for (; mask&1; mask>>=1) - --rloss; - for (mask=vis->green_mask; !(mask&1); mask>>=1) - ++gshift; - for (; mask&1; mask>>=1) - --gloss; - for (mask=vis->blue_mask; !(mask&1); mask>>=1) - ++bshift; - for (; mask&1; mask>>=1) - --bloss; - } - - // Preset palette pixel values for CLUT or gamma table - if (color_class == DirectColor) { - int num = vis->map_entries; - for (int i=0; imap_entries : 256); - for (int i=0; i16/32 expand map - if (!IsDirectMode(get_current_mode()) && xdepth > 8) - for (int i=0; i<256; i++) - ExpandMap[i] = map_rgb(i, i, i); -#endif - - // Create display of requested type - display_type = mode.viType; - depth = depth_of_video_mode(mode.viAppleMode); - - bool display_open; - switch (display_type) { - case DIS_SCREEN: - display_open = open_dga(VModes[cur_mode].viXsize, VModes[cur_mode].viYsize); - break; - case DIS_WINDOW: - display_open = open_window(VModes[cur_mode].viXsize, VModes[cur_mode].viYsize); - break; - default: - display_open = false; - break; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Initialize the VOSF system - LOCK_VOSF; - if (!video_vosf_init()) { - ErrorAlert(GetString(STR_VOSF_INIT_ERR)); - UNLOCK_VOSF; - return false; - } - UNLOCK_VOSF; - } -#endif - - // Zero screen buffers, viRowBytes is initialized at this stage - if (display_open) { - memset(the_buffer, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - } - return display_open; -} - - -/* - * Close display - */ - -// Close window -static void close_window(void) -{ - if (have_shm) { - XShmDetach(x_display, &shminfo); -#ifdef ENABLE_VOSF - the_host_buffer = NULL; // don't free() in driver_base dtor -#else - the_buffer_copy = NULL; // don't free() in driver_base dtor -#endif - } - if (img) { - if (!have_shm) - img->data = NULL; - XDestroyImage(img); - } - if (have_shm) { - shmdt(shminfo.shmaddr); - shmctl(shminfo.shmid, IPC_RMID, 0); - } - if (the_gc) - XFreeGC(x_display, the_gc); - - XFlush(x_display); - XSync(x_display, false); -} - -// Close FBDev mode -static void close_fbdev_dga(void) -{ -#ifdef ENABLE_FBDEV_DGA - uint8 *fb_base; - if (!use_vosf) - fb_base = the_buffer; -#ifdef ENABLE_VOSF - else - fb_base = the_host_buffer; -#endif - munmap(fb_base, fb_finfo.smem_len); -#endif -} - -// Close XF86 DGA mode -static void close_xf86_dga(void) -{ -#ifdef ENABLE_XF86_DGA - XF86DGADirectVideo(x_display, screen, 0); -#endif -} - -// Close DGA mode -static void close_dga(void) -{ - if (is_fbdev_dga_mode) - close_fbdev_dga(); - else - close_xf86_dga(); - - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) - XF86VidModeSwitchToMode(x_display, screen, x_video_modes[0]); -#endif - - // Release fake image (it's not a normal XImage!) - free(img); - img = NULL; - - if (!use_vosf) { - // don't free() the screen buffer in driver_base dtor - the_buffer = NULL; - } -#ifdef ENABLE_VOSF - else { - // don't free() the screen buffer in driver_base dtor - the_host_buffer = NULL; - } -#endif -} - -static void close_display(void) -{ - if (display_type == DIS_SCREEN) - close_dga(); - else if (display_type == DIS_WINDOW) - close_window(); - - // Close window - if (the_win) { - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XDestroyWindow(x_display, the_win); - } - - // Free colormaps - if (cmap[0]) { - XFreeColormap(x_display, cmap[0]); - cmap[0] = 0; - } - if (cmap[1]) { - XFreeColormap(x_display, cmap[1]); - cmap[1] = 0; - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - // the_buffer shall always be mapped through vm_acquire() so that we can vm_protect() it at will - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release(the_buffer, the_buffer_size); - the_buffer = NULL; - } - if (the_host_buffer) { - D(bug(" freeing the_host_buffer at %p\n", the_host_buffer)); - free(the_host_buffer); - the_host_buffer = NULL; - } - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#endif - - // Restore mouse acceleration - restore_mouse_accel(); -} - - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - const char *vendor = ServerVendor(x_display); - // Force use of MacX mappings on MacOS X with Apple's X server - int dummy; - if (XQueryExtension(x_display, "Apple-DRI", &dummy, &dummy, &dummy)) - vendor = "MacX"; - bool vendor_found = false; - char line[256]; - while (fgets(line, 255, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (vendor_found) { - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code; - else - break; - } else { - // Search for vendor string - if (strstr(vendor, line) == vendor) - vendor_found = true; - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = vendor_found; - - // Vendor not found? Then display warning - if (!vendor_found) { - char str[256]; - sprintf(str, GetString(STR_KEYCODE_VENDOR_WARN), vendor, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - } -} - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - int apple_id; - if (xsize < 800) - apple_id = APPLE_640x480; - else if (xsize < 1024) - apple_id = APPLE_800x600; - else if (xsize < 1152) - apple_id = APPLE_1024x768; - else if (xsize < 1280) { - if (ysize < 900) - apple_id = APPLE_1152x768; - else - apple_id = APPLE_1152x900; - } - else if (xsize < 1600) - apple_id = APPLE_1280x1024; - else - apple_id = APPLE_1600x1200; - return apple_id; -} - -// Find mode in list of supported modes -static int find_mode(int apple_mode, int apple_id, int type) -{ - for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) { - if (p->viType == type && p->viAppleID == apple_id && p->viAppleMode == apple_mode) - return p - VModes; - } - return -1; -} - -// Add custom video mode -static void add_custom_mode(VideoInfo *&p, int type, uint32 x, uint32 y, int apple_mode, int apple_id) -{ - p->viType = type; - p->viXsize = x; - p->viYsize = y; - p->viRowBytes = TrivialBytesPerRow(p->viXsize, apple_mode); - p->viAppleMode = apple_mode; - p->viAppleID = apple_id; - p++; -} - -// Add mode to list of supported modes -static void add_mode(VideoInfo *&p, uint32 allow, uint32 test, int apple_mode, int apple_id, int type) -{ - if (allow & test) { - uint32 x = 0, y = 0; - switch (apple_id) { - case APPLE_W_640x480: - case APPLE_640x480: - x = 640; - y = 480; - break; - case APPLE_W_800x600: - case APPLE_800x600: - x = 800; - y = 600; - break; - case APPLE_1024x768: - x = 1024; - y = 768; - break; - case APPLE_1152x768: - x = 1152; - y = 768; - break; - case APPLE_1152x900: - x = 1152; - y = 900; - break; - case APPLE_1280x1024: - x = 1280; - y = 1024; - break; - case APPLE_1600x1200: - x = 1600; - y = 1200; - break; - } - add_custom_mode(p, type, x, y, apple_mode, apple_id); - } -} - -// Add standard list of windowed modes for given color depth -static void add_window_modes(VideoInfo *&p, int window_modes, int mode) -{ - add_mode(p, window_modes, 1, mode, APPLE_W_640x480, DIS_WINDOW); - add_mode(p, window_modes, 2, mode, APPLE_W_800x600, DIS_WINDOW); -} - -static bool has_mode(int x, int y) -{ -#ifdef ENABLE_XF86_VIDMODE - if (has_vidmode) { - for (int i=0; ihdisplay == x && x_video_modes[i]->vdisplay == y) - return true; - return false; - } -#endif - return DisplayWidth(x_display, screen) >= x && DisplayHeight(x_display, screen) >= y; -} - -bool VideoInit(void) -{ -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Check if X server runs on local machine - local_X11 = (strncmp(XDisplayName(x_display_name), ":", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "/", 1) == 0) - || (strncmp(XDisplayName(x_display_name), "unix:", 5) == 0); - - // Init keycode translation - keycode_init(); - - // Read frame skip prefs - frame_skip = PrefsFindInt32("frameskip"); - if (frame_skip == 0) - frame_skip = 1; - - // Read mouse wheel prefs - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Init variables - private_data = NULL; - video_activated = true; - - // Find screen and root window - screen = XDefaultScreen(x_display); - rootwin = XRootWindow(x_display, screen); - - // Get sorted list of available depths - avail_depths = XListDepths(x_display, screen, &num_depths); - if (avail_depths == NULL) { - ErrorAlert(GetString(STR_UNSUPP_DEPTH_ERR)); - return false; - } - sort(avail_depths, avail_depths + num_depths); - - // Get screen depth - xdepth = DefaultDepth(x_display, screen); - -#ifdef ENABLE_XF86_DGA - // DGA available? - int event_base, error_base; - is_fbdev_dga_mode = false; - if (local_X11 && XF86DGAQueryExtension(x_display, &event_base, &error_base)) { - int dga_flags = 0; - XF86DGAQueryDirectVideo(x_display, screen, &dga_flags); - has_dga = dga_flags & XF86DGADirectPresent; -#if defined(__linux__) - // Check r/w permission on /dev/mem for DGA mode to work - if (has_dga && access("/dev/mem", R_OK | W_OK) != 0) - has_dga = false; -#endif - } else - has_dga = false; -#endif - -#ifdef ENABLE_XF86_VIDMODE - // VidMode available? - int vm_event_base, vm_error_base; - has_vidmode = XF86VidModeQueryExtension(x_display, &vm_event_base, &vm_error_base); - if (has_vidmode) { - int vm_major_version, vm_minor_version; - XF86VidModeQueryVersion(x_display, &vm_major_version, &vm_minor_version); - D(bug("VidMode extension %d.%d available\n", vm_major_version, vm_minor_version)); - XF86VidModeGetAllModeLines(x_display, screen, &num_x_video_modes, &x_video_modes); - } -#endif - -#ifdef ENABLE_FBDEV_DGA - // FBDev available? - bool has_fbdev_dga = false; - if (local_X11) { - if ((fb_dev_fd = open("/dev/fb0", O_RDWR)) > 0) { - if (ioctl(fb_dev_fd, FBIOGET_VSCREENINFO, &fb_vinfo) != 0) - close(fb_dev_fd); - else { - has_fbdev_dga = true; - if (!has_dga) { - // Fallback to FBDev DGA mode if XF86 DGA is not possible - has_dga = true; - is_fbdev_dga_mode = true; - } - fb_orig_vinfo = fb_vinfo; - D(bug("Frame buffer device initial resolution: %dx%dx%d\n", fb_vinfo.xres, fb_vinfo.yres, fb_vinfo.bits_per_pixel)); - } - } - } -#endif - - // Find black and white colors - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:00/00/00", &black); - XAllocColor(x_display, DefaultColormap(x_display, screen), &black); - XParseColor(x_display, DefaultColormap(x_display, screen), "rgb:ff/ff/ff", &white); - XAllocColor(x_display, DefaultColormap(x_display, screen), &white); - black_pixel = BlackPixel(x_display, screen); - white_pixel = WhitePixel(x_display, screen); - - // Mac screen depth follows X depth (for now) - int default_mode = APPLE_8_BIT; - switch (DefaultDepth(x_display, screen)) { - case 1: - default_mode = APPLE_1_BIT; - break; - case 8: - default_mode = APPLE_8_BIT; - break; - case 15: case 16: - default_mode = APPLE_16_BIT; - break; - case 24: case 32: - default_mode = APPLE_32_BIT; - break; - } - - // Get screen mode from preferences - const char *mode_str = PrefsFindString("screen"); - int default_width = 640, default_height = 480; - if (mode_str) { - display_type = DIS_INVALID; - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DIS_WINDOW; -#ifdef ENABLE_XF86_DGA - else if (has_dga && sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DIS_SCREEN; -#endif -#ifdef ENABLE_FBDEV_DGA - else if (has_fbdev_dga && sscanf(mode_str, "fbdev/%d/%d", &default_width, &default_height) == 2) { - is_fbdev_dga_mode = true; - display_type = DIS_SCREEN; - } -#endif - if (display_type == DIS_INVALID) { - D(bug("Invalid screen mode specified, defaulting to old modes selection\n")); - mode_str = NULL; - } - else { - if (default_width <= 0) - default_width = DisplayWidth(x_display, screen); - else if (default_width > DisplayWidth(x_display, screen)) - default_width = DisplayWidth(x_display, screen); - if (default_height <= 0) - default_height = DisplayHeight(x_display, screen); - else if (default_height > DisplayHeight(x_display, screen)) - default_height = DisplayHeight(x_display, screen); - } - } - - // Construct video mode table - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - if (!has_dga) - screen_modes = 0; - if (mode_str) - window_modes = screen_modes = 0; - else if (window_modes == 0 && screen_modes == 0) - window_modes |= 3; // Allow at least 640x480 and 800x600 window modes - - VideoInfo *p = VModes; - if (mode_str) { - if (display_type == DIS_WINDOW) { - for (unsigned int d = APPLE_1_BIT; d <= APPLE_32_BIT; d++) { - if (find_visual_for_depth(d)) { - if (default_width > 640 && default_height > 480) - add_mode(p, 3, 1, d, APPLE_W_640x480, DIS_WINDOW); - if (default_width > 800 && default_height > 600) - add_mode(p, 3, 2, d, APPLE_W_800x600, DIS_WINDOW); - add_custom_mode(p, display_type, default_width, default_height, d, APPLE_CUSTOM); - } - } -#ifdef ENABLE_VOSF - } else if (display_type == DIS_SCREEN && is_fbdev_dga_mode) { - for (unsigned int d = APPLE_1_BIT; d <= default_mode; d++) - if (find_visual_for_depth(d)) - add_custom_mode(p, display_type, default_width, default_height, d, APPLE_CUSTOM); -#endif - } else - add_custom_mode(p, display_type, default_width, default_height, default_mode, APPLE_CUSTOM); - - // Add extra VidMode capable modes - if (display_type == DIS_SCREEN) { - struct { - int w; - int h; - int apple_id; - } - video_modes[] = { - { 640, 480, APPLE_640x480 }, - { 800, 600, APPLE_800x600 }, - { 1024, 768, APPLE_1024x768 }, - { 1152, 768, APPLE_1152x768 }, - { 1152, 900, APPLE_1152x900 }, - { 1280, 1024, APPLE_1280x1024 }, - { 1600, 1200, APPLE_1600x1200 }, - { 0, } - }; - - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (w >= default_width || h >= default_height) - continue; - if (has_mode(w, h)) { -#ifdef ENABLE_VOSF - if (is_fbdev_dga_mode) { - for (unsigned int d = APPLE_1_BIT; d <= default_mode; d++) - if (find_visual_for_depth(d)) - add_custom_mode(p, display_type, w, h, d, video_modes[i].apple_id); - } else -#endif - add_custom_mode(p, display_type, w, h, default_mode, video_modes[i].apple_id); - } - } - } - } else if (window_modes) { - for (unsigned int d = APPLE_1_BIT; d <= APPLE_32_BIT; d++) - if (find_visual_for_depth(d)) - add_window_modes(p, window_modes, d); - } else if (has_vidmode) { - if (has_mode(640, 480)) - add_mode(p, screen_modes, 1, default_mode, APPLE_640x480, DIS_SCREEN); - if (has_mode(800, 600)) - add_mode(p, screen_modes, 2, default_mode, APPLE_800x600, DIS_SCREEN); - if (has_mode(1024, 768)) - add_mode(p, screen_modes, 4, default_mode, APPLE_1024x768, DIS_SCREEN); - if (has_mode(1152, 768)) - add_mode(p, screen_modes, 64, default_mode, APPLE_1152x768, DIS_SCREEN); - if (has_mode(1152, 900)) - add_mode(p, screen_modes, 8, default_mode, APPLE_1152x900, DIS_SCREEN); - if (has_mode(1280, 1024)) - add_mode(p, screen_modes, 16, default_mode, APPLE_1280x1024, DIS_SCREEN); - if (has_mode(1600, 1200)) - add_mode(p, screen_modes, 32, default_mode, APPLE_1600x1200, DIS_SCREEN); - } else if (screen_modes) { - int xsize = DisplayWidth(x_display, screen); - int ysize = DisplayHeight(x_display, screen); - int apple_id = find_apple_resolution(xsize, ysize); - p->viType = DIS_SCREEN; - p->viRowBytes = 0; - p->viXsize = xsize; - p->viYsize = ysize; - p->viAppleMode = default_mode; - p->viAppleID = apple_id; - p++; - } - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; - - // Find default mode (window 640x480) - cur_mode = -1; - if (has_dga && screen_modes) { - int screen_width = DisplayWidth(x_display, screen); - int screen_height = DisplayHeight(x_display, screen); - int apple_id = find_apple_resolution(screen_width, screen_height); - if (apple_id != -1) - cur_mode = find_mode(default_mode, apple_id, DIS_SCREEN); - } else if (has_dga && mode_str) - cur_mode = find_mode(default_mode, APPLE_CUSTOM, DIS_SCREEN); - - if (cur_mode == -1) { - // pick up first windowed mode available - for (VideoInfo *p = VModes; p->viType != DIS_INVALID; p++) { - if (p->viType == DIS_WINDOW && p->viAppleMode == default_mode) { - cur_mode = p - VModes; - break; - } - } - } - assert(cur_mode != -1); - -#if DEBUG - D(bug("Available video modes:\n")); - for (p = VModes; p->viType != DIS_INVALID; p++) { - int bits = depth_of_video_mode(p->viAppleMode); - D(bug(" %dx%d (ID %02x), %d colors\n", p->viXsize, p->viYsize, p->viAppleID, 1 << bits)); - } -#endif - - // Open window/screen - if (!open_display()) { - ErrorAlert(GetString(STR_OPEN_WINDOW_ERR)); - return false; - } - -#if 0 - // Ignore errors from now on - XSetErrorHandler(ignore_errors); -#endif - - // Lock down frame buffer - XSync(x_display, false); - LOCK_FRAME_BUFFER; - - // Start periodic thread - XSync(x_display, false); - if (sem_init(&thread_stop_ack, 0, 0) < 0) - return false; - if (sem_init(&thread_resume_req, 0, 0) < 0) - return false; - Set_pthread_attr(&redraw_thread_attr, 0); - redraw_thread_cancel = false; - redraw_thread_active = (pthread_create(&redraw_thread, &redraw_thread_attr, redraw_func, NULL) == 0); - D(bug("Redraw thread installed (%ld)\n", redraw_thread)); - return true; -} - - -/* - * Deinitialization - */ - -void VideoExit(void) -{ - // Stop redraw thread - if (redraw_thread_active) { - redraw_thread_cancel = true; - pthread_cancel(redraw_thread); - pthread_join(redraw_thread, NULL); - sem_destroy(&thread_stop_ack); - sem_destroy(&thread_resume_req); - redraw_thread_active = false; - } - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - XSync(x_display, false); - D(bug(" frame buffer unlocked\n")); - -#ifdef ENABLE_VOSF - if (use_vosf) { - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - // Close window and server connection - if (x_display != NULL) { - XSync(x_display, false); - close_display(); - XFlush(x_display); - XSync(x_display, false); - } - -#ifdef ENABLE_FBDEV_DGA - // Close framebuffer device - if (fb_dev_fd >= 0) { - close(fb_dev_fd); - fb_dev_fd = -1; - } -#endif -} - - -/* - * Suspend/resume emulator - */ - -static void suspend_emul(void) -{ - if (display_type == DIS_SCREEN) { - // Release ctrl key - ADBKeyUp(0x36); - ctrl_down = false; - - // Lock frame buffer (this will stop the MacOS thread) - LOCK_FRAME_BUFFER; - - // Save frame buffer - fb_save = malloc(VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - if (fb_save) - Mac2Host_memcpy(fb_save, screen_base, VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - - // Close full screen display -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); -#endif - restore_mouse_accel(); - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XSync(x_display, false); - - // Open "suspend" window - XSetWindowAttributes wattr; - wattr.event_mask = KeyPressMask; - wattr.background_pixel = (vis == DefaultVisual(x_display, screen) ? black_pixel : 0); - wattr.backing_store = Always; - wattr.colormap = (depth == 1 ? DefaultColormap(x_display, screen) : cmap[0]); - - suspend_win = XCreateWindow(x_display, rootwin, 0, 0, 512, 1, 0, xdepth, - InputOutput, vis, CWEventMask | CWBackPixel | CWBackingStore | CWColormap, &wattr); - set_window_name(suspend_win, STR_SUSPEND_WINDOW_TITLE); - set_window_focus(suspend_win); - XMapWindow(x_display, suspend_win); - emul_suspended = true; - } -} - -static void resume_emul(void) -{ - // Close "suspend" window - XDestroyWindow(x_display, suspend_win); - XSync(x_display, false); - - // Reopen full screen display - XMapRaised(x_display, the_win); - wait_mapped(the_win); - XWarpPointer(x_display, None, rootwin, 0, 0, 0, 0, 0, 0); - Window w = is_fbdev_dga_mode ? the_win : rootwin; - XGrabKeyboard(x_display, w, True, GrabModeAsync, GrabModeAsync, CurrentTime); - XGrabPointer(x_display, w, True, PointerMotionMask | ButtonPressMask | ButtonReleaseMask, GrabModeAsync, GrabModeAsync, is_fbdev_dga_mode ? w : None, None, CurrentTime); - disable_mouse_accel(); -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) { - XF86DGADirectVideo(x_display, screen, XF86DGADirectGraphics | XF86DGADirectKeyb | XF86DGADirectMouse); - XF86DGASetViewPort(x_display, screen, 0, 0); - } -#endif - XSync(x_display, false); - - // the_buffer already contains the data to restore. i.e. since a temporary - // frame buffer is used when VOSF is actually used, fb_save is therefore - // not necessary. -#ifdef ENABLE_VOSF - if (use_vosf) { - LOCK_VOSF; - PFLAG_SET_ALL; - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - UNLOCK_VOSF; - } -#endif - - // Restore frame buffer - if (fb_save) { -#ifdef ENABLE_VOSF - // Don't copy fb_save to the temporary frame buffer in VOSF mode - if (!use_vosf) -#endif - Host2Mac_memcpy(screen_base, fb_save, VModes[cur_mode].viYsize * VModes[cur_mode].viRowBytes); - free(fb_save); - fb_save = NULL; - } - - // Unlock frame buffer (and continue MacOS thread) - UNLOCK_FRAME_BUFFER; - emul_suspended = false; -} - - -/* - * Close screen in full-screen mode - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - if (display_type == DIS_SCREEN) { - quit_full_screen = true; - while (!quit_full_screen_ack) ; - } -} - - -/* - * X11 event handling - */ - -// Translate key event to Mac keycode -static int kc_decode(KeySym ks) -{ - switch (ks) { - case XK_A: case XK_a: return 0x00; - case XK_B: case XK_b: return 0x0b; - case XK_C: case XK_c: return 0x08; - case XK_D: case XK_d: return 0x02; - case XK_E: case XK_e: return 0x0e; - case XK_F: case XK_f: return 0x03; - case XK_G: case XK_g: return 0x05; - case XK_H: case XK_h: return 0x04; - case XK_I: case XK_i: return 0x22; - case XK_J: case XK_j: return 0x26; - case XK_K: case XK_k: return 0x28; - case XK_L: case XK_l: return 0x25; - case XK_M: case XK_m: return 0x2e; - case XK_N: case XK_n: return 0x2d; - case XK_O: case XK_o: return 0x1f; - case XK_P: case XK_p: return 0x23; - case XK_Q: case XK_q: return 0x0c; - case XK_R: case XK_r: return 0x0f; - case XK_S: case XK_s: return 0x01; - case XK_T: case XK_t: return 0x11; - case XK_U: case XK_u: return 0x20; - case XK_V: case XK_v: return 0x09; - case XK_W: case XK_w: return 0x0d; - case XK_X: case XK_x: return 0x07; - case XK_Y: case XK_y: return 0x10; - case XK_Z: case XK_z: return 0x06; - - case XK_1: case XK_exclam: return 0x12; - case XK_2: case XK_at: return 0x13; - case XK_3: case XK_numbersign: return 0x14; - case XK_4: case XK_dollar: return 0x15; - case XK_5: case XK_percent: return 0x17; - case XK_6: return 0x16; - case XK_7: return 0x1a; - case XK_8: return 0x1c; - case XK_9: return 0x19; - case XK_0: return 0x1d; - - case XK_grave: case XK_asciitilde: return 0x0a; - case XK_minus: case XK_underscore: return 0x1b; - case XK_equal: case XK_plus: return 0x18; - case XK_bracketleft: case XK_braceleft: return 0x21; - case XK_bracketright: case XK_braceright: return 0x1e; - case XK_backslash: case XK_bar: return 0x2a; - case XK_semicolon: case XK_colon: return 0x29; - case XK_apostrophe: case XK_quotedbl: return 0x27; - case XK_comma: case XK_less: return 0x2b; - case XK_period: case XK_greater: return 0x2f; - case XK_slash: case XK_question: return 0x2c; - - case XK_Tab: if (ctrl_down) {suspend_emul(); return -1;} else return 0x30; - case XK_Return: return 0x24; - case XK_space: return 0x31; - case XK_BackSpace: return 0x33; - - case XK_Delete: return 0x75; - case XK_Insert: return 0x72; - case XK_Home: case XK_Help: return 0x73; - case XK_End: return 0x77; -#ifdef __hpux - case XK_Prior: return 0x74; - case XK_Next: return 0x79; -#else - case XK_Page_Up: return 0x74; - case XK_Page_Down: return 0x79; -#endif - - case XK_Control_L: return 0x36; - case XK_Control_R: return 0x36; - case XK_Shift_L: return 0x38; - case XK_Shift_R: return 0x38; - case XK_Alt_L: return 0x37; - case XK_Alt_R: return 0x37; - case XK_Meta_L: return 0x3a; - case XK_Meta_R: return 0x3a; - case XK_Menu: return 0x32; - case XK_Caps_Lock: return 0x39; - case XK_Num_Lock: return 0x47; - - case XK_Up: return 0x3e; - case XK_Down: return 0x3d; - case XK_Left: return 0x3b; - case XK_Right: return 0x3c; - - case XK_Escape: if (ctrl_down) {quit_full_screen = true; emerg_quit = true; return -1;} else return 0x35; - - case XK_F1: if (ctrl_down) {SysMountFirstFloppy(); return -1;} else return 0x7a; - case XK_F2: return 0x78; - case XK_F3: return 0x63; - case XK_F4: return 0x76; - case XK_F5: return 0x60; - case XK_F6: return 0x61; - case XK_F7: return 0x62; - case XK_F8: return 0x64; - case XK_F9: return 0x65; - case XK_F10: return 0x6d; - case XK_F11: return 0x67; - case XK_F12: return 0x6f; - - case XK_Print: return 0x69; - case XK_Scroll_Lock: return 0x6b; - case XK_Pause: return 0x71; - -#if defined(XK_KP_Prior) && defined(XK_KP_Left) && defined(XK_KP_Insert) && defined (XK_KP_End) - case XK_KP_0: case XK_KP_Insert: return 0x52; - case XK_KP_1: case XK_KP_End: return 0x53; - case XK_KP_2: case XK_KP_Down: return 0x54; - case XK_KP_3: case XK_KP_Next: return 0x55; - case XK_KP_4: case XK_KP_Left: return 0x56; - case XK_KP_5: case XK_KP_Begin: return 0x57; - case XK_KP_6: case XK_KP_Right: return 0x58; - case XK_KP_7: case XK_KP_Home: return 0x59; - case XK_KP_8: case XK_KP_Up: return 0x5b; - case XK_KP_9: case XK_KP_Prior: return 0x5c; - case XK_KP_Decimal: case XK_KP_Delete: return 0x41; -#else - case XK_KP_0: return 0x52; - case XK_KP_1: return 0x53; - case XK_KP_2: return 0x54; - case XK_KP_3: return 0x55; - case XK_KP_4: return 0x56; - case XK_KP_5: return 0x57; - case XK_KP_6: return 0x58; - case XK_KP_7: return 0x59; - case XK_KP_8: return 0x5b; - case XK_KP_9: return 0x5c; - case XK_KP_Decimal: return 0x41; -#endif - case XK_KP_Add: return 0x45; - case XK_KP_Subtract: return 0x4e; - case XK_KP_Multiply: return 0x43; - case XK_KP_Divide: return 0x4b; - case XK_KP_Enter: return 0x4c; - case XK_KP_Equal: return 0x51; - } - return -1; -} - -static int event2keycode(XKeyEvent &ev, bool key_down) -{ - KeySym ks; - int i = 0; - - do { - ks = XLookupKeysym(&ev, i++); - int as = kc_decode(ks); - if (as >= 0) - return as; - if (as == -2) - return as; - } while (ks != NoSymbol); - - return -1; -} - -static void handle_events(void) -{ - // Handle events - for (;;) { - XEvent event; - - XDisplayLock(); - if (!XCheckMaskEvent(x_display, eventmask, &event)) { - // Handle clipboard events - if (XCheckTypedEvent(x_display, SelectionRequest, &event)) - ClipboardSelectionRequest(&event.xselectionrequest); - else if (XCheckTypedEvent(x_display, SelectionClear, &event)) - ClipboardSelectionClear(&event.xselectionclear); - - // Window "close" widget clicked - else if (XCheckTypedEvent(x_display, ClientMessage, &event)) { - if (event.xclient.format == 32 && event.xclient.data.l[0] == WM_DELETE_WINDOW) { - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - } - } - - XDisplayUnlock(); - break; - } - XDisplayUnlock(); - - switch (event.type) { - // Mouse button - case ButtonPress: { - unsigned int button = ((XButtonEvent *)&event)->button; - if (button < 4) - ADBMouseDown(button - 1); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; ibutton; - if (button < 4) - ADBMouseUp(button - 1); - break; - } - - // Mouse entered window - case EnterNotify: - if (event.xcrossing.mode != NotifyGrab && event.xcrossing.mode != NotifyUngrab) - ADBMouseMoved(event.xmotion.x, event.xmotion.y); - break; - - // Mouse moved - case MotionNotify: - ADBMouseMoved(event.xmotion.x, event.xmotion.y); - break; - - // Keyboard - case KeyPress: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - resume_emul(); // Space wakes us up - } - } - break; - } - case KeyRelease: { - int code = -1; - if (use_keycodes) { - if (event2keycode(event.xkey, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.xkey.keycode & 0xff]; - } else - code = event2keycode(event.xkey, false); - if (code >= 0 && code != 0x39) { // Don't propagate Caps Lock releases - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh - case Expose: -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - UNLOCK_VOSF; - } - else -#endif - memset(the_buffer_copy, 0, VModes[cur_mode].viRowBytes * VModes[cur_mode].viYsize); - break; - } - } -} - - -/* - * Execute video VBL routine - */ - -void VideoVBL(void) -{ - if (emerg_quit) - QuitEmulator(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} - - -/* - * Change video mode - */ - -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - thread_stop_req = true; - sem_wait(&thread_stop_ack); - thread_stop_req = false; - DisableInterrupt(); - - /* close old display */ - close_display(); - - /* open new display */ - cur_mode = i; - bool ok = open_display(); - - /* opening the screen failed? Then bail out */ - if (!ok) { - ErrorAlert(GetString(STR_FULL_SCREEN_ERR)); - QuitEmulator(); - } - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - EnableInterrupt(); - sem_post(&thread_resume_req); - return noErr; - } - } - return paramErr; -} - - -/* - * Set color palette - */ - -void video_set_palette(void) -{ - LOCK_PALETTE; - - // Convert colors to XColor array - int mode = get_current_mode(); - int num_in = palette_size(mode); - int num_out = 256; - bool stretch = false; - if (IsDirectMode(mode)) { - // If X is in 565 mode we have to stretch the gamma table from 32 to 64 entries - num_out = vis->map_entries; - stretch = true; - } - XColor *p = x_palette; - for (int i=0; ired = mac_pal[c].red * 0x0101; - p->green = mac_pal[c].green * 0x0101; - p->blue = mac_pal[c].blue * 0x0101; - p++; - } - -#ifdef ENABLE_VOSF - // Recalculate pixel color expansion map - if (!IsDirectMode(mode) && xdepth > 8) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = map_rgb(mac_pal[c].red, mac_pal[c].green, mac_pal[c].blue); - } - - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - if (display_type == DIS_SCREEN) - PFLAG_SET_VERY_DIRTY; - UNLOCK_VOSF; - } -#endif - - // Tell redraw thread to change palette - palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -bool video_can_change_cursor(void) -{ - return hw_mac_cursor_accl && (display_type != DIS_SCREEN); -} - - -/* - * Set cursor image for window - */ - -void video_set_cursor(void) -{ - cursor_changed = true; -} - - -/* - * Thread for window refresh, event handling and other periodic actions - */ - -static void update_display(void) -{ - // Incremental update code - int wide = 0, high = 0, x1, x2, y1, y2, i, j; - int bytes_per_row = VModes[cur_mode].viRowBytes; - int bytes_per_pixel = VModes[cur_mode].viRowBytes / VModes[cur_mode].viXsize; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (j=0; j=y1; j--) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (depth == 1) { - x1 = VModes[cur_mode].viXsize; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; i<(x1>>3); i++) { - if (*p != *p2) { - x1 = i << 3; - break; - } - p++; - p2++; - } - } - x2 = x1; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (i=(VModes[cur_mode].viXsize>>3); i>(x2>>3); i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i << 3; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + (x1 >> 3); - memcpy(&the_buffer_copy[i], &the_buffer[i], wide >> 3); - } - } - - } else { - x1 = VModes[cur_mode].viXsize; - for (j=y1; j<=y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (i=0; ix2; i--) { - p -= bytes_per_pixel; - p2 -= bytes_per_pixel; - if (memcmp(p, p2, bytes_per_pixel)) { - x2 = i; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - for (j=y1; j<=y2; j++) { - i = j * bytes_per_row + x1 * bytes_per_pixel; - memcpy(&the_buffer_copy[i], &the_buffer[i], bytes_per_pixel * wide); - } - } - } - } - - // Refresh display - if (high && wide) { - XDisplayLock(); - if (have_shm) - XShmPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high, 0); - else - XPutImage(x_display, the_win, the_gc, img, x1, y1, x1, y1, wide, high); - XDisplayUnlock(); - } -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -static void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (palette_changed && !emul_suspended) { - palette_changed = false; - - int mode = get_current_mode(); - if (color_class == PseudoColor || color_class == DirectColor) { - int num = vis->map_entries; - bool set_clut = true; - if (!IsDirectMode(mode) && color_class == DirectColor) { - if (display_type == DIS_WINDOW) - set_clut = false; // Indexed mode on true color screen, don't set CLUT - } - - if (set_clut) { - XDisplayLock(); - XStoreColors(x_display, cmap[0], x_palette, num); - XStoreColors(x_display, cmap[1], x_palette, num); - XSync(x_display, false); - XDisplayUnlock(); - } - } - -#ifdef ENABLE_XF86_DGA - if (display_type == DIS_SCREEN && !is_fbdev_dga_mode) { - current_dga_cmap ^= 1; - if (!IsDirectMode(mode) && cmap[current_dga_cmap]) - XF86DGAInstallColormap(x_display, screen, cmap[current_dga_cmap]); - } -#endif - } - - UNLOCK_PALETTE; -} - -static void *redraw_func(void *arg) -{ - int fd = ConnectionNumber(x_display); - - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - sem_post(&thread_stop_ack); - sem_wait(&thread_resume_req); - } - - int64 delay = next - GetTicks_usec(); - if (delay < -VIDEO_REFRESH_DELAY) { - - // We are lagging far behind, so we reset the delay mechanism - next = GetTicks_usec(); - - } else if (delay <= 0) { - - // Delay expired, refresh display - next += VIDEO_REFRESH_DELAY; - ticks++; - - // Handle X11 events - handle_events(); - - // Quit DGA mode if requested - if (quit_full_screen) { - quit_full_screen = false; - if (display_type == DIS_SCREEN) { - XDisplayLock(); -#if defined(ENABLE_XF86_DGA) || defined(ENABLE_FBDEV_DGA) -#ifdef ENABLE_XF86_DGA - if (!is_fbdev_dga_mode) - XF86DGADirectVideo(x_display, screen, 0); -#endif - XUngrabPointer(x_display, CurrentTime); - XUngrabKeyboard(x_display, CurrentTime); - XUnmapWindow(x_display, the_win); - wait_unmapped(the_win); - XDestroyWindow(x_display, the_win); -#endif - XSync(x_display, false); - XDisplayUnlock(); - quit_full_screen_ack = true; - return NULL; - } - } - - // Refresh display and set cursor image in window mode - static int tick_counter = 0; - if (display_type == DIS_WINDOW) { - tick_counter++; - if (tick_counter >= frame_skip) { - tick_counter = 0; - - // Update display -#ifdef ENABLE_VOSF - if (use_vosf) { - XDisplayLock(); - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(); - UNLOCK_VOSF; - XSync(x_display, false); // Let the server catch up - } - XDisplayUnlock(); - } - else -#endif - update_display(); - - // Set new cursor image if it was changed - if (hw_mac_cursor_accl && cursor_changed) { - cursor_changed = false; - uint8 *x_data = (uint8 *)cursor_image->data; - uint8 *x_mask = (uint8 *)cursor_mask_image->data; - for (int i = 0; i < 32; i++) { - x_mask[i] = MacCursor[4 + i] | MacCursor[36 + i]; - x_data[i] = MacCursor[4 + i]; - } - XDisplayLock(); - XFreeCursor(x_display, mac_cursor); - XPutImage(x_display, cursor_map, cursor_gc, cursor_image, 0, 0, 0, 0, 16, 16); - XPutImage(x_display, cursor_mask_map, cursor_mask_gc, cursor_mask_image, 0, 0, 0, 0, 16, 16); - mac_cursor = XCreatePixmapCursor(x_display, cursor_map, cursor_mask_map, &black, &white, MacCursor[2], MacCursor[3]); - XDefineCursor(x_display, the_win, mac_cursor); - XDisplayUnlock(); - } - } - } -#ifdef ENABLE_VOSF - else if (use_vosf) { - // Update display (VOSF variant) - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(); - UNLOCK_VOSF; - } - } - } -#endif - - // Set new palette if it was changed - handle_palette_changes(); - - } else { - - // No display refresh pending, check for X events - fd_set readfds; - FD_ZERO(&readfds); - FD_SET(fd, &readfds); - struct timeval timeout; - timeout.tv_sec = 0; - timeout.tv_usec = delay; - if (select(fd+1, &readfds, NULL, NULL, &timeout) > 0) - handle_events(); - } - } - return NULL; -} - - -/* - * Record dirty area from NQD - */ - -void video_set_dirty_area(int x, int y, int w, int h) -{ - VideoInfo const & mode = VModes[cur_mode]; - const int screen_width = VIDEO_MODE_X; - const int screen_height = VIDEO_MODE_Y; - const int bytes_per_row = VIDEO_MODE_ROW_BYTES; - -#ifdef ENABLE_VOSF - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} From 876e4cfdd873bc43948528b770071188dfd60b84 Mon Sep 17 00:00:00 2001 From: Seg Date: Wed, 16 Jun 2021 22:55:27 -0700 Subject: [PATCH 526/534] Sync SheepShaver with BII SDL changes --- SheepShaver/Makefile | 4 +- SheepShaver/src/CrossPlatform/video_vosf.h | 687 +---- SheepShaver/src/SDL | 1 + SheepShaver/src/SDL/video_sdl.cpp | 2340 ---------------- SheepShaver/src/SDL/video_sdl2.cpp | 2869 -------------------- SheepShaver/src/Unix/main_unix.cpp | 44 +- SheepShaver/src/Windows/main_windows.cpp | 52 +- SheepShaver/src/include/cpu_emulation.h | 2 + 8 files changed, 57 insertions(+), 5942 deletions(-) mode change 100644 => 120000 SheepShaver/src/CrossPlatform/video_vosf.h create mode 120000 SheepShaver/src/SDL delete mode 100644 SheepShaver/src/SDL/video_sdl.cpp delete mode 100644 SheepShaver/src/SDL/video_sdl2.cpp diff --git a/SheepShaver/Makefile b/SheepShaver/Makefile index e5a036de3..cfc9e217b 100644 --- a/SheepShaver/Makefile +++ b/SheepShaver/Makefile @@ -61,8 +61,8 @@ links: include/timer.h include/xpram.h \ CrossPlatform/sigsegv.h \ CrossPlatform/video_blit.h CrossPlatform/video_blit.cpp \ - SDL/SDLMain.h SDL/SDLMain.m SDL/audio_sdl.cpp SDL/keycodes \ - SDL/prefs_sdl.cpp SDL/xpram_sdl.cpp \ + CrossPlatform/video_vosf.h \ + SDL \ Unix/vhd_unix.cpp \ Unix/extfs_unix.cpp Unix/serial_unix.cpp \ Unix/sshpty.h Unix/sshpty.c Unix/strlcpy.h Unix/strlcpy.c \ diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h deleted file mode 100644 index f1d2f3add..000000000 --- a/SheepShaver/src/CrossPlatform/video_vosf.h +++ /dev/null @@ -1,686 +0,0 @@ -/* - * video_vosf.h - Video/graphics emulation, video on SEGV signals support - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 VIDEO_VOSF_H -#define VIDEO_VOSF_H - -// Note: this file must be #include'd only in video_x.cpp -#ifdef ENABLE_VOSF - -#include "sigsegv.h" -#include "vm_alloc.h" -#ifdef _WIN32 -#include "util_windows.h" -#endif - -// Import SDL-backend-specific functions -#ifdef USE_SDL_VIDEO -extern void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h); -extern void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects); -#endif - -// Glue for SDL and X11 support -#ifdef TEST_VOSF_PERFORMANCE -#define MONITOR_INIT /* nothing */ -#else -#ifdef USE_SDL_VIDEO -#define MONITOR_INIT SDL_monitor_desc &monitor -#define VIDEO_DRV_WIN_INIT driver_base *drv -#define VIDEO_DRV_DGA_INIT driver_base *drv -#define VIDEO_DRV_LOCK_PIXELS SDL_VIDEO_LOCK_SURFACE(drv->s) -#define VIDEO_DRV_UNLOCK_PIXELS SDL_VIDEO_UNLOCK_SURFACE(drv->s) -#define VIDEO_DRV_DEPTH drv->s->format->BitsPerPixel -#define VIDEO_DRV_WIDTH drv->s->w -#define VIDEO_DRV_HEIGHT drv->s->h -#define VIDEO_DRV_ROW_BYTES drv->s->pitch -#else -#ifdef SHEEPSHAVER -#define MONITOR_INIT /* nothing */ -#define VIDEO_DRV_WIN_INIT /* nothing */ -#define VIDEO_DRV_DGA_INIT /* nothing */ -#define VIDEO_DRV_WINDOW the_win -#define VIDEO_DRV_GC the_gc -#define VIDEO_DRV_IMAGE img -#define VIDEO_DRV_HAVE_SHM have_shm -#else -#define MONITOR_INIT X11_monitor_desc &monitor -#define VIDEO_DRV_WIN_INIT driver_window *drv -#define VIDEO_DRV_DGA_INIT driver_dga *drv -#define VIDEO_DRV_WINDOW drv->w -#define VIDEO_DRV_GC drv->gc -#define VIDEO_DRV_IMAGE drv->img -#define VIDEO_DRV_HAVE_SHM drv->have_shm -#endif -#define VIDEO_DRV_LOCK_PIXELS /* nothing */ -#define VIDEO_DRV_UNLOCK_PIXELS /* nothing */ -#define VIDEO_DRV_DEPTH VIDEO_DRV_IMAGE->depth -#define VIDEO_DRV_WIDTH VIDEO_DRV_IMAGE->width -#define VIDEO_DRV_HEIGHT VIDEO_DRV_IMAGE->height -#define VIDEO_DRV_ROW_BYTES VIDEO_DRV_IMAGE->bytes_per_line -#endif -#endif - -// Prototypes -static void vosf_do_set_dirty_area(uintptr first, uintptr last); -static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row); - -// Variables for Video on SEGV support -static uint8 *the_host_buffer; // Host frame buffer in VOSF mode - -struct ScreenPageInfo { - unsigned top, bottom; // Mapping between this virtual page and Mac scanlines -}; - -struct ScreenInfo { - uintptr memStart; // Start address aligned to page boundary - uint32 memLength; // Length of the memory addressed by the screen pages - - uintptr pageSize; // Size of a page - int pageBits; // Shift count to get the page number - uint32 pageCount; // Number of pages allocated to the screen - - bool dirty; // Flag: set if the frame buffer was touched - bool very_dirty; // Flag: set if the frame buffer was completely modified (e.g. colormap changes) - char * dirtyPages; // Table of flags set if page was altered - ScreenPageInfo * pageInfo; // Table of mappings page -> Mac scanlines -}; - -static ScreenInfo mainBuffer; - -#define PFLAG_SET_VALUE 0x00 -#define PFLAG_CLEAR_VALUE 0x01 -#define PFLAG_SET_VALUE_4 0x00000000 -#define PFLAG_CLEAR_VALUE_4 0x01010101 -#define PFLAG_SET(page) mainBuffer.dirtyPages[page] = PFLAG_SET_VALUE -#define PFLAG_CLEAR(page) mainBuffer.dirtyPages[page] = PFLAG_CLEAR_VALUE -#define PFLAG_ISSET(page) (mainBuffer.dirtyPages[page] == PFLAG_SET_VALUE) -#define PFLAG_ISCLEAR(page) (mainBuffer.dirtyPages[page] != PFLAG_SET_VALUE) - -#ifdef UNALIGNED_PROFITABLE -# define PFLAG_ISSET_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_SET_VALUE_4) -# define PFLAG_ISCLEAR_4(page) (*((uint32 *)(mainBuffer.dirtyPages + (page))) == PFLAG_CLEAR_VALUE_4) -#else -# define PFLAG_ISSET_4(page) \ - PFLAG_ISSET(page ) && PFLAG_ISSET(page+1) \ - && PFLAG_ISSET(page+2) && PFLAG_ISSET(page+3) -# define PFLAG_ISCLEAR_4(page) \ - PFLAG_ISCLEAR(page ) && PFLAG_ISCLEAR(page+1) \ - && PFLAG_ISCLEAR(page+2) && PFLAG_ISCLEAR(page+3) -#endif - -// Set the selected page range [ first_page, last_page [ into the SET state -#define PFLAG_SET_RANGE(first_page, last_page) \ - memset(mainBuffer.dirtyPages + (first_page), PFLAG_SET_VALUE, \ - (last_page) - (first_page)) - -// Set the selected page range [ first_page, last_page [ into the CLEAR state -#define PFLAG_CLEAR_RANGE(first_page, last_page) \ - memset(mainBuffer.dirtyPages + (first_page), PFLAG_CLEAR_VALUE, \ - (last_page) - (first_page)) - -#define PFLAG_SET_ALL do { \ - PFLAG_SET_RANGE(0, mainBuffer.pageCount); \ - mainBuffer.dirty = true; \ -} while (0) - -#define PFLAG_CLEAR_ALL do { \ - PFLAG_CLEAR_RANGE(0, mainBuffer.pageCount); \ - mainBuffer.dirty = false; \ - mainBuffer.very_dirty = false; \ -} while (0) - -#define PFLAG_SET_VERY_DIRTY do { \ - mainBuffer.very_dirty = true; \ -} while (0) - -// Set the following macro definition to 1 if your system -// provides a really fast strchr() implementation -//#define HAVE_FAST_STRCHR 0 - -static inline unsigned find_next_page_set(unsigned page) -{ -#if HAVE_FAST_STRCHR - char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_SET_VALUE); - return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; -#else - while (PFLAG_ISCLEAR_4(page)) - page += 4; - while (PFLAG_ISCLEAR(page)) - page++; - return page; -#endif -} - -static inline unsigned find_next_page_clear(unsigned page) -{ -#if HAVE_FAST_STRCHR - char *match = strchr(mainBuffer.dirtyPages + page, PFLAG_CLEAR_VALUE); - return match ? match - mainBuffer.dirtyPages : mainBuffer.pageCount; -#else - while (PFLAG_ISSET_4(page)) - page += 4; - while (PFLAG_ISSET(page)) - page++; - return page; -#endif -} - -#if defined(HAVE_PTHREADS) -static pthread_mutex_t vosf_lock = PTHREAD_MUTEX_INITIALIZER; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF pthread_mutex_lock(&vosf_lock); -#define UNLOCK_VOSF pthread_mutex_unlock(&vosf_lock); -#elif defined(_WIN32) -static mutex_t vosf_lock; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF vosf_lock.lock(); -#define UNLOCK_VOSF vosf_lock.unlock(); -#elif defined(HAVE_SPINLOCKS) -static spinlock_t vosf_lock = SPIN_LOCK_UNLOCKED; // Mutex to protect frame buffer (dirtyPages in fact) -#define LOCK_VOSF spin_lock(&vosf_lock) -#define UNLOCK_VOSF spin_unlock(&vosf_lock) -#else -#define LOCK_VOSF -#define UNLOCK_VOSF -#endif - -static int log_base_2(uint32 x) -{ - uint32 mask = 0x80000000; - int l = 31; - while (l >= 0 && (x & mask) == 0) { - mask >>= 1; - l--; - } - return l; -} - -// Extend size to page boundary -static uint32 page_extend(uint32 size) -{ - const uint32 page_size = vm_get_page_size(); - const uint32 page_mask = page_size - 1; - return (size + page_mask) & ~page_mask; -} - - -/* - * Check if VOSF acceleration is profitable on this platform - */ - -#ifndef VOSF_PROFITABLE_TRIES -#define VOSF_PROFITABLE_TRIES VOSF_PROFITABLE_TRIES_DFL -#endif -const int VOSF_PROFITABLE_TRIES_DFL = 3; // Make 3 attempts for full screen update -const int VOSF_PROFITABLE_THRESHOLD = 16667/2; // 60 Hz (half of the quantum) - -static bool video_vosf_profitable(uint32 *duration_p = NULL, uint32 *n_page_faults_p = NULL) -{ - uint32 duration = 0; - uint32 n_tries = VOSF_PROFITABLE_TRIES; - const uint32 n_page_faults = mainBuffer.pageCount * n_tries; - -#ifdef SHEEPSHAVER - const bool accel = PrefsFindBool("gfxaccel"); -#else - const bool accel = false; -#endif - - for (uint32 i = 0; i < n_tries; i++) { - uint64 start = GetTicks_usec(); - for (uint32 p = 0; p < mainBuffer.pageCount; p++) { - uint8 *addr = (uint8 *)(mainBuffer.memStart + (p * mainBuffer.pageSize)); - if (accel) - vosf_do_set_dirty_area((uintptr)addr, (uintptr)addr + mainBuffer.pageSize - 1); - else - addr[0] = 0; // Trigger Screen_fault_handler() - } - duration += uint32(GetTicks_usec() - start); - - PFLAG_CLEAR_ALL; - mainBuffer.dirty = false; - if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) - return false; - } - - if (duration_p) - *duration_p = duration; - if (n_page_faults_p) - *n_page_faults_p = n_page_faults; - - D(bug("Triggered %d page faults in %ld usec (%.1f usec per fault)\n", n_page_faults, duration, double(duration) / double(n_page_faults))); - return ((duration / n_tries) < (VOSF_PROFITABLE_THRESHOLD * (frame_skip ? frame_skip : 1))); -} - - -/* - * Initialize the VOSF system (mainBuffer structure, SIGSEGV handler) - */ - -static bool video_vosf_init(MONITOR_INIT) -{ - VIDEO_MODE_INIT_MONITOR; - - const uintptr page_size = vm_get_page_size(); - const uintptr page_mask = page_size - 1; - - // Round up frame buffer base to page boundary - mainBuffer.memStart = (((uintptr) the_buffer) + page_mask) & ~page_mask; - - // The frame buffer size shall already be aligned to page boundary (use page_extend) - mainBuffer.memLength = the_buffer_size; - - mainBuffer.pageSize = page_size; - mainBuffer.pageBits = log_base_2(mainBuffer.pageSize); - mainBuffer.pageCount = (mainBuffer.memLength + page_mask)/mainBuffer.pageSize; - - // The "2" more bytes requested are a safety net to insure the - // loops in the update routines will terminate. - // See "How can we deal with array overrun conditions ?" hereunder for further details. - mainBuffer.dirtyPages = (char *) malloc(mainBuffer.pageCount + 2); - if (mainBuffer.dirtyPages == NULL) - return false; - - PFLAG_CLEAR_ALL; - PFLAG_CLEAR(mainBuffer.pageCount); - PFLAG_SET(mainBuffer.pageCount+1); - - // Allocate and fill in pageInfo with start and end (inclusive) row in number of bytes - mainBuffer.pageInfo = (ScreenPageInfo *) malloc(mainBuffer.pageCount * sizeof(ScreenPageInfo)); - if (mainBuffer.pageInfo == NULL) - return false; - - uint32 a = 0; - for (unsigned i = 0; i < mainBuffer.pageCount; i++) { - unsigned y1 = a / VIDEO_MODE_ROW_BYTES; - if (y1 >= VIDEO_MODE_Y) - y1 = VIDEO_MODE_Y - 1; - - unsigned y2 = (a + mainBuffer.pageSize) / VIDEO_MODE_ROW_BYTES; - if (y2 >= VIDEO_MODE_Y) - y2 = VIDEO_MODE_Y - 1; - - mainBuffer.pageInfo[i].top = y1; - mainBuffer.pageInfo[i].bottom = y2; - - a += mainBuffer.pageSize; - if (a > mainBuffer.memLength) - a = mainBuffer.memLength; - } - - // We can now write-protect the frame buffer - if (vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ) != 0) - return false; - - // The frame buffer is sane, i.e. there is no write to it yet - mainBuffer.dirty = false; - return true; -} - - -/* - * Deinitialize VOSF system - */ - -static void video_vosf_exit(void) -{ - if (mainBuffer.pageInfo) { - free(mainBuffer.pageInfo); - mainBuffer.pageInfo = NULL; - } - if (mainBuffer.dirtyPages) { - free(mainBuffer.dirtyPages); - mainBuffer.dirtyPages = NULL; - } -} - - -/* - * Update VOSF state with specified dirty area - */ - -static void vosf_do_set_dirty_area(uintptr first, uintptr last) -{ - const int first_page = (first - mainBuffer.memStart) >> mainBuffer.pageBits; - const int last_page = (last - mainBuffer.memStart) >> mainBuffer.pageBits; - uint8 *addr = (uint8 *)(first & ~(mainBuffer.pageSize - 1)); - for (int i = first_page; i <= last_page; i++) { - if (PFLAG_ISCLEAR(i)) { - PFLAG_SET(i); - vm_protect(addr, mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); - } - addr += mainBuffer.pageSize; - } -} - -static void vosf_set_dirty_area(int x, int y, int w, int h, unsigned screen_width, unsigned screen_height, unsigned bytes_per_row) -{ - if (x < 0) { - w -= -x; - x = 0; - } - if (y < 0) { - h -= -y; - y = 0; - } - if (w <= 0 || h <= 0) - return; - if (unsigned(x + w) > screen_width) - w -= unsigned(x + w) - screen_width; - if (unsigned(y + h) > screen_height) - h -= unsigned(y + h) - screen_height; - LOCK_VOSF; - if (bytes_per_row >= screen_width) { - const int bytes_per_pixel = bytes_per_row / screen_width; - if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) * bytes_per_pixel; - vosf_do_set_dirty_area(a0, a1); - } else { - for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x * bytes_per_pixel; - const uintptr a1 = a0 + (w - 1) * bytes_per_pixel; - vosf_do_set_dirty_area(a0, a1); - } - } - } else { - const int pixels_per_byte = screen_width / bytes_per_row; - if (bytes_per_row <= mainBuffer.pageSize) { - const uintptr a0 = mainBuffer.memStart + y * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + (y + h - 1) * bytes_per_row + (x + w - 1) / pixels_per_byte; - vosf_do_set_dirty_area(a0, a1); - } else { - for (int j = y; j < y + h; j++) { - const uintptr a0 = mainBuffer.memStart + j * bytes_per_row + x / pixels_per_byte; - const uintptr a1 = mainBuffer.memStart + j * bytes_per_row + (x + w - 1) / pixels_per_byte; - vosf_do_set_dirty_area(a0, a1); - } - } - } - mainBuffer.dirty = true; - UNLOCK_VOSF; -} - - -/* - * Screen fault handler - */ - -bool Screen_fault_handler(sigsegv_info_t *sip) -{ - const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); - - /* Someone attempted to write to the frame buffer. Make it writeable - * now so that the data could actually be written to. It will be made - * read-only back in one of the screen update_*() functions. - */ - if (((uintptr)addr - mainBuffer.memStart) < mainBuffer.memLength) { - const int page = ((uintptr)addr - mainBuffer.memStart) >> mainBuffer.pageBits; - LOCK_VOSF; - if (PFLAG_ISCLEAR(page)) { - PFLAG_SET(page); - vm_protect((char *)(addr & ~(mainBuffer.pageSize - 1)), mainBuffer.pageSize, VM_PAGE_READ | VM_PAGE_WRITE); - } - mainBuffer.dirty = true; - UNLOCK_VOSF; - return true; - } - - /* Otherwise, we don't know how to handle the fault, let it crash */ - return false; -} - - -/* - * Update display for Windowed mode and VOSF - */ - -/* How can we deal with array overrun conditions ? - - The state of the framebuffer pages that have been touched are maintained - in the dirtyPages[] table. That table is (pageCount + 2) bytes long. - -Terminology - - "Last Page" denotes the pageCount-nth page, i.e. dirtyPages[pageCount - 1]. - "CLEAR Page Guard" refers to the page following the Last Page but is always - in the CLEAR state. "SET Page Guard" refers to the page following the CLEAR - Page Guard but is always in the SET state. - -Rough process - - The update routines must determine which pages have to be blitted to the - screen. This job consists in finding the first_page that was touched. - i.e. find the next page that is SET. Then, finding how many pages were - touched starting from first_page. i.e. find the next page that is CLEAR. - -There are two cases to check: - - - Last Page is CLEAR: find_next_page_set() will reach the SET Page Guard - but it is beyond the valid pageCount value. Therefore, we exit from the - update routine. - - - Last Page is SET: first_page equals (pageCount - 1) and - find_next_page_clear() will reach the CLEAR Page Guard. We blit the last - page to the screen. On the next iteration, page equals pageCount and - find_next_page_set() will reach the SET Page Guard. We still safely exit - from the update routine because the SET Page Guard position is greater - than pageCount. -*/ - -#ifndef TEST_VOSF_PERFORMANCE -static void update_display_window_vosf(VIDEO_DRV_WIN_INIT) -{ - VIDEO_MODE_INIT; - - unsigned page = 0; - for (;;) { - const unsigned first_page = find_next_page_set(page); - if (first_page >= mainBuffer.pageCount) - break; - - page = find_next_page_clear(first_page); - PFLAG_CLEAR_RANGE(first_page, page); - - // Make the dirty pages read-only again - const int32 offset = first_page << mainBuffer.pageBits; - const uint32 length = (page - first_page) << mainBuffer.pageBits; - vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); - - // There is at least one line to update - const int y1 = mainBuffer.pageInfo[first_page].top; - const int y2 = mainBuffer.pageInfo[page - 1].bottom; - const int height = y2 - y1 + 1; - - // Update the_host_buffer - VIDEO_DRV_LOCK_PIXELS; - const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; - const int dst_bytes_per_row = VIDEO_DRV_ROW_BYTES; - int i1 = y1 * src_bytes_per_row, i2 = y1 * dst_bytes_per_row, j; - for (j = y1; j <= y2; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); - i1 += src_bytes_per_row; - i2 += dst_bytes_per_row; - } - VIDEO_DRV_UNLOCK_PIXELS; - -#ifdef USE_SDL_VIDEO - update_sdl_video(drv->s, 0, y1, VIDEO_MODE_X, height); -#else - if (VIDEO_DRV_HAVE_SHM) - XShmPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height, 0); - else - XPutImage(x_display, VIDEO_DRV_WINDOW, VIDEO_DRV_GC, VIDEO_DRV_IMAGE, 0, y1, 0, y1, VIDEO_MODE_X, height); -#endif - } - mainBuffer.dirty = false; -} -#endif - - -/* - * Update display for DGA mode and VOSF - * (only in Real or Direct Addressing mode) - */ - -#ifndef TEST_VOSF_PERFORMANCE -#if REAL_ADDRESSING || DIRECT_ADDRESSING - -static void update_display_dga_vosf(VIDEO_DRV_DGA_INIT) -{ - VIDEO_MODE_INIT; - - // Compute number of bytes per row, take care to virtual screens - const int src_bytes_per_row = VIDEO_MODE_ROW_BYTES; - const int dst_bytes_per_row = TrivialBytesPerRow(VIDEO_MODE_X, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); - const int scr_bytes_per_row = VIDEO_DRV_ROW_BYTES; - assert(dst_bytes_per_row <= scr_bytes_per_row); - const int scr_bytes_left = scr_bytes_per_row - dst_bytes_per_row; - - // Full screen update requested? - if (mainBuffer.very_dirty) { - PFLAG_CLEAR_ALL; - vm_protect((char *)mainBuffer.memStart, mainBuffer.memLength, VM_PAGE_READ); - memcpy(the_buffer_copy, the_buffer, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - VIDEO_DRV_LOCK_PIXELS; - int i1 = 0, i2 = 0; - for (uint32_t j = 0; j < VIDEO_MODE_Y; j++) { - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_bytes_per_row); - i1 += src_bytes_per_row; - i2 += scr_bytes_per_row; - } -#ifdef USE_SDL_VIDEO - update_sdl_video(drv->s, 0, 0, VIDEO_MODE_X, VIDEO_MODE_Y); -#endif - VIDEO_DRV_UNLOCK_PIXELS; - return; - } - - // Setup partial blitter (use 64-pixel wide chunks) - const uint32 n_pixels = 64; - const uint32 n_chunks = VIDEO_MODE_X / n_pixels; - const uint32 n_pixels_left = VIDEO_MODE_X - (n_chunks * n_pixels); - const uint32 src_chunk_size = TrivialBytesPerRow(n_pixels, VIDEO_MODE_DEPTH); - const uint32 dst_chunk_size = TrivialBytesPerRow(n_pixels, DepthModeForPixelDepth(VIDEO_DRV_DEPTH)); - assert(src_chunk_size * n_chunks <= src_bytes_per_row); - assert(dst_chunk_size * n_chunks <= dst_bytes_per_row); - const uint32 src_chunk_size_left = src_bytes_per_row - (n_chunks * src_chunk_size); - const uint32 dst_chunk_size_left = dst_bytes_per_row - (n_chunks * dst_chunk_size); - - unsigned page = 0; - uint32 last_scanline = uint32(-1); - for (;;) { - const unsigned first_page = find_next_page_set(page); - if (first_page >= mainBuffer.pageCount) - break; - - page = find_next_page_clear(first_page); - PFLAG_CLEAR_RANGE(first_page, page); - - // Make the dirty pages read-only again - const int32 offset = first_page << mainBuffer.pageBits; - const uint32 length = (page - first_page) << mainBuffer.pageBits; - vm_protect((char *)mainBuffer.memStart + offset, length, VM_PAGE_READ); - - // Optimized for scanlines, don't process overlapping lines again - uint32 y1 = mainBuffer.pageInfo[first_page].top; - uint32 y2 = mainBuffer.pageInfo[page - 1].bottom; - if (last_scanline != uint32(-1)) { - if (y1 <= last_scanline && ++y1 >= VIDEO_MODE_Y) - continue; - if (y2 <= last_scanline && ++y2 >= VIDEO_MODE_Y) - continue; - } - last_scanline = y2; - - // Update the_host_buffer and copy of the_buffer, one line at a time - uint32 i1 = y1 * src_bytes_per_row; - uint32 i2 = y1 * scr_bytes_per_row; -#ifdef USE_SDL_VIDEO - int bbi = 0; - SDL_Rect bb[3] = { - { Sint16(VIDEO_MODE_X), Sint16(y1), 0, 0 }, - { Sint16(VIDEO_MODE_X), -1, 0, 0 }, - { Sint16(VIDEO_MODE_X), -1, 0, 0 } - }; -#endif - VIDEO_DRV_LOCK_PIXELS; - for (uint32 j = y1; j <= y2; j++) { - for (uint32 i = 0; i < n_chunks; i++) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size); -#ifdef USE_SDL_VIDEO - const int x = i * n_pixels; - if (x < bb[bbi].x) { - if (bb[bbi].w) - bb[bbi].w += bb[bbi].x - x; - else - bb[bbi].w = n_pixels; - bb[bbi].x = x; - } - else if (x >= bb[bbi].x + bb[bbi].w) - bb[bbi].w = x + n_pixels - bb[bbi].x; -#endif - } - i1 += src_chunk_size; - i2 += dst_chunk_size; - } - if (src_chunk_size_left && dst_chunk_size_left) { - if (memcmp(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left) != 0) { - memcpy(the_buffer_copy + i1, the_buffer + i1, src_chunk_size_left); - Screen_blit(the_host_buffer + i2, the_buffer + i1, src_chunk_size_left); - } -#ifdef USE_SDL_VIDEO - const int x = n_chunks * n_pixels; - if (x < bb[bbi].x) { - if (bb[bbi].w) - bb[bbi].w += bb[bbi].x - x; - else - bb[bbi].w = n_pixels_left; - bb[bbi].x = x; - } - else if (x >= bb[bbi].x + bb[bbi].w) - bb[bbi].w = x + n_pixels_left - bb[bbi].x; -#endif - } - i1 += src_chunk_size_left; - i2 += dst_chunk_size_left + scr_bytes_left; -#ifdef USE_SDL_VIDEO - bb[bbi].h++; - if (bb[bbi].w && (j == y1 || j == y2 - 1 || j == y2)) { - bbi++; - assert(bbi <= 3); - if (j != y2) - bb[bbi].y = j + 1; - } -#endif - } -#ifdef USE_SDL_VIDEO - update_sdl_video(drv->s, bbi, bb); -#endif - VIDEO_DRV_UNLOCK_PIXELS; - } - mainBuffer.dirty = false; -} -#endif -#endif - -#endif /* ENABLE_VOSF */ - -#endif /* VIDEO_VOSF_H */ diff --git a/SheepShaver/src/CrossPlatform/video_vosf.h b/SheepShaver/src/CrossPlatform/video_vosf.h new file mode 120000 index 000000000..4c552311a --- /dev/null +++ b/SheepShaver/src/CrossPlatform/video_vosf.h @@ -0,0 +1 @@ +../../../BasiliskII/src/CrossPlatform/video_vosf.h \ No newline at end of file diff --git a/SheepShaver/src/SDL b/SheepShaver/src/SDL new file mode 120000 index 000000000..48cb61ebe --- /dev/null +++ b/SheepShaver/src/SDL @@ -0,0 +1 @@ +../../BasiliskII/src/SDL \ No newline at end of file diff --git a/SheepShaver/src/SDL/video_sdl.cpp b/SheepShaver/src/SDL/video_sdl.cpp deleted file mode 100644 index 395778a00..000000000 --- a/SheepShaver/src/SDL/video_sdl.cpp +++ /dev/null @@ -1,2340 +0,0 @@ -/* - * video_sdl.cpp - Video/graphics emulation, SDL 1.x specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode (TODO) - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - * - * FIXMEs and TODOs: - * - Windows requires an extra mouse event to update the actual cursor image? - * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux - * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) - * - Mouse acceleration, there is no API in SDL yet for that - * - Force relative mode in Grab mode even if SDL provides absolute coordinates? - * - Gamma tables support is likely to be broken here - * - Events processing is bound to the general emulation thread as SDL requires - * to PumpEvents() within the same thread as the one that called SetVideoMode(). - * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. - * - Backport hw cursor acceleration to Basilisk II? - * - Factor out code - */ - -#include "sysdeps.h" - -#include -#if (SDL_COMPILEDVERSION < SDL_VERSIONNUM(2, 0, 0)) - -#include -#include -#include -#include - -#ifdef WIN32 -#include /* alloca() */ -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" -#include "vm_alloc.h" - -#define DEBUG 0 -#include "debug.h" - -// Supported video modes -using std::vector; -static vector VideoModes; - -// Display types -#ifdef SHEEPSHAVER -enum { - DISPLAY_WINDOW = DIS_WINDOW, // windowed display - DISPLAY_SCREEN = DIS_SCREEN // fullscreen display -}; -extern int display_type; // See enum above -#else -enum { - DISPLAY_WINDOW, // windowed display - DISPLAY_SCREEN // fullscreen display -}; -static int display_type = DISPLAY_WINDOW; // See enum above -#endif - -// Constants -#if defined(WIN32) || __MACOSX__ -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; -#else -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -#endif - - -// Global variables -static uint32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; - -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifndef USE_CPU_EMUL_SERVICES -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static SDL_Thread *redraw_thread = NULL; // Redraw thread -static volatile bool thread_stop_req = false; -static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req -#endif - -#ifdef ENABLE_VOSF -static bool use_vosf = false; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// SDL variables -static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor; // Copy of Mac cursor -static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table -static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors -static bool toggle_fullscreen = false; -static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; - -static bool mouse_grabbed = false; -static bool mouse_grabbed_window_name_status = false; - -// Mutex to protect SDL events -static SDL_mutex *sdl_events_lock = NULL; -#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) -#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) - -// Mutex to protect palette -static SDL_mutex *sdl_palette_lock = NULL; -#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) -#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) - -// Mutex to protect frame buffer -static SDL_mutex *frame_buffer_lock = NULL; -#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) - -// Previously set gamma tables -static uint16 last_gamma_red[256]; -static uint16 last_gamma_green[256]; -static uint16 last_gamma_blue[256]; - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static int redraw_func(void *arg); - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - - -/* - * SDL surface locking glue - */ - -#ifdef ENABLE_VOSF -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ - the_host_buffer = (uint8 *)(SURFACE)->pixels; \ -} while (0) -#else -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) -#endif - -#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) { \ - SDL_LockSurface(SURFACE); \ - SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ - } \ -} while (0) - -#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_UnlockSurface(SURFACE); \ -} while (0) - - -/* - * Framebuffer allocation routines - */ - -static void *vm_acquire_framebuffer(uint32 size) -{ - // always try to reallocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) { -#ifndef SHEEPSHAVER - printf("FATAL: Could not reallocate framebuffer at previous address\n"); -#endif - fb = VM_MAP_FAILED; - } - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ - vm_release(fb, size); -} - -static inline int get_customized_color_depth(int default_depth) -{ - int display_color_depth = PrefsFindInt32("displaycolordepth"); - - D(bug("Get displaycolordepth %d\n", display_color_depth)); - - if(0 == display_color_depth) - return default_depth; - else{ - switch (display_color_depth) { - case 8: - return VIDEO_DEPTH_8BIT; - case 15: case 16: - return VIDEO_DEPTH_16BIT; - case 24: case 32: - return VIDEO_DEPTH_32BIT; - default: - return default_depth; - } - } -} - -/* - * Windows message handler - */ - -#ifdef WIN32 -#include -static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL - -extern void SysMediaArrived(void); -extern void SysMediaRemoved(void); -extern HWND GetMainWindowHandle(void); - -static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) -{ - switch (msg) { - case WM_DEVICECHANGE: - if (wParam == DBT_DEVICEREMOVECOMPLETE) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaRemoved(); - } - else if (wParam == DBT_DEVICEARRIVAL) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaArrived(); - } - return 0; - - default: - if (sdl_window_proc) - return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); - } - - return DefWindowProc(hwnd, msg, wParam, lParam); -} -#endif - - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -// Color depth modes type -typedef int video_depth; - -// 1, 2, 4 and 8 bit depths use a color palette -static inline bool IsDirectMode(VIDEO_MODE const & mode) -{ - return IsDirectMode(mode.viAppleMode); -} - -// Abstract base class representing one (possibly virtual) monitor -// ("monitor" = rectangular display with a contiguous frame buffer) -class monitor_desc { -public: - monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} - virtual ~monitor_desc() {} - - // Get current Mac frame buffer base address - uint32 get_mac_frame_base(void) const {return screen_base;} - - // Set Mac frame buffer base address (called from switch_to_mode()) - void set_mac_frame_base(uint32 base) {screen_base = base;} - - // Get current video mode - const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} - - // Called by the video driver to switch the video mode on this display - // (must call set_mac_frame_base()) - virtual void switch_to_current_mode(void) = 0; - - // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) - virtual void set_palette(uint8 *pal, int num) = 0; -}; - -// Vector of pointers to available monitor descriptions, filled by VideoInit() -static vector VideoMonitors; - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - if (xsize == 640 && ysize == 480) - return APPLE_640x480; - if (xsize == 800 && ysize == 600) - return APPLE_800x600; - if (xsize == 1024 && ysize == 768) - return APPLE_1024x768; - if (xsize == 1152 && ysize == 768) - return APPLE_1152x768; - if (xsize == 1152 && ysize == 900) - return APPLE_1152x900; - if (xsize == 1280 && ysize == 1024) - return APPLE_1280x1024; - if (xsize == 1600 && ysize == 1200) - return APPLE_1600x1200; - return APPLE_CUSTOM; -} - -// Display error alert -static void ErrorAlert(int error) -{ - ErrorAlert(GetString(error)); -} -#endif - - -/* - * monitor_desc subclass for SDL display - */ - -class SDL_monitor_desc : public monitor_desc { -public: - SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~SDL_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case VIDEO_DEPTH_1BIT: return 2; - case VIDEO_DEPTH_2BIT: return 4; - case VIDEO_DEPTH_4BIT: return 16; - case VIDEO_DEPTH_8BIT: return 256; - case VIDEO_DEPTH_16BIT: return 32; - case VIDEO_DEPTH_32BIT: return 256; - default: return 0; - } -} - -// Map video_mode depth ID to numerical depth value -static int mac_depth_of_video_depth(int video_depth) -{ - int depth = -1; - switch (video_depth) { - case VIDEO_DEPTH_1BIT: - depth = 1; - break; - case VIDEO_DEPTH_2BIT: - depth = 2; - break; - case VIDEO_DEPTH_4BIT: - depth = 4; - break; - case VIDEO_DEPTH_8BIT: - depth = 8; - break; - case VIDEO_DEPTH_16BIT: - depth = 16; - break; - case VIDEO_DEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map video_mode depth ID to SDL screen depth -static int sdl_depth_of_video_depth(int video_depth) -{ - return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); -} - -// Get screen dimensions -static void sdl_display_dimensions(int &width, int &height) -{ - static int max_width, max_height; - if (max_width == 0 && max_height == 0) { - max_width = 640 ; max_height = 480; - SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); - if (modes && modes != (SDL_Rect **)-1) { - // It turns out that on some implementations, and contrary to the documentation, - // the returned list is not sorted from largest to smallest (e.g. Windows) - for (int i = 0; modes[i] != NULL; i++) { - const int w = modes[i]->w; - const int h = modes[i]->h; - if (w > max_width && h > max_height) { - max_width = w; - max_height = h; - } - } - } - } - width = max_width; - height = max_height; -} - -static inline int sdl_display_width(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return width; -} - -static inline int sdl_display_height(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return height; -} - -// Check whether specified mode is available -static bool has_mode(int type, int width, int height, int depth) -{ - // Filter out out-of-bounds resolutions - if (width > sdl_display_width() || height > sdl_display_height()) - return false; - - // Rely on SDL capabilities - return SDL_VideoModeOK(width, height, - sdl_depth_of_video_depth(depth), - SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; -} - -// Add mode to list of supported modes -static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) -{ - // Filter out unsupported modes - if (!has_mode(type, width, height, depth)) - return; - - // Fill in VideoMode entry - VIDEO_MODE mode; -#ifdef SHEEPSHAVER - resolution_id = find_apple_resolution(width, height); - mode.viType = type; -#endif - VIDEO_MODE_X = width; - VIDEO_MODE_Y = height; - VIDEO_MODE_RESOLUTION = resolution_id; - VIDEO_MODE_ROW_BYTES = bytes_per_row; - VIDEO_MODE_DEPTH = (video_depth)depth; - VideoModes.push_back(mode); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VIDEO_DEPTH_16BIT) - layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VIDEO_DEPTH_32BIT) - layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - MacFrameLayout = layout; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name(int name) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - if (vi && vi->wm_available) { - const char *str = GetString(name); - SDL_WM_SetCaption(str, str); - } -} - -// Set mouse grab mode -static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); -} - -// Migrate preferences items (XXX to be handled in MigratePrefs()) -static void migrate_screen_prefs(void) -{ -#ifdef SHEEPSHAVER - // Look-up priorities are: "screen", "screenmodes", "windowmodes". - if (PrefsFindString("screen")) - return; - - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - int width = 0, height = 0; - if (screen_modes) { - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (width < modes[i].width && height < modes[i].height) { - width = modes[i].width; - height = modes[i].height; - } - } - } - } else { - if (window_modes & 1) - width = 640, height = 480; - if (window_modes & 2) - width = 800, height = 600; - } - if (width && height) { - char str[32]; - sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); - PrefsReplaceString("screen", str); - } -#endif -} - -void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h) -{ - SDL_UpdateRect(screen, x, y, w, h); -} - -void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects) -{ - SDL_UpdateRects(screen, numrects, rects); -} - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(SDL_monitor_desc &m); - ~driver_base(); - - void init(); // One-time init - void set_video_mode(int flags); - void adapt_to_video_mode(); - - void update_palette(void); - void suspend(void) {} - void resume(void) {} - void toggle_mouse_grab(void); - void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - void grab_mouse(void); - void ungrab_mouse(void); - -public: - SDL_monitor_desc &monitor; // Associated video monitor - const VIDEO_MODE &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - SDL_Surface *s; // The surface we draw into -}; - -#ifdef ENABLE_VOSF -static void update_display_window_vosf(driver_base *drv); -#endif -static void update_display_static(driver_base *drv); - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(SDL_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) -{ - the_buffer = NULL; - the_buffer_copy = NULL; -} - -void driver_base::set_video_mode(int flags) -{ - int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, - SDL_HWSURFACE | flags)) == NULL) - return; -#ifdef ENABLE_VOSF - the_host_buffer = (uint8 *)s->pixels; -#endif -} - -void driver_base::init() -{ - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - int aligned_height = (VIDEO_MODE_Y + 15) & ~15; - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - - // Check whether we can initialize the VOSF subsystem and it's profitable - if (!video_vosf_init(monitor)) { - WarningAlert(GetString(STR_VOSF_INIT_ERR)); - use_vosf = false; - } - else if (!video_vosf_profitable()) { - video_vosf_exit(); - printf("VOSF acceleration is not profitable on this platform, disabling it\n"); - use_vosf = false; - } - if (!use_vosf) { - free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); - the_host_buffer = NULL; - } -#endif - if (!use_vosf) { - // Allocate memory for frame buffer - the_buffer_size = (aligned_height + 2) * s->pitch; - the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); - } - - // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); - - adapt_to_video_mode(); -} - -void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(false); - - // Init blitting routines - SDL_PixelFormat *f = s->format; - VisualFormat visualFormat; - visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - visualFormat.Rmask = f->Rmask; - visualFormat.Gmask = f->Gmask; - visualFormat.Bmask = f->Bmask; - Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); - - // Load gray ramp to 8->16/32 expand map - if (!IsDirectMode(mode)) - for (int i=0; i<256; i++) - ExpandMap[i] = SDL_MapRGB(f, i, i, i); - - - bool hardware_cursor = false; -#ifdef SHEEPSHAVER - hardware_cursor = video_can_change_cursor(); - if (hardware_cursor) { - // Create cursor - if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { - SDL_SetCursor(sdl_cursor); - } - } - // Tell the video driver there's a change in cursor type - if (private_data) - private_data->cursorHardware = hardware_cursor; -#endif - // Hide cursor - SDL_ShowCursor(hardware_cursor); - - // Set window name/class - set_window_name(STR_WINDOW_TITLE); - - // Everything went well - init_ok = true; -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - if (s) - SDL_FreeSurface(s); - - // the_buffer shall always be mapped through vm_acquire_framebuffer() - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - SDL_ShowCursor(1); -} - -// Palette has changed -void driver_base::update_palette(void) -{ - const VIDEO_MODE &mode = monitor.get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) - SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ -} - -// Toggle mouse grab -void driver_base::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -// Grab mouse, switch to relative mouse mode -void driver_base::grab_mouse(void) -{ - if (!mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); - if (new_mode == SDL_GRAB_ON) { - disable_mouse_accel(); - mouse_grabbed = true; - } - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_base::ungrab_mouse(void) -{ - if (mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); - if (new_mode == SDL_GRAB_OFF) { - restore_mouse_accel(); - mouse_grabbed = false; - } - } -} - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - char video_driver[256]; - SDL_VideoDriverName(video_driver, sizeof(video_driver)); - bool video_driver_found = false; - char line[256]; - int n_keys = 0; - while (fgets(line, sizeof(line) - 1, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (video_driver_found) { - // Skip aliases as long as we have read keycodes yet - // Otherwise, it's another mapping and we have to stop - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) - continue; - - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code, n_keys++; - else - break; - } else { - // Search for SDL video driver string - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { - char *p = line + sizeof(sdl_str); - if (strstr(video_driver, p) == video_driver) - video_driver_found = true; - } - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = video_driver_found; - - // Vendor not found? Then display warning - if (!video_driver_found) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); - } -} - -// Open display for current mode -bool SDL_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); -#if DEBUG - const VIDEO_MODE &mode = get_current_mode(); - D(bug("Current video mode:\n")); - D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); -#endif - - // Create display driver object of requested type - drv = new(std::nothrow) driver_base(*this); - if (drv == NULL) - return false; - drv->init(); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef WIN32 - // Chain in a new message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifndef USE_CPU_EMUL_SERVICES - redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - return true; -} - -#ifdef SHEEPSHAVER -bool VideoInit(void) -{ - const bool classic = false; -#else -bool VideoInit(bool classic) -{ -#endif - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Create Mutexes - if ((sdl_events_lock = SDL_CreateMutex()) == NULL) - return false; - if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) - return false; - if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) - return false; - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Get screen mode from preferences - migrate_screen_prefs(); - const char *mode_str = NULL; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width, default_height; - if (classic) { - default_width = 512; - default_height = 384; - } - else { - default_width = 640; - default_height = 480; - } - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_SCREEN; - } - if (default_width <= 0) - default_width = sdl_display_width(); - else if (default_width > sdl_display_width()) - default_width = sdl_display_width(); - if (default_height <= 0) - default_height = sdl_display_height(); - else if (default_height > sdl_display_height()) - default_height = sdl_display_height(); - - // Mac screen depth follows X depth - screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; - int default_depth; - switch (screen_depth) { - case 8: - default_depth = VIDEO_DEPTH_8BIT; - break; - case 15: case 16: - default_depth = VIDEO_DEPTH_16BIT; - break; - case 24: case 32: - default_depth = VIDEO_DEPTH_32BIT; - break; - default: - default_depth = VIDEO_DEPTH_1BIT; - break; - } - - // Initialize list of video modes to try - struct { - int w; - int h; - int resolution_id; - } -#ifdef SHEEPSHAVER - // Omit Classic resolutions - video_modes[] = { - { -1, -1, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#else - video_modes[] = { - { -1, -1, 0x80 }, - { 512, 384, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#endif - video_modes[0].w = default_width; - video_modes[0].h = default_height; - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); - else { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - } else if (display_type == DISPLAY_SCREEN) { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - if (w == 512 && h == 384) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - std::vector::const_iterator begin = VideoModes.begin(); - cur_mode = distance(begin, i); -#endif - break; - } - } - if (i == end) { // not found, use first available mode - const VIDEO_MODE & mode = VideoModes[0]; - default_depth = VIDEO_MODE_DEPTH; - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - cur_mode = 0; -#endif - } - -#ifdef SHEEPSHAVER - for (int i = 0; i < VideoModes.size(); i++) - VModes[i] = VideoModes[i]; - VideoInfo *p = &VModes[VideoModes.size()]; - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; -#endif - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - int bits = 1 << VIDEO_MODE_DEPTH; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); - } -#endif - - int color_depth = get_customized_color_depth(default_depth); - - D(bug("Return get_customized_color_depth %d\n", color_depth)); - - // Create SDL_monitor_desc for this (the only) display - SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void SDL_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - -#ifdef WIN32 - // Remove message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); -#endif - - // Stop redraw thread -#ifndef USE_CPU_EMUL_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - SDL_WaitThread(redraw_thread, NULL); - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - D(bug(" frame buffer unlocked\n")); - - // Close display - delete drv; - drv = NULL; -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - - // Destroy locks - if (frame_buffer_lock) - SDL_DestroyMutex(frame_buffer_lock); - if (sdl_palette_lock) - SDL_DestroyMutex(sdl_palette_lock); - if (sdl_events_lock) - SDL_DestroyMutex(sdl_events_lock); -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - -static void do_toggle_fullscreen(void) -{ -#ifndef USE_CPU_EMUL_SERVICES - // pause redraw thread - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; -#endif - - // save the mouse position - int x, y; - SDL_GetMouseState(&x, &y); - - // save the screen contents - SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, - drv->s->flags); - - // switch modes - display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW - : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - drv->adapt_to_video_mode(); - - // reset the palette -#ifdef SHEEPSHAVER - video_set_palette(); -#endif - drv->update_palette(); - - // restore the screen contents - SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); - SDL_FreeSurface(tmp_surface); - SDL_UpdateRect(drv->s, 0, 0, 0, 0); - - // reset the video refresh handler - VideoRefreshInit(); - - // while SetVideoMode is happening, control key up may be missed - ADBKeyUp(0x36); - - // restore the mouse position - SDL_WarpMouse(x, y); - - // resume redraw thread - toggle_fullscreen = false; -#ifndef USE_CPU_EMUL_SERVICES - thread_stop_req = false; -#endif -} - -/* - * Mac VBL interrupt - */ - -/* - * Execute video VBL routine - */ - -#ifdef SHEEPSHAVER -void VideoVBL(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} -#else -void VideoInterrupt(void) -{ - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); - - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} -#endif - - -/* - * Set palette - */ - -#ifdef SHEEPSHAVER -void video_set_palette(void) -{ - monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); - uint8 pal[256 * 3]; - for (int c = 0; c < n_colors; c++) { - pal[c*3 + 0] = mac_pal[c].red; - pal[c*3 + 1] = mac_pal[c].green; - pal[c*3 + 2] = mac_pal[c].blue; - } - monitor->set_palette(pal, n_colors); -} -#endif - -void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - const VIDEO_MODE &mode = get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { - // handle the gamma ramp - - if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey - return; // ignore - - uint16 red[256]; - uint16 green[256]; - uint16 blue[256]; - - int repeats = 256 / num_in; - - for (int i = 0; i < num_in; i++) { - for (int j = 0; j < repeats; j++) { - red[i*repeats + j] = pal[i*3 + 0] << 8; - green[i*repeats + j] = pal[i*3 + 1] << 8; - blue[i*repeats + j] = pal[i*3 + 2] << 8; - } - } - - // fill remaining entries (if any) with last value - for (int i = num_in * repeats; i < 256; i++) { - red[i] = pal[(num_in - 1) * 3] << 8; - green[i] = pal[(num_in - 1) * 3 + 1] << 8; - blue[i] = pal[(num_in - 1) * 3 + 2] << 8; - } - - bool changed = (memcmp(red, last_gamma_red, 512) != 0 || - memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); - - if (changed) { - int result = SDL_SetGammaRamp(red, green, blue); - - if (result < 0) { - fprintf(stderr, "SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - } - - memcpy(last_gamma_red, red, 512); - memcpy(last_gamma_green, green, 512); - memcpy(last_gamma_blue, blue, 512); - } - - return; - } - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - SDL_Color *p = sdl_palette; - for (int i=0; ir = pal[c*3 + 0] * 0x0101; - p->g = pal[c*3 + 1] * 0x0101; - p->b = pal[c*3 + 2] * 0x0101; - p++; - } - - // Recalculate pixel color expansion map - if (!IsDirectMode(mode)) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - } -#endif - } - - // Tell redraw thread to change palette - sdl_palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Switch video mode - */ - -#ifdef SHEEPSHAVER -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - DisableInterrupt(); - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; - - cur_mode = i; - monitor_desc *monitor = VideoMonitors[0]; - monitor->switch_to_current_mode(); - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - thread_stop_req = false; - EnableInterrupt(); - return noErr; - } - } - return paramErr; -} -#endif - -void SDL_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - LOCK_EVENTS; - video_close(); - video_open(); - UNLOCK_EVENTS; - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -#ifdef SHEEPSHAVER -bool video_can_change_cursor(void) -{ - if (display_type != DISPLAY_WINDOW) - return false; - -#if defined(__APPLE__) - static char driver[] = "Quartz?"; - static int quartzok = -1; - - if (quartzok < 0) { - if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) - quartzok = true; - else { - // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. - const SDL_version *vp = SDL_Linked_Version(); - int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); - quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); - } - } - - return quartzok; -#else - return true; -#endif -} -#endif - - -/* - * Set cursor image for window - */ - -#ifdef SHEEPSHAVER -void video_set_cursor(void) -{ - // Set new cursor image if it was changed - if (sdl_cursor) { - SDL_FreeCursor(sdl_cursor); - sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); - if (sdl_cursor) { - SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); - SDL_SetCursor(sdl_cursor); - - // XXX Windows apparently needs an extra mouse event to - // make the new cursor image visible. - // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the - // mouse, we have to put it back. - bool move = false; -#ifdef WIN32 - move = true; -#elif defined(__APPLE__) - move = mouse_grabbed; -#endif - if (move) { - int visible = SDL_ShowCursor(-1); - if (visible) { - int x, y; - SDL_GetMouseState(&x, &y); - SDL_WarpMouse(x, y); - } - } - } - } -} -#endif - - -/* - * Keyboard-related utilify functions - */ - -static bool is_modifier_key(SDL_KeyboardEvent const & e) -{ - switch (e.keysym.sym) { - case SDLK_NUMLOCK: - case SDLK_CAPSLOCK: - case SDLK_SCROLLOCK: - case SDLK_RSHIFT: - case SDLK_LSHIFT: - case SDLK_RCTRL: - case SDLK_LCTRL: - case SDLK_RALT: - case SDLK_LALT: - case SDLK_RMETA: - case SDLK_LMETA: - case SDLK_LSUPER: - case SDLK_RSUPER: - case SDLK_MODE: - case SDLK_COMPOSE: - return true; - } - return false; -} - -static bool is_ctrl_down(SDL_keysym const & ks) -{ - return ctrl_down || (ks.mod & KMOD_CTRL); -} - - -/* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey - */ - -static int kc_decode(SDL_keysym const & ks, bool key_down) -{ - switch (ks.sym) { - case SDLK_a: return 0x00; - case SDLK_b: return 0x0b; - case SDLK_c: return 0x08; - case SDLK_d: return 0x02; - case SDLK_e: return 0x0e; - case SDLK_f: return 0x03; - case SDLK_g: return 0x05; - case SDLK_h: return 0x04; - case SDLK_i: return 0x22; - case SDLK_j: return 0x26; - case SDLK_k: return 0x28; - case SDLK_l: return 0x25; - case SDLK_m: return 0x2e; - case SDLK_n: return 0x2d; - case SDLK_o: return 0x1f; - case SDLK_p: return 0x23; - case SDLK_q: return 0x0c; - case SDLK_r: return 0x0f; - case SDLK_s: return 0x01; - case SDLK_t: return 0x11; - case SDLK_u: return 0x20; - case SDLK_v: return 0x09; - case SDLK_w: return 0x0d; - case SDLK_x: return 0x07; - case SDLK_y: return 0x10; - case SDLK_z: return 0x06; - - case SDLK_1: case SDLK_EXCLAIM: return 0x12; - case SDLK_2: case SDLK_AT: return 0x13; - case SDLK_3: case SDLK_HASH: return 0x14; - case SDLK_4: case SDLK_DOLLAR: return 0x15; - case SDLK_5: return 0x17; - case SDLK_6: return 0x16; - case SDLK_7: return 0x1a; - case SDLK_8: return 0x1c; - case SDLK_9: return 0x19; - case SDLK_0: return 0x1d; - - case SDLK_BACKQUOTE: return 0x0a; - case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; - case SDLK_EQUALS: case SDLK_PLUS: return 0x18; - case SDLK_LEFTBRACKET: return 0x21; - case SDLK_RIGHTBRACKET: return 0x1e; - case SDLK_BACKSLASH: return 0x2a; - case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; - case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; - case SDLK_COMMA: case SDLK_LESS: return 0x2b; - case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; - case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - - case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; - case SDLK_SPACE: return 0x31; - case SDLK_BACKSPACE: return 0x33; - - case SDLK_DELETE: return 0x75; - case SDLK_INSERT: return 0x72; - case SDLK_HOME: case SDLK_HELP: return 0x73; - case SDLK_END: return 0x77; - case SDLK_PAGEUP: return 0x74; - case SDLK_PAGEDOWN: return 0x79; - - case SDLK_LCTRL: return 0x36; - case SDLK_RCTRL: return 0x36; - case SDLK_LSHIFT: return 0x38; - case SDLK_RSHIFT: return 0x38; -#if (defined(__APPLE__) && defined(__MACH__)) - case SDLK_LALT: return 0x3a; - case SDLK_RALT: return 0x3a; - case SDLK_LMETA: return 0x37; - case SDLK_RMETA: return 0x37; -#else - case SDLK_LALT: return 0x37; - case SDLK_RALT: return 0x37; - case SDLK_LMETA: return 0x3a; - case SDLK_RMETA: return 0x3a; -#endif - case SDLK_LSUPER: return 0x3a; // "Windows" key - case SDLK_RSUPER: return 0x3a; - case SDLK_MENU: return 0x32; - case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCK: return 0x47; - - case SDLK_UP: return 0x3e; - case SDLK_DOWN: return 0x3d; - case SDLK_LEFT: return 0x3b; - case SDLK_RIGHT: return 0x3c; - - case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - - case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; - case SDLK_F2: return 0x78; - case SDLK_F3: return 0x63; - case SDLK_F4: return 0x76; - case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; - case SDLK_F6: return 0x61; - case SDLK_F7: return 0x62; - case SDLK_F8: return 0x64; - case SDLK_F9: return 0x65; - case SDLK_F10: return 0x6d; - case SDLK_F11: return 0x67; - case SDLK_F12: return 0x6f; - - case SDLK_PRINT: return 0x69; - case SDLK_SCROLLOCK: return 0x6b; - case SDLK_PAUSE: return 0x71; - - case SDLK_KP0: return 0x52; - case SDLK_KP1: return 0x53; - case SDLK_KP2: return 0x54; - case SDLK_KP3: return 0x55; - case SDLK_KP4: return 0x56; - case SDLK_KP5: return 0x57; - case SDLK_KP6: return 0x58; - case SDLK_KP7: return 0x59; - case SDLK_KP8: return 0x5b; - case SDLK_KP9: return 0x5c; - case SDLK_KP_PERIOD: return 0x41; - case SDLK_KP_PLUS: return 0x45; - case SDLK_KP_MINUS: return 0x4e; - case SDLK_KP_MULTIPLY: return 0x43; - case SDLK_KP_DIVIDE: return 0x4b; - case SDLK_KP_ENTER: return 0x4c; - case SDLK_KP_EQUALS: return 0x51; - } - D(bug("Unhandled SDL keysym: %d\n", ks.sym)); - return -1; -} - -static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) -{ - return kc_decode(ev.keysym, key_down); -} - -static void force_complete_window_refresh() -{ - if (display_type == DISPLAY_WINDOW) { -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - } -#endif - // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. - const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); - const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - for (int i = 0; i < len; i++) - the_buffer_copy[i] = !the_buffer[i]; - } -} - -/* - * SDL event handling - */ - -static void handle_events(void) -{ - SDL_Event events[10]; - const int n_max_events = sizeof(events) / sizeof(events[0]); - int n_events; - - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { - for (int i = 0; i < n_events; i++) { - SDL_Event const & event = events[i]; - switch (event.type) { - - // Mouse button - case SDL_MOUSEBUTTONDOWN: { - unsigned int button = event.button.button; - if (button == SDL_BUTTON_LEFT) - ADBMouseDown(0); - else if (button == SDL_BUTTON_RIGHT) - ADBMouseDown(1); - else if (button == SDL_BUTTON_MIDDLE) - ADBMouseDown(2); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.motion.x, event.motion.y); - break; - - // Keyboard - case SDL_KEYDOWN: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case SDL_KEYUP: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, false); - if (code >= 0) { - if (code == 0x39) { // Caps Lock released - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh of window - case SDL_VIDEOEXPOSE: - force_complete_window_refresh(); - break; - - // Window "close" widget clicked - case SDL_QUIT: - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - break; - - // Application activate/deactivate - case SDL_ACTIVEEVENT: - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain) - force_complete_window_refresh(); - break; - } - } - } -} - - -/* - * Window display update - */ - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_base *drv) -{ - // Incremental update code - int wide = 0, high = 0; - uint32 x1, x2, y1, y2; - const VIDEO_MODE &mode = drv->mode; - int bytes_per_row = VIDEO_MODE_ROW_BYTES; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y1 = j; - break; - } - } - y2 = y1 - 1; - for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { - const int src_bytes_per_row = bytes_per_row; - const int dst_bytes_per_row = drv->s->pitch; - const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; - - x1 = VIDEO_MODE_X / pixels_per_byte; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1; i++) { - if (*p != *p2) { - x1 = i; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { - p--; p2--; - if (*p != *p2) { - x2 = i; - break; - } - } - } - x1 *= pixels_per_byte; - x2 *= pixels_per_byte; - wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); - int di = y1 * dst_bytes_per_row + x1; - for (uint32 j = y1; j <= y2; j++) { - memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); - Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); - si += src_bytes_per_row; - di += dst_bytes_per_row; - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - - } else { - const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; - const int dst_bytes_per_row = drv->s->pitch; - - x1 = VIDEO_MODE_X; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { - if (*p != *p2) { - x1 = i / bytes_per_pixel; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - for (uint32 j = y1; j <= y2; j++) { - uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; - int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - } - } -} - -// Static display update (fixed frame rate, bounding boxes based) -// XXX use NQD bounding boxes to help detect dirty areas? -static void update_display_static_bbox(driver_base *drv) -{ - const VIDEO_MODE &mode = drv->mode; - - // Allocate bounding boxes for SDL_UpdateRects() - const uint32 N_PIXELS = 64; - const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; - const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; - SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); - uint32 nr_boxes = 0; - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Update the surface from Mac screen - const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; - const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; - const uint32 dst_bytes_per_row = drv->s->pitch; - for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { - uint32 h = N_PIXELS; - if (h > VIDEO_MODE_Y - y) - h = VIDEO_MODE_Y - y; - for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { - uint32 w = N_PIXELS; - if (w > VIDEO_MODE_X - x) - w = VIDEO_MODE_X - x; - const int xs = w * bytes_per_pixel; - const int xb = x * bytes_per_pixel; - bool dirty = false; - for (uint32 j = y; j < (y + h); j++) { - const uint32 yb = j * bytes_per_row; - const uint32 dst_yb = j * dst_bytes_per_row; - if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { - memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); - Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); - dirty = true; - } - } - if (dirty) { - boxes[nr_boxes].x = x; - boxes[nr_boxes].y = y; - boxes[nr_boxes].w = w; - boxes[nr_boxes].h = h; - nr_boxes++; - } - } - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - if (nr_boxes) - SDL_UpdateRects(drv->s, nr_boxes, boxes); -} - - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (sdl_palette_changed) { - sdl_palette_changed = false; - drv->update_palette(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_window_static(void); - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - video_refresh_window_static(); -} - -#ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - const VIDEO_MODE &mode = drv->mode; - if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) - update_display_static_bbox(drv); - else - update_display_static(drv); - } -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - video_refresh = video_refresh_window_static; - } -} - -static inline void do_video_refresh(void) -{ - // Handle SDL events - handle_events(); - - // Update display - video_refresh(); - - - // Set new palette if it was changed - handle_palette_changes(); -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Process pending events and update display - do_video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifndef USE_CPU_EMUL_SERVICES -static int redraw_func(void *arg) -{ - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Wait - next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); - if (delay > 0) - Delay_usec(delay); - else if (delay < -VIDEO_REFRESH_DELAY) - next = GetTicks_usec(); - ticks++; - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - thread_stop_ack = true; - continue; - } - - // Process pending events and update display - do_video_refresh(); - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return 0; -} -#endif - - -/* - * Record dirty area from NQD - */ - -#ifdef SHEEPSHAVER -void video_set_dirty_area(int x, int y, int w, int h) -{ -#ifdef ENABLE_VOSF - const VIDEO_MODE &mode = drv->mode; - const unsigned screen_width = VIDEO_MODE_X; - const unsigned screen_height = VIDEO_MODE_Y; - const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; - - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} -#endif - -#endif // ends: SDL version check diff --git a/SheepShaver/src/SDL/video_sdl2.cpp b/SheepShaver/src/SDL/video_sdl2.cpp deleted file mode 100644 index 77f53fa96..000000000 --- a/SheepShaver/src/SDL/video_sdl2.cpp +++ /dev/null @@ -1,2869 +0,0 @@ -/* - * video_sdl2.cpp - Video/graphics emulation, SDL 2.x specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode (TODO) - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - * - * FIXMEs and TODOs: - * - Windows requires an extra mouse event to update the actual cursor image? - * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux - * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) - * - Mouse acceleration, there is no API in SDL yet for that - * - Gamma tables support is likely to be broken here - * - Events processing is bound to the general emulation thread as SDL requires - * to PumpEvents() within the same thread as the one that called SetVideoMode(). - * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. - * - Backport hw cursor acceleration to Basilisk II? - * - Factor out code - */ - -#include "sysdeps.h" - -#include -#if SDL_VERSION_ATLEAST(2,0,0) - -#include -#include -#include -#include -#include - -#ifdef __MACOSX__ -#include "utils_macosx.h" -#endif - -#ifdef WIN32 -#include /* alloca() */ -#endif - -#include -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" -#include "vm_alloc.h" - -#define DEBUG 0 -#include "debug.h" - -#define CODE_INVALID -1 -#define CODE_HOTKEY -2 - -// Supported video modes -using std::vector; -static vector VideoModes; - -// Display types -#ifdef SHEEPSHAVER -enum { - DISPLAY_WINDOW = DIS_WINDOW, // windowed display - DISPLAY_SCREEN = DIS_SCREEN // fullscreen display -}; -extern int display_type; // See enum above -#else -enum { - DISPLAY_WINDOW, // windowed display - DISPLAY_SCREEN // fullscreen display -}; -static int display_type = DISPLAY_WINDOW; // See enum above -#endif - -// Constants -#if defined(__MACOSX__) || defined(WIN32) -const char KEYCODE_FILE_NAME[] = "keycodes"; -const char KEYCODE_FILE_NAME2[] = "BasiliskII_keycodes"; -#else -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -const char KEYCODE_FILE_NAME2[] = DATADIR "/BasiliskII_keycodes"; -#endif - - -// Global variables -static uint32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; -static bool mouse_wheel_reverse; - -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifndef USE_CPU_EMUL_SERVICES -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static SDL_Thread *redraw_thread = NULL; // Redraw thread -static volatile bool thread_stop_req = false; -static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req -#endif - -#ifdef ENABLE_VOSF -static bool use_vosf = false; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool opt_down = false; // Flag: Opt key pressed -static bool cmd_down = false; // Flag: Cmd key pressed -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// SDL variables -SDL_Window * sdl_window = NULL; // Wraps an OS-native window -static SDL_Surface * host_surface = NULL; // Surface in host-OS display format -static SDL_Surface * guest_surface = NULL; // Surface in guest-OS display format -static SDL_Renderer * sdl_renderer = NULL; // Handle to SDL2 renderer -static SDL_threadID sdl_renderer_thread_id = 0; // Thread ID where the SDL_renderer was created, and SDL_renderer ops should run (for compatibility w/ d3d9) -static SDL_Texture * sdl_texture = NULL; // Handle to a GPU texture, with which to draw guest_surface to -static SDL_Rect sdl_update_video_rect = {0,0,0,0}; // Union of all rects to update, when updating sdl_texture -static SDL_mutex * sdl_update_video_mutex = NULL; // Mutex to protect sdl_update_video_rect -static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor = NULL; // Copy of Mac cursor -static SDL_Palette *sdl_palette = NULL; // Color palette to be used as CLUT and gamma table -static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors -static bool toggle_fullscreen = false; -static bool did_add_event_watch = false; - -static bool mouse_grabbed = false; - -// Mutex to protect SDL events -static SDL_mutex *sdl_events_lock = NULL; -#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) -#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) - -// Mutex to protect palette -static SDL_mutex *sdl_palette_lock = NULL; -#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) -#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) - -// Mutex to protect frame buffer -static SDL_mutex *frame_buffer_lock = NULL; -#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) - -// Initially set gamma tables -static uint16 init_gamma_red[256]; -static uint16 init_gamma_green[256]; -static uint16 init_gamma_blue[256]; -static bool init_gamma_valid; - -// Previously set gamma tables -static uint16 last_gamma_red[256]; -static uint16 last_gamma_green[256]; -static uint16 last_gamma_blue[256]; - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static int redraw_func(void *arg); -static int present_sdl_video(); -static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event); -static bool is_fullscreen(SDL_Window *); - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - - -/* - * SDL surface locking glue - */ - -#ifdef ENABLE_VOSF -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if (sdl_window && SDL_GetWindowFlags(sdl_window) & (SDL_WINDOW_FULLSCREEN)) \ - the_host_buffer = (uint8 *)(SURFACE)->pixels; \ -} while (0) -#else -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) -#endif - -#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) { \ - SDL_LockSurface(SURFACE); \ - SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ - } \ -} while (0) - -#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_UnlockSurface(SURFACE); \ -} while (0) - - -/* - * Framebuffer allocation routines - */ - -static void *vm_acquire_framebuffer(uint32 size) -{ -#ifdef HAVE_MACH_VM - return vm_acquire_reserved(size); -#else - // always try to reallocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) { -#ifndef SHEEPSHAVER - printf("FATAL: Could not reallocate framebuffer at previous address\n"); -#endif - fb = VM_MAP_FAILED; - } - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -#endif -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ -#ifndef HAVE_MACH_VM - vm_release(fb, size); -#endif -} - -static inline int get_customized_color_depth(int default_depth) -{ - int display_color_depth = PrefsFindInt32("displaycolordepth"); - - D(bug("Get displaycolordepth %d\n", display_color_depth)); - - if(0 == display_color_depth) - return default_depth; - else{ - switch (display_color_depth) { - case 8: - return VIDEO_DEPTH_8BIT; - case 15: case 16: - return VIDEO_DEPTH_16BIT; - case 24: case 32: - return VIDEO_DEPTH_32BIT; - default: - return default_depth; - } - } -} - -/* - * Windows message handler - */ - -#ifdef WIN32 -#include -static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL - -extern void SysMediaArrived(void); -extern void SysMediaRemoved(void); -extern HWND GetMainWindowHandle(void); - -static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) -{ - switch (msg) { - case WM_DEVICECHANGE: - if (wParam == DBT_DEVICEREMOVECOMPLETE) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaRemoved(); - } - else if (wParam == DBT_DEVICEARRIVAL) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaArrived(); - } - return 0; - - default: - if (sdl_window_proc) - return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); - } - - return DefWindowProc(hwnd, msg, wParam, lParam); -} -#endif - - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -// Color depth modes type -typedef int video_depth; - -// 1, 2, 4 and 8 bit depths use a color palette -static inline bool IsDirectMode(VIDEO_MODE const & mode) -{ - return IsDirectMode(mode.viAppleMode); -} - -// Abstract base class representing one (possibly virtual) monitor -// ("monitor" = rectangular display with a contiguous frame buffer) -class monitor_desc { -public: - monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} - virtual ~monitor_desc() {} - - // Get current Mac frame buffer base address - uint32 get_mac_frame_base(void) const {return screen_base;} - - // Set Mac frame buffer base address (called from switch_to_mode()) - void set_mac_frame_base(uint32 base) {screen_base = base;} - - // Get current video mode - const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} - - // Called by the video driver to switch the video mode on this display - // (must call set_mac_frame_base()) - virtual void switch_to_current_mode(void) = 0; - - // Called by the video driver to set the color palette (in indexed modes) - virtual void set_palette(uint8 *pal, int num) = 0; - - // Called by the video driver to set the gamma table - virtual void set_gamma(uint8 *gamma, int num) = 0; -}; - -// Vector of pointers to available monitor descriptions, filled by VideoInit() -static vector VideoMonitors; - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - if (xsize == 640 && ysize == 480) - return APPLE_640x480; - if (xsize == 800 && ysize == 600) - return APPLE_800x600; - if (xsize == 1024 && ysize == 768) - return APPLE_1024x768; - if (xsize == 1152 && ysize == 768) - return APPLE_1152x768; - if (xsize == 1152 && ysize == 900) - return APPLE_1152x900; - if (xsize == 1280 && ysize == 1024) - return APPLE_1280x1024; - if (xsize == 1600 && ysize == 1200) - return APPLE_1600x1200; - return APPLE_CUSTOM; -} - -// Display error alert -static void ErrorAlert(int error) -{ - ErrorAlert(GetString(error)); -} -#endif - - -/* - * monitor_desc subclass for SDL display - */ - -class SDL_monitor_desc : public monitor_desc { -public: - SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~SDL_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - virtual void set_gamma(uint8 *gamma, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case VIDEO_DEPTH_1BIT: return 2; - case VIDEO_DEPTH_2BIT: return 4; - case VIDEO_DEPTH_4BIT: return 16; - case VIDEO_DEPTH_8BIT: return 256; - case VIDEO_DEPTH_16BIT: return 32; - case VIDEO_DEPTH_32BIT: return 256; - default: return 0; - } -} - -// Map video_mode depth ID to numerical depth value -static int mac_depth_of_video_depth(int video_depth) -{ - int depth = -1; - switch (video_depth) { - case VIDEO_DEPTH_1BIT: - depth = 1; - break; - case VIDEO_DEPTH_2BIT: - depth = 2; - break; - case VIDEO_DEPTH_4BIT: - depth = 4; - break; - case VIDEO_DEPTH_8BIT: - depth = 8; - break; - case VIDEO_DEPTH_16BIT: - depth = 16; - break; - case VIDEO_DEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map video_mode depth ID to SDL screen depth -static int sdl_depth_of_video_depth(int video_depth) -{ - return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); -} - -// Get screen dimensions -static void sdl_display_dimensions(int &width, int &height) -{ - SDL_DisplayMode desktop_mode; - const int display_index = 0; // TODO: try supporting multiple displays - if (SDL_GetDesktopDisplayMode(display_index, &desktop_mode) != 0) { - // TODO: report a warning, here? - width = height = 0; - return; - } - width = desktop_mode.w; - height = desktop_mode.h; -} - -static inline int sdl_display_width(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return width; -} - -static inline int sdl_display_height(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return height; -} - -// Check whether specified mode is available -static bool has_mode(int type, int width, int height, int depth) -{ - // Filter out out-of-bounds resolutions - if (width > sdl_display_width() || height > sdl_display_height()) - return false; - - // Whatever size it is, beyond what we've checked, we'll scale to/from as appropriate. - return true; -} - -// Add mode to list of supported modes -static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) -{ - // Filter out unsupported modes - if (!has_mode(type, width, height, depth)) - return; - - // Fill in VideoMode entry - VIDEO_MODE mode; -#ifdef SHEEPSHAVER - resolution_id = find_apple_resolution(width, height); - mode.viType = type; -#endif - VIDEO_MODE_X = width; - VIDEO_MODE_Y = height; - VIDEO_MODE_RESOLUTION = resolution_id; - VIDEO_MODE_ROW_BYTES = bytes_per_row; - VIDEO_MODE_DEPTH = (video_depth)depth; - VideoModes.push_back(mode); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool native_byte_order) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VIDEO_DEPTH_16BIT) - layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VIDEO_DEPTH_32BIT) - layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - if (native_byte_order) - MacFrameLayout = layout; - else - MacFrameLayout = FLAYOUT_DIRECT; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name() { - if (!sdl_window) return; - const char *title = PrefsFindString("title"); - std::string s = title ? title : GetString(STR_WINDOW_TITLE); - if (mouse_grabbed) { - s += GetString(STR_WINDOW_TITLE_GRABBED0); - int hotkey = PrefsFindInt32("hotkey"); - if (!hotkey) hotkey = 1; - if (hotkey & 1) s += GetString(STR_WINDOW_TITLE_GRABBED1); - if (hotkey & 2) s += GetString(STR_WINDOW_TITLE_GRABBED2); - if (hotkey & 4) s += GetString(STR_WINDOW_TITLE_GRABBED3); - s += GetString(STR_WINDOW_TITLE_GRABBED4); - } - SDL_SetWindowTitle(sdl_window, s.c_str()); -} - -// Migrate preferences items (XXX to be handled in MigratePrefs()) -static void migrate_screen_prefs(void) -{ -#ifdef SHEEPSHAVER - // Look-up priorities are: "screen", "screenmodes", "windowmodes". - if (PrefsFindString("screen")) - return; - - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - int width = 0, height = 0; - if (screen_modes) { - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (width < modes[i].width && height < modes[i].height) { - width = modes[i].width; - height = modes[i].height; - } - } - } - } else { - if (window_modes & 1) - width = 640, height = 480; - if (window_modes & 2) - width = 800, height = 600; - } - if (width && height) { - char str[32]; - sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); - PrefsReplaceString("screen", str); - } -#endif -} - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(SDL_monitor_desc &m); - ~driver_base(); - - void init(); // One-time init - void set_video_mode(int flags); - void adapt_to_video_mode(); - - void update_palette(void); - void suspend(void) {} - void resume(void) {} - void toggle_mouse_grab(void); - void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - void grab_mouse(void); - void ungrab_mouse(void); - -public: - SDL_monitor_desc &monitor; // Associated video monitor - const VIDEO_MODE &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - SDL_Surface *s; // The surface we draw into -}; - -#ifdef ENABLE_VOSF -static void update_display_window_vosf(driver_base *drv); -#endif -static void update_display_static(driver_base *drv); - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(SDL_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) -{ - the_buffer = NULL; - the_buffer_copy = NULL; -} - -static void delete_sdl_video_surfaces() -{ - if (sdl_texture) { - SDL_DestroyTexture(sdl_texture); - sdl_texture = NULL; - } - - if (host_surface) { - if (host_surface == guest_surface) { - guest_surface = NULL; - } - - SDL_FreeSurface(host_surface); - host_surface = NULL; - } - - if (guest_surface) { - SDL_FreeSurface(guest_surface); - guest_surface = NULL; - } -} - -static void delete_sdl_video_window() -{ - if (sdl_renderer) { - SDL_DestroyRenderer(sdl_renderer); - sdl_renderer = NULL; - } - - if (sdl_window) { - SDL_DestroyWindow(sdl_window); - sdl_window = NULL; - } -} - -static void shutdown_sdl_video() -{ - delete_sdl_video_surfaces(); - delete_sdl_video_window(); -} - -static int get_mag_rate() -{ - int m = PrefsFindInt32("mag_rate"); - return m < 1 ? 1 : m > 4 ? 4 : m; -} - -static SDL_Surface * init_sdl_video(int width, int height, int bpp, Uint32 flags) -{ - if (guest_surface) { - delete_sdl_video_surfaces(); - } - - int window_width = width; - int window_height = height; - Uint32 window_flags = SDL_WINDOW_ALLOW_HIGHDPI; - const int window_flags_to_monitor = SDL_WINDOW_FULLSCREEN; - - if (flags & SDL_WINDOW_FULLSCREEN) { - SDL_DisplayMode desktop_mode; - if (SDL_GetDesktopDisplayMode(0, &desktop_mode) != 0) { - shutdown_sdl_video(); - return NULL; - } -#ifdef __MACOSX__ - window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP; - window_width = desktop_mode.w; - window_height = desktop_mode.h; -#else - window_flags |= SDL_WINDOW_FULLSCREEN; -#endif - } - - if (sdl_window) { - int old_window_width, old_window_height, old_window_flags; - SDL_GetWindowSize(sdl_window, &old_window_width, &old_window_height); - old_window_flags = SDL_GetWindowFlags(sdl_window); - if (old_window_width != window_width || - old_window_height != window_height || - (old_window_flags & window_flags_to_monitor) != (window_flags & window_flags_to_monitor)) - { - delete_sdl_video_window(); - } - } - - SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, PrefsFindBool("scale_nearest") ? "nearest" : "linear"); - -#if defined(__MACOSX__) && SDL_VERSION_ATLEAST(2,0,14) - if (MetalIsAvailable()) window_flags |= SDL_WINDOW_METAL; -#endif - - if (!sdl_window) { - int m = get_mag_rate(); - sdl_window = SDL_CreateWindow( - "", - SDL_WINDOWPOS_UNDEFINED, - SDL_WINDOWPOS_UNDEFINED, - m * window_width, - m * window_height, - window_flags); - if (!sdl_window) { - shutdown_sdl_video(); - return NULL; - } - set_window_name(); - } - if (flags & SDL_WINDOW_FULLSCREEN) SDL_SetWindowGrab(sdl_window, SDL_TRUE); - - // Some SDL events (regarding some native-window events), need processing - // as they are generated. SDL2 has a facility, SDL_AddEventWatch(), which - // allows events to be processed as they are generated. - if (!did_add_event_watch) { - SDL_AddEventWatch(&on_sdl_event_generated, NULL); - did_add_event_watch = true; - } - - if (!sdl_renderer) { - const char *render_driver = PrefsFindString("sdlrender"); - if (render_driver) { - SDL_SetHint(SDL_HINT_RENDER_DRIVER, render_driver); - } - else { -#ifdef WIN32 - SDL_SetHint(SDL_HINT_RENDER_DRIVER, "software"); -#elif defined(__MACOSX__) && SDL_VERSION_ATLEAST(2,0,14) - SDL_SetHint(SDL_HINT_RENDER_DRIVER, window_flags & SDL_WINDOW_METAL ? "metal" : "opengl"); -#else - SDL_SetHint(SDL_HINT_RENDER_DRIVER, ""); -#endif - } - - bool sdl_vsync = PrefsFindBool("sdl_vsync"); - if (sdl_vsync) { - SDL_SetHint(SDL_HINT_RENDER_VSYNC, "1"); - } - - sdl_renderer = SDL_CreateRenderer(sdl_window, -1, 0); - - if (!sdl_renderer) { - shutdown_sdl_video(); - return NULL; - } - sdl_renderer_thread_id = SDL_ThreadID(); - - SDL_RendererInfo info; - memset(&info, 0, sizeof(info)); - SDL_GetRendererInfo(sdl_renderer, &info); - printf("Using SDL_Renderer driver: %s\n", (info.name ? info.name : "(null)")); - } - - if (!sdl_update_video_mutex) { - sdl_update_video_mutex = SDL_CreateMutex(); - } - - SDL_assert(sdl_texture == NULL); - sdl_texture = SDL_CreateTexture(sdl_renderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STREAMING, width, height); - if (!sdl_texture) { - shutdown_sdl_video(); - return NULL; - } - sdl_update_video_rect.x = 0; - sdl_update_video_rect.y = 0; - sdl_update_video_rect.w = 0; - sdl_update_video_rect.h = 0; - - SDL_assert(guest_surface == NULL); - SDL_assert(host_surface == NULL); - switch (bpp) { - case 8: - guest_surface = SDL_CreateRGBSurface(0, width, height, 8, 0, 0, 0, 0); - break; - case 16: - guest_surface = SDL_CreateRGBSurface(0, width, height, 16, 0x0000F800, 0x000007E0, 0x0000001F, 0x00000000); - break; - case 32: - guest_surface = SDL_CreateRGBSurface(0, width, height, 32, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000); - host_surface = guest_surface; - break; - default: - printf("WARNING: An unsupported bpp of %d was used\n", bpp); - break; - } - if (!guest_surface) { - shutdown_sdl_video(); - return NULL; - } - - if (!host_surface) { - Uint32 texture_format; - if (SDL_QueryTexture(sdl_texture, &texture_format, NULL, NULL, NULL) != 0) { - printf("ERROR: Unable to get the SDL texture's pixel format: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - int bpp; - Uint32 Rmask, Gmask, Bmask, Amask; - if (!SDL_PixelFormatEnumToMasks(texture_format, &bpp, &Rmask, &Gmask, &Bmask, &Amask)) { - printf("ERROR: Unable to determine format for host SDL_surface: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - host_surface = SDL_CreateRGBSurface(0, width, height, bpp, Rmask, Gmask, Bmask, Amask); - if (!host_surface) { - printf("ERROR: Unable to create host SDL_surface: %s\n", SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - } - - if (SDL_RenderSetLogicalSize(sdl_renderer, width, height) != 0) { - printf("ERROR: Unable to set SDL rendeer's logical size (to %dx%d): %s\n", - width, height, SDL_GetError()); - shutdown_sdl_video(); - return NULL; - } - - SDL_RenderSetIntegerScale(sdl_renderer, PrefsFindBool("scale_integer") ? SDL_TRUE : SDL_FALSE); - - return guest_surface; -} - -static int present_sdl_video() -{ - if (SDL_RectEmpty(&sdl_update_video_rect)) return 0; - - if (!sdl_renderer || !sdl_texture || !guest_surface) { - printf("WARNING: A video mode does not appear to have been set.\n"); - return -1; - } - - // Some systems, such as D3D9, can fail if and when they are used across - // certain operations. To address this, only utilize SDL_Renderer in a - // single thread, preferably the main thread. - // - // This was added as part of a fix for https://github.com/DavidLudwig/macemu/issues/21 - // "BasiliskII, Win32: resizing a window does not stretch " - SDL_assert(SDL_ThreadID() == sdl_renderer_thread_id); - - // Make sure the display's internal (to SDL, possibly the OS) buffer gets - // cleared. Not doing so can, if and when letterboxing is applied (whereby - // colored bars are drawn on the screen's sides to help with aspect-ratio - // correction), the colored bars can be an unknown color. - SDL_SetRenderDrawColor(sdl_renderer, 0, 0, 0, 0); // Use black - SDL_RenderClear(sdl_renderer); // Clear the display - - // We're about to work with sdl_update_video_rect, so stop other threads from - // modifying it! - LOCK_PALETTE; - SDL_LockMutex(sdl_update_video_mutex); - // Convert from the guest OS' pixel format, to the host OS' texture, if necessary. - if (host_surface != guest_surface && - host_surface != NULL && - guest_surface != NULL) - { - SDL_Rect destRect = sdl_update_video_rect; - int result = SDL_BlitSurface(guest_surface, &sdl_update_video_rect, host_surface, &destRect); - if (result != 0) { - SDL_UnlockMutex(sdl_update_video_mutex); - UNLOCK_PALETTE; - return -1; - } - } - UNLOCK_PALETTE; // passed potential deadlock, can unlock palette - - // Update the host OS' texture - void * srcPixels = (void *)((uint8_t *)host_surface->pixels + - sdl_update_video_rect.y * host_surface->pitch + - sdl_update_video_rect.x * host_surface->format->BytesPerPixel); - - if (SDL_UpdateTexture(sdl_texture, &sdl_update_video_rect, srcPixels, host_surface->pitch) != 0) { - SDL_UnlockMutex(sdl_update_video_mutex); - return -1; - } - - // We are done working with pixels in host_surface. Reset sdl_update_video_rect, then let - // other threads modify it, as-needed. - sdl_update_video_rect.x = 0; - sdl_update_video_rect.y = 0; - sdl_update_video_rect.w = 0; - sdl_update_video_rect.h = 0; - SDL_UnlockMutex(sdl_update_video_mutex); - - // Copy the texture to the display - if (SDL_RenderCopy(sdl_renderer, sdl_texture, NULL, NULL) != 0) { - return -1; - } - - // Update the display - SDL_RenderPresent(sdl_renderer); - - // Indicate success to the caller! - return 0; -} - -void update_sdl_video(SDL_Surface *s, int numrects, SDL_Rect *rects) -{ - // TODO: make sure SDL_Renderer resources get displayed, if and when - // MacsBug is running (and VideoInterrupt() might not get called) - - SDL_LockMutex(sdl_update_video_mutex); - for (int i = 0; i < numrects; ++i) { - SDL_UnionRect(&sdl_update_video_rect, &rects[i], &sdl_update_video_rect); - } - SDL_UnlockMutex(sdl_update_video_mutex); -} - -void update_sdl_video(SDL_Surface *s, Sint32 x, Sint32 y, Sint32 w, Sint32 h) -{ - SDL_Rect temp = {x, y, w, h}; - update_sdl_video(s, 1, &temp); -} - -#ifdef SHEEPSHAVER -static void MagBits(Uint8 *dst, Uint8 *src, int mag) { - for (int y = 0; y < 16; y++) - for (int x = 0; x < 16; x++) { - int sa = 16 * y + x; - if (!(src[sa >> 3] & 0x80 >> (sa & 7))) continue; - for (int dy = 0; dy < mag; dy++) - for (int dx = 0; dx < mag; dx++) { - int da = 16 * mag * (mag * y + dy) + mag * x + dx; - dst[da >> 3] |= 0x80 >> (da & 7); - } - } -} -static SDL_Cursor *MagCursor(bool hot) { - int w, h; - SDL_GetWindowSize(sdl_window, &w, &h); - int mag = std::min(w / drv->VIDEO_MODE_X, h / drv->VIDEO_MODE_Y); - Uint8 *data = (Uint8 *)SDL_calloc(1, 32 * mag * mag); - Uint8 *mask = (Uint8 *)SDL_calloc(1, 32 * mag * mag); - MagBits(data, &MacCursor[4], mag); - MagBits(mask, &MacCursor[36], mag); - SDL_Cursor *cursor = SDL_CreateCursor(data, mask, 16 * mag, 16 * mag, hot ? MacCursor[2] * mag : 0, hot ? MacCursor[3] * mag : 0); - SDL_free(data); - SDL_free(mask); - return cursor; -} -#endif - -void driver_base::set_video_mode(int flags) -{ - int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = init_sdl_video(VIDEO_MODE_X, VIDEO_MODE_Y, depth, flags)) == NULL) - return; -#ifdef ENABLE_VOSF - the_host_buffer = (uint8 *)s->pixels; -#endif -} - -void driver_base::init() -{ - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_WINDOW_FULLSCREEN : 0); - int aligned_height = (VIDEO_MODE_Y + 15) & ~15; - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - - // Check whether we can initialize the VOSF subsystem and it's profitable - if (!video_vosf_init(monitor)) { - WarningAlert(GetString(STR_VOSF_INIT_ERR)); - use_vosf = false; - } - else if (!video_vosf_profitable()) { - video_vosf_exit(); - printf("VOSF acceleration is not profitable on this platform, disabling it\n"); - use_vosf = false; - } - if (!use_vosf) { - free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); - the_host_buffer = NULL; - } -#endif - if (!use_vosf) { - // Allocate memory for frame buffer - the_buffer_size = (aligned_height + 2) * s->pitch; - the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); - } - - // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH, true); - - adapt_to_video_mode(); - - // set default B/W palette - sdl_palette = SDL_AllocPalette(256); - sdl_palette->colors[1] = (SDL_Color){ .r = 0, .g = 0, .b = 0, .a = 255 }; - SDL_SetSurfacePalette(s, sdl_palette); -} - -void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(mouse_grabbed); - - // Init blitting routines - SDL_PixelFormat *f = s->format; - VisualFormat visualFormat; - visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - visualFormat.Rmask = f->Rmask; - visualFormat.Gmask = f->Gmask; - visualFormat.Bmask = f->Bmask; - Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); - - // Load gray ramp to 8->16/32 expand map - if (!IsDirectMode(mode)) - for (int i=0; i<256; i++) - ExpandMap[i] = SDL_MapRGB(f, i, i, i); - - - bool hardware_cursor = false; -#ifdef SHEEPSHAVER - hardware_cursor = video_can_change_cursor(); - if (hardware_cursor) { - // Create cursor - if ((sdl_cursor = MagCursor(false)) != NULL) { - SDL_SetCursor(sdl_cursor); - } - } - // Tell the video driver there's a change in cursor type - if (private_data) - private_data->cursorHardware = hardware_cursor; -#endif - SDL_LockMutex(sdl_update_video_mutex); - sdl_update_video_rect.x = 0; - sdl_update_video_rect.y = 0; - sdl_update_video_rect.w = VIDEO_MODE_X; - sdl_update_video_rect.h = VIDEO_MODE_Y; - SDL_UnlockMutex(sdl_update_video_mutex); - - // Hide cursor - SDL_ShowCursor(hardware_cursor); - - // Set window name/class - set_window_name(); - - // Everything went well - init_ok = true; -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - // HACK: Just delete instances of SDL_Surface and SDL_Texture, rather - // than also the SDL_Window and SDL_Renderer. This fixes a bug whereby - // OSX hosts, when in fullscreen, will, on a guest OS resolution change, - // do a series of switches (using OSX's "Spaces" feature) to and from - // the Basilisk II desktop, - delete_sdl_video_surfaces(); // This deletes instances of SDL_Surface and SDL_Texture - //shutdown_sdl_video(); // This deletes SDL_Window, SDL_Renderer, in addition to - // instances of SDL_Surface and SDL_Texture. - - // the_buffer shall always be mapped through vm_acquire_framebuffer() - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - SDL_ShowCursor(1); -} - -// Palette has changed -void driver_base::update_palette(void) -{ - const VIDEO_MODE &mode = monitor.get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) { - SDL_SetSurfacePalette(s, sdl_palette); - SDL_LockMutex(sdl_update_video_mutex); - sdl_update_video_rect.x = 0; - sdl_update_video_rect.y = 0; - sdl_update_video_rect.w = VIDEO_MODE_X; - sdl_update_video_rect.h = VIDEO_MODE_Y; - SDL_UnlockMutex(sdl_update_video_mutex); - } -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ -} - -// Toggle mouse grab -void driver_base::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -static void update_mouse_grab() -{ - if (mouse_grabbed) { - SDL_SetRelativeMouseMode(SDL_TRUE); - } else { - SDL_SetRelativeMouseMode(SDL_FALSE); - } -} - -// Grab mouse, switch to relative mouse mode -void driver_base::grab_mouse(void) -{ - if (!mouse_grabbed) { - mouse_grabbed = true; - update_mouse_grab(); - set_window_name(); - disable_mouse_accel(); - ADBSetRelMouseMode(true); - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_base::ungrab_mouse(void) -{ - if (mouse_grabbed) { - mouse_grabbed = false; - update_mouse_grab(); - set_window_name(); - restore_mouse_accel(); - ADBSetRelMouseMode(false); - } -} - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path && *kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) f = fopen(KEYCODE_FILE_NAME2, "r"); - if (f == NULL) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = CODE_INVALID; - - // Search for server vendor string, then read keycodes - const char * video_driver = SDL_GetCurrentVideoDriver(); - bool video_driver_found = false; - char line[256]; - int n_keys = 0; - while (fgets(line, sizeof(line) - 1, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (video_driver_found) { - // Skip aliases as long as we have read keycodes yet - // Otherwise, it's another mapping and we have to stop - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) - continue; - - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code, n_keys++; - else - break; - } else { - // Search for SDL video driver string - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { - char *p = line + sizeof(sdl_str); - if (video_driver && strstr(video_driver, p) == video_driver) - video_driver_found = true; - } - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = video_driver_found; - - // Vendor not found? Then display warning - if (!video_driver_found) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver ? video_driver : "", kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver ? video_driver : "", n_keys)); - } -} - -// Open display for current mode -bool SDL_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); -#if DEBUG - const VIDEO_MODE &mode = get_current_mode(); - D(bug("Current video mode:\n")); - D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); -#endif - - // Create display driver object of requested type - drv = new(std::nothrow) driver_base(*this); - if (drv == NULL) - return false; - drv->init(); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef WIN32 - // Chain in a new message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifndef USE_CPU_EMUL_SERVICES - redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, "Redraw Thread", NULL)) != NULL); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - return true; -} - -#ifdef SHEEPSHAVER -bool VideoInit(void) -{ - const bool classic = false; -#else -bool VideoInit(bool classic) -{ -#endif - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Create Mutexes - if ((sdl_events_lock = SDL_CreateMutex()) == NULL) - return false; - if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) - return false; - if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) - return false; - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - mouse_wheel_reverse = mouse_wheel_lines < 0; - if (mouse_wheel_reverse) mouse_wheel_lines = -mouse_wheel_lines; - - // Get screen mode from preferences - migrate_screen_prefs(); - const char *mode_str = NULL; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width, default_height; - if (classic) { - default_width = 512; - default_height = 384; - } - else { - default_width = 640; - default_height = 480; - } - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_SCREEN; - } - if (default_width <= 0) - default_width = sdl_display_width(); - else if (default_width > sdl_display_width()) - default_width = sdl_display_width(); - if (default_height <= 0) - default_height = sdl_display_height(); - else if (default_height > sdl_display_height()) - default_height = sdl_display_height(); - - // Mac screen depth follows X depth - screen_depth = 32; - SDL_DisplayMode desktop_mode; - if (SDL_GetDesktopDisplayMode(0, &desktop_mode) == 0) { - screen_depth = SDL_BITSPERPIXEL(desktop_mode.format); - } - int default_depth; - switch (screen_depth) { - case 8: - default_depth = VIDEO_DEPTH_8BIT; - break; - case 15: case 16: - default_depth = VIDEO_DEPTH_16BIT; - break; - case 24: case 32: - default_depth = VIDEO_DEPTH_32BIT; - break; - default: - default_depth = VIDEO_DEPTH_1BIT; - break; - } - - // Initialize list of video modes to try - struct { - int w; - int h; - int resolution_id; - } -#ifdef SHEEPSHAVER - // Omit Classic resolutions - video_modes[] = { - { -1, -1, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#else - video_modes[] = { - { -1, -1, 0x80 }, - { 512, 384, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#endif - video_modes[0].w = default_width; - video_modes[0].h = default_height; - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); - else { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - } else if (display_type == DISPLAY_SCREEN) { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - std::vector::const_iterator begin = VideoModes.begin(); - cur_mode = distance(begin, i); -#endif - break; - } - } - if (i == end) { // not found, use first available mode - const VIDEO_MODE & mode = VideoModes[0]; - default_depth = VIDEO_MODE_DEPTH; - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - cur_mode = 0; -#endif - } - -#ifdef SHEEPSHAVER - for (int i = 0; i < VideoModes.size(); i++) - VModes[i] = VideoModes[i]; - VideoInfo *p = &VModes[VideoModes.size()]; - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; -#endif - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - int bits = 1 << VIDEO_MODE_DEPTH; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); - } -#endif - - int color_depth = get_customized_color_depth(default_depth); - - D(bug("Return get_customized_color_depth %d\n", color_depth)); - - // Create SDL_monitor_desc for this (the only) display - SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void SDL_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - -#ifdef WIN32 - // Remove message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); -#endif - - // Stop redraw thread -#ifndef USE_CPU_EMUL_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - SDL_WaitThread(redraw_thread, NULL); - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - D(bug(" frame buffer unlocked\n")); - - // Close display - delete drv; - drv = NULL; -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - - // Destroy locks - if (frame_buffer_lock) - SDL_DestroyMutex(frame_buffer_lock); - if (sdl_palette_lock) - SDL_DestroyMutex(sdl_palette_lock); - if (sdl_events_lock) - SDL_DestroyMutex(sdl_events_lock); -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - -static void ApplyGammaRamp() { - if (sdl_window) { - int result; - if (!init_gamma_valid) { - result = SDL_GetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); - if (result < 0) - fprintf(stderr, "SDL_GetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - init_gamma_valid = true; - } - const char *s = PrefsFindString("gammaramp"); - if (!s) s = "off"; - if (strcmp(s, "off") && (strcmp(s, "fullscreen") || display_type == DISPLAY_SCREEN)) - result = SDL_SetWindowGammaRamp(sdl_window, last_gamma_red, last_gamma_green, last_gamma_blue); - else - result = SDL_SetWindowGammaRamp(sdl_window, init_gamma_red, init_gamma_green, init_gamma_blue); - if (result < 0) - fprintf(stderr, "SDL_SetWindowGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - } -} - -static void do_toggle_fullscreen(void) -{ -#ifndef USE_CPU_EMUL_SERVICES - // pause redraw thread - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; -#endif - - // Apply fullscreen - if (sdl_window) { - if (display_type == DISPLAY_SCREEN) { - display_type = DISPLAY_WINDOW; - SDL_SetWindowFullscreen(sdl_window, 0); - const VIDEO_MODE &mode = drv->mode; - int m = get_mag_rate(); - SDL_SetWindowSize(sdl_window, m * VIDEO_MODE_X, m * VIDEO_MODE_Y); - SDL_SetWindowGrab(sdl_window, SDL_FALSE); - } else { - display_type = DISPLAY_SCREEN; -#ifdef __MACOSX__ - SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN_DESKTOP); -#else - SDL_SetWindowFullscreen(sdl_window, SDL_WINDOW_FULLSCREEN); -#endif - SDL_SetWindowGrab(sdl_window, SDL_TRUE); - } - } - - // switch modes - drv->adapt_to_video_mode(); - - // reset the palette -#ifdef SHEEPSHAVER - video_set_palette(); -#endif - ApplyGammaRamp(); - drv->update_palette(); - - // reset the video refresh handler - VideoRefreshInit(); - - // while SetVideoMode is happening, control key up may be missed - ADBKeyUp(0x36); - - // resume redraw thread - toggle_fullscreen = false; -#ifndef USE_CPU_EMUL_SERVICES - thread_stop_req = false; -#endif -} - -/* - * Mac VBL interrupt - */ - -/* - * Execute video VBL routine - */ - -static bool is_fullscreen(SDL_Window * window) -{ -#ifdef __MACOSX__ - // On OSX, SDL, at least as of 2.0.5 (and possibly beyond), does not always - // report changes to fullscreen via the SDL_WINDOW_FULLSCREEN flag. - // (Example: https://bugzilla.libsdl.org/show_bug.cgi?id=3766 , which - // involves fullscreen/windowed toggles via window-manager UI controls). - // Until it does, or adds a facility to do so, we'll use a platform-specific - // code path to detect fullscreen changes. - extern bool is_fullscreen_osx(SDL_Window * window); - return is_fullscreen_osx(sdl_window); -#else - if (!window) { - return false; - } - const Uint32 sdl_window_flags = SDL_GetWindowFlags(sdl_window); - return (sdl_window_flags & SDL_WINDOW_FULLSCREEN) != 0; -#endif -} - -#ifdef SHEEPSHAVER -void VideoVBL(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - present_sdl_video(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} -#else -void VideoInterrupt(void) -{ - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); - - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - present_sdl_video(); - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} -#endif - - -/* - * Set palette - */ - -#ifdef SHEEPSHAVER -void video_set_palette(void) -{ - monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); - uint8 pal[256 * 3]; - for (int c = 0; c < n_colors; c++) { - pal[c*3 + 0] = mac_pal[c].red; - pal[c*3 + 1] = mac_pal[c].green; - pal[c*3 + 2] = mac_pal[c].blue; - } - monitor->set_palette(pal, n_colors); -} - -void video_set_gamma(int n_colors) -{ - monitor_desc * monitor = VideoMonitors[0]; - uint8 gamma[256 * 3]; - for (int c = 0; c < n_colors; c++) { - gamma[c*3 + 0] = mac_gamma[c].red; - gamma[c*3 + 1] = mac_gamma[c].green; - gamma[c*3 + 2] = mac_gamma[c].blue; - } - monitor->set_gamma(gamma, n_colors); -} -#endif - -void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - - const VIDEO_MODE &mode = get_current_mode(); - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - - if (!sdl_palette) { - sdl_palette = SDL_AllocPalette(num_out); - } - - SDL_Color *p = sdl_palette->colors; - for (int i=0; ir = pal[c*3 + 0] * 0x0101; - p->g = pal[c*3 + 1] * 0x0101; - p->b = pal[c*3 + 2] * 0x0101; - p++; - } - - // Recalculate pixel color expansion map - if (!IsDirectMode(mode)) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - } -#endif - } - - // Tell redraw thread to change palette - sdl_palette_changed = true; - - UNLOCK_PALETTE; -} - -void SDL_monitor_desc::set_gamma(uint8 *gamma, int num_in) -{ - // handle the gamma ramp - - if (gamma[0] == 127 && gamma[num_in*3-1] == 127) // solid grey - return; // ignore - - uint16 red[256]; - uint16 green[256]; - uint16 blue[256]; - - int repeats = 256 / num_in; - - for (int i = 0; i < num_in; i++) { - for (int j = 0; j < repeats; j++) { - red[i*repeats + j] = gamma[i*3 + 0] << 8; - green[i*repeats + j] = gamma[i*3 + 1] << 8; - blue[i*repeats + j] = gamma[i*3 + 2] << 8; - } - } - - // fill remaining entries (if any) with last value - for (int i = num_in * repeats; i < 256; i++) { - red[i] = gamma[(num_in - 1) * 3] << 8; - green[i] = gamma[(num_in - 1) * 3 + 1] << 8; - blue[i] = gamma[(num_in - 1) * 3 + 2] << 8; - } - - bool changed = (memcmp(red, last_gamma_red, 512) != 0 || - memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); - - if (changed) { - memcpy(last_gamma_red, red, 512); - memcpy(last_gamma_green, green, 512); - memcpy(last_gamma_blue, blue, 512); - ApplyGammaRamp(); - } - -} - - - -/* - * Switch video mode - */ - -#ifdef SHEEPSHAVER -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - DisableInterrupt(); - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; - - cur_mode = i; - monitor_desc *monitor = VideoMonitors[0]; - monitor->switch_to_current_mode(); - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - thread_stop_req = false; - EnableInterrupt(); - return noErr; - } - } - return paramErr; -} -#endif - -static bool is_cursor_in_mac_screen() { - - int windowX, windowY; - int cursorX, cursorY; - int deltaX, deltaY; - bool out; - - // TODO figure out a check for full screen mode - if (display_type == DISPLAY_SCREEN) - return true; - - if (display_type == DISPLAY_WINDOW) { - - if (sdl_window == NULL || SDL_GetMouseFocus() != sdl_window) - return false; - - SDL_GetWindowPosition(sdl_window, &windowX, &windowY); - SDL_GetGlobalMouseState(&cursorX, &cursorY); - deltaX = cursorX - windowX; - deltaY = cursorY - windowY; - D(bug("cursor relative {%d,%d}\n", deltaX, deltaY)); - const VIDEO_MODE &mode = drv->mode; - const int m = get_mag_rate(); - out = deltaX >= 0 && deltaX < VIDEO_MODE_X * m && - deltaY >= 0 && deltaY < VIDEO_MODE_Y * m; - D(bug("cursor in window? %s\n", out? "yes" : "no")); - return out; - } - - return false; -} - -void SDL_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - LOCK_EVENTS; - video_close(); - video_open(); - UNLOCK_EVENTS; - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -#ifdef SHEEPSHAVER -bool video_can_change_cursor(void) -{ - return PrefsFindBool("hardcursor") && (display_type == DISPLAY_WINDOW || PrefsFindBool("scale_integer")); -} -#endif - - -/* - * Set cursor image for window - */ - -#ifdef SHEEPSHAVER -void video_set_cursor(void) -{ - // Set new cursor image if it was changed - if (sdl_cursor) { - SDL_FreeCursor(sdl_cursor); - sdl_cursor = MagCursor(true); - if (sdl_cursor) { - SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); - SDL_SetCursor(sdl_cursor); - - // XXX Windows apparently needs an extra mouse event to - // make the new cursor image visible. - // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the - // mouse, we have to put it back. - bool move = false; -#ifdef WIN32 - move = true; -#elif defined(__APPLE__) - move = mouse_grabbed; -#endif - if (move) { - int visible = SDL_ShowCursor(-1); - if (visible) { - bool cursor_in_window = is_cursor_in_mac_screen(); - - if (cursor_in_window) { - int x, y; - SDL_GetMouseState(&x, &y); - D(bug("WarpMouse to {%d,%d} via video_set_cursor\n", x, y)); - SDL_WarpMouseInWindow(sdl_window, x, y); - } - } - } - } - } -} -#endif - - -/* - * Keyboard-related utilify functions - */ - -static bool is_hotkey_down(SDL_Keysym const & ks) -{ - int hotkey = PrefsFindInt32("hotkey"); - if (!hotkey) hotkey = 1; - return (ctrl_down || (ks.mod & KMOD_CTRL) || !(hotkey & 1)) && - (opt_down || (ks.mod & KMOD_ALT) || !(hotkey & 2)) && - (cmd_down || (ks.mod & KMOD_GUI) || !(hotkey & 4)); -} - -static int modify_opt_cmd(int code) { - static bool f, c; - if (!f) { - f = true; - c = PrefsFindBool("swap_opt_cmd"); - } - if (c) { - switch (code) { - case 0x37: return 0x3a; - case 0x3a: return 0x37; - } - } - return code; -} - -/* - * Translate key event to Mac keycode, returns CODE_INVALID if no keycode was found - * and CODE_HOTKEY if the key was recognized as a hotkey - */ - -static int kc_decode(SDL_Keysym const & ks, bool key_down) -{ - switch (ks.sym) { - case SDLK_a: return 0x00; - case SDLK_b: return 0x0b; - case SDLK_c: return 0x08; - case SDLK_d: return 0x02; - case SDLK_e: return 0x0e; - case SDLK_f: return 0x03; - case SDLK_g: return 0x05; - case SDLK_h: return 0x04; - case SDLK_i: return 0x22; - case SDLK_j: return 0x26; - case SDLK_k: return 0x28; - case SDLK_l: return 0x25; - case SDLK_m: return 0x2e; - case SDLK_n: return 0x2d; - case SDLK_o: return 0x1f; - case SDLK_p: return 0x23; - case SDLK_q: return 0x0c; - case SDLK_r: return 0x0f; - case SDLK_s: return 0x01; - case SDLK_t: return 0x11; - case SDLK_u: return 0x20; - case SDLK_v: return 0x09; - case SDLK_w: return 0x0d; - case SDLK_x: return 0x07; - case SDLK_y: return 0x10; - case SDLK_z: return 0x06; - - case SDLK_1: case SDLK_EXCLAIM: return 0x12; - case SDLK_2: case SDLK_AT: return 0x13; - case SDLK_3: case SDLK_HASH: return 0x14; - case SDLK_4: case SDLK_DOLLAR: return 0x15; - case SDLK_5: return 0x17; - case SDLK_6: return 0x16; - case SDLK_7: return 0x1a; - case SDLK_8: return 0x1c; - case SDLK_9: return 0x19; - case SDLK_0: return 0x1d; - - case SDLK_BACKQUOTE: case 167: return 0x32; - case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; - case SDLK_EQUALS: case SDLK_PLUS: return 0x18; - case SDLK_LEFTBRACKET: return 0x21; - case SDLK_RIGHTBRACKET: return 0x1e; - case SDLK_BACKSLASH: return 0x2a; - case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; - case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; - case SDLK_COMMA: case SDLK_LESS: return 0x2b; - case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; - case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - - case SDLK_TAB: if (is_hotkey_down(ks)) {if (!key_down) drv->suspend(); return CODE_HOTKEY;} else return 0x30; - case SDLK_RETURN: if (is_hotkey_down(ks)) {if (!key_down) toggle_fullscreen = true; return CODE_HOTKEY;} else return 0x24; - case SDLK_SPACE: return 0x31; - case SDLK_BACKSPACE: return 0x33; - - case SDLK_DELETE: return 0x75; - case SDLK_INSERT: return 0x72; - case SDLK_HOME: case SDLK_HELP: return 0x73; - case SDLK_END: return 0x77; - case SDLK_PAGEUP: return 0x74; - case SDLK_PAGEDOWN: return 0x79; - - case SDLK_LCTRL: return 0x36; - case SDLK_RCTRL: return 0x36; - case SDLK_LSHIFT: return 0x38; - case SDLK_RSHIFT: return 0x38; - case SDLK_LALT: case SDLK_RALT: return 0x3a; - case SDLK_LGUI: case SDLK_RGUI: return 0x37; - case SDLK_MENU: return 0x32; - case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCKCLEAR: return 0x47; - - case SDLK_UP: return 0x3e; - case SDLK_DOWN: return 0x3d; - case SDLK_LEFT: return 0x3b; - case SDLK_RIGHT: return 0x3c; - - case SDLK_ESCAPE: if (is_hotkey_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return CODE_HOTKEY;} else return 0x35; - - case SDLK_F1: if (is_hotkey_down(ks)) {if (!key_down) SysMountFirstFloppy(); return CODE_HOTKEY;} else return 0x7a; - case SDLK_F2: return 0x78; - case SDLK_F3: return 0x63; - case SDLK_F4: return 0x76; - case SDLK_F5: return 0x60; - case SDLK_F6: return 0x61; - case SDLK_F7: return 0x62; - case SDLK_F8: return 0x64; - case SDLK_F9: return 0x65; - case SDLK_F10: return 0x6d; - case SDLK_F11: return 0x67; - case SDLK_F12: return 0x6f; - - case SDLK_PRINTSCREEN: return 0x69; - case SDLK_SCROLLLOCK: return 0x6b; - case SDLK_PAUSE: return 0x71; - - case SDLK_KP_0: return 0x52; - case SDLK_KP_1: return 0x53; - case SDLK_KP_2: return 0x54; - case SDLK_KP_3: return 0x55; - case SDLK_KP_4: return 0x56; - case SDLK_KP_5: return 0x57; - case SDLK_KP_6: return 0x58; - case SDLK_KP_7: return 0x59; - case SDLK_KP_8: return 0x5b; - case SDLK_KP_9: return 0x5c; - case SDLK_KP_PERIOD: return 0x41; - case SDLK_KP_PLUS: return 0x45; - case SDLK_KP_MINUS: return 0x4e; - case SDLK_KP_MULTIPLY: return 0x43; - case SDLK_KP_DIVIDE: return 0x4b; - case SDLK_KP_ENTER: return 0x4c; - case SDLK_KP_EQUALS: return 0x51; - } - D(bug("Unhandled SDL keysym: %d\n", ks.sym)); - return CODE_INVALID; -} - -static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) -{ - return kc_decode(ev.keysym, key_down); -} - -static void force_complete_window_refresh() -{ - if (display_type == DISPLAY_WINDOW) { -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - } -#endif - // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. - const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); - const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - for (int i = 0; i < len; i++) - the_buffer_copy[i] = !the_buffer[i]; - } -} - -/* - * SDL event handling - */ - -// possible return codes for SDL-registered event watches -enum { - EVENT_DROP_FROM_QUEUE = 0, - EVENT_ADD_TO_QUEUE = 1 -}; - -// Some events need to be processed in the host-app's main thread, due to -// host-OS requirements. -// -// This function is called by SDL, whenever it generates an SDL_Event. It has -// the ability to process events, and optionally, to prevent them from being -// added to SDL's event queue (and retrieve-able via SDL_PeepEvents(), etc.) -static int SDLCALL on_sdl_event_generated(void *userdata, SDL_Event * event) -{ - switch (event->type) { - case SDL_KEYUP: { - SDL_Keysym const & ks = event->key.keysym; - switch (ks.sym) { - case SDLK_F5: { - if (is_hotkey_down(ks) && !PrefsFindBool("hardcursor")) { - drv->toggle_mouse_grab(); - return EVENT_DROP_FROM_QUEUE; - } - } break; - } - } break; - - case SDL_WINDOWEVENT: { - switch (event->window.event) { - case SDL_WINDOWEVENT_RESIZED: { - if (!redraw_thread_active) break; - // Handle changes of fullscreen. This is done here, in - // on_sdl_event_generated() and not the main SDL_Event-processing - // loop, in order to perform this change on the main thread. - // (Some os'es UI APIs, such as OSX's NSWindow, are not - // thread-safe.) - const bool is_full = is_fullscreen(sdl_window); - const bool adjust_fullscreen = \ - (display_type == DISPLAY_WINDOW && is_full) || - (display_type == DISPLAY_SCREEN && !is_full); - if (adjust_fullscreen) { - do_toggle_fullscreen(); - -#if __MACOSX__ - // HACK-FIX: on OSX hosts, make sure that the OSX menu - // bar does not show up in fullscreen mode, when the - // cursor is near the top of the screen, lest the - // guest OS' menu bar be obscured. - if (is_full) { - extern void set_menu_bar_visible_osx(bool); - set_menu_bar_visible_osx(false); - } -#endif - } - } break; - } - } break; - } - - return EVENT_ADD_TO_QUEUE; -} - - -static void handle_events(void) -{ - SDL_Event events[10]; - const int n_max_events = sizeof(events) / sizeof(events[0]); - int n_events; - - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, SDL_FIRSTEVENT, SDL_LASTEVENT)) > 0) { - for (int i = 0; i < n_events; i++) { - SDL_Event & event = events[i]; - - switch (event.type) { - - // Mouse button - case SDL_MOUSEBUTTONDOWN: { - unsigned int button = event.button.button; - if (button == SDL_BUTTON_LEFT) - ADBMouseDown(0); - else if (button == SDL_BUTTON_RIGHT) - ADBMouseDown(1); - else if (button == SDL_BUTTON_MIDDLE) - ADBMouseDown(2); - break; - } - case SDL_MOUSEBUTTONUP: { - unsigned int button = event.button.button; - if (button == SDL_BUTTON_LEFT) - ADBMouseUp(0); - else if (button == SDL_BUTTON_RIGHT) - ADBMouseUp(1); - else if (button == SDL_BUTTON_MIDDLE) - ADBMouseUp(2); - break; - } - - // Mouse moved - case SDL_MOUSEMOTION: - if (mouse_grabbed) { - drv->mouse_moved(event.motion.xrel, event.motion.yrel); - } else { - drv->mouse_moved(event.motion.x, event.motion.y); - } - break; - - case SDL_MOUSEWHEEL: - if (!event.wheel.y) break; - if (!mouse_wheel_mode) { - int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } - else { - int key = (event.wheel.y < 0) ^ mouse_wheel_reverse ? 0x3d : 0x3e; // Cursor up/down - for (int i = 0; i < mouse_wheel_lines; i++) { - ADBKeyDown(key); - ADBKeyUp(key); - } - } - break; - - // Keyboard - case SDL_KEYDOWN: { - if (event.key.repeat) - break; - int code = CODE_INVALID; - if (use_keycodes && event2keycode(event.key, true) != CODE_HOTKEY) - code = keycode_table[event.key.keysym.scancode & 0xff]; - if (code == CODE_INVALID) - code = event2keycode(event.key, true); - if (code >= 0) { - if (!emul_suspended) { - code = modify_opt_cmd(code); -#ifdef __MACOSX__ - ADBKeyDown(code); -#else - if (code == 0x39) - (SDL_GetModState() & KMOD_CAPS ? ADBKeyDown : ADBKeyUp)(code); - else - ADBKeyDown(code); -#endif - if (code == 0x36) - ctrl_down = true; - if (code == 0x3a) - opt_down = true; - if (code == 0x37) - cmd_down = true; - - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case SDL_KEYUP: { - int code = CODE_INVALID; - if (use_keycodes && event2keycode(event.key, false) != CODE_HOTKEY) - code = keycode_table[event.key.keysym.scancode & 0xff]; - if (code == CODE_INVALID) - code = event2keycode(event.key, false); - if (code >= 0) { - code = modify_opt_cmd(code); -#ifdef __MACOSX__ - ADBKeyUp(code); -#else - if (code != 0x39) - ADBKeyUp(code); -#endif - if (code == 0x36) - ctrl_down = false; - if (code == 0x3a) - opt_down = false; - if (code == 0x37) - cmd_down = false; - } - break; - } - - case SDL_WINDOWEVENT: { - switch (event.window.event) { - // Hidden parts exposed, force complete refresh of window - case SDL_WINDOWEVENT_EXPOSED: - force_complete_window_refresh(); - break; - - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - case SDL_WINDOWEVENT_RESTORED: - force_complete_window_refresh(); - break; - - } - break; - } - - // Window "close" widget clicked - case SDL_QUIT: - if (SDL_GetModState() & (KMOD_LALT | KMOD_RALT)) break; - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - break; - } - } - } -} - - -/* - * Window display update - */ - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_base *drv) -{ - // Incremental update code - int wide = 0, high = 0; - uint32 x1, x2, y1, y2; - const VIDEO_MODE &mode = drv->mode; - int bytes_per_row = VIDEO_MODE_ROW_BYTES; - uint8 *p, *p2; - uint32 x2_clipped, wide_clipped; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y1 = j; - break; - } - } - y2 = y1 - 1; - for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if ((int)VIDEO_MODE_DEPTH < (int)VIDEO_DEPTH_8BIT) { - const int src_bytes_per_row = bytes_per_row; - const int dst_bytes_per_row = drv->s->pitch; - const int pixels_per_byte = 8/mac_depth_of_video_depth(VIDEO_MODE_DEPTH); - - const uint32 line_len = TrivialBytesPerRow(VIDEO_MODE_X, VIDEO_MODE_DEPTH); - - x1 = line_len; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1; i++) { - if (*p != *p2) { - x1 = i; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = line_len; i > x2; i--) { - p--; p2--; - if (*p != *p2) { - x2 = i; - break; - } - } - } - - x1 *= pixels_per_byte; - x2 *= pixels_per_byte; - wide = x2 - x1; - x2_clipped = x2 > VIDEO_MODE_X? VIDEO_MODE_X : x2; - wide_clipped = x2_clipped - x1; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); - int di = y1 * dst_bytes_per_row + x1; - for (uint32 j = y1; j <= y2; j++) { - memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); - Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); - si += src_bytes_per_row; - di += dst_bytes_per_row; - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - update_sdl_video(drv->s, x1, y1, wide_clipped, high); - } - - } else { - const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; - const int dst_bytes_per_row = drv->s->pitch; - - x1 = VIDEO_MODE_X; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { - if (*p != *p2) { - x1 = i / bytes_per_pixel; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - for (uint32 j = y1; j <= y2; j++) { - uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; - int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - update_sdl_video(drv->s, x1, y1, wide, high); - } - } - } -} - -// Static display update (fixed frame rate, bounding boxes based) -// XXX use NQD bounding boxes to help detect dirty areas? -static void update_display_static_bbox(driver_base *drv) -{ - const VIDEO_MODE &mode = drv->mode; - - // Allocate bounding boxes for SDL_UpdateRects() - const uint32 N_PIXELS = 64; - const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; - const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; - SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); - uint32 nr_boxes = 0; - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Update the surface from Mac screen - const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; - const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; - const uint32 dst_bytes_per_row = drv->s->pitch; - for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { - uint32 h = N_PIXELS; - if (h > VIDEO_MODE_Y - y) - h = VIDEO_MODE_Y - y; - for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { - uint32 w = N_PIXELS; - if (w > VIDEO_MODE_X - x) - w = VIDEO_MODE_X - x; - const int xs = w * bytes_per_pixel; - const int xb = x * bytes_per_pixel; - bool dirty = false; - for (uint32 j = y; j < (y + h); j++) { - const uint32 yb = j * bytes_per_row; - const uint32 dst_yb = j * dst_bytes_per_row; - if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { - memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); - Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); - dirty = true; - } - } - if (dirty) { - boxes[nr_boxes].x = x; - boxes[nr_boxes].y = y; - boxes[nr_boxes].w = w; - boxes[nr_boxes].h = h; - nr_boxes++; - } - } - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - if (nr_boxes) - update_sdl_video(drv->s, nr_boxes, boxes); -} - - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (sdl_palette_changed) { - sdl_palette_changed = false; - drv->update_palette(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_window_static(void); - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - video_refresh_window_static(); -} - -#ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - const VIDEO_MODE &mode = drv->mode; - if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) - update_display_static_bbox(drv); - else - update_display_static(drv); - } -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - video_refresh = video_refresh_window_static; - } -} - -static inline void do_video_refresh(void) -{ - // Handle SDL events - handle_events(); - - // Update display - video_refresh(); - - - // Set new palette if it was changed - handle_palette_changes(); -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Process pending events and update display - do_video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifndef USE_CPU_EMUL_SERVICES -static int redraw_func(void *arg) -{ - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Wait - next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); - if (delay > 0) - Delay_usec(delay); - else if (delay < -VIDEO_REFRESH_DELAY) - next = GetTicks_usec(); - ticks++; - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - thread_stop_ack = true; - continue; - } - - // Process pending events and update display - do_video_refresh(); - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return 0; -} -#endif - - -/* - * Record dirty area from NQD - */ - -#ifdef SHEEPSHAVER -void video_set_dirty_area(int x, int y, int w, int h) -{ -#ifdef ENABLE_VOSF - const VIDEO_MODE &mode = drv->mode; - const unsigned screen_width = VIDEO_MODE_X; - const unsigned screen_height = VIDEO_MODE_Y; - const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; - - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} -#endif - -#endif // ends: SDL version check diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index 0771f5671..f521d5e93 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -163,23 +163,28 @@ const uint32 SIG_STACK_SIZE = 0x10000; // Size of signal stack // Global variables (exported) +int64 CPUClockSpeed; // Processor clock speed (Hz) +int64 BusClockSpeed; // Bus clock speed (Hz) +int64 TimebaseSpeed; // Timebase clock speed (Hz) #if !EMULATED_PPC void *TOC = NULL; // Pointer to Thread Local Storage (r2) void *R13 = NULL; // Pointer to .sdata section (r13 under Linux) #endif + +// RAM and ROM +uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) +uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) +uint8 *MacFrameBaseHost=NULL; // Mac VRAM uint32 RAMBase; // Base address of Mac RAM uint32 RAMSize; // Size of Mac RAM uint32 ROMBase; // Base address of Mac ROM +uint32 ROMEnd; +uint32 VRAMSize; + uint32 KernelDataAddr; // Address of Kernel Data uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM uint32 DRCacheAddr; // Address of DR Cache uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) -uint32 ROMEnd; #if defined(__APPLE__) && defined(__x86_64__) uint8 gZeroPage[0x3000], gKernelData[0x2000]; @@ -319,27 +324,22 @@ int atomic_or(int *var, int v) } #endif - /* * Memory management helpers */ -static inline uint8 *vm_mac_acquire(uint32 size) -{ - return (uint8 *)vm_acquire(size); +static inline uint8 *vm_mac_acquire(uint32 size){ + return (uint8 *)vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); } -static inline int vm_mac_acquire_fixed(uint32 addr, uint32 size) -{ +static inline int vm_mac_acquire_fixed(uint32 addr, uint32 size){ return vm_acquire_fixed(Mac2HostAddr(addr), size); } -static inline int vm_mac_release(uint32 addr, uint32 size) -{ +static inline int vm_mac_release(uint32 addr, uint32 size){ return vm_release(Mac2HostAddr(addr), size); } - /* * Main program */ @@ -992,6 +992,16 @@ int main(int argc, char **argv){ goto quit; } + // allocate Mac framebuffer + VRAMSize = 16*1024*1024; // 16mb, more than enough for 1920x1440x32 + MacFrameBaseHost = vm_mac_acquire(VRAMSize); + if (MacFrameBaseHost == VM_MAP_FAILED) { + MacFrameBaseHost = NULL; + sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno)); + ErrorAlert(str); + goto quit; + } + // Create area for SheepShaver data if (!SheepMem::Init()) { sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno)); @@ -1137,6 +1147,10 @@ static void Quit(void) if (lm_area_mapped) vm_mac_release(0, 0x3000); + if(MacFrameBaseHost){ + vm_mac_release(Host2MacAddr(MacFrameBaseHost),VRAMSize); + } + // Close /dev/zero if (zero_fd > 0) close(zero_fd); diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index 0683c4711..febc22184 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -64,22 +64,26 @@ const uint32 SIG_STACK_SIZE = 0x10000; // Size of signal stack // Global variables (exported) -uint32 RAMBase; // Base address of Mac RAM +int64 CPUClockSpeed; // Processor clock speed (Hz) +int64 BusClockSpeed; // Bus clock speed (Hz) +int64 TimebaseSpeed; // Timebase clock speed (Hz) + +// RAM and ROM +uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) +uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) +uint8 *MacFrameBaseHost=NULL; // Mac VRAM +uint32 RAMBase=0; // Base address of Mac RAM uint32 RAMSize; // Size of Mac RAM uint32 ROMBase; // Base address of Mac ROM +uint32 VRAMSize; + uint32 KernelDataAddr; // Address of Kernel Data uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM uint32 DRCacheAddr; // Address of DR Cache uint32 PVR; // Theoretical PVR -int64 CPUClockSpeed; // Processor clock speed (Hz) -int64 BusClockSpeed; // Bus clock speed (Hz) -int64 TimebaseSpeed; // Timebase clock speed (Hz) -uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) -uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) DWORD win_os; // Windows OS id DWORD win_os_major; // Windows OS version major - // Global variables static int kernel_area = -1; // SHM ID of Kernel Data area static bool rom_area_mapped = false; // Flag: Mac ROM mmap()ped @@ -119,38 +123,31 @@ extern void init_emul_ppc(void); extern void exit_emul_ppc(void); sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip); - /* * Return signal stack base */ -uintptr SignalStackBase(void) -{ +uintptr SignalStackBase(void){ return sig_stack + SIG_STACK_SIZE; } - /* * Memory management helpers */ -static inline int vm_mac_acquire(uint32 addr, uint32 size) -{ +static inline int vm_mac_acquire(uint32 addr, uint32 size){ return vm_acquire_fixed(Mac2HostAddr(addr), size); } -static inline int vm_mac_release(uint32 addr, uint32 size) -{ +static inline int vm_mac_release(uint32 addr, uint32 size){ return vm_release(Mac2HostAddr(addr), size); } - /* * Main program */ -static void usage(const char *prg_name) -{ +static void usage(const char *prg_name){ printf("Usage: %s [OPTION...]\n", prg_name); printf("\nUnix options:\n"); printf(" --display STRING\n X display to use\n"); @@ -158,8 +155,7 @@ static void usage(const char *prg_name) exit(0); } -int main(int argc, char **argv) -{ +int main(int argc, char **argv){ char str[256]; int16 i16; HANDLE rom_fh; @@ -168,9 +164,6 @@ int main(int argc, char **argv) DWORD actual; uint8 *rom_tmp; - // Initialize variables - RAMBase = 0; - // Print some info printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); printf(" %s\n", GetString(STR_ABOUT_TEXT2)); @@ -294,14 +287,16 @@ int main(int argc, char **argv) goto quit; } - // Create area for Mac ROM - if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) { + // Create area for Mac ROM + VRAM + VRAMSize = 16*1024*1024; // 16mb, more than enough for 1920x1440x32 + if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE + VRAMSize) < 0) { sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno)); ErrorAlert(str); goto quit; } ROMBase = ROM_BASE; ROMBaseHost = Mac2HostAddr(ROMBase); + MacFrameBaseHost = Mac2HostAddr(ROMBase + ROM_AREA_SIZE); rom_area_mapped = true; D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROMBase)); @@ -314,7 +309,6 @@ int main(int argc, char **argv) WarningAlert(GetString(STR_SMALL_RAM_WARN)); RAMSize = 16 * 1024 * 1024; } - RAMBase = 0; if (vm_mac_acquire(RAMBase, RAMSize) < 0) { sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno)); ErrorAlert(str); @@ -362,7 +356,7 @@ int main(int argc, char **argv) } } delete[] rom_tmp; - + // Initialize native timers timer_init(); @@ -398,13 +392,11 @@ int main(int argc, char **argv) return 0; } - /* * Cleanup and quit */ -static void Quit(void) -{ +static void Quit(void){ // Exit PowerPC emulation exit_emul_ppc(); diff --git a/SheepShaver/src/include/cpu_emulation.h b/SheepShaver/src/include/cpu_emulation.h index aa4b7a701..d80f67aab 100644 --- a/SheepShaver/src/include/cpu_emulation.h +++ b/SheepShaver/src/include/cpu_emulation.h @@ -57,6 +57,8 @@ extern uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) extern uint32 ROMBase; // Base address of Mac ROM extern uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) +extern uint32 VRAMSize; // Size of VRAM + // Mac memory access functions #if EMULATED_PPC #include "cpu/vm.hpp" From 958f283daa2c2ab4ef731ec408637c65a02f8f94 Mon Sep 17 00:00:00 2001 From: Seg Date: Thu, 17 Jun 2021 16:29:49 -0700 Subject: [PATCH 527/534] Remove (broken) SDL1 --- .../BasiliskII.xcodeproj/project.pbxproj | 4 - BasiliskII/src/SDL/video_sdl.cpp | 2341 ----------------- BasiliskII/src/Unix/configure.ac | 61 +- BasiliskII/src/Windows/BasiliskII.vcxproj | 3 +- BasiliskII/src/Windows/Makefile.in | 2 +- SheepShaver/src/Unix/configure.ac | 71 +- SheepShaver/src/Windows/Makefile.in | 2 +- 7 files changed, 27 insertions(+), 2457 deletions(-) delete mode 100644 BasiliskII/src/SDL/video_sdl.cpp diff --git a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj index 6c450db11..a52057595 100644 --- a/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj +++ b/BasiliskII/src/MacOSX/BasiliskII.xcodeproj/project.pbxproj @@ -55,7 +55,6 @@ 756C1B391F25306A00620917 /* AppKit.framework in Frameworks */ = {isa = PBXBuildFile; fileRef = 756C1B381F25306A00620917 /* AppKit.framework */; }; 757A2BF01F5AF9D6003EDB01 /* user_strings_unix.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */; }; 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */; }; - 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 75CBCF761F5DB65E00830063 /* video_sdl.cpp */; }; E40CEEC620D7910E00BCB88D /* SDLMain.m in Sources */ = {isa = PBXBuildFile; fileRef = E40CEEC520D7910E00BCB88D /* SDLMain.m */; }; E413D92120D260BC00E437D8 /* tftp.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F820D260B900E437D8 /* tftp.c */; }; E413D92220D260BC00E437D8 /* mbuf.c in Sources */ = {isa = PBXBuildFile; fileRef = E413D8F920D260B900E437D8 /* mbuf.c */; }; @@ -262,7 +261,6 @@ 756C1B381F25306A00620917 /* AppKit.framework */ = {isa = PBXFileReference; lastKnownFileType = wrapper.framework; name = AppKit.framework; path = System/Library/Frameworks/AppKit.framework; sourceTree = SDKROOT; }; 757A2BEF1F5AF9D6003EDB01 /* user_strings_unix.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = user_strings_unix.cpp; sourceTree = ""; }; 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl2.cpp; sourceTree = ""; }; - 75CBCF761F5DB65E00830063 /* video_sdl.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = video_sdl.cpp; sourceTree = ""; }; E40CEEC420D7910D00BCB88D /* SDLMain.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = SDLMain.h; sourceTree = ""; }; E40CEEC520D7910E00BCB88D /* SDLMain.m */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.objc; path = SDLMain.m; sourceTree = ""; }; E413D8F820D260B900E437D8 /* tftp.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.c; path = tftp.c; sourceTree = ""; }; @@ -523,7 +521,6 @@ 752F27001F242BAF001032B4 /* prefs_sdl.cpp */, E40CEEC420D7910D00BCB88D /* SDLMain.h */, E40CEEC520D7910E00BCB88D /* SDLMain.m */, - 75CBCF761F5DB65E00830063 /* video_sdl.cpp */, 75CBCF741F5DB3AD00830063 /* video_sdl2.cpp */, 752F27021F242F51001032B4 /* xpram_sdl.cpp */, ); @@ -799,7 +796,6 @@ 7539E1721F23B25A006B2DF2 /* rsrc_patches.cpp in Sources */, 5D5C3B0A24B2DF3500CDAB41 /* bincue.cpp in Sources */, 7539E2931F23C56F006B2DF2 /* serial_dummy.cpp in Sources */, - 75CBCF771F5DB65E00830063 /* video_sdl.cpp in Sources */, 7539E2801F23C4CA006B2DF2 /* main_unix.cpp in Sources */, 7539E1E11F23B25A006B2DF2 /* user_strings.cpp in Sources */, 75CBCF751F5DB3AD00830063 /* video_sdl2.cpp in Sources */, diff --git a/BasiliskII/src/SDL/video_sdl.cpp b/BasiliskII/src/SDL/video_sdl.cpp deleted file mode 100644 index 3161c6dc1..000000000 --- a/BasiliskII/src/SDL/video_sdl.cpp +++ /dev/null @@ -1,2341 +0,0 @@ -/* - * video_sdl.cpp - Video/graphics emulation, SDL 1.x specific stuff - * - * Basilisk II (C) 1997-2008 Christian Bauer - * - * 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 - */ - -/* - * NOTES: - * The Ctrl key works like a qualifier for special actions: - * Ctrl-Tab = suspend DGA mode (TODO) - * Ctrl-Esc = emergency quit - * Ctrl-F1 = mount floppy - * Ctrl-F5 = grab mouse (in windowed mode) - * - * FIXMEs and TODOs: - * - Windows requires an extra mouse event to update the actual cursor image? - * - Ctr-Tab for suspend/resume but how? SDL does not support that for non-Linux - * - Ctrl-Fn doesn't generate SDL_KEYDOWN events (SDL bug?) - * - Mouse acceleration, there is no API in SDL yet for that - * - Force relative mode in Grab mode even if SDL provides absolute coordinates? - * - Gamma tables support is likely to be broken here - * - Events processing is bound to the general emulation thread as SDL requires - * to PumpEvents() within the same thread as the one that called SetVideoMode(). - * Besides, there can't seem to be a way to call SetVideoMode() from a child thread. - * - Backport hw cursor acceleration to Basilisk II? - * - Factor out code - */ - -#include "sysdeps.h" - -#include -#if (SDL_COMPILEDVERSION < SDL_VERSIONNUM(2, 0, 0)) - -#include -#include -#include -#include - -#ifdef WIN32 -#include /* alloca() */ -#endif - -#include "cpu_emulation.h" -#include "main.h" -#include "adb.h" -#include "macos_util.h" -#include "prefs.h" -#include "user_strings.h" -#include "video.h" -#include "video_defs.h" -#include "video_blit.h" -#include "vm_alloc.h" - -#define DEBUG 0 -#include "debug.h" - -// Supported video modes -using std::vector; -static vector VideoModes; - -// Display types -#ifdef SHEEPSHAVER -enum { - DISPLAY_WINDOW = DIS_WINDOW, // windowed display - DISPLAY_SCREEN = DIS_SCREEN // fullscreen display -}; -extern int display_type; // See enum above -#else -enum { - DISPLAY_WINDOW, // windowed display - DISPLAY_SCREEN // fullscreen display -}; -static int display_type = DISPLAY_WINDOW; // See enum above -#endif - -// Constants -#if defined(WIN32) || __MACOSX__ -const char KEYCODE_FILE_NAME[] = "BasiliskII_keycodes"; -#else -const char KEYCODE_FILE_NAME[] = DATADIR "/keycodes"; -#endif - - -// Global variables -static uint32 frame_skip; // Prefs items -static int16 mouse_wheel_mode; -static int16 mouse_wheel_lines; - -#error merge changes from SDL2 -static uint8 *the_buffer = NULL; // Mac frame buffer (where MacOS draws into) -static uint8 *the_buffer_copy = NULL; // Copy of Mac frame buffer (for refreshed modes) -static uint32 the_buffer_size; // Size of allocated the_buffer - -static bool redraw_thread_active = false; // Flag: Redraw thread installed -#ifndef USE_CPU_EMUL_SERVICES -static volatile bool redraw_thread_cancel; // Flag: Cancel Redraw thread -static SDL_Thread *redraw_thread = NULL; // Redraw thread -static volatile bool thread_stop_req = false; -static volatile bool thread_stop_ack = false; // Acknowledge for thread_stop_req -#endif - -#ifdef ENABLE_VOSF -static bool use_vosf = false; // Flag: VOSF enabled -#else -static const bool use_vosf = false; // VOSF not possible -#endif - -static bool ctrl_down = false; // Flag: Ctrl key pressed -static bool caps_on = false; // Flag: Caps Lock on -static bool quit_full_screen = false; // Flag: DGA close requested from redraw thread -static bool emerg_quit = false; // Flag: Ctrl-Esc pressed, emergency quit requested from MacOS thread -static bool emul_suspended = false; // Flag: Emulator suspended - -static bool classic_mode = false; // Flag: Classic Mac video mode - -static bool use_keycodes = false; // Flag: Use keycodes rather than keysyms -static int keycode_table[256]; // X keycode -> Mac keycode translation table - -// SDL variables -static int screen_depth; // Depth of current screen -static SDL_Cursor *sdl_cursor; // Copy of Mac cursor -static SDL_Color sdl_palette[256]; // Color palette to be used as CLUT and gamma table -static bool sdl_palette_changed = false; // Flag: Palette changed, redraw thread must set new colors -static bool toggle_fullscreen = false; -static const int sdl_eventmask = SDL_MOUSEEVENTMASK | SDL_KEYEVENTMASK | SDL_VIDEOEXPOSEMASK | SDL_QUITMASK | SDL_ACTIVEEVENTMASK; - -static bool mouse_grabbed = false; -static bool mouse_grabbed_window_name_status = false; - -// Mutex to protect SDL events -static SDL_mutex *sdl_events_lock = NULL; -#define LOCK_EVENTS SDL_LockMutex(sdl_events_lock) -#define UNLOCK_EVENTS SDL_UnlockMutex(sdl_events_lock) - -// Mutex to protect palette -static SDL_mutex *sdl_palette_lock = NULL; -#define LOCK_PALETTE SDL_LockMutex(sdl_palette_lock) -#define UNLOCK_PALETTE SDL_UnlockMutex(sdl_palette_lock) - -// Mutex to protect frame buffer -static SDL_mutex *frame_buffer_lock = NULL; -#define LOCK_FRAME_BUFFER SDL_LockMutex(frame_buffer_lock) -#define UNLOCK_FRAME_BUFFER SDL_UnlockMutex(frame_buffer_lock) - -// Previously set gamma tables -static uint16 last_gamma_red[256]; -static uint16 last_gamma_green[256]; -static uint16 last_gamma_blue[256]; - -// Video refresh function -static void VideoRefreshInit(void); -static void (*video_refresh)(void); - - -// Prototypes -static int redraw_func(void *arg); - -// From sys_unix.cpp -extern void SysMountFirstFloppy(void); - - -/* - * SDL surface locking glue - */ - -#ifdef ENABLE_VOSF -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) do { \ - if ((SURFACE)->flags & (SDL_HWSURFACE | SDL_FULLSCREEN)) \ - the_host_buffer = (uint8 *)(SURFACE)->pixels; \ -} while (0) -#else -#define SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE) -#endif - -#define SDL_VIDEO_LOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) { \ - SDL_LockSurface(SURFACE); \ - SDL_VIDEO_LOCK_VOSF_SURFACE(SURFACE); \ - } \ -} while (0) - -#define SDL_VIDEO_UNLOCK_SURFACE(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_UnlockSurface(SURFACE); \ -} while (0) - - -/* - * Framebuffer allocation routines - */ - -static void *vm_acquire_framebuffer(uint32 size) -{ - // always try to reallocate framebuffer at the same address - static void *fb = VM_MAP_FAILED; - if (fb != VM_MAP_FAILED) { - if (vm_acquire_fixed(fb, size) < 0) { -#ifndef SHEEPSHAVER - printf("FATAL: Could not reallocate framebuffer at previous address\n"); -#endif - fb = VM_MAP_FAILED; - } - } - if (fb == VM_MAP_FAILED) - fb = vm_acquire(size, VM_MAP_DEFAULT | VM_MAP_32BIT); - return fb; -} - -static inline void vm_release_framebuffer(void *fb, uint32 size) -{ - vm_release(fb, size); -} - -static inline int get_customized_color_depth(int default_depth) -{ - int display_color_depth = PrefsFindInt32("displaycolordepth"); - - D(bug("Get displaycolordepth %d\n", display_color_depth)); - - if(0 == display_color_depth) - return default_depth; - else{ - switch (display_color_depth) { - case 8: - return VIDEO_DEPTH_8BIT; - case 15: case 16: - return VIDEO_DEPTH_16BIT; - case 24: case 32: - return VIDEO_DEPTH_32BIT; - default: - return default_depth; - } - } -} - -/* - * Windows message handler - */ - -#ifdef WIN32 -#include -static WNDPROC sdl_window_proc = NULL; // Window proc used by SDL - -extern void SysMediaArrived(void); -extern void SysMediaRemoved(void); -extern HWND GetMainWindowHandle(void); - -static LRESULT CALLBACK windows_message_handler(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) -{ - switch (msg) { - case WM_DEVICECHANGE: - if (wParam == DBT_DEVICEREMOVECOMPLETE) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaRemoved(); - } - else if (wParam == DBT_DEVICEARRIVAL) { - DEV_BROADCAST_HDR *p = (DEV_BROADCAST_HDR *)lParam; - if (p->dbch_devicetype == DBT_DEVTYP_VOLUME) - SysMediaArrived(); - } - return 0; - - default: - if (sdl_window_proc) - return CallWindowProc(sdl_window_proc, hwnd, msg, wParam, lParam); - } - - return DefWindowProc(hwnd, msg, wParam, lParam); -} -#endif - - -/* - * SheepShaver glue - */ - -#ifdef SHEEPSHAVER -// Color depth modes type -typedef int video_depth; - -// 1, 2, 4 and 8 bit depths use a color palette -static inline bool IsDirectMode(VIDEO_MODE const & mode) -{ - return IsDirectMode(mode.viAppleMode); -} - -// Abstract base class representing one (possibly virtual) monitor -// ("monitor" = rectangular display with a contiguous frame buffer) -class monitor_desc { -public: - monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) {} - virtual ~monitor_desc() {} - - // Get current Mac frame buffer base address - uint32 get_mac_frame_base(void) const {return screen_base;} - - // Set Mac frame buffer base address (called from switch_to_mode()) - void set_mac_frame_base(uint32 base) {screen_base = base;} - - // Get current video mode - const VIDEO_MODE &get_current_mode(void) const {return VModes[cur_mode];} - - // Called by the video driver to switch the video mode on this display - // (must call set_mac_frame_base()) - virtual void switch_to_current_mode(void) = 0; - - // Called by the video driver to set the color palette (in indexed modes) - // or the gamma table (in direct modes) - virtual void set_palette(uint8 *pal, int num) = 0; -}; - -// Vector of pointers to available monitor descriptions, filled by VideoInit() -static vector VideoMonitors; - -// Find Apple mode matching best specified dimensions -static int find_apple_resolution(int xsize, int ysize) -{ - if (xsize == 640 && ysize == 480) - return APPLE_640x480; - if (xsize == 800 && ysize == 600) - return APPLE_800x600; - if (xsize == 1024 && ysize == 768) - return APPLE_1024x768; - if (xsize == 1152 && ysize == 768) - return APPLE_1152x768; - if (xsize == 1152 && ysize == 900) - return APPLE_1152x900; - if (xsize == 1280 && ysize == 1024) - return APPLE_1280x1024; - if (xsize == 1600 && ysize == 1200) - return APPLE_1600x1200; - return APPLE_CUSTOM; -} - -// Display error alert -static void ErrorAlert(int error) -{ - ErrorAlert(GetString(error)); -} -#endif - - -/* - * monitor_desc subclass for SDL display - */ - -class SDL_monitor_desc : public monitor_desc { -public: - SDL_monitor_desc(const vector &available_modes, video_depth default_depth, uint32 default_id) : monitor_desc(available_modes, default_depth, default_id) {} - ~SDL_monitor_desc() {} - - virtual void switch_to_current_mode(void); - virtual void set_palette(uint8 *pal, int num); - - bool video_open(void); - void video_close(void); -}; - - -/* - * Utility functions - */ - -// Find palette size for given color depth -static int palette_size(int mode) -{ - switch (mode) { - case VIDEO_DEPTH_1BIT: return 2; - case VIDEO_DEPTH_2BIT: return 4; - case VIDEO_DEPTH_4BIT: return 16; - case VIDEO_DEPTH_8BIT: return 256; - case VIDEO_DEPTH_16BIT: return 32; - case VIDEO_DEPTH_32BIT: return 256; - default: return 0; - } -} - -// Map video_mode depth ID to numerical depth value -static int mac_depth_of_video_depth(int video_depth) -{ - int depth = -1; - switch (video_depth) { - case VIDEO_DEPTH_1BIT: - depth = 1; - break; - case VIDEO_DEPTH_2BIT: - depth = 2; - break; - case VIDEO_DEPTH_4BIT: - depth = 4; - break; - case VIDEO_DEPTH_8BIT: - depth = 8; - break; - case VIDEO_DEPTH_16BIT: - depth = 16; - break; - case VIDEO_DEPTH_32BIT: - depth = 32; - break; - default: - abort(); - } - return depth; -} - -// Map video_mode depth ID to SDL screen depth -static int sdl_depth_of_video_depth(int video_depth) -{ - return (video_depth <= VIDEO_DEPTH_8BIT) ? 8 : mac_depth_of_video_depth(video_depth); -} - -// Get screen dimensions -static void sdl_display_dimensions(int &width, int &height) -{ - static int max_width, max_height; - if (max_width == 0 && max_height == 0) { - max_width = 640 ; max_height = 480; - SDL_Rect **modes = SDL_ListModes(NULL, SDL_FULLSCREEN | SDL_HWSURFACE); - if (modes && modes != (SDL_Rect **)-1) { - // It turns out that on some implementations, and contrary to the documentation, - // the returned list is not sorted from largest to smallest (e.g. Windows) - for (int i = 0; modes[i] != NULL; i++) { - const int w = modes[i]->w; - const int h = modes[i]->h; - if (w > max_width && h > max_height) { - max_width = w; - max_height = h; - } - } - } - } - width = max_width; - height = max_height; -} - -static inline int sdl_display_width(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return width; -} - -static inline int sdl_display_height(void) -{ - int width, height; - sdl_display_dimensions(width, height); - return height; -} - -// Check whether specified mode is available -static bool has_mode(int type, int width, int height, int depth) -{ - // Filter out out-of-bounds resolutions - if (width > sdl_display_width() || height > sdl_display_height()) - return false; - - // Rely on SDL capabilities - return SDL_VideoModeOK(width, height, - sdl_depth_of_video_depth(depth), - SDL_HWSURFACE | (type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0)) != 0; -} - -// Add mode to list of supported modes -static void add_mode(int type, int width, int height, int resolution_id, int bytes_per_row, int depth) -{ - // Filter out unsupported modes - if (!has_mode(type, width, height, depth)) - return; - - // Fill in VideoMode entry - VIDEO_MODE mode; -#ifdef SHEEPSHAVER - resolution_id = find_apple_resolution(width, height); - mode.viType = type; -#endif - VIDEO_MODE_X = width; - VIDEO_MODE_Y = height; - VIDEO_MODE_RESOLUTION = resolution_id; - VIDEO_MODE_ROW_BYTES = bytes_per_row; - VIDEO_MODE_DEPTH = (video_depth)depth; - VideoModes.push_back(mode); -} - -// Set Mac frame layout and base address (uses the_buffer/MacFrameBaseMac) -static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth) -{ -#if !REAL_ADDRESSING && !DIRECT_ADDRESSING - int layout = FLAYOUT_DIRECT; - if (depth == VIDEO_DEPTH_16BIT) - layout = (screen_depth == 15) ? FLAYOUT_HOST_555 : FLAYOUT_HOST_565; - else if (depth == VIDEO_DEPTH_32BIT) - layout = (screen_depth == 24) ? FLAYOUT_HOST_888 : FLAYOUT_DIRECT; - MacFrameLayout = layout; - monitor.set_mac_frame_base(MacFrameBaseMac); - - // Set variables used by UAE memory banking - const VIDEO_MODE &mode = monitor.get_current_mode(); - MacFrameBaseHost = the_buffer; - MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - InitFrameBufferMapping(); -#else - monitor.set_mac_frame_base(Host2MacAddr(the_buffer)); -#endif - D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); -} - -// Set window name and class -static void set_window_name(int name) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - if (vi && vi->wm_available) { - const char *str = GetString(name); - SDL_WM_SetCaption(str, str); - } -} - -// Set mouse grab mode -static SDL_GrabMode set_grab_mode(SDL_GrabMode mode) -{ - const SDL_VideoInfo *vi = SDL_GetVideoInfo(); - return (vi && vi->wm_available ? SDL_WM_GrabInput(mode) : SDL_GRAB_OFF); -} - -// Migrate preferences items (XXX to be handled in MigratePrefs()) -static void migrate_screen_prefs(void) -{ -#ifdef SHEEPSHAVER - // Look-up priorities are: "screen", "screenmodes", "windowmodes". - if (PrefsFindString("screen")) - return; - - uint32 window_modes = PrefsFindInt32("windowmodes"); - uint32 screen_modes = PrefsFindInt32("screenmodes"); - int width = 0, height = 0; - if (screen_modes) { - static const struct { - int id; - int width; - int height; - } - modes[] = { - { 1, 640, 480 }, - { 2, 800, 600 }, - { 4, 1024, 768 }, - { 64, 1152, 768 }, - { 8, 1152, 900 }, - { 16, 1280, 1024 }, - { 32, 1600, 1200 }, - { 0, } - }; - for (int i = 0; modes[i].id != 0; i++) { - if (screen_modes & modes[i].id) { - if (width < modes[i].width && height < modes[i].height) { - width = modes[i].width; - height = modes[i].height; - } - } - } - } else { - if (window_modes & 1) - width = 640, height = 480; - if (window_modes & 2) - width = 800, height = 600; - } - if (width && height) { - char str[32]; - sprintf(str, "%s/%d/%d", screen_modes ? "dga" : "win", width, height); - PrefsReplaceString("screen", str); - } -#endif -} - -void update_sdl_video(SDL_Surface *screen, Sint32 x, Sint32 y, Sint32 w, Sint32 h) -{ - SDL_UpdateRect(screen, x, y, w, h); -} - -void update_sdl_video(SDL_Surface *screen, int numrects, SDL_Rect *rects) -{ - SDL_UpdateRects(screen, numrects, rects); -} - - -/* - * Display "driver" classes - */ - -class driver_base { -public: - driver_base(SDL_monitor_desc &m); - ~driver_base(); - - void init(); // One-time init - void set_video_mode(int flags); - void adapt_to_video_mode(); - - void update_palette(void); - void suspend(void) {} - void resume(void) {} - void toggle_mouse_grab(void); - void mouse_moved(int x, int y) { ADBMouseMoved(x, y); } - - void disable_mouse_accel(void); - void restore_mouse_accel(void); - - void grab_mouse(void); - void ungrab_mouse(void); - -public: - SDL_monitor_desc &monitor; // Associated video monitor - const VIDEO_MODE &mode; // Video mode handled by the driver - - bool init_ok; // Initialization succeeded (we can't use exceptions because of -fomit-frame-pointer) - SDL_Surface *s; // The surface we draw into -}; - -#ifdef ENABLE_VOSF -static void update_display_window_vosf(driver_base *drv); -#endif -static void update_display_static(driver_base *drv); - -static driver_base *drv = NULL; // Pointer to currently used driver object - -#ifdef ENABLE_VOSF -# include "video_vosf.h" -#endif - -driver_base::driver_base(SDL_monitor_desc &m) - : monitor(m), mode(m.get_current_mode()), init_ok(false), s(NULL) -{ - the_buffer = NULL; - the_buffer_copy = NULL; -} - -void driver_base::set_video_mode(int flags) -{ - int depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - if ((s = SDL_SetVideoMode(VIDEO_MODE_X, VIDEO_MODE_Y, depth, - SDL_HWSURFACE | flags)) == NULL) - return; -#ifdef ENABLE_VOSF - the_host_buffer = (uint8 *)s->pixels; -#endif -} - -void driver_base::init() -{ - set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - int aligned_height = (VIDEO_MODE_Y + 15) & ~15; - -#ifdef ENABLE_VOSF - use_vosf = true; - // Allocate memory for frame buffer (SIZE is extended to page-boundary) - the_buffer_size = page_extend((aligned_height + 2) * s->pitch); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - the_buffer_copy = (uint8 *)malloc(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p, the_host_buffer = %p\n", the_buffer, the_buffer_copy, the_host_buffer)); - - // Check whether we can initialize the VOSF subsystem and it's profitable - if (!video_vosf_init(monitor)) { - WarningAlert(GetString(STR_VOSF_INIT_ERR)); - use_vosf = false; - } - else if (!video_vosf_profitable()) { - video_vosf_exit(); - printf("VOSF acceleration is not profitable on this platform, disabling it\n"); - use_vosf = false; - } - if (!use_vosf) { - free(the_buffer_copy); - vm_release(the_buffer, the_buffer_size); - the_host_buffer = NULL; - } -#endif - if (!use_vosf) { - // Allocate memory for frame buffer - the_buffer_size = (aligned_height + 2) * s->pitch; - the_buffer_copy = (uint8 *)calloc(1, the_buffer_size); - the_buffer = (uint8 *)vm_acquire_framebuffer(the_buffer_size); - D(bug("the_buffer = %p, the_buffer_copy = %p\n", the_buffer, the_buffer_copy)); - } - - // Set frame buffer base - set_mac_frame_buffer(monitor, VIDEO_MODE_DEPTH); - - adapt_to_video_mode(); -} - -void driver_base::adapt_to_video_mode() { - ADBSetRelMouseMode(false); - - // Init blitting routines - SDL_PixelFormat *f = s->format; - VisualFormat visualFormat; - visualFormat.depth = sdl_depth_of_video_depth(VIDEO_MODE_DEPTH); - visualFormat.Rmask = f->Rmask; - visualFormat.Gmask = f->Gmask; - visualFormat.Bmask = f->Bmask; - Screen_blitter_init(visualFormat, true, mac_depth_of_video_depth(VIDEO_MODE_DEPTH)); - - // Load gray ramp to 8->16/32 expand map - if (!IsDirectMode(mode)) - for (int i=0; i<256; i++) - ExpandMap[i] = SDL_MapRGB(f, i, i, i); - - - bool hardware_cursor = false; -#ifdef SHEEPSHAVER - hardware_cursor = video_can_change_cursor(); - if (hardware_cursor) { - // Create cursor - if ((sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, 0, 0)) != NULL) { - SDL_SetCursor(sdl_cursor); - } - } - // Tell the video driver there's a change in cursor type - if (private_data) - private_data->cursorHardware = hardware_cursor; -#endif - // Hide cursor - SDL_ShowCursor(hardware_cursor); - - // Set window name/class - set_window_name(STR_WINDOW_TITLE); - - // Everything went well - init_ok = true; -} - -driver_base::~driver_base() -{ - ungrab_mouse(); - restore_mouse_accel(); - - if (s) - SDL_FreeSurface(s); - - // the_buffer shall always be mapped through vm_acquire_framebuffer() - if (the_buffer != VM_MAP_FAILED) { - D(bug(" releasing the_buffer at %p (%d bytes)\n", the_buffer, the_buffer_size)); - vm_release_framebuffer(the_buffer, the_buffer_size); - the_buffer = NULL; - } - - // Free frame buffer(s) - if (!use_vosf) { - if (the_buffer_copy) { - free(the_buffer_copy); - the_buffer_copy = NULL; - } - } -#ifdef ENABLE_VOSF - else { - if (the_buffer_copy) { - D(bug(" freeing the_buffer_copy at %p\n", the_buffer_copy)); - free(the_buffer_copy); - the_buffer_copy = NULL; - } - - // Deinitialize VOSF - video_vosf_exit(); - } -#endif - - SDL_ShowCursor(1); -} - -// Palette has changed -void driver_base::update_palette(void) -{ - const VIDEO_MODE &mode = monitor.get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH <= VIDEO_DEPTH_8BIT) - SDL_SetPalette(s, SDL_PHYSPAL, sdl_palette, 0, 256); -} - -// Disable mouse acceleration -void driver_base::disable_mouse_accel(void) -{ -} - -// Restore mouse acceleration to original value -void driver_base::restore_mouse_accel(void) -{ -} - -// Toggle mouse grab -void driver_base::toggle_mouse_grab(void) -{ - if (mouse_grabbed) - ungrab_mouse(); - else - grab_mouse(); -} - -// Grab mouse, switch to relative mouse mode -void driver_base::grab_mouse(void) -{ - if (!mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_ON); - if (new_mode == SDL_GRAB_ON) { - disable_mouse_accel(); - mouse_grabbed = true; - } - } -} - -// Ungrab mouse, switch to absolute mouse mode -void driver_base::ungrab_mouse(void) -{ - if (mouse_grabbed) { - SDL_GrabMode new_mode = set_grab_mode(SDL_GRAB_OFF); - if (new_mode == SDL_GRAB_OFF) { - restore_mouse_accel(); - mouse_grabbed = false; - } - } -} - -/* - * Initialization - */ - -// Init keycode translation table -static void keycode_init(void) -{ - bool use_kc = PrefsFindBool("keycodes"); - if (use_kc) { - - // Get keycode file path from preferences - const char *kc_path = PrefsFindString("keycodefile"); - - // Open keycode table - FILE *f = fopen(kc_path ? kc_path : KEYCODE_FILE_NAME, "r"); - if (f == NULL) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_FILE_WARN), kc_path ? kc_path : KEYCODE_FILE_NAME, strerror(errno)); - WarningAlert(str); - return; - } - - // Default translation table - for (int i=0; i<256; i++) - keycode_table[i] = -1; - - // Search for server vendor string, then read keycodes - char video_driver[256]; - SDL_VideoDriverName(video_driver, sizeof(video_driver)); - bool video_driver_found = false; - char line[256]; - int n_keys = 0; - while (fgets(line, sizeof(line) - 1, f)) { - // Read line - int len = strlen(line); - if (len == 0) - continue; - line[len-1] = 0; - - // Comments begin with "#" or ";" - if (line[0] == '#' || line[0] == ';' || line[0] == 0) - continue; - - if (video_driver_found) { - // Skip aliases as long as we have read keycodes yet - // Otherwise, it's another mapping and we have to stop - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0 && n_keys == 0) - continue; - - // Read keycode - int x_code, mac_code; - if (sscanf(line, "%d %d", &x_code, &mac_code) == 2) - keycode_table[x_code & 0xff] = mac_code, n_keys++; - else - break; - } else { - // Search for SDL video driver string - static const char sdl_str[] = "sdl"; - if (strncmp(line, sdl_str, sizeof(sdl_str) - 1) == 0) { - char *p = line + sizeof(sdl_str); - if (strstr(video_driver, p) == video_driver) - video_driver_found = true; - } - } - } - - // Keycode file completely read - fclose(f); - use_keycodes = video_driver_found; - - // Vendor not found? Then display warning - if (!video_driver_found) { - char str[256]; - snprintf(str, sizeof(str), GetString(STR_KEYCODE_VENDOR_WARN), video_driver, kc_path ? kc_path : KEYCODE_FILE_NAME); - WarningAlert(str); - return; - } - - D(bug("Using SDL/%s keycodes table, %d key mappings\n", video_driver, n_keys)); - } -} - -// Open display for current mode -bool SDL_monitor_desc::video_open(void) -{ - D(bug("video_open()\n")); -#if DEBUG - const VIDEO_MODE &mode = get_current_mode(); - D(bug("Current video mode:\n")); - D(bug(" %dx%d (ID %02x), %d bpp\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << (VIDEO_MODE_DEPTH & 0x0f))); -#endif - - // Create display driver object of requested type - drv = new(std::nothrow) driver_base(*this); - if (drv == NULL) - return false; - drv->init(); - if (!drv->init_ok) { - delete drv; - drv = NULL; - return false; - } - -#ifdef WIN32 - // Chain in a new message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - sdl_window_proc = (WNDPROC)GetWindowLongPtr(the_window, GWLP_WNDPROC); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)windows_message_handler); -#endif - - // Initialize VideoRefresh function - VideoRefreshInit(); - - // Lock down frame buffer - LOCK_FRAME_BUFFER; - - // Start redraw/input thread -#ifndef USE_CPU_EMUL_SERVICES - redraw_thread_cancel = false; - redraw_thread_active = ((redraw_thread = SDL_CreateThread(redraw_func, NULL)) != NULL); - if (!redraw_thread_active) { - printf("FATAL: cannot create redraw thread\n"); - return false; - } -#else - redraw_thread_active = true; -#endif - return true; -} - -#ifdef SHEEPSHAVER -bool VideoInit(void) -{ - const bool classic = false; -#else -bool VideoInit(bool classic) -{ -#endif - classic_mode = classic; - -#ifdef ENABLE_VOSF - // Zero the mainBuffer structure - mainBuffer.dirtyPages = NULL; - mainBuffer.pageInfo = NULL; -#endif - - // Create Mutexes - if ((sdl_events_lock = SDL_CreateMutex()) == NULL) - return false; - if ((sdl_palette_lock = SDL_CreateMutex()) == NULL) - return false; - if ((frame_buffer_lock = SDL_CreateMutex()) == NULL) - return false; - - // Init keycode translation - keycode_init(); - - // Read prefs - frame_skip = PrefsFindInt32("frameskip"); - mouse_wheel_mode = PrefsFindInt32("mousewheelmode"); - mouse_wheel_lines = PrefsFindInt32("mousewheellines"); - - // Get screen mode from preferences - migrate_screen_prefs(); - const char *mode_str = NULL; - if (classic_mode) - mode_str = "win/512/342"; - else - mode_str = PrefsFindString("screen"); - - // Determine display type and default dimensions - int default_width, default_height; - if (classic) { - default_width = 512; - default_height = 384; - } - else { - default_width = 640; - default_height = 480; - } - display_type = DISPLAY_WINDOW; - if (mode_str) { - if (sscanf(mode_str, "win/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_WINDOW; - else if (sscanf(mode_str, "dga/%d/%d", &default_width, &default_height) == 2) - display_type = DISPLAY_SCREEN; - } - if (default_width <= 0) - default_width = sdl_display_width(); - else if (default_width > sdl_display_width()) - default_width = sdl_display_width(); - if (default_height <= 0) - default_height = sdl_display_height(); - else if (default_height > sdl_display_height()) - default_height = sdl_display_height(); - - // Mac screen depth follows X depth - screen_depth = SDL_GetVideoInfo()->vfmt->BitsPerPixel; - int default_depth; - switch (screen_depth) { - case 8: - default_depth = VIDEO_DEPTH_8BIT; - break; - case 15: case 16: - default_depth = VIDEO_DEPTH_16BIT; - break; - case 24: case 32: - default_depth = VIDEO_DEPTH_32BIT; - break; - default: - default_depth = VIDEO_DEPTH_1BIT; - break; - } - - // Initialize list of video modes to try - struct { - int w; - int h; - int resolution_id; - } -#ifdef SHEEPSHAVER - // Omit Classic resolutions - video_modes[] = { - { -1, -1, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#else - video_modes[] = { - { -1, -1, 0x80 }, - { 512, 384, 0x80 }, - { 640, 480, 0x81 }, - { 800, 600, 0x82 }, - { 1024, 768, 0x83 }, - { 1152, 870, 0x84 }, - { 1280, 1024, 0x85 }, - { 1600, 1200, 0x86 }, - { 0, } - }; -#endif - video_modes[0].w = default_width; - video_modes[0].h = default_height; - - // Construct list of supported modes - if (display_type == DISPLAY_WINDOW) { - if (classic) - add_mode(display_type, 512, 342, 0x80, 64, VIDEO_DEPTH_1BIT); - else { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - } else if (display_type == DISPLAY_SCREEN) { - for (int i = 0; video_modes[i].w != 0; i++) { - const int w = video_modes[i].w; - const int h = video_modes[i].h; - if (i > 0 && (w >= default_width || h >= default_height)) - continue; - if (w == 512 && h == 384) - continue; - for (int d = VIDEO_DEPTH_1BIT; d <= default_depth; d++) - add_mode(display_type, w, h, video_modes[i].resolution_id, TrivialBytesPerRow(w, (video_depth)d), d); - } - } - - if (VideoModes.empty()) { - ErrorAlert(STR_NO_XVISUAL_ERR); - return false; - } - - // Find requested default mode with specified dimensions - uint32 default_id; - std::vector::const_iterator i, end = VideoModes.end(); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - if (VIDEO_MODE_X == default_width && VIDEO_MODE_Y == default_height && VIDEO_MODE_DEPTH == default_depth) { - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - std::vector::const_iterator begin = VideoModes.begin(); - cur_mode = distance(begin, i); -#endif - break; - } - } - if (i == end) { // not found, use first available mode - const VIDEO_MODE & mode = VideoModes[0]; - default_depth = VIDEO_MODE_DEPTH; - default_id = VIDEO_MODE_RESOLUTION; -#ifdef SHEEPSHAVER - cur_mode = 0; -#endif - } - -#ifdef SHEEPSHAVER - for (int i = 0; i < VideoModes.size(); i++) - VModes[i] = VideoModes[i]; - VideoInfo *p = &VModes[VideoModes.size()]; - p->viType = DIS_INVALID; // End marker - p->viRowBytes = 0; - p->viXsize = p->viYsize = 0; - p->viAppleMode = 0; - p->viAppleID = 0; -#endif - -#if DEBUG - D(bug("Available video modes:\n")); - for (i = VideoModes.begin(); i != end; ++i) { - const VIDEO_MODE & mode = (*i); - int bits = 1 << VIDEO_MODE_DEPTH; - if (bits == 16) - bits = 15; - else if (bits == 32) - bits = 24; - D(bug(" %dx%d (ID %02x), %d colors\n", VIDEO_MODE_X, VIDEO_MODE_Y, VIDEO_MODE_RESOLUTION, 1 << bits)); - } -#endif - - int color_depth = get_customized_color_depth(default_depth); - - D(bug("Return get_customized_color_depth %d\n", color_depth)); - - // Create SDL_monitor_desc for this (the only) display - SDL_monitor_desc *monitor = new SDL_monitor_desc(VideoModes, (video_depth)color_depth, default_id); - VideoMonitors.push_back(monitor); - - // Open display - return monitor->video_open(); -} - - -/* - * Deinitialization - */ - -// Close display -void SDL_monitor_desc::video_close(void) -{ - D(bug("video_close()\n")); - -#ifdef WIN32 - // Remove message handler for WM_DEVICECHANGE - HWND the_window = GetMainWindowHandle(); - SetWindowLongPtr(the_window, GWLP_WNDPROC, (LONG_PTR)sdl_window_proc); -#endif - - // Stop redraw thread -#ifndef USE_CPU_EMUL_SERVICES - if (redraw_thread_active) { - redraw_thread_cancel = true; - SDL_WaitThread(redraw_thread, NULL); - } -#endif - redraw_thread_active = false; - - // Unlock frame buffer - UNLOCK_FRAME_BUFFER; - D(bug(" frame buffer unlocked\n")); - - // Close display - delete drv; - drv = NULL; -} - -void VideoExit(void) -{ - // Close displays - vector::iterator i, end = VideoMonitors.end(); - for (i = VideoMonitors.begin(); i != end; ++i) - dynamic_cast(*i)->video_close(); - - // Destroy locks - if (frame_buffer_lock) - SDL_DestroyMutex(frame_buffer_lock); - if (sdl_palette_lock) - SDL_DestroyMutex(sdl_palette_lock); - if (sdl_events_lock) - SDL_DestroyMutex(sdl_events_lock); -} - - -/* - * Close down full-screen mode (if bringing up error alerts is unsafe while in full-screen mode) - */ - -void VideoQuitFullScreen(void) -{ - D(bug("VideoQuitFullScreen()\n")); - quit_full_screen = true; -} - -static void do_toggle_fullscreen(void) -{ -#ifndef USE_CPU_EMUL_SERVICES - // pause redraw thread - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; -#endif - - // save the mouse position - int x, y; - SDL_GetMouseState(&x, &y); - - // save the screen contents - SDL_Surface *tmp_surface = SDL_ConvertSurface(drv->s, drv->s->format, - drv->s->flags); - - // switch modes - display_type = (display_type == DISPLAY_SCREEN) ? DISPLAY_WINDOW - : DISPLAY_SCREEN; - drv->set_video_mode(display_type == DISPLAY_SCREEN ? SDL_FULLSCREEN : 0); - drv->adapt_to_video_mode(); - - // reset the palette -#ifdef SHEEPSHAVER - video_set_palette(); -#endif - drv->update_palette(); - - // restore the screen contents - SDL_BlitSurface(tmp_surface, NULL, drv->s, NULL); - SDL_FreeSurface(tmp_surface); - SDL_UpdateRect(drv->s, 0, 0, 0, 0); - - // reset the video refresh handler - VideoRefreshInit(); - - // while SetVideoMode is happening, control key up may be missed - ADBKeyUp(0x36); - - // restore the mouse position - SDL_WarpMouse(x, y); - - // resume redraw thread - toggle_fullscreen = false; -#ifndef USE_CPU_EMUL_SERVICES - thread_stop_req = false; -#endif -} - -/* - * Mac VBL interrupt - */ - -/* - * Execute video VBL routine - */ - -#ifdef SHEEPSHAVER -void VideoVBL(void) -{ - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; - - // Execute video VBL - if (private_data != NULL && private_data->interruptsEnabled) - VSLDoInterruptService(private_data->vslServiceID); -} -#else -void VideoInterrupt(void) -{ - // We must fill in the events queue in the same thread that did call SDL_SetVideoMode() - SDL_PumpEvents(); - - // Emergency quit requested? Then quit - if (emerg_quit) - QuitEmulator(); - - if (toggle_fullscreen) - do_toggle_fullscreen(); - - // Setting the window name must happen on the main thread, else it doesn't work on - // some platforms - e.g. macOS Sierra. - if (mouse_grabbed_window_name_status != mouse_grabbed) { - set_window_name(mouse_grabbed ? STR_WINDOW_TITLE_GRABBED : STR_WINDOW_TITLE); - mouse_grabbed_window_name_status = mouse_grabbed; - } - - // Temporarily give up frame buffer lock (this is the point where - // we are suspended when the user presses Ctrl-Tab) - UNLOCK_FRAME_BUFFER; - LOCK_FRAME_BUFFER; -} -#endif - - -/* - * Set palette - */ - -#ifdef SHEEPSHAVER -void video_set_palette(void) -{ - monitor_desc * monitor = VideoMonitors[0]; - int n_colors = palette_size(monitor->get_current_mode().viAppleMode); - uint8 pal[256 * 3]; - for (int c = 0; c < n_colors; c++) { - pal[c*3 + 0] = mac_pal[c].red; - pal[c*3 + 1] = mac_pal[c].green; - pal[c*3 + 2] = mac_pal[c].blue; - } - monitor->set_palette(pal, n_colors); -} -#endif - -void SDL_monitor_desc::set_palette(uint8 *pal, int num_in) -{ - const VIDEO_MODE &mode = get_current_mode(); - - if ((int)VIDEO_MODE_DEPTH > VIDEO_DEPTH_8BIT) { - // handle the gamma ramp - - if (pal[0] == 127 && pal[num_in*3-1] == 127) // solid grey - return; // ignore - - uint16 red[256]; - uint16 green[256]; - uint16 blue[256]; - - int repeats = 256 / num_in; - - for (int i = 0; i < num_in; i++) { - for (int j = 0; j < repeats; j++) { - red[i*repeats + j] = pal[i*3 + 0] << 8; - green[i*repeats + j] = pal[i*3 + 1] << 8; - blue[i*repeats + j] = pal[i*3 + 2] << 8; - } - } - - // fill remaining entries (if any) with last value - for (int i = num_in * repeats; i < 256; i++) { - red[i] = pal[(num_in - 1) * 3] << 8; - green[i] = pal[(num_in - 1) * 3 + 1] << 8; - blue[i] = pal[(num_in - 1) * 3 + 2] << 8; - } - - bool changed = (memcmp(red, last_gamma_red, 512) != 0 || - memcmp(green, last_gamma_green, 512) != 0 || - memcmp(blue, last_gamma_blue, 512) != 0); - - if (changed) { - int result = SDL_SetGammaRamp(red, green, blue); - - if (result < 0) { - fprintf(stderr, "SDL_SetGammaRamp returned %d, SDL error: %s\n", result, SDL_GetError()); - } - - memcpy(last_gamma_red, red, 512); - memcpy(last_gamma_green, green, 512); - memcpy(last_gamma_blue, blue, 512); - } - - return; - } - - LOCK_PALETTE; - - // Convert colors to XColor array - int num_out = 256; - bool stretch = false; - SDL_Color *p = sdl_palette; - for (int i=0; ir = pal[c*3 + 0] * 0x0101; - p->g = pal[c*3 + 1] * 0x0101; - p->b = pal[c*3 + 2] * 0x0101; - p++; - } - - // Recalculate pixel color expansion map - if (!IsDirectMode(mode)) { - for (int i=0; i<256; i++) { - int c = i & (num_in-1); // If there are less than 256 colors, we repeat the first entries (this makes color expansion easier) - ExpandMap[i] = SDL_MapRGB(drv->s->format, pal[c*3+0], pal[c*3+1], pal[c*3+2]); - } - -#ifdef ENABLE_VOSF - if (use_vosf) { - // We have to redraw everything because the interpretation of pixel values changed - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - memset(the_buffer_copy, 0, VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y); - } -#endif - } - - // Tell redraw thread to change palette - sdl_palette_changed = true; - - UNLOCK_PALETTE; -} - - -/* - * Switch video mode - */ - -#ifdef SHEEPSHAVER -int16 video_mode_change(VidLocals *csSave, uint32 ParamPtr) -{ - /* return if no mode change */ - if ((csSave->saveData == ReadMacInt32(ParamPtr + csData)) && - (csSave->saveMode == ReadMacInt16(ParamPtr + csMode))) return noErr; - - /* first find video mode in table */ - for (int i=0; VModes[i].viType != DIS_INVALID; i++) { - if ((ReadMacInt16(ParamPtr + csMode) == VModes[i].viAppleMode) && - (ReadMacInt32(ParamPtr + csData) == VModes[i].viAppleID)) { - csSave->saveMode = ReadMacInt16(ParamPtr + csMode); - csSave->saveData = ReadMacInt32(ParamPtr + csData); - csSave->savePage = ReadMacInt16(ParamPtr + csPage); - - // Disable interrupts and pause redraw thread - DisableInterrupt(); - thread_stop_ack = false; - thread_stop_req = true; - while (!thread_stop_ack) ; - - cur_mode = i; - monitor_desc *monitor = VideoMonitors[0]; - monitor->switch_to_current_mode(); - - WriteMacInt32(ParamPtr + csBaseAddr, screen_base); - csSave->saveBaseAddr=screen_base; - csSave->saveData=VModes[cur_mode].viAppleID;/* First mode ... */ - csSave->saveMode=VModes[cur_mode].viAppleMode; - - // Enable interrupts and resume redraw thread - thread_stop_req = false; - EnableInterrupt(); - return noErr; - } - } - return paramErr; -} -#endif - -void SDL_monitor_desc::switch_to_current_mode(void) -{ - // Close and reopen display - LOCK_EVENTS; - video_close(); - video_open(); - UNLOCK_EVENTS; - - if (drv == NULL) { - ErrorAlert(STR_OPEN_WINDOW_ERR); - QuitEmulator(); - } -} - - -/* - * Can we set the MacOS cursor image into the window? - */ - -#ifdef SHEEPSHAVER -bool video_can_change_cursor(void) -{ - if (display_type != DISPLAY_WINDOW) - return false; - -#if defined(__APPLE__) - static char driver[] = "Quartz?"; - static int quartzok = -1; - - if (quartzok < 0) { - if (SDL_VideoDriverName(driver, sizeof driver) == NULL || strncmp(driver, "Quartz", sizeof driver)) - quartzok = true; - else { - // Quartz driver bug prevents cursor changing in SDL 1.2.11 to 1.2.14. - const SDL_version *vp = SDL_Linked_Version(); - int version = SDL_VERSIONNUM(vp->major, vp->minor, vp->patch); - quartzok = (version <= SDL_VERSIONNUM(1, 2, 10) || version >= SDL_VERSIONNUM(1, 2, 15)); - } - } - - return quartzok; -#else - return true; -#endif -} -#endif - - -/* - * Set cursor image for window - */ - -#ifdef SHEEPSHAVER -void video_set_cursor(void) -{ - // Set new cursor image if it was changed - if (sdl_cursor) { - SDL_FreeCursor(sdl_cursor); - sdl_cursor = SDL_CreateCursor(MacCursor + 4, MacCursor + 36, 16, 16, MacCursor[2], MacCursor[3]); - if (sdl_cursor) { - SDL_ShowCursor(private_data == NULL || private_data->cursorVisible); - SDL_SetCursor(sdl_cursor); - - // XXX Windows apparently needs an extra mouse event to - // make the new cursor image visible. - // On Mac, if mouse is grabbed, SDL_ShowCursor() recenters the - // mouse, we have to put it back. - bool move = false; -#ifdef WIN32 - move = true; -#elif defined(__APPLE__) - move = mouse_grabbed; -#endif - if (move) { - int visible = SDL_ShowCursor(-1); - if (visible) { - int x, y; - SDL_GetMouseState(&x, &y); - SDL_WarpMouse(x, y); - } - } - } - } -} -#endif - - -/* - * Keyboard-related utilify functions - */ - -static bool is_modifier_key(SDL_KeyboardEvent const & e) -{ - switch (e.keysym.sym) { - case SDLK_NUMLOCK: - case SDLK_CAPSLOCK: - case SDLK_SCROLLOCK: - case SDLK_RSHIFT: - case SDLK_LSHIFT: - case SDLK_RCTRL: - case SDLK_LCTRL: - case SDLK_RALT: - case SDLK_LALT: - case SDLK_RMETA: - case SDLK_LMETA: - case SDLK_LSUPER: - case SDLK_RSUPER: - case SDLK_MODE: - case SDLK_COMPOSE: - return true; - } - return false; -} - -static bool is_ctrl_down(SDL_keysym const & ks) -{ - return ctrl_down || (ks.mod & KMOD_CTRL); -} - - -/* - * Translate key event to Mac keycode, returns -1 if no keycode was found - * and -2 if the key was recognized as a hotkey - */ - -static int kc_decode(SDL_keysym const & ks, bool key_down) -{ - switch (ks.sym) { - case SDLK_a: return 0x00; - case SDLK_b: return 0x0b; - case SDLK_c: return 0x08; - case SDLK_d: return 0x02; - case SDLK_e: return 0x0e; - case SDLK_f: return 0x03; - case SDLK_g: return 0x05; - case SDLK_h: return 0x04; - case SDLK_i: return 0x22; - case SDLK_j: return 0x26; - case SDLK_k: return 0x28; - case SDLK_l: return 0x25; - case SDLK_m: return 0x2e; - case SDLK_n: return 0x2d; - case SDLK_o: return 0x1f; - case SDLK_p: return 0x23; - case SDLK_q: return 0x0c; - case SDLK_r: return 0x0f; - case SDLK_s: return 0x01; - case SDLK_t: return 0x11; - case SDLK_u: return 0x20; - case SDLK_v: return 0x09; - case SDLK_w: return 0x0d; - case SDLK_x: return 0x07; - case SDLK_y: return 0x10; - case SDLK_z: return 0x06; - - case SDLK_1: case SDLK_EXCLAIM: return 0x12; - case SDLK_2: case SDLK_AT: return 0x13; - case SDLK_3: case SDLK_HASH: return 0x14; - case SDLK_4: case SDLK_DOLLAR: return 0x15; - case SDLK_5: return 0x17; - case SDLK_6: return 0x16; - case SDLK_7: return 0x1a; - case SDLK_8: return 0x1c; - case SDLK_9: return 0x19; - case SDLK_0: return 0x1d; - - case SDLK_BACKQUOTE: return 0x0a; - case SDLK_MINUS: case SDLK_UNDERSCORE: return 0x1b; - case SDLK_EQUALS: case SDLK_PLUS: return 0x18; - case SDLK_LEFTBRACKET: return 0x21; - case SDLK_RIGHTBRACKET: return 0x1e; - case SDLK_BACKSLASH: return 0x2a; - case SDLK_SEMICOLON: case SDLK_COLON: return 0x29; - case SDLK_QUOTE: case SDLK_QUOTEDBL: return 0x27; - case SDLK_COMMA: case SDLK_LESS: return 0x2b; - case SDLK_PERIOD: case SDLK_GREATER: return 0x2f; - case SDLK_SLASH: case SDLK_QUESTION: return 0x2c; - - case SDLK_TAB: if (is_ctrl_down(ks)) {if (!key_down) drv->suspend(); return -2;} else return 0x30; - case SDLK_RETURN: if (is_ctrl_down(ks)) {if (!key_down) toggle_fullscreen = true; return -2;} else return 0x24; - case SDLK_SPACE: return 0x31; - case SDLK_BACKSPACE: return 0x33; - - case SDLK_DELETE: return 0x75; - case SDLK_INSERT: return 0x72; - case SDLK_HOME: case SDLK_HELP: return 0x73; - case SDLK_END: return 0x77; - case SDLK_PAGEUP: return 0x74; - case SDLK_PAGEDOWN: return 0x79; - - case SDLK_LCTRL: return 0x36; - case SDLK_RCTRL: return 0x36; - case SDLK_LSHIFT: return 0x38; - case SDLK_RSHIFT: return 0x38; -#if (defined(__APPLE__) && defined(__MACH__)) - case SDLK_LALT: return 0x3a; - case SDLK_RALT: return 0x3a; - case SDLK_LMETA: return 0x37; - case SDLK_RMETA: return 0x37; -#else - case SDLK_LALT: return 0x37; - case SDLK_RALT: return 0x37; - case SDLK_LMETA: return 0x3a; - case SDLK_RMETA: return 0x3a; -#endif - case SDLK_LSUPER: return 0x3a; // "Windows" key - case SDLK_RSUPER: return 0x3a; - case SDLK_MENU: return 0x32; - case SDLK_CAPSLOCK: return 0x39; - case SDLK_NUMLOCK: return 0x47; - - case SDLK_UP: return 0x3e; - case SDLK_DOWN: return 0x3d; - case SDLK_LEFT: return 0x3b; - case SDLK_RIGHT: return 0x3c; - - case SDLK_ESCAPE: if (is_ctrl_down(ks)) {if (!key_down) { quit_full_screen = true; emerg_quit = true; } return -2;} else return 0x35; - - case SDLK_F1: if (is_ctrl_down(ks)) {if (!key_down) SysMountFirstFloppy(); return -2;} else return 0x7a; - case SDLK_F2: return 0x78; - case SDLK_F3: return 0x63; - case SDLK_F4: return 0x76; - case SDLK_F5: if (is_ctrl_down(ks)) {if (!key_down) drv->toggle_mouse_grab(); return -2;} else return 0x60; - case SDLK_F6: return 0x61; - case SDLK_F7: return 0x62; - case SDLK_F8: return 0x64; - case SDLK_F9: return 0x65; - case SDLK_F10: return 0x6d; - case SDLK_F11: return 0x67; - case SDLK_F12: return 0x6f; - - case SDLK_PRINT: return 0x69; - case SDLK_SCROLLOCK: return 0x6b; - case SDLK_PAUSE: return 0x71; - - case SDLK_KP0: return 0x52; - case SDLK_KP1: return 0x53; - case SDLK_KP2: return 0x54; - case SDLK_KP3: return 0x55; - case SDLK_KP4: return 0x56; - case SDLK_KP5: return 0x57; - case SDLK_KP6: return 0x58; - case SDLK_KP7: return 0x59; - case SDLK_KP8: return 0x5b; - case SDLK_KP9: return 0x5c; - case SDLK_KP_PERIOD: return 0x41; - case SDLK_KP_PLUS: return 0x45; - case SDLK_KP_MINUS: return 0x4e; - case SDLK_KP_MULTIPLY: return 0x43; - case SDLK_KP_DIVIDE: return 0x4b; - case SDLK_KP_ENTER: return 0x4c; - case SDLK_KP_EQUALS: return 0x51; - } - D(bug("Unhandled SDL keysym: %d\n", ks.sym)); - return -1; -} - -static int event2keycode(SDL_KeyboardEvent const &ev, bool key_down) -{ - return kc_decode(ev.keysym, key_down); -} - -static void force_complete_window_refresh() -{ - if (display_type == DISPLAY_WINDOW) { -#ifdef ENABLE_VOSF - if (use_vosf) { // VOSF refresh - LOCK_VOSF; - PFLAG_SET_ALL; - UNLOCK_VOSF; - } -#endif - // Ensure each byte of the_buffer_copy differs from the_buffer to force a full update. - const VIDEO_MODE &mode = VideoMonitors[0]->get_current_mode(); - const int len = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; - for (int i = 0; i < len; i++) - the_buffer_copy[i] = !the_buffer[i]; - } -} - -/* - * SDL event handling - */ - -static void handle_events(void) -{ - SDL_Event events[10]; - const int n_max_events = sizeof(events) / sizeof(events[0]); - int n_events; - - while ((n_events = SDL_PeepEvents(events, n_max_events, SDL_GETEVENT, sdl_eventmask)) > 0) { - for (int i = 0; i < n_events; i++) { - SDL_Event const & event = events[i]; - switch (event.type) { - - // Mouse button - case SDL_MOUSEBUTTONDOWN: { - unsigned int button = event.button.button; - if (button == SDL_BUTTON_LEFT) - ADBMouseDown(0); - else if (button == SDL_BUTTON_RIGHT) - ADBMouseDown(1); - else if (button == SDL_BUTTON_MIDDLE) - ADBMouseDown(2); - else if (button < 6) { // Wheel mouse - if (mouse_wheel_mode == 0) { - int key = (button == 5) ? 0x79 : 0x74; // Page up/down - ADBKeyDown(key); - ADBKeyUp(key); - } else { - int key = (button == 5) ? 0x3d : 0x3e; // Cursor up/down - for(int i=0; imouse_moved(event.motion.x, event.motion.y); - break; - - // Keyboard - case SDL_KEYDOWN: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, true) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, true); - if (code >= 0) { - if (!emul_suspended) { - if (code == 0x39) { // Caps Lock pressed - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyDown(code); - if (code == 0x36) - ctrl_down = true; - } else { - if (code == 0x31) - drv->resume(); // Space wakes us up - } - } - break; - } - case SDL_KEYUP: { - int code = -1; - if (use_keycodes && !is_modifier_key(event.key)) { - if (event2keycode(event.key, false) != -2) // This is called to process the hotkeys - code = keycode_table[event.key.keysym.scancode & 0xff]; - } else - code = event2keycode(event.key, false); - if (code >= 0) { - if (code == 0x39) { // Caps Lock released - if (caps_on) { - ADBKeyUp(code); - caps_on = false; - } else { - ADBKeyDown(code); - caps_on = true; - } - } else - ADBKeyUp(code); - if (code == 0x36) - ctrl_down = false; - } - break; - } - - // Hidden parts exposed, force complete refresh of window - case SDL_VIDEOEXPOSE: - force_complete_window_refresh(); - break; - - // Window "close" widget clicked - case SDL_QUIT: - ADBKeyDown(0x7f); // Power key - ADBKeyUp(0x7f); - break; - - // Application activate/deactivate - case SDL_ACTIVEEVENT: - // Force a complete window refresh when activating, to avoid redraw artifacts otherwise. - if (event.active.gain) - force_complete_window_refresh(); - break; - } - } - } -} - - -/* - * Window display update - */ - -// Static display update (fixed frame rate, but incremental) -static void update_display_static(driver_base *drv) -{ - // Incremental update code - int wide = 0, high = 0; - uint32 x1, x2, y1, y2; - const VIDEO_MODE &mode = drv->mode; - int bytes_per_row = VIDEO_MODE_ROW_BYTES; - uint8 *p, *p2; - - // Check for first line from top and first line from bottom that have changed - y1 = 0; - for (uint32 j = 0; j < VIDEO_MODE_Y; j++) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y1 = j; - break; - } - } - y2 = y1 - 1; - for (uint32 j = VIDEO_MODE_Y; j-- > y1; ) { - if (memcmp(&the_buffer[j * bytes_per_row], &the_buffer_copy[j * bytes_per_row], bytes_per_row)) { - y2 = j; - break; - } - } - high = y2 - y1 + 1; - - // Check for first column from left and first column from right that have changed - if (high) { - if (VIDEO_MODE_DEPTH < VIDEO_DEPTH_8BIT) { - const int src_bytes_per_row = bytes_per_row; - const int dst_bytes_per_row = drv->s->pitch; - const int pixels_per_byte = VIDEO_MODE_X / src_bytes_per_row; - - x1 = VIDEO_MODE_X / pixels_per_byte; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1; i++) { - if (*p != *p2) { - x1 = i; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = (VIDEO_MODE_X / pixels_per_byte); i > x2; i--) { - p--; p2--; - if (*p != *p2) { - x2 = i; - break; - } - } - } - x1 *= pixels_per_byte; - x2 *= pixels_per_byte; - wide = (x2 - x1 + pixels_per_byte - 1) & -pixels_per_byte; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - int si = y1 * src_bytes_per_row + (x1 / pixels_per_byte); - int di = y1 * dst_bytes_per_row + x1; - for (uint32 j = y1; j <= y2; j++) { - memcpy(the_buffer_copy + si, the_buffer + si, wide / pixels_per_byte); - Screen_blit((uint8 *)drv->s->pixels + di, the_buffer + si, wide / pixels_per_byte); - si += src_bytes_per_row; - di += dst_bytes_per_row; - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - - } else { - const int bytes_per_pixel = VIDEO_MODE_ROW_BYTES / VIDEO_MODE_X; - const int dst_bytes_per_row = drv->s->pitch; - - x1 = VIDEO_MODE_X; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - for (uint32 i = 0; i < x1 * bytes_per_pixel; i++) { - if (*p != *p2) { - x1 = i / bytes_per_pixel; - break; - } - p++; p2++; - } - } - x2 = x1; - for (uint32 j = y1; j <= y2; j++) { - p = &the_buffer[j * bytes_per_row]; - p2 = &the_buffer_copy[j * bytes_per_row]; - p += bytes_per_row; - p2 += bytes_per_row; - for (uint32 i = VIDEO_MODE_X * bytes_per_pixel; i > x2 * bytes_per_pixel; i--) { - p--; - p2--; - if (*p != *p2) { - x2 = i / bytes_per_pixel; - break; - } - } - } - wide = x2 - x1; - - // Update copy of the_buffer - if (high && wide) { - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Blit to screen surface - for (uint32 j = y1; j <= y2; j++) { - uint32 i = j * bytes_per_row + x1 * bytes_per_pixel; - int dst_i = j * dst_bytes_per_row + x1 * bytes_per_pixel; - memcpy(the_buffer_copy + i, the_buffer + i, bytes_per_pixel * wide); - Screen_blit((uint8 *)drv->s->pixels + dst_i, the_buffer + i, bytes_per_pixel * wide); - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - SDL_UpdateRect(drv->s, x1, y1, wide, high); - } - } - } -} - -// Static display update (fixed frame rate, bounding boxes based) -// XXX use NQD bounding boxes to help detect dirty areas? -static void update_display_static_bbox(driver_base *drv) -{ - const VIDEO_MODE &mode = drv->mode; - - // Allocate bounding boxes for SDL_UpdateRects() - const uint32 N_PIXELS = 64; - const uint32 n_x_boxes = (VIDEO_MODE_X + N_PIXELS - 1) / N_PIXELS; - const uint32 n_y_boxes = (VIDEO_MODE_Y + N_PIXELS - 1) / N_PIXELS; - SDL_Rect *boxes = (SDL_Rect *)alloca(sizeof(SDL_Rect) * n_x_boxes * n_y_boxes); - uint32 nr_boxes = 0; - - // Lock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_LockSurface(drv->s); - - // Update the surface from Mac screen - const uint32 bytes_per_row = VIDEO_MODE_ROW_BYTES; - const uint32 bytes_per_pixel = bytes_per_row / VIDEO_MODE_X; - const uint32 dst_bytes_per_row = drv->s->pitch; - for (uint32 y = 0; y < VIDEO_MODE_Y; y += N_PIXELS) { - uint32 h = N_PIXELS; - if (h > VIDEO_MODE_Y - y) - h = VIDEO_MODE_Y - y; - for (uint32 x = 0; x < VIDEO_MODE_X; x += N_PIXELS) { - uint32 w = N_PIXELS; - if (w > VIDEO_MODE_X - x) - w = VIDEO_MODE_X - x; - const int xs = w * bytes_per_pixel; - const int xb = x * bytes_per_pixel; - bool dirty = false; - for (uint32 j = y; j < (y + h); j++) { - const uint32 yb = j * bytes_per_row; - const uint32 dst_yb = j * dst_bytes_per_row; - if (memcmp(&the_buffer[yb + xb], &the_buffer_copy[yb + xb], xs) != 0) { - memcpy(&the_buffer_copy[yb + xb], &the_buffer[yb + xb], xs); - Screen_blit((uint8 *)drv->s->pixels + dst_yb + xb, the_buffer + yb + xb, xs); - dirty = true; - } - } - if (dirty) { - boxes[nr_boxes].x = x; - boxes[nr_boxes].y = y; - boxes[nr_boxes].w = w; - boxes[nr_boxes].h = h; - nr_boxes++; - } - } - } - - // Unlock surface, if required - if (SDL_MUSTLOCK(drv->s)) - SDL_UnlockSurface(drv->s); - - // Refresh display - if (nr_boxes) - SDL_UpdateRects(drv->s, nr_boxes, boxes); -} - - -// We suggest the compiler to inline the next two functions so that it -// may specialise the code according to the current screen depth and -// display type. A clever compiler would do that job by itself though... - -// NOTE: update_display_vosf is inlined too - -static inline void possibly_quit_dga_mode() -{ - // Quit DGA mode if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - delete drv; - drv = NULL; - } -} - -static inline void possibly_ungrab_mouse() -{ - // Ungrab mouse if requested (something terrible has happened and we - // want to give control back to the user) - if (quit_full_screen) { - quit_full_screen = false; - if (drv) - drv->ungrab_mouse(); - } -} - -static inline void handle_palette_changes(void) -{ - LOCK_PALETTE; - - if (sdl_palette_changed) { - sdl_palette_changed = false; - drv->update_palette(); - } - - UNLOCK_PALETTE; -} - -static void video_refresh_window_static(void); - -static void video_refresh_dga(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - video_refresh_window_static(); -} - -#ifdef ENABLE_VOSF -#if REAL_ADDRESSING || DIRECT_ADDRESSING -static void video_refresh_dga_vosf(void) -{ - // Quit DGA mode if requested - possibly_quit_dga_mode(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_dga_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif - -static void video_refresh_window_vosf(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (VOSF variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - if (mainBuffer.dirty) { - LOCK_VOSF; - update_display_window_vosf(drv); - UNLOCK_VOSF; - } - } -} -#endif // def ENABLE_VOSF - -static void video_refresh_window_static(void) -{ - // Ungrab mouse if requested - possibly_ungrab_mouse(); - - // Update display (static variant) - static uint32 tick_counter = 0; - if (++tick_counter >= frame_skip) { - tick_counter = 0; - const VIDEO_MODE &mode = drv->mode; - if ((int)VIDEO_MODE_DEPTH >= VIDEO_DEPTH_8BIT) - update_display_static_bbox(drv); - else - update_display_static(drv); - } -} - - -/* - * Thread for screen refresh, input handling etc. - */ - -static void VideoRefreshInit(void) -{ - // TODO: set up specialised 8bpp VideoRefresh handlers ? - if (display_type == DISPLAY_SCREEN) { -#if ENABLE_VOSF && (REAL_ADDRESSING || DIRECT_ADDRESSING) - if (use_vosf) - video_refresh = video_refresh_dga_vosf; - else -#endif - video_refresh = video_refresh_dga; - } - else { -#ifdef ENABLE_VOSF - if (use_vosf) - video_refresh = video_refresh_window_vosf; - else -#endif - video_refresh = video_refresh_window_static; - } -} - -static inline void do_video_refresh(void) -{ - // Handle SDL events - handle_events(); - - // Update display - video_refresh(); - - - // Set new palette if it was changed - handle_palette_changes(); -} - -// This function is called on non-threaded platforms from a timer interrupt -void VideoRefresh(void) -{ - // We need to check redraw_thread_active to inhibit refreshed during - // mode changes on non-threaded platforms - if (!redraw_thread_active) - return; - - // Process pending events and update display - do_video_refresh(); -} - -const int VIDEO_REFRESH_HZ = 60; -const int VIDEO_REFRESH_DELAY = 1000000 / VIDEO_REFRESH_HZ; - -#ifndef USE_CPU_EMUL_SERVICES -static int redraw_func(void *arg) -{ - uint64 start = GetTicks_usec(); - int64 ticks = 0; - uint64 next = GetTicks_usec() + VIDEO_REFRESH_DELAY; - - while (!redraw_thread_cancel) { - - // Wait - next += VIDEO_REFRESH_DELAY; - int32 delay = int32(next - GetTicks_usec()); - if (delay > 0) - Delay_usec(delay); - else if (delay < -VIDEO_REFRESH_DELAY) - next = GetTicks_usec(); - ticks++; - - // Pause if requested (during video mode switches) - if (thread_stop_req) { - thread_stop_ack = true; - continue; - } - - // Process pending events and update display - do_video_refresh(); - } - - uint64 end = GetTicks_usec(); - D(bug("%lld refreshes in %lld usec = %f refreshes/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start))); - return 0; -} -#endif - - -/* - * Record dirty area from NQD - */ - -#ifdef SHEEPSHAVER -void video_set_dirty_area(int x, int y, int w, int h) -{ -#ifdef ENABLE_VOSF - const VIDEO_MODE &mode = drv->mode; - const unsigned screen_width = VIDEO_MODE_X; - const unsigned screen_height = VIDEO_MODE_Y; - const unsigned bytes_per_row = VIDEO_MODE_ROW_BYTES; - - if (use_vosf) { - vosf_set_dirty_area(x, y, w, h, screen_width, screen_height, bytes_per_row); - return; - } -#endif - - // XXX handle dirty bounding boxes for non-VOSF modes -} -#endif - -#endif // ends: SDL version check diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 505e6b0de..28423e8c3 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -33,7 +33,6 @@ AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphi AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=yes]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) -AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl JIT compiler options. AC_ARG_ENABLE(jit-compiler, [ --enable-jit-compiler enable JIT compiler [default=yes]], [WANT_JIT=$enableval], [WANT_JIT=yes]) @@ -284,59 +283,18 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=2 - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL2, [#include ], [ - WANT_SDL_VERSION_MAJOR=2 - ], [ - TEMP_WANT_SDL_VERSION_MAJOR=1 - ]) - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ], [ - WANT_SDL_VERSION_MAJOR=1 - ]) - fi + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=2 - fi - - dnl use PKG_PROG_PKG_CONFIG to declare PKG_CONFIG variables. Otherwise, - dnl PKG_* macros may fail, without much explanation. The lack of this - dnl was causing --with-sdl1 to fail, as SDL 1.x could not be detected, - dnl as the 2nd call to PKG_CHECK_MODULES would fail, as $PKG_CONFIG - dnl never got defined (bizarrely-enough). -- dludwig@pobox.com - PKG_PROG_PKG_CONFIG - - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then - PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ - CFLAGS="$CFLAGS $sdl2_CFLAGS" - CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" - LIBS="$LIBS $sdl2_LIBS" - WANT_SDL_VERSION_MAJOR=2 - ], [ - TEMP_WANT_SDL_VERSION_MAJOR=1 - ]) - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then - PKG_CHECK_MODULES([sdl], [sdl >= 1.2], [ - CFLAGS="$CFLAGS $sdl_CFLAGS" - CXXFLAGS="$CXXFLAGS $sdl_CFLAGS" - LIBS="$LIBS $sdl_LIBS" - WANT_SDL_VERSION_MAJOR=1 - ], [ - WANT_SDL=no - WANT_SDL_VERSION_MAJOR= - ]) - fi + PKG_CHECK_MODULES([sdl2], [sdl2 >= 2.0], [ + CFLAGS="$CFLAGS $sdl2_CFLAGS" + CXXFLAGS="$CXXFLAGS $sdl2_CFLAGS" + LIBS="$LIBS $sdl2_LIBS" + ], [ + WANT_SDL=no + ]) fi SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` else @@ -792,7 +750,7 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support]) - VIDEOSRCS="../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp" + VIDEOSRCS="../SDL/video_sdl2.cpp" KEYCODES="../SDL/keycodes" if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then AC_MSG_CHECKING([whether __LP64__ is defined]) @@ -1751,7 +1709,6 @@ echo echo Mac OS X GUI ........................... : $WANT_MACOSX_GUI echo Mac OS X Sound ......................... : $WANT_MACOSX_SOUND echo SDL support ............................ : $SDL_SUPPORT -echo SDL major-version ...................... : $WANT_SDL_VERSION_MAJOR echo BINCUE support ......................... : $have_bincue echo LIBVHD support ......................... : $have_libvhd echo VDE support ............................ : $have_vdeplug diff --git a/BasiliskII/src/Windows/BasiliskII.vcxproj b/BasiliskII/src/Windows/BasiliskII.vcxproj index b3a3a3ff2..4437453dc 100644 --- a/BasiliskII/src/Windows/BasiliskII.vcxproj +++ b/BasiliskII/src/Windows/BasiliskII.vcxproj @@ -55,7 +55,6 @@ - @@ -695,4 +694,4 @@ - \ No newline at end of file + diff --git a/BasiliskII/src/Windows/Makefile.in b/BasiliskII/src/Windows/Makefile.in index 40fc67db1..a0f795ef9 100755 --- a/BasiliskII/src/Windows/Makefile.in +++ b/BasiliskII/src/Windows/Makefile.in @@ -66,7 +66,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../emul_op.cpp ../macos_util.cpp ../xpram.cpp xpram_windows.cpp ../timer.cpp \ timer_windows.cpp ../adb.cpp ../serial.cpp serial_windows.cpp \ ../ether.cpp ether_windows.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp \ - ../scsi.cpp ../dummy/scsi_dummy.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp \ + ../scsi.cpp ../dummy/scsi_dummy.cpp ../video.cpp ../SDL/video_sdl2.cpp \ video_blit.cpp ../audio.cpp ../SDL/audio_sdl.cpp clip_windows.cpp \ ../extfs.cpp extfs_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ vm_alloc.cpp sigsegv.cpp posix_emu.cpp util_windows.cpp \ diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index c65217eb5..d3da4317f 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -68,7 +68,6 @@ AC_ARG_ENABLE(sdl-video, [ --enable-sdl-video use SDL for video graphic AC_ARG_ENABLE(sdl-audio, [ --enable-sdl-audio use SDL for audio [default=no]], [WANT_SDL_AUDIO=$enableval], [WANT_SDL_AUDIO=yes]) AC_ARG_ENABLE(sdl-framework, [ --enable-sdl-framework use SDL framework [default=no]], [WANT_SDL_FRAMEWORK=$enableval], [WANT_SDL_FRAMEWORK=no]) AC_ARG_ENABLE(sdl-framework-prefix, [ --enable-sdl-framework-prefix=PFX default=/Library/Frameworks], [SDL_FRAMEWORK="$enableval"], [SDL_FRAMEWORK=/Library/Frameworks]) -AC_ARG_WITH(sdl1, [ --with-sdl1 use SDL 1.x, rather than SDL 2.x [default=no]], [WANT_SDL_VERSION_MAJOR=1], []) dnl Checks for programs. AC_PROG_CC @@ -181,65 +180,26 @@ if [[ "x$WANT_SDL_AUDIO" = "xyes" ]]; then fi if [[ "x$WANT_SDL" = "xyes" ]]; then if [[ "x$WANT_SDL_FRAMEWORK" = "xyes" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=2 - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL2, [#include ], [ - WANT_SDL_VERSION_MAJOR=2 - ], [ - TEMP_WANT_SDL_VERSION_MAJOR=1 - ]) - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then - AC_CHECK_SDLFRAMEWORK(SDL, [#include ], [ - WANT_SDL_VERSION_MAJOR=1 - ]) - fi + AC_CHECK_SDLFRAMEWORK(SDL2, [#include ]) else ac_cv_framework_SDL=no fi if [[ "x$ac_cv_framework_SDL" = "xno" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=$WANT_SDL_VERSION_MAJOR - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x" ]]; then - TEMP_WANT_SDL_VERSION_MAJOR=2 - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x2" ]]; then - AC_PATH_PROG(sdl2_config, "sdl2-config") - if [[ -n "$sdl2_config" ]]; then - sdl2_cflags=`$sdl2_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl2_libs=`$sdl2_config --static-libs` - else - sdl2_libs=`$sdl2_config --libs` - fi - CFLAGS="$CFLAGS $sdl2_cflags" - CXXFLAGS="$CXXFLAGS $sdl2_cflags" - LIBS="$LIBS $sdl2_libs" - WANT_SDL_VERSION_MAJOR=2 - else - TEMP_WANT_SDL_VERSION_MAJOR=1 - fi - fi - if [[ "x$TEMP_WANT_SDL_VERSION_MAJOR" = "x1" ]]; then - AC_PATH_PROG(sdl_config, "sdl-config") - if [[ -n "$sdl_config" ]]; then - sdl_cflags=`$sdl_config --cflags` - if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then - sdl_libs=`$sdl_config --static-libs` - else - sdl_libs=`$sdl_config --libs` - fi - CFLAGS="$CFLAGS $sdl_cflags" - CXXFLAGS="$CXXFLAGS $sdl_cflags" - LIBS="$LIBS $sdl_libs" - WANT_SDL_VERSION_MAJOR=1 + AC_PATH_PROG(sdl2_config, "sdl2-config") + if [[ -n "$sdl2_config" ]]; then + sdl2_cflags=`$sdl2_config --cflags` + if [[ "x$WANT_SDL_STATIC" = "xyes" ]]; then + sdl2_libs=`$sdl2_config --static-libs` else - WANT_SDL=no - WANT_SDL_VIDEO=no - WANT_SDL_AUDIO=no + sdl2_libs=`$sdl2_config --libs` fi + CFLAGS="$CFLAGS $sdl2_cflags" + CXXFLAGS="$CXXFLAGS $sdl2_cflags" + LIBS="$LIBS $sdl2_libs" + else + WANT_SDL=no + WANT_SDL_VIDEO=no + WANT_SDL_AUDIO=no fi fi SDL_SUPPORT=`echo "$SDL_SUPPORT" | sed -e "s/^ //"` @@ -663,7 +623,7 @@ if [[ "x$WANT_SDL" = "xyes" ]]; then fi if [[ "x$WANT_SDL_VIDEO" = "xyes" ]]; then AC_DEFINE(USE_SDL_VIDEO, 1, [Define to enable SDL video graphics support.]) - VIDEOSRCS="../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp" + VIDEOSRCS="../SDL/video_sdl2.cpp" KEYCODES="../SDL/keycodes" if [[ "x$ac_cv_framework_Carbon" = "xyes" ]]; then AC_MSG_CHECKING([whether __LP64__ is defined]) @@ -1658,7 +1618,6 @@ echo echo SheepShaver configuration summary: echo echo SDL support ...................... : $SDL_SUPPORT -echo SDL major-version ................ : $WANT_SDL_VERSION_MAJOR echo BINCUE support ................... : $have_bincue echo LIBVHD support ................... : $have_libvhd echo Using PowerPC emulator ........... : $EMULATED_PPC diff --git a/SheepShaver/src/Windows/Makefile.in b/SheepShaver/src/Windows/Makefile.in index 6e3fedaa5..9ca6f762d 100755 --- a/SheepShaver/src/Windows/Makefile.in +++ b/SheepShaver/src/Windows/Makefile.in @@ -70,7 +70,7 @@ SRCS = ../main.cpp main_windows.cpp ../prefs.cpp ../prefs_items.cpp prefs_window ../rom_patches.cpp ../rsrc_patches.cpp ../emul_op.cpp ../name_registry.cpp \ ../macos_util.cpp ../timer.cpp timer_windows.cpp ../xpram.cpp xpram_windows.cpp \ ../adb.cpp ../sony.cpp ../disk.cpp ../cdrom.cpp ../scsi.cpp ../dummy/scsi_dummy.cpp \ - ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl.cpp ../SDL/video_sdl2.cpp video_blit.cpp \ + ../gfxaccel.cpp ../video.cpp ../SDL/video_sdl2.cpp video_blit.cpp \ ../audio.cpp ../SDL/audio_sdl.cpp ../ether.cpp ether_windows.cpp \ ../thunks.cpp ../serial.cpp serial_windows.cpp ../extfs.cpp extfs_windows.cpp \ about_window_windows.cpp ../user_strings.cpp user_strings_windows.cpp \ From 7562d1df723eff96f954901257788d75e1d7ad71 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 18 Jun 2021 15:33:54 -0700 Subject: [PATCH 528/534] Remove debug asserts --- BasiliskII/src/SDL/video_sdl2.cpp | 1 - BasiliskII/src/uae_cpu/basilisk_glue.cpp | 3 ++- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/BasiliskII/src/SDL/video_sdl2.cpp b/BasiliskII/src/SDL/video_sdl2.cpp index 7e3225f6e..453dc43e7 100644 --- a/BasiliskII/src/SDL/video_sdl2.cpp +++ b/BasiliskII/src/SDL/video_sdl2.cpp @@ -506,7 +506,6 @@ static void set_mac_frame_buffer(SDL_monitor_desc &monitor, int depth, bool nati MacFrameSize = VIDEO_MODE_ROW_BYTES * VIDEO_MODE_Y; memory_init(); #else - assert(Host2MacAddr(0)); monitor.set_mac_frame_base(Host2MacAddr(MacFrameBaseHost)); #endif D(bug("monitor.mac_frame_base = %08x\n", monitor.get_mac_frame_base())); diff --git a/BasiliskII/src/uae_cpu/basilisk_glue.cpp b/BasiliskII/src/uae_cpu/basilisk_glue.cpp index 680f15359..b39e7dbde 100644 --- a/BasiliskII/src/uae_cpu/basilisk_glue.cpp +++ b/BasiliskII/src/uae_cpu/basilisk_glue.cpp @@ -209,9 +209,10 @@ bool InitMacMem(void){ } void MacMemExit(void){ - assert(RAMBaseHost); + if(RAMBaseHost){ vm_release(RAMBaseHost, RAMSize + ScratchMemSize + MAX_ROM_SIZE + VRAMSize + JITCacheSize); + } RAMBaseHost = NULL; ROMBaseHost = NULL; //Exit VM wrappers From 1f51b23925b2457f956842530bbd1c7132a1c7fd Mon Sep 17 00:00:00 2001 From: Seg Date: Thu, 17 Jun 2021 21:04:30 -0700 Subject: [PATCH 529/534] Add linux desktop metainfo and icon --- BasiliskII/src/Unix/Makefile.in | 17 ++++++++- BasiliskII/src/Unix/flatpak/BasiliskII128.png | Bin 0 -> 217 bytes BasiliskII/src/Unix/flatpak/BasiliskII64.png | Bin 0 -> 207 bytes .../Unix/flatpak/net.cebix.basilisk.desktop | 10 ++++++ .../flatpak/net.cebix.basilisk.metainfo.xml | 33 ++++++++++++++++++ 5 files changed, 59 insertions(+), 1 deletion(-) create mode 100644 BasiliskII/src/Unix/flatpak/BasiliskII128.png create mode 100644 BasiliskII/src/Unix/flatpak/BasiliskII64.png create mode 100644 BasiliskII/src/Unix/flatpak/net.cebix.basilisk.desktop create mode 100644 BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml diff --git a/BasiliskII/src/Unix/Makefile.in b/BasiliskII/src/Unix/Makefile.in index 1b911c689..bc92f1c65 100644 --- a/BasiliskII/src/Unix/Makefile.in +++ b/BasiliskII/src/Unix/Makefile.in @@ -155,9 +155,24 @@ install: $(PROGS) installdirs $(INSTALL_DATA) @top_srcdir@/$(KEYCODES) $(DESTDIR)$(datadir)/$(APP)/keycodes $(INSTALL_DATA) @top_srcdir@/fbdevices $(DESTDIR)$(datadir)/$(APP)/fbdevices $(INSTALL_DATA) @top_srcdir@/tunconfig $(DESTDIR)$(datadir)/$(APP)/tunconfig + $(INSTALL_DATA) @top_srcdir@/flatpak/net.cebix.basilisk.metainfo.xml \ + $(DESTDIR)$(datadir)/metainfo/ + $(INSTALL_DATA) @top_srcdir@/flatpak/net.cebix.basilisk.desktop \ + $(DESTDIR)$(datadir)/applications/ + $(INSTALL_DATA) @top_srcdir@/flatpak/BasiliskII64.png \ + $(DESTDIR)$(datadir)/icons/hicolor/64x64/apps/net.cebix.basilisk.png + $(INSTALL_DATA) @top_srcdir@/flatpak/BasiliskII128.png \ + $(DESTDIR)$(datadir)/icons/hicolor/128x128/apps/net.cebix.basilisk.png installdirs: - $(SHELL) @top_srcdir@/mkinstalldirs $(DESTDIR)$(bindir) $(DESTDIR)$(man1dir) $(DESTDIR)$(datadir)/$(APP) + $(SHELL) @top_srcdir@/mkinstalldirs \ + $(DESTDIR)$(bindir) \ + $(DESTDIR)$(man1dir) \ + $(DESTDIR)$(datadir)/$(APP) \ + $(DESTDIR)$(datadir)/metainfo \ + $(DESTDIR)$(datadir)/applications \ + $(DESTDIR)$(datadir)/icons/hicolor/64x64/apps \ + $(DESTDIR)$(datadir)/icons/hicolor/128x128/apps uninstall: rm -f $(DESTDIR)$(bindir)/$(APP)$(EXEEXT) diff --git a/BasiliskII/src/Unix/flatpak/BasiliskII128.png b/BasiliskII/src/Unix/flatpak/BasiliskII128.png new file mode 100644 index 0000000000000000000000000000000000000000..0aac0f1744433cb7944f5e2d6bc8e94ce9115163 GIT binary patch literal 217 zcmeAS@N?(olHy`uVBq!ia0vp^4Is?K3?%mjbVdLv&H$ef*8>L*0GUA2M{i>nki}RM zYEfFN{a|i zWZUjt^}m_TRGm+d@y>3^X2y+69yVloUttzvEcHuG(0}Ef=G2yd!-*3i7hP=QBY*&&+{dztyg#ul|;OXk; Jvd$@?2>>^eN{0Xd literal 0 HcmV?d00001 diff --git a/BasiliskII/src/Unix/flatpak/BasiliskII64.png b/BasiliskII/src/Unix/flatpak/BasiliskII64.png new file mode 100644 index 0000000000000000000000000000000000000000..e46427f76842d3f1eb50b3a0d7156ce52df813b0 GIT binary patch literal 207 zcmeAS@N?(olHy`uVBq!ia0vp^4j|0L3?#3!&-4XSoB=)|u0R?H4jee(6qHp5WHFWm z`2{mLJiCzwvzbG(f1YE9Xri8mwst?`f + + net.cebix.basilisk + + Basilisk II + A 68k Macintosh emulator + + FSFAP + GPL-2.0-or-later + + +

    +Basilisk II is an Open Source 68k Macintosh emulator. That is, it enables you to run 68k Mac OS software on you computer, even if you are using a different operating system. However, you still need a copy of Mac OS 7.x-8.1 and a Macintosh ROM image to use Basilisk II. +

    + + https://basilisk.cebix.net/ + + net.cebix.basilisk.desktop + + + + https://raw.githubusercontent.com/SegHaxx/flathub/new-pr/screenshots/1.png + + + + + + +

    First Flathub release.

    +     +     +     +     From bed233ca0c708f1a2e9ddd22616c78e35d6cb471 Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 18 Jun 2021 19:46:43 -0700 Subject: [PATCH 530/534] Get version from git tag --- BasiliskII/src/Unix/configure.ac | 11 +-- BasiliskII/src/Unix/main_unix.cpp | 14 +-- BasiliskII/src/Unix/prefs_editor_gtk.cpp | 99 +++++---------------- BasiliskII/src/Windows/configure.ac | 8 +- BasiliskII/src/Windows/main_windows.cpp | 7 +- BasiliskII/src/Windows/prefs_editor_gtk.cpp | 71 +++++++-------- BasiliskII/src/include/user_strings.h | 3 +- BasiliskII/src/include/version.h | 9 +- BasiliskII/src/slot_rom.cpp | 6 +- BasiliskII/src/user_strings.cpp | 4 +- SheepShaver/src/Unix/configure.ac | 2 +- SheepShaver/src/Unix/main_unix.cpp | 3 +- SheepShaver/src/Unix/prefs_editor_gtk.cpp | 78 +++++++--------- SheepShaver/src/Windows/configure.ac | 2 +- SheepShaver/src/Windows/main_windows.cpp | 3 +- SheepShaver/src/include/user_strings.h | 3 +- SheepShaver/src/include/version.h | 7 +- SheepShaver/src/user_strings.cpp | 5 +- 18 files changed, 113 insertions(+), 222 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 28423e8c3..1057d2925 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1,17 +1,13 @@ dnl Process this file with autoconf to produce a configure script. dnl Written in 2002 by Christian Bauer et al. -AC_INIT([Basilisk II], 1.0, [Christian.Bauer@uni-mainz.de], BasiliskII) +AC_INIT([Basilisk II], [m4_esyscmd_s([git describe --always --tags --dirty])]) AC_CONFIG_SRCDIR(main_unix.cpp) AC_PREREQ(2.52) AC_CONFIG_HEADER(config.h) AC_USE_SYSTEM_EXTENSIONS -dnl Aliases for PACKAGE and VERSION macros. -AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE_NAME", [Define this program name.]) -AC_DEFINE_UNQUOTED(VERSION, "$PACKAGE_VERSION", [Define this program version.]) - dnl Some systems do not put corefiles in the currect directory, avoid saving dnl cores for the configure tests since some are intended to dump core. ulimit -c 0 @@ -385,11 +381,6 @@ if [[ "x$WANT_GTK" = "xgtk" ]]; then AM_PATH_GTK(1.2.0, [ GUI_CFLAGS="$GTK_CFLAGS" GUI_LIBS="$GTK_LIBS" - B2_PATH_GNOMEUI([ - AC_DEFINE(HAVE_GNOMEUI, 1, [Define if libgnomeui is available.]) - GUI_CFLAGS="$GUI_CFLAGS $GNOMEUI_CFLAGS" - GUI_LIBS="$GUI_LIBS $GNOMEUI_LIBS" - ], []) ], [ AC_MSG_WARN([Could not find GTK+, disabling user interface.]) WANT_GTK=no diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 0b2cbcad2..9b3d2f0d9 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -42,9 +42,6 @@ #ifdef ENABLE_GTK # include # include -# ifdef HAVE_GNOMEUI -# include -# endif # if !defined(GDK_WINDOWING_QUARTZ) && !defined(GDK_WINDOWING_WAYLAND) # include # endif @@ -293,8 +290,7 @@ int main(int argc, char **argv){ tzset(); // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); + printf(GetString(STR_ABOUT_TEXT)); // Parse command line arguments for (int i=1; i #include -#ifdef HAVE_GNOMEUI -#include -#endif - #include "user_strings.h" #include "version.h" #include "cdrom.h" @@ -42,12 +38,10 @@ #define DEBUG 0 #include "debug.h" - // Global variables static GtkWidget *win; // Preferences window static bool start_clicked = false; // Return value of PrefsEditor() function - // Prototypes static void create_volumes_pane(GtkWidget *top); static void create_scsi_pane(GtkWidget *top); @@ -58,7 +52,6 @@ static void create_memory_pane(GtkWidget *top); static void create_jit_pane(GtkWidget *top); static void read_settings(void); - /* * Utility functions */ @@ -400,79 +393,36 @@ static void dl_quit(GtkWidget *dialog) } // "About" selected -static void mn_about(...) -{ - GtkWidget *dialog; - -#ifdef HAVE_GNOMEUI - - char version[32]; - sprintf(version, "Version %d.%d", VERSION_MAJOR, VERSION_MINOR); - const char *authors[] = { - "Christian Bauer", +static void mn_about(...){ + const gchar* authors[] = { + "Christian Bauer ", "Orlando Bassotto", - "Gwenolé Beauchesne", + "Gwenolé Beauchesne", "Marc Chabanas", "Marc Hellwig", "Biill Huey", "Brian J. Johnson", - "Jürgen Lachmann", + "Jürgen Lachmann", "Samuel Lander", "David Lawrence", "Lauri Pesonen", "Bernd Schmidt", + "Callum Lerwick ", "and others", NULL }; - dialog = gnome_about_new( - "Basilisk II", - version, - "Copyright (C) 1997-2008 Christian Bauer", - authors, - "Basilisk II comes with ABSOLUTELY NO WARRANTY." - "This is free software, and you are welcome to redistribute it" - "under the terms of the GNU General Public License.", + gtk_show_about_dialog(GTK_WINDOW(win), + "version", VERSION_STRING, + "copyright", "Copyright (C) 1997-2008 Christian Bauer et al.", + "website", "http://basilisk.cebix.net/", + "authors", authors, + "license", + "Basilisk II comes with ABSOLUTELY NO WARRANTY.\n\n" + "This is free software, and you are welcome to redistribute it " + "under the terms of the GNU General Public License.", + "wrap-license", true, NULL ); - gnome_dialog_set_parent(GNOME_DIALOG(dialog), GTK_WINDOW(win)); - -#else - - GtkWidget *label, *button; - - char str[512]; - sprintf(str, - "Basilisk II\nVersion %d.%d\n\n" - "Copyright (C) 1997-2008 Christian Bauer et al.\n" - "E-mail: Christian.Bauer@uni-mainz.de\n" - "http://www.uni-mainz.de/~bauec002/B2Main.html\n\n" - "Basilisk II comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR - ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - -#endif - - gtk_widget_show(dialog); } // "Zap PRAM" selected @@ -492,8 +442,7 @@ static GtkItemFactoryEntry menu_items[] = { {(gchar *)GetString(STR_HELP_ITEM_ABOUT_GTK), NULL, GTK_SIGNAL_FUNC(mn_about), 0, NULL} }; -bool PrefsEditor(void) -{ +bool PrefsEditor(void){ // Create window win = gtk_window_new(GTK_WINDOW_TOPLEVEL); gtk_window_set_title(GTK_WINDOW(win), GetString(STR_PREFS_TITLE)); @@ -524,12 +473,12 @@ bool PrefsEditor(void) gtk_widget_realize(notebook); create_volumes_pane(notebook); - create_scsi_pane(notebook); create_graphics_pane(notebook); create_input_pane(notebook); create_serial_pane(notebook); create_memory_pane(notebook); create_jit_pane(notebook); + //create_scsi_pane(notebook); gtk_widget_show(notebook); static const opt_desc buttons[] = { @@ -1647,23 +1596,15 @@ static void sigchld_handler(int sig, siginfo_t *sip, void *) } } - /* * Start standalone GUI */ -int main(int argc, char *argv[]) -{ -#ifdef HAVE_GNOMEUI - // Init GNOME/GTK - char version[16]; - sprintf(version, "%d.%d", VERSION_MAJOR, VERSION_MINOR); - gnome_init("Basilisk II", version, argc, argv); -#else +int main(int argc, char *argv[]){ // Init GTK gtk_set_locale(); gtk_init(&argc, &argv); -#endif + g_set_application_name("Basilisk II"); // Read preferences PrefsInit(NULL, argc, argv); diff --git a/BasiliskII/src/Windows/configure.ac b/BasiliskII/src/Windows/configure.ac index 88adb1bd5..20e11eedc 100755 --- a/BasiliskII/src/Windows/configure.ac +++ b/BasiliskII/src/Windows/configure.ac @@ -1,16 +1,12 @@ dnl Process this file with autoconf to produce a configure script. dnl Written in 2002 by Christian Bauer et al. -AC_INIT([Basilisk II], 1.0, [Christian.Bauer@uni-mainz.de], BasiliskII) +AC_INIT([Basilisk II], [m4_esyscmd_s([git describe --always --tags --dirty])]) AC_CONFIG_SRCDIR(main_windows.cpp) AC_CONFIG_AUX_DIR(../Unix) AC_PREREQ(2.52) AC_CONFIG_HEADER(config.h) -dnl Aliases for PACKAGE and VERSION macros. -AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE_NAME", [Define this program name.]) -AC_DEFINE_UNQUOTED(VERSION, "$PACKAGE_VERSION", [Define this program version.]) - dnl SDL options. #AC_ARG_ENABLE(sdl-static, [ --enable-sdl-static use SDL static libraries for linking [default=no]], [WANT_SDL_STATIC=$enableval], [WANT_SDL_STATIC=no]) @@ -78,7 +74,7 @@ AC_CHECK_TOOL(WINDRES, windres) dnl We use GTK+ if possible. if [[ "x$WANT_GTK" = "xyes" ]]; then - AM_PATH_GTK_2_0(1.3.15, [], [ + AM_PATH_GTK_2_0(2.6.0, [], [ AC_MSG_WARN([Could not find GTK+ 2.0, disabling user interface.]) WANT_GTK=no ]) diff --git a/BasiliskII/src/Windows/main_windows.cpp b/BasiliskII/src/Windows/main_windows.cpp index ca242d81d..ec34daa18 100755 --- a/BasiliskII/src/Windows/main_windows.cpp +++ b/BasiliskII/src/Windows/main_windows.cpp @@ -48,10 +48,6 @@ typedef std::basic_string tstring; #include "sigsegv.h" #include "util_windows.h" -#if USE_JIT -extern void flush_icache_range(uint8 *start, uint32 size); // from compemu_support.cpp -#endif - #ifdef ENABLE_MON # include "mon.h" #endif @@ -180,8 +176,7 @@ int main(int argc, char **argv){ tzset(); // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); + printf(GetString(STR_ABOUT_TEXT)); // Parse command line arguments for (int i=1; i", + "Orlando Bassotto", + "Gwenolé Beauchesne", + "Marc Chabanas", + "Marc Hellwig", + "Biill Huey", + "Brian J. Johnson", + "Jürgen Lachmann", + "Samuel Lander", + "David Lawrence", + "Lauri Pesonen", + "Bernd Schmidt", + "Callum Lerwick ", + "and others", + NULL + }; + gtk_show_about_dialog(GTK_WINDOW(win), + "version", VERSION_STRING, + "copyright", "Copyright (C) 1997-2008 Christian Bauer et al.", #ifdef SHEEPSHAVER - "http://sheepshaver.cebix.net/\n\n" + "website", "http://sheepshaver.cebix.net/", #else - "http://basilisk.cebix.net/\n\n" + "website", "http://basilisk.cebix.net/", #endif - PROGRAM_NAME " comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR + "authors", authors, + "license", + PACKAGE_NAME " comes with ABSOLUTELY NO WARRANTY.\n\n" + "This is free software, and you are welcome to redistribute it " + "under the terms of the GNU General Public License.", + "wrap-license", true, + NULL ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - - gtk_widget_show(dialog); } // Menu item descriptions @@ -1905,11 +1898,11 @@ void WarningAlert(const wchar_t *text) * Start standalone GUI */ -int main(int argc, char *argv[]) -{ +int main(int argc, char *argv[]){ // Init GTK gtk_set_locale(); gtk_init(&argc, &argv); + g_set_application_name(PACKAGE_NAME); // Read preferences PrefsInit(NULL, argc, argv); diff --git a/BasiliskII/src/include/user_strings.h b/BasiliskII/src/include/user_strings.h index f75a738ed..1e4fd0d30 100644 --- a/BasiliskII/src/include/user_strings.h +++ b/BasiliskII/src/include/user_strings.h @@ -24,8 +24,7 @@ // Common string numbers enum { // General messages - STR_ABOUT_TEXT1 = 0, - STR_ABOUT_TEXT2, + STR_ABOUT_TEXT = 0, STR_READING_ROM_FILE, STR_SHELL_ERROR_PREFIX, STR_GUI_ERROR_PREFIX, diff --git a/BasiliskII/src/include/version.h b/BasiliskII/src/include/version.h index 79ba3196d..fd07bb564 100644 --- a/BasiliskII/src/include/version.h +++ b/BasiliskII/src/include/version.h @@ -21,9 +21,10 @@ #ifndef VERSION_H #define VERSION_H -const int VERSION_MAJOR = 1; -const int VERSION_MINOR = 1; - -#define VERSION_STRING "Basilisk II V1.0 SDL2" +#ifdef PACKAGE_VERSION // from config.h +#define VERSION_STRING PACKAGE_VERSION +#else +#define VERSION_STRING "1.0" +#endif #endif diff --git a/BasiliskII/src/slot_rom.cpp b/BasiliskII/src/slot_rom.cpp index d46d03298..9da179e95 100644 --- a/BasiliskII/src/slot_rom.cpp +++ b/BasiliskII/src/slot_rom.cpp @@ -32,10 +32,8 @@ #include "main.h" #include "video.h" #include "emul_op.h" -#include "version.h" #include "slot_rom.h" - // Temporary buffer for slot ROM static uint8 srom[4096]; @@ -243,7 +241,6 @@ bool InstallSlotROM(void) vector::const_iterator m, mend = VideoMonitors.end(); vector sRsrcVideo; - char str[256]; int i; p = 0; @@ -255,8 +252,7 @@ bool InstallSlotROM(void) vendorID = p; String("Christian Bauer"); revLevel = p; - sprintf(str, "V%d.%d", VERSION_MAJOR, VERSION_MINOR); - String(str); + String("V1.0"); partNum = p; String("BasiliskII"); date = p; diff --git a/BasiliskII/src/user_strings.cpp b/BasiliskII/src/user_strings.cpp index d15cf01d9..2c813157c 100644 --- a/BasiliskII/src/user_strings.cpp +++ b/BasiliskII/src/user_strings.cpp @@ -35,11 +35,11 @@ #define ELLIPSIS "..." +#include "version.h" // Common string definitions user_string_def common_strings[] = { - {STR_ABOUT_TEXT1, "Basilisk II V%d.%d"}, - {STR_ABOUT_TEXT2, "by Christian Bauer et al."}, + {STR_ABOUT_TEXT, "Basilisk II V" VERSION_STRING " by Christian Bauer et al.\n"}, {STR_READING_ROM_FILE, "Reading ROM file...\n"}, {STR_SHELL_ERROR_PREFIX, "ERROR: %s\n"}, {STR_GUI_ERROR_PREFIX, "Basilisk II error:\n%s"}, diff --git a/SheepShaver/src/Unix/configure.ac b/SheepShaver/src/Unix/configure.ac index d3da4317f..33dc2666c 100755 --- a/SheepShaver/src/Unix/configure.ac +++ b/SheepShaver/src/Unix/configure.ac @@ -1,7 +1,7 @@ dnl Process this file with autoconf to produce a configure script. dnl Written in 2002 by Christian Bauer -AC_INIT([SheepShaver], 2.4, [Christian.Bauer@uni-mainz.de], SheepShaver) +AC_INIT([SheepShaver], [m4_esyscmd_s([git describe --always --tags --dirty])]) AC_CONFIG_SRCDIR(main_unix.cpp) AC_PREREQ(2.52) AC_CONFIG_HEADER(config.h) diff --git a/SheepShaver/src/Unix/main_unix.cpp b/SheepShaver/src/Unix/main_unix.cpp index f521d5e93..178c9f75e 100755 --- a/SheepShaver/src/Unix/main_unix.cpp +++ b/SheepShaver/src/Unix/main_unix.cpp @@ -715,8 +715,7 @@ int main(int argc, char **argv){ tzset(); // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); + printf(GetString(STR_ABOUT_TEXT)); #if !EMULATED_PPC #ifdef SYSTEM_CLOBBERS_R2 diff --git a/SheepShaver/src/Unix/prefs_editor_gtk.cpp b/SheepShaver/src/Unix/prefs_editor_gtk.cpp index 81b16f14b..828cc8649 100644 --- a/SheepShaver/src/Unix/prefs_editor_gtk.cpp +++ b/SheepShaver/src/Unix/prefs_editor_gtk.cpp @@ -365,40 +365,40 @@ static void dl_quit(GtkWidget *dialog) } // "About" selected -static void mn_about(...) -{ - GtkWidget *dialog, *label, *button; - - char str[512]; - sprintf(str, - "SheepShaver\nVersion %d.%d\n\n" - "Copyright (C) 1997-2008 Christian Bauer and Marc Hellwig\n" - "E-mail: cb@cebix.net\n" - "http://sheepshaver.cebix.net/\n\n" - "SheepShaver comes with ABSOLUTELY NO\n" - "WARRANTY. This is free software, and\n" - "you are welcome to redistribute it\n" - "under the terms of the GNU General\n" - "Public License.\n", - VERSION_MAJOR, VERSION_MINOR +static void mn_about(...){ + const gchar* authors[] = { + "Christian Bauer ", + "Orlando Bassotto", + "Gwenolé Beauchesne", + "Marc Chabanas", + "Marc Hellwig", + "Biill Huey", + "Brian J. Johnson", + "Jürgen Lachmann", + "Samuel Lander", + "David Lawrence", + "Lauri Pesonen", + "Bernd Schmidt", + "Callum Lerwick ", + "and others", + NULL + }; + gtk_show_about_dialog(GTK_WINDOW(win), + "version", VERSION_STRING, + "copyright", "Copyright (C) 1997-2008 Christian Bauer et al.", +#ifdef SHEEPSHAVER + "website", "http://sheepshaver.cebix.net/", +#else + "website", "http://basilisk.cebix.net/", +#endif + "authors", authors, + "license", + PACKAGE_NAME " comes with ABSOLUTELY NO WARRANTY.\n\n" + "This is free software, and you are welcome to redistribute it " + "under the terms of the GNU General Public License.", + "wrap-license", true, + NULL ); - - dialog = gtk_dialog_new(); - gtk_window_set_title(GTK_WINDOW(dialog), GetString(STR_ABOUT_TITLE)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - - label = gtk_label_new(str); - gtk_widget_show(label); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), label, TRUE, TRUE, 0); - - button = gtk_button_new_with_label(GetString(STR_OK_BUTTON)); - gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); - gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); - gtk_widget_grab_default(button); - gtk_widget_show(dialog); } // "Zap NVRAM" selected @@ -712,8 +712,6 @@ static GtkWidget *l_frameskip, *l_display_x, *l_display_y; static int display_type; static int dis_width, dis_height; -static GtkWidget *w_dspdevice_file, *w_mixerdevice_file; - // Hide/show graphics widgets static void hide_show_graphics_widgets(void) { @@ -756,11 +754,8 @@ static void tb_gfxaccel(GtkWidget *widget) } // Set sensitivity of widgets -static void set_graphics_sensitive(void) -{ +static void set_graphics_sensitive(void){ const bool sound_enabled = !PrefsFindBool("nosound"); - gtk_widget_set_sensitive(w_dspdevice_file, sound_enabled); - gtk_widget_set_sensitive(w_mixerdevice_file, sound_enabled); } // "Disable Sound Output" button toggled @@ -857,9 +852,6 @@ static void read_graphics_settings(void) PrefsRemoveItem("windowmodes"); PrefsRemoveItem("screenmodes"); } - - PrefsReplaceString("dsp", get_file_entry_path(w_dspdevice_file)); - PrefsReplaceString("mixer", get_file_entry_path(w_mixerdevice_file)); } // Create "Graphics/Sound" pane @@ -968,8 +960,6 @@ static void create_graphics_pane(GtkWidget *top) make_separator(box); make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); - w_dspdevice_file = make_entry(box, STR_DSPDEVICE_FILE_CTRL, "dsp"); - w_mixerdevice_file = make_entry(box, STR_MIXERDEVICE_FILE_CTRL, "mixer"); set_graphics_sensitive(); diff --git a/SheepShaver/src/Windows/configure.ac b/SheepShaver/src/Windows/configure.ac index b5347be27..b45dc2876 100644 --- a/SheepShaver/src/Windows/configure.ac +++ b/SheepShaver/src/Windows/configure.ac @@ -1,7 +1,7 @@ dnl Process this file with autoconf to produce a configure script. dnl Written in 2002 by Christian Bauer -AC_INIT([SheepShaver], 2.3, [Christian.Bauer@uni-mainz.de], SheepShaver) +AC_INIT([SheepShaver], [m4_esyscmd_s([git describe --always --tags --dirty])]) AC_CONFIG_SRCDIR(main_windows.cpp) AC_CONFIG_AUX_DIR(../Unix) AC_PREREQ(2.52) diff --git a/SheepShaver/src/Windows/main_windows.cpp b/SheepShaver/src/Windows/main_windows.cpp index febc22184..c9cb4a6f2 100755 --- a/SheepShaver/src/Windows/main_windows.cpp +++ b/SheepShaver/src/Windows/main_windows.cpp @@ -165,8 +165,7 @@ int main(int argc, char **argv){ uint8 *rom_tmp; // Print some info - printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR); - printf(" %s\n", GetString(STR_ABOUT_TEXT2)); + printf(GetString(STR_ABOUT_TEXT)); // Read preferences PrefsInit(NULL, argc, argv); diff --git a/SheepShaver/src/include/user_strings.h b/SheepShaver/src/include/user_strings.h index 5a4f4048c..219f47bbb 100644 --- a/SheepShaver/src/include/user_strings.h +++ b/SheepShaver/src/include/user_strings.h @@ -24,8 +24,7 @@ // Common string numbers enum { // General messages - STR_ABOUT_TEXT1 = 0, - STR_ABOUT_TEXT2, + STR_ABOUT_TEXT = 0, STR_READING_ROM_FILE, STR_SHELL_ERROR_PREFIX, STR_GUI_ERROR_PREFIX, diff --git a/SheepShaver/src/include/version.h b/SheepShaver/src/include/version.h index 4b63bfd36..c179be170 100644 --- a/SheepShaver/src/include/version.h +++ b/SheepShaver/src/include/version.h @@ -21,7 +21,10 @@ #ifndef VERSION_H #define VERSION_H -const int VERSION_MAJOR = 2; -const int VERSION_MINOR = 5; +#ifdef PACKAGE_VERSION // from config.h +#define VERSION_STRING PACKAGE_VERSION +#else +#define VERSION_STRING "2.5" +#endif #endif diff --git a/SheepShaver/src/user_strings.cpp b/SheepShaver/src/user_strings.cpp index d88025cd0..d54f335c4 100644 --- a/SheepShaver/src/user_strings.cpp +++ b/SheepShaver/src/user_strings.cpp @@ -32,14 +32,13 @@ #include "sysdeps.h" #include "user_strings.h" +#include "version.h" #define ELLIPSIS "..." - // Common string definitions user_string_def common_strings[] = { - {STR_ABOUT_TEXT1, "SheepShaver V%d.%d"}, - {STR_ABOUT_TEXT2, "by Christian Bauer and Mar\"c\" Hellwig"}, + {STR_ABOUT_TEXT, "SheepShaver V" VERSION_STRING " by Christian Bauer and Mar\"c\" Hellwig\n"}, {STR_READING_ROM_FILE, "Reading ROM file...\n"}, {STR_SHELL_ERROR_PREFIX, "ERROR: %s\n"}, {STR_GUI_ERROR_PREFIX, "SheepShaver error:\n%s"}, From add845a57deea2c8ea7b6303bb2cd18f1180a40d Mon Sep 17 00:00:00 2001 From: Seg Date: Fri, 18 Jun 2021 18:41:28 -0700 Subject: [PATCH 531/534] Remove GTK1 support --- BasiliskII/src/Unix/configure.ac | 42 ++------- BasiliskII/src/Unix/main_unix.cpp | 12 +-- BasiliskII/src/Unix/prefs_editor_gtk.cpp | 105 ++++++++--------------- 3 files changed, 48 insertions(+), 111 deletions(-) diff --git a/BasiliskII/src/Unix/configure.ac b/BasiliskII/src/Unix/configure.ac index 1057d2925..77219b5b7 100755 --- a/BasiliskII/src/Unix/configure.ac +++ b/BasiliskII/src/Unix/configure.ac @@ -1,6 +1,3 @@ -dnl Process this file with autoconf to produce a configure script. -dnl Written in 2002 by Christian Bauer et al. - AC_INIT([Basilisk II], [m4_esyscmd_s([git describe --always --tags --dirty])]) AC_CONFIG_SRCDIR(main_unix.cpp) AC_PREREQ(2.52) @@ -63,14 +60,7 @@ AC_ARG_ENABLE(addressing, ]) dnl External packages. -AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], - [case "$withval" in - gtk1) WANT_GTK="gtk";; - gtk|gtk2) WANT_GTK="$withval";; - yes) WANT_GTK="gtk2 gtk";; - *) WANT_GTK="no";; - esac], - [WANT_GTK="gtk2 gtk"]) +AC_ARG_WITH(gtk, [ --with-gtk use GTK user interface [default=yes]], [WANT_GTK=$withval], [WANT_GTK=yes]) AC_ARG_WITH(mon, [ --with-mon use mon as debugger [default=no]], [WANT_MON=$withval], [WANT_MON=no]) AC_ARG_WITH(bincue, @@ -357,32 +347,14 @@ AC_CHECK_FUNCS(sem_init, , [ dnl We use GTK+ if possible. UISRCS=../dummy/prefs_editor_dummy.cpp -case "x$WANT_GTK" in -xgtk2*) - AM_PATH_GTK_2_0(1.3.15, [ - GUI_CFLAGS="$GTK_CFLAGS" - GUI_LIBS="$GTK_LIBS" - WANT_GTK=gtk2 - ], [ - case "x${WANT_GTK}x" in - *gtkx) - AC_MSG_WARN([Could not find GTK+ 2.0, trying with GTK+ 1.2.]) - WANT_GTK=gtk - ;; - *) - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) - WANT_GTK=no - ;; - esac - ]) - ;; -esac -if [[ "x$WANT_GTK" = "xgtk" ]]; then - AM_PATH_GTK(1.2.0, [ - GUI_CFLAGS="$GTK_CFLAGS" +if [[ "x$WANT_GTK" = "xyes" ]]; then + AM_PATH_GTK_2_0(2.6.0, [ + GUI_CFLAGS="$GTK_CFLAGS -DGTK_DISABLE_SINGLE_INCLUDES" + GUI_CFLAGS="$GUI_CFLAGS -DGDK_DISABLE_DEPRECATED" + #GUI_CFLAGS="$GUI_CFLAGS -DGTK_DISABLE_DEPRECATED" GUI_LIBS="$GTK_LIBS" ], [ - AC_MSG_WARN([Could not find GTK+, disabling user interface.]) + AC_MSG_WARN([Could not find GTK+ 2.x, disabling user interface.]) WANT_GTK=no ]) fi diff --git a/BasiliskII/src/Unix/main_unix.cpp b/BasiliskII/src/Unix/main_unix.cpp index 9b3d2f0d9..a041e4091 100755 --- a/BasiliskII/src/Unix/main_unix.cpp +++ b/BasiliskII/src/Unix/main_unix.cpp @@ -375,7 +375,6 @@ int main(int argc, char **argv){ #ifdef ENABLE_GTK if (!gui_connection) { // Init GTK - gtk_set_locale(); gtk_init(&argc, &argv); g_set_application_name("Basilisk II"); } @@ -863,16 +862,13 @@ static void dl_quit(GtkWidget *dialog) gtk_widget_destroy(dialog); } -void display_alert(int title_id, int prefix_id, int button_id, const char *text) -{ +void display_alert(int title_id, int prefix_id, int button_id, const char *text){ char str[256]; sprintf(str, GetString(prefix_id), text); GtkWidget *dialog = gtk_dialog_new(); gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); - gtk_container_border_width(GTK_CONTAINER(dialog), 5); - gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); + g_signal_connect(GTK_OBJECT(dialog), "destroy", G_CALLBACK(dl_destroyed), NULL); GtkWidget *label = gtk_label_new(str); gtk_widget_show(label); @@ -880,9 +876,9 @@ void display_alert(int title_id, int prefix_id, int button_id, const char *text) GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); + g_signal_connect_swapped(GTK_OBJECT(button), "clicked", G_CALLBACK(dl_quit), GTK_OBJECT(dialog)); gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); - GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); + gtk_widget_set_can_default(button,true); gtk_widget_grab_default(button); gtk_widget_show(dialog); diff --git a/BasiliskII/src/Unix/prefs_editor_gtk.cpp b/BasiliskII/src/Unix/prefs_editor_gtk.cpp index a90dd4d0c..4f2d837b8 100644 --- a/BasiliskII/src/Unix/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Unix/prefs_editor_gtk.cpp @@ -64,7 +64,7 @@ static void read_settings(void); struct opt_desc { int label_id; - GtkSignalFunc func; + GCallback func; }; struct combo_desc { @@ -77,39 +77,35 @@ struct file_req_assoc { GtkWidget *entry; }; -static void cb_browse_ok(GtkWidget *button, file_req_assoc *assoc) -{ +static void cb_browse_ok(GtkWidget *button, file_req_assoc *assoc){ gchar *file = (char *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); gtk_entry_set_text(GTK_ENTRY(assoc->entry), file); gtk_widget_destroy(assoc->req); delete assoc; } -static void cb_browse(GtkWidget *widget, void *user_data) -{ +static void cb_browse(GtkWidget *widget, void *user_data){ GtkWidget *req = gtk_file_selection_new(GetString(STR_BROWSE_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(cb_browse_ok), new file_req_assoc(req, (GtkWidget *)user_data)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect_swapped(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(cb_browse_ok), new file_req_assoc(req, (GtkWidget *)user_data)); + g_signal_connect_swapped(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); gtk_widget_show(req); } -static GtkWidget *make_browse_button(GtkWidget *entry) -{ +static GtkWidget *make_browse_button(GtkWidget *entry){ GtkWidget *button; button = gtk_button_new_with_label(GetString(STR_BROWSE_CTRL)); gtk_widget_show(button); - gtk_signal_connect(GTK_OBJECT(button), "clicked", (GtkSignalFunc)cb_browse, (void *)entry); + g_signal_connect(GTK_OBJECT(button), "clicked", (GCallback)cb_browse, (void *)entry); return button; } -static void add_menu_item(GtkWidget *menu, int label_id, GtkSignalFunc func) -{ +static void add_menu_item(GtkWidget *menu, int label_id, GCallback func){ GtkWidget *item = gtk_menu_item_new_with_label(GetString(label_id)); gtk_widget_show(item); - gtk_signal_connect(GTK_OBJECT(item), "activate", func, NULL); - gtk_menu_append(GTK_MENU(menu), item); + g_signal_connect(GTK_OBJECT(item), "activate", func, NULL); + gtk_menu_shell_append(GTK_MENU_SHELL(menu), item); } static GtkWidget *make_pane(GtkWidget *notebook, int title_id) @@ -130,8 +126,7 @@ static GtkWidget *make_pane(GtkWidget *notebook, int title_id) return box; } -static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *buttons) -{ +static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *buttons){ GtkWidget *bb, *button; bb = gtk_hbutton_box_new(); @@ -144,7 +139,7 @@ static GtkWidget *make_button_box(GtkWidget *top, int border, const opt_desc *bu while (buttons->label_id) { button = gtk_button_new_with_label(GetString(buttons->label_id)); gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", buttons->func, NULL); + g_signal_connect_swapped(GTK_OBJECT(button), "clicked", buttons->func, NULL); gtk_box_pack_start(GTK_BOX(bb), button, TRUE, TRUE, 0); buttons++; } @@ -167,8 +162,7 @@ static GtkWidget *make_table(GtkWidget *top, int x, int y) return table; } -static GtkWidget *table_make_option_menu(GtkWidget *table, int row, int label_id, const opt_desc *options, int active) -{ +static GtkWidget *table_make_option_menu(GtkWidget *table, int row, int label_id, const opt_desc *options, int active){ GtkWidget *label, *opt, *menu; label = gtk_label_new(GetString(label_id)); @@ -273,8 +267,7 @@ static GtkWidget *make_option_menu(GtkWidget *top, int label_id, const opt_desc return menu; } -static GtkWidget *make_file_entry(GtkWidget *top, int label_id, const char *prefs_item, bool only_dirs = false) -{ +static GtkWidget *make_file_entry(GtkWidget *top, int label_id, const char *prefs_item, bool only_dirs = false){ GtkWidget *box, *label, *entry; box = gtk_hbox_new(FALSE, 4); @@ -289,35 +282,23 @@ static GtkWidget *make_file_entry(GtkWidget *top, int label_id, const char *pref if (str == NULL) str = ""; -#ifdef HAVE_GNOMEUI - entry = gnome_file_entry_new(NULL, GetString(label_id)); - if (only_dirs) - gnome_file_entry_set_directory(GNOME_FILE_ENTRY(entry), true); - gtk_entry_set_text(GTK_ENTRY(gnome_file_entry_gtk_entry(GNOME_FILE_ENTRY(entry))), str); -#else entry = gtk_entry_new(); gtk_entry_set_text(GTK_ENTRY(entry), str); -#endif gtk_widget_show(entry); gtk_box_pack_start(GTK_BOX(box), entry, TRUE, TRUE, 0); return entry; } -static const gchar *get_file_entry_path(GtkWidget *entry) -{ -#ifdef HAVE_GNOMEUI - return gnome_file_entry_get_full_path(GNOME_FILE_ENTRY(entry), false); -#else +static const gchar *get_file_entry_path(GtkWidget *entry){ return gtk_entry_get_text(GTK_ENTRY(entry)); -#endif } -static GtkWidget *make_checkbox(GtkWidget *top, int label_id, const char *prefs_item, GtkSignalFunc func) +static GtkWidget *make_checkbox(GtkWidget *top, int label_id, const char *prefs_item, GCallback func) { GtkWidget *button = gtk_check_button_new_with_label(GetString(label_id)); gtk_widget_show(button); gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(button), PrefsFindBool(prefs_item)); - gtk_signal_connect(GTK_OBJECT(button), "toggled", func, button); + g_signal_connect(GTK_OBJECT(button), "toggled", func, button); gtk_box_pack_start(GTK_BOX(top), button, FALSE, FALSE, 0); return button; } @@ -446,8 +427,8 @@ bool PrefsEditor(void){ // Create window win = gtk_window_new(GTK_WINDOW_TOPLEVEL); gtk_window_set_title(GTK_WINDOW(win), GetString(STR_PREFS_TITLE)); - gtk_signal_connect(GTK_OBJECT(win), "delete_event", GTK_SIGNAL_FUNC(window_closed), NULL); - gtk_signal_connect(GTK_OBJECT(win), "destroy", GTK_SIGNAL_FUNC(window_destroyed), NULL); + g_signal_connect(GTK_OBJECT(win), "delete_event", GTK_SIGNAL_FUNC(window_closed), NULL); + g_signal_connect(GTK_OBJECT(win), "destroy", GTK_SIGNAL_FUNC(window_destroyed), NULL); // Create window contents GtkWidget *box = gtk_vbox_new(FALSE, 4); @@ -457,11 +438,7 @@ bool PrefsEditor(void){ GtkAccelGroup *accel_group = gtk_accel_group_new(); GtkItemFactory *item_factory = gtk_item_factory_new(GTK_TYPE_MENU_BAR, "
    ", accel_group); gtk_item_factory_create_items(item_factory, sizeof(menu_items) / sizeof(menu_items[0]), menu_items, NULL); -#if GTK_CHECK_VERSION(1,3,15) gtk_window_add_accel_group(GTK_WINDOW(win), accel_group); -#else - gtk_accel_group_attach(accel_group, GTK_OBJECT(win)); -#endif GtkWidget *menu_bar = gtk_item_factory_get_widget(item_factory, "
    "); gtk_widget_show(menu_bar); gtk_box_pack_start(GTK_BOX(box), menu_bar, FALSE, TRUE, 0); @@ -509,8 +486,7 @@ static void cl_selected(GtkWidget *list, int row, int column) } // Volume selected for addition -static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ +static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc){ gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); gtk_clist_append(GTK_CLIST(volume_list), &file); gtk_widget_destroy(assoc->req); @@ -518,8 +494,7 @@ static void add_volume_ok(GtkWidget *button, file_req_assoc *assoc) } // Volume selected for creation -static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc) -{ +static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc){ gchar *file = (gchar *)gtk_file_selection_get_filename(GTK_FILE_SELECTION(assoc->req)); const gchar *str = gtk_entry_get_text(GTK_ENTRY(assoc->entry)); @@ -535,18 +510,16 @@ static void create_volume_ok(GtkWidget *button, file_req_assoc *assoc) } // "Add Volume" button clicked -static void cb_add_volume(...) -{ +static void cb_add_volume(...){ GtkWidget *req = gtk_file_selection_new(GetString(STR_ADD_VOLUME_TITLE)); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(add_volume_ok), new file_req_assoc(req, NULL)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect_swapped(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(add_volume_ok), new file_req_assoc(req, NULL)); + g_signal_connect_swapped(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); gtk_widget_show(req); } // "Create Hardfile" button clicked -static void cb_create_volume(...) -{ +static void cb_create_volume(...){ GtkWidget *req = gtk_file_selection_new(GetString(STR_CREATE_VOLUME_TITLE)); GtkWidget *box = gtk_hbox_new(FALSE, 4); @@ -562,15 +535,14 @@ static void cb_create_volume(...) gtk_box_pack_start(GTK_BOX(box), entry, FALSE, FALSE, 0); gtk_box_pack_start(GTK_BOX(GTK_FILE_SELECTION(req)->main_vbox), box, FALSE, FALSE, 0); - gtk_signal_connect_object(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); - gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(create_volume_ok), new file_req_assoc(req, entry)); - gtk_signal_connect_object(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect_swapped(GTK_OBJECT(req), "delete_event", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); + g_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(req)->ok_button), "clicked", GTK_SIGNAL_FUNC(create_volume_ok), new file_req_assoc(req, entry)); + g_signal_connect_swapped(GTK_OBJECT(GTK_FILE_SELECTION(req)->cancel_button), "clicked", GTK_SIGNAL_FUNC(gtk_widget_destroy), GTK_OBJECT(req)); gtk_widget_show(req); } // "Remove Volume" button clicked -static void cb_remove_volume(...) -{ +static void cb_remove_volume(...){ gtk_clist_remove(GTK_CLIST(volume_list), selected_volume); } @@ -579,14 +551,12 @@ static void mn_boot_any(...) {PrefsReplaceInt32("bootdriver", 0);} static void mn_boot_cdrom(...) {PrefsReplaceInt32("bootdriver", CDROMRefNum);} // "No CD-ROM Driver" button toggled -static void tb_nocdrom(GtkWidget *widget) -{ +static void tb_nocdrom(GtkWidget *widget){ PrefsReplaceBool("nocdrom", GTK_TOGGLE_BUTTON(widget)->active); } // Read settings from widgets and set preferences -static void read_volumes_settings(void) -{ +static void read_volumes_settings(void){ while (PrefsFindString("disk")) PrefsRemoveItem("disk"); @@ -600,8 +570,7 @@ static void read_volumes_settings(void) } // Create "Volumes" pane -static void create_volumes_pane(GtkWidget *top) -{ +static void create_volumes_pane(GtkWidget *top){ GtkWidget *box, *scroll; box = make_pane(top, STR_VOLUMES_PANE_TITLE); @@ -614,7 +583,7 @@ static void create_volumes_pane(GtkWidget *top) gtk_clist_set_selection_mode(GTK_CLIST(volume_list), GTK_SELECTION_SINGLE); gtk_clist_set_shadow_type(GTK_CLIST(volume_list), GTK_SHADOW_NONE); gtk_clist_set_reorderable(GTK_CLIST(volume_list), true); - gtk_signal_connect(GTK_OBJECT(volume_list), "select_row", GTK_SIGNAL_FUNC(cl_selected), NULL); + g_signal_connect(GTK_OBJECT(volume_list), "select_row", GTK_SIGNAL_FUNC(cl_selected), NULL); char *str; int32 index = 0; while ((str = const_cast(PrefsFindString("disk", index++))) != NULL) @@ -1479,7 +1448,7 @@ static void display_alert(int title_id, int prefix_id, int button_id, const char gtk_window_set_title(GTK_WINDOW(dialog), GetString(title_id)); gtk_container_border_width(GTK_CONTAINER(dialog), 5); gtk_widget_set_uposition(GTK_WIDGET(dialog), 100, 150); - gtk_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); + g_signal_connect(GTK_OBJECT(dialog), "destroy", GTK_SIGNAL_FUNC(dl_destroyed), NULL); GtkWidget *label = gtk_label_new(str); gtk_widget_show(label); @@ -1487,7 +1456,7 @@ static void display_alert(int title_id, int prefix_id, int button_id, const char GtkWidget *button = gtk_button_new_with_label(GetString(button_id)); gtk_widget_show(button); - gtk_signal_connect_object(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); + g_signal_connect_swapped(GTK_OBJECT(button), "clicked", GTK_SIGNAL_FUNC(dl_quit), GTK_OBJECT(dialog)); gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->action_area), button, FALSE, FALSE, 0); GTK_WIDGET_SET_FLAGS(button, GTK_CAN_DEFAULT); gtk_widget_grab_default(button); From d715aa8328b050eb122d01387e8a767cbfcab9e1 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 19 Jun 2021 13:18:05 -0700 Subject: [PATCH 532/534] Use new icon --- BasiliskII/src/Unix/flatpak/BasiliskII128.png | Bin 217 -> 14629 bytes BasiliskII/src/Unix/flatpak/BasiliskII64.png | Bin 207 -> 5026 bytes 2 files changed, 0 insertions(+), 0 deletions(-) diff --git a/BasiliskII/src/Unix/flatpak/BasiliskII128.png b/BasiliskII/src/Unix/flatpak/BasiliskII128.png index 0aac0f1744433cb7944f5e2d6bc8e94ce9115163..5cccc26b1694b10f07059a95875994e7ca95fca2 100644 GIT binary patch literal 14629 zcmV+=IoigFP)6bAW*hWl3VVAY>*ugO8wr%MR|n$AWA77i zv2OqoHv5Md3vOedzslaPHC{sNNd*A&5>&FmevQ37116Uj9qj-8>{o5{-{5AVn{}6*DHp##5M@2V zApnF)hVT)`+4mb*f0F&}5o0AL5U7Rh&*wlNQ#(C68ZmkD8hVW9!tGMzg+`ocx|1}x@6nQB4>gT4!2fl7M z%_>gxa@I>&_ecU0QHSJw#N^yKq(sP)uMUlYO!+>@dOPdQ{2FH5fxq3l8MptTeQYGc z@Bp|BPcd=yew-^2tvJcrjS*NC=4g)eDEHAjq{w{@c&iC3o{8gwe?0(OOTcFKGisQI zEuNK?Wp;ISCEj=S)mJ;5&gZO`%rnDyAhc>vRb+5FCwz@0yiIa%y98NS5}rxJa1^GK z{oQ8gYC)(5A6HnUEK;VW0*YP!zKQjNZ0J!8KHrZoPoIgOcQH_$_vDCY@wfo+7MqhL zcn|xBR~wivR!6Gk#{vMxFt0igY;scTfIGM2qd#fHbCPFcHk&Q#^?D;d*7Ngn;$2p~{oRW|e?YE!9U%N)RQvNG6dX##H$w=&(r^F8ef8$|S9K*? zB{Y;ZkRyTSk%HgBc*$GkMcJn-aK*>VaY24IBR7Fyil$1H;Yg}sH#fKOWE)=k{C?x+ zE2sHFO+$9m>CTF-*xH&H3mf21Y=S??WPlicG{Y~AQR42=7=0#iT7g0ObuI9dU08kR zZv0phDI&Es@p0$;`STal)YLrAbU&z5yE0afPX)FB6bhQB>G?f^C|xnz_D}A!f8fc+ zXp~BlwZ+_`}C{;FTeAuw z+*pB2e?13}HT8z`p54@x(>oOOxEzM#mg|<;Mo$7y6&foxRmtO>p*3Fx?;Xcsv27|NGN8KZwzg)sx3_2a_xEQF4i07w4Gnq2;joKc&%wZC zlhP!?u1WVxu=l2tF6{3H`<{(D-Ls&#x$I%vrUiLd36 zNNucd1KwWpQIvl2o9OH7_9}|I~ zd*>$H`r3El_793x1{FNAY3?I40?nRmJpT`mV)Fd6lH;b|2LpkBojqsHBPXf?>Unf3 zq|6rCowB>+V7#*XG~uRqho&}0qwCjJ_g30f-OHwZUp*lsTuUSi`<;cHNHp0r=`{J& zcJAECi9y5xGp_GRY(jx2B=oUE5+NcuuXpm9$iC%Eobb$LL{Co-@AU6LAi%Fn1ZI*2 z+1c6f`~Aqz&qqN)0q=!{g(xa2;=Q=In0I<#Qc}XdU$f*Q{Pnz#GmAt@8)Y>lBoJsU z3m6_3cYW(dhyn$evAC+^T0$uC;Gs^K$7zbKy;m~tSsK?di1I!0CnBK zq^3ZqqySxqz!>`dLwN75KZ8r*0{I+}WARDXb2IS7#a}_i#nmxVw^Ai(N6g~m_e^PO>CsAZ({>v8wC5tUxeNJ(>*9a!-o2b4 zL@ZA%gx_KfvMVA&?}wxmp~-)n`QA%Df&34D8O_bjoa>q1PjWq7ldhMOlLKZ;aAGLp zE4xA$|H-+QMkkGnIG8{{pLMr3W6n=Mi30lpv8<$wT)QS+-voBWW?={>a-<74L>f?C$i&k5l4wc_Fsu6Ij#B(6 z_dQ7yLg~!z?rzS-B(A-z-xl10o3on4gexb}BV4d}Ya!nH-2btEXMq`g=T|T2z30GedFM3ZO$jZ;koEHk1f3mPoI4| zHqW{OO_LU((O-jh28bbd4ooMTE$R*@OuOiCFlj)jXOlB(-Q`JkyW5MfHxF$&71&&U z7JlQNE;u%%!MjIz_^&#uU}wLl308z4q7fGpXVPT*LVfsvy;Vf`vNgjiB5a5~GcJNR zzliI7W%w~`pWliIO`J~vpib`z5F};jK8pK~XpphL)Ay*;@2FK>^gi@fED!-FNUn!w z50r?A!;C$z^JgJ-#9nFidCko&KBn3nY;3j>0l@Z>xehO)CU)`VHwI>$yUpp#W(;oQ zVv4#FUHZUjBB|2@=$$4gQzy7_&^)Vh2vC_88|i&U!EBdR_0+HR*YY^OWeP_cT@|_N^lSsFpb!pXxd6 zdV9{e2I!KiS1oWQG)cffu%L4%`dS(|DA^b(bXUYwQx;QEZZ^h|0YEa5`TVY+QCW~n zKJ8&d)(J_7r>+bidR2N*@AR4K*1sK3*RSLAxN)|vU#zs*HRF#-fR*-2B)nopSLc4x z-<cV~A z`5u9e^Iz_e(O2wN+kof)m>pn)xUwMl}gSK@w} zWCiHba5qX^K>>h-ws=JE2iV+~&16EsmUQ)096`7Eb!&eloIhMEsF;kNnnl70k4sQ0 zH4sbX9u#)$<6|2d8p_hb(K*bXa1Ceg9TNbaef94NyUU$WlcgS75nLy%P8{{QB9!&L z0*Dn9$I^8`ksn*opxLQ07K@ zq~qw9){IB99*!RX-1cxfDU2zMB`Mk!m+M_|zv=`KC8qWFC#nXl*O)WZAS3G%0R6)F zTbn-%Svk2$ADntiOH0xdAR?Oa7|t=fMYLWeX+UyXNKE=rc40EoN1|VGzfyZj=PTVk zTHLQ%pmLTV{-CxNqavR&zo0nKgGeYq0Cma8NWPpAuVy`r3;-0z)+K-ffg-9N^x*z9 zn-F?c6Qoa+ZZDi@r+W|q&+6GN@a~io!x%ak^P*$&qNJ!-ow#4UClKUC2T|b;rIvV2 zZFV9;3dG$${yP%=iu)A+ltId+iEV5Wt^E~~1v-NnBme}7bC^4f;2^n>PRaSXvimH_ zX~z!$-FjBWpOuihWlmigi>m8fs1ro*G`T9Ys&@)=4)+^$G@>ZlE`%N=(U{e|(LV#8 zf|4}XPq+M)3djmGKse2m^e_)!?v6&nT=c6jud;=d5xjr@emwWwb6Bxr1)h24nPjIp z!)UaUvNHA@?o?pPuq=o%@_KCvxFbU(q3n|Db7TUVM@BVH2mq$;qNs%p^{Ti@O{@}w z$J@!muCK2@thcqbW&A$1^SZV$_tX?Z&y*|sOmEj!Eaq;j3boRhn1PfA9{Oy7Gaw{~ zSDRF|lF01=JHmz|sr!{G)H(n8=by(*FTI2pUwkpGuUfTgbVPtRhYih^z9?s;FOG4I zAOcA$R_K$Gz^g6hk6Z$%uKTGvp(mo*5;0UZZWiKOt<^JO(B~*bv}`Ju90~vwz)>Mv zUE(axF$Is&@Ne9X{)O%Q@PF-i*B%pbOe<#RRHIOjuN&?t55a>zr?;Zd+Vqr{bs1wGY zM~eSWpvhMOv$Q4|upt1bz>h8g=-)TpbTgZ|SmrEeGo?MVhq{vb->M470{}*7kjR@- zQ@W>O2zPZb?!cfkO94R7if~vG>E0axDDK#U+<`+v`~%4yHmmdJ!s&AJb#)T|q_v)P%aW5j|2ka0^UmJC*Pd;PF6 zyF|-r94?dc-2s3p2i6NaH&0GRFQsSO(LU)6uKN}D)6%V4$I!+0f&~k>A!qmtgzIQp z0HA^_eqdUl6}DjinEClfm3D{rk;N;Vy0{jpRME--V2`g9c9#b@JTKZ9@nX=)+FX$U zDw^LB+^^EKneTrvXEMx!3a;-}(59oK<1mp;?%Qp*-3F(_jx4W3{9d0fLtAkx0dgHd z6!kW8qmRI(XAY0c^B#C7m3pU30J|VQMF{J2Cm(kd@{|QYY5Oi@1-k?QjFk9aQ?vkf z#?`v@PhilEHhNDvc%0r8C-8Vv08m_|R6tBd)mdNMwVhovnoLHaYpW!Vu>^z>i@>#G ztuS=;P_@$XJnHE~ckwi(@~oTU62q90r!D|$4y+U6Q0?38CR@&d&dPa7?x)FUXlO{w zSx{2ol1nZTpW7Ws)>qJEs{Uf z?qaoHgWTR0ih9-}k)6-SqsN7izB?lRt^j~1)X&8KcCp~;mXF2&uqSUi)7K?w;y;t| zMsw?Jnlw0d0Z`Gp4W4M9m=Hs*kTLPUmWh8GBeXIAiAeO` zs{bcXo}8v9 zR>|=p36mgF8`jN}8UW;$sZA4lr)6d?4g=jNYuzQd-;omkTl_O&_ZOv!e_Hslu3M1! zpEYY%+C8I_<{<7b=LsaRhEPnT?=L)qVb3#wYd8EFfsR&@zt8SDWy%y>ef8D2=9+7$ zutc&`w$g}I-R75>__Xq)M@gz2Nzd&(6JpfpQ8DdZ~>q30O^{`&>S*A~sAkbN@vGo1BbT3ULTFK@bi2+ux8q+CUjzPm{I*>O3A zw7|NE34?emE`99>=szTumz6qDUcm_metO%G_xLvi&?n1#t0f*1K6`-GQ!Ynv$+aBl zN)1V%$5MU~cM^v*32v4RAz#IM9aDL%Ri6*d@32F!5hF3$7f0TJ(>C zKl-AL+6gqAPL9mEfO!K<*4AfG1G+~Lm%K!q$`z(qF*wt`_+mFMh!8uPz*3l2Q_ON1o=k2xee*n@%}-hr&Y{YDUf ziu?mlo@%C^nFovHK1Z3XOM0I+vUf8u4zW4N$o;1j01CSg zprmbgDswj^tpANgv*GY%r-gngcV8uf>Ndc|7hinDd&K>v*zw+f0Z=vWvZ-ICHbD|1Jt^5P&`#N%Q zOR)YQ9!23zpXJX+#3#c~alaD%T8cgyf8^8jvG)OK6edn-08DDy1e-H1#6P6?XOsU< z*`mY5KZ!;i0BZ5a>i%VF*;juI15=jpViL)%SoUFz!k88#AV5;Aeu*#;i$j}n-tRt* zlKYpV?ax0!cT;_uN-$zkPWb$veHKLz+ze;eHnAIdhSb=bz_+7!PPqtM|Mib3x#$|c zs!7jA>FH$rDdH37>nZw$g@q&mI?Kw+hS(4~n|##bSustidF} z%LNPI@cNSCU%5icDAEByRXL8emCss$jmz&ALi9~ZU`GaZpa+WL7PXL&?&6ukTd++Y zLSgW26zzNx-iE)y;bbn}+_)h84C&%+716zpDHmh&SD!)YwYPI_SNjoFEdpiVs9FSy z_$2>bW8(-&9cUzR_x^l=pLDS<8qvgPU4s6Bw^qh+G$<-rnS9OO-0ub>@ zBFI7&@dqD#@R)qilO6!Y9lJ%^x2ne*62Z+i`Ez;VhaQ3@Vk`Zx8-O%1$7OR!&=9C5 zF%Z0b>yOYKXY9I$eYi!F2G#;t)-79BAS94p(k|(KKm@nWXGUmlGtPPCVa)yhhjHk+ z-(sM@FS+DQ&!iJyalYD^s#4V1dlSc4vh$<|z~shFsUlDi&P^iXKJ$@VlTopLW|I}o7jEt|g>9XI|PeslTVcq3~G z;#(bJY1X>0AXB;AOzI+GF&vc_5tl|HEnUnvac1{AT>ZqCFu3M<4gk{m`d&<(`0tve z(CUL5Mc6l2a!faytArapmGhEy`E>EG13;e?@{LCvgODOsuZlw4H|5;-qV@7m;!s|> zh#cxgC9LkD%@Rre$w4ZB^|=j20CBF49|H@KU1RJg0JGv_9-n$KXKmIhXe&*jW$+lnk z^)*5@al??AEJO8P)P<(w_l_m_gZ(UQ>#0P1hh2bSoBXb|`nuY_i3~9Xb+!;a4uy;7 z0h6}B2=C9o$lSxhrd4E}&_-Cd-(9A)!a%M6bro?}eINjZcS;54$ zqtU|sy*Tu%Z)4#jH=wHN4H3OtBn>us3Q4#<3(wYEhhJXuHN1Gv?byBGeb_pC8GbeA zX53%jUBoAtqGKxMTP=vt=adON zS|!>%i~=`@ci{b@ea!8YF?+uxkV6umxq*jfT!@z2{*w{K!xwFc_!PcXV^nJsdW}W1 zqY0Ppdl8HK<%W;BNag)oIo`B@Ku=QnJJSw5eyqIhhp3u8pI>|LuAO)N{6{}{BoH$r zue|p9skatT-LN5b*oqYYgZ2VM%crNU{OQ&|JvedPXz6{w8OGOxZ{qq0BR-u0a+V~1 zTykHFAb!WJi_!bfKY}l>fQM^U1rfCbO%h0z)Kev7d11*ZOk%wE)A+^g52Le(p?tM8 z9-W$PV9h~@Tfkw6wFQ^G7n5H6Ap>3)A4C1YM(^tNb>6^0ziZaanYL33067EgC~Mtu zSmH-r;cU2a^3pbaDC19+YSAbEgbdKc5bh7GX6|>FFuG=H#+gS1qe%32)h;n>X1qRJyIfyQWFHq z>C7Z(Sc|rGukta_=_NgV{r-1$?DB+y!I9Sro{-RQ(?&RqaLW3Zi62|b7A0%xD`Q9J ze(OmbCqn$Y18-rnYaq2ouabIP(r{x2Tz^3=>Ti9JR}UqzuU73;lBT|BL;D&i9i50z zU4Ks!p=9a|?7H@=cxu{mzSAeU`e+3~ru79<8DuB1`I=Mr7jy{wgPg{q!9XBqfJuQ9 zsueumt*TM3{AI}pWK7uQE!~3;i-*11ulg9CSaJsvolbtb zSw;{fGI$1VVMxyJ+=_wi>r|~^%0?*c>gmm5^W_?j)+dz_=7|Mv2Aay}Cw*O| z|E=7AqL%;cT`N&jzg}45<-S3ZGx5B8@;NZhxthD1(x{BO6w}Lte-1H|1Q7mgZRtEpJx`PO=JY?QA39oI@S-!@(FcyR>yXjz3t>rkZ(~c zeTyul&M-eYRRHDvRUNDo;$Kz4U~YG#Z!%B($Rz&t3Zy5pB9=4Qf%%(O2z@^dslBwO z=5z0-EF>>>p8pYa_w;h&E1j<&8bQP)qN`fTN-|lCXj%`4&<~iR-%MV1GhTSlKZzjI zZXBMCl(2w6rl95622mYqFP7$EiLefm$@C|0oxsBG1{8HRh~cWdKcD))MDvlyx`weoi$w-!cG#bM%KkErSCUn6NVcE1X{FP1tSGp=zz zO*Cz)Is`oLXLg9w$E|%8j8efKo%rgkpyLImzK)^iAk@xZh;`?EMC|kFMEYhGD*$YQ z*Q*>+M~OSh_13cSX&%A21Auhr#*G`XWy=xqHVfVFv)IT={I@bp^xF_#bXk)4Y7t7EouE!h(Z&9;o*VGH-~A3> z`N~&t_uY5%>f-w9qw*NCmfnJB&Lj~j1k#gC^z#uDB6{j^nV6Hs0pON|SNo|CD;sYc zZ_Yn(-~fM5Rx?@Bb#-;{Z+%tN!11R-zp=O*J(Ct>6#shk??l9ZMaw(z(V5Q`nl4Rf z3of$o^xwj{==bJx(XVzNDN(J$yh`koL^zs6qEkx0^PTVD^Pm4b-hA^-u1=_}T)8q? zUS40-EGn=nDtSu5m zO~)Q2@fsJQ);<2|$%-Gk@n;3Vi5P&DE!&XPlyQsrw@XRH@bOAC7tvTe>FX=euOAmf zl0XqZ(|CxmKl|CwIJZCg=%XC`R#iyXe(0fx(((}0wcO`j!|>@7`xNw)GV8ekvgmbz zlM~w^Kgp6SD+&NfZ(!U2K&x~L>1iu}!4{NK4IGvCCyO3F9WOyk>mhD!TgCrq`2Mut zp!m=p;dMBXUO!6}VPeCI2Mz2ovy)XgRE*zxSX3s9pE#X}e%D=haS=~yFVh_8jh^>= z-}_z~2&ffQ*P>_2Sz@D|x)d-3iEF*d1N78M2&NCPcTEL&Xgox`#~*(j-~8q`@x?EGk#jl`ojyOFd7`3Nhs8Op4o_wl~%h|AD1D<;7 zDbBIP<@eruFW2d0+^Wdnu`~h|tqpwWLm$F}4?Z|-4r91_z8F`(1^}BT{YOpw8C>D5SJUgtho* zkqHX~(WIRbIGCRI*G&PJEcE7-CAnWW{;cN`rPcbAQi9gyDOf{?I8k4>Ze6mII97e& z;J%cGOk_|2vbh#~pVZb16AjF7rg3eqo&I z<>E7J1T&4aEh=_x*~l>=D!|%&!Cq7}ZxfvFloL)TeHG1tzqBH`T4uHWb>bf{$Ej08 zs5>L_peXCwsOoZa#-N#=Xfl#BlZew5(Mes9K{%2Ek~~7l<_1AzsQPPBE9po98p1`3&dukrF+9TsD~A>0HD0Ta?1NFLaO9B zb8pra&4VjDci5Fb3b#_FFEX5HvX?Ab!a+gBpNZp?t9dM;;Q@y?RXjD5B!~+|8ci5! z)<2Dbh<)anXX1k&{2+etgCB6qoj80<2!5ny1+5_sLk5E8FyBgJ904j52Y^Z@{+*=A z^m=~`1iQ=Tr&av0=KW;~{?O7Z5u~=Z7IWv$<-j=m?6WyI7A;zoR&bhf@dzl?-4v5B zGwA=M#l`+HJLwV${Ii z5Ql=1K}lf3R|Bi4+^ejJk<9yZl^{`EJ#6BKem3v1PP(=5G^r8-3UzmJWl91ZfvZd{ z5Mw>Eb|MbTG!ka|IIYLrGFz%MWJ~N0a41;L7EOyAP7DD2z0D{)v@<>Jn~DDoMRVcs zcr)(#(@*FetwWoFzC00liezx7%#^*H#UucM(rN=t#K~cFbd0UHEtMT)TEf>dNVGfQ zj0R(Ag`rIg@sqzCcK}p1Z)V(M$@>c%*j2ueAM`j}+V_dB{2gWkWEUroTT3&I)YQm5 zdpU?D@2B6}`Z_KEh=yVB?Gyk2($6`PX9toxT@}g-#8ZFO*9zkkDgo$d(@84tPZR&m zUgq~_$oo@)A8X#F#2 zjO_&sY%+PNSZlQ+RjNwgd^WxSDCnWQzj|T(sk}cr=&?W?^r)6w)ym&!=KWdQkS`zo zxus&4Pa*>VY{Erd@=IEaR+0fs93*g@Ly6xk<}^xXhoCgk6v5PTL&lD4ikdX-AO0ysDO4*+kD~ z0Pvc^4oEGujQ_cT+%efFE2d;w0HDg}bWs-793*&deOdvUsJ7anpB!S28vrQpj|YE< z_*%8^W={oBJn5M7{zjV%n=0ptiR(dntv@9Nn5ruB#4*(o^b0lc9%q0r2I+@Ip2&d^BjWzu>)>eJBer@ZkbZU`&1Dnt zM&Ue!{N*%{2GT1Jg^@ZuDmo!5pqh+7ubE1~P~yL0Zd&k1Exe4C^{=;x(~J7r_lPvB zAx#RXsiW0G=B+IE4ZsYDyaRPspt4oQO9J>_|Gg0X`A9!Ikc>atvNmADj+*ln1L?I$ zBa-+-@-;N>MqpaKKTo>&H;X1EWB5H_>LaV%=FR4@5j4ou08Vpg<+ zk407O)XUS3H3*#bo8f)yd2x89N}N%a|9}9%>WU?Zluu9YQbKC)a1g1}!vaVZp&LIp zuvD-2XQYdN+V!J+f2IFNEA9JO+F*7uwlEOz6bU`!RuyI<&@!*(AKe{@2L_U-k*JNG z;~@odp8qKfcOZk6MmJ^RRn*-&`R!uBdW( zHu;`JKT}^X&Atw{f-;`xpdB5nME`(p~w;y(^-LbSaxnHr`zZmiURy{8p<|9iiP znoiQV-z6fb#Qi%;7a_Rl3Z5IOt)C?1$cH5Hdo>9V8`nr6PyC4Yi%CQ(_P?cYHWUAz z39-T=^HWCAyG81GnxIB6~U!j{)q7403Wk{Ox9=%# zTI_$ccm0f{y}tM(=(H7y^LkWCctcJb#V%$5X9Vj}wf;{@uVu7P3{}nl+q;?Hzeb!L zm?O8Hj*^bOIhU^d{$;l5aiPO#es-|Y9LkP;bH+#C>htl!;r^B9gx1HK_%ia5)6cin9)|Zy6lSw{LL(q*|KF^qAoWqskO~5w%MJ#_I&Q^HF%JD00vK4S4pcX@Ir?; zGOywB7VP@;9(=nm%E{7s_1Uv}^Ye1TkH5S=;~|Yl#p7j|3Y+~E2FPlj_FawCp;e|N zK69qNa{xd6+FmfrkXJOQ7Jf?dI4$CKvS#Wf0LZ_gU4?^4mAe{y6=2@W7$6$EiMvtR zNNxLK-1O&m{2?knRa=&owhbb=IZPaOJYK}7_NR6G%wQ;H{y|VL21FX%ibZCZU`9;jviYZU=0=-3A2J1DN(*P z6GG7d!Yev?MZ7|!YS%zMZa@-0=yJItOt+11yp_?S?m%~<$YaM{d-1J1J1bTV_Bh1k zcS#VKa->rQ|4lE2|M`XZuh$piiA84r(m%YmGy9WsBDSrcopw|Zn9ERXUS+=rL8HkC zhVDfflQpDv%B11xlK0)f=Pv$0J?{C^9{f(;y%edFlr;026TM9WpqHtijJki!Re*UV ze#wabF<#}$Cns$k@MZ%xUAzHzYU1CoiGLDXyQSFbM5fmaJoZ2SgkDCm>9YM6N8N}Lmg7|BH7~8JMNAJ>N*o3jcAY?G% zZsJ@<;7eJb!LH#-9uZ%ltw%(~0uRkZcK}_tZO5mc@8tTNU5Vff{ zlKXVBCHV?ufXuE1a62U{uM_~3_SY99EQGppU#Nv;o%LAg9TEU2L#nQUnn|^iIHWDR=(FuXvWNpWF4ek&I`F+k zXzk`fG~Is?_x!pEe-Ec>lvjw5R8sVta-KRR(=^K0wv@$n@I zjI=K_;^nJ0;vUKUH4^()@!ufz*o26Gz0IvIcTAo(bD_g<1d`hH*ERu@CFO6oE4l*P;zfE#|i)0*~^Ai&S01kqS z;qSF$(a#SeyCaOjA2nicP@tFso3%*o3mTL}-z~+z5?`^C0RYo$r`l%Cne!iPs=mS{ zfVLdm)z!80op;`O+Gj_}!fceCn~UnjIVha#Lw2zXF0YZ)?50Nl2=i?Q>w{>1tq(hP z1@Q7qUD(?j(~E#AP{g%vyK;FaMFUN zfrQOO#N>Ip2$;n421163K*B&E8plvv5YsJXh6kxC9$slFc#+!Cn?N#+md{z61VD%U z_kd>b9rN6cIRJ`Wum|JFW=~rpot;{w7iR0wqE@Y%{yM4Jb=O_@JbSrHt^BEcfR>h) z=b04vv((Ri`CR%rV5-Eko|UVg8EW0Wt#9Ktw8(?LxYI7hf48(ChG0qeKGrtoi$VP{ z7{NqZhH6BjwO4X`mnOc#CyVIM(7vSa3{ra*%FD|ylJWL^Qj)c3&!e9-;MK&s-c_Bl zY^08mQtSDH@>(s@OWG$HrNN@}BS-S}CsYDRB&#w|rP7u0BegR?S+VU%RtY$H#J}E_ zFJDd(%=uy+iDw4AxqJ8SPwd;bFQgGy5mXgsR77KU^%!%dZDQ@UIi?baQM`sR(0M&vAqItYP z@XRyMtXKaoEG)Ez!(kf%fpuEeR@Jz?NH5Li(saDta#?-rRz!0Y)x4;jex2h-WuC@s zzms0+UN2UxACGv_6aPrf$!vcaEOKauoC~QkZ7yvdY!(TihlipXhpVpglFZSbqw(DE zW<5Y%7k?S*T%FQQ5m-MiT3Px>ngi?6kqM1a#*8SZ+xUUvNS@c26Z>>K-A=dD?Q}cc bwD$i1x*X9kt6Wet00000NkvXXu0mjf`3Tr$ delta 201 zcmZ2lbdzy{L_HHT0|UdpfX)aY#Tnoe;(Fk~0U#4d`si)!0qgjHQ053HqS;!DtgL_aj7DV&f7qzCC;z z+#Q`93>OL>lsN=8_%av$atO2{xjGCEXq`$Xk?{m+kh4N@w|60ji>st>Vk9*Jl&bRm3d!O?J;g9Q&>;L6t zZ*M;qvHbUHd}l-v0uX0^j|4pC#>04fyH{2J2IGX$6)+P9wCICjf}jU-ArchAN_}?@mVRT+?g+_Yg=R^2dCUE#5K0`zy!Vn(#424jLpP$rp0<46WFdJ_ck4QnJBUU0- z)Ihq1sQN#2pVb_z5bgrxn+pEj+X@DMGBVQb-?y)py`A09WW2wfIlPhUs+i$35je|b zHo~jxCc=TQ`U`8e_Z2o=9wuCTtq|U*tvLZi#8Ls&u7bKmA)I;YAQ(190WV-4zgZ+A z1`*2<(+n)pi4 zTt9>*!V3|Mm}S>l_~NOVP^=>5MvKo=qtgCkA>55H*6+A}in+Gt1lR}CEd-UjWxOeZ~dwcfm`GrEEfJt_8D7DlE2*=O( zYD2kO=fXo9*96DJ#LV>f_m4vt*=S~FmV?-4X=#}wm&>=Bo11S}j4}QCzM@@8xv!S^ z93))jrv-TqU2pwkeOADYs~0`;^S&Rgi30XB|6IedisN%cL=`M+1X8&>By;2Oy&@|a zOc^hS@#DvXv$Hdpnwo-*+yZ{IY6GxPU<9bG4d7wk_i**XC zjvYG&=g*&qD_5?-<;$1h?Afz$c>g~5$-SHS|B>RvmAJNnE9(>C_U+qnFF*fzg9M;I z#ZsVB1?fPslL7NR!hLI_CZohs2a2p^qLK(0WA0lSNl_j~jT!|bM~;O3ig%$DXPpRA zE8D`$f5yY5OP65t=FO0llmx3+uZFL`{u;jf?mM`D|2{l^{1~1*dBX7M(Id#u&xaew z_CdM5f%qJ9y(I#?aP10*4<9D7ew^g#DXW)&0&l(cDqHOzE`?f`teYPKlP6DxDoaw6 zvCw7&{Nkj`23F)QgH-EJ*!vC+4lroYAg~-aMkG5%3}h;&j&SYTHQ2g!D=c5W98yzL z;lP0daO>7BW~^j*P0-&8=9*UqMRdU;2YuKYJs)=M+V#rF$fy&#n^wIf9Go*=D`U-? z=kf9J;OFNDj*gB@rfzO-;Njr`US3`>Y0{)dA#;KW6nn{-G)pXWnBhdgh!G=T*sx)+ zPu>m6{B*=Y6XQ;txQblx8VHGr zi3Mn$vA({(L4&TaK0Esvu|8|oESNH73QV6q9p=oL0}B=`fTc^9LPSJFqj1Z!H^2-W z%v1qRP3*&nBoaRPOeiX7as~MR;+- zhLE)&6aoVS+3b`2y(~yxtLmbtGTW zkPw{6A~bCgqCY~nK?2sVUk?)S_Xa`g`0TUK7>F?G{bS2Qp~T$~D8G2^)QJ&Fsv0n0 z01JL|7v|Fz78WpY;6T9S z2e#RLET*~fqR*DPw}nl!l+69o($e7ExpT~LDWI-ewW>)3U@Rg6HgY%U@|zLBwJ?4SX7x0l*wg8 zKna?*1wlnqw|e71OA$~Ze=LBWdG~iGUnL2;%>K69Sn0adykR^x>O@K1}{&#*6`DV`IP+7Q({9 zL;|MqOfiaQj%Ywr74YMkgP?Y4FV-KZC{>^?9GPlem4M*ii~uHoN^BG|$Vy9O@~6l@ zeE4vn+@G?#mwVQNN{Itb;{;$0QS74&XWaTVDF*x!<0%pv#oY?YjEVSMBH&AeAL4H< z9s_Ew0;d)$+04`WUse7T{Alf`T!04r?AlpSJGK$aD)9aP;U=jaPxE z5AIiHlrdBgwSoK@=4?sjK`tpbY{Evgu}YC^}# zQaO_QFOu=brVZ@bxE5~QxKSwf@WMySB<@x&h5&;PaQ-ndQ z67Xf_Dkgi9Ke+)VP&5cidreGCnEYvGtIAd#tS2^3q|!NA{JF@kEnLaTVg*n`(pP!6 zX9TMK^`L0_P&j$?Fv~k=Nu4%rS|RuU4-h)7N8|AKw$w;T5?6-O32orT5+`_+pI5i>liIWFk6w#s41?TjS6DGc@+b0RVq#vSX=7wE zS%(H|f#wn*$-l(S5Dte2!Lnt`SO6P5crcTHKtMq4Mg;I!ki=CGUD=FL1?V!8UPpVt ziz7KKc2EE<4d?|bulB6WR$J+@``o>I7Y-dd#E7SQB0W7Fa&mHh($mv>8!w$!C7`DK zsfM7mmI5E8zE)ON5E~m?>r58S7z(PXx?%$*k*h%JBJot2x=AYc4xk?2rqXbfJQ4Bq z##PA6%Y$#e`G(ajL_8T!WL&&>@!!_g)_NMX#+pOGg?VmJ?jx&^Klvanja2+l5VW*vLaQ`0s5;_=EQ*_0AAc-5zE5!=eh~~dXi*bV1eNx8Vo4IiEMf6 ztxrIO{HF+TJ7_deS83|hsVwM8^2hbK!S$SG>~`*V@OX~3SW8eb<*fsSPWlXNbA=aA zEIvpr`~<#=go_#An5B>9JihBipRPn#2&0cxcl zGnRts@en)63~`5*0nYI4#J`KnW*E;G5;y@;`kTt%$Is+nJ}bJwqerbvKu!5m^rd2l zjKGWl$^oRbwkD>yI>Jr6E>PqlV^y5mPfTcToIcKagcR7wrRcuP!a`ZqSm?}M zM2Z!>1ZFDh1DE)@7#Hwk(#8{Y6RQ~9>b(hE^vO1E0aHUeyIILE?{S8S8wN- zHbq!(FpL{9Utmic1x0Fz?%%(k)fkjgQ>%_DManR@%%8&QeYPKv!rekjr!l7}K^5iC zw15*QPQ2*W_3ie3KK@v%RS2M2r$LYkHYdka$bZI+8BF#X881cmXxbRjhkIAfv4$vh zg{cZ8(9fq%onmD&uI;R4wktaW9(jBK5c55bq3UxbUlu5i**}Tv}BK5(z|7 zxznF2^Mp9j4azLFp{s##6wRZ9S0?rL1R5fMW=3j%U3Ge&<^3fddax(h0U{$KHJ1OK zkTK!`2&vG)`(&DSW#ucWhg5Lz;6Ya4NJf*oXuGXuAg!8Uy^iq^R}-nAN~gG@3$A|^ za?!jjgk!y3p@s+`BWae2fKp4b@+(7$O;>t@lamuGd0kyyVabvuEFG@vK5RRCDbMB- zDS*nrZ^++a=FFLF_USnb7cOMWsEdnBovR4_jfjy5V0}j4_LUu`G?4(ew}e~V4Fc+I zjcXbN_s&;Bk&D>(yX(-E?Iu&cPa7T+Cr)Hakdz|z3u&MdSinlF>;M&7>415^51~(= zKG3gUKh`?8v9YPuXxg-;S+A`}SkY%ptvsW^3Al~s?L^E*^r$lqXi7lUw)fspCpJ^G z*+FS9Wq(u$NCeadMnG!y9h@FLdN5G))XdDRS^`BgO{CV3th>eY+&4`>IOk|;7*3UZCwAx^1OKsg4% zzv&Bf=yEUObHspV5x^q2n_)%cgWBFSSgQSL>8iR+R$V=4O_xwXKvZS%Lh>iS-?V8{ zqmBL*0n%nmf*7OFv=c2xKto61#S0ak^Me^qk=_HY;I+vFHfSKFIrpZ4@9XV)l(1Po$(fzmO$ z0!JP2>er3s4>>tGaP#KPCK13^0iVk4u`;CreCaW&3{5+Z*g?nZ5Fa&}fZE#LB!3D} zq=a?r)@ejQMIt2C^T7h759!1LXmb?6w#TMd%AedJBshpRMvhh49($+B%OI2gbW#3N z+nZ*eNT67t>7j~>R5+Rkt8f9HnCr5ov^g<=?KDO3sxnXy?uLw|$sq!cAl4$rBRV!I z5n}SE`a8UO+nb_4xdFLDqY5d^2Fn9vqFfOL4%!ejvNubi=^S8Vji+vs+OKUz|4?P6 z51Ff0(DeMw3`6KQiGYf}UugBVHz}Yo@|W~-*ZLMO407bym;+vWz4mY4vi zPoIW|4PHk2(B(=RM2Ao_lxmohB+D>C_ zaNgxD@zH|IlLxal7F`l;9sDmV(b*96X|A}ycojZ53!&ayOA|Q#M5vso&MkC}1 zWd*XclwW3~D^G`eFI8J>i|krzsRNy?l8lXwzry6@xQU5LHu_muN=k|!sz8ZFkh0o6 zY6E^|!@3OR#`HM9Bc4OQD8yAjI^FfgSqsi9y1c}?Aa>ubZ9%s#pY_Yny{3Hp{VnB_ zyxYpBcWx-3-nypzA@_pv)q$)T-aieIh_GmfS5uGbyY~N!ZtTczhYJ-t;@M;j zilv?cyfhPDA2!wsTVnO$ua35XrO;h%tGg8}1Qpvvp+M>;z|R)Kv+iw#vG|b%{8UH| zKO#4@!4qQj9;Q|ZCF~(y0vtDHb#*8rlP4Af8r*iS=ko5^PHWWQ{_lEQehMWP+ED7P zC8_}pQ%w|?GPRZP9IS*Vh^J_D8CVPAcM2l-7d$KlcsyFTV4y7wAlGaB02U+;6P7jOe4Skjo!fS(w3&F{}2M#QV{y_Nl!f>JBzvle=K^*0Bp&Z|Pac;1%e|C4) z;Gm^#BA0q5Z+wI!tofNB-4^*`l}RTSKtAFuuR$#4@^6_3h+mv4ClaWv?%cU^Dv#b- zTy3#DmG$RcUdrmGb7NEZXOg&kn({-DvX&Z~Ak$(u`w-!SSjZ0@z1?Krs!auUcDt$m z$5+*$L4(N6o!3$*|!Kj}Fb2eJz(Z@2AnM59ep@^jq=)Xm}UI zS-D)^1utD49UUWnwr3cZv$K?y4}vNB{r;07*qoM6N<$f-@SBF8}}l delta 191 zcmZ3aex7lHL_HHT0|Uc#_L;swiZj3`#1%*b!GQw@oPx6IfGoz6AirP+hi5m^fSeLf z7sn8b-m_P3^EN2(uwJlgIrmuLkigvIo1EWIsbh4L^Hp(q|J*Z*OGS0j)ul2nA%`AK zRH_!WXf|_5_Rn+d5KYw6(AMr}T=2)@DQgGkv!@nJQ+_Wvx0wHMe%628pna@~3=?c3 o80}|Xxf{fKtLUWXj?`U2!IPgg&ebxsLQ0CT!W$p8QV From 8959de589906a110f4a622f22a5e39a719622a35 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 19 Jun 2021 14:53:41 -0700 Subject: [PATCH 533/534] Merge SDL UI changes from windows --- BasiliskII/src/Unix/prefs_editor_gtk.cpp | 102 ++++++++++++++++++++--- BasiliskII/src/Unix/prefs_unix.cpp | 31 ++----- 2 files changed, 97 insertions(+), 36 deletions(-) diff --git a/BasiliskII/src/Unix/prefs_editor_gtk.cpp b/BasiliskII/src/Unix/prefs_editor_gtk.cpp index 4f2d837b8..966a369a2 100644 --- a/BasiliskII/src/Unix/prefs_editor_gtk.cpp +++ b/BasiliskII/src/Unix/prefs_editor_gtk.cpp @@ -790,15 +790,13 @@ static void hide_show_graphics_widgets(void) } // "Window" video type selected -static void mn_window(...) -{ +static void mn_window(...){ display_type = DISPLAY_WINDOW; hide_show_graphics_widgets(); } // "Fullscreen" video type selected -static void mn_fullscreen(...) -{ +static void mn_fullscreen(...){ display_type = DISPLAY_SCREEN; hide_show_graphics_widgets(); } @@ -818,15 +816,37 @@ static void set_graphics_sensitive(void){ } // "Disable Sound Output" button toggled -static void tb_nosound(GtkWidget *widget) -{ +static void tb_nosound(GtkWidget *widget){ PrefsReplaceBool("nosound", GTK_TOGGLE_BUTTON(widget)->active); set_graphics_sensitive(); } +// SDL Graphics +#ifdef USE_SDL_VIDEO + +// SDL Renderer Render driver +enum { + RENDER_SOFTWARE = 0, + RENDER_OPENGL = 1 +}; + +GtkWidget *w_render_driver; +GtkWidget *l_render_driver; +static int render_driver; +static int sdl_vsync; + +// Render Driver selected +static void mn_sdl_software(...) {render_driver = RENDER_SOFTWARE;} +static void mn_sdl_opengl(...) {render_driver = RENDER_OPENGL;} + +// SDL Renderer Vertical Sync +static void tb_sdl_vsync(GtkWidget *widget){ + PrefsReplaceBool("sdl_vsync", GTK_TOGGLE_BUTTON(widget)->active); +} +#endif + // Read graphics preferences -static void parse_graphics_prefs(void) -{ +static void parse_graphics_prefs(void){ display_type = DISPLAY_WINDOW; dis_width = 512; dis_height = 384; @@ -838,11 +858,38 @@ static void parse_graphics_prefs(void) if (sscanf(str, "dga/%d/%d", &dis_width, &dis_height) == 2) display_type = DISPLAY_SCREEN; } + +#ifdef USE_SDL_VIDEO + render_driver = RENDER_SOFTWARE; + + const char *drv = PrefsFindString("sdlrender"); + if (drv && drv[0]) { + if (strcmp(drv, "software") == 0) + render_driver = RENDER_SOFTWARE; + else if (strcmp(drv, "opengl") == 0) + render_driver = RENDER_OPENGL; + } +#endif +} + +static void read_SDL_graphics_settings(void){ + const char *rpref; + switch (render_driver) { + case RENDER_SOFTWARE: + rpref = "software"; + break; + case RENDER_OPENGL: + rpref = "opengl"; + break; + default: + PrefsRemoveItem("sdlrender"); + return; + } + PrefsReplaceString("sdlrender", rpref); } // Read settings from widgets and set preferences -static void read_graphics_settings(void) -{ +static void read_graphics_settings(void){ const char *str; str = gtk_entry_get_text(GTK_ENTRY(w_display_x)); @@ -864,11 +911,13 @@ static void read_graphics_settings(void) return; } PrefsReplaceString("screen", pref); +#ifdef USE_SDL_VIDEO + read_SDL_graphics_settings(); +#endif } // Create "Graphics/Sound" pane -static void create_graphics_pane(GtkWidget *top) -{ +static void create_graphics_pane(GtkWidget *top){ GtkWidget *box, *table, *label, *opt, *menu, *combo; char str[32]; @@ -969,6 +1018,35 @@ static void create_graphics_pane(GtkWidget *top) gtk_table_attach(GTK_TABLE(table), combo, 1, 2, 3, 4, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); w_display_y = GTK_COMBO(combo)->entry; +#ifdef USE_SDL_VIDEO + make_separator(box); + + table = make_table(box, 2, 5); + + l_render_driver = gtk_label_new(GetString(STR_GRAPHICS_SDL_RENDER_DRIVER_CTRL)); + gtk_widget_show(l_render_driver); + gtk_table_attach(GTK_TABLE(table), l_render_driver, 0, 1, 0, 1, (GtkAttachOptions)0, (GtkAttachOptions)0, 4, 4); + + w_render_driver = gtk_option_menu_new(); + gtk_widget_show(w_render_driver); + menu = gtk_menu_new(); + + add_menu_item(menu, STR_SOFTWARE_LAB, GTK_SIGNAL_FUNC(mn_sdl_software)); + add_menu_item(menu, STR_OPENGL_LAB, GTK_SIGNAL_FUNC(mn_sdl_opengl)); + switch (render_driver) { + case RENDER_SOFTWARE: + gtk_menu_set_active(GTK_MENU(menu), 0); + break; + case RENDER_OPENGL: + gtk_menu_set_active(GTK_MENU(menu), 1); + break; + } + gtk_option_menu_set_menu(GTK_OPTION_MENU(w_render_driver), menu); + gtk_table_attach(GTK_TABLE(table), w_render_driver, 1, 2, 0, 1, (GtkAttachOptions)GTK_FILL, (GtkAttachOptions)0, 4, 4); + + opt = make_checkbox(box, STR_GRAPHICS_SDL_VSYNC_CTRL, "sdl_vsync", GTK_SIGNAL_FUNC(tb_sdl_vsync)); +#endif + make_separator(box); make_checkbox(box, STR_NOSOUND_CTRL, "nosound", GTK_SIGNAL_FUNC(tb_nosound)); diff --git a/BasiliskII/src/Unix/prefs_unix.cpp b/BasiliskII/src/Unix/prefs_unix.cpp index 4ca5fa284..5d2ab5327 100644 --- a/BasiliskII/src/Unix/prefs_unix.cpp +++ b/BasiliskII/src/Unix/prefs_unix.cpp @@ -28,7 +28,6 @@ using std::string; #include "prefs.h" - // Platform-specific preferences items prefs_desc platform_prefs_items[] = { {"fbdevicefile", TYPE_STRING, false, "path of frame buffer device specification file"}, @@ -37,17 +36,16 @@ prefs_desc platform_prefs_items[] = { {"idlewait", TYPE_BOOLEAN, false, "sleep when idle"}, #ifdef USE_SDL_VIDEO {"sdlrender", TYPE_STRING, false, "SDL_Renderer driver (\"auto\", \"software\" (may be faster), etc.)"}, + {"sdl_vsync", TYPE_BOOLEAN, false, "Make SDL_Renderer vertical sync frames to host (eg. with software renderer)"}, #endif {NULL, TYPE_END, false, NULL} // End of list }; - // Prefs file name and path const char PREFS_FILE_NAME[] = ".basilisk_ii_prefs"; string UserPrefsPath; static string prefs_path; - /* * Load preferences from settings file */ @@ -90,13 +88,11 @@ void LoadPrefs(const char *vmdir) } } - /* * Save preferences to settings file */ -void SavePrefs(void) -{ +void SavePrefs(void){ FILE *f; if ((f = fopen(prefs_path.c_str(), "w")) != NULL) { SavePrefsToStream(f); @@ -104,32 +100,19 @@ void SavePrefs(void) } } - /* * Add defaults of platform-specific prefs items * You may also override the defaults set in PrefsInit() */ -void AddPlatformPrefsDefaults(void) -{ +void AddPlatformPrefsDefaults(void){ PrefsAddBool("keycodes", false); PrefsReplaceString("extfs", "/"); PrefsReplaceInt32("mousewheelmode", 1); PrefsReplaceInt32("mousewheellines", 3); -#ifdef __linux__ - if (access("/dev/sound/dsp", F_OK) == 0) { - PrefsReplaceString("dsp", "/dev/sound/dsp"); - } else { - PrefsReplaceString("dsp", "/dev/dsp"); - } - if (access("/dev/sound/mixer", F_OK) == 0) { - PrefsReplaceString("mixer", "/dev/sound/mixer"); - } else { - PrefsReplaceString("mixer", "/dev/mixer"); - } -#else - PrefsReplaceString("dsp", "/dev/dsp"); - PrefsReplaceString("mixer", "/dev/mixer"); -#endif PrefsAddBool("idlewait", true); +#ifdef USE_SDL_VIDEO + PrefsReplaceString("sdlrender", "software"); + PrefsReplaceBool("sdl_vsync", true); +#endif } From c1f47205fc7282d20102cc43912ac07cb91612d6 Mon Sep 17 00:00:00 2001 From: Seg Date: Sat, 19 Jun 2021 15:34:06 -0700 Subject: [PATCH 534/534] Happy Juneteenth! --- BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml b/BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml index 448919608..a5e0dd94b 100644 --- a/BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml +++ b/BasiliskII/src/Unix/flatpak/net.cebix.basilisk.metainfo.xml @@ -24,6 +24,11 @@ Basilisk II is an Open Source 68k Macintosh emulator. That is, it enables you to + + +

    Stability fixes. Happy Juneteenth!

    +     +

    First Flathub release.

    • FGh^Tukg4rCij9q*!Sk#-X~qZ`V?`k~Vh^42l69ujSY9F}-a zL+5rIiRDn=U;CUJ2S2TC))VAnIs+8<1r}cJL5{GC(;r9Bc&xR_%tONQ^?K^LWiBrW z_LKkAxNVmuaWOpmo7IjeH>ZJ{`mACt9}!8%nHIS}(I_lrpM;H`jm({Bywyiu8#ki* zYxQvi-GH&~x%&VKdWk~W%rwt4OvqJZI&X=pN9K01rXvIbfjFuUE0FkS=WV!{Ty$}n z1$|55EAcknwWeHH=t29_wy8x9oVFn9H>vv+5lNvV?fqjc-cET9MJsWO&jr+@8if4Po5Al-PMrnVXwqQna30 z|9A_(#_x5NUk|Ur#`_fQ&v|C8^lI7y%n2%j<*E3Ev>oX9N`z`WwQQL&*D%>0XctEArXK$OGNvqe?xzWJ3XU>KMm zf4LJI?c7dN9hN?wHv9}ZWJ8<&EPx*68XI*k)J+ckX*-3oOhPHXZ)NcL5%%=_M>u5? z+fM$puIKY{DSOKwBxJ_D6>yJEP4`NA3C32!=i@F{-FnRrfLVJC-U8AcuHb3``{Og! z#kDqU^l8FS;=@_4?U>@dPwp;V37IuU#XC|aaoBzwk`y5LqqTR+S#cAP=57pLS}1{h%x$t zs%Of#-^yB37870{wSBe+J%QFq*$^bU%%;*`fk5T5qSyx8J;s9#moJc8bke>Vb%5MTai=;`SM-2Jwx`x$z=CvldT0;M{ zphr8)Ij*Fs30cxMttu;C<#kT&5fsd;as>I6XP&=i&-|3|7Ex@YlVU{}rGExweaQcV zNb{(SU{`M5gubt0hWT+u9m zqwf{9JcB-Ry`Cg+HvEEj@I*`TMd5>*A`@mFr*<*rp}-}kmdO0!u`*ghe$0YKSB)L(6nTbnb<$#7h3nPNx;9M5mwFG$ws|vf$bkikm}?K+ zsp#{*=!CA&6?F`-G&%K@x%xvcq#4rnyImML%)RRR`}Jl@&9z?{UQ6{c)i=@sdbO=C z2?k+_Y8u#^c-ELT6M_a*=)|wK?4awlGEEor8mG?Wjtdra>_X>$nje5#%cq%F*%H>4 zlRbB8;nd4~)hT-dkj;@Yk?f*f)E45+QDl4!GpB#dZ|#^+FwFSM7~t%{i+?%&GCX?t z=B*$o=4^JNe%{Z!PkKD=;-4ixj4zSI6?3d>TLR^&p3swJwg`g4$le>BH`tSO13b4l zx4E3A2Hg~{ghT0uJ!QI>IHOLb!j#Qj2oiUV&c5Y**m;nu$j$YFKEbwd<{77mFeD_m z?mc&XUAc(g3VT>02k7SVRq^^OS-|W3xCKf0x|a6~PTr)AdxfP3tp-^Mj#aM^&WcyN zUy5)&S5O>k#T*Ie1gtvMdNs*YoNA{&_U+V9GQEh>k)4reb3Ip+H|NRGzl-o(zY?;E z#=P)nyRTchQDREAKZKKIt*m;E!Yw&py%J71UF#;%Ran~x+xm{xa z6_lEG{u|)G_VD0k5^){L3R1DfP)KWK$CP!fyY6z%<+QmVS5do_|HAaz+65c$DK#+O zbin@+X2ev&U>BB~_tFmastapU?iXo0eYo9}Lhhyh(43zIzB z35oK5tp_a~hrdDPLP6G^xme^v`+9h2O6C5<-hamM>cPCXM5z8&g{J2`)Hg`>WG$DkVTvuK+oqT^KFxf_ zN_*;F1>bSlS~QCGx^E0?kp4k(Boix-w^140+hpJFBDbO2xsGCmWN}r&a6Q-H1uuA7 zv>EbzeksMrp6mPR(Y*Y|SpR?9JmkXhKQQCLfMKp2^{ePdikE#UFwH=H%M|w4@b8ap z|5Xji*-oZMXZOT183?l7qYH_KIPxkkNb?~yn1J8r_i@X1m3@?N9(CJ_=W2wJqlJSB zF!n_s{7Wb?@~!q#lRJ)uYc?Bg!%O(|vZZ&T|m8mun7)*LmTeP<}z5oj_ z*w1eIE3(+~*#Dca<9-h2w!)_YzRhxnt=)=UUVJG#h)U-eFKD=(u7;_JndSOhEX&V} zwo11$`J!LA_iB7WVQ3*9u`%L)rQjJr!LIaGY9;Kj(FSuUOoaqpPEZf3N3ywVk$1CfGh7Fg>VI9dY1>^!RDNUj4((*{kG4nwX#4v5zVdXl4@_n; zUW4d*gM|%}H~^7)xJ&Tg`n>z?Nj*>KaMwA@SH3+1Z#)%(Gjlj~XR*Z_NvRPs3iqnb zB=ztHOMUGy^MCqv%*oZ^Ag^KdP^^A4jUc$Se(m3sPe1*%kP&>RNeUNHf1-ZQ(eQ9{ z@NGUy!gW#qS{lGTF-GRkYc5AJRBD(dbwJc;G{Y3Pg;JsP#%a#JU-(B?tARal0UDrh zv#^4mhH>3em;<$KWev|(ej?>;-&bC&Um5dKQ7yOoqCYk>t9NY2UpeD@dr!WSTCkM> zL?A3JGBWa&4!z?3L!4J{qIib^AgSf6UV@r83YX;iZC8u+A)h$m!TP?n$;3*mu|Cqy z9I6^UR60THms$+1n~tK3JKD^To*9TqE$?JIoIZ|mKNZe3c6a{^R6wvV?5o*ETyXsk zj-c1zFR$xiyXpHQ^Y=fITCO5*hIq?8jPqIlj^I%l&wMeak zsk~MN**PWtMz=yuWF%B;(>08v~H|{ zE3f$(j;wPgfyDrl9eW8Tw}nL2>*&j6jJnUheQT ze~2Byl@WeVck1z`zw-3nyYrQkV$ijN=AJvM9ohnS7le9+{%k5n9E~XHO<7i^Qq6k{ z*xBO+!?3fhps#W~hx^puaeFYaehuBf6|?;sR-$Yk7=|SV(Z`_gsP?|FaQ32xqAGAS zFnFYUjgnKMcBe1$kIvi7z0haRrhN2MwhS{orj)Y!RI237HQj8|V}g9!%z4zNo>bEG zz)N43vrF+p{=h8mds4f}KF2%B*Tjwqh0-=n_eXJFxhV`yAOCWSIkl~Q$$wvev-4w1 z+unkg(+XkOQCkgrtcyQDC#-mp;(_AmJxGq8$R_nGdxADF&y3^!Rhz26Z;1vBG5mOf zFgKL9P5#4Bl_~H6DB4&t&Fh%1OxR6J;@X2REr^mNq-niR-`=K@B zA1Qiv(6CVYuXN}AU;QBiUuC2{b z$Ypbb>p9oY+trp7W#_EsA5N~NZEx)$6dBxZYzPpo+*s=Vor>>X(cq|~uFIzRG@wUmniN0VyP1)|nYX{NB(apjV z+jf0JaqrtgzI*cvlz%7HHmsBNL182p4fI)(`^`mTO1VP<(r-)1#}*mGS5eWhF|?k- z%rn4t#=J)yZ4MWk|J2*H@EJz6YC?K%{3-#~arqrF0?;s-Qur06>faj5*CfI9hST2+ z&kiQG`7G{fzs4iN?O(IQY3~xR^0^*-v))TmiKTf_L((yW?H1eZEu(C_j~c-gs8{)b zo{po;x~-+EDVFZJus}|m$j zMXwL$9Jayy<+j34$&<7v_D)#k*QEGa>5IdyeO1JMSA=s&k}1vmm*c6(N5$D0RyH;L z)5@EnTiP@4w{X-jaXX6d;pSS+_Gqxf)r02hAgtN^!Y?Vn(kr;?!)~iE=Xl(!lIHgp zWiv4a%H~j)S(=&AcZF-()k860XHprhl3aaHgS2x5W*Jp4?}bucJADT9QofL`(x$%y zZCcOZd!;G(sv)2>YNKqU@#OPPNSe`gc=k!pr6wkgklIx9c!K~5AwEuy${$FuoL|cm zU|MHJD?8|>FzqjiOC?{f7gKY0W-|PK z%|A6Q!p?dS29TH4ek`ZME?V*nZvkV9Xwnl59KDFF{M)zDTer@ycwh9(0Y3dY$ZtH$ z&qAD6AmY4do2X5iwrJsjmKXeloD?FpB6)NR<8X6WUDFf(UBm$C^`PVDIfDk*2mOX6 z?OjkSyGHpzz*kPfE1+V>Pnk^b7n%ebC-!UwSKfo6iF9y-6~6S+)UM^{`Bn_&)5$gz zO7`mXc-!clJ)0!cn-;7XRxRMwnZLiV4u_<%N(@*en?y6^UtuQm(mrnBmTN@0e-Y#ykH0dU0C)Lb+ZcPkf9Ej&mj}qcmG!c zO*HRZy?2{COXMWXUfB+M;7vBzJvtE%*>?YHz(9)sXFH%>H!$fMbXb04n}bJV%fS|E zEq?^7`mU^~{pV2zj?C5p+%~jypWa`dcwdq`tLWvs2)oc#VMyO;YX(7LH2H$TVD6{B zmzJE?o3xds#*CZ0IQY%?Hu}cKE~)Yj8EGW4UKZrN2shwR34ONw@#OT*v-WUi2TLJzzYw40X*d{&K}}oukuvlyz3txYR;#I_#Bczzz}pH7YlJq-hlx~z z5TNAsUE}sf-dLF&<`4rdPLft>UAaZg%1GFS0m-dt(kzK0zW^)9kf|%Z7He4?u^@?P z9r4?lQ~2m{&Oshvlb>OWDW5W!Hybg@xFGUl1dNm{l(+r-f_BA4*vOntBaCXvo@IFt zwtP7Fq1EjTZX1e9FW2|gqmk9~@{2Md0SLS2906Cx$V(<*BdHMJ%lS*M4chfzmMP*N zGiDfVt35CE4l>xHt~WC-Y3YJl?%3V=Ds1#T4loqBMQ(Ih7TvT@t;2vi&+_8bCwydSFBp$a}0)1zE*^7}q( zbd6J2QjhFefEtHiWpe~}Vj2XR`?L!?Ff7|mu|6)sBboY7YdAKa+lGC@<{^H`?nSV* ziK4G-yvx2RA!%!3>GY&#jv)4lHa!}f7*cxOX z=M1TH563KMoAkSU{8rCgglm-Nrf9VJJ}V}k3Z#Xw0v>rtMmx4OU-HKQjH3^uk>4az z9o^!!z%pp(w&-{STKBqM<+WM7d1>Q^KfW11yZu}@VhXUX7Up+VHS#1g?_7x0{*~O5 zIs%VzK*h)NpWL8GcLKM-toFs6{VXT77jn?Q*cA%v_cWP2)+gU9)y%x=s!z;bIce~s z*C98(l7Ar}%&TI+>t(Eq|H;xkSCc5`9reP6Mi`aoQI=2apXRT|P(dv(?`<~o8} zV+5-SE3S8Oh=&(C>Rw70_C2L^6iU_>&QQAq)$HAv$Nc-IuVY}&4c@25g4XGO@kR$S zY{uPUeZnyGU)S_C=Y$Q8({?ux55x^1pf3T~-Nl3p;)tGIc=DsJIi~O%-@>2s2>{SG zO!*_CGDeS_TObw90zVCSUXD;+yskX95+%)dRB=2$87B<1Z5tr$emZ2SbV*H7Hx561 zTy7#O_uNx0d%}eS8 z)J56$(H`0UJi`NMHwq-PqB`eSQE~^|-xB_8eC|O^aX^QMKbMAMYu-^L_2*x)?H~MC z_&%r7IHD@Ae(mM@Sl=bp&>L+xTP}+cel5OYxb*djQH`V?;iU+lNu(fg{*1R|e=`<+gKTJPUVYb=m9OwbvmSB*;s5Xv z!d{e#@qiMpYdl9bYazSEnr})hB^bu+xR-yobKybKa;e(`? z8sw+a5=&nbS?+XN#20O)UOtMj6;}-1m*%$1`#FFvhE3tSU%Oipl*ZGxnM6R9nGeMF zh7AR5ROW)CQ|-!&8fQNtyee9wBP&jQ{Gfjt$AErNyEw&+%Ct&U_i9|6e#=XTk2gc~ zedBb>H~vEsf_uFO6}tZu>d{A=9bVbApnZ_!^xDb=fB)5+d<9boJHpC)br_N7IpQO6 zpt3F&>1bkmvXHA8)@N#tCgQJO*gAp62%799EQHkX1h0RCHWK9xK%H1xIIw}c>W;JKCVtg|c1byYY# zZHy3sEgtO3WK-V6ZksK;9TjwdC)48SD)Uc9d%6Rp{@o3(+eDF+%TNb>7EtG^AvWH7 zrwo4N_nnrO$WrauH(oX-oYb;sWhhDK!NaOI-1RFxr+8O`zvyN~Cy$CZY!dueFP;ic+zT*MP2C7J`Qd|a#_r^je}a*P43`wYC@tZA zH@+6mFaR#Ir!jKC@Be-p)Jgk__XV_FKdnyTx=_z`R=DeMf{~1(C^*X$@&Zcy9OD?+ z6}&bpmLPT?xu_N98c@|079I6eDqZmcas_-SL$Y4;kkg&C%h!8v8rS)v%z+Z&j?5f` zD^4x;_Tbcg)&+`L;0h0xzAO>AL)f-8lqG45!GCO(CS@TW zW#ve?8 zTbat)&-xYzR3M!N-94XD9yvPny?g#=KyIdlpkb5o*wc3nR}hdUm1%2Qo1}w_Or-%C z^9q{X{&)rzPbby{4BMPyan#jD2#zVu#1Up98G$vs7%>}78aQUeD z_a>QV_x@I&thcpX6VEALZ))xB3lp2u@@@;#@&08>dLiT&EVn>$VX8P8@c3KOkuLE87VX z3Vn2ojVNQ`HKi*xw4$w0L%5`hdl)hdJN<<}cuQVm2DpiQ8{@cxxwjS`2OKI55jf2v znRedyB@FfL|E7&Pg zZ4UYCThRLFf92@-Z#wMBrqJ8$J4f0X2PvB8yJKnK z#2YSXZzZ62JP@85v7>!+FWD1%@Sp#I^RFt~cW&}DP2cWadiOdMYqD~i6;>_)385Qs zA*i&Np4`-MZr1V+{;E?Wi4ND6@a=xg)B@CmvJHHfPP$2-xWn$Y+G@(n9z*!d7LO$? z-!^_$v|dYbz(dVv#mU>Ks6>kOj=ny5oAOzL2Yfc5(XxY51Wv`s1oo;gzkCQ$l$4_( z?x5=)^R0|2v=kv4RnA!+$i3`*r90XC4rtgVRFeA4r995jP_Vn?aBeGWd&#@!f zxsRRL@k!&6`7$0Y@abBhSUyc|Ut*BN*%6EP&jJz z(St$ekq+80*}CSKaUQEWp=-8vQRVbLo-IR{4Q6O3?x;czs<9iO=hk=ZmbBT>JDa|$ zM%+313I5bZf{7!Sin@iwk|tdC1iAPNvgGBYE%6;2M_e6AgQ*xG$3hd(Cft^?uFNS* zgF_<==>bGnT2Cu9fRWXZG((9g#0{Wu@4RL4-wisGZpX0xnet$BJKYR%HZ`zJ?-+=q zi&7rQR|oW@Df=8D*RGy^TO-_|a|RLT=I1dN^f!6_atehu8WGC*Gx3pL*Q3R+v+`Fq zJu6grOcx@5*5uqTH{IHx<~TFzUYmcC!!rGWttBFWd;HejkC)$+1L_ZS4D9~c-=9QR zWE?Sd3T@3R&zr+|w~L3m1KmR9GQ(db{t~53dNdhagd?XN71{lTAp8%{+Q6wbH>?j9 z81Av`{bI5{5V1sQ5jXOS^7I!r0Xs=U(E}<89pMrjbyO9X^ttcNH%U_(?$_ubFbKCK zYLqFcg1aDZ`&!!h3a3y$GIM@D*J_E_B7Y6&DK#1o2>_)3&p0qLDjS_bY}Co;NMqHBmwT{p@G}RKI8nePWkSeQ#SJ;oy>Kok01_!{S6Hb2RiHhMI^LePtox#K4vmV^Y7^R6)^c2va)vt3{(D@ z0sJD|6)LTwonp2Ar;}Udg9B&f3}5^1Oycn7o!c{6dZ}Xer}tyG+4epSt{hR@Et#`_ z@R`c)>8%Y*905ss9%h{?VzRb*uZ`3Bb5yS6)n`6;qiqnP`84uFAV=>foy0?@popUL zj12FDM@cVA$^zzhsi7$ALu|UVMt)O8^rM9yuNfq0G95+y*F`epIdKc$=!RnS%3WW+ zTj}(n`g5Fx4|4rhG>zN;!?7pXN5UW`D+B)-aMLU9s_b2lX?Y5hYQCvCn#Il@w#1Hp zbdbs84AFVR)%XoQL$Q zeq8!5%*r)H`$lV!W`nDKS{IO0_wCTqllLq@_!pRNlC9=^F_;qL#aqTAQGXn0O*x_v z1byXJc)m`O!UWU2__?CeqHihUTj(&~znh$b^Njp6q%p1ZkW&{%lP&*MCW8Uztw#;! zAjecI$L{usG;rxndOkeOT|s{GeFeL;qnE7(m8efavo^4q=#V=u}P(=Pq|HSVKiPehULMG(J|?3}$ZoKHmkkcE5w=W?yDGM?#n5_Vg|NHI^T zOJkM17S{~7}dz#FA5(J1c4vKel18^bST$B5h*S0qbFFzM>Znn_bVs2_639Er! zzYNrafoP!h%4I}`gUydpB_Qn7V{Sd~LWDCS2yzi~GSoQ0zq!|n>e)TFB7NFZB?9Ba z^prg~V;~Ps%B;Wko0mlIA=Qd4`hM)YS(P{$7cLfav8Hr42kDuY79EJP9ejM-PV>r> zKdMx?7MpQ z;hY1(a5H;*~lSPeCBhhlOdZuPS}Ch`dR)D;jQTAxVaDc z%I!)L*N(B2<9@f((-pq)jWQb9r7PAX1y31I0lg|K&zAZj^;Jdu3L~Aq*Y4&f(?2ne zcA-46l?MYF-?Zrq997*qRC)R8JiA^;FVT#ZBx&ixi+*fvFTL?`_!zZq?b*6x=i5)8 z0`oLKGG2ZcDVBt*^p6=)c`r9z8Q^pda=?@i*m9LpPR`Pm-G0sVMG1>>JN(OHY{kbiro#xmKZD#CPY+u?l*thc^%b{JpN2<&y)_uuoVfBtBLWP zaL9rYJc?Ze*4k1=LQ!hs#z&-HQ%mFAyH7AW5SO|Uy>lX}ahHshv@yA==lgQGzjg6* zjPJAa!NKQ=1}8&VuJKt4HPlu{?@n4z;p6v}FMMC{FSbTJ*vK1c-%&90JjoU0?~#3! z;K6jEmTRS-?W1*%avak@IXT2L}Ch8h-}xLHH)e{#d00uO)hCD*o~dKl|nVtA;Kr ziCIBV%+DGr%i3>n8}_shOpAF_5;0H5tkWMP z+1p=wsM9WQU^M(1uQZ2cj%8BydCblrOLTn1(KUA zw;nmwTm86{k1d`AD-L-*z_mLjI3^$%vtVqq8%4=_u;WQY%)gHgk*w32wTKG7Z6K*k z7G=JGz!-gh6k-&hZASxVk@2CKEpwW5FXTQ3(}!-e&2bldXegDTn9I+LLbwjN{>gfd zBu;A6!Q$x5T4dP)9nS)-bm{%S#CdDh?K$o}sr^l(Qk2T;V0P{5)~`Ie%)G^5&F_cu zZ8*ITJ=49e1+@$S7DYwIXOL!y*Qh#cRK$muX*wTPuN~foE-`}K+9SNZJV*6Ux_X)7 zI`!Y0F@n6lVmSHXd7#5^4&iW#Dyu~=*Z86D*V#x6^VeO^o495sAATd)czK=Mrqp*6 z8zp2$+MUvxR7Vi z)41}ruq_DVP2tKcnK&rucB|Zd+c^8La$aSe5^9H6K#OZnY+TpMa=84)GJvSjtg*R| zB@fIwcI?bNutgml`Cl9YFWk+3w^Cc>R%ou@vg`WtH{%b>VIU4CmMvA5gDwVPP^*|q zh&nyn+5l|3}lghco^E|9>N=#FR=o%R399oXr?Xl*5w4 z$}vd}Ip;JRa|lUDNWw-4IUjOn&c|{-pA9)PbDGok-RE~*zkl}Uc3rPM50BU5e!t%y zFS?vkVwno>#p1$>;_)|BqwES5 z!@uRyI;88=POxt`qIi)`=%i^fqhuZdoiyL@-F#o?de9$KN1N zp<<@83wNV}cMd0TJ3EzKqEwt#SrMZw+>X;8+x}ac!~NvOv4@qRCBsu#rs@ZvWeAib zTtDT%3jr;EmV#~31%Ou5TfExWhB5=~-DzUtmpb+wTew;8=oKq*FFM(OcXZb7^ys|8 z(tOS255lA$F5IwEBZa}s@RpDIi-ARM!Glpx*M42FdA|10@{^9D-{3V#?T{w*ydajC zdjy)zt;mI^a;x4B`r7<)&kxi6&>3n+$M-EHhB~*JsvIK6_U-KNN_DO$K@eW!?#Yd2 zXe`a}O?nCBYTji~Lm1Y;*X3Eb<(Aot)zD^i0{Vs-Ol^Zb(bxpB~<=&BW`RQ z1V5SrBkJuyg-Z7I&Xk%CrXL9rfp_tBG~Ght+~!bR0Y0vg9KLxpXKoAU-#Mi1udj#; zZ?OLyk|(*+RPQubi3wV)KY{eO3YC1V7Tm-|?8B+~vu7QGFY-`$wdar!XzgI20+p%J|NC3gikB+Qs{ zOG=8pi@}g@SNKBq?)>nFKyt7ErR+DVwQ!BweQLyo?qz`3v`ojzCb3GOWaFigKsE=a$LkXCPUgFBq2tDvsuS$7khi4&hAf zlftK`n{Rjar#3WFM<+}vkhC^1-7t{RbMnShar*v&mTc??Ek#EE=K0T}l5Tp;pG&&u zv5(ctPDxhL9KMJ}OZZu^Lk9`cg^srYn!0HHIGNqaxsT<%&;xx2(60}qbpJ@?Ww+FDg@f17Fem+yLYKfvEsGw{a?Z!J9% zNGbpCiZ!l&pHN2gumw$!|!kr#V+Y9la#CD5$iREtTEA*m<>3(x*iM|-o{ zH_q@WITEDBq>$JczPIskRQS}Kw1ZDRWNX3k^tG2$=7c45*)D1YdY(u7)q|x_6+o3e zs7)!+|Hr4|I=cR$NAVVqeaj90AeLBTIA~d>#Yfj276?Pg#Wr~Q{vb+i@q!t;7)J_u zkA;l9?Mrp4WExE=!Amp9sBF5NX?mkgO_o>!f@X@+#vW{_bXll zMr_z)hc$rL4wP?6vFk!x&wClJ*SUy{AY8Z>mU}KnikS8hqAT zL-q7xV~b4HUS1dZB0#(``^w(XMLmG5ac0GQdTj0?K)8NM9O$J4Oyh7{FBVQ^c_SGC z*f0P8EC7Oz!k__&_vS83-{++t#8pjm$B!Bu4TKAb8*bG(;+FiMjvn$aMoI5pD|*=t zX3qkL!51HCxeMkky)s{yy=L+hEmue)QOjrKd?#_4j;AhOlgTrc{x3dT#eRXYon;C@ z4mu67t48hMKwl9Kk5$Rm^uGUIxw+ljczXRx1;3Xu?3uQu5ll>dglnl;cvw(?>75%R zYG1KP-Sd~Q>8|=aftOgD+kro}9d}hbt;2U%(w0U-RzhDaNW?IFV}5!aHO4+wK`}U8 zU9dg{6|tQh0~;=`YB(q3xt}W08;|}%{K5=gmSDy;39QsHo-o9OsB?>0js(7*ztA(h zY0L>UPJME3BkoPe2!9@}U|ei16Kg<=e%~>29Awxc zwRrCN@s+{nm9>@(iNmwpLMOULH9dYJ_n&JePJ)ooFXCJMm!`RD>C~XQx60|%&Je*m zdzT#+f|s~>;i=jVy9~yzX=`=q!dDBk(RzSD!u^{Z{Kw5+Aa%l0fFZW-F^+S(U&RGP z#%#eVj^oG7BJ9~cl#(^|AD!V6XG6hP6Fh;xo~Jo#l~%(X+D%dyad zU$A}FW*cN4zYwQ@Isfb*u|Rfu8(!OMf(0zcWu2w5xy0{+9QtvAw75k%SuWH|2Kafm zOQp)ZwT=GgS$uR&b5>k)9eMCx!s;>k_h<3?*54fFHJ2VWGb9w=$bKCxd%+F;F_O`Q z#6Ng=n0nyjyI5%0@@qAZWlm+>S=cazU0#_S2NwbON>H`1ufP8%7)PJDvIk?lqQa(a zC&ZClvOhjMi_NkVvX(+vjId_GJ!uj}a?cRUVvaKRdmEK2F+pY!;!@jKBRfXYeBmmW zTQ>}DJAXuNm~f_F*^J}SAIBQ6IO%2MDZ4YP;`A7khl$I##d!ooMm_bX=Bk%-{5^-1 zV0v!-4I7vX%fHo|FG*W1JM=qxlXs6=jDU| zgn5T&#jlI#9LG1_L|9f2r!(YiaxD%LOLjS=qC`lIk=v+b@K*0gwt0s4PGf|F$E1Q2 z-`ZiKN7Sgi%m*3Yjs(D}V*gt=aJ}L{<8W@A_AzUEL`H3`ax%azW;l#BV#A|9YOSxu zkl%}rNkCxZgPS0~*<-DWn5T;LP+#6N&Fp*Yw^|Z+IKYSRU_me5`S8FUhEP;whKk_t9o9PyVC-9 zA5c543&Ir><>oVZ972O&%YHVLPW&(AAJy8!svSKgmnl@Q@9~#6^3J2h*f(FFSKke1 zu(vp~&l!o_i8JdRmw5YVt7ulBxTs;Hh~d#xzRkb4z;(a@L(vFupz*m@Q_@}E^Ymxs zkOI9xPsRjv*5)sIfa3!WFBzrtPjemWTO$8ELL14EYn~aJc}-mJa5qE~?7^rpK-|3+!Y@(S~T{YMNoGyTMGn9!&{9pZr#z#Mesa9!uIC-V)j0Zu+~KIkg*KtWPoGE3km{&(y# z>^Htab}z)Tav44MA`r6OBfgq1%!}WxTAD}d*BHRvS*}QS@7enfGF=RpVge<$-$uqS zhsKa@FtI&gSGA0~aHIaUsOvDUN_BgV0y_DJHx;1lZCA_BozFQqTOV7=zxr%D8qEp! zzG5^R*p2hll=(K?T=GZTkF;$ONlv`Q?!;k{X)CZqpclpPK80Midm08ZvS@0b=Pr)z zP)DmmyRT^}^?up;ca#8Rq#TwVu0;uqV;dIb$Nyo{_lv5#lRLh8OMhiMQ=N`EZ6C`H zcPU?3W3SCSQZbu(X8EGq>9_RF&hq&f*-pg`GEFh!xG>XBcu5wOV+lvTCFN z2d``T6Ia*Dv+{b)cheF3?aP>f!#Ha1iD8WoDU{np-IYIvf3sVj`rG4Wl`<*yq;4cI zCz;`rb^2rF-QuNi{BtdHT|nT$dU1q#>q12I0T8?X-c67%UofQHjcpqFSz1t%ZNHHO zz$_?Jb6Q%<2HtjzR+JqM958Jb24w^Qu7M$>0DRcN(??xFQIuBL3!1Xhp)fuM-zxP1 zBW#Z_ubgVPwiRC;9oE@xB*RU$hVEF@!#Tf#EtDSDi#^vRqy76`EM=Uin^<>hQ@`n{ z%^c5DW-sMF4ofYbH16JSaHN7;m8P zJ5nEr=ioXJrg;IsJ~(3p_-rbEucRQ(CsiB< zUWI}GVj=5uls;Jj?#KJ?Nfu}lnD@roCuS~M1FvtMbMc~>amI9{3ZT)x_LuPUH*K;} zv5YaY%M#poAP?M-Y{dTg;Cb%h#Xu?kr;uPm#GB@>XP73RL)Q%=wHw5{n?*SvP1ssp zIj4|3g95-(B|qvF8fN*GeKJ&(y`y4w{!)@0tD~b8%BN)F&JUZ{wkis?a%QHz8!IaK zi{<`;>r(UU_@8&L_vSRu1_I~kiLhzUae1Gpshx&~-ga>Jf$4$Kfk#-c3E&LM0lDwb zz`=9}5|@O%qvIcMdkKHfq2J-v3)&F)1yXZM4}ny%Jk!xuKzA3ub#%3;>ZDX{v+*%9 zvuSxmF)fr{*dJ(lcU-StqvEGc^TAt1AaRBY=i96dp}i%>QBPuk-*29nb0k6O-EYGw zu?sgo+<2Xte4op=Np(6=25@zUF5|h0SNH!~aU7QG#!~aFT(8sGBYSzK+jPJ{?xn>v z40gp`pDc}u!+)Qd^qy2*(>Yf-;@i7zh1oK4+6}^cdr3`-w8;?#u%@j%e1TkPx;_6amrzu|ZK%cIk6s_Eg& z7kQ*i75~g0>hkRB3Tr&mW?irGA!B!3cD%rz=uIe_Ni3HaSMZ*2+PARK_ZE^f<$p90 z^rEi&vQ?2^*@8%&vb26j8hd=-VkFpqb=LuJXFch%52nELCtQ6_o?%di$hk)YOw?t! z;jXYSQDvDKyT0h@mod@XW@qO zJ>5KMKd<<;dq+y5j^((>sppsY821aovTWG5>EG7l6dKF!w18`D>aB*w=!TUkddV7Ss?&uf0cTrY@C?ruXxe%e(J%i z7Ku=Gu`Jv4GsnS4DKyn(Atc+954Dsx6t0zhNoARM5^X&-qF^)xE@q^fO{ELXovmOT z7iVCpVo`A(V`6HXZlS_4Rg89rdkV2+xPrA@Jmjsw1I-&mc z_@#jN^QBpCDhnDR^m4_K(WRZqhqnXRiRsZ>>ktRfaWo|v6=R0T!~9(4JMmE2jk7zv zsT*&))wM9SmAlKcscqd4$L>*?$nC@Bs=wH;ND}%zc;zrPyQsnaUgxK0mi2#JpGb9z&#=wFMSm|?SH>kQ0eCU7&{uRAkQSsaYnKZv zJ}lqqKl+Q2vkdk>b*iQL`2WEiL|0H11x2pt zK5(nqd9Y~uNfnvA5s=Gkas181caR}FzY9LBY2~FJQZI;RBQ;))fwGYaj}u!^XJbwk zT?$A39xVa29dmm}r&MrKTNGTbi}$yL=mtcQDU3w8m+Zk}NYBrl%`PP~8-Y zb9li)=okM*ZP=-FnRNQyJAFwAz*d0xPbRVaarX~gKS3*;VR!xXZnX;YBN>7p6`}&A zCP$Vp1Wvby8RRx;Gv(+%d0GnX(e&@i2#6O~T?1wmk}nEFq|7fxLTjG5|A=ePLWzD_ za!5%az*{uLC7T2DG~nr;3~Q@RN|@RyCd!maswiS6@>fNfXvY)7fE!~rH22BSpFy!> zU6m-~;}~hLI>P05t#&&`y+^A#JH3TLiw#=Qyd?-rQjv<{30h&u!ZE zzMY2)9U7cRR)F;H@(*0$BO%+;* z)ZZ113j|UV=I8L|pV{h6%V85RwYI)Nc|(P@;K{n#b{2p~{EtNQd)+?*pkM$Wcb4bC zP$K}ulv;n0ShFzl#`+Yv{^M&-*;AX&Qa;H9vifpxuNWy*oLw*qUcMw6Z_a^i%@RN+ zxUD_9;U!G-`V2)u7lQ9c$AclX7-{JTwA>y&Epw+6E{T!1A>9L+hx$@7?IT)*M z{NobEBtL+egCrN;K<5Ng%M-{cyvKvDevk>mefKdEaQWESbq6 zpWaC`N9q>!2;?*IxrnZue1vhlfaDXG*H(TpPzrw%3HlFy>A`Q0C&Ig;Gh93hyPx&j zM4^KQU{X_-6tfhh+mM|vi-)(*P+9)~z}v9;K}&@UU5@$m>Gfw8V3GDXxM}5!E-ys+ zoU^aj#cZ*DH|7$yqAwpaR=Ab&;>7aj4*9W+Irao%02tzw&rtZ8@c`lb|qd`^jyHH`cJa+L0)rGBw+NL@NK6OtD1%( zRqrkB(LIS3PR!SP_q^3boU4)f@AR7XYRqumb~r<=lWP zFyHlJdVa83dN`Z#(mjY>^-gh1R)Ke#TY>YPI#-2>_ojgmMC_DZCF_ zdwA+dY0H}tM)vlsB4^W%y^qX~EDE$$$D$$}HQqC+$5LEB-h4kNC29Lgdf< zjK~A^v*(EU+yG{A=46u#@kqQC=&`7tjw7y0hJEcUwz2@eIdFxPJXCX0^Ue2KTO)KmBu}xgT zH8lKB$xmnRD!0^wYdhu6S^nN;i!!R06<=VX1^LXGZwjLiA;)c7VCT&KSNL;tR0^QA zJq>7fPaN{GuYUhOPTd_4tnabaZW?`G9*4jMqyM*x0__>ZRHGQU+y@$=$Y0`o`x$ZA zm+_h@L?i@RM>DY-AQU;W_ag*aSm0i5Oug46*Z-HBLeGeYdP023q*(8t=baGhA%3(s zuTe$|wYln>=XGkPIKld%kB2A>SL}NB{B|t*A-`hsHZfM}+%HV5?+H?S`G@G@>b#B! zh2fwv>BqI}=TFG}uLtI;zi#%RbPg-G?@WeSO1VXMNW@PyY?ttU=A&eU%A?Tsi95tO zXG6Wz2@$-B)piX0?E3}ge{5%+IU2qr>I2=8>*MB!4siT{t5|+jzTFl^w5TlR4)ZXe=85pHLJ7 z2+pSEiRGt_3G3<~i3@L5+Gx@DT50(Ldbdt1eB_7kb>_R-N-Yb8a~;onIQWtYEKd|b zVw4;n8XG7UJR|EL8`EG-CK7G{Gx>=KBmf_*7RPUTAQPc zkvd=$Hye$H=Tnbm&l^70n>8DfJ>=c&q%YWh;vCn@j- z)w4-mbM9iH(Cp9i#0$cbmfQ``n$mC(LdH7Xis%2blZ3pW&*E-!Vc&WjeUXs+(T?s} zLhWFF_lM{PMH^lNg%}XrU8~xy>niP#m&$RAy$PvhQ7U^g`kqtclCbf%V2!O)ht~%gi>F%!Yi&tuB%cx<&&YZx)=5 zvU$$ze~)2r)XyfKnia_KkdsT*t>|H&PXNPWfg(U|GQ&WNVbS}zYRC1= zPaMwLyyGSZ*SM7|-LKGsnB>7OOAuMuDLuEtQk;yq6uMQBK@6K2CVzBx@`ag!+?;2; z8BB@+f7Ac2_)t&nPF+=$yd4Q391e0X~Bx#jVRDyzbD_Qs#i6EJ_TlG}MH#olZvsxV;LPN6DNzP_ws&Je4uY+|Ix z!jhFfG|lbxC3!{PQbe~#;Ysl9H=K{B24)~&F@xc>#CbOTM1UkY(g@Fe_o>$`V`D2u zf7Vezx2S|RKL`Oo=UzS7FH#ryknLjh9gs6C#H5ALmmX2xWw5nbY7X)x0ACrliJL+P ze${5GbB4T`d-~#z{PD*|KGnnv~KRv}gptWoO-;dd+C!@=q~@0%zbak23As z+*(;-2)%eNo`CeDoP+ZZAaKsUS|nFG842~;R10|Jx7YXrV+UE|^V|Am8iJs%M3+wm z4Vcg)va_Wx{G>UxXsLcv$o!sCs3CS`sK^d!$uHVBoaHwd1Y(cZ@7Cxwgmq|OTu$T9 z+e2)$d(Q}l+Mn3A+PHF%t0(7xM#SmFU|4r!a(-?Xc#TCVD zs68~{5tg`Iy?)oz$p4QJHGnmEey=e3R| zg}s`nKRAlk`MFaJCOA}u=xM+1IU>{&2W^I`9w)FPfia(tsKoV|*z6~g-R}+C2bvPY zi~NA>uu&G@OOlGaO<;fG&OW^{WrgYEVUJG|-V86Be5TDBjrAI|GB{t}ojKfE*c$C0 zev?|DT6_v93c?v)%(WUW7|xq*gWO4haBi5j8qfVIK!|Zpz#g;(rB*X>@I!tWGyV|e zS!-DwQH#Vm+*6rZ7N_%>Om5?=C?o%z86;|$Ey9FI-=uLjotHg=7`|1_RuxuLEAhja z6+23i%$zdRRB`2^tUMb*jawr#R4ag+k#D!V!yY2+zB)gwo(|#{BC(op`Tb-4VPX0p zO3mkTL3=zYeT1ViqrqN|e?Tqtv5+)v4W$q?bQq-)v|hw-SP~lzA?v}5R};5|xL+)Z z>fP7xVz`EbTqMtb)RDc{m%)mk5AdNDJ8$0Tb3|QNXOo2P3LJr{2z`{@<^^Q>;xlZ} zz`Gu8EvN{SYIHek_*d1llKWJpD&+}b;q}c2s$$jEuP=r~qnCnO5XU`_J{n5zw~Odh zyz?5MOmwgw4oE;*Yz+TPY~Nji5pd-5fq~?$Q(?0+e@r9_;|HSmM-Rq?;28td*Kbt` z9%Ms{|G^*HSO_19@<{}<(bh)=LH;{E)Ix6X-{|BG#J*(+FP*30GlRSxiPXnLM`h_wzklHT1ziE9nK|?V+KE12~FO`i?rS z5NuK&GYz2F@y|63Z5>u%fb&*1wre8(o^LW0`h>%!veBCS$3pBWq&xmi;=7js%LP|5 zomM=)^t}1S^&W_r`HUWCqB0eUPP$UY%V(m_&NX{(oP}qbZ62}DS@%Ub zAC4L8H87>04fmx<^`-UA=NJR@m}QAtIY9|0S$?8-_*s|`d{Jigp#O<5TcYH@JJ@BX*$%~nlf@0{h-n@&4dCSc3>qKZtjkArl@F#>09vB*@) zgc+m)TH|^)zN4zNTPWWDfo9nL$Rr_voc|F@e{-1VY0^AW?H~=XiUX+I`H#~W2Z2j@ z!jG-7n=KRdpEDFCmn^k4Q$J)}TZ2Mle5^MGeqO&Kvi@`J*zFJ3Plb`bNLFm!e)@=k zQ8Tir_V(!^?ppDr%I&9d+5UTTplI)tN`l^~>QK|*i-7^4jTS4&wC;m&B=+p@a_8H6 z98is)^uPL0sV9P|Rp+{c8zW~*n(wsVbmBS2-F1L65Ta?e5q@I+%jdkCQ*Q5%QTTaB zNaa*sTyp7c4C5jBJuS?VrEbN+?=h11g?`gI_k75@2DttY#jpoSyS z69x>E86Ox1bavVt4b^{#3v#zVA{`9-_6i30*EFO?2vp^Y`gGrPp^-&rB#ILNmf?H->-Bpj7}@Zv zr4+Au)y1bioB)p+!q;}Xb;Ya7~-o+O+*uE``-Y22AXx0igw+P`|sv_&)k7bqgJ0F?aED2HwdAXDI(1L zDu;n4=U3TUjeofkGK5jIWx%V%Zt53nax)XUM$2ZK=B{*WKrY+c6IJLa$Maq7e-ERY zO;IfhmsI=7RRu?Iruu6qtL4&}FW-s)c}{gwsWivG>v6=K(q8LCS3XcWZBOBT8dR3P za`o!17MthXB>~qju+yAj5Lu*_9TVomlR}p#;wIZql3pxG_0r`!3m33wUV)?6O3G@> z+#x9H-0%|5C&wz_=V=v8-Cup(isz?)aMa=5LF6*B*@z&V*DmUM00riV;0(gmE%cAM z*#0aocTHUCt|*}{HwA+z4KFum#%>Fo)z9%B`5li4qqagz*eI?+r1`mN^MI3>5LlH7 zP?pU4?8u0ELGHu95hdS&2z~2eU?MMXEiDn-8UgwQb%Qz#zh>i8*`iOsNuydmf!CA+ z(T1FOJD1|~s3}^%I(5bX-Rt6l?zLh~@!BX&@^9Pq+n^L|y`_$<(6}u1MN!Zl`PO@v zh_aH%0VF;C_39&DNFkm5Jia)%`it_e2c9`6nMF-WYR}514QHi{S8sE3K=(VoY+U^> zvaZ@~jn!mOGrFf1*PJQ6%doed?mKXq<{f2<;m4BIAauJIvQzN|Hmwyj^yM)Ot6wB8;)pKY_KPW5vN@pA;& z)E1Z%=nC3rG^_toNzId3GtfF7kj+XHkO$E7A!1za}-RWkVy9*mcR^HA&><|l^lH4StnEd; z06TZ8R+xa)S$%WJVHoDV8*0sADxv=RHzL8Mi~mK!&pfsorSq!!XDw25V_u7kJ9=1h zU!QK>j{N+P8r#1{PfdVj{Lm{|AP2j|^uVR?cA5KXg-tB{?30n?<}twU?esEbiRI8I z9}U|sJmPZjq>K7IuCSX0Ri zF+YlYx^PwN{d{h=3`b1y`u;*$-o~i0-8pBG!;WsZ&i+U0E5Q|)9pxbx*Oa#_p`G+oajmE=pCy9cg;u`l?f_^bw%uoy*;`c)7bWz$mB(t05 zP-ZZ75{PyI6#iu=TX$eiT0wsW!8uL*-`L5kxh_KVTvx3QF1`B*hRV4Q(+q94i#PbO zOBdrvpT+Zu%*J0oa@{;`6mHQn^+n#gm%0T~RH<*`7o}8fiEkF8xUt206K{d~^hwTU zPv%DGl87hCSwAtm6AflK>ip6~V$8KO-0BMGJR(FTL|&Cdc&MgW1nAG$6}!ZET`yZ? z$Nt~v<(isgz#T3J2Cjl9mXD?W*MGdDbWi>>R0%>H;KT~aoE^I@)o6VbcZ!eXvbL;w zhFxVA)<^fpf=&78%OSycI6<8ruE_%FCk74YMGNz|<*`IwoZ_&v78;~x_qIA?BrZ`f z^~&KFIL$F;t7Wf5VoYV~vZ+@h-N)r+(pzB_X-G@=!SHA&`jmaY{xOqc%z0PvIhnor zGGP$%^;ZY|M16}!=_QcUfcDBN6K>GzX#sFk!)(;0_b~-B; zt!~aS@2pppIs<8X&fnC!9Co<<||ddFco zOu2NX!QC$sbcSBB3LuR&@-v-X9SgK_AdU&%*ubuf9Del0p8xxmhdd!HxA7pG4Zr=A z`Duj=1y9|XD`hQrQ`gH(n>r7F9QxG~)v)G$8aK$bV7j8rC%AC5-h zNwK36E=ffoT^!EUOwkt~90Wc>L=+WY4i=~KD7chk zvDiKM!!!OHegEC*6S=6xo7mijew0%F;W~T#d1J;9KnhC|W5(6#pI#~+Nj#@2SRGQA zcXBgjQ$&=j5-^dn<)GA0c#?kt+M*y zotwT{HG#e8!e`GzBi*$XNR10x{A=%{r3bndAoq(1tljzp-rt$aPaJ~z8W#7=dmyJ} zVSN)eZ81|h2Pe$Suz;$I78OTrJ@Y%N{gpO-lRtq9K$Rp$lpgap<`3W-V8E*S+bd~J zxM+9?rke9E9FSv9ivDVm&-BoHqIP`1{4k>a4`&YhEfGWL%iHjqIlTSAu|_6U6^rr% z=f#RVSH(vbJkwgScC;w6VZ$lDsQ%3I8DHGX&Hl!W?B+-lFc%Ln;*)1<0UGz$(@ zpJ6qHe5`F;!8R(@-uU@tP_;tcfop7`&HjX{>>cjdeO`FqRO zlE}@w&v^Y*;Y@)zqGPq)NO8di@7_HD{+#P?85~716x5PhCFTSXt;whNUi%hbkEdka zmwa^ggt*@&_SDqW(SZT$kdTlh=V4%b5P!0|j1b_WmO>wPnjrui(pP`Y?pMfNZyH0* zZ(5-*>*)PgFn?&|5o5TN)mP;4=>?+e7SsWT_ZgNktR?m7`22=`rGR2+ByFXtA)K-@ z+Qt!?HpVIbGz2eb`$=UtK?E=^;x|asOr1Nw4y^^mN0~1L2}g3M*e56*Yk~c`7_#z; ziMKib<0rnc;)6~UcTwtyO0Z|-+qE5i?5j20@GJYYIWefIqVrH?QxJtB6Sq^nB|E>d z0bulnhBSyU-A(?WCB@wPpBiWQ{{~_B4{ks>PxW_Z>^J8b3+E+2#@}%)dnA()3ypjH zNK`rD(_-cqBf>|{M8kw%=*P}2w!%?!#_u0_r@nLsS zd%`guL97xeE>HtwQ$%0Q{kxvtas|2#PXpLulX0ddLmO+$o{a~sKWFzv1>m6cvL&4!txS_0DWk;x)3wdZ^w017zFwI1t6a6yxUOot&_T* zTJPQqpZV`IMM$HAM8EQCg9_TF&G6pqfG3a@Z3I7IiY%WT zPohAHIEy;*PtI1m8Ro5&jPCv@bf>@TfcDHt-%3&y=<`1XV&*(*3{S*C1 zHIVnF>^;=JyV^lMEWqsL-Rn_ct!*i)<3ddL3fInE9RI0hk{F_;nJrYwvAZG_)8lUP z&+rJ&ODV!D9yd}CR}hvze>K}>#4L2I)(R4H1(@OAyX5igZkN^2o{gK%XkS8$!J;RB zDxXme+vNR`YZYs6ER!w&<~g)f?kW&|cSV7;mE1Pg3cz_SKk|0I+_xXeb+=c6bRRF^ z`gm2%4)?Y&0+kr0bBu`UDQaN}TfCVUcL|y8l470@o>Cc_A6%L!Zv1;FPGeV^GsEpp z`UyYhe!5n1f43r=vDiVCE>+3)ONR^vDDK%~YY8Rw$reH1I*a~D(LzL0iPY`fMSuKJ z6LgxHm(N0sy1ie&42P@o;!cr0bCV&MyMTK{q>$Q-{eCDZa5T>APU_xxTMtAzbZkpU zbqVNo$c2nY@I!{9{G0Brj`H(C(I=lgn*X#WH1B1gdiM74hO=gM8E3Prm4tUqM=e)g z9l5x6+`al+g#@E)2W3-mxIZ}ZNN$@iBXu24)z+}e}Lce=Mhr8@A z6KaI4k#A~}1N8E;o4S)+T~@K?@}Dc~yE3FRGI*?g?v9j&^(4U%p*_7m((fH8)!WD) z)3%YglMXtXXse{+DS=j$$i9j~3rfrDrPp_R-~U(msY^r|EFe^B{^lT5Y4go4uN7BA zQWbOF+^2xiwI`MTcwnC^raKiL!S>%H7Jv6Gbcrux{Qmv*IC6s4ADqsHo99T(XSlN+ z^sKNaQWsOJ0_P{w@lH!`>;Cpn;Z|9zVG|uo8jG1hz7~2tbC2z@lcd}~(#df0SBs=_ z>5V_32?t`S8#6_cKM898JX3mnZO;~$aS~K_q>9UxCBvriclXw&uD3rGI}+ecI=7;> z_zT25uxY%1!i{!wK&q~3L=FKJNY1Q4WJ?L)!-MS_=TS9zfS1w44JXDiat2BcLIM*e z=TJwj3q`8lV81&)QB?Ah?wPqbQ<(`E0TvTlzPuB>`Z|1eYqMq&RkoGPb>W7;|K2uE zbB=^Q4u>~bsPZ$xnA*u&aoFT!G3tskJbow=wYc(QOm)FdINtqJLV1`jJwoH;lfUkC zfUJ|hSYn1Gy>yiSSK9y!h0)Y@tI3*c%}1LIpZgg4V&;q~n#X2;$LLtCPgSq@Ft$z~ zkHo-Lh)1d_2QP>3b6#op&%?HZmNL~0!@akJ0KcOmvuy^tA_H|p8v<*9-9ZyEsEHCSX zXY}n$mNu>SBV<(viH@#wzpS@qZdRt&_;xe#eW7kjJ5Maxnx>p|D|%W~Iy(pMj=|e* zy>x$7fzCr$A6GBv^q^c%H33X?N4=l)&p`Ovl?Z=McL>RE5$6Lmzd_!gV{p)Aw3Vk2 zs*`xopC9dbB~5);c>OzeHmz$TV*JcDpgq?0Ay3Df^j+Xo9Vfn2H)QXjqChr&C#A|9 ztLm#-V^#;Ab|NGXqt^CcBbU#N_VzM#1$CwMd*vjz9zMK6Xp~3n6~yJ6?Kwg=To{Xn zrggvlUH?|eeTCohusproS==*O0D|eRy6PNo+vVhRI0)1u0Q0yN5ErDVkX)Ob*O5z2 zq@A%=xKFe|`ZwZG12+mMUuN)3B*weM)uBI7aq7~C%7Awf`8u{q{EXA3-w%{i9O8Klg%lQxJ5V?xI6*E!wgkBM2n=eC4;l4&2J9l(1{*SX7%|5%^xSAwcnd zry=-gc8hxOa_m(gyV(x2{n=Y>+uhg^q7p=~w-?Ojn!%p$!p2f-Y{#3-lDMbYP$q-@ z(?`qK4}|r(yD%!4ht2lS^{OPsWJDVU`W;9}df@fb`nB;}TE~ zSRm)_UKop2k?vPLdn8+&wMF(QicO9pIY{;oOB%07V$PbX9+6>UMUtwQV@fM`wt}K= zM`Eb+ktm$vJtYXI*W}@FQ4^EP{!(As@Yo}(8V3l4t({o}%%dnG%*V%OigWOEoOFAz zNcYBKQ3H-v$-x$nCV>9vtN6}Cj+3(WzmE8t-TXxVjSaGEYpTMg##gzpaqmWG7kL3E zHGOlA(h>Kvu6I4z<^e{y;S{qlta~%E;>}>%r^brM-`~eB#_A|&pV+;yeQd{Es3ojQ&Vkr_hbH{ipTV}r9mq6bp_Ol4G>#ukzH94eV#j4;1kXapw~|(Vo^zN6F>Ir8n>Jgq{ zC~M-b@7^8g+w$b?jrYX1AoZ^yi|>}-`J_Y%px5>w(yEIm+q+35bzTZj ztv5L)q7_P))l}AJ+jSEEg1fGV_Lbc(!rT^KfdnP?#Uk4m0_G|$qvhzA$pK$ENB4D^ zswz}awh4(`7l@L*5{XjNyVl1cr}~<~{w_Ny6A}dT0~CRTCH29f&)bpNDVIKmW&I@z z4?VR_sVOaN%j)_L-IaLbvpW24LZZwo?QYB6o&z!VKU?ZN+IF3{UW$2pTqkISHW)M* zHB^#ot$$x{etEEGVB_}P=D$B=0a)$I_<)K{S!~{9zg>n@ui%9~)Q*0ry>7_cGnrZFc?THd(+b8=*Gf3=i*}4sC%p{JzEr;N$gjA{ zb@_a6v7>t}bfVL2=P|zqVdy`_M_Mg$LW=&`f2S~aK6pv~spAfBm@$|1v5>dDIl5>7 z8GGjvR})2g5GbYeNaV0piW!{_#gkFCLf3JXi*~_hj{o9(^mxx|aY=Qs^(tqeAUvcm zkIp@v6~Gq2lgY9S>SG7QJ@b~MP0(p_HL08G8uD(gNYLUh{`;0$+7oqyUy%!OKC2?o zx-_wJ4T(Obo`f4N+wJyXhQ>rZMcBb_)8kk;;ajP0ISRJUUf;k4^2dJA4L6n4WFa#t z3tMOB@5pM4DdO~K=gK0MN>$W9hxwDu?_ObCNwWU0;g~wR_J1^eXE>Yf|94PSk?5@z zHQVYd3>+y`ktQ|*u4jfOZnmd`m2W%EcNKv=uLY$Z5jw)%oBGcQ?kUwm$aBH)!zlG{ zdK0XqHET00_rR)Tq%YF|o8n1lTO^E$CwHs{c|F(S?(4T~iJb zY$)vqiK<&x+?nnk*6RS#!Pu-?+21WTt<@Wf$BGY(<|@t)%pZw2pZDzL9+w0lG&<#s za91Sy4a=3)>EFtppLCBZ#|r?C=L0ZYL29V&fp9N5G_4A2N*_{}Z4aaepN`Eg%b8+s zWL{lTtyy~f&>H*|WvHw8pfahiQVuj!U9`>wa(<%i_le11drlv<)J2q7{@G||s#l2|pe?W2>apfq)BEoE!#lMoO3 zW8~I@A;K@R6pVY+C9FmyVTB9}qO9Lc@_<~qjkkSMvpbR?zeE~JDIDu}9{HX5EdVF| zi&6=<29S80pznRrN~k$dz*zb$b1#>#k~{UZ>?jWB7F=M_EfDK!HviZn^*%-0e}eJb zSxXW!)bK$Bjmtad)ZRa?)(;!6k9fZ3kR{Y;pxiOR*GF0>s(hEAXm5=9kM!~gZ`5;- zaRR(uEqu=%>yyTFjXpJ5GBUuVNR_pUa-Wa7>b?QbW?;B@-K@b|ch;o<^5sE2?gMPIaV7N@+vLuURBivroi*iLkCjU91&A3iTFQd_`#bMfiY1CFBD^?5TzJTqFzzzP$ ztnRt%y*25-+6it^F!Z!EfHC%hNqR*lsrvIAPDdg?byxhO3tj0$fuv=eSiTWz!Ugcg zx}Rss6kvP4MTL4elTYANF$_D3foJu_4)m(e;B$$m5-Rke3~eFml@G>_8j$+(1eCp{ z!25!Y%T`E5*I|$AKNjy~%G-jq@+b19E>{{rt>y!0CzV@4ry#5q0KKUUpy&MmEP$1Q zqo8LP2#?>{QE681UhI8$s(O&aPl#wFT~|-_xT=;V8{YqHTJz&IAK9!^4i%Zbo?`h8 zbDEy;E7>ufZ$BiRuWF7%Qv|J5aUvaAm&)@{{=*AR%11Tw0_rcDG!6@$Z8)MN z*DAxqR^SE6 z4%qf>59`=|+Ttyq-0Y4t7t+kdPKX1^$@E(IhToh(=7qWn)gK*CO&hu;{3^rhr!ke- zttc+ksL`h#nczxlUAt_APX-h@-B6LY?eV6RP1a9@KZ~-iz+2DuJ(eDD_fSYxPHQ)s zJunlRRgUbXSzWTYqrL9B~NeO+hD4`V!H9T>Q7I>lw?(2 z^#Ci=(YY7{{nVYd>+{5RSWB(6t9W!+F>f6pcx7TDQd~EqHKby2Wld|3|Eqs&Q~3aE z2=`45OHP3JPpc|8xA&;=^2%e;`mM(UEVhzH5v7XMDZe0oaMAt|S#&ws7%YJY85wr8 zHPQ~Xcq4cp#_Fi&m_1G3ZW$H!O`96|ZI9V<4V+vqFGF9er0rzYThd64Ne^n3x15YB}P((2Ez%F|?+-wDv!T7)jZ z@@tdRXQJ*Z8#h9nl!l7&^C3M8BVF=H0S?TCo#=j=$ShckI(+0q_zy|kv`0#B)3J?} zfb1AI3<}mrOc)o}t4u7bZ;?66kluOXSAZfrTerJRR=x!G8bN}$;}FD!v)%3B1evp_ z3o2S#*0kQJzzhzoQm^iHg24IMsGwH4p&G-5wYG4w*6jqE_QajaW`i??6Y^uRb zQo<5;3j11t?kCsQ#WLCImG-?Y9TZ(-P@M`rO2O|gw?9*tP`qF(@mt&1-q~i^0kZKu z^%}fDw#W93wLw*Ta_dSxFW-2Ic>U8{Z)Dn3DyMUZLr*+rs=slT<&5B=?tISPjq!A5v z2?pkzMfjYpI7K@cZo135P4>OLB*Z3!VFkpxN0~B5rJWYBuRHFXbVi!ycl#L$-@@N<*bUPi3>`6IybT`kx55#brq(ZE zWC&#W7cwtQhRF)9!xK`)k{C6VfpKJY)oefkYQtjg_8fItInZJgezAXl-`g&&iFQz& z3d06fZcbHsIMA-fz&REczW%U-9}kUb{8kbYaZAmjd^HjaV-p2wT?Q}HJhzjG+u^*# zwOw#zAQO-H$=}4?GbkFh*-1ZL918!=f~6@Qw#bBmuyO7%_9A|IbB5oA<{Y^1b#>~cz=I2Y^j(hT=HT0$hk(J?~*xpnl1jVQc6#meUx*gR(>=D}8E5d&7RX?x~ z`VZufB!|~Da>+jUCi2WGCqUaLoIJunE+B+w?kd^NKZ|=HSJ=MCLA=Y1W%`wrT_aYt zb9144`=Y*XYUo*t2aY+L(uPRz1uQPnH^9J-!r(FoHS~6BZ8sZK=qBd$(TwRYm-QP2 zx4RJGgM2hD86@wDFNUmh9c|a`qS(1;Tn)f%CDV(JLpjt82Ua{gME7>76xCsSC5nl`JpP{2%gw4k%enFYa!^ z;pELCg4)qAKK#K{|I6G!}Fn@?FD>U2wk*iAN@2=4uEjDdt2n{>;F zo}XDxHVtbp{e`Oc>a&Ta;NW2+uNup9R0@`kL^8_kyBAs` zGg?Dcw|~t=6g(C29GE9_>(F{6&MvD$GHn%r@zg;HaROLU%d$2XZ@KvB*lpYA0h!2p4iLT$BU0j;~7A%*3ywy#=nRK1+BNCr|~ z18k1(?7PK<11PG9WqsA46K{nOq@w4zm0xmtdb*>H=SOfPMss+PO9j6Fm+3gGPHWXC zt74->cSn~F2N5%1;`pa(OF``K^4+Nx5OX|r_Ip`SI8H3f zR^bn>SY1!b|kRU{=194q%cT(_qfy3!G>o2#pni0f|A04`QcCEFx6yR6DE*OD?ku_P&A~f_B{|z_r$@N=xT4Rs1RWGWt$tL! z@{_!~`%!tL5!Z$A?S$`J*wV`01?~?S9N$Ml&a{M@s7H*k3=(?KU|s!! zQ3ys0Tv>cDp@leG&=Pl-@W4Mji(<){f)JBHjhFR=d3@E2MB%QVG@a)|CWcee*%WVP`KU!VAu{~5AxftA(Q@Y5Vr@9BE7)bNNzbr`Q7ArgXx1ahO8&SY4x5)e?t*cza`MGvt1}+&hQuo9`CG%fTR$yT9vyh*B6Bcl3M%UR1W|f5 zH8*%az8g#J!hQlnQKeBIi{Ibq8a|orN))T z(8QO^3BIr3?(hA(M~+;^WvS}FHMywAjs{A|yvUCO31rEnw&sQ{G&1tZ6w>Ni%6G5u zs4Sk&hk-tivj{EM?DeTvJ)+K-Pzc2${H z;Z}3EwmsvV#stG!;42>IWI>`>3vGT<=1kJoe%D_U_Imwz@=1;766~2Rzrmq!REb`|8RP zT8*m{M^)T3dGqO6C0$|;{R61he$3FljbE@;rTT)n+G8tt24?M1u7~B~vQA@d zx`}c=Y}#BmO$ZAII4f9vYY$&Vl0YcUw==?ENDz5|a(>&=R$rZqaC8lgK76LCs%-8E zn~ZG?64P0i3ba?TS+-E~S6ja|Ob#_q+5J_jc)ydJUhXRk-6Z;mH z9I}2%V&&E=!L&8JJL zxP}K_cc-b}6=rWeIX35SICye*4cbr!bFfG)zqz5Sxe-e6;_tp-RVRZkWOqBZ^dPwi zVB+M=XTuBT*bw|gl9FK6La6_wfUFfhN4DciyjJb0tE$TA+?<~rUHO9ZA4+&Bxd1_h zc%zO)51xwV$-J8n7-E9McwVl7>}KbYASFia^6y?-eT{G&>Ef}w!;&Ne_8!s?{<;9cEJ(u zOwD;h!@DMgGEm&it`XV{E$lPxND>Sak-tjTuUg2Fe*k7moRWccJab?9PU&3ZAtiGl z%ywnWBD(@Aetj!*k1deAQ4BfT``V|yoiE1C#+}5R#J(T6(_lKwSlk_%n)&8t{|X=X z2*d0uH(}iuO}+cEnQ6B?pzCMZoTcg^e{NNYG#Xk*baytPkXNp|AjW*8Hx|bOhAc*v zg*$7F~=DDWD)E28F7ST&TUX4b3KQ%RBG`iqYcS&a~L>l(S%rK;Ea zTM{E-Dg%`al}Z*_KN=+X^~_7PCKnqPG(E(~@aJPjed#c1if+z$uDkqoZ>3+knE800 zKXn6D;QY^6<3xmD6*1Crdy(m)kP*~VGk0_8;#uimgOhD)ez%xi)2%Ww(-X}+w~AjD zgRm3fD6654IDL`#Nyd=$T~$-Jk-ab3DTTmy)-BzUJD0U(>4NksvC+>~)K?xnPHJ~| zXjkklf=;S3@8ektQ`zlHswJDxdC4?hua@0rLM{U$=_awBK!lk8FfYMs&u=b0cFspM zewbb`MMnY@-fwVV_Q~2{@MrAjlqPet@d?M)nF|e>RRUF3Q`r&PSN888M=oCOw>z~v z4Q@7MD66}7pOz7ilheIy`q$TJwa_Ka#U;>J(9JTf^KKGOmfXpp>*X=iUH#L|yeg5q zX6K#(`}Ro_9#cimO?VyA*M6bl9pFaBm2Wpbm>SV|zLWBW>(FH?&j90a=*-v*VR)#X-ZGlp01cK~nbx|Q?~OxKmR`f(xMn4zATvKp zUWl4NF>{KD4AvZ-vnfiEOG(qQqkXpeTXz)StBE}7oIRSmSt?!kdf?8o73OCL$%T~T z!|n0@O*3llRhs&w<9|i!Fw?Y3|AmFkzm_9^0CP@EHY&p(`Q&e{&UdArkoom3@4e$4Vbp;}?imq`skTA8!6{nu{_Nd1}X0GAYW4 zdu2*!OmwCw#>=-BT!RFO2_*!Vr^d-IP9zd|&CZiA{z);8P7iDPesc&;~yfp)?JJX{k|cpV+w{%OgGv+1XPO-JP8tp!@mxQ1r~UPLZBQWHs`(4 zEHBnq6FHCS^!lFFk)Gby8=s;qivw!cpSC@hI82VsK6zIf^ycq_&$L@czbrlsX)cBO zjeP=%b*}}@ZXv$MKMkBG+@T6oT72&E`G@f9pC++pmk@NO=@*&JGS!J`!$s`|p9i8~ za9n!>AomWI=Dn~>F5QK;ftjLp5PTum1hi7r$RirVaG;GyZb^~toOa`Xc{&vU&xC|P z^~fxMHBNcxC5Diw2O-CrUb!o?VV_>TP$r_HseZ6PloO)b{WHJTlwN|!ekUkisy2Aw zotO@k*w+g3{vk9YI#U#n3(Z?kFUTcY?DVv~sW*)rd(3_7K~aHJvBQ9h_sz%!d70w; znv*7AZd-{PPZk4<B1MB4-3R~vC-lVB4 z*aW&bKE~E}&aftYej+`%}rQ^qhgIpsvO>~u=h4g_A1D!mxanQ_%&5!C$P8Jr+ zh>20-*VjjD{>@iN@b?a72N`Z=eAwXTTYU1)B|RT-@|nE>Bl^vlC&S}o?eNI8D#>C3 zeqR?3n^DRndB0-g!xDF&TGaz>1}37ixF(0*5E2c+a}a(B(?7FXb(W3(!LBTp!DnyR zEh6??{*nFNc=*P$U$w~$*v4z5bj-CRWAw~nUd{i^OK{YvX=uV7qKf^5^~FOxHJnG~ z{nI|0v3-(w%^o6Zzj(H&U9%eIO7HNfE9CdwgJ}WeMdYR9+;MraI`8{>eaEz%Rnd1o z){l4mJuUBFsahquX-H58^W09IpH&%~?CCV#`C_DT@WSpGiz0U|a{(y!_dFFgK2`td z=W-FMJv`*SiZNyK=$$jR#s-%_gz5k~2z8s7=s-~1c1CROHE`}vi^-&L0Lo!;=$v^N zXjBs5MSl*52t$tN!+PW0Ji}#+&!ycsrowV{7+F#*4|CnKRIfOom9843JwqR2^2nVR zTLisM0cFGC-*0>-^+|F&xP;yXAPU0ad3Sis4Xh&ZUpBO{H`zdj6FH6JYZ3QM0EA^r8ohlGgwt_16RpmM=>KQGwuDF|LqVWjV3#ZBPTWvZsWl!&&1+5!n zZ#V6!Hw{B}6+or@&7=)?6RRSyEag8SMgtkymoWFK+RTw4)oe`6>8k2}^eZHC;UxeB z^V=4lK#bD{e;i**i0YFFzSawXru&2IHT(eI!)^V%oglpDcL4E1szcL%I|@UDfUcFl zi+m0RZxygalw4WyJ~kD(z&YsA%44+;&e!e6!}RctQF+T8?=!mnM;8?HXh79yCN?RD z{;(SEs?AQ#Co)x6h(&9)GQaPc&p&>B@@AR_<_x(v#T@Gh5j3S^(g_{GCfrDisqy;S zo*E<{zy*r-H6-mB(pR+TNIR)3bt>rh?Ce=n`L^36EgTjn%+k+GPi>+S zTX?mK#ph?bXE@f&3gcm##{n4m1IP;VV!~RB261|k=H+=8*s|>zz-8ToM5g)g&V@vxUK_<9gYu zI89 zYhJ=nwXC(yEA}ktXl6V{y+hX7k*d4rsnAk-9#-1&15Fi+hYU^Mf10iG*WhUPehGdWar=DisR;r))3Wif7(^c5Sye&J3-I;OOzuZUem17F>D46 z5&y$4E$-NCT6!mJsSwO%f!>}LkMaJYBkU2051TcPriURKWjynbCqrw~t7D_2VxCgCmg{;~aDTS%QG46Us9d06BoqGVjf~Kizf45asMUIbKR{IX=wr_?~Z` zQ0(Mn-WWR`4;%ZTwv@Ac3-76*X5NIW5)e7-t^UO>BfUhUv+OR>Z*qq8KCDT%KmF4B z-Qqnq6RqI>K`2-DEBsO268gII4HiXrs5~Mf)f)64be&}ls$JPI;j{Nr$cQpMwnl`k z4jS#r?#y%-k`KCH;J=G@FGZnogFAHEPHKP9HlnxwzA9u|&uk+%4#wlu{Uufo+q@|) z%cCU{sc)Sgd~>XpJlmw z)aEnb5zpu1Qd)20Yb&f%en2<)^J^8k=S*3=m+Q7`3y@EiyVAR&!U3s>>{e|hVFHum ztfg55`;km)2T-i@)l};m9I@NI2W^DB5?2{bwvI z4=>KLGQrjEl()~}6bhBnAwKJe_h#D_T)}rOxkn?5@hbKD(JTk+Jgo~|6!O6A(`zop z2yee`tJtS~vyFEzVyHIi({gqOR{V((i7O+ToNkyy z%9EAV!Q9?2cLh<4Q*W?hJ%!#QlAJEf(Tsa^6^fjMb;TS{6xwV$9Tz59q*ombUDv9- z%p+kW^vX!pnbSEt=mYC=_;2NH*6KQl(yk+lTh5=5bIaynXQ0Qw{=1tG@@=n5_fU)Y z+niT`zw>+z-xkKRbgUdU2EF4dRi;|X*IHU{DHK&gZsBVeRW&?){*)Qw?(DDbKIl1B z^JSC!By_*Utkz6hqGRPjcq00wFV75cZfIqgu7%G3glz(w_Ty~Ixt4@GY})SmEyT7| z1nV2BRNCBPj}{WYqm{du%!CP;uV9L1*?!Evd{@e^sMY1M>-lxL8chyM{KolYUPH^Q z9-RmUv=dpHyT{smIkXj;+zu8AlzkV%LN$Eg%_;GwduF*TGvGJl z5pMm{;h^CJj*hule-^d7SB5?NH8H!=e48yPpslnMwLhq5x^99N6B-B}0Tb;a6CQHI zqG+q}wC||HGOU~L$f{&_VHK0~lO$>KBMiLq2Zir;?&kPuqL+jBm->2=8Pb(p!SAF~ z0(gJN%P9c)?UwhYj4u*%myQIo;NAh3D@=lqWthLbsGdI7=vxm~56?XC9%UL^_^m%( z{l@CJ_7xixvoPg7`h1Lal;uP2(`my)$e-hb=Ch-@IsQj6H`tO!gZkLvo{J~OezK`+ zW)_D&r&>RWves9kj%vjmlz=`Js%+olPz>|2vwh0cy+Tcg);*DwRx|x=p~lxt&0m@o z&PiP`yE$+9!VHV!wv=@n{*|-f(pbLBJmpQ~;7ElNE>?Ec`jd9%5M9|U?BK-@t4GE9 z?a74=G}mCKu#7HL5&L3x;oh(YTf77kvmIL8aQLdsW*MO|ODHST2+Zc4@|oJ?e^ zm5_| zv^d&BWx?@aq}bNf|9GN~2S6@wd4nxuMn(4|ar25qGquQ_KQxj`l@*RYvI#<+bQED@ zT7&1%VoxrgGt%<_jJJKZx&SBRCq3N!S*lfduO}b zG4!**j&H#T-&=++3;BHoFQ&mWOlChv!Mla|V_X&XD~yDM!| zcYRZiwv(g20K+}w@zEyfU5P^ zNY?+{g^W)4{UAI0!5dZR0?66^aBmtcG?&Y2gBN8c?C|{*B?GPw(rK(8OeA_0ZQk0E zop~-IQ~cnvJ{L++KQ=yQCa^^RYd#^P`Z!~NIP$$ zS*Y&ygUasLa9L|$cuu0V{qMCPTCCh}CQ$#rxWwLKNRKy8_&fQ8J4*^tFZEH5e=~;k z^^ujWnH-Iuqfy&NIh+MbN@jvDsjf^ZbvjRT)nlmoj1ar|kNFw|&eEx}!yhJR_d+CO z4z2M^0bdK{#sW@(YMYxj1J3G`+`0WSU=)`oc4fjb0yfT`dH8U-n*SYn?vcnQ9P(mv`L?XH0TIklPxGDQpUXLPP3B<>c z9eeRCAELwgq5>bH2cN(!DgnG6Gs7IiX(&Rpxfs67{@bPb0e&$goH;<7545`IMdcQw z4f3hj>R6sK6f9P1=2{!&?Nyh2>6mK3cM4NBQx7RqkK6*9M>PBnZf1ee*j@vCw zH2le47%c7CcbR;5IIr$I`7Hf_6(sRVODZ9t`MF77-7`%fjVyRQb9Lo1+gW@&+HHTM zmOn+likS5Km#N6i8)IN**uA$F_tg{!}nq%r!7 zN9)3Zg&uW48sOwAc-e^nL%VPGfR!z`&#USSx~Iupp;jJG?GLtIg!!g>Sl-`n&I?te zm`mV^1z3r;@M@cr)sZ}}9ZdC455*@hJ%n@z8&6Gc6=%izZA-hn!~?zM>vr4R4Ijm_ zQ1HmMY~v>VM*WicPht5+aPPDbbN-S?02nw_!qC5MG| zXJ3Dx*3bZJl}`0X6d`^Ks};dCg7Spojkce-ias}4=kH|Z$_4fQYc>M*c_92MzIoc@ z9Udn;zUJ#yV{Cg%&>>rY^TlA%C(2Xk$$ymN4lV0AVf8T~?{JTau8oq^K*<9G^DVm1 zMB-ZEQ>R8lbnu!DmFg{YDGtQKJ`+w9jS`bbnpn9!s(cpmzrCPDTcF4{y;vq-ado_U z*S>LAz(lwe_R6Z2C9!I4iDWL?Xge<$31`S>UXE7}Fc`N_cS0ShUY1<+;{{1Ls~r0i zs~1YQr)WpT!HWNk_jzqO2G(=6$iRYb`ZYh~+uyGbLw4PHsX z>k$F-KT=Nq5PwIt=A(bC99S0R9_+I{)~%Uf&Cx0?gKz#VRWv&7yfTISqwt8*l#a~N z5H{7$+T!}9p%xcA__xUNW)kr%JdD^^YRo2TrlMABDQ@Zqs7&r>9K_Pc$pNKCc}jYb zPl5x+RvsjLtO(NVlhb&^@GjY_y2j1PeNFYL_1x#qjVu2x^ZnZ5HofaF?c{Gxw8QmT zZrOHe*E3I4%fV0-k=#&q$Gd_2tZ0;JT!BiGD)t&mg;}4kN-St~{Tf`hG;y3D!Ogek zAoQ6dL-<^!r;A>C6#h4F>Mlp2(dy=#&uDGSmBr1uMD{*hoIc(9V9C2GS{CO%5*}^_ zP*fLhFnw6lcaz=6v8F0xHansU#jr3B`|eIMq@}JqER-*iGdKLQ?^1oHKyR*iI5w`U zh4ewzxYF}yEvpM48twO*|M=R8;d6&`cduXVc}BJm@Hr^s(;HhqQ6N<52Dzl^Ur-S+ zt~acSl{I?AzblklF9Z{m#aF!@hu=$TbT2?&Lv5vNlgLqZ3lB$y(=#QFL}Nr-S6BY! zw=JfVm2-*7WxHF!`*L`(8$sNH{>wUqNq>#5tv#&#BEo8EsA4yZG+1WPu3%tcClxMr zs99fYc^Ir@!en_;Leuf;!%6>9Rq#@aGq-FwR9E=)uOQvxW0bIA+u`yp>>f8{t!(2@ zyEOwyR6g9TV0L?Q=DB_E=sCY^N(J|S==FbfJT+|J)GrG|YwM)fLkWy=pJ)MwM8A8P z`|-)$yPN<4KaHwHR6|L{FD!f%?h(v^OaWklF5s?2&c zDW2;rFTCB$6t!LxZ_&oybDX3XcPlIIG)ksJ@HQVyhR@i;RGKci$g}FB(Nt-Poy2>p zR|9G8STHyj!f?R%!cgchk1|fa221WKcRD|Z9wN!kf#U?4M+i$UVe_R{)gorwxEUSi$1?e6C`lel^=w; zSt+-%-06a{{~@HM_0k$zTL7UwbA|W!EAB|AS9?m`x8&mg1Z*&`x;)d1L#l7o{IxSt zk#Bf$XvF>HAin1zSOwuwV;N=`ko1vN6O6O z&ec(IQA`Fvy1h4qtEIBfOJQgomMP$68)qTH5c0*gv~|9w>6MOIos7jUy4f%&%!{FGZ$drYO}pNk&K2MH%?~0b9%CpD_NFJfEMo zdJjf&FkEK&+NY1Q9W;9u(%Zvwc!E5&JI+&}Wu4Ai$cDs9Baf?8}J=BbrA*IC9g;(KXX zsB-r=3cNE4Fo0Zk`v(i+{ubSbxVD|MsP`jcW-xxwKeq|-7-Tn}4#V8)h!b|1-PluS zp=z=MgIfRQhqqdbGTbsFNqgZ5cNhFdbL6jXDXRTbZ2OwY(>>}in-{np8&aAERnzJy z6zO#|54qfNspr|a7>`~=5+hAO8c-{spse=qi{fRm)(VE<-KQ(6f4{k`pjCV0d@f`! z5te?keiiYhQ=Z|l=sJfv=?*pha*A3WsFA-c(Q-)mXT?|+LgZ?8aS zY3$$W$WL!9~mF{w$!7BYsdKY%5?<2aVJnM|ztTk<^yIdJeUK`*Jgc`=ZU7F1MX-MmRN8Q?fsgV8Wl}{(PqD*2DAFtOti3P{8=%HI_f{bWCH_5cU}di< z9|VmVl{FHXnnP?&B^snZg=3#o9Sqxp#SbJ>p9^~`k6Mg5sQn{?jHkoiXKX%0Q zzSYT%pb=imzMbYMf!(hn| zPYuPLyYu?X6UADc%jLE$-?fh2%+E0|@%If;pG$W|#;@P_Ot>pUV5lY(=b3G6piB=; z2tU5HMT$u>Fkd<3clrH+q}?FR2&@}=j;KESxBcgyUa-P72f$S>A7S2vCp&oq%sC?3zs9l3&hnfO!> zA?z)M!CZbz0iW0G9jeEli1)t#dj5;%pz&avCq&Fn9=CS`C&T2heDzwAijha=HIgDT zMBGIJolUvcI5lA)Kj|Dj3p{MToE-LJ+!a2zmvRc;G7x<|*m*sX@1-S8s~Lfu98S~e&4$*=fp9*9b48Q}dEyVQB?KM6C z7@T4Tm>*L(_HlT`8M(sM9KbzQ5V=9;{Z=qoJl=@R%t!<+{@VEZO**l*Ij{O`2cv-? znxUAhM>;NVLz|R^!8Q7y(tlJK?FyLYgvHiJan|{#+3yDh5QIXx}~V3XVHEf+Fo2#w@kYV80@`Uh#{2=tSVY=m~a zL||h(OkMOdjk$b_-D%7j3-w0N+j7T>YyKfZFbsYT;R8dl{dr#mjt0l4oT$pZMkaBlP&d0(=5k z>^{Swt%jo0*Th6|uz*cAe*EFpx(mU44B}t?Ux#)DhJUHoIHkPytBj#FM}8Po9l82; zoF}NeSmf^7Z=D2TH59s&IV6k8TCikG5~LXs=8uZiJ{I!8A*RD3_9$~BDpQ}sQp#K? zQ7Bt_vB%cN-qWm=fP7(}EBPAEIcK*q#{{M>eDe!zpD6f*W6{9z7Pnvu3D?@eHxV;iQJS7slAr*PdU}N9~kmM zr9_FpJLdLAr%M%P+o0Cn&+?remj+&_rGha`l+R$CuWp{ac`!N)FFs}MbArJQoj{q1)Q zW%`w;=oR-O`wWrb;z7~*kISed()2UKb#qSSGEAsJ4K-E_ClnGAJW%F94B@$QJ}1Ko z^F$Cf_MEN9A6TIO9o}uE(79|Ep~1&c+tx`GS#FG5yJXVneY*|BrR37zN0Wz5NtFrp zZwc`G$NpJ&2Yx%MLVVgr#o{VG*RO&5Z72QP2sO-}d~6Y2#aw1Wp19_4CV4(~ZTokn z)5{sC`D~AGV(2}6H7a0!KReF%=k;%5qDyN{OQM~9F$dklYPc-vfEd+cq?4c~I2>f8 zW7L4yv$j@wCK|(0e_&k2qNdpI+xTO{JjODUdWFc;U#KC%56UDx#*y?FEkD)O-Tsbs1V zk`4JohgRgbp=guZ(>L(1M6whw__{LC(<-HE_Y>zRQ)N55=*+b30waYVCw#?LKbJeT z17^}MtR|}E`zJnOq|`lYd7vkf;jGguW#Rev4cTf%xHfj>dh?4iAf=F4gL-!lih)0Z znd1hHJLIhDPr7EPyKP-b-|n*GVt8}=UjuRt&$nnsYuci+$23&xLO%rjNE9?*H3G0L3puy?5)Dkc24(GeYQG4xU3}t=WfkQQ4w~+ z8od``Ow21w+V!sSJ=HR*)vxv!pLcDO$Kb0)-1)o5iNB=?Rwr%g2lDP|J@{&`s}@82 zxA)G=R$abpR2Be+Zwh$IJ=fHYzI#48jt67g6DF502C@>8h)Ah+^lMnl9-OWTUZON7 z<`QdQ1i{m=z>IvPb$`j<#mn40pYsDCC;r_ALC;r4v}DGEaehVKb+==95tYrSO7FYHl6!cL)wLbCS&jp_Tq76T8l_=igB&+3g>l6n|oj>O|g70uO&kUR5 zSx&3ZJWh9L8L0N;ra6t$d`s)|t;!9xEb~eHNyXL#S!vhdhY`F=4>+ZR3ljVhR*sp~ zZzzt0Dq7usl&Oy6M2H(MLuFbTuxQ2g_ZtaCoG*IIW3{x}QYRp>x!79qKAF?-WSF*8 z3XS6o5&!1cy@{C(JQ0$0C;_hiA5CZd*W~}c{lSos7G;bYDf$LM=@=m(sHC9MB{7hW z!9W-wEiEMtiiC7`H=_h(G^0kx=;pi6{dnAe!1c=&uj@RI^E{r1z+U|7gPR}}zLC&LJoZ_DjuMnax%1h@q?6<4b7U~C(@Fyu1P>*c_C;bn%7 z1D85U8(GNgYJq|YmRacdj}4gtmAGD~3P2sSRr8b?Auy8>64Gt}8082rFig~b?X%M` z&sg`DF$?mqq|oshUvFWZW{angW_sMvxHrMUHk}HHgGg_#uTs2E5-#8AOe_~LHW>;J zb0CpS5?ZmhtfYhGzwpb;W(eb*%#cK|mwa7oK02k8J3{&L!?TZ$`VbS z9Gl=P@V=zIapQw$`M--rSBLt>)Uny>ObwAqsA8(cO^vRT*357FcURRnBbf6^gG%R< z{Tax$^VfS;jxDP%VTKn&emSm<^)(H)D|!w}w{v3{BngAgYhjcBERG!Rsx!%-X{$MQ zDK9+gDQi6V^$xgw60pGQ*IpEI#?P18`oOV^!-LTk^X;W$d%`+lF-2v&57+DIwE`H8 zVJf>`Dd&mQNX~CD2b-hV%@4*;LwG2LgZdIMFRPJfd5@^NgEz z@h&(25R*bMJ>`tiiZ_c-c66X(DYr^XHL0zJA>@V*V8p~{loG4#ZR zJdkhq0QJS`kqH-vfqFHpB`sxYI?0;p&~^@O{`aMnlb2(`j~W2qAM+o0N$D~^iCXYx z23$`pQLh;J>@(;Z7}s=#L*hLz0yYoz?e31qT^W38&kLw+oHiMGq&=7A&#MbPN9$!i z-{=z?9jTU5k$9k%ZUBu2sP5as4PKzAalB;~Tz^))sfyZ&H4} zRb9Nl|I+TEO^UDPLY}6s6`Bo~R}9W}%SwvG%*w7z0-8jTiP1qm|2_{uNEsH5T3x(w zok87Ljx4(av5ptl8+8C(e}#HL7QqqM4<_YgC=*k@@?!{8BYx`%=w}FO^FKNclyi0| zg&~OsvN&2@hcQ@)ui>!GSv5ucTs_PC_GFV2w4B?LQS`2^-Isy_d9fd|uaQ)b$V)q- z&e*J(2gD6E98LznlN;Usw_mw1VH0rp*=R++WCZHWzVuIs-%@V8U$ZHZDS9b;TReLW z96jnpj_aY8wI&Bxaef4(HAiJiiZ$A1Sx%EOzLwrJLR_KSl>QFn@&Eo75Ain3er&`ZSX(;|15xqyulETIj3}jve=X~`H`|n zJT*U_EP-c@fl$Zvyos*@1niSBun=ZPBVE>PZ6;W?$lBABr&!}tsJ6Ezj1%_&JccY@2m)De}A&*}4=n?D@cCUof~ap#S5 zZ!fQxHJ&S15;t7-z^@rNgukxw7*GuJmHSQ`oUrs8Vk27;>9heq6b$ZEliEGJz;T&(m2I?GqBFe;O09_qb> zSsL5TnHg#Sm1br>snl*}0Z=sc$SOD)Q(`Kjf}eIqh!Kp*qLOuOHD_y7O0g>BXhrwP zd`ppedg2UEf)O*pD2m!g84dCs>s2{ROSUB8IskGNH0tv_OSU*2V;;5E59?!MB~k-?6-T z0(_MKHrFDp0|uXLa=(;B0Yg3JqNtQm%PD5cn*V8#HR2v#9c*{@G9C*N2E;7@1Q+ts zV}HVMJGwZ(R_}Gf-G#vy6ykDCc1uYEs#;}q!Y#Y)@w?aoUnteg)=1p$E*lJ~7@N3bmVaSqD=J9*XeqAJ=SxM|Yzho(<(FnjtDJ zl_xmun0@cZR&NW$YnV1WwP6YM+%=YPChI6T*-^ zw&_q$8Rpr$kgKvA4drALhDej!RGS5E^Y_O&0xhgNV*#a{*CpE;l$uHW9oDVnM%<=f)giFq=uv2Y$Z%biSEEy%tzS(ynQas8M;A}9 zs1FyzkPbkvY#gB)mPD_#-f}g0jqAG~^lu8blIiRwy5<1_NX^%6=j`Wv@UXMV>S2B2 zQ1|;hXRFfVcysTpPX0WSng@kv*vI$VwqED?FJ)zlYo`5tgMJQT(o5Z5uEnE#5%wn> z)Khz3_U|-IBJat`x(7JO2knQWKcoQ<_}Q*%eH!-`2mGg}@7BmGhxw6TCjIO+HU%9P z%LUj`P#f%^v^g$ezHdgRIHhdB@~E`| zd^<=_V=_UVB{#RRqZ)@M4=);`i}rS2I^K}KST#e6{iNpqbEyN%L*c^90dezv=#vr2pBt&b@Zarmq=7oGO=Qj%%1g;8L{ze6PnW@ZSHXMgYQCf(9?{+ylsZ zx)--fy)h6tbWQKmhJp4b{caR=(V^EAD_!rB`CKhWo{;RKhd;p24c;n$G?uA8zn$yg zkX=irgc8$adV+QMxn?oE4*B!|;lzvw&&#L%M)e+3PO$S(l<>}3Eo=6kN2tskt1925 z3@^p3HNC)D-iXfi)8_N2AJpqYWLyutRsS5ln|%C-=~g+x2>+e=(zafUfd%6FVWOva z4j9+x`awB0)W}J86g-c@2*+5{9oJd7NUuy~JCn@AFT9Xaa#3xlZ=E4n0q5BWGRiV1T&pgan zh99=ttgf8~CrJxJn_l6O?xl$Z2LafOyP>(%*u2XE6G^6X_k% z&^rDtw~&O}6kQ)Q<7bom_iCu-Zp8)+We{7IKQ1Kh4)AC@&L+#i(hN=3ss@QBL~$wq zwPaBfvj>*;V=@jEH(aJ3UgwmX3KufoUPDx5*Z{i|6rz>g7n`B*U5b$J?fxXNM00=e zuG6ll-1f|2-1uOjvAHL&P-i{lhn_ zls2C18MPaWvf3~6G)#l2w55D!0XZeVNwa9E`lJvQJb`Qt?=;h+Hk4WVoa~Hu%`>xt zkFA@~P!X|5t@p(d+sMlu|AJUSmK%4Re)D%2iqg$F^&-*ahb4H#1&6Ov{sHWbrLO!d zRAH<)QTOC3flfZc@T%HCY``C}VSev}nF8#Q>|@sw0tW*CTR?-Jdw)JW$5#483>emlXgF?M74hYq@y3#k2$Q8sOM123kYt8WAGc4V)>@{+|FYm! zS*CV+c4FTb4S$bt7bZWJ6CgLZ{>9x}isqYWm!fsokE7czi8>O;N|#$TFFVlq_Q4oW z$oZ{Nchd169ixs;oj$eC_#?&;nigZ9S>oG-?y$r5IX@&B4LW`Pg(tT=z{{ZG)c30P zgezVko?4g>9&<4n=VCE!soxa5(HUnFQffH{X3ULJ(4Q}rlC<}3u1nJ4ku=b|mpHIca|(91ezjp)itSyWe~jx}@e=W%VFWV4zMv4~BJA1m)h zssgK9%qoyQvmH-Cf3$mpnDd&Hi^mRjd6%~aKr<#goaE&UQ&KM6?gPtn@wEHG5l_#Q z9Sxz*mdK|WSjo)m7dt28zUG*KMPeO#!rE@aEIf4b+Dek=!}!!^FZG__#rsu4=ooPf z4vfMBZ7v=r-6^h5yQ_8G?8qX0YnnVPp$qJ##yDFR3+wvT*v!GW)`Uak1iYY=zc%60 z@Nc9-nxpZ|_@lL`Bgm95+|s4=3ZW+DOg`j28G!x}V&uIt9TZ>!tfv%GAO7vnm+|e3L4RC&)h-&0FF;2PKlp0$1RV8w`IbzI0J{qm&l@s^LvQ_QyL(-^<^1{qN z?y#`erh=r*b+8GJL}dG`y`SlQHm2*ePK1<~ukP$ywtoYS!!mDumTn3{lOU&?>9_0s ztRo*=X@Hz2%s-?rc7Mh$#q2knGL|_6+UwUNXAkl*hbU@l;oWI^WS*x6Gd5v-W&{AD zr%yquEebKAkAPsYTTV#M0mTAfWL8$74i_rzNOP33d*<2^ z5RJQc_!I@i-QI0v;0>9$Oa_vDqclF*8`GZ`nq{a{uoEAYgkbTTk>5L{k7L`MQDt+u?$#_|Q{WQ6IY9Scz_7Tmx^(z66E6@Il5)zb zL$deK|GWVrhoU1W3zhEu;XFUd^t0B{QyK~vC;}Q*9a-SfqxKT<1Rj` z7MUR)$;L?F+8xIWPK1nBB)ofUr8gtpVmvnSrm)c{gYlM;lxT^YBjw?4qZ^+ebHA>d z81Mx~_o-~{osFg+D`8I5n!#dnFdAFHb5dN1H<)V2NIJMq`lJ>`q919bIxq=@;7Pob zVDD{-UiN5F8}F*#>GPLaNh6S*5fFz&xeO-G+4EnscGAks=0cZ!YpyrggL##VnWagv zf>Q$uqn$2c+G8xEw4ItH*&%OhSUkW8Gwt8)XF}7k6Y)$Hh%xf1rsQYQ zOV1aWC;;@aPgBEK;E1@}_=QJHPHfzeBop{1LIsvV_sbbw<=yGtAE{mMMkSD8xmDYb zc{*aY5kJk2aK79_5#V^-Gt%Vt0yRdD;+tvsSS+fnH7ArI*3NTI1 z9oQQ>11fa}ScIHoyHl)0by7oqTnOR!`#TCYpC1+yr!(~B$&B+;RSZHqQ0nu8+Gz2F z_L1Sb&n=Pz*_GyYcIxsEI*%8zY944a2m$|501L{lFeOmW8;LQCm>Q7v!y{FI zvrT64e?!DQT;7NrU|Zp@>lgr3ORi$+B*Q zW0T6o)GcbQPdHP{zS4&C{A@A(J}0d~FM2@U^SN+hG38|NYnDUOD4>2+FzuZnWyy#O zJRZELBpHnI!UT)8@clpOf+Drkf_XkN4OftwT_H&Y$Arg$oKJ>0M@5gShZN^(&aC(V z!-L&u0ML!fkC7>o#jlroNK8u44mC3(1}q4GJ}wGRp*BK;8tkDfQ$bQDz#0vvz@&>~ zAam2uaXNm|et2-4oGxIo>i6m*1T^s5_X<^C`!$Wa6bJfrzJ$h8e6MGnKtS56^%@)Q z2rO2fr(~`TquwEp*ji<_%vhRugeBAVF^fV~tyXWc2`%t}bgY=SRCr0SWY0pxA{tZ^ zwQ;w{VF5|z9ntdyoQ-C6?~#a48uep1ZvT^4$MEzvp;Am8-XW0>|H58!=g2INipq6n zE5w}~|NUT`_hV(CB5lvh`{-|CaD}A(MNcX|x}e3YgHOmVxNlRX4fn%rxa(!xSqTMp z-Or=@=FyqzP;b;n$Jp&tS<7M`S5Kx*P0)tE$#U{X9`r1~%oJX*8WF8#Ihsp$zWU}9 zR)5r|d+jiQ@Fo-|<=@-6oetyeH4$&|7Od!ekI&U5hA_%h1+(filNM9Eb@v0QdU*ki zs;~fs0HJKl4DXZKtfdNy44EU_CY2CxH;E35q|J!gH-AOa8GmYfm?Fq=9k&?;^@qpo zGIz5JyS`0W-~DC8MfY@=xa!oG5seGP_pU}Z&dif>ZYbQ}UM5M8xp{{ok2$&S`F1!A zERF*R$!`Cblw@YWuqsh%?~GUHz)59TmD-o%G}vq)%$KP{upF>c?lfG~QdVomr(g?E06!})^BJD zWG3^0N}>`1gbITdIV)%f!_WqPR8EYQmv^{mcG(9vX!nju2#5_iJ$PvueF_oY8|VCogEMPtuo3HGk2T; zz94c8PyyO#vm;V#qw!xyP|)x5lU5Wyk)iW+P(ezXii2EMR_1P!dLd;+@n;XqiU3u- zJ1v`{6`9|qoX$DEb!|Jn`*?T~EAJ9QTq>QwURoT`$wXdwchNW;vV58n4}7v-5|y;y zEH!R;+o`yfLmE#!k^!}nTI{t41AXj0vBrV~osArDc9=Q)ToTGNpTB8XaJt+uS+e>unJz;8@F8&54qeOb2u1 z+1=UEy*5#kbcfnth9Mj`8jr@inxmFO;~4Oho>Uw^vEbYih&A@e2yF~>vq)o+92dzP zxnqqQzdP&N^+kUbF>^d#{GWZC2QTBa9DE&b`x9Typi9xQ&x|r-h~L(ME)KeImvRs zFK5-}5>FO>nN3U!1=_>1Dh6F&Brla0j9cy_=F(;Yr|Nw<%OQ8WXnNn9QWJeIDVL?V zmf)7)JKrykggoeX3*i~Yd9ZQ56mX=dN}|Q|cRSC;vM_s!AKY@JKVr5qPGsTrpa*?x zw;hyCO>UVX&CQ=PF!7<}jk!=YeEl;XHcFMJ$H!i+zVJJP z#d!5IJLxUfg13JzCjV%k{L?x4r+3NR2d@z$pg6Xa5^f&vuK17%?r>2TPhd^_6Rlpf z%@u8Fm(uV{@L0#4;!Rsg1bOR|)*DD{AgBcC!K zt-il3u`h6Dh^R6WIFEN00>!e=@w5_6Nlb8@5tp@0sDB%%+%Ny3)PNIJVi#_G%LL2KNti5CLk(8DA zUe&{jPBjW>*pVcL^?q;Obn`wu2)yzjReO7wQ@ZZ+TJ-9G^pTCoU46=egCT~2{$Lo7+wY94V;|y z`DfmajYMb~8CE@^r)<=SJ*HF zR;0Wb)|;f6z4eL+b%ol$&O8V>Pk8giY1H7IuVIErfy`@JSW{xoDC!$nN%2SSztcCYWtc+&VqRyYco^I zhnUDV9Pc6!p)wM$#@axicDCfOFAX`S-8$+nQFOi;nRVyj@PS^?$r6!Ey~vL#?QO@# z^53hLE(nmRP(PT0F_9FXTyJPW58%yNv2C20&jlntKzeJUM+8MP;dENja9iEC*xuUN ztZ0?wq0aKQ!lWRWkwz*ywFty$s}#wl7lV6?NpO8&{PVyFa6E5}QTaP@uWPx~MmlrK zpbzyMx4JeUIlao4Wv^zafazma9t)h|xkkk2t#00hGg9|oY12p*rn)TuT=Xmuokxv>Ue zD@Ycs3x}Lo0laV20mXUI1TxxB(_ChPyi#hM$M_0Sa#pAUWiZ=-X0-Q#E{GkK__YY= zGTDErODt^ZSCnc=rbm*6-8?MPRv73X?*&BTAzc^h0KKZI zYqbL>P|Dp#AO&>@5IuS8_jiCPF@mG3v^+)ZacPg#{O5NSS$hL%yqG(+M)yC{B5a`I z3E-1SQI-Tx-T6p?$(h~W3X;3c{t1;aZU%rqvI!Hd1_+SFD2m?u`BAlJG%sW3(OPww z(_gL}*Rty08(QA+=0d}qS5`G2r(3i5 z{+~(qiwlzlSKZ$DEJOGC8P3u>HPo7!jlhGe>})D7>%7bivjIqr-gw)z*fXAJm$AU2 zPHL@?vUsXhX7VVK=sc8M^t6V$(Uxise#ZLbb>lU4bw7FN#)NT~F) zH~C^GOqpih?@XKn*}y$kCzUq*pwF;*hJA&*Sp1I%cho4_B}Vl)T;LYhxDySCjwAp! z=a!RpzPqU?3lBTwF#l)|*Z?rnfBD4jl^xJx%=~g&QGZ)gJsDDL>8{sTl_q>FY=Tw^ znS^e9ACdf~8SJCZwPwVTd3TcQc^d5`kd)n&?(^;Ltlu_>1#0Po9+;X03~CPr~?9fIf7hcL&B5Q3ZG zy<-mQG|4LP)@ZUfCEnPTK;s>$J<>j4&{iX4eHc0$v+~WEq$KQ7I{YMJ9rRDv#q|zfJHp1;cttNuP%=IRB%Z(Csyan z5C_8R62j-_bX%BGXYu?6QomF9jF1&Dt2ZX<7yc)~t0%Bch+oGm@N_cVq75;A8+@GN zdAN6XpW6=LPW7rOe-31oCHIfwaTi>ZJvyc#5X0$jm3f$UZ6dp1v8w&A*h<1@C%Nl{ zVM^S_j!@pp6?7n)W_?7}v)-p`wwoWzC4)qbnU%gOaa;NVI`FmP-=R1~(lk&Ir%8#b z$*ePcQD3aOh|yLuBFS?guvb}TBt%!S3ScC+%d2tF^w`2THv3~e0meG%c6@~hs))Ff z03N|+lf~zUX}Z*L!&J9(L5vfGQBu1lwU6h?S1^M^v zX1AP21rNz~orxdn-V!rT=Q=+Egg-UrIvM{pzo2$R^~LCgH@H|- z>q**CiHZ2~e67#>mbs5SKCdIEBYxiKu9DTa6GZz=rhZr^eejx3MP>(RI9njf=ZvlX zD#}m7u23Tepg8nnP)H>n8RmTI*{X;lDCLyo>M2?f1)bfBvAo`GI0`!_AEOcHpm)i@ zaZcGXyBMF6L`48b*fc_)su+&G=vRd$Q=8{jHxfSYQPSqzXwv5Oana7&E>Abs@Jmah z|IKAGEwL=3G$tsK>xEA=`HoKUbuaH9H9l_~v@A$2s&+(|YGoXl5X(X zOf|y$xm>1`QV;xyE$8$hLU`#~eG z*1YT$l2(%`6);DfAC1ktmmjA??;3^C5)e51f^t~k9J|S(GH_wO zkQMTeDyiQWzFT=-nQ$+xaplgt6{(jDQGy$u+D55pSfFQT%!r(^sJZy_;7<|Z|F15`4ohNfg z34q}kF_lXh#l|U(0!r9{l)dT-kymISufFy9z(|vJ1KHI$^I7_v&9f>6a>u|%c@#&{I)rkwOav^LU57_D zGZTBK{U7EMCm4+W02A!6ic#&aT$@%B3sq3UQIaBRAtcnvZm%6y45#SNKGAv-)`)kl zROdH&qi~V}=_tnvH%J(8D`Ms~oq%uPz-u#-ngT(QsN&z>;W`y1<;7`?meC-a8oK9C zcptKodMmY1J3U|Esws&q1UR`?ZJ&LlM9}KdIWx%#9Fh`2uSlrC>?aI-qy<1m*YN2K z#~d;8eDD>zsSmJo2yogl5gnqG{KdRpg{IR^yUlD(}!k)BDAr_X@W5Z*f!Y zVw2Q&Tj;C70N)>mzeNcsuA6o=^2Gp7En48mEO8ddX!yt2;S|cY9~r7&N2#npm6nF2 z_P2;NyL!lwqzI7%EWX+^Yw5rbTz?IT6FW7MZB^zcRP#MAA2wm-G-u1T0bUFDVR`DP!Nd* zGP{No1jG;oA5qmPJszTpEA9OX-AdaX#aHIP*_~z*FTE)IT>}txv0>9NSN?=^qW56s zUCB1jh=$40^*~n9q?r-p&orZt`w= zq#shK%4cl!{2USTCHAur)LT_hl3+jHVe2pjHhyNV8ZHCc%n%7*tV;Z-1=uTmiNT-n zoeVTvI82>0g#1 zbOg$=mI9uin{UE`I|)cE=!GFW{tv%9tInjTQWlz1&VRMRxcAyMy#F_9o*QM97|soP zy-`kKxjGHUw=D99o_u2sth+lgv&Z>qu+E!#vY0pIu2;H)~Q0jR+8PqD{C4U_<8U|1Qm14@q5c?qR`(TchFN5*`bw->4vl+EmNop_1QU`uA{t5DRMM<;&_qrRg+%roertn~Ts>m% z#7gJU*LHD}=AMUg+L>s3~r+EhxI3c9NY9!gTyuO-Z^jU%W7F1tZY^C||)RIYZVLu|c*; z_f_g^Yx=Gl0N5PtKHAICxic#=Go|xn@P9o53{bASsR;JW>Rs8C%tyJz#O6649y^CB zM8hjsw<@XlS!-Cg%TTe=E^olMM=8op4j1BYxz+E?ItVU~_pL4nP2V>^NVQ)n7s;X6 zB`UGm+LX~&PY&MU^~}**h~D>5O$=!9fj06_+9()>B$hYH@UP}PCDA~)yZb4pt>yPt z1jca25?knXH1+hiPMCpn|-PKvZck=V9X=x_0mEqZlN~{Nwr#q;_O%+VoHW!h$&eZJumC=0og7 zc{6<8-%0G}4-qGnu_i{!K3R_24rPCPoh-rx*p+i%ud^x1e_RJIkAl&$pe;N}bf#)c80bhwomh}IWyv?=Ur=5rptedkFq>g);3LJ-b`3|1m< zMbo_To%Ll;j^{)G#SI(foPZ6B5w)9M;#!tL39G>ff9YD6%1fhcJo(*y7l34KTx{xzX7w>6NjPqE`_+7E}I{k?* z@J++|O^*cUf};S_;c|sgPbr}r=ByKZU9Cz&!D1*58*1V;G#iD^FhDVZtFtkWIWv!w z0XLV5tn8O$X`);vM^9G7tx1z}>z`tNxG=w=Mv?y-j?6ef+TMyDIndoDz^sZLvEPac z7m@t8$E`(>c`oH6sVjkMT2qWN*a2{zwE!qn=-wM(7Fd4xSvTE2)}dY4SzNP#2n=f1 zl0Va(JxaL_8s?r3vu$Bb%-i!y6=^Kaqk~91BQ$Cu;KecX- zh+q7!m&auaK$q+{!@Nq5Nt%=-=0C;A&7K4k6A(hvt0UXaRLaP1Oi+5QSX!77v*Urt zo^s`mUBEH8#$a5ODy3<;Ay-s$4nXsXFHES7PQJ%Yn`a5qty>1~R6v7^zgv|{NqIihl>yHyVc>?MU`1^OtTAxY;eY$hE61E=bN zZgsfhxBWK*=3i}PoKizB`zqltXTg`N&Mq+|`q%RYx|xUkc1dE&AN#V)3lQqYcj1M1 z*1Qk0*}ZQ~Us!xCnMBu3vdg^7-|ZGeLI<4Yv<_Va6HB=)q~5Y59fq;G{=B67*XazO z_2Y~i!F3a=FvFvBIv1#^`40FUq?W2*S-xZOuzB%ecmuK%DaGWvpo~8C%=GzhnOocZ z%HOmdQ+)M0&4(ZT+K?>UUL?m}6XZOpAl>(NX*5W+HfRk7v}koR5EsSROsXUfR4rul_e#mZdgIy_xw$xz9d&6{h58`-UJ7;fMr(Vf=W4ZHaP ziDDa%#X+yjkllz(YDSskhhE9CxaqVi*Gfo=GINahaj30~v%ESH6L$53HK>~UOEDa= z@~@w5a7E*umE|MfTkCXCq7V>moOC8(ZaQ;xB3T=yyFr}72P+SL|YRH7F^4d6B z&#pKB{sQ}Fe1^h98}H2a17v4o7kF=!o+}?fp2=Z;mk`U<8XklMaA4>J&*>Pi!ek%W z{C$=@N1T;ollvH>SfkQeu$$xAB@#F;fs;Zk}0+HBxMwNf=Nyqz!7^sjene<|Pv3shN?CNtV4h=$4n*=TTly zEd(SDN%M!hSb95Oo>F_^!Mr=WOc7olj*bavusNOU7Ps#y2Vz~>?TVB3^%qagS#tCygWc!(l%V8^-%ziEX-to`FmQcG%-=Xp=ZD;-5?)hyJ-;;lo zn?qV+!x&HOKInMY58s!HlmKM{$k>D$*sXF%SI_(H0X?;UbA+#n{h;#iNt@pH5M@yy z-ahVV(jAj3g&TJ_Lra-silu7X^=yGGL?MiL2^#r3d{)@vD*OKQe z6~4kk%kwR6jpz@c(iD?rp;nDuRr`zMo6hJrBeZkiYx}+-fEd7!^jxyjR8nYao$_f3 zuS+fmf6M!>r+oM3iL>G@twKwAh^ex9XsF+?$b0`eJG|&Lj)M~E>gMH3!k=s}7dF2W z;NK^(rqAmp3?%9+vf+I1Yv=Q=k7w6(R~KLo%;Zo+?cg{lLkBUvmGhy7_old8@7KZh z1^0iUOimbA?NSThiG2B{CTE_$?z6mX>{#mk&&Aa-0L?5_{c4AfJL`mbLfnn!2gAkK2JJTeI|jSf}%tkFb5(; zE_I5($qKUF_r38+>KpE6>Sqf}MpIrzUXE9Ba5oK&(^1$S1d%VB+zmt0u7c0O2L$j@ zH2xAgi7PQ|qHMRHfQ(ibJF`GNWgCJ%g}r_;a7l5AJu-@B+HkTl$EPoRc}2DY{KKJR z?XEpGtM&`q-Ki`epX4v(n5eqG0%q;Omdoa`0l+zE zNNo9L_6@>y@6tG)S5i!hYxoh|2j{`I7E>wWGt1#%myA zKvH#z>xow^82`tsxGH{UR%%ITRHQbE=C<{%oAabC`qu?x2&?s>9kWY`WehEvMqFs* z{N*eYKkX&z z#z^YE%yfHSLIibkDn~P_c{=LVDbpX#=)QGQ`Lx@Va|Y9aoZYS_87*Y-HJ^UZUT3^4 z*whloa#@hRu9F5xIVljOfxX(Y$wL(xPZgC|x+1?`vq!q9VqVxZ#Z$p~2;nUHi`amk za)N5r@zrsq{AlqLxww$qIO1UnR_C-$Ao{>!biMg5!kbZYv)O!sb-y{>M5xv3Pfw}# z;PbVLWM6OZ^X$e9wN|eAGjhB#3vl7YcyI%fzU@@{9_*<3m8l9+0i{sl>29oVd;P0l z*rJ5BB{#gZIG9aKf~77#)6^83OOqT1uadKc*M% zd8L~z^h{4Ds_WOnlH!DI6c!{{6+~{p_27lQ(0-u6!Bd5+TbnFQx) z8ZrJGcQqG0EGHP`=W`gLeHM1ZK^+2&8nn0)u|AhsC&-qDhzsCfH_cXTEY_JUdnM^D z?#Ar~(GXoTml!)4BW@R(GaG=Rln`9q;W;lOiJSZj-)LwCcpbUaM^K;`yHCu^4~pc$7Vny|CbK zULUNfPG3?rCBpf##ezP)$c{pgFgx?n4PRC~K_suxW1#XfS1r$>;>?EIe~tv_S?ULB zV5Sw#gExKLByGJ1{=_E3ZDsl-U65?x9mRcWuO5#tYXk|cH*l4WaP+asi&FM~A0vgH z&kHOg^!^U1C=*KKGXBbb5kw4<2Uo^wKH-$1$Q*i$UK(jz8YdPw7rSoACt(?QSAsdK zC(PiTAXrpp>DkZbbioAEPctxE=?F#y=&c69Qm8$%DH_cQtz*k*4A2jv*~?EO%yfx* zjCjt0*M89DpCk|(Q`5h`Imi{|do54N7hg)Oe%)sI7Rl-7)Io2N5pVmPiBhg zoo+FiOeI)>{OoO)xYq&8{hs^r^MA@IO3AjR&7%L&{pWIiu+;GP@89QXwv7LV5bwlY zvm+@kAD5y0DIa?33UXL-F-9r@f}*~yn7h(Ff!FJ zBX*4UN9`UGjc`98vy&g}SQs5O6(#zl&3|l+&t6jB84AisB`T<4AW{WC&;6d0iL|x; zE0Ci`3}I!(60@<{`Yk;gAkOi5JQYrf5qq2;j?~=vDez_%Bdfbj5swV%N<83QQR$#I zR|Cyh{7vxq&dB`yzv*)Zwu&PEclG`>4ZGhr4h35CHWOCt0Bz(TS5BO5y zFyAmSB(|7lYiAc2t8Og&Q$Dio5${I?K3|}%nb)<4DD?CbyS=@AH1uMe(`@a5=Kwj5LR6aneZ``lZjoQ$9 z^^C0r=KU~%e)tcj&}u2MoVv~ARc~4lnJ|)GEVT zUg2@HzJAZP(oaYDPh%>yk0eqaQuh=2#@vX_?Mm!QjGD)F3h+bDs#f#zlWyS8U z*WHkkj-5Zi@oVeUGihPrKnVgcy@M;a8dgdFt7lC?0a=6I-xr#0gYx`Gz)LG3Kqwn; zzu`;X1J{6nfTp*ms$??p_w5P4&C&$JNFgcS^1|uj+1P#rWBsu#oBe;wt178=rzw>e zgtE_{KQ}FT@J52@B&#W{*N&r`>gDDaO;M^jD8~UOrjx2?ssd>m;2%kJ8DO4LLHJk9 zTp*S}OppJ$#U8@w_*$T;coSO_tZ8o6r|9h!cTv9>HG!pGlt%cnpLbFZ>i;(?fD!7W zJ1l}!nT!gY>aDhEyz#6|>&SR${?QI_U!59=cAKfOPZj<*$aHPivr2k$dYWP+;M6}g zgiog_>*>Fz1#yvlvvrdsmZ<|e{q#tx@cS=lx%qLm#SGDxw11;E1my&y(}t8ZtnhD4 zfPYGoW$vF=nw&J7P2Yf%{@{;RFr7~nRIc*J*~tmG_1S1wx$&s)5IA*ITqRDqyy;+_ zb>JFv9rgMwRY%z|K1ENtXMLS7{5c;*N2^6}**%^@QnJ(azAPF`+4o~Gx4I9&v`kZ*x@f!t6nRMCzWA87#+Wej`U^Ky9i%Xz*ixdm)ZGoaK zZEge-HvOvG$rT>QsVJ6W5r>JFA+Yi_n#-3cT!^WUN?@|1 zQWN;xlvMD>L?Gc|#pk}=f6ZpFDjeGH};> zQ`cpYM@?Z#3_CpI>6zI-7>kf&`!FVh0PGhr_-iYyJJ|r%SuEAb!E5EjONJf1?And} zfk-qhSXzM8vb~eT2(QW^mYn0Y0r14~r9D0Ha@&7=UX_f}0SMt3GkA-fa{wFOhtG+u zFi{c8&k#IGL>FHB!?T}!uC6WBm6l$uipss9y4VLn;6RIL315hRMdub=S76! zl53#C_CU9N&6uB3(S^WDQKyM2W-5`)^+F$P!ER79sGAoH4yeNt@{?%) zL##J>U=yKj%8EbSj`7IkT=ssU_!+3FrdE=TBJ%OEIlcV8n~wEnC_<&gYXO<+3)>|} z@;jd5V{3i?83p%hhmDOu(#SETHm=wK=K~JtOh^1SLRJaW4{SDrB+;P za_kyGc0SKWk22hx_FT3}UgKJlDl{&7IOCFdmCu^&+0plCZ9L~Qj^J!v70kt`=b-Vz zcSoAKDbS=!2rYT9MKqNaj9UBdx1T1WGK|@2`26FO1FUv+xTCpk@tSz;$z*6R>SaND zNEteDK81#eJ?%?7uc3pzu6vnT%6qufok2#nRCz)-0cI0p`@CT%Lq9;JOW`vR-;C!Ve>rS`Ph(=#T=$;3EI1$B1$)1dNx zgd;1JU_1AleQQ=p(k#XibMVnS`Zx!zZd|uXBFoM3sZm9-+jNU8y&OsGzV-N806@r6 z`L*0fn|?GldrT|i?FO>1ag(^x7=H4Dstk&ug3$Va0_02M=2qdGBK+s4rAcZ4+HjE? z<3=HY>oysy)&oJ}3kQFz60r;@j-BO>B+xbX^D3y$4CexSOJUhKAxB! zmHQtQ!`hzSx|xCPUZQJ@v*tCa_y5YMErXODNdRTE$da$65XWI5!T?!;A9%?dfew>x z>#FU`4#>MX`$N6QY~eHt_$x+;_)O3|M&=rY{p~FFQpMBSVQ788Ro=QCB0)~5FS`I0 z(O=@*>cA_Lzp5|L;LCX8*mk(>7_huX{}1ot1yTBGVx)IhAr*bZ_l~5V`Hna{v`$Ud zW{KpxVXPcEN3a@%JRWpcFgIs>la`TT)c%WS+NkXQagz63tG!HdQeu03qS?Qd&rMc` z8ie746@cY0djn+ZrE9ptjF#wIBz_mSF;9*y^n0=sl+*>|9m&MJD6Hh5u$GGJ$LHS1 zso}|>(=%Bvdwz`X>7!A2Uw>V6X2l!bjfqi9&cRAtlf`U0dAB7ds=}>lK@LF5Zrpqe z3&F<~*MX(}>aOyvHp`XCmbyy=S^95dn!a3hk?VT)XV%;RoJevVpJ5ufXSq6FW1;NR zaCW{1^7Ya;wvgT0L$5OKFf~DcjZ{ATXSBHt=&*+^1ptvFLHd zw?8=9z7F>bZtGpJM8P){jFnwhz9KuZqf^mv#GJ6)<@-r5jyphmRs_N*jRU&!o4wko zxxrJF?iswNqVvhY-D?Y@#>XX&lLcocm)DCCm0vn`v1D_O1^37&i8YBt`xY2oNYi@w zu{tY-9NB|ph=PDl)+o*jXma2t@ztQ5`k#);(edTv)H$QyOGv~Y?$gG{{q9+Gp}Ow4 zqVxT$lrCK?#6aT9PdS^~V`$VecV&z!8#*0FJ&-rjL+4WHjcswuMMw|BM=J$Zt?O9| zE*Ho*!%=e`7jR=FkXY61lPB{$0?AYp=bh|6&{9;YA4=UYKKPu7%a_XjY7_f z00P%^D36~?Jix2)rk~CO#@_FbVaS`ht%}ozdSvsGcZ9~h;Ej!y1K=HIK(sJ(-&p9^ zf*eA=|q>Dp=z&+dm74474!8-c1MDloDje83T6GUNCd~E?i zd77{8ejl2aJYA^qh}4PfrvIV1`N?CnzVfsR%^=tCg=Yt1-;pgae=$W7sbgT#FbySo zQ(J6*sT1!^l_-Y=exBt&3EdyTjfAr1$G>ehgV8GJi56111-V`S<-`B*PwCA`D%00{ z#Soc=`Zo$fbCCOWeM1FfF zc?vHM28R$GGVA7(V?;j>k^`Llp!LRW^0&WBHjEM;=7*Y|o8xI85~FFD3XwcciHtPf zO#Z8^5t8(TIKvPICg)LFRu0^rR~M*Tya1Lv>C&&#~8JvKZ$YvQ{A{h#cqC``aCUpI;3vnabQZeQ~g+ zlNL8SC<~Xd9a@@wJ=W-Mtv%rL z#);~t?f=V=*K5tQXf*v}6LZxwe6znz7UU=QwOt5hI*YM>-x-}QK;G%I4fREW%TF8* z-&!8(XJ?J44NhlF&HwCBFlXL!R2yxmv{QS-Tw;21REw)|Zg8G94NtC@0DEWK^Jrgv zam0$c1bm|z^47ZQQo$7kb14$ z=X-mx%&;`GtX6s^*rJiGCPio&sY_OW&c>H5AdOw5b*_{schI}+JwMn%u53c}+ba2M zW#R;keFam>-$ZqioZ|tBfC>r-VC5{DK=<1o;1@+K-*KgM#f-_-=@FZ3dh&Aqam7iY zxwMuoGnk@G>bU07sbcI zG@>Wb&?P_zo?rqD?jN3@qOcb?T5d?9$LrAYXOH|Z-w|D>&CC5@QAP$01=#R74PWJv zr?6mgdO=*(vFU6TB-Qgob6G!{A^J+V*D zlWxJajIqqoiZAc%$KOgRW`v)D8fckvystmIhUg=2{p{wDquamzkT(%+Wov8kVytRG zhOVzzqcB0f^H_2~Q7D9nEEY=qOVDiq`o_w5qb6Q0;?D$TO#-7L3TC#Xc|FoAC+MOD z(8CUxgfWM#HG^9&v_!zhPfad|quq7`nL1F0fs)LpcDZm!bBy`5{|WZv+S6>&MA;-- zB&opZso;D-P<}0vQ!!rsWf3d2{0O5wCBWq+wK)8s!W|dfv*<{S@p#n=J!e^gGyg zcB568!!cRAB$JBIE?eYoIfn(0kB=)-ZXAN-{Y3XJ`wc(aqDgx#gk5(=C`$QqCa0|H z$_X=z_Zx34HwaYSq`QbWfxNj;^s@lk0I$u?XRFU~C@yHOOaQV-2>RD3%xE#iOm6}b zTKQ1%0YNp+@g88DZMq~&&C{L}P(8hYZ~_De*kww}UyzG3Uv8rZboPHQkL314{=B3z ztZ(_EYsgCXk0zj2#Czw9jCC(GBR(eJDevifJ^cWE(iO{DWDd|6+XqH)*TMgp;0Z!4 z2p4q^rsjYJ2T}GBiIVkQ)L;hCPul@ZLI&B?|D1iRxm2>`JL%mG=w_hEVE%9({@Q)( zb(imX%bwY1bi1}9VS5UfEgD;3q{L&qs2|W5@%JzDmkADg>I33(v|v^lp3Zjdo2-@= zn)r%kc0uOT2s+x9)wtN}_X{}vKd=87Q+~GN%lGus5Lm1R;nH{!6%pLoy6Y8vM&=1_2Y%;ySZVg6)G3i2KOLdzA$}$%8a9 z&w~7(Pe1mqqp4&-c^r)CbRRlxXn7kw{a5mpgh;NoC<wiRDax*|WquK3HD*0{)Ee0WWB;N9b?LS z1W1lM>I`BEOP1{pP(Y3mxBDsE;0{8x%6Yjl{2_KGZvLG$@SM;69dwmJJJOTNeL(!h z&yrh{RO`&kz8VyfqMlhB`80IM=Q)=?k3i9RPHtC=Zca{HQ>9sD=pqVK;@upl<$w)E zG@Q0d8EA{5R;;{ag`HEPR#~Fb5U_fBXEurN2F^v{g3M&mLx|yeokw|8_I-1Tuz}}# z7yN4tiRJx*YooFrTteakQ)%3V!o{VYP}rMr(uN%%TY*e7)-A z^!TH`ESl#YlAPq#sNM>F* zASizr!$^nPjS}A8L&(3;OPUoymcK>{eTTZ8HgF0crBbFVnhrAi<1y{>KG&2|j$SQj zF5^*9sjMM=A9iz^WS*dpP-}luRA=d&{d3!#*ub1vps|7vJwLnm!@Fn-U*i#B@NJE3 zJup>Q(B;EAXAiE1n6nUdq>-Qfqr705Mx1(9;Lp#a$jh$$tV;T5=!a1(i2FWwmF$RaAm&vWMjIZ4}hhF&7k zT}H)&m=xv6`lulO3$*p#tw2cKi}cQbkZX`$;GR2oRGnJ%;s)I^ zS9TYsJ4<8@b4G<@PVZwxVV>cp`OJ=!R#eeRphRE04s@!)lK3@m zInN2Vp|2`@x&|Tv%KEueE#expFE7??oe+1zXDJSsJ{EI(y&4aFa6h_hHsW{P<04q@ zvKA<9Wtt;7!5h=k4$E;AXfv9PDLN2?9#_aK_-*b^a-POD2xVe45iSC^Gt#|4JiK1H zugrW+xoi!EdoTQdattM;>(j|sim6o*OMl@VoRD);6)zKO8xOwYL{&mFB~b@ee3OU$ zCED+pwrfm=1{m8%G7FQF@o_0=kNJ6d>paewva{{JZVj}MD1Zp?*I%P@tP9qz)innK zZ#ts4El754bl#I>OYGO5Z91`z&ATW>GBFEm@R!he@FfoP?8W(-E)?d3*rJIFzh^IG ztX}uOWbp}TeL3SIbP`3>e=N2yVkD`MG1==a2uK?hrMF_G+i83X&=tuul%~SPJlqk+ zIDltDeSg$%-cd}vDcK33;Cp$K9eX+O>* zzpXfn({_V&_^R8}uZIszEZ3=*$}epGFj#@n*bVxnjI3uf#reR+FXDvmUS}oDf>Yd|~q( zg@D+n!4e0=VCh*_`}p>y&o>H;oSnq|VB?kt>T<04zu)X~a5zbD$fg>*b5gYs2V1Xz z>q28udKw4@NhnV)uWmYo*DwV1N_0QFJ4I-14y;>EG1ls)qZU7UDtd5PQAneAIXHJ~LAU=#=7cZvBoe07VZ!+RJ@N)HWMv zd(FE*cOBpNc5;9m-N>0$%RognVS7tt{4)rrRv4>`$E`EW_mj}`HN&tPA*|=Sb)oR| zGqIJCJW8<)hi`Ua)3wu>U)3%Hn|i~vseTN)AS@_i1$_f+eSd~*qW5*ta(wQWsujE( zUVAD;#$g*PJBVaH&|2oK3y$C00jM9oV8VtAquhdt!zM6ZKer1N9}{rS{Wg6rTH#A^ z@ds-e%fv#h0y|rAQc@h>z%=8|_`-OG(k!RB~f(7o-MPzI$S`S}hh zIR>kaNX;}hUGi{pneBp>-0 z$2sUsPVq>#!dk~D=MfsZ92q8C8cw@Qs~mP0h`y++Q)5M%{?cGEC-37iDjESo~&4V;fh`kPpf?MgRid(OZUZppGvBm@1f6lDUmvI-UO#S?6=UMmq?jczX zJ{tjshz9n7Jip=GzzaOQcQ|QcB_hqlY^ml}{+29!Vsu3GPji-cpvP;sfy)X;l}$D+ zCGqk5b??V1IpfV&Nk+u$-3G*VVW#pqG(u!n?2>T#7K>ceR+gPN9t~lM#}bO3S*6Dt zU~4)_`=-vhg^8R>in2NNws(!-1~|IXQxTPCWgY{$Q{LE;xf+N!^8i5OFX^laYeQfj zovW*>Qi$pfj;%Dvk|Uk$TxZB+8*RsT3|*RR;(jxQRRsz3)g~zO>4?gQMwtdzGx)=( z0eSR$m39TojAFDe^lKkU5)6gXSSq#HM@!-IQVy5Cx`lZ0%e@?*4$Q_4Bb8$P}4IkCyvI@LyYQV>DExvDm|^a zO#87(%6WQ->P>Q+y>j8PcJqh(pWdR)Ypl6b)hj>s1hQK`iuK8Kb9V^3W7+RB`l4r` z$zL?=@%dbzgq%ik>(%V_eYk2Rn?Jl62R)0^p%MYYfV&jHgUz~*%%*^D+@%;VtlJ?AsXuGf{qyGnqAr1G5%WCN~2}-gubpott={CQcMhEE(PlQiKLi4{@ zI^BOQfX-4czYF$jQ3(wuj9qFd-0)i6y<)1)Er!9;KEjQYS(^X5OT$N+j<9|1;KjyB z)3O5`9^1$eT4zDm#h@YoW0xQv2Ym`%UOI^3q#b?As6#!91G9u{IqO`0rE3brorUAF z8xaCxG5{On{7=;uBkAK$kN0yG28{?z+#T(uK!zXl7)++5GXp3hY;>?fV6NmV(bzI$ zMBIHsfXAC%82V{z;d(Ez!Gz;bP+f-}7pNz0#X?rUs?NzJtsSP;hvj^K>TeIXl$p=; zUk}ex&g`I;Aqx|Z1m?(P2|>kg3vn-LaTu+pZ7Kq`fY0TkUoVDA9##wtJ>3@VBAW;y zb#Kj`#4&9!?RN7E+`u6_m_fQ?u(H?IN_~p%}0g#!)H7X8`iyKV5;3w zLcZolH$tk1g>HqIp+M2_qbR^qhbzeM!7$N9I`^)T{_-R9?e$p?p%OUt zzit-fYrEMP+Y*ClD8aJ}(3>^Hx+mSf=Dpb{0*ZPf$^vb+qM*b*oBP?1XSQoH6?A?^ z2>jDVQSTFpIiY3G?jL(eD&j#U=(>DXj3tV4DSzz$yIi26SEuGdqu~ILjJKEPN|ua< zy=e9@LTiU$@h6((t-%~X_wA<6TK}$|B2F<{`5ZVZqQ4)I7RfRR;>YIv<+cX~B!QU4 zBa9w9pjzvzR5&P_QvmkG?Cw*ca2gT8t* zv$J(z#uypyCb#&?N}`o^u0{n!9lkh}*r1iQ>Y;lMyzDrTzZa!eDO=Kyo|<+-8K|=% z#6}?PziOhIGhluf>e5PgRV=bv>+ks3tv|K2HS~k!`Br+k8?Ft-EDOV4qfrvnz$UNz zl0aHn+DVoUJL)x!6JbQkLuaNM3JLr|LeG&5%U_&;0SD!5VZCW%b_4&C#|THn7)prM z)3@F*;mi1FJzjeFdcd1Qt`2bj;mV_&$0I}ucK`E(uZ&@z1eAvfsJDSgEdjy_rDV_$ z^0}RXfq@_)Vd0gqlqbzm*l4v+E9t9u2M1_DGMC#7C|zYlQD?>$xI1QRH}nRM9~8EL z0kD@!K3?&*z336i0j>BRZ}hi<+IYRYlOhf(jAuy=Ng}qzogx7GF7-5!pD%L|#24Xo z{pV@eK2z96((#M8LxuxU#z=F-PbiDE?;BFn&|u-P_8C4ZSS^9Mk_#caS|&*wjx>|N zO^+RCem;RHnXBrH8{;_k0I;lj@51q1=677~7t15lY9 zufa#D5}w>0oMX*QP|4>qJ!atjmkHe$@;8KLreu`5>^_3B(ypoI(nR#)u6qiIoldpq zF-pAl0B(90!Kqd1KkZI$tj?;E#|3V?Rt{9C6nSkTFh_anUK0g~?-bQ+N2*xliY-ny zXM65+@YR`vpIi^eUydCOo_MY+-FfCsjdwM5Mb-w3=8c>e44~Ht(&I|XZ{(sxC)9!n z!e41*y-SdJncIx!co!Nziut`eU!jkHbt5n?yYr%LryTwUh+A3r{ZmW0z)1Qb+7~Y- zyol#$Qbggf=u!^arT)5z`9d0p=fqpEv@by1ezJ@RI&;^-n?y-$lKCq0A$#0|m>;8k ztSmUs_>R#P(darEaJ4ZXz`&4v%}(?Xm#w63hxlE5Fe@1@95w{E^ARKxpO?s_@iNiE z;v4Y3G@j+i5iRDLbKgevKU^Endd}Qttq<*rU{lTZp^a2A$LeFwTjfUOA5U^ocHpGH z@A=*KkRl?)9z$S$ZzL_$wC}@b0hYW%^k*}0RJ9^7SqTV^VuCBzy$j};HvFA4icx}* zJxX#^Bq(`*)OwIYNfd~*aX!8E>&}P@7&gm@BCPlcE(syLs;SmB363!-ak6duVaZmX zX)JTiw>k^|U6TBEEoW$Ji-JQi!SPBaahT!Z97O!Ix%MdeRMPd{^J+{D66%fS+~p)d zidr&7BGq;6Qp*;V9=%LShItB=jwFWnRA&R%G23Z9F zh`GN-h01uSbeDnJn%1?}HR}YC8xC=*f@uTc1w&HxR9EJp`vAt{=KDaNf#WV9RRY$3 zk!e4AO?5U3JDm_l4%Pf<;7mzv0}P+AC}*1guOE0IpWnX9F#`j`8hP0vX$NVm?sL$X za#nD*LJZ;0Xpqd4@&Iu^70&G|rh}Pt5|@tbjC5?n#6TI#{0YsY#ebc*S(mE@ zUajtZBPF!SS!*;pvop_hS3jm4;tVxky`e+?5Jabg3Vsnt74+Fp-d`Gc+WxR_(8Q4~ zb))BSHN)XiXuMQoc>~Mygx@4X_f1>FZRy{zb`~k=2sVV0ByU>N%+ZaQGJt~z23Vpu z(fN{?6@%!*;gR?#ujwQ2#j5aFeWj>L#=b@sfN0ktGPbgs!TuDwbfhAnL>-Nnm*0jWA$q+iJb z#|UW23%0hpHhhYXVt?lFj^twYXrmcFAyP(KZWrg;u4ufZ;KqYcpD<*m!oPw;h(^&! zwFsKL468O!nztSZ8}sIMwh#I~j0z?;z-A^m{WF10p_=98(t9(8ZTa>mbYu8@`U|9b z6ASb@b-8TI3#%mQszsHJlzHAtaX*J~i*9MTOF@$hyO2 zA7qhMV}bq-b3=*=OYKPcuS*f%s~^K7MbeehhVFFeTsQRcm}kkgN@Pbkq_gS0IW_#` z5&uj0zvmavjl=1KSt7hG*t7SW?gb6;$CE7R{AlXnxuF;4HlJWCKue;C;L(9p9cm??2HygFewb`pKMI6*gm)}b#46vO4vjg<-@~U;AInyy+Je~$1Ti8^RC0U=U zTVM)oHjrg?uttzfHYRo4cc4R33`rT)qc4fH@cjMA$Oo6?raF2d0Xj;9B?jx}ze9%y zspNaMVV*q4BNIE@F5Px2iv`CFQGs=0l_vTMLQ8s7$vMm$=|GiyQ(Elfgx+6PXl0zN zA@RbL-$Ep_8I(O+Imj9}rMlBr{T>^$wTWUb=usL3glw%(f$Ph#z`W(~J`eMl0VuT& zi{=l-xx>I#_1Ge!!F>9>WQ}KvUbDqcBj`B-a)d;*zn=}OoCo|a@UkQ*|Bj5@|Cl5$ zuaEW()u!HxurUnq98T^`E}NPhCA*hDs_Nlk^pPk z{mu#7uMWn!$e+;gHb1G~>#xOMNxn*_S@n88pP^KImO#txD~iRA#ZF&cR7o>lGYd4f zRK+uchoL%_iXVXiU#U{qzW{9kvlYg~GLQMFI8v)OTz!;fE&T|h!S+w2o@|Q-QgLy4 z`RK8L(XR;Y8-6pYGODO%lj$srz_p{fNo|KHWr}ocXMysXZZ8|}cK%Y8L|~a-z7KTk zoc~j)cB;`pAPaX;+1p(x>FRAlTISY~ zRlxJ{_If@y*Ym)OII8Pnb=D8g$vKF(q49w|XL-X)0ac!#W2E^DWR$!a#t(t_YGT$0 zi3PR8vzC6ri3L2UGFNUvHA*t-e>+6$a?a__e7oyprGcW_KeU>k*-WTP{6?M=FD1cU z@HlW36U*-Tm;oE-IBY50ju|vMk_BdB4+|BaUlJXZH@1X7RQ=@-SjGZ`I$Cc~lH}m} zK5T-BrBRKK=LWWsrz#iU$VKfjU(Dy^tE5d=YX>2li5VpuJ|+Ie?U0mzA;QN6Ee9Dz zqjbWmrP)1|5=p4Zr^o{6E6CJwS@rY54GMIv=(w3Ey@J;-0 zRd*BC)IAOFfdXjSM7Lk#1WR|?$Mp@+4ma5@uZ6I2XxJ^GbguDN8u^3D$WYqdCb?|s zQBQ$(0V}#$&VEkp*OPYnnN=T1wmAhmjURq0DR{DT7?DXN+ROiXrj zAa|1|wc}=Q)ENHLUxTK0!W1~>-1$bLcx@^$=Ur?d2QfNt;v9PWbr3%9O?$x8d5#OO z(`rXfV0Zh#)cKEw(4IV$3;f}!nl&va#yZ&pL>J&c`z&Ag4-Qw1=b{?3KyUV`Zd_^g zvIuXN#LD}ukdqc>gR>mN4kEdduktFq^zMX6F=`BjlOs|~b7GxqFh$ACAxhwB$pXzA z^nj@gnwT8J)~wt0LaF~`GSq$HPRYbL*;$tqfWcoXoc|E`(4fV2F&feLfZ}*JDN%N7 z`R?wZmkBtM|95$33^z3%GoQ3u^}&EOvZiP`Ujd3vY&SF>2b|?9m)+5N5DInvt6y~2 zQPM(+V*s5sNAo;v)6w4<9{USBtk7)$eVWF*F#KL_1YO!_vX@ystg0i;F8$#{tPQ~y zZE@QUDM!svtVX~1JGthv+_>DB*P>X(6`5r=$<1gczNWoMt6jQHhAO+)=Ff_ANXLQlgn^ zX>L&3S28}!H@@rP=4Qx22f5cY&m$V;kiC(x9_C{m_b#^6n_Qs1 zu_mbp=CZv2tbYvohZP+fuH!0N;@vtg+oL=rz=_R}`CD`DwDe61`HU9X!52EwTR@yA z0pgetupP{ePMfB@xh1y8{mL5OggojU1q4w)^!=yKRu+hp`mX0GPHUiUXBY64@YDIU0LPi9U_lA1QyEv1{Yi~AjN54rI zWg@%b6~k8@Kuc8+S@U(#;a%WMj=^|T+QXmr75}Nudr*wyOZ~y}T^k{sv5^9 z8>eHLEiR@j=OPcBBOmL{L)j3X6H5I9p=rrQFYtdh--t)jcD?Geejo7M@+5$NqRU|K z@q)R#B{79SYI$nvysg#edPC|WQ_!3DcHLi+KGYYb?xuJ0Jwco38;v7-&6nrDrwuMQ z6NNr5=wE4V~JsN=qzALpdDSI0i@wptR$8ch{G0vW4|ID!uEgif@RC1rkjp?LG* zeN1J{yDdAwIbWHU>E+^b9=<+44paRaA}`wH?y)~>@NSYRwG$f1zMkU)!qG}qRX#bl zAOWk82u*O%QNCKzRY+s1CGCSzSImVC1drwq_(;F9(^~7*>f{Iz0e!mlPUo_#NXm& z{Y)(_cRjW~%kH|`gyvBCy2(nDT)2Bt!n8kdl-G5psElwRa3=_&3M3PD(D~jZXoMkp z?0%Vpi5AtlD{lWa{z=1|bKVHnWRWJdI-K9;s=rO={jRVxdJ#oYgzOvBEix`C>C^#4 zq_Qs2rhnNivswW;QzZLTehLO+3HslzbLtNx$%n8;WohVbwG2z}OURD)G zs~guEALdR~uCg=}B#C^5nJTc`cAE~%?;mGMw0EE2#K`e0<58B6WlkAIrO&4Crql3H znu@McTfiWPyP`BqgY)Ay`F}e}`2!r&<^$DvIisGE{c$?l{4nUgIv9mTDf}?{F>TS1 zrx%S4j23Hse~&We=1j5BPgGw2a6g(@rHe9uWDlyg*Ec?AIN^R}hi|e9qe7vy6y^r= zk&us~9*aruFh4k``+s@$u&)ttHyh)3WGZ8kWxm7p@xs82bmY7n#ab-?;9R!p!HvLi zliErO@{V2-uPc34cIz+d6)dXGwVWI^$F6^}XRRY^+?M`UxZFw%-=yz_^)PQ;u7d{N zxcDZSlr;)FU=y}>wxm0BTve*A@H^jA5~dVOm2l8U?f<@$c@&MJ3a}H^Lc+G~;+%EVPh^qRMR%h#RQBs+SH%-D`YnEfVyMA8B{e{kC1qkQ8YojK)1u$pXCi3KN?!bkoID;kgb8t<2x|1KX(P~ z6%j~!x!&*Iy@j|#WMb~J<K_YlWOj(Qx+6;1dE^u(uIWYa(?a^_CYQsPF zif7PDQQpo5#tnlF>vh-xEN0t^r_~jy0@Dam0U;kV=@W6M6V!)<0|Z1-!ZNWMp6@a~ zHgma*>zefPbeJ$*ALWofaERs()75J5s~>4 zi}HZ6o1CHD%i?_WW0O@xklpy$^B8y5XK5;*{zC3)OeiADiNkSotzm4Gg<2Q6FSmid z3DcWHeE%+NRJaWLJSasCDN*Gm=hAg5W8bs2sr?I{jk%EoDR59Mt7kzV* zcuml=-L0_j?xxk4A!KvEC^{|n+ey%=NL=5ZzIdG~$nwR_>w}jEN^66R3QG!?)wVPo zl8=;dm!_#TJdYkO-44q@8m*Y@U{j1}N6J)lO3!Y(RgySk452~Y`?)Q|ql3yhX&`%( z|G-Cn8K(IkBKYqZVsKQ;bgS9Vk}7;LQwB=ndo$Xb-oFS_uNiB)@$}?RSIOv|5_Yby zQ|(t3t`H(0{dk_`PUuRBdV51k*}vQm&tY$IrPnB%3^CuVjfO=pu!b3Z9>?CEL>l*3 zV=PICiwlUXxN3dyfBHT&iE@9LwUmx@kZSim!@ev`imeHCeR_KO(cGCBx()5k&wwrzObc66S|eI=_i{0(*5K zu@R89$Fj1r@9szQaZkgR(tf969%%PqN4P-oRLmmma=cN;Ti*D*i$ER?Td^mb4>^T8UG)f01sD7pk*MJ z4nPJ!Q6IRj!%Z1q{UocQp;6w}CM^;0^bpyyBXZ1ptAPXmp2KrHsu!r052KCHPsaf@o4c-{~}aYdi?E*})- z0p+9g`>0=V9hG!l002t1|Gt6BA6Vf4fGprYCX*-ds1>(mMO*juacwHiS>0Jc*m|-^ zO@FfSXJWppJQtr}l3Y(*r}i83o4uKr2bZmQFSPj%B0f%NH-acMHQ$rQ%3nC$z^Z(ySC5WdFFU^f(TpA5p4eteR6UNYoq}Q{3c}Khx z|L;on8TZ&5^x;|AT*~UCJy`fX^+9d5F1^pI)w&{i#Z3v4zXfIS6AjR&|KH0OJehbJ z6gyj1#Fx~|4=g8#?Attxeyypm#n&&1nq`FC5{+!^82`boYiR9%H}=2j>LBxCBD#71 zx0u5E@S8}LP=@>VNPT@7jDaGNJ*S#`mD-FhsDEi_xGuwSXt}iX?*Ha?cnlr%1pn?c zhC(T1A6B&coB6YaEN9IQ3T35?Bp1o&^og`*Eibv|?~)DsF=}YV>`Ik^3kQOtN95|5 zV>6PmcT)-SWV8k`iQxcDs^AploniC)|VnKmTV79r2zJ zK$q^e#Ohge&K)A9{h@p$Lxk#SOXF$l=6((NRGJlG@8jwOeYpg`ID(F z|B5nN5q4}m%SrnG-i)7TkRW8n>O~Q#vKmQ@62>h3GxJTk(LlYtaVNdq|MAcmSaW!SxfHp2b(V4{qvisNjYW2!VTY$z zo+=V&2u!WVuSWaN?se>mId9s}vrbzM1aoeOk+k&m1f4QDV;rrmtpf}m%V(Q)H1l8F zPoqcSGp?9UH$r+OOcYs{>51l|RG{+1}2 zm11YhvLqB)b~k9AWn#LSV#uI$K1*-z45zQo5nHg`@SVH39HvRStrwD@OKm64;b!wi zB;-im7iHMr-Bg8`maCTpSCLl|J{|l$x(as2(_4@J`YcC zBjgi%OR*H67wwgRRUjflqZ_ZyXxIF|vCI#BT|A%Gu6|7yr+^PL)#vNxo%Nw{J^UkE zhlSxWyssfb{>!w}1-Fz7+qh4hQc3KzjaO5m>MP|ex*jKG-E`ulZ8@K=A=eCF#Gb0I zfkXS_)u&VMxn}7WhqX5CGe^O}RW;my=gY~SqAEi(WGU#S>(q(Mzzc5+mTT=7{v7tE(wDD9{<>)&2@IJ&yw=FdibWHLHxMq=}Uy0mqP#18mIu}juMxO`p+bd}d{wrShH28;~pjgwFW#w9FBrvdPa(bEn zTcS>3=ki4bL$Z`8War3vOs#g;wKrYIZmAzQ%iND5n>tT!SqltWb7(X0XP5b9wllQr zY}b|WB^3Lh=)q0y_LH~CVrviIF6EO75R_jbu3R4Y4+AKTA*>DFp&=E`MW zQbx2IiU#@rEjnIq4?xnP&O}ZnXM@G2ImH{mo3wb_%SE~?)aN8bS;c&+uOMzs=|+zi zZb(DkRh|opt+#UXFtHSjej|UWQLkf;m!MJemv3mAr**6UH5BuBPpH+5#@-v27+%OA ze3#e(S{e(Du~VQJaqr z+YOEv)7WFo`88CE29gm3!$zk*X)D)AIO>s}czN)QPk4!P^xN=L-tkgB64nXDJ{9T? zEaLC;)%yXhw`HYzOGH>WFnKZmNAk-+a2&oQ&w}cFOq^AWsd$tkIOTOLM-E)oe4NSw zAG9lnrNk?alMyhEsWT|{TYL;76C5{bcJXgW>e$U_mGJmn9^cn!;OlafT4vw*`N-+e zkNtn#66J@gFn#O|G-3Dh?Gg61uM51f_!gg3i`#md)LZ7f(tCRz^4AhpYOJUJQ5kuz zx2vkE8mK-}j!Q6l;GwCFO{`{0QQsKX;d(-)L>s1VvWs|$mJ>7B&k;g?>5-D}_JC)M zs68eo4~VFNdaCw#bnPW_YP&{0rZoq-rAPW2<$R7dt0F%=pQJRF7MHEdmx|tJYk&6! zUER`3jZs2$GCC)DRh(Hb)j!<+`;=`9chS_1yTDeKtlfdxl(NX$L)Kuln~JWs!L_d^ zL-08l3(u+VV3ysg{ZVse9%yCp=cO0F`SIfRc6FZlOZw}TAu87iyK=3|PpDG;e+iVe zrF=KPsng$mn$IqvF{Wv)jGjxQSrTiGD4Ca5iw<@s9!Hi0$)exQSp-=Z*)=`Gz~N=S)K$$v{P1o{01cc& zHB$^DKut7eX`+EyZFieLtCxlRm*kn?`oiKpVkcoPWs0YD`qFKQcfqNHhjO^~XkqKH z*FDb`t|em5lPu%cXnh>3I$uwfwuRa`bNZ%?+L0RTK#M@ewK)joTs!d0{gzFB}x7GyGDXW!oqWw`^Jq~@mf@* z52}p0e@MhU)}rLYo6Bd^-rDwMCdt)Y!eG7X%mvLiIBnY10b!T2s|2~7(vbS4XG)9? zB>gc&rBz?`yoL*F?d$YqDw*3mrs8Y6{fA%IcN6xhf;?=MrDauiw(%~E-ZJJCo(m+s zOtTICSv=N1?Xlk}O(Q{=h)wV-vu1ahmU4|PV3Q9xSm_+^>BzBon0A4t26y+WJQv?i zC}rSlbhPF3ifpdcYFk)*nbU{=K9uiNHP7wuNL_37z+BX^D%fSlV{lGcBtd3zJ8MYt z#}J|gwIKdYsZ$!s;=ih~HRH&>Qf8N^)kVx>HAkDs=?CVt)JE_&?cLSd%(aaL1>}tF zL470|gZvAN?Zoa4;8eu)qK+jKi7JMrhOC%Qf6Y)!Yz(`sB_2Nk1Yl87*^5J;6lq9s zK3g$~0{*w8tUU*Wp5g;rRfXoKsuB#S8^QP{If`KZ&$|3|N5GF*-fYkEJ8wvja5~*%;T*+iT$PlKDu@L!Gton z0fO_?7XEdvdK|mMVDONAOck7Uk>%>oy|_@DkWim6nv(Ulen=vP|JodNt|?k?9sd82 z^_6i=zhBq`q@?_bGz=60l@4hJh=NF|NOyyD*Tx6|X$9#vK%{eYN(`i>VbtgzFk)kS z=KuLTub#KxSKs^G_kHeju5+F1z;wJAjpvEcq2{jl%H;)H?3EN>AjBN+&MMDa3+TBn zHT!N6z=Tamk;#nd_lV>da#4oUyqDhfTn-NSr1={>VdPc}y;?at6nzxY;%GH3lf31W zgam3FRyz(&7>j@Y4A6E|YC>K3O4E>yXwE5u z3t@Aup@91A=u!X?Yap$O6D1qy2HR+ZVJ^g2GOn|HMY62dn$}8*WWg+Twl$wMy-*sw z^EUgTezSYwR%dEg4?Hd9c5IguhD}{k``73GZk*<-`$&JXpIdQ5{h28;!$|~Y#S8s_ zPulK=@a4K#@1KfTtZd1;gN^>TFN|-LBn%IZeMG$cYEHc1A0jFyiQ{OwnJ!l;aXo|w z_>hwglFB2lfv%<#-72rRr<46-ZU2ezJCu2m7DN@HW&C z!lv@n$27fC&9x6`3?E=j5VnhE=emx#Qg=E|xsDB$1cbbeK{IDjQY*#Hd}qv4PXr#L zkDut)^^4LRDcc2QZfiHs&Hm}t50pPFQb6D|zps=0$_DwQIJ8S1po$5rKjYTQ%Ob=bF}ix*4+)7 z3(6dI;GNt(Zgs38NA-W=J^kO&fAWouZ7$rw`RKIa8`HNxe!hWMV7?I8RZI1r?WDF8 zTcC>^eNw)4wqH%;S&6Vl-KN?i@C2xW`Az%;RJ8h-P2kv0J&9T_`7BQ#@ov%7wk@$$ z>3l*%7}C2tRSN9|PE(1IUPsM8*~677+KOVvrr~h7j?pomsV5NlNWxO#T_`z!bw~_4 z2wvY#X`^D&8z=cjBT+zmf}3gSVMO`1;ns#zU7t#`Un_DYBTW+(kjIryz3)Wo16QES z?bFyizf2MPpqD4ofGU}%N-{6-3o^&4Mgf8BN^C?YI=p54fZdcFzW8r8#wpEgi-$_D zGewIy%!~Zg53l@cng$?Ee--I{Z0OTP)8#!`9Eg`?J?tG_r2KMSHowN5{+8EDv=cvB zLY`E796D`|EYeFSY?~2t;XhB64-QGS;Vonj;OKawcG_+?6#iax_Vv0|DX$g_@y6-| z{wcpf1(t+rEaL5LskMLz4Y|E^PCcZWP1cYI>T! z2Kpmc+fvl{D%(jn@B1r#*B4|5M8TnAt=eZPs5HWr@M+eK<*N^{;<(jquH7Vi=b;+e zQiZlIX>R`*AkcbSfAjRm#^?4FH%ZAFQh(hdn4+!|hlqGRl($9u+OPSaUuft>WnN0_ zNTEG}0d$@$<})-)ZrUZLNiUoWBcjP_17c^oAD2a@Howakj$3Db-8B31$jQaHRgy?K z09Dg5sAjs=j-M_!!FO)EGX5?$yEb@zbnjB-zF&>7NdO7rYB_LwtWdFDm;yD%dEfwf za1|w3I<*OQc^8BrQZPSFtvzNa87wN|`}hs0j!{|1`6QK^O|Y3g zdm@5p|JJOS&Qk*gwBLZj5$Bn%QTOb$q&ouZXW~=IH^8RfqdT(BmnQd`P~)@7=D&yP?Rr*G^;PjP zZ7Owo@|u#)+im`by$Il6^>$N@_ZzP&WSw&P4U%^+?}6WPlukLPq^O?<$dqVJrMz!4 zoeGGmxw0v^o}3TQLl2M{AJ7ZNmv4R%ksbfVwx5!(o8?>+*?*MWpD`Sk4!;<96yb+y zekbHL&#NH8Wfb9zP1TfC{^jI&8v9sAYfC);v4nOXi<7!G!}NDFdAK5l55Vfk^>-<| zRjS(3Kqo+=K=Ns0%C%oB>g7@OAX;qPd&)P(LQ?ebor6no(eVQxSfH7h_?CG%8=Hq1LCYIyI9lzJ9 z2pNmIc6M(Z8C8MGn9yu6`3ovUk3!SLZ3d;f<7MC7(XQUP~B_3|329l+NeBT3UQl&N4D{kgZx@bHa#nMt|-J z>b-o`W?ZYr{@zA6HAZE5a4BD+)>J8);^B*F=V9!$ zeS*TxYp8@9P$i|xUG1AL>Xh1;vTa*>AUIF-Q*PB+JN1sEoceiOarqdq^rpKAM4FMJ z6U$Ge=@FKb9F@5^@O0Jp&Nd+IqHYEwFZ)tnzsc$Ry5Yw-)qPzS%lR={*&T46+W{E3 z-Lx4uWb`DD3V^X_B){uYzMYT{%~3-)&($v0OoOA5>(%- z7&Qb7*uQ;=F|7-rj|3xm?)Q_KI4Ut4OMdM#7X}*jh9DiXe=OH>b%b{=nYvWV@EmjN zb~34Mb|DKx4e+q*G z&6a^_d$q%P;pW2$Qa%a`e7Kre^Ohqas6Te@d|*o}ejURo`%v$K{Y?sJwWg8aS*Ve|NS z6XpHBOV%6(K(JlknyO<;b{nUZ3PEok3&zsZe9`nCS=aWa%O!4h?E5`gou~ca8*LRQ zH|q1Ju&EFiB9BRV8i%H9w6Uk7wxG^ zrf8M9_rp?#c&gjYvh9vMjm^($GwGg?Xj+HGIWay%J{0`aZEPC(IWE!DG;vU~bP_fc z>p}$Ko|1Bzt?CxK!T*5dl zArq{Trgc>oBf+E zMfr<&62g6Ps(cVlU7+8?R6$LX0-{wif0Xd4+=aN}sd&AKThqo&R8$n=#Y)4yO-Rd% z4!X#!^t<%sX)bg@lf8ZgAC0cgcb`|~a*!-j4q2Lzjns5bDXzB<+tIPoBQ!bPC{-L8 zF)_?^tbENotpF8oE!G+^8Z2Z&pzaol?vxo)+a#{ki!4`sqZDJ#eiW81%OaAQ`SKv6 zTzN5Lj)lPQe#aF{x|ojR6=dGg{x9Hy_-D=eC5lZgX5AjZdPN{t*%cAmTdl4t-+Msf z;sXx}=4yB22?@*Nib+^6j80aY_dWc1M31TbBw@xMG> z8uyn4boSoOXKl_r9J8l6k01H)>WT8FPnF{%hbLn#P%KVr-cUs+@@Lxz@ z-8VoB^VUzlI4pU%3AU>=UQzVln=a26yM9F+01LD5L%vyYAB->G+E>7j8Xx1U%+N6U z$vau~et~7alx6p(+rgm6AYT>FDIKu;(Z=ZPynh!D+bahe8YJ1XFH)llnGq1@56ut% z7;GxAX?qWLeZC&xj&@e#oR#xi@xCws-kh~&d8C`PG*K>8)4W)g(>0ZXf^{(kWS8lcYU@B|%-21j>@Xv5GQ#NfZB)onW7 zSaZC!HhY$+H4L0NYO!{$xo%o`<nA9Be9$Oz#Dp_z5qi`$FIxMFuj`?r)YBvhwbiFH^Hz##ZEc%n zw%zS6w(TMF5r1IAlSQ}DmdH?#2)WdBY+YA8Lzf)20eyd%1v#Z*n3-W1r+{%YbBYBU zz#_Ub8{HW#W6K@$+MZ{yI1(Y&U+zWLHSZz%UaoM z;C4;aH@;r4old7a>2X?w6cf1MyT+tajQee;(f&FE1+jh;mqH*wFlq_@G8TXwU(}s- z4{kB(3Vyeoe^AyQ!4iCkF~Hp{<8NpPnB_HIAfVPh#|vE<%1IvNVw1U^G@pql-#5Wu zm>d@iO*53M8&6_`zQFoX81vv4t5_z}`Hu5zSBQ>`gLKEplNIR8zv*533U|n4vDK}9 zc*}m=e3#CWT+NLJU0VL-8Oanx^6(FbKn4@&jx+G8X=BSo6C*=O0K~H{l7oT9F+qAT zN09^WKvv*KPnDpzLb$qa>9(1>n;_}V{q(;9UE2?5>&k7M?$}qAyOw9V@V)&5U8o{gPqv(mz>xhIMk+OLbDAbiL)FeSDBmTs??SwEK>Rn=DcUF6M ztiOEa1!~4j++(=cfkEotEA%4B;d(OLriex0135uM#z#OZ5RXF@jw0mRZ&du_6|M(X zZU6Sg%8)tY94l@+SM(a5GRpYG^PFBi()CKE>+72lX5HTsmtWax;Qi&1kzTxa0HCEN zZlEQjr69GhN~UG6B9;$ZdJ8gm!b76a^xeHG<1BrDXBH9E27}r9fR>#(tE=2i{szZ2 zeeZwf3kO-hd9tzFiZ>QBDtxWEzrZLXx0xKS72ira08WBj4T>o-1sx2rfNy>4_ew>b zKdXdre9NfZxO}AQ-nAx7`c+B}Bb!F5i5Vj!ngOLLciF2^3@_NVMS%wR(L4#q%Cy}T z_tnP!6ibg$_dQmgjdku+*HxEYGs^N8aIP4frq<>! z$Q9fFkCkQrg$?5A=F49*F14?f9XKCZ)dDyX%25rYX|p}O2^Yx+5jFd~~HoJT)wfC1}>ObCR$48Y(I!Unoclmh8*)BU#>s6b6!=f&O2ADch{;#W7%R?jn zg~X`g#I`&7wZa7%iDGP5pQ>XDTh)hb6z>{j|NOg0k8VF>zA2DzezC_&MT&6T`Y(_U zB46edIAM#_NGWxxIL1T#sV3N@!xc^ItHFQ+dMJ%e(ODDGZ$)CT=SuXNuhPKDv|rd z640chJp1Lxc(R~eUl%0p*`jz^1gUu!XPG$GevA&B#Bvd`-LHSM{bDazxMs!l34<47 z5`E88kiMP(?Bi?8Uc>OE}hF8W^ee0WHJp3*ee5^OY$_7{5)l7_{E}Q_$$k8utCy(VK%<% zF=b$x2>+zd{fg?70tFYbK>NYO@EliyPSz)mj}0+(W{xAYbo4Vapl-bQjy6fJ?ShMl-$ zN0|EDq{JB&N3ceQkvCDHk@N`RuVV*{!>?gGq^bM_GNcq48Cl2_@l!Ep8JhPQS6oT# zc@_ zhN8oJKc^~OXZw8DC<1ET&k1%~lWS3PwwVT!nub>=Z)Wv-e!2i_@^gBPchBGYDO5Fo z$7a|WIkrYfC@MKVC1>xTNV*i*1BQ!~Ft*Om_jUo~Nq4VyJ1(*9&LL;bxS9D~8;xl7 z&`|jFEjY=7EwQYTpv#_dCCctneKo9s5d5_`^*NE{+SZP;+ZWud4u0loX}*_MV9!(Z ziKykR{-ZGNVh#nX2ic#q?uv|0Kc_JwQRnRTJq>kEoBQ?F_f1$O-IdFgzLDxrH(`3$ z4bWceM6X)^-Zv;}>cl-OV?C!=r(Yo>BKtZ2heF6RZLNV12`-)gI1M$VJL%|)i;e`$ z>Hgc$x|L<>LuEe5t7Dj!X{v=Yn+*8!xLDv)Cxgb|i4(a4j>w{>q6&R5%GtR4)Zkpf zb^TX&72NfrZ<#u6fn=4r`gkac5YI=Rr@NUp;hq}MxnNEg`VMh>m0I%e*}~os#5$6c zN@d{KcVlFjz}>(;MeVGi5Jb>?ji%fLYs$SHp8|!@8RwB;cE5d^$;mBY?J=SUt-_`(%u<18k_F= z$gTBi6&{RE_$!0?N?Meg_6Kz@@KtFTb{@1BOblLON@brKa1HzBcLQvuebg^{Tmb&rV_J0Qy$cN3OhHKoJ~2JH2&cw z4h{<7(tKc_-L)GAUZzPu%ez<`x|X87_arhJJ=Nd0A5Ej#JNrbN(mCXDVwVb4uyF%0 zd#8>oQF|;g4Pn!~axmW83bW8>-TH5ALqbF>IlMz8JJkLO62GNEZVq18#hBZtyJ#uj0yM88U{*s`+w@)u`AvXqm`c@AV5pWRS>89pvAeRo=*Wn&!UJ-Xk9O|s~? z?wgUX$2;){dEJ=qCb9iQjoxEtj}cF}11YM5NFGqr58_-5GfhsuYFxuwQLz)7Q#a?` zFwV-{jJj-n{j{~zB#W>0qM`j--Cq@ws6WX?vQ6xG3CB65a?2RjFxt1b@0lH;B!^VJ z3jzv0dnT(ydNa|^%(R^}7aGhu+-FPrg1IXu`;Vk1zChyVyB1p;+(3Qr^u{K2{(~>C zIsFQe@I|Y&i;Dpe2ng;d&-Uy~(`$2T?JC8D#N*euuf$C7CCwsyvT&_!wO7=Tv ztJ}(iZ^Zd&cK?P~y+WzfzlHZ6hYITP@8<>tmlive-36YVI)_i+7EE4KP$j>NthQD> z^G+qjFV}?*>-FD3QqDi@B=?8=ObaV`?dOF24nbU4@D&v$W`AvT<66d7q@OEd$n#|b zhMNl)MVR7sU>K})EQ0~FWGE$X(JpsCpK~;A0+JR)n7MTvW0Pv5)<2Y@rix10xPI59 zKXURmwn@ZcG>ex3Sk(|+eqhHRT>2|xkH!4Wu95h=U6aY|v-16+b6WHkW||fmHAA;4 zNqey|I=FSfN5l|IX!pTzR}%y{t>zhpaM=qLi+^izNg)LeH#%S)Up)RAX5)`rGSh9* zDmVNg{UaeXpwb~EHfgJRv!Z!aB(m_m_4r~e;J3<9WMNaElwXCT_OmJ(GfARm;uSe{ z-QEb#k9W0)mI91+=A!<0J67P^L~^@HiF$lV`rSSHA%X=kQDHhRrT{j^)*Mn?NDCIv zkA5)rg0YRYSaGf5MD8iGi=)#0w)K+|2qtk#J6?x}{+n)n zj7kdpa^MzQ)fhc7>mA~k5iTdmEO}M8QKZ2yO2^zQ)i376IU*qHPCum-$CmTY%>3P) zZp0hT@@jouR~PFenudEIku(IwyY?{aiFD!lB<45CZAD(P9k<~ze21+;8Yg8Pm!GFb zp@@d+BP@DL?Pyuy?fML5jGpIM`X3v|gxiJ^UP@xCQFZs34n+N2Zg&!ovvMK_h(~!X zo0JUze`$@sqEN`-ejBX5mTKz{i%mV{wLp;_(Au3@r*gD{tdWUuOM|HlY z02iWw=>&BuTxE4J&SH=S(ukg;#(7pH1(Jeq)6+Ek{(+CC;{^HjH#}`xwFp}6^z}1A zWh(qIb`R)Gq8_5|Vp;tH??%~*p?;rS6P@ni4lqLtcyEV;!lY$|t4CpoEO_RFF76M@ zyzW04_BWhufvt<BD+%Y#YR3bdJjo4)*G?VzLyJTbs^LP19T#JHC@0^19L0MmZ2biu6AOjo|j(F zRT$Zsd%j~*i z5p<4GJZM*>`;Yu}LG=BC9*t@0V?h~tF1E{(SLXw`n`lKmx51VqzHex{)p4Pyn-}vs zVuP}12+fzXBc&iJni{{{QW|um7!r&%@juE8z!s9g!;aX0-uWn#?chp-6V)tLKc1&} zNlx~iDM_F#e9=w>y!k^RcV9ITH2 zk?#J-qTc?+D!ZJK>n*9$9iRC-9~v_Hh2&Zq4^5hY0gXfPlYM|T;X$Q%pEYBSz>LrKii!r^^t6Z0cZ0MvP?uu&R^K^RVk#%;}oBj^?Cg00=SAfc!D?v{TAY z3)H%2nCcDy7gIY)#-5tVqoN7UYl!HIuVs2Us~ydn$#EPR@EpvG14D+1Q}vyQ4cq1OHC6m6D_!$5kbJ)rBUquDQ_IM2Q ziKUkn8ol^OTo-63-}fF!RqTMAndsB^w}!rWqHWx1OETRY=Gu!mU$#%jL#M+1p{D}H zcBQot;$Tgidn0I?Z_e8(*FW22E)^UM`Vcqa^DC31dmSH-o7mI8?bu!>2<>g;eLHW1 z`fqIuLVXu5rP|v%nv;r5h&vyWLQYodXhMkM|2%_b z1;MMFe%RR5S6?9HPdJa-ny~eIBQn)jeWlmJ(50yx;YLf>li0T5PN7)7^+1zp3E=`k$M$HUpMvMErp75;^5`Y}f`H z)_Z6pe?Wl*e^k&{+EeYlFQx&p`vw;q_V`EZ*CC@j)-d$n|LNM{8+`D(R`Irw<@oL| zMzIs){qA`yhnpLRT;FNoOfP=^Y^(CelfnY#wLmG*4l>A)bHpbZi1pbs!yRWin6+$Nl60Um zt1+&)F@tlh8*~QtSoF8p5&m_q-5p+cmr4{EWP3bI_Q$i6f#_Zw4USRCl!@j6{0-Xk z(|3P89l-^_@4UgwKO_!~lrkpaaksdIiAofj-EUnz}KYVv@6v1>xRD- zyel`f`ecl?v}o)!FEK(IH2Xx*`7cxb9x4ejON%XP_aU$yitnnQH zc!6F;`h5#A0{g|_5g!-5*19(Ya-Ijm>?7-hE^}CN32if-EL%jxOP|MW_aPQ6Gd)lN z^H;au0&6WFmvof<#}K@6q#AsA^ptUXe2Zcev>m5LM)R8v`yW==$V9^}$mmDNMvGx2+UpOi=7(chw8Blc!04wPPTZ{f^lX5Dj{gddey6Sp(&-#DZ>;t}Pi$t;AqO)S zt-H}eAbz}0P@|~v;%lEt=2Aco>4z_VFD8M1e~yv9C_DXUR=p=DMO=;-&D3jw$^E>v(|j@689`;kSEgFT}D*GUraHlQ=@7#i$> zZI{dc$=-mwjHEV}r!vU-3z?32EQeXPwZH~vllr&lC_*v~I%n*ax|UA|v^A$virve2 zj-Y`&O_yaq=y0oL%k9I~iqY5u{0W>szv*CHY&nx}mcEtY?CRMAi7st1Qb?5}>N_dq z>gg~n*=Rbg<3%tv&7%Q{#vN#J`Lb53EijHZgT&JI)moQm`AQOdR>s$mo*6|{0$i@+ z^0-S4ar2cy7&E>{W-d3DZPNBPTh>{PD!}y&dw!J)JtJ}M;8UmN<-D@LI!P1DeR*1) zNb2>GF-`Gl+NG-9KoqzpLRAPfJ6~;u3GIb2hIUPGm3pzRE0g4%&HMj|iv;gEnm|BWsaT;LvE^ zr|0GTfa8aUR~={F#waKUS+|rCeJrZ00qI2Y`K(GzTTnbzieq5t#z@I=#C7SfZ7TA|0fPc4zc7 zuTo>(g`q357;lBN$!~$KjVuSiccn~y-Eb_c4T&tm`-0|8HK}s3TL}z0fC;)%jO#2p|@7za@uL+vHON6>gj25+FJC zUXZ0)_^J)PW{f&ydk-(NqQZR`=lRfD{((GkDyemAIT4J4;H_ZK_T{ei70OpMyl!K= zo!9`_X|3aa=xq2u3Vb-JAF&R1T;N<7!@CJv^Wu8*z~4iC|C0kHWobW+lOztvcu?4@_9uINR$}U3_;-b}SxSo%fPA>~a z(k-ml;1mv~K~s94Y_nNm zoo+$i+^uX^Kg8_$=Aj!z1@RBaS6)cnio*&hwGtH&Io(0_f-5ZhZ_Bm*&qYX2Dp;zW zA0%mmP?6E^lZ*@u1HfZROm3sj_cit>psoZpAiRIIVe33Gc)jR{D*!+W7KsVv9O^6Y zgUOetVNu@BaF321%1n)0W#s}cc<|P?t2^d0W^|6vCW%#pisI7cBgI)Wai}H{r%YV{ z>bE-XS)vN~^>H0|&SSnrxxa?&Q#%KtQH*xa|NEyh`m{t#+A%WQhmO}o|1REbtR)nk zl=wlh8^(^XXRFBVFD1wKQyJiM5^nnJ7H%1qPFMcCSUMvq?QnRp{CO=O*Z-G$x^H&5 z&MZ_&dwYXkCs+>7qZ`;guyJY_<<@l{0r;*r_WpHO1z^@lrGe<>>090*c@MI{(1@U4 zIqz@;)e-+MrK>sFkw(gbwDz~HPrCK$$?+8pM>id@E5JO%_hitf2ej7%JaTUL&&h?$ zd5^H|?`wV~(L{I&g528I3^1jY2?%Uj2j|UK2=?PLs389~Zbka>%8<@lTgNu3ytKCQ z@6SW&$uUxT{Fg7IsXtyt`D}K8@~6Gwzjb3BtBUQY(sBU8a`3JY5&-7~L+0C^iw+4- z3_Ut~qyztJH6Lc8Xp-(l;&|Xl=c#OYU7`~rC#b|b`WEx(4JEv&(TZE*VH&T)3* z1DC*v%6*cTdf%LnFX5bga7h;_deS{V)3v3fGLB z99vEA<1}V>k0p;hTY~P|d8BO(KnsL~#gX?WA@rJ#j{lx4V-zb*u9l@LN6Z>?vO^0I zrlUuQM)c15hRS(|OrRWqv;Mk^xd+qE!f8uuBbX zqL(9>5}H`wchdV*QTjJyUlmbkn5vLw)k+P%R>~mdqWycHgK_#<4HPkLi;?xbB7tdv zPtrj$*9Rlkx^``&6;*T9QPob{F@_X_&gqN6fdL9I1-7V?FvaiJ%UQq~ z8a)lJ;#;BLWbUh18U~z^5B!LZY2A)ch$4HXTGc%7Y z@a21_p$MNAn4@iNMtBRX!JZx-VC&~koei|$(ftPP zr`Rdq;0M1$MjTi|4+f1}IF8$A%G%uU)i=5p0gdg^MlM=!jvIJQ`dPC9iT?pvznEuu zKIkGzj`(rP%r@75qY4b+3l+_D%CnSXE2y#3aJd!GrUP$BGs)UBZQgZ!yVExmt8O&68eM!iV3|(}n9! z3ws`q8Xd!a9J<5Ym#(Df=oCJ|ln@S(uN`TFj8$E?{5)O`?B7>&^Igfd)c7RD($(&U z3ZgdEi5_n^x>*M=Ap#SS4@uSMLxb?LAFOgsO^J)RvLe7e9?L2UR*jR|!8{Qj}MN++Gz{=q9EpGMivR1$tZ zcLVAHI-v}~3@sHR#6AhIURcRYM8prBEwvQbbA6o{vT*BzpHM&Nh|kfynIbyQ0vH6I ziNTfN+O4H||1e<(?PjqYAaKBu!o}jLtFt1l-MaK@mE_-f(;6cRwrJmn0{>47;8l;Q z`U58w!LkHm5*-vP8Si>)7afm^Rfu3;>@khRjUwxb?%2<$c2D!2Y2MA3U>cY`l@S>!{|_NcAeRo{M>j4PbDB8Noqnhc^7L~)LNj)E6Z1a)7}iT) zuyWw#u-7H(BXA4?T;_49Sv1&rc2;cS4yj7v-Xk!sF0rQPcNhhN{f-DtKs>N`Q^#ze zTn`Mi_lw-nK%vt~;^w)K0KRibc;Ma&!yg4mwoy1e6aP5 zYA{X3qAc$$#q5bvPmn7%FfS}K*UyPlrdpqkh!h%tN_l8ANE};VzOsCW9Gc0-w5i`& zCJAWpuYRK^E|&8zXU#;0&{rT(boyGLh|5ejiN;aUA5)ls~25InLojAT`; ziP0sA;Vkl?>-eGjC@l_sK85Vnu~J#lc1Y_CWc-@!&Y>uLb-7xa0xl8WIdED;t<;3% z)Ug~Begk5KT_@=P^J%6d`KtnwBF1npg>gPT?T~oSKa=Lz!V`l}28v^!`O+|6ReB*C z&d2ArYBwlk_BwgW-mZn?i5uNTJj)0pE>A2`IfIn{JZC>f+~7*UzjLcFwZp-y164A{-(^B zS?%QuvbzA%ZlnA*@nhRj$ZzBov=<%(Zr)~dex*3XmH6J70zuIzr4?F0bVZqk>xPk> z5%0?jU+u(C&huwhxp!PdVm~Z5F4FPR;mG)%4nu?Y%i(gtd8yRe9O@N6A;U$ZDEWH> zyp}IY(ponr%;1IYOeq-cGRlLk_lBppm6Gbyqp|n48TJ*>5(GhDUo@Tl+IJpa8q_q> zXrO5_qgTH2Rt2+<5hb|fC$UBOrUypq+wS=Bx&Av zQZ{OjrqeKTAO#FCR;%P(ZGRF)_QCZ9%mQ7?BivSy*Lo9tFc)ls>NcCOtiOb!(3i7$ zF;nnpw1ObZFbxmHkI*V|R80&LBL%}dZ{tv(tFR9(Vv=rn@g@Beaf&Hb^M@Fu9fHaH z5W)+!=5NC8-;4yDec4abERnhzouGlQH)#kM-?d36&uG~rD@ul$Uk8YpGHdYeTlH>| z#Ith+1-tS7p@b#pk&p3mZ9X=L(T*b%X8!I9SnD=nBj#qTLp6Sl|0hCXxvJ2q?Ck!Y z$6`({C;r`j9?WdQHf;KVfH760MJwguz{TNGw*2+>x5*LQIMMCvwXPJxHh!5pM;hdb zr&0@@8{o>c)~DX0{4o`pXoKjK_P6VQmdQg13!_jSyRCZr9RYTEb(#*2wkS~e-8z%& z^`=;-5L<-g)bmw@RAxwK^OR|WsKHPQNUqqTJU)bqRr)#IkLP)}+zY56=bUWR<1 zKPv&o>|*nW>r@cHLkw>H@AVit|5z{q;T(LQuIYOhxs{UK^k&HgP?RnY(bk!E5CJP@LxjNtzA`PhosA3rH1*h9d2KH5i%gOO$JAXLm$ss3;7cdxAiUq#? zz1L3E56FySU03+;Ejl-i!|d6NvxRb6(m+xsE9j^N8}SusyhSHM4fH7xs!SqE`;3nX zZ`-+Bdi?-O!F?f#@JE%~uANA&e;a1@$-lAQIGmV99%5_DpI6ifbN+RuKmJuto?J}J zsnvJjoidb2Ih9Rw-khiPsT=z8?=MC>rm{(m*JlhE87sPAYq^2C$sqo1N4RXO7} zGbWLK`)Y*_1{f%=g}9THCv<)x6l#536|R0b=**Rqnd4&xnbKjL+}a=*{;REyo%9Zj zoP$9g%c~?IdsjY8Et|*|bVs=#bhi@GNzyIK@nty@isZX`!E6xFF}MZfzvSlbx|nqz z=X~U*4g8}x{K{~!eB-Q(>gm54!`6XTg-LLH*9BW>0QX8@$Ni5|M9oi>0)N|8>GWxn zAC2y09X7d10*1DB4l$pN{;lIqU}!DghW-aK4Z`pGxVpAvlO>(;9ix?CGvP&39l_vS z02Il$QSVlTZ&Xrv4{D$tZMjP=XG@Gpj6=*_eg(c?*mtg3l zp8-J5OD(_+n$p6O0F3YRpLi)^{keaKbdo0r3RnzQ0*5XJp69bmEl|vwV(m}n(2&mI zp&*7(7;#k4FStpi{NEO*pHuK)&B`IOGwNm-%%So#v@d;}c5>wooYx zU5$44Qdf$!%Rl)VcnqHbZ$1KQ^;TG-eSa$g%&O(_#Uxoi1Z5-Q_23>()j@x{(Rx z_3ix=G9@n&B6De4bS>qzRrp}O_xZC{qL=*9TFSG`?{?88Jv^YsN!Bm$e=u;y90?eG zL7z0AKGc~0KCXn(sH5?^H~ntCh$4Zj2qz5xQTcS1jw|e?($UmQ*~-(^3E6c*=QWhy z^Ha8jhw4>Xr{ml~jXZNEMpLqwqzI71Rr7;T&M~TB=zv;o6&T560Z%JiFAjWxkb3_M zjI74SYu0hn5rmWoN6LgqE;jw)g17vgM({Ej#pEKcb+ZIwQn~zI(Q=I9Fo-IY>qv?; zm%x&_y&`ohk5?O0i|;$EyKiG7WL|N|>R(Ib$Y9?e(o1{XG&B9gX_X=f*r4Ud*qN!+ zZ`+bSn?f~{T=xAcpx{PY-$k=U%e4>R;;|@0dsvf%llK6R9p>gy;{ z)Nv18bggjT7jbA(Atg@P9(wJP8H~BmPdQid+ksL>D4s9SP4c$%>GR=3&RVDWp`OPE zcM6Xt?rSXEdPD)|{7cm7ARkRO8%ITyQHvPsD9ANy|X$<gdXM`G06S3%@4csEuz@BIysMMu;e=bayBUDy5>dqkBO&3`9a{ksK*X zNQ@lK2d`bsr8dHa;F;-(YKzR9;^5<8k)R*(fR!+9sU;wyYV&f{y++of9CkDt8>= zX`vA-;W?75X_i6@iYinEU(**Lr}`wx)KZ5XCzf>lJU-aT_HcfeeoB2$^zEsLr3lGm zx1*tcp#v~7Vw%D!WH-H<@ja%=US#~%!(IwR6r0R{{#OeVUHk{R>k^j~~zyg|BC6lgR*orTpX%ySEonZj1eO^lC<$lJcsLF($m~RvR29B}3G;G%+IWXX%Ukvgtn)DyJzMtv? zhp*(ejYb@#%}l$$K#+0{oh9yoa{f-$AMC6x`SG@mHeA-!tU$R8jp>j=NT6@GrOwzF zvuuaQadF?fzCx#S>=mAaX}zEf6Z}Cj^H0LDtlt(*BvPhZ83(QyB?05naTd>5ba~fk zzWw0G|NXnR-d-U2@uGeZ{e5J5bkV7W=fZJqVkt0(}a-9!#l^*3o3L9quz(n zZAL_hrbxwMb=qCy+ME>JYUMhE+(`>OOTbjg`q?v^0~}!@%Owt;HfgG)C4Q5JAYSoz zDOm@-7wJqM#A)C2U8Pw4WwARGEEv?!(WI85vWE-CkPS{!iD@0;LIAGJJuf7ZpPle7 z^eZV$8CPD~Z~Te;r1giN9i1~}#9Om02WPI`RVNC<9ds6(?<+}ssZW8hudm`#`nC7t>Ss5c$&BoeP2EK$jw;s8 z#z)g0!Wo~-DWn!+hF%Qx6c7E{x{Tqv8^TvnFuH4h@$aNrqS+@B=lRV!h9cU`LbTsk zdz)1hD^&;rN%mO#lDrseCsnto(6H^{SKq!v|4gDA`&E+cRd&UouFZH!Ro{!empv3T zkb7T}Qr)P02TiXX>>&}7#^tXljjI+!P{=~-SPtVN-7m$Eg+X3Z-Dhi--5ftbRp+Z2 zqT(sIW|#9v4epE#DHD*9FI*1O6Xz(6Gp&igqi*}hn z(UbD2Cs&Js?&Wq@Te*610%u(de`xW>TQcwWH5)w_>wl;2lt!0pAiPZiACgjev=3Y< zV;f@%E8V|d4sI4j*_j;#MWkm?9Oh?OJc}$fYZT#VnY5o3cW)qKvwoFGcvW~iVSla) z$|Y3D=KX&B&)rjg2RGcV2jPPf4Owd)Mb>2gWZn;vxl8wPBVQUV`JdZ${W~^Mw0$Yn zbOg&K)L=hK=)mlI|)E{RPB%BEwjXFLjORe#(x+52_n3#&a+t-2IG9%Jn z2U-lb3je(vvb+mr3DSt8@v5T7dR|*&pj~vY#9uIRMbgJF-}`2r_ru%JDyCz%jY`K% zWh{@%OJzJJW+=gLksO0!_ zF9#qlz0i1z#}YG0NkQ=X-f}55-eEjWwI@BnCvWCcuy|AB*b7?=d&Wr>nf4Ol=M((& z&u4lo9@qxX7e6FboNdpW9OJ9gGDUuUJ63Et$zwJ<{1@yitdN;gX(lKdl})mu(8cRf zq)Cp&dl43Djkjwg zuYISn-))kZYEn1wi%)Gg-$FdMy;qchSCWq$`=?6YrcDPn<&PVDUE|*J{lSO-R^J$t z4dy5#fs&+l-?-m`0Kyax*pKro<&%B;l~q2*IL@^2K-l^8wsolXEVVYHqt@FAs|DO1 zv#!UJH`ndG=B?m_KbSk`>u&K^13Dq9KdGBReniTu=`_4P^fizKsqVsf9?sBtCNY%0vS-!-T!=7O3J>mf8q7&?2#9E_-egwijo@ga_!acvT8xj*miB3! z@6#Gjv)#;_NfC6f&Z_Z^g8pQTyzWebanh_q><{KT`FBD@^tkbK)!LuL=)H?;x!m@` z`=lP`kkop%XKVxCVvD>ly;>P&BBAk73Q z0&%F$*-&0T!rBU>%;cDXOctfT$TAOHC~g|xMoX{Zfc@rcytieQDQayU<-1}ipO7?^ zK>kFFxCabm*OwMmeRFe?aY{bi>yGS6q2oN4BD%nJPG9phG9(lUN#%4MSS`=Q^BFBo z785z8Z8zikW-CDtjw#cA?5llw18|AW=p)nr4d{NCoTVTM?`N-g;4tEv#Ywuli>OG| zZoK$sSU_0)m2Uy$PeI23EbGrYrVwyAyrAzn%Z&)rq)^u5u9y@4P{ z&sdyK6iS@~X=t?vm7h8wQ55$h8IfuaCKX7w-OXI1yL{9hK7l+a{&7?gMNy)R4+-TF z5u9|Swu@+b8)4TK)eyUFigjGWu70^{;ChzM|LKnqO%8Y_dL4nkR7v#36?1Fr*BLPT zI!4=(`KsvP z!PQ9YqCA!U!l-#+^NpNs0ktFpurP?ZaFsWVhn|_9Gl}eCh1XGz2qn$f{0oN0X`Qvq zYe{x4`<5L~CUO~0&U}OAI`HZ#9zr0@+?V}{OIsD#m^S*EZ;3_c$pd_HU6vbbKkT%g zhH*1RHrU3KSu5Vj)?-=x*N?weA6xw)v7$Qj5$FnLCK%La18SRsq_eYK z`fjd?Aw?6Huz1E*s2)ZkGNMtPmz6p|f&Hsy%_j9gAIU}h%4ixSP|@)N3Jlr~>r5L<02cd;=E(2euxRI#7G{9(|A z``Hf<2i|LDj}@1x+dAaOlwc~_By^ra%jAdo&f4yagHv6ozt@;STQed!s>JD|~h<)9j{!I^ot!9RNQukj8Q2Ox&GHM2pYYbc@ z#sUi#k|a`+(%6bpQkWfU^IKruh$zE7bZ=XkQ8&6>ac?wNd`8?LSCsJsuaeiU-84C! zu3SU948;Kx|I`<+z9U?7zU61aPj-dK%No+H9{>XO?}HiPb;G;5qoC+9s5N+-XtK?@^kl$}Rm#Q4`$ zrd37&)Nl3O+MtPF12#`0<*v>l6RizFa?nbynvZR<_TX<2SUR0L<%#p_2%DWp@CCbJ z@4Dp8;Ab{D-daoz?GK6+(p={ojpQ> zb*j_0MSeXLTXuTtvf-t27Oq{W#q;cs<*S7g_2slEI>jp&qN7A-|E7RY@!F3=U}Dz= z6K_dkf-?${Nbn)}bWr>d;*_0{l*v7Nzw?~!q)m+W*NE>6lUR!hX0b<+eb0ls@q!f; zhviWM2QCO)W^@M?c!j2qZ&7X6tjTXIvTJ?Tg7Ka8{b{0ut^U5t{1t97Tu=z+dpQ1# zu7a^Z4yqM%pdsquk65A?{!f|moBk5q3OuzL=_z= z{cmlm4-_QdZr&HRqFC=VUeI|{tgzGRE0lg|PNEs^9v%M!wQI!ge-bJg&N)zMZfkD4I4RQ8Ly z$t3Th<(OV+vP3Y>l3W;c#0bZG8m|0u8j``3Fsu{( zsQ#+ESpebhP4-=8Ml{@Gx_9*gN|QIn%fqwh ztdJp}F6Zd0sWsMt1MB!w4G+aw{cNeqJaMkfi3<0@V36dmomlfoRXK<~Du(imJM$1mkyh1e; zCO{0^#=^;v`pL1>w!`F4l6>sU4~@~#ABxw~6?5`QE_Lh3QrJS5XaD$ej!l{l zTcg*;PleN&+B<{$5yV;g){m-?aJ zQHA%|o4((VpOFYrTnzudq&_~`Kv3U($ZnEoNS>Kdr%LgoqdlasFH-R@e4C*IV=Mds zbd`Zt%v75oVy&jvx>j9|0gcxElwy+8`rOBFR(g^`Wb9E3So^&tT*|7cm5#I4zT9|N zV~vC*(7ALPE4&!(2S2zZGFrP{-jX}g1%i{lZQFVB{1$dK6g_$x<8X!AX;Xxf&?o-w zQ+_hqNFsa})SFV3D~YLeus^Wi{jrje=)+ojiylsX8+RY%sd#5pHtCfZm-)2ze?#T4 z1yRevf9Ickl5-n0StFs;7v}i^wWA@y#U6@l`I_@|jq+Q`I=_a>n>;y^2h_aM6N|P> zQ3Reulx#YLeR;){ZG!5yy9qA6l`k&sY}>@-pvz~rqJtA;FP3Cu=Xn?nXLO8LR<2t? zXP48l@hJIP3CQ@YVP}cZlJaQ2IWO1G&c6&R4vMAv@uNzPvnG~zF3RHQp3qGPb#Gd( z?1_2X$rC@H9NnR#YDQ?H^be56*<+%_YZAaOHYw`cs^dK{B`jWRz7RGi3unXKIa{nD zM`(gEBAMm6g1FamOW- zP2@;DfQ}R(1%O|Sk1&*YpHr3DTsoK){akcwgz=v^%jF|ImY+q=FN3W3CY2-`(P6S%_WOo@_yy3Wjr**J&7>rhz&|Y^7-@8E zn=MEfNw`Ro_B=GjUaUk{K}I<%)#WFPEqM|Pi+H5KkWhdXN&SoH+&9{Gctr$m*#{yCncm;x}#5<{9cNW%8`C+6`X!V&j`tqrYo6>dKe>nVM|;D~`1|nj|#egC7*rJ2ok*qTg-L6U&*k#*SHHT4VyznYejfjuL*c7sUGvMF7(@$-e9 z#}sh^M99Akd)hQ0Mn)jt{285h9d2CBWdld@KzEs_Vg1KV;edXqRfj`~Acd>YF{S>(W~&>zPS6UzX)YN z=D(pk_qSG}-WqDUAhBP$(Qr1kG3(-ayTrgZ5E`dI_eEa%i8L2oCT;F9p9wpKX`f#D z2zqIKFQ8v`${N{VIInIvtiL{Oja2ZQ8@BX2f(a)^qIn^?{Zm>(URkJgJE>n%Ka#;= zFqrz~3oB)AQ70~~glgtQJc-DAeCK8OS|B9{-lf*g$tI=%iNFUPI~`t`&;Rn&9?P@u5L;eR$MaY{9Wc`l0>B=LrKZ;qz5jci0Z4^!Npo_G~NYo!;zKc)^yYh5iVm+OEi@AXetY*2Y_GlOr(r_w&2Vf8Ge;=Y0<1K~k_;ms2>$ID1M^ zz)@sj_AA_$4}Ob^_KYoJmC^ zYv=Xz$nM`oUn^uraqZEl3ZsDe#yd$u>h_@v%n`GzD_=vkwX`DK=0x=?B2D${Boz>R zy3F9C@V(uWIqD_{^N*HKIcyEj=^w=R#zrObIM_MfDwC}^vQGnV7ENz`!ss>BM$BmH z%}i-}%UR88rSxq#nSc4rl+t$+o2_o_@dx8Pb`UQS6TL1kBJxSm>*~YrZT^o9lLxOt z&zCR^+Bb-`?ISljd<_8ITvJoCK94}&)Z)`*1>;@fde*d+80dr!M#hw^thVRB!P)Aa zJj$rsFl?Jb=AYFVZ&Gr>#bUD4F?4>+v|3byoKbJC-@bmjXCry*aBt)jbG;miTKDPN z$ePA1`Q*SkP`rp0yicbjcNB;@AFGivw`)4sTJ;I09)y*4nb#>Hi!@{j?e8-_Pr&-_g;W7CB^aPES~Z0-2b(1h{Am zv-=f}#o+85TQ!#WZ(>Z{->S))J}F~bdyX)Ks^zTe(s;tZDw(D+GLh8zKkA8hvJJZPJkV%=csJt)JVlHtak*I?qepJ$J8*1U8RF>o zwW$Vqkz{VW80t5C3Y@U*ZfwosqSl$rzkAoK6lxq16T~%%_G2k$+#H)<-+}s{S-_|c z+qA8!dT#X3B?}AnQefWLr!AoBFi4DKmM{>dv;qULZg6_{-Fej^`i;`vS)~xy)464hW{VG3AJr{aqaeS{3e>^WQEO8*+kM}>BwksVe-N5{d zodt})&t4@4B!jRtzHvF=OvR#udu>|oBG!|uTejgxGiCEX&!_h+L^ixKo%TpGp)^e~ zzGjkwbd&#An$}|$2#h7D665nXIS%zxyRXj6fYpYRfJMVIDd9B^1sT`fm1t`A$REPl z_BQkFE-`Z?tBA?NsZ-_jXkt47o`EN;)O+r4J@Lmul{<99f2 z{nn+WH(L*6z%Fh&5_POhU1XZN0(a1^N4sL(w;eC<<~*;nV61o9Qiu%SzW5~6Lwj`N z0KEQFM0yrK=szGXjazFTaxO}x6ia2>gPY!I3#wI7I>vRj@;z=oU_B-Yz>4-paWtNM z&vz56NXQ?#Z!R3_O%k9nKRk3KDyk?ioxlKLi9S8W7P+AS?NfD>gG;EE&3E&_K?tBT zoOYklo`vdM_Y0N35vyh8jby{#p?lB1dv{ryxSRk%_c}jObY0XA0~!S**}ze^&DBN`Vz41( zt9p+x<#|O2v>0ue_;@q1@=7hyy1hGoDs~KOq{LP8-R21u|8>ffR&R-*sa;y;=F*NSWSGBcUD2U8?fJ({0p## zYsXp@ zrO}8CfuCf+6^$xNm6UUKJgEeJRx3VREBbsX)V?sb{OCb3p0IjZ)f2nKju7Q$s%-YU zI9M=|{RFO2Fi>5Ilm_ozk1M4$x{!6o5qwYS(qLRwW9Fmh#`Px~+;r{tBDTsU9cur~ zzw*~0P#vYV&Ru{WP}QFPLO6eJTO)D#{dF*ezsGki)DdCSgwIzuGqK8pae#h@iv@_@ zr@N&kq)lE)00DSLf;uRo+M4Eezng^i2S}ig#>vI+?{B)72;j`62adc+9?VHE>%T}K z4|R9fqYu(M5L}?lJZ7q;v`s~Hb}_J38@AUTf39CuS4(kwE~7!AsVkiJj-^86xONFz zyG~QMXQ3ujjiqjjWf*08DCI6L>+bAdSzK|&lA?ul!*6zvM7bs;H}<)&f6IBw061Td(zS1X7m)@Z-EwSA0s3R zrSnT|sP(+_e7T*@)Hr?D`E+2ze+ka`M2U+?CTw-e#XgQA$QAbe*#C=bpM9Mig#k_v zG|3tUNH)s5io#MNFAO&57p@sIG1O4MT;s4}ZwRx^a=e6CkJ^{IZAI}aI>(yS6lNA5 z(}#D)C_fepJS@6QrhqBK)tck8U|hD`J%GD5v-QQdtK%H~yo;eEO{xLD0bUGE3jjSh zFb2MVh;EB~HM97FRvO9da;oI9ft_J)DTQ$(R`qZ0DM_nbyl~5O`Ffxl zP=MIKL2R$CIom_5_4aQtE;he#{bLquov%BNd7MDA5}Ij0*`p|im2JtMG$Z&U)=^o=69dP+SpRl$9(_FkXo zr>*-zEVSvF>{-abdSIut(2b0gH}Cw_xjXZg|Li>T!uWvc<#4dhT03rX8%fYVnI+vk zS-Zp#t~M7MH+8?p>fiNWT}t{P60c8sCO4Y|5^@Q5xXsyp14?g(kkiuM@ziy&XBdc^zbmjXxONEhJJK}R#(FWm}$*17NETjT{VsJVE_MUBEYPVl}%xaEU|UQrrYXLY^LwEd^S zFQbXiV7EkF8HDKxvdboY^8ZR2=-V2^>U_DW%YdDcSeG&}$3zw!N_#F*TIXk)YgIDVC@wro%8wCi(bM;M0PJUw;iJ}p1v-CrH1d8gw z!*nhK%p9@7UcIc3tUIGQErVeT!zrb+C{K!qo$*KTI@{P4+bD1Z07msItmbp*SKX)4(nPFs^uoK`f3B} zDeD`Jzu^rKcP_?XE@yNQyc#Pig-###l3g6BF?IjDy*HdwlUT3+h*7os^fGomP;L8F ziD3V^M$e9Jci-yVFgunGMzu-z#7u!PNlwQKtDFiD7hrbTR-uc?U}k4yGq8Klc4mF| zlba~5P-sejS#dQ8a4!ifQ}&ErPYPK2q+~CO7x<+vjs6v`xiVO4WyvxfICx~Uk-?5R z$KTK@pBxyn@9pm0%Qj+7Q<1vlA`olN8Db_!d4ukyU>^Zrb43`^VQQ7>2nx7?{i>!q z+m5tYn>iZ8lzLuhhYnnLh&_1O&O`tsZceR5em^-)oysFJq7`or&2eod<@Au>bxdV7 z)nvkzO-caop1xY^+(Dymm7?n+vfUkHm}l}pNwR>NxmNot3*A{EdDwkLckk87e9sK6 z#E1GCrtNikQoDt9vEYKj@**(upwL7XPwmu8b)%+^ikPi5HwvlG(}P3Nkv=x+=Ocd~9| z1_f;J!hiBc&qw%-&t$MB@Tpjz`LYEOW~g|V-(1B0ckrKy+tuaw1scF0FTrbrpxZ8{ zO~_Cx``+@7oj?@CM zDtQikDp~IG^V}ZX=ZNEkh_M}=kY*Jsys_$;<5X4-zEX6 z{A#KP4a);joT)Q+l`fj;(4X#TiE>0r5z>}TbZ&|}(QofjDbH#pM{6q2JR|BJLc8`y z7&omVQEtmyxza%9Xg))f%Q*&n^kDIIeQSYHAoksWG#P5E@neo)7ziK*+>rvvYu?R` znK9t>1T16wh?$@sMfDtyJBq6Slhm6Rfztk#Y&Syf@wBdSkJ(e@lF3+PRSsc51Azh8 z_8Ew!jHe*gl>splP?Y>} z=UJ_cFPlT-!2wS|D8ch+Kuyc|TkV)mzF?Q+rZk@LV)i;C>HvOJl>^heiBORQ)E^Mq zBS8h{_^KZ(z8Xjur(2G`{4x7FwtPGug&^LXzJh2E$mU=Z-76|#x_yJVAgP(u>J?|= zTh23`nS+hP=vp4ArJ#04U+yYJH#agmq9nF3yA<0qCO@K3Mf=U=A5cZ;>y8PZw=nwN z@&!SCA>*?9piydIrOQ_vP^XHWxTFFZ@I(5-1N0YnjpYnwhb8;}Cj% zk@j`{J#(UIwDSh33fctye9p(zqLc1*=pxMNX@Jr~T1lisO>?!VqLpRcf|G@4d%1FZ za1fP7tAd`G%jMts&{bEK0lTL1m5Cav@)ahyDdf)jI#UlP;$luzv10I?iEs!Q36`^1 zBZTV_u;WVY2=;u2yNYXTX@sAB+V~c!2MbRQ=>jNLh#Qmk6)UxHhb_ss^YgtErFyMxS@PI>jn}x$HxwM3%-@K5?nhA^~NS49Y^F!rV43v7Drwd0SF|o8( zk|#gFbJQ-$P!i}^i572K50~IaHKSn(NSsZ&RnJyTK@drAMKx9<$mWJWNIUi0-K);Y zkM(EgZ~My-p17kmsRg;u^GJ?JCPHDuVeZ~N0EZr4{&Ha*_w?gD_38^l!caBFqw!LI z3+RaFBZ~kbtOS?Mq#=Q66-~y*RUBdTU^iDwQ_t#a0YLaxCR6u;oGaQUl&*36M9(o5 zd&uN3eBwjsQmV#s5{d?hmR2U10KwUpX;F}g#kh$6Na|Ykc$wZB{8wF z)O>(O*&PQX59k|1@Nb77>G5=zT>&0Y`9*Qf2v;{z&ist09E*jy2p-aUm*85!-9|fx z18B)jYZN-x&e5XkL_#SSWiWr`C1#I%SgNhXWm%Y7Acl!m6Z-nAO zOBWbsJwne>E;5Vwv~Swkv<{Fw+~%xDmaC03CLOAoNBXYnYsgv804az5^_|nzt9JP% zgg?QokBNJSE`=75NdxsE=`}M1Z?UVS_9OXd|0=;zYb`4=FDP7R+6eGORxaRW;+HWE z8*6KF!cos!5dw$ZRl+GDeAbVn72Xk{=o!*yTQ(fbc;c`pF+)aCQCvoL6sPHE>Tc(S zKRdzBfkuuOE}JU@QTVxqbiBtA)8kY*;B|rCRbU)bsS|FwG)AD~VaFIDgbo;jFAhNm zXGc~Q1aD?LrFjdvy;Ga)FyBqi@9U1L7g+BLaP~ZQ0{fdg=J@{dI?}GHsSnz2i|{!e zxAa;YCxz1yQFa-PJs=={M@d4W@(M#Jk|pH)6alSttzr+4l#`Mv9`QS#E>PsAT`%~{ zKlmii-_B9dGz^o^C=YVx1Z`xvR@dIpL2bDCfiI;1H9rpxj#M%JcKGoLp?E#~0{ru} z)*yz6IO1j?G^=ydwTUcmHA`3cUa!xNA@I{U9~7p%$%tUAJE>u+cTH@DdQ#*NfHcsN zq-i<#_`i^%){-{HPO4?bxOtClx6kDy^aHYsvi@ts4vsbQ5?%%JKD&ksD7@Wba5V*? z0G{@}lp_NdsZQQ58M z9M?M+bM%g8Hq>9Qvlk6iBljBo*=VPfWgtL! z%b7xkGbGm}43SsPx`rN_Rw~bh{w!X9V}z}RuPCirmC87Ev@QNPQ%Ysy45tAg{Aa|a zLBWqYFLKBwbq+}Z*|MU;OpTfm1%NPlC2~l zGImpgr$h@Jwkx~~rV`Fa&y35xnQ@5p?#c!;mk7YQ^G2BZ+td&o8P%WCW!x3`cU!*v zhq$?xI!L!u43xWTk#?k2h{A2rE&CiaO!%H`Yz}1?gj=BY(0`fgqUhMt!kK8=ep{`x z$IwUbCB)j&k=$5z`VlLnvYY4uJqBU;;M}C$Cm(o4+GL*koBg+=E9A8A<-K9syK-cS z_MvVm?nNBc>43$OKK<9uj@G8`yVkH2>Ng}simtRdW5wcLqZj{ai>rNI;CDyLaLM|K zr5PthRQ>6bcY0t}?pwQM*HQ1lN}TWYI2hjabzAt)nL?#TKvTNfc{dtC43cF*^_tpp zFHW}K&5Y3!t1xQ3%QsEoU1R+eb3Sq9mCpuBr!hcC0hTs;+K98sgU<@O%fOj+3;_n1 zy?9&Bm6Vny;Co`@>+4&&XN#QW7%zvFrzk27jog2e2GO(AQVB6P&^KmLvb095Mu=(G z7gxE4)TEU)sNhV|0e*?<8*IUeM-pj=lt(SaLH8IFS6-8-+7zlHYAotcI$f_x;<;{m_Ts8I|BWE>_Z> z&9K3cA{ofO_QG83#e2^VCR^?0DRy7^rNWV4ajJr!HG#?6aT#f!XS zZ?K$BEcxg!6@|xeA_F`#-A~h%jx!a>Oi2QcH{vi50Cmmh#kI3fxgq7{$7@3_M=VXw z1&n)q3gYwwaJ3UgKycTMEyfBA0_)vMgA~BZ4GA&x*Ni2cJE>v|{*V!awO1x|9a6IH zYZWkwxFRkoYsN{a*lnM0AeM!rJ3qAnowtJuTUd)TL{{kjp9PR5%C7hhoJm7FCt&Hb zI6QyNn+5`K0Qh;eQf*zQd7hGFu6uy)&D|kY68e!dAn$bi!G;@YVC_8ubO4W2pw`ys zG_`MF&X+Q9uNOTOX?uY-waCa+FbIlX$}bQ&Ez?N%GKwnX*7nH(rqE7Vi^wsgVdR%y z)C-*GzKrCM%{^K zczqsN-jUsGPO=y=8+ca@8zR#C?&-hP`b2Ul{ zm}ZRCbTK{Tv;#}%IP7!!xzrNXmiHeFC_0(8`)E$&c+hF9!FZZJQPh7?nYbHDL#Iz{ zGe=dOgV4B%Gf>JkLFrUSsq%_i`S+ge8<)^*y^+K1#jo%Y;y;t=2`$Je2e*&)$oIrr z8PH;K%3%T%9Cl&DZme6fewq#x{z7OCxa^{}88^EX^z5gdi8uEg|Ahg@le`R_I+Xqtf`n>t~nCLuI0blowDfxc6xh3w-r!$@wuI-|Dy2`LN z+cgPbE6E-v_Ht_Cla88mdcnV3`*%LC^m7HrHHnYp^3>;gRFeZWqgYYW4WM#5_cyqu z_32HUMYR8oR(+au$OccWbFJfFK2**cN!7h^LC$erv6Ws49YL}BQAZN4&#kfw6=<4Xw*c7A9!76cS({ZJkdXai7PW&{vEbl$ug5*5&@ zV_pSH-RZRBy(PV8hlKxx@rib~>B~~jz=^%=Zn7Un3;ySzCeqdP1@(}e2eLVHpeM#0 zJ;aDuX|9iCNreMVQeDOVt>P5 z>+-JvZ&5@_0_J`->=5#J$?sQP{1x<7V%y%;=}zCHSv#c|A;~Cqxp5q-VZu4HDj7Bo zv>A%wr5Q-_s>f~ca@4x{ibps*WcmikbDGlBt-y1Hv_ z5Jm@IQh(|j^%GtEE~hORdUc4tCl73TvexrX1)C{GTePzAC^LZzPPJVGotStQ6#+1g zqEYT`4zwnT;k9UgUu@?YYIb0_=;6OXjA_Q;Put(0a_fPaFLB2Mi39#;eUEcf*;1ZzDz*6#SkN54W@a{7Vu1-)Gj<8!ikK3NnU!7om`#&O9ZW-k46t0wR=SXw`#5X707DW6$7zNN8T zSy3dBsgQbJbm!X^Ie@W!j#N3EYRQf2UXm&BjShv?VY7oF{@DponMv_k`)W}TL-oX4 zDHcdpEM#zRRVUFcyS_47>oZf&pf#L(-hKEqC8V+1=Nxt!q;wHv9SGe)Ms|;DO3KO_ zHs0*PrKmQh%5AR8n2}6wJCC<*tD~hs8^;;4ZVjm*41?VPJ7RjCmMx5LRtm2D6ZKgR zth(Hb^v`Ag2E9m=^GI1iOozRTjsy2JseGkVICo+>a*<^dU%@*L1*se*WHpHkYFJynd!ME^g%-{%6R;(f5sylcWHwBxo5w zvHt!BP@@4?#UF5v-qG>KfD|?M22-h^X{WxEeGv%*vO>9@~}Y8{4wl zrUgn@$eT6}n2dC;t8CaB-w-DA)%!^7)YAxu==&Bu_0~Vy9B;bY7}n;JOPyVJ=R*mO z;FnTlv)3D*DKr5$rDJHd3>rW#zj1tj+c6CVaT5VeSgO8Kl91&@sWw(+IGYSrxhXwF zai8X}vr`RjHj(_d==9%Wj#*Ed;o}EF=~gX*(nrFO`CI7t!N#xTi6*W5D+k#@>Qq(` z0Agk#@_Jpub|{QeNet6Fx-u?9(#+>)s@W5iVG(mahz&5h(V-3;^b&g~1?vVWfH4N5Y9%x-|c1h!- z;UnjAv+1Cxn5+IR&pn}jyPH;oG}l$|?WmQFK7>rgDbm@}&1iAgGjMQq)zWJ_KeuJy zk;Nb-lK0QVdeYW8d;6}EBAQ;^qeEsxvHQlBUF@S4`#)$wp_)%#cD>ojWrw`Ti~y(W zv}F!7Zmg|W^54ubA9sUi$YB>sK%k6mG|+}+&C1XRDnF8x9ID;HcSI})m!@1zimgl-sg01&dF94A?{p}cv(1IVJiB&+UKD{5H`sZcUMuu+Ql*Z>X;)^!ewW zjMLhqinx(=?;bt6yw6$aa{iqI#`K=#;}YWp-ifUCvAfThwvFwp+4Sf$6#Ysg=mZL@ zvy8u_E!F?R73f99OC3Z>br7VvQD^yLBFDwx2E%Ij!4am$!+~>6Vl@w$jo<*Ra#F}c zn8dPlXArWms#LZ#zLg-VBZEcaIS5_n6&=V^zT^2V`n$)q>dr5h|J7QI-o$Q2=q%56 zP$ygTk!O~ROrEp0g}B?poM3|U0*qE>G0?~B%NxM$H_sE!BT)0V!d_X9*^2+wyXJpU zfV2EG|9AeohX02>%Dn{Gm?Hb$3yMOybYoHNwB7=@pOg+Vu11|#P;Bqa_u{Q>@$pwR zCF4OEUdt~=#=HmDhjJWbtzKN#(e!ESZ|EIo?c|N)b2P! zEF9dZJzj6cWBhj@saoz)7Y)lE3<1Yd9~9?tp%Kam7En8n(wUH3YkP;{S*bO*h!TcA zKYy)ReQ$=8<%YOZ!^jta5P|TRm(4HZ>N)`&$tv4X$Or8|yE9u^xNPN^Ji{z3vd| zHz5d`G}iZgO|0wH49_=&CxSO>j}iN8i)o z+0&Y~>Wy)y@u|`vn_8xfX@~yLr@GpJTDy|FwsEg4P$mY`Khe!SmqS^IH54xXzYJ0s z4?(h*oks=|_$e2zQ~l18m#dL{rMWt=2AiE*92^w2LinSZ`+Z$1SR=J9NfE8a z6X0Dg$H;nT5y!uz!~(fFkHN=M)*4Z6TCB7&nXK|5`%<@)q^o%W8&SQ9UDY?v0*x)B z?x#Z9)#C_a`j4ma4GDBXo*bgKq&w{@SGzhV0MSd>vjWXIp3GQ6>kXwgKCQ_3rD-LX zAXEK6P}uf*S+P5vW_}AlvhL}6o({b2L$SowH78KsNeImDUNHNNz0`5H7i3g*+v+x0jfvty zkPR!E8Wlvy%d=+O>}4P47FAy%gz#7AYXwKs3-QDm>Z(jXc#|BE5_)!VfPuGL zLSRp^j2ADq#?Kh)ruHJC`%CFzp#V-9Q6qohhBIB&tEY0l zj@hEN(}L$u<+u4Kosi%Ogbz^alv4!Ev{kM6R1xCGh50^$`raEXTu0#No^6 zgKP2!w3pqzyTh|>`D;(VgJLxSLo`jQ^fzec-L&9wBY>P(jYmHFy*X#sW$Ok>w)9$M zr(NqC;?fA_SyeWMOSMTbn@GAuF4f4-xsKg+ADMwSuJu44p^6}a^qUaI&*JvP_GqH$ zjnt`}uf2Z%>Lx4xbrCDl;iv zs>Z=dse%@8Z1eq-OYr8{cLgo2`2_SFn;QLB0foOb2}IkE%R$nL5al;WPMbQ6V`j|2 zy3N~HeF@7J$=bdvcV?L%UXib0&wW47Dejck5P4yy_m4hAu%m`MSVA_VKZ>^4uDB@E zIRlvcBC80Uzp->Fa%5?4 zSwy{ggLRILHC8k+cnZ^~&i_tu;;-yDGUsH!ruXTTvDJscA4yNc2K)rP-zfxW%+1q1 z(Wdzvk@qsIdPiraWn-e%?rWN9^MGiZ=aX=y$qA}Ag%EtOIP(-mnN9+a&(*+B=7Vx* z-EKS^a$j{LR0OmQ=%{3n9EK66w*}@}QmJ1dJ1X0;!R~e0hmZzeB(!Wa+-R9#K`roZ zM||H~uJgRKv|jZZJ6BQ99vb%=YAxCjvMb^94~rMl>2iUK{%v%gf_xwA3D#y7XZ3CF zO}kx=T|Q;)``^ld`CPg_jP14DXSMl*$Tp}lKf2x+o*~OMu@50O;UU-o>fm^Vru`JFxk3BA(pjn8>Muxw z0@O_m=6y3hrq)DEPG|*oy6%8Nq$@hqgd@+^Pw9&g%~uQU8n52tPYXi*;~4>sr^!gV zPj1_MWVq1!xGC6nICnW(&t33}rwP#LlZa&BU_`L5wz4DXLE$OtUHBz`9#KT75>(pI$WPV8w}=(L785kSNOhw<9RQZ zd)E@9Dpt6kidB2Yv5Y8KOSNzyf7)m&+M2GY8_P&|u6zta68a98h4;~vy42JH1umn-OV%3p0wZgfnRZv2+#S^fDZ;1xFp@Pz#YgTpu#0wo?9Nfi^m_Q@#^aoMx`Bkj-6cR8 zFqu*2c_ky+y?dcHzUrAN8jyS{r(*um5|p<(qIcWBk5T8)+dC5fei%9jm=%}HDbxrA1UpKzbobE7BlEv!FJc78-9=)nx_2>3U7`^Lr_z7dk zdL)?Y<1P(o@P_R;;{C3Roi$TBD2 zZ%7oqasGQx6nPRYF;GVtom8PO!~6zK_}4LDKuXshZ?!buvOsQ(^u%fv%kw5wefNvV zM90BL(}FKDT|Qpb*Y=*(?Zv1w6*+$~U;C^@= z(}r@SZ){J)SNCj?^URc;No$)IA9{?}YSfN`ugZuX?t3G7101 zY+h=BMzs1>8*wArRx+g+)SBFIx{M$ox3*}g3EC|#BY2s1hPncPi+5{B`RgCkRd+4#DWM$b?&pN92hkF%{ruys|9aQK)|j6Kql*EK}?>Los)Q(n&-PrXVZ zgE&k#oQ^@cz%$RCW0q1| zMUytauyNi5rm;6@(wJd*bDaai&0Xt&cglAo(a{pT9ne)1k>ff3KgqE?zxLjNV#Qq3 zm2#oS{t?dV2SkmdnE26BaSyHXy^`X~kT7>rInFPhDsepyvwnpk)b@ArOlLK8 zK6PiV7LH{ZQEy8}+SLmE`JlYeeEY86w5aT$TZengH+THxF?J(2t})c}nlO4?#*}zj z#xJK$*)GS{vj~E(yO4&~ESlO48wyz%@I?;B82|>%O)rCBl52$ZVLMJD&4eQf;Nma< zU(PclJy||7r`Jl28b=ag%fDk^q8?HvStNce7B$mXW>je>skK<9KLj+G*4cXph=k(S z>xIjp#)2=+VA|4?j;UI<*!WJ{5P46l)7fPy zcg|N0zs-FMuxWiBa8m@JsS&Ip`|(^OQ)W8Dey|P$4?9ad{qG3&&EcKXdVxR(fg?A0meSo_PTr{!^f_8w zbd$fv0G9q{(0pA<1+V(vN(EC@i5V`pcfF=l_= zRA1p|3)_BuknXsx93;ak?9mthm4(H!_j{~m#&|SOI*VUla~1?Yt1r`4LY6K&c;Kw& z+g_qlzWKI&)4gpF(H|jxq_km>de|MB zZ||lJoq2lJ(2#`?zn3rBz!zsoJ%UeCw$h^XlYSv=nx2=Glw=P@9bFHUvXqI-&&iPj z(N9r1C$v;UiK)jOvR$Qh@Bub6nt7tI{j^`?cXvuSZ+&PmxB4&6Au-ExmATp zjSlad2|jg}whdofvdTfXn}`{&6ZLpD1%1R?=Yq=o_X`rZI-)N7temu!`DG&g+|(BC zEX2TiAoviLl)SKB4TGQ)lL^<1a?JesTb2|J|C#~y$B)hAlJrS?>RR(Y z`t$V4l55jn5`a98v>{(Cm{K~tc*h`aZRIYU*eSP#H5}vyUDS_9+9;wpTN7OJ^k6~O z9h84$hdo1dimQ86`vvW?rGSb1$t}^>+XG(juGBR>vU~EQ3sJx{v!f&m1!yvD7!r1I zTph38Vnk=-M>0$it$7)kkCi+co=)>0+ww~4Oahv|rKcu0j<7Oa2F}zkiR1gp$=##$ zE*>Auy`=1Ofj1lBgx?>1-2z(^7~|A~&tUWOF`bqFP5v;no9-N{e(#3uT=D}(JBJOl z$)A09=bEOtA_F74hpzwxBipj1np)ddjPM4@m<%vwqx=uxi*k{pafHZ8gXblGs(N_9 zs!N}$*gaW=KQk9Ej{{*2Z$MvdtvUh+M~?l5|6w68B?cgMF{mdCdU}~T2*B>iV=rxh zlH$FS?|VaS*M~YfevdY&!ByCP!~RI|DZ4Z%-$#tqMg-!d9)iu(3b7tux7^3~B%o3u z&_@ljc$2ZI`dxPH8MC6vEWv5x0W&a{o(>Yul>+;c|2at4cCi3&4Zr?9F=tPqwv?`H zF@6Uvp^7ByA9`zDU}?v(0lyH25$Z7pPMZas?n9=gon=wpGp&CiSn_32_^O{tJcDlB z%qEKo+;Zt)TBkK(b;Lu{VpffHq{RYGDTMH-+uYwOCGY3TV!2M z_Li|V=W+A3p~`mS=_e|p$4#-yl9qq_0$%Kd^?AjMZ@SM03V3R`Njm18Xt6?G*Un;E z6Q-4IW(WZ$GM4;g`=wtK{PromyR*!eL+cJXyRH(LD)2e|ZwP z-4#Yh3NX~=&ODOB^EOJd6in#eXDRp@w?P1fOb8eTua|daOe>cxEw741oG$;*M~cY5 z_hm|+SqUz>`1cn9b-R**pZ73U{`b1bEA}C@Lw`y?aL%or>mJgVYKkKb>IG8gz5RX8 zyl!+0gOa4II!I~OEFn|<3j0H=bu_yX!So zN|gpzrO{MW?}dpDSGR}wY?j9dy-KG0oarNu-G3a!$#Hw&F86Wx;2r8)IT{&Vk1ps$+G*A$Jxm> zGtf*vXWg#;*L>Ji{h+U9&2YWvVXpc6h^>j9(;X}5g77KnIK^6c>_~xBJ-JQBOe4-#aKSzaUU}FMWQk(n#5G~GYU`G)n(**9^H_J zuWfFVvZou9L5z#G)7wly`SJ%7;~yV$;IJ80&y(d3vB933K;~qcwrl6HU&QnF1l;Ze z$3wwuB8>`5u-rA_c$uBep4DX(TA@LoTUFadeHf1R9citjYh8;Cjs-q;)av{`wd|v9J15x zngVXwowppPfr)G3aKu2=rF_~tA}lo(2bV!8tI?*tyjl`cB?w|<(WS8t*CuW6|1_ue zGDSZ>1F?)#H&Yb}rkcJr)G^?28qa8is<#Q?M~x?-wme7uc2-YR0So@!(}vVmE9A3X zGXBf29?yFByc4OsZLjlHWk_C*)Uek0FoAP3NE}WG_g~Ui!xZ|R%B1g|xHAkmet80_{l+Yre5i~q6<+)x5XAHM zT>HjqiW7O+=hHqOOv4Ys>61)ruI=}ss$P~hLaOGx83w=|KfpwKy0>J0fu?|lM z3VF#zDBCzvQ{@ti;Q`@iRSh6bFU4Q^ZHKOUd0|I9{@P$20!7KXCA6ho6mDB&a$4T9 zQC&r|$aatahS{v~lp=aA_OwCtI838J5`B7sAuiz;)Xk?=IrD(m)c8V+WX>) zk(M1-B2K$NUdn&0rH(ra4#etJ3D^k1l!osz?f^&BFGJ0}ze)k)1Q(H(XC>==Xq!-8 z`=d|y=GpcG0i~B#wwQcw?sFya+jA!fKN!NOd!D{J!g;iULIPTJcn)l0OW>=U)M?UJ zh<=7Mngb7gxbEK`R0SdSh>*t0zvs|b1pOA{-z?7rQ27Vgw>ARy@5?~Gl+{N>IzIuP zh6gc^=;d+0T#%4idY}`~5xbQ0h>zp7o%GUBkI(Wrj~U@-F=>&`aNQcH!S@D6$y>z! zU%U7sMQu9+nS4f_L>p2%)Vm%e|!FA>UFv)exNIG%(*&_jqh;OxuIaL!wYu*!7H~ zrH>Fae!uNr>F1L!fZutf;7^UlgBKPDg;`z0_|Su1WJvyvW{Y9&MNVilX1cD*lsP^JdMcpkmXvD}&I@~$2kO2;B4L9G{ z81PGBi5KNq(Y@TX*KPTt!`3E})CUh)o;mXMs6`fBeCJy6E`rfy7SEBi0kFm`@0$!b zl8Tzth&rCA(#c_i6?d>L>4DCkss(IK{Fmrq(86!^o;v|9&dHtGz%G*PVG+h1xFoJC z(VIB{i6B{JN%}bjwjT&Z4l~rPB3Kd3ly#|L=sxP1SE4f~Yq2qSyKdR@7<;%N*E*-q z-w;9e$ka4l*2SMHR+!Y>`4Ev4&(#s{099T*7}<^J_|oj;Tt7(fLd;)W^evWAcTRf( zj(_hQ_E?_!{VI!LOqcC{VYOa#>W)QkCB3u}ZFu9Vg3jb4*_3#N1mf3gm)f=_H;=RH zb044?kW00WV-^RSCYA0uCqd<8Oat+4@PQuf4eRNow7t1(n~VKq6JB;x$Uhpxsx(xH z)Z&lumPFPq6olg-4qoe^ecv|I;hqVAjV*2Cd;T5+`Dh2NuiV zArI_miqCe_P$*eH=~_h84l=}zRt_g0HG!VyeNd-z2Au78$IdRN+NqDc)I3;%YRs88 z0B-y_&)ZR6AIb8o-hBPD8%ZF$0k+}Q*u3@FjC*YLX{NDdecN@Q<j!zJP$Kr_x6(J#l-NWL^n$Q0?4!;fZcnU2%u1pWXvi&hC$f)#*o#TXo74`uZ zLYqY=_wgT{3H%92OIj9iUJ}xz`m8;Ca2F~URR3^m%qZ@+&i5OB85ChpmgT2%utuSnd)?AOBfDYvgTh|40X}HNUqXPa=2h-3-3A;u@d`+6iR# z6%HuT<9Ug8whpJ)y+$(qYzc8}cVgn^lFiVFP9^+aG9yHNZ}>gf3Ax$$m$!eKHIq3y z2&rl1j3>skZ9kdcYAzNBY9{l0yE%Tt=(aFSbAsr&41}@MyocnT#4q%uDbBjC2X<@q z_!_%9Bx+1OqOkOSALVwpJp(<-A_bvm?B|AYs8TvUI-8Kr!2zWWH1IBb*xFph6`G$@ zE)_0Z-q?4$`yi0YzxTL-(h~6kI^JjZH#+*(`fRU@Zyky7Swxe4L-UT}LJ3qvaCRf3 zpx!T^TsiHmv7Q>B2p69_TT@_IiJStg4l)Y@&STd#2PO3QE|a67gB*{;S>**y6AA>I z%(VSAD|iFNTK}M5z{QoBikDUHAW>(t{aXow=I+o2j!&=`n}VZ6`<;sPubw;WF6>`YwX_1;8No7@83HH$z zqPIM$)GC*|cc8%7j&VWR$M|8irdw%z=W0)b-Vxc7@;o@^e4`F#=i~K2k_{P{bRKjj zkm?E8dRX`$TsEIISVh?$d1}=<)<_PSnpJ+M95@!#d!-TozP*ZTIaPUlzt<ojO_2 znVMoE96S)aUz-=Qzt>=|CE1`l;(Go-LnUCpuRF?P>D%m&k17&ORio$o-GZe180+vn zjI}4U{fvU`>EWQGGo2wxqtRxFJov&T(Z!9e#l*-FU>-=Ek%+HvTnlw?lm4QbQKSa9s6I8sJ@Fs^TGC&q~hwWE#676sQz1HGLQMghC^J zB-gp47@ci()xd1+p-t$zI#%6fquL#u&aeWX317S}A@_cs6V>90E~ z?3grn^g87ky`i%A4z1pHK@{lW7HLixD-c3gHQeQC*O zN9XG>=&~`Kya*pKiX0A4uq(k~xzy+)s^Mq;epFyyUixM~i>ATRAp2vF0m1lP?=(_N zG$tLDVdsWE>mUb<*!w#Eq*76`={Yql1VeMv?(=1h&cI0K2BPAS#k1a-sytV|BY|5H zX|u!oJx|>Gj(zj{iimuqTyC2jGEiagh=)BeJ|sfjG|F?-7*GmWQanHt#vPz(iZ&N} zcsL#JQ$Wr^48ymf^r_z}U!fbpc{H1)g{$6r9h2~IW>JKvB7k9hC^UBEO}xRE*Q2+q zyrd1y36-mg{(15zG5exA`luX>{jdH055CCkR|u}`(n@2O($?}cmzI!c5yi?1Ll16p z4RWCGg8d_Q4hagp1!?o7!K!Oa_@V>y@q|SPWvgn`=72 zN&g>rR4*7knS8vh@Wkvk`fqI^sje11(~PXs=$8Ti+F62wZ{G;*kfK zq=L?Lhmn%DJDSz zWiDc!_<-st(x|JM{DfGTI-aFZ)A!F1cAPs~5B-GW9$A{*bZKrU8$bgierobUF2ek! zwO8wsf%K|#dfnb&_&FrPg>?SxTCQ4B!Ikkq0`l|0bW>Ol=yrCc@|V@a>kC1G0Cu2f ziVyDAfx<5Hmk_nY{IIdwPg|IX5*fLwWAs4f(RMJFLV4>7p5q2xD}hEK$-bB zleo(^{LbEPP0nBJ8S0UZHX$n>Ned@W5Pa3Osa=1)K{A`u&1$*`=**4>PLW_?ndECtsw0UVV|rdN(L5BS7XUb79Nex(h`J6?D{eZsPQeZ*WAalPBLq(|{j#L;p?zXGIb#Mj=C z0g|ny24I6r(4J!XM?ESv2(6>ox*;3(fU_&Ofh?l6iCFxjr2V4U0p2&ulIVDXnM*~t zkC#`jL%(#wp~Z)diqj6<&e z2mC$Pb#R6r1HBJxN*EEZ%4$+Nv~N=1XAlIH?ep;0Zf=#-KK9)-It?Y;3kH`s@QhFl zMKLBDhl>7#s=YttHD8NB_9x6F4$?ZuLzsqGB=Z7#hB&NRItISKB$q#Zvk)& zsev4mk$6as>BD~YjO5JyB8-#(Jg_@I-ycaQlNd(sbvi9)J!0W}X~KNbviZgVt3(AJ z^R!fMFbS+dNthnCRnLB2TOLSkD2QhGwk>S73^@HhVdpU z?VB}23D7jz?boFxb@R7zk5x*y`Aj0Z6M6p%m_TzRaG-a7`-V7^Uxg?v(5ClPVr68x z(%=Wj{cCqaf*TJi3xM?Hhac^p#p4?hw(*E-y^~x~oS-PI4$c>{k1MBsug+i}6epj^P9Q=H31 z+7q0ePF_o6%20JRcLGmV>?|3T1g}Xr4pTIJ9mW~W!a>jo0^NbM9z9e&|C^0V!;vw| zInoETwO;SoWLU@rs$|$&mNkOT>p2=3cdoYExwEq|%Ps>dVT>FLLbnKl*KzMpvMbEn z>NStw8Bl!rzek09{^`bdW1#OrwGbQ~PMaC>g(axO9wAnRnCuGp??9S^zb14Wja4xR zRH*xhbV!+3C=nKa-P)Ma6^R!!W$^qHW{IDuzvO_DcIfmgcc2TG6ZG5c1S2ZuWF*Ah z*8fq(HA1{inC({CX@Ff!&I2u@g?}et*ZB0D4}M4gwq-^_}kw059#$XW8#(N z>0rTm$s-a9cE9O*p3_pmH(FCglhzV`htMRJf=Z=F8!8eM4IpxOpFJcZe`Mf@8DGDM zY@vBjcB#>X%kWG~KbjqB`>+O&T5h>AGf1)i)GFqReXfhNhf0|seQ{C3e7}Uhs2YVv zT8qjFHGLsRg>(*a#KZV9q^&cm3lI>_N*byyQ4xkYh@c1D z^XFwD&5#lK7r0EX=nT*YAy=*RS#2HM!#Sx4$_Q+iGW(f>kR`qsGxRy)CDbsG@wF+( zJOmCiOeQIK@ucr@tN$C~DPt%g#tlYcNvX=Ho&BDM7wzSDPoR(H-VR$&1c`de&n5*L zbIy4c8LvIu$k30F3-vrUE+`89Exr97nt`lW9xpZxRQ!TWY2B(;la1-KbyfFnqIR=n z{vJJU`o=J1V26rHvx}rgz9w3GbJ8pJ9JdOZ<;1GxUH>bx^<aCi(~R@x#t1WP&23DOl@W1D@8d@Z*SY(Rm4#wA|0^u z2G%@R_Q|TL?1NM+n=f(XWND+11vA8pT zS}MwPTGESGBuFH|OF4nvo^25?-oz_=)6CbCGvPk?@6}35Rhrn4QNBl{0mzSWgehQ) z3*e^msqF7>G7b^PZCD09CJL0b{u`(iJhr04TW926`nrO;>c7Px=9&U)B8JRvPn3jW z%f-&--zld=I~clVW9{o&T))EG%G;{W_#Q`t1DW5*K8BSO{DFxK(`9D(AsCr7<2DQAPjVVrl1+Sz1J(#^8 zgh&VYYj6wLWTj~Tofx{Get$4s>CiI#Wm)t%iK#Brhv;VgK~`1Qj*%TEiEbq>dDhoC z@DCc=7AlC!PmiAwlncW(KUS4Tc5eo6FG{R@2V+ETzJ6ttQFSVS#x7QZUD+s)d7>& zr$R@zrmB@AhEjR|P1dzj`H-(LJ~86U;T~e_Zfb%4&iE{z?%mE<2!*Eg)>_BTDE(V+ z_c*OT=yg;9U-l*=qDo>IB3rt$2f5Ism7){^$!FwUcs_0KZ?4UQVCHG=lt7lTK%Fh7{N-TH4eIeep0KjQLs%x5JG^X$ zRtWnZly`-QrcJZa*FkO1MZntTv|$xY8qUuhxLIUmjeAwg6BQT*#j(`n6U(#}Q~*hq zjx*2LU31nCk2y3c#$sbYx6hMI`NyB@7z5w8>ZJ%Dx1s>_wcN*o6W38mgY`a&PrI^C z->qjwZ4;7nsjn8n%eK=Eg2L8IWI-PS9XD>8A?`o|W_|w5wC3}Wtp`?H&JBhF{Lk)B zP+UF;i}zUcxGh!!=TE#B2j2)pbyiz?-@959At;B&?Q6PW#~Mi3ox_3g{7M<&>cmw~ zx3eK!Jk?KRMdzl2n4S+MzN#4{oGm4n-*`RM<-n(A@|ZI4-GT6X(84cZ@WyL-_G){c z$PxVwMj*|7;NDLLO)@qic3=@4e7@-1sl@*&^_9@$+QAN?pMs@AhFz(I^v>j-@91#9 z`ASQka+=htDVUKwmRu0tKwXaG!$aRKr;SYulbmXXLEs(83ni>ZaI`DG7rj5 zZe1UG7$6P}SB@6CK>D7HlA$Gb(#1ZLU}c5hY=xcUihx;?-(>PQ#+=T{nHSni2ng7h zS7{kgmO6JPpJ0p@ewEeY$7Q+YN)guf;L`rmBKw>h&Q=jzqj|ra}XV>q@RAJ#+a=1 z8`J2-T+LLNhPM1DPl{r^SHE|vmIwc4D+T7oKdr8$&6C_bKJKQ1+#aSmahlU>W#H&drPG0!QlNp3Pbi;H-Sm)5HF(P zs&sch6dK$@6891Gs21Y?SVsGTJmivJBm34C4;SD7>fx`$kAOoReWS)Yl{v=0?|$QI zIpX<8gX_YYKgjA|k+D5zy~C7?qJIoIDlf}lKdqHX@+^yDvSSaP`5l-M4gJ&BKhj6i zTHANUiXXK0=|6ZEOjLvxMp+?|&nAKoep>c^4`6RE(p~y=(jydrNrvxTuhn)7Oc6uHiUAoLq zlC@#y&vRxJO`Y~HZ+Ud@xz^MF9R|qei3R5eji`nNKlBz)T1W(Ni?p_5F^3*7wP;mXcTiZ;dL7S2nJ`=4gJ?Wq#fB^P<>ssz}w zopyv!X*nxD1_o{elEdauNy6^DS626Z{YO8qzhh~;VeVzXwl+|T>4nqJPp6T?e;{A9 z`!7Fi;-_DL)qVD!sT~FBvSsFHXTP{bowGNUmTR^9| zW_@TQj{Flg^6J=!i4BK_xp{$2o~4_ud;+Px#Y6jNp!b8^}J?5U1FgFB(kei zn%v=LE;{_UwFqC2vJr}n2;Wa7bP`ksX2|}(oZAZCq%7(Jhh(B|gvx1Y+R#Sfq0LnA zqSiB7@?L%-x^?t)F9>zL@)UnLL2B53Qr=NpH7W7<5k_8$8&aCgnO#3Df0770lR3H5 z7&`DRD&`kZ2Gq*UIN1odL~9183{lBOLO+VxOSQm5^qXR5&DHML5aa?(2! z`^owq%t=WIwXiKc$JZ5Nn!L^bv%OX~S7hDx6jn%9UM7HZ6C5M*O86Mdaro}x)A%9+ zA2Z@l9T>Vd@pI|GNrtwKoehn6GSAj=j8|IP*ndMYl(V^Gn)gMDj%yfBGcUc39-R>z z;Y(-{_}%rSL*f&D$4z53WCvS;eE@9otgsOoIoz0m9E&S435QIfA~F^@--xpx45#>7 zm(KC>qkih)S4U$jgtcpZWRqygX+Oy>pwkOixZPq~kf4#Xs3{drS~FaxLL?oE#YrQJ zZ8>clnM`N5&*EJGSQ7v?SBvW^SVg)~ex!}-y=i|Cp>=gAFeDvQ1O;b zYJ9@31AeG{UFB;NruD|2!R;0P1Zl!|D3sp{% zSyFiqw#@%>{wnK(9Bb>M36lqEO-WQ}#08Z933+um4Zc4x+o!g|{Qt86$Yp!EAA*b$ zl<+B42Hm6a9G;4KVxH{Dl1WBZBAcCc4j_Qvi)8I+(~ej3ar=tE=4tzoQ3-Gn41Kva zU#Hmo(2KeHV0zg_RfSJ5Dz=HNSc){u&u?rk9WH1l&2A&+DNiW`4NzhT?=bjgxS=DB zpD=2AUGo@Yez6q7Q<#bn+ni>_1|og~huG{90{#u;S+s7Ib%1M)dz;Nu1;=NM#$Sj} z(2Y-28357>Z}~qT?72#-L!!(g@;*aZJaXkvM65PlYdL*Ta|56V%$B29^;NlwqIIoi zZbutjSZEf&$o-Q&n%iFQ9SZ9I{1524u#%QlsCP5(s8~q)-F}6PmPLEjeiQlUcZOvx z@?^ROP@jD7KU)!PWpi4Ysf}cTD)=RBw*e%%H@;zk^43-Cly}*r)Pf{ z0ISU80U*l&1bFfjvx`(O8b6&_9TT^Xps{maS3-?4+215T;htPzmsxrz{_US6R$c+` z*9VLA;5*YO6WgS6O@rBRkI3LmfH~cdl>CmA&IO2fwM+OOr9Xfofv@FvvRa3Ve~^v8 z4NUbU5Ws@75A{QQn+p34^8=#UTsn)(6T5u=AaC^<60&A9(Lc#{zdWqze0|PNnvZ?k zC2!b5XfqCGgjq910vt|=BF6^dl|)4@3xkNNhIv|^`i$HZXa1Xh;)Qy;vb*m)v~^!W znOB*J;KLrGOYn-0r}E&bZh=mdU!_Q2fAnL(TJuMi`AYyle-=?7_A-Jpws;ywaKUfD zC1FcrWGt-T3Cjh$N9#YC-!wqW%~Ks)_f{UaZbFFzkW#sCaApYiOe?44K=A=)IRE|F z?D!A;c&HwSpf=GH@}n_lznu{ZasRiS$}4Mrg}uUbiA+z#z8w}I{6H{fTBaEg5FKA7 zsin=x)DGQx3uA7Cn**blsfZ!Y%*7_5lLd1jF^(VcRoCoizhLlp<8fCoyHeu;4)~a^+CR5|^@O`m^bmaJZo$)0L1rv>~RA|dI z-q`wBPD%Cb!C4ZZJl|jZN5n*2qL!<;e^OJ@1SWKQqo}5s5958?u7Y&B|DDVyLbXy; z3=J|(ruoniL$FFJL`B=onaxybc#)m9A%z8D+f&$u!#foL@uO3!bfI~G<6{XOo(_$? zYGy{~@;BlcmRN8e%F>~utZJ_)hgQZTl-i#NNSa<&#NS1`qxJHJ3Y90&{)xqA>*)ct zVh>-%sfTAk9XYfJzjKvwo~dQ=((G?s^E25A?>L;U z8Walc%OIT^@@FYsek_H>nQXsP*Y+YL28iT!3{nVsjxWm#Q+e-AgAQu{VNNTMZHO~r zL|Y}(?m5Q+la)>5KgPzK;@kB*svb&3XBNLva za?jOz`UXT^3g}V1B;j8p4iZL>Bxa)1J>RVtifEFsB_T!8Mp~}XnnkceO;LGvVkf#W zG|Qz~Ie+srf5-P&X=%0p#641FdcMz|E_qNMdH|-3u zny0MYb!y$`0%^D-E%WyU#^B(@=fJ6mTlA2rQvwfShF_%aWx&s{{uC6VK-RnzHL$vI zCO`P)dz*iT>R&>lPhIXLrAEcIa~ovW$FV<5vh`loaXr7HrV0yraIV-j*PX-^JQFjV zLS157X8EWZ=*j?f=X&400?s$Z_MA#>=8-{p=NGDNE!C)Dcu}kRg@q~|llHU7%;`-q zu{&1z_7>I65dY7)3Z2=)t)?es5=CclG|z%asf%AMvfKw=4en|;$|(bsS)!+-uGlf+ z8x$+-);@ADjFWhAXsTzNfxz}HB|0PdNCmA?+FxJi#ve1X|ER?DL^!S z|6<2Tg0QjdbFAzOTfceY2mCduC*!3RX*CXtuZxqpC6nljO^TKg7i|tC{YDdTW#J#T z*SZO2keh@SAH05XChn?GNJEO#YNyI2?ZYDA5rGD-cQbe}%r2mPmP_EUx4o0Tttub}Vp&D*BK2oS(x#4rG zR+#w2UZ^WNP#nNrurb42npm_MSJI|uYTZW!iH1w$ottG{NDUsjc2(&%#jLDy04)rJ zG&J+zjF#!tL+Jb<2#E})xf8@u3k!60j)h0013$n7swo_=ax_wzjDz6>*fvkb2DgQkKK7o)Ca-|rk@u4N&6jz|>*OqWh znMC?TT19N<6%(dltrV!o#pIua!bI%N_)91BSwQ7!AV*G}JjWf5&v5#-vr8$}hI_!! zdiv;{X&6g@PRH_yt&oV!qR_>Q5RbJ)V&P8r1qM)VK7#cwsXR$hwdOX zkE(*P;DtRTxfUG$^?+~du*l7QBV9Qe6{UV4y7YWs^SE>w`(`|Uv((KVr$##YvyJiG za@Ll|M5w$)5-CR=g;TVC*4LF_eKmQdNo2Tq#5%TBA}pE&va zNm|- zKb8QbDl)cLuQh|P!@I?3^;5srJxD>zc)LowMvX=sb>9y(pc4)IgwD7=FvZPJ4Ph<3 z0+3?L2Dq{U{649;+qg8(%N0JeF)?ph@V#OtEVcE=g7e>7f7eH<^XksaeisK>=9^2z zB&5;Yr{pgwt>kx;*1){%(?XCJB@6JE8l>_zN}mOgNBH=k$ez z1rBw$*^M`1o9iMW*F;P<^?^c<^CS7r+%#Tbo#psIl{gMySaMK6+tsI*j#_P|mn^tW zeVeukPUmY$KSfqoDFd7N#1nU?Ej$Z z?`+x-HrvO)K4$ZF+FJJY*-wv2^}BEFVk?we4|)H3pDYA|1o)peZsiA$1anzz z;8VI#PuPDn-~MtZ#?Y$%8%zF}?5gJ^#42 z;QzWZ{awHfzw;+hwLF*ebZ@&bcdTitUla1p9S|4)uhAP6QTy%u<@IlG(=8yC?nXJT zqzSes?A&T1*<_{%H6+hkr;dDSZO4M_GX|8Yw44mClgj*0F(^y2S|#%1=5D9_`T7Z{ z778D6M;_c=XFE-fwV7Fgq}zkHszn3zS(4ezT)lTVhnKFJG(F}M5(!;O*L3=1& zSl@Cb@|)o`o6Q6_HdJcGpC%L&`V}~mk^Dq+{R~uKMaa1jsXd7o zgw-tWU~(%3^R<*`WVA`>;dj-4*Lv@~KT-YU>DfM7+`4IMT4ver@ZdzXlM_=DQc^dV z+583YFz4y@b;bO-2^Y^vK{JoIM#@~Lh=?zPQ&{l`D#1Fy!<4Zv~Avvhzw{WA%mQ^|7*6J>e4&dyHT zvSmwDTN0dmV^dsA2YJNi;v<8n@_y9GiGGH;t0^v(09H=@9L{DV~L>_5y zm95eWR9ygaZyf1T+ER#)(ikCwKcD*D*S+64zPb{27n;O>D708@bm` zH4J8hKTrO8>c=*4BaoNyyI0%S81JZaj$O{*Z`7(z+WpnW^C0zQFsA29f zoH`mAQ3jQ4uG>i$C?`CHsk~Ymy}Yz2e&i8{mJ=Ts;}9*q2&D%U9_8RMUg%1CQ5PJS z>ME|X^ut%Bm2kLJUvfGS$x@Do~KWrKA%7F(5coDKR*%LwQE=Q`Cql+7NaNo6P7eaI>v`A z^`sMhI!DR`2+eQOUv9hCHjTe$8%l3o)vp3%L#+mE>7BHHeD@LC^VWp@mwmlU+I;;B59#t13L*#3kQCwPS5c&z|{Px~=SFwie;vEqCK|hE2LJNF9-s7u3t}G){(|siFWFUg znxRV`p57;VsQ|N{346M|Gdv0}C0%HN z_=3a}@ig8%c_sZy{4~x~Z$4Tb3GoOQBy9BXqmP}=xSzfC(3(@WF8lFM?VkP_r{6f! zX)pV)e_Q?Ae>wmX(f=Q;FJm-6U*4j(>jpa1;lv-kh#r*=)_ zs0E$ggLElvnfe~PPwkSn=G$OabY6BmjXZM zUkcp6amarEwE_G3fnFP)DEI+FJe8I=%xTbPaMF@LHijQ*c&Vp+;KlkWobm)$*{Xa6 zRfZ~8=-37$u7O{$=%3?G`*J@^{)0`!_Jy^t+1-6_dsIFw*YFixUb)b!Sn@wp?6pUD z-#>kWHTdVL9lqHQo5^di7nGf4+h|MKDzzQ=hv$xe0u+6Z4uezlnT!h#8+u%`16Y}T z$**ebE_?Hm5C*0)bx(1Fq! zs6!B*LOKO~|4&DPQ)inIRbH4xY}~lfHf-3Sj;6|x3s)l#Dg%X%Ja8O3;4>XxMhgd$ z-}B|;ZMMz-l6SoAI{QKK)Ar!>*L?W*RUh5pDu-GPxTa^?{=r?x?fy+8_O*Te_Kfd2 z8TFm=T|V)o&SO^wR|Y9?VEPIm4p=G&@u2fOQ_C>KB?m6APA1aoXi`W=!}8+B)-k)W*O&im_~{=%{^7U3&-rhE zo04z;=?KyeA$AVnI5z*0W}Yw>20NdP!)vQ(V5 zPxZfRpY@gqse=xbzrW(6^C8cbmbkLW*qW#26Z3SPp zk_>u=#|eOrW}5&@eSLjYcy(@qnGId%JWYBpCs&sf0E|xM1YWFD9P`DO%0&a^6c@DQ zl1VS>NG4tk6LHC<50qRoLGh!m@VR6$PU%zB%jASgU_7bm3DHod9;0k2JSc8F2nTGSUs4&naBg zqhsale?I@qlSkcJ;M@bdMyLD22UngV4GtejhZ!L_-XFy5rPAHDYW%3}EIr}9eEK?o z@{mk8kTQf1RCxk%f=U}UGVPK@FNfV?v)#}?@X02zGwNaxwgd70q=u3Pf6I%F`xtnRz~ zJS}@(POvT~0IHmVGi7n!t|=cn>WI#RL?T_qqll#+bbb=S%3O3HF#$*lYiMkP@RNmAUq(4os5i(R7?gs^Eu^t%a$$1R{)p7kxrFC zdVl4Ybdv8%4mlky@i6G~X<*mnkX=)JZDl_|j?uE$0)CvZKfKzF1C#datB%{xkDRo} z5B1vjk9PSdsaWLFtb~gOMjo`h$`2TQnxw4UD7zW2dI^+g@Sk$} z&h8`jvm4*A4edj&zx40>dFr3=r~aqM_u6;e&u;Xaecvy;Ug-;COW=!XqtSTwXlS^G~3r{2-NUy`$OD zTkdRhuZxEM)bjqhPJ8}TyFW#g2X#6Ebq<2$RUSDw4xFX?;o;#7S9&BD9buk~ymI_6 zD*!S67;Y(W(!#x?Q~Kb8lODOCTlSCd($b>pF|}(>qStXSSU2y4hw=`b6Mchx+V;kv1Fk^Yoj2BG8t-=bp~& zkL^`Yu{~viho|y`29KU3K+92Pa(Qi&JvbA-33s4*)c%`|@7n#V_WQ(Td7k=7*?Uu) z>|3LE**m4pKDak!M|EqUkAr>0Wg9`+MYaLTUb0oR5i%S+w@+p)czgo5d-v{{5-a!d zt}|=EEY#(BshbJFV$2sSam43}t6IGn$6~_7@ZfoIB90`MbiPk5vE^X6-~%vkbQ36CD>@h2KT9K<(a(YRv=FdvRxMn^}p_oC>g zE{~V$K$BPQy?OKIJn@q9NTbSQJ{-BcI!C3Q&J=fHSx(ux(pvjo>*wspCiybJ_e!jM z88BygW~&0zjoIsg9e$Y5_JIle;*-29H+(0$73<#_7%`cv$&Cq{3vr>1t= zq`&KL=UuQ}zC+z+jZfMn!fxa^VI2O1}Nw2%0iLbzZz*Q<-cpJZRr6M#@I zE9f#?Aa)?SwRphP)5)l#5e|&20Oiid&l2a`|NgVy(CDZX`^7=xIyK&C-#OUlo$c)I zUpfhO7V04KXmt*}|L4iePX@~pB)(uwWgZVX`P{N)OSTFS^)CgUmqzg@Lv@l$8}^#p zP1!NK&K@g$!5*6Y1Mh&YzMlroZJ&H;HW8Sa>~{F6vv;i@wYxS9+wsw6d*gJMJ$t;% z9{1IOgMOw!o4+Dp^I%gWs{ym`{Z(%%ztrolv24XtTP=DbCVlYV;Q!qCxoZyCy@QAR zb4H%}mv$K8UH`Oim3)5eCVOmrj~%tOzUtBFn+zMz5Bd!7^3=hIE8l9%$l!@jp1}o$ z%NC-s2fP`6_6h)=Pc*V#2s^o~Mm-WSFTGpZl3V)p*X+# z^pa`tmp+gIQM&w0WKZv~ZSdoNYkKy-FaJMzw9igVa5U&_XFy}815hU*sE%N!Gsxtm zlNA6QeC0uTs|M0Z@fv~i|22tNOgz=xYd#&_H$vfgVPz9+gdVhPCrJL-0{Cumr#)5t zl-)D^_3ZONU-QU|a)p;;0a{YloP0vCrlV+Uy3X1?>xS%0+gj}9lb!Z$|9$oA=eq6G zgl`b^!MTH{WZ&STG63RKUO+j?Xoqr?Ed2_I5wfoWSf|Oc&SbNe=PR0-Q&-8jduU^U$TJgi^?mLfQ6Q2wld%w z2mOKA)^|<0KWh(NbJh-xG}~jodGOie-S(pY)8f>$e?{PnGkis$`U=D`I0{ei&nvev zf7idOZ`6MA`a^ctnlsk496S7dvN2NVu%}11+oOJ>-$-Mxr`>n)&wK?zn&Y5P{lcrR zAqS7I0icyvaC!0$9_=EY>>>LIdi~Be0BWN2tH1iIrCz`B|M#EvJ=!ciXa zsGIUd1LZ;?pKln_Lq~XCm?&3#c`(MI`w2!FVN<^1OYa}U5k|E1fsq&SR0lf7p){m= zQAhCsaS^6CbR6{2*Pt)HXz8*9+3#nG-@~8(YWVFxKmK{gcUZr2rrnn`%bkQehq)km z$E)+;=w3XX4ld7TnP83!s|XDK90EkX7Zb-E(Jx5Ey;W|)l^&%{G!bJ5_=3XebaArF zY@BWOs!sw6{*?NFpAq0&2D1r4ro3`lkOgRQGtDjwx2b#DzP$5<{nQPo?CrB1_H1^( zK)1a+((Y4eFAE04nNNi`}Hf{gi^{4Dp*Pis>ZBKd|UAlMuOh@`G&hRcfP+a2!e{=RjF8#qzgMHp40AA{;kMMx<+tOA z39@=~bu|H?U}X5Y3>|gA35OG3P;o>$>ZbRLdf?KHaYtT^U;H#&s*}o<28GwXL<^?z zL|V9DyhkNmx-Y6(@~930oX$gb2Buy%;QW8mnL34y{5&3V!Ve4#*s4{lqWUGnNvFy&;z|&9ig^}| z&2VWx#aDR#7W}&1VWo*i`^fa4I_ZPV%GRXw=2v?%-o1Lnb`6Z!Pi{SJKlFP3 zSMT=tCxz{H%vTBgl-z93OT5q6bc6M@7VQ%oM(l5FKWR7iPq>&pI!m`gqvie&#s}?N zXLj22r?!>_#JdZ~mgfA}|NPPt2ap=HHJu=l@!N?OHW$^0F z)zt(*9noAymJS6Y9Q}w_6F!DX<5KuEPU#6sFUA#dg|7sw(UlJOlv8}7^PqI{(kgxF zKub@&l+Fty9=dUm5Fbc>s5BEFC~q+4xx z=?NP5M5VD#yrA8BxTmc^%iO>%4JIos~1|MAIDE!`Ww z^v{of+Gc+IqfP`^$?M5My1f6769Au(!9@)~s2RrDZ<-<&={r$^s``P&`5Okm0dkbSlr3=l_k(z7BZX z_WC>OX8ZW`A6fg#Bp{lprg+f@cUsZ9?xOv~4P*AHE&f`~X`Z@q$d}4B`hh_cezw7j zr`OsaAKq&3PxM=}@0)4&ujzaX&iT3%>riZmYNx7SqBZb~55y^+6h>L57%nkvU}tef zy58|CY675+r7SpB^!VmKcK`bcoZdOrW&*%d$a{X~ z`g13`J>J;?OC5@N;(uoun^_`Cf!Kg_4({|=a)G^!3on6^P=dAzy!WK?lR9G>Vr76Mv>eoV<%O#h=Uid(;z@b2BaO0!#JdpPc#jlcOgzu9^fV7$$t%q#PoB(lpyzUx z>J$0Jb$54P76$;$l?Tbl3+00oj@{rzn!Le}u96+#xBJ%s2W*EuVqdn8PX4K_GL8*i z`GHWhUp?UzJ=NrmGadG|_tw~xCkJfA&++eS^$oUjoSQ>ki1kFYU^O;SctM3(NE`}t zCBnL$0K`s)!W2y*MLaFEJeev7GCA=?E1Y1;Pw7-oa-i;$cMs_)e5xxNy)=9bE4ku{ zGKG^&G&#e;5C8Gc&3yac?4OC%=<`3G{zv?s z=W~8=ia)FR09BsMGf>66LCeFhG?3{BKrw8@$#*qw>(;H=20(PN!R6>;x`amvPTs{! zacqc8PZFBLJl}UgMRVOfOQogb9{j=@%@cwT5qjv{w z)Cc|!f5+eEe>U_Ql9jjWiOOHu6F<_@iL!{Nx>^4*Q{Pk%^Yj(2TBx>Ni@2)2=Thj^ z%>+P(7Q`6B1uOBQ;Zz9(kwsj(F;4MPC>>yoBl6QQqNBcef(kDhsC$4btn@?+qJxuM zu*{w1ODBelc&aa%;u9V9kVU?9fzfM_2hQzF*3md^A6esn{;Sd8pQYEI{@*#-&GnGo_r%d~)o-_y77{J|~LHf<-=5uEO*3rU9OOVON~O zffEML-Um7HpgVkDz?p_?>>G_=wA&}w+MdD_K2`IHVvRR}>fS4`HWu)v;stGXbhy#} zz?T0 zyiQmA6QIJ>1FWkFfC?cstO~D^JnBnF5Lv{ft2jkRy*&Lq9${iU5wE15cR%qIMo@gg zN_@#H!5A*$mGs4rx+xxM1_06Ea^fSyL(7Yv@b~|B_non|?c?6@*UquY>FHx#Hs-K* z=Epw_SUAclF8}MU@Z~ijfMx?A9$YTs;>`ugFFXGS2L~^RXRa`pQbztrGcMwhmJKAw zW|Xh&oCWraY%My5^D`Q4s-e%Guus|P$yIh|@jKR??F%R$wxlpC@X}i#Yd+qDj+||@ zufN@DUwO5|j*PYWdwxH+ztsnRKW&pbqqd#4f63;PlT*S{Z(^gie-jBsFV_~5BW zhs|SUU$h@xcifLUb-kINp`__rD9t!MG}&m69O$)n-~B{`)_@L7@yL^IyeBIFJjLqC zJ+Fhv<^hOJZP@C%fJE@=Yg{&`;*sO?9bk4wKsfoZKv<6Y4In1zBlj(=JRzx z8$+oF!f8LM8}Jz1qdfKz$f*~C;K)^91mUF)87}I8t3HCOPRFnc2XCfcpZ^(9)T=lA zikJY@o6)bd^yW2~m`BM4k%5aA4y4hF&i*{sHfGm%`Hz2U=;#7o@pu1+{p7z^@1)cL z(CN?-;NhiSe3Bv=I41yJtRvr?{@2mbk;Q$n@hw+)?4WW??K5C4{`|fBZeOfAq~}KXSOy4;(7_34Z=s$7g4J zvP<1od23)7FVgVj(U(kN)i$B26VSp52QPK-kjW7y)>q`}Z=@q$3X#K;i}8q8Z*XM- zP;Vtx2kA{46iHTNk!&uQbpqbVr>07F)4-6e_T~Rljh_B9^ZCZ4NBu`B-i@5^NNCvd z8tB#Gh!2!Z#Xvsd20-Og@@gO*-SF_RZP~Kr{06{k!d;F!*a#csL2O6aA{UNcbdd%Z zEy%urDeJYz8$NA^rmpqB2|i*2{)5<+)qrTl<;QoeDcR?Dc-i{%{>vvz*6RP)Xz;R9 z8LGTBU<2a-4=x@M{YWF%DuHA`oa%;PntSQNr|zl#p)Y){2?RQdJL2hm>XEM72>=BV zoeC3PEUZX_#{yIwQ9s2~oxC^{Cdw2JUUbrxTr@fgy-EWl`AZK z;Yx>efw;(rj*Un%pgR3L2ru;DlgClBZ~u#Se5BQ0I@#gN%H>0Q z=pe8SUN|t~k_$>UIXRiV|A$tdvBg3ho!f~MCv3xp4VTpkfYs&!o8XjxXmIf*gO;5r za}5CEAy*wC4164X>IAUteeiJ6JB>Hn@x~2y+w|kMyZA#Ndb}>JY!J+BwwxEv4p`*} zIQ;s9CHvVu)Asd!CHuF}HruiBMr)%)czx&Pt%02~q-RbvM|`TIzx7+cm2C=ioeKx17~nF*FSOKUn7}kiD$Kd~ z=)}SjEvT^Qz{AVUhb!Jndc=cFdZJ_eQ6_$bG499*SKJZ8k9mplM?4KfI9$qymWz1Q z1=l^nY0MF3gkKb1P#t{Kj~xMe_-T*sy7mdXb>Ng)El(x$frIan5BTywKSCi7@-$|7 z*-bLh0Cgym)e|J2D(8rk2hp;HAo->IW5+Cg@zKrm ztOkrUthMho{_5Fw z%r*la7;o@3n+9w1a*Su+R{y~yKsa>^9Ec-sXdq7a z&xo9h?n@Z(nRq|+6@c_|qPT2XbvFUPk}3pQRfeZv-f%1J85uKEh-87)Elz zN_vEmOu8|ih)XVg$wUjn2S+~-&zLip7zUQ^5q0LnV;m8W@re(Vr}5(=T}iL#yZ>+L zKV{u5{_TH_mj7w)Q&ax!|A{UeFZ$0$!tQ@M2icD_g3CkWQaL<2F*X76?w-6v9pu$G z!mnSyKKl(YHd4n_P1ws>2V2M{v7AYBw3BdP%zNag`9xOs{z{;s)%G>sV#lY}*j>}# zvl~h;`R9Tws{yIamV++(_6>TWtv(U>Uw?GcKEJbIzxPs`ePe%vjZe|W%Ab6y{Pe`1 zrcGs^)*EQNCK7DCjkE@Pc*4;ISK9*DBtSg$xu@zMP-!G>;!6*n?(2O(TpFmWm4LdM z0AO$#K0{_M;zwRJ_qFlk(=%olibjeAR}Po?sehHFOM{;?U94;Glu> zbOLy2o&X9CTm0MqkFMpqw8XQ0Nv4CjCmA}EffwOw!lfQI79=5 zH~PSG&NkY^zCm!?)ONe8_^1uqVGqKKfg08!C1M3uv;e*IOjm8UZYO+d9PO~t$%1u;Hl&DDmZB;D*muBJ{fKj3VT(T>kPmBxrJ6TGe_0GEl)R+2Ge0UA}FgD)TD;wfCDBR=K* z{_TBdZG9)3|6&XmiTg^zi|qa%YqjonJwcY+Esa)Mh`W>*1GNz9s=`)0!ZtPN4%XIdOxFulu8;dX++# zQL(du-|yXU^ytwKO#)ng*{=rFu6I=lE&-%)D1hiFq?8xs;F1H;k5067Qd#83dnsJh z7p^d=e&k18#TDfdmu`$tJYeL{6;~PtI`2O46pzA4Pcp$6N7SVe5r^UtotUL!F0|z6Y$Mf{js}xtNFTJ_Kq&hJjX?!W2#+%aUE51r$mH#MLngkVx zXmo{37Q=%_zI0Qa$OjiqSkdA|S`7zYicd|KY)9X)FaM8u9J38Bz4wA?|Mvg!BYigH z8_Wa}A8?## zaLL7soiDN&1|8`EB_kgGEI4hQ_EN*Gwts4a-D^+Vj;5Ea*}49#h{}pvW(#C10zQ9R z)lsxx+H=kxx^~q5cweu5{evDmHQsJrUL7by^$i;6q2s%KJ?RS~m#6JUTso>d$TaW^ zSDQyiZ4sP0rTVA3=Cq5-@A;Vw_=5nAU4xWxbpRP(b#$4{J?HJ}t_4saa>4~=VA0YO zM4rl0TDp-Bp2i*Jgb^*Mcyv#N7eDGnTyjCl6p#36eBw)Av|zRTc%K+XeDUUj$f8$6 zga@7nY2*c8qi<`PvO5P)`FGyvs{JSzi-SDjQl@Jm!5tOZij2I8f71Xu}^kZLi#S%&rEAPhS&pO$vZ9PT>)1Qb4^^9mF)M zpU%%#09>!Z>s;fxbLUivsN{GmeTqBFE~~Eu7TP%`+@Yw#CO^m*v|tC}b5j=_`OVXHmG zJ1!FUr~miPb@}<^9oFiz0X5+1{LD-*>g zsw?C$&qk6<2CZ;Fb;dv(9lUtRRgU5T)v=dKQ(mu{?Cs)Kdv9Wm?P++!?rnX}2AfZK zW%ga;S&S=}<+gy2(>_`@+O~ml`yX$gw9jlAvj6z{pgnb>+s=)db+=J6vx7NxLIXRH z@}(W&g~OK)d~mHEpreU{RtD4#sW0G~)N?O9VTc2{>K1(0ZE$|$%tpX+r%^VbX1kgQ z2&z7Nb-nbj1L|f15Gy5yr?FS#(3Ok0c=N$(?p2M>eD{g+#iTQapAWAl{<-p$7hXKz zTwaY4C{M$}v;2Smx|7z^GF7v0|EVQKpG-V+ywgtm@_)bY{--f(U=U7yQsd6U;farZ zN&C>yP?lHt(WP{hr8v6l)~(C#oyx96TDDPrQ6AyLi!kb{)5Y#MWO(?gBOb~%LX~$5 z{XwZ{Q>Au$a&nKoHo4JmYktG-?|jjJKkToa{I$SrkCDc_LNApCu(>Avy9X!iU*3Pn zo;liSf3UCLo;=ZOty9hZs%*B;(11+8p@AJd9oW^kXrKoYmU^T*qJD__qI#mb1C5sq zI3p{0+}YDSD**mFP!*91s=+?XR*ucG&4K6i(rBHGjo@7N|5A@T% z?cUWF|6?8Em-8{g|NPfvj~(u|j+sCIA)_qh)yRS33C_k-)>l~4%^^S+djZ|EaoBdQ8uu>-hV2jD8nAapJF|ZbwEM4x8T1+4HF(pO z*h>RXlLKVJH4y;DNrGri27ro_dPltQaPURDtN}i+oE&dt5)ka7ssp5|;e=Z`ItocV!901?Lk^9LVN#t;VdfI`B0u5^A9clxdU<%%Q~1cs3zNrF zSY!$xd6AzN9$u;+^@tNEh%UHj;dykF(U=qu{0ZL_bo;;=+t@jh@oRZ``)r%N$@0I~ zcG62D7UVwQ@}dPJAD$ei_l=H@o?j{ye<6^#*+{r?sppL+ipq_NlZt;uz^?^wUx+_v97*8hfW={TM(OV{cYN~LcFR%e0oM!`nw^QZpL z-f+h5+c0c@^!9-L^#}cSWURxwy#HvP8LTzvQ#Tlt^|VhP6LAgfKn?WB2`3-JD?Wuo z1`p>jTLEwxdjOjJ6+qlET<+YwYe{k&2YF-}oz~YR%#xCIHvzyJDuiemco;HIhF&F^ z^i>Ek9`Oh-J~%Fhi?S3iYtLRKSNK`UY@Cq?t}v0GhOd;r7(R_>t~iwURA;U@q)USV zmlv&u6d{clnhk*W4W6~0)(NL;SuKn9%>%t|hS{fk&Em!EH*+YYG*~X4x zm-1v0z)3~kWA82HkPg~B`5??EI0yO3*OX(=fOJbfp^3wQ-Bl4nd8b7jBH_{PL!-`JhfUj_Z(v48* zssv+L=|odd>I)+vLA}=ov$pup#@goGM@!-^mfcSzR{{27SWdkSQ*3O$d;&%HWFp+8Zv(T(@-kdeSY+Bqj$W; z+5c-?lzDjipZ4DfKkYk-M+z<0=P!F{ybSn)ngB!?2l^COf=IXi0U+LDARS0gPfs=p zz($L$TZ_5(a)%**(M4LgAbPRhKqHe!R>@PpkO9#bE+}55@bGmXUsE(z1YSDRV=te& z-frq%WnZ}NnBBhStZx+betl&{fTCG;M@{k%Ijqg+VV}L>v^}t4$i929$A0h4)pl&W z&G-5g{0xB$KLeypW8H}54_^}j^x{eYvPdhlu9v+6a5)2Zv%|Oo055t?0!X@WwuLBfLpynXjXsPp6W+62IE?Rik&Y_aOXS4tbuB9cz?NdxzWKGHG|L zI_=?V`($-&q}g6P=Tq4d&wK;r~ke6XMLgM^+s)oah4Y_|v2oUxzTdctn><>+Rw zTV5Sj+$FF8rBw1s{y=-tzHq}?yKCKu{eSyb*uQ@Vd+Gu049IIc>OxvK zpygFp;@}TYb%uuqWUK%a#G!+hdS*?)}6Co*m2Uf_VELoEV(O}OJD)*%h=RCZNGloG5dsX6#T=t z`t7?%`+VZ&t2kaCT9eNPH5s7%}XfGVv9!V9F;Br6-0@<3>kuAgknJT}Sa4_po7814|byYu7NM2MwDnZp3Y{@1(*m>7JJtY+qV8u`{?0e`wy=T`uPFA3g|;^o4*=R zIRjPJs#mIi(h)5PpTQsJyaxIOkAp!PCSKKmWZ(qL)a+Fg0acw!Fzb_MgVi3Zy9oe= zLFcJLi5)Mz=%goJs+;Pg7vooW@nU$%2orH=oZ=RYVZ|$J&fYW9!YjcTM~pkwSK0)l zT;bBVB8`3;7P)jHu7;y~AcH3zLFtW8m26wrs9o3XpITj5bc$k8kmu>cqb>IQsjh4S zz(7qN@EXh&v1}kZg_0}n&SyNOY;$F;ezBB98aA{Y4HVBZ=mVC zp(7Nor+iHSfZ{P35FYu$bq_(}-|De@LHh5N4AHqJ!dx$j@noK5TU>LV8D+R_MdL~AwsG@^b5jcd8-~F6CYe2-pne1 z4g+HxWfdT;3Hh_gvXQCqnjjEPlYp}H!?gG{g>^FlknzbqxLm}=1E&0xj=I97lfu0C z(lC|i`S`VvE4{?E5L~(pM#2S^t{A6ef;0qhe2R+(R`MRw_V%6icX;EjQ^Tt0s|nvd z*li)g20C+9`N1kMwBp{Omm*?|81`<6DNM|7so3ZrR-rk<2XCYxPS6$T$ zrB8GUk;9wI(+T6KI~s&zJra+BTRQOM#n-?Ne=c0%6c=#HKTl=g_y4}xZ3E}*lN(Oh zo>k{;O{c&9@!jYv1AkUTm*piZ8y_atbWYpfx#g&RbkjLMO>oe@>wg60wLqJ1-q6NB z%3gI#cv?3l2ddrAOeXm)pk4vY4ou|%e6|CrY$d|rH6Z}v;Av8@WUm5h*z0DAUb)nv z1*q&7&c+Ba++>Gqd$jn+0Zh%q2C z&}(ofy*Sap)Txt5`3s?mqr1C1n*eZ+)P@U*>vGVI>CeMc9(4i-A0O+8a3CIANk_Ji zP&flTcpUsir!eXw!nJ?P=uClxOS{>yO!9Kc%wW51gS}F8UMZimML` zFcE0*eH*)1kJ)eZAF_}5vBJOi=AgYb(q-K)Y@MlNs$Ux1Rrey44iHa&GV>FlHn&E6 z+NaY{$1z{$ssaD}VDDiGBihk&f8_V{uA;U_2Cqy2GV|8|g$kKBSY2$+h!>X!;mPMU zl*mi*Y5(?rr+@putN*Nbyfy4l{ptU$6J7S!aJ#km+5dS@`*~0Q*bc8%0MRKVzr(}B z=O+))=q%J>56%GK6hPvrSC^(;bPCBIdB!1&9zJvmH7LVRanV5eyn&yv@HOD08)=1s zKjnI3{>ZD z?XTV+u&=)BuLVZitYhYD0qOwt1+Ucs(ZE<0{h?B{I;~BBbOx1trR=H$0BS-I zbu&5rjNivW?Ir-5E}i+}T8up^#W@$BG}0J!KXg+k z9uOZJ(RtiI+39mXDq4+#V@EX8nE#7zdw?>&$XC^qqo)a+WOJ6W{tnf0L zKFaUspf;0$x|{&a7~w-5HiaaY>L5#b(gjK$dFabUdBl-NI);h3;+YS|xMJLM#g&H9 zJu2~IywZ(O_aeM>g+n7(BLPPieQZQ2KkK+X+Mebq|M}0^EdE+uD6XN2X8YcuuJb?s zA$|C~fxjA=bYdFWyeEfzF^&m9TU%Q;0l;3Quby1252Rak3MGs6K)C8qtS{6L~~ zKRD8t7yU1EHGCCTZ5pmdJ+DgHXnV7tCit)J|G>`<7__gxx5|dc+pVMJ!Y6&zQS798 zD;QP)+MLHLfY|}4e2dh)$oX^#7Ym&PS|l;wqw@)!pVLJmG& zjRY9IWGQddpSV8m-~JE!=D%7W{`2m+HsAfDQoUp8WpW!8=pPj(Vi-hj%VbVW0m z)WWgMNP6<_U5ogaA`Wa2U8H3n)=t z@8K_jjlFob*FPD&uuqHiQuWti$=hy& zuK;iqaGUon+5->=@RL6P-An+;^i0Mv#(779 zRB};2;?h@GLGkBxba4BEmQa$KYH%}+(MSbw->9nP* z&Rp@KSM5K>$!n6F(;1lBtDpjN0i#-6qXuGN-SZ2jEjgbbAH03QC zC^|xLc@6N;;DX>9)Z>6J9#A@h;)!O$$x?s8clK}V@c+sW9Py?8{nnN3=;!_Z@^pcI zCoi$0y*Iwz9y@oVJv(-dkMGU?nQFO?jyJU1Gn4)H!s+d{t?j7Y+;+gWwjQuG%_qE_ zth^pr%IeOj!rp)Z-vjVJ+;rGBca7WczP`@JC(89&^;Gq8hR#+1{5%jkF?|IP2Pis| znVu+1eUxPkzc6XgX<}J2oQ~o0!o$nr^0wvO$HlDzEKlwC6tB4YvOw&>NqMBf<<&T# zg##mf0bVTFO}#_5renhOYd8V$-TzM=?6-q{^ly{@`i}vc8TwohnLGn=B~Sj5;TVV* zWTcxh7kI%w+?O)|6z>9~SXOn)FFMhA5MJt4FW?IoWT3{2&KumtOD6#uLQ^H)@D zz8c|mih7{BB=}D0dV6=`dK;WNXV>}!U~kKtwxwmik22-sr+xqV`Nzieek=6iEx>9( zlb6XCZa8I|x+d*6pWo!a6F2MhiGk{_Vs|=Q0r0&%=>#AS;2P8k2Cl(7@)f0ExucmG zM5Uq->&21YN)Fk4o=(2Cp?*Cf$U|Fm3 zq&y;j@)36j_$M}>+;t=jn?hIs?@|Yua5FKi5s!i_G)Rhy*ahb))Y?IEzSGv z`o{gXs_`fUDI$7}x$5}g;p6f@lZr?qm%gK!K6JJp0LEgS60_Lwmwh-2YB8PlV#6(k zK`NzXq5NvnMx1iO1>u9IULAYntJ8-^rwl#i@cNEn+toKz(aJxe`@31 zKbheh%=Vj_v9?X%G31{+oM`TUV=prsW;_ay{{rXZ9IP zlv?e{;oI%0@f++&VbD*W^Zy6<#?-Vvstyt^;?Qy&HGjIa*&ZofV?EQpD$sDmwl%(G zJDOhg(Zu&m_#N>pt~M5+HFBKrE&i3jKfmXI{q~D%?YqbNtSdZ=Q^zUGnF#=U0OD5w zaj+&)*v94>XF_91UF1hR>cPjw@X{5WOFz|7 zd}*A}(iK#^3PT!%OQv+CVI&uf^1L`wp27j+eRV&{qYR$n0ScF{cq!BXpn*X&XQ@B1 z_O$QN_sxGbUV?r5Y`eWX(&j&DDd&%Tq@Hw(CtPV)o`A|Hy3xUpp8!VLLUH2aARs0Z zOhRzF??U5Rj6Qjr>wc*mUHO<+c+v%@tjSN*MPGG6gS{Yp4f4Pgk30?d;z^god;HgI zw#hg5eR9KoyT{-2_q6(Q`7$5g!v;UTYI%ENvwds$7JIv}!Pk^q{kOCZe6UCde@#BI z54h@^Abjj7hpi?{tL(MnDto82#hx$RYJ2TPyP@$N>uM-}QtL<9NPPufqy^mEwy}H4 z{{C%;t@VYHed9_0=M#o3dQBq4BOZALf<~@; zfG^tBzf5=)pOEyW0o;+g6<^S2Ue_IMe_C|0m^;Sfx^qmEM*d zb2ej2p&V8z$}vgK=i`_mA;~EuVIw)^e8}16d}hvaW^+EyoQ55~`~0r!_t*a0wd-{~ z_IN&CkLUeyUMeByHAxZ$1gJ?h{c19XIhXY60(@Z{h?*!tn{ctjl;(I2dAyI)CrfY zBo8AjX>7HJ3ZkmgfgRretgKWD2Uhc+W2WaeZTcPNVYd#SQzI)u`V*3q*ZI)`7AEUu znQi(iruFTHJTa5oVdG9ZEmM`13l}p20|#rQm7c$%_vyKqG*EYMR;qL5IoU!P4l{!FhlDz90ghUct1J;1ZLPs z%RVDq-zP$H3K?eFP6f~C4?1P{Ie9|-pHFn{e(2e)EO?+=9@K|sE|pHWIMOp{v+mH_i4o;QE0ZJ$cZ@%O_n&CvxkxA1DnwUDwN&{LzwJZJJ(O8h--J~Wjwy?H96g{ z4=;WKazRX{-^bJjR=U=i8A0CGAzr=pXz{1XUpN)~Cs9K31DHsTl`6+3wqbo_E!cD? zcj_@?*o$|u=KB$%?bbj*)NTuB8Nz^b?3pN6l+kOV(yGq(CdYodTc@lR^-XSmBs(Da zSD93jNx#2@5$c*BdW0qJ8kcSZScE+98*P#$J2~vrKWSo5-=ZG@eI{ay&s30)0`1Sj z1;iAzRo)Di!Jb9}@4zlR{OkTycvp0Whfi@gR=-UYGV~loYRZyglLB`ea0z7b@#73s z^bY|1nAOi(s$|Gg%-65)W7(OCwf}*dR=(--gH@>9xPE67Lc?y%1ym)jAaJ~BEA`EZ zdG-$ZiLB(*%npbJDP7YfC|KJzn~G`YP5D_kJhxX>kziy*VnK4!)E$kwl6KrJ;ctZ@ z`iEx~>RjCFU~*h18^KIdMzw=uSAkPbZ8lDsF1(ux$m*r|%*0p0z21>Es~o{-%)54T&Zt{1#Ic_T-Du8Y9XSth4;979FG#PXdUZYyF@V-TeT6;$ zOpzPF+x?}k;@W3{SXZw{zxHlIX>X>$c2z(>twp{v`=#7V!?QBjz=|o8q0Qk07DKP1 zy}_YKFWu^!b|Nmk^Y(G9Gga5z+LYe?6poIzeGr-w(?8rIsI;zr0ccU-IS{`!pEujc z(-+j0bVoVSA)7|{uz;yC2|}+%bI9A0ep_{+`l+$ zrvQe1$h`CC%CCR6Zr4)t{hijkfA%ViakPI+$K(3mJiIaEA;|~bBfb3l1^?3Kl~?19 z$IVg-n-6zh=}@1peOD#jtX~}s&Vi7H4$n=^`1cp>Vd-dtS_%uY)LFJGP@u%^56mGwb6VYk`1Ig@;sH8Ga)`X zY3WlSIRPbW52|?w3@VNu8{NU^n5d$+%STEmBQA&S|1|x{(}jmf%P1hJ5Q#*{j`w%;F$q7T8xZCfCx-vjTkR8#*{Kx=zClZmt#_zSLK{|>kA4iJiaVzHaf zjLW|$boS-{tD+#=bNAGu&hfYnHbUTk#02&;<56!D9;XuFV0b-4#Qxk!>0-`)gis4R z%&U#H|ElEr|9n%38L?1LurHYu=bcUM1k(?(WBvJ!vReL|tG@YOrzT1h9G`J~L}8dx z*NfNx#UUOEDy3`_^wK6ou!a`fF)+%{vuw+pl+IiY z-_Zwy-I446Ob;Jv`c7O_!OLHI`#62V3!(N_xJ~|Wb3X`s`=7P{)8cg>lzr14{ui9Xwmmt zY54~9SZ54A3M0~;1+LaoOSi&#j_2L&e93tBr;5OPv|K(08z>GmBNq@CgRv#rd$DtS zu}4O_B`RB+cZc`ytvd#N(?SuS&=pQ=`!7wc&C$k59Z;I9l?LW`Cz%^bLI<7}>%S8C zlTKc|q%yx}+RdXk`)M!wCp*B+LL!=?1^P)!Xr?zoQ zD*8p8@z<&JX-K-kOy87{ZCI*)W6RIEU(aS-l|= z1@O)1%H1y5nul?QwrsHK0%^1!*-ih|A&YtBGJ*Wb`B*O&}yDM>tqsn>J+2u zkb*!1taRYNYy8#~6wC@T?+vk1(^NETajEN*G#EyWGO26ITXHKjCw88AR#?)U7xSVi z9Sz23uAf=){GWFcpC246<|-fdqsQJC4!$34@0N9|9VF=X2!The!af8`!^HR*at7*g2^~)S&ya zmvWFS0Rf}wjFBh6cJ#6D{9yie6SqFs?IQliCe0!3`O)1Nb>Gg$QLY+RIl)xDka&zG zaj7||;Z=2$^WE)olTBrlVc&li=gH5z#*j}o3n^n9p0Xw$RvHBQ{<9;LhD~-ma^;lU z#eZ@FsP5I~AkD)i0p*dBf~4_K9QDD>0;xi)P`P=3RpPqzQP}^yy|E_u6!ovF3SV=5 z<5>N)>Y3ji7y-64lmfgg870OkYc&1*8iN&dyn6kbDay6^+}hhu%oCLHVL59>VCr6U zI4FMdm7*ax3No}N;2A#I7#nRCo#}%mlkHhI3tof&BhcBE2k(m$c>= zKy;nW5;g`Wl3TURM9KaeQgbgWENZH3{S~UWsD`wS&pP)++d4A@u&D2`}N;nFFI-S|1&(e%ByVdc9~(sBoB3& z1IfaU8F?M%Vq~KWp<9)i#ITtW@)svZU#JPt)oI52oM8!|FQae8hkj~v>Y}RbZI1_{ z(O~J!KM(kGA3#G#oPDcbih$cQS;TU=?g>z2{j$xKav|)wW-+Gyt>4T>lUG?pC1?oO z(uL(nBa(5uMNf4C#{R9J#p=j#a-%^wcLsTL8dK=gTDhM<|7+gYkUyB=9dl|EI0qTn zm@_e&CFbZGK1;(RV&&4gZ&i~D^yLh4hdHd}k|Ny~7A^E4>8|fDC@A@s8FgzEoqU}A zf%fs#2pmKbGS8isI?ZOB2$3X58)11KU;9lmH@0H*XYGY_i%S{#K}Ikt@9M#R@dKgH zInFPC0&-_>v1%FV%Z#e*p0l=EY!3FtGrcot6ElVk{;B)@fIH;F+_N`#6^_3&3aDNB zXE%OruF8M&w6bXT?T5%jG%)W9>6ZT)mRjCPo&p=S_ zzIr521{n_V+Ehor^V@5D6KDfo6Y$&mV;o{cUx}`m3LZ3MHp#^Cuq zj2Vx6J)I<@NYSzU)4VSyq;K?`@ zz^;d-SyJx3fZk-^kDZNf*M&(75!XH$b-fyji!)G`(vFw}*#8_$Nyqp3jUY%Ft zcc>PUmqlQ=yTcYN?6x{T@*o2!c#Fhgy5+ab@ypEkVU)VhrNZ_EQpV`T#!QT@yx^dE z=#yJAj2cSCYv`~@C2GA%*f1wH8i3b760Rg|-{O6*BG%k|^ zJCF3CmpE-+$JzT|d%!6P*%dkh(T()|Z8p!sGYBtG!Gj(>+FB41R<-B~j_~hll+ycj z4xosr2v~q)l{i91coA*sToiB(?7@ zLh)!ab#O3c>r~i;5)c^aALs{U4nPdWgkV{a57uv2-#o~Hlq|y@S(ynRi3&)3WW(V{q5Bkl%g7m1MAH#ly{+mpeXn!u=!ZgK zwJnnfQ-AhQaOmng2%VGQb~6Mn#6W50G0|b|8`t)|JL*256>qiqnTL5KUO+x zvFM}=?O(-Ab^BDV78ED3TuXi2bDa{NW3qX~HD`&7aylG;rH5h7pp4+srEuxE`P^3k zJvKR_R&H?ONtU1JT|stMBY`WaVj9mulW!;^V*{N7OSFNH_xOByDNR|K5$f?UmY)H) zrDv-rQFkf14aU<>Rf(u_fv95Roa10!u|Oe;YaBd{Hemv;gw(oF{_UtK?-q#-d}au? zzpzRO!RLR4GT#^>dKxy5*4W7aEaCwVYy$o<7zaU%`NB^uQJXCj4Y8R@l8ffrkJCP9 zUR{GgVtgz&g|e?*7Fo|;J9h2m$yOZ2MRK6(_cKPHzifsV*Zp^Th`w4fsruiu_?&>f zIbgK+NflmiOl`Pn=*{3Dla&?+(767ya3qS-x76v-fM!w`B>itbRPKpjZPmGE=gPvJ zn(jO8H=RTcbaNS`4Td~6*$6)|{o_OJ=9b^(IAKhOxZ1l~05sD6IPT-Hh(*m)q?X-lFfz<~zf82O=^+&>!!h zfaRuPb$pN-Pt@1@#tV(?I-^nC0FbP}`#p8^Wg@#*W$mopIKMB zqEeCiKJlhN*n95TGlH)JCRrxyt>#%L<=xH0w?ZXL za})(QYcCb;vLAov#(dA*fo!7|?k3~NO?~h@gfXUwunDRj1{qSXaJIhsj+j&4Yn|vSV3JASQ@o!Jkz=k}y>h$7>NRgE^4eK0hB6E+ z2iLM;4gCDH$oZ+5;r7$yHw#kzXY!nc3%Pz@h9TBU%j?SB!2a~Pkww0*_SH zefqkUuTOi?^pV{m_!7MNC0;ncUDV|O!jvn5ejfh7O#hgNvzM^cHF2T4vXs8m^bttI zyxp7`|4)e0Fvox7cRVWWzZF`_NplG%&CgAnB2QvMpw)&E#{0H465Z*SZxIp!hjoV<6J_Gnqus$(`KF{ z`kkE-{T3XlUK?e}0d2c}8??eL2m0s=gUixT90l1?XqCP|l#_%H!kMw}S2g*;MQ3d1 zu_YgCzNzfGW7%?3*wvM#_AIR0&=xA#2W_r)hynYzjjMMe>uX%sI1Gm#NB7jBn}5sf zp4;2b@EyFw(2lak2%^a9;4`~tbJDPdR;`r`^yM+s-^pxHaAI!ddF_l1SX|XCk2%|; z{hHs$IMYL><>Ma=60@Lh1M*zDjNTrzfOWH|PR(l?F*X8ZYz@>)Q|H<@NDr8(eoyZJ zoj=S*W>TyFGy3@}d^ zekaFtkxOEF@IrXI?0xm3CU!xt$w+eZINg(b_sBbDHM-O`s1*K*j-3)W=1(>I#q=5uzHRphm(!QdcSl3}o)!yTEcyFGpm@b~$#bwl)QDm&fiLPvKMZ zCsP00Ki*ZAR)~ctgNcLOs9Um>W7ox6tuJDZ36VUO=Cvf-g_~Tt} zV5hrFicrSMa}2e3VII9Sp2Uw<8gbG>0M%_AYBERTlWwM6KKuq_D8{U{Y?VnYX{=pV z4a%hZ==|Tz7APeK($Z}xJlc^tb>DAb+^{5&+Vzo2=4!r#9|Ax9A-JC(?o!r)Ai5mE zw3TM0T!=R5F{qQQCjj397hbkJ**`AorUf>lDA7+GBzw~lgPO-Ed=RL{x3QBa8bxFi z)v+Zp7v&)LL&fL={C8dwq4JpVk`}J33Jg`A%Rd25Xi0Dww;I^2A)jf4zF{cuO;15@ zVYkY${wEQGT?LPAiDQjioJCieY!}p7knqr~Uv|Wt3=ST~+?;FL*`OpvF_Zq{MHo8I zDFG9CQ6pm*AqD?0*Y)FbDN>`bzyZTiTm4zgR1j9y_OMO#Iw2#YB}t0~MS9#39F&8Z zVchPP#xG$fl^IZtcD^k*eNTurPVRIU>#56Nxk{Hkm6V!etg{4_ivh&N2El1lcz1jo z;#Lx<_})%ELX7_;o+gGZTK+~wqYs+`bH>wp8ebyTI}R(LDrGYmH@`?A1+ij*B#k!; zvQn;$2U*w=$8TQWK&^`$e(^<7m;dC$Pw-1^eDG$2AK9|m7VuEe)ZMuv#y{1+oR`F)%?dOa;UVteoB+!@SKY*s0{LFR$ zGo|0#TfrJpP6NH^gps_*srq6=Lrj`R5yd5!K8n%#6rC$jDAXS85k>Gi?#^AD$ayXP zq~`=W6pD0@4PCE)dZA=AiAqfLv2j^mnrY z)<@nGb^iuU4KbfH6OhM`D_ELausghrId3yZTPRK=sTY-Io?;yBu5h zY;QcOylTd7nBNhw=b4Cl$(3eQ{2S(%VAO4j2o2E^2>%{)k}9IKhUG!l`W81>RF4Uk z>`WX)ot8acv!CKqPpNj+)4)NGJ#j@+)Erq@josRv*VmZrkI}&v)gtVER{=uB?0|(u zdG_?oxbe*w1CNt6xQbu$a0j{nOj>?w^*qb`r;2z$!QPUkBz#l+1;3vfj5P>Nw6C!l zEh*gK-;)*+%)RDt&R#T-=D(<36?kG4{a8TnllE*&*WkYH%!5lgs~ z#drAe=~<%77Q_yU^%;>hs3YNYeEved(||DylD2a7Fj_?gVPy|bALkZ(7J|KL{Z(~0 zQ3UW$#BYdkXX@1XeRvI-5M{a;EF5`J)izQ2SPSIWbuKHvg!mu#9YNv;3jxSPNf)i2 zs0@8U{;#eB$F*9^3%k6}$cgcvDyD|27z1fE+4!BBExGxP4FHQTBm^VEDxUILONy=k zjyiYv|AH_AhBm<5r}{fHwwv=TMe~wh67JfUYszNELE@iiimD`jCH(&O690ue$sq9$ z;>nUwXAXsFuWd=Hbnm}cZkIa<)&)1BerG7?2uFO=j<_tkeN!87_On34^6?B0b~^{S zy>*UyhKhNME*i%99WE&!O?%+-cUhY=Th@$J9!NVVUf}?MpC^?IyWBAXe$F(g++Fvb z+#l_d@ip7+QcQh@k=|?T0!eNJ5fa$>KJ-AB!ZgmAN=dwbE0%w&T^vT6=ci3^Ln(X7 z)f5|X)R`pw&1YDCA3E08y{z6(taegk#);IVAjffEbph2wd%b zaZhjgLS4)=BxhU-+SqV-V{OT^@t~CnHDxdv8o8Bb=Zez+6t^BB>GM`QiS+d@;JdL1 zW-EvMjQ(|rjQg~en$?x99D>RLwXceXSV2cY+s!9I^!kgP0rv=p%IgsS^CA)`j>t_z z@NlM{7fB}VG{i$9;Eb8|L%2HRj{>un~r$fQ;zi$8uWT#zB?T=3SdRl`U=4KHssz@LH!!zhF$P82> z9^#_p+8uwLzYx>C!m}fe7CbdizGu|Z%o(a|-(8s&*yConY;XkQrxjzBjvMKRD@Nwof0}JF zV-`AA>uwVBgxFv|yA-fou9wsio{gJM2w!~5bAqQ}n!w9i&dK|uS1Z>(n5UTc<=eGX z?JDB`c0~cTm0dU13PJfTzw&p!-M1ahbF)erR!`q_OW%jKQunWrNwA4B)fpvR$fqe_D`D*li%n7pmn3 zWI~3KN_)1bI(%tEidpcF&f;DvhKWcjiN2jj2*4gSL8jUG1l+ zh?B4G&AqLO&3l>tJ$rjtgISaMOv>zP72c!isO9pzBWITm@hg8-Nl@B$a1ITP?nRSF z^V(#ansW_&D^KNV$sK2yj0rIdtTq=zn0K%1@Rs+n`j3(|3XBbNnY_GgrtYTHlvl1f z-*MsaD2F@2KaRK0-IX%4oWvU#X-}_@4tNJi^*0K}v~48qWB`vQ+N$VST95@T5?5Jd zMr(P$_+GsK)19KPT_P$Vp<8999}Ys5H$Uw1Tkv3#tJ(7Bz9Prgo>ndML1QbYI~6sd z`=5*me{l<4VoQO3%YE)gj*y0f)7fy-T#5NiH_n5e6|N*YA+0)Seli2=xad&dH!y`> z<*0#9bS!EReh2%S>GjM#u|-Xi@_J=bVC3&+$rUmiy`hN*_tG|IiY2r0>dT&~J-*fy z!V+47?gm$NzPxDA^v^?jZR%S4vwKHE{K-@cdP{&%%tNcj`zO2zS39`cnnvU>lOoB9 zg9+YJ3i$kRyVhw;T>;?ra^kup%Q!jHUmi>X;V0+(k6IUs)x1G|cYUJh@KOto#~RTd)yMaQm8A5vI#*q;c{!KzAA`=NND=DN~YJCMw{&HPTFREUn#Q zvi558(dM~W+&Ns#+$-ASW0St|GaQzuYL|UjTBnakV_>SpBQ@27wRefF!?hlV)?AkhcE#Z-v-ofseXQ*=pmm*XvJLIs%a!{pHr)w)d3?pwIQOt%iJH!ZP^=D zX|=xHtODQYn=(!li`K@eC*4Y(W>rp3LA&Fyw%c#r-c=&<5jDp(3pzdiE~k$HtY?n; zzv@$f*t(U70B$!h$&Y~cVKTi=-k&>Xr^{lkK*QH0^C4n2cf69PJ}g{WdZ_SV=LZE+xMskDkQnu@>mB3`6=4;xLBSAFWXS{Dnx2 zcd3irK#tsQe>9QY2YYLyEz2Yp36v+c)Qoh-HA9YiW&TzYl4#Tt< zWj&4;O7i(GXnT!mE3-<%rlo_RKEERLvvxy>=Ix14AWSBcYRp7JHS-T2}&s+VGl@_IR}Ea@c!aG^PvW8rm`|o6&I1*-#Y5#m!K?h{i)gPAvb3sD6;(KB27R9>X^=#ps@s?&eWB#1- zG|3@yKv?p>26!N)salf^y;m%$b}6Q;YG*4r>c7Z9`h286T1i?N%b$>* zOCK56w5YWM(>UANL_mB>BEkX!oW^K7Py0#NhlDd9%m^AVglaCTWGoTbtFP)i4?a%L z(f>Z`YjWc&^AAq&uC=i$r@BDZ!iMzq&@S=0cWwpZxq3M~Kr=)IPC!WBtU2tw>9Xurb)4!FADS&jW$~t3QKkk3W#bpdeKa z&Kk!LCq3E*Sh>(Sfj23k|F)7j=yMS7`lH#vzf<2R(aIm>xS-I$^;uFmhgP>PA~N^+ zC3{bMUNs1#Ylvx_8iZZDV(vX4FVz#yS==K$bFRFJN2{vHWa^?YBpxC1kD7$7YfDd!l$y^=>4>j`_!;38otzI9bCl9!F2l=)7b!u%{QCn8mPspys2cOjuj|qu# zuXOPi@t%WwT)kTl__S?0Z@<0g?S2if6^eO|d5Nha*IE9(*8KKh@41!hPpdn8ss5X1aU4O8`%UsE&2I~N1Bp#Hy52L4Wp~1O1@w%o9}x8-wtAhq zQ=a6Et^IPKX|5IK6zf($H~pLHs!OV_R9a*@Fd`7=Y+_og=$+xOc9R-zFcrH=*2p!#Pp%a}ZJ5K~P@WXeMG__jd zZz%=j^i2ic{p=;#ThAMgnK700F;lRaO?-!a8*r9xn&|{X6@wk6JBFBMVub%Tp^(7bR~T%G=OX> zewk$@+42tNm_EDa-@RuO{XNh3-ES9Lh@ABQM*isPfOgt#&ekQ&ZPanpkP`*xSGt*8 z1b?YvRy+drBQ`m#-o9CdCO;BCBO;RBT}2?xLoFyrgpN>WEbc7do${Ok8FwLN*>&bDBqW*St@zZ6n^ z#3TQvF zq~b~rjgY_?K*VB-)rjWWMe^F2f6M7gAos&{&*NbqA#o021Gm@vCv(L(O$$bF+jABt zi_6{z+{Y>=q%>GV5v#3gje#T#JYIa@T=!2TalCFW7r(vG9V zrs=xZaaORB9nmxg-`Tct7~CHTaOQIC_i23>WZ_AHi=QD21ncz3R?XZFIyv#T_LI{#Pq6z){A%+H%EVWOj0)D8NLlw=bt>8>KEkBBGcM8lm>E?}cd_DifB+%{q-Aqo>$0ajl=YzNC~3I#%Bp^Bw8CD6mn_ zImQ9-bTsikOV%ZhXTlP&rVIv{II*%;Ui#-zS6wz2b;hPWMl)?t^!~ayK<2DXn5X4U zPAUIp8=?0a%x*1zncr%a4?j8T9y*mO-u_Gq4pTJ!9=ws58PnsJ?EGnbaeYx*9v0v= ziT`Hvx<$QecfERY|LbtIOd(CvRdfhix$+dgJfJ6ie$Weha5#H?B!7oPGzk>}h>1_? zkuYx&Q9rz)2I1hsY0{eznV@^RFi0`_WD+w*pRqXfptEQxQPV`2Q?` zmHeZCXDG-;AL>zQTHjvOLuZOgfb}1UP&i#vOPO3%%bf0pdp521?Ut8R+9|t|}bhuvIzrZug5^1x)0( zTbF+ivbae96?tt2tx@}0H5NA~_3!)g2SUH4Lw$A>H}bG1!0d`#F&y8HWi(w(6ANqm znfVTz?RzffQ8*f2^kQau#}5bM%%x6_fKNC4&DwUcFJ+PP5xkyuye`XK&ypKO_mey1SC)qE zMzZ>c0%z|kbZ%p(7{r`2`s4&@f_$NPcn{c!kg%RZFeqV;51=ieMJ)cqP|*?bGo^`q zQ%w5jAA(qIQ};DXo@275FjsBO9RKT0U!6oP=5Qt@ExhYh^Kc{Y9Br$aY^OEwFR-lK z2sZmAYh=@HQSW0@f4W0`_`CgK%S}CK9#u2oan07arr7D-2OCV)H;gu(R5kVHPl;7! zRS%qFIy(DRPd90&_4fQyn@w}Agri7gNHKREAaG@3B3wi>r6uU^;K~|w@A_}wC~U>R zxggHFs-_$Okw0ctZk(Q@2Foi?gzC4R3@}@Y!NN-ADN{ZH*LjNek4Qqxi3U8N9w1D= zqZLCtgmQ;*KaSE+$#|`kyxlx1;QeE2r0hLv%h7*wxuP6-tCF^pR&PopV&bhm?|5^3 zwPoZaAJe*omzE+~jU=gqHvwBbX4O;;)%5yG{2QOnO_gMjxd!25Ob_X2k+ojXJzW!s zSv^?oVBJ$zLQ;;)mj9sZ8YNt)Y_F;k(vHqh^7>$k*E_o=M49Ho*F?GVd9V!}o-4aJ ze{*%{-z>?-?fHO8>YC@3`suk|#_c(}Isy&$cQRlM=l7aKGqt5R{;%I`iJW$H;kr&|wd};GNTw}Z8P&D#WCwy21J7U`iH{e`vGP!jZBEKPmleq|%WtCK|`1X5yp zpwt|Cg=vG|-@K!~vByO%U%AbBf4EtbJf@mG9xwvEOO@Ebm-gD*21AxMO4+JkR13eY z=3x>S09ncIL;amkZmkQaveYZ=dzxCyJAOrU%JwP*e!ANBOa&x=-V#)%?)~2G?Xopw zBRA=mTfS7UrM`+nOO3(IV)>3O>=7EKcY$Dk z5xPPQ7cAUk_dR)JL1*diRC9pBg~-xA%HOJY1MRm2S^QCrdv~@UsSC`@>eVcUR4H!& z8YY_ziZ0YfS@bwey2=YpR+LAt-E-hz#YwN*fcF~f>NPE@y_3RsXgq#NwEdbWiD5=d zqn<|k#3WYXXXw2zi({%e3m#k?3+SZXshDHS^JzHFU+ZP9+Fr7;HMyu&Xf*7!Fn`G~ zi4f0fDpe%z!hvoXb6-zH1~1Tiu#_HBGl$eZS6J9CeE}Hw8nd4zCGT<0Zc%1g$>ZdP zkq|1{wc;FCs`szJUnv_*$m}-u5VSc;$_1zT3{y@FCHWKP*z!Ba#U^Hx@v)7oXRuV_ zh$<_Hv2#u%{7jdhq8$ul<<4!ByzedYv+$$N0iv98(o5Zl#35qi*7b+*b@oA=J~FyW zjK*&>2Eyou5Xz7(xwPcUO|ThxRr*=95Y!xb++*>*Y7SY)uj*GZ9Z0A4J!}llEONV4 zbU2cw`BpWVu_upQnrN{hj348@9!z6rr8@j);*&IcfOx>$0^gL{9&Xv{gXCNAcJ{*J zf*4)3i%E7Z-7Z(~XoT02%@0DD3uXOo(zWI4g*=dj;K07a=L;ZoN&9eo0nNy;N|Coa zNSAE%E@`FbC{^;Pw9_Q&UB~^C&TylgZXcL{XwQA?-4N*ErKs9x$gmNEZJq&Nv-TyX zsr4%;NdigcrQ}P)VUn!l@Pv4=7z&KgGYGG)n)S;^Y?#d5o1-i%`kQRJUBd0}ds_X# z(hiD~Y|sIfn^RRT*0h^n-Pjive&<=ak%z`q%M|zpos!ayf5U`BScHJkt31mz*X{VF z?NIKewOyWYf2NBfC;#GhsTN4YW+(j=KNOnFjHbySHcN&8(b3K}tVP%9jVV6o8#COz zZ>wCq!DGaN<4S}R%Vqf?#7%|sjKZ+f9(Uu#y07xX_&8w!;L}7gqwW+J%$sTf2P6{1 z__0_!7IBVXRzctNH*6&z$6dLRs#?>0@XAnNR9_Oz;~0hohCcS8Y)3RK_44oR6`^zc zR1V$;ya4*bNuf2E3sR4=1)rH^_^Eq^l13Pt3kczvvr@XF;mGt**kU&z}DjGR4oX+M*G-0BhQ4ZttbH+Z-@3Iofn!N~2T+HMvL{=2AC?HQv2 zhxI!ICpn0~K@PG#5h&x>Qw&+ZaI{^w^W6nO;9DxDpA`2n0Gi#i4gN-79$6&+{An+! zh9rgvB|ym`P}^%!V;x`cV7A)ddGQKd*2zHq(}h^ZD!SK$w8X^Ip53F!gL%Ept7^8* zuX-t_wxwpUFAX5;25NMHD!8rCk0Ot&-t0VrZ#-6C4&IQb$p7v({5mr*a)C3&EL#?H zHI2WB(}i#ei%_xGmnE!s<=c_vVaB$vZ?5g`dJj?Kabj^5) z!){3-wwdL`H-YOTh$Z5<$2z;ij3mbIZ+-UE{>ZHz{KNe^SL;p(7yo8lbtD4?8{@k} zU!^G#26rB#LhG5d^QBsgA0l@~g313?N67G@KTj&!TLIBv1IasYtPfcaWH_VqEn9Rc z1(}Wm8P>Pa`%LRCg-COd8lAGY1cDwvQTAGYsqDG>Yyuk?I1F>IF+EE;M$_SNMwor~ zLQ8l`OR(~G!CY9rj-cznJc(0-)(fIuRfeQm%5ud}20bDUFJ z5(UpMjnpG9obW823<>-1L|G6J$5b($y*M}zfcKo{_xiI8&5b&Z5V$+$!-516FIF8 zy6TnoccVmeN0aUbTuQMK>CtfmxXS2ZCgu&CS+Uizo=sDxeCV=@-Kl2anHb7!Zh1gx zyKtJNY*Tx&ikblQq};~6NL+$ztitth{r$1NBi-ZN=IZLC$8D!bz=d@HA_ZdkgC;fo8?0<(`%Q5J)86Ib-RZV(^1jA&o|w~~)Z^g6xC9f2m|&!L8wSkzw78q3DUqzd zVf+HhB;rDx>W+}qO3~FjQfFF2ue=mSyTSE;aH_r*4!F+yJ`!FbJ7u@EXcE!R)vrP? zw_#xT>1GQzE|NKTBomU%{qiU$<5*`F`C_(z0>lHrLIe*kXmETV0iisn(mNM5s4HzeEClw%A5qoHW+MTwMF&{th zp29}Efb1sGq__1_78p|`fsAE070ckR!faWNG#vIjJJmac>Gf7Qxlh=&R(14CJWq+7|S}((T#81$V?@+x~r(HU;Y%NLXU_y-8se%f*hGglxBi$aX&<;|!ZT1mWR+C* z2}1O0N@n1GOgEa+g-+nHK$J#&EB-9^Gexh(ENBO@qM`@gFbcQ6zocTeq~_3c-78Ln(7q2nfjtNBbZLDZN7H<3?~3nlPvllDjNdqMfcI0v{d*XoV zrl+S3M<0HoJ+cIMx!&86xL^!yznfRASSJ5`vqJK&)7c2&@HuUZnN)@Pp9+G6B7p0_bD6wp12qvuk{3Skyv^TDhY9w1 z2&nZmj!o}S(5ODztOpq^31`T^JVUrB@> z#QW;XlJ=If;R`D>*t7;7`>jC2>mIYL>lgLEdw6*Csh+8S@gptGiHl0~Yn(a9iZg|9 zk$M7S+80Vv81FTGRW?1NN=|CrIrOxWE@5lj0HOtl8hWr%V6&=FpC4UIHgiist!Zbv znBtc;Fty2sia9pZZ!~}Kqul^@vS!(Bp{sBr5TW*QMt}zrKpHq^+cve-Rk=Vox`jj@ zK2ug!eDlF(G71wQtg$Zc|6b|svI*E1ye>LS3V!o_x1gN68h&f;I&$);HG;d(-%o$P zoVoKC)aAehgdPKO1Q!QvIV|nasaR~L*RQWWjH5X|Iu%St6q$)nqMq^)hR zVb_ES*Ji}D^F1%_IO9|<)>v6iR_34zom_p2rV#(E0Lq%?#8Esy@F3x+&2o-S%e34-e{YE-241j%LFhMZCK)*X^&W%s)V9xwvFp zU!R>%7FTi%^}p>*Q;`#3Z8;&ox!!Q_RBp|pq1?vWB&p)=hNjv^Fv0zL_j$8ANn|0b z6WP>-=)jALmVPrEnm@^sRTW!94+)o~*RT6^lKtTZ||=Oay5Ja5-@ z99l}s_n<&L5l2D?Izm~JpXU9Bm@IH_ke-dBJh&3ZI2kS3VA7Uz;W`-NaTa}UuQg`j z|7bc7cQ)Ji{|7Dg7}09Q2&&qunzcuaR$F~aX&$}&lkB{1UaYt z98llM5oDofiJ^^Q*#EfOU@%V|+-+!@ITq$8d5`*dVV0F!u-@wi9=P<>L}3@`#(4%) ziL!r-a1~#pj#*G|cN5B+>yCr_I6`c5dBSJdcuXGbnpJG1qbOw>j4KUG;e#B*Yb?3= zjYQLxP^zkF@7GR6_(tllzi>}$gczCCNVct1ec0a?8VyhwtfZz?(#YDOK%SrHZi+Qo z=>fj8!&HVp2QBJHmwr=dbIP0N#GjN^oO}`O(LQIwCMw_V#(3jY5Kk2$*k)&$<~mpx z>Z+QxwQ~KuWb)O?&RI^cpkr<3RjE&~bOi|vR>jpK%~#yS z8}C$0?9g}<0l}C0;jXOig2)keyeY+NAt`(T!5=wtnLl&s4Uqo2$%xq}tAjwv>B;d; zMurnpHf?kNG^AE>SDDUa1gUfFKRF6szJ;?qwLJA})}bb=dr4Ylgrm45H*?&^`b8~t zMRj=v_!Ib`OzoPJkgW+z9Pmzg*lZ7OwwYZam}Ge6HS56s-jvHspVJ7<(#`@5XrD;%A*EFmPNS|g>TXtrCF+vcDSqQt@9F=zU z>qH5Vk8k1Q#Qqwl8hAUM&it`I)sG6(^Yz&8+eDl#{{36>{ipNyGQHWKYo{Dy$9-v( z=YlpFmPcGGjVVn-)wQjU)WMK7!>*tGaWqg>IfFx;L$8@A#RTZZDQUe&!Emx}G5BPI zypsPa{&=yv&}Vn~?~{UyU4xl|P9#Ng=C{bznRj3Lkk0OFIm?s*L23AjUo!{5ME-nv zYD(eE%XcBeZ}?a1tlEPdk4|^~ZUv=)EnC6fyf=8n99E)fb{2;lQHAdB{lppZ?b|LG zTb#M4Mazpb_-vJQ>0_$P>K7EYH5(=)n&otT4ZTd*AxhjuwDEl6=|wX`;PC%Ws-huz^K38AOflEW zL`O_^WUeP%qLv~?GG&k>&Hv3Z9}fqgTGA9x^HXuJG*OMwcE_@jQf>JH5MM!XlwWy5 zgw*m>G@eaz_uv>68H#)$5tL3*ig3wXa=Ci<6?rcddiJAd2Bu0$Y89~DJbO-7H{8sO zU}%K6ZqP79uY^Dcs7bt96gk?9~^cqvm1dfrB=b zB&HMPTkAL&Sp4>$U&#GV461Vf1L}Y7V>Hjf?`E1(AD+_)uUhY>bBhKFd9OFiW1|yH zI7XJNj_?feSixX@Y@TDC>mycnRsMww_gq&Q%nrHz)ocyxPr{g;7pcsw!1A2O>z8|V zSpJBb;2ScFRrcN=h2&kBpa> z=wwx|KW%>_bQl+&aq^|a*M9P8@`bSOALDPssw?oaE*bGn ztEB3sGCl=W<%1=HB>2qo#^QQYQn7o+7oPhiN<#-8(MhaA`)a-(dEhzzxx&cKPuUwu z`B?~V zn9{VM@|a_M7;wAoRr(pTgzkysf&1@E>TBIhaS(=aIgo2w|Hp~ROz*>gFNK+MT*9+{T-cpE9$fGzPhQt%+vu=-beY`O#gxyBmX(U z(kqfTO!-mghqK|H8PvebgjpIX2n-+^$1?w{EoTUBTH76MU869#_v)@NAHr>x{H4=0 zxZfg{k%j3M(s>vE8kiQZd$2g>Ew%N0kP)gf@;Mz&*n=(eZR6%a!L<1NHsY$#O=nQ2 z;VJcFYRW0pi6w=YC4qC*=^qkeVKtcu@=xh<$XfQU9PgUK7;ID#C2uf*}357H|4DVSJI6AoV?X2#a~2oKWlp%DC@W>atOSw!+T7Q z)uMB$7+JG?>fO4UcEKc3Ke%-?GIMq{j?mqxL{AlZ%(Fsj`*8HMg|72;oj1V0%ac5(!=3b6;6w>1p15jrx z<=Z9;$MVZB4oNwHlVpYl4F4}ZwiK7|wIibfRU$=r?EZ5&Y)&q9&*MEkM>>I|Wm?Z_ zJ~$PU#ymZ2kB`;?EkHPh3|i*Z>P#AuevWh|e&?SzjDz-DZ%C9j9@?AW6q^iL+u3#H zj+j@(bzfUADk0C^c*b;_hNqk%is`ZGo>+*hirttLGV!}1eXP(227i95<@06rnzaDO z%PyC?0!~*7ObsB#CnXl)+?gG&@pYizb6m|%5&h_U{Y2N~X*q7SYHiO+Md)}a+v(Kq zb(NkzMWgZ24_%dmx0XlgC~^;x8E|a%*j0KnwmJ{T>;SGkJY>I(F`#kjU(hp4_bY~g z>i`<=%I0CAAAu1&DdAZHpse4<(=mYnl=brP6{7&)mUs1L()6()jpo-^zVO z$*zie>Xuo@&IjlGk?xNFoW@0Nw`?*KrU*ADNL`^3di-qFpdkO3h-fqnoq z2??rK@dD%qT6lTbLfEhE0wTeR!?TlJ1^!@G$I8+|#37GxK3z~T*Q&>n0pCANLoRJ> zru(3r=e<~%Cblsoo5=Vzr58E2B%6J~su)T`FKUeos9~wv>Q;RzUd2TyT(1=`eQdP& z?}ron*$WVp|Kl0ja2p7Z!6haM-{q&z;%z)LQD56vqwBGRNJJ0rLx=Iqz)(+}J&Mld zs@kQur6^aO0{SZhL)uJ^#m=5uXL=_u9gh7nq3Mj!%C1&)e{rsNj&Y-`AQGl}d6E_Y2nWn7#o# zCu}yYA3Ub#r;9_ysIuSF)!6c=zWP#8al7ws2qu)am4Ff)5su;WcrkUF2Ak1K+ywBU zA7PMulkOFLI_;;IG^ZEocE61P?YK)f`oI$-+$uR!)2|z0Z@6!dX03ZSdm@WI5puuj zn>42sb|K++jHM@YM+%{sg?u22F}fgH<5#CP8)a+vp?o{|8T349wE*2)JrdzlG}By} zD}ZpSX(o}d!-N30+|+M4T3`g4v%@G&)3erbGh0_&&2z%)3{5d{xnq)_>b=|?#`9wd z*iY;KyzX5nK#3#Gb}*H&+K9%)*PvruJ|CN`?XQpY`MdbU#w@6R*UPwZ@UboK0r$BQnvGPD$WhsO1t z>ichIi!}CsnfpBuz7l=5-h8kZ+q3!k<1&bkpK4m|-He&HckHZfljIP}S^j5HE7X#( zSAn*;%xILttoMO(?jm?6_QT`HCtM+nWubvBekwcLi$Y$CWo>nC;pe`8=O)6GyCm#v z&Yn|TrCUp`!Ae^5&}V{?km1=UFBM7Wznge^l-z>*EFT1Mo4qO)M*pfI=zsd9@gwss6OX8E1-y|2tB0%c zzgXm_QHG%CXU!^qXGb6^Wo(Q8PJgORstymW@6(KLL^+mhB}Fj)_6zn-nP6N%rttu@ zrsU_00g?a&k^R9!OK+VXL_XtDrkmVn#&2_Mp4XbEWV@MYH^+}A0><-{Rx*jgSXXH! zqo&R(Zoc#W>OTzPVk;MybflHb2TcC`&uWsaPJguJ8h=esMN2z>17}J6gukd;LEjO( zODF3Lm2wYCFa!Pv-Jn~Cs#i8lAt>*_y2rEQ>jcQ!kS;}Hcdoa9e9-$Ao6Fz35`yj= z+P%EkO~Co?xcApTQH0ED8g6Dqz}Reie}qe>H*bkau&MC{YnvtcJs>trI(>sOf;qfw zJ@4AA=?CauALl&!_Po+&^nYK|ck2X(T$FcfvII+?(qalc=*>bzeA`28ZG~BU9(0p4 zr&g9_!GO+#ShrJ~@BNb4lhhLu2uN_xXj7Nt#naf#n-~T${1s2=VioLuKhw4jcPI5y zppB6C_Z7zCOvI(FZQWV*5mRWZssOTpVeAc&2_ z$MYT1jvyHmma*U>tU|qZDBZyZTia64F?n!aOTeMX-NUQbG+b+7zES2@y3nDUI*;B& zg}h%z5DD@p(g(AnKJ7SKe3e2}`j|yUpld2Ae@2FMYViVE@zt>f?W3tQe{dScYSSr7B zwYm->N3ub&NFwo>!sZ9NgMG;QTqlJ0=YECW;nw?~Gv5Oy7daY!Els3pm|AZRc|=qy z%(RxTx3&pO7gj=qv9-&JDz1o@GM&yx`)j19eWyyE^pdgQC#{CHhU!9Ht4{-?(I*4h zhJY)>t0R|c=$zQ}CXfNH)4ZH{g}2MR{jt|lcx#29wvIxjxiCX0`2HictmQZwjL%{P zO(@;YzYIhfQLn-_hkqTfZAjLrGMZpFuf?(Jn56Y-1WBW9$zm*hW=6zMZP2(55Z_0M zFP~WE{lx$ec4mhSy?0-p={)sd60+}|BbKH5lv01;ww5ky6>4l;FWpD91pX$CQhT>tUZ3z*Y6p6JCZ9nZ8eGkUmv;I`gs2m_PCkyLuldVU+y%x zhtI7FeZM1d+8=MLXOC0{HvE(WQx81GXvUXHwP&mCO^<5d(?c;!Gah4a#;=aieaq6C z)j5Q;933>D|6N$%d=Yk+K4#2!fC28he4^(ik+5!Pe26$z`%REA;|lp(D`+jpil|Ve z{}q9vmXGbM;%6Qgs9LvC_~P3PwRgacA849?G)rF*{m1aZqRCss^iCEN38#@inM)3h z_ce>k$_25mu#D6zZa|WOFcDWMP0jnyO<1kjq=` z)5~a4p?xtd?0lg#t&-Ocbwv{-ctii1`=U;|3e&^d{1(uHFRy=zdBZ|!?jsZ&e`#yk zb=$ZNOYkR4ACoXKZg@$6Hc_2}mU>>d7aL${GGSOBC)&U3{BY;4Bq6+AfRU!R46+6m zguA345{q+pwf^mqu$s!07L8D{nD`vX45UjxY8Oh*Iscz|>h1K{x0qd>mo-MPN#y+aedjjA zo*0mjpwAk4m~Gl3w9KBZ$HdSZ5|~9;vY5R3)z0!^*yZ`hu3vucp29ls3OGG^t|!7% z^yia9V7X>AhTqX`wbBR57b&;Wk2yTE+kRRHua+r=frHl)ucY+sZ3Pn=k(ZYtbtfN> zfkmTc=jK1p*4k~)_WJC1z!~|ee8k%Y$EF?zkPT%c=|Q+^!>6(b8S|4n1hcDPCVCEf zB<^OnC0rfiTl^6QtdK-^zaX{sN2#p_D^X_>^>5`=+K;kuh)dFR=yfX%`hFfZbBMU-p9g_mS z7vYknG(g<`eId%Sf1gJuZ!Y&ljc^hLRVYjE(B%@_}^Fy*L{9 zisI^wT({jUb3Nuvn+ma8{GOwNXDXQ~JIvERf9x+LerSeW@%dRGIqq}HswzSOQitZJ*k%7fS|4=|;M%g=8H?b>5Ql<=hRG>4!D6apq_$b!QFYVv z5>pMxJ*LT^Nh8cR-8i^~(5w+t)?MG3d|l)?VYxEZ(2}tzYpb{D&m%j~PWzj+obggsgqYGl27ITlSyN6q4ixzQ zeyFcQ{xmU~);kP;ZpuoY06cQWhi`Ykbwrwq=%IhOv@Igy zki5yxHAQV6=R|R?v&y5H{h_w&FwZ0xlPCMl*`Jh-jfAj-{B)uAz-sf8wb5+1T}<_F z7ulEZT)@wV8c+3wi_*fqcElXsVOc$->PYR*IxoWMjm={aF0ZP zBhKO%02t_#kPfna^$so9d~s~&$#r>&*4p+j9W)Lm^B;0&Ra8J~B{R67LibW$r9zmB zZ#Fnmcju)e{~P@c&Td-fEMWgV!%-08DewEp=2`tO*iMOwbx*e%JquwT>kRF!w?l=o z$6C;n|BjEk)XXAymB+yzfi6=$o5cwqMGjsWZC@g$qSp(wY#VjZe(UCEXCC025kNYI zxj+Jch@h0WzNy2D%Gdt?n+uB7xeGm$io|`E*Cwh-R*fWXecm?Md($?$=&JRVJtO`` zi$$JbI5j@=ZlZdS>bS)|`ebwFX2N`Vv?Kz*D#`HD^sU^(nTx+gezG?v2Hdu7KGrk0 zio<*#cs0M=l_}@_vJy-kw}i~+pKUG<@qHPxEm5EITC!0@f&ze*D z_x`Y}eR;nV=85^5hWX_2=qD6)uuUd!l43^L8{A_2HiCQ>^Wslh2&ExyIq1CA1Czq6 zgMIpcpVv%X%~UHXgKtfi$m*VUbIo|SNWVC4O7hNB;WbcC+h+cwq7)H6G+Ai!Ack-r z7(f^((WB=#R8Xolxo_YFsEor=4`Su}^q^d$)NxWFBFY+LAqC_;k_D;`NUGRVyGvGz zju8uzKNAqOuKO%m5#^=gxdO{OmpzjgCzF|>)_3MvBs#<#&s|Zi2g4x*azoW4j|TGV z!ZDf&>9al2BDdiLnAx?e==?UvpMGU4Q%6xkEFA0B;AF-W-Yb=^4w^|J*i!Zc5@Uhx z+LnDXTHR!Id21n>VW2ZY`_k-S#iJ@zqSJXaFwhVnt9-w~;91SU0|tamO;yT#Mo<-s zT45gXBu!JJrH;FF$3KGS?s{d&oFQg__FOJDjT=h-1CVv*q?~z^>U@Yw$K&P}PfI~; z)<_oV&h5U}WGf%UK^ceU_{NDezUsNJL!$OS3fy}2IyK=Ex-U3M;DmZGj7I`n^?3sR zIHu7#-&+8+ous};4yjvuHpZKjDx%9D#^1KKdXLkh=#ng-MTjdSZTsy@Vg>K|vhW~@ z8u)3XO3yYWU256gbY-}Ll(sii_Nqhrm9eF0py;7$eXYr%pPW98$w~2rhTA}=Sc{^x zn^J_4NyDMCbnHEzOXKe$ygKcNMB#J_3uL`)v!%m~DkRDuk}7DOUY@(|JpTKJQzE{C z-oIPBSEZq{G=*)EuPqx|Z1xA03%ObMD;ulbdBxTsR=WK?5}Vhot> zI)leB76Qj+7J7&k*&PJ&65ZYeD;8TyW5G$Vx5 zB2GiZyLcXQ(4`>8pCw#8Cl|U_eb=2SDYg{)dgj)!w{XPcmj$6V;QL`H^p6)QCqMl} zDDvHQZ=i?XWV??OgC(@k-NaAC_lsquk>=Ip0RKn)hsOw8wauurh)DgvzyIDaU$Nbj zk6RfO1<1Wij;y{x_c%SjmF9;wr+yRU^%bNV-X7|*{5Xj0dj?W)x2`b>(S5$o zqCG&BtFW$u-s5w2v-KbLxY)yHFSA&d+a_xCIukY(eKaPS~=h*J-h)+ z<#w}(Fy^BM`NCVqqnz=skuF8sArNzgPH&pckl$&qD*(DdX?3;Z89gY&5WPgmKlwq1V+g$ zd5vXC-QJc}x>02DfyUK2Jsbtl}vBoV5l)>XjQZ)4j^Zv2V`co_Y;dgP9fdHJ^Ta?=OpcGZ;4%ZU zIyYFE`KW#bzMfx_dbP`rxV^kN0YHos81qEC?f}1 zvN$))d+^{(lx9qIvGDlo{y#FY^j9B<>4enoy|*zuYG54<2x9ogBe!W&10Q4aO+Diq zJ53+yL+!o4pGFD5&;x4BvV;pTsQbCugR7LL93V7oOhT7$X2E@XDlVIx;Ib_Sy3^=u zVfRPy{u8*saqAxgT;~i9%0OoE@CpM8qm}kDds8!IjbbCuTVZL*^*{w(jL_N6aNob@BVg{He};yWVVEd9+}gUAg3r$(OeA2RWHW z#Yj(o<%J|i@5qh2$#@xYJT)~TyGUzp4yAdjkI(zn9xNzA)qEw%qqmt1JKvNcS?O5Y zhd?cg)xj;R|E50^RW{yoTe_yX;JKy9!M(K8lww9V!02>J(9*0!9|nCtnG2kw&3L%N9S|NyquFMEWPdJRJDwmXo@qBq z%7s#-!*wEru+0-Oc`0}RZv7iwnyWqU@{;gow66g+4KC)mpkD(&xiqjigPyzo*6y;9 z?)@S3%GCrjN|610#PAB8^j3CD^qPWlv);{|tSLtGW$QQ1MfIfh*m8C;3l^7Iepy>+ zH-XsW^MPG=Lb0!){g~Fj?VD5Kj);@e`N~xAnv1BydW@(xi4)1XNAgt-N_Rpp5R~U9 zJAPA4M$Y?oolT7MX=d(d96l}*)orICu1gu~yX?)r?~{jqgj-l0pN-kj_&?eu+dNe) z?}W~i2PFWa)A|Ay^E!NZ3yJ9_B0zH1EBQpl884BRb=`f5 zRQ%PfNE#Tt=dsGpR8En~$y!$U(ki=(4k^n;p>?q@px9#PqApujeQrkXF0<3euUe~N z@XPjWLf$0JS33XH@Qu}pH;S1~%M`4Z7Qcy^qcWX(pGarJRRdPXS*IF6v1^q`Uz##L z7DSEk%iFEgUoI$DzE<^KL9w}3?n>t8h({*4fYXJghq5?LxDg*1x)hIM36FFCy!mrs zt@3n-&0o+`s*`fJQ=G<{cv~PwLDwZ!U{977a^FD+opCJCI5YK1YT7Pzp7pT#R$M^d zgd==`5`PNXe#QS`sQXSdU0&FAj&Gc(GpfF9@PGNSRmOnbcvaG1)3x2|Uie=XeBE{D zT6$ZC>7Q5u7xzkN8Q|;oWj=}9+}!l0g#ZTt1d2BVERIVbA*^381+OwU`>@R92X9`o z|H>aKnrQS+O^F6B|JnTcODwv!IlKCN7o*}%FhtQ-k9OVKfi}tWf@-v5lkzHbN!$jR z0pax_Om)ckESC3`qJpZxuPIUJ?k=bbJmi1gJv$)^ zpqHfdmxJ}FK_kg`YP*19+|Wh2JNji;hP!&C(8tCOm@XcCScjHTi=XG;84nVE}y(6;ffK}bu zL@6*$kdl&IeZS0eG;Use>!nu~(p{4S#LdB-p1w~lXe*&EFV_Y6J7GRs^qknk+jal= zaZrta<$Km0($xM^zg~QK?N4zXGsc_%sIvFk=Lt67-XcDk^-_%}UL_Q|o7O*##*C+U zTLh>Y6o5p9s~>?~I^Aajf+)ueqY5+00r6!H#~~<-%OaQUO^R09s!t9tf-6VGPGf%L zw2&{rZ_98O=DrR@;^|JTbRpvZ#HDnKgCn?$BPG?=cm{qX%ve9Hm) z^bIi)>yAGDK!B8Qh1iR2EpM96A7OJ~)~}_$x@wOHXjIIu!k>T9@BwylH12MGLOFlq zgAWUVL8jZ^PoW6|;(kXCx2xRy3`>|Kn{geFbi{G;GnW;Qg9miHK}AFSi{FW;zk9Q< zbvBHcyooSygA!`I2#znnN4cPkSTXoF@;OY@Cd^A7*!UazJ|t_tb}qbESGt>M8KlBN zP21K96`E{Lm^q|gTn>;L2rF?VrGKXnn_?=X>ObS*PmYjjGJ~ZyiV#Hmm|#Su>xKXb zXEBXz$Jfxha?l6$6fqluT|1itX{0z9)UCdh%o0;jiy1Dz1kn_2r8B_deny1n?>oN) z`B&DPR`|OI!VY>zlsePIe8Loqylr_@L4iPB4c!KJikX?hYyL3C`UAZxIwe`0XK!hk z2PpG>3NwWj(*f63xd!nhl!fu+_TKce6TToJ=%jfoSJS#i$DslIE7+au zohVxoh?#kHpU`oHuIu@LUjCa0<$KnwC6b`)P4AtjaZ%{CDQlk4H!yflC{C0ebVr`m z)il0}6w5S5Q`y15KR0W!M5XX|@^V>dXR#!7!Sr#wO8jb`Es;^9CC+KY!Mvre;w zj_sa3*>sh+HhlF?^V>4k;{rkr>dRv&2L1wO)H$TrC23lJ(ld8PYVV2pCBx7e#-4@y z0LXfF3h>Teq@__bQ?y(0kks$AzR+e+!uQVHMkL^!T05JFx73aOd5IR6`2M#P#>E#a zzBa%9*6@Z(Hd6N@SuSQiIzip&{or5Ojd5Eo)x(We>7E}7Zw&cx5Fgs&g{iSV5nQp> ze236hc&}TntaEDXd)B#oF%phUb-ZTA^-lE%!>{=#35@9nZYVO3S^Fb?sMNtWjj+%t z5YpLW412!JV8V?rd;}VQ&R2`QZi8f{`93Afa@8`XP{ah(BsN{JRvB32z1fkYo!Hju z?#AFkS%aZ1ZJ#6{w!46xX)AapQq4PlJ_h{yWxu-~A-gPw1QsDc2;bZprAD`GDYC+^&*uRG){+Tnmk0 z!&vkMNahFvO~FDz@zpk74eJ?0vo(Gz$Ia1Mgc=y0=QQABN{+V~u6T0!77JT)jt}Gn z+55`(&FZL{_=I1lSD{CpFi?+W-xJ`x!#Wo}&QLZll0#Hu&KQCMziTJdM<2BO!-gx| z^kPv6VK0g?B_^50TbpRKTw(Nk#N0eLVt}PPtv+`--MvUbb;LC-sFdWGm|bg=Z>XhP zjNyzaGQ&%VIgUIFVwZc$B<7bNg>*NyNv*a&w!v3j)a{2DXxL2oJ9VZg%!&b)O_?Wu z?V$*Zg`e3>SJqnVxP`Ws+bX`sG3lI)T&$EpBbfZ}|FY@b!pwg>0ZUjHv#v?(#IBqS zAX)1|cgLIc?fvs$;&Ppq{BjrcxDJVGi6-QS9mkchmcH+eSTC-NKK=+^fKYvlLxgd< zpinJye_(xb5RP&46h`blFH1Nr1(>^7N(K3IjM}DC4YL$xn%tO$R1T0e{IEGto43aB; z_&C|%Ee|15YFwNmHUBGNGdq5FxJs9068I%W%qT2Y;R+`VFnKTBAT?m+10}!S%YxKe zgB4M`GJ3ENrB2}82|FWZdt$lS1#&C>-NQP>OdX!u@C0lD>%zKj`$1Fsx82LrigVoJ z(YSFL{9t#Q{|x^5s*OwI%43+xalijh_qv+OS_iz5^Ye?@;YBn9r@;#u=tC=t^JPUk zlbGHsmv+thTb;#qds%PjHV*>kMf_X-1pgHmO>es4(tgK_+kNrdW0#h=RoVjPvKHUF zFQy22FgBAE0iziSuyq;lcx)aa>Gx$q<3) zYjrj}_3QJ*0j()T?$%J@ux2CumhxeGheHB@W!6%|YHhnLbd|Uq?ktlWl(s~NQGsYG zbwqK{=L_+Fy9%f&NDGfUCVw%ibuKnXlz#59?BoU%4q_l6QLrqCGYDNt|4yczy$43VGj@kF}U*lXb zZF2J=wFPz%?_@ac$+tc_TdM{be$uD`WYAFVCh}+|L3ns_HShC7bYnLjfPMsH*B`Rq z!NN0(m`xaT(FKt@2HZi?qP65^xOTF_kxmBc;$U46wEU|P^XE-D@|E+Wb^&C2Q~Z-c90V?~G$t)>tv=H8x;~yKaw&6D zA(OxrIq1qn>IACUG68G^^#Q335$Q_ubq*QUQ`fj(sH~eJPbZq6J7EZ1IW`$Q{8^TF zIDP~iUNqS?a8|q2dj;y%AG~WW=uG<%Xz=`6?Wd#v&jPq962yOJ)-{c$I6661Gr)S1 zZQ>%2!O@*uhCwE%#yE`kz&Y8BM>P3pE+8^vmt=nadMN zil%HVP@GDZpt8n5*nJL>_-6qUPDzWfV6cm+Azvm6YlRx#V3bztn&}MAi5NusD|nQ~ za6EL#T3UB+WTBIpeNO%ZGjr!0d8BjjO3QS8QpwSi=41#MR^}qfkppjdM{$U2H%hpd zGjeZpd9}FiNVAN-_M{VW#wi#>9j*Ih^}NoQ7kjkssp8+4%@uuO*hp%gMv31dFC8&U zt}5YmzD>w}(EkTqQyXV%D%F)js#Na{tkCJld2}*XadGn=v`gRRpRsnT+LV(OCy4W+rs2&hSji1h7PZ1Dz%D;T1*p9 zJ;QUYW#>5PG2S#d3#ka^s#}=aC#|dHKbMvq7(xvIOj;9I`#IiBO9t~W-rs8z;%27Z z<1z?;oZCr)IJQ8LYJ|Jw3%2dHF8!gIQPDV!fSfXyOHsEf_9xq#(U|iy!2axg+v>}X z7RiwiEd$(k|MTA-r*9^ce{#Hpi4piuMDkbbNia+0|1`)-1uvi0+m}wNUh`qb^o;=I zUG$09?x@LTWI=9~(TljtW8;rlP^z4%RJ_<;HtyFl z_LfTtPK_sZ$Ivfp;?I|!FkcdHn@htS<>HKU+kvmSLMDNXGeHjiVS+$LL}r+U=&e=s}2k=&B#WEwAw^Th>6vQ1yh2ly64(CQGS$ zun&!Efh3D-E4Dt&fMLLZ{e3EF`zmuLQq09R%KkIaF zA2)aDg5j4?Q{i2>fJ&29@WTz%o4P5K_Mkw*{4iFJi*OxB05$R6wyu8zYar~6C%ooz z^0I*cF@*G8JLOh!JaIe%G3F| zYu4BY)FcW)ReTA3Gph#TGHb_Clphjd&hOI zo3c@x|J4U|{*!*Sxh62g%>w=3VRMUbOv$;A)AQasBZQw2{_wb#?SJivgvN7+j2-zJ z7wRQqM#HRgUTg-%K*gINjr-^fZghB~B+uCh1&F-nzKaoK;(VXL$- zbf-fa#9I|Sa~XVEe6FjR1mz5eUZmK~-?MzX|5KuoZ)-T9Nbsz1Q&>pAb|2*_2$prpYOaJ?J_#~ z9ynKLAN|}Y^V(nE`CI+uC>$t+r84YedmNh1ay~6(q$|8m{qgUFB#6f-WplZTitUt+0#n(5IQrwbzmx8| zl=DJ~ga8&|N9#n0Pt?7Mj z&GY1er6@xEBa-#G+-%SFTp^vk8bf|n_dS&MZ_1nT`@eZEG~-OE|C!(QrZagiiI^Uk z+#!_%cGte9PyH1ZcaRx@$YC}maaVT4wB;{wXtFv?Ckctm%qJHfSD3uF#Yp{ulPxiB zXXG#km9IO7s2bAFJF_L`MHkwq{3?)!NyjGgKh2G=k{-D4ER26rN(u^Qe@M4csy#0b z9^fvfnyq##gu|c&6)8ylGb+-(C_Zm5fQY&5pG}F*Imv@6@tlXd(zkx&|4juad>2yT zX5luh6Hlt`6f_M^kVEf}1{wq#{K5<(zXS!yIlCT&=Mb$GtJCy-3FPC8%bGS2cB{R0 z`X2vvm!T3XC4}9dv%LnYH@SPYl6Ce%zSl$*xnZ4nta!OcMcWD1TYo9Syyh#fRjfxA z6p5cH{iz3g5wGhfk+3lX#X6zYuD?#E<~QIwpyp!NAu0&0PgrVcT7~)^8&OXUTogo4#C=yVXmF&$BL=s zK50>E@A2`3PTIkdV(JN(9Itm6|78f)Z+YdS(v&k|mnzmJ;H9OsF~>MIljQxM(l}J2 zUq;dOSVl3R2e0O;c6p)+fldVsA(NetUo}~8;-(gr54|vLPJT%do3+G0nPAOvmCo|>K zPo>&0zVnEy>Sc7UzA}jNsxQQV-|_?EsJ-btB1P@Kdm)XpG2nJUI*4XDw)2KH>WBj% zXL!@LL$ReN7xB|Uay2TqP?ms`-sC?WyL47`$ zQ3*NOy444*581g5465G)eMfF_2eUPr`OeT^#C3#_TW0;yjBFEWbC105c>;WlOAq}{ zs}AnQO2h(XL=jQP<1ublQ`Yb6gVx$&put7f!(80IA~fF56_$_c&2uc+AV#J8ncdGe zlH!ZU<+aCgNMi-U6U0V!RKB2&@wm@$Wmz#Ro!^*5!c_Dzl0_0U?xxPsLz>Pmpdes%GZZZC4f;bdi zbb)fbRFhFQ*qLSLog(U2KkL2~E78%RR)pb^$U3wAsDMoos5VP0%sHi!sYvBU~{&Z%+mBExK%m9<}HuHk^24&LE*|8mEQdk@!c$~ zI4^XI#gdnXCH){)??|o@LXe$(06D1!>qeHHsA1c~4Q#;SRn~i1L*@mF%t#KrR<<=O(dm6LO>t!OC?c;-yejU* zWGGxC)x~Ujzj)?kH*x`JvVB>lp7={)ai0{`K9+Qn)Q zA5OoCjZP2>PE+twOf10UF`hD>3t1)W-oVAIIo`TpV%*3y4glid zNJhU}7?{5hfBGvR7|RA3sVLkR2cK~l^Y-LbZyReM7DqH=LuYcTY4#R5Cw>9D!8apU zn^bF%8_)}%9wvW7fbEg*hS!@YieA}YSY7}(SW^QSDqYl?>Z0r@=H40* zNxDiF#?p~4F4r*BLMADllVR61RaEWV{KxS+l=742Mk@$pgISXLgZ*w@cQo#hQRroR za^*Fbt0;tlX5pKu{~NTgOY^L0SwpDd#tdLx;)I$UV1F1epdh285-JAu0kNW4CT&`k zy2zi7YWdZ%>@`5&;OwXR(0I^%)o471>gNx1)?__V^E1*=! zPSfKu7Zph@E+csd(x!MtRHuW=dbmfF*E+QnHW*<%(uhlrR6M6>4s@8F`zFq2oz`?I*ZzF8KO+dn3rRr}#5|#cf--8sR4+=&*?rtM`y;P~7 zE(CUcs*q=gyO_mca-3m{skwGxZ&8M4_i{HK!tQIc+JEOGn*lMN%2eSuLkquFvX?vY zezX_?fZX@3uO0q^Q}7r$_G37)O@fEtw6MU99C_kTUCw}>eBkXI0RC(HwW`yX+HY;02 zDcyQ48>2D0@mkpeXClnRJIIOLm*to=V9^rC7&qZT^r9-~KQvEF2YfWmx)eEf5#k+@ zv<;rBjT^SV{0j{|gVYo&O?Kv#p~NEJp(htyAnr>DJV0Ye zs(!ePGN9rsaqWsZYkG9AS-_2GQhV!+8tUVEKsRep%ioJ9$cjuCY4S}WkT5==bmF?v z>=$fIA^UBXG$F{39%>r~2iXtD7WaOt&_4eo7@^G|K?xBW>2*Id%6T;*seb>dosyKZ zKy6zzdjLSO_hPcFiQf zdXJC5QSN*J%eKTMYTBv&Q{YjotW862vvDxjZw)RfH9SuoaL!a7ENgDe*n5%z7|3EJ|gJ)r4&mc&J7XE zweVai28xrXDk2Ohyn)s zIwk;g9<2V{JmI|lUBG^MWg|!IG)|r_F934?PiQjGbOKcC1i?=RDnscib$Pxd9PiVC z>-+c9s7^b1Z$Bwb!fM6;*>NzaH{0(NTT}Hp6<9<9eK=a0pi+F#W?VsZ*UMKc?e2vU ziBE(IXPXywTAv^{R>0PnrO{hNMm=AP2yFRE#rkdOc~Ovo4R}LKgn`H?7AzlDs~xXL zy4Vj1NU&^;oTCw}v#5THMt;z(87AHPbnt8+k=86-v{+4TNaP|u3KU+tfS+I^e!*|& zlMeQW-kIej;(JR|cYIKkq4=OuC8y)g6zb}NMxRzuX~&@Mb**MnqQyY_MoNyWM@_9M{g^c7&~_exu>K(&=Y>U2$c;I1nF;*m7^Y`+sEL#qEFo7he#(`QcP~ z{la*>FYc9C!(sU`Fz|318}T;2`BW!|fmge%U(2>a6VG~XBY9ic9Hy-tS>6_YJ3P`` zFMjg_6eqn*gU3f5<)!oc~})y zuno^)cJW(Z1G#U5O9N?BA$Xg&k07h@g@vW~^}oxp0Eol(%tJdp4k8ObKR*A~58j&N zM54wW<1Y@Bb`c;%W(k1$Kv($SD{jE{|5oz#kwS8Z2CqGpA+N22!y5~$|M|PlhvN2{ zlmjT|u8x=Qy*txf{=-D-qzIG-&z?MHI^)Q8UH@xxlE4qp3*e-PT*Z*U_CyiQx2ZTTpOKv;Ja>TYQT0Pb?3m0%LCHB z(zf+Ra6ZBujrafe^98^*U!88Zh8WH9CD-DgeEZxFK-cjYeC6Pq@h%23+~F4G zUITPwoE_= zcUR}eYrwW?gT&gjL)>}(^AGoxb8#S$h2Nk!UIRS5f36&znTtt%?Uufie14Man&k7? zQHL_Njit=b^`LI%?c%ql2G*;4+m@V&18rxZvdnWanc=ai(`D~?+??8k*tvfru^<2K z*A{>MuU}evJ96QZzJ|Vr|9^XL0w>o|-iw}Ir)SeFni-8YOO|BWl5Bb3u!(I9m?c06 zn2_t>a0!dK7ZS+j{=yBsyxcrqLXw+=nB;{U0^!*hgNY3WV`DHF8!XF0UL?!5EXmq; zX-2d5^z?eae|7&`-;_@GY(458sYARmD*c4A?{T}|q1l0lG#yD!8tT zV+5Ygpo;9g*D3lHFmi?)N z_daVL{zEY589(0xK$=i*0HANvej5UKPBBElc2({*+B31Foq#wX7d?%atC3}?W7Fho zNF6|A9Mk4$+OI5l)S+C{!~r!9T{yMoX*?;zzN8`H&2OCkZ&=|B!%5HEb|NBuJoytp z1PePcsF1J6!RC=J1+_h?gFdoO@YrV?2d(w|=u$lJb-kdGz$2e9FF92o$F`5pGB%%e z6HL!hmAoB1CE8 zgyfZ~8Rc~yD93Dj!No>SzdOWqov94RHlvWy^@yB|ibom3V27 zeVmfC#QB$dV_r`JzZX9lSal!uW&nKsP5`Z^j{!bYDV%cJg?gH{andZS%Rpw!sYe+g z%21Dd@K_fi%a($y19H~M`d9`uWq_=kWeHgapyuiFtW!hE$&D)J`Pkv3Dcv!J}tj&8I=t{{)~PyR{?m&r{@an1DcRB(Bu&(tRa(}6-|NN?L;2O zgb;ch!&1=iY7uy8JUEpZ_0~2Wm3dg*jW5>P?Z>hQ|LMupOVTA60D*qI;EzoJgFoOz zHU*+qOvccsp4t`VwTW=iB&2h&wWa7%e3WBd!0BAnhm5$b3mS=Khy$`tmIcka$b%jo z7dR8-;M;njwJalay*Tfx)*<=%U*2WML zpEO~q@{qF(q2}RBk53)zGVcTczZQ~Nox}y#b|$rhUa zAFX9}S;(}UH1srI*Gq@iJm`|oI*L$+eNH6hT_T_V^`?3Dk8m%Sp}d`aQTe98$@~9k z3;U)aar=q@_5I|KA+i62dG6T1EDtVl=n|3#NLy%`pIje{Wi$_Em^5FvL-V1lY2tvo z3~@kY%BipG0ng4X4?W`40S`&nMV-7P{}(*X*K{8DWeEPD^xOa}c z8aO3a0Wc5pXK(q30sYSI^db+OIx{t0%>V~w zY_Jn9?FfZgwE7BxBtb!}Sn{c!Mfoz$`U)FHIxEJwM9#B~|)>`XbFnzFpJ zXS@~7@(pXbSBjrbO()?B!tr?6duUc!?i@-VXM>5}*SL%MqfzkRuUlT=R^Q z{9zxd2O3F3;zm%A>AGw=_57eNXUkEKT^D(!%4vP#EQ9*VvybIRYh8`o^{_3_0Z!V+ z^_ZO;+kn@fuJhI(>y|-E*UZC!@aeXOtasC*A@Og#6X4{p01()@$YXKm0?&X?UVfgO zyi!0Kc0vZNp~h_+b9|uVQe`cmZAx52;K+KsIF^18;}1Ukfxbc-5C3(A2fb@rcgkdx z2wbIPRz>;q$V>5;w)JNC;va4T{H_8p_!H{juW>l2-Uxv9b=os#1E9x{j-z>%z$;lV z>jKm`+o^eQT{|Y5+0Co;Vyr|q4W}raT3?{^NP$7?yx`f~(fo7lb zocv!u-elxc)vabZee9XU^%&SVX>0;QW^)(tHk@el4#wxmSYhp`kt9BT%hF-5MXq$= zdl&G3W-jau_I?n$3q?uI_t5u@jRW8 zt4V3^(#C^cSDkDut9TBKldgj&GQD5lF!G#O50lOg{@eucvOjcy1KKzOJa|Y9_JG6< zpLPU+bVhCf@?ER_zj`p}$Ch+N;U?CvpmfwPKd=H88qekWX7>)Qa_5D;=R0EcA;k2qj4$$T%;RklE}O=mPhhejuX+qCYyEoT`*%134BukIZ5 z+T;s>(@j|H@lfohV^Q<*9|Qy>1`I;ORDY;PT_qZWQjc(q&=E6c0ot4X1{&F>aTNfI zDPAP?)1%$qP4f* z;s_E*EK5G@1656%1>Bz*w*bdMAIRo$%&0?}5PXayZUyv8fPM7Pd~pD*BQ=ubVZig-65eI< zeSi^p@kK`N;bO7p8KAxRGZ2suJ@Np_*LCRN!nuata~=}ckT`T)nw$m3v#Yi(bpbi% z98;Ut$!=#F15w%gB7XUzt{ukpp6RT;4t+)~ZaeE@FLC`X5;oDh5@(0GBxylB!} z(SluUe$)*z#XpGk2Zw^*{=u+JjC?RapKwNn1RMc^nSn$1+veG{ZkjHq`3|4F1>g^U z_O$H}T8|%a&BIuO4om)3Pp7wIutk0mP#c>7+yqtfIjQT#PrMd1_0wg9`IAr ztl0oyajJ!+9d#n@nTS4hG%SbX3sy^;lHQVLdHY`_-sL2w-E^!@t~rf;dK~?O-TiEj z0K#O;ZJPB^f4Y#inQlFPKo1(@-Ce_;w6$NpX^2e;3CgpK$_6zlSa@0t|0>r$4*0y`&oo?Kbhm@H&5C| z#0g;|;G~ITOn__1F(kxTL(VZj6=u9fFX6qh<2BjjN_|xt5S;xV?N9f8;nATd`D8E*j*h60o3=9M|gdB5=0fUeMhVu@#MkdV;lds2uJnEe7(6$F{r6F+I zmil@OfOBm8AjY*+M(|%0>GR&)^;%VjA{Y*M>vv_g{?$(t8>JyQ%b#fQ=b1l)KOr^{ z8n-tC=&xCPWv-uGguyMO=|>RORHG1!T&Yw_2EOf_rRpG``lNLopzDgZW#wUFTM5&1>HJC_f8o$?G!LZ0ZxqR%sb27qKTS>!`TIU)4yAi`h+yJ{S? z&aeY%+5|NDQ-}U-){pz9VKBW2TN>mWw49Na(Q)W#rj)P>*~<@_8)Mx*qN9klXaAoUy#Vt6yH$ zBTxUc;^{!S#CuSF|9>PAHkW@{75a!^fJB_ZfjrvA4^oE^I!LE zYMOQMn1GP$OrF*Ot`qcGHzAKh8TH8rt#K`9pUBftm$7k_V_C`wQ3rAAQCHLCaa;+* zVLS{P^!l@P-goval~+T{#-LVi1<0>eR?SU%Zj>Tq^tckh%%JZFxe*}Ln*l76_J*LiaLPO{;-WVu&AJT$ z90Q549B#`%BXQx&Q~AH(`PB&?`OwjN;FAVKB9C;w_LJ=;U)M_om~E3 zJ9pT8{D-9-wZ!?i*#cF6#l*I;1sE zmn9B89uqv4BTqw?A*3#7ThFFh27H#YanML?lh$K-@<3Cc^=PPNEDIj_;Gr%ai!^m@ zNL}iY))3;I&<5qes6hW!W$WthrbE|foFaU4t6jo7bvL9 z;DTUe&p`%!KqT5YOY$K&ZbsLOJYk*9I;^l^wok9D#h>az|m9=0Cqu*;E;a!DEf^O{GzZuvM$ zB~Jfg!U6g8?`HV|U{t*ln{DHf7={{3VnTG5ud8Aq1kMDO(mV>^1Ji9K| zX+vFyma)7(F65*s2T#|*c7R8m<*3K9gpebV24q>nyvE7D)L|K|M;>*w3^=ovQwI>A z3JwNB-govb_Ku7+*34po2VdtkWxfA$$q8u_e&3zH|I6U*7YrB}c%^{4et|^?9_oRI zOq&u1P2R~-ITf3z-l-*L567>Mv<)G8Lp>YPrnEJo9-~ql0FJMQBl5fd*SGHXRyQA) zV^-(vAGgoa*xdyr{FyZy z0PR3_=eTIGkJKffj%Lfrr#|HU+K0@ue*QL`e72u7`o^Sr)PoHDAPw9vX&qe;bXk_= zpj)mUThA`9<-|)tT~;5LIH1-+J*3%2(A0;VeBel$)_7ieQcf8m<$iTQ2bsslc(NSZ zhjPR@-hjmUKwzCX#=b<8ci*0+vg$~kC|CnYy664IIV0Y0FB|gWvNOi70(9W_!x{Xw zOa}}dTsUXVyenK`&^+20Jm7@n+mI$BpY)jk{rW^6A^HiNHY8v3DC0P22$`n2Dd3oL z97zw$3!~1Bp74Ha{xOelGs>zpNkKBuDc*`!BT-VBkj?ZUFqC z-T<&e#qP=+FX9wxSe*tC~p+>zub?uGbjK@Mk3TW+Dkqm zgHtuxqKS%)}83`E;`!p-PnClUZPU{^9C`cxkB-uFFfIG>4|!;^as2~Io)EA zK-=|(1_1&*owbd?_e-z|{a?#jzvdBVT^w)lHSR~V>}-Sd8Ma%~HV&G+;<~0bP}~3z zVl0U>z!O5oV9yO5=~21#-ze|ssGfgpL}58G3-ypM&o6D z*3V1-Sn9bM0PdHI<}b(%Eq(~yvT4?D0Lu1Ggmk#^^h(M7%433SK5(0d`pC0&LE9Pn zHZuGZJM)*(JosO`lv zemu%>+*0y#GM29-WIIY7m-2}obE5ha)x&Xh+khjJ&+)|qOB{8Nq{H414=nI5Zad+% zMP*SPcWE(I&gdWPjXN82-bdH=d7phM;w4jK`+;D=;H~>eoP93WNL&e_Z8fBAP#1C5 zLp{h!;n0Olw}s_r17yE+TQ$$dLHlI}ctFS*^a(MBz%>NUU=Lhp-1kR*_q^TSMXg69 z_*W;yVVOKSkm>#WL;XMMi)Zo5Rs{c2_x&Mb@CQV|CuH!)a?NbdKAWDfZ&k-S(v#Vo zv~#l`nnxUvIP{2XK5;@$1RLh$RcIHr4|}b3c;nT{Ak5=W1!iRxfBtBl7nU<8EJR$4 z0C@=*I2JfAq&NzibC;W$~&)Yyz%d82A2YZLjym=jNKWus>`V z+RqG`JvN#~|BA8p8EvR#mC9LKYDz^k>ycC&wMA8A7Hi32i| z4_dEpz)2&RLk@_*kBndsId}~Gg!WH9hvX}1Z)n@+y`_6+)n50@`~IK*Vef-K+mYTY z{YEfH@ER40dBin@ z(=&m8b!VRpePx0_oOGvL{y!qW|Hlh}kkEE!O&g()+)sx*mLWvFeu@1pWjDJF>tQ)t z4!WGoPybBhm9wXo0jEu22huvQG4RDgIqxS&=bNhlm(4vci*jXrar*WTdhcF2?Cl$j zdUtPcmDd?#6Lab%fA$Ujq5G_lPZ@m(dcBs^}**cDPtX^ zS=NSj-7H5vU7j+1ES9H?O=OU!9$RToB^La(A)@U$lwpCas1@( zoVq^mw-)a7qVm3oY}S9xvHMeTTBgO_>j!`J)eY&*Qa8@vdFJmI^zDGJ&-gX213rTZ zATzolW~2z@_{nVm#<$U=H2emDJVI0myi~>npbU6QCc?Z}(mStpWKwM@t1Le!+$5L( zhtu-&Ke-2h1qzdw5V)qnw`GtsQJ*xRmTSHru5IHdCvT#9)ORp%0gMG~ry(Td(N2(K zoZ)wXNW`I=luN32?_TCDu9uhbG>nL>`kMgUjtEOLK6dd5uP+tyeza$f*Ceiqz99Q0 z+5s~33t8iM7XoS6LCZlS_*2ef@OXp>VEQ5}V-M)0Y*HssHu0DC^>@y-_bN?*V8Qr^Nz<1jwvuBUFEEeTv8@ z?O^R#0AmB6B1FsV@gfa~%;3kf-H2QT*d@OTxM%M&@1x6K^%~@Co2yYZdx}j!W1Z)H z;^JO!uYA>Vb8my!96Pl|>=PxR^&HeVbP$*r>_NjG$Vilt);8mDXm98ufnP3BA3Anh z#w%N{-igZWW7_RtKXiR4!%ThF1Bfy<1W#vf1bC(ont@;Ae!+iKUiF(vCA|+V-r-%? zdaQbH`;&EaPfzyHXYL<(s6Uy-XMPdn8Tc9S0d>&VfnVbjIr}%}mOsUSFFsPlAsjEc z4ZwI7njyL0gyBTtA&rg@*<9AUqT>DyTL5;450y&ge*Q5CwhaPD1Y#ef~Wsniq5I8f>_(9tn06X||Q$UC_|D@ascvsgR z@5XuZw!bR*BG%MoI+*U6y z3y4G-_C!V<#EpXdA&qiO;4x{uln!+#0(Bi)-{ynHu>rMA)8x}esE;`HK$D05lLpQV z9&w!M1K03m(C5AXjC>k8>Ahp#9`C)2Uo*dEs>ZKV%rND$nSXqI_@TR=O}`}F_Y3~q z1ORd);CCeemx}DOfAH*0fUrz54g)*OIGuDJO2>hA{-QaTp+;upX8sto?|y1KgB z`aD^Qb{7Vt=lYmVj@ zGPH#YTO<-OZ8PtLFYqZt`>|#=NuLN3i+pQ>=f{`MzvhwVaS5U0mrC*dbp3d`kG9;Fk=BqnY>1@W zgWwH0GUV(h_^=0)*3ot7y1>_ZrcS9hA#eJ7WBdNxdl$VHh=_^utzgZk2ja|MmgwBS ztsDKxpFTYNOX(|uJAyo(_-AI&2Sm{41^|#}{%AfkoDVplUlw*{P6umx10YV2yYtRF zgJ1pXS6}St=(yvmtFC&xIFH=vtK9_WWGXB!!GiM!#QB5512kDSHK2n+hkzp&aL^%n z#c3#+Oo!Gi?maga$t}oc{1*ZqZz2#iWYa-!^P$wC-rj*@xrR_q7Ou3|H6ua3WEP#Q zYz#62p`R7~ETEJDjVm)I14rT{w(=0hPb~bxY`r*Ysa8uOZb|jWaOaFXDJv(alRo0zL7b(LZ}K zc+3livyo6JBR&kD%}Uqd&%oi+1~2$G{JN+I9m-Lz;P<%#o-5P=-$xzB@1Y}d;D#32 z7#wC-GK_;+J5rrlUq z!Hify{L9QA`Y34N0ulI4V3z~Kck!q@=&)RU3&rE{Pyr8*jEsnDNW>H0O~^M_{_8cN zEC1#ljh~K%z2;ik1i;rb*<9vZ&n5QX@!i2!#D5(#WV%);K# z&|o$MVpA^kUUPGEPVCKvo|^=zwipCV88D`jq@R9kXwfgEO$Hwx9_9uhAZvi(70L#r zeJ0q84d6E>sEdA3=%O!4+u%P~>kO2Bhs2ifE8|PT4`WRi+GNp{caj<$Fe=&j7$CB& zfl;}E5W4M>=<+YWr|Fiq`aokfg1@xI!xR6HzLMDZJ6{|4Zhy)=^auaII!Q%xA#H7K#SS(ETwqura#V0`0OVEwCd6Y~ZFc+_nN%xUgYC=a z2G5b_04tUb4rcp)`0~g;Ia*SJHk@=+79+XG;F%48;0bAp*$_zZPheq`c8((Wiw+z) zEek|S=(KDUGO~%u$by(Te*CyOvl4zz=nA%2j_6WFEg-&Ud=!-y&Z^+6X5p5x55QkV z$DD-;G=3`!yYX9*hh-7RMjRX0NZ89pzp+03#CaWF<0o%u{8S+0$rA$APuPga2aQ4> zxT1bZV_hJ0`#1YH4<~cj0GL2#w@~_GScIa6ZXjpG|IJ2MY=Ho8g1^`;Jv20gIRP0K zZgV9~=0;kAdA6yk3A$O)F;H~OLN4n92|knxZ32qh z5Qb+6ADVnZG@Ur1=E-;(x%59EZ7SmAOPjd%nzQ)=KQJ&bV6GBLIRy2fyqw2uBE=3t z>3dK%4%|E<@FU>E4#wEBeqe)vjRg9GW16x8(Kll+kpVYZE-+;7cwO}TFTAbk=C+1V zV`0cde0r1lx!;b|<`3UJcz+@I!w<|_D$pmcMmn%|V&lAUP`zMD8JDVW0r(jc zeU3apvzYhw^%=h{(8RG`(0|Pto6tB*lSi?<@aG=N{NVhKNcWppM{k2y`>tA|d^!{6 z4LbGPYh#P*|Fajk{qFu3j>qwofH}*=+|%=tIQi%|`;IcC5#(qyVdsMrVd2ajft~Z) zo*SSk1GI6_NN5KVb%+~gflr)}Wl0n2_S!rx1I`RR;x>dW$ip##BNdO2O^hULCfI%r zArr?ztjyOVn=ICeaX@{vJ!oV5&%G(O_VaIUd2=l4)tONg!Rby2{+sq^x4-|czHjdz z&dA%@idRt?_-%-FQ)jO4fEZ(D`U&hro}fjW(thBXG~M-eR%`&+*;xcRG5jE%+&HxK zNkck5oj-8Z;^1mC6)^ObN!jmh9^NHY(U}0@Y?}7NadhyJC`UP$W|0L7n=;*EjwyT& zi8LU`7c$bou}}dbV-Yj>U^0{Z-Fy4Le&21)k(*b=Zk5tSCIIuvZv!CgF>5qvlhphrYswIg z;L^-lKnHy6h)EL%v@<3zc)54237@~9CDJZmwGgrbDID+~+d8s)-$3!~hmKbYa`7jG zo>@x;+KnO~(4eA#u#}RQ_+^wcgCYyT01@ z58wV^%jk_OqrZi%0}rAVPd9EFD{Xnp>gdAzKh_re@IC#{Z9bC5C0r)-k8_jrkdX6K z2UiACy|{Bjq!)VNoMT+@32AfAEkg3qHq&$cQ{;0A*N5}YZ+>X2Ih%tBZD-~@Bt#%X#^Mg1A5I;tt9rpF z&4nH|Lk11|k`EkwKqSgJ2ILu`{GlEp_!_64850r(NFMtOHgOxGzewmGWwZ-zL7Fzu z5dCKcA2@?PaYFI~YrDgp|NOq@H(kHHZUxSPs&zXF!GCX0?$Dc80pHWX1&1{?`G2Enm3a3+F34uS!3X=W?{AJWPAlrYLcPO8At&d}VJnAcvZ z+yC;aEbqDf>BH6oG`7Q$rt|6cm%>>F^2wAdRiEQm&jJ`f`mG*I;#k1!#DGOU%kw=0 zxxSIyrvG zQV)2!tZf1u{e(UsX&VQvHvoa(SQhR6t9Lfu@VcdP$zOU=?co3Tw&btxxVQhi+j@&n z`!o1!Xm0>Y1%Hk;A;-^#VwU0#T&j!(I9Ui$D{&i^n@ncnyz9b-^H9DL z9)N?V!DVz1Q9)}6SfgG%DAPRZ5&Fssm#e7bV2xYA zXA_`Xj4_7KaI68jAs`NY=wP8kD(cG1^1wggWzx?MrRtV{aeafgU%o>5sjK2%ll<7r zx*}x?SL+V~Ph&I?{nIzix%kq>v9>Qf(*MfS`!dH>dvx$)fCG;>)>AC}%&>#<;?)TdO=<(&)0%Cj!Ii|uge2yKV;m_2WKPpFZ8-TnWPRCzN5M-Um(=aQG z58ho~U!2yu#8hy(1n|<4%n4cC;Cx7MGG@|%I#I425^|ew%XJ+NKXWX=afYvIA7DVz zJ*C|6dU+$&BfBHsv3Qeg0utVpi&I`sJhN7w3qYe0klGq@ zu{*ABTJ^^B>gNC5T*DdJ?&P5NadDbs&HBb5vj(UTC^^<}7{`%+f^|DU#%pQ;%0L{}l#vJ2C zXpbpqj0MMw>I&rE9rzd9vx3Z;LOk&FR|=+dQLt|EMVQf!T8#KOdcTo34wsPpeBK4%He(Q^6{Yk zawTAgJQJ`;j*)AQ1_Lh~4||{fS)=zqUq9^Kd@j~hsYsV(4ON1;8X%u~_f~X;TmSie zZP)+K<*9xD_=~=+-`|osBu#={bTA~11s{Ca20;NhgMbbakb@7XGj+*>MQC5*w31DW zs?i0slO9Llq>0;5_szyZGjme_S_gm9;30+IyEeS^Q#UqW{%NmUhKXNEB2xvX;azc zHUMSKGbJG>5(*QyVJVqRt6=clj_^|P0MVgeKz(Wnum6pYWK(;OXZY@OR0_w`5V+1b z7-<^^&BR7R*QGPS0@ken^vG{)!NUTtW$*=w*+_*Bb_?mM%x*vKevHP!o8h?4?!4%#i z2o>}h_Fw=&|9}HxjRlT5N1S>L5E?>;I>|FlDA2?Kk!+egBeeeLaRE-6xDC-C@BnR` zJVNvnI3e}r1AoEDhpvn)egCEP7hSi!VOd=y8^sxawKsa^VLxfcgPW3%fBvEVhqoNb z9F_JX@r<7VUk7{O4En$^Rt)}t7&GuVc7zxw;Dmw}#|}6W$Mm!Xe;m|p0APj6B~GgG zYP9u8XD{x?=YPW;6`LVa^NB=un$@up52Qnw(Df7UX4uA}fgs=_d2oTKRmCCR$WPmmf z8VPbF(l%~{>JP^g(8ftKcoTw8obiHvBGmoH;Q~vWgDr1g8(I9pYZ@-Ocz)fYNHh@k z8w%Kze8t%a=)XL_eqx z2DzR5c(#tC&kzd~79{otW6vO={Qx}Ba9GL(H9W27$rXU@^7-kPo0iMn%MHkwvX=l z-lq8O@4c8lBtILAqf3%?aMVEoxTYB>Y)G2|+Bj$=E)t}{(>Q3II6is*&6VpaNEx!IQPj_`j}=4C8kN z0eK*a6M~nKS6_BUV!6gF_MMeT(yqZ|F4>YT`u1#O{Lw5%4+_SsO}3KbVi-~W94=bySi{)7F4X?_uv0bif#^K74x zfuE28UqgEwF(!KaN{$tLU(Gc(`LsZ{0hn1cb5h|b#0gJ1ax@r>UVU!;LNl#Tkxrd~ zrB=@W^}?c^u^f(rQqBf|cIhm#Kw*Jmk1_uAVdB~+fMel9f}YWpv;VYg0>XoXgBzNg zn~%wY*O}h~7`@`vfCkwF3?#$e-^wk4r}sy_KfXHdT{utP9+(T(+|>ZI+-w9=IeD>> z7d)>!+6ZYru`Y3UcB$6me0H zIN*4RW1=B&(r6csl^>LRZNLK;%Bzy!dO>*6b<1K)FIikSe@R=Q)4V!Q)+_YiY;p4X zHSw2k^?PR5=*Ca{$MAg{_azTX!_YSdc0gtXc=8$SK{NPctiWf`2d#0AB_NK01RM!8 zd4xuw=9ZyP_aCG+6GWpd$#sLZn#zA5sFS?*5xTNSRex)bNlbTx_La{kbvJXCC zF3QnCaZEa`Ilj<@`Y7NrX`DO<&mIe4{OQ{ohXrikAYEJp11$?X>RN6(FS_(Y*EA)L4y1>k*_+Pn3AeV^2kOlO zeG>7_yBo~T$Nxap;+p-WME@gw*~4FbI{w3d_}TEUdy`pw1Pyl5ft~?hZvq(P0W}Uk zM!;uAUEBZw*Xt_BL)gW!0bWdnt7=-WC_9~q+W?$CYh$qWfDo|$8#*|Y8`{_7 z#kcilhtnCeDL{u%oOY&70hu&jibov8wMi*HjA~_nsZ*)Tzjr-Sw`3le+mGF!t?~Ae_J%I zJuer$Z}rXpH~ZPa#FtXy63apUfaFy>RFQ6$_rz{r)2=hDP0Dtt zFG^y7O4=w*=|Wlr$3~O|#ys)8-_3t;eZ7xT&0^nV@8Q2#Zu;{je7Id%z!UnBN+NevA0De+o8{y0>8S zsaERBz4iL2{j3A|xq+|D^4achTtAJ~jZwbRJq~Z~`eeou)9ZEUaO<;VaClvCN#qJS z;y0UsX}5Bnj2+2Af^T7eT$#P{!a)~8m8UVHq(JlH)0n1Wm;?X zGsQ(c`SQ#>#6mDC+4a`X2L=zWXWeFPiwJ!6IN){FL+i=Z#r<=B|Ebrcg5w)(D@UHh zyp>F4;)2*muFDZICZxa-_rW8LZ8eCqxoti^B5F47liJT{wskhmPZ#0j(-!8nPB*fI ztf%w88t(wvfTSdu_tmlM9MMXTca*xy6xe@jAO1+i$40(->C%YDyYL*rsywhJWplp1 zLr&y(XP$P;)VwUPQHT|}L&FL#V9<;SsjML5>|W9cYa*w*zB(wso>S1uy6<@S=7my9 z-Lq;R zpd2r_@uxmL#}F><6+WY93PZT1K>X+<(8|M9Tl%FAYkJpDc8~K}r5K&~mG&REIurn* zEbr@3LKsid6{&>rd5&v6e9gO=Z}jf3QW8f~<6ZUw-MnLkN#1#Luw1Xq&DkLpPFH`+ z=xwdgB0|DFB*gAaR~NbH*FHZ#uY6e3Ca{_rHuH{M4b>hw0%L3YNMXU6N8kPW$@~*V z^7-b7yL$uLhE1xC-mmvB2d$YBo@>LOIA)iUz2sOhW=KiFF=x%`cy)=*%Oqi!;nSJc z#Pmd3<-^#y9_2{e_J&I`7}{fCv^`JhaSgw=jm(F#FYN+)N6E}zG*?lpnX2rYG99cg$K0aV3FrEepH_qcw9SmJ)fb z#_|Z&4&gRQ-z#pLT*2hoWRJ0p8)8AHyODeG!j`og2*VR7<0R&6i2LRja~4_BMbhk9bA=cx_UZc$AJ?d4Dl#)x=+RzD zP=SHZn%q^g{SSk(lUq6;ns@wiAoWxh`Y73L#3I$3j6BwVawh6@@$gPfLFwXRrtv-~ zji=@BEcI_2yj$E9{xIDXXIHUxRpf14B%7zC_w@U|kR7l0BJNhVEJWGEY(`u;(g)oe zfIToX)Q%ILl_wT<{lQc|PMX2LmRCMoXN z-5BoyHo_)+coJTq^ib||1?cb#E;-aseSML94_ds`MQ=U)uJ3()o24N4pD%L`YF5?t z9$uO7MP0-dPuyOJ+rFdfWKPIZbgpJj+ig|GPttLu`Hym?A{5SxsgK#NaygB;KtfkZ z?>$QRXF5s=1L^4_oPS#hT`w&1k%>f8zPFHPD!iaolV=YkuF<83 zf^C*JIl)t0^6!v_3|z0H4)6oUqoLw-Jg z7Uugx!1c+-R@^aNZIt!VV$C1Y&5p1?lp>XDZC_%le{#VEtFK1e6lg7=|gxt!{FlGqn67rh-%G85^W*6UQ777p!j~@5{+8#GJUwH6Eq^ zaQl0^q#6P323t)wJtC@s0seEjs`_qndHsh*Xxix#GNp5C6p6*t74wDebxVz_rDT;T znfTc5Zj#J6o)K}hN1B$0 zRAwmnF@~KHq6e)JFG@$ zR{LUj?yY7;`%t^wn&9EwXtGU>uy*;{aZIbCsp6r=P8I(Ts|Q_d`el2LE>H>lK+*CY zP!G8NKktbW!oz#y3@W6*X zTf~(Z2CLd26eC3LkXkMuW|Wie(8-4-XILmXem9`;<;F7+f5z34-2usI|34 z_FnaPjT6vSKK$06y(-g@xVj#7womi^(-Z}Xn{wLDT;N;mAK85Fx!|4UZYVcQG_WHz zb_)WUxM9N(yQbg~OJe2Kz#3K}lz&K%jb`sY%A^V!rLt8?nm+Hd>4^ss?GH;Lc$|aP zZ`ehBkp2W87h_qhqqTqLMMtii!vMRga!2CqkL&%yLRvXSZ=DBcpfCKPGHQBVQ$rJ3 zt~|{0!fHwTRID@!T?k>ddmXPn46u0a%ceysa$oo(;L;kNg1C$4 zMshtnFv$$IV!k6o@!^lSMVJ@aRB{Xx39ynA(2G|t7b!qr-7(1FE;p^Pyi1CEIc)LZ z@fqD~J4R*;{vb&;74HmtmFpY|-WyL2(e1kT5}%2>kqC2mNsi9n{sH$;cRHv}8SB!t}V-SuC3cH#eZ zbm({U@3^`Ta$g6Iih9UvB{`^-9xoRFq7%CBX`>(N=V~RZ3Kg`Fy}O8t9;E!(QTPNw z%ex%@C9fR|Ls#yrlTugJe>7>0mKeywki87Jb1n8Bnez4M#e|;%Y%|^Uv6IED?)T_d z7c*ayQg<_E$Fkdd_nxIFQ87$b+xNLqZzaYIB6xYO-W1y**C1nW=cG2Hyp$o0EHr2* zkMvqi?Ql<8r;*`hq~2fb+jk9;ysj{*n8OEy6Gk5ix;dPvDjOS_%;p=v3x2z6&U#521T5RClu>=6qCAnyw zjt}jBogGgHDUm6Uq&umtv3T(z@kP1ETUd-EUqcQ^^;B$rV!y0B?dd{(-|Ffu0m%3^n{fKyb_`O_jCUfq;6PLAerZH4~ZLq%Y0)R)X}i6s2L&45OQj~HW9A4 z+sLy&W~2{QCp!T%PO{&(YeR94E5UV1yw#~-0^=0*TFtt7lydx1m1G;|vRnziY`ISN zZ#M1pZX9Be)S&8W#byUxzq6eBt{3S_k8j&`|0YGE>B5_S(#J-wCe9*NZy-6R=CW0q zkNmfWCU~06cJasE==6kA+)Mr*+QC0fm0|j`^q$Zv`=5!yBR@f-4&Sfs{PK8-yApb+ zyGV5x7Fi7-e~%m{=s7!Qn258!Fh?=4Z&^2No`i&6_)UD2s-Jd81vjjD$!N)-UXr-% z{zXSJvnRT!Pq~5R#GV@$%C*yi3m56x`Ay1_eC2Ou+D%?tlLypJCx2p!Ffg|EWWMb} z8a?b#d1vzPdEnt<;7#ovPEO7RrV7lBwi{53d)!FP+z(mq?pN+4C(@N9aH|qDd+57a zuAV=gkUi=Wb28Y+q32T6mbzzc{n<>>^23h9tv$^~Nj4a3n1oQ_@Dy*a>TZ@;<0HBIpw_=SgP~CQSd^K#eTfV^v-=QWen#(nVyTsHfZe zkNrS0u`KiY#ntZd@a8Ck%1V`uaT{2n+b%njM$BsJhUM@Shk1Pg-|W;pLl#r{QPyiN zyAT$Kgqs?46h8;<8x!?C@L`b*$HPIj&sF54vQ8K~qSY?dh)&4x5O-9cM)C}t`1sXK z?8h2>bewF~v&_B=b9V1#%ddAQn2gHR1_V^{I0EnMgC8IMXTkruxI)2~tB6I%!$1fA zyv=5uqz%nbn#1%n`(kl$*i7tICn)J1HyN@+qi>5JMd_^r=VB&J8gdri={kDtY7NsT zdOUx5Gg&_CvIlM0_-8>fNAawGe%KYco3J-M%szS0rrl%1_*-1_Gl_Wn?NwI}serLH z3Z6f&Ne6rW^za;Yx{~}671jMs=E;5si{A?+w(@DGDe)3&S{I-2xrEK?$>_gV&7-{i zYJ;UkT@~aQCmBF;}_LINJ&cHBw&8x#z zd%9?cGd{dtzUqb56R8V5upy|<9# zYnuK|jev<#j{)+0iAQwT*~)JAYafM{6$LobR(>SLZ5pR4Jhmcx0~}NDMA!6*J6pNs#JiS|9t@|NFoobg|;AIuFoDSXzl_uOnBe*4NDR6s0=h=zfc z%a;C8c&PL+i*-KW-emT((t~6+;b6Hd{8#unYQ9ym4%JSOf*f_Oz25%>oLH)`Ekp8( zC7u5z>06Qs2#8)4UkK!pMqSZ*gFFja+hO{Aow5y#tE^!V?C~+)Z;GN@BLdN{KBzsY zq3e?4sdh;1%6gUo4||p)+qRa={k8f0xak7@i={mFirw+^aG&GYU;;V*c3-KpuQ-nHMoohrulbXAxWr1D2LbgdNI9;P&7S2<({ z;-yMKeA>?`o{d9xOZva>*2g>@ZL*fgrS8=X^p#3Id77M=v%2jRdT$8cAm-zJ6psDE za$2g#Yv`GlfA};iDg4jD*Zyar)&8c5D&j?|&jLAzFr+wLdFQQ^qPqSGNAQP~A`##* zS3yw?AQ|;(8Bh&3Auj zaVFaJF8AO-uFM_&Pf-e!GjhF;L5};E)xX3;XRnY%y>nh>X2_=wzFgs^R{;(_M)j-_ z_q4HZnB?3jA57*KYG;nsn7t>q&~qs@nxy=qZc}>vKvqmJqLSM-0niDnQQ`N0mU82x zo&i7j;YR^#z20bcsQLZd+i$L`H?x!b>@ zbGQTCG|bbHX}q+|jTUBH7j=*ZMSVJ_Qz-zwVtu?-6&J;}-ux&}Wzb&&F5$#JaliXM z)juPyg*nxR3~To#+d-El&z|`63)nI$Cgc2@FRqlf|5I}0#Nm1;U+=I(iM-S zA^fs#hSR0*Q=*QRQxxhlNb|KmhYQe?i>9E+;ivCuM9<)%grj^fQIGky{O}HV&*)K1 zW7MCo00hSP>*S6-lII=yLrN|oeqj2zzH@(HBT0}2=|J8RRMRvE4RDBtD_!|&`XoQ| zlgriFM1F3DlgHHo#m9l|Vail+}-YvKOPRT)8pog3{ z-{9!e%DWKH{m6&$E_}PVam8}$pz9CTC z_gTMNLF-XVMZuSX#DC+*__Z5IU*$N3&1jJ{4z9nE`6=r+PZmxDn&lOLn<)k}v+WhdXp6 zYafKk*)la(R^>N@A3D>#5Ko&SX-^e0<4ScTh4Eo;8Bzz&o&~&g%M5G^OIN&l{8gxd z>E7YHrH{Xbku^;?Q=EV+JACmWgsj^ ze`rDu&B++>L55z+hq|o%>%=Iq6(11(E6%BnlDQrzp@}qFUc2+!veFrv@ELTyFt?;v z4Q-Yd{CI;wtf2EGerZ&L;jC=q#XQ+GkW)T*K`Q)W;=MXMFl_~_+r!tEKV(sHT=W-w zF?Y;Ukhgf`^_UdJgzWkX*w8f(K>g#;z)_Gx;(u(u=^6vtN?28y09g(z`E1q14Cmb)L5&91*;eaBz>@?P1P_3=t_ z=}UPI39HJ0KGSQ@tfH8ZA(1j=03vk=B6^f4h(GRx{o)cyN=HcAT{5g>#(r<4b{I!*8 zMZ*yFzGqAWgcah+zq*^eNX*8a>;!48wx%GP?4B5ta@Bkjc#pY|+BHj4QvDtP?3<59 z+^M*`-ijtg1*^7>&6ZY*h#|xT?5t|92e74eAb%|EcQB0V?y`n$TE4qHeCMR2^Ej=b zDEUh9bu!7`caLk7yruL<+whEuMK9%BQ)qnvVHan$Wb6G>K8~D9O7uW>`b@p+jOn@B zkp9|FyziI*L485YN_iYul5r|4uWM<+k+0|a&0jg!yki@(W+o79edL-Yp%!0cW3*J2 z!#$?Nep=MdF19I8Yom)>T6KPwv-SuW-qH~H4S~^C@kTDkhAZt-O#0sQ(dqB9n5x6% zN}#sRR=}mCTX6tKPSm#*WDC}N7ViQG!x&TwR01G4VjnBVUy$t|K;8sTts+6wze!R9 z+c`R}`>mR)t$Vvf)X?{2LukOhiT)Bl#U@y^^*di94b|ymx9rJDj)D+kqPy=G2i+q%TED(AaMS_pTC6nmtXT0AKD_Fq zyqfwxFkwca{^!k#^ANd!4{~~fvuW`teyiOLXLB_WEbFOsrIS3(3&aEGe$n~@cl~Qa z3M-7t&Oq&e%cq5d8H>K1>Yrv$$_o9J7N31)N!~)-4td^wcaZE>H3>StmEr!KbYeaW zJg9LoX!Jy}43(TtC*31PM>s1h&3p6O%R{L>HWPOJ`#I%oBBJ`FwZ^&MXn*@$3)mH_ zF#chietPj^$Mr>*AO@;`*q*ppS)B~Jw7?}_kpfSBZ`9;j3No|2R%jks{Kw$u@+wK9 z=VRrn?(F+mAs6nBM44=s+FX2ClJ+2(q-(ejW}>9BaXF^36-jiHp9ov+$=SJ(p$`#; zu$^4zR+()8<9u7`+hm7P$E_wueuZ8MfwUar-jxY%#m=1Sr)0V^HT(_jhDq|G3SG|u5jp&m=t>yr+ZkOPEeKI{8y zWgE8$dJS2;=n`prap!b9|Hh?&TtPqU*=8|Q-%_NS;aML5{Q3(%D4UMo+fM}x-APO+)#JXq;+93Rx9;U`LVgjyc1g*}sE*p5Y6KLaNsShgvXle3a`;=gkZ>Z^NwiOZf8M;!|ps1?FZOO7(@oPYF}JpKMKssMbb^ zpza!q8ASyJ3E4SsBf}8F$G#B&{&MP=-?4|)_-@!Baw#3s|Krn>Pw40duyZ7iL_S51bRmHP0skClka%E}^`_zQ>vi`idF^FtIi-@{$yHS#O| z(+{6j8#vI9OiG5vHTkfxoB{VFHDbi$Bi$j5MV2P&%lE3;J+D;+v%~ab2l)jh12Gj1 z3C2euL}AG~mtBijq<%Du!mLgxUB__Ab~46Ua&F=of`?t^ZR0<%?Ni;a$R}{#$(2Kb zOu%m<)nV8IzM`Vyqwn_Q7ec?IisXaSi-Tcq09$h?g=re;!t5C|6lmmV#_B2eg~NjT zOZ9d)Azv;7RP)wfgVl9 z>KHC)PNGVaVnw=SF3g-%Lr~M#*RO=ZR1`xAmvOCV*&WeS{r2yb-4>331IuBeW_>0t z7W;p-0kFfGa(e!eZ-3p=($dra83U3!hZX7teFu#4zn}kq9f1rw<}=m(+U&V;!8z#k#Vb}L9(gS zaS{t&wcii!-C2%WjH>x`o%@QlBVkZZLQ-Ky*-fQFzU!N^Wt6al{T#VJg_5zTnIYG#PLFLnvAqF}! zhA--!4x9Q+H5|8jzVxzWGG@LyK^FDw3+75{(F zip}ZB;>T~Nh~NF+kR+oN9`Bzk*RWJpL;5#Vn|^6~8f*tr=b)wgFLud@gr_#{T1AVS zUfb8Yg%gq<)N*B6`Ac!lrO7axy20ZzN#Xx(vyJ)g!|pm8Rq#cR4b3Y4<{o~vtBHPE zEFt_l(Bcal26K1!WenN1e}#)H~>^Z{H?!V&g?mJl+$!@Vmt-q@i(QL0d1! z5q@4JrT~mzxU|48L-!#-0oU~Ef4eu4p$2R?qg=3L0Yhye<7;$`i{4WvcGcR&6;>}v|+OE|`6FAKWcjIotcRK#64 z)W}OoNF264`FI`wQVZ;C8O&5LgCaHF@Np^0af2yw?S%LYKz`_R9o7E{#(7R@>urzr zl`fa$*anMh1m;-P=9V`43{+)vA`Dl?HzxoWY6}#HvRN>y0`mV( z(&SqT+k+T0TKE#3yHkliA%E;m-F!Y5Ue(#ntui(3X*2bZ4h%KtJ*umkT0es_6vf8< z4w>Pz=dc#0iLXyo|vTD6t>4wHf z;QohLNRS@rhdwk9y7AZ*|#nak`eF8)G+|PJbW}!xdIK>BIyd4f;!wAY~ECSU$x`DMV**E0$iCMQL5=F9aVAK(r6^;MYjb zk4*;RKV?b@8b; z9?+w_lF*jUbO$@YD6I0r^eL>kC`j)7dPKd?HeaCVmaLOagVe3&nTk^<3(?QjUciN7 zHa0f2M~evBF`4}^D!3^mOt~zux|$F4hRbFCM}uAE@ruZi>wd6j zXiw#|0}k_g4yVOcUSrqaTr%OVobFSl)R1k%R^H2kZxXc{z+^Wh;Acca-qI^Egtevd zFf8;p%y!kZGkm}MYaYao0f$ICQM*czVUFK>K?hxucL)P@@=HNPBA@FNTt5>3>dT(U zxEaapNGUPb|4_H|1e%YVT_^B&F6)w%be&?{npdFRhI$Z~9KXQnfN$@_nG?2f^yLn|N2uP@mNZErY6 z%f%fai;3&aLAfiIXjf(~tEJ!D{_ZOWwnR&q=)^0V?7Y&@1EQvW;E1Z`!ZDHO(Qy%> zY6JNa!>@Lcr6#$ytzEUJrAq5>lyuP?mQP{80{62>3rJ4 z^6WIVx$J{)b51gEJDAJ|JrtiUJi73XXl1kWwOYS(5HEpzRPQQuYyn{jb&-eES)-mR z)te?EwG!(1g>5cN5d`;V`p0n93U9Lq8zyb1Si7EHU3}CiifmU`pH7K5VdaiD++uep zJA>A;uzGD_AKAV70jmnlMT%=mpO%j*M$?483c;FfnjrMCr$veldTFobg2m@!D|bw6 z`|BWjUFNxYh}Y`_m_hs`Fzd|shW4@#nICt2tK=cWbCp6@A;x+MW$7MADt%R`KyY6s z#`D5$VrRCS#m+_fbliI3O#(D$C8Xlwqy>*hyC`1StTCNgI6r`~yEQK5U}K5gy71l5 zM-P@2;b#j-ieRQY$_)FFJQ@kXr>+fizMw5g6?7+rTc~HF?>K3$TtBl;i-{%uckf9x?8GH#?4%2Yx25(VT@6cjt7O0rkd?kq$0jTozImEmH_V28+#}BfR3KHR5O^X_Erhg*S<*b- zr?M+UKDN$W12#Bb+v1A!T=CeQ>xyYAukec@I;!HP6#4o22@k+AMAx#}8o_B zS79=!wUqH%%4Od{rnNIIg14p9&Mg;axH4A3lgOFqgZ64ufl(}XF1+EU_pq7YTKice zmDjc7*Z;#q36Zqz$5|piF>Th6JDu0;?_4Rax_-kh0JJ`_whA^KSMlFpgp`6ViS?2C z1RP98OO{Rveq&DUnVmAeI9V@H+Y=@wGU`06OXA+}x^l*BJyG5ykgZwL*Q8Y{WFAp( zzipRaY{`{ofD?P>V2|J~Mq{ z3zjc6gey6A?nLh48%7cdPzmrGV#_8D=cReQq-6ax%iv5b6Li=xLQj6ZRDhJ=cdi3M(`C?`mDol`~B=)_vb*s6sBB4 z1jR12fN3@qmv%?B`uuba6_oAz&ortPpk!Bdf0e!ct-wFDBPZNhB(^o(?_{>=6A++N zZ^_{@FG+0Z<@WLfe^xoa-2`Q`Lu01yw|vk z`iU0YVOe1dZQk1l7IJk_InVG&@TtmZFbrI$x~ObIXRR0OV-~Wna1KMxOCcm1$rqIs zKlT$jN9iI>FO*5=D9&=N+?v+L1<`nsDdch~)z$?z$!H5AxK7v*+B{LWC>4@<)|VLV zWVNT>m18Y7bvS;`2@(-BJ)dk6o1V~?xbTF&?pt@bQvU@A8T@w(WWj6{2?F8Gb`KNB zr^HQ1v{hXF#0W~r)>j~0;Wl$(lgWiv+;g^|x-OB5a_)t|Tr<^~UpccYKJ9gE7@OUU z2rPGT;t8q%pH>4gt8t$@NqGhQqrPG7w=4eg5zXd#ir*_vZ;N=LK%sbbBO@bjEm@L5 z&AL#1)eBU`e&T_YgJaN01WCL%)1ui3k#=8oG!Puoe)K)54-v`5lnD`#kF{!z6T(zwplC~t!$rf_dM;Q%O5a? zxGxY#>8^g1_$R3Cx^#Da$^{3Kraaa5)U%7d*c}eO7&s-c)#l^4^(~}NXSsKhU>x}k zstI>NZf0v!a7NDq{A!Z6D68thA10#0t##yf$ys6~*!fT$hKW`eNY zP4v}la4#u&5!eqHg^9}f5i?@IZf<)GD-sVKSxKFEe#i+qPD5Acfn7Y>>kKisy>miv z$H@!&l?f3cN2r-9BUz#n^G=c*C^fD%uqXN)jSi_7DZflO6*_|NKrL6&CL$rSWI_QR^|MtMI}7?DkR~WP+D)~|B*>1hYiJS= ztKXW){%bfpLYn7NvIr?uGdg(9JP};p_2Up#QGT;e{>O$}$ud!3)C>X0`e@c= zDDGtvT|%*Rg@_e(e32^@AP2?iZvhHeW{?Q`?vmq#+MMPNfW7tjnXPXk>|?bp1g#8E z?)_4U#ybYhTkZI9P?KJLOF|YB?jBYq(W(3Nj_S#ex46HE8|X&!GI!zNKL*p97vMs0 z?_pVaz9-^1hpnn8*r&J#pjn(5Mp7&7nu~y5B zztAyTnWa89-5Y>DL1ystMB4I8ao|kxaj@&DkXPk{U(;o0aFrgoF6DWG@h@b_a;T>5 zUxN_sEWZ|dtSugTp_&^*3=KeV`dzwux@-68SXzHLz1Onlq?lt=DrDMFyr0y#1N5>< zv}H_+s=*DXkf<>eC}t=xj;t?1+s#QZ@0@5p4OMOS5?L|l1H}d5#gVWFneNH|^GAv@ z73o)iF?dL(MEa}UcalHX4XDZj!eb@|IyvY0K^7@~xPb&$0WRO{jy2iDuLj0Fx@d%~ zdg2gOo?vOjAgaz}JGFJua?l)qvLg*oZ%ysqw5R1Z!ml=r=ZHdgn^Z(pfRwLdj9ck%r`|Y`@ckYE3I`u;jgbVl;KxGo}(`R zh!2hi46_`kz={*MTLY}mE3|(Ez^C#~0U;XeLV6&xG+(D^B>gq$H^iKgr!PD`mgJWI z8fa?WBG4KLq*YGo-sfXdQCVvMHqH&~HQKA>;Z3R+F69P2FSk+5tI(dDsX&2>+hQ7z&AmUzC)TEUQ-Rjh3Ae=ZZ8E2TK+>hUl;VaK>kuSu3Fc zk|(%%qKR$>L%YYIqoAfYCK6o=(RWe4DO>^O4C#!c-9eGgz$H`5`eR1 zCgwz^44Dpl?zz>1lbUSTN2!Mo9!zN`pc!$1Yp3`$zj9-%vBK~n?6Aq@DtL5|a$4Wc zo`+|Xz?PM7J(Z7(rqPQyAxPy{JX0B8>OS7cODMa;X6q>Wx3X!V>xzE-Zdky`~Zyk4B=79 zfZCfi25V#eo zZRZb#Cg^ejFx~an^SatB=I#M!8m;~UT)1zye&e6pUd>a3@d0^>c1gpIP+rC8%|zT} zLbd3(RyU8tahLgm^S+&R0^ii$thU`-Y0&1qa_%b;*u6TW*4lWyS*RbE-5#2n}K z-RAua6k#D+m_!xKb9D2zEep%t0NAC8Zqs>={S3FgGwnLMO3oo}N^Gim>qoh$4)-6p zib%Y1x8Jp+);7QO*#-9{h{wq7X|7x6MrHU@>?Tp!&dzSYn_Nxxf+aRI*YConRu@39 zzveNQmQu}&@C9O(w{(1dLy{P>th%#mOzS_)RP(9L%8aAMpRz_((P2orYmjZ4Wxh|3 zHNY{C-rr?r6X&y`is9AleJ3a6#Zo-LN7-`=(C#?V#b4b%5|_iB0uDS7*O*NUsBF zb4*#&UaK^*VKw$3+2^QSOZ#Yhm zGfWIyy2UYkg8A8p<(4)&;O5StfoRO0egE1j0@gIY*L*~88^RU(tYMCYHeda&TD9cRSCKx= zZ9o%$K(ZF73ONz^NXrWpCIO%BprlZF`JjGAKX{obly8p2-}Yh`yq-*Kjo3E-(^rWb zQ$<@gSZ|asu-w+mzk~kk{J6lb>8 zh}#SZa7r6pJjSxY-)3RN<9V;xnmXt|IhKCl_%bSTrT(vLnW!MJ#WBZ8+stO%duE&h z_0sz1uG)dSnl@uQ$v<7V#I)9e^4Ia@mp+&~00;ZYNa{xNlhHhCCo@d{+SVOtdWrWz zGKgbMUcAz0vYyLc%{$?CSdj|uK6G+zG6)2 zkS50#rRp?afWef4#G3jB$}pf?Lgzup(S86+KlgyAcEuj7d=1j$69mmM#*%JYVz~s% zP_Y+UZ>o@io+5|w_|?QrOTir^S6=9 zVDU7e!8&85t!kEuugk?F}0SY}a`5*PpaIV;AW1)r9sKL(_oCb9KKRewX@d6Knu za6OP+11m+XKTKK5w?-lGnSl|NCF410D04x2gE$r_-DF0BJxP96L!+Fl2nod z92|(c^qlib1A%|kBMB+h#Q{3nlqKcPIv7sG@B9a${f~go3}$);@NSNgD6MEbdQ9;L?^o;2`L}ZH3qMQAoc{1;6P5)d0NDY7tzhL z4zX8HNR3Gsjl06yvfvT;Kdx=l`d}gvo?>+v?a~7}G+7H=Fh2IU^w&g|^RC4bE*~!d z;YZX8qAXTDw;EgT4Q-fChdU^<9Qz4hteP49T=ml#8CdD&;$&q#hhl{;6Llj4*5S)u zNw0;$jvwUs%8BuW)LDLwd`x=6Qhob=*`T`C!;%4f(GAWK$%_mK`-u#(_)Z$Y(TF^$mDQ@QTZ?JTtP#M~;`=r%xJ|D;N z1fV}IY5;P%kYt(|Gw%1aQ&&T~9hGfYfw^m3W%;`TU6trvQLYup_52&Q^V}lQusQ1@ z#WEGtsjtm`hU008=EuCXN?#T`gR85V8_*6(XB)bf+Hx_4kR`_wy zz>?+#(?*Jj@SK=&M>uSVkeAro0 zs0z_o)5B9Iut8lXhi9(-SRr$S#X`~D$-7n_Tj3a=<3Db}BM{nW_w+QUp|om!I~jQ6 z@p~xGW@RAPj;E}^UFPX%f&n5k(g*uXU4O_wqWNJ>aOs0%jcF#o z9T(2#6~a`6-)?qpPNqdQXj$pV?pYPE)^#}L4rM9Ryf4;koo-Y2{X6QQpphnYiq8fS zj);~e&%u~$1`>t%m3wXL6@4s5#xz#UA8dGRrz0y?y=Z|1`KJUal*E}qj*G(k@#ukB z!^Y~jMloM4-;kx(Glt+o+iGPP$|T9;NTE6Ln{04{o1W#BAyizPTIaqS$MV zqJ#z8zSTadUR76jGmHOvERXgv>q%+uwwCu95avDRQb{ND!S}R?Yx6B*g5yN53kb0o zL8c-!f6MmmV2$yet?D@tq1GFAnjb?Ymm8;HS5(oh}PUB4;gUn zsP~;_p-QZ$-^qTfqa-Eow-Fv8$wbcqD6{PS$IXjxd7ECPY%*p}v&56fUbeuV23*SdHUZ)J&kgEL)zU%DXv|6~b2%vA}7ZelQ7Pk?qe z#h9GWL9~1^4YMoLD;k1Ow}Vc&=g)NsX4(m_GL@6HW<)GzKj&r*m%XQ$XBzxRW@hnx z!@6kGYSIy~#S#A%dq$kv^tc>6C6vdU1`lO8&W$ux?Wc=%*3ETnKJ7q_oDxFiZxMoy zrNcHiozJBqm)6EUD%A_?`3jpm@rD;k>WLWDy~8h~u%nor^>2m5*;qX;1u$|D9X;?h zs%t(=WarmM{+YyC{LoNDgQ^_#RPt0$_3VpS9ak%O5Br)diQALE*bmG|zKv}CHM@N5nf{fhN3 zL7%VrfXP%DY5ZCCxbA4JuZ_s>vaj^WmflmmMbtRiTObNi(Q~ybugNm2;8Cr?AqPzY z(+4@pIPh+?;mTCKXj5Zcyv#>9uJ-_;aynAwmG3{eA)lTn6Fitu^>s(^<3wcJALErF zGp@Y(AjFdz`uU6FlljC2$>T+Vy)5MdFh{dxA`nFp>Ij%C=HR%%ycYj|sCv(!Cf6_A z8xciC#Vtxynu>^`kc~9ymaRyaqJWerph%bAQba{JQlfOFM5zKo1f)ZPC#s&bn9qUF-Q+i4O%Pg-Xt|ZT1EjY7#@*bbyf7^}V5u zS_5P-PPJb~SpRwaOLwj*9s&C5qS3%(WmTR*uO~xRMz`9Md?5C>CJo59beC2o3K#>q z+MR3lw{+{%w;z{YRIHf@{R+Xd?`={v3un_N+XHgkfy|H;$XRfk-wIqvMOI6OQeJrU zZEmUEN7qko>`fTiywrAopf<^Eo>QV8no}iNLp}opD9VgWWJ-Y;zv=Ef>Mho=avnZ1 zWneZ5|ASs-MlpRWI#y6Pf{|?2!aGM%tFh`jI_$3E(`(Q*Qd@&g!}D}m$L=-!BDH#=~4#B}N0f|(nNZt80A7*dG!a7s`5%=p_ zUHHmGDPG2aTxny3Hz5s@79!-+jUF~=Xun~0j^hA&-3_Z8f}CfBXw zSp9DRe&*}nyRyyxb0fD0O>{wO*V)2~SfRI}P2rV9^Q9**gVfVPj0piU^{ZmvpqTpX z*URcGw=Q2Cd$SaB59Q~k<2U9jO*Y<2Zam7HIdPBuDX8R>e;M~uNWdWeYV$&9mz288 z2>O_#F$CQB}T#8s?&?z?w&5xf458rhFaSU$__$5*tyxw6{g} z(@v?mEwW|tUACUKT!wC5OO$7FDISFw45G4ZSv6Q_i439}9fIj_ut z3@}1(L8dgdWO>seF3;gju&O#u>bEf5H{7&*N!sbio&Z_mT~mlP`>^U z`s+9xvuWwIFEXmP&5abeR6cE^Cq740=mR!!H}f*9m@w|@7@9XmMnb7;7`-z4RlG+ZY6f$|Kz(xo7x=-GR$ zi@@bI5Y$LnOEfuijk<+g=JxLyQd?6&V4kd)!1{6z2hO!WOKBq_&KrCDYJNA32dHl6t2 zIM4=i3J7kkBAQ)oj00|u>NHOOoi;ozR&VdlxzRBIx>F!_3AAaom7CuFcA3@?RLuHK zjvx<=&LNd+WtK$OG&gTE`3^NuMBOcT;V!~4fn!ntA=W_4wx)yNfM3L%B+-w9Ct!C0=Q$zOt;1owV zr?1((wdpcx(I)5`P!wQ+V$#xjtxF#ys8~nx=8&qSV|T2BmYde{TLnxemB5^ylQPy4 zvR(9?yhl!149l52%KM((<7>!?&rZjz)7+4a8;tk#S_XPk@v2lk1uM@T*d4?~%v`d8 zAeKE6q4Tq0mWGwz^bIhxs{WH`vH8VKH%}~dATJ(Wl{(OzSSO4Bp=#U%X8W3kI$HmB zO$;&C*i^1oLRKxhBf{zmgZCIJ0 zt2AEEvcg^L3`FrgbmWyoBc2;=BQ?ZyvP$DhC2nn^p6(BjONs@SbGlkWPG9k1Q4F*g z+ezssti*MzC?r^xXNlbqXfa6$0V=<|CuRl`6i0rSv`RP8D>}G#$8e6hv5W&p(*6+S z!X~xlK}dBe9mN67lhFw1(=EOrs;eK&!y_%>tk1E%g1c5atGw}b@8KGEC~v#^F_!9A zxmr!J_cY_23!21S^;k{{iQB529r)v3>d@3-*%eY;gbr-b8>sP~50=Ur098>{WsTdfJ=(7#R?vPj{IG;tvdH~CzJ=sKr zNgs!)+S3-Ll6@i$LB5d2NuFf+MhA;e^@;*2@Y+EpAGuika!4H)-n$-AyaYXqptI?? zttNJTV-7byt{wB3yx4cREV+iY-wfZ|1Kln!ZX_~_i^0wGAS2m3j?%~o3S4=+`e;F7 z5Mg+BxzuE2S-rhsOx3Po*b^0k&pSt_cGRkldoH$()N{Sk>WTZG1aRH~%{d{Fz4hBN z4>f|LTU14$yHA6^`G%>aS%V>F#%$qI#~)}C=wI!6YK5MQ)0+^;XoNvz**}vt`4FSD z&g#YFRms^c=h85t20M5_CJ z4x1h>FiiMsUa?vGYlT$8Up#Yzkaq~;STy0C0V&A9U_8sbxEOdx{g86VyM}jzCyjQ8 z>~%b0O7Sw+O(uSbhf>>ydawPq8H`kLlN)RJg%T*r^SlccUkxgx@ERUaE>l@z>GuyP zK@4DO;pOkmoX>Y!bWKcjOxQ-~}Ye zEkh%3IIvW#b#~(g{Yo6q<~gudQ90t?*EzW%t*3?omp3&?4H-fA9U~80nT!l*4_ z0xy)j#~%|KBTjVG0D{F7>r&=B zGaS8qBb~?6Y*W#jg)@kmsUI(~?`3&{$UsjO8AMVD`CTu;Ti%yD9kJZ%3aTfOzK9de_jtj&;CY>VJ&ipmW@MG;0g2AXj4vP zfA%E`6y2pt$Vui7&o-4AT?E>^rLzEP2JjH7Pl50M%Kl)L$aL+!lV|?kw`)?UZ%?)) zWWpE;G9Q?oiBs;Z`z1_@RLSJ)7&#lv>`{OlMcxz{>TGFD5+6`?I+C z+dRk|VQW_OLNCU;nBY@r@V3C|_*`HSTXT$p7%-_w1mk(UIEYelJ_9K=dD5$C^J6>mTQ8493hi^?@WTk zgeiWJXg}wWKlkvKZ35kSvp4Z<>7QtN?wx2S6~_B7@x@3^@s?$zhs>M9GLfe2KLX4A za`{d)bt9tHnqH++9CQoEk1h?%V#VQ!5kG5l^r4=oRx((HdgGD`pK50;VX&t5yv|L&JWxfHH zJ#}NEp@1`f8)(?Uj!wA`DgHfR7vBLD^gTs$G+ zkk;V93G=qCJ4zEqxB<~gdHJ4mU3tK=H{sS=A zX}3-vcWTi7EcF+q@W!P{y*phKEAJV1e%Y43pS!!<;WJQ_>|diF75t?956xWbfziM$ zDA~q$3@m%C;s5Ods7h9=D!aK+!2M}+v+7M!w)^rr!^t~P2bQJ#CoB8vxStFa{_}d~ z;Bwm&bVS#UV>+DHh*+~VM=FD_q5hG0a0gVyS8lMX~`v`MEo-(57NZr^mdG)b4XKynf4ur&dd68rM@ zThC@4|2BHkroslwFalRESo$z)*}TE15Yx~+Bpf0l`yor0n*+As&H4)_r*-{!x5=C2 zk=GC{E4IctU_`U26Z|!wFk&7VpELxWV>ackj?}mU)=`TOHF1E7|2KZUZ-W5R$-hqn zQ;UQ968*Z)f07caSg$RQyFkHYSVx1ME59$^e(t|Fp2)dW#7|eV0JI7l{X1Hwp`(34 z;*{8!G{386wF~n;mnI)(m|JR{gB&$J9L8X{{}XxYEbRDAjXc?^J0b234yuqtOZ!jh zYb19w&KDH<4rJbod{RhvH-D?}!KpaMr>Mwlfw3Ur27h1JkkGT%<_rPbTLN-);P%FES_;gr&Xz>CcK`noVR4 z+&lfN6`PNfrbJjx&zu3D*tl_8QY4@-+t&oi7w|_%?a5fKX-r-3p17VpFqQ0gAmAC{ zyp0*elP3$M!2Wy~@4dXyc^lNR;S>X%YPs{*OqEV8GMojl8;qCF7UsDYQ+~sNt>2CIyI54^4;w9nRV$pdx#Xdj@R|9}@18e|NZB zoTw4REG0!P4rgL@V5bi)jJ$>1jF`^G4s&(Blh8)k`!eVaUD*QM?}CMMkd&OFe6no8 z<}sJR-PhpNPPZY7kEW6I|M;B68`l*7-svXoI=-gDSD5V)A_+Zn!W9F%jc#cN@;iHE zu*?|=NVY7VY?q3}5#6(a_*i)6ljvVLkv~Qi1ROOZgMh^^@Y0P8v0&$5?@sV46`kZd zml0yDl`Yz|$V05o4AuCP_zSkoH8YL=Bq<>!;-A2as5rLXc?9F$oCdHgidzm$${=@c zCKO7S-65YQJzt%GTEqxC5bR!OyXH-tMPz>%M0@L(1Wu~adglxj-yPl-vy?SpDWWQQ z8w^9EtaWkmUfJ!1A2ohWZ6j~c?@OSnD$WsU^*My`y{w_!6hGbeT%xH(cY2N%`lmJR z3z-FA?bqZ0M50ghvb9~xbCplfq;=!pisy}GGSgJ}%J;Zn2O>RLk=GGZl&Gi5^88O& z`^`*vRz5+-F2_KRfiMVS^s1-CZEY93T;`WuLYs`lFI)=sG~JBA=aFBv1^uii=Wt## zAbjW4x9h!O8$h1B-TP2XYj-{_ml(0tRRdlywuJXIM=%!qrEF+|Xxk~|Qt`{V!FokW zfjk}yU14A&S;k-%2A5#yIb#1(3NLKt2x!XUEX=ip%Smun2sv?;KLZ1vt}VU9J@S~+ z(217nEUDwF;_CrWc3fr5Ys+!%Du{m-hsp3px#xh~tip007yHMzVHSape`wcnEA@TS zz%3fw%H8CcPXHv2;`dv;Hp@}ilZKo8W}KV6z2c6FtH)&O1IRCGX;r32pru;BJsTFc z*65jO8uRL|ZF9P=B#AJ8N#pngwG@qE-=o+GP$r>1Pj9TGrKNuy3V7;8Y z$hY}{fJCkc{F8^aidmj&J)U!OK=J9%{w$HhnzZwaO5)q3S?ooe{`OmB!1B2|cKI#M z6hp7{1@Y&pHV}RRQ-;q?U(M9cx=+yddpQ(PI%|#G!i|&yBJ+^4x+n z!Kz)`2vNSgkl7wi;qO45jgE{&h`;>v| zcntknF!u=LgS ztuyn&Gb3=Cd=)HQ= z-TgAP(5h+#X}XP6v>uXDfG*Beo{XCrZZ!5S3i=AY%OrqxLRLCYJ^!DRyJR}`cJPg*u{>Nu znH3e3O5J~$#hOdUm*SB8#;57u%dZbPEt-a1W_E^7 zuwU#Ha)8~#p1Hctly=rCw{3bB`rVFq3R@k`(c(|V;;~EJ)27MhmyX=gwGv!vw`HR= zik>`3C>|Rd?x%zXc}3P}q{6R%PW3yVkbu<04GKalU_SZHum zAY$J}u3|idua6{z(g^^*&C;G)JuXz!Af#Y z7C-MYFZ~73SlbaHJ`%Q3i@Oy`Y1S?`56~bx)P5%ofaq^aJJC$$mS<7+7W(y@H>g}A z!JuN!PnE@>VhfcydIoo6OpczLGvf;@`3Nwo;dAee{LF497St_hR=R!F-e>@!p8Z6+ zG*T(@J!OtxEvgp|8(bNKKO@ae?51$Y;!s}*Cz>Fa)hv*c`#6SWPEGXtTXf4ddyx8u zgte%Wphsx{`!pC@q$^C$9y(#j8JebgtoZmC`i`t`=@T*u%$2A4kDrb>C>}%wwD14v zfoiCV7%r!M#uZwHK>LKFgPjta7>>0NR#sO#o;R|VQ%AEjRAcoVyMMiT?!m=Tmbnl) z)o<^Gg%R&;GtX?jPHP*8Mi+omMf_ek|GfD0nQwb{sI$HA9BwJ>Lfv(J0dUufXHefh z;+xzVlnS*SQ7O<>myXtz^P*r+$F1RptB)=xd8Jv^;s*fMvB;9(nC=`pHaLh}gB);fR%UK0~A8hzII5;Rem?vNpu?L2Gbp)*Buq*)t z@{O~{W5qA45aamS+@godS;7owLkNaZcwinAwN58xU<5ZIzLSWN-GfF0TXE)-Xa7lb zOt(!IWM~EiKUu8dyeS;Wb-P>>?i0*N4nrnl=4g2yE@8c+4iqC=uQu;jeU&9a6}lBW z`_n@`^CrQST=vB<)Xt6R2#IVBg3pat04{`Z7`6}{J68Pb5$(anLFW~_wl+PL-*GjY zbF1H<8tJzK15~X`b8F=D&vE_ix43kPoyJ22aCpxyOXzvuyyiddXYgng1dNCNQGn2w zg4#n-K?8k%WJQ4SGGKw1j6VJOm>GfhHCnTjXT$7Yn%Y%m?U3r}%NZ)8bUroN(t!0! zMmLm82DrK}hP;t)O2c_6tF11oIBG3kd)3>KrVjTwydk3TV2My+fdP3ZQO$$EXmj5kj39a;Vzn7=qF3P@ndt>FJ+k zQEL;r!Q>vM1&LMTScnOpwM$&W$=rM9*?*qg0NrxLKQ^JvjRGKwIlT4@!GkiJ@6H*u z@`;5r7R_d}YrCPq59xYvo1aCOZm(f|J(ZkO&k4|Sx*A9=C`xpyj&hv!37Jsx#c#E5 zk$BM(IkcB{z`is^BEO?(4gN*{LybO|-=@mEMaY^5C^qf;^K)hCq}_MrWDpNf`I$I+ zg@iAq-`^SL*6nr%h=+TGk6B6|z$HH?b<9f7l{!jV-Uek|f!<#EcSk_JV`@_pkW9Aq zDP@ctdT5H)j1BsMptXSv<&O){P8UWqRVJ!izkm*~db8&2a?&y+LKF%u`3gEQuL05k zkSoJn>-tY|s^ko(Kahgvw{4D1m{G5>iF^`CEoyezAYjgBjps^6XgzxmKBAQ2<2Vi~ zVEDy-)5bOAf8_GMhePd|0bc^Xk}DDgrJV69LuUDItpdHtBTt*w0|=HJj}c$&LW$bP zk*r3KZ5l;%f0*~X9%4>F|6+YDcNwR*WoP(oJ8cB|Y-aU)b7Wb>U!`r!#ocnOg-8?U zIk0nCiW@@lGtyA!uzr6izDE|>%9#9Fr2E(Zy^f|+<|w^D!j;>MsHWE)q%M6Q@(lrF(2`UIED(nbGif$I z%3EzMMS>sH&X8iTNy~2$xFp-_pEfOu)_91;7n5r82!5pvB#>6zV@|(Fn`2D;z!P<0 zbVoz|s98B^iOqI>9msLH{uqe!)fAwrtqQ-p($HC>fx7MaWL*607UybUIaOzjTS`cT zswuP4G9;`UZgCwy@i)Aajy{3i+8F$3XZXZ!wo?5fa&6Q1RJ}K$uST%ttc%*49F3` z&F_D<`(c-yFz)zsVuo9l@>qy=1a6oWP`GdZj;y@JOJch{dRU9UTJ8x0yO@K3a8ZHD!|BX@8@j{(H0<9GiXL8tZm%mM z82f{MV)@NcE;Zg?E9m_izGl8P`oRn_X00D=gq%3B?I@Ss1Pg2kl5g9CEfC{AjeEmO zs>w?s`u=s5e8(=CDjC8t85r61)&blZ?&E;GB3T~Co|`kHYsh8P^EBiZq10JRNMO&Z z8l3-OmK3o0p~s)3IdHXD{d3P$)Qt8|j|m1{5j$0D0NthwreVop`6G$;v0Y~~^Nrvk z4ex*)>BDmNL&;ijdV$+bTrRHW@}`X$FX#h#XKO(;fY=Ei9GW$0@n27JQ9rYs7N=Mm z++X8qIgAUj{1ynfq%Mi=Wkd!>;d)<82s|K%(EM$KQ=6Yj>>}*s)7pUcem->BhD?TxiAIN54DG(mBh_l)}&?Z>zAD(M;8933nuu>tFmU7T#dhdIrbWYTi zFG~000YR*k;(3Ca=eP>n?T1_l0FI0e8+=!xz#bInsuVxjA&-j|4CuoZ2pIILYvT@C zG?@gd{~c06h}92%_+(3wSR=^m6jaDzLYWSR^llnCH0QtxzpTYhAIS*k$Wv2;hGFAD zkPRawlxqW_=*_!@Dp({Mmy7{WtZ_-30X@e^(C&6-srQ{F-DES&cpa%-Jl8Rx=l> zg@BSm%b`@9!B&MK&>;+UP}WAOEY_jIf@h$q^HhaUM z`b5>_{>#6W={EdIL;>GE;MI-qDG;H5MB+u(80fZIKgQ9^c8gUrQ016BEv@>Hp2C)*@Zq*>{rVq1=MrNOm$&oE zXNpH=NPFNajnt?!!HJtY+ylA?7q?NCo)2KBy6F{l)hZNV)U5Dk&}LUzI*-Cfp5wWJ zoBfy{40%H|vU61LI{mfOP2D8_pS869_Qg#2`l}+Bpy3W*Lwav4VQ{Z!W02o??;^m- zYRwO6$SD3dvKr?0R}`}VgWB{oBMj%Q1lxDSF4xNKk5)DU>KI4AbTsGCR%W8A?h)U$EzSfc7u;7N%R?ubVt{UjbHp`mgvcTAowuZ4)fa3pVV5H#QYmPY~wB9fQo0%w>y62Io7pA6{u>Cd82+wEW zQI*RaQs9(?nBd+gZR3*pK%%Z-q`rTo)FotP6djNsC6mqj_V7}g7Sjf9YzL2@=T)5f zrm#<%K028;>ZKW|f8>N^a-UQ^@n2YAYJ9^?Wk~eXv3~4wfNpQp!mT{~9XQa#-YMdQ zqB|*{XlVX;~sM$n$cE}#!9?S@n7B9g%#HFlPu95owX*z|I|Gelgg_l83vsL0wj)bEW|g@ z7dO9L6k9s}i5CT+(7oKt+hWnmx3Aqgen=Si^0~jzmkzM9j^=D`D>`T|fXed)$v*o!wmuk6c^b9{)mg(l#xGyx3s#9zqPguRRfV1|)1-M;a zQZ4ez?!`a8$5(YDvZhw1M-VgX=0OSVAk5}Ue^*U{&x%0fA)%wMBd+|EZWuIQmGc>~ z!WG};sU;c5n?E)(WB(^Ic79o9Gr&Tn*@fdPf96}kJ|O!urLKllR{;2yOdS80;Rr}f zkTTehSo}y$&o^2tceHc-<-TJsK6ixy)EK^vR3uh0@0w!yYd0#-IbVHH68?5iN{Dj` zr`2hV5(IJypT?SD*@9Nvrdq%^QwS_mF>Xqg{W`hAe%%N#8dP}uN*@Z7uOHUB-GaL8 zb;^6(THy*a7TrC;c%ik5=py)k;F>&$h;4*n_Mg^W8kg&>ScTapjazQ)P`Ukl+a`WD%=Heo|DMo9L3@Cf#2tx0uWv?5AtT*t$bUfF)v?WYT* zs9q~4bb9n8DROJH7hC7M6g^h+O_?b2O~qkEC%f{Mb-(lPu7*dzjPH{9wYFo2gqLHk z>1p3#CgIT)-c9vq5S`kjBR)GOvK-xlTgz$YZE=be2b^q&>b_O@HI_UdIG>_2$CD*m zVA+TeB|hQ?YObhY`YdKpm6a>~eOpjN_juzXXx+NY4xxvuP~w|i1S^K)<4k}4MjwH{ zzJ{DgU04(*#xx%Q^rt(ac=#YzF5vWioYlkhFGZvOC#nf ziU$o1=6y%ES});L!bz95e4>6xZNaYSXP?zZMmqXB5mNYTH?JmluG! zw9$udiz<@lQDMi|Ew7tz)<53rTbR6id_9uBxnCpaDRq!mtbh=HxQ#;-wqC_q$V523 z{crkp?cqt00V&!<7cpQ8jAh?7)eV8L;Ff6*B<+^{dbJAH0xyS>+dvjUL;_Cx_9 z=rYFf=e^ZN&?ZQ%*GowODQIk^Zw-)&`}|Xsn$W)*{tbq!g47Dk<(h()`08%-5E|Gq z@_Tl&DOHrygm8DP9fBwA2quSTcpnK{>F&Uj3*vC`n53KrWePcK5j~JiK*!IfvLja~ zH-^F%#hB)n+y$fahTMF5`+2ZVHR}~4wxQfp(_PmezrO0>Qc2CPB?U4v)pP=7m1{V# z&mp6)_}M=s`Bx=j!=@Dz>G(FsL&toKC;bdE&~fV*sN`{k0o*Drl8b{jFj>h9WnW0 z|Cl;MIl@kBV?mTR0zL)kO~e1zFUKmi0d)VP(8ZA)f~=ROR(mz{%R_oOeefju^9thz}b zW|b}6b2ZVlWPUajDj=&Ft?KCzxD%V8cxMewz3-*T^}7UFQ3LC%{*CUOoZ892IZUv` zH9`sK0UE41&m7;Fm>9mQ0FlNXTMH=rl?`+>u0Kzv#OHMtw#2Q7GL-cZVG|*>ue6$fPuRt2sF1s^1*jv z+txUyYn#aeZgI4ovz9Icf`zHTyz7^OKlhJVX6DG~Y?unx*5#TPdpJZbwL#Vz&z1oW zv-$xEp|^1UXzjU7t&QhgWp>`zORuoZUUe%}!BxNmCl%9kinxGc)Js*$82r0B$8=4L zWyCk>5IN6IsMEZ@t1K+`jQ}a7Qj!NNSUMvYW0oca?Txc`+}c*I04k z)6Pn~=hsjoeu!u6oUjR<&4i&IfCIVuTkP_2&w$R6CFaU)0Czwc8*YcWDy@4Y`z-8f z(ka;vvzZ7jCv2TS!vTK^)-xX*JwfHaEaRXAq8x-4j|s0WINA7c#ctu&)6PWBUD{J} z1JjpbgxZ|{9o{rVDcHP>~U{m&xAGyeG&`|;-`nLuvtdR7)!5FlvGuDa@jN{399ntoO8bM608CCV-E<5Pn6Mx2Zn~;4`Au^ z>}iU(UukSfHw228rQf^}j9cg;%BAd{Z+z&WzFMupYzT+XG=v5%T>Dtz&}gsj!SOYH z8YvDofvf!^=3!3O=0UM#>RN47{N__! z)`WkQ)zYP1y6tb)puZ#XEG0Hk2@%8hUqg0sESw~-Dov)xPRO+uG=)S6J(S~ zbK(9jUb4BjZO5A3X}5UpyPWe*t4Ffpj8x1u%HC^mwNExHMTdURci;_R%t4E>v8&#B zK9}kLWwXS6P}b+IWu#qen$-pY@;qM%?#HYyJzkH^@D|;>=nO*iY!d zPK`5bHl<}4xR~sDK;`T`p$F-~KkSn*4{PHc2kOi30P}e$03*iR3VI92v9ob)Slx~y z1>(VfBW0tgK^|`~^rK7{a;54JoN9Dlz=bsNS`-J&oL9&LF)!o7i&Sm2%jv6;Zym@A*D7!9i8ohh*V|QH6XmyUrWT{`+V*QXD4sG&eBdMnu)OCgEGD~!GWLu=O%?j zR*55+wFFca*K6sNm=s7qX~W1d@^Z~rMW*XuR0M}h$73G_2Qw5XMuK}2%QxVi;{4A0 z?@9hNfq#ysE@Q^O-)jWnjqj=E(>db2F))Arm&c%wZVcp|(vcuYXQ<2N3uU+$YO6n; zmi5@DZSH#E@s z4B`71k>-PbBzIXvrxLvt=#Vl0d^j9gW1y$4J*ETfRSGNI8Z0Kg!*I}+f_sZN$vDAc ztxJRIdZqXHO>~nVA0_G z|Dn~zPd`>QWp=4Qbh~-PcPL?!dQHi+^2nVV`#zsMv)@>w=@d~9&urH9C}biw;1PD^ zwfOoE%*iu&SQKeAtZWlqT@`9=1|I}Z*Cp$a)5S>on zBS-!k-ZS~>(B+;#cN}NjWZzb956?)yMsoDq94`;Vfs`w^7a{9=!&esi!Yr!G_4vy` zd=@jTngy*jJZ2nE-7Rx>zI0VucfA-jE-0+!5rPof5{NmQ*$3T>y7f!KwtjD$%C&QO zPxi1eX0Hy!Z+U{0n$49^CY9j9f)%wi{kx{(bBCTkkgb`Zyzh(GZ5=<>dok+tf3Ht+ z;=k~G)HW5H1=mb-_*aZ(aZO2k;p`FT`~gDCpQT>}^OvsuP!6?L5Pt9~z+FqMX>$L2dtb;Ni;jz4sx*_5A|>S_v=X7T{PL%~rjhi{ zskBI!O1$3V8r!DI#8}DmeKVaQ6VHzPsfZ5D`eWZYtp(>AtF(2tU3C2 zAw~b$VEA*1^}>_SWS=VQx5P9JvbG<}<0lift|aTf173ZNqHtcEo9J3IpdE7kggJr| z0quG^N1m1N98?7QE)R zPl%`QLv?Pii$8n`?OOIMP5O%?kB>iNo6X--ffuh>O2G6<0X|JG6%zyUbl?q z>Ya13t;-pWOM2Qh+?k9B?oi5$RIe?wX!3a#r}F#f!;0=_zh2KSBz}7VN{IN?_rC7> z`T9>Yg0V0(kA}v~0ID;aGl07j8{pC)bq6l7dL<6l%+IT)JtC%QKN@FZce8 z=+E!~9vB>c)i2)cwr<(HIu`l~JmxxlI~qO)01MhuyOh8Vj~f?mq@?~{(0Dw4pM}_J zInTIuI9GG}`sA;hOHM7bfAsN_=Fm^{zDm(b(c$*pmM-IxiEGd?f-D01JzPd_?~At5 z=>RL@`xxUIZIwAO2U~5G1u+xw@vjJqDdYeSDVLrtIefWQEcwK-WB<0BKfj^K{t#0-%>fH6MhCCjXvRmk3uscA;x0sX-%ApvvNi)ZF71l(PL%iV z#qc-LhDQyFw9mkj(5#eYxAUW*$2QmMMxtYvPPsh}&lWK-S_BrgY83pA1@&Bvnkrle zj?M4wPp8uBf!DXPS6hu-%Cz*TO2R@w7n=rL>Zb^Z~x`eC#z4nEw3I9 z_Rj<@91yDhSMf+n4;^nPxAUi$gJvVC*yTv`=lOm|)eFK)8^glXxQ*hPKWi$=OV}qU z><_)_w;y05W_-(%#TsX%{;JA;h-?u@9X)t)RK5>sYxz|-Q@J%8FXn(rJ4~8IxF_6i z>XG~@HSp4LX|p5Edf4@4hqr910=nvoo^8m#z&~q(pOCyg1Hx?|Kp)O4x1~+k8!+8F^r`b(4&i;3UU%-8Z?hH#OHo?y`h_#r_ zvNb{98v}-DfXcFtyOz+txtRAck6vQl{zhn)77>e-(C3`=hFoWYe#?#q%XUZ!Wv;#> zO7DJ4GE60}_5^&PU#J3X?SAKOyz_^B5bQUPjMFx|WPY6ARdB&Ur&Lt2!?yO7b91By zl-Wo+)EG)_C@-Rhz@*OKNjjHvj<|IA*IFJR_1GpghIH;FT+d4wZ4=B6Nxinv0KhFu zdJY%7S4Tuoa|#^Jx_A9A0}CszayB$^B_i=n(e?qS%5dwGNLepx%hC<1UKMPsE_M3W z^gYQjYu4?`h5B$A`31eEXO9lB+uS^mis5eI{@bH{h?8)iRp!sMzaKX`iNQJcL5mPQ zc=)0mjPm*K!4oQ)5`O~Pl}>5tKA>$1zPaHNqw>7;*tZpRel!={^A}#E7&^?`I3#CF zkM-_-?qjUEDB7hS^>8ri)AI3VbHj1H7W3KY{&3W!`peGUow6Ok%U)ERTXeHFWRKi| z%hjh9x4(Tq$egrYr>|7uUjqZ+iP_ zAq)4W>+5wJgd?Q5RbyulfU%A_QzX|7!|=D3GIDX9c3a`CjuZ4G{=_z85wqS|A>RIPT~1e4V_5ea1iR#>>N$S|#O3|gIUD?vw zkHv?2ceC5_#zS<%uKpJ`AHLLk7U*>u${)%pe~$We>-xTEu@ljUQv4hpY7TILs-km- zVtBpDXWDn&U$yJfwY#ShNczkunwkJ9`vup)Ne0OtfMD1U74ItkEB`JT^20h>_C)AL zQMjqLZ0^>H0O=-|x}%X_+77(DB^7R3{L?jrTqd_-ub1d_``+-cgRkk%6jha;#;tw& zDh`@cl{a2LAT5UPBiH?n^NsLE&D?X@&vsu9dE~!r8}2~&w_ezdtoALV5iu)kEzoHNna`C zXTYF8)$CmLYW-j>XI!I7%T1a=)L_JE@&EfJ?~$!j*FD8&Y!k~BQ$)@m_@}Mvs^arq zblV<@MQQy=bzoz|g`G^5{tFVh$52EySL9|+?S>%~rq;wfQ`RqPsBc((iHjt8~@=t~r=dL|p6GNDN2KnIav#={0)u?m<-rm8y;t8{47>N&7`5z)lVsiDd<& z2jrKf`-@EC52trgx9(}Z+?O1CBJ)(^zQzP^9T#{r#A z^c2KaBBcdl>)?Go^YN@&G`67s>m9R5iZwUa;r!U{%&y(q|BgH1g4E()i#_wYEaTi% zy-=UIakqUZm{y8ri5f(@L!SN$`7VCt__L>~Do(b>De+DhBn5wcGPAIFy#^)gJ|g#K zXA42jKmLI&yV2LDuuYkmNL$BdL*1SpLV|W>Vt~4Q%tJz`+ko;$ zvF@eyUI#wt{MeJkxC?dR3c>3@igzV;qeDwdSqj@WeG8U`Z3#A;x|lW(_5=ho3nrizmQ;&{54x&qlQjoJDv#WR}76HabGxx^e$hMDr>*9=Xe2 zw%bqW-x1^MTUYA791V2*EvORpJ1RbRdg;7&U#4#ctuTqa`b76jgx=WhvE8Ms(PP`@ z6LPu@=r8F)F)ja`-UZxcv8%@%t@N9t7Cv~q(A<@;_*b9l{pbG4hqlXBhpA=jQftnO zCAc)HbMOZ3qj1isRBN!equsmPQ+pNq(l29=_QitEpCnq-Hi~@yQFs|3efd1;dE8mY zC06SNexCG3k69P=5lzVjbJHIwu7~TBwHs42{Kq$~*?pmZqN9ABEWd`Po*CCB9yDYQ z$Y-}eM#O!Ee<6=}4ji50w2*#_u+zK_T{w9FJoZEwYMJLimKT~y{T2;wxg~8dxDstX zy({}1;I_hnOvj$hG|=rzD)OEBtu-;$XPxA5Zsi zt3BIFd0_samcW0qp;}^5f=iepx~6%koyMGyfiJ`8k09JJtWG{jcWeAvO@OK0x7(j? zzq9N+?-VT^_*Stm8Qqp#)*T>pGY$Le=8w;k;P`IC-zP6r_3s`I8$L4(Ss%UeSR7p9 zR{Tr#_#P0Rd&lbUm2+}ZQRkph+kb9lhj5F)d!Tq{kGP(jzCstkE|+{hp&}d5EwWOL zyRNl}r~Xt1J1G8pL2noQWI`eE;U=VI`;6ZMxeQhBZ*^-f)Qrl`*3J4aTmR;=lhmxs z^`{Hk+;{&KF7>X(&GA^Ez}D}{lk<8&Pqa zCM39yCv#flq}+w!7k(J*GPI@Iy99DX9^?+EUzEwH?t*UpAFAFvoXz(AAGcK%ZM9St zeX42;+EQDqXzi^8p=OCj?H#Ik+8DL9YS-Q?R_t1dy<*SWD?x1XyFKsE_mAI^{~U)S zN3Q$2uKRqA^L5HQ%A_$q%GnBhc@V%(lf_P3Rd(#B95lW@4gBru^Ag{@s=0kV$97Va zNF(bjoY8o_;>Tq{m?pQzuWO+U9P~hXC%+h}PD>LgDBS6I7oK+4fA5oDD0V)F@#$1s zXn$knwH~N>Nwb>lBYA~Ya`Eml`V>pjyB{OTQSHluPCWNg?(FDZ-xo77+mlB_c;S|- zZe6_jOK*`bUGJGfVf30`G{Z07nA|gkn+XwoooWR+dvW_9Ib##@O42k4`M=#%`xNKa zBa_Bv^lu%>u5oYvezSZH5=x8V^)c7=NlP(|QulkaH}AbCZ&Gq-l@R{FJLsbh!&(l} zm*joW+x0>Laig<#Ls#0}?w!dhhjwP7<6L7h)}vk;A@j1)ZxY0QAyaR>fSr}W>bq+J z*z?8tB_8YAco1pMu@U6Y@#hxmVeNmT_D{mWv`oT_y5Xl687W1_M(OPzkPi% zN|bl4DDUF5$QZj-<}FP+O0u1mrlEe7bRanX4_Yft)PfV6P+rL!XDs z3Z-|d5QBZih>fATLmM}!^^6_&|1LUa;V>(%}F~;K1fVN%8}>Fr-YMy_O{Xn z{)4pXz+jBV!W!S|8=-ZZoLRr_lEPsL0ARowON;sE|2EzKwx0UmKsi}g@U5GCb~vM# zG)9u1xo$z9Jtj<0o@K{dO=cH{dx4EJ6lv08W0wiDVjO1f4l-kdnx-?1vTpeHfiebB=mbPF@6}JULAkI@SsVIsnONlgZo$y_cHC}!$(F&Z|~jlBNf;< zh%r5#kR$Wvc_}xt7_Urh1AX|?MEo|wl{`ijs_|T@b(hV@`k;46_Z_7<8Wj<)X8r{3 zeS-yVX&L!dm>+D$9;Nm<)Z0%b8=5V?Lb~Z#^`-0;oH^c?@Tv<=1hv6|d`ck}xjEZ6aFz)fkHG1;tg%q&7POgHjkr6%o2GB61ErZS;((?BnD7jALUlUiKRs7oZ0{lI`yo$oK_;Qb+)7Cba2#aIS2_Z)1yi3IAbsr_ zn?I7gOKFCTP#vXU|DEDCJQ~-1SFIRdPHn#iTmf2bLGFwmwG}i2c2yhrGi`Bv3tFN7 z3L3!~e7Dw8gy-%HlF?J%6yvvhNb*mO7DLNxM;#|P(E8+bday1mBJycQ*Z(t|%)cAh zak?drUqY8yN!;G-_b%X4HDrgpPJepOK>QzLB5_*2LM-fj90a0F)QE0&6O^XD zBrIu}^++B)XCD7ev%7T*A9@rk@z_VM$?B{qYL|vNA{I%HPD*83FRTXK(EZ!ae4I-o*^Qc=0IPdC9q{%n_S4k9uC4`=}9;A6l9)bP` zf@EY$Z&oYHxm&Gch}UEVxSB~~ZfHWH2;s!Jiye1To2d8DA}ib58Rd z)ElGWoYuk1D(5!826(n*V7oc|-*&qx?PU5LGL+Z)u~;NloJ8e8?84PSN*X4I`|rg& zeeg#y2Jm%h-ApeuZ=vGQmu@+$=$B<(Sy}nE=NX%Gs)eXvF?Va)>kAeZF^(kc#RZq) zzPd2DrBv?y@IUDTEEnueuV~O{D<^GVkQt592s*elR}(*;fpNW%X%@+}=65k^pr6)R z3C>#VE)PCBSX<*C^8JJ0@RmL2 zZQox&kuxvzU7Q4^T#g!KFJ&c--`&9aW=4sV)JaDN|MyE~$hSd6us2#wO9e z*R2IGcrf5CN#8^euK~%70T4;+by=JpCkmf3gsFkKw=K)bo@gaHgqt$kEhwLJ^Mwf* zH6Do8WZnO5WevPaq#^eNFaO_T=_kK@@!JaVmAfFJhe23dShYRoN6bJ;7|QK}3PmM& zF_Kg*hxC~m@GP99B3$fA=8aPXT<4tXCBgsga!)yTiB4BQid~T{xmDDa^;fr>l6M-^ z?OjMgNzr=n!VekNiA{ZbpX^&rR{WRKBd(SLYU0XmP!|D#KadyDjXFVZF>4`|ODn*watNUtz<8!o&Yc z_`CZe6GOLaU$7EfZY4P=-j`!7I(Z@byOz0WT)i?e^ph-;s7uKpk|knar0?&cbTR_z zoug}QRZ^Sp^#JoP!{YPmB@g4yx{&Q?hha~+BlTYR{#0vv!Ib6Ax`Qu20$#l&L*;D5 zbsmgBfVvE)D{~~tkC>~dy6cZGBGgi`CC}cHg|E*Z|Aw#UTwYt#jg?os)8KhBw9$+! zOK4Gae06w-)#hR%y;1A(RF%;(Q}WLh zdYS13+_i*5`B{?OBYc6+uAy&WGI)TMBuLJ$q$e^Y6N^Mfs5!Dq%G3**Bqm);U_yo< z_Q9=IE)I6>XN=+=OcVmwU7g%w3|~=$(C=UR8a;Z)%3^$N33~5OTG6$}SJOQIjz%ga ze-@&&T%2l2B&)W$@%K*dbA(i;>2z!rmcb0_V(0mZ>5j+jF-RzVvbL?7aQzyB@TowX zB6M*IX(!cB#7a z?5SpbuP14CEVV#ttg6G;|7HrsJ!^svmD%hV`3ibTHMv5ow9{%0q0hQlKe?pMa~iCD zQz!48_}9TQz0?r{=sLBiv5pDX?}iheT0Cf~lmC|m;AgLFop7+dpC-d`?wPX^+O}L9 z<@5omUL7vhR>08XSwR;i=esucqN$ic*6l&9zkEyD19&lSjz%({{~-)pY?`c262TDr zQsv1pbL3@eqjmZ?Mf1mjb@+=zr>*ys@V%IRii-@h&QEW&BLdG!LB>yln5jT4u=e%^utoz_%xw=x!S|6P& z?5X{i%tXoN)<58xTXCz8|BQsq-Lcs$M>--7SIB%>)Z=0tS#~y~W*+`7zl>kd_sb5; z8V9EaW${?+*6~3nPM2KotNSwfOgJOL5A6*{l}m=-VRUX_mR1z``=$;vB!vPI%gokk zNa@5}pc<~SLpo;;@(3?jS5Ko7 z{D?M)?|+e^Wl{bEQ0;)eF{^Q;BUr>>;eNgPp0-i+4jsOV$l+61ulD2O;XK^M3+`!i zI@UJ~H%%%iKmQ`P5XDQq;}@Ciw0RaQF!zqtH?DQSTC#?H;8Vrw?eeUj9ObvN!wUCR zTvTIgDcg7cbdfK3?x#2zzL2cZ$X%O=_$rL&-<>&G)4c4&%>8R4JC9xLdav&cC?aT{ zO|ooC1N|{dHE$h1A-jVY0KmU~CFosWwHlrGHm?(T_ME3d%BSela*SrL9HAcmoRAE9 z@KcHzh7R|PN%1+y4_^2zCMd3l6wRk5J(Di~xQNpVS4Z`S8P(iI&{!Sl>mjbCzH_=3 z${bu>0|IjupmgLeVq})>IQWt^#}6l|4)c|*bEg&?!^7h-9ZGWz?9!t!sg+o>#1e*{ zF+@{g(P)91oLKqM*FARSL+@k<0NUV&{@MH$b0b@Xr^~Q>sjU3qmlPj&J-9lKx>eD7 z^I$g;@~``y`j}-z{2CpR%yz! z4$RyiXsWjJJ2aYenyucy=kiw1<<^X0=-h*yd_0&$?s8I);bJ4_Nvf=G`f4@FwT-G$ zBOx5NJJSS7)0}=Q&XjKr)aE$RW6N*@MZHJW+{}?N-J-~__G-HJUVqQ?C1sLg1}p3^ z*!Br)0(=RS)3jG2_mtp@I@$0jUSX~<__Ghh`K!+)-o+s{lpLRmd#-QMK`iA%@*li? zryrf77*t&Wl;j1`etup2MJ4%y>$x24J{=zkYXUZ2VC8&N6<4A*i-RgFdxbNLrV)>O z^e8gA{rbbpii=keYfXtI}?riA)UBdr9~1$=WI_Jm{M0-^+Hk@QtiaGzy}%An99GHo76HG zS#sPAzbKLY0Nra)4>Pj53T?1k zopwJ3Z5-34cEiR(yR^;)R607>3JdW*Cf;0I*DbWEs8zcS5>C9m0xV0+HYGExRs&bQ zjnR##GxoW?L9Jw3L9MyZ!3$LjYzzJ0yf=?`<$RXoso~4Ix|*_X_GZkCpM6x@rwVC* z#QEVg=Rx_5nnu3%oFomo^bxu0?hW64oq8`D^RH1j{rHOgws@#26tE0bRPwtIA5sCzDEgQxmd?Bxk^o%?k8 zG_s*2M-52;V1y+45tuL8itF^5hKguixVHR;haYicDQisjb07X1XP z^*GO9$m-2Rp4B@DJEl=Sh2#-_uxFLa*NYMx_Tw zmDPLV-@ow0nH%Ct$|k?e2~dG%N>EQPzXkc{|9-Nb*KNAc)w8p>-gKTF)|56DYOaqQ zV}~rkYbn)6o;V?_8ykT;sdAM;bR;Kg6!eBVMgGcY)iI)HqQ47aI#<@`?ruDLG_Gy^ z#3ya`>PZk}{ly)3xowkJ_eQ6hPHOW&2^2*4r}E-Vj#RFG6ak8y;_mf{6vLzhl$Et> zJd^o3w@l#Itg-lD3TuN`d0^`W!MhrecK)(Aw|39uo3b(=h;`*T^ZG<;i|d{Cen0p8 zt{4}GOZODU=e_oF9S8QB>qw-4>0Kow2l8Dv1Eg51U-axzplAkKAeOh_gvVqx6Rm>$ z8eAznAp*}+wzk`kI}<-Fcq8lc-lOK3oVKqQo8N7H2n)x>T`C6a>HAB7)C^As4PY3= z7MLv-szCZNN9=jBli7#uPp_qJb;W4lI~w#8U5z zdS(Z0ld_5X?7W*`*M)uwv_urv{;9eqr7g!0+{+Lix?5?+ZYFa;XmQt4-1Wz0F&@d) zz_-Bt$@M#eB#u;TfA}(ovdT477BZ~5tyxLS2Px_9PiUxEuvyyx!r1&3!Vk@iJ@ZVa zF77ELvXVf2EiMP(M^W8P;mL!Ra^+-jd@@~tC;1qiwS})QD$kHe=v}a;?H=h(O7bqu zbRgw5l2oO&2q%8{l;OVph|<3{+d8N0?6qH5C)So=mQyz{<(;RRi2e;NZ199xT4Tuhni|Y~FAv)HL=;tYM@b-!?WztJI)1VHa3vm3JW7 zKY*wfTP(Y!pS?TOZFUaxC%$L(VcOC(LIG4v}e1b%#a>Wfc3^|Nt*X=CH0fj?FDRzVf98m>CF=JHo2pC zL59n%(AB29k(EM|fNqGwzNH$TRO4n%Tn;{&mwT1mOFF?)Aa)RVvv34qX6z}FLvFEBp0ahT>d zooQw)K*D`4VIm;n%r;ElvJl|F0GIWC`|%sz#CX=sWDa)$CP*=T0px=OSoxbR{edws z$PKeE+4M!kEcde^G#v?Qy@qoWQppy==Z6Y3$O_?(109gx+*XN)tw>z!=yqAEDyf{` z9WJ9AW|E#4TXQb`GNC7KBWJXbZY|UvL&NX8?9=rlD{gT&9^$%(k6v>KIR5P7xRexN z>De6oU>Bc|e0wCGS^@CCD8Ae;QL*h21#>d2C2st}caB*OC0O_JnwGpiS-b6`rH3u% z?^V-E!} zqppk-(V4v!!m+t!EZkKr5Vv00{O+yshuXNx=hv*aJTbntvlk}e{&o>rL-r%d`5sjw zJ|_8|>%ImMp0-vNwWUt+SVn_*7OcaeX6wgm7hQ|P@M5-jXUDQc$q${s%T(ZpTN8^I z;z2u{g3(`o&&bO@B-P8bA>~q2@J49U3lH0S5lP$+;J(4TY4h=?qI+~e7e(BlPpy_f zd^?rEaPJb32~#YmpV`{i$1>rtlPA5etalG9x{^JLAZmEJ6^WDVOv_a6cbe61BZ;d? zx}BM<*R~Wfo@9RORR#)7qhE8OUc#!GZ#xZ+ooRE-pnA3d945aa@`bfRIX$us8GhA@ zRu;oZ&M|Tgr@iCipNXRA?0^GWeD?GNiMa^PatPgWNFSXEpkfMps5Yqx}o@ z8~E2%XE4GLou%BNtSuS$%w<16vmFn1b6B1yL3hNqDzwN`@RxPLzS`IF)~?{z3k7l6 zq3fWziejJdrZN)GWtf0zH1Qe4gRc%DR$NY29rkW6E-nk}IjQt`T2(38D0axpVBWVj zPvue0Y(Njy$%Is^iGx5`=Mt!i=gi^hrNV9=meX($$vo8wOiaeD>6VXLH_if31Y65# z&zLxB$(b+FRi!GL=!AJ{$UxWhqDNf0^<9~3nc!$B@$2ryp7}J%3l^V3#PdM-T~Knr z^Rs&>9u$!$zzKK*Z`%Yo@mr?;4;6}&*ndiN=5C<0lvvsV8%{)7x>4 zF_b=+J9$2iQVz><3Su$4W7H7sdwz^}TIu;w47=Pd=_L4^&V_XnHT$QBm!*8az+d|z z#nzhBVwIWNu_+ml*xW9#&?T2qNx z0XvI#9S^t@4ugAc?M%5dz$E-?^Q!K?M9o|yVXUfoVB;2FT~|I25ksrergKd!4GI7h zs<#(Vua0bbF3$>i&*QR!-F(RBIpI3?G_*-wk3r)?fO%u=v$eIwdCDQ$P;!VoWpV#|k&!7X$ z#EHio<6k%gpRg`V%3ct6;${}kr^gm^h&am2y~-_P#|!8tN%fs38r{#vv+skoFROWF z(w2HoD0d?p4q6M@jr3gfR)4qWAKSKCE<|a~(FNca(g#z$+78eB*EOG{hQ+i}pYYZS z3}9)-VK(gf515rOnf-w8!u`L(QOYW*uFb@p<#$3$8?7y~&0>QVgG;;tl5Lw$6#wzO z9+Dz^&*AY}=6rmDiCm5{Lcten7#a$QWH&rspDcN}2uxJ&e|D#(3QAQnY^{@~S^v=wJ_9~gr< z9LELWmxLHCqV9QDs6d;THd4maI6OXvfg_X4 zy{!Elw*~z(Q3OjP*4d6j=4A9Y<1_d(1%`P`zJuwgM-d6)-d0@yGeM ziqB`5YYFE%VJxZRc6CslI^@~SaQ`|@6DXf^!LocSlDcSJH(l7;iU%ko0@h4*>z-gF z9UG9N;gpz?A|ys~kGbwn978E1M^e%9Ffr$eM=(DvqXo3^O#SA$u40iKUMdmYqOh#& zIcTO+;@&V4=eY6T8}KPEBZXR3Tgs#1^2ZqGLRtFhN0PNSmj|q!kO#mZXr=h(rj7L` zjTc+eali6^kR`MHl|&6z>&Vzi6Hmw+MgW0%0~TJ0bs7B#)Ml3Z4Hq(b{84O%d) zu8qCp7TNC}_UU-?3Rj7Ssw(N_HN`yU=TtZb-d=1Bx_kp3KD2ESA(st%D zFMrtY%N*!=4U`3)om-_k>bR*`;;k2<)?h#^2MdMPBYV?~Jx>2bO-W*J5fI|vMs9h+ zWzu8r8=k)(y5fs)(=Pp7LGW{`til}l>cS}inC~_E`olj7s-K|G=m3}GwCyN=k8bI! zGCNC*u}{D5li}WV(q8gD5lljOe67_g0}9>jgPxX=bcH7(nka?YS1>>Cd7jHes-x^y z;}=Ra`ds~3(inCc3K@rOq0(kgmRQ%_hHrBT&is)V?PbsXdUZI}=||MZ)Zy9$=Y@!g zlVep9@L1ndJl~x6V%`a3S+IsyQ`eOF+#dA$ox@L26MsVrDS@rlH6Oh&2sX;xFBeX# z{Qf=MRO<~0TKigJlBc5D(G%>7gc?opf+6%tdTc}8wqh2bp1rZ`Fs!aR1fnmK58)lH zepPl{QpmyUTPx|vQnk5kHrd`$t!S#X^;*!T)8UiDt{1ptZ#*zhmg|b=LrO<6X|grm za5I?54XX;u5dt4EOs9)$i9caOp#bmdP{h4I9a)^JO|IPg_upaNI;!Z{@WFX2gz#26l;$;6GO9w zU1Ouv^&>VObt}H;^vd^K$C*tp)l*u-b@ z#Gs_{*jvA;Gj}fj?uuiBndnkn1NJGCD{wg>CiWHw105_wC_-*z{j!>(^45keZ4XS9 zY10dgHWqbm$Q0Lo;RQ=!rbNp@s(hJNn+nKSV3=AQ7tC^5uc>gBDq~!w-{g+wt4Iy& ztWGK!Kx39#h~@=(9gX`Q&t5S9`S|9vE9!9AAzXc_H0fJ(aApNcvY_nR70rM@fXtnj zl+l2N7O1yoFU(~C_UCCWr^(Mb9p5uK|DnXcQs=h3FA}S&>h1u#KEDMve$x3HHRfQ2 z5U}#CPl^k0J$_e|=|5-U;&7a1X1_rIc#ZM7qw=zP_;$rYZP)D)3@`5L0tSRt-ieL( zQ5j)8Z%?yW>Fu&7$e$lvi9!o6r>sni>k?H$+1c|kvUSftb*JyE`_1-H6DiIIH0C(~ zKY{oXS;O(QfRB9wW3@&;XgV-Z4CA$q$^Io)z5og$QL&LA0TmV|=2olKAc2E%j7B%w zdiyhG_Ne7h*L{r1XgRjDO3YEco`d(-A=C){Z+@71*EpCBwGnIfRm@RhVLX7g!tD^F zYc?|W^+vWgONFb-&>-Y=bWDJ7MKv?EQ+9gFn0`e!le80xOZj1S9g{ye*2u7BUcVux9pBFx;_aF5na^x3wTggTqjB; zmod#z>0vAr!%b)JCL?D*4*UfrJHXNgK${%CPky40b**{1zishKI)Rue_nVR?$$v8b za)__iD62X4uPEAds_Fk$^%vr@3izAPAAG}#e!dXRkI|LX_O#-WR9#NsGomG3$GUFk zY5a|qDIH@U`1<`y`Sc1v@QfU`y^l`_|2y`lt4j=QUUd?*%5=~O<4%M8tvaoe$YOrN zDn=p+7_+I0DYI`Ukwv#C#-)uLt4Y6bZ+)lsZ}kgFi*jwGx0S_#qV&Z35p^%sb}$&7 z1J!XK5zK$>7jGzGeOqjVddKmLPuS&KWf^lV^gEe*%ca5B4Wrfeq>=LmRJu~=wL<77 z;BhPdmXPB0Fy(RB>-sJ&aEUN~n?lx+UwlMeQS!2WA2(P@a>7T2C?j}dNzMu6V-hHu zn7b!v>9Ww^k&>}iHyp_(aTD|!+fQk#5F3a4r!gaDqY2uVA_G1@NKLuSxoxSj{^c!v z6RG66iP)$m#VymW_Y;>uxgFm?=|fR1=v*{^I!twjn8j(tE-(zp@;xk4+|7S)d1@9# zc!kmJ9}W#%I#pFQj77}UWkMGJq#^PX zx&U>rcMejyk4j6{8b+&;5%isO0a4=OD&2*Xw-RF!IXD>Q>nwZW{sL_FAw6_kSx z7?dr)vX@z17>*j`@3_-#6JvvoO<7=$GLg_o#75bL`e=bOy75<4)<@wDiW~t^_YCVq zCvoTjdvES*ueXMZCh``JSl_Xa%e)}TzNde@C2z4|HPLe3fC*kh0F)b?=}6V@UHJMqTdMaH zJ4YoahS9GohlvSgs@f-%(|hK|uHS6&AG{{6EIhRTwU#}|PAZNud8a4{Qg$uHm)T7B zja7L#4(aCHXSVE3ZkFAHQeCU?RT*O@VFCiC@%FchAF~_XD<2K~YK*#ho47^xC|!u@ zX1;@j)THVtseu6lAbG+l+Oh5^3_;b~8vJDRXn6x~?VUHAfOpRCy<>wB%&A5$vWSmt z`b7B|fsS-Sp*SP^8~MWaawpdWOB7mQCAOsiqj!+@!?hD)t4@~+%PPML%M z)QyncEjLBUWk6}7yf~QaOO`?eq`17cK7GsK3;pM3$;|WW)W!qLvxC2VtqgoYO(=%J ztc~_aEojk}NC6|@mzS4gANV!s_RWg|wkdC$cVK`#j~eq^$WkE8l6Ydsm#RDexhx8) zO{CcojO)XUAE{dEcmMW|eV2*MI+ycFdvXPTo=a#Yl_p(g7;!NkSn75$wppmp*`7^y zpX?9rLP^GR&f~d{tKBzJtz^jtYX7Ogtz`c)F3cPj0XT6k3t5_BvUI*Ibk-JTgA7za z{lI?HtQa;X);{d6vRW30tQvA|^y4p4Oh)?mFZtwRkNA(4j{G-^%a67nDe!JuJE?Aq z+|-Px^Syh~Y#Q2T=R@o>sQ-A*7&@#;taX34Q3BfQKR@@qBD@n56M0U<)a^<36!>W1 zgza!#bIN9k4DZ>?wv->!`X=J|xbs&AkcIT}3M4NpbkK+|<*`&!A=Jwu<|L_;{3rP# z%2MOq4cMF23Rm;^>V4*mDBPp`d_ljhhy`*W%U`*;*R7FSo;$IZ;*wnU`{RWl6Te{}!E|GV(cQ%|db@i$$j=e|v(3s!HF+ z;S-D6HczAU`&G^cG^JRr5vgh7laZtOIjR0@#{)v0D$d__tIW{vVb=IO-_H0v9FpAo zw8_;>$6sb`?$;bsgvNRfaS}$Gr+)Ghd$X7`TGt3!enqOja9L3sZ}ju&gbz(v`L*y9 zTj#CMEZc|S;Cxxs3<=LZ+vS%;Bo*{J$Y94Y(?;5Z)HbOf?E%Ycc}t8_Q^pkO)?)z z9w4Ab@-T7o(m*sY1?+j&$o3zuFoHd6H(>L(Um;DtdF5C8Os&JLOGeyW^YaNAJ76a1 zGj*^h58ythIB#dXR78bg9f-j~Ld^(q5~t!O5f_(`_uP~GHW({eAM>Z4@(8o&Ro!x7 zCr>g@E4#Z9;kjEo6VA_3pPCvS>@A1B=9S?_T~teo3z#X+uJ7n#84=xPbLa5Azul$Q znD~guFEP*h%!Yi}pj_WdHhm{-kUz^RsOeO;-siPOjyTKbeup0&{^Sz z`(eW{Pr5=c`Ybr;r8WPoEjV;E`QuDTKJtL>D10{EB1x^8p{gzpw@0@;uXxp>_U!5c zNm|hwbAG7Gf04B_WzKP@K4PbD=9Ds^N;M&yHKxp+_+<{0l|)ho9kiYCG&0Grp8mJ} z>~V55+4o-?+kyU(7EOnQ!#=b(WSMilYb3%%aXTbnS$~DxLq=Jj^;PN%-?SRDSjvle ztztnfzkTA z=5%%VvE)5ZrOj89+W&yT4%EBr>uI|K1s>jO&1)%B?hz54+G}6*9w?OVe26Rd69vUp zX}sjVF+1k?2`scfL0*NwDnonI>v$zM4AY`p<`t99JR*wMl}UuunK`0$1Nw*IpW$|V z$Dq^fOF^5{*(&p}x<2)(SyYP*mC(=ON$)g)Ya7+0BO-&i{> zj+1o>OIh4t$hDj7(OY*8yrOaD9$u)P(s*hgDeKgXa$_rk=OiAmNLI?*C zZ!T?_lP0HySCA4SxT$5Xq2gBK(N13$RKK&9Jx<2Y+Hf$ePvk^##D=$M>x9ow8^0(Q z$FHhiS1!uZBq7sm66g)Orfk?za6?j4GxW5H^rm5O8~kW=$(uHfuen+hGbNuAgS@^U z+Kfh`+MlM%2;k`lWK#K2FMF}6ua*~@#UJScl7KuKKf!Do!dr z#q{1|=bL_Fl{;GW#V}1bUZ?Jkfr0j99bsI{217O= z%k>=42=`BPzA7nH#Wu(fDt#DO&p;SX)~~+!Gbm$$oVY~Ey=>wk6_D2Je2t10yJll! z)0(ajdYv6oR2jqJsdn~*pw{a-;d8h##7eRk(|iA}Xrm(Xj+E*`SxjMUbPH|JIp7ps zAni@^k50D5jacN3eobYYWG}9CKO7#BpKM%eU-IaPIB909<(uzRT2jF?S#GsL%gg^K zTu@D3kvM4#{pwhWj1dhIHW`vRMcBmsu>(#L+Y+$@L5ailCWh079$lghs{0$P9W?u1 zx;^l3wg4%+@jZb{@(NlH40uX(cB(+bg8gWDaG1IT;$XD>QE$pY2I;>Ep_6lxcAVnv z**IJF$?K17j}Ht5ayX_g0}!p5)ImB7FB@@pU?MUXO|Z=@+@uWa(Loc-*-2Suwfkqk zzOQC^9YwH<)e7QqPMEixvDCWkajuXXK@DUwbARP$X8ZGCy4&Zuw^|V16P9bVZO06L zKW^;gfmR7deeBKTJ$JRsUFTDjJD8;S5ppwi`q@<)pn6MJ$b$e4lk!Ct(RXqqXKnF7 z@h~fk0S?37)nOQ2m~>6%l7CWzC25%-{ObOBYkP^);gqWRYe6_aV!Mnc4JkOcj@UN* zyIvwjCMidL4`0k$^EW?O{7~!T-)KzqMrNO=kJFZ~>6+k2M?nxPD8T~R7>CPq_s+}7 zH;F6G-zj(Il@8YSh@(#uopdl_(}XI<`ABrcYM;gL0*=nYWydC8cp=+1(6<(Sw+0Nh z5Gy^BF3;gRYV%+hVqK}5he%iO|4N?GdBB~5Q}DV-%^BrI+Y*6kG=nERe^jI{yDn{N z9C8{SmsDnl^Lnh=`=lmHJlXIn6}9*I==g;b%!*OHYDWzBZ0`RDRPa%bAu1i|XJKnh zEug1*xiiD*9o|BHl9<APOJ9S^n(m(-5 z6|Se~n-H?xuFvzSX>!4Xwio9de%sTDZo`DP2#@H4>#|+*8Lhs1iB@wV)n#t)z!)$q z8Z6_hqHF~HUKR&E@jqzPKxfH!+ff(;?Z-i{kMTpHF~VP zCbqh=7MOLyHYr=n9p*`6M+J*qiui9_cq0p%>UZuxQllxoqvfPkWL_GAZw5$^|t9dc= zGvfLFpE+GZpn5=toHkPLVoXV1gk3P#=$;bl&Ghdq&I+x#Kw%zaR|Zps=!<1XmVQ-( z3_m+o)6?C}@;&EeYt>XMe%Voaw~QP&r>Th5vf!ZB<;AiKuJDNDQMI&L-4U6gyHCnTW~1)6a=zlw(ALvtX}3yw3m%9j!w!PiR` zd0~zMN)3(d(B`7#&fKZ^Tc8IwShb^<{gS(Y#?pb4y~+=tJnixuMNO|$GY03#YvyB+}usIQa(>`fMzGI&<2Rj#7CiCv)MN4`v}@k(*>N(s@;< z^M?=A4i46b7e?}Qugnck=Xj=e6O|V49uhn@bPVQPy=^jZIlgIMKmyxtt|J!Px`|f~ zA@eHf`Bmf52OVQN4sfsBOBhL4N#u-dMsiqr!0Zy=dl4(`tV6|&-W)50*Ho6y56l&r zs^l=#Ki%8AN&4uacDWKQgW%_le-UD#OH*Z{#s#j6L#=v+N#?-bBrROij1|NO<&muX#PQRc}nz~ZQPD5hF1?hJ;%MPurc{Uv}R$DBz z?(=!>rCb3C0_@sMx`jL>K6+U)T7sDQF>y%M>>R$pzX?VM zyhTcTJMn{ow7vL~tw1yBwAvU+Tg-}{y?-{;cF}{UpVBYFxiR76jl$lxYWgX!1!0;14PvKTmEjlGKr436+y~PmnlUhk1}BEi{ZMj>Dbs_BgmkGeq*yR zT0auaJ0GuY~7b9c*H+&*3cX=-} zeql@WvSo8O%6#>SzblZ)LMQY$LxXt@GV$y<&cHd8pLXQyLMuD!xqXXF-w`PYu& z#d9;!B+~c{#?fKo{%U{88i6X^hM$2Pz$zt?$WK;%X)teGw7|g|3XhTuw-kQvIdq+YP6w?ig7L4b!6!E30lEj=z zmL1iAbh8o!3FFT5yljM**5oD5@tULSWpU`dMuJYlsiA?`sE4pNwUsViBjx-F5 z3wSzgnd}w6m&{gwpfW~3p@V-6qcv0dkg1l6-wKSS-a?h3pg)3AstH;hQ)br*b0jrB z{iR|gv94r>*3h(Z6$5(+Nj#82KyLXTGA)w%E=Q)d*;bt=2@CS~EYhla8+;>tkl6LJ zcV<0!Y;-)EZci6=nhkY}9#!UQAk`8+>;RMCIT9NrG8rkW6Fon305rs-xi=GL8*^`x z;=;m3GxnrJm)=+mc}Z=ZrH@3}lg~I42=+PNr)8#Z>+?SS-bm-rniF5Ztl!CfznbT| zCJ2(U()K%q=T_ZpB#vd~eJo}@WX6vY0j&(LPjqiC30YP(RXAoR!OL1^_Ftq*c@*!T z!b{kyWer&Vvf;%I%)F9>Yzq;9SK4VyL%q6*y5+E|k8xoyRkV8(Pwj~Y-ZJ{!($;{c zvo=cJ!s<>Ja8 zCvCDpY?6V+CB@74Y7$BD?{_*>q~(Pf^x1GJ8ymB6OUz~^6FIv55W3FyK8JK9pU+2< zNK7wu(0v-dY$m-9PuPd?|(00=;q9EN+70 zJ6&K?74zYWA9vf1Nb)3Wf~>P0Wbg%PBi(7%fQYK~M1N1u7a$_$fKUN<|GgKgSyEqd zOG$i>_Lgs`!NXK%2+6qW-QyS54*jec%orwbj|IbCbBkeI!scXo3btBKhyZ%vU?TM)&u{5?Y99QxahyP-on*e57AbcC)K?%OnuR%D9k1^ zaMv!9P8LyLa+= zW3E55my9*`@X?A0+74ZfQj}qc&j9>k-iWjCfTJ0ID}~6_IkRylvzoeweMR_2STQA( zDptFg`AVSgj9{Y$8l5+fuP57q-pZD(`|OS_7tOA3xgM<&pWokP_Eh@dN6FBh&Ed^y zefEKS%7&qf{3pyxy7j@A_uP_f$oB>gr}_0tCj#Vw-rq!(;4cfK8zLluT`+#Wm0_%iRO>bAnUedrNgH^K4wsp4^}3-MLh@`|0oi|bO7b2;tZDYV?8BjXbcZy@MeLUi)tkeztO*B-ZV<`poc+pF z2MShF10;+rw==r`m&7okmss#AVs~m1h%bO&JpZtSsw|JU{ka_;W2SPnA@0ywRz?6f zTp{3rNb1vM<=I(`J@}r{p3MYF4Q#hdBb@sQ*}mvEb&IXb6WWx7(Yx8#okx|(%u%<1`iXMRg^q3$tP}<5HZwGX}6zC__yT5dqdLq zYpgc#bpQ=%E#U(suL+2k#1Bs)QAL0A#+V#*!2U;L{}fT4(KHtoE$hmbdSh~+SLtp1 z|55C0#pO7MRh@*)U(=6+B@&my9DYev zR2~!$H6PQQGcYbr6*HJZM);XIazL&8jv=woGs`l)W>5p&aT&9I^v+B*Y)hQjFK{DN zQ{eJ|BTzO_S`SOP9BY<(flavTw{JLpPQIBMhdbWlqW-3eRms1XD_YSTb@ymhskl>I z$Gx4cj}msB!AXXPwJ;T!PqJ(y*6l$8WnP?$0z-M7EX;NeeFWp^Se~%MP34yX6jVFd>I;`hy{J5he(v5_fn_5lv{*({VKvNXp z(4cs19xbSuma(V*)f=ULy(vmkKmKw8sk8mAVcDljaMPBhSS;Ta$&jKM$GFmIzx@a7 z#kGC5*9b8{ZX3-`4utw|WJ$ZdYRRimK}uo_32htFnjC43eZaaNQk>&P0>jKw=8+G1&cg2*JcIrDqtZqGqb(s!nd8N?iah% zAhkOzf-YcP$!vCf>F3F*S6b@+SY$-GRtbXwp856IiUitCy@;#SQQGYF)Ymjw#r0Qw z&6*bD2%Xe+opWcxZ?u(wk9nJPsZCQ>qXj3L4%<$CJ>IRQa)j#AI9O%(!>6cl7|EX_ ztO3#ctOVr;Xu1rrsQAXD$Bw{uXFr?hBCKCI6DUR^YAe_I!G* zVm3QEJrv!y$rD81-~@(U2NhuBRYz4NCQC)7m!YQR3A69Jv?h48BR#hSZM+;fXSreg zGWSN1q_EAFKFe|M1}9-CPf}~}gy^_Vyl881mJ<}EAxh8%AxCThiY|)2XU{;Bb(xUUr7a{Ba94mqq+NlsDDhgCu)MC34sBBzj?joC;DvE(pvn8^7sb3Tp= z!<^6Ne3-+W55q9K-agmu`supu4{+PdUWe!7aeqFZgaByXHOn)qeCL7g{_71pdz^2} z4)WN`OQe>={`%4yXeRJaaK2SPL6ehe7}ag-kUms6F*PsFm-Ju~-p}aQj!~lxl}GQn zM-DcCo#uVq#zq+p1&fD!?keRcU4+a|6$HP>yYTVp^SfsV*R~%i)|n|y&9mEa7@R)f z44}d*Lqx`c2jW+BhscK9Z*~8+_VnZ-0@h{?Rv`41#VmI5ifq-K34@Bj1`^9y)&Gpp zkh!_J%&9YJ0Z-&s2ekQs0_s){2`kRZ<*a-=<(?(TM*p%O@mE)#VzHioET^vdX8Lm* zS!d_kw+9RYm(65vE{m<(9BK+!a1Xwwe$b?2dxW(a>>`*Y0wF-6@&8H=;9)RUk~16qJcz%HOTAmjbuf2$wfJrr`KPpdZr{J-TqY6mUPx*eRCf+xQvowc7wqe9QQKlwIIK$=l|600|F-ch z$nE9_9Nhj&cQBX5fZh4Q=OYr&eLqL#u}v(|F(AtW`+~o!G$TuWK88O0aA@w6tJl3CY=CB>Awo)W2A<{V`TokDLQc6DF2aHH#GmjNb+V z;p)gYzH#3cOv&jSd4xsGrM`N*Khkp2F~OJ_;+&E_!AUn9DU{%O%HLN^$am<{Fl8mzDXnkdOKA5!keo;DTrsN4e$t>R;c zoR=UPfGKe3(4CqbzmXl~l%(>~kHe{P4ZEjGU^G_Y_-8d=<3QT<++eRx*%k|^c5mn} zH>3gA!zyfepz*5oN)hc3`o)Pu0Uoh1g;=)?Y~VPlov&JwXnDiE>7{2}E??&L^@88> z(|7>ea9FfN?D&p`#NEAdX0yVf=?=seB>?)NJddx9ud zrt&=-T8V50djw>1IOaXU`tBS-FT0$wruDk`B76B6T(f>15xVb;xBsBF)SEvyv$E)I z$$c=ka$facCW$<3s-oxJj*gDYNoTGGY{uO@wkAv>A|z~*ggVC?y%}2NPK}d1=Jp~q zZLbo0N$DNU%Z>LaEOUdwxTR0!NnS-4ALHOj8&P{YFs_ha_IKmXKTPe6=V;{1b!-Qi zIXX($QkB*yi9V^^r*H3$f%nIcbT$j``iT)bFe2S+Zl6W`V0-5_?{07sxQYL zKR+zKYO^#PIW(xNG7?VA?&2~++zfiAbDlO3C}1O2&c`?l5HI^K^*rlSMg6e3J~|)z z#F72mh0R+l7aHD4%clRy%F6oFuL~CN0+dP8-@&V$v`P;NlYB!`$N=ZY`JcV-F*ErK zUpDx6@N?gD@hj~gT~H(-Z)fMB&;b3`^Z{ee-!Z&V6^o)h^UZx>zc&IZFX^QSft0u; zQ$vnluYUju3`VbC`kO1dQn!zl;7YK&cU5=tj=ZAiN&Arvq+6AdIRB0K&318XHIC*_ z%eqzNe^v*nn<@Q9+_;l9&O(>t{BD^O#i5^RseAVQuPBTKqMJycpAjsS^r$L(UHG|& zEE?iVuX0&+M}1c{xYG?u`5rh>lHtOLkEM@-4BXM08tdE=uN;5@*pIk-XZ^Jb3qQ_# zf7rC6W15HiC~Nd{2kAeITCc{ula}A^%~(TATrP4AE3)-{qq{9#`$M}x%iO)Q!qQ{h z@0lnT05(RxeKrBQJXQk-cOPPQJga5-3U{~dtKEXKz{QR}tHkOoI8NcefEdBk3*Ohm zKo-KyQEXZodnNa^$0qs3rFWWl>!urA?cMfL8aP!2NZtQK5HiLpXhs-*#Ab!Lkl(&D zXp|58an)^QwNj@$<#>N80lam*C89EFRI;Xr$$W2Ak|}~K4%6K#yWxbD4=uU(P737g zX1W^yD>04uQSL@g+jl8!sV7oQ!GNPWC|H+iQ&k=)yi}QV77}Xrmv1lCd~Igea7s98 z{epXE@4=407AUBP@>9&c@SBA$z5L8S4Q3wNpAb}XpbC+(5YczV*!?GZeytD?g2^2f z|K-R8Yj0j+pn7jK^^E)^33Q%6V``Yros_q2f;#nU08@?;@kQ2|IbWi9>GHd=#;I*( zuV`mG&THF$;*t>5`GLWN28Vm?PnK$)B&DkYc`Tvaa1(;HP)PZ z@dXh{?m`5gM$6BItljM?*CzExi!WSDE|A_Fn)D8p6$3DT^5c-ui=i$p>XvpHpBO-S zA>xvW1|g^T_nT7Rhb;R4M!dQcVX}->V+IhruQ{qmlE+8v{25_vKP{E(Pfdh>(I-fc zPcZYlv1=L(#z)fsg8yD_;10;9Ln_J;w9Dp_jM0V1FXQIXDq|XdaL!uzpY1sInyu(e zwlvaV{+1-FAQHfp2!z2n$|&Q?+L?tr25WMUzb45&BGwjqW-wy88GP*HLVdBhchR0e zC3V_rRQ$H6n@yABRqch{$CcrxES5UhvGJFQ~SefWoE8K_5KIS_2!_k zKiN*boZ~`j!7;%mwVK|^9NtbTCLD6H6+h7@{ZfXvTSG%H;#>MyxFtTHrueA%?ZpmB z`bGNPdSDw(T@rNaKgpTGqGFHSexUZdckJwbsW2r zqY&;=_fh9JFWt-F^R3ND3hw~>CBBH?sAYZ1%iF+yCi(_E%&lN-6~GiSuQtcCIPp>f zE9UbGI7-sF(e0*dce6bVc_`s|4Xr6Sys+1K7j&OP;Dlp|+_DA1VAODM(epKzZc*OU z%AL8DKkOa!F$HC<9*+Qm_Kv6V zDA6QU71DvyDqnOq5M=esVIyDI`#Iusm!{-m9%so?uC@|^SZ{xF(3NR!jyV_u20%rv zZUqMif83n@ecC2I9|LR8Rm-*R(bA;E|2~-^)F%wJXz(#~oF7}3ej&T`?!zx97x8!b ztAU2Q58;e&uB0U9n?^Hx^cr~7jW@pvtXPG;R+v2dW!2Lc2tLXF*Z&`ivN5lX+C$5e z?31Ns#1>Nk7pdk#<&0P9oA0aXDM>OwVD`JW&ns}UB?Cpypp@(iSU5_B($gI)K)VubWI}+L zRB5*kL`H2}AX%GJanCC}0SOJO=0dP$%zBu7^XuV^VW`tLbrEaV!M8S!y1dJ6wHkJR z=KQ*Pc0+oE**7GKgFOBL0MJtM8@=V6KHJtX$p8c%jCuOwyY7B&-`{JsS?kT(9nj?U z0Me00iH9}-v+E$FMepss9qYD)dS0dw5h47F-OmzKA`YzBLzJQ#ks& zJ8)D+jtz}&p329DR;jL(mz8a-3~Xp|@ND%xL;&qZ^ILyh